proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[126]
proc topol() { local i
for i = 0, 1 connect dend[i](0), soma(0.5)
for i = 2, 3 connect dend[i](0), dend[i-1](1)
connect dend[4](0), dend[2](1)
for i = 5, 6 connect dend[i](0), dend[4](1)
connect dend[7](0), dend[2](1)
connect dend[8](0), dend[1](1)
for i = 9, 10 connect dend[i](0), dend[8](1)
for i = 11, 12 connect dend[i](0), dend[10](1)
for i = 13, 14 connect dend[i](0), dend[i-1](1)
connect dend[15](0), dend[12](1)
for i = 16, 17 connect dend[i](0), dend[i-1](1)
for i = 18, 19 connect dend[i](0), dend[16](1)
for i = 20, 21 connect dend[i](0), dend[19](1)
connect dend[22](0), dend[15](1)
for i = 23, 26 connect dend[i](0), dend[i-1](1)
connect dend[27](0), dend[25](1)
for i = 28, 29 connect dend[i](0), dend[27](1)
connect dend[30](0), dend[24](1)
connect dend[31](0), dend[23](1)
for i = 32, 34 connect dend[i](0), dend[31](1)
connect dend[35](0), soma(0.5)
for i = 36, 37 connect dend[i](0), dend[i-1](1)
connect dend[38](0), dend[36](1)
connect dend[39](0), dend[38](1)
connect dend[40](0), dend[35](1)
connect dend[41](0), soma(0.5)
for i = 42, 43 connect dend[i](0), dend[41](1)
for i = 44, 45 connect dend[i](0), dend[43](1)
for i = 46, 47 connect dend[i](0), soma(0.5)
for i = 48, 49 connect dend[i](0), dend[47](1)
for i = 50, 51 connect dend[i](0), soma(0.5)
for i = 52, 65 connect dend[i](0), dend[i-1](1)
connect dend[66](0), dend[64](1)
connect dend[67](0), dend[63](1)
connect dend[68](0), dend[62](1)
for i = 69, 70 connect dend[i](0), dend[i-1](1)
connect dend[71](0), dend[69](1)
connect dend[72](0), dend[68](1)
connect dend[73](0), dend[61](1)
for i = 74, 75 connect dend[i](0), dend[73](1)
for i = 76, 77 connect dend[i](0), dend[75](1)
connect dend[78](0), dend[60](1)
connect dend[79](0), dend[59](1)
connect dend[80](0), dend[58](1)
connect dend[81](0), dend[57](1)
connect dend[82](0), dend[56](1)
connect dend[83](0), dend[55](1)
for i = 84, 85 connect dend[i](0), dend[i-1](1)
connect dend[86](0), dend[84](1)
for i = 87, 88 connect dend[i](0), dend[86](1)
for i = 89, 90 connect dend[i](0), dend[88](1)
for i = 91, 92 connect dend[i](0), dend[i-1](1)
connect dend[93](0), dend[91](1)
for i = 94, 96 connect dend[i](0), dend[i-1](1)
connect dend[97](0), dend[95](1)
connect dend[98](0), dend[94](1)
connect dend[99](0), dend[93](1)
connect dend[100](0), dend[90](1)
for i = 101, 102 connect dend[i](0), dend[i-1](1)
connect dend[103](0), dend[101](1)
connect dend[104](0), dend[100](1)
connect dend[105](0), dend[84](1)
connect dend[106](0), dend[83](1)
for i = 107, 109 connect dend[i](0), dend[i-1](1)
for i = 110, 111 connect dend[i](0), dend[108](1)
connect dend[112](0), dend[106](1)
connect dend[113](0), dend[54](1)
connect dend[114](0), dend[53](1)
connect dend[115](0), dend[52](1)
for i = 116, 118 connect dend[i](0), dend[i-1](1)
connect dend[119](0), dend[117](1)
for i = 120, 122 connect dend[i](0), dend[119](1)
connect dend[123](0), dend[116](1)
connect dend[124](0), dend[115](1)
connect dend[125](0), dend[51](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(67.8394, 82.8256, -9.11176, 0.528462)
pt3dadd(68.1173, 84.3402, -8.55596, 1.05189)
pt3dadd(68.3952, 85.8548, -8.00015, 6.62746)
pt3dadd(68.6731, 87.3694, -7.44435, 7.8504)
pt3dadd(68.9509, 88.884, -6.88855, 9.90808)
pt3dadd(69.2288, 90.3986, -6.33274, 11.0731)
pt3dadd(69.5067, 91.9132, -5.77694, 12.4403)
pt3dadd(69.7846, 93.4278, -5.22113, 13.5051)
pt3dadd(70.0625, 94.9424, -4.66533, 14.2402)
pt3dadd(70.3404, 96.457, -4.10952, 14.7095)
pt3dadd(70.6183, 97.9715, -3.55372, 14.3791)
pt3dadd(70.8962, 99.4861, -2.99791, 14.183)
pt3dadd(71.174, 101.001, -2.44211, 13.6079)
pt3dadd(71.4519, 102.515, -1.8863, 11.8554)
pt3dadd(71.7298, 104.03, -1.3305, 11.0815)
pt3dadd(72.0077, 105.545, -0.774695, 10.1072)
pt3dadd(72.2856, 107.059, -0.218891, 9.40082)
pt3dadd(72.5635, 108.574, 0.336914, 8.1909)
pt3dadd(72.8414, 110.088, 0.892719, 5.0058)
pt3dadd(73.1193, 111.603, 1.44852, 3.18468)
pt3dadd(73.3971, 113.117, 2.00433, 2.02914)
}
dend {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(241.57, 665.58, 0, 6.11)
pt3dadd(241.57, 665.48, 0, 6.11)
}
dend[1] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(-125.45, -303.58, -25.75, 1.7)
pt3dadd(-127.55, -306.38, -25.75, 1.7)
pt3dadd(-127.5, -306.33, -25.75, 1.7)
pt3dadd(-127.46, -306.28, -25.75, 1.7)
pt3dadd(-127.42, -306.23, -25.75, 1.7)
pt3dadd(-127.38, -306.18, -25.75, 1.7)
pt3dadd(-127.33, -306.14, -25.75, 1.7)
pt3dadd(-127.29, -306.04, -25.75, 1.7)
pt3dadd(-127.21, -305.99, -25.75, 1.7)
pt3dadd(-127.6, -307.08, -25.75, 1.7)
pt3dadd(-127.17, -305.89, -25.75, 1.7)
pt3dadd(-127.12, -305.85, -25.75, 1.7)
pt3dadd(-127.08, -305.75, -25.75, 1.7)
pt3dadd(-127.04, -305.7, -25.75, 1.7)
pt3dadd(-126.95, -305.65, -25.75, 1.7)
pt3dadd(-126.91, -305.51, -25.75, 1.7)
pt3dadd(-126.87, -305.41, -25.75, 1.7)
pt3dadd(-126.82, -305.32, -25.75, 1.7)
pt3dadd(-126.74, -305.22, -25.75, 1.7)
pt3dadd(-126.65, -305.12, -25.75, 1.7)
pt3dadd(-126.61, -305.02, -25.75, 1.7)
pt3dadd(-126.53, -304.88, -25.75, 1.7)
pt3dadd(-126.49, -304.79, -25.75, 1.7)
pt3dadd(-126.4, -304.69, -25.75, 1.7)
pt3dadd(-126.36, -304.59, -25.75, 1.7)
pt3dadd(-126.32, -304.49, -25.75, 1.7)
pt3dadd(-126.28, -304.4, -25.75, 1.7)
pt3dadd(-126.23, -304.3, -25.75, 1.7)
pt3dadd(-126.19, -304.25, -25.75, 1.7)
pt3dadd(-126.02, -304.06, -25.75, 1.7)
pt3dadd(-125.98, -304.01, -25.75, 1.7)
pt3dadd(-125.93, -303.92, -25.75, 1.7)
pt3dadd(-125.81, -303.77, -25.75, 1.7)
pt3dadd(-125.76, -303.67, -25.75, 1.7)
pt3dadd(-125.68, -303.63, -25.75, 1.7)
pt3dadd(-125.68, -303.53, -25.75, 1.7)
pt3dadd(-125.64, -303.48, -25.75, 1.7)
pt3dadd(-125.55, -303.43, -25.75, 1.7)
pt3dadd(-125.51, -303.34, -25.75, 1.7)
pt3dadd(-125.47, -303.29, -25.75, 1.7)
pt3dadd(-125.43, -303.19, -25.75, 1.7)
pt3dadd(-125.34, -303.14, -25.75, 1.7)
pt3dadd(-125.3, -303.1, -25.75, 1.7)
pt3dadd(-125.25, -303, -25.75, 1.7)
pt3dadd(-125.21, -302.95, -25.75, 1.7)
pt3dadd(-125.17, -302.86, -25.75, 1.7)
pt3dadd(-125.13, -302.81, -25.75, 1.7)
pt3dadd(-125.13, -302.71, -25.75, 1.7)
pt3dadd(-125.08, -302.66, -25.75, 1.7)
pt3dadd(-125.04, -302.61, -25.75, 1.7)
pt3dadd(-125, -302.52, -25.75, 1.7)
pt3dadd(-124.96, -302.42, -25.75, 1.7)
pt3dadd(-124.92, -302.33, -25.75, 1.7)
pt3dadd(-124.87, -302.23, -25.75, 1.7)
pt3dadd(-124.87, -302.13, -25.75, 1.7)
pt3dadd(-124.83, -302.08, -25.75, 1.7)
pt3dadd(-124.83, -301.94, -25.75, 1.7)
pt3dadd(-124.92, -302.06, -23.75, 1.7)
pt3dadd(-124.92, -302.11, -23.75, 1.7)
pt3dadd(-124.87, -302.06, -23.75, 1.7)
pt3dadd(-124.83, -302.01, -23.75, 1.7)
pt3dadd(-124.66, -301.82, -23.75, 1.7)
pt3dadd(-124.57, -301.72, -23.75, 1.7)
pt3dadd(-124.53, -301.67, -23.75, 1.7)
pt3dadd(-124.49, -301.58, -23.75, 1.7)
pt3dadd(-124.4, -301.53, -23.75, 1.7)
pt3dadd(-124.32, -301.39, -23.75, 1.7)
pt3dadd(-124.19, -301.24, -23.75, 1.7)
pt3dadd(-124.07, -301.1, -23.75, 1.7)
pt3dadd(-123.94, -300.9, -23.75, 1.7)
pt3dadd(-123.81, -300.76, -23.75, 1.7)
pt3dadd(-123.68, -300.61, -23.75, 1.7)
pt3dadd(-123.43, -300.32, -23.75, 1.7)
pt3dadd(-123.39, -300.27, -23.75, 1.7)
pt3dadd(-123.35, -300.23, -23.75, 1.7)
pt3dadd(-123.26, -300.18, -23.75, 1.7)
pt3dadd(-123.18, -300.13, -23.75, 1.7)
pt3dadd(-123.13, -300.08, -23.75, 1.7)
pt3dadd(-123.05, -299.98, -23.75, 1.7)
pt3dadd(-122.92, -299.89, -23.75, 1.7)
pt3dadd(-122.79, -299.74, -23.75, 1.7)
pt3dadd(-122.71, -299.65, -23.75, 1.7)
pt3dadd(-122.62, -299.55, -23.75, 1.7)
pt3dadd(-122.54, -299.5, -23.75, 1.7)
pt3dadd(-122.5, -299.41, -23.75, 1.7)
pt3dadd(-122.41, -299.31, -23.75, 1.7)
pt3dadd(-122.37, -299.21, -23.75, 1.7)
pt3dadd(-122.28, -299.17, -23.75, 1.7)
pt3dadd(-122.24, -299.07, -23.75, 1.7)
pt3dadd(-122.11, -298.92, -23.75, 1.7)
pt3dadd(-122.03, -298.78, -23.75, 1.7)
pt3dadd(-121.9, -298.68, -23.75, 1.7)
pt3dadd(-121.82, -298.59, -23.75, 1.7)
pt3dadd(-121.6, -298.35, -23.75, 1.7)
pt3dadd(-121.47, -298.25, -23.75, 1.7)
pt3dadd(-121.43, -298.11, -23.75, 1.7)
pt3dadd(-121.31, -298.01, -23.75, 1.7)
pt3dadd(-121.22, -297.77, -23.75, 1.7)
pt3dadd(-121.01, -297.52, -23.75, 1.7)
pt3dadd(-120.97, -297.38, -23.75, 1.7)
pt3dadd(-120.84, -297.24, -23.75, 1.7)
pt3dadd(-120.71, -297.14, -23.75, 1.7)
pt3dadd(-120.67, -297.04, -23.75, 1.7)
pt3dadd(-120.63, -296.95, -23.75, 1.7)
pt3dadd(-120.58, -296.85, -23.75, 1.7)
pt3dadd(-120.5, -296.76, -23.75, 1.7)
pt3dadd(-120.42, -296.7, -23.75, 1.7)
pt3dadd(-120.37, -296.61, -23.75, 1.7)
pt3dadd(-120.33, -296.51, -23.75, 1.7)
pt3dadd(-120.25, -296.42, -23.75, 1.7)
pt3dadd(-120.16, -296.27, -23.75, 1.7)
pt3dadd(-120.07, -296.17, -23.75, 1.7)
pt3dadd(-120.03, -296.08, -23.75, 1.7)
pt3dadd(-119.95, -295.93, -23.75, 1.7)
pt3dadd(-119.9, -295.84, -23.75, 1.7)
pt3dadd(-119.86, -295.79, -23.75, 1.7)
pt3dadd(-119.74, -295.6, -23.75, 1.7)
pt3dadd(-119.69, -295.55, -23.75, 1.7)
pt3dadd(-119.65, -295.45, -23.75, 1.7)
pt3dadd(-119.57, -295.31, -23.75, 1.7)
pt3dadd(-119.52, -295.21, -23.75, 1.7)
pt3dadd(-119.39, -295.07, -23.75, 1.7)
pt3dadd(-119.39, -294.97, -23.75, 1.7)
pt3dadd(-119.31, -294.87, -23.75, 1.7)
pt3dadd(-119.22, -294.78, -23.75, 1.7)
pt3dadd(-119.18, -294.63, -23.75, 1.7)
pt3dadd(-119.1, -294.49, -23.75, 1.7)
pt3dadd(-119.06, -294.39, -23.75, 1.7)
pt3dadd(-118.97, -294.25, -23.75, 1.7)
pt3dadd(-118.89, -294.1, -23.75, 1.7)
pt3dadd(-118.84, -294.01, -23.75, 1.7)
pt3dadd(-118.76, -293.91, -23.75, 1.7)
pt3dadd(-118.76, -293.77, -23.75, 1.7)
pt3dadd(-118.67, -293.67, -23.75, 1.7)
pt3dadd(-118.67, -293.57, -23.75, 1.7)
pt3dadd(-118.59, -293.48, -23.75, 1.7)
pt3dadd(-118.46, -293.23, -23.75, 1.7)
pt3dadd(-118.42, -293.14, -23.75, 1.7)
pt3dadd(-118.38, -293.04, -23.75, 1.7)
pt3dadd(-118.29, -292.9, -23.75, 1.7)
pt3dadd(-118.25, -292.8, -23.75, 1.7)
pt3dadd(-118.17, -292.65, -23.75, 1.7)
pt3dadd(-118.12, -292.51, -23.75, 1.7)
pt3dadd(-118.08, -292.42, -23.75, 1.7)
pt3dadd(-118, -292.22, -23.75, 1.7)
pt3dadd(-117.95, -292.08, -23.75, 1.7)
pt3dadd(-117.91, -291.93, -23.75, 1.7)
pt3dadd(-117.82, -291.74, -23.75, 1.7)
pt3dadd(-117.78, -291.64, -23.75, 1.7)
pt3dadd(-117.74, -291.5, -23.75, 1.7)
pt3dadd(-117.65, -291.3, -23.75, 1.7)
pt3dadd(-117.61, -291.16, -23.75, 1.7)
pt3dadd(-117.53, -291.07, -23.75, 1.7)
pt3dadd(-117.49, -290.92, -23.75, 1.7)
pt3dadd(-117.49, -290.82, -23.75, 1.7)
pt3dadd(-117.4, -290.68, -23.75, 1.7)
pt3dadd(-117.4, -290.58, -23.75, 1.7)
pt3dadd(-117.36, -290.44, -23.75, 1.7)
pt3dadd(-117.32, -290.34, -23.75, 1.7)
pt3dadd(-117.27, -290.29, -23.75, 1.7)
pt3dadd(-117.23, -290.2, -23.75, 1.7)
pt3dadd(-117.19, -290.1, -23.75, 1.7)
pt3dadd(-117.14, -290, -23.75, 1.7)
pt3dadd(-117.14, -289.91, -23.75, 1.7)
pt3dadd(-117.1, -289.86, -23.75, 1.7)
pt3dadd(-117.06, -289.81, -23.75, 1.7)
pt3dadd(-117.06, -289.67, -23.75, 1.7)
pt3dadd(-117.02, -289.62, -23.75, 1.7)
pt3dadd(-117.02, -289.47, -23.75, 1.7)
pt3dadd(-117.14, -289.64, -20.75, 1.7)
pt3dadd(-117.1, -289.59, -20.75, 1.7)
pt3dadd(-117.1, -289.45, -20.75, 1.7)
pt3dadd(-117.06, -289.3, -20.75, 1.7)
pt3dadd(-117.06, -289.11, -20.75, 1.7)
pt3dadd(-117.02, -288.96, -20.75, 1.7)
}
}
proc shape3d_2() {
dend[1] { pt3dadd(-116.97, -288.87, -20.75, 1.7)
pt3dadd(-116.93, -288.68, -20.75, 1.7)
pt3dadd(-116.93, -288.53, -20.75, 1.7)
pt3dadd(-116.89, -288.34, -20.75, 1.7)
pt3dadd(-116.85, -288.2, -20.75, 1.7)
pt3dadd(-116.85, -287.95, -20.75, 1.7)
pt3dadd(-116.81, -287.81, -20.75, 1.7)
pt3dadd(-116.76, -287.71, -20.75, 1.7)
pt3dadd(-116.76, -287.57, -20.75, 1.7)
pt3dadd(-116.72, -287.42, -20.75, 1.7)
pt3dadd(-116.68, -287.33, -20.75, 1.7)
pt3dadd(-116.68, -287.08, -20.75, 1.7)
pt3dadd(-116.64, -286.99, -20.75, 1.7)
pt3dadd(-116.55, -286.75, -20.75, 1.7)
pt3dadd(-116.51, -286.6, -20.75, 1.7)
pt3dadd(-116.51, -286.46, -20.75, 1.7)
pt3dadd(-116.42, -286.22, -20.75, 1.7)
pt3dadd(-116.38, -286.07, -20.75, 1.7)
pt3dadd(-116.34, -285.93, -20.75, 1.7)
pt3dadd(-116.29, -285.83, -20.75, 1.7)
pt3dadd(-116.29, -285.69, -20.75, 1.7)
pt3dadd(-116.25, -285.59, -20.75, 1.7)
pt3dadd(-116.21, -285.45, -20.75, 1.7)
pt3dadd(-116.17, -285.35, -20.75, 1.7)
pt3dadd(-116.13, -285.2, -20.75, 1.7)
pt3dadd(-116.13, -285.06, -20.75, 1.7)
pt3dadd(-116.08, -284.96, -20.75, 1.7)
pt3dadd(-116.04, -284.87, -20.75, 1.7)
pt3dadd(-116.04, -284.77, -20.75, 1.7)
pt3dadd(-116, -284.63, -20.75, 1.7)
pt3dadd(-116, -284.48, -20.75, 1.7)
pt3dadd(-115.96, -284.39, -20.75, 1.7)
pt3dadd(-115.91, -284.29, -20.75, 1.7)
pt3dadd(-115.91, -284.1, -20.75, 1.7)
pt3dadd(-115.87, -284, -20.75, 1.7)
pt3dadd(-115.87, -283.9, -20.75, 1.7)
pt3dadd(-115.83, -283.8, -20.75, 1.7)
pt3dadd(-115.79, -283.71, -20.75, 1.7)
pt3dadd(-115.79, -283.61, -20.75, 1.7)
pt3dadd(-115.75, -283.52, -20.75, 1.7)
pt3dadd(-115.75, -283.37, -20.75, 1.7)
pt3dadd(-115.7, -283.27, -20.75, 1.7)
pt3dadd(-115.7, -283.18, -20.75, 1.7)
pt3dadd(-115.66, -283.08, -20.75, 1.7)
pt3dadd(-115.66, -282.94, -20.75, 1.7)
pt3dadd(-115.62, -282.84, -20.75, 1.7)
pt3dadd(-115.62, -282.6, -20.75, 1.7)
pt3dadd(-115.53, -282.55, -20.75, 1.7)
pt3dadd(-115.53, -282.41, -20.75, 1.7)
pt3dadd(-115.49, -282.36, -20.75, 1.7)
pt3dadd(-115.49, -282.21, -20.75, 1.7)
pt3dadd(-115.45, -282.12, -20.75, 1.7)
pt3dadd(-115.45, -281.92, -20.75, 1.7)
pt3dadd(-115.4, -281.88, -20.75, 1.7)
pt3dadd(-115.4, -281.78, -20.75, 1.7)
pt3dadd(-115.36, -281.73, -20.75, 1.7)
pt3dadd(-115.36, -281.59, -20.75, 1.7)
pt3dadd(-115.32, -281.54, -20.75, 1.7)
pt3dadd(-115.28, -281.44, -20.75, 1.7)
pt3dadd(-115.28, -281.25, -20.75, 1.7)
pt3dadd(-115.24, -281.2, -20.75, 1.7)
pt3dadd(-115.24, -281.06, -20.75, 1.7)
pt3dadd(-115.36, -281.27, -18.75, 1.7)
pt3dadd(-115.36, -281.23, -18.75, 1.7)
pt3dadd(-115.32, -281.18, -18.75, 1.7)
pt3dadd(-115.28, -281.08, -18.75, 1.7)
pt3dadd(-115.28, -280.98, -18.75, 1.7)
pt3dadd(-115.24, -280.94, -18.75, 1.7)
pt3dadd(-115.24, -280.7, -18.75, 1.7)
pt3dadd(-115.19, -280.65, -18.75, 1.7)
pt3dadd(-115.19, -280.45, -18.75, 1.7)
pt3dadd(-115.15, -280.31, -18.75, 1.7)
pt3dadd(-115.11, -280.21, -18.75, 1.7)
pt3dadd(-115.11, -280.07, -18.75, 1.7)
pt3dadd(-115.07, -279.97, -18.75, 1.7)
pt3dadd(-115.07, -279.73, -18.75, 1.7)
pt3dadd(-115.02, -279.68, -18.75, 1.7)
pt3dadd(-115.02, -279.58, -18.75, 1.7)
pt3dadd(-114.98, -279.44, -18.75, 1.7)
pt3dadd(-114.98, -279.25, -18.75, 1.7)
pt3dadd(-114.94, -279.2, -18.75, 1.7)
pt3dadd(-114.94, -279.05, -18.75, 1.7)
pt3dadd(-114.89, -278.96, -18.75, 1.7)
pt3dadd(-114.89, -278.77, -18.75, 1.7)
pt3dadd(-114.85, -278.67, -18.75, 1.7)
pt3dadd(-114.85, -278.43, -18.75, 1.7)
pt3dadd(-114.81, -278.38, -18.75, 1.7)
pt3dadd(-114.81, -278.19, -18.75, 1.7)
pt3dadd(-114.77, -278.14, -18.75, 1.7)
pt3dadd(-114.72, -277.99, -18.75, 1.7)
pt3dadd(-114.72, -277.75, -18.75, 1.7)
pt3dadd(-114.68, -277.7, -18.75, 1.7)
pt3dadd(-114.68, -277.51, -18.75, 1.7)
pt3dadd(-114.64, -277.46, -18.75, 1.7)
pt3dadd(-114.6, -277.32, -18.75, 1.7)
pt3dadd(-114.6, -277.22, -18.75, 1.7)
pt3dadd(-114.56, -277.08, -18.75, 1.7)
pt3dadd(-114.51, -276.93, -18.75, 1.7)
pt3dadd(-114.47, -276.84, -18.75, 1.7)
pt3dadd(-114.39, -276.74, -18.75, 1.7)
pt3dadd(-114.39, -276.6, -18.75, 1.7)
pt3dadd(-114.21, -276.31, -18.75, 1.7)
pt3dadd(-114.17, -276.21, -18.75, 1.7)
pt3dadd(-114.13, -276.07, -18.75, 1.7)
pt3dadd(-114, -275.83, -18.75, 1.7)
pt3dadd(-113.96, -275.73, -18.75, 1.7)
pt3dadd(-113.92, -275.63, -18.75, 1.7)
pt3dadd(-113.88, -275.54, -18.75, 1.7)
pt3dadd(-113.79, -275.44, -18.75, 1.7)
pt3dadd(-113.75, -275.3, -18.75, 1.7)
pt3dadd(-113.71, -275.2, -18.75, 1.7)
pt3dadd(-113.66, -275.15, -18.75, 1.7)
pt3dadd(-113.66, -275.05, -18.75, 1.7)
pt3dadd(-113.58, -274.96, -18.75, 1.7)
pt3dadd(-113.54, -274.86, -18.75, 1.7)
pt3dadd(-113.49, -274.76, -18.75, 1.7)
pt3dadd(-113.45, -274.71, -18.75, 1.7)
pt3dadd(-113.41, -274.67, -18.75, 1.7)
pt3dadd(-113.41, -274.52, -18.75, 1.7)
pt3dadd(-113.36, -274.42, -18.75, 1.7)
pt3dadd(-113.32, -274.33, -18.75, 1.7)
pt3dadd(-113.24, -274.18, -18.75, 1.7)
pt3dadd(-113.2, -274.09, -18.75, 1.7)
pt3dadd(-113.15, -273.99, -18.75, 1.7)
pt3dadd(-113.15, -273.75, -18.75, 1.7)
pt3dadd(-113.11, -273.65, -18.75, 1.7)
pt3dadd(-113.07, -273.61, -18.75, 1.7)
pt3dadd(-113.07, -273.51, -18.75, 1.7)
pt3dadd(-113.03, -273.46, -18.75, 1.7)
pt3dadd(-112.73, -274.07, -18.75, 1.7)
pt3dadd(-112.99, -273.03, -18.75, 1.7)
pt3dadd(-112.99, -272.74, -18.75, 1.7)
pt3dadd(-112.94, -272.69, -18.75, 1.7)
pt3dadd(-112.94, -272.35, -18.75, 1.7)
pt3dadd(-112.75, -272.3, -18.75, 1.7)
pt3dadd(-112.99, -272.57, -15.75, 1.7)
pt3dadd(-112.9, -272.52, -15.75, 1.7)
pt3dadd(-112.9, -272.42, -15.75, 1.7)
pt3dadd(-112.82, -272.33, -15.75, 1.7)
pt3dadd(-112.73, -272.95, -15.75, 1.7)
pt3dadd(-112.69, -272.18, -15.75, 1.7)
pt3dadd(-112.64, -272.14, -15.75, 1.7)
pt3dadd(-112.6, -272.04, -15.75, 1.7)
pt3dadd(-112.56, -271.99, -15.75, 1.7)
pt3dadd(-112.52, -271.89, -15.75, 1.7)
pt3dadd(-112.43, -271.85, -15.75, 1.7)
pt3dadd(-112.39, -271.8, -15.75, 1.7)
pt3dadd(-112.35, -271.7, -15.75, 1.7)
pt3dadd(-112.31, -271.65, -15.75, 1.7)
pt3dadd(-112.26, -271.61, -15.75, 1.7)
pt3dadd(-112.22, -271.56, -15.75, 1.7)
pt3dadd(-112.14, -271.51, -15.75, 1.7)
pt3dadd(-112.09, -271.46, -15.75, 1.7)
pt3dadd(-112.05, -271.36, -15.75, 1.7)
pt3dadd(-111.79, -271.08, -15.75, 1.7)
pt3dadd(-111.75, -270.98, -15.75, 1.7)
pt3dadd(-111.71, -270.88, -15.75, 1.7)
pt3dadd(-111.63, -270.83, -15.75, 1.7)
pt3dadd(-111.58, -270.74, -15.75, 1.7)
pt3dadd(-111.46, -270.64, -15.75, 1.7)
pt3dadd(-111.46, -270.55, -15.75, 1.7)
pt3dadd(-111.37, -270.45, -15.75, 1.7)
pt3dadd(-111.33, -270.35, -15.75, 1.7)
pt3dadd(-111.24, -270.21, -15.75, 1.7)
pt3dadd(-111.16, -270.16, -15.75, 1.7)
pt3dadd(-111.03, -270.06, -15.75, 1.7)
pt3dadd(-110.99, -269.96, -15.75, 1.7)
pt3dadd(-110.94, -269.92, -15.75, 1.7)
pt3dadd(-110.9, -269.82, -15.75, 1.7)
pt3dadd(-110.86, -269.77, -15.75, 1.7)
pt3dadd(-110.78, -269.73, -15.75, 1.7)
pt3dadd(-110.73, -269.63, -15.75, 1.7)
pt3dadd(-110.65, -269.53, -15.75, 1.7)
pt3dadd(-110.61, -269.48, -15.75, 1.7)
pt3dadd(-110.48, -269.34, -15.75, 1.7)
pt3dadd(-110.39, -269.29, -15.75, 1.7)
pt3dadd(-110.35, -269.19, -15.75, 1.7)
pt3dadd(-110.31, -269.14, -15.75, 1.7)
pt3dadd(-110.27, -269.05, -15.75, 1.7)
pt3dadd(-110.22, -269, -15.75, 1.7)
pt3dadd(-110.18, -268.9, -15.75, 1.7)
pt3dadd(-110.14, -268.86, -15.75, 1.7)
pt3dadd(-109.97, -268.66, -15.75, 1.7)
pt3dadd(-109.93, -268.57, -15.75, 1.7)
pt3dadd(-109.84, -268.47, -15.75, 1.7)
pt3dadd(-109.8, -268.38, -15.75, 1.7)
pt3dadd(-109.76, -268.33, -15.75, 1.7)
pt3dadd(-109.71, -268.28, -15.75, 1.7)
pt3dadd(-109.63, -268.18, -15.75, 1.7)
pt3dadd(-109.54, -268.08, -15.75, 1.7)
pt3dadd(-109.46, -268.04, -15.75, 1.7)
pt3dadd(-109.42, -267.99, -15.75, 1.7)
pt3dadd(-109.38, -267.94, -15.75, 1.7)
pt3dadd(-109.33, -267.84, -15.75, 1.7)
pt3dadd(-109.25, -267.75, -15.75, 1.7)
pt3dadd(-109.21, -267.65, -15.75, 1.7)
pt3dadd(-109.12, -267.6, -15.75, 1.7)
pt3dadd(-109.08, -267.55, -15.75, 1.7)
pt3dadd(-109.04, -267.51, -15.75, 1.7)
pt3dadd(-108.99, -267.46, -15.75, 1.7)
}
}
proc shape3d_3() {
dend[1] { pt3dadd(-108.95, -267.41, -15.75, 1.7)
pt3dadd(-108.86, -267.36, -15.75, 1.7)
pt3dadd(-108.82, -267.31, -15.75, 1.7)
pt3dadd(-108.74, -267.27, -15.75, 1.7)
pt3dadd(-108.69, -267.17, -15.75, 1.7)
pt3dadd(-108.61, -267.12, -15.75, 1.7)
pt3dadd(-108.53, -267.02, -15.75, 1.7)
pt3dadd(-108.53, -266.93, -15.75, 1.7)
pt3dadd(-108.44, -266.88, -15.75, 1.7)
pt3dadd(-108.4, -266.83, -15.75, 1.7)
pt3dadd(-108.36, -266.73, -15.75, 1.7)
pt3dadd(-108.27, -266.68, -15.75, 1.7)
pt3dadd(-108.18, -266.64, -15.75, 1.7)
pt3dadd(-108.14, -266.59, -15.75, 1.7)
pt3dadd(-108.06, -266.54, -15.75, 1.7)
pt3dadd(-108.02, -266.49, -15.75, 1.7)
pt3dadd(-107.93, -266.45, -15.75, 1.7)
pt3dadd(-107.76, -266.45, -15.75, 1.7)
pt3dadd(-107.72, -266.4, -15.75, 1.7)
pt3dadd(-107.64, -266.35, -15.75, 1.7)
pt3dadd(-107.55, -266.3, -15.75, 1.7)
pt3dadd(-107.46, -266.3, -15.75, 1.7)
pt3dadd(-107.42, -266.25, -15.75, 1.7)
pt3dadd(-107.51, -266.33, -14.75, 1.7)
pt3dadd(-107.29, -266.33, -14.75, 1.7)
pt3dadd(-107.25, -266.27, -14.75, 1.7)
pt3dadd(-107.13, -266.27, -14.75, 1.7)
pt3dadd(-107.08, -266.23, -14.75, 1.7)
pt3dadd(-107, -266.18, -14.75, 1.7)
pt3dadd(-106.96, -266.13, -14.75, 1.7)
pt3dadd(-106.87, -266.08, -14.75, 1.7)
pt3dadd(-106.79, -266.08, -14.75, 1.7)
pt3dadd(-106.74, -266.04, -14.75, 1.7)
pt3dadd(-106.66, -265.99, -14.75, 1.7)
pt3dadd(-106.57, -265.89, -14.75, 1.7)
pt3dadd(-106.44, -265.74, -14.75, 1.7)
pt3dadd(-106.36, -265.65, -14.75, 1.7)
pt3dadd(-106.32, -265.55, -14.75, 1.7)
pt3dadd(-106.23, -265.51, -14.75, 1.7)
pt3dadd(-106.19, -265.41, -14.75, 1.7)
pt3dadd(-106.15, -265.31, -14.75, 1.7)
pt3dadd(-106.11, -265.26, -14.75, 1.7)
pt3dadd(-106.06, -265.21, -14.75, 1.7)
pt3dadd(-105.93, -265.07, -14.75, 1.7)
pt3dadd(-105.85, -264.92, -14.75, 1.7)
pt3dadd(-105.72, -264.83, -14.75, 1.7)
pt3dadd(-105.68, -264.73, -14.75, 1.7)
pt3dadd(-105.6, -264.59, -14.75, 1.7)
pt3dadd(-105.55, -264.49, -14.75, 1.7)
pt3dadd(-105.47, -264.35, -14.75, 1.7)
pt3dadd(-105.39, -264.3, -14.75, 1.7)
pt3dadd(-105.39, -264.2, -14.75, 1.7)
pt3dadd(-105.34, -264.11, -14.75, 1.7)
pt3dadd(-105.26, -264.06, -14.75, 1.7)
pt3dadd(-105.21, -263.96, -14.75, 1.7)
pt3dadd(-105.17, -263.86, -14.75, 1.7)
pt3dadd(-105.13, -263.77, -14.75, 1.7)
pt3dadd(-105.04, -263.62, -14.75, 1.7)
pt3dadd(-104.96, -263.48, -14.75, 1.7)
pt3dadd(-104.92, -263.38, -14.75, 1.7)
pt3dadd(-104.88, -263.29, -14.75, 1.7)
pt3dadd(-104.79, -263.19, -14.75, 1.7)
pt3dadd(-104.75, -263.14, -14.75, 1.7)
pt3dadd(-104.71, -263, -14.75, 1.7)
pt3dadd(-104.62, -262.95, -14.75, 1.7)
pt3dadd(-104.58, -262.85, -14.75, 1.7)
pt3dadd(-104.54, -262.71, -14.75, 1.7)
pt3dadd(-104.45, -262.61, -14.75, 1.7)
pt3dadd(-104.41, -262.52, -14.75, 1.7)
pt3dadd(-104.36, -262.42, -14.75, 1.7)
pt3dadd(-104.28, -262.32, -14.75, 1.7)
pt3dadd(-104.24, -262.18, -14.75, 1.7)
pt3dadd(-104.19, -262.08, -14.75, 1.7)
pt3dadd(-104.11, -261.98, -14.75, 1.7)
pt3dadd(-104.03, -261.74, -14.75, 1.7)
pt3dadd(-103.94, -261.65, -14.75, 1.7)
pt3dadd(-103.9, -261.55, -14.75, 1.7)
pt3dadd(-103.86, -261.45, -14.75, 1.7)
pt3dadd(-103.81, -261.36, -14.75, 1.7)
pt3dadd(-103.68, -261.21, -14.75, 1.7)
pt3dadd(-103.64, -261.07, -14.75, 1.7)
pt3dadd(-103.56, -261.02, -14.75, 1.7)
pt3dadd(-103.56, -260.88, -14.75, 1.7)
pt3dadd(-103.43, -260.73, -14.75, 1.7)
pt3dadd(-103.39, -260.63, -14.75, 1.7)
pt3dadd(-103.35, -260.54, -14.75, 1.7)
pt3dadd(-103.26, -260.49, -14.75, 1.7)
pt3dadd(-103.22, -260.39, -14.75, 1.7)
pt3dadd(-103.18, -260.35, -14.75, 1.7)
pt3dadd(-103.13, -260.25, -14.75, 1.7)
pt3dadd(-103.09, -260.15, -14.75, 1.7)
pt3dadd(-103, -260.1, -14.75, 1.7)
pt3dadd(-102.96, -260.05, -14.75, 1.7)
pt3dadd(-102.88, -259.96, -14.75, 1.7)
pt3dadd(-102.84, -259.91, -14.75, 1.7)
pt3dadd(-102.84, -259.82, -14.75, 1.7)
pt3dadd(-102.75, -259.82, -14.75, 1.7)
pt3dadd(-102.75, -259.72, -14.75, 1.7)
pt3dadd(-102.54, -259.48, -14.75, 1.7)
pt3dadd(-102.5, -259.43, -14.75, 1.7)
pt3dadd(-102.41, -259.38, -14.75, 1.7)
pt3dadd(-102.37, -259.33, -14.75, 1.7)
pt3dadd(-102.33, -259.28, -14.75, 1.7)
pt3dadd(-102.29, -259.19, -14.75, 1.7)
pt3dadd(-102.2, -259.09, -14.75, 1.7)
pt3dadd(-102.11, -259.04, -14.75, 1.7)
pt3dadd(-102.07, -258.99, -14.75, 1.7)
pt3dadd(-102.03, -258.95, -14.75, 1.7)
pt3dadd(-101.99, -258.9, -14.75, 1.7)
pt3dadd(-101.94, -258.85, -14.75, 1.7)
pt3dadd(-101.9, -258.8, -14.75, 1.7)
pt3dadd(-101.86, -258.75, -14.75, 1.7)
pt3dadd(-101.82, -258.7, -14.75, 1.7)
pt3dadd(-101.78, -258.66, -14.75, 1.7)
pt3dadd(-101.69, -258.66, -14.75, 1.7)
pt3dadd(-101.61, -258.61, -14.75, 1.7)
pt3dadd(-101.52, -258.56, -14.75, 1.7)
pt3dadd(-101.43, -258.56, -14.75, 1.7)
pt3dadd(-101.56, -258.49, -14.75, 1.7)
pt3dadd(-101.56, -258.63, -14.75, 1.7)
pt3dadd(-101.48, -258.63, -14.75, 1.7)
pt3dadd(-101.39, -258.58, -14.75, 1.7)
pt3dadd(-101.31, -258.54, -14.75, 1.7)
pt3dadd(-101.18, -258.54, -14.75, 1.7)
pt3dadd(-101.1, -258.49, -14.75, 1.7)
pt3dadd(-101.05, -258.44, -14.75, 1.7)
pt3dadd(-100.97, -258.44, -14.75, 1.7)
pt3dadd(-100.93, -258.39, -14.75, 1.7)
pt3dadd(-100.88, -258.34, -14.75, 1.7)
pt3dadd(-100.8, -258.34, -14.75, 1.7)
pt3dadd(-100.75, -258.3, -14.75, 1.7)
pt3dadd(-100.71, -258.25, -14.75, 1.7)
pt3dadd(-100.58, -258.15, -14.75, 1.7)
pt3dadd(-100.54, -258.1, -14.75, 1.7)
pt3dadd(-100.46, -257.96, -14.75, 1.7)
pt3dadd(-100.37, -257.86, -14.75, 1.7)
pt3dadd(-100.29, -257.77, -14.75, 1.7)
pt3dadd(-100.21, -257.67, -14.75, 1.7)
pt3dadd(-100.12, -257.57, -14.75, 1.7)
pt3dadd(-99.86, -257.28, -14.75, 1.7)
pt3dadd(-99.82, -257.23, -14.75, 1.7)
pt3dadd(-99.74, -257.18, -14.75, 1.7)
pt3dadd(-99.69, -257.04, -14.75, 1.7)
pt3dadd(-99.65, -256.99, -14.75, 1.7)
pt3dadd(-99.48, -256.8, -14.75, 1.7)
pt3dadd(-99.44, -256.7, -14.75, 1.7)
pt3dadd(-99.31, -256.56, -14.75, 1.7)
pt3dadd(-99.27, -256.46, -14.75, 1.7)
pt3dadd(-99.18, -256.42, -14.75, 1.7)
pt3dadd(-99.1, -256.32, -14.75, 1.7)
pt3dadd(-99.01, -256.17, -14.75, 1.7)
pt3dadd(-98.97, -256.08, -14.75, 1.7)
pt3dadd(-98.89, -255.93, -14.75, 1.7)
pt3dadd(-98.8, -255.84, -14.75, 1.7)
pt3dadd(-98.72, -255.74, -14.75, 1.7)
pt3dadd(-98.68, -255.64, -14.75, 1.7)
pt3dadd(-98.63, -255.54, -14.75, 1.7)
pt3dadd(-98.59, -255.5, -14.75, 1.7)
pt3dadd(-98.5, -255.4, -14.75, 1.7)
pt3dadd(-98.46, -255.3, -14.75, 1.7)
pt3dadd(-98.38, -255.21, -14.75, 1.7)
pt3dadd(-98.29, -255.11, -14.75, 1.7)
pt3dadd(-98.25, -255.06, -14.75, 1.7)
pt3dadd(-98.21, -254.97, -14.75, 1.7)
pt3dadd(-98.17, -254.87, -14.75, 1.7)
pt3dadd(-98.04, -254.73, -14.75, 1.7)
pt3dadd(-98, -254.68, -14.75, 1.7)
pt3dadd(-97.95, -254.63, -14.75, 1.7)
pt3dadd(-97.91, -254.53, -14.75, 1.7)
pt3dadd(-97.78, -254.39, -14.75, 1.7)
pt3dadd(-97.74, -254.29, -14.75, 1.7)
pt3dadd(-97.66, -254.15, -14.75, 1.7)
pt3dadd(-97.57, -254, -14.75, 1.7)
pt3dadd(-97.49, -253.9, -14.75, 1.7)
pt3dadd(-97.4, -253.81, -14.75, 1.7)
pt3dadd(-97.36, -253.71, -14.75, 1.7)
pt3dadd(-97.32, -253.62, -14.75, 1.7)
pt3dadd(-97.23, -253.47, -14.75, 1.7)
pt3dadd(-97.19, -253.43, -14.75, 1.7)
pt3dadd(-97.11, -253.33, -14.75, 1.7)
pt3dadd(-97.06, -253.28, -14.75, 1.7)
pt3dadd(-96.98, -253.18, -14.75, 1.7)
pt3dadd(-96.93, -253.09, -14.75, 1.7)
pt3dadd(-96.89, -253.04, -14.75, 1.7)
pt3dadd(-96.85, -252.94, -14.75, 1.7)
pt3dadd(-96.68, -252.75, -14.75, 1.7)
pt3dadd(-96.64, -252.7, -14.75, 1.7)
pt3dadd(-96.6, -252.65, -14.75, 1.7)
pt3dadd(-96.55, -252.6, -14.75, 1.7)
pt3dadd(-96.51, -252.51, -14.75, 1.7)
pt3dadd(-96.47, -252.41, -14.75, 1.7)
pt3dadd(-96.43, -252.32, -14.75, 1.7)
pt3dadd(-96.34, -252.22, -14.75, 1.7)
pt3dadd(-96.3, -252.07, -14.75, 1.7)
pt3dadd(-96.21, -252.02, -14.75, 1.7)
pt3dadd(-96.17, -251.88, -14.75, 1.7)
pt3dadd(-96.13, -251.79, -14.75, 1.7)
pt3dadd(-96.08, -251.69, -14.75, 1.7)
pt3dadd(-96.04, -251.64, -14.75, 1.7)
pt3dadd(-96.04, -251.54, -14.75, 1.7)
}
}
proc shape3d_4() {
dend[1] { pt3dadd(-96, -251.45, -14.75, 1.7)
pt3dadd(-95.96, -251.4, -14.75, 1.7)
pt3dadd(-95.96, -251.21, -14.75, 1.7)
pt3dadd(-95.87, -250.96, -14.75, 1.7)
pt3dadd(-95.87, -250.87, -14.75, 1.7)
pt3dadd(-95.83, -250.77, -14.75, 1.7)
pt3dadd(-95.83, -250.48, -14.75, 1.7)
pt3dadd(-95.79, -250.38, -14.75, 1.7)
pt3dadd(-95.79, -250, -14.75, 1.7)
pt3dadd(-95.75, -249.9, -14.75, 1.7)
pt3dadd(-95.7, -249.81, -14.75, 1.7)
pt3dadd(-95.7, -249.52, -14.75, 1.7)
pt3dadd(-95.66, -249.42, -14.75, 1.7)
pt3dadd(-95.66, -249.28, -14.75, 1.7)
pt3dadd(-95.62, -249.13, -14.75, 1.7)
pt3dadd(-95.57, -249.04, -14.75, 1.7)
pt3dadd(-95.57, -248.94, -14.75, 1.7)
pt3dadd(-95.53, -248.89, -14.75, 1.7)
pt3dadd(-95.53, -248.79, -14.75, 1.7)
pt3dadd(-95.49, -248.7, -14.75, 1.7)
pt3dadd(-95.4, -248.55, -14.75, 1.7)
pt3dadd(-95.36, -248.46, -14.75, 1.7)
pt3dadd(-95.32, -248.36, -14.75, 1.7)
pt3dadd(-95.28, -248.31, -14.75, 1.7)
pt3dadd(-95.19, -248.17, -14.75, 1.7)
pt3dadd(-95.15, -248.07, -14.75, 1.7)
pt3dadd(-95.11, -247.98, -14.75, 1.7)
pt3dadd(-95.07, -247.93, -14.75, 1.7)
pt3dadd(-95.03, -247.83, -14.75, 1.7)
pt3dadd(-94.98, -247.78, -14.75, 1.7)
pt3dadd(-94.94, -247.64, -14.75, 1.7)
pt3dadd(-94.86, -247.54, -14.75, 1.7)
pt3dadd(-94.81, -247.4, -14.75, 1.7)
pt3dadd(-94.77, -247.35, -14.75, 1.7)
pt3dadd(-94.68, -247.2, -14.75, 1.7)
pt3dadd(-94.64, -247.11, -14.75, 1.7)
pt3dadd(-94.51, -246.96, -14.75, 1.7)
pt3dadd(-94.43, -246.77, -14.75, 1.7)
pt3dadd(-94.35, -246.67, -14.75, 1.7)
pt3dadd(-94.3, -246.57, -14.75, 1.7)
pt3dadd(-94.26, -246.48, -14.75, 1.7)
pt3dadd(-94.22, -246.38, -14.75, 1.7)
pt3dadd(-94.18, -246.29, -14.75, 1.7)
pt3dadd(-94.05, -246.19, -14.75, 1.7)
pt3dadd(-94.05, -246.09, -14.75, 1.7)
pt3dadd(-93.96, -246, -14.75, 1.7)
pt3dadd(-93.92, -245.9, -14.75, 1.7)
pt3dadd(-93.88, -245.8, -14.75, 1.7)
pt3dadd(-93.83, -245.76, -14.75, 1.7)
pt3dadd(-93.79, -245.71, -14.75, 1.7)
pt3dadd(-93.75, -245.61, -14.75, 1.7)
pt3dadd(-93.71, -245.51, -14.75, 1.7)
pt3dadd(-93.67, -245.47, -14.75, 1.7)
pt3dadd(-93.67, -245.32, -14.75, 1.7)
pt3dadd(-93.62, -245.23, -14.75, 1.7)
pt3dadd(-93.58, -245.18, -14.75, 1.7)
pt3dadd(-93.54, -245.13, -14.75, 1.7)
pt3dadd(-93.5, -245.08, -14.75, 1.7)
pt3dadd(-93.45, -245.03, -14.75, 1.7)
pt3dadd(-93.62, -245.15, -10.75, 1.7)
pt3dadd(-93.62, -245.25, -10.75, 1.7)
pt3dadd(-93.58, -245.3, -10.75, 1.7)
pt3dadd(-93.54, -245.25, -10.75, 1.7)
pt3dadd(-93.41, -245.1, -10.75, 1.7)
pt3dadd(-93.37, -245.06, -10.75, 1.7)
pt3dadd(-93.32, -244.96, -10.75, 1.7)
pt3dadd(-93.28, -244.87, -10.75, 1.7)
pt3dadd(-93.2, -244.77, -10.75, 1.7)
pt3dadd(-93.15, -244.72, -10.75, 1.7)
pt3dadd(-93.11, -244.57, -10.75, 1.7)
pt3dadd(-93.07, -244.48, -10.75, 1.7)
pt3dadd(-93.03, -244.43, -10.75, 1.7)
pt3dadd(-92.99, -244.33, -10.75, 1.7)
pt3dadd(-92.9, -244.29, -10.75, 1.7)
pt3dadd(-92.86, -244.14, -10.75, 1.7)
pt3dadd(-92.82, -244.04, -10.75, 1.7)
pt3dadd(-92.73, -243.9, -10.75, 1.7)
pt3dadd(-92.69, -243.85, -10.75, 1.7)
pt3dadd(-92.64, -243.76, -10.75, 1.7)
pt3dadd(-92.56, -243.71, -10.75, 1.7)
pt3dadd(-92.47, -243.56, -10.75, 1.7)
pt3dadd(-92.43, -243.51, -10.75, 1.7)
pt3dadd(-92.35, -243.42, -10.75, 1.7)
pt3dadd(-92.26, -243.32, -10.75, 1.7)
pt3dadd(-92.22, -243.23, -10.75, 1.7)
pt3dadd(-92.14, -243.13, -10.75, 1.7)
pt3dadd(-92.05, -243.03, -10.75, 1.7)
pt3dadd(-92.01, -242.93, -10.75, 1.7)
pt3dadd(-91.97, -242.89, -10.75, 1.7)
pt3dadd(-91.88, -242.79, -10.75, 1.7)
pt3dadd(-91.8, -242.65, -10.75, 1.7)
pt3dadd(-91.71, -242.55, -10.75, 1.7)
pt3dadd(-91.67, -242.5, -10.75, 1.7)
pt3dadd(-91.63, -242.45, -10.75, 1.7)
pt3dadd(-91.58, -242.35, -10.75, 1.7)
pt3dadd(-91.54, -242.31, -10.75, 1.7)
pt3dadd(-91.5, -242.12, -10.75, 1.7)
pt3dadd(-91.37, -241.97, -10.75, 1.7)
pt3dadd(-91.33, -241.88, -10.75, 1.7)
pt3dadd(-91.25, -241.73, -10.75, 1.7)
pt3dadd(-91.12, -241.59, -10.75, 1.7)
pt3dadd(-91.07, -241.44, -10.75, 1.7)
pt3dadd(-90.95, -241.29, -10.75, 1.7)
pt3dadd(-90.9, -241.15, -10.75, 1.7)
pt3dadd(-90.86, -241.05, -10.75, 1.7)
pt3dadd(-90.69, -240.86, -10.75, 1.7)
pt3dadd(-90.65, -240.72, -10.75, 1.7)
pt3dadd(-90.61, -240.62, -10.75, 1.7)
pt3dadd(-90.52, -240.52, -10.75, 1.7)
pt3dadd(-90.44, -240.43, -10.75, 1.7)
pt3dadd(-90.35, -240.38, -10.75, 1.7)
pt3dadd(-90.31, -240.24, -10.75, 1.7)
pt3dadd(-90.22, -240.14, -10.75, 1.7)
pt3dadd(-90.14, -240.04, -10.75, 1.7)
pt3dadd(-90.14, -239.95, -10.75, 1.7)
pt3dadd(-90.06, -239.85, -10.75, 1.7)
pt3dadd(-89.89, -239.65, -10.75, 1.7)
pt3dadd(-89.84, -239.61, -10.75, 1.7)
pt3dadd(-89.8, -239.46, -10.75, 1.7)
pt3dadd(-89.72, -239.37, -10.75, 1.7)
pt3dadd(-89.63, -239.22, -10.75, 1.7)
pt3dadd(-89.59, -239.13, -10.75, 1.7)
pt3dadd(-89.5, -238.93, -10.75, 1.7)
pt3dadd(-89.42, -238.84, -10.75, 1.7)
pt3dadd(-89.33, -238.74, -10.75, 1.7)
pt3dadd(-89.25, -238.6, -10.75, 1.7)
pt3dadd(-89.17, -238.45, -10.75, 1.7)
pt3dadd(-89.04, -238.3, -10.75, 1.7)
pt3dadd(-89, -238.16, -10.75, 1.7)
pt3dadd(-88.91, -238.01, -10.75, 1.7)
pt3dadd(-88.82, -237.87, -10.75, 1.7)
pt3dadd(-88.74, -237.77, -10.75, 1.7)
pt3dadd(-88.65, -237.68, -10.75, 1.7)
pt3dadd(-88.65, -237.58, -10.75, 1.7)
pt3dadd(-88.53, -237.49, -10.75, 1.7)
pt3dadd(-88.49, -237.34, -10.75, 1.7)
pt3dadd(-88.4, -237.24, -10.75, 1.7)
pt3dadd(-88.36, -237.15, -10.75, 1.7)
pt3dadd(-88.27, -237.05, -10.75, 1.7)
pt3dadd(-88.23, -236.96, -10.75, 1.7)
pt3dadd(-88.19, -236.86, -10.75, 1.7)
pt3dadd(-88.14, -236.76, -10.75, 1.7)
pt3dadd(-88.06, -236.66, -10.75, 1.7)
pt3dadd(-88.02, -236.57, -10.75, 1.7)
pt3dadd(-87.93, -236.52, -10.75, 1.7)
pt3dadd(-87.93, -236.43, -10.75, 1.7)
pt3dadd(-87.89, -236.33, -10.75, 1.7)
pt3dadd(-87.81, -236.23, -10.75, 1.7)
pt3dadd(-87.72, -236.13, -10.75, 1.7)
pt3dadd(-87.68, -235.99, -10.75, 1.7)
pt3dadd(-87.64, -235.94, -10.75, 1.7)
pt3dadd(-87.59, -235.85, -10.75, 1.7)
pt3dadd(-87.51, -235.75, -10.75, 1.7)
pt3dadd(-87.46, -235.65, -10.75, 1.7)
pt3dadd(-87.42, -235.6, -10.75, 1.7)
pt3dadd(-87.29, -235.46, -10.75, 1.7)
pt3dadd(-87.21, -235.41, -10.75, 1.7)
pt3dadd(-87.17, -235.36, -10.75, 1.7)
pt3dadd(-87.13, -235.32, -10.75, 1.7)
pt3dadd(-87.04, -235.27, -10.75, 1.7)
pt3dadd(-87, -235.22, -10.75, 1.7)
pt3dadd(-86.96, -235.12, -10.75, 1.7)
pt3dadd(-86.7, -234.83, -10.75, 1.7)
pt3dadd(-86.66, -234.79, -10.75, 1.7)
pt3dadd(-86.83, -234.76, -9.75, 1.7)
pt3dadd(-86.79, -234.81, -9.75, 1.7)
pt3dadd(-86.75, -234.76, -9.75, 1.7)
pt3dadd(-86.66, -234.76, -9.75, 1.7)
pt3dadd(-86.57, -234.71, -9.75, 1.7)
pt3dadd(-86.49, -234.66, -9.75, 1.7)
pt3dadd(-86.45, -234.62, -9.75, 1.7)
pt3dadd(-86.36, -234.57, -9.75, 1.7)
pt3dadd(-86.19, -234.38, -9.75, 1.7)
pt3dadd(-86.11, -234.33, -9.75, 1.7)
pt3dadd(-86.02, -234.28, -9.75, 1.7)
pt3dadd(-85.94, -234.18, -9.75, 1.7)
pt3dadd(-85.85, -234.09, -9.75, 1.7)
pt3dadd(-85.77, -233.99, -9.75, 1.7)
pt3dadd(-85.6, -233.85, -9.75, 1.7)
pt3dadd(-85.51, -233.79, -9.75, 1.7)
pt3dadd(-85.43, -233.7, -9.75, 1.7)
pt3dadd(-85.26, -233.51, -9.75, 1.7)
pt3dadd(-85.13, -233.46, -9.75, 1.7)
pt3dadd(-85.04, -233.36, -9.75, 1.7)
pt3dadd(-84.96, -233.26, -9.75, 1.7)
pt3dadd(-84.71, -232.98, -9.75, 1.7)
pt3dadd(-84.62, -232.93, -9.75, 1.7)
pt3dadd(-84.54, -232.83, -9.75, 1.7)
pt3dadd(-84.5, -232.78, -9.75, 1.7)
pt3dadd(-84.41, -232.74, -9.75, 1.7)
pt3dadd(-84.24, -232.54, -9.75, 1.7)
pt3dadd(-84.11, -232.45, -9.75, 1.7)
pt3dadd(-84.03, -232.3, -9.75, 1.7)
pt3dadd(-83.94, -232.25, -9.75, 1.7)
pt3dadd(-83.86, -232.16, -9.75, 1.7)
pt3dadd(-83.82, -232.06, -9.75, 1.7)
pt3dadd(-83.73, -232.01, -9.75, 1.7)
pt3dadd(-83.56, -231.82, -9.75, 1.7)
pt3dadd(-83.52, -231.72, -9.75, 1.7)
pt3dadd(-83.43, -231.68, -9.75, 1.7)
}
}
proc shape3d_5() {
dend[1] { pt3dadd(-83.35, -231.58, -9.75, 1.7)
pt3dadd(-83.26, -231.48, -9.75, 1.7)
pt3dadd(-83.18, -231.38, -9.75, 1.7)
pt3dadd(-83.05, -231.24, -9.75, 1.7)
pt3dadd(-82.92, -231.1, -9.75, 1.7)
pt3dadd(-82.84, -230.95, -9.75, 1.7)
pt3dadd(-82.75, -230.85, -9.75, 1.7)
pt3dadd(-82.63, -230.76, -9.75, 1.7)
pt3dadd(-82.54, -230.57, -9.75, 1.7)
pt3dadd(-82.41, -230.47, -9.75, 1.7)
pt3dadd(-82.37, -230.37, -9.75, 1.7)
pt3dadd(-82.33, -230.32, -9.75, 1.7)
pt3dadd(-82.24, -230.23, -9.75, 1.7)
pt3dadd(-82.11, -230.13, -9.75, 1.7)
pt3dadd(-81.99, -229.99, -9.75, 1.7)
pt3dadd(-81.9, -229.89, -9.75, 1.7)
pt3dadd(-81.82, -229.74, -9.75, 1.7)
pt3dadd(-81.74, -229.6, -9.75, 1.7)
pt3dadd(-81.69, -229.51, -9.75, 1.7)
pt3dadd(-81.57, -229.36, -9.75, 1.7)
pt3dadd(-81.48, -229.26, -9.75, 1.7)
pt3dadd(-81.44, -229.17, -9.75, 1.7)
pt3dadd(-81.39, -229.12, -9.75, 1.7)
pt3dadd(-81.27, -228.97, -9.75, 1.7)
pt3dadd(-81.18, -228.97, -9.75, 1.7)
pt3dadd(-81.14, -228.93, -9.75, 1.7)
pt3dadd(-81.1, -228.88, -9.75, 1.7)
pt3dadd(-81.06, -228.78, -9.75, 1.7)
pt3dadd(-81.01, -228.68, -9.75, 1.7)
pt3dadd(-80.97, -228.54, -9.75, 1.7)
pt3dadd(-80.89, -228.44, -9.75, 1.7)
pt3dadd(-80.8, -228.3, -9.75, 1.7)
pt3dadd(-80.76, -228.15, -9.75, 1.7)
pt3dadd(-80.63, -228.01, -9.75, 1.7)
pt3dadd(-80.59, -227.87, -9.75, 1.7)
pt3dadd(-80.5, -227.67, -9.75, 1.7)
pt3dadd(-80.42, -227.53, -9.75, 1.7)
pt3dadd(-80.38, -227.43, -9.75, 1.7)
pt3dadd(-80.33, -227.34, -9.75, 1.7)
pt3dadd(-80.29, -227.24, -9.75, 1.7)
pt3dadd(-80.25, -227.09, -9.75, 1.7)
pt3dadd(-80.21, -227, -9.75, 1.7)
pt3dadd(-80.16, -226.9, -9.75, 1.7)
pt3dadd(-80.08, -226.85, -9.75, 1.7)
pt3dadd(-80.04, -226.76, -9.75, 1.7)
pt3dadd(-79.99, -226.66, -9.75, 1.7)
pt3dadd(-79.95, -226.56, -9.75, 1.7)
pt3dadd(-79.86, -226.46, -9.75, 1.7)
pt3dadd(-79.82, -226.42, -9.75, 1.7)
pt3dadd(-79.74, -226.27, -9.75, 1.7)
pt3dadd(-79.69, -226.18, -9.75, 1.7)
pt3dadd(-79.65, -226.03, -9.75, 1.7)
pt3dadd(-79.61, -225.93, -9.75, 1.7)
pt3dadd(-79.53, -225.84, -9.75, 1.7)
pt3dadd(-79.48, -225.74, -9.75, 1.7)
pt3dadd(-79.44, -225.65, -9.75, 1.7)
pt3dadd(-79.4, -225.55, -9.75, 1.7)
pt3dadd(-79.36, -225.4, -9.75, 1.7)
pt3dadd(-79.32, -225.31, -9.75, 1.7)
pt3dadd(-79.27, -225.21, -9.75, 1.7)
pt3dadd(-79.19, -225.12, -9.75, 1.7)
pt3dadd(-79.14, -225.02, -9.75, 1.7)
pt3dadd(-79.1, -224.92, -9.75, 1.7)
pt3dadd(-79.02, -224.78, -9.75, 1.7)
pt3dadd(-78.97, -224.68, -9.75, 1.7)
pt3dadd(-78.97, -224.59, -9.75, 1.7)
pt3dadd(-78.89, -224.49, -9.75, 1.7)
pt3dadd(-78.85, -224.39, -9.75, 1.7)
pt3dadd(-78.76, -224.25, -9.75, 1.7)
pt3dadd(-78.72, -224.15, -9.75, 1.7)
pt3dadd(-78.68, -224.01, -9.75, 1.7)
pt3dadd(-78.64, -223.96, -9.75, 1.7)
pt3dadd(-78.59, -223.91, -9.75, 1.7)
pt3dadd(-78.55, -223.86, -9.75, 1.7)
pt3dadd(-78.55, -223.76, -9.75, 1.7)
pt3dadd(-78.51, -223.62, -9.75, 1.7)
pt3dadd(-78.46, -223.57, -9.75, 1.7)
pt3dadd(-78.42, -223.48, -9.75, 1.7)
pt3dadd(-78.38, -223.43, -9.75, 1.7)
pt3dadd(-78.29, -223.38, -9.75, 1.7)
pt3dadd(-78.25, -223.33, -9.75, 1.7)
pt3dadd(-78.34, -223.45, -6.75, 1.7)
pt3dadd(-78.29, -223.4, -6.75, 1.7)
pt3dadd(-78.25, -223.35, -6.75, 1.7)
pt3dadd(-78.21, -223.31, -6.75, 1.7)
pt3dadd(-78.17, -223.21, -6.75, 1.7)
pt3dadd(-78.08, -223.07, -6.75, 1.7)
pt3dadd(-78.04, -222.97, -6.75, 1.7)
pt3dadd(-77.96, -222.87, -6.75, 1.7)
pt3dadd(-77.91, -222.78, -6.75, 1.7)
pt3dadd(-77.87, -222.68, -6.75, 1.7)
pt3dadd(-77.79, -222.59, -6.75, 1.7)
pt3dadd(-77.74, -222.49, -6.75, 1.7)
pt3dadd(-77.7, -222.39, -6.75, 1.7)
pt3dadd(-77.61, -222.24, -6.75, 1.7)
pt3dadd(-77.57, -222.15, -6.75, 1.7)
pt3dadd(-77.49, -221.96, -6.75, 1.7)
pt3dadd(-77.44, -221.86, -6.75, 1.7)
pt3dadd(-77.32, -221.71, -6.75, 1.7)
pt3dadd(-77.28, -221.52, -6.75, 1.7)
pt3dadd(-77.23, -221.43, -6.75, 1.7)
pt3dadd(-77.15, -221.33, -6.75, 1.7)
pt3dadd(-77.11, -221.23, -6.75, 1.7)
pt3dadd(-77.06, -221.14, -6.75, 1.7)
pt3dadd(-76.98, -220.99, -6.75, 1.7)
pt3dadd(-76.93, -220.95, -6.75, 1.7)
pt3dadd(-76.89, -220.8, -6.75, 1.7)
pt3dadd(-76.85, -220.7, -6.75, 1.7)
pt3dadd(-76.77, -220.61, -6.75, 1.7)
pt3dadd(-76.72, -220.56, -6.75, 1.7)
pt3dadd(-76.68, -220.46, -6.75, 1.7)
pt3dadd(-76.56, -220.22, -6.75, 1.7)
pt3dadd(-76.47, -220.07, -6.75, 1.7)
pt3dadd(-76.43, -219.98, -6.75, 1.7)
pt3dadd(-76.39, -219.88, -6.75, 1.7)
pt3dadd(-76.34, -219.79, -6.75, 1.7)
pt3dadd(-76.26, -219.64, -6.75, 1.7)
pt3dadd(-76.21, -219.54, -6.75, 1.7)
pt3dadd(-76.17, -219.45, -6.75, 1.7)
pt3dadd(-76.09, -219.35, -6.75, 1.7)
pt3dadd(-76.04, -219.16, -6.75, 1.7)
pt3dadd(-76, -219.06, -6.75, 1.7)
pt3dadd(-75.96, -218.97, -6.75, 1.7)
pt3dadd(-75.88, -218.77, -6.75, 1.7)
pt3dadd(-75.83, -218.68, -6.75, 1.7)
pt3dadd(-75.75, -218.49, -6.75, 1.7)
pt3dadd(-75.66, -218.39, -6.75, 1.7)
pt3dadd(-75.62, -218.24, -6.75, 1.7)
pt3dadd(-75.58, -218.15, -6.75, 1.7)
pt3dadd(-75.54, -218.05, -6.75, 1.7)
pt3dadd(-75.45, -217.96, -6.75, 1.7)
pt3dadd(-75.41, -217.81, -6.75, 1.7)
pt3dadd(-75.36, -217.71, -6.75, 1.7)
pt3dadd(-75.36, -217.52, -6.75, 1.7)
pt3dadd(-75.32, -217.42, -6.75, 1.7)
pt3dadd(-75.28, -217.28, -6.75, 1.7)
pt3dadd(-75.24, -217.18, -6.75, 1.7)
pt3dadd(-75.19, -217.09, -6.75, 1.7)
pt3dadd(-75.15, -216.94, -6.75, 1.7)
pt3dadd(-75.11, -216.8, -6.75, 1.7)
pt3dadd(-75.07, -216.65, -6.75, 1.7)
pt3dadd(-75.03, -216.55, -6.75, 1.7)
pt3dadd(-74.98, -216.41, -6.75, 1.7)
pt3dadd(-74.98, -216.22, -6.75, 1.7)
pt3dadd(-74.94, -216.12, -6.75, 1.7)
pt3dadd(-74.9, -216.02, -6.75, 1.7)
pt3dadd(-74.86, -215.98, -6.75, 1.7)
pt3dadd(-74.86, -215.88, -6.75, 1.7)
pt3dadd(-74.81, -215.79, -6.75, 1.7)
pt3dadd(-74.77, -215.74, -6.75, 1.7)
pt3dadd(-74.73, -215.64, -6.75, 1.7)
pt3dadd(-74.68, -215.54, -6.75, 1.7)
pt3dadd(-74.64, -215.4, -6.75, 1.7)
pt3dadd(-74.6, -215.21, -6.75, 1.7)
pt3dadd(-74.56, -215.11, -6.75, 1.7)
pt3dadd(-74.51, -214.96, -6.75, 1.7)
pt3dadd(-74.47, -214.87, -6.75, 1.7)
pt3dadd(-74.43, -214.82, -6.75, 1.7)
pt3dadd(-74.56, -214.94, -4.75, 1.7)
pt3dadd(-74.51, -214.99, -4.75, 1.7)
pt3dadd(-74.51, -214.89, -4.75, 1.7)
pt3dadd(-74.47, -214.79, -4.75, 1.7)
pt3dadd(-74.43, -214.7, -4.75, 1.7)
pt3dadd(-74.39, -214.55, -4.75, 1.7)
pt3dadd(-74.35, -214.46, -4.75, 1.7)
pt3dadd(-74.35, -214.36, -4.75, 1.7)
pt3dadd(-74.3, -214.31, -4.75, 1.7)
pt3dadd(-74.26, -214.22, -4.75, 1.7)
pt3dadd(-74.22, -214.12, -4.75, 1.7)
pt3dadd(-74.18, -213.98, -4.75, 1.7)
pt3dadd(-74.14, -213.88, -4.75, 1.7)
pt3dadd(-74.09, -213.74, -4.75, 1.7)
pt3dadd(-74.05, -213.64, -4.75, 1.7)
pt3dadd(-74.01, -213.54, -4.75, 1.7)
pt3dadd(-73.96, -213.4, -4.75, 1.7)
pt3dadd(-73.92, -213.3, -4.75, 1.7)
pt3dadd(-73.88, -213.21, -4.75, 1.7)
pt3dadd(-73.88, -213.11, -4.75, 1.7)
pt3dadd(-73.84, -213.01, -4.75, 1.7)
pt3dadd(-73.79, -212.91, -4.75, 1.7)
pt3dadd(-73.75, -212.77, -4.75, 1.7)
pt3dadd(-73.71, -212.63, -4.75, 1.7)
pt3dadd(-73.67, -212.48, -4.75, 1.7)
pt3dadd(-73.63, -212.43, -4.75, 1.7)
pt3dadd(-73.63, -212.29, -4.75, 1.7)
pt3dadd(-73.58, -212.19, -4.75, 1.7)
pt3dadd(-73.58, -212.1, -4.75, 1.7)
pt3dadd(-73.54, -211.9, -4.75, 1.7)
pt3dadd(-73.5, -211.71, -4.75, 1.7)
pt3dadd(-73.46, -211.66, -4.75, 1.7)
pt3dadd(-73.41, -211.51, -4.75, 1.7)
pt3dadd(-73.37, -211.42, -4.75, 1.7)
pt3dadd(-73.33, -211.27, -4.75, 1.7)
pt3dadd(-73.33, -211.13, -4.75, 1.7)
pt3dadd(-73.29, -211.04, -4.75, 1.7)
pt3dadd(-73.24, -210.94, -4.75, 1.7)
pt3dadd(-73.2, -210.84, -4.75, 1.7)
pt3dadd(-73.16, -210.74, -4.75, 1.7)
pt3dadd(-73.07, -210.6, -4.75, 1.7)
pt3dadd(-73.03, -210.5, -4.75, 1.7)
}
}
proc shape3d_6() {
dend[1] { pt3dadd(-72.99, -210.36, -4.75, 1.7)
pt3dadd(-72.9, -210.16, -4.75, 1.7)
pt3dadd(-72.86, -210.07, -4.75, 1.7)
pt3dadd(-72.82, -209.97, -4.75, 1.7)
pt3dadd(-72.78, -209.93, -4.75, 1.7)
pt3dadd(-72.73, -209.78, -4.75, 1.7)
pt3dadd(-72.69, -209.68, -4.75, 1.7)
pt3dadd(-72.61, -209.59, -4.75, 1.7)
pt3dadd(-72.56, -209.49, -4.75, 1.7)
pt3dadd(-72.48, -209.3, -4.75, 1.7)
pt3dadd(-72.43, -209.2, -4.75, 1.7)
pt3dadd(-72.39, -209.15, -4.75, 1.7)
pt3dadd(-72.35, -209.01, -4.75, 1.7)
pt3dadd(-72.26, -208.91, -4.75, 1.7)
pt3dadd(-72.26, -208.82, -4.75, 1.7)
pt3dadd(-72.18, -208.67, -4.75, 1.7)
pt3dadd(-72.14, -208.57, -4.75, 1.7)
pt3dadd(-72.1, -208.43, -4.75, 1.7)
pt3dadd(-72.01, -208.29, -4.75, 1.7)
pt3dadd(-71.88, -208.14, -4.75, 1.7)
pt3dadd(-71.84, -207.95, -4.75, 1.7)
pt3dadd(-71.75, -207.8, -4.75, 1.7)
pt3dadd(-71.67, -207.61, -4.75, 1.7)
pt3dadd(-71.63, -207.56, -4.75, 1.7)
pt3dadd(-71.59, -207.42, -4.75, 1.7)
pt3dadd(-71.54, -207.32, -4.75, 1.7)
pt3dadd(-71.46, -207.23, -4.75, 1.7)
pt3dadd(-71.42, -207.13, -4.75, 1.7)
pt3dadd(-71.38, -207.03, -4.75, 1.7)
pt3dadd(-71.33, -206.89, -4.75, 1.7)
pt3dadd(-71.29, -206.79, -4.75, 1.7)
pt3dadd(-71.21, -206.55, -4.75, 1.7)
pt3dadd(-71.12, -206.45, -4.75, 1.7)
pt3dadd(-71.08, -206.31, -4.75, 1.7)
pt3dadd(-71.04, -206.21, -4.75, 1.7)
pt3dadd(-70.95, -206.07, -4.75, 1.7)
pt3dadd(-70.91, -205.92, -4.75, 1.7)
pt3dadd(-70.82, -205.78, -4.75, 1.7)
pt3dadd(-70.78, -205.63, -4.75, 1.7)
pt3dadd(-70.69, -205.54, -4.75, 1.7)
pt3dadd(-70.65, -205.39, -4.75, 1.7)
pt3dadd(-70.61, -205.34, -4.75, 1.7)
pt3dadd(-70.53, -205.2, -4.75, 1.7)
pt3dadd(-70.48, -205.1, -4.75, 1.7)
pt3dadd(-70.44, -205.05, -4.75, 1.7)
pt3dadd(-70.36, -204.86, -4.75, 1.7)
pt3dadd(-70.31, -204.81, -4.75, 1.7)
pt3dadd(-70.27, -204.76, -4.75, 1.7)
pt3dadd(-70.23, -204.67, -4.75, 1.7)
pt3dadd(-70.14, -204.52, -4.75, 1.7)
pt3dadd(-70.1, -204.43, -4.75, 1.7)
pt3dadd(-70.06, -204.33, -4.75, 1.7)
pt3dadd(-69.97, -204.24, -4.75, 1.7)
pt3dadd(-69.93, -204.14, -4.75, 1.7)
pt3dadd(-69.89, -204.04, -4.75, 1.7)
pt3dadd(-69.85, -203.95, -4.75, 1.7)
pt3dadd(-69.8, -203.85, -4.75, 1.7)
pt3dadd(-69.76, -203.75, -4.75, 1.7)
pt3dadd(-69.68, -203.65, -4.75, 1.7)
pt3dadd(-69.68, -203.56, -4.75, 1.7)
pt3dadd(-69.63, -203.46, -4.75, 1.7)
pt3dadd(-69.55, -203.41, -4.75, 1.7)
pt3dadd(-69.5, -203.27, -4.75, 1.7)
pt3dadd(-69.46, -203.22, -4.75, 1.7)
pt3dadd(-69.42, -203.17, -4.75, 1.7)
pt3dadd(-69.38, -203.13, -4.75, 1.7)
pt3dadd(-69.29, -203.03, -4.75, 1.7)
pt3dadd(-69.25, -202.98, -4.75, 1.7)
pt3dadd(-69.21, -202.88, -4.75, 1.7)
pt3dadd(-69.17, -202.79, -4.75, 1.7)
pt3dadd(-69.12, -202.69, -4.75, 1.7)
pt3dadd(-69.04, -202.6, -4.75, 1.7)
pt3dadd(-69, -202.54, -4.75, 1.7)
pt3dadd(-69.08, -202.62, -2.75, 1.7)
pt3dadd(-69.04, -202.62, -2.75, 1.7)
pt3dadd(-68.96, -202.57, -2.75, 1.7)
pt3dadd(-68.83, -202.43, -2.75, 1.7)
pt3dadd(-68.7, -202.33, -2.75, 1.7)
pt3dadd(-68.61, -202.14, -2.75, 1.7)
pt3dadd(-68.53, -202.04, -2.75, 1.7)
pt3dadd(-68.44, -201.94, -2.75, 1.7)
pt3dadd(-68.4, -201.8, -2.75, 1.7)
pt3dadd(-68.32, -201.7, -2.75, 1.7)
pt3dadd(-68.28, -201.6, -2.75, 1.7)
pt3dadd(-68.19, -201.46, -2.75, 1.7)
pt3dadd(-68.11, -201.32, -2.75, 1.7)
pt3dadd(-68.06, -201.22, -2.75, 1.7)
pt3dadd(-68.02, -201.07, -2.75, 1.7)
pt3dadd(-67.93, -200.93, -2.75, 1.7)
pt3dadd(-67.85, -200.84, -2.75, 1.7)
pt3dadd(-67.76, -200.79, -2.75, 1.7)
pt3dadd(-67.72, -200.64, -2.75, 1.7)
pt3dadd(-67.68, -200.5, -2.75, 1.7)
pt3dadd(-67.6, -200.4, -2.75, 1.7)
pt3dadd(-67.51, -200.26, -2.75, 1.7)
pt3dadd(-67.38, -200.01, -2.75, 1.7)
pt3dadd(-67.34, -199.87, -2.75, 1.7)
pt3dadd(-67.21, -199.58, -2.75, 1.7)
pt3dadd(-67.08, -199.39, -2.75, 1.7)
pt3dadd(-67, -199.24, -2.75, 1.7)
pt3dadd(-66.92, -199.1, -2.75, 1.7)
pt3dadd(-66.87, -198.9, -2.75, 1.7)
pt3dadd(-66.79, -198.81, -2.75, 1.7)
pt3dadd(-66.7, -198.62, -2.75, 1.7)
pt3dadd(-66.62, -198.42, -2.75, 1.7)
pt3dadd(-66.49, -198.23, -2.75, 1.7)
pt3dadd(-66.4, -198.09, -2.75, 1.7)
pt3dadd(-66.36, -197.94, -2.75, 1.7)
pt3dadd(-66.28, -197.85, -2.75, 1.7)
pt3dadd(-66.19, -197.65, -2.75, 1.7)
pt3dadd(-66.15, -197.55, -2.75, 1.7)
pt3dadd(-66.07, -197.46, -2.75, 1.7)
pt3dadd(-66.03, -197.36, -2.75, 1.7)
pt3dadd(-65.98, -197.22, -2.75, 1.7)
pt3dadd(-65.9, -197.12, -2.75, 1.7)
pt3dadd(-65.86, -197.02, -2.75, 1.7)
pt3dadd(-65.81, -196.88, -2.75, 1.7)
pt3dadd(-65.77, -196.78, -2.75, 1.7)
pt3dadd(-65.68, -196.74, -2.75, 1.7)
pt3dadd(-65.64, -196.69, -2.75, 1.7)
pt3dadd(-65.6, -196.54, -2.75, 1.7)
pt3dadd(-65.51, -196.49, -2.75, 1.7)
pt3dadd(-65.47, -196.45, -2.75, 1.7)
pt3dadd(-65.43, -196.4, -2.75, 1.7)
pt3dadd(-65.39, -196.3, -2.75, 1.7)
pt3dadd(-65.35, -196.25, -2.75, 1.7)
pt3dadd(-65.26, -196.11, -2.75, 1.7)
pt3dadd(-65.26, -195.96, -2.75, 1.7)
pt3dadd(-65.18, -195.91, -2.75, 1.7)
pt3dadd(-65.13, -195.87, -2.75, 1.7)
pt3dadd(-65.09, -195.82, -2.75, 1.7)
pt3dadd(-65.09, -195.72, -2.75, 1.7)
pt3dadd(-65.05, -195.68, -2.75, 1.7)
pt3dadd(-65, -195.63, -2.75, 1.7)
pt3dadd(-64.96, -195.58, -2.75, 1.7)
pt3dadd(-65.09, -195.79, -2.75, 1.7)
pt3dadd(-65.09, -195.84, -2.75, 1.7)
pt3dadd(-65.05, -195.79, -2.75, 1.7)
pt3dadd(-65, -195.75, -2.75, 1.7)
pt3dadd(-64.96, -195.65, -2.75, 1.7)
pt3dadd(-64.92, -195.6, -2.75, 1.7)
pt3dadd(-64.88, -195.55, -2.75, 1.7)
pt3dadd(-64.83, -195.51, -2.75, 1.7)
pt3dadd(-64.79, -195.46, -2.75, 1.7)
pt3dadd(-64.75, -195.41, -2.75, 1.7)
pt3dadd(-64.71, -195.36, -2.75, 1.7)
pt3dadd(-64.67, -195.31, -2.75, 1.7)
pt3dadd(-64.62, -195.21, -2.75, 1.7)
pt3dadd(-64.58, -195.12, -2.75, 1.7)
pt3dadd(-64.54, -195.07, -2.75, 1.7)
pt3dadd(-64.5, -195.02, -2.75, 1.7)
pt3dadd(-64.45, -194.98, -2.75, 1.7)
pt3dadd(-64.41, -194.93, -2.75, 1.7)
pt3dadd(-64.37, -194.83, -2.75, 1.7)
pt3dadd(-64.32, -194.73, -2.75, 1.7)
pt3dadd(-64.24, -194.68, -2.75, 1.7)
pt3dadd(-64.2, -194.59, -2.75, 1.7)
pt3dadd(-64.15, -194.49, -2.75, 1.7)
pt3dadd(-64.07, -194.4, -2.75, 1.7)
pt3dadd(-64.03, -194.3, -2.75, 1.7)
pt3dadd(-63.99, -194.2, -2.75, 1.7)
pt3dadd(-63.9, -194.15, -2.75, 1.7)
pt3dadd(-63.81, -194.11, -2.75, 1.7)
pt3dadd(-63.78, -194.01, -2.75, 1.7)
pt3dadd(-63.69, -193.87, -2.75, 1.7)
pt3dadd(-63.65, -193.82, -2.75, 1.7)
pt3dadd(-63.6, -193.72, -2.75, 1.7)
pt3dadd(-63.56, -193.58, -2.75, 1.7)
pt3dadd(-63.48, -193.43, -2.75, 1.7)
pt3dadd(-63.44, -193.34, -2.75, 1.7)
pt3dadd(-63.35, -193.24, -2.75, 1.7)
pt3dadd(-63.35, -193.14, -2.75, 1.7)
pt3dadd(-63.26, -193.04, -2.75, 1.7)
pt3dadd(-63.22, -192.95, -2.75, 1.7)
pt3dadd(-63.14, -192.8, -2.75, 1.7)
pt3dadd(-63.14, -192.71, -2.75, 1.7)
pt3dadd(-63.05, -192.66, -2.75, 1.7)
pt3dadd(-63.05, -192.56, -2.75, 1.7)
pt3dadd(-62.97, -192.42, -2.75, 1.7)
pt3dadd(-62.92, -192.32, -2.75, 1.7)
pt3dadd(-62.84, -192.27, -2.75, 1.7)
pt3dadd(-62.8, -192.23, -2.75, 1.7)
pt3dadd(-62.76, -192.13, -2.75, 1.7)
pt3dadd(-62.67, -191.99, -2.75, 1.7)
pt3dadd(-62.63, -191.84, -2.75, 1.7)
pt3dadd(-62.58, -191.74, -2.75, 1.7)
pt3dadd(-62.46, -191.6, -2.75, 1.7)
pt3dadd(-62.37, -191.4, -2.75, 1.7)
pt3dadd(-62.29, -191.21, -2.75, 1.7)
pt3dadd(-62.16, -191.07, -2.75, 1.7)
pt3dadd(-62.08, -190.83, -2.75, 1.7)
pt3dadd(-61.99, -190.73, -2.75, 1.7)
pt3dadd(-61.86, -190.49, -2.75, 1.7)
pt3dadd(-61.82, -190.39, -2.75, 1.7)
pt3dadd(-61.74, -190.3, -2.75, 1.7)
pt3dadd(-61.65, -190.15, -2.75, 1.7)
pt3dadd(-61.56, -189.91, -2.75, 1.7)
pt3dadd(-61.48, -189.77, -2.75, 1.7)
pt3dadd(-61.35, -189.57, -2.75, 1.7)
pt3dadd(-61.27, -189.48, -2.75, 1.7)
}
}
proc shape3d_7() {
dend[1] { pt3dadd(-61.22, -189.38, -2.75, 1.7)
pt3dadd(-61.14, -189.24, -2.75, 1.7)
pt3dadd(-61.1, -189.09, -2.75, 1.7)
pt3dadd(-60.97, -188.95, -2.75, 1.7)
pt3dadd(-60.93, -188.76, -2.75, 1.7)
pt3dadd(-60.85, -188.66, -2.75, 1.7)
pt3dadd(-60.76, -188.46, -2.75, 1.7)
pt3dadd(-60.72, -188.32, -2.75, 1.7)
pt3dadd(-60.63, -188.22, -2.75, 1.7)
pt3dadd(-60.59, -188.08, -2.75, 1.7)
pt3dadd(-60.51, -187.98, -2.75, 1.7)
pt3dadd(-60.51, -187.88, -2.75, 1.7)
pt3dadd(-60.42, -187.79, -2.75, 1.7)
pt3dadd(-60.33, -187.65, -2.75, 1.7)
pt3dadd(-60.29, -187.55, -2.75, 1.7)
pt3dadd(-60.25, -187.5, -2.75, 1.7)
pt3dadd(-60.21, -187.4, -2.75, 1.7)
pt3dadd(-60.17, -187.31, -2.75, 1.7)
pt3dadd(-60.12, -187.21, -2.75, 1.7)
pt3dadd(-60.08, -187.07, -2.75, 1.7)
pt3dadd(-60.04, -187.02, -2.75, 1.7)
pt3dadd(-59.99, -186.87, -2.75, 1.7)
pt3dadd(-59.91, -186.82, -2.75, 1.7)
pt3dadd(-59.87, -186.73, -2.75, 1.7)
pt3dadd(-59.83, -186.63, -2.75, 1.7)
pt3dadd(-59.78, -186.54, -2.75, 1.7)
pt3dadd(-59.74, -186.44, -2.75, 1.7)
pt3dadd(-59.65, -186.34, -2.75, 1.7)
pt3dadd(-59.65, -186.24, -2.75, 1.7)
pt3dadd(-59.61, -186.15, -2.75, 1.7)
pt3dadd(-59.53, -186.01, -2.75, 1.7)
pt3dadd(-59.49, -185.96, -2.75, 1.7)
pt3dadd(-59.44, -185.86, -2.75, 1.7)
pt3dadd(-59.4, -185.76, -2.75, 1.7)
pt3dadd(-59.36, -185.67, -2.75, 1.7)
pt3dadd(-59.23, -185.43, -2.75, 1.7)
pt3dadd(-59.19, -185.33, -2.75, 1.7)
pt3dadd(-59.15, -185.23, -2.75, 1.7)
pt3dadd(-59.1, -185.14, -2.75, 1.7)
pt3dadd(-59.02, -184.99, -2.75, 1.7)
pt3dadd(-58.97, -184.95, -2.75, 1.7)
pt3dadd(-58.93, -184.85, -2.75, 1.7)
pt3dadd(-59.06, -185.07, -2.75, 1.7)
pt3dadd(-59.02, -185.02, -2.75, 1.7)
pt3dadd(-59.02, -184.87, -2.75, 1.7)
pt3dadd(-58.97, -184.82, -2.75, 1.7)
pt3dadd(-58.89, -184.68, -2.75, 1.7)
pt3dadd(-58.81, -184.44, -2.75, 1.7)
pt3dadd(-58.76, -184.34, -2.75, 1.7)
pt3dadd(-58.72, -184.2, -2.75, 1.7)
pt3dadd(-58.68, -184.05, -2.75, 1.7)
pt3dadd(-58.63, -183.96, -2.75, 1.7)
pt3dadd(-58.59, -183.81, -2.75, 1.7)
pt3dadd(-58.55, -183.66, -2.75, 1.7)
pt3dadd(-58.55, -183.57, -2.75, 1.7)
pt3dadd(-58.51, -183.52, -2.75, 1.7)
pt3dadd(-58.51, -183.43, -2.75, 1.7)
pt3dadd(-58.47, -183.38, -2.75, 1.7)
pt3dadd(-58.42, -183.28, -2.75, 1.7)
pt3dadd(-58.38, -183.23, -2.75, 1.7)
pt3dadd(-58.38, -183.13, -2.75, 1.7)
pt3dadd(-58.34, -183.04, -2.75, 1.7)
pt3dadd(-58.3, -182.94, -2.75, 1.7)
pt3dadd(-58.26, -182.85, -2.75, 1.7)
pt3dadd(-58.21, -182.8, -2.75, 1.7)
pt3dadd(-58.17, -182.7, -2.75, 1.7)
pt3dadd(-58.13, -182.65, -2.75, 1.7)
pt3dadd(-58.08, -182.51, -2.75, 1.7)
pt3dadd(-58.04, -182.41, -2.75, 1.7)
pt3dadd(-58, -182.32, -2.75, 1.7)
pt3dadd(-57.96, -182.22, -2.75, 1.7)
pt3dadd(-57.87, -182.12, -2.75, 1.7)
pt3dadd(-57.83, -181.98, -2.75, 1.7)
pt3dadd(-57.74, -181.83, -2.75, 1.7)
pt3dadd(-57.7, -181.69, -2.75, 1.7)
pt3dadd(-57.66, -181.59, -2.75, 1.7)
pt3dadd(-57.53, -181.3, -2.75, 1.7)
pt3dadd(-57.49, -181.16, -2.75, 1.7)
pt3dadd(-57.36, -181.06, -2.75, 1.7)
pt3dadd(-57.28, -180.92, -2.75, 1.7)
pt3dadd(-57.28, -180.77, -2.75, 1.7)
pt3dadd(-57.19, -180.68, -2.75, 1.7)
pt3dadd(-57.15, -180.58, -2.75, 1.7)
pt3dadd(-57.11, -180.48, -2.75, 1.7)
pt3dadd(-57.02, -180.34, -2.75, 1.7)
pt3dadd(-56.98, -180.2, -2.75, 1.7)
pt3dadd(-56.9, -180, -2.75, 1.7)
pt3dadd(-56.77, -179.76, -2.75, 1.7)
pt3dadd(-56.68, -179.62, -2.75, 1.7)
pt3dadd(-56.64, -179.47, -2.75, 1.7)
pt3dadd(-56.56, -179.32, -2.75, 1.7)
pt3dadd(-56.47, -179.23, -2.75, 1.7)
pt3dadd(-56.43, -179.09, -2.75, 1.7)
pt3dadd(-56.38, -178.94, -2.75, 1.7)
pt3dadd(-56.3, -178.84, -2.75, 1.7)
pt3dadd(-56.26, -178.75, -2.75, 1.7)
pt3dadd(-56.22, -178.55, -2.75, 1.7)
pt3dadd(-56.17, -178.46, -2.75, 1.7)
pt3dadd(-56.09, -178.31, -2.75, 1.7)
pt3dadd(-56.04, -178.17, -2.75, 1.7)
pt3dadd(-55.96, -178.02, -2.75, 1.7)
pt3dadd(-55.92, -177.93, -2.75, 1.7)
pt3dadd(-55.88, -177.78, -2.75, 1.7)
pt3dadd(-55.79, -177.64, -2.75, 1.7)
pt3dadd(-55.71, -177.54, -2.75, 1.7)
pt3dadd(-55.67, -177.4, -2.75, 1.7)
pt3dadd(-55.62, -177.3, -2.75, 1.7)
pt3dadd(-55.58, -177.25, -2.75, 1.7)
pt3dadd(-55.54, -177.15, -2.75, 1.7)
pt3dadd(-55.49, -177.01, -2.75, 1.7)
pt3dadd(-55.45, -176.91, -2.75, 1.7)
pt3dadd(-55.37, -176.77, -2.75, 1.7)
pt3dadd(-55.37, -176.67, -2.75, 1.7)
pt3dadd(-55.28, -176.53, -2.75, 1.7)
pt3dadd(-55.24, -176.38, -2.75, 1.7)
pt3dadd(-55.2, -176.29, -2.75, 1.7)
pt3dadd(-55.2, -176.05, -2.75, 1.7)
pt3dadd(-55.15, -175.95, -2.75, 1.7)
pt3dadd(-55.15, -173.68, -2.75, 1.7)
pt3dadd(-55.24, -173.76, -2.75, 1.7)
pt3dadd(-55.28, -173.66, -2.75, 1.7)
pt3dadd(-55.33, -173.61, -2.75, 1.7)
pt3dadd(-55.37, -173.51, -2.75, 1.7)
pt3dadd(-55.41, -173.47, -2.75, 1.7)
pt3dadd(-55.49, -173.37, -2.75, 1.7)
pt3dadd(-55.54, -173.32, -2.75, 1.7)
pt3dadd(-55.67, -173.18, -2.75, 1.7)
pt3dadd(-55.71, -173.13, -2.75, 1.7)
pt3dadd(-55.75, -173.03, -2.75, 1.7)
pt3dadd(-55.75, -172.93, -2.75, 1.7)
pt3dadd(-55.79, -172.84, -2.75, 1.7)
pt3dadd(-55.83, -172.79, -2.75, 1.7)
pt3dadd(-55.92, -172.7, -2.75, 1.7)
pt3dadd(-56, -172.6, -2.75, 1.7)
pt3dadd(-56.04, -172.55, -2.75, 1.7)
pt3dadd(-56.13, -172.5, -2.75, 1.7)
pt3dadd(-56.17, -172.4, -2.75, 1.7)
pt3dadd(-56.26, -172.36, -2.75, 1.7)
pt3dadd(-56.34, -172.26, -2.75, 1.7)
pt3dadd(-56.43, -172.21, -2.75, 1.7)
pt3dadd(-56.51, -172.16, -2.75, 1.7)
pt3dadd(-56.6, -172.12, -2.75, 1.7)
pt3dadd(-56.68, -172.02, -2.75, 1.7)
pt3dadd(-56.81, -171.92, -2.75, 1.7)
pt3dadd(-56.9, -171.88, -2.75, 1.7)
pt3dadd(-56.94, -171.78, -2.75, 1.7)
pt3dadd(-57.02, -171.73, -2.75, 1.7)
pt3dadd(-57.15, -171.63, -2.75, 1.7)
pt3dadd(-57.19, -171.59, -2.75, 1.7)
pt3dadd(-57.28, -171.54, -2.75, 1.7)
pt3dadd(-57.32, -171.49, -2.75, 1.7)
pt3dadd(-57.4, -171.44, -2.75, 1.7)
pt3dadd(-57.49, -171.35, -2.75, 1.7)
pt3dadd(-57.58, -171.29, -2.75, 1.7)
pt3dadd(-57.62, -171.25, -2.75, 1.7)
pt3dadd(-57.66, -171.2, -2.75, 1.7)
pt3dadd(-57.74, -171.2, -2.75, 1.7)
pt3dadd(-57.83, -171.15, -2.75, 1.7)
pt3dadd(-57.87, -171.05, -2.75, 1.7)
pt3dadd(-57.96, -171.01, -2.75, 1.7)
pt3dadd(-58.04, -170.96, -2.75, 1.7)
pt3dadd(-58.17, -170.91, -2.75, 1.7)
pt3dadd(-58.21, -170.86, -2.75, 1.7)
pt3dadd(-58.3, -170.82, -2.75, 1.7)
pt3dadd(-58.38, -170.72, -2.75, 1.7)
pt3dadd(-58.47, -170.67, -2.75, 1.7)
pt3dadd(-58.55, -170.67, -2.75, 1.7)
pt3dadd(-58.63, -170.62, -2.75, 1.7)
pt3dadd(-58.68, -170.57, -2.75, 1.7)
pt3dadd(-58.76, -170.52, -2.75, 1.7)
pt3dadd(-58.81, -170.48, -2.75, 1.7)
pt3dadd(-58.89, -170.43, -2.75, 1.7)
pt3dadd(-58.97, -170.38, -2.75, 1.7)
pt3dadd(-59.06, -170.33, -2.75, 1.7)
pt3dadd(-59.1, -170.28, -2.75, 1.7)
pt3dadd(-59.15, -170.24, -2.75, 1.7)
pt3dadd(-59.19, -170.14, -2.75, 1.7)
pt3dadd(-59.27, -170.09, -2.75, 1.7)
pt3dadd(-59.36, -170.04, -2.75, 1.7)
pt3dadd(-59.4, -169.95, -2.75, 1.7)
pt3dadd(-59.49, -169.85, -2.75, 1.7)
pt3dadd(-59.61, -169.71, -2.75, 1.7)
pt3dadd(-59.65, -169.56, -2.75, 1.7)
pt3dadd(-59.83, -169.37, -2.75, 1.7)
pt3dadd(-59.91, -169.22, -2.75, 1.7)
pt3dadd(-59.99, -169.13, -2.75, 1.7)
pt3dadd(-60.04, -169.08, -2.75, 1.7)
pt3dadd(-60.08, -168.93, -2.75, 1.7)
pt3dadd(-60.12, -168.84, -2.75, 1.7)
pt3dadd(-60.17, -168.74, -2.75, 1.7)
pt3dadd(-60.21, -168.65, -2.75, 1.7)
pt3dadd(-60.29, -168.6, -2.75, 1.7)
pt3dadd(-60.33, -168.45, -2.75, 1.7)
pt3dadd(-60.38, -168.3, -2.75, 1.7)
pt3dadd(-60.51, -168.16, -2.75, 1.7)
pt3dadd(-60.55, -168.02, -2.75, 1.7)
pt3dadd(-60.59, -167.92, -2.75, 1.7)
pt3dadd(-60.67, -167.87, -2.75, 1.7)
pt3dadd(-60.72, -167.73, -2.75, 1.7)
pt3dadd(-60.72, -167.63, -2.75, 1.7)
}
}
proc shape3d_8() {
dend[1] { pt3dadd(-60.8, -167.54, -2.75, 1.7)
pt3dadd(-60.85, -167.44, -2.75, 1.7)
pt3dadd(-60.89, -167.34, -2.75, 1.7)
pt3dadd(-60.97, -167.24, -2.75, 1.7)
pt3dadd(-61.01, -167.1, -2.75, 1.7)
pt3dadd(-61.1, -166.91, -2.75, 1.7)
pt3dadd(-61.19, -166.81, -2.75, 1.7)
pt3dadd(-61.31, -166.52, -2.75, 1.7)
pt3dadd(-61.4, -166.33, -2.75, 1.7)
pt3dadd(-61.48, -166.18, -2.75, 1.7)
pt3dadd(-61.56, -165.99, -2.75, 1.7)
pt3dadd(-61.61, -165.85, -2.75, 1.7)
pt3dadd(-61.74, -165.7, -2.75, 1.7)
pt3dadd(-61.74, -165.6, -2.75, 1.7)
pt3dadd(-61.82, -165.56, -2.75, 1.7)
pt3dadd(-61.86, -165.41, -2.75, 1.7)
pt3dadd(-61.9, -165.32, -2.75, 1.7)
pt3dadd(-61.95, -165.22, -2.75, 1.7)
pt3dadd(-61.99, -165.12, -2.75, 1.7)
pt3dadd(-62.03, -164.98, -2.75, 1.7)
pt3dadd(-62.03, -164.84, -2.75, 1.7)
pt3dadd(-62.08, -164.69, -2.75, 1.7)
pt3dadd(-62.12, -164.64, -2.75, 1.7)
pt3dadd(-62.16, -164.54, -2.75, 1.7)
pt3dadd(-62.16, -164.35, -2.75, 1.7)
pt3dadd(-62.2, -164.3, -2.75, 1.7)
pt3dadd(-62.24, -164.21, -2.75, 1.7)
pt3dadd(-62.24, -162.18, -2.75, 1.7)
pt3dadd(-62.2, -162.04, -2.75, 1.7)
pt3dadd(-62.2, -161.75, -2.75, 1.7)
pt3dadd(-62.16, -161.7, -2.75, 1.7)
pt3dadd(-62.16, -161.72, -4.75, 1.7)
pt3dadd(-62.16, -161.77, -4.75, 1.7)
pt3dadd(-62.12, -161.68, -4.75, 1.7)
pt3dadd(-62.12, -161.58, -4.75, 1.7)
pt3dadd(-62.08, -161.53, -4.75, 1.7)
pt3dadd(-62.03, -161.43, -4.75, 1.7)
pt3dadd(-61.99, -161.38, -4.75, 1.7)
pt3dadd(-61.99, -161.15, -4.75, 1.7)
pt3dadd(-61.9, -161.05, -4.75, 1.7)
pt3dadd(-61.82, -160.95, -4.75, 1.7)
pt3dadd(-61.74, -160.76, -4.75, 1.7)
pt3dadd(-61.69, -160.71, -4.75, 1.7)
pt3dadd(-61.65, -160.57, -4.75, 1.7)
pt3dadd(-61.56, -160.47, -4.75, 1.7)
pt3dadd(-61.56, -160.37, -4.75, 1.7)
pt3dadd(-61.52, -160.28, -4.75, 1.7)
pt3dadd(-61.44, -160.23, -4.75, 1.7)
pt3dadd(-61.4, -160.09, -4.75, 1.7)
pt3dadd(-61.35, -159.99, -4.75, 1.7)
pt3dadd(-61.31, -159.89, -4.75, 1.7)
pt3dadd(-61.22, -159.79, -4.75, 1.7)
pt3dadd(-61.18, -159.7, -4.75, 1.7)
pt3dadd(-61.1, -159.55, -4.75, 1.7)
pt3dadd(-61.06, -159.41, -4.75, 1.7)
pt3dadd(-60.97, -159.31, -4.75, 1.7)
pt3dadd(-60.93, -159.17, -4.75, 1.7)
pt3dadd(-60.89, -159.02, -4.75, 1.7)
pt3dadd(-60.8, -158.98, -4.75, 1.7)
pt3dadd(-60.8, -158.83, -4.75, 1.7)
pt3dadd(-60.72, -158.78, -4.75, 1.7)
pt3dadd(-60.67, -158.68, -4.75, 1.7)
pt3dadd(-60.63, -158.54, -4.75, 1.7)
pt3dadd(-60.59, -158.45, -4.75, 1.7)
pt3dadd(-60.51, -158.35, -4.75, 1.7)
pt3dadd(-60.46, -158.2, -4.75, 1.7)
pt3dadd(-60.38, -158.01, -4.75, 1.7)
pt3dadd(-60.33, -157.91, -4.75, 1.7)
pt3dadd(-60.25, -157.77, -4.75, 1.7)
pt3dadd(-60.21, -157.67, -4.75, 1.7)
pt3dadd(-60.17, -157.57, -4.75, 1.7)
pt3dadd(-60.08, -157.43, -4.75, 1.7)
pt3dadd(-59.99, -157.24, -4.75, 1.7)
pt3dadd(-59.91, -157.14, -4.75, 1.7)
pt3dadd(-59.83, -157, -4.75, 1.7)
pt3dadd(-59.7, -156.76, -4.75, 1.7)
pt3dadd(-59.65, -156.66, -4.75, 1.7)
pt3dadd(-59.57, -156.51, -4.75, 1.7)
pt3dadd(-59.44, -156.42, -4.75, 1.7)
pt3dadd(-59.36, -156.27, -4.75, 1.7)
pt3dadd(-59.27, -156.13, -4.75, 1.7)
pt3dadd(-59.15, -155.99, -4.75, 1.7)
pt3dadd(-59.02, -155.89, -4.75, 1.7)
pt3dadd(-58.89, -155.79, -4.75, 1.7)
pt3dadd(-58.81, -155.7, -4.75, 1.7)
pt3dadd(-58.59, -155.46, -4.75, 1.7)
pt3dadd(-58.47, -155.36, -4.75, 1.7)
pt3dadd(-58.3, -155.21, -4.75, 1.7)
pt3dadd(-58.21, -155.12, -4.75, 1.7)
pt3dadd(-58.08, -155.02, -4.75, 1.7)
pt3dadd(-57.92, -154.92, -4.75, 1.7)
pt3dadd(-57.83, -154.83, -4.75, 1.7)
pt3dadd(-57.66, -154.73, -4.75, 1.7)
pt3dadd(-57.53, -154.63, -4.75, 1.7)
pt3dadd(-57.45, -154.59, -4.75, 1.7)
pt3dadd(-57.24, -154.44, -4.75, 1.7)
pt3dadd(-57.11, -154.39, -4.75, 1.7)
pt3dadd(-56.98, -154.3, -4.75, 1.7)
pt3dadd(-56.85, -154.25, -4.75, 1.7)
pt3dadd(-56.77, -154.2, -4.75, 1.7)
pt3dadd(-56.64, -154.15, -4.75, 1.7)
pt3dadd(-56.51, -154.05, -4.75, 1.7)
pt3dadd(-56.43, -154.05, -4.75, 1.7)
pt3dadd(-56.34, -154.01, -4.75, 1.7)
pt3dadd(-56.17, -153.91, -4.75, 1.7)
pt3dadd(-56.09, -153.91, -4.75, 1.7)
pt3dadd(-55.96, -153.82, -4.75, 1.7)
pt3dadd(-55.83, -153.82, -4.75, 1.7)
pt3dadd(-55.75, -153.72, -4.75, 1.7)
pt3dadd(-55.62, -153.72, -4.75, 1.7)
pt3dadd(-55.49, -153.62, -4.75, 1.7)
pt3dadd(-55.37, -153.57, -4.75, 1.7)
pt3dadd(-55.24, -153.52, -4.75, 1.7)
pt3dadd(-55.07, -153.48, -4.75, 1.7)
pt3dadd(-54.99, -153.43, -4.75, 1.7)
pt3dadd(-54.81, -153.38, -4.75, 1.7)
pt3dadd(-54.69, -153.29, -4.75, 1.7)
pt3dadd(-54.52, -153.29, -4.75, 1.7)
pt3dadd(-54.39, -153.24, -4.75, 1.7)
pt3dadd(-54.26, -153.19, -4.75, 1.7)
pt3dadd(-54.09, -153.19, -4.75, 1.7)
pt3dadd(-53.97, -153.14, -4.75, 1.7)
pt3dadd(-53.88, -153.09, -4.75, 1.7)
pt3dadd(-53.54, -153.09, -4.75, 1.7)
pt3dadd(-53.46, -153.04, -4.75, 1.7)
pt3dadd(-52.4, -153.04, -4.75, 1.7)
pt3dadd(-52.52, -153.12, -5.75, 1.7)
pt3dadd(-52.44, -153.12, -5.75, 1.7)
pt3dadd(-52.35, -153.16, -5.75, 1.7)
pt3dadd(-52.01, -153.16, -5.75, 1.7)
pt3dadd(-51.93, -153.21, -5.75, 1.7)
pt3dadd(-51.63, -153.21, -5.75, 1.7)
pt3dadd(-51.54, -153.26, -5.75, 1.7)
pt3dadd(-51.29, -153.26, -5.75, 1.7)
pt3dadd(-51.21, -153.31, -5.75, 1.7)
pt3dadd(-50.87, -153.31, -5.75, 1.7)
pt3dadd(-50.74, -153.36, -5.75, 1.7)
pt3dadd(-49.89, -153.36, -5.75, 1.7)
pt3dadd(-49.81, -153.4, -5.75, 1.7)
pt3dadd(-49.42, -153.4, -5.75, 1.7)
pt3dadd(-49.29, -153.45, -5.75, 1.7)
pt3dadd(-48.87, -153.45, -5.75, 1.7)
pt3dadd(-48.66, -153.5, -5.75, 1.7)
pt3dadd(-48.28, -153.5, -5.75, 1.7)
pt3dadd(-48.06, -153.55, -5.75, 1.7)
pt3dadd(-47.72, -153.55, -5.75, 1.7)
pt3dadd(-47.47, -153.6, -5.75, 1.7)
pt3dadd(-47.3, -153.6, -5.75, 1.7)
pt3dadd(-47.17, -153.65, -5.75, 1.7)
pt3dadd(-46.88, -153.65, -5.75, 1.7)
pt3dadd(-46.79, -153.7, -5.75, 1.7)
pt3dadd(-46.58, -153.7, -5.75, 1.7)
pt3dadd(-46.49, -153.74, -5.75, 1.7)
pt3dadd(-46.32, -153.74, -5.75, 1.7)
pt3dadd(-46.19, -153.79, -5.75, 1.7)
pt3dadd(-46.11, -153.79, -5.75, 1.7)
pt3dadd(-46.03, -153.84, -5.75, 1.7)
pt3dadd(-45.9, -153.84, -5.75, 1.7)
pt3dadd(-45.73, -153.89, -5.75, 1.7)
pt3dadd(-45.56, -153.89, -5.75, 1.7)
pt3dadd(-45.43, -153.93, -5.75, 1.7)
pt3dadd(-45.26, -153.98, -5.75, 1.7)
pt3dadd(-44.97, -153.98, -5.75, 1.7)
pt3dadd(-44.84, -154.03, -5.75, 1.7)
pt3dadd(-44.71, -154.03, -5.75, 1.7)
pt3dadd(-44.63, -154.08, -5.75, 1.7)
pt3dadd(-44.37, -154.08, -5.75, 1.7)
pt3dadd(-44.24, -154.13, -5.75, 1.7)
pt3dadd(-43.86, -154.13, -5.75, 1.7)
pt3dadd(-43.78, -154.18, -5.75, 1.7)
pt3dadd(-43.31, -154.18, -5.75, 1.7)
pt3dadd(-43.18, -154.23, -5.75, 1.7)
pt3dadd(-40.8, -154.23, -5.75, 1.7)
pt3dadd(-40.8, -154.2, -7.75, 1.7)
pt3dadd(-38.72, -154.2, -7.75, 1.7)
pt3dadd(-38.64, -154.1, -7.75, 1.7)
pt3dadd(-38.55, -154.05, -7.75, 1.7)
pt3dadd(-38.38, -154.05, -7.75, 1.7)
pt3dadd(-38.3, -154.01, -7.75, 1.7)
pt3dadd(-38.17, -153.96, -7.75, 1.7)
pt3dadd(-37.96, -153.96, -7.75, 1.7)
pt3dadd(-37.87, -153.91, -7.75, 1.7)
pt3dadd(-37.79, -153.86, -7.75, 1.7)
pt3dadd(-37.66, -153.86, -7.75, 1.7)
pt3dadd(-37.58, -153.82, -7.75, 1.7)
pt3dadd(-37.49, -153.77, -7.75, 1.7)
pt3dadd(-37.37, -153.72, -7.75, 1.7)
pt3dadd(-37.32, -153.67, -7.75, 1.7)
pt3dadd(-37.19, -153.57, -7.75, 1.7)
pt3dadd(-37.11, -153.52, -7.75, 1.7)
pt3dadd(-37.03, -153.48, -7.75, 1.7)
pt3dadd(-36.98, -153.43, -7.75, 1.7)
pt3dadd(-36.9, -153.38, -7.75, 1.7)
pt3dadd(-36.77, -153.33, -7.75, 1.7)
pt3dadd(-36.73, -153.29, -7.75, 1.7)
pt3dadd(-36.6, -153.24, -7.75, 1.7)
pt3dadd(-36.56, -153.14, -7.75, 1.7)
pt3dadd(-36.51, -153.09, -7.75, 1.7)
pt3dadd(-36.43, -153.04, -7.75, 1.7)
pt3dadd(-36.35, -152.99, -7.75, 1.7)
}
}
proc shape3d_9() {
dend[1] { pt3dadd(-36.26, -152.95, -7.75, 1.7)
pt3dadd(-36.17, -152.9, -7.75, 1.7)
pt3dadd(-36.13, -152.8, -7.75, 1.7)
pt3dadd(-36.09, -152.71, -7.75, 1.7)
pt3dadd(-35.96, -152.56, -7.75, 1.7)
pt3dadd(-35.88, -152.51, -7.75, 1.7)
pt3dadd(-35.83, -152.41, -7.75, 1.7)
pt3dadd(-35.75, -152.37, -7.75, 1.7)
pt3dadd(-35.67, -152.32, -7.75, 1.7)
pt3dadd(-35.58, -152.27, -7.75, 1.7)
pt3dadd(-35.49, -152.27, -7.75, 1.7)
pt3dadd(-35.45, -152.22, -7.75, 1.7)
pt3dadd(-35.37, -152.18, -7.75, 1.7)
pt3dadd(-35.33, -152.13, -7.75, 1.7)
pt3dadd(-35.24, -152.13, -7.75, 1.7)
pt3dadd(-35.2, -152.08, -7.75, 1.7)
pt3dadd(-35.12, -152.03, -7.75, 1.7)
pt3dadd(-35.03, -152.03, -7.75, 1.7)
pt3dadd(-34.99, -151.98, -7.75, 1.7)
pt3dadd(-34.94, -151.93, -7.75, 1.7)
pt3dadd(-35.03, -151.72, -10.75, 1.7)
pt3dadd(-35.03, -151.76, -10.75, 1.7)
pt3dadd(-35.07, -151.81, -10.75, 1.7)
pt3dadd(-35.07, -151.96, -10.75, 1.7)
pt3dadd(-34.94, -151.96, -10.75, 1.7)
pt3dadd(-34.86, -151.91, -10.75, 1.7)
pt3dadd(-34.78, -151.86, -10.75, 1.7)
pt3dadd(-34.69, -151.76, -10.75, 1.7)
pt3dadd(-34.6, -151.72, -10.75, 1.7)
pt3dadd(-34.56, -151.67, -10.75, 1.7)
pt3dadd(-34.52, -151.57, -10.75, 1.7)
pt3dadd(-34.44, -151.52, -10.75, 1.7)
pt3dadd(-34.35, -151.43, -10.75, 1.7)
pt3dadd(-34.31, -151.38, -10.75, 1.7)
pt3dadd(-34.18, -151.28, -10.75, 1.7)
pt3dadd(-34.14, -151.24, -10.75, 1.7)
pt3dadd(-34.05, -151.19, -10.75, 1.7)
pt3dadd(-33.97, -151.14, -10.75, 1.7)
pt3dadd(-33.76, -150.99, -10.75, 1.7)
pt3dadd(-33.63, -150.95, -10.75, 1.7)
pt3dadd(-33.58, -150.9, -10.75, 1.7)
pt3dadd(-33.5, -150.85, -10.75, 1.7)
pt3dadd(-33.42, -150.75, -10.75, 1.7)
pt3dadd(-33.29, -150.71, -10.75, 1.7)
pt3dadd(-33.2, -150.61, -10.75, 1.7)
pt3dadd(-33.12, -150.56, -10.75, 1.7)
pt3dadd(-33.03, -150.51, -10.75, 1.7)
pt3dadd(-32.95, -150.41, -10.75, 1.7)
pt3dadd(-32.9, -150.37, -10.75, 1.7)
pt3dadd(-32.82, -150.37, -10.75, 1.7)
pt3dadd(-32.78, -150.32, -10.75, 1.7)
pt3dadd(-32.69, -150.27, -10.75, 1.7)
pt3dadd(-32.56, -150.22, -10.75, 1.7)
pt3dadd(-32.48, -150.17, -10.75, 1.7)
pt3dadd(-32.4, -150.08, -10.75, 1.7)
pt3dadd(-32.31, -150.03, -10.75, 1.7)
pt3dadd(-32.19, -149.98, -10.75, 1.7)
pt3dadd(-32.06, -149.88, -10.75, 1.7)
pt3dadd(-31.89, -149.79, -10.75, 1.7)
pt3dadd(-31.72, -149.64, -10.75, 1.7)
pt3dadd(-31.5, -149.5, -10.75, 1.7)
pt3dadd(-31.33, -149.4, -10.75, 1.7)
pt3dadd(-31.25, -149.35, -10.75, 1.7)
pt3dadd(-31.08, -149.3, -10.75, 1.7)
pt3dadd(-31, -149.26, -10.75, 1.7)
pt3dadd(-30.87, -149.16, -10.75, 1.7)
pt3dadd(-30.78, -149.07, -10.75, 1.7)
pt3dadd(-30.66, -149.01, -10.75, 1.7)
pt3dadd(-30.57, -148.97, -10.75, 1.7)
pt3dadd(-30.44, -148.92, -10.75, 1.7)
pt3dadd(-30.36, -148.87, -10.75, 1.7)
pt3dadd(-30.27, -148.82, -10.75, 1.7)
pt3dadd(-30.15, -148.77, -10.75, 1.7)
pt3dadd(-30.06, -148.68, -10.75, 1.7)
pt3dadd(-29.98, -148.63, -10.75, 1.7)
pt3dadd(-29.89, -148.58, -10.75, 1.7)
pt3dadd(-29.76, -148.54, -10.75, 1.7)
pt3dadd(-29.68, -148.49, -10.75, 1.7)
pt3dadd(-29.59, -148.44, -10.75, 1.7)
pt3dadd(-29.51, -148.44, -10.75, 1.7)
pt3dadd(-29.42, -148.39, -10.75, 1.7)
pt3dadd(-29.3, -148.29, -10.75, 1.7)
pt3dadd(-29.21, -148.29, -10.75, 1.7)
pt3dadd(-29.13, -148.24, -10.75, 1.7)
pt3dadd(-29.04, -148.2, -10.75, 1.7)
pt3dadd(-29, -148.1, -10.75, 1.7)
pt3dadd(-28.87, -148.05, -10.75, 1.7)
pt3dadd(-28.75, -147.96, -10.75, 1.7)
pt3dadd(-28.66, -147.91, -10.75, 1.7)
pt3dadd(-28.53, -147.81, -10.75, 1.7)
pt3dadd(-28.45, -147.76, -10.75, 1.7)
pt3dadd(-28.32, -147.76, -10.75, 1.7)
pt3dadd(-28.24, -147.66, -10.75, 1.7)
pt3dadd(-28.15, -147.62, -10.75, 1.7)
pt3dadd(-28.02, -147.52, -10.75, 1.7)
pt3dadd(-27.85, -147.47, -10.75, 1.7)
pt3dadd(-27.73, -147.38, -10.75, 1.7)
pt3dadd(-27.56, -147.28, -10.75, 1.7)
pt3dadd(-27.43, -147.23, -10.75, 1.7)
pt3dadd(-27.22, -147.09, -10.75, 1.7)
pt3dadd(-27.09, -146.99, -10.75, 1.7)
pt3dadd(-26.92, -146.94, -10.75, 1.7)
pt3dadd(-26.75, -146.85, -10.75, 1.7)
pt3dadd(-26.67, -146.8, -10.75, 1.7)
pt3dadd(-26.54, -146.75, -10.75, 1.7)
pt3dadd(-26.45, -146.65, -10.75, 1.7)
pt3dadd(-26.33, -146.6, -10.75, 1.7)
pt3dadd(-26.24, -146.56, -10.75, 1.7)
pt3dadd(-26.16, -146.56, -10.75, 1.7)
pt3dadd(-26.03, -146.46, -10.75, 1.7)
pt3dadd(-25.94, -146.46, -10.75, 1.7)
pt3dadd(-25.86, -146.36, -10.75, 1.7)
pt3dadd(-25.77, -146.36, -10.75, 1.7)
pt3dadd(-25.69, -146.32, -10.75, 1.7)
pt3dadd(-25.52, -146.27, -10.75, 1.7)
pt3dadd(-25.43, -146.22, -10.75, 1.7)
pt3dadd(-25.35, -146.17, -10.75, 1.7)
pt3dadd(-25.26, -146.12, -10.75, 1.7)
pt3dadd(-25.18, -146.02, -10.75, 1.7)
pt3dadd(-25.05, -145.93, -10.75, 1.7)
pt3dadd(-24.92, -145.88, -10.75, 1.7)
pt3dadd(-24.84, -145.83, -10.75, 1.7)
pt3dadd(-24.71, -145.74, -10.75, 1.7)
pt3dadd(-24.63, -145.69, -10.75, 1.7)
pt3dadd(-24.54, -145.64, -10.75, 1.7)
pt3dadd(-24.42, -145.59, -10.75, 1.7)
pt3dadd(-24.33, -145.54, -10.75, 1.7)
pt3dadd(-24.2, -145.45, -10.75, 1.7)
pt3dadd(-24.08, -145.35, -10.75, 1.7)
pt3dadd(-23.99, -145.26, -10.75, 1.7)
pt3dadd(-23.91, -145.21, -10.75, 1.7)
pt3dadd(-23.82, -145.16, -10.75, 1.7)
pt3dadd(-23.78, -145.11, -10.75, 1.7)
pt3dadd(-23.69, -145.06, -10.75, 1.7)
pt3dadd(-23.61, -144.96, -10.75, 1.7)
pt3dadd(-23.57, -144.92, -10.75, 1.7)
pt3dadd(-23.48, -144.82, -10.75, 1.7)
pt3dadd(-23.4, -144.77, -10.75, 1.7)
pt3dadd(-23.35, -144.63, -10.75, 1.7)
pt3dadd(-23.27, -144.58, -10.75, 1.7)
pt3dadd(-23.18, -144.48, -10.75, 1.7)
pt3dadd(-23.1, -144.43, -10.75, 1.7)
pt3dadd(-23.06, -144.34, -10.75, 1.7)
pt3dadd(-22.97, -144.24, -10.75, 1.7)
pt3dadd(-22.89, -144.1, -10.75, 1.7)
pt3dadd(-22.8, -144.05, -10.75, 1.7)
pt3dadd(-22.72, -143.95, -10.75, 1.7)
pt3dadd(-22.63, -143.85, -10.75, 1.7)
pt3dadd(-22.63, -143.76, -10.75, 1.7)
pt3dadd(-22.59, -143.71, -10.75, 1.7)
pt3dadd(-22.5, -143.66, -10.75, 1.7)
pt3dadd(-22.42, -143.57, -10.75, 1.7)
pt3dadd(-22.33, -143.52, -10.75, 1.7)
pt3dadd(-22.29, -143.38, -10.75, 1.7)
pt3dadd(-22.25, -143.32, -10.75, 1.7)
pt3dadd(-22.2, -143.23, -10.75, 1.7)
pt3dadd(-22.16, -143.13, -10.75, 1.7)
pt3dadd(-22.08, -143.04, -10.75, 1.7)
pt3dadd(-22, -142.94, -10.75, 1.7)
pt3dadd(-21.91, -142.84, -10.75, 1.7)
pt3dadd(-21.87, -142.75, -10.75, 1.7)
pt3dadd(-21.83, -142.65, -10.75, 1.7)
pt3dadd(-21.78, -142.6, -10.75, 1.7)
pt3dadd(-21.66, -142.46, -10.75, 1.7)
pt3dadd(-21.61, -142.36, -10.75, 1.7)
pt3dadd(-21.57, -142.31, -10.75, 1.7)
pt3dadd(-21.49, -142.22, -10.75, 1.7)
pt3dadd(-21.4, -142.17, -10.75, 1.7)
pt3dadd(-21.36, -142.07, -10.75, 1.7)
pt3dadd(-21.32, -141.98, -10.75, 1.7)
pt3dadd(-21.27, -141.88, -10.75, 1.7)
pt3dadd(-21.23, -141.83, -10.75, 1.7)
pt3dadd(-21.19, -141.74, -10.75, 1.7)
pt3dadd(-21.1, -141.68, -10.75, 1.7)
pt3dadd(-21.06, -141.59, -10.75, 1.7)
pt3dadd(-21.02, -141.54, -10.75, 1.7)
pt3dadd(-20.85, -141.35, -10.75, 1.7)
pt3dadd(-20.81, -141.25, -10.75, 1.7)
pt3dadd(-20.72, -141.2, -10.75, 1.7)
pt3dadd(-20.68, -141.11, -10.75, 1.7)
pt3dadd(-20.64, -141.06, -10.75, 1.7)
pt3dadd(-20.55, -140.96, -10.75, 1.7)
pt3dadd(-20.51, -140.87, -10.75, 1.7)
pt3dadd(-20.42, -140.77, -10.75, 1.7)
pt3dadd(-20.38, -140.67, -10.75, 1.7)
pt3dadd(-20.3, -140.58, -10.75, 1.7)
pt3dadd(-20.21, -140.53, -10.75, 1.7)
pt3dadd(-20.17, -140.43, -10.75, 1.7)
pt3dadd(-20.13, -140.38, -10.75, 1.7)
pt3dadd(-20.04, -140.34, -10.75, 1.7)
pt3dadd(-20, -140.29, -10.75, 1.7)
pt3dadd(-19.95, -140.24, -10.75, 1.7)
pt3dadd(-19.91, -140.1, -10.75, 1.7)
pt3dadd(-19.87, -140.04, -10.75, 1.7)
pt3dadd(-19.78, -140, -10.75, 1.7)
pt3dadd(-19.74, -139.95, -10.75, 1.7)
pt3dadd(-19.7, -139.8, -10.75, 1.7)
pt3dadd(-19.66, -139.76, -10.75, 1.7)
pt3dadd(-19.57, -139.66, -10.75, 1.7)
pt3dadd(-19.49, -139.61, -10.75, 1.7)
}
}
proc shape3d_10() {
dend[1] { pt3dadd(-19.45, -139.57, -10.75, 1.7)
pt3dadd(-19.36, -139.51, -10.75, 1.7)
pt3dadd(-19.32, -139.47, -10.75, 1.7)
pt3dadd(-19.24, -139.42, -10.75, 1.7)
pt3dadd(-19.19, -139.37, -10.75, 1.7)
pt3dadd(-19.15, -139.32, -10.75, 1.7)
pt3dadd(-19.15, -139.35, -10.75, 1.7)
pt3dadd(-19.11, -139.4, -10.75, 1.7)
pt3dadd(-19.07, -139.35, -10.75, 1.7)
pt3dadd(-18.98, -139.3, -10.75, 1.7)
pt3dadd(-18.85, -139.25, -10.75, 1.7)
pt3dadd(-18.77, -139.2, -10.75, 1.7)
pt3dadd(-18.68, -139.15, -10.75, 1.7)
pt3dadd(-18.6, -139.15, -10.75, 1.7)
pt3dadd(-18.51, -139.1, -10.75, 1.7)
pt3dadd(-18.43, -139.06, -10.75, 1.7)
pt3dadd(-18.39, -139.01, -10.75, 1.7)
pt3dadd(-18.34, -138.96, -10.75, 1.7)
pt3dadd(-18.26, -138.91, -10.75, 1.7)
pt3dadd(-18.17, -138.87, -10.75, 1.7)
pt3dadd(-18.09, -138.82, -10.75, 1.7)
pt3dadd(-18, -138.72, -10.75, 1.7)
pt3dadd(-17.92, -138.62, -10.75, 1.7)
pt3dadd(-17.83, -138.62, -10.75, 1.7)
pt3dadd(-17.79, -138.57, -10.75, 1.7)
pt3dadd(-17.7, -138.57, -10.75, 1.7)
pt3dadd(-17.62, -138.53, -10.75, 1.7)
pt3dadd(-17.58, -138.48, -10.75, 1.7)
pt3dadd(-17.45, -138.34, -10.75, 1.7)
pt3dadd(-17.36, -138.29, -10.75, 1.7)
pt3dadd(-17.32, -138.24, -10.75, 1.7)
pt3dadd(-17.24, -138.19, -10.75, 1.7)
pt3dadd(-17.15, -138.09, -10.75, 1.7)
pt3dadd(-17.11, -138.04, -10.75, 1.7)
pt3dadd(-17.02, -138.04, -10.75, 1.7)
pt3dadd(-16.98, -138, -10.75, 1.7)
pt3dadd(-16.94, -137.9, -10.75, 1.7)
pt3dadd(-16.77, -137.71, -10.75, 1.7)
pt3dadd(-16.73, -137.66, -10.75, 1.7)
pt3dadd(-16.69, -137.61, -10.75, 1.7)
pt3dadd(-16.65, -137.46, -10.75, 1.7)
pt3dadd(-16.6, -137.42, -10.75, 1.7)
pt3dadd(-16.43, -137.23, -10.75, 1.7)
pt3dadd(-16.39, -137.13, -10.75, 1.7)
pt3dadd(-16.35, -137.03, -10.75, 1.7)
pt3dadd(-16.31, -136.99, -10.75, 1.7)
pt3dadd(-16.26, -136.89, -10.75, 1.7)
pt3dadd(-16.18, -136.79, -10.75, 1.7)
pt3dadd(-16.14, -136.74, -10.75, 1.7)
pt3dadd(-16.09, -136.65, -10.75, 1.7)
pt3dadd(-16.01, -136.5, -10.75, 1.7)
pt3dadd(-15.97, -136.45, -10.75, 1.7)
pt3dadd(-15.88, -136.36, -10.75, 1.7)
pt3dadd(-15.75, -136.26, -10.75, 1.7)
pt3dadd(-15.71, -136.16, -10.75, 1.7)
pt3dadd(-15.67, -136.02, -10.75, 1.7)
pt3dadd(-15.58, -135.92, -10.75, 1.7)
pt3dadd(-15.5, -135.78, -10.75, 1.7)
pt3dadd(-15.45, -135.68, -10.75, 1.7)
pt3dadd(-15.41, -135.63, -10.75, 1.7)
pt3dadd(-15.37, -135.49, -10.75, 1.7)
pt3dadd(-15.28, -135.44, -10.75, 1.7)
pt3dadd(-15.28, -135.35, -10.75, 1.7)
pt3dadd(-15.2, -135.29, -10.75, 1.7)
pt3dadd(-15.16, -135.2, -10.75, 1.7)
pt3dadd(-15.11, -135.1, -10.75, 1.7)
pt3dadd(-15.03, -135.05, -10.75, 1.7)
pt3dadd(-14.94, -134.96, -10.75, 1.7)
pt3dadd(-14.9, -134.91, -10.75, 1.7)
pt3dadd(-14.86, -134.76, -10.75, 1.7)
pt3dadd(-14.82, -134.67, -10.75, 1.7)
pt3dadd(-14.73, -134.62, -10.75, 1.7)
pt3dadd(-14.69, -134.48, -10.75, 1.7)
pt3dadd(-14.65, -134.43, -10.75, 1.7)
pt3dadd(-14.6, -134.38, -10.75, 1.7)
pt3dadd(-14.52, -134.28, -10.75, 1.7)
pt3dadd(-14.48, -134.19, -10.75, 1.7)
pt3dadd(-14.39, -134.04, -10.75, 1.7)
pt3dadd(-14.31, -133.95, -10.75, 1.7)
pt3dadd(-14.27, -133.85, -10.75, 1.7)
pt3dadd(-14.23, -133.75, -10.75, 1.7)
pt3dadd(-14.18, -133.66, -10.75, 1.7)
pt3dadd(-14.01, -133.46, -10.75, 1.7)
pt3dadd(-13.97, -133.37, -10.75, 1.7)
pt3dadd(-13.93, -133.27, -10.75, 1.7)
pt3dadd(-13.89, -133.18, -10.75, 1.7)
pt3dadd(-13.84, -133.08, -10.75, 1.7)
pt3dadd(-13.8, -132.98, -10.75, 1.7)
pt3dadd(-13.72, -132.93, -10.75, 1.7)
pt3dadd(-13.67, -132.84, -10.75, 1.7)
pt3dadd(-13.63, -132.69, -10.75, 1.7)
pt3dadd(-13.55, -132.6, -10.75, 1.7)
pt3dadd(-13.46, -132.5, -10.75, 1.7)
pt3dadd(-13.42, -132.4, -10.75, 1.7)
pt3dadd(-13.38, -132.3, -10.75, 1.7)
pt3dadd(-13.29, -132.21, -10.75, 1.7)
pt3dadd(-13.2, -132.11, -10.75, 1.7)
pt3dadd(-13.16, -132.02, -10.75, 1.7)
pt3dadd(-13.12, -131.92, -10.75, 1.7)
pt3dadd(-13.08, -131.82, -10.75, 1.7)
pt3dadd(-13.03, -131.73, -10.75, 1.7)
pt3dadd(-12.95, -131.63, -10.75, 1.7)
pt3dadd(-12.91, -131.54, -10.75, 1.7)
pt3dadd(-12.86, -131.44, -10.75, 1.7)
pt3dadd(-12.82, -131.34, -10.75, 1.7)
pt3dadd(-12.74, -131.2, -10.75, 1.7)
pt3dadd(-12.69, -131.1, -10.75, 1.7)
pt3dadd(-12.61, -130.96, -10.75, 1.7)
pt3dadd(-12.57, -130.86, -10.75, 1.7)
pt3dadd(-12.52, -130.71, -10.75, 1.7)
pt3dadd(-12.48, -130.62, -10.75, 1.7)
pt3dadd(-12.4, -130.52, -10.75, 1.7)
pt3dadd(-12.4, -130.38, -10.75, 1.7)
pt3dadd(-12.31, -130.28, -10.75, 1.7)
pt3dadd(-12.27, -130.13, -10.75, 1.7)
pt3dadd(-12.19, -129.99, -10.75, 1.7)
pt3dadd(-12.19, -129.9, -10.75, 1.7)
pt3dadd(-12.1, -129.8, -10.75, 1.7)
pt3dadd(-12.06, -129.7, -10.75, 1.7)
pt3dadd(-12.02, -129.56, -10.75, 1.7)
pt3dadd(-11.97, -129.46, -10.75, 1.7)
pt3dadd(-11.89, -129.41, -10.75, 1.7)
pt3dadd(-11.85, -129.32, -10.75, 1.7)
pt3dadd(-11.8, -129.22, -10.75, 1.7)
pt3dadd(-11.76, -129.17, -10.75, 1.7)
pt3dadd(-11.72, -129.07, -10.75, 1.7)
pt3dadd(-11.68, -129.03, -10.75, 1.7)
pt3dadd(-11.64, -128.93, -10.75, 1.7)
pt3dadd(-11.59, -128.84, -10.75, 1.7)
pt3dadd(-11.55, -128.74, -10.75, 1.7)
pt3dadd(-11.47, -128.59, -10.75, 1.7)
pt3dadd(-11.42, -128.5, -10.75, 1.7)
pt3dadd(-11.34, -128.4, -10.75, 1.7)
pt3dadd(-11.3, -128.3, -10.75, 1.7)
pt3dadd(-11.25, -128.21, -10.75, 1.7)
pt3dadd(-11.25, -128.11, -10.75, 1.7)
pt3dadd(-11.21, -128.06, -10.75, 1.7)
pt3dadd(-11.17, -127.96, -10.75, 1.7)
pt3dadd(-11.13, -127.92, -10.75, 1.7)
pt3dadd(-11.08, -127.87, -10.75, 1.7)
pt3dadd(-11.04, -127.77, -10.75, 1.7)
pt3dadd(-11, -127.68, -10.75, 1.7)
pt3dadd(-10.95, -127.58, -10.75, 1.7)
pt3dadd(-10.91, -127.48, -10.75, 1.7)
pt3dadd(-10.87, -127.43, -10.75, 1.7)
pt3dadd(-10.83, -127.39, -10.75, 1.7)
pt3dadd(-10.78, -127.34, -10.75, 1.7)
pt3dadd(-10.74, -127.29, -10.75, 1.7)
pt3dadd(-10.7, -127.24, -10.75, 1.7)
pt3dadd(-10.7, -127.14, -10.75, 1.7)
pt3dadd(-10.66, -127.1, -10.75, 1.7)
pt3dadd(-10.61, -127, -10.75, 1.7)
pt3dadd(-10.57, -126.95, -10.75, 1.7)
pt3dadd(-10.53, -126.9, -10.75, 1.7)
pt3dadd(-10.53, -126.81, -10.75, 1.7)
pt3dadd(-10.49, -126.83, -9.75, 1.7)
pt3dadd(-10.44, -126.74, -9.75, 1.7)
pt3dadd(-10.4, -126.69, -9.75, 1.7)
pt3dadd(-10.36, -126.59, -9.75, 1.7)
pt3dadd(-10.27, -126.45, -9.75, 1.7)
pt3dadd(-10.23, -126.35, -9.75, 1.7)
pt3dadd(-10.19, -126.25, -9.75, 1.7)
pt3dadd(-10.15, -126.16, -9.75, 1.7)
pt3dadd(-10.1, -126.11, -9.75, 1.7)
pt3dadd(-10.06, -126.06, -9.75, 1.7)
pt3dadd(-10.02, -126.01, -9.75, 1.7)
pt3dadd(-9.94, -125.96, -9.75, 1.7)
pt3dadd(-9.89, -125.92, -9.75, 1.7)
pt3dadd(-9.85, -125.87, -9.75, 1.7)
pt3dadd(-9.81, -125.77, -9.75, 1.7)
pt3dadd(-9.77, -125.68, -9.75, 1.7)
pt3dadd(-9.68, -125.58, -9.75, 1.7)
pt3dadd(-9.64, -125.53, -9.75, 1.7)
pt3dadd(-9.6, -125.43, -9.75, 1.7)
pt3dadd(-9.55, -125.39, -9.75, 1.7)
pt3dadd(-9.51, -125.29, -9.75, 1.7)
pt3dadd(-9.43, -125.19, -9.75, 1.7)
pt3dadd(-9.38, -125.1, -9.75, 1.7)
pt3dadd(-9.34, -125.05, -9.75, 1.7)
pt3dadd(-9.3, -124.9, -9.75, 1.7)
pt3dadd(-9.26, -124.86, -9.75, 1.7)
pt3dadd(-9.17, -124.71, -9.75, 1.7)
pt3dadd(-9.17, -124.61, -9.75, 1.7)
pt3dadd(-9.09, -124.52, -9.75, 1.7)
pt3dadd(-9.05, -124.42, -9.75, 1.7)
pt3dadd(-9, -124.37, -9.75, 1.7)
pt3dadd(-9, -124.18, -9.75, 1.7)
pt3dadd(-8.96, -124.13, -9.75, 1.7)
pt3dadd(-8.92, -124.08, -9.75, 1.7)
pt3dadd(-8.92, -123.99, -9.75, 1.7)
pt3dadd(-8.88, -123.89, -9.75, 1.7)
pt3dadd(-8.83, -123.79, -9.75, 1.7)
pt3dadd(-8.83, -123.65, -9.75, 1.7)
pt3dadd(-8.79, -123.55, -9.75, 1.7)
pt3dadd(-8.75, -123.46, -9.75, 1.7)
pt3dadd(-8.75, -123.36, -9.75, 1.7)
pt3dadd(-8.7, -123.31, -9.75, 1.7)
pt3dadd(-8.66, -123.21, -9.75, 1.7)
pt3dadd(-8.62, -123.17, -9.75, 1.7)
pt3dadd(-8.62, -123.07, -9.75, 1.7)
}
}
proc shape3d_11() {
dend[1] { pt3dadd(-8.58, -123.02, -9.75, 1.7)
pt3dadd(-8.58, -122.93, -9.75, 1.7)
pt3dadd(-8.58, -122.95, -8.75, 1.7)
pt3dadd(-8.62, -122.86, -8.75, 1.7)
pt3dadd(-8.62, -122.66, -8.75, 1.7)
pt3dadd(-8.66, -122.52, -8.75, 1.7)
pt3dadd(-8.66, -122.37, -8.75, 1.7)
pt3dadd(-8.7, -122.32, -8.75, 1.7)
pt3dadd(-8.7, -121.55, -8.75, 1.7)
pt3dadd(-8.66, -121.5, -8.75, 1.7)
pt3dadd(-8.66, -121.26, -8.75, 1.7)
pt3dadd(-8.62, -121.17, -8.75, 1.7)
pt3dadd(-8.62, -117.5, -8.75, 1.7)
pt3dadd(-8.58, -117.4, -8.75, 1.7)
pt3dadd(-8.58, -117.31, -8.75, 1.7)
pt3dadd(-8.53, -117.16, -8.75, 1.7)
pt3dadd(-8.53, -116.97, -8.75, 1.7)
pt3dadd(-8.49, -116.92, -8.75, 1.7)
pt3dadd(-8.58, -117.04, -4.75, 1.7)
pt3dadd(-8.53, -117, -4.75, 1.7)
pt3dadd(-8.49, -116.9, -4.75, 1.7)
pt3dadd(-8.45, -116.8, -4.75, 1.7)
pt3dadd(-8.41, -116.71, -4.75, 1.7)
pt3dadd(-8.32, -116.61, -4.75, 1.7)
pt3dadd(-8.24, -116.51, -4.75, 1.7)
pt3dadd(-8.19, -116.37, -4.75, 1.7)
pt3dadd(-8.11, -116.27, -4.75, 1.7)
pt3dadd(-8.11, -116.13, -4.75, 1.7)
pt3dadd(-8.02, -115.98, -4.75, 1.7)
pt3dadd(-7.98, -115.89, -4.75, 1.7)
pt3dadd(-7.94, -115.74, -4.75, 1.7)
pt3dadd(-7.9, -115.64, -4.75, 1.7)
pt3dadd(-7.86, -115.55, -4.75, 1.7)
pt3dadd(-7.81, -115.45, -4.75, 1.7)
pt3dadd(-7.77, -115.36, -4.75, 1.7)
pt3dadd(-7.73, -115.26, -4.75, 1.7)
pt3dadd(-7.73, -115.16, -4.75, 1.7)
pt3dadd(-7.68, -115.02, -4.75, 1.7)
pt3dadd(-7.64, -114.92, -4.75, 1.7)
pt3dadd(-7.56, -114.82, -4.75, 1.7)
pt3dadd(-7.51, -114.73, -4.75, 1.7)
pt3dadd(-7.47, -114.63, -4.75, 1.7)
pt3dadd(-7.43, -114.54, -4.75, 1.7)
pt3dadd(-7.39, -114.49, -4.75, 1.7)
pt3dadd(-7.34, -114.34, -4.75, 1.7)
pt3dadd(-7.26, -114.29, -4.75, 1.7)
pt3dadd(-7.22, -114.2, -4.75, 1.7)
pt3dadd(-7.18, -114.1, -4.75, 1.7)
pt3dadd(-7.13, -114, -4.75, 1.7)
pt3dadd(-7.09, -113.91, -4.75, 1.7)
pt3dadd(-7.05, -113.86, -4.75, 1.7)
pt3dadd(-7.01, -113.76, -4.75, 1.7)
pt3dadd(-6.92, -113.62, -4.75, 1.7)
pt3dadd(-6.88, -113.52, -4.75, 1.7)
pt3dadd(-6.79, -113.38, -4.75, 1.7)
pt3dadd(-6.66, -113.14, -4.75, 1.7)
pt3dadd(-6.62, -113.04, -4.75, 1.7)
pt3dadd(-6.54, -112.94, -4.75, 1.7)
pt3dadd(-6.49, -112.85, -4.75, 1.7)
pt3dadd(-6.45, -112.7, -4.75, 1.7)
pt3dadd(-6.41, -112.61, -4.75, 1.7)
pt3dadd(-6.37, -112.46, -4.75, 1.7)
pt3dadd(-6.33, -112.32, -4.75, 1.7)
pt3dadd(-6.24, -112.22, -4.75, 1.7)
pt3dadd(-6.24, -112.13, -4.75, 1.7)
pt3dadd(-6.16, -112.03, -4.75, 1.7)
pt3dadd(-6.11, -111.93, -4.75, 1.7)
pt3dadd(-6.07, -111.79, -4.75, 1.7)
pt3dadd(-6.03, -111.69, -4.75, 1.7)
pt3dadd(-5.95, -111.59, -4.75, 1.7)
pt3dadd(-5.95, -111.5, -4.75, 1.7)
pt3dadd(-5.86, -111.45, -4.75, 1.7)
pt3dadd(-5.82, -111.35, -4.75, 1.7)
pt3dadd(-5.78, -111.25, -4.75, 1.7)
pt3dadd(-5.65, -111.11, -4.75, 1.7)
pt3dadd(-5.61, -111.06, -4.75, 1.7)
pt3dadd(-5.56, -111.01, -4.75, 1.7)
pt3dadd(-5.52, -110.92, -4.75, 1.7)
pt3dadd(-5.48, -110.82, -4.75, 1.7)
pt3dadd(-5.43, -110.72, -4.75, 1.7)
pt3dadd(-5.35, -110.58, -4.75, 1.7)
pt3dadd(-5.31, -110.53, -4.75, 1.7)
pt3dadd(-5.26, -110.43, -4.75, 1.7)
pt3dadd(-5.22, -110.39, -4.75, 1.7)
pt3dadd(-5.18, -110.34, -4.75, 1.7)
pt3dadd(-5.14, -110.29, -4.75, 1.7)
pt3dadd(-5.14, -110.19, -4.75, 1.7)
pt3dadd(-5.09, -110.15, -4.75, 1.7)
pt3dadd(-5.05, -110.1, -4.75, 1.7)
pt3dadd(-5.01, -110, -4.75, 1.7)
pt3dadd(-4.97, -109.95, -4.75, 1.7)
pt3dadd(-4.97, -109.86, -4.75, 1.7)
pt3dadd(-4.93, -109.81, -4.75, 1.7)
pt3dadd(-4.88, -109.76, -4.75, 1.7)
pt3dadd(-4.88, -109.61, -4.75, 1.7)
pt3dadd(-4.84, -109.57, -4.75, 1.7)
pt3dadd(-4.8, -109.52, -4.75, 1.7)
pt3dadd(-4.8, -109.38, -4.75, 1.7)
pt3dadd(-4.76, -109.33, -4.75, 1.7)
pt3dadd(-4.76, -109.04, -4.75, 1.7)
pt3dadd(-4.76, -108.77, -3.75, 1.7)
pt3dadd(-4.8, -108.87, -3.75, 1.7)
pt3dadd(-4.8, -108.96, -3.75, 1.7)
pt3dadd(-4.76, -108.92, -3.75, 1.7)
pt3dadd(-4.71, -108.82, -3.75, 1.7)
pt3dadd(-4.71, -108.72, -3.75, 1.7)
pt3dadd(-4.67, -108.68, -3.75, 1.7)
pt3dadd(-4.5, -108.48, -3.75, 1.7)
pt3dadd(-4.5, -108.39, -3.75, 1.7)
pt3dadd(-4.41, -108.34, -3.75, 1.7)
pt3dadd(-4.37, -108.24, -3.75, 1.7)
pt3dadd(-4.33, -108.14, -3.75, 1.7)
pt3dadd(-4.29, -108.05, -3.75, 1.7)
pt3dadd(-4.2, -107.9, -3.75, 1.7)
pt3dadd(-4.16, -107.81, -3.75, 1.7)
pt3dadd(-3.99, -107.61, -3.75, 1.7)
pt3dadd(-3.95, -107.52, -3.75, 1.7)
pt3dadd(-3.9, -107.42, -3.75, 1.7)
pt3dadd(-3.87, -107.32, -3.75, 1.7)
pt3dadd(-3.78, -107.23, -3.75, 1.7)
pt3dadd(-3.74, -107.13, -3.75, 1.7)
pt3dadd(-3.61, -107.04, -3.75, 1.7)
pt3dadd(-3.57, -106.89, -3.75, 1.7)
pt3dadd(-3.48, -106.75, -3.75, 1.7)
pt3dadd(-3.4, -106.65, -3.75, 1.7)
pt3dadd(-3.31, -106.55, -3.75, 1.7)
pt3dadd(-3.31, -106.46, -3.75, 1.7)
pt3dadd(-3.23, -106.36, -3.75, 1.7)
pt3dadd(-3.18, -106.26, -3.75, 1.7)
pt3dadd(-3.14, -106.12, -3.75, 1.7)
pt3dadd(-3.06, -106.02, -3.75, 1.7)
pt3dadd(-3.02, -105.93, -3.75, 1.7)
pt3dadd(-2.93, -105.83, -3.75, 1.7)
pt3dadd(-2.89, -105.74, -3.75, 1.7)
pt3dadd(-2.85, -105.64, -3.75, 1.7)
pt3dadd(-2.8, -105.54, -3.75, 1.7)
pt3dadd(-2.72, -105.49, -3.75, 1.7)
pt3dadd(-2.67, -105.4, -3.75, 1.7)
pt3dadd(-2.63, -105.3, -3.75, 1.7)
pt3dadd(-2.59, -105.2, -3.75, 1.7)
pt3dadd(-2.51, -105.11, -3.75, 1.7)
pt3dadd(-2.46, -104.96, -3.75, 1.7)
pt3dadd(-2.34, -104.72, -3.75, 1.7)
pt3dadd(-2.29, -104.63, -3.75, 1.7)
pt3dadd(-2.25, -104.53, -3.75, 1.7)
pt3dadd(-2.12, -104.38, -3.75, 1.7)
pt3dadd(-2.12, -104.29, -3.75, 1.7)
pt3dadd(-2.04, -104.19, -3.75, 1.7)
pt3dadd(-2.04, -104.1, -3.75, 1.7)
pt3dadd(-1.95, -104, -3.75, 1.7)
pt3dadd(-1.91, -103.9, -3.75, 1.7)
pt3dadd(-1.87, -103.81, -3.75, 1.7)
pt3dadd(-1.83, -103.76, -3.75, 1.7)
pt3dadd(-1.78, -103.61, -3.75, 1.7)
pt3dadd(-1.7, -103.47, -3.75, 1.7)
pt3dadd(-1.65, -103.37, -3.75, 1.7)
pt3dadd(-1.61, -103.28, -3.75, 1.7)
pt3dadd(-1.57, -103.22, -3.75, 1.7)
pt3dadd(-1.53, -103.13, -3.75, 1.7)
pt3dadd(-1.44, -102.99, -3.75, 1.7)
pt3dadd(-1.4, -102.84, -3.75, 1.7)
pt3dadd(-1.36, -102.75, -3.75, 1.7)
pt3dadd(-1.23, -102.6, -3.75, 1.7)
pt3dadd(-1.19, -102.46, -3.75, 1.7)
pt3dadd(-1.15, -102.36, -3.75, 1.7)
pt3dadd(-1.06, -102.21, -3.75, 1.7)
pt3dadd(-1.02, -102.12, -3.75, 1.7)
pt3dadd(-0.98, -102.02, -3.75, 1.7)
pt3dadd(-0.89, -101.97, -3.75, 1.7)
pt3dadd(-0.85, -101.93, -3.75, 1.7)
pt3dadd(-0.76, -101.73, -3.75, 1.7)
pt3dadd(-0.72, -101.64, -3.75, 1.7)
pt3dadd(-0.64, -101.59, -3.75, 1.7)
pt3dadd(-0.6, -101.49, -3.75, 1.7)
pt3dadd(-0.51, -101.35, -3.75, 1.7)
pt3dadd(-0.47, -101.25, -3.75, 1.7)
pt3dadd(-0.38, -101.15, -3.75, 1.7)
pt3dadd(-0.34, -101.06, -3.75, 1.7)
pt3dadd(-0.25, -100.96, -3.75, 1.7)
pt3dadd(-0.21, -100.86, -3.75, 1.7)
pt3dadd(-0.09, -100.67, -3.75, 1.7)
pt3dadd(0, -100.53, -3.75, 1.7)
pt3dadd(0.09, -100.38, -3.75, 1.7)
pt3dadd(0.17, -100.33, -3.75, 1.7)
pt3dadd(0.17, -100.24, -3.75, 1.7)
pt3dadd(0.25, -100.19, -3.75, 1.7)
pt3dadd(0.3, -100.09, -3.75, 1.7)
pt3dadd(0.34, -100, -3.75, 1.7)
pt3dadd(0.38, -99.85, -3.75, 1.7)
pt3dadd(0.47, -99.71, -3.75, 1.7)
pt3dadd(0.51, -99.61, -3.75, 1.7)
pt3dadd(0.55, -99.51, -3.75, 1.7)
pt3dadd(0.6, -99.46, -3.75, 1.7)
pt3dadd(0.64, -99.42, -3.75, 1.7)
pt3dadd(0.72, -99.32, -3.75, 1.7)
pt3dadd(0.76, -99.22, -3.75, 1.7)
pt3dadd(0.81, -99.18, -3.75, 1.7)
pt3dadd(0.81, -99.08, -3.75, 1.7)
pt3dadd(0.85, -98.98, -3.75, 1.7)
pt3dadd(0.89, -98.93, -3.75, 1.7)
}
}
proc shape3d_12() {
dend[1] { pt3dadd(0.94, -98.84, -3.75, 1.7)
pt3dadd(0.98, -98.79, -3.75, 1.7)
pt3dadd(1.02, -98.74, -3.75, 1.7)
pt3dadd(1.02, -98.64, -3.75, 1.7)
pt3dadd(1.06, -98.55, -3.75, 1.7)
pt3dadd(1.11, -98.45, -3.75, 1.7)
pt3dadd(1.11, -98.31, -3.75, 1.7)
pt3dadd(1.15, -98.26, -3.75, 1.7)
pt3dadd(1.19, -98.09, -3.75, 1.7)
pt3dadd(1.06, -97.97, -5.75, 1.7)
pt3dadd(1.02, -98.07, -5.75, 1.7)
pt3dadd(1.02, -98.4, -5.75, 1.7)
pt3dadd(1.06, -98.36, -5.75, 1.7)
pt3dadd(1.11, -98.31, -5.75, 1.7)
pt3dadd(1.19, -98.21, -5.75, 1.7)
pt3dadd(1.23, -98.11, -5.75, 1.7)
pt3dadd(1.27, -98.07, -5.75, 1.7)
pt3dadd(1.36, -97.92, -5.75, 1.7)
pt3dadd(1.4, -97.82, -5.75, 1.7)
pt3dadd(1.44, -97.73, -5.75, 1.7)
pt3dadd(1.53, -97.63, -5.75, 1.7)
pt3dadd(1.61, -97.54, -5.75, 1.7)
pt3dadd(1.65, -97.44, -5.75, 1.7)
pt3dadd(1.7, -97.34, -5.75, 1.7)
pt3dadd(1.74, -97.29, -5.75, 1.7)
pt3dadd(1.83, -97.2, -5.75, 1.7)
pt3dadd(1.91, -97.1, -5.75, 1.7)
pt3dadd(1.91, -97, -5.75, 1.7)
pt3dadd(2, -96.91, -5.75, 1.7)
pt3dadd(2.04, -96.81, -5.75, 1.7)
pt3dadd(2.08, -96.71, -5.75, 1.7)
pt3dadd(2.16, -96.67, -5.75, 1.7)
pt3dadd(2.16, -96.52, -5.75, 1.7)
pt3dadd(2.25, -96.47, -5.75, 1.7)
pt3dadd(2.29, -96.33, -5.75, 1.7)
pt3dadd(2.34, -96.23, -5.75, 1.7)
pt3dadd(2.42, -96.14, -5.75, 1.7)
pt3dadd(2.51, -95.99, -5.75, 1.7)
pt3dadd(2.59, -95.85, -5.75, 1.7)
pt3dadd(2.63, -95.75, -5.75, 1.7)
pt3dadd(2.67, -95.61, -5.75, 1.7)
pt3dadd(2.76, -95.56, -5.75, 1.7)
pt3dadd(2.8, -95.51, -5.75, 1.7)
pt3dadd(2.89, -95.36, -5.75, 1.7)
pt3dadd(2.93, -95.27, -5.75, 1.7)
pt3dadd(3.02, -95.17, -5.75, 1.7)
pt3dadd(3.06, -95.13, -5.75, 1.7)
pt3dadd(3.14, -95.03, -5.75, 1.7)
pt3dadd(3.18, -94.93, -5.75, 1.7)
pt3dadd(3.23, -94.88, -5.75, 1.7)
pt3dadd(3.31, -94.79, -5.75, 1.7)
pt3dadd(3.4, -94.69, -5.75, 1.7)
pt3dadd(3.44, -94.6, -5.75, 1.7)
pt3dadd(3.48, -94.45, -5.75, 1.7)
pt3dadd(3.53, -94.35, -5.75, 1.7)
pt3dadd(3.57, -94.26, -5.75, 1.7)
pt3dadd(3.65, -94.11, -5.75, 1.7)
pt3dadd(3.74, -93.97, -5.75, 1.7)
pt3dadd(3.78, -93.87, -5.75, 1.7)
pt3dadd(3.82, -93.78, -5.75, 1.7)
pt3dadd(3.91, -93.68, -5.75, 1.7)
pt3dadd(3.95, -93.63, -5.75, 1.7)
pt3dadd(3.99, -93.53, -5.75, 1.7)
pt3dadd(4.03, -93.44, -5.75, 1.7)
pt3dadd(4.12, -93.34, -5.75, 1.7)
pt3dadd(4.16, -93.29, -5.75, 1.7)
pt3dadd(4.2, -93.15, -5.75, 1.7)
pt3dadd(4.29, -93.05, -5.75, 1.7)
pt3dadd(4.33, -93, -5.75, 1.7)
pt3dadd(4.41, -92.86, -5.75, 1.7)
pt3dadd(4.46, -92.81, -5.75, 1.7)
pt3dadd(4.5, -92.76, -5.75, 1.7)
pt3dadd(4.54, -92.71, -5.75, 1.7)
pt3dadd(4.59, -92.67, -5.75, 1.7)
pt3dadd(4.63, -92.52, -5.75, 1.7)
pt3dadd(4.67, -92.47, -5.75, 1.7)
pt3dadd(4.71, -92.42, -5.75, 1.7)
pt3dadd(4.8, -92.38, -5.75, 1.7)
pt3dadd(4.84, -92.23, -5.75, 1.7)
pt3dadd(4.88, -92.18, -5.75, 1.7)
pt3dadd(4.93, -92.08, -5.75, 1.7)
pt3dadd(4.97, -92.04, -5.75, 1.7)
pt3dadd(4.97, -91.94, -5.75, 1.7)
pt3dadd(5.01, -91.85, -5.75, 1.7)
pt3dadd(5.05, -91.8, -5.75, 1.7)
pt3dadd(5.05, -91.61, -5.75, 1.7)
pt3dadd(5.39, -91.51, -5.75, 1.7)
pt3dadd(5.24, -90.54, -5.75, 1.7)
pt3dadd(5.59, -90.87, -5.75, 1.7)
pt3dadd(5.14, -89.96, -5.75, 1.7)
pt3dadd(5.78, -90.34, -5.75, 1.7)
pt3dadd(5.82, -90.25, -5.75, 1.7)
pt3dadd(5.31, -89.72, -5.75, 1.7)
pt3dadd(5.31, -89.63, -5.75, 1.7)
pt3dadd(5.8, -90.29, -5.75, 1.7)
pt3dadd(5.84, -90.24, -5.75, 1.7)
pt3dadd(5.43, -89.48, -5.75, 1.7)
pt3dadd(5.48, -89.43, -5.75, 1.7)
pt3dadd(5.82, -90.57, -5.75, 1.7)
pt3dadd(5.26, -89.81, -5.75, 1.7)
pt3dadd(5.95, -89.24, -5.75, 1.7)
pt3dadd(5.69, -89.67, -5.75, 1.7)
pt3dadd(5.9, -89.19, -5.75, 1.7)
pt3dadd(5.95, -89.14, -5.75, 1.7)
pt3dadd(6.03, -89.14, -5.75, 1.7)
pt3dadd(6.07, -89.1, -5.75, 1.7)
pt3dadd(6.16, -89.1, -5.75, 1.7)
pt3dadd(6.24, -89.05, -5.75, 1.7)
pt3dadd(6.28, -89, -5.75, 1.7)
pt3dadd(6.41, -89, -5.75, 1.7)
pt3dadd(6.5, -88.95, -5.75, 1.7)
pt3dadd(6.58, -88.9, -5.75, 1.7)
pt3dadd(6.66, -88.9, -5.75, 1.7)
pt3dadd(6.71, -88.86, -5.75, 1.7)
pt3dadd(6.79, -88.76, -5.75, 1.7)
pt3dadd(6.88, -88.71, -5.75, 1.7)
pt3dadd(6.96, -88.66, -5.75, 1.7)
pt3dadd(7.09, -88.66, -5.75, 1.7)
pt3dadd(7.13, -88.61, -5.75, 1.7)
pt3dadd(7.22, -88.57, -5.75, 1.7)
pt3dadd(7.34, -88.52, -5.75, 1.7)
pt3dadd(7.43, -88.47, -5.75, 1.7)
pt3dadd(7.47, -88.42, -5.75, 1.7)
pt3dadd(7.56, -88.42, -5.75, 1.7)
pt3dadd(7.64, -88.37, -5.75, 1.7)
pt3dadd(7.73, -88.32, -5.75, 1.7)
pt3dadd(7.81, -88.28, -5.75, 1.7)
pt3dadd(7.94, -88.23, -5.75, 1.7)
pt3dadd(8.02, -88.18, -5.75, 1.7)
pt3dadd(8.07, -88.13, -5.75, 1.7)
pt3dadd(8.11, -88.08, -5.75, 1.7)
pt3dadd(8.24, -88.08, -5.75, 1.7)
pt3dadd(8.32, -88.04, -5.75, 1.7)
pt3dadd(8.41, -87.99, -5.75, 1.7)
pt3dadd(8.49, -87.94, -5.75, 1.7)
pt3dadd(8.58, -87.84, -5.75, 1.7)
pt3dadd(8.62, -87.79, -5.75, 1.7)
pt3dadd(8.7, -87.75, -5.75, 1.7)
pt3dadd(8.79, -87.75, -5.75, 1.7)
pt3dadd(8.83, -87.65, -5.75, 1.7)
pt3dadd(8.92, -87.6, -5.75, 1.7)
pt3dadd(8.96, -87.55, -5.75, 1.7)
pt3dadd(9, -87.5, -5.75, 1.7)
pt3dadd(9.05, -87.46, -5.75, 1.7)
pt3dadd(9.13, -87.41, -5.75, 1.7)
pt3dadd(9.17, -87.36, -5.75, 1.7)
pt3dadd(9.21, -87.31, -5.75, 1.7)
pt3dadd(9.3, -87.26, -5.75, 1.7)
pt3dadd(9.34, -87.17, -5.75, 1.7)
pt3dadd(9.38, -87.12, -5.75, 1.7)
pt3dadd(9.47, -87.07, -5.75, 1.7)
pt3dadd(9.51, -86.97, -5.75, 1.7)
pt3dadd(9.55, -86.93, -5.75, 1.7)
pt3dadd(9.64, -86.88, -5.75, 1.7)
pt3dadd(9.72, -86.83, -5.75, 1.7)
pt3dadd(9.77, -86.78, -5.75, 1.7)
pt3dadd(9.81, -86.73, -5.75, 1.7)
pt3dadd(9.85, -86.68, -5.75, 1.7)
pt3dadd(9.94, -86.64, -5.75, 1.7)
pt3dadd(10.02, -86.59, -5.75, 1.7)
pt3dadd(10.06, -86.54, -5.75, 1.7)
pt3dadd(10.1, -86.49, -5.75, 1.7)
pt3dadd(10.15, -86.44, -5.75, 1.7)
pt3dadd(10.19, -86.39, -5.75, 1.7)
pt3dadd(10.23, -86.35, -5.75, 1.7)
pt3dadd(10.27, -86.3, -5.75, 1.7)
pt3dadd(10.32, -86.25, -5.75, 1.7)
pt3dadd(10.36, -86.2, -5.75, 1.7)
pt3dadd(10.4, -86.15, -5.75, 1.7)
pt3dadd(10.44, -86.11, -5.75, 1.7)
pt3dadd(10.49, -86.06, -5.75, 1.7)
pt3dadd(10.53, -86.01, -5.75, 1.7)
pt3dadd(10.57, -85.96, -5.75, 1.7)
pt3dadd(10.61, -85.91, -5.75, 1.7)
pt3dadd(10.7, -85.86, -5.75, 1.7)
pt3dadd(10.7, -85.77, -5.75, 1.7)
pt3dadd(10.7, -85.79, -8.75, 1.7)
pt3dadd(10.74, -85.75, -8.75, 1.7)
pt3dadd(10.78, -85.7, -8.75, 1.7)
pt3dadd(10.87, -85.55, -8.75, 1.7)
pt3dadd(10.91, -85.5, -8.75, 1.7)
pt3dadd(10.95, -85.46, -8.75, 1.7)
pt3dadd(11.04, -85.36, -8.75, 1.7)
pt3dadd(11.08, -85.31, -8.75, 1.7)
pt3dadd(11.17, -85.21, -8.75, 1.7)
pt3dadd(11.25, -85.17, -8.75, 1.7)
pt3dadd(11.3, -85.12, -8.75, 1.7)
pt3dadd(11.42, -84.97, -8.75, 1.7)
pt3dadd(11.47, -84.83, -8.75, 1.7)
pt3dadd(11.59, -84.73, -8.75, 1.7)
pt3dadd(11.64, -84.64, -8.75, 1.7)
pt3dadd(11.68, -84.54, -8.75, 1.7)
pt3dadd(11.72, -84.49, -8.75, 1.7)
pt3dadd(11.76, -84.39, -8.75, 1.7)
pt3dadd(11.8, -84.35, -8.75, 1.7)
pt3dadd(11.85, -84.25, -8.75, 1.7)
pt3dadd(11.89, -84.2, -8.75, 1.7)
pt3dadd(11.93, -84.15, -8.75, 1.7)
pt3dadd(11.97, -84.06, -8.75, 1.7)
pt3dadd(12.02, -84.01, -8.75, 1.7)
}
}
proc shape3d_13() {
dend[1] { pt3dadd(12.1, -83.86, -8.75, 1.7)
pt3dadd(12.14, -83.77, -8.75, 1.7)
pt3dadd(12.23, -83.72, -8.75, 1.7)
pt3dadd(12.27, -83.62, -8.75, 1.7)
pt3dadd(12.31, -83.53, -8.75, 1.7)
pt3dadd(12.35, -83.48, -8.75, 1.7)
pt3dadd(12.44, -83.38, -8.75, 1.7)
pt3dadd(12.48, -83.29, -8.75, 1.7)
pt3dadd(12.57, -83.24, -8.75, 1.7)
pt3dadd(12.61, -83.14, -8.75, 1.7)
pt3dadd(12.69, -83.04, -8.75, 1.7)
pt3dadd(12.74, -82.95, -8.75, 1.7)
pt3dadd(12.78, -82.85, -8.75, 1.7)
pt3dadd(12.86, -82.75, -8.75, 1.7)
pt3dadd(12.91, -82.66, -8.75, 1.7)
pt3dadd(12.99, -82.56, -8.75, 1.7)
pt3dadd(13.08, -82.42, -8.75, 1.7)
pt3dadd(13.12, -82.32, -8.75, 1.7)
pt3dadd(13.16, -82.22, -8.75, 1.7)
pt3dadd(13.25, -82.13, -8.75, 1.7)
pt3dadd(13.29, -82.08, -8.75, 1.7)
pt3dadd(13.2, -82.15, -8.75, 1.7)
pt3dadd(13.25, -82.15, -8.75, 1.7)
pt3dadd(13.29, -82.06, -8.75, 1.7)
pt3dadd(13.33, -82.01, -8.75, 1.7)
pt3dadd(13.38, -81.96, -8.75, 1.7)
pt3dadd(13.42, -81.91, -8.75, 1.7)
pt3dadd(13.46, -81.86, -8.75, 1.7)
pt3dadd(13.5, -81.82, -8.75, 1.7)
pt3dadd(13.59, -81.76, -8.75, 1.7)
pt3dadd(13.63, -81.72, -8.75, 1.7)
pt3dadd(13.67, -81.57, -8.75, 1.7)
pt3dadd(13.72, -81.48, -8.75, 1.7)
pt3dadd(13.8, -81.43, -8.75, 1.7)
pt3dadd(13.8, -81.28, -8.75, 1.7)
pt3dadd(13.89, -81.19, -8.75, 1.7)
pt3dadd(13.93, -81.09, -8.75, 1.7)
pt3dadd(14.01, -80.94, -8.75, 1.7)
pt3dadd(14.06, -80.85, -8.75, 1.7)
pt3dadd(14.1, -80.71, -8.75, 1.7)
pt3dadd(14.14, -80.56, -8.75, 1.7)
pt3dadd(14.23, -80.51, -8.75, 1.7)
pt3dadd(14.23, -80.37, -8.75, 1.7)
pt3dadd(14.31, -80.32, -8.75, 1.7)
pt3dadd(14.31, -80.22, -8.75, 1.7)
pt3dadd(14.35, -80.18, -8.75, 1.7)
pt3dadd(14.44, -80.08, -8.75, 1.7)
pt3dadd(14.44, -79.98, -8.75, 1.7)
pt3dadd(14.48, -79.89, -8.75, 1.7)
pt3dadd(14.56, -79.79, -8.75, 1.7)
pt3dadd(14.56, -79.69, -8.75, 1.7)
pt3dadd(14.6, -79.55, -8.75, 1.7)
pt3dadd(14.69, -79.4, -8.75, 1.7)
pt3dadd(14.73, -79.31, -8.75, 1.7)
pt3dadd(14.77, -79.16, -8.75, 1.7)
pt3dadd(14.82, -79.02, -8.75, 1.7)
pt3dadd(14.86, -78.92, -8.75, 1.7)
pt3dadd(14.94, -78.87, -8.75, 1.7)
pt3dadd(14.99, -78.73, -8.75, 1.7)
pt3dadd(14.99, -78.63, -8.75, 1.7)
pt3dadd(15.03, -78.54, -8.75, 1.7)
pt3dadd(15.07, -78.49, -8.75, 1.7)
pt3dadd(15.11, -78.34, -8.75, 1.7)
pt3dadd(15.16, -78.25, -8.75, 1.7)
pt3dadd(15.2, -78.1, -8.75, 1.7)
pt3dadd(15.24, -78.05, -8.75, 1.7)
pt3dadd(15.28, -77.96, -8.75, 1.7)
pt3dadd(15.33, -77.91, -8.75, 1.7)
pt3dadd(15.37, -77.81, -8.75, 1.7)
pt3dadd(15.37, -77.67, -8.75, 1.7)
pt3dadd(15.45, -77.57, -8.75, 1.7)
pt3dadd(15.45, -77.38, -8.75, 1.7)
pt3dadd(15.5, -77.33, -8.75, 1.7)
pt3dadd(15.54, -77.28, -8.75, 1.7)
pt3dadd(15.54, -77.18, -8.75, 1.7)
pt3dadd(15.58, -77.14, -8.75, 1.7)
pt3dadd(15.63, -77.09, -8.75, 1.7)
pt3dadd(15.67, -77.04, -8.75, 1.7)
pt3dadd(15.71, -76.99, -8.75, 1.7)
pt3dadd(15.71, -76.85, -8.75, 1.7)
pt3dadd(15.75, -76.8, -8.75, 1.7)
pt3dadd(15.8, -76.75, -8.75, 1.7)
pt3dadd(15.63, -76.92, -11.75, 1.7)
pt3dadd(15.71, -76.82, -11.75, 1.7)
pt3dadd(15.8, -76.73, -11.75, 1.7)
pt3dadd(15.88, -76.53, -11.75, 1.7)
pt3dadd(15.97, -76.34, -11.75, 1.7)
pt3dadd(16.14, -76.25, -11.75, 1.7)
pt3dadd(16.31, -76.15, -11.75, 1.7)
pt3dadd(16.39, -75.96, -11.75, 1.7)
pt3dadd(16.48, -75.86, -11.75, 1.7)
pt3dadd(16.65, -75.67, -11.75, 1.7)
pt3dadd(16.73, -75.57, -11.75, 1.7)
pt3dadd(16.82, -75.38, -11.75, 1.7)
pt3dadd(16.9, -75.28, -11.75, 1.7)
pt3dadd(17.07, -75.18, -11.75, 1.7)
pt3dadd(17.15, -74.99, -11.75, 1.7)
pt3dadd(17.24, -74.89, -11.75, 1.7)
pt3dadd(17.32, -74.8, -11.75, 1.7)
pt3dadd(17.41, -74.7, -11.75, 1.7)
pt3dadd(17.49, -74.61, -11.75, 1.7)
pt3dadd(17.58, -74.51, -11.75, 1.7)
pt3dadd(17.66, -74.32, -11.75, 1.7)
pt3dadd(17.83, -74.22, -11.75, 1.7)
pt3dadd(17.92, -74.03, -11.75, 1.7)
pt3dadd(18, -73.93, -11.75, 1.7)
pt3dadd(18.09, -73.83, -11.75, 1.7)
pt3dadd(18.17, -73.74, -11.75, 1.7)
pt3dadd(18.26, -73.64, -11.75, 1.7)
pt3dadd(18.43, -73.54, -11.75, 1.7)
pt3dadd(18.51, -73.35, -11.75, 1.7)
pt3dadd(18.6, -73.16, -11.75, 1.7)
pt3dadd(18.68, -73.06, -11.75, 1.7)
pt3dadd(18.85, -72.87, -11.75, 1.7)
pt3dadd(18.94, -72.68, -11.75, 1.7)
pt3dadd(19.02, -72.48, -11.75, 1.7)
pt3dadd(19.11, -72.39, -11.75, 1.7)
pt3dadd(19.19, -72.19, -11.75, 1.7)
pt3dadd(19.28, -72, -11.75, 1.7)
pt3dadd(19.36, -71.9, -11.75, 1.7)
pt3dadd(19.45, -71.71, -11.75, 1.7)
pt3dadd(19.53, -71.52, -11.75, 1.7)
pt3dadd(19.61, -71.32, -11.75, 1.7)
pt3dadd(19.7, -71.13, -11.75, 1.7)
pt3dadd(19.78, -71.04, -11.75, 1.7)
pt3dadd(19.87, -70.94, -11.75, 1.7)
pt3dadd(19.95, -70.84, -11.75, 1.7)
pt3dadd(20.04, -70.65, -11.75, 1.7)
pt3dadd(20.13, -70.55, -11.75, 1.7)
pt3dadd(20.13, -70.36, -11.75, 1.7)
pt3dadd(20.21, -70.26, -11.75, 1.7)
pt3dadd(20.3, -70.07, -11.75, 1.7)
pt3dadd(25.77, -55.9, -11.75, 3.4)
pt3dadd(25.82, -55.85, -11.75, 3.4)
pt3dadd(25.82, -55.54, -11.75, 3.4)
pt3dadd(25.86, -55.44, -11.75, 3.4)
pt3dadd(25.91, -55.4, -11.75, 3.4)
pt3dadd(25.91, -55.29, -11.75, 3.4)
pt3dadd(25.95, -55.24, -11.75, 3.4)
pt3dadd(25.95, -55.09, -11.75, 3.4)
pt3dadd(26.04, -55.04, -11.75, 3.4)
pt3dadd(26.08, -54.89, -11.75, 3.4)
pt3dadd(26.13, -54.79, -11.75, 3.4)
pt3dadd(26.17, -54.63, -11.75, 3.4)
pt3dadd(26.26, -54.53, -11.75, 3.4)
pt3dadd(26.31, -54.43, -11.75, 3.4)
pt3dadd(26.35, -54.38, -11.75, 3.4)
pt3dadd(26.4, -54.28, -11.75, 3.4)
pt3dadd(26.44, -54.18, -11.75, 3.4)
pt3dadd(26.49, -54.08, -11.75, 3.4)
pt3dadd(26.58, -53.97, -11.75, 3.4)
pt3dadd(26.62, -53.88, -11.75, 3.4)
pt3dadd(26.67, -53.72, -11.75, 3.4)
pt3dadd(26.75, -53.67, -11.75, 3.4)
pt3dadd(26.75, -53.52, -11.75, 3.4)
pt3dadd(26.84, -53.42, -11.75, 3.4)
pt3dadd(26.89, -53.32, -11.75, 3.4)
pt3dadd(26.93, -53.22, -11.75, 3.4)
pt3dadd(26.98, -53.12, -11.75, 3.4)
pt3dadd(27.02, -53.01, -11.75, 3.4)
pt3dadd(27.07, -52.91, -11.75, 3.4)
pt3dadd(27.16, -52.81, -11.75, 3.4)
pt3dadd(27.2, -52.76, -11.75, 3.4)
pt3dadd(27.25, -52.66, -11.75, 3.4)
pt3dadd(27.25, -52.56, -11.75, 3.4)
pt3dadd(27.29, -52.46, -11.75, 3.4)
pt3dadd(27.33, -52.41, -11.75, 3.4)
pt3dadd(27.38, -52.31, -11.75, 3.4)
pt3dadd(27.42, -52.26, -11.75, 3.4)
pt3dadd(27.47, -52.15, -11.75, 3.4)
pt3dadd(27.51, -52.05, -11.75, 3.4)
pt3dadd(27.56, -51.95, -11.75, 3.4)
pt3dadd(27.6, -51.8, -11.75, 3.4)
pt3dadd(27.65, -51.75, -11.75, 3.4)
pt3dadd(27.69, -51.65, -11.75, 3.4)
pt3dadd(27.74, -51.54, -11.75, 3.4)
pt3dadd(27.74, -51.44, -11.75, 3.4)
pt3dadd(27.78, -51.39, -11.75, 3.4)
pt3dadd(27.82, -51.29, -11.75, 3.4)
pt3dadd(27.87, -51.24, -11.75, 3.4)
pt3dadd(27.87, -51.14, -11.75, 3.4)
pt3dadd(27.91, -51.09, -11.75, 3.4)
pt3dadd(27.91, -50.99, -11.75, 3.4)
pt3dadd(27.96, -50.94, -11.75, 3.4)
pt3dadd(28, -50.84, -11.75, 3.4)
pt3dadd(28, -50.74, -11.75, 3.4)
pt3dadd(28.05, -50.63, -11.75, 3.4)
pt3dadd(28.09, -50.58, -11.75, 3.4)
pt3dadd(28.14, -50.48, -11.75, 3.4)
pt3dadd(28.18, -50.43, -11.75, 3.4)
pt3dadd(28.23, -50.33, -11.75, 3.4)
pt3dadd(28.27, -50.23, -11.75, 3.4)
pt3dadd(28.32, -50.13, -11.75, 3.4)
pt3dadd(28.36, -50.03, -11.75, 3.4)
pt3dadd(28.4, -49.92, -11.75, 3.4)
pt3dadd(28.45, -49.88, -11.75, 3.4)
pt3dadd(28.54, -49.88, -11.75, 3.4)
pt3dadd(28.54, -49.77, -11.75, 3.4)
pt3dadd(28.32, -50.13, -12.8, 3.4)
pt3dadd(28.36, -50.08, -12.8, 3.4)
}
}
proc shape3d_14() {
dend[1] { pt3dadd(28.4, -50.03, -12.8, 3.4)
pt3dadd(28.49, -49.92, -12.8, 3.4)
pt3dadd(28.54, -49.83, -12.8, 3.4)
pt3dadd(28.58, -49.77, -12.8, 3.4)
pt3dadd(28.63, -49.62, -12.8, 3.4)
pt3dadd(28.67, -49.47, -12.8, 3.4)
pt3dadd(28.76, -49.32, -12.8, 3.4)
pt3dadd(28.85, -49.22, -12.8, 3.4)
pt3dadd(28.89, -49.12, -12.8, 3.4)
pt3dadd(28.94, -49.01, -12.8, 3.4)
pt3dadd(29.03, -48.86, -12.8, 3.4)
pt3dadd(29.07, -48.81, -12.8, 3.4)
pt3dadd(29.16, -48.71, -12.8, 3.4)
pt3dadd(29.3, -48.61, -12.8, 3.4)
pt3dadd(29.34, -48.56, -12.8, 3.4)
pt3dadd(29.47, -48.46, -12.8, 3.4)
pt3dadd(29.52, -48.4, -12.8, 3.4)
pt3dadd(29.65, -48.26, -12.8, 3.4)
pt3dadd(29.69, -48.2, -12.8, 3.4)
pt3dadd(29.88, -48, -12.8, 3.4)
pt3dadd(29.92, -47.95, -12.8, 3.4)
pt3dadd(30.01, -47.85, -12.8, 3.4)
pt3dadd(30.1, -47.8, -12.8, 3.4)
pt3dadd(30.19, -47.7, -12.8, 3.4)
pt3dadd(30.23, -47.65, -12.8, 3.4)
pt3dadd(30.32, -47.6, -12.8, 3.4)
pt3dadd(30.41, -47.49, -12.8, 3.4)
pt3dadd(30.5, -47.44, -12.8, 3.4)
pt3dadd(30.59, -47.39, -12.8, 3.4)
pt3dadd(30.68, -47.34, -12.8, 3.4)
pt3dadd(30.72, -47.29, -12.8, 3.4)
pt3dadd(30.81, -47.24, -12.8, 3.4)
pt3dadd(30.9, -47.19, -12.8, 3.4)
pt3dadd(30.99, -47.14, -12.8, 3.4)
pt3dadd(31.08, -47.04, -12.8, 3.4)
pt3dadd(31.21, -46.99, -12.8, 3.4)
pt3dadd(31.34, -46.94, -12.8, 3.4)
pt3dadd(31.39, -46.84, -12.8, 3.4)
pt3dadd(31.48, -46.78, -12.8, 3.4)
pt3dadd(31.52, -46.69, -12.8, 3.4)
pt3dadd(31.61, -46.63, -12.8, 3.4)
pt3dadd(31.7, -46.58, -12.8, 3.4)
pt3dadd(31.79, -46.58, -12.8, 3.4)
pt3dadd(31.83, -46.53, -12.8, 3.4)
pt3dadd(31.92, -46.48, -12.8, 3.4)
pt3dadd(31.97, -46.43, -12.8, 3.4)
pt3dadd(32.06, -46.33, -12.8, 3.4)
pt3dadd(32.15, -46.28, -12.8, 3.4)
pt3dadd(32.28, -46.18, -12.8, 3.4)
pt3dadd(32.33, -46.13, -12.8, 3.4)
pt3dadd(32.37, -46.08, -12.8, 3.4)
pt3dadd(32.42, -46.03, -12.8, 3.4)
pt3dadd(32.51, -45.97, -12.8, 3.4)
pt3dadd(32.6, -45.88, -12.8, 3.4)
pt3dadd(32.68, -45.77, -12.8, 3.4)
pt3dadd(32.77, -45.72, -12.8, 3.4)
pt3dadd(32.82, -45.67, -12.8, 3.4)
pt3dadd(32.9, -45.62, -12.8, 3.4)
pt3dadd(32.99, -45.52, -12.8, 3.4)
pt3dadd(33.04, -45.47, -12.8, 3.4)
pt3dadd(33.13, -45.42, -12.8, 3.4)
pt3dadd(33.22, -45.32, -12.8, 3.4)
pt3dadd(33.26, -45.27, -12.8, 3.4)
pt3dadd(33.31, -45.22, -12.8, 3.4)
pt3dadd(33.4, -45.17, -12.8, 3.4)
pt3dadd(33.49, -45.06, -12.8, 3.4)
pt3dadd(33.58, -44.96, -12.8, 3.4)
pt3dadd(33.62, -44.91, -12.8, 3.4)
pt3dadd(33.67, -44.86, -12.8, 3.4)
pt3dadd(33.75, -44.86, -12.8, 3.4)
pt3dadd(33.93, -44.66, -12.8, 3.4)
pt3dadd(33.97, -44.61, -12.8, 3.4)
pt3dadd(34.06, -44.56, -12.8, 3.4)
pt3dadd(34.15, -44.51, -12.8, 3.4)
pt3dadd(34.2, -44.46, -12.8, 3.4)
pt3dadd(34.24, -44.35, -12.8, 3.4)
pt3dadd(34.29, -44.31, -12.8, 3.4)
pt3dadd(34.38, -44.2, -12.8, 3.4)
pt3dadd(34.42, -44.1, -12.8, 3.4)
pt3dadd(34.47, -44.05, -12.8, 3.4)
pt3dadd(34.56, -43.95, -12.8, 3.4)
pt3dadd(34.6, -43.9, -12.8, 3.4)
pt3dadd(34.69, -43.85, -12.8, 3.4)
pt3dadd(34.74, -43.8, -12.8, 3.4)
pt3dadd(34.82, -43.7, -12.8, 3.4)
pt3dadd(34.91, -43.65, -12.8, 3.4)
pt3dadd(34.96, -43.6, -12.8, 3.4)
pt3dadd(35.04, -43.54, -12.8, 3.4)
pt3dadd(35.09, -43.49, -12.8, 3.4)
pt3dadd(35.18, -43.39, -12.8, 3.4)
pt3dadd(35.22, -43.34, -12.8, 3.4)
pt3dadd(35.31, -43.24, -12.8, 3.4)
pt3dadd(35.36, -43.14, -12.8, 3.4)
pt3dadd(35.4, -43.09, -12.8, 3.4)
pt3dadd(35.49, -43.04, -12.8, 3.4)
pt3dadd(35.58, -42.99, -12.8, 3.4)
pt3dadd(35.63, -42.94, -12.8, 3.4)
pt3dadd(35.67, -42.89, -12.8, 3.4)
pt3dadd(35.72, -42.83, -12.8, 3.4)
pt3dadd(35.76, -42.78, -12.8, 3.4)
pt3dadd(35.81, -42.74, -12.8, 3.4)
pt3dadd(35.85, -42.63, -12.8, 3.4)
pt3dadd(35.89, -42.53, -12.8, 3.4)
pt3dadd(36.03, -42.38, -12.8, 3.4)
pt3dadd(36.07, -42.28, -12.8, 3.4)
pt3dadd(36.12, -42.23, -12.8, 3.4)
pt3dadd(36.21, -42.08, -12.8, 3.4)
pt3dadd(36.25, -42.03, -12.8, 3.4)
pt3dadd(36.29, -41.92, -12.8, 3.4)
pt3dadd(36.38, -41.82, -12.8, 3.4)
pt3dadd(36.43, -41.67, -12.8, 3.4)
pt3dadd(36.47, -41.52, -12.8, 3.4)
pt3dadd(36.56, -41.37, -12.8, 3.4)
pt3dadd(36.61, -41.22, -12.8, 3.4)
pt3dadd(36.69, -41.06, -12.8, 3.4)
pt3dadd(36.74, -40.96, -12.8, 3.4)
pt3dadd(36.83, -40.86, -12.8, 3.4)
pt3dadd(36.87, -40.76, -12.8, 3.4)
pt3dadd(36.92, -40.66, -12.8, 3.4)
pt3dadd(37.01, -40.56, -12.8, 3.4)
pt3dadd(37.05, -40.46, -12.8, 3.4)
pt3dadd(37.1, -40.4, -12.8, 3.4)
pt3dadd(37.14, -40.31, -12.8, 3.4)
pt3dadd(37.19, -40.2, -12.8, 3.4)
pt3dadd(37.23, -40.1, -12.8, 3.4)
pt3dadd(37.28, -40, -12.8, 3.4)
pt3dadd(37.32, -39.9, -12.8, 3.4)
pt3dadd(37.37, -39.85, -12.8, 3.4)
pt3dadd(37.41, -39.8, -12.8, 3.4)
pt3dadd(37.41, -39.7, -12.8, 3.4)
pt3dadd(37.45, -39.6, -12.8, 3.4)
pt3dadd(37.54, -39.49, -12.8, 3.4)
pt3dadd(37.59, -39.39, -12.8, 3.4)
pt3dadd(37.59, -39.29, -12.8, 3.4)
pt3dadd(37.63, -39.19, -12.8, 3.4)
pt3dadd(37.67, -39.14, -12.8, 3.4)
pt3dadd(37.72, -39.04, -12.8, 3.4)
pt3dadd(37.76, -38.99, -12.8, 3.4)
pt3dadd(37.81, -38.83, -12.8, 3.4)
pt3dadd(37.85, -38.74, -12.8, 3.4)
pt3dadd(37.9, -38.58, -12.8, 3.4)
pt3dadd(37.94, -38.53, -12.8, 3.4)
pt3dadd(37.94, -38.43, -12.8, 3.4)
pt3dadd(37.99, -38.28, -12.8, 3.4)
pt3dadd(38.03, -38.18, -12.8, 3.4)
pt3dadd(38.08, -38.08, -12.8, 3.4)
pt3dadd(38.08, -37.97, -12.8, 3.4)
pt3dadd(38.12, -37.87, -12.8, 3.4)
pt3dadd(38.12, -37.77, -12.8, 3.4)
pt3dadd(38.17, -37.67, -12.8, 3.4)
pt3dadd(38.17, -37.52, -12.8, 3.4)
pt3dadd(38.21, -37.47, -12.8, 3.4)
pt3dadd(38.21, -37.32, -12.8, 3.4)
pt3dadd(38.26, -37.26, -12.8, 3.4)
pt3dadd(38.26, -37.12, -12.8, 3.4)
pt3dadd(38.3, -37.06, -12.8, 3.4)
pt3dadd(38.3, -36.96, -12.8, 3.4)
pt3dadd(38.35, -36.86, -12.8, 3.4)
pt3dadd(38.39, -36.76, -12.8, 3.4)
pt3dadd(38.44, -36.71, -12.8, 3.4)
pt3dadd(38.48, -36.66, -12.8, 3.4)
pt3dadd(38.57, -36.56, -12.8, 3.4)
pt3dadd(38.61, -36.46, -12.8, 3.4)
pt3dadd(38.66, -36.35, -12.8, 3.4)
pt3dadd(38.74, -36.31, -12.8, 3.4)
pt3dadd(38.79, -36.25, -12.8, 3.4)
pt3dadd(38.83, -36.2, -12.8, 3.4)
pt3dadd(38.83, -36.1, -12.8, 3.4)
pt3dadd(38.66, -36, -14.9, 3.4)
pt3dadd(38.66, -36.2, -14.9, 3.4)
pt3dadd(38.88, -36.2, -14.9, 3.4)
pt3dadd(38.92, -36.15, -14.9, 3.4)
pt3dadd(39.01, -36.1, -14.9, 3.4)
pt3dadd(39.06, -36.05, -14.9, 3.4)
pt3dadd(39.1, -36, -14.9, 3.4)
pt3dadd(39.19, -35.95, -14.9, 3.4)
pt3dadd(39.28, -35.9, -14.9, 3.4)
pt3dadd(39.33, -35.85, -14.9, 3.4)
pt3dadd(39.42, -35.8, -14.9, 3.4)
pt3dadd(39.51, -35.7, -14.9, 3.4)
pt3dadd(39.55, -35.65, -14.9, 3.4)
pt3dadd(39.59, -35.54, -14.9, 3.4)
pt3dadd(39.68, -35.44, -14.9, 3.4)
pt3dadd(39.77, -35.39, -14.9, 3.4)
pt3dadd(39.81, -35.34, -14.9, 3.4)
pt3dadd(39.86, -35.29, -14.9, 3.4)
pt3dadd(39.9, -35.19, -14.9, 3.4)
pt3dadd(39.95, -35.14, -14.9, 3.4)
pt3dadd(40.04, -35.04, -14.9, 3.4)
pt3dadd(40.13, -34.94, -14.9, 3.4)
pt3dadd(40.22, -34.88, -14.9, 3.4)
pt3dadd(40.26, -34.83, -14.9, 3.4)
pt3dadd(40.31, -34.78, -14.9, 3.4)
pt3dadd(40.58, -34.48, -14.9, 3.4)
pt3dadd(40.62, -34.38, -14.9, 3.4)
pt3dadd(40.66, -34.33, -14.9, 3.4)
pt3dadd(40.75, -34.23, -14.9, 3.4)
pt3dadd(40.8, -34.13, -14.9, 3.4)
pt3dadd(40.84, -34.08, -14.9, 3.4)
pt3dadd(40.93, -33.97, -14.9, 3.4)
}
}
proc shape3d_15() {
dend[1] { pt3dadd(41.11, -33.77, -14.9, 3.4)
pt3dadd(41.11, -33.67, -14.9, 3.4)
pt3dadd(41.2, -33.57, -14.9, 3.4)
pt3dadd(41.24, -33.47, -14.9, 3.4)
pt3dadd(41.29, -33.37, -14.9, 3.4)
pt3dadd(41.38, -33.32, -14.9, 3.4)
pt3dadd(41.42, -33.22, -14.9, 3.4)
pt3dadd(41.47, -33.12, -14.9, 3.4)
pt3dadd(41.65, -32.91, -14.9, 3.4)
pt3dadd(41.69, -32.86, -14.9, 3.4)
pt3dadd(41.73, -32.76, -14.9, 3.4)
pt3dadd(41.78, -32.66, -14.9, 3.4)
pt3dadd(41.82, -32.61, -14.9, 3.4)
pt3dadd(41.87, -32.56, -14.9, 3.4)
pt3dadd(41.91, -32.51, -14.9, 3.4)
pt3dadd(41.96, -32.4, -14.9, 3.4)
pt3dadd(42.04, -32.35, -14.9, 3.4)
pt3dadd(42.04, -32.25, -14.9, 3.4)
pt3dadd(42.13, -32.15, -14.9, 3.4)
pt3dadd(42.18, -32, -14.9, 3.4)
pt3dadd(42.27, -31.85, -14.9, 3.4)
pt3dadd(42.31, -31.75, -14.9, 3.4)
pt3dadd(42.4, -31.55, -14.9, 3.4)
pt3dadd(42.45, -31.49, -14.9, 3.4)
pt3dadd(42.49, -31.44, -14.9, 3.4)
pt3dadd(42.53, -31.39, -14.9, 3.4)
pt3dadd(42.58, -31.34, -14.9, 3.4)
pt3dadd(42.63, -31.24, -14.9, 3.4)
pt3dadd(42.72, -31.19, -14.9, 3.4)
pt3dadd(42.76, -31.14, -14.9, 3.4)
pt3dadd(42.8, -31.09, -14.9, 3.4)
pt3dadd(42.85, -30.99, -14.9, 3.4)
pt3dadd(43.74, -30.08, -14.9, 3.4)
pt3dadd(43.56, -30.13, -15.95, 3.4)
pt3dadd(43.56, -30.28, -15.95, 3.4)
pt3dadd(43.65, -30.28, -15.95, 3.4)
pt3dadd(43.69, -30.23, -15.95, 3.4)
pt3dadd(43.74, -30.13, -15.95, 3.4)
pt3dadd(43.78, -30.08, -15.95, 3.4)
pt3dadd(43.83, -30.02, -15.95, 3.4)
pt3dadd(43.87, -29.98, -15.95, 3.4)
pt3dadd(43.96, -29.98, -15.95, 3.4)
pt3dadd(44.01, -29.92, -15.95, 3.4)
pt3dadd(44.1, -29.82, -15.95, 3.4)
pt3dadd(44.14, -29.77, -15.95, 3.4)
pt3dadd(44.23, -29.67, -15.95, 3.4)
pt3dadd(44.28, -29.62, -15.95, 3.4)
pt3dadd(44.32, -29.57, -15.95, 3.4)
pt3dadd(44.5, -29.37, -15.95, 3.4)
pt3dadd(44.54, -29.32, -15.95, 3.4)
pt3dadd(44.59, -29.22, -15.95, 3.4)
pt3dadd(44.63, -29.17, -15.95, 3.4)
pt3dadd(44.72, -29.06, -15.95, 3.4)
pt3dadd(44.76, -29.01, -15.95, 3.4)
pt3dadd(44.81, -28.91, -15.95, 3.4)
pt3dadd(44.9, -28.81, -15.95, 3.4)
pt3dadd(44.94, -28.76, -15.95, 3.4)
pt3dadd(44.99, -28.66, -15.95, 3.4)
pt3dadd(45.08, -28.61, -15.95, 3.4)
pt3dadd(45.12, -28.56, -15.95, 3.4)
pt3dadd(45.17, -28.45, -15.95, 3.4)
pt3dadd(45.26, -28.41, -15.95, 3.4)
pt3dadd(45.35, -28.35, -15.95, 3.4)
pt3dadd(45.48, -28.2, -15.95, 3.4)
pt3dadd(45.52, -28.1, -15.95, 3.4)
pt3dadd(45.61, -28.05, -15.95, 3.4)
pt3dadd(45.66, -28, -15.95, 3.4)
pt3dadd(45.7, -27.95, -15.95, 3.4)
pt3dadd(45.74, -27.8, -15.95, 3.4)
pt3dadd(45.79, -27.75, -15.95, 3.4)
pt3dadd(45.83, -27.69, -15.95, 3.4)
pt3dadd(45.92, -27.59, -15.95, 3.4)
pt3dadd(45.97, -27.49, -15.95, 3.4)
pt3dadd(46.06, -27.39, -15.95, 3.4)
pt3dadd(46.1, -27.34, -15.95, 3.4)
pt3dadd(46.15, -27.24, -15.95, 3.4)
pt3dadd(46.19, -27.14, -15.95, 3.4)
pt3dadd(46.24, -27.09, -15.95, 3.4)
pt3dadd(46.33, -26.99, -15.95, 3.4)
pt3dadd(46.37, -26.89, -15.95, 3.4)
pt3dadd(46.46, -26.78, -15.95, 3.4)
pt3dadd(46.55, -26.63, -15.95, 3.4)
pt3dadd(46.59, -26.53, -15.95, 3.4)
pt3dadd(46.64, -26.38, -15.95, 3.4)
pt3dadd(46.68, -26.33, -15.95, 3.4)
pt3dadd(46.73, -26.28, -15.95, 3.4)
pt3dadd(46.77, -26.18, -15.95, 3.4)
pt3dadd(46.81, -26.02, -15.95, 3.4)
pt3dadd(46.86, -25.98, -15.95, 3.4)
pt3dadd(46.9, -25.87, -15.95, 3.4)
pt3dadd(46.95, -25.72, -15.95, 3.4)
pt3dadd(46.99, -25.67, -15.95, 3.4)
pt3dadd(47.04, -25.52, -15.95, 3.4)
pt3dadd(47.08, -25.42, -15.95, 3.4)
pt3dadd(47.08, -25.32, -15.95, 3.4)
pt3dadd(47.13, -25.26, -15.95, 3.4)
pt3dadd(47.17, -25.17, -15.95, 3.4)
pt3dadd(47.22, -25.06, -15.95, 3.4)
pt3dadd(47.26, -24.91, -15.95, 3.4)
pt3dadd(47.31, -24.81, -15.95, 3.4)
pt3dadd(47.31, -24.71, -15.95, 3.4)
pt3dadd(47.35, -24.61, -15.95, 3.4)
pt3dadd(47.4, -24.5, -15.95, 3.4)
pt3dadd(47.44, -24.45, -15.95, 3.4)
pt3dadd(47.44, -24.35, -15.95, 3.4)
pt3dadd(47.49, -24.25, -15.95, 3.4)
pt3dadd(47.53, -24.2, -15.95, 3.4)
pt3dadd(47.57, -24.1, -15.95, 3.4)
pt3dadd(47.57, -24, -15.95, 3.4)
pt3dadd(47.62, -23.95, -15.95, 3.4)
pt3dadd(47.62, -23.85, -15.95, 3.4)
pt3dadd(47.66, -23.75, -15.95, 3.4)
pt3dadd(47.71, -23.65, -15.95, 3.4)
pt3dadd(47.71, -23.54, -15.95, 3.4)
pt3dadd(47.75, -23.39, -15.95, 3.4)
pt3dadd(47.75, -23.24, -15.95, 3.4)
pt3dadd(47.8, -23.14, -15.95, 3.4)
pt3dadd(47.8, -21.67, -15.95, 3.4)
pt3dadd(47.71, -21.82, -17, 3.4)
pt3dadd(47.66, -21.92, -17, 3.4)
pt3dadd(47.66, -22.33, -17, 3.4)
pt3dadd(47.71, -22.38, -17, 3.4)
pt3dadd(47.71, -22.23, -17, 3.4)
pt3dadd(47.75, -22.18, -17, 3.4)
pt3dadd(47.8, -22.08, -17, 3.4)
pt3dadd(47.84, -21.98, -17, 3.4)
pt3dadd(47.88, -21.92, -17, 3.4)
pt3dadd(47.88, -21.82, -17, 3.4)
pt3dadd(47.93, -21.77, -17, 3.4)
pt3dadd(47.97, -21.62, -17, 3.4)
pt3dadd(48.02, -21.52, -17, 3.4)
pt3dadd(48.02, -21.42, -17, 3.4)
pt3dadd(48.11, -21.16, -17, 3.4)
pt3dadd(48.11, -21.06, -17, 3.4)
pt3dadd(48.15, -20.96, -17, 3.4)
pt3dadd(48.2, -20.81, -17, 3.4)
pt3dadd(48.24, -20.71, -17, 3.4)
pt3dadd(48.24, -20.56, -17, 3.4)
pt3dadd(48.29, -20.41, -17, 3.4)
pt3dadd(48.33, -20.3, -17, 3.4)
pt3dadd(48.33, -20.2, -17, 3.4)
pt3dadd(48.38, -20.05, -17, 3.4)
pt3dadd(48.38, -19.8, -17, 3.4)
pt3dadd(48.42, -19.69, -17, 3.4)
pt3dadd(48.47, -19.65, -17, 3.4)
pt3dadd(48.47, -19.39, -17, 3.4)
pt3dadd(48.51, -19.29, -17, 3.4)
pt3dadd(48.51, -19.19, -17, 3.4)
pt3dadd(48.56, -19.09, -17, 3.4)
pt3dadd(48.6, -18.99, -17, 3.4)
pt3dadd(48.64, -18.89, -17, 3.4)
pt3dadd(48.69, -18.78, -17, 3.4)
pt3dadd(48.73, -18.73, -17, 3.4)
pt3dadd(48.78, -18.68, -17, 3.4)
pt3dadd(48.82, -18.58, -17, 3.4)
pt3dadd(48.87, -18.48, -17, 3.4)
pt3dadd(48.91, -18.38, -17, 3.4)
pt3dadd(48.96, -18.33, -17, 3.4)
pt3dadd(49, -18.28, -17, 3.4)
pt3dadd(49.04, -18.23, -17, 3.4)
pt3dadd(49.04, -18.13, -17, 3.4)
pt3dadd(49.09, -18.08, -17, 3.4)
pt3dadd(49.18, -18.02, -17, 3.4)
pt3dadd(49.22, -17.92, -17, 3.4)
pt3dadd(49.27, -17.82, -17, 3.4)
pt3dadd(49.31, -17.77, -17, 3.4)
pt3dadd(49.31, -17.67, -17, 3.4)
pt3dadd(49.36, -17.57, -17, 3.4)
pt3dadd(49.4, -17.52, -17, 3.4)
pt3dadd(49.44, -17.42, -17, 3.4)
pt3dadd(49.49, -17.32, -17, 3.4)
pt3dadd(49.53, -17.22, -17, 3.4)
pt3dadd(49.58, -17.06, -17, 3.4)
pt3dadd(49.63, -17.01, -17, 3.4)
pt3dadd(49.67, -16.96, -17, 3.4)
pt3dadd(49.67, -16.86, -17, 3.4)
pt3dadd(49.71, -16.76, -17, 3.4)
pt3dadd(49.76, -16.66, -17, 3.4)
pt3dadd(49.8, -16.61, -17, 3.4)
pt3dadd(49.85, -16.56, -17, 3.4)
pt3dadd(49.85, -16.45, -17, 3.4)
pt3dadd(49.89, -16.35, -17, 3.4)
pt3dadd(49.94, -16.3, -17, 3.4)
pt3dadd(49.94, -16.2, -17, 3.4)
pt3dadd(49.98, -16.15, -17, 3.4)
pt3dadd(49.98, -16.05, -17, 3.4)
pt3dadd(50.03, -15.95, -17, 3.4)
pt3dadd(50.07, -15.85, -17, 3.4)
pt3dadd(50.07, -15.74, -17, 3.4)
pt3dadd(50.12, -15.65, -17, 3.4)
pt3dadd(50.12, -15.54, -17, 3.4)
pt3dadd(50.16, -15.39, -17, 3.4)
pt3dadd(50.21, -15.29, -17, 3.4)
pt3dadd(50.21, -15.19, -17, 3.4)
pt3dadd(50.25, -15.09, -17, 3.4)
pt3dadd(50.25, -14.89, -17, 3.4)
pt3dadd(50.29, -14.84, -17, 3.4)
pt3dadd(50.29, -14.53, -17, 3.4)
pt3dadd(50.34, -14.43, -17, 3.4)
pt3dadd(50.34, -14.28, -17, 3.4)
}
}
proc shape3d_16() {
dend[1] { pt3dadd(50.38, -14.23, -17, 3.4)
pt3dadd(50.38, -13.97, -17, 3.4)
pt3dadd(50.43, -13.92, -17, 3.4)
pt3dadd(50.43, -13.72, -17, 3.4)
pt3dadd(50.47, -13.67, -17, 3.4)
pt3dadd(50.51, -13.57, -17, 3.4)
pt3dadd(50.51, -13.47, -17, 3.4)
pt3dadd(50.56, -13.31, -17, 3.4)
pt3dadd(50.56, -13.11, -17, 3.4)
pt3dadd(50.6, -13.01, -17, 3.4)
pt3dadd(50.6, -12.86, -17, 3.4)
pt3dadd(50.65, -12.76, -17, 3.4)
pt3dadd(50.65, -12.66, -17, 3.4)
pt3dadd(50.69, -12.56, -17, 3.4)
pt3dadd(50.74, -12.45, -17, 3.4)
pt3dadd(50.74, -12.35, -17, 3.4)
pt3dadd(50.78, -12.3, -17, 3.4)
pt3dadd(50.78, -12.2, -17, 3.4)
pt3dadd(50.83, -12.15, -17, 3.4)
pt3dadd(50.87, -12.05, -17, 3.4)
pt3dadd(50.92, -11.95, -17, 3.4)
pt3dadd(50.96, -11.9, -17, 3.4)
pt3dadd(51.01, -11.85, -17, 3.4)
pt3dadd(51.05, -11.74, -17, 3.4)
pt3dadd(51.05, -11.65, -17, 3.4)
pt3dadd(51.1, -11.59, -17, 3.4)
pt3dadd(51.14, -11.54, -17, 3.4)
pt3dadd(51.14, -11.44, -17, 3.4)
pt3dadd(51.19, -11.39, -17, 3.4)
pt3dadd(51.23, -11.29, -17, 3.4)
pt3dadd(51.28, -11.19, -17, 3.4)
pt3dadd(51.32, -11.09, -17, 3.4)
pt3dadd(51.36, -10.98, -17, 3.4)
pt3dadd(51.41, -10.89, -17, 3.4)
pt3dadd(51.45, -10.78, -17, 3.4)
pt3dadd(51.45, -10.68, -17, 3.4)
pt3dadd(51.54, -10.58, -17, 3.4)
pt3dadd(51.54, -10.48, -17, 3.4)
pt3dadd(51.58, -10.38, -17, 3.4)
pt3dadd(51.63, -10.33, -17, 3.4)
pt3dadd(51.67, -10.18, -17, 3.4)
pt3dadd(51.72, -10.07, -17, 3.4)
pt3dadd(51.76, -9.97, -17, 3.4)
pt3dadd(51.81, -9.87, -17, 3.4)
pt3dadd(51.81, -9.77, -17, 3.4)
pt3dadd(51.85, -9.67, -17, 3.4)
pt3dadd(51.9, -9.62, -17, 3.4)
pt3dadd(51.94, -9.57, -17, 3.4)
pt3dadd(51.99, -9.47, -17, 3.4)
pt3dadd(52.03, -9.36, -17, 3.4)
pt3dadd(52.08, -9.27, -17, 3.4)
pt3dadd(52.08, -9.16, -17, 3.4)
pt3dadd(52.12, -9.06, -17, 3.4)
pt3dadd(52.17, -8.91, -17, 3.4)
pt3dadd(52.21, -8.86, -17, 3.4)
pt3dadd(52.26, -8.81, -17, 3.4)
pt3dadd(52.26, -8.71, -17, 3.4)
pt3dadd(52.3, -8.6, -17, 3.4)
pt3dadd(52.35, -8.51, -17, 3.4)
pt3dadd(52.35, -8.4, -17, 3.4)
pt3dadd(52.39, -8.35, -17, 3.4)
pt3dadd(52.39, -8.2, -17, 3.4)
pt3dadd(52.43, -8.1, -17, 3.4)
pt3dadd(52.48, -8.05, -17, 3.4)
pt3dadd(52.26, -8, -18.05, 3.4)
pt3dadd(52.26, -8.2, -18.05, 3.4)
pt3dadd(52.3, -8.25, -18.05, 3.4)
pt3dadd(52.35, -8.15, -18.05, 3.4)
pt3dadd(52.35, -8.05, -18.05, 3.4)
pt3dadd(52.39, -8, -18.05, 3.4)
pt3dadd(52.43, -7.9, -18.05, 3.4)
pt3dadd(52.48, -7.85, -18.05, 3.4)
pt3dadd(52.52, -7.74, -18.05, 3.4)
pt3dadd(52.61, -7.64, -18.05, 3.4)
pt3dadd(52.65, -7.54, -18.05, 3.4)
pt3dadd(52.7, -7.49, -18.05, 3.4)
pt3dadd(52.74, -7.34, -18.05, 3.4)
pt3dadd(52.79, -7.24, -18.05, 3.4)
pt3dadd(52.83, -7.14, -18.05, 3.4)
pt3dadd(52.88, -7.03, -18.05, 3.4)
pt3dadd(52.97, -6.93, -18.05, 3.4)
pt3dadd(53.01, -6.89, -18.05, 3.4)
pt3dadd(53.06, -6.78, -18.05, 3.4)
pt3dadd(53.1, -6.68, -18.05, 3.4)
pt3dadd(53.15, -6.63, -18.05, 3.4)
pt3dadd(53.19, -6.53, -18.05, 3.4)
pt3dadd(53.24, -6.43, -18.05, 3.4)
pt3dadd(53.33, -6.33, -18.05, 3.4)
pt3dadd(53.37, -6.22, -18.05, 3.4)
pt3dadd(53.42, -6.18, -18.05, 3.4)
pt3dadd(53.46, -6.07, -18.05, 3.4)
pt3dadd(53.5, -6.02, -18.05, 3.4)
pt3dadd(53.55, -5.92, -18.05, 3.4)
pt3dadd(53.59, -5.87, -18.05, 3.4)
pt3dadd(53.64, -5.72, -18.05, 3.4)
pt3dadd(53.68, -5.67, -18.05, 3.4)
pt3dadd(53.72, -5.57, -18.05, 3.4)
pt3dadd(53.77, -5.41, -18.05, 3.4)
pt3dadd(53.81, -5.26, -18.05, 3.4)
pt3dadd(53.86, -5.16, -18.05, 3.4)
pt3dadd(53.9, -5.01, -18.05, 3.4)
pt3dadd(53.95, -4.86, -18.05, 3.4)
pt3dadd(54.04, -4.71, -18.05, 3.4)
pt3dadd(54.08, -4.51, -18.05, 3.4)
pt3dadd(54.13, -4.4, -18.05, 3.4)
pt3dadd(54.17, -4.25, -18.05, 3.4)
pt3dadd(54.22, -4.1, -18.05, 3.4)
pt3dadd(54.31, -3.95, -18.05, 3.4)
pt3dadd(54.35, -3.85, -18.05, 3.4)
pt3dadd(54.4, -3.74, -18.05, 3.4)
pt3dadd(54.44, -3.64, -18.05, 3.4)
pt3dadd(54.48, -3.54, -18.05, 3.4)
pt3dadd(54.53, -3.49, -18.05, 3.4)
pt3dadd(54.57, -3.34, -18.05, 3.4)
pt3dadd(54.62, -3.29, -18.05, 3.4)
pt3dadd(54.66, -3.24, -18.05, 3.4)
pt3dadd(54.66, -3.14, -18.05, 3.4)
pt3dadd(54.75, -3.04, -18.05, 3.4)
pt3dadd(54.79, -2.93, -18.05, 3.4)
pt3dadd(54.84, -2.83, -18.05, 3.4)
pt3dadd(54.88, -2.73, -18.05, 3.4)
pt3dadd(54.97, -2.63, -18.05, 3.4)
pt3dadd(54.97, -2.53, -18.05, 3.4)
pt3dadd(55.02, -2.48, -18.05, 3.4)
pt3dadd(55.06, -2.38, -18.05, 3.4)
pt3dadd(55.11, -2.33, -18.05, 3.4)
pt3dadd(55.15, -2.22, -18.05, 3.4)
pt3dadd(55.2, -2.17, -18.05, 3.4)
pt3dadd(55.2, -2.02, -18.05, 3.4)
pt3dadd(55.24, -1.97, -18.05, 3.4)
pt3dadd(55.28, -1.87, -18.05, 3.4)
pt3dadd(55.33, -1.77, -18.05, 3.4)
pt3dadd(55.33, -1.67, -18.05, 3.4)
pt3dadd(55.38, -1.52, -18.05, 3.4)
pt3dadd(55.42, -1.47, -18.05, 3.4)
pt3dadd(55.47, -1.41, -18.05, 3.4)
pt3dadd(55.47, -1.21, -18.05, 3.4)
pt3dadd(55.51, -1.16, -18.05, 3.4)
pt3dadd(55.55, -1.06, -18.05, 3.4)
pt3dadd(55.55, -0.96, -18.05, 3.4)
pt3dadd(55.6, -0.86, -18.05, 3.4)
pt3dadd(55.64, -0.81, -18.05, 3.4)
pt3dadd(55.69, -0.71, -18.05, 3.4)
pt3dadd(55.73, -0.61, -18.05, 3.4)
pt3dadd(55.73, -0.45, -18.05, 3.4)
pt3dadd(55.78, -0.4, -18.05, 3.4)
pt3dadd(55.82, -0.35, -18.05, 3.4)
pt3dadd(55.82, -0.15, -18.05, 3.4)
pt3dadd(55.87, -0.1, -18.05, 3.4)
pt3dadd(55.91, 0, -18.05, 3.4)
pt3dadd(55.91, 0.1, -18.05, 3.4)
pt3dadd(55.87, 0.2, -19.1, 3.4)
pt3dadd(55.87, -0.2, -19.1, 3.4)
pt3dadd(55.91, -0.25, -19.1, 3.4)
pt3dadd(55.96, -0.25, -19.1, 3.4)
pt3dadd(56, -0.2, -19.1, 3.4)
pt3dadd(56.04, -0.1, -19.1, 3.4)
pt3dadd(56.09, -0.05, -19.1, 3.4)
pt3dadd(56.13, 0.05, -19.1, 3.4)
pt3dadd(56.22, 0.16, -19.1, 3.4)
pt3dadd(56.27, 0.2, -19.1, 3.4)
pt3dadd(56.31, 0.31, -19.1, 3.4)
pt3dadd(56.49, 0.51, -19.1, 3.4)
pt3dadd(56.53, 0.56, -19.1, 3.4)
pt3dadd(56.67, 0.71, -19.1, 3.4)
pt3dadd(56.76, 0.76, -19.1, 3.4)
pt3dadd(56.8, 0.81, -19.1, 3.4)
pt3dadd(56.85, 0.86, -19.1, 3.4)
pt3dadd(56.89, 0.96, -19.1, 3.4)
pt3dadd(56.94, 1.01, -19.1, 3.4)
pt3dadd(56.98, 1.07, -19.1, 3.4)
pt3dadd(57.07, 1.17, -19.1, 3.4)
pt3dadd(57.12, 1.22, -19.1, 3.4)
pt3dadd(57.16, 1.32, -19.1, 3.4)
pt3dadd(57.2, 1.37, -19.1, 3.4)
pt3dadd(57.29, 1.52, -19.1, 3.4)
pt3dadd(57.34, 1.57, -19.1, 3.4)
pt3dadd(57.42, 1.67, -19.1, 3.4)
pt3dadd(57.47, 1.73, -19.1, 3.4)
pt3dadd(57.51, 1.83, -19.1, 3.4)
pt3dadd(57.6, 1.88, -19.1, 3.4)
pt3dadd(57.65, 1.98, -19.1, 3.4)
pt3dadd(57.69, 2.08, -19.1, 3.4)
pt3dadd(57.74, 2.18, -19.1, 3.4)
pt3dadd(57.83, 2.28, -19.1, 3.4)
pt3dadd(57.87, 2.38, -19.1, 3.4)
pt3dadd(57.92, 2.48, -19.1, 3.4)
pt3dadd(58.01, 2.59, -19.1, 3.4)
pt3dadd(58.05, 2.68, -19.1, 3.4)
pt3dadd(58.1, 2.79, -19.1, 3.4)
pt3dadd(58.14, 2.89, -19.1, 3.4)
pt3dadd(58.23, 2.94, -19.1, 3.4)
pt3dadd(58.27, 3.04, -19.1, 3.4)
pt3dadd(58.32, 3.14, -19.1, 3.4)
pt3dadd(58.41, 3.24, -19.1, 3.4)
pt3dadd(58.49, 3.35, -19.1, 3.4)
pt3dadd(58.54, 3.39, -19.1, 3.4)
pt3dadd(58.63, 3.5, -19.1, 3.4)
pt3dadd(58.67, 3.6, -19.1, 3.4)
pt3dadd(58.76, 3.65, -19.1, 3.4)
}
}
proc shape3d_17() {
dend[1] { pt3dadd(58.81, 3.7, -19.1, 3.4)
pt3dadd(58.85, 3.8, -19.1, 3.4)
pt3dadd(58.9, 3.85, -19.1, 3.4)
pt3dadd(58.99, 3.95, -19.1, 3.4)
pt3dadd(59.03, 4.05, -19.1, 3.4)
pt3dadd(59.17, 4.2, -19.1, 3.4)
pt3dadd(59.21, 4.31, -19.1, 3.4)
pt3dadd(59.3, 4.41, -19.1, 3.4)
pt3dadd(59.34, 4.46, -19.1, 3.4)
pt3dadd(59.43, 4.56, -19.1, 3.4)
pt3dadd(59.48, 4.66, -19.1, 3.4)
pt3dadd(59.56, 4.76, -19.1, 3.4)
pt3dadd(59.61, 4.81, -19.1, 3.4)
pt3dadd(59.65, 4.91, -19.1, 3.4)
pt3dadd(59.7, 5.01, -19.1, 3.4)
pt3dadd(59.79, 5.12, -19.1, 3.4)
pt3dadd(59.88, 5.27, -19.1, 3.4)
pt3dadd(59.92, 5.37, -19.1, 3.4)
pt3dadd(59.97, 5.42, -19.1, 3.4)
pt3dadd(60.01, 5.52, -19.1, 3.4)
pt3dadd(60.06, 5.57, -19.1, 3.4)
pt3dadd(60.1, 5.62, -19.1, 3.4)
pt3dadd(60.15, 5.78, -19.1, 3.4)
pt3dadd(60.24, 5.93, -19.1, 3.4)
pt3dadd(60.28, 5.98, -19.1, 3.4)
pt3dadd(60.33, 6.08, -19.1, 3.4)
pt3dadd(60.37, 6.18, -19.1, 3.4)
pt3dadd(60.37, 6.28, -19.1, 3.4)
pt3dadd(60.46, 6.33, -19.1, 3.4)
pt3dadd(60.46, 6.53, -19.1, 3.4)
pt3dadd(60.55, 6.59, -19.1, 3.4)
pt3dadd(60.55, 6.74, -19.1, 3.4)
pt3dadd(60.59, 6.79, -19.1, 3.4)
pt3dadd(60.63, 6.89, -19.1, 3.4)
pt3dadd(60.68, 6.99, -19.1, 3.4)
pt3dadd(60.72, 7.09, -19.1, 3.4)
pt3dadd(60.77, 7.14, -19.1, 3.4)
pt3dadd(60.77, 7.24, -19.1, 3.4)
pt3dadd(60.81, 7.3, -19.1, 3.4)
pt3dadd(60.86, 7.34, -19.1, 3.4)
pt3dadd(60.86, 7.45, -19.1, 3.4)
pt3dadd(60.9, 7.55, -19.1, 3.4)
pt3dadd(60.95, 7.65, -19.1, 3.4)
pt3dadd(60.95, 7.75, -19.1, 3.4)
pt3dadd(60.99, 7.85, -19.1, 3.4)
pt3dadd(60.99, 8, -19.1, 3.4)
pt3dadd(61.04, 8.05, -19.1, 3.4)
pt3dadd(61.04, 8.2, -19.1, 3.4)
pt3dadd(61.08, 8.31, -19.1, 3.4)
pt3dadd(61.08, 8.51, -19.1, 3.4)
pt3dadd(61.13, 8.61, -19.1, 3.4)
pt3dadd(61.13, 14.23, -19.1, 3.4)
pt3dadd(61.17, 14.53, -19.1, 3.4)
pt3dadd(61.17, 14.44, -19.1, 3.4)
pt3dadd(61.17, 14.53, -19.1, 3.4)
pt3dadd(61.22, 14.59, -19.1, 3.4)
pt3dadd(61.26, 14.69, -19.1, 3.4)
pt3dadd(61.26, 14.84, -19.1, 3.4)
pt3dadd(61.31, 14.89, -19.1, 3.4)
pt3dadd(61.31, 15.04, -19.1, 3.4)
pt3dadd(61.35, 15.09, -19.1, 3.4)
pt3dadd(61.35, 15.24, -19.1, 3.4)
pt3dadd(61.4, 15.35, -19.1, 3.4)
pt3dadd(61.4, 15.45, -19.1, 3.4)
pt3dadd(61.44, 15.5, -19.1, 3.4)
pt3dadd(61.48, 15.6, -19.1, 3.4)
pt3dadd(61.48, 15.7, -19.1, 3.4)
pt3dadd(61.53, 15.8, -19.1, 3.4)
pt3dadd(61.57, 15.9, -19.1, 3.4)
pt3dadd(61.62, 16, -19.1, 3.4)
pt3dadd(61.62, 16.1, -19.1, 3.4)
pt3dadd(61.66, 16.2, -19.1, 3.4)
pt3dadd(61.71, 16.31, -19.1, 3.4)
pt3dadd(61.75, 16.36, -19.1, 3.4)
pt3dadd(61.79, 16.46, -19.1, 3.4)
pt3dadd(61.84, 16.51, -19.1, 3.4)
pt3dadd(61.88, 16.61, -19.1, 3.4)
pt3dadd(61.93, 16.66, -19.1, 3.4)
pt3dadd(61.93, 16.76, -19.1, 3.4)
pt3dadd(61.97, 16.86, -19.1, 3.4)
pt3dadd(62.06, 17.02, -19.1, 3.4)
pt3dadd(62.11, 17.12, -19.1, 3.4)
pt3dadd(62.2, 17.32, -19.1, 3.4)
pt3dadd(62.24, 17.42, -19.1, 3.4)
pt3dadd(62.28, 17.47, -19.1, 3.4)
pt3dadd(62.33, 17.63, -19.1, 3.4)
pt3dadd(62.38, 17.73, -19.1, 3.4)
pt3dadd(62.38, 17.83, -19.1, 3.4)
pt3dadd(62.42, 17.98, -19.1, 3.4)
pt3dadd(62.47, 18.03, -19.1, 3.4)
pt3dadd(62.55, 18.23, -19.1, 3.4)
pt3dadd(62.6, 18.33, -19.1, 3.4)
pt3dadd(62.64, 18.43, -19.1, 3.4)
pt3dadd(62.64, 18.58, -19.1, 3.4)
pt3dadd(62.73, 18.69, -19.1, 3.4)
pt3dadd(62.73, 18.84, -19.1, 3.4)
pt3dadd(62.78, 18.94, -19.1, 3.4)
pt3dadd(62.82, 19.04, -19.1, 3.4)
pt3dadd(62.82, 19.3, -19.1, 3.4)
pt3dadd(62.87, 19.4, -19.1, 3.4)
pt3dadd(62.87, 19.65, -19.1, 3.4)
pt3dadd(62.91, 19.75, -19.1, 3.4)
pt3dadd(62.91, 20.31, -19.1, 3.4)
pt3dadd(62.96, 20.36, -19.1, 3.4)
pt3dadd(62.96, 26.74, -19.1, 3.4)
pt3dadd(62.91, 26.84, -19.1, 3.4)
pt3dadd(62.91, 26.99, -19.1, 3.4)
pt3dadd(62.87, 27.04, -19.1, 3.4)
pt3dadd(62.87, 27.55, -19.1, 3.4)
pt3dadd(62.82, 27.6, -19.1, 3.4)
pt3dadd(62.78, 27.65, -19.1, 3.4)
pt3dadd(62.78, 27.85, -19.1, 3.4)
pt3dadd(62.73, 27.9, -19.1, 3.4)
pt3dadd(62.69, 27.95, -19.1, 3.4)
pt3dadd(62.69, 27.75, -18.05, 3.4)
pt3dadd(62.69, 27.8, -18.05, 3.4)
pt3dadd(62.64, 27.85, -18.05, 3.4)
pt3dadd(62.64, 27.95, -18.05, 3.4)
pt3dadd(62.6, 28, -18.05, 3.4)
pt3dadd(62.55, 28.06, -18.05, 3.4)
pt3dadd(62.55, 28.16, -18.05, 3.4)
pt3dadd(62.51, 28.26, -18.05, 3.4)
pt3dadd(62.47, 28.36, -18.05, 3.4)
pt3dadd(62.42, 28.46, -18.05, 3.4)
pt3dadd(62.38, 28.51, -18.05, 3.4)
pt3dadd(62.33, 28.56, -18.05, 3.4)
pt3dadd(62.28, 28.61, -18.05, 3.4)
pt3dadd(62.24, 28.71, -18.05, 3.4)
pt3dadd(62.2, 28.71, -18.05, 3.4)
pt3dadd(62.15, 28.76, -18.05, 3.4)
pt3dadd(62.11, 28.82, -18.05, 3.4)
pt3dadd(62.06, 28.92, -18.05, 3.4)
pt3dadd(62.06, 29.02, -18.05, 3.4)
pt3dadd(62.02, 29.12, -18.05, 3.4)
pt3dadd(61.97, 29.22, -18.05, 3.4)
pt3dadd(61.97, 29.32, -18.05, 3.4)
pt3dadd(61.93, 29.47, -18.05, 3.4)
pt3dadd(61.93, 29.67, -18.05, 3.4)
pt3dadd(61.88, 29.78, -18.05, 3.4)
pt3dadd(61.88, 31.5, -18.05, 3.4)
pt3dadd(61.93, 31.6, -18.05, 3.4)
pt3dadd(61.93, 32.51, -18.05, 3.4)
pt3dadd(61.97, 32.56, -18.05, 3.4)
pt3dadd(61.97, 32.97, -18.05, 3.4)
pt3dadd(62.02, 33.12, -18.05, 3.4)
pt3dadd(62.02, 34.13, -18.05, 3.4)
pt3dadd(62.06, 34.23, -18.05, 3.4)
pt3dadd(62.06, 34.38, -18.05, 3.4)
pt3dadd(62.11, 34.44, -18.05, 3.4)
pt3dadd(62.11, 34.64, -18.05, 3.4)
pt3dadd(62.15, 34.74, -18.05, 3.4)
pt3dadd(62.15, 34.84, -18.05, 3.4)
pt3dadd(62.2, 34.99, -18.05, 3.4)
pt3dadd(62.2, 35.09, -18.05, 3.4)
pt3dadd(62.24, 35.19, -18.05, 3.4)
pt3dadd(62.24, 35.29, -18.05, 3.4)
pt3dadd(62.28, 35.45, -18.05, 3.4)
pt3dadd(62.28, 35.6, -18.05, 3.4)
pt3dadd(62.33, 35.75, -18.05, 3.4)
pt3dadd(62.33, 36.06, -18.05, 3.4)
pt3dadd(62.38, 36.16, -18.05, 3.4)
pt3dadd(62.38, 36.51, -18.05, 3.4)
pt3dadd(62.42, 36.61, -18.05, 3.4)
pt3dadd(62.42, 36.76, -18.05, 3.4)
pt3dadd(62.47, 36.92, -18.05, 3.4)
pt3dadd(62.47, 37.02, -18.05, 3.4)
pt3dadd(62.51, 37.17, -18.05, 3.4)
pt3dadd(62.51, 37.42, -18.05, 3.4)
pt3dadd(62.55, 37.47, -18.05, 3.4)
pt3dadd(62.55, 37.78, -18.05, 3.4)
pt3dadd(62.6, 37.83, -18.05, 3.4)
pt3dadd(62.6, 38.03, -18.05, 3.4)
pt3dadd(62.64, 38.08, -18.05, 3.4)
pt3dadd(62.64, 38.28, -18.05, 3.4)
pt3dadd(62.69, 38.38, -18.05, 3.4)
pt3dadd(62.69, 38.59, -18.05, 3.4)
pt3dadd(62.73, 38.74, -18.05, 3.4)
pt3dadd(62.73, 38.84, -18.05, 3.4)
pt3dadd(62.78, 38.94, -18.05, 3.4)
pt3dadd(62.78, 39.1, -18.05, 3.4)
pt3dadd(62.82, 39.15, -18.05, 3.4)
pt3dadd(62.82, 39.24, -18.05, 3.4)
pt3dadd(62.87, 39.35, -18.05, 3.4)
pt3dadd(62.87, 39.6, -18.05, 3.4)
pt3dadd(62.91, 39.75, -18.05, 3.4)
pt3dadd(62.91, 39.85, -18.05, 3.4)
pt3dadd(62.96, 39.9, -18.05, 3.4)
pt3dadd(63, 40.01, -18.05, 3.4)
pt3dadd(63, 40.16, -18.05, 3.4)
pt3dadd(63.04, 40.21, -18.05, 3.4)
pt3dadd(63.04, 40.31, -18.05, 3.4)
pt3dadd(63.09, 40.41, -18.05, 3.4)
pt3dadd(63.13, 40.46, -18.05, 3.4)
pt3dadd(63.18, 40.51, -18.05, 3.4)
pt3dadd(63.22, 40.61, -18.05, 3.4)
pt3dadd(63.27, 40.92, -15.95, 3.57)
pt3dadd(63.27, 41.73, -15.95, 3.57)
pt3dadd(63.31, 41.83, -15.95, 3.57)
pt3dadd(63.31, 42.18, -15.95, 3.57)
pt3dadd(63.35, 42.23, -15.95, 3.57)
}
}
proc shape3d_18() {
dend[1] { pt3dadd(63.35, 42.44, -15.95, 3.57)
pt3dadd(63.4, 42.49, -15.95, 3.57)
pt3dadd(63.4, 42.79, -15.95, 3.57)
pt3dadd(63.44, 42.89, -15.95, 3.57)
pt3dadd(63.49, 42.99, -15.95, 3.57)
pt3dadd(63.49, 43.1, -15.95, 3.57)
pt3dadd(63.53, 43.19, -15.95, 3.57)
pt3dadd(63.53, 43.5, -15.95, 3.57)
pt3dadd(63.58, 43.55, -15.95, 3.57)
pt3dadd(63.58, 43.7, -15.95, 3.57)
pt3dadd(63.62, 43.75, -15.95, 3.57)
pt3dadd(63.67, 43.8, -15.95, 3.57)
pt3dadd(63.67, 43.9, -15.95, 3.57)
pt3dadd(63.71, 43.96, -15.95, 3.57)
pt3dadd(63.76, 44.06, -15.95, 3.57)
pt3dadd(63.76, 44.21, -15.95, 3.57)
pt3dadd(63.8, 44.26, -15.95, 3.57)
pt3dadd(63.85, 44.36, -15.95, 3.57)
pt3dadd(63.89, 44.46, -15.95, 3.57)
pt3dadd(63.89, 44.56, -15.95, 3.57)
pt3dadd(63.94, 44.67, -15.95, 3.57)
pt3dadd(63.98, 44.72, -15.95, 3.57)
pt3dadd(63.98, 44.87, -15.95, 3.57)
pt3dadd(64.03, 44.97, -15.95, 3.57)
pt3dadd(64.07, 45.07, -15.95, 3.57)
pt3dadd(64.11, 45.17, -15.95, 3.57)
pt3dadd(64.16, 45.22, -15.95, 3.57)
pt3dadd(64.2, 45.37, -15.95, 3.57)
pt3dadd(64.25, 45.47, -15.95, 3.57)
pt3dadd(64.25, 45.58, -15.95, 3.57)
pt3dadd(64.34, 45.68, -15.95, 3.57)
pt3dadd(64.38, 45.78, -15.95, 3.57)
pt3dadd(64.43, 45.88, -15.95, 3.57)
pt3dadd(64.47, 45.98, -15.95, 3.57)
pt3dadd(64.51, 46.03, -15.95, 3.57)
pt3dadd(64.56, 46.18, -15.95, 3.57)
pt3dadd(64.61, 46.28, -15.95, 3.57)
pt3dadd(64.65, 46.44, -15.95, 3.57)
pt3dadd(64.65, 46.54, -15.95, 3.57)
pt3dadd(64.74, 46.69, -15.95, 3.57)
pt3dadd(64.78, 46.84, -15.95, 3.57)
pt3dadd(64.83, 46.99, -15.95, 3.57)
pt3dadd(64.87, 47.1, -15.95, 3.57)
pt3dadd(64.87, 47.25, -15.95, 3.57)
pt3dadd(64.92, 47.35, -15.95, 3.57)
pt3dadd(64.96, 47.45, -15.95, 3.57)
pt3dadd(65, 47.6, -15.95, 3.57)
pt3dadd(65.05, 47.7, -15.95, 3.57)
pt3dadd(65.1, 47.85, -15.95, 3.57)
pt3dadd(65.14, 47.9, -15.95, 3.57)
pt3dadd(65.18, 48.01, -15.95, 3.57)
pt3dadd(65.23, 48.11, -15.95, 3.57)
pt3dadd(65.27, 48.21, -15.95, 3.57)
pt3dadd(65.32, 48.26, -15.95, 3.57)
pt3dadd(65.36, 48.36, -15.95, 3.57)
pt3dadd(65.36, 48.46, -15.95, 3.57)
pt3dadd(65.41, 48.56, -15.95, 3.57)
pt3dadd(65.45, 48.61, -15.95, 3.57)
pt3dadd(65.5, 48.67, -15.95, 3.57)
pt3dadd(65.5, 48.81, -15.95, 3.57)
pt3dadd(65.54, 48.92, -15.95, 3.57)
pt3dadd(65.58, 49.02, -15.95, 3.57)
pt3dadd(65.63, 49.12, -15.95, 3.57)
pt3dadd(65.68, 49.22, -15.95, 3.57)
pt3dadd(65.72, 49.32, -15.95, 3.57)
pt3dadd(65.76, 49.42, -15.95, 3.57)
pt3dadd(65.81, 49.58, -15.95, 3.57)
pt3dadd(65.85, 49.68, -15.95, 3.57)
pt3dadd(65.9, 49.78, -15.95, 3.57)
pt3dadd(65.94, 49.93, -15.95, 3.57)
pt3dadd(65.94, 50.03, -15.95, 3.57)
pt3dadd(65.99, 50.13, -15.95, 3.57)
pt3dadd(66.07, 50.24, -15.95, 3.57)
pt3dadd(66.12, 50.28, -15.95, 3.57)
pt3dadd(66.17, 50.44, -15.95, 3.57)
pt3dadd(66.21, 50.54, -15.95, 3.57)
pt3dadd(66.3, 50.59, -15.95, 3.57)
pt3dadd(66.3, 50.69, -15.95, 3.57)
pt3dadd(66.39, 50.79, -15.95, 3.57)
pt3dadd(66.43, 50.89, -15.95, 3.57)
pt3dadd(66.48, 50.99, -15.95, 3.57)
pt3dadd(66.48, 51.15, -15.95, 3.57)
pt3dadd(66.52, 51.19, -15.95, 3.57)
pt3dadd(66.57, 51.3, -15.95, 3.57)
pt3dadd(66.61, 51.4, -15.95, 3.57)
pt3dadd(66.61, 51.5, -15.95, 3.57)
pt3dadd(66.65, 51.6, -15.95, 3.57)
pt3dadd(66.7, 51.7, -15.95, 3.57)
pt3dadd(66.7, 51.8, -15.95, 3.57)
pt3dadd(66.75, 51.9, -15.95, 3.57)
pt3dadd(66.79, 51.96, -15.95, 3.57)
pt3dadd(66.79, 52.16, -15.95, 3.57)
pt3dadd(66.83, 52.26, -15.95, 3.57)
pt3dadd(66.88, 52.36, -15.95, 3.57)
pt3dadd(66.88, 52.51, -15.95, 3.57)
pt3dadd(66.92, 52.56, -15.95, 3.57)
pt3dadd(66.97, 52.62, -15.95, 3.57)
pt3dadd(66.97, 52.76, -15.95, 3.57)
pt3dadd(67.01, 52.87, -15.95, 3.57)
pt3dadd(67.06, 52.92, -15.95, 3.57)
pt3dadd(67.06, 53.02, -15.95, 3.57)
pt3dadd(67.1, 53.07, -15.95, 3.57)
pt3dadd(67.1, 53.47, -13.85, 3.4)
pt3dadd(67.1, 53.32, -13.85, 3.4)
pt3dadd(67.14, 53.27, -13.85, 3.4)
pt3dadd(67.19, 53.32, -13.85, 3.4)
pt3dadd(67.28, 53.37, -13.85, 3.4)
pt3dadd(67.32, 53.42, -13.85, 3.4)
pt3dadd(67.37, 53.53, -13.85, 3.4)
pt3dadd(67.41, 53.58, -13.85, 3.4)
pt3dadd(67.46, 53.68, -13.85, 3.4)
pt3dadd(67.55, 53.73, -13.85, 3.4)
pt3dadd(67.59, 53.83, -13.85, 3.4)
pt3dadd(67.64, 53.88, -13.85, 3.4)
pt3dadd(67.72, 53.98, -13.85, 3.4)
pt3dadd(67.77, 54.03, -13.85, 3.4)
pt3dadd(67.82, 54.13, -13.85, 3.4)
pt3dadd(67.9, 54.18, -13.85, 3.4)
pt3dadd(67.95, 54.24, -13.85, 3.4)
pt3dadd(67.99, 54.28, -13.85, 3.4)
pt3dadd(68.04, 54.33, -13.85, 3.4)
pt3dadd(68.08, 54.38, -13.85, 3.4)
pt3dadd(68.13, 54.44, -13.85, 3.4)
pt3dadd(68.17, 54.49, -13.85, 3.4)
pt3dadd(68.21, 54.54, -13.85, 3.4)
pt3dadd(68.26, 54.64, -13.85, 3.4)
pt3dadd(68.31, 54.69, -13.85, 3.4)
pt3dadd(68.35, 54.74, -13.85, 3.4)
pt3dadd(68.39, 54.79, -13.85, 3.4)
pt3dadd(68.44, 54.84, -13.85, 3.4)
pt3dadd(68.48, 54.89, -13.85, 3.4)
pt3dadd(68.53, 54.94, -13.85, 3.4)
pt3dadd(68.57, 54.99, -13.85, 3.4)
pt3dadd(68.62, 55.04, -13.85, 3.4)
pt3dadd(68.62, 55.15, -13.85, 3.4)
pt3dadd(68.66, 55.2, -13.85, 3.4)
pt3dadd(68.71, 55.25, -13.85, 3.4)
pt3dadd(68.75, 55.3, -13.85, 3.4)
pt3dadd(68.79, 55.35, -13.85, 3.4)
pt3dadd(68.84, 55.4, -13.85, 3.4)
pt3dadd(68.89, 55.45, -13.85, 3.4)
pt3dadd(68.93, 55.5, -13.85, 3.4)
pt3dadd(68.97, 55.55, -13.85, 3.4)
pt3dadd(69.02, 55.6, -13.85, 3.4)
pt3dadd(69.02, 55.7, -13.85, 3.4)
pt3dadd(69.06, 55.81, -13.85, 3.4)
pt3dadd(69.11, 55.85, -13.85, 3.4)
pt3dadd(69.11, 55.96, -13.85, 3.4)
pt3dadd(69.15, 56.01, -13.85, 3.4)
pt3dadd(69.15, 58.44, -13.85, 3.4)
pt3dadd(69.11, 58.59, -13.85, 3.4)
pt3dadd(69.11, 58.89, -13.85, 3.4)
pt3dadd(69.06, 58.99, -13.85, 3.4)
pt3dadd(69.06, 59.15, -13.85, 3.4)
pt3dadd(69.02, 59.25, -13.85, 3.4)
pt3dadd(69.02, 59.35, -13.85, 3.4)
pt3dadd(68.97, 59.45, -13.85, 3.4)
pt3dadd(68.97, 59.55, -13.85, 3.4)
pt3dadd(68.71, 59.75, -13.85, 4.25)
pt3dadd(68.71, 59.85, -13.85, 4.25)
pt3dadd(68.66, 59.9, -13.85, 4.25)
pt3dadd(68.66, 60.16, -13.85, 4.25)
pt3dadd(68.62, 60.21, -13.85, 4.25)
pt3dadd(68.62, 60.36, -13.85, 4.25)
pt3dadd(68.57, 60.41, -13.85, 4.25)
pt3dadd(68.53, 60.51, -13.85, 4.25)
pt3dadd(68.53, 60.62, -13.85, 4.25)
pt3dadd(68.48, 60.72, -13.85, 4.25)
pt3dadd(68.44, 60.77, -13.85, 4.25)
pt3dadd(68.44, 60.92, -13.85, 4.25)
pt3dadd(68.39, 60.97, -13.85, 4.25)
pt3dadd(68.35, 61.02, -13.85, 4.25)
pt3dadd(68.35, 61.58, -13.85, 4.25)
pt3dadd(68.31, 61.68, -13.85, 4.25)
pt3dadd(68.31, 64.67, -13.85, 4.25)
pt3dadd(68.35, 64.77, -13.85, 4.25)
pt3dadd(68.35, 64.92, -13.85, 4.25)
pt3dadd(68.39, 64.97, -13.85, 4.25)
pt3dadd(68.39, 65.78, -13.85, 4.25)
pt3dadd(68.39, 66.44, -12.8, 4.93)
pt3dadd(68.39, 66.69, -12.8, 4.93)
pt3dadd(68.44, 66.79, -12.8, 4.93)
pt3dadd(68.44, 67.1, -12.8, 4.93)
pt3dadd(68.48, 67.2, -12.8, 4.93)
pt3dadd(68.48, 67.65, -12.8, 4.93)
pt3dadd(68.53, 67.75, -12.8, 4.93)
pt3dadd(68.53, 68.67, -12.8, 4.93)
pt3dadd(68.57, 68.71, -12.8, 4.93)
pt3dadd(68.57, 68.87, -12.8, 4.93)
pt3dadd(68.62, 68.97, -12.8, 4.93)
pt3dadd(68.62, 69.27, -12.8, 4.93)
pt3dadd(68.66, 69.43, -12.8, 4.93)
pt3dadd(68.71, 69.58, -12.8, 4.93)
pt3dadd(68.71, 70.14, -12.8, 4.93)
pt3dadd(68.75, 70.18, -12.8, 4.93)
pt3dadd(68.75, 70.44, -12.8, 4.93)
pt3dadd(68.79, 70.54, -12.8, 4.93)
pt3dadd(68.79, 70.64, -12.8, 4.93)
pt3dadd(68.84, 70.69, -12.8, 4.93)
pt3dadd(68.89, 70.79, -12.8, 4.93)
}
}
proc shape3d_19() {
dend[1] { pt3dadd(68.93, 70.89, -12.8, 4.93)
pt3dadd(68.97, 71, -12.8, 4.93)
pt3dadd(69.06, 71.1, -12.8, 4.93)
pt3dadd(69.11, 71.2, -12.8, 4.93)
pt3dadd(69.15, 71.25, -12.8, 4.93)
pt3dadd(69.15, 71.35, -12.8, 4.93)
pt3dadd(69.19, 71.4, -12.8, 4.93)
pt3dadd(69.24, 71.5, -12.8, 4.93)
pt3dadd(69.29, 71.55, -12.8, 4.93)
pt3dadd(69.33, 71.6, -12.8, 4.93)
pt3dadd(69.38, 71.71, -12.8, 4.93)
pt3dadd(69.42, 71.81, -12.8, 4.93)
pt3dadd(69.46, 71.86, -12.8, 4.93)
pt3dadd(70.18, 72.31, -12.8, 6.11)
}
dend[2] {pt3dclear()
pt3dadd(70.18, 72.31, -12.8, 4.08)
pt3dadd(70.4, 72.16, -13.85, 4.08)
pt3dadd(70.53, 72.16, -13.85, 4.08)
pt3dadd(70.67, 72.11, -13.85, 4.08)
pt3dadd(70.8, 72.06, -13.85, 4.08)
pt3dadd(70.89, 72.06, -13.85, 4.08)
pt3dadd(71.02, 72.01, -13.85, 4.08)
pt3dadd(71.11, 72.01, -13.85, 4.08)
pt3dadd(70.8, 72.11, -13.85, 4.59)
pt3dadd(70.89, 72.11, -13.85, 4.59)
pt3dadd(71.02, 72.06, -13.85, 4.59)
pt3dadd(71.2, 72.01, -13.85, 4.59)
pt3dadd(71.33, 71.96, -13.85, 4.59)
pt3dadd(71.51, 71.91, -13.85, 4.59)
pt3dadd(71.65, 71.81, -13.85, 4.59)
pt3dadd(71.78, 71.81, -13.85, 4.59)
pt3dadd(71.87, 71.75, -13.85, 4.59)
pt3dadd(71.92, 71.65, -13.85, 4.59)
pt3dadd(72, 71.6, -13.85, 4.59)
pt3dadd(72.09, 71.55, -13.85, 4.59)
pt3dadd(72.18, 71.55, -13.85, 4.59)
pt3dadd(72.27, 71.45, -13.85, 4.59)
pt3dadd(72.36, 71.4, -13.85, 4.59)
pt3dadd(72.4, 71.35, -13.85, 4.59)
pt3dadd(72.5, 71.3, -13.85, 4.59)
pt3dadd(72.58, 71.2, -13.85, 4.59)
pt3dadd(72.72, 71.1, -13.85, 4.59)
pt3dadd(72.81, 71.04, -13.85, 4.59)
pt3dadd(72.99, 71, -13.85, 4.59)
pt3dadd(73.07, 70.94, -13.85, 4.59)
pt3dadd(73.12, 70.84, -13.85, 4.59)
pt3dadd(73.16, 70.79, -13.85, 4.59)
pt3dadd(73.21, 70.74, -13.85, 4.59)
pt3dadd(73.25, 70.69, -13.85, 4.59)
pt3dadd(73.3, 70.64, -13.85, 4.59)
pt3dadd(73.39, 70.64, -13.85, 4.59)
pt3dadd(73.52, 70.54, -13.85, 4.59)
pt3dadd(73.61, 70.49, -13.85, 4.59)
pt3dadd(73.65, 70.39, -13.85, 4.59)
pt3dadd(73.79, 70.34, -13.85, 4.59)
pt3dadd(73.88, 70.29, -13.85, 4.59)
pt3dadd(73.96, 70.24, -13.85, 4.59)
pt3dadd(74.06, 70.14, -13.85, 4.59)
pt3dadd(74.19, 70.08, -13.85, 4.59)
pt3dadd(74.32, 70.03, -13.85, 4.59)
pt3dadd(74.41, 69.93, -13.85, 4.59)
pt3dadd(74.54, 69.88, -13.85, 4.59)
pt3dadd(74.64, 69.83, -13.85, 4.59)
pt3dadd(74.72, 69.78, -13.85, 4.59)
pt3dadd(74.86, 69.78, -13.85, 4.59)
pt3dadd(74.9, 69.73, -13.85, 4.59)
pt3dadd(74.99, 69.68, -13.85, 4.59)
pt3dadd(75.08, 69.63, -13.85, 4.59)
pt3dadd(75.17, 69.58, -13.85, 4.59)
pt3dadd(75.3, 69.58, -13.85, 4.59)
pt3dadd(75.35, 69.53, -13.85, 4.59)
pt3dadd(75.66, 69.53, -13.85, 4.59)
pt3dadd(75.75, 69.47, -13.85, 4.59)
pt3dadd(76.82, 69.47, -13.85, 4.59)
pt3dadd(76.91, 69.43, -13.85, 4.59)
pt3dadd(77.13, 69.43, -13.85, 4.59)
pt3dadd(77.26, 69.38, -13.85, 4.59)
pt3dadd(77.4, 69.32, -13.85, 4.59)
pt3dadd(77.49, 69.27, -13.85, 4.59)
pt3dadd(77.58, 69.27, -13.85, 4.59)
pt3dadd(77.62, 69.22, -13.85, 4.59)
pt3dadd(77.98, 69.22, -13.85, 4.59)
pt3dadd(78.07, 69.17, -13.85, 4.59)
pt3dadd(78.16, 69.12, -13.85, 4.59)
pt3dadd(78.29, 69.07, -13.85, 4.59)
pt3dadd(78.43, 69.07, -13.85, 4.59)
pt3dadd(78.56, 69.02, -13.85, 4.59)
pt3dadd(78.65, 69.02, -13.85, 4.59)
pt3dadd(78.69, 68.97, -13.85, 4.59)
pt3dadd(78.78, 68.97, -13.85, 4.59)
pt3dadd(78.87, 68.92, -13.85, 4.59)
pt3dadd(78.96, 68.92, -13.85, 4.59)
pt3dadd(79, 68.87, -13.85, 4.59)
pt3dadd(79.09, 68.82, -13.85, 4.59)
pt3dadd(79.27, 68.82, -13.85, 4.59)
pt3dadd(79.4, 68.77, -13.85, 4.59)
pt3dadd(79.45, 68.67, -13.85, 4.59)
pt3dadd(79.63, 68.71, -15.95, 4.59)
pt3dadd(79.67, 68.67, -15.95, 4.59)
pt3dadd(79.76, 68.61, -15.95, 4.59)
pt3dadd(79.85, 68.57, -15.95, 4.59)
pt3dadd(79.89, 68.46, -15.95, 4.59)
pt3dadd(80.16, 68.16, -15.95, 4.59)
pt3dadd(80.25, 68.06, -15.95, 4.59)
pt3dadd(80.39, 67.9, -15.95, 4.59)
pt3dadd(80.43, 67.86, -15.95, 4.59)
pt3dadd(80.47, 67.75, -15.95, 4.59)
pt3dadd(80.52, 67.65, -15.95, 4.59)
pt3dadd(80.52, 67.3, -15.95, 4.59)
pt3dadd(80.57, 67.25, -15.95, 4.59)
pt3dadd(80.61, 67.15, -15.95, 4.59)
pt3dadd(80.61, 66.94, -15.95, 4.59)
pt3dadd(80.65, 66.79, -15.95, 4.59)
pt3dadd(80.65, 66.64, -15.95, 4.59)
pt3dadd(80.7, 66.54, -15.95, 4.59)
pt3dadd(80.7, 66.24, -15.95, 4.59)
pt3dadd(80.74, 66.18, -15.95, 4.59)
pt3dadd(80.79, 66.08, -15.95, 4.59)
pt3dadd(80.79, 65.93, -15.95, 4.59)
pt3dadd(80.83, 65.83, -15.95, 4.59)
pt3dadd(80.88, 65.73, -15.95, 4.59)
pt3dadd(80.96, 65.63, -15.95, 4.59)
pt3dadd(81.01, 65.53, -15.95, 4.59)
pt3dadd(81.06, 65.43, -15.95, 4.59)
pt3dadd(81.1, 65.32, -15.95, 4.59)
pt3dadd(81.1, 64.87, -15.95, 4.59)
pt3dadd(81.14, 64.82, -15.95, 4.59)
pt3dadd(81.14, 64.61, -15.95, 4.59)
pt3dadd(81.19, 64.57, -15.95, 4.59)
pt3dadd(81.23, 64.46, -15.95, 4.59)
pt3dadd(81.28, 64.36, -15.95, 4.59)
pt3dadd(81.32, 64.26, -15.95, 4.59)
pt3dadd(81.41, 64.21, -15.95, 4.59)
pt3dadd(81.46, 64.11, -15.95, 4.59)
pt3dadd(81.54, 63.96, -15.95, 4.59)
pt3dadd(81.59, 63.85, -15.95, 4.59)
pt3dadd(81.68, 63.7, -15.95, 4.59)
pt3dadd(81.77, 63.6, -15.95, 4.59)
pt3dadd(81.81, 63.5, -15.95, 4.59)
pt3dadd(81.9, 63.35, -15.95, 4.59)
pt3dadd(81.95, 63.25, -15.95, 4.59)
pt3dadd(81.99, 63.15, -15.95, 4.59)
pt3dadd(82.08, 63.04, -15.95, 4.59)
pt3dadd(82.13, 62.89, -15.95, 4.59)
pt3dadd(82.17, 62.79, -15.95, 4.59)
pt3dadd(82.17, 62.64, -15.95, 4.59)
pt3dadd(82.21, 62.54, -15.95, 4.59)
pt3dadd(82.3, 62.39, -15.95, 4.59)
pt3dadd(82.3, 62.24, -15.95, 4.59)
pt3dadd(82.35, 62.13, -15.95, 4.59)
pt3dadd(82.44, 62.03, -15.95, 4.59)
pt3dadd(82.44, 61.83, -15.95, 4.59)
pt3dadd(82.48, 61.73, -15.95, 4.59)
pt3dadd(82.48, 61.32, -15.95, 4.59)
pt3dadd(82.57, 61.17, -17, 4.25)
pt3dadd(82.57, 60.87, -17, 4.25)
pt3dadd(82.61, 60.77, -17, 4.25)
pt3dadd(82.61, 59.6, -17, 4.25)
pt3dadd(82.66, 59.5, -17, 4.25)
pt3dadd(82.71, 59.45, -17, 4.25)
pt3dadd(82.75, 59.4, -17, 4.25)
pt3dadd(82.79, 59.3, -17, 4.25)
pt3dadd(82.84, 59.2, -17, 4.25)
pt3dadd(82.84, 59.1, -17, 4.25)
pt3dadd(82.88, 59.04, -17, 4.25)
pt3dadd(82.93, 58.99, -17, 4.25)
pt3dadd(82.97, 58.94, -17, 4.25)
pt3dadd(83.02, 58.89, -17, 4.25)
pt3dadd(83.06, 58.84, -17, 4.25)
pt3dadd(83.11, 58.79, -17, 4.25)
pt3dadd(83.19, 58.74, -17, 4.25)
pt3dadd(83.24, 58.69, -17, 4.25)
pt3dadd(83.29, 58.64, -17, 4.25)
pt3dadd(83.37, 58.59, -17, 4.25)
pt3dadd(83.46, 58.54, -17, 4.25)
pt3dadd(84.49, 58.54, -17, 4.25)
pt3dadd(84.8, 58.59, -17, 4.25)
pt3dadd(86.49, 58.59, -17, 4.25)
pt3dadd(86.63, 58.64, -17, 4.25)
pt3dadd(86.76, 58.69, -17, 4.25)
pt3dadd(86.99, 58.69, -17, 4.25)
pt3dadd(87.07, 58.74, -17, 4.25)
pt3dadd(87.21, 58.74, -17, 4.25)
pt3dadd(87.25, 58.79, -17, 4.25)
pt3dadd(87.29, 58.84, -17, 4.25)
pt3dadd(87.39, 58.84, -17, 4.25)
pt3dadd(87.43, 58.89, -17, 4.25)
pt3dadd(87.52, 58.94, -17, 4.25)
pt3dadd(87.61, 58.99, -17, 4.25)
pt3dadd(87.7, 59.04, -17, 4.25)
pt3dadd(87.83, 59.04, -17, 4.25)
pt3dadd(87.88, 59.1, -17, 4.25)
pt3dadd(87.96, 59.15, -17, 4.25)
pt3dadd(88.06, 59.2, -17, 4.25)
pt3dadd(88.14, 59.2, -17, 4.25)
pt3dadd(88.19, 59.25, -17, 4.25)
pt3dadd(88.32, 59.25, -17, 4.25)
pt3dadd(88.36, 59.3, -17, 4.25)
pt3dadd(88.41, 59.35, -17, 4.25)
pt3dadd(88.54, 59.35, -17, 4.25)
pt3dadd(88.63, 59.4, -17, 4.25)
}
}
proc shape3d_20() {
dend[2] { pt3dadd(88.72, 59.45, -17, 4.25)
pt3dadd(88.77, 59.5, -17, 4.25)
pt3dadd(88.9, 59.5, -17, 4.25)
pt3dadd(88.99, 59.55, -17, 4.25)
pt3dadd(89.04, 59.6, -17, 4.25)
}
dend[3] {pt3dclear()
pt3dadd(89.04, 59.6, -17, 3.91)
pt3dadd(89.17, 58.33, -22.25, 3.91)
pt3dadd(89.17, 57.98, -22.25, 3.91)
pt3dadd(89.21, 57.88, -22.25, 3.91)
pt3dadd(89.21, 57.47, -22.25, 3.91)
pt3dadd(89.26, 57.42, -22.25, 3.91)
pt3dadd(89.3, 57.32, -22.25, 3.91)
pt3dadd(89.3, 57.22, -22.25, 3.91)
pt3dadd(89.35, 57.12, -22.25, 3.91)
pt3dadd(89.39, 57.07, -22.25, 3.91)
pt3dadd(89.43, 57.02, -22.25, 3.91)
pt3dadd(89.48, 56.92, -22.25, 3.91)
pt3dadd(89.53, 56.82, -22.25, 3.91)
pt3dadd(89.57, 56.76, -22.25, 3.91)
pt3dadd(89.57, 56.67, -22.25, 3.91)
pt3dadd(89.61, 56.62, -22.25, 3.91)
pt3dadd(89.66, 56.51, -22.25, 3.91)
pt3dadd(89.7, 56.41, -22.25, 3.91)
pt3dadd(89.75, 56.36, -22.25, 3.91)
pt3dadd(89.75, 56.26, -22.25, 3.91)
pt3dadd(89.79, 56.06, -23.3, 3.57)
pt3dadd(89.84, 55.96, -23.3, 3.57)
pt3dadd(89.88, 55.85, -23.3, 3.57)
pt3dadd(89.93, 55.75, -23.3, 3.57)
pt3dadd(90.01, 55.6, -23.3, 3.57)
pt3dadd(90.11, 55.45, -23.3, 3.57)
pt3dadd(90.19, 55.3, -23.3, 3.57)
pt3dadd(90.24, 55.25, -23.3, 3.57)
pt3dadd(90.28, 55.15, -23.3, 3.57)
pt3dadd(90.33, 54.99, -23.3, 3.57)
pt3dadd(90.37, 54.94, -23.3, 3.57)
pt3dadd(90.42, 54.89, -23.3, 3.57)
pt3dadd(90.42, 54.79, -23.3, 3.57)
pt3dadd(90.46, 54.74, -23.3, 3.57)
pt3dadd(90.46, 54.64, -23.3, 3.57)
pt3dadd(90.5, 54.54, -23.3, 3.57)
pt3dadd(90.55, 54.44, -23.3, 3.57)
pt3dadd(90.55, 54.28, -23.3, 3.57)
pt3dadd(90.6, 54.24, -23.3, 3.57)
pt3dadd(90.64, 54.18, -23.3, 3.57)
pt3dadd(90.68, 54.08, -23.3, 3.57)
pt3dadd(90.73, 53.98, -23.3, 3.57)
pt3dadd(90.77, 53.88, -23.3, 3.57)
pt3dadd(90.86, 53.83, -23.3, 3.57)
pt3dadd(90.86, 53.68, -23.3, 3.57)
pt3dadd(90.91, 53.58, -23.3, 3.57)
pt3dadd(90.95, 53.47, -23.3, 3.57)
pt3dadd(91, 53.37, -23.3, 3.57)
pt3dadd(91.04, 53.27, -23.3, 3.57)
pt3dadd(91.04, 53.17, -23.3, 3.57)
pt3dadd(91.08, 53.02, -23.3, 3.57)
pt3dadd(91.13, 52.92, -23.3, 3.57)
pt3dadd(91.18, 52.82, -23.3, 3.57)
pt3dadd(91.18, 52.62, -23.3, 3.57)
pt3dadd(91.22, 52.51, -23.3, 3.57)
pt3dadd(91.22, 52.26, -23.3, 3.57)
pt3dadd(91.26, 52.16, -23.3, 3.57)
pt3dadd(91.35, 52.16, -26.45, 3.57)
pt3dadd(91.4, 52.11, -26.45, 3.57)
pt3dadd(91.44, 52.01, -26.45, 3.57)
pt3dadd(91.49, 51.9, -26.45, 3.57)
pt3dadd(91.57, 51.75, -26.45, 3.57)
pt3dadd(91.67, 51.65, -26.45, 3.57)
pt3dadd(91.71, 51.55, -26.45, 3.57)
pt3dadd(91.8, 51.45, -26.45, 3.57)
pt3dadd(91.89, 51.35, -26.45, 3.57)
pt3dadd(91.98, 51.25, -26.45, 3.57)
pt3dadd(92.02, 51.19, -26.45, 3.57)
pt3dadd(92.07, 51.15, -26.45, 3.57)
pt3dadd(92.15, 51.04, -26.45, 3.57)
pt3dadd(92.25, 50.99, -26.45, 3.57)
pt3dadd(92.38, 50.84, -26.45, 3.57)
pt3dadd(92.47, 50.79, -26.45, 3.57)
pt3dadd(92.51, 50.74, -26.45, 3.57)
pt3dadd(92.64, 50.64, -26.45, 3.57)
pt3dadd(92.74, 50.59, -26.45, 3.57)
pt3dadd(92.82, 50.54, -26.45, 3.57)
pt3dadd(92.96, 50.44, -26.45, 3.57)
pt3dadd(93.05, 50.33, -26.45, 3.57)
pt3dadd(93.14, 50.24, -26.45, 3.57)
pt3dadd(93.22, 50.13, -26.45, 3.57)
pt3dadd(93.36, 50.03, -26.45, 3.57)
pt3dadd(93.49, 49.98, -26.45, 3.57)
pt3dadd(93.58, 49.93, -26.45, 3.57)
pt3dadd(93.67, 49.88, -26.45, 3.57)
pt3dadd(93.71, 49.83, -26.45, 3.57)
pt3dadd(93.81, 49.78, -26.45, 3.57)
pt3dadd(93.89, 49.73, -26.45, 3.57)
pt3dadd(93.94, 49.68, -26.45, 3.57)
pt3dadd(94.03, 49.63, -26.45, 3.57)
pt3dadd(94.16, 49.47, -26.45, 3.57)
pt3dadd(94.29, 49.37, -26.45, 3.57)
pt3dadd(94.39, 49.32, -26.45, 3.57)
pt3dadd(94.43, 49.22, -26.45, 3.57)
pt3dadd(94.52, 49.17, -26.45, 3.57)
pt3dadd(94.56, 49.12, -26.45, 3.57)
pt3dadd(94.74, 48.92, -26.45, 3.57)
pt3dadd(94.83, 48.87, -26.45, 3.57)
pt3dadd(94.96, 48.72, -26.45, 3.57)
pt3dadd(95.05, 48.67, -26.45, 3.57)
pt3dadd(95.14, 48.56, -26.45, 3.57)
pt3dadd(95.19, 48.51, -26.45, 3.57)
pt3dadd(95.32, 48.36, -26.45, 3.57)
pt3dadd(95.41, 48.26, -26.45, 3.57)
pt3dadd(95.5, 48.16, -26.45, 3.57)
pt3dadd(95.59, 48.06, -26.45, 3.57)
pt3dadd(95.72, 47.9, -26.45, 3.57)
pt3dadd(95.86, 47.8, -26.45, 3.57)
pt3dadd(95.94, 47.7, -26.45, 3.57)
pt3dadd(95.99, 47.65, -26.45, 3.57)
pt3dadd(96.08, 47.6, -26.45, 3.57)
pt3dadd(96.12, 47.5, -26.45, 3.57)
pt3dadd(96.35, 47.25, -26.45, 3.57)
pt3dadd(96.43, 47.19, -26.45, 3.57)
pt3dadd(96.53, 47.1, -26.45, 3.57)
pt3dadd(96.61, 47.04, -26.45, 3.57)
pt3dadd(96.75, 46.89, -26.45, 3.57)
pt3dadd(96.88, 46.79, -26.45, 3.57)
pt3dadd(96.97, 46.69, -26.45, 3.57)
pt3dadd(97.11, 46.54, -26.45, 3.57)
pt3dadd(97.24, 46.38, -26.45, 3.57)
pt3dadd(97.33, 46.28, -26.45, 3.57)
pt3dadd(97.42, 46.18, -26.45, 3.57)
pt3dadd(97.46, 46.08, -26.45, 3.57)
pt3dadd(97.64, 45.88, -26.45, 3.57)
pt3dadd(97.68, 45.83, -26.45, 3.57)
pt3dadd(97.77, 45.73, -26.45, 3.57)
pt3dadd(97.86, 45.58, -26.45, 3.57)
pt3dadd(97.95, 45.47, -26.45, 3.57)
pt3dadd(98, 45.42, -26.45, 3.57)
pt3dadd(98.04, 45.32, -26.45, 3.57)
pt3dadd(98.08, 45.27, -26.45, 3.57)
pt3dadd(98.13, 45.22, -26.45, 3.57)
pt3dadd(98.18, 45.17, -26.45, 3.57)
pt3dadd(98.18, 45.12, -26.45, 3.57)
pt3dadd(98.22, 45.12, -30.65, 3.57)
pt3dadd(98.26, 45.07, -30.65, 3.57)
pt3dadd(98.35, 45.02, -30.65, 3.57)
pt3dadd(98.44, 44.97, -30.65, 3.57)
pt3dadd(98.53, 44.87, -30.65, 3.57)
pt3dadd(98.62, 44.81, -30.65, 3.57)
pt3dadd(98.93, 44.46, -30.65, 3.57)
pt3dadd(99.02, 44.41, -30.65, 3.57)
pt3dadd(99.07, 44.31, -30.65, 3.57)
pt3dadd(99.11, 44.26, -30.65, 3.57)
pt3dadd(99.15, 44.16, -30.65, 3.57)
pt3dadd(99.25, 44.06, -30.65, 3.57)
pt3dadd(99.29, 44.01, -30.65, 3.57)
pt3dadd(99.38, 43.9, -30.65, 3.57)
pt3dadd(99.42, 43.85, -30.65, 3.57)
pt3dadd(99.51, 43.75, -30.65, 3.57)
pt3dadd(99.56, 43.7, -30.65, 3.57)
pt3dadd(99.64, 43.6, -30.65, 3.57)
pt3dadd(99.69, 43.55, -30.65, 3.57)
pt3dadd(99.74, 43.5, -30.65, 3.57)
pt3dadd(99.82, 43.4, -30.65, 3.57)
pt3dadd(99.87, 43.3, -30.65, 3.57)
pt3dadd(99.91, 43.24, -30.65, 3.57)
pt3dadd(100, 43.19, -30.65, 3.57)
pt3dadd(100.09, 43.1, -30.65, 3.57)
pt3dadd(100.14, 42.99, -30.65, 3.57)
pt3dadd(100.32, 42.79, -30.65, 3.57)
pt3dadd(100.54, 42.54, -30.65, 3.57)
pt3dadd(100.63, 42.44, -30.65, 3.57)
pt3dadd(100.71, 42.28, -30.65, 3.57)
pt3dadd(100.81, 42.13, -30.65, 3.57)
pt3dadd(100.94, 42.03, -30.65, 3.57)
pt3dadd(101.03, 41.88, -30.65, 3.57)
pt3dadd(101.12, 41.78, -30.65, 3.57)
pt3dadd(101.16, 41.68, -30.65, 3.57)
pt3dadd(101.25, 41.58, -30.65, 3.57)
pt3dadd(101.47, 41.32, -30.65, 3.57)
pt3dadd(101.56, 41.22, -30.65, 3.57)
pt3dadd(101.61, 41.12, -30.65, 3.57)
pt3dadd(101.74, 40.97, -30.65, 3.57)
pt3dadd(101.79, 40.87, -30.65, 3.57)
pt3dadd(101.83, 40.81, -30.65, 3.57)
pt3dadd(101.88, 40.72, -30.65, 3.57)
pt3dadd(101.96, 40.61, -30.65, 3.57)
pt3dadd(102.01, 40.51, -30.65, 3.57)
pt3dadd(102.14, 40.36, -30.65, 3.57)
pt3dadd(102.19, 40.26, -30.65, 3.57)
pt3dadd(102.23, 40.16, -30.65, 3.57)
pt3dadd(102.32, 40.11, -30.65, 3.57)
pt3dadd(102.36, 39.96, -30.65, 3.57)
pt3dadd(102.41, 39.85, -30.65, 3.57)
pt3dadd(102.5, 39.75, -30.65, 3.57)
pt3dadd(102.54, 39.65, -30.65, 3.57)
pt3dadd(102.68, 39.5, -30.65, 3.57)
pt3dadd(102.72, 39.4, -30.65, 3.57)
pt3dadd(102.81, 39.24, -30.65, 3.57)
pt3dadd(102.9, 39.19, -30.65, 3.57)
pt3dadd(102.94, 39.1, -30.65, 3.57)
pt3dadd(102.99, 38.99, -30.65, 3.57)
pt3dadd(103.03, 38.89, -30.65, 3.57)
}
}
proc shape3d_21() {
dend[3] { pt3dadd(103.08, 38.79, -30.65, 3.57)
pt3dadd(103.12, 38.74, -30.65, 3.57)
pt3dadd(103.12, 38.64, -30.65, 3.57)
pt3dadd(103.21, 38.49, -30.65, 3.57)
pt3dadd(103.26, 38.38, -30.65, 3.57)
pt3dadd(103.26, 38.28, -30.65, 3.57)
pt3dadd(103.3, 38.18, -30.65, 3.57)
pt3dadd(103.35, 38.13, -30.65, 3.57)
pt3dadd(103.35, 37.93, -30.65, 3.57)
pt3dadd(103.39, 37.83, -30.65, 3.57)
pt3dadd(103.43, 37.73, -30.65, 3.57)
pt3dadd(103.48, 37.63, -30.65, 3.57)
pt3dadd(103.53, 37.53, -30.65, 3.57)
pt3dadd(103.57, 37.42, -30.65, 3.57)
pt3dadd(103.61, 37.32, -30.65, 3.57)
pt3dadd(103.66, 37.27, -30.65, 3.57)
pt3dadd(103.66, 37.17, -30.65, 3.57)
pt3dadd(103.7, 37.12, -30.65, 3.57)
pt3dadd(103.7, 37.02, -30.65, 3.57)
pt3dadd(103.75, 36.92, -30.65, 3.57)
pt3dadd(103.79, 36.87, -30.65, 3.57)
pt3dadd(103.83, 36.76, -30.65, 3.57)
pt3dadd(103.88, 36.72, -30.65, 3.57)
pt3dadd(103.93, 36.61, -30.65, 3.57)
pt3dadd(103.93, 36.51, -30.65, 3.57)
pt3dadd(103.97, 36.41, -30.65, 3.57)
pt3dadd(104.06, 36.31, -30.65, 3.57)
pt3dadd(104.1, 36.21, -30.65, 3.57)
pt3dadd(104.15, 36.16, -30.65, 3.57)
pt3dadd(104.19, 36.01, -30.65, 3.57)
pt3dadd(104.24, 35.9, -30.65, 3.57)
pt3dadd(104.33, 35.8, -30.65, 3.57)
pt3dadd(104.37, 35.65, -30.65, 3.57)
pt3dadd(104.42, 35.55, -30.65, 3.57)
pt3dadd(104.46, 35.45, -30.65, 3.57)
pt3dadd(104.55, 35.35, -30.65, 3.57)
pt3dadd(104.6, 35.24, -30.65, 3.57)
pt3dadd(104.6, 35.15, -30.65, 3.57)
pt3dadd(104.64, 35.04, -30.65, 3.57)
pt3dadd(104.77, 34.89, -30.65, 3.57)
pt3dadd(104.82, 34.79, -30.65, 3.57)
pt3dadd(104.82, 34.59, -30.65, 3.57)
pt3dadd(104.86, 34.49, -30.65, 3.57)
pt3dadd(104.86, 34.33, -30.65, 3.57)
pt3dadd(104.9, 34.23, -30.65, 3.57)
pt3dadd(104.9, 34.13, -30.65, 3.57)
pt3dadd(104.95, 34.03, -30.65, 3.57)
pt3dadd(105, 33.93, -30.65, 3.57)
pt3dadd(105, 33.83, -30.65, 3.57)
pt3dadd(105.04, 33.78, -30.65, 3.57)
pt3dadd(105.04, 33.67, -30.65, 3.57)
pt3dadd(105.08, 33.58, -30.65, 3.57)
pt3dadd(105.13, 33.47, -30.65, 3.57)
pt3dadd(105.17, 33.42, -30.65, 3.57)
pt3dadd(105.17, 33.27, -30.65, 3.57)
pt3dadd(105.22, 33.17, -30.65, 3.57)
pt3dadd(105.26, 33.07, -30.65, 3.57)
pt3dadd(105.35, 32.92, -30.65, 3.57)
pt3dadd(105.4, 32.81, -30.65, 3.57)
pt3dadd(105.49, 32.66, -30.65, 3.57)
pt3dadd(105.49, 32.56, -30.65, 3.57)
pt3dadd(105.57, 32.46, -30.65, 3.57)
pt3dadd(105.57, 32.36, -30.65, 3.57)
pt3dadd(105.62, 32.31, -30.65, 3.57)
pt3dadd(105.67, 32.21, -30.65, 3.57)
pt3dadd(105.67, 32.1, -30.65, 3.57)
pt3dadd(105.71, 32.01, -30.65, 3.57)
pt3dadd(105.8, 31.9, -30.65, 3.57)
pt3dadd(105.89, 31.8, -30.65, 3.57)
pt3dadd(105.93, 31.65, -30.65, 3.57)
pt3dadd(105.97, 31.5, -30.65, 3.57)
pt3dadd(106.07, 31.4, -30.65, 3.57)
pt3dadd(106.07, 31.3, -30.65, 3.57)
pt3dadd(106.15, 31.15, -30.65, 3.57)
pt3dadd(106.15, 31.04, -30.65, 3.57)
pt3dadd(106.2, 30.99, -30.65, 3.57)
pt3dadd(106.2, 30.89, -30.65, 3.57)
pt3dadd(106.24, 30.84, -30.65, 3.57)
pt3dadd(106.24, 30.74, -30.65, 3.57)
pt3dadd(106.29, 30.84, -31.7, 3.57)
pt3dadd(106.74, 28.76, -31.7, 3.57)
pt3dadd(106.74, 26.43, -31.7, 3.57)
pt3dadd(106.82, 26.23, -33.8, 3.4)
pt3dadd(106.82, 26.08, -33.8, 3.4)
pt3dadd(106.87, 25.93, -33.8, 3.4)
pt3dadd(106.91, 25.83, -33.8, 3.4)
pt3dadd(106.91, 25.67, -33.8, 3.4)
pt3dadd(114.89, 7.43, 0, 2.48)
pt3dadd(121.31, -11.06, 0, 2.48)
pt3dadd(121.7, -24.9, 0, 2.48)
pt3dadd(121, -39.47, 0, 2.48)
pt3dadd(114.58, -52.57, 0, 2.48)
pt3dadd(113.11, -54.9, 0, 2.48)
}
dend[4] {pt3dclear()
pt3dadd(89.04, 59.6, -17, 3.72)
pt3dadd(98.09, 53.6, 0, 3.72)
pt3dadd(104.36, 47.6, 0, 3.72)
pt3dadd(109.71, 47.48, 0, 3.72)
}
dend[5] {pt3dclear()
pt3dadd(109.71, 47.48, 0, 3.1)
pt3dadd(113.65, 47.36, 0, 3.1)
pt3dadd(117.29, 40.87, 0, 3.1)
pt3dadd(122.64, 19.44, 0, 3.1)
pt3dadd(127.2, -4.2, 0, 3.1)
pt3dadd(131.93, -12.89, 0, 3.1)
pt3dadd(135.88, -14.73, 0, 3.1)
}
dend[6] {pt3dclear()
pt3dadd(109.71, 47.48, 0, 2.48)
pt3dadd(114.43, 62.05, 0, 2.48)
pt3dadd(116.68, 71.48, 0, 2.48)
pt3dadd(120.78, 80.67, 0, 2.48)
pt3dadd(131.07, 89.36, 0, 2.48)
pt3dadd(151.43, 101.24, 0, 2.48)
pt3dadd(174.9, 111.89, 0, 2.48)
pt3dadd(183.49, 116.67, 0, 2.48)
}
dend[7] {pt3dclear()
pt3dadd(89.04, 59.6, -17, 4.25)
pt3dadd(89.17, 59.45, -19.1, 4.25)
pt3dadd(89.3, 59.5, -19.1, 4.25)
pt3dadd(89.43, 59.55, -19.1, 4.25)
pt3dadd(89.57, 59.65, -19.1, 4.25)
pt3dadd(89.66, 59.65, -19.1, 4.25)
pt3dadd(89.75, 59.7, -19.1, 4.25)
pt3dadd(89.79, 59.75, -19.1, 4.25)
pt3dadd(89.97, 59.75, -19.1, 4.25)
pt3dadd(90.06, 59.81, -19.1, 4.25)
pt3dadd(90.11, 59.85, -19.1, 4.25)
pt3dadd(90.19, 59.85, -19.1, 4.25)
pt3dadd(90.28, 59.9, -19.1, 4.25)
pt3dadd(90.33, 59.96, -19.1, 4.25)
pt3dadd(90.37, 60.01, -19.1, 4.25)
pt3dadd(90.5, 60.01, -19.1, 4.25)
pt3dadd(90.55, 60.06, -19.1, 4.25)
pt3dadd(90.6, 60.11, -19.1, 4.25)
pt3dadd(90.68, 60.11, -19.1, 4.25)
pt3dadd(90.62, 60.4, -19.1, 4.25)
}
dend[8] {pt3dclear()
pt3dadd(70.18, 72.31, -12.8, 6.11)
pt3dadd(70.22, 72.26, -12.8, 6.11)
pt3dadd(70.26, 72.16, -12.8, 6.11)
pt3dadd(70.31, 72.11, -12.8, 6.11)
pt3dadd(70.36, 72.06, -12.8, 6.11)
pt3dadd(70.36, 71.96, -12.8, 6.11)
pt3dadd(70.44, 71.91, -12.8, 6.11)
pt3dadd(70.49, 71.81, -12.8, 6.11)
pt3dadd(70.53, 71.86, -12.8, 6.11)
pt3dadd(70.49, 71.96, -12.8, 6.11)
pt3dadd(70.49, 72.06, -12.8, 6.11)
pt3dadd(70.44, 72.11, -12.8, 6.11)
pt3dadd(70.4, 72.21, -12.8, 6.11)
pt3dadd(70.36, 72.31, -12.8, 6.11)
pt3dadd(70.31, 72.41, -12.8, 6.11)
pt3dadd(70.26, 72.46, -12.8, 6.11)
pt3dadd(70.13, 72.61, -12.8, 6.11)
pt3dadd(70.13, 72.72, -12.8, 6.11)
pt3dadd(70.04, 72.82, -12.8, 6.11)
pt3dadd(70.04, 72.92, -12.8, 6.11)
pt3dadd(70, 73.02, -12.8, 6.11)
pt3dadd(69.91, 73.07, -12.8, 6.11)
pt3dadd(69.86, 73.17, -12.8, 6.11)
pt3dadd(69.82, 73.22, -12.8, 6.11)
pt3dadd(69.82, 73.32, -12.8, 6.11)
pt3dadd(69.73, 73.43, -12.8, 6.11)
pt3dadd(69.68, 73.47, -12.8, 6.11)
pt3dadd(69.68, 73.58, -12.8, 6.11)
pt3dadd(69.64, 73.63, -12.8, 6.11)
pt3dadd(69.6, 73.73, -12.8, 6.11)
pt3dadd(69.55, 73.78, -12.8, 6.11)
pt3dadd(69.46, 73.83, -12.8, 6.11)
pt3dadd(69.42, 73.93, -12.8, 6.11)
pt3dadd(69.38, 73.98, -12.8, 6.11)
pt3dadd(69.38, 74.08, -12.8, 6.11)
pt3dadd(69.33, 74.18, -12.8, 6.11)
pt3dadd(69.29, 74.29, -12.8, 6.11)
pt3dadd(69.29, 74.49, -12.8, 6.11)
pt3dadd(70.4, 72.36, -11.75, 5.43)
pt3dadd(70.36, 72.36, -11.75, 5.43)
pt3dadd(70.36, 72.46, -11.75, 5.43)
pt3dadd(70.31, 72.51, -11.75, 5.43)
pt3dadd(70.26, 72.57, -11.75, 5.43)
pt3dadd(70.22, 72.61, -11.75, 5.43)
pt3dadd(70.18, 72.67, -11.75, 5.43)
pt3dadd(70.18, 72.77, -11.75, 5.43)
pt3dadd(70.13, 72.82, -11.75, 5.43)
pt3dadd(70.09, 72.87, -11.75, 5.43)
pt3dadd(70.04, 72.97, -11.75, 5.43)
pt3dadd(70, 73.02, -11.75, 5.43)
pt3dadd(70, 73.12, -11.75, 5.43)
pt3dadd(69.96, 73.22, -11.75, 5.43)
pt3dadd(69.91, 73.32, -11.75, 5.43)
pt3dadd(69.86, 73.38, -11.75, 5.43)
pt3dadd(69.82, 73.47, -11.75, 5.43)
pt3dadd(69.78, 73.58, -11.75, 5.43)
pt3dadd(69.73, 73.68, -11.75, 5.43)
pt3dadd(69.68, 73.78, -11.75, 5.43)
pt3dadd(69.64, 73.88, -11.75, 5.43)
pt3dadd(69.6, 73.93, -11.75, 5.43)
pt3dadd(69.55, 74.03, -11.75, 5.43)
pt3dadd(69.51, 74.14, -11.75, 5.43)
pt3dadd(69.42, 74.18, -11.75, 5.43)
pt3dadd(69.42, 74.29, -11.75, 5.43)
pt3dadd(69.38, 74.39, -11.75, 5.43)
pt3dadd(69.33, 74.49, -11.75, 5.43)
pt3dadd(69.29, 74.59, -11.75, 5.43)
pt3dadd(69.24, 74.64, -11.75, 5.43)
}
}
proc shape3d_22() {
dend[8] { pt3dadd(69.15, 74.64, -11.75, 5.43)
pt3dadd(69.11, 74.69, -11.75, 5.43)
pt3dadd(69.06, 74.79, -11.75, 5.43)
pt3dadd(68.93, 74.94, -11.75, 5.43)
pt3dadd(68.89, 75.04, -11.75, 5.43)
pt3dadd(68.84, 75.15, -11.75, 5.43)
pt3dadd(68.84, 75.86, -11.75, 5.43)
pt3dadd(68.79, 75.91, -11.75, 5.43)
}
dend[9] {pt3dclear()
pt3dadd(68.79, 75.91, -11.75, 6.79)
pt3dadd(66.92, 73.79, -16.75, 6.79)
pt3dadd(64.37, 71.66, -16.75, 6.79)
pt3dadd(62.16, 70.31, -16.75, 6.79)
pt3dadd(60.29, 70.12, -16.75, 5.43)
pt3dadd(58.42, 71.86, -16.75, 5.43)
pt3dadd(56.56, 73.59, -16.75, 5.43)
pt3dadd(56.72, 73.79, -16.75, 5.43)
}
dend[10] {pt3dclear()
pt3dadd(68.79, 75.91, -11.75, 5.43)
pt3dadd(68.79, 76.01, -11.75, 5.43)
pt3dadd(68.75, 76.16, -11.75, 5.43)
pt3dadd(68.75, 76.31, -11.75, 5.43)
pt3dadd(67.95, 78.34, -10.7, 7)
}
dend[11] {pt3dclear()
pt3dadd(67.95, 78.34, -10.7, 7)
pt3dadd(68.13, 78.34, -10.7, 7)
pt3dadd(67.97, 81.17, -10.7, 7)
pt3dadd(68.04, 81.28, -10.7, 7.5)
pt3dadd(68.74, 87.15, 0, 7.9)
}
dend[12] {pt3dclear()
pt3dadd(67.95, 78.34, -10.7, 6.62)
pt3dadd(66.43, 76.87, -9.65, 6.62)
pt3dadd(66.39, 76.77, -9.65, 6.62)
pt3dadd(66.34, 76.72, -9.65, 6.62)
pt3dadd(66.3, 76.67, -9.65, 6.62)
pt3dadd(66.25, 76.61, -9.65, 6.62)
pt3dadd(66.21, 76.57, -9.65, 6.62)
pt3dadd(66.21, 76.46, -9.65, 6.62)
pt3dadd(66.17, 76.41, -9.65, 6.62)
pt3dadd(66.17, 76.16, -9.65, 6.62)
pt3dadd(66.12, 76.11, -9.65, 6.62)
pt3dadd(66.12, 75.35, -9.65, 6.62)
pt3dadd(66.07, 75.3, -9.65, 6.62)
pt3dadd(66.07, 74.79, -9.65, 6.62)
pt3dadd(66.03, 74.69, -9.65, 6.62)
pt3dadd(66.03, 74.49, -9.65, 6.62)
pt3dadd(65.99, 74.39, -9.65, 6.62)
pt3dadd(65.99, 74.24, -9.65, 6.62)
pt3dadd(65.94, 74.08, -9.65, 6.62)
pt3dadd(65.94, 73.98, -9.65, 6.62)
pt3dadd(65.9, 73.88, -9.65, 6.62)
pt3dadd(65.9, 73.78, -9.65, 6.62)
pt3dadd(65.85, 73.68, -9.65, 6.62)
pt3dadd(65.81, 73.58, -9.65, 6.62)
pt3dadd(65.81, 73.47, -9.65, 6.62)
pt3dadd(65.76, 73.38, -9.65, 6.62)
pt3dadd(65.76, 73.27, -9.65, 6.62)
pt3dadd(65.72, 73.17, -9.65, 6.62)
pt3dadd(65.72, 72.92, -9.65, 6.62)
pt3dadd(65.68, 72.82, -9.65, 6.62)
pt3dadd(65.68, 72.36, -9.65, 6.62)
pt3dadd(65.63, 72.26, -9.65, 6.62)
pt3dadd(65.63, 71.96, -9.65, 6.62)
pt3dadd(65.58, 71.86, -9.65, 6.62)
pt3dadd(65.58, 71.65, -9.65, 6.62)
pt3dadd(65.54, 71.55, -9.65, 6.62)
pt3dadd(65.54, 71.35, -9.65, 6.62)
pt3dadd(65.5, 71.25, -9.65, 6.62)
pt3dadd(65.45, 71.15, -9.65, 6.62)
pt3dadd(65.45, 71, -9.65, 6.62)
pt3dadd(65.41, 70.94, -9.65, 6.62)
pt3dadd(65.41, 70.74, -9.65, 6.62)
pt3dadd(65.36, 70.69, -9.65, 6.62)
pt3dadd(65.36, 70.18, -9.65, 6.62)
pt3dadd(65.32, 70.08, -9.65, 6.62)
pt3dadd(65.32, 69.98, -9.65, 6.62)
pt3dadd(65.27, 69.88, -9.65, 6.62)
pt3dadd(65.23, 69.78, -9.65, 6.62)
pt3dadd(65.18, 69.68, -9.65, 6.62)
pt3dadd(65.14, 69.58, -9.65, 6.62)
pt3dadd(65.1, 69.47, -9.65, 6.62)
pt3dadd(65.05, 69.38, -9.65, 6.62)
pt3dadd(65.05, 69.27, -9.65, 6.62)
pt3dadd(65, 69.12, -9.65, 6.62)
pt3dadd(64.96, 69.07, -9.65, 6.62)
pt3dadd(64.96, 68.97, -9.65, 6.62)
pt3dadd(64.92, 68.87, -9.65, 6.62)
pt3dadd(64.87, 68.77, -9.65, 6.62)
pt3dadd(64.83, 68.67, -9.65, 6.62)
pt3dadd(64.78, 68.57, -9.65, 6.62)
pt3dadd(64.74, 68.46, -9.65, 6.62)
pt3dadd(64.69, 68.41, -9.65, 6.62)
pt3dadd(64.65, 68.36, -9.65, 6.62)
pt3dadd(64.61, 68.26, -9.65, 6.62)
pt3dadd(64.56, 68.21, -9.65, 6.62)
pt3dadd(64.51, 68.11, -9.65, 6.62)
pt3dadd(64.43, 68.01, -9.65, 6.62)
pt3dadd(64.43, 67.9, -9.65, 6.62)
pt3dadd(64.38, 67.86, -9.65, 6.62)
pt3dadd(64.34, 67.81, -9.65, 6.62)
pt3dadd(64.34, 67.7, -9.65, 6.62)
pt3dadd(64.29, 67.65, -9.65, 6.62)
pt3dadd(64.2, 67.55, -9.65, 6.62)
pt3dadd(64.16, 67.5, -9.65, 6.62)
pt3dadd(64.11, 67.4, -9.65, 6.62)
pt3dadd(64.07, 67.35, -9.65, 6.62)
pt3dadd(63.98, 67.3, -9.65, 6.62)
pt3dadd(63.94, 67.25, -9.65, 6.62)
pt3dadd(63.89, 67.2, -9.65, 6.62)
pt3dadd(63.85, 67.15, -9.65, 6.62)
pt3dadd(63.8, 67.1, -9.65, 6.62)
pt3dadd(63.76, 67.04, -9.65, 6.62)
pt3dadd(63.71, 66.94, -9.65, 6.62)
pt3dadd(63.67, 66.89, -9.65, 6.62)
pt3dadd(63.62, 66.84, -9.65, 6.62)
pt3dadd(63.58, 66.79, -9.65, 6.62)
pt3dadd(63.53, 66.74, -9.65, 6.62)
pt3dadd(63.49, 66.69, -9.65, 6.62)
pt3dadd(63.49, 66.44, -9.65, 6.62)
pt3dadd(63.44, 66.39, -9.65, 6.62)
pt3dadd(63.44, 66.24, -9.65, 6.62)
pt3dadd(63.4, 66.18, -9.65, 6.62)
pt3dadd(63.4, 65.78, -9.65, 6.62)
pt3dadd(63.35, 65.83, -9.65, 6.62)
pt3dadd(63.31, 65.93, -9.65, 6.62)
pt3dadd(63.31, 65.98, -9.65, 6.62)
pt3dadd(63.04, 65.38, -9.65, 6.62)
pt3dadd(63.09, 65.32, -9.65, 6.62)
pt3dadd(63.09, 64.71, -9.65, 6.62)
pt3dadd(63.04, 64.57, -9.65, 6.62)
pt3dadd(63.04, 64.41, -9.65, 6.62)
pt3dadd(63, 64.31, -9.65, 6.62)
pt3dadd(62.96, 64.21, -9.65, 6.62)
pt3dadd(62.96, 63.9, -9.65, 6.62)
pt3dadd(62.91, 63.85, -9.65, 6.62)
pt3dadd(62.91, 63.76, -9.65, 6.62)
pt3dadd(62.87, 63.7, -9.65, 6.62)
pt3dadd(62.87, 63.6, -9.65, 6.62)
pt3dadd(62.82, 63.5, -9.65, 6.62)
pt3dadd(62.82, 63.35, -9.65, 6.62)
pt3dadd(62.78, 63.2, -9.65, 6.62)
pt3dadd(62.73, 63.1, -9.65, 6.62)
pt3dadd(62.69, 62.94, -9.65, 6.62)
pt3dadd(62.64, 62.84, -9.65, 6.62)
pt3dadd(62.64, 62.64, -9.65, 6.62)
pt3dadd(62.6, 62.49, -9.65, 6.62)
pt3dadd(62.55, 62.44, -9.65, 6.62)
pt3dadd(62.51, 62.33, -9.65, 6.62)
pt3dadd(62.51, 62.19, -9.65, 6.62)
pt3dadd(62.47, 62.08, -9.65, 6.62)
pt3dadd(62.42, 61.93, -9.65, 6.62)
pt3dadd(62.38, 61.83, -9.65, 6.62)
pt3dadd(62.38, 61.73, -9.65, 6.62)
pt3dadd(62.33, 61.58, -9.65, 6.62)
pt3dadd(62.33, 61.47, -9.65, 6.62)
pt3dadd(62.28, 61.32, -9.65, 6.62)
pt3dadd(62.24, 61.22, -9.65, 6.62)
pt3dadd(62.24, 61.07, -9.65, 6.62)
pt3dadd(62.2, 61.02, -9.65, 6.62)
pt3dadd(62.2, 60.92, -9.65, 6.62)
pt3dadd(62.15, 60.82, -9.65, 6.62)
pt3dadd(62.11, 60.72, -9.65, 6.62)
pt3dadd(62.11, 60.62, -9.65, 6.62)
pt3dadd(62.06, 60.56, -9.65, 6.62)
pt3dadd(62.02, 60.46, -9.65, 6.62)
pt3dadd(61.97, 60.41, -9.65, 6.62)
pt3dadd(61.97, 60.31, -9.65, 6.62)
pt3dadd(61.93, 60.26, -9.65, 6.62)
pt3dadd(61.88, 60.21, -9.65, 6.62)
pt3dadd(61.88, 60.11, -9.65, 6.62)
pt3dadd(61.84, 60.01, -9.65, 6.62)
pt3dadd(61.79, 59.9, -9.65, 6.62)
pt3dadd(61.75, 59.75, -9.65, 6.62)
pt3dadd(61.71, 59.6, -9.65, 6.62)
pt3dadd(61.66, 59.55, -9.65, 6.62)
pt3dadd(61.62, 59.4, -9.65, 6.62)
pt3dadd(61.62, 59.25, -9.65, 6.62)
pt3dadd(61.57, 59.2, -9.65, 6.62)
pt3dadd(61.57, 59.1, -9.65, 6.62)
pt3dadd(61.53, 58.99, -9.65, 6.62)
pt3dadd(61.48, 58.84, -9.65, 6.62)
pt3dadd(61.44, 58.74, -9.65, 6.62)
pt3dadd(61.44, 58.59, -9.65, 6.62)
pt3dadd(61.4, 58.49, -9.65, 6.62)
pt3dadd(61.31, 58.24, -9.65, 6.62)
pt3dadd(61.22, 57.98, -9.65, 6.62)
pt3dadd(61.17, 57.88, -9.65, 6.62)
pt3dadd(61.17, 57.78, -9.65, 6.62)
pt3dadd(61.13, 57.68, -9.65, 6.62)
pt3dadd(61.08, 57.58, -9.65, 6.62)
pt3dadd(61.08, 57.47, -9.65, 6.62)
pt3dadd(61.04, 57.37, -9.65, 6.62)
pt3dadd(60.99, 57.32, -9.65, 6.62)
pt3dadd(60.99, 57.12, -9.65, 6.62)
pt3dadd(60.95, 57.02, -9.65, 6.62)
pt3dadd(60.9, 56.92, -9.65, 6.62)
pt3dadd(60.86, 56.82, -9.65, 6.62)
pt3dadd(60.86, 56.62, -9.65, 6.62)
pt3dadd(60.77, 56.46, -9.65, 6.62)
pt3dadd(60.77, 56.26, -9.65, 6.62)
pt3dadd(60.72, 56.16, -9.65, 6.62)
pt3dadd(60.68, 56.01, -9.65, 6.62)
pt3dadd(60.68, 55.9, -9.65, 6.62)
pt3dadd(60.63, 55.81, -9.65, 6.62)
}
}
proc shape3d_23() {
dend[12] { pt3dadd(60.63, 55.65, -9.65, 6.62)
pt3dadd(60.59, 55.6, -9.65, 6.62)
pt3dadd(60.59, 55.45, -9.65, 6.62)
pt3dadd(60.55, 55.35, -9.65, 6.62)
pt3dadd(60.55, 55.1, -9.65, 6.62)
pt3dadd(60.5, 54.99, -9.65, 6.62)
pt3dadd(60.5, 54.79, -9.65, 6.62)
pt3dadd(60.46, 54.69, -9.65, 6.62)
pt3dadd(60.46, 54.54, -9.65, 6.62)
pt3dadd(60.41, 54.38, -9.65, 6.62)
pt3dadd(60.41, 54.24, -9.65, 6.62)
pt3dadd(60.37, 54.13, -9.65, 6.62)
pt3dadd(60.28, 53.98, -9.65, 6.62)
pt3dadd(60.24, 53.83, -9.65, 6.62)
pt3dadd(60.19, 53.68, -9.65, 6.62)
pt3dadd(60.15, 53.53, -9.65, 6.62)
pt3dadd(60.1, 53.42, -9.65, 6.62)
pt3dadd(60.01, 53.27, -9.65, 6.62)
pt3dadd(59.97, 53.22, -9.65, 6.62)
pt3dadd(59.92, 53.12, -9.65, 6.62)
pt3dadd(59.83, 53.02, -9.65, 6.62)
pt3dadd(59.83, 52.92, -9.65, 6.62)
pt3dadd(59.74, 52.87, -9.65, 6.62)
pt3dadd(59.74, 51.96, -11.75, 5.43)
pt3dadd(59.74, 51.35, -11.75, 5.43)
pt3dadd(59.7, 51.19, -11.75, 5.43)
pt3dadd(59.7, 51.04, -11.75, 5.43)
pt3dadd(59.65, 50.99, -11.75, 5.43)
pt3dadd(59.65, 50.79, -11.75, 5.43)
pt3dadd(59.61, 50.74, -11.75, 5.43)
pt3dadd(59.56, 50.69, -11.75, 5.43)
pt3dadd(59.56, 50.59, -11.75, 5.43)
pt3dadd(59.52, 50.54, -11.75, 5.43)
pt3dadd(59.48, 50.44, -11.75, 5.43)
pt3dadd(59.43, 50.38, -11.75, 5.43)
pt3dadd(59.43, 50.24, -11.75, 5.43)
pt3dadd(59.39, 50.18, -11.75, 5.43)
pt3dadd(59.34, 50.08, -11.75, 5.43)
pt3dadd(59.34, 49.98, -11.75, 5.43)
pt3dadd(59.3, 49.93, -11.75, 5.43)
pt3dadd(59.3, 49.78, -11.75, 5.43)
pt3dadd(59.26, 49.73, -11.75, 5.43)
pt3dadd(59.26, 49.47, -11.75, 5.43)
pt3dadd(59.21, 49.42, -11.75, 5.43)
pt3dadd(59.21, 48.36, -11.75, 5.43)
pt3dadd(59.34, 47.65, -11.75, 4.08)
pt3dadd(59.26, 47.1, -11.75, 4.08)
pt3dadd(59.26, 46.94, -11.75, 4.08)
pt3dadd(59.21, 46.89, -11.75, 4.08)
pt3dadd(59.21, 46.79, -11.75, 4.08)
pt3dadd(59.17, 46.74, -11.75, 4.08)
pt3dadd(59.12, 46.69, -11.75, 4.08)
pt3dadd(59.12, 46.59, -11.75, 4.08)
pt3dadd(59.08, 46.54, -11.75, 4.08)
pt3dadd(58.99, 46.49, -11.75, 4.08)
pt3dadd(58.94, 46.44, -11.75, 4.08)
pt3dadd(58.9, 46.38, -11.75, 4.08)
pt3dadd(58.85, 46.33, -11.75, 4.08)
pt3dadd(58.81, 46.28, -11.75, 4.08)
pt3dadd(58.76, 46.23, -11.75, 4.08)
pt3dadd(58.72, 46.18, -11.75, 4.08)
pt3dadd(58.67, 46.13, -11.75, 4.08)
pt3dadd(58.63, 46.03, -11.75, 4.08)
pt3dadd(58.58, 45.98, -11.75, 4.08)
pt3dadd(58.54, 45.93, -11.75, 4.08)
pt3dadd(58.45, 45.93, -11.75, 4.08)
pt3dadd(58.41, 45.88, -11.75, 4.08)
pt3dadd(58.32, 45.78, -11.75, 4.08)
pt3dadd(58.27, 45.73, -11.75, 4.08)
pt3dadd(58.23, 45.68, -11.75, 4.08)
pt3dadd(58.19, 45.63, -11.75, 4.08)
pt3dadd(58.14, 45.58, -11.75, 4.08)
pt3dadd(58.1, 45.53, -11.75, 4.08)
pt3dadd(58.05, 45.47, -11.75, 4.08)
pt3dadd(58.01, 45.42, -11.75, 4.08)
pt3dadd(57.96, 45.37, -11.75, 4.08)
pt3dadd(57.92, 45.32, -11.75, 4.08)
pt3dadd(57.87, 45.27, -11.75, 4.08)
pt3dadd(57.83, 45.22, -11.75, 4.08)
pt3dadd(57.78, 45.17, -11.75, 4.08)
pt3dadd(57.74, 45.12, -11.75, 4.08)
pt3dadd(57.69, 45.07, -11.75, 4.08)
pt3dadd(57.65, 45.02, -11.75, 4.08)
pt3dadd(57.6, 44.97, -11.75, 4.08)
pt3dadd(57.6, 44.87, -11.75, 4.08)
pt3dadd(57.56, 44.81, -11.75, 4.08)
pt3dadd(57.51, 44.76, -11.75, 4.08)
pt3dadd(57.47, 44.72, -11.75, 4.08)
pt3dadd(57.47, 44.61, -11.75, 4.08)
pt3dadd(57.42, 44.56, -11.75, 4.08)
pt3dadd(57.38, 44.51, -11.75, 4.08)
pt3dadd(57.34, 44.46, -11.75, 4.08)
pt3dadd(57.34, 44.31, -11.75, 4.08)
pt3dadd(57.29, 44.26, -11.75, 4.08)
pt3dadd(57.25, 44.21, -11.75, 4.08)
pt3dadd(57.2, 44.11, -11.75, 4.08)
pt3dadd(57.16, 44.06, -11.75, 4.08)
pt3dadd(57.16, 43.9, -11.75, 4.08)
pt3dadd(57.12, 43.85, -11.75, 4.08)
pt3dadd(57.07, 43.8, -11.75, 4.08)
pt3dadd(57.03, 43.75, -11.75, 4.08)
pt3dadd(56.98, 43.7, -11.75, 4.08)
pt3dadd(56.98, 43.6, -11.75, 4.08)
pt3dadd(56.94, 43.55, -11.75, 4.08)
pt3dadd(56.89, 43.45, -11.75, 4.08)
pt3dadd(56.89, 43.3, -11.75, 4.08)
pt3dadd(56.85, 43.24, -11.75, 4.08)
pt3dadd(56.8, 43.15, -11.75, 4.08)
pt3dadd(56.8, 42.89, -11.75, 4.08)
pt3dadd(56.76, 42.79, -11.75, 4.08)
pt3dadd(56.76, 42.64, -11.75, 4.08)
pt3dadd(56.71, 42.54, -11.75, 4.08)
pt3dadd(56.67, 42.44, -11.75, 4.08)
pt3dadd(56.67, 42.28, -11.75, 4.08)
pt3dadd(56.62, 42.18, -11.75, 4.08)
pt3dadd(56.62, 41.78, -11.75, 4.08)
pt3dadd(56.58, 41.73, -11.75, 4.08)
pt3dadd(56.58, 41.63, -11.75, 4.08)
pt3dadd(56.53, 41.58, -11.75, 4.08)
pt3dadd(56.49, 41.53, -11.75, 4.08)
pt3dadd(56.44, 41.42, -11.75, 4.08)
pt3dadd(56.4, 41.32, -11.75, 4.08)
pt3dadd(56.35, 41.27, -11.75, 4.08)
pt3dadd(56.31, 41.22, -11.75, 4.08)
pt3dadd(56.27, 41.17, -11.75, 4.08)
pt3dadd(56.22, 41.07, -11.75, 4.08)
pt3dadd(56.18, 41.02, -11.75, 4.08)
pt3dadd(56.13, 40.97, -11.75, 4.08)
pt3dadd(56.09, 40.87, -11.75, 4.08)
pt3dadd(56.04, 40.76, -11.75, 4.08)
pt3dadd(56, 40.66, -11.75, 4.08)
pt3dadd(55.96, 40.61, -11.75, 4.08)
pt3dadd(55.87, 40.56, -11.75, 4.08)
pt3dadd(55.82, 40.51, -11.75, 4.08)
pt3dadd(55.78, 40.46, -11.75, 4.08)
pt3dadd(55.78, 40.36, -11.75, 4.08)
pt3dadd(55.73, 40.31, -11.75, 4.08)
pt3dadd(55.69, 40.26, -11.75, 4.08)
pt3dadd(55.6, 40.21, -11.75, 4.08)
pt3dadd(55.55, 40.16, -11.75, 4.08)
pt3dadd(55.47, 40.06, -11.75, 4.08)
pt3dadd(55.42, 40.01, -11.75, 4.08)
pt3dadd(55.38, 39.96, -11.75, 4.08)
pt3dadd(55.33, 39.9, -11.75, 4.08)
pt3dadd(55.28, 39.85, -11.75, 4.08)
pt3dadd(55.24, 39.8, -11.75, 4.08)
pt3dadd(55.2, 39.75, -11.75, 4.08)
pt3dadd(55.15, 39.7, -11.75, 4.08)
pt3dadd(55.06, 39.65, -11.75, 4.08)
pt3dadd(55.02, 39.6, -11.75, 4.08)
pt3dadd(54.97, 39.55, -11.75, 4.08)
pt3dadd(54.93, 39.5, -11.75, 4.08)
pt3dadd(54.88, 39.45, -11.75, 4.08)
pt3dadd(54.88, 39.6, -11.75, 4.08)
pt3dadd(54.97, 39.75, -11.75, 4.08)
pt3dadd(55.02, 39.8, -11.75, 4.08)
pt3dadd(54.66, 39.3, -11.75, 3.4)
pt3dadd(54.62, 39.24, -11.75, 3.4)
pt3dadd(54.53, 39.24, -11.75, 3.4)
pt3dadd(54.48, 39.19, -11.75, 3.4)
pt3dadd(54.44, 39.15, -11.75, 3.4)
pt3dadd(54.4, 39.1, -11.75, 3.4)
pt3dadd(54.35, 39.04, -11.75, 3.4)
pt3dadd(54.26, 38.99, -11.75, 3.4)
pt3dadd(54.22, 38.94, -11.75, 3.4)
pt3dadd(54.17, 38.89, -11.75, 3.4)
pt3dadd(54.13, 38.84, -11.75, 3.4)
pt3dadd(54.08, 38.74, -11.75, 3.4)
pt3dadd(54.04, 38.69, -11.75, 3.4)
pt3dadd(54.04, 38.59, -11.75, 3.4)
pt3dadd(53.99, 38.54, -11.75, 3.4)
pt3dadd(53.95, 38.44, -11.75, 3.4)
pt3dadd(53.9, 38.38, -11.75, 3.4)
pt3dadd(53.86, 38.33, -11.75, 3.4)
pt3dadd(53.81, 38.28, -11.75, 3.4)
pt3dadd(53.77, 38.18, -11.75, 3.4)
pt3dadd(53.72, 38.13, -11.75, 3.4)
pt3dadd(53.68, 38.08, -11.75, 3.4)
pt3dadd(53.64, 38.03, -11.75, 3.4)
pt3dadd(53.59, 37.98, -11.75, 3.4)
pt3dadd(53.55, 37.93, -11.75, 3.4)
pt3dadd(53.5, 37.88, -11.75, 3.4)
pt3dadd(53.46, 37.83, -11.75, 3.4)
pt3dadd(53.41, 37.78, -11.75, 3.4)
pt3dadd(53.33, 37.67, -11.75, 3.4)
pt3dadd(53.28, 37.58, -11.75, 3.4)
pt3dadd(53.24, 37.47, -11.75, 3.4)
pt3dadd(53.15, 37.37, -11.75, 3.4)
pt3dadd(53.1, 37.27, -11.75, 3.4)
pt3dadd(53.06, 37.22, -11.75, 3.4)
pt3dadd(53.01, 37.17, -11.75, 3.4)
pt3dadd(52.97, 37.07, -11.75, 3.4)
pt3dadd(52.88, 37.02, -11.75, 3.4)
pt3dadd(52.83, 36.97, -11.75, 3.4)
pt3dadd(52.79, 36.92, -11.75, 3.4)
pt3dadd(52.74, 36.87, -11.75, 3.4)
pt3dadd(52.7, 36.81, -11.75, 3.4)
pt3dadd(52.65, 36.76, -11.75, 3.4)
pt3dadd(52.61, 36.66, -11.75, 3.4)
pt3dadd(52.52, 36.56, -11.75, 3.4)
}
}
proc shape3d_24() {
dend[12] { pt3dadd(52.48, 36.51, -11.75, 3.4)
pt3dadd(52.43, 36.46, -11.75, 3.4)
pt3dadd(52.35, 36.41, -11.75, 3.4)
pt3dadd(52.3, 36.36, -11.75, 3.4)
pt3dadd(52.26, 36.31, -11.75, 3.4)
pt3dadd(52.21, 36.21, -11.75, 3.4)
pt3dadd(52.12, 36.16, -11.75, 3.4)
pt3dadd(52.12, 36.26, -11.75, 3.4)
pt3dadd(51.81, 35.75, -11.75, 3.74)
pt3dadd(51.72, 35.75, -11.75, 3.74)
pt3dadd(51.67, 35.7, -11.75, 3.74)
pt3dadd(51.5, 35.7, -11.75, 3.74)
pt3dadd(51.41, 35.65, -11.75, 3.74)
pt3dadd(51.36, 35.6, -11.75, 3.74)
pt3dadd(51.32, 35.55, -11.75, 3.74)
pt3dadd(51.28, 35.5, -11.75, 3.74)
pt3dadd(51.23, 35.4, -11.75, 3.74)
pt3dadd(51.23, 35.29, -11.75, 3.74)
pt3dadd(51.19, 35.19, -11.75, 3.74)
pt3dadd(51.14, 35.15, -11.75, 3.74)
pt3dadd(51.1, 35.04, -11.75, 3.74)
pt3dadd(51.1, 34.94, -11.75, 3.74)
pt3dadd(51.05, 34.89, -11.75, 3.74)
pt3dadd(51.01, 34.79, -11.75, 3.74)
pt3dadd(50.96, 34.74, -11.75, 3.74)
pt3dadd(50.96, 34.64, -11.75, 3.74)
pt3dadd(50.92, 34.59, -11.75, 3.74)
pt3dadd(50.87, 34.49, -11.75, 3.74)
pt3dadd(50.87, 34.38, -11.75, 3.74)
pt3dadd(50.83, 34.33, -11.75, 3.74)
pt3dadd(50.78, 34.23, -11.75, 3.74)
pt3dadd(50.78, 34.08, -11.75, 3.74)
pt3dadd(50.74, 34.03, -11.75, 3.74)
pt3dadd(50.69, 33.98, -11.75, 3.74)
pt3dadd(50.69, 33.88, -11.75, 3.74)
pt3dadd(50.65, 33.78, -11.75, 3.74)
pt3dadd(50.6, 33.73, -11.75, 3.74)
pt3dadd(50.56, 33.67, -11.75, 3.74)
pt3dadd(50.51, 33.63, -11.75, 3.74)
pt3dadd(50.47, 33.53, -11.75, 3.74)
pt3dadd(50.43, 33.47, -11.75, 3.74)
pt3dadd(50.43, 33.37, -11.75, 3.74)
pt3dadd(50.38, 33.27, -11.75, 3.74)
pt3dadd(50.34, 33.17, -11.75, 3.74)
pt3dadd(50.29, 33.12, -11.75, 3.74)
pt3dadd(50.25, 33.02, -11.75, 3.74)
pt3dadd(50.21, 32.92, -11.75, 3.74)
pt3dadd(50.16, 32.81, -11.75, 3.74)
pt3dadd(50.16, 32.66, -11.75, 3.74)
pt3dadd(50.12, 32.61, -11.75, 3.74)
pt3dadd(50.07, 32.56, -11.75, 3.74)
pt3dadd(50.03, 32.46, -11.75, 3.74)
pt3dadd(49.98, 32.31, -11.75, 3.74)
pt3dadd(49.94, 32.21, -11.75, 3.74)
pt3dadd(49.89, 32.1, -11.75, 3.74)
pt3dadd(49.85, 32.01, -11.75, 3.74)
pt3dadd(49.8, 31.9, -11.75, 3.74)
pt3dadd(49.76, 31.85, -11.75, 3.74)
pt3dadd(49.71, 31.75, -11.75, 3.74)
pt3dadd(49.67, 31.7, -11.75, 3.74)
pt3dadd(49.58, 31.6, -11.75, 3.74)
pt3dadd(49.53, 31.55, -11.75, 3.74)
pt3dadd(49.49, 31.45, -11.75, 3.74)
pt3dadd(49.44, 31.35, -11.75, 3.74)
pt3dadd(49.4, 31.3, -11.75, 3.74)
pt3dadd(49.4, 31.19, -11.75, 3.74)
pt3dadd(49.36, 31.15, -11.75, 3.74)
pt3dadd(49.31, 31.09, -11.75, 3.74)
pt3dadd(49.31, 30.99, -11.75, 3.74)
pt3dadd(49.27, 30.94, -11.75, 3.74)
pt3dadd(49.22, 30.89, -11.75, 3.74)
pt3dadd(49.18, 30.84, -11.75, 3.74)
pt3dadd(49.18, 30.74, -11.75, 3.74)
pt3dadd(49.13, 30.69, -11.75, 3.74)
pt3dadd(49.09, 30.59, -11.75, 3.74)
pt3dadd(49.04, 30.54, -11.75, 3.74)
pt3dadd(49, 30.43, -11.75, 3.74)
pt3dadd(48.96, 30.33, -11.75, 3.74)
pt3dadd(48.91, 30.28, -11.75, 3.74)
pt3dadd(48.91, 30.18, -11.75, 3.74)
pt3dadd(48.82, 30.08, -11.75, 3.74)
pt3dadd(48.78, 29.98, -11.75, 3.74)
pt3dadd(48.73, 29.88, -11.75, 3.74)
pt3dadd(48.69, 29.78, -11.75, 3.74)
pt3dadd(48.64, 29.67, -11.75, 3.74)
pt3dadd(48.6, 29.58, -11.75, 3.74)
pt3dadd(48.56, 29.47, -11.75, 3.74)
pt3dadd(48.51, 29.42, -11.75, 3.74)
pt3dadd(48.47, 29.37, -11.75, 3.74)
pt3dadd(48.47, 29.27, -11.75, 3.74)
pt3dadd(48.42, 29.22, -11.75, 3.74)
pt3dadd(48.42, 29.12, -11.75, 3.74)
pt3dadd(48.38, 29.07, -11.75, 3.74)
pt3dadd(48.33, 29.02, -11.75, 3.74)
pt3dadd(48.29, 28.92, -11.75, 3.74)
pt3dadd(48.24, 28.86, -11.75, 3.74)
pt3dadd(48.24, 28.76, -11.75, 3.74)
pt3dadd(48.2, 28.71, -11.75, 3.74)
pt3dadd(48.15, 28.66, -11.75, 3.74)
pt3dadd(48.06, 28.56, -11.75, 3.74)
pt3dadd(48.06, 28.46, -11.75, 3.74)
pt3dadd(48.02, 28.41, -11.75, 3.74)
pt3dadd(47.97, 28.31, -11.75, 3.74)
pt3dadd(47.93, 28.26, -11.75, 3.74)
pt3dadd(47.88, 28.16, -11.75, 3.74)
pt3dadd(47.84, 28.06, -11.75, 3.74)
pt3dadd(47.84, 27.95, -11.75, 3.74)
pt3dadd(47.8, 27.9, -11.75, 3.74)
pt3dadd(47.75, 27.8, -11.75, 3.74)
pt3dadd(47.75, 27.6, -11.75, 3.74)
pt3dadd(47.71, 27.55, -11.75, 3.74)
pt3dadd(47.71, 27.45, -11.75, 3.74)
pt3dadd(47.66, 27.4, -11.75, 3.74)
pt3dadd(47.62, 27.3, -11.75, 3.74)
pt3dadd(47.57, 27.19, -11.75, 3.74)
pt3dadd(47.57, 26.94, -11.75, 3.74)
pt3dadd(47.53, 26.89, -11.75, 3.74)
pt3dadd(47.53, 26.74, -11.75, 3.74)
pt3dadd(47.49, 26.64, -11.75, 3.74)
pt3dadd(47.49, 24.46, -11.75, 3.74)
pt3dadd(47.53, 24.41, -11.75, 3.74)
pt3dadd(47.53, 24.31, -11.75, 3.74)
pt3dadd(47.57, 24.26, -11.75, 3.74)
pt3dadd(47.62, 24.21, -11.75, 3.74)
pt3dadd(47.84, 24.21, -11.75, 3.74)
pt3dadd(47.84, 24.1, -11.75, 3.74)
pt3dadd(47.88, 24.06, -11.75, 3.74)
pt3dadd(47.88, 23.95, -11.75, 3.74)
pt3dadd(47.93, 23.9, -11.75, 3.74)
pt3dadd(47.93, 23.34, -11.75, 3.74)
pt3dadd(47.93, 23.45, -11.75, 3.74)
pt3dadd(47.97, 22.99, -10.7, 3.74)
pt3dadd(48.02, 22.94, -10.7, 3.74)
pt3dadd(48.02, 21.12, -10.7, 3.74)
pt3dadd(48.11, 21.93, -10.7, 5.77)
pt3dadd(48.11, 20.26, -10.7, 5.77)
pt3dadd(48.11, 22.49, -10.7, 5.77)
pt3dadd(48.11, 20.41, -10.7, 5.77)
}
dend[13] {pt3dclear()
pt3dadd(48.11, 20.41, -10.7, 5.77)
pt3dadd(47.97, 20.46, -10.7, 5.77)
}
dend[14] {pt3dclear()
pt3dadd(47.97, 20.46, -10.7, 4.25)
pt3dadd(47.35, 20.31, -13.85, 4.25)
pt3dadd(47.31, 20.26, -13.85, 4.25)
pt3dadd(47.26, 20.21, -13.85, 4.25)
pt3dadd(47.22, 20.16, -13.85, 4.25)
pt3dadd(47.13, 20.1, -13.85, 4.25)
pt3dadd(47.04, 20.06, -13.85, 4.25)
pt3dadd(46.99, 20, -13.85, 4.25)
pt3dadd(46.9, 20, -13.85, 4.25)
pt3dadd(46.86, 19.95, -13.85, 4.25)
pt3dadd(46.77, 19.9, -13.85, 4.25)
pt3dadd(46.68, 19.85, -13.85, 4.25)
pt3dadd(45.74, 19.85, -13.85, 4.25)
pt3dadd(45.7, 19.9, -13.85, 4.25)
pt3dadd(45.61, 19.9, -13.85, 4.25)
pt3dadd(45.57, 19.95, -13.85, 4.25)
pt3dadd(45.52, 20, -13.85, 4.25)
pt3dadd(45.43, 20.06, -13.85, 4.25)
pt3dadd(45.39, 20.1, -13.85, 4.25)
pt3dadd(45.35, 20.16, -13.85, 4.25)
pt3dadd(45.26, 20.16, -13.85, 4.25)
pt3dadd(45.21, 20.21, -13.85, 4.25)
pt3dadd(45.17, 20.26, -13.85, 4.25)
pt3dadd(45.12, 20.31, -13.85, 4.25)
pt3dadd(45.03, 20.31, -13.85, 4.25)
pt3dadd(44.99, 20.36, -13.85, 4.25)
pt3dadd(44.94, 20.46, -13.85, 4.25)
pt3dadd(44.85, 20.46, -13.85, 4.25)
pt3dadd(44.81, 20.56, -13.85, 4.25)
pt3dadd(44.76, 20.61, -13.85, 4.25)
pt3dadd(44.67, 20.61, -13.85, 4.25)
pt3dadd(44.63, 20.66, -13.85, 4.25)
pt3dadd(44.59, 20.71, -13.85, 4.25)
pt3dadd(44.5, 20.71, -13.85, 4.25)
pt3dadd(44.45, 20.76, -13.85, 4.25)
pt3dadd(44.41, 20.82, -13.85, 4.25)
pt3dadd(44.32, 20.82, -13.85, 4.25)
pt3dadd(44.23, 20.86, -13.85, 4.25)
pt3dadd(44.14, 20.92, -13.85, 4.25)
pt3dadd(44.05, 20.92, -13.85, 4.25)
pt3dadd(43.96, 20.97, -13.85, 4.25)
pt3dadd(43.87, 21.02, -13.85, 4.25)
pt3dadd(43.65, 21.02, -13.85, 4.25)
pt3dadd(43.21, 20.76, -14.9, 3.74)
pt3dadd(43.16, 20.71, -14.9, 3.74)
pt3dadd(43.07, 20.71, -14.9, 3.74)
pt3dadd(43.03, 20.66, -14.9, 3.74)
pt3dadd(42.94, 20.66, -14.9, 3.74)
pt3dadd(42.85, 20.61, -14.9, 3.74)
pt3dadd(42.04, 20.61, -14.9, 3.74)
pt3dadd(41.96, 20.66, -14.9, 3.74)
pt3dadd(41.91, 20.71, -14.9, 3.74)
pt3dadd(41.82, 20.71, -14.9, 3.74)
pt3dadd(41.78, 20.76, -14.9, 3.74)
pt3dadd(41.69, 20.82, -14.9, 3.74)
pt3dadd(41.65, 20.86, -14.9, 3.74)
pt3dadd(41.56, 20.86, -14.9, 3.74)
pt3dadd(41.51, 20.92, -14.9, 3.74)
pt3dadd(41.47, 20.97, -14.9, 3.74)
pt3dadd(41.42, 21.02, -14.9, 3.74)
}
}
proc shape3d_25() {
dend[14] { pt3dadd(41.33, 21.07, -14.9, 3.74)
pt3dadd(41.29, 21.12, -14.9, 3.74)
pt3dadd(41.2, 21.17, -14.9, 3.74)
pt3dadd(41.11, 21.22, -14.9, 3.74)
pt3dadd(41.06, 21.27, -14.9, 3.74)
}
dend[15] {pt3dclear()
pt3dadd(48.11, 20.41, -10.7, 4.59)
pt3dadd(48.33, 19.45, -9.65, 4.59)
pt3dadd(48.55, 17.41, -9.65, 4.59)
}
dend[16] {pt3dclear()
pt3dadd(48.55, 17.41, -9.65, 1.36)
pt3dadd(47.7, 11.43, -8.6, 1.36)
pt3dadd(47.47, 6.8, -8.6, 3.06)
pt3dadd(47.43, 6.7, -8.6, 3.06)
pt3dadd(47.43, 6.41, -8.6, 3.06)
pt3dadd(47.38, 6.32, -8.6, 3.06)
pt3dadd(47.38, 5.74, -8.6, 3.06)
pt3dadd(47.34, 5.64, -8.6, 3.06)
pt3dadd(47.34, 5.16, -8.6, 3.06)
pt3dadd(47.3, 5.06, -8.6, 3.06)
pt3dadd(47.3, 4.82, -8.6, 3.06)
pt3dadd(47.26, 4.72, -8.6, 3.06)
pt3dadd(47.26, 4.49, -8.6, 3.06)
pt3dadd(47.22, 4.44, -8.6, 3.06)
pt3dadd(47.22, 3.76, -8.6, 3.06)
pt3dadd(47.17, 3.62, -8.6, 3.06)
pt3dadd(47.17, 3.42, -8.6, 3.06)
pt3dadd(47.13, 3.33, -8.6, 3.06)
pt3dadd(47.13, 3.23, -8.6, 3.06)
pt3dadd(47.09, 3.18, -8.6, 3.06)
pt3dadd(47.09, 3.09, -8.6, 3.06)
pt3dadd(47.04, 2.99, -8.6, 3.06)
pt3dadd(47, 2.94, -8.6, 3.06)
pt3dadd(46.96, 2.85, -8.6, 3.06)
pt3dadd(46.96, 2.75, -8.6, 3.06)
pt3dadd(46.92, 2.65, -8.6, 3.06)
pt3dadd(46.88, 2.56, -8.6, 3.06)
pt3dadd(46.83, 2.46, -8.6, 3.06)
pt3dadd(46.79, 2.36, -8.6, 3.06)
pt3dadd(46.75, 2.27, -8.6, 3.06)
pt3dadd(46.71, 2.17, -8.6, 3.06)
pt3dadd(46.66, 2.07, -8.6, 3.06)
pt3dadd(46.62, 2.03, -8.6, 3.06)
pt3dadd(46.58, 1.93, -8.6, 3.06)
pt3dadd(46.58, 1.83, -8.6, 3.06)
pt3dadd(46.53, 1.74, -8.6, 3.06)
pt3dadd(46.45, 1.69, -8.6, 3.06)
pt3dadd(46.41, 1.59, -8.6, 3.06)
pt3dadd(46.37, 1.5, -8.6, 3.06)
pt3dadd(46.28, 1.4, -8.6, 3.06)
pt3dadd(46.24, 1.35, -8.6, 3.06)
pt3dadd(46.24, 1.25, -8.6, 3.06)
pt3dadd(46.15, 1.21, -8.6, 3.06)
pt3dadd(46.11, 1.11, -8.6, 3.06)
pt3dadd(45.98, 0.96, -8.6, 3.06)
pt3dadd(45.94, 0.92, -8.6, 3.06)
pt3dadd(45.9, 0.82, -8.6, 3.06)
pt3dadd(45.85, 0.72, -8.6, 3.06)
pt3dadd(45.81, 0.63, -8.6, 3.06)
pt3dadd(45.69, 0.48, -8.6, 3.06)
pt3dadd(45.64, 0.44, -8.6, 3.06)
pt3dadd(45.47, 0.24, -8.6, 3.06)
pt3dadd(45.43, 0.14, -8.6, 3.06)
pt3dadd(45.39, 0.1, -8.6, 3.06)
pt3dadd(45.35, 0.05, -8.6, 3.06)
pt3dadd(45.31, 0, -8.6, 3.06)
pt3dadd(45.31, -0.1, -8.6, 3.06)
pt3dadd(45.22, -0.14, -8.6, 3.06)
pt3dadd(45.22, -0.24, -8.6, 3.06)
pt3dadd(45.13, -0.29, -8.6, 3.06)
pt3dadd(45.18, -0.22, -8.6, 2.38)
pt3dadd(45.13, -0.31, -8.6, 2.38)
pt3dadd(45.13, -0.41, -8.6, 2.38)
pt3dadd(45.09, -0.46, -8.6, 2.38)
pt3dadd(45.09, -0.65, -8.6, 2.38)
pt3dadd(45.05, -0.44, -8.6, 2.55)
pt3dadd(45.05, -0.58, -8.6, 2.55)
pt3dadd(45.01, -0.63, -8.6, 2.55)
pt3dadd(45.01, -0.82, -8.6, 2.55)
pt3dadd(44.97, -0.92, -8.6, 2.55)
pt3dadd(44.92, -0.96, -8.6, 2.55)
pt3dadd(44.88, -1.06, -8.6, 2.55)
pt3dadd(44.88, -1.16, -8.6, 2.55)
pt3dadd(44.84, -1.21, -8.6, 2.55)
pt3dadd(44.75, -1.25, -8.6, 2.55)
pt3dadd(44.75, -1.35, -8.6, 2.55)
pt3dadd(44.71, -1.45, -8.6, 2.55)
pt3dadd(44.67, -1.5, -8.6, 2.55)
pt3dadd(44.63, -1.54, -8.6, 2.55)
pt3dadd(44.58, -1.59, -8.6, 2.55)
pt3dadd(44.54, -1.64, -8.6, 2.55)
pt3dadd(44.5, -1.74, -8.6, 2.55)
pt3dadd(44.46, -1.78, -8.6, 2.55)
pt3dadd(44.46, -1.88, -8.6, 2.55)
pt3dadd(44.41, -1.93, -8.6, 2.55)
pt3dadd(44.37, -1.98, -8.6, 2.55)
pt3dadd(44.37, -2.07, -8.6, 2.55)
pt3dadd(44.33, -2.12, -8.6, 2.55)
pt3dadd(44.33, -2.22, -8.6, 2.55)
pt3dadd(44.28, -2.27, -8.6, 2.55)
pt3dadd(44.24, -2.32, -8.6, 2.55)
pt3dadd(44.2, -2.36, -8.6, 2.55)
pt3dadd(44.2, -2.46, -8.6, 2.55)
pt3dadd(44.16, -2.51, -8.6, 2.55)
pt3dadd(44.12, -2.61, -8.6, 2.55)
pt3dadd(44.07, -2.7, -8.6, 2.55)
pt3dadd(44.07, -2.89, -8.6, 2.55)
pt3dadd(44.03, -2.99, -8.6, 2.55)
pt3dadd(43.99, -3.09, -8.6, 2.55)
pt3dadd(43.99, -3.18, -8.6, 2.55)
pt3dadd(43.94, -3.23, -8.6, 2.55)
pt3dadd(43.9, -3.33, -8.6, 2.55)
pt3dadd(43.86, -3.42, -8.6, 2.55)
pt3dadd(43.86, -3.52, -8.6, 2.55)
pt3dadd(43.78, -3.52, -8.6, 2.55)
pt3dadd(43.78, -3.66, -8.6, 2.55)
pt3dadd(43.73, -3.76, -8.6, 2.55)
pt3dadd(43.69, -3.86, -8.6, 2.55)
pt3dadd(43.65, -3.9, -8.6, 2.55)
pt3dadd(43.65, -4.05, -8.6, 2.55)
pt3dadd(43.6, -4.2, -8.6, 2.55)
pt3dadd(43.56, -4.29, -8.6, 2.55)
pt3dadd(43.52, -4.39, -8.6, 2.55)
pt3dadd(43.52, -4.53, -8.6, 2.55)
pt3dadd(43.48, -4.63, -8.6, 2.55)
pt3dadd(43.48, -4.72, -8.6, 2.55)
pt3dadd(43.39, -4.82, -8.6, 2.55)
pt3dadd(43.39, -5.01, -8.6, 2.55)
pt3dadd(43.35, -5.11, -8.6, 2.55)
pt3dadd(43.31, -5.26, -8.6, 2.55)
pt3dadd(43.31, -5.35, -8.6, 2.55)
pt3dadd(43.26, -5.45, -8.6, 2.55)
pt3dadd(43.26, -5.55, -8.6, 2.55)
pt3dadd(43.22, -5.64, -8.6, 2.55)
pt3dadd(43.18, -5.79, -8.6, 2.55)
pt3dadd(43.18, -5.88, -8.6, 2.55)
pt3dadd(43.1, -6.03, -8.6, 2.55)
pt3dadd(43.1, -6.22, -8.6, 2.55)
pt3dadd(43.05, -6.36, -8.6, 2.55)
pt3dadd(43.01, -6.51, -8.6, 2.55)
pt3dadd(43.01, -6.75, -8.6, 2.55)
pt3dadd(42.97, -6.95, -8.6, 2.55)
pt3dadd(42.93, -7.04, -8.6, 2.55)
pt3dadd(42.93, -7.33, -8.6, 2.55)
pt3dadd(42.88, -7.47, -8.6, 2.55)
pt3dadd(42.88, -7.67, -8.6, 2.55)
pt3dadd(42.84, -7.81, -8.6, 2.55)
pt3dadd(42.84, -7.96, -8.6, 2.55)
pt3dadd(42.8, -8.1, -8.6, 2.55)
pt3dadd(42.76, -8.2, -8.6, 2.55)
pt3dadd(42.76, -8.39, -8.6, 2.55)
pt3dadd(42.72, -8.49, -8.6, 2.55)
pt3dadd(42.67, -8.59, -8.6, 2.55)
pt3dadd(42.67, -8.92, -8.6, 2.55)
pt3dadd(42.63, -9.07, -8.6, 2.55)
pt3dadd(42.63, -9.31, -8.6, 2.55)
pt3dadd(42.59, -9.4, -8.6, 2.55)
pt3dadd(42.59, -9.6, -8.6, 2.55)
pt3dadd(42.54, -9.74, -8.6, 2.55)
pt3dadd(42.54, -9.89, -8.6, 2.55)
pt3dadd(42.5, -9.98, -8.6, 2.55)
pt3dadd(42.5, -10.13, -8.6, 2.55)
pt3dadd(42.46, -10.22, -8.6, 2.55)
pt3dadd(42.46, -10.47, -8.6, 2.55)
pt3dadd(42.42, -10.66, -8.6, 2.55)
pt3dadd(42.42, -10.76, -8.6, 2.55)
pt3dadd(42.38, -10.9, -8.6, 2.55)
pt3dadd(42.33, -11.09, -8.6, 2.55)
pt3dadd(42.46, -10.92, -10.6, 2.55)
pt3dadd(42.46, -11.02, -10.6, 2.55)
pt3dadd(42.42, -11.07, -10.6, 2.55)
pt3dadd(42.42, -11.31, -10.6, 2.55)
pt3dadd(42.38, -11.36, -10.6, 2.55)
pt3dadd(42.38, -14.25, -10.6, 2.55)
pt3dadd(42.33, -14.35, -10.6, 2.55)
pt3dadd(42.33, -16.47, -10.6, 2.55)
pt3dadd(42.29, -16.61, -10.6, 2.55)
pt3dadd(42.29, -17.39, -10.6, 2.55)
pt3dadd(42.25, -17.48, -10.6, 2.55)
pt3dadd(42.25, -18.35, -10.6, 2.55)
pt3dadd(42.21, -18.44, -10.6, 2.55)
pt3dadd(42.21, -18.74, -10.6, 2.55)
pt3dadd(42.16, -18.78, -10.6, 2.55)
pt3dadd(42.12, -18.88, -10.6, 2.55)
pt3dadd(42.12, -19.07, -10.6, 2.55)
pt3dadd(42.08, -19.12, -10.6, 2.55)
pt3dadd(42.08, -19.26, -10.6, 2.55)
pt3dadd(42.03, -19.36, -10.6, 2.55)
pt3dadd(41.99, -19.46, -10.6, 2.55)
pt3dadd(41.95, -19.56, -10.6, 2.55)
pt3dadd(41.91, -19.65, -10.6, 2.55)
pt3dadd(41.87, -19.8, -10.6, 2.55)
pt3dadd(41.82, -19.89, -10.6, 2.55)
pt3dadd(41.82, -19.99, -10.6, 2.55)
pt3dadd(41.78, -20.08, -10.6, 2.55)
pt3dadd(41.74, -20.18, -10.6, 2.55)
pt3dadd(41.69, -20.28, -10.6, 2.55)
pt3dadd(41.65, -20.38, -10.6, 2.55)
pt3dadd(41.61, -20.42, -10.6, 2.55)
pt3dadd(41.53, -20.57, -10.6, 2.55)
pt3dadd(41.48, -20.67, -10.6, 2.55)
pt3dadd(41.44, -20.76, -10.6, 2.55)
}
}
proc shape3d_26() {
dend[16] { pt3dadd(41.4, -20.86, -10.6, 2.55)
pt3dadd(41.35, -20.95, -10.6, 2.55)
pt3dadd(41.31, -21.05, -10.6, 2.55)
pt3dadd(41.23, -21.19, -10.6, 2.55)
pt3dadd(41.19, -21.24, -10.6, 2.55)
pt3dadd(41.14, -21.34, -10.6, 2.55)
pt3dadd(41.1, -21.34, -10.6, 2.55)
pt3dadd(41.14, -21.36, -11.6, 2.55)
pt3dadd(41.1, -21.41, -11.6, 2.55)
pt3dadd(41.01, -21.46, -11.6, 2.55)
pt3dadd(40.97, -21.51, -11.6, 2.55)
pt3dadd(40.93, -21.56, -11.6, 2.55)
pt3dadd(40.89, -21.65, -11.6, 2.55)
pt3dadd(40.85, -21.7, -11.6, 2.55)
pt3dadd(40.72, -21.84, -11.6, 2.55)
pt3dadd(40.67, -21.9, -11.6, 2.55)
pt3dadd(40.59, -21.99, -11.6, 2.55)
pt3dadd(40.55, -22.04, -11.6, 2.55)
pt3dadd(40.51, -22.09, -11.6, 2.55)
pt3dadd(40.46, -22.14, -11.6, 2.55)
pt3dadd(40.42, -22.18, -11.6, 2.55)
pt3dadd(40.38, -22.23, -11.6, 2.55)
pt3dadd(40.29, -22.28, -11.6, 2.55)
pt3dadd(40.21, -22.38, -11.6, 2.55)
pt3dadd(40.17, -22.47, -11.6, 2.55)
pt3dadd(40.13, -22.57, -11.6, 2.55)
pt3dadd(40.04, -22.62, -11.6, 2.55)
pt3dadd(40.04, -22.72, -11.6, 2.55)
pt3dadd(39.96, -22.76, -11.6, 2.55)
pt3dadd(39.91, -22.86, -11.6, 2.55)
pt3dadd(39.87, -22.91, -11.6, 2.55)
pt3dadd(39.83, -23, -11.6, 2.55)
pt3dadd(39.74, -23.05, -11.6, 2.55)
pt3dadd(39.7, -23.15, -11.6, 2.55)
pt3dadd(39.62, -23.25, -11.6, 2.55)
pt3dadd(39.57, -23.29, -11.6, 2.55)
pt3dadd(39.53, -23.34, -11.6, 2.55)
pt3dadd(39.44, -23.44, -11.6, 2.55)
pt3dadd(39.36, -23.53, -11.6, 2.55)
pt3dadd(39.32, -23.58, -11.6, 2.55)
pt3dadd(39.28, -23.68, -11.6, 2.55)
pt3dadd(39.1, -23.87, -11.6, 2.55)
pt3dadd(39.06, -23.92, -11.6, 2.55)
pt3dadd(39.02, -24.01, -11.6, 2.55)
pt3dadd(38.98, -24.16, -11.6, 2.55)
pt3dadd(38.94, -24.26, -11.6, 2.55)
pt3dadd(38.85, -24.35, -11.6, 2.55)
pt3dadd(38.81, -24.45, -11.6, 2.55)
pt3dadd(38.76, -24.5, -11.6, 2.55)
pt3dadd(38.68, -24.64, -11.6, 2.55)
pt3dadd(38.6, -24.79, -11.6, 2.55)
pt3dadd(38.51, -24.89, -11.6, 2.55)
pt3dadd(38.42, -24.98, -11.6, 2.55)
pt3dadd(38.38, -25.13, -11.6, 2.55)
pt3dadd(38.3, -25.22, -11.6, 2.55)
pt3dadd(38.26, -25.37, -11.6, 2.55)
pt3dadd(38.21, -25.46, -11.6, 2.55)
pt3dadd(38.17, -25.56, -11.6, 2.55)
pt3dadd(38.13, -25.61, -11.6, 2.55)
pt3dadd(38.08, -25.75, -11.6, 2.55)
pt3dadd(38, -25.8, -11.6, 2.55)
pt3dadd(38, -25.9, -11.6, 2.55)
pt3dadd(37.96, -25.94, -11.6, 2.55)
pt3dadd(37.87, -25.99, -11.6, 2.55)
pt3dadd(37.87, -26.14, -11.6, 2.55)
pt3dadd(37.79, -26.24, -11.6, 2.55)
pt3dadd(37.71, -26.33, -11.6, 2.55)
pt3dadd(37.66, -26.43, -11.6, 2.55)
pt3dadd(37.62, -26.48, -11.6, 2.55)
pt3dadd(37.58, -26.57, -11.6, 2.55)
pt3dadd(37.45, -26.81, -11.6, 2.55)
pt3dadd(37.37, -26.91, -11.6, 2.55)
pt3dadd(37.32, -27, -11.6, 2.55)
pt3dadd(37.28, -27.1, -11.6, 2.55)
pt3dadd(37.19, -27.25, -11.6, 2.55)
pt3dadd(37.15, -27.3, -11.6, 2.55)
pt3dadd(37.11, -27.39, -11.6, 2.55)
pt3dadd(37.07, -27.49, -11.6, 2.55)
pt3dadd(36.98, -27.54, -11.6, 2.55)
pt3dadd(36.94, -27.63, -11.6, 2.55)
pt3dadd(36.9, -27.73, -11.6, 2.55)
pt3dadd(36.81, -27.78, -11.6, 2.55)
pt3dadd(36.73, -27.88, -11.6, 2.55)
pt3dadd(36.69, -27.97, -11.6, 2.55)
pt3dadd(36.64, -28.11, -11.6, 2.55)
pt3dadd(36.56, -28.16, -11.6, 2.55)
pt3dadd(36.51, -28.21, -11.6, 2.55)
pt3dadd(36.47, -28.31, -11.6, 2.55)
pt3dadd(36.43, -28.41, -11.6, 2.55)
pt3dadd(36.39, -28.45, -11.6, 2.55)
pt3dadd(36.22, -28.65, -11.6, 2.55)
pt3dadd(36.17, -28.79, -11.6, 2.55)
pt3dadd(36.13, -28.89, -11.6, 2.55)
pt3dadd(36.09, -28.98, -11.6, 2.55)
pt3dadd(36.05, -29.08, -11.6, 2.55)
pt3dadd(36.01, -29.13, -11.6, 2.55)
pt3dadd(35.96, -29.23, -11.6, 2.55)
pt3dadd(35.92, -29.32, -11.6, 2.55)
pt3dadd(35.88, -29.37, -11.6, 2.55)
pt3dadd(35.83, -29.32, -11.6, 2.55)
pt3dadd(35.92, -29.3, -14.6, 2.55)
pt3dadd(35.71, -29.3, -14.6, 2.55)
pt3dadd(35.67, -29.34, -14.6, 2.55)
pt3dadd(35.58, -29.39, -14.6, 2.55)
pt3dadd(35.54, -29.49, -14.6, 2.55)
pt3dadd(35.45, -29.54, -14.6, 2.55)
pt3dadd(35.41, -29.58, -14.6, 2.55)
pt3dadd(35.37, -29.64, -14.6, 2.55)
pt3dadd(35.67, -29.42, -14.6, 2.55)
pt3dadd(35.62, -29.47, -14.6, 2.55)
pt3dadd(35.58, -29.51, -14.6, 2.55)
pt3dadd(35.54, -29.56, -14.6, 2.55)
pt3dadd(35.49, -29.66, -14.6, 2.55)
pt3dadd(35.45, -29.71, -14.6, 2.55)
pt3dadd(35.41, -29.75, -14.6, 2.55)
pt3dadd(35.41, -29.85, -14.6, 2.55)
pt3dadd(35.37, -29.9, -14.6, 2.55)
pt3dadd(35.37, -30, -14.6, 2.55)
pt3dadd(35.33, -30.05, -14.6, 2.55)
pt3dadd(35.33, -30.28, -14.6, 2.55)
pt3dadd(35.28, -30.33, -14.6, 2.55)
pt3dadd(35.28, -31.25, -14.6, 2.55)
pt3dadd(35.24, -31.35, -14.6, 2.55)
pt3dadd(35.49, -32.06, -14.6, 2.55)
}
dend[17] {pt3dclear()
pt3dadd(35.49, -32.06, -14.6, 1.36)
pt3dadd(34.31, -31.64, 0.4, 1.36)
pt3dadd(33.04, -31.75, 0.4, 3.23)
pt3dadd(32.99, -31.8, 0.4, 3.23)
pt3dadd(32.95, -31.85, 0.4, 3.23)
pt3dadd(32.82, -31.85, 0.4, 3.23)
pt3dadd(32.77, -31.9, 0.4, 3.23)
pt3dadd(32.64, -31.95, 0.4, 3.23)
pt3dadd(32.55, -32, 0.4, 3.23)
pt3dadd(32.46, -32.05, 0.4, 3.23)
pt3dadd(32.37, -32.05, 0.4, 3.23)
pt3dadd(32.24, -32.1, 0.4, 3.23)
pt3dadd(32.15, -32.15, 0.4, 3.23)
pt3dadd(31.97, -32.2, 0.4, 3.23)
pt3dadd(31.88, -32.2, 0.4, 3.23)
pt3dadd(31.75, -32.25, 0.4, 3.23)
pt3dadd(31.61, -32.31, 0.4, 3.23)
pt3dadd(31.48, -32.35, 0.4, 3.23)
pt3dadd(31.39, -32.4, 0.4, 3.23)
pt3dadd(31.21, -32.46, 0.4, 3.23)
pt3dadd(31.12, -32.46, 0.4, 3.23)
pt3dadd(30.85, -32.56, 0.4, 3.23)
pt3dadd(30.76, -32.56, 0.4, 3.23)
pt3dadd(30.63, -32.61, 0.4, 3.23)
pt3dadd(26.67, -32.61, 0.4, 3.23)
pt3dadd(26.62, -32.66, 0.4, 3.23)
pt3dadd(26.49, -32.66, 0.4, 3.23)
pt3dadd(26.44, -32.81, 2.5, 2.72)
pt3dadd(26.35, -32.81, 2.5, 2.72)
pt3dadd(26.26, -32.86, 2.5, 2.72)
pt3dadd(26.17, -32.91, 2.5, 2.72)
pt3dadd(26.08, -32.96, 2.5, 2.72)
pt3dadd(26.04, -33.01, 2.5, 2.72)
pt3dadd(25.95, -33.06, 2.5, 2.72)
pt3dadd(25.91, -33.12, 2.5, 2.72)
pt3dadd(25.82, -33.12, 2.5, 2.72)
pt3dadd(25.73, -33.17, 2.5, 2.72)
pt3dadd(25.64, -33.22, 2.5, 2.72)
pt3dadd(25.59, -33.26, 2.5, 2.72)
pt3dadd(25.55, -33.32, 2.5, 2.72)
pt3dadd(25.46, -33.37, 2.5, 2.72)
pt3dadd(25.42, -33.42, 2.5, 2.72)
pt3dadd(25.37, -33.47, 2.5, 2.72)
pt3dadd(25.28, -33.47, 2.5, 2.72)
pt3dadd(25.24, -33.52, 2.5, 2.72)
pt3dadd(25.15, -33.57, 2.5, 2.72)
pt3dadd(25.1, -33.62, 2.5, 2.72)
pt3dadd(25.01, -33.62, 2.5, 2.72)
pt3dadd(24.92, -33.67, 2.5, 2.72)
pt3dadd(24.88, -33.72, 2.5, 2.72)
pt3dadd(24.84, -33.77, 2.5, 2.72)
pt3dadd(24.75, -33.82, 2.5, 2.72)
pt3dadd(24.66, -33.87, 2.5, 2.72)
pt3dadd(24.57, -33.87, 2.5, 2.72)
pt3dadd(24.52, -33.92, 2.5, 2.72)
pt3dadd(24.48, -33.97, 2.5, 2.72)
pt3dadd(24.34, -34.13, 2.5, 2.72)
pt3dadd(24.3, -34.23, 2.5, 2.72)
pt3dadd(24.03, -34.53, 2.5, 2.72)
pt3dadd(23.94, -34.68, 2.5, 2.72)
pt3dadd(23.85, -34.78, 2.5, 2.72)
pt3dadd(23.85, -34.88, 2.5, 2.72)
pt3dadd(23.72, -34.99, 2.5, 2.72)
pt3dadd(23.68, -35.09, 2.5, 2.72)
pt3dadd(23.63, -35.14, 2.5, 2.72)
pt3dadd(23.54, -35.24, 2.5, 2.72)
pt3dadd(23.45, -35.44, 2.5, 2.72)
pt3dadd(23.36, -35.54, 2.5, 2.72)
pt3dadd(23.32, -35.6, 2.5, 2.72)
pt3dadd(23.27, -35.7, 2.5, 2.72)
pt3dadd(23.23, -35.8, 2.5, 2.72)
pt3dadd(23.19, -35.85, 2.5, 2.72)
pt3dadd(23.01, -36.05, 2.5, 2.72)
pt3dadd(22.97, -36.15, 2.5, 2.72)
pt3dadd(22.92, -36.2, 2.5, 2.72)
pt3dadd(22.88, -36.25, 2.5, 2.72)
}
}
proc shape3d_27() {
dend[17] { pt3dadd(22.83, -36.31, 2.5, 2.72)
pt3dadd(22.88, -36.2, 6.7, 2.38)
pt3dadd(22.88, -36.31, 6.7, 2.38)
pt3dadd(22.78, -36.4, 6.7, 2.38)
pt3dadd(22.74, -36.51, 6.7, 2.38)
pt3dadd(22.65, -36.66, 6.7, 2.38)
pt3dadd(22.61, -36.76, 6.7, 2.38)
pt3dadd(22.52, -36.86, 6.7, 2.38)
pt3dadd(22.43, -36.91, 6.7, 2.38)
pt3dadd(22.39, -37.01, 6.7, 2.38)
pt3dadd(22.3, -37.12, 6.7, 2.38)
pt3dadd(22.25, -37.17, 6.7, 2.38)
pt3dadd(22.16, -37.26, 6.7, 2.38)
pt3dadd(22.07, -37.42, 6.7, 2.38)
pt3dadd(22.03, -37.47, 6.7, 2.38)
pt3dadd(21.98, -37.52, 6.7, 2.38)
pt3dadd(21.9, -37.57, 6.7, 2.38)
pt3dadd(21.85, -37.62, 6.7, 2.38)
pt3dadd(21.81, -37.67, 6.7, 2.38)
pt3dadd(21.63, -37.88, 6.7, 2.38)
pt3dadd(21.58, -37.92, 6.7, 2.38)
pt3dadd(21.54, -38.03, 6.7, 2.38)
pt3dadd(21.49, -38.08, 6.7, 2.38)
pt3dadd(21.41, -38.18, 6.7, 2.38)
pt3dadd(21.32, -38.23, 6.7, 2.38)
pt3dadd(21.27, -38.33, 6.7, 2.38)
pt3dadd(21.18, -38.43, 6.7, 2.38)
pt3dadd(21.14, -38.48, 6.7, 2.38)
pt3dadd(21.05, -38.58, 6.7, 2.38)
pt3dadd(21, -38.63, 6.7, 2.38)
pt3dadd(20.87, -38.83, 6.7, 2.38)
pt3dadd(20.74, -38.99, 6.7, 2.38)
pt3dadd(20.69, -39.04, 6.7, 2.38)
pt3dadd(20.65, -39.19, 6.7, 2.38)
pt3dadd(20.6, -39.24, 6.7, 2.38)
pt3dadd(20.51, -39.29, 6.7, 2.38)
pt3dadd(20.47, -39.39, 6.7, 2.38)
pt3dadd(20.42, -39.49, 6.7, 2.38)
pt3dadd(20.29, -39.65, 6.7, 2.38)
pt3dadd(20.25, -39.7, 6.7, 2.38)
}
dend[18] {pt3dclear()
pt3dadd(35.49, -32.06, -14.6, 2.55)
pt3dadd(35.24, -33.32, -14.6, 2.55)
pt3dadd(35.2, -33.18, -14.6, 2.55)
pt3dadd(35.2, -33.37, -14.6, 2.55)
pt3dadd(35.16, -33.42, -14.6, 2.55)
pt3dadd(35.16, -33.56, -14.6, 2.55)
pt3dadd(35.12, -33.61, -14.6, 2.55)
pt3dadd(35.07, -33.71, -14.6, 2.55)
}
dend[19] {pt3dclear()
pt3dadd(35.49, -32.06, -14.6, 3)
pt3dadd(31.37, -40.73, -16.75, 3)
pt3dadd(28.89, -47.26, -16.75, 3)
pt3dadd(26.27, -55.44, -16.75, 3)
pt3dadd(23.79, -66.48, -16.75, 3)
pt3dadd(24.02, -78.46, -16.75, 3)
pt3dadd(22.89, -91.4, -16.75, 3)
pt3dadd(22.07, -108.13, -16.75, 3)
pt3dadd(21.69, -114.89, -16.75, 3)
pt3dadd(20.57, -120.47, -16.75, 3)
pt3dadd(17.49, -127.23, -16.75, 3)
pt3dadd(13.51, -134.24, -16.75, 3)
pt3dadd(12.09, -140.29, -16.75, 3)
pt3dadd(10.96, -146.1, -16.75, 3)
}
dend[20] {pt3dclear()
pt3dadd(10.96, -146.1, -16.75, 2.4)
pt3dadd(9.69, -155.24, -16.75, 2.4)
pt3dadd(3.76, -163.66, -16.75, 2.4)
pt3dadd(-2.47, -171.85, -16.75, 2.4)
pt3dadd(-6.44, -182.18, -16.75, 2.4)
pt3dadd(-8.47, -191.07, -16.75, 2.4)
}
dend[21] {pt3dclear()
pt3dadd(10.96, -146.1, -16.75, 2.4)
pt3dadd(14.94, -146.93, -16.75, 2.4)
pt3dadd(17.86, -141.83, -16.75, 2.4)
pt3dadd(22.14, -134.59, -16.75, 2.4)
pt3dadd(26.87, -124.74, -16.75, 2.4)
pt3dadd(30.25, -120.59, -16.75, 2.4)
}
dend[22] {pt3dclear()
pt3dadd(48.55, 17.41, -9.65, 4.59)
pt3dadd(48.33, 15.95, -9.65, 4.59)
pt3dadd(48.29, 15.85, -9.65, 4.59)
pt3dadd(48.24, 15.8, -9.65, 4.59)
pt3dadd(48.24, 15.65, -9.65, 4.59)
pt3dadd(48.2, 15.6, -9.65, 4.59)
pt3dadd(48.15, 15.45, -9.65, 4.59)
pt3dadd(48.15, 15.35, -9.65, 4.59)
pt3dadd(48.11, 15.24, -9.65, 4.59)
pt3dadd(48.11, 15.14, -9.65, 4.59)
pt3dadd(48.06, 15.09, -9.65, 4.59)
pt3dadd(48.02, 15.04, -9.65, 4.59)
pt3dadd(47.97, 14.99, -9.65, 4.59)
pt3dadd(47.88, 14.84, -9.65, 4.59)
pt3dadd(47.88, 14.74, -9.65, 4.59)
pt3dadd(47.8, 14.64, -9.65, 4.59)
pt3dadd(47.75, 14.53, -9.65, 4.59)
pt3dadd(47.71, 14.44, -9.65, 4.59)
pt3dadd(47.66, 14.28, -9.65, 4.59)
pt3dadd(47.62, 14.18, -9.65, 4.59)
pt3dadd(47.57, 14.13, -9.65, 4.59)
pt3dadd(47.57, 14.23, -9.65, 4.59)
pt3dadd(47.75, 14.89, -6.5, 4.59)
pt3dadd(47.75, 14.79, -6.5, 4.59)
pt3dadd(47.71, 14.74, -6.5, 4.59)
pt3dadd(47.66, 14.69, -6.5, 4.59)
pt3dadd(47.62, 14.64, -6.5, 4.59)
pt3dadd(47.57, 14.59, -6.5, 4.59)
pt3dadd(47.57, 14.48, -6.5, 4.59)
pt3dadd(47.49, 14.44, -6.5, 4.59)
pt3dadd(47.44, 14.38, -6.5, 4.59)
pt3dadd(47.4, 14.28, -6.5, 4.59)
pt3dadd(47.35, 14.23, -6.5, 4.59)
pt3dadd(47.31, 14.18, -6.5, 4.59)
pt3dadd(47.26, 14.08, -6.5, 4.59)
pt3dadd(47.17, 14.03, -6.5, 4.59)
pt3dadd(47.17, 13.93, -6.5, 4.59)
pt3dadd(47.13, 13.88, -6.5, 4.59)
pt3dadd(47.08, 13.77, -6.5, 4.59)
pt3dadd(46.99, 13.68, -6.5, 4.59)
pt3dadd(47.22, 13.52, -6.5, 4.59)
}
dend[23] {pt3dclear()
pt3dadd(47.22, 13.52, -6.5, 4.59)
pt3dadd(46.95, 13.57, -6.5, 4.59)
pt3dadd(46.81, 13.42, -6.5, 4.59)
pt3dadd(46.77, 13.37, -6.5, 4.59)
pt3dadd(46.73, 13.32, -6.5, 4.59)
pt3dadd(46.68, 13.27, -6.5, 4.59)
pt3dadd(46.64, 13.17, -6.5, 4.59)
pt3dadd(46.59, 13.12, -6.5, 4.59)
pt3dadd(46.59, 13.02, -6.5, 4.59)
pt3dadd(46.55, 12.97, -6.5, 4.59)
pt3dadd(46.5, 12.91, -6.5, 4.59)
pt3dadd(46.46, 12.81, -6.5, 4.59)
pt3dadd(46.42, 12.76, -6.5, 4.59)
pt3dadd(46.37, 12.71, -6.5, 4.59)
pt3dadd(46.33, 12.61, -6.5, 4.59)
pt3dadd(46.24, 12.51, -6.5, 4.59)
pt3dadd(46.19, 12.41, -6.5, 4.59)
pt3dadd(46.15, 12.26, -6.5, 4.59)
pt3dadd(46.06, 12.2, -6.5, 4.59)
pt3dadd(46.01, 12.1, -6.5, 4.59)
pt3dadd(45.97, 12, -6.5, 4.59)
pt3dadd(45.92, 11.95, -6.5, 4.59)
pt3dadd(45.92, 11.85, -6.5, 4.59)
pt3dadd(45.88, 11.75, -6.5, 4.59)
pt3dadd(45.83, 11.7, -6.5, 4.59)
pt3dadd(45.79, 11.65, -6.5, 4.59)
pt3dadd(45.74, 11.6, -6.5, 4.59)
pt3dadd(45.7, 11.5, -6.5, 4.59)
pt3dadd(45.7, 11.4, -6.5, 4.59)
pt3dadd(45.66, 11.35, -6.5, 4.59)
pt3dadd(45.61, 11.3, -6.5, 4.59)
pt3dadd(45.57, 11.24, -6.5, 4.59)
pt3dadd(45.52, 11.19, -6.5, 4.59)
pt3dadd(45.48, 11.09, -6.5, 4.59)
pt3dadd(45.43, 10.99, -6.5, 4.59)
pt3dadd(45.35, 10.89, -6.5, 4.59)
pt3dadd(45.35, 10.79, -6.5, 4.59)
pt3dadd(45.3, 10.74, -6.5, 4.59)
pt3dadd(45.26, 10.64, -6.5, 4.59)
pt3dadd(45.21, 10.59, -6.5, 4.59)
pt3dadd(45.17, 10.48, -6.5, 4.59)
pt3dadd(45.12, 10.38, -6.5, 4.59)
pt3dadd(45.08, 10.33, -6.5, 4.59)
pt3dadd(45.03, 10.33, -6.5, 4.59)
pt3dadd(44.9, 10.13, -5.45, 2.89)
pt3dadd(44.9, 9.82, -5.45, 2.89)
pt3dadd(44.85, 9.77, -5.45, 2.89)
pt3dadd(44.81, 9.73, -5.45, 2.89)
pt3dadd(44.81, 9.62, -5.45, 2.89)
pt3dadd(44.76, 9.57, -5.45, 2.89)
pt3dadd(44.76, 9.47, -5.45, 2.89)
pt3dadd(44.67, 9.42, -5.45, 2.89)
pt3dadd(44.63, 9.37, -5.45, 2.89)
pt3dadd(44.63, 9.27, -5.45, 2.89)
pt3dadd(44.59, 9.22, -5.45, 2.89)
pt3dadd(44.5, 9.17, -5.45, 2.89)
pt3dadd(44.45, 9.12, -5.45, 2.89)
pt3dadd(44.45, 9.02, -5.45, 2.89)
pt3dadd(44.41, 8.97, -5.45, 2.89)
pt3dadd(44.36, 8.91, -5.45, 2.89)
pt3dadd(44.32, 8.86, -5.45, 2.89)
pt3dadd(44.28, 8.81, -5.45, 2.89)
pt3dadd(44.23, 8.76, -5.45, 2.89)
pt3dadd(44.19, 8.71, -5.45, 2.89)
pt3dadd(44.14, 8.66, -5.45, 2.89)
pt3dadd(44.1, 8.61, -5.45, 2.89)
pt3dadd(44.05, 8.51, -5.45, 2.89)
pt3dadd(44.01, 8.46, -5.45, 2.89)
pt3dadd(43.96, 8.41, -5.45, 2.89)
pt3dadd(43.92, 8.36, -5.45, 2.89)
pt3dadd(43.87, 8.26, -5.45, 2.89)
pt3dadd(43.83, 8.15, -5.45, 2.89)
pt3dadd(43.78, 8.1, -5.45, 2.89)
pt3dadd(43.74, 8.05, -5.45, 2.89)
pt3dadd(43.69, 8, -5.45, 2.89)
pt3dadd(43.6, 7.95, -5.45, 2.89)
pt3dadd(43.56, 7.9, -5.45, 2.89)
pt3dadd(43.52, 7.85, -5.45, 2.89)
pt3dadd(43.47, 7.8, -5.45, 2.89)
pt3dadd(43.43, 7.75, -5.45, 2.89)
pt3dadd(43.43, 7.85, -5.45, 2.89)
pt3dadd(43.47, 7.7, -3.35, 2.89)
pt3dadd(43.43, 7.65, -3.35, 2.89)
pt3dadd(43.38, 7.6, -3.35, 2.89)
pt3dadd(43.34, 7.55, -3.35, 2.89)
}
}
proc shape3d_28() {
dend[23] { pt3dadd(43.25, 7.45, -3.35, 2.89)
pt3dadd(43.16, 7.39, -3.35, 2.89)
pt3dadd(43.07, 7.34, -3.35, 2.89)
pt3dadd(42.98, 7.3, -3.35, 2.89)
pt3dadd(42.94, 7.24, -3.35, 2.89)
pt3dadd(42.89, 7.19, -3.35, 2.89)
pt3dadd(42.76, 7.09, -3.35, 2.89)
pt3dadd(42.72, 7.04, -3.35, 2.89)
pt3dadd(42.63, 6.99, -3.35, 2.89)
pt3dadd(42.53, 6.94, -3.35, 2.89)
pt3dadd(42.4, 6.79, -3.35, 2.89)
pt3dadd(42.36, 6.74, -3.35, 2.89)
pt3dadd(42.27, 6.69, -3.35, 2.89)
pt3dadd(42.18, 6.64, -3.35, 2.89)
pt3dadd(42.13, 6.59, -3.35, 2.89)
pt3dadd(42.09, 6.49, -3.35, 2.89)
pt3dadd(42, 6.43, -3.35, 2.89)
pt3dadd(41.91, 6.38, -3.35, 2.89)
pt3dadd(41.82, 6.33, -3.35, 2.89)
pt3dadd(41.73, 6.28, -3.35, 2.89)
pt3dadd(41.65, 6.23, -3.35, 2.89)
pt3dadd(41.6, 6.18, -3.35, 2.89)
pt3dadd(41.51, 6.13, -3.35, 2.89)
pt3dadd(41.42, 6.08, -3.35, 2.89)
pt3dadd(41.33, 6.03, -3.35, 2.89)
pt3dadd(41.24, 5.98, -3.35, 2.89)
pt3dadd(41.2, 5.93, -3.35, 2.89)
pt3dadd(41.11, 5.88, -3.35, 2.89)
pt3dadd(41.06, 5.78, -3.35, 2.89)
pt3dadd(40.97, 5.72, -3.35, 2.89)
pt3dadd(40.93, 5.62, -3.35, 2.89)
pt3dadd(40.88, 5.57, -3.35, 2.89)
pt3dadd(40.84, 5.52, -3.35, 2.89)
pt3dadd(40.8, 5.47, -3.35, 2.89)
pt3dadd(40.75, 5.42, -3.35, 2.89)
pt3dadd(40.66, 5.37, -3.35, 2.89)
pt3dadd(40.62, 5.32, -3.35, 2.89)
pt3dadd(40.58, 5.37, -3.35, 2.89)
pt3dadd(40.58, 5.42, -3.35, 2.89)
pt3dadd(40.62, 5.07, -3.35, 2.38)
pt3dadd(40.62, 4.97, -3.35, 2.38)
pt3dadd(40.58, 4.91, -3.35, 2.38)
pt3dadd(40.49, 4.86, -3.35, 2.38)
pt3dadd(40.44, 4.81, -3.35, 2.38)
pt3dadd(40.4, 4.76, -3.35, 2.38)
pt3dadd(40.35, 4.71, -3.35, 2.38)
pt3dadd(40.31, 4.61, -3.35, 2.38)
pt3dadd(40.22, 4.56, -3.35, 2.38)
pt3dadd(40.13, 4.46, -3.35, 2.38)
pt3dadd(40.08, 4.41, -3.35, 2.38)
pt3dadd(39.81, 4.11, -3.35, 2.38)
pt3dadd(39.77, 4.05, -3.35, 2.38)
pt3dadd(39.64, 3.9, -3.35, 2.38)
pt3dadd(39.59, 3.85, -3.35, 2.38)
pt3dadd(39.46, 3.7, -3.35, 2.38)
pt3dadd(39.42, 3.65, -3.35, 2.38)
pt3dadd(39.37, 3.6, -3.35, 2.38)
pt3dadd(39.33, 3.55, -3.35, 2.38)
pt3dadd(39.28, 3.44, -3.35, 2.38)
pt3dadd(39.24, 3.39, -3.35, 2.38)
pt3dadd(39.19, 3.35, -3.35, 2.38)
pt3dadd(39.1, 3.3, -3.35, 2.38)
pt3dadd(39.06, 3.24, -3.35, 2.38)
pt3dadd(39.01, 3.19, -3.35, 2.38)
pt3dadd(38.97, 3.09, -3.35, 2.38)
pt3dadd(38.92, 3.04, -3.35, 2.38)
pt3dadd(38.88, 2.94, -3.35, 2.38)
pt3dadd(38.79, 2.89, -3.35, 2.38)
pt3dadd(38.74, 2.84, -3.35, 2.38)
pt3dadd(38.7, 2.79, -3.35, 2.38)
pt3dadd(38.66, 2.74, -3.35, 2.38)
pt3dadd(38.66, 2.63, -3.35, 2.38)
pt3dadd(38.57, 2.59, -3.35, 2.38)
pt3dadd(38.48, 2.48, -3.35, 2.38)
pt3dadd(38.44, 2.38, -3.35, 2.38)
pt3dadd(38.39, 2.33, -3.35, 2.38)
pt3dadd(38.35, 2.28, -3.35, 2.38)
pt3dadd(38.3, 2.23, -3.35, 2.38)
pt3dadd(38.26, 2.13, -3.35, 2.38)
pt3dadd(38.21, 2.08, -3.35, 2.38)
pt3dadd(38.12, 2.03, -3.35, 2.38)
pt3dadd(38.08, 1.98, -3.35, 2.38)
pt3dadd(38.03, 1.93, -3.35, 2.38)
pt3dadd(37.99, 1.88, -3.35, 2.38)
pt3dadd(37.94, 1.83, -3.35, 2.38)
pt3dadd(37.9, 1.77, -3.35, 2.38)
pt3dadd(37.85, 1.73, -3.35, 2.38)
pt3dadd(37.76, 1.62, -3.35, 2.38)
pt3dadd(37.72, 1.57, -3.35, 2.38)
pt3dadd(37.63, 1.47, -3.35, 2.38)
pt3dadd(37.59, 1.42, -3.35, 2.38)
pt3dadd(37.54, 1.37, -3.35, 2.38)
pt3dadd(37.5, 1.32, -3.35, 2.38)
pt3dadd(37.41, 1.32, -3.35, 2.38)
pt3dadd(37.37, 1.27, -3.35, 2.38)
pt3dadd(37.32, 1.22, -3.35, 2.38)
pt3dadd(37.28, 1.17, -3.35, 2.38)
pt3dadd(37.23, 1.07, -3.35, 2.38)
pt3dadd(37.19, 1.01, -3.35, 2.38)
pt3dadd(37.19, 0.92, -3.35, 2.38)
pt3dadd(37.14, 0.86, -3.35, 2.38)
pt3dadd(37.1, 0.81, -3.35, 2.38)
pt3dadd(37.1, 0.71, -3.35, 2.38)
pt3dadd(37.05, 0.66, -3.35, 2.38)
pt3dadd(37.01, 0.61, -3.35, 2.38)
pt3dadd(37.01, 0.51, -3.35, 2.38)
pt3dadd(36.96, 0.46, -3.35, 2.38)
pt3dadd(36.92, 0.41, -3.35, 2.38)
pt3dadd(36.87, 0.36, -3.35, 2.38)
pt3dadd(36.87, 0.25, -3.35, 2.38)
pt3dadd(36.83, 0.2, -3.35, 2.38)
pt3dadd(36.78, 0.16, -3.35, 2.38)
pt3dadd(36.78, 0, -3.35, 2.38)
pt3dadd(36.74, -0.1, -3.35, 2.38)
pt3dadd(36.69, -0.15, -3.35, 2.38)
pt3dadd(36.65, -0.2, -3.35, 2.38)
pt3dadd(36.61, -0.25, -3.35, 2.38)
pt3dadd(36.56, -0.35, -3.35, 2.38)
pt3dadd(36.56, -0.45, -3.35, 2.38)
pt3dadd(36.52, -0.5, -3.35, 2.38)
pt3dadd(36.47, -0.56, -3.35, 2.38)
pt3dadd(36.43, -0.61, -3.35, 2.38)
pt3dadd(36.43, -0.71, -3.35, 2.38)
pt3dadd(36.38, -0.81, -3.35, 2.38)
pt3dadd(36.34, -0.86, -3.35, 2.38)
pt3dadd(36.29, -0.96, -3.35, 2.38)
pt3dadd(36.25, -1.06, -3.35, 2.38)
pt3dadd(36.25, -1.16, -3.35, 2.38)
pt3dadd(36.21, -1.26, -3.35, 2.38)
pt3dadd(36.16, -1.32, -3.35, 2.38)
pt3dadd(36.12, -1.41, -3.35, 2.38)
pt3dadd(36.07, -1.47, -3.35, 2.38)
pt3dadd(36.07, -1.57, -3.35, 2.38)
pt3dadd(35.98, -1.67, -3.35, 2.38)
pt3dadd(35.98, -1.77, -3.35, 2.38)
pt3dadd(35.94, -1.82, -3.35, 2.38)
pt3dadd(35.89, -1.92, -3.35, 2.38)
pt3dadd(35.85, -1.97, -3.35, 2.38)
pt3dadd(35.85, -2.07, -3.35, 2.38)
pt3dadd(35.81, -2.17, -3.35, 2.38)
pt3dadd(35.76, -2.28, -3.35, 2.38)
pt3dadd(35.76, -2.38, -3.35, 2.38)
pt3dadd(35.72, -2.48, -3.35, 2.38)
pt3dadd(35.72, -2.63, -3.35, 2.38)
pt3dadd(35.67, -2.68, -3.35, 2.38)
pt3dadd(35.67, -5.26, -3.35, 2.38)
pt3dadd(35.63, -5.36, -3.35, 2.38)
pt3dadd(35.63, -5.57, -3.35, 2.38)
pt3dadd(35.58, -5.67, -3.35, 2.38)
pt3dadd(35.58, -5.87, -3.35, 2.38)
pt3dadd(35.54, -5.97, -3.35, 2.38)
pt3dadd(35.54, -6.07, -3.35, 2.38)
pt3dadd(35.49, -6.22, -3.35, 2.38)
pt3dadd(35.49, -6.38, -3.35, 2.38)
pt3dadd(35.45, -6.48, -3.35, 2.38)
pt3dadd(35.45, -6.63, -3.35, 2.38)
pt3dadd(35.4, -6.68, -3.35, 2.38)
pt3dadd(35.4, -6.83, -3.35, 2.38)
pt3dadd(35.36, -6.89, -3.35, 2.38)
pt3dadd(35.36, -7.03, -3.35, 2.38)
pt3dadd(35.31, -7.09, -3.35, 2.38)
pt3dadd(35.31, -7.19, -3.35, 2.38)
pt3dadd(35.27, -7.24, -3.35, 2.38)
pt3dadd(35.27, -7.34, -3.35, 2.38)
pt3dadd(35.27, -6.83, -3.35, 2.38)
pt3dadd(35.22, -7.14, -3.35, 2.38)
pt3dadd(35.18, -7.19, -3.35, 2.38)
pt3dadd(35.18, -7.34, -3.35, 2.38)
pt3dadd(35.13, -7.39, -3.35, 2.38)
pt3dadd(35.09, -7.44, -3.35, 2.38)
pt3dadd(35.04, -7.59, -3.35, 2.38)
pt3dadd(35.04, -7.7, -3.35, 2.38)
pt3dadd(35, -7.8, -3.35, 2.38)
pt3dadd(34.96, -7.9, -3.35, 2.38)
pt3dadd(34.91, -8, -3.35, 2.38)
pt3dadd(34.91, -8.15, -3.35, 2.38)
pt3dadd(34.87, -8.2, -3.35, 2.38)
pt3dadd(34.87, -8.4, -3.35, 2.38)
pt3dadd(34.82, -8.45, -3.35, 2.38)
pt3dadd(34.82, -8.6, -3.35, 2.38)
pt3dadd(34.78, -8.66, -3.35, 2.38)
pt3dadd(34.78, -8.91, -3.35, 2.38)
pt3dadd(34.74, -9.01, -3.35, 2.38)
pt3dadd(34.74, -10.23, -3.35, 2.38)
pt3dadd(34.69, -10.33, -3.35, 2.38)
pt3dadd(34.69, -10.63, -3.35, 2.38)
pt3dadd(34.65, -10.68, -3.35, 2.38)
pt3dadd(34.65, -11.34, -3.35, 2.38)
pt3dadd(34.6, -11.44, -3.35, 2.38)
pt3dadd(34.6, -12.15, -3.35, 2.38)
pt3dadd(34.56, -12.25, -3.35, 2.38)
pt3dadd(34.56, -12.6, -3.35, 2.38)
pt3dadd(34.51, -12.71, -3.35, 2.38)
pt3dadd(34.51, -13.01, -3.35, 2.38)
pt3dadd(34.47, -13.06, -3.35, 2.38)
pt3dadd(34.47, -13.27, -3.35, 2.38)
pt3dadd(34.42, -13.36, -3.35, 2.38)
pt3dadd(34.42, -14.63, -3.35, 2.38)
pt3dadd(34.42, -14.53, -1.25, 2.38)
pt3dadd(34.42, -14.73, -1.25, 2.38)
}
}
proc shape3d_29() {
dend[23] { pt3dadd(34.38, -14.84, -1.25, 2.38)
pt3dadd(34.33, -14.94, -1.25, 2.38)
pt3dadd(34.33, -15.09, -1.25, 2.38)
pt3dadd(34.29, -15.24, -1.25, 2.38)
pt3dadd(34.24, -15.34, -1.25, 2.38)
pt3dadd(34.2, -15.49, -1.25, 2.38)
pt3dadd(34.2, -15.65, -1.25, 2.38)
pt3dadd(34.15, -15.8, -1.25, 2.38)
pt3dadd(34.11, -15.9, -1.25, 2.38)
pt3dadd(34.11, -16.1, -1.25, 2.38)
pt3dadd(34.06, -16.2, -1.25, 2.38)
pt3dadd(34.06, -16.41, -1.25, 2.38)
pt3dadd(34.02, -16.5, -1.25, 2.38)
pt3dadd(34.02, -16.96, -1.25, 2.38)
pt3dadd(33.97, -17.11, -1.25, 2.38)
pt3dadd(33.97, -17.32, -1.25, 2.38)
pt3dadd(33.93, -17.42, -1.25, 2.38)
pt3dadd(33.93, -17.67, -1.25, 2.38)
pt3dadd(33.89, -17.82, -1.25, 2.38)
pt3dadd(33.89, -18.02, -1.25, 2.38)
pt3dadd(33.84, -18.13, -1.25, 2.38)
pt3dadd(33.84, -18.33, -1.25, 2.38)
pt3dadd(33.8, -18.48, -1.25, 2.38)
pt3dadd(33.8, -18.63, -1.25, 2.38)
pt3dadd(33.75, -18.68, -1.25, 2.38)
pt3dadd(33.75, -18.83, -1.25, 2.38)
pt3dadd(33.71, -18.93, -1.25, 2.38)
pt3dadd(33.71, -19.09, -1.25, 2.38)
pt3dadd(33.67, -19.14, -1.25, 2.38)
pt3dadd(33.67, -19.24, -1.25, 2.38)
pt3dadd(33.62, -19.34, -1.25, 2.38)
pt3dadd(33.62, -19.49, -1.25, 2.38)
pt3dadd(33.58, -19.65, -1.25, 2.38)
pt3dadd(33.58, -19.8, -1.25, 2.38)
pt3dadd(33.53, -19.9, -1.25, 2.38)
pt3dadd(33.53, -20, -1.25, 2.38)
pt3dadd(33.49, -20.1, -1.25, 2.38)
pt3dadd(33.44, -20.3, -1.25, 2.38)
pt3dadd(33.44, -20.45, -1.25, 2.38)
pt3dadd(33.4, -20.5, -1.25, 2.38)
pt3dadd(33.4, -20.66, -1.25, 2.38)
pt3dadd(33.35, -20.76, -1.25, 2.38)
pt3dadd(33.35, -20.91, -1.25, 2.38)
pt3dadd(33.31, -21.01, -1.25, 2.38)
pt3dadd(33.31, -21.22, -1.25, 2.38)
pt3dadd(33.26, -21.32, -1.25, 2.38)
pt3dadd(33.26, -21.92, -1.25, 2.38)
pt3dadd(33.22, -21.98, -1.25, 2.38)
pt3dadd(33.22, -22.58, -1.25, 2.38)
pt3dadd(33.31, -22.68, -0.2, 2.55)
pt3dadd(33.26, -22.73, -0.2, 2.55)
pt3dadd(33.26, -23.04, -0.2, 2.55)
pt3dadd(33.22, -23.19, -0.2, 2.55)
pt3dadd(33.22, -27.8, -0.2, 2.55)
pt3dadd(33.17, -27.9, -0.2, 2.55)
pt3dadd(33.17, -28.3, -0.2, 2.55)
pt3dadd(33.13, -28.41, -0.2, 2.55)
pt3dadd(33.13, -28.61, -0.2, 2.55)
pt3dadd(33.08, -28.66, -0.2, 2.55)
pt3dadd(33.08, -28.86, -0.2, 2.55)
pt3dadd(33.04, -28.96, -0.2, 2.55)
pt3dadd(32.99, -29.06, -0.2, 2.55)
pt3dadd(32.99, -29.17, -0.2, 2.55)
pt3dadd(32.95, -29.32, -0.2, 2.55)
pt3dadd(32.95, -29.42, -0.2, 2.55)
pt3dadd(32.9, -29.47, -0.2, 2.55)
pt3dadd(32.86, -29.52, -0.2, 2.55)
pt3dadd(32.86, -29.62, -0.2, 2.55)
pt3dadd(32.82, -29.67, -0.2, 2.55)
pt3dadd(32.82, -29.77, -0.2, 2.55)
pt3dadd(32.77, -29.82, -0.2, 2.55)
pt3dadd(32.73, -29.92, -0.2, 2.55)
pt3dadd(32.68, -29.98, -0.2, 2.55)
pt3dadd(32.68, -30.13, -0.2, 2.55)
pt3dadd(32.64, -30.18, -0.2, 2.55)
pt3dadd(32.6, -30.28, -0.2, 2.55)
pt3dadd(32.55, -30.38, -0.2, 2.55)
pt3dadd(32.55, -30.48, -0.2, 2.55)
pt3dadd(32.51, -30.53, -0.2, 2.55)
pt3dadd(32.51, -30.63, -0.2, 2.55)
}
dend[24] {pt3dclear()
pt3dadd(32.51, -30.63, -0.2, 3.57)
pt3dadd(32.37, -31.19, -1.25, 3.57)
pt3dadd(32.37, -31.34, -1.25, 3.57)
pt3dadd(32.33, -31.39, -1.25, 3.57)
pt3dadd(32.33, -31.49, -1.25, 3.57)
pt3dadd(32.28, -31.55, -1.25, 3.57)
pt3dadd(32.28, -31.65, -1.25, 3.57)
pt3dadd(32.24, -31.69, -1.25, 3.57)
pt3dadd(32.24, -31.8, -1.25, 3.57)
pt3dadd(32.19, -31.85, -1.25, 3.57)
pt3dadd(32.19, -31.95, -1.25, 3.57)
pt3dadd(32.15, -32.05, -1.25, 3.57)
pt3dadd(32.15, -33.87, -1.25, 3.57)
pt3dadd(32.19, -33.97, -1.25, 3.57)
pt3dadd(32.19, -34.23, -1.25, 3.57)
pt3dadd(32.24, -34.33, -1.25, 3.57)
pt3dadd(32.24, -34.53, -1.25, 3.57)
pt3dadd(32.28, -34.63, -1.25, 3.57)
pt3dadd(32.33, -34.74, -1.25, 3.57)
pt3dadd(32.37, -34.78, -1.25, 3.57)
pt3dadd(32.42, -34.83, -1.25, 3.57)
pt3dadd(32.46, -34.88, -1.25, 3.57)
pt3dadd(32.51, -34.99, -1.25, 3.57)
pt3dadd(32.55, -35.09, -1.25, 3.57)
pt3dadd(32.64, -35.09, -1.25, 3.57)
pt3dadd(32.68, -35.14, -1.25, 3.57)
pt3dadd(32.73, -35.19, -1.25, 3.57)
pt3dadd(32.77, -35.29, -1.25, 3.57)
pt3dadd(32.86, -35.39, -1.25, 3.57)
pt3dadd(32.9, -35.44, -1.25, 3.57)
pt3dadd(32.99, -35.49, -1.25, 3.57)
pt3dadd(33.08, -35.54, -1.25, 3.57)
pt3dadd(33.13, -35.6, -1.25, 3.57)
pt3dadd(33.17, -35.65, -1.25, 3.57)
pt3dadd(33.22, -35.7, -1.25, 3.57)
pt3dadd(33.35, -35.85, -1.25, 3.57)
pt3dadd(33.4, -35.9, -1.25, 3.57)
pt3dadd(33.49, -36, -1.25, 3.57)
pt3dadd(33.53, -36.05, -1.25, 3.57)
pt3dadd(33.58, -36.15, -1.25, 3.57)
pt3dadd(33.62, -36.25, -1.25, 3.57)
pt3dadd(33.67, -36.31, -1.25, 3.57)
pt3dadd(33.71, -36.35, -1.25, 3.57)
pt3dadd(33.75, -36.4, -1.25, 3.57)
pt3dadd(33.8, -36.46, -1.25, 3.57)
pt3dadd(33.84, -36.51, -1.25, 3.57)
pt3dadd(33.89, -36.56, -1.25, 3.57)
pt3dadd(33.93, -36.61, -1.25, 3.57)
pt3dadd(33.97, -36.66, -1.25, 3.57)
pt3dadd(34.02, -36.71, -1.25, 3.57)
pt3dadd(34.06, -36.76, -1.25, 3.57)
pt3dadd(34.15, -36.76, -1.25, 3.57)
pt3dadd(34.2, -36.81, -1.25, 3.57)
pt3dadd(34.24, -36.86, -1.25, 3.57)
pt3dadd(34.33, -36.96, -1.25, 3.57)
pt3dadd(34.38, -37.01, -1.25, 3.57)
pt3dadd(34.47, -37.01, -1.25, 3.57)
pt3dadd(34.51, -37.06, -1.25, 3.57)
pt3dadd(34.56, -37.12, -1.25, 3.57)
pt3dadd(34.69, -37.26, -1.25, 3.57)
pt3dadd(34.78, -37.26, -1.25, 3.57)
pt3dadd(34.82, -37.32, -1.25, 3.57)
pt3dadd(34.87, -37.37, -1.25, 3.57)
pt3dadd(34.96, -37.42, -1.25, 3.57)
pt3dadd(35, -37.47, -1.25, 3.57)
pt3dadd(35.13, -37.47, -1.25, 3.57)
pt3dadd(35.18, -37.52, -1.25, 3.57)
pt3dadd(35.22, -37.57, -1.25, 3.57)
pt3dadd(35.31, -37.62, -1.25, 3.57)
pt3dadd(35.45, -37.67, -1.25, 3.57)
pt3dadd(35.54, -37.77, -1.25, 3.57)
pt3dadd(35.67, -37.92, -1.25, 3.57)
pt3dadd(35.76, -37.97, -1.25, 3.57)
pt3dadd(35.89, -38.03, -1.25, 3.57)
pt3dadd(35.98, -38.08, -1.25, 3.57)
pt3dadd(36.03, -38.13, -1.25, 3.57)
pt3dadd(36.12, -38.18, -1.25, 3.57)
pt3dadd(36.16, -38.23, -1.25, 3.57)
pt3dadd(36.25, -38.28, -1.25, 3.57)
pt3dadd(36.29, -38.33, -1.25, 3.57)
pt3dadd(36.21, -38.33, 0.85, 3.57)
pt3dadd(36.96, -39.14, 0.85, 3.57)
pt3dadd(37.05, -39.19, 0.85, 3.57)
pt3dadd(37.14, -39.34, 0.85, 3.57)
pt3dadd(37.28, -39.49, 0.85, 3.57)
pt3dadd(37.37, -39.6, 0.85, 3.57)
pt3dadd(37.45, -39.65, 0.85, 3.57)
pt3dadd(37.45, -39.75, 0.85, 3.57)
pt3dadd(37.5, -39.8, 0.85, 3.57)
pt3dadd(37.54, -39.85, 0.85, 3.57)
pt3dadd(37.59, -39.9, 0.85, 3.57)
pt3dadd(37.63, -39.95, 0.85, 3.57)
pt3dadd(37.67, -40, 0.85, 3.57)
pt3dadd(37.72, -40.05, 0.85, 3.57)
pt3dadd(37.81, -40.1, 0.85, 3.57)
pt3dadd(37.85, -40.15, 0.85, 3.57)
pt3dadd(37.9, -40.25, 0.85, 3.57)
pt3dadd(37.99, -40.35, 0.85, 3.57)
pt3dadd(38.08, -40.46, 0.85, 3.57)
pt3dadd(38.17, -40.61, 0.85, 3.57)
pt3dadd(38.21, -40.71, 0.85, 3.57)
pt3dadd(38.3, -40.81, 0.85, 3.57)
pt3dadd(38.35, -40.86, 0.85, 3.57)
pt3dadd(38.39, -40.91, 0.85, 3.57)
pt3dadd(38.48, -40.96, 0.85, 3.57)
pt3dadd(38.52, -41.06, 0.85, 3.57)
pt3dadd(38.57, -41.12, 0.85, 3.57)
pt3dadd(38.61, -41.22, 0.85, 3.57)
pt3dadd(38.7, -41.32, 0.85, 3.57)
pt3dadd(38.74, -41.37, 0.85, 3.57)
pt3dadd(38.79, -41.47, 0.85, 3.57)
pt3dadd(38.88, -41.62, 0.85, 3.57)
pt3dadd(38.92, -41.72, 0.85, 3.57)
pt3dadd(38.97, -41.77, 0.85, 3.57)
pt3dadd(39.01, -41.92, 0.85, 3.57)
pt3dadd(39.06, -42.03, 0.85, 3.57)
pt3dadd(39.1, -42.08, 0.85, 3.57)
pt3dadd(39.15, -42.18, 0.85, 3.57)
pt3dadd(39.15, -42.28, 0.85, 3.57)
pt3dadd(39.19, -42.43, 0.85, 3.57)
}
}
proc shape3d_30() {
dend[24] { pt3dadd(39.24, -42.53, 0.85, 3.57)
pt3dadd(39.28, -42.58, 0.85, 3.57)
pt3dadd(39.28, -42.69, 0.85, 3.57)
pt3dadd(39.33, -42.74, 0.85, 3.57)
pt3dadd(39.33, -42.99, 0.85, 3.57)
pt3dadd(39.37, -43.14, 0.85, 3.57)
pt3dadd(39.42, -43.24, 0.85, 3.57)
pt3dadd(39.42, -43.49, 0.85, 3.57)
pt3dadd(39.46, -43.6, 0.85, 3.57)
pt3dadd(39.46, -43.95, 0.85, 3.57)
pt3dadd(39.51, -44.05, 0.85, 3.57)
pt3dadd(39.51, -44.2, 0.85, 3.57)
pt3dadd(39.59, -44.4, 0.85, 3.57)
pt3dadd(39.59, -44.51, 0.85, 3.57)
pt3dadd(39.68, -44.66, 0.85, 3.57)
pt3dadd(39.68, -44.76, 0.85, 3.57)
pt3dadd(39.73, -44.91, 0.85, 3.57)
pt3dadd(39.73, -45.32, 0.85, 3.57)
pt3dadd(39.64, -45.32, 1.9, 3.57)
pt3dadd(39.64, -45.62, 1.9, 3.57)
pt3dadd(39.59, -45.67, 1.9, 3.57)
pt3dadd(39.9, -48.61, 1.9, 3.57)
pt3dadd(38.4, -49.33, 4, 2.89)
pt3dadd(39.55, -48.4, 4, 2.89)
pt3dadd(39.51, -48.46, 4, 2.89)
pt3dadd(39.46, -48.51, 4, 2.89)
pt3dadd(39.42, -48.56, 4, 2.89)
pt3dadd(39.37, -48.61, 4, 2.89)
pt3dadd(39.37, -48.71, 4, 2.89)
pt3dadd(39.33, -48.76, 4, 2.89)
pt3dadd(39.24, -48.81, 4, 2.89)
pt3dadd(39.19, -48.91, 4, 2.89)
pt3dadd(39.15, -48.96, 4, 2.89)
pt3dadd(39.15, -49.06, 4, 2.89)
pt3dadd(39.1, -49.12, 4, 2.89)
pt3dadd(39.06, -49.22, 4, 2.89)
pt3dadd(39.06, -49.32, 4, 2.89)
pt3dadd(39.01, -49.37, 4, 2.89)
pt3dadd(38.97, -49.42, 4, 2.89)
pt3dadd(38.92, -49.47, 4, 2.89)
pt3dadd(38.88, -49.52, 4, 2.89)
pt3dadd(38.88, -49.62, 4, 2.89)
pt3dadd(38.83, -49.67, 4, 2.89)
pt3dadd(38.79, -49.72, 4, 2.89)
pt3dadd(38.79, -49.83, 4, 2.89)
pt3dadd(38.74, -49.92, 4, 2.89)
pt3dadd(38.7, -50.08, 4, 2.89)
pt3dadd(38.66, -50.13, 4, 2.89)
pt3dadd(38.61, -50.23, 4, 2.89)
pt3dadd(38.57, -50.33, 4, 2.89)
pt3dadd(38.52, -50.38, 4, 2.89)
pt3dadd(38.48, -50.48, 4, 2.89)
pt3dadd(38.44, -50.58, 4, 2.89)
pt3dadd(38.39, -50.63, 4, 2.89)
pt3dadd(38.35, -50.69, 4, 2.89)
pt3dadd(38.3, -50.74, 4, 2.89)
pt3dadd(38.26, -50.84, 4, 2.89)
pt3dadd(38.21, -50.89, 4, 2.89)
pt3dadd(38.08, -51.04, 4, 2.89)
pt3dadd(38.03, -51.09, 4, 2.89)
pt3dadd(37.99, -51.14, 4, 2.89)
pt3dadd(37.94, -51.19, 4, 2.89)
pt3dadd(37.9, -51.24, 4, 2.89)
pt3dadd(37.85, -51.29, 4, 2.89)
pt3dadd(37.81, -51.34, 4, 2.89)
pt3dadd(37.76, -51.39, 4, 2.89)
pt3dadd(37.72, -51.44, 4, 2.89)
pt3dadd(37.67, -51.54, 4, 2.89)
pt3dadd(37.63, -51.65, 4, 2.89)
pt3dadd(37.59, -51.7, 4, 2.89)
pt3dadd(37.54, -51.8, 4, 2.89)
pt3dadd(37.5, -51.85, 4, 2.89)
pt3dadd(37.45, -51.95, 4, 2.89)
pt3dadd(37.41, -52, 4, 2.89)
pt3dadd(37.37, -52.1, 4, 2.89)
pt3dadd(37.32, -52.21, 4, 2.89)
pt3dadd(37.28, -52.31, 4, 2.89)
pt3dadd(37.23, -52.35, 4, 2.89)
pt3dadd(37.19, -52.46, 4, 2.89)
pt3dadd(37.19, -52.61, 4, 2.89)
pt3dadd(37.14, -52.71, 4, 2.89)
pt3dadd(37.14, -52.81, 4, 2.89)
pt3dadd(37.1, -52.96, 4, 2.89)
pt3dadd(37.1, -54.89, 4, 2.89)
pt3dadd(37.14, -54.94, 4, 2.89)
pt3dadd(37.19, -54.99, 4, 2.89)
pt3dadd(37.23, -55.04, 4, 2.89)
pt3dadd(37.23, -55.14, 4, 2.89)
pt3dadd(37.28, -55.24, 4, 2.89)
pt3dadd(37.28, -55.49, 4, 2.89)
pt3dadd(37.32, -55.54, 4, 2.89)
pt3dadd(37.37, -55.65, 4, 2.89)
pt3dadd(37.41, -55.75, 4, 2.89)
pt3dadd(37.41, -55.85, 4, 2.89)
pt3dadd(37.45, -55.95, 4, 2.89)
pt3dadd(37.5, -56.05, 4, 2.89)
pt3dadd(62.75, 1.63, 4, 2.89)
pt3dadd(62.69, 1.27, 4, 2.89)
pt3dadd(62.73, 1.37, 4, 2.89)
pt3dadd(62.73, 1.47, 4, 2.89)
pt3dadd(62.78, 1.57, 4, 2.89)
pt3dadd(62.78, 1.67, 4, 2.89)
pt3dadd(62.82, 1.77, 4, 2.89)
pt3dadd(62.82, 1.88, 4, 2.89)
pt3dadd(62.87, 2.03, 4, 2.89)
pt3dadd(62.76, 2.08, 4, 2.89)
pt3dadd(62.96, 2.28, 4, 2.89)
pt3dadd(62.96, 2.38, 4, 2.89)
pt3dadd(63, 2.48, 4, 2.89)
pt3dadd(63.04, 2.54, 4, 2.89)
pt3dadd(63.09, 2.68, 4, 2.89)
pt3dadd(63.09, 2.79, 4, 2.89)
pt3dadd(63.13, 2.84, 4, 2.89)
pt3dadd(63.13, 2.99, 4, 2.89)
pt3dadd(63.18, 3.09, 4, 2.89)
pt3dadd(63.22, 3.24, 4, 2.89)
pt3dadd(63.27, 3.35, 4, 2.89)
pt3dadd(63.27, 3.44, 4, 2.89)
pt3dadd(63.31, 3.5, 4, 2.89)
pt3dadd(63.35, 3.7, 4, 2.89)
pt3dadd(63.35, 3.85, 4, 2.89)
pt3dadd(63.44, 4, 4, 2.89)
pt3dadd(63.44, 4.2, 4, 2.89)
pt3dadd(63.49, 4.36, 4, 2.89)
pt3dadd(63.53, 4.46, 4, 2.89)
pt3dadd(63.58, 4.56, 4, 2.89)
pt3dadd(63.58, 4.66, 4, 2.89)
pt3dadd(63.62, 4.76, 4, 2.89)
pt3dadd(63.67, 4.86, 4, 2.89)
pt3dadd(63.67, 5.07, 4, 2.89)
pt3dadd(63.71, 5.17, 4, 2.89)
pt3dadd(63.76, 5.22, 4, 2.89)
pt3dadd(63.76, 5.37, 4, 2.89)
pt3dadd(63.8, 5.47, 4, 2.89)
pt3dadd(63.8, 5.62, 4, 2.89)
pt3dadd(63.85, 5.72, 4, 2.89)
pt3dadd(63.89, 5.82, 4, 2.89)
pt3dadd(63.89, 5.98, 4, 2.89)
pt3dadd(63.94, 6.03, 4, 2.89)
pt3dadd(63.98, 6.13, 4, 2.89)
pt3dadd(64.03, 6.28, 4, 2.89)
pt3dadd(64.03, 6.38, 4, 2.89)
pt3dadd(64.07, 6.49, 4, 2.89)
pt3dadd(64.07, 6.59, 4, 2.89)
pt3dadd(64.11, 6.69, 4, 2.89)
pt3dadd(64.16, 6.79, 4, 2.89)
pt3dadd(64.2, 6.99, 4, 2.89)
pt3dadd(64.2, 7.09, 4, 2.89)
pt3dadd(64.25, 7.19, 4, 2.89)
pt3dadd(64.25, 7.39, 4, 2.89)
pt3dadd(64.29, 7.55, 4, 2.89)
pt3dadd(64.29, 7.7, 4, 2.89)
pt3dadd(64.34, 7.8, 4, 2.89)
pt3dadd(64.34, 8, 4, 2.89)
pt3dadd(64.38, 8.15, 4, 2.89)
pt3dadd(64.38, 8.41, 4, 2.89)
pt3dadd(64.43, 8.51, 4, 2.89)
pt3dadd(64.43, 8.86, 4, 2.89)
pt3dadd(64.47, 8.97, 4, 2.89)
pt3dadd(64.47, 9.32, 4, 2.89)
pt3dadd(64.51, 9.42, 4, 2.89)
pt3dadd(64.51, 9.73, 4, 2.89)
pt3dadd(64.56, 9.82, 4, 2.89)
pt3dadd(64.56, 10.08, 4, 2.89)
pt3dadd(64.61, 10.18, 4, 2.89)
pt3dadd(64.61, 10.43, 4, 2.89)
pt3dadd(64.65, 10.53, 4, 2.89)
pt3dadd(64.65, 10.84, 4, 2.89)
pt3dadd(64.69, 10.89, 4, 2.89)
pt3dadd(64.69, 11.09, 4, 2.89)
pt3dadd(64.74, 11.19, 4, 2.89)
pt3dadd(64.74, 11.4, 4, 2.89)
pt3dadd(64.78, 11.5, 4, 2.89)
pt3dadd(64.78, 11.65, 4, 2.89)
pt3dadd(64.83, 11.75, 4, 2.89)
pt3dadd(64.83, 11.9, 4, 2.89)
pt3dadd(64.87, 12, 4, 2.89)
pt3dadd(64.92, 12.06, 4, 2.89)
pt3dadd(64.92, 12.15, 4, 2.89)
pt3dadd(64.96, 12.2, 4, 2.89)
pt3dadd(65, 12.31, 4, 2.89)
pt3dadd(65, 12.46, 4, 2.89)
pt3dadd(65.05, 12.56, 4, 2.89)
pt3dadd(65.14, 12.71, 4, 2.89)
pt3dadd(65.18, 12.76, 4, 2.89)
pt3dadd(65.14, 12.91, 4, 2.89)
pt3dadd(65.14, 12.91, 4, 2.89)
pt3dadd(65.14, 12.61, 4, 2.89)
pt3dadd(65.18, 12.71, 4, 2.89)
pt3dadd(65.18, 12.81, 4, 2.89)
pt3dadd(65.23, 12.91, 4, 2.89)
pt3dadd(65.23, 13.12, 4, 2.89)
pt3dadd(65.27, 13.22, 4, 2.89)
pt3dadd(65.32, 13.37, 4, 2.89)
pt3dadd(65.32, 13.47, 4, 2.89)
pt3dadd(65.36, 13.62, 4, 2.89)
pt3dadd(65.36, 13.77, 4, 2.89)
pt3dadd(65.41, 13.82, 4, 2.89)
pt3dadd(65.41, 13.93, 4, 2.89)
pt3dadd(65.45, 14.03, 4, 2.89)
}
}
proc shape3d_31() {
dend[24] { pt3dadd(65.45, 14.18, 4, 2.89)
pt3dadd(65.5, 14.28, 4, 2.89)
pt3dadd(65.54, 14.44, 4, 2.89)
pt3dadd(65.54, 14.53, 4, 2.89)
pt3dadd(65.58, 14.69, 4, 2.89)
pt3dadd(65.63, 14.84, 4, 2.89)
pt3dadd(65.68, 14.99, 4, 2.89)
pt3dadd(65.72, 15.14, 4, 2.89)
pt3dadd(65.76, 15.24, 4, 2.89)
pt3dadd(65.76, 15.4, 4, 2.89)
pt3dadd(65.81, 15.45, 4, 2.89)
pt3dadd(65.81, 15.6, 4, 2.89)
pt3dadd(65.9, 15.85, 4, 2.89)
pt3dadd(65.9, 16.1, 4, 2.89)
pt3dadd(65.94, 16.26, 4, 2.89)
pt3dadd(65.99, 16.31, 4, 2.89)
pt3dadd(65.99, 16.41, 4, 2.89)
pt3dadd(66.03, 16.56, 4, 2.89)
pt3dadd(66.03, 16.66, 4, 2.89)
pt3dadd(66.07, 16.76, 4, 2.89)
pt3dadd(66.07, 16.86, 4, 2.89)
pt3dadd(66.12, 16.97, 4, 2.89)
pt3dadd(66.12, 17.17, 4, 2.89)
pt3dadd(66.17, 17.22, 4, 2.89)
pt3dadd(66.17, 17.37, 4, 2.89)
pt3dadd(66.21, 17.47, 4, 2.89)
pt3dadd(66.25, 17.63, 4, 2.89)
pt3dadd(66.25, 17.73, 4, 2.89)
pt3dadd(66.3, 17.88, 4, 2.89)
pt3dadd(66.34, 17.98, 4, 2.89)
pt3dadd(66.43, 18.08, 4, 2.89)
pt3dadd(66.48, 18.18, 4, 2.89)
pt3dadd(66.52, 18.28, 4, 2.89)
pt3dadd(66.52, 18.38, 4, 2.89)
pt3dadd(66.61, 18.49, 4, 2.89)
pt3dadd(66.61, 18.58, 4, 2.89)
pt3dadd(66.65, 18.69, 4, 2.89)
pt3dadd(66.75, 18.79, 4, 2.89)
pt3dadd(66.75, 18.89, 4, 2.89)
pt3dadd(66.83, 19.04, 4, 2.89)
pt3dadd(66.88, 19.19, 4, 2.89)
pt3dadd(66.92, 19.3, 4, 2.89)
pt3dadd(66.97, 19.34, 4, 2.89)
pt3dadd(67.01, 19.45, 4, 2.89)
pt3dadd(67.06, 19.6, 4, 2.89)
pt3dadd(67.1, 19.7, 4, 2.89)
pt3dadd(67.19, 19.8, 4, 2.89)
pt3dadd(67.24, 19.95, 4, 2.89)
pt3dadd(67.28, 20.06, 4, 2.89)
pt3dadd(67.32, 20.21, 4, 2.89)
pt3dadd(67.41, 20.31, 4, 2.89)
pt3dadd(67.46, 20.46, 4, 2.89)
pt3dadd(67.5, 20.56, 4, 2.89)
pt3dadd(67.5, 20.71, 4, 2.89)
pt3dadd(67.59, 20.86, 4, 2.89)
pt3dadd(67.64, 20.97, 4, 2.89)
pt3dadd(67.72, 21.12, 4, 2.89)
pt3dadd(67.77, 21.27, 4, 2.89)
pt3dadd(67.82, 21.37, 4, 2.89)
pt3dadd(67.86, 21.52, 4, 2.89)
pt3dadd(67.9, 21.63, 4, 2.89)
pt3dadd(67.95, 21.73, 4, 2.89)
pt3dadd(67.99, 21.83, 4, 2.89)
pt3dadd(68.04, 21.98, 4, 2.89)
pt3dadd(68.08, 22.08, 4, 2.89)
pt3dadd(68.13, 22.13, 4, 2.89)
pt3dadd(68.17, 22.28, 4, 2.89)
pt3dadd(68.21, 22.39, 4, 2.89)
pt3dadd(68.26, 22.49, 4, 2.89)
pt3dadd(68.31, 22.53, 4, 2.89)
pt3dadd(68.39, 22.74, 4, 2.89)
pt3dadd(68.44, 22.79, 4, 2.89)
pt3dadd(68.44, 22.89, 4, 2.89)
pt3dadd(68.53, 23.04, 4, 2.89)
pt3dadd(68.57, 23.14, 4, 2.89)
pt3dadd(68.57, 23.25, 4, 2.89)
pt3dadd(68.62, 23.3, 4, 2.89)
pt3dadd(68.66, 23.4, 4, 2.89)
pt3dadd(68.71, 23.45, 4, 2.89)
pt3dadd(68.75, 23.6, 4, 2.89)
pt3dadd(68.75, 23.7, 4, 2.89)
pt3dadd(68.79, 23.85, 4, 2.89)
pt3dadd(68.89, 23.95, 4, 2.89)
pt3dadd(68.89, 24.1, 4, 2.89)
pt3dadd(68.93, 24.16, 4, 2.89)
pt3dadd(68.97, 24.26, 4, 2.89)
pt3dadd(69.02, 24.36, 4, 2.89)
pt3dadd(69.06, 24.46, 4, 2.89)
pt3dadd(69.06, 24.56, 4, 2.89)
pt3dadd(69.11, 24.66, 4, 2.89)
pt3dadd(69.15, 24.82, 4, 2.89)
pt3dadd(69.15, 24.92, 4, 2.89)
pt3dadd(69.19, 25.02, 4, 2.89)
pt3dadd(69.19, 25.17, 4, 2.89)
pt3dadd(69.24, 25.27, 4, 2.89)
pt3dadd(69.29, 25.37, 4, 2.89)
pt3dadd(69.29, 25.47, 4, 2.89)
pt3dadd(69.33, 25.63, 4, 2.89)
pt3dadd(69.33, 25.88, 4, 2.89)
pt3dadd(69.38, 25.93, 4, 2.89)
pt3dadd(69.38, 26.08, 4, 2.89)
pt3dadd(69.42, 26.13, 4, 2.89)
pt3dadd(69.42, 26.23, 4, 2.89)
pt3dadd(69.46, 26.33, 4, 2.89)
pt3dadd(69.51, 26.43, 4, 2.89)
pt3dadd(69.55, 26.49, 4, 2.89)
pt3dadd(69.55, 26.69, 4, 2.89)
pt3dadd(69.6, 26.79, 4, 2.89)
pt3dadd(69.64, 26.89, 4, 2.89)
pt3dadd(69.64, 27.04, 4, 2.89)
pt3dadd(69.68, 27.14, 4, 2.89)
pt3dadd(69.73, 27.3, 4, 2.89)
pt3dadd(69.73, 27.04, 4, 2.89)
pt3dadd(69.78, 27.09, 4, 2.89)
pt3dadd(69.82, 27.14, 4, 2.89)
pt3dadd(69.82, 27.34, 4, 2.89)
pt3dadd(69.86, 27.45, 4, 2.89)
pt3dadd(69.86, 27.65, 4, 2.89)
pt3dadd(69.91, 27.75, 4, 2.89)
pt3dadd(69.91, 27.85, 4, 2.89)
pt3dadd(69.96, 27.9, 4, 2.89)
pt3dadd(69.96, 28.06, 4, 2.89)
pt3dadd(70, 28.16, 4, 2.89)
pt3dadd(70.04, 28.26, 4, 2.89)
pt3dadd(70.04, 28.36, 4, 2.89)
pt3dadd(70.09, 28.46, 4, 2.89)
pt3dadd(70.13, 28.56, 4, 2.89)
pt3dadd(70.18, 28.66, 4, 2.89)
pt3dadd(70.22, 28.76, 4, 2.89)
pt3dadd(70.22, 28.86, 4, 2.89)
pt3dadd(70.26, 28.97, 4, 2.89)
pt3dadd(70.31, 29.07, 4, 2.89)
pt3dadd(70.31, 29.17, 4, 2.89)
pt3dadd(70.36, 29.22, 4, 2.89)
pt3dadd(70.4, 29.32, 4, 2.89)
pt3dadd(70.4, 29.52, 4, 2.89)
pt3dadd(70.44, 29.63, 4, 2.89)
pt3dadd(70.49, 29.73, 4, 2.89)
pt3dadd(70.49, 29.88, 4, 2.89)
pt3dadd(70.53, 29.98, 4, 2.89)
pt3dadd(70.58, 30.08, 4, 2.89)
pt3dadd(70.58, 30.18, 4, 2.89)
pt3dadd(70.62, 30.23, 4, 2.89)
pt3dadd(70.67, 30.39, 4, 2.89)
pt3dadd(70.67, 30.49, 4, 2.89)
pt3dadd(70.71, 30.54, 4, 2.89)
pt3dadd(70.71, 30.69, 4, 2.89)
pt3dadd(70.75, 30.74, 4, 2.89)
pt3dadd(70.75, 30.84, 4, 2.89)
pt3dadd(70.8, 30.89, 4, 2.89)
pt3dadd(70.8, 31.09, 4, 2.89)
pt3dadd(70.85, 31.19, 4, 2.89)
pt3dadd(70.89, 31.25, 4, 2.89)
pt3dadd(70.89, 31.45, 4, 2.89)
pt3dadd(70.93, 31.5, 4, 2.89)
pt3dadd(70.98, 31.65, 4, 2.89)
pt3dadd(70.98, 31.75, 4, 2.89)
pt3dadd(71.02, 31.85, 4, 2.89)
pt3dadd(71.07, 31.95, 4, 2.89)
pt3dadd(71.11, 32.06, 4, 2.89)
pt3dadd(71.11, 32.21, 4, 2.89)
pt3dadd(71.16, 32.31, 4, 2.89)
pt3dadd(71.16, 32.41, 4, 2.89)
pt3dadd(71.2, 32.46, 4, 2.89)
pt3dadd(71.25, 32.56, 4, 2.89)
pt3dadd(71.29, 32.71, 4, 2.89)
pt3dadd(71.33, 32.81, 4, 2.89)
pt3dadd(71.33, 32.92, 4, 2.89)
pt3dadd(71.38, 33.02, 4, 2.89)
pt3dadd(71.43, 33.07, 4, 2.89)
pt3dadd(71.47, 33.17, 4, 2.89)
pt3dadd(71.47, 33.27, 4, 2.89)
pt3dadd(71.51, 33.42, 4, 2.89)
pt3dadd(71.56, 33.53, 4, 2.89)
pt3dadd(71.6, 33.67, 4, 2.89)
pt3dadd(71.69, 33.78, 4, 2.89)
pt3dadd(71.69, 33.88, 4, 2.89)
pt3dadd(71.74, 33.98, 4, 2.89)
pt3dadd(71.78, 34.13, 4, 2.89)
pt3dadd(71.82, 34.23, 4, 2.89)
pt3dadd(71.87, 34.33, 4, 2.89)
pt3dadd(71.92, 34.44, 4, 2.89)
pt3dadd(71.96, 34.59, 4, 2.89)
pt3dadd(72, 34.69, 4, 2.89)
pt3dadd(72.05, 34.79, 4, 2.89)
pt3dadd(72.09, 34.89, 4, 2.89)
pt3dadd(72.14, 34.99, 4, 2.89)
pt3dadd(72.23, 35.15, 4, 2.89)
pt3dadd(72.27, 35.19, 4, 2.89)
pt3dadd(72.32, 35.35, 4, 2.89)
pt3dadd(72.36, 35.45, 4, 2.89)
pt3dadd(72.4, 35.55, 4, 2.89)
pt3dadd(72.45, 35.6, 4, 2.89)
pt3dadd(72.5, 35.7, 4, 2.89)
pt3dadd(72.54, 35.8, 4, 2.89)
pt3dadd(72.58, 35.85, 4, 2.89)
pt3dadd(72.63, 35.96, 4, 2.89)
pt3dadd(72.67, 36.06, 4, 2.89)
pt3dadd(72.72, 36.16, 4, 2.89)
pt3dadd(72.76, 36.26, 4, 2.89)
}
}
proc shape3d_32() {
dend[24] { pt3dadd(72.81, 36.36, 4, 2.89)
pt3dadd(72.89, 36.46, 4, 2.89)
pt3dadd(72.94, 36.61, 4, 2.89)
pt3dadd(72.99, 36.66, 4, 2.89)
pt3dadd(73.03, 36.76, 4, 2.89)
pt3dadd(73.07, 36.87, 4, 2.89)
pt3dadd(73.16, 37.02, 4, 2.89)
pt3dadd(73.21, 37.12, 4, 2.89)
pt3dadd(73.25, 37.22, 4, 2.89)
pt3dadd(73.3, 37.32, 4, 2.89)
pt3dadd(73.34, 37.42, 4, 2.89)
pt3dadd(73.43, 37.53, 4, 2.89)
pt3dadd(73.47, 37.63, 4, 2.89)
pt3dadd(73.52, 37.67, 4, 2.89)
pt3dadd(73.61, 37.83, 4, 2.89)
pt3dadd(73.65, 37.93, 4, 2.89)
pt3dadd(73.7, 38.03, 4, 2.89)
pt3dadd(73.74, 38.08, 4, 2.89)
pt3dadd(73.79, 38.18, 4, 2.89)
pt3dadd(73.83, 38.23, 4, 2.89)
pt3dadd(73.88, 38.28, 4, 2.89)
pt3dadd(73.92, 38.38, 4, 2.89)
pt3dadd(73.96, 38.49, 4, 2.89)
pt3dadd(74.01, 38.54, 4, 2.89)
pt3dadd(74.06, 38.64, 4, 2.89)
pt3dadd(74.1, 38.74, 4, 2.89)
pt3dadd(74.19, 38.89, 4, 2.89)
pt3dadd(74.23, 38.99, 4, 2.89)
pt3dadd(74.32, 39.04, 4, 2.89)
pt3dadd(74.37, 39.15, 4, 2.89)
pt3dadd(74.41, 39.19, 4, 2.89)
pt3dadd(74.41, 39.3, 4, 2.89)
pt3dadd(74.5, 39.4, 4, 2.89)
pt3dadd(74.54, 39.45, 4, 2.89)
pt3dadd(74.59, 39.55, 4, 2.89)
pt3dadd(74.64, 39.65, 4, 2.89)
pt3dadd(74.68, 39.75, 4, 2.89)
pt3dadd(74.72, 39.85, 4, 2.89)
pt3dadd(74.81, 39.96, 4, 2.89)
pt3dadd(74.86, 40.01, 4, 2.89)
pt3dadd(74.9, 40.06, 4, 2.89)
pt3dadd(74.95, 40.11, 4, 2.89)
pt3dadd(74.95, 40.21, 4, 2.89)
pt3dadd(74.99, 40.31, 4, 2.89)
pt3dadd(75.04, 40.36, 4, 2.89)
pt3dadd(75.08, 40.41, 4, 2.89)
pt3dadd(75.13, 40.46, 4, 2.89)
pt3dadd(75.17, 40.56, 4, 2.89)
pt3dadd(75.21, 40.61, 4, 2.89)
pt3dadd(75.3, 40.76, 4, 2.89)
pt3dadd(75.35, 40.81, 4, 2.89)
pt3dadd(75.44, 40.87, 4, 2.89)
pt3dadd(75.44, 40.97, 4, 2.89)
pt3dadd(75.48, 41.02, 4, 2.89)
pt3dadd(75.53, 41.07, 4, 2.89)
pt3dadd(75.57, 41.12, 4, 2.89)
pt3dadd(75.61, 41.22, 4, 2.89)
pt3dadd(75.66, 41.32, 4, 2.89)
pt3dadd(75.71, 41.37, 4, 2.89)
pt3dadd(75.75, 41.42, 4, 2.89)
pt3dadd(75.79, 41.47, 4, 2.89)
pt3dadd(75.79, 41.58, 4, 2.89)
pt3dadd(75.84, 41.63, 4, 2.89)
pt3dadd(75.88, 41.68, 4, 2.89)
pt3dadd(75.93, 41.73, 4, 2.89)
pt3dadd(75.97, 41.83, 4, 2.89)
pt3dadd(76.02, 41.88, 4, 2.89)
pt3dadd(76.02, 41.88, 4, 2.89)
pt3dadd(76.02, 41.88, 4, 2.89)
pt3dadd(76.15, 41.88, 4, 2.89)
pt3dadd(76.19, 41.93, 4, 2.89)
pt3dadd(76.33, 41.93, 4, 2.89)
pt3dadd(76.42, 41.98, 4, 2.89)
pt3dadd(76.51, 42.03, 4, 2.89)
pt3dadd(76.6, 42.08, 4, 2.89)
pt3dadd(76.68, 42.13, 4, 2.89)
pt3dadd(76.78, 42.18, 4, 2.89)
pt3dadd(76.82, 42.23, 4, 2.89)
pt3dadd(76.86, 42.28, 4, 2.89)
pt3dadd(77.04, 42.28, 4, 2.89)
pt3dadd(77.09, 42.38, 4, 2.89)
pt3dadd(77.13, 42.44, 4, 2.89)
pt3dadd(77.22, 42.44, 4, 2.89)
pt3dadd(77.26, 42.49, 4, 2.89)
pt3dadd(77.36, 42.54, 4, 2.89)
pt3dadd(77.44, 42.59, 4, 2.89)
pt3dadd(77.49, 42.64, 4, 2.89)
pt3dadd(77.58, 42.64, 4, 2.89)
pt3dadd(77.62, 42.69, 4, 2.89)
pt3dadd(77.67, 42.74, 4, 2.89)
pt3dadd(77.71, 42.79, 4, 2.89)
pt3dadd(77.75, 42.84, 4, 2.89)
pt3dadd(77.8, 42.89, 4, 2.89)
pt3dadd(77.85, 42.94, 4, 2.89)
pt3dadd(77.89, 42.99, 4, 2.89)
pt3dadd(77.98, 43.04, 4, 2.89)
pt3dadd(78.02, 43.1, 4, 2.89)
pt3dadd(78.07, 43.15, 4, 2.89)
pt3dadd(78.11, 43.19, 4, 2.89)
pt3dadd(78.16, 43.24, 4, 2.89)
pt3dadd(78.16, 43.35, 4, 2.89)
pt3dadd(78.2, 43.4, 4, 2.89)
pt3dadd(78.25, 43.45, 4, 2.89)
pt3dadd(78.29, 43.5, 4, 2.89)
pt3dadd(78.29, 43.65, 4, 2.89)
pt3dadd(78.33, 43.75, 4, 2.89)
pt3dadd(78.38, 43.8, 4, 2.89)
pt3dadd(78.38, 43.96, 4, 2.89)
pt3dadd(78.43, 44.01, 4, 2.89)
pt3dadd(78.43, 44.21, 4, 2.89)
pt3dadd(78.47, 44.26, 4, 2.89)
pt3dadd(78.47, 44.67, 4, 2.89)
pt3dadd(78.51, 44.72, 4, 2.89)
pt3dadd(78.51, 44.87, 4, 2.89)
pt3dadd(78.56, 44.92, 4, 2.89)
pt3dadd(78.6, 45.02, 4, 2.89)
pt3dadd(78.65, 45.12, 4, 2.89)
pt3dadd(78.69, 45.22, 4, 2.89)
pt3dadd(78.69, 45.32, 4, 2.89)
pt3dadd(79.54, 46.23, 4, 2.89)
pt3dadd(78.69, 45.37, 4, 3.23)
pt3dadd(78.69, 45.32, 4, 3.23)
pt3dadd(78.74, 45.27, 4, 3.23)
pt3dadd(78.78, 45.32, 4, 3.23)
pt3dadd(78.87, 45.37, 4, 3.23)
pt3dadd(78.92, 45.47, 4, 3.23)
pt3dadd(78.96, 45.53, 4, 3.23)
pt3dadd(79.05, 45.58, 4, 3.23)
pt3dadd(79.09, 45.68, 4, 3.23)
pt3dadd(79.14, 45.73, 4, 3.23)
pt3dadd(79.18, 45.78, 4, 3.23)
pt3dadd(79.23, 45.83, 4, 3.23)
pt3dadd(79.27, 45.88, 4, 3.23)
pt3dadd(79.32, 45.98, 4, 3.23)
pt3dadd(79.4, 46.03, 4, 3.23)
pt3dadd(79.45, 46.08, 4, 3.23)
pt3dadd(79.5, 46.18, 4, 3.23)
pt3dadd(79.54, 46.23, 4, 3.23)
pt3dadd(79.58, 46.28, 4, 3.23)
pt3dadd(79.67, 46.38, 4, 3.23)
pt3dadd(79.72, 46.44, 4, 3.23)
pt3dadd(79.81, 46.54, 4, 3.23)
pt3dadd(79.85, 46.64, 4, 3.23)
pt3dadd(79.89, 46.69, 4, 3.23)
pt3dadd(79.94, 46.74, 4, 3.23)
pt3dadd(80.03, 46.79, 4, 3.23)
pt3dadd(80.07, 46.89, 4, 3.23)
pt3dadd(80.12, 46.99, 4, 3.23)
pt3dadd(80.21, 47.1, 4, 3.23)
pt3dadd(80.25, 47.19, 4, 3.23)
pt3dadd(80.3, 47.25, 4, 3.23)
pt3dadd(80.39, 47.35, 4, 3.23)
pt3dadd(80.43, 47.45, 4, 3.23)
pt3dadd(80.57, 47.6, 4, 3.23)
pt3dadd(80.61, 47.65, 4, 3.23)
pt3dadd(80.7, 47.75, 4, 3.23)
pt3dadd(80.74, 47.8, 4, 3.23)
pt3dadd(80.79, 47.85, 4, 3.23)
pt3dadd(80.83, 47.9, 4, 3.23)
pt3dadd(80.88, 48.01, 4, 3.23)
pt3dadd(80.96, 48.06, 4, 3.23)
pt3dadd(81.01, 48.16, 4, 3.23)
pt3dadd(81.06, 48.26, 4, 3.23)
pt3dadd(81.14, 48.31, 4, 3.23)
pt3dadd(81.19, 48.41, 4, 3.23)
pt3dadd(81.23, 48.51, 4, 3.23)
pt3dadd(81.28, 48.56, 4, 3.23)
pt3dadd(81.37, 48.67, 4, 3.23)
pt3dadd(81.41, 48.76, 4, 3.23)
pt3dadd(81.5, 48.87, 4, 3.23)
pt3dadd(81.59, 48.97, 4, 3.23)
pt3dadd(81.64, 49.07, 4, 3.23)
pt3dadd(81.68, 49.12, 4, 3.23)
pt3dadd(81.72, 49.17, 4, 3.23)
pt3dadd(81.9, 49.37, 4, 3.23)
pt3dadd(81.95, 49.42, 4, 3.23)
pt3dadd(81.99, 49.47, 4, 3.23)
pt3dadd(82.04, 49.53, 4, 3.23)
pt3dadd(82.08, 49.58, 4, 3.23)
pt3dadd(82.13, 49.68, 4, 3.23)
pt3dadd(82.3, 49.88, 4, 3.23)
pt3dadd(82.35, 49.98, 4, 3.23)
pt3dadd(82.39, 50.08, 4, 3.23)
pt3dadd(82.44, 50.18, 4, 3.23)
pt3dadd(82.53, 50.28, 4, 3.23)
pt3dadd(82.57, 50.33, 4, 3.23)
pt3dadd(82.61, 50.38, 4, 3.23)
pt3dadd(82.66, 50.44, 4, 3.23)
pt3dadd(82.66, 50.54, 4, 3.23)
pt3dadd(82.71, 50.59, 4, 3.23)
pt3dadd(82.75, 50.69, 4, 3.23)
pt3dadd(82.79, 50.79, 4, 3.23)
pt3dadd(82.88, 50.84, 4, 3.23)
pt3dadd(82.88, 50.94, 4, 3.23)
pt3dadd(82.97, 50.99, 4, 3.23)
pt3dadd(83.02, 51.04, 4, 3.23)
pt3dadd(83.02, 51.15, 4, 3.23)
pt3dadd(83.06, 51.19, 4, 3.23)
pt3dadd(83.11, 51.25, 4, 3.23)
pt3dadd(83.15, 51.35, 4, 3.23)
}
}
proc shape3d_33() {
dend[24] { pt3dadd(83.19, 51.4, 4, 3.23)
pt3dadd(83.24, 51.45, 4, 3.23)
pt3dadd(83.29, 51.5, 4, 3.23)
pt3dadd(83.33, 51.6, 4, 3.23)
pt3dadd(83.37, 51.7, 4, 3.23)
pt3dadd(83.42, 51.75, 4, 3.23)
pt3dadd(83.42, 51.85, 4, 3.23)
pt3dadd(83.46, 51.9, 4, 3.23)
pt3dadd(83.51, 51.96, 4, 3.23)
pt3dadd(83.51, 52.06, 4, 3.23)
pt3dadd(83.55, 52.11, 4, 3.23)
pt3dadd(83.6, 52.16, 4, 3.23)
pt3dadd(83.64, 52.26, 4, 3.23)
pt3dadd(83.64, 52.36, 4, 3.23)
pt3dadd(83.68, 52.41, 4, 3.23)
pt3dadd(83.73, 52.46, 4, 3.23)
pt3dadd(83.73, 52.62, 4, 3.23)
pt3dadd(83.78, 52.67, 4, 3.23)
pt3dadd(83.82, 52.72, 4, 3.23)
pt3dadd(83.82, 52.82, 4, 3.23)
pt3dadd(83.86, 52.87, 4, 3.23)
pt3dadd(83.86, 52.97, 4, 3.23)
pt3dadd(83.91, 53.02, 4, 3.23)
pt3dadd(83.91, 53.17, 4, 3.23)
pt3dadd(83.95, 53.27, 4, 3.23)
pt3dadd(83.95, 53.42, 4, 3.23)
pt3dadd(84, 53.58, 4, 3.23)
pt3dadd(84, 53.88, 4, 3.23)
pt3dadd(84.04, 53.98, 4, 3.23)
pt3dadd(84.04, 59.45, 4, 3.23)
pt3dadd(84.09, 59.2, 4, 3.23)
pt3dadd(84.13, 59.35, 4, 3.23)
pt3dadd(84.13, 59.25, 4, 3.23)
pt3dadd(84.18, 59.3, 4, 3.23)
pt3dadd(84.22, 59.35, 4, 3.23)
pt3dadd(84.22, 59.45, 4, 3.23)
pt3dadd(84.26, 59.5, 4, 3.23)
pt3dadd(84.31, 59.55, 4, 3.23)
pt3dadd(84.31, 59.7, 4, 3.23)
pt3dadd(84.36, 59.75, 4, 3.23)
pt3dadd(84.36, 60.16, 4, 3.23)
pt3dadd(84.4, 60.21, 4, 3.23)
pt3dadd(84.4, 63.04, 4, 3.23)
pt3dadd(84.36, 63.1, 4, 3.23)
pt3dadd(84.36, 65.32, 4, 3.23)
pt3dadd(84.4, 65.38, 4, 3.23)
pt3dadd(84.4, 65.58, 4, 3.23)
pt3dadd(84.44, 65.68, 4, 3.23)
pt3dadd(84.49, 65.73, 4, 3.23)
pt3dadd(84.49, 65.83, 4, 3.23)
pt3dadd(84.53, 65.88, 4, 3.23)
pt3dadd(84.58, 65.93, 4, 3.23)
pt3dadd(84.58, 66.03, 4, 3.23)
pt3dadd(84.62, 66.08, 4, 3.23)
pt3dadd(84.62, 66.18, 4, 3.23)
pt3dadd(84.67, 66.29, 4, 3.23)
pt3dadd(84.71, 66.34, 4, 3.23)
pt3dadd(84.75, 66.39, 4, 3.23)
pt3dadd(84.75, 66.49, 4, 3.23)
pt3dadd(84.8, 66.54, 4, 3.23)
pt3dadd(84.85, 66.59, 4, 3.23)
pt3dadd(84.89, 66.64, 4, 3.23)
pt3dadd(84.89, 66.79, 4, 3.23)
pt3dadd(84.93, 66.84, 4, 3.23)
pt3dadd(84.98, 66.94, 4, 3.23)
pt3dadd(84.98, 67.15, 4, 3.23)
pt3dadd(85.02, 67.2, 4, 3.23)
pt3dadd(85.02, 70.69, 4, 3.23)
pt3dadd(85.07, 70.74, 4, 3.23)
pt3dadd(85.07, 70.94, 4, 3.23)
pt3dadd(85.11, 71, 4, 3.23)
pt3dadd(85.16, 71.1, 4, 3.23)
pt3dadd(85.2, 71.15, 4, 3.23)
pt3dadd(85.25, 71.25, 4, 3.23)
pt3dadd(85.29, 71.3, 4, 3.23)
pt3dadd(85.33, 71.35, 4, 3.23)
pt3dadd(85.43, 71.35, 4, 3.23)
pt3dadd(85.43, 71.6, 4, 3.4)
pt3dadd(85.33, 71.75, 4, 3.57)
}
dend[25] {pt3dclear()
pt3dadd(85.33, 71.75, 4, 3.57)
pt3dadd(85.33, 72.26, 4, 3.57)
pt3dadd(85.29, 72.36, 4, 3.57)
pt3dadd(85.29, 73.58, 4, 3.57)
pt3dadd(85.25, 73.68, 4, 3.57)
pt3dadd(85.25, 74.03, 4, 3.57)
pt3dadd(85.2, 74.14, 4, 3.57)
pt3dadd(85.2, 74.24, 4, 3.57)
pt3dadd(85.16, 74.29, 4, 3.57)
pt3dadd(85.11, 74.39, 4, 3.57)
pt3dadd(85.07, 74.44, 4, 3.57)
pt3dadd(85.07, 76.41, 4, 3.57)
pt3dadd(85.16, 76.41, 4, 3.57)
pt3dadd(85.16, 76.46, 4, 3.57)
pt3dadd(85.11, 76.57, 4, 3.57)
pt3dadd(85.11, 77.07, 4, 3.57)
pt3dadd(85.07, 77.12, 4, 3.57)
pt3dadd(85.07, 77.38, 4, 3.57)
pt3dadd(85.02, 77.48, 4, 3.57)
pt3dadd(84.98, 77.58, 4, 3.57)
pt3dadd(84.98, 77.88, 4, 3.57)
pt3dadd(84.93, 77.98, 4, 3.57)
pt3dadd(84.93, 78.18, 4, 3.57)
pt3dadd(84.89, 78.24, 4, 3.57)
pt3dadd(84.89, 78.34, 4, 3.57)
pt3dadd(84.85, 78.44, 4, 3.57)
pt3dadd(84.85, 78.69, 4, 3.57)
pt3dadd(84.8, 78.79, 4, 3.57)
pt3dadd(84.75, 78.89, 4, 3.57)
pt3dadd(84.75, 79.35, 4, 3.57)
pt3dadd(84.71, 79.4, 4, 3.57)
pt3dadd(84.71, 81.78, 4, 3.57)
pt3dadd(84.67, 81.78, 4, 3.57)
pt3dadd(84.67, 82.29, 4, 3.57)
pt3dadd(84.62, 82.24, 4, 3.57)
pt3dadd(84.58, 82.29, 4, 3.57)
pt3dadd(84.58, 82.39, 4, 3.57)
pt3dadd(84.49, 82.44, 4, 3.57)
pt3dadd(84.44, 82.54, 4, 3.57)
pt3dadd(84.4, 82.64, 4, 3.57)
pt3dadd(84.26, 82.79, 4, 3.57)
pt3dadd(84.18, 82.85, 4, 3.57)
pt3dadd(84.09, 82.94, 4, 3.57)
pt3dadd(84.04, 83.05, 4, 3.57)
pt3dadd(84, 83.15, 4, 3.57)
pt3dadd(83.91, 83.2, 4, 3.57)
pt3dadd(83.86, 83.3, 4, 3.57)
pt3dadd(83.73, 83.45, 4, 3.57)
pt3dadd(83.64, 83.55, 4, 3.57)
pt3dadd(83.46, 83.75, 4, 3.57)
pt3dadd(83.37, 83.86, 4, 3.57)
pt3dadd(83.29, 84.06, 4, 3.57)
pt3dadd(83.19, 84.11, 4, 3.57)
pt3dadd(83.11, 84.26, 4, 3.57)
pt3dadd(83.06, 84.36, 4, 3.57)
pt3dadd(82.97, 84.41, 4, 3.57)
pt3dadd(82.93, 84.51, 4, 3.57)
pt3dadd(82.88, 84.57, 4, 3.57)
pt3dadd(82.84, 84.67, 4, 3.57)
pt3dadd(82.75, 84.77, 4, 3.57)
pt3dadd(82.66, 84.87, 4, 3.57)
pt3dadd(82.57, 85.02, 4, 3.57)
pt3dadd(82.48, 85.12, 4, 3.57)
pt3dadd(82.44, 85.17, 4, 3.57)
pt3dadd(82.39, 85.28, 4, 3.57)
pt3dadd(82.3, 85.32, 4, 3.57)
pt3dadd(82.26, 85.38, 4, 3.57)
pt3dadd(82.21, 85.48, 4, 3.57)
pt3dadd(82.13, 85.58, 4, 3.57)
pt3dadd(82.08, 85.63, 4, 3.57)
pt3dadd(81.99, 85.68, 4, 3.57)
pt3dadd(81.9, 85.73, 4, 3.57)
pt3dadd(81.86, 85.78, 4, 3.57)
pt3dadd(81.81, 85.83, 4, 3.57)
pt3dadd(81.77, 85.88, 4, 3.57)
pt3dadd(81.68, 85.88, 4, 3.57)
pt3dadd(81.64, 85.93, 4, 3.57)
pt3dadd(81.54, 85.98, 4, 3.57)
pt3dadd(81.5, 86.04, 4, 3.57)
pt3dadd(81.41, 86.08, 4, 3.57)
pt3dadd(81.32, 86.08, 4, 3.57)
pt3dadd(81.28, 86.14, 4, 3.57)
pt3dadd(81.23, 86.18, 4, 3.57)
pt3dadd(81.19, 86.24, 4, 3.57)
pt3dadd(81.14, 86.29, 4, 3.57)
pt3dadd(81.1, 86.34, 4, 3.57)
pt3dadd(81.06, 86.39, 4, 3.57)
pt3dadd(81.01, 86.44, 4, 3.57)
pt3dadd(80.96, 86.54, 4, 3.57)
pt3dadd(80.92, 86.59, 4, 3.57)
pt3dadd(80.88, 86.64, 4, 3.57)
pt3dadd(80.88, 86.74, 4, 3.57)
pt3dadd(80.83, 86.79, 4, 3.57)
pt3dadd(80.83, 86.94, 4, 3.57)
pt3dadd(80.79, 87, 4, 3.57)
pt3dadd(80.74, 87.05, 4, 3.57)
pt3dadd(80.7, 87.1, 4, 3.57)
pt3dadd(80.65, 87.15, 4, 3.57)
pt3dadd(80.61, 87.2, 4, 3.57)
pt3dadd(80.57, 87.25, 4, 3.57)
pt3dadd(80.52, 87.3, 4, 3.57)
pt3dadd(80.47, 87.35, 4, 3.57)
pt3dadd(80.47, 87.45, 4, 3.57)
pt3dadd(80.43, 87.5, 4, 3.57)
pt3dadd(80.39, 87.55, 4, 3.57)
pt3dadd(80.39, 87.65, 4, 3.57)
pt3dadd(80.34, 87.75, 4, 3.57)
pt3dadd(80.3, 87.86, 4, 3.57)
pt3dadd(80.3, 87.96, 4, 3.57)
pt3dadd(80.25, 88.01, 4, 3.57)
pt3dadd(80.21, 87.96, 4, 3.06)
pt3dadd(80.16, 88.31, 13.45, 6.79)
}
dend[26] {pt3dclear()
pt3dadd(80.16, 88.31, 13.45, 6.79)
pt3dadd(80.3, 88.21, 13.45, 6.79)
pt3dadd(80.25, 88.16, 13.45, 6.79)
pt3dadd(80.21, 88.11, 13.45, 6.79)
pt3dadd(80.03, 88.11, 13.45, 6.79)
pt3dadd(79.45, 88.46, 14.5, 11.38)
pt3dadd(79.14, 88.46, 14.5, 11.38)
pt3dadd(78.56, 88.87, 17.65, 11.38)
pt3dadd(78.51, 88.92, 17.65, 11.38)
}
}
proc shape3d_34() {
dend[26] { pt3dadd(78.47, 88.97, 17.65, 11.38)
pt3dadd(78.38, 89.07, 17.65, 11.38)
pt3dadd(78.29, 89.12, 17.65, 11.38)
pt3dadd(78.2, 89.17, 17.65, 11.38)
pt3dadd(78.16, 89.22, 17.65, 11.38)
pt3dadd(78.07, 89.28, 17.65, 11.38)
pt3dadd(77.89, 89.28, 17.65, 11.38)
pt3dadd(77.85, 89.32, 17.65, 11.38)
pt3dadd(77.75, 89.38, 17.65, 11.38)
pt3dadd(77.71, 89.43, 17.65, 11.38)
pt3dadd(77.67, 89.48, 17.65, 11.38)
pt3dadd(77.62, 89.53, 17.65, 11.38)
pt3dadd(77.58, 89.58, 17.65, 11.38)
pt3dadd(77.53, 89.63, 17.65, 11.38)
pt3dadd(77.49, 89.68, 17.65, 11.38)
pt3dadd(77.44, 89.73, 17.65, 11.38)
pt3dadd(77.4, 89.78, 17.65, 11.38)
pt3dadd(77.36, 89.83, 17.65, 11.38)
pt3dadd(77.31, 89.88, 17.65, 11.38)
pt3dadd(77.13, 89.88, 17.65, 11.38)
pt3dadd(77.09, 89.93, 17.65, 11.38)
pt3dadd(77.04, 89.98, 17.65, 11.38)
pt3dadd(77.04, 90.08, 17.65, 11.38)
pt3dadd(73.58, 92.43, 0, 0.28)
pt3dadd(71.7, 93.52, 0, 1.55)
}
dend[27] {pt3dclear()
pt3dadd(80.16, 88.31, 13.45, 6.79)
pt3dadd(80.34, 88.31, 13.45, 6.79)
pt3dadd(80.39, 88.42, 13.45, 6.79)
pt3dadd(80.43, 88.51, 13.45, 6.79)
pt3dadd(80.47, 88.57, 13.45, 6.79)
pt3dadd(80.52, 88.62, 13.45, 6.79)
pt3dadd(80.57, 88.67, 13.45, 6.79)
pt3dadd(80.61, 88.72, 13.45, 6.79)
pt3dadd(80.65, 88.77, 13.45, 6.79)
pt3dadd(80.79, 88.77, 13.45, 6.79)
pt3dadd(80.83, 88.82, 13.45, 6.79)
pt3dadd(81.46, 88.82, 13.45, 6.79)
pt3dadd(81.5, 88.87, 13.45, 6.79)
pt3dadd(81.59, 88.92, 13.45, 6.79)
pt3dadd(81.64, 88.97, 13.45, 6.79)
pt3dadd(81.72, 88.97, 13.45, 6.79)
pt3dadd(81.77, 89.02, 13.45, 6.79)
pt3dadd(81.81, 89.07, 13.45, 6.79)
pt3dadd(81.86, 89.12, 13.45, 6.79)
pt3dadd(81.95, 89.17, 13.45, 6.79)
pt3dadd(81.99, 89.22, 13.45, 6.79)
pt3dadd(82.04, 89.28, 13.45, 6.79)
pt3dadd(82.13, 89.32, 13.45, 6.79)
pt3dadd(82.21, 89.38, 13.45, 6.79)
pt3dadd(82.35, 89.53, 13.45, 6.79)
pt3dadd(82.44, 89.58, 13.45, 6.79)
pt3dadd(82.48, 89.63, 13.45, 6.79)
pt3dadd(82.57, 89.68, 13.45, 6.79)
pt3dadd(82.66, 89.78, 13.45, 6.79)
pt3dadd(82.75, 89.83, 13.45, 6.79)
pt3dadd(82.84, 89.88, 13.45, 6.79)
pt3dadd(82.88, 89.93, 13.45, 6.79)
pt3dadd(82.93, 89.98, 13.45, 6.79)
pt3dadd(83.29, 89.98, 13.45, 6.79)
pt3dadd(83.24, 90.04, 13.45, 4.93)
pt3dadd(83.29, 90.08, 13.45, 4.93)
pt3dadd(83.37, 90.08, 13.45, 4.93)
pt3dadd(83.46, 90.14, 13.45, 4.93)
pt3dadd(86.67, 90.14, 13.45, 4.93)
pt3dadd(86.76, 90.08, 13.45, 4.93)
pt3dadd(86.85, 90.04, 13.45, 4.93)
pt3dadd(86.89, 89.98, 13.45, 4.93)
pt3dadd(86.99, 89.93, 13.45, 4.93)
pt3dadd(87.07, 89.88, 13.45, 4.93)
pt3dadd(87.16, 89.83, 13.45, 4.93)
pt3dadd(87.25, 89.78, 13.45, 4.93)
pt3dadd(87.29, 89.73, 13.45, 4.93)
pt3dadd(87.34, 89.63, 13.45, 4.93)
pt3dadd(87.39, 89.58, 13.45, 4.93)
pt3dadd(87.43, 89.53, 13.45, 4.93)
pt3dadd(87.61, 89.53, 13.45, 4.93)
pt3dadd(87.56, 89.53, 10.3, 4.93)
pt3dadd(87.65, 89.58, 10.3, 4.93)
pt3dadd(87.56, 89.63, 10.3, 4.93)
pt3dadd(88.94, 89.63, 10.3, 4.93)
pt3dadd(88.99, 89.68, 10.3, 4.93)
pt3dadd(89.13, 89.68, 10.3, 4.93)
pt3dadd(89.17, 89.73, 10.3, 4.93)
pt3dadd(89.21, 89.78, 10.3, 4.93)
pt3dadd(89.26, 89.83, 10.3, 4.93)
pt3dadd(89.35, 89.88, 10.3, 4.93)
pt3dadd(89.39, 89.93, 10.3, 4.93)
pt3dadd(89.43, 89.98, 10.3, 4.93)
pt3dadd(89.53, 89.98, 10.3, 4.93)
pt3dadd(89.57, 90.04, 10.3, 4.93)
pt3dadd(89.61, 90.04, 10.3, 4.93)
pt3dadd(89.7, 89.93, 10.3, 3.06)
pt3dadd(89.7, 90.08, 10.3, 3.06)
pt3dadd(89.79, 90.14, 10.3, 3.06)
pt3dadd(89.79, 90.24, 10.3, 3.06)
pt3dadd(89.84, 90.29, 10.3, 3.06)
pt3dadd(89.84, 90.39, 10.3, 3.06)
pt3dadd(89.88, 90.49, 10.3, 3.06)
pt3dadd(89.88, 90.24, 10.3, 3.57)
pt3dadd(89.93, 90.34, 10.3, 3.57)
pt3dadd(89.93, 90.79, 10.3, 3.57)
pt3dadd(89.97, 90.85, 10.3, 3.57)
pt3dadd(90.01, 90.94, 10.3, 3.57)
pt3dadd(90.06, 91, 10.3, 3.57)
pt3dadd(90.11, 91.1, 10.3, 3.57)
pt3dadd(90.15, 91.15, 10.3, 3.57)
pt3dadd(90.19, 91.2, 10.3, 3.57)
pt3dadd(90.24, 91.3, 10.3, 3.57)
pt3dadd(90.42, 91.5, 10.3, 3.57)
pt3dadd(90.46, 91.55, 10.3, 3.57)
pt3dadd(90.5, 91.61, 10.3, 3.57)
pt3dadd(90.55, 91.71, 10.3, 3.57)
pt3dadd(90.6, 91.75, 10.3, 3.57)
pt3dadd(90.64, 91.86, 10.3, 3.57)
pt3dadd(90.68, 91.96, 10.3, 3.57)
pt3dadd(90.77, 92.01, 10.3, 3.57)
pt3dadd(90.82, 92.11, 10.3, 3.57)
pt3dadd(90.86, 92.21, 10.3, 3.57)
pt3dadd(90.91, 92.31, 10.3, 3.57)
pt3dadd(90.95, 92.36, 10.3, 3.57)
pt3dadd(91, 92.42, 10.3, 3.57)
pt3dadd(91.08, 92.51, 10.3, 3.57)
pt3dadd(91.13, 92.57, 10.3, 3.57)
pt3dadd(91.18, 92.62, 10.3, 3.57)
pt3dadd(91.26, 92.67, 10.3, 3.57)
pt3dadd(91.31, 92.72, 10.3, 3.57)
pt3dadd(91.35, 92.82, 10.3, 3.57)
pt3dadd(91.4, 92.87, 10.3, 3.57)
pt3dadd(91.49, 92.87, 10.3, 3.57)
pt3dadd(91.53, 92.92, 10.3, 3.57)
pt3dadd(91.62, 92.92, 10.3, 3.57)
pt3dadd(91.67, 92.97, 10.3, 3.57)
pt3dadd(91.13, 92.57, 10.3, 4.25)
pt3dadd(91.18, 92.62, 10.3, 4.25)
pt3dadd(91.22, 92.67, 10.3, 4.25)
pt3dadd(91.35, 92.72, 10.3, 4.25)
pt3dadd(91.4, 92.77, 10.3, 4.25)
pt3dadd(91.49, 92.82, 10.3, 4.25)
pt3dadd(91.57, 92.82, 10.3, 4.25)
pt3dadd(91.62, 92.87, 10.3, 4.25)
pt3dadd(92.51, 92.87, 10.3, 4.25)
pt3dadd(92.2, 92.87, 8.2, 4.25)
pt3dadd(93.18, 92.87, 8.2, 4.25)
pt3dadd(93.27, 92.92, 8.2, 4.25)
pt3dadd(93.4, 92.92, 8.2, 4.25)
pt3dadd(93.54, 92.97, 8.2, 4.25)
pt3dadd(94.21, 92.97, 8.2, 4.25)
pt3dadd(94.29, 93.02, 8.2, 4.25)
pt3dadd(97.24, 93.02, 8.2, 4.25)
pt3dadd(97.28, 93.07, 8.2, 4.25)
pt3dadd(97.5, 93.07, 8.2, 4.25)
}
dend[28] {pt3dclear()
pt3dadd(97.5, 93.07, 8.2, 3.1)
pt3dadd(105.48, 69.44, 0, 3.1)
pt3dadd(112.99, 54.38, 0, 3.1)
pt3dadd(127.78, 40.54, 0, 3.1)
pt3dadd(132.65, 26.22, 0, 3.1)
pt3dadd(133.82, 19.73, 0, 3.1)
}
dend[29] {pt3dclear()
pt3dadd(97.5, 93.07, 8.2, 3.1)
pt3dadd(105.48, 94.42, 0, 3.1)
pt3dadd(118.56, 89.4, 0, 3.1)
pt3dadd(131.96, 85.36, 0, 3.1)
pt3dadd(146.59, 77.89, 0, 3.1)
pt3dadd(151.93, 67.72, 0, 3.1)
}
dend[30] {pt3dclear()
pt3dadd(85.33, 71.75, 4, 3.57)
pt3dadd(85.33, 71.71, 4, 3.57)
pt3dadd(85.38, 71.75, 4, 3.57)
pt3dadd(85.43, 71.81, 4, 3.57)
pt3dadd(85.47, 71.86, 4, 3.57)
pt3dadd(85.51, 71.91, 4, 3.57)
pt3dadd(85.56, 71.96, 4, 3.57)
pt3dadd(85.6, 72.01, 4, 3.57)
pt3dadd(85.65, 72.06, 4, 3.57)
pt3dadd(85.69, 72.11, 4, 3.57)
pt3dadd(85.74, 72.16, 4, 3.57)
pt3dadd(85.78, 72.26, 4, 3.57)
pt3dadd(85.82, 72.31, 4, 3.57)
pt3dadd(85.82, 72.41, 4, 3.57)
pt3dadd(85.87, 72.46, 4, 3.57)
pt3dadd(85.92, 72.51, 4, 3.57)
pt3dadd(85.96, 72.57, 4, 3.57)
pt3dadd(85.96, 72.67, 4, 3.57)
pt3dadd(86, 72.72, 4, 3.57)
pt3dadd(86.05, 72.77, 4, 3.57)
pt3dadd(86.09, 72.87, 4, 3.57)
pt3dadd(86.14, 72.92, 4, 3.57)
pt3dadd(86.14, 73.02, 4, 3.57)
pt3dadd(86.18, 73.07, 4, 3.57)
pt3dadd(86.36, 73.27, 4, 3.57)
pt3dadd(86.4, 73.32, 4, 3.57)
pt3dadd(86.49, 73.38, 4, 3.57)
pt3dadd(86.54, 73.43, 4, 3.57)
pt3dadd(86.58, 73.47, 4, 3.57)
pt3dadd(86.63, 73.53, 4, 3.57)
pt3dadd(86.72, 73.58, 4, 3.57)
pt3dadd(86.81, 73.63, 4, 3.57)
pt3dadd(86.85, 73.68, 4, 3.57)
pt3dadd(86.89, 73.73, 4, 3.57)
pt3dadd(86.99, 73.73, 4, 3.57)
pt3dadd(87.03, 73.78, 4, 3.57)
pt3dadd(87.07, 73.83, 4, 3.57)
}
}
proc shape3d_35() {
dend[30] { pt3dadd(87.16, 73.83, 4, 3.57)
pt3dadd(87.21, 73.88, 4, 3.57)
pt3dadd(87.29, 73.88, 4, 3.57)
pt3dadd(87.34, 73.93, 4, 3.57)
pt3dadd(87.47, 73.93, 4, 3.57)
pt3dadd(87.52, 73.98, 4, 3.57)
pt3dadd(87.56, 73.98, 4, 3.57)
pt3dadd(87.43, 74.24, 4, 3.57)
pt3dadd(87.47, 74.18, 4, 3.57)
pt3dadd(92.66, 77.49, 0, 3.1)
pt3dadd(94.75, 82.02, 0, 3.1)
pt3dadd(96.07, 84.35, 0, 3.1)
}
dend[31] {pt3dclear()
pt3dadd(32.51, -30.63, -0.2, 3.23)
pt3dadd(32.19, -30.58, 1.9, 3.23)
pt3dadd(28.94, -30.58, 1.9, 3.23)
pt3dadd(28.85, -30.63, 1.9, 3.23)
pt3dadd(28.81, -30.68, 1.9, 3.23)
pt3dadd(28.76, -30.74, 1.9, 3.23)
pt3dadd(28.72, -30.78, 1.9, 3.23)
pt3dadd(28.63, -30.78, 1.9, 3.23)
pt3dadd(28.58, -30.89, 1.9, 3.23)
pt3dadd(28.49, -30.99, 1.9, 3.23)
pt3dadd(28.45, -31.04, 1.9, 3.23)
pt3dadd(28.4, -31.09, 1.9, 3.23)
pt3dadd(28.36, -31.14, 1.9, 3.23)
pt3dadd(28.32, -31.19, 1.9, 3.23)
pt3dadd(28.27, -31.24, 1.9, 3.23)
pt3dadd(28.23, -31.29, 1.9, 3.23)
pt3dadd(28.18, -31.34, 1.9, 3.23)
pt3dadd(28.14, -31.39, 1.9, 3.23)
pt3dadd(28.09, -31.44, 1.9, 3.23)
pt3dadd(28.05, -31.49, 1.9, 3.23)
pt3dadd(28.05, -31.59, 1.9, 3.23)
pt3dadd(27.96, -31.65, 1.9, 3.23)
pt3dadd(27.91, -31.69, 1.9, 3.23)
pt3dadd(27.87, -31.75, 1.9, 3.23)
pt3dadd(27.82, -31.8, 1.9, 3.23)
pt3dadd(27.78, -31.85, 1.9, 3.23)
pt3dadd(27.74, -31.9, 1.9, 3.23)
pt3dadd(27.69, -31.95, 1.9, 3.23)
pt3dadd(27.65, -32, 1.9, 3.23)
pt3dadd(27.6, -32.05, 1.9, 3.23)
pt3dadd(27.56, -32.05, 1.9, 3.23)
pt3dadd(27.42, -32.15, 1.9, 2.21)
pt3dadd(27.42, -32.25, 1.9, 2.21)
pt3dadd(27.38, -32.35, 1.9, 2.21)
pt3dadd(27.29, -32.46, 1.9, 2.21)
pt3dadd(27.25, -32.51, 1.9, 2.21)
pt3dadd(27.25, -32.61, 1.9, 2.21)
pt3dadd(27.2, -32.66, 1.9, 2.21)
pt3dadd(27.16, -32.71, 1.9, 2.21)
pt3dadd(27.11, -32.76, 1.9, 2.21)
pt3dadd(27.11, -32.86, 1.9, 2.21)
pt3dadd(27.07, -32.91, 1.9, 2.21)
pt3dadd(27.07, -33.01, 1.9, 2.21)
pt3dadd(27.02, -33.06, 1.9, 2.21)
pt3dadd(26.98, -33.12, 1.9, 2.21)
pt3dadd(26.93, -33.17, 1.9, 2.21)
pt3dadd(26.89, -33.26, 1.9, 2.21)
pt3dadd(26.89, -33.37, 1.9, 2.21)
pt3dadd(26.8, -33.47, 1.9, 2.21)
pt3dadd(26.75, -33.57, 1.9, 2.21)
pt3dadd(26.71, -33.62, 1.9, 2.21)
pt3dadd(26.67, -33.72, 1.9, 2.21)
pt3dadd(26.62, -33.82, 1.9, 2.21)
pt3dadd(26.58, -33.92, 1.9, 2.21)
pt3dadd(26.53, -33.97, 1.9, 2.21)
pt3dadd(26.53, -34.13, 1.9, 2.21)
pt3dadd(26.49, -34.18, 1.9, 2.21)
pt3dadd(26.44, -34.28, 1.9, 2.21)
pt3dadd(26.4, -34.33, 1.9, 2.21)
pt3dadd(26.35, -34.38, 1.9, 2.21)
pt3dadd(26.31, -34.43, 1.9, 2.21)
pt3dadd(26.26, -34.48, 1.9, 2.21)
pt3dadd(26.22, -34.58, 1.9, 2.21)
pt3dadd(26.17, -34.68, 1.9, 2.21)
pt3dadd(26.13, -34.78, 1.9, 2.21)
pt3dadd(26.04, -34.83, 1.9, 2.21)
pt3dadd(26, -34.88, 1.9, 2.21)
pt3dadd(25.95, -34.94, 1.9, 2.21)
pt3dadd(25.91, -35.04, 1.9, 2.21)
pt3dadd(25.82, -35.19, 1.9, 2.21)
pt3dadd(25.77, -35.24, 1.9, 2.21)
pt3dadd(25.73, -35.34, 1.9, 2.21)
pt3dadd(25.68, -35.44, 1.9, 2.21)
pt3dadd(25.64, -35.49, 1.9, 2.21)
pt3dadd(25.59, -35.54, 1.9, 2.21)
pt3dadd(25.55, -35.6, 1.9, 2.21)
pt3dadd(25.5, -35.65, 1.9, 2.21)
pt3dadd(25.46, -35.7, 1.9, 2.21)
pt3dadd(25.42, -35.8, 1.9, 2.21)
pt3dadd(25.37, -35.85, 1.9, 2.21)
pt3dadd(25.33, -35.9, 1.9, 2.21)
pt3dadd(25.28, -35.95, 1.9, 2.21)
pt3dadd(25.24, -36, 1.9, 2.21)
pt3dadd(25.19, -36.05, 1.9, 2.21)
pt3dadd(25.15, -36.1, 1.9, 2.21)
pt3dadd(25.1, -36.15, 1.9, 2.21)
pt3dadd(25.01, -36.2, 1.9, 2.21)
pt3dadd(24.92, -36.31, 1.9, 2.21)
pt3dadd(24.88, -36.35, 1.9, 2.21)
pt3dadd(24.84, -36.4, 1.9, 2.21)
pt3dadd(24.79, -36.46, 1.9, 2.21)
pt3dadd(24.75, -36.56, 1.9, 2.21)
pt3dadd(24.7, -36.61, 1.9, 2.21)
pt3dadd(24.66, -36.66, 1.9, 2.21)
pt3dadd(24.61, -36.71, 1.9, 2.21)
pt3dadd(24.52, -36.71, 1.9, 2.21)
pt3dadd(24.48, -36.81, 1.9, 2.21)
pt3dadd(24.43, -36.86, 1.9, 2.21)
pt3dadd(24.34, -36.96, 1.9, 2.21)
pt3dadd(24.26, -37.01, 1.9, 2.21)
pt3dadd(24.21, -37.06, 1.9, 2.21)
pt3dadd(24.17, -37.12, 1.9, 2.21)
pt3dadd(24.08, -37.17, 1.9, 2.21)
pt3dadd(24.03, -37.22, 1.9, 2.21)
pt3dadd(23.94, -37.26, 1.9, 2.21)
pt3dadd(23.9, -37.37, 1.9, 2.21)
pt3dadd(23.81, -37.42, 1.9, 2.21)
pt3dadd(23.77, -37.47, 1.9, 2.21)
pt3dadd(23.72, -37.52, 1.9, 2.21)
pt3dadd(23.68, -37.57, 1.9, 2.21)
pt3dadd(23.63, -37.62, 1.9, 2.21)
pt3dadd(23.59, -37.67, 1.9, 2.21)
pt3dadd(23.5, -37.67, 1.9, 2.21)
pt3dadd(23.41, -37.72, 1.9, 2.21)
pt3dadd(23.36, -37.77, 1.9, 2.21)
pt3dadd(23.32, -37.82, 1.9, 2.21)
pt3dadd(23.45, -37.57, 0.85, 2.21)
pt3dadd(23.45, -37.67, 0.85, 2.21)
pt3dadd(23.41, -37.72, 0.85, 2.21)
pt3dadd(23.36, -37.77, 0.85, 2.21)
pt3dadd(23.32, -37.82, 0.85, 2.21)
pt3dadd(23.27, -37.87, 0.85, 2.21)
pt3dadd(23.23, -37.92, 0.85, 2.21)
pt3dadd(23.19, -37.97, 0.85, 2.21)
pt3dadd(23.1, -38.03, 0.85, 2.21)
pt3dadd(23.05, -38.08, 0.85, 2.21)
pt3dadd(23.01, -38.13, 0.85, 2.21)
pt3dadd(22.97, -38.18, 0.85, 2.21)
pt3dadd(22.92, -38.23, 0.85, 2.21)
pt3dadd(22.88, -38.28, 0.85, 2.21)
pt3dadd(22.83, -38.33, 0.85, 2.21)
pt3dadd(22.78, -38.43, 0.85, 2.21)
pt3dadd(22.74, -38.48, 0.85, 2.21)
pt3dadd(22.7, -38.58, 0.85, 2.21)
pt3dadd(22.65, -38.63, 0.85, 2.21)
pt3dadd(22.61, -38.69, 0.85, 2.21)
pt3dadd(22.56, -38.74, 0.85, 2.21)
pt3dadd(22.52, -38.78, 0.85, 2.21)
pt3dadd(22.47, -38.83, 0.85, 2.21)
pt3dadd(22.43, -38.89, 0.85, 2.21)
pt3dadd(22.39, -38.94, 0.85, 2.21)
pt3dadd(22.34, -38.99, 0.85, 2.21)
pt3dadd(22.25, -39.04, 0.85, 2.21)
pt3dadd(22.2, -39.14, 0.85, 2.21)
pt3dadd(22.16, -39.19, 0.85, 2.21)
pt3dadd(22.07, -39.24, 0.85, 2.21)
pt3dadd(22.03, -39.34, 0.85, 2.21)
pt3dadd(21.94, -39.39, 0.85, 2.21)
pt3dadd(21.9, -39.44, 0.85, 2.21)
pt3dadd(21.81, -39.49, 0.85, 2.21)
pt3dadd(21.72, -39.54, 0.85, 2.21)
pt3dadd(21.63, -39.65, 0.85, 2.21)
pt3dadd(21.54, -39.65, 0.85, 2.21)
pt3dadd(21.49, -39.7, 0.85, 2.21)
pt3dadd(21.4, -39.75, 0.85, 2.21)
pt3dadd(21.36, -39.85, 0.85, 2.21)
pt3dadd(21.27, -39.85, 0.85, 2.21)
pt3dadd(21.23, -39.9, 0.85, 2.21)
pt3dadd(21.18, -39.95, 0.85, 2.21)
pt3dadd(21.09, -40, 0.85, 2.21)
pt3dadd(21, -40.05, 0.85, 2.21)
pt3dadd(20.91, -40.1, 0.85, 2.21)
pt3dadd(20.74, -40.31, 0.85, 2.21)
pt3dadd(20.69, -40.35, 0.85, 2.21)
pt3dadd(20.6, -40.4, 0.85, 2.21)
pt3dadd(20.56, -40.46, 0.85, 2.21)
pt3dadd(20.51, -40.51, 0.85, 2.21)
pt3dadd(20.47, -40.56, 0.85, 2.21)
pt3dadd(20.42, -40.66, 0.85, 2.21)
pt3dadd(20.33, -40.71, 0.85, 2.21)
pt3dadd(20.29, -40.76, 0.85, 2.21)
pt3dadd(20.2, -40.81, 0.85, 2.21)
pt3dadd(20.11, -40.91, 0.85, 2.21)
pt3dadd(20.02, -40.96, 0.85, 2.21)
pt3dadd(19.93, -41.01, 0.85, 2.21)
pt3dadd(19.84, -41.12, 0.85, 2.21)
pt3dadd(19.8, -41.17, 0.85, 2.21)
pt3dadd(19.71, -41.22, 0.85, 2.21)
pt3dadd(19.62, -41.32, 0.85, 2.21)
pt3dadd(19.58, -41.37, 0.85, 2.21)
pt3dadd(19.49, -41.42, 0.85, 2.21)
pt3dadd(19.44, -41.47, 0.85, 2.21)
pt3dadd(19.4, -41.52, 0.85, 2.21)
pt3dadd(19.35, -41.62, 0.85, 2.21)
pt3dadd(19.31, -41.67, 0.85, 2.21)
pt3dadd(19.26, -41.77, 0.85, 2.21)
pt3dadd(19.17, -41.82, 0.85, 2.21)
pt3dadd(19.08, -41.92, 0.85, 2.21)
}
}
proc shape3d_36() {
dend[31] { pt3dadd(19.04, -41.97, 0.85, 2.21)
pt3dadd(18.95, -42.03, 0.85, 2.21)
pt3dadd(18.91, -42.08, 0.85, 2.21)
pt3dadd(18.82, -42.13, 0.85, 2.21)
pt3dadd(18.73, -42.18, 0.85, 2.21)
pt3dadd(18.68, -42.23, 0.85, 2.21)
pt3dadd(18.59, -42.28, 0.85, 2.21)
pt3dadd(18.55, -42.33, 0.85, 2.21)
pt3dadd(18.5, -42.38, 0.85, 2.21)
pt3dadd(18.42, -42.43, 0.85, 2.21)
pt3dadd(18.37, -42.48, 0.85, 2.21)
pt3dadd(18.33, -42.53, 0.85, 2.21)
pt3dadd(18.24, -42.58, 0.85, 2.21)
pt3dadd(18.19, -42.63, 0.85, 2.21)
pt3dadd(18.1, -42.69, 0.85, 2.21)
pt3dadd(18.01, -42.69, 0.85, 2.21)
pt3dadd(17.97, -42.74, 0.85, 2.21)
pt3dadd(17.93, -42.69, -1.25, 2.21)
pt3dadd(17.93, -42.99, -1.25, 2.21)
pt3dadd(17.88, -43.04, -1.25, 2.21)
pt3dadd(17.84, -43.09, -1.25, 2.21)
pt3dadd(17.79, -43.14, -1.25, 2.21)
pt3dadd(17.75, -43.19, -1.25, 2.21)
pt3dadd(17.7, -43.24, -1.25, 2.21)
pt3dadd(17.66, -43.29, -1.25, 2.21)
pt3dadd(17.61, -43.34, -1.25, 2.21)
pt3dadd(17.52, -43.34, -1.25, 2.21)
pt3dadd(17.48, -43.44, -1.25, 2.21)
pt3dadd(17.39, -43.49, -1.25, 2.21)
pt3dadd(17.35, -43.54, -1.25, 2.21)
pt3dadd(17.26, -43.6, -1.25, 2.21)
pt3dadd(17.21, -43.65, -1.25, 2.21)
pt3dadd(17.08, -43.8, -1.25, 2.21)
pt3dadd(17.03, -43.9, -1.25, 2.21)
pt3dadd(16.99, -43.95, -1.25, 2.21)
pt3dadd(16.94, -44, -1.25, 2.21)
pt3dadd(16.86, -44.05, -1.25, 2.21)
pt3dadd(16.81, -44.1, -1.25, 2.21)
pt3dadd(16.68, -44.26, -1.25, 2.21)
pt3dadd(16.63, -44.31, -1.25, 2.21)
pt3dadd(16.59, -44.4, -1.25, 2.21)
pt3dadd(16.55, -44.46, -1.25, 2.21)
pt3dadd(16.5, -44.56, -1.25, 2.21)
pt3dadd(16.41, -44.61, -1.25, 2.21)
pt3dadd(16.36, -44.71, -1.25, 2.21)
pt3dadd(16.32, -44.76, -1.25, 2.21)
pt3dadd(16.28, -44.86, -1.25, 2.21)
pt3dadd(16.14, -45.01, -1.25, 2.21)
pt3dadd(16.1, -45.12, -1.25, 2.21)
pt3dadd(16.06, -45.17, -1.25, 2.21)
pt3dadd(16.01, -45.22, -1.25, 2.21)
pt3dadd(15.97, -45.27, -1.25, 2.21)
pt3dadd(15.92, -45.37, -1.25, 2.21)
pt3dadd(15.88, -45.42, -1.25, 2.21)
pt3dadd(15.83, -45.47, -1.25, 2.21)
pt3dadd(15.79, -45.52, -1.25, 2.21)
pt3dadd(15.74, -45.57, -1.25, 2.21)
pt3dadd(15.7, -45.62, -1.25, 2.21)
pt3dadd(15.61, -45.67, -1.25, 2.21)
pt3dadd(15.48, -45.82, -1.25, 2.21)
pt3dadd(15.48, -45.88, -1.25, 2.21)
pt3dadd(15.43, -45.97, -4.4, 2.04)
pt3dadd(15.43, -46.13, -4.4, 2.04)
pt3dadd(15.39, -46.23, -4.4, 2.04)
pt3dadd(15.34, -46.28, -4.4, 2.04)
pt3dadd(15.34, -46.38, -4.4, 2.04)
pt3dadd(15.3, -46.43, -4.4, 2.04)
pt3dadd(15.3, -46.53, -4.4, 2.04)
pt3dadd(15.25, -46.58, -4.4, 2.04)
pt3dadd(15.25, -46.69, -4.4, 2.04)
pt3dadd(15.21, -46.74, -4.4, 2.04)
pt3dadd(15.16, -46.78, -4.4, 2.04)
pt3dadd(15.16, -46.94, -4.4, 2.04)
pt3dadd(15.12, -46.99, -4.4, 2.04)
pt3dadd(15.07, -47.09, -4.4, 2.04)
pt3dadd(15.07, -47.19, -4.4, 2.04)
pt3dadd(15.03, -47.24, -4.4, 2.04)
pt3dadd(14.98, -47.29, -4.4, 2.04)
pt3dadd(14.98, -47.39, -4.4, 2.04)
pt3dadd(14.94, -47.44, -4.4, 2.04)
pt3dadd(14.9, -47.54, -4.4, 2.04)
pt3dadd(14.85, -47.6, -4.4, 2.04)
pt3dadd(14.81, -47.7, -4.4, 2.04)
pt3dadd(14.76, -47.75, -4.4, 2.04)
pt3dadd(14.72, -47.85, -4.4, 2.04)
pt3dadd(14.67, -47.9, -4.4, 2.04)
pt3dadd(14.67, -48.05, -4.4, 2.04)
pt3dadd(14.63, -48.2, -4.4, 2.04)
pt3dadd(14.58, -48.31, -4.4, 2.04)
pt3dadd(14.54, -48.4, -4.4, 2.04)
pt3dadd(14.41, -48.38, -4.4, 2.04)
}
dend[32] {pt3dclear()
pt3dadd(14.41, -48.38, -4.4, 2.04)
pt3dadd(14.49, -48.56, -4.4, 2.04)
pt3dadd(14.49, -48.66, -4.4, 2.04)
pt3dadd(14.45, -48.76, -4.4, 2.04)
pt3dadd(14.45, -48.91, -4.4, 2.04)
pt3dadd(14.4, -48.96, -4.4, 2.04)
pt3dadd(14.4, -49.06, -4.4, 2.04)
pt3dadd(14.36, -49.17, -4.4, 2.04)
pt3dadd(14.36, -49.37, -4.4, 2.04)
pt3dadd(14.31, -49.47, -4.4, 2.04)
pt3dadd(14.27, -49.57, -4.4, 2.04)
pt3dadd(14.27, -49.77, -4.4, 2.04)
pt3dadd(14.23, -49.88, -4.4, 2.04)
pt3dadd(14.23, -50.13, -4.4, 2.04)
pt3dadd(14.03, -50.28, -4.4, 2.04)
pt3dadd(14.18, -51.14, -4.4, 2.04)
pt3dadd(14.14, -51.19, -4.4, 2.04)
pt3dadd(14.14, -51.34, -4.4, 2.04)
pt3dadd(14.18, -50.99, -9.65, 2.04)
}
dend[33] {pt3dclear()
pt3dadd(14.41, -48.38, -4.4, 1.36)
pt3dadd(12.88, -48.95, 27.7, 1.36)
pt3dadd(11.25, -48.88, 27.7, 1.87)
pt3dadd(11.21, -48.92, 27.7, 1.87)
pt3dadd(11.47, -48.81, 13.7, 1.87)
pt3dadd(11.04, -48.81, 13.7, 1.87)
pt3dadd(11, -48.85, 13.7, 1.87)
pt3dadd(10.27, -48.85, 13.7, 1.87)
pt3dadd(10.23, -48.9, 13.7, 1.87)
pt3dadd(10.02, -48.9, 13.7, 1.87)
pt3dadd(9.94, -48.95, 13.7, 1.87)
pt3dadd(9.64, -48.95, 13.7, 1.87)
pt3dadd(9.51, -49, 13.7, 1.87)
pt3dadd(9.05, -49, 13.7, 1.87)
pt3dadd(9, -49.04, 13.7, 1.87)
pt3dadd(8.28, -49.04, 13.7, 1.87)
pt3dadd(8.24, -49.09, 13.7, 1.87)
pt3dadd(8.15, -49.09, 13.7, 1.87)
pt3dadd(8.07, -49.14, 13.7, 1.87)
pt3dadd(7.98, -49.14, 13.7, 1.87)
pt3dadd(7.94, -49.19, 13.7, 1.87)
pt3dadd(7.86, -49.19, 13.7, 1.87)
pt3dadd(7.77, -49.24, 13.7, 1.87)
pt3dadd(7.68, -49.28, 13.7, 1.87)
pt3dadd(7.6, -49.33, 13.7, 1.87)
pt3dadd(7.51, -49.38, 13.7, 1.87)
pt3dadd(7.43, -49.43, 13.7, 1.87)
pt3dadd(7.34, -49.43, 13.7, 1.87)
pt3dadd(7.22, -49.53, 13.7, 1.87)
pt3dadd(7.13, -49.53, 13.7, 1.87)
pt3dadd(7.09, -49.58, 13.7, 1.87)
pt3dadd(7.05, -49.63, 13.7, 1.87)
pt3dadd(6.92, -49.67, 13.7, 1.87)
pt3dadd(6.84, -49.72, 13.7, 1.87)
pt3dadd(6.71, -49.72, 13.7, 1.87)
pt3dadd(6.63, -49.77, 13.7, 1.87)
pt3dadd(6.54, -49.87, 13.7, 1.87)
pt3dadd(6.45, -49.87, 13.7, 1.87)
pt3dadd(6.41, -49.91, 13.7, 1.87)
pt3dadd(6.28, -49.96, 13.7, 1.87)
pt3dadd(6.16, -49.96, 13.7, 1.87)
pt3dadd(6.07, -50.01, 13.7, 1.87)
pt3dadd(5.95, -50.06, 13.7, 1.87)
pt3dadd(5.86, -50.1, 13.7, 1.87)
pt3dadd(5.78, -50.15, 13.7, 1.87)
pt3dadd(5.73, -50.25, 13.7, 1.87)
pt3dadd(5.69, -50.3, 13.7, 1.87)
pt3dadd(5.61, -50.35, 13.7, 1.87)
pt3dadd(5.48, -50.44, 13.7, 1.87)
pt3dadd(5.26, -50.69, 13.7, 1.87)
pt3dadd(5.18, -50.78, 13.7, 1.87)
pt3dadd(5.09, -50.83, 13.7, 1.87)
pt3dadd(5.01, -50.88, 13.7, 1.87)
pt3dadd(4.97, -50.97, 13.7, 1.87)
pt3dadd(4.88, -51.07, 13.7, 1.87)
pt3dadd(4.8, -51.17, 13.7, 1.87)
pt3dadd(4.76, -51.26, 13.7, 1.87)
pt3dadd(4.67, -51.36, 13.7, 1.87)
pt3dadd(4.63, -51.46, 13.7, 1.87)
pt3dadd(4.54, -51.55, 13.7, 1.87)
pt3dadd(4.46, -51.65, 13.7, 1.87)
pt3dadd(4.41, -51.79, 13.7, 1.87)
pt3dadd(4.33, -51.94, 13.7, 1.87)
pt3dadd(4.24, -52.03, 13.7, 1.87)
pt3dadd(4.2, -52.13, 13.7, 1.87)
pt3dadd(4.16, -52.23, 13.7, 1.87)
pt3dadd(4.08, -52.37, 13.7, 1.87)
pt3dadd(3.99, -52.52, 13.7, 1.87)
pt3dadd(3.95, -52.62, 13.7, 1.87)
pt3dadd(3.91, -52.71, 13.7, 1.87)
pt3dadd(3.82, -52.9, 13.7, 1.87)
pt3dadd(3.74, -53.05, 13.7, 1.87)
pt3dadd(3.69, -53.15, 13.7, 1.87)
pt3dadd(3.65, -53.29, 13.7, 1.87)
pt3dadd(3.53, -53.43, 13.7, 1.87)
pt3dadd(3.44, -53.58, 13.7, 1.87)
pt3dadd(3.44, -53.72, 13.7, 1.87)
pt3dadd(3.31, -53.87, 13.7, 1.87)
pt3dadd(3.23, -54.11, 13.7, 1.87)
pt3dadd(3.14, -54.25, 13.7, 1.87)
pt3dadd(3.06, -54.4, 13.7, 1.87)
pt3dadd(3.02, -54.54, 13.7, 1.87)
pt3dadd(2.93, -54.64, 13.7, 1.87)
pt3dadd(2.85, -54.74, 13.7, 1.87)
pt3dadd(2.8, -54.83, 13.7, 1.87)
pt3dadd(2.72, -54.93, 13.7, 1.87)
pt3dadd(2.63, -55.07, 13.7, 1.87)
pt3dadd(2.59, -55.17, 13.7, 1.87)
pt3dadd(2.46, -55.31, 13.7, 1.87)
pt3dadd(2.42, -55.51, 13.7, 1.87)
}
}
proc shape3d_37() {
dend[33] { pt3dadd(2.34, -55.65, 13.7, 1.87)
pt3dadd(2.25, -55.75, 13.7, 1.87)
pt3dadd(2.21, -55.85, 13.7, 1.87)
pt3dadd(2.08, -55.94, 13.7, 1.87)
pt3dadd(2.04, -56.04, 13.7, 1.87)
pt3dadd(1.95, -56.13, 13.7, 1.87)
pt3dadd(1.78, -56.28, 13.7, 1.87)
pt3dadd(1.7, -56.33, 13.7, 1.87)
pt3dadd(1.65, -56.42, 13.7, 1.87)
pt3dadd(1.53, -56.57, 13.7, 1.87)
pt3dadd(1.45, -56.62, 13.7, 1.87)
pt3dadd(1.32, -56.76, 13.7, 1.87)
pt3dadd(1.15, -56.9, 13.7, 1.87)
pt3dadd(1.06, -56.96, 13.7, 1.87)
pt3dadd(1.02, -57.05, 13.7, 1.87)
pt3dadd(0.89, -57.15, 13.7, 1.87)
pt3dadd(0.81, -57.19, 13.7, 1.87)
pt3dadd(0.72, -57.29, 13.7, 1.87)
pt3dadd(0.64, -57.39, 13.7, 1.87)
pt3dadd(0.55, -57.44, 13.7, 1.87)
pt3dadd(0.47, -57.44, 13.7, 1.87)
pt3dadd(0.38, -57.49, 13.7, 1.87)
pt3dadd(0.34, -57.53, 13.7, 1.87)
pt3dadd(0.21, -57.53, 13.7, 1.87)
pt3dadd(0.17, -57.58, 13.7, 1.87)
pt3dadd(0.04, -57.58, 13.7, 1.87)
pt3dadd(0.04, -57.53, 13.7, 1.87)
pt3dadd(-0.04, -57.56, 17.7, 1.87)
pt3dadd(-0.21, -57.56, 17.7, 1.87)
pt3dadd(-0.3, -57.6, 17.7, 1.87)
pt3dadd(-0.43, -57.65, 17.7, 1.87)
pt3dadd(-0.51, -57.7, 17.7, 1.87)
pt3dadd(-0.6, -57.7, 17.7, 1.87)
pt3dadd(-0.68, -57.75, 17.7, 1.87)
pt3dadd(-1.14, -57.75, 17.7, 1.87)
pt3dadd(-1.27, -57.8, 17.7, 1.87)
pt3dadd(-2.51, -57.8, 17.7, 1.87)
pt3dadd(-2.63, -57.9, 17.7, 1.87)
pt3dadd(-2.8, -57.9, 17.7, 1.87)
pt3dadd(-2.85, -57.94, 17.7, 1.87)
pt3dadd(-2.93, -57.99, 17.7, 1.87)
pt3dadd(-3.02, -58.04, 17.7, 1.87)
pt3dadd(-3.1, -58.09, 17.7, 1.87)
pt3dadd(-3.18, -58.13, 17.7, 1.87)
pt3dadd(-3.27, -58.23, 17.7, 1.87)
pt3dadd(-3.36, -58.23, 17.7, 1.87)
pt3dadd(-3.44, -58.28, 17.7, 1.87)
pt3dadd(-3.57, -58.38, 17.7, 1.87)
pt3dadd(-3.61, -58.47, 17.7, 1.87)
pt3dadd(-3.69, -58.57, 17.7, 1.87)
pt3dadd(-3.78, -58.62, 17.7, 1.87)
pt3dadd(-3.86, -58.67, 17.7, 1.87)
pt3dadd(-3.9, -58.76, 17.7, 1.87)
pt3dadd(-3.95, -58.81, 17.7, 1.87)
pt3dadd(-4.03, -58.86, 17.7, 1.87)
pt3dadd(-4.12, -58.96, 17.7, 1.87)
pt3dadd(-4.2, -59.05, 17.7, 1.87)
pt3dadd(-4.33, -59.2, 17.7, 1.87)
pt3dadd(-4.37, -59.29, 17.7, 1.87)
pt3dadd(-4.46, -59.39, 17.7, 1.87)
pt3dadd(-4.54, -59.44, 17.7, 1.87)
pt3dadd(-4.67, -59.53, 17.7, 1.87)
pt3dadd(-4.76, -59.63, 17.7, 1.87)
pt3dadd(-4.84, -59.78, 17.7, 1.87)
pt3dadd(-4.88, -59.87, 17.7, 1.87)
pt3dadd(-4.97, -59.97, 17.7, 1.87)
pt3dadd(-5.01, -60.02, 17.7, 1.87)
pt3dadd(-5.09, -60.06, 17.7, 1.87)
pt3dadd(-5.14, -60.16, 17.7, 1.87)
pt3dadd(-5.22, -60.26, 17.7, 1.87)
pt3dadd(-5.26, -60.35, 17.7, 1.87)
pt3dadd(-5.39, -60.45, 17.7, 1.87)
pt3dadd(-5.56, -60.64, 17.7, 1.87)
pt3dadd(-5.69, -60.83, 17.7, 1.87)
pt3dadd(-5.78, -60.93, 17.7, 1.87)
pt3dadd(-5.86, -61.03, 17.7, 1.87)
pt3dadd(-5.9, -61.13, 17.7, 1.87)
pt3dadd(-5.99, -61.22, 17.7, 1.87)
pt3dadd(-6.03, -61.27, 17.7, 1.87)
pt3dadd(-6.11, -61.37, 17.7, 1.87)
pt3dadd(-6.2, -61.46, 17.7, 1.87)
pt3dadd(-6.41, -61.71, 17.7, 1.87)
pt3dadd(-6.45, -61.75, 17.7, 1.87)
pt3dadd(-6.54, -61.85, 17.7, 1.87)
pt3dadd(-6.75, -61.99, 17.7, 1.87)
pt3dadd(-6.88, -62.14, 17.7, 1.87)
pt3dadd(-6.96, -62.24, 17.7, 1.87)
pt3dadd(-7.05, -62.28, 17.7, 1.87)
pt3dadd(-7.13, -62.33, 17.7, 1.87)
pt3dadd(-7.18, -62.38, 17.7, 1.87)
pt3dadd(-7.22, -62.43, 17.7, 1.87)
pt3dadd(-7.3, -62.47, 17.7, 1.87)
pt3dadd(-7.34, -62.53, 17.7, 1.87)
pt3dadd(-7.43, -62.62, 17.7, 1.87)
pt3dadd(-7.51, -62.67, 17.7, 1.87)
pt3dadd(-7.64, -62.81, 17.7, 1.87)
pt3dadd(-7.68, -62.86, 17.7, 1.87)
pt3dadd(-7.77, -62.96, 17.7, 1.87)
pt3dadd(-7.86, -63.06, 17.7, 1.87)
pt3dadd(-7.94, -63.15, 17.7, 1.87)
pt3dadd(-7.98, -63.25, 17.7, 1.87)
pt3dadd(-8.07, -63.29, 17.7, 1.87)
pt3dadd(-8.19, -63.39, 17.7, 1.87)
pt3dadd(-8.28, -63.49, 17.7, 1.87)
pt3dadd(-8.36, -63.58, 17.7, 1.87)
pt3dadd(-8.45, -63.68, 17.7, 1.87)
pt3dadd(-8.53, -63.73, 17.7, 1.87)
pt3dadd(-8.58, -63.78, 17.7, 1.87)
pt3dadd(-8.62, -63.83, 17.7, 1.87)
pt3dadd(-8.7, -63.88, 17.7, 1.87)
pt3dadd(-8.79, -63.92, 17.7, 1.87)
pt3dadd(-8.96, -64.02, 17.7, 1.87)
pt3dadd(-9.17, -64.21, 17.7, 1.87)
pt3dadd(-9.51, -64.4, 17.7, 1.87)
pt3dadd(-9.85, -64.64, 17.7, 1.87)
pt3dadd(-10.19, -64.84, 17.7, 1.87)
pt3dadd(-10.53, -65.03, 17.7, 1.87)
pt3dadd(-10.87, -65.13, 17.7, 1.87)
pt3dadd(-11.08, -65.27, 17.7, 1.87)
pt3dadd(-11.3, -65.42, 17.7, 1.87)
pt3dadd(-11.42, -65.46, 17.7, 1.87)
pt3dadd(-11.55, -65.51, 17.7, 1.87)
pt3dadd(-11.63, -65.56, 17.7, 1.87)
pt3dadd(-11.76, -65.61, 17.7, 1.87)
pt3dadd(-11.89, -65.66, 17.7, 1.87)
pt3dadd(-12.02, -65.75, 17.7, 1.87)
pt3dadd(-12.14, -65.75, 17.7, 1.87)
pt3dadd(-12.23, -65.8, 17.7, 1.87)
pt3dadd(-12.06, -65.73, 20.7, 1.53)
pt3dadd(-12.35, -65.73, 20.7, 1.53)
pt3dadd(-12.4, -65.78, 20.7, 1.53)
pt3dadd(-12.48, -65.83, 20.7, 1.53)
pt3dadd(-12.52, -65.88, 20.7, 1.53)
pt3dadd(-12.61, -65.88, 20.7, 1.53)
pt3dadd(-12.69, -65.93, 20.7, 1.53)
pt3dadd(-12.82, -65.93, 20.7, 1.53)
pt3dadd(-12.86, -65.97, 20.7, 1.53)
pt3dadd(-12.91, -66.02, 20.7, 1.53)
pt3dadd(-12.99, -66.07, 20.7, 1.53)
pt3dadd(-13.08, -66.07, 20.7, 1.53)
pt3dadd(-13.12, -66.12, 20.7, 1.53)
pt3dadd(-13.2, -66.17, 20.7, 1.53)
pt3dadd(-13.33, -66.21, 20.7, 1.53)
pt3dadd(-13.42, -66.26, 20.7, 1.53)
pt3dadd(-13.84, -66.26, 20.7, 1.53)
pt3dadd(-13.93, -66.31, 20.7, 1.53)
pt3dadd(-14.01, -66.36, 20.7, 1.53)
pt3dadd(-14.44, -66.36, 20.7, 1.53)
pt3dadd(-14.52, -66.4, 20.7, 1.53)
pt3dadd(-14.65, -66.46, 20.7, 1.53)
pt3dadd(-14.77, -66.5, 20.7, 1.53)
pt3dadd(-14.86, -66.5, 20.7, 1.53)
pt3dadd(-14.99, -66.55, 20.7, 1.53)
pt3dadd(-15.11, -66.6, 20.7, 1.53)
pt3dadd(-15.2, -66.65, 20.7, 1.53)
pt3dadd(-15.54, -66.65, 20.7, 1.53)
pt3dadd(-15.63, -66.69, 20.7, 1.53)
pt3dadd(-15.8, -66.69, 20.7, 1.53)
pt3dadd(-15.88, -66.75, 20.7, 1.53)
pt3dadd(-16.05, -66.75, 20.7, 1.53)
pt3dadd(-16.14, -66.79, 20.7, 1.53)
pt3dadd(-16.22, -66.84, 20.7, 1.53)
pt3dadd(-16.69, -66.84, 20.7, 1.53)
pt3dadd(-16.77, -66.89, 20.7, 1.53)
pt3dadd(-16.9, -66.89, 20.7, 1.53)
pt3dadd(-16.73, -66.91, 15.7, 1.53)
pt3dadd(-18.51, -66.91, 15.7, 1.53)
pt3dadd(-18.51, -66.99, 15.7, 1.53)
pt3dadd(-18.68, -66.99, 15.7, 1.53)
pt3dadd(-18.73, -66.94, 15.7, 1.53)
pt3dadd(-18.85, -66.94, 15.7, 1.53)
pt3dadd(-18.9, -66.89, 15.7, 1.53)
pt3dadd(-19.02, -66.89, 15.7, 1.53)
pt3dadd(-19.07, -66.84, 15.7, 1.53)
pt3dadd(-21.02, -66.84, 15.7, 1.53)
pt3dadd(-21.1, -66.89, 15.7, 1.53)
pt3dadd(-21.19, -66.94, 15.7, 1.53)
pt3dadd(-21.27, -67.03, 15.7, 1.53)
pt3dadd(-21.36, -67.08, 15.7, 1.53)
pt3dadd(-21.4, -67.13, 15.7, 1.53)
pt3dadd(-21.49, -67.18, 15.7, 1.53)
pt3dadd(-21.57, -67.28, 15.7, 1.53)
pt3dadd(-21.66, -67.32, 15.7, 1.53)
pt3dadd(-21.74, -67.42, 15.7, 1.53)
pt3dadd(-21.78, -67.47, 15.7, 1.53)
pt3dadd(-21.87, -67.56, 15.7, 1.53)
pt3dadd(-21.95, -67.56, 15.7, 1.53)
pt3dadd(-22.03, -67.66, 15.7, 1.53)
pt3dadd(-22.16, -67.76, 15.7, 1.53)
pt3dadd(-22.25, -67.81, 15.7, 1.53)
pt3dadd(-22.33, -67.85, 15.7, 1.53)
pt3dadd(-22.5, -68.04, 15.7, 1.53)
pt3dadd(-22.59, -68.14, 15.7, 1.53)
pt3dadd(-22.67, -68.19, 15.7, 1.53)
pt3dadd(-22.8, -68.29, 15.7, 1.53)
pt3dadd(-22.89, -68.38, 15.7, 1.53)
pt3dadd(-22.97, -68.43, 15.7, 1.53)
pt3dadd(-23.01, -68.58, 15.7, 1.53)
pt3dadd(-23.1, -68.58, 15.7, 1.53)
pt3dadd(-23.14, -68.63, 15.7, 1.53)
}
}
proc shape3d_38() {
dend[33] { pt3dadd(-23.23, -68.72, 15.7, 1.53)
pt3dadd(-23.31, -68.82, 15.7, 1.53)
pt3dadd(-23.35, -68.86, 15.7, 1.53)
pt3dadd(-23.4, -68.96, 15.7, 1.53)
pt3dadd(-23.48, -69.01, 15.7, 1.53)
pt3dadd(-23.57, -69.11, 15.7, 1.53)
pt3dadd(-23.65, -69.2, 15.7, 1.53)
pt3dadd(-23.74, -69.3, 15.7, 1.53)
pt3dadd(-23.86, -69.44, 15.7, 1.53)
pt3dadd(-23.95, -69.54, 15.7, 1.53)
pt3dadd(-24.03, -69.64, 15.7, 1.53)
pt3dadd(-24.16, -69.78, 15.7, 1.53)
pt3dadd(-24.2, -69.88, 15.7, 1.53)
pt3dadd(-24.29, -69.93, 15.7, 1.53)
pt3dadd(-24.37, -70.07, 15.7, 1.53)
pt3dadd(-24.46, -70.21, 15.7, 1.53)
pt3dadd(-24.54, -70.31, 15.7, 1.53)
pt3dadd(-24.67, -70.41, 15.7, 1.53)
pt3dadd(-24.75, -70.55, 15.7, 1.53)
pt3dadd(-24.84, -70.65, 15.7, 1.53)
pt3dadd(-24.92, -70.75, 15.7, 1.53)
pt3dadd(-25.01, -70.84, 15.7, 1.53)
pt3dadd(-25.09, -70.99, 15.7, 1.53)
pt3dadd(-25.22, -71.13, 15.7, 1.53)
pt3dadd(-25.26, -71.23, 15.7, 1.53)
pt3dadd(-25.35, -71.32, 15.7, 1.53)
pt3dadd(-25.43, -71.42, 15.7, 1.53)
pt3dadd(-25.48, -71.52, 15.7, 1.53)
pt3dadd(-25.6, -71.66, 15.7, 1.53)
pt3dadd(-25.65, -71.81, 15.7, 1.53)
pt3dadd(-25.73, -71.9, 15.7, 1.53)
pt3dadd(-25.82, -72.05, 15.7, 1.53)
pt3dadd(-25.9, -72.14, 15.7, 1.53)
pt3dadd(-25.99, -72.24, 15.7, 1.53)
pt3dadd(-26.03, -72.34, 15.7, 1.53)
pt3dadd(-26.11, -72.43, 15.7, 1.53)
pt3dadd(-26.16, -72.53, 15.7, 1.53)
pt3dadd(-26.24, -72.63, 15.7, 1.53)
pt3dadd(-26.33, -72.77, 15.7, 1.53)
pt3dadd(-26.41, -72.96, 15.7, 1.53)
pt3dadd(-26.5, -73.16, 15.7, 1.53)
pt3dadd(-26.54, -73.3, 15.7, 1.53)
pt3dadd(-26.62, -73.45, 15.7, 1.53)
pt3dadd(-26.71, -73.59, 15.7, 1.53)
pt3dadd(-26.79, -73.69, 15.7, 1.53)
pt3dadd(-26.83, -73.74, 15.7, 1.53)
pt3dadd(-26.88, -73.79, 15.7, 1.53)
}
dend[34] {pt3dclear()
pt3dadd(14.41, -48.38, -4.4, 2.4)
pt3dadd(13.28, -54.19, -16.75, 2.4)
pt3dadd(9.61, -61.9, -16.75, 2.4)
pt3dadd(3.23, -71.51, -16.75, 2.4)
pt3dadd(-4.8, -85.87, -16.75, 2.4)
pt3dadd(-13.73, -97.14, -16.75, 2.4)
}
dend[35] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(62.38, 90.18, -57.75, 6.79)
pt3dadd(62.69, 90.24, -57.75, 6.79)
pt3dadd(62.11, 90.24, -57.75, 6.79)
pt3dadd(61.97, 90.18, -57.75, 6.79)
pt3dadd(61.88, 90.14, -57.75, 6.79)
pt3dadd(61.75, 90.08, -57.75, 6.79)
pt3dadd(61.66, 90.04, -57.75, 6.79)
pt3dadd(61.57, 89.98, -57.75, 6.79)
pt3dadd(61.35, 89.98, -57.75, 6.79)
pt3dadd(61.31, 89.93, -57.75, 6.79)
pt3dadd(61.22, 89.88, -57.75, 6.79)
pt3dadd(61.04, 89.88, -57.75, 6.79)
pt3dadd(60.99, 89.83, -57.75, 6.79)
pt3dadd(60.9, 89.83, -57.75, 6.79)
pt3dadd(60.81, 89.78, -57.75, 6.79)
pt3dadd(60.72, 89.73, -57.75, 6.79)
pt3dadd(60.63, 89.73, -57.75, 6.79)
pt3dadd(60.55, 89.68, -57.75, 6.79)
pt3dadd(60.46, 89.58, -57.75, 6.79)
pt3dadd(60.37, 89.53, -57.75, 6.79)
pt3dadd(60.24, 89.48, -57.75, 6.79)
pt3dadd(60.1, 89.38, -57.75, 6.79)
pt3dadd(60.06, 89.32, -57.75, 6.79)
pt3dadd(59.92, 89.28, -57.75, 6.79)
pt3dadd(59.83, 89.22, -57.75, 6.79)
pt3dadd(59.79, 89.17, -57.75, 6.79)
pt3dadd(59.7, 89.12, -57.75, 6.79)
pt3dadd(59.52, 89.12, -57.75, 6.79)
pt3dadd(59.48, 89.07, -57.75, 6.79)
pt3dadd(59.39, 89.07, -57.75, 6.79)
pt3dadd(59.34, 89.02, -57.75, 6.79)
pt3dadd(59.3, 88.97, -57.75, 6.79)
pt3dadd(59.17, 88.97, -57.75, 6.79)
pt3dadd(59.12, 88.92, -57.75, 6.79)
pt3dadd(58.94, 88.92, -57.75, 6.79)
pt3dadd(58.9, 88.87, -57.75, 6.79)
pt3dadd(58.85, 88.82, -57.75, 6.79)
pt3dadd(58.76, 88.77, -57.75, 6.79)
pt3dadd(58.67, 88.72, -57.75, 6.79)
pt3dadd(58.63, 88.67, -57.75, 6.79)
pt3dadd(58.54, 88.67, -57.75, 6.79)
pt3dadd(58.49, 88.62, -57.75, 6.79)
pt3dadd(58.45, 88.57, -57.75, 6.79)
pt3dadd(58.32, 88.42, -57.75, 6.79)
pt3dadd(58.27, 88.36, -57.75, 6.79)
pt3dadd(58.23, 88.31, -57.75, 6.79)
pt3dadd(58.19, 88.26, -57.75, 6.79)
pt3dadd(58.14, 88.16, -57.75, 6.79)
pt3dadd(58.05, 88.06, -57.75, 6.79)
pt3dadd(58.01, 88.01, -57.75, 6.79)
pt3dadd(57.42, 88.16, -57.75, 6.79)
}
dend[36] {pt3dclear()
pt3dadd(57.42, 88.16, -57.75, 6.79)
pt3dadd(57.83, 87.81, -57.75, 6.79)
pt3dadd(57.78, 87.75, -57.75, 6.79)
pt3dadd(57.74, 87.65, -57.75, 6.79)
pt3dadd(57.65, 87.65, -57.75, 6.79)
pt3dadd(57.6, 87.6, -57.75, 6.79)
pt3dadd(57.56, 87.5, -57.75, 6.79)
pt3dadd(57.47, 87.45, -57.75, 6.79)
pt3dadd(57.42, 87.4, -57.75, 6.79)
pt3dadd(57.38, 87.35, -57.75, 6.79)
pt3dadd(57.34, 87.3, -57.75, 6.79)
pt3dadd(57.29, 87.25, -57.75, 6.79)
pt3dadd(57.2, 87.25, -57.75, 6.79)
pt3dadd(57.16, 87.2, -57.75, 6.79)
pt3dadd(57.07, 87.15, -57.75, 6.79)
pt3dadd(57.03, 87.1, -57.75, 6.79)
pt3dadd(56.94, 87.05, -57.75, 6.79)
pt3dadd(56.89, 87, -57.75, 6.79)
pt3dadd(56.85, 86.94, -57.75, 6.79)
pt3dadd(56.76, 86.89, -57.75, 6.79)
pt3dadd(56.71, 86.85, -57.75, 6.79)
pt3dadd(56.67, 86.79, -57.75, 6.79)
pt3dadd(56.58, 86.74, -57.75, 6.79)
pt3dadd(56.53, 86.69, -57.75, 6.79)
pt3dadd(56.44, 86.64, -57.75, 6.79)
pt3dadd(56.4, 86.59, -57.75, 6.79)
pt3dadd(56.31, 86.54, -57.75, 6.79)
pt3dadd(56.22, 86.49, -57.75, 6.79)
pt3dadd(56.18, 86.44, -57.75, 6.79)
pt3dadd(56.13, 86.39, -57.75, 6.79)
pt3dadd(56.09, 86.34, -57.75, 6.79)
pt3dadd(56.04, 86.29, -57.75, 6.79)
pt3dadd(56, 86.24, -57.75, 6.79)
pt3dadd(55.96, 86.18, -57.75, 6.79)
pt3dadd(55.91, 86.14, -57.75, 6.79)
pt3dadd(55.87, 86.08, -57.75, 6.79)
pt3dadd(55.82, 86.04, -57.75, 6.79)
pt3dadd(55.78, 85.93, -57.75, 6.79)
pt3dadd(55.73, 85.88, -57.75, 6.79)
pt3dadd(55.69, 85.83, -57.75, 6.79)
pt3dadd(55.64, 85.73, -57.75, 6.79)
pt3dadd(55.64, 85.63, -57.75, 6.79)
pt3dadd(55.6, 85.58, -57.75, 6.79)
pt3dadd(55.55, 85.48, -57.75, 6.79)
pt3dadd(55.51, 85.38, -57.75, 6.79)
pt3dadd(55.51, 85.28, -57.75, 6.79)
pt3dadd(55.47, 85.17, -57.75, 6.79)
pt3dadd(55.42, 85.12, -57.75, 6.79)
pt3dadd(55.38, 84.97, -57.75, 6.79)
pt3dadd(55.33, 84.92, -57.75, 6.79)
pt3dadd(55.28, 84.82, -57.75, 6.79)
pt3dadd(55.24, 84.77, -57.75, 6.79)
pt3dadd(55.2, 84.67, -57.75, 6.79)
pt3dadd(55.15, 84.57, -57.75, 6.79)
pt3dadd(55.15, 84.46, -57.75, 6.79)
pt3dadd(55.06, 84.41, -57.75, 6.79)
pt3dadd(55.02, 84.31, -57.75, 6.79)
pt3dadd(54.93, 84.21, -57.75, 6.79)
pt3dadd(54.88, 84.11, -57.75, 6.79)
pt3dadd(54.84, 84.01, -57.75, 6.79)
pt3dadd(54.79, 83.91, -57.75, 6.79)
pt3dadd(54.75, 83.86, -57.75, 6.79)
pt3dadd(54.71, 83.81, -57.75, 6.79)
pt3dadd(54.62, 83.71, -57.75, 6.79)
pt3dadd(54.62, 83.6, -57.75, 6.79)
pt3dadd(54.53, 83.55, -57.75, 6.79)
pt3dadd(54.44, 83.4, -57.75, 6.79)
pt3dadd(54.4, 83.3, -57.75, 6.79)
pt3dadd(54.35, 83.25, -57.75, 6.79)
pt3dadd(54.31, 83.2, -57.75, 6.79)
pt3dadd(54.26, 83.1, -57.75, 6.79)
pt3dadd(54.22, 83, -57.75, 6.79)
pt3dadd(54.17, 82.94, -57.75, 6.79)
pt3dadd(54.13, 82.85, -57.75, 6.79)
pt3dadd(54.08, 82.74, -57.75, 6.79)
pt3dadd(54.04, 82.69, -57.75, 6.79)
pt3dadd(53.99, 82.59, -57.75, 6.79)
pt3dadd(53.95, 82.49, -57.75, 6.79)
pt3dadd(53.86, 82.39, -57.75, 6.79)
pt3dadd(53.81, 82.34, -57.75, 6.79)
pt3dadd(53.77, 82.29, -57.75, 6.79)
pt3dadd(53.72, 82.18, -57.75, 6.79)
pt3dadd(53.68, 82.08, -57.75, 6.79)
pt3dadd(53.64, 82.03, -57.75, 6.79)
pt3dadd(53.55, 81.93, -57.75, 6.79)
pt3dadd(53.5, 81.83, -57.75, 6.79)
pt3dadd(53.46, 81.73, -57.75, 6.79)
pt3dadd(53.41, 81.63, -57.75, 6.79)
pt3dadd(53.37, 81.58, -57.75, 6.79)
pt3dadd(53.28, 81.43, -57.75, 6.79)
pt3dadd(53.24, 81.32, -57.75, 6.79)
pt3dadd(53.15, 81.22, -57.75, 6.79)
pt3dadd(53.1, 81.17, -57.75, 6.79)
pt3dadd(53.06, 81.07, -57.75, 6.79)
pt3dadd(53.01, 80.97, -57.75, 6.79)
}
}
proc shape3d_39() {
dend[36] { pt3dadd(52.97, 80.92, -57.75, 6.79)
pt3dadd(52.88, 80.82, -57.75, 6.79)
pt3dadd(52.88, 80.72, -57.75, 6.79)
pt3dadd(52.83, 80.67, -57.75, 6.79)
pt3dadd(52.79, 80.57, -57.75, 6.79)
pt3dadd(52.74, 80.51, -57.75, 6.79)
pt3dadd(52.7, 80.41, -57.75, 6.79)
pt3dadd(52.65, 80.36, -57.75, 6.79)
pt3dadd(52.61, 80.31, -57.75, 6.79)
pt3dadd(52.57, 80.21, -57.75, 6.79)
pt3dadd(52.52, 80.16, -57.75, 6.79)
pt3dadd(52.48, 80.11, -57.75, 6.79)
pt3dadd(52.39, 80.01, -57.75, 6.79)
pt3dadd(52.35, 79.91, -57.75, 6.79)
pt3dadd(52.3, 79.86, -57.75, 6.79)
pt3dadd(52.26, 79.81, -57.75, 6.79)
pt3dadd(52.26, 79.91, -57.75, 6.79)
pt3dadd(52.17, 79.86, -58.8, 5.94)
pt3dadd(52.17, 79.75, -58.8, 5.94)
pt3dadd(52.12, 79.65, -58.8, 5.94)
pt3dadd(52.08, 79.55, -58.8, 5.94)
pt3dadd(52.03, 79.5, -58.8, 5.94)
pt3dadd(51.99, 79.4, -58.8, 5.94)
pt3dadd(51.99, 79.25, -58.8, 5.94)
pt3dadd(51.94, 79.2, -58.8, 5.94)
pt3dadd(51.94, 79.1, -58.8, 5.94)
pt3dadd(51.9, 79.04, -58.8, 5.94)
pt3dadd(51.85, 78.94, -58.8, 5.94)
pt3dadd(51.85, 78.84, -58.8, 5.94)
pt3dadd(51.81, 78.79, -58.8, 5.94)
pt3dadd(51.76, 78.69, -58.8, 5.94)
pt3dadd(51.72, 78.59, -58.8, 5.94)
pt3dadd(51.72, 78.49, -58.8, 5.94)
pt3dadd(51.67, 78.39, -58.8, 5.94)
pt3dadd(51.63, 78.29, -58.8, 5.94)
pt3dadd(51.54, 78.14, -58.8, 5.94)
pt3dadd(51.5, 78.03, -58.8, 5.94)
pt3dadd(51.45, 77.98, -58.8, 5.94)
pt3dadd(51.41, 77.88, -58.8, 5.94)
pt3dadd(51.36, 77.83, -58.8, 5.94)
pt3dadd(51.32, 77.73, -58.8, 5.94)
pt3dadd(51.28, 77.63, -58.8, 5.94)
pt3dadd(51.23, 77.58, -58.8, 5.94)
pt3dadd(51.19, 77.53, -58.8, 5.94)
pt3dadd(51.14, 77.48, -58.8, 5.94)
pt3dadd(51.1, 77.43, -58.8, 5.94)
pt3dadd(51.05, 77.38, -58.8, 5.94)
pt3dadd(51.01, 77.32, -58.8, 5.94)
pt3dadd(50.96, 77.22, -58.8, 5.94)
pt3dadd(50.92, 77.17, -58.8, 5.94)
pt3dadd(50.87, 77.07, -58.8, 5.94)
pt3dadd(50.83, 77.02, -58.8, 5.94)
pt3dadd(50.78, 76.97, -58.8, 5.94)
pt3dadd(50.78, 76.87, -58.8, 5.94)
pt3dadd(50.69, 76.82, -58.8, 5.94)
pt3dadd(50.65, 76.77, -58.8, 5.94)
pt3dadd(50.6, 76.72, -58.8, 5.94)
pt3dadd(50.56, 76.67, -58.8, 5.94)
pt3dadd(50.51, 76.61, -58.8, 5.94)
pt3dadd(50.47, 76.57, -58.8, 5.94)
pt3dadd(50.43, 76.51, -58.8, 5.94)
pt3dadd(50.38, 76.41, -58.8, 5.94)
pt3dadd(50.34, 76.36, -58.8, 5.94)
pt3dadd(50.25, 76.31, -58.8, 5.94)
pt3dadd(50.21, 76.21, -58.8, 5.94)
pt3dadd(50.16, 76.16, -58.8, 5.94)
pt3dadd(50.12, 76.11, -58.8, 5.94)
pt3dadd(50.27, 75.71, -58.8, 5.94)
}
dend[37] {pt3dclear()
pt3dadd(50.27, 75.71, -58.8, 1.36)
pt3dadd(46.03, 73.59, -51.45, 1.36)
pt3dadd(37.92, 71.71, -51.45, 4.42)
pt3dadd(38.89, 71.38, -51.45, 4.42)
pt3dadd(38.08, 71.77, -51.45, 4.42)
pt3dadd(37.99, 71.43, -51.45, 4.42)
pt3dadd(37.94, 71.1, -51.45, 4.42)
pt3dadd(37.76, 71.1, -51.45, 4.42)
pt3dadd(37.67, 71.15, -51.45, 4.42)
pt3dadd(37.59, 71.2, -51.45, 4.42)
pt3dadd(37.16, 72.36, -51.45, 4.42)
pt3dadd(37.41, 71.25, -51.45, 4.42)
pt3dadd(37.32, 71.3, -51.45, 4.42)
pt3dadd(37.28, 71.35, -51.45, 4.42)
pt3dadd(37.23, 71.4, -51.45, 4.42)
pt3dadd(37.19, 71.45, -51.45, 4.42)
pt3dadd(37.14, 71.5, -51.45, 4.42)
pt3dadd(37.1, 71.6, -51.45, 4.42)
pt3dadd(37.01, 71.65, -51.45, 4.42)
pt3dadd(36.96, 71.71, -51.45, 4.42)
pt3dadd(36.92, 71.81, -51.45, 4.42)
pt3dadd(36.87, 71.86, -51.45, 4.42)
pt3dadd(36.78, 71.91, -51.45, 4.42)
pt3dadd(36.74, 71.96, -51.45, 4.42)
pt3dadd(36.65, 72.06, -51.45, 4.42)
pt3dadd(36.61, 72.11, -51.45, 4.42)
pt3dadd(36.47, 72.26, -51.45, 4.42)
pt3dadd(36.43, 72.31, -51.45, 4.42)
pt3dadd(36.38, 72.36, -51.45, 4.42)
pt3dadd(36.29, 72.41, -51.45, 4.42)
pt3dadd(36.03, 72.72, -51.45, 4.42)
pt3dadd(35.98, 72.77, -51.45, 4.42)
pt3dadd(35.89, 72.87, -51.45, 4.42)
pt3dadd(35.85, 72.92, -51.45, 4.42)
pt3dadd(35.76, 72.97, -51.45, 4.42)
pt3dadd(35.67, 73.02, -51.45, 4.42)
pt3dadd(35.63, 73.07, -51.45, 4.42)
pt3dadd(35.58, 73.12, -51.45, 4.42)
pt3dadd(35.49, 73.17, -51.45, 4.42)
pt3dadd(35.4, 73.22, -51.45, 4.42)
pt3dadd(35.27, 73.27, -51.45, 4.42)
pt3dadd(35.13, 73.32, -51.45, 4.42)
pt3dadd(35.04, 73.38, -51.45, 4.42)
pt3dadd(34.96, 73.38, -51.45, 4.42)
pt3dadd(34.91, 73.43, -51.45, 4.42)
pt3dadd(34.82, 73.47, -51.45, 4.42)
pt3dadd(34.74, 73.53, -51.45, 4.42)
pt3dadd(34.65, 73.53, -51.45, 4.42)
pt3dadd(34.56, 73.58, -51.45, 4.42)
pt3dadd(34.47, 73.58, -51.45, 4.42)
pt3dadd(34.42, 73.63, -51.45, 4.42)
pt3dadd(34.29, 73.63, -51.45, 4.42)
pt3dadd(34.2, 73.83, -56.7, 4.42)
pt3dadd(34.11, 73.88, -56.7, 4.42)
pt3dadd(34.06, 73.93, -56.7, 4.42)
pt3dadd(33.93, 74.08, -56.7, 4.42)
pt3dadd(33.89, 74.18, -56.7, 4.42)
pt3dadd(33.8, 74.29, -56.7, 4.42)
pt3dadd(33.75, 74.34, -56.7, 4.42)
pt3dadd(33.67, 74.44, -56.7, 4.42)
pt3dadd(33.62, 74.54, -56.7, 4.42)
pt3dadd(33.49, 74.64, -56.7, 4.42)
pt3dadd(33.44, 74.69, -56.7, 4.42)
pt3dadd(33.4, 74.79, -56.7, 4.42)
pt3dadd(33.31, 74.84, -56.7, 4.42)
pt3dadd(33.22, 74.94, -56.7, 4.42)
pt3dadd(33.17, 75, -56.7, 4.42)
pt3dadd(33.04, 75.1, -56.7, 4.42)
pt3dadd(32.99, 75.2, -56.7, 4.42)
pt3dadd(32.95, 75.25, -56.7, 4.42)
pt3dadd(32.86, 75.3, -56.7, 4.42)
pt3dadd(32.77, 75.35, -56.7, 4.42)
pt3dadd(32.73, 75.4, -56.7, 4.42)
pt3dadd(32.64, 75.45, -56.7, 4.42)
pt3dadd(32.6, 75.5, -56.7, 4.42)
pt3dadd(32.46, 75.55, -56.7, 4.42)
pt3dadd(32.37, 75.6, -56.7, 4.42)
pt3dadd(32.24, 75.71, -56.7, 4.42)
pt3dadd(32.15, 75.75, -56.7, 4.42)
pt3dadd(32.06, 75.81, -56.7, 4.42)
pt3dadd(31.97, 75.86, -56.7, 4.42)
pt3dadd(31.83, 75.91, -56.7, 4.42)
pt3dadd(31.7, 75.96, -56.7, 4.42)
pt3dadd(31.61, 76.01, -56.7, 4.42)
pt3dadd(31.57, 76.06, -56.7, 4.42)
pt3dadd(31.48, 76.06, -56.7, 4.42)
pt3dadd(31.39, 76.11, -56.7, 4.42)
pt3dadd(31.3, 76.16, -56.7, 4.42)
pt3dadd(31.21, 76.21, -56.7, 4.42)
pt3dadd(31.12, 76.26, -56.7, 4.42)
pt3dadd(31.08, 76.31, -56.7, 4.42)
pt3dadd(31.03, 76.36, -56.7, 4.42)
pt3dadd(30.94, 76.36, -56.7, 4.42)
pt3dadd(30.9, 76.41, -56.7, 4.42)
pt3dadd(30.81, 76.46, -56.7, 4.42)
pt3dadd(30.76, 76.51, -56.7, 4.42)
pt3dadd(30.72, 76.61, -56.7, 4.42)
pt3dadd(30.63, 76.67, -56.7, 4.42)
pt3dadd(30.59, 76.72, -56.7, 4.42)
pt3dadd(30.5, 76.77, -56.7, 4.42)
pt3dadd(30.45, 76.82, -56.7, 4.42)
pt3dadd(30.41, 76.92, -56.7, 4.42)
pt3dadd(30.32, 76.97, -56.7, 4.42)
pt3dadd(30.27, 77.07, -56.7, 4.42)
pt3dadd(30.19, 77.12, -56.7, 4.42)
pt3dadd(30.14, 77.22, -56.7, 4.42)
pt3dadd(30.1, 77.28, -56.7, 4.42)
pt3dadd(30.05, 77.38, -56.7, 4.42)
pt3dadd(30.01, 77.53, -56.7, 4.42)
pt3dadd(29.96, 77.58, -56.7, 4.42)
pt3dadd(29.92, 77.63, -56.7, 4.42)
pt3dadd(29.88, 77.73, -56.7, 4.42)
pt3dadd(29.83, 77.83, -56.7, 4.42)
pt3dadd(29.74, 77.88, -56.7, 4.42)
pt3dadd(29.74, 77.98, -56.7, 4.42)
pt3dadd(29.65, 78.14, -56.7, 4.42)
pt3dadd(29.65, 78.34, -56.7, 4.42)
pt3dadd(29.61, 78.49, -56.7, 4.42)
pt3dadd(29.52, 78.64, -56.7, 4.42)
pt3dadd(29.52, 78.74, -56.7, 4.42)
pt3dadd(29.47, 78.79, -56.7, 4.42)
pt3dadd(29.43, 78.89, -56.7, 4.42)
pt3dadd(29.39, 79, -56.7, 4.42)
pt3dadd(29.34, 79.1, -56.7, 4.42)
pt3dadd(29.3, 79.2, -56.7, 4.42)
pt3dadd(29.25, 79.3, -56.7, 4.42)
pt3dadd(29.2, 79.4, -56.7, 4.42)
pt3dadd(29.12, 79.5, -56.7, 4.42)
pt3dadd(29.07, 79.65, -56.7, 4.42)
pt3dadd(28.94, 79.81, -56.7, 4.42)
pt3dadd(28.89, 79.91, -56.7, 4.42)
pt3dadd(28.81, 80.06, -56.7, 4.42)
}
}
proc shape3d_40() {
dend[37] { pt3dadd(28.72, 80.16, -56.7, 4.42)
pt3dadd(28.67, 80.26, -56.7, 4.42)
pt3dadd(28.58, 80.36, -56.7, 4.42)
pt3dadd(28.54, 80.46, -56.7, 4.42)
pt3dadd(28.49, 80.51, -56.7, 4.42)
pt3dadd(28.45, 80.57, -56.7, 4.42)
pt3dadd(28.45, 80.61, -56.7, 4.42)
pt3dadd(28.58, 80.67, -57.75, 4.42)
pt3dadd(28.54, 80.72, -57.75, 4.42)
pt3dadd(28.45, 80.87, -57.75, 4.42)
pt3dadd(28.4, 80.97, -57.75, 4.42)
pt3dadd(28.36, 81.02, -57.75, 4.42)
pt3dadd(28.32, 81.12, -57.75, 4.42)
pt3dadd(28.18, 81.28, -57.75, 4.42)
pt3dadd(28.14, 81.32, -57.75, 4.42)
pt3dadd(28.05, 81.38, -57.75, 4.42)
pt3dadd(28, 81.48, -57.75, 4.42)
pt3dadd(27.96, 81.53, -57.75, 4.42)
pt3dadd(27.87, 81.58, -57.75, 4.42)
pt3dadd(27.82, 81.63, -57.75, 4.42)
pt3dadd(27.78, 81.68, -57.75, 4.42)
pt3dadd(27.56, 81.93, -57.75, 4.42)
pt3dadd(27.51, 81.98, -57.75, 4.42)
pt3dadd(27.42, 82.03, -57.75, 4.42)
pt3dadd(27.38, 82.14, -57.75, 4.42)
pt3dadd(27.33, 82.24, -57.75, 4.42)
pt3dadd(27.25, 82.34, -57.75, 4.42)
pt3dadd(26.93, 82.69, -57.75, 4.42)
pt3dadd(26.84, 82.85, -57.75, 4.42)
pt3dadd(26.75, 82.89, -57.75, 4.42)
pt3dadd(26.71, 83, -57.75, 4.42)
pt3dadd(26.67, 83.05, -57.75, 4.42)
pt3dadd(26.62, 83.1, -57.75, 4.42)
pt3dadd(26.53, 83.15, -57.75, 4.42)
pt3dadd(26.49, 83.2, -57.75, 4.42)
pt3dadd(26.44, 83.25, -57.75, 4.42)
pt3dadd(26.4, 83.35, -57.75, 4.42)
pt3dadd(26.31, 83.4, -57.75, 4.42)
pt3dadd(26.26, 83.45, -57.75, 4.42)
pt3dadd(26.22, 83.5, -57.75, 4.42)
pt3dadd(26.17, 83.55, -57.75, 4.42)
pt3dadd(26.13, 83.65, -57.75, 4.42)
pt3dadd(26.04, 83.71, -57.75, 4.42)
pt3dadd(25.95, 83.75, -57.75, 4.42)
pt3dadd(25.91, 83.86, -57.75, 4.42)
pt3dadd(25.86, 83.91, -57.75, 4.42)
pt3dadd(25.77, 83.91, -57.75, 4.42)
pt3dadd(25.73, 84.01, -57.75, 4.42)
pt3dadd(25.68, 84.01, -57.75, 4.42)
pt3dadd(25.91, 83.86, -65.1, 4.42)
pt3dadd(25.82, 83.86, -65.1, 4.42)
pt3dadd(25.77, 83.96, -65.1, 4.42)
pt3dadd(25.68, 84.01, -65.1, 4.42)
pt3dadd(25.64, 84.06, -65.1, 4.42)
pt3dadd(25.55, 84.11, -65.1, 4.42)
pt3dadd(25.42, 84.16, -65.1, 4.42)
pt3dadd(25.33, 84.21, -65.1, 4.42)
pt3dadd(25.33, 84.31, -65.1, 4.42)
pt3dadd(25.24, 84.31, -65.1, 4.42)
pt3dadd(25.19, 84.36, -65.1, 4.42)
pt3dadd(25.15, 84.46, -65.1, 4.42)
pt3dadd(25.06, 84.46, -65.1, 4.42)
pt3dadd(25.01, 84.51, -65.1, 4.42)
pt3dadd(24.88, 84.67, -65.1, 4.42)
pt3dadd(24.84, 84.72, -65.1, 4.42)
pt3dadd(24.75, 84.82, -65.1, 4.42)
pt3dadd(24.7, 84.87, -65.1, 4.42)
pt3dadd(24.66, 84.92, -65.1, 4.42)
pt3dadd(24.61, 84.97, -65.1, 4.42)
pt3dadd(24.52, 84.97, -65.1, 4.42)
pt3dadd(24.48, 85.02, -65.1, 4.42)
pt3dadd(24.43, 85.07, -65.1, 4.42)
pt3dadd(24.39, 85.12, -65.1, 4.42)
pt3dadd(24.3, 85.17, -65.1, 4.42)
pt3dadd(24.26, 85.22, -65.1, 4.42)
pt3dadd(24.17, 85.28, -65.1, 4.42)
pt3dadd(24.12, 85.32, -65.1, 4.42)
pt3dadd(24.03, 85.32, -65.1, 4.42)
pt3dadd(23.99, 85.38, -65.1, 4.42)
pt3dadd(23.9, 85.43, -65.1, 4.42)
pt3dadd(23.77, 85.43, -65.1, 4.42)
pt3dadd(23.68, 85.48, -65.1, 4.42)
pt3dadd(23.14, 85.48, -65.1, 4.42)
pt3dadd(23.1, 85.43, -65.1, 4.42)
pt3dadd(22.78, 85.43, -65.1, 4.42)
pt3dadd(22.74, 85.38, -65.1, 4.42)
pt3dadd(22.65, 85.32, -65.1, 4.42)
pt3dadd(22.61, 85.28, -65.1, 4.42)
pt3dadd(22.52, 85.17, -65.1, 4.42)
pt3dadd(22.39, 85.17, -65.1, 4.42)
pt3dadd(22.25, 85.02, -65.1, 4.42)
pt3dadd(22.12, 84.97, -65.1, 4.42)
pt3dadd(22.03, 84.92, -65.1, 4.42)
pt3dadd(21.98, 84.87, -65.1, 4.42)
pt3dadd(21.85, 84.82, -65.1, 4.42)
pt3dadd(21.72, 84.82, -65.1, 4.42)
pt3dadd(21.63, 84.77, -65.1, 4.42)
pt3dadd(21.4, 84.77, -65.1, 4.42)
pt3dadd(21.32, 84.72, -65.1, 4.42)
pt3dadd(20.91, 84.72, -65.1, 4.42)
pt3dadd(20.87, 84.77, -65.1, 4.42)
pt3dadd(20.78, 84.87, -65.1, 4.42)
pt3dadd(20.74, 84.92, -65.1, 4.42)
pt3dadd(20.69, 84.97, -65.1, 4.42)
pt3dadd(20.65, 85.02, -65.1, 4.42)
pt3dadd(20.56, 85.07, -65.1, 4.42)
pt3dadd(20.51, 85.17, -65.1, 4.42)
pt3dadd(20.47, 85.22, -65.1, 4.42)
pt3dadd(20.42, 85.32, -65.1, 4.42)
pt3dadd(20.33, 85.38, -65.1, 4.42)
pt3dadd(20.2, 85.48, -65.1, 4.42)
pt3dadd(20.11, 85.58, -65.1, 4.42)
pt3dadd(20.02, 85.63, -65.1, 4.42)
pt3dadd(19.98, 85.68, -65.1, 4.42)
pt3dadd(19.89, 85.78, -65.1, 4.42)
pt3dadd(19.84, 85.88, -65.1, 4.42)
pt3dadd(19.8, 85.93, -65.1, 4.42)
pt3dadd(19.75, 85.98, -65.1, 4.42)
pt3dadd(19.67, 86.04, -65.1, 4.42)
pt3dadd(19.62, 86.08, -65.1, 4.42)
pt3dadd(19.62, 86.18, -65.1, 4.42)
pt3dadd(19.58, 86.24, -65.1, 4.42)
pt3dadd(19.53, 86.29, -65.1, 4.42)
pt3dadd(19.53, 86.39, -65.1, 4.42)
pt3dadd(19.49, 86.44, -65.1, 4.42)
pt3dadd(19.44, 86.49, -65.1, 4.42)
pt3dadd(19.4, 86.54, -65.1, 4.42)
pt3dadd(19.35, 86.59, -65.1, 4.42)
pt3dadd(19.31, 86.64, -65.1, 4.42)
pt3dadd(19.31, 86.74, -65.1, 4.42)
pt3dadd(19.26, 86.79, -65.1, 4.42)
pt3dadd(19.22, 86.85, -65.1, 4.42)
pt3dadd(19.22, 86.94, -65.1, 4.42)
pt3dadd(19.17, 87, -65.1, 4.42)
}
dend[38] {pt3dclear()
pt3dadd(50.27, 75.71, -58.8, 5.94)
pt3dadd(50.07, 76.06, -58.8, 5.94)
pt3dadd(49.98, 76.01, -58.8, 5.94)
pt3dadd(49.85, 75.86, -58.8, 5.94)
pt3dadd(49.8, 75.75, -58.8, 5.94)
pt3dadd(49.71, 75.65, -58.8, 5.94)
pt3dadd(49.67, 75.55, -58.8, 5.94)
pt3dadd(49.63, 75.45, -58.8, 5.94)
pt3dadd(49.58, 75.35, -58.8, 5.94)
pt3dadd(49.53, 75.25, -58.8, 5.94)
pt3dadd(49.49, 75.2, -58.8, 5.94)
pt3dadd(49.44, 75.15, -58.8, 5.94)
pt3dadd(49.4, 75.1, -58.8, 5.94)
pt3dadd(49.31, 75, -58.8, 5.94)
pt3dadd(49.27, 74.94, -58.8, 5.94)
pt3dadd(49.22, 74.89, -58.8, 5.94)
pt3dadd(49.18, 74.84, -58.8, 5.94)
pt3dadd(49.09, 74.79, -58.8, 5.94)
pt3dadd(49.04, 74.74, -58.8, 5.94)
pt3dadd(48.96, 74.64, -58.8, 5.94)
pt3dadd(48.87, 74.59, -58.8, 5.94)
pt3dadd(48.82, 74.54, -58.8, 5.94)
pt3dadd(48.78, 74.49, -58.8, 5.94)
pt3dadd(48.69, 74.44, -58.8, 5.94)
pt3dadd(48.64, 74.39, -58.8, 5.94)
pt3dadd(48.6, 74.34, -58.8, 5.94)
pt3dadd(48.56, 74.24, -58.8, 5.94)
pt3dadd(48.47, 74.14, -58.8, 5.94)
pt3dadd(48.42, 74.08, -58.8, 5.94)
pt3dadd(48.38, 74.03, -58.8, 5.94)
pt3dadd(48.33, 73.93, -58.8, 5.94)
pt3dadd(48.29, 73.88, -58.8, 5.94)
pt3dadd(48.24, 73.78, -58.8, 5.94)
pt3dadd(48.2, 73.73, -58.8, 5.94)
pt3dadd(48.11, 73.68, -58.8, 5.94)
pt3dadd(48.02, 73.58, -58.8, 5.94)
pt3dadd(47.97, 73.53, -58.8, 5.94)
pt3dadd(47.8, 73.32, -58.8, 5.94)
pt3dadd(47.71, 73.27, -58.8, 5.94)
pt3dadd(47.66, 73.17, -58.8, 5.94)
pt3dadd(47.57, 73.12, -58.8, 5.94)
pt3dadd(47.53, 73.07, -58.8, 5.94)
pt3dadd(47.4, 72.92, -58.8, 5.94)
pt3dadd(47.35, 72.82, -58.8, 5.94)
pt3dadd(47.26, 72.77, -58.8, 5.94)
pt3dadd(47.08, 72.77, -58.8, 5.94)
}
dend[39] {pt3dclear()
pt3dadd(47.08, 72.77, -58.8, 5.94)
pt3dadd(47.22, 72.67, -58.8, 5.94)
pt3dadd(47.04, 72.06, -63, 4.59)
pt3dadd(46.99, 72.01, -63, 4.59)
pt3dadd(46.9, 71.96, -63, 4.59)
pt3dadd(46.86, 71.86, -63, 4.59)
pt3dadd(46.81, 71.81, -63, 4.59)
pt3dadd(46.77, 71.75, -63, 4.59)
pt3dadd(46.73, 71.71, -63, 4.59)
pt3dadd(46.68, 71.65, -63, 4.59)
pt3dadd(46.64, 71.6, -63, 4.59)
pt3dadd(46.59, 71.55, -63, 4.59)
pt3dadd(46.5, 71.5, -63, 4.59)
pt3dadd(46.46, 71.4, -63, 4.59)
pt3dadd(46.42, 71.3, -63, 4.59)
pt3dadd(46.37, 71.25, -63, 4.59)
pt3dadd(46.33, 71.2, -63, 4.59)
pt3dadd(46.28, 71.1, -63, 4.59)
pt3dadd(46.24, 71.04, -63, 4.59)
pt3dadd(46.19, 71, -63, 4.59)
}
}
proc shape3d_41() {
dend[39] { pt3dadd(46.15, 70.89, -63, 4.59)
pt3dadd(46.06, 70.84, -63, 4.59)
pt3dadd(46.01, 70.79, -63, 4.59)
pt3dadd(45.97, 70.69, -63, 4.59)
pt3dadd(45.92, 70.59, -63, 4.59)
pt3dadd(45.88, 70.49, -63, 4.59)
pt3dadd(45.83, 70.39, -63, 4.59)
pt3dadd(45.79, 70.34, -63, 4.59)
pt3dadd(45.74, 70.29, -63, 4.59)
pt3dadd(45.7, 70.24, -63, 4.59)
pt3dadd(45.66, 70.14, -63, 4.59)
pt3dadd(45.61, 70.03, -63, 4.59)
pt3dadd(45.57, 69.98, -63, 4.59)
pt3dadd(45.52, 69.93, -63, 4.59)
pt3dadd(45.48, 69.88, -63, 4.59)
pt3dadd(45.48, 69.78, -63, 4.59)
pt3dadd(45.43, 69.73, -63, 4.59)
pt3dadd(45.39, 69.68, -63, 4.59)
pt3dadd(45.35, 69.63, -63, 4.59)
pt3dadd(45.3, 69.53, -63, 4.59)
pt3dadd(45.3, 69.43, -63, 4.59)
pt3dadd(45.26, 69.38, -63, 4.59)
pt3dadd(45.21, 69.27, -63, 4.59)
pt3dadd(45.17, 69.22, -63, 4.59)
pt3dadd(45.17, 69.12, -63, 4.59)
pt3dadd(45.12, 69.07, -63, 4.59)
pt3dadd(45.08, 68.97, -63, 4.59)
pt3dadd(45.03, 68.87, -63, 4.59)
pt3dadd(45.03, 68.77, -63, 4.59)
pt3dadd(44.99, 68.67, -63, 4.59)
pt3dadd(44.94, 68.57, -63, 4.59)
pt3dadd(44.9, 68.51, -63, 4.59)
pt3dadd(44.85, 68.41, -63, 4.59)
pt3dadd(44.85, 68.31, -63, 4.59)
pt3dadd(44.81, 68.26, -63, 4.59)
pt3dadd(44.76, 68.16, -63, 4.59)
pt3dadd(44.72, 68.11, -63, 4.59)
pt3dadd(44.67, 68.01, -63, 4.59)
pt3dadd(44.63, 67.96, -63, 4.59)
pt3dadd(44.63, 67.86, -63, 4.59)
pt3dadd(44.59, 67.81, -63, 4.59)
pt3dadd(44.54, 67.7, -63, 4.59)
pt3dadd(44.45, 67.6, -63, 4.59)
pt3dadd(44.45, 67.5, -63, 4.59)
pt3dadd(44.41, 67.45, -63, 4.59)
pt3dadd(44.36, 67.35, -63, 4.59)
pt3dadd(44.32, 67.25, -63, 4.59)
pt3dadd(44.23, 67.15, -63, 4.59)
pt3dadd(44.23, 67.04, -63, 4.59)
pt3dadd(44.14, 67, -63, 4.59)
pt3dadd(44.1, 66.89, -63, 4.59)
pt3dadd(44.05, 66.84, -63, 4.59)
pt3dadd(44.01, 66.74, -63, 4.59)
pt3dadd(43.96, 66.64, -63, 4.59)
pt3dadd(43.92, 66.54, -63, 4.59)
pt3dadd(43.87, 66.44, -63, 4.59)
pt3dadd(43.83, 66.34, -63, 4.59)
pt3dadd(43.74, 66.18, -63, 4.59)
pt3dadd(43.69, 66.08, -63, 4.59)
pt3dadd(43.65, 65.98, -63, 4.59)
pt3dadd(43.6, 65.88, -63, 4.59)
pt3dadd(43.56, 65.83, -63, 4.59)
pt3dadd(43.52, 65.68, -63, 4.59)
pt3dadd(43.43, 65.58, -63, 4.59)
pt3dadd(43.43, 65.43, -63, 4.59)
pt3dadd(43.34, 65.38, -63, 4.59)
pt3dadd(43.29, 65.27, -63, 4.59)
pt3dadd(43.25, 65.22, -63, 4.59)
pt3dadd(43.16, 65.07, -63, 4.59)
pt3dadd(43.12, 64.97, -63, 4.59)
pt3dadd(43.07, 64.87, -63, 4.59)
pt3dadd(43.03, 64.77, -63, 4.59)
pt3dadd(42.98, 64.67, -63, 4.59)
pt3dadd(42.94, 64.57, -63, 4.59)
pt3dadd(42.89, 64.46, -63, 4.59)
pt3dadd(42.85, 64.36, -63, 4.59)
pt3dadd(42.8, 64.26, -63, 4.59)
pt3dadd(42.72, 64.16, -63, 4.59)
pt3dadd(42.67, 64.11, -63, 4.59)
pt3dadd(42.63, 64.01, -63, 4.59)
pt3dadd(42.58, 63.9, -63, 4.59)
pt3dadd(42.53, 63.85, -63, 4.59)
pt3dadd(42.49, 63.76, -63, 4.59)
pt3dadd(42.45, 63.65, -63, 4.59)
pt3dadd(42.4, 63.6, -63, 4.59)
pt3dadd(42.4, 63.5, -63, 4.59)
pt3dadd(42.36, 63.4, -63, 4.59)
pt3dadd(42.31, 63.3, -63, 4.59)
pt3dadd(42.27, 63.25, -63, 4.59)
pt3dadd(42.18, 63.15, -63, 4.59)
pt3dadd(42.13, 63.04, -63, 4.59)
pt3dadd(42.09, 62.94, -63, 4.59)
pt3dadd(42, 62.84, -63, 4.59)
pt3dadd(41.96, 62.74, -63, 4.59)
pt3dadd(41.91, 62.64, -63, 4.59)
pt3dadd(41.87, 62.59, -63, 4.59)
pt3dadd(41.78, 62.44, -63, 4.59)
pt3dadd(41.69, 62.28, -63, 4.59)
pt3dadd(41.65, 62.24, -63, 4.59)
pt3dadd(41.6, 62.19, -63, 4.59)
pt3dadd(41.51, 62.08, -63, 4.59)
pt3dadd(41.47, 61.98, -63, 4.59)
pt3dadd(41.42, 61.83, -63, 4.59)
pt3dadd(41.33, 61.78, -63, 4.59)
pt3dadd(41.29, 61.68, -63, 4.59)
pt3dadd(41.2, 61.53, -63, 4.59)
pt3dadd(41.15, 61.47, -63, 4.59)
pt3dadd(41.06, 61.42, -63, 4.59)
pt3dadd(41.02, 61.32, -63, 4.59)
pt3dadd(40.97, 61.22, -63, 4.59)
pt3dadd(40.88, 61.12, -63, 4.59)
pt3dadd(40.84, 61.07, -63, 4.59)
pt3dadd(40.8, 60.97, -63, 4.59)
pt3dadd(40.75, 60.92, -63, 4.59)
pt3dadd(40.71, 60.82, -63, 4.59)
pt3dadd(40.66, 60.77, -63, 4.59)
pt3dadd(40.62, 60.67, -63, 4.59)
pt3dadd(40.58, 60.62, -63, 4.59)
pt3dadd(40.49, 60.51, -63, 4.59)
pt3dadd(40.44, 60.41, -63, 4.59)
pt3dadd(40.35, 60.31, -63, 4.59)
pt3dadd(40.31, 60.26, -63, 4.59)
pt3dadd(40.22, 60.11, -63, 4.59)
pt3dadd(40.17, 60.01, -63, 4.59)
pt3dadd(40.13, 59.9, -63, 4.59)
pt3dadd(40.08, 59.81, -63, 4.59)
pt3dadd(40.04, 59.7, -63, 4.59)
pt3dadd(39.99, 59.6, -63, 4.59)
pt3dadd(39.9, 59.55, -63, 4.59)
pt3dadd(39.86, 59.5, -63, 4.59)
pt3dadd(39.81, 59.45, -63, 4.59)
pt3dadd(39.77, 59.35, -63, 4.59)
pt3dadd(39.73, 59.3, -63, 4.59)
pt3dadd(39.68, 59.2, -63, 4.59)
pt3dadd(39.64, 59.15, -63, 4.59)
pt3dadd(39.55, 59.04, -63, 4.59)
pt3dadd(39.55, 58.94, -63, 4.59)
pt3dadd(39.46, 58.89, -63, 4.59)
pt3dadd(39.42, 58.79, -63, 4.59)
pt3dadd(39.33, 58.69, -63, 4.59)
pt3dadd(39.28, 58.64, -63, 4.59)
pt3dadd(39.24, 58.54, -63, 4.59)
pt3dadd(39.19, 58.44, -63, 4.59)
pt3dadd(39.1, 58.33, -63, 4.59)
pt3dadd(39.06, 58.28, -63, 4.59)
pt3dadd(39.06, 58.49, -63, 4.59)
pt3dadd(39.1, 58.64, -63, 4.59)
pt3dadd(39.06, 58.44, -63, 4.25)
pt3dadd(39.01, 58.39, -63, 4.25)
pt3dadd(38.97, 58.33, -63, 4.25)
pt3dadd(38.97, 58.24, -63, 4.25)
pt3dadd(38.92, 58.19, -63, 4.25)
pt3dadd(38.88, 58.13, -63, 4.25)
pt3dadd(38.88, 58.03, -63, 4.25)
pt3dadd(38.83, 57.98, -63, 4.25)
pt3dadd(38.79, 57.93, -63, 4.25)
pt3dadd(38.74, 57.88, -63, 4.25)
pt3dadd(38.7, 57.83, -63, 4.25)
pt3dadd(38.7, 57.73, -63, 4.25)
pt3dadd(38.66, 57.68, -63, 4.25)
pt3dadd(38.61, 57.63, -63, 4.25)
pt3dadd(38.57, 57.58, -63, 4.25)
pt3dadd(38.44, 57.42, -63, 4.25)
pt3dadd(38.39, 57.37, -63, 4.25)
pt3dadd(38.35, 57.32, -63, 4.25)
pt3dadd(38.3, 57.27, -63, 4.25)
pt3dadd(38.26, 57.22, -63, 4.25)
pt3dadd(38.21, 57.17, -63, 4.25)
pt3dadd(38.17, 57.07, -63, 4.25)
pt3dadd(38.12, 56.97, -63, 4.25)
pt3dadd(38.08, 56.87, -63, 4.25)
pt3dadd(37.9, 56.67, -63, 4.25)
pt3dadd(37.85, 56.62, -63, 4.25)
pt3dadd(37.81, 56.56, -63, 4.25)
pt3dadd(37.76, 56.51, -63, 4.25)
pt3dadd(37.72, 56.46, -63, 4.25)
pt3dadd(37.67, 56.41, -63, 4.25)
pt3dadd(37.63, 56.36, -63, 4.25)
pt3dadd(37.59, 56.31, -63, 4.25)
pt3dadd(37.54, 56.21, -63, 4.25)
pt3dadd(37.5, 56.16, -63, 4.25)
pt3dadd(37.41, 56.11, -63, 4.25)
pt3dadd(37.37, 56.01, -63, 4.25)
pt3dadd(37.28, 55.96, -63, 4.25)
pt3dadd(37.23, 55.9, -63, 4.25)
pt3dadd(37.19, 55.85, -63, 4.25)
pt3dadd(37.14, 55.81, -63, 4.25)
pt3dadd(37.05, 55.75, -63, 4.25)
pt3dadd(37.01, 55.7, -63, 4.25)
pt3dadd(36.96, 55.65, -63, 4.25)
pt3dadd(36.92, 55.55, -63, 4.25)
pt3dadd(36.87, 55.5, -63, 4.25)
pt3dadd(36.74, 55.4, -63, 4.25)
pt3dadd(36.69, 55.35, -63, 4.25)
pt3dadd(36.43, 55.04, -63, 4.25)
pt3dadd(36.34, 55.04, -63, 4.25)
pt3dadd(36.29, 54.99, -63, 4.25)
pt3dadd(36.21, 54.94, -63, 4.25)
pt3dadd(36.16, 54.89, -63, 4.25)
pt3dadd(36.07, 54.84, -63, 4.25)
}
}
proc shape3d_42() {
dend[39] { pt3dadd(35.98, 54.79, -63, 4.25)
pt3dadd(35.89, 54.74, -63, 4.25)
pt3dadd(35.81, 54.64, -63, 4.25)
pt3dadd(35.76, 54.59, -63, 4.25)
pt3dadd(35.67, 54.54, -63, 4.25)
pt3dadd(35.49, 54.33, -63, 4.25)
pt3dadd(35.45, 54.28, -63, 4.25)
pt3dadd(35.4, 54.24, -63, 4.25)
pt3dadd(35.31, 54.18, -63, 4.25)
pt3dadd(35.18, 54.03, -63, 4.25)
pt3dadd(35.13, 53.98, -63, 4.25)
pt3dadd(35.04, 53.93, -63, 4.25)
pt3dadd(35, 53.88, -63, 4.25)
pt3dadd(34.96, 53.83, -63, 4.25)
pt3dadd(34.91, 53.78, -63, 4.25)
pt3dadd(34.82, 53.78, -63, 4.25)
pt3dadd(34.78, 53.68, -63, 4.25)
pt3dadd(34.74, 53.63, -63, 4.25)
pt3dadd(34.69, 53.53, -63, 4.25)
pt3dadd(34.6, 53.53, -63, 4.25)
pt3dadd(34.56, 53.47, -63, 4.25)
pt3dadd(34.51, 53.37, -63, 4.25)
pt3dadd(34.47, 53.32, -63, 4.25)
pt3dadd(34.38, 53.27, -63, 4.25)
pt3dadd(34.24, 53.12, -63, 4.25)
pt3dadd(34.2, 53.07, -63, 4.25)
pt3dadd(34.15, 53.02, -63, 4.25)
pt3dadd(34.06, 52.97, -63, 4.25)
pt3dadd(34.02, 52.92, -63, 4.25)
pt3dadd(33.97, 52.87, -63, 4.25)
pt3dadd(33.84, 52.87, -63, 4.25)
pt3dadd(33.75, 52.82, -63, 4.25)
pt3dadd(33.49, 52.82, -63, 4.25)
pt3dadd(33.44, 52.76, -63, 4.25)
pt3dadd(32.42, 52.76, -63, 4.25)
pt3dadd(32.33, 52.72, -63, 4.25)
pt3dadd(32.24, 52.72, -63, 4.25)
pt3dadd(32.15, 52.67, -63, 4.25)
pt3dadd(32.01, 52.67, -63, 4.25)
pt3dadd(31.97, 52.62, -63, 4.25)
pt3dadd(31.88, 52.56, -63, 4.25)
pt3dadd(31.75, 52.56, -63, 4.25)
pt3dadd(31.66, 52.51, -63, 4.25)
pt3dadd(31.57, 52.46, -63, 4.25)
pt3dadd(31.26, 52.46, -63, 4.25)
pt3dadd(31.12, 52.41, -63, 4.25)
pt3dadd(31.03, 52.36, -63, 4.25)
pt3dadd(30.94, 52.31, -63, 4.25)
pt3dadd(30.1, 52.31, -63, 4.25)
pt3dadd(30.01, 52.26, -63, 4.25)
pt3dadd(29.92, 52.21, -63, 4.25)
pt3dadd(29.83, 52.16, -63, 4.25)
pt3dadd(29.74, 52.11, -63, 4.25)
pt3dadd(29.69, 52.06, -63, 4.25)
pt3dadd(29.61, 52.01, -63, 4.25)
pt3dadd(29.52, 51.96, -63, 4.25)
pt3dadd(29.43, 51.9, -63, 4.25)
pt3dadd(29.39, 51.85, -63, 4.25)
pt3dadd(29.34, 51.8, -63, 4.25)
pt3dadd(29.25, 51.8, -63, 4.25)
pt3dadd(29.2, 51.75, -63, 4.25)
pt3dadd(29.16, 51.7, -63, 4.25)
pt3dadd(29.07, 51.7, -63, 4.25)
pt3dadd(29.03, 51.65, -63, 4.25)
pt3dadd(28.76, 51.35, -63, 4.25)
pt3dadd(28.72, 51.3, -63, 4.25)
pt3dadd(28.63, 51.19, -63, 4.25)
pt3dadd(28.58, 51.15, -63, 4.25)
pt3dadd(28.54, 51.1, -63, 4.25)
pt3dadd(28.45, 51.04, -63, 4.25)
pt3dadd(28.36, 50.94, -63, 4.25)
pt3dadd(28.32, 50.89, -63, 4.25)
pt3dadd(28.23, 50.74, -63, 4.25)
pt3dadd(28.14, 50.64, -63, 4.25)
pt3dadd(28.05, 50.54, -63, 4.25)
pt3dadd(27.96, 50.44, -63, 4.25)
pt3dadd(27.82, 50.33, -63, 4.25)
pt3dadd(27.74, 50.24, -63, 4.25)
pt3dadd(27.6, 50.08, -63, 4.25)
pt3dadd(27.56, 50.03, -63, 4.25)
pt3dadd(27.47, 49.98, -63, 4.25)
pt3dadd(27.38, 49.93, -63, 4.25)
pt3dadd(27.33, 49.88, -63, 4.25)
pt3dadd(27.29, 49.83, -63, 4.25)
pt3dadd(27.25, 49.78, -63, 4.25)
pt3dadd(27.16, 49.78, -63, 4.25)
pt3dadd(27.11, 49.73, -63, 4.25)
pt3dadd(27.02, 49.68, -63, 4.25)
pt3dadd(26.98, 49.63, -63, 4.25)
pt3dadd(26.89, 49.53, -63, 4.25)
pt3dadd(26.84, 49.47, -63, 4.25)
pt3dadd(26.58, 49.47, -63, 4.25)
pt3dadd(26.53, 49.42, -63, 4.25)
pt3dadd(26.4, 49.42, -63, 4.25)
pt3dadd(26.35, 49.37, -63, 4.25)
pt3dadd(26.31, 49.32, -63, 4.25)
pt3dadd(26.13, 49.32, -63, 4.25)
pt3dadd(26.08, 49.27, -63, 4.25)
pt3dadd(25.95, 49.27, -63, 4.25)
pt3dadd(25.91, 49.22, -63, 4.25)
pt3dadd(25.73, 49.22, -63, 4.25)
pt3dadd(25.68, 49.17, -63, 4.25)
pt3dadd(25.59, 49.17, -63, 4.25)
pt3dadd(25.55, 49.12, -63, 4.25)
pt3dadd(25.5, 49.07, -63, 4.25)
pt3dadd(25.37, 49.07, -63, 4.25)
pt3dadd(25.33, 49.02, -63, 4.25)
pt3dadd(25.28, 48.97, -63, 4.25)
pt3dadd(25.15, 48.97, -63, 4.25)
pt3dadd(25.1, 48.92, -63, 4.25)
pt3dadd(24.97, 48.92, -63, 4.25)
pt3dadd(24.92, 48.87, -63, 4.25)
pt3dadd(24.84, 48.87, -63, 4.25)
pt3dadd(24.79, 48.81, -63, 4.25)
pt3dadd(24.75, 48.76, -63, 4.25)
pt3dadd(24.66, 48.72, -63, 4.25)
pt3dadd(24.61, 48.67, -63, 4.25)
pt3dadd(24.52, 48.61, -63, 4.25)
pt3dadd(24.57, 48.51, -63, 4.08)
pt3dadd(24.52, 48.41, -63, 4.08)
pt3dadd(24.48, 48.36, -63, 4.08)
pt3dadd(24.43, 48.26, -63, 4.08)
pt3dadd(24.39, 48.21, -63, 4.08)
pt3dadd(24.34, 48.16, -63, 4.08)
pt3dadd(24.34, 48.01, -63, 4.08)
pt3dadd(24.3, 47.96, -63, 4.08)
pt3dadd(24.26, 47.9, -63, 4.08)
pt3dadd(24.21, 47.85, -63, 4.08)
pt3dadd(24.17, 47.75, -63, 4.08)
pt3dadd(24.12, 47.65, -63, 4.08)
pt3dadd(24.08, 47.6, -63, 4.08)
pt3dadd(24.03, 47.5, -63, 4.08)
pt3dadd(23.99, 47.4, -63, 4.08)
pt3dadd(23.94, 47.35, -63, 4.08)
pt3dadd(23.9, 47.25, -63, 4.08)
pt3dadd(23.85, 47.19, -63, 4.08)
pt3dadd(23.81, 47.15, -63, 4.08)
pt3dadd(23.77, 47.1, -63, 4.08)
pt3dadd(23.72, 47.04, -63, 4.08)
pt3dadd(23.68, 46.94, -63, 4.08)
pt3dadd(23.63, 46.89, -63, 4.08)
pt3dadd(23.59, 46.84, -63, 4.08)
pt3dadd(23.54, 46.74, -63, 4.08)
pt3dadd(23.45, 46.69, -63, 4.08)
pt3dadd(23.23, 46.44, -63, 4.08)
pt3dadd(23.14, 46.38, -63, 4.08)
pt3dadd(23.05, 46.33, -63, 4.08)
pt3dadd(23.01, 46.28, -63, 4.08)
pt3dadd(22.97, 46.23, -63, 4.08)
pt3dadd(22.92, 46.18, -63, 4.08)
pt3dadd(22.88, 46.08, -63, 4.08)
pt3dadd(22.83, 46.03, -63, 4.08)
pt3dadd(22.74, 45.93, -63, 4.08)
pt3dadd(22.7, 45.88, -63, 4.08)
pt3dadd(22.65, 45.83, -63, 4.08)
pt3dadd(22.56, 45.73, -63, 4.08)
pt3dadd(22.52, 45.63, -63, 4.08)
pt3dadd(22.47, 45.58, -63, 4.08)
pt3dadd(22.43, 45.53, -63, 4.08)
pt3dadd(22.34, 45.47, -63, 4.08)
pt3dadd(22.3, 45.37, -63, 4.08)
pt3dadd(22.2, 45.32, -63, 4.08)
pt3dadd(22.12, 45.27, -63, 4.08)
pt3dadd(22.07, 45.17, -63, 4.08)
pt3dadd(22.03, 45.12, -63, 4.08)
pt3dadd(21.94, 45.07, -63, 4.08)
pt3dadd(21.94, 44.97, -63, 4.08)
pt3dadd(21.85, 44.92, -63, 4.08)
pt3dadd(21.76, 44.81, -63, 4.08)
pt3dadd(21.72, 44.76, -63, 4.08)
pt3dadd(21.67, 44.72, -63, 4.08)
pt3dadd(21.49, 44.51, -63, 4.08)
pt3dadd(21.4, 44.41, -63, 4.08)
pt3dadd(21.36, 44.36, -63, 4.08)
pt3dadd(21.32, 44.26, -63, 4.08)
pt3dadd(21.27, 44.21, -63, 4.08)
pt3dadd(21.23, 44.11, -63, 4.08)
pt3dadd(21.14, 44.11, -63, 4.08)
pt3dadd(21.09, 44.01, -63, 4.08)
pt3dadd(20.96, 43.85, -63, 4.08)
pt3dadd(20.91, 43.8, -63, 4.08)
pt3dadd(20.83, 43.75, -63, 4.08)
pt3dadd(20.78, 43.65, -63, 4.08)
pt3dadd(20.74, 43.6, -63, 4.08)
pt3dadd(20.69, 43.55, -63, 4.08)
pt3dadd(20.6, 43.5, -63, 4.08)
pt3dadd(20.56, 43.4, -63, 4.08)
pt3dadd(20.51, 43.35, -63, 4.08)
pt3dadd(20.38, 43.24, -63, 4.08)
pt3dadd(20.33, 43.15, -63, 4.08)
pt3dadd(20.29, 43.1, -63, 4.08)
pt3dadd(20.2, 43.1, -63, 4.08)
pt3dadd(20.16, 43.04, -63, 4.08)
pt3dadd(20.07, 42.89, -63, 4.08)
pt3dadd(20.02, 42.84, -63, 4.08)
pt3dadd(19.93, 42.74, -63, 4.08)
pt3dadd(19.84, 42.69, -63, 4.08)
pt3dadd(19.8, 42.64, -63, 4.08)
pt3dadd(19.71, 42.59, -63, 4.08)
pt3dadd(19.62, 42.54, -63, 4.08)
}
}
proc shape3d_43() {
dend[39] { pt3dadd(19.53, 42.49, -63, 4.08)
pt3dadd(19.4, 42.44, -63, 4.08)
pt3dadd(19.35, 42.38, -63, 4.08)
pt3dadd(19.26, 42.33, -63, 4.08)
pt3dadd(19.17, 42.28, -63, 4.08)
pt3dadd(19.08, 42.23, -63, 4.08)
pt3dadd(19, 42.13, -63, 4.08)
pt3dadd(18.95, 42.08, -63, 4.08)
pt3dadd(18.86, 42.03, -63, 4.08)
pt3dadd(18.73, 41.98, -63, 4.08)
pt3dadd(18.64, 41.93, -63, 4.08)
pt3dadd(18.5, 41.93, -63, 4.08)
pt3dadd(18.37, 41.83, -63, 4.08)
pt3dadd(18.19, 41.83, -63, 4.08)
pt3dadd(18.15, 41.78, -63, 4.08)
pt3dadd(18.06, 41.73, -63, 4.08)
pt3dadd(17.93, 41.73, -63, 4.08)
pt3dadd(17.79, 41.58, -63, 4.08)
pt3dadd(17.7, 41.58, -63, 4.08)
pt3dadd(17.66, 41.53, -63, 4.08)
pt3dadd(17.57, 41.53, -63, 4.08)
pt3dadd(17.52, 41.47, -63, 4.08)
pt3dadd(17.48, 41.42, -63, 4.08)
pt3dadd(17.43, 41.37, -63, 4.08)
pt3dadd(17.39, 41.32, -63, 4.08)
pt3dadd(17.3, 41.32, -63, 4.08)
pt3dadd(17.21, 41.27, -63, 4.08)
pt3dadd(17.17, 41.17, -63, 4.08)
pt3dadd(17.13, 41.12, -63, 4.08)
pt3dadd(17.03, 41.02, -63, 4.08)
pt3dadd(16.99, 40.97, -63, 4.08)
pt3dadd(16.94, 40.92, -63, 4.08)
pt3dadd(16.86, 40.87, -63, 4.08)
pt3dadd(16.81, 40.81, -63, 4.08)
pt3dadd(16.77, 40.76, -63, 4.08)
pt3dadd(16.72, 40.66, -63, 4.08)
pt3dadd(16.63, 40.61, -63, 4.08)
pt3dadd(16.59, 40.56, -63, 4.08)
pt3dadd(16.55, 40.51, -63, 4.08)
pt3dadd(16.45, 40.51, -63, 4.08)
pt3dadd(16.41, 40.46, -63, 4.08)
pt3dadd(16.36, 40.41, -63, 4.08)
pt3dadd(16.32, 40.36, -63, 4.08)
pt3dadd(16.28, 40.31, -63, 4.08)
pt3dadd(16.19, 40.26, -63, 4.08)
pt3dadd(16.1, 40.21, -63, 4.08)
pt3dadd(16.01, 40.21, -63, 4.08)
pt3dadd(15.97, 40.16, -63, 4.08)
pt3dadd(15.88, 40.11, -63, 4.08)
pt3dadd(15.79, 40.06, -63, 4.08)
pt3dadd(15.65, 39.96, -63, 4.08)
pt3dadd(15.61, 39.9, -63, 4.08)
pt3dadd(15.52, 39.85, -63, 4.08)
pt3dadd(15.48, 39.8, -63, 4.08)
pt3dadd(15.39, 39.8, -63, 4.08)
pt3dadd(15.34, 39.75, -63, 4.08)
pt3dadd(15.3, 39.7, -63, 4.08)
pt3dadd(15.25, 39.65, -63, 4.08)
pt3dadd(15.16, 39.55, -63, 3.4)
pt3dadd(14.98, 39.5, -63, 3.4)
pt3dadd(14.94, 39.45, -63, 3.4)
pt3dadd(14.81, 39.3, -63, 3.4)
pt3dadd(14.76, 39.24, -63, 3.4)
pt3dadd(14.54, 39.24, -63, 3.4)
pt3dadd(14.45, 39.19, -63, 3.4)
pt3dadd(14.4, 39.15, -63, 3.4)
pt3dadd(14.31, 39.1, -63, 3.4)
pt3dadd(14.23, 39.04, -63, 3.4)
pt3dadd(14.14, 38.99, -63, 3.4)
pt3dadd(14.09, 38.89, -63, 3.4)
pt3dadd(13.91, 38.69, -63, 3.4)
pt3dadd(13.82, 38.69, -63, 3.4)
pt3dadd(13.78, 38.64, -63, 3.4)
pt3dadd(13.73, 38.59, -63, 3.4)
pt3dadd(13.69, 38.54, -63, 3.4)
pt3dadd(13.6, 38.54, -63, 3.4)
pt3dadd(13.56, 38.49, -63, 3.4)
pt3dadd(13.51, 38.44, -63, 3.4)
pt3dadd(13.47, 38.38, -63, 3.4)
pt3dadd(13.38, 38.33, -63, 3.4)
pt3dadd(13.29, 38.28, -63, 3.4)
pt3dadd(13.24, 38.18, -63, 3.4)
pt3dadd(13.2, 38.13, -63, 3.4)
pt3dadd(13.11, 38.03, -63, 3.4)
pt3dadd(13.07, 37.98, -63, 3.4)
pt3dadd(12.98, 37.88, -63, 3.4)
pt3dadd(12.89, 37.83, -63, 3.4)
pt3dadd(12.8, 37.78, -63, 3.4)
pt3dadd(12.76, 37.73, -63, 3.4)
pt3dadd(12.71, 37.63, -63, 3.4)
pt3dadd(12.66, 37.58, -63, 3.4)
pt3dadd(12.58, 37.58, -63, 3.4)
pt3dadd(12.53, 37.53, -63, 3.4)
pt3dadd(12.49, 37.47, -63, 3.4)
pt3dadd(12.4, 37.42, -63, 3.4)
pt3dadd(12.31, 37.37, -63, 3.4)
pt3dadd(12.27, 37.32, -63, 3.4)
pt3dadd(12.22, 37.27, -63, 3.4)
pt3dadd(12.18, 37.22, -63, 3.4)
pt3dadd(12.13, 37.17, -63, 3.4)
pt3dadd(12, 37.02, -63, 3.4)
pt3dadd(11.95, 36.97, -63, 3.4)
pt3dadd(11.91, 36.87, -63, 3.4)
pt3dadd(11.73, 36.66, -63, 3.4)
pt3dadd(11.69, 36.56, -63, 3.4)
pt3dadd(11.64, 36.46, -63, 3.4)
pt3dadd(11.6, 36.41, -63, 3.4)
pt3dadd(11.51, 36.31, -63, 3.4)
pt3dadd(11.46, 36.26, -63, 3.4)
pt3dadd(11.42, 36.16, -63, 3.4)
pt3dadd(11.33, 36.11, -63, 3.4)
pt3dadd(11.28, 36.01, -63, 3.4)
pt3dadd(11.19, 35.9, -63, 3.4)
pt3dadd(11.15, 35.85, -63, 3.4)
pt3dadd(11.15, 35.75, -63, 3.4)
pt3dadd(11.1, 35.7, -63, 3.4)
pt3dadd(11.06, 35.65, -63, 3.4)
pt3dadd(10.97, 35.6, -63, 3.4)
pt3dadd(10.93, 35.5, -63, 3.4)
pt3dadd(10.84, 35.45, -63, 3.4)
pt3dadd(10.84, 35.35, -63, 3.4)
pt3dadd(10.79, 35.29, -63, 3.4)
pt3dadd(10.66, 35.15, -63, 3.4)
pt3dadd(10.61, 35.09, -63, 3.4)
pt3dadd(10.57, 34.99, -63, 3.4)
pt3dadd(10.52, 34.89, -63, 3.4)
pt3dadd(10.48, 34.79, -63, 3.4)
pt3dadd(10.44, 34.74, -63, 3.4)
pt3dadd(10.39, 34.69, -63, 3.4)
pt3dadd(10.35, 34.59, -63, 3.4)
pt3dadd(10.3, 34.54, -63, 3.4)
pt3dadd(10.26, 34.44, -63, 3.4)
pt3dadd(10.26, 34.33, -63, 3.4)
pt3dadd(10.21, 34.28, -63, 3.4)
pt3dadd(10.21, 34.13, -63, 3.4)
pt3dadd(10.17, 34.08, -63, 3.4)
pt3dadd(10.13, 33.98, -63, 3.4)
pt3dadd(10.13, 33.88, -63, 3.4)
pt3dadd(10.08, 33.83, -63, 3.4)
pt3dadd(10.03, 33.73, -63, 3.4)
pt3dadd(9.99, 33.73, -63, 3.4)
pt3dadd(10.13, 33.78, -65.1, 3.4)
pt3dadd(10.03, 33.73, -65.1, 3.4)
pt3dadd(9.94, 33.63, -65.1, 3.4)
pt3dadd(9.9, 33.58, -65.1, 3.4)
pt3dadd(9.81, 33.53, -65.1, 3.4)
pt3dadd(9.72, 33.47, -65.1, 3.4)
pt3dadd(9.68, 33.42, -65.1, 3.4)
pt3dadd(9.64, 33.37, -65.1, 3.4)
pt3dadd(9.59, 33.32, -65.1, 3.4)
pt3dadd(9.55, 33.27, -65.1, 3.4)
pt3dadd(9.5, 33.22, -65.1, 3.4)
pt3dadd(9.45, 33.17, -65.1, 3.4)
pt3dadd(9.41, 33.07, -65.1, 3.4)
pt3dadd(9.37, 33.02, -65.1, 3.4)
pt3dadd(9.32, 32.92, -65.1, 3.4)
pt3dadd(9.28, 32.87, -65.1, 3.4)
pt3dadd(9.19, 32.76, -65.1, 3.4)
pt3dadd(9.14, 32.71, -65.1, 3.4)
pt3dadd(9.1, 32.66, -65.1, 3.4)
pt3dadd(9.06, 32.61, -65.1, 3.4)
pt3dadd(9.01, 32.56, -65.1, 3.4)
pt3dadd(8.97, 32.51, -65.1, 3.4)
pt3dadd(8.97, 32.41, -65.1, 3.4)
pt3dadd(8.92, 32.36, -65.1, 3.4)
pt3dadd(8.88, 32.31, -65.1, 3.4)
pt3dadd(8.79, 32.26, -65.1, 3.4)
pt3dadd(8.79, 32.16, -65.1, 3.4)
pt3dadd(8.7, 32.1, -65.1, 3.4)
pt3dadd(8.7, 32.01, -65.1, 3.4)
pt3dadd(8.61, 31.95, -65.1, 3.4)
pt3dadd(8.52, 31.8, -65.1, 3.4)
pt3dadd(8.43, 31.7, -65.1, 3.4)
pt3dadd(8.39, 31.6, -65.1, 3.4)
pt3dadd(8.3, 31.5, -65.1, 3.4)
pt3dadd(8.25, 31.45, -65.1, 3.4)
pt3dadd(8.21, 31.35, -65.1, 3.4)
pt3dadd(8.16, 31.3, -65.1, 3.4)
pt3dadd(8.12, 31.19, -65.1, 3.4)
pt3dadd(8.07, 31.09, -65.1, 3.4)
pt3dadd(8.03, 31.04, -65.1, 3.4)
pt3dadd(7.99, 30.99, -65.1, 3.4)
pt3dadd(7.94, 30.94, -65.1, 3.4)
pt3dadd(7.89, 30.89, -65.1, 3.4)
pt3dadd(7.85, 30.84, -65.1, 3.4)
pt3dadd(7.8, 30.74, -65.1, 3.4)
pt3dadd(7.76, 30.69, -65.1, 3.4)
pt3dadd(7.72, 30.59, -65.1, 3.4)
pt3dadd(7.63, 30.54, -65.1, 3.4)
pt3dadd(7.58, 30.43, -65.1, 3.4)
pt3dadd(7.54, 30.33, -65.1, 3.4)
pt3dadd(7.49, 30.28, -65.1, 3.4)
pt3dadd(7.45, 30.23, -65.1, 3.4)
pt3dadd(7.41, 30.13, -65.1, 3.4)
pt3dadd(7.36, 30.08, -65.1, 3.4)
pt3dadd(7.32, 30.03, -65.1, 3.4)
pt3dadd(7.27, 29.98, -65.1, 3.4)
pt3dadd(7.18, 29.83, -65.1, 3.4)
pt3dadd(7.14, 29.73, -65.1, 3.4)
pt3dadd(7.09, 29.67, -65.1, 3.4)
}
}
proc shape3d_44() {
dend[39] { pt3dadd(7.05, 29.58, -65.1, 3.4)
pt3dadd(7, 29.52, -65.1, 3.4)
pt3dadd(7, 29.42, -65.1, 3.4)
pt3dadd(6.91, 29.37, -65.1, 3.4)
pt3dadd(6.87, 29.27, -65.1, 3.4)
pt3dadd(6.82, 29.17, -65.1, 3.4)
pt3dadd(6.78, 29.07, -65.1, 3.4)
pt3dadd(6.74, 28.97, -65.1, 3.4)
pt3dadd(6.69, 28.92, -65.1, 3.4)
pt3dadd(6.65, 28.86, -65.1, 3.4)
pt3dadd(6.6, 28.76, -65.1, 3.4)
pt3dadd(6.56, 28.71, -65.1, 3.4)
pt3dadd(6.47, 28.66, -65.1, 3.4)
pt3dadd(6.47, 28.56, -65.1, 3.4)
pt3dadd(6.38, 28.51, -65.1, 3.4)
pt3dadd(6.34, 28.41, -65.1, 3.4)
pt3dadd(6.29, 28.31, -65.1, 3.4)
pt3dadd(6.24, 28.21, -65.1, 3.4)
pt3dadd(6.2, 28.16, -65.1, 3.4)
pt3dadd(6.2, 28.06, -65.1, 3.4)
pt3dadd(6.16, 27.9, -65.1, 3.4)
pt3dadd(6.11, 27.85, -65.1, 3.4)
pt3dadd(6.07, 27.8, -65.1, 3.4)
pt3dadd(6.02, 27.65, -65.1, 3.4)
pt3dadd(5.98, 27.55, -65.1, 3.4)
pt3dadd(5.93, 27.45, -65.1, 3.4)
pt3dadd(5.93, 27.25, -65.1, 3.4)
pt3dadd(5.89, 27.14, -65.1, 3.4)
pt3dadd(5.84, 27.04, -65.1, 3.4)
pt3dadd(5.84, 26.89, -65.1, 3.4)
pt3dadd(5.8, 26.79, -65.1, 3.4)
pt3dadd(5.76, 26.64, -65.1, 3.4)
pt3dadd(5.71, 26.53, -65.1, 3.4)
pt3dadd(5.71, 26.39, -65.1, 3.4)
pt3dadd(5.66, 26.33, -65.1, 3.4)
pt3dadd(5.66, 26.23, -65.1, 3.4)
pt3dadd(5.62, 26.13, -65.1, 3.4)
pt3dadd(5.58, 26.03, -65.1, 3.4)
pt3dadd(5.58, 25.78, -65.1, 3.4)
pt3dadd(5.53, 25.67, -65.1, 3.4)
pt3dadd(5.53, 25.52, -65.1, 3.4)
pt3dadd(5.49, 25.47, -65.1, 3.4)
pt3dadd(5.49, 25.27, -65.1, 3.4)
pt3dadd(5.44, 25.17, -65.1, 3.4)
pt3dadd(5.44, 25.02, -65.1, 3.4)
pt3dadd(5.4, 24.86, -65.1, 3.4)
pt3dadd(5.36, 24.76, -65.1, 3.4)
pt3dadd(5.36, 24.51, -65.1, 3.4)
pt3dadd(5.31, 24.41, -65.1, 3.4)
pt3dadd(5.31, 24.26, -65.1, 3.4)
pt3dadd(5.26, 24.16, -65.1, 3.4)
pt3dadd(5.26, 23.95, -65.1, 3.4)
pt3dadd(5.22, 23.85, -65.1, 3.4)
pt3dadd(5.18, 23.75, -65.1, 3.4)
pt3dadd(5.18, 23.6, -65.1, 3.4)
pt3dadd(5.13, 23.5, -65.1, 3.4)
pt3dadd(5.09, 23.4, -65.1, 3.4)
pt3dadd(5.09, 23.3, -65.1, 3.4)
pt3dadd(5.04, 23.25, -65.1, 3.4)
pt3dadd(5.04, 23.09, -65.1, 3.4)
pt3dadd(5, 23.04, -65.1, 3.4)
pt3dadd(4.95, 22.99, -65.1, 3.4)
pt3dadd(4.95, 22.89, -65.1, 3.4)
pt3dadd(4.91, 22.79, -65.1, 3.4)
pt3dadd(4.91, 22.69, -65.1, 3.4)
pt3dadd(4.86, 22.59, -65.1, 3.4)
pt3dadd(4.82, 22.49, -65.1, 3.4)
pt3dadd(4.82, 22.23, -65.1, 3.4)
pt3dadd(4.78, 22.18, -65.1, 3.4)
pt3dadd(4.78, 22.43, -65.1, 3.4)
pt3dadd(4.91, 22.53, -66.15, 3.4)
pt3dadd(4.86, 22.43, -66.15, 3.4)
pt3dadd(4.82, 22.33, -66.15, 3.4)
pt3dadd(4.78, 22.23, -66.15, 3.4)
pt3dadd(4.73, 22.13, -66.15, 3.4)
pt3dadd(4.68, 22.08, -66.15, 3.4)
pt3dadd(4.68, 21.98, -66.15, 3.4)
pt3dadd(4.64, 21.88, -66.15, 3.4)
pt3dadd(4.59, 21.83, -66.15, 3.4)
pt3dadd(4.55, 21.73, -66.15, 3.4)
pt3dadd(4.51, 21.67, -66.15, 3.4)
pt3dadd(4.46, 21.57, -66.15, 3.4)
pt3dadd(4.46, 21.47, -66.15, 3.4)
pt3dadd(4.42, 21.37, -66.15, 3.4)
pt3dadd(4.37, 21.27, -66.15, 3.4)
pt3dadd(4.33, 21.22, -66.15, 3.4)
pt3dadd(4.28, 21.17, -66.15, 3.4)
pt3dadd(4.24, 21.12, -66.15, 3.4)
pt3dadd(4.2, 20.97, -66.15, 3.4)
pt3dadd(4.15, 20.92, -66.15, 3.4)
pt3dadd(4.15, 20.82, -66.15, 3.4)
pt3dadd(4.11, 20.76, -66.15, 3.4)
pt3dadd(4.06, 20.71, -66.15, 3.4)
pt3dadd(4.02, 20.61, -66.15, 3.4)
pt3dadd(3.97, 20.56, -66.15, 3.4)
pt3dadd(3.93, 20.51, -66.15, 3.4)
pt3dadd(3.88, 20.46, -66.15, 3.4)
pt3dadd(3.84, 20.41, -66.15, 3.4)
pt3dadd(3.79, 20.36, -66.15, 3.4)
pt3dadd(3.75, 20.26, -66.15, 3.4)
pt3dadd(3.7, 20.16, -66.15, 3.4)
pt3dadd(3.66, 20.06, -66.15, 3.4)
pt3dadd(3.62, 19.95, -66.15, 3.4)
pt3dadd(3.57, 19.8, -66.15, 3.4)
pt3dadd(3.53, 19.75, -66.15, 3.4)
pt3dadd(3.48, 19.65, -66.15, 3.4)
pt3dadd(3.44, 19.55, -66.15, 3.4)
pt3dadd(3.39, 19.4, -66.15, 3.4)
pt3dadd(3.35, 19.34, -66.15, 3.4)
pt3dadd(3.3, 19.25, -66.15, 3.4)
pt3dadd(3.26, 19.19, -66.15, 3.4)
pt3dadd(3.21, 19.14, -66.15, 3.4)
pt3dadd(3.17, 19.04, -66.15, 3.4)
pt3dadd(3.13, 18.94, -66.15, 3.4)
pt3dadd(3.08, 18.84, -66.15, 3.4)
pt3dadd(3.04, 18.79, -66.15, 3.4)
pt3dadd(2.99, 18.69, -66.15, 3.4)
pt3dadd(2.99, 18.58, -66.15, 3.4)
pt3dadd(2.95, 18.53, -66.15, 3.4)
pt3dadd(2.9, 18.43, -66.15, 3.4)
pt3dadd(2.86, 18.33, -66.15, 3.4)
pt3dadd(2.81, 18.23, -66.15, 3.4)
pt3dadd(2.77, 18.08, -66.15, 3.4)
pt3dadd(2.72, 17.98, -66.15, 3.4)
pt3dadd(2.72, 17.88, -66.15, 3.4)
pt3dadd(2.68, 17.77, -66.15, 3.4)
pt3dadd(2.63, 17.63, -66.15, 3.4)
pt3dadd(2.63, 17.52, -66.15, 3.4)
pt3dadd(2.59, 17.42, -66.15, 3.4)
pt3dadd(2.55, 17.32, -66.15, 3.4)
pt3dadd(2.55, 17.22, -66.15, 3.4)
pt3dadd(2.5, 17.17, -66.15, 3.4)
pt3dadd(2.46, 17.07, -66.15, 3.4)
pt3dadd(2.41, 17.02, -66.15, 3.4)
pt3dadd(2.37, 16.92, -66.15, 3.4)
pt3dadd(2.32, 16.82, -66.15, 3.4)
pt3dadd(2.28, 16.71, -66.15, 3.4)
pt3dadd(2.23, 16.66, -66.15, 3.4)
pt3dadd(2.19, 16.61, -66.15, 3.4)
pt3dadd(2.14, 16.51, -66.15, 3.4)
pt3dadd(2.1, 16.41, -66.15, 3.4)
pt3dadd(2.06, 16.36, -66.15, 3.4)
pt3dadd(2.01, 16.31, -66.15, 3.4)
pt3dadd(1.97, 16.2, -66.15, 3.4)
pt3dadd(1.92, 16.1, -66.15, 3.4)
pt3dadd(1.88, 16.06, -66.15, 3.4)
pt3dadd(1.83, 16, -66.15, 3.4)
pt3dadd(1.79, 15.95, -66.15, 3.4)
pt3dadd(1.74, 15.9, -66.15, 3.4)
pt3dadd(1.7, 15.85, -66.15, 3.4)
pt3dadd(1.65, 15.8, -66.15, 3.4)
pt3dadd(1.61, 15.75, -66.15, 3.4)
pt3dadd(1.57, 15.7, -66.15, 3.4)
pt3dadd(1.52, 15.65, -66.15, 3.4)
pt3dadd(1.48, 15.6, -66.15, 3.4)
pt3dadd(1.43, 15.55, -66.15, 3.4)
pt3dadd(1.39, 15.5, -66.15, 3.4)
pt3dadd(1.34, 15.45, -66.15, 3.4)
pt3dadd(1.3, 15.4, -66.15, 3.4)
pt3dadd(1.25, 15.35, -66.15, 3.4)
pt3dadd(1.21, 15.3, -66.15, 3.4)
pt3dadd(1.16, 15.24, -66.15, 3.4)
pt3dadd(1.12, 15.19, -66.15, 3.4)
pt3dadd(1.08, 15.14, -66.15, 3.4)
pt3dadd(0.99, 15.09, -66.15, 3.4)
pt3dadd(0.89, 14.99, -66.15, 3.4)
pt3dadd(0.85, 14.94, -66.15, 3.4)
pt3dadd(0.76, 14.94, -66.15, 3.4)
pt3dadd(0.72, 14.89, -66.15, 3.4)
pt3dadd(0.67, 14.79, -66.15, 3.4)
pt3dadd(0.58, 14.74, -66.15, 3.4)
pt3dadd(0.54, 14.69, -66.15, 3.4)
pt3dadd(0.45, 14.64, -66.15, 3.4)
pt3dadd(0.41, 14.59, -66.15, 3.4)
pt3dadd(0.32, 14.53, -66.15, 3.4)
pt3dadd(0.27, 14.48, -66.15, 3.4)
pt3dadd(0.23, 14.44, -66.15, 3.4)
pt3dadd(0.14, 14.38, -66.15, 3.4)
pt3dadd(0.09, 14.33, -66.15, 3.4)
pt3dadd(0.05, 14.23, -66.15, 3.4)
pt3dadd(0, 14.18, -66.15, 3.4)
pt3dadd(-0.04, 14.13, -66.15, 3.4)
pt3dadd(-0.13, 14.08, -66.15, 3.4)
pt3dadd(-0.22, 13.98, -66.15, 3.4)
pt3dadd(-0.26, 13.88, -66.15, 3.4)
pt3dadd(-0.31, 13.82, -66.15, 3.4)
pt3dadd(-0.4, 13.82, -66.15, 3.4)
pt3dadd(-0.53, 13.73, -66.15, 3.4)
pt3dadd(-0.62, 13.68, -66.15, 3.4)
pt3dadd(-0.71, 13.57, -66.15, 3.4)
pt3dadd(-0.8, 13.52, -66.15, 3.4)
pt3dadd(-0.89, 13.52, -66.15, 3.4)
pt3dadd(-0.89, 13.62, -66.15, 3.4)
pt3dadd(-0.84, 13.73, -66.15, 3.4)
pt3dadd(-0.8, 13.57, -68.25, 2.89)
pt3dadd(-0.84, 13.52, -68.25, 2.89)
pt3dadd(-0.89, 13.47, -68.25, 2.89)
pt3dadd(-1.02, 13.32, -68.25, 2.89)
pt3dadd(-1.07, 13.27, -68.25, 2.89)
pt3dadd(-1.15, 13.22, -68.25, 2.89)
}
}
proc shape3d_45() {
dend[39] { pt3dadd(-1.2, 13.17, -68.25, 2.89)
pt3dadd(-1.25, 13.12, -68.25, 2.89)
pt3dadd(-1.29, 13.02, -68.25, 2.89)
pt3dadd(-1.33, 12.91, -68.25, 2.89)
pt3dadd(-1.38, 12.86, -68.25, 2.89)
pt3dadd(-1.42, 12.81, -68.25, 2.89)
pt3dadd(-1.47, 12.76, -68.25, 2.89)
pt3dadd(-1.51, 12.71, -68.25, 2.89)
pt3dadd(-1.55, 12.66, -68.25, 2.89)
pt3dadd(-1.6, 12.56, -68.25, 2.89)
pt3dadd(-1.64, 12.46, -68.25, 2.89)
pt3dadd(-1.69, 12.41, -68.25, 2.89)
pt3dadd(-1.74, 12.36, -68.25, 2.89)
pt3dadd(-1.74, 12.26, -68.25, 2.89)
pt3dadd(-1.78, 12.2, -68.25, 2.89)
pt3dadd(-1.87, 12.1, -68.25, 2.89)
pt3dadd(-1.91, 12.06, -68.25, 2.89)
pt3dadd(-1.96, 11.95, -68.25, 2.89)
pt3dadd(-2, 11.85, -68.25, 2.89)
pt3dadd(-2.05, 11.75, -68.25, 2.89)
pt3dadd(-2.09, 11.7, -68.25, 2.89)
pt3dadd(-2.13, 11.5, -68.25, 3.06)
pt3dadd(-2.18, 11.45, -68.25, 3.06)
pt3dadd(-2.22, 11.4, -68.25, 3.06)
pt3dadd(-2.27, 11.35, -68.25, 3.06)
pt3dadd(-2.32, 11.3, -68.25, 3.06)
pt3dadd(-2.36, 11.24, -68.25, 3.06)
pt3dadd(-2.4, 11.19, -68.25, 3.06)
pt3dadd(-2.45, 11.14, -68.25, 3.06)
pt3dadd(-2.49, 11.09, -68.25, 3.06)
pt3dadd(-2.54, 11.04, -68.25, 3.06)
pt3dadd(-2.54, 10.64, -68.25, 3.06)
pt3dadd(-2.58, 10.59, -68.25, 3.06)
pt3dadd(-2.58, 10.48, -68.25, 3.06)
pt3dadd(-2.63, 10.38, -68.25, 3.06)
pt3dadd(-2.67, 10.28, -68.25, 3.06)
pt3dadd(-2.67, 10.13, -68.25, 3.06)
pt3dadd(-2.71, 10.08, -68.25, 3.06)
pt3dadd(-2.71, 9.98, -68.25, 3.06)
pt3dadd(-2.76, 9.93, -68.25, 3.06)
pt3dadd(-2.76, 9.82, -68.25, 3.06)
pt3dadd(-2.81, 9.77, -68.25, 3.06)
pt3dadd(-2.89, 9.73, -68.25, 3.06)
pt3dadd(-2.89, 9.57, -68.25, 3.06)
pt3dadd(-2.94, 9.47, -68.25, 3.06)
pt3dadd(-2.94, 9.32, -68.25, 3.06)
pt3dadd(-2.98, 9.27, -68.25, 3.06)
pt3dadd(-3.03, 9.22, -68.25, 3.06)
pt3dadd(-3.03, 9.07, -68.25, 3.06)
pt3dadd(-3.07, 9.02, -68.25, 3.06)
pt3dadd(-3.12, 8.97, -68.25, 3.06)
pt3dadd(-3.12, 8.86, -68.25, 3.06)
pt3dadd(-3.16, 8.76, -68.25, 3.06)
pt3dadd(-3.2, 8.71, -68.25, 3.06)
pt3dadd(-3.25, 8.66, -68.25, 3.06)
pt3dadd(-3.3, 8.56, -68.25, 3.06)
pt3dadd(-3.34, 8.46, -68.25, 3.06)
pt3dadd(-3.34, 8.36, -68.25, 3.06)
pt3dadd(-3.38, 8.26, -68.25, 3.06)
pt3dadd(-3.43, 8.2, -68.25, 3.06)
pt3dadd(-3.43, 8.05, -68.25, 3.06)
pt3dadd(-3.47, 8, -68.25, 3.06)
pt3dadd(-3.52, 7.95, -68.25, 3.06)
pt3dadd(-3.52, 7.85, -68.25, 3.06)
pt3dadd(-3.61, 7.75, -68.25, 3.23)
pt3dadd(-4.28, 7.09, -68.25, 3.23)
pt3dadd(-4.19, 7.14, -68.25, 3.23)
pt3dadd(-4.23, 7.09, -68.25, 3.23)
pt3dadd(-4.28, 7.04, -68.25, 3.23)
pt3dadd(-4.32, 6.99, -68.25, 3.23)
pt3dadd(-4.41, 6.99, -68.25, 3.23)
pt3dadd(-4.45, 6.94, -68.25, 3.23)
pt3dadd(-4.5, 6.89, -68.25, 3.23)
pt3dadd(-4.54, 6.84, -68.25, 3.23)
pt3dadd(-4.59, 6.79, -68.25, 3.23)
pt3dadd(-4.63, 6.74, -68.25, 3.23)
pt3dadd(-4.68, 6.69, -68.25, 3.23)
pt3dadd(-4.68, 6.59, -68.25, 3.23)
pt3dadd(-4.76, 6.53, -68.25, 3.23)
pt3dadd(-4.81, 6.49, -68.25, 3.23)
pt3dadd(-4.86, 6.43, -68.25, 3.23)
pt3dadd(-4.9, 6.38, -68.25, 3.23)
pt3dadd(-4.95, 6.33, -68.25, 3.23)
pt3dadd(-4.99, 6.28, -68.25, 3.23)
pt3dadd(-5.03, 6.23, -68.25, 3.23)
pt3dadd(-5.08, 6.18, -68.25, 3.23)
pt3dadd(-5.12, 6.13, -68.25, 3.23)
pt3dadd(-5.17, 6.08, -68.25, 3.23)
pt3dadd(-5.21, 6.03, -68.25, 3.23)
pt3dadd(-5.26, 5.98, -68.25, 3.23)
pt3dadd(-5.3, 5.93, -68.25, 3.23)
pt3dadd(-5.34, 5.82, -68.25, 3.23)
pt3dadd(-5.34, 5.72, -68.25, 3.23)
pt3dadd(-5.39, 5.67, -68.25, 3.23)
pt3dadd(-5.43, 5.57, -68.25, 3.23)
pt3dadd(-5.48, 5.52, -68.25, 3.23)
pt3dadd(-5.53, 5.47, -68.25, 3.23)
pt3dadd(-5.53, 5.37, -68.25, 3.23)
pt3dadd(-5.57, 5.32, -68.25, 3.23)
pt3dadd(-5.57, 5.22, -68.25, 3.23)
pt3dadd(-5.61, 5.17, -68.25, 3.23)
pt3dadd(-5.61, 5.12, -68.25, 3.23)
pt3dadd(-5.79, 5.01, -68.25, 3.4)
pt3dadd(-5.84, 4.97, -68.25, 3.4)
pt3dadd(-5.88, 4.91, -68.25, 3.4)
pt3dadd(-5.93, 4.86, -68.25, 3.4)
pt3dadd(-5.97, 4.81, -68.25, 3.4)
pt3dadd(-6.01, 4.76, -68.25, 3.4)
pt3dadd(-6.06, 4.71, -68.25, 3.4)
pt3dadd(-6.1, 4.66, -68.25, 3.4)
pt3dadd(-6.15, 4.61, -68.25, 3.4)
pt3dadd(-6.19, 4.56, -68.25, 3.4)
pt3dadd(-6.24, 4.51, -68.25, 3.4)
pt3dadd(-6.28, 4.46, -68.25, 3.4)
pt3dadd(-6.33, 4.41, -68.25, 3.4)
pt3dadd(-6.37, 4.36, -68.25, 3.4)
pt3dadd(-6.41, 4.31, -68.25, 3.4)
pt3dadd(-6.46, 4.26, -68.25, 3.4)
pt3dadd(-6.51, 4.2, -68.25, 3.4)
pt3dadd(-6.55, 4.16, -68.25, 3.4)
pt3dadd(-6.59, 4.11, -68.25, 3.4)
pt3dadd(-6.64, 4.05, -68.25, 3.4)
pt3dadd(-6.68, 4, -68.25, 3.4)
pt3dadd(-6.73, 3.95, -68.25, 3.4)
pt3dadd(-6.77, 3.9, -68.25, 3.4)
pt3dadd(-6.82, 3.85, -68.25, 3.4)
pt3dadd(-6.86, 3.8, -68.25, 3.4)
pt3dadd(-6.91, 3.75, -68.25, 3.4)
pt3dadd(-6.95, 3.7, -68.25, 3.4)
pt3dadd(-6.99, 3.65, -68.25, 3.4)
pt3dadd(-7.04, 3.6, -68.25, 3.4)
pt3dadd(-7.09, 3.55, -68.25, 3.4)
pt3dadd(-7.13, 3.5, -68.25, 3.4)
pt3dadd(-7.17, 3.44, -68.25, 3.4)
pt3dadd(-7.22, 3.39, -68.25, 3.4)
pt3dadd(-7.26, 3.35, -68.25, 3.4)
pt3dadd(-7.31, 3.3, -68.25, 3.4)
pt3dadd(-7.35, 3.19, -68.25, 3.4)
pt3dadd(-7.44, 3.19, -68.25, 3.4)
pt3dadd(-7.49, 3.14, -68.25, 3.4)
pt3dadd(-7.53, 3.09, -68.25, 3.4)
pt3dadd(-7.66, 2.94, -68.25, 3.4)
pt3dadd(-7.75, 2.89, -68.25, 3.4)
pt3dadd(-7.84, 2.84, -68.25, 3.4)
pt3dadd(-7.93, 2.79, -68.25, 3.4)
pt3dadd(-7.97, 2.74, -68.25, 3.4)
pt3dadd(-8.06, 2.63, -68.25, 3.4)
pt3dadd(-8.11, 2.59, -68.25, 3.4)
pt3dadd(-8.15, 2.54, -68.25, 3.4)
pt3dadd(-8.2, 2.48, -68.25, 3.4)
pt3dadd(-8.29, 2.48, -68.25, 3.4)
pt3dadd(-8.33, 2.43, -68.25, 3.4)
pt3dadd(-8.42, 2.38, -68.25, 3.4)
pt3dadd(-8.51, 2.33, -68.25, 3.4)
pt3dadd(-8.56, 2.28, -68.25, 3.4)
pt3dadd(-8.6, 2.23, -68.25, 3.4)
pt3dadd(-8.69, 2.18, -68.25, 3.4)
pt3dadd(-8.78, 2.13, -68.25, 3.4)
pt3dadd(-8.82, 2.08, -68.25, 3.4)
pt3dadd(-8.87, 1.98, -68.25, 3.4)
pt3dadd(-9, 1.93, -68.25, 3.4)
pt3dadd(-9.14, 1.77, -68.25, 3.4)
pt3dadd(-9.23, 1.73, -68.25, 3.4)
pt3dadd(-9.27, 1.67, -68.25, 3.4)
pt3dadd(-9.31, 1.62, -68.25, 3.4)
pt3dadd(-9.4, 1.57, -68.25, 3.4)
pt3dadd(-9.45, 1.47, -68.25, 3.4)
pt3dadd(-9.49, 1.42, -68.25, 3.4)
pt3dadd(-9.63, 1.27, -68.25, 3.4)
pt3dadd(-9.72, 1.22, -68.25, 3.4)
pt3dadd(-9.76, 1.17, -68.25, 3.4)
pt3dadd(-9.85, 1.12, -68.25, 3.4)
pt3dadd(-9.94, 1.01, -68.25, 3.4)
pt3dadd(-10.03, 0.96, -68.25, 3.4)
pt3dadd(-10.11, 0.92, -68.25, 3.4)
pt3dadd(-10.2, 0.86, -68.25, 3.4)
pt3dadd(-10.25, 0.76, -68.25, 3.4)
pt3dadd(-10.3, 0.71, -68.25, 3.4)
pt3dadd(-10.38, 0.66, -68.25, 3.4)
pt3dadd(-10.47, 0.61, -68.25, 3.4)
pt3dadd(-10.52, 0.56, -68.25, 3.4)
pt3dadd(-10.61, 0.56, -68.25, 3.4)
pt3dadd(-10.65, 0.51, -68.25, 3.4)
pt3dadd(-10.78, 0.51, -68.25, 3.4)
pt3dadd(-10.83, 0.46, -68.25, 3.4)
pt3dadd(-10.96, 0.46, -68.25, 3.4)
pt3dadd(-11.05, 0.41, -68.25, 3.4)
pt3dadd(-11.14, 0.36, -68.25, 3.4)
pt3dadd(-11.19, 0.31, -68.25, 3.4)
pt3dadd(-11.27, 0.25, -68.25, 3.4)
pt3dadd(-11.32, 0.2, -68.25, 3.4)
pt3dadd(-11.41, 0.16, -68.25, 3.4)
pt3dadd(-11.54, 0.16, -68.25, 3.4)
pt3dadd(-11.59, 0.1, -68.25, 3.4)
pt3dadd(-11.68, 0.05, -68.25, 3.4)
pt3dadd(-11.77, 0.05, -68.25, 3.4)
pt3dadd(-11.85, 0, -68.25, 3.4)
pt3dadd(-11.94, 0, -68.25, 3.4)
pt3dadd(-11.99, -0.1, -68.25, 3.4)
pt3dadd(-12.08, -0.1, -68.25, 3.4)
}
}
proc shape3d_46() {
dend[39] { pt3dadd(-12.12, -0.15, -68.25, 3.4)
pt3dadd(-12.21, -0.2, -68.25, 3.4)
pt3dadd(-12.26, -0.25, -68.25, 3.4)
pt3dadd(-12.35, -0.25, -68.25, 3.4)
pt3dadd(-12.39, -0.3, -68.25, 3.4)
pt3dadd(-12.48, -0.35, -68.25, 3.4)
pt3dadd(-12.52, -0.4, -68.25, 3.4)
pt3dadd(-12.57, -0.45, -68.25, 3.4)
pt3dadd(-12.61, -0.5, -68.25, 3.4)
pt3dadd(-12.7, -0.5, -68.25, 3.4)
pt3dadd(-12.79, -0.56, -68.25, 3.4)
pt3dadd(-12.84, -0.61, -68.25, 3.4)
pt3dadd(-12.93, -0.61, -68.25, 3.4)
pt3dadd(-13.02, -0.65, -68.25, 3.4)
pt3dadd(-13.06, -0.71, -68.25, 3.4)
pt3dadd(-13.1, -0.76, -68.25, 3.4)
pt3dadd(-13.15, -0.81, -68.25, 3.4)
pt3dadd(-13.19, -0.86, -68.25, 3.4)
pt3dadd(-13.28, -0.86, -68.25, 3.4)
pt3dadd(-13.37, -0.96, -68.25, 3.4)
pt3dadd(-13.41, -1.01, -68.25, 3.4)
pt3dadd(-13.51, -1.11, -68.25, 3.4)
pt3dadd(-13.55, -1.16, -68.25, 3.4)
pt3dadd(-13.64, -1.21, -68.25, 3.4)
pt3dadd(-13.68, -1.26, -68.25, 3.4)
pt3dadd(-13.77, -1.32, -68.25, 3.4)
pt3dadd(-13.82, -1.37, -68.25, 3.4)
pt3dadd(-13.86, -1.41, -68.25, 3.4)
pt3dadd(-13.95, -1.47, -68.25, 3.4)
pt3dadd(-13.99, -1.57, -68.25, 3.4)
pt3dadd(-14.04, -1.62, -68.25, 3.4)
pt3dadd(-14.13, -1.72, -68.25, 3.4)
pt3dadd(-14.17, -1.77, -68.25, 3.4)
pt3dadd(-14.26, -1.82, -68.25, 3.4)
pt3dadd(-14.31, -1.87, -68.25, 3.4)
pt3dadd(-14.4, -1.92, -68.25, 3.4)
pt3dadd(-14.48, -1.97, -68.25, 3.4)
pt3dadd(-14.57, -2.02, -68.25, 3.4)
pt3dadd(-14.66, -2.02, -68.25, 3.4)
pt3dadd(-14.71, -2.07, -68.25, 3.4)
pt3dadd(-14.8, -2.13, -68.25, 3.4)
pt3dadd(-14.84, -2.17, -68.25, 3.4)
pt3dadd(-14.93, -2.17, -68.25, 3.4)
pt3dadd(-15.02, -2.22, -68.25, 3.4)
pt3dadd(-15.06, -2.28, -68.25, 3.4)
pt3dadd(-15.11, -2.33, -68.25, 3.4)
pt3dadd(-15.2, -2.38, -68.25, 3.4)
pt3dadd(-15.24, -2.43, -68.25, 3.4)
pt3dadd(-15.33, -2.48, -68.25, 3.4)
pt3dadd(-15.38, -2.53, -68.25, 3.4)
pt3dadd(-15.47, -2.58, -68.25, 3.4)
pt3dadd(-15.56, -2.63, -68.25, 3.4)
pt3dadd(-15.65, -2.68, -68.25, 3.4)
pt3dadd(-15.73, -2.68, -68.25, 3.4)
pt3dadd(-15.6, -2.73, -66.15, 3.4)
pt3dadd(-15.65, -2.78, -66.15, 3.4)
pt3dadd(-15.69, -2.83, -66.15, 3.4)
pt3dadd(-15.78, -2.83, -66.15, 3.4)
pt3dadd(-15.82, -2.88, -66.15, 3.4)
pt3dadd(-15.87, -2.93, -66.15, 3.4)
pt3dadd(-16, -2.93, -66.15, 3.4)
pt3dadd(-16.05, -2.98, -66.15, 3.4)
pt3dadd(-16.09, -3.04, -66.15, 3.4)
pt3dadd(-16.4, -3.04, -66.15, 3.4)
pt3dadd(-16.49, -3.09, -66.15, 3.4)
pt3dadd(-16.58, -3.14, -66.15, 3.4)
pt3dadd(-16.67, -3.19, -66.15, 3.4)
pt3dadd(-16.76, -3.19, -66.15, 3.4)
pt3dadd(-16.85, -3.24, -66.15, 3.4)
pt3dadd(-16.94, -3.24, -66.15, 3.4)
pt3dadd(-17.02, -3.29, -66.15, 3.4)
pt3dadd(-17.11, -3.34, -66.15, 3.4)
pt3dadd(-17.25, -3.34, -66.15, 3.4)
pt3dadd(-17.29, -3.39, -66.15, 3.4)
pt3dadd(-17.34, -3.44, -66.15, 3.4)
pt3dadd(-17.38, -3.49, -66.15, 3.4)
pt3dadd(-17.47, -3.54, -66.15, 3.4)
pt3dadd(-17.52, -3.59, -66.15, 3.4)
pt3dadd(-17.6, -3.59, -66.15, 3.4)
pt3dadd(-17.65, -3.64, -66.15, 3.4)
pt3dadd(-17.69, -3.69, -66.15, 3.4)
pt3dadd(-17.92, -3.69, -66.15, 3.4)
pt3dadd(-17.96, -3.74, -66.15, 3.4)
pt3dadd(-18.01, -3.8, -66.15, 3.4)
pt3dadd(-18.09, -3.85, -66.15, 3.4)
pt3dadd(-18.18, -3.9, -66.15, 3.4)
pt3dadd(-18.27, -3.9, -66.15, 3.4)
pt3dadd(-18.36, -3.95, -66.15, 3.4)
pt3dadd(-18.45, -3.95, -66.15, 3.4)
pt3dadd(-18.5, -4, -66.15, 3.4)
pt3dadd(-18.54, -4.05, -66.15, 3.4)
pt3dadd(-18.63, -4.05, -66.15, 3.4)
pt3dadd(-18.72, -4.1, -66.15, 3.4)
pt3dadd(-18.81, -4.15, -66.15, 3.4)
pt3dadd(-18.9, -4.15, -66.15, 3.4)
pt3dadd(-18.99, -4.2, -66.15, 3.4)
pt3dadd(-19.03, -4.25, -66.15, 3.4)
pt3dadd(-19.12, -4.25, -66.15, 3.4)
pt3dadd(-19.17, -4.3, -66.15, 3.4)
pt3dadd(-19.25, -4.35, -66.15, 3.4)
pt3dadd(-19.34, -4.4, -66.15, 3.4)
pt3dadd(-19.48, -4.4, -66.15, 3.4)
pt3dadd(-19.57, -4.45, -66.15, 3.4)
pt3dadd(-19.66, -4.51, -66.15, 3.4)
pt3dadd(-19.7, -4.55, -66.15, 3.4)
pt3dadd(-19.79, -4.61, -66.15, 3.4)
pt3dadd(-19.88, -4.61, -66.15, 3.4)
pt3dadd(-19.92, -4.66, -66.15, 3.4)
pt3dadd(-20.06, -4.66, -66.15, 3.4)
pt3dadd(-20.1, -4.71, -66.15, 3.4)
pt3dadd(-20.28, -4.71, -66.15, 3.4)
pt3dadd(-20.33, -4.76, -66.15, 3.4)
pt3dadd(-20.42, -4.76, -66.15, 3.4)
pt3dadd(-20.5, -4.81, -66.15, 3.4)
pt3dadd(-20.55, -4.86, -66.15, 3.4)
pt3dadd(-20.73, -4.86, -66.15, 3.4)
pt3dadd(-20.82, -4.91, -66.15, 3.4)
pt3dadd(-20.95, -4.91, -66.15, 3.4)
pt3dadd(-21.04, -4.96, -66.15, 3.4)
pt3dadd(-21.13, -5.01, -66.15, 3.4)
pt3dadd(-21.17, -5.06, -66.15, 3.4)
pt3dadd(-21.22, -5.11, -66.15, 3.4)
pt3dadd(-21.26, -5.16, -66.15, 3.4)
pt3dadd(-21.31, -5.21, -66.15, 3.4)
pt3dadd(-21.4, -5.26, -66.15, 3.4)
pt3dadd(-21.44, -5.32, -66.15, 3.4)
pt3dadd(-21.49, -5.36, -66.15, 3.4)
pt3dadd(-21.57, -5.41, -66.15, 3.4)
pt3dadd(-21.66, -5.47, -66.15, 3.4)
pt3dadd(-21.75, -5.52, -66.15, 3.4)
pt3dadd(-21.8, -5.57, -66.15, 3.4)
pt3dadd(-21.84, -5.62, -66.15, 3.4)
pt3dadd(-21.93, -5.67, -66.15, 3.4)
pt3dadd(-22.02, -5.77, -66.15, 3.4)
pt3dadd(-22.07, -5.82, -66.15, 3.4)
pt3dadd(-22.15, -5.87, -66.15, 3.4)
pt3dadd(-22.24, -5.87, -66.15, 3.4)
pt3dadd(-22.29, -5.97, -66.15, 3.4)
pt3dadd(-22.33, -5.92, -66.15, 3.4)
pt3dadd(-22.02, -5.67, -63, 3.4)
pt3dadd(-22.07, -5.72, -63, 3.4)
pt3dadd(-22.15, -5.72, -63, 3.4)
pt3dadd(-22.24, -5.77, -63, 3.4)
pt3dadd(-22.33, -5.82, -63, 3.4)
pt3dadd(-22.38, -5.87, -63, 3.4)
pt3dadd(-22.47, -5.87, -63, 3.4)
pt3dadd(-22.51, -5.92, -63, 3.4)
pt3dadd(-22.6, -5.97, -63, 3.4)
pt3dadd(-22.64, -6.02, -63, 3.4)
pt3dadd(-22.73, -6.07, -63, 3.4)
pt3dadd(-22.78, -6.13, -63, 3.4)
pt3dadd(-22.87, -6.13, -63, 3.4)
pt3dadd(-22.91, -6.18, -63, 3.4)
pt3dadd(-22.95, -6.22, -63, 3.4)
pt3dadd(-23, -6.28, -63, 3.4)
pt3dadd(-23.31, -6.63, -63, 3.4)
pt3dadd(-23.36, -6.68, -63, 3.4)
pt3dadd(-23.44, -6.73, -63, 3.4)
pt3dadd(-23.49, -6.78, -63, 3.4)
pt3dadd(-23.53, -6.83, -63, 3.4)
pt3dadd(-23.58, -6.93, -63, 3.4)
pt3dadd(-23.63, -7.03, -63, 3.4)
pt3dadd(-23.63, -7.14, -63, 3.4)
pt3dadd(-23.67, -7.24, -63, 3.4)
pt3dadd(-23.71, -7.34, -63, 3.4)
pt3dadd(-23.71, -7.49, -63, 3.4)
pt3dadd(-23.53, -7.39, -58.8, 3.4)
pt3dadd(-23.53, -7.54, -58.8, 3.4)
pt3dadd(-23.58, -7.59, -58.8, 3.4)
pt3dadd(-23.58, -8.25, -58.8, 3.4)
pt3dadd(-23.63, -8.3, -58.8, 3.4)
pt3dadd(-23.67, -8.4, -58.8, 3.4)
pt3dadd(-23.67, -8.51, -58.8, 3.4)
pt3dadd(-23.71, -8.56, -58.8, 3.4)
pt3dadd(-23.8, -8.6, -58.8, 3.4)
pt3dadd(-23.85, -8.66, -58.8, 3.4)
pt3dadd(-23.89, -8.76, -58.8, 3.4)
pt3dadd(-23.94, -8.81, -58.8, 3.4)
pt3dadd(-23.98, -8.86, -58.8, 3.4)
pt3dadd(-24.02, -8.91, -58.8, 3.4)
pt3dadd(-24.07, -8.96, -58.8, 3.4)
pt3dadd(-24.11, -9.01, -58.8, 3.4)
pt3dadd(-24.16, -9.06, -58.8, 3.4)
pt3dadd(-24.2, -9.11, -58.8, 3.4)
pt3dadd(-24.25, -9.21, -58.8, 3.4)
pt3dadd(-24.29, -9.27, -58.8, 3.4)
pt3dadd(-24.38, -9.27, -58.8, 3.4)
pt3dadd(-24.43, -9.36, -58.8, 3.4)
pt3dadd(-24.51, -9.41, -58.8, 3.4)
pt3dadd(-24.6, -9.41, -58.8, 3.4)
pt3dadd(-24.69, -9.52, -58.8, 3.4)
pt3dadd(-24.83, -9.52, -58.8, 3.4)
pt3dadd(-24.87, -9.57, -58.8, 3.4)
pt3dadd(-24.96, -9.62, -58.8, 3.4)
pt3dadd(-25.01, -9.67, -58.8, 3.4)
pt3dadd(-25.09, -9.72, -58.8, 3.4)
pt3dadd(-25.18, -9.77, -58.8, 3.4)
pt3dadd(-25.23, -9.82, -58.8, 3.4)
pt3dadd(-25.41, -9.82, -58.8, 3.4)
pt3dadd(-25.45, -9.87, -58.8, 3.4)
}
}
proc shape3d_47() {
dend[39] { pt3dadd(-25.5, -9.92, -58.8, 3.4)
pt3dadd(-25.58, -9.92, -58.8, 3.4)
pt3dadd(-25.63, -9.97, -58.8, 3.4)
pt3dadd(-25.72, -9.97, -58.8, 3.4)
pt3dadd(-25.76, -10.02, -58.8, 3.4)
pt3dadd(-25.94, -10.02, -58.8, 3.4)
pt3dadd(-25.99, -10.07, -58.8, 3.4)
pt3dadd(-26.03, -10.13, -58.8, 3.4)
pt3dadd(-26.12, -10.13, -58.8, 3.4)
pt3dadd(-26.21, -10.18, -58.8, 3.4)
pt3dadd(-26.25, -10.23, -58.8, 3.4)
pt3dadd(-26.39, -10.23, -58.8, 3.4)
pt3dadd(-26.43, -10.28, -58.8, 3.4)
pt3dadd(-26.57, -10.28, -58.8, 3.4)
pt3dadd(-26.61, -10.33, -58.8, 3.4)
pt3dadd(-26.79, -10.33, -58.8, 3.4)
pt3dadd(-26.83, -10.38, -58.8, 3.4)
pt3dadd(-26.88, -10.43, -58.8, 3.4)
pt3dadd(-27.01, -10.43, -58.8, 3.4)
pt3dadd(-27.06, -10.48, -58.8, 3.4)
pt3dadd(-27.15, -10.53, -58.8, 3.4)
pt3dadd(-27.19, -10.58, -58.8, 3.4)
pt3dadd(-27.24, -10.63, -58.8, 3.4)
pt3dadd(-27.28, -10.68, -58.8, 3.4)
pt3dadd(-27.37, -10.73, -58.8, 3.4)
pt3dadd(-27.42, -10.78, -58.8, 3.4)
pt3dadd(-27.46, -10.84, -58.8, 3.4)
pt3dadd(-27.5, -10.94, -58.8, 3.4)
pt3dadd(-27.64, -11.09, -58.8, 3.4)
pt3dadd(-27.73, -11.14, -58.8, 3.4)
pt3dadd(-27.86, -11.14, -58.8, 3.4)
pt3dadd(-27.73, -11.19, -57.75, 3.4)
pt3dadd(-27.82, -11.24, -57.75, 3.4)
pt3dadd(-27.82, -11.34, -57.75, 3.4)
pt3dadd(-27.86, -11.34, -57.75, 3.4)
pt3dadd(-27.86, -11.44, -57.75, 3.23)
pt3dadd(-27.91, -11.49, -57.75, 3.23)
pt3dadd(-27.99, -11.59, -57.75, 3.23)
pt3dadd(-28.04, -11.65, -57.75, 3.23)
pt3dadd(-28.08, -11.69, -57.75, 3.23)
pt3dadd(-28.13, -11.74, -57.75, 3.23)
pt3dadd(-28.17, -11.8, -57.75, 3.23)
pt3dadd(-28.22, -11.85, -57.75, 3.23)
pt3dadd(-28.26, -11.9, -57.75, 3.23)
pt3dadd(-28.31, -11.95, -57.75, 3.23)
pt3dadd(-28.35, -12, -57.75, 3.23)
pt3dadd(-28.4, -12.05, -57.75, 3.23)
pt3dadd(-28.44, -12.1, -57.75, 3.23)
pt3dadd(-28.49, -12.15, -57.75, 3.23)
pt3dadd(-28.57, -12.2, -57.75, 3.23)
pt3dadd(-28.62, -12.25, -57.75, 3.23)
pt3dadd(-28.66, -12.3, -57.75, 3.23)
pt3dadd(-28.75, -12.35, -57.75, 3.23)
pt3dadd(-28.84, -12.45, -57.75, 3.23)
pt3dadd(-28.89, -12.51, -57.75, 3.23)
pt3dadd(-28.93, -12.56, -57.75, 3.23)
pt3dadd(-29.02, -12.6, -57.75, 3.23)
pt3dadd(-29.06, -12.66, -57.75, 3.23)
pt3dadd(-29.15, -12.76, -57.75, 3.23)
pt3dadd(-29.2, -12.81, -57.75, 3.23)
pt3dadd(-29.29, -12.86, -57.75, 3.23)
pt3dadd(-29.42, -13.01, -57.75, 3.23)
pt3dadd(-29.47, -13.06, -57.75, 3.23)
pt3dadd(-29.56, -13.21, -57.75, 3.23)
pt3dadd(-29.69, -13.36, -57.75, 3.23)
pt3dadd(-29.73, -13.42, -57.75, 3.23)
pt3dadd(-29.78, -13.52, -57.75, 3.23)
pt3dadd(-29.86, -13.57, -57.75, 3.23)
pt3dadd(-29.91, -13.67, -57.75, 3.23)
pt3dadd(-29.95, -13.72, -57.75, 3.23)
pt3dadd(-30.05, -13.82, -57.75, 3.23)
pt3dadd(-30.09, -13.92, -57.75, 3.23)
pt3dadd(-30.13, -13.97, -57.75, 3.23)
pt3dadd(-30.18, -14.02, -57.75, 3.23)
pt3dadd(-30.22, -14.07, -57.75, 3.23)
pt3dadd(-30.31, -14.13, -57.75, 3.23)
pt3dadd(-30.36, -14.23, -57.75, 3.23)
pt3dadd(-30.4, -14.28, -57.75, 3.23)
pt3dadd(-30.49, -14.33, -57.75, 3.23)
pt3dadd(-30.53, -14.43, -57.75, 3.23)
pt3dadd(-30.58, -14.48, -57.75, 3.23)
pt3dadd(-30.67, -14.58, -57.75, 3.23)
pt3dadd(-30.71, -14.63, -57.75, 3.23)
pt3dadd(-30.76, -14.73, -57.75, 3.23)
pt3dadd(-30.93, -14.94, -57.75, 3.23)
pt3dadd(-30.98, -14.98, -57.75, 3.23)
pt3dadd(-31.02, -15.09, -57.75, 3.23)
pt3dadd(-31.07, -15.14, -57.75, 3.23)
pt3dadd(-31.25, -15.34, -57.75, 3.23)
pt3dadd(-31.29, -15.39, -57.75, 3.23)
pt3dadd(-31.34, -15.49, -57.75, 3.23)
pt3dadd(-31.42, -15.54, -57.75, 3.23)
pt3dadd(-31.51, -15.65, -57.75, 3.23)
pt3dadd(-31.56, -15.69, -57.75, 3.23)
pt3dadd(-31.6, -15.74, -57.75, 3.23)
pt3dadd(-31.65, -15.8, -57.75, 3.23)
pt3dadd(-31.69, -15.85, -57.75, 3.23)
pt3dadd(-31.78, -15.9, -57.75, 3.23)
pt3dadd(-31.87, -15.95, -57.75, 3.23)
pt3dadd(-31.92, -16, -57.75, 3.23)
pt3dadd(-31.96, -16.05, -57.75, 3.23)
pt3dadd(-31.96, -16, -57.75, 3.23)
pt3dadd(-31.87, -16.05, -55.65, 3.23)
pt3dadd(-31.87, -16.15, -55.65, 3.23)
pt3dadd(-31.92, -16.2, -55.65, 3.23)
pt3dadd(-31.96, -16.3, -55.65, 3.23)
pt3dadd(-32.05, -16.3, -55.65, 3.23)
pt3dadd(-32.05, -16.41, -55.65, 3.23)
pt3dadd(-32.14, -16.45, -55.65, 3.23)
pt3dadd(-32.19, -16.56, -55.65, 3.23)
pt3dadd(-32.23, -16.66, -55.65, 3.23)
pt3dadd(-32.27, -16.71, -55.65, 3.23)
pt3dadd(-32.32, -16.76, -55.65, 3.23)
pt3dadd(-32.36, -16.86, -55.65, 3.23)
pt3dadd(-32.41, -16.91, -55.65, 3.23)
pt3dadd(-32.49, -17.01, -55.65, 3.23)
pt3dadd(-32.54, -17.06, -55.65, 3.23)
pt3dadd(-32.58, -17.16, -55.65, 3.23)
pt3dadd(-32.63, -17.26, -55.65, 3.23)
pt3dadd(-32.67, -17.32, -55.65, 3.23)
pt3dadd(-32.72, -17.36, -55.65, 3.23)
pt3dadd(-32.76, -17.47, -55.65, 3.23)
pt3dadd(-32.81, -17.57, -55.65, 3.23)
pt3dadd(-32.85, -17.67, -55.65, 3.23)
pt3dadd(-32.9, -17.72, -55.65, 3.23)
pt3dadd(-32.94, -17.82, -55.65, 3.23)
pt3dadd(-32.99, -17.87, -55.65, 3.23)
pt3dadd(-33.03, -17.97, -55.65, 3.23)
pt3dadd(-33.08, -18.02, -55.65, 3.23)
pt3dadd(-33.17, -18.13, -55.65, 3.23)
pt3dadd(-33.21, -18.23, -55.65, 3.23)
pt3dadd(-33.26, -18.33, -55.65, 3.23)
pt3dadd(-33.3, -18.38, -55.65, 3.23)
pt3dadd(-33.34, -18.48, -55.65, 3.23)
pt3dadd(-33.39, -18.58, -55.65, 3.23)
pt3dadd(-33.43, -18.68, -55.65, 3.23)
pt3dadd(-33.48, -18.73, -55.65, 3.23)
pt3dadd(-33.52, -18.83, -55.65, 3.23)
pt3dadd(-33.56, -18.93, -55.65, 3.23)
pt3dadd(-33.61, -19.04, -55.65, 3.23)
pt3dadd(-33.65, -19.14, -55.65, 3.23)
pt3dadd(-33.7, -19.24, -55.65, 3.23)
pt3dadd(-33.74, -19.34, -55.65, 3.23)
pt3dadd(-33.79, -19.44, -55.65, 3.23)
pt3dadd(-33.79, -19.54, -55.65, 3.23)
pt3dadd(-33.83, -19.65, -55.65, 3.23)
pt3dadd(-33.88, -19.75, -55.65, 3.23)
pt3dadd(-33.88, -19.9, -55.65, 3.23)
pt3dadd(-33.92, -20, -55.65, 3.23)
pt3dadd(-33.97, -20.15, -55.65, 3.23)
pt3dadd(-34.01, -20.25, -55.65, 3.23)
pt3dadd(-34.01, -20.35, -55.65, 3.23)
pt3dadd(-34.06, -20.35, -55.65, 3.23)
}
dend[40] {pt3dclear()
pt3dadd(57.42, 88.16, -57.75, 3.57)
pt3dadd(57.03, 88.36, -26.25, 3.57)
pt3dadd(54.04, 88.36, -26.25, 3.57)
pt3dadd(53.99, 88.21, -24.15, 3.57)
pt3dadd(53.19, 88.21, -24.15, 3.57)
pt3dadd(53.06, 88.26, -24.15, 3.57)
pt3dadd(52.88, 88.26, -24.15, 3.57)
pt3dadd(52.7, 88.36, -24.15, 3.57)
pt3dadd(52.48, 88.36, -24.15, 3.57)
pt3dadd(52.39, 88.42, -24.15, 3.57)
pt3dadd(52.35, 88.46, -24.15, 3.57)
pt3dadd(52.21, 88.46, -24.15, 3.57)
pt3dadd(52.08, 88.51, -24.15, 3.57)
pt3dadd(51.99, 88.57, -24.15, 3.57)
pt3dadd(51.9, 88.62, -24.15, 3.57)
pt3dadd(51.81, 88.67, -24.15, 3.57)
pt3dadd(51.72, 88.72, -24.15, 3.57)
pt3dadd(51.63, 88.77, -24.15, 3.57)
pt3dadd(51.54, 88.82, -24.15, 3.57)
pt3dadd(51.45, 88.87, -24.15, 3.57)
pt3dadd(51.36, 88.92, -24.15, 3.57)
pt3dadd(51.32, 88.97, -24.15, 3.57)
pt3dadd(51.19, 89.02, -24.15, 3.57)
pt3dadd(51.1, 89.07, -24.15, 3.57)
pt3dadd(51.01, 89.07, -24.15, 3.57)
pt3dadd(50.92, 89.12, -24.15, 3.57)
pt3dadd(50.78, 89.17, -24.15, 3.57)
pt3dadd(50.69, 89.22, -24.15, 3.57)
pt3dadd(50.6, 89.28, -24.15, 3.57)
pt3dadd(50.51, 89.32, -24.15, 3.57)
pt3dadd(50.43, 89.38, -24.15, 3.57)
pt3dadd(50.34, 89.38, -24.15, 3.57)
pt3dadd(50.25, 89.43, -24.15, 3.57)
pt3dadd(50.16, 89.48, -24.15, 3.57)
pt3dadd(50.12, 89.53, -24.15, 3.57)
pt3dadd(50.03, 89.53, -24.15, 3.57)
pt3dadd(49.94, 89.58, -24.15, 3.57)
pt3dadd(49.89, 89.63, -24.15, 3.57)
pt3dadd(49.85, 89.68, -24.15, 3.57)
pt3dadd(49.76, 89.73, -24.15, 3.57)
pt3dadd(49.67, 89.78, -24.15, 3.57)
pt3dadd(49.63, 89.83, -24.15, 3.57)
pt3dadd(49.53, 89.88, -24.15, 3.57)
pt3dadd(49.44, 89.88, -24.15, 3.57)
pt3dadd(49.36, 89.93, -24.15, 3.57)
pt3dadd(49.31, 89.98, -24.15, 3.57)
pt3dadd(49.22, 90.04, -24.15, 3.57)
}
}
proc shape3d_48() {
dend[40] { pt3dadd(49.13, 90.04, -24.15, 3.57)
pt3dadd(49.04, 90.14, -24.15, 3.57)
pt3dadd(48.96, 90.14, -24.15, 3.57)
pt3dadd(48.91, 90.18, -24.15, 3.57)
pt3dadd(48.87, 90.24, -24.15, 3.57)
pt3dadd(48.78, 90.24, -24.15, 3.57)
pt3dadd(48.69, 90.29, -24.15, 3.57)
pt3dadd(48.6, 90.34, -24.15, 3.57)
pt3dadd(48.51, 90.39, -24.15, 3.57)
pt3dadd(48.38, 90.44, -24.15, 3.57)
pt3dadd(48.2, 90.54, -24.15, 3.57)
pt3dadd(48.11, 90.54, -24.15, 3.57)
pt3dadd(48.06, 90.59, -24.15, 3.57)
pt3dadd(47.97, 90.59, -24.15, 3.57)
pt3dadd(47.93, 90.64, -24.15, 3.57)
pt3dadd(47.84, 90.69, -24.15, 3.57)
pt3dadd(47.8, 90.74, -24.15, 3.57)
pt3dadd(47.71, 90.79, -24.15, 3.57)
pt3dadd(47.57, 90.79, -24.15, 3.57)
pt3dadd(47.53, 90.85, -24.15, 3.57)
pt3dadd(47.49, 90.89, -24.15, 3.57)
pt3dadd(47.4, 90.89, -24.15, 3.57)
pt3dadd(47.31, 90.94, -24.15, 3.57)
pt3dadd(47.22, 91, -24.15, 3.57)
pt3dadd(47.13, 91.05, -24.15, 3.57)
pt3dadd(47.08, 91.1, -24.15, 3.57)
pt3dadd(47.04, 91.15, -24.15, 3.57)
pt3dadd(46.99, 91.2, -24.15, 3.57)
pt3dadd(46.9, 91.2, -24.15, 3.57)
pt3dadd(46.86, 91.25, -24.15, 3.57)
pt3dadd(46.81, 91.3, -24.15, 3.57)
pt3dadd(46.81, 91.3, -21, 3.57)
pt3dadd(46.73, 91.35, -21, 3.57)
pt3dadd(46.68, 91.4, -21, 3.57)
pt3dadd(46.59, 91.45, -21, 3.57)
pt3dadd(46.55, 91.55, -21, 3.57)
pt3dadd(46.46, 91.61, -21, 3.57)
pt3dadd(46.37, 91.65, -21, 3.57)
pt3dadd(46.28, 91.75, -21, 3.57)
pt3dadd(46.24, 91.81, -21, 3.57)
pt3dadd(46.24, 91.91, -21, 3.57)
pt3dadd(46.15, 91.91, -21, 3.57)
pt3dadd(46.1, 91.96, -21, 3.57)
pt3dadd(46.06, 92.01, -21, 3.57)
pt3dadd(46.01, 92.06, -21, 3.57)
pt3dadd(45.97, 92.11, -21, 3.57)
pt3dadd(45.88, 92.16, -21, 3.57)
pt3dadd(45.79, 92.21, -21, 3.57)
pt3dadd(45.74, 92.26, -21, 3.57)
pt3dadd(45.66, 92.26, -21, 3.57)
pt3dadd(45.52, 92.31, -21, 3.57)
pt3dadd(45.43, 92.31, -21, 3.57)
pt3dadd(45.35, 92.36, -21, 3.57)
pt3dadd(45.12, 92.36, -21, 3.57)
pt3dadd(45.03, 92.42, -21, 3.57)
pt3dadd(44.36, 92.42, -21, 3.57)
pt3dadd(44.28, 92.46, -21, 3.57)
pt3dadd(44.05, 92.46, -21, 3.57)
pt3dadd(43.96, 92.51, -21, 3.57)
pt3dadd(43.56, 92.51, -21, 3.57)
pt3dadd(43.38, 92.57, -21, 3.57)
pt3dadd(43.25, 92.57, -21, 3.57)
pt3dadd(43.16, 92.62, -21, 3.57)
pt3dadd(42.94, 92.62, -21, 3.57)
pt3dadd(42.85, 92.67, -21, 3.57)
pt3dadd(42.72, 92.67, -21, 3.57)
pt3dadd(42.67, 92.72, -21, 3.57)
pt3dadd(42.53, 92.72, -21, 3.57)
pt3dadd(42.45, 92.77, -21, 3.57)
pt3dadd(42.4, 92.82, -21, 3.57)
pt3dadd(42.31, 92.82, -21, 3.57)
pt3dadd(42.22, 92.87, -21, 3.57)
pt3dadd(42.13, 92.92, -21, 3.57)
pt3dadd(42.04, 92.92, -21, 3.57)
pt3dadd(41.96, 92.97, -21, 3.57)
pt3dadd(41.82, 92.97, -21, 3.57)
pt3dadd(41.73, 93.02, -21, 3.57)
pt3dadd(41.6, 93.07, -21, 3.57)
pt3dadd(41.42, 93.07, -21, 3.57)
pt3dadd(41.33, 93.12, -21, 3.57)
pt3dadd(39.19, 93.12, -21, 3.57)
pt3dadd(39.1, 93.17, -21, 3.57)
pt3dadd(38.97, 93.17, -21, 3.57)
pt3dadd(38.83, 93.22, -21, 3.57)
pt3dadd(38.74, 93.22, -21, 3.57)
pt3dadd(38.57, 93.32, -21, 3.57)
pt3dadd(38.48, 93.38, -21, 3.57)
pt3dadd(38.35, 93.38, -21, 3.57)
pt3dadd(38.3, 93.43, -21, 3.57)
pt3dadd(38.21, 93.48, -21, 3.57)
pt3dadd(38.08, 93.53, -21, 3.57)
pt3dadd(37.94, 93.58, -21, 3.57)
pt3dadd(37.85, 93.63, -21, 3.57)
pt3dadd(37.72, 93.73, -21, 3.57)
pt3dadd(37.63, 93.83, -21, 3.57)
pt3dadd(37.5, 93.93, -21, 3.57)
pt3dadd(37.41, 93.99, -21, 3.57)
pt3dadd(37.28, 94.04, -21, 3.57)
pt3dadd(37.14, 94.14, -21, 3.57)
pt3dadd(37.05, 94.19, -21, 3.57)
pt3dadd(37.01, 94.24, -21, 3.57)
pt3dadd(36.88, 94.29, -21, 3.57)
pt3dadd(36.78, 94.34, -21, 3.57)
pt3dadd(36.69, 94.44, -21, 3.57)
pt3dadd(36.65, 94.49, -21, 3.57)
pt3dadd(36.56, 94.54, -21, 3.57)
pt3dadd(36.47, 94.54, -21, 3.57)
pt3dadd(36.38, 94.59, -21, 3.57)
pt3dadd(36.29, 94.64, -21, 3.57)
pt3dadd(36.21, 94.69, -21, 3.57)
pt3dadd(36.12, 94.69, -21, 3.57)
pt3dadd(36.07, 94.74, -21, 3.57)
pt3dadd(35.94, 94.74, -21, 3.57)
pt3dadd(35.81, 94.79, -21, 3.57)
pt3dadd(35.54, 94.79, -21, 3.57)
pt3dadd(35.45, 94.85, -21, 3.57)
pt3dadd(35.09, 94.85, -21, 3.57)
pt3dadd(34.96, 94.89, -21, 3.57)
pt3dadd(34.74, 94.89, -21, 3.57)
pt3dadd(34.65, 94.94, -21, 3.57)
pt3dadd(34.11, 94.94, -21, 3.57)
pt3dadd(33.97, 95, -21, 3.57)
pt3dadd(33.75, 95, -21, 3.57)
pt3dadd(33.67, 95.05, -21, 3.57)
pt3dadd(33.53, 95.05, -21, 3.57)
pt3dadd(33.49, 95.1, -21, 3.57)
pt3dadd(33.4, 95.1, -21, 3.57)
pt3dadd(33.35, 95.15, -21, 3.57)
pt3dadd(33.26, 95.15, -21, 3.57)
pt3dadd(33.22, 95.2, -21, 3.57)
pt3dadd(33.17, 95.25, -21, 3.57)
pt3dadd(33.13, 95.25, -21, 3.57)
pt3dadd(32.99, 95.4, -21, 3.06)
pt3dadd(32.95, 95.45, -21, 3.06)
pt3dadd(32.9, 95.5, -21, 3.06)
pt3dadd(32.86, 95.55, -21, 3.06)
pt3dadd(32.77, 95.55, -21, 3.06)
pt3dadd(32.73, 95.61, -21, 3.06)
pt3dadd(32.64, 95.65, -21, 3.06)
pt3dadd(32.6, 95.71, -21, 3.06)
pt3dadd(32.55, 95.75, -21, 3.06)
pt3dadd(32.51, 95.86, -21, 3.06)
pt3dadd(32.42, 95.86, -21, 3.06)
pt3dadd(32.37, 95.91, -21, 3.06)
pt3dadd(32.33, 95.96, -21, 3.06)
pt3dadd(32.28, 96.01, -21, 3.06)
pt3dadd(32.24, 96.06, -21, 3.06)
pt3dadd(32.19, 96.16, -21, 3.06)
pt3dadd(32.1, 96.21, -21, 3.06)
pt3dadd(32.01, 96.31, -21, 3.06)
pt3dadd(31.97, 96.36, -21, 3.06)
pt3dadd(31.88, 96.42, -21, 3.06)
pt3dadd(31.66, 96.67, -21, 3.06)
pt3dadd(31.52, 96.77, -21, 3.06)
pt3dadd(31.43, 96.82, -21, 3.06)
pt3dadd(31.34, 96.87, -21, 3.06)
pt3dadd(31.26, 96.92, -21, 3.06)
pt3dadd(31.17, 96.97, -21, 3.06)
pt3dadd(31.08, 97.02, -21, 3.06)
pt3dadd(30.94, 97.07, -21, 3.06)
pt3dadd(30.85, 97.18, -21, 3.06)
pt3dadd(30.76, 97.22, -21, 3.06)
pt3dadd(30.68, 97.22, -21, 3.06)
pt3dadd(30.59, 97.32, -21, 3.06)
pt3dadd(30.5, 97.38, -21, 3.06)
pt3dadd(30.36, 97.43, -21, 3.06)
pt3dadd(30.23, 97.48, -21, 3.06)
pt3dadd(30.14, 97.53, -21, 3.06)
pt3dadd(30.05, 97.58, -21, 3.06)
pt3dadd(29.92, 97.68, -21, 3.06)
pt3dadd(29.83, 97.73, -21, 3.06)
pt3dadd(29.69, 97.78, -21, 3.06)
pt3dadd(29.56, 97.83, -21, 3.06)
pt3dadd(29.47, 97.93, -21, 3.06)
pt3dadd(29.3, 97.99, -21, 3.06)
pt3dadd(29.16, 98.04, -21, 3.06)
pt3dadd(28.94, 98.19, -21, 3.06)
pt3dadd(28.76, 98.24, -21, 3.06)
pt3dadd(28.63, 98.34, -21, 3.06)
pt3dadd(28.54, 98.34, -21, 3.06)
pt3dadd(28.4, 98.39, -21, 3.06)
pt3dadd(28.27, 98.49, -21, 3.06)
pt3dadd(28.23, 98.54, -21, 3.06)
pt3dadd(28.09, 98.59, -21, 3.06)
pt3dadd(28, 98.64, -21, 3.06)
pt3dadd(27.87, 98.74, -21, 3.06)
pt3dadd(27.78, 98.79, -21, 3.06)
pt3dadd(27.65, 98.85, -21, 3.06)
pt3dadd(27.56, 98.89, -21, 3.06)
pt3dadd(27.51, 98.95, -21, 3.06)
pt3dadd(27.42, 99.05, -21, 3.06)
pt3dadd(27.29, 99.1, -21, 3.06)
pt3dadd(27.25, 99.15, -21, 3.06)
pt3dadd(27.16, 99.15, -21, 3.06)
pt3dadd(27.07, 99.2, -21, 3.06)
pt3dadd(26.98, 99.25, -21, 3.06)
pt3dadd(26.93, 99.3, -21, 3.06)
pt3dadd(26.89, 99.35, -21, 3.06)
pt3dadd(26.8, 99.45, -21, 3.06)
pt3dadd(26.75, 99.5, -21, 3.06)
}
}
proc shape3d_49() {
dend[40] { pt3dadd(26.67, 99.56, -21, 3.06)
pt3dadd(26.62, 99.61, -21, 3.06)
pt3dadd(26.58, 99.71, -21, 3.06)
pt3dadd(26.49, 99.76, -21, 3.06)
pt3dadd(26.44, 99.86, -21, 3.06)
pt3dadd(26.4, 99.91, -21, 3.06)
pt3dadd(26.35, 99.96, -21, 3.06)
pt3dadd(26.26, 100.01, -21, 3.06)
pt3dadd(26.22, 100.06, -21, 3.06)
pt3dadd(26.13, 100.16, -21, 3.06)
pt3dadd(26.08, 100.21, -21, 3.06)
pt3dadd(26.08, 100.31, -21, 3.06)
pt3dadd(26.04, 100.36, -21, 3.06)
pt3dadd(25.95, 100.46, -21, 3.06)
pt3dadd(25.91, 100.51, -21, 3.06)
pt3dadd(25.91, 100.62, -21, 3.06)
pt3dadd(25.86, 100.67, -21, 3.06)
pt3dadd(25.82, 100.72, -21, 3.06)
pt3dadd(25.77, 100.82, -21, 3.06)
pt3dadd(25.68, 100.87, -21, 3.06)
pt3dadd(25.68, 100.97, -21, 3.06)
pt3dadd(25.64, 101.02, -21, 3.06)
pt3dadd(25.59, 101.07, -21, 3.06)
pt3dadd(25.55, 101.18, -21, 3.06)
pt3dadd(25.5, 101.22, -21, 3.06)
pt3dadd(25.42, 101.28, -21, 3.06)
pt3dadd(25.42, 101.38, -21, 3.06)
pt3dadd(25.33, 101.43, -21, 3.06)
pt3dadd(25.28, 101.48, -21, 3.06)
pt3dadd(25.24, 101.58, -21, 3.06)
pt3dadd(25.19, 101.63, -21, 3.06)
pt3dadd(25.1, 101.68, -21, 3.06)
pt3dadd(25.06, 101.73, -21, 3.06)
pt3dadd(25.01, 101.78, -21, 3.06)
pt3dadd(24.97, 101.88, -21, 3.06)
pt3dadd(24.92, 101.93, -21, 3.06)
pt3dadd(24.88, 101.99, -21, 3.06)
pt3dadd(24.84, 102.04, -21, 3.06)
pt3dadd(24.75, 102.08, -21, 3.06)
pt3dadd(24.7, 102.14, -21, 3.06)
pt3dadd(24.66, 102.19, -21, 3.06)
pt3dadd(24.61, 102.24, -21, 3.06)
pt3dadd(24.57, 102.34, -21, 3.06)
pt3dadd(24.52, 102.39, -21, 3.06)
pt3dadd(24.48, 102.44, -21, 3.06)
pt3dadd(24.39, 102.49, -21, 3.06)
pt3dadd(24.3, 102.59, -21, 3.06)
pt3dadd(24.26, 102.64, -21, 3.06)
pt3dadd(24.21, 102.69, -21, 3.06)
pt3dadd(24.12, 102.75, -21, 3.06)
pt3dadd(24.03, 102.79, -21, 3.06)
pt3dadd(23.94, 102.85, -21, 3.06)
pt3dadd(23.9, 102.89, -21, 3.06)
pt3dadd(23.81, 102.89, -21, 3.06)
pt3dadd(23.72, 102.95, -21, 3.06)
pt3dadd(23.63, 103.05, -21, 3.06)
pt3dadd(23.54, 103.05, -21, 3.06)
pt3dadd(23.5, 103.15, -21, 3.06)
pt3dadd(23.41, 103.15, -21, 3.06)
pt3dadd(23.32, 103.2, -21, 3.06)
pt3dadd(23.19, 103.25, -21, 3.06)
pt3dadd(23.1, 103.3, -21, 3.06)
pt3dadd(23.01, 103.3, -21, 3.06)
pt3dadd(22.97, 103.35, -21, 3.06)
pt3dadd(22.88, 103.4, -21, 3.06)
pt3dadd(22.7, 103.45, -21, 3.06)
pt3dadd(22.52, 103.45, -21, 3.06)
pt3dadd(22.43, 103.5, -21, 3.06)
pt3dadd(22.3, 103.5, -21, 3.06)
pt3dadd(22.2, 103.56, -21, 3.06)
pt3dadd(22.07, 103.56, -21, 3.06)
pt3dadd(21.98, 103.61, -21, 3.06)
pt3dadd(21.85, 103.61, -21, 3.06)
pt3dadd(21.76, 103.65, -21, 3.06)
pt3dadd(21.67, 103.71, -21, 3.06)
pt3dadd(21.58, 103.71, -21, 3.06)
pt3dadd(21.49, 103.76, -21, 3.06)
pt3dadd(21.4, 103.86, -21, 3.06)
pt3dadd(21.36, 103.91, -21, 3.06)
pt3dadd(21.27, 103.96, -21, 3.06)
pt3dadd(21.23, 104.01, -21, 3.06)
pt3dadd(21.14, 104.01, -21, 3.06)
pt3dadd(21.09, 104.11, -21, 3.06)
pt3dadd(21.05, 104.16, -21, 3.06)
pt3dadd(20.96, 104.21, -21, 3.06)
pt3dadd(20.87, 104.31, -21, 3.06)
pt3dadd(20.78, 104.36, -21, 3.06)
pt3dadd(20.74, 104.46, -21, 3.06)
pt3dadd(20.65, 104.52, -21, 3.06)
pt3dadd(20.56, 104.57, -21, 3.06)
pt3dadd(20.47, 104.67, -21, 3.06)
pt3dadd(20.38, 104.72, -21, 3.06)
pt3dadd(20.33, 104.82, -21, 3.06)
pt3dadd(20.29, 104.87, -21, 3.06)
pt3dadd(20.2, 104.92, -21, 3.06)
pt3dadd(20.11, 104.97, -21, 3.06)
pt3dadd(20.02, 105.02, -21, 3.06)
pt3dadd(18.77, 105.02, -21, 3.06)
pt3dadd(18.68, 104.97, -21, 3.06)
pt3dadd(18.33, 104.97, -21, 3.06)
pt3dadd(18.19, 104.92, -21, 3.06)
pt3dadd(18.1, 104.87, -21, 3.06)
pt3dadd(18.19, 104.77, -22.05, 3.06)
pt3dadd(16.99, 104.77, -22.05, 3.06)
pt3dadd(16.9, 104.82, -22.05, 3.06)
pt3dadd(16.81, 104.82, -22.05, 3.06)
pt3dadd(16.72, 104.87, -22.05, 3.06)
pt3dadd(16.68, 104.92, -22.05, 3.06)
pt3dadd(16.55, 104.97, -22.05, 3.06)
pt3dadd(16.45, 104.97, -22.05, 3.06)
pt3dadd(16.36, 105.02, -22.05, 3.06)
pt3dadd(16.28, 105.07, -22.05, 3.06)
pt3dadd(16.19, 105.18, -22.05, 3.06)
pt3dadd(16.1, 105.18, -22.05, 3.06)
pt3dadd(16.01, 105.22, -22.05, 3.06)
pt3dadd(15.88, 105.28, -22.05, 3.06)
pt3dadd(15.83, 105.33, -22.05, 3.06)
pt3dadd(15.74, 105.38, -22.05, 3.06)
pt3dadd(15.56, 105.38, -22.05, 3.06)
pt3dadd(15.48, 105.43, -22.05, 3.06)
pt3dadd(15.34, 105.48, -22.05, 3.06)
pt3dadd(15.12, 105.48, -22.05, 3.06)
pt3dadd(15.07, 105.53, -22.05, 3.06)
pt3dadd(12.76, 105.53, -22.05, 3.06)
pt3dadd(12.66, 105.48, -22.05, 3.06)
pt3dadd(12.58, 105.48, -22.05, 3.06)
pt3dadd(12.44, 105.43, -22.05, 3.06)
pt3dadd(12.4, 105.38, -22.05, 3.06)
pt3dadd(12.31, 105.33, -22.05, 3.06)
pt3dadd(12.18, 105.33, -22.05, 3.06)
pt3dadd(12.09, 105.28, -22.05, 3.06)
pt3dadd(11.95, 105.22, -22.05, 3.06)
pt3dadd(11.86, 105.22, -22.05, 3.06)
pt3dadd(11.77, 105.18, -22.05, 3.06)
pt3dadd(11.69, 105.13, -22.05, 3.06)
pt3dadd(11.55, 105.07, -22.05, 3.06)
pt3dadd(11.42, 105.02, -22.05, 3.06)
pt3dadd(11.33, 104.97, -22.05, 3.06)
pt3dadd(11.15, 104.87, -22.05, 3.06)
pt3dadd(11.06, 104.87, -22.05, 3.06)
pt3dadd(10.97, 104.82, -22.05, 3.06)
pt3dadd(10.88, 104.77, -22.05, 3.06)
pt3dadd(10.75, 104.72, -22.05, 3.06)
pt3dadd(10.66, 104.67, -22.05, 3.06)
pt3dadd(10.52, 104.67, -22.05, 3.06)
pt3dadd(10.48, 104.62, -22.05, 3.06)
pt3dadd(10.39, 104.57, -22.05, 3.06)
pt3dadd(10.3, 104.52, -22.05, 3.06)
pt3dadd(10.21, 104.52, -22.05, 3.06)
pt3dadd(10.13, 104.42, -22.05, 3.06)
pt3dadd(10.03, 104.42, -22.05, 3.06)
pt3dadd(9.94, 104.36, -22.05, 3.06)
pt3dadd(9.86, 104.31, -22.05, 3.06)
pt3dadd(9.77, 104.26, -22.05, 3.06)
pt3dadd(9.68, 104.21, -22.05, 3.06)
pt3dadd(9.59, 104.21, -22.05, 3.06)
pt3dadd(9.5, 104.16, -22.05, 3.06)
pt3dadd(9.41, 104.11, -22.05, 3.06)
pt3dadd(9.37, 104.06, -22.05, 3.06)
pt3dadd(9.32, 104.01, -22.05, 3.06)
pt3dadd(9.23, 104.01, -22.05, 3.06)
pt3dadd(9.19, 103.96, -22.05, 3.06)
pt3dadd(9.1, 103.91, -22.05, 3.06)
pt3dadd(9.01, 103.86, -22.05, 3.06)
pt3dadd(8.92, 103.81, -22.05, 3.06)
pt3dadd(8.83, 103.76, -22.05, 3.06)
pt3dadd(8.79, 103.71, -22.05, 3.06)
pt3dadd(8.7, 103.61, -22.05, 3.06)
pt3dadd(8.65, 103.56, -22.05, 3.06)
pt3dadd(8.61, 103.45, -22.05, 3.06)
pt3dadd(8.56, 103.4, -22.05, 3.06)
pt3dadd(8.52, 103.35, -22.05, 3.06)
pt3dadd(8.43, 103.25, -22.05, 3.06)
pt3dadd(8.12, 102.89, -22.05, 3.06)
pt3dadd(8.07, 102.85, -22.05, 3.06)
pt3dadd(7.99, 102.75, -22.05, 3.06)
pt3dadd(7.89, 102.59, -22.05, 3.06)
pt3dadd(7.85, 102.54, -22.05, 3.06)
pt3dadd(7.8, 102.49, -22.05, 3.06)
pt3dadd(7.72, 102.39, -22.05, 3.06)
pt3dadd(7.54, 102.29, -22.05, 3.06)
pt3dadd(7.41, 102.19, -22.05, 3.06)
pt3dadd(7.36, 102.08, -22.05, 3.06)
pt3dadd(7.23, 102.04, -22.05, 3.06)
pt3dadd(7.14, 101.93, -22.05, 3.06)
pt3dadd(7, 101.93, -22.05, 3.06)
pt3dadd(6.91, 101.88, -22.05, 3.06)
pt3dadd(6.82, 101.83, -22.05, 3.06)
pt3dadd(6.16, 101.83, -22.05, 3.06)
pt3dadd(6.07, 101.88, -22.05, 3.06)
pt3dadd(6.02, 101.93, -22.05, 3.06)
pt3dadd(5.93, 101.99, -22.05, 3.06)
pt3dadd(5.84, 101.99, -22.05, 3.06)
pt3dadd(5.76, 102.04, -22.05, 3.06)
pt3dadd(3.44, 102.04, -22.05, 3.06)
pt3dadd(3.35, 101.99, -22.05, 3.06)
pt3dadd(3.3, 101.93, -22.05, 3.06)
pt3dadd(3.21, 101.93, -22.05, 3.06)
pt3dadd(3.17, 101.88, -22.05, 3.06)
pt3dadd(3.08, 101.78, -22.05, 3.06)
}
}
proc shape3d_50() {
dend[40] { pt3dadd(3.04, 101.73, -22.05, 3.06)
pt3dadd(2.99, 101.68, -22.05, 3.06)
pt3dadd(2.9, 101.63, -22.05, 3.06)
pt3dadd(2.81, 101.53, -22.05, 3.06)
pt3dadd(2.77, 101.48, -22.05, 3.06)
pt3dadd(2.72, 101.43, -22.05, 3.06)
pt3dadd(2.59, 101.28, -22.05, 3.06)
pt3dadd(2.5, 101.28, -22.05, 3.06)
pt3dadd(2.46, 101.22, -22.05, 3.06)
pt3dadd(2.41, 101.18, -22.05, 3.06)
pt3dadd(2.37, 101.12, -22.05, 3.06)
pt3dadd(2.32, 101.02, -22.05, 3.06)
pt3dadd(2.28, 100.97, -22.05, 3.06)
pt3dadd(2.23, 100.92, -22.05, 3.06)
pt3dadd(2.14, 100.87, -22.05, 3.06)
pt3dadd(2.06, 100.82, -22.05, 3.06)
pt3dadd(2.01, 100.77, -22.05, 3.06)
pt3dadd(1.92, 100.77, -22.05, 3.06)
pt3dadd(1.88, 100.72, -22.05, 3.06)
pt3dadd(1.83, 100.67, -22.05, 3.06)
pt3dadd(1.74, 100.67, -22.05, 3.06)
pt3dadd(1.65, 100.62, -22.05, 3.06)
pt3dadd(1.52, 100.57, -22.05, 3.06)
pt3dadd(1.39, 100.51, -22.05, 3.06)
pt3dadd(1.3, 100.46, -22.05, 3.06)
pt3dadd(0.85, 100.46, -22.05, 3.06)
pt3dadd(0.76, 100.51, -22.05, 3.06)
pt3dadd(0.67, 100.62, -22.05, 3.06)
pt3dadd(0.63, 100.67, -22.05, 3.06)
pt3dadd(0.54, 100.77, -22.05, 3.06)
pt3dadd(0.5, 100.82, -22.05, 3.06)
pt3dadd(0.45, 100.92, -22.05, 3.06)
pt3dadd(0.41, 100.97, -22.05, 3.06)
pt3dadd(0.27, 101.12, -22.05, 3.06)
pt3dadd(0.23, 101.18, -22.05, 3.06)
pt3dadd(0.14, 101.28, -22.05, 3.06)
pt3dadd(0.09, 101.32, -22.05, 3.06)
pt3dadd(0.05, 101.38, -22.05, 3.06)
pt3dadd(-0.04, 101.43, -22.05, 3.06)
pt3dadd(-0.09, 101.48, -22.05, 3.06)
pt3dadd(-0.13, 101.58, -22.05, 3.06)
pt3dadd(-0.17, 101.63, -22.05, 3.06)
pt3dadd(-0.26, 101.63, -22.05, 3.06)
pt3dadd(-0.31, 101.73, -22.05, 3.06)
pt3dadd(-0.4, 101.73, -22.05, 3.06)
pt3dadd(-0.44, 101.83, -22.05, 3.06)
pt3dadd(-0.53, 101.83, -22.05, 3.06)
pt3dadd(-0.62, 101.93, -22.05, 3.06)
pt3dadd(-0.71, 101.99, -22.05, 3.06)
pt3dadd(-0.84, 102.08, -22.05, 3.06)
pt3dadd(-0.89, 102.14, -22.05, 3.06)
pt3dadd(-0.98, 102.19, -22.05, 3.06)
pt3dadd(-1.02, 102.29, -22.05, 3.06)
pt3dadd(-1.11, 102.34, -22.05, 3.06)
pt3dadd(-1.2, 102.39, -22.05, 3.06)
pt3dadd(-1.33, 102.44, -22.05, 3.06)
pt3dadd(-1.42, 102.49, -22.05, 3.06)
pt3dadd(-1.51, 102.54, -22.05, 3.06)
pt3dadd(-1.64, 102.54, -22.05, 3.06)
pt3dadd(-1.74, 102.59, -22.05, 3.06)
pt3dadd(-3.03, 102.59, -22.05, 3.06)
pt3dadd(-3.07, 102.54, -22.05, 3.06)
pt3dadd(-3.16, 102.49, -22.05, 3.06)
pt3dadd(-3.25, 102.49, -22.05, 3.06)
pt3dadd(-3.3, 102.44, -22.05, 3.06)
pt3dadd(-3.38, 102.44, -22.05, 3.06)
pt3dadd(-3.43, 102.39, -22.05, 3.06)
pt3dadd(-3.47, 102.34, -22.05, 3.06)
pt3dadd(-3.52, 102.29, -22.05, 3.06)
pt3dadd(-3.61, 102.29, -22.05, 3.06)
pt3dadd(-3.65, 102.24, -22.05, 3.06)
pt3dadd(-3.83, 102.24, -22.05, 3.06)
pt3dadd(-3.88, 102.19, -22.05, 3.06)
pt3dadd(-4.05, 102.19, -22.05, 3.06)
pt3dadd(-4.19, 102.14, -22.05, 3.06)
pt3dadd(-4.28, 102.14, -22.05, 3.06)
pt3dadd(-4.36, 102.08, -22.05, 3.06)
pt3dadd(-4.54, 102.08, -22.05, 3.06)
pt3dadd(-4.59, 102.04, -22.05, 3.06)
pt3dadd(-5.17, 102.04, -22.05, 3.06)
pt3dadd(-5.26, 101.99, -22.05, 3.06)
pt3dadd(-5.34, 101.93, -22.05, 3.06)
pt3dadd(-5.48, 101.93, -22.05, 3.06)
pt3dadd(-5.57, 101.88, -22.05, 3.06)
pt3dadd(-5.66, 101.83, -22.05, 3.06)
pt3dadd(-5.75, 101.83, -22.05, 3.06)
pt3dadd(-5.84, 101.78, -22.05, 3.06)
pt3dadd(-5.93, 101.78, -22.05, 3.06)
pt3dadd(-6.06, 101.73, -22.05, 3.06)
pt3dadd(-6.15, 101.68, -22.05, 3.06)
pt3dadd(-6.24, 101.63, -22.05, 3.06)
pt3dadd(-8.11, 101.63, -22.05, 3.06)
pt3dadd(-8.11, 101.48, -25.2, 2.72)
pt3dadd(-8.29, 101.48, -25.2, 2.72)
pt3dadd(-8.38, 101.43, -25.2, 2.72)
pt3dadd(-8.47, 101.38, -25.2, 2.72)
pt3dadd(-8.56, 101.32, -25.2, 2.72)
pt3dadd(-8.65, 101.28, -25.2, 2.72)
pt3dadd(-8.69, 101.22, -25.2, 2.72)
pt3dadd(-9.09, 101.22, -25.2, 2.72)
pt3dadd(-9.14, 101.18, -25.2, 2.72)
pt3dadd(-9.23, 101.12, -25.2, 2.72)
pt3dadd(-9.31, 101.07, -25.2, 2.72)
pt3dadd(-9.36, 101.02, -25.2, 2.72)
pt3dadd(-9.45, 100.97, -25.2, 2.72)
pt3dadd(-9.54, 100.92, -25.2, 2.72)
pt3dadd(-9.63, 100.82, -25.2, 2.72)
pt3dadd(-9.67, 100.77, -25.2, 2.72)
pt3dadd(-9.76, 100.67, -25.2, 2.72)
pt3dadd(-9.81, 100.62, -25.2, 2.72)
pt3dadd(-9.89, 100.57, -25.2, 2.72)
pt3dadd(-10.11, 100.31, -25.2, 2.72)
pt3dadd(-10.2, 100.21, -25.2, 2.72)
pt3dadd(-10.3, 100.16, -25.2, 2.72)
pt3dadd(-10.34, 100.11, -25.2, 2.72)
pt3dadd(-10.38, 100.01, -25.2, 2.72)
pt3dadd(-10.47, 99.96, -25.2, 2.72)
pt3dadd(-10.52, 99.86, -25.2, 2.72)
pt3dadd(-10.61, 99.81, -25.2, 2.72)
pt3dadd(-10.69, 99.65, -25.2, 2.72)
pt3dadd(-10.74, 99.61, -25.2, 2.72)
pt3dadd(-10.78, 99.56, -25.2, 2.72)
pt3dadd(-10.83, 99.45, -25.2, 2.72)
pt3dadd(-10.88, 99.35, -25.2, 2.72)
pt3dadd(-10.96, 99.3, -25.2, 2.72)
pt3dadd(-11.1, 99.15, -25.2, 2.72)
pt3dadd(-11.14, 99.1, -25.2, 2.72)
pt3dadd(-11.19, 99, -25.2, 2.72)
pt3dadd(-11.23, 98.89, -25.2, 2.72)
pt3dadd(-11.36, 98.74, -25.2, 2.72)
pt3dadd(-11.45, 98.64, -25.2, 2.72)
pt3dadd(-11.5, 98.54, -25.2, 2.72)
pt3dadd(-11.59, 98.44, -25.2, 2.72)
pt3dadd(-11.63, 98.34, -25.2, 2.72)
pt3dadd(-11.68, 98.29, -25.2, 2.72)
pt3dadd(-11.77, 98.19, -25.2, 2.72)
pt3dadd(-11.85, 98.04, -25.2, 2.72)
pt3dadd(-11.9, 97.93, -25.2, 2.72)
pt3dadd(-11.99, 97.83, -25.2, 2.72)
pt3dadd(-12.12, 97.68, -25.2, 2.72)
pt3dadd(-12.26, 97.53, -25.2, 2.72)
pt3dadd(-12.35, 97.38, -25.2, 2.72)
pt3dadd(-12.44, 97.28, -25.2, 2.72)
pt3dadd(-12.66, 97.02, -25.2, 2.72)
pt3dadd(-12.74, 96.92, -25.2, 2.72)
pt3dadd(-12.84, 96.82, -25.2, 2.72)
pt3dadd(-12.88, 96.72, -25.2, 2.72)
pt3dadd(-12.97, 96.62, -25.2, 2.72)
pt3dadd(-13.06, 96.57, -25.2, 2.72)
pt3dadd(-13.15, 96.46, -25.2, 2.72)
pt3dadd(-13.19, 96.36, -25.2, 2.72)
pt3dadd(-13.28, 96.31, -25.2, 2.72)
pt3dadd(-13.32, 96.26, -25.2, 2.72)
pt3dadd(-13.51, 96.21, -25.2, 2.72)
pt3dadd(-13.59, 96.11, -25.2, 2.72)
pt3dadd(-13.68, 96.01, -25.2, 2.72)
pt3dadd(-13.77, 95.96, -25.2, 2.72)
pt3dadd(-13.9, 95.86, -25.2, 2.72)
pt3dadd(-13.99, 95.75, -25.2, 2.72)
pt3dadd(-14.13, 95.71, -25.2, 2.72)
pt3dadd(-14.22, 95.65, -25.2, 2.72)
pt3dadd(-14.35, 95.55, -25.2, 2.72)
pt3dadd(-14.44, 95.5, -25.2, 2.72)
pt3dadd(-14.57, 95.45, -25.2, 2.72)
pt3dadd(-14.66, 95.4, -25.2, 2.72)
pt3dadd(-14.75, 95.35, -25.2, 2.72)
pt3dadd(-14.84, 95.3, -25.2, 2.72)
pt3dadd(-14.93, 95.25, -25.2, 2.72)
pt3dadd(-15.02, 95.2, -25.2, 2.72)
pt3dadd(-15.11, 95.15, -25.2, 2.72)
pt3dadd(-15.15, 95.1, -25.2, 2.72)
pt3dadd(-15.29, 95.1, -25.2, 2.72)
pt3dadd(-15.38, 95.05, -25.2, 2.72)
pt3dadd(-15.47, 95.05, -25.2, 2.72)
pt3dadd(-15.56, 95, -25.2, 2.72)
pt3dadd(-15.65, 94.89, -25.2, 2.72)
pt3dadd(-15.73, 94.85, -25.2, 2.72)
pt3dadd(-15.82, 94.85, -25.2, 2.72)
pt3dadd(-15.87, 94.79, -25.2, 2.72)
pt3dadd(-15.95, 94.79, -25.2, 2.72)
pt3dadd(-16.05, 94.74, -25.2, 2.72)
pt3dadd(-16.09, 94.74, -25.2, 2.72)
pt3dadd(-15.95, 94.64, -27.3, 2.55)
pt3dadd(-16.27, 94.64, -27.3, 2.55)
pt3dadd(-16.31, 94.59, -27.3, 2.55)
pt3dadd(-16.36, 94.54, -27.3, 2.55)
pt3dadd(-16.4, 94.49, -27.3, 2.55)
pt3dadd(-16.49, 94.49, -27.3, 2.55)
pt3dadd(-16.58, 94.44, -27.3, 2.55)
pt3dadd(-16.63, 94.39, -27.3, 2.55)
pt3dadd(-16.67, 94.34, -27.3, 2.55)
pt3dadd(-16.76, 94.29, -27.3, 2.55)
pt3dadd(-16.85, 94.24, -27.3, 2.55)
pt3dadd(-16.94, 94.19, -27.3, 2.55)
pt3dadd(-17.02, 94.14, -27.3, 2.55)
pt3dadd(-17.07, 94.08, -27.3, 2.55)
pt3dadd(-17.11, 93.99, -27.3, 2.55)
pt3dadd(-17.25, 93.83, -27.3, 2.55)
pt3dadd(-17.34, 93.73, -27.3, 2.55)
pt3dadd(-17.38, 93.68, -27.3, 2.55)
}
}
proc shape3d_51() {
dend[40] { pt3dadd(-17.47, 93.58, -27.3, 2.55)
pt3dadd(-17.52, 93.53, -27.3, 2.55)
pt3dadd(-17.74, 93.28, -27.3, 2.55)
pt3dadd(-17.78, 93.22, -27.3, 2.55)
pt3dadd(-17.87, 93.17, -27.3, 2.55)
pt3dadd(-17.92, 93.12, -27.3, 2.55)
pt3dadd(-18.05, 93.02, -27.3, 2.55)
pt3dadd(-18.23, 93.02, -27.3, 2.55)
pt3dadd(-18.36, 92.92, -27.3, 2.55)
pt3dadd(-18.5, 92.87, -27.3, 2.55)
pt3dadd(-18.63, 92.82, -27.3, 2.55)
pt3dadd(-18.67, 92.77, -27.3, 2.55)
pt3dadd(-18.76, 92.72, -27.3, 2.55)
pt3dadd(-18.85, 92.67, -27.3, 2.55)
pt3dadd(-19.21, 92.67, -27.3, 2.55)
pt3dadd(-19.34, 92.62, -27.3, 2.55)
pt3dadd(-19.43, 92.57, -27.3, 2.55)
pt3dadd(-19.52, 92.57, -27.3, 2.55)
pt3dadd(-19.57, 92.51, -27.3, 2.55)
pt3dadd(-19.66, 92.46, -27.3, 2.55)
pt3dadd(-19.83, 92.46, -27.3, 2.55)
pt3dadd(-19.92, 92.42, -27.3, 2.55)
pt3dadd(-20.06, 92.31, -27.3, 2.55)
pt3dadd(-20.15, 92.31, -27.3, 2.55)
pt3dadd(-20.24, 92.26, -27.3, 2.55)
pt3dadd(-20.33, 92.26, -27.3, 2.55)
pt3dadd(-20.42, 92.21, -27.3, 2.55)
pt3dadd(-20.5, 92.16, -27.3, 2.55)
pt3dadd(-20.59, 92.11, -27.3, 2.55)
pt3dadd(-20.77, 92.11, -27.3, 2.55)
pt3dadd(-20.82, 92.06, -27.3, 2.55)
pt3dadd(-20.95, 92.06, -27.3, 2.55)
pt3dadd(-21.04, 92.01, -27.3, 2.55)
pt3dadd(-21.17, 91.91, -27.3, 2.55)
pt3dadd(-21.35, 91.91, -27.3, 2.55)
pt3dadd(-21.44, 91.86, -27.3, 2.55)
pt3dadd(-21.53, 91.81, -27.3, 2.55)
pt3dadd(-21.66, 91.75, -27.3, 2.55)
pt3dadd(-21.75, 91.71, -27.3, 2.55)
pt3dadd(-21.89, 91.71, -27.3, 2.55)
pt3dadd(-21.98, 91.65, -27.3, 2.55)
pt3dadd(-22.2, 91.65, -27.3, 2.55)
pt3dadd(-22.29, 91.61, -27.3, 2.55)
pt3dadd(-22.38, 91.55, -27.3, 2.55)
pt3dadd(-22.47, 91.55, -27.3, 2.55)
pt3dadd(-22.6, 91.5, -27.3, 2.55)
pt3dadd(-23.31, 91.5, -27.3, 2.55)
pt3dadd(-23.14, 91.45, -30.45, 2.55)
pt3dadd(-24.25, 91.45, -30.45, 2.55)
pt3dadd(-24.29, 91.5, -30.45, 2.55)
pt3dadd(-24.38, 91.5, -30.45, 2.55)
pt3dadd(-24.43, 91.55, -30.45, 2.55)
pt3dadd(-24.47, 91.61, -30.45, 2.55)
pt3dadd(-24.51, 91.65, -30.45, 2.55)
pt3dadd(-24.56, 91.71, -30.45, 2.55)
pt3dadd(-24.65, 91.75, -30.45, 2.55)
pt3dadd(-24.74, 91.86, -30.45, 2.55)
pt3dadd(-24.78, 91.96, -30.45, 2.55)
pt3dadd(-24.87, 92.06, -30.45, 2.55)
pt3dadd(-24.96, 92.16, -30.45, 2.55)
pt3dadd(-25.01, 92.21, -30.45, 2.55)
pt3dadd(-25.09, 92.31, -30.45, 2.55)
pt3dadd(-25.18, 92.36, -30.45, 2.55)
pt3dadd(-25.23, 92.46, -30.45, 2.55)
pt3dadd(-25.32, 92.51, -30.45, 2.55)
pt3dadd(-25.36, 92.62, -30.45, 2.55)
pt3dadd(-25.45, 92.67, -30.45, 2.55)
pt3dadd(-25.67, 92.92, -30.45, 2.55)
pt3dadd(-25.76, 93.02, -30.45, 2.55)
pt3dadd(-25.85, 93.12, -30.45, 2.55)
pt3dadd(-25.94, 93.22, -30.45, 2.55)
pt3dadd(-26.03, 93.28, -30.45, 2.55)
pt3dadd(-26.08, 93.32, -30.45, 2.55)
pt3dadd(-26.21, 93.48, -30.45, 2.55)
pt3dadd(-26.3, 93.53, -30.45, 2.55)
pt3dadd(-26.39, 93.58, -30.45, 2.55)
pt3dadd(-26.43, 93.63, -30.45, 2.55)
pt3dadd(-26.52, 93.73, -30.45, 2.55)
pt3dadd(-26.66, 93.88, -30.45, 2.55)
pt3dadd(-26.75, 93.93, -30.45, 2.55)
pt3dadd(-26.83, 93.99, -30.45, 2.55)
pt3dadd(-26.88, 94.04, -30.45, 2.55)
pt3dadd(-26.97, 94.14, -30.45, 2.55)
pt3dadd(-27.06, 94.19, -30.45, 2.55)
pt3dadd(-27.15, 94.24, -30.45, 2.55)
pt3dadd(-27.24, 94.29, -30.45, 2.55)
pt3dadd(-27.33, 94.39, -30.45, 2.55)
pt3dadd(-27.42, 94.44, -30.45, 2.55)
pt3dadd(-27.5, 94.49, -30.45, 2.55)
pt3dadd(-27.55, 94.54, -30.45, 2.55)
pt3dadd(-27.64, 94.59, -30.45, 2.55)
pt3dadd(-27.73, 94.69, -30.45, 2.55)
pt3dadd(-27.82, 94.69, -30.45, 2.55)
pt3dadd(-27.86, 94.79, -30.45, 2.55)
pt3dadd(-27.95, 94.85, -30.45, 2.55)
pt3dadd(-28.04, 94.89, -30.45, 2.55)
pt3dadd(-28.13, 94.94, -30.45, 2.55)
pt3dadd(-28.26, 95.1, -30.45, 2.55)
pt3dadd(-28.35, 95.15, -30.45, 2.55)
pt3dadd(-28.44, 95.15, -30.45, 2.55)
pt3dadd(-28.49, 95.2, -30.45, 2.55)
pt3dadd(-28.57, 95.25, -30.45, 2.55)
pt3dadd(-28.71, 95.35, -30.45, 2.55)
pt3dadd(-28.75, 95.4, -30.45, 2.55)
pt3dadd(-28.84, 95.4, -30.45, 2.55)
pt3dadd(-28.93, 95.45, -30.45, 2.55)
pt3dadd(-28.98, 95.5, -30.45, 2.55)
pt3dadd(-29.11, 95.5, -30.45, 2.55)
pt3dadd(-29.15, 95.55, -30.45, 2.55)
pt3dadd(-29.24, 95.55, -30.45, 2.55)
pt3dadd(-29.33, 95.61, -30.45, 2.55)
pt3dadd(-29.69, 95.61, -30.45, 2.55)
pt3dadd(-29.73, 95.65, -30.45, 2.55)
pt3dadd(-33.88, 95.65, -30.45, 2.55)
pt3dadd(-33.97, 95.61, -30.45, 2.55)
pt3dadd(-34.28, 95.61, -30.45, 2.55)
pt3dadd(-34.41, 95.55, -30.45, 2.55)
pt3dadd(-34.68, 95.55, -30.45, 2.55)
pt3dadd(-34.81, 95.45, -30.45, 2.55)
pt3dadd(-34.95, 95.45, -30.45, 2.55)
pt3dadd(-35.08, 95.4, -30.45, 2.55)
pt3dadd(-35.35, 95.4, -30.45, 2.55)
pt3dadd(-35.48, 95.35, -30.45, 2.55)
pt3dadd(-35.62, 95.35, -30.45, 2.55)
pt3dadd(-35.75, 95.25, -30.45, 2.55)
pt3dadd(-35.88, 95.2, -30.45, 2.55)
pt3dadd(-36.02, 95.2, -30.45, 2.55)
pt3dadd(-36.11, 95.15, -30.45, 2.55)
pt3dadd(-36.24, 95.15, -30.45, 2.55)
pt3dadd(-36.33, 95.1, -30.45, 2.55)
pt3dadd(-36.42, 95.05, -30.45, 2.55)
pt3dadd(-36.6, 95.05, -30.45, 2.55)
pt3dadd(-36.64, 95, -30.45, 2.55)
pt3dadd(-36.78, 94.89, -30.45, 2.55)
pt3dadd(-36.87, 94.85, -30.45, 2.55)
pt3dadd(-37, 94.79, -30.45, 2.55)
pt3dadd(-37.04, 94.74, -30.45, 2.55)
pt3dadd(-37.18, 94.74, -30.45, 2.55)
pt3dadd(-37.31, 94.64, -30.45, 2.55)
pt3dadd(-37.4, 94.59, -30.45, 2.55)
pt3dadd(-37.49, 94.54, -30.45, 2.55)
pt3dadd(-37.58, 94.54, -30.45, 2.55)
pt3dadd(-37.67, 94.49, -30.45, 2.55)
pt3dadd(-37.76, 94.44, -30.45, 2.55)
pt3dadd(-37.85, 94.39, -30.45, 2.55)
pt3dadd(-37.94, 94.39, -30.45, 2.55)
pt3dadd(-38.03, 94.34, -30.45, 2.55)
pt3dadd(-38.11, 94.29, -30.45, 2.55)
pt3dadd(-38.25, 94.29, -30.45, 2.55)
pt3dadd(-38.34, 94.24, -30.45, 2.55)
pt3dadd(-38.38, 94.14, -30.45, 2.55)
pt3dadd(-38.47, 94.08, -30.45, 2.55)
pt3dadd(-38.56, 94.08, -30.45, 2.55)
pt3dadd(-38.65, 94.04, -30.45, 2.55)
pt3dadd(-38.74, 93.93, -30.45, 2.55)
pt3dadd(-38.83, 93.88, -30.45, 2.55)
pt3dadd(-38.96, 93.83, -30.45, 2.55)
pt3dadd(-39.05, 93.73, -30.45, 2.55)
pt3dadd(-39.14, 93.68, -30.45, 2.55)
pt3dadd(-39.23, 93.63, -30.45, 2.55)
pt3dadd(-39.36, 93.48, -30.45, 2.55)
pt3dadd(-39.45, 93.38, -30.45, 2.55)
pt3dadd(-39.58, 93.32, -30.45, 2.55)
pt3dadd(-39.72, 93.22, -30.45, 2.55)
pt3dadd(-39.85, 93.12, -30.45, 2.55)
pt3dadd(-39.99, 93.02, -30.45, 2.55)
pt3dadd(-40.08, 92.97, -30.45, 2.55)
pt3dadd(-40.21, 92.87, -30.45, 2.55)
pt3dadd(-40.34, 92.77, -30.45, 2.55)
pt3dadd(-40.43, 92.72, -30.45, 2.55)
pt3dadd(-40.52, 92.62, -30.45, 2.55)
pt3dadd(-40.65, 92.57, -30.45, 2.55)
pt3dadd(-40.79, 92.46, -30.45, 2.55)
pt3dadd(-40.88, 92.42, -30.45, 2.55)
pt3dadd(-40.97, 92.36, -30.45, 2.55)
pt3dadd(-41.1, 92.31, -30.45, 2.55)
pt3dadd(-41.19, 92.26, -30.45, 2.55)
pt3dadd(-41.28, 92.21, -30.45, 2.55)
pt3dadd(-41.41, 92.21, -30.45, 2.55)
pt3dadd(-41.46, 92.16, -30.45, 2.55)
pt3dadd(-41.55, 92.16, -30.45, 2.55)
pt3dadd(-41.63, 92.11, -30.45, 2.55)
pt3dadd(-41.68, 92.06, -30.45, 2.55)
pt3dadd(-41.81, 92.06, -30.45, 2.55)
pt3dadd(-41.95, 92.01, -30.45, 2.55)
pt3dadd(-42.71, 92.01, -30.45, 2.55)
pt3dadd(-42.79, 92.06, -30.45, 2.55)
pt3dadd(-42.88, 92.06, -30.45, 2.55)
pt3dadd(-42.93, 92.11, -30.45, 2.55)
pt3dadd(-43.02, 92.16, -30.45, 2.55)
pt3dadd(-43.15, 92.21, -30.45, 2.55)
pt3dadd(-43.28, 92.21, -30.45, 2.55)
pt3dadd(-43.33, 92.26, -30.45, 2.55)
pt3dadd(-43.42, 92.31, -30.45, 2.55)
pt3dadd(-43.51, 92.36, -30.45, 2.55)
pt3dadd(-43.6, 92.46, -30.45, 2.55)
pt3dadd(-43.69, 92.46, -30.45, 2.55)
pt3dadd(-43.78, 92.51, -30.45, 2.55)
pt3dadd(-43.87, 92.57, -30.45, 2.55)
pt3dadd(-44, 92.62, -30.45, 2.55)
}
}
proc shape3d_52() {
dend[40] { pt3dadd(-44.09, 92.67, -30.45, 2.55)
pt3dadd(-44.18, 92.72, -30.45, 2.55)
pt3dadd(-44.22, 92.77, -30.45, 2.55)
pt3dadd(-44.35, 92.77, -30.45, 2.55)
pt3dadd(-44.44, 92.82, -30.45, 2.55)
pt3dadd(-44.58, 92.87, -30.45, 2.55)
pt3dadd(-44.71, 92.92, -30.45, 2.55)
pt3dadd(-44.8, 92.92, -30.45, 2.55)
pt3dadd(-44.89, 92.97, -30.45, 2.55)
pt3dadd(-45.03, 92.97, -30.45, 2.55)
pt3dadd(-45.16, 93.02, -30.45, 2.55)
pt3dadd(-45.33, 93.02, -30.45, 2.55)
pt3dadd(-45.42, 93.07, -30.45, 2.55)
pt3dadd(-47.52, 93.07, -30.45, 2.55)
pt3dadd(-47.61, 93.02, -30.45, 2.55)
pt3dadd(-47.7, 92.97, -30.45, 2.55)
pt3dadd(-47.79, 92.97, -30.45, 2.55)
pt3dadd(-47.83, 92.92, -30.45, 2.55)
pt3dadd(-47.92, 92.87, -30.45, 2.55)
pt3dadd(-48.01, 92.82, -30.45, 2.55)
pt3dadd(-48.06, 92.77, -30.45, 2.55)
pt3dadd(-48.15, 92.77, -30.45, 2.55)
pt3dadd(-48.19, 92.72, -30.45, 2.55)
pt3dadd(-48.28, 92.67, -30.45, 2.55)
pt3dadd(-48.32, 92.57, -30.45, 2.55)
pt3dadd(-48.41, 92.57, -30.45, 2.55)
pt3dadd(-48.46, 92.51, -30.45, 2.55)
pt3dadd(-48.54, 92.46, -30.45, 2.55)
pt3dadd(-48.63, 92.42, -30.45, 2.55)
pt3dadd(-48.72, 92.36, -30.45, 2.55)
pt3dadd(-48.77, 92.31, -30.45, 2.55)
pt3dadd(-48.86, 92.21, -30.45, 2.55)
pt3dadd(-48.9, 92.16, -30.45, 2.55)
pt3dadd(-48.99, 92.16, -30.45, 2.55)
pt3dadd(-49.08, 92.11, -30.45, 2.55)
pt3dadd(-49.17, 92.06, -30.45, 2.55)
pt3dadd(-49.26, 92.01, -30.45, 2.55)
pt3dadd(-49.3, 91.96, -30.45, 2.55)
pt3dadd(-49.48, 91.91, -30.45, 2.55)
pt3dadd(-49.57, 91.86, -30.45, 2.55)
pt3dadd(-49.66, 91.81, -30.45, 2.55)
pt3dadd(-49.71, 91.75, -30.45, 2.55)
pt3dadd(-49.79, 91.75, -30.45, 2.55)
pt3dadd(-49.88, 91.71, -30.45, 2.55)
pt3dadd(-49.93, 91.65, -30.45, 2.55)
pt3dadd(-50.1, 91.45, -30.45, 2.55)
pt3dadd(-50.19, 91.4, -30.45, 2.55)
pt3dadd(-50.28, 91.35, -30.45, 2.55)
pt3dadd(-50.42, 91.3, -30.45, 2.55)
pt3dadd(-50.46, 91.25, -30.45, 2.55)
pt3dadd(-50.55, 91.25, -30.45, 2.55)
pt3dadd(-50.28, 91.35, -31.5, 2.55)
pt3dadd(-50.51, 91.35, -31.5, 2.55)
pt3dadd(-50.6, 91.3, -31.5, 2.55)
pt3dadd(-50.69, 91.25, -31.5, 2.55)
pt3dadd(-50.87, 91.25, -31.5, 2.55)
pt3dadd(-50.95, 91.2, -31.5, 2.55)
pt3dadd(-51.04, 91.15, -31.5, 2.55)
pt3dadd(-51.09, 91.1, -31.5, 2.55)
pt3dadd(-51.17, 91.1, -31.5, 2.55)
pt3dadd(-51.22, 91.05, -31.5, 2.55)
pt3dadd(-51.26, 91, -31.5, 2.55)
pt3dadd(-51.35, 90.94, -31.5, 2.55)
pt3dadd(-51.49, 90.94, -31.5, 2.55)
pt3dadd(-51.53, 90.89, -31.5, 2.55)
pt3dadd(-51.62, 90.85, -31.5, 2.55)
pt3dadd(-51.71, 90.79, -31.5, 2.55)
pt3dadd(-51.8, 90.74, -31.5, 2.55)
pt3dadd(-51.89, 90.64, -31.5, 2.55)
pt3dadd(-51.98, 90.59, -31.5, 2.55)
pt3dadd(-52.07, 90.54, -31.5, 2.55)
pt3dadd(-52.11, 90.49, -31.5, 2.55)
pt3dadd(-52.2, 90.44, -31.5, 2.55)
pt3dadd(-52.29, 90.34, -31.5, 2.55)
pt3dadd(-52.33, 90.29, -31.5, 2.55)
pt3dadd(-52.47, 90.18, -31.5, 2.55)
pt3dadd(-52.56, 90.14, -31.5, 2.55)
pt3dadd(-52.65, 90.04, -31.5, 2.55)
pt3dadd(-52.74, 89.98, -31.5, 2.55)
pt3dadd(-52.92, 89.93, -31.5, 2.55)
pt3dadd(-53.01, 89.83, -31.5, 2.55)
pt3dadd(-53.09, 89.78, -31.5, 2.55)
pt3dadd(-53.14, 89.68, -31.5, 2.55)
pt3dadd(-53.31, 89.48, -31.5, 2.55)
pt3dadd(-53.45, 89.32, -31.5, 2.55)
pt3dadd(-53.58, 89.28, -31.5, 2.55)
pt3dadd(-53.63, 89.22, -31.5, 2.55)
pt3dadd(-53.72, 89.12, -31.5, 2.55)
pt3dadd(-53.85, 88.97, -31.5, 2.55)
pt3dadd(-53.94, 88.87, -31.5, 2.55)
pt3dadd(-54.03, 88.77, -31.5, 2.55)
pt3dadd(-54.08, 88.72, -31.5, 2.55)
pt3dadd(-54.16, 88.62, -31.5, 2.55)
pt3dadd(-54.3, 88.42, -31.5, 2.55)
pt3dadd(-54.38, 88.26, -31.5, 2.55)
pt3dadd(-54.43, 88.16, -31.5, 2.55)
pt3dadd(-54.52, 88.01, -31.5, 2.55)
pt3dadd(-54.65, 87.86, -31.5, 2.55)
pt3dadd(-54.74, 87.71, -31.5, 2.55)
pt3dadd(-54.83, 87.6, -31.5, 2.55)
pt3dadd(-54.83, 87.5, -31.5, 2.55)
pt3dadd(-54.92, 87.35, -31.5, 2.55)
pt3dadd(-55.01, 87.25, -31.5, 2.55)
pt3dadd(-55.1, 87.1, -31.5, 2.55)
pt3dadd(-55.15, 87, -31.5, 2.55)
pt3dadd(-55.23, 86.79, -31.5, 2.55)
pt3dadd(-55.28, 86.74, -31.5, 2.55)
pt3dadd(-55.37, 86.54, -31.5, 2.55)
pt3dadd(-55.5, 86.39, -31.5, 2.55)
pt3dadd(-55.54, 86.24, -31.5, 2.55)
pt3dadd(-55.59, 86.14, -31.5, 2.55)
pt3dadd(-55.72, 86.04, -31.5, 2.55)
pt3dadd(-55.81, 85.88, -31.5, 2.55)
pt3dadd(-55.86, 85.73, -31.5, 2.55)
pt3dadd(-55.95, 85.63, -31.5, 2.55)
pt3dadd(-55.99, 85.48, -31.5, 2.55)
pt3dadd(-56.08, 85.43, -31.5, 2.55)
pt3dadd(-56.17, 85.28, -31.5, 2.55)
pt3dadd(-56.22, 85.12, -31.5, 2.55)
pt3dadd(-56.26, 85.02, -31.5, 2.55)
pt3dadd(-56.3, 84.92, -31.5, 2.55)
pt3dadd(-56.39, 84.82, -31.5, 2.55)
pt3dadd(-56.44, 84.72, -31.5, 2.55)
pt3dadd(-56.48, 84.61, -31.5, 2.55)
pt3dadd(-56.57, 84.41, -31.5, 2.55)
pt3dadd(-56.66, 84.36, -31.5, 2.55)
pt3dadd(-56.71, 84.26, -31.5, 2.55)
pt3dadd(-56.75, 84.16, -31.5, 2.55)
pt3dadd(-56.88, 83.91, -31.5, 2.55)
pt3dadd(-56.97, 83.81, -31.5, 2.55)
pt3dadd(-57.02, 83.71, -31.5, 2.55)
pt3dadd(-57.06, 83.6, -31.5, 2.55)
pt3dadd(-57.15, 83.55, -31.5, 2.55)
pt3dadd(-57.19, 83.45, -31.5, 2.55)
pt3dadd(-57.24, 83.4, -31.5, 2.55)
pt3dadd(-57.28, 83.3, -31.5, 2.55)
pt3dadd(-57.37, 83.15, -31.5, 2.55)
pt3dadd(-57.42, 83.05, -31.5, 2.55)
pt3dadd(-57.51, 83, -31.5, 2.55)
pt3dadd(-57.55, 82.89, -31.5, 2.55)
pt3dadd(-57.55, 82.79, -31.5, 2.55)
pt3dadd(-57.64, 82.74, -31.5, 2.55)
pt3dadd(-57.69, 82.69, -31.5, 2.55)
pt3dadd(-57.73, 82.74, -31.5, 2.55)
}
dend[41] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(61.84, 88.01, -18.9, 11.72)
pt3dadd(61.93, 88.24, -18.9, 4)
}
dend[42] {pt3dclear()
pt3dadd(61.93, 88.24, -18.9, 11.72)
pt3dadd(61.79, 87.96, -18.9, 11.72)
pt3dadd(61.75, 87.91, -18.9, 11.72)
pt3dadd(61.71, 87.86, -18.9, 11.72)
pt3dadd(61.66, 87.81, -18.9, 11.72)
pt3dadd(61.62, 87.75, -18.9, 11.72)
pt3dadd(61.57, 87.65, -18.9, 11.72)
pt3dadd(61.53, 87.6, -18.9, 11.72)
pt3dadd(61.53, 87.5, -18.9, 11.72)
pt3dadd(61.48, 87.45, -18.9, 11.72)
pt3dadd(61.44, 87.4, -18.9, 11.72)
pt3dadd(60.72, 86.59, -18.9, 5.6)
pt3dadd(60.68, 86.54, -18.9, 5.6)
pt3dadd(60.59, 86.44, -18.9, 5.6)
pt3dadd(60.5, 86.29, -18.9, 5.6)
pt3dadd(60.46, 86.18, -18.9, 5.6)
pt3dadd(60.41, 86.14, -18.9, 5.6)
pt3dadd(60.37, 86.04, -18.9, 5.6)
pt3dadd(60.33, 85.98, -18.9, 5.6)
pt3dadd(60.33, 85.88, -18.9, 5.6)
pt3dadd(60.1, 85.83, -18.9, 6.28)
pt3dadd(60.1, 85.63, -18.9, 6.28)
pt3dadd(60.06, 85.53, -18.9, 6.28)
pt3dadd(60.01, 85.48, -18.9, 6.28)
pt3dadd(59.97, 85.38, -18.9, 6.28)
pt3dadd(59.92, 85.32, -18.9, 6.28)
pt3dadd(59.88, 85.28, -18.9, 6.28)
pt3dadd(59.83, 85.22, -18.9, 6.28)
pt3dadd(59.83, 85.12, -18.9, 6.28)
pt3dadd(59.79, 85.07, -18.9, 6.28)
pt3dadd(59.74, 85.02, -18.9, 6.28)
pt3dadd(59.74, 84.87, -18.9, 6.28)
pt3dadd(59.7, 84.82, -18.9, 6.28)
pt3dadd(59.65, 84.77, -18.9, 6.28)
pt3dadd(59.65, 84.67, -18.9, 6.28)
pt3dadd(59.61, 84.61, -18.9, 6.28)
pt3dadd(59.56, 84.57, -18.9, 6.28)
pt3dadd(59.56, 84.46, -18.9, 6.28)
pt3dadd(59.52, 84.41, -18.9, 6.28)
pt3dadd(59.48, 84.36, -18.9, 6.28)
pt3dadd(59.48, 84.26, -18.9, 6.28)
pt3dadd(59.43, 84.21, -18.9, 6.28)
pt3dadd(59.39, 84.11, -18.9, 6.28)
pt3dadd(59.34, 84.01, -18.9, 6.28)
pt3dadd(59.3, 83.96, -18.9, 6.28)
pt3dadd(59.26, 83.91, -18.9, 6.28)
pt3dadd(59.21, 83.81, -18.9, 6.28)
pt3dadd(59.21, 83.71, -18.9, 6.28)
pt3dadd(59.17, 83.65, -18.9, 6.28)
pt3dadd(59.12, 83.6, -18.9, 6.28)
pt3dadd(59.12, 83.45, -18.9, 6.28)
pt3dadd(59.08, 83.4, -18.9, 6.28)
pt3dadd(59.03, 83.3, -18.9, 6.28)
}
}
proc shape3d_53() {
dend[42] { pt3dadd(58.99, 83.25, -18.9, 6.28)
pt3dadd(58.99, 83.15, -18.9, 6.28)
pt3dadd(58.94, 83.1, -18.9, 6.28)
pt3dadd(58.9, 83.05, -18.9, 6.28)
pt3dadd(58.85, 83, -18.9, 6.28)
pt3dadd(58.81, 82.94, -18.9, 6.28)
pt3dadd(58.76, 82.89, -18.9, 6.28)
pt3dadd(58.72, 82.85, -18.9, 6.28)
pt3dadd(58.67, 82.79, -18.9, 6.28)
pt3dadd(58.63, 82.74, -18.9, 6.28)
pt3dadd(58.58, 82.69, -18.9, 6.28)
pt3dadd(58.54, 82.64, -18.9, 6.28)
pt3dadd(58.49, 82.59, -18.9, 6.28)
pt3dadd(58.45, 82.54, -18.9, 6.28)
pt3dadd(58.41, 82.49, -18.9, 6.28)
pt3dadd(58.36, 82.39, -18.9, 6.28)
pt3dadd(58.32, 82.29, -18.9, 6.28)
pt3dadd(58.27, 82.24, -18.9, 6.28)
pt3dadd(58.23, 82.14, -18.9, 6.28)
pt3dadd(58.19, 82.03, -18.9, 6.28)
pt3dadd(58.14, 81.98, -18.9, 6.28)
pt3dadd(58.1, 81.88, -18.9, 6.28)
pt3dadd(58.05, 81.78, -18.9, 6.28)
pt3dadd(58.01, 81.68, -18.9, 6.28)
pt3dadd(57.96, 81.58, -18.9, 6.28)
pt3dadd(57.92, 81.53, -18.9, 6.28)
pt3dadd(57.87, 81.43, -18.9, 6.28)
pt3dadd(57.87, 81.32, -18.9, 6.28)
pt3dadd(57.83, 81.28, -18.9, 6.28)
pt3dadd(57.78, 81.22, -18.9, 6.28)
pt3dadd(57.74, 81.12, -18.9, 6.28)
pt3dadd(57.69, 81.02, -18.9, 6.28)
pt3dadd(57.6, 80.92, -18.9, 6.28)
pt3dadd(57.56, 80.82, -18.9, 6.28)
pt3dadd(57.51, 80.77, -18.9, 6.28)
pt3dadd(57.47, 80.67, -18.9, 6.28)
pt3dadd(57.42, 80.57, -18.9, 6.28)
pt3dadd(57.38, 80.51, -18.9, 6.28)
pt3dadd(57.29, 80.41, -18.9, 6.28)
pt3dadd(57.2, 80.26, -18.9, 6.28)
pt3dadd(57.16, 80.16, -18.9, 6.28)
pt3dadd(57.12, 80.06, -18.9, 6.28)
pt3dadd(57.07, 79.96, -18.9, 6.28)
pt3dadd(56.98, 79.86, -18.9, 6.28)
pt3dadd(56.94, 79.71, -18.9, 6.28)
pt3dadd(56.89, 79.65, -18.9, 6.28)
pt3dadd(56.8, 79.6, -18.9, 6.28)
pt3dadd(56.76, 79.5, -18.9, 6.28)
pt3dadd(56.71, 79.4, -18.9, 6.28)
pt3dadd(56.67, 79.3, -18.9, 6.28)
pt3dadd(56.62, 79.2, -18.9, 6.28)
pt3dadd(56.53, 79.15, -18.9, 6.28)
pt3dadd(56.49, 79.04, -18.9, 6.28)
pt3dadd(56.4, 78.94, -18.9, 6.28)
pt3dadd(56.35, 78.84, -18.9, 6.28)
pt3dadd(56.31, 78.74, -18.9, 6.28)
pt3dadd(56.27, 78.64, -18.9, 6.28)
pt3dadd(56.18, 78.59, -18.9, 6.28)
pt3dadd(56.13, 78.49, -18.9, 6.28)
pt3dadd(56.09, 78.39, -18.9, 6.28)
pt3dadd(56, 78.29, -18.9, 6.28)
pt3dadd(55.96, 78.24, -18.9, 6.28)
pt3dadd(55.91, 78.18, -18.9, 6.28)
pt3dadd(55.82, 78.08, -18.9, 6.28)
pt3dadd(55.78, 78.03, -18.9, 6.28)
pt3dadd(55.73, 77.98, -18.9, 6.28)
pt3dadd(55.69, 77.98, -18.9, 6.28)
pt3dadd(55.33, 77.38, -19.95, 5.26)
pt3dadd(55.33, 77.28, -19.95, 5.26)
pt3dadd(55.28, 77.17, -19.95, 5.26)
pt3dadd(55.24, 77.12, -19.95, 5.26)
pt3dadd(55.24, 77.02, -19.95, 5.26)
pt3dadd(55.2, 76.97, -19.95, 5.26)
pt3dadd(55.15, 76.92, -19.95, 5.26)
pt3dadd(55.11, 76.82, -19.95, 5.26)
pt3dadd(55.06, 76.77, -19.95, 5.26)
pt3dadd(55.06, 76.67, -19.95, 5.26)
pt3dadd(55.02, 76.61, -19.95, 5.26)
pt3dadd(54.97, 76.57, -19.95, 5.26)
pt3dadd(54.93, 76.51, -19.95, 5.26)
pt3dadd(54.88, 76.46, -19.95, 5.26)
pt3dadd(54.84, 76.36, -19.95, 5.26)
pt3dadd(54.79, 76.31, -19.95, 5.26)
pt3dadd(54.75, 76.26, -19.95, 5.26)
pt3dadd(54.66, 76.21, -19.95, 5.26)
pt3dadd(54.62, 76.16, -19.95, 5.26)
pt3dadd(54.62, 76.06, -19.95, 5.26)
pt3dadd(54.57, 76.01, -19.95, 5.26)
pt3dadd(54.53, 75.96, -19.95, 5.26)
pt3dadd(54.48, 75.91, -19.95, 5.26)
pt3dadd(54.44, 75.86, -19.95, 5.26)
pt3dadd(54.4, 75.81, -19.95, 5.26)
pt3dadd(54.31, 75.81, -19.95, 5.26)
pt3dadd(54.26, 75.75, -19.95, 5.26)
pt3dadd(54.17, 75.71, -19.95, 5.26)
pt3dadd(54.08, 75.65, -19.95, 5.26)
pt3dadd(53.9, 75.45, -19.95, 5.26)
pt3dadd(53.86, 75.4, -19.95, 5.26)
pt3dadd(53.77, 75.35, -19.95, 5.26)
pt3dadd(53.72, 75.25, -19.95, 5.26)
pt3dadd(53.64, 75.2, -19.95, 5.26)
pt3dadd(53.59, 75.15, -19.95, 5.26)
pt3dadd(53.55, 75.1, -19.95, 5.26)
pt3dadd(53.5, 75.04, -19.95, 5.26)
pt3dadd(53.46, 75, -19.95, 5.26)
pt3dadd(53.37, 74.94, -19.95, 5.26)
pt3dadd(53.33, 74.89, -19.95, 5.26)
pt3dadd(53.24, 74.84, -19.95, 5.26)
pt3dadd(53.15, 74.79, -19.95, 5.26)
pt3dadd(53.1, 74.74, -19.95, 5.26)
pt3dadd(53.01, 74.59, -19.95, 5.26)
pt3dadd(53.01, 74.49, -19.95, 5.26)
pt3dadd(52.92, 74.39, -19.95, 5.26)
pt3dadd(52.83, 74.29, -19.95, 5.26)
pt3dadd(52.79, 74.18, -19.95, 5.26)
pt3dadd(52.74, 74.03, -19.95, 5.26)
pt3dadd(52.65, 73.98, -19.95, 5.26)
pt3dadd(52.61, 73.88, -19.95, 5.26)
pt3dadd(52.57, 73.78, -19.95, 5.26)
pt3dadd(52.52, 73.68, -19.95, 5.26)
pt3dadd(52.43, 73.58, -19.95, 5.26)
pt3dadd(52.35, 73.38, -19.95, 5.26)
pt3dadd(52.3, 73.32, -19.95, 5.26)
pt3dadd(52.26, 73.27, -19.95, 5.26)
pt3dadd(52.17, 73.07, -19.95, 5.26)
pt3dadd(52.08, 72.92, -19.95, 5.26)
pt3dadd(52.03, 72.82, -19.95, 5.26)
pt3dadd(51.99, 72.72, -19.95, 5.26)
pt3dadd(51.9, 72.61, -19.95, 5.26)
pt3dadd(51.85, 72.46, -19.95, 5.26)
pt3dadd(51.76, 72.36, -19.95, 5.26)
pt3dadd(51.72, 72.26, -19.95, 5.26)
pt3dadd(51.63, 72.16, -19.95, 5.26)
pt3dadd(51.54, 72.06, -19.95, 5.26)
pt3dadd(51.54, 71.96, -19.95, 5.26)
pt3dadd(51.45, 71.91, -19.95, 5.26)
pt3dadd(51.41, 71.86, -19.95, 5.26)
pt3dadd(51.36, 71.81, -19.95, 5.26)
pt3dadd(51.36, 71.71, -19.95, 5.26)
pt3dadd(51.28, 71.65, -19.95, 5.26)
pt3dadd(51.23, 71.55, -19.95, 5.26)
pt3dadd(51.19, 71.45, -19.95, 5.26)
pt3dadd(51.14, 71.4, -19.95, 5.26)
pt3dadd(51.1, 71.3, -19.95, 5.26)
pt3dadd(51.01, 71, -22.05, 4.25)
pt3dadd(51.01, 70.84, -22.05, 4.25)
pt3dadd(50.96, 70.79, -22.05, 4.25)
pt3dadd(50.96, 70.44, -22.05, 4.25)
pt3dadd(50.92, 70.39, -22.05, 4.25)
pt3dadd(50.92, 69.58, -22.05, 4.25)
pt3dadd(50.87, 69.47, -22.05, 4.25)
pt3dadd(50.87, 69.38, -22.05, 4.25)
pt3dadd(50.83, 69.27, -22.05, 4.25)
pt3dadd(50.83, 69.17, -22.05, 4.25)
pt3dadd(50.78, 69.12, -22.05, 4.25)
pt3dadd(50.74, 69.07, -22.05, 4.25)
pt3dadd(50.69, 69.02, -22.05, 4.25)
pt3dadd(50.69, 68.92, -22.05, 4.25)
pt3dadd(50.65, 68.87, -22.05, 4.25)
pt3dadd(50.6, 68.77, -22.05, 4.25)
pt3dadd(50.56, 68.71, -22.05, 4.25)
pt3dadd(50.51, 68.61, -22.05, 4.25)
pt3dadd(50.47, 68.57, -22.05, 4.25)
pt3dadd(50.43, 68.46, -22.05, 4.25)
pt3dadd(50.38, 68.41, -22.05, 4.25)
pt3dadd(50.34, 68.36, -22.05, 4.25)
pt3dadd(50.29, 68.26, -22.05, 4.25)
pt3dadd(50.25, 68.16, -22.05, 4.25)
pt3dadd(50.12, 68.01, -22.05, 4.25)
pt3dadd(50.07, 67.9, -22.05, 4.25)
pt3dadd(50.03, 67.81, -22.05, 4.25)
pt3dadd(49.98, 67.7, -22.05, 4.25)
pt3dadd(49.94, 67.65, -22.05, 4.25)
pt3dadd(49.89, 67.6, -22.05, 4.25)
pt3dadd(49.85, 67.5, -22.05, 4.25)
pt3dadd(49.8, 67.45, -22.05, 4.25)
pt3dadd(49.71, 67.35, -22.05, 4.25)
pt3dadd(49.67, 67.3, -22.05, 4.25)
pt3dadd(49.63, 67.25, -22.05, 4.25)
pt3dadd(49.58, 67.15, -22.05, 4.25)
pt3dadd(49.53, 67, -22.05, 4.25)
pt3dadd(49.44, 66.89, -22.05, 4.25)
pt3dadd(49.4, 66.79, -22.05, 4.25)
pt3dadd(49.36, 66.69, -22.05, 4.25)
pt3dadd(49.27, 66.59, -22.05, 4.25)
pt3dadd(49.27, 66.49, -22.05, 4.25)
pt3dadd(49.18, 66.39, -22.05, 4.25)
pt3dadd(49.13, 66.34, -22.05, 4.25)
pt3dadd(49.09, 66.24, -22.05, 4.25)
pt3dadd(49.04, 66.18, -22.05, 4.25)
pt3dadd(49, 66.14, -22.05, 4.25)
pt3dadd(48.96, 66.08, -22.05, 4.25)
pt3dadd(48.96, 65.98, -22.05, 4.25)
pt3dadd(48.91, 65.93, -22.05, 4.25)
pt3dadd(48.91, 65.83, -22.05, 4.25)
pt3dadd(48.87, 65.73, -22.05, 4.25)
pt3dadd(48.87, 65.58, -22.05, 4.25)
pt3dadd(48.82, 65.47, -22.05, 4.25)
pt3dadd(48.82, 65.38, -22.05, 4.25)
pt3dadd(48.78, 65.27, -22.05, 4.25)
}
}
proc shape3d_54() {
dend[42] { pt3dadd(48.78, 65.17, -22.05, 4.25)
pt3dadd(48.73, 65.07, -22.05, 4.25)
pt3dadd(48.73, 64.97, -22.05, 4.25)
pt3dadd(48.69, 64.87, -22.05, 4.25)
pt3dadd(48.69, 64.77, -22.05, 4.25)
pt3dadd(48.64, 64.71, -22.05, 4.25)
pt3dadd(48.64, 64.57, -22.05, 4.25)
pt3dadd(48.6, 64.46, -22.05, 4.25)
pt3dadd(48.6, 64.31, -22.05, 4.25)
pt3dadd(48.56, 64.21, -22.05, 4.25)
pt3dadd(48.51, 64.11, -22.05, 4.25)
pt3dadd(48.51, 63.9, -22.05, 4.25)
pt3dadd(48.47, 63.81, -22.05, 4.25)
pt3dadd(48.42, 63.7, -22.05, 4.25)
pt3dadd(48.42, 63.55, -22.05, 4.25)
pt3dadd(48.38, 63.4, -22.05, 4.25)
pt3dadd(48.33, 63.3, -22.05, 4.25)
pt3dadd(48.33, 63.15, -22.05, 4.25)
pt3dadd(48.29, 63.04, -22.05, 4.25)
pt3dadd(48.24, 62.94, -22.05, 4.25)
pt3dadd(48.24, 62.79, -22.05, 4.25)
pt3dadd(48.2, 62.69, -22.05, 4.25)
pt3dadd(48.15, 62.54, -22.05, 4.25)
pt3dadd(48.11, 62.44, -22.05, 4.25)
pt3dadd(48.11, 62.28, -22.05, 4.25)
pt3dadd(48.06, 62.19, -22.05, 4.25)
pt3dadd(48.02, 62.08, -22.05, 4.25)
pt3dadd(48.02, 61.93, -22.05, 4.25)
pt3dadd(47.97, 61.88, -22.05, 4.25)
pt3dadd(47.97, 61.78, -22.05, 4.25)
pt3dadd(47.93, 61.68, -22.05, 4.25)
pt3dadd(47.88, 61.58, -22.05, 4.25)
pt3dadd(47.88, 61.42, -22.05, 4.25)
pt3dadd(47.84, 61.32, -22.05, 4.25)
pt3dadd(47.8, 61.17, -22.05, 4.25)
pt3dadd(47.75, 61.07, -22.05, 4.25)
pt3dadd(47.75, 60.87, -22.05, 4.25)
pt3dadd(47.71, 60.77, -22.05, 4.25)
pt3dadd(47.71, 60.67, -22.05, 4.25)
pt3dadd(47.66, 60.62, -22.05, 4.25)
pt3dadd(47.66, 60.51, -22.05, 4.25)
pt3dadd(47.62, 60.36, -22.05, 4.25)
pt3dadd(47.57, 60.26, -22.05, 4.25)
pt3dadd(47.53, 60.11, -22.05, 4.25)
pt3dadd(47.53, 60.01, -22.05, 4.25)
pt3dadd(47.49, 59.9, -22.05, 4.25)
pt3dadd(47.49, 59.81, -22.05, 4.25)
pt3dadd(47.44, 59.7, -22.05, 4.25)
pt3dadd(47.4, 59.55, -22.05, 4.25)
pt3dadd(47.35, 59.4, -22.05, 4.25)
pt3dadd(47.35, 59.25, -22.05, 4.25)
pt3dadd(47.31, 59.15, -22.05, 4.25)
pt3dadd(47.26, 59.04, -22.05, 4.25)
pt3dadd(47.26, 58.89, -22.05, 4.25)
pt3dadd(47.17, 58.64, -22.05, 4.25)
pt3dadd(47.17, 58.49, -22.05, 4.25)
pt3dadd(47.13, 58.39, -22.05, 4.25)
pt3dadd(47.08, 58.33, -22.05, 4.25)
pt3dadd(47.04, 58.13, -22.05, 4.25)
pt3dadd(47.04, 58.03, -22.05, 4.25)
pt3dadd(46.99, 57.93, -22.05, 4.25)
pt3dadd(46.95, 57.83, -22.05, 4.25)
pt3dadd(46.95, 57.73, -22.05, 4.25)
pt3dadd(46.9, 57.63, -22.05, 4.25)
pt3dadd(46.86, 57.53, -22.05, 4.25)
pt3dadd(46.81, 57.37, -22.05, 4.25)
pt3dadd(46.77, 57.27, -22.05, 4.25)
pt3dadd(46.77, 57.17, -22.05, 4.25)
pt3dadd(46.73, 57.07, -22.05, 4.25)
pt3dadd(46.68, 57.02, -22.05, 4.25)
pt3dadd(46.68, 56.92, -22.05, 4.25)
pt3dadd(46.64, 56.82, -22.05, 4.25)
pt3dadd(46.59, 56.72, -22.05, 4.25)
pt3dadd(46.59, 56.62, -22.05, 4.25)
pt3dadd(46.55, 56.62, -22.05, 4.25)
pt3dadd(46.55, 56.62, -22.05, 4.25)
pt3dadd(46.55, 56.51, -22.05, 4.25)
pt3dadd(46.5, 56.46, -22.05, 4.25)
pt3dadd(46.5, 56.31, -22.05, 4.25)
pt3dadd(46.46, 56.21, -22.05, 4.25)
pt3dadd(46.46, 56.11, -22.05, 4.25)
pt3dadd(46.42, 56.01, -22.05, 4.25)
pt3dadd(46.42, 55.85, -22.05, 4.25)
pt3dadd(46.37, 55.81, -22.05, 4.25)
pt3dadd(46.37, 55.65, -22.05, 4.25)
pt3dadd(46.33, 55.55, -22.05, 4.25)
pt3dadd(46.28, 55.45, -22.05, 4.25)
pt3dadd(46.28, 55.25, -22.05, 4.25)
pt3dadd(46.24, 55.15, -22.05, 4.25)
pt3dadd(46.24, 55.04, -22.05, 4.25)
pt3dadd(46.15, 54.89, -22.05, 4.25)
pt3dadd(46.15, 54.69, -22.05, 4.25)
pt3dadd(46.1, 54.64, -22.05, 4.25)
pt3dadd(46.06, 54.54, -22.05, 4.25)
pt3dadd(46.01, 54.49, -22.05, 4.25)
pt3dadd(46.01, 54.38, -22.05, 4.25)
pt3dadd(45.97, 54.28, -22.05, 4.25)
pt3dadd(45.92, 54.24, -22.05, 4.25)
pt3dadd(45.88, 54.13, -22.05, 4.25)
pt3dadd(45.83, 54.08, -22.05, 4.25)
pt3dadd(45.83, 53.98, -22.05, 4.25)
pt3dadd(45.74, 53.88, -22.05, 4.25)
pt3dadd(45.7, 53.78, -22.05, 4.25)
pt3dadd(45.66, 53.68, -22.05, 4.25)
pt3dadd(45.61, 53.58, -22.05, 4.25)
pt3dadd(45.57, 53.53, -22.05, 4.25)
pt3dadd(45.48, 53.42, -22.05, 4.25)
pt3dadd(45.39, 53.27, -22.05, 4.25)
pt3dadd(45.35, 53.17, -22.05, 4.25)
pt3dadd(45.3, 53.07, -22.05, 4.25)
pt3dadd(45.21, 52.97, -22.05, 4.25)
pt3dadd(45.17, 52.87, -22.05, 4.25)
pt3dadd(44.99, 52.67, -22.05, 4.25)
pt3dadd(44.94, 52.51, -22.05, 4.25)
pt3dadd(44.85, 52.36, -22.05, 4.25)
pt3dadd(44.81, 52.21, -22.05, 4.25)
pt3dadd(44.72, 52.06, -22.05, 4.25)
pt3dadd(44.63, 51.9, -22.05, 4.25)
pt3dadd(44.59, 51.8, -22.05, 4.25)
pt3dadd(44.54, 51.65, -22.05, 4.25)
pt3dadd(44.45, 51.5, -22.05, 4.25)
pt3dadd(44.36, 51.35, -22.05, 4.25)
pt3dadd(44.28, 51.25, -22.05, 4.25)
pt3dadd(44.23, 51.1, -22.05, 4.25)
pt3dadd(44.19, 51.04, -22.05, 4.25)
pt3dadd(44.14, 50.94, -22.05, 4.25)
pt3dadd(44.05, 50.84, -22.05, 4.25)
pt3dadd(43.96, 50.69, -22.05, 4.25)
pt3dadd(43.92, 50.54, -22.05, 4.25)
pt3dadd(43.87, 50.44, -22.05, 4.25)
pt3dadd(43.78, 50.38, -22.05, 4.25)
pt3dadd(43.74, 50.28, -22.05, 4.25)
pt3dadd(43.69, 50.18, -22.05, 4.25)
pt3dadd(43.56, 50.03, -22.05, 4.25)
pt3dadd(43.47, 49.93, -22.05, 4.25)
pt3dadd(43.43, 49.83, -22.05, 4.25)
pt3dadd(43.34, 49.68, -22.05, 4.25)
pt3dadd(43.29, 49.58, -22.05, 4.25)
pt3dadd(43.16, 49.37, -22.05, 4.25)
pt3dadd(43.07, 49.27, -22.05, 4.25)
pt3dadd(42.98, 49.17, -22.05, 4.25)
pt3dadd(42.89, 49.02, -22.05, 4.25)
pt3dadd(42.8, 48.92, -22.05, 4.25)
pt3dadd(42.67, 48.76, -22.05, 4.25)
pt3dadd(42.58, 48.67, -22.05, 4.25)
pt3dadd(42.49, 48.56, -22.05, 4.25)
pt3dadd(42.45, 48.41, -22.05, 4.25)
pt3dadd(42.31, 48.31, -22.05, 4.25)
pt3dadd(41.82, 47.75, -22.05, 4.25)
pt3dadd(41.73, 47.65, -22.05, 4.25)
pt3dadd(41.6, 47.55, -22.05, 4.25)
pt3dadd(41.51, 47.45, -22.05, 4.25)
pt3dadd(41.42, 47.35, -22.05, 4.25)
pt3dadd(41.33, 47.19, -22.05, 4.25)
pt3dadd(41.29, 47.15, -22.05, 4.25)
pt3dadd(41.2, 47.04, -22.05, 4.25)
pt3dadd(41.15, 46.99, -22.05, 4.25)
pt3dadd(41.11, 46.89, -22.05, 4.25)
pt3dadd(41.02, 46.84, -22.05, 4.25)
pt3dadd(40.93, 46.69, -22.05, 4.25)
pt3dadd(40.84, 46.64, -22.05, 4.25)
pt3dadd(40.8, 46.59, -22.05, 4.25)
pt3dadd(40.75, 46.49, -22.05, 4.25)
pt3dadd(40.66, 46.44, -22.05, 4.25)
pt3dadd(40.62, 46.38, -22.05, 4.25)
pt3dadd(40.58, 46.33, -22.05, 4.25)
pt3dadd(40.49, 46.18, -22.05, 4.25)
pt3dadd(40.4, 46.13, -22.05, 4.25)
pt3dadd(40.35, 46.08, -22.05, 4.25)
pt3dadd(40.26, 45.98, -22.05, 4.25)
pt3dadd(40.22, 45.88, -22.05, 4.25)
pt3dadd(40.13, 45.78, -22.05, 4.25)
pt3dadd(40.04, 45.68, -22.05, 4.25)
pt3dadd(39.95, 45.58, -22.05, 4.25)
pt3dadd(39.73, 45.32, -22.05, 4.25)
pt3dadd(39.68, 45.22, -22.05, 4.25)
pt3dadd(39.59, 45.17, -22.05, 4.25)
pt3dadd(39.55, 45.07, -22.05, 4.25)
pt3dadd(39.46, 45.02, -22.05, 4.25)
pt3dadd(39.37, 44.87, -22.05, 4.25)
pt3dadd(39.24, 44.76, -22.05, 4.25)
pt3dadd(39.19, 44.72, -22.05, 4.25)
pt3dadd(39.1, 44.61, -22.05, 4.25)
pt3dadd(39.01, 44.56, -22.05, 4.25)
pt3dadd(38.79, 44.31, -22.05, 4.25)
pt3dadd(38.7, 44.21, -22.05, 4.25)
pt3dadd(38.66, 44.11, -22.05, 4.25)
pt3dadd(38.48, 43.9, -22.05, 4.25)
pt3dadd(38.44, 43.8, -22.05, 4.25)
pt3dadd(38.35, 43.75, -22.05, 4.25)
pt3dadd(38.21, 43.45, -22.05, 4.25)
pt3dadd(38.12, 43.3, -22.05, 4.25)
pt3dadd(38.03, 43.19, -22.05, 4.25)
pt3dadd(37.99, 43.1, -22.05, 4.25)
pt3dadd(37.85, 42.94, -22.05, 4.25)
pt3dadd(37.81, 42.84, -22.05, 4.25)
pt3dadd(37.72, 42.79, -22.05, 4.25)
pt3dadd(37.63, 42.69, -22.05, 4.25)
pt3dadd(37.59, 42.59, -22.05, 4.25)
pt3dadd(37.45, 42.44, -22.05, 4.25)
}
}
proc shape3d_55() {
dend[42] { pt3dadd(37.41, 42.38, -22.05, 4.25)
pt3dadd(37.37, 42.28, -22.05, 4.25)
pt3dadd(37.28, 42.23, -22.05, 4.25)
pt3dadd(37.23, 42.13, -22.05, 4.25)
pt3dadd(37.14, 42.13, -22.05, 4.25)
pt3dadd(37.14, 42.23, -22.05, 4.25)
pt3dadd(37.19, 42.13, -19.95, 4.25)
pt3dadd(37.19, 41.98, -19.95, 4.25)
pt3dadd(37.14, 41.93, -19.95, 4.25)
pt3dadd(37.1, 41.88, -19.95, 4.25)
pt3dadd(37.05, 41.83, -19.95, 4.25)
pt3dadd(37.01, 41.73, -19.95, 4.25)
pt3dadd(36.96, 41.63, -19.95, 4.25)
pt3dadd(36.96, 41.53, -19.95, 4.25)
pt3dadd(36.92, 41.47, -19.95, 4.25)
pt3dadd(36.87, 41.37, -19.95, 4.25)
pt3dadd(36.83, 41.32, -19.95, 4.25)
pt3dadd(36.83, 41.22, -19.95, 4.25)
pt3dadd(36.78, 41.12, -19.95, 4.25)
pt3dadd(36.69, 41.02, -19.95, 4.25)
pt3dadd(36.65, 40.97, -19.95, 4.25)
pt3dadd(36.61, 40.87, -19.95, 4.25)
pt3dadd(36.56, 40.76, -19.95, 4.25)
pt3dadd(36.52, 40.72, -19.95, 4.25)
pt3dadd(36.47, 40.66, -19.95, 4.25)
pt3dadd(36.43, 40.56, -19.95, 4.25)
pt3dadd(36.38, 40.46, -19.95, 4.25)
pt3dadd(36.34, 40.36, -19.95, 4.25)
pt3dadd(36.29, 40.31, -19.95, 4.25)
pt3dadd(36.25, 40.21, -19.95, 4.25)
pt3dadd(36.21, 40.11, -19.95, 4.25)
pt3dadd(36.12, 39.96, -19.95, 4.25)
pt3dadd(36.07, 39.8, -19.95, 4.25)
pt3dadd(35.98, 39.7, -19.95, 4.25)
pt3dadd(35.94, 39.6, -19.95, 4.25)
pt3dadd(35.89, 39.55, -19.95, 4.25)
pt3dadd(35.81, 39.4, -19.95, 4.25)
pt3dadd(35.76, 39.3, -19.95, 4.25)
pt3dadd(35.72, 39.24, -19.95, 4.25)
pt3dadd(35.67, 39.15, -19.95, 4.25)
pt3dadd(35.63, 39.1, -19.95, 4.25)
pt3dadd(35.54, 38.94, -19.95, 4.25)
pt3dadd(35.45, 38.84, -19.95, 4.25)
pt3dadd(35.4, 38.74, -19.95, 4.25)
pt3dadd(35.36, 38.64, -19.95, 4.25)
pt3dadd(35.31, 38.54, -19.95, 4.25)
pt3dadd(35.22, 38.49, -19.95, 4.25)
pt3dadd(35.18, 38.38, -19.95, 4.25)
pt3dadd(35.13, 38.28, -19.95, 4.25)
pt3dadd(35.04, 38.18, -19.95, 4.25)
pt3dadd(35, 38.08, -19.95, 4.25)
pt3dadd(35, 37.98, -19.95, 4.25)
pt3dadd(34.91, 37.93, -19.95, 4.25)
pt3dadd(34.87, 37.83, -19.95, 4.25)
pt3dadd(34.69, 37.63, -19.95, 4.25)
pt3dadd(34.65, 37.53, -19.95, 4.25)
pt3dadd(34.56, 37.37, -19.95, 4.25)
pt3dadd(34.51, 37.27, -19.95, 4.25)
pt3dadd(34.47, 37.17, -19.95, 4.25)
pt3dadd(34.42, 37.12, -19.95, 4.25)
pt3dadd(34.38, 37.02, -19.95, 4.25)
pt3dadd(34.29, 36.92, -19.95, 4.25)
pt3dadd(34.2, 36.81, -19.95, 4.25)
pt3dadd(34.15, 36.72, -19.95, 4.25)
pt3dadd(34.06, 36.61, -19.95, 4.25)
pt3dadd(33.97, 36.51, -19.95, 4.25)
pt3dadd(33.93, 36.46, -19.95, 4.25)
pt3dadd(33.89, 36.36, -19.95, 4.25)
pt3dadd(33.84, 36.26, -19.95, 4.25)
pt3dadd(33.75, 36.16, -19.95, 4.25)
pt3dadd(33.67, 35.96, -19.95, 4.25)
pt3dadd(33.62, 35.9, -19.95, 4.25)
pt3dadd(33.49, 35.75, -19.95, 4.25)
pt3dadd(33.44, 35.65, -19.95, 4.25)
pt3dadd(33.4, 35.55, -19.95, 4.25)
pt3dadd(33.35, 35.45, -19.95, 4.25)
pt3dadd(33.26, 35.35, -19.95, 4.25)
pt3dadd(33.22, 35.24, -19.95, 4.25)
pt3dadd(33.13, 35.15, -19.95, 4.25)
pt3dadd(33.08, 35.04, -19.95, 4.25)
pt3dadd(33.04, 34.99, -19.95, 4.25)
pt3dadd(32.99, 34.89, -19.95, 4.25)
pt3dadd(32.95, 34.84, -19.95, 4.25)
pt3dadd(32.9, 34.74, -19.95, 4.25)
pt3dadd(32.86, 34.69, -19.95, 4.25)
pt3dadd(32.82, 34.64, -19.95, 4.25)
pt3dadd(32.68, 34.49, -19.95, 4.25)
pt3dadd(32.64, 34.38, -19.95, 4.25)
pt3dadd(32.6, 34.28, -19.95, 4.25)
pt3dadd(32.51, 34.18, -19.95, 4.25)
pt3dadd(32.46, 34.03, -19.95, 4.25)
pt3dadd(32.33, 33.93, -19.95, 4.25)
pt3dadd(32.28, 33.78, -19.95, 4.25)
pt3dadd(32.19, 33.67, -19.95, 4.25)
pt3dadd(32.1, 33.53, -19.95, 4.25)
pt3dadd(32.01, 33.42, -19.95, 4.25)
pt3dadd(32.01, 33.32, -19.95, 4.25)
pt3dadd(31.92, 33.22, -19.95, 4.25)
pt3dadd(31.88, 33.12, -19.95, 4.25)
pt3dadd(31.79, 33.02, -19.95, 4.25)
pt3dadd(31.7, 32.87, -19.95, 4.25)
pt3dadd(31.66, 32.81, -19.95, 4.25)
pt3dadd(31.57, 32.61, -19.95, 4.25)
pt3dadd(31.52, 32.56, -19.95, 4.25)
pt3dadd(31.48, 32.51, -19.95, 4.25)
pt3dadd(31.39, 32.36, -19.95, 4.25)
pt3dadd(31.34, 32.26, -19.95, 4.25)
pt3dadd(31.3, 32.21, -19.95, 4.25)
pt3dadd(31.12, 32.01, -19.95, 4.25)
pt3dadd(31.08, 31.9, -19.95, 4.25)
pt3dadd(30.99, 31.85, -19.95, 4.25)
pt3dadd(30.94, 31.8, -19.95, 4.25)
pt3dadd(30.9, 31.75, -19.95, 4.25)
pt3dadd(30.85, 31.7, -19.95, 4.25)
pt3dadd(30.76, 31.6, -19.95, 4.25)
pt3dadd(30.72, 31.5, -19.95, 4.25)
pt3dadd(30.68, 31.45, -19.95, 4.25)
pt3dadd(30.63, 31.4, -19.95, 4.25)
pt3dadd(30.54, 31.3, -19.95, 4.25)
pt3dadd(30.45, 31.19, -19.95, 4.25)
pt3dadd(30.41, 31.04, -19.95, 4.25)
pt3dadd(30.36, 30.99, -19.95, 4.25)
pt3dadd(30.32, 30.89, -19.95, 4.25)
pt3dadd(30.19, 30.69, -19.95, 4.25)
pt3dadd(30.14, 30.59, -19.95, 4.25)
pt3dadd(30.1, 30.49, -19.95, 4.25)
pt3dadd(30.01, 30.39, -19.95, 4.25)
pt3dadd(29.96, 30.33, -19.95, 4.25)
pt3dadd(29.92, 30.23, -19.95, 4.25)
pt3dadd(29.88, 30.13, -19.95, 4.25)
pt3dadd(29.83, 30.08, -19.95, 4.25)
pt3dadd(29.78, 30.03, -19.95, 4.25)
pt3dadd(29.69, 29.93, -19.95, 4.25)
pt3dadd(29.61, 29.88, -19.95, 4.25)
pt3dadd(29.56, 29.78, -19.95, 4.25)
pt3dadd(29.47, 29.73, -19.95, 4.25)
pt3dadd(29.43, 29.63, -19.95, 4.25)
pt3dadd(29.39, 29.58, -19.95, 4.25)
pt3dadd(29.34, 29.47, -19.95, 4.25)
pt3dadd(29.3, 29.32, -19.95, 4.25)
pt3dadd(29.2, 29.27, -19.95, 4.25)
pt3dadd(29.12, 29.17, -19.95, 4.25)
pt3dadd(29.03, 29.02, -19.95, 4.25)
pt3dadd(28.98, 28.92, -19.95, 4.25)
pt3dadd(28.89, 28.76, -19.95, 4.25)
pt3dadd(28.85, 28.71, -19.95, 4.25)
pt3dadd(28.81, 28.61, -19.95, 4.25)
pt3dadd(28.76, 28.56, -19.95, 4.25)
pt3dadd(28.67, 28.51, -19.95, 4.25)
pt3dadd(28.63, 28.41, -19.95, 4.25)
pt3dadd(28.49, 28.26, -19.95, 4.25)
pt3dadd(28.45, 28.21, -19.95, 4.25)
pt3dadd(28.36, 28.16, -19.95, 4.25)
pt3dadd(28.32, 28.06, -19.95, 4.25)
pt3dadd(28.23, 28, -19.95, 4.25)
pt3dadd(28.09, 27.95, -19.95, 4.25)
pt3dadd(27.96, 27.8, -19.95, 4.25)
pt3dadd(27.87, 27.75, -19.95, 4.25)
pt3dadd(27.78, 27.65, -19.95, 4.25)
pt3dadd(27.74, 27.6, -19.95, 4.25)
pt3dadd(27.65, 27.6, -19.95, 4.25)
pt3dadd(27.56, 27.5, -19.95, 4.25)
pt3dadd(27.42, 27.5, -19.95, 4.25)
pt3dadd(27.33, 27.45, -19.95, 4.25)
pt3dadd(27.25, 27.4, -19.95, 4.25)
pt3dadd(27.2, 27.34, -19.95, 4.25)
pt3dadd(27.16, 27.3, -19.95, 4.25)
pt3dadd(27.07, 27.25, -19.95, 4.25)
pt3dadd(26.98, 27.19, -19.95, 4.25)
pt3dadd(26.75, 27.19, -19.95, 4.25)
pt3dadd(26.8, 27.14, -19.95, 4.25)
pt3dadd(26.93, 27.14, -19.95, 4.25)
pt3dadd(26.98, 27.19, -19.95, 4.25)
pt3dadd(26.8, 27.09, -17.85, 4.25)
pt3dadd(26.67, 27.09, -17.85, 4.25)
pt3dadd(26.62, 27.04, -17.85, 4.25)
pt3dadd(26.58, 26.99, -17.85, 4.25)
pt3dadd(26.49, 26.94, -17.85, 4.25)
pt3dadd(26.44, 26.89, -17.85, 4.25)
pt3dadd(26.35, 26.89, -17.85, 4.25)
pt3dadd(26.26, 26.84, -17.85, 4.25)
pt3dadd(26.17, 26.79, -17.85, 4.25)
pt3dadd(26.13, 26.69, -17.85, 4.25)
pt3dadd(26.04, 26.64, -17.85, 4.25)
pt3dadd(25.95, 26.59, -17.85, 4.25)
pt3dadd(25.91, 26.53, -17.85, 4.25)
pt3dadd(25.82, 26.53, -17.85, 4.25)
pt3dadd(25.77, 26.49, -17.85, 4.25)
pt3dadd(25.68, 26.39, -17.85, 4.25)
pt3dadd(25.64, 26.33, -17.85, 4.25)
pt3dadd(25.55, 26.23, -17.85, 4.25)
pt3dadd(25.5, 26.18, -17.85, 4.25)
pt3dadd(25.42, 26.08, -17.85, 4.25)
pt3dadd(25.37, 26.03, -17.85, 4.25)
pt3dadd(25.24, 25.88, -17.85, 4.25)
pt3dadd(25.1, 25.73, -17.85, 4.25)
pt3dadd(25.06, 25.67, -17.85, 4.25)
pt3dadd(24.97, 25.63, -17.85, 4.25)
pt3dadd(24.88, 25.52, -17.85, 4.25)
pt3dadd(24.84, 25.47, -17.85, 4.25)
}
}
proc shape3d_56() {
dend[42] { pt3dadd(24.79, 25.37, -17.85, 4.25)
pt3dadd(24.75, 25.32, -17.85, 4.25)
pt3dadd(24.66, 25.27, -17.85, 4.25)
pt3dadd(24.61, 25.22, -17.85, 4.25)
pt3dadd(24.48, 25.07, -17.85, 4.25)
pt3dadd(24.43, 25.02, -17.85, 4.25)
pt3dadd(24.39, 24.97, -17.85, 4.25)
pt3dadd(24.34, 24.86, -17.85, 4.25)
pt3dadd(24.26, 24.82, -17.85, 4.25)
pt3dadd(24.17, 24.71, -17.85, 4.25)
pt3dadd(24.08, 24.66, -17.85, 4.25)
pt3dadd(24.03, 24.61, -17.85, 4.25)
pt3dadd(23.99, 24.51, -17.85, 4.25)
pt3dadd(23.94, 24.46, -17.85, 4.25)
pt3dadd(23.9, 24.36, -17.85, 4.25)
pt3dadd(23.85, 24.31, -17.85, 4.25)
pt3dadd(23.81, 24.16, -17.85, 4.25)
pt3dadd(23.72, 24.1, -17.85, 4.25)
pt3dadd(23.68, 24, -17.85, 4.25)
pt3dadd(23.59, 23.9, -17.85, 4.25)
pt3dadd(23.54, 23.8, -17.85, 4.25)
pt3dadd(23.5, 23.7, -17.85, 4.25)
pt3dadd(23.45, 23.6, -17.85, 4.25)
pt3dadd(23.41, 23.5, -17.85, 4.25)
pt3dadd(23.32, 23.45, -17.85, 4.25)
pt3dadd(23.45, 23.45, -17.85, 3.91)
pt3dadd(23.41, 23.4, -17.85, 3.91)
pt3dadd(23.36, 23.34, -17.85, 3.91)
pt3dadd(23.32, 23.3, -17.85, 3.91)
pt3dadd(23.27, 23.25, -17.85, 3.91)
pt3dadd(23.19, 23.19, -17.85, 3.91)
pt3dadd(23.14, 23.14, -17.85, 3.91)
pt3dadd(23.05, 23.14, -17.85, 3.91)
pt3dadd(23.01, 23.09, -17.85, 3.91)
pt3dadd(22.97, 23.04, -17.85, 3.91)
pt3dadd(22.92, 22.99, -17.85, 3.91)
pt3dadd(22.88, 22.94, -17.85, 3.91)
pt3dadd(22.83, 22.89, -17.85, 3.91)
pt3dadd(22.78, 22.84, -17.85, 3.91)
pt3dadd(22.74, 22.79, -17.85, 3.91)
pt3dadd(22.74, 22.79, -17.85, 3.4)
pt3dadd(22.7, 22.74, -17.85, 3.4)
pt3dadd(22.65, 22.64, -17.85, 3.4)
pt3dadd(22.56, 22.59, -17.85, 3.4)
pt3dadd(22.47, 22.53, -17.85, 3.4)
pt3dadd(22.34, 22.39, -17.85, 3.4)
pt3dadd(22.3, 22.33, -17.85, 3.4)
pt3dadd(22.25, 22.28, -17.85, 3.4)
pt3dadd(22.2, 22.23, -17.85, 3.4)
pt3dadd(22.16, 22.18, -17.85, 3.4)
pt3dadd(22.07, 22.13, -17.85, 3.4)
pt3dadd(22.03, 22.08, -17.85, 3.4)
pt3dadd(21.85, 21.88, -17.85, 3.4)
pt3dadd(21.81, 21.83, -17.85, 3.4)
pt3dadd(21.76, 21.77, -17.85, 3.4)
pt3dadd(21.67, 21.73, -17.85, 3.4)
pt3dadd(21.58, 21.67, -17.85, 3.4)
pt3dadd(21.54, 21.57, -17.85, 3.4)
pt3dadd(21.49, 21.52, -17.85, 3.4)
pt3dadd(21.4, 21.47, -17.85, 3.4)
pt3dadd(21.36, 21.42, -17.85, 3.4)
pt3dadd(21.23, 21.27, -17.85, 3.4)
pt3dadd(21.18, 21.22, -17.85, 3.4)
pt3dadd(21.09, 21.17, -17.85, 3.4)
pt3dadd(21.05, 21.07, -17.85, 3.4)
pt3dadd(20.96, 20.92, -17.85, 3.4)
pt3dadd(20.91, 20.86, -17.85, 3.4)
pt3dadd(20.87, 20.76, -17.85, 3.4)
pt3dadd(20.78, 20.71, -17.85, 3.4)
pt3dadd(20.74, 20.61, -17.85, 3.4)
pt3dadd(20.69, 20.51, -17.85, 3.4)
pt3dadd(20.65, 20.46, -17.85, 3.4)
pt3dadd(20.56, 20.41, -17.85, 3.4)
pt3dadd(20.47, 20.36, -17.85, 3.4)
pt3dadd(20.42, 20.31, -17.85, 3.4)
pt3dadd(20.38, 20.26, -17.85, 3.4)
pt3dadd(20.33, 20.1, -17.85, 3.4)
pt3dadd(20.25, 20.06, -17.85, 3.4)
pt3dadd(20.2, 19.95, -17.85, 3.4)
pt3dadd(20.16, 19.9, -17.85, 3.4)
pt3dadd(20.07, 19.8, -17.85, 3.4)
pt3dadd(20.02, 19.75, -17.85, 3.4)
pt3dadd(19.93, 19.7, -17.85, 3.4)
pt3dadd(19.84, 19.6, -17.85, 3.4)
pt3dadd(19.8, 19.55, -17.85, 3.4)
pt3dadd(19.67, 19.45, -17.85, 3.4)
pt3dadd(19.62, 19.4, -17.85, 3.4)
pt3dadd(19.53, 19.3, -17.85, 3.4)
pt3dadd(19.49, 19.25, -17.85, 3.4)
pt3dadd(19.44, 19.19, -17.85, 3.4)
pt3dadd(19.35, 19.19, -17.85, 3.4)
pt3dadd(19.31, 19.14, -17.85, 3.4)
pt3dadd(19.13, 18.94, -17.85, 3.4)
pt3dadd(19.08, 18.89, -17.85, 3.4)
pt3dadd(19, 18.84, -17.85, 3.4)
pt3dadd(18.91, 18.74, -17.85, 3.4)
pt3dadd(18.82, 18.64, -17.85, 3.4)
pt3dadd(18.73, 18.58, -17.85, 3.4)
pt3dadd(18.68, 18.53, -17.85, 3.4)
pt3dadd(18.5, 18.33, -17.85, 3.4)
pt3dadd(18.42, 18.28, -17.85, 3.4)
pt3dadd(18.33, 18.18, -17.85, 3.4)
pt3dadd(18.24, 18.13, -17.85, 3.4)
pt3dadd(18.15, 18.03, -17.85, 3.4)
pt3dadd(18.1, 17.93, -17.85, 3.4)
pt3dadd(18.01, 17.88, -17.85, 3.4)
pt3dadd(17.93, 17.83, -17.85, 3.4)
pt3dadd(17.88, 17.73, -17.85, 3.4)
pt3dadd(17.79, 17.67, -17.85, 3.4)
pt3dadd(17.57, 17.42, -17.85, 3.4)
pt3dadd(17.52, 17.37, -17.85, 3.4)
pt3dadd(17.39, 17.22, -17.85, 3.4)
pt3dadd(17.3, 17.17, -17.85, 3.4)
pt3dadd(17.26, 17.07, -17.85, 3.4)
pt3dadd(17.21, 17.02, -17.85, 3.4)
pt3dadd(17.13, 16.92, -17.85, 3.4)
pt3dadd(17.03, 16.86, -17.85, 3.4)
pt3dadd(16.94, 16.71, -17.85, 3.4)
pt3dadd(16.86, 16.66, -17.85, 3.4)
pt3dadd(16.81, 16.61, -17.85, 3.4)
pt3dadd(16.41, 16.16, -17.85, 3.4)
pt3dadd(16.36, 16.1, -17.85, 3.4)
pt3dadd(16.28, 16, -17.85, 3.4)
pt3dadd(16.23, 15.95, -17.85, 3.4)
pt3dadd(16.14, 15.85, -17.85, 3.4)
pt3dadd(16.06, 15.8, -17.85, 3.4)
pt3dadd(16.01, 15.7, -17.85, 3.4)
pt3dadd(15.88, 15.6, -17.85, 3.4)
pt3dadd(15.83, 15.55, -17.85, 3.4)
pt3dadd(15.74, 15.45, -17.85, 3.4)
pt3dadd(15.65, 15.4, -17.85, 3.4)
pt3dadd(15.52, 15.24, -17.85, 3.4)
pt3dadd(15.43, 15.09, -17.85, 3.4)
pt3dadd(15.12, 14.74, -17.85, 3.4)
pt3dadd(15.07, 14.64, -17.85, 3.4)
pt3dadd(15.03, 14.53, -17.85, 3.4)
pt3dadd(14.98, 14.48, -17.85, 3.4)
pt3dadd(14.94, 14.44, -17.85, 3.4)
pt3dadd(14.85, 14.38, -17.85, 3.4)
pt3dadd(14.81, 14.33, -17.85, 3.4)
pt3dadd(14.76, 14.23, -17.85, 3.4)
pt3dadd(14.67, 14.13, -17.85, 3.4)
pt3dadd(14.63, 14.03, -17.85, 3.4)
pt3dadd(14.54, 13.93, -17.85, 3.4)
pt3dadd(14.49, 13.88, -17.85, 3.4)
pt3dadd(14.45, 13.77, -17.85, 3.4)
pt3dadd(14.36, 13.68, -17.85, 3.4)
pt3dadd(14.31, 13.57, -17.85, 3.4)
pt3dadd(14.23, 13.47, -17.85, 3.4)
pt3dadd(14.18, 13.37, -17.85, 3.4)
pt3dadd(14.14, 13.27, -17.85, 3.4)
pt3dadd(14.05, 13.22, -17.85, 3.4)
pt3dadd(13.96, 13.12, -17.85, 3.4)
pt3dadd(13.87, 13.02, -17.85, 3.4)
pt3dadd(13.78, 12.86, -17.85, 3.4)
pt3dadd(13.65, 12.71, -17.85, 3.4)
pt3dadd(13.56, 12.56, -17.85, 3.4)
pt3dadd(13.47, 12.51, -17.85, 3.4)
pt3dadd(13.42, 12.46, -17.85, 3.4)
pt3dadd(13.38, 12.41, -17.85, 3.4)
pt3dadd(13.34, 12.31, -17.85, 3.4)
pt3dadd(13.24, 12.26, -17.85, 3.4)
pt3dadd(13.2, 12.15, -17.85, 3.4)
pt3dadd(13.15, 12.1, -17.85, 3.4)
pt3dadd(13.11, 12, -17.85, 3.4)
pt3dadd(13.07, 11.9, -17.85, 3.4)
pt3dadd(12.98, 11.8, -17.85, 3.4)
pt3dadd(12.93, 11.65, -17.85, 3.4)
pt3dadd(12.76, 11.45, -17.85, 3.4)
pt3dadd(12.66, 11.3, -17.85, 3.4)
pt3dadd(12.62, 11.19, -17.85, 3.4)
pt3dadd(12.53, 11.14, -17.85, 3.4)
pt3dadd(12.49, 11.04, -17.85, 3.4)
pt3dadd(12.4, 10.94, -17.85, 3.4)
pt3dadd(12.31, 10.84, -17.85, 3.4)
pt3dadd(12.27, 10.79, -17.85, 3.4)
pt3dadd(12.22, 10.69, -17.85, 3.4)
pt3dadd(12.13, 10.59, -17.85, 3.4)
pt3dadd(12.09, 10.53, -17.85, 3.4)
pt3dadd(12.04, 10.48, -17.85, 3.4)
pt3dadd(12, 10.43, -17.85, 3.4)
pt3dadd(11.95, 10.33, -17.85, 3.4)
pt3dadd(11.86, 10.28, -17.85, 3.4)
pt3dadd(11.82, 10.23, -17.85, 3.4)
pt3dadd(11.77, 10.18, -17.85, 3.4)
pt3dadd(11.73, 10.13, -17.85, 3.4)
pt3dadd(11.64, 10.13, -17.85, 3.4)
pt3dadd(12.09, 10.38, -15.75, 3.4)
pt3dadd(12, 10.38, -15.75, 3.4)
pt3dadd(11.95, 10.33, -15.75, 3.4)
pt3dadd(11.91, 10.28, -15.75, 3.4)
pt3dadd(11.86, 10.23, -15.75, 3.4)
pt3dadd(11.82, 10.18, -15.75, 3.4)
pt3dadd(11.77, 10.13, -15.75, 3.4)
pt3dadd(11.73, 10.08, -15.75, 3.4)
pt3dadd(11.64, 9.98, -15.75, 3.4)
pt3dadd(11.64, 9.88, -15.75, 3.4)
pt3dadd(11.6, 9.82, -15.75, 3.4)
pt3dadd(11.55, 9.73, -15.75, 3.4)
pt3dadd(11.51, 9.62, -15.75, 3.4)
}
}
proc shape3d_57() {
dend[42] { pt3dadd(11.46, 9.57, -15.75, 3.4)
pt3dadd(11.46, 9.47, -15.75, 3.4)
pt3dadd(11.42, 9.37, -15.75, 3.4)
pt3dadd(11.37, 9.27, -15.75, 3.4)
pt3dadd(11.37, 9.17, -15.75, 3.4)
pt3dadd(11.33, 9.07, -15.75, 3.4)
pt3dadd(11.33, 8.97, -15.75, 3.4)
pt3dadd(11.28, 8.86, -15.75, 3.4)
pt3dadd(11.24, 8.76, -15.75, 3.4)
pt3dadd(11.19, 8.66, -15.75, 3.4)
pt3dadd(11.15, 8.56, -15.75, 3.4)
pt3dadd(11.15, 8.46, -15.75, 3.4)
pt3dadd(11.1, 8.36, -15.75, 3.4)
pt3dadd(11.06, 8.31, -15.75, 3.4)
pt3dadd(11.02, 8.15, -15.75, 3.4)
pt3dadd(10.97, 8.1, -15.75, 3.4)
pt3dadd(10.93, 7.95, -15.75, 3.4)
pt3dadd(10.88, 7.9, -15.75, 3.4)
pt3dadd(10.84, 7.75, -15.75, 3.4)
pt3dadd(10.79, 7.7, -15.75, 3.4)
pt3dadd(10.79, 7.6, -15.75, 3.4)
pt3dadd(10.75, 7.55, -15.75, 3.4)
pt3dadd(10.7, 7.45, -15.75, 3.4)
pt3dadd(10.66, 7.39, -15.75, 3.4)
pt3dadd(10.66, 7.3, -15.75, 3.4)
pt3dadd(10.57, 7.19, -15.75, 3.4)
pt3dadd(10.57, 7.09, -15.75, 3.4)
pt3dadd(10.52, 7.04, -15.75, 3.4)
pt3dadd(10.48, 6.94, -15.75, 3.4)
pt3dadd(10.44, 6.84, -15.75, 3.4)
pt3dadd(10.39, 6.74, -15.75, 3.4)
pt3dadd(10.35, 6.64, -15.75, 3.4)
pt3dadd(10.26, 6.49, -15.75, 3.4)
pt3dadd(10.21, 6.38, -15.75, 3.4)
pt3dadd(10.17, 6.33, -15.75, 3.4)
pt3dadd(10.13, 6.28, -15.75, 3.4)
pt3dadd(10.08, 6.23, -15.75, 3.4)
pt3dadd(10.03, 6.13, -15.75, 3.4)
pt3dadd(9.99, 6.03, -15.75, 3.4)
pt3dadd(9.9, 5.98, -15.75, 3.4)
pt3dadd(9.9, 5.88, -15.75, 3.4)
pt3dadd(9.86, 5.82, -15.75, 3.4)
pt3dadd(9.81, 5.72, -15.75, 3.4)
pt3dadd(9.77, 5.67, -15.75, 3.4)
pt3dadd(9.68, 5.57, -15.75, 3.4)
pt3dadd(9.64, 5.47, -15.75, 3.4)
pt3dadd(9.59, 5.37, -15.75, 3.4)
pt3dadd(9.55, 5.32, -15.75, 3.4)
pt3dadd(9.5, 5.22, -15.75, 3.4)
pt3dadd(9.41, 5.12, -15.75, 3.4)
pt3dadd(9.37, 4.97, -15.75, 3.4)
pt3dadd(9.28, 4.86, -15.75, 3.4)
pt3dadd(9.23, 4.71, -15.75, 3.4)
pt3dadd(9.19, 4.66, -15.75, 3.4)
pt3dadd(9.14, 4.56, -15.75, 3.4)
pt3dadd(9.1, 4.46, -15.75, 3.4)
pt3dadd(9.06, 4.36, -15.75, 3.4)
pt3dadd(9.01, 4.26, -15.75, 3.4)
pt3dadd(8.92, 4.16, -15.75, 3.4)
pt3dadd(8.88, 4.11, -15.75, 3.4)
pt3dadd(8.83, 4.05, -15.75, 3.4)
pt3dadd(8.79, 3.95, -15.75, 3.4)
pt3dadd(8.74, 3.9, -15.75, 3.4)
pt3dadd(8.7, 3.8, -15.75, 3.4)
pt3dadd(8.65, 3.7, -15.75, 3.4)
pt3dadd(8.56, 3.6, -15.75, 3.4)
pt3dadd(8.52, 3.5, -15.75, 3.4)
pt3dadd(8.48, 3.44, -15.75, 3.4)
pt3dadd(8.43, 3.35, -15.75, 3.4)
pt3dadd(8.39, 3.3, -15.75, 3.4)
pt3dadd(8.34, 3.24, -15.75, 3.4)
pt3dadd(8.3, 3.14, -15.75, 3.4)
pt3dadd(8.25, 3.09, -15.75, 3.4)
pt3dadd(8.21, 2.99, -15.75, 3.4)
pt3dadd(8.16, 2.94, -15.75, 3.4)
pt3dadd(8.12, 2.84, -15.75, 3.4)
pt3dadd(8.07, 2.79, -15.75, 3.4)
pt3dadd(8.03, 2.68, -15.75, 3.4)
pt3dadd(7.99, 2.59, -15.75, 3.4)
pt3dadd(7.94, 2.54, -15.75, 3.4)
pt3dadd(7.85, 2.43, -15.75, 3.4)
pt3dadd(7.8, 2.38, -15.75, 3.4)
pt3dadd(7.76, 2.33, -15.75, 3.4)
pt3dadd(-2.82, -23.89, -15.75, 2.38)
pt3dadd(-2.91, -23.94, -15.75, 2.38)
pt3dadd(-2.99, -24.04, -15.75, 2.38)
pt3dadd(-3.04, -24.09, -15.75, 2.38)
pt3dadd(-3.09, -24.14, -15.75, 2.38)
pt3dadd(-3.13, -24.19, -15.75, 2.38)
pt3dadd(-3.17, -24.24, -15.75, 2.38)
pt3dadd(-3.22, -24.29, -15.75, 2.38)
pt3dadd(-3.22, -24.19, -15.75, 2.38)
pt3dadd(-3.09, -23.89, -15.75, 2.38)
pt3dadd(-2.95, -24.14, -15.75, 2.38)
pt3dadd(-2.95, -24.24, -15.75, 2.38)
pt3dadd(-2.99, -24.29, -15.75, 2.38)
pt3dadd(-3.04, -24.34, -15.75, 2.38)
pt3dadd(-3.09, -24.4, -15.75, 2.38)
pt3dadd(-3.09, -24.5, -15.75, 2.38)
pt3dadd(-3.13, -24.55, -15.75, 2.38)
pt3dadd(-3.17, -24.6, -15.75, 2.38)
pt3dadd(-3.22, -24.65, -15.75, 2.38)
pt3dadd(-3.26, -24.7, -15.75, 2.38)
pt3dadd(-3.31, -24.8, -15.75, 2.38)
pt3dadd(-3.31, -24.9, -15.75, 2.38)
pt3dadd(-3.35, -25, -15.75, 2.38)
pt3dadd(-3.4, -25.05, -15.75, 2.38)
pt3dadd(-3.4, -25.2, -15.75, 2.38)
pt3dadd(-3.44, -25.31, -15.75, 2.38)
pt3dadd(-3.48, -25.36, -15.75, 2.38)
pt3dadd(-3.53, -25.51, -15.75, 2.38)
pt3dadd(-3.53, -25.66, -15.75, 2.38)
pt3dadd(-3.58, -25.81, -15.75, 2.38)
pt3dadd(-3.62, -25.92, -15.75, 2.38)
pt3dadd(-3.66, -26.01, -15.75, 2.38)
pt3dadd(-3.71, -26.12, -15.75, 2.38)
pt3dadd(-3.75, -26.27, -15.75, 2.38)
pt3dadd(-3.8, -26.42, -15.75, 2.38)
pt3dadd(-3.84, -26.57, -15.75, 2.38)
pt3dadd(-3.89, -26.67, -15.75, 3.74)
pt3dadd(-3.93, -26.73, -15.75, 2.38)
pt3dadd(-3.98, -26.88, -15.75, 2.38)
pt3dadd(-4.02, -26.98, -15.75, 2.38)
pt3dadd(-4.07, -27.08, -15.75, 2.38)
pt3dadd(-4.11, -27.23, -15.75, 2.38)
pt3dadd(-4.16, -27.43, -15.75, 2.38)
pt3dadd(-4.2, -27.53, -15.75, 2.38)
pt3dadd(-4.29, -27.74, -15.75, 2.38)
pt3dadd(-4.38, -27.94, -15.75, 2.38)
pt3dadd(-4.42, -28.09, -15.75, 2.38)
pt3dadd(-4.47, -28.19, -15.75, 2.38)
pt3dadd(-4.6, -28.44, -15.75, 2.38)
pt3dadd(-4.69, -28.6, -15.75, 2.38)
pt3dadd(-4.74, -28.8, -15.75, 2.38)
pt3dadd(-4.82, -29, -15.75, 2.38)
pt3dadd(-4.91, -29.16, -15.75, 2.38)
pt3dadd(-4.96, -29.36, -15.75, 2.38)
pt3dadd(-5.05, -29.46, -15.75, 2.38)
pt3dadd(-5.09, -29.61, -15.75, 2.38)
pt3dadd(-5.14, -29.81, -15.75, 2.38)
pt3dadd(-5.22, -29.92, -15.75, 2.38)
pt3dadd(-5.27, -30.12, -15.75, 2.38)
pt3dadd(-5.31, -30.27, -15.75, 2.38)
pt3dadd(-5.4, -30.47, -15.75, 2.38)
pt3dadd(-5.49, -30.67, -15.75, 2.38)
pt3dadd(-5.54, -30.77, -15.75, 2.38)
pt3dadd(-5.63, -30.98, -15.75, 2.38)
pt3dadd(-5.67, -31.08, -15.75, 2.38)
pt3dadd(-5.8, -31.43, -15.75, 2.38)
pt3dadd(-5.85, -31.58, -15.75, 2.38)
pt3dadd(-5.94, -31.79, -15.75, 2.38)
pt3dadd(-5.98, -31.94, -15.75, 2.38)
pt3dadd(-6.07, -32.09, -15.75, 2.38)
pt3dadd(-6.16, -32.35, -15.75, 2.38)
pt3dadd(-6.25, -32.5, -15.75, 2.38)
pt3dadd(-6.3, -32.65, -15.75, 2.38)
pt3dadd(-6.34, -32.8, -15.75, 2.38)
pt3dadd(-6.43, -33, -15.75, 2.38)
pt3dadd(-6.52, -33.1, -15.75, 2.38)
pt3dadd(-6.56, -33.26, -15.75, 2.38)
pt3dadd(-6.61, -33.36, -15.75, 2.38)
pt3dadd(-6.7, -33.51, -15.75, 2.38)
pt3dadd(-6.74, -33.61, -15.75, 2.38)
pt3dadd(-6.78, -33.76, -15.75, 2.38)
pt3dadd(-6.88, -33.92, -15.75, 2.38)
pt3dadd(-6.92, -34.01, -15.75, 2.38)
pt3dadd(-7.01, -34.27, -15.75, 2.38)
pt3dadd(-7.1, -34.37, -15.75, 2.38)
pt3dadd(-7.14, -34.47, -15.75, 2.38)
pt3dadd(-7.18, -34.62, -15.75, 2.38)
pt3dadd(-7.23, -34.72, -15.75, 2.38)
pt3dadd(-7.28, -34.83, -15.75, 2.38)
pt3dadd(-7.36, -34.93, -15.75, 2.38)
pt3dadd(-7.41, -35.03, -15.75, 2.38)
pt3dadd(-7.5, -35.18, -15.75, 2.38)
pt3dadd(-7.54, -35.28, -15.75, 2.38)
pt3dadd(-7.59, -35.38, -15.75, 2.38)
pt3dadd(-7.63, -35.49, -15.75, 2.38)
pt3dadd(-7.72, -35.63, -15.75, 2.38)
pt3dadd(-7.76, -35.74, -15.75, 2.38)
pt3dadd(-7.86, -35.89, -15.75, 2.38)
pt3dadd(-7.9, -35.99, -15.75, 2.38)
pt3dadd(-7.95, -36.09, -15.75, 2.38)
pt3dadd(-8.03, -36.19, -15.75, 2.38)
pt3dadd(-8.08, -36.24, -15.75, 2.38)
pt3dadd(-8.12, -36.29, -15.75, 2.38)
pt3dadd(-8.17, -36.45, -15.75, 2.38)
pt3dadd(-8.21, -36.55, -15.75, 2.38)
pt3dadd(-8.26, -36.65, -15.75, 2.38)
pt3dadd(-8.3, -36.75, -15.75, 2.38)
pt3dadd(-8.35, -36.85, -15.75, 2.38)
pt3dadd(-8.44, -36.95, -15.75, 2.38)
pt3dadd(-8.48, -37, -15.75, 2.38)
pt3dadd(-8.52, -37.15, -15.75, 2.38)
pt3dadd(-8.57, -37.26, -15.75, 2.38)
pt3dadd(-8.61, -37.36, -15.75, 2.38)
pt3dadd(-8.66, -37.46, -15.75, 2.38)
pt3dadd(-8.7, -37.56, -15.75, 2.38)
pt3dadd(-8.7, -37.66, -15.75, 2.38)
pt3dadd(-8.79, -37.76, -15.75, 2.38)
}
}
proc shape3d_58() {
dend[42] { pt3dadd(-8.84, -37.87, -15.75, 2.38)
pt3dadd(-8.88, -37.97, -15.75, 2.38)
pt3dadd(-8.88, -38.07, -15.75, 2.38)
pt3dadd(-8.93, -38.12, -15.75, 2.38)
pt3dadd(-8.93, -38.22, -15.75, 2.38)
pt3dadd(-8.97, -38.32, -15.75, 2.38)
pt3dadd(-9.02, -38.42, -15.75, 2.38)
pt3dadd(-9.06, -38.57, -15.75, 2.38)
pt3dadd(-9.06, -38.72, -15.75, 2.38)
pt3dadd(-9.1, -38.78, -15.75, 2.38)
pt3dadd(-9.1, -38.72, -15.75, 2.38)
pt3dadd(-9.06, -38.52, -15.75, 2.38)
pt3dadd(-9.06, -38.67, -15.75, 2.38)
pt3dadd(-9.1, -38.78, -15.75, 2.38)
pt3dadd(-9.15, -38.88, -15.75, 2.38)
pt3dadd(-9.19, -39.03, -15.75, 2.38)
pt3dadd(-9.24, -39.13, -15.75, 2.38)
pt3dadd(-9.28, -39.28, -15.75, 2.38)
pt3dadd(-9.37, -39.49, -15.75, 2.38)
pt3dadd(-9.41, -39.64, -15.75, 2.38)
pt3dadd(-9.46, -39.74, -15.75, 2.38)
pt3dadd(-9.51, -39.84, -15.75, 2.38)
pt3dadd(-9.55, -39.94, -15.75, 2.38)
pt3dadd(-9.55, -40.04, -15.75, 2.38)
pt3dadd(-9.64, -40.19, -15.75, 2.38)
pt3dadd(-9.68, -40.29, -15.75, 2.38)
pt3dadd(-9.73, -40.4, -15.75, 2.38)
pt3dadd(-9.77, -40.55, -15.75, 2.38)
pt3dadd(-9.82, -40.65, -15.75, 2.38)
pt3dadd(-9.18, -40.75, -15.75, 2.38)
pt3dadd(-9.9, -40.85, -15.75, 2.38)
pt3dadd(-9.95, -41, -15.75, 2.38)
pt3dadd(-9.99, -41.1, -15.75, 2.38)
pt3dadd(-10.04, -41.21, -15.75, 2.38)
pt3dadd(-10.09, -41.36, -15.75, 2.38)
pt3dadd(-10.13, -41.41, -15.75, 2.38)
pt3dadd(-10.17, -41.51, -15.75, 2.38)
pt3dadd(-10.26, -41.66, -15.75, 2.38)
pt3dadd(-10.31, -41.76, -15.75, 2.38)
pt3dadd(-10.35, -41.87, -15.75, 2.38)
pt3dadd(-10.4, -41.97, -15.75, 2.38)
pt3dadd(-10.44, -42.07, -15.75, 2.38)
pt3dadd(-10.48, -42.17, -15.75, 2.38)
pt3dadd(-10.53, -42.27, -15.75, 2.38)
pt3dadd(-10.57, -42.37, -15.75, 2.38)
pt3dadd(-10.62, -42.47, -15.75, 2.38)
pt3dadd(-10.66, -42.57, -15.75, 2.38)
pt3dadd(-10.75, -42.67, -15.75, 2.38)
pt3dadd(-10.75, -42.83, -15.75, 2.38)
pt3dadd(-10.84, -42.93, -15.75, 2.38)
pt3dadd(-10.89, -42.98, -15.75, 2.38)
pt3dadd(-10.93, -43.13, -15.75, 2.38)
pt3dadd(-10.98, -43.23, -15.75, 2.38)
pt3dadd(-11.02, -43.33, -15.75, 2.38)
pt3dadd(-11.06, -43.44, -15.75, 2.38)
pt3dadd(-11.11, -43.53, -15.75, 2.38)
pt3dadd(-11.15, -43.64, -15.75, 2.38)
pt3dadd(-11.2, -43.79, -15.75, 2.38)
pt3dadd(-11.24, -43.84, -15.75, 2.38)
pt3dadd(-11.29, -43.94, -15.75, 2.38)
pt3dadd(-11.15, -43.79, -15.75, 2.38)
pt3dadd(-11.15, -43.94, -15.75, 2.38)
pt3dadd(-11.2, -44.04, -15.75, 2.38)
pt3dadd(-11.29, -44.19, -15.75, 2.38)
pt3dadd(-11.29, -44.29, -15.75, 2.38)
pt3dadd(-11.38, -44.35, -15.75, 2.38)
pt3dadd(-11.38, -44.5, -15.75, 2.38)
pt3dadd(-11.47, -44.7, -15.75, 2.38)
pt3dadd(-11.56, -44.8, -15.75, 2.38)
pt3dadd(-11.6, -45.01, -15.75, 2.38)
pt3dadd(-11.65, -45.15, -15.75, 2.38)
pt3dadd(-11.69, -45.21, -15.75, 2.38)
pt3dadd(-11.73, -45.31, -15.75, 2.38)
pt3dadd(-11.78, -45.41, -15.75, 2.38)
pt3dadd(-11.78, -45.51, -15.75, 2.38)
pt3dadd(-11.82, -45.61, -15.75, 2.38)
pt3dadd(-11.87, -45.66, -15.75, 2.38)
pt3dadd(-11.91, -45.76, -15.75, 2.38)
pt3dadd(-11.96, -45.81, -15.75, 2.38)
pt3dadd(-11.96, -45.97, -15.75, 2.38)
pt3dadd(-12.05, -46.12, -15.75, 2.38)
pt3dadd(-12.09, -46.17, -15.75, 2.38)
pt3dadd(-12.14, -46.32, -15.75, 2.38)
pt3dadd(-12.18, -46.47, -15.75, 2.38)
pt3dadd(-12.23, -46.63, -15.75, 2.38)
pt3dadd(-12.27, -46.72, -15.75, 2.38)
pt3dadd(-12.31, -46.83, -15.75, 2.38)
pt3dadd(-12.36, -46.98, -15.75, 2.38)
pt3dadd(-12.45, -47.23, -15.75, 2.38)
pt3dadd(-12.49, -47.33, -15.75, 2.38)
pt3dadd(-12.53, -47.44, -15.75, 2.38)
pt3dadd(-12.58, -47.59, -15.75, 2.38)
pt3dadd(-12.63, -47.69, -15.75, 2.38)
pt3dadd(-12.67, -47.84, -15.75, 2.38)
pt3dadd(-12.72, -47.99, -15.75, 2.38)
pt3dadd(-12.76, -48.09, -15.75, 2.38)
pt3dadd(-12.8, -48.19, -15.75, 2.38)
pt3dadd(-12.85, -48.29, -15.75, 2.38)
pt3dadd(-12.89, -48.4, -15.75, 2.38)
pt3dadd(-12.89, -48.55, -15.75, 2.38)
pt3dadd(-12.94, -48.65, -15.75, 2.38)
pt3dadd(-12.98, -48.75, -15.75, 2.38)
pt3dadd(-13.03, -48.85, -15.75, 2.38)
pt3dadd(-13.03, -49.06, -15.75, 2.38)
pt3dadd(-13.07, -49.21, -15.75, 2.38)
pt3dadd(-13.11, -49.31, -15.75, 2.38)
pt3dadd(-13.16, -49.51, -15.75, 2.38)
pt3dadd(-13.2, -49.66, -15.75, 2.38)
pt3dadd(-13.25, -49.87, -15.75, 2.38)
pt3dadd(-13.25, -49.97, -15.75, 2.38)
pt3dadd(-13.3, -50.17, -15.75, 2.38)
pt3dadd(-13.34, -50.32, -15.75, 2.38)
pt3dadd(-13.43, -50.67, -15.75, 2.38)
pt3dadd(-13.47, -50.78, -15.75, 2.38)
pt3dadd(-13.52, -50.98, -15.75, 2.38)
pt3dadd(-13.56, -51.13, -15.75, 2.38)
pt3dadd(-13.69, -51.53, -15.75, 2.38)
pt3dadd(-13.74, -51.74, -15.75, 2.38)
pt3dadd(-13.83, -51.89, -15.75, 2.38)
pt3dadd(-13.87, -52.04, -15.75, 2.38)
pt3dadd(-13.92, -52.29, -15.75, 2.38)
pt3dadd(-13.96, -52.45, -15.75, 2.38)
pt3dadd(-14.05, -52.65, -15.75, 2.38)
pt3dadd(-14.1, -52.8, -15.75, 2.38)
pt3dadd(-14.14, -53.01, -15.75, 2.38)
pt3dadd(-14.23, -53.16, -15.75, 2.38)
pt3dadd(-14.27, -53.31, -15.75, 2.38)
pt3dadd(-14.32, -53.46, -15.75, 2.38)
pt3dadd(-14.32, -53.61, -15.75, 2.38)
pt3dadd(-14.36, -53.66, -15.75, 2.38)
pt3dadd(-14.41, -53.87, -15.75, 2.38)
pt3dadd(-14.41, -54.07, -15.75, 2.38)
pt3dadd(-14.45, -54.17, -15.75, 2.38)
pt3dadd(-14.45, -54.37, -15.75, 2.38)
pt3dadd(-14.5, -54.47, -15.75, 2.38)
pt3dadd(-14.54, -54.58, -15.75, 2.38)
pt3dadd(-14.54, -54.72, -15.75, 2.38)
pt3dadd(-14.59, -54.88, -15.75, 2.38)
pt3dadd(-14.63, -55.03, -15.75, 2.38)
pt3dadd(-14.63, -55.13, -15.75, 2.38)
pt3dadd(-14.72, -55.38, -15.75, 2.38)
pt3dadd(-14.77, -55.59, -15.75, 2.38)
pt3dadd(-14.81, -55.74, -15.75, 2.38)
pt3dadd(-14.85, -55.89, -15.75, 2.38)
pt3dadd(-14.9, -55.99, -15.75, 2.38)
pt3dadd(-14.94, -56.15, -15.75, 2.38)
pt3dadd(-14.99, -56.4, -15.75, 2.38)
pt3dadd(-15.03, -56.55, -15.75, 2.38)
pt3dadd(-15.08, -56.75, -15.75, 2.38)
pt3dadd(-15.12, -56.96, -15.75, 2.38)
pt3dadd(-15.17, -57.16, -15.75, 2.38)
pt3dadd(-15.26, -57.51, -15.75, 2.38)
pt3dadd(-15.3, -57.71, -15.75, 2.38)
pt3dadd(-15.35, -57.87, -15.75, 2.38)
pt3dadd(-15.39, -58.07, -15.75, 2.38)
pt3dadd(-15.39, -58.22, -15.75, 2.38)
pt3dadd(-15.44, -58.32, -15.75, 2.38)
pt3dadd(-15.44, -58.47, -15.75, 2.38)
pt3dadd(-15.48, -58.53, -15.75, 2.38)
pt3dadd(-15.52, -58.58, -15.75, 2.38)
pt3dadd(-15.52, -58.42, -15.75, 2.38)
pt3dadd(-15.48, -58.32, -15.75, 2.38)
pt3dadd(-15.35, -58.07, -15.75, 2.38)
pt3dadd(-15.35, -58.17, -15.75, 2.38)
pt3dadd(-15.39, -58.27, -15.75, 2.38)
pt3dadd(-15.48, -58.32, -15.75, 2.38)
pt3dadd(-15.52, -58.47, -15.75, 2.38)
pt3dadd(-15.57, -58.53, -15.75, 2.38)
pt3dadd(-15.66, -58.63, -15.75, 2.38)
pt3dadd(-15.7, -58.73, -15.75, 2.38)
pt3dadd(-15.74, -58.83, -15.75, 2.38)
pt3dadd(-15.84, -58.93, -15.75, 2.38)
pt3dadd(-15.88, -59.03, -15.75, 2.38)
pt3dadd(-15.93, -59.08, -15.75, 2.38)
pt3dadd(-15.93, -59.18, -15.75, 2.38)
pt3dadd(-15.97, -59.23, -15.75, 2.38)
pt3dadd(-16.06, -59.28, -15.75, 2.38)
pt3dadd(-16.15, -59.44, -15.75, 2.38)
pt3dadd(-16.19, -59.49, -15.75, 2.38)
pt3dadd(-16.28, -59.59, -15.75, 2.38)
pt3dadd(-16.33, -59.64, -15.75, 2.38)
pt3dadd(-16.37, -59.79, -15.75, 2.38)
pt3dadd(-16.42, -59.89, -15.75, 2.38)
pt3dadd(-16.5, -59.94, -15.75, 2.38)
pt3dadd(-16.55, -60.04, -15.75, 2.38)
pt3dadd(-16.59, -60.09, -15.75, 2.38)
pt3dadd(-16.64, -60.19, -15.75, 2.38)
pt3dadd(-16.77, -60.35, -15.75, 2.38)
pt3dadd(-16.82, -60.45, -15.75, 2.38)
pt3dadd(-16.86, -60.55, -15.75, 2.38)
pt3dadd(-17, -60.7, -15.75, 2.38)
pt3dadd(-17.04, -60.75, -15.75, 2.38)
pt3dadd(-17.08, -60.85, -15.75, 2.38)
pt3dadd(-17.22, -60.96, -15.75, 2.38)
pt3dadd(-17.35, -61.16, -15.75, 2.38)
pt3dadd(-17.49, -61.26, -15.75, 2.38)
pt3dadd(-17.58, -61.36, -15.75, 2.38)
pt3dadd(-17.71, -61.46, -15.75, 2.38)
pt3dadd(-17.84, -61.61, -15.75, 2.38)
pt3dadd(-17.93, -61.72, -15.75, 2.38)
}
}
proc shape3d_59() {
dend[42] { pt3dadd(-18.02, -61.81, -15.75, 2.38)
pt3dadd(-18.15, -61.92, -15.75, 2.38)
pt3dadd(-18.29, -62.07, -15.75, 2.38)
pt3dadd(-18.42, -62.17, -15.75, 2.38)
pt3dadd(-18.51, -62.27, -15.75, 2.38)
pt3dadd(-18.6, -62.37, -15.75, 2.38)
pt3dadd(-18.73, -62.47, -15.75, 2.38)
pt3dadd(-18.82, -62.53, -15.75, 2.38)
pt3dadd(-19, -62.63, -15.75, 2.38)
pt3dadd(-19.09, -62.67, -15.75, 2.38)
pt3dadd(-19.14, -62.73, -15.75, 2.38)
pt3dadd(-19.18, -62.83, -15.75, 2.38)
pt3dadd(-19.31, -62.88, -15.75, 2.38)
pt3dadd(-19.4, -62.93, -15.75, 2.38)
pt3dadd(-19.53, -63.08, -15.75, 2.38)
pt3dadd(-19.67, -63.08, -15.75, 2.38)
pt3dadd(-19.72, -63.13, -15.75, 2.38)
pt3dadd(-19.8, -63.18, -15.75, 2.38)
pt3dadd(-19.89, -63.23, -15.75, 2.38)
pt3dadd(-19.98, -63.28, -15.75, 2.38)
pt3dadd(-20.07, -63.28, -15.75, 2.38)
pt3dadd(-20.16, -63.38, -15.75, 2.38)
pt3dadd(-20.25, -63.44, -15.75, 2.38)
pt3dadd(-20.38, -63.49, -15.75, 2.38)
pt3dadd(-20.52, -63.59, -15.75, 2.38)
pt3dadd(-20.56, -63.64, -15.75, 2.38)
pt3dadd(-20.65, -63.69, -15.75, 2.38)
pt3dadd(-20.69, -63.74, -15.75, 2.38)
pt3dadd(-20.83, -63.79, -15.75, 2.38)
pt3dadd(-20.96, -63.89, -15.75, 2.38)
pt3dadd(-21.14, -64.1, -15.75, 2.38)
pt3dadd(-21.23, -64.14, -15.75, 2.38)
pt3dadd(-21.32, -64.19, -15.75, 2.38)
pt3dadd(-21.41, -64.25, -15.75, 2.38)
pt3dadd(-21.58, -64.4, -15.75, 2.38)
pt3dadd(-21.67, -64.45, -15.75, 2.38)
pt3dadd(-21.81, -64.55, -15.75, 2.38)
pt3dadd(-21.9, -64.65, -15.75, 2.38)
pt3dadd(-21.99, -64.65, -15.75, 2.38)
pt3dadd(-22.12, -64.8, -15.75, 2.38)
pt3dadd(-22.25, -64.85, -15.75, 2.38)
pt3dadd(-22.39, -64.96, -15.75, 2.38)
pt3dadd(-22.61, -64.96, -15.75, 2.38)
}
dend[43] {pt3dclear()
pt3dadd(61.93, 88.24, -18.9, 2.72)
pt3dadd(64.11, 86.69, -76.65, 2.72)
pt3dadd(64.29, 87.15, -64.05, 3.06)
pt3dadd(64.29, 86.18, -64.05, 3.06)
pt3dadd(64.25, 86.14, -64.05, 3.06)
pt3dadd(64.25, 86.04, -64.05, 3.06)
pt3dadd(64.2, 85.98, -64.05, 3.06)
pt3dadd(64.16, 85.88, -64.05, 3.06)
pt3dadd(64.16, 85.73, -64.05, 3.06)
pt3dadd(64.11, 85.68, -64.05, 3.06)
pt3dadd(64.11, 85.58, -64.05, 3.06)
pt3dadd(64.07, 85.53, -64.05, 3.06)
pt3dadd(64.03, 85.48, -64.05, 3.06)
pt3dadd(64.03, 85.32, -64.05, 3.06)
pt3dadd(63.98, 85.22, -64.05, 3.06)
pt3dadd(63.94, 85.12, -64.05, 3.06)
pt3dadd(63.94, 84.97, -64.05, 3.06)
pt3dadd(63.89, 84.92, -64.05, 3.06)
pt3dadd(63.85, 84.87, -64.05, 3.06)
pt3dadd(63.8, 84.77, -64.05, 3.06)
pt3dadd(63.76, 84.72, -64.05, 3.06)
pt3dadd(63.71, 84.67, -64.05, 3.06)
pt3dadd(63.67, 84.61, -64.05, 3.06)
pt3dadd(63.62, 84.57, -64.05, 3.06)
pt3dadd(63.58, 84.51, -64.05, 3.06)
pt3dadd(63.53, 84.46, -64.05, 3.06)
pt3dadd(63.49, 84.41, -64.05, 3.06)
pt3dadd(63.44, 84.36, -64.05, 3.06)
pt3dadd(63.4, 84.31, -64.05, 3.06)
pt3dadd(63.35, 84.26, -64.05, 3.06)
pt3dadd(63.27, 84.21, -64.05, 3.06)
pt3dadd(63.22, 84.16, -64.05, 3.06)
pt3dadd(63.18, 84.11, -64.05, 3.06)
pt3dadd(63.13, 84.01, -64.05, 3.06)
pt3dadd(63.09, 83.96, -64.05, 3.06)
pt3dadd(63, 83.91, -64.05, 3.06)
pt3dadd(62.96, 83.75, -64.05, 3.06)
pt3dadd(62.91, 83.71, -64.05, 3.06)
pt3dadd(62.87, 83.6, -64.05, 3.06)
pt3dadd(62.78, 83.6, -64.05, 3.06)
pt3dadd(62.73, 83.55, -64.05, 3.06)
pt3dadd(62.69, 83.5, -64.05, 3.06)
pt3dadd(62.64, 83.4, -64.05, 3.06)
pt3dadd(62.6, 83.35, -64.05, 3.06)
pt3dadd(62.51, 83.3, -64.05, 3.06)
pt3dadd(62.47, 83.25, -64.05, 3.06)
pt3dadd(62.42, 83.15, -64.05, 3.06)
pt3dadd(62.38, 83.1, -64.05, 3.06)
pt3dadd(62.28, 82.94, -64.05, 3.06)
pt3dadd(62.2, 82.79, -64.05, 3.06)
pt3dadd(62.15, 82.69, -64.05, 3.06)
pt3dadd(62.11, 82.64, -64.05, 3.06)
pt3dadd(62.06, 82.54, -64.05, 3.06)
pt3dadd(62.02, 82.44, -64.05, 3.06)
pt3dadd(61.97, 82.34, -64.05, 3.06)
pt3dadd(61.93, 82.29, -64.05, 3.06)
pt3dadd(61.84, 82.18, -64.05, 3.06)
pt3dadd(61.84, 82.08, -64.05, 3.06)
pt3dadd(61.79, 82.03, -64.05, 3.06)
pt3dadd(61.75, 81.93, -64.05, 3.06)
pt3dadd(61.71, 81.88, -64.05, 3.06)
pt3dadd(61.66, 81.78, -64.05, 3.06)
pt3dadd(61.57, 81.63, -64.05, 3.06)
pt3dadd(61.53, 81.53, -64.05, 3.06)
pt3dadd(61.48, 81.48, -64.05, 3.06)
pt3dadd(61.48, 81.38, -64.05, 3.06)
pt3dadd(61.44, 81.32, -64.05, 3.06)
pt3dadd(61.4, 81.22, -64.05, 3.06)
pt3dadd(61.35, 81.12, -64.05, 3.06)
pt3dadd(61.31, 81.02, -64.05, 3.06)
pt3dadd(61.26, 80.92, -64.05, 3.06)
pt3dadd(61.22, 80.82, -64.05, 3.06)
pt3dadd(61.17, 80.72, -64.05, 3.06)
pt3dadd(61.17, 80.57, -64.05, 3.06)
pt3dadd(61.13, 80.51, -64.05, 3.06)
pt3dadd(61.08, 80.41, -64.05, 3.06)
pt3dadd(61.08, 80.26, -64.05, 3.06)
pt3dadd(61.04, 80.16, -64.05, 3.06)
pt3dadd(60.99, 80.06, -64.05, 3.06)
pt3dadd(60.95, 79.96, -64.05, 3.06)
pt3dadd(60.95, 79.81, -64.05, 3.06)
pt3dadd(60.9, 79.65, -64.05, 3.06)
pt3dadd(60.86, 79.55, -64.05, 3.06)
pt3dadd(60.81, 79.45, -64.05, 3.06)
pt3dadd(60.81, 79.1, -64.05, 3.06)
pt3dadd(60.77, 79.04, -64.05, 3.06)
pt3dadd(60.72, 78.89, -64.05, 3.06)
pt3dadd(60.72, 78.49, -64.05, 3.06)
pt3dadd(60.68, 78.44, -64.05, 3.06)
pt3dadd(60.68, 78.08, -64.05, 3.06)
pt3dadd(60.63, 77.98, -64.05, 3.06)
pt3dadd(60.63, 77.78, -64.05, 3.06)
pt3dadd(60.59, 77.68, -64.05, 3.06)
pt3dadd(60.59, 73.38, -64.05, 3.06)
pt3dadd(60.63, 73.32, -64.05, 3.06)
pt3dadd(60.63, 73.17, -64.05, 3.06)
pt3dadd(60.68, 73.17, -64.05, 3.06)
pt3dadd(60.59, 73.12, -64.05, 3.06)
pt3dadd(60.59, 72.92, -64.05, 3.06)
pt3dadd(60.63, 72.82, -64.05, 3.06)
pt3dadd(60.63, 72.72, -64.05, 3.06)
pt3dadd(60.68, 72.61, -64.05, 3.06)
pt3dadd(60.72, 72.51, -64.05, 3.06)
pt3dadd(60.77, 72.46, -64.05, 3.06)
pt3dadd(60.77, 72.31, -64.05, 3.06)
pt3dadd(60.81, 72.21, -64.05, 3.06)
pt3dadd(60.86, 72.11, -64.05, 3.06)
pt3dadd(60.9, 72.01, -64.05, 3.06)
pt3dadd(60.95, 71.91, -64.05, 3.06)
pt3dadd(60.95, 71.81, -64.05, 3.06)
pt3dadd(60.99, 71.75, -64.05, 3.06)
pt3dadd(60.99, 71.5, -64.05, 3.06)
pt3dadd(61.04, 71.45, -64.05, 3.06)
pt3dadd(61.04, 71.3, -64.05, 3.06)
pt3dadd(61.08, 71.2, -64.05, 3.06)
pt3dadd(61.13, 71.1, -64.05, 3.06)
pt3dadd(61.13, 70.89, -64.05, 3.06)
pt3dadd(61.17, 70.74, -64.05, 3.06)
pt3dadd(61.22, 70.69, -64.05, 3.06)
pt3dadd(61.22, 70.59, -64.05, 3.06)
pt3dadd(61.26, 70.49, -64.05, 3.06)
pt3dadd(61.26, 70.34, -64.05, 3.06)
pt3dadd(61.31, 70.18, -64.05, 3.06)
pt3dadd(61.31, 68.97, -64.05, 3.06)
pt3dadd(61.35, 68.87, -64.05, 3.06)
pt3dadd(61.35, 68.77, -64.05, 3.06)
pt3dadd(61.4, 68.67, -64.05, 3.06)
pt3dadd(61.4, 68.51, -64.05, 3.06)
pt3dadd(61.44, 68.41, -64.05, 3.06)
pt3dadd(61.44, 67.96, -64.05, 3.06)
pt3dadd(61.48, 67.86, -64.05, 3.06)
pt3dadd(61.48, 67.5, -64.05, 3.06)
pt3dadd(61.53, 67.4, -64.05, 3.06)
pt3dadd(61.53, 67.3, -64.05, 3.06)
pt3dadd(61.57, 67.2, -64.05, 3.06)
pt3dadd(61.57, 65.63, -64.05, 3.06)
pt3dadd(61.62, 65.47, -64.05, 3.06)
pt3dadd(61.62, 60.87, -64.05, 3.06)
pt3dadd(61.53, 60.87, -64.05, 3.06)
pt3dadd(61.66, 61.02, -57.75, 3.06)
pt3dadd(61.62, 60.97, -57.75, 3.06)
pt3dadd(61.62, 60.67, -57.75, 3.06)
pt3dadd(61.57, 60.62, -57.75, 3.06)
pt3dadd(61.57, 60.51, -57.75, 3.06)
pt3dadd(61.53, 60.41, -57.75, 3.06)
pt3dadd(61.48, 60.31, -57.75, 3.06)
pt3dadd(61.48, 60.21, -57.75, 3.06)
pt3dadd(61.44, 60.11, -57.75, 3.06)
pt3dadd(61.44, 60.01, -57.75, 3.06)
pt3dadd(61.4, 59.96, -57.75, 3.06)
pt3dadd(61.4, 59.85, -57.75, 3.06)
pt3dadd(61.35, 59.81, -57.75, 3.06)
pt3dadd(61.31, 59.7, -57.75, 3.06)
pt3dadd(61.31, 59.55, -57.75, 3.06)
pt3dadd(61.26, 59.45, -57.75, 3.06)
pt3dadd(61.22, 59.35, -57.75, 3.06)
pt3dadd(61.22, 59.2, -57.75, 3.06)
}
}
proc shape3d_60() {
dend[43] { pt3dadd(61.17, 59.1, -57.75, 3.06)
pt3dadd(61.17, 58.99, -57.75, 3.06)
pt3dadd(61.13, 58.94, -57.75, 3.06)
pt3dadd(61.13, 58.74, -57.75, 3.06)
pt3dadd(61.08, 58.64, -57.75, 3.06)
pt3dadd(61.04, 58.54, -57.75, 3.06)
pt3dadd(61.04, 58.33, -57.75, 3.06)
pt3dadd(60.99, 58.24, -57.75, 3.06)
pt3dadd(60.95, 58.08, -57.75, 3.06)
pt3dadd(60.9, 57.98, -57.75, 3.06)
pt3dadd(60.9, 57.88, -57.75, 3.06)
pt3dadd(60.86, 57.78, -57.75, 3.06)
pt3dadd(60.81, 57.68, -57.75, 3.06)
pt3dadd(60.77, 57.58, -57.75, 3.06)
pt3dadd(60.77, 57.42, -57.75, 3.06)
pt3dadd(60.72, 57.37, -57.75, 3.06)
pt3dadd(60.68, 57.27, -57.75, 3.06)
pt3dadd(60.68, 57.17, -57.75, 3.06)
pt3dadd(60.63, 57.12, -57.75, 3.06)
pt3dadd(60.59, 57.07, -57.75, 3.06)
pt3dadd(60.55, 56.97, -57.75, 3.06)
pt3dadd(60.55, 56.87, -57.75, 3.06)
pt3dadd(60.5, 56.76, -57.75, 3.06)
pt3dadd(60.41, 56.51, -57.75, 3.06)
pt3dadd(60.37, 56.41, -57.75, 3.06)
pt3dadd(60.33, 56.31, -57.75, 3.06)
pt3dadd(60.33, 56.16, -57.75, 3.06)
pt3dadd(60.28, 56.11, -57.75, 3.06)
pt3dadd(60.24, 55.96, -57.75, 3.06)
pt3dadd(60.19, 55.85, -57.75, 3.06)
pt3dadd(60.1, 55.75, -57.75, 3.06)
pt3dadd(60.1, 55.6, -57.75, 3.06)
pt3dadd(60.06, 55.5, -57.75, 3.06)
pt3dadd(60.01, 55.4, -57.75, 3.06)
pt3dadd(59.97, 55.3, -57.75, 3.06)
pt3dadd(59.92, 55.19, -57.75, 3.06)
pt3dadd(59.92, 55.04, -57.75, 3.06)
pt3dadd(59.88, 54.94, -57.75, 3.06)
pt3dadd(59.83, 54.84, -57.75, 3.06)
pt3dadd(59.79, 54.74, -57.75, 3.06)
pt3dadd(59.74, 54.59, -57.75, 3.06)
pt3dadd(59.7, 54.49, -57.75, 3.06)
pt3dadd(59.7, 54.33, -57.75, 3.06)
pt3dadd(59.65, 54.24, -57.75, 3.06)
pt3dadd(59.61, 54.08, -57.75, 3.06)
pt3dadd(59.61, 53.98, -57.75, 3.06)
pt3dadd(59.56, 53.88, -57.75, 3.06)
pt3dadd(59.52, 53.78, -57.75, 3.06)
pt3dadd(59.52, 53.68, -57.75, 3.06)
pt3dadd(59.48, 53.63, -57.75, 3.06)
pt3dadd(59.43, 53.53, -57.75, 3.06)
pt3dadd(59.43, 53.42, -57.75, 3.06)
pt3dadd(59.39, 53.37, -57.75, 3.06)
pt3dadd(59.34, 53.27, -57.75, 3.06)
pt3dadd(59.3, 53.17, -57.75, 3.06)
pt3dadd(59.26, 53.07, -57.75, 3.06)
pt3dadd(59.21, 52.97, -57.75, 3.06)
pt3dadd(59.17, 52.87, -57.75, 3.06)
pt3dadd(59.12, 52.76, -57.75, 3.06)
pt3dadd(59.08, 52.67, -57.75, 3.06)
pt3dadd(59.03, 52.61, -57.75, 3.06)
pt3dadd(58.99, 52.56, -57.75, 3.06)
pt3dadd(58.94, 52.51, -57.75, 3.06)
pt3dadd(58.9, 52.46, -57.75, 3.06)
pt3dadd(58.9, 52.36, -57.75, 3.06)
pt3dadd(58.81, 52.31, -57.75, 3.06)
pt3dadd(58.76, 52.21, -57.75, 3.06)
pt3dadd(58.72, 52.11, -57.75, 3.06)
pt3dadd(58.63, 52.01, -57.75, 3.06)
pt3dadd(58.63, 51.9, -57.75, 3.06)
pt3dadd(58.58, 51.85, -57.75, 3.06)
pt3dadd(58.54, 51.8, -57.75, 3.06)
pt3dadd(58.49, 51.75, -57.75, 3.06)
pt3dadd(58.45, 51.7, -57.75, 3.06)
pt3dadd(58.41, 51.6, -57.75, 3.06)
pt3dadd(58.36, 51.55, -57.75, 3.06)
pt3dadd(58.32, 51.45, -57.75, 3.06)
pt3dadd(58.27, 51.4, -57.75, 3.06)
pt3dadd(58.23, 51.3, -57.75, 3.06)
pt3dadd(58.14, 51.15, -57.75, 3.06)
pt3dadd(58.05, 51.04, -57.75, 3.06)
pt3dadd(58.01, 50.94, -57.75, 3.06)
pt3dadd(57.96, 50.84, -57.75, 3.06)
pt3dadd(57.92, 50.79, -57.75, 3.06)
pt3dadd(57.87, 50.79, -57.75, 3.06)
pt3dadd(57.83, 50.79, -56.7, 3.06)
pt3dadd(57.74, 50.74, -56.7, 3.06)
pt3dadd(57.69, 50.69, -56.7, 3.06)
pt3dadd(57.65, 50.64, -56.7, 3.06)
pt3dadd(57.56, 50.59, -56.7, 3.06)
pt3dadd(57.51, 50.54, -56.7, 3.06)
pt3dadd(57.47, 50.49, -56.7, 3.06)
pt3dadd(57.38, 50.49, -56.7, 3.06)
pt3dadd(57.34, 50.44, -56.7, 3.06)
pt3dadd(57.29, 50.38, -56.7, 3.06)
pt3dadd(57.25, 50.28, -56.7, 3.06)
pt3dadd(57.16, 50.18, -56.7, 3.06)
pt3dadd(57.12, 50.08, -56.7, 3.06)
pt3dadd(57.03, 50.03, -56.7, 3.06)
pt3dadd(56.98, 49.93, -56.7, 3.06)
pt3dadd(56.89, 49.83, -56.7, 3.06)
pt3dadd(56.85, 49.73, -56.7, 3.06)
pt3dadd(56.8, 49.68, -56.7, 3.06)
pt3dadd(56.71, 49.58, -56.7, 3.06)
pt3dadd(56.67, 49.47, -56.7, 3.06)
pt3dadd(56.58, 49.42, -56.7, 3.06)
pt3dadd(56.49, 49.37, -56.7, 3.06)
pt3dadd(56.44, 49.27, -56.7, 3.06)
pt3dadd(56.4, 49.22, -56.7, 3.06)
pt3dadd(56.31, 49.12, -56.7, 3.06)
pt3dadd(56.27, 49.02, -56.7, 3.06)
pt3dadd(56.22, 48.92, -56.7, 3.06)
pt3dadd(56.18, 48.81, -56.7, 3.06)
pt3dadd(56.13, 48.72, -56.7, 3.06)
pt3dadd(56.09, 48.61, -56.7, 3.06)
pt3dadd(56.04, 48.51, -56.7, 3.06)
pt3dadd(56.04, 48.41, -56.7, 3.06)
pt3dadd(56, 48.31, -56.7, 3.06)
pt3dadd(55.96, 48.21, -56.7, 3.06)
pt3dadd(55.96, 48.11, -56.7, 3.06)
pt3dadd(55.91, 48.01, -56.7, 3.06)
pt3dadd(55.87, 47.9, -56.7, 3.06)
pt3dadd(55.87, 47.85, -56.7, 3.06)
pt3dadd(55.91, 48.06, -54.6, 3.06)
pt3dadd(55.91, 46.99, -54.6, 3.06)
pt3dadd(55.87, 46.94, -54.6, 3.06)
pt3dadd(55.87, 46.79, -54.6, 3.06)
pt3dadd(55.82, 46.69, -54.6, 3.06)
pt3dadd(55.82, 46.54, -54.6, 3.06)
pt3dadd(55.78, 46.44, -54.6, 3.06)
pt3dadd(55.73, 46.33, -54.6, 3.06)
pt3dadd(55.73, 46.23, -54.6, 3.06)
pt3dadd(55.69, 46.13, -54.6, 3.06)
pt3dadd(55.64, 46.03, -54.6, 3.06)
pt3dadd(55.64, 45.93, -54.6, 3.06)
pt3dadd(55.71, 45.91, -54.6, 3.06)
}
dend[44] {pt3dclear()
pt3dadd(55.71, 45.91, -54.6, 3.06)
pt3dadd(55.6, 45.83, -54.6, 3.06)
pt3dadd(55.6, 45.73, -54.6, 3.06)
pt3dadd(55.55, 45.68, -54.6, 3.06)
pt3dadd(55.51, 45.58, -54.6, 3.06)
pt3dadd(55.47, 45.47, -54.6, 3.06)
pt3dadd(55.47, 45.37, -54.6, 3.06)
pt3dadd(55.42, 45.32, -54.6, 3.06)
pt3dadd(55.38, 45.22, -54.6, 3.06)
pt3dadd(55.33, 45.07, -54.6, 3.06)
pt3dadd(55.28, 45.02, -54.6, 3.06)
pt3dadd(55.24, 44.92, -54.6, 3.06)
pt3dadd(55.2, 44.87, -54.6, 3.06)
pt3dadd(55.15, 44.76, -54.6, 3.06)
pt3dadd(55.11, 44.72, -54.6, 3.06)
pt3dadd(55.11, 44.61, -54.6, 3.06)
pt3dadd(55.06, 44.51, -54.6, 3.06)
pt3dadd(55.02, 44.41, -54.6, 3.06)
pt3dadd(54.97, 44.36, -54.6, 3.06)
pt3dadd(54.88, 44.26, -54.6, 3.06)
pt3dadd(54.88, 44.16, -54.6, 3.06)
pt3dadd(54.84, 44.06, -54.6, 3.06)
pt3dadd(54.79, 43.96, -54.6, 3.06)
pt3dadd(54.75, 43.9, -54.6, 3.06)
pt3dadd(54.71, 43.8, -54.6, 3.06)
pt3dadd(54.66, 43.75, -54.6, 3.06)
pt3dadd(54.62, 43.65, -54.6, 3.06)
pt3dadd(54.57, 43.55, -54.6, 3.06)
pt3dadd(54.53, 43.45, -54.6, 3.06)
pt3dadd(54.48, 43.35, -54.6, 3.06)
pt3dadd(54.44, 43.24, -54.6, 3.06)
pt3dadd(54.35, 43.19, -54.6, 3.06)
pt3dadd(54.31, 43.04, -54.6, 3.06)
pt3dadd(54.26, 42.94, -54.6, 3.06)
pt3dadd(54.17, 42.79, -54.6, 3.06)
pt3dadd(54.17, 42.69, -54.6, 3.06)
pt3dadd(54.08, 42.59, -54.6, 3.06)
pt3dadd(54.04, 42.49, -54.6, 3.06)
pt3dadd(53.99, 42.38, -54.6, 3.06)
pt3dadd(53.95, 42.23, -54.6, 3.06)
pt3dadd(53.9, 42.13, -54.6, 3.06)
pt3dadd(53.9, 42.03, -54.6, 3.06)
pt3dadd(53.86, 41.93, -54.6, 3.06)
pt3dadd(53.81, 41.83, -54.6, 3.06)
pt3dadd(53.77, 41.78, -54.6, 3.06)
pt3dadd(53.72, 41.67, -54.6, 3.06)
pt3dadd(53.72, 41.58, -54.6, 3.06)
pt3dadd(53.68, 41.47, -54.6, 3.06)
pt3dadd(53.64, 41.37, -54.6, 3.06)
pt3dadd(53.64, 41.27, -54.6, 3.06)
pt3dadd(53.59, 41.17, -54.6, 3.06)
pt3dadd(53.55, 41.07, -54.6, 3.06)
pt3dadd(53.5, 40.92, -54.6, 3.06)
pt3dadd(53.46, 40.81, -54.6, 3.06)
pt3dadd(53.41, 40.66, -54.6, 3.06)
pt3dadd(53.37, 40.51, -54.6, 3.06)
pt3dadd(53.37, 40.41, -54.6, 3.06)
pt3dadd(53.33, 40.26, -54.6, 3.06)
pt3dadd(53.28, 40.16, -54.6, 3.06)
pt3dadd(53.28, 40.06, -54.6, 3.06)
pt3dadd(53.24, 40.01, -54.6, 3.06)
pt3dadd(53.19, 39.9, -54.6, 3.06)
pt3dadd(53.15, 39.8, -54.6, 3.06)
pt3dadd(53.15, 39.7, -54.6, 3.06)
}
}
proc shape3d_61() {
dend[44] { pt3dadd(53.1, 39.65, -54.6, 3.06)
pt3dadd(53.06, 39.6, -54.6, 3.06)
pt3dadd(53.06, 39.65, -54.6, 3.06)
pt3dadd(53.1, 39.7, -52.5, 3.06)
pt3dadd(53.1, 39.5, -52.5, 3.06)
pt3dadd(53.06, 39.45, -52.5, 3.06)
pt3dadd(53.01, 39.3, -52.5, 3.06)
pt3dadd(52.97, 39.19, -52.5, 3.06)
pt3dadd(52.97, 39.1, -52.5, 3.06)
pt3dadd(52.88, 38.99, -52.5, 3.06)
pt3dadd(52.88, 38.89, -52.5, 3.06)
pt3dadd(52.83, 38.79, -52.5, 3.06)
pt3dadd(52.79, 38.74, -52.5, 3.06)
pt3dadd(52.74, 38.59, -52.5, 3.06)
pt3dadd(52.7, 38.49, -52.5, 3.06)
pt3dadd(52.7, 38.38, -52.5, 3.06)
pt3dadd(52.65, 38.28, -52.5, 3.06)
pt3dadd(52.61, 38.23, -52.5, 3.06)
pt3dadd(52.57, 38.08, -52.5, 3.06)
pt3dadd(52.52, 38.03, -52.5, 3.06)
pt3dadd(52.48, 37.93, -52.5, 3.06)
pt3dadd(52.43, 37.83, -52.5, 3.06)
pt3dadd(52.39, 37.73, -52.5, 3.06)
pt3dadd(52.39, 37.63, -52.5, 3.06)
pt3dadd(52.35, 37.58, -52.5, 3.06)
pt3dadd(52.3, 37.47, -52.5, 3.06)
pt3dadd(52.26, 37.37, -52.5, 3.06)
pt3dadd(52.17, 37.22, -52.5, 3.06)
pt3dadd(52.17, 37.07, -52.5, 3.06)
pt3dadd(52.08, 36.92, -52.5, 3.06)
pt3dadd(52.03, 36.76, -52.5, 3.06)
pt3dadd(51.94, 36.66, -52.5, 3.06)
pt3dadd(51.9, 36.46, -52.5, 3.06)
pt3dadd(51.81, 36.26, -52.5, 3.06)
pt3dadd(51.76, 36.06, -52.5, 3.06)
pt3dadd(51.72, 35.9, -52.5, 3.06)
pt3dadd(51.58, 35.6, -52.5, 3.06)
pt3dadd(51.54, 35.5, -52.5, 3.06)
pt3dadd(51.5, 35.35, -52.5, 3.06)
pt3dadd(51.45, 35.19, -52.5, 3.06)
pt3dadd(51.41, 35.09, -52.5, 3.06)
pt3dadd(51.36, 34.94, -52.5, 3.06)
pt3dadd(51.32, 34.79, -52.5, 3.06)
pt3dadd(51.28, 34.69, -52.5, 3.06)
pt3dadd(51.19, 34.54, -52.5, 3.06)
pt3dadd(51.14, 34.44, -52.5, 3.06)
pt3dadd(51.1, 34.33, -52.5, 3.06)
pt3dadd(51.05, 34.23, -52.5, 3.06)
pt3dadd(51.05, 34.13, -52.5, 3.06)
pt3dadd(51.01, 34.03, -52.5, 3.06)
pt3dadd(50.92, 33.88, -52.5, 3.06)
pt3dadd(50.92, 33.73, -52.5, 3.06)
pt3dadd(50.87, 33.58, -52.5, 3.06)
pt3dadd(50.83, 33.42, -52.5, 3.06)
pt3dadd(50.78, 33.32, -52.5, 3.06)
pt3dadd(50.78, 33.17, -52.5, 3.06)
pt3dadd(50.74, 33.02, -52.5, 3.06)
pt3dadd(50.69, 32.97, -52.5, 3.06)
pt3dadd(50.65, 32.81, -52.5, 3.06)
pt3dadd(50.6, 32.71, -52.5, 3.06)
pt3dadd(50.6, 32.61, -52.5, 3.06)
pt3dadd(50.56, 32.51, -52.5, 3.06)
pt3dadd(50.51, 32.46, -52.5, 3.06)
pt3dadd(50.51, 32.31, -52.5, 3.06)
pt3dadd(50.47, 32.26, -52.5, 3.06)
pt3dadd(50.43, 32.16, -52.5, 3.06)
pt3dadd(50.43, 32.01, -52.5, 3.06)
pt3dadd(50.38, 31.9, -52.5, 3.06)
pt3dadd(50.34, 31.8, -52.5, 3.06)
pt3dadd(50.34, 31.7, -52.5, 3.06)
pt3dadd(50.29, 31.55, -52.5, 3.06)
pt3dadd(50.29, 31.4, -52.5, 3.06)
pt3dadd(50.25, 31.25, -52.5, 3.06)
pt3dadd(50.25, 31.09, -52.5, 3.06)
pt3dadd(50.21, 30.94, -52.5, 3.06)
pt3dadd(50.21, 30.79, -52.5, 3.06)
pt3dadd(50.16, 30.69, -52.5, 3.06)
pt3dadd(50.16, 30.59, -52.5, 3.06)
pt3dadd(50.12, 30.49, -52.5, 3.06)
pt3dadd(50.12, 30.33, -52.5, 3.06)
pt3dadd(50.07, 30.28, -52.5, 3.06)
pt3dadd(50.07, 30.13, -52.5, 3.06)
pt3dadd(50.03, 30.08, -52.5, 3.06)
pt3dadd(49.98, 30.03, -52.5, 3.06)
pt3dadd(44.88, 17, -52.5, 2.72)
pt3dadd(45.23, 17, -52.5, 2.72)
pt3dadd(44.67, 16.41, -52.5, 2.72)
pt3dadd(44.41, 16.31, -52.5, 2.72)
pt3dadd(44.14, 16.31, -52.5, 2.72)
pt3dadd(44.05, 16.2, -52.5, 2.72)
pt3dadd(43.87, 16.1, -52.5, 2.72)
pt3dadd(43.6, 16.1, -52.5, 2.72)
pt3dadd(43.52, 16, -52.5, 2.72)
pt3dadd(43.25, 15.9, -52.5, 2.72)
pt3dadd(43.07, 15.9, -52.5, 2.72)
pt3dadd(42.89, 15.8, -52.5, 2.72)
pt3dadd(42.72, 15.7, -52.5, 2.72)
pt3dadd(42.53, 15.6, -52.5, 2.72)
pt3dadd(41.65, 15.6, -52.5, 2.72)
pt3dadd(41.47, 15.5, -52.5, 2.72)
pt3dadd(41.38, 15.4, -52.5, 2.72)
pt3dadd(41.02, 15.4, -52.5, 2.72)
pt3dadd(40.84, 15.3, -52.5, 2.72)
pt3dadd(40.66, 15.19, -52.5, 2.72)
pt3dadd(40.31, 15.19, -52.5, 2.72)
pt3dadd(40.13, 15.09, -52.5, 2.72)
pt3dadd(39.86, 14.99, -52.5, 2.72)
pt3dadd(39.68, 14.89, -52.5, 2.72)
pt3dadd(39.59, 14.79, -52.5, 2.72)
pt3dadd(39.33, 14.79, -52.5, 2.72)
pt3dadd(39.15, 14.69, -52.5, 2.72)
pt3dadd(38.97, 14.59, -52.5, 2.72)
pt3dadd(38.79, 14.48, -52.5, 2.72)
pt3dadd(38.61, 14.38, -52.5, 2.72)
pt3dadd(38.44, 14.28, -52.5, 2.72)
pt3dadd(38.17, 14.18, -52.5, 2.72)
pt3dadd(37.99, 14.18, -52.5, 2.72)
pt3dadd(37.9, 14.08, -52.5, 2.72)
pt3dadd(37.72, 13.98, -52.5, 2.72)
pt3dadd(37.54, 13.88, -52.5, 2.72)
pt3dadd(37.19, 13.88, -52.5, 2.72)
pt3dadd(37.1, 13.77, -52.5, 2.72)
pt3dadd(36.92, 13.57, -52.5, 2.72)
pt3dadd(36.74, 13.57, -52.5, 2.72)
pt3dadd(36.65, 13.47, -52.5, 2.72)
pt3dadd(36.56, 13.37, -52.5, 2.72)
pt3dadd(36.47, 13.27, -52.5, 2.72)
pt3dadd(36.38, 13.17, -52.5, 2.72)
pt3dadd(36.21, 13.17, -52.5, 2.72)
pt3dadd(36.12, 12.97, -52.5, 2.72)
pt3dadd(35.94, 12.86, -52.5, 2.72)
pt3dadd(35.85, 12.76, -52.5, 2.72)
pt3dadd(35.76, 12.66, -52.5, 2.72)
pt3dadd(35.67, 12.56, -52.5, 2.72)
pt3dadd(35.58, 12.36, -52.5, 2.72)
pt3dadd(35.49, 12.15, -52.5, 2.72)
pt3dadd(35.4, 11.95, -52.5, 2.72)
pt3dadd(35.22, 11.65, -52.5, 2.72)
pt3dadd(35.13, 11.44, -52.5, 2.72)
pt3dadd(35.04, 11.24, -52.5, 2.72)
pt3dadd(34.78, 10.94, -52.5, 2.72)
pt3dadd(34.69, 10.74, -52.5, 2.72)
pt3dadd(34.51, 10.43, -52.5, 2.72)
pt3dadd(34.42, 10.23, -52.5, 2.72)
pt3dadd(34.24, 9.93, -52.5, 2.72)
pt3dadd(34.15, 9.73, -52.5, 2.72)
pt3dadd(33.71, 9.22, -52.5, 2.72)
pt3dadd(33.62, 9.02, -52.5, 2.72)
pt3dadd(33.53, 8.81, -52.5, 2.72)
pt3dadd(33.35, 8.61, -52.5, 2.72)
pt3dadd(33.26, 8.51, -52.5, 2.72)
pt3dadd(33.08, 8.31, -52.5, 2.72)
pt3dadd(32.99, 8.1, -52.5, 2.72)
pt3dadd(32.82, 8, -52.5, 2.72)
pt3dadd(32.46, 7.6, -52.5, 2.72)
pt3dadd(32.37, 7.5, -52.5, 2.72)
pt3dadd(32.28, 7.3, -52.5, 2.72)
pt3dadd(32.19, 7.19, -52.5, 2.72)
pt3dadd(31.92, 6.89, -52.5, 2.72)
pt3dadd(31.83, 6.69, -52.5, 2.72)
pt3dadd(31.57, 6.49, -52.5, 2.72)
pt3dadd(31.57, 6.28, -52.5, 2.72)
pt3dadd(31.39, 6.08, -52.5, 2.72)
pt3dadd(31.3, 5.98, -52.5, 2.72)
pt3dadd(31.12, 5.78, -52.5, 2.72)
pt3dadd(30.94, 5.57, -52.5, 2.72)
pt3dadd(30.85, 5.47, -52.5, 2.72)
pt3dadd(30.68, 5.37, -52.5, 2.72)
pt3dadd(30.59, 5.07, -52.5, 2.72)
pt3dadd(30.5, 4.86, -52.5, 2.72)
pt3dadd(30.32, 4.66, -52.5, 2.72)
pt3dadd(30.14, 4.46, -52.5, 2.72)
pt3dadd(30.05, 4.36, -52.5, 2.72)
pt3dadd(29.96, 4.26, -52.5, 2.72)
pt3dadd(29.88, 4.05, -52.5, 2.72)
pt3dadd(29.78, 3.85, -52.5, 2.72)
pt3dadd(29.61, 3.75, -52.5, 2.72)
pt3dadd(29.52, 3.55, -52.5, 2.72)
pt3dadd(29.43, 3.35, -52.5, 2.72)
pt3dadd(29.25, 3.24, -52.5, 2.72)
pt3dadd(29.07, 3.04, -52.5, 2.72)
pt3dadd(28.98, 2.94, -52.5, 2.72)
pt3dadd(28.72, 2.63, -52.5, 2.72)
pt3dadd(28.63, 2.54, -52.5, 2.72)
pt3dadd(28.54, 2.43, -52.5, 2.72)
pt3dadd(28.63, 2.63, -60.9, 2.72)
pt3dadd(28.54, 2.54, -60.9, 2.72)
pt3dadd(28.45, 2.33, -60.9, 2.72)
pt3dadd(28, 1.83, -60.9, 2.72)
pt3dadd(27.91, 1.73, -60.9, 2.72)
pt3dadd(27.82, 1.52, -60.9, 2.72)
pt3dadd(27.65, 1.42, -60.9, 2.72)
pt3dadd(27.47, 1.12, -60.9, 2.72)
pt3dadd(27.38, 0.92, -60.9, 2.72)
pt3dadd(27.2, 0.81, -60.9, 2.72)
pt3dadd(27.11, 0.61, -60.9, 2.72)
pt3dadd(27.02, 0.51, -60.9, 2.72)
pt3dadd(26.75, 0.2, -60.9, 2.72)
pt3dadd(26.67, 0.1, -60.9, 2.72)
pt3dadd(26.4, -0.4, -60.9, 2.72)
}
}
proc shape3d_62() {
dend[44] { pt3dadd(26.31, -0.5, -60.9, 2.72)
pt3dadd(26.13, -0.91, -60.9, 2.72)
pt3dadd(26.04, -1.11, -60.9, 2.72)
pt3dadd(25.86, -1.21, -60.9, 2.72)
pt3dadd(25.77, -1.52, -60.9, 2.72)
pt3dadd(25.59, -1.82, -60.9, 2.72)
pt3dadd(25.5, -2.02, -60.9, 2.72)
pt3dadd(24.97, -2.63, -60.9, 2.72)
pt3dadd(24.88, -2.83, -60.9, 2.72)
pt3dadd(24.79, -3.14, -60.9, 2.72)
pt3dadd(24.61, -3.34, -60.9, 2.72)
pt3dadd(24.52, -3.54, -60.9, 2.72)
pt3dadd(24.34, -3.85, -60.9, 2.72)
pt3dadd(24.26, -4.05, -60.9, 2.72)
pt3dadd(23.99, -4.35, -60.9, 2.72)
pt3dadd(23.9, -4.45, -60.9, 2.72)
pt3dadd(23.72, -4.66, -60.9, 2.72)
pt3dadd(23.55, -4.96, -60.9, 2.72)
pt3dadd(23.45, -5.26, -60.9, 2.72)
pt3dadd(23.36, -5.47, -60.9, 2.72)
pt3dadd(23.19, -5.67, -60.9, 2.72)
pt3dadd(23.1, -5.87, -60.9, 2.72)
pt3dadd(23.01, -6.07, -60.9, 2.72)
pt3dadd(22.92, -6.28, -60.9, 2.72)
pt3dadd(22.74, -6.58, -60.9, 2.72)
pt3dadd(22.56, -6.89, -60.9, 2.72)
pt3dadd(22.48, -6.99, -60.9, 2.72)
pt3dadd(22.3, -7.19, -60.9, 2.72)
pt3dadd(22.12, -7.39, -60.9, 2.72)
pt3dadd(22.03, -7.7, -60.9, 2.72)
pt3dadd(21.94, -7.8, -60.9, 2.72)
pt3dadd(21.76, -7.9, -60.9, 2.72)
pt3dadd(21.67, -8.1, -60.9, 2.72)
pt3dadd(21.58, -8.3, -60.9, 2.72)
pt3dadd(21.32, -8.81, -60.9, 2.72)
pt3dadd(21.23, -9.01, -60.9, 2.72)
pt3dadd(21.05, -9.21, -60.9, 2.72)
pt3dadd(20.96, -9.41, -60.9, 2.72)
pt3dadd(20.69, -9.72, -60.9, 2.72)
pt3dadd(20.6, -9.82, -60.9, 2.72)
pt3dadd(20.25, -10.23, -60.9, 2.72)
pt3dadd(20.16, -10.33, -60.9, 2.72)
pt3dadd(20.07, -10.43, -60.9, 2.72)
pt3dadd(19.89, -10.43, -60.9, 2.72)
pt3dadd(19.8, -10.53, -60.9, 2.72)
pt3dadd(19.71, -10.63, -60.9, 2.72)
pt3dadd(19.71, -10.84, -58.8, 2.38)
pt3dadd(19.71, -11.04, -58.8, 2.38)
pt3dadd(19.62, -11.14, -58.8, 2.38)
pt3dadd(19.53, -11.24, -58.8, 2.38)
pt3dadd(19.44, -11.34, -58.8, 2.38)
pt3dadd(19.26, -11.44, -58.8, 2.38)
pt3dadd(19.17, -11.54, -58.8, 2.38)
pt3dadd(19.08, -11.74, -58.8, 2.38)
pt3dadd(19, -11.95, -58.8, 2.38)
pt3dadd(18.91, -12.05, -58.8, 2.38)
pt3dadd(18.73, -12.15, -58.8, 2.38)
pt3dadd(18.64, -12.25, -58.8, 2.38)
pt3dadd(18.55, -12.45, -58.8, 2.38)
pt3dadd(18.46, -12.56, -58.8, 2.38)
pt3dadd(18.37, -12.66, -58.8, 2.38)
pt3dadd(18.28, -12.86, -58.8, 2.38)
pt3dadd(18.1, -12.96, -58.8, 2.38)
pt3dadd(17.93, -13.16, -58.8, 2.38)
pt3dadd(17.75, -13.36, -58.8, 2.38)
pt3dadd(17.66, -13.47, -58.8, 2.38)
pt3dadd(17.39, -13.77, -58.8, 2.38)
pt3dadd(17.3, -13.97, -58.8, 2.38)
pt3dadd(17.21, -14.18, -58.8, 2.38)
pt3dadd(17.03, -14.38, -58.8, 2.38)
pt3dadd(16.86, -14.48, -58.8, 2.38)
pt3dadd(16.77, -14.68, -58.8, 2.38)
pt3dadd(16.14, -15.39, -58.8, 2.38)
pt3dadd(16.14, -15.59, -58.8, 2.38)
pt3dadd(15.97, -15.69, -58.8, 2.38)
pt3dadd(15.7, -16, -58.8, 2.38)
pt3dadd(15.61, -16.1, -58.8, 2.38)
pt3dadd(15.34, -16.41, -58.8, 2.38)
pt3dadd(15.25, -16.61, -58.8, 2.38)
pt3dadd(15.16, -16.71, -58.8, 2.38)
pt3dadd(15.07, -16.91, -58.8, 2.38)
pt3dadd(14.9, -17.01, -58.8, 2.38)
pt3dadd(14.9, -17.22, -58.8, 2.38)
pt3dadd(14.72, -17.32, -58.8, 2.38)
pt3dadd(14.72, -17.52, -58.8, 2.38)
pt3dadd(14.54, -17.62, -58.8, 2.38)
pt3dadd(14.36, -17.72, -58.8, 2.38)
pt3dadd(14.09, -17.92, -58.8, 2.38)
pt3dadd(13.91, -18.13, -58.8, 2.38)
pt3dadd(13.56, -18.53, -58.8, 2.38)
pt3dadd(13.47, -18.73, -58.8, 2.38)
pt3dadd(13.38, -18.83, -58.8, 2.38)
pt3dadd(13.11, -19.14, -58.8, 2.38)
pt3dadd(13.02, -19.24, -58.8, 2.38)
pt3dadd(12.76, -19.44, -58.8, 2.38)
pt3dadd(12.49, -19.75, -58.8, 2.38)
pt3dadd(12.4, -19.95, -58.8, 2.38)
pt3dadd(12.31, -20.05, -58.8, 2.38)
pt3dadd(12.04, -20.25, -58.8, 2.38)
pt3dadd(11.77, -20.45, -58.8, 2.38)
pt3dadd(11.42, -20.86, -58.8, 2.38)
pt3dadd(11.24, -21.06, -58.8, 2.38)
pt3dadd(10.97, -21.26, -58.8, 2.38)
pt3dadd(10.79, -21.37, -58.8, 2.38)
pt3dadd(10.52, -21.67, -58.8, 2.38)
pt3dadd(10.35, -21.77, -58.8, 2.38)
pt3dadd(10.08, -21.87, -58.8, 2.38)
pt3dadd(9.9, -22.08, -58.8, 2.38)
pt3dadd(9.64, -22.28, -58.8, 2.38)
pt3dadd(9.55, -22.38, -58.8, 2.38)
pt3dadd(9.28, -22.58, -58.8, 2.38)
pt3dadd(9.1, -22.78, -58.8, 2.38)
pt3dadd(8.92, -22.89, -58.8, 2.38)
pt3dadd(8.65, -22.99, -58.8, 2.38)
pt3dadd(8.56, -23.09, -58.8, 2.38)
pt3dadd(8.39, -23.19, -58.8, 2.38)
pt3dadd(8.3, -23.39, -58.8, 2.38)
pt3dadd(8.12, -23.49, -58.8, 2.38)
pt3dadd(7.85, -23.69, -58.8, 2.38)
pt3dadd(7.58, -23.8, -58.8, 2.38)
pt3dadd(7.32, -23.9, -58.8, 2.38)
pt3dadd(6.96, -24.2, -58.8, 2.38)
pt3dadd(6.51, -24.5, -58.8, 2.38)
pt3dadd(5.98, -24.71, -58.8, 2.38)
pt3dadd(5.62, -24.91, -58.8, 2.38)
pt3dadd(5.26, -25.11, -58.8, 2.38)
pt3dadd(4.73, -25.42, -58.8, 2.38)
pt3dadd(4.28, -25.62, -58.8, 2.38)
pt3dadd(4.02, -25.82, -58.8, 2.38)
pt3dadd(3.66, -25.92, -58.8, 2.38)
pt3dadd(3.3, -26.02, -58.8, 2.38)
pt3dadd(3.13, -26.13, -58.8, 2.38)
pt3dadd(2.77, -26.23, -58.8, 2.38)
pt3dadd(2.5, -26.33, -58.8, 2.38)
pt3dadd(2.32, -26.33, -58.8, 2.38)
pt3dadd(2.06, -26.43, -58.8, 2.38)
pt3dadd(1.79, -26.53, -58.8, 2.38)
pt3dadd(1.61, -26.63, -58.8, 2.38)
pt3dadd(1.25, -26.74, -58.8, 2.38)
pt3dadd(1.08, -26.83, -58.8, 2.38)
pt3dadd(0.72, -26.83, -58.8, 2.38)
pt3dadd(0.36, -27.04, -58.8, 2.38)
pt3dadd(-0.09, -27.04, -58.8, 2.38)
pt3dadd(-0.44, -27.24, -58.8, 2.38)
pt3dadd(-0.71, -27.24, -58.8, 2.38)
pt3dadd(-0.98, -27.44, -58.8, 2.38)
pt3dadd(-1.25, -27.44, -58.8, 2.38)
pt3dadd(-1.51, -27.55, -58.8, 2.38)
pt3dadd(-1.69, -27.65, -58.8, 2.38)
pt3dadd(-2.05, -27.65, -58.8, 2.38)
}
dend[45] {pt3dclear()
pt3dadd(55.71, 45.91, -54.6, 1.36)
pt3dadd(57.24, 44.56, -6.3, 1.36)
pt3dadd(57.47, 44.93, -6.3, 2.16)
pt3dadd(57.49, 44.87, -6.3, 2.16)
pt3dadd(57.55, 44.81, -6.3, 2.16)
pt3dadd(57.56, 44.74, -6.3, 2.16)
pt3dadd(57.6, 44.68, -6.3, 2.16)
pt3dadd(57.64, 44.64, -6.3, 2.16)
pt3dadd(57.67, 44.6, -6.3, 2.16)
pt3dadd(57.69, 44.56, -6.3, 2.16)
pt3dadd(57.71, 44.51, -6.3, 2.16)
pt3dadd(57.73, 44.45, -6.3, 2.16)
pt3dadd(57.77, 44.39, -6.3, 2.16)
pt3dadd(57.82, 44.33, -6.3, 2.16)
pt3dadd(57.84, 44.29, -6.3, 2.16)
pt3dadd(57.86, 44.22, -6.3, 2.16)
pt3dadd(57.88, 44.18, -6.3, 2.16)
pt3dadd(57.91, 44.12, -6.3, 2.16)
pt3dadd(57.95, 44.08, -6.3, 2.16)
pt3dadd(57.97, 44.02, -6.3, 2.16)
pt3dadd(58.01, 43.96, -6.3, 2.16)
pt3dadd(58.04, 43.89, -6.3, 2.16)
pt3dadd(58.08, 43.85, -6.3, 2.16)
pt3dadd(58.12, 43.77, -6.3, 2.16)
pt3dadd(58.13, 43.71, -6.3, 2.16)
pt3dadd(58.17, 43.64, -6.3, 2.16)
pt3dadd(58.24, 43.48, -6.3, 2.16)
pt3dadd(58.26, 43.42, -6.3, 2.16)
pt3dadd(58.3, 43.33, -6.3, 2.16)
pt3dadd(58.33, 43.25, -6.3, 2.16)
pt3dadd(58.37, 43.15, -6.3, 2.16)
pt3dadd(58.39, 43.08, -6.3, 2.16)
pt3dadd(58.44, 42.98, -6.3, 2.16)
pt3dadd(58.48, 42.9, -6.3, 2.16)
pt3dadd(58.5, 42.81, -6.3, 2.16)
pt3dadd(58.53, 42.73, -6.3, 2.16)
pt3dadd(58.57, 42.65, -6.3, 2.16)
pt3dadd(58.59, 42.6, -6.3, 2.16)
pt3dadd(58.63, 42.52, -6.3, 2.16)
pt3dadd(58.65, 42.46, -6.3, 2.16)
pt3dadd(58.68, 42.38, -6.3, 2.16)
pt3dadd(58.72, 42.29, -6.3, 2.16)
pt3dadd(58.74, 42.23, -6.3, 2.16)
pt3dadd(58.76, 42.15, -6.3, 2.16)
pt3dadd(58.79, 42.08, -6.3, 2.16)
pt3dadd(58.79, 42, -6.3, 2.16)
pt3dadd(58.83, 41.94, -6.3, 2.16)
pt3dadd(58.83, 41.88, -6.3, 2.16)
pt3dadd(58.85, 41.79, -6.3, 2.16)
pt3dadd(58.87, 41.71, -6.3, 2.16)
}
}
proc shape3d_63() {
dend[45] { pt3dadd(58.87, 41.15, -6.3, 2.16)
pt3dadd(58.88, 41.09, -6.3, 2.16)
pt3dadd(58.88, 40.74, -6.3, 2.16)
pt3dadd(58.92, 40.65, -6.3, 2.16)
pt3dadd(58.92, 40.57, -6.3, 2.16)
pt3dadd(58.94, 40.49, -6.3, 2.16)
pt3dadd(58.96, 40.38, -6.3, 2.16)
pt3dadd(58.96, 39.8, -6.3, 2.16)
pt3dadd(58.94, 40.03, -6.3, 2.16)
pt3dadd(58.94, 38.47, -6.3, 2.16)
pt3dadd(58.96, 38.39, -6.3, 2.16)
pt3dadd(58.96, 38.31, -6.3, 2.16)
pt3dadd(58.99, 38.24, -6.3, 2.16)
pt3dadd(58.99, 38.16, -6.3, 2.16)
pt3dadd(59.01, 38.12, -6.3, 2.16)
pt3dadd(59.05, 38.01, -6.3, 2.16)
pt3dadd(59.06, 37.93, -6.3, 2.16)
pt3dadd(59.08, 37.87, -6.3, 2.16)
pt3dadd(59.1, 37.81, -6.3, 2.16)
pt3dadd(59.1, 37.72, -6.3, 2.16)
pt3dadd(59.14, 37.66, -6.3, 2.16)
pt3dadd(59.14, 37.58, -6.3, 2.16)
pt3dadd(59.17, 37.51, -6.3, 2.16)
pt3dadd(59.21, 37.41, -6.3, 2.16)
pt3dadd(59.27, 37.29, -6.3, 2.16)
pt3dadd(59.28, 37.2, -6.3, 2.16)
pt3dadd(59.3, 37.14, -6.3, 2.16)
pt3dadd(59.32, 37.06, -6.3, 2.16)
pt3dadd(59.34, 36.97, -6.3, 2.16)
pt3dadd(59.34, 36.91, -6.3, 2.16)
pt3dadd(59.36, 36.85, -6.3, 2.16)
pt3dadd(59.38, 36.79, -6.3, 2.16)
pt3dadd(59.38, 36.72, -6.3, 2.16)
pt3dadd(59.4, 36.66, -6.3, 2.16)
pt3dadd(59.41, 36.6, -6.3, 2.16)
pt3dadd(59.43, 36.52, -6.3, 2.16)
pt3dadd(59.43, 36.46, -6.3, 2.16)
pt3dadd(59.45, 36.39, -6.3, 2.16)
pt3dadd(59.47, 36.33, -6.3, 2.16)
pt3dadd(59.47, 36.17, -6.3, 2.16)
pt3dadd(59.49, 36.1, -6.3, 2.16)
pt3dadd(59.49, 36.04, -6.3, 2.16)
pt3dadd(59.52, 35.96, -6.3, 2.16)
pt3dadd(59.56, 35.9, -6.3, 2.16)
pt3dadd(59.6, 35.83, -6.3, 2.16)
pt3dadd(59.63, 35.73, -6.3, 2.16)
pt3dadd(59.65, 35.67, -6.3, 2.16)
pt3dadd(59.69, 35.63, -6.3, 2.16)
pt3dadd(59.71, 35.58, -6.3, 2.16)
pt3dadd(59.72, 35.54, -6.3, 2.16)
pt3dadd(59.74, 35.48, -6.3, 2.16)
pt3dadd(59.78, 35.44, -6.3, 2.16)
pt3dadd(59.81, 35.4, -6.3, 2.16)
pt3dadd(59.83, 35.38, -6.3, 2.16)
pt3dadd(59.85, 35.35, -6.3, 2.16)
pt3dadd(59.87, 35.31, -6.3, 2.16)
pt3dadd(59.91, 35.29, -6.3, 2.16)
pt3dadd(59.94, 35.27, -6.3, 2.16)
pt3dadd(59.98, 35.25, -6.3, 2.16)
pt3dadd(60.03, 35.23, -6.3, 2.16)
pt3dadd(60.51, 35.23, -6.3, 2.16)
pt3dadd(60.55, 35.25, -6.3, 2.16)
pt3dadd(60.6, 35.27, -6.3, 2.16)
pt3dadd(60.66, 35.29, -6.3, 2.16)
pt3dadd(60.71, 35.31, -6.3, 2.16)
pt3dadd(60.75, 35.33, -6.3, 2.16)
pt3dadd(60.8, 35.35, -6.3, 2.16)
pt3dadd(60.86, 35.38, -6.3, 2.16)
pt3dadd(60.9, 35.4, -6.3, 2.16)
pt3dadd(60.93, 35.44, -6.3, 2.16)
pt3dadd(60.99, 35.46, -6.3, 2.16)
pt3dadd(61.04, 35.5, -6.3, 2.16)
pt3dadd(61.1, 35.54, -6.3, 2.16)
pt3dadd(61.13, 35.56, -6.3, 2.16)
pt3dadd(61.15, 35.6, -6.3, 2.16)
pt3dadd(61.19, 35.6, -6.3, 2.16)
pt3dadd(61.22, 35.65, -6.3, 2.16)
pt3dadd(61.28, 35.69, -6.3, 2.16)
pt3dadd(61.31, 35.71, -6.3, 2.16)
pt3dadd(61.37, 35.75, -6.3, 2.16)
pt3dadd(61.41, 35.79, -6.3, 2.16)
pt3dadd(61.46, 35.83, -6.3, 2.16)
pt3dadd(61.5, 35.85, -6.3, 2.16)
pt3dadd(61.55, 35.9, -6.3, 2.16)
pt3dadd(61.65, 35.96, -6.3, 2.16)
pt3dadd(61.68, 35.98, -6.3, 2.16)
pt3dadd(61.77, 36.06, -6.3, 2.16)
pt3dadd(61.83, 36.08, -6.3, 2.16)
pt3dadd(61.88, 36.12, -6.3, 2.16)
pt3dadd(61.92, 36.15, -6.3, 2.16)
pt3dadd(61.97, 36.21, -6.3, 2.16)
pt3dadd(62.06, 36.27, -6.3, 2.16)
pt3dadd(62.14, 36.33, -6.3, 2.16)
pt3dadd(62.19, 36.37, -6.3, 2.16)
pt3dadd(62.25, 36.44, -6.3, 2.16)
pt3dadd(62.3, 36.46, -6.3, 2.16)
pt3dadd(62.34, 36.5, -6.3, 2.16)
pt3dadd(62.38, 36.54, -6.3, 2.16)
pt3dadd(62.41, 36.58, -6.3, 2.16)
pt3dadd(62.45, 36.6, -6.3, 2.16)
pt3dadd(62.47, 36.62, -6.3, 2.16)
pt3dadd(62.51, 36.64, -6.3, 2.16)
pt3dadd(62.54, 36.66, -6.3, 2.16)
pt3dadd(62.58, 36.71, -6.3, 2.16)
pt3dadd(62.6, 36.72, -6.3, 2.16)
pt3dadd(62.63, 36.75, -6.3, 2.16)
pt3dadd(62.69, 36.81, -6.3, 2.16)
pt3dadd(62.76, 36.85, -6.3, 2.16)
pt3dadd(62.8, 36.89, -6.3, 2.16)
pt3dadd(62.85, 36.96, -6.3, 2.16)
pt3dadd(62.87, 36.97, -6.3, 2.16)
pt3dadd(62.91, 36.99, -6.3, 2.16)
pt3dadd(62.94, 37.02, -6.3, 2.16)
pt3dadd(62.98, 37.04, -6.3, 2.16)
pt3dadd(63, 37.08, -6.3, 2.16)
pt3dadd(63.03, 37.1, -6.3, 2.16)
pt3dadd(63.05, 37.12, -6.3, 2.16)
pt3dadd(63.11, 37.14, -6.3, 2.16)
pt3dadd(63.16, 37.18, -6.3, 2.16)
pt3dadd(63.22, 37.2, -6.3, 2.16)
pt3dadd(63.27, 37.22, -6.3, 2.16)
pt3dadd(63.33, 37.26, -6.3, 2.16)
pt3dadd(63.38, 37.29, -6.3, 2.16)
pt3dadd(63.42, 37.33, -6.3, 2.16)
pt3dadd(63.47, 37.35, -6.3, 2.16)
pt3dadd(63.51, 37.37, -6.3, 2.16)
pt3dadd(63.55, 37.41, -6.3, 2.16)
pt3dadd(63.58, 37.43, -6.3, 2.16)
pt3dadd(63.64, 37.45, -6.3, 2.16)
pt3dadd(63.67, 37.47, -6.3, 2.16)
pt3dadd(63.71, 37.49, -6.3, 2.16)
pt3dadd(63.76, 37.51, -6.3, 2.16)
pt3dadd(63.82, 37.53, -6.3, 2.16)
pt3dadd(63.88, 37.56, -6.3, 2.16)
pt3dadd(63.93, 37.56, -6.3, 2.16)
pt3dadd(63.99, 37.58, -6.3, 2.16)
pt3dadd(64.06, 37.6, -6.3, 2.16)
pt3dadd(64.11, 37.62, -6.3, 2.16)
pt3dadd(64.21, 37.64, -6.3, 2.16)
pt3dadd(64.3, 37.66, -6.3, 2.16)
pt3dadd(64.39, 37.66, -6.3, 2.16)
pt3dadd(64.48, 37.68, -6.3, 2.16)
pt3dadd(64.55, 37.7, -6.3, 2.16)
pt3dadd(64.63, 37.7, -6.3, 2.16)
pt3dadd(64.51, 37.58, -8.4, 2.23)
pt3dadd(65.9, 37.58, -8.4, 2.23)
pt3dadd(65.94, 37.62, -8.4, 2.23)
pt3dadd(66.01, 37.62, -8.4, 2.23)
pt3dadd(65.72, 37.62, -10.5, 2.23)
pt3dadd(66.35, 37.62, -10.5, 2.23)
pt3dadd(66.42, 37.66, -10.5, 2.23)
pt3dadd(66.46, 37.7, -10.5, 2.23)
pt3dadd(66.49, 37.74, -10.5, 2.23)
pt3dadd(66.53, 37.78, -10.5, 2.23)
pt3dadd(66.57, 37.83, -10.5, 2.23)
pt3dadd(66.6, 37.87, -10.5, 2.23)
pt3dadd(66.64, 37.91, -10.5, 2.23)
pt3dadd(66.68, 37.95, -10.5, 2.23)
pt3dadd(66.71, 37.99, -10.5, 2.23)
pt3dadd(66.79, 38.03, -10.5, 2.23)
pt3dadd(66.79, 38.12, -10.5, 2.23)
pt3dadd(66.82, 38.16, -10.5, 2.23)
pt3dadd(66.86, 38.2, -10.5, 2.23)
pt3dadd(66.89, 38.24, -10.5, 2.23)
pt3dadd(66.97, 38.28, -10.5, 2.23)
pt3dadd(67.04, 38.37, -10.5, 2.23)
pt3dadd(67.08, 38.41, -10.5, 2.23)
pt3dadd(67.11, 38.45, -10.5, 2.23)
pt3dadd(67.15, 38.49, -10.5, 2.23)
pt3dadd(67.19, 38.53, -10.5, 2.23)
pt3dadd(67.26, 38.58, -10.5, 2.23)
pt3dadd(67.29, 38.62, -10.5, 2.23)
pt3dadd(67.33, 38.66, -10.5, 2.23)
pt3dadd(67.37, 38.7, -10.5, 2.23)
pt3dadd(67.4, 38.74, -10.5, 2.23)
pt3dadd(67.44, 38.78, -10.5, 2.23)
pt3dadd(67.51, 38.82, -10.5, 2.23)
pt3dadd(67.59, 38.87, -10.5, 2.23)
pt3dadd(67.66, 38.95, -10.5, 2.23)
pt3dadd(67.74, 38.99, -10.5, 2.23)
pt3dadd(67.77, 39.03, -10.5, 2.23)
pt3dadd(67.81, 39.07, -10.5, 2.23)
pt3dadd(67.96, 39.07, -10.5, 2.23)
pt3dadd(68.03, 39.12, -10.5, 2.23)
pt3dadd(69.24, 39.12, -10.5, 2.23)
pt3dadd(69.31, 39.07, -10.5, 2.23)
pt3dadd(69.42, 39.07, -10.5, 2.23)
pt3dadd(69.49, 39.03, -10.5, 2.23)
pt3dadd(69.53, 38.99, -10.5, 2.23)
pt3dadd(69.6, 38.99, -10.5, 2.23)
pt3dadd(69.71, 38.91, -13.65, 2.23)
pt3dadd(69.86, 38.91, -13.65, 2.23)
pt3dadd(69.93, 38.87, -13.65, 2.23)
pt3dadd(70, 38.87, -13.65, 2.23)
pt3dadd(70.07, 38.82, -13.65, 2.23)
pt3dadd(70.15, 38.82, -13.65, 2.23)
pt3dadd(70.18, 38.78, -13.65, 2.23)
pt3dadd(70.26, 38.74, -13.65, 2.23)
pt3dadd(70.29, 38.7, -13.65, 2.23)
pt3dadd(70.55, 38.7, -13.65, 2.23)
}
}
proc shape3d_64() {
dend[45] { pt3dadd(70.63, 38.66, -13.65, 2.23)
pt3dadd(70.7, 38.66, -13.65, 2.23)
pt3dadd(70.74, 38.62, -13.65, 2.23)
pt3dadd(70.81, 38.58, -13.65, 2.23)
pt3dadd(70.88, 38.53, -13.65, 2.23)
pt3dadd(71.21, 38.53, -13.65, 2.23)
pt3dadd(71.25, 38.49, -13.65, 2.23)
pt3dadd(71.43, 38.49, -13.65, 2.23)
pt3dadd(71.5, 38.45, -13.65, 2.23)
pt3dadd(71.54, 38.37, -13.65, 2.23)
pt3dadd(71.61, 38.33, -13.65, 2.23)
pt3dadd(71.68, 38.24, -13.65, 2.23)
pt3dadd(71.76, 38.2, -13.65, 2.23)
pt3dadd(71.83, 38.12, -13.65, 2.23)
pt3dadd(71.94, 38.08, -13.65, 2.23)
pt3dadd(72.05, 37.99, -13.65, 2.23)
pt3dadd(72.16, 37.91, -13.65, 2.23)
pt3dadd(72.24, 37.78, -13.65, 2.23)
pt3dadd(72.35, 37.74, -13.65, 2.23)
pt3dadd(72.42, 37.66, -13.65, 2.23)
pt3dadd(72.53, 37.53, -13.65, 2.23)
pt3dadd(72.64, 37.33, -13.65, 2.23)
pt3dadd(72.75, 37.24, -13.65, 2.23)
pt3dadd(72.82, 37.12, -13.65, 2.23)
pt3dadd(72.93, 36.99, -13.65, 2.23)
pt3dadd(73.04, 36.83, -13.65, 2.23)
pt3dadd(73.29, 36.54, -13.65, 2.23)
pt3dadd(73.4, 36.42, -13.65, 2.23)
pt3dadd(73.63, 36.17, -13.65, 2.23)
pt3dadd(73.74, 36.08, -13.65, 2.23)
pt3dadd(73.85, 35.96, -13.65, 2.23)
pt3dadd(73.99, 35.79, -13.65, 2.23)
pt3dadd(74.17, 35.63, -13.65, 2.23)
pt3dadd(74.28, 35.46, -13.65, 2.23)
pt3dadd(74.43, 35.33, -13.65, 2.23)
pt3dadd(74.54, 35.17, -13.65, 2.23)
pt3dadd(74.65, 35.04, -13.65, 2.23)
pt3dadd(74.79, 34.92, -13.65, 2.23)
pt3dadd(74.94, 34.75, -13.65, 2.23)
pt3dadd(75.05, 34.58, -13.65, 2.23)
pt3dadd(75.16, 34.46, -13.65, 2.23)
pt3dadd(75.31, 34.25, -13.65, 2.23)
pt3dadd(75.45, 34.09, -13.65, 2.23)
pt3dadd(75.6, 33.96, -13.65, 2.23)
pt3dadd(75.67, 33.84, -13.65, 2.23)
pt3dadd(75.78, 33.71, -13.65, 2.23)
pt3dadd(75.93, 33.55, -13.65, 2.23)
pt3dadd(76.04, 33.38, -13.65, 2.23)
pt3dadd(76.15, 33.26, -13.65, 2.23)
pt3dadd(76.29, 33.13, -13.65, 2.23)
pt3dadd(76.37, 32.97, -13.65, 2.23)
pt3dadd(76.51, 32.8, -13.65, 2.23)
pt3dadd(76.66, 32.59, -13.65, 2.23)
pt3dadd(76.81, 32.42, -13.65, 2.23)
pt3dadd(76.92, 32.3, -13.65, 2.23)
pt3dadd(77.03, 32.09, -13.65, 2.23)
pt3dadd(77.17, 31.93, -13.65, 2.23)
pt3dadd(77.32, 31.8, -13.65, 2.23)
pt3dadd(77.46, 31.64, -13.65, 2.23)
pt3dadd(77.57, 31.43, -13.65, 2.23)
pt3dadd(77.72, 31.26, -13.65, 2.23)
pt3dadd(77.83, 31.09, -13.65, 2.23)
pt3dadd(77.94, 30.97, -13.65, 2.23)
pt3dadd(78.05, 30.85, -13.65, 2.23)
pt3dadd(78.2, 30.68, -13.65, 2.23)
pt3dadd(78.31, 30.51, -13.65, 2.23)
pt3dadd(78.42, 30.39, -13.65, 2.23)
pt3dadd(78.53, 30.22, -13.65, 2.23)
pt3dadd(78.67, 30.1, -13.65, 2.23)
pt3dadd(78.82, 29.93, -13.65, 2.23)
pt3dadd(78.93, 29.77, -13.65, 2.23)
pt3dadd(79.07, 29.56, -13.65, 2.23)
pt3dadd(79.22, 29.43, -13.65, 2.23)
pt3dadd(79.33, 29.27, -13.65, 2.23)
pt3dadd(79.44, 29.18, -13.65, 2.23)
pt3dadd(79.55, 29.06, -13.65, 2.23)
pt3dadd(79.62, 28.93, -13.65, 2.23)
pt3dadd(79.73, 28.81, -13.65, 2.23)
pt3dadd(79.84, 28.73, -13.65, 2.23)
pt3dadd(79.92, 28.6, -13.65, 2.23)
pt3dadd(80.03, 28.52, -13.65, 2.23)
pt3dadd(80.14, 28.4, -13.65, 2.23)
pt3dadd(80.32, 28.15, -13.65, 2.23)
pt3dadd(80.43, 28.02, -13.65, 2.23)
pt3dadd(80.57, 27.85, -13.65, 2.23)
pt3dadd(80.68, 27.77, -13.65, 2.23)
pt3dadd(80.79, 27.69, -13.65, 2.23)
pt3dadd(80.9, 27.57, -13.65, 2.23)
pt3dadd(81.01, 27.48, -13.65, 2.23)
pt3dadd(81.12, 27.4, -13.65, 2.23)
pt3dadd(81.23, 27.27, -13.65, 2.23)
pt3dadd(81.31, 27.23, -13.65, 2.23)
pt3dadd(81.38, 27.15, -13.65, 2.23)
pt3dadd(81.49, 27.02, -13.65, 2.23)
pt3dadd(81.56, 26.98, -13.65, 2.23)
pt3dadd(81.6, 26.9, -13.65, 2.23)
pt3dadd(81.34, 27.02, -12.6, 2.23)
pt3dadd(81.45, 26.9, -12.6, 2.23)
pt3dadd(81.49, 26.86, -12.6, 2.23)
pt3dadd(81.53, 26.77, -12.6, 2.23)
pt3dadd(81.6, 26.73, -12.6, 2.23)
pt3dadd(81.86, 26.44, -12.6, 2.23)
pt3dadd(81.89, 26.36, -12.6, 2.23)
pt3dadd(81.96, 26.24, -12.6, 2.23)
pt3dadd(82, 26.15, -12.6, 2.23)
pt3dadd(82.11, 26.03, -12.6, 2.23)
pt3dadd(82.15, 25.94, -12.6, 2.23)
pt3dadd(82.18, 25.9, -12.6, 2.23)
pt3dadd(82.26, 25.82, -12.6, 2.23)
pt3dadd(82.4, 25.65, -12.6, 2.23)
pt3dadd(82.48, 25.57, -12.6, 2.23)
pt3dadd(82.55, 25.44, -12.6, 2.23)
pt3dadd(82.62, 25.36, -12.6, 2.23)
pt3dadd(82.73, 25.19, -12.6, 2.23)
pt3dadd(82.84, 25.07, -12.6, 2.23)
pt3dadd(82.95, 24.91, -12.6, 2.23)
pt3dadd(83.06, 24.78, -12.6, 2.23)
pt3dadd(83.17, 24.61, -12.6, 2.23)
pt3dadd(83.32, 24.45, -12.6, 2.23)
pt3dadd(83.43, 24.32, -12.6, 2.23)
pt3dadd(83.57, 24.16, -12.6, 2.23)
pt3dadd(83.65, 24.03, -12.6, 2.23)
pt3dadd(83.76, 23.91, -12.6, 2.23)
pt3dadd(83.87, 23.78, -12.6, 2.23)
pt3dadd(83.98, 23.7, -12.6, 2.23)
pt3dadd(84.09, 23.58, -12.6, 2.23)
pt3dadd(84.19, 23.45, -12.6, 2.23)
pt3dadd(84.23, 23.41, -12.6, 2.23)
pt3dadd(84.34, 23.28, -12.6, 2.23)
pt3dadd(84.45, 23.16, -12.6, 2.23)
pt3dadd(84.56, 23.12, -12.6, 2.23)
pt3dadd(84.64, 23.03, -12.6, 2.23)
pt3dadd(84.67, 22.95, -12.6, 2.23)
pt3dadd(84.71, 22.91, -12.6, 2.23)
pt3dadd(84.78, 22.87, -12.6, 2.23)
pt3dadd(84.82, 22.83, -12.6, 2.23)
pt3dadd(84.86, 22.78, -12.6, 2.23)
pt3dadd(84.86, 22.91, -18.9, 2.23)
pt3dadd(84.89, 22.83, -18.9, 2.23)
pt3dadd(85.15, 22.54, -18.9, 2.23)
pt3dadd(85.4, 22.29, -18.9, 2.23)
pt3dadd(85.51, 22.16, -18.9, 2.23)
pt3dadd(85.58, 22.08, -18.9, 2.23)
pt3dadd(85.66, 21.95, -18.9, 2.23)
pt3dadd(85.77, 21.87, -18.9, 2.23)
pt3dadd(85.88, 21.75, -18.9, 2.23)
pt3dadd(85.95, 21.62, -18.9, 2.23)
pt3dadd(86.03, 21.46, -18.9, 2.23)
pt3dadd(86.14, 21.33, -18.9, 2.23)
pt3dadd(86.21, 21.17, -18.9, 2.23)
pt3dadd(86.32, 21.04, -18.9, 2.23)
pt3dadd(86.39, 20.92, -18.9, 2.23)
pt3dadd(86.5, 20.75, -18.9, 2.23)
pt3dadd(86.61, 20.58, -18.9, 2.23)
pt3dadd(86.72, 20.46, -18.9, 2.23)
pt3dadd(86.83, 20.25, -18.9, 2.23)
pt3dadd(86.79, 20.21, -15.75, 1.81)
pt3dadd(86.9, 20.21, -15.75, 1.81)
pt3dadd(86.94, 20.17, -15.75, 1.81)
pt3dadd(86.98, 20.08, -15.75, 1.81)
pt3dadd(87.01, 20.05, -15.75, 1.81)
pt3dadd(87.05, 19.96, -15.75, 1.81)
pt3dadd(87.08, 19.84, -15.75, 1.81)
pt3dadd(87.12, 19.75, -15.75, 1.81)
pt3dadd(87.23, 19.63, -15.75, 1.81)
pt3dadd(87.27, 19.55, -15.75, 1.81)
pt3dadd(87.31, 19.46, -15.75, 1.81)
pt3dadd(87.34, 19.42, -15.75, 1.81)
pt3dadd(87.38, 19.34, -15.75, 1.81)
pt3dadd(87.45, 19.21, -15.75, 1.81)
pt3dadd(87.56, 19.09, -15.75, 1.81)
pt3dadd(87.6, 19, -15.75, 1.81)
pt3dadd(87.64, 18.92, -15.75, 1.81)
pt3dadd(87.67, 18.84, -15.75, 1.81)
pt3dadd(87.75, 18.75, -15.75, 1.81)
pt3dadd(87.78, 18.72, -15.75, 1.81)
pt3dadd(87.82, 18.63, -15.75, 1.81)
pt3dadd(87.86, 18.55, -15.75, 1.81)
pt3dadd(87.89, 18.42, -15.75, 1.81)
pt3dadd(87.93, 18.34, -15.75, 1.81)
pt3dadd(87.96, 18.26, -15.75, 1.81)
pt3dadd(88, 18.17, -15.75, 1.81)
pt3dadd(88.07, 18.09, -15.75, 1.81)
pt3dadd(88.11, 18.01, -15.75, 1.81)
pt3dadd(88.18, 17.88, -15.75, 1.81)
pt3dadd(88.26, 17.84, -15.75, 1.81)
pt3dadd(88.29, 17.72, -15.75, 1.81)
pt3dadd(88.37, 17.64, -15.75, 1.81)
pt3dadd(88.44, 17.51, -15.75, 1.81)
pt3dadd(88.55, 17.39, -15.75, 1.81)
pt3dadd(88.58, 17.26, -15.75, 1.81)
pt3dadd(88.69, 17.14, -15.75, 1.81)
pt3dadd(88.73, 17.01, -15.75, 1.81)
pt3dadd(88.77, 16.89, -15.75, 1.81)
pt3dadd(88.84, 16.8, -15.75, 1.81)
pt3dadd(88.95, 16.59, -15.75, 1.81)
pt3dadd(88.99, 16.51, -15.75, 1.81)
pt3dadd(89.06, 16.39, -15.75, 1.81)
pt3dadd(89.1, 16.26, -15.75, 1.81)
pt3dadd(89.21, 16.14, -15.75, 1.81)
}
}
proc shape3d_65() {
dend[45] { pt3dadd(89.25, 16.01, -15.75, 1.81)
pt3dadd(89.32, 15.93, -15.75, 1.81)
pt3dadd(89.36, 15.85, -15.75, 1.81)
pt3dadd(89.46, 15.72, -15.75, 1.81)
pt3dadd(89.54, 15.6, -15.75, 1.81)
pt3dadd(89.57, 15.47, -15.75, 1.81)
pt3dadd(89.65, 15.35, -15.75, 1.81)
pt3dadd(89.72, 15.27, -15.75, 1.81)
pt3dadd(89.79, 15.14, -15.75, 1.81)
pt3dadd(89.83, 15.06, -15.75, 1.81)
pt3dadd(89.86, 14.93, -15.75, 1.81)
pt3dadd(89.9, 14.89, -15.75, 1.81)
pt3dadd(89.97, 14.77, -15.75, 1.81)
pt3dadd(90.01, 14.69, -15.75, 1.81)
pt3dadd(90.05, 14.56, -15.75, 1.81)
pt3dadd(90.12, 14.44, -15.75, 1.81)
pt3dadd(90.19, 14.27, -15.75, 1.81)
pt3dadd(90.27, 14.19, -15.75, 1.81)
pt3dadd(90.34, 14.1, -15.75, 1.81)
pt3dadd(90.38, 14.02, -15.75, 1.81)
pt3dadd(90.42, 13.9, -15.75, 1.81)
pt3dadd(90.45, 13.81, -15.75, 1.81)
pt3dadd(90.53, 13.77, -15.75, 1.81)
pt3dadd(90.53, 13.65, -15.75, 1.81)
pt3dadd(90.56, 13.56, -15.75, 1.81)
pt3dadd(90.6, 13.48, -15.75, 1.81)
pt3dadd(90.6, 13.4, -15.75, 1.81)
pt3dadd(90.67, 13.27, -15.75, 1.81)
pt3dadd(90.71, 13.19, -15.75, 1.81)
pt3dadd(90.75, 13.06, -15.75, 1.81)
pt3dadd(90.78, 12.98, -15.75, 1.81)
pt3dadd(90.78, 11.65, -15.75, 1.81)
}
dend[46] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(62.24, 91.2, -31.5, 4.76)
pt3dadd(60.06, 91.2, -31.5, 4.76)
pt3dadd(59.97, 91.25, -31.5, 4.76)
pt3dadd(59.65, 91.25, -31.5, 4.76)
pt3dadd(59.56, 91.3, -31.5, 4.76)
pt3dadd(59.34, 91.3, -31.5, 4.76)
pt3dadd(59.3, 91.35, -31.5, 4.76)
pt3dadd(59.03, 91.35, -31.5, 4.76)
pt3dadd(58.99, 91.4, -31.5, 4.76)
pt3dadd(58.72, 91.4, -31.5, 4.76)
pt3dadd(58.67, 91.45, -31.5, 4.76)
pt3dadd(58.49, 91.45, -31.5, 4.76)
pt3dadd(58.41, 91.5, -31.5, 4.76)
pt3dadd(58.27, 91.5, -31.5, 4.76)
pt3dadd(58.23, 91.55, -31.5, 4.76)
pt3dadd(58.1, 91.55, -31.5, 4.76)
pt3dadd(58.05, 91.61, -31.5, 4.76)
pt3dadd(57.96, 91.61, -31.5, 4.76)
pt3dadd(57.92, 91.65, -31.5, 4.76)
pt3dadd(57.83, 91.65, -31.5, 4.76)
pt3dadd(57.78, 91.71, -31.5, 4.76)
pt3dadd(57.69, 91.71, -31.5, 4.76)
pt3dadd(57.65, 91.75, -31.5, 4.76)
pt3dadd(57.56, 91.75, -31.5, 4.76)
pt3dadd(57.51, 91.81, -31.5, 4.76)
pt3dadd(57.42, 91.81, -31.5, 4.76)
pt3dadd(57.38, 91.86, -31.5, 4.76)
pt3dadd(57.29, 91.86, -31.5, 4.76)
pt3dadd(57.25, 91.91, -31.5, 4.76)
pt3dadd(57.16, 91.96, -31.5, 4.76)
pt3dadd(57.07, 91.96, -31.5, 4.76)
pt3dadd(57.03, 92.01, -31.5, 4.76)
pt3dadd(56.98, 92.06, -31.5, 4.76)
pt3dadd(56.94, 92.11, -31.5, 4.76)
pt3dadd(56.85, 92.16, -31.5, 4.76)
pt3dadd(56.8, 92.26, -31.5, 4.76)
pt3dadd(56.71, 92.31, -31.5, 4.76)
pt3dadd(56.62, 92.36, -31.5, 4.76)
pt3dadd(56.53, 92.42, -31.5, 4.76)
pt3dadd(56.49, 92.46, -31.5, 4.76)
pt3dadd(56.44, 92.51, -31.5, 4.76)
pt3dadd(56.4, 92.57, -31.5, 4.76)
pt3dadd(56.27, 92.72, -31.5, 4.76)
pt3dadd(56.18, 92.77, -31.5, 4.76)
pt3dadd(56.09, 92.82, -31.5, 4.76)
pt3dadd(56.04, 92.87, -31.5, 4.76)
pt3dadd(56, 92.92, -31.5, 4.76)
pt3dadd(55.96, 92.97, -31.5, 4.76)
pt3dadd(55.87, 93.02, -31.5, 4.76)
pt3dadd(55.82, 93.07, -31.5, 4.76)
pt3dadd(55.73, 93.12, -31.5, 4.76)
pt3dadd(55.64, 93.17, -31.5, 4.76)
pt3dadd(55.6, 93.22, -31.5, 4.76)
pt3dadd(55.55, 93.28, -31.5, 4.76)
pt3dadd(55.47, 93.28, -31.5, 4.76)
pt3dadd(55.42, 93.32, -31.5, 4.76)
pt3dadd(55.33, 93.38, -31.5, 4.76)
pt3dadd(55.28, 93.48, -31.5, 4.76)
pt3dadd(55.2, 93.53, -31.5, 4.76)
pt3dadd(55.15, 93.58, -31.5, 4.76)
pt3dadd(55.11, 93.68, -31.5, 4.76)
pt3dadd(55.02, 93.73, -31.5, 4.76)
pt3dadd(54.97, 93.78, -31.5, 4.76)
pt3dadd(54.93, 93.83, -31.5, 4.76)
pt3dadd(54.88, 93.93, -31.5, 4.76)
pt3dadd(54.84, 93.99, -31.5, 4.76)
pt3dadd(54.79, 94.04, -31.5, 4.76)
pt3dadd(54.71, 94.14, -31.5, 4.76)
pt3dadd(54.62, 94.19, -31.5, 4.76)
pt3dadd(54.57, 94.29, -31.5, 4.76)
pt3dadd(54.48, 94.44, -31.5, 4.76)
pt3dadd(54.44, 94.54, -31.5, 4.76)
pt3dadd(54.31, 94.64, -31.5, 4.76)
pt3dadd(54.26, 94.74, -31.5, 4.76)
pt3dadd(54.13, 94.89, -31.5, 4.76)
pt3dadd(54.08, 94.94, -31.5, 4.76)
pt3dadd(53.95, 95.1, -31.5, 4.76)
pt3dadd(53.9, 95.15, -31.5, 4.76)
pt3dadd(53.86, 95.25, -31.5, 4.76)
pt3dadd(53.81, 95.3, -31.5, 4.76)
pt3dadd(53.77, 95.4, -31.5, 4.76)
pt3dadd(53.72, 95.45, -31.5, 4.76)
pt3dadd(53.68, 95.55, -31.5, 4.76)
pt3dadd(53.55, 95.71, -31.5, 4.76)
pt3dadd(53.5, 95.75, -31.5, 4.76)
pt3dadd(53.46, 95.81, -31.5, 4.76)
pt3dadd(53.46, 95.91, -31.5, 4.76)
pt3dadd(53.41, 95.96, -31.5, 4.76)
pt3dadd(53.41, 96.06, -31.5, 4.76)
pt3dadd(53.37, 96.11, -31.5, 4.76)
pt3dadd(53.37, 96.26, -31.5, 4.76)
pt3dadd(53.37, 96.46, -30.45, 4.08)
pt3dadd(53.37, 96.57, -30.45, 4.08)
pt3dadd(53.33, 96.67, -30.45, 4.08)
pt3dadd(53.24, 96.72, -30.45, 4.08)
pt3dadd(53.19, 96.82, -30.45, 4.08)
pt3dadd(53.15, 96.92, -30.45, 4.08)
pt3dadd(53.06, 96.92, -30.45, 4.08)
pt3dadd(53.01, 96.97, -30.45, 4.08)
pt3dadd(52.97, 97.02, -30.45, 4.08)
pt3dadd(52.88, 97.02, -30.45, 4.08)
pt3dadd(52.83, 97.07, -30.45, 4.08)
pt3dadd(52.74, 97.12, -30.45, 4.08)
pt3dadd(52.65, 97.18, -30.45, 4.08)
pt3dadd(52.52, 97.28, -30.45, 4.08)
pt3dadd(52.48, 97.32, -30.45, 4.08)
pt3dadd(52.39, 97.38, -30.45, 4.08)
pt3dadd(52.3, 97.48, -30.45, 4.08)
pt3dadd(52.26, 97.53, -30.45, 4.08)
pt3dadd(52.21, 97.58, -30.45, 4.08)
pt3dadd(52.17, 97.63, -30.45, 4.08)
pt3dadd(52.08, 97.68, -30.45, 4.08)
pt3dadd(51.99, 97.68, -30.45, 4.08)
pt3dadd(51.9, 97.73, -30.45, 4.08)
pt3dadd(50.38, 97.73, -30.45, 4.08)
pt3dadd(50.25, 97.78, -30.45, 4.08)
pt3dadd(50.16, 97.83, -30.45, 4.08)
pt3dadd(50.07, 97.83, -30.45, 4.08)
pt3dadd(50.03, 97.88, -30.45, 4.08)
pt3dadd(49.98, 97.93, -30.45, 4.08)
pt3dadd(49.94, 97.99, -30.45, 4.08)
pt3dadd(49.85, 97.99, -30.45, 4.08)
pt3dadd(49.76, 98.04, -30.45, 4.08)
pt3dadd(49.71, 98.14, -30.45, 4.08)
pt3dadd(49.63, 98.19, -30.45, 4.08)
pt3dadd(49.53, 98.24, -30.45, 4.08)
pt3dadd(49.49, 98.29, -30.45, 4.08)
pt3dadd(49.44, 98.34, -30.45, 4.08)
pt3dadd(49.4, 98.39, -30.45, 4.08)
pt3dadd(49.31, 98.44, -30.45, 4.08)
pt3dadd(49.27, 98.49, -30.45, 4.08)
pt3dadd(49.22, 98.59, -30.45, 4.08)
pt3dadd(49.09, 98.74, -30.45, 4.08)
pt3dadd(49.04, 98.79, -30.45, 4.08)
pt3dadd(49, 98.85, -30.45, 4.08)
pt3dadd(49, 99, -30.45, 4.08)
pt3dadd(48.96, 99.05, -30.45, 4.08)
pt3dadd(48.91, 99.1, -30.45, 4.08)
pt3dadd(48.91, 99.2, -30.45, 4.08)
pt3dadd(48.87, 99.3, -30.45, 4.08)
pt3dadd(48.87, 99.4, -30.45, 4.08)
pt3dadd(48.82, 99.5, -30.45, 4.08)
pt3dadd(48.82, 101.02, -30.45, 4.08)
pt3dadd(48.91, 100.62, -28.35, 4.08)
pt3dadd(48.87, 100.72, -28.35, 4.08)
pt3dadd(48.78, 100.77, -28.35, 4.08)
pt3dadd(48.73, 100.87, -28.35, 4.08)
pt3dadd(48.6, 101.02, -28.35, 4.08)
pt3dadd(48.56, 101.07, -28.35, 4.08)
pt3dadd(48.51, 101.12, -28.35, 4.08)
pt3dadd(48.47, 101.18, -28.35, 4.08)
pt3dadd(48.42, 101.22, -28.35, 4.08)
pt3dadd(48.38, 101.32, -28.35, 4.08)
pt3dadd(48.33, 101.38, -28.35, 4.08)
pt3dadd(48.29, 101.43, -28.35, 4.08)
pt3dadd(48.2, 101.48, -28.35, 4.08)
pt3dadd(48.15, 101.53, -28.35, 4.08)
pt3dadd(48.11, 101.58, -28.35, 4.08)
pt3dadd(48.06, 101.63, -28.35, 4.08)
pt3dadd(48.02, 101.68, -28.35, 4.08)
pt3dadd(47.97, 101.78, -28.35, 4.08)
pt3dadd(47.88, 101.83, -28.35, 4.08)
pt3dadd(47.84, 101.88, -28.35, 4.08)
pt3dadd(47.8, 101.99, -28.35, 4.08)
pt3dadd(47.71, 102.04, -28.35, 4.08)
pt3dadd(47.66, 102.08, -28.35, 4.08)
pt3dadd(47.62, 102.19, -28.35, 4.08)
}
}
proc shape3d_66() {
dend[46] { pt3dadd(47.53, 102.19, -28.35, 4.08)
pt3dadd(47.49, 102.24, -28.35, 4.08)
pt3dadd(47.44, 102.29, -28.35, 4.08)
pt3dadd(47.4, 102.34, -28.35, 4.08)
pt3dadd(47.31, 102.39, -28.35, 4.08)
pt3dadd(47.26, 102.44, -28.35, 4.08)
pt3dadd(47.22, 102.49, -28.35, 4.08)
pt3dadd(47.13, 102.49, -28.35, 4.08)
pt3dadd(47.08, 102.54, -28.35, 4.08)
pt3dadd(46.99, 102.64, -28.35, 4.08)
pt3dadd(46.95, 102.69, -28.35, 4.08)
pt3dadd(46.86, 102.75, -28.35, 4.08)
pt3dadd(46.81, 102.79, -28.35, 4.08)
pt3dadd(46.77, 102.85, -28.35, 4.08)
pt3dadd(46.68, 102.95, -28.35, 4.08)
pt3dadd(46.64, 103, -28.35, 4.08)
pt3dadd(46.59, 103.05, -28.35, 4.08)
pt3dadd(46.55, 103.1, -28.35, 4.08)
pt3dadd(46.5, 103.15, -28.35, 4.08)
pt3dadd(46.46, 103.2, -28.35, 4.08)
pt3dadd(46.42, 103.25, -28.35, 4.08)
pt3dadd(46.37, 103.3, -28.35, 4.08)
pt3dadd(46.33, 103.35, -28.35, 4.08)
pt3dadd(46.33, 103.45, -28.35, 4.08)
pt3dadd(46.28, 103.5, -28.35, 4.08)
pt3dadd(46.19, 103.56, -28.35, 4.08)
pt3dadd(46.19, 103.65, -28.35, 4.08)
pt3dadd(46.15, 103.71, -28.35, 4.08)
pt3dadd(46.1, 103.76, -28.35, 4.08)
pt3dadd(46.06, 103.81, -28.35, 4.08)
pt3dadd(46.01, 103.86, -28.35, 4.08)
pt3dadd(46.01, 104.01, -28.35, 4.08)
pt3dadd(45.97, 104.06, -28.35, 4.08)
pt3dadd(45.97, 106.69, -28.35, 4.08)
pt3dadd(45.92, 106.75, -28.35, 4.08)
pt3dadd(45.92, 106.89, -28.35, 4.08)
pt3dadd(45.88, 106.95, -28.35, 4.08)
pt3dadd(45.83, 107.05, -28.35, 4.08)
pt3dadd(45.74, 107.2, -28.35, 4.08)
pt3dadd(45.7, 107.25, -28.35, 4.08)
pt3dadd(45.66, 107.4, -28.35, 4.08)
pt3dadd(45.61, 107.5, -28.35, 4.08)
pt3dadd(45.57, 107.56, -28.35, 4.08)
pt3dadd(45.52, 107.61, -28.35, 4.08)
pt3dadd(45.52, 107.71, -28.35, 4.08)
pt3dadd(45.48, 107.81, -28.35, 4.08)
pt3dadd(45.43, 107.86, -28.35, 4.08)
pt3dadd(45.39, 107.96, -28.35, 4.08)
pt3dadd(45.35, 108.01, -28.35, 4.08)
pt3dadd(45.3, 108.11, -28.35, 4.08)
pt3dadd(45.26, 108.16, -28.35, 4.08)
pt3dadd(45.21, 108.21, -28.35, 4.08)
pt3dadd(45.17, 108.32, -28.35, 4.08)
pt3dadd(45.08, 108.42, -28.35, 4.08)
pt3dadd(45.08, 108.52, -28.35, 4.08)
pt3dadd(45.03, 108.57, -28.35, 4.08)
pt3dadd(44.99, 108.62, -28.35, 4.08)
pt3dadd(44.99, 108.72, -28.35, 4.08)
pt3dadd(44.94, 108.77, -28.35, 4.08)
pt3dadd(44.9, 108.87, -28.35, 4.08)
pt3dadd(44.85, 108.92, -28.35, 4.08)
pt3dadd(44.81, 108.97, -28.35, 4.08)
pt3dadd(44.81, 109.07, -28.35, 4.08)
pt3dadd(44.76, 109.13, -28.35, 4.08)
pt3dadd(44.72, 109.22, -28.35, 4.08)
pt3dadd(44.67, 109.28, -28.35, 4.08)
pt3dadd(44.67, 109.43, -28.35, 4.08)
pt3dadd(44.63, 109.48, -28.35, 4.08)
pt3dadd(44.59, 109.53, -28.35, 4.08)
pt3dadd(44.59, 109.63, -28.35, 4.08)
pt3dadd(44.54, 109.73, -28.35, 4.08)
pt3dadd(44.67, 109.73, -27.3, 3.91)
pt3dadd(43.65, 112.06, -27.3, 3.91)
pt3dadd(43.69, 111.96, -27.3, 3.91)
pt3dadd(43.65, 112.01, -27.3, 3.91)
pt3dadd(43.47, 112.21, -27.3, 3.91)
pt3dadd(43.43, 112.32, -27.3, 3.91)
pt3dadd(43.43, 112.42, -27.3, 3.91)
pt3dadd(43.34, 112.46, -27.3, 3.91)
pt3dadd(43.34, 112.57, -27.3, 3.91)
pt3dadd(43.25, 112.62, -27.3, 3.91)
pt3dadd(43.21, 112.67, -27.3, 3.91)
pt3dadd(43.16, 112.77, -27.3, 3.91)
pt3dadd(43.07, 112.82, -27.3, 3.91)
pt3dadd(43.03, 112.92, -27.3, 3.91)
pt3dadd(42.98, 113.02, -27.3, 3.91)
pt3dadd(42.89, 113.07, -27.3, 3.91)
pt3dadd(42.8, 113.18, -27.3, 3.91)
pt3dadd(42.76, 113.22, -27.3, 3.91)
pt3dadd(42.67, 113.28, -27.3, 3.91)
pt3dadd(42.63, 113.38, -27.3, 3.91)
pt3dadd(42.58, 113.43, -27.3, 3.91)
pt3dadd(42.4, 113.63, -27.3, 3.91)
pt3dadd(42.31, 113.73, -27.3, 3.91)
pt3dadd(42.27, 113.78, -27.3, 3.91)
pt3dadd(42.18, 113.83, -27.3, 3.91)
pt3dadd(42.13, 113.89, -27.3, 3.91)
pt3dadd(42.04, 113.99, -27.3, 3.91)
pt3dadd(41.96, 114.09, -27.3, 3.91)
pt3dadd(41.87, 114.19, -27.3, 3.91)
pt3dadd(41.82, 114.29, -27.3, 3.91)
pt3dadd(41.73, 114.34, -27.3, 3.91)
pt3dadd(41.69, 114.39, -27.3, 3.91)
pt3dadd(41.65, 114.44, -27.3, 3.91)
pt3dadd(41.6, 114.54, -27.3, 3.91)
pt3dadd(41.51, 114.59, -27.3, 3.91)
pt3dadd(41.47, 114.64, -27.3, 3.91)
pt3dadd(41.42, 114.75, -27.3, 3.91)
pt3dadd(41.38, 114.79, -27.3, 3.91)
pt3dadd(41.33, 114.85, -27.3, 3.91)
pt3dadd(41.24, 114.9, -27.3, 3.91)
pt3dadd(41.2, 114.95, -27.3, 3.91)
pt3dadd(41.15, 115, -27.3, 3.91)
pt3dadd(41.11, 115.1, -27.3, 3.91)
pt3dadd(41.06, 115.15, -27.3, 3.91)
pt3dadd(41.02, 115.2, -27.3, 3.91)
pt3dadd(40.93, 115.25, -27.3, 3.91)
pt3dadd(40.88, 115.35, -27.3, 3.91)
pt3dadd(40.84, 115.4, -27.3, 3.91)
pt3dadd(40.75, 115.46, -27.3, 3.91)
pt3dadd(40.71, 115.5, -27.3, 3.91)
pt3dadd(40.66, 115.56, -27.3, 3.91)
pt3dadd(40.62, 115.61, -27.3, 3.91)
pt3dadd(40.44, 115.81, -27.3, 3.91)
pt3dadd(40.4, 115.86, -27.3, 3.91)
pt3dadd(40.35, 115.91, -27.3, 3.91)
pt3dadd(40.31, 115.96, -27.3, 3.91)
pt3dadd(40.22, 116.01, -27.3, 3.91)
pt3dadd(40.13, 116.06, -27.3, 3.91)
pt3dadd(40.08, 116.11, -27.3, 3.91)
pt3dadd(39.99, 116.16, -27.3, 3.91)
pt3dadd(39.9, 116.21, -27.3, 3.91)
pt3dadd(39.86, 116.26, -27.3, 3.91)
pt3dadd(39.77, 116.26, -27.3, 3.91)
pt3dadd(39.68, 116.36, -27.3, 3.91)
pt3dadd(39.59, 116.36, -27.3, 3.91)
pt3dadd(39.55, 116.42, -27.3, 3.91)
pt3dadd(39.46, 116.47, -27.3, 3.91)
pt3dadd(39.33, 116.47, -27.3, 3.91)
pt3dadd(39.28, 116.52, -27.3, 3.91)
pt3dadd(39.24, 116.57, -27.3, 3.91)
pt3dadd(39.1, 116.62, -27.3, 3.91)
pt3dadd(39.01, 116.62, -27.3, 3.91)
pt3dadd(38.97, 116.67, -27.3, 3.91)
pt3dadd(38.88, 116.72, -27.3, 3.91)
pt3dadd(38.79, 116.77, -27.3, 3.91)
pt3dadd(38.66, 116.82, -27.3, 3.91)
pt3dadd(38.61, 116.87, -27.3, 3.91)
pt3dadd(38.57, 116.92, -27.3, 3.91)
pt3dadd(38.52, 116.97, -27.3, 3.91)
pt3dadd(38.44, 117.02, -27.3, 3.91)
pt3dadd(38.39, 117.07, -27.3, 3.91)
pt3dadd(38.35, 117.13, -27.3, 3.91)
pt3dadd(38.3, 117.18, -27.3, 3.91)
pt3dadd(38.21, 117.22, -27.3, 3.91)
pt3dadd(38.17, 117.28, -27.3, 3.91)
pt3dadd(38.12, 117.38, -27.3, 3.91)
pt3dadd(38.08, 117.43, -27.3, 3.91)
pt3dadd(38.03, 117.48, -27.3, 3.91)
pt3dadd(37.94, 117.53, -27.3, 3.91)
pt3dadd(37.9, 117.58, -27.3, 3.91)
pt3dadd(37.85, 117.68, -27.3, 3.91)
pt3dadd(37.76, 117.73, -27.3, 3.91)
pt3dadd(37.72, 117.78, -27.3, 3.91)
pt3dadd(37.67, 117.89, -27.3, 3.91)
pt3dadd(37.54, 118.04, -27.3, 3.91)
pt3dadd(37.5, 118.09, -27.3, 3.91)
pt3dadd(37.37, 118.24, -27.3, 3.91)
pt3dadd(37.32, 118.29, -27.3, 3.91)
pt3dadd(37.28, 118.39, -27.3, 3.91)
pt3dadd(37.23, 118.44, -27.3, 3.91)
pt3dadd(37.14, 118.44, -27.3, 3.91)
pt3dadd(37.1, 118.49, -27.3, 3.91)
pt3dadd(37.05, 118.54, -27.3, 3.91)
pt3dadd(37.01, 118.64, -27.3, 3.91)
pt3dadd(36.92, 118.69, -27.3, 3.91)
pt3dadd(36.87, 118.79, -27.3, 3.91)
pt3dadd(36.78, 118.85, -27.3, 3.91)
pt3dadd(36.69, 118.9, -27.3, 3.91)
pt3dadd(36.61, 118.95, -27.3, 3.91)
pt3dadd(36.56, 119, -27.3, 3.91)
pt3dadd(36.52, 119.05, -27.3, 3.91)
pt3dadd(36.43, 119.05, -27.3, 3.91)
pt3dadd(36.38, 119.1, -27.3, 3.91)
pt3dadd(36.65, 119.05, -26.25, 3.91)
pt3dadd(36.56, 119.15, -26.25, 3.91)
pt3dadd(36.47, 119.2, -26.25, 3.91)
pt3dadd(36.43, 119.35, -26.25, 3.91)
pt3dadd(36.29, 119.5, -26.25, 3.91)
pt3dadd(36.25, 119.61, -26.25, 3.91)
pt3dadd(36.16, 119.71, -26.25, 3.91)
pt3dadd(36.12, 119.76, -26.25, 3.91)
pt3dadd(35.98, 119.91, -26.25, 3.91)
pt3dadd(35.94, 119.96, -26.25, 3.91)
pt3dadd(35.89, 120.06, -26.25, 3.91)
pt3dadd(35.85, 120.11, -26.25, 3.91)
pt3dadd(35.81, 120.16, -26.25, 3.91)
pt3dadd(35.76, 120.21, -26.25, 3.91)
pt3dadd(35.76, 120.32, -26.25, 3.91)
pt3dadd(35.72, 120.36, -26.25, 3.91)
}
}
proc shape3d_67() {
dend[46] { pt3dadd(35.67, 120.42, -26.25, 3.91)
pt3dadd(35.63, 120.52, -26.25, 3.91)
pt3dadd(35.58, 120.62, -26.25, 3.91)
pt3dadd(35.54, 120.72, -26.25, 3.91)
pt3dadd(35.49, 120.82, -26.25, 3.91)
pt3dadd(35.49, 120.92, -26.25, 3.91)
pt3dadd(35.45, 121.07, -26.25, 3.91)
pt3dadd(35.4, 121.13, -26.25, 3.91)
pt3dadd(35.4, 121.33, -26.25, 3.91)
pt3dadd(35.36, 121.38, -26.25, 3.91)
pt3dadd(35.36, 121.43, -26.25, 3.91)
pt3dadd(35.45, 121.23, -26.25, 3.57)
pt3dadd(35.45, 121.33, -26.25, 3.57)
pt3dadd(35.4, 121.38, -26.25, 3.57)
pt3dadd(35.31, 121.48, -26.25, 3.57)
pt3dadd(35.31, 121.58, -26.25, 3.57)
pt3dadd(35.22, 121.68, -26.25, 3.57)
pt3dadd(35.18, 121.78, -26.25, 3.57)
pt3dadd(35.13, 121.89, -26.25, 3.57)
pt3dadd(35.04, 121.93, -26.25, 3.57)
pt3dadd(35, 121.99, -26.25, 3.57)
pt3dadd(34.96, 122.04, -26.25, 3.57)
pt3dadd(34.96, 122.14, -26.25, 3.57)
pt3dadd(34.87, 122.14, -26.25, 3.57)
pt3dadd(34.82, 122.24, -26.25, 3.57)
pt3dadd(34.78, 122.29, -26.25, 3.57)
pt3dadd(34.74, 122.34, -26.25, 3.57)
pt3dadd(34.65, 122.39, -26.25, 3.57)
pt3dadd(34.6, 122.49, -26.25, 3.57)
pt3dadd(34.56, 122.54, -26.25, 3.57)
pt3dadd(34.51, 122.59, -26.25, 3.57)
pt3dadd(34.42, 122.69, -26.25, 3.57)
pt3dadd(34.38, 122.75, -26.25, 3.57)
pt3dadd(34.33, 122.85, -26.25, 3.57)
pt3dadd(34.24, 122.9, -26.25, 3.57)
pt3dadd(34.2, 122.95, -26.25, 3.57)
pt3dadd(34.15, 123.05, -26.25, 3.57)
pt3dadd(34.11, 123.1, -26.25, 3.57)
pt3dadd(34.02, 123.2, -26.25, 3.57)
pt3dadd(33.97, 123.3, -26.25, 3.57)
pt3dadd(33.93, 123.35, -26.25, 3.57)
pt3dadd(33.8, 123.46, -26.25, 3.57)
pt3dadd(33.58, 123.71, -26.25, 3.57)
pt3dadd(33.49, 123.76, -26.25, 3.57)
pt3dadd(33.44, 123.86, -26.25, 3.57)
pt3dadd(33.4, 123.96, -26.25, 3.57)
pt3dadd(33.31, 124.11, -26.25, 3.57)
pt3dadd(33.22, 124.21, -26.25, 3.57)
pt3dadd(33.13, 124.32, -26.25, 3.57)
pt3dadd(33.04, 124.42, -26.25, 3.57)
pt3dadd(32.99, 124.47, -26.25, 3.57)
pt3dadd(32.95, 124.57, -26.25, 3.57)
pt3dadd(32.9, 124.67, -26.25, 3.57)
pt3dadd(32.82, 124.77, -26.25, 3.57)
pt3dadd(32.77, 124.87, -26.25, 3.57)
pt3dadd(32.73, 124.92, -26.25, 3.57)
pt3dadd(32.64, 124.97, -26.25, 3.57)
pt3dadd(32.6, 125.07, -26.25, 3.57)
pt3dadd(32.51, 125.13, -26.25, 3.57)
pt3dadd(32.46, 125.23, -26.25, 3.57)
pt3dadd(32.42, 125.33, -26.25, 3.57)
pt3dadd(32.28, 125.43, -26.25, 3.57)
pt3dadd(32.24, 125.53, -26.25, 3.57)
pt3dadd(32.19, 125.63, -26.25, 3.57)
pt3dadd(32.1, 125.68, -26.25, 3.57)
pt3dadd(32.06, 125.78, -26.25, 3.57)
pt3dadd(31.97, 125.89, -26.25, 3.57)
pt3dadd(31.88, 125.93, -26.25, 3.57)
pt3dadd(31.79, 126.09, -26.25, 3.57)
pt3dadd(31.7, 126.24, -26.25, 3.57)
pt3dadd(31.61, 126.29, -26.25, 3.57)
pt3dadd(31.57, 126.39, -26.25, 3.57)
pt3dadd(31.48, 126.44, -26.25, 3.57)
pt3dadd(31.43, 126.49, -26.25, 3.57)
pt3dadd(31.39, 126.6, -26.25, 3.57)
pt3dadd(31.3, 126.64, -26.25, 3.57)
pt3dadd(31.26, 126.75, -26.25, 3.57)
pt3dadd(31.17, 126.8, -26.25, 3.57)
pt3dadd(31.12, 126.9, -26.25, 3.57)
pt3dadd(31.03, 127, -26.25, 3.57)
pt3dadd(30.94, 127.1, -26.25, 3.57)
pt3dadd(30.94, 127.2, -26.25, 3.57)
pt3dadd(30.85, 127.25, -26.25, 3.57)
pt3dadd(30.81, 127.35, -26.25, 3.57)
pt3dadd(30.72, 127.4, -26.25, 3.57)
pt3dadd(30.68, 127.5, -26.25, 3.57)
pt3dadd(30.63, 127.56, -26.25, 3.57)
pt3dadd(30.59, 127.66, -26.25, 3.57)
pt3dadd(30.54, 127.71, -26.25, 3.57)
pt3dadd(30.5, 127.76, -26.25, 3.57)
pt3dadd(30.41, 127.86, -26.25, 3.57)
pt3dadd(30.36, 127.91, -26.25, 3.57)
pt3dadd(30.32, 128.01, -26.25, 3.57)
pt3dadd(30.19, 128.16, -26.25, 3.57)
pt3dadd(30.14, 128.26, -26.25, 3.57)
pt3dadd(30.05, 128.37, -26.25, 3.57)
pt3dadd(30.01, 128.42, -26.25, 3.57)
pt3dadd(29.96, 128.47, -26.25, 3.57)
pt3dadd(29.92, 128.57, -26.25, 3.57)
pt3dadd(29.88, 128.67, -26.25, 3.57)
pt3dadd(29.83, 128.72, -26.25, 3.57)
pt3dadd(29.78, 128.77, -26.25, 3.57)
pt3dadd(29.78, 128.87, -26.25, 3.57)
pt3dadd(29.74, 128.92, -26.25, 3.57)
pt3dadd(29.69, 128.98, -26.25, 3.57)
pt3dadd(29.69, 129.13, -26.25, 3.57)
pt3dadd(29.65, 129.23, -26.25, 3.57)
pt3dadd(29.61, 129.28, -26.25, 3.57)
pt3dadd(29.61, 129.48, -26.25, 3.57)
pt3dadd(29.56, 129.53, -26.25, 3.57)
pt3dadd(29.56, 129.63, -26.25, 3.57)
pt3dadd(29.52, 129.68, -26.25, 3.57)
pt3dadd(29.47, 129.73, -26.25, 3.57)
pt3dadd(29.47, 129.84, -26.25, 3.57)
pt3dadd(29.43, 129.93, -26.25, 3.57)
pt3dadd(29.39, 129.99, -26.25, 3.57)
pt3dadd(29.39, 130.09, -26.25, 3.57)
pt3dadd(29.34, 130.14, -26.25, 3.57)
pt3dadd(29.3, 130.19, -26.25, 3.57)
pt3dadd(29.3, 130.29, -26.25, 3.57)
pt3dadd(29.25, 130.34, -26.25, 3.57)
pt3dadd(29.25, 130.39, -26.25, 3.57)
pt3dadd(29.34, 130.39, -25.2, 3.57)
pt3dadd(29.3, 130.44, -25.2, 3.57)
pt3dadd(29.25, 130.49, -25.2, 3.57)
pt3dadd(29.2, 130.6, -25.2, 3.57)
pt3dadd(29.16, 130.65, -25.2, 3.57)
pt3dadd(28.94, 130.9, -25.2, 3.57)
pt3dadd(28.85, 131.05, -25.2, 3.57)
pt3dadd(28.76, 131.1, -25.2, 3.57)
pt3dadd(28.72, 131.15, -25.2, 3.57)
pt3dadd(28.67, 131.25, -25.2, 3.57)
pt3dadd(28.63, 131.3, -25.2, 3.57)
pt3dadd(28.58, 131.35, -25.2, 3.57)
pt3dadd(28.49, 131.4, -25.2, 3.57)
pt3dadd(28.45, 131.46, -25.2, 3.57)
pt3dadd(28.4, 131.51, -25.2, 3.57)
pt3dadd(28.32, 131.55, -25.2, 3.57)
pt3dadd(28.23, 131.61, -25.2, 3.57)
pt3dadd(28.18, 131.71, -25.2, 3.57)
pt3dadd(28.09, 131.76, -25.2, 3.57)
pt3dadd(28.05, 131.81, -25.2, 3.57)
pt3dadd(28, 131.86, -25.2, 3.57)
pt3dadd(27.87, 132.01, -25.2, 3.57)
pt3dadd(27.78, 132.06, -25.2, 3.57)
pt3dadd(27.74, 132.11, -25.2, 3.57)
pt3dadd(27.69, 132.21, -25.2, 3.57)
pt3dadd(27.65, 132.26, -25.2, 3.57)
pt3dadd(27.6, 132.32, -25.2, 3.57)
pt3dadd(27.51, 132.37, -25.2, 3.57)
pt3dadd(27.47, 132.47, -25.2, 3.57)
pt3dadd(27.42, 132.52, -25.2, 3.57)
pt3dadd(27.38, 132.57, -25.2, 3.57)
pt3dadd(27.33, 132.67, -25.2, 3.57)
pt3dadd(27.29, 132.72, -25.2, 3.57)
pt3dadd(27.25, 132.77, -25.2, 3.57)
pt3dadd(27.2, 132.82, -25.2, 3.57)
pt3dadd(27.16, 132.87, -25.2, 3.57)
pt3dadd(27.11, 132.92, -25.2, 3.57)
pt3dadd(27.07, 132.98, -25.2, 3.57)
pt3dadd(27.02, 133.07, -25.2, 3.57)
pt3dadd(26.98, 133.13, -25.2, 3.57)
pt3dadd(26.93, 133.18, -25.2, 3.57)
pt3dadd(26.89, 133.28, -25.2, 3.57)
pt3dadd(26.84, 133.33, -25.2, 3.57)
pt3dadd(26.8, 133.43, -25.2, 3.57)
pt3dadd(26.75, 133.53, -25.2, 3.57)
pt3dadd(26.71, 133.58, -25.2, 3.57)
pt3dadd(26.67, 133.68, -25.2, 3.57)
pt3dadd(26.62, 133.79, -25.2, 3.57)
pt3dadd(26.58, 133.88, -25.2, 3.57)
pt3dadd(26.53, 133.99, -25.2, 3.57)
pt3dadd(26.49, 134.04, -25.2, 3.57)
pt3dadd(26.44, 134.19, -25.2, 3.57)
pt3dadd(26.44, 134.34, -25.2, 3.57)
pt3dadd(26.4, 134.39, -25.2, 3.57)
pt3dadd(26.4, 134.49, -25.2, 3.57)
pt3dadd(26.35, 134.54, -25.2, 3.57)
pt3dadd(26.31, 134.6, -25.2, 3.57)
pt3dadd(26.31, 134.75, -25.2, 3.57)
pt3dadd(26.26, 134.8, -25.2, 3.57)
pt3dadd(26.22, 134.9, -25.2, 3.57)
pt3dadd(26.17, 134.95, -25.2, 3.57)
pt3dadd(26.17, 135.05, -25.2, 3.57)
pt3dadd(26.13, 135.1, -25.2, 3.57)
pt3dadd(26.08, 135.15, -25.2, 3.57)
pt3dadd(26.08, 135.25, -25.2, 3.57)
pt3dadd(26.04, 135.3, -25.2, 3.57)
pt3dadd(26, 135.35, -25.2, 3.57)
pt3dadd(25.95, 135.46, -25.2, 3.57)
pt3dadd(25.91, 135.51, -25.2, 3.57)
pt3dadd(25.86, 135.56, -25.2, 3.57)
pt3dadd(25.82, 135.61, -25.2, 3.57)
pt3dadd(25.77, 135.66, -25.2, 3.57)
pt3dadd(25.77, 135.76, -25.2, 3.57)
pt3dadd(25.73, 135.81, -25.2, 3.57)
pt3dadd(25.68, 135.86, -25.2, 3.57)
pt3dadd(25.59, 135.91, -25.2, 3.57)
pt3dadd(25.55, 135.96, -25.2, 3.57)
pt3dadd(25.5, 136.01, -25.2, 3.57)
}
}
proc shape3d_68() {
dend[46] { pt3dadd(25.42, 136.06, -25.2, 3.57)
pt3dadd(25.37, 136.11, -25.2, 3.57)
pt3dadd(25.24, 136.16, -25.2, 3.57)
pt3dadd(25.15, 136.21, -25.2, 3.57)
pt3dadd(25.06, 136.32, -25.2, 3.57)
pt3dadd(24.88, 136.32, -25.2, 3.57)
pt3dadd(24.79, 136.37, -25.2, 3.57)
pt3dadd(24.7, 136.42, -25.2, 3.57)
pt3dadd(24.57, 136.47, -25.2, 3.57)
pt3dadd(24.48, 136.52, -25.2, 3.57)
pt3dadd(24.34, 136.52, -25.2, 3.57)
pt3dadd(24.26, 136.57, -25.2, 3.57)
pt3dadd(24.17, 136.62, -25.2, 3.57)
pt3dadd(24.08, 136.67, -25.2, 3.57)
pt3dadd(23.99, 136.72, -25.2, 3.57)
pt3dadd(23.9, 136.77, -25.2, 3.57)
pt3dadd(23.81, 136.82, -25.2, 3.57)
pt3dadd(23.72, 136.82, -25.2, 3.57)
pt3dadd(23.63, 136.87, -25.2, 3.57)
pt3dadd(23.54, 136.92, -25.2, 3.57)
pt3dadd(23.5, 136.98, -25.2, 3.57)
pt3dadd(23.41, 137.02, -25.2, 3.57)
pt3dadd(23.36, 137.13, -25.2, 3.57)
pt3dadd(23.27, 137.18, -25.2, 3.57)
pt3dadd(23.14, 137.28, -25.2, 3.57)
pt3dadd(23.1, 137.33, -25.2, 3.57)
pt3dadd(23.05, 137.38, -25.2, 3.57)
pt3dadd(23.01, 137.43, -25.2, 3.57)
pt3dadd(22.92, 137.53, -25.2, 3.57)
pt3dadd(22.88, 137.58, -25.2, 3.57)
pt3dadd(22.83, 137.63, -25.2, 3.57)
pt3dadd(22.78, 137.68, -25.2, 3.57)
pt3dadd(22.74, 137.79, -25.2, 3.57)
pt3dadd(22.65, 137.84, -25.2, 3.57)
pt3dadd(22.52, 137.99, -25.2, 3.57)
pt3dadd(22.47, 138.04, -25.2, 3.57)
pt3dadd(22.34, 138.19, -25.2, 3.57)
pt3dadd(22.3, 138.24, -25.2, 3.57)
pt3dadd(22.16, 138.39, -25.2, 3.57)
pt3dadd(22.07, 138.44, -25.2, 3.57)
pt3dadd(22.03, 138.49, -25.2, 3.57)
pt3dadd(21.98, 138.6, -25.2, 3.57)
pt3dadd(21.94, 138.65, -25.2, 3.57)
pt3dadd(21.9, 138.7, -25.2, 3.57)
pt3dadd(21.81, 138.7, -25.2, 3.57)
pt3dadd(21.76, 138.8, -25.2, 3.57)
pt3dadd(21.72, 138.85, -25.2, 3.57)
pt3dadd(21.67, 138.9, -25.2, 3.57)
pt3dadd(21.63, 138.95, -25.2, 3.57)
pt3dadd(21.54, 139, -25.2, 3.57)
pt3dadd(21.49, 139.05, -25.2, 3.57)
pt3dadd(21.4, 139.1, -25.2, 3.57)
pt3dadd(21.27, 139.25, -25.2, 3.57)
pt3dadd(21.23, 139.3, -25.2, 3.57)
pt3dadd(21.09, 139.35, -25.2, 3.57)
pt3dadd(21.05, 139.4, -25.2, 3.57)
pt3dadd(20.96, 139.46, -25.2, 3.57)
pt3dadd(20.87, 139.51, -25.2, 3.57)
pt3dadd(20.78, 139.56, -25.2, 3.57)
pt3dadd(20.74, 139.66, -25.2, 3.57)
pt3dadd(20.65, 139.71, -25.2, 3.57)
pt3dadd(20.56, 139.76, -25.2, 3.57)
pt3dadd(20.47, 139.76, -25.2, 3.57)
pt3dadd(20.38, 139.86, -25.2, 3.57)
pt3dadd(20.25, 139.96, -25.2, 3.57)
pt3dadd(20.16, 139.96, -25.2, 3.57)
pt3dadd(20.07, 140.06, -25.2, 3.57)
pt3dadd(20.02, 140.12, -25.2, 3.57)
pt3dadd(19.98, 140.16, -25.2, 3.57)
pt3dadd(19.89, 140.21, -25.2, 3.57)
pt3dadd(19.84, 140.26, -25.2, 3.57)
pt3dadd(19.8, 140.32, -25.2, 3.57)
pt3dadd(19.75, 140.37, -25.2, 3.57)
pt3dadd(19.67, 140.42, -25.2, 3.57)
pt3dadd(19.62, 140.52, -25.2, 3.57)
pt3dadd(19.53, 140.52, -25.2, 3.57)
pt3dadd(19.49, 140.57, -25.2, 3.57)
pt3dadd(19.44, 140.62, -25.2, 3.57)
pt3dadd(19.35, 140.67, -25.2, 3.57)
pt3dadd(19.31, 140.72, -25.2, 3.57)
pt3dadd(19.26, 140.77, -25.2, 3.57)
pt3dadd(19.17, 140.87, -25.2, 3.57)
pt3dadd(19.13, 140.93, -25.2, 3.57)
pt3dadd(19.08, 140.98, -25.2, 3.57)
pt3dadd(19, 141.02, -25.2, 3.57)
pt3dadd(18.95, 141.07, -25.2, 3.57)
pt3dadd(18.95, 140.87, -30.45, 3.57)
pt3dadd(18.82, 140.87, -30.45, 3.57)
pt3dadd(18.77, 140.93, -30.45, 3.57)
pt3dadd(18.68, 140.93, -30.45, 3.57)
pt3dadd(18.64, 140.98, -30.45, 3.57)
pt3dadd(18.55, 141.02, -30.45, 3.57)
pt3dadd(18.5, 141.07, -30.45, 3.57)
pt3dadd(18.37, 141.07, -30.45, 3.57)
pt3dadd(18.33, 141.13, -30.45, 3.57)
pt3dadd(18.28, 141.18, -30.45, 3.57)
pt3dadd(18.15, 141.18, -30.45, 3.57)
pt3dadd(18.06, 141.28, -30.45, 3.57)
pt3dadd(18.01, 141.33, -30.45, 3.57)
pt3dadd(17.88, 141.38, -30.45, 3.57)
pt3dadd(17.79, 141.43, -30.45, 3.57)
pt3dadd(17.75, 141.48, -30.45, 3.57)
pt3dadd(17.7, 141.53, -30.45, 3.57)
pt3dadd(17.66, 141.58, -30.45, 3.57)
pt3dadd(17.61, 141.68, -30.45, 3.57)
pt3dadd(17.57, 141.74, -30.45, 3.57)
pt3dadd(17.48, 141.79, -30.45, 3.57)
pt3dadd(17.43, 141.84, -30.45, 3.57)
pt3dadd(17.39, 141.88, -30.45, 3.57)
pt3dadd(17.35, 141.99, -30.45, 3.57)
pt3dadd(17.3, 142.04, -30.45, 3.57)
pt3dadd(17.21, 142.14, -30.45, 3.57)
pt3dadd(17.13, 142.24, -30.45, 3.57)
pt3dadd(17.08, 142.34, -30.45, 3.57)
pt3dadd(16.99, 142.39, -30.45, 3.57)
pt3dadd(16.86, 142.54, -30.45, 3.57)
pt3dadd(16.77, 142.65, -30.45, 3.57)
pt3dadd(16.68, 142.7, -30.45, 3.57)
pt3dadd(16.63, 142.8, -30.45, 3.57)
pt3dadd(16.59, 142.85, -30.45, 3.57)
pt3dadd(16.5, 142.95, -30.45, 3.57)
pt3dadd(16.45, 143, -30.45, 3.57)
pt3dadd(16.41, 143.1, -30.45, 3.57)
pt3dadd(16.32, 143.1, -30.45, 3.57)
pt3dadd(16.28, 143.2, -30.45, 3.57)
pt3dadd(16.23, 143.3, -30.45, 3.57)
pt3dadd(16.19, 143.35, -30.45, 3.57)
pt3dadd(16.14, 143.46, -30.45, 3.57)
pt3dadd(16.1, 143.51, -30.45, 3.57)
pt3dadd(16.01, 143.56, -30.45, 3.57)
pt3dadd(15.97, 143.61, -30.45, 3.57)
pt3dadd(15.92, 143.66, -30.45, 3.57)
pt3dadd(15.83, 143.71, -30.45, 3.57)
pt3dadd(15.79, 143.76, -30.45, 3.57)
pt3dadd(15.7, 143.81, -30.45, 3.57)
pt3dadd(13.87, 143.81, -30.45, 3.57)
pt3dadd(14.09, 143.71, -33.6, 3.57)
pt3dadd(14.05, 143.76, -33.6, 3.57)
pt3dadd(13.96, 143.86, -33.6, 3.57)
pt3dadd(13.87, 143.96, -33.6, 3.57)
pt3dadd(13.82, 144.06, -33.6, 3.57)
pt3dadd(13.78, 144.12, -33.6, 3.57)
pt3dadd(13.78, 144.26, -33.6, 3.57)
pt3dadd(13.73, 144.37, -33.6, 3.57)
pt3dadd(13.69, 144.47, -33.6, 3.57)
pt3dadd(13.65, 144.57, -33.6, 3.57)
pt3dadd(13.65, 144.72, -33.6, 3.57)
pt3dadd(13.6, 144.82, -33.6, 3.57)
pt3dadd(13.6, 144.93, -33.6, 3.57)
pt3dadd(13.56, 144.98, -33.6, 3.57)
pt3dadd(13.56, 145.07, -33.6, 3.57)
pt3dadd(13.51, 145.13, -33.6, 3.57)
pt3dadd(13.47, 145.23, -33.6, 3.57)
pt3dadd(13.42, 145.28, -33.6, 3.57)
pt3dadd(13.38, 145.38, -33.6, 3.57)
pt3dadd(13.34, 145.43, -33.6, 3.57)
pt3dadd(13.29, 145.53, -33.6, 3.57)
pt3dadd(13.24, 145.63, -33.6, 3.57)
pt3dadd(13.2, 145.74, -33.6, 3.57)
pt3dadd(13.15, 145.89, -33.6, 3.57)
pt3dadd(13.11, 145.99, -33.6, 3.57)
pt3dadd(13.02, 146.04, -33.6, 3.57)
pt3dadd(13.02, 146.14, -33.6, 3.57)
pt3dadd(12.98, 146.19, -33.6, 3.57)
pt3dadd(12.93, 146.24, -33.6, 3.57)
pt3dadd(12.93, 146.34, -33.6, 3.57)
pt3dadd(12.89, 146.39, -33.6, 3.57)
pt3dadd(12.85, 146.44, -33.6, 3.57)
pt3dadd(12.8, 146.54, -33.6, 3.57)
pt3dadd(12.71, 146.6, -33.6, 3.57)
pt3dadd(12.66, 146.7, -33.6, 3.57)
pt3dadd(12.58, 146.75, -33.6, 3.57)
pt3dadd(12.53, 146.8, -33.6, 3.57)
pt3dadd(12.49, 146.9, -33.6, 3.57)
pt3dadd(12.44, 146.95, -33.6, 3.57)
pt3dadd(12.4, 147, -33.6, 3.57)
pt3dadd(12.35, 147.05, -33.6, 3.57)
pt3dadd(12.31, 147.1, -33.6, 3.57)
pt3dadd(12.27, 147.15, -33.6, 3.57)
pt3dadd(12.22, 147.2, -33.6, 3.57)
pt3dadd(12.18, 147.25, -33.6, 3.57)
pt3dadd(12.13, 147.3, -33.6, 3.57)
pt3dadd(12.09, 147.35, -33.6, 3.57)
pt3dadd(12.04, 147.4, -33.6, 3.57)
pt3dadd(12, 147.46, -33.6, 3.57)
pt3dadd(11.95, 147.51, -33.6, 3.57)
pt3dadd(11.91, 147.61, -33.6, 3.57)
pt3dadd(11.82, 147.66, -33.6, 3.57)
pt3dadd(11.77, 147.71, -33.6, 3.57)
pt3dadd(11.73, 147.76, -33.6, 3.57)
pt3dadd(11.77, 147.61, -37.8, 3.57)
pt3dadd(11.73, 147.66, -37.8, 3.57)
pt3dadd(11.69, 147.76, -37.8, 3.57)
pt3dadd(11.64, 147.81, -37.8, 3.57)
pt3dadd(11.6, 147.86, -37.8, 3.57)
pt3dadd(11.51, 147.91, -37.8, 3.57)
pt3dadd(11.46, 147.96, -37.8, 3.57)
pt3dadd(11.42, 148.06, -37.8, 3.57)
pt3dadd(11.37, 148.12, -37.8, 3.57)
pt3dadd(11.33, 148.16, -37.8, 3.57)
}
}
proc shape3d_69() {
dend[46] { pt3dadd(11.24, 148.21, -37.8, 3.57)
pt3dadd(11.19, 148.27, -37.8, 3.57)
pt3dadd(11.1, 148.27, -37.8, 3.57)
pt3dadd(11.06, 148.32, -37.8, 3.57)
pt3dadd(11.02, 148.37, -37.8, 3.57)
pt3dadd(10.93, 148.37, -37.8, 3.57)
pt3dadd(10.88, 148.42, -37.8, 3.57)
pt3dadd(10.79, 148.47, -37.8, 3.57)
pt3dadd(10.7, 148.47, -37.8, 3.57)
pt3dadd(10.61, 148.52, -37.8, 3.57)
pt3dadd(10.44, 148.52, -37.8, 3.57)
pt3dadd(10.35, 148.57, -37.8, 3.57)
pt3dadd(8.39, 148.57, -37.8, 3.57)
pt3dadd(8.3, 148.62, -37.8, 3.57)
pt3dadd(8.03, 148.62, -37.8, 3.57)
pt3dadd(7.99, 148.67, -37.8, 3.57)
pt3dadd(7.76, 148.67, -37.8, 3.57)
pt3dadd(7.67, 148.72, -37.8, 3.57)
pt3dadd(7.49, 148.72, -37.8, 3.57)
pt3dadd(7.36, 148.77, -37.8, 3.57)
pt3dadd(7.23, 148.82, -37.8, 3.57)
pt3dadd(7.09, 148.82, -37.8, 3.57)
pt3dadd(7.05, 148.88, -37.8, 3.57)
pt3dadd(6.96, 148.93, -37.8, 3.57)
pt3dadd(6.91, 148.98, -37.8, 3.57)
pt3dadd(6.82, 148.98, -37.8, 3.57)
pt3dadd(6.78, 149.02, -37.8, 3.57)
pt3dadd(6.69, 149.08, -37.8, 3.57)
pt3dadd(6.56, 149.18, -37.8, 3.57)
pt3dadd(6.47, 149.28, -37.8, 3.57)
pt3dadd(6.38, 149.33, -37.8, 3.57)
pt3dadd(6.29, 149.38, -37.8, 3.57)
pt3dadd(6.2, 149.43, -37.8, 3.57)
pt3dadd(6.16, 149.48, -37.8, 3.57)
pt3dadd(6.07, 149.53, -37.8, 3.57)
pt3dadd(6.02, 149.63, -37.8, 3.57)
pt3dadd(5.93, 149.63, -37.8, 3.57)
pt3dadd(5.89, 149.74, -37.8, 3.57)
pt3dadd(5.8, 149.74, -37.8, 3.57)
pt3dadd(5.76, 149.84, -37.8, 3.57)
pt3dadd(5.66, 149.89, -37.8, 3.57)
pt3dadd(5.62, 149.94, -37.8, 3.57)
pt3dadd(5.58, 149.99, -37.8, 3.57)
pt3dadd(5.49, 150.04, -37.8, 3.57)
pt3dadd(5.44, 150.09, -37.8, 3.57)
pt3dadd(5.4, 150.14, -37.8, 3.57)
pt3dadd(5.31, 150.19, -37.8, 3.57)
pt3dadd(5.26, 150.24, -37.8, 3.57)
pt3dadd(5.18, 150.29, -37.8, 3.57)
pt3dadd(5.13, 150.34, -37.8, 3.57)
pt3dadd(5.09, 150.39, -37.8, 3.57)
pt3dadd(5.04, 150.44, -37.8, 3.57)
pt3dadd(4.95, 150.49, -37.8, 3.57)
pt3dadd(4.91, 150.54, -37.8, 3.57)
pt3dadd(4.86, 150.65, -37.8, 3.57)
pt3dadd(4.78, 150.7, -37.8, 3.57)
pt3dadd(4.73, 150.8, -37.8, 3.57)
pt3dadd(4.64, 150.85, -37.8, 3.57)
pt3dadd(4.59, 150.9, -37.8, 3.57)
pt3dadd(4.51, 150.95, -37.8, 3.57)
pt3dadd(4.46, 151.05, -37.8, 3.57)
pt3dadd(4.42, 151.1, -37.8, 3.57)
pt3dadd(4.33, 151.15, -37.8, 3.57)
pt3dadd(4.28, 151.26, -37.8, 3.57)
pt3dadd(4.2, 151.3, -37.8, 3.57)
pt3dadd(4.15, 151.46, -37.8, 3.57)
pt3dadd(4.06, 151.51, -37.8, 3.57)
pt3dadd(4.02, 151.61, -37.8, 3.57)
pt3dadd(3.97, 151.71, -37.8, 3.57)
pt3dadd(3.93, 151.81, -37.8, 3.57)
pt3dadd(3.88, 151.96, -37.8, 3.57)
pt3dadd(3.84, 152.01, -37.8, 3.57)
pt3dadd(3.84, 152.32, -37.8, 3.57)
pt3dadd(3.79, 152.42, -37.8, 3.57)
pt3dadd(3.79, 156.57, -37.8, 3.57)
pt3dadd(3.75, 156.62, -37.8, 3.57)
pt3dadd(3.7, 156.67, -37.8, 3.57)
pt3dadd(3.7, 156.77, -37.8, 3.57)
pt3dadd(3.66, 156.82, -37.8, 3.57)
pt3dadd(3.62, 156.88, -37.8, 3.57)
pt3dadd(3.57, 156.93, -37.8, 3.57)
pt3dadd(3.57, 157.03, -37.8, 3.57)
pt3dadd(3.53, 157.08, -37.8, 3.57)
pt3dadd(3.48, 157.13, -37.8, 3.57)
pt3dadd(3.44, 157.18, -37.8, 3.57)
pt3dadd(3.39, 157.23, -37.8, 3.57)
pt3dadd(3.35, 157.28, -37.8, 3.57)
pt3dadd(3.35, 157.38, -37.8, 3.57)
pt3dadd(3.3, 157.43, -37.8, 3.57)
pt3dadd(3.21, 157.48, -37.8, 3.57)
pt3dadd(3.17, 157.58, -37.8, 3.57)
pt3dadd(3.13, 157.63, -37.8, 3.57)
pt3dadd(3.08, 157.68, -37.8, 3.57)
pt3dadd(3.04, 157.74, -37.8, 3.57)
pt3dadd(2.99, 157.84, -37.8, 3.57)
pt3dadd(2.95, 157.89, -37.8, 3.57)
pt3dadd(2.9, 157.94, -37.8, 3.57)
pt3dadd(2.86, 158.04, -37.8, 3.57)
pt3dadd(2.81, 158.09, -37.8, 3.57)
pt3dadd(2.77, 158.14, -37.8, 3.57)
pt3dadd(2.72, 158.19, -37.8, 3.57)
pt3dadd(2.72, 158.29, -37.8, 3.57)
pt3dadd(2.68, 158.34, -37.8, 3.57)
pt3dadd(2.63, 158.39, -37.8, 3.57)
pt3dadd(2.77, 158.24, -38.85, 3.57)
pt3dadd(2.72, 158.34, -38.85, 3.57)
pt3dadd(2.68, 158.39, -38.85, 3.57)
pt3dadd(2.63, 158.49, -38.85, 3.57)
pt3dadd(2.59, 158.65, -38.85, 3.57)
pt3dadd(2.5, 158.8, -38.85, 3.57)
pt3dadd(2.5, 158.9, -38.85, 3.57)
pt3dadd(2.41, 159.1, -38.85, 3.57)
pt3dadd(2.37, 159.21, -38.85, 3.57)
pt3dadd(2.28, 159.41, -38.85, 3.57)
pt3dadd(2.23, 159.51, -38.85, 3.57)
pt3dadd(2.19, 159.56, -38.85, 3.57)
pt3dadd(2.14, 159.71, -38.85, 3.57)
pt3dadd(2.14, 159.91, -38.85, 3.57)
pt3dadd(2.1, 160.01, -38.85, 3.57)
pt3dadd(2.1, 160.22, -38.85, 3.57)
pt3dadd(2.06, 160.37, -38.85, 3.57)
pt3dadd(2.06, 160.47, -38.85, 3.57)
pt3dadd(2.01, 160.57, -38.85, 3.57)
pt3dadd(1.97, 160.67, -38.85, 3.57)
pt3dadd(1.97, 160.88, -38.85, 3.57)
pt3dadd(1.92, 160.98, -38.85, 3.57)
pt3dadd(1.88, 161.08, -38.85, 3.57)
pt3dadd(1.88, 161.28, -38.85, 3.57)
pt3dadd(1.83, 161.33, -38.85, 3.57)
pt3dadd(1.79, 161.43, -38.85, 3.57)
pt3dadd(1.79, 161.63, -38.85, 3.57)
pt3dadd(1.74, 161.79, -38.85, 3.57)
pt3dadd(1.7, 161.89, -38.85, 3.57)
pt3dadd(1.7, 162.04, -38.85, 3.57)
pt3dadd(1.65, 162.14, -38.85, 3.57)
pt3dadd(1.65, 162.34, -38.85, 3.57)
pt3dadd(1.61, 162.4, -38.85, 3.57)
pt3dadd(1.61, 162.54, -38.85, 3.57)
pt3dadd(1.57, 162.6, -38.85, 3.57)
pt3dadd(1.57, 162.75, -38.85, 3.57)
pt3dadd(1.52, 162.85, -38.85, 3.57)
pt3dadd(1.52, 162.95, -38.85, 3.57)
pt3dadd(1.48, 163.05, -38.85, 3.57)
pt3dadd(1.48, 163.15, -38.85, 3.57)
pt3dadd(1.43, 163.26, -38.85, 3.57)
pt3dadd(1.39, 163.35, -38.85, 3.57)
pt3dadd(1.34, 163.46, -38.85, 3.57)
pt3dadd(1.3, 163.61, -38.85, 3.57)
pt3dadd(1.25, 163.71, -38.85, 3.57)
pt3dadd(1.12, 163.96, -38.85, 3.57)
pt3dadd(1.08, 164.07, -38.85, 3.57)
pt3dadd(1.03, 164.16, -38.85, 3.57)
pt3dadd(0.99, 164.27, -38.85, 3.57)
pt3dadd(0.89, 164.32, -38.85, 3.57)
pt3dadd(0.85, 164.42, -38.85, 3.57)
pt3dadd(0.81, 164.47, -38.85, 3.57)
pt3dadd(0.76, 164.57, -38.85, 3.57)
pt3dadd(0.72, 164.62, -38.85, 3.57)
pt3dadd(0.67, 164.72, -38.85, 3.57)
pt3dadd(0.63, 164.77, -38.85, 3.57)
pt3dadd(0.58, 164.82, -38.85, 3.57)
pt3dadd(0.54, 164.93, -38.85, 3.57)
pt3dadd(0.5, 164.98, -38.85, 3.57)
pt3dadd(0.45, 165.03, -38.85, 3.57)
pt3dadd(0.41, 165.08, -38.85, 3.57)
pt3dadd(0.36, 165.13, -38.85, 3.57)
pt3dadd(0.32, 165.18, -38.85, 3.57)
pt3dadd(0.27, 165.28, -38.85, 3.57)
pt3dadd(0.23, 165.33, -38.85, 3.57)
pt3dadd(0.18, 165.38, -38.85, 3.57)
pt3dadd(0.18, 165.48, -38.85, 3.57)
pt3dadd(0.14, 165.53, -38.85, 3.57)
pt3dadd(0.09, 165.59, -38.85, 3.57)
pt3dadd(0.05, 165.63, -38.85, 3.57)
pt3dadd(0, 165.68, -38.85, 3.57)
pt3dadd(0, 165.79, -38.85, 3.57)
pt3dadd(-0.04, 165.84, -38.85, 3.57)
pt3dadd(-0.09, 165.89, -38.85, 3.57)
pt3dadd(-0.13, 165.94, -38.85, 3.57)
pt3dadd(-0.17, 166.04, -38.85, 3.57)
pt3dadd(-0.22, 166.09, -38.85, 3.57)
pt3dadd(-0.26, 166.19, -38.85, 3.57)
pt3dadd(-0.31, 166.29, -38.85, 3.57)
pt3dadd(-0.35, 166.34, -38.85, 3.57)
pt3dadd(-0.44, 166.45, -38.85, 3.57)
pt3dadd(-0.53, 166.6, -38.85, 3.57)
pt3dadd(-0.57, 166.65, -38.85, 3.57)
pt3dadd(-0.62, 166.75, -38.85, 3.57)
pt3dadd(-0.67, 166.8, -38.85, 3.57)
pt3dadd(-0.71, 166.85, -38.85, 3.57)
pt3dadd(-0.75, 166.95, -38.85, 3.57)
pt3dadd(-0.8, 167, -38.85, 3.57)
pt3dadd(-0.84, 167.05, -38.85, 3.57)
pt3dadd(-0.84, 167.15, -38.85, 3.57)
pt3dadd(-0.89, 167.21, -38.85, 3.57)
pt3dadd(-0.93, 167.26, -38.85, 3.57)
pt3dadd(-0.98, 167.3, -38.85, 3.57)
pt3dadd(-0.98, 167.46, -38.85, 3.57)
pt3dadd(-1.02, 167.51, -38.85, 3.57)
pt3dadd(-1.02, 167.61, -38.85, 3.57)
}
}
proc shape3d_70() {
dend[46] { pt3dadd(-1.07, 167.66, -38.85, 3.57)
pt3dadd(-1.07, 167.76, -38.85, 3.57)
pt3dadd(-1.11, 167.81, -38.85, 3.57)
pt3dadd(-1.15, 167.91, -38.85, 3.57)
pt3dadd(-1.2, 168.01, -38.85, 3.57)
pt3dadd(-1.2, 168.12, -38.85, 3.57)
pt3dadd(-1.25, 168.27, -38.85, 3.57)
pt3dadd(-1.29, 168.32, -38.85, 3.57)
pt3dadd(-1.29, 168.42, -38.85, 3.57)
pt3dadd(-1.33, 168.47, -38.85, 3.57)
pt3dadd(-1.33, 168.57, -38.85, 3.57)
pt3dadd(-1.38, 168.62, -38.85, 3.57)
pt3dadd(-1.38, 168.72, -38.85, 3.57)
pt3dadd(-1.42, 168.72, -38.85, 3.57)
pt3dadd(-1.29, 168.32, -33.6, 3.4)
pt3dadd(-1.29, 168.47, -33.6, 3.4)
pt3dadd(-1.33, 168.57, -33.6, 3.4)
pt3dadd(-1.33, 168.67, -33.6, 3.4)
pt3dadd(-1.38, 168.82, -33.6, 3.4)
pt3dadd(-1.38, 171.36, -33.6, 3.4)
pt3dadd(-1.33, 171.41, -33.6, 3.4)
pt3dadd(-1.33, 171.56, -33.6, 3.4)
pt3dadd(-1.29, 171.61, -33.6, 3.4)
pt3dadd(-1.29, 171.81, -33.6, 3.4)
pt3dadd(-1.25, 171.86, -33.6, 3.4)
pt3dadd(-1.25, 172.47, -33.6, 3.4)
pt3dadd(-1.2, 172.57, -33.6, 3.4)
pt3dadd(-1.2, 172.67, -33.6, 3.4)
pt3dadd(-1.15, 172.77, -33.6, 3.4)
pt3dadd(-1.15, 172.98, -33.6, 3.4)
pt3dadd(-1.11, 173.03, -33.6, 3.4)
pt3dadd(-1.07, 173.08, -33.6, 3.4)
pt3dadd(-1.02, 173.18, -33.6, 3.4)
pt3dadd(-0.98, 173.28, -33.6, 3.4)
pt3dadd(-0.93, 173.38, -33.6, 3.4)
pt3dadd(-0.89, 173.48, -33.6, 3.4)
pt3dadd(-0.84, 173.54, -33.6, 3.4)
pt3dadd(-0.8, 173.63, -33.6, 3.4)
pt3dadd(-0.75, 173.74, -33.6, 3.4)
pt3dadd(-0.71, 173.84, -33.6, 3.4)
pt3dadd(-0.71, 173.99, -33.6, 3.4)
pt3dadd(-0.67, 174.04, -33.6, 3.4)
pt3dadd(-0.67, 174.14, -33.6, 3.4)
pt3dadd(-0.62, 174.19, -33.6, 3.4)
pt3dadd(-0.57, 174.24, -33.6, 3.4)
pt3dadd(-0.53, 174.35, -33.6, 3.4)
pt3dadd(-0.53, 174.45, -33.6, 3.4)
pt3dadd(-0.49, 174.49, -33.6, 3.4)
pt3dadd(-0.44, 174.55, -33.6, 3.4)
pt3dadd(-0.4, 174.6, -33.6, 3.4)
pt3dadd(-0.35, 174.7, -33.6, 3.4)
pt3dadd(-0.31, 174.75, -33.6, 3.4)
pt3dadd(-0.31, 174.85, -33.6, 3.4)
pt3dadd(-0.26, 174.9, -33.6, 3.4)
pt3dadd(-0.22, 175, -33.6, 3.4)
pt3dadd(-0.17, 175.1, -33.6, 3.4)
pt3dadd(-0.13, 175.21, -33.6, 3.4)
pt3dadd(-0.13, 175.36, -33.6, 3.4)
pt3dadd(-0.09, 175.41, -33.6, 3.4)
pt3dadd(-0.04, 175.46, -33.6, 3.4)
pt3dadd(-0.04, 175.76, -33.6, 3.4)
pt3dadd(0, 175.81, -33.6, 3.4)
pt3dadd(0.05, 175.86, -33.6, 3.4)
pt3dadd(0.05, 176.27, -33.6, 3.4)
pt3dadd(0.09, 175.71, -33.6, 3.06)
pt3dadd(0.09, 177.18, -33.6, 3.06)
pt3dadd(0.14, 177.23, -33.6, 3.06)
pt3dadd(0.18, 177.33, -33.6, 3.06)
pt3dadd(0.18, 177.79, -33.6, 3.06)
pt3dadd(0.23, 177.89, -33.6, 3.06)
pt3dadd(0.27, 177.94, -33.6, 3.06)
pt3dadd(0.27, 178.09, -33.6, 3.06)
pt3dadd(0.32, 178.14, -33.6, 3.06)
pt3dadd(0.36, 178.19, -33.6, 3.06)
pt3dadd(0.36, 178.29, -33.6, 3.06)
pt3dadd(0.67, 178.65, -33.6, 3.06)
pt3dadd(0.72, 178.7, -33.6, 3.06)
pt3dadd(0.81, 178.8, -33.6, 3.06)
pt3dadd(0.85, 178.85, -33.6, 3.06)
pt3dadd(0.89, 178.9, -33.6, 3.06)
pt3dadd(0.94, 179, -33.6, 3.06)
pt3dadd(0.99, 179.1, -33.6, 3.06)
pt3dadd(1.03, 179.15, -33.6, 3.06)
pt3dadd(1.08, 179.26, -33.6, 3.06)
pt3dadd(1.12, 179.31, -33.6, 3.06)
pt3dadd(1.16, 179.36, -33.6, 3.06)
pt3dadd(1.21, 179.46, -33.6, 3.06)
pt3dadd(1.25, 179.56, -33.6, 3.06)
pt3dadd(1.39, 179.61, -33.6, 3.06)
pt3dadd(1.43, 179.66, -33.6, 3.06)
pt3dadd(1.52, 179.76, -33.6, 3.06)
pt3dadd(1.57, 179.81, -33.6, 3.06)
pt3dadd(1.61, 179.91, -33.6, 3.06)
pt3dadd(1.7, 180.01, -33.6, 3.06)
pt3dadd(1.79, 180.07, -33.6, 3.06)
pt3dadd(1.83, 180.12, -33.6, 3.06)
pt3dadd(1.88, 180.22, -33.6, 3.06)
pt3dadd(1.97, 180.22, -33.6, 3.06)
pt3dadd(2.01, 180.32, -33.6, 3.06)
pt3dadd(2.06, 180.37, -33.6, 3.06)
pt3dadd(2.06, 180.47, -33.6, 3.06)
pt3dadd(2.1, 180.52, -33.6, 3.06)
pt3dadd(2.14, 180.62, -33.6, 3.06)
pt3dadd(2.14, 180.73, -33.6, 3.06)
pt3dadd(2.19, 180.82, -33.6, 3.06)
pt3dadd(2.23, 180.93, -33.6, 3.06)
pt3dadd(2.23, 181.03, -33.6, 3.06)
pt3dadd(2.28, 181.08, -33.6, 3.06)
pt3dadd(2.32, 181.18, -33.6, 3.06)
pt3dadd(2.37, 181.23, -33.6, 3.06)
pt3dadd(2.37, 181.38, -33.6, 3.06)
pt3dadd(2.41, 181.49, -33.6, 3.06)
pt3dadd(2.46, 181.54, -33.6, 3.06)
pt3dadd(2.5, 181.59, -33.6, 3.06)
pt3dadd(2.59, 181.69, -33.6, 3.06)
pt3dadd(2.63, 181.79, -33.6, 3.06)
pt3dadd(2.81, 181.99, -33.6, 3.06)
pt3dadd(2.86, 182.04, -33.6, 3.06)
pt3dadd(2.9, 182.09, -33.6, 3.06)
pt3dadd(2.99, 182.14, -33.6, 3.06)
pt3dadd(3.08, 182.19, -33.6, 3.06)
pt3dadd(3.13, 182.24, -33.6, 3.06)
pt3dadd(3.17, 182.29, -33.6, 3.06)
pt3dadd(3.21, 182.35, -33.6, 3.06)
pt3dadd(3.3, 182.4, -33.6, 3.06)
pt3dadd(3.35, 182.45, -33.6, 3.06)
pt3dadd(3.44, 182.5, -33.6, 3.06)
pt3dadd(3.53, 182.5, -33.6, 3.06)
pt3dadd(3.57, 182.55, -33.6, 3.06)
pt3dadd(3.66, 182.6, -33.6, 3.06)
pt3dadd(3.75, 182.65, -33.6, 3.06)
pt3dadd(3.84, 182.65, -33.6, 3.06)
pt3dadd(3.88, 182.7, -33.6, 3.06)
pt3dadd(3.97, 182.75, -33.6, 3.06)
pt3dadd(4.11, 182.75, -33.6, 3.06)
pt3dadd(4.15, 182.8, -33.6, 3.06)
pt3dadd(4.28, 182.8, -33.6, 3.06)
pt3dadd(4.33, 182.85, -33.6, 3.06)
pt3dadd(4.42, 182.9, -33.6, 3.06)
pt3dadd(4.55, 182.9, -33.6, 3.06)
pt3dadd(4.64, 182.95, -33.6, 3.06)
pt3dadd(4.73, 183, -33.6, 3.06)
pt3dadd(4.82, 183, -33.6, 3.06)
pt3dadd(4.86, 183.05, -33.6, 3.06)
pt3dadd(4.95, 183.1, -33.6, 3.06)
pt3dadd(5.04, 183.1, -33.6, 3.06)
pt3dadd(5.13, 183.15, -33.6, 3.06)
pt3dadd(5.22, 183.21, -33.6, 3.06)
pt3dadd(5.31, 183.26, -33.6, 3.06)
pt3dadd(5.44, 183.26, -33.6, 3.06)
pt3dadd(5.53, 183.31, -33.6, 3.06)
pt3dadd(5.62, 183.36, -33.6, 3.06)
pt3dadd(5.71, 183.41, -33.6, 3.06)
pt3dadd(5.8, 183.41, -33.6, 3.06)
pt3dadd(5.89, 183.46, -33.6, 3.06)
pt3dadd(5.98, 183.51, -33.6, 3.06)
pt3dadd(6.11, 183.51, -33.6, 3.06)
pt3dadd(6.16, 183.56, -33.6, 3.06)
pt3dadd(6.24, 183.61, -33.6, 3.06)
pt3dadd(6.38, 183.61, -33.6, 3.06)
pt3dadd(6.47, 183.66, -33.6, 3.06)
pt3dadd(6.56, 183.71, -33.6, 3.06)
pt3dadd(6.6, 183.76, -33.6, 3.06)
pt3dadd(6.69, 183.76, -33.6, 3.06)
pt3dadd(6.78, 183.81, -33.6, 3.06)
pt3dadd(6.82, 183.87, -33.6, 3.06)
pt3dadd(6.96, 183.87, -33.6, 3.06)
pt3dadd(7, 183.91, -33.6, 3.06)
pt3dadd(7.09, 183.96, -33.6, 3.06)
pt3dadd(7.18, 184.01, -33.6, 3.06)
pt3dadd(7.27, 184.01, -33.6, 3.06)
pt3dadd(7.32, 184.07, -33.6, 3.06)
pt3dadd(7.45, 184.12, -33.6, 3.06)
pt3dadd(7.54, 184.17, -33.6, 3.06)
pt3dadd(7.63, 184.22, -33.6, 3.06)
pt3dadd(7.76, 184.27, -33.6, 3.06)
pt3dadd(7.8, 184.32, -33.6, 3.06)
pt3dadd(7.89, 184.37, -33.6, 3.06)
pt3dadd(7.94, 184.42, -33.6, 3.06)
pt3dadd(8.03, 184.47, -33.6, 3.06)
pt3dadd(8.12, 184.52, -33.6, 3.06)
pt3dadd(8.21, 184.57, -33.6, 3.06)
pt3dadd(8.3, 184.62, -33.6, 3.06)
pt3dadd(8.34, 184.68, -33.6, 3.06)
pt3dadd(8.43, 184.68, -33.6, 3.06)
pt3dadd(8.48, 184.73, -33.6, 3.06)
pt3dadd(8.56, 184.77, -33.6, 3.06)
pt3dadd(8.65, 184.82, -33.6, 3.06)
pt3dadd(8.7, 184.93, -33.6, 3.06)
pt3dadd(8.79, 184.98, -33.6, 3.06)
pt3dadd(8.83, 185.03, -33.6, 3.06)
pt3dadd(8.97, 185.08, -33.6, 3.06)
pt3dadd(9.01, 185.13, -33.6, 3.06)
pt3dadd(9.06, 185.18, -33.6, 3.06)
pt3dadd(9.1, 185.23, -33.6, 3.06)
pt3dadd(15.46, 192.74, -33.6, 3.06)
pt3dadd(15.31, 192.74, -33.6, 3.06)
pt3dadd(16.78, 205.7, -33.6, 3.06)
pt3dadd(9.17, 216.01, -33.6, 3.06)
pt3dadd(12.24, 212.68, -33.6, 3.06)
}
}
proc shape3d_71() {
dend[46] { pt3dadd(17.22, 203.71, -33.6, 3.06)
pt3dadd(16.92, 203.71, -33.6, 3.06)
pt3dadd(15.46, 193.24, -33.6, 3.06)
pt3dadd(9.14, 185.23, -33.6, 3.06)
}
dend[47] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(-7.91, -90.04, -17, 1.7)
pt3dadd(-7.78, -89.54, -98.9, 2.55)
}
dend[48] {pt3dclear()
pt3dadd(-7.78, -89.54, -98.9, 2.55)
pt3dadd(-7.99, -89.9, -98.9, 2.55)
pt3dadd(-8.08, -90, -98.9, 2.55)
pt3dadd(-8.22, -90.15, -98.9, 2.55)
pt3dadd(-8.35, -90.3, -98.9, 2.55)
pt3dadd(-8.44, -90.4, -98.9, 2.55)
pt3dadd(-8.48, -90.46, -98.9, 2.55)
pt3dadd(-8.57, -90.46, -98.9, 2.55)
pt3dadd(-8.62, -90.5, -98.9, 2.55)
pt3dadd(-8.66, -90.46, -98.9, 2.55)
pt3dadd(-9.44, -92.46, -98.9, 2.55)
pt3dadd(-8.44, -90.4, -99.95, 2.55)
pt3dadd(-8.44, -90.5, -99.95, 2.55)
pt3dadd(-8.48, -90.56, -99.95, 2.55)
pt3dadd(-8.53, -90.61, -99.95, 2.55)
pt3dadd(-8.57, -90.66, -99.95, 2.55)
pt3dadd(-8.62, -90.71, -99.95, 2.55)
pt3dadd(-8.66, -90.76, -99.95, 2.55)
pt3dadd(-8.71, -90.81, -99.95, 2.55)
pt3dadd(-8.75, -90.86, -99.95, 2.55)
pt3dadd(-8.84, -90.91, -99.95, 2.55)
pt3dadd(-8.89, -91.01, -99.95, 2.55)
pt3dadd(-8.93, -91.11, -99.95, 2.55)
pt3dadd(-8.98, -91.16, -99.95, 2.55)
pt3dadd(-9.02, -91.21, -99.95, 2.55)
pt3dadd(-9.06, -91.32, -99.95, 2.55)
pt3dadd(-9.15, -91.42, -99.95, 2.55)
pt3dadd(-9.24, -91.57, -99.95, 2.55)
pt3dadd(-9.33, -91.67, -99.95, 2.55)
pt3dadd(-9.38, -91.72, -99.95, 2.55)
pt3dadd(-9.42, -91.77, -99.95, 2.55)
pt3dadd(-9.47, -91.87, -99.95, 2.55)
pt3dadd(-9.51, -91.92, -99.95, 2.55)
pt3dadd(-9.55, -92.02, -99.95, 2.55)
pt3dadd(-9.64, -92.13, -99.95, 2.55)
pt3dadd(-9.69, -92.22, -99.95, 2.55)
pt3dadd(-9.73, -92.28, -99.95, 2.55)
pt3dadd(-9.77, -92.38, -99.95, 2.55)
pt3dadd(-9.86, -92.53, -99.95, 2.55)
pt3dadd(-9.91, -92.58, -99.95, 2.55)
pt3dadd(-9.95, -92.68, -99.95, 2.55)
pt3dadd(-10, -92.78, -99.95, 2.55)
pt3dadd(-10.04, -92.89, -99.95, 2.55)
pt3dadd(-10.09, -92.93, -99.95, 2.55)
pt3dadd(-10.18, -93.09, -99.95, 2.55)
pt3dadd(-10.22, -93.19, -99.95, 2.55)
pt3dadd(-10.27, -93.29, -99.95, 2.55)
pt3dadd(-10.31, -93.39, -99.95, 2.55)
pt3dadd(-10.35, -93.44, -99.95, 2.55)
pt3dadd(-10.4, -93.54, -99.95, 2.55)
pt3dadd(-10.49, -93.64, -99.95, 2.55)
pt3dadd(-10.53, -93.69, -99.95, 2.55)
pt3dadd(-10.58, -93.75, -99.95, 2.55)
pt3dadd(-10.53, -93.64, -103.1, 2.55)
pt3dadd(-10.53, -93.75, -103.1, 2.55)
pt3dadd(-10.58, -93.79, -103.1, 2.55)
pt3dadd(-10.62, -93.9, -103.1, 2.55)
pt3dadd(-10.67, -93.95, -103.1, 2.55)
pt3dadd(-10.71, -94, -103.1, 2.55)
pt3dadd(-10.71, -94.1, -103.1, 2.55)
pt3dadd(-10.76, -94.2, -103.1, 2.55)
pt3dadd(-10.8, -94.3, -103.1, 2.55)
pt3dadd(-10.85, -94.4, -103.1, 2.55)
pt3dadd(-10.85, -94.5, -103.1, 2.55)
pt3dadd(-10.89, -94.56, -103.1, 2.55)
pt3dadd(-10.94, -94.66, -103.1, 2.55)
pt3dadd(-10.98, -94.76, -103.1, 2.55)
pt3dadd(-11.02, -94.81, -103.1, 2.55)
pt3dadd(-11.11, -94.86, -103.1, 2.55)
pt3dadd(-11.16, -95.01, -103.1, 2.55)
pt3dadd(-11.2, -95.11, -103.1, 2.55)
pt3dadd(-11.29, -95.21, -103.1, 2.55)
pt3dadd(-11.34, -95.32, -103.1, 2.55)
pt3dadd(-11.43, -95.42, -103.1, 2.55)
pt3dadd(-11.52, -95.47, -103.1, 2.55)
pt3dadd(-11.56, -95.62, -103.1, 2.55)
pt3dadd(-11.6, -95.72, -103.1, 2.55)
pt3dadd(-11.69, -95.77, -103.1, 2.55)
pt3dadd(-11.74, -95.87, -103.1, 2.55)
pt3dadd(-11.78, -95.97, -103.1, 2.55)
pt3dadd(-11.83, -96.07, -103.1, 2.55)
pt3dadd(-11.87, -96.13, -103.1, 2.55)
pt3dadd(-12.01, -96.28, -103.1, 2.55)
pt3dadd(-12.05, -96.43, -103.1, 2.55)
pt3dadd(-12.14, -96.48, -103.1, 2.55)
pt3dadd(-12.18, -96.58, -103.1, 2.55)
pt3dadd(-12.27, -96.63, -103.1, 2.55)
pt3dadd(-12.36, -96.78, -103.1, 2.55)
pt3dadd(-12.49, -96.93, -103.1, 2.55)
pt3dadd(-12.54, -96.99, -103.1, 2.55)
pt3dadd(-12.68, -97.14, -103.1, 2.55)
pt3dadd(-12.76, -97.19, -103.1, 2.55)
pt3dadd(-12.81, -97.24, -103.1, 2.55)
pt3dadd(-12.9, -97.34, -103.1, 2.55)
pt3dadd(-12.98, -97.39, -103.1, 2.55)
pt3dadd(-13.03, -97.49, -103.1, 2.55)
pt3dadd(-13.12, -97.54, -103.1, 2.55)
pt3dadd(-13.21, -97.59, -103.1, 2.55)
pt3dadd(-13.25, -97.69, -103.1, 2.55)
pt3dadd(-13.34, -97.75, -103.1, 2.55)
pt3dadd(-13.43, -97.79, -103.1, 2.55)
pt3dadd(-13.56, -97.95, -103.1, 2.55)
pt3dadd(-13.7, -98, -103.1, 2.55)
pt3dadd(-13.79, -98.05, -103.1, 2.55)
pt3dadd(-13.88, -98.15, -103.1, 2.55)
pt3dadd(-13.92, -98.2, -103.1, 2.55)
pt3dadd(-14.01, -98.3, -103.1, 2.55)
pt3dadd(-14.1, -98.4, -103.1, 2.55)
pt3dadd(-14.23, -98.46, -103.1, 2.55)
pt3dadd(-14.32, -98.56, -103.1, 2.55)
pt3dadd(-14.37, -98.61, -103.1, 2.55)
pt3dadd(-14.46, -98.66, -103.1, 2.55)
pt3dadd(-14.55, -98.71, -103.1, 2.55)
pt3dadd(-14.64, -98.76, -103.1, 2.55)
pt3dadd(-14.73, -98.81, -103.1, 2.55)
pt3dadd(-14.81, -98.86, -103.1, 2.55)
pt3dadd(-14.95, -98.91, -103.1, 2.55)
pt3dadd(-15.04, -99.01, -103.1, 2.55)
pt3dadd(-15.13, -99.06, -103.1, 2.55)
pt3dadd(-15.22, -99.11, -103.1, 2.55)
pt3dadd(-15.35, -99.11, -103.1, 2.55)
pt3dadd(-15.44, -99.21, -103.1, 2.55)
pt3dadd(-15.57, -99.32, -103.1, 2.55)
pt3dadd(-15.66, -99.36, -103.1, 2.55)
pt3dadd(-15.84, -99.42, -103.1, 2.55)
pt3dadd(-15.97, -99.57, -103.1, 2.55)
pt3dadd(-16.11, -99.62, -103.1, 2.55)
pt3dadd(-16.24, -99.67, -103.1, 2.55)
pt3dadd(-16.38, -99.77, -103.1, 2.55)
pt3dadd(-16.51, -99.82, -103.1, 2.55)
pt3dadd(-16.64, -99.87, -103.1, 2.55)
pt3dadd(-16.77, -99.87, -103.1, 2.55)
pt3dadd(-16.82, -99.92, -103.1, 2.55)
pt3dadd(-16.95, -99.97, -103.1, 2.55)
pt3dadd(-17.04, -100.03, -103.1, 2.55)
pt3dadd(-17.18, -100.07, -103.1, 2.55)
pt3dadd(-17.26, -100.13, -103.1, 2.55)
pt3dadd(-17.4, -100.13, -103.1, 2.55)
pt3dadd(-17.49, -100.18, -103.1, 2.55)
pt3dadd(-17.67, -100.18, -103.1, 2.55)
pt3dadd(-17.67, -99.92, -103.1, 2.55)
pt3dadd(-17.44, -100.13, -103.1, 2.55)
pt3dadd(-17.49, -100.18, -103.1, 2.55)
pt3dadd(-17.76, -100.18, -103.1, 2.55)
pt3dadd(-17.84, -100.23, -103.1, 2.55)
pt3dadd(-17.98, -100.23, -103.1, 2.55)
pt3dadd(-18.02, -100.28, -103.1, 2.55)
pt3dadd(-18.11, -100.33, -103.1, 2.55)
pt3dadd(-18.2, -100.33, -103.1, 2.55)
pt3dadd(-18.25, -100.38, -103.1, 2.55)
pt3dadd(-18.33, -100.48, -103.1, 2.55)
pt3dadd(-18.38, -100.53, -103.1, 2.55)
pt3dadd(-18.47, -100.63, -103.1, 2.55)
pt3dadd(-18.6, -100.68, -103.1, 2.55)
pt3dadd(-18.69, -100.73, -103.1, 2.55)
pt3dadd(-18.83, -100.83, -103.1, 2.55)
pt3dadd(-18.92, -100.93, -103.1, 2.55)
pt3dadd(-18.96, -100.99, -103.1, 2.55)
pt3dadd(-19.09, -101.04, -103.1, 2.55)
pt3dadd(-19.23, -101.19, -103.1, 2.55)
pt3dadd(-19.32, -101.24, -103.1, 2.55)
pt3dadd(-19.41, -101.29, -103.1, 2.55)
pt3dadd(-19.5, -101.39, -103.1, 2.55)
pt3dadd(-19.58, -101.44, -103.1, 2.55)
pt3dadd(-19.67, -101.49, -103.1, 2.55)
pt3dadd(-19.76, -101.54, -103.1, 2.55)
pt3dadd(-19.85, -101.6, -103.1, 2.55)
pt3dadd(-19.99, -101.75, -103.1, 2.55)
pt3dadd(-20.12, -101.8, -103.1, 2.55)
pt3dadd(-20.21, -101.9, -103.1, 2.55)
pt3dadd(-20.39, -102, -103.1, 2.55)
pt3dadd(-20.52, -102.05, -103.1, 2.55)
pt3dadd(-20.7, -102.15, -103.1, 2.55)
pt3dadd(-20.79, -102.25, -103.1, 2.55)
pt3dadd(-20.88, -102.3, -103.1, 2.55)
pt3dadd(-21.01, -102.35, -103.1, 2.55)
pt3dadd(-21.15, -102.46, -103.1, 2.55)
pt3dadd(-21.28, -102.5, -103.1, 2.55)
pt3dadd(-21.37, -102.56, -103.1, 2.55)
pt3dadd(-21.64, -102.71, -103.1, 2.55)
pt3dadd(-21.73, -102.76, -103.1, 2.55)
pt3dadd(-21.86, -102.76, -103.1, 2.55)
pt3dadd(-21.99, -102.86, -103.1, 2.55)
pt3dadd(-22.13, -102.91, -103.1, 2.55)
pt3dadd(-22.26, -102.96, -103.1, 2.55)
pt3dadd(-22.39, -103.06, -103.1, 2.55)
pt3dadd(-22.57, -103.11, -103.1, 2.55)
pt3dadd(-22.75, -103.16, -103.1, 2.55)
pt3dadd(-22.93, -103.26, -103.1, 2.55)
pt3dadd(-23.06, -103.26, -103.1, 2.55)
pt3dadd(-23.24, -103.36, -103.1, 2.55)
pt3dadd(-23.42, -103.42, -103.1, 2.55)
pt3dadd(-23.6, -103.52, -103.1, 2.55)
}
}
proc shape3d_72() {
dend[48] { pt3dadd(-23.73, -103.57, -103.1, 2.55)
pt3dadd(-23.91, -103.57, -103.1, 2.55)
pt3dadd(-24.04, -103.67, -103.1, 2.55)
pt3dadd(-24.13, -103.72, -103.1, 2.55)
pt3dadd(-24.26, -103.72, -103.1, 2.55)
pt3dadd(-24.4, -103.82, -103.1, 2.55)
pt3dadd(-24.49, -103.82, -103.1, 2.55)
pt3dadd(-24.58, -103.87, -103.1, 2.55)
pt3dadd(-24.8, -103.87, -103.1, 2.55)
pt3dadd(-24.89, -103.92, -103.1, 2.55)
pt3dadd(-25.02, -103.92, -103.1, 2.55)
pt3dadd(-25.07, -103.97, -103.1, 2.55)
pt3dadd(-25.2, -103.97, -103.1, 2.55)
pt3dadd(-25.29, -104.03, -103.1, 2.55)
pt3dadd(-25.33, -104.07, -103.1, 2.55)
pt3dadd(-25.47, -104.13, -103.1, 2.55)
pt3dadd(-25.56, -104.23, -103.1, 2.55)
pt3dadd(-25.6, -104.28, -103.1, 2.55)
pt3dadd(-25.69, -104.33, -103.1, 2.55)
pt3dadd(-25.78, -104.38, -103.1, 2.55)
pt3dadd(-25.87, -104.48, -103.1, 2.55)
pt3dadd(-25.96, -104.53, -103.1, 2.55)
pt3dadd(-26, -104.58, -103.1, 2.55)
pt3dadd(-26.09, -104.63, -103.1, 2.55)
pt3dadd(-26.23, -104.79, -103.1, 2.55)
pt3dadd(-26.32, -104.83, -103.1, 2.55)
pt3dadd(-26.36, -104.89, -103.1, 2.55)
pt3dadd(-26.45, -104.89, -103.1, 2.55)
pt3dadd(-26.5, -104.93, -103.1, 2.55)
pt3dadd(-26.58, -104.99, -103.1, 2.55)
pt3dadd(-26.67, -105.04, -103.1, 2.55)
pt3dadd(-26.76, -105.09, -103.1, 2.55)
pt3dadd(-26.94, -105.09, -103.1, 2.55)
pt3dadd(-26.94, -104.79, -103.1, 2.55)
}
dend[49] {pt3dclear()
pt3dadd(-7.78, -89.54, -98.9, 2.55)
pt3dadd(-7.68, -89.54, -98.9, 2.55)
pt3dadd(-7.64, -89.49, -98.9, 2.55)
pt3dadd(-7.55, -89.39, -98.9, 2.55)
pt3dadd(-7.46, -89.29, -98.9, 2.55)
pt3dadd(-7.46, -89.19, -98.9, 2.55)
pt3dadd(-7.37, -89.14, -98.9, 2.55)
pt3dadd(-7.32, -89.04, -98.9, 2.55)
pt3dadd(-7.24, -88.99, -98.9, 2.55)
pt3dadd(-7.14, -88.93, -98.9, 2.55)
pt3dadd(-7.1, -88.89, -98.9, 2.55)
pt3dadd(-7.06, -88.78, -98.9, 2.55)
pt3dadd(-6.97, -88.73, -98.9, 2.55)
pt3dadd(-6.88, -88.63, -98.9, 2.55)
pt3dadd(-6.84, -88.58, -98.9, 2.55)
pt3dadd(-6.74, -88.48, -98.9, 2.55)
pt3dadd(-6.43, -88.13, -98.9, 2.55)
pt3dadd(-6.39, -88.02, -98.9, 2.55)
pt3dadd(-6.3, -87.92, -98.9, 2.55)
pt3dadd(-6.16, -87.77, -98.9, 2.55)
pt3dadd(-6.07, -87.72, -98.9, 2.55)
pt3dadd(-5.99, -87.62, -98.9, 2.55)
pt3dadd(-5.94, -87.52, -98.9, 2.55)
pt3dadd(-5.9, -87.47, -98.9, 2.55)
pt3dadd(-5.76, -87.32, -98.9, 2.55)
pt3dadd(-5.72, -87.26, -98.9, 2.55)
pt3dadd(-5.59, -87.16, -98.9, 2.55)
pt3dadd(-5.54, -87.06, -98.9, 2.55)
pt3dadd(-5.45, -86.96, -98.9, 2.55)
pt3dadd(-5.36, -86.86, -98.9, 2.55)
pt3dadd(-5.27, -86.76, -98.9, 2.55)
pt3dadd(-5.18, -86.71, -98.9, 2.55)
pt3dadd(-5.09, -86.56, -98.9, 2.55)
pt3dadd(-5.01, -86.45, -98.9, 2.55)
pt3dadd(-4.92, -86.35, -98.9, 2.55)
pt3dadd(-4.83, -86.25, -98.9, 2.55)
pt3dadd(-4.74, -86.1, -98.9, 2.55)
pt3dadd(-4.7, -86, -98.9, 2.55)
pt3dadd(-4.61, -85.85, -98.9, 2.55)
pt3dadd(-4.47, -85.69, -98.9, 2.55)
pt3dadd(-4.38, -85.49, -98.9, 2.55)
pt3dadd(-4.34, -85.44, -98.9, 2.55)
pt3dadd(-4.2, -85.24, -98.9, 2.55)
pt3dadd(-4.11, -85.14, -98.9, 2.55)
pt3dadd(-4.07, -84.99, -98.9, 2.55)
pt3dadd(-3.98, -84.93, -98.9, 2.55)
pt3dadd(-3.93, -84.83, -98.9, 2.55)
pt3dadd(-3.89, -84.68, -98.9, 2.55)
pt3dadd(-3.85, -84.58, -98.9, 2.55)
pt3dadd(-3.76, -84.53, -98.9, 2.55)
pt3dadd(-3.71, -84.43, -98.9, 2.55)
pt3dadd(-3.67, -84.33, -98.9, 2.55)
pt3dadd(-3.63, -84.22, -98.9, 2.55)
pt3dadd(-3.54, -84.13, -98.9, 2.55)
pt3dadd(-3.49, -84.02, -98.9, 2.55)
pt3dadd(-3.4, -83.92, -98.9, 2.55)
pt3dadd(-3.4, -83.82, -98.9, 2.55)
pt3dadd(-3.31, -83.72, -98.9, 2.55)
pt3dadd(-3.27, -83.62, -98.9, 2.55)
pt3dadd(-3.22, -83.52, -98.9, 2.55)
pt3dadd(-3.05, -83.32, -98.9, 2.55)
pt3dadd(-3, -83.21, -98.9, 2.55)
pt3dadd(-2.95, -83.16, -98.9, 2.55)
pt3dadd(-2.87, -83.06, -98.9, 2.55)
pt3dadd(-2.82, -82.91, -98.9, 2.55)
pt3dadd(-2.73, -82.86, -98.9, 2.55)
pt3dadd(-2.69, -82.76, -98.9, 2.55)
pt3dadd(-2.64, -82.71, -98.9, 2.55)
pt3dadd(-2.56, -82.65, -98.9, 2.55)
pt3dadd(-2.51, -82.56, -98.9, 2.55)
pt3dadd(-2.46, -82.5, -98.9, 2.55)
pt3dadd(-2.42, -82.45, -98.9, 2.55)
pt3dadd(-2.38, -82.4, -98.9, 2.55)
pt3dadd(-2.33, -82.3, -98.9, 2.55)
pt3dadd(-2.15, -82.1, -98.9, 2.55)
pt3dadd(-2.11, -82.05, -98.9, 2.55)
pt3dadd(-2.11, -81.95, -98.9, 2.55)
pt3dadd(-2.02, -81.9, -98.9, 2.55)
pt3dadd(-1.98, -81.79, -98.9, 2.55)
pt3dadd(-1.93, -81.75, -98.9, 2.55)
pt3dadd(-1.66, -81.44, -98.9, 2.55)
pt3dadd(-1.62, -81.34, -98.9, 2.55)
pt3dadd(-1.53, -81.29, -98.9, 2.55)
pt3dadd(-1.49, -81.19, -98.9, 2.55)
pt3dadd(-1.44, -81.08, -98.9, 2.55)
pt3dadd(-1.35, -81.04, -98.9, 2.55)
pt3dadd(-1.3, -80.99, -98.9, 2.55)
pt3dadd(-1.26, -80.88, -98.9, 2.55)
pt3dadd(-1.22, -80.83, -98.9, 2.55)
pt3dadd(-1.17, -80.78, -98.9, 2.55)
pt3dadd(-1.13, -80.73, -98.9, 2.55)
pt3dadd(-1.08, -80.68, -98.9, 2.55)
pt3dadd(-1.04, -80.63, -98.9, 2.55)
pt3dadd(-0.99, -80.58, -98.9, 2.55)
pt3dadd(-0.95, -80.53, -98.9, 2.55)
pt3dadd(-0.9, -80.43, -98.9, 2.55)
pt3dadd(-0.86, -80.33, -98.9, 2.55)
pt3dadd(-0.81, -80.22, -98.9, 2.55)
pt3dadd(-0.77, -80.13, -98.9, 2.55)
pt3dadd(-0.73, -80.07, -98.9, 2.55)
pt3dadd(-0.68, -79.97, -98.9, 2.55)
pt3dadd(-0.64, -79.92, -98.9, 2.55)
pt3dadd(-0.59, -79.77, -98.9, 2.55)
pt3dadd(-0.55, -79.67, -98.9, 2.55)
pt3dadd(-0.55, -79.57, -98.9, 2.55)
pt3dadd(-0.5, -79.46, -98.9, 2.55)
pt3dadd(-0.46, -79.36, -98.9, 2.55)
pt3dadd(-0.46, -79.26, -98.9, 2.55)
pt3dadd(-0.41, -79.16, -98.9, 2.55)
pt3dadd(-0.37, -79.06, -98.9, 2.55)
pt3dadd(-0.37, -78.96, -98.9, 2.55)
pt3dadd(-0.32, -78.91, -98.9, 2.55)
pt3dadd(-0.32, -78.81, -98.9, 2.55)
pt3dadd(-0.28, -78.71, -98.9, 2.55)
pt3dadd(-0.28, -78.56, -98.9, 2.55)
pt3dadd(-0.23, -78.5, -98.9, 2.55)
pt3dadd(-0.23, -78.4, -98.9, 2.55)
pt3dadd(-0.19, -78.3, -98.9, 2.55)
pt3dadd(-0.19, -78.2, -98.9, 2.55)
pt3dadd(-0.15, -78.05, -98.9, 2.55)
pt3dadd(-0.1, -77.95, -98.9, 2.55)
pt3dadd(-0.1, -77.79, -98.9, 2.55)
pt3dadd(-0.06, -77.75, -98.9, 2.55)
pt3dadd(-0.06, -77.64, -98.9, 2.55)
pt3dadd(-0.01, -77.54, -98.9, 2.55)
pt3dadd(0.03, -77.49, -98.9, 2.55)
pt3dadd(0.03, -77.39, -98.9, 2.55)
pt3dadd(0.08, -77.29, -98.9, 2.55)
pt3dadd(0.12, -77.19, -98.9, 2.55)
pt3dadd(0.21, -77.08, -98.9, 2.55)
pt3dadd(0.25, -76.99, -98.9, 2.55)
pt3dadd(0.3, -76.93, -98.9, 2.55)
pt3dadd(0.34, -76.78, -98.9, 2.55)
pt3dadd(0.43, -76.68, -98.9, 2.55)
pt3dadd(0.48, -76.58, -98.9, 2.55)
pt3dadd(0.52, -76.48, -98.9, 2.55)
pt3dadd(0.61, -76.38, -98.9, 2.55)
pt3dadd(0.7, -76.28, -98.9, 2.55)
pt3dadd(0.75, -76.18, -98.9, 2.55)
pt3dadd(0.83, -76.12, -98.9, 2.55)
pt3dadd(0.88, -76.07, -98.9, 2.55)
pt3dadd(0.92, -76.02, -98.9, 2.55)
pt3dadd(0.97, -75.97, -98.9, 2.55)
pt3dadd(1.01, -75.92, -98.9, 2.55)
pt3dadd(1.06, -75.82, -98.9, 2.55)
pt3dadd(1.15, -75.77, -98.9, 2.55)
pt3dadd(1.19, -75.72, -98.9, 2.55)
pt3dadd(1.28, -75.62, -98.9, 2.55)
pt3dadd(1.37, -75.62, -98.9, 2.55)
pt3dadd(1.41, -75.57, -98.9, 2.55)
pt3dadd(1.5, -75.51, -98.9, 2.55)
pt3dadd(1.55, -75.42, -98.9, 2.55)
pt3dadd(1.64, -75.36, -98.9, 2.55)
pt3dadd(1.68, -75.31, -98.9, 2.55)
pt3dadd(1.55, -75.42, -98.9, 2.55)
pt3dadd(1.64, -75.36, -98.9, 2.55)
pt3dadd(1.73, -75.31, -98.9, 2.55)
pt3dadd(1.86, -75.26, -98.9, 2.55)
pt3dadd(1.95, -75.21, -98.9, 2.55)
pt3dadd(2.13, -75.11, -98.9, 2.55)
pt3dadd(2.22, -75.01, -98.9, 2.55)
pt3dadd(2.35, -74.91, -98.9, 2.55)
pt3dadd(2.48, -74.91, -98.9, 2.55)
pt3dadd(2.57, -74.81, -98.9, 2.55)
pt3dadd(2.71, -74.76, -98.9, 2.55)
pt3dadd(2.84, -74.65, -98.9, 2.55)
}
}
proc shape3d_73() {
dend[49] { pt3dadd(3.02, -74.56, -98.9, 2.55)
pt3dadd(3.11, -74.5, -98.9, 2.55)
pt3dadd(3.24, -74.45, -98.9, 2.55)
pt3dadd(3.38, -74.35, -98.9, 2.55)
pt3dadd(3.51, -74.25, -98.9, 2.55)
pt3dadd(3.64, -74.15, -98.9, 2.55)
pt3dadd(3.78, -74.05, -98.9, 2.55)
pt3dadd(3.91, -73.95, -98.9, 2.55)
pt3dadd(4.05, -73.89, -98.9, 2.55)
pt3dadd(4.18, -73.85, -98.9, 2.55)
pt3dadd(4.31, -73.69, -98.9, 2.55)
pt3dadd(4.45, -73.64, -98.9, 2.55)
pt3dadd(4.53, -73.54, -98.9, 2.55)
pt3dadd(4.76, -73.39, -98.9, 2.55)
pt3dadd(4.85, -73.29, -98.9, 2.55)
pt3dadd(4.98, -73.19, -98.9, 2.55)
pt3dadd(5.11, -73.14, -98.9, 2.55)
pt3dadd(5.25, -73.04, -98.9, 2.55)
pt3dadd(5.29, -72.93, -98.9, 2.55)
pt3dadd(5.43, -72.83, -98.9, 2.55)
pt3dadd(5.51, -72.73, -98.9, 2.55)
pt3dadd(5.61, -72.68, -98.9, 2.55)
pt3dadd(5.74, -72.53, -98.9, 2.55)
pt3dadd(5.87, -72.43, -98.9, 2.55)
pt3dadd(6.01, -72.32, -98.9, 2.55)
pt3dadd(6.18, -72.12, -98.9, 2.55)
pt3dadd(6.27, -72.02, -98.9, 2.55)
pt3dadd(6.36, -71.92, -98.9, 2.55)
pt3dadd(6.5, -71.77, -98.9, 2.55)
pt3dadd(6.59, -71.67, -98.9, 2.55)
pt3dadd(6.68, -71.57, -98.9, 2.55)
pt3dadd(6.85, -71.36, -98.9, 2.55)
pt3dadd(6.9, -71.26, -98.9, 2.55)
pt3dadd(6.99, -71.16, -98.9, 2.55)
pt3dadd(7.03, -71.06, -98.9, 2.55)
pt3dadd(7.16, -70.96, -98.9, 2.55)
pt3dadd(7.21, -70.86, -98.9, 2.55)
pt3dadd(7.3, -70.71, -98.9, 2.55)
pt3dadd(7.39, -70.61, -98.9, 2.55)
pt3dadd(7.43, -70.5, -98.9, 2.55)
pt3dadd(7.48, -70.4, -98.9, 2.55)
pt3dadd(7.52, -70.3, -98.9, 2.55)
pt3dadd(7.61, -70.25, -98.9, 2.55)
pt3dadd(7.7, -70.1, -98.9, 2.55)
pt3dadd(7.74, -70, -98.9, 2.55)
pt3dadd(7.79, -69.85, -98.9, 2.55)
pt3dadd(7.88, -69.74, -98.9, 2.55)
pt3dadd(7.97, -69.59, -98.9, 2.55)
pt3dadd(8.01, -69.54, -98.9, 2.55)
pt3dadd(8.06, -69.44, -98.9, 2.55)
pt3dadd(8.15, -69.29, -98.9, 2.55)
pt3dadd(8.19, -69.19, -98.9, 2.55)
pt3dadd(8.28, -69.08, -98.9, 2.55)
pt3dadd(8.32, -68.99, -98.9, 2.55)
pt3dadd(8.37, -68.83, -98.9, 2.55)
pt3dadd(8.41, -68.73, -98.9, 2.55)
pt3dadd(8.5, -68.58, -98.9, 2.55)
pt3dadd(8.55, -68.48, -98.9, 2.55)
pt3dadd(8.59, -68.38, -98.9, 2.55)
pt3dadd(8.64, -68.28, -98.9, 2.55)
pt3dadd(8.68, -68.17, -98.9, 2.55)
pt3dadd(8.73, -68.07, -98.9, 2.55)
pt3dadd(8.77, -67.97, -98.9, 2.55)
pt3dadd(8.86, -67.82, -98.9, 2.55)
pt3dadd(8.9, -67.72, -98.9, 2.55)
pt3dadd(8.95, -67.67, -98.9, 2.55)
pt3dadd(8.99, -67.62, -98.9, 2.55)
pt3dadd(9.04, -67.51, -98.9, 2.55)
pt3dadd(9.08, -67.42, -98.9, 2.55)
pt3dadd(9.22, -67.26, -98.9, 2.55)
pt3dadd(9.26, -67.21, -98.9, 2.55)
pt3dadd(9.31, -67.16, -98.9, 2.55)
pt3dadd(9.35, -67.06, -98.9, 2.55)
pt3dadd(9.4, -66.96, -98.9, 2.55)
pt3dadd(9.44, -66.91, -98.9, 2.55)
pt3dadd(9.53, -66.75, -98.9, 2.55)
pt3dadd(9.57, -66.65, -98.9, 2.55)
pt3dadd(9.66, -66.55, -98.9, 2.55)
pt3dadd(9.7, -66.45, -98.9, 2.55)
pt3dadd(9.75, -66.4, -98.9, 2.55)
pt3dadd(9.8, -66.3, -98.9, 2.55)
pt3dadd(9.84, -66.2, -98.9, 2.55)
pt3dadd(9.89, -66.1, -98.9, 2.55)
pt3dadd(9.97, -66, -98.9, 2.55)
pt3dadd(10.02, -65.89, -98.9, 2.55)
pt3dadd(10.11, -65.79, -98.9, 2.55)
pt3dadd(10.2, -65.59, -98.9, 2.55)
pt3dadd(10.24, -65.54, -98.9, 2.55)
pt3dadd(10.28, -65.39, -98.9, 2.55)
pt3dadd(10.33, -65.29, -98.9, 2.55)
pt3dadd(10.42, -65.18, -98.9, 2.55)
pt3dadd(10.47, -65.08, -98.9, 2.55)
pt3dadd(10.55, -64.93, -98.9, 2.55)
pt3dadd(10.6, -64.83, -98.9, 2.55)
pt3dadd(10.69, -64.73, -98.9, 2.55)
pt3dadd(10.73, -64.63, -98.9, 2.55)
pt3dadd(10.73, -64.48, -98.9, 2.55)
pt3dadd(10.82, -64.43, -98.9, 2.55)
pt3dadd(10.86, -64.32, -98.9, 2.55)
pt3dadd(10.91, -64.17, -98.9, 2.55)
pt3dadd(10.95, -64.07, -98.9, 2.55)
pt3dadd(11, -64.02, -98.9, 2.55)
pt3dadd(11.04, -63.92, -98.9, 2.55)
pt3dadd(11.09, -63.82, -98.9, 2.55)
pt3dadd(11.13, -63.72, -98.9, 2.55)
pt3dadd(11.18, -63.56, -98.9, 2.55)
pt3dadd(11.22, -63.47, -98.9, 2.55)
pt3dadd(11.27, -63.36, -98.9, 2.55)
pt3dadd(11.31, -63.31, -98.9, 2.55)
pt3dadd(11.4, -63.21, -98.9, 2.55)
pt3dadd(11.44, -63.11, -98.9, 2.55)
pt3dadd(11.49, -63.01, -98.9, 2.55)
pt3dadd(11.53, -62.91, -98.9, 2.55)
pt3dadd(11.62, -62.81, -98.9, 2.55)
pt3dadd(11.67, -62.71, -98.9, 2.55)
pt3dadd(11.71, -62.65, -98.9, 2.55)
pt3dadd(11.76, -62.55, -98.9, 2.55)
pt3dadd(11.76, -62.4, -98.9, 2.55)
pt3dadd(11.62, -62.65, -98.9, 2.55)
pt3dadd(11.67, -62.91, -95.75, 2.55)
pt3dadd(11.71, -62.91, -95.75, 2.55)
pt3dadd(11.76, -62.81, -95.75, 2.55)
pt3dadd(11.8, -62.71, -95.75, 2.55)
pt3dadd(11.85, -62.6, -95.75, 2.55)
pt3dadd(11.89, -62.5, -95.75, 2.55)
pt3dadd(11.94, -62.4, -95.75, 2.55)
pt3dadd(11.98, -62.25, -95.75, 2.55)
pt3dadd(12.02, -62.15, -95.75, 2.55)
pt3dadd(12.07, -61.94, -95.75, 2.55)
pt3dadd(12.16, -61.79, -95.75, 2.55)
pt3dadd(12.2, -61.69, -95.75, 2.55)
pt3dadd(12.25, -61.59, -95.75, 2.55)
pt3dadd(12.29, -61.44, -95.75, 2.55)
pt3dadd(12.34, -61.34, -95.75, 2.55)
pt3dadd(12.38, -61.19, -95.75, 2.55)
pt3dadd(12.43, -61.08, -95.75, 2.55)
pt3dadd(12.47, -60.98, -95.75, 2.55)
pt3dadd(12.52, -60.88, -95.75, 2.55)
pt3dadd(12.6, -60.73, -95.75, 2.55)
pt3dadd(12.65, -60.68, -95.75, 2.55)
pt3dadd(12.69, -60.53, -95.75, 2.55)
pt3dadd(12.74, -60.43, -95.75, 2.55)
pt3dadd(12.78, -60.33, -95.75, 2.55)
pt3dadd(12.87, -60.28, -95.75, 2.55)
pt3dadd(12.91, -60.17, -95.75, 2.55)
pt3dadd(12.96, -60.02, -95.75, 2.55)
pt3dadd(13.05, -59.97, -95.75, 2.55)
pt3dadd(13.05, -59.82, -95.75, 2.55)
pt3dadd(13.14, -59.67, -95.75, 2.55)
pt3dadd(13.18, -59.56, -95.75, 2.55)
pt3dadd(13.23, -59.47, -95.75, 2.55)
pt3dadd(13.32, -59.31, -95.75, 2.55)
pt3dadd(13.36, -59.16, -95.75, 2.55)
pt3dadd(13.45, -59.01, -95.75, 2.55)
pt3dadd(13.49, -58.91, -95.75, 2.55)
pt3dadd(13.54, -58.86, -95.75, 2.55)
pt3dadd(13.59, -58.71, -95.75, 2.55)
pt3dadd(13.63, -58.6, -95.75, 2.55)
pt3dadd(13.68, -58.5, -95.75, 2.55)
pt3dadd(13.68, -58.4, -95.75, 2.55)
pt3dadd(13.72, -58.3, -95.75, 2.55)
pt3dadd(13.76, -58.2, -95.75, 2.55)
pt3dadd(13.81, -58.15, -95.75, 2.55)
pt3dadd(13.85, -58.05, -95.75, 2.55)
pt3dadd(13.9, -57.94, -95.75, 2.55)
pt3dadd(13.98, -57.79, -95.75, 2.55)
pt3dadd(13.98, -57.69, -95.75, 2.55)
pt3dadd(14.03, -57.64, -95.75, 2.55)
pt3dadd(14.07, -57.54, -95.75, 2.55)
pt3dadd(14.12, -57.49, -95.75, 2.55)
pt3dadd(14.16, -57.39, -95.75, 2.55)
pt3dadd(14.16, -57.29, -95.75, 2.55)
pt3dadd(14.25, -57.13, -95.75, 2.55)
pt3dadd(14.25, -57.03, -95.75, 2.55)
pt3dadd(14.3, -56.93, -95.75, 2.55)
pt3dadd(14.34, -56.78, -95.75, 2.55)
pt3dadd(14.25, -56.88, -93.65, 2.55)
pt3dadd(14.3, -56.83, -93.65, 2.55)
pt3dadd(14.43, -56.68, -93.65, 2.55)
pt3dadd(14.48, -56.63, -93.65, 2.55)
pt3dadd(14.52, -56.58, -93.65, 2.55)
pt3dadd(14.56, -56.48, -93.65, 2.55)
pt3dadd(14.61, -56.38, -93.65, 2.55)
pt3dadd(14.7, -56.28, -93.65, 2.55)
pt3dadd(14.74, -56.17, -93.65, 2.55)
pt3dadd(14.79, -56.07, -93.65, 2.55)
pt3dadd(14.88, -55.97, -93.65, 2.55)
pt3dadd(14.97, -55.87, -93.65, 2.55)
pt3dadd(14.97, -55.77, -93.65, 2.55)
pt3dadd(15.06, -55.67, -93.65, 2.55)
pt3dadd(15.15, -55.56, -93.65, 2.55)
pt3dadd(15.19, -55.47, -93.65, 2.55)
pt3dadd(15.23, -55.36, -93.65, 2.55)
pt3dadd(15.28, -55.26, -93.65, 2.55)
pt3dadd(15.32, -55.16, -93.65, 2.55)
pt3dadd(15.37, -55.01, -93.65, 2.55)
pt3dadd(15.41, -54.91, -93.65, 2.55)
pt3dadd(15.5, -54.86, -93.65, 2.55)
pt3dadd(15.55, -54.76, -93.65, 2.55)
pt3dadd(15.59, -54.65, -93.65, 2.55)
}
}
proc shape3d_74() {
dend[49] { pt3dadd(15.68, -54.55, -93.65, 2.55)
pt3dadd(15.77, -54.4, -93.65, 2.55)
pt3dadd(15.81, -54.35, -93.65, 2.55)
pt3dadd(15.86, -54.25, -93.65, 2.55)
pt3dadd(15.95, -54.15, -93.65, 2.55)
pt3dadd(16.04, -54.04, -93.65, 2.55)
pt3dadd(16.04, -53.94, -93.65, 2.55)
pt3dadd(16.13, -53.79, -93.65, 2.55)
pt3dadd(16.17, -53.69, -93.65, 2.55)
pt3dadd(16.22, -53.59, -93.65, 2.55)
pt3dadd(16.26, -53.49, -93.65, 2.55)
pt3dadd(16.35, -53.44, -93.65, 2.55)
pt3dadd(16.39, -53.29, -93.65, 2.55)
pt3dadd(16.44, -53.19, -93.65, 2.55)
pt3dadd(16.48, -53.08, -93.65, 2.55)
pt3dadd(16.57, -52.98, -93.65, 2.55)
pt3dadd(16.62, -52.83, -93.65, 2.55)
pt3dadd(16.66, -52.73, -93.65, 2.55)
pt3dadd(16.7, -52.58, -93.65, 2.55)
pt3dadd(16.8, -52.48, -93.65, 2.55)
pt3dadd(16.84, -52.42, -93.65, 2.55)
pt3dadd(16.97, -52.17, -93.65, 2.55)
pt3dadd(17.02, -52.02, -93.65, 2.55)
pt3dadd(17.06, -51.92, -93.65, 2.55)
pt3dadd(17.15, -51.82, -93.65, 2.55)
pt3dadd(17.19, -51.72, -93.65, 2.55)
pt3dadd(17.33, -51.56, -93.65, 2.55)
pt3dadd(17.38, -51.46, -93.65, 2.55)
pt3dadd(17.42, -51.36, -93.65, 2.55)
pt3dadd(17.46, -51.31, -93.65, 2.55)
pt3dadd(17.55, -51.16, -93.65, 2.55)
pt3dadd(17.64, -51.06, -93.65, 2.55)
pt3dadd(17.69, -51.01, -93.65, 2.55)
pt3dadd(17.73, -50.91, -93.65, 2.55)
pt3dadd(17.82, -50.85, -93.65, 2.55)
pt3dadd(17.82, -50.76, -93.65, 2.55)
pt3dadd(17.91, -50.71, -93.65, 2.55)
pt3dadd(17.95, -50.6, -93.65, 2.55)
pt3dadd(18, -50.55, -93.65, 2.55)
pt3dadd(18.04, -50.45, -93.65, 2.55)
pt3dadd(18.09, -50.4, -93.65, 2.55)
pt3dadd(18.18, -50.35, -93.65, 2.55)
pt3dadd(18.22, -50.25, -93.65, 2.55)
pt3dadd(18.26, -50.15, -93.65, 2.55)
pt3dadd(18.31, -50.1, -93.65, 2.55)
pt3dadd(18.4, -50.04, -93.65, 2.55)
pt3dadd(18.44, -49.94, -93.65, 2.55)
pt3dadd(18.53, -49.9, -93.65, 2.55)
pt3dadd(18.58, -49.84, -93.65, 2.55)
pt3dadd(18.67, -49.69, -93.65, 2.55)
pt3dadd(18.71, -49.64, -93.65, 2.55)
pt3dadd(18.8, -49.54, -93.65, 2.55)
pt3dadd(18.84, -49.44, -93.65, 2.55)
pt3dadd(18.93, -49.29, -93.65, 2.55)
pt3dadd(18.98, -49.24, -93.65, 2.55)
pt3dadd(19.02, -49.19, -93.65, 2.55)
pt3dadd(19.07, -49.13, -93.65, 2.55)
pt3dadd(19.25, -48.93, -93.65, 2.55)
pt3dadd(19.33, -48.78, -93.65, 2.55)
pt3dadd(19.38, -48.73, -93.65, 2.55)
pt3dadd(19.42, -48.68, -93.65, 2.55)
pt3dadd(19.47, -48.58, -93.65, 2.55)
pt3dadd(19.51, -48.53, -93.65, 2.55)
pt3dadd(19.56, -48.47, -93.65, 2.55)
pt3dadd(19.6, -48.42, -93.65, 2.55)
pt3dadd(19.65, -48.38, -93.65, 2.55)
pt3dadd(19.69, -48.27, -93.65, 2.55)
pt3dadd(19.74, -48.22, -93.65, 2.55)
pt3dadd(19.78, -48.17, -93.65, 2.55)
pt3dadd(19.83, -48.12, -93.65, 2.55)
pt3dadd(19.87, -48.07, -93.65, 2.55)
pt3dadd(19.92, -47.97, -93.65, 2.55)
pt3dadd(19.96, -47.87, -93.65, 2.55)
pt3dadd(20, -47.82, -93.65, 2.55)
pt3dadd(20, -47.72, -93.65, 2.55)
pt3dadd(20.05, -47.67, -93.65, 2.55)
pt3dadd(20.09, -47.62, -93.65, 2.55)
pt3dadd(20.09, -47.36, -93.65, 2.55)
pt3dadd(20.05, -47.41, -90.5, 2.55)
pt3dadd(20.09, -47.36, -90.5, 2.55)
pt3dadd(20.14, -47.31, -90.5, 2.55)
pt3dadd(20.18, -47.21, -90.5, 2.55)
pt3dadd(20.23, -47.16, -90.5, 2.55)
pt3dadd(20.23, -47.01, -90.5, 2.55)
pt3dadd(20.32, -46.91, -90.5, 2.55)
pt3dadd(20.36, -46.76, -90.5, 2.55)
pt3dadd(20.41, -46.65, -90.5, 2.55)
pt3dadd(20.45, -46.55, -90.5, 2.55)
pt3dadd(20.5, -46.4, -90.5, 2.55)
pt3dadd(20.54, -46.3, -90.5, 2.55)
pt3dadd(20.58, -46.2, -90.5, 2.55)
pt3dadd(20.63, -46.04, -90.5, 2.55)
pt3dadd(20.67, -45.89, -90.5, 2.55)
pt3dadd(20.72, -45.84, -90.5, 2.55)
pt3dadd(20.76, -45.64, -90.5, 2.55)
pt3dadd(20.81, -45.49, -90.5, 2.55)
pt3dadd(20.85, -45.34, -90.5, 2.55)
pt3dadd(20.9, -45.19, -90.5, 2.55)
pt3dadd(20.94, -45.03, -90.5, 2.55)
pt3dadd(20.99, -44.93, -90.5, 2.55)
pt3dadd(21.03, -44.73, -90.5, 2.55)
pt3dadd(21.08, -44.58, -90.5, 2.55)
pt3dadd(21.17, -44.38, -90.5, 2.55)
pt3dadd(21.21, -44.27, -90.5, 2.55)
pt3dadd(21.21, -44.12, -90.5, 2.55)
pt3dadd(21.3, -44.02, -90.5, 2.55)
pt3dadd(21.34, -43.92, -90.5, 2.55)
pt3dadd(21.39, -43.77, -90.5, 2.55)
pt3dadd(21.43, -43.67, -90.5, 2.55)
pt3dadd(21.48, -43.51, -90.5, 2.55)
pt3dadd(21.52, -43.36, -90.5, 2.55)
pt3dadd(21.57, -43.26, -90.5, 2.55)
pt3dadd(21.61, -43.11, -90.5, 2.55)
pt3dadd(21.66, -42.96, -90.5, 2.55)
pt3dadd(21.7, -42.85, -90.5, 2.55)
pt3dadd(21.74, -42.76, -90.5, 2.55)
pt3dadd(21.79, -42.6, -90.5, 2.55)
pt3dadd(21.83, -42.5, -90.5, 2.55)
pt3dadd(21.83, -42.35, -90.5, 2.55)
pt3dadd(21.88, -42.2, -90.5, 2.55)
pt3dadd(21.92, -42.15, -90.5, 2.55)
pt3dadd(21.92, -41.99, -90.5, 2.55)
pt3dadd(21.97, -41.89, -90.5, 2.55)
pt3dadd(22.01, -41.79, -90.5, 2.55)
pt3dadd(22.06, -41.64, -90.5, 2.55)
pt3dadd(22.1, -41.54, -90.5, 2.55)
pt3dadd(22.1, -41.44, -90.5, 2.55)
pt3dadd(22.19, -41.28, -90.5, 2.55)
pt3dadd(22.24, -41.19, -90.5, 2.55)
pt3dadd(22.24, -41.08, -90.5, 2.55)
pt3dadd(22.28, -40.98, -90.5, 2.55)
pt3dadd(22.32, -40.83, -90.5, 2.55)
pt3dadd(22.37, -40.68, -90.5, 2.55)
pt3dadd(22.41, -40.63, -90.5, 2.55)
pt3dadd(22.46, -40.47, -90.5, 2.55)
pt3dadd(22.5, -40.32, -90.5, 2.55)
pt3dadd(22.55, -40.22, -90.5, 2.55)
pt3dadd(22.59, -40.12, -90.5, 2.55)
pt3dadd(22.59, -40.02, -90.5, 2.55)
pt3dadd(22.64, -39.92, -90.5, 2.55)
pt3dadd(22.68, -39.77, -90.5, 2.55)
pt3dadd(22.73, -39.67, -90.5, 2.55)
pt3dadd(22.77, -39.56, -90.5, 2.55)
pt3dadd(22.77, -39.36, -90.5, 2.55)
pt3dadd(22.81, -39.26, -90.5, 2.55)
pt3dadd(22.86, -39.16, -90.5, 2.55)
pt3dadd(22.86, -39.01, -90.5, 2.55)
pt3dadd(22.9, -38.85, -90.5, 2.55)
pt3dadd(22.95, -38.76, -90.5, 2.55)
pt3dadd(22.99, -38.7, -90.5, 2.55)
pt3dadd(22.99, -38.6, -90.5, 2.55)
pt3dadd(23.04, -38.45, -90.5, 2.55)
pt3dadd(23.04, -38.35, -90.5, 2.55)
pt3dadd(23.08, -38.2, -90.5, 2.55)
pt3dadd(23.08, -37.84, -90.5, 2.55)
pt3dadd(22.86, -38.1, -88.4, 2.55)
pt3dadd(22.9, -38.04, -88.4, 2.55)
pt3dadd(22.95, -37.99, -88.4, 2.55)
pt3dadd(22.99, -37.89, -88.4, 2.55)
pt3dadd(23.04, -37.74, -88.4, 2.55)
pt3dadd(23.08, -37.69, -88.4, 2.55)
pt3dadd(23.17, -37.64, -88.4, 2.55)
pt3dadd(23.22, -37.54, -88.4, 2.55)
pt3dadd(23.31, -37.39, -88.4, 2.55)
pt3dadd(23.35, -37.28, -88.4, 2.55)
pt3dadd(23.39, -37.19, -88.4, 2.55)
pt3dadd(23.44, -37.08, -88.4, 2.55)
pt3dadd(23.48, -37.03, -88.4, 2.55)
pt3dadd(23.53, -36.93, -88.4, 2.55)
pt3dadd(23.57, -36.83, -88.4, 2.55)
pt3dadd(23.61, -36.78, -88.4, 2.55)
pt3dadd(23.66, -36.68, -88.4, 2.55)
pt3dadd(23.7, -36.58, -88.4, 2.55)
pt3dadd(23.75, -36.47, -88.4, 2.55)
pt3dadd(23.84, -36.32, -88.4, 2.55)
pt3dadd(23.88, -36.22, -88.4, 2.55)
pt3dadd(23.93, -36.12, -88.4, 2.55)
pt3dadd(23.97, -36.07, -88.4, 2.55)
pt3dadd(24.02, -35.97, -88.4, 2.55)
pt3dadd(24.06, -35.92, -88.4, 2.55)
pt3dadd(24.06, -35.82, -88.4, 2.55)
pt3dadd(24.15, -35.72, -88.4, 2.55)
pt3dadd(24.19, -35.67, -88.4, 2.55)
pt3dadd(24.24, -35.56, -88.4, 2.55)
pt3dadd(24.28, -35.51, -88.4, 2.55)
pt3dadd(24.33, -35.41, -88.4, 2.55)
pt3dadd(24.37, -35.31, -88.4, 2.55)
pt3dadd(24.37, -35.21, -88.4, 2.55)
pt3dadd(24.42, -35.16, -88.4, 2.55)
pt3dadd(24.46, -35.11, -88.4, 2.55)
pt3dadd(24.51, -35.01, -88.4, 2.55)
pt3dadd(24.55, -34.9, -88.4, 2.55)
pt3dadd(24.6, -34.81, -88.4, 2.55)
pt3dadd(24.6, -34.7, -88.4, 2.55)
pt3dadd(24.64, -34.65, -88.4, 2.55)
pt3dadd(24.68, -34.55, -88.4, 2.55)
pt3dadd(24.73, -34.5, -88.4, 2.55)
pt3dadd(24.73, -34.4, -88.4, 2.55)
pt3dadd(24.77, -34.35, -88.4, 2.55)
pt3dadd(24.82, -34.3, -88.4, 2.55)
}
}
proc shape3d_75() {
dend[49] { pt3dadd(24.82, -34.2, -88.4, 2.55)
pt3dadd(24.86, -34.15, -88.4, 2.55)
pt3dadd(24.91, -34.04, -88.4, 2.55)
pt3dadd(24.91, -33.94, -88.4, 2.55)
pt3dadd(24.95, -33.89, -88.4, 2.55)
pt3dadd(25, -33.79, -88.4, 2.55)
pt3dadd(25.04, -33.69, -88.4, 2.55)
pt3dadd(25.09, -33.64, -88.4, 2.55)
pt3dadd(24.91, -33.84, -87.35, 2.55)
pt3dadd(24.95, -33.74, -87.35, 2.55)
pt3dadd(25.04, -33.64, -87.35, 2.55)
pt3dadd(25.09, -33.54, -87.35, 2.55)
pt3dadd(25.17, -33.49, -87.35, 2.55)
pt3dadd(25.26, -33.39, -87.35, 2.55)
pt3dadd(25.31, -33.28, -87.35, 2.55)
pt3dadd(25.35, -33.19, -87.35, 2.55)
pt3dadd(25.44, -33.08, -87.35, 2.55)
pt3dadd(25.49, -32.93, -87.35, 2.55)
pt3dadd(25.62, -32.78, -87.35, 2.55)
pt3dadd(25.71, -32.63, -87.35, 2.55)
pt3dadd(25.8, -32.58, -87.35, 2.55)
pt3dadd(25.84, -32.47, -87.35, 2.55)
pt3dadd(25.89, -32.42, -87.35, 2.55)
pt3dadd(25.93, -32.32, -87.35, 2.55)
pt3dadd(26.16, -32.07, -87.35, 2.55)
pt3dadd(26.2, -32.02, -87.35, 2.55)
pt3dadd(26.25, -31.92, -87.35, 2.55)
pt3dadd(26.29, -31.87, -87.35, 2.55)
pt3dadd(26.33, -31.82, -87.35, 2.55)
pt3dadd(26.38, -31.72, -87.35, 2.55)
pt3dadd(26.42, -31.61, -87.35, 2.55)
pt3dadd(26.51, -31.56, -87.35, 2.55)
pt3dadd(26.56, -31.46, -87.35, 2.55)
pt3dadd(26.6, -31.36, -87.35, 2.55)
pt3dadd(26.65, -31.26, -87.35, 2.55)
pt3dadd(26.69, -31.21, -87.35, 2.55)
pt3dadd(26.78, -31.11, -87.35, 2.55)
pt3dadd(26.83, -31.01, -87.35, 2.55)
pt3dadd(26.87, -30.91, -87.35, 2.55)
pt3dadd(26.92, -30.81, -87.35, 2.55)
pt3dadd(27, -30.7, -87.35, 2.55)
pt3dadd(27.09, -30.55, -87.35, 2.55)
pt3dadd(27.18, -30.4, -87.35, 2.55)
pt3dadd(27.32, -30.15, -87.35, 2.55)
pt3dadd(27.36, -30.05, -87.35, 2.55)
pt3dadd(27.5, -29.84, -87.35, 2.55)
pt3dadd(27.58, -29.74, -87.35, 2.55)
pt3dadd(27.63, -29.64, -87.35, 2.55)
pt3dadd(27.72, -29.49, -87.35, 2.55)
pt3dadd(27.76, -29.39, -87.35, 2.55)
pt3dadd(27.85, -29.28, -87.35, 2.55)
pt3dadd(27.9, -29.18, -87.35, 2.55)
pt3dadd(27.99, -29.03, -87.35, 2.55)
pt3dadd(28.03, -28.93, -87.35, 2.55)
pt3dadd(28.08, -28.83, -87.35, 2.55)
pt3dadd(28.16, -28.73, -87.35, 2.55)
pt3dadd(28.21, -28.58, -87.35, 2.55)
pt3dadd(28.3, -28.52, -87.35, 2.55)
pt3dadd(28.34, -28.42, -87.35, 2.55)
pt3dadd(28.39, -28.32, -87.35, 2.55)
pt3dadd(28.43, -28.22, -87.35, 2.55)
pt3dadd(28.52, -28.12, -87.35, 2.55)
pt3dadd(28.57, -28.02, -87.35, 2.55)
pt3dadd(28.61, -27.92, -87.35, 2.55)
pt3dadd(28.65, -27.87, -87.35, 2.55)
pt3dadd(28.83, -27.67, -87.35, 2.55)
pt3dadd(28.83, -27.56, -87.35, 2.55)
pt3dadd(28.92, -27.51, -87.35, 2.55)
pt3dadd(28.97, -27.41, -87.35, 2.55)
pt3dadd(29.01, -27.31, -87.35, 2.55)
pt3dadd(29.06, -27.21, -87.35, 2.55)
pt3dadd(29.15, -27.16, -87.35, 2.55)
pt3dadd(29.19, -27.06, -87.35, 2.55)
pt3dadd(29.19, -26.91, -87.35, 2.55)
pt3dadd(29.28, -26.8, -87.35, 2.55)
pt3dadd(29.32, -26.7, -87.35, 2.55)
pt3dadd(29.37, -26.6, -87.35, 2.55)
pt3dadd(29.41, -26.55, -87.35, 2.55)
pt3dadd(29.45, -26.5, -87.35, 2.55)
pt3dadd(29.5, -26.4, -87.35, 2.55)
pt3dadd(29.59, -26.3, -87.35, 2.55)
pt3dadd(29.64, -26.19, -87.35, 2.55)
pt3dadd(29.68, -26.09, -87.35, 2.55)
pt3dadd(29.72, -26.05, -87.35, 2.55)
pt3dadd(29.77, -25.99, -87.35, 2.55)
pt3dadd(29.81, -25.94, -87.35, 2.55)
pt3dadd(29.81, -25.84, -87.35, 2.55)
pt3dadd(29.86, -25.79, -87.35, 2.55)
pt3dadd(29.9, -25.69, -87.35, 2.55)
pt3dadd(29.95, -25.64, -87.35, 2.55)
pt3dadd(29.99, -25.54, -87.35, 2.55)
pt3dadd(30.03, -25.49, -87.35, 2.55)
pt3dadd(30.08, -25.39, -87.35, 2.55)
pt3dadd(30.13, -25.28, -87.35, 2.55)
pt3dadd(29.86, -25.54, -86.3, 2.55)
pt3dadd(29.86, -25.69, -86.3, 2.55)
pt3dadd(29.95, -25.64, -86.3, 2.55)
pt3dadd(30.13, -25.44, -86.3, 2.55)
pt3dadd(30.17, -25.33, -86.3, 2.55)
pt3dadd(30.22, -25.24, -86.3, 2.55)
pt3dadd(30.3, -25.13, -86.3, 2.55)
pt3dadd(30.35, -25.03, -86.3, 2.55)
pt3dadd(30.44, -24.88, -86.3, 2.55)
pt3dadd(30.48, -24.78, -86.3, 2.55)
pt3dadd(30.52, -24.68, -86.3, 2.55)
pt3dadd(30.66, -24.58, -86.3, 2.55)
pt3dadd(30.7, -24.42, -86.3, 2.55)
pt3dadd(30.75, -24.32, -86.3, 2.55)
pt3dadd(30.84, -24.22, -86.3, 2.55)
pt3dadd(30.88, -24.12, -86.3, 2.55)
pt3dadd(30.93, -23.97, -86.3, 2.55)
pt3dadd(31.02, -23.87, -86.3, 2.55)
pt3dadd(31.02, -23.76, -86.3, 2.55)
pt3dadd(31.1, -23.61, -86.3, 2.55)
pt3dadd(31.15, -23.51, -86.3, 2.55)
pt3dadd(31.24, -23.46, -86.3, 2.55)
pt3dadd(31.28, -23.31, -86.3, 2.55)
pt3dadd(31.33, -23.21, -86.3, 2.55)
pt3dadd(31.42, -23.06, -86.3, 2.55)
pt3dadd(31.46, -22.95, -86.3, 2.55)
pt3dadd(31.51, -22.85, -86.3, 2.55)
pt3dadd(31.55, -22.75, -86.3, 2.55)
pt3dadd(31.64, -22.7, -86.3, 2.55)
pt3dadd(31.68, -22.6, -86.3, 2.55)
pt3dadd(31.73, -22.45, -86.3, 2.55)
pt3dadd(31.82, -22.35, -86.3, 2.55)
pt3dadd(31.86, -22.19, -86.3, 2.55)
pt3dadd(31.91, -22.09, -86.3, 2.55)
pt3dadd(31.95, -21.99, -86.3, 2.55)
pt3dadd(32, -21.94, -86.3, 2.55)
pt3dadd(32.04, -21.79, -86.3, 2.55)
pt3dadd(32.13, -21.69, -86.3, 2.55)
pt3dadd(32.17, -21.59, -86.3, 2.55)
pt3dadd(32.26, -21.49, -86.3, 2.55)
pt3dadd(32.31, -21.39, -86.3, 2.55)
pt3dadd(32.35, -21.28, -86.3, 2.55)
pt3dadd(32.4, -21.18, -86.3, 2.55)
pt3dadd(32.49, -21.08, -86.3, 2.55)
pt3dadd(32.58, -20.98, -86.3, 2.55)
pt3dadd(32.67, -20.78, -86.3, 2.55)
pt3dadd(32.71, -20.68, -86.3, 2.55)
pt3dadd(32.85, -20.58, -86.3, 2.55)
pt3dadd(32.89, -20.42, -86.3, 2.55)
pt3dadd(32.93, -20.27, -86.3, 2.55)
pt3dadd(33.02, -20.12, -86.3, 2.55)
pt3dadd(33.07, -19.97, -86.3, 2.55)
pt3dadd(33.11, -19.87, -86.3, 2.55)
pt3dadd(33.2, -19.72, -86.3, 2.55)
pt3dadd(33.24, -19.56, -86.3, 2.55)
pt3dadd(33.29, -19.46, -86.3, 2.55)
pt3dadd(33.38, -19.36, -86.3, 2.55)
pt3dadd(33.42, -19.21, -86.3, 2.55)
pt3dadd(33.47, -19.11, -86.3, 2.55)
pt3dadd(33.51, -19, -86.3, 2.55)
pt3dadd(33.6, -18.91, -86.3, 2.55)
pt3dadd(33.6, -18.8, -86.3, 2.55)
pt3dadd(33.69, -18.7, -86.3, 2.55)
pt3dadd(33.74, -18.65, -86.3, 2.55)
pt3dadd(33.78, -18.55, -86.3, 2.55)
pt3dadd(33.83, -18.45, -86.3, 2.55)
pt3dadd(33.87, -18.35, -86.3, 2.55)
pt3dadd(33.96, -18.25, -86.3, 2.55)
pt3dadd(34, -18.15, -86.3, 2.55)
pt3dadd(34.05, -18.04, -86.3, 2.55)
pt3dadd(34.09, -17.94, -86.3, 2.55)
pt3dadd(34.14, -17.84, -86.3, 2.55)
pt3dadd(34.18, -17.74, -86.3, 2.55)
pt3dadd(34.23, -17.64, -86.3, 2.55)
pt3dadd(34.27, -17.54, -86.3, 2.55)
pt3dadd(34.31, -17.39, -86.3, 2.55)
pt3dadd(34.36, -17.28, -86.3, 2.55)
pt3dadd(34.4, -17.18, -86.3, 2.55)
pt3dadd(34.45, -17.08, -86.3, 2.55)
pt3dadd(34.49, -16.98, -86.3, 2.55)
pt3dadd(34.58, -16.83, -86.3, 2.55)
pt3dadd(34.63, -16.73, -86.3, 2.55)
pt3dadd(34.67, -16.58, -86.3, 2.55)
pt3dadd(34.72, -16.42, -86.3, 2.55)
pt3dadd(34.81, -16.32, -86.3, 2.55)
pt3dadd(34.85, -16.17, -86.3, 2.55)
pt3dadd(34.85, -16.07, -86.3, 2.55)
pt3dadd(34.94, -15.92, -86.3, 2.55)
pt3dadd(34.99, -15.81, -86.3, 2.55)
pt3dadd(34.99, -15.61, -86.3, 2.55)
pt3dadd(35.07, -15.51, -86.3, 2.55)
pt3dadd(35.12, -15.31, -86.3, 2.55)
pt3dadd(35.16, -15.21, -86.3, 2.55)
pt3dadd(35.21, -15.06, -86.3, 2.55)
pt3dadd(35.3, -14.9, -86.3, 2.55)
pt3dadd(35.34, -14.8, -86.3, 2.55)
pt3dadd(35.38, -14.65, -86.3, 2.55)
pt3dadd(35.43, -14.55, -86.3, 2.55)
pt3dadd(35.47, -14.4, -86.3, 2.55)
pt3dadd(35.52, -14.35, -86.3, 2.55)
pt3dadd(35.56, -14.19, -86.3, 2.55)
pt3dadd(35.61, -14.1, -86.3, 2.55)
pt3dadd(35.65, -13.99, -86.3, 2.55)
pt3dadd(35.7, -13.89, -86.3, 2.55)
pt3dadd(35.79, -13.74, -86.3, 2.55)
pt3dadd(35.79, -13.64, -86.3, 2.55)
}
}
proc shape3d_76() {
dend[49] { pt3dadd(35.88, -13.59, -86.3, 2.55)
pt3dadd(35.92, -13.49, -86.3, 2.55)
pt3dadd(35.92, -13.39, -86.3, 2.55)
pt3dadd(35.97, -13.34, -86.3, 2.55)
pt3dadd(36.01, -13.23, -86.3, 2.55)
pt3dadd(36.06, -13.13, -86.3, 2.55)
pt3dadd(36.1, -12.98, -86.3, 2.55)
pt3dadd(36.19, -12.88, -86.3, 2.55)
pt3dadd(36.19, -12.78, -86.3, 2.55)
pt3dadd(36.23, -12.73, -86.3, 2.55)
pt3dadd(36.28, -12.63, -86.3, 2.55)
pt3dadd(36.32, -12.57, -86.3, 2.55)
pt3dadd(36.32, -12.47, -86.3, 2.55)
pt3dadd(36.37, -12.37, -86.3, 2.55)
pt3dadd(36.41, -12.32, -86.3, 2.55)
pt3dadd(36.41, -12.17, -86.3, 2.55)
pt3dadd(36.46, -12.12, -86.3, 2.55)
pt3dadd(36.46, -11.97, -86.3, 2.55)
pt3dadd(36.37, -11.97, -84.2, 2.55)
pt3dadd(36.37, -12.12, -84.2, 2.55)
pt3dadd(36.41, -12.07, -84.2, 2.55)
pt3dadd(36.46, -11.97, -84.2, 2.55)
pt3dadd(36.5, -11.92, -84.2, 2.55)
pt3dadd(36.54, -11.81, -84.2, 2.55)
pt3dadd(36.68, -11.66, -84.2, 2.55)
pt3dadd(36.72, -11.56, -84.2, 2.55)
pt3dadd(36.77, -11.46, -84.2, 2.55)
pt3dadd(36.81, -11.36, -84.2, 2.55)
pt3dadd(36.86, -11.26, -84.2, 2.55)
pt3dadd(36.9, -11.11, -84.2, 2.55)
pt3dadd(36.99, -11.01, -84.2, 2.55)
pt3dadd(37.03, -10.85, -84.2, 2.55)
pt3dadd(37.13, -10.75, -84.2, 2.55)
pt3dadd(37.17, -10.65, -84.2, 2.55)
pt3dadd(37.21, -10.55, -84.2, 2.55)
pt3dadd(37.26, -10.45, -84.2, 2.55)
pt3dadd(37.35, -10.4, -84.2, 2.55)
pt3dadd(37.39, -10.24, -84.2, 2.55)
pt3dadd(37.44, -10.15, -84.2, 2.55)
pt3dadd(37.53, -9.99, -84.2, 2.55)
pt3dadd(37.57, -9.89, -84.2, 2.55)
pt3dadd(37.66, -9.79, -84.2, 2.55)
pt3dadd(37.71, -9.64, -84.2, 2.55)
pt3dadd(37.75, -9.54, -84.2, 2.55)
pt3dadd(37.79, -9.44, -84.2, 2.55)
pt3dadd(37.84, -9.28, -84.2, 2.55)
pt3dadd(37.88, -9.18, -84.2, 2.55)
pt3dadd(37.97, -9.08, -84.2, 2.55)
pt3dadd(38.01, -8.98, -84.2, 2.55)
pt3dadd(38.06, -8.88, -84.2, 2.55)
pt3dadd(38.15, -8.78, -84.2, 2.55)
pt3dadd(38.24, -8.63, -84.2, 2.55)
pt3dadd(38.28, -8.52, -84.2, 2.55)
pt3dadd(38.33, -8.42, -84.2, 2.55)
pt3dadd(38.42, -8.32, -84.2, 2.55)
pt3dadd(38.46, -8.22, -84.2, 2.55)
pt3dadd(38.51, -8.17, -84.2, 2.55)
pt3dadd(38.6, -8.07, -84.2, 2.55)
pt3dadd(38.64, -7.97, -84.2, 2.55)
pt3dadd(38.69, -7.82, -84.2, 2.55)
pt3dadd(38.73, -7.76, -84.2, 2.55)
pt3dadd(38.82, -7.66, -84.2, 2.55)
pt3dadd(38.86, -7.51, -84.2, 2.55)
pt3dadd(38.91, -7.41, -84.2, 2.55)
pt3dadd(39, -7.31, -84.2, 2.55)
pt3dadd(39.04, -7.26, -84.2, 2.55)
pt3dadd(39.08, -7.11, -84.2, 2.55)
pt3dadd(39.17, -7.01, -84.2, 2.55)
pt3dadd(39.22, -6.9, -84.2, 2.55)
pt3dadd(39.26, -6.75, -84.2, 2.55)
pt3dadd(39.31, -6.65, -84.2, 2.55)
pt3dadd(39.44, -6.55, -84.2, 2.55)
pt3dadd(39.44, -6.45, -84.2, 2.55)
pt3dadd(39.53, -6.35, -84.2, 2.55)
pt3dadd(39.58, -6.2, -84.2, 2.55)
pt3dadd(39.67, -5.99, -84.2, 2.55)
pt3dadd(39.71, -5.89, -84.2, 2.55)
pt3dadd(39.76, -5.79, -84.2, 2.55)
pt3dadd(39.85, -5.69, -84.2, 2.55)
pt3dadd(39.89, -5.59, -84.2, 2.55)
pt3dadd(39.93, -5.49, -84.2, 2.55)
pt3dadd(40.02, -5.39, -84.2, 2.55)
pt3dadd(40.02, -5.28, -84.2, 2.55)
pt3dadd(40.11, -5.18, -84.2, 2.55)
pt3dadd(40.15, -5.08, -84.2, 2.55)
pt3dadd(40.2, -5.03, -84.2, 2.55)
pt3dadd(40.24, -4.93, -84.2, 2.55)
pt3dadd(40.33, -4.78, -84.2, 2.55)
pt3dadd(40.38, -4.68, -84.2, 2.55)
pt3dadd(40.47, -4.57, -84.2, 2.55)
pt3dadd(40.51, -4.47, -84.2, 2.55)
pt3dadd(40.6, -4.42, -84.2, 2.55)
pt3dadd(40.65, -4.32, -84.2, 2.55)
pt3dadd(40.69, -4.17, -84.2, 2.55)
pt3dadd(40.83, -4.02, -84.2, 2.55)
pt3dadd(40.87, -3.91, -84.2, 2.55)
pt3dadd(40.96, -3.82, -84.2, 2.55)
pt3dadd(41, -3.77, -84.2, 2.55)
pt3dadd(41.09, -3.66, -84.2, 2.55)
pt3dadd(41.14, -3.56, -84.2, 2.55)
pt3dadd(41.18, -3.51, -84.2, 2.55)
pt3dadd(41.27, -3.41, -84.2, 2.55)
pt3dadd(41.31, -3.31, -84.2, 2.55)
pt3dadd(41.36, -3.21, -84.2, 2.55)
pt3dadd(41.4, -3.11, -84.2, 2.55)
pt3dadd(41.54, -2.85, -84.2, 2.55)
pt3dadd(41.58, -2.75, -84.2, 2.55)
pt3dadd(41.63, -2.7, -84.2, 2.55)
pt3dadd(41.67, -2.6, -84.2, 2.55)
pt3dadd(41.72, -2.45, -84.2, 2.55)
pt3dadd(41.81, -2.4, -84.2, 2.55)
pt3dadd(41.85, -2.3, -84.2, 2.55)
pt3dadd(41.9, -2.24, -84.2, 2.55)
pt3dadd(41.98, -2.09, -84.2, 2.55)
pt3dadd(42.03, -2.04, -84.2, 2.55)
pt3dadd(42.07, -1.99, -84.2, 2.55)
pt3dadd(42.16, -1.94, -84.2, 2.55)
pt3dadd(42.29, -1.79, -84.2, 2.55)
pt3dadd(42.34, -1.74, -84.2, 2.55)
pt3dadd(42.38, -1.64, -84.2, 2.55)
pt3dadd(42.43, -1.59, -84.2, 2.55)
pt3dadd(42.47, -1.49, -84.2, 2.55)
pt3dadd(42.61, -1.33, -84.2, 2.55)
pt3dadd(42.7, -1.28, -84.2, 2.55)
pt3dadd(42.74, -1.18, -84.2, 2.55)
pt3dadd(42.83, -1.18, -84.2, 2.55)
pt3dadd(42.88, -1.13, -84.2, 2.55)
pt3dadd(42.7, -1.33, -83.15, 2.55)
pt3dadd(42.7, -1.28, -83.15, 2.55)
pt3dadd(42.74, -1.23, -83.15, 2.55)
pt3dadd(42.83, -1.13, -83.15, 2.55)
pt3dadd(42.88, -1.08, -83.15, 2.55)
pt3dadd(43.05, -0.88, -83.15, 2.55)
pt3dadd(43.05, -0.78, -83.15, 2.55)
pt3dadd(43.14, -0.68, -83.15, 2.55)
pt3dadd(43.23, -0.57, -83.15, 2.55)
pt3dadd(43.23, -0.42, -83.15, 2.55)
pt3dadd(43.32, -0.32, -83.15, 2.55)
pt3dadd(43.37, -0.27, -83.15, 2.55)
pt3dadd(43.46, -0.12, -83.15, 2.55)
pt3dadd(43.5, -0.02, -83.15, 2.55)
pt3dadd(43.59, 0.09, -83.15, 2.55)
pt3dadd(43.63, 0.23, -83.15, 2.55)
pt3dadd(43.68, 0.29, -83.15, 2.55)
pt3dadd(43.72, 0.39, -83.15, 2.55)
pt3dadd(43.81, 0.49, -83.15, 2.55)
pt3dadd(43.85, 0.59, -83.15, 2.55)
pt3dadd(43.9, 0.74, -83.15, 2.55)
pt3dadd(43.94, 0.85, -83.15, 2.55)
pt3dadd(43.99, 0.94, -83.15, 2.55)
pt3dadd(44.03, 1.05, -83.15, 2.55)
pt3dadd(44.12, 1.2, -83.15, 2.55)
pt3dadd(44.12, 1.3, -83.15, 2.55)
pt3dadd(44.21, 1.4, -83.15, 2.55)
pt3dadd(44.26, 1.55, -83.15, 2.55)
pt3dadd(44.3, 1.71, -83.15, 2.55)
pt3dadd(44.39, 1.8, -83.15, 2.55)
pt3dadd(44.44, 1.96, -83.15, 2.55)
pt3dadd(44.48, 2.06, -83.15, 2.55)
pt3dadd(44.57, 2.16, -83.15, 2.55)
pt3dadd(44.62, 2.36, -83.15, 2.55)
pt3dadd(44.66, 2.46, -83.15, 2.55)
pt3dadd(44.7, 2.57, -83.15, 2.55)
pt3dadd(44.75, 2.67, -83.15, 2.55)
pt3dadd(44.84, 2.77, -83.15, 2.55)
pt3dadd(44.88, 2.87, -83.15, 2.55)
pt3dadd(44.92, 2.92, -83.15, 2.55)
pt3dadd(45.01, 3.07, -83.15, 2.55)
pt3dadd(45.06, 3.17, -83.15, 2.55)
pt3dadd(45.1, 3.22, -83.15, 2.55)
pt3dadd(45.15, 3.28, -83.15, 2.55)
pt3dadd(45.19, 3.38, -83.15, 2.55)
pt3dadd(45.24, 3.48, -83.15, 2.55)
pt3dadd(45.28, 3.58, -83.15, 2.55)
pt3dadd(45.37, 3.68, -83.15, 2.55)
pt3dadd(45.37, 3.78, -83.15, 2.55)
pt3dadd(45.46, 3.88, -83.15, 2.55)
pt3dadd(45.46, 3.98, -83.15, 2.55)
pt3dadd(45.55, 4.03, -83.15, 2.55)
pt3dadd(45.55, 4.18, -83.15, 2.55)
pt3dadd(45.64, 4.29, -83.15, 2.55)
pt3dadd(45.69, 4.39, -83.15, 2.55)
pt3dadd(45.73, 4.49, -83.15, 2.55)
pt3dadd(45.77, 4.54, -83.15, 2.55)
pt3dadd(45.77, 4.64, -83.15, 2.55)
pt3dadd(45.82, 4.74, -83.15, 2.55)
pt3dadd(45.91, 4.84, -83.15, 2.55)
pt3dadd(45.91, 4.95, -83.15, 2.55)
pt3dadd(45.99, 5.05, -83.15, 2.55)
pt3dadd(46.04, 5.1, -83.15, 2.55)
pt3dadd(46.08, 5.2, -83.15, 2.55)
pt3dadd(46.13, 5.25, -83.15, 2.55)
pt3dadd(46.13, 5.35, -83.15, 2.55)
pt3dadd(46.31, 5.55, -83.15, 2.55)
pt3dadd(46.31, 5.66, -83.15, 2.55)
pt3dadd(46.4, 5.7, -83.15, 2.55)
pt3dadd(46.44, 5.81, -83.15, 2.55)
pt3dadd(46.49, 5.86, -83.15, 2.55)
pt3dadd(46.53, 5.91, -83.15, 2.55)
pt3dadd(46.53, 6.01, -83.15, 2.55)
}
}
proc shape3d_77() {
dend[49] { pt3dadd(46.58, 6.06, -83.15, 2.55)
pt3dadd(46.62, 6.16, -83.15, 2.55)
pt3dadd(46.71, 6.21, -83.15, 2.55)
pt3dadd(46.71, 6.36, -83.15, 2.55)
pt3dadd(46.76, 6.41, -83.15, 2.55)
pt3dadd(46.8, 6.51, -83.15, 2.55)
pt3dadd(46.84, 6.62, -83.15, 2.55)
pt3dadd(46.89, 6.72, -83.15, 2.55)
pt3dadd(46.93, 6.77, -83.15, 2.55)
pt3dadd(46.98, 6.87, -83.15, 2.55)
pt3dadd(47.02, 6.97, -83.15, 2.55)
pt3dadd(47.06, 7.07, -83.15, 2.55)
pt3dadd(47.15, 7.22, -83.15, 2.55)
pt3dadd(47.2, 7.32, -83.15, 2.55)
pt3dadd(47.24, 7.43, -83.15, 2.55)
pt3dadd(47.33, 7.53, -83.15, 2.55)
pt3dadd(47.38, 7.63, -83.15, 2.55)
pt3dadd(47.42, 7.73, -83.15, 2.55)
pt3dadd(47.47, 7.78, -83.15, 2.55)
pt3dadd(47.51, 7.83, -83.15, 2.55)
pt3dadd(47.56, 7.88, -83.15, 2.55)
pt3dadd(47.6, 8.03, -83.15, 2.55)
pt3dadd(47.6, 8.14, -83.15, 2.55)
pt3dadd(47.65, 8.19, -83.15, 2.55)
pt3dadd(47.69, 8.24, -83.15, 2.55)
pt3dadd(47.74, 8.34, -83.15, 2.55)
pt3dadd(47.78, 8.44, -83.15, 2.55)
pt3dadd(47.83, 8.49, -83.15, 2.55)
pt3dadd(47.83, 8.59, -83.15, 2.55)
pt3dadd(47.87, 8.69, -83.15, 2.55)
pt3dadd(47.91, 8.8, -83.15, 2.55)
pt3dadd(47.96, 8.85, -83.15, 2.55)
pt3dadd(48, 8.94, -83.15, 2.55)
pt3dadd(48, 9.05, -83.15, 2.55)
pt3dadd(48.09, 9.2, -83.15, 2.55)
pt3dadd(48.09, 9.35, -83.15, 2.55)
pt3dadd(48.18, 9.5, -83.15, 2.55)
pt3dadd(48.18, 9.7, -83.15, 2.55)
pt3dadd(47.51, 8.54, -81.05, 2.55)
pt3dadd(47.56, 8.59, -81.05, 2.55)
pt3dadd(47.56, 8.69, -81.05, 2.55)
pt3dadd(47.6, 8.74, -81.05, 2.55)
pt3dadd(47.65, 8.85, -81.05, 2.55)
pt3dadd(47.69, 8.94, -81.05, 2.55)
pt3dadd(47.78, 9.05, -81.05, 2.55)
pt3dadd(47.78, 9.15, -81.05, 2.55)
pt3dadd(47.83, 9.25, -81.05, 2.55)
pt3dadd(47.87, 9.35, -81.05, 2.55)
pt3dadd(47.91, 9.4, -81.05, 2.55)
pt3dadd(48, 9.55, -81.05, 2.55)
pt3dadd(48, 9.65, -81.05, 2.55)
pt3dadd(48.13, 9.86, -81.05, 2.55)
pt3dadd(48.18, 9.91, -81.05, 2.55)
pt3dadd(48.22, 10.06, -81.05, 2.55)
pt3dadd(48.27, 10.16, -81.05, 2.55)
pt3dadd(48.36, 10.31, -81.05, 2.55)
pt3dadd(48.4, 10.41, -81.05, 2.55)
pt3dadd(48.54, 10.56, -81.05, 2.55)
pt3dadd(48.58, 10.67, -81.05, 2.55)
pt3dadd(48.63, 10.82, -81.05, 2.55)
pt3dadd(48.72, 10.92, -81.05, 2.55)
pt3dadd(48.76, 11.02, -81.05, 2.55)
pt3dadd(48.81, 11.17, -81.05, 2.55)
pt3dadd(48.85, 11.32, -81.05, 2.55)
pt3dadd(48.94, 11.48, -81.05, 2.55)
pt3dadd(48.98, 11.58, -81.05, 2.55)
pt3dadd(49.03, 11.68, -81.05, 2.55)
pt3dadd(49.07, 11.78, -81.05, 2.55)
pt3dadd(49.12, 11.88, -81.05, 2.55)
pt3dadd(49.16, 12.03, -81.05, 2.55)
pt3dadd(49.21, 12.19, -81.05, 2.55)
pt3dadd(49.25, 12.29, -81.05, 2.55)
pt3dadd(49.29, 12.39, -81.05, 2.55)
pt3dadd(49.34, 12.49, -81.05, 2.55)
pt3dadd(49.38, 12.59, -81.05, 2.55)
pt3dadd(49.43, 12.74, -81.05, 2.55)
pt3dadd(49.47, 12.85, -81.05, 2.55)
pt3dadd(49.52, 12.94, -81.05, 2.55)
pt3dadd(49.52, 13.1, -81.05, 2.55)
pt3dadd(49.56, 13.15, -81.05, 2.55)
pt3dadd(49.61, 13.25, -81.05, 2.55)
pt3dadd(49.65, 13.4, -81.05, 2.55)
pt3dadd(49.74, 13.6, -81.05, 2.55)
pt3dadd(49.78, 13.76, -81.05, 2.55)
pt3dadd(49.83, 13.86, -81.05, 2.55)
pt3dadd(49.88, 13.96, -81.05, 2.55)
pt3dadd(49.92, 14.06, -81.05, 2.55)
pt3dadd(49.92, 14.21, -81.05, 2.55)
pt3dadd(49.97, 14.31, -81.05, 2.55)
pt3dadd(50.01, 14.36, -81.05, 2.55)
pt3dadd(50.01, 14.62, -81.05, 2.55)
pt3dadd(50.05, 14.72, -81.05, 2.55)
pt3dadd(50.05, 14.92, -81.05, 2.55)
pt3dadd(50.1, 15.02, -81.05, 2.55)
pt3dadd(50.14, 15.12, -81.05, 2.55)
pt3dadd(50.14, 15.23, -81.05, 2.55)
pt3dadd(50.19, 15.32, -81.05, 2.55)
pt3dadd(50.19, 15.53, -81.05, 2.55)
pt3dadd(50.23, 15.58, -81.05, 2.55)
pt3dadd(50.28, 15.63, -81.05, 2.55)
pt3dadd(50.32, 15.73, -81.05, 2.55)
pt3dadd(50.32, 15.88, -81.05, 2.55)
pt3dadd(50.37, 15.98, -81.05, 2.55)
pt3dadd(50.41, 16.08, -81.05, 2.55)
pt3dadd(50.46, 16.19, -81.05, 2.55)
pt3dadd(50.5, 16.24, -81.05, 2.55)
pt3dadd(50.5, 16.34, -81.05, 2.55)
pt3dadd(50.54, 16.39, -81.05, 2.55)
pt3dadd(50.37, 16.24, -77.9, 2.55)
pt3dadd(50.41, 16.24, -77.9, 2.55)
pt3dadd(50.41, 16.39, -77.9, 2.55)
pt3dadd(50.46, 16.44, -77.9, 2.55)
pt3dadd(50.5, 16.54, -77.9, 2.55)
pt3dadd(50.54, 16.59, -77.9, 2.55)
pt3dadd(50.59, 16.69, -77.9, 2.55)
pt3dadd(50.59, 16.8, -77.9, 2.55)
pt3dadd(50.63, 16.9, -77.9, 2.55)
pt3dadd(50.68, 17.05, -77.9, 2.55)
pt3dadd(50.72, 17.2, -77.9, 2.55)
pt3dadd(50.77, 17.3, -77.9, 2.55)
pt3dadd(50.81, 17.4, -77.9, 2.55)
pt3dadd(50.85, 17.56, -77.9, 2.55)
pt3dadd(50.85, 17.66, -77.9, 2.55)
pt3dadd(50.9, 17.81, -77.9, 2.55)
pt3dadd(50.94, 17.96, -77.9, 2.55)
pt3dadd(50.94, 18.06, -77.9, 2.55)
pt3dadd(50.99, 18.21, -77.9, 2.55)
pt3dadd(50.99, 18.31, -77.9, 2.55)
pt3dadd(51.03, 18.47, -77.9, 2.55)
pt3dadd(51.08, 18.57, -77.9, 2.55)
pt3dadd(51.12, 18.72, -77.9, 2.55)
pt3dadd(51.12, 18.92, -77.9, 2.55)
pt3dadd(51.17, 19.02, -77.9, 2.55)
pt3dadd(51.21, 19.12, -77.9, 2.55)
pt3dadd(51.26, 19.27, -77.9, 2.55)
pt3dadd(51.26, 19.38, -77.9, 2.55)
pt3dadd(51.3, 19.53, -77.9, 2.55)
pt3dadd(51.35, 19.68, -77.9, 2.55)
pt3dadd(51.35, 19.83, -77.9, 2.55)
pt3dadd(51.39, 19.93, -77.9, 2.55)
pt3dadd(51.44, 20.03, -77.9, 2.55)
pt3dadd(51.44, 20.14, -77.9, 2.55)
pt3dadd(51.48, 20.24, -77.9, 2.55)
pt3dadd(51.48, 20.34, -77.9, 2.55)
pt3dadd(51.53, 20.49, -77.9, 2.55)
pt3dadd(51.53, 20.8, -77.9, 2.55)
pt3dadd(51.57, 20.9, -77.9, 2.55)
pt3dadd(51.61, 21, -77.9, 2.55)
pt3dadd(51.61, 21.15, -77.9, 2.55)
pt3dadd(51.66, 21.25, -77.9, 2.55)
pt3dadd(51.66, 21.5, -77.9, 2.55)
pt3dadd(51.7, 21.6, -77.9, 2.55)
pt3dadd(51.75, 21.76, -77.9, 2.55)
pt3dadd(51.75, 21.86, -77.9, 2.55)
pt3dadd(51.79, 22.01, -77.9, 2.55)
pt3dadd(51.79, 22.21, -77.9, 2.55)
pt3dadd(51.84, 22.36, -77.9, 2.55)
pt3dadd(51.88, 22.52, -77.9, 2.55)
pt3dadd(51.88, 22.62, -77.9, 2.55)
pt3dadd(51.92, 22.67, -77.9, 2.55)
pt3dadd(51.92, 22.82, -77.9, 2.55)
pt3dadd(51.97, 22.92, -77.9, 2.55)
pt3dadd(51.97, 23.02, -77.9, 2.55)
pt3dadd(52.01, 23.17, -77.9, 2.55)
pt3dadd(52.01, 23.33, -77.9, 2.55)
pt3dadd(52.06, 23.43, -77.9, 2.55)
pt3dadd(52.06, 23.88, -77.9, 2.55)
pt3dadd(52.1, 23.93, -77.9, 2.55)
pt3dadd(52.1, 24.14, -77.9, 2.55)
pt3dadd(52.15, 24.19, -77.9, 2.55)
pt3dadd(52.15, 24.39, -77.9, 2.55)
pt3dadd(52.19, 24.44, -77.9, 2.55)
pt3dadd(52.24, 24.49, -77.9, 2.55)
pt3dadd(52.24, 24.59, -77.9, 2.55)
pt3dadd(52.28, 24.64, -77.9, 2.55)
pt3dadd(52.1, 24.24, -77.9, 2.55)
pt3dadd(52.46, 26.32, -77.9, 2.55)
pt3dadd(52.37, 26.11, -74.75, 2.55)
pt3dadd(52.37, 28.14, -74.75, 2.55)
pt3dadd(52.42, 28.24, -74.75, 2.55)
pt3dadd(52.42, 29.35, -74.75, 2.55)
pt3dadd(52.46, 29.45, -74.75, 2.55)
pt3dadd(52.46, 30.16, -74.75, 2.55)
pt3dadd(52.51, 30.26, -74.75, 2.55)
pt3dadd(52.51, 30.52, -74.75, 2.55)
pt3dadd(52.55, 30.62, -74.75, 2.55)
pt3dadd(52.55, 31.43, -74.75, 2.55)
pt3dadd(52.6, 31.48, -74.75, 2.55)
pt3dadd(52.6, 31.68, -74.75, 2.55)
pt3dadd(52.64, 31.73, -74.75, 2.55)
pt3dadd(52.64, 31.89, -74.75, 2.55)
pt3dadd(52.55, 31.58, -71.6, 2.55)
pt3dadd(52.6, 31.73, -71.6, 2.55)
pt3dadd(52.64, 31.78, -71.6, 2.55)
pt3dadd(52.68, 31.93, -71.6, 2.55)
pt3dadd(52.77, 32.03, -71.6, 2.55)
pt3dadd(52.82, 32.14, -71.6, 2.55)
pt3dadd(52.86, 32.29, -71.6, 2.55)
pt3dadd(52.91, 32.44, -71.6, 2.55)
pt3dadd(52.95, 32.54, -71.6, 2.55)
}
}
proc shape3d_78() {
dend[49] { pt3dadd(53.04, 32.74, -71.6, 2.55)
pt3dadd(53.08, 32.85, -71.6, 2.55)
pt3dadd(53.17, 32.95, -71.6, 2.55)
pt3dadd(53.22, 33.05, -71.6, 2.55)
pt3dadd(53.26, 33.2, -71.6, 2.55)
pt3dadd(53.31, 33.3, -71.6, 2.55)
pt3dadd(53.4, 33.56, -71.6, 2.55)
pt3dadd(53.44, 33.66, -71.6, 2.55)
pt3dadd(53.49, 33.76, -71.6, 2.55)
pt3dadd(53.53, 33.91, -71.6, 2.55)
pt3dadd(53.58, 34.06, -71.6, 2.55)
pt3dadd(53.62, 34.21, -71.6, 2.55)
pt3dadd(53.67, 34.31, -71.6, 2.55)
pt3dadd(53.71, 34.42, -71.6, 2.55)
pt3dadd(53.75, 34.57, -71.6, 2.55)
pt3dadd(53.8, 34.67, -71.6, 2.55)
pt3dadd(53.8, 34.82, -71.6, 2.55)
pt3dadd(53.84, 34.97, -71.6, 2.55)
pt3dadd(53.89, 35.02, -71.6, 2.55)
pt3dadd(53.93, 35.17, -71.6, 2.55)
pt3dadd(53.98, 35.33, -71.6, 2.55)
pt3dadd(53.98, 35.43, -71.6, 2.55)
pt3dadd(54.02, 35.53, -71.6, 2.55)
pt3dadd(54.06, 35.68, -71.6, 2.55)
pt3dadd(54.11, 35.78, -71.6, 2.55)
pt3dadd(54.11, 35.94, -71.6, 2.55)
pt3dadd(54.15, 36.04, -71.6, 2.55)
pt3dadd(54.2, 36.19, -71.6, 2.55)
pt3dadd(54.2, 36.34, -71.6, 2.55)
pt3dadd(54.24, 36.44, -71.6, 2.55)
pt3dadd(54.29, 36.59, -71.6, 2.55)
pt3dadd(54.33, 36.74, -71.6, 2.55)
pt3dadd(54.33, 36.9, -71.6, 2.55)
pt3dadd(54.42, 37.05, -71.6, 2.55)
pt3dadd(54.42, 37.15, -71.6, 2.55)
pt3dadd(54.47, 37.25, -71.6, 2.55)
pt3dadd(54.51, 37.4, -71.6, 2.55)
pt3dadd(54.51, 37.51, -71.6, 2.55)
pt3dadd(54.56, 37.6, -71.6, 2.55)
pt3dadd(54.6, 37.71, -71.6, 2.55)
pt3dadd(54.65, 37.81, -71.6, 2.55)
pt3dadd(54.65, 37.91, -71.6, 2.55)
pt3dadd(54.69, 37.96, -71.6, 2.55)
pt3dadd(54.74, 38.11, -71.6, 2.55)
pt3dadd(54.78, 38.21, -71.6, 2.55)
pt3dadd(54.87, 38.31, -71.6, 2.55)
pt3dadd(54.91, 38.42, -71.6, 2.55)
pt3dadd(54.96, 38.52, -71.6, 2.55)
pt3dadd(55.05, 38.57, -71.6, 2.55)
pt3dadd(55.09, 38.67, -71.6, 2.55)
pt3dadd(55.13, 38.77, -71.6, 2.55)
pt3dadd(55.18, 38.87, -71.6, 2.55)
pt3dadd(55.22, 38.92, -71.6, 2.55)
pt3dadd(55.27, 39.03, -71.6, 2.55)
pt3dadd(55.31, 39.08, -71.6, 2.55)
pt3dadd(55.45, 39.23, -71.6, 2.55)
pt3dadd(55.49, 39.33, -71.6, 2.55)
pt3dadd(55.58, 39.38, -71.6, 2.55)
pt3dadd(55.63, 39.48, -71.6, 2.55)
pt3dadd(55.67, 39.53, -71.6, 2.55)
pt3dadd(55.76, 39.58, -71.6, 2.55)
pt3dadd(55.81, 39.63, -71.6, 2.55)
pt3dadd(55.85, 39.68, -71.6, 2.55)
pt3dadd(55.94, 39.78, -71.6, 2.55)
pt3dadd(55.98, 39.83, -71.6, 2.55)
pt3dadd(56.12, 39.88, -71.6, 2.55)
pt3dadd(56.16, 39.94, -71.6, 2.55)
pt3dadd(56.25, 39.99, -71.6, 2.55)
pt3dadd(56.29, 40.04, -71.6, 2.55)
pt3dadd(56.34, 40.09, -71.6, 2.55)
pt3dadd(56.47, 40.09, -71.6, 2.55)
pt3dadd(56.03, 39.88, -67.4, 2.55)
pt3dadd(56.16, 39.88, -67.4, 2.55)
pt3dadd(56.21, 39.94, -67.4, 2.55)
pt3dadd(56.25, 39.99, -67.4, 2.55)
pt3dadd(56.34, 40.04, -67.4, 2.55)
pt3dadd(56.43, 40.04, -67.4, 2.55)
pt3dadd(56.52, 40.14, -67.4, 2.55)
pt3dadd(56.61, 40.19, -67.4, 2.55)
pt3dadd(56.69, 40.34, -67.4, 2.55)
pt3dadd(56.74, 40.39, -67.4, 2.55)
pt3dadd(56.83, 40.49, -67.4, 2.55)
pt3dadd(56.88, 40.54, -67.4, 2.55)
pt3dadd(56.96, 40.65, -67.4, 2.55)
pt3dadd(57.01, 40.74, -67.4, 2.55)
pt3dadd(57.1, 40.79, -67.4, 2.55)
pt3dadd(57.19, 40.9, -67.4, 2.55)
pt3dadd(57.23, 40.95, -67.4, 2.55)
pt3dadd(57.32, 41.05, -67.4, 2.55)
pt3dadd(57.45, 41.15, -67.4, 2.55)
pt3dadd(57.54, 41.2, -67.4, 2.55)
pt3dadd(57.63, 41.3, -67.4, 2.55)
pt3dadd(57.68, 41.4, -67.4, 2.55)
pt3dadd(57.76, 41.46, -67.4, 2.55)
pt3dadd(57.85, 41.61, -67.4, 2.55)
pt3dadd(57.99, 41.71, -67.4, 2.55)
pt3dadd(58.03, 41.86, -67.4, 2.55)
pt3dadd(58.12, 41.96, -67.4, 2.55)
pt3dadd(58.26, 42.06, -67.4, 2.55)
pt3dadd(58.39, 42.22, -67.4, 2.55)
pt3dadd(58.48, 42.37, -67.4, 2.55)
pt3dadd(58.57, 42.47, -67.4, 2.55)
pt3dadd(58.66, 42.57, -67.4, 2.55)
pt3dadd(58.79, 42.77, -67.4, 2.55)
pt3dadd(58.92, 42.87, -67.4, 2.55)
pt3dadd(59.01, 43.03, -67.4, 2.55)
pt3dadd(59.1, 43.13, -67.4, 2.55)
pt3dadd(59.19, 43.23, -67.4, 2.55)
pt3dadd(59.28, 43.33, -67.4, 2.55)
pt3dadd(59.37, 43.43, -67.4, 2.55)
pt3dadd(59.77, 43.88, -67.4, 2.55)
pt3dadd(59.9, 44.04, -67.4, 2.55)
pt3dadd(59.99, 44.14, -67.4, 2.55)
pt3dadd(60.04, 44.24, -67.4, 2.55)
pt3dadd(60.13, 44.29, -67.4, 2.55)
pt3dadd(60.17, 44.39, -67.4, 2.55)
pt3dadd(60.26, 44.44, -67.4, 2.55)
pt3dadd(60.35, 44.54, -67.4, 2.55)
pt3dadd(60.44, 44.65, -67.4, 2.55)
pt3dadd(60.53, 44.74, -67.4, 2.55)
pt3dadd(60.62, 44.9, -67.4, 2.55)
pt3dadd(60.71, 45, -67.4, 2.55)
pt3dadd(60.8, 45.1, -67.4, 2.55)
pt3dadd(60.89, 45.15, -67.4, 2.55)
pt3dadd(60.66, 45, -63.2, 2.55)
pt3dadd(60.75, 45.05, -63.2, 2.55)
pt3dadd(60.8, 45.15, -63.2, 2.55)
pt3dadd(61.06, 45.46, -63.2, 2.55)
pt3dadd(61.15, 45.56, -63.2, 2.55)
pt3dadd(61.33, 45.76, -63.2, 2.55)
pt3dadd(61.42, 45.91, -63.2, 2.55)
pt3dadd(61.47, 46.01, -63.2, 2.55)
pt3dadd(61.56, 46.11, -63.2, 2.55)
pt3dadd(61.65, 46.22, -63.2, 2.55)
pt3dadd(61.73, 46.26, -63.2, 2.55)
pt3dadd(61.78, 46.37, -63.2, 2.55)
pt3dadd(61.91, 46.52, -63.2, 2.55)
pt3dadd(62, 46.62, -63.2, 2.55)
pt3dadd(62.18, 46.82, -63.2, 2.55)
pt3dadd(62.22, 46.92, -63.2, 2.55)
pt3dadd(62.31, 47.08, -63.2, 2.55)
pt3dadd(62.49, 47.28, -63.2, 2.55)
pt3dadd(62.63, 47.53, -63.2, 2.55)
pt3dadd(62.76, 47.68, -63.2, 2.55)
pt3dadd(62.85, 47.78, -63.2, 2.55)
pt3dadd(62.89, 47.88, -63.2, 2.55)
pt3dadd(62.94, 47.99, -63.2, 2.55)
pt3dadd(62.98, 48.09, -63.2, 2.55)
pt3dadd(63.03, 48.19, -63.2, 2.55)
pt3dadd(63.12, 48.24, -63.2, 2.55)
pt3dadd(63.16, 48.34, -63.2, 2.55)
pt3dadd(63.21, 48.49, -63.2, 2.55)
pt3dadd(63.29, 48.65, -63.2, 2.55)
pt3dadd(63.38, 48.74, -63.2, 2.55)
pt3dadd(63.47, 48.85, -63.2, 2.55)
pt3dadd(63.52, 49, -63.2, 2.55)
pt3dadd(63.56, 49.1, -63.2, 2.55)
pt3dadd(63.65, 49.2, -63.2, 2.55)
pt3dadd(63.74, 49.35, -63.2, 2.55)
pt3dadd(63.83, 49.46, -63.2, 2.55)
pt3dadd(63.87, 49.56, -63.2, 2.55)
pt3dadd(64.01, 49.71, -63.2, 2.55)
pt3dadd(64.05, 49.81, -63.2, 2.55)
pt3dadd(64.1, 49.86, -63.2, 2.55)
pt3dadd(64.14, 49.96, -63.2, 2.55)
pt3dadd(64.23, 50.06, -63.2, 2.55)
pt3dadd(64.28, 50.22, -63.2, 2.55)
pt3dadd(64.32, 50.31, -63.2, 2.55)
pt3dadd(64.36, 50.42, -63.2, 2.55)
pt3dadd(64.5, 50.57, -63.2, 2.55)
pt3dadd(64.54, 50.67, -63.2, 2.55)
pt3dadd(64.59, 50.77, -63.2, 2.55)
pt3dadd(64.72, 50.92, -63.2, 2.55)
pt3dadd(64.76, 51.03, -63.2, 2.55)
pt3dadd(64.81, 51.13, -63.2, 2.55)
pt3dadd(64.86, 51.18, -63.2, 2.55)
pt3dadd(64.9, 51.28, -63.2, 2.55)
pt3dadd(64.99, 51.23, -59, 2.55)
pt3dadd(65.03, 51.33, -59, 2.55)
pt3dadd(65.08, 51.38, -59, 2.55)
pt3dadd(65.17, 51.53, -59, 2.55)
pt3dadd(65.25, 51.63, -59, 2.55)
pt3dadd(65.35, 51.88, -59, 2.55)
pt3dadd(65.39, 51.99, -59, 2.55)
pt3dadd(65.48, 52.09, -59, 2.55)
pt3dadd(65.52, 52.24, -59, 2.55)
pt3dadd(65.57, 52.34, -59, 2.55)
pt3dadd(65.66, 52.49, -59, 2.55)
pt3dadd(65.7, 52.65, -59, 2.55)
pt3dadd(65.79, 52.8, -59, 2.55)
pt3dadd(65.83, 52.9, -59, 2.55)
pt3dadd(65.93, 53.05, -59, 2.55)
pt3dadd(65.97, 53.2, -59, 2.55)
pt3dadd(66.01, 53.3, -59, 2.55)
pt3dadd(66.1, 53.4, -59, 2.55)
pt3dadd(66.15, 53.56, -59, 2.55)
pt3dadd(66.24, 53.66, -59, 2.55)
pt3dadd(66.24, 53.81, -59, 2.55)
pt3dadd(66.32, 53.91, -59, 2.55)
pt3dadd(66.37, 54.01, -59, 2.55)
}
}
proc shape3d_79() {
dend[49] { pt3dadd(66.46, 54.26, -59, 2.55)
pt3dadd(66.5, 54.37, -59, 2.55)
pt3dadd(66.59, 54.52, -59, 2.55)
pt3dadd(66.64, 54.67, -59, 2.55)
pt3dadd(66.68, 54.77, -59, 2.55)
pt3dadd(66.77, 54.92, -59, 2.55)
pt3dadd(66.82, 55.08, -59, 2.55)
pt3dadd(66.86, 55.23, -59, 2.55)
pt3dadd(66.9, 55.33, -59, 2.55)
pt3dadd(67, 55.38, -59, 2.55)
pt3dadd(67.04, 55.53, -59, 2.55)
pt3dadd(67.08, 55.58, -59, 2.55)
pt3dadd(67.17, 55.74, -59, 2.55)
pt3dadd(67.22, 55.83, -59, 2.55)
pt3dadd(67.26, 55.94, -59, 2.55)
pt3dadd(67.31, 55.99, -59, 2.55)
pt3dadd(67.39, 56.14, -59, 2.55)
pt3dadd(67.44, 56.24, -59, 2.55)
pt3dadd(67.57, 56.39, -59, 2.55)
pt3dadd(67.62, 56.49, -59, 2.55)
pt3dadd(67.71, 56.6, -59, 2.55)
pt3dadd(67.75, 56.69, -59, 2.55)
pt3dadd(67.8, 56.8, -59, 2.55)
pt3dadd(67.84, 56.85, -59, 2.55)
pt3dadd(67.93, 57, -59, 2.55)
pt3dadd(67.97, 57.05, -59, 2.55)
pt3dadd(68.02, 57.15, -59, 2.55)
pt3dadd(68.11, 57.3, -59, 2.55)
pt3dadd(68.15, 57.4, -59, 2.55)
pt3dadd(68.29, 57.51, -59, 2.55)
pt3dadd(68.29, 57.61, -59, 2.55)
pt3dadd(68.38, 57.71, -59, 2.55)
pt3dadd(68.42, 57.86, -59, 2.55)
pt3dadd(68.46, 57.91, -59, 2.55)
pt3dadd(68.56, 58.01, -59, 2.55)
pt3dadd(68.56, 58.12, -59, 2.55)
pt3dadd(68.64, 58.17, -59, 2.55)
pt3dadd(68.69, 58.22, -59, 2.55)
pt3dadd(68.73, 58.26, -59, 2.55)
pt3dadd(68.78, 58.37, -59, 2.55)
pt3dadd(68.82, 58.47, -59, 2.55)
pt3dadd(68.91, 58.52, -59, 2.55)
pt3dadd(68.96, 58.62, -59, 2.55)
pt3dadd(69.04, 58.72, -59, 2.55)
pt3dadd(69.09, 58.82, -59, 2.55)
pt3dadd(69.18, 58.92, -59, 2.55)
pt3dadd(69.22, 59.03, -59, 2.55)
pt3dadd(69.27, 59.13, -59, 2.55)
pt3dadd(69.36, 59.18, -59, 2.55)
pt3dadd(69.4, 59.23, -59, 2.55)
pt3dadd(69.45, 59.28, -59, 2.55)
pt3dadd(69.49, 59.38, -59, 2.55)
pt3dadd(69.54, 59.48, -59, 2.55)
pt3dadd(69.58, 59.58, -59, 2.55)
pt3dadd(69.63, 59.63, -59, 2.55)
pt3dadd(69.67, 59.68, -59, 2.55)
pt3dadd(69.71, 59.74, -59, 2.55)
pt3dadd(69.71, 59.83, -59, 2.55)
pt3dadd(69.63, 59.48, -56.9, 2.55)
pt3dadd(69.67, 59.53, -56.9, 2.55)
pt3dadd(69.67, 59.63, -56.9, 2.55)
pt3dadd(69.71, 59.74, -56.9, 2.55)
pt3dadd(69.76, 59.83, -56.9, 2.55)
pt3dadd(69.8, 59.99, -56.9, 2.55)
pt3dadd(69.8, 60.09, -56.9, 2.55)
pt3dadd(69.85, 60.19, -56.9, 2.55)
pt3dadd(69.89, 60.29, -56.9, 2.55)
pt3dadd(69.89, 60.39, -56.9, 2.55)
pt3dadd(69.94, 60.49, -56.9, 2.55)
pt3dadd(69.94, 60.65, -56.9, 2.55)
pt3dadd(69.98, 60.8, -56.9, 2.55)
pt3dadd(70.03, 60.85, -56.9, 2.55)
pt3dadd(70.03, 61.1, -56.9, 2.55)
pt3dadd(70.07, 61.15, -56.9, 2.55)
pt3dadd(70.07, 61.46, -56.9, 2.55)
pt3dadd(70.11, 61.56, -56.9, 2.55)
pt3dadd(70.11, 61.86, -56.9, 2.55)
pt3dadd(70.16, 61.96, -56.9, 2.55)
pt3dadd(70.16, 62.22, -56.9, 2.55)
pt3dadd(70.21, 62.26, -56.9, 2.55)
pt3dadd(70.21, 62.47, -56.9, 2.55)
pt3dadd(70.25, 62.62, -56.9, 2.55)
pt3dadd(70.25, 62.77, -56.9, 2.55)
pt3dadd(70.29, 62.92, -56.9, 2.55)
pt3dadd(70.34, 63.08, -56.9, 2.55)
pt3dadd(70.38, 63.18, -56.9, 2.55)
pt3dadd(70.43, 63.33, -56.9, 2.55)
pt3dadd(70.43, 63.48, -56.9, 2.55)
pt3dadd(70.47, 63.58, -56.9, 2.55)
pt3dadd(70.52, 63.78, -56.9, 2.55)
pt3dadd(70.56, 63.89, -56.9, 2.55)
pt3dadd(70.61, 64.04, -56.9, 2.55)
pt3dadd(70.65, 64.14, -56.9, 2.55)
pt3dadd(70.69, 64.24, -56.9, 2.55)
pt3dadd(70.69, 64.34, -56.9, 2.55)
pt3dadd(70.74, 64.39, -53.75, 2.55)
pt3dadd(70.79, 64.5, -53.75, 2.55)
pt3dadd(70.83, 64.6, -53.75, 2.55)
pt3dadd(70.87, 64.7, -53.75, 2.55)
pt3dadd(70.87, 65, -53.75, 2.55)
pt3dadd(70.92, 65.15, -53.75, 2.55)
pt3dadd(70.96, 65.36, -53.75, 2.55)
pt3dadd(70.96, 65.51, -53.75, 2.55)
pt3dadd(71.01, 65.66, -53.75, 2.55)
pt3dadd(71.01, 65.81, -53.75, 2.55)
pt3dadd(71.05, 65.91, -53.75, 2.55)
pt3dadd(71.1, 66.07, -53.75, 2.55)
pt3dadd(71.18, 66.32, -53.75, 2.55)
pt3dadd(71.23, 66.42, -53.75, 2.55)
pt3dadd(71.28, 66.52, -53.75, 2.55)
pt3dadd(71.32, 66.62, -53.75, 2.55)
pt3dadd(71.41, 66.77, -53.75, 2.55)
pt3dadd(71.45, 66.88, -53.75, 2.55)
pt3dadd(71.5, 66.97, -53.75, 2.55)
pt3dadd(71.59, 67.13, -53.75, 2.55)
pt3dadd(71.63, 67.28, -53.75, 2.55)
pt3dadd(71.68, 67.38, -53.75, 2.55)
pt3dadd(71.76, 67.53, -53.75, 2.55)
pt3dadd(71.81, 67.63, -53.75, 2.55)
pt3dadd(71.86, 67.68, -53.75, 2.55)
pt3dadd(71.94, 67.79, -53.75, 2.55)
pt3dadd(72.03, 67.83, -53.75, 2.55)
pt3dadd(72.08, 67.99, -53.75, 2.55)
pt3dadd(72.12, 68.09, -53.75, 2.55)
pt3dadd(72.17, 68.14, -53.75, 2.55)
pt3dadd(72.35, 68.34, -53.75, 2.55)
pt3dadd(72.43, 68.44, -53.75, 2.55)
pt3dadd(72.52, 68.54, -53.75, 2.55)
pt3dadd(72.61, 68.7, -53.75, 2.55)
pt3dadd(72.66, 68.8, -53.75, 2.55)
pt3dadd(72.7, 68.9, -53.75, 2.55)
pt3dadd(72.75, 69, -53.75, 2.55)
pt3dadd(72.79, 69.1, -53.75, 2.55)
pt3dadd(72.88, 69.2, -53.75, 2.55)
pt3dadd(72.93, 69.31, -53.75, 2.55)
pt3dadd(73.01, 69.46, -53.75, 2.55)
pt3dadd(73.06, 69.56, -53.75, 2.55)
pt3dadd(73.15, 69.66, -53.75, 2.55)
pt3dadd(73.19, 69.76, -53.75, 2.55)
pt3dadd(73.24, 69.86, -53.75, 2.55)
pt3dadd(73.28, 69.91, -53.75, 2.55)
pt3dadd(73.37, 70.01, -53.75, 2.55)
pt3dadd(73.42, 70.11, -53.75, 2.55)
pt3dadd(73.46, 70.21, -53.75, 2.55)
pt3dadd(73.5, 70.32, -53.75, 2.55)
pt3dadd(73.55, 70.42, -53.75, 2.55)
pt3dadd(73.64, 70.52, -53.75, 2.55)
pt3dadd(73.68, 70.67, -53.75, 2.55)
pt3dadd(73.72, 70.82, -53.75, 2.55)
pt3dadd(73.82, 70.93, -53.75, 2.55)
pt3dadd(73.9, 71.13, -53.75, 2.55)
pt3dadd(73.99, 71.33, -53.75, 2.55)
pt3dadd(74.08, 71.48, -53.75, 2.55)
pt3dadd(74.13, 71.68, -53.75, 2.55)
pt3dadd(74.17, 71.84, -53.75, 2.55)
pt3dadd(74.26, 71.94, -53.75, 2.55)
pt3dadd(74.31, 72.09, -53.75, 2.55)
pt3dadd(74.35, 72.24, -53.75, 2.55)
pt3dadd(74.44, 72.34, -53.75, 2.55)
pt3dadd(74.49, 72.5, -53.75, 2.55)
pt3dadd(74.57, 72.65, -53.75, 2.55)
pt3dadd(74.62, 72.8, -53.75, 2.55)
pt3dadd(74.71, 72.95, -53.75, 2.55)
pt3dadd(74.79, 73.1, -53.75, 2.55)
pt3dadd(74.84, 73.25, -53.75, 2.55)
pt3dadd(74.89, 73.36, -53.75, 2.55)
pt3dadd(74.97, 73.46, -53.75, 2.55)
pt3dadd(75.02, 73.61, -53.75, 2.55)
pt3dadd(75.06, 73.76, -53.75, 2.55)
pt3dadd(75.15, 73.86, -53.75, 2.55)
pt3dadd(75.2, 73.96, -53.75, 2.55)
pt3dadd(75.24, 74.11, -53.75, 2.55)
pt3dadd(75.33, 74.22, -53.75, 2.55)
pt3dadd(75.38, 74.32, -53.75, 2.55)
pt3dadd(75.42, 74.47, -53.75, 2.55)
pt3dadd(75.51, 74.62, -53.75, 2.55)
pt3dadd(75.56, 74.72, -53.75, 2.55)
pt3dadd(75.6, 74.82, -53.75, 2.55)
pt3dadd(75.64, 74.93, -53.75, 2.55)
pt3dadd(75.69, 75.03, -53.75, 2.55)
pt3dadd(75.73, 75.13, -53.75, 2.55)
pt3dadd(75.78, 75.23, -53.75, 2.55)
pt3dadd(75.82, 75.33, -53.75, 2.55)
pt3dadd(75.86, 75.43, -53.75, 2.55)
pt3dadd(75.91, 75.53, -53.75, 2.55)
pt3dadd(75.96, 75.64, -53.75, 2.55)
pt3dadd(75.96, 75.74, -53.75, 2.55)
pt3dadd(76, 75.84, -53.75, 2.55)
pt3dadd(76.04, 75.94, -53.75, 2.55)
pt3dadd(76.09, 76.04, -53.75, 2.55)
pt3dadd(76.13, 76.09, -53.75, 2.55)
pt3dadd(76.13, 76.24, -53.75, 2.55)
pt3dadd(76.18, 76.34, -53.75, 2.55)
pt3dadd(76.22, 76.44, -53.75, 2.55)
pt3dadd(76.27, 76.54, -53.75, 2.55)
pt3dadd(76.31, 76.65, -53.75, 2.55)
pt3dadd(76.31, 76.75, -53.75, 2.55)
pt3dadd(76.18, 76.6, -53.75, 2.55)
pt3dadd(76.18, 78.97, -53.75, 2.55)
pt3dadd(76.13, 79.13, -53.75, 2.55)
}
}
proc shape3d_80() {
dend[49] { pt3dadd(76.13, 79.33, -53.75, 2.55)
pt3dadd(76.04, 79.43, -53.75, 2.55)
pt3dadd(76, 79.53, -53.75, 2.55)
pt3dadd(76, 79.74, -53.75, 2.55)
pt3dadd(75.96, 79.84, -53.75, 2.55)
pt3dadd(75.91, 79.99, -53.75, 2.55)
pt3dadd(75.86, 80.09, -53.75, 2.55)
pt3dadd(75.78, 80.34, -53.75, 2.55)
pt3dadd(75.73, 80.44, -53.75, 2.55)
pt3dadd(75.69, 80.54, -53.75, 2.55)
pt3dadd(75.64, 80.65, -53.75, 2.55)
pt3dadd(75.64, 80.85, -53.75, 2.55)
pt3dadd(75.6, 80.9, -53.75, 2.55)
pt3dadd(75.6, 81, -53.75, 2.55)
pt3dadd(75.56, 81.1, -53.75, 2.55)
pt3dadd(75.51, 81.21, -53.75, 2.55)
pt3dadd(75.51, 82.11, -53.75, 2.55)
pt3dadd(75.46, 82.22, -53.75, 2.55)
pt3dadd(75.46, 84.04, -53.75, 2.55)
pt3dadd(75.51, 84.14, -53.75, 2.55)
pt3dadd(75.51, 84.24, -53.75, 2.55)
pt3dadd(75.56, 84.34, -53.75, 2.55)
pt3dadd(75.6, 84.6, -53.75, 2.55)
pt3dadd(75.64, 84.75, -53.75, 2.55)
pt3dadd(75.69, 84.9, -53.75, 2.55)
pt3dadd(75.73, 85.1, -53.75, 2.55)
pt3dadd(75.73, 85.31, -53.75, 2.55)
pt3dadd(75.78, 85.41, -53.75, 2.9)
pt3dadd(75.82, 85.51, -53.75, 2.55)
pt3dadd(75.86, 85.61, -53.75, 2.55)
pt3dadd(75.86, 85.86, -53.75, 2.55)
pt3dadd(75.91, 85.91, -53.75, 2.55)
pt3dadd(75.96, 86.01, -53.75, 2.55)
pt3dadd(75.96, 86.17, -53.75, 2.55)
pt3dadd(76, 86.27, -53.75, 2.55)
pt3dadd(76.04, 86.37, -53.75, 2.9)
pt3dadd(76.04, 86.47, -53.75, 2.55)
pt3dadd(76.09, 86.62, -53.75, 2.55)
pt3dadd(76.13, 86.72, -53.75, 2.55)
pt3dadd(76.13, 86.88, -53.75, 2.55)
pt3dadd(76.18, 86.98, -53.75, 2.9)
pt3dadd(76.22, 87.18, -53.75, 2.55)
pt3dadd(76.27, 87.28, -53.75, 2.55)
pt3dadd(76.27, 87.38, -53.75, 2.55)
pt3dadd(76.31, 87.48, -53.75, 2.55)
pt3dadd(76.36, 87.53, -53.75, 2.55)
pt3dadd(76.4, 87.64, -53.75, 2.55)
pt3dadd(76.4, 87.79, -53.75, 2.55)
pt3dadd(76.44, 87.89, -53.75, 2.55)
pt3dadd(76.49, 87.99, -53.75, 2.55)
pt3dadd(76.54, 88.04, -53.75, 2.55)
pt3dadd(76.54, 88.14, -53.75, 2.55)
pt3dadd(76.58, 88.19, -53.75, 2.55)
pt3dadd(76.63, 88.24, -53.75, 2.55)
pt3dadd(76.67, 88.35, -53.75, 2.55)
pt3dadd(76.71, 88.44, -53.75, 2.55)
pt3dadd(76.76, 88.5, -53.75, 2.55)
pt3dadd(76.8, 88.6, -53.75, 2.55)
pt3dadd(76.89, 88.7, -53.75, 2.55)
pt3dadd(76.93, 88.8, -53.75, 2.55)
pt3dadd(76.98, 88.9, -53.75, 2.55)
pt3dadd(77.03, 88.95, -53.75, 2.55)
pt3dadd(77.11, 89, -53.75, 2.55)
pt3dadd(77.16, 89.05, -53.75, 2.55)
pt3dadd(77.25, 89.21, -53.75, 2.55)
pt3dadd(77.25, 89.41, -53.75, 2.55)
pt3dadd(77.16, 89.51, -53.75, 2.55)
pt3dadd(77.16, 90.32, -53.75, 2.55)
pt3dadd(77.07, 90.42, -53.75, 2.55)
pt3dadd(76.98, 90.52, -53.75, 2.55)
pt3dadd(76.89, 90.62, -53.75, 3)
pt3dadd(75.82, 90.62, -53.75, 2.9)
pt3dadd(72.81, 91.13, 0, 0.56)
}
dend[50] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(64.37, 92.35, 3.3, 3.48)
pt3dadd(63.71, 92.31, 3.3, 3.48)
pt3dadd(63.6, 92.26, 3.3, 3.48)
pt3dadd(61.16, 92.26, 3.3, 3.48)
pt3dadd(61.09, 92.31, 3.3, 3.48)
pt3dadd(60.85, 92.31, 3.3, 3.48)
pt3dadd(60.78, 92.35, 3.3, 3.48)
pt3dadd(60.67, 92.35, 3.3, 3.48)
pt3dadd(60.64, 92.38, 3.3, 3.48)
pt3dadd(60.6, 92.38, 3.3, 3.48)
pt3dadd(60.6, 92.18, 6.3, 3.48)
pt3dadd(60.05, 92.18, 6.3, 3.48)
pt3dadd(60.01, 92.15, 6.3, 3.48)
pt3dadd(59.88, 92.11, 6.3, 3.48)
pt3dadd(59.81, 92.07, 6.3, 3.48)
pt3dadd(59.74, 92.07, 6.3, 3.48)
pt3dadd(59.63, 92.03, 6.3, 3.48)
pt3dadd(59.56, 91.95, 6.3, 3.48)
pt3dadd(59.49, 91.91, 6.3, 3.48)
pt3dadd(59.42, 91.87, 6.3, 3.48)
pt3dadd(59.21, 91.75, 6.3, 3.48)
pt3dadd(59.14, 91.67, 6.3, 3.48)
pt3dadd(59.04, 91.59, 6.3, 3.48)
pt3dadd(58.93, 91.47, 6.3, 3.48)
pt3dadd(58.83, 91.43, 6.3, 3.48)
pt3dadd(58.65, 91.24, 6.3, 3.48)
pt3dadd(58.58, 91.16, 6.3, 3.48)
pt3dadd(58.51, 91.12, 6.3, 3.48)
pt3dadd(58.48, 91.04, 6.3, 3.48)
pt3dadd(58.41, 91, 6.3, 3.48)
pt3dadd(58.34, 90.92, 6.3, 3.48)
pt3dadd(58.31, 90.88, 6.3, 3.48)
pt3dadd(58.27, 90.8, 6.3, 3.48)
pt3dadd(58.2, 90.76, 6.3, 3.48)
pt3dadd(58.1, 90.64, 6.3, 3.48)
pt3dadd(58.06, 90.6, 6.3, 3.48)
pt3dadd(57.99, 90.56, 6.3, 3.48)
pt3dadd(57.89, 90.49, 6.3, 3.48)
pt3dadd(57.82, 90.4, 6.3, 3.48)
pt3dadd(57.75, 90.36, 6.3, 3.48)
pt3dadd(57.68, 90.25, 6.3, 3.48)
pt3dadd(57.61, 90.21, 6.3, 3.48)
pt3dadd(57.54, 90.13, 6.3, 3.48)
pt3dadd(57.51, 90.09, 6.3, 3.48)
pt3dadd(57.44, 90.01, 6.3, 3.48)
pt3dadd(57.4, 89.97, 6.3, 3.48)
pt3dadd(57.26, 89.81, 6.3, 3.48)
pt3dadd(57.23, 89.73, 6.3, 3.48)
pt3dadd(57.16, 89.69, 6.3, 3.48)
pt3dadd(57.05, 89.65, 6.3, 3.48)
pt3dadd(57.02, 89.61, 6.3, 3.48)
pt3dadd(56.91, 89.57, 6.3, 3.48)
pt3dadd(56.88, 89.5, 6.3, 3.48)
pt3dadd(56.81, 89.46, 6.3, 3.48)
pt3dadd(56.7, 89.42, 6.3, 3.48)
pt3dadd(56.63, 89.34, 6.3, 3.48)
pt3dadd(56.53, 89.3, 6.3, 3.48)
pt3dadd(56.46, 89.18, 6.3, 3.48)
pt3dadd(56.39, 89.14, 6.3, 3.48)
pt3dadd(56.35, 89.1, 6.3, 3.48)
pt3dadd(56.32, 89.06, 6.3, 3.48)
pt3dadd(56.25, 89.02, 6.3, 3.48)
pt3dadd(56.15, 88.98, 6.3, 3.48)
pt3dadd(56.08, 88.9, 6.3, 3.48)
pt3dadd(56.01, 88.82, 6.3, 3.48)
pt3dadd(55.94, 88.74, 6.3, 3.48)
pt3dadd(55.87, 88.67, 6.3, 3.48)
pt3dadd(55.8, 88.58, 6.3, 3.48)
pt3dadd(55.76, 88.54, 6.3, 3.48)
pt3dadd(55.73, 88.5, 6.3, 3.48)
pt3dadd(55.66, 88.47, 6.3, 3.48)
pt3dadd(55.62, 88.43, 6.3, 3.48)
pt3dadd(55.59, 88.47, 6.3, 3.48)
pt3dadd(55.59, 88.58, 6.3, 3.48)
pt3dadd(55.76, 88.63, 9.3, 3.48)
pt3dadd(55.73, 88.54, 9.3, 3.48)
pt3dadd(55.66, 88.47, 9.3, 3.48)
pt3dadd(55.62, 88.35, 9.3, 3.48)
pt3dadd(55.56, 88.27, 9.3, 3.48)
pt3dadd(55.52, 88.23, 9.3, 3.48)
pt3dadd(55.49, 88.19, 9.3, 3.48)
pt3dadd(55.45, 88.11, 9.3, 3.48)
pt3dadd(55.42, 88.03, 9.3, 3.48)
pt3dadd(55.35, 87.95, 9.3, 3.48)
pt3dadd(55.31, 87.87, 9.3, 3.48)
pt3dadd(55.24, 87.83, 9.3, 3.48)
pt3dadd(55.17, 87.75, 9.3, 3.48)
pt3dadd(55.13, 87.68, 9.3, 3.48)
pt3dadd(55.1, 87.6, 9.3, 3.48)
pt3dadd(55.07, 87.56, 9.3, 3.48)
pt3dadd(55, 87.48, 9.3, 3.48)
pt3dadd(54.96, 87.4, 9.3, 3.48)
pt3dadd(54.89, 87.2, 9.3, 3.48)
pt3dadd(54.79, 87.08, 9.3, 3.48)
pt3dadd(54.79, 86.96, 9.3, 3.48)
pt3dadd(54.72, 86.88, 9.3, 3.48)
pt3dadd(54.68, 86.76, 9.3, 3.48)
pt3dadd(54.65, 86.68, 9.3, 3.48)
pt3dadd(54.58, 86.57, 9.3, 3.48)
pt3dadd(54.54, 86.49, 9.3, 3.48)
pt3dadd(54.51, 86.37, 9.3, 3.48)
pt3dadd(54.47, 86.29, 9.3, 3.48)
pt3dadd(54.4, 86.21, 9.3, 3.48)
pt3dadd(54.4, 86.13, 9.3, 3.48)
pt3dadd(54.33, 86.05, 9.3, 3.48)
pt3dadd(54.3, 85.97, 9.3, 3.48)
pt3dadd(54.26, 85.89, 9.3, 3.48)
pt3dadd(54.19, 85.82, 9.3, 3.48)
pt3dadd(54.16, 85.7, 9.3, 3.48)
pt3dadd(54.13, 85.62, 9.3, 3.48)
pt3dadd(54.09, 85.54, 9.3, 3.48)
pt3dadd(54.02, 85.46, 9.3, 3.48)
pt3dadd(53.99, 85.34, 9.3, 3.48)
pt3dadd(53.95, 85.3, 9.3, 3.48)
pt3dadd(53.88, 85.22, 9.3, 3.48)
pt3dadd(53.85, 85.14, 9.3, 3.48)
pt3dadd(53.85, 85.02, 9.3, 3.48)
pt3dadd(53.78, 84.94, 9.3, 3.48)
pt3dadd(53.74, 84.82, 9.3, 3.48)
pt3dadd(53.71, 84.75, 9.3, 3.48)
pt3dadd(53.67, 84.67, 9.3, 3.48)
pt3dadd(53.67, 84.59, 9.3, 3.48)
pt3dadd(53.64, 84.51, 9.3, 3.48)
pt3dadd(53.6, 84.43, 9.3, 3.48)
pt3dadd(53.57, 84.35, 9.3, 3.48)
pt3dadd(53.53, 84.27, 9.3, 3.48)
}
}
proc shape3d_81() {
dend[50] { pt3dadd(53.5, 84.19, 9.3, 3.48)
pt3dadd(53.47, 84.11, 9.3, 3.48)
pt3dadd(53.43, 84, 9.3, 3.48)
pt3dadd(53.4, 83.92, 9.3, 3.48)
pt3dadd(53.36, 83.84, 9.3, 3.48)
pt3dadd(53.36, 83.48, 9.3, 3.48)
pt3dadd(53.33, 83.4, 9.3, 3.48)
pt3dadd(53.33, 83.13, 9.3, 3.48)
pt3dadd(53.29, 83.04, 9.3, 3.48)
pt3dadd(53.29, 81.58, 9.3, 3.48)
pt3dadd(53.26, 81.62, 9.3, 3.48)
pt3dadd(53.26, 81.74, 9.3, 3.48)
pt3dadd(53.22, 81.9, 9.3, 3.48)
pt3dadd(53.22, 82.21, 9.3, 3.48)
pt3dadd(53.22, 81.66, 11.3, 3.48)
pt3dadd(53.22, 81.58, 11.3, 3.48)
pt3dadd(53.15, 81.5, 11.3, 3.48)
pt3dadd(53.15, 81.38, 11.3, 3.48)
pt3dadd(53.12, 81.31, 11.3, 3.48)
pt3dadd(53.04, 81.22, 11.3, 3.48)
pt3dadd(53.04, 81.11, 11.3, 3.48)
pt3dadd(52.97, 81.03, 11.3, 3.48)
pt3dadd(52.94, 80.95, 11.3, 3.48)
pt3dadd(52.91, 80.87, 11.3, 3.48)
pt3dadd(52.84, 80.79, 11.3, 3.48)
pt3dadd(52.8, 80.71, 11.3, 3.48)
pt3dadd(52.8, 80.63, 11.3, 3.48)
pt3dadd(52.73, 80.55, 11.3, 3.48)
pt3dadd(52.7, 80.47, 11.3, 3.48)
pt3dadd(52.66, 80.39, 11.3, 3.48)
pt3dadd(52.63, 80.32, 11.3, 3.48)
pt3dadd(52.59, 80.24, 11.3, 3.48)
pt3dadd(52.56, 80.16, 11.3, 3.48)
pt3dadd(52.52, 80.12, 11.3, 3.48)
pt3dadd(52.45, 80.04, 11.3, 3.48)
pt3dadd(52.42, 79.96, 11.3, 3.48)
pt3dadd(52.38, 79.88, 11.3, 3.48)
pt3dadd(52.31, 79.8, 11.3, 3.48)
pt3dadd(52.24, 79.68, 11.3, 3.48)
pt3dadd(52.21, 79.6, 11.3, 3.48)
pt3dadd(52.17, 79.49, 11.3, 3.48)
pt3dadd(52.14, 79.4, 11.3, 3.48)
pt3dadd(52.07, 79.25, 11.3, 3.48)
pt3dadd(52.03, 79.17, 11.3, 3.48)
pt3dadd(51.97, 79.01, 11.3, 3.48)
pt3dadd(51.93, 78.89, 11.3, 3.48)
pt3dadd(51.93, 78.81, 11.3, 3.48)
pt3dadd(51.9, 78.73, 11.3, 3.48)
pt3dadd(51.9, 78.65, 11.3, 3.48)
pt3dadd(51.86, 78.57, 11.3, 3.48)
pt3dadd(51.86, 78.5, 11.3, 3.48)
pt3dadd(51.83, 78.42, 11.3, 3.48)
pt3dadd(51.79, 78.34, 11.3, 3.48)
pt3dadd(51.79, 78.22, 11.3, 3.48)
pt3dadd(51.76, 78.1, 11.3, 3.48)
pt3dadd(51.76, 78.02, 11.3, 3.48)
pt3dadd(51.72, 77.9, 11.3, 3.48)
pt3dadd(51.69, 77.78, 11.3, 3.48)
pt3dadd(51.69, 77.67, 11.3, 3.48)
pt3dadd(51.65, 77.58, 11.3, 3.48)
pt3dadd(51.65, 77.39, 11.3, 3.48)
pt3dadd(51.62, 77.31, 11.3, 3.48)
pt3dadd(51.62, 77.23, 11.3, 3.48)
pt3dadd(51.58, 77.15, 11.3, 3.48)
pt3dadd(51.58, 77.07, 11.3, 3.48)
pt3dadd(51.55, 76.95, 11.3, 3.48)
pt3dadd(51.55, 76.75, 11.3, 3.48)
pt3dadd(51.51, 76.64, 11.3, 3.48)
pt3dadd(51.51, 76.52, 11.3, 3.48)
pt3dadd(51.48, 76.36, 11.3, 3.48)
pt3dadd(51.48, 76.12, 11.3, 3.48)
pt3dadd(51.44, 76.04, 11.3, 3.48)
pt3dadd(51.44, 75.53, 11.3, 3.48)
pt3dadd(51.41, 75.49, 11.3, 3.48)
pt3dadd(51.41, 75.25, 11.3, 3.48)
pt3dadd(51.37, 75.21, 11.3, 3.48)
pt3dadd(51.44, 75.29, 14.3, 3.48)
pt3dadd(51.41, 75.25, 14.3, 3.48)
pt3dadd(51.41, 75.13, 14.3, 3.48)
pt3dadd(51.34, 75.05, 14.3, 3.48)
pt3dadd(51.31, 74.97, 14.3, 3.48)
pt3dadd(51.31, 74.89, 14.3, 3.48)
pt3dadd(51.27, 74.86, 14.3, 3.48)
pt3dadd(51.24, 74.78, 14.3, 3.48)
pt3dadd(51.24, 74.69, 14.3, 3.48)
pt3dadd(51.2, 74.66, 14.3, 3.48)
pt3dadd(51.17, 74.58, 14.3, 3.48)
pt3dadd(51.1, 74.5, 14.3, 3.48)
pt3dadd(51.06, 74.42, 14.3, 3.48)
pt3dadd(51.03, 74.34, 14.3, 3.48)
pt3dadd(50.96, 74.22, 14.3, 3.48)
pt3dadd(50.88, 74.1, 14.3, 3.48)
pt3dadd(50.85, 74.02, 14.3, 3.48)
pt3dadd(50.81, 73.99, 14.3, 3.48)
pt3dadd(50.78, 73.9, 14.3, 3.48)
pt3dadd(50.75, 73.82, 14.3, 3.48)
pt3dadd(50.68, 73.79, 14.3, 3.48)
pt3dadd(50.64, 73.71, 14.3, 3.48)
pt3dadd(50.61, 73.63, 14.3, 3.48)
pt3dadd(50.54, 73.51, 14.3, 3.48)
pt3dadd(50.47, 73.47, 14.3, 3.48)
pt3dadd(50.43, 73.35, 14.3, 3.48)
pt3dadd(50.4, 73.27, 14.3, 3.48)
pt3dadd(50.36, 73.19, 14.3, 3.48)
pt3dadd(50.33, 73.11, 14.3, 3.48)
pt3dadd(50.26, 73.07, 14.3, 3.48)
pt3dadd(50.22, 72.96, 14.3, 3.48)
pt3dadd(50.19, 72.92, 14.3, 3.48)
pt3dadd(50.12, 72.88, 14.3, 3.48)
pt3dadd(50.08, 72.8, 14.3, 3.48)
pt3dadd(50.05, 72.72, 14.3, 3.48)
pt3dadd(50.01, 72.64, 14.3, 3.48)
pt3dadd(49.94, 72.52, 14.3, 3.48)
pt3dadd(49.91, 72.44, 14.3, 3.48)
pt3dadd(49.84, 72.4, 14.3, 3.48)
pt3dadd(49.77, 72.36, 14.3, 3.48)
pt3dadd(49.74, 72.28, 14.3, 3.48)
pt3dadd(49.7, 72.24, 14.3, 3.48)
pt3dadd(49.67, 72.2, 14.3, 3.48)
pt3dadd(49.56, 72.13, 14.3, 3.48)
pt3dadd(49.49, 72.08, 14.3, 3.48)
pt3dadd(49.46, 72.04, 14.3, 3.48)
pt3dadd(49.42, 71.96, 14.3, 3.48)
pt3dadd(49.35, 71.93, 14.3, 3.48)
pt3dadd(49.32, 71.89, 14.3, 3.48)
pt3dadd(49.25, 71.85, 14.3, 3.48)
pt3dadd(49.21, 71.81, 14.3, 3.48)
pt3dadd(49.08, 71.81, 14.3, 3.48)
pt3dadd(49.01, 71.73, 17.3, 3.48)
pt3dadd(48.9, 71.69, 17.3, 3.48)
pt3dadd(48.87, 71.65, 17.3, 3.48)
pt3dadd(48.79, 71.65, 17.3, 3.48)
pt3dadd(48.76, 71.61, 17.3, 3.48)
pt3dadd(48.69, 71.57, 17.3, 3.48)
pt3dadd(48.62, 71.53, 17.3, 3.48)
pt3dadd(48.55, 71.49, 17.3, 3.48)
pt3dadd(48.45, 71.41, 17.3, 3.48)
pt3dadd(48.34, 71.37, 17.3, 3.48)
pt3dadd(48.27, 71.33, 17.3, 3.48)
pt3dadd(48.2, 71.29, 17.3, 3.48)
pt3dadd(48.1, 71.25, 17.3, 3.48)
pt3dadd(48.03, 71.21, 17.3, 3.48)
pt3dadd(47.92, 71.18, 17.3, 3.48)
pt3dadd(47.78, 71.18, 17.3, 3.48)
pt3dadd(47.68, 71.1, 17.3, 3.48)
pt3dadd(47.54, 71.1, 17.3, 3.48)
pt3dadd(47.44, 71.01, 17.3, 3.48)
pt3dadd(47.3, 71.01, 17.3, 3.48)
pt3dadd(47.19, 70.98, 17.3, 3.48)
pt3dadd(47.05, 70.94, 17.3, 3.48)
pt3dadd(44.54, 70.94, 17.3, 3.48)
pt3dadd(44.47, 70.9, 17.3, 3.48)
pt3dadd(44.44, 70.86, 17.3, 3.48)
pt3dadd(44.3, 70.82, 17.3, 3.48)
pt3dadd(44.23, 70.78, 17.3, 3.48)
pt3dadd(44.13, 70.7, 17.3, 3.48)
pt3dadd(44.09, 70.66, 17.3, 3.48)
pt3dadd(44.02, 70.62, 17.3, 3.48)
pt3dadd(43.95, 70.54, 17.3, 3.48)
pt3dadd(43.85, 70.46, 17.3, 3.48)
pt3dadd(43.78, 70.46, 17.3, 3.48)
pt3dadd(43.74, 70.42, 17.3, 3.48)
pt3dadd(43.67, 70.38, 17.3, 3.48)
pt3dadd(43.6, 70.31, 17.3, 3.48)
pt3dadd(43.57, 70.22, 17.3, 3.48)
pt3dadd(43.53, 70.18, 17.3, 3.48)
pt3dadd(43.47, 70.18, 17.3, 3.48)
pt3dadd(43.43, 70.14, 17.3, 3.48)
pt3dadd(43.36, 70.07, 17.3, 3.48)
pt3dadd(43.29, 70.03, 17.3, 3.48)
pt3dadd(43.22, 69.99, 17.3, 3.48)
pt3dadd(43.19, 69.95, 17.3, 3.48)
pt3dadd(43.15, 69.87, 17.3, 3.48)
pt3dadd(43.08, 69.83, 17.3, 3.48)
pt3dadd(43.05, 69.75, 17.3, 3.48)
pt3dadd(42.98, 69.67, 17.3, 3.48)
pt3dadd(42.91, 69.63, 17.3, 3.48)
pt3dadd(42.87, 69.55, 17.3, 3.48)
pt3dadd(42.8, 69.51, 17.3, 3.48)
pt3dadd(42.77, 69.43, 17.3, 3.48)
pt3dadd(42.7, 69.32, 17.3, 3.48)
pt3dadd(42.63, 69.28, 17.3, 3.48)
pt3dadd(42.6, 69.24, 17.3, 3.48)
pt3dadd(42.53, 69.19, 17.3, 3.48)
pt3dadd(42.49, 69.16, 17.3, 3.48)
pt3dadd(42.46, 69.12, 17.3, 3.48)
pt3dadd(42.42, 69.08, 17.3, 3.48)
pt3dadd(42.38, 69.08, 17.3, 3.48)
pt3dadd(42.46, 69.28, 22.3, 3.48)
pt3dadd(42.38, 69.28, 22.3, 3.48)
pt3dadd(42.35, 69.24, 22.3, 3.48)
pt3dadd(42.31, 69.19, 22.3, 3.48)
pt3dadd(42.24, 69.19, 22.3, 3.48)
pt3dadd(42.17, 69.12, 22.3, 3.48)
pt3dadd(42.11, 69.08, 22.3, 3.48)
pt3dadd(42, 69.04, 22.3, 3.48)
pt3dadd(41.93, 69, 22.3, 3.48)
pt3dadd(41.83, 68.96, 22.3, 3.48)
pt3dadd(41.76, 68.96, 22.3, 3.48)
pt3dadd(41.69, 68.92, 22.3, 3.48)
}
}
proc shape3d_82() {
dend[50] { pt3dadd(41.62, 68.88, 22.3, 3.48)
pt3dadd(41.55, 68.88, 22.3, 3.48)
pt3dadd(41.48, 68.84, 22.3, 3.48)
pt3dadd(41.27, 68.84, 22.3, 3.48)
pt3dadd(41.2, 68.8, 22.3, 3.48)
pt3dadd(40.75, 68.8, 22.3, 3.48)
pt3dadd(40.68, 68.76, 22.3, 3.48)
pt3dadd(40.22, 68.76, 22.3, 3.48)
pt3dadd(39.65, 68.47, 22.3, 3.48)
pt3dadd(39.63, 68.72, 22.3, 3.48)
pt3dadd(29.95, 64.93, 0, 3.1)
pt3dadd(21.36, 61.62, 0, 3.1)
pt3dadd(16.33, 54.64, 0, 3.1)
pt3dadd(14.39, 42.76, 0, 3.1)
pt3dadd(14.78, 35.78, 0, 3.1)
pt3dadd(16.1, 32.72, 0, 3.1)
}
dend[51] {pt3dclear()
pt3dstyle(1, 70.6286, 98.028, -3.53301)
pt3dadd(76.93, 97.66, -2.7, 9.85)
pt3dadd(76.93, 97.85, -2.7, 9.85)
pt3dadd(77.14, 97.85, -2.7, 9.85)
}
dend[52] {pt3dclear()
pt3dadd(77.14, 97.85, -2.7, 9.85)
pt3dadd(77.02, 98.04, -2.7, 9.85)
pt3dadd(77.11, 98.24, -2.7, 9.85)
pt3dadd(77.19, 98.33, -2.7, 9.85)
pt3dadd(77.19, 98.53, -2.7, 9.85)
pt3dadd(77.28, 98.72, -2.7, 9.85)
pt3dadd(77.36, 98.91, -2.7, 9.85)
pt3dadd(77.44, 99.01, -2.7, 9.85)
pt3dadd(77.44, 99.2, -2.7, 9.85)
pt3dadd(77.53, 99.29, -2.7, 9.85)
pt3dadd(77.53, 99.49, -2.7, 9.85)
pt3dadd(77.61, 99.58, -2.7, 9.85)
pt3dadd(77.7, 99.68, -2.7, 9.85)
pt3dadd(77.87, 99.88, -2.7, 9.85)
pt3dadd(77.96, 100.07, -2.7, 9.85)
pt3dadd(78.21, 100.36, -2.7, 9.85)
pt3dadd(78.29, 100.45, -2.7, 9.85)
pt3dadd(78.38, 100.55, -2.7, 9.85)
pt3dadd(78.46, 100.65, -2.7, 9.85)
pt3dadd(78.64, 100.65, -2.7, 9.85)
pt3dadd(78.72, 100.74, -2.7, 9.85)
pt3dadd(78.81, 100.84, -2.7, 9.85)
pt3dadd(78.97, 100.93, -2.7, 9.85)
pt3dadd(79.14, 101.03, -2.7, 9.85)
pt3dadd(79.23, 101.03, -2.7, 9.85)
}
dend[53] {pt3dclear()
pt3dadd(79.23, 101.03, -2.7, 8.64)
pt3dadd(77.38, 101.07, 1.3, 8.64)
pt3dadd(77.38, 101.19, 1.3, 8.64)
pt3dadd(77.35, 101.31, 1.3, 8.64)
pt3dadd(77.31, 101.39, 1.3, 8.64)
pt3dadd(77.05, 101.92, 1.3, 8.64)
}
dend[54] {pt3dclear()
pt3dadd(77.05, 101.92, 1.3, 8.64)
pt3dadd(77.31, 101.98, 1.3, 8.64)
pt3dadd(77.35, 102.06, 1.3, 8.64)
pt3dadd(77.35, 102.14, 1.3, 8.64)
pt3dadd(77.38, 102.18, 1.3, 8.64)
pt3dadd(77.38, 102.26, 1.3, 8.64)
pt3dadd(77.42, 102.3, 1.3, 8.64)
pt3dadd(77.42, 102.46, 1.3, 8.64)
pt3dadd(77.45, 102.5, 1.3, 8.64)
pt3dadd(77.45, 102.69, 1.3, 8.64)
pt3dadd(77.49, 102.73, 1.3, 8.64)
pt3dadd(77.52, 102.77, 1.3, 8.64)
pt3dadd(77.52, 102.97, 1.3, 8.64)
pt3dadd(77.56, 103.01, 1.3, 8.64)
pt3dadd(77.59, 103.13, 1.3, 8.64)
pt3dadd(77.59, 103.21, 1.3, 8.64)
pt3dadd(77.63, 103.25, 1.3, 8.64)
pt3dadd(77.66, 103.33, 1.3, 8.64)
pt3dadd(77.69, 103.37, 1.3, 8.64)
pt3dadd(77.73, 103.44, 1.3, 8.64)
pt3dadd(77.76, 103.53, 1.3, 8.64)
pt3dadd(77.76, 103.64, 1.3, 8.64)
pt3dadd(77.8, 103.68, 1.3, 8.64)
pt3dadd(77.8, 103.76, 1.3, 8.64)
pt3dadd(77.83, 103.8, 1.3, 8.64)
pt3dadd(77.87, 103.88, 1.3, 8.64)
pt3dadd(77.87, 104.24, 1.3, 8.64)
pt3dadd(77.9, 104.32, 1.3, 8.64)
pt3dadd(77.9, 104.55, 1.3, 8.64)
pt3dadd(77.94, 104.63, 1.3, 8.64)
pt3dadd(77.97, 104.67, 1.3, 8.64)
pt3dadd(77.97, 105.23, 1.3, 8.64)
pt3dadd(78.01, 105.35, 1.3, 8.64)
pt3dadd(78.01, 105.54, 1.3, 8.64)
pt3dadd(78.04, 105.66, 1.3, 8.64)
pt3dadd(78.08, 105.74, 1.3, 8.64)
pt3dadd(78.08, 105.82, 1.3, 8.64)
pt3dadd(78.11, 105.9, 1.3, 8.64)
pt3dadd(78.15, 106.02, 1.3, 8.64)
pt3dadd(78.18, 106.14, 1.3, 8.64)
pt3dadd(78.18, 106.21, 1.3, 8.64)
pt3dadd(78.22, 106.33, 1.3, 8.64)
pt3dadd(78.25, 106.45, 1.3, 8.64)
pt3dadd(78.25, 106.53, 1.3, 8.64)
pt3dadd(78.29, 106.57, 1.3, 8.64)
pt3dadd(78.29, 106.77, 1.3, 8.64)
pt3dadd(78.32, 106.89, 1.3, 8.64)
pt3dadd(78.32, 107.88, 1.3, 8.64)
pt3dadd(78.22, 106.81, 4.3, 8.64)
pt3dadd(78.22, 106.89, 4.3, 8.64)
pt3dadd(78.18, 106.93, 4.3, 8.64)
pt3dadd(78.15, 107.01, 4.3, 8.64)
pt3dadd(78.15, 107.17, 4.3, 8.64)
pt3dadd(78.11, 107.25, 4.3, 8.64)
pt3dadd(78.11, 107.32, 4.3, 8.64)
pt3dadd(78.08, 107.44, 4.3, 8.64)
pt3dadd(78.08, 107.64, 4.3, 8.64)
pt3dadd(78.04, 107.72, 4.3, 8.64)
pt3dadd(78.04, 108, 4.3, 8.64)
pt3dadd(78.01, 108.04, 4.3, 8.64)
pt3dadd(78.01, 108.23, 4.3, 8.64)
pt3dadd(77.97, 108.31, 4.3, 8.64)
pt3dadd(77.97, 112.07, 4.3, 8.64)
pt3dadd(77.94, 112.15, 4.3, 8.64)
pt3dadd(77.94, 113.42, 4.3, 8.64)
pt3dadd(77.9, 113.54, 4.3, 8.64)
pt3dadd(77.9, 113.85, 4.3, 8.64)
pt3dadd(77.87, 113.93, 4.3, 8.64)
pt3dadd(77.87, 114.21, 4.3, 8.64)
pt3dadd(77.83, 114.25, 4.3, 8.64)
pt3dadd(77.83, 114.41, 4.3, 8.64)
pt3dadd(77.8, 114.49, 4.3, 8.64)
pt3dadd(77.8, 114.61, 4.3, 8.64)
pt3dadd(77.76, 114.72, 4.3, 8.64)
pt3dadd(77.73, 114.84, 4.3, 8.64)
pt3dadd(77.73, 115.12, 4.3, 8.64)
pt3dadd(77.73, 114.72, 8.3, 8.92)
pt3dadd(77.73, 116.27, 8.3, 8.92)
pt3dadd(77.76, 116.35, 8.3, 8.92)
pt3dadd(77.76, 117.38, 8.3, 8.92)
pt3dadd(77.8, 117.49, 8.3, 8.92)
pt3dadd(77.83, 117.61, 8.3, 8.92)
pt3dadd(77.87, 117.69, 8.3, 8.92)
pt3dadd(77.87, 117.93, 8.3, 8.92)
pt3dadd(77.9, 118.01, 8.3, 8.92)
pt3dadd(77.9, 118.13, 8.3, 8.92)
pt3dadd(77.94, 118.21, 8.3, 8.92)
pt3dadd(77.97, 118.36, 8.3, 8.92)
pt3dadd(78.01, 118.48, 8.3, 8.92)
pt3dadd(78.01, 118.6, 8.3, 8.92)
pt3dadd(78.08, 118.8, 8.3, 8.92)
pt3dadd(78.08, 118.88, 8.3, 8.92)
pt3dadd(78.15, 119, 8.3, 8.92)
pt3dadd(78.15, 119.11, 8.3, 8.92)
pt3dadd(78.18, 119.24, 8.3, 8.92)
pt3dadd(78.18, 119.39, 8.3, 8.92)
pt3dadd(78.22, 119.47, 8.3, 8.92)
pt3dadd(78.22, 119.63, 8.3, 8.92)
pt3dadd(78.25, 119.75, 8.3, 8.92)
pt3dadd(78.29, 119.83, 8.3, 8.92)
pt3dadd(78.32, 119.95, 8.3, 8.92)
pt3dadd(78.32, 120.14, 8.3, 8.92)
pt3dadd(78.36, 120.26, 8.3, 8.92)
pt3dadd(78.39, 120.34, 8.3, 8.92)
pt3dadd(78.39, 120.5, 8.3, 8.92)
pt3dadd(78.43, 120.58, 8.3, 8.92)
pt3dadd(78.46, 120.66, 8.3, 8.92)
pt3dadd(78.46, 120.82, 8.3, 8.92)
pt3dadd(78.5, 120.89, 8.3, 8.92)
pt3dadd(78.5, 121.06, 8.3, 8.92)
pt3dadd(78.53, 121.13, 8.3, 8.92)
pt3dadd(78.53, 121.33, 8.3, 8.92)
pt3dadd(78.57, 121.41, 8.3, 8.92)
pt3dadd(78.57, 122.12, 8.3, 8.92)
pt3dadd(78.6, 122.24, 8.3, 8.92)
pt3dadd(78.6, 122.88, 8.3, 8.92)
pt3dadd(78.64, 122.92, 8.3, 8.92)
pt3dadd(78.64, 123.51, 8.3, 8.92)
pt3dadd(78.64, 122.24, 11.3, 8.92)
pt3dadd(78.64, 122.64, 11.3, 8.92)
pt3dadd(78.71, 122.88, 11.3, 8.92)
pt3dadd(78.78, 123.03, 11.3, 8.92)
pt3dadd(78.78, 126.99, 11.3, 8.92)
pt3dadd(78.85, 127.23, 11.3, 8.92)
pt3dadd(78.85, 127.86, 11.3, 8.92)
}
dend[55] {pt3dclear()
pt3dadd(78.85, 127.86, 11.3, 9.2)
pt3dadd(79.23, 128.61, 12.3, 9.2)
pt3dadd(79.33, 130.87, 12.3, 9.2)
pt3dadd(79.33, 130.75, 12.3, 8.92)
pt3dadd(79.33, 130.95, 12.3, 8.92)
pt3dadd(79.37, 131.02, 12.3, 8.92)
pt3dadd(79.44, 131.1, 12.3, 8.92)
pt3dadd(79.47, 131.22, 12.3, 8.92)
pt3dadd(79.47, 132.61, 12.3, 8.92)
pt3dadd(79.51, 132.69, 12.3, 8.92)
pt3dadd(79.54, 132.81, 12.3, 8.92)
pt3dadd(79.54, 132.93, 12.3, 8.92)
pt3dadd(79.58, 133.01, 12.3, 8.92)
pt3dadd(79.61, 133.12, 12.3, 8.92)
pt3dadd(79.65, 133.24, 12.3, 8.92)
pt3dadd(79.72, 133.4, 12.3, 8.92)
pt3dadd(79.75, 133.48, 12.3, 8.92)
pt3dadd(79.82, 133.52, 12.3, 8.92)
pt3dadd(79.82, 133.6, 12.3, 8.92)
pt3dadd(79.86, 133.72, 12.3, 8.92)
pt3dadd(79.89, 133.79, 12.3, 8.92)
pt3dadd(79.93, 133.88, 12.3, 8.92)
pt3dadd(79.96, 133.91, 12.3, 8.92)
pt3dadd(80, 133.99, 12.3, 8.92)
}
}
proc shape3d_83() {
dend[55] { pt3dadd(80.03, 134.07, 12.3, 8.92)
pt3dadd(80.03, 134.15, 12.3, 8.92)
pt3dadd(80.07, 134.19, 12.3, 8.92)
pt3dadd(80.07, 134.27, 12.3, 8.92)
pt3dadd(80.1, 134.31, 12.3, 8.92)
pt3dadd(80.14, 134.39, 12.3, 8.92)
pt3dadd(80.14, 134.47, 12.3, 8.92)
pt3dadd(80.21, 134.59, 12.3, 8.92)
pt3dadd(80.24, 134.66, 12.3, 8.92)
pt3dadd(80.28, 134.71, 12.3, 8.92)
pt3dadd(80.31, 134.74, 12.3, 8.92)
pt3dadd(80.31, 135.02, 12.3, 8.92)
pt3dadd(80.24, 134.47, 14.3, 8.92)
pt3dadd(80.24, 134.79, 14.3, 8.92)
pt3dadd(80.31, 134.94, 14.3, 8.92)
pt3dadd(80.31, 135.97, 14.3, 8.92)
pt3dadd(80.38, 136.13, 14.3, 8.92)
pt3dadd(80.38, 136.29, 14.3, 8.92)
pt3dadd(80.45, 136.45, 14.3, 8.92)
pt3dadd(80.04, 137.38, 14.3, 8.92)
}
dend[56] {pt3dclear()
pt3dadd(80.04, 137.38, 14.3, 8.92)
pt3dadd(80.45, 137.79, 14.3, 8.92)
pt3dadd(80.52, 137.95, 14.3, 8.92)
pt3dadd(80.59, 138.11, 14.3, 8.92)
pt3dadd(80.66, 138.19, 14.3, 8.92)
pt3dadd(80.8, 138.43, 14.3, 8.92)
pt3dadd(80.87, 138.58, 14.3, 8.92)
pt3dadd(81, 138.82, 14.3, 8.92)
pt3dadd(81.21, 139.22, 14.3, 8.92)
pt3dadd(81.29, 139.29, 14.3, 8.92)
pt3dadd(81.29, 139.93, 14.3, 8.92)
pt3dadd(81.36, 140.01, 14.3, 8.92)
pt3dadd(81.43, 140.09, 14.3, 8.92)
pt3dadd(81.43, 140.24, 14.3, 8.92)
pt3dadd(81.49, 140.32, 14.3, 8.92)
pt3dadd(81.56, 140.4, 14.3, 8.92)
pt3dadd(81.56, 140.72, 14.3, 8.92)
pt3dadd(81.63, 140.8, 14.3, 8.92)
pt3dadd(81.7, 140.88, 14.3, 8.92)
pt3dadd(81.7, 142.46, 14.3, 8.92)
pt3dadd(81.56, 141.2, 18.3, 8.92)
pt3dadd(81.63, 141.35, 18.3, 8.92)
pt3dadd(81.7, 141.43, 18.3, 8.92)
pt3dadd(81.7, 141.59, 18.3, 8.92)
pt3dadd(81.77, 141.67, 18.3, 8.92)
pt3dadd(81.77, 141.83, 18.3, 8.92)
pt3dadd(81.84, 141.91, 18.3, 8.92)
pt3dadd(81.91, 142.07, 18.3, 8.92)
pt3dadd(81.91, 142.46, 18.3, 8.92)
pt3dadd(81.98, 142.62, 18.3, 8.92)
pt3dadd(81.98, 143.25, 18.3, 8.92)
pt3dadd(82.05, 143.41, 18.3, 8.92)
pt3dadd(82.05, 143.73, 18.3, 8.92)
pt3dadd(82.12, 143.88, 18.3, 8.92)
pt3dadd(82.12, 144.04, 18.3, 8.92)
pt3dadd(82.19, 144.2, 18.3, 8.92)
pt3dadd(82.26, 144.28, 18.3, 8.92)
pt3dadd(82.26, 144.52, 18.3, 8.92)
pt3dadd(82.33, 144.68, 18.3, 8.92)
pt3dadd(82.4, 144.84, 18.3, 8.92)
pt3dadd(82.4, 145.31, 18.3, 8.92)
pt3dadd(82.47, 145.55, 18.3, 8.92)
pt3dadd(82.54, 145.71, 18.3, 8.92)
pt3dadd(82.61, 145.87, 18.3, 8.92)
pt3dadd(82.61, 146.26, 18.3, 8.92)
pt3dadd(82.68, 146.42, 18.3, 8.92)
pt3dadd(82.68, 146.82, 18.3, 8.92)
pt3dadd(82.75, 147.05, 18.3, 8.92)
pt3dadd(82.75, 147.45, 18.3, 8.92)
pt3dadd(82.82, 147.6, 18.3, 8.92)
pt3dadd(82.89, 147.76, 18.3, 8.92)
pt3dadd(82.89, 148, 18.3, 8.92)
pt3dadd(83.03, 148.16, 18.3, 8.92)
pt3dadd(83.03, 148.4, 18.3, 8.92)
pt3dadd(83.17, 148.63, 18.3, 8.92)
pt3dadd(83.17, 148.79, 18.3, 8.92)
pt3dadd(83.31, 149.03, 18.3, 8.92)
pt3dadd(83.31, 149.19, 18.3, 8.92)
pt3dadd(83.38, 149.43, 18.3, 8.92)
pt3dadd(83.38, 149.59, 18.3, 8.92)
pt3dadd(83.44, 149.82, 18.3, 8.92)
pt3dadd(83.44, 151.88, 18.3, 8.92)
pt3dadd(83.51, 152.04, 18.3, 8.92)
pt3dadd(83.51, 153.15, 18.3, 8.92)
pt3dadd(83.58, 151.32, 21.3, 8.92)
pt3dadd(83.58, 151.56, 21.3, 8.92)
pt3dadd(83.65, 151.8, 21.3, 8.92)
pt3dadd(83.72, 151.88, 21.3, 8.92)
pt3dadd(83.72, 159.71, 21.3, 8.92)
pt3dadd(83.79, 159.79, 21.3, 8.92)
pt3dadd(83.79, 160.66, 21.3, 8.92)
pt3dadd(83.86, 160.9, 21.3, 8.92)
pt3dadd(83.86, 161.85, 21.3, 8.92)
pt3dadd(83.93, 162.01, 21.3, 8.92)
pt3dadd(83.93, 162.24, 21.3, 8.92)
pt3dadd(84, 162.4, 21.3, 8.92)
pt3dadd(84.07, 162.56, 21.3, 8.92)
pt3dadd(84.07, 162.8, 21.3, 8.92)
pt3dadd(84.14, 162.88, 21.3, 8.92)
pt3dadd(84.14, 163.2, 21.3, 8.92)
pt3dadd(84, 162.4, 23.3, 8.92)
pt3dadd(84.07, 162.56, 23.3, 8.92)
pt3dadd(84.21, 162.8, 23.3, 8.92)
pt3dadd(84.28, 163.04, 23.3, 8.92)
pt3dadd(84.35, 163.27, 23.3, 8.92)
pt3dadd(84.35, 168.02, 23.3, 8.92)
pt3dadd(84.42, 168.1, 23.3, 8.92)
pt3dadd(84.49, 168.34, 23.3, 8.92)
pt3dadd(84.49, 168.66, 23.3, 8.92)
pt3dadd(84.56, 168.82, 23.3, 8.92)
pt3dadd(84.63, 168.97, 23.3, 8.92)
pt3dadd(84.63, 169.21, 23.3, 8.92)
pt3dadd(84.7, 169.29, 23.3, 8.92)
pt3dadd(84.77, 169.45, 23.3, 8.92)
pt3dadd(84.84, 169.53, 23.3, 8.92)
pt3dadd(84.91, 169.68, 23.3, 8.92)
pt3dadd(84.98, 169.84, 23.3, 8.92)
pt3dadd(84.98, 170, 23.3, 8.92)
pt3dadd(85.05, 170.24, 23.3, 8.92)
pt3dadd(85.05, 170.55, 23.3, 8.92)
pt3dadd(85.12, 170.63, 23.3, 8.92)
pt3dadd(85.19, 170.79, 23.3, 8.92)
pt3dadd(85.25, 170.87, 23.3, 8.92)
pt3dadd(85.32, 170.95, 23.3, 8.92)
pt3dadd(85.32, 171.27, 23.3, 8.92)
pt3dadd(85.39, 171.43, 23.3, 8.92)
pt3dadd(85.39, 171.59, 23.3, 8.92)
pt3dadd(85.46, 171.74, 23.3, 8.92)
pt3dadd(85.54, 171.9, 23.3, 8.92)
pt3dadd(85.61, 171.98, 23.3, 8.92)
pt3dadd(85.61, 172.14, 23.3, 8.92)
pt3dadd(85.68, 172.3, 23.3, 8.92)
pt3dadd(85.75, 172.38, 23.3, 8.92)
pt3dadd(85.75, 172.54, 23.3, 8.92)
pt3dadd(85.81, 172.61, 23.3, 8.92)
pt3dadd(85.88, 172.77, 23.3, 8.92)
pt3dadd(85.88, 173.01, 23.3, 8.92)
pt3dadd(85.95, 173.17, 23.3, 8.92)
pt3dadd(85.95, 173.64, 23.3, 8.92)
pt3dadd(85.75, 173.25, 27.3, 8.92)
pt3dadd(85.75, 178.31, 27.3, 8.92)
pt3dadd(85.81, 178.55, 27.3, 8.92)
pt3dadd(85.81, 178.79, 27.3, 8.92)
pt3dadd(85.88, 178.95, 27.3, 8.92)
pt3dadd(85.88, 179.1, 27.3, 8.92)
pt3dadd(85.95, 179.26, 27.3, 8.92)
pt3dadd(86.02, 179.34, 27.3, 8.92)
pt3dadd(86.02, 179.5, 27.3, 8.92)
pt3dadd(86.09, 179.74, 27.3, 8.92)
pt3dadd(86.16, 179.9, 27.3, 8.92)
pt3dadd(86.16, 180.05, 27.3, 8.92)
pt3dadd(86.23, 180.21, 27.3, 8.92)
pt3dadd(86.3, 180.45, 27.3, 8.92)
pt3dadd(86.37, 180.61, 27.3, 8.92)
pt3dadd(86.44, 180.76, 27.3, 8.92)
pt3dadd(86.51, 180.92, 27.3, 8.92)
pt3dadd(86.51, 181.08, 27.3, 8.92)
pt3dadd(86.58, 181.32, 27.3, 8.92)
pt3dadd(86.65, 181.48, 27.3, 8.92)
pt3dadd(86.72, 181.55, 27.3, 8.92)
pt3dadd(86.72, 181.71, 27.3, 8.92)
pt3dadd(86.79, 181.87, 27.3, 8.92)
pt3dadd(86.79, 182.03, 27.3, 8.92)
pt3dadd(86.86, 182.27, 27.3, 8.92)
pt3dadd(86.93, 182.43, 27.3, 8.92)
pt3dadd(86.93, 182.9, 27.3, 8.92)
pt3dadd(87, 183.06, 27.3, 8.92)
pt3dadd(87, 189.55, 27.3, 8.92)
pt3dadd(87, 188.6, 29.3, 8.92)
pt3dadd(87, 189.23, 29.3, 8.92)
pt3dadd(87.07, 189.39, 29.3, 8.92)
pt3dadd(87.14, 189.55, 29.3, 8.92)
pt3dadd(87.14, 189.71, 29.3, 8.92)
pt3dadd(87.21, 189.87, 29.3, 8.92)
pt3dadd(87.35, 190.02, 29.3, 8.92)
pt3dadd(87.42, 190.18, 29.3, 8.92)
pt3dadd(87.42, 190.34, 29.3, 8.92)
pt3dadd(87.49, 190.42, 29.3, 8.92)
pt3dadd(87.56, 190.5, 29.3, 8.92)
pt3dadd(87.56, 190.66, 29.3, 8.92)
pt3dadd(87.63, 190.74, 29.3, 8.92)
pt3dadd(87.63, 191.21, 29.3, 8.92)
pt3dadd(87.69, 191.45, 29.3, 8.92)
pt3dadd(87.76, 191.61, 29.3, 8.92)
pt3dadd(87.76, 191.92, 29.3, 8.92)
pt3dadd(87.83, 192.16, 29.3, 8.92)
pt3dadd(87.9, 192.32, 29.3, 8.92)
pt3dadd(87.9, 192.48, 29.3, 8.92)
pt3dadd(87.97, 192.63, 29.3, 8.92)
pt3dadd(88.04, 192.79, 29.3, 8.92)
pt3dadd(88.11, 192.95, 29.3, 8.92)
pt3dadd(88.25, 193.19, 29.3, 8.92)
pt3dadd(88.32, 193.43, 29.3, 8.92)
pt3dadd(88.39, 193.59, 29.3, 8.92)
pt3dadd(88.46, 193.74, 29.3, 8.92)
pt3dadd(88.53, 193.9, 29.3, 8.92)
pt3dadd(88.6, 194.06, 29.3, 8.92)
pt3dadd(88.67, 194.22, 29.3, 8.92)
pt3dadd(88.67, 194.38, 29.3, 8.92)
pt3dadd(88.74, 194.62, 29.3, 8.92)
}
}
proc shape3d_84() {
dend[56] { pt3dadd(88.81, 194.69, 29.3, 8.92)
pt3dadd(88.88, 194.85, 29.3, 8.92)
pt3dadd(88.95, 195.01, 29.3, 8.92)
pt3dadd(89.02, 195.17, 29.3, 8.92)
pt3dadd(89.02, 195.32, 29.3, 8.92)
pt3dadd(89.09, 195.49, 29.3, 8.92)
pt3dadd(89.16, 195.72, 29.3, 8.92)
pt3dadd(89.16, 195.96, 29.3, 8.92)
pt3dadd(89.23, 196.04, 29.3, 8.92)
pt3dadd(89.3, 196.27, 29.3, 8.92)
pt3dadd(89.37, 196.43, 29.3, 8.92)
pt3dadd(89.44, 196.59, 29.3, 8.92)
pt3dadd(89.51, 196.75, 29.3, 8.92)
pt3dadd(89.51, 196.91, 29.3, 8.92)
pt3dadd(89.57, 197.07, 29.3, 8.92)
pt3dadd(89.71, 197.3, 29.3, 8.92)
pt3dadd(89.79, 197.46, 29.3, 8.92)
pt3dadd(89.86, 197.62, 29.3, 8.92)
pt3dadd(89.93, 197.78, 29.3, 8.92)
pt3dadd(90, 197.94, 29.3, 8.92)
pt3dadd(90.06, 198.1, 29.3, 8.92)
pt3dadd(90.06, 198.26, 29.3, 8.92)
pt3dadd(90.13, 198.41, 29.3, 8.92)
pt3dadd(90.27, 198.57, 29.3, 8.92)
pt3dadd(90.34, 198.81, 29.3, 8.92)
pt3dadd(90.41, 198.97, 29.3, 8.92)
pt3dadd(90.48, 199.13, 29.3, 8.92)
pt3dadd(90.48, 199.44, 29.3, 8.92)
pt3dadd(90.55, 199.6, 29.3, 8.92)
pt3dadd(90.62, 199.84, 29.3, 8.92)
pt3dadd(90.62, 199.99, 29.3, 8.92)
pt3dadd(90.69, 200.15, 29.3, 8.92)
pt3dadd(90.76, 200.31, 29.3, 8.92)
pt3dadd(90.76, 200.47, 29.3, 8.92)
pt3dadd(90.83, 200.71, 29.3, 8.92)
pt3dadd(90.9, 200.87, 29.3, 8.92)
pt3dadd(90.9, 201.18, 29.3, 8.92)
pt3dadd(90.97, 201.42, 29.3, 8.92)
pt3dadd(91.04, 201.58, 29.3, 8.92)
pt3dadd(91.04, 201.9, 29.3, 8.92)
pt3dadd(90.55, 200.39, 32.3, 8.92)
pt3dadd(90.62, 200.55, 32.3, 8.92)
pt3dadd(90.76, 200.79, 32.3, 8.92)
pt3dadd(90.9, 201.02, 32.3, 8.92)
pt3dadd(90.97, 201.1, 32.3, 8.92)
pt3dadd(91.11, 201.5, 32.3, 8.92)
pt3dadd(91.18, 201.66, 32.3, 8.92)
pt3dadd(91.18, 201.82, 32.3, 8.92)
pt3dadd(91.25, 201.98, 32.3, 8.92)
pt3dadd(91.25, 204.43, 32.3, 8.92)
pt3dadd(91.32, 204.66, 32.3, 8.92)
pt3dadd(91.32, 204.9, 32.3, 8.92)
pt3dadd(91.39, 205.06, 32.3, 8.92)
pt3dadd(91.46, 205.3, 32.3, 8.92)
pt3dadd(91.46, 205.54, 32.3, 8.92)
pt3dadd(91.53, 205.77, 32.3, 8.92)
pt3dadd(91.6, 205.93, 32.3, 8.92)
pt3dadd(91.6, 206.17, 32.3, 8.92)
pt3dadd(91.67, 206.4, 32.3, 8.92)
pt3dadd(91.74, 206.64, 32.3, 8.92)
pt3dadd(91.74, 207.51, 32.3, 8.92)
pt3dadd(91.81, 207.75, 32.3, 8.92)
pt3dadd(91.88, 207.91, 32.3, 8.92)
pt3dadd(91.88, 208.15, 32.3, 8.92)
pt3dadd(91.94, 208.38, 32.3, 8.92)
pt3dadd(92.01, 208.54, 32.3, 8.92)
pt3dadd(92.08, 208.7, 32.3, 8.92)
pt3dadd(92.15, 208.94, 32.3, 8.92)
pt3dadd(92.15, 209.41, 32.3, 8.92)
pt3dadd(92.22, 209.57, 32.3, 8.92)
pt3dadd(92.29, 209.81, 32.3, 8.92)
pt3dadd(92.29, 210.28, 32.3, 8.92)
pt3dadd(92.36, 210.36, 32.3, 8.92)
pt3dadd(92.36, 210.76, 32.3, 8.92)
pt3dadd(92.08, 210.36, 36.3, 8.92)
pt3dadd(92.08, 210.52, 36.3, 8.92)
pt3dadd(92.15, 210.76, 36.3, 8.92)
pt3dadd(92.29, 210.99, 36.3, 8.92)
pt3dadd(92.36, 211.15, 36.3, 8.92)
pt3dadd(92.43, 211.47, 36.3, 8.92)
pt3dadd(92.5, 211.55, 36.3, 8.92)
pt3dadd(92.57, 211.71, 36.3, 8.92)
pt3dadd(92.64, 211.79, 36.3, 8.92)
pt3dadd(92.64, 212.18, 36.3, 8.92)
pt3dadd(92.71, 212.26, 36.3, 8.92)
pt3dadd(92.78, 212.42, 36.3, 8.92)
pt3dadd(92.85, 212.5, 36.3, 8.92)
pt3dadd(92.92, 212.66, 36.3, 8.92)
pt3dadd(92.92, 212.82, 36.3, 8.92)
pt3dadd(92.99, 212.98, 36.3, 8.92)
pt3dadd(93.13, 213.21, 36.3, 8.92)
pt3dadd(93.27, 213.45, 36.3, 8.92)
pt3dadd(93.34, 213.53, 36.3, 8.92)
pt3dadd(93.41, 213.76, 36.3, 8.92)
pt3dadd(93.41, 214, 36.3, 8.92)
pt3dadd(93.55, 214.16, 36.3, 8.92)
pt3dadd(93.55, 214.32, 36.3, 8.92)
pt3dadd(93.69, 214.63, 36.3, 8.92)
pt3dadd(93.76, 214.79, 36.3, 8.92)
pt3dadd(93.89, 215.03, 36.3, 8.92)
pt3dadd(93.96, 215.19, 36.3, 8.92)
pt3dadd(94.04, 215.43, 36.3, 8.92)
pt3dadd(94.18, 215.51, 36.3, 8.92)
pt3dadd(94.25, 215.82, 36.3, 8.92)
pt3dadd(94.25, 216.06, 36.3, 8.92)
pt3dadd(94.32, 216.14, 36.3, 8.92)
pt3dadd(94.32, 216.46, 36.3, 8.92)
pt3dadd(94.38, 216.62, 36.3, 8.92)
pt3dadd(94.38, 217.09, 36.3, 8.92)
pt3dadd(94.45, 217.25, 36.3, 8.92)
pt3dadd(94.43, 221.55, 36.3, 8.92)
}
dend[57] {pt3dclear()
pt3dadd(94.43, 221.55, 36.3, 10.87)
pt3dadd(96.64, 222.51, 117.55, 10.87)
pt3dadd(98.33, 225.89, 117.55, 8.15)
pt3dadd(99.86, 231.19, 117.55, 8.83)
}
dend[58] {pt3dclear()
pt3dadd(99.86, 231.19, 117.55, 8.15)
pt3dadd(99.86, 250.58, 117.55, 8.15)
pt3dadd(103.09, 276.52, 117.55, 8.15)
pt3dadd(105.13, 286.46, 117.55, 10.87)
}
dend[59] {pt3dclear()
pt3dadd(105.13, 286.46, 117.55, 10.87)
pt3dadd(111.24, 300.45, 117.55, 10.87)
pt3dadd(116.51, 323.3, 117.55, 10.87)
pt3dadd(121.26, 347.13, 117.55, 10.87)
}
dend[60] {pt3dclear()
pt3dadd(121.26, 347.13, 117.55, 10.87)
pt3dadd(125, 360.34, 117.55, 10.87)
pt3dadd(130.43, 377.41, 117.55, 10.87)
pt3dadd(136.21, 391.98, 117.55, 10.87)
pt3dadd(141.13, 403.84, 117.55, 10.87)
pt3dadd(144.36, 411.85, 117.55, 10.87)
pt3dadd(146.23, 417.73, 117.55, 10.87)
pt3dadd(150.65, 429.4, 117.55, 10.87)
pt3dadd(153.53, 438.17, 117.55, 8.83)
}
dend[61] {pt3dclear()
pt3dadd(153.53, 438.17, 117.55, 8.83)
pt3dadd(164.74, 456.21, 117.55, 8.83)
pt3dadd(170.52, 467.5, 117.55, 8.83)
pt3dadd(173.4, 476.08, 117.55, 8.15)
pt3dadd(176.97, 490.64, 117.55, 8.15)
pt3dadd(177.14, 490.84, 117.55, 8.15)
pt3dadd(177.14, 491.22, 117.55, 8.15)
pt3dadd(177.48, 491.42, 117.55, 8.15)
pt3dadd(177.82, 491.61, 117.55, 8.15)
pt3dadd(177.82, 491.99, 117.55, 8.15)
pt3dadd(178.16, 492.38, 117.55, 8.15)
pt3dadd(178.33, 492.57, 117.55, 8.15)
pt3dadd(178.5, 492.77, 117.55, 8.15)
pt3dadd(178.5, 493.54, 117.55, 8.15)
pt3dadd(178.67, 493.73, 117.55, 8.15)
pt3dadd(178.84, 493.92, 117.55, 8.15)
pt3dadd(178.84, 494.89, 117.55, 8.15)
pt3dadd(179.01, 495.08, 117.55, 8.15)
pt3dadd(179.01, 502.61, 117.55, 8.15)
pt3dadd(179.18, 502.8, 117.55, 8.15)
pt3dadd(179.18, 503.18, 117.55, 8.15)
pt3dadd(179.35, 503.38, 117.55, 8.15)
pt3dadd(179.52, 503.57, 117.55, 8.15)
pt3dadd(179.69, 503.76, 117.55, 8.15)
pt3dadd(179.86, 503.95, 117.55, 8.15)
pt3dadd(180.03, 504.15, 117.55, 8.15)
pt3dadd(180.2, 504.34, 117.55, 8.15)
pt3dadd(180.37, 504.73, 117.55, 8.15)
pt3dadd(180.54, 504.92, 117.55, 8.15)
pt3dadd(180.71, 505.11, 117.55, 8.15)
pt3dadd(180.88, 505.3, 117.55, 8.15)
pt3dadd(181.04, 505.5, 117.55, 8.15)
pt3dadd(181.21, 505.69, 117.55, 8.15)
pt3dadd(181.55, 505.88, 117.55, 8.15)
pt3dadd(182.07, 505.88, 117.55, 8.15)
pt3dadd(182.4, 506.56, 117.55, 7.47)
pt3dadd(183.26, 513.98, 117.55, 10.87)
}
dend[62] {pt3dclear()
pt3dadd(183.26, 513.98, 117.55, 10.87)
pt3dadd(185.12, 524.89, 117.55, 10.87)
pt3dadd(187.16, 535.01, 117.55, 10.87)
pt3dadd(189.2, 548.22, 117.55, 10.87)
pt3dadd(191.57, 568.48, 117.55, 10.87)
pt3dadd(193.62, 582.56, 117.55, 10.87)
pt3dadd(192.13, 577.05, 117.55, 5.77)
pt3dadd(192.13, 576.86, 117.55, 5.77)
pt3dadd(192.21, 576.96, 117.55, 5.77)
pt3dadd(192.3, 577.05, 117.55, 5.77)
pt3dadd(192.3, 577.25, 117.55, 5.77)
pt3dadd(192.38, 577.34, 117.55, 5.77)
pt3dadd(192.38, 578.6, 117.55, 5.77)
pt3dadd(192.47, 578.7, 117.55, 5.77)
pt3dadd(192.55, 578.79, 117.55, 5.77)
pt3dadd(192.64, 578.89, 117.55, 5.77)
pt3dadd(192.72, 579.08, 117.55, 5.77)
pt3dadd(192.81, 579.18, 117.55, 5.77)
pt3dadd(192.89, 579.27, 117.55, 5.77)
pt3dadd(192.98, 579.37, 117.55, 5.77)
pt3dadd(193.06, 579.47, 117.55, 5.77)
pt3dadd(193.15, 579.56, 117.55, 5.77)
pt3dadd(193.32, 579.76, 117.55, 5.77)
pt3dadd(193.4, 579.85, 117.55, 5.77)
pt3dadd(193.49, 580.04, 117.55, 5.77)
pt3dadd(193.57, 580.14, 117.55, 5.77)
pt3dadd(193.57, 581.88, 117.55, 5.77)
pt3dadd(193.49, 581.97, 117.55, 5.77)
pt3dadd(193.06, 581.97, 117.55, 5.77)
pt3dadd(193.15, 582.07, 117.55, 5.77)
pt3dadd(193.23, 582.17, 117.55, 5.77)
}
}
proc shape3d_85() {
dend[62] { pt3dadd(193.32, 582.26, 117.55, 5.77)
pt3dadd(193.4, 582.46, 117.55, 5.77)
pt3dadd(193.49, 582.55, 117.55, 5.77)
pt3dadd(193.57, 582.65, 117.55, 5.77)
pt3dadd(193.66, 582.74, 117.55, 5.77)
pt3dadd(193.74, 582.94, 117.55, 5.77)
pt3dadd(193.83, 583.03, 117.55, 5.77)
pt3dadd(193.99, 583.13, 117.55, 8)
pt3dadd(194.16, 583.23, 117.55, 9)
pt3dadd(194.34, 583.33, 117.55, 5.77)
pt3dadd(194.42, 583.42, 117.55, 8)
pt3dadd(194.51, 583.52, 117.55, 5.77)
pt3dadd(194.59, 583.61, 117.55, 5.77)
pt3dadd(194.68, 583.71, 117.55, 5.77)
pt3dadd(194.76, 583.81, 117.55, 5.77)
pt3dadd(194.85, 583.9, 117.55, 5.77)
pt3dadd(194.93, 584, 117.55, 5.77)
pt3dadd(195.01, 584.09, 117.55, 5.77)
pt3dadd(195.1, 584.29, 117.55, 5.77)
pt3dadd(195.18, 584.39, 117.55, 5.77)
pt3dadd(195.27, 584.48, 117.55, 5.77)
pt3dadd(195.35, 584.67, 117.55, 5.77)
pt3dadd(195.44, 584.87, 117.55, 7)
pt3dadd(195.52, 584.96, 117.55, 5.77)
pt3dadd(195.61, 585.06, 117.55, 5.77)
pt3dadd(195.78, 585.16, 117.55, 5.77)
pt3dadd(195.78, 585.35, 117.55, 7.7)
pt3dadd(195.87, 585.45, 117.55, 5.77)
pt3dadd(195.95, 585.54, 117.55, 5.77)
pt3dadd(195.95, 585.73, 117.55, 5.77)
pt3dadd(196.04, 585.83, 117.55, 5.77)
pt3dadd(196.04, 586.03, 117.55, 5.77)
pt3dadd(196.12, 586.22, 117.55, 5.77)
pt3dadd(196.12, 586.41, 117.55, 5.77)
pt3dadd(196.21, 586.6, 117.55, 5.77)
pt3dadd(196.29, 586.7, 117.55, 5.77)
pt3dadd(196.29, 586.89, 117.55, 5.77)
pt3dadd(196.38, 586.99, 117.55, 5.77)
pt3dadd(196.46, 587.09, 117.55, 5.77)
pt3dadd(196.71, 587.38, 117.55, 5.77)
pt3dadd(196.8, 587.57, 117.55, 5.77)
pt3dadd(196.88, 587.66, 117.55, 5.77)
pt3dadd(196.97, 587.76, 117.55, 5.77)
pt3dadd(197.05, 587.86, 117.55, 5.77)
pt3dadd(197.14, 587.95, 117.55, 6)
pt3dadd(197.22, 588.05, 117.55, 5.77)
pt3dadd(197.31, 588.15, 117.55, 5.77)
pt3dadd(197.39, 588.24, 117.55, 5.77)
pt3dadd(197.48, 588.34, 117.55, 5.77)
pt3dadd(197.56, 588.43, 117.55, 5.77)
pt3dadd(197.65, 588.53, 117.55, 5.77)
pt3dadd(197.73, 588.63, 117.55, 5.77)
pt3dadd(197.82, 588.72, 117.55, 5.77)
pt3dadd(197.82, 588.92, 117.55, 5.77)
pt3dadd(197.99, 589.02, 117.55, 5.77)
pt3dadd(197.99, 589.21, 117.55, 5.77)
pt3dadd(198.07, 589.4, 117.55, 5.77)
pt3dadd(198.16, 589.5, 117.55, 5.77)
pt3dadd(198.24, 589.59, 117.55, 5.77)
pt3dadd(198.24, 589.88, 117.55, 5.77)
pt3dadd(198.33, 589.98, 117.55, 5.77)
pt3dadd(198.33, 590.46, 117.55, 5.77)
pt3dadd(198.41, 590.66, 117.55, 5.77)
pt3dadd(198.5, 590.85, 117.55, 5.77)
pt3dadd(198.5, 591.14, 117.55, 5.77)
pt3dadd(198.58, 591.33, 117.55, 5.77)
pt3dadd(198.67, 591.52, 117.55, 5.77)
pt3dadd(198.75, 591.62, 117.55, 5.77)
pt3dadd(198.84, 591.72, 117.55, 5.77)
pt3dadd(198.92, 591.81, 117.55, 5.77)
pt3dadd(199.01, 591.91, 117.55, 5.77)
pt3dadd(199.09, 592.01, 117.55, 5.77)
pt3dadd(199.18, 592.1, 117.55, 5.77)
pt3dadd(199.26, 592.29, 117.55, 5.77)
pt3dadd(199.35, 592.39, 117.55, 5.77)
pt3dadd(199.51, 592.49, 117.55, 5.77)
pt3dadd(199.6, 592.58, 117.55, 5.77)
pt3dadd(199.18, 591.72, 117.55, 5.1)
pt3dadd(199.18, 591.81, 117.55, 5.1)
pt3dadd(199.26, 591.91, 117.55, 5.1)
pt3dadd(199.26, 592.1, 117.55, 5.1)
pt3dadd(199.35, 592.2, 117.55, 5.1)
pt3dadd(199.35, 592.58, 117.55, 5.1)
pt3dadd(199.43, 592.68, 117.55, 5.1)
pt3dadd(199.51, 592.78, 117.55, 5.1)
pt3dadd(199.51, 593.07, 117.55, 5.1)
pt3dadd(199.6, 593.16, 117.55, 5.1)
pt3dadd(199.68, 593.26, 117.55, 5.1)
pt3dadd(199.68, 593.45, 117.55, 5.1)
pt3dadd(199.77, 593.55, 117.55, 5.1)
pt3dadd(199.85, 593.65, 117.55, 5.1)
pt3dadd(199.94, 593.84, 117.55, 5.1)
pt3dadd(200.02, 593.93, 117.55, 5.1)
pt3dadd(200.11, 594.03, 117.55, 5.1)
pt3dadd(200.2, 594.13, 117.55, 5.1)
pt3dadd(200.28, 594.22, 117.55, 5.1)
pt3dadd(200.37, 594.32, 117.55, 5.1)
pt3dadd(200.45, 594.41, 117.55, 5.1)
pt3dadd(200.54, 594.51, 117.55, 5.1)
pt3dadd(200.62, 594.61, 117.55, 5.1)
pt3dadd(200.71, 594.8, 117.55, 5.1)
pt3dadd(200.79, 594.9, 117.55, 5.1)
pt3dadd(200.88, 594.99, 117.55, 5.1)
pt3dadd(200.96, 595.09, 117.55, 5.1)
pt3dadd(200.96, 595.28, 117.55, 5.1)
pt3dadd(201.13, 595.48, 117.55, 5.1)
pt3dadd(201.21, 595.67, 117.55, 5.1)
pt3dadd(201.3, 595.86, 117.55, 5.1)
pt3dadd(201.38, 595.96, 117.55, 5.1)
pt3dadd(201.38, 596.15, 117.55, 5.1)
pt3dadd(201.47, 596.25, 117.55, 5.1)
pt3dadd(201.55, 596.34, 117.55, 5.1)
pt3dadd(201.64, 596.44, 117.55, 5.1)
pt3dadd(201.72, 596.64, 117.55, 5.1)
pt3dadd(201.81, 596.73, 117.55, 5.1)
pt3dadd(201.89, 596.83, 117.55, 5.1)
pt3dadd(201.98, 597.02, 117.55, 5.1)
pt3dadd(202.06, 597.21, 117.55, 5.1)
pt3dadd(202.15, 597.31, 117.55, 5.1)
pt3dadd(202.23, 597.41, 117.55, 5.1)
pt3dadd(202.4, 597.6, 117.55, 5.1)
pt3dadd(202.49, 597.7, 117.55, 5.1)
pt3dadd(202.57, 597.79, 117.55, 5.1)
pt3dadd(202.66, 597.89, 117.55, 5.1)
pt3dadd(202.74, 598.08, 117.55, 5.1)
pt3dadd(202.83, 598.18, 117.55, 5.1)
pt3dadd(202.83, 598.37, 117.55, 5.1)
pt3dadd(202.91, 598.47, 117.55, 5.1)
pt3dadd(203, 598.56, 117.55, 5.1)
pt3dadd(203.08, 598.76, 117.55, 5.1)
pt3dadd(203.08, 598.95, 117.55, 5.1)
pt3dadd(203.17, 599.04, 117.55, 5.1)
pt3dadd(203.25, 599.14, 117.55, 5.1)
pt3dadd(203.34, 599.24, 117.55, 5.1)
pt3dadd(203.42, 599.34, 117.55, 5.1)
pt3dadd(203.51, 599.43, 117.55, 5.1)
pt3dadd(203.51, 599.63, 117.55, 5.1)
pt3dadd(203.59, 599.72, 117.55, 5.1)
pt3dadd(203.68, 599.82, 117.55, 5.1)
pt3dadd(203.68, 600.3, 117.55, 5.1)
pt3dadd(204.02, 600.88, 117.55, 5.77)
pt3dadd(204.02, 600.78, 117.55, 5.77)
pt3dadd(204.1, 600.68, 117.55, 5.77)
pt3dadd(204.19, 600.88, 117.55, 5.77)
pt3dadd(204.19, 601.07, 117.55, 5.77)
pt3dadd(204.27, 601.17, 117.55, 5.77)
pt3dadd(204.35, 601.27, 117.55, 5.77)
pt3dadd(204.35, 601.46, 117.55, 5.77)
pt3dadd(204.44, 601.55, 117.55, 5.77)
pt3dadd(204.44, 601.74, 117.55, 5.77)
pt3dadd(204.52, 601.94, 117.55, 5.77)
pt3dadd(204.61, 602.03, 117.55, 5.77)
pt3dadd(204.61, 602.23, 117.55, 5.77)
pt3dadd(204.7, 602.42, 117.55, 5.77)
pt3dadd(204.78, 602.52, 117.55, 5.77)
pt3dadd(204.78, 602.71, 117.55, 5.77)
pt3dadd(204.87, 602.9, 117.55, 5.77)
pt3dadd(204.95, 603, 117.55, 5.77)
pt3dadd(204.95, 603.29, 117.55, 5.77)
pt3dadd(205.04, 603.39, 117.55, 5.77)
pt3dadd(205.12, 603.58, 117.55, 5.77)
pt3dadd(205.21, 603.77, 117.55, 5.77)
pt3dadd(205.21, 603.97, 117.55, 5.77)
pt3dadd(205.29, 604.06, 117.55, 5.77)
pt3dadd(205.29, 604.26, 117.55, 5.77)
pt3dadd(205.38, 604.45, 117.55, 5.77)
pt3dadd(205.46, 604.54, 117.55, 5.77)
pt3dadd(205.46, 604.73, 117.55, 5.77)
pt3dadd(205.54, 604.93, 117.55, 5.77)
pt3dadd(205.63, 605.03, 117.55, 5.77)
pt3dadd(205.63, 605.22, 117.55, 5.77)
pt3dadd(205.71, 605.32, 117.55, 5.77)
pt3dadd(205.71, 605.51, 117.55, 5.77)
pt3dadd(205.8, 605.6, 117.55, 5.77)
pt3dadd(205.8, 605.8, 117.55, 5.77)
pt3dadd(205.88, 605.89, 117.55, 5.77)
pt3dadd(205.88, 606.18, 117.55, 5.77)
pt3dadd(205.97, 606.38, 117.55, 5.77)
pt3dadd(206.05, 606.47, 117.55, 5.77)
pt3dadd(206.05, 606.76, 117.55, 5.77)
pt3dadd(206.14, 606.86, 117.55, 5.77)
pt3dadd(206.14, 607.05, 117.55, 5.77)
pt3dadd(206.23, 607.15, 117.55, 5.77)
pt3dadd(206.23, 607.44, 117.55, 5.77)
pt3dadd(206.31, 607.53, 117.55, 5.77)
pt3dadd(206.31, 607.72, 117.55, 5.77)
pt3dadd(206.4, 607.82, 117.55, 5.77)
pt3dadd(206.4, 608.11, 117.55, 5.77)
pt3dadd(206.48, 608.3, 117.55, 5.77)
pt3dadd(206.57, 608.4, 117.55, 5.77)
pt3dadd(206.57, 608.59, 117.55, 5.77)
pt3dadd(206.65, 608.79, 117.55, 5.77)
pt3dadd(206.65, 609.08, 117.55, 5.77)
pt3dadd(206.74, 609.27, 117.55, 5.77)
pt3dadd(206.82, 609.36, 117.55, 5.77)
pt3dadd(206.82, 609.56, 117.55, 5.77)
pt3dadd(206.9, 609.75, 117.55, 5.77)
pt3dadd(206.99, 609.95, 117.55, 5.77)
pt3dadd(207.07, 610.04, 117.55, 5.77)
pt3dadd(207.07, 610.23, 117.55, 5.77)
}
}
proc shape3d_86() {
dend[62] { pt3dadd(207.16, 610.33, 117.55, 5.77)
pt3dadd(207.24, 610.52, 117.55, 5.77)
pt3dadd(207.33, 610.72, 117.55, 5.77)
pt3dadd(207.41, 610.81, 117.55, 5.77)
pt3dadd(207.41, 611.01, 117.55, 5.77)
pt3dadd(207.5, 611.2, 117.55, 5.77)
pt3dadd(207.58, 611.39, 117.55, 5.77)
pt3dadd(207.58, 611.68, 117.55, 5.77)
pt3dadd(207.67, 611.78, 117.55, 5.77)
pt3dadd(207.75, 611.87, 117.55, 5.77)
pt3dadd(207.75, 612.16, 117.55, 5.77)
pt3dadd(207.84, 612.26, 117.55, 5.77)
pt3dadd(207.84, 612.45, 117.55, 5.77)
pt3dadd(207.92, 612.55, 117.55, 5.77)
pt3dadd(207.92, 612.93, 117.55, 5.77)
pt3dadd(208.01, 613.03, 117.55, 5.77)
pt3dadd(208.09, 613.32, 117.55, 5.77)
pt3dadd(208.09, 613.51, 117.55, 5.77)
pt3dadd(208.18, 613.71, 117.55, 5.77)
pt3dadd(208.18, 613.9, 117.55, 5.77)
pt3dadd(208.26, 613.99, 117.55, 5.77)
pt3dadd(208.35, 614.09, 117.55, 5.77)
pt3dadd(208.35, 614.38, 117.55, 5.77)
pt3dadd(208.43, 614.48, 117.55, 5.77)
pt3dadd(208.52, 614.67, 117.55, 5.77)
pt3dadd(208.6, 614.86, 117.55, 5.77)
pt3dadd(208.6, 615.06, 117.55, 5.77)
pt3dadd(208.69, 615.25, 117.55, 5.77)
pt3dadd(208.77, 615.44, 117.55, 5.77)
pt3dadd(208.86, 615.64, 117.55, 5.77)
pt3dadd(208.94, 615.73, 117.55, 5.77)
pt3dadd(209.03, 615.83, 117.55, 5.77)
pt3dadd(209.03, 616.02, 117.55, 5.77)
pt3dadd(209.11, 616.12, 117.55, 5.77)
pt3dadd(209.2, 616.21, 117.55, 5.77)
pt3dadd(209.2, 616.41, 117.55, 5.77)
pt3dadd(209.28, 616.6, 117.55, 5.77)
pt3dadd(209.37, 616.7, 117.55, 5.77)
pt3dadd(209.37, 616.89, 117.55, 5.77)
pt3dadd(209.45, 616.98, 117.55, 5.77)
pt3dadd(209.54, 617.08, 117.55, 5.77)
pt3dadd(209.62, 617.28, 117.55, 5.77)
pt3dadd(209.62, 617.47, 117.55, 5.77)
pt3dadd(209.71, 617.66, 117.55, 5.77)
pt3dadd(209.79, 617.76, 117.55, 5.77)
pt3dadd(209.79, 618.05, 117.55, 5.77)
pt3dadd(209.88, 618.14, 117.55, 5.77)
pt3dadd(209.96, 618.24, 117.55, 5.77)
pt3dadd(209.96, 618.53, 117.55, 5.77)
pt3dadd(210.04, 618.63, 117.55, 5.77)
pt3dadd(210.04, 619.11, 117.55, 5.77)
pt3dadd(210.13, 619.2, 117.55, 5.77)
pt3dadd(210.13, 620.94, 117.55, 5.77)
pt3dadd(210.38, 621.13, 117.55, 6.45)
pt3dadd(210.47, 621.23, 117.55, 6.45)
pt3dadd(210.47, 621.52, 117.55, 6.45)
pt3dadd(210.55, 621.61, 117.55, 6.45)
pt3dadd(210.64, 621.71, 117.55, 6.45)
pt3dadd(210.64, 622, 117.55, 6.45)
pt3dadd(210.73, 622.1, 117.55, 6.45)
pt3dadd(210.73, 622.58, 117.55, 6.45)
pt3dadd(210.81, 622.67, 117.55, 6.45)
pt3dadd(210.81, 622.97, 117.55, 6.45)
pt3dadd(210.9, 623.06, 117.55, 6.45)
pt3dadd(210.9, 623.26, 117.55, 6.45)
pt3dadd(210.98, 623.35, 117.55, 6.45)
pt3dadd(210.98, 623.64, 117.55, 6.45)
pt3dadd(211.07, 623.83, 117.55, 6.45)
pt3dadd(211.15, 623.93, 117.55, 6.45)
pt3dadd(211.15, 624.22, 117.55, 6.45)
pt3dadd(211.24, 624.41, 117.55, 6.45)
pt3dadd(211.32, 624.6, 117.55, 6.45)
pt3dadd(211.4, 624.7, 117.55, 6.45)
pt3dadd(211.49, 624.9, 117.55, 6.45)
pt3dadd(211.49, 625.09, 117.55, 6.45)
pt3dadd(211.57, 625.18, 117.55, 6.45)
pt3dadd(211.66, 625.28, 117.55, 6.45)
pt3dadd(211.74, 625.38, 117.55, 6.45)
pt3dadd(211.74, 625.57, 117.55, 6.45)
pt3dadd(211.83, 625.66, 117.55, 6.45)
pt3dadd(211.83, 625.86, 117.55, 6.45)
pt3dadd(211.91, 626.05, 117.55, 6.45)
pt3dadd(211.91, 626.24, 117.55, 6.45)
pt3dadd(212, 626.44, 117.55, 6.45)
pt3dadd(212, 626.82, 117.55, 6.45)
pt3dadd(212.08, 626.92, 117.55, 6.45)
pt3dadd(212.17, 627.02, 117.55, 6.45)
pt3dadd(212.17, 627.21, 117.55, 6.45)
pt3dadd(212.25, 627.4, 117.55, 6.45)
pt3dadd(212.25, 627.59, 117.55, 6.45)
pt3dadd(212.34, 627.69, 117.55, 6.45)
pt3dadd(212.42, 627.79, 117.55, 6.45)
pt3dadd(212.42, 628.08, 117.55, 6.45)
pt3dadd(212.51, 628.27, 117.55, 6.45)
pt3dadd(212.59, 628.37, 117.55, 6.45)
pt3dadd(212.68, 628.46, 117.55, 6.45)
pt3dadd(212.76, 628.56, 117.55, 6.45)
pt3dadd(212.76, 628.75, 117.55, 6.45)
pt3dadd(212.85, 628.85, 117.55, 6.45)
pt3dadd(212.85, 630.49, 117.55, 6.45)
pt3dadd(212.93, 630.68, 117.55, 6.45)
pt3dadd(212.93, 635.22, 117.55, 6.45)
pt3dadd(212.85, 635.41, 117.55, 6.45)
pt3dadd(212.76, 636.37, 117.55, 6.11)
pt3dadd(212.76, 636.57, 117.55, 6.11)
pt3dadd(212.68, 636.66, 117.55, 6.11)
pt3dadd(212.68, 637.14, 117.55, 6.11)
pt3dadd(212.76, 637.24, 117.55, 6.11)
pt3dadd(212.76, 637.53, 117.55, 6.11)
pt3dadd(212.85, 637.72, 117.55, 6.11)
pt3dadd(212.85, 637.91, 117.55, 6.11)
pt3dadd(212.93, 638.01, 117.55, 6.11)
pt3dadd(213.02, 638.21, 117.55, 6.11)
pt3dadd(213.02, 638.4, 117.55, 6.11)
pt3dadd(213.1, 638.49, 117.55, 6.11)
pt3dadd(213.19, 638.59, 117.55, 6.11)
pt3dadd(213.19, 638.78, 117.55, 6.11)
pt3dadd(213.27, 638.88, 117.55, 6.11)
pt3dadd(213.27, 639.07, 117.55, 6.11)
pt3dadd(213.36, 639.27, 117.55, 6.11)
pt3dadd(213.36, 639.46, 117.55, 6.11)
pt3dadd(213.44, 639.65, 117.55, 6.11)
pt3dadd(213.44, 640.71, 117.55, 6.11)
pt3dadd(213.53, 640.91, 117.55, 6.11)
pt3dadd(213.53, 641.58, 117.55, 6.11)
pt3dadd(213.61, 641.68, 117.55, 6.11)
pt3dadd(214.16, 641.78, 117.55, 6.11)
}
dend[63] {pt3dclear()
pt3dadd(214.16, 641.78, 117.55, 5.43)
pt3dadd(211.28, 643.91, 117.55, 5.43)
pt3dadd(186.32, 668.88, 117.55, 5.77)
pt3dadd(184.45, 672.01, 117.55, 5.77)
pt3dadd(183.43, 675.34, 117.55, 5.77)
pt3dadd(182.41, 677.22, 117.55, 5.77)
pt3dadd(181.9, 679.2, 117.55, 5.77)
pt3dadd(181.31, 679.83, 117.55, 5.43)
pt3dadd(180.8, 684.41, 117.55, 5.43)
pt3dadd(180.55, 688.31, 117.55, 5.43)
pt3dadd(180.04, 691.35, 117.55, 5.43)
pt3dadd(179.61, 693.42, 117.55, 5.43)
pt3dadd(179.61, 695.11, 117.55, 4.76)
pt3dadd(179.61, 696.13, 117.55, 4.42)
pt3dadd(180.46, 698.1, 117.55, 4.42)
pt3dadd(181.4, 699.98, 117.55, 4.08)
pt3dadd(182.33, 702.64, 117.55, 4.08)
pt3dadd(182.24, 704.9, 117.55, 4.08)
pt3dadd(181.9, 706.78, 117.55, 4.08)
pt3dadd(181.48, 708.95, 117.55, 4.08)
pt3dadd(181.14, 710.54, 117.55, 4.08)
pt3dadd(181.31, 713, 117.55, 3.06)
pt3dadd(181.31, 713.15, 117.55, 3.06)
}
dend[64] {pt3dclear()
pt3dadd(181.31, 713.15, 117.55, 3.06)
pt3dadd(181.4, 715.85, 117.55, 3.06)
pt3dadd(181.23, 716.86, 117.55, 3.06)
pt3dadd(181.4, 717.68, 117.55, 3.06)
pt3dadd(182.93, 720.24, 117.55, 3.06)
pt3dadd(183.77, 722.79, 117.55, 3.06)
pt3dadd(184.45, 724.58, 117.55, 2.72)
pt3dadd(187.76, 731.57, 117.55, 2.72)
pt3dadd(189.46, 737.6, 117.55, 2.72)
pt3dadd(190.4, 741.7, 117.55, 2.72)
pt3dadd(191.08, 744.93, 117.55, 2.72)
pt3dadd(190.74, 747.68, 117.55, 2.72)
pt3dadd(191.42, 754.28, 117.55, 2.72)
pt3dadd(191.67, 760.6, 117.55, 2.72)
pt3dadd(192.69, 765.18, 117.55, 2.72)
pt3dadd(194.13, 769.77, 117.55, 2.72)
pt3dadd(195.49, 773.96, 117.55, 2.72)
pt3dadd(194.98, 777.87, 117.55, 2.72)
pt3dadd(194.13, 780.71, 117.55, 2.72)
pt3dadd(193.46, 782.78, 117.55, 2.72)
pt3dadd(193.37, 786.69, 117.55, 2.72)
pt3dadd(194.05, 788.67, 117.55, 3.06)
pt3dadd(194.3, 792.58, 117.55, 3.06)
pt3dadd(194.13, 796.48, 117.55, 3.06)
pt3dadd(194.13, 800.39, 117.55, 3.06)
pt3dadd(194.13, 803.52, 117.55, 3.06)
pt3dadd(193.88, 805.79, 117.55, 3.4)
pt3dadd(193.71, 807.48, 117.55, 3.4)
pt3dadd(193.03, 808.78, 117.55, 4.08)
pt3dadd(193.71, 809.89, 117.55, 4.08)
pt3dadd(193.54, 811.29, 117.55, 4.08)
pt3dadd(218.25, 926.59, 117.55, 3.74)
pt3dadd(218.75, 926.02, 117.55, 3.74)
pt3dadd(218.08, 928.67, 117.55, 3.74)
pt3dadd(218.59, 930.35, 117.55, 3.74)
pt3dadd(218.85, 931.56, 117.55, 3.74)
pt3dadd(218.42, 932.19, 117.55, 3.74)
pt3dadd(218.25, 932.82, 117.55, 3.74)
pt3dadd(218.51, 934.5, 117.55, 3.74)
pt3dadd(219.1, 938.7, 117.55, 4.42)
pt3dadd(218.42, 944.15, 117.55, 4.42)
pt3dadd(217.99, 948.25, 117.55, 4.42)
pt3dadd(217.49, 951.28, 117.55, 4.42)
pt3dadd(217.74, 957.12, 117.55, 4.42)
pt3dadd(217.91, 961.9, 117.55, 4.42)
pt3dadd(218.76, 965.61, 117.55, 4.42)
pt3dadd(220.21, 968.26, 117.55, 4.42)
pt3dadd(221.82, 973.23, 117.55, 4.42)
pt3dadd(222.84, 979.16, 117.55, 4.76)
pt3dadd(222.75, 983.93, 117.55, 4.76)
}
}
proc shape3d_87() {
dend[64] { pt3dadd(221.56, 988.8, 117.55, 4.76)
pt3dadd(219.44, 991.84, 117.55, 4.76)
pt3dadd(217.23, 999.51, 117.55, 4.76)
pt3dadd(215.62, 1003.61, 117.55, 4.08)
pt3dadd(213.2, 1013.98, 117.55, 4.08)
pt3dadd(213.79, 1011.76, 117.55, 4.08)
pt3dadd(213.37, 1012.24, 117.55, 4.08)
pt3dadd(211.59, 1014.27, 117.55, 4.08)
pt3dadd(214.22, 1014.36, 117.55, 4.08)
pt3dadd(214.13, 1014.46, 117.55, 4.08)
pt3dadd(213.63, 1014.46, 117.55, 4.08)
pt3dadd(213.54, 1014.56, 117.55, 4.08)
pt3dadd(213.46, 1014.66, 117.55, 4.08)
pt3dadd(213.37, 1014.75, 117.55, 4.08)
pt3dadd(213.29, 1014.85, 117.55, 4.08)
pt3dadd(213.2, 1014.94, 117.55, 4.08)
pt3dadd(213.12, 1015.04, 117.55, 4.08)
pt3dadd(213.03, 1015.14, 117.55, 4.08)
pt3dadd(212.95, 1015.23, 117.55, 4.08)
pt3dadd(212.86, 1015.33, 117.55, 4.08)
pt3dadd(212.77, 1015.42, 117.55, 4.08)
pt3dadd(212.69, 1015.62, 117.55, 4.08)
pt3dadd(212.52, 1015.62, 117.55, 4.08)
pt3dadd(212.44, 1015.72, 117.55, 4.08)
pt3dadd(212.44, 1015.91, 117.55, 4.08)
pt3dadd(212.35, 1016.01, 117.55, 4.08)
pt3dadd(212.27, 1016.1, 117.55, 4.08)
pt3dadd(212.18, 1016.2, 117.55, 4.08)
pt3dadd(212.1, 1016.29, 117.55, 4.08)
pt3dadd(211.08, 1016.29, 117.55, 4.08)
pt3dadd(211.67, 1016.29, 117.55, 4.08)
pt3dadd(211.67, 1018.03, 117.55, 4.08)
pt3dadd(211.59, 1018.32, 117.55, 4.08)
pt3dadd(211.5, 1018.51, 117.55, 4.08)
pt3dadd(211.42, 1018.71, 117.55, 4.08)
pt3dadd(211.5, 1018.61, 117.55, 4.08)
pt3dadd(211.67, 1018.51, 117.55, 4.08)
pt3dadd(211.76, 1018.41, 117.55, 4.08)
pt3dadd(211.76, 1018.03, 117.55, 4.08)
pt3dadd(211.84, 1017.93, 117.55, 4.08)
pt3dadd(211.93, 1017.84, 117.55, 4.08)
pt3dadd(212.1, 1017.84, 117.55, 4.08)
pt3dadd(212.1, 1018.61, 117.55, 4.08)
pt3dadd(212.01, 1018.71, 117.55, 4.08)
pt3dadd(212.01, 1018.9, 117.55, 4.08)
pt3dadd(211.93, 1018.99, 117.55, 4.08)
pt3dadd(211.93, 1019.19, 117.55, 4.08)
pt3dadd(211.84, 1019.28, 117.55, 4.08)
pt3dadd(211.76, 1019.38, 117.55, 4.08)
pt3dadd(211.67, 1019.48, 117.55, 4.08)
pt3dadd(211.59, 1019.57, 117.55, 4.08)
pt3dadd(211.42, 1019.77, 117.55, 4.08)
pt3dadd(211.16, 1019.86, 117.55, 4.08)
pt3dadd(211.08, 1019.96, 117.55, 4.08)
pt3dadd(210.99, 1020.05, 117.55, 4.08)
pt3dadd(210.82, 1020.15, 117.55, 4.08)
pt3dadd(210.74, 1020.34, 117.55, 4.08)
pt3dadd(210.4, 1020.34, 117.55, 4.08)
pt3dadd(210.31, 1020.44, 117.55, 4.08)
pt3dadd(210.23, 1020.54, 117.55, 4.08)
pt3dadd(210.14, 1020.63, 117.55, 4.08)
pt3dadd(210.06, 1020.73, 117.55, 4.08)
pt3dadd(210.06, 1022.37, 117.55, 4.08)
pt3dadd(209.98, 1022.47, 117.55, 4.08)
pt3dadd(209.89, 1022.56, 117.55, 4.08)
pt3dadd(209.89, 1022.76, 117.55, 4.08)
pt3dadd(209.72, 1022.76, 117.55, 4.08)
pt3dadd(209.63, 1022.85, 117.55, 4.08)
pt3dadd(209.55, 1022.95, 117.55, 4.08)
pt3dadd(209.46, 1023.04, 117.55, 4.08)
pt3dadd(209.46, 1023.82, 117.55, 4.08)
pt3dadd(209.38, 1023.91, 117.55, 4.08)
pt3dadd(209.29, 1024.01, 117.55, 4.08)
pt3dadd(208.87, 1024.01, 117.55, 4.08)
pt3dadd(208.87, 1026.04, 117.55, 4.08)
pt3dadd(208.79, 1026.13, 117.55, 4.08)
pt3dadd(208.79, 1026.71, 117.55, 4.42)
pt3dadd(208.7, 1026.81, 117.55, 4.42)
pt3dadd(208.62, 1026.9, 117.55, 4.42)
pt3dadd(208.53, 1027, 117.55, 4.42)
pt3dadd(208.45, 1027.09, 117.55, 4.42)
pt3dadd(208.36, 1027.19, 117.55, 4.42)
pt3dadd(208.27, 1027.29, 117.55, 4.42)
pt3dadd(208.27, 1027.58, 117.55, 4.42)
pt3dadd(208.19, 1027.68, 117.55, 4.42)
pt3dadd(208.1, 1027.77, 117.55, 4.42)
pt3dadd(208.02, 1027.87, 117.55, 4.42)
pt3dadd(208.02, 1028.16, 117.55, 4.42)
pt3dadd(207.93, 1028.25, 117.55, 4.42)
pt3dadd(207.85, 1028.35, 117.55, 4.42)
pt3dadd(207.76, 1028.45, 117.55, 4.42)
pt3dadd(207.68, 1028.54, 117.55, 4.42)
pt3dadd(207.6, 1028.64, 117.55, 4.42)
pt3dadd(207.43, 1028.83, 117.55, 4.42)
pt3dadd(207.34, 1028.93, 117.55, 4.42)
pt3dadd(207.26, 1029.03, 117.55, 4.42)
pt3dadd(207.17, 1029.12, 117.55, 4.42)
pt3dadd(207, 1029.12, 117.55, 4.42)
pt3dadd(206.92, 1029.22, 117.55, 4.42)
pt3dadd(206.83, 1029.41, 117.55, 4.42)
pt3dadd(206.66, 1029.41, 117.55, 4.42)
pt3dadd(206.58, 1029.6, 117.55, 4.42)
pt3dadd(206.41, 1029.8, 117.55, 4.42)
pt3dadd(206.24, 1029.89, 117.55, 4.42)
pt3dadd(206.15, 1030.08, 117.55, 4.42)
pt3dadd(206.07, 1030.18, 117.55, 4.42)
pt3dadd(205.98, 1030.28, 117.55, 4.42)
pt3dadd(205.9, 1030.38, 117.55, 4.42)
pt3dadd(205.81, 1030.47, 117.55, 4.42)
pt3dadd(205.81, 1030.67, 117.55, 4.42)
pt3dadd(205.73, 1030.86, 117.55, 4.42)
pt3dadd(205.64, 1031.05, 117.55, 4.42)
pt3dadd(205.56, 1031.24, 117.55, 4.42)
pt3dadd(205.47, 1031.34, 117.55, 4.42)
pt3dadd(205.39, 1031.53, 117.55, 4.42)
pt3dadd(205.3, 1031.72, 117.55, 4.42)
pt3dadd(205.22, 1031.92, 117.55, 4.42)
pt3dadd(205.13, 1032.02, 117.55, 4.42)
pt3dadd(205.05, 1032.11, 117.55, 4.42)
pt3dadd(204.96, 1032.21, 117.55, 4.42)
pt3dadd(204.88, 1032.31, 117.55, 4.42)
pt3dadd(204.79, 1032.4, 117.55, 4.42)
pt3dadd(204.71, 1032.5, 117.55, 4.42)
pt3dadd(204.63, 1032.69, 117.55, 4.42)
pt3dadd(204.54, 1032.79, 117.55, 4.42)
pt3dadd(204.37, 1032.88, 117.55, 4.42)
pt3dadd(204.29, 1033.07, 117.55, 4.42)
pt3dadd(204.2, 1033.27, 117.55, 4.42)
pt3dadd(204.12, 1033.36, 117.55, 4.42)
pt3dadd(204.03, 1033.56, 117.55, 4.42)
pt3dadd(203.95, 1033.66, 117.55, 4.42)
pt3dadd(203.86, 1033.75, 117.55, 4.42)
pt3dadd(203.77, 1033.85, 117.55, 4.42)
pt3dadd(203.77, 1034.04, 117.55, 4.42)
pt3dadd(203.69, 1034.14, 117.55, 4.42)
pt3dadd(203.69, 1035.01, 117.55, 4.42)
pt3dadd(203.6, 1035.1, 117.55, 4.42)
pt3dadd(203.6, 1035.3, 117.55, 4.42)
pt3dadd(203.52, 1035.39, 117.55, 4.42)
pt3dadd(203.43, 1035.58, 117.55, 4.42)
pt3dadd(203.26, 1035.87, 117.55, 4.42)
pt3dadd(203.18, 1036.16, 117.55, 4.42)
pt3dadd(203.01, 1036.55, 117.55, 3.06)
}
dend[65] {pt3dclear()
pt3dadd(203.01, 1036.55, 117.55, 3.06)
pt3dadd(202.76, 1036.55, 117.55, 3.06)
pt3dadd(202.76, 1037.9, 117.55, 3.06)
pt3dadd(202.67, 1037.99, 117.55, 3.06)
pt3dadd(202.67, 1038.86, 117.55, 3.06)
pt3dadd(202.76, 1038.96, 117.55, 3.06)
pt3dadd(202.76, 1039.15, 117.55, 3.06)
pt3dadd(202.41, 1037.7, 117.55, 2.38)
pt3dadd(202.41, 1039.44, 117.55, 2.38)
pt3dadd(202.5, 1039.54, 117.55, 2.38)
pt3dadd(202.5, 1039.83, 117.55, 2.38)
pt3dadd(202.59, 1039.93, 117.55, 2.38)
pt3dadd(202.59, 1040.12, 117.55, 2.38)
pt3dadd(202.67, 1040.31, 117.55, 2.38)
pt3dadd(202.67, 1040.5, 117.55, 2.38)
pt3dadd(202.76, 1040.6, 117.55, 2.38)
pt3dadd(202.84, 1040.69, 117.55, 2.38)
pt3dadd(202.84, 1040.89, 117.55, 2.38)
pt3dadd(202.93, 1040.98, 117.55, 2.38)
pt3dadd(202.93, 1041.37, 117.55, 2.38)
pt3dadd(203.01, 1041.47, 117.55, 2.38)
pt3dadd(203.01, 1042.14, 117.55, 2.38)
pt3dadd(203.1, 1042.24, 117.55, 2.38)
pt3dadd(203.1, 1042.72, 117.55, 2.38)
pt3dadd(203.18, 1042.82, 117.55, 2.38)
pt3dadd(203.18, 1043.01, 117.55, 2.38)
pt3dadd(203.26, 1043.11, 117.55, 2.38)
pt3dadd(203.26, 1043.3, 117.55, 2.38)
pt3dadd(203.35, 1043.4, 117.55, 2.38)
pt3dadd(203.35, 1043.78, 117.55, 2.38)
pt3dadd(203.43, 1043.88, 117.55, 2.38)
pt3dadd(203.43, 1044.36, 117.55, 2.38)
pt3dadd(203.52, 1044.55, 117.55, 2.38)
pt3dadd(203.52, 1045.61, 117.55, 2.38)
pt3dadd(203.6, 1045.71, 117.55, 2.38)
pt3dadd(203.6, 1046.1, 117.55, 2.38)
pt3dadd(203.69, 1046.29, 117.55, 2.38)
pt3dadd(203.69, 1046.48, 117.55, 2.38)
pt3dadd(203.77, 1046.58, 117.55, 2.38)
pt3dadd(203.86, 1047.06, 117.55, 2.38)
pt3dadd(203.95, 1047.45, 117.55, 1.7)
pt3dadd(203.95, 1047.83, 117.55, 1.7)
pt3dadd(204.03, 1047.93, 117.55, 1.7)
pt3dadd(204.03, 1048.12, 117.55, 1.7)
pt3dadd(204.12, 1048.22, 117.55, 1.7)
pt3dadd(204.12, 1048.7, 117.55, 1.7)
pt3dadd(204.2, 1048.8, 117.55, 1.7)
pt3dadd(204.29, 1048.9, 117.55, 1.7)
pt3dadd(204.37, 1048.99, 117.55, 1.7)
pt3dadd(204.37, 1049.47, 117.55, 1.7)
pt3dadd(204.46, 1049.57, 117.55, 1.7)
pt3dadd(204.54, 1049.76, 117.55, 1.7)
pt3dadd(204.54, 1049.95, 117.55, 1.7)
pt3dadd(204.63, 1050.05, 117.55, 1.7)
pt3dadd(204.71, 1050.15, 117.55, 1.7)
pt3dadd(204.79, 1050.24, 117.55, 1.7)
pt3dadd(204.79, 1050.44, 117.55, 1.7)
}
}
proc shape3d_88() {
dend[65] { pt3dadd(204.88, 1050.53, 117.55, 1.7)
pt3dadd(204.96, 1050.63, 117.55, 1.7)
pt3dadd(204.96, 1050.82, 117.55, 1.7)
pt3dadd(205.05, 1050.92, 117.55, 1.7)
pt3dadd(205.13, 1051.02, 117.55, 1.7)
pt3dadd(205.13, 1051.21, 117.55, 1.7)
pt3dadd(205.22, 1051.31, 117.55, 1.7)
pt3dadd(205.22, 1051.5, 117.55, 1.7)
pt3dadd(205.3, 1051.69, 117.55, 1.7)
pt3dadd(205.3, 1051.89, 117.55, 1.7)
pt3dadd(205.39, 1051.98, 117.55, 1.7)
pt3dadd(205.39, 1052.17, 117.55, 1.7)
pt3dadd(205.47, 1052.27, 117.55, 1.7)
pt3dadd(205.47, 1052.46, 117.55, 1.7)
pt3dadd(205.56, 1052.56, 117.55, 1.7)
pt3dadd(205.56, 1052.75, 117.55, 1.7)
pt3dadd(205.64, 1052.85, 117.55, 1.7)
pt3dadd(205.73, 1052.94, 117.55, 1.7)
pt3dadd(205.73, 1053.14, 117.55, 1.7)
pt3dadd(205.81, 1053.23, 117.55, 1.7)
pt3dadd(205.9, 1053.33, 117.55, 1.7)
pt3dadd(205.98, 1053.43, 117.55, 1.7)
pt3dadd(206.15, 1053.62, 117.55, 1.7)
pt3dadd(206.24, 1053.81, 117.55, 1.7)
pt3dadd(206.32, 1053.91, 117.55, 1.7)
pt3dadd(206.41, 1054.1, 117.55, 1.7)
pt3dadd(206.41, 1054.58, 117.55, 1.7)
pt3dadd(206.49, 1054.68, 117.55, 1.7)
pt3dadd(206.58, 1054.78, 117.55, 1.7)
pt3dadd(206.58, 1055.07, 117.55, 1.7)
pt3dadd(206.66, 1055.26, 117.55, 1.7)
pt3dadd(206.58, 1055.26, 117.55, 1.7)
pt3dadd(206.66, 1055.35, 117.55, 1.7)
pt3dadd(206.75, 1055.45, 117.55, 1.7)
pt3dadd(206.75, 1055.65, 117.55, 1.7)
pt3dadd(206.83, 1055.84, 117.55, 1.7)
pt3dadd(206.92, 1056.03, 117.55, 1.7)
pt3dadd(207, 1056.13, 117.55, 1.7)
pt3dadd(207, 1056.32, 117.55, 1.7)
pt3dadd(206.92, 1056.42, 117.55, 1.7)
pt3dadd(206.92, 1056.61, 117.55, 1.7)
pt3dadd(206.83, 1056.71, 117.55, 1.7)
pt3dadd(206.83, 1060.95, 117.55, 1.7)
pt3dadd(206.92, 1061.05, 117.55, 1.7)
pt3dadd(207, 1061.14, 117.55, 1.7)
pt3dadd(207, 1061.33, 117.55, 1.7)
pt3dadd(207.09, 1061.53, 117.55, 1.7)
pt3dadd(207.17, 1061.63, 117.55, 1.7)
pt3dadd(207.17, 1061.82, 117.55, 1.7)
pt3dadd(207.26, 1061.92, 117.55, 1.7)
pt3dadd(207.34, 1062.11, 117.55, 1.7)
pt3dadd(207.34, 1062.3, 117.55, 1.7)
pt3dadd(207.43, 1062.4, 117.55, 1.7)
pt3dadd(207.51, 1062.49, 117.55, 1.7)
pt3dadd(207.6, 1062.59, 117.55, 1.7)
pt3dadd(207.68, 1062.69, 117.55, 1.7)
pt3dadd(207.68, 1062.88, 117.55, 1.7)
pt3dadd(207.85, 1063.07, 117.55, 1.7)
pt3dadd(207.93, 1063.17, 117.55, 1.7)
pt3dadd(207.93, 1063.36, 117.55, 1.7)
pt3dadd(208.02, 1063.46, 117.55, 1.7)
pt3dadd(208.1, 1063.56, 117.55, 1.7)
pt3dadd(208.19, 1063.75, 117.55, 1.7)
pt3dadd(208.27, 1063.84, 117.55, 1.7)
pt3dadd(208.36, 1064.04, 117.55, 1.7)
pt3dadd(208.45, 1064.13, 117.55, 1.7)
pt3dadd(208.53, 1064.23, 117.55, 1.7)
pt3dadd(208.62, 1064.32, 117.55, 1.7)
pt3dadd(208.7, 1064.42, 117.55, 1.7)
pt3dadd(208.7, 1064.61, 117.55, 1.7)
pt3dadd(208.79, 1064.71, 117.55, 1.7)
pt3dadd(208.87, 1064.81, 117.55, 1.7)
pt3dadd(208.87, 1065, 117.55, 1.7)
pt3dadd(208.96, 1065.19, 117.55, 1.7)
pt3dadd(208.96, 1065.39, 117.55, 1.7)
pt3dadd(209.04, 1065.48, 117.55, 1.7)
pt3dadd(209.13, 1065.58, 117.55, 1.7)
pt3dadd(209.13, 1065.96, 117.55, 1.7)
pt3dadd(209.21, 1066.06, 117.55, 1.7)
pt3dadd(209.21, 1066.64, 117.55, 1.7)
pt3dadd(209.29, 1066.74, 117.55, 1.7)
pt3dadd(209.29, 1067.12, 117.55, 1.7)
pt3dadd(209.38, 1067.22, 117.55, 1.7)
pt3dadd(209.46, 1067.41, 117.55, 1.7)
pt3dadd(209.46, 1067.6, 117.55, 1.7)
pt3dadd(209.55, 1067.7, 117.55, 1.7)
pt3dadd(209.55, 1067.9, 117.55, 1.7)
pt3dadd(209.63, 1068.09, 117.55, 1.7)
pt3dadd(209.63, 1072.04, 117.55, 1.7)
pt3dadd(209.29, 1071.56, 117.55, 1.7)
pt3dadd(209.38, 1071.66, 117.55, 1.7)
pt3dadd(209.38, 1072.04, 117.55, 1.7)
pt3dadd(209.46, 1072.14, 117.55, 1.7)
pt3dadd(209.55, 1072.23, 117.55, 1.7)
pt3dadd(209.55, 1072.53, 117.55, 1.7)
pt3dadd(209.63, 1072.62, 117.55, 1.7)
pt3dadd(209.72, 1072.72, 117.55, 1.7)
pt3dadd(209.72, 1072.91, 117.55, 1.7)
pt3dadd(209.8, 1073.01, 117.55, 1.7)
pt3dadd(209.89, 1073.1, 117.55, 1.7)
pt3dadd(209.98, 1073.3, 117.55, 1.7)
pt3dadd(210.06, 1073.39, 117.55, 1.7)
pt3dadd(210.14, 1073.49, 117.55, 1.7)
pt3dadd(210.23, 1073.58, 117.55, 1.7)
pt3dadd(210.31, 1073.68, 117.55, 1.7)
pt3dadd(210.48, 1073.78, 117.55, 1.7)
pt3dadd(210.57, 1073.88, 117.55, 1.7)
pt3dadd(210.65, 1073.97, 117.55, 1.7)
pt3dadd(210.65, 1076.57, 117.55, 1.7)
pt3dadd(210.74, 1076.67, 117.55, 1.7)
pt3dadd(210.74, 1077.06, 117.55, 1.7)
pt3dadd(210.82, 1077.16, 117.55, 1.7)
pt3dadd(210.82, 1077.64, 117.55, 1.7)
pt3dadd(210.91, 1077.83, 117.55, 1.7)
pt3dadd(210.91, 1078.02, 117.55, 1.7)
pt3dadd(210.99, 1078.12, 117.55, 1.7)
pt3dadd(210.99, 1078.31, 117.55, 1.7)
pt3dadd(211.08, 1078.41, 117.55, 1.7)
pt3dadd(211.08, 1078.79, 117.55, 1.7)
pt3dadd(211.16, 1078.89, 117.55, 1.7)
pt3dadd(211.16, 1079.18, 117.55, 1.7)
pt3dadd(211.25, 1079.28, 117.55, 1.7)
pt3dadd(211.25, 1079.47, 117.55, 1.7)
pt3dadd(211.33, 1079.66, 117.55, 1.7)
pt3dadd(211.42, 1079.76, 117.55, 1.7)
pt3dadd(211.42, 1080.05, 117.55, 1.7)
pt3dadd(211.5, 1080.24, 117.55, 1.7)
pt3dadd(211.59, 1080.34, 117.55, 1.7)
pt3dadd(211.59, 1080.53, 117.55, 1.7)
pt3dadd(211.67, 1080.72, 117.55, 1.7)
pt3dadd(211.67, 1080.92, 117.55, 1.7)
pt3dadd(211.76, 1081.01, 117.55, 1.7)
pt3dadd(211.84, 1081.11, 117.55, 1.7)
pt3dadd(211.84, 1081.3, 117.55, 1.7)
pt3dadd(211.93, 1081.4, 117.55, 1.7)
pt3dadd(211.93, 1081.78, 117.55, 1.7)
pt3dadd(212.01, 1081.88, 117.55, 1.7)
pt3dadd(212.01, 1082.36, 117.55, 1.7)
pt3dadd(212.1, 1082.46, 117.55, 1.7)
pt3dadd(212.1, 1082.75, 117.55, 1.7)
pt3dadd(212.18, 1082.94, 117.55, 1.7)
pt3dadd(212.27, 1083.04, 117.55, 1.7)
pt3dadd(212.27, 1083.33, 117.55, 1.7)
pt3dadd(212.35, 1083.42, 117.55, 1.7)
pt3dadd(212.35, 1083.71, 117.55, 1.7)
pt3dadd(212.44, 1083.91, 117.55, 1.7)
pt3dadd(212.44, 1084.19, 117.55, 1.7)
pt3dadd(212.52, 1084.29, 117.55, 1.7)
pt3dadd(212.52, 1084.58, 117.55, 1.7)
pt3dadd(212.61, 1084.68, 117.55, 1.7)
pt3dadd(212.61, 1085.06, 117.55, 1.7)
pt3dadd(212.69, 1085.16, 117.55, 1.7)
pt3dadd(212.69, 1085.45, 117.55, 1.7)
pt3dadd(212.77, 1085.55, 117.55, 1.7)
pt3dadd(212.86, 1085.74, 117.55, 1.7)
pt3dadd(212.95, 1085.93, 117.55, 1.7)
pt3dadd(213.03, 1086.03, 117.55, 1.7)
pt3dadd(213.03, 1086.7, 117.55, 1.7)
pt3dadd(213.12, 1086.8, 117.55, 1.7)
pt3dadd(213.12, 1089.31, 117.55, 1.7)
pt3dadd(213.2, 1089.4, 117.55, 1.7)
pt3dadd(213.2, 1090.18, 117.55, 1.7)
pt3dadd(213.29, 1090.27, 117.55, 1.7)
pt3dadd(213.37, 1090.37, 117.55, 1.7)
pt3dadd(213.37, 1090.66, 117.55, 1.7)
pt3dadd(213.46, 1090.85, 117.55, 1.7)
pt3dadd(213.54, 1090.95, 117.55, 1.7)
pt3dadd(213.63, 1091.04, 117.55, 1.7)
pt3dadd(213.63, 1091.23, 117.55, 1.7)
pt3dadd(213.71, 1091.43, 117.55, 1.7)
pt3dadd(213.79, 1091.53, 117.55, 1.7)
pt3dadd(213.79, 1091.81, 117.55, 1.7)
pt3dadd(213.88, 1091.91, 117.55, 1.7)
pt3dadd(213.88, 1092.2, 117.55, 1.7)
pt3dadd(213.96, 1092.3, 117.55, 1.7)
pt3dadd(214.05, 1092.39, 117.55, 1.7)
pt3dadd(214.13, 1092.49, 117.55, 1.7)
pt3dadd(214.13, 1092.78, 117.55, 1.7)
pt3dadd(214.22, 1092.88, 117.55, 1.7)
pt3dadd(214.3, 1092.97, 117.55, 1.7)
pt3dadd(214.3, 1093.17, 117.55, 1.7)
pt3dadd(214.39, 1093.26, 117.55, 1.7)
pt3dadd(214.48, 1093.36, 117.55, 1.7)
pt3dadd(214.56, 1093.55, 117.55, 1.7)
pt3dadd(214.65, 1093.65, 117.55, 1.7)
pt3dadd(214.65, 1093.84, 117.55, 1.7)
pt3dadd(214.73, 1093.94, 117.55, 1.7)
pt3dadd(214.82, 1094.13, 117.55, 1.7)
pt3dadd(214.82, 1094.32, 117.55, 1.7)
pt3dadd(214.9, 1094.42, 117.55, 1.7)
pt3dadd(214.9, 1095.77, 117.55, 1.7)
pt3dadd(214.99, 1095.86, 117.55, 1.7)
pt3dadd(214.99, 1096.25, 117.55, 1.7)
pt3dadd(215.07, 1096.35, 117.55, 1.7)
pt3dadd(215.07, 1096.54, 117.55, 1.7)
pt3dadd(215.15, 1096.64, 117.55, 1.7)
pt3dadd(215.15, 1096.83, 117.55, 1.7)
pt3dadd(215.24, 1096.93, 117.55, 1.7)
pt3dadd(215.41, 1097.12, 117.55, 1.7)
pt3dadd(215.41, 1097.31, 117.55, 1.7)
}
}
proc shape3d_89() {
dend[65] { pt3dadd(215.49, 1097.41, 117.55, 1.7)
pt3dadd(215.58, 1097.51, 117.55, 1.7)
pt3dadd(215.66, 1097.6, 117.55, 1.7)
pt3dadd(215.75, 1097.7, 117.55, 1.7)
pt3dadd(215.83, 1097.8, 117.55, 1.7)
pt3dadd(215.92, 1097.89, 117.55, 1.7)
pt3dadd(216, 1097.99, 117.55, 1.7)
pt3dadd(216.09, 1098.08, 117.55, 1.7)
pt3dadd(216.17, 1098.18, 117.55, 1.7)
pt3dadd(216.26, 1098.28, 117.55, 1.7)
pt3dadd(216.34, 1098.37, 117.55, 1.7)
pt3dadd(216.43, 1098.47, 117.55, 1.7)
pt3dadd(216.43, 1098.66, 117.55, 1.7)
pt3dadd(216.51, 1098.76, 117.55, 1.7)
pt3dadd(216.6, 1098.85, 117.55, 1.7)
pt3dadd(216.68, 1098.95, 117.55, 1.7)
pt3dadd(216.77, 1099.15, 117.55, 1.7)
pt3dadd(216.85, 1099.24, 117.55, 1.7)
pt3dadd(216.94, 1099.34, 117.55, 1.7)
pt3dadd(216.94, 1099.53, 117.55, 1.7)
pt3dadd(216.85, 1099.63, 117.55, 2.72)
pt3dadd(216.94, 1099.72, 117.55, 2.72)
pt3dadd(216.94, 1100.01, 117.55, 2.72)
pt3dadd(217.02, 1100.11, 117.55, 2.72)
pt3dadd(217.11, 1100.2, 117.55, 2.72)
pt3dadd(217.11, 1102.23, 117.55, 2.72)
pt3dadd(217.19, 1102.33, 117.55, 2.72)
pt3dadd(217.28, 1102.62, 117.55, 2.72)
pt3dadd(217.36, 1102.81, 117.55, 2.72)
pt3dadd(217.45, 1102.91, 117.55, 2.72)
pt3dadd(217.45, 1103.1, 117.55, 2.72)
pt3dadd(217.53, 1103.19, 117.55, 2.72)
pt3dadd(217.53, 1103.39, 117.55, 2.72)
pt3dadd(217.62, 1103.48, 117.55, 2.72)
pt3dadd(217.7, 1103.58, 117.55, 2.72)
pt3dadd(217.7, 1103.78, 117.55, 2.72)
pt3dadd(217.79, 1103.87, 117.55, 2.72)
pt3dadd(217.87, 1104.06, 117.55, 2.72)
pt3dadd(217.96, 1104.16, 117.55, 2.72)
pt3dadd(218.04, 1104.26, 117.55, 2.72)
pt3dadd(218.13, 1104.35, 117.55, 2.72)
pt3dadd(218.21, 1104.45, 117.55, 2.72)
pt3dadd(218.29, 1104.55, 117.55, 2.72)
pt3dadd(218.38, 1104.64, 117.55, 2.72)
pt3dadd(218.38, 1104.83, 117.55, 2.72)
pt3dadd(218.46, 1104.93, 117.55, 2.72)
pt3dadd(218.55, 1105.03, 117.55, 2.72)
pt3dadd(218.55, 1105.22, 117.55, 2.72)
pt3dadd(218.63, 1105.32, 117.55, 2.72)
pt3dadd(218.72, 1105.51, 117.55, 2.72)
pt3dadd(218.8, 1105.7, 117.55, 2.72)
pt3dadd(218.89, 1105.9, 117.55, 2.72)
pt3dadd(219.06, 1105.9, 117.55, 2.72)
pt3dadd(219.06, 1106.09, 117.55, 2.72)
pt3dadd(219.15, 1106.28, 117.55, 2.72)
pt3dadd(219.23, 1106.38, 117.55, 2.72)
pt3dadd(219.32, 1106.47, 117.55, 2.72)
pt3dadd(219.32, 1106.67, 117.55, 2.72)
pt3dadd(219.4, 1106.86, 117.55, 2.72)
pt3dadd(219.49, 1106.96, 117.55, 2.72)
pt3dadd(219.49, 1107.25, 117.55, 2.72)
pt3dadd(219.57, 1107.34, 117.55, 2.72)
pt3dadd(219.57, 1107.54, 117.55, 2.72)
pt3dadd(219.15, 1106.19, 117.55, 2.04)
pt3dadd(219.23, 1106.28, 117.55, 2.04)
pt3dadd(219.23, 1106.47, 117.55, 2.04)
pt3dadd(219.32, 1106.57, 117.55, 2.04)
pt3dadd(219.4, 1106.67, 117.55, 2.04)
pt3dadd(219.4, 1106.86, 117.55, 2.04)
pt3dadd(219.49, 1106.96, 117.55, 2.04)
pt3dadd(219.49, 1107.25, 117.55, 2.04)
pt3dadd(219.57, 1107.34, 117.55, 2.04)
pt3dadd(219.65, 1107.44, 117.55, 2.04)
pt3dadd(219.65, 1107.73, 117.55, 2.04)
pt3dadd(219.74, 1107.82, 117.55, 2.04)
pt3dadd(219.82, 1108.02, 117.55, 2.04)
pt3dadd(219.82, 1108.21, 117.55, 2.04)
pt3dadd(219.91, 1108.31, 117.55, 2.04)
pt3dadd(219.91, 1108.79, 117.55, 2.04)
pt3dadd(219.99, 1108.89, 117.55, 2.04)
pt3dadd(219.99, 1109.37, 117.55, 2.04)
pt3dadd(220.16, 1109.46, 117.55, 2.04)
pt3dadd(220.16, 1109.66, 117.55, 2.04)
pt3dadd(220.34, 1109.66, 117.55, 2.04)
pt3dadd(220.42, 1109.76, 117.55, 2.04)
pt3dadd(220.51, 1109.85, 117.55, 2.04)
pt3dadd(220.51, 1110.24, 117.55, 2.04)
pt3dadd(220.59, 1110.33, 117.55, 2.04)
pt3dadd(220.59, 1111.59, 117.55, 2.04)
pt3dadd(220.67, 1111.68, 117.55, 2.04)
pt3dadd(220.76, 1111.78, 117.55, 2.04)
pt3dadd(220.84, 1111.88, 117.55, 2.04)
pt3dadd(220.93, 1111.97, 117.55, 2.04)
pt3dadd(221.01, 1112.17, 117.55, 2.04)
pt3dadd(221.1, 1112.26, 117.55, 2.04)
pt3dadd(221.27, 1112.36, 117.55, 2.04)
pt3dadd(221.1, 1112.17, 117.55, 2.72)
pt3dadd(221.18, 1112.26, 117.55, 2.72)
pt3dadd(221.27, 1112.36, 117.55, 2.72)
pt3dadd(221.44, 1112.45, 117.55, 2.72)
pt3dadd(221.52, 1112.55, 117.55, 2.72)
pt3dadd(221.52, 1114.29, 117.55, 2.72)
pt3dadd(221.61, 1114.48, 117.55, 2.72)
pt3dadd(221.61, 1114.77, 117.55, 2.72)
pt3dadd(221.69, 1114.86, 117.55, 2.72)
pt3dadd(221.69, 1115.44, 117.55, 2.72)
pt3dadd(221.78, 1115.54, 117.55, 2.72)
pt3dadd(221.78, 1115.73, 117.55, 2.72)
pt3dadd(221.86, 1115.93, 117.55, 2.72)
pt3dadd(221.95, 1116.02, 117.55, 2.72)
pt3dadd(221.95, 1120.46, 117.55, 2.72)
pt3dadd(221.86, 1120.56, 117.55, 2.72)
pt3dadd(221.86, 1121.43, 117.55, 2.72)
pt3dadd(221.78, 1121.52, 117.55, 2.72)
pt3dadd(221.69, 1121.62, 117.55, 2.72)
pt3dadd(221.69, 1122.1, 117.55, 2.72)
pt3dadd(221.61, 1122.29, 117.55, 2.72)
pt3dadd(221.61, 1122.68, 117.55, 2.72)
pt3dadd(221.52, 1122.78, 117.55, 2.72)
pt3dadd(221.44, 1122.87, 117.55, 2.72)
pt3dadd(221.44, 1124.9, 117.55, 2.72)
pt3dadd(221.52, 1124.99, 117.55, 2.72)
pt3dadd(221.52, 1127.69, 117.55, 2.72)
pt3dadd(221.61, 1127.79, 117.55, 2.72)
pt3dadd(221.61, 1127.98, 117.55, 2.72)
pt3dadd(221.69, 1128.18, 117.55, 2.72)
pt3dadd(221.69, 1128.46, 117.55, 2.72)
pt3dadd(221.78, 1128.56, 117.55, 2.72)
pt3dadd(221.86, 1128.66, 117.55, 2.72)
pt3dadd(221.86, 1129.05, 117.55, 2.72)
pt3dadd(221.95, 1129.14, 117.55, 2.72)
pt3dadd(222.03, 1129.24, 117.55, 2.72)
pt3dadd(222.03, 1129.43, 117.55, 2.72)
pt3dadd(222.12, 1129.53, 117.55, 2.72)
pt3dadd(222.12, 1129.72, 117.55, 2.72)
pt3dadd(222.2, 1129.81, 117.55, 2.72)
pt3dadd(222.29, 1129.91, 117.55, 2.72)
pt3dadd(222.29, 1130.1, 117.55, 2.72)
pt3dadd(222.37, 1130.2, 117.55, 2.72)
pt3dadd(222.46, 1130.4, 117.55, 2.72)
pt3dadd(222.46, 1131.36, 117.55, 2.72)
pt3dadd(222.54, 1131.45, 117.55, 2.72)
pt3dadd(222.54, 1131.74, 117.55, 2.72)
pt3dadd(222.63, 1131.84, 117.55, 2.72)
pt3dadd(222.63, 1135.22, 117.55, 2.72)
pt3dadd(222.71, 1135.31, 117.55, 2.72)
pt3dadd(222.71, 1135.51, 117.55, 2.72)
pt3dadd(222.8, 1135.6, 117.55, 2.72)
pt3dadd(222.88, 1135.7, 117.55, 2.72)
pt3dadd(222.88, 1135.89, 117.55, 2.72)
pt3dadd(222.88, 1142.74, 117.55, 2.72)
pt3dadd(222.8, 1142.84, 117.55, 2.72)
pt3dadd(222.8, 1143.13, 117.55, 2.72)
pt3dadd(222.71, 1143.22, 117.55, 2.72)
pt3dadd(222.63, 1143.32, 117.55, 2.72)
pt3dadd(222.63, 1144.86, 117.55, 2.72)
pt3dadd(222.54, 1144.96, 117.55, 2.72)
pt3dadd(222.46, 1145.15, 117.55, 2.72)
pt3dadd(222.46, 1145.44, 117.55, 2.72)
pt3dadd(222.37, 1145.54, 117.55, 2.72)
pt3dadd(222.37, 1145.83, 117.55, 2.72)
pt3dadd(222.29, 1146.02, 117.55, 2.72)
pt3dadd(222.29, 1146.98, 117.55, 2.72)
pt3dadd(222.2, 1147.08, 117.55, 2.72)
pt3dadd(222.12, 1147.18, 117.55, 2.72)
pt3dadd(222.03, 1147.27, 117.55, 2.72)
pt3dadd(222.03, 1147.95, 117.55, 2.72)
pt3dadd(221.95, 1148.05, 117.55, 2.72)
pt3dadd(221.86, 1148.14, 117.55, 2.72)
pt3dadd(221.86, 1148.33, 117.55, 2.72)
pt3dadd(221.69, 1148.53, 117.55, 2.72)
pt3dadd(221.61, 1148.72, 117.55, 2.72)
pt3dadd(221.52, 1148.82, 117.55, 2.72)
pt3dadd(221.52, 1149.01, 117.55, 2.72)
pt3dadd(221.44, 1149.1, 117.55, 2.72)
pt3dadd(221.35, 1149.2, 117.55, 2.72)
pt3dadd(221.27, 1149.3, 117.55, 2.72)
pt3dadd(221.18, 1149.4, 117.55, 2.72)
pt3dadd(221.1, 1149.49, 117.55, 2.72)
pt3dadd(221.01, 1149.59, 117.55, 2.72)
pt3dadd(221.01, 1149.78, 117.55, 2.72)
pt3dadd(220.93, 1149.88, 117.55, 2.72)
pt3dadd(220.93, 1152, 117.55, 2.72)
pt3dadd(220.84, 1152.19, 117.55, 2.72)
pt3dadd(220.76, 1152.29, 117.55, 2.72)
pt3dadd(220.67, 1152.48, 117.55, 2.72)
pt3dadd(220.59, 1152.58, 117.55, 2.72)
pt3dadd(220.59, 1152.87, 117.55, 2.72)
pt3dadd(220.51, 1152.96, 117.55, 2.72)
pt3dadd(220.42, 1153.06, 117.55, 2.72)
pt3dadd(220.34, 1153.16, 117.55, 2.72)
pt3dadd(220.25, 1153.25, 117.55, 2.72)
pt3dadd(220.25, 1153.73, 117.55, 2.72)
pt3dadd(220.16, 1153.83, 117.55, 2.72)
pt3dadd(220.08, 1154.03, 117.55, 2.72)
pt3dadd(219.99, 1154.12, 117.55, 2.72)
pt3dadd(219.91, 1154.22, 117.55, 2.72)
pt3dadd(219.91, 1155.18, 117.55, 2.72)
pt3dadd(219.82, 1155.28, 117.55, 2.72)
pt3dadd(219.74, 1155.38, 117.55, 2.72)
}
}
proc shape3d_90() {
dend[65] { pt3dadd(219.74, 1155.57, 117.55, 2.72)
pt3dadd(219.57, 1155.57, 117.55, 2.72)
pt3dadd(219.49, 1155.67, 117.55, 2.72)
pt3dadd(219.49, 1158.07, 117.55, 2.72)
pt3dadd(219.57, 1158.17, 117.55, 3.06)
pt3dadd(219.65, 1158.36, 117.55, 3.06)
pt3dadd(219.74, 1158.46, 117.55, 3.06)
pt3dadd(219.82, 1158.56, 117.55, 3.06)
pt3dadd(219.91, 1158.66, 117.55, 3.06)
pt3dadd(219.91, 1158.85, 117.55, 3.06)
pt3dadd(219.99, 1159.04, 117.55, 3.06)
pt3dadd(220.08, 1159.14, 117.55, 3.06)
pt3dadd(220.16, 1159.23, 117.55, 3.06)
pt3dadd(220.25, 1159.33, 117.55, 3.06)
pt3dadd(220.34, 1159.43, 117.55, 3.06)
pt3dadd(220.42, 1159.52, 117.55, 3.06)
pt3dadd(220.42, 1159.71, 117.55, 3.06)
pt3dadd(220.51, 1159.81, 117.55, 3.06)
pt3dadd(220.59, 1159.91, 117.55, 3.06)
pt3dadd(220.67, 1160.01, 117.55, 3.06)
pt3dadd(220.76, 1160.1, 117.55, 3.06)
pt3dadd(220.76, 1160.3, 117.55, 3.06)
pt3dadd(220.84, 1160.39, 117.55, 3.06)
pt3dadd(220.93, 1160.49, 117.55, 3.06)
pt3dadd(221.01, 1160.58, 117.55, 3.06)
pt3dadd(221.18, 1160.68, 117.55, 3.06)
pt3dadd(221.35, 1160.97, 117.55, 2.04)
pt3dadd(221.35, 1161.84, 117.55, 2.04)
pt3dadd(221.44, 1162.03, 117.55, 2.04)
pt3dadd(221.44, 1162.51, 117.55, 2.04)
pt3dadd(221.52, 1162.61, 117.55, 2.04)
pt3dadd(221.52, 1162.99, 117.55, 2.04)
pt3dadd(221.61, 1163.09, 117.55, 2.04)
pt3dadd(221.61, 1163.48, 117.55, 2.04)
pt3dadd(221.69, 1163.57, 117.55, 2.04)
pt3dadd(221.69, 1165.5, 117.55, 2.04)
pt3dadd(221.78, 1165.6, 117.55, 2.04)
pt3dadd(221.78, 1167.24, 117.55, 2.04)
pt3dadd(221.86, 1167.33, 117.55, 2.04)
pt3dadd(221.86, 1167.53, 117.55, 2.04)
pt3dadd(221.95, 1167.63, 117.55, 2.04)
pt3dadd(221.95, 1168.01, 117.55, 2.04)
pt3dadd(222.03, 1168.11, 117.55, 2.04)
pt3dadd(222.03, 1169.07, 117.55, 2.04)
pt3dadd(222.12, 1169.17, 117.55, 2.04)
pt3dadd(222.12, 1169.46, 117.55, 2.04)
pt3dadd(222.2, 1169.55, 117.55, 2.04)
pt3dadd(222.2, 1170.23, 117.55, 2.04)
pt3dadd(222.29, 1170.32, 117.55, 2.04)
pt3dadd(222.29, 1171.29, 117.55, 2.04)
pt3dadd(222.37, 1171.39, 117.55, 2.04)
pt3dadd(222.46, 1171.58, 117.55, 2.04)
pt3dadd(222.54, 1171.77, 117.55, 2.04)
pt3dadd(222.63, 1171.87, 117.55, 2.04)
pt3dadd(222.63, 1172.06, 117.55, 2.04)
pt3dadd(222.71, 1172.16, 117.55, 2.04)
pt3dadd(222.8, 1172.26, 117.55, 2.04)
pt3dadd(222.8, 1172.45, 117.55, 2.04)
pt3dadd(222.88, 1172.54, 117.55, 2.04)
pt3dadd(222.97, 1172.74, 117.55, 2.04)
pt3dadd(223.05, 1172.83, 117.55, 2.04)
pt3dadd(223.05, 1173.03, 117.55, 2.04)
pt3dadd(223.14, 1173.12, 117.55, 2.04)
pt3dadd(223.3, 1173.22, 117.55, 2.04)
pt3dadd(223.3, 1173.8, 117.55, 2.04)
pt3dadd(223.22, 1173.99, 117.55, 2.04)
pt3dadd(223.22, 1174.67, 117.55, 2.04)
pt3dadd(223.14, 1174.76, 117.55, 2.04)
pt3dadd(223.05, 1174.86, 117.55, 2.04)
pt3dadd(223.05, 1175.15, 117.55, 2.04)
pt3dadd(222.97, 1175.24, 117.55, 2.04)
pt3dadd(222.97, 1177.08, 117.55, 2.04)
pt3dadd(223.14, 1177.08, 117.55, 2.04)
pt3dadd(223.14, 1177.66, 117.55, 2.04)
pt3dadd(223.05, 1177.75, 117.55, 2.04)
pt3dadd(222.8, 1177.75, 117.55, 2.04)
pt3dadd(222.8, 1177.27, 117.55, 2.04)
pt3dadd(222.88, 1177.27, 117.55, 2.04)
pt3dadd(222.97, 1177.36, 117.55, 2.04)
pt3dadd(222.97, 1178.04, 117.55, 2.04)
pt3dadd(222.71, 1178.04, 117.55, 2.04)
pt3dadd(222.71, 1177.27, 117.55, 2.04)
pt3dadd(222.71, 1177.66, 117.55, 2.04)
pt3dadd(222.8, 1177.75, 117.55, 2.04)
pt3dadd(222.8, 1177.94, 117.55, 2.04)
pt3dadd(222.71, 1178.14, 117.55, 2.04)
pt3dadd(222.71, 1178.62, 117.55, 2.04)
pt3dadd(222.54, 1178.72, 117.55, 2.04)
pt3dadd(222.54, 1182.67, 117.55, 2.04)
pt3dadd(222.46, 1182.77, 117.55, 2.04)
pt3dadd(222.46, 1186.33, 117.55, 2.04)
pt3dadd(222.37, 1186.43, 117.55, 2.04)
pt3dadd(222.12, 1186.43, 117.55, 2.04)
pt3dadd(222.03, 1186.53, 117.55, 2.04)
pt3dadd(222.03, 1187.97, 117.55, 2.04)
pt3dadd(221.95, 1188.07, 117.55, 3.74)
pt3dadd(221.95, 1188.94, 117.55, 3.74)
pt3dadd(221.86, 1189.04, 117.55, 3.74)
pt3dadd(221.78, 1189.13, 117.55, 3.74)
pt3dadd(221.69, 1189.23, 117.55, 3.74)
pt3dadd(221.61, 1189.32, 117.55, 3.74)
pt3dadd(221.52, 1189.42, 117.55, 3.74)
pt3dadd(221.44, 1189.52, 117.55, 3.74)
pt3dadd(221.27, 1189.52, 117.55, 3.74)
pt3dadd(221.27, 1189.71, 117.55, 3.74)
pt3dadd(221.35, 1189.81, 117.55, 2.04)
pt3dadd(221.35, 1192.41, 117.55, 2.04)
pt3dadd(221.44, 1192.51, 117.55, 2.04)
pt3dadd(221.44, 1193.38, 117.55, 2.04)
pt3dadd(221.52, 1193.47, 117.55, 2.04)
pt3dadd(221.52, 1193.67, 117.55, 2.04)
pt3dadd(221.61, 1193.76, 117.55, 2.04)
pt3dadd(221.69, 1193.95, 117.55, 2.04)
pt3dadd(221.78, 1194.05, 117.55, 2.04)
pt3dadd(221.95, 1194.15, 117.55, 2.04)
pt3dadd(221.95, 1194.34, 117.55, 2.04)
pt3dadd(222.03, 1194.44, 117.55, 2.04)
pt3dadd(222.12, 1194.54, 117.55, 2.04)
pt3dadd(222.12, 1195.59, 117.55, 2.04)
pt3dadd(222.03, 1195.69, 117.55, 2.04)
pt3dadd(222.03, 1198.49, 117.55, 2.04)
pt3dadd(222.12, 1198.58, 117.55, 2.04)
pt3dadd(222.12, 1198.97, 117.55, 2.04)
pt3dadd(222.2, 1199.17, 117.55, 2.04)
pt3dadd(222.29, 1199.36, 117.55, 2.04)
pt3dadd(222.37, 1199.45, 117.55, 2.04)
pt3dadd(222.46, 1199.55, 117.55, 2.04)
pt3dadd(222.54, 1199.65, 117.55, 2.04)
pt3dadd(222.63, 1199.74, 117.55, 2.04)
pt3dadd(222.71, 1199.84, 117.55, 2.04)
pt3dadd(222.71, 1200.42, 117.55, 2.04)
pt3dadd(222.8, 1200.61, 117.55, 2.04)
pt3dadd(222.8, 1200.9, 117.55, 2.04)
pt3dadd(222.88, 1201.09, 117.55, 2.04)
pt3dadd(222.97, 1201.19, 117.55, 2.04)
pt3dadd(223.05, 1201.38, 117.55, 2.04)
pt3dadd(223.14, 1201.48, 117.55, 2.04)
pt3dadd(223.14, 1201.67, 117.55, 2.04)
pt3dadd(223.22, 1201.77, 117.55, 2.04)
pt3dadd(223.3, 1201.86, 117.55, 2.04)
pt3dadd(223.3, 1202.35, 117.55, 2.04)
pt3dadd(223.39, 1202.44, 117.55, 2.04)
pt3dadd(223.48, 1202.64, 117.55, 2.04)
pt3dadd(223.48, 1203.41, 117.55, 2.04)
pt3dadd(223.56, 1203.51, 117.55, 2.04)
pt3dadd(223.65, 1203.6, 117.55, 2.04)
pt3dadd(223.65, 1203.79, 117.55, 2.04)
pt3dadd(223.73, 1203.89, 117.55, 2.04)
pt3dadd(223.73, 1204.18, 117.55, 2.04)
pt3dadd(223.82, 1204.28, 117.55, 2.04)
pt3dadd(223.9, 1204.47, 117.55, 2.04)
pt3dadd(223.9, 1209.1, 117.55, 2.04)
pt3dadd(223.99, 1209.58, 117.55, 3.4)
pt3dadd(223.99, 1212.86, 117.55, 3.4)
pt3dadd(223.9, 1212.96, 117.55, 3.4)
pt3dadd(223.82, 1213.05, 117.55, 3.4)
pt3dadd(223.73, 1213.15, 117.55, 3.4)
pt3dadd(223.65, 1213.24, 117.55, 3.4)
pt3dadd(223.65, 1213.92, 117.55, 3.4)
pt3dadd(223.65, 1214.31, 117.55, 1.36)
pt3dadd(223.73, 1214.4, 117.55, 1.36)
pt3dadd(223.82, 1214.5, 117.55, 1.36)
pt3dadd(223.82, 1214.69, 117.55, 1.36)
pt3dadd(223.9, 1214.89, 117.55, 1.36)
pt3dadd(223.99, 1214.98, 117.55, 1.36)
pt3dadd(223.99, 1215.27, 117.55, 1.36)
pt3dadd(224.07, 1215.37, 117.55, 1.36)
pt3dadd(224.07, 1215.75, 117.55, 1.36)
pt3dadd(224.15, 1215.85, 117.55, 1.36)
pt3dadd(224.15, 1216.72, 117.55, 1.36)
pt3dadd(224.24, 1216.81, 117.55, 1.36)
pt3dadd(224.32, 1216.91, 117.55, 1.36)
pt3dadd(224.32, 1217.2, 117.55, 1.36)
pt3dadd(224.41, 1217.3, 117.55, 1.36)
pt3dadd(224.41, 1217.78, 117.55, 1.36)
pt3dadd(224.49, 1217.97, 117.55, 1.36)
pt3dadd(224.49, 1218.45, 117.55, 1.36)
pt3dadd(224.41, 1218.55, 117.55, 1.36)
pt3dadd(224.32, 1218.65, 117.55, 1.36)
pt3dadd(224.32, 1218.84, 117.55, 1.36)
pt3dadd(224.24, 1218.94, 117.55, 1.36)
pt3dadd(224.15, 1219.03, 117.55, 1.36)
pt3dadd(224.15, 1220.96, 117.55, 1.36)
pt3dadd(224.32, 1221.44, 117.55, 2.38)
pt3dadd(224.32, 1221.54, 117.55, 2.38)
pt3dadd(224.41, 1221.64, 117.55, 2.38)
pt3dadd(224.49, 1221.73, 117.55, 2.38)
pt3dadd(224.58, 1221.83, 117.55, 2.38)
pt3dadd(224.66, 1221.93, 117.55, 2.38)
pt3dadd(224.84, 1222.02, 117.55, 2.38)
pt3dadd(224.92, 1222.12, 117.55, 2.38)
pt3dadd(224.92, 1222.31, 117.55, 2.38)
pt3dadd(225.01, 1222.41, 117.55, 2.38)
pt3dadd(225.09, 1222.51, 117.55, 2.38)
pt3dadd(225.09, 1222.7, 117.55, 2.38)
pt3dadd(225.18, 1222.89, 117.55, 2.38)
pt3dadd(225.26, 1222.99, 117.55, 2.38)
pt3dadd(225.26, 1223.18, 117.55, 2.38)
pt3dadd(225.35, 1223.28, 117.55, 2.38)
pt3dadd(225.35, 1223.47, 117.55, 2.38)
}
}
proc shape3d_91() {
dend[65] { pt3dadd(225.43, 1223.56, 117.55, 2.38)
pt3dadd(225.43, 1223.85, 117.55, 2.38)
pt3dadd(225.51, 1223.95, 117.55, 2.38)
pt3dadd(225.51, 1224.24, 117.55, 2.38)
pt3dadd(225.6, 1224.34, 117.55, 2.38)
pt3dadd(225.6, 1224.53, 117.55, 2.38)
pt3dadd(225.68, 1224.63, 117.55, 2.38)
pt3dadd(225.68, 1225.49, 117.55, 2.38)
pt3dadd(225.77, 1225.69, 117.55, 2.38)
pt3dadd(225.77, 1226.07, 117.55, 2.38)
pt3dadd(225.85, 1226.17, 117.55, 2.38)
pt3dadd(225.94, 1226.27, 117.55, 2.38)
pt3dadd(225.94, 1226.46, 117.55, 2.38)
pt3dadd(226.02, 1226.65, 117.55, 2.38)
pt3dadd(226.02, 1227.23, 117.55, 2.38)
pt3dadd(226.11, 1227.43, 117.55, 2.38)
pt3dadd(226.11, 1227.81, 117.55, 2.38)
pt3dadd(226.19, 1227.91, 117.55, 2.38)
pt3dadd(226.19, 1228.19, 117.55, 2.38)
pt3dadd(226.28, 1228.39, 117.55, 2.38)
pt3dadd(226.36, 1228.48, 117.55, 2.38)
pt3dadd(226.36, 1228.68, 117.55, 2.38)
pt3dadd(226.45, 1228.78, 117.55, 2.38)
pt3dadd(226.53, 1228.87, 117.55, 2.38)
pt3dadd(226.53, 1229.06, 117.55, 2.38)
pt3dadd(226.62, 1229.26, 117.55, 2.38)
pt3dadd(226.7, 1229.45, 117.55, 2.38)
pt3dadd(226.7, 1229.64, 117.55, 2.38)
pt3dadd(226.79, 1229.74, 117.55, 2.38)
pt3dadd(226.87, 1229.83, 117.55, 2.38)
pt3dadd(226.96, 1229.93, 117.55, 2.38)
pt3dadd(226.96, 1230.13, 117.55, 2.38)
pt3dadd(227.04, 1230.22, 117.55, 2.38)
pt3dadd(227.13, 1230.32, 117.55, 2.38)
pt3dadd(227.13, 1230.61, 117.55, 2.38)
pt3dadd(227.21, 1230.8, 117.55, 2.38)
pt3dadd(227.3, 1230.9, 117.55, 2.38)
pt3dadd(227.38, 1230.99, 117.55, 2.38)
pt3dadd(227.47, 1231.09, 117.55, 2.38)
pt3dadd(227.55, 1231.19, 117.55, 2.38)
pt3dadd(227.64, 1231.38, 117.55, 2.38)
pt3dadd(227.64, 1231.57, 117.55, 2.38)
pt3dadd(227.72, 1231.67, 117.55, 2.38)
pt3dadd(227.81, 1231.77, 117.55, 2.38)
pt3dadd(227.89, 1231.86, 117.55, 2.38)
pt3dadd(227.89, 1232.05, 117.55, 2.38)
pt3dadd(227.98, 1232.15, 117.55, 2.38)
pt3dadd(227.98, 1232.34, 117.55, 2.38)
pt3dadd(228.06, 1232.44, 117.55, 2.38)
pt3dadd(228.06, 1232.63, 117.55, 2.38)
pt3dadd(228.15, 1232.73, 117.55, 2.38)
pt3dadd(228.15, 1232.92, 117.55, 2.38)
pt3dadd(228.23, 1233.02, 117.55, 2.38)
pt3dadd(228.32, 1233.11, 117.55, 2.38)
pt3dadd(228.32, 1233.31, 117.55, 2.38)
pt3dadd(228.4, 1233.41, 117.55, 2.38)
pt3dadd(228.49, 1233.5, 117.55, 2.38)
pt3dadd(228.49, 1233.69, 117.55, 2.38)
pt3dadd(228.57, 1233.79, 117.55, 2.38)
pt3dadd(228.57, 1233.98, 117.55, 2.38)
pt3dadd(228.65, 1234.08, 117.55, 2.38)
pt3dadd(228.74, 1234.27, 117.55, 2.38)
pt3dadd(228.74, 1237.17, 117.55, 2.38)
pt3dadd(228.82, 1237.26, 117.55, 2.38)
pt3dadd(228.91, 1237.36, 117.55, 2.38)
pt3dadd(228.91, 1237.55, 117.55, 2.38)
pt3dadd(228.99, 1237.65, 117.55, 2.38)
pt3dadd(228.99, 1238.03, 117.55, 2.38)
pt3dadd(229.08, 1238.13, 117.55, 2.38)
pt3dadd(229.16, 1238.23, 117.55, 2.38)
pt3dadd(229.16, 1238.42, 117.55, 2.38)
pt3dadd(229.25, 1238.52, 117.55, 2.38)
pt3dadd(229.34, 1238.61, 117.55, 2.38)
pt3dadd(229.42, 1238.71, 117.55, 2.38)
pt3dadd(229.51, 1238.81, 117.55, 2.38)
pt3dadd(229.59, 1238.9, 117.55, 2.38)
pt3dadd(229.68, 1239, 117.55, 2.38)
pt3dadd(229.68, 1239.19, 117.55, 2.38)
pt3dadd(229.76, 1239.29, 117.55, 2.38)
pt3dadd(229.85, 1239.39, 117.55, 2.38)
pt3dadd(229.93, 1239.48, 117.55, 2.38)
pt3dadd(230.01, 1239.58, 117.55, 2.38)
pt3dadd(230.01, 1239.77, 117.55, 2.38)
pt3dadd(230.1, 1239.86, 117.55, 2.38)
pt3dadd(230.18, 1239.96, 117.55, 2.38)
pt3dadd(230.27, 1240.06, 117.55, 2.38)
pt3dadd(230.27, 1240.93, 117.55, 2.38)
pt3dadd(230.35, 1241.02, 117.55, 2.38)
pt3dadd(230.35, 1241.41, 117.55, 2.38)
pt3dadd(230.44, 1241.6, 117.55, 2.38)
pt3dadd(230.52, 1241.7, 117.55, 2.38)
pt3dadd(230.61, 1241.8, 117.55, 2.38)
pt3dadd(230.7, 1241.89, 117.55, 2.38)
pt3dadd(230.7, 1242.18, 117.55, 2.38)
pt3dadd(230.78, 1242.28, 117.55, 2.38)
pt3dadd(230.78, 1244.11, 117.55, 2.38)
pt3dadd(230.87, 1244.3, 117.55, 2.38)
pt3dadd(230.87, 1244.59, 117.55, 2.38)
pt3dadd(230.95, 1244.79, 117.55, 2.38)
pt3dadd(231.03, 1244.98, 117.55, 2.38)
pt3dadd(231.12, 1245.17, 117.55, 2.38)
pt3dadd(231.12, 1243.92, 117.55, 2.38)
pt3dadd(231.12, 1245.46, 117.55, 2.38)
pt3dadd(230.95, 1244.88, 117.55, 1.36)
pt3dadd(230.95, 1247, 117.55, 1.36)
pt3dadd(231.03, 1247.1, 117.55, 1.36)
pt3dadd(231.12, 1247.29, 117.55, 1.36)
pt3dadd(231.2, 1247.39, 117.55, 1.36)
pt3dadd(231.29, 1247.48, 117.55, 1.36)
pt3dadd(231.37, 1247.58, 117.55, 1.36)
pt3dadd(231.37, 1247.78, 117.55, 1.36)
pt3dadd(231.46, 1247.87, 117.55, 1.36)
pt3dadd(231.46, 1248.16, 117.55, 1.36)
pt3dadd(231.54, 1248.26, 117.55, 1.36)
pt3dadd(231.63, 1248.45, 117.55, 1.36)
pt3dadd(231.63, 1248.64, 117.55, 1.36)
pt3dadd(231.71, 1248.74, 117.55, 1.36)
pt3dadd(231.8, 1248.93, 117.55, 1.36)
pt3dadd(231.88, 1249.13, 117.55, 1.36)
pt3dadd(231.97, 1249.22, 117.55, 1.36)
pt3dadd(232.05, 1249.32, 117.55, 1.36)
pt3dadd(232.14, 1249.42, 117.55, 1.36)
pt3dadd(232.22, 1249.51, 117.55, 1.36)
pt3dadd(232.31, 1249.61, 117.55, 1.36)
pt3dadd(232.39, 1249.7, 117.55, 1.36)
pt3dadd(232.48, 1249.8, 117.55, 1.36)
pt3dadd(232.65, 1249.9, 117.55, 1.36)
pt3dadd(232.82, 1249.9, 117.55, 1.36)
pt3dadd(232.9, 1249.99, 117.55, 1.36)
pt3dadd(233.07, 1250.19, 117.55, 1.36)
pt3dadd(233.16, 1250.28, 117.55, 1.36)
pt3dadd(233.24, 1250.38, 117.55, 1.36)
pt3dadd(233.5, 1250.67, 117.55, 1.36)
pt3dadd(233.58, 1250.77, 117.55, 1.36)
pt3dadd(233.66, 1250.86, 117.55, 1.36)
pt3dadd(233.75, 1250.96, 117.55, 1.36)
pt3dadd(233.84, 1251.06, 117.55, 1.36)
pt3dadd(233.92, 1251.15, 117.55, 1.36)
pt3dadd(234.01, 1251.34, 117.55, 1.36)
pt3dadd(234.09, 1251.44, 117.55, 1.36)
pt3dadd(234.18, 1251.54, 117.55, 1.36)
pt3dadd(234.26, 1251.63, 117.55, 1.36)
pt3dadd(234.35, 1251.63, 117.55, 1.36)
pt3dadd(234.43, 1251.73, 117.55, 1.36)
pt3dadd(234.51, 1251.82, 117.55, 1.36)
pt3dadd(234.6, 1251.92, 117.55, 1.36)
pt3dadd(234.77, 1251.92, 117.55, 1.36)
pt3dadd(234.77, 1252.11, 117.55, 1.36)
pt3dadd(234.94, 1252.11, 117.55, 1.36)
pt3dadd(235.02, 1252.31, 117.55, 1.36)
pt3dadd(235.11, 1252.5, 117.55, 1.36)
pt3dadd(235.2, 1252.6, 117.55, 1.36)
pt3dadd(235.28, 1252.69, 117.55, 1.36)
pt3dadd(235.28, 1252.89, 117.55, 1.36)
pt3dadd(235.37, 1252.98, 117.55, 1.36)
pt3dadd(235.45, 1253.08, 117.55, 1.36)
pt3dadd(235.54, 1253.18, 117.55, 1.36)
pt3dadd(235.62, 1253.37, 117.55, 1.36)
pt3dadd(235.71, 1253.56, 117.55, 1.36)
pt3dadd(235.79, 1253.66, 117.55, 1.36)
pt3dadd(235.88, 1253.76, 117.55, 1.36)
pt3dadd(235.96, 1253.85, 117.55, 1.36)
pt3dadd(236.04, 1253.95, 117.55, 1.36)
pt3dadd(236.13, 1254.05, 117.55, 1.36)
pt3dadd(236.21, 1254.24, 117.55, 1.36)
pt3dadd(236.3, 1254.33, 117.55, 1.36)
pt3dadd(236.38, 1254.43, 117.55, 1.36)
pt3dadd(236.47, 1254.53, 117.55, 1.36)
pt3dadd(236.55, 1254.62, 117.55, 1.36)
pt3dadd(236.64, 1254.72, 117.55, 1.36)
pt3dadd(236.72, 1254.81, 117.55, 1.36)
pt3dadd(236.81, 1254.91, 117.55, 1.36)
pt3dadd(236.89, 1255.01, 117.55, 1.36)
pt3dadd(236.98, 1255.2, 117.55, 1.36)
pt3dadd(237.06, 1255.3, 117.55, 1.36)
pt3dadd(237.15, 1255.4, 117.55, 1.36)
pt3dadd(237.32, 1255.49, 117.55, 1.36)
pt3dadd(237.32, 1255.69, 117.55, 1.36)
pt3dadd(237.4, 1255.78, 117.55, 1.36)
pt3dadd(237.49, 1255.88, 117.55, 1.36)
pt3dadd(237.57, 1255.97, 117.55, 1.36)
pt3dadd(237.66, 1256.07, 117.55, 1.36)
pt3dadd(237.74, 1256.17, 117.55, 1.36)
pt3dadd(237.83, 1256.26, 117.55, 1.36)
pt3dadd(237.91, 1256.36, 117.55, 1.36)
pt3dadd(238, 1256.45, 117.55, 1.36)
pt3dadd(238.08, 1256.55, 117.55, 1.36)
pt3dadd(238.17, 1256.65, 117.55, 1.36)
pt3dadd(238.25, 1256.74, 117.55, 1.36)
pt3dadd(238.34, 1256.84, 117.55, 1.36)
pt3dadd(238.42, 1257.04, 117.55, 1.36)
pt3dadd(238.51, 1257.13, 117.55, 1.36)
pt3dadd(238.68, 1257.23, 117.55, 1.36)
pt3dadd(238.76, 1257.42, 117.55, 1.36)
pt3dadd(238.85, 1257.52, 117.55, 1.36)
pt3dadd(238.93, 1257.61, 117.55, 1.36)
pt3dadd(239.01, 1257.71, 117.55, 1.36)
pt3dadd(239.1, 1257.81, 117.55, 1.36)
pt3dadd(239.18, 1257.9, 117.55, 1.36)
pt3dadd(239.27, 1258, 117.55, 1.36)
}
}
proc shape3d_92() {
dend[65] { pt3dadd(239.35, 1258.09, 117.55, 1.36)
pt3dadd(239.52, 1258.19, 117.55, 1.36)
pt3dadd(239.61, 1258.29, 117.55, 1.36)
pt3dadd(239.7, 1258.39, 117.55, 1.36)
pt3dadd(239.78, 1258.48, 117.55, 1.36)
pt3dadd(239.87, 1258.58, 117.55, 1.36)
pt3dadd(239.95, 1258.68, 117.55, 1.36)
pt3dadd(240.04, 1258.87, 117.55, 1.36)
pt3dadd(240.21, 1258.96, 117.55, 1.36)
pt3dadd(240.29, 1259.06, 117.55, 1.36)
pt3dadd(240.38, 1259.16, 117.55, 1.36)
pt3dadd(240.46, 1259.25, 117.55, 1.36)
pt3dadd(240.54, 1259.35, 117.55, 1.36)
pt3dadd(240.63, 1259.44, 117.55, 1.36)
pt3dadd(240.71, 1259.54, 117.55, 1.36)
pt3dadd(240.8, 1259.64, 117.55, 1.36)
pt3dadd(240.88, 1259.73, 117.55, 1.36)
pt3dadd(240.97, 1259.83, 117.55, 1.36)
pt3dadd(241.14, 1259.93, 117.55, 1.36)
pt3dadd(241.23, 1260.12, 117.55, 1.36)
pt3dadd(241.31, 1260.22, 117.55, 1.36)
pt3dadd(241.39, 1260.31, 117.55, 1.36)
pt3dadd(241.48, 1260.41, 117.55, 1.36)
pt3dadd(241.56, 1260.51, 117.55, 1.36)
pt3dadd(241.65, 1260.6, 117.55, 1.36)
pt3dadd(241.73, 1260.7, 117.55, 1.36)
pt3dadd(241.82, 1260.8, 117.55, 1.36)
pt3dadd(241.9, 1260.89, 117.55, 1.36)
pt3dadd(241.99, 1260.99, 117.55, 1.36)
pt3dadd(242.07, 1261.08, 117.55, 1.36)
pt3dadd(242.16, 1261.18, 117.55, 1.36)
pt3dadd(242.24, 1261.28, 117.55, 1.36)
pt3dadd(242.33, 1261.38, 117.55, 1.36)
pt3dadd(242.41, 1261.47, 117.55, 1.36)
pt3dadd(242.5, 1261.57, 117.55, 1.36)
pt3dadd(242.58, 1261.67, 117.55, 1.36)
pt3dadd(242.67, 1261.76, 117.55, 1.36)
pt3dadd(242.75, 1261.86, 117.55, 1.36)
pt3dadd(242.84, 1261.95, 117.55, 1.36)
pt3dadd(242.92, 1262.05, 117.55, 1.36)
pt3dadd(243.01, 1262.15, 117.55, 1.36)
pt3dadd(243.09, 1262.24, 117.55, 1.36)
pt3dadd(243.18, 1262.34, 117.55, 1.36)
pt3dadd(243.26, 1262.44, 117.55, 1.36)
pt3dadd(243.35, 1262.53, 117.55, 1.36)
pt3dadd(243.43, 1262.63, 117.55, 1.36)
pt3dadd(243.52, 1262.72, 117.55, 1.36)
pt3dadd(243.69, 1262.92, 117.55, 1.36)
pt3dadd(243.77, 1263.02, 117.55, 1.36)
pt3dadd(243.94, 1263.11, 117.55, 1.36)
pt3dadd(244.02, 1263.21, 117.55, 1.36)
pt3dadd(244.2, 1263.3, 117.55, 1.36)
pt3dadd(244.37, 1263.5, 117.55, 1.36)
pt3dadd(244.45, 1263.59, 117.55, 1.36)
pt3dadd(244.54, 1263.69, 117.55, 1.36)
pt3dadd(244.71, 1263.69, 117.55, 1.36)
pt3dadd(244.79, 1263.79, 117.55, 1.36)
pt3dadd(244.88, 1263.88, 117.55, 1.36)
pt3dadd(244.96, 1263.98, 117.55, 1.36)
pt3dadd(245.04, 1264.07, 117.55, 1.36)
pt3dadd(245.21, 1264.07, 117.55, 1.36)
pt3dadd(245.3, 1264.17, 117.55, 1.36)
pt3dadd(245.38, 1264.36, 117.55, 1.36)
pt3dadd(245.47, 1264.46, 117.55, 1.36)
pt3dadd(245.55, 1264.56, 117.55, 1.36)
pt3dadd(245.64, 1264.66, 117.55, 1.36)
pt3dadd(245.81, 1264.75, 117.55, 1.36)
pt3dadd(245.9, 1264.85, 117.55, 1.36)
pt3dadd(245.98, 1264.94, 117.55, 1.36)
pt3dadd(246.07, 1265.04, 117.55, 1.36)
pt3dadd(246.15, 1265.14, 117.55, 1.36)
pt3dadd(246.24, 1265.23, 117.55, 1.36)
pt3dadd(246.32, 1265.33, 117.55, 1.36)
pt3dadd(246.4, 1265.52, 117.55, 1.36)
pt3dadd(246.49, 1265.71, 117.55, 1.36)
pt3dadd(246.57, 1265.81, 117.55, 1.36)
pt3dadd(246.66, 1266.01, 117.55, 1.36)
pt3dadd(246.74, 1266.1, 117.55, 1.36)
pt3dadd(246.83, 1266.2, 117.55, 1.36)
pt3dadd(246.91, 1266.29, 117.55, 1.36)
pt3dadd(247.08, 1266.49, 117.55, 1.36)
pt3dadd(247.25, 1266.58, 117.55, 1.36)
pt3dadd(247.34, 1266.68, 117.55, 1.36)
pt3dadd(247.42, 1266.78, 117.55, 1.36)
pt3dadd(247.51, 1266.87, 117.55, 1.36)
pt3dadd(247.59, 1266.97, 117.55, 1.36)
pt3dadd(247.76, 1267.06, 117.55, 1.36)
pt3dadd(247.93, 1267.16, 117.55, 1.36)
pt3dadd(248.02, 1267.26, 117.55, 1.36)
pt3dadd(248.1, 1267.35, 117.55, 1.36)
pt3dadd(248.19, 1267.45, 117.55, 1.36)
pt3dadd(248.27, 1267.55, 117.55, 1.36)
pt3dadd(248.36, 1267.65, 117.55, 1.36)
pt3dadd(248.44, 1267.74, 117.55, 1.36)
pt3dadd(248.53, 1267.84, 117.55, 1.36)
pt3dadd(248.61, 1267.93, 117.55, 1.36)
pt3dadd(248.7, 1268.03, 117.55, 1.36)
pt3dadd(248.78, 1268.13, 117.55, 1.36)
pt3dadd(248.87, 1268.22, 117.55, 1.36)
pt3dadd(249.04, 1268.22, 117.55, 1.36)
pt3dadd(249.12, 1268.42, 117.55, 1.36)
pt3dadd(249.21, 1268.51, 117.55, 1.36)
pt3dadd(249.29, 1268.61, 117.55, 1.36)
pt3dadd(249.38, 1268.8, 117.55, 1.36)
pt3dadd(249.63, 1269.09, 117.55, 1.36)
pt3dadd(249.71, 1269.19, 117.55, 1.36)
pt3dadd(249.8, 1269.28, 117.55, 1.36)
pt3dadd(249.88, 1269.38, 117.55, 1.36)
pt3dadd(250.05, 1269.38, 117.55, 1.36)
pt3dadd(250.14, 1269.57, 117.55, 1.36)
pt3dadd(250.23, 1269.67, 117.55, 1.36)
pt3dadd(250.31, 1269.77, 117.55, 1.36)
pt3dadd(250.4, 1269.86, 117.55, 1.36)
pt3dadd(250.48, 1269.96, 117.55, 1.36)
pt3dadd(250.57, 1270.06, 117.55, 1.36)
pt3dadd(250.65, 1270.15, 117.55, 1.36)
pt3dadd(250.82, 1270.25, 117.55, 1.36)
pt3dadd(250.9, 1270.34, 117.55, 1.36)
pt3dadd(250.99, 1270.44, 117.55, 1.36)
pt3dadd(251.07, 1270.54, 117.55, 1.36)
pt3dadd(251.16, 1270.64, 117.55, 1.36)
pt3dadd(251.5, 1270.64, 117.55, 1.36)
pt3dadd(251.59, 1270.73, 117.55, 1.36)
pt3dadd(251.76, 1270.83, 117.55, 1.36)
pt3dadd(252.01, 1270.83, 117.55, 1.36)
pt3dadd(252.09, 1270.92, 117.55, 1.36)
pt3dadd(252.26, 1270.92, 117.55, 1.36)
pt3dadd(252.35, 1271.02, 117.55, 1.36)
pt3dadd(252.6, 1271.02, 117.55, 1.36)
pt3dadd(252.69, 1271.11, 117.55, 1.36)
pt3dadd(252.77, 1271.21, 117.55, 1.36)
pt3dadd(252.86, 1271.31, 117.55, 1.36)
pt3dadd(253.03, 1271.41, 117.55, 1.36)
pt3dadd(253.11, 1271.5, 117.55, 1.36)
pt3dadd(253.28, 1271.6, 117.55, 1.36)
pt3dadd(253.37, 1271.69, 117.55, 1.36)
pt3dadd(253.54, 1271.79, 117.55, 1.36)
pt3dadd(253.62, 1271.89, 117.55, 1.36)
pt3dadd(253.88, 1271.89, 117.55, 1.36)
pt3dadd(253.96, 1271.98, 117.55, 1.36)
pt3dadd(254.13, 1272.08, 117.55, 1.36)
pt3dadd(254.47, 1272.08, 117.55, 1.36)
pt3dadd(254.55, 1272.18, 117.55, 1.36)
pt3dadd(254.73, 1272.18, 117.55, 1.36)
pt3dadd(254.81, 1272.27, 117.55, 1.36)
pt3dadd(254.98, 1272.27, 117.55, 1.36)
pt3dadd(255.07, 1272.37, 117.55, 1.36)
pt3dadd(255.24, 1272.37, 117.55, 1.36)
pt3dadd(255.32, 1272.47, 117.55, 1.36)
pt3dadd(255.66, 1272.47, 117.55, 1.36)
pt3dadd(255.74, 1272.56, 117.55, 1.36)
pt3dadd(255.83, 1272.66, 117.55, 1.36)
pt3dadd(256.08, 1272.66, 117.55, 1.36)
pt3dadd(256.26, 1272.76, 117.55, 1.36)
pt3dadd(256.34, 1272.85, 117.55, 1.36)
pt3dadd(256.42, 1272.95, 117.55, 1.36)
pt3dadd(256.51, 1273.05, 117.55, 1.36)
pt3dadd(256.6, 1273.14, 117.55, 1.36)
pt3dadd(256.68, 1273.24, 117.55, 1.36)
pt3dadd(256.77, 1273.33, 117.55, 1.36)
pt3dadd(256.85, 1273.43, 117.55, 1.36)
pt3dadd(256.93, 1273.53, 117.55, 1.36)
pt3dadd(257.1, 1273.72, 117.55, 1.36)
pt3dadd(257.19, 1273.82, 117.55, 1.36)
pt3dadd(257.36, 1273.91, 117.55, 1.36)
pt3dadd(257.53, 1274.01, 117.55, 1.36)
pt3dadd(257.61, 1274.1, 117.55, 1.36)
pt3dadd(257.7, 1274.2, 117.55, 1.36)
pt3dadd(257.78, 1274.3, 117.55, 1.36)
pt3dadd(257.87, 1274.4, 117.55, 1.36)
pt3dadd(257.95, 1274.49, 117.55, 1.36)
pt3dadd(257.95, 1274.69, 117.55, 1.36)
pt3dadd(258.04, 1274.78, 117.55, 1.36)
pt3dadd(258.12, 1274.88, 117.55, 1.36)
pt3dadd(258.21, 1274.97, 117.55, 1.36)
pt3dadd(258.63, 1274.97, 117.55, 1.36)
pt3dadd(258.72, 1275.07, 117.55, 1.36)
pt3dadd(258.89, 1275.07, 117.55, 1.36)
pt3dadd(258.97, 1275.17, 117.55, 1.36)
pt3dadd(258.97, 1275.26, 117.55, 1.02)
pt3dadd(259.14, 1275.36, 117.55, 1.02)
pt3dadd(259.23, 1275.46, 117.55, 1.02)
pt3dadd(259.31, 1275.55, 117.55, 1.02)
pt3dadd(259.4, 1275.65, 117.55, 1.02)
pt3dadd(259.57, 1275.65, 117.55, 1.02)
pt3dadd(259.65, 1275.74, 117.55, 1.02)
pt3dadd(259.9, 1275.74, 117.55, 1.02)
pt3dadd(259.99, 1275.84, 117.55, 1.02)
pt3dadd(260.08, 1275.94, 117.55, 1.02)
pt3dadd(260.16, 1276.04, 117.55, 1.02)
pt3dadd(260.24, 1276.13, 117.55, 1.02)
pt3dadd(260.33, 1276.23, 117.55, 1.02)
pt3dadd(260.5, 1276.32, 117.55, 1.02)
pt3dadd(260.58, 1276.42, 117.55, 1.02)
pt3dadd(260.76, 1276.52, 117.55, 1.02)
pt3dadd(260.84, 1276.61, 117.55, 1.02)
pt3dadd(260.92, 1276.71, 117.55, 1.02)
pt3dadd(261.01, 1276.81, 117.55, 1.02)
pt3dadd(261.1, 1276.9, 117.55, 1.02)
pt3dadd(261.18, 1277, 117.55, 1.02)
}
}
proc shape3d_93() {
dend[65] { pt3dadd(261.27, 1277.09, 117.55, 1.02)
pt3dadd(261.35, 1277.19, 117.55, 1.02)
pt3dadd(261.43, 1277.29, 117.55, 1.02)
pt3dadd(261.52, 1277.39, 117.55, 1.02)
pt3dadd(261.61, 1277.48, 117.55, 1.02)
pt3dadd(261.69, 1277.58, 117.55, 1.02)
pt3dadd(261.77, 1277.68, 117.55, 1.02)
pt3dadd(261.86, 1277.77, 117.55, 1.02)
pt3dadd(261.95, 1277.87, 117.55, 1.02)
pt3dadd(262.03, 1277.96, 117.55, 1.02)
pt3dadd(262.11, 1278.06, 117.55, 1.02)
pt3dadd(262.11, 1278.64, 117.55, 1.02)
pt3dadd(262.2, 1278.73, 117.55, 1.02)
pt3dadd(262.62, 1278.73, 117.55, 1.02)
pt3dadd(262.71, 1278.83, 117.55, 1.02)
pt3dadd(262.88, 1278.83, 117.55, 1.02)
pt3dadd(263.05, 1278.93, 117.55, 1.02)
pt3dadd(262.62, 1278.93, 117.55, 1.02)
pt3dadd(262.54, 1278.83, 117.55, 1.02)
pt3dadd(262.45, 1278.64, 117.55, 1.02)
pt3dadd(262.37, 1278.45, 117.55, 1.02)
pt3dadd(262.28, 1278.35, 117.55, 1.02)
pt3dadd(262.45, 1278.45, 117.55, 1.02)
pt3dadd(262.62, 1278.45, 117.55, 1.02)
pt3dadd(262.79, 1278.54, 117.55, 1.02)
pt3dadd(263.05, 1278.54, 117.55, 1.02)
pt3dadd(263.22, 1278.64, 117.55, 1.02)
pt3dadd(263.47, 1278.64, 117.55, 1.02)
pt3dadd(278.97, 1290.16, 117.55, 1.02)
pt3dadd(263.64, 1278.73, 117.55, 1.02)
pt3dadd(263.73, 1278.83, 117.55, 1.02)
pt3dadd(263.9, 1278.93, 117.55, 1.02)
pt3dadd(261.95, 1278.35, 117.55, 1.36)
pt3dadd(262.28, 1278.73, 117.55, 1.36)
pt3dadd(262.28, 1279.12, 117.55, 1.36)
pt3dadd(264.32, 1279.12, 117.55, 1.36)
}
dend[66] {pt3dclear()
pt3dadd(203.01, 1036.55, 117.55, 3.06)
pt3dadd(202.59, 1036.45, 117.55, 3.06)
pt3dadd(202.5, 1036.35, 117.55, 3.06)
pt3dadd(200.38, 1036.35, 117.55, 3.06)
pt3dadd(200.29, 1036.45, 117.55, 3.06)
pt3dadd(200.21, 1036.55, 117.55, 3.06)
pt3dadd(200.12, 1036.74, 117.55, 3.06)
pt3dadd(200.04, 1036.84, 117.55, 3.06)
pt3dadd(200.04, 1037.03, 117.55, 3.06)
pt3dadd(199.95, 1037.13, 117.55, 3.06)
pt3dadd(199.87, 1037.22, 117.55, 3.06)
pt3dadd(199.78, 1037.32, 117.55, 3.06)
pt3dadd(199.7, 1037.51, 117.55, 3.06)
pt3dadd(199.62, 1037.61, 117.55, 3.06)
pt3dadd(199.53, 1037.8, 117.55, 3.06)
pt3dadd(199.45, 1037.9, 117.55, 3.06)
pt3dadd(199.36, 1037.99, 117.55, 3.06)
pt3dadd(199.19, 1038.09, 117.55, 3.06)
pt3dadd(199.1, 1038.19, 117.55, 3.06)
pt3dadd(199.02, 1038.29, 117.55, 3.06)
pt3dadd(198.93, 1038.38, 117.55, 3.06)
pt3dadd(198.85, 1038.48, 117.55, 3.06)
pt3dadd(198.76, 1038.67, 117.55, 3.06)
pt3dadd(198.68, 1038.77, 117.55, 3.06)
pt3dadd(198.6, 1038.86, 117.55, 3.06)
pt3dadd(198.43, 1038.86, 117.55, 3.06)
pt3dadd(198.34, 1038.96, 117.55, 3.06)
pt3dadd(198.26, 1039.06, 117.55, 3.06)
pt3dadd(198.17, 1039.15, 117.55, 3.06)
pt3dadd(198.09, 1039.25, 117.55, 3.06)
pt3dadd(198, 1039.34, 117.55, 3.06)
pt3dadd(197.91, 1039.44, 117.55, 3.06)
pt3dadd(197.74, 1039.54, 117.55, 3.06)
pt3dadd(197.66, 1039.64, 117.55, 3.06)
pt3dadd(197.57, 1039.73, 117.55, 3.06)
pt3dadd(197.49, 1039.83, 117.55, 3.06)
pt3dadd(197.4, 1039.93, 117.55, 3.06)
pt3dadd(197.32, 1040.02, 117.55, 3.06)
pt3dadd(197.24, 1040.12, 117.55, 3.06)
pt3dadd(197.15, 1040.21, 117.55, 3.06)
pt3dadd(197.07, 1040.31, 117.55, 3.06)
pt3dadd(196.9, 1040.41, 117.55, 3.06)
pt3dadd(196.81, 1040.5, 117.55, 3.06)
pt3dadd(196.73, 1040.69, 117.55, 3.06)
pt3dadd(196.56, 1040.79, 117.55, 3.06)
pt3dadd(196.47, 1040.89, 117.55, 3.06)
pt3dadd(196.39, 1040.98, 117.55, 3.06)
pt3dadd(196.3, 1041.08, 117.55, 3.06)
pt3dadd(196.22, 1041.18, 117.55, 3.06)
pt3dadd(196.13, 1041.28, 117.55, 3.06)
pt3dadd(195.96, 1041.28, 117.55, 3.06)
pt3dadd(195.88, 1041.37, 117.55, 3.06)
pt3dadd(195.79, 1041.47, 117.55, 3.06)
pt3dadd(195.71, 1041.56, 117.55, 3.06)
pt3dadd(195.62, 1041.66, 117.55, 3.06)
pt3dadd(195.54, 1041.85, 117.55, 3.06)
pt3dadd(195.37, 1041.95, 117.55, 3.06)
pt3dadd(195.28, 1042.05, 117.55, 3.06)
pt3dadd(195.2, 1042.14, 117.55, 3.06)
pt3dadd(195.2, 1042.33, 117.55, 3.06)
pt3dadd(195.11, 1042.43, 117.55, 3.06)
pt3dadd(195.03, 1042.63, 117.55, 3.06)
pt3dadd(194.94, 1042.72, 117.55, 3.06)
pt3dadd(194.94, 1043.11, 117.55, 3.06)
pt3dadd(194.86, 1043.2, 117.55, 3.06)
pt3dadd(194.86, 1044.65, 117.55, 3.06)
pt3dadd(194.69, 1044.75, 117.55, 3.06)
pt3dadd(194.77, 1044.27, 117.55, 2.38)
pt3dadd(194.69, 1044.36, 117.55, 2.38)
pt3dadd(194.6, 1044.46, 117.55, 2.38)
pt3dadd(194.43, 1044.55, 117.55, 2.38)
pt3dadd(194.35, 1044.65, 117.55, 2.38)
pt3dadd(194.26, 1044.75, 117.55, 2.38)
pt3dadd(194.18, 1044.84, 117.55, 2.38)
pt3dadd(194.1, 1044.94, 117.55, 2.38)
pt3dadd(194.01, 1045.04, 117.55, 2.38)
pt3dadd(193.93, 1045.13, 117.55, 2.38)
pt3dadd(193.84, 1045.23, 117.55, 2.38)
pt3dadd(193.76, 1045.32, 117.55, 2.38)
pt3dadd(193.67, 1045.42, 117.55, 2.38)
pt3dadd(193.59, 1045.52, 117.55, 2.38)
pt3dadd(193.59, 1045.71, 117.55, 2.38)
pt3dadd(193.5, 1045.81, 117.55, 2.38)
pt3dadd(193.33, 1045.81, 117.55, 2.38)
pt3dadd(193.24, 1045.91, 117.55, 2.38)
pt3dadd(193.16, 1046, 117.55, 2.38)
pt3dadd(193.07, 1046.1, 117.55, 2.38)
pt3dadd(192.99, 1046.19, 117.55, 2.38)
pt3dadd(192.9, 1046.29, 117.55, 2.38)
pt3dadd(192.82, 1046.39, 117.55, 2.38)
pt3dadd(191.55, 1046.39, 117.55, 2.38)
pt3dadd(191.46, 1046.29, 117.55, 2.38)
pt3dadd(191.38, 1046.19, 117.55, 2.38)
pt3dadd(191.29, 1046.1, 117.55, 2.38)
pt3dadd(191.21, 1046, 117.55, 2.38)
pt3dadd(191.12, 1045.91, 117.55, 2.38)
pt3dadd(191.04, 1045.81, 117.55, 2.38)
pt3dadd(190.95, 1045.71, 117.55, 2.38)
pt3dadd(190.87, 1045.61, 117.55, 2.38)
pt3dadd(190.78, 1045.52, 117.55, 2.38)
pt3dadd(190.7, 1045.42, 117.55, 2.38)
pt3dadd(190.44, 1045.42, 117.55, 2.38)
pt3dadd(190.36, 1045.32, 117.55, 2.38)
pt3dadd(190.27, 1045.23, 117.55, 2.38)
pt3dadd(190.1, 1045.23, 117.55, 2.38)
pt3dadd(189.93, 1045.13, 117.55, 2.38)
pt3dadd(189.85, 1045.04, 117.55, 2.38)
pt3dadd(189.76, 1044.94, 117.55, 2.38)
pt3dadd(189.68, 1044.84, 117.55, 2.38)
pt3dadd(189.51, 1044.75, 117.55, 2.38)
pt3dadd(189.34, 1044.65, 117.55, 2.38)
pt3dadd(189.17, 1044.55, 117.55, 2.38)
pt3dadd(189.09, 1044.46, 117.55, 2.38)
pt3dadd(189, 1044.36, 117.55, 2.38)
pt3dadd(188.91, 1044.27, 117.55, 2.38)
pt3dadd(188.83, 1044.17, 117.55, 2.38)
pt3dadd(188.66, 1044.17, 117.55, 2.38)
pt3dadd(188.49, 1044.07, 117.55, 2.38)
pt3dadd(187.9, 1044.07, 117.55, 2.38)
pt3dadd(187.81, 1044.17, 117.55, 2.38)
pt3dadd(187.73, 1044.27, 117.55, 2.38)
pt3dadd(187.64, 1044.36, 117.55, 2.38)
pt3dadd(187.47, 1044.36, 117.55, 2.38)
pt3dadd(187.38, 1044.46, 117.55, 2.38)
pt3dadd(187.3, 1044.55, 117.55, 2.38)
pt3dadd(187.21, 1044.65, 117.55, 2.38)
pt3dadd(187.13, 1044.75, 117.55, 2.38)
pt3dadd(187.04, 1044.84, 117.55, 2.38)
pt3dadd(186.96, 1044.94, 117.55, 2.38)
pt3dadd(186.96, 1045.71, 117.55, 2.38)
pt3dadd(187.47, 1044.94, 117.55, 3.4)
pt3dadd(187.47, 1045.13, 117.55, 3.4)
pt3dadd(187.38, 1045.23, 117.55, 3.4)
pt3dadd(187.38, 1045.61, 117.55, 3.4)
pt3dadd(187.3, 1045.71, 117.55, 3.4)
pt3dadd(187.3, 1045.91, 117.55, 3.4)
pt3dadd(187.21, 1046, 117.55, 3.4)
pt3dadd(187.21, 1046.19, 117.55, 3.4)
pt3dadd(187.13, 1046.39, 117.55, 3.4)
pt3dadd(187.04, 1046.58, 117.55, 3.4)
pt3dadd(186.88, 1046.58, 117.55, 3.4)
pt3dadd(186.62, 1046.68, 117.55, 3.4)
pt3dadd(186.54, 1046.77, 117.55, 3.4)
pt3dadd(186.37, 1046.77, 117.55, 3.4)
pt3dadd(186.28, 1046.87, 117.55, 3.4)
pt3dadd(186.03, 1046.87, 117.55, 3.4)
pt3dadd(186.11, 1046.77, 117.55, 2.38)
pt3dadd(185.94, 1046.87, 117.55, 2.38)
pt3dadd(185.77, 1047.06, 117.55, 2.38)
pt3dadd(185.6, 1047.16, 117.55, 2.38)
pt3dadd(185.43, 1047.16, 117.55, 2.38)
pt3dadd(185.35, 1047.26, 117.55, 2.38)
pt3dadd(185.26, 1047.35, 117.55, 2.38)
pt3dadd(185.18, 1047.45, 117.55, 2.38)
pt3dadd(185.09, 1047.54, 117.55, 2.38)
pt3dadd(185.01, 1047.64, 117.55, 2.38)
pt3dadd(184.92, 1047.74, 117.55, 2.38)
pt3dadd(184.84, 1047.83, 117.55, 2.38)
pt3dadd(184.84, 1048.03, 117.55, 2.38)
pt3dadd(184.75, 1048.12, 117.55, 2.38)
pt3dadd(184.67, 1048.22, 117.55, 2.38)
pt3dadd(184.67, 1050.05, 117.55, 2.38)
pt3dadd(184.75, 1050.05, 117.55, 2.04)
pt3dadd(184.58, 1050.05, 117.55, 2.04)
}
}
proc shape3d_94() {
dend[66] { pt3dadd(184.5, 1050.15, 117.55, 2.04)
pt3dadd(184.41, 1050.24, 117.55, 2.04)
pt3dadd(184.33, 1050.34, 117.55, 2.04)
pt3dadd(184.16, 1050.44, 117.55, 2.04)
pt3dadd(184.07, 1050.53, 117.55, 2.04)
pt3dadd(183.99, 1050.63, 117.55, 2.04)
pt3dadd(183.9, 1050.73, 117.55, 2.04)
pt3dadd(183.82, 1050.82, 117.55, 2.04)
pt3dadd(183.65, 1050.92, 117.55, 2.04)
pt3dadd(183.65, 1051.11, 117.55, 2.04)
pt3dadd(183.57, 1051.21, 117.55, 2.04)
pt3dadd(183.48, 1051.31, 117.55, 2.04)
pt3dadd(183.4, 1051.5, 117.55, 2.04)
pt3dadd(183.31, 1051.59, 117.55, 2.04)
pt3dadd(183.23, 1051.69, 117.55, 2.04)
pt3dadd(183.23, 1051.89, 117.55, 2.04)
pt3dadd(183.14, 1051.98, 117.55, 2.04)
pt3dadd(183.14, 1052.17, 117.55, 2.04)
pt3dadd(183.05, 1052.36, 117.55, 2.04)
pt3dadd(183.05, 1052.66, 117.55, 2.04)
pt3dadd(182.97, 1052.75, 117.55, 2.04)
pt3dadd(182.8, 1052.85, 117.55, 2.04)
pt3dadd(182.71, 1052.94, 117.55, 2.04)
pt3dadd(182.63, 1053.14, 117.55, 2.04)
pt3dadd(182.29, 1053.14, 117.55, 2.04)
pt3dadd(182.54, 1053.04, 117.55, 2.72)
pt3dadd(182.38, 1053.04, 117.55, 2.72)
pt3dadd(182.12, 1053.14, 117.55, 2.72)
pt3dadd(181.87, 1053.23, 117.55, 2.72)
pt3dadd(181.61, 1053.33, 117.55, 2.72)
pt3dadd(181.52, 1053.43, 117.55, 2.72)
pt3dadd(180.76, 1053.43, 117.55, 2.72)
pt3dadd(180.76, 1053.52, 117.55, 2.04)
pt3dadd(180.25, 1053.52, 117.55, 2.04)
pt3dadd(180.17, 1053.72, 117.55, 2.04)
pt3dadd(180.08, 1053.81, 117.55, 2.04)
pt3dadd(180.08, 1055.74, 117.55, 2.04)
pt3dadd(180, 1055.84, 117.55, 2.04)
pt3dadd(180, 1056.03, 117.55, 2.04)
pt3dadd(179.91, 1056.13, 117.55, 2.04)
pt3dadd(179.83, 1056.22, 117.55, 2.04)
pt3dadd(179.74, 1056.32, 117.55, 2.04)
pt3dadd(179.66, 1056.42, 117.55, 2.04)
pt3dadd(179.66, 1056.61, 117.55, 2.04)
pt3dadd(179.57, 1056.71, 117.55, 2.04)
pt3dadd(179.49, 1056.8, 117.55, 2.04)
pt3dadd(179.4, 1056.9, 117.55, 2.04)
pt3dadd(179.15, 1056.9, 117.55, 2.04)
pt3dadd(178.98, 1056.99, 117.55, 2.04)
pt3dadd(178.64, 1056.99, 117.55, 2.04)
pt3dadd(178.47, 1056.9, 117.55, 2.04)
pt3dadd(178.3, 1056.8, 117.55, 2.04)
pt3dadd(178.21, 1056.71, 117.55, 2.04)
pt3dadd(177.96, 1056.71, 117.55, 2.04)
pt3dadd(177.88, 1056.61, 117.55, 2.04)
pt3dadd(176.6, 1056.61, 117.55, 2.04)
pt3dadd(176.51, 1056.71, 117.55, 2.04)
pt3dadd(176.43, 1056.8, 117.55, 2.04)
pt3dadd(176.43, 1056.99, 117.55, 2.04)
pt3dadd(176.35, 1057.09, 117.55, 2.04)
pt3dadd(176.18, 1057.29, 117.55, 2.04)
pt3dadd(176.09, 1057.38, 117.55, 2.04)
pt3dadd(176.01, 1057.48, 117.55, 2.04)
pt3dadd(176.01, 1057.67, 117.55, 2.04)
pt3dadd(175.92, 1057.77, 117.55, 2.04)
pt3dadd(175.84, 1057.86, 117.55, 2.04)
pt3dadd(175.75, 1057.96, 117.55, 2.04)
pt3dadd(175.07, 1057.96, 117.55, 2.04)
pt3dadd(175.07, 1057.77, 117.55, 2.04)
pt3dadd(174.99, 1057.67, 117.55, 2.04)
pt3dadd(174.9, 1057.57, 117.55, 2.04)
pt3dadd(174.82, 1057.48, 117.55, 2.04)
pt3dadd(174.73, 1057.38, 117.55, 2.04)
pt3dadd(174.56, 1057.29, 117.55, 2.04)
pt3dadd(174.48, 1057.19, 117.55, 2.04)
pt3dadd(174.39, 1057.09, 117.55, 2.04)
pt3dadd(174.22, 1056.99, 117.55, 2.04)
pt3dadd(174.14, 1056.9, 117.55, 2.04)
pt3dadd(173.97, 1056.9, 117.55, 2.04)
pt3dadd(173.8, 1056.8, 117.55, 2.04)
pt3dadd(173.63, 1056.71, 117.55, 2.04)
pt3dadd(173.46, 1056.71, 117.55, 2.04)
pt3dadd(173.38, 1056.61, 117.55, 2.04)
pt3dadd(172.87, 1056.61, 117.55, 2.04)
pt3dadd(172.78, 1056.51, 117.55, 2.04)
pt3dadd(172.61, 1056.42, 117.55, 2.04)
pt3dadd(172.44, 1056.42, 117.55, 2.04)
pt3dadd(172.35, 1056.32, 117.55, 2.04)
pt3dadd(172.18, 1056.32, 117.55, 2.04)
pt3dadd(172.1, 1056.22, 117.55, 2.04)
pt3dadd(171.76, 1056.22, 117.55, 2.04)
pt3dadd(171.68, 1056.32, 117.55, 2.04)
pt3dadd(171.59, 1056.42, 117.55, 2.04)
pt3dadd(171.51, 1056.51, 117.55, 2.04)
pt3dadd(171.42, 1056.61, 117.55, 2.04)
pt3dadd(171.34, 1056.8, 117.55, 2.04)
pt3dadd(171.16, 1056.8, 117.55, 2.04)
pt3dadd(171.08, 1056.71, 117.55, 2.04)
pt3dadd(171, 1056.61, 117.55, 2.04)
pt3dadd(170.91, 1056.51, 117.55, 2.04)
pt3dadd(170.66, 1056.51, 117.55, 2.04)
pt3dadd(170.57, 1056.42, 117.55, 2.04)
pt3dadd(170.4, 1056.32, 117.55, 2.04)
pt3dadd(170.32, 1056.22, 117.55, 2.04)
pt3dadd(170.23, 1056.13, 117.55, 2.04)
pt3dadd(168.45, 1056.13, 117.55, 2.04)
pt3dadd(168.37, 1056.22, 117.55, 2.04)
pt3dadd(168.2, 1056.22, 117.55, 2.04)
pt3dadd(168.11, 1056.32, 117.55, 2.04)
pt3dadd(168.02, 1056.42, 117.55, 2.04)
pt3dadd(167.85, 1056.42, 117.55, 2.04)
pt3dadd(167.77, 1056.61, 117.55, 2.04)
pt3dadd(167.68, 1056.71, 117.55, 2.04)
pt3dadd(167.68, 1056.99, 117.55, 2.04)
pt3dadd(167.6, 1057.19, 117.55, 2.04)
pt3dadd(167.6, 1057.67, 117.55, 2.04)
pt3dadd(167.43, 1057.77, 117.55, 2.04)
pt3dadd(167.35, 1057.86, 117.55, 2.04)
pt3dadd(167.26, 1057.96, 117.55, 2.04)
pt3dadd(167.09, 1057.77, 117.55, 2.04)
pt3dadd(166.92, 1057.77, 117.55, 2.04)
pt3dadd(166.84, 1057.67, 117.55, 2.04)
pt3dadd(166.75, 1057.57, 117.55, 2.04)
pt3dadd(166.66, 1057.48, 117.55, 2.04)
pt3dadd(166.58, 1057.38, 117.55, 2.04)
pt3dadd(166.49, 1057.29, 117.55, 2.04)
pt3dadd(166.41, 1057.19, 117.55, 2.04)
pt3dadd(166.32, 1057.09, 117.55, 2.04)
pt3dadd(166.24, 1056.99, 117.55, 2.04)
pt3dadd(166.15, 1056.9, 117.55, 2.04)
pt3dadd(166.07, 1056.8, 117.55, 2.04)
pt3dadd(165.99, 1056.71, 117.55, 2.04)
pt3dadd(165.39, 1056.71, 117.55, 2.04)
pt3dadd(165.22, 1056.61, 117.55, 2.04)
pt3dadd(164.8, 1056.61, 117.55, 2.04)
pt3dadd(164.71, 1056.71, 117.55, 2.04)
pt3dadd(164.63, 1056.9, 117.55, 2.04)
pt3dadd(164.54, 1056.99, 117.55, 2.04)
pt3dadd(164.46, 1057.09, 117.55, 2.04)
pt3dadd(164.37, 1057.19, 117.55, 2.04)
pt3dadd(164.29, 1057.29, 117.55, 2.04)
pt3dadd(164.29, 1057.48, 117.55, 2.04)
pt3dadd(164.2, 1057.57, 117.55, 2.04)
pt3dadd(164.12, 1057.77, 117.55, 2.04)
pt3dadd(164.03, 1057.86, 117.55, 2.04)
pt3dadd(163.95, 1057.96, 117.55, 2.04)
pt3dadd(163.95, 1058.15, 117.55, 2.04)
pt3dadd(163.86, 1058.25, 117.55, 2.04)
pt3dadd(163.78, 1058.34, 117.55, 2.04)
pt3dadd(163.78, 1058.54, 117.55, 2.04)
pt3dadd(163.69, 1058.64, 117.55, 2.04)
pt3dadd(163.61, 1058.73, 117.55, 2.04)
pt3dadd(163.52, 1058.83, 117.55, 2.04)
pt3dadd(163.35, 1058.83, 117.55, 2.04)
pt3dadd(163.27, 1058.93, 117.55, 2.04)
pt3dadd(163.18, 1059.02, 117.55, 2.04)
pt3dadd(163.1, 1059.12, 117.55, 2.04)
pt3dadd(162.93, 1059.12, 117.55, 2.04)
pt3dadd(162.85, 1059.21, 117.55, 2.04)
pt3dadd(161.74, 1059.21, 117.55, 2.04)
pt3dadd(161.65, 1059.12, 117.55, 2.04)
pt3dadd(161.57, 1059.02, 117.55, 2.04)
pt3dadd(161.49, 1058.93, 117.55, 2.04)
pt3dadd(161.32, 1058.93, 117.55, 2.04)
pt3dadd(161.23, 1058.83, 117.55, 2.04)
pt3dadd(160.89, 1058.83, 117.55, 2.04)
pt3dadd(160.89, 1059.02, 117.55, 2.04)
pt3dadd(160.72, 1059.12, 117.55, 2.04)
pt3dadd(160.63, 1059.21, 117.55, 2.04)
pt3dadd(160.55, 1059.31, 117.55, 2.04)
pt3dadd(160.38, 1059.31, 117.55, 2.04)
pt3dadd(160.3, 1059.41, 117.55, 2.04)
pt3dadd(160.21, 1059.5, 117.55, 2.04)
pt3dadd(160.04, 1059.6, 117.55, 2.04)
pt3dadd(159.96, 1059.7, 117.55, 2.04)
pt3dadd(159.87, 1059.89, 117.55, 2.04)
pt3dadd(159.79, 1059.98, 117.55, 2.04)
pt3dadd(159.7, 1060.08, 117.55, 2.04)
pt3dadd(159.62, 1060.18, 117.55, 2.04)
pt3dadd(159.53, 1060.28, 117.55, 2.04)
pt3dadd(159.45, 1060.37, 117.55, 2.04)
pt3dadd(159.45, 1060.56, 117.55, 2.04)
pt3dadd(159.36, 1060.66, 117.55, 2.04)
pt3dadd(159.28, 1060.76, 117.55, 2.04)
pt3dadd(159.19, 1060.85, 117.55, 2.04)
pt3dadd(159.11, 1060.95, 117.55, 2.04)
pt3dadd(157.15, 1060.95, 117.55, 2.04)
pt3dadd(156.99, 1061.05, 117.55, 2.72)
pt3dadd(156.9, 1061.14, 117.55, 2.72)
pt3dadd(156.73, 1061.24, 117.55, 2.72)
pt3dadd(156.73, 1061.43, 117.55, 2.72)
pt3dadd(156.56, 1061.53, 117.55, 2.72)
pt3dadd(156.48, 1061.63, 117.55, 2.72)
pt3dadd(156.39, 1061.72, 117.55, 2.72)
pt3dadd(156.39, 1061.92, 117.55, 2.72)
pt3dadd(156.3, 1062.01, 117.55, 2.72)
pt3dadd(156.22, 1062.11, 117.55, 2.72)
pt3dadd(156.22, 1062.3, 117.55, 2.72)
pt3dadd(156.13, 1062.4, 117.55, 2.72)
pt3dadd(156.05, 1062.49, 117.55, 2.72)
}
}
proc shape3d_95() {
dend[66] { pt3dadd(155.88, 1062.59, 117.55, 2.72)
pt3dadd(155.79, 1062.69, 117.55, 2.72)
pt3dadd(155.46, 1062.69, 117.55, 2.72)
pt3dadd(155.37, 1062.78, 117.55, 2.72)
pt3dadd(155.29, 1062.88, 117.55, 2.72)
pt3dadd(155.12, 1062.97, 117.55, 2.72)
pt3dadd(155.03, 1063.07, 117.55, 2.72)
pt3dadd(154.95, 1063.17, 117.55, 2.72)
pt3dadd(154.78, 1063.27, 117.55, 2.72)
pt3dadd(154.69, 1063.36, 117.55, 2.72)
pt3dadd(154.61, 1063.46, 117.55, 2.72)
pt3dadd(154.44, 1063.46, 117.55, 2.72)
pt3dadd(154.35, 1063.56, 117.55, 2.72)
pt3dadd(154.27, 1063.65, 117.55, 2.72)
pt3dadd(154.18, 1063.75, 117.55, 2.72)
pt3dadd(154.1, 1063.84, 117.55, 2.72)
pt3dadd(153.93, 1063.94, 117.55, 2.72)
pt3dadd(153.84, 1064.04, 117.55, 2.72)
pt3dadd(153.76, 1064.23, 117.55, 2.72)
pt3dadd(153.67, 1064.32, 117.55, 2.72)
pt3dadd(153.5, 1064.42, 117.55, 2.72)
pt3dadd(153.42, 1064.52, 117.55, 2.72)
pt3dadd(153.33, 1064.61, 117.55, 2.72)
pt3dadd(152.57, 1064.61, 117.55, 2.72)
pt3dadd(152.49, 1064.52, 117.55, 2.72)
pt3dadd(152.4, 1064.42, 117.55, 2.72)
pt3dadd(152.32, 1064.32, 117.55, 2.72)
pt3dadd(152.23, 1064.23, 117.55, 2.72)
pt3dadd(152.06, 1064.13, 117.55, 2.72)
pt3dadd(151.98, 1064.04, 117.55, 2.72)
pt3dadd(151.29, 1064.04, 117.55, 2.72)
pt3dadd(151.21, 1064.23, 117.55, 2.72)
pt3dadd(151.13, 1064.42, 117.55, 2.72)
pt3dadd(151.04, 1064.52, 117.55, 2.72)
pt3dadd(150.87, 1064.61, 117.55, 2.72)
pt3dadd(150.79, 1064.71, 117.55, 2.72)
pt3dadd(150.7, 1064.81, 117.55, 2.72)
pt3dadd(150.7, 1065, 117.55, 2.72)
pt3dadd(150.62, 1065.1, 117.55, 2.72)
pt3dadd(150.53, 1065.19, 117.55, 2.72)
pt3dadd(150.45, 1065.29, 117.55, 2.72)
pt3dadd(150.36, 1065.39, 117.55, 2.72)
pt3dadd(150.36, 1065.58, 117.55, 2.72)
pt3dadd(150.27, 1065.68, 117.55, 2.72)
pt3dadd(150.02, 1065.87, 117.55, 2.72)
pt3dadd(150.02, 1066.06, 117.55, 2.72)
pt3dadd(149.94, 1066.16, 117.55, 2.72)
pt3dadd(149.85, 1066.26, 117.55, 2.72)
pt3dadd(149.77, 1066.35, 117.55, 2.72)
pt3dadd(149.68, 1066.45, 117.55, 2.72)
pt3dadd(149.6, 1066.55, 117.55, 2.72)
pt3dadd(149.51, 1066.74, 117.55, 2.72)
pt3dadd(149.43, 1066.83, 117.55, 2.72)
pt3dadd(149.34, 1066.93, 117.55, 2.72)
pt3dadd(149.26, 1067.03, 117.55, 2.72)
pt3dadd(149.17, 1067.12, 117.55, 2.72)
pt3dadd(149.09, 1067.22, 117.55, 2.72)
pt3dadd(149, 1067.31, 117.55, 2.72)
pt3dadd(147.9, 1067.31, 117.55, 2.72)
pt3dadd(147.81, 1067.22, 117.55, 2.72)
pt3dadd(147.73, 1067.12, 117.55, 2.72)
pt3dadd(147.73, 1066.93, 117.55, 2.72)
pt3dadd(147.64, 1066.83, 117.55, 2.72)
pt3dadd(147.56, 1066.74, 117.55, 2.72)
pt3dadd(147.48, 1066.64, 117.55, 2.72)
pt3dadd(147.3, 1066.64, 117.55, 2.72)
pt3dadd(147.13, 1066.55, 117.55, 2.72)
pt3dadd(147.05, 1066.45, 117.55, 2.72)
pt3dadd(146.54, 1066.45, 117.55, 2.72)
pt3dadd(146.46, 1066.55, 117.55, 2.72)
pt3dadd(146.37, 1066.64, 117.55, 2.72)
pt3dadd(146.29, 1066.74, 117.55, 2.72)
pt3dadd(146.2, 1066.83, 117.55, 2.72)
pt3dadd(146.03, 1066.83, 117.55, 2.72)
pt3dadd(145.95, 1066.93, 117.55, 2.72)
pt3dadd(145.86, 1067.12, 117.55, 2.72)
pt3dadd(145.77, 1067.22, 117.55, 2.72)
pt3dadd(145.69, 1067.31, 117.55, 2.72)
pt3dadd(145.6, 1067.41, 117.55, 2.72)
pt3dadd(145.52, 1067.51, 117.55, 2.72)
pt3dadd(145.43, 1067.6, 117.55, 2.72)
pt3dadd(145.26, 1067.7, 117.55, 2.72)
pt3dadd(145.18, 1067.8, 117.55, 2.72)
pt3dadd(145.1, 1067.9, 117.55, 2.72)
pt3dadd(145.01, 1067.99, 117.55, 2.72)
pt3dadd(144.93, 1068.09, 117.55, 2.72)
pt3dadd(144.76, 1068.19, 117.55, 2.72)
pt3dadd(144.67, 1068.28, 117.55, 2.72)
pt3dadd(144.59, 1068.38, 117.55, 2.72)
pt3dadd(144.42, 1068.38, 117.55, 2.72)
pt3dadd(144.33, 1068.47, 117.55, 2.72)
pt3dadd(141.45, 1068.47, 117.55, 2.72)
pt3dadd(141.62, 1068.76, 117.55, 2.72)
pt3dadd(141.36, 1068.76, 117.55, 2.72)
pt3dadd(141.27, 1068.86, 117.55, 2.72)
pt3dadd(141.19, 1068.95, 117.55, 2.72)
pt3dadd(141.1, 1069.05, 117.55, 2.72)
pt3dadd(141.02, 1069.15, 117.55, 2.72)
pt3dadd(140.93, 1069.24, 117.55, 2.72)
pt3dadd(140.93, 1069.44, 117.55, 2.72)
pt3dadd(140.85, 1069.54, 117.55, 2.72)
pt3dadd(140.76, 1069.63, 117.55, 2.72)
pt3dadd(140.68, 1069.82, 117.55, 2.72)
pt3dadd(140.68, 1070.11, 117.55, 2.72)
pt3dadd(140.6, 1070.21, 117.55, 2.72)
pt3dadd(140.6, 1070.4, 117.55, 2.72)
pt3dadd(140.51, 1070.5, 117.55, 2.72)
pt3dadd(140.43, 1070.59, 117.55, 2.72)
pt3dadd(140.34, 1070.69, 117.55, 2.72)
pt3dadd(140.34, 1070.89, 117.55, 2.72)
pt3dadd(140.26, 1070.98, 117.55, 2.72)
pt3dadd(140.17, 1071.08, 117.55, 2.72)
pt3dadd(140.09, 1071.18, 117.55, 2.72)
pt3dadd(140, 1071.27, 117.55, 2.72)
pt3dadd(139.91, 1071.37, 117.55, 2.72)
pt3dadd(139.83, 1071.56, 117.55, 2.72)
pt3dadd(139.75, 1071.66, 117.55, 2.72)
pt3dadd(139.66, 1071.75, 117.55, 2.72)
pt3dadd(139.58, 1071.85, 117.55, 2.72)
pt3dadd(139.41, 1071.85, 117.55, 2.72)
pt3dadd(139.32, 1071.94, 117.55, 2.72)
pt3dadd(139.24, 1072.04, 117.55, 2.72)
pt3dadd(139.15, 1072.14, 117.55, 2.72)
pt3dadd(139.15, 1073.3, 117.55, 2.72)
pt3dadd(139.07, 1073.49, 117.55, 2.72)
pt3dadd(138.98, 1073.58, 117.55, 2.72)
pt3dadd(138.9, 1073.68, 117.55, 2.72)
pt3dadd(138.9, 1073.88, 117.55, 2.72)
pt3dadd(138.73, 1073.97, 117.55, 2.72)
pt3dadd(138.64, 1074.07, 117.55, 2.72)
pt3dadd(138.56, 1074.17, 117.55, 2.72)
pt3dadd(138.47, 1074.36, 117.55, 2.72)
pt3dadd(138.39, 1074.45, 117.55, 2.72)
pt3dadd(138.22, 1074.55, 117.55, 2.72)
pt3dadd(138.13, 1074.45, 117.55, 2.72)
pt3dadd(138.05, 1074.36, 117.55, 2.72)
pt3dadd(137.96, 1074.26, 117.55, 2.72)
pt3dadd(137.88, 1074.17, 117.55, 2.72)
pt3dadd(137.88, 1073.97, 117.55, 2.72)
pt3dadd(137.71, 1073.88, 117.55, 2.72)
pt3dadd(137.62, 1073.78, 117.55, 2.72)
pt3dadd(137.28, 1073.78, 117.55, 2.72)
pt3dadd(137.2, 1073.68, 117.55, 2.72)
pt3dadd(135.84, 1073.68, 117.55, 2.72)
pt3dadd(137.03, 1073.58, 117.55, 2.72)
pt3dadd(136.77, 1073.58, 117.55, 2.72)
pt3dadd(136.6, 1073.49, 117.55, 2.72)
pt3dadd(135.41, 1073.49, 117.55, 2.72)
pt3dadd(135.33, 1073.58, 117.55, 2.72)
pt3dadd(135.24, 1073.78, 117.55, 2.72)
pt3dadd(135.16, 1073.88, 117.55, 2.72)
pt3dadd(135.07, 1073.97, 117.55, 2.72)
pt3dadd(135.07, 1074.36, 117.55, 2.72)
pt3dadd(134.99, 1074.45, 117.55, 2.72)
pt3dadd(134.99, 1074.65, 117.55, 2.72)
pt3dadd(134.9, 1074.74, 117.55, 2.72)
pt3dadd(134.82, 1074.84, 117.55, 2.72)
pt3dadd(134.65, 1075.03, 117.55, 2.72)
pt3dadd(134.57, 1075.13, 117.55, 2.72)
pt3dadd(134.48, 1075.22, 117.55, 2.72)
pt3dadd(134.4, 1075.13, 117.55, 2.72)
pt3dadd(134.23, 1075.13, 117.55, 2.72)
pt3dadd(134.23, 1074.84, 117.55, 2.72)
pt3dadd(134.14, 1074.74, 117.55, 2.72)
pt3dadd(133.97, 1074.65, 117.55, 2.72)
pt3dadd(133.8, 1074.55, 117.55, 2.72)
pt3dadd(133.72, 1074.45, 117.55, 2.72)
pt3dadd(133.55, 1074.45, 117.55, 2.72)
pt3dadd(133.38, 1074.36, 117.55, 2.72)
pt3dadd(132.7, 1074.36, 117.55, 2.72)
pt3dadd(132.61, 1074.45, 117.55, 2.72)
pt3dadd(132.53, 1074.55, 117.55, 2.72)
pt3dadd(132.44, 1074.65, 117.55, 2.72)
pt3dadd(132.27, 1074.65, 117.55, 2.72)
pt3dadd(132.19, 1074.74, 117.55, 2.72)
pt3dadd(132.1, 1074.84, 117.55, 2.72)
pt3dadd(131.85, 1074.84, 117.55, 2.72)
pt3dadd(131.68, 1074.94, 117.55, 2.72)
pt3dadd(131.51, 1075.03, 117.55, 2.72)
pt3dadd(131.26, 1075.03, 117.55, 2.72)
pt3dadd(131.17, 1075.13, 117.55, 2.72)
pt3dadd(130.91, 1075.13, 117.55, 2.72)
pt3dadd(130.83, 1075.22, 117.55, 2.72)
pt3dadd(130.66, 1075.22, 117.55, 2.72)
pt3dadd(130.57, 1075.32, 117.55, 2.72)
pt3dadd(130.49, 1075.42, 117.55, 2.72)
pt3dadd(130.32, 1075.42, 117.55, 2.72)
pt3dadd(130.24, 1075.52, 117.55, 2.72)
pt3dadd(130.07, 1075.52, 117.55, 2.72)
pt3dadd(129.9, 1075.42, 117.55, 3.06)
pt3dadd(129.81, 1075.32, 117.55, 3.06)
pt3dadd(129.64, 1075.22, 117.55, 3.06)
pt3dadd(129.55, 1075.13, 117.55, 3.06)
pt3dadd(129.47, 1075.03, 117.55, 3.06)
pt3dadd(129.38, 1074.94, 117.55, 3.06)
pt3dadd(129.22, 1074.84, 117.55, 3.06)
pt3dadd(128.11, 1074.84, 117.55, 3.06)
pt3dadd(128.03, 1074.74, 117.55, 3.06)
pt3dadd(127.94, 1074.65, 117.55, 3.06)
pt3dadd(127.77, 1074.65, 117.55, 3.06)
}
}
proc shape3d_96() {
dend[66] { pt3dadd(127.69, 1074.55, 117.55, 3.06)
pt3dadd(127.6, 1074.45, 117.55, 3.06)
pt3dadd(127.52, 1074.36, 117.55, 3.06)
pt3dadd(127.43, 1074.26, 117.55, 3.06)
pt3dadd(127.26, 1074.17, 117.55, 3.06)
pt3dadd(127.18, 1074.07, 117.55, 3.06)
pt3dadd(127.09, 1073.97, 117.55, 3.06)
pt3dadd(127.01, 1073.88, 117.55, 3.06)
pt3dadd(125.74, 1073.88, 117.55, 3.06)
pt3dadd(125.57, 1073.78, 117.55, 3.06)
pt3dadd(125.48, 1073.68, 117.55, 3.06)
pt3dadd(125.39, 1073.58, 117.55, 3.06)
pt3dadd(125.22, 1073.58, 117.55, 3.06)
pt3dadd(125.14, 1073.49, 117.55, 3.06)
pt3dadd(125.06, 1073.39, 117.55, 3.06)
pt3dadd(124.89, 1073.2, 117.55, 3.06)
pt3dadd(124.8, 1073.1, 117.55, 3.06)
pt3dadd(124.63, 1073.1, 117.55, 3.06)
pt3dadd(124.46, 1073.01, 117.55, 3.06)
pt3dadd(123.19, 1073.01, 117.55, 3.06)
pt3dadd(123.1, 1073.1, 117.55, 3.06)
pt3dadd(123.02, 1073.2, 117.55, 3.06)
pt3dadd(119.88, 1073.2, 117.55, 3.06)
pt3dadd(119.88, 1072.72, 117.55, 3.06)
pt3dadd(119.79, 1072.62, 117.55, 3.06)
pt3dadd(119.71, 1072.53, 117.55, 3.06)
pt3dadd(118.86, 1072.53, 117.55, 3.06)
pt3dadd(118.77, 1072.72, 117.55, 3.06)
pt3dadd(118.69, 1072.81, 117.55, 3.06)
pt3dadd(118.6, 1072.91, 117.55, 3.06)
pt3dadd(118.43, 1073.01, 117.55, 3.06)
pt3dadd(118.35, 1073.1, 117.55, 3.06)
pt3dadd(118.26, 1073.2, 117.55, 3.06)
pt3dadd(118.18, 1073.3, 117.55, 3.06)
pt3dadd(118.09, 1073.49, 117.55, 3.06)
pt3dadd(118.01, 1073.58, 117.55, 3.06)
pt3dadd(117.92, 1073.68, 117.55, 3.06)
pt3dadd(117.84, 1073.78, 117.55, 3.06)
pt3dadd(117.75, 1073.88, 117.55, 3.06)
pt3dadd(117.67, 1073.97, 117.55, 3.06)
pt3dadd(116.99, 1073.97, 117.55, 3.06)
pt3dadd(116.9, 1074.07, 117.55, 3.06)
pt3dadd(116.73, 1074.07, 117.55, 3.06)
pt3dadd(116.65, 1073.97, 117.55, 3.06)
pt3dadd(116.56, 1073.88, 117.55, 3.06)
pt3dadd(116.39, 1073.78, 117.55, 3.06)
pt3dadd(116.22, 1073.78, 117.55, 3.06)
pt3dadd(116.06, 1073.68, 117.55, 3.06)
pt3dadd(115.97, 1073.58, 117.55, 3.06)
pt3dadd(114.86, 1073.58, 117.55, 3.06)
pt3dadd(114.78, 1073.49, 117.55, 3.06)
pt3dadd(114.53, 1073.49, 117.55, 3.06)
pt3dadd(114.44, 1073.39, 117.55, 3.06)
pt3dadd(114.27, 1073.3, 117.55, 3.06)
pt3dadd(114.18, 1073.2, 117.55, 3.06)
pt3dadd(111.64, 1073.2, 117.55, 3.06)
pt3dadd(111.81, 1072.81, 117.55, 2.72)
pt3dadd(111.72, 1072.91, 117.55, 2.72)
pt3dadd(111.64, 1073.1, 117.55, 2.72)
pt3dadd(111.55, 1073.2, 117.55, 2.72)
pt3dadd(111.47, 1073.3, 117.55, 2.72)
pt3dadd(111.3, 1073.39, 117.55, 2.72)
pt3dadd(111.3, 1073.58, 117.55, 2.72)
pt3dadd(111.21, 1073.68, 117.55, 2.72)
pt3dadd(111.13, 1073.78, 117.55, 2.72)
pt3dadd(111.04, 1073.88, 117.55, 2.72)
pt3dadd(111.04, 1074.07, 117.55, 2.72)
pt3dadd(110.96, 1074.17, 117.55, 2.72)
pt3dadd(110.88, 1074.36, 117.55, 2.72)
pt3dadd(110.88, 1074.94, 117.55, 2.72)
pt3dadd(110.79, 1075.03, 117.55, 2.72)
pt3dadd(110.71, 1075.13, 117.55, 2.72)
pt3dadd(109.09, 1075.13, 117.55, 2.72)
pt3dadd(109.09, 1075.22, 117.55, 3.06)
pt3dadd(108.07, 1075.22, 117.55, 3.06)
pt3dadd(107.99, 1075.32, 117.55, 3.06)
pt3dadd(107.9, 1075.42, 117.55, 3.06)
pt3dadd(107.82, 1075.52, 117.55, 3.06)
pt3dadd(107.82, 1075.71, 117.55, 3.06)
pt3dadd(107.73, 1075.8, 117.55, 3.06)
pt3dadd(107.65, 1075.9, 117.55, 3.06)
pt3dadd(107.65, 1076.19, 117.55, 3.06)
pt3dadd(107.56, 1076.29, 117.55, 3.06)
pt3dadd(107.56, 1076.57, 117.55, 3.06)
pt3dadd(107.48, 1076.67, 117.55, 3.06)
pt3dadd(107.39, 1076.77, 117.55, 3.06)
pt3dadd(107.31, 1076.86, 117.55, 3.06)
pt3dadd(107.22, 1076.96, 117.55, 3.06)
pt3dadd(107.05, 1076.96, 117.55, 3.06)
pt3dadd(106.97, 1077.06, 117.55, 3.06)
pt3dadd(106.8, 1076.96, 117.55, 3.06)
pt3dadd(106.71, 1076.86, 117.55, 3.06)
pt3dadd(106.63, 1076.77, 117.55, 3.06)
pt3dadd(106.46, 1076.77, 117.55, 3.06)
pt3dadd(106.37, 1076.67, 117.55, 3.06)
pt3dadd(105.53, 1076.67, 117.55, 3.06)
pt3dadd(105.61, 1076.57, 117.55, 2.04)
pt3dadd(105.44, 1076.57, 117.55, 2.04)
pt3dadd(105.36, 1076.67, 117.55, 2.04)
pt3dadd(105.27, 1076.77, 117.55, 2.04)
pt3dadd(105.18, 1076.96, 117.55, 2.04)
pt3dadd(105.1, 1077.06, 117.55, 2.04)
pt3dadd(105.01, 1077.16, 117.55, 2.04)
pt3dadd(104.93, 1077.25, 117.55, 2.04)
pt3dadd(104.93, 1077.44, 117.55, 2.04)
pt3dadd(104.85, 1077.54, 117.55, 2.04)
pt3dadd(104.76, 1077.64, 117.55, 2.04)
pt3dadd(102.47, 1077.64, 117.55, 2.04)
pt3dadd(102.47, 1077.44, 117.55, 2.04)
pt3dadd(102.38, 1077.35, 117.55, 2.04)
pt3dadd(102.3, 1077.44, 117.55, 2.04)
pt3dadd(102.3, 1078.02, 117.55, 2.04)
pt3dadd(102.21, 1078.12, 117.55, 2.04)
pt3dadd(102.21, 1078.31, 117.55, 2.04)
pt3dadd(102.13, 1078.41, 117.55, 2.04)
pt3dadd(102.13, 1078.6, 117.55, 2.04)
pt3dadd(102.04, 1078.7, 117.55, 2.04)
pt3dadd(101.96, 1078.79, 117.55, 2.04)
pt3dadd(101.87, 1078.89, 117.55, 2.04)
pt3dadd(101.87, 1079.08, 117.55, 2.04)
pt3dadd(101.79, 1079.18, 117.55, 2.04)
pt3dadd(101.7, 1079.28, 117.55, 2.04)
pt3dadd(101.53, 1079.28, 117.55, 2.04)
pt3dadd(101.45, 1079.37, 117.55, 2.04)
pt3dadd(99.92, 1079.37, 117.55, 2.04)
pt3dadd(100.18, 1079.37, 117.55, 2.72)
pt3dadd(98.22, 1079.37, 117.55, 2.72)
pt3dadd(98.14, 1079.28, 117.55, 2.72)
pt3dadd(97.97, 1079.18, 117.55, 2.72)
pt3dadd(97.8, 1079.18, 117.55, 2.72)
pt3dadd(97.71, 1079.08, 117.55, 2.72)
pt3dadd(97.54, 1079.08, 117.55, 2.72)
pt3dadd(97.46, 1078.99, 117.55, 2.72)
pt3dadd(97.29, 1078.99, 117.55, 2.72)
pt3dadd(97.2, 1078.89, 117.55, 2.72)
pt3dadd(97.03, 1078.89, 117.55, 2.72)
pt3dadd(96.95, 1078.79, 117.55, 2.72)
pt3dadd(96.69, 1078.79, 117.55, 2.72)
pt3dadd(96.52, 1078.7, 117.55, 2.72)
pt3dadd(96.44, 1078.6, 117.55, 2.72)
pt3dadd(96.27, 1078.51, 117.55, 2.72)
pt3dadd(96.18, 1078.41, 117.55, 2.72)
pt3dadd(96.01, 1078.41, 117.55, 2.72)
pt3dadd(95.93, 1078.31, 117.55, 2.72)
pt3dadd(95.84, 1078.21, 117.55, 2.72)
pt3dadd(95.76, 1078.12, 117.55, 2.72)
pt3dadd(95.67, 1078.02, 117.55, 2.72)
pt3dadd(95.5, 1078.02, 117.55, 2.72)
pt3dadd(95.42, 1077.93, 117.55, 2.72)
pt3dadd(95.33, 1077.83, 117.55, 2.72)
pt3dadd(95.17, 1077.83, 117.55, 2.72)
pt3dadd(95.08, 1077.73, 117.55, 2.72)
pt3dadd(95, 1077.64, 117.55, 2.72)
pt3dadd(94.74, 1077.64, 117.55, 2.72)
pt3dadd(94.65, 1077.54, 117.55, 2.72)
pt3dadd(94.57, 1077.44, 117.55, 2.72)
pt3dadd(94.4, 1077.44, 117.55, 2.72)
pt3dadd(94.32, 1077.35, 117.55, 2.72)
pt3dadd(94.23, 1077.25, 117.55, 2.72)
pt3dadd(94.06, 1077.25, 117.55, 2.72)
pt3dadd(93.97, 1077.16, 117.55, 2.72)
pt3dadd(93.81, 1077.06, 117.55, 2.72)
pt3dadd(93.13, 1077.06, 117.55, 2.72)
pt3dadd(93.04, 1077.16, 117.55, 2.72)
pt3dadd(92.96, 1077.25, 117.55, 2.72)
pt3dadd(92.79, 1077.25, 117.55, 2.72)
pt3dadd(92.7, 1077.35, 117.55, 2.72)
pt3dadd(92.62, 1077.44, 117.55, 2.72)
pt3dadd(92.53, 1077.54, 117.55, 2.72)
pt3dadd(92.53, 1077.16, 117.55, 2.72)
pt3dadd(92.45, 1077.06, 117.55, 2.72)
pt3dadd(92.36, 1076.96, 117.55, 2.72)
pt3dadd(92.19, 1076.86, 117.55, 2.72)
pt3dadd(92.02, 1076.77, 117.55, 2.72)
pt3dadd(91.94, 1076.67, 117.55, 2.72)
pt3dadd(91.77, 1076.67, 117.55, 2.72)
pt3dadd(91.6, 1076.57, 117.55, 2.72)
pt3dadd(91.51, 1076.48, 117.55, 2.72)
pt3dadd(91.43, 1076.38, 117.55, 2.72)
pt3dadd(91.34, 1076.29, 117.55, 2.72)
pt3dadd(90.83, 1076.29, 117.55, 2.72)
pt3dadd(90.75, 1076.29, 117.55, 2.72)
pt3dadd(90.58, 1076.19, 117.55, 2.72)
pt3dadd(90.49, 1076.09, 117.55, 2.72)
pt3dadd(90.32, 1075.9, 117.55, 2.72)
pt3dadd(90.07, 1075.9, 117.55, 2.72)
pt3dadd(89.99, 1075.8, 117.55, 2.72)
pt3dadd(89.31, 1075.8, 117.55, 2.72)
pt3dadd(89.14, 1075.61, 117.55, 2.72)
pt3dadd(89.05, 1075.52, 117.55, 2.72)
pt3dadd(88.88, 1075.52, 117.55, 2.72)
pt3dadd(88.79, 1075.42, 117.55, 2.72)
pt3dadd(88.71, 1075.32, 117.55, 2.72)
pt3dadd(88.54, 1075.22, 117.55, 2.72)
pt3dadd(88.46, 1075.13, 117.55, 2.72)
pt3dadd(88.37, 1075.03, 117.55, 2.72)
pt3dadd(88.29, 1074.94, 117.55, 2.72)
pt3dadd(88.11, 1074.94, 117.55, 2.72)
pt3dadd(88.03, 1074.84, 117.55, 2.72)
pt3dadd(87.86, 1074.74, 117.55, 2.72)
}
}
proc shape3d_97() {
dend[66] { pt3dadd(87.52, 1074.74, 117.55, 2.72)
pt3dadd(87.35, 1074.65, 117.55, 2.72)
pt3dadd(87.27, 1074.55, 117.55, 2.72)
pt3dadd(87.01, 1074.55, 117.55, 2.72)
pt3dadd(86.84, 1074.45, 117.55, 2.72)
pt3dadd(86.67, 1074.36, 117.55, 2.72)
pt3dadd(86.5, 1074.36, 117.55, 2.72)
pt3dadd(86.33, 1074.26, 117.55, 2.72)
pt3dadd(86.08, 1074.26, 117.55, 2.72)
pt3dadd(85.91, 1074.17, 117.55, 2.72)
pt3dadd(85.82, 1074.07, 117.55, 2.72)
pt3dadd(85.4, 1074.07, 117.55, 2.72)
pt3dadd(85.31, 1073.97, 117.55, 2.72)
pt3dadd(85.06, 1073.97, 117.55, 2.72)
pt3dadd(85.31, 1073.97, 117.55, 2.38)
pt3dadd(83.53, 1073.97, 117.55, 2.38)
pt3dadd(83.44, 1074.07, 117.55, 2.38)
pt3dadd(83.36, 1074.17, 117.55, 2.38)
pt3dadd(83.11, 1074.17, 117.55, 2.38)
pt3dadd(82.93, 1074.07, 117.55, 2.38)
pt3dadd(82.76, 1073.97, 117.55, 2.38)
pt3dadd(82.68, 1073.88, 117.55, 2.38)
pt3dadd(82.6, 1073.78, 117.55, 2.38)
pt3dadd(82.51, 1073.68, 117.55, 2.38)
pt3dadd(82.43, 1073.58, 117.55, 2.38)
pt3dadd(82.34, 1073.49, 117.55, 2.38)
pt3dadd(82.26, 1073.39, 117.55, 2.38)
pt3dadd(82.17, 1073.3, 117.55, 2.38)
pt3dadd(82.09, 1073.2, 117.55, 2.38)
pt3dadd(82, 1073.1, 117.55, 2.38)
pt3dadd(81.92, 1073.01, 117.55, 2.38)
pt3dadd(81.83, 1072.91, 117.55, 2.38)
pt3dadd(81.66, 1072.72, 117.55, 2.38)
pt3dadd(81.58, 1072.62, 117.55, 2.38)
pt3dadd(81.49, 1072.53, 117.55, 2.38)
pt3dadd(81.41, 1072.43, 117.55, 2.38)
pt3dadd(81.24, 1072.33, 117.55, 2.38)
pt3dadd(81.15, 1072.23, 117.55, 2.38)
pt3dadd(81.07, 1072.14, 117.55, 2.38)
pt3dadd(80.98, 1072.04, 117.55, 2.38)
pt3dadd(80.9, 1071.94, 117.55, 2.38)
pt3dadd(80.81, 1071.85, 117.55, 2.38)
pt3dadd(80.73, 1071.75, 117.55, 2.38)
pt3dadd(80.64, 1071.66, 117.55, 2.38)
pt3dadd(80.56, 1071.56, 117.55, 2.38)
pt3dadd(80.47, 1071.37, 117.55, 2.38)
pt3dadd(80.3, 1071.37, 117.55, 2.38)
pt3dadd(80.22, 1071.27, 117.55, 2.38)
pt3dadd(80.13, 1071.18, 117.55, 2.38)
pt3dadd(80.05, 1071.08, 117.55, 2.38)
pt3dadd(79.96, 1070.89, 117.55, 2.38)
pt3dadd(79.79, 1070.79, 117.55, 2.38)
pt3dadd(79.71, 1070.69, 117.55, 2.38)
pt3dadd(79.63, 1070.59, 117.55, 2.38)
pt3dadd(79.37, 1070.59, 117.55, 2.38)
pt3dadd(79.29, 1070.5, 117.55, 2.38)
pt3dadd(79.03, 1070.5, 117.55, 2.38)
pt3dadd(78.94, 1070.4, 117.55, 2.38)
pt3dadd(78.61, 1070.4, 117.55, 2.38)
pt3dadd(78.43, 1070.31, 117.55, 2.38)
pt3dadd(78.35, 1070.21, 117.55, 2.38)
pt3dadd(78.1, 1070.21, 117.55, 2.38)
pt3dadd(78.61, 1070.02, 117.55, 2.38)
pt3dadd(78.52, 1070.21, 117.55, 2.38)
pt3dadd(78.35, 1070.31, 117.55, 2.38)
pt3dadd(78.26, 1070.4, 117.55, 2.38)
pt3dadd(78.18, 1070.5, 117.55, 2.38)
pt3dadd(78.1, 1070.59, 117.55, 2.38)
pt3dadd(77.93, 1070.59, 117.55, 2.38)
pt3dadd(77.84, 1070.69, 117.55, 2.38)
pt3dadd(77.75, 1070.89, 117.55, 2.38)
pt3dadd(77.67, 1070.98, 117.55, 2.38)
pt3dadd(77.58, 1071.08, 117.55, 2.38)
pt3dadd(77.5, 1071.18, 117.55, 2.38)
pt3dadd(77.33, 1071.18, 117.55, 2.38)
pt3dadd(77.25, 1071.27, 117.55, 2.38)
pt3dadd(76.82, 1071.27, 117.55, 2.38)
pt3dadd(76.65, 1071.18, 117.55, 2.38)
pt3dadd(76.57, 1071.08, 117.55, 2.38)
pt3dadd(76.48, 1070.98, 117.55, 2.38)
pt3dadd(76.23, 1070.98, 117.55, 2.38)
pt3dadd(76.14, 1070.89, 117.55, 2.38)
pt3dadd(75.97, 1070.79, 117.55, 2.38)
pt3dadd(75.8, 1070.69, 117.55, 2.38)
pt3dadd(75.72, 1070.59, 117.55, 2.38)
pt3dadd(75.55, 1070.59, 117.55, 2.38)
pt3dadd(75.46, 1070.5, 117.55, 2.38)
pt3dadd(75.21, 1070.5, 117.55, 2.38)
pt3dadd(75.04, 1070.4, 117.55, 2.38)
pt3dadd(74.7, 1070.4, 117.55, 2.38)
}
dend[67] {pt3dclear()
pt3dadd(181.31, 713.15, 117.55, 4.08)
pt3dadd(184.03, 715.99, 117.55, 4.08)
pt3dadd(184.2, 717.88, 117.55, 4.08)
pt3dadd(183.52, 720.91, 117.55, 4.08)
pt3dadd(183.26, 722.7, 117.55, 3.74)
pt3dadd(183.6, 724.67, 117.55, 3.74)
pt3dadd(184.54, 726.84, 117.55, 3.4)
pt3dadd(185.47, 729.98, 117.55, 3.4)
pt3dadd(185.73, 732.34, 117.55, 3.4)
pt3dadd(184.96, 733.35, 117.55, 3.4)
pt3dadd(184.54, 733.79, 117.55, 3.4)
}
dend[68] {pt3dclear()
pt3dadd(214.16, 641.78, 117.55, 6.11)
pt3dadd(213.61, 642.54, 117.55, 6.11)
pt3dadd(213.7, 642.64, 117.55, 6.11)
pt3dadd(213.78, 642.84, 117.55, 6.11)
pt3dadd(213.78, 643.32, 117.55, 6.11)
pt3dadd(213.87, 643.41, 117.55, 6.11)
pt3dadd(213.95, 643.51, 117.55, 6.11)
pt3dadd(213.95, 643.7, 117.55, 6.11)
pt3dadd(214.04, 643.8, 117.55, 6.11)
pt3dadd(214.04, 643.99, 117.55, 6.11)
pt3dadd(214.12, 644.09, 117.55, 6.11)
pt3dadd(214.21, 644.28, 117.55, 6.11)
pt3dadd(214.29, 644.38, 117.55, 6.11)
pt3dadd(214.38, 644.47, 117.55, 6.11)
pt3dadd(214.46, 644.76, 117.55, 6.11)
pt3dadd(214.55, 644.86, 117.55, 6.11)
pt3dadd(214.63, 644.96, 117.55, 6.11)
pt3dadd(214.63, 645.15, 117.55, 6.11)
pt3dadd(214.71, 645.24, 117.55, 6.11)
pt3dadd(214.8, 645.34, 117.55, 6.11)
pt3dadd(214.8, 645.53, 117.55, 6.11)
pt3dadd(214.88, 645.63, 117.55, 6.11)
pt3dadd(214.88, 645.92, 117.55, 6.11)
pt3dadd(214.97, 646.11, 117.55, 6.11)
pt3dadd(214.97, 646.4, 117.55, 6.11)
pt3dadd(215.05, 646.59, 117.55, 6.11)
pt3dadd(215.05, 646.98, 117.55, 6.11)
pt3dadd(215.14, 647.17, 117.55, 6.11)
pt3dadd(215.23, 647.27, 117.55, 6.11)
pt3dadd(215.23, 647.66, 117.55, 6.11)
pt3dadd(215.31, 647.75, 117.55, 6.11)
pt3dadd(215.31, 648.23, 117.55, 6.11)
pt3dadd(215.4, 648.33, 117.55, 6.11)
pt3dadd(215.4, 648.53, 117.55, 6.11)
pt3dadd(215.48, 648.72, 117.55, 6.11)
pt3dadd(215.57, 648.91, 117.55, 6.11)
pt3dadd(215.57, 649.1, 117.55, 6.11)
pt3dadd(215.65, 649.2, 117.55, 6.11)
pt3dadd(215.65, 649.49, 117.55, 6.11)
pt3dadd(215.74, 649.68, 117.55, 6.11)
pt3dadd(215.74, 650.26, 117.55, 6.11)
pt3dadd(215.82, 650.36, 117.55, 6.11)
pt3dadd(215.82, 651.03, 117.55, 6.11)
pt3dadd(215.9, 651.13, 117.55, 6.11)
pt3dadd(215.9, 651.52, 117.55, 6.11)
pt3dadd(215.99, 651.61, 117.55, 6.11)
pt3dadd(215.99, 652.09, 117.55, 6.11)
pt3dadd(216.07, 652.19, 117.55, 6.11)
pt3dadd(216.07, 652.77, 117.55, 6.11)
pt3dadd(216.16, 652.86, 117.55, 6.11)
pt3dadd(216.16, 653.54, 117.55, 6.11)
pt3dadd(216.24, 653.73, 117.55, 6.11)
pt3dadd(216.24, 654.22, 117.55, 6.11)
pt3dadd(216.33, 654.31, 117.55, 6.11)
pt3dadd(216.33, 654.79, 117.55, 6.11)
pt3dadd(216.41, 654.89, 117.55, 6.11)
pt3dadd(216.41, 655.08, 117.55, 6.11)
pt3dadd(216.5, 655.28, 117.55, 6.11)
pt3dadd(216.59, 655.37, 117.55, 6.11)
pt3dadd(216.59, 655.85, 117.55, 6.11)
pt3dadd(216.67, 655.95, 117.55, 6.11)
pt3dadd(216.67, 656.53, 117.55, 6.11)
pt3dadd(216.76, 656.63, 117.55, 6.11)
pt3dadd(217.05, 656.64, 117.55, 6.11)
}
dend[69] {pt3dclear()
pt3dadd(217.05, 656.64, 117.55, 6.11)
pt3dadd(216.76, 657.11, 117.55, 6.11)
pt3dadd(216.84, 657.3, 117.55, 6.11)
pt3dadd(216.93, 657.4, 117.55, 6.11)
pt3dadd(216.93, 660.58, 117.55, 6.11)
pt3dadd(217.01, 660.68, 117.55, 6.11)
pt3dadd(217.01, 660.97, 117.55, 6.11)
pt3dadd(217.1, 661.06, 117.55, 6.11)
pt3dadd(217.18, 661.16, 117.55, 6.11)
pt3dadd(217.26, 661.26, 117.55, 6.11)
pt3dadd(217.26, 661.45, 117.55, 6.11)
pt3dadd(217.35, 661.64, 117.55, 6.11)
pt3dadd(217.43, 661.84, 117.55, 6.11)
pt3dadd(217.52, 661.93, 117.55, 6.11)
pt3dadd(217.52, 662.13, 117.55, 6.11)
pt3dadd(217.6, 662.22, 117.55, 6.11)
pt3dadd(217.69, 662.41, 117.55, 6.11)
pt3dadd(217.77, 662.61, 117.55, 6.11)
pt3dadd(217.86, 662.7, 117.55, 6.11)
pt3dadd(217.94, 662.9, 117.55, 6.11)
pt3dadd(217.94, 663.38, 117.55, 6.11)
pt3dadd(218.2, 664.05, 117.55, 6.11)
pt3dadd(218.28, 664.15, 117.55, 6.11)
pt3dadd(218.37, 664.24, 117.55, 6.11)
pt3dadd(218.45, 664.34, 117.55, 6.11)
pt3dadd(218.45, 666.08, 117.55, 6.11)
pt3dadd(218.37, 666.17, 117.55, 6.11)
pt3dadd(218.37, 667.14, 117.55, 6.11)
pt3dadd(218.28, 667.33, 117.55, 6.11)
pt3dadd(218.2, 667.43, 117.55, 6.11)
pt3dadd(218.2, 669.26, 117.55, 6.11)
pt3dadd(218.28, 669.36, 117.55, 6.11)
pt3dadd(218.28, 669.65, 117.55, 6.11)
pt3dadd(218.37, 669.74, 117.55, 6.11)
pt3dadd(218.45, 669.94, 117.55, 6.11)
}
}
proc shape3d_98() {
dend[69] { pt3dadd(218.45, 670.13, 117.55, 6.11)
pt3dadd(218.54, 670.22, 117.55, 6.11)
pt3dadd(218.62, 670.32, 117.55, 6.11)
pt3dadd(218.62, 670.52, 117.55, 6.11)
pt3dadd(218.71, 670.61, 117.55, 6.11)
pt3dadd(218.71, 670.8, 117.55, 6.11)
pt3dadd(218.79, 670.9, 117.55, 6.11)
pt3dadd(218.79, 671.09, 117.55, 6.11)
pt3dadd(218.88, 671.19, 117.55, 6.11)
pt3dadd(218.88, 671.38, 117.55, 6.11)
pt3dadd(218.96, 671.48, 117.55, 6.11)
pt3dadd(219.05, 671.58, 117.55, 6.11)
pt3dadd(219.05, 672.06, 117.55, 6.11)
pt3dadd(219.13, 672.25, 117.55, 6.11)
pt3dadd(219.13, 675.24, 117.55, 6.11)
pt3dadd(219.22, 675.34, 117.55, 6.11)
pt3dadd(219.22, 675.72, 117.55, 6.11)
pt3dadd(219.3, 675.92, 117.55, 6.11)
pt3dadd(219.3, 676.11, 117.55, 6.11)
pt3dadd(219.39, 676.21, 117.55, 6.11)
pt3dadd(219.47, 676.3, 117.55, 6.11)
pt3dadd(219.47, 676.49, 117.55, 6.11)
pt3dadd(219.56, 676.59, 117.55, 6.11)
pt3dadd(219.64, 676.69, 117.55, 6.11)
pt3dadd(219.64, 676.88, 117.55, 6.11)
pt3dadd(219.73, 677.08, 117.55, 6.11)
pt3dadd(219.73, 677.94, 117.55, 6.11)
pt3dadd(219.81, 678.04, 117.55, 6.11)
pt3dadd(219.81, 678.81, 117.55, 6.11)
pt3dadd(219.9, 678.91, 117.55, 6.11)
pt3dadd(219.9, 679.48, 117.55, 6.11)
pt3dadd(219.98, 679.58, 117.55, 6.11)
pt3dadd(219.98, 679.97, 117.55, 6.11)
pt3dadd(220.07, 680.07, 117.55, 6.11)
pt3dadd(220.07, 680.35, 117.55, 6.11)
pt3dadd(220.15, 680.45, 117.55, 6.11)
pt3dadd(220.24, 680.55, 117.55, 6.11)
pt3dadd(220.24, 680.74, 117.55, 6.11)
pt3dadd(220.32, 680.84, 117.55, 6.11)
pt3dadd(220.32, 681.32, 117.55, 6.11)
pt3dadd(220.4, 681.41, 117.55, 6.11)
pt3dadd(220.49, 681.51, 117.55, 6.11)
pt3dadd(220.49, 681.7, 117.55, 6.11)
pt3dadd(220.57, 681.9, 117.55, 6.11)
pt3dadd(220.66, 682.09, 117.55, 6.11)
pt3dadd(220.74, 682.18, 117.55, 6.11)
pt3dadd(220.74, 682.47, 117.55, 6.11)
pt3dadd(220.83, 682.67, 117.55, 6.11)
pt3dadd(220.91, 682.77, 117.55, 6.11)
pt3dadd(220.91, 683.05, 117.55, 6.11)
pt3dadd(221, 683.25, 117.55, 6.11)
pt3dadd(221.09, 683.44, 117.55, 6.11)
pt3dadd(221.09, 683.63, 117.55, 6.11)
pt3dadd(221.17, 683.83, 117.55, 6.11)
pt3dadd(221.26, 683.92, 117.55, 6.11)
pt3dadd(221.26, 684.11, 117.55, 6.11)
pt3dadd(221.34, 684.21, 117.55, 6.11)
pt3dadd(221.43, 684.31, 117.55, 6.11)
pt3dadd(221.43, 685.27, 117.55, 6.11)
pt3dadd(221.51, 685.47, 117.55, 6.11)
pt3dadd(221.51, 685.85, 117.55, 6.11)
pt3dadd(221.6, 686.04, 117.55, 6.11)
pt3dadd(221.6, 686.24, 117.55, 6.11)
pt3dadd(221.68, 686.33, 117.55, 6.11)
pt3dadd(221.68, 687.01, 117.55, 6.11)
pt3dadd(221.76, 687.2, 117.55, 6.11)
pt3dadd(221.85, 687.49, 117.55, 6.11)
pt3dadd(221.93, 687.68, 117.55, 6.11)
pt3dadd(222.02, 687.78, 117.55, 6.11)
pt3dadd(222.1, 687.88, 117.55, 6.11)
pt3dadd(222.1, 688.16, 117.55, 6.11)
pt3dadd(222.19, 688.36, 117.55, 6.11)
pt3dadd(222.19, 688.65, 117.55, 6.11)
pt3dadd(222.27, 688.84, 117.55, 6.11)
pt3dadd(222.27, 689.03, 117.55, 6.11)
pt3dadd(222.36, 689.23, 117.55, 6.11)
pt3dadd(222.36, 689.52, 117.55, 6.11)
pt3dadd(222.45, 689.61, 117.55, 6.11)
pt3dadd(222.45, 689.9, 117.55, 6.11)
pt3dadd(222.53, 690.09, 117.55, 6.11)
pt3dadd(222.61, 690.19, 117.55, 6.11)
pt3dadd(222.61, 690.39, 117.55, 6.11)
pt3dadd(222.7, 690.48, 117.55, 6.11)
pt3dadd(222.7, 690.87, 117.55, 6.11)
pt3dadd(222.78, 690.96, 117.55, 6.11)
pt3dadd(222.78, 691.35, 117.55, 6.11)
pt3dadd(222.87, 691.45, 117.55, 6.11)
pt3dadd(222.87, 691.83, 117.55, 6.11)
pt3dadd(222.95, 692.03, 117.55, 6.11)
pt3dadd(222.95, 693.09, 117.55, 6.11)
pt3dadd(223.04, 693.09, 117.55, 4.76)
pt3dadd(223.12, 693.18, 117.55, 4.76)
pt3dadd(223.21, 693.28, 117.55, 4.76)
pt3dadd(223.29, 693.47, 117.55, 4.76)
pt3dadd(223.38, 693.57, 117.55, 4.76)
pt3dadd(223.46, 693.66, 117.55, 4.76)
pt3dadd(223.55, 693.76, 117.55, 4.76)
pt3dadd(223.63, 693.86, 117.55, 4.76)
pt3dadd(223.63, 694.05, 117.55, 4.76)
pt3dadd(223.72, 694.15, 117.55, 4.76)
pt3dadd(223.8, 694.24, 117.55, 4.76)
pt3dadd(223.89, 694.34, 117.55, 4.76)
pt3dadd(223.97, 694.43, 117.55, 4.76)
pt3dadd(224.06, 694.53, 117.55, 4.76)
pt3dadd(224.14, 694.63, 117.55, 4.76)
pt3dadd(224.14, 695.11, 117.55, 4.76)
pt3dadd(224.23, 695.3, 117.55, 4.76)
pt3dadd(224.31, 695.4, 117.55, 4.76)
pt3dadd(224.31, 695.88, 117.55, 4.76)
pt3dadd(224.65, 696.36, 117.55, 6.11)
pt3dadd(224.65, 697.14, 117.55, 5.77)
pt3dadd(224.65, 697.23, 117.55, 5.77)
pt3dadd(224.74, 697.33, 117.55, 5.77)
pt3dadd(224.74, 697.62, 117.55, 5.77)
pt3dadd(224.82, 697.81, 117.55, 5.77)
pt3dadd(224.82, 698.1, 117.55, 5.77)
pt3dadd(224.91, 698.2, 117.55, 5.77)
pt3dadd(224.91, 698.58, 117.55, 5.77)
pt3dadd(224.99, 698.68, 117.55, 5.77)
pt3dadd(224.99, 698.97, 117.55, 5.77)
pt3dadd(225.08, 699.16, 117.55, 5.77)
pt3dadd(225.16, 699.35, 117.55, 5.77)
pt3dadd(225.16, 699.55, 117.55, 5.77)
pt3dadd(225.24, 699.64, 117.55, 5.77)
pt3dadd(225.24, 699.84, 117.55, 5.77)
pt3dadd(225.33, 700.03, 117.55, 5.77)
pt3dadd(225.41, 700.13, 117.55, 5.77)
pt3dadd(225.41, 700.61, 117.55, 5.77)
pt3dadd(225.5, 700.71, 117.55, 5.77)
pt3dadd(225.5, 701.09, 117.55, 5.77)
pt3dadd(225.59, 701.19, 117.55, 5.77)
pt3dadd(225.59, 701.67, 117.55, 5.77)
pt3dadd(225.67, 701.77, 117.55, 5.77)
pt3dadd(225.67, 702.15, 117.55, 5.77)
pt3dadd(225.76, 702.25, 117.55, 5.77)
pt3dadd(225.76, 702.63, 117.55, 5.77)
pt3dadd(225.84, 702.73, 117.55, 5.77)
pt3dadd(225.84, 702.92, 117.55, 5.77)
pt3dadd(225.93, 703.02, 117.55, 5.77)
pt3dadd(225.93, 703.21, 117.55, 5.77)
pt3dadd(226.01, 703.31, 117.55, 5.77)
pt3dadd(226.01, 703.79, 117.55, 5.77)
pt3dadd(226.1, 703.89, 117.55, 5.77)
pt3dadd(226.1, 705.04, 117.55, 5.77)
pt3dadd(226.18, 705.14, 117.55, 5.77)
pt3dadd(226.18, 705.62, 117.55, 5.77)
pt3dadd(226.26, 705.72, 117.55, 5.77)
pt3dadd(226.35, 705.91, 117.55, 5.77)
pt3dadd(226.43, 706.1, 117.55, 5.77)
pt3dadd(226.52, 706.2, 117.55, 5.77)
pt3dadd(226.6, 706.3, 117.55, 5.77)
pt3dadd(226.69, 706.4, 117.55, 5.77)
pt3dadd(226.77, 706.49, 117.55, 5.77)
pt3dadd(226.77, 706.68, 117.55, 5.77)
pt3dadd(226.86, 706.78, 117.55, 5.77)
pt3dadd(226.95, 706.88, 117.55, 5.77)
pt3dadd(226.95, 707.36, 117.55, 5.77)
pt3dadd(227.03, 707.46, 117.55, 5.77)
pt3dadd(227.03, 707.84, 117.55, 5.77)
pt3dadd(227.12, 707.94, 117.55, 5.77)
pt3dadd(227.12, 708.13, 117.55, 5.77)
pt3dadd(227.2, 708.23, 117.55, 5.77)
pt3dadd(227.2, 708.61, 117.55, 5.77)
pt3dadd(227.29, 708.71, 117.55, 5.77)
pt3dadd(227.29, 709.19, 117.55, 5.77)
pt3dadd(227.37, 709.39, 117.55, 5.77)
pt3dadd(227.37, 709.87, 117.55, 5.77)
pt3dadd(227.46, 709.96, 117.55, 5.77)
pt3dadd(227.54, 710.06, 117.55, 5.77)
pt3dadd(227.54, 710.35, 117.55, 5.77)
pt3dadd(227.63, 710.45, 117.55, 5.77)
pt3dadd(227.71, 710.64, 117.55, 5.77)
pt3dadd(227.79, 710.83, 117.55, 5.77)
pt3dadd(227.88, 710.93, 117.55, 5.77)
pt3dadd(227.88, 711.12, 117.55, 5.77)
pt3dadd(227.96, 711.22, 117.55, 5.77)
pt3dadd(228.05, 711.32, 117.55, 5.77)
pt3dadd(228.05, 711.51, 117.55, 5.77)
pt3dadd(228.13, 711.6, 117.55, 5.77)
pt3dadd(228.13, 711.8, 117.55, 5.77)
pt3dadd(228.22, 711.89, 117.55, 5.77)
pt3dadd(228.3, 711.99, 117.55, 5.77)
pt3dadd(228.39, 712.09, 117.55, 5.77)
pt3dadd(228.47, 712.18, 117.55, 5.77)
pt3dadd(228.56, 712.28, 117.55, 5.77)
pt3dadd(228.56, 712.47, 117.55, 5.77)
pt3dadd(228.64, 712.66, 117.55, 5.77)
pt3dadd(228.73, 712.86, 117.55, 5.77)
pt3dadd(228.81, 712.95, 117.55, 5.77)
pt3dadd(228.81, 713.15, 117.55, 5.77)
pt3dadd(228.9, 713.24, 117.55, 5.77)
pt3dadd(228.9, 713.53, 117.55, 5.77)
pt3dadd(228.98, 713.72, 117.55, 5.77)
pt3dadd(229.07, 713.82, 117.55, 5.77)
pt3dadd(229.07, 714.02, 117.55, 5.77)
pt3dadd(229.15, 714.11, 117.55, 5.77)
pt3dadd(229.24, 714.21, 117.55, 5.77)
pt3dadd(229.32, 714.4, 117.55, 5.77)
pt3dadd(229.32, 714.59, 117.55, 5.77)
pt3dadd(229.41, 714.79, 117.55, 5.77)
}
}
proc shape3d_99() {
dend[69] { pt3dadd(229.66, 714.4, 117.55, 4.76)
pt3dadd(229.66, 714.5, 117.55, 4.76)
pt3dadd(229.75, 714.59, 117.55, 4.76)
pt3dadd(229.83, 714.69, 117.55, 4.76)
pt3dadd(229.92, 714.88, 117.55, 4.76)
pt3dadd(229.92, 715.08, 117.55, 4.76)
pt3dadd(230.09, 715.17, 117.55, 4.76)
pt3dadd(230.09, 715.36, 117.55, 4.76)
pt3dadd(230.17, 715.46, 117.55, 4.76)
pt3dadd(230.17, 715.66, 117.55, 4.76)
pt3dadd(230.26, 715.75, 117.55, 4.76)
pt3dadd(230.34, 715.85, 117.55, 4.76)
pt3dadd(230.43, 715.94, 117.55, 4.76)
pt3dadd(230.6, 716.04, 117.55, 4.76)
pt3dadd(230.6, 716.23, 117.55, 4.76)
pt3dadd(230.76, 716.23, 117.55, 4.76)
pt3dadd(230.76, 716.42, 117.55, 4.76)
pt3dadd(230.85, 716.52, 117.55, 4.76)
pt3dadd(230.85, 716.72, 117.55, 4.76)
pt3dadd(230.93, 716.81, 117.55, 4.76)
pt3dadd(230.93, 717.29, 117.55, 4.76)
pt3dadd(231.02, 717.39, 117.55, 4.76)
pt3dadd(231.1, 717.49, 117.55, 4.76)
pt3dadd(231.19, 717.58, 117.55, 4.76)
pt3dadd(231.27, 717.68, 117.55, 4.76)
pt3dadd(231.36, 717.78, 117.55, 4.76)
pt3dadd(231.45, 717.87, 117.55, 4.76)
pt3dadd(231.53, 717.97, 117.55, 4.76)
pt3dadd(231.62, 718.07, 117.55, 4.76)
pt3dadd(231.62, 718.26, 117.55, 4.76)
pt3dadd(231.7, 718.35, 117.55, 4.76)
pt3dadd(231.79, 718.55, 117.55, 4.76)
pt3dadd(231.87, 718.65, 117.55, 4.76)
pt3dadd(231.96, 718.74, 117.55, 4.76)
pt3dadd(231.96, 718.93, 117.55, 4.76)
pt3dadd(232.04, 719.13, 117.55, 4.76)
pt3dadd(232.04, 719.32, 117.55, 4.76)
pt3dadd(232.13, 719.41, 117.55, 4.76)
pt3dadd(232.21, 719.51, 117.55, 4.76)
pt3dadd(232.21, 719.71, 117.55, 4.76)
pt3dadd(232.29, 719.8, 117.55, 4.76)
pt3dadd(232.38, 719.9, 117.55, 4.76)
pt3dadd(232.46, 719.99, 117.55, 4.76)
pt3dadd(232.55, 720.09, 117.55, 4.76)
pt3dadd(232.63, 720.19, 117.55, 4.76)
pt3dadd(232.72, 720.28, 117.55, 4.76)
pt3dadd(232.8, 720.38, 117.55, 4.76)
pt3dadd(233.23, 721.54, 117.55, 6.79)
pt3dadd(233.31, 721.54, 117.55, 6.79)
pt3dadd(233.4, 721.73, 117.55, 6.79)
pt3dadd(233.23, 720.86, 117.55, 5.77)
pt3dadd(233.31, 720.86, 117.55, 5.77)
pt3dadd(233.4, 720.96, 117.55, 5.77)
pt3dadd(233.48, 721.15, 117.55, 5.77)
pt3dadd(233.57, 721.25, 117.55, 5.77)
pt3dadd(233.65, 721.34, 117.55, 5.77)
pt3dadd(233.74, 721.54, 117.55, 5.77)
pt3dadd(233.82, 721.64, 117.55, 5.77)
pt3dadd(233.91, 721.73, 117.55, 5.77)
pt3dadd(233.99, 721.83, 117.55, 5.77)
pt3dadd(233.99, 722.12, 117.55, 5.77)
pt3dadd(234.08, 722.21, 117.55, 5.77)
pt3dadd(234.16, 722.31, 117.55, 5.77)
pt3dadd(234.25, 722.5, 117.55, 5.77)
pt3dadd(234.33, 722.6, 117.55, 5.77)
pt3dadd(234.33, 722.79, 117.55, 5.77)
pt3dadd(234.42, 722.89, 117.55, 5.77)
pt3dadd(234.5, 723.08, 117.55, 5.77)
pt3dadd(234.59, 723.18, 117.55, 5.77)
pt3dadd(234.67, 723.28, 117.55, 5.77)
pt3dadd(234.76, 723.37, 117.55, 5.77)
pt3dadd(234.84, 723.47, 117.55, 5.77)
pt3dadd(234.93, 723.56, 117.55, 5.77)
pt3dadd(235.01, 723.66, 117.55, 5.77)
pt3dadd(235.1, 723.76, 117.55, 5.77)
pt3dadd(235.1, 723.95, 117.55, 5.77)
pt3dadd(235.27, 723.95, 117.55, 5.77)
pt3dadd(235.27, 724.14, 117.55, 5.77)
pt3dadd(235.35, 724.24, 117.55, 5.77)
pt3dadd(235.52, 724.34, 117.55, 5.77)
pt3dadd(235.6, 724.53, 117.55, 5.77)
pt3dadd(235.69, 724.63, 117.55, 5.77)
pt3dadd(235.77, 724.72, 117.55, 5.77)
pt3dadd(235.86, 724.82, 117.55, 5.77)
pt3dadd(235.95, 725.01, 117.55, 5.77)
pt3dadd(236.03, 725.11, 117.55, 5.77)
pt3dadd(236.12, 725.2, 117.55, 5.77)
pt3dadd(236.2, 725.3, 117.55, 5.77)
pt3dadd(236.29, 725.4, 117.55, 5.77)
pt3dadd(236.37, 725.49, 117.55, 5.77)
pt3dadd(236.46, 725.68, 117.55, 5.77)
pt3dadd(236.63, 725.88, 117.55, 5.77)
pt3dadd(236.71, 725.97, 117.55, 5.77)
pt3dadd(236.79, 726.17, 117.55, 5.77)
pt3dadd(236.88, 726.27, 117.55, 5.77)
pt3dadd(237.05, 726.36, 117.55, 5.77)
pt3dadd(237.13, 726.46, 117.55, 5.77)
pt3dadd(237.22, 726.65, 117.55, 5.77)
pt3dadd(237.3, 726.74, 117.55, 5.77)
pt3dadd(237.39, 726.84, 117.55, 5.77)
pt3dadd(237.48, 726.94, 117.55, 5.77)
pt3dadd(237.56, 727.03, 117.55, 5.77)
pt3dadd(237.65, 727.13, 117.55, 5.77)
pt3dadd(237.73, 727.23, 117.55, 5.77)
pt3dadd(237.82, 727.42, 117.55, 5.77)
pt3dadd(237.9, 727.52, 117.55, 5.77)
pt3dadd(237.99, 727.61, 117.55, 5.77)
pt3dadd(238.15, 727.71, 117.55, 5.77)
pt3dadd(238.24, 727.9, 117.55, 5.77)
pt3dadd(238.32, 728, 117.55, 5.77)
pt3dadd(238.49, 728.1, 117.55, 5.77)
pt3dadd(238.58, 728.19, 117.55, 5.77)
pt3dadd(238.66, 728.29, 117.55, 5.77)
pt3dadd(238.75, 728.39, 117.55, 5.77)
pt3dadd(238.83, 728.48, 117.55, 5.77)
pt3dadd(238.92, 728.58, 117.55, 5.77)
pt3dadd(239, 728.67, 117.55, 5.77)
pt3dadd(239.09, 728.87, 117.55, 5.77)
pt3dadd(239.17, 728.97, 117.55, 5.77)
pt3dadd(239.26, 729.06, 117.55, 5.77)
pt3dadd(239.34, 729.26, 117.55, 5.77)
pt3dadd(239.34, 729.45, 117.55, 5.77)
pt3dadd(239.51, 729.73, 117.55, 5.77)
pt3dadd(239.6, 729.93, 117.55, 5.77)
pt3dadd(239.68, 730.12, 117.55, 5.77)
pt3dadd(239.77, 730.32, 117.55, 5.77)
pt3dadd(239.77, 730.51, 117.55, 5.77)
pt3dadd(239.85, 730.6, 117.55, 5.77)
pt3dadd(239.94, 730.8, 117.55, 5.77)
pt3dadd(240.02, 730.89, 117.55, 5.77)
pt3dadd(240.11, 730.99, 117.55, 5.77)
pt3dadd(240.11, 731.18, 117.55, 5.77)
pt3dadd(240.19, 731.38, 117.55, 5.77)
pt3dadd(240.28, 731.57, 117.55, 5.77)
pt3dadd(240.36, 731.66, 117.55, 5.77)
pt3dadd(240.36, 731.86, 117.55, 5.77)
pt3dadd(240.45, 731.96, 117.55, 5.77)
pt3dadd(240.53, 732.15, 117.55, 5.77)
pt3dadd(240.53, 732.34, 117.55, 5.77)
pt3dadd(240.62, 732.53, 117.55, 5.77)
pt3dadd(240.7, 732.63, 117.55, 5.77)
pt3dadd(240.79, 732.72, 117.55, 5.77)
pt3dadd(240.87, 732.82, 117.55, 5.77)
pt3dadd(240.87, 733.02, 117.55, 5.77)
pt3dadd(241.04, 733.21, 117.55, 5.77)
pt3dadd(241.13, 733.3, 117.55, 5.77)
pt3dadd(241.21, 733.4, 117.55, 5.77)
pt3dadd(241.29, 733.5, 117.55, 5.77)
pt3dadd(241.38, 733.59, 117.55, 5.77)
pt3dadd(241.46, 733.69, 117.55, 5.77)
pt3dadd(241.55, 733.79, 117.55, 5.77)
pt3dadd(241.63, 733.88, 117.55, 5.77)
pt3dadd(241.72, 733.98, 117.55, 5.77)
pt3dadd(241.8, 734.17, 117.55, 5.77)
pt3dadd(241.89, 734.27, 117.55, 5.77)
pt3dadd(241.89, 734.46, 117.55, 5.77)
pt3dadd(241.98, 734.56, 117.55, 5.77)
pt3dadd(241.98, 734.75, 117.55, 5.77)
pt3dadd(242.06, 734.85, 117.55, 5.77)
pt3dadd(242.15, 735.04, 117.55, 5.77)
pt3dadd(242.15, 735.23, 117.55, 5.77)
pt3dadd(242.23, 735.33, 117.55, 5.77)
pt3dadd(242.32, 735.52, 117.55, 5.77)
pt3dadd(242.4, 735.62, 117.55, 5.77)
pt3dadd(242.4, 735.81, 117.55, 5.77)
pt3dadd(242.49, 736.01, 117.55, 5.77)
pt3dadd(242.57, 736.1, 117.55, 5.77)
pt3dadd(242.57, 736.49, 117.55, 5.77)
pt3dadd(242.65, 736.59, 117.55, 5.77)
pt3dadd(242.82, 736.78, 117.55, 5.77)
pt3dadd(242.82, 737.07, 117.55, 5.77)
pt3dadd(242.91, 737.16, 117.55, 5.77)
pt3dadd(243.16, 737.65, 117.55, 6.45)
pt3dadd(243.25, 737.65, 117.55, 6.45)
pt3dadd(243.33, 737.74, 117.55, 6.45)
pt3dadd(243.42, 737.93, 117.55, 6.45)
pt3dadd(243.5, 738.03, 117.55, 6.45)
pt3dadd(243.67, 738.13, 117.55, 6.45)
pt3dadd(243.76, 738.22, 117.55, 6.45)
pt3dadd(243.84, 738.32, 117.55, 6.45)
pt3dadd(243.93, 738.42, 117.55, 6.45)
pt3dadd(244.01, 738.61, 117.55, 6.45)
pt3dadd(244.1, 738.71, 117.55, 6.45)
pt3dadd(244.1, 738.9, 117.55, 6.45)
pt3dadd(244.18, 738.99, 117.55, 6.45)
pt3dadd(244.27, 739.09, 117.55, 6.45)
pt3dadd(244.27, 739.38, 117.55, 6.45)
pt3dadd(244.35, 739.48, 117.55, 6.45)
pt3dadd(244.44, 739.58, 117.55, 6.45)
pt3dadd(244.44, 739.86, 117.55, 6.45)
pt3dadd(244.52, 740.06, 117.55, 6.45)
pt3dadd(244.52, 740.25, 117.55, 6.45)
pt3dadd(244.61, 740.34, 117.55, 6.45)
pt3dadd(244.69, 740.44, 117.55, 6.45)
pt3dadd(244.69, 740.64, 117.55, 6.45)
pt3dadd(244.78, 740.73, 117.55, 6.45)
pt3dadd(244.86, 740.83, 117.55, 6.45)
pt3dadd(244.86, 741.12, 117.55, 6.45)
pt3dadd(244.95, 741.21, 117.55, 6.45)
pt3dadd(245.03, 741.41, 117.55, 6.45)
}
}
proc shape3d_100() {
dend[69] { pt3dadd(245.03, 741.6, 117.55, 6.45)
pt3dadd(245.12, 741.7, 117.55, 6.45)
pt3dadd(245.2, 741.79, 117.55, 6.45)
pt3dadd(245.2, 741.98, 117.55, 6.45)
pt3dadd(245.29, 742.08, 117.55, 6.45)
pt3dadd(245.37, 742.18, 117.55, 6.45)
pt3dadd(245.37, 742.37, 117.55, 6.45)
pt3dadd(245.46, 742.47, 117.55, 6.45)
pt3dadd(245.54, 742.66, 117.55, 6.45)
pt3dadd(245.63, 742.76, 117.55, 6.45)
pt3dadd(245.71, 742.85, 117.55, 6.45)
pt3dadd(245.8, 743.05, 117.55, 6.45)
pt3dadd(245.88, 743.24, 117.55, 6.45)
pt3dadd(245.96, 743.43, 117.55, 6.45)
pt3dadd(246.05, 743.53, 117.55, 6.45)
pt3dadd(246.13, 743.63, 117.55, 6.45)
pt3dadd(246.22, 743.72, 117.55, 6.45)
pt3dadd(246.3, 743.91, 117.55, 6.45)
pt3dadd(246.39, 744.01, 117.55, 6.45)
pt3dadd(246.48, 744.2, 117.55, 6.45)
pt3dadd(246.56, 744.3, 117.55, 6.45)
pt3dadd(246.56, 744.49, 117.55, 6.45)
pt3dadd(246.65, 744.59, 117.55, 6.45)
pt3dadd(246.73, 744.68, 117.55, 6.45)
pt3dadd(246.82, 744.78, 117.55, 6.45)
pt3dadd(246.9, 744.88, 117.55, 6.45)
pt3dadd(246.99, 744.97, 117.55, 6.45)
pt3dadd(247.07, 745.07, 117.55, 6.45)
pt3dadd(247.07, 745.94, 117.55, 6.45)
pt3dadd(247.15, 746.04, 117.55, 6.45)
pt3dadd(247.15, 749.12, 117.55, 6.45)
pt3dadd(247.24, 749.22, 117.55, 6.45)
pt3dadd(247.24, 749.51, 117.55, 6.45)
pt3dadd(247.32, 749.6, 117.55, 6.45)
pt3dadd(247.41, 749.7, 117.55, 6.45)
pt3dadd(247.49, 749.8, 117.55, 6.45)
pt3dadd(247.58, 749.9, 117.55, 6.45)
pt3dadd(247.66, 750.09, 117.55, 6.45)
pt3dadd(247.75, 750.28, 117.55, 6.45)
pt3dadd(247.84, 750.47, 117.55, 6.45)
pt3dadd(247.92, 750.57, 117.55, 6.45)
pt3dadd(248.01, 750.66, 117.55, 6.45)
pt3dadd(248.09, 750.76, 117.55, 6.45)
pt3dadd(248.09, 751.05, 117.55, 6.45)
pt3dadd(248.18, 751.15, 117.55, 6.45)
pt3dadd(248.26, 751.24, 117.55, 6.45)
pt3dadd(248.26, 751.44, 117.55, 6.45)
pt3dadd(248.35, 751.53, 117.55, 6.45)
pt3dadd(248.43, 751.63, 117.55, 6.45)
pt3dadd(248.43, 751.82, 117.55, 6.45)
pt3dadd(248.51, 751.92, 117.55, 6.45)
pt3dadd(248.6, 752.02, 117.55, 6.45)
pt3dadd(248.6, 752.21, 117.55, 6.45)
pt3dadd(248.68, 752.3, 117.55, 6.45)
pt3dadd(248.68, 752.59, 117.55, 6.45)
pt3dadd(248.77, 752.69, 117.55, 6.45)
pt3dadd(248.77, 752.89, 117.55, 6.45)
pt3dadd(248.85, 752.98, 117.55, 6.45)
pt3dadd(248.85, 753.27, 117.55, 6.45)
pt3dadd(248.94, 753.37, 117.55, 6.45)
pt3dadd(248.94, 753.56, 117.55, 6.45)
pt3dadd(249.02, 753.75, 117.55, 6.45)
pt3dadd(249.02, 754.04, 117.55, 6.45)
pt3dadd(249.11, 754.14, 117.55, 6.45)
pt3dadd(249.19, 754.23, 117.55, 6.45)
pt3dadd(249.19, 754.53, 117.55, 6.45)
pt3dadd(249.28, 754.72, 117.55, 6.45)
pt3dadd(249.36, 754.91, 117.55, 6.45)
pt3dadd(249.36, 755.1, 117.55, 6.45)
pt3dadd(249.45, 755.2, 117.55, 6.45)
pt3dadd(249.45, 755.49, 117.55, 6.45)
pt3dadd(249.53, 755.59, 117.55, 6.45)
pt3dadd(249.53, 755.97, 117.55, 6.45)
pt3dadd(249.62, 756.07, 117.55, 6.45)
pt3dadd(249.62, 756.45, 117.55, 6.45)
pt3dadd(249.7, 756.65, 117.55, 6.45)
pt3dadd(249.7, 756.93, 117.55, 6.45)
pt3dadd(249.79, 757.03, 117.55, 6.45)
pt3dadd(249.87, 757.13, 117.55, 6.45)
pt3dadd(249.87, 757.52, 117.55, 6.45)
pt3dadd(249.96, 757.61, 117.55, 6.45)
pt3dadd(250.04, 757.71, 117.55, 6.45)
pt3dadd(250.04, 757.99, 117.55, 6.45)
pt3dadd(250.13, 758.19, 117.55, 6.45)
pt3dadd(250.13, 758.38, 117.55, 6.45)
pt3dadd(250.21, 758.48, 117.55, 6.45)
pt3dadd(250.21, 758.67, 117.55, 6.45)
pt3dadd(250.3, 758.77, 117.55, 6.45)
pt3dadd(250.3, 759.06, 117.55, 6.45)
pt3dadd(250.38, 759.25, 117.55, 6.45)
pt3dadd(250.38, 759.44, 117.55, 6.45)
pt3dadd(250.47, 759.54, 117.55, 6.45)
pt3dadd(250.47, 759.73, 117.55, 6.45)
pt3dadd(250.55, 759.83, 117.55, 6.45)
pt3dadd(250.55, 760.31, 117.55, 6.45)
pt3dadd(250.64, 760.41, 117.55, 6.45)
pt3dadd(250.64, 760.7, 117.55, 6.45)
pt3dadd(250.72, 760.89, 117.55, 6.45)
pt3dadd(250.72, 761.08, 117.55, 6.45)
pt3dadd(250.81, 761.18, 117.55, 6.45)
pt3dadd(250.89, 761.28, 117.55, 6.45)
pt3dadd(250.89, 761.47, 117.55, 6.45)
pt3dadd(250.98, 761.57, 117.55, 6.45)
pt3dadd(250.98, 761.76, 117.55, 6.45)
pt3dadd(251.06, 761.85, 117.55, 6.45)
pt3dadd(251.06, 762.24, 117.55, 6.45)
pt3dadd(251.15, 762.34, 117.55, 6.45)
pt3dadd(251.15, 762.91, 117.55, 6.45)
pt3dadd(251.23, 763.01, 117.55, 6.45)
pt3dadd(251.23, 763.3, 117.55, 6.45)
pt3dadd(251.32, 763.4, 117.55, 6.45)
pt3dadd(251.32, 764.65, 117.55, 6.45)
pt3dadd(251.4, 764.75, 117.55, 6.45)
pt3dadd(251.4, 764.94, 117.55, 6.45)
pt3dadd(251.49, 765.04, 117.55, 6.45)
pt3dadd(251.49, 765.71, 117.55, 6.45)
pt3dadd(252.08, 766.2, 117.55, 6.11)
pt3dadd(252.08, 766.29, 117.55, 6.11)
pt3dadd(252.16, 766.39, 117.55, 6.11)
pt3dadd(252.25, 766.48, 117.55, 6.11)
pt3dadd(252.25, 766.77, 117.55, 6.11)
pt3dadd(252.34, 766.97, 117.55, 6.11)
pt3dadd(252.34, 767.84, 117.55, 6.11)
pt3dadd(252.42, 767.93, 117.55, 6.11)
pt3dadd(252.42, 768.6, 117.55, 6.11)
pt3dadd(252.51, 768.7, 117.55, 6.11)
pt3dadd(252.59, 768.9, 117.55, 6.11)
pt3dadd(252.59, 769.18, 117.55, 6.11)
pt3dadd(252.68, 769.28, 117.55, 6.11)
pt3dadd(252.76, 769.47, 117.55, 6.11)
pt3dadd(252.76, 769.67, 117.55, 6.11)
pt3dadd(252.85, 769.76, 117.55, 6.11)
pt3dadd(252.85, 769.96, 117.55, 6.11)
pt3dadd(252.93, 770.15, 117.55, 6.11)
pt3dadd(253.01, 770.24, 117.55, 6.11)
pt3dadd(253.01, 770.44, 117.55, 6.11)
pt3dadd(253.1, 770.63, 117.55, 6.11)
pt3dadd(253.18, 770.73, 117.55, 6.11)
pt3dadd(253.27, 770.83, 117.55, 6.11)
pt3dadd(253.35, 770.92, 117.55, 6.11)
pt3dadd(253.44, 771.11, 117.55, 6.11)
pt3dadd(253.52, 771.21, 117.55, 6.11)
pt3dadd(253.61, 771.4, 117.55, 6.11)
pt3dadd(253.7, 771.5, 117.55, 6.11)
pt3dadd(253.7, 771.69, 117.55, 6.11)
pt3dadd(253.78, 771.79, 117.55, 6.11)
pt3dadd(253.86, 771.98, 117.55, 6.11)
pt3dadd(253.95, 772.08, 117.55, 6.11)
pt3dadd(253.95, 772.27, 117.55, 6.11)
pt3dadd(254.03, 772.37, 117.55, 6.11)
pt3dadd(254.03, 772.56, 117.55, 6.11)
pt3dadd(254.12, 772.66, 117.55, 6.11)
pt3dadd(254.2, 772.75, 117.55, 6.11)
pt3dadd(254.2, 772.95, 117.55, 6.11)
pt3dadd(254.29, 773.04, 117.55, 6.11)
pt3dadd(254.37, 773.14, 117.55, 6.11)
pt3dadd(254.37, 773.82, 117.55, 6.11)
pt3dadd(254.46, 773.91, 117.55, 6.11)
pt3dadd(254.46, 774.2, 117.55, 6.11)
pt3dadd(254.54, 774.3, 117.55, 6.11)
pt3dadd(254.63, 774.59, 117.55, 6.11)
pt3dadd(254.71, 774.68, 117.55, 6.11)
pt3dadd(254.71, 774.88, 117.55, 6.11)
pt3dadd(254.8, 774.97, 117.55, 6.11)
pt3dadd(254.8, 775.36, 117.55, 6.11)
pt3dadd(254.97, 775.36, 117.55, 6.11)
pt3dadd(254.97, 775.65, 117.55, 6.11)
pt3dadd(255.05, 775.74, 117.55, 6.11)
pt3dadd(255.14, 775.84, 117.55, 6.11)
pt3dadd(255.22, 775.93, 117.55, 6.11)
pt3dadd(255.31, 776.03, 117.55, 6.11)
pt3dadd(255.31, 776.32, 117.55, 6.11)
pt3dadd(255.39, 776.42, 117.55, 6.11)
pt3dadd(255.48, 776.52, 117.55, 6.11)
pt3dadd(255.56, 776.61, 117.55, 6.11)
pt3dadd(255.56, 776.8, 117.55, 6.11)
pt3dadd(255.65, 776.9, 117.55, 6.11)
pt3dadd(255.73, 777.09, 117.55, 6.11)
pt3dadd(255.82, 777.19, 117.55, 6.11)
pt3dadd(255.82, 777.48, 117.55, 6.11)
pt3dadd(255.9, 777.67, 117.55, 6.11)
pt3dadd(255.99, 777.77, 117.55, 6.11)
pt3dadd(255.99, 778.06, 117.55, 6.11)
pt3dadd(256.07, 778.16, 117.55, 6.11)
pt3dadd(256.07, 778.35, 117.55, 6.11)
pt3dadd(256.16, 778.54, 117.55, 6.11)
pt3dadd(256.16, 778.73, 117.55, 6.11)
pt3dadd(256.24, 778.83, 117.55, 6.11)
pt3dadd(256.33, 778.92, 117.55, 6.11)
pt3dadd(256.33, 779.12, 117.55, 6.11)
pt3dadd(256.49, 779.12, 117.55, 6.11)
pt3dadd(256.49, 779.41, 117.55, 6.11)
pt3dadd(256.58, 779.51, 117.55, 6.11)
pt3dadd(256.67, 779.6, 117.55, 6.11)
pt3dadd(256.75, 779.7, 117.55, 6.11)
pt3dadd(256.75, 779.99, 117.55, 6.11)
pt3dadd(256.83, 780.08, 117.55, 6.11)
pt3dadd(256.92, 780.18, 117.55, 6.11)
pt3dadd(256.92, 780.47, 117.55, 6.11)
pt3dadd(257.01, 780.57, 117.55, 6.11)
}
}
proc shape3d_101() {
dend[69] { pt3dadd(257.09, 780.66, 117.55, 6.11)
pt3dadd(257.09, 780.85, 117.55, 6.11)
pt3dadd(257.17, 781.05, 117.55, 6.11)
pt3dadd(257.26, 781.15, 117.55, 6.11)
pt3dadd(257.26, 781.63, 117.55, 6.11)
pt3dadd(257.35, 781.82, 117.55, 6.11)
pt3dadd(257.43, 782.11, 117.55, 6.11)
pt3dadd(257.52, 782.3, 117.55, 6.11)
pt3dadd(257.6, 782.49, 117.55, 6.11)
pt3dadd(257.68, 782.59, 117.55, 6.11)
pt3dadd(257.77, 782.69, 117.55, 6.11)
pt3dadd(257.77, 782.88, 117.55, 6.11)
pt3dadd(257.86, 782.98, 117.55, 6.11)
pt3dadd(257.94, 783.07, 117.55, 6.11)
pt3dadd(258.02, 783.17, 117.55, 6.11)
pt3dadd(258.11, 783.27, 117.55, 6.11)
pt3dadd(258.28, 783.27, 117.55, 6.11)
pt3dadd(258.28, 783.46, 117.55, 6.11)
pt3dadd(258.45, 783.65, 117.55, 6.11)
pt3dadd(258.54, 783.75, 117.55, 6.11)
pt3dadd(258.62, 783.84, 117.55, 6.11)
pt3dadd(258.7, 784.04, 117.55, 6.11)
pt3dadd(258.79, 784.14, 117.55, 6.11)
pt3dadd(258.79, 784.33, 117.55, 6.11)
pt3dadd(258.88, 784.42, 117.55, 6.11)
pt3dadd(258.96, 784.62, 117.55, 6.11)
pt3dadd(258.96, 785, 117.55, 6.11)
pt3dadd(259.04, 785.2, 117.55, 6.11)
pt3dadd(259.13, 785.29, 117.55, 6.11)
pt3dadd(259.13, 785.48, 117.55, 6.11)
pt3dadd(259.21, 785.58, 117.55, 6.11)
pt3dadd(259.3, 785.68, 117.55, 6.11)
pt3dadd(259.3, 785.97, 117.55, 6.11)
pt3dadd(259.38, 786.06, 117.55, 6.11)
pt3dadd(259.47, 785.97, 117.55, 6.11)
pt3dadd(259.64, 785.87, 117.55, 6.11)
pt3dadd(259.72, 785.68, 117.55, 6.11)
pt3dadd(259.81, 785.58, 117.55, 6.11)
pt3dadd(259.89, 785.68, 117.55, 6.11)
pt3dadd(259.81, 785.78, 117.55, 6.11)
pt3dadd(259.72, 785.87, 117.55, 6.11)
pt3dadd(259.72, 786.06, 117.55, 6.11)
pt3dadd(259.64, 786.16, 117.55, 6.11)
pt3dadd(259.55, 786.26, 117.55, 6.11)
pt3dadd(259.47, 786.35, 117.55, 6.11)
pt3dadd(259.47, 787.32, 117.55, 6.11)
pt3dadd(259.55, 787.99, 117.55, 5.43)
pt3dadd(259.55, 788.09, 117.55, 5.43)
pt3dadd(259.64, 788.28, 117.55, 5.43)
pt3dadd(259.64, 788.57, 117.55, 5.43)
pt3dadd(259.72, 788.67, 117.55, 5.43)
pt3dadd(259.72, 789.15, 117.55, 5.43)
pt3dadd(259.81, 789.24, 117.55, 5.43)
pt3dadd(259.89, 789.34, 117.55, 5.43)
pt3dadd(259.89, 789.53, 117.55, 5.43)
pt3dadd(259.98, 789.63, 117.55, 5.43)
pt3dadd(260.06, 789.73, 117.55, 5.43)
pt3dadd(260.06, 789.92, 117.55, 5.43)
pt3dadd(260.23, 789.92, 117.55, 5.43)
pt3dadd(260.23, 790.11, 117.55, 5.43)
pt3dadd(260.32, 790.21, 117.55, 5.43)
pt3dadd(260.4, 790.31, 117.55, 5.43)
pt3dadd(260.49, 790.4, 117.55, 5.43)
pt3dadd(260.49, 790.6, 117.55, 5.43)
pt3dadd(260.57, 790.69, 117.55, 5.43)
pt3dadd(260.66, 790.79, 117.55, 5.43)
pt3dadd(260.74, 790.89, 117.55, 5.43)
pt3dadd(260.74, 791.08, 117.55, 5.43)
pt3dadd(260.83, 791.17, 117.55, 5.43)
pt3dadd(260.91, 791.27, 117.55, 5.43)
pt3dadd(261, 791.47, 117.55, 5.43)
pt3dadd(261, 791.66, 117.55, 5.43)
pt3dadd(261.08, 791.76, 117.55, 5.43)
pt3dadd(261.17, 791.85, 117.55, 5.43)
pt3dadd(261.25, 791.95, 117.55, 5.43)
pt3dadd(261.25, 792.14, 117.55, 5.43)
pt3dadd(261.34, 792.23, 117.55, 5.43)
pt3dadd(261.42, 792.43, 117.55, 5.43)
pt3dadd(261.42, 792.72, 117.55, 5.43)
pt3dadd(261.51, 792.82, 117.55, 5.43)
pt3dadd(261.51, 793.3, 117.55, 5.43)
pt3dadd(261.59, 793.39, 117.55, 5.43)
pt3dadd(261.59, 793.68, 117.55, 5.43)
pt3dadd(261.67, 793.78, 117.55, 5.43)
pt3dadd(261.76, 793.97, 117.55, 5.43)
pt3dadd(261.85, 794.16, 117.55, 5.43)
pt3dadd(261.93, 794.26, 117.55, 5.43)
pt3dadd(261.93, 794.46, 117.55, 5.43)
pt3dadd(262.02, 794.55, 117.55, 5.43)
pt3dadd(262.1, 794.65, 117.55, 5.43)
pt3dadd(262.18, 794.74, 117.55, 5.43)
pt3dadd(262.18, 794.94, 117.55, 5.43)
pt3dadd(262.27, 795.03, 117.55, 5.43)
pt3dadd(262.36, 795.22, 117.55, 5.43)
pt3dadd(262.44, 795.32, 117.55, 5.43)
pt3dadd(262.44, 795.61, 117.55, 5.43)
pt3dadd(262.52, 795.71, 117.55, 5.43)
pt3dadd(262.52, 796.09, 117.55, 5.43)
pt3dadd(262.61, 796.29, 117.55, 5.43)
pt3dadd(262.7, 796.48, 117.55, 5.43)
pt3dadd(262.7, 796.77, 117.55, 5.43)
pt3dadd(262.78, 796.96, 117.55, 5.43)
pt3dadd(262.86, 797.06, 117.55, 5.43)
pt3dadd(262.95, 797.25, 117.55, 5.43)
pt3dadd(263.04, 797.35, 117.55, 5.43)
pt3dadd(263.12, 797.45, 117.55, 5.43)
pt3dadd(263.2, 797.54, 117.55, 5.43)
pt3dadd(263.29, 797.64, 117.55, 5.43)
pt3dadd(263.38, 797.83, 117.55, 5.43)
pt3dadd(263.55, 797.93, 117.55, 5.43)
pt3dadd(263.63, 798.12, 117.55, 5.43)
pt3dadd(263.71, 798.22, 117.55, 5.43)
pt3dadd(263.71, 798.41, 117.55, 5.43)
pt3dadd(263.8, 798.51, 117.55, 5.43)
pt3dadd(263.89, 798.6, 117.55, 5.43)
pt3dadd(263.89, 798.79, 117.55, 5.43)
pt3dadd(263.97, 798.89, 117.55, 5.43)
pt3dadd(264.05, 798.99, 117.55, 5.43)
pt3dadd(264.05, 799.18, 117.55, 5.43)
pt3dadd(264.14, 799.28, 117.55, 5.43)
pt3dadd(264.22, 799.37, 117.55, 5.43)
pt3dadd(264.39, 799.57, 117.55, 5.43)
pt3dadd(264.48, 799.76, 117.55, 5.43)
pt3dadd(264.56, 799.85, 117.55, 5.43)
pt3dadd(264.65, 799.95, 117.55, 5.43)
pt3dadd(264.73, 800.15, 117.55, 5.43)
pt3dadd(264.82, 800.34, 117.55, 5.43)
pt3dadd(264.9, 800.43, 117.55, 5.43)
pt3dadd(265.07, 800.63, 117.55, 5.43)
pt3dadd(265.16, 800.72, 117.55, 5.43)
pt3dadd(265.24, 800.82, 117.55, 5.43)
pt3dadd(265.24, 801.01, 117.55, 5.43)
pt3dadd(265.33, 801.11, 117.55, 5.43)
pt3dadd(265.41, 801.3, 117.55, 5.43)
pt3dadd(265.5, 801.4, 117.55, 5.43)
pt3dadd(265.58, 801.59, 117.55, 5.43)
pt3dadd(265.67, 801.69, 117.55, 5.43)
pt3dadd(265.75, 801.78, 117.55, 5.43)
pt3dadd(265.75, 801.98, 117.55, 5.43)
pt3dadd(265.84, 802.08, 117.55, 5.43)
pt3dadd(265.92, 802.27, 117.55, 5.43)
pt3dadd(265.92, 802.46, 117.55, 5.43)
pt3dadd(266.01, 802.56, 117.55, 5.43)
pt3dadd(266.09, 802.75, 117.55, 5.43)
pt3dadd(266.18, 802.84, 117.55, 5.43)
pt3dadd(266.18, 803.04, 117.55, 5.43)
pt3dadd(266.26, 803.14, 117.55, 5.43)
pt3dadd(266.35, 803.33, 117.55, 5.43)
pt3dadd(266.43, 803.42, 117.55, 5.43)
pt3dadd(266.52, 803.62, 117.55, 5.43)
pt3dadd(266.6, 803.71, 117.55, 5.43)
pt3dadd(266.69, 803.81, 117.55, 5.43)
pt3dadd(266.77, 803.91, 117.55, 5.43)
pt3dadd(266.77, 804.1, 117.55, 5.43)
pt3dadd(266.94, 804.2, 117.55, 5.43)
pt3dadd(267.02, 804.39, 117.55, 5.43)
pt3dadd(267.11, 804.48, 117.55, 5.43)
pt3dadd(267.2, 804.58, 117.55, 5.43)
pt3dadd(267.28, 804.68, 117.55, 5.43)
pt3dadd(267.36, 804.78, 117.55, 5.43)
pt3dadd(267.45, 804.87, 117.55, 5.43)
pt3dadd(267.45, 805.07, 117.55, 5.43)
pt3dadd(267.54, 805.16, 117.55, 5.43)
pt3dadd(267.62, 805.26, 117.55, 5.43)
pt3dadd(267.7, 805.35, 117.55, 5.43)
pt3dadd(267.79, 805.45, 117.55, 5.43)
pt3dadd(267.88, 805.55, 117.55, 5.43)
pt3dadd(267.88, 805.84, 117.55, 5.43)
pt3dadd(267.96, 805.93, 117.55, 5.43)
pt3dadd(268.05, 806.03, 117.55, 5.43)
pt3dadd(268.13, 806.22, 117.55, 5.43)
pt3dadd(268.21, 806.41, 117.55, 5.43)
pt3dadd(268.21, 807.09, 117.55, 5.43)
pt3dadd(268.3, 807.18, 117.55, 5.43)
pt3dadd(268.3, 807.57, 117.55, 5.43)
pt3dadd(268.39, 807.67, 117.55, 5.43)
pt3dadd(268.39, 807.86, 117.55, 5.43)
pt3dadd(268.47, 807.96, 117.55, 5.43)
pt3dadd(268.47, 808.15, 117.55, 5.43)
pt3dadd(268.55, 808.25, 117.55, 5.43)
pt3dadd(268.55, 808.63, 117.55, 5.43)
pt3dadd(268.64, 808.83, 117.55, 5.43)
pt3dadd(268.73, 808.92, 117.55, 5.43)
pt3dadd(268.73, 809.11, 117.55, 5.43)
pt3dadd(268.81, 809.21, 117.55, 5.43)
pt3dadd(268.89, 809.31, 117.55, 5.43)
pt3dadd(268.98, 809.41, 117.55, 5.43)
pt3dadd(269.07, 809.6, 117.55, 5.43)
pt3dadd(269.15, 809.69, 117.55, 5.43)
pt3dadd(269.15, 809.89, 117.55, 5.43)
pt3dadd(269.32, 809.98, 117.55, 5.43)
pt3dadd(269.4, 810.08, 117.55, 5.43)
pt3dadd(269.49, 810.27, 117.55, 5.43)
pt3dadd(269.57, 810.37, 117.55, 5.43)
pt3dadd(269.66, 810.47, 117.55, 5.43)
pt3dadd(269.66, 810.66, 117.55, 5.43)
pt3dadd(269.74, 810.85, 117.55, 5.43)
pt3dadd(269.74, 811.04, 117.55, 5.43)
pt3dadd(269.83, 811.14, 117.55, 5.43)
pt3dadd(269.83, 811.33, 117.55, 5.43)
}
}
proc shape3d_102() {
dend[69] { pt3dadd(269.91, 811.43, 117.55, 5.43)
pt3dadd(270, 811.53, 117.55, 5.43)
pt3dadd(270, 811.72, 117.55, 5.43)
pt3dadd(270.08, 811.82, 117.55, 5.43)
pt3dadd(270.17, 812.01, 117.55, 5.43)
pt3dadd(270.17, 812.4, 117.55, 5.43)
pt3dadd(270.25, 812.49, 117.55, 5.43)
pt3dadd(270.25, 812.68, 117.55, 5.43)
pt3dadd(270.34, 812.78, 117.55, 5.43)
pt3dadd(270.34, 812.97, 117.55, 5.43)
pt3dadd(270.42, 813.26, 117.55, 5.43)
pt3dadd(270.51, 813.36, 117.55, 5.43)
pt3dadd(270.59, 813.55, 117.55, 5.43)
pt3dadd(270.59, 813.74, 117.55, 5.43)
pt3dadd(270.76, 813.46, 117.55, 5.43)
pt3dadd(270.85, 813.55, 117.55, 5.43)
pt3dadd(270.93, 813.65, 117.55, 5.43)
pt3dadd(270.93, 813.84, 117.55, 5.43)
pt3dadd(271.02, 813.94, 117.55, 5.43)
pt3dadd(271.02, 816.83, 117.55, 5.43)
pt3dadd(271.1, 816.93, 117.55, 5.43)
pt3dadd(271.1, 817.12, 117.55, 5.43)
pt3dadd(271.19, 817.22, 117.55, 5.43)
pt3dadd(271.27, 817.31, 117.55, 5.43)
pt3dadd(271.27, 817.79, 117.55, 5.43)
pt3dadd(271.36, 817.89, 117.55, 5.43)
pt3dadd(271.44, 817.99, 117.55, 5.43)
pt3dadd(271.44, 818.18, 117.55, 5.43)
pt3dadd(271.53, 818.28, 117.55, 5.43)
pt3dadd(271.61, 818.38, 117.55, 5.43)
pt3dadd(271.7, 818.47, 117.55, 5.43)
pt3dadd(271.78, 818.57, 117.55, 5.43)
pt3dadd(271.87, 818.66, 117.55, 5.43)
pt3dadd(271.95, 818.76, 117.55, 5.43)
pt3dadd(272.04, 818.86, 117.55, 5.43)
pt3dadd(272.12, 818.95, 117.55, 5.43)
pt3dadd(272.12, 819.15, 117.55, 5.43)
pt3dadd(272.2, 819.24, 117.55, 5.43)
pt3dadd(272.29, 819.34, 117.55, 5.43)
pt3dadd(272.38, 819.43, 117.55, 5.43)
pt3dadd(272.38, 819.63, 117.55, 5.43)
pt3dadd(272.46, 819.72, 117.55, 5.43)
pt3dadd(272.55, 819.82, 117.55, 5.43)
pt3dadd(272.63, 819.92, 117.55, 5.43)
pt3dadd(272.71, 820.02, 117.55, 5.43)
pt3dadd(272.8, 820.11, 117.55, 5.43)
pt3dadd(272.8, 823.97, 117.55, 5.43)
pt3dadd(272.71, 824.07, 117.55, 5.43)
pt3dadd(272.71, 828.11, 117.55, 5.43)
pt3dadd(272.8, 828.21, 117.55, 5.43)
pt3dadd(272.8, 829.18, 117.55, 5.43)
pt3dadd(272.89, 829.27, 117.55, 5.43)
pt3dadd(272.89, 829.47, 117.55, 5.43)
pt3dadd(272.97, 829.56, 117.55, 5.43)
pt3dadd(272.97, 832.17, 117.55, 5.43)
pt3dadd(273.05, 832.26, 117.55, 5.43)
pt3dadd(273.05, 832.84, 117.55, 5.43)
pt3dadd(273.14, 832.94, 117.55, 5.43)
pt3dadd(273.23, 833.03, 117.55, 5.43)
pt3dadd(273.31, 833.13, 117.55, 5.43)
pt3dadd(273.39, 833.23, 117.55, 5.43)
pt3dadd(273.39, 837.09, 117.55, 5.43)
pt3dadd(273.48, 837.18, 117.55, 5.43)
pt3dadd(273.48, 837.76, 117.55, 5.43)
pt3dadd(273.57, 837.86, 117.55, 5.43)
pt3dadd(273.65, 837.95, 117.55, 5.43)
pt3dadd(273.65, 840.17, 117.55, 5.43)
pt3dadd(273.57, 840.36, 117.55, 5.43)
pt3dadd(273.57, 843.65, 117.55, 5.43)
pt3dadd(273.48, 843.74, 117.55, 5.43)
pt3dadd(273.48, 846.15, 117.55, 5.43)
pt3dadd(273.57, 846.25, 117.55, 5.43)
pt3dadd(273.57, 846.44, 117.55, 5.43)
pt3dadd(273.65, 846.54, 117.55, 5.43)
pt3dadd(273.65, 846.92, 117.55, 5.43)
pt3dadd(273.73, 847.02, 117.55, 5.43)
pt3dadd(273.73, 847.7, 117.55, 5.43)
pt3dadd(273.82, 847.79, 117.55, 5.43)
pt3dadd(273.9, 847.89, 117.55, 5.43)
pt3dadd(273.99, 847.98, 117.55, 5.43)
pt3dadd(274.08, 848.08, 117.55, 5.43)
pt3dadd(274.16, 848.18, 117.55, 5.43)
pt3dadd(274.75, 848.18, 117.55, 5.43)
pt3dadd(274.67, 848.08, 117.55, 5.43)
pt3dadd(274.58, 847.98, 117.55, 5.43)
pt3dadd(274.42, 847.98, 117.55, 5.43)
pt3dadd(274.33, 847.89, 117.55, 5.43)
pt3dadd(274.08, 847.79, 117.55, 5.43)
pt3dadd(273.82, 847.7, 117.55, 5.43)
pt3dadd(273.65, 847.6, 117.55, 5.43)
pt3dadd(273.65, 849.24, 117.55, 5.43)
pt3dadd(273.57, 849.34, 117.55, 5.43)
pt3dadd(273.57, 849.63, 117.55, 5.43)
pt3dadd(273.48, 849.72, 117.55, 5.43)
pt3dadd(273.48, 849.91, 117.55, 5.43)
pt3dadd(273.31, 850.01, 117.55, 5.43)
pt3dadd(273.23, 850.11, 117.55, 5.43)
pt3dadd(273.14, 850.3, 117.55, 5.43)
pt3dadd(273.05, 850.4, 117.55, 5.43)
pt3dadd(273.05, 850.68, 117.55, 5.43)
pt3dadd(272.97, 850.78, 117.55, 5.43)
pt3dadd(272.89, 850.97, 117.55, 5.43)
pt3dadd(272.8, 851.07, 117.55, 5.43)
pt3dadd(272.8, 852.13, 117.55, 5.43)
pt3dadd(272.71, 852.23, 117.55, 5.43)
pt3dadd(272.63, 852.33, 117.55, 5.43)
pt3dadd(272.55, 852.42, 117.55, 5.43)
pt3dadd(272.46, 852.52, 117.55, 5.43)
pt3dadd(272.38, 852.61, 117.55, 5.43)
pt3dadd(272.29, 852.71, 117.55, 5.43)
pt3dadd(272.2, 852.9, 117.55, 5.43)
pt3dadd(272.2, 855.03, 117.55, 5.43)
pt3dadd(272.29, 855.12, 117.55, 5.43)
pt3dadd(272.29, 855.7, 117.55, 5.43)
pt3dadd(272.2, 855.51, 117.55, 4.76)
pt3dadd(272.2, 856.66, 117.55, 4.76)
pt3dadd(272.29, 856.76, 117.55, 4.76)
pt3dadd(272.38, 856.86, 117.55, 4.76)
pt3dadd(272.46, 856.96, 117.55, 4.76)
pt3dadd(272.55, 857.05, 117.55, 4.76)
pt3dadd(272.63, 857.15, 117.55, 4.76)
pt3dadd(272.8, 857.92, 117.55, 5.43)
pt3dadd(272.8, 861.01, 117.55, 5.43)
pt3dadd(272.8, 860.72, 117.55, 5.43)
pt3dadd(272.71, 860.52, 117.55, 5.43)
pt3dadd(272.55, 860.23, 117.55, 5.43)
pt3dadd(272.46, 860.14, 117.55, 5.43)
pt3dadd(272.38, 859.95, 117.55, 5.43)
pt3dadd(272.29, 860.04, 117.55, 5.43)
pt3dadd(272.29, 860.81, 117.55, 5.43)
pt3dadd(272.38, 860.91, 117.55, 5.43)
pt3dadd(272.46, 861.01, 117.55, 5.43)
pt3dadd(272.55, 861.2, 117.55, 5.43)
pt3dadd(272.63, 861.39, 117.55, 5.43)
pt3dadd(272.71, 861.49, 117.55, 5.43)
pt3dadd(272.71, 861.68, 117.55, 5.43)
pt3dadd(272.8, 861.78, 117.55, 5.43)
pt3dadd(272.89, 861.87, 117.55, 5.43)
pt3dadd(273.05, 861.97, 117.55, 5.43)
pt3dadd(273.14, 862.07, 117.55, 5.43)
pt3dadd(273.14, 862.26, 117.55, 5.43)
pt3dadd(273.23, 862.35, 117.55, 5.43)
pt3dadd(273.31, 862.45, 117.55, 5.43)
pt3dadd(273.31, 862.65, 117.55, 5.43)
pt3dadd(273.39, 862.84, 117.55, 5.43)
pt3dadd(273.39, 863.03, 117.55, 5.43)
pt3dadd(273.48, 863.22, 117.55, 5.43)
pt3dadd(273.48, 863.51, 117.55, 5.43)
pt3dadd(273.57, 863.61, 117.55, 5.43)
pt3dadd(273.65, 863.71, 117.55, 5.43)
pt3dadd(273.65, 864.48, 117.55, 5.43)
pt3dadd(273.73, 864.67, 117.55, 5.43)
pt3dadd(273.82, 864.96, 117.55, 5.43)
pt3dadd(273.82, 865.15, 117.55, 5.43)
pt3dadd(273.9, 865.25, 117.55, 5.43)
pt3dadd(273.9, 865.64, 117.55, 5.43)
pt3dadd(273.99, 865.83, 117.55, 5.43)
pt3dadd(273.99, 866.02, 117.55, 5.43)
pt3dadd(274.08, 866.12, 117.55, 5.43)
pt3dadd(274.08, 866.31, 117.55, 5.43)
pt3dadd(274.16, 866.41, 117.55, 5.43)
pt3dadd(274.24, 866.5, 117.55, 5.43)
pt3dadd(274.24, 866.7, 117.55, 5.43)
pt3dadd(274.33, 866.79, 117.55, 5.43)
pt3dadd(274.42, 866.98, 117.55, 5.43)
pt3dadd(274.58, 867.18, 117.55, 5.43)
pt3dadd(274.58, 867.37, 117.55, 5.43)
pt3dadd(275.01, 867.57, 117.55, 5.43)
pt3dadd(275.01, 869.59, 117.55, 5.43)
pt3dadd(274.92, 869.68, 117.55, 5.43)
pt3dadd(274.84, 869.88, 117.55, 5.43)
pt3dadd(274.75, 870.07, 117.55, 5.43)
pt3dadd(274.58, 870.27, 117.55, 5.43)
pt3dadd(274.5, 870.46, 117.55, 5.43)
pt3dadd(274.42, 870.65, 117.55, 5.43)
pt3dadd(274.33, 870.84, 117.55, 5.43)
pt3dadd(274.24, 870.94, 117.55, 5.43)
pt3dadd(274.24, 871.91, 117.55, 5.43)
pt3dadd(274.16, 872, 117.55, 5.43)
pt3dadd(274.16, 873.54, 117.55, 5.43)
pt3dadd(274.08, 873.74, 117.55, 5.43)
pt3dadd(274.08, 875.96, 117.55, 5.43)
pt3dadd(274.16, 876.05, 117.55, 5.43)
pt3dadd(274.16, 876.82, 117.55, 5.43)
pt3dadd(274.16, 876.34, 117.55, 5.43)
pt3dadd(273.99, 876.05, 117.55, 5.43)
pt3dadd(273.9, 875.96, 117.55, 5.43)
pt3dadd(273.9, 875.47, 117.55, 5.43)
pt3dadd(273.82, 875.28, 117.55, 5.43)
pt3dadd(273.73, 875.09, 117.55, 5.43)
pt3dadd(273.73, 874.6, 117.55, 5.43)
pt3dadd(273.73, 875.09, 117.55, 5.43)
pt3dadd(273.82, 875.18, 117.55, 5.43)
pt3dadd(273.9, 875.28, 117.55, 5.43)
pt3dadd(273.99, 875.38, 117.55, 5.43)
pt3dadd(273.99, 875.66, 117.55, 5.43)
pt3dadd(274.08, 875.86, 117.55, 5.43)
pt3dadd(274.08, 878.27, 117.55, 5.43)
pt3dadd(274.24, 878.56, 117.55, 5.43)
pt3dadd(274.42, 878.66, 117.55, 5.43)
}
}
proc shape3d_103() {
dend[69] { pt3dadd(274.5, 878.75, 117.55, 5.43)
pt3dadd(274.58, 878.95, 117.55, 5.43)
pt3dadd(274.67, 879.04, 117.55, 5.43)
pt3dadd(274.67, 879.23, 117.55, 5.43)
pt3dadd(274.75, 879.53, 117.55, 5.43)
pt3dadd(274.92, 879.72, 117.55, 5.43)
pt3dadd(275.09, 880.1, 117.55, 5.43)
pt3dadd(275.09, 880.39, 117.55, 5.43)
pt3dadd(275.35, 880.78, 117.55, 5.43)
pt3dadd(275.43, 880.78, 117.55, 5.43)
pt3dadd(275.35, 880.59, 117.55, 5.43)
pt3dadd(275.35, 880.2, 117.55, 5.43)
pt3dadd(275.26, 880.1, 117.55, 5.43)
pt3dadd(275.18, 879.81, 117.55, 5.43)
pt3dadd(275.18, 878.85, 117.55, 5.43)
pt3dadd(275.09, 878.56, 117.55, 5.43)
pt3dadd(274.84, 878.27, 117.55, 5.43)
pt3dadd(274.75, 877.98, 117.55, 5.43)
pt3dadd(274.75, 878.17, 117.55, 5.43)
pt3dadd(274.84, 878.27, 117.55, 5.43)
pt3dadd(274.84, 879.81, 117.55, 5.43)
pt3dadd(274.92, 879.91, 117.55, 5.43)
pt3dadd(274.92, 880.1, 117.55, 5.43)
pt3dadd(275.01, 880.2, 117.55, 5.43)
pt3dadd(275.09, 880.39, 117.55, 5.43)
pt3dadd(275.18, 880.59, 117.55, 5.43)
pt3dadd(275.26, 880.78, 117.55, 5.43)
pt3dadd(275.43, 880.97, 117.55, 5.43)
pt3dadd(275.52, 881.16, 117.55, 5.43)
pt3dadd(275.6, 881.36, 117.55, 5.43)
pt3dadd(275.77, 881.55, 117.55, 5.43)
pt3dadd(275.86, 881.74, 117.55, 5.43)
pt3dadd(275.86, 882.03, 117.55, 5.43)
pt3dadd(275.94, 882.13, 117.55, 5.43)
pt3dadd(275.94, 882.32, 117.55, 5.43)
pt3dadd(276.03, 882.52, 117.55, 5.43)
pt3dadd(276.11, 882.71, 117.55, 5.43)
pt3dadd(276.2, 882.99, 117.55, 5.43)
pt3dadd(276.37, 883.28, 117.55, 5.43)
pt3dadd(276.54, 883.48, 117.55, 5.43)
pt3dadd(276.54, 883.09, 117.55, 5.43)
pt3dadd(276.45, 882.99, 117.55, 5.43)
pt3dadd(276.45, 882.71, 117.55, 5.43)
pt3dadd(276.37, 882.52, 117.55, 5.43)
pt3dadd(276.28, 882.32, 117.55, 5.43)
pt3dadd(276.2, 882.13, 117.55, 5.43)
pt3dadd(276.03, 881.84, 117.55, 5.43)
pt3dadd(275.77, 881.36, 117.55, 5.43)
pt3dadd(275.69, 881.16, 117.55, 5.43)
pt3dadd(275.77, 881.16, 117.55, 5.43)
pt3dadd(275.77, 881.36, 117.55, 5.43)
pt3dadd(275.86, 881.45, 117.55, 5.43)
pt3dadd(275.86, 881.74, 117.55, 5.43)
pt3dadd(275.94, 881.93, 117.55, 5.43)
pt3dadd(275.94, 882.52, 117.55, 5.43)
pt3dadd(276.03, 882.71, 117.55, 5.43)
pt3dadd(276.03, 883.67, 117.55, 5.43)
pt3dadd(276.11, 883.77, 117.55, 5.43)
pt3dadd(276.2, 883.86, 117.55, 5.43)
pt3dadd(276.28, 884.06, 117.55, 5.43)
pt3dadd(276.37, 884.35, 117.55, 5.43)
pt3dadd(276.54, 884.73, 117.55, 5.43)
pt3dadd(276.54, 885.79, 117.55, 5.43)
pt3dadd(276.45, 885.7, 117.55, 5.43)
pt3dadd(276.2, 885.51, 117.55, 5.43)
pt3dadd(276.03, 885.22, 117.55, 5.43)
pt3dadd(275.94, 885.02, 117.55, 5.43)
pt3dadd(276.11, 885.02, 117.55, 5.43)
pt3dadd(276.37, 885.12, 117.55, 5.43)
pt3dadd(276.45, 885.22, 117.55, 5.43)
pt3dadd(276.62, 885.22, 117.55, 5.43)
pt3dadd(276.62, 885.7, 117.55, 5.43)
pt3dadd(276.45, 885.7, 117.55, 5.43)
pt3dadd(276.45, 884.64, 117.55, 5.43)
pt3dadd(276.62, 884.64, 117.55, 5.43)
pt3dadd(276.79, 884.83, 117.55, 5.43)
pt3dadd(276.79, 885.7, 117.55, 5.43)
pt3dadd(276.62, 885.79, 117.55, 5.43)
pt3dadd(276.45, 885.89, 117.55, 5.43)
pt3dadd(276.37, 885.98, 117.55, 5.43)
pt3dadd(276.45, 884.83, 117.55, 4.08)
pt3dadd(276.54, 884.83, 117.55, 4.08)
pt3dadd(276.54, 887.05, 117.55, 4.08)
pt3dadd(276.37, 887.34, 117.55, 4.08)
pt3dadd(276.2, 887.53, 117.55, 4.08)
pt3dadd(275.94, 887.53, 117.55, 4.08)
pt3dadd(275.86, 887.43, 117.55, 4.08)
pt3dadd(275.86, 886.85, 117.55, 4.08)
pt3dadd(275.94, 886.76, 117.55, 4.08)
pt3dadd(276.03, 886.57, 117.55, 4.08)
pt3dadd(276.11, 886.47, 117.55, 4.08)
pt3dadd(276.28, 886.28, 117.55, 4.08)
pt3dadd(276.45, 885.98, 117.55, 4.08)
pt3dadd(276.62, 885.7, 117.55, 4.08)
pt3dadd(276.79, 885.51, 117.55, 4.08)
pt3dadd(276.71, 885.7, 117.55, 4.08)
pt3dadd(276.71, 885.89, 117.55, 4.08)
pt3dadd(276.62, 885.98, 117.55, 4.08)
pt3dadd(276.54, 886.08, 117.55, 4.08)
pt3dadd(276.45, 886.18, 117.55, 4.08)
pt3dadd(276.28, 886.28, 117.55, 4.08)
pt3dadd(276.2, 886.37, 117.55, 4.08)
pt3dadd(276.11, 886.47, 117.55, 4.08)
pt3dadd(276.03, 886.57, 117.55, 4.08)
pt3dadd(275.94, 886.76, 117.55, 4.08)
pt3dadd(275.94, 887.91, 117.55, 4.08)
pt3dadd(276.03, 888.11, 117.55, 4.08)
pt3dadd(276.03, 888.3, 117.55, 4.08)
pt3dadd(276.11, 888.49, 117.55, 4.08)
pt3dadd(276.2, 888.69, 117.55, 4.08)
pt3dadd(276.28, 889.07, 117.55, 4.08)
pt3dadd(276.28, 889.46, 117.55, 4.08)
pt3dadd(276.37, 889.65, 117.55, 4.08)
pt3dadd(276.45, 889.84, 117.55, 4.08)
pt3dadd(276.54, 889.94, 117.55, 4.08)
pt3dadd(276.62, 890.13, 117.55, 4.08)
pt3dadd(276.71, 890.42, 117.55, 4.08)
pt3dadd(276.79, 890.61, 117.55, 4.08)
pt3dadd(276.54, 888.11, 117.55, 4.08)
pt3dadd(276.54, 888.01, 117.55, 4.08)
pt3dadd(276.54, 894.18, 117.55, 4.08)
pt3dadd(276.62, 894.28, 117.55, 4.08)
pt3dadd(276.62, 894.67, 117.55, 4.08)
pt3dadd(276.71, 894.76, 117.55, 4.08)
pt3dadd(276.71, 894.96, 117.55, 4.08)
pt3dadd(276.79, 895.05, 117.55, 4.08)
pt3dadd(276.79, 895.34, 117.55, 4.08)
pt3dadd(276.88, 895.53, 117.55, 4.08)
pt3dadd(276.88, 895.83, 117.55, 4.08)
pt3dadd(276.96, 896.02, 117.55, 4.08)
pt3dadd(276.96, 896.21, 117.55, 4.08)
pt3dadd(277.05, 896.4, 117.55, 4.08)
pt3dadd(277.05, 896.79, 117.55, 4.08)
pt3dadd(277.13, 896.89, 117.55, 4.08)
pt3dadd(277.13, 900.55, 117.55, 4.08)
pt3dadd(277.22, 900.65, 117.55, 4.08)
pt3dadd(277.3, 900.74, 117.55, 4.08)
pt3dadd(277.3, 900.93, 117.55, 4.08)
pt3dadd(277.39, 901.03, 117.55, 4.08)
pt3dadd(277.47, 901.13, 117.55, 4.08)
pt3dadd(277.55, 901.22, 117.55, 4.08)
pt3dadd(278.29, 904.36, 117.55, 7.47)
pt3dadd(284.06, 926.06, 117.55, 5.43)
}
dend[70] {pt3dclear()
pt3dadd(284.06, 926.06, 117.55, 5.43)
pt3dadd(283.72, 929.63, 117.55, 5.43)
pt3dadd(285.42, 943.04, 117.55, 5.43)
pt3dadd(287.63, 954.9, 117.55, 5.43)
pt3dadd(289.16, 965.22, 117.55, 5.43)
pt3dadd(290.68, 974, 117.55, 5.43)
pt3dadd(293.23, 981.81, 117.55, 5.43)
pt3dadd(296.29, 989.24, 117.55, 5.43)
pt3dadd(300.37, 1002.93, 117.55, 4.76)
pt3dadd(287.51, 952.64, 117.55, 4.76)
pt3dadd(287.93, 955.72, 117.55, 4.76)
pt3dadd(288.02, 955.82, 117.55, 4.76)
pt3dadd(288.02, 956.3, 117.55, 4.76)
pt3dadd(287.93, 956.4, 117.55, 4.76)
pt3dadd(287.93, 956.11, 117.55, 4.76)
pt3dadd(287.85, 956.01, 117.55, 4.76)
pt3dadd(287.76, 955.82, 117.55, 4.76)
pt3dadd(287.67, 955.72, 117.55, 4.76)
pt3dadd(287.67, 955.24, 117.55, 4.76)
pt3dadd(287.59, 955.05, 117.55, 4.76)
pt3dadd(287.59, 952.44, 117.55, 4.76)
pt3dadd(287.51, 952.35, 117.55, 4.76)
pt3dadd(287.51, 952.16, 117.55, 4.76)
pt3dadd(287.51, 953.51, 117.55, 4.76)
pt3dadd(287.59, 953.6, 117.55, 4.76)
pt3dadd(287.59, 953.99, 117.55, 4.76)
pt3dadd(287.67, 954.08, 117.55, 4.76)
pt3dadd(287.67, 954.28, 117.55, 4.76)
pt3dadd(287.76, 954.47, 117.55, 4.76)
pt3dadd(287.85, 954.66, 117.55, 4.76)
pt3dadd(287.93, 954.76, 117.55, 4.76)
pt3dadd(287.67, 955.05, 117.55, 3.74)
pt3dadd(287.67, 956.21, 117.55, 3.74)
pt3dadd(287.76, 956.3, 117.55, 3.74)
pt3dadd(287.85, 956.4, 117.55, 3.74)
pt3dadd(287.93, 956.49, 117.55, 3.74)
pt3dadd(288.02, 956.59, 117.55, 3.74)
pt3dadd(288.1, 956.69, 117.55, 3.74)
pt3dadd(288.18, 956.78, 117.55, 3.74)
pt3dadd(288.18, 956.98, 117.55, 3.74)
pt3dadd(288.27, 957.07, 117.55, 3.74)
pt3dadd(288.35, 957.17, 117.55, 3.74)
pt3dadd(288.35, 958.81, 117.55, 3.74)
pt3dadd(288.44, 958.91, 117.55, 3.74)
pt3dadd(288.44, 959.58, 117.55, 3.74)
pt3dadd(288.52, 959.68, 117.55, 3.74)
pt3dadd(288.52, 960.16, 117.55, 3.74)
pt3dadd(288.61, 960.26, 117.55, 3.74)
pt3dadd(288.69, 960.35, 117.55, 3.74)
pt3dadd(288.69, 960.74, 117.55, 3.74)
pt3dadd(288.78, 960.84, 117.55, 3.74)
pt3dadd(288.78, 961.03, 117.55, 3.74)
pt3dadd(288.86, 961.12, 117.55, 3.74)
pt3dadd(288.86, 961.51, 117.55, 3.74)
pt3dadd(288.95, 961.7, 117.55, 3.74)
pt3dadd(288.95, 962.28, 117.55, 3.74)
pt3dadd(288.86, 962.28, 117.55, 3.74)
}
}
proc shape3d_104() {
dend[70] { pt3dadd(288.86, 962.09, 117.55, 3.74)
pt3dadd(288.78, 961.8, 117.55, 3.74)
pt3dadd(288.61, 961.6, 117.55, 3.74)
pt3dadd(288.52, 961.41, 117.55, 3.74)
pt3dadd(288.52, 961.22, 117.55, 3.74)
pt3dadd(288.52, 962.67, 117.55, 3.74)
pt3dadd(288.61, 962.76, 117.55, 3.74)
pt3dadd(288.69, 962.86, 117.55, 3.74)
pt3dadd(288.78, 962.96, 117.55, 3.74)
pt3dadd(288.95, 963.15, 117.55, 3.74)
pt3dadd(289.03, 963.24, 117.55, 3.74)
pt3dadd(289.03, 965.17, 117.55, 3.74)
pt3dadd(289.12, 965.27, 117.55, 3.74)
pt3dadd(289.12, 965.47, 117.55, 3.74)
pt3dadd(289.2, 965.56, 117.55, 3.74)
pt3dadd(289.2, 965.95, 117.55, 3.74)
pt3dadd(289.29, 966.04, 117.55, 3.74)
pt3dadd(289.37, 966.14, 117.55, 3.74)
pt3dadd(289.37, 966.33, 117.55, 3.74)
pt3dadd(289.46, 966.43, 117.55, 3.74)
pt3dadd(289.46, 966.91, 117.55, 3.74)
pt3dadd(289.54, 967.1, 117.55, 3.74)
pt3dadd(289.54, 968.55, 117.55, 3.74)
pt3dadd(289.63, 969.03, 117.55, 4.42)
pt3dadd(289.63, 968.93, 117.55, 4.42)
pt3dadd(289.71, 969.03, 117.55, 4.42)
pt3dadd(289.8, 969.13, 117.55, 4.42)
pt3dadd(289.8, 969.32, 117.55, 4.42)
pt3dadd(289.88, 969.42, 117.55, 4.42)
pt3dadd(289.97, 969.52, 117.55, 4.42)
pt3dadd(289.97, 969.71, 117.55, 4.42)
pt3dadd(290.05, 969.8, 117.55, 4.42)
pt3dadd(290.14, 969.9, 117.55, 4.42)
pt3dadd(290.22, 970, 117.55, 4.42)
pt3dadd(290.31, 970.09, 117.55, 4.42)
pt3dadd(290.39, 970.19, 117.55, 4.42)
pt3dadd(290.39, 970.67, 117.55, 4.42)
pt3dadd(290.48, 970.77, 117.55, 4.42)
pt3dadd(290.48, 971.06, 117.55, 4.42)
pt3dadd(290.56, 971.16, 117.55, 4.42)
pt3dadd(290.98, 972.02, 117.55, 4.42)
pt3dadd(290.65, 971.45, 117.55, 4.42)
pt3dadd(290.73, 971.54, 117.55, 4.42)
pt3dadd(289.8, 972.02, 117.55, 4.42)
pt3dadd(290.82, 971.83, 117.55, 4.42)
pt3dadd(290.9, 971.92, 117.55, 4.42)
pt3dadd(290.9, 973.37, 117.55, 4.42)
pt3dadd(290.98, 973.57, 117.55, 4.42)
pt3dadd(291.07, 973.66, 117.55, 4.42)
pt3dadd(291.07, 973.85, 117.55, 4.42)
pt3dadd(291.15, 973.95, 117.55, 4.42)
pt3dadd(291.24, 974.05, 117.55, 4.42)
pt3dadd(291.33, 974.15, 117.55, 4.42)
pt3dadd(292.01, 974.43, 117.55, 4.42)
pt3dadd(290.39, 975.69, 117.55, 4.42)
pt3dadd(291.41, 977.71, 117.55, 4.42)
pt3dadd(291.49, 977.62, 117.55, 4.42)
pt3dadd(291.58, 977.52, 117.55, 4.42)
pt3dadd(291.58, 977.33, 117.55, 4.42)
pt3dadd(291.67, 977.23, 117.55, 4.42)
pt3dadd(291.83, 977.23, 117.55, 4.42)
pt3dadd(291.92, 977.33, 117.55, 4.42)
pt3dadd(292.01, 977.42, 117.55, 4.42)
pt3dadd(292.09, 977.52, 117.55, 4.42)
pt3dadd(292.17, 977.62, 117.55, 4.42)
pt3dadd(292.26, 977.71, 117.55, 4.42)
pt3dadd(292.35, 977.81, 117.55, 4.42)
pt3dadd(292.43, 977.91, 117.55, 4.42)
pt3dadd(292.52, 978, 117.55, 4.42)
pt3dadd(292.6, 978.2, 117.55, 4.42)
pt3dadd(292.68, 978.29, 117.55, 4.42)
pt3dadd(292.77, 978.39, 117.55, 4.42)
pt3dadd(292.86, 978.58, 117.55, 4.42)
pt3dadd(292.94, 978.68, 117.55, 4.42)
pt3dadd(293.02, 978.78, 117.55, 4.42)
pt3dadd(293.02, 978.97, 117.55, 4.42)
pt3dadd(293.11, 979.06, 117.55, 4.42)
pt3dadd(293.11, 979.45, 117.55, 4.42)
pt3dadd(293.2, 979.54, 117.55, 4.42)
pt3dadd(293.28, 979.64, 117.55, 4.42)
pt3dadd(293.28, 979.84, 117.55, 4.42)
pt3dadd(293.36, 980.03, 117.55, 4.42)
pt3dadd(293.36, 980.41, 117.55, 4.42)
pt3dadd(293.45, 980.51, 117.55, 4.42)
pt3dadd(293.45, 980.8, 117.55, 4.42)
pt3dadd(293.53, 980.9, 117.55, 4.42)
pt3dadd(293.62, 981.18, 117.55, 4.42)
pt3dadd(293.7, 981.28, 117.55, 4.42)
pt3dadd(293.7, 981.47, 117.55, 4.42)
pt3dadd(293.79, 981.57, 117.55, 4.42)
pt3dadd(293.87, 981.67, 117.55, 4.42)
pt3dadd(293.87, 981.86, 117.55, 4.42)
pt3dadd(293.96, 982.05, 117.55, 4.42)
pt3dadd(293.96, 982.34, 117.55, 4.42)
pt3dadd(293.79, 982.73, 117.55, 3.74)
pt3dadd(293.79, 982.92, 117.55, 3.74)
pt3dadd(293.87, 983.02, 117.55, 3.74)
pt3dadd(293.87, 983.31, 117.55, 3.74)
pt3dadd(293.96, 983.41, 117.55, 3.74)
pt3dadd(293.96, 983.6, 117.55, 3.74)
pt3dadd(294.04, 983.69, 117.55, 3.74)
pt3dadd(294.04, 983.98, 117.55, 3.74)
pt3dadd(294.13, 984.08, 117.55, 3.74)
pt3dadd(294.13, 985.04, 117.55, 3.74)
pt3dadd(294.21, 985.14, 117.55, 3.74)
pt3dadd(294.21, 985.33, 117.55, 3.74)
pt3dadd(294.3, 985.43, 117.55, 3.74)
pt3dadd(294.38, 985.53, 117.55, 3.74)
pt3dadd(294.47, 985.62, 117.55, 3.74)
pt3dadd(294.55, 985.82, 117.55, 3.74)
pt3dadd(294.64, 985.91, 117.55, 3.74)
pt3dadd(294.72, 986.1, 117.55, 3.74)
pt3dadd(294.81, 986.2, 117.55, 3.74)
pt3dadd(294.81, 986.4, 117.55, 3.74)
pt3dadd(294.89, 986.49, 117.55, 3.74)
pt3dadd(294.98, 986.59, 117.55, 3.74)
pt3dadd(294.98, 986.78, 117.55, 3.74)
pt3dadd(295.06, 986.88, 117.55, 3.74)
pt3dadd(295.15, 986.97, 117.55, 3.74)
pt3dadd(295.23, 987.07, 117.55, 3.74)
pt3dadd(295.32, 987.16, 117.55, 3.74)
pt3dadd(295.4, 987.26, 117.55, 3.74)
pt3dadd(295.49, 987.36, 117.55, 3.74)
pt3dadd(295.57, 987.46, 117.55, 3.74)
pt3dadd(295.66, 987.55, 117.55, 3.74)
pt3dadd(295.74, 987.74, 117.55, 3.74)
pt3dadd(295.83, 987.84, 117.55, 3.74)
pt3dadd(295.91, 987.94, 117.55, 3.74)
pt3dadd(295.91, 988.13, 117.55, 3.74)
pt3dadd(295.99, 988.23, 117.55, 3.74)
pt3dadd(296.08, 988.32, 117.55, 3.74)
pt3dadd(296.17, 988.42, 117.55, 3.74)
pt3dadd(296.17, 988.61, 117.55, 3.74)
pt3dadd(296.25, 988.71, 117.55, 3.74)
pt3dadd(296.33, 988.8, 117.55, 3.74)
pt3dadd(296.33, 989, 117.55, 3.74)
pt3dadd(296.42, 989.09, 117.55, 3.74)
pt3dadd(296.51, 989.19, 117.55, 3.74)
pt3dadd(296.59, 989.29, 117.55, 3.74)
pt3dadd(296.59, 989.48, 117.55, 3.74)
pt3dadd(296.67, 989.58, 117.55, 3.74)
pt3dadd(296.76, 989.67, 117.55, 3.74)
pt3dadd(296.76, 989.96, 117.55, 3.74)
pt3dadd(296.85, 990.06, 117.55, 3.74)
pt3dadd(296.85, 990.25, 117.55, 3.74)
pt3dadd(296.93, 990.35, 117.55, 3.74)
pt3dadd(296.93, 990.54, 117.55, 3.74)
pt3dadd(297.02, 990.64, 117.55, 3.74)
pt3dadd(297.02, 991.22, 117.55, 3.74)
pt3dadd(297.1, 991.31, 117.55, 3.74)
pt3dadd(297.1, 991.79, 117.55, 3.74)
pt3dadd(297.18, 991.89, 117.55, 3.74)
pt3dadd(297.18, 992.09, 117.55, 3.74)
pt3dadd(297.27, 992.18, 117.55, 3.74)
pt3dadd(297.36, 992.28, 117.55, 3.74)
pt3dadd(297.44, 992.47, 117.55, 3.74)
pt3dadd(297.61, 992.57, 117.55, 3.06)
pt3dadd(297.7, 992.66, 117.55, 3.06)
pt3dadd(297.7, 992.95, 117.55, 3.06)
pt3dadd(297.78, 993.05, 117.55, 3.06)
pt3dadd(297.86, 993.15, 117.55, 3.06)
pt3dadd(297.95, 993.24, 117.55, 3.06)
pt3dadd(298.04, 993.34, 117.55, 3.06)
pt3dadd(298.12, 993.43, 117.55, 3.06)
pt3dadd(298.12, 993.63, 117.55, 3.06)
pt3dadd(298.12, 993.24, 117.55, 3.06)
pt3dadd(298.2, 993.15, 117.55, 3.06)
pt3dadd(298.29, 993.24, 117.55, 3.06)
pt3dadd(298.38, 993.34, 117.55, 3.06)
pt3dadd(298.46, 993.53, 117.55, 3.06)
pt3dadd(298.46, 993.72, 117.55, 3.06)
pt3dadd(298.55, 993.82, 117.55, 3.06)
pt3dadd(298.63, 993.92, 117.55, 3.06)
pt3dadd(298.63, 994.11, 117.55, 3.06)
pt3dadd(298.71, 994.3, 117.55, 3.06)
pt3dadd(298.71, 994.78, 117.55, 3.06)
pt3dadd(298.8, 994.88, 117.55, 3.06)
pt3dadd(298.88, 994.98, 117.55, 3.06)
pt3dadd(298.97, 995.08, 117.55, 3.06)
pt3dadd(299.05, 995.17, 117.55, 3.06)
pt3dadd(299.05, 995.36, 117.55, 3.06)
pt3dadd(299.22, 995.56, 117.55, 3.06)
pt3dadd(299.39, 995.75, 117.55, 3.06)
pt3dadd(299.48, 996.04, 117.55, 3.06)
pt3dadd(299.56, 996.23, 117.55, 3.06)
pt3dadd(299.48, 996.14, 117.55, 3.06)
pt3dadd(299.39, 995.94, 117.55, 3.06)
pt3dadd(299.31, 995.75, 117.55, 3.06)
pt3dadd(299.22, 995.65, 117.55, 3.06)
pt3dadd(299.22, 995.94, 117.55, 3.06)
pt3dadd(299.31, 996.04, 117.55, 3.06)
pt3dadd(299.39, 996.23, 117.55, 3.06)
pt3dadd(299.48, 996.42, 117.55, 3.06)
pt3dadd(299.65, 996.52, 117.55, 3.06)
pt3dadd(299.73, 996.72, 117.55, 3.06)
pt3dadd(299.9, 997, 117.55, 3.06)
pt3dadd(299.9, 997.48, 117.55, 3.06)
pt3dadd(299.65, 997.48, 117.55, 3.06)
pt3dadd(299.65, 996.33, 117.55, 3.06)
pt3dadd(299.56, 996.23, 117.55, 3.06)
}
}
proc shape3d_105() {
dend[70] { pt3dadd(299.56, 995.94, 117.55, 3.06)
pt3dadd(299.56, 997, 117.55, 3.06)
pt3dadd(299.65, 997.2, 117.55, 3.06)
pt3dadd(299.65, 997.58, 117.55, 3.06)
pt3dadd(299.73, 997.78, 117.55, 3.06)
pt3dadd(299.82, 998.07, 117.55, 3.06)
pt3dadd(299.82, 998.35, 117.55, 3.06)
pt3dadd(299.9, 998.45, 117.55, 3.06)
pt3dadd(299.99, 998.55, 117.55, 3.06)
pt3dadd(299.99, 998.93, 117.55, 3.06)
pt3dadd(300.07, 999.03, 117.55, 3.06)
pt3dadd(300.16, 999.22, 117.55, 3.06)
pt3dadd(300.16, 999.41, 117.55, 3.06)
pt3dadd(300.24, 999.51, 117.55, 3.06)
pt3dadd(300.33, 999.61, 117.55, 3.06)
pt3dadd(300.33, 999.8, 117.55, 3.06)
pt3dadd(300.41, 999.9, 117.55, 3.06)
pt3dadd(300.41, 1000.09, 117.55, 3.06)
pt3dadd(300.5, 1000.19, 117.55, 3.06)
pt3dadd(300.58, 1000.38, 117.55, 3.06)
pt3dadd(300.58, 1000.86, 117.55, 3.06)
pt3dadd(300.67, 1000.96, 117.55, 3.06)
pt3dadd(300.67, 1001.44, 117.55, 3.06)
pt3dadd(300.75, 1001.54, 117.55, 3.06)
pt3dadd(300.75, 1003.18, 117.55, 3.06)
pt3dadd(300.84, 1003.27, 117.55, 3.06)
pt3dadd(300.84, 1003.85, 117.55, 3.06)
pt3dadd(300.92, 1004.24, 117.55, 4.08)
pt3dadd(301.01, 1004.24, 117.55, 4.08)
pt3dadd(301.01, 1004.43, 117.55, 4.08)
pt3dadd(301.09, 1004.53, 117.55, 4.08)
pt3dadd(301.09, 1004.72, 117.55, 4.08)
pt3dadd(301.18, 1004.82, 117.55, 4.08)
pt3dadd(301.18, 1005.01, 117.55, 4.08)
pt3dadd(301.26, 1005.1, 117.55, 4.08)
pt3dadd(301.35, 1005.2, 117.55, 4.08)
pt3dadd(301.43, 1005.3, 117.55, 4.08)
pt3dadd(301.43, 1005.49, 117.55, 4.08)
pt3dadd(301.52, 1005.59, 117.55, 4.08)
pt3dadd(301.6, 1005.68, 117.55, 4.08)
pt3dadd(301.68, 1005.78, 117.55, 4.08)
pt3dadd(301.77, 1005.88, 117.55, 4.08)
pt3dadd(301.77, 1006.07, 117.55, 4.08)
pt3dadd(301.86, 1006.17, 117.55, 4.08)
pt3dadd(301.86, 1006.55, 117.55, 4.08)
pt3dadd(301.94, 1006.74, 117.55, 4.08)
pt3dadd(301.94, 1007.03, 117.55, 4.08)
pt3dadd(302.02, 1007.23, 117.55, 4.08)
pt3dadd(302.02, 1007.42, 117.55, 4.08)
pt3dadd(302.11, 1007.61, 117.55, 4.08)
pt3dadd(302.02, 1007.9, 117.55, 3.74)
pt3dadd(302.02, 1008.19, 117.55, 3.74)
pt3dadd(302.11, 1008.29, 117.55, 3.74)
pt3dadd(302.11, 1008.48, 117.55, 3.74)
pt3dadd(302.2, 1008.58, 117.55, 3.74)
pt3dadd(302.28, 1008.67, 117.55, 3.74)
pt3dadd(302.36, 1008.77, 117.55, 3.74)
pt3dadd(302.36, 1010.99, 117.55, 3.74)
pt3dadd(302.45, 1011.09, 117.55, 3.74)
pt3dadd(302.54, 1011.28, 117.55, 3.74)
pt3dadd(302.54, 1012.43, 117.55, 3.74)
pt3dadd(302.62, 1012.53, 117.55, 3.74)
pt3dadd(302.62, 1012.72, 117.55, 3.74)
pt3dadd(302.7, 1012.92, 117.55, 3.74)
pt3dadd(302.79, 1013.02, 117.55, 3.74)
pt3dadd(302.79, 1013.21, 117.55, 3.74)
pt3dadd(302.88, 1013.3, 117.55, 3.74)
pt3dadd(302.96, 1013.5, 117.55, 3.74)
pt3dadd(303.05, 1013.59, 117.55, 3.74)
pt3dadd(303.05, 1013.78, 117.55, 3.74)
pt3dadd(303.13, 1013.88, 117.55, 3.74)
pt3dadd(303.21, 1014.08, 117.55, 3.74)
pt3dadd(303.39, 1014.27, 117.55, 3.74)
pt3dadd(303.47, 1014.36, 117.55, 3.74)
pt3dadd(303.55, 1014.56, 117.55, 3.74)
pt3dadd(303.64, 1014.75, 117.55, 3.74)
pt3dadd(303.73, 1014.85, 117.55, 3.74)
pt3dadd(303.81, 1015.04, 117.55, 3.74)
pt3dadd(303.89, 1015.14, 117.55, 3.74)
pt3dadd(303.98, 1015.33, 117.55, 3.74)
pt3dadd(304.06, 1015.42, 117.55, 3.74)
pt3dadd(304.15, 1015.62, 117.55, 3.74)
pt3dadd(304.23, 1015.72, 117.55, 3.74)
pt3dadd(304.32, 1015.91, 117.55, 3.74)
pt3dadd(304.32, 1016.1, 117.55, 3.74)
pt3dadd(304.4, 1016.2, 117.55, 3.74)
pt3dadd(304.49, 1016.29, 117.55, 3.74)
pt3dadd(304.49, 1016.58, 117.55, 3.74)
pt3dadd(304.57, 1016.78, 117.55, 3.74)
pt3dadd(304.66, 1016.87, 117.55, 3.74)
pt3dadd(304.66, 1017.07, 117.55, 3.74)
pt3dadd(304.74, 1017.16, 117.55, 3.74)
pt3dadd(304.74, 1017.35, 117.55, 3.74)
pt3dadd(304.83, 1017.45, 117.55, 3.74)
pt3dadd(304.83, 1017.74, 117.55, 3.74)
pt3dadd(304.91, 1017.84, 117.55, 3.74)
pt3dadd(305, 1017.93, 117.55, 3.74)
pt3dadd(305, 1018.22, 117.55, 3.74)
pt3dadd(305.08, 1018.32, 117.55, 3.74)
pt3dadd(305.08, 1018.8, 117.55, 3.74)
pt3dadd(305.17, 1018.9, 117.55, 3.74)
pt3dadd(305.17, 1019.09, 117.55, 3.74)
pt3dadd(305.25, 1019.19, 117.55, 3.74)
pt3dadd(305.25, 1019.38, 117.55, 3.74)
pt3dadd(305.34, 1019.48, 117.55, 3.74)
pt3dadd(305.34, 1019.77, 117.55, 3.74)
pt3dadd(305.42, 1019.86, 117.55, 3.74)
pt3dadd(305.51, 1019.96, 117.55, 3.74)
pt3dadd(305.51, 1020.25, 117.55, 3.74)
pt3dadd(305.59, 1020.34, 117.55, 3.74)
pt3dadd(305.68, 1020.44, 117.55, 3.74)
pt3dadd(305.68, 1020.64, 117.55, 3.74)
pt3dadd(305.76, 1020.83, 117.55, 3.74)
pt3dadd(305.85, 1020.92, 117.55, 3.74)
pt3dadd(305.85, 1021.11, 117.55, 3.74)
pt3dadd(305.93, 1021.21, 117.55, 3.74)
pt3dadd(305.93, 1021.41, 117.55, 3.74)
pt3dadd(306.02, 1021.5, 117.55, 3.74)
pt3dadd(306.02, 1021.89, 117.55, 3.74)
pt3dadd(306.1, 1021.98, 117.55, 3.74)
pt3dadd(306.1, 1022.18, 117.55, 3.74)
pt3dadd(306.19, 1022.27, 117.55, 3.74)
pt3dadd(306.27, 1022.37, 117.55, 3.74)
pt3dadd(306.27, 1022.56, 117.55, 3.74)
pt3dadd(306.36, 1022.76, 117.55, 3.74)
pt3dadd(306.44, 1022.85, 117.55, 3.74)
pt3dadd(306.44, 1023.04, 117.55, 3.74)
pt3dadd(306.52, 1023.14, 117.55, 3.74)
pt3dadd(306.52, 1023.34, 117.55, 3.74)
pt3dadd(306.61, 1023.43, 117.55, 3.74)
pt3dadd(306.61, 1024.1, 117.55, 3.74)
pt3dadd(306.7, 1024.2, 117.55, 3.74)
pt3dadd(306.78, 1024.4, 117.55, 3.74)
pt3dadd(306.78, 1024.59, 117.55, 3.74)
pt3dadd(306.86, 1024.69, 117.55, 3.74)
pt3dadd(306.95, 1024.78, 117.55, 3.74)
pt3dadd(306.95, 1024.97, 117.55, 3.74)
pt3dadd(307.04, 1025.07, 117.55, 3.74)
pt3dadd(307.12, 1025.17, 117.55, 3.74)
pt3dadd(307.2, 1025.26, 117.55, 3.74)
pt3dadd(307.2, 1025.46, 117.55, 3.74)
pt3dadd(307.29, 1025.55, 117.55, 3.74)
pt3dadd(307.38, 1025.65, 117.55, 3.74)
pt3dadd(307.38, 1025.94, 117.55, 3.74)
pt3dadd(307.46, 1026.13, 117.55, 3.74)
pt3dadd(307.55, 1026.23, 117.55, 3.74)
pt3dadd(307.63, 1026.32, 117.55, 3.74)
pt3dadd(307.71, 1026.52, 117.55, 3.74)
pt3dadd(307.8, 1026.61, 117.55, 3.74)
pt3dadd(307.89, 1026.71, 117.55, 3.74)
pt3dadd(307.97, 1026.81, 117.55, 3.74)
pt3dadd(307.97, 1027, 117.55, 3.74)
pt3dadd(308.05, 1027.09, 117.55, 3.74)
pt3dadd(308.14, 1027.29, 117.55, 3.74)
pt3dadd(308.23, 1027.48, 117.55, 3.74)
pt3dadd(308.31, 1027.58, 117.55, 3.74)
pt3dadd(308.39, 1027.68, 117.55, 3.74)
pt3dadd(308.39, 1027.87, 117.55, 3.74)
pt3dadd(308.48, 1027.96, 117.55, 3.74)
pt3dadd(308.48, 1028.16, 117.55, 3.74)
pt3dadd(308.57, 1028.25, 117.55, 3.74)
pt3dadd(308.65, 1028.35, 117.55, 3.74)
pt3dadd(308.73, 1028.45, 117.55, 3.74)
pt3dadd(308.73, 1028.83, 117.55, 3.74)
pt3dadd(308.82, 1028.93, 117.55, 3.74)
pt3dadd(308.82, 1029.12, 117.55, 3.74)
pt3dadd(308.9, 1029.22, 117.55, 3.74)
pt3dadd(308.99, 1029.31, 117.55, 3.74)
pt3dadd(309.07, 1029.41, 117.55, 3.74)
pt3dadd(309.16, 1029.6, 117.55, 3.74)
pt3dadd(309.24, 1029.8, 117.55, 3.74)
pt3dadd(309.5, 1030.08, 117.55, 4.76)
pt3dadd(309.58, 1030.18, 117.55, 4.76)
pt3dadd(309.67, 1030.28, 117.55, 4.76)
pt3dadd(309.67, 1030.47, 117.55, 4.76)
pt3dadd(309.75, 1030.67, 117.55, 4.76)
pt3dadd(309.84, 1030.76, 117.55, 4.76)
pt3dadd(309.92, 1030.95, 117.55, 4.76)
pt3dadd(309.92, 1031.15, 117.55, 4.76)
pt3dadd(310.01, 1031.24, 117.55, 4.76)
pt3dadd(310.09, 1031.34, 117.55, 4.76)
pt3dadd(310.09, 1031.63, 117.55, 4.76)
pt3dadd(310.18, 1031.72, 117.55, 4.76)
pt3dadd(310.26, 1031.82, 117.55, 4.76)
pt3dadd(310.35, 1031.92, 117.55, 4.76)
pt3dadd(310.35, 1032.11, 117.55, 4.76)
pt3dadd(310.43, 1032.21, 117.55, 4.76)
pt3dadd(310.52, 1032.31, 117.55, 4.76)
pt3dadd(310.52, 1033.46, 117.55, 4.76)
pt3dadd(310.6, 1033.56, 117.55, 4.76)
pt3dadd(310.6, 1033.94, 117.55, 4.76)
pt3dadd(310.69, 1034.04, 117.55, 4.76)
pt3dadd(310.77, 1034.14, 117.55, 4.76)
pt3dadd(310.77, 1034.33, 117.55, 4.76)
pt3dadd(310.86, 1034.52, 117.55, 4.76)
pt3dadd(310.94, 1034.62, 117.55, 4.76)
pt3dadd(311.03, 1034.71, 117.55, 4.76)
pt3dadd(311.03, 1035.78, 117.55, 4.76)
pt3dadd(311.03, 1035.39, 117.55, 4.76)
pt3dadd(310.94, 1035.2, 117.55, 4.76)
}
}
proc shape3d_106() {
dend[70] { pt3dadd(310.94, 1033.75, 117.55, 4.76)
pt3dadd(310.94, 1036.35, 117.55, 4.76)
pt3dadd(311.03, 1036.45, 117.55, 4.76)
pt3dadd(311.11, 1036.55, 117.55, 4.76)
pt3dadd(311.11, 1036.74, 117.55, 4.76)
pt3dadd(311.2, 1036.84, 117.55, 4.76)
pt3dadd(311.28, 1036.94, 117.55, 4.76)
pt3dadd(311.37, 1037.13, 117.55, 4.76)
pt3dadd(311.45, 1037.22, 117.55, 4.76)
pt3dadd(311.45, 1037.42, 117.55, 4.76)
pt3dadd(311.54, 1037.61, 117.55, 4.76)
pt3dadd(311.54, 1037.7, 117.55, 4.76)
pt3dadd(311.54, 1037.51, 117.55, 4.76)
pt3dadd(311.45, 1037.42, 117.55, 4.76)
pt3dadd(311.28, 1037.42, 117.55, 4.76)
pt3dadd(311.28, 1037.51, 117.55, 4.76)
pt3dadd(311.37, 1037.7, 117.55, 4.76)
pt3dadd(311.45, 1037.8, 117.55, 4.76)
pt3dadd(311.54, 1037.99, 117.55, 4.76)
pt3dadd(311.62, 1038.09, 117.55, 4.76)
pt3dadd(311.7, 1038.19, 117.55, 4.76)
pt3dadd(311.79, 1038.29, 117.55, 4.76)
pt3dadd(311.88, 1038.38, 117.55, 4.76)
pt3dadd(311.96, 1038.48, 117.55, 4.76)
pt3dadd(312.05, 1038.57, 117.55, 4.76)
pt3dadd(312.13, 1038.67, 117.55, 4.76)
pt3dadd(312.21, 1038.77, 117.55, 4.76)
pt3dadd(312.3, 1038.86, 117.55, 4.76)
pt3dadd(312.39, 1038.96, 117.55, 4.76)
pt3dadd(312.47, 1039.06, 117.55, 4.76)
pt3dadd(312.55, 1039.15, 117.55, 4.76)
pt3dadd(312.55, 1039.54, 117.55, 4.76)
pt3dadd(312.64, 1039.64, 117.55, 4.76)
pt3dadd(313.07, 1039.64, 117.55, 4.76)
pt3dadd(313.4, 1039.93, 117.55, 4.08)
pt3dadd(313.49, 1040.02, 117.55, 4.08)
pt3dadd(313.58, 1040.21, 117.55, 4.08)
pt3dadd(313.66, 1040.31, 117.55, 4.08)
pt3dadd(313.66, 1040.5, 117.55, 4.08)
pt3dadd(313.74, 1040.6, 117.55, 4.08)
pt3dadd(313.83, 1040.69, 117.55, 4.08)
pt3dadd(314, 1040.89, 117.55, 4.08)
pt3dadd(314.08, 1041.08, 117.55, 4.08)
pt3dadd(314.08, 1041.28, 117.55, 4.08)
pt3dadd(314.17, 1041.37, 117.55, 4.08)
pt3dadd(314.25, 1041.56, 117.55, 4.08)
pt3dadd(314.25, 1041.76, 117.55, 4.08)
pt3dadd(314.34, 1041.85, 117.55, 4.08)
pt3dadd(314.42, 1041.95, 117.55, 4.08)
pt3dadd(314.42, 1042.72, 117.55, 4.08)
pt3dadd(314.51, 1042.82, 117.55, 4.08)
pt3dadd(314.51, 1043.01, 117.55, 4.08)
pt3dadd(314.59, 1043.11, 117.55, 4.08)
pt3dadd(314.59, 1043.78, 117.55, 4.08)
pt3dadd(314.68, 1043.88, 117.55, 4.08)
pt3dadd(314.68, 1044.27, 117.55, 4.08)
pt3dadd(314.76, 1044.55, 117.55, 4.08)
pt3dadd(314.85, 1044.65, 117.55, 4.08)
pt3dadd(314.85, 1045.04, 117.55, 4.08)
pt3dadd(314.93, 1045.13, 117.55, 4.08)
pt3dadd(315.02, 1045.32, 117.55, 4.08)
pt3dadd(315.1, 1045.52, 117.55, 4.08)
pt3dadd(315.19, 1045.71, 117.55, 4.08)
pt3dadd(315.27, 1045.91, 117.55, 4.08)
pt3dadd(315.36, 1046, 117.55, 4.08)
pt3dadd(315.27, 1046.39, 117.55, 3.06)
pt3dadd(315.27, 1046.19, 117.55, 3.06)
pt3dadd(315.36, 1046.29, 117.55, 3.06)
pt3dadd(315.44, 1046.48, 117.55, 3.06)
pt3dadd(315.44, 1046.68, 117.55, 3.06)
pt3dadd(315.53, 1046.77, 117.55, 3.06)
pt3dadd(315.61, 1046.96, 117.55, 3.06)
pt3dadd(315.7, 1047.16, 117.55, 3.06)
pt3dadd(315.78, 1047.26, 117.55, 3.06)
pt3dadd(315.78, 1047.45, 117.55, 3.06)
pt3dadd(315.87, 1047.54, 117.55, 3.06)
pt3dadd(315.95, 1047.64, 117.55, 3.06)
pt3dadd(315.95, 1047.83, 117.55, 3.06)
pt3dadd(316.04, 1047.93, 117.55, 3.06)
pt3dadd(316.12, 1048.12, 117.55, 3.06)
pt3dadd(316.21, 1048.22, 117.55, 3.06)
pt3dadd(316.29, 1048.31, 117.55, 3.06)
pt3dadd(316.29, 1048.51, 117.55, 3.06)
pt3dadd(316.38, 1048.6, 117.55, 3.06)
pt3dadd(316.46, 1048.7, 117.55, 3.06)
pt3dadd(316.55, 1048.8, 117.55, 3.06)
pt3dadd(316.63, 1048.9, 117.55, 3.06)
pt3dadd(316.72, 1049.09, 117.55, 3.06)
pt3dadd(316.8, 1049.18, 117.55, 3.06)
pt3dadd(316.89, 1049.28, 117.55, 3.06)
pt3dadd(316.97, 1049.38, 117.55, 3.06)
pt3dadd(316.97, 1049.57, 117.55, 3.06)
pt3dadd(317.05, 1049.76, 117.55, 3.06)
pt3dadd(317.14, 1049.86, 117.55, 3.06)
pt3dadd(317.14, 1050.15, 117.55, 3.06)
pt3dadd(317.23, 1050.24, 117.55, 3.06)
pt3dadd(317.31, 1050.34, 117.55, 3.06)
pt3dadd(317.31, 1050.73, 117.55, 3.06)
pt3dadd(317.39, 1050.82, 117.55, 3.06)
pt3dadd(317.39, 1052.75, 117.55, 3.06)
pt3dadd(317.48, 1052.85, 117.55, 3.06)
pt3dadd(317.48, 1053.23, 117.55, 3.06)
pt3dadd(317.57, 1053.43, 117.55, 3.06)
pt3dadd(317.65, 1053.62, 117.55, 3.06)
pt3dadd(317.65, 1054.01, 117.55, 3.06)
pt3dadd(317.99, 1053.91, 117.55, 4.08)
pt3dadd(318.08, 1054.01, 117.55, 4.08)
pt3dadd(318.16, 1054.1, 117.55, 4.08)
pt3dadd(318.16, 1054.3, 117.55, 4.08)
pt3dadd(318.24, 1054.39, 117.55, 4.08)
pt3dadd(318.33, 1054.49, 117.55, 4.08)
pt3dadd(318.42, 1054.58, 117.55, 4.08)
pt3dadd(318.42, 1054.78, 117.55, 4.08)
pt3dadd(318.5, 1054.88, 117.55, 4.08)
pt3dadd(318.58, 1055.07, 117.55, 4.08)
pt3dadd(318.67, 1055.16, 117.55, 4.08)
pt3dadd(318.76, 1055.26, 117.55, 4.08)
pt3dadd(318.76, 1055.55, 117.55, 4.08)
pt3dadd(318.84, 1055.65, 117.55, 4.08)
pt3dadd(318.92, 1055.74, 117.55, 4.08)
pt3dadd(318.92, 1055.94, 117.55, 4.08)
pt3dadd(319.01, 1056.13, 117.55, 4.08)
pt3dadd(319.01, 1056.32, 117.55, 4.08)
pt3dadd(319.1, 1056.42, 117.55, 4.08)
pt3dadd(319.18, 1056.61, 117.55, 4.08)
pt3dadd(319.27, 1056.71, 117.55, 4.08)
pt3dadd(319.27, 1056.9, 117.55, 4.08)
pt3dadd(319.35, 1056.99, 117.55, 4.08)
pt3dadd(319.35, 1057.86, 117.55, 4.08)
pt3dadd(319.43, 1057.96, 117.55, 4.08)
pt3dadd(319.43, 1058.34, 117.55, 4.08)
pt3dadd(319.52, 1058.44, 117.55, 4.08)
pt3dadd(319.52, 1058.64, 117.55, 4.08)
pt3dadd(319.6, 1058.73, 117.55, 4.08)
pt3dadd(319.6, 1059.02, 117.55, 4.08)
pt3dadd(319.69, 1059.12, 117.55, 4.08)
pt3dadd(319.77, 1059.21, 117.55, 4.08)
pt3dadd(319.77, 1059.41, 117.55, 4.08)
pt3dadd(319.86, 1059.5, 117.55, 4.08)
pt3dadd(319.94, 1059.6, 117.55, 4.08)
pt3dadd(319.94, 1059.79, 117.55, 4.08)
pt3dadd(320.03, 1059.89, 117.55, 4.08)
pt3dadd(320.03, 1060.08, 117.55, 4.08)
pt3dadd(320.11, 1060.18, 117.55, 4.08)
pt3dadd(320.2, 1060.28, 117.55, 4.08)
pt3dadd(320.28, 1060.37, 117.55, 4.08)
pt3dadd(320.28, 1060.56, 117.55, 4.08)
pt3dadd(320.37, 1060.66, 117.55, 4.08)
pt3dadd(320.45, 1060.76, 117.55, 4.08)
pt3dadd(320.54, 1060.85, 117.55, 4.08)
pt3dadd(320.54, 1061.05, 117.55, 4.08)
pt3dadd(320.62, 1061.14, 117.55, 4.08)
pt3dadd(320.71, 1061.33, 117.55, 4.08)
pt3dadd(320.79, 1061.43, 117.55, 4.08)
pt3dadd(320.96, 1061.72, 117.55, 3.74)
pt3dadd(321.05, 1061.82, 117.55, 3.74)
pt3dadd(321.13, 1061.92, 117.55, 3.74)
pt3dadd(321.22, 1062.01, 117.55, 3.74)
pt3dadd(321.3, 1062.11, 117.55, 3.74)
pt3dadd(321.3, 1062.3, 117.55, 3.74)
pt3dadd(321.39, 1062.4, 117.55, 3.74)
pt3dadd(321.47, 1062.49, 117.55, 3.74)
pt3dadd(321.47, 1062.69, 117.55, 3.74)
pt3dadd(321.56, 1062.78, 117.55, 3.74)
pt3dadd(321.64, 1062.88, 117.55, 3.74)
pt3dadd(321.73, 1062.97, 117.55, 3.74)
pt3dadd(321.73, 1063.27, 117.55, 3.74)
pt3dadd(321.81, 1063.36, 117.55, 3.74)
pt3dadd(321.9, 1063.46, 117.55, 3.74)
pt3dadd(321.98, 1063.56, 117.55, 3.74)
pt3dadd(321.98, 1063.84, 117.55, 3.74)
pt3dadd(322.07, 1063.94, 117.55, 3.74)
pt3dadd(322.15, 1064.04, 117.55, 3.74)
pt3dadd(322.15, 1064.23, 117.55, 3.74)
pt3dadd(322.23, 1064.32, 117.55, 3.74)
pt3dadd(322.32, 1064.52, 117.55, 3.74)
pt3dadd(322.4, 1064.61, 117.55, 3.74)
pt3dadd(322.4, 1064.81, 117.55, 3.74)
pt3dadd(322.49, 1064.91, 117.55, 3.74)
pt3dadd(322.58, 1065, 117.55, 3.74)
pt3dadd(322.66, 1065.1, 117.55, 3.74)
pt3dadd(322.74, 1065.19, 117.55, 3.74)
pt3dadd(322.83, 1065.29, 117.55, 3.74)
pt3dadd(322.83, 1065.48, 117.55, 3.74)
pt3dadd(322.92, 1065.58, 117.55, 3.74)
pt3dadd(323, 1065.68, 117.55, 3.74)
pt3dadd(323, 1065.87, 117.55, 3.74)
pt3dadd(323.08, 1065.96, 117.55, 3.74)
pt3dadd(323.17, 1066.06, 117.55, 3.74)
pt3dadd(323.17, 1066.26, 117.55, 3.74)
pt3dadd(323.26, 1066.35, 117.55, 3.74)
pt3dadd(323.26, 1066.74, 117.55, 4.42)
pt3dadd(323.26, 1066.83, 117.55, 4.42)
pt3dadd(323.34, 1067.03, 117.55, 4.42)
pt3dadd(323.51, 1067.22, 117.55, 4.42)
pt3dadd(323.51, 1067.41, 117.55, 4.42)
pt3dadd(323.6, 1067.6, 117.55, 4.42)
pt3dadd(323.68, 1067.7, 117.55, 4.42)
pt3dadd(323.68, 1067.9, 117.55, 4.42)
pt3dadd(323.77, 1067.99, 117.55, 4.42)
}
}
proc shape3d_107() {
dend[70] { pt3dadd(323.77, 1068.28, 117.55, 4.42)
pt3dadd(323.85, 1068.47, 117.55, 4.42)
pt3dadd(323.93, 1068.57, 117.55, 4.42)
pt3dadd(323.93, 1068.76, 117.55, 4.42)
pt3dadd(324.02, 1068.95, 117.55, 4.42)
pt3dadd(324.11, 1069.15, 117.55, 4.42)
pt3dadd(324.19, 1069.24, 117.55, 4.42)
pt3dadd(324.19, 1069.54, 117.55, 4.42)
pt3dadd(324.27, 1069.63, 117.55, 4.42)
pt3dadd(324.36, 1069.73, 117.55, 4.42)
pt3dadd(324.45, 1069.82, 117.55, 4.42)
pt3dadd(324.53, 1069.92, 117.55, 4.42)
pt3dadd(324.61, 1070.02, 117.55, 4.42)
pt3dadd(324.7, 1070.21, 117.55, 4.42)
pt3dadd(324.78, 1070.4, 117.55, 4.42)
pt3dadd(324.87, 1070.59, 117.55, 4.42)
pt3dadd(324.95, 1070.69, 117.55, 4.42)
pt3dadd(325.04, 1070.79, 117.55, 4.42)
pt3dadd(325.12, 1070.89, 117.55, 4.42)
pt3dadd(325.21, 1070.98, 117.55, 4.42)
pt3dadd(325.21, 1071.18, 117.55, 4.42)
pt3dadd(325.29, 1071.27, 117.55, 4.42)
pt3dadd(325.38, 1071.37, 117.55, 4.42)
pt3dadd(325.38, 1071.56, 117.55, 4.42)
pt3dadd(325.46, 1071.66, 117.55, 4.42)
pt3dadd(325.46, 1071.85, 117.55, 4.42)
pt3dadd(325.55, 1071.94, 117.55, 4.42)
pt3dadd(325.63, 1072.04, 117.55, 4.42)
pt3dadd(325.63, 1072.23, 117.55, 4.42)
pt3dadd(325.72, 1072.33, 117.55, 4.42)
pt3dadd(325.8, 1072.43, 117.55, 4.42)
pt3dadd(325.89, 1072.62, 117.55, 4.42)
pt3dadd(325.97, 1072.72, 117.55, 4.42)
pt3dadd(325.97, 1073.1, 117.55, 4.42)
pt3dadd(326.06, 1073.2, 117.55, 4.42)
pt3dadd(326.14, 1073.3, 117.55, 4.42)
pt3dadd(326.14, 1073.58, 117.55, 4.42)
pt3dadd(326.23, 1073.68, 117.55, 4.42)
pt3dadd(326.31, 1073.78, 117.55, 4.42)
pt3dadd(326.31, 1073.97, 117.55, 4.42)
pt3dadd(326.4, 1074.07, 117.55, 4.42)
pt3dadd(326.4, 1074.74, 117.55, 4.42)
pt3dadd(326.48, 1074.84, 117.55, 4.42)
pt3dadd(326.48, 1075.22, 117.55, 4.42)
pt3dadd(326.57, 1075.32, 117.55, 4.42)
pt3dadd(326.57, 1075.52, 117.55, 4.42)
pt3dadd(326.65, 1075.61, 117.55, 4.42)
pt3dadd(326.74, 1075.71, 117.55, 4.42)
pt3dadd(326.82, 1075.8, 117.55, 4.42)
pt3dadd(326.82, 1076, 117.55, 4.42)
pt3dadd(326.91, 1076.09, 117.55, 4.42)
pt3dadd(326.99, 1076.19, 117.55, 4.42)
pt3dadd(327.08, 1076.29, 117.55, 4.42)
pt3dadd(327.16, 1076.48, 117.55, 4.42)
pt3dadd(327.25, 1076.57, 117.55, 4.42)
pt3dadd(327.33, 1076.77, 117.55, 4.42)
pt3dadd(327.42, 1076.86, 117.55, 4.42)
pt3dadd(327.42, 1077.06, 117.55, 4.42)
pt3dadd(327.5, 1077.16, 117.55, 4.42)
pt3dadd(327.58, 1077.25, 117.55, 4.42)
pt3dadd(327.58, 1077.54, 117.55, 4.42)
pt3dadd(327.67, 1077.64, 117.55, 4.42)
pt3dadd(327.76, 1077.73, 117.55, 4.42)
pt3dadd(327.84, 1077.83, 117.55, 4.42)
pt3dadd(327.84, 1078.02, 117.55, 4.42)
pt3dadd(327.92, 1078.12, 117.55, 4.42)
pt3dadd(328.01, 1078.31, 117.55, 4.42)
pt3dadd(328.1, 1078.41, 117.55, 4.42)
pt3dadd(328.18, 1078.6, 117.55, 4.42)
pt3dadd(328.27, 1078.7, 117.55, 4.42)
pt3dadd(328.27, 1079.66, 117.55, 4.42)
pt3dadd(328.35, 1079.76, 117.55, 4.42)
pt3dadd(328.35, 1080.05, 117.55, 4.42)
pt3dadd(328.43, 1080.15, 117.55, 4.42)
pt3dadd(328.43, 1080.63, 117.55, 4.42)
pt3dadd(328.35, 1081.2, 117.55, 4.76)
pt3dadd(328.86, 1081.4, 117.55, 3.74)
pt3dadd(329.03, 1081.4, 117.55, 3.74)
pt3dadd(329.11, 1081.49, 117.55, 3.74)
pt3dadd(329.2, 1081.59, 117.55, 3.74)
pt3dadd(329.29, 1081.69, 117.55, 3.74)
pt3dadd(329.37, 1081.78, 117.55, 3.74)
pt3dadd(329.45, 1081.98, 117.55, 3.74)
pt3dadd(329.54, 1082.07, 117.55, 3.74)
pt3dadd(329.63, 1082.17, 117.55, 3.74)
pt3dadd(329.71, 1082.27, 117.55, 3.74)
pt3dadd(329.8, 1082.36, 117.55, 3.74)
pt3dadd(329.88, 1082.46, 117.55, 3.74)
pt3dadd(329.96, 1082.56, 117.55, 3.74)
pt3dadd(329.96, 1082.75, 117.55, 3.74)
pt3dadd(330.05, 1082.84, 117.55, 3.74)
pt3dadd(330.13, 1083.04, 117.55, 3.74)
pt3dadd(330.22, 1083.14, 117.55, 3.74)
pt3dadd(330.3, 1083.23, 117.55, 3.74)
pt3dadd(330.39, 1083.33, 117.55, 3.74)
pt3dadd(330.47, 1083.42, 117.55, 3.74)
pt3dadd(330.47, 1083.61, 117.55, 3.74)
pt3dadd(330.56, 1083.81, 117.55, 3.74)
pt3dadd(330.64, 1083.91, 117.55, 3.74)
pt3dadd(330.73, 1084.1, 117.55, 3.74)
pt3dadd(330.81, 1084.19, 117.55, 3.74)
pt3dadd(330.9, 1084.29, 117.55, 3.74)
pt3dadd(330.98, 1084.39, 117.55, 3.74)
pt3dadd(330.98, 1084.58, 117.55, 3.74)
pt3dadd(331.07, 1084.68, 117.55, 3.74)
pt3dadd(331.15, 1084.77, 117.55, 3.74)
pt3dadd(331.15, 1084.97, 117.55, 3.74)
pt3dadd(331.24, 1085.16, 117.55, 3.74)
pt3dadd(331.32, 1085.26, 117.55, 3.74)
pt3dadd(331.41, 1085.35, 117.55, 3.74)
pt3dadd(331.49, 1085.45, 117.55, 3.74)
pt3dadd(331.58, 1085.55, 117.55, 3.74)
pt3dadd(331.66, 1085.64, 117.55, 3.74)
pt3dadd(331.66, 1085.83, 117.55, 3.74)
pt3dadd(331.75, 1085.93, 117.55, 3.74)
pt3dadd(331.83, 1086.03, 117.55, 3.74)
pt3dadd(331.92, 1086.13, 117.55, 3.74)
pt3dadd(332, 1086.22, 117.55, 3.74)
pt3dadd(332.09, 1086.32, 117.55, 3.74)
pt3dadd(332.17, 1086.41, 117.55, 3.74)
pt3dadd(332.26, 1086.51, 117.55, 3.74)
pt3dadd(332.34, 1086.6, 117.55, 3.74)
pt3dadd(332.34, 1086.8, 117.55, 3.74)
pt3dadd(332.43, 1086.9, 117.55, 3.74)
pt3dadd(332.51, 1086.99, 117.55, 3.74)
pt3dadd(332.51, 1087.19, 117.55, 3.74)
pt3dadd(332.6, 1087.28, 117.55, 3.74)
pt3dadd(332.68, 1087.38, 117.55, 3.74)
pt3dadd(332.68, 1087.57, 117.55, 3.74)
pt3dadd(332.77, 1087.67, 117.55, 3.74)
pt3dadd(332.85, 1087.76, 117.55, 3.74)
pt3dadd(332.85, 1087.96, 117.55, 3.74)
pt3dadd(332.93, 1088.05, 117.55, 3.74)
pt3dadd(333.02, 1088.15, 117.55, 3.74)
pt3dadd(333.02, 1088.44, 117.55, 3.74)
pt3dadd(333.11, 1088.54, 117.55, 3.74)
pt3dadd(333.19, 1088.63, 117.55, 3.74)
pt3dadd(333.19, 1088.82, 117.55, 3.74)
pt3dadd(333.27, 1088.92, 117.55, 3.74)
pt3dadd(333.36, 1089.02, 117.55, 3.74)
pt3dadd(333.36, 1089.21, 117.55, 3.74)
pt3dadd(333.45, 1089.31, 117.55, 3.74)
pt3dadd(333.53, 1089.4, 117.55, 3.74)
pt3dadd(333.61, 1089.5, 117.55, 3.74)
pt3dadd(333.7, 1089.59, 117.55, 3.74)
pt3dadd(333.7, 1089.79, 117.55, 3.74)
pt3dadd(333.79, 1089.89, 117.55, 3.74)
pt3dadd(333.87, 1090.08, 117.55, 3.74)
pt3dadd(333.95, 1090.37, 117.55, 3.74)
pt3dadd(334.04, 1090.56, 117.55, 3.74)
pt3dadd(334.04, 1090.85, 117.55, 3.74)
pt3dadd(334.13, 1090.95, 117.55, 3.74)
pt3dadd(334.04, 1090.85, 117.55, 3.74)
pt3dadd(333.95, 1090.75, 117.55, 3.74)
pt3dadd(333.87, 1090.66, 117.55, 3.74)
pt3dadd(333.79, 1090.56, 117.55, 3.74)
pt3dadd(333.79, 1090.37, 117.55, 3.74)
pt3dadd(333.7, 1090.27, 117.55, 3.74)
pt3dadd(333.61, 1090.08, 117.55, 3.74)
pt3dadd(333.53, 1089.98, 117.55, 3.74)
pt3dadd(333.45, 1089.79, 117.55, 3.74)
pt3dadd(333.45, 1088.73, 117.55, 3.74)
pt3dadd(333.36, 1088.63, 117.55, 3.74)
pt3dadd(333.36, 1088.34, 117.55, 3.74)
pt3dadd(333.45, 1088.54, 117.55, 3.74)
pt3dadd(333.53, 1088.63, 117.55, 3.74)
pt3dadd(333.53, 1088.82, 117.55, 3.74)
pt3dadd(333.61, 1088.92, 117.55, 3.74)
pt3dadd(333.7, 1089.02, 117.55, 3.74)
pt3dadd(333.79, 1089.11, 117.55, 3.74)
pt3dadd(333.87, 1089.21, 117.55, 3.74)
pt3dadd(333.87, 1089.4, 117.55, 3.74)
pt3dadd(333.95, 1089.5, 117.55, 3.74)
pt3dadd(334.04, 1089.59, 117.55, 3.74)
pt3dadd(334.13, 1089.69, 117.55, 3.74)
pt3dadd(334.13, 1089.89, 117.55, 3.74)
pt3dadd(334.21, 1089.98, 117.55, 3.74)
pt3dadd(334.3, 1090.18, 117.55, 3.74)
pt3dadd(334.3, 1090.37, 117.55, 3.74)
pt3dadd(334.38, 1090.46, 117.55, 3.74)
pt3dadd(334.46, 1090.56, 117.55, 3.74)
pt3dadd(334.46, 1090.75, 117.55, 3.74)
pt3dadd(334.55, 1090.85, 117.55, 3.74)
pt3dadd(334.64, 1090.95, 117.55, 3.74)
pt3dadd(334.72, 1091.14, 117.55, 3.74)
pt3dadd(334.8, 1091.23, 117.55, 3.74)
pt3dadd(334.89, 1091.33, 117.55, 3.74)
pt3dadd(334.98, 1091.43, 117.55, 3.74)
pt3dadd(335.06, 1091.62, 117.55, 3.74)
pt3dadd(335.14, 1091.72, 117.55, 3.74)
pt3dadd(335.23, 1091.81, 117.55, 3.74)
pt3dadd(335.23, 1092.01, 117.55, 3.74)
pt3dadd(335.31, 1092.1, 117.55, 3.74)
pt3dadd(335.4, 1092.2, 117.55, 3.74)
pt3dadd(335.48, 1092.3, 117.55, 3.74)
pt3dadd(335.48, 1092.49, 117.55, 3.74)
pt3dadd(335.57, 1092.68, 117.55, 3.74)
pt3dadd(335.57, 1092.88, 117.55, 3.74)
pt3dadd(335.65, 1092.97, 117.55, 3.74)
pt3dadd(335.74, 1093.07, 117.55, 3.74)
}
}
proc shape3d_108() {
dend[70] { pt3dadd(335.74, 1093.36, 117.55, 3.74)
pt3dadd(335.82, 1093.45, 117.55, 3.74)
pt3dadd(335.91, 1093.55, 117.55, 3.74)
pt3dadd(335.91, 1093.74, 117.55, 3.74)
pt3dadd(335.99, 1093.94, 117.55, 3.74)
pt3dadd(336.08, 1094.13, 117.55, 3.74)
pt3dadd(336.16, 1094.22, 117.55, 3.74)
pt3dadd(336.16, 1094.42, 117.55, 3.74)
pt3dadd(336.25, 1094.52, 117.55, 3.74)
pt3dadd(336.25, 1094.71, 117.55, 3.74)
pt3dadd(336.33, 1094.81, 117.55, 3.74)
pt3dadd(336.42, 1094.9, 117.55, 3.74)
pt3dadd(336.5, 1095, 117.55, 3.74)
pt3dadd(336.59, 1095.09, 117.55, 3.74)
pt3dadd(336.67, 1095.19, 117.55, 3.74)
pt3dadd(336.76, 1095.29, 117.55, 3.74)
pt3dadd(336.84, 1095.38, 117.55, 3.74)
pt3dadd(336.93, 1095.48, 117.55, 3.74)
pt3dadd(337.01, 1095.57, 117.55, 3.74)
pt3dadd(337.1, 1095.67, 117.55, 3.74)
pt3dadd(337.18, 1095.77, 117.55, 3.74)
pt3dadd(337.27, 1095.96, 117.55, 3.74)
pt3dadd(337.35, 1096.06, 117.55, 3.74)
pt3dadd(337.44, 1096.16, 117.55, 3.74)
pt3dadd(337.52, 1096.25, 117.55, 3.74)
pt3dadd(337.61, 1096.35, 117.55, 3.74)
pt3dadd(337.61, 1096.54, 117.55, 3.74)
pt3dadd(337.69, 1096.64, 117.55, 3.74)
pt3dadd(337.77, 1096.83, 117.55, 3.74)
pt3dadd(337.86, 1096.93, 117.55, 3.74)
pt3dadd(337.95, 1097.02, 117.55, 3.74)
pt3dadd(338.03, 1097.12, 117.55, 3.74)
pt3dadd(338.11, 1097.21, 117.55, 3.74)
pt3dadd(338.11, 1097.41, 117.55, 3.74)
pt3dadd(338.2, 1097.51, 117.55, 3.74)
pt3dadd(338.29, 1097.7, 117.55, 3.74)
pt3dadd(338.37, 1097.89, 117.55, 3.74)
pt3dadd(338.45, 1097.99, 117.55, 3.74)
pt3dadd(338.45, 1098.18, 117.55, 3.74)
pt3dadd(338.54, 1098.28, 117.55, 3.74)
pt3dadd(338.63, 1098.37, 117.55, 3.74)
pt3dadd(338.63, 1098.56, 117.55, 3.74)
pt3dadd(338.71, 1098.76, 117.55, 3.74)
pt3dadd(338.71, 1099.15, 117.55, 3.74)
pt3dadd(338.8, 1099.34, 117.55, 3.74)
pt3dadd(338.88, 1099.44, 117.55, 3.74)
pt3dadd(338.88, 1099.63, 117.55, 3.74)
pt3dadd(338.96, 1099.82, 117.55, 3.74)
pt3dadd(339.05, 1099.92, 117.55, 3.74)
pt3dadd(339.05, 1100.11, 117.55, 3.74)
pt3dadd(339.14, 1100.2, 117.55, 3.74)
pt3dadd(339.22, 1100.3, 117.55, 3.74)
pt3dadd(339.22, 1100.49, 117.55, 3.74)
pt3dadd(339.3, 1100.59, 117.55, 3.74)
pt3dadd(339.39, 1100.69, 117.55, 3.74)
pt3dadd(339.39, 1100.88, 117.55, 3.74)
pt3dadd(339.48, 1100.98, 117.55, 3.74)
pt3dadd(339.56, 1101.07, 117.55, 3.74)
pt3dadd(339.56, 1101.27, 117.55, 3.74)
pt3dadd(339.64, 1101.46, 117.55, 3.74)
pt3dadd(339.64, 1101.65, 117.55, 3.74)
pt3dadd(339.73, 1101.84, 117.55, 3.74)
pt3dadd(339.82, 1101.94, 117.55, 3.74)
pt3dadd(339.82, 1102.52, 117.55, 3.74)
pt3dadd(339.9, 1102.62, 117.55, 3.74)
pt3dadd(339.9, 1102.81, 117.55, 3.74)
pt3dadd(339.98, 1102.91, 117.55, 3.74)
pt3dadd(339.98, 1103.19, 117.55, 3.74)
pt3dadd(340.07, 1103.39, 117.55, 3.74)
pt3dadd(340.15, 1103.48, 117.55, 3.74)
pt3dadd(340.24, 1103.68, 117.55, 3.74)
pt3dadd(340.32, 1103.78, 117.55, 3.74)
pt3dadd(339.56, 1103.1, 117.55, 3.06)
pt3dadd(339.64, 1103.19, 117.55, 3.06)
pt3dadd(339.73, 1103.29, 117.55, 3.06)
pt3dadd(339.82, 1103.39, 117.55, 3.06)
pt3dadd(339.82, 1103.58, 117.55, 3.06)
pt3dadd(339.9, 1103.68, 117.55, 3.06)
pt3dadd(339.98, 1103.78, 117.55, 3.06)
pt3dadd(340.07, 1103.87, 117.55, 3.06)
pt3dadd(340.15, 1103.97, 117.55, 3.06)
pt3dadd(340.15, 1104.16, 117.55, 3.06)
pt3dadd(340.24, 1104.26, 117.55, 3.06)
pt3dadd(340.32, 1104.35, 117.55, 3.06)
pt3dadd(340.32, 1104.55, 117.55, 3.06)
pt3dadd(340.41, 1104.64, 117.55, 3.06)
pt3dadd(340.41, 1104.83, 117.55, 3.06)
pt3dadd(340.49, 1105.03, 117.55, 3.06)
pt3dadd(340.49, 1105.42, 117.55, 3.06)
pt3dadd(340.58, 1105.51, 117.55, 3.06)
pt3dadd(340.58, 1105.7, 117.55, 3.06)
pt3dadd(340.66, 1105.8, 117.55, 3.06)
pt3dadd(340.66, 1105.99, 117.55, 3.06)
pt3dadd(340.75, 1106.09, 117.55, 3.06)
pt3dadd(340.83, 1106.19, 117.55, 3.06)
pt3dadd(340.92, 1106.38, 117.55, 3.06)
pt3dadd(341, 1106.57, 117.55, 3.06)
pt3dadd(341.17, 1106.77, 117.55, 3.06)
pt3dadd(341.26, 1106.86, 117.55, 3.06)
pt3dadd(341.34, 1106.96, 117.55, 3.06)
pt3dadd(341.43, 1107.05, 117.55, 3.06)
pt3dadd(341.43, 1107.25, 117.55, 3.06)
pt3dadd(341.51, 1107.34, 117.55, 3.06)
pt3dadd(341.6, 1107.44, 117.55, 3.06)
pt3dadd(341.6, 1107.63, 117.55, 3.06)
pt3dadd(341.68, 1107.73, 117.55, 3.06)
pt3dadd(341.77, 1107.92, 117.55, 3.06)
pt3dadd(341.77, 1108.11, 117.55, 3.06)
pt3dadd(341.85, 1108.21, 117.55, 3.06)
pt3dadd(341.94, 1108.41, 117.55, 3.06)
pt3dadd(342.02, 1108.6, 117.55, 3.06)
pt3dadd(342.11, 1108.69, 117.55, 3.06)
pt3dadd(342.11, 1108.98, 117.55, 3.06)
pt3dadd(342.19, 1109.08, 117.55, 3.06)
pt3dadd(342.28, 1109.18, 117.55, 3.06)
pt3dadd(342.28, 1109.37, 117.55, 3.06)
pt3dadd(342.36, 1109.56, 117.55, 3.06)
pt3dadd(342.45, 1109.66, 117.55, 3.06)
pt3dadd(342.45, 1109.85, 117.55, 3.06)
pt3dadd(342.53, 1110.04, 117.55, 3.06)
pt3dadd(342.53, 1110.33, 117.55, 3.06)
pt3dadd(342.62, 1110.43, 117.55, 3.06)
pt3dadd(342.62, 1110.91, 117.55, 3.06)
pt3dadd(342.7, 1111.01, 117.55, 3.06)
pt3dadd(342.7, 1111.3, 117.55, 3.06)
pt3dadd(342.79, 1111.4, 117.55, 3.06)
pt3dadd(342.87, 1111.59, 117.55, 3.06)
pt3dadd(342.87, 1111.78, 117.55, 3.06)
pt3dadd(342.95, 1111.88, 117.55, 3.06)
pt3dadd(343.04, 1111.97, 117.55, 3.06)
pt3dadd(343.04, 1112.17, 117.55, 3.06)
pt3dadd(343.13, 1112.26, 117.55, 3.06)
pt3dadd(343.21, 1112.36, 117.55, 3.06)
pt3dadd(343.21, 1112.55, 117.55, 3.06)
pt3dadd(343.3, 1112.65, 117.55, 3.06)
pt3dadd(343.38, 1112.84, 117.55, 3.06)
pt3dadd(343.46, 1113.03, 117.55, 3.06)
pt3dadd(343.38, 1112.26, 117.55, 3.06)
pt3dadd(343.46, 1112.36, 117.55, 3.06)
pt3dadd(343.46, 1112.55, 117.55, 3.06)
pt3dadd(343.55, 1112.74, 117.55, 3.06)
pt3dadd(343.64, 1112.84, 117.55, 3.06)
pt3dadd(343.64, 1113.03, 117.55, 3.06)
pt3dadd(343.72, 1113.23, 117.55, 3.06)
pt3dadd(343.72, 1113.52, 117.55, 3.06)
pt3dadd(343.8, 1113.61, 117.55, 3.06)
pt3dadd(343.8, 1113.9, 117.55, 3.06)
pt3dadd(344.14, 1115.44, 117.55, 3.06)
pt3dadd(343.98, 1115.16, 117.55, 3.74)
pt3dadd(343.98, 1115.25, 117.55, 3.74)
pt3dadd(344.06, 1115.35, 117.55, 3.74)
pt3dadd(344.14, 1115.44, 117.55, 3.74)
pt3dadd(344.14, 1115.64, 117.55, 3.74)
pt3dadd(344.23, 1115.73, 117.55, 3.74)
pt3dadd(344.23, 1115.93, 117.55, 3.74)
pt3dadd(344.32, 1116.02, 117.55, 3.74)
pt3dadd(344.4, 1116.12, 117.55, 3.74)
pt3dadd(344.48, 1116.22, 117.55, 3.74)
pt3dadd(344.57, 1116.41, 117.55, 3.74)
pt3dadd(344.65, 1116.51, 117.55, 3.74)
pt3dadd(344.65, 1116.7, 117.55, 3.74)
pt3dadd(344.74, 1116.8, 117.55, 3.74)
pt3dadd(344.74, 1117.08, 117.55, 3.74)
pt3dadd(344.83, 1117.18, 117.55, 3.74)
pt3dadd(344.83, 1117.38, 117.55, 3.74)
pt3dadd(344.91, 1117.47, 117.55, 3.74)
pt3dadd(344.91, 1117.76, 117.55, 3.74)
pt3dadd(344.99, 1117.85, 117.55, 3.74)
pt3dadd(344.99, 1118.24, 117.55, 3.74)
pt3dadd(345.08, 1118.34, 117.55, 3.74)
pt3dadd(345.08, 1118.53, 117.55, 3.74)
pt3dadd(345.17, 1118.63, 117.55, 3.74)
pt3dadd(345.17, 1118.92, 117.55, 3.74)
pt3dadd(345.25, 1119.11, 117.55, 3.74)
pt3dadd(345.25, 1119.4, 117.55, 3.74)
pt3dadd(345.33, 1119.59, 117.55, 3.74)
pt3dadd(345.33, 1120.07, 117.55, 3.74)
pt3dadd(345.42, 1120.17, 117.55, 3.74)
pt3dadd(345.42, 1120.36, 117.55, 3.74)
pt3dadd(345.5, 1120.46, 117.55, 3.74)
pt3dadd(345.5, 1120.65, 117.55, 3.74)
pt3dadd(345.59, 1120.75, 117.55, 3.74)
pt3dadd(345.67, 1120.84, 117.55, 3.74)
pt3dadd(345.76, 1121.04, 117.55, 3.74)
pt3dadd(345.84, 1121.14, 117.55, 3.74)
pt3dadd(345.93, 1121.23, 117.55, 3.74)
pt3dadd(345.93, 1121.43, 117.55, 3.74)
pt3dadd(346.01, 1121.52, 117.55, 3.74)
pt3dadd(346.1, 1121.62, 117.55, 3.74)
pt3dadd(346.1, 1121.81, 117.55, 3.74)
pt3dadd(346.18, 1121.91, 117.55, 3.74)
pt3dadd(346.27, 1122, 117.55, 3.74)
pt3dadd(346.27, 1122.39, 117.55, 3.74)
pt3dadd(346.35, 1122.48, 117.55, 3.74)
pt3dadd(346.35, 1122.68, 117.55, 3.74)
pt3dadd(346.44, 1122.87, 117.55, 3.74)
pt3dadd(346.52, 1122.97, 117.55, 3.74)
pt3dadd(346.52, 1123.16, 117.55, 3.74)
pt3dadd(346.61, 1123.26, 117.55, 3.74)
pt3dadd(346.61, 1123.45, 117.55, 3.74)
}
}
proc shape3d_109() {
dend[70] { pt3dadd(346.69, 1123.55, 117.55, 3.74)
pt3dadd(346.69, 1124.32, 117.55, 3.74)
pt3dadd(346.78, 1124.42, 117.55, 3.74)
pt3dadd(346.78, 1124.9, 117.55, 3.74)
pt3dadd(346.86, 1124.99, 117.55, 3.74)
pt3dadd(346.86, 1125.19, 117.55, 3.74)
pt3dadd(346.95, 1125.28, 117.55, 3.74)
pt3dadd(347.03, 1125.38, 117.55, 3.74)
pt3dadd(347.03, 1125.57, 117.55, 3.74)
pt3dadd(347.12, 1125.67, 117.55, 3.74)
pt3dadd(347.2, 1125.86, 117.55, 3.74)
pt3dadd(347.29, 1126.06, 117.55, 3.74)
pt3dadd(347.37, 1126.25, 117.55, 4.76)
pt3dadd(347.37, 1126.34, 117.55, 4.76)
pt3dadd(347.46, 1126.44, 117.55, 4.76)
pt3dadd(347.46, 1126.63, 117.55, 4.76)
pt3dadd(347.54, 1126.82, 117.55, 4.76)
pt3dadd(347.54, 1127.21, 117.55, 4.76)
pt3dadd(347.63, 1127.31, 117.55, 4.76)
pt3dadd(347.63, 1127.6, 117.55, 4.76)
pt3dadd(347.71, 1127.69, 117.55, 4.76)
pt3dadd(347.71, 1128.37, 117.55, 4.76)
pt3dadd(347.71, 1128.85, 117.55, 4.08)
pt3dadd(347.71, 1128.66, 117.55, 4.08)
pt3dadd(347.71, 1128.95, 117.55, 4.08)
pt3dadd(347.63, 1129.05, 117.55, 4.08)
pt3dadd(347.63, 1132.04, 117.55, 4.08)
pt3dadd(347.54, 1132.13, 117.55, 4.08)
pt3dadd(347.46, 1132.23, 117.55, 4.08)
pt3dadd(347.37, 1132.32, 117.55, 4.08)
pt3dadd(347.29, 1132.42, 117.55, 4.08)
pt3dadd(347.2, 1132.61, 117.55, 4.08)
pt3dadd(347.2, 1133.58, 117.55, 4.08)
pt3dadd(347.12, 1133.77, 117.55, 4.08)
pt3dadd(347.12, 1134.54, 117.55, 4.08)
pt3dadd(347.2, 1134.64, 117.55, 4.08)
pt3dadd(347.29, 1134.73, 117.55, 4.08)
pt3dadd(347.37, 1134.93, 117.55, 4.08)
pt3dadd(347.46, 1135.03, 117.55, 4.08)
pt3dadd(347.54, 1135.12, 117.55, 4.08)
pt3dadd(347.54, 1135.51, 117.55, 4.08)
pt3dadd(347.63, 1135.6, 117.55, 4.08)
pt3dadd(347.71, 1135.7, 117.55, 4.08)
pt3dadd(347.71, 1135.99, 117.55, 4.08)
pt3dadd(347.8, 1136.08, 117.55, 4.08)
pt3dadd(347.8, 1136.38, 117.55, 4.08)
pt3dadd(347.88, 1136.57, 117.55, 4.08)
pt3dadd(347.97, 1136.67, 117.55, 4.08)
pt3dadd(347.97, 1137.15, 117.55, 4.08)
pt3dadd(348.05, 1137.24, 117.55, 4.08)
pt3dadd(348.05, 1137.53, 117.55, 4.08)
pt3dadd(348.14, 1137.72, 117.55, 4.08)
pt3dadd(348.14, 1138.4, 117.55, 4.08)
pt3dadd(348.22, 1138.5, 117.55, 4.08)
pt3dadd(348.22, 1138.79, 117.55, 4.08)
pt3dadd(348.3, 1138.88, 117.55, 4.08)
pt3dadd(348.3, 1139.07, 117.55, 4.08)
pt3dadd(348.39, 1139.17, 117.55, 4.08)
pt3dadd(348.48, 1139.36, 117.55, 4.08)
pt3dadd(348.56, 1139.56, 117.55, 4.08)
pt3dadd(348.64, 1139.66, 117.55, 4.08)
pt3dadd(348.64, 1139.85, 117.55, 4.08)
pt3dadd(348.73, 1139.94, 117.55, 4.08)
pt3dadd(348.73, 1140.14, 117.55, 4.08)
pt3dadd(348.82, 1140.33, 117.55, 4.08)
pt3dadd(348.9, 1140.43, 117.55, 4.08)
pt3dadd(348.9, 1140.62, 117.55, 4.08)
pt3dadd(348.98, 1140.71, 117.55, 4.08)
pt3dadd(349.07, 1140.81, 117.55, 4.08)
pt3dadd(349.07, 1141.01, 117.55, 4.08)
pt3dadd(349.15, 1141.2, 117.55, 4.08)
pt3dadd(349.24, 1141.29, 117.55, 4.08)
pt3dadd(349.24, 1141.49, 117.55, 4.08)
pt3dadd(349.33, 1141.58, 117.55, 4.08)
pt3dadd(349.33, 1141.78, 117.55, 4.08)
pt3dadd(349.41, 1141.87, 117.55, 4.08)
pt3dadd(349.41, 1142.06, 117.55, 4.08)
pt3dadd(349.49, 1142.26, 117.55, 4.08)
pt3dadd(349.49, 1142.45, 117.55, 4.08)
pt3dadd(349.58, 1142.55, 117.55, 4.08)
pt3dadd(349.67, 1142.65, 117.55, 4.08)
pt3dadd(349.67, 1142.93, 117.55, 4.08)
pt3dadd(349.75, 1143.03, 117.55, 4.08)
pt3dadd(349.75, 1143.42, 117.55, 4.08)
pt3dadd(349.83, 1143.61, 117.55, 4.08)
pt3dadd(349.92, 1143.7, 117.55, 4.08)
pt3dadd(349.92, 1145.83, 117.55, 4.08)
pt3dadd(350.01, 1146.02, 117.55, 4.08)
pt3dadd(350.01, 1146.21, 117.55, 4.08)
pt3dadd(350.09, 1146.31, 117.55, 4.08)
pt3dadd(350.09, 1146.6, 117.55, 4.08)
pt3dadd(350.17, 1146.69, 117.55, 4.08)
pt3dadd(350.26, 1146.79, 117.55, 4.08)
pt3dadd(350.35, 1146.89, 117.55, 4.08)
pt3dadd(350.43, 1146.98, 117.55, 4.08)
pt3dadd(350.52, 1147.08, 117.55, 4.08)
pt3dadd(350.6, 1147.18, 117.55, 4.08)
pt3dadd(350.68, 1147.27, 117.55, 4.08)
pt3dadd(350.68, 1150.84, 117.55, 4.08)
pt3dadd(350.77, 1151.04, 117.55, 4.08)
pt3dadd(350.77, 1151.61, 117.55, 4.08)
pt3dadd(350.85, 1151.9, 117.55, 4.08)
pt3dadd(350.85, 1152.39, 117.55, 4.08)
pt3dadd(351.02, 1152.29, 117.55, 3.74)
pt3dadd(351.11, 1152.39, 117.55, 3.74)
pt3dadd(351.19, 1152.48, 117.55, 3.74)
pt3dadd(351.19, 1153.64, 117.55, 3.74)
pt3dadd(351.28, 1153.83, 117.55, 3.74)
pt3dadd(351.28, 1154.22, 117.55, 3.74)
pt3dadd(351.36, 1154.31, 117.55, 3.74)
pt3dadd(351.36, 1154.6, 117.55, 3.74)
pt3dadd(351.45, 1154.7, 117.55, 3.74)
pt3dadd(351.45, 1157.11, 117.55, 3.74)
pt3dadd(351.53, 1157.21, 117.55, 3.74)
pt3dadd(351.53, 1157.4, 117.55, 3.74)
pt3dadd(351.62, 1157.5, 117.55, 3.74)
pt3dadd(351.62, 1157.88, 117.55, 3.74)
pt3dadd(351.7, 1157.98, 117.55, 3.74)
pt3dadd(351.7, 1158.27, 117.55, 3.74)
pt3dadd(351.79, 1158.36, 117.55, 3.74)
pt3dadd(351.79, 1158.56, 117.55, 3.74)
pt3dadd(351.87, 1158.66, 117.55, 3.74)
pt3dadd(351.87, 1159.14, 117.55, 3.74)
pt3dadd(351.96, 1159.23, 117.55, 3.74)
pt3dadd(351.96, 1159.52, 117.55, 3.74)
pt3dadd(352.04, 1159.62, 117.55, 3.74)
pt3dadd(352.04, 1159.91, 117.55, 3.74)
pt3dadd(352.13, 1160.01, 117.55, 3.74)
pt3dadd(352.21, 1160.1, 117.55, 3.74)
pt3dadd(352.3, 1160.3, 117.55, 3.74)
pt3dadd(352.38, 1160.58, 117.55, 3.74)
pt3dadd(352.38, 1160.87, 117.55, 3.74)
pt3dadd(352.55, 1161.06, 117.55, 3.74)
pt3dadd(352.64, 1161.26, 117.55, 3.74)
pt3dadd(352.64, 1160.1, 117.55, 3.74)
pt3dadd(352.47, 1160.01, 117.55, 3.74)
pt3dadd(352.38, 1159.81, 117.55, 3.74)
pt3dadd(352.3, 1159.71, 117.55, 3.74)
pt3dadd(352.21, 1159.52, 117.55, 3.74)
pt3dadd(352.21, 1159.43, 117.55, 3.74)
pt3dadd(352.3, 1159.52, 117.55, 3.74)
pt3dadd(352.3, 1159.71, 117.55, 3.74)
pt3dadd(352.38, 1159.81, 117.55, 3.74)
pt3dadd(352.47, 1159.91, 117.55, 3.74)
pt3dadd(352.64, 1159.91, 117.55, 3.74)
pt3dadd(352.72, 1160.1, 117.55, 3.74)
pt3dadd(352.81, 1160.2, 117.55, 3.74)
pt3dadd(352.89, 1160.3, 117.55, 3.74)
pt3dadd(352.89, 1160.58, 117.55, 3.74)
pt3dadd(352.98, 1160.78, 117.55, 3.74)
pt3dadd(352.98, 1161.35, 117.55, 3.74)
pt3dadd(353.06, 1161.55, 117.55, 3.74)
pt3dadd(353.15, 1161.65, 117.55, 3.74)
pt3dadd(353.15, 1162.42, 117.55, 3.74)
pt3dadd(353.06, 1162.61, 117.55, 3.74)
pt3dadd(352.98, 1162.8, 117.55, 3.74)
pt3dadd(352.98, 1163.19, 117.55, 3.74)
pt3dadd(352.89, 1163.29, 117.55, 3.74)
pt3dadd(352.81, 1163.38, 117.55, 3.74)
pt3dadd(352.81, 1165.98, 117.55, 3.74)
pt3dadd(352.89, 1166.08, 117.55, 3.74)
pt3dadd(352.89, 1166.28, 117.55, 3.74)
pt3dadd(352.98, 1166.37, 117.55, 3.74)
pt3dadd(352.98, 1166.66, 117.55, 3.74)
pt3dadd(353.06, 1166.85, 117.55, 3.74)
pt3dadd(353.15, 1166.95, 117.55, 3.74)
pt3dadd(353.15, 1167.14, 117.55, 3.74)
pt3dadd(353.23, 1167.24, 117.55, 3.74)
pt3dadd(353.23, 1167.43, 117.55, 3.74)
pt3dadd(353.32, 1167.53, 117.55, 3.74)
pt3dadd(353.4, 1167.63, 117.55, 3.74)
pt3dadd(353.48, 1167.72, 117.55, 3.74)
pt3dadd(353.48, 1167.92, 117.55, 3.74)
pt3dadd(353.57, 1168.01, 117.55, 3.74)
pt3dadd(353.57, 1168.2, 117.55, 3.74)
pt3dadd(353.65, 1168.3, 117.55, 3.74)
pt3dadd(353.74, 1168.49, 117.55, 3.74)
pt3dadd(353.83, 1168.97, 117.55, 3.4)
pt3dadd(353.83, 1169.17, 117.55, 4.76)
pt3dadd(353.83, 1170.71, 117.55, 4.76)
pt3dadd(353.91, 1170.81, 117.55, 4.76)
pt3dadd(353.99, 1170.91, 117.55, 4.76)
pt3dadd(353.99, 1171.1, 117.55, 4.76)
pt3dadd(354.08, 1171.19, 117.55, 4.76)
pt3dadd(354.08, 1171.39, 117.55, 4.76)
pt3dadd(354.17, 1171.48, 117.55, 4.76)
pt3dadd(354.17, 1172.64, 117.55, 4.76)
pt3dadd(354.25, 1172.74, 117.55, 4.76)
pt3dadd(354.33, 1172.83, 117.55, 4.76)
pt3dadd(354.33, 1173.03, 117.55, 4.76)
pt3dadd(354.42, 1173.12, 117.55, 4.76)
pt3dadd(354.51, 1173.22, 117.55, 4.76)
pt3dadd(354.59, 1173.41, 117.55, 4.76)
pt3dadd(354.59, 1173.6, 117.55, 4.76)
pt3dadd(354.67, 1173.7, 117.55, 4.76)
pt3dadd(354.76, 1173.8, 117.55, 4.76)
pt3dadd(354.76, 1174.09, 117.55, 4.76)
pt3dadd(354.85, 1174.18, 117.55, 4.76)
pt3dadd(354.85, 1174.76, 117.55, 4.76)
pt3dadd(354.93, 1174.95, 117.55, 4.76)
}
}
proc shape3d_110() {
dend[70] { pt3dadd(354.93, 1175.15, 117.55, 4.76)
pt3dadd(355.02, 1175.24, 117.55, 4.76)
pt3dadd(355.02, 1175.44, 117.55, 4.76)
pt3dadd(355.1, 1175.53, 117.55, 4.76)
pt3dadd(355.1, 1176.79, 117.55, 4.76)
pt3dadd(355.18, 1176.89, 117.55, 4.76)
pt3dadd(355.18, 1177.56, 117.55, 4.76)
pt3dadd(355.18, 1178.04, 117.55, 3.4)
pt3dadd(355.18, 1178.23, 117.55, 3.4)
pt3dadd(355.27, 1178.33, 117.55, 3.4)
pt3dadd(355.36, 1178.43, 117.55, 3.4)
pt3dadd(355.44, 1178.62, 117.55, 3.4)
pt3dadd(355.52, 1178.72, 117.55, 3.4)
pt3dadd(355.52, 1179.2, 117.55, 3.4)
pt3dadd(355.61, 1179.3, 117.55, 3.4)
pt3dadd(355.61, 1179.68, 117.55, 3.4)
pt3dadd(355.7, 1179.78, 117.55, 3.4)
pt3dadd(355.7, 1180.45, 117.55, 3.4)
pt3dadd(355.95, 1180.74, 117.55, 4.76)
pt3dadd(356.03, 1180.84, 117.55, 4.76)
pt3dadd(356.03, 1181.13, 117.55, 4.76)
pt3dadd(356.12, 1181.22, 117.55, 4.76)
pt3dadd(356.12, 1181.71, 117.55, 4.76)
pt3dadd(356.2, 1181.8, 117.55, 4.76)
pt3dadd(356.2, 1182.86, 117.55, 4.76)
pt3dadd(356.29, 1183.06, 117.55, 4.76)
pt3dadd(356.37, 1183.15, 117.55, 4.76)
pt3dadd(356.46, 1183.25, 117.55, 4.76)
pt3dadd(356.46, 1183.44, 117.55, 4.76)
pt3dadd(356.54, 1183.64, 117.55, 4.76)
pt3dadd(356.54, 1185.18, 117.55, 4.76)
pt3dadd(356.8, 1184.89, 117.55, 4.08)
pt3dadd(356.8, 1185.76, 117.55, 4.08)
pt3dadd(356.88, 1185.85, 117.55, 4.08)
pt3dadd(356.88, 1186.14, 117.55, 4.08)
pt3dadd(356.97, 1186.24, 117.55, 4.08)
pt3dadd(357.05, 1186.33, 117.55, 4.08)
pt3dadd(357.14, 1186.43, 117.55, 4.08)
pt3dadd(357.22, 1186.53, 117.55, 4.08)
pt3dadd(357.22, 1187.59, 117.55, 4.08)
pt3dadd(357.39, 1187.78, 117.55, 3.74)
pt3dadd(357.48, 1187.88, 117.55, 3.74)
pt3dadd(357.48, 1188.07, 117.55, 3.74)
pt3dadd(357.56, 1188.17, 117.55, 3.74)
pt3dadd(357.65, 1188.36, 117.55, 3.74)
pt3dadd(357.73, 1188.46, 117.55, 3.74)
pt3dadd(357.82, 1188.56, 117.55, 3.74)
pt3dadd(357.9, 1188.65, 117.55, 3.74)
pt3dadd(357.9, 1188.84, 117.55, 3.74)
pt3dadd(357.99, 1188.94, 117.55, 3.74)
pt3dadd(358.07, 1189.04, 117.55, 3.74)
pt3dadd(358.16, 1189.23, 117.55, 3.74)
pt3dadd(358.16, 1189.42, 117.55, 3.74)
pt3dadd(358.24, 1189.52, 117.55, 3.74)
pt3dadd(358.33, 1189.61, 117.55, 3.74)
pt3dadd(358.33, 1189.81, 117.55, 3.74)
pt3dadd(358.41, 1189.91, 117.55, 3.74)
pt3dadd(358.41, 1190.1, 117.55, 3.74)
pt3dadd(358.5, 1190.19, 117.55, 3.74)
pt3dadd(358.5, 1190.39, 117.55, 3.74)
pt3dadd(358.58, 1190.48, 117.55, 3.74)
pt3dadd(358.67, 1190.58, 117.55, 3.74)
pt3dadd(358.67, 1190.77, 117.55, 3.74)
pt3dadd(358.75, 1190.87, 117.55, 3.74)
pt3dadd(358.83, 1190.96, 117.55, 3.74)
pt3dadd(358.92, 1191.06, 117.55, 3.74)
pt3dadd(359.01, 1191.26, 117.55, 3.74)
pt3dadd(359.09, 1191.45, 117.55, 3.74)
pt3dadd(359.17, 1191.55, 117.55, 3.74)
pt3dadd(359.17, 1191.74, 117.55, 3.74)
pt3dadd(359.26, 1191.93, 117.55, 3.74)
pt3dadd(359.26, 1192.12, 117.55, 3.74)
pt3dadd(359.35, 1192.31, 117.55, 3.74)
pt3dadd(359.35, 1192.8, 117.55, 3.74)
pt3dadd(359.43, 1192.9, 117.55, 3.74)
pt3dadd(359.43, 1193.09, 117.55, 3.74)
pt3dadd(359.52, 1193.19, 117.55, 3.74)
pt3dadd(359.52, 1193.57, 117.55, 3.74)
pt3dadd(359.6, 1193.67, 117.55, 3.74)
pt3dadd(359.6, 1193.86, 117.55, 3.74)
pt3dadd(359.68, 1193.95, 117.55, 3.74)
pt3dadd(359.68, 1194.54, 117.55, 3.74)
pt3dadd(359.77, 1194.63, 117.55, 3.74)
pt3dadd(359.77, 1195.31, 117.55, 3.74)
pt3dadd(359.86, 1195.5, 117.55, 3.74)
pt3dadd(359.94, 1195.59, 117.55, 3.74)
pt3dadd(359.94, 1195.79, 117.55, 3.74)
pt3dadd(360.02, 1195.89, 117.55, 3.74)
pt3dadd(360.11, 1195.98, 117.55, 3.74)
pt3dadd(360.2, 1196.08, 117.55, 3.74)
pt3dadd(360.28, 1196.27, 117.55, 3.74)
pt3dadd(360.36, 1196.37, 117.55, 3.74)
pt3dadd(360.36, 1196.56, 117.55, 3.74)
pt3dadd(360.45, 1196.66, 117.55, 3.74)
pt3dadd(360.54, 1196.85, 117.55, 3.74)
pt3dadd(360.54, 1199.07, 117.55, 3.74)
pt3dadd(360.28, 1197.53, 117.55, 3.06)
pt3dadd(360.28, 1199.26, 117.55, 3.06)
pt3dadd(360.36, 1199.36, 117.55, 3.06)
pt3dadd(360.36, 1199.55, 117.55, 3.06)
pt3dadd(360.45, 1199.65, 117.55, 3.06)
pt3dadd(360.45, 1199.84, 117.55, 3.06)
pt3dadd(360.54, 1200.03, 117.55, 3.06)
pt3dadd(360.62, 1200.13, 117.55, 3.06)
pt3dadd(360.62, 1200.32, 117.55, 3.06)
pt3dadd(360.7, 1200.52, 117.55, 3.06)
pt3dadd(360.79, 1200.61, 117.55, 3.06)
pt3dadd(360.79, 1200.8, 117.55, 3.06)
pt3dadd(360.88, 1200.9, 117.55, 3.06)
pt3dadd(360.96, 1201, 117.55, 3.06)
pt3dadd(361.05, 1201.19, 117.55, 3.06)
pt3dadd(361.05, 1201.57, 117.55, 3.06)
pt3dadd(361.13, 1201.67, 117.55, 3.06)
pt3dadd(361.13, 1202.25, 117.55, 3.06)
pt3dadd(361.21, 1202.35, 117.55, 3.06)
pt3dadd(361.3, 1202.44, 117.55, 3.06)
pt3dadd(361.3, 1202.73, 117.55, 3.06)
pt3dadd(361.38, 1202.83, 117.55, 3.06)
pt3dadd(361.38, 1203.02, 117.55, 3.06)
pt3dadd(361.47, 1203.12, 117.55, 3.06)
pt3dadd(361.47, 1203.6, 117.55, 3.06)
pt3dadd(361.55, 1203.7, 117.55, 3.06)
pt3dadd(361.55, 1203.99, 117.55, 3.06)
pt3dadd(361.64, 1204.08, 117.55, 3.06)
pt3dadd(361.72, 1204.18, 117.55, 3.06)
pt3dadd(361.81, 1204.28, 117.55, 3.06)
pt3dadd(361.89, 1204.47, 117.55, 3.06)
pt3dadd(361.89, 1204.85, 117.55, 3.06)
pt3dadd(361.98, 1204.95, 117.55, 3.06)
pt3dadd(361.98, 1205.34, 117.55, 3.06)
pt3dadd(362.06, 1205.53, 117.55, 3.06)
pt3dadd(362.06, 1205.82, 117.55, 3.06)
pt3dadd(362.15, 1206.01, 117.55, 3.06)
pt3dadd(362.15, 1206.3, 117.55, 3.06)
pt3dadd(362.23, 1206.49, 117.55, 3.06)
pt3dadd(362.4, 1206.3, 117.55, 2.72)
pt3dadd(362.49, 1206.4, 117.55, 2.72)
pt3dadd(362.49, 1207.07, 117.55, 2.72)
pt3dadd(362.74, 1207.17, 117.55, 4.08)
pt3dadd(362.83, 1207.27, 117.55, 4.08)
pt3dadd(362.91, 1207.36, 117.55, 4.08)
pt3dadd(363, 1207.46, 117.55, 4.08)
pt3dadd(363.08, 1207.56, 117.55, 4.08)
pt3dadd(363.17, 1207.65, 117.55, 4.08)
pt3dadd(363.25, 1207.84, 117.55, 4.08)
pt3dadd(363.34, 1207.94, 117.55, 4.08)
pt3dadd(363.34, 1208.14, 117.55, 4.08)
pt3dadd(363.42, 1208.23, 117.55, 4.08)
pt3dadd(363.51, 1208.33, 117.55, 4.08)
pt3dadd(363.59, 1208.52, 117.55, 4.08)
pt3dadd(363.68, 1208.61, 117.55, 4.08)
pt3dadd(363.68, 1208.81, 117.55, 4.08)
pt3dadd(363.76, 1209, 117.55, 4.08)
pt3dadd(363.85, 1209.19, 117.55, 4.08)
pt3dadd(363.85, 1209.48, 117.55, 4.08)
pt3dadd(363.93, 1209.68, 117.55, 4.08)
pt3dadd(364.02, 1209.87, 117.55, 4.08)
pt3dadd(364.02, 1210.26, 117.55, 4.08)
pt3dadd(364.1, 1210.35, 117.55, 4.08)
pt3dadd(364.18, 1210.45, 117.55, 4.08)
pt3dadd(364.27, 1210.64, 117.55, 4.08)
pt3dadd(364.36, 1210.83, 117.55, 4.08)
pt3dadd(364.44, 1211.03, 117.55, 4.08)
pt3dadd(364.52, 1211.13, 117.55, 4.08)
pt3dadd(364.61, 1211.22, 117.55, 4.08)
pt3dadd(363.17, 1207.46, 117.55, 3.06)
pt3dadd(363.25, 1207.56, 117.55, 3.06)
pt3dadd(363.25, 1207.94, 117.55, 3.06)
pt3dadd(363.34, 1208.04, 117.55, 3.06)
pt3dadd(363.42, 1208.14, 117.55, 3.06)
pt3dadd(363.42, 1208.52, 117.55, 3.06)
pt3dadd(363.51, 1208.61, 117.55, 3.06)
pt3dadd(363.51, 1209, 117.55, 3.06)
pt3dadd(363.59, 1209.1, 117.55, 3.06)
pt3dadd(363.59, 1209.39, 117.55, 3.06)
pt3dadd(363.68, 1209.48, 117.55, 3.06)
pt3dadd(363.68, 1209.77, 117.55, 3.06)
pt3dadd(363.76, 1209.87, 117.55, 3.06)
pt3dadd(363.85, 1209.97, 117.55, 3.06)
pt3dadd(363.93, 1210.16, 117.55, 3.06)
pt3dadd(363.93, 1210.45, 117.55, 3.06)
pt3dadd(364.02, 1210.55, 117.55, 3.06)
pt3dadd(364.1, 1210.74, 117.55, 3.06)
pt3dadd(364.18, 1210.83, 117.55, 3.06)
pt3dadd(364.27, 1210.93, 117.55, 3.06)
pt3dadd(364.44, 1211.13, 117.55, 3.06)
pt3dadd(364.52, 1211.22, 117.55, 3.06)
pt3dadd(364.61, 1211.32, 117.55, 3.06)
pt3dadd(364.7, 1211.51, 117.55, 3.06)
pt3dadd(364.78, 1211.6, 117.55, 3.06)
pt3dadd(364.86, 1211.7, 117.55, 3.06)
pt3dadd(365.04, 1211.8, 117.55, 3.06)
pt3dadd(365.12, 1211.9, 117.55, 3.06)
pt3dadd(365.2, 1212.09, 117.55, 3.06)
pt3dadd(365.2, 1212.38, 117.55, 3.06)
pt3dadd(365.29, 1212.57, 117.55, 3.06)
pt3dadd(365.29, 1212.86, 117.55, 3.06)
pt3dadd(365.38, 1212.96, 117.55, 3.06)
pt3dadd(365.38, 1213.15, 117.55, 3.06)
pt3dadd(365.46, 1213.24, 117.55, 3.06)
}
}
proc shape3d_111() {
dend[70] { pt3dadd(365.46, 1213.44, 117.55, 3.06)
pt3dadd(365.55, 1213.54, 117.55, 3.06)
pt3dadd(365.63, 1213.63, 117.55, 3.06)
pt3dadd(365.71, 1213.82, 117.55, 3.06)
pt3dadd(365.8, 1213.92, 117.55, 3.06)
pt3dadd(365.89, 1214.02, 117.55, 3.06)
pt3dadd(365.97, 1214.11, 117.55, 3.06)
pt3dadd(366.05, 1214.21, 117.55, 3.06)
pt3dadd(366.14, 1214.31, 117.55, 3.06)
pt3dadd(366.31, 1214.4, 117.55, 3.06)
pt3dadd(366.39, 1214.59, 117.55, 3.06)
pt3dadd(366.48, 1214.69, 117.55, 3.06)
pt3dadd(366.56, 1214.79, 117.55, 3.06)
pt3dadd(366.73, 1214.79, 117.55, 3.06)
pt3dadd(366.73, 1214.89, 117.55, 3.74)
pt3dadd(366.73, 1214.69, 117.55, 3.74)
pt3dadd(366.82, 1214.79, 117.55, 3.74)
pt3dadd(366.9, 1214.89, 117.55, 3.74)
pt3dadd(366.99, 1214.98, 117.55, 3.74)
pt3dadd(367.07, 1215.08, 117.55, 3.74)
pt3dadd(367.16, 1215.18, 117.55, 3.74)
pt3dadd(367.24, 1215.27, 117.55, 3.74)
pt3dadd(367.33, 1215.37, 117.55, 3.74)
pt3dadd(367.33, 1215.56, 117.55, 3.74)
pt3dadd(367.41, 1215.75, 117.55, 3.74)
pt3dadd(367.5, 1215.95, 117.55, 3.74)
pt3dadd(367.58, 1216.04, 117.55, 3.74)
pt3dadd(367.67, 1216.23, 117.55, 3.74)
pt3dadd(367.75, 1216.43, 117.55, 3.74)
pt3dadd(367.84, 1216.53, 117.55, 3.74)
pt3dadd(367.92, 1216.62, 117.55, 3.74)
pt3dadd(367.92, 1216.81, 117.55, 3.74)
pt3dadd(368.01, 1216.91, 117.55, 3.74)
pt3dadd(368.09, 1217.01, 117.55, 3.74)
pt3dadd(368.09, 1217.3, 117.55, 3.74)
pt3dadd(368.18, 1217.39, 117.55, 3.74)
pt3dadd(368.26, 1217.49, 117.55, 3.74)
pt3dadd(368.35, 1217.58, 117.55, 3.74)
pt3dadd(368.43, 1217.68, 117.55, 3.74)
pt3dadd(368.52, 1217.78, 117.55, 3.74)
pt3dadd(368.6, 1217.88, 117.55, 3.74)
pt3dadd(368.69, 1217.97, 117.55, 3.74)
pt3dadd(368.77, 1218.07, 117.55, 3.74)
pt3dadd(368.86, 1218.17, 117.55, 3.74)
pt3dadd(368.94, 1218.26, 117.55, 3.74)
pt3dadd(369.02, 1218.36, 117.55, 3.74)
pt3dadd(369.11, 1218.45, 117.55, 3.74)
pt3dadd(369.2, 1218.65, 117.55, 3.74)
pt3dadd(369.28, 1218.74, 117.55, 3.74)
pt3dadd(369.28, 1218.94, 117.55, 3.74)
pt3dadd(369.36, 1219.03, 117.55, 3.74)
pt3dadd(369.45, 1219.13, 117.55, 3.74)
pt3dadd(369.54, 1219.22, 117.55, 3.74)
pt3dadd(369.62, 1219.32, 117.55, 3.74)
pt3dadd(369.7, 1219.42, 117.55, 3.74)
pt3dadd(369.79, 1219.52, 117.55, 3.74)
pt3dadd(369.88, 1219.61, 117.55, 3.74)
pt3dadd(369.96, 1219.81, 117.55, 3.74)
pt3dadd(370.05, 1219.9, 117.55, 3.74)
pt3dadd(370.13, 1220, 117.55, 3.74)
pt3dadd(370.21, 1220.09, 117.55, 3.74)
pt3dadd(370.3, 1220.29, 117.55, 3.74)
pt3dadd(370.39, 1220.38, 117.55, 3.74)
pt3dadd(370.47, 1220.48, 117.55, 3.74)
pt3dadd(370.55, 1220.57, 117.55, 3.74)
pt3dadd(370.73, 1220.67, 117.55, 3.74)
pt3dadd(370.81, 1220.77, 117.55, 3.74)
pt3dadd(370.89, 1220.86, 117.55, 3.74)
pt3dadd(370.98, 1220.96, 117.55, 3.74)
pt3dadd(371.07, 1221.06, 117.55, 3.74)
pt3dadd(371.15, 1221.16, 117.55, 3.74)
pt3dadd(371.23, 1221.25, 117.55, 3.74)
pt3dadd(371.32, 1221.35, 117.55, 3.74)
pt3dadd(371.4, 1221.54, 117.55, 3.74)
pt3dadd(371.49, 1221.64, 117.55, 3.74)
pt3dadd(371.57, 1221.73, 117.55, 3.74)
pt3dadd(371.66, 1221.83, 117.55, 3.74)
pt3dadd(371.74, 1221.93, 117.55, 3.74)
pt3dadd(371.83, 1222.02, 117.55, 3.74)
pt3dadd(371.91, 1222.12, 117.55, 3.74)
pt3dadd(372, 1222.21, 117.55, 3.74)
pt3dadd(372.08, 1222.31, 117.55, 3.74)
pt3dadd(372.17, 1222.41, 117.55, 3.74)
pt3dadd(372.34, 1222.51, 117.55, 3.74)
pt3dadd(372.42, 1222.6, 117.55, 3.74)
pt3dadd(372.51, 1222.7, 117.55, 3.74)
pt3dadd(372.59, 1222.8, 117.55, 3.74)
pt3dadd(372.68, 1222.89, 117.55, 3.74)
pt3dadd(372.76, 1222.99, 117.55, 3.74)
pt3dadd(372.85, 1223.08, 117.55, 3.74)
pt3dadd(372.93, 1223.18, 117.55, 3.74)
pt3dadd(373.02, 1223.37, 117.55, 3.74)
pt3dadd(373.1, 1223.56, 117.55, 3.74)
pt3dadd(373.19, 1223.66, 117.55, 3.74)
pt3dadd(373.27, 1223.76, 117.55, 3.74)
pt3dadd(373.36, 1223.85, 117.55, 3.74)
pt3dadd(373.44, 1223.95, 117.55, 3.74)
pt3dadd(373.44, 1224.15, 117.55, 3.74)
pt3dadd(373.53, 1224.24, 117.55, 3.74)
pt3dadd(373.61, 1224.34, 117.55, 3.74)
pt3dadd(373.7, 1224.53, 117.55, 3.74)
pt3dadd(373.78, 1224.63, 117.55, 3.74)
pt3dadd(373.78, 1224.82, 117.55, 3.74)
pt3dadd(373.95, 1224.82, 117.55, 3.74)
pt3dadd(373.95, 1225.01, 117.55, 3.74)
pt3dadd(374.04, 1225.11, 117.55, 3.74)
pt3dadd(374.12, 1225.2, 117.55, 3.74)
pt3dadd(374.2, 1225.3, 117.55, 3.74)
pt3dadd(374.2, 1225.49, 117.55, 3.74)
pt3dadd(374.29, 1225.59, 117.55, 3.74)
pt3dadd(374.29, 1226.17, 117.55, 3.74)
pt3dadd(374.38, 1226.27, 117.55, 3.74)
pt3dadd(374.38, 1226.56, 117.55, 3.74)
pt3dadd(374.46, 1226.65, 117.55, 3.74)
pt3dadd(374.55, 1226.75, 117.55, 3.74)
pt3dadd(374.55, 1226.94, 117.55, 3.74)
pt3dadd(374.63, 1227.04, 117.55, 3.74)
pt3dadd(374.71, 1227.14, 117.55, 3.74)
pt3dadd(374.71, 1227.43, 117.55, 3.74)
pt3dadd(374.8, 1227.52, 117.55, 3.74)
pt3dadd(374.8, 1227.91, 117.55, 3.74)
pt3dadd(374.89, 1228, 117.55, 3.74)
pt3dadd(374.97, 1228.1, 117.55, 3.74)
pt3dadd(374.97, 1228.29, 117.55, 3.74)
pt3dadd(375.05, 1228.39, 117.55, 3.74)
pt3dadd(375.14, 1228.48, 117.55, 3.74)
pt3dadd(375.23, 1228.58, 117.55, 3.74)
pt3dadd(375.31, 1228.68, 117.55, 3.74)
pt3dadd(375.31, 1228.87, 117.55, 3.74)
pt3dadd(375.39, 1229.06, 117.55, 3.74)
pt3dadd(375.48, 1229.16, 117.55, 3.74)
pt3dadd(375.57, 1229.26, 117.55, 3.74)
pt3dadd(375.65, 1229.35, 117.55, 3.74)
pt3dadd(375.65, 1229.55, 117.55, 3.74)
pt3dadd(375.73, 1229.64, 117.55, 3.74)
pt3dadd(375.82, 1229.74, 117.55, 3.74)
pt3dadd(375.9, 1229.83, 117.55, 3.74)
pt3dadd(375.99, 1229.93, 117.55, 3.74)
pt3dadd(376.08, 1230.03, 117.55, 3.74)
pt3dadd(376.16, 1230.13, 117.55, 3.74)
pt3dadd(376.24, 1230.22, 117.55, 3.74)
pt3dadd(376.24, 1230.42, 117.55, 3.74)
pt3dadd(376.33, 1230.51, 117.55, 3.74)
pt3dadd(376.42, 1230.61, 117.55, 3.74)
pt3dadd(376.5, 1230.7, 117.55, 3.74)
pt3dadd(376.58, 1230.8, 117.55, 3.74)
pt3dadd(376.67, 1230.9, 117.55, 3.74)
pt3dadd(376.76, 1230.99, 117.55, 3.74)
pt3dadd(376.84, 1231.09, 117.55, 3.74)
pt3dadd(376.92, 1231.19, 117.55, 3.74)
pt3dadd(377.01, 1231.28, 117.55, 3.74)
pt3dadd(377.09, 1231.38, 117.55, 3.74)
pt3dadd(377.18, 1231.47, 117.55, 3.74)
pt3dadd(377.18, 1231.67, 117.55, 3.74)
pt3dadd(377.26, 1231.77, 117.55, 3.74)
pt3dadd(377.35, 1231.96, 117.55, 3.74)
pt3dadd(377.43, 1232.05, 117.55, 3.74)
pt3dadd(377.43, 1232.25, 117.55, 3.74)
pt3dadd(377.52, 1232.34, 117.55, 3.74)
pt3dadd(377.6, 1232.44, 117.55, 3.74)
pt3dadd(377.69, 1232.54, 117.55, 3.74)
pt3dadd(377.69, 1232.73, 117.55, 3.74)
pt3dadd(377.77, 1232.82, 117.55, 3.74)
pt3dadd(377.86, 1232.92, 117.55, 3.74)
pt3dadd(377.94, 1233.11, 117.55, 3.74)
pt3dadd(378.03, 1233.21, 117.55, 3.74)
pt3dadd(378.11, 1233.31, 117.55, 3.74)
pt3dadd(378.2, 1233.41, 117.55, 3.74)
pt3dadd(378.28, 1233.5, 117.55, 3.74)
pt3dadd(378.45, 1233.69, 117.55, 3.74)
pt3dadd(378.54, 1233.79, 117.55, 3.74)
pt3dadd(378.62, 1233.89, 117.55, 3.74)
pt3dadd(378.71, 1233.98, 117.55, 3.74)
pt3dadd(378.79, 1234.08, 117.55, 3.74)
pt3dadd(378.88, 1234.18, 117.55, 3.74)
pt3dadd(378.88, 1234.37, 117.55, 3.74)
pt3dadd(378.96, 1234.46, 117.55, 3.74)
pt3dadd(379.05, 1234.56, 117.55, 3.74)
pt3dadd(379.13, 1234.76, 117.55, 3.74)
pt3dadd(379.22, 1234.85, 117.55, 3.74)
pt3dadd(379.3, 1235.04, 117.55, 3.74)
pt3dadd(379.39, 1235.14, 117.55, 3.74)
pt3dadd(379.47, 1235.24, 117.55, 3.74)
pt3dadd(379.47, 1235.43, 117.55, 3.74)
pt3dadd(379.55, 1235.53, 117.55, 3.74)
pt3dadd(379.55, 1235.72, 117.55, 3.74)
pt3dadd(379.64, 1235.81, 117.55, 3.74)
pt3dadd(379.64, 1236.01, 117.55, 3.74)
pt3dadd(379.73, 1236.1, 117.55, 3.74)
pt3dadd(379.73, 1236.4, 117.55, 3.74)
pt3dadd(379.81, 1236.49, 117.55, 3.74)
pt3dadd(379.81, 1236.68, 117.55, 3.74)
pt3dadd(379.89, 1236.78, 117.55, 3.74)
pt3dadd(379.89, 1237.17, 117.55, 3.74)
pt3dadd(379.98, 1237.26, 117.55, 3.74)
pt3dadd(379.98, 1237.45, 117.55, 3.74)
pt3dadd(380.07, 1237.65, 117.55, 3.74)
pt3dadd(380.07, 1237.84, 117.55, 3.74)
pt3dadd(380.15, 1237.94, 117.55, 3.74)
pt3dadd(380.23, 1238.03, 117.55, 3.74)
}
}
proc shape3d_112() {
dend[70] { pt3dadd(380.23, 1238.23, 117.55, 3.74)
pt3dadd(380.32, 1238.32, 117.55, 3.74)
pt3dadd(380.4, 1238.42, 117.55, 3.74)
pt3dadd(380.4, 1238.61, 117.55, 3.74)
pt3dadd(380.49, 1238.71, 117.55, 3.74)
pt3dadd(380.58, 1238.81, 117.55, 3.74)
pt3dadd(380.58, 1239, 117.55, 3.74)
pt3dadd(380.66, 1239.09, 117.55, 3.74)
pt3dadd(380.74, 1239.19, 117.55, 3.74)
pt3dadd(380.83, 1239.29, 117.55, 3.74)
pt3dadd(380.92, 1239.48, 117.55, 3.74)
pt3dadd(381, 1239.67, 117.55, 3.74)
pt3dadd(381.08, 1239.77, 117.55, 3.74)
pt3dadd(381.17, 1239.86, 117.55, 3.74)
pt3dadd(381.17, 1240.44, 117.55, 3.74)
pt3dadd(381.26, 1240.64, 117.55, 3.74)
pt3dadd(381.26, 1241.41, 117.55, 3.74)
pt3dadd(381.17, 1241.51, 117.55, 4.42)
pt3dadd(381.17, 1241.41, 117.55, 4.42)
pt3dadd(381.17, 1241.7, 117.55, 4.42)
pt3dadd(381.26, 1241.8, 117.55, 4.42)
pt3dadd(381.34, 1241.89, 117.55, 4.42)
pt3dadd(381.34, 1242.08, 117.55, 4.42)
pt3dadd(381.42, 1242.18, 117.55, 4.42)
pt3dadd(381.42, 1242.38, 117.55, 4.42)
pt3dadd(381.51, 1242.47, 117.55, 4.42)
pt3dadd(381.6, 1242.57, 117.55, 4.42)
pt3dadd(381.6, 1242.76, 117.55, 4.42)
pt3dadd(381.68, 1242.85, 117.55, 4.42)
pt3dadd(381.77, 1242.95, 117.55, 4.42)
pt3dadd(381.77, 1243.34, 117.55, 4.42)
pt3dadd(381.85, 1243.44, 117.55, 4.42)
pt3dadd(381.85, 1243.72, 117.55, 4.42)
pt3dadd(381.93, 1243.82, 117.55, 4.42)
pt3dadd(381.93, 1245.46, 117.55, 4.42)
pt3dadd(382.02, 1245.56, 117.55, 4.42)
pt3dadd(382.02, 1245.84, 117.55, 4.42)
pt3dadd(382.1, 1245.94, 117.55, 4.42)
pt3dadd(382.19, 1246.04, 117.55, 4.42)
pt3dadd(382.27, 1246.14, 117.55, 4.42)
pt3dadd(382.36, 1246.23, 117.55, 4.42)
pt3dadd(382.53, 1246.43, 117.55, 4.42)
pt3dadd(382.61, 1246.62, 117.55, 4.42)
pt3dadd(382.7, 1246.81, 117.55, 4.42)
pt3dadd(382.78, 1246.52, 117.55, 3.4)
pt3dadd(382.87, 1246.62, 117.55, 3.4)
pt3dadd(382.87, 1247.78, 117.55, 3.4)
pt3dadd(382.95, 1247.87, 117.55, 3.4)
pt3dadd(382.95, 1248.06, 117.55, 3.4)
pt3dadd(383.04, 1248.16, 117.55, 3.4)
pt3dadd(383.21, 1248.16, 117.55, 3.4)
pt3dadd(383.29, 1248.26, 117.55, 3.4)
pt3dadd(383.38, 1248.35, 117.55, 3.4)
pt3dadd(383.46, 1248.45, 117.55, 3.4)
pt3dadd(383.63, 1248.55, 117.55, 3.4)
pt3dadd(383.72, 1248.64, 117.55, 3.4)
pt3dadd(383.8, 1248.83, 117.55, 3.4)
pt3dadd(383.8, 1251.34, 117.55, 3.4)
pt3dadd(383.89, 1251.54, 117.55, 3.4)
pt3dadd(383.97, 1251.73, 117.55, 3.4)
pt3dadd(383.97, 1252.02, 117.55, 3.4)
pt3dadd(384.06, 1252.11, 117.55, 3.4)
pt3dadd(384.06, 1252.6, 117.55, 3.4)
pt3dadd(384.14, 1252.79, 117.55, 3.4)
pt3dadd(384.14, 1253.08, 117.55, 3.4)
pt3dadd(384.23, 1253.18, 117.55, 3.4)
pt3dadd(384.31, 1253.27, 117.55, 3.4)
pt3dadd(384.31, 1253.46, 117.55, 3.4)
pt3dadd(384.4, 1253.56, 117.55, 3.4)
pt3dadd(384.48, 1253.76, 117.55, 3.4)
pt3dadd(384.57, 1253.85, 117.55, 3.4)
pt3dadd(384.65, 1253.95, 117.55, 3.4)
pt3dadd(384.65, 1254.14, 117.55, 3.4)
pt3dadd(384.73, 1254.33, 117.55, 3.4)
pt3dadd(384.82, 1254.43, 117.55, 3.4)
pt3dadd(384.99, 1254.53, 117.55, 3.4)
pt3dadd(385.08, 1254.72, 117.55, 3.4)
pt3dadd(385.16, 1254.81, 117.55, 3.4)
pt3dadd(385.24, 1254.91, 117.55, 3.4)
pt3dadd(385.24, 1257.13, 117.55, 3.4)
pt3dadd(385.33, 1257.23, 117.55, 3.4)
pt3dadd(385.33, 1257.52, 117.55, 3.4)
pt3dadd(385.42, 1257.61, 117.55, 3.4)
pt3dadd(385.42, 1257.81, 117.55, 3.4)
pt3dadd(385.5, 1258, 117.55, 3.4)
pt3dadd(385.5, 1258.19, 117.55, 3.4)
pt3dadd(385.58, 1258.29, 117.55, 3.4)
pt3dadd(385.58, 1260.31, 117.55, 3.4)
pt3dadd(385.58, 1260.6, 117.55, 2.72)
pt3dadd(385.67, 1260.7, 117.55, 2.72)
pt3dadd(385.76, 1260.8, 117.55, 2.72)
pt3dadd(385.84, 1260.89, 117.55, 2.72)
pt3dadd(385.92, 1260.99, 117.55, 2.72)
pt3dadd(385.92, 1261.18, 117.55, 2.72)
pt3dadd(386.01, 1261.28, 117.55, 2.72)
pt3dadd(386.1, 1261.38, 117.55, 2.72)
pt3dadd(386.18, 1261.47, 117.55, 2.72)
pt3dadd(386.27, 1261.57, 117.55, 2.72)
pt3dadd(386.43, 1261.67, 117.55, 2.72)
pt3dadd(386.52, 1261.76, 117.55, 2.72)
pt3dadd(386.61, 1261.86, 117.55, 2.72)
pt3dadd(386.69, 1261.95, 117.55, 2.72)
pt3dadd(386.77, 1262.24, 117.55, 2.72)
pt3dadd(386.77, 1262.53, 117.55, 2.72)
pt3dadd(386.86, 1262.63, 117.55, 2.72)
pt3dadd(386.95, 1262.82, 117.55, 2.72)
pt3dadd(386.95, 1263.3, 117.55, 2.72)
pt3dadd(387.03, 1263.4, 117.55, 2.72)
pt3dadd(387.03, 1264.27, 117.55, 2.72)
pt3dadd(387.11, 1264.36, 117.55, 2.72)
pt3dadd(387.2, 1264.46, 117.55, 2.72)
pt3dadd(387.2, 1264.66, 117.55, 2.72)
pt3dadd(387.28, 1264.85, 117.55, 2.72)
pt3dadd(387.28, 1265.04, 117.55, 2.72)
pt3dadd(387.37, 1265.14, 117.55, 2.72)
pt3dadd(387.37, 1265.91, 117.55, 2.72)
pt3dadd(387.45, 1266.01, 117.55, 2.72)
pt3dadd(387.45, 1266.49, 117.55, 2.72)
pt3dadd(387.54, 1266.58, 117.55, 2.72)
pt3dadd(387.54, 1266.78, 117.55, 2.72)
pt3dadd(387.62, 1266.87, 117.55, 2.72)
pt3dadd(387.71, 1267.06, 117.55, 2.72)
pt3dadd(387.79, 1267.16, 117.55, 2.72)
pt3dadd(387.88, 1267.26, 117.55, 2.72)
pt3dadd(387.96, 1267.35, 117.55, 2.72)
pt3dadd(387.96, 1267.55, 117.55, 2.72)
pt3dadd(388.05, 1267.65, 117.55, 2.72)
pt3dadd(388.13, 1267.74, 117.55, 2.72)
pt3dadd(388.22, 1267.84, 117.55, 2.72)
pt3dadd(388.3, 1267.93, 117.55, 2.72)
pt3dadd(388.39, 1268.03, 117.55, 2.72)
pt3dadd(388.47, 1268.13, 117.55, 2.72)
pt3dadd(388.56, 1268.22, 117.55, 2.72)
pt3dadd(388.64, 1268.32, 117.55, 2.72)
pt3dadd(388.64, 1269.86, 117.55, 2.72)
pt3dadd(388.73, 1269.96, 117.55, 2.72)
pt3dadd(388.73, 1270.15, 117.55, 2.72)
pt3dadd(388.81, 1270.25, 117.55, 2.72)
pt3dadd(388.81, 1270.44, 117.55, 2.72)
pt3dadd(388.9, 1270.54, 117.55, 2.72)
pt3dadd(388.98, 1270.64, 117.55, 2.72)
pt3dadd(388.98, 1270.83, 117.55, 2.72)
pt3dadd(389.07, 1270.92, 117.55, 2.72)
pt3dadd(389.07, 1271.11, 117.55, 2.72)
pt3dadd(389.15, 1271.21, 117.55, 2.72)
pt3dadd(389.24, 1271.31, 117.55, 2.72)
pt3dadd(389.32, 1271.41, 117.55, 2.72)
pt3dadd(389.41, 1271.5, 117.55, 2.72)
pt3dadd(389.49, 1271.6, 117.55, 2.72)
pt3dadd(389.58, 1271.69, 117.55, 2.72)
pt3dadd(389.66, 1271.79, 117.55, 2.72)
pt3dadd(389.75, 1271.89, 117.55, 2.72)
pt3dadd(389.83, 1272.08, 117.55, 2.72)
pt3dadd(389.92, 1272.18, 117.55, 2.72)
pt3dadd(390, 1272.27, 117.55, 2.72)
pt3dadd(390.08, 1272.37, 117.55, 2.72)
pt3dadd(390.08, 1272.56, 117.55, 2.72)
pt3dadd(390.17, 1272.66, 117.55, 2.72)
pt3dadd(390.26, 1272.76, 117.55, 2.72)
pt3dadd(390.26, 1272.95, 117.55, 2.72)
pt3dadd(390.34, 1273.05, 117.55, 2.72)
pt3dadd(390.42, 1273.14, 117.55, 2.72)
pt3dadd(390.42, 1273.33, 117.55, 2.72)
pt3dadd(390.51, 1273.43, 117.55, 2.72)
pt3dadd(390.6, 1273.53, 117.55, 2.72)
pt3dadd(390.68, 1273.63, 117.55, 2.72)
pt3dadd(390.68, 1273.82, 117.55, 2.72)
pt3dadd(390.77, 1273.91, 117.55, 2.72)
pt3dadd(390.77, 1274.2, 117.55, 2.72)
pt3dadd(390.85, 1274.3, 117.55, 2.72)
pt3dadd(390.93, 1274.4, 117.55, 2.72)
pt3dadd(390.93, 1274.59, 117.55, 2.72)
pt3dadd(391.02, 1274.69, 117.55, 2.72)
pt3dadd(391.11, 1274.78, 117.55, 2.72)
pt3dadd(391.19, 1274.88, 117.55, 2.72)
pt3dadd(391.27, 1274.97, 117.55, 2.72)
pt3dadd(391.36, 1275.07, 117.55, 2.72)
pt3dadd(391.36, 1276.04, 117.55, 2.72)
pt3dadd(391.27, 1276.23, 117.55, 2.38)
pt3dadd(391.36, 1276.42, 117.55, 2.38)
pt3dadd(391.45, 1276.61, 117.55, 2.38)
pt3dadd(391.53, 1276.81, 117.55, 2.38)
pt3dadd(391.53, 1277, 117.55, 2.38)
pt3dadd(391.61, 1277.09, 117.55, 2.38)
pt3dadd(391.7, 1277.19, 117.55, 2.38)
pt3dadd(391.79, 1277.39, 117.55, 2.38)
pt3dadd(391.87, 1277.48, 117.55, 2.38)
pt3dadd(391.95, 1277.58, 117.55, 2.38)
pt3dadd(391.95, 1277.77, 117.55, 2.38)
pt3dadd(392.04, 1277.87, 117.55, 2.38)
pt3dadd(392.13, 1278.06, 117.55, 2.38)
pt3dadd(392.21, 1278.16, 117.55, 2.38)
pt3dadd(392.3, 1278.25, 117.55, 2.38)
pt3dadd(392.38, 1278.35, 117.55, 2.38)
pt3dadd(392.46, 1278.45, 117.55, 2.38)
pt3dadd(392.55, 1278.54, 117.55, 2.38)
pt3dadd(392.63, 1278.73, 117.55, 2.38)
pt3dadd(392.72, 1278.83, 117.55, 2.38)
pt3dadd(392.8, 1278.93, 117.55, 2.38)
pt3dadd(392.8, 1279.12, 117.55, 2.38)
}
}
proc shape3d_113() {
dend[70] { pt3dadd(392.89, 1279.22, 117.55, 2.38)
pt3dadd(392.97, 1279.31, 117.55, 2.38)
pt3dadd(393.06, 1279.41, 117.55, 2.38)
pt3dadd(393.14, 1279.51, 117.55, 2.38)
pt3dadd(393.23, 1279.6, 117.55, 2.38)
pt3dadd(393.23, 1279.8, 117.55, 2.38)
pt3dadd(393.31, 1279.89, 117.55, 2.38)
pt3dadd(393.4, 1279.99, 117.55, 2.38)
pt3dadd(393.4, 1280.18, 117.55, 2.38)
pt3dadd(393.48, 1280.28, 117.55, 2.38)
pt3dadd(393.48, 1280.57, 117.55, 2.38)
pt3dadd(393.57, 1280.76, 117.55, 2.38)
pt3dadd(393.57, 1281.53, 117.55, 2.38)
pt3dadd(393.57, 1281.53, 117.55, 3.4)
pt3dadd(393.65, 1281.53, 117.55, 3.4)
pt3dadd(393.74, 1281.63, 117.55, 3.4)
pt3dadd(393.82, 1281.82, 117.55, 3.4)
pt3dadd(393.91, 1281.92, 117.55, 3.4)
pt3dadd(393.91, 1282.11, 117.55, 3.4)
pt3dadd(393.99, 1282.31, 117.55, 3.4)
pt3dadd(393.99, 1282.69, 117.55, 3.4)
pt3dadd(394.08, 1282.79, 117.55, 3.4)
pt3dadd(394.08, 1283.75, 117.55, 3.4)
pt3dadd(394.16, 1283.85, 117.55, 3.4)
pt3dadd(394.25, 1283.94, 117.55, 3.4)
pt3dadd(394.33, 1284.14, 117.55, 3.4)
pt3dadd(394.42, 1284.33, 117.55, 3.4)
pt3dadd(394.59, 1284.62, 117.55, 3.4)
pt3dadd(394.67, 1284.81, 117.55, 3.4)
pt3dadd(394.76, 1284.91, 117.55, 3.4)
pt3dadd(394.84, 1285.01, 117.55, 3.4)
pt3dadd(394.93, 1285.2, 117.55, 3.4)
pt3dadd(395.01, 1285.3, 117.55, 3.4)
pt3dadd(395.1, 1285.39, 117.55, 3.4)
pt3dadd(395.18, 1285.49, 117.55, 3.4)
pt3dadd(395.27, 1285.58, 117.55, 3.4)
pt3dadd(395.35, 1285.78, 117.55, 3.4)
pt3dadd(395.43, 1285.87, 117.55, 3.4)
pt3dadd(395.61, 1286.16, 117.55, 3.4)
pt3dadd(395.77, 1286.35, 117.55, 3.4)
pt3dadd(395.77, 1286.55, 117.55, 3.4)
pt3dadd(395.86, 1286.65, 117.55, 3.4)
pt3dadd(395.95, 1286.84, 117.55, 3.4)
pt3dadd(395.95, 1289.44, 117.55, 3.4)
pt3dadd(396.11, 1289.25, 117.55, 3.06)
pt3dadd(396.11, 1289.44, 117.55, 3.06)
pt3dadd(396.2, 1289.54, 117.55, 3.06)
pt3dadd(396.2, 1289.73, 117.55, 3.06)
pt3dadd(396.29, 1289.93, 117.55, 3.06)
pt3dadd(396.37, 1290.12, 117.55, 3.06)
pt3dadd(396.45, 1290.21, 117.55, 3.06)
pt3dadd(396.45, 1290.41, 117.55, 3.06)
pt3dadd(396.54, 1290.5, 117.55, 3.06)
pt3dadd(396.63, 1290.6, 117.55, 3.06)
pt3dadd(396.71, 1290.69, 117.55, 3.06)
pt3dadd(396.8, 1290.79, 117.55, 3.06)
pt3dadd(396.88, 1290.89, 117.55, 3.06)
pt3dadd(396.96, 1291.08, 117.55, 3.06)
pt3dadd(397.05, 1291.18, 117.55, 3.06)
pt3dadd(397.05, 1291.37, 117.55, 3.06)
pt3dadd(397.14, 1291.56, 117.55, 3.06)
pt3dadd(397.22, 1291.66, 117.55, 3.06)
pt3dadd(397.3, 1291.76, 117.55, 3.06)
pt3dadd(397.39, 1291.85, 117.55, 3.06)
pt3dadd(397.48, 1291.95, 117.55, 3.06)
pt3dadd(397.48, 1292.14, 117.55, 3.06)
pt3dadd(397.56, 1292.24, 117.55, 3.06)
pt3dadd(397.64, 1292.33, 117.55, 3.06)
pt3dadd(397.73, 1292.43, 117.55, 3.06)
pt3dadd(397.81, 1292.53, 117.55, 3.06)
pt3dadd(397.9, 1292.63, 117.55, 3.06)
pt3dadd(397.98, 1292.72, 117.55, 3.06)
pt3dadd(398.07, 1292.82, 117.55, 3.06)
pt3dadd(398.07, 1293.01, 117.55, 3.06)
pt3dadd(398.15, 1293.11, 117.55, 3.06)
pt3dadd(398.24, 1293.3, 117.55, 3.06)
pt3dadd(398.32, 1293.4, 117.55, 3.06)
pt3dadd(398.32, 1293.59, 117.55, 3.06)
pt3dadd(398.41, 1293.69, 117.55, 3.06)
pt3dadd(398.49, 1293.78, 117.55, 3.06)
pt3dadd(398.58, 1293.88, 117.55, 3.06)
pt3dadd(398.58, 1294.07, 117.55, 3.06)
pt3dadd(398.66, 1294.17, 117.55, 3.06)
pt3dadd(398.75, 1294.36, 117.55, 3.06)
pt3dadd(398.83, 1294.46, 117.55, 3.06)
pt3dadd(398.83, 1294.65, 117.55, 3.06)
pt3dadd(398.92, 1294.84, 117.55, 3.06)
pt3dadd(399, 1294.94, 117.55, 3.06)
pt3dadd(399.09, 1295.04, 117.55, 3.06)
pt3dadd(399.17, 1295.13, 117.55, 3.06)
pt3dadd(399.17, 1295.32, 117.55, 3.06)
pt3dadd(399.34, 1295.42, 117.55, 3.06)
pt3dadd(399.34, 1295.61, 117.55, 3.06)
pt3dadd(399.51, 1295.81, 117.55, 3.06)
pt3dadd(399.6, 1295.91, 117.55, 3.06)
pt3dadd(399.6, 1296.1, 117.55, 3.06)
pt3dadd(399.77, 1296.29, 117.55, 3.06)
pt3dadd(399.85, 1296.39, 117.55, 3.06)
pt3dadd(399.94, 1296.48, 117.55, 3.06)
pt3dadd(400.02, 1296.68, 117.55, 3.06)
pt3dadd(400.11, 1296.87, 117.55, 3.06)
pt3dadd(400.19, 1296.96, 117.55, 3.06)
pt3dadd(400.27, 1297.06, 117.55, 3.06)
pt3dadd(400.36, 1297.16, 117.55, 3.06)
pt3dadd(400.45, 1297.26, 117.55, 3.06)
pt3dadd(400.53, 1297.35, 117.55, 3.06)
pt3dadd(400.61, 1297.45, 117.55, 3.06)
pt3dadd(400.61, 1297.64, 117.55, 3.06)
pt3dadd(400.7, 1297.74, 117.55, 3.06)
pt3dadd(400.79, 1297.93, 117.55, 3.06)
pt3dadd(400.87, 1298.12, 117.55, 3.06)
pt3dadd(400.95, 1298.22, 117.55, 3.06)
pt3dadd(400.95, 1298.41, 117.55, 3.06)
pt3dadd(401.04, 1298.51, 117.55, 3.06)
pt3dadd(401.04, 1298.8, 117.55, 3.06)
pt3dadd(401.13, 1298.9, 117.55, 3.06)
pt3dadd(401.13, 1299.18, 117.55, 3.06)
pt3dadd(401.21, 1299.28, 117.55, 3.06)
pt3dadd(401.3, 1299.38, 117.55, 3.06)
pt3dadd(401.3, 1299.57, 117.55, 3.06)
pt3dadd(401.46, 1299.67, 117.55, 3.06)
pt3dadd(401.55, 1299.76, 117.55, 3.06)
pt3dadd(401.64, 1299.86, 117.55, 3.06)
pt3dadd(401.64, 1300.05, 117.55, 3.06)
pt3dadd(401.72, 1300.15, 117.55, 3.06)
pt3dadd(401.8, 1300.24, 117.55, 3.06)
pt3dadd(401.89, 1300.34, 117.55, 3.06)
pt3dadd(401.98, 1300.44, 117.55, 3.06)
pt3dadd(402.06, 1300.53, 117.55, 3.06)
pt3dadd(402.14, 1300.63, 117.55, 3.06)
pt3dadd(402.23, 1300.73, 117.55, 3.06)
pt3dadd(402.32, 1300.82, 117.55, 3.06)
pt3dadd(402.48, 1300.82, 117.55, 3.06)
pt3dadd(402.48, 1301.11, 117.55, 3.06)
pt3dadd(402.57, 1301.31, 117.55, 3.06)
pt3dadd(402.57, 1301.89, 117.55, 3.06)
pt3dadd(402.65, 1302.08, 117.55, 3.06)
pt3dadd(402.65, 1302.46, 117.55, 3.06)
pt3dadd(402.74, 1302.56, 117.55, 3.06)
pt3dadd(402.74, 1302.75, 117.55, 3.06)
pt3dadd(402.82, 1302.85, 117.55, 3.06)
pt3dadd(402.91, 1303.04, 117.55, 3.06)
pt3dadd(402.99, 1303.14, 117.55, 3.06)
pt3dadd(402.99, 1303.33, 117.55, 3.06)
pt3dadd(403.08, 1303.43, 117.55, 3.06)
pt3dadd(403.08, 1303.72, 117.55, 3.06)
pt3dadd(403.16, 1303.81, 117.55, 3.06)
pt3dadd(403.16, 1304.1, 117.55, 3.06)
pt3dadd(403.25, 1304.2, 117.55, 3.06)
pt3dadd(403.33, 1304.3, 117.55, 3.06)
pt3dadd(403.33, 1304.49, 117.55, 3.06)
pt3dadd(403.42, 1304.58, 117.55, 3.06)
pt3dadd(403.5, 1304.68, 117.55, 3.06)
pt3dadd(403.59, 1304.78, 117.55, 3.06)
pt3dadd(403.59, 1305.07, 117.55, 3.06)
pt3dadd(403.67, 1305.16, 117.55, 3.06)
pt3dadd(403.76, 1305.26, 117.55, 3.06)
pt3dadd(403.76, 1305.55, 117.55, 3.06)
pt3dadd(403.84, 1305.74, 117.55, 3.06)
pt3dadd(403.93, 1305.94, 117.55, 3.06)
pt3dadd(403.93, 1306.13, 117.55, 3.06)
pt3dadd(404.01, 1306.22, 117.55, 3.06)
pt3dadd(404.1, 1306.42, 117.55, 3.06)
pt3dadd(404.18, 1306.51, 117.55, 3.06)
pt3dadd(404.18, 1306.8, 117.55, 3.06)
pt3dadd(404.27, 1306.99, 117.55, 3.06)
pt3dadd(404.35, 1307.09, 117.55, 3.06)
pt3dadd(404.35, 1307.29, 117.55, 3.06)
pt3dadd(404.44, 1307.38, 117.55, 3.06)
pt3dadd(404.44, 1307.57, 117.55, 3.06)
pt3dadd(404.52, 1307.86, 117.55, 3.06)
pt3dadd(404.61, 1308.06, 117.55, 3.06)
pt3dadd(404.69, 1308.15, 117.55, 3.06)
pt3dadd(404.69, 1308.44, 117.55, 3.06)
pt3dadd(404.78, 1308.54, 117.55, 3.06)
pt3dadd(404.86, 1308.73, 117.55, 3.06)
pt3dadd(404.86, 1309.12, 117.55, 3.06)
pt3dadd(404.95, 1309.21, 117.55, 3.06)
pt3dadd(405.03, 1309.31, 117.55, 3.06)
pt3dadd(405.12, 1309.41, 117.55, 3.06)
pt3dadd(405.12, 1309.79, 117.55, 3.06)
pt3dadd(405.2, 1309.98, 117.55, 3.06)
pt3dadd(405.29, 1310.18, 117.55, 3.06)
pt3dadd(404.69, 1308.54, 117.55, 2.72)
pt3dadd(404.78, 1308.54, 117.55, 2.72)
pt3dadd(404.86, 1308.64, 117.55, 2.72)
pt3dadd(404.86, 1308.83, 117.55, 2.72)
pt3dadd(404.95, 1309.02, 117.55, 2.72)
pt3dadd(404.95, 1309.31, 117.55, 2.72)
pt3dadd(405.03, 1309.5, 117.55, 2.72)
pt3dadd(405.12, 1309.7, 117.55, 2.72)
pt3dadd(405.2, 1309.79, 117.55, 2.72)
pt3dadd(405.29, 1309.89, 117.55, 2.72)
pt3dadd(405.37, 1309.98, 117.55, 2.72)
pt3dadd(405.37, 1310.18, 117.55, 2.72)
pt3dadd(405.45, 1310.28, 117.55, 2.72)
pt3dadd(405.45, 1312.11, 117.55, 2.72)
pt3dadd(405.54, 1312.2, 117.55, 2.72)
pt3dadd(405.54, 1312.4, 117.55, 2.72)
pt3dadd(405.63, 1312.49, 117.55, 2.72)
}
}
proc shape3d_114() {
dend[70] { pt3dadd(405.63, 1312.78, 117.55, 2.72)
pt3dadd(405.71, 1312.88, 117.55, 2.72)
pt3dadd(405.8, 1312.97, 117.55, 2.72)
pt3dadd(405.88, 1313.07, 117.55, 2.72)
pt3dadd(405.96, 1313.17, 117.55, 2.72)
pt3dadd(405.96, 1313.36, 117.55, 2.72)
pt3dadd(406.05, 1313.56, 117.55, 2.72)
pt3dadd(406.14, 1313.65, 117.55, 2.72)
pt3dadd(406.22, 1313.75, 117.55, 2.72)
pt3dadd(406.22, 1313.94, 117.55, 2.72)
pt3dadd(406.3, 1314.04, 117.55, 2.72)
pt3dadd(406.39, 1314.13, 117.55, 2.72)
pt3dadd(406.48, 1314.32, 117.55, 2.72)
pt3dadd(406.56, 1314.42, 117.55, 2.72)
pt3dadd(406.64, 1314.52, 117.55, 2.72)
pt3dadd(406.73, 1314.61, 117.55, 2.72)
pt3dadd(406.73, 1314.81, 117.55, 2.72)
pt3dadd(406.82, 1314.91, 117.55, 2.72)
pt3dadd(406.82, 1315.19, 117.55, 2.72)
pt3dadd(406.9, 1315.29, 117.55, 2.72)
pt3dadd(406.9, 1316.64, 117.55, 2.72)
pt3dadd(406.73, 1316.74, 117.55, 3.06)
pt3dadd(406.82, 1317.22, 117.55, 3.74)
pt3dadd(406.82, 1323.49, 117.55, 3.74)
pt3dadd(406.9, 1323.68, 117.55, 3.74)
pt3dadd(406.9, 1324.36, 117.55, 3.74)
pt3dadd(406.98, 1324.45, 117.55, 3.74)
pt3dadd(406.98, 1324.84, 117.55, 3.74)
pt3dadd(407.07, 1324.94, 117.55, 3.74)
pt3dadd(407.07, 1325.52, 117.55, 3.74)
pt3dadd(407.15, 1325.61, 117.55, 3.74)
pt3dadd(407.15, 1325.9, 117.55, 3.74)
pt3dadd(407.24, 1326, 117.55, 3.74)
pt3dadd(407.33, 1326.09, 117.55, 3.74)
pt3dadd(407.33, 1328.12, 117.55, 3.74)
pt3dadd(407.41, 1328.31, 117.55, 3.74)
pt3dadd(407.49, 1328.41, 117.55, 3.74)
pt3dadd(407.58, 1328.51, 117.55, 3.74)
pt3dadd(407.67, 1328.7, 117.55, 3.74)
pt3dadd(407.67, 1330.43, 117.55, 3.74)
pt3dadd(407.75, 1330.63, 117.55, 3.74)
pt3dadd(407.75, 1330.82, 117.55, 3.74)
pt3dadd(407.58, 1331.01, 117.55, 3.06)
pt3dadd(407.58, 1332.56, 117.55, 3.06)
pt3dadd(407.67, 1332.65, 117.55, 3.06)
pt3dadd(407.67, 1332.84, 117.55, 3.06)
pt3dadd(407.75, 1332.94, 117.55, 3.06)
pt3dadd(407.83, 1333.14, 117.55, 3.06)
pt3dadd(407.92, 1333.23, 117.55, 3.06)
pt3dadd(408.01, 1333.33, 117.55, 3.06)
pt3dadd(408.09, 1333.42, 117.55, 3.06)
pt3dadd(408.17, 1333.52, 117.55, 3.06)
pt3dadd(408.17, 1335.26, 117.55, 3.06)
pt3dadd(408.26, 1335.45, 117.55, 2.72)
pt3dadd(408.26, 1335.64, 117.55, 2.72)
pt3dadd(408.17, 1335.74, 117.55, 2.72)
pt3dadd(408.09, 1335.83, 117.55, 2.72)
pt3dadd(408.09, 1336.03, 117.55, 2.72)
pt3dadd(408.01, 1336.13, 117.55, 2.72)
pt3dadd(408.01, 1336.51, 117.55, 2.72)
pt3dadd(407.92, 1336.6, 117.55, 2.72)
pt3dadd(407.92, 1337.47, 117.55, 2.72)
pt3dadd(407.75, 1337.47, 117.55, 2.72)
pt3dadd(407.75, 1338.54, 117.55, 2.72)
pt3dadd(407.67, 1338.63, 117.55, 2.72)
pt3dadd(407.67, 1338.92, 117.55, 2.72)
pt3dadd(407.58, 1339.02, 117.55, 2.72)
pt3dadd(407.58, 1339.89, 117.55, 2.72)
pt3dadd(407.75, 1340.85, 117.55, 2.72)
pt3dadd(407.67, 1343.36, 117.55, 2.72)
pt3dadd(406.98, 1346.25, 117.55, 2.72)
pt3dadd(407.15, 1345.86, 117.55, 2.72)
pt3dadd(407.58, 1345.29, 117.55, 2.72)
pt3dadd(407.67, 1340.08, 117.55, 2.72)
pt3dadd(407.67, 1343.94, 117.55, 2.72)
pt3dadd(407.67, 1344.71, 117.55, 2.72)
}
dend[71] {pt3dclear()
pt3dadd(284.06, 926.06, 117.55, 4.08)
pt3dadd(288.82, 929.44, 117.55, 4.08)
pt3dadd(294.08, 933.78, 117.55, 3.4)
pt3dadd(300.37, 938.7, 117.55, 3.4)
pt3dadd(302.4, 940.34, 117.55, 3.4)
pt3dadd(304.95, 943.91, 117.55, 3.4)
pt3dadd(308.18, 947.86, 117.55, 3.4)
pt3dadd(313.79, 956.06, 117.55, 3.4)
pt3dadd(320.58, 964.07, 117.55, 3.4)
pt3dadd(322.79, 966.09, 117.55, 2.72)
}
dend[72] {pt3dclear()
pt3dadd(217.05, 656.64, 117.55, 5.43)
pt3dadd(224.01, 658.37, 117.55, 5.43)
pt3dadd(242.5, 666.35, 117.55, 6.11)
pt3dadd(242.67, 666.45, 117.55, 6.11)
pt3dadd(242.75, 666.54, 117.55, 6.11)
pt3dadd(242.92, 666.64, 117.55, 6.11)
pt3dadd(243.09, 666.74, 117.55, 6.11)
pt3dadd(243.26, 666.83, 117.55, 6.11)
pt3dadd(243.43, 666.93, 117.55, 6.11)
pt3dadd(243.6, 667.03, 117.55, 6.11)
pt3dadd(243.77, 667.12, 117.55, 6.11)
pt3dadd(243.94, 667.22, 117.55, 6.11)
pt3dadd(244.03, 667.41, 117.55, 6.11)
pt3dadd(244.11, 667.51, 117.55, 6.11)
pt3dadd(244.37, 667.8, 117.55, 6.11)
pt3dadd(244.45, 667.9, 117.55, 6.11)
pt3dadd(244.62, 668.09, 117.55, 6.11)
pt3dadd(244.71, 668.18, 117.55, 6.11)
pt3dadd(244.79, 668.28, 117.55, 6.11)
pt3dadd(244.96, 668.38, 117.55, 6.11)
pt3dadd(245.04, 668.47, 117.55, 6.11)
pt3dadd(245.21, 668.66, 117.55, 6.11)
pt3dadd(245.3, 668.76, 117.55, 6.11)
pt3dadd(245.38, 668.86, 117.55, 6.11)
pt3dadd(245.55, 668.96, 117.55, 6.11)
pt3dadd(245.73, 669.05, 117.55, 6.11)
pt3dadd(245.9, 669.05, 117.55, 6.11)
pt3dadd(245.98, 669.15, 117.55, 6.11)
pt3dadd(246.15, 669.24, 117.55, 6.11)
pt3dadd(246.24, 669.34, 117.55, 6.11)
pt3dadd(246.4, 669.34, 117.55, 6.11)
pt3dadd(246.49, 669.44, 117.55, 6.11)
pt3dadd(246.57, 669.53, 117.55, 6.11)
pt3dadd(246.74, 669.53, 117.55, 6.11)
pt3dadd(246.91, 669.63, 117.55, 6.11)
pt3dadd(246.91, 669.82, 117.55, 6.11)
pt3dadd(247, 669.92, 117.55, 6.11)
pt3dadd(247.08, 670.02, 117.55, 6.11)
pt3dadd(247.17, 670.11, 117.55, 6.11)
pt3dadd(247.25, 670.21, 117.55, 6.11)
pt3dadd(247.42, 670.21, 117.55, 6.11)
pt3dadd(248.1, 670.89, 117.55, 6.11)
pt3dadd(247.93, 670.84, 117.55, 6.11)
pt3dadd(248.1, 670.93, 117.55, 6.11)
pt3dadd(248.27, 671.03, 117.55, 6.11)
pt3dadd(248.36, 671.13, 117.55, 6.11)
pt3dadd(248.53, 671.22, 117.55, 6.11)
pt3dadd(248.7, 671.41, 117.55, 6.11)
pt3dadd(248.78, 671.51, 117.55, 6.11)
pt3dadd(248.87, 671.71, 117.55, 6.11)
pt3dadd(249.04, 671.8, 117.55, 6.11)
pt3dadd(249.12, 671.9, 117.55, 6.11)
pt3dadd(249.21, 671.99, 117.55, 6.11)
pt3dadd(249.38, 672.09, 117.55, 6.11)
pt3dadd(249.46, 672.19, 117.55, 6.11)
pt3dadd(249.63, 672.28, 117.55, 6.11)
pt3dadd(249.8, 672.38, 117.55, 6.11)
pt3dadd(249.88, 672.47, 117.55, 6.11)
pt3dadd(250.05, 672.47, 117.55, 6.11)
pt3dadd(250.14, 672.57, 117.55, 6.11)
pt3dadd(250.23, 672.67, 117.55, 6.11)
pt3dadd(250.4, 672.67, 117.55, 6.11)
pt3dadd(250.48, 672.77, 117.55, 6.11)
pt3dadd(250.65, 672.86, 117.55, 6.11)
pt3dadd(250.74, 672.96, 117.55, 6.11)
pt3dadd(250.9, 673.15, 117.55, 6.11)
pt3dadd(250.99, 673.25, 117.55, 6.11)
pt3dadd(251.16, 673.44, 117.55, 6.11)
pt3dadd(251.33, 673.54, 117.55, 6.11)
pt3dadd(251.41, 673.63, 117.55, 6.11)
pt3dadd(251.67, 673.92, 117.55, 6.11)
pt3dadd(251.84, 674.02, 117.55, 6.11)
pt3dadd(251.93, 674.11, 117.55, 6.11)
pt3dadd(252.1, 674.31, 117.55, 6.11)
pt3dadd(252.18, 674.41, 117.55, 6.11)
pt3dadd(252.35, 674.41, 117.55, 6.11)
pt3dadd(252.43, 674.5, 117.55, 6.11)
pt3dadd(252.52, 674.7, 117.55, 6.11)
pt3dadd(252.6, 674.79, 117.55, 6.11)
pt3dadd(252.77, 674.98, 117.55, 6.11)
pt3dadd(252.94, 674.98, 117.55, 6.11)
pt3dadd(253.03, 675.18, 117.55, 6.11)
pt3dadd(253.11, 675.27, 117.55, 6.11)
pt3dadd(253.2, 675.47, 117.55, 6.11)
pt3dadd(253.28, 675.66, 117.55, 6.11)
pt3dadd(253.37, 675.76, 117.55, 6.11)
pt3dadd(253.37, 675.95, 117.55, 6.11)
pt3dadd(253.45, 676.04, 117.55, 6.11)
pt3dadd(253.54, 676.14, 117.55, 6.11)
pt3dadd(253.62, 676.34, 117.55, 6.11)
pt3dadd(253.71, 676.43, 117.55, 6.11)
pt3dadd(253.79, 676.62, 117.55, 6.11)
pt3dadd(253.88, 676.82, 117.55, 6.11)
pt3dadd(253.96, 676.91, 117.55, 6.11)
pt3dadd(254.05, 677.1, 117.55, 6.11)
pt3dadd(254.05, 677.3, 117.55, 6.11)
pt3dadd(254.22, 677.49, 117.55, 6.11)
pt3dadd(254.3, 677.59, 117.55, 6.11)
pt3dadd(254.3, 677.78, 117.55, 6.11)
pt3dadd(254.39, 677.88, 117.55, 6.11)
pt3dadd(254.47, 678.07, 117.55, 6.11)
pt3dadd(254.56, 678.17, 117.55, 6.11)
pt3dadd(254.64, 678.36, 117.55, 6.11)
pt3dadd(254.81, 678.55, 117.55, 6.11)
pt3dadd(254.9, 678.74, 117.55, 6.11)
pt3dadd(254.98, 678.94, 117.55, 6.11)
pt3dadd(255.07, 679.03, 117.55, 6.11)
pt3dadd(255.15, 679.13, 117.55, 6.11)
pt3dadd(255.24, 679.23, 117.55, 6.11)
pt3dadd(255.32, 679.33, 117.55, 6.11)
pt3dadd(255.4, 679.52, 117.55, 6.11)
pt3dadd(255.49, 679.71, 117.55, 6.11)
pt3dadd(255.57, 679.8, 117.55, 6.11)
pt3dadd(255.66, 679.9, 117.55, 6.11)
}
}
proc shape3d_115() {
dend[72] { pt3dadd(255.83, 680.09, 117.55, 6.11)
pt3dadd(256, 680.29, 117.55, 6.11)
pt3dadd(256.08, 680.48, 117.55, 6.11)
pt3dadd(256.17, 680.67, 117.55, 6.11)
pt3dadd(256.26, 680.77, 117.55, 6.11)
pt3dadd(256.34, 680.96, 117.55, 6.11)
pt3dadd(256.6, 681.25, 117.55, 6.11)
pt3dadd(256.77, 681.25, 117.55, 6.11)
pt3dadd(256.85, 681.35, 117.55, 6.11)
pt3dadd(256.93, 681.45, 117.55, 6.11)
pt3dadd(257.11, 681.54, 117.55, 6.11)
pt3dadd(257.19, 681.64, 117.55, 6.11)
pt3dadd(257.36, 681.64, 117.55, 6.11)
pt3dadd(257.45, 681.83, 117.55, 6.11)
pt3dadd(257.53, 681.93, 117.55, 6.11)
pt3dadd(257.7, 682.03, 117.55, 6.11)
pt3dadd(257.87, 682.12, 117.55, 6.11)
pt3dadd(257.95, 682.22, 117.55, 6.11)
pt3dadd(258.12, 682.32, 117.55, 6.11)
pt3dadd(258.29, 682.41, 117.55, 6.11)
pt3dadd(258.46, 682.51, 117.55, 6.11)
pt3dadd(258.63, 682.6, 117.55, 6.11)
pt3dadd(258.8, 682.7, 117.55, 6.11)
pt3dadd(259.48, 682.7, 117.55, 6.11)
pt3dadd(259.57, 682.6, 117.55, 6.11)
pt3dadd(259.99, 682.6, 117.55, 6.11)
pt3dadd(260.08, 682.75, 117.55, 6.11)
pt3dadd(260.16, 682.75, 117.55, 6.11)
pt3dadd(260.24, 682.75, 117.55, 6.11)
pt3dadd(260.5, 682.84, 117.55, 6.11)
pt3dadd(260.67, 682.94, 117.55, 6.11)
pt3dadd(260.76, 683.04, 117.55, 6.11)
pt3dadd(261.01, 683.04, 117.55, 6.11)
pt3dadd(261.18, 683.13, 117.55, 6.11)
pt3dadd(261.35, 683.23, 117.55, 6.11)
pt3dadd(261.61, 683.33, 117.55, 6.11)
pt3dadd(261.69, 683.52, 117.55, 6.11)
pt3dadd(261.86, 683.61, 117.55, 6.11)
pt3dadd(262.03, 683.71, 117.55, 6.11)
pt3dadd(262.2, 683.81, 117.55, 6.11)
pt3dadd(262.37, 683.91, 117.55, 6.11)
pt3dadd(262.63, 684, 117.55, 6.11)
pt3dadd(262.79, 684.1, 117.55, 6.11)
pt3dadd(262.96, 684.2, 117.55, 6.11)
pt3dadd(263.05, 684.29, 117.55, 6.11)
pt3dadd(263.13, 684.39, 117.55, 6.11)
pt3dadd(263.47, 684.39, 117.55, 6.11)
pt3dadd(263.73, 684.48, 117.55, 6.11)
pt3dadd(263.81, 684.58, 117.55, 6.11)
pt3dadd(263.98, 684.68, 117.55, 6.11)
pt3dadd(264.07, 684.77, 117.55, 6.11)
pt3dadd(264.15, 684.87, 117.55, 6.11)
pt3dadd(264.41, 685.16, 117.55, 6.11)
pt3dadd(264.58, 685.26, 117.55, 6.11)
pt3dadd(264.66, 685.35, 117.55, 6.11)
pt3dadd(264.83, 685.45, 117.55, 6.11)
pt3dadd(264.92, 685.54, 117.55, 6.11)
pt3dadd(265.09, 685.64, 117.55, 6.11)
pt3dadd(265.17, 685.74, 117.55, 6.11)
pt3dadd(265.34, 685.84, 117.55, 6.11)
pt3dadd(265.51, 685.84, 117.55, 6.11)
pt3dadd(265.68, 685.93, 117.55, 6.11)
pt3dadd(265.77, 686.12, 117.55, 6.11)
pt3dadd(265.93, 686.12, 117.55, 6.11)
pt3dadd(266.02, 686.22, 117.55, 6.11)
pt3dadd(266.19, 686.32, 117.55, 6.11)
pt3dadd(266.36, 686.41, 117.55, 6.11)
pt3dadd(266.45, 686.51, 117.55, 6.11)
pt3dadd(266.61, 686.51, 117.55, 6.11)
pt3dadd(266.7, 686.6, 117.55, 6.11)
pt3dadd(266.87, 686.7, 117.55, 6.11)
pt3dadd(267.04, 686.7, 117.55, 6.11)
pt3dadd(267.13, 686.8, 117.55, 6.11)
pt3dadd(267.21, 686.9, 117.55, 6.11)
pt3dadd(267.46, 687.09, 117.55, 6.11)
pt3dadd(267.64, 687.18, 117.55, 6.11)
pt3dadd(267.8, 687.18, 117.55, 6.11)
pt3dadd(267.89, 687.28, 117.55, 6.11)
pt3dadd(268.06, 687.38, 117.55, 6.11)
pt3dadd(268.14, 687.47, 117.55, 6.11)
pt3dadd(268.23, 687.57, 117.55, 6.11)
pt3dadd(268.4, 687.57, 117.55, 6.11)
pt3dadd(268.48, 687.76, 117.55, 6.11)
pt3dadd(268.65, 687.86, 117.55, 6.11)
pt3dadd(268.65, 688.05, 117.55, 6.11)
pt3dadd(268.82, 688.15, 117.55, 6.11)
pt3dadd(268.99, 688.44, 117.55, 6.11)
pt3dadd(269.08, 688.53, 117.55, 6.11)
pt3dadd(269.25, 688.63, 117.55, 6.11)
pt3dadd(269.33, 688.73, 117.55, 6.11)
pt3dadd(269.5, 689.02, 117.55, 6.11)
pt3dadd(269.67, 689.11, 117.55, 6.11)
pt3dadd(269.76, 689.21, 117.55, 6.11)
pt3dadd(269.93, 689.31, 117.55, 6.11)
pt3dadd(270.1, 689.5, 117.55, 6.11)
pt3dadd(270.27, 689.59, 117.55, 6.11)
pt3dadd(270.35, 689.69, 117.55, 6.11)
pt3dadd(270.44, 689.79, 117.55, 6.11)
pt3dadd(270.61, 689.98, 117.55, 6.11)
pt3dadd(270.77, 690.08, 117.55, 6.11)
pt3dadd(270.86, 690.17, 117.55, 6.11)
pt3dadd(270.95, 690.27, 117.55, 6.11)
pt3dadd(271.03, 690.37, 117.55, 6.11)
pt3dadd(271.2, 690.37, 117.55, 6.11)
pt3dadd(271.29, 690.47, 117.55, 6.11)
pt3dadd(271.45, 690.66, 117.55, 6.11)
pt3dadd(271.54, 690.75, 117.55, 6.11)
pt3dadd(271.71, 690.75, 117.55, 6.11)
pt3dadd(271.8, 690.85, 117.55, 6.11)
pt3dadd(271.88, 690.95, 117.55, 6.11)
pt3dadd(272.05, 690.95, 117.55, 6.11)
pt3dadd(272.14, 691.04, 117.55, 6.11)
pt3dadd(272.22, 691.14, 117.55, 6.11)
pt3dadd(272.39, 691.14, 117.55, 6.11)
pt3dadd(272.56, 691.23, 117.55, 6.11)
pt3dadd(272.64, 691.33, 117.55, 6.11)
pt3dadd(272.98, 691.33, 117.55, 6.11)
pt3dadd(273.07, 691.53, 117.55, 6.11)
pt3dadd(273.24, 691.62, 117.55, 6.11)
pt3dadd(273.32, 691.72, 117.55, 6.11)
pt3dadd(273.49, 691.82, 117.55, 6.11)
pt3dadd(273.58, 691.91, 117.55, 6.11)
pt3dadd(273.75, 691.91, 117.55, 6.11)
pt3dadd(273.92, 692.01, 117.55, 6.11)
pt3dadd(274.09, 692.1, 117.55, 6.11)
pt3dadd(274.26, 692.2, 117.55, 6.11)
pt3dadd(274.43, 692.3, 117.55, 6.11)
pt3dadd(274.51, 692.39, 117.55, 6.11)
pt3dadd(274.6, 692.59, 117.55, 6.11)
pt3dadd(274.77, 692.68, 117.55, 6.11)
pt3dadd(274.85, 692.88, 117.55, 6.11)
pt3dadd(274.94, 692.97, 117.55, 6.11)
pt3dadd(275.11, 692.97, 117.55, 6.11)
pt3dadd(275.19, 693.07, 117.55, 6.11)
pt3dadd(275.28, 693.16, 117.55, 6.11)
pt3dadd(275.45, 693.26, 117.55, 6.11)
pt3dadd(275.62, 693.26, 117.55, 6.11)
pt3dadd(275.7, 693.36, 117.55, 6.11)
pt3dadd(275.87, 693.46, 117.55, 6.11)
pt3dadd(275.95, 693.55, 117.55, 6.11)
pt3dadd(276.04, 693.65, 117.55, 6.11)
pt3dadd(276.13, 693.74, 117.55, 6.11)
pt3dadd(276.3, 693.74, 117.55, 6.11)
pt3dadd(276.38, 693.84, 117.55, 6.11)
pt3dadd(276.46, 693.93, 117.55, 6.11)
pt3dadd(276.55, 694.03, 117.55, 6.11)
pt3dadd(276.64, 694.13, 117.55, 6.11)
pt3dadd(276.8, 694.22, 117.55, 6.11)
pt3dadd(276.89, 694.32, 117.55, 6.11)
pt3dadd(277.06, 694.42, 117.55, 6.11)
pt3dadd(277.14, 694.52, 117.55, 6.11)
pt3dadd(277.32, 694.61, 117.55, 6.11)
pt3dadd(277.48, 694.71, 117.55, 6.11)
pt3dadd(277.57, 694.8, 117.55, 6.11)
pt3dadd(277.65, 695, 117.55, 6.11)
pt3dadd(277.74, 695.09, 117.55, 6.11)
pt3dadd(277.91, 695.19, 117.55, 6.11)
pt3dadd(277.99, 695.29, 117.55, 6.11)
pt3dadd(278.08, 695.38, 117.55, 6.11)
pt3dadd(278.17, 695.48, 117.55, 6.11)
pt3dadd(278.33, 695.67, 117.55, 6.11)
pt3dadd(278.42, 695.86, 117.55, 6.11)
pt3dadd(278.59, 695.96, 117.55, 6.11)
pt3dadd(278.17, 695.63, 117.55, 4.42)
pt3dadd(278.33, 695.72, 117.55, 4.42)
pt3dadd(278.42, 695.82, 117.55, 4.42)
pt3dadd(278.59, 695.91, 117.55, 4.42)
pt3dadd(278.76, 696.01, 117.55, 4.42)
pt3dadd(278.93, 696.11, 117.55, 4.42)
pt3dadd(279.01, 696.2, 117.55, 4.42)
pt3dadd(279.18, 696.3, 117.55, 4.42)
pt3dadd(279.35, 696.4, 117.55, 4.42)
pt3dadd(279.44, 696.49, 117.55, 4.42)
pt3dadd(279.61, 696.59, 117.55, 4.42)
pt3dadd(279.78, 696.59, 117.55, 4.42)
pt3dadd(279.86, 696.78, 117.55, 4.42)
pt3dadd(280.03, 696.88, 117.55, 4.42)
pt3dadd(280.2, 696.97, 117.55, 4.42)
pt3dadd(280.46, 696.97, 117.55, 4.42)
pt3dadd(280.54, 697.07, 117.55, 4.42)
pt3dadd(280.71, 697.17, 117.55, 4.42)
pt3dadd(280.8, 697.26, 117.55, 4.42)
pt3dadd(281.05, 697.55, 117.55, 4.42)
pt3dadd(281.14, 697.65, 117.55, 4.42)
pt3dadd(281.22, 697.74, 117.55, 4.42)
pt3dadd(281.39, 697.94, 117.55, 4.42)
pt3dadd(281.48, 698.03, 117.55, 4.42)
pt3dadd(281.64, 698.13, 117.55, 4.42)
pt3dadd(281.73, 698.33, 117.55, 4.42)
pt3dadd(281.82, 698.42, 117.55, 4.42)
pt3dadd(281.98, 698.61, 117.55, 4.42)
pt3dadd(282.07, 698.71, 117.55, 4.42)
pt3dadd(282.24, 698.71, 117.55, 4.42)
pt3dadd(282.41, 698.81, 117.55, 4.42)
pt3dadd(282.58, 698.9, 117.55, 4.42)
pt3dadd(282.75, 699, 117.55, 4.42)
pt3dadd(282.83, 699.1, 117.55, 4.42)
pt3dadd(283.01, 699.19, 117.55, 4.42)
pt3dadd(283.09, 699.29, 117.55, 4.42)
pt3dadd(283.26, 699.29, 117.55, 4.42)
}
}
proc shape3d_116() {
dend[72] { pt3dadd(283.43, 699.48, 117.55, 4.42)
pt3dadd(283.6, 699.58, 117.55, 4.42)
pt3dadd(283.68, 699.67, 117.55, 4.42)
pt3dadd(284.02, 699.67, 117.55, 4.42)
pt3dadd(284.11, 699.77, 117.55, 4.42)
pt3dadd(284.19, 699.87, 117.55, 4.42)
pt3dadd(284.36, 699.97, 117.55, 4.42)
pt3dadd(284.53, 700.06, 117.55, 4.42)
pt3dadd(284.79, 700.16, 117.55, 4.42)
pt3dadd(284.96, 700.16, 117.55, 4.42)
pt3dadd(285.04, 700.25, 117.55, 4.42)
pt3dadd(285.13, 700.35, 117.55, 4.42)
pt3dadd(285.21, 700.45, 117.55, 4.42)
pt3dadd(285.47, 700.64, 117.55, 4.42)
pt3dadd(285.55, 700.73, 117.55, 4.42)
pt3dadd(285.64, 700.83, 117.55, 4.42)
pt3dadd(285.81, 700.93, 117.55, 4.42)
pt3dadd(285.89, 701.03, 117.55, 4.42)
pt3dadd(285.98, 701.12, 117.55, 4.42)
pt3dadd(286.06, 701.22, 117.55, 4.42)
pt3dadd(286.23, 701.32, 117.55, 4.42)
pt3dadd(286.32, 701.41, 117.55, 4.42)
pt3dadd(286.4, 701.51, 117.55, 4.42)
pt3dadd(286.57, 701.6, 117.55, 4.42)
pt3dadd(286.65, 701.7, 117.55, 4.42)
pt3dadd(286.83, 701.8, 117.55, 4.42)
pt3dadd(286.91, 701.89, 117.55, 4.42)
pt3dadd(286.99, 702.09, 117.55, 4.42)
pt3dadd(287.17, 702.18, 117.55, 4.42)
pt3dadd(287.25, 702.38, 117.55, 4.42)
pt3dadd(287.42, 702.47, 117.55, 4.42)
pt3dadd(287.51, 702.66, 117.55, 4.42)
pt3dadd(287.59, 702.86, 117.55, 4.42)
pt3dadd(287.76, 702.96, 117.55, 4.42)
pt3dadd(287.93, 703.05, 117.55, 4.42)
pt3dadd(288.1, 703.15, 117.55, 4.42)
pt3dadd(288.18, 703.24, 117.55, 4.42)
pt3dadd(288.27, 703.44, 117.55, 4.42)
pt3dadd(288.44, 703.53, 117.55, 4.42)
pt3dadd(288.52, 703.63, 117.55, 4.42)
pt3dadd(288.61, 703.72, 117.55, 4.42)
pt3dadd(288.7, 703.92, 117.55, 4.42)
pt3dadd(288.78, 704.02, 117.55, 4.42)
pt3dadd(288.95, 704.11, 117.55, 4.42)
pt3dadd(289.03, 704.3, 117.55, 4.42)
pt3dadd(289.2, 704.5, 117.55, 4.42)
pt3dadd(289.29, 704.59, 117.55, 4.42)
pt3dadd(289.46, 704.79, 117.55, 4.42)
pt3dadd(289.54, 704.98, 117.55, 4.42)
pt3dadd(289.63, 705.17, 117.55, 4.42)
pt3dadd(289.71, 705.36, 117.55, 4.42)
pt3dadd(289.88, 705.56, 117.55, 4.42)
pt3dadd(289.97, 705.75, 117.55, 4.42)
pt3dadd(290.05, 705.85, 117.55, 4.42)
pt3dadd(290.14, 706.04, 117.55, 4.42)
pt3dadd(290.14, 706.23, 117.55, 4.42)
pt3dadd(290.22, 706.33, 117.55, 4.42)
pt3dadd(290.48, 706.62, 117.55, 4.42)
pt3dadd(290.56, 706.72, 117.55, 4.42)
pt3dadd(290.65, 707.01, 117.55, 4.42)
pt3dadd(290.99, 707.39, 117.55, 4.42)
pt3dadd(291.07, 707.49, 117.55, 4.42)
pt3dadd(291.16, 707.68, 117.55, 4.42)
pt3dadd(291.24, 707.78, 117.55, 4.42)
pt3dadd(291.33, 707.97, 117.55, 4.42)
pt3dadd(291.41, 708.16, 117.55, 4.42)
pt3dadd(291.49, 708.26, 117.55, 4.42)
pt3dadd(291.67, 708.35, 117.55, 4.42)
pt3dadd(291.75, 708.55, 117.55, 4.42)
pt3dadd(291.83, 708.65, 117.55, 4.42)
pt3dadd(291.92, 708.84, 117.55, 4.42)
pt3dadd(292.01, 709.13, 117.55, 4.42)
pt3dadd(292.09, 709.22, 117.55, 4.42)
pt3dadd(292.17, 709.32, 117.55, 4.42)
pt3dadd(292.26, 709.51, 117.55, 4.42)
pt3dadd(292.35, 709.61, 117.55, 4.42)
pt3dadd(292.35, 709.8, 117.55, 4.42)
pt3dadd(292.43, 709.9, 117.55, 4.42)
pt3dadd(292.52, 709.99, 117.55, 4.42)
pt3dadd(292.68, 710.09, 117.55, 4.42)
pt3dadd(292.77, 710.28, 117.55, 4.42)
pt3dadd(292.86, 710.48, 117.55, 4.42)
pt3dadd(292.94, 710.67, 117.55, 4.42)
pt3dadd(293.02, 710.86, 117.55, 4.42)
pt3dadd(293.2, 711.05, 117.55, 4.42)
pt3dadd(293.28, 711.25, 117.55, 4.42)
pt3dadd(293.36, 711.34, 117.55, 4.42)
pt3dadd(293.45, 711.54, 117.55, 4.42)
pt3dadd(293.54, 711.73, 117.55, 4.42)
pt3dadd(293.62, 711.83, 117.55, 4.42)
pt3dadd(293.7, 711.92, 117.55, 4.42)
pt3dadd(293.79, 712.12, 117.55, 4.42)
pt3dadd(293.88, 712.31, 117.55, 4.42)
pt3dadd(293.96, 712.5, 117.55, 4.42)
pt3dadd(294.04, 712.7, 117.55, 4.42)
pt3dadd(294.13, 712.79, 117.55, 4.42)
pt3dadd(294.21, 712.89, 117.55, 4.42)
pt3dadd(294.3, 713.08, 117.55, 4.42)
pt3dadd(294.38, 713.28, 117.55, 4.42)
pt3dadd(294.47, 713.47, 117.55, 4.42)
pt3dadd(294.55, 713.57, 117.55, 4.42)
pt3dadd(294.64, 713.76, 117.55, 4.42)
pt3dadd(294.72, 713.85, 117.55, 4.42)
pt3dadd(294.81, 713.95, 117.55, 4.42)
pt3dadd(294.89, 714.04, 117.55, 4.42)
pt3dadd(295.06, 714.24, 117.55, 4.42)
pt3dadd(295.15, 714.43, 117.55, 4.42)
pt3dadd(295.32, 714.53, 117.55, 4.42)
pt3dadd(295.4, 714.63, 117.55, 4.42)
pt3dadd(295.57, 714.72, 117.55, 4.42)
pt3dadd(295.83, 715.01, 117.55, 4.42)
pt3dadd(295.91, 715.11, 117.55, 4.42)
pt3dadd(296, 715.2, 117.55, 4.42)
pt3dadd(296.08, 715.3, 117.55, 4.42)
pt3dadd(296.25, 715.3, 117.55, 4.42)
pt3dadd(296.34, 715.4, 117.55, 4.42)
pt3dadd(296.51, 715.49, 117.55, 4.42)
pt3dadd(296.67, 715.59, 117.55, 4.42)
pt3dadd(296.85, 715.78, 117.55, 4.42)
pt3dadd(297.02, 715.78, 117.55, 4.42)
pt3dadd(297.18, 715.88, 117.55, 4.42)
pt3dadd(297.27, 715.97, 117.55, 4.42)
pt3dadd(297.44, 716.07, 117.55, 4.42)
pt3dadd(297.52, 716.27, 117.55, 4.42)
pt3dadd(297.7, 716.36, 117.55, 4.42)
pt3dadd(297.78, 716.46, 117.55, 4.42)
pt3dadd(297.86, 716.55, 117.55, 4.42)
pt3dadd(298.04, 716.65, 117.55, 4.42)
pt3dadd(298.12, 716.75, 117.55, 4.42)
pt3dadd(298.2, 716.94, 117.55, 4.42)
pt3dadd(298.38, 717.03, 117.55, 4.42)
pt3dadd(298.46, 717.13, 117.55, 4.42)
pt3dadd(298.55, 717.23, 117.55, 4.42)
pt3dadd(298.71, 717.33, 117.55, 4.42)
pt3dadd(298.89, 717.42, 117.55, 4.42)
pt3dadd(298.97, 717.61, 117.55, 4.42)
pt3dadd(299.05, 717.71, 117.55, 4.42)
pt3dadd(299.14, 717.81, 117.55, 4.42)
pt3dadd(299.31, 717.91, 117.55, 4.42)
pt3dadd(299.48, 718, 117.55, 4.42)
pt3dadd(299.56, 718.19, 117.55, 4.42)
pt3dadd(299.73, 718.29, 117.55, 4.42)
pt3dadd(299.9, 718.29, 117.55, 4.42)
pt3dadd(299.99, 718.48, 117.55, 4.42)
pt3dadd(300.16, 718.58, 117.55, 4.42)
pt3dadd(300.24, 718.67, 117.55, 4.42)
pt3dadd(300.41, 718.77, 117.55, 4.42)
pt3dadd(300.58, 718.97, 117.55, 4.42)
pt3dadd(300.75, 718.97, 117.55, 4.42)
pt3dadd(300.84, 719.06, 117.55, 4.42)
pt3dadd(300.92, 719.16, 117.55, 4.42)
pt3dadd(301.01, 719.26, 117.55, 4.42)
pt3dadd(301.09, 719.35, 117.55, 4.42)
pt3dadd(301.26, 719.45, 117.55, 4.42)
pt3dadd(301.35, 719.54, 117.55, 4.42)
pt3dadd(301.52, 719.54, 117.55, 4.42)
pt3dadd(301.69, 719.64, 117.55, 4.42)
pt3dadd(301.77, 719.74, 117.55, 4.42)
pt3dadd(301.86, 719.83, 117.55, 4.42)
pt3dadd(302.2, 720.22, 117.55, 4.42)
pt3dadd(302.28, 720.32, 117.55, 4.42)
pt3dadd(302.45, 720.41, 117.55, 4.42)
pt3dadd(302.62, 720.51, 117.55, 4.42)
pt3dadd(302.7, 720.6, 117.55, 4.42)
pt3dadd(302.79, 720.7, 117.55, 4.42)
pt3dadd(302.88, 720.8, 117.55, 4.42)
pt3dadd(303.05, 720.8, 117.55, 4.42)
pt3dadd(303.13, 720.9, 117.55, 4.42)
pt3dadd(303.21, 721.09, 117.55, 4.42)
pt3dadd(303.3, 721.18, 117.55, 4.42)
pt3dadd(303.39, 721.28, 117.55, 4.42)
pt3dadd(303.55, 721.38, 117.55, 4.42)
pt3dadd(303.64, 721.47, 117.55, 4.42)
pt3dadd(303.73, 721.57, 117.55, 4.42)
pt3dadd(303.89, 721.66, 117.55, 4.42)
pt3dadd(304.07, 721.76, 117.55, 4.42)
pt3dadd(304.15, 721.96, 117.55, 4.42)
pt3dadd(304.23, 722.15, 117.55, 4.42)
pt3dadd(304.4, 722.44, 117.55, 4.42)
pt3dadd(304.49, 722.53, 117.55, 4.42)
pt3dadd(304.49, 722.73, 117.55, 4.42)
pt3dadd(304.66, 722.97, 117.55, 4.42)
pt3dadd(304.74, 723.16, 117.55, 4.42)
pt3dadd(304.83, 723.35, 117.55, 4.42)
pt3dadd(305, 723.64, 117.55, 4.42)
pt3dadd(305.08, 723.74, 117.55, 4.42)
pt3dadd(305.17, 723.84, 117.55, 4.42)
pt3dadd(305.17, 724.22, 117.55, 4.42)
pt3dadd(305.25, 724.32, 117.55, 4.42)
pt3dadd(305.34, 724.51, 117.55, 4.42)
pt3dadd(305.42, 724.61, 117.55, 4.42)
pt3dadd(305.51, 724.71, 117.55, 4.42)
pt3dadd(305.59, 724.8, 117.55, 4.42)
pt3dadd(305.68, 724.9, 117.55, 4.42)
pt3dadd(305.76, 725.18, 117.55, 4.42)
pt3dadd(305.85, 725.28, 117.55, 4.42)
pt3dadd(305.93, 725.47, 117.55, 4.42)
pt3dadd(305.93, 725.67, 117.55, 4.42)
pt3dadd(306.02, 725.86, 117.55, 4.42)
pt3dadd(306.1, 725.96, 117.55, 4.42)
}
}
proc shape3d_117() {
dend[72] { pt3dadd(306.1, 726.15, 117.55, 4.42)
pt3dadd(306.19, 726.25, 117.55, 4.42)
pt3dadd(306.27, 726.44, 117.55, 4.42)
pt3dadd(306.36, 726.63, 117.55, 4.42)
pt3dadd(306.36, 726.83, 117.55, 4.42)
pt3dadd(306.44, 727.02, 117.55, 4.42)
pt3dadd(306.53, 727.21, 117.55, 4.42)
pt3dadd(306.7, 727.41, 117.55, 4.42)
pt3dadd(306.7, 727.6, 117.55, 4.42)
pt3dadd(306.78, 727.7, 117.55, 4.42)
pt3dadd(306.87, 727.79, 117.55, 4.42)
pt3dadd(306.95, 727.89, 117.55, 4.42)
pt3dadd(307.04, 727.98, 117.55, 4.42)
pt3dadd(307.12, 728.08, 117.55, 4.42)
pt3dadd(307.2, 728.27, 117.55, 4.42)
pt3dadd(307.29, 728.37, 117.55, 4.42)
pt3dadd(307.29, 728.56, 117.55, 4.42)
pt3dadd(307.38, 728.76, 117.55, 4.42)
pt3dadd(307.46, 728.95, 117.55, 4.42)
pt3dadd(307.55, 729.04, 117.55, 4.42)
pt3dadd(307.55, 729.24, 117.55, 4.42)
pt3dadd(307.63, 729.43, 117.55, 4.42)
pt3dadd(307.71, 729.62, 117.55, 4.42)
pt3dadd(307.89, 729.72, 117.55, 4.42)
pt3dadd(307.89, 730.1, 117.55, 4.42)
pt3dadd(308.05, 730.3, 117.55, 4.42)
pt3dadd(308.14, 730.49, 117.55, 4.42)
pt3dadd(308.23, 730.68, 117.55, 4.42)
pt3dadd(308.31, 730.88, 117.55, 4.42)
pt3dadd(308.39, 730.97, 117.55, 4.42)
pt3dadd(308.48, 731.26, 117.55, 4.42)
pt3dadd(308.57, 731.36, 117.55, 4.42)
pt3dadd(308.65, 731.55, 117.55, 4.42)
pt3dadd(308.73, 731.74, 117.55, 4.42)
pt3dadd(308.82, 731.84, 117.55, 4.42)
pt3dadd(308.82, 732.03, 117.55, 4.42)
pt3dadd(308.9, 732.13, 117.55, 4.42)
pt3dadd(308.99, 732.32, 117.55, 4.42)
pt3dadd(309.08, 732.52, 117.55, 4.42)
pt3dadd(309.16, 732.71, 117.55, 4.42)
pt3dadd(309.24, 732.9, 117.55, 4.42)
pt3dadd(309.33, 733, 117.55, 4.42)
pt3dadd(309.42, 733.09, 117.55, 4.42)
pt3dadd(309.5, 733.19, 117.55, 4.42)
pt3dadd(309.58, 733.29, 117.55, 4.42)
pt3dadd(309.67, 733.48, 117.55, 4.42)
pt3dadd(309.75, 733.67, 117.55, 4.42)
pt3dadd(309.84, 733.87, 117.55, 4.42)
pt3dadd(309.92, 734.06, 117.55, 4.42)
pt3dadd(310.01, 734.16, 117.55, 4.42)
pt3dadd(310.09, 734.45, 117.55, 4.42)
pt3dadd(310.18, 734.64, 117.55, 4.42)
pt3dadd(310.26, 734.83, 117.55, 4.42)
pt3dadd(310.35, 734.93, 117.55, 4.42)
pt3dadd(310.35, 735.12, 117.55, 4.42)
pt3dadd(310.43, 735.22, 117.55, 4.42)
pt3dadd(310.52, 735.41, 117.55, 4.42)
pt3dadd(310.6, 735.51, 117.55, 4.42)
pt3dadd(310.77, 735.6, 117.55, 4.42)
pt3dadd(310.86, 735.7, 117.55, 4.42)
pt3dadd(310.94, 735.89, 117.55, 4.42)
pt3dadd(311.2, 736.18, 117.55, 4.42)
pt3dadd(311.28, 736.28, 117.55, 4.42)
pt3dadd(311.45, 736.38, 117.55, 4.42)
pt3dadd(311.54, 736.47, 117.55, 4.42)
pt3dadd(311.62, 736.57, 117.55, 4.42)
pt3dadd(311.79, 736.66, 117.55, 4.42)
pt3dadd(311.88, 736.76, 117.55, 4.42)
pt3dadd(311.88, 736.95, 117.55, 4.42)
pt3dadd(311.96, 737.05, 117.55, 4.42)
pt3dadd(312.05, 737.24, 117.55, 4.42)
pt3dadd(312.13, 737.34, 117.55, 4.42)
pt3dadd(312.21, 737.43, 117.55, 4.42)
pt3dadd(312.3, 737.63, 117.55, 4.42)
pt3dadd(312.3, 737.82, 117.55, 4.42)
pt3dadd(312.39, 737.92, 117.55, 4.42)
pt3dadd(312.47, 738.02, 117.55, 4.42)
pt3dadd(312.55, 738.21, 117.55, 4.42)
pt3dadd(312.64, 738.4, 117.55, 4.42)
pt3dadd(312.81, 738.59, 117.55, 4.42)
pt3dadd(312.89, 738.69, 117.55, 4.42)
pt3dadd(312.98, 738.78, 117.55, 4.42)
pt3dadd(313.15, 738.98, 117.55, 4.42)
pt3dadd(313.4, 739.27, 117.55, 4.42)
pt3dadd(313.49, 739.46, 117.55, 4.42)
pt3dadd(313.58, 739.65, 117.55, 4.42)
pt3dadd(313.66, 739.85, 117.55, 4.42)
pt3dadd(313.74, 739.94, 117.55, 4.42)
pt3dadd(313.83, 740.04, 117.55, 4.42)
pt3dadd(313.92, 740.23, 117.55, 4.42)
pt3dadd(314, 740.42, 117.55, 4.42)
pt3dadd(314.08, 740.62, 117.55, 4.42)
pt3dadd(314.17, 740.72, 117.55, 4.42)
pt3dadd(314.34, 740.81, 117.55, 4.42)
pt3dadd(314.42, 741.01, 117.55, 4.42)
pt3dadd(314.51, 741.2, 117.55, 4.42)
pt3dadd(314.77, 741.49, 117.55, 4.42)
pt3dadd(314.93, 741.58, 117.55, 4.42)
pt3dadd(315.02, 741.68, 117.55, 4.42)
pt3dadd(315.27, 741.87, 117.55, 4.42)
pt3dadd(315.44, 741.97, 117.55, 4.42)
pt3dadd(315.53, 742.16, 117.55, 4.42)
pt3dadd(315.7, 742.26, 117.55, 4.42)
pt3dadd(315.87, 742.35, 117.55, 4.42)
pt3dadd(315.95, 742.45, 117.55, 4.42)
pt3dadd(316.12, 742.64, 117.55, 4.42)
pt3dadd(316.21, 742.84, 117.55, 4.42)
pt3dadd(316.38, 743.03, 117.55, 4.42)
pt3dadd(316.46, 743.13, 117.55, 4.42)
pt3dadd(316.89, 743.61, 117.55, 4.42)
pt3dadd(317.06, 743.71, 117.55, 4.42)
pt3dadd(317.14, 743.9, 117.55, 4.42)
pt3dadd(317.23, 744.09, 117.55, 4.42)
pt3dadd(317.31, 744.19, 117.55, 4.42)
pt3dadd(317.39, 744.28, 117.55, 4.42)
pt3dadd(317.48, 744.38, 117.55, 4.42)
pt3dadd(317.65, 744.48, 117.55, 4.42)
pt3dadd(317.73, 744.67, 117.55, 4.42)
pt3dadd(317.9, 744.77, 117.55, 4.42)
pt3dadd(317.99, 744.96, 117.55, 4.42)
pt3dadd(318.08, 745.15, 117.55, 4.42)
pt3dadd(318.24, 745.25, 117.55, 4.42)
pt3dadd(318.42, 745.34, 117.55, 4.42)
pt3dadd(318.5, 745.54, 117.55, 4.42)
pt3dadd(318.58, 745.73, 117.55, 4.42)
pt3dadd(318.67, 745.83, 117.55, 4.42)
pt3dadd(318.84, 746.02, 117.55, 4.42)
pt3dadd(318.92, 746.11, 117.55, 4.42)
pt3dadd(319.01, 746.21, 117.55, 4.42)
pt3dadd(319.1, 746.41, 117.55, 4.42)
pt3dadd(319.27, 746.7, 117.55, 4.42)
pt3dadd(319.35, 746.79, 117.55, 4.42)
pt3dadd(319.43, 746.89, 117.55, 4.42)
pt3dadd(319.52, 747.08, 117.55, 4.42)
pt3dadd(319.69, 747.27, 117.55, 4.42)
pt3dadd(319.77, 747.47, 117.55, 4.42)
pt3dadd(319.86, 747.56, 117.55, 4.42)
pt3dadd(320.03, 747.66, 117.55, 4.42)
pt3dadd(320.11, 747.85, 117.55, 4.42)
pt3dadd(320.2, 748.04, 117.55, 4.42)
pt3dadd(320.28, 748.14, 117.55, 4.42)
pt3dadd(320.37, 748.43, 117.55, 4.42)
pt3dadd(320.54, 748.53, 117.55, 4.42)
pt3dadd(320.62, 748.62, 117.55, 4.42)
pt3dadd(320.71, 748.72, 117.55, 4.42)
pt3dadd(320.79, 748.82, 117.55, 4.42)
pt3dadd(320.88, 748.91, 117.55, 4.42)
pt3dadd(320.96, 749.1, 117.55, 4.42)
pt3dadd(321.13, 749.2, 117.55, 4.42)
pt3dadd(321.22, 749.3, 117.55, 4.42)
pt3dadd(321.39, 749.4, 117.55, 4.42)
pt3dadd(321.47, 749.49, 117.55, 4.42)
pt3dadd(321.64, 749.59, 117.55, 4.42)
pt3dadd(321.73, 749.68, 117.55, 4.42)
pt3dadd(321.9, 749.78, 117.55, 4.42)
pt3dadd(322.07, 749.88, 117.55, 4.42)
pt3dadd(322.24, 749.97, 117.55, 4.42)
pt3dadd(322.41, 750.07, 117.55, 4.42)
pt3dadd(322.49, 750.17, 117.55, 4.42)
pt3dadd(322.58, 750.26, 117.55, 4.42)
pt3dadd(322.74, 750.26, 117.55, 4.42)
pt3dadd(322.92, 750.36, 117.55, 4.42)
pt3dadd(323.08, 750.65, 117.55, 4.42)
pt3dadd(323.17, 750.74, 117.55, 4.42)
pt3dadd(323.26, 750.84, 117.55, 4.42)
pt3dadd(323.34, 750.94, 117.55, 4.42)
pt3dadd(323.51, 750.94, 117.55, 4.42)
pt3dadd(323.6, 751.23, 117.55, 4.42)
pt3dadd(323.77, 751.52, 117.55, 4.42)
pt3dadd(324.02, 751.81, 117.55, 4.42)
pt3dadd(324.19, 752.09, 117.55, 4.42)
pt3dadd(324.27, 752.09, 117.55, 4.42)
pt3dadd(324.45, 752, 117.55, 4.42)
pt3dadd(324.61, 751.9, 117.55, 4.42)
pt3dadd(326.31, 751.9, 117.55, 4.42)
pt3dadd(326.65, 751.76, 117.55, 4.42)
pt3dadd(328.43, 751.76, 117.55, 4.42)
pt3dadd(328.52, 751.66, 117.55, 4.42)
pt3dadd(328.69, 751.66, 117.55, 4.42)
pt3dadd(328.77, 751.76, 117.55, 4.42)
pt3dadd(328.95, 751.95, 117.55, 4.42)
pt3dadd(329.11, 752.05, 117.55, 4.42)
pt3dadd(329.29, 752.15, 117.55, 4.42)
pt3dadd(329.71, 752.15, 117.55, 4.42)
pt3dadd(329.63, 752.09, 117.55, 3.4)
pt3dadd(329.8, 752.09, 117.55, 3.4)
pt3dadd(329.88, 752.19, 117.55, 3.4)
pt3dadd(329.96, 752.29, 117.55, 3.4)
pt3dadd(330.05, 752.48, 117.55, 3.4)
pt3dadd(330.14, 752.67, 117.55, 3.4)
pt3dadd(330.22, 752.77, 117.55, 3.4)
pt3dadd(330.3, 752.87, 117.55, 3.4)
pt3dadd(330.39, 753.06, 117.55, 3.4)
pt3dadd(330.47, 753.25, 117.55, 3.4)
pt3dadd(330.56, 753.35, 117.55, 3.4)
pt3dadd(330.64, 753.54, 117.55, 3.4)
pt3dadd(330.73, 753.73, 117.55, 3.4)
pt3dadd(330.81, 753.83, 117.55, 3.4)
pt3dadd(330.81, 754.03, 117.55, 3.4)
pt3dadd(330.9, 754.22, 117.55, 3.4)
}
}
proc shape3d_118() {
dend[72] { pt3dadd(331.07, 754.32, 117.55, 3.4)
pt3dadd(331.07, 754.51, 117.55, 3.4)
pt3dadd(331.15, 754.7, 117.55, 3.4)
pt3dadd(331.24, 754.8, 117.55, 3.4)
pt3dadd(331.32, 754.89, 117.55, 3.4)
pt3dadd(331.41, 755.09, 117.55, 3.4)
pt3dadd(331.49, 755.18, 117.55, 3.4)
pt3dadd(331.58, 755.38, 117.55, 3.4)
pt3dadd(331.66, 755.57, 117.55, 3.4)
pt3dadd(331.75, 755.66, 117.55, 3.4)
pt3dadd(331.83, 755.86, 117.55, 3.4)
pt3dadd(332, 756.05, 117.55, 3.4)
pt3dadd(332.17, 756.15, 117.55, 3.4)
pt3dadd(332.26, 756.24, 117.55, 3.4)
pt3dadd(332.34, 756.34, 117.55, 3.4)
pt3dadd(332.43, 756.53, 117.55, 3.4)
pt3dadd(332.51, 756.63, 117.55, 3.4)
pt3dadd(332.51, 756.82, 117.55, 3.4)
pt3dadd(332.68, 757.02, 117.55, 3.4)
pt3dadd(332.77, 757.21, 117.55, 3.4)
pt3dadd(332.85, 757.3, 117.55, 3.4)
pt3dadd(332.94, 757.4, 117.55, 3.4)
pt3dadd(333.02, 757.59, 117.55, 3.4)
pt3dadd(333.11, 757.79, 117.55, 3.4)
pt3dadd(333.27, 757.88, 117.55, 3.4)
pt3dadd(333.36, 758.08, 117.55, 3.4)
pt3dadd(333.36, 758.27, 117.55, 3.4)
pt3dadd(333.45, 758.36, 117.55, 3.4)
pt3dadd(333.53, 758.56, 117.55, 3.4)
pt3dadd(333.7, 758.75, 117.55, 3.4)
pt3dadd(333.79, 758.85, 117.55, 3.4)
pt3dadd(333.87, 758.95, 117.55, 3.4)
pt3dadd(333.95, 759.14, 117.55, 3.4)
pt3dadd(334.04, 759.23, 117.55, 3.4)
pt3dadd(334.13, 759.33, 117.55, 3.4)
pt3dadd(334.21, 759.52, 117.55, 3.4)
pt3dadd(334.38, 759.62, 117.55, 3.4)
pt3dadd(334.46, 759.72, 117.55, 3.4)
pt3dadd(334.55, 759.81, 117.55, 3.4)
pt3dadd(334.72, 759.81, 117.55, 3.4)
pt3dadd(334.8, 759.91, 117.55, 3.4)
pt3dadd(334.89, 760.01, 117.55, 3.4)
pt3dadd(335.65, 760.01, 117.55, 3.4)
pt3dadd(335.82, 759.91, 117.55, 3.4)
pt3dadd(337.18, 759.91, 117.55, 3.4)
pt3dadd(337.35, 760.01, 117.55, 3.4)
pt3dadd(337.52, 760.1, 117.55, 3.4)
pt3dadd(337.78, 760.29, 117.55, 3.4)
pt3dadd(337.95, 760.39, 117.55, 3.4)
pt3dadd(338.12, 760.49, 117.55, 3.4)
pt3dadd(338.45, 760.49, 117.55, 3.4)
pt3dadd(338.63, 760.58, 117.55, 3.4)
pt3dadd(338.8, 760.68, 117.55, 3.4)
pt3dadd(338.96, 760.68, 117.55, 3.4)
pt3dadd(339.05, 760.78, 117.55, 3.4)
pt3dadd(339.22, 760.87, 117.55, 3.4)
pt3dadd(339.39, 760.97, 117.55, 3.4)
pt3dadd(339.48, 761.07, 117.55, 3.4)
pt3dadd(339.56, 761.16, 117.55, 3.4)
pt3dadd(339.64, 761.26, 117.55, 3.4)
pt3dadd(339.82, 761.45, 117.55, 3.4)
pt3dadd(339.98, 761.55, 117.55, 3.4)
pt3dadd(340.15, 761.65, 117.55, 3.4)
pt3dadd(340.33, 761.74, 117.55, 3.4)
pt3dadd(340.41, 761.84, 117.55, 3.4)
pt3dadd(340.58, 761.93, 117.55, 3.4)
pt3dadd(340.67, 762.03, 117.55, 3.4)
pt3dadd(340.92, 762.32, 117.55, 3.4)
pt3dadd(340.92, 762.51, 117.55, 3.4)
pt3dadd(341, 762.61, 117.55, 3.4)
pt3dadd(341.09, 762.71, 117.55, 3.4)
pt3dadd(341.17, 762.8, 117.55, 3.4)
pt3dadd(341.26, 762.99, 117.55, 3.4)
pt3dadd(341.34, 763.19, 117.55, 3.4)
pt3dadd(341.43, 763.38, 117.55, 3.4)
pt3dadd(341.51, 763.48, 117.55, 3.4)
pt3dadd(341.6, 763.67, 117.55, 3.4)
pt3dadd(341.68, 763.77, 117.55, 3.4)
pt3dadd(341.77, 763.86, 117.55, 3.4)
pt3dadd(341.85, 764.05, 117.55, 3.4)
pt3dadd(341.94, 764.25, 117.55, 3.4)
pt3dadd(342.02, 764.34, 117.55, 3.4)
pt3dadd(342.11, 764.54, 117.55, 3.4)
pt3dadd(342.28, 764.64, 117.55, 3.4)
pt3dadd(342.28, 764.83, 117.55, 3.4)
pt3dadd(342.36, 764.92, 117.55, 3.4)
pt3dadd(342.45, 765.12, 117.55, 3.4)
pt3dadd(342.87, 765.6, 117.55, 3.4)
pt3dadd(342.96, 765.7, 117.55, 3.4)
pt3dadd(343.04, 765.79, 117.55, 3.4)
pt3dadd(343.21, 766.08, 117.55, 3.4)
pt3dadd(343.3, 766.18, 117.55, 3.4)
pt3dadd(343.46, 766.28, 117.55, 3.4)
pt3dadd(343.64, 766.37, 117.55, 3.4)
pt3dadd(343.89, 766.66, 117.55, 3.4)
pt3dadd(344.06, 766.76, 117.55, 3.4)
pt3dadd(344.14, 766.95, 117.55, 3.4)
pt3dadd(344.23, 767.14, 117.55, 3.4)
pt3dadd(344.4, 767.34, 117.55, 3.4)
pt3dadd(344.57, 767.43, 117.55, 3.4)
pt3dadd(344.74, 767.63, 117.55, 3.4)
pt3dadd(344.91, 767.82, 117.55, 3.4)
pt3dadd(344.99, 768.01, 117.55, 3.4)
pt3dadd(345.08, 768.3, 117.55, 3.4)
pt3dadd(345.17, 768.4, 117.55, 3.4)
pt3dadd(345.33, 768.49, 117.55, 3.4)
pt3dadd(345.51, 768.78, 117.55, 3.4)
pt3dadd(345.93, 769.27, 117.55, 3.4)
pt3dadd(346.02, 769.46, 117.55, 3.4)
pt3dadd(346.18, 769.65, 117.55, 3.4)
pt3dadd(346.27, 769.75, 117.55, 3.4)
pt3dadd(346.44, 769.84, 117.55, 3.4)
pt3dadd(346.61, 769.94, 117.55, 3.4)
pt3dadd(346.69, 770.03, 117.55, 3.4)
pt3dadd(347.46, 770.9, 117.55, 3.4)
pt3dadd(347.54, 771, 117.55, 3.4)
pt3dadd(347.71, 771.19, 117.55, 3.4)
pt3dadd(347.8, 771.29, 117.55, 3.4)
pt3dadd(347.97, 771.39, 117.55, 3.4)
pt3dadd(348.14, 771.48, 117.55, 3.4)
pt3dadd(348.22, 771.58, 117.55, 3.4)
pt3dadd(348.31, 771.67, 117.55, 3.4)
pt3dadd(348.39, 771.77, 117.55, 3.4)
pt3dadd(348.48, 771.87, 117.55, 3.4)
pt3dadd(348.56, 771.97, 117.55, 3.4)
pt3dadd(348.64, 772.06, 117.55, 3.4)
pt3dadd(348.82, 772.26, 117.55, 3.4)
pt3dadd(348.9, 772.35, 117.55, 3.4)
pt3dadd(348.98, 772.45, 117.55, 3.4)
pt3dadd(349.07, 772.54, 117.55, 3.4)
pt3dadd(349.15, 772.74, 117.55, 3.4)
pt3dadd(349.24, 772.93, 117.55, 3.4)
pt3dadd(349.33, 773.03, 117.55, 3.4)
pt3dadd(349.49, 773.12, 117.55, 3.4)
pt3dadd(349.58, 773.22, 117.55, 3.4)
pt3dadd(349.67, 773.32, 117.55, 3.4)
pt3dadd(349.83, 773.51, 117.55, 3.4)
pt3dadd(350.01, 773.51, 117.55, 3.4)
pt3dadd(350.09, 773.7, 117.55, 3.4)
pt3dadd(350.17, 773.89, 117.55, 3.4)
pt3dadd(350.35, 774.09, 117.55, 3.4)
pt3dadd(350.43, 774.18, 117.55, 3.4)
pt3dadd(350.52, 774.38, 117.55, 3.4)
pt3dadd(351.11, 774.38, 117.55, 3.4)
pt3dadd(350.86, 774.42, 117.55, 3.4)
pt3dadd(351.02, 774.52, 117.55, 3.4)
pt3dadd(351.2, 774.62, 117.55, 3.4)
pt3dadd(351.28, 774.71, 117.55, 3.4)
pt3dadd(351.53, 774.71, 117.55, 3.4)
pt3dadd(351.62, 774.81, 117.55, 3.4)
pt3dadd(351.79, 774.81, 117.55, 3.4)
pt3dadd(351.87, 774.91, 117.55, 3.4)
pt3dadd(351.96, 775, 117.55, 3.4)
pt3dadd(352.13, 775.1, 117.55, 3.4)
pt3dadd(352.21, 775.2, 117.55, 3.4)
pt3dadd(352.3, 775.29, 117.55, 3.4)
pt3dadd(352.38, 775.39, 117.55, 3.4)
pt3dadd(352.55, 775.48, 117.55, 3.4)
pt3dadd(352.64, 775.58, 117.55, 3.4)
pt3dadd(352.81, 775.68, 117.55, 3.4)
pt3dadd(352.98, 775.68, 117.55, 3.4)
pt3dadd(353.06, 775.78, 117.55, 3.4)
pt3dadd(353.15, 775.97, 117.55, 3.4)
pt3dadd(353.23, 776.07, 117.55, 3.4)
pt3dadd(353.4, 776.16, 117.55, 3.4)
pt3dadd(353.49, 776.26, 117.55, 3.4)
pt3dadd(353.66, 776.35, 117.55, 3.4)
pt3dadd(353.74, 776.45, 117.55, 3.4)
pt3dadd(353.91, 776.54, 117.55, 3.4)
pt3dadd(353.99, 776.64, 117.55, 3.4)
pt3dadd(354.08, 776.84, 117.55, 3.4)
pt3dadd(354.25, 776.93, 117.55, 3.4)
pt3dadd(354.33, 777.03, 117.55, 3.4)
pt3dadd(354.51, 777.03, 117.55, 3.4)
pt3dadd(354.67, 777.13, 117.55, 3.4)
pt3dadd(354.76, 777.22, 117.55, 3.4)
pt3dadd(354.85, 777.32, 117.55, 3.4)
pt3dadd(354.93, 777.41, 117.55, 3.4)
pt3dadd(355.1, 777.41, 117.55, 3.4)
pt3dadd(355.18, 777.51, 117.55, 3.4)
pt3dadd(355.27, 777.61, 117.55, 3.4)
pt3dadd(355.44, 777.61, 117.55, 3.4)
pt3dadd(355.52, 777.7, 117.55, 3.4)
pt3dadd(355.7, 777.9, 117.55, 3.4)
pt3dadd(355.78, 777.99, 117.55, 3.4)
pt3dadd(355.95, 777.99, 117.55, 3.4)
pt3dadd(356.04, 778.09, 117.55, 3.4)
pt3dadd(356.2, 778.18, 117.55, 3.4)
pt3dadd(356.29, 778.28, 117.55, 3.4)
pt3dadd(356.46, 778.38, 117.55, 3.4)
pt3dadd(356.54, 778.57, 117.55, 3.4)
pt3dadd(356.63, 778.67, 117.55, 3.4)
pt3dadd(356.8, 778.86, 117.55, 3.4)
pt3dadd(356.97, 778.96, 117.55, 3.4)
pt3dadd(357.14, 779.05, 117.55, 3.4)
pt3dadd(357.22, 779.25, 117.55, 3.4)
pt3dadd(357.31, 779.34, 117.55, 3.4)
pt3dadd(357.39, 779.44, 117.55, 3.4)
pt3dadd(357.56, 779.53, 117.55, 3.4)
pt3dadd(357.73, 779.53, 117.55, 3.4)
}
}
proc shape3d_119() {
dend[72] { pt3dadd(357.82, 779.63, 117.55, 3.4)
pt3dadd(357.99, 779.73, 117.55, 3.4)
pt3dadd(358.07, 779.83, 117.55, 3.4)
pt3dadd(358.16, 779.92, 117.55, 3.4)
pt3dadd(358.33, 780.11, 117.55, 3.4)
pt3dadd(358.41, 780.21, 117.55, 3.4)
pt3dadd(358.92, 780.21, 117.55, 3.4)
pt3dadd(359.09, 780.31, 117.55, 3.4)
pt3dadd(359.17, 780.41, 117.55, 3.4)
pt3dadd(359.35, 780.5, 117.55, 3.4)
pt3dadd(359.52, 780.5, 117.55, 3.4)
pt3dadd(359.68, 780.69, 117.55, 3.4)
pt3dadd(359.86, 780.69, 117.55, 3.4)
pt3dadd(360.02, 781.08, 117.55, 3.4)
pt3dadd(360.11, 781.17, 117.55, 3.4)
pt3dadd(360.2, 781.27, 117.55, 3.4)
pt3dadd(360.36, 781.37, 117.55, 3.4)
pt3dadd(360.45, 781.47, 117.55, 3.4)
pt3dadd(360.62, 781.66, 117.55, 3.4)
pt3dadd(360.7, 781.85, 117.55, 3.4)
pt3dadd(360.79, 781.95, 117.55, 3.4)
pt3dadd(360.88, 782.04, 117.55, 3.4)
pt3dadd(360.96, 782.14, 117.55, 3.4)
pt3dadd(361.05, 782.24, 117.55, 3.4)
pt3dadd(361.21, 782.24, 117.55, 3.4)
pt3dadd(361.3, 782.43, 117.55, 3.4)
pt3dadd(361.39, 782.62, 117.55, 3.4)
pt3dadd(361.55, 782.72, 117.55, 3.4)
pt3dadd(361.64, 782.82, 117.55, 3.4)
pt3dadd(361.72, 782.91, 117.55, 3.4)
pt3dadd(361.89, 783.01, 117.55, 3.4)
pt3dadd(362.06, 783.1, 117.55, 3.4)
pt3dadd(362.15, 783.3, 117.55, 3.4)
pt3dadd(362.15, 783.49, 117.55, 3.4)
pt3dadd(362.32, 783.59, 117.55, 3.4)
pt3dadd(362.4, 783.68, 117.55, 3.4)
pt3dadd(362.49, 783.78, 117.55, 3.4)
pt3dadd(362.66, 783.88, 117.55, 3.4)
pt3dadd(362.74, 783.97, 117.55, 3.4)
pt3dadd(362.83, 784.07, 117.55, 3.4)
pt3dadd(363, 784.16, 117.55, 3.4)
pt3dadd(363.08, 784.26, 117.55, 3.4)
pt3dadd(363.17, 784.36, 117.55, 3.4)
pt3dadd(363.17, 784.55, 117.55, 3.4)
pt3dadd(363.34, 784.65, 117.55, 3.4)
pt3dadd(363.42, 784.74, 117.55, 3.4)
pt3dadd(363.59, 784.84, 117.55, 3.4)
pt3dadd(363.68, 784.94, 117.55, 3.4)
pt3dadd(363.85, 785.13, 117.55, 3.4)
pt3dadd(364.02, 785.23, 117.55, 3.4)
pt3dadd(364.02, 785.42, 117.55, 3.4)
pt3dadd(364.1, 785.52, 117.55, 3.4)
pt3dadd(364.36, 785.8, 117.55, 3.4)
pt3dadd(364.52, 785.9, 117.55, 3.4)
pt3dadd(364.61, 786, 117.55, 3.4)
pt3dadd(364.7, 786.09, 117.55, 3.4)
pt3dadd(364.86, 786.19, 117.55, 3.4)
pt3dadd(364.95, 786.29, 117.55, 3.4)
pt3dadd(365.12, 786.39, 117.55, 3.4)
pt3dadd(365.38, 786.67, 117.55, 3.4)
pt3dadd(365.55, 786.77, 117.55, 3.4)
pt3dadd(365.63, 786.87, 117.55, 3.4)
pt3dadd(365.71, 786.96, 117.55, 3.4)
pt3dadd(365.89, 787.06, 117.55, 3.4)
pt3dadd(365.97, 787.25, 117.55, 3.4)
pt3dadd(366.05, 787.35, 117.55, 3.4)
pt3dadd(366.14, 787.45, 117.55, 3.4)
pt3dadd(366.23, 787.64, 117.55, 3.4)
pt3dadd(366.23, 787.83, 117.55, 3.4)
pt3dadd(366.31, 787.93, 117.55, 3.4)
pt3dadd(366.39, 788.02, 117.55, 3.4)
pt3dadd(366.48, 788.22, 117.55, 3.4)
pt3dadd(366.57, 788.41, 117.55, 3.4)
pt3dadd(366.65, 788.51, 117.55, 3.4)
pt3dadd(366.73, 788.6, 117.55, 3.4)
pt3dadd(366.82, 788.79, 117.55, 3.4)
pt3dadd(366.9, 788.99, 117.55, 3.4)
pt3dadd(367.16, 789.28, 117.55, 3.4)
pt3dadd(367.24, 789.47, 117.55, 3.4)
pt3dadd(367.33, 789.38, 117.55, 3.4)
pt3dadd(367.5, 789.38, 117.55, 3.4)
pt3dadd(367.67, 789.61, 117.55, 3.4)
pt3dadd(367.92, 789.91, 117.55, 3.4)
pt3dadd(368.09, 790, 117.55, 3.4)
pt3dadd(368.18, 790.1, 117.55, 3.4)
pt3dadd(368.26, 790.29, 117.55, 3.4)
pt3dadd(368.43, 790.39, 117.55, 3.4)
pt3dadd(368.52, 790.48, 117.55, 3.4)
pt3dadd(368.6, 790.67, 117.55, 3.4)
pt3dadd(368.77, 790.77, 117.55, 3.4)
pt3dadd(368.94, 790.87, 117.55, 3.4)
pt3dadd(369.11, 790.97, 117.55, 3.4)
pt3dadd(369.28, 791.06, 117.55, 3.4)
pt3dadd(369.37, 791.16, 117.55, 3.4)
pt3dadd(369.54, 791.35, 117.55, 3.4)
pt3dadd(369.7, 791.45, 117.55, 3.4)
pt3dadd(369.79, 791.54, 117.55, 3.4)
pt3dadd(370.05, 791.74, 117.55, 3.4)
pt3dadd(370.3, 792.03, 117.55, 3.4)
pt3dadd(370.47, 792.12, 117.55, 3.4)
pt3dadd(370.64, 792.22, 117.55, 3.4)
pt3dadd(370.73, 792.32, 117.55, 3.4)
pt3dadd(370.81, 792.41, 117.55, 3.4)
pt3dadd(370.98, 792.51, 117.55, 3.4)
pt3dadd(371.23, 792.8, 117.55, 3.4)
pt3dadd(371.32, 792.99, 117.55, 3.4)
pt3dadd(371.49, 792.99, 117.55, 3.4)
pt3dadd(371.66, 793.18, 117.55, 3.4)
pt3dadd(371.83, 793.28, 117.55, 3.4)
pt3dadd(371.92, 793.47, 117.55, 3.4)
pt3dadd(372, 793.57, 117.55, 3.4)
pt3dadd(372.08, 793.66, 117.55, 3.4)
pt3dadd(372.25, 793.66, 117.55, 3.4)
pt3dadd(372.34, 793.76, 117.55, 3.4)
pt3dadd(372.51, 793.86, 117.55, 3.4)
pt3dadd(372.68, 793.96, 117.55, 3.4)
pt3dadd(372.76, 794.15, 117.55, 3.4)
pt3dadd(372.85, 794.24, 117.55, 3.4)
pt3dadd(373.02, 794.24, 117.55, 3.4)
pt3dadd(373.19, 794.34, 117.55, 3.4)
pt3dadd(373.27, 794.53, 117.55, 3.4)
pt3dadd(373.36, 794.73, 117.55, 3.4)
pt3dadd(373.44, 794.82, 117.55, 3.4)
pt3dadd(373.7, 795.11, 117.55, 3.4)
pt3dadd(373.78, 795.3, 117.55, 3.4)
pt3dadd(373.95, 795.4, 117.55, 3.4)
pt3dadd(374.04, 795.69, 117.55, 3.4)
pt3dadd(374.12, 795.79, 117.55, 3.4)
pt3dadd(374.29, 795.98, 117.55, 3.4)
pt3dadd(374.38, 796.08, 117.55, 3.4)
pt3dadd(374.46, 796.27, 117.55, 3.4)
pt3dadd(374.63, 796.37, 117.55, 3.4)
pt3dadd(374.71, 796.46, 117.55, 3.4)
pt3dadd(374.89, 796.56, 117.55, 3.4)
pt3dadd(375.05, 796.66, 117.55, 3.4)
pt3dadd(375.14, 796.75, 117.55, 3.4)
pt3dadd(375.23, 796.85, 117.55, 3.4)
pt3dadd(375.39, 796.95, 117.55, 3.4)
pt3dadd(375.57, 796.95, 117.55, 3.4)
pt3dadd(375.9, 797.33, 117.55, 3.4)
pt3dadd(375.99, 797.53, 117.55, 3.4)
pt3dadd(376.16, 797.81, 117.55, 3.4)
pt3dadd(376.33, 797.91, 117.55, 3.4)
pt3dadd(376.42, 798.1, 117.55, 3.4)
pt3dadd(376.5, 798.29, 117.55, 3.4)
pt3dadd(376.84, 798.68, 117.55, 3.4)
pt3dadd(376.92, 798.78, 117.55, 3.4)
pt3dadd(377.01, 798.97, 117.55, 3.4)
pt3dadd(377.1, 799.16, 117.55, 3.4)
pt3dadd(377.18, 799.26, 117.55, 3.4)
pt3dadd(377.52, 799.65, 117.55, 3.4)
pt3dadd(377.69, 799.74, 117.55, 3.4)
pt3dadd(377.77, 799.84, 117.55, 3.4)
pt3dadd(377.86, 799.93, 117.55, 3.4)
pt3dadd(378.03, 800.22, 117.55, 3.4)
pt3dadd(378.11, 800.42, 117.55, 3.4)
pt3dadd(378.2, 800.52, 117.55, 3.4)
pt3dadd(378.37, 800.61, 117.55, 3.4)
pt3dadd(378.45, 800.71, 117.55, 3.4)
pt3dadd(378.79, 801.09, 117.55, 3.4)
pt3dadd(378.88, 801.19, 117.55, 3.4)
pt3dadd(379.05, 801.28, 117.55, 3.4)
pt3dadd(379.13, 801.38, 117.55, 3.4)
pt3dadd(379.22, 801.48, 117.55, 3.4)
pt3dadd(379.3, 801.58, 117.55, 3.4)
pt3dadd(379.39, 801.67, 117.55, 3.4)
pt3dadd(379.56, 801.67, 117.55, 3.4)
pt3dadd(379.64, 801.77, 117.55, 3.4)
pt3dadd(379.73, 802.06, 117.55, 3.4)
pt3dadd(379.81, 802.25, 117.55, 3.4)
pt3dadd(379.98, 802.35, 117.55, 3.4)
pt3dadd(380.07, 802.44, 117.55, 3.4)
pt3dadd(380.15, 802.54, 117.55, 3.4)
pt3dadd(380.32, 802.54, 117.55, 3.4)
pt3dadd(380.4, 802.64, 117.55, 3.4)
pt3dadd(380.49, 802.73, 117.55, 3.4)
pt3dadd(380.66, 802.92, 117.55, 3.4)
pt3dadd(380.83, 802.92, 117.55, 3.4)
pt3dadd(380.92, 803.02, 117.55, 3.4)
pt3dadd(381.08, 803.22, 117.55, 3.4)
pt3dadd(381.26, 803.31, 117.55, 3.4)
pt3dadd(381.34, 803.41, 117.55, 3.4)
pt3dadd(381.51, 803.51, 117.55, 3.4)
pt3dadd(381.6, 803.6, 117.55, 3.4)
pt3dadd(381.68, 803.7, 117.55, 3.4)
pt3dadd(381.77, 803.79, 117.55, 3.4)
pt3dadd(381.93, 803.89, 117.55, 3.4)
pt3dadd(382.02, 803.99, 117.55, 3.4)
pt3dadd(382.19, 803.99, 117.55, 3.4)
pt3dadd(382.27, 804.08, 117.55, 3.4)
pt3dadd(382.36, 804.18, 117.55, 3.4)
pt3dadd(382.53, 804.28, 117.55, 3.4)
pt3dadd(382.61, 804.47, 117.55, 3.4)
pt3dadd(382.7, 804.57, 117.55, 3.4)
pt3dadd(382.87, 804.66, 117.55, 3.4)
pt3dadd(382.95, 804.76, 117.55, 3.4)
pt3dadd(383.04, 804.85, 117.55, 3.4)
pt3dadd(383.21, 804.85, 117.55, 3.4)
pt3dadd(383.29, 804.95, 117.55, 3.4)
pt3dadd(383.38, 805.14, 117.55, 3.4)
}
}
proc shape3d_120() {
dend[72] { pt3dadd(383.46, 805.24, 117.55, 3.4)
pt3dadd(383.55, 805.34, 117.55, 3.4)
pt3dadd(383.63, 805.53, 117.55, 3.4)
pt3dadd(383.72, 805.72, 117.55, 3.4)
pt3dadd(383.89, 805.82, 117.55, 3.4)
pt3dadd(383.97, 805.91, 117.55, 3.4)
pt3dadd(384.06, 806.01, 117.55, 3.4)
pt3dadd(384.14, 806.21, 117.55, 3.4)
pt3dadd(384.31, 806.4, 117.55, 3.4)
pt3dadd(384.4, 806.59, 117.55, 3.4)
pt3dadd(384.48, 806.88, 117.55, 3.4)
pt3dadd(384.57, 806.98, 117.55, 3.4)
pt3dadd(384.65, 806.93, 117.55, 3.4)
pt3dadd(384.82, 807.22, 117.55, 3.4)
pt3dadd(384.82, 807.51, 117.55, 3.4)
pt3dadd(384.91, 807.7, 117.55, 3.4)
pt3dadd(384.91, 808.18, 117.55, 3.4)
pt3dadd(384.99, 808.38, 117.55, 3.4)
pt3dadd(385.08, 808.57, 117.55, 3.4)
pt3dadd(385.16, 808.76, 117.55, 3.4)
pt3dadd(385.16, 810.78, 117.55, 3.4)
pt3dadd(385.24, 810.98, 117.55, 3.4)
pt3dadd(385.24, 811.36, 117.55, 3.4)
pt3dadd(385.33, 811.46, 117.55, 3.4)
pt3dadd(385.42, 811.66, 117.55, 3.4)
pt3dadd(385.42, 811.94, 117.55, 3.4)
pt3dadd(385.58, 812.23, 117.55, 3.4)
pt3dadd(385.67, 812.33, 117.55, 3.4)
pt3dadd(385.76, 812.52, 117.55, 3.4)
pt3dadd(385.84, 812.72, 117.55, 3.4)
pt3dadd(385.92, 812.91, 117.55, 3.4)
pt3dadd(386.01, 813.1, 117.55, 3.4)
pt3dadd(386.01, 813.39, 117.55, 3.4)
pt3dadd(386.1, 813.49, 117.55, 3.4)
pt3dadd(386.18, 813.68, 117.55, 3.4)
pt3dadd(386.27, 813.87, 117.55, 3.4)
pt3dadd(386.43, 814.26, 117.55, 3.4)
pt3dadd(386.52, 814.35, 117.55, 3.4)
pt3dadd(386.61, 814.65, 117.55, 3.4)
pt3dadd(386.69, 814.74, 117.55, 3.4)
pt3dadd(386.77, 814.93, 117.55, 3.4)
pt3dadd(386.86, 815.13, 117.55, 3.4)
pt3dadd(386.95, 815.22, 117.55, 3.4)
pt3dadd(387.03, 815.41, 117.55, 3.4)
pt3dadd(387.11, 815.61, 117.55, 3.4)
pt3dadd(387.2, 815.8, 117.55, 3.4)
pt3dadd(387.29, 815.9, 117.55, 3.4)
pt3dadd(387.37, 816.19, 117.55, 3.4)
pt3dadd(387.45, 816.48, 117.55, 3.4)
pt3dadd(387.63, 816.67, 117.55, 3.4)
pt3dadd(387.71, 816.86, 117.55, 3.4)
pt3dadd(387.79, 817.15, 117.55, 3.4)
pt3dadd(387.96, 817.44, 117.55, 3.4)
pt3dadd(388.05, 817.64, 117.55, 3.4)
pt3dadd(388.05, 817.83, 117.55, 3.4)
pt3dadd(388.13, 817.92, 117.55, 3.4)
pt3dadd(388.22, 818.02, 117.55, 3.4)
pt3dadd(388.3, 818.21, 117.55, 3.4)
pt3dadd(388.39, 818.41, 117.55, 3.4)
pt3dadd(388.47, 818.5, 117.55, 3.4)
pt3dadd(388.47, 818.7, 117.55, 3.4)
pt3dadd(388.64, 818.89, 117.55, 3.4)
pt3dadd(388.73, 819.08, 117.55, 3.4)
pt3dadd(388.81, 819.18, 117.55, 3.4)
pt3dadd(388.9, 819.37, 117.55, 3.4)
pt3dadd(388.98, 819.56, 117.55, 3.4)
pt3dadd(389.07, 819.76, 117.55, 3.4)
pt3dadd(389.15, 819.85, 117.55, 3.4)
pt3dadd(389.24, 820.04, 117.55, 3.4)
pt3dadd(389.32, 820.24, 117.55, 3.4)
pt3dadd(389.41, 820.43, 117.55, 3.4)
pt3dadd(389.49, 820.53, 117.55, 3.4)
pt3dadd(389.58, 820.72, 117.55, 3.4)
pt3dadd(389.66, 820.91, 117.55, 3.4)
pt3dadd(389.75, 821.11, 117.55, 3.4)
pt3dadd(389.83, 821.3, 117.55, 3.4)
pt3dadd(389.92, 821.4, 117.55, 3.4)
pt3dadd(390, 821.49, 117.55, 3.4)
pt3dadd(390, 821.68, 117.55, 3.4)
pt3dadd(390.09, 821.78, 117.55, 3.4)
pt3dadd(390.17, 821.88, 117.55, 3.4)
pt3dadd(390.17, 822.17, 117.55, 3.4)
pt3dadd(390.26, 822.26, 117.55, 3.4)
pt3dadd(390.34, 822.46, 117.55, 3.4)
pt3dadd(390.42, 822.65, 117.55, 3.4)
pt3dadd(390.51, 822.84, 117.55, 3.4)
pt3dadd(390.6, 822.94, 117.55, 3.4)
pt3dadd(390.68, 823.13, 117.55, 3.4)
pt3dadd(390.77, 823.33, 117.55, 3.4)
pt3dadd(390.93, 823.61, 117.55, 3.4)
pt3dadd(391.02, 823.81, 117.55, 3.4)
pt3dadd(391.11, 824.1, 117.55, 3.4)
pt3dadd(391.19, 824.29, 117.55, 3.4)
pt3dadd(391.36, 824.48, 117.55, 3.4)
pt3dadd(391.36, 824.67, 117.55, 3.4)
pt3dadd(391.53, 824.87, 117.55, 3.4)
pt3dadd(391.61, 825.06, 117.55, 3.4)
pt3dadd(391.7, 825.25, 117.55, 3.4)
pt3dadd(391.87, 825.45, 117.55, 3.4)
pt3dadd(391.95, 825.64, 117.55, 3.4)
pt3dadd(392.04, 825.73, 117.55, 3.4)
pt3dadd(392.13, 825.83, 117.55, 3.4)
pt3dadd(392.21, 826.12, 117.55, 3.4)
pt3dadd(392.3, 826.32, 117.55, 3.4)
pt3dadd(392.38, 826.51, 117.55, 3.4)
pt3dadd(392.46, 826.6, 117.55, 3.4)
pt3dadd(392.55, 826.7, 117.55, 3.4)
pt3dadd(392.64, 826.89, 117.55, 3.4)
pt3dadd(392.72, 827.09, 117.55, 3.4)
pt3dadd(392.8, 827.18, 117.55, 3.4)
pt3dadd(392.8, 827.38, 117.55, 3.4)
pt3dadd(392.89, 827.66, 117.55, 3.4)
pt3dadd(392.97, 827.76, 117.55, 3.4)
pt3dadd(393.06, 827.96, 117.55, 3.4)
pt3dadd(393.14, 828.15, 117.55, 3.4)
pt3dadd(393.23, 828.34, 117.55, 3.4)
pt3dadd(393.31, 828.44, 117.55, 3.4)
pt3dadd(393.4, 828.63, 117.55, 3.4)
pt3dadd(393.48, 828.82, 117.55, 3.4)
pt3dadd(393.65, 829.02, 117.55, 3.4)
pt3dadd(393.74, 829.21, 117.55, 3.4)
pt3dadd(393.82, 829.3, 117.55, 3.4)
pt3dadd(393.91, 829.5, 117.55, 3.4)
pt3dadd(393.99, 829.69, 117.55, 3.4)
pt3dadd(394.08, 829.88, 117.55, 3.4)
pt3dadd(394.16, 829.98, 117.55, 3.4)
pt3dadd(394.25, 830.17, 117.55, 3.4)
pt3dadd(394.33, 830.36, 117.55, 3.4)
pt3dadd(394.42, 830.56, 117.55, 3.4)
pt3dadd(394.42, 830.75, 117.55, 3.4)
pt3dadd(394.5, 830.95, 117.55, 3.4)
pt3dadd(394.59, 831.04, 117.55, 3.4)
pt3dadd(394.67, 831.14, 117.55, 3.4)
pt3dadd(394.76, 831.23, 117.55, 3.4)
pt3dadd(394.84, 831.43, 117.55, 3.4)
pt3dadd(394.93, 831.62, 117.55, 3.4)
pt3dadd(395.01, 831.81, 117.55, 3.4)
pt3dadd(395.1, 832.01, 117.55, 3.4)
pt3dadd(395.18, 832.1, 117.55, 3.4)
pt3dadd(395.27, 832.2, 117.55, 3.4)
pt3dadd(395.35, 832.39, 117.55, 3.4)
pt3dadd(395.44, 832.59, 117.55, 3.4)
pt3dadd(395.52, 832.68, 117.55, 3.4)
pt3dadd(395.61, 832.78, 117.55, 3.4)
pt3dadd(395.69, 832.97, 117.55, 3.4)
pt3dadd(395.77, 833.07, 117.55, 3.4)
pt3dadd(395.77, 834.03, 117.55, 3.4)
pt3dadd(395.86, 834.13, 117.55, 3.4)
pt3dadd(395.86, 835.77, 117.55, 3.4)
pt3dadd(395.77, 835.72, 117.55, 4.08)
pt3dadd(395.86, 835.82, 117.55, 4.08)
pt3dadd(396.03, 836.01, 117.55, 4.08)
pt3dadd(396.03, 836.3, 117.55, 4.08)
pt3dadd(396.11, 836.39, 117.55, 4.08)
pt3dadd(396.2, 836.59, 117.55, 4.08)
pt3dadd(396.2, 836.88, 117.55, 4.08)
pt3dadd(396.29, 836.97, 117.55, 4.08)
pt3dadd(396.45, 836.97, 117.55, 4.08)
pt3dadd(396.54, 837.07, 117.55, 4.08)
pt3dadd(396.63, 837.16, 117.55, 4.08)
pt3dadd(396.63, 837.36, 117.55, 4.08)
pt3dadd(396.8, 837.55, 117.55, 4.08)
pt3dadd(396.8, 837.84, 117.55, 4.08)
pt3dadd(396.88, 837.94, 117.55, 4.08)
pt3dadd(396.96, 838.13, 117.55, 4.08)
pt3dadd(396.96, 838.52, 117.55, 4.08)
pt3dadd(397.05, 838.61, 117.55, 4.08)
pt3dadd(397.05, 838.8, 117.55, 4.08)
pt3dadd(397.14, 839, 117.55, 4.08)
pt3dadd(397.22, 839.19, 117.55, 4.08)
pt3dadd(397.22, 839.38, 117.55, 4.08)
pt3dadd(397.3, 839.48, 117.55, 4.08)
pt3dadd(397.39, 839.58, 117.55, 4.08)
pt3dadd(397.48, 839.77, 117.55, 4.08)
pt3dadd(397.56, 839.86, 117.55, 4.08)
pt3dadd(397.64, 839.96, 117.55, 4.08)
pt3dadd(397.73, 840.16, 117.55, 4.08)
pt3dadd(397.82, 840.25, 117.55, 4.08)
pt3dadd(397.9, 840.35, 117.55, 4.08)
pt3dadd(397.9, 840.54, 117.55, 4.08)
pt3dadd(397.98, 840.64, 117.55, 4.08)
pt3dadd(398.07, 840.73, 117.55, 4.08)
pt3dadd(398.15, 840.93, 117.55, 4.08)
pt3dadd(398.24, 841.02, 117.55, 4.08)
pt3dadd(398.32, 841.12, 117.55, 4.08)
pt3dadd(398.41, 841.31, 117.55, 4.08)
pt3dadd(398.41, 841.7, 117.55, 4.08)
pt3dadd(398.49, 841.79, 117.55, 4.08)
pt3dadd(398.49, 842.37, 117.55, 4.08)
pt3dadd(398.58, 842.57, 117.55, 4.08)
pt3dadd(398.66, 842.66, 117.55, 4.08)
pt3dadd(398.75, 842.76, 117.55, 4.08)
pt3dadd(398.75, 844.49, 117.55, 4.08)
pt3dadd(398.83, 844.59, 117.55, 4.08)
pt3dadd(398.83, 844.78, 117.55, 4.08)
pt3dadd(399, 844.98, 117.55, 4.08)
pt3dadd(399.09, 845.17, 117.55, 4.08)
pt3dadd(399.09, 845.36, 117.55, 4.08)
pt3dadd(399.17, 845.46, 117.55, 4.08)
pt3dadd(399.26, 845.65, 117.55, 4.08)
}
}
proc shape3d_121() {
dend[72] { pt3dadd(399.34, 845.84, 117.55, 4.08)
pt3dadd(399.43, 846.04, 117.55, 4.08)
pt3dadd(399.6, 846.23, 117.55, 4.08)
pt3dadd(399.68, 846.42, 117.55, 4.08)
pt3dadd(399.77, 846.62, 117.55, 4.08)
pt3dadd(399.77, 846.81, 117.55, 4.08)
pt3dadd(399.85, 847, 117.55, 4.08)
pt3dadd(399.94, 847.1, 117.55, 4.08)
pt3dadd(400.02, 847.2, 117.55, 4.08)
pt3dadd(400.11, 847.48, 117.55, 4.08)
pt3dadd(400.28, 847.78, 117.55, 4.08)
pt3dadd(400.36, 847.87, 117.55, 4.08)
pt3dadd(400.45, 848.07, 117.55, 4.08)
pt3dadd(400.53, 848.26, 117.55, 4.08)
pt3dadd(400.62, 848.45, 117.55, 4.08)
pt3dadd(400.7, 848.55, 117.55, 4.08)
pt3dadd(400.79, 848.64, 117.55, 4.08)
pt3dadd(400.87, 848.74, 117.55, 4.08)
pt3dadd(400.95, 848.84, 117.55, 4.08)
pt3dadd(401.04, 848.93, 117.55, 4.08)
pt3dadd(401.04, 849.13, 117.55, 4.08)
pt3dadd(401.13, 849.22, 117.55, 4.08)
pt3dadd(401.21, 849.41, 117.55, 4.08)
pt3dadd(401.3, 849.61, 117.55, 4.08)
pt3dadd(401.38, 849.71, 117.55, 4.08)
pt3dadd(401.46, 849.8, 117.55, 4.08)
pt3dadd(401.46, 849.99, 117.55, 4.08)
pt3dadd(401.55, 850.09, 117.55, 4.08)
pt3dadd(401.64, 850.18, 117.55, 4.08)
pt3dadd(401.72, 850.28, 117.55, 4.08)
pt3dadd(401.8, 850.38, 117.55, 4.08)
pt3dadd(401.89, 850.47, 117.55, 4.08)
pt3dadd(401.98, 850.57, 117.55, 4.08)
pt3dadd(401.98, 851.34, 117.55, 4.08)
pt3dadd(402.06, 851.44, 117.55, 4.08)
pt3dadd(402.06, 851.73, 117.55, 4.08)
pt3dadd(402.14, 851.83, 117.55, 4.08)
pt3dadd(402.23, 852.02, 117.55, 4.08)
pt3dadd(402.32, 852.21, 117.55, 4.08)
pt3dadd(402.4, 852.31, 117.55, 4.08)
pt3dadd(402.48, 852.41, 117.55, 4.08)
pt3dadd(402.65, 852.5, 117.55, 4.08)
pt3dadd(402.65, 854.62, 117.55, 4.08)
pt3dadd(402.65, 851.97, 117.55, 1.36)
pt3dadd(402.65, 855.44, 117.55, 1.36)
pt3dadd(416.05, 891.29, 117.55, 4.2)
pt3dadd(416.05, 893.22, 117.55, 4.2)
pt3dadd(416.05, 893.32, 117.55, 4.2)
pt3dadd(416.13, 893.41, 117.55, 4.2)
pt3dadd(416.13, 893.8, 117.55, 4.2)
pt3dadd(416.21, 893.9, 117.55, 4.2)
pt3dadd(416.3, 893.99, 117.55, 4.2)
pt3dadd(416.3, 894.38, 117.55, 4.2)
pt3dadd(416.39, 894.47, 117.55, 4.2)
pt3dadd(416.55, 894.57, 117.55, 4.2)
pt3dadd(416.64, 894.67, 117.55, 4.2)
pt3dadd(416.73, 894.76, 117.55, 4.2)
pt3dadd(416.89, 894.67, 117.55, 4.2)
pt3dadd(417.66, 894.67, 117.55, 4.2)
pt3dadd(417.74, 894.67, 117.55, 4.2)
pt3dadd(417.92, 894.57, 117.55, 4.2)
pt3dadd(418, 894.47, 117.55, 4.2)
pt3dadd(418.08, 894.38, 117.55, 4.2)
pt3dadd(418.17, 894.28, 117.55, 4.2)
pt3dadd(418.42, 894.28, 117.55, 4.2)
pt3dadd(418.51, 894.09, 117.55, 4.2)
pt3dadd(418.59, 894.18, 117.55, 4.2)
pt3dadd(418.76, 894.09, 117.55, 4.2)
pt3dadd(420.04, 894.09, 117.55, 4.2)
pt3dadd(420.12, 894.23, 117.55, 4.2)
pt3dadd(424.2, 902.77, 117.55, 4.2)
pt3dadd(427.42, 911.11, 117.55, 4.2)
pt3dadd(430.65, 917.62, 117.55, 4.2)
pt3dadd(431.67, 924.33, 117.55, 4.2)
pt3dadd(432.69, 930.74, 117.55, 4.2)
pt3dadd(434.22, 935.13, 117.55, 4.2)
pt3dadd(435.58, 947.33, 117.55, 4.2)
pt3dadd(437.45, 958.47, 117.55, 4.2)
pt3dadd(438.3, 967.87, 117.55, 4.2)
pt3dadd(439.91, 975.83, 117.55, 4.2)
pt3dadd(441.95, 980.8, 117.55, 4.2)
pt3dadd(444.41, 988.47, 117.55, 4.2)
pt3dadd(448.4, 995.94, 117.55, 4.2)
pt3dadd(450.95, 1000.72, 117.55, 4.2)
pt3dadd(451.03, 1000.72, 117.55, 4.2)
pt3dadd(451.12, 1000.81, 117.55, 4.2)
pt3dadd(451.2, 1000.91, 117.55, 4.2)
pt3dadd(451.29, 1001, 117.55, 4.2)
pt3dadd(451.46, 1001.1, 117.55, 4.2)
pt3dadd(451.54, 1001.2, 117.55, 4.2)
pt3dadd(451.63, 1001.39, 117.55, 4.2)
pt3dadd(451.71, 1001.48, 117.55, 4.2)
pt3dadd(451.8, 1001.68, 117.55, 4.2)
pt3dadd(451.88, 1001.78, 117.55, 4.2)
pt3dadd(452.05, 1001.87, 117.55, 4.2)
pt3dadd(452.14, 1002.07, 117.55, 4.2)
pt3dadd(452.22, 1002.26, 117.55, 4.2)
pt3dadd(452.3, 1002.45, 117.55, 4.2)
pt3dadd(452.39, 1002.64, 117.55, 4.2)
pt3dadd(452.48, 1002.74, 117.55, 4.2)
pt3dadd(452.56, 1002.84, 117.55, 4.2)
pt3dadd(452.64, 1003.03, 117.55, 4.2)
pt3dadd(452.73, 1003.22, 117.55, 4.2)
pt3dadd(452.82, 1003.32, 117.55, 4.2)
pt3dadd(452.9, 1003.61, 117.55, 4.2)
pt3dadd(452.98, 1003.71, 117.55, 4.2)
pt3dadd(453.07, 1003.8, 117.55, 4.2)
pt3dadd(453.15, 1003.9, 117.55, 4.2)
pt3dadd(453.24, 1004.09, 117.55, 4.2)
pt3dadd(453.33, 1004.18, 117.55, 4.2)
pt3dadd(453.41, 1004.38, 117.55, 4.2)
pt3dadd(453.49, 1004.47, 117.55, 4.2)
pt3dadd(453.58, 1004.57, 117.55, 4.2)
pt3dadd(453.75, 1004.67, 117.55, 4.2)
pt3dadd(453.83, 1004.77, 117.55, 4.2)
pt3dadd(453.92, 1004.86, 117.55, 4.2)
pt3dadd(454.09, 1004.96, 117.55, 4.2)
pt3dadd(454.17, 1005.15, 117.55, 4.2)
pt3dadd(454.26, 1005.25, 117.55, 4.2)
pt3dadd(454.35, 1005.34, 117.55, 4.2)
pt3dadd(454.43, 1005.44, 117.55, 4.2)
pt3dadd(454.51, 1005.54, 117.55, 4.2)
pt3dadd(454.6, 1005.63, 117.55, 4.2)
pt3dadd(454.68, 1005.83, 117.55, 4.2)
pt3dadd(454.77, 1006.02, 117.55, 4.2)
pt3dadd(454.77, 1006.21, 117.55, 4.2)
pt3dadd(454.94, 1006.31, 117.55, 4.2)
pt3dadd(455.02, 1006.41, 117.55, 4.2)
pt3dadd(455.11, 1006.5, 117.55, 4.2)
pt3dadd(455.28, 1006.6, 117.55, 4.2)
pt3dadd(455.45, 1006.7, 117.55, 4.2)
pt3dadd(455.53, 1006.79, 117.55, 4.2)
pt3dadd(455.62, 1006.98, 117.55, 4.2)
pt3dadd(455.7, 1007.08, 117.55, 4.2)
pt3dadd(455.79, 1007.17, 117.55, 4.2)
pt3dadd(455.87, 1007.27, 117.55, 4.2)
pt3dadd(455.87, 1007.56, 117.55, 4.2)
pt3dadd(455.96, 1007.66, 117.55, 4.2)
pt3dadd(455.96, 1008.43, 117.55, 4.2)
pt3dadd(456.04, 1008.62, 117.55, 4.2)
pt3dadd(456.13, 1008.72, 117.55, 4.2)
pt3dadd(456.21, 1008.91, 117.55, 4.2)
pt3dadd(456.3, 1009.01, 117.55, 4.2)
pt3dadd(456.38, 1009.1, 117.55, 4.2)
pt3dadd(456.55, 1009.3, 117.55, 4.2)
pt3dadd(456.64, 1009.49, 117.55, 4.2)
pt3dadd(456.64, 1009.68, 117.55, 4.2)
pt3dadd(456.72, 1009.88, 117.55, 4.2)
pt3dadd(456.81, 1009.97, 117.55, 4.2)
pt3dadd(456.89, 1010.07, 117.55, 4.2)
pt3dadd(456.89, 1010.65, 117.55, 4.2)
pt3dadd(456.98, 1010.84, 117.55, 4.2)
pt3dadd(456.98, 1011.03, 117.55, 4.2)
pt3dadd(457.06, 1011.13, 117.55, 4.2)
pt3dadd(457.14, 1011.23, 117.55, 4.2)
pt3dadd(457.23, 1011.32, 117.55, 4.2)
pt3dadd(457.32, 1011.52, 117.55, 4.2)
pt3dadd(457.4, 1011.61, 117.55, 4.2)
pt3dadd(457.4, 1011.8, 117.55, 4.2)
pt3dadd(457.48, 1011.9, 117.55, 4.2)
pt3dadd(457.48, 1012.19, 117.55, 4.2)
pt3dadd(457.57, 1012.29, 117.55, 4.2)
pt3dadd(457.57, 1012.58, 117.55, 4.2)
pt3dadd(457.65, 1012.77, 117.55, 4.2)
pt3dadd(457.65, 1013.35, 117.55, 4.2)
pt3dadd(457.83, 1013.35, 117.55, 4.2)
pt3dadd(457.91, 1013.45, 117.55, 4.2)
pt3dadd(457.99, 1013.54, 117.55, 4.2)
pt3dadd(458.08, 1013.73, 117.55, 4.2)
pt3dadd(458.17, 1014.03, 117.55, 4.2)
pt3dadd(458.33, 1014.31, 117.55, 4.2)
pt3dadd(458.42, 1014.41, 117.55, 4.2)
pt3dadd(458.51, 1014.51, 117.55, 4.2)
pt3dadd(458.76, 1014.84, 117.55, 4.2)
pt3dadd(458.85, 1014.94, 117.55, 4.2)
pt3dadd(458.85, 1015.33, 117.55, 4.2)
pt3dadd(458.93, 1015.42, 117.55, 4.2)
pt3dadd(459.1, 1015.61, 117.55, 4.2)
pt3dadd(459.1, 1015.91, 117.55, 4.2)
pt3dadd(459.18, 1016, 117.55, 4.2)
pt3dadd(459.27, 1016.1, 117.55, 4.2)
pt3dadd(459.27, 1016.29, 117.55, 4.2)
pt3dadd(459.36, 1016.39, 117.55, 4.2)
pt3dadd(459.44, 1016.58, 117.55, 4.2)
pt3dadd(459.52, 1016.77, 117.55, 4.2)
pt3dadd(459.61, 1016.87, 117.55, 4.2)
pt3dadd(459.69, 1016.97, 117.55, 4.2)
pt3dadd(459.69, 1017.16, 117.55, 4.2)
pt3dadd(459.78, 1017.35, 117.55, 4.2)
pt3dadd(459.86, 1017.45, 117.55, 4.2)
pt3dadd(459.95, 1017.64, 117.55, 4.2)
pt3dadd(460.03, 1017.74, 117.55, 4.2)
pt3dadd(460.12, 1017.84, 117.55, 4.2)
pt3dadd(460.2, 1018.03, 117.55, 4.2)
pt3dadd(460.37, 1018.12, 117.55, 4.2)
pt3dadd(460.37, 1018.32, 117.55, 4.2)
pt3dadd(460.46, 1018.51, 117.55, 4.2)
pt3dadd(460.54, 1018.6, 117.55, 4.2)
pt3dadd(460.63, 1018.7, 117.55, 4.2)
pt3dadd(460.71, 1018.9, 117.55, 4.2)
}
}
proc shape3d_122() {
dend[72] { pt3dadd(460.8, 1018.99, 117.55, 4.2)
pt3dadd(460.88, 1019.18, 117.55, 4.2)
pt3dadd(461.05, 1019.28, 117.55, 4.2)
pt3dadd(461.22, 1019.38, 117.55, 4.2)
pt3dadd(461.31, 1019.47, 117.55, 4.2)
pt3dadd(461.39, 1019.57, 117.55, 4.2)
pt3dadd(461.48, 1019.76, 117.55, 4.2)
pt3dadd(461.65, 1019.76, 117.55, 4.2)
pt3dadd(461.73, 1019.96, 117.55, 4.2)
pt3dadd(461.82, 1020.05, 117.55, 4.2)
pt3dadd(461.9, 1020.15, 117.55, 4.2)
pt3dadd(462.24, 1020.15, 117.55, 4.2)
pt3dadd(462.33, 1020.24, 117.55, 4.2)
pt3dadd(462.41, 1020.34, 117.55, 4.2)
pt3dadd(462.58, 1020.34, 117.55, 4.2)
pt3dadd(462.67, 1020.44, 117.55, 4.2)
pt3dadd(462.83, 1020.53, 117.55, 4.2)
pt3dadd(463.01, 1020.63, 117.55, 4.2)
pt3dadd(463.09, 1020.73, 117.55, 4.2)
pt3dadd(463.17, 1020.92, 117.55, 4.2)
pt3dadd(463.26, 1021.11, 117.55, 4.2)
pt3dadd(463.35, 1021.21, 117.55, 4.2)
pt3dadd(463.43, 1021.4, 117.55, 4.2)
pt3dadd(463.52, 1021.59, 117.55, 4.2)
pt3dadd(463.68, 1021.89, 117.55, 4.2)
pt3dadd(463.77, 1022.17, 117.55, 4.2)
pt3dadd(463.94, 1022.17, 117.55, 4.2)
pt3dadd(464.2, 1022.51, 117.55, 4.2)
pt3dadd(468.7, 1029.31, 117.55, 4.2)
pt3dadd(472.77, 1031.68, 117.55, 4.2)
pt3dadd(475.66, 1033.94, 117.55, 4.2)
pt3dadd(479.14, 1034.08, 117.55, 4.2)
pt3dadd(484.23, 1034.62, 117.55, 4.2)
pt3dadd(491.54, 1033.12, 117.55, 4.2)
pt3dadd(497.48, 1033.56, 117.55, 4.2)
pt3dadd(503.17, 1032.06, 117.55, 4.2)
pt3dadd(509.96, 1031.53, 117.55, 4.2)
pt3dadd(514.29, 1032.06, 117.55, 4.2)
pt3dadd(519.9, 1030.28, 117.55, 4.2)
pt3dadd(523.47, 1029.26, 117.55, 4.2)
pt3dadd(526.1, 1026.22, 117.55, 4.2)
pt3dadd(529.41, 1023.19, 117.55, 4.2)
pt3dadd(529.75, 1022.8, 117.55, 4.2)
pt3dadd(530.09, 1022.41, 117.55, 4.2)
}
dend[73] {pt3dclear()
pt3dadd(183.26, 513.98, 117.55, 6.79)
pt3dadd(190.56, 517.36, 117.55, 6.79)
pt3dadd(196.67, 521.51, 117.55, 6.11)
pt3dadd(201.6, 523.92, 117.55, 5.43)
pt3dadd(206.18, 527.88, 117.55, 4.76)
pt3dadd(208.22, 528.93, 117.55, 4.76)
pt3dadd(212.46, 534.63, 117.55, 4.76)
pt3dadd(211.85, 534.4, 117.55, 3.4)
pt3dadd(248.48, 553.98, 117.55, 3.4)
pt3dadd(255.84, 561.69, 117.55, 3.4)
pt3dadd(257.71, 565.26, 117.55, 3.4)
pt3dadd(258.22, 566.9, 117.55, 3.4)
pt3dadd(259.24, 568.35, 117.55, 3.4)
pt3dadd(261.79, 569.79, 117.55, 3.4)
pt3dadd(265.86, 575.1, 117.55, 3.4)
pt3dadd(268.58, 578.47, 117.55, 3.4)
pt3dadd(271.3, 580.89, 117.55, 3.4)
pt3dadd(276.23, 583.49, 117.55, 3.4)
pt3dadd(279.96, 586.29, 117.55, 3.4)
pt3dadd(282.17, 588.89, 117.55, 3.4)
pt3dadd(285.57, 593.04, 117.55, 3.4)
pt3dadd(286.58, 598.34, 117.55, 3.4)
pt3dadd(286.76, 603.65, 117.55, 3.4)
pt3dadd(286.24, 610.5, 117.55, 3.4)
pt3dadd(287.1, 617.92, 117.55, 4.08)
pt3dadd(287.94, 624, 117.55, 4.08)
pt3dadd(289.98, 630.27, 117.55, 4.08)
pt3dadd(293.72, 639.05, 117.55, 4.08)
pt3dadd(297.45, 648.02, 117.55, 4.08)
pt3dadd(301.87, 655.83, 117.55, 4.08)
pt3dadd(305.61, 662.29, 117.55, 4.08)
pt3dadd(308.15, 667.4, 117.55, 4.76)
pt3dadd(310.19, 670.59, 117.55, 4.76)
pt3dadd(311.38, 675.7, 117.55, 4.76)
pt3dadd(313.76, 681.78, 117.55, 5.43)
pt3dadd(315.96, 687.47, 117.55, 5.43)
pt3dadd(316.82, 690.26, 117.55, 5.43)
pt3dadd(318.51, 691.52, 117.55, 5.43)
pt3dadd(321.91, 693.73, 117.55, 5.43)
pt3dadd(326.33, 695.95, 117.55, 6.11)
pt3dadd(330.23, 696.43, 117.55, 6.79)
pt3dadd(336.68, 698.56, 117.55, 6.79)
pt3dadd(341.44, 705.69, 117.55, 6.79)
pt3dadd(345.52, 715.15, 117.55, 5.43)
pt3dadd(348.92, 724.98, 117.55, 5.43)
pt3dadd(349.6, 731.35, 117.55, 5.43)
pt3dadd(348.58, 741.96, 117.55, 4.76)
pt3dadd(349.3, 733.72, 117.55, 3.06)
pt3dadd(348.88, 737.34, 117.55, 3.06)
pt3dadd(348.11, 742.79, 117.55, 3.06)
pt3dadd(348.28, 748.14, 117.55, 4.5)
pt3dadd(347.86, 751.76, 117.55, 4)
pt3dadd(347.61, 754.22, 117.55, 3.6)
pt3dadd(346.5, 758.61, 117.55, 3)
pt3dadd(345.9, 762.8, 117.55, 2.8)
pt3dadd(345.14, 764.97, 117.55, 2.5)
pt3dadd(344.89, 766.18, 117.55, 2.38)
pt3dadd(345.23, 766.9, 117.55, 2.38)
pt3dadd(345.4, 771, 117.55, 2.45)
pt3dadd(345.9, 774.52, 117.55, 2.38)
pt3dadd(345.65, 776.21, 117.55, 2.38)
pt3dadd(345.4, 777.41, 117.55, 2.38)
pt3dadd(345.73, 779.01, 117.55, 2.38)
pt3dadd(346.58, 781.18, 117.55, 2.38)
pt3dadd(348.2, 784.41, 117.55, 2.38)
pt3dadd(349.64, 787.06, 117.55, 2.38)
pt3dadd(350.58, 788.46, 117.55, 2.38)
pt3dadd(350.66, 789.66, 117.55, 2.38)
pt3dadd(350.49, 790.78, 117.55, 2.38)
pt3dadd(350.41, 791.69, 117.55, 2.38)
pt3dadd(350.49, 792.61, 117.55, 2.38)
pt3dadd(351, 794.01, 117.55, 2.38)
pt3dadd(352.02, 796.95, 117.55, 2.38)
pt3dadd(353.04, 799.5, 117.55, 2.38)
pt3dadd(353.46, 803.12, 117.55, 2.38)
pt3dadd(354.82, 808.38, 117.55, 2.38)
pt3dadd(356.18, 811.13, 117.55, 2.38)
pt3dadd(357.11, 812.91, 117.55, 2.38)
pt3dadd(357.54, 814.11, 117.55, 2.38)
pt3dadd(357.96, 815.03, 117.55, 2.38)
pt3dadd(358.05, 815.95, 117.55, 2.38)
pt3dadd(357.88, 816.86, 117.55, 2.38)
pt3dadd(357.71, 818.46, 117.55, 2.38)
pt3dadd(358.3, 821.78, 117.55, 2.38)
pt3dadd(359.49, 824.53, 117.55, 2.38)
pt3dadd(360.17, 826.6, 117.55, 2.38)
pt3dadd(360.6, 828.49, 117.55, 2.38)
pt3dadd(360.09, 830.47, 117.55, 2.38)
pt3dadd(360.26, 832.34, 117.55, 2.38)
pt3dadd(360.85, 834.13, 117.55, 2.38)
pt3dadd(360.6, 836.59, 117.55, 2.38)
pt3dadd(360, 838.95, 117.55, 2.38)
pt3dadd(360.26, 840.93, 117.55, 2.72)
pt3dadd(360.68, 844.06, 117.55, 2.72)
pt3dadd(361.02, 846.72, 117.55, 2.72)
pt3dadd(361.87, 848.69, 117.55, 2.72)
pt3dadd(363.57, 857.23, 117.55, 2.04)
}
dend[74] {pt3dclear()
pt3dadd(363.57, 857.23, 117.55, 2.04)
pt3dadd(365.44, 858.72, 117.55, 2.04)
pt3dadd(366.46, 861.96, 117.55, 2.04)
pt3dadd(366.71, 864.13, 117.55, 2.04)
pt3dadd(366.96, 866.59, 117.55, 2.04)
pt3dadd(367.82, 869.04, 117.55, 2.04)
pt3dadd(368.15, 871.22, 117.55, 2.04)
pt3dadd(367.48, 874.35, 117.55, 2.04)
pt3dadd(367.48, 874.59, 117.55, 1.7)
pt3dadd(367.64, 875.22, 117.55, 1.7)
pt3dadd(368.07, 876.13, 117.55, 1.7)
pt3dadd(368.67, 878.21, 117.55, 1.7)
pt3dadd(369.17, 883.08, 117.55, 1.7)
pt3dadd(370.11, 885.92, 117.55, 1.7)
pt3dadd(370.19, 886.65, 117.55, 1.7)
pt3dadd(370.96, 887.47, 117.55, 1.7)
pt3dadd(371.8, 887.22, 117.55, 1.7)
pt3dadd(373.17, 886.41, 117.55, 1.7)
pt3dadd(374.95, 885.01, 117.55, 1.7)
pt3dadd(377.41, 882.35, 117.55, 1.7)
pt3dadd(377.33, 882.59, 117.55, 1.7)
pt3dadd(377.58, 881.97, 117.55, 1.7)
pt3dadd(378.09, 881.63, 117.55, 1.7)
pt3dadd(378.6, 881.78, 117.55, 1.7)
pt3dadd(379.11, 882.21, 117.55, 1.7)
pt3dadd(379.7, 882.84, 117.55, 1.7)
pt3dadd(380.64, 882.98, 117.55, 1.7)
pt3dadd(380.81, 882.74, 117.55, 1.7)
pt3dadd(381.23, 882.4, 117.55, 1.7)
pt3dadd(381.66, 881.48, 117.55, 1.7)
pt3dadd(382.08, 879.8, 117.55, 1.7)
pt3dadd(382.51, 877.63, 117.55, 1.7)
pt3dadd(382.93, 876.52, 117.55, 2.38)
pt3dadd(383.95, 875.41, 117.55, 2.38)
pt3dadd(385.05, 875.36, 117.55, 2.38)
pt3dadd(386.33, 874.64, 117.55, 2.38)
pt3dadd(386.92, 874.3, 117.55, 2.38)
pt3dadd(387.77, 873.96, 117.55, 2.38)
pt3dadd(388.62, 874.3, 117.55, 2.38)
pt3dadd(389.81, 875.22, 117.55, 2.38)
pt3dadd(390.32, 875.55, 117.55, 2.38)
pt3dadd(390.91, 876.18, 117.55, 2.38)
pt3dadd(392.02, 876.91, 117.55, 2.38)
pt3dadd(392.44, 876.86, 117.55, 2.38)
pt3dadd(392.95, 876.52, 117.55, 2.38)
pt3dadd(392.95, 876.28, 117.55, 2.38)
pt3dadd(393.12, 876.33, 117.55, 2.38)
}
dend[75] {pt3dclear()
pt3dadd(363.57, 857.23, 117.55, 2.04)
pt3dadd(363.4, 862.2, 117.55, 2.04)
pt3dadd(363.48, 868.99, 117.55, 2.04)
pt3dadd(364.25, 873.77, 117.55, 2.04)
pt3dadd(364.59, 878.64, 117.55, 2.04)
pt3dadd(365.35, 883.51, 117.55, 2.04)
pt3dadd(365.95, 888, 117.55, 2.04)
pt3dadd(366.63, 891.33, 117.55, 2.38)
pt3dadd(366.37, 893.59, 117.55, 2.38)
pt3dadd(366.03, 895.57, 117.55, 2.38)
pt3dadd(366.63, 897.54, 117.55, 2.38)
pt3dadd(367.14, 899.04, 117.55, 2.38)
}
}
proc shape3d_123() {
dend[75] { pt3dadd(367.56, 902.85, 117.55, 2.38)
pt3dadd(368.15, 909.17, 117.55, 2.72)
pt3dadd(369.17, 915, 117.55, 2.72)
pt3dadd(369.09, 920.26, 117.55, 2.72)
pt3dadd(369.09, 923.1, 117.55, 2.72)
pt3dadd(369.01, 925.37, 117.55, 2.72)
pt3dadd(369.09, 926.09, 117.55, 2.72)
pt3dadd(369.09, 926.43, 117.55, 2.72)
pt3dadd(369.68, 927.54, 117.55, 2.72)
pt3dadd(370.28, 928.27, 117.55, 2.72)
pt3dadd(371.13, 929.66, 117.55, 2.72)
pt3dadd(372.4, 933.66, 117.55, 2.72)
pt3dadd(373.17, 936.8, 117.55, 2.72)
pt3dadd(373.17, 939.74, 117.55, 2.72)
pt3dadd(373.17, 942.88, 117.55, 2.38)
pt3dadd(372.83, 947.07, 117.55, 2.38)
pt3dadd(373.25, 951.27, 117.55, 2.38)
pt3dadd(372.99, 954.69, 117.55, 2.38)
pt3dadd(373.59, 958.6, 117.55, 2.38)
pt3dadd(374.18, 961.83, 117.55, 2.38)
pt3dadd(375.46, 967.66, 117.55, 1.7)
}
dend[76] {pt3dclear()
pt3dadd(375.46, 967.66, 117.55, 2.72)
pt3dadd(378.77, 973.98, 117.55, 2.72)
pt3dadd(380.38, 977.98, 117.55, 2.38)
pt3dadd(381.83, 984.21, 117.55, 2.38)
pt3dadd(385.22, 992.55, 117.55, 2.38)
pt3dadd(388.28, 1000.03, 117.55, 2.38)
pt3dadd(389.47, 1003.74, 117.55, 2.38)
pt3dadd(389.64, 1008.03, 117.55, 2.38)
pt3dadd(389.73, 1012.32, 117.55, 2.38)
pt3dadd(388.2, 1015.65, 117.55, 2.38)
pt3dadd(386.41, 1019.46, 117.55, 2.38)
pt3dadd(384.2, 1023.46, 117.55, 2.38)
pt3dadd(381.4, 1027.46, 117.55, 2.38)
pt3dadd(377.83, 1030.41, 117.55, 2.38)
pt3dadd(375.97, 1033.44, 117.55, 2.38)
pt3dadd(375.63, 1035.52, 117.55, 2.38)
pt3dadd(375.37, 1039.33, 117.55, 2.38)
pt3dadd(374.86, 1040.53, 117.55, 2.38)
pt3dadd(373.33, 1043.38, 117.55, 2.38)
pt3dadd(370.28, 1052.97, 117.55, 2.38)
pt3dadd(368.83, 1057.27, 117.55, 2.38)
pt3dadd(367.98, 1063.1, 117.55, 2.38)
pt3dadd(367.9, 1067.2, 117.55, 2.38)
pt3dadd(368.07, 1067.64, 117.55, 2.38)
}
dend[77] {pt3dclear()
pt3dadd(375.46, 967.66, 117.55, 1.7)
pt3dadd(375.2, 972.05, 117.55, 1.7)
pt3dadd(375.29, 980.49, 117.55, 1.7)
pt3dadd(374.78, 988.35, 117.55, 1.7)
pt3dadd(374.78, 994.58, 117.55, 1.7)
pt3dadd(374.78, 997.71, 117.55, 1.7)
pt3dadd(375.12, 1000.07, 117.55, 1.7)
pt3dadd(375.54, 1002.05, 117.55, 1.7)
pt3dadd(376.73, 1007.11, 117.55, 1.7)
pt3dadd(377.58, 1011.6, 117.55, 1.7)
pt3dadd(378.01, 1013.96, 117.55, 1.36)
pt3dadd(378.17, 1014.78, 117.55, 1.36)
pt3dadd(378.17, 1015.31, 117.55, 1.36)
pt3dadd(377.75, 1017.39, 117.55, 1.36)
pt3dadd(376.82, 1021.29, 117.55, 1.36)
pt3dadd(376.73, 1028.96, 117.55, 1.36)
pt3dadd(377.75, 1035.85, 117.55, 1.36)
pt3dadd(378.35, 1041.98, 117.55, 1.36)
pt3dadd(379.2, 1047.91, 117.55, 1.36)
pt3dadd(379.7, 1054.04, 117.55, 1.36)
pt3dadd(380.55, 1063.97, 117.55, 0.68)
pt3dadd(380.72, 1075.26, 117.55, 1.36)
pt3dadd(380.04, 1089.72, 117.55, 1.36)
pt3dadd(379.02, 1108.44, 117.55, 1.36)
pt3dadd(378.58, 1115.84, 117.55, 1.36)
pt3dadd(377.9, 1119.84, 117.55, 1.36)
pt3dadd(377.99, 1122.98, 117.55, 1.36)
pt3dadd(378.92, 1124.96, 117.55, 1.36)
pt3dadd(379.1, 1126.26, 117.55, 1.36)
pt3dadd(378.67, 1127.37, 117.55, 1.36)
pt3dadd(378.24, 1130.21, 117.55, 1.36)
pt3dadd(378.67, 1135.18, 117.55, 1.36)
pt3dadd(377.65, 1142.27, 117.55, 1.36)
pt3dadd(376.12, 1152.16, 117.55, 1.36)
pt3dadd(374.59, 1160.31, 117.55, 1.36)
pt3dadd(374.17, 1164.5, 117.55, 1.7)
pt3dadd(374.34, 1167.06, 117.55, 1.7)
pt3dadd(375.44, 1173.76, 117.55, 2.04)
pt3dadd(376.12, 1178.15, 117.55, 2.04)
pt3dadd(376.55, 1179.74, 117.55, 2.04)
pt3dadd(376.12, 1183.17, 117.55, 2.04)
pt3dadd(375.61, 1187.55, 117.55, 2.04)
pt3dadd(375.95, 1193.97, 117.55, 2.72)
pt3dadd(378.16, 1205.4, 117.55, 2.72)
pt3dadd(378.58, 1214.03, 117.55, 2.72)
pt3dadd(378.76, 1218.22, 117.55, 2.72)
pt3dadd(378.76, 1220.49, 117.55, 2.72)
pt3dadd(377.65, 1224.2, 117.55, 2.72)
pt3dadd(375.19, 1231.2, 117.55, 2.72)
pt3dadd(371.28, 1238, 117.55, 2.72)
pt3dadd(368.48, 1244.31, 117.55, 2.72)
pt3dadd(366.36, 1249.96, 117.55, 2.72)
pt3dadd(365.76, 1250.97, 117.55, 2.72)
pt3dadd(365.59, 1251.89, 117.55, 2.72)
pt3dadd(366.1, 1253.77, 117.55, 2.72)
pt3dadd(366.52, 1258.25, 117.55, 2.72)
pt3dadd(366.52, 1262.06, 117.55, 2.72)
pt3dadd(366.36, 1267.94, 117.55, 2.72)
pt3dadd(366.19, 1273.83, 117.55, 2.72)
pt3dadd(366.02, 1279.71, 117.55, 2.72)
pt3dadd(363.98, 1287.91, 117.55, 2.72)
pt3dadd(363.13, 1294.66, 117.55, 2.72)
pt3dadd(360.92, 1301.8, 117.55, 2.72)
pt3dadd(357.7, 1311.64, 117.55, 2.72)
pt3dadd(354.47, 1321.47, 117.55, 2.72)
pt3dadd(348.86, 1333.24, 117.55, 2.72)
pt3dadd(344.96, 1346.17, 117.55, 2.72)
pt3dadd(343.43, 1348.68, 117.55, 2.72)
}
dend[78] {pt3dclear()
pt3dadd(153.53, 438.17, 117.55, 6.79)
pt3dadd(151.32, 440.78, 117.55, 6.79)
pt3dadd(151.15, 441.84, 117.55, 6.79)
pt3dadd(151.15, 442.9, 117.55, 6.79)
pt3dadd(151.15, 446.28, 117.55, 6.79)
pt3dadd(151.32, 447.53, 117.55, 6.79)
pt3dadd(151.15, 449.56, 117.55, 6.79)
pt3dadd(150.65, 450.23, 117.55, 6.79)
pt3dadd(148.1, 458.43, 117.55, 6.79)
pt3dadd(147.25, 462.39, 117.55, 6.11)
pt3dadd(146.4, 468.46, 117.55, 6.11)
pt3dadd(144.36, 475.11, 117.55, 6.11)
pt3dadd(143, 481.39, 117.55, 6.11)
pt3dadd(142.32, 487.46, 117.55, 6.11)
pt3dadd(140.96, 492.96, 117.55, 5.43)
pt3dadd(140.12, 494.21, 117.55, 6.11)
pt3dadd(139.27, 496.43, 117.55, 6.11)
pt3dadd(139.6, 499.61, 117.55, 6.11)
pt3dadd(140.29, 503.57, 117.55, 6.11)
pt3dadd(141.82, 510.23, 117.55, 6.11)
pt3dadd(144.02, 521.12, 117.55, 6.11)
pt3dadd(144.19, 531.44, 117.55, 6.11)
pt3dadd(145.38, 542.53, 117.55, 6.11)
pt3dadd(145.21, 543.79, 117.55, 6.11)
pt3dadd(144.36, 545.82, 117.55, 6.11)
pt3dadd(143.17, 549.38, 117.55, 6.11)
pt3dadd(143.51, 551.22, 117.55, 6.11)
pt3dadd(144.19, 553.63, 117.55, 6.11)
pt3dadd(144.53, 561.25, 117.55, 6.11)
pt3dadd(144.87, 574.08, 117.55, 5.43)
pt3dadd(145.55, 579.57, 117.55, 5.43)
pt3dadd(146.57, 584.88, 117.55, 4.76)
pt3dadd(146.91, 591.92, 117.55, 4.76)
pt3dadd(146.91, 602.43, 117.55, 4.76)
pt3dadd(144.19, 611.59, 117.55, 4.76)
pt3dadd(141.65, 622.59, 117.55, 4.76)
}
dend[79] {pt3dclear()
pt3dadd(121.26, 347.13, 117.55, 9.51)
pt3dadd(118.38, 356.29, 117.55, 9.51)
pt3dadd(117.02, 363.52, 117.55, 8.15)
pt3dadd(115.66, 365.93, 117.55, 8.15)
pt3dadd(114.81, 366.8, 117.55, 7.47)
}
dend[80] {pt3dclear()
pt3dadd(105.13, 286.46, 117.55, 6.79)
pt3dadd(102.75, 286.55, 117.55, 6.79)
pt3dadd(100.37, 285.11, 117.55, 6.11)
pt3dadd(98, 281.73, 117.55, 6.11)
pt3dadd(96.98, 280.86, 117.55, 6.11)
}
dend[81] {pt3dclear()
pt3dadd(99.86, 231.19, 117.55, 7.47)
pt3dadd(101.9, 229.74, 117.55, 7.47)
pt3dadd(105.13, 229.84, 117.55, 7.47)
pt3dadd(106.66, 228.98, 117.55, 7.47)
pt3dadd(107.68, 227.91, 117.55, 7.47)
pt3dadd(109.04, 227.62, 117.55, 7.47)
pt3dadd(109.89, 228.3, 117.55, 7.47)
pt3dadd(111.41, 229.94, 117.55, 7.47)
pt3dadd(112.09, 231.58, 117.55, 5.43)
pt3dadd(113.62, 233.6, 117.55, 5.43)
pt3dadd(114.81, 236.4, 117.55, 5.43)
pt3dadd(114.81, 236.3, 117.55, 5.43)
}
dend[82] {pt3dclear()
pt3dadd(94.43, 221.55, 36.3, 8.92)
pt3dadd(94.45, 222.39, 36.3, 8.92)
pt3dadd(94.52, 222.47, 36.3, 8.92)
pt3dadd(94.52, 223.02, 36.3, 8.92)
pt3dadd(94.59, 223.18, 36.3, 8.92)
pt3dadd(94.59, 227.22, 36.3, 8.92)
pt3dadd(94.66, 227.38, 36.3, 8.92)
pt3dadd(94.66, 230.07, 36.3, 8.92)
pt3dadd(94.66, 229.75, 39.3, 8.92)
pt3dadd(95.29, 235.29, 39.3, 8.92)
pt3dadd(95.01, 234.98, 39.3, 8.92)
pt3dadd(95.01, 235.21, 39.3, 8.92)
pt3dadd(95.08, 235.45, 39.3, 8.92)
pt3dadd(95.15, 235.76, 39.3, 8.92)
pt3dadd(95.22, 236.08, 39.3, 8.92)
pt3dadd(95.22, 236.48, 39.3, 8.92)
pt3dadd(95.29, 236.79, 39.3, 8.92)
pt3dadd(95.29, 237.74, 39.3, 8.92)
pt3dadd(95.36, 237.82, 39.3, 8.92)
pt3dadd(95.36, 238.14, 39.3, 8.92)
pt3dadd(95.43, 238.3, 39.3, 8.92)
pt3dadd(95.5, 238.38, 39.3, 8.92)
pt3dadd(95.5, 238.62, 39.3, 8.92)
pt3dadd(95.57, 238.77, 39.3, 8.92)
pt3dadd(95.64, 238.93, 39.3, 8.92)
pt3dadd(95.71, 239.09, 39.3, 8.92)
pt3dadd(95.71, 239.33, 39.3, 8.92)
pt3dadd(95.78, 239.65, 39.3, 8.92)
pt3dadd(95.92, 239.72, 39.3, 8.92)
}
}
proc shape3d_124() {
dend[82] { pt3dadd(95.99, 239.96, 39.3, 8.92)
pt3dadd(95.99, 240.12, 39.3, 8.92)
pt3dadd(96.06, 240.28, 39.3, 8.92)
pt3dadd(96.13, 240.51, 39.3, 8.92)
pt3dadd(96.19, 240.67, 39.3, 8.92)
pt3dadd(96.26, 240.83, 39.3, 8.92)
pt3dadd(96.33, 240.99, 39.3, 8.92)
pt3dadd(96.4, 241.15, 39.3, 8.92)
pt3dadd(96.4, 241.46, 39.3, 8.92)
pt3dadd(96.47, 241.62, 39.3, 8.92)
pt3dadd(96.54, 241.78, 39.3, 8.92)
pt3dadd(96.54, 242.02, 39.3, 8.92)
pt3dadd(96.61, 242.34, 39.3, 8.92)
pt3dadd(96.68, 242.41, 39.3, 8.92)
pt3dadd(96.75, 242.65, 39.3, 8.92)
pt3dadd(96.82, 242.81, 39.3, 8.92)
pt3dadd(96.82, 242.97, 39.3, 8.92)
pt3dadd(96.89, 243.13, 39.3, 8.92)
pt3dadd(96.89, 243.52, 39.3, 8.92)
pt3dadd(96.96, 243.6, 39.3, 8.92)
pt3dadd(96.96, 244.63, 39.3, 8.92)
pt3dadd(96.82, 243.92, 42.3, 8.92)
pt3dadd(96.82, 244.47, 42.3, 8.92)
pt3dadd(96.96, 244.71, 42.3, 8.92)
pt3dadd(96.96, 245.02, 42.3, 8.92)
pt3dadd(97.03, 245.26, 42.3, 8.92)
pt3dadd(97.1, 245.42, 42.3, 8.92)
pt3dadd(97.1, 245.58, 42.3, 8.92)
pt3dadd(97.17, 245.66, 42.3, 8.92)
pt3dadd(97.17, 245.98, 42.3, 8.92)
pt3dadd(97.24, 246.05, 42.3, 8.92)
pt3dadd(97.31, 246.21, 42.3, 8.92)
pt3dadd(97.31, 246.45, 42.3, 8.92)
pt3dadd(97.38, 246.69, 42.3, 8.92)
pt3dadd(97.38, 246.85, 42.3, 8.92)
pt3dadd(97.45, 246.93, 42.3, 8.92)
pt3dadd(97.52, 247.08, 42.3, 8.92)
pt3dadd(97.52, 247.24, 42.3, 8.92)
pt3dadd(97.59, 247.4, 42.3, 8.92)
pt3dadd(97.66, 247.64, 42.3, 8.92)
pt3dadd(97.73, 247.79, 42.3, 8.92)
pt3dadd(97.73, 247.95, 42.3, 8.92)
pt3dadd(97.8, 248.11, 42.3, 8.92)
pt3dadd(97.87, 248.35, 42.3, 8.92)
pt3dadd(98.01, 248.59, 42.3, 8.92)
pt3dadd(98.01, 248.74, 42.3, 8.92)
pt3dadd(98.14, 248.98, 42.3, 8.92)
pt3dadd(98.14, 249.22, 42.3, 8.92)
pt3dadd(98.21, 249.46, 42.3, 8.92)
pt3dadd(98.36, 249.62, 42.3, 8.92)
pt3dadd(98.36, 249.85, 42.3, 8.92)
pt3dadd(98.43, 250.09, 42.3, 8.92)
pt3dadd(98.5, 250.33, 42.3, 8.92)
pt3dadd(98.64, 250.72, 42.3, 8.92)
pt3dadd(98.7, 250.88, 42.3, 8.92)
pt3dadd(98.7, 251.12, 42.3, 8.92)
pt3dadd(98.77, 251.28, 42.3, 8.92)
pt3dadd(98.84, 251.51, 42.3, 8.92)
pt3dadd(98.91, 251.67, 42.3, 8.92)
pt3dadd(98.91, 251.91, 42.3, 8.92)
pt3dadd(98.98, 252.15, 42.3, 8.92)
pt3dadd(99.05, 252.23, 42.3, 8.92)
pt3dadd(99.12, 252.46, 42.3, 8.92)
pt3dadd(99.19, 252.7, 42.3, 8.92)
pt3dadd(99.19, 252.86, 42.3, 8.92)
pt3dadd(99.26, 253.02, 42.3, 8.92)
pt3dadd(99.33, 253.18, 42.3, 8.92)
pt3dadd(99.33, 253.34, 42.3, 8.92)
pt3dadd(99.4, 253.49, 42.3, 8.92)
pt3dadd(99.4, 253.65, 42.3, 8.92)
pt3dadd(99.47, 253.89, 42.3, 8.92)
pt3dadd(99.54, 254.13, 42.3, 8.92)
pt3dadd(99.54, 254.6, 42.3, 8.92)
pt3dadd(99.61, 254.76, 42.3, 8.92)
pt3dadd(99.61, 258.01, 42.3, 8.92)
pt3dadd(99.54, 257.69, 43.3, 8.92)
pt3dadd(99.61, 257.85, 43.3, 8.92)
pt3dadd(99.82, 258.01, 43.3, 8.92)
pt3dadd(99.89, 258.16, 43.3, 8.92)
pt3dadd(99.96, 258.24, 43.3, 8.92)
pt3dadd(100.1, 258.32, 43.3, 8.92)
pt3dadd(100.1, 258.48, 43.3, 8.92)
pt3dadd(100.17, 258.56, 43.3, 8.92)
pt3dadd(100.24, 258.64, 43.3, 8.92)
pt3dadd(100.24, 258.88, 43.3, 8.92)
pt3dadd(100.31, 258.95, 43.3, 8.92)
pt3dadd(100.38, 259.03, 43.3, 8.92)
pt3dadd(100.44, 259.19, 43.3, 8.92)
pt3dadd(100.51, 259.35, 43.3, 8.92)
pt3dadd(100.58, 259.51, 43.3, 8.92)
pt3dadd(100.65, 259.59, 43.3, 8.92)
pt3dadd(100.72, 259.67, 43.3, 8.92)
pt3dadd(100.72, 259.9, 43.3, 8.92)
pt3dadd(100.79, 259.98, 43.3, 8.92)
pt3dadd(100.86, 260.06, 43.3, 8.92)
pt3dadd(100.86, 260.22, 43.3, 8.92)
pt3dadd(100.93, 260.3, 43.3, 8.92)
pt3dadd(100.93, 260.54, 43.3, 8.92)
pt3dadd(101, 260.61, 43.3, 8.92)
pt3dadd(101.07, 260.7, 43.3, 8.92)
pt3dadd(101.07, 261.01, 43.3, 8.92)
pt3dadd(101.14, 261.09, 43.3, 8.92)
pt3dadd(101.14, 261.64, 43.3, 8.92)
pt3dadd(101.21, 261.73, 43.3, 8.92)
pt3dadd(101.21, 261.96, 43.3, 8.92)
pt3dadd(101.28, 262.12, 43.3, 8.92)
pt3dadd(101.28, 262.52, 43.3, 8.92)
pt3dadd(101.35, 262.6, 43.3, 8.92)
pt3dadd(101.35, 262.83, 43.3, 8.92)
pt3dadd(101.42, 262.99, 43.3, 8.92)
pt3dadd(101.49, 263.15, 43.3, 8.92)
pt3dadd(101.56, 263.39, 43.3, 8.92)
pt3dadd(101.63, 263.55, 43.3, 8.92)
pt3dadd(101.7, 263.78, 43.3, 8.92)
pt3dadd(101.77, 263.86, 43.3, 8.92)
pt3dadd(101.77, 264.26, 43.3, 8.92)
pt3dadd(101.84, 264.33, 43.3, 8.92)
pt3dadd(101.84, 264.49, 43.3, 8.92)
pt3dadd(101.91, 264.57, 43.3, 8.92)
pt3dadd(101.98, 264.65, 43.3, 8.92)
pt3dadd(101.98, 265.05, 43.3, 8.92)
}
dend[83] {pt3dclear()
pt3dadd(80.04, 137.38, 14.3, 3.34)
pt3dadd(79.42, 136.98, 7.3, 3.34)
pt3dadd(78.86, 136.98, 7.3, 3.34)
pt3dadd(78.72, 136.9, 7.3, 3.34)
pt3dadd(78.44, 136.9, 7.3, 3.34)
pt3dadd(78.3, 136.82, 7.3, 3.34)
pt3dadd(78.24, 136.74, 7.3, 3.34)
pt3dadd(78.17, 136.66, 7.3, 3.34)
pt3dadd(78.1, 136.58, 7.3, 3.34)
pt3dadd(77.96, 136.5, 7.3, 3.34)
pt3dadd(77.89, 136.43, 7.3, 3.34)
pt3dadd(77.82, 136.26, 7.3, 3.34)
pt3dadd(77.75, 136.19, 7.3, 3.34)
pt3dadd(77.68, 136.11, 7.3, 3.34)
pt3dadd(77.61, 136.03, 7.3, 3.34)
pt3dadd(77.54, 135.95, 7.3, 3.34)
pt3dadd(77.47, 135.87, 7.3, 3.34)
pt3dadd(77.47, 135.63, 7.3, 3.34)
pt3dadd(77.4, 135.55, 7.3, 3.34)
pt3dadd(77.4, 135.4, 7.3, 3.34)
pt3dadd(77.33, 135.32, 7.3, 3.34)
pt3dadd(77.26, 135.24, 7.3, 3.34)
pt3dadd(77.26, 135.08, 7.3, 3.34)
pt3dadd(77.19, 134.92, 7.3, 3.34)
pt3dadd(77.19, 134.76, 7.3, 3.34)
pt3dadd(77.12, 134.68, 7.3, 3.34)
pt3dadd(77.12, 134.52, 7.3, 3.34)
pt3dadd(77.05, 134.45, 7.3, 3.34)
pt3dadd(76.98, 134.37, 7.3, 3.34)
pt3dadd(76.91, 134.21, 7.3, 3.34)
pt3dadd(76.77, 133.97, 7.3, 3.34)
pt3dadd(76.7, 133.89, 7.3, 3.34)
pt3dadd(76.7, 133.65, 7.3, 3.34)
pt3dadd(76.63, 133.57, 7.3, 3.34)
pt3dadd(76.56, 133.5, 7.3, 3.34)
pt3dadd(76.56, 133.34, 7.3, 3.34)
pt3dadd(76.49, 133.26, 7.3, 3.34)
pt3dadd(76.49, 133.18, 9.3, 3.07)
pt3dadd(76, 129.54, 9.3, 3.07)
pt3dadd(75.97, 129.54, 9.3, 3.07)
pt3dadd(75.97, 129.26, 9.3, 3.07)
pt3dadd(75.93, 129.22, 9.3, 3.07)
pt3dadd(75.93, 129.14, 9.3, 3.07)
pt3dadd(75.9, 129.1, 9.3, 3.07)
pt3dadd(75.9, 129.02, 9.3, 3.07)
pt3dadd(75.86, 128.99, 9.3, 3.07)
pt3dadd(75.83, 128.91, 9.3, 3.07)
pt3dadd(75.79, 128.83, 9.3, 3.07)
pt3dadd(75.76, 128.79, 9.3, 3.07)
pt3dadd(75.72, 128.75, 9.3, 3.07)
pt3dadd(75.72, 128.67, 9.3, 3.07)
pt3dadd(75.69, 128.59, 9.3, 3.07)
pt3dadd(75.65, 128.55, 9.3, 3.07)
pt3dadd(75.62, 128.47, 9.3, 3.07)
pt3dadd(75.62, 128.39, 9.3, 3.07)
pt3dadd(75.58, 128.35, 9.3, 3.07)
pt3dadd(75.55, 128.27, 9.3, 3.07)
pt3dadd(75.52, 128.2, 9.3, 3.07)
pt3dadd(75.48, 128.15, 9.3, 3.07)
pt3dadd(75.45, 128.07, 9.3, 3.07)
pt3dadd(75.41, 128, 9.3, 3.07)
pt3dadd(75.38, 127.96, 9.3, 3.07)
pt3dadd(75.34, 127.92, 9.3, 3.07)
pt3dadd(75.31, 127.84, 9.3, 3.07)
pt3dadd(75.24, 127.72, 9.3, 3.07)
pt3dadd(75.2, 127.68, 9.3, 3.07)
pt3dadd(75.17, 127.6, 9.3, 3.07)
pt3dadd(75.13, 127.56, 9.3, 3.07)
pt3dadd(75.1, 127.44, 9.3, 3.07)
pt3dadd(75.06, 127.36, 9.3, 3.07)
pt3dadd(75.03, 127.29, 9.3, 3.07)
pt3dadd(75, 127.21, 9.3, 3.07)
pt3dadd(74.96, 127.13, 9.3, 3.07)
pt3dadd(74.93, 127.01, 9.3, 3.07)
pt3dadd(74.89, 126.93, 9.3, 3.07)
pt3dadd(74.86, 126.81, 9.3, 3.07)
pt3dadd(74.82, 126.69, 9.3, 3.07)
pt3dadd(74.79, 126.57, 9.3, 3.07)
pt3dadd(74.71, 126.38, 9.3, 3.07)
}
}
proc shape3d_125() {
dend[83] { pt3dadd(74.68, 126.29, 9.3, 3.07)
pt3dadd(74.64, 126.21, 9.3, 3.07)
pt3dadd(74.61, 126.1, 9.3, 3.07)
pt3dadd(74.57, 126.02, 9.3, 3.07)
pt3dadd(74.57, 125.9, 9.3, 3.07)
pt3dadd(74.54, 125.82, 9.3, 3.07)
pt3dadd(74.54, 125.62, 9.3, 3.07)
pt3dadd(74.5, 125.58, 9.3, 3.07)
pt3dadd(74.47, 125.46, 9.3, 3.07)
pt3dadd(74.47, 125.31, 9.3, 3.07)
pt3dadd(74.57, 125.26, 11.3, 3.07)
pt3dadd(74.44, 125.11, 11.3, 3.07)
pt3dadd(74.4, 125.03, 11.3, 3.07)
pt3dadd(74.33, 124.95, 11.3, 3.07)
pt3dadd(74.3, 124.87, 11.3, 3.07)
pt3dadd(74.26, 124.79, 11.3, 3.07)
pt3dadd(74.23, 124.71, 11.3, 3.07)
pt3dadd(74.19, 124.59, 11.3, 3.07)
pt3dadd(74.16, 124.47, 11.3, 3.07)
pt3dadd(74.16, 124.39, 11.3, 3.07)
pt3dadd(74.12, 124.32, 11.3, 3.07)
pt3dadd(74.09, 124.24, 11.3, 3.07)
pt3dadd(74.05, 124.16, 11.3, 3.07)
pt3dadd(74.02, 124.04, 11.3, 3.07)
pt3dadd(74.02, 123.92, 11.3, 3.07)
pt3dadd(73.98, 123.88, 11.3, 3.07)
pt3dadd(73.95, 123.76, 11.3, 3.07)
pt3dadd(73.95, 123.61, 11.3, 3.07)
pt3dadd(73.88, 123.4, 11.3, 3.07)
pt3dadd(73.88, 123.29, 11.3, 3.07)
pt3dadd(73.85, 123.21, 11.3, 3.07)
pt3dadd(73.81, 123.09, 11.3, 3.07)
pt3dadd(73.81, 123.01, 11.3, 3.07)
pt3dadd(73.78, 122.93, 11.3, 3.07)
pt3dadd(73.74, 122.85, 11.3, 3.07)
pt3dadd(73.74, 122.77, 11.3, 3.07)
pt3dadd(73.71, 122.65, 11.3, 3.07)
pt3dadd(73.67, 122.57, 11.3, 3.07)
pt3dadd(73.64, 122.46, 11.3, 3.07)
pt3dadd(73.6, 122.38, 11.3, 3.07)
pt3dadd(73.57, 122.26, 11.3, 3.07)
pt3dadd(73.53, 122.18, 11.3, 3.07)
pt3dadd(73.5, 122.1, 11.3, 3.07)
pt3dadd(73.46, 122.06, 11.3, 3.07)
pt3dadd(73.43, 121.98, 11.3, 3.07)
pt3dadd(73.39, 121.94, 11.3, 3.07)
pt3dadd(73.32, 121.82, 11.3, 3.07)
pt3dadd(73.29, 121.75, 11.3, 3.07)
pt3dadd(73.25, 121.71, 11.3, 3.07)
pt3dadd(73.22, 121.63, 11.3, 3.07)
pt3dadd(73.15, 121.55, 11.3, 3.07)
pt3dadd(73.11, 121.51, 11.3, 3.07)
pt3dadd(73.04, 121.35, 11.3, 3.07)
pt3dadd(72.97, 121.23, 11.3, 3.07)
pt3dadd(72.9, 121.11, 11.3, 3.07)
pt3dadd(72.87, 121.03, 11.3, 3.07)
pt3dadd(72.83, 120.95, 11.3, 3.07)
pt3dadd(72.76, 120.87, 11.3, 3.07)
pt3dadd(72.73, 120.71, 11.3, 3.07)
pt3dadd(72.66, 120.6, 11.3, 3.07)
pt3dadd(72.66, 120.52, 11.3, 3.07)
pt3dadd(72.59, 120.4, 11.3, 3.07)
pt3dadd(72.49, 120.16, 11.3, 3.07)
pt3dadd(72.45, 120, 11.3, 3.07)
pt3dadd(72.42, 119.89, 11.3, 3.07)
pt3dadd(72.38, 119.81, 11.3, 3.07)
pt3dadd(72.35, 119.72, 11.3, 3.07)
pt3dadd(72.35, 119.57, 11.3, 3.07)
pt3dadd(72.31, 119.45, 11.3, 3.07)
pt3dadd(72.31, 119.37, 11.3, 3.07)
pt3dadd(72.28, 119.25, 11.3, 3.07)
pt3dadd(72.28, 119.13, 11.3, 3.07)
pt3dadd(72.24, 119.01, 11.3, 3.07)
pt3dadd(72.21, 118.82, 11.3, 3.07)
pt3dadd(72.21, 118.7, 11.3, 3.07)
pt3dadd(72.17, 118.58, 11.3, 3.07)
pt3dadd(72.17, 118.34, 11.3, 3.07)
pt3dadd(72.17, 118.5, 11.3, 3.07)
pt3dadd(72.21, 118.62, 13.3, 3.07)
pt3dadd(72.21, 118.42, 13.3, 3.07)
pt3dadd(72.17, 118.3, 13.3, 3.07)
pt3dadd(72.14, 118.14, 13.3, 3.07)
pt3dadd(72.1, 118.03, 13.3, 3.07)
pt3dadd(72.07, 117.9, 13.3, 3.07)
pt3dadd(72.07, 117.79, 13.3, 3.07)
pt3dadd(72.03, 117.63, 13.3, 3.07)
pt3dadd(72, 117.55, 13.3, 3.07)
pt3dadd(72, 117.27, 13.3, 3.07)
pt3dadd(71.96, 117.19, 13.3, 3.07)
pt3dadd(71.96, 117.07, 13.3, 3.07)
pt3dadd(71.93, 116.96, 13.3, 3.07)
pt3dadd(71.93, 116.88, 13.3, 3.07)
pt3dadd(71.89, 116.76, 13.3, 3.07)
pt3dadd(71.89, 116.56, 13.3, 3.07)
pt3dadd(71.86, 116.4, 13.3, 3.07)
pt3dadd(71.86, 116.21, 13.3, 3.07)
pt3dadd(71.82, 116.04, 13.3, 3.07)
pt3dadd(71.82, 115.89, 13.3, 3.07)
pt3dadd(71.79, 115.73, 13.3, 3.07)
pt3dadd(71.79, 115.65, 13.3, 3.07)
pt3dadd(71.75, 115.49, 13.3, 3.07)
pt3dadd(71.75, 115.06, 13.3, 3.07)
pt3dadd(71.72, 114.94, 13.3, 3.07)
pt3dadd(71.68, 114.86, 13.3, 3.07)
pt3dadd(71.68, 114.7, 13.3, 3.07)
pt3dadd(71.65, 114.62, 13.3, 3.07)
pt3dadd(71.61, 114.5, 13.3, 3.07)
pt3dadd(71.61, 114.39, 13.3, 3.07)
pt3dadd(71.58, 114.26, 13.3, 3.07)
pt3dadd(71.58, 114.15, 13.3, 3.07)
pt3dadd(71.54, 113.99, 13.3, 3.07)
pt3dadd(71.54, 113.67, 13.3, 3.07)
pt3dadd(71.51, 113.51, 13.3, 3.07)
pt3dadd(71.51, 111.18, 13.3, 3.07)
pt3dadd(71.54, 111.1, 13.3, 3.07)
pt3dadd(71.54, 110.58, 13.3, 3.07)
pt3dadd(71.54, 110.75, 13.3, 3.07)
pt3dadd(71.51, 110.75, 14.3, 3.07)
pt3dadd(71.51, 109.56, 14.3, 3.07)
pt3dadd(71.47, 109.48, 14.3, 3.07)
pt3dadd(71.47, 109.36, 14.3, 3.07)
pt3dadd(71.44, 109.28, 14.3, 3.07)
pt3dadd(71.44, 109.16, 14.3, 3.07)
pt3dadd(71.4, 109.12, 14.3, 3.07)
pt3dadd(71.37, 109.04, 14.3, 3.07)
pt3dadd(71.33, 108.96, 14.3, 3.07)
pt3dadd(71.3, 108.85, 14.3, 3.07)
pt3dadd(71.3, 108.76, 14.3, 3.07)
pt3dadd(71.26, 108.69, 14.3, 3.07)
pt3dadd(71.23, 108.57, 14.3, 3.07)
pt3dadd(71.2, 108.49, 14.3, 3.07)
pt3dadd(71.13, 108.33, 14.3, 3.07)
pt3dadd(71.09, 108.21, 14.3, 3.07)
pt3dadd(71.06, 108.05, 14.3, 3.07)
pt3dadd(70.99, 107.93, 14.3, 3.07)
pt3dadd(70.95, 107.82, 14.3, 3.07)
pt3dadd(70.95, 107.74, 14.3, 3.07)
pt3dadd(70.92, 107.66, 14.3, 3.07)
pt3dadd(70.88, 107.5, 14.3, 3.07)
pt3dadd(70.85, 107.46, 14.3, 3.07)
pt3dadd(70.85, 107.3, 14.3, 3.07)
pt3dadd(70.81, 107.22, 14.3, 3.07)
pt3dadd(70.81, 106.79, 14.3, 3.07)
pt3dadd(70.85, 106.71, 14.3, 3.07)
pt3dadd(71.33, 106.48, 14.3, 3.07)
}
dend[84] {pt3dclear()
pt3dadd(71.33, 106.48, 14.3, 3.07)
pt3dadd(70.85, 106.31, 14.3, 3.07)
pt3dadd(70.88, 106.19, 14.3, 3.07)
pt3dadd(70.88, 105.8, 14.3, 3.07)
pt3dadd(70.92, 105.64, 14.3, 3.07)
pt3dadd(70.95, 105.52, 14.3, 3.07)
pt3dadd(70.95, 105.44, 14.3, 3.07)
pt3dadd(70.99, 105.36, 14.3, 3.07)
pt3dadd(70.99, 105.24, 14.3, 3.07)
pt3dadd(71.02, 105.13, 14.3, 3.07)
pt3dadd(71.06, 105.01, 14.3, 3.07)
pt3dadd(71.09, 104.93, 14.3, 3.07)
pt3dadd(71.13, 104.81, 14.3, 3.07)
pt3dadd(71.16, 104.77, 14.3, 3.07)
pt3dadd(71.2, 104.65, 14.3, 3.07)
pt3dadd(71.23, 104.45, 14.3, 3.07)
pt3dadd(71.3, 104.41, 14.3, 3.07)
pt3dadd(71.33, 104.29, 14.3, 3.07)
pt3dadd(71.37, 104.18, 14.3, 3.07)
pt3dadd(74.46, 94.48, 0, 0.56)
pt3dadd(75.47, 92.33, -2.7, 9.85)
pt3dadd(75.66, 93.7, -2.7, 9.85)
pt3dadd(75.66, 93.12, -2.7, 9.85)
pt3dadd(75.66, 93.22, -5.7, 12.23)
pt3dadd(75.66, 93.03, -5.7, 12.23)
pt3dadd(75.58, 92.93, -5.7, 12.23)
pt3dadd(75.58, 92.64, -5.7, 12.23)
pt3dadd(75.49, 92.54, -5.7, 12.23)
pt3dadd(75.49, 91.87, -5.7, 12.23)
pt3dadd(75.41, 91.68, -5.7, 12.23)
pt3dadd(75.32, 91.58, -5.7, 12.23)
pt3dadd(75.32, 90.71, -5.7, 12.23)
pt3dadd(75.24, 90.52, -5.7, 12.23)
pt3dadd(70.87, 71.51, -5.7, 12.23)
pt3dadd(70.65, 71.76, -5.7, 10.31)
}
dend[85] {pt3dclear()
pt3dadd(70.65, 71.76, -5.7, 2.72)
pt3dadd(78.13, 78.7, 0, 2.72)
}
dend[86] {pt3dclear()
pt3dadd(70.65, 71.76, -5.7, 10.31)
pt3dadd(70.64, 71.29, -5.7, 10.31)
pt3dadd(70.64, 70.9, -5.7, 10.31)
pt3dadd(70.57, 70.82, -5.7, 10.31)
pt3dadd(70.57, 70.34, -5.7, 10.31)
pt3dadd(70.5, 70.26, -5.7, 10.31)
pt3dadd(70.5, 70.11, -5.7, 10.31)
pt3dadd(70.43, 69.95, -5.7, 10.31)
pt3dadd(70.43, 69.79, -5.7, 10.31)
pt3dadd(70.36, 69.71, -5.7, 10.31)
pt3dadd(70.29, 69.63, -5.7, 10.31)
pt3dadd(70.29, 69.39, -5.7, 10.31)
pt3dadd(70.22, 69.24, -5.7, 10.31)
pt3dadd(70.15, 69.08, -5.7, 10.31)
pt3dadd(70.08, 68.92, -5.7, 10.31)
pt3dadd(70.08, 68.76, -5.7, 10.31)
pt3dadd(70.01, 68.68, -5.7, 10.31)
pt3dadd(69.94, 68.52, -5.7, 10.31)
}
}
proc shape3d_126() {
dend[86] { pt3dadd(69.94, 68.36, -5.7, 10.31)
pt3dadd(69.87, 68.21, -5.7, 10.31)
pt3dadd(69.8, 68.13, -5.7, 10.31)
pt3dadd(69.73, 67.97, -5.7, 10.31)
pt3dadd(69.66, 67.89, -5.7, 10.31)
pt3dadd(69.66, 67.73, -5.7, 10.31)
pt3dadd(69.6, 67.65, -5.7, 10.31)
pt3dadd(69.53, 67.57, -5.7, 10.31)
pt3dadd(69.53, 67.42, -5.7, 10.31)
pt3dadd(69.46, 67.26, -5.7, 10.31)
pt3dadd(69.39, 67.1, -5.7, 10.31)
pt3dadd(69.25, 66.78, -5.7, 10.31)
pt3dadd(69.25, 66.63, -5.7, 10.31)
pt3dadd(69.11, 66.54, -5.7, 10.31)
pt3dadd(69.04, 66.31, -5.7, 10.31)
pt3dadd(68.97, 66.15, -5.7, 10.31)
pt3dadd(68.9, 65.91, -5.7, 10.31)
pt3dadd(68.76, 65.75, -5.7, 10.31)
pt3dadd(68.69, 65.6, -5.7, 10.31)
pt3dadd(68.62, 65.36, -5.7, 10.31)
pt3dadd(68.48, 65.12, -5.7, 10.31)
pt3dadd(68.41, 64.96, -5.7, 10.31)
pt3dadd(68.27, 64.72, -5.7, 10.31)
pt3dadd(68.2, 64.57, -5.7, 10.31)
pt3dadd(68.13, 64.41, -5.7, 10.31)
pt3dadd(68.06, 64.25, -5.7, 10.31)
pt3dadd(67.85, 64.01, -5.7, 10.31)
pt3dadd(67.78, 63.85, -5.7, 10.31)
pt3dadd(67.71, 63.62, -5.7, 10.31)
pt3dadd(67.57, 63.54, -5.7, 10.31)
pt3dadd(67.5, 63.38, -5.7, 10.31)
pt3dadd(67.29, 63.14, -5.7, 10.31)
pt3dadd(67.15, 62.98, -5.7, 10.31)
pt3dadd(67.08, 62.83, -5.7, 10.31)
pt3dadd(67.01, 62.67, -5.7, 10.31)
pt3dadd(66.88, 62.51, -5.7, 10.31)
pt3dadd(66.81, 62.35, -5.7, 10.31)
pt3dadd(66.74, 62.19, -5.7, 10.31)
pt3dadd(66.53, 61.96, -5.7, 10.31)
pt3dadd(66.46, 61.88, -5.7, 10.31)
pt3dadd(66.32, 61.72, -5.7, 10.31)
pt3dadd(66.18, 61.64, -5.7, 10.31)
pt3dadd(66.04, 61.56, -5.7, 10.31)
pt3dadd(66.04, 61.4, -5.7, 10.31)
pt3dadd(65.9, 61.32, -5.7, 10.31)
pt3dadd(65.83, 61.24, -5.7, 10.31)
pt3dadd(65.69, 61.16, -5.7, 10.31)
pt3dadd(65.55, 61.08, -5.7, 10.31)
pt3dadd(65.41, 61.01, -5.7, 10.31)
pt3dadd(65.28, 61.01, -5.7, 10.31)
pt3dadd(65.21, 60.92, -5.7, 10.31)
pt3dadd(65.14, 60.85, -5.7, 10.31)
pt3dadd(65.07, 60.77, -5.7, 10.31)
pt3dadd(64.93, 60.77, -5.7, 10.31)
pt3dadd(64.86, 60.69, -5.7, 10.31)
pt3dadd(64.79, 60.61, -5.7, 10.31)
pt3dadd(64.72, 60.53, -5.7, 10.31)
pt3dadd(64.65, 60.45, -5.7, 10.31)
pt3dadd(64.58, 60.37, -5.7, 10.31)
pt3dadd(64.51, 60.29, -5.7, 10.31)
pt3dadd(64.44, 60.13, -5.7, 10.31)
pt3dadd(64.3, 60.06, -5.7, 10.31)
pt3dadd(64.16, 59.97, -5.7, 10.31)
pt3dadd(64.02, 59.82, -5.7, 10.31)
pt3dadd(63.95, 59.74, -5.7, 10.31)
pt3dadd(63.81, 59.74, -5.7, 10.31)
pt3dadd(63.74, 59.66, -5.7, 10.31)
pt3dadd(63.67, 59.58, -5.7, 10.31)
pt3dadd(63.6, 59.5, -5.7, 10.31)
pt3dadd(63.46, 59.42, -5.7, 10.31)
pt3dadd(63.32, 59.34, -5.7, 10.31)
pt3dadd(63.25, 59.26, -5.7, 10.31)
pt3dadd(63.18, 59.19, -5.7, 10.31)
}
dend[87] {pt3dclear()
pt3dadd(63.18, 59.19, -5.7, 4.46)
pt3dadd(63.29, 58.71, -1.7, 4.46)
pt3dadd(63.29, 58.55, -1.7, 4.46)
pt3dadd(63.32, 58.47, -1.7, 4.46)
pt3dadd(63.36, 58.35, -1.7, 4.46)
pt3dadd(63.36, 58.24, -1.7, 4.46)
pt3dadd(63.39, 58.15, -1.7, 4.46)
pt3dadd(63.46, 58.04, -1.7, 4.46)
pt3dadd(63.5, 57.92, -1.7, 4.46)
pt3dadd(63.53, 57.84, -1.7, 4.46)
pt3dadd(63.53, 57.56, -1.7, 4.46)
pt3dadd(63.57, 57.52, -1.7, 4.46)
pt3dadd(63.6, 57.44, -1.7, 4.46)
pt3dadd(63.64, 57.37, -1.7, 4.46)
pt3dadd(63.67, 57.33, -1.7, 4.46)
pt3dadd(63.67, 57.17, -1.7, 4.46)
pt3dadd(63.71, 57.09, -1.7, 4.46)
pt3dadd(63.74, 57.05, -1.7, 4.46)
pt3dadd(63.78, 56.97, -1.7, 4.46)
pt3dadd(63.78, 56.85, -1.7, 4.46)
pt3dadd(63.85, 56.73, -1.7, 4.46)
pt3dadd(63.85, 56.65, -1.7, 4.46)
pt3dadd(63.88, 56.57, -1.7, 4.46)
pt3dadd(63.88, 56.49, -1.7, 4.46)
pt3dadd(63.92, 56.42, -1.7, 4.46)
pt3dadd(63.95, 56.29, -1.7, 4.46)
pt3dadd(63.95, 55.62, -1.7, 4.46)
pt3dadd(64.02, 55.42, -1.7, 4.46)
pt3dadd(64.06, 55.35, -1.7, 4.46)
pt3dadd(64.06, 55.23, -1.7, 4.46)
pt3dadd(64.09, 55.15, -1.7, 4.46)
pt3dadd(64.09, 54.87, -1.7, 4.46)
pt3dadd(64.13, 54.79, -1.7, 4.46)
pt3dadd(64.13, 52.22, -1.7, 4.46)
pt3dadd(64.13, 51.9, -1.7, 3.9)
pt3dadd(64.09, 51.83, -1.7, 3.9)
pt3dadd(64.09, 48.86, -1.7, 3.9)
pt3dadd(64.06, 48.82, -1.7, 3.9)
pt3dadd(64.06, 48.7, -1.7, 3.9)
pt3dadd(64.02, 48.58, -1.7, 3.9)
pt3dadd(63.99, 48.5, -1.7, 3.9)
pt3dadd(63.99, 48.38, -1.7, 3.9)
pt3dadd(63.95, 48.3, -1.7, 3.9)
pt3dadd(63.95, 48.22, -1.7, 3.9)
pt3dadd(63.92, 48.15, -1.7, 3.9)
pt3dadd(63.92, 48.06, -1.7, 3.9)
pt3dadd(63.88, 47.99, -1.7, 3.9)
pt3dadd(63.85, 47.91, -1.7, 3.9)
pt3dadd(63.85, 47.83, -1.7, 3.9)
pt3dadd(63.81, 47.75, -1.7, 3.9)
pt3dadd(63.81, 45.93, -1.7, 3.9)
pt3dadd(63.78, 45.89, -1.7, 3.9)
pt3dadd(63.78, 45.65, -1.7, 3.9)
pt3dadd(63.81, 45.65, 0.3, 3.9)
pt3dadd(63.78, 45.57, 0.3, 3.9)
pt3dadd(63.78, 45.38, 0.3, 3.9)
pt3dadd(63.74, 45.29, 0.3, 3.9)
pt3dadd(63.74, 45.06, 0.3, 3.9)
pt3dadd(63.71, 44.94, 0.3, 3.9)
pt3dadd(63.67, 44.78, 0.3, 3.9)
pt3dadd(63.67, 44.54, 0.3, 3.9)
pt3dadd(63.64, 44.42, 0.3, 3.9)
pt3dadd(63.64, 44.31, 0.3, 3.9)
pt3dadd(63.6, 44.19, 0.3, 3.9)
pt3dadd(63.6, 43.99, 0.3, 3.9)
pt3dadd(63.57, 43.87, 0.3, 3.9)
pt3dadd(63.57, 43.67, 0.3, 3.9)
pt3dadd(63.53, 43.51, 0.3, 3.9)
pt3dadd(63.53, 43.44, 0.3, 3.9)
pt3dadd(63.5, 43.24, 0.3, 3.9)
pt3dadd(63.5, 43.12, 0.3, 3.9)
pt3dadd(63.46, 43, 0.3, 3.9)
pt3dadd(63.43, 42.8, 0.3, 3.9)
pt3dadd(63.39, 42.6, 0.3, 3.9)
pt3dadd(63.39, 42.49, 0.3, 3.9)
pt3dadd(63.36, 42.37, 0.3, 3.9)
pt3dadd(63.32, 42.21, 0.3, 3.9)
pt3dadd(63.32, 42.13, 0.3, 3.9)
pt3dadd(63.29, 41.97, 0.3, 3.9)
pt3dadd(63.25, 41.85, 0.3, 3.9)
pt3dadd(63.22, 41.74, 0.3, 3.9)
pt3dadd(63.18, 41.62, 0.3, 3.9)
pt3dadd(63.15, 41.54, 0.3, 3.9)
pt3dadd(63.15, 41.42, 0.3, 3.9)
pt3dadd(63.12, 41.3, 0.3, 3.9)
pt3dadd(63.08, 41.18, 0.3, 3.9)
pt3dadd(63.08, 41.06, 0.3, 3.9)
pt3dadd(63.04, 40.98, 0.3, 3.9)
pt3dadd(63.01, 40.87, 0.3, 3.9)
pt3dadd(62.97, 40.78, 0.3, 3.9)
pt3dadd(62.94, 40.67, 0.3, 3.9)
pt3dadd(62.94, 40.59, 0.3, 3.9)
pt3dadd(62.9, 40.51, 0.3, 3.9)
pt3dadd(62.87, 40.43, 0.3, 3.9)
pt3dadd(62.87, 40.35, 0.3, 3.9)
pt3dadd(62.8, 40.23, 0.3, 3.9)
pt3dadd(62.76, 40.15, 0.3, 3.9)
pt3dadd(62.73, 39.99, 0.3, 3.9)
pt3dadd(62.73, 39.92, 0.3, 3.9)
pt3dadd(62.66, 39.79, 0.3, 3.9)
pt3dadd(62.63, 39.72, 0.3, 3.9)
pt3dadd(62.59, 39.6, 0.3, 3.9)
pt3dadd(62.56, 39.48, 0.3, 3.9)
pt3dadd(62.52, 39.44, 0.3, 3.9)
pt3dadd(62.49, 39.36, 0.3, 3.9)
pt3dadd(62.45, 39.28, 0.3, 3.9)
pt3dadd(62.42, 39.2, 0.3, 3.9)
pt3dadd(62.35, 39.08, 0.3, 3.9)
pt3dadd(62.35, 39.01, 0.3, 3.9)
pt3dadd(62.31, 38.92, 0.3, 3.9)
pt3dadd(62.28, 38.85, 0.3, 3.9)
pt3dadd(62.24, 38.73, 0.3, 3.9)
pt3dadd(62.21, 38.65, 0.3, 3.9)
pt3dadd(62.17, 38.57, 0.3, 3.9)
pt3dadd(62.14, 38.45, 0.3, 3.9)
pt3dadd(62.1, 38.33, 0.3, 3.9)
pt3dadd(62.07, 38.25, 0.3, 3.9)
pt3dadd(62.07, 38.13, 0.3, 3.9)
pt3dadd(62, 38.06, 0.3, 3.9)
pt3dadd(62, 37.94, 0.3, 3.9)
pt3dadd(61.93, 37.86, 0.3, 3.9)
pt3dadd(61.93, 37.78, 0.3, 3.9)
pt3dadd(61.86, 37.7, 0.3, 3.9)
pt3dadd(61.86, 37.58, 0.3, 3.9)
pt3dadd(61.83, 37.5, 0.3, 3.9)
pt3dadd(61.79, 37.42, 0.3, 3.9)
pt3dadd(61.76, 37.34, 0.3, 3.9)
}
}
proc shape3d_127() {
dend[87] { pt3dadd(61.72, 37.26, 0.3, 3.9)
pt3dadd(61.72, 37.15, 0.3, 3.9)
pt3dadd(61.69, 37.06, 0.3, 3.9)
pt3dadd(61.65, 36.99, 0.3, 3.9)
pt3dadd(61.62, 36.87, 0.3, 3.9)
pt3dadd(61.58, 36.79, 0.3, 3.9)
pt3dadd(61.55, 36.71, 0.3, 3.9)
pt3dadd(61.51, 36.63, 0.3, 3.9)
pt3dadd(61.48, 36.55, 0.3, 3.9)
pt3dadd(61.44, 36.47, 0.3, 3.9)
pt3dadd(61.44, 36.39, 0.3, 3.9)
pt3dadd(61.41, 36.28, 0.3, 3.9)
pt3dadd(61.34, 36.19, 0.3, 3.9)
pt3dadd(61.3, 36.12, 0.3, 3.9)
pt3dadd(61.3, 36, 0.3, 3.9)
pt3dadd(61.27, 35.92, 0.3, 3.9)
pt3dadd(61.23, 35.8, 0.3, 3.9)
pt3dadd(61.2, 35.72, 0.3, 3.9)
pt3dadd(61.16, 35.6, 0.3, 3.9)
pt3dadd(61.09, 35.44, 0.3, 3.9)
pt3dadd(61.06, 35.33, 0.3, 3.9)
pt3dadd(61.03, 35.24, 0.3, 3.9)
pt3dadd(60.96, 35.05, 0.3, 3.9)
pt3dadd(60.88, 34.93, 0.3, 3.9)
pt3dadd(60.85, 34.81, 0.3, 3.9)
pt3dadd(60.81, 34.77, 0.3, 3.9)
pt3dadd(60.74, 34.69, 0.3, 3.9)
pt3dadd(60.67, 34.49, 0.3, 3.9)
pt3dadd(60.64, 34.42, 0.3, 3.9)
pt3dadd(60.6, 34.38, 0.3, 3.9)
pt3dadd(60.57, 34.29, 0.3, 3.9)
pt3dadd(60.53, 34.26, 0.3, 3.9)
pt3dadd(60.5, 34.14, 0.3, 3.9)
pt3dadd(60.47, 34.06, 0.3, 3.9)
pt3dadd(60.43, 34.02, 0.3, 3.9)
pt3dadd(60.4, 34.06, 0.3, 3.9)
pt3dadd(60.33, 34.18, 0.3, 3.9)
pt3dadd(60.33, 34.49, 0.3, 3.9)
pt3dadd(60.53, 34.22, 2.3, 3.9)
pt3dadd(60.53, 33.98, 2.3, 3.9)
pt3dadd(60.5, 33.9, 2.3, 3.9)
pt3dadd(60.47, 33.78, 2.3, 3.9)
pt3dadd(60.43, 33.66, 2.3, 3.9)
pt3dadd(60.4, 33.58, 2.3, 3.9)
pt3dadd(60.4, 33.42, 2.3, 3.9)
pt3dadd(60.36, 33.31, 2.3, 3.9)
pt3dadd(60.36, 32.83, 2.3, 3.9)
pt3dadd(60.33, 32.75, 2.3, 3.9)
pt3dadd(60.33, 32.47, 2.3, 3.9)
pt3dadd(60.29, 32.4, 2.3, 3.9)
pt3dadd(60.29, 31.76, 2.3, 3.9)
pt3dadd(60.26, 31.65, 2.3, 3.9)
pt3dadd(60.26, 31.25, 2.3, 3.9)
pt3dadd(60.22, 31.13, 2.3, 3.9)
pt3dadd(60.22, 28.32, 2.3, 3.9)
pt3dadd(60.26, 28.2, 2.3, 3.9)
pt3dadd(60.29, 28.12, 2.3, 3.9)
pt3dadd(60.29, 27.92, 2.3, 3.9)
pt3dadd(60.33, 27.77, 2.3, 3.9)
pt3dadd(60.36, 27.65, 2.3, 3.9)
pt3dadd(60.4, 27.53, 2.3, 3.9)
pt3dadd(60.43, 27.49, 2.3, 3.9)
pt3dadd(60.47, 27.37, 2.3, 3.9)
pt3dadd(60.5, 27.25, 2.3, 3.9)
pt3dadd(60.53, 27.17, 2.3, 3.9)
pt3dadd(60.57, 27.06, 2.3, 3.9)
pt3dadd(60.64, 26.93, 2.3, 3.9)
pt3dadd(60.67, 26.86, 2.3, 3.9)
pt3dadd(60.71, 26.78, 2.3, 3.9)
pt3dadd(60.81, 26.58, 2.3, 3.9)
pt3dadd(60.85, 26.46, 2.3, 3.9)
pt3dadd(60.92, 26.34, 2.3, 3.9)
pt3dadd(60.99, 26.22, 2.3, 3.9)
pt3dadd(61.03, 26.1, 2.3, 3.9)
pt3dadd(61.06, 26.02, 2.3, 3.9)
pt3dadd(61.09, 25.91, 2.3, 3.9)
pt3dadd(61.13, 25.79, 2.3, 3.9)
pt3dadd(61.16, 25.71, 2.3, 3.9)
pt3dadd(61.2, 25.59, 2.3, 3.9)
pt3dadd(61.2, 24.28, 2.3, 3.9)
pt3dadd(61.2, 24.88, 3.3, 3.9)
pt3dadd(61.23, 24.76, 3.3, 3.9)
pt3dadd(61.23, 24.68, 3.3, 3.9)
pt3dadd(61.27, 24.56, 3.3, 3.9)
pt3dadd(61.27, 18.07, 3.3, 3.9)
pt3dadd(61.23, 17.99, 3.3, 3.9)
pt3dadd(61.23, 17.83, 3.3, 3.9)
pt3dadd(61.2, 17.8, 3.3, 3.9)
pt3dadd(61.2, 17.72, 3.3, 3.9)
pt3dadd(61.16, 17.64, 3.3, 3.9)
pt3dadd(61.13, 17.56, 3.3, 3.9)
pt3dadd(61.13, 17.44, 3.3, 3.9)
pt3dadd(61.09, 17.4, 3.3, 3.9)
pt3dadd(61.06, 17.28, 3.3, 3.9)
pt3dadd(61.03, 17.24, 3.3, 3.9)
pt3dadd(60.99, 17.16, 3.3, 3.9)
pt3dadd(60.96, 17.08, 3.3, 3.9)
pt3dadd(60.92, 17, 3.3, 3.9)
pt3dadd(60.88, 16.97, 3.3, 3.9)
pt3dadd(60.81, 16.89, 3.3, 3.9)
pt3dadd(60.78, 16.81, 3.3, 3.9)
pt3dadd(60.74, 16.73, 3.3, 3.9)
pt3dadd(60.67, 16.65, 3.3, 3.9)
pt3dadd(60.64, 16.57, 3.3, 3.9)
pt3dadd(60.6, 16.45, 3.3, 3.9)
pt3dadd(60.53, 16.41, 3.3, 3.9)
pt3dadd(60.53, 16.33, 3.3, 3.9)
pt3dadd(60.47, 16.29, 3.3, 3.9)
pt3dadd(60.43, 16.21, 3.3, 3.9)
pt3dadd(60.29, 16.06, 3.3, 3.9)
pt3dadd(60.26, 15.98, 3.3, 3.9)
pt3dadd(60.19, 15.9, 3.3, 3.9)
pt3dadd(60.15, 15.82, 3.3, 3.9)
pt3dadd(60.08, 15.7, 3.3, 3.9)
pt3dadd(60.05, 15.66, 3.3, 3.9)
pt3dadd(60.01, 15.58, 3.3, 3.9)
pt3dadd(59.94, 15.46, 3.3, 3.9)
pt3dadd(59.88, 15.34, 3.3, 3.9)
pt3dadd(59.81, 15.22, 3.3, 3.9)
pt3dadd(59.77, 15.1, 3.3, 3.9)
pt3dadd(59.74, 15.02, 3.3, 3.9)
pt3dadd(59.67, 14.91, 3.3, 3.9)
pt3dadd(59.63, 14.83, 3.3, 3.9)
pt3dadd(59.6, 14.71, 3.3, 3.9)
pt3dadd(59.49, 14.63, 3.3, 3.9)
pt3dadd(59.46, 14.55, 3.3, 3.9)
pt3dadd(59.42, 14.43, 3.3, 3.9)
pt3dadd(59.35, 14.35, 3.3, 3.9)
pt3dadd(59.32, 14.27, 3.3, 3.9)
pt3dadd(59.28, 14.19, 3.3, 3.9)
pt3dadd(59.25, 14.11, 3.3, 3.9)
pt3dadd(59.21, 14, 3.3, 3.9)
pt3dadd(59.14, 13.88, 3.3, 3.9)
pt3dadd(59.11, 13.84, 3.3, 3.9)
pt3dadd(59.07, 13.72, 3.3, 3.9)
pt3dadd(59.04, 13.64, 3.3, 3.9)
pt3dadd(59, 13.56, 3.3, 3.9)
pt3dadd(58.93, 13.48, 3.3, 3.9)
pt3dadd(58.9, 13.36, 3.3, 3.9)
pt3dadd(58.87, 13.28, 3.3, 3.9)
pt3dadd(58.83, 13.2, 3.3, 3.9)
pt3dadd(58.83, 13.13, 3.3, 3.9)
pt3dadd(58.79, 13.09, 3.3, 3.9)
pt3dadd(58.76, 13.05, 3.3, 3.9)
pt3dadd(58.76, 12.93, 3.3, 3.9)
pt3dadd(58.72, 12.85, 3.3, 3.9)
pt3dadd(58.69, 12.77, 3.3, 3.9)
pt3dadd(58.65, 12.73, 3.3, 3.9)
pt3dadd(58.65, 12.61, 3.3, 3.9)
pt3dadd(58.62, 12.65, 3.3, 3.9)
pt3dadd(58.62, 12.77, 3.3, 3.9)
pt3dadd(58.65, 12.85, 3.3, 3.9)
pt3dadd(58.69, 12.97, 3.3, 3.9)
pt3dadd(58.72, 12.97, 3.3, 3.9)
pt3dadd(58.76, 12.73, 5.3, 3.9)
pt3dadd(58.76, 12.49, 5.3, 3.9)
pt3dadd(58.72, 12.45, 5.3, 3.9)
pt3dadd(58.69, 12.41, 5.3, 3.9)
pt3dadd(58.65, 12.34, 5.3, 3.9)
pt3dadd(58.62, 12.26, 5.3, 3.9)
pt3dadd(58.62, 12.14, 5.3, 3.9)
pt3dadd(58.55, 12.02, 5.3, 3.9)
pt3dadd(58.55, 11.9, 5.3, 3.9)
pt3dadd(58.51, 11.82, 5.3, 3.9)
pt3dadd(58.44, 11.7, 5.3, 3.9)
pt3dadd(58.44, 11.58, 5.3, 3.9)
pt3dadd(58.41, 11.47, 5.3, 3.9)
pt3dadd(58.38, 11.35, 5.3, 3.9)
pt3dadd(58.38, 11.23, 5.3, 3.9)
pt3dadd(58.34, 11.15, 5.3, 3.9)
pt3dadd(58.31, 11.03, 5.3, 3.9)
pt3dadd(58.27, 10.91, 5.3, 3.9)
pt3dadd(58.24, 10.79, 5.3, 3.9)
pt3dadd(58.24, 10.67, 5.3, 3.9)
pt3dadd(58.2, 10.56, 5.3, 3.9)
pt3dadd(58.17, 10.44, 5.3, 3.9)
pt3dadd(58.13, 10.32, 5.3, 3.9)
pt3dadd(58.1, 10.2, 5.3, 3.9)
pt3dadd(58.06, 10.12, 5.3, 3.9)
pt3dadd(58.03, 9.96, 5.3, 3.9)
pt3dadd(57.99, 9.84, 5.3, 3.9)
pt3dadd(57.96, 9.76, 5.3, 3.9)
pt3dadd(57.92, 9.56, 5.3, 3.9)
pt3dadd(57.89, 9.44, 5.3, 3.9)
pt3dadd(57.82, 9.33, 5.3, 3.9)
pt3dadd(57.78, 9.21, 5.3, 3.9)
pt3dadd(57.75, 9.05, 5.3, 3.9)
pt3dadd(57.75, 8.97, 5.3, 3.9)
pt3dadd(57.72, 8.77, 5.3, 3.9)
pt3dadd(57.68, 8.69, 5.3, 3.9)
pt3dadd(57.61, 8.53, 5.3, 3.9)
pt3dadd(57.58, 8.42, 5.3, 3.9)
pt3dadd(57.54, 8.26, 5.3, 3.9)
pt3dadd(57.51, 8.14, 5.3, 3.9)
pt3dadd(57.47, 8.02, 5.3, 3.9)
pt3dadd(57.44, 7.94, 5.3, 3.9)
pt3dadd(57.4, 7.82, 5.3, 3.9)
pt3dadd(57.37, 7.7, 5.3, 3.9)
pt3dadd(57.33, 7.63, 5.3, 3.9)
pt3dadd(57.29, 7.51, 5.3, 3.9)
}
}
proc shape3d_128() {
dend[87] { pt3dadd(57.26, 7.43, 5.3, 3.9)
pt3dadd(57.19, 7.27, 5.3, 3.9)
pt3dadd(57.16, 7.19, 5.3, 3.9)
pt3dadd(57.12, 7.07, 5.3, 3.9)
pt3dadd(57.09, 6.95, 5.3, 3.9)
pt3dadd(57.02, 6.88, 5.3, 3.9)
pt3dadd(56.98, 6.76, 5.3, 3.9)
pt3dadd(56.95, 6.64, 5.3, 3.9)
pt3dadd(56.91, 6.56, 5.3, 3.9)
pt3dadd(56.84, 6.48, 5.3, 3.9)
pt3dadd(56.81, 6.4, 5.3, 3.9)
pt3dadd(56.77, 6.32, 5.3, 3.9)
pt3dadd(56.71, 6.24, 5.3, 3.9)
pt3dadd(56.67, 6.16, 5.3, 3.9)
pt3dadd(56.63, 6.04, 5.3, 3.9)
pt3dadd(56.6, 5.97, 5.3, 3.9)
pt3dadd(56.56, 5.89, 5.3, 3.9)
pt3dadd(56.49, 5.76, 5.3, 3.9)
pt3dadd(56.46, 5.69, 5.3, 3.9)
pt3dadd(56.39, 5.61, 5.3, 3.9)
pt3dadd(56.35, 5.53, 5.3, 3.9)
pt3dadd(56.28, 5.41, 5.3, 3.9)
pt3dadd(56.25, 5.33, 5.3, 3.9)
pt3dadd(56.22, 5.25, 5.3, 3.9)
pt3dadd(56.18, 5.17, 5.3, 3.9)
pt3dadd(56.22, 5.25, 5.3, 3.9)
pt3dadd(56.22, 5.29, 5.3, 3.9)
pt3dadd(56.39, 5.25, 7.3, 3.9)
pt3dadd(56.35, 5.17, 7.3, 3.9)
pt3dadd(56.28, 5.09, 7.3, 3.9)
pt3dadd(56.25, 4.97, 7.3, 3.9)
pt3dadd(56.22, 4.89, 7.3, 3.9)
pt3dadd(56.15, 4.82, 7.3, 3.9)
pt3dadd(56.11, 4.74, 7.3, 3.9)
pt3dadd(56.08, 4.66, 7.3, 3.9)
pt3dadd(55.97, 4.46, 7.3, 3.9)
pt3dadd(55.94, 4.34, 7.3, 3.9)
pt3dadd(55.9, 4.26, 7.3, 3.9)
pt3dadd(55.87, 4.14, 7.3, 3.9)
pt3dadd(55.8, 4.03, 7.3, 3.9)
pt3dadd(55.76, 3.91, 7.3, 3.9)
pt3dadd(55.73, 3.83, 7.3, 3.9)
pt3dadd(55.69, 3.71, 7.3, 3.9)
pt3dadd(55.66, 3.63, 7.3, 3.9)
pt3dadd(55.59, 3.47, 7.3, 3.9)
pt3dadd(55.56, 3.39, 7.3, 3.9)
pt3dadd(55.52, 3.27, 7.3, 3.9)
pt3dadd(55.49, 3.15, 7.3, 3.9)
pt3dadd(55.45, 3.08, 7.3, 3.9)
pt3dadd(55.38, 2.99, 7.3, 3.9)
pt3dadd(55.35, 2.88, 7.3, 3.9)
pt3dadd(55.31, 2.8, 7.3, 3.9)
pt3dadd(55.28, 2.68, 7.3, 3.9)
pt3dadd(55.24, 2.56, 7.3, 3.9)
pt3dadd(55.17, 2.48, 7.3, 3.9)
pt3dadd(55.17, 2.36, 7.3, 3.9)
pt3dadd(55.1, 2.29, 7.3, 3.9)
pt3dadd(55.07, 2.2, 7.3, 3.9)
pt3dadd(55.03, 2.09, 7.3, 3.9)
pt3dadd(55, 1.97, 7.3, 3.9)
pt3dadd(54.96, 1.89, 7.3, 3.9)
pt3dadd(54.93, 1.77, 7.3, 3.9)
pt3dadd(54.89, 1.69, 7.3, 3.9)
pt3dadd(54.82, 1.57, 7.3, 3.9)
pt3dadd(54.79, 1.45, 7.3, 3.9)
pt3dadd(54.72, 1.34, 7.3, 3.9)
pt3dadd(54.68, 1.22, 7.3, 3.9)
pt3dadd(54.61, 1.14, 7.3, 3.9)
pt3dadd(54.61, 1.06, 7.3, 3.9)
pt3dadd(54.54, 0.94, 7.3, 3.9)
pt3dadd(54.51, 0.82, 7.3, 3.9)
pt3dadd(54.44, 0.7, 7.3, 3.9)
pt3dadd(54.4, 0.66, 7.3, 3.9)
pt3dadd(54.37, 0.54, 7.3, 3.9)
pt3dadd(54.33, 0.46, 7.3, 3.9)
pt3dadd(54.26, 0.38, 7.3, 3.9)
pt3dadd(54.23, 0.31, 7.3, 3.9)
pt3dadd(54.19, 0.19, 7.3, 3.9)
pt3dadd(54.16, 0.11, 7.3, 3.9)
pt3dadd(54.09, 0.03, 7.3, 3.9)
pt3dadd(54.09, -0.05, 7.3, 3.9)
pt3dadd(54.06, -0.13, 7.3, 3.9)
pt3dadd(53.99, -0.25, 7.3, 3.9)
pt3dadd(53.95, -0.33, 7.3, 3.9)
pt3dadd(53.92, -0.41, 7.3, 3.9)
pt3dadd(53.88, -0.45, 7.3, 3.9)
pt3dadd(53.85, -0.49, 7.3, 3.9)
pt3dadd(54.02, -0.41, 11.3, 3.9)
pt3dadd(54.02, -0.61, 11.3, 3.9)
pt3dadd(53.99, -0.64, 11.3, 3.9)
pt3dadd(53.99, -0.8, 11.3, 3.9)
pt3dadd(53.95, -0.84, 11.3, 3.9)
pt3dadd(53.92, -0.88, 11.3, 3.9)
pt3dadd(53.92, -1.04, 11.3, 3.9)
pt3dadd(53.88, -1.08, 11.3, 3.9)
pt3dadd(53.85, -1.12, 11.3, 3.9)
pt3dadd(53.85, -1.24, 11.3, 3.9)
pt3dadd(53.81, -1.28, 11.3, 3.9)
pt3dadd(53.81, -1.36, 11.3, 3.9)
pt3dadd(53.78, -1.39, 11.3, 3.9)
}
dend[88] {pt3dclear()
pt3dadd(63.18, 59.19, -5.7, 8.64)
pt3dadd(63.04, 59.1, -5.7, 8.64)
pt3dadd(62.97, 59.19, -5.7, 8.64)
pt3dadd(62.83, 59.19, -5.7, 8.64)
pt3dadd(62.76, 59.26, -5.7, 8.64)
pt3dadd(62.63, 59.34, -5.7, 8.64)
pt3dadd(62.56, 59.42, -5.7, 8.64)
pt3dadd(62.49, 59.5, -5.7, 8.64)
pt3dadd(62.35, 59.58, -5.7, 8.64)
pt3dadd(62.28, 59.66, -5.7, 8.64)
pt3dadd(62.21, 59.74, -5.7, 8.64)
pt3dadd(62.07, 59.74, -5.7, 8.64)
pt3dadd(62, 59.82, -5.7, 8.64)
pt3dadd(61.93, 59.9, -5.7, 8.64)
pt3dadd(61.79, 59.9, -5.7, 8.64)
pt3dadd(61.72, 59.97, -5.7, 8.64)
pt3dadd(61.58, 60.06, -5.7, 8.64)
pt3dadd(61.23, 60.06, -5.7, 8.64)
pt3dadd(61.09, 60.13, -5.7, 8.64)
pt3dadd(56.08, 60.13, -5.7, 8.64)
pt3dadd(55.94, 60.06, -5.7, 8.64)
pt3dadd(55.8, 60.06, -5.7, 8.64)
pt3dadd(55.73, 59.97, -5.7, 8.64)
pt3dadd(55.17, 59.74, -5.7, 8.64)
}
dend[89] {pt3dclear()
pt3dadd(55.17, 59.74, -5.7, 4.46)
pt3dadd(55.24, 58.87, 6.3, 4.46)
pt3dadd(55.31, 58.79, 6.3, 4.46)
pt3dadd(55.38, 58.71, 6.3, 4.46)
pt3dadd(55.38, 56.97, 6.3, 4.46)
pt3dadd(55.31, 56.89, 6.3, 4.46)
pt3dadd(55.31, 56.73, 6.3, 4.46)
pt3dadd(55.24, 56.73, 6.3, 4.46)
pt3dadd(55.38, 56.57, 13.3, 3.9)
pt3dadd(55.38, 52.54, 13.3, 3.9)
pt3dadd(55.31, 52.46, 13.3, 3.9)
pt3dadd(55.31, 52.22, 13.3, 3.9)
pt3dadd(55.28, 52.22, 15.3, 3.9)
pt3dadd(53.88, 50.83, 15.3, 3.9)
pt3dadd(54.13, 50.92, 15.3, 3.9)
pt3dadd(54.02, 50.92, 15.3, 3.9)
pt3dadd(53.99, 50.88, 15.3, 3.9)
pt3dadd(53.92, 50.83, 15.3, 3.9)
pt3dadd(53.88, 50.79, 15.3, 3.9)
pt3dadd(53.85, 50.76, 15.3, 3.9)
pt3dadd(53.81, 50.72, 15.3, 3.9)
pt3dadd(53.74, 50.64, 15.3, 3.9)
pt3dadd(53.71, 50.6, 15.3, 3.9)
pt3dadd(53.67, 50.56, 15.3, 3.9)
pt3dadd(53.64, 50.48, 15.3, 3.9)
pt3dadd(53.6, 50.44, 15.3, 3.9)
pt3dadd(53.6, 50.36, 15.3, 3.9)
pt3dadd(53.57, 50.32, 15.3, 3.9)
pt3dadd(53.53, 50.28, 15.3, 3.9)
pt3dadd(53.5, 50.24, 15.3, 3.9)
pt3dadd(53.43, 50.16, 15.3, 3.9)
pt3dadd(53.4, 50.08, 15.3, 3.9)
pt3dadd(53.36, 50.01, 15.3, 3.9)
pt3dadd(53.29, 49.92, 15.3, 3.9)
pt3dadd(53.26, 49.88, 15.3, 3.9)
pt3dadd(53.22, 49.81, 15.3, 3.9)
pt3dadd(53.19, 49.77, 15.3, 3.9)
pt3dadd(53.12, 49.69, 15.3, 3.9)
pt3dadd(53.08, 49.61, 15.3, 3.9)
pt3dadd(53.01, 49.49, 15.3, 3.9)
pt3dadd(52.97, 49.45, 15.3, 3.9)
pt3dadd(52.91, 49.41, 15.3, 3.9)
pt3dadd(52.84, 49.33, 15.3, 3.9)
pt3dadd(52.8, 49.29, 15.3, 3.9)
pt3dadd(52.77, 49.25, 15.3, 3.9)
pt3dadd(52.73, 49.21, 15.3, 3.9)
pt3dadd(52.73, 49.25, 15.3, 3.9)
pt3dadd(52.87, 49.21, 18.3, 3.9)
pt3dadd(52.8, 49.17, 18.3, 3.9)
pt3dadd(52.77, 49.13, 18.3, 3.9)
pt3dadd(52.73, 49.1, 18.3, 3.9)
pt3dadd(52.7, 49.06, 18.3, 3.9)
pt3dadd(52.7, 48.97, 18.3, 3.9)
pt3dadd(52.63, 48.97, 18.3, 3.9)
pt3dadd(52.63, 48.9, 18.3, 3.9)
pt3dadd(52.59, 48.86, 18.3, 3.9)
pt3dadd(52.56, 48.82, 18.3, 3.9)
pt3dadd(52.52, 48.78, 18.3, 3.9)
pt3dadd(52.52, 48.42, 18.3, 3.9)
pt3dadd(52.49, 48.34, 18.3, 3.9)
pt3dadd(52.49, 46.09, 18.3, 3.9)
pt3dadd(52.52, 46.05, 18.3, 3.9)
pt3dadd(52.56, 46.01, 20.3, 3.9)
pt3dadd(52.56, 44.82, 20.3, 3.9)
pt3dadd(52.52, 44.78, 20.3, 3.9)
pt3dadd(52.45, 44.66, 20.3, 3.9)
pt3dadd(52.42, 44.62, 20.3, 3.9)
pt3dadd(52.38, 44.58, 20.3, 3.9)
pt3dadd(52.35, 44.51, 20.3, 3.9)
pt3dadd(52.28, 44.47, 20.3, 3.9)
pt3dadd(52.24, 44.38, 20.3, 3.9)
pt3dadd(52.21, 44.35, 20.3, 3.9)
pt3dadd(52.17, 44.31, 20.3, 3.9)
pt3dadd(52.1, 44.27, 20.3, 3.9)
pt3dadd(52.03, 44.19, 20.3, 3.9)
pt3dadd(52, 44.15, 20.3, 3.9)
}
}
proc shape3d_129() {
dend[89] { pt3dadd(51.9, 44.03, 20.3, 3.9)
pt3dadd(51.86, 43.99, 20.3, 3.9)
pt3dadd(51.72, 43.83, 20.3, 3.9)
pt3dadd(51.62, 43.83, 20.3, 3.9)
pt3dadd(51.58, 43.79, 20.3, 3.9)
pt3dadd(51.55, 43.75, 20.3, 3.9)
pt3dadd(51.51, 43.71, 20.3, 3.9)
pt3dadd(51.48, 43.67, 20.3, 3.9)
pt3dadd(51.41, 43.67, 20.3, 3.9)
pt3dadd(51.37, 43.63, 20.3, 3.9)
pt3dadd(51.34, 43.6, 20.3, 3.9)
pt3dadd(51.31, 43.56, 20.3, 3.9)
pt3dadd(51.27, 43.47, 20.3, 3.9)
pt3dadd(51.13, 43.44, 20.3, 3.9)
pt3dadd(51.06, 43.4, 20.3, 3.9)
pt3dadd(50.99, 43.32, 20.3, 3.9)
pt3dadd(50.92, 43.28, 20.3, 3.9)
pt3dadd(50.85, 43.2, 20.3, 3.9)
pt3dadd(50.78, 43.2, 20.3, 3.9)
pt3dadd(50.75, 43.16, 20.3, 3.9)
pt3dadd(50.68, 43.12, 20.3, 3.9)
pt3dadd(50.57, 43.08, 20.3, 3.9)
pt3dadd(50.54, 43.04, 20.3, 3.9)
pt3dadd(50.47, 43, 20.3, 3.9)
pt3dadd(50.4, 43, 20.3, 3.9)
pt3dadd(50.36, 42.96, 20.3, 3.9)
pt3dadd(50.26, 42.96, 20.3, 3.9)
pt3dadd(50.15, 42.92, 20.3, 3.9)
pt3dadd(49.32, 42.92, 20.3, 3.9)
pt3dadd(49.21, 42.88, 20.3, 3.9)
pt3dadd(47.68, 42.88, 20.3, 3.9)
pt3dadd(47.72, 42.92, 20.3, 3.9)
pt3dadd(47.72, 43, 20.3, 3.9)
pt3dadd(47.61, 42.84, 22.3, 3.9)
pt3dadd(47.54, 42.8, 22.3, 3.9)
pt3dadd(47.47, 42.76, 22.3, 3.9)
pt3dadd(47.44, 42.72, 22.3, 3.9)
pt3dadd(47.37, 42.69, 22.3, 3.9)
pt3dadd(47.26, 42.56, 22.3, 3.9)
pt3dadd(47.23, 42.53, 22.3, 3.9)
pt3dadd(47.16, 42.53, 22.3, 3.9)
pt3dadd(47.09, 42.49, 22.3, 3.9)
pt3dadd(47.05, 42.45, 22.3, 3.9)
pt3dadd(46.95, 42.41, 22.3, 3.9)
pt3dadd(46.88, 42.41, 22.3, 3.9)
pt3dadd(46.85, 42.37, 22.3, 3.9)
pt3dadd(46.78, 42.37, 22.3, 3.9)
pt3dadd(46.71, 42.33, 22.3, 3.9)
pt3dadd(46.67, 42.29, 22.3, 3.9)
pt3dadd(46.56, 42.29, 22.3, 3.9)
pt3dadd(46.49, 42.25, 22.3, 3.9)
pt3dadd(46.39, 42.21, 22.3, 3.9)
pt3dadd(46.32, 42.17, 22.3, 3.9)
pt3dadd(46.25, 42.13, 22.3, 3.9)
pt3dadd(46.11, 42.13, 22.3, 3.9)
pt3dadd(46.01, 42.05, 22.3, 3.9)
pt3dadd(45.9, 42.05, 22.3, 3.9)
pt3dadd(45.8, 42.01, 22.3, 3.9)
pt3dadd(45.73, 41.93, 22.3, 3.9)
pt3dadd(45.66, 41.93, 22.3, 3.9)
pt3dadd(45.59, 41.89, 22.3, 3.9)
pt3dadd(45.52, 41.85, 22.3, 3.9)
pt3dadd(45.45, 41.78, 22.3, 3.9)
pt3dadd(45.31, 41.78, 22.3, 3.9)
pt3dadd(45.21, 41.74, 22.3, 3.9)
pt3dadd(45.14, 41.65, 22.3, 3.9)
pt3dadd(45.07, 41.65, 22.3, 3.9)
pt3dadd(44.96, 41.62, 22.3, 3.9)
pt3dadd(44.86, 41.58, 22.3, 3.9)
pt3dadd(44.72, 41.58, 22.3, 3.9)
pt3dadd(44.69, 41.54, 22.3, 3.9)
pt3dadd(44.65, 41.5, 22.3, 3.9)
pt3dadd(44.54, 41.46, 22.3, 3.9)
pt3dadd(44.47, 41.42, 22.3, 3.9)
pt3dadd(44.4, 41.42, 22.3, 3.9)
pt3dadd(44.3, 41.38, 22.3, 3.9)
pt3dadd(44.23, 41.34, 22.3, 3.9)
pt3dadd(44.16, 41.3, 22.3, 3.9)
pt3dadd(44.06, 41.22, 22.3, 3.9)
pt3dadd(44.02, 41.18, 22.3, 3.9)
pt3dadd(43.95, 41.14, 22.3, 3.9)
pt3dadd(43.88, 41.1, 22.3, 3.9)
pt3dadd(43.78, 41.1, 22.3, 3.9)
pt3dadd(43.71, 41.06, 22.3, 3.9)
pt3dadd(43.64, 40.98, 22.3, 3.9)
pt3dadd(43.53, 40.94, 22.3, 3.9)
pt3dadd(43.43, 40.9, 22.3, 3.9)
pt3dadd(43.36, 40.83, 22.3, 3.9)
pt3dadd(43.29, 40.83, 22.3, 3.9)
pt3dadd(43.22, 40.78, 22.3, 3.9)
pt3dadd(43.12, 40.71, 22.3, 3.9)
pt3dadd(42.98, 40.71, 22.3, 3.9)
pt3dadd(42.91, 40.67, 22.3, 3.9)
pt3dadd(42.84, 40.59, 22.3, 3.9)
pt3dadd(42.77, 40.59, 22.3, 3.9)
pt3dadd(42.7, 40.55, 22.3, 3.9)
pt3dadd(42.63, 40.47, 22.3, 3.9)
pt3dadd(42.56, 40.43, 22.3, 3.9)
pt3dadd(42.46, 40.43, 22.3, 3.9)
pt3dadd(42.38, 40.39, 22.3, 3.9)
pt3dadd(42.11, 40.39, 22.3, 3.9)
pt3dadd(42.11, 40.55, 22.3, 3.9)
pt3dadd(42.11, 40.35, 26.3, 3.76)
pt3dadd(42.04, 40.35, 26.3, 3.76)
pt3dadd(41.97, 40.31, 26.3, 3.76)
pt3dadd(41.9, 40.31, 26.3, 3.76)
pt3dadd(41.83, 40.27, 26.3, 3.76)
pt3dadd(41.69, 40.27, 26.3, 3.76)
pt3dadd(41.65, 40.23, 26.3, 3.76)
pt3dadd(41.48, 40.23, 26.3, 3.76)
pt3dadd(41.41, 40.19, 26.3, 3.76)
pt3dadd(41.34, 40.15, 26.3, 3.76)
pt3dadd(41.31, 40.11, 26.3, 3.76)
pt3dadd(41.27, 40.07, 26.3, 3.76)
pt3dadd(41.2, 40.03, 26.3, 3.76)
pt3dadd(41.13, 39.96, 26.3, 3.76)
pt3dadd(41.1, 39.92, 26.3, 3.76)
pt3dadd(41.06, 39.83, 26.3, 3.76)
pt3dadd(41.03, 39.76, 26.3, 3.76)
pt3dadd(40.89, 39.6, 26.3, 3.76)
pt3dadd(40.89, 39.52, 26.3, 3.76)
pt3dadd(40.85, 39.44, 26.3, 3.76)
pt3dadd(40.78, 39.4, 26.3, 3.76)
pt3dadd(40.71, 39.28, 26.3, 3.76)
pt3dadd(40.64, 39.2, 26.3, 3.76)
pt3dadd(40.57, 39.04, 26.3, 3.76)
pt3dadd(40.54, 38.97, 26.3, 3.76)
pt3dadd(40.47, 38.92, 26.3, 3.76)
pt3dadd(40.44, 38.85, 26.3, 3.76)
pt3dadd(40.4, 38.73, 26.3, 3.76)
pt3dadd(40.37, 38.65, 26.3, 3.76)
pt3dadd(40.33, 38.57, 26.3, 3.76)
pt3dadd(40.29, 38.45, 26.3, 3.76)
pt3dadd(40.26, 38.37, 26.3, 3.76)
pt3dadd(40.19, 38.29, 26.3, 3.76)
pt3dadd(40.19, 38.21, 26.3, 3.76)
pt3dadd(40.15, 38.13, 26.3, 3.76)
pt3dadd(40.08, 38.06, 26.3, 3.76)
pt3dadd(40.08, 37.97, 26.3, 3.76)
pt3dadd(40.05, 37.86, 26.3, 3.76)
pt3dadd(40.01, 37.78, 26.3, 3.76)
pt3dadd(39.98, 37.7, 26.3, 3.76)
pt3dadd(39.95, 37.58, 26.3, 3.76)
pt3dadd(39.91, 37.54, 26.3, 3.76)
pt3dadd(39.88, 37.46, 26.3, 3.76)
pt3dadd(39.84, 37.38, 26.3, 3.76)
pt3dadd(39.84, 37.3, 26.3, 3.76)
pt3dadd(39.81, 37.22, 26.3, 3.76)
pt3dadd(39.77, 37.19, 26.3, 3.76)
pt3dadd(39.74, 37.15, 26.3, 3.76)
pt3dadd(39.7, 37.06, 26.3, 3.76)
pt3dadd(39.67, 36.95, 26.3, 3.76)
pt3dadd(39.63, 36.87, 26.3, 3.76)
pt3dadd(39.6, 36.79, 26.3, 3.76)
pt3dadd(39.56, 36.71, 26.3, 3.76)
pt3dadd(39.56, 36.59, 26.3, 3.76)
pt3dadd(39.53, 36.51, 26.3, 3.76)
pt3dadd(39.49, 36.47, 26.3, 3.76)
pt3dadd(39.49, 36.39, 26.3, 3.76)
pt3dadd(39.46, 36.35, 26.3, 3.76)
pt3dadd(39.42, 36.28, 26.3, 3.76)
pt3dadd(39.39, 36.19, 26.3, 3.76)
pt3dadd(39.39, 36.12, 26.3, 3.76)
pt3dadd(39.35, 36.04, 26.3, 3.76)
pt3dadd(39.32, 35.96, 26.3, 3.76)
pt3dadd(39.28, 35.92, 26.3, 3.76)
pt3dadd(39.25, 35.84, 26.3, 3.76)
pt3dadd(39.22, 35.72, 26.3, 3.76)
pt3dadd(39.15, 35.6, 26.3, 3.76)
pt3dadd(39.11, 35.52, 26.3, 3.76)
pt3dadd(39.11, 35.44, 26.3, 3.76)
pt3dadd(39.08, 35.4, 26.3, 3.76)
pt3dadd(39.04, 35.37, 26.3, 3.76)
pt3dadd(39.04, 35.28, 26.3, 3.76)
pt3dadd(39.01, 35.24, 26.3, 3.76)
pt3dadd(38.97, 35.17, 26.3, 3.76)
pt3dadd(38.97, 35.09, 26.3, 3.76)
pt3dadd(38.94, 35.01, 26.3, 3.76)
pt3dadd(38.9, 34.89, 26.3, 3.76)
pt3dadd(38.87, 34.77, 26.3, 3.76)
pt3dadd(38.87, 34.57, 26.3, 3.76)
pt3dadd(38.83, 34.53, 26.3, 3.76)
pt3dadd(38.83, 34.42, 26.3, 3.76)
pt3dadd(38.8, 34.38, 26.3, 3.76)
pt3dadd(38.76, 34.26, 26.3, 3.76)
pt3dadd(38.76, 34.18, 26.3, 3.76)
pt3dadd(38.73, 34.1, 26.3, 3.76)
pt3dadd(38.69, 34.06, 26.3, 3.76)
pt3dadd(38.69, 34.22, 26.3, 3.76)
pt3dadd(38.73, 34.1, 27.3, 3.76)
pt3dadd(38.69, 34.06, 27.3, 3.76)
pt3dadd(38.66, 34.02, 27.3, 3.76)
pt3dadd(38.62, 33.98, 27.3, 3.76)
pt3dadd(38.55, 33.86, 27.3, 3.76)
pt3dadd(38.52, 33.78, 27.3, 3.76)
pt3dadd(38.48, 33.74, 27.3, 3.76)
pt3dadd(38.45, 33.66, 27.3, 3.76)
pt3dadd(38.41, 33.58, 27.3, 3.76)
pt3dadd(38.38, 33.51, 27.3, 3.76)
pt3dadd(38.35, 33.47, 27.3, 3.76)
}
}
proc shape3d_130() {
dend[89] { pt3dadd(38.24, 33.35, 27.3, 3.76)
pt3dadd(38.21, 33.27, 27.3, 3.76)
pt3dadd(38.1, 33.15, 27.3, 3.76)
pt3dadd(38.06, 33.11, 27.3, 3.76)
pt3dadd(38.03, 33.03, 27.3, 3.76)
pt3dadd(37.99, 32.99, 27.3, 3.76)
pt3dadd(37.96, 32.91, 27.3, 3.76)
pt3dadd(37.89, 32.83, 27.3, 3.76)
pt3dadd(37.82, 32.71, 27.3, 3.76)
pt3dadd(37.72, 32.51, 27.3, 3.76)
pt3dadd(37.65, 32.44, 27.3, 3.76)
pt3dadd(37.61, 32.36, 27.3, 3.76)
pt3dadd(37.58, 32.32, 27.3, 3.76)
pt3dadd(37.54, 32.28, 27.3, 3.76)
pt3dadd(37.44, 32.2, 27.3, 3.76)
pt3dadd(37.4, 32.12, 27.3, 3.76)
pt3dadd(37.19, 31.88, 27.3, 3.76)
pt3dadd(37.16, 31.8, 27.3, 3.76)
pt3dadd(37.13, 31.72, 27.3, 3.76)
pt3dadd(37.06, 31.6, 27.3, 3.76)
pt3dadd(36.99, 31.49, 27.3, 3.76)
pt3dadd(36.92, 31.41, 27.3, 3.76)
pt3dadd(36.85, 31.33, 27.3, 3.76)
pt3dadd(36.81, 31.21, 27.3, 3.76)
pt3dadd(36.74, 31.09, 27.3, 3.76)
pt3dadd(36.67, 30.97, 27.3, 3.76)
pt3dadd(36.64, 30.89, 27.3, 3.76)
pt3dadd(36.57, 30.77, 27.3, 3.76)
pt3dadd(36.53, 30.69, 27.3, 3.76)
pt3dadd(36.5, 30.58, 27.3, 3.76)
pt3dadd(36.46, 30.54, 27.3, 3.76)
pt3dadd(36.39, 30.38, 27.3, 3.76)
pt3dadd(36.39, 30.3, 27.3, 3.76)
pt3dadd(36.32, 30.18, 27.3, 3.76)
pt3dadd(36.32, 30.1, 27.3, 3.76)
pt3dadd(36.29, 30.06, 27.3, 3.76)
pt3dadd(36.25, 29.98, 27.3, 3.76)
pt3dadd(36.22, 29.94, 27.3, 3.76)
pt3dadd(36.19, 29.98, 27.3, 3.76)
pt3dadd(36.22, 30.02, 27.3, 3.76)
pt3dadd(36.22, 30.06, 27.3, 3.76)
pt3dadd(36.22, 29.94, 32.3, 3.62)
pt3dadd(36.08, 29.78, 32.3, 3.62)
pt3dadd(36.04, 29.7, 32.3, 3.62)
pt3dadd(36.01, 29.59, 32.3, 3.62)
pt3dadd(35.94, 29.51, 32.3, 3.62)
pt3dadd(35.87, 29.35, 32.3, 3.62)
pt3dadd(35.8, 29.27, 32.3, 3.62)
pt3dadd(35.73, 29.19, 32.3, 3.62)
pt3dadd(35.66, 29.11, 32.3, 3.62)
pt3dadd(35.63, 28.99, 32.3, 3.62)
pt3dadd(35.59, 28.95, 32.3, 3.62)
pt3dadd(35.56, 28.88, 32.3, 3.62)
pt3dadd(35.49, 28.83, 32.3, 3.62)
pt3dadd(35.45, 28.8, 32.3, 3.62)
pt3dadd(35.38, 28.8, 32.3, 3.62)
pt3dadd(35.35, 28.72, 32.3, 3.62)
pt3dadd(35.28, 28.68, 32.3, 3.62)
pt3dadd(35.21, 28.64, 32.3, 3.62)
pt3dadd(35.14, 28.56, 32.3, 3.62)
pt3dadd(35.07, 28.56, 32.3, 3.62)
pt3dadd(34.97, 28.44, 32.3, 3.62)
pt3dadd(34.93, 28.36, 32.3, 3.62)
pt3dadd(34.83, 28.32, 32.3, 3.62)
pt3dadd(34.76, 28.24, 32.3, 3.62)
pt3dadd(34.65, 28.2, 32.3, 3.62)
pt3dadd(34.62, 28.16, 32.3, 3.62)
pt3dadd(34.55, 28.12, 32.3, 3.62)
pt3dadd(34.51, 28.04, 32.3, 3.62)
pt3dadd(34.44, 27.97, 32.3, 3.62)
pt3dadd(34.37, 27.92, 32.3, 3.62)
pt3dadd(34.3, 27.84, 32.3, 3.62)
pt3dadd(34.23, 27.81, 32.3, 3.62)
pt3dadd(34.16, 27.77, 32.3, 3.62)
pt3dadd(34.09, 27.69, 32.3, 3.62)
pt3dadd(34.03, 27.61, 32.3, 3.62)
pt3dadd(33.85, 27.49, 32.3, 3.62)
pt3dadd(33.81, 27.45, 32.3, 3.62)
pt3dadd(33.78, 27.37, 32.3, 3.62)
pt3dadd(33.71, 27.33, 32.3, 3.62)
pt3dadd(33.64, 27.25, 32.3, 3.62)
pt3dadd(33.6, 27.21, 32.3, 3.62)
pt3dadd(33.5, 27.13, 32.3, 3.62)
pt3dadd(33.43, 27.09, 32.3, 3.62)
pt3dadd(33.36, 27.06, 32.3, 3.62)
pt3dadd(33.29, 26.98, 32.3, 3.62)
pt3dadd(33.22, 26.9, 32.3, 3.62)
pt3dadd(33.12, 26.86, 32.3, 3.62)
pt3dadd(33.05, 26.78, 32.3, 3.62)
pt3dadd(32.98, 26.7, 32.3, 3.62)
pt3dadd(32.91, 26.7, 32.3, 3.62)
pt3dadd(32.81, 26.58, 32.3, 3.62)
pt3dadd(32.74, 26.54, 32.3, 3.62)
pt3dadd(32.67, 26.5, 32.3, 3.62)
pt3dadd(32.53, 26.42, 32.3, 3.62)
pt3dadd(32.42, 26.3, 32.3, 3.62)
pt3dadd(32.32, 26.26, 32.3, 3.62)
pt3dadd(32.28, 26.18, 32.3, 3.62)
pt3dadd(32.21, 26.15, 32.3, 3.62)
pt3dadd(32.11, 26.1, 32.3, 3.62)
pt3dadd(32, 26.07, 32.3, 3.62)
pt3dadd(31.66, 26.07, 32.3, 3.62)
pt3dadd(31.66, 26.18, 32.3, 3.62)
pt3dadd(31.76, 25.95, 36.3, 3.62)
pt3dadd(31.41, 25.95, 36.3, 3.62)
pt3dadd(31.34, 25.91, 36.3, 3.62)
pt3dadd(31.27, 25.87, 36.3, 3.62)
pt3dadd(31.2, 25.83, 36.3, 3.62)
pt3dadd(31.06, 25.67, 36.3, 3.62)
pt3dadd(30.99, 25.59, 36.3, 3.62)
pt3dadd(30.89, 25.55, 36.3, 3.62)
pt3dadd(30.85, 25.47, 36.3, 3.62)
pt3dadd(30.78, 25.43, 36.3, 3.62)
pt3dadd(30.75, 25.35, 36.3, 3.62)
pt3dadd(30.68, 25.31, 36.3, 3.62)
pt3dadd(30.65, 25.24, 36.3, 3.62)
pt3dadd(30.58, 25.19, 36.3, 3.62)
pt3dadd(30.54, 25.16, 36.3, 3.62)
pt3dadd(30.47, 25.08, 36.3, 3.62)
pt3dadd(30.36, 24.96, 36.3, 3.62)
pt3dadd(30.3, 24.92, 36.3, 3.62)
pt3dadd(30.19, 24.8, 36.3, 3.62)
pt3dadd(30.09, 24.72, 36.3, 3.62)
pt3dadd(29.91, 24.52, 36.3, 3.62)
pt3dadd(29.81, 24.44, 36.3, 3.62)
pt3dadd(29.74, 24.4, 36.3, 3.62)
pt3dadd(29.67, 24.36, 36.3, 3.62)
pt3dadd(29.6, 24.28, 36.3, 3.62)
pt3dadd(29.53, 24.25, 36.3, 3.62)
pt3dadd(29.46, 24.17, 36.3, 3.62)
pt3dadd(29.39, 24.09, 36.3, 3.62)
pt3dadd(29.28, 24.01, 36.3, 3.62)
pt3dadd(29.18, 23.93, 36.3, 3.62)
pt3dadd(29.04, 23.77, 36.3, 3.62)
pt3dadd(28.94, 23.69, 36.3, 3.62)
pt3dadd(28.83, 23.57, 36.3, 3.62)
pt3dadd(28.73, 23.49, 36.3, 3.62)
pt3dadd(28.66, 23.42, 36.3, 3.62)
pt3dadd(28.49, 23.22, 36.3, 3.62)
pt3dadd(28.38, 23.1, 36.3, 3.62)
pt3dadd(28.24, 22.98, 36.3, 3.62)
pt3dadd(28, 22.7, 36.3, 3.62)
pt3dadd(27.96, 22.66, 36.3, 3.62)
pt3dadd(27.89, 22.58, 36.3, 3.62)
pt3dadd(27.82, 22.54, 36.3, 3.62)
pt3dadd(27.68, 22.39, 36.3, 3.62)
pt3dadd(27.65, 22.31, 36.3, 3.62)
pt3dadd(27.61, 22.27, 36.3, 3.62)
pt3dadd(27.55, 22.19, 36.3, 3.62)
pt3dadd(27.51, 22.15, 36.3, 3.62)
pt3dadd(27.48, 22.11, 36.3, 3.62)
pt3dadd(27.44, 21.99, 36.3, 3.62)
pt3dadd(27.37, 21.95, 36.3, 3.62)
pt3dadd(27.3, 21.87, 36.3, 3.62)
pt3dadd(27.23, 21.83, 36.3, 3.62)
pt3dadd(27.19, 21.75, 36.3, 3.62)
pt3dadd(27.13, 21.71, 36.3, 3.62)
pt3dadd(27.09, 21.67, 36.3, 3.62)
pt3dadd(27.06, 21.59, 36.3, 3.62)
pt3dadd(26.99, 21.56, 36.3, 3.62)
pt3dadd(26.92, 21.51, 36.3, 3.62)
pt3dadd(26.88, 21.51, 36.3, 3.62)
pt3dadd(26.88, 21.63, 36.3, 3.62)
pt3dadd(26.92, 21.75, 36.3, 3.62)
pt3dadd(26.99, 21.75, 36.3, 3.62)
pt3dadd(26.95, 21.71, 37.3, 3.62)
pt3dadd(26.47, 21.71, 37.3, 3.62)
pt3dadd(26.4, 21.75, 37.3, 3.62)
pt3dadd(26.33, 21.79, 37.3, 3.62)
pt3dadd(26.29, 21.83, 37.3, 3.62)
pt3dadd(26.18, 21.87, 37.3, 3.62)
pt3dadd(26.11, 21.91, 37.3, 3.62)
pt3dadd(26.05, 21.95, 37.3, 3.62)
pt3dadd(25.98, 22.03, 37.3, 3.62)
pt3dadd(25.91, 22.07, 37.3, 3.62)
pt3dadd(25.8, 22.11, 37.3, 3.62)
pt3dadd(25.7, 22.19, 37.3, 3.62)
pt3dadd(25.63, 22.23, 37.3, 3.62)
pt3dadd(25.49, 22.31, 37.3, 3.62)
pt3dadd(25.39, 22.39, 37.3, 3.62)
pt3dadd(25.32, 22.42, 37.3, 3.62)
pt3dadd(25.21, 22.5, 37.3, 3.62)
pt3dadd(25.1, 22.62, 37.3, 3.62)
pt3dadd(25.07, 22.66, 37.3, 3.62)
pt3dadd(24.97, 22.54, 43.3, 3.62)
pt3dadd(24.9, 22.54, 43.3, 3.62)
pt3dadd(24.86, 22.5, 43.3, 3.62)
pt3dadd(24.58, 22.5, 43.3, 3.62)
pt3dadd(24.55, 22.47, 43.3, 3.62)
pt3dadd(24.51, 22.42, 43.3, 3.62)
pt3dadd(24.44, 22.42, 43.3, 3.62)
pt3dadd(24.41, 22.39, 43.3, 3.62)
pt3dadd(24.34, 22.34, 43.3, 3.62)
pt3dadd(24.27, 22.27, 43.3, 3.62)
pt3dadd(24.2, 22.23, 43.3, 3.62)
pt3dadd(24.17, 22.19, 43.3, 3.62)
pt3dadd(24.13, 22.15, 43.3, 3.62)
pt3dadd(24.06, 22.11, 43.3, 3.62)
pt3dadd(24.02, 22.07, 43.3, 3.62)
pt3dadd(23.99, 22.03, 43.3, 3.62)
}
}
proc shape3d_131() {
dend[89] { pt3dadd(23.95, 21.99, 43.3, 3.62)
pt3dadd(23.92, 21.91, 43.3, 3.62)
pt3dadd(23.82, 21.79, 43.3, 3.62)
pt3dadd(23.78, 21.75, 43.3, 3.62)
pt3dadd(23.75, 21.67, 43.3, 3.62)
pt3dadd(23.68, 21.59, 43.3, 3.62)
pt3dadd(23.64, 21.51, 43.3, 3.62)
pt3dadd(23.57, 21.4, 43.3, 3.62)
pt3dadd(23.5, 21.32, 43.3, 3.62)
pt3dadd(23.43, 21.28, 43.3, 3.62)
pt3dadd(23.36, 21.2, 43.3, 3.62)
pt3dadd(23.33, 21.12, 43.3, 3.62)
pt3dadd(23.26, 21.08, 43.3, 3.62)
pt3dadd(23.23, 21, 43.3, 3.62)
pt3dadd(23.16, 20.96, 43.3, 3.62)
pt3dadd(23.12, 20.84, 43.3, 3.62)
pt3dadd(23.05, 20.8, 43.3, 3.62)
pt3dadd(22.94, 20.6, 43.3, 3.62)
pt3dadd(22.88, 20.52, 43.3, 3.62)
pt3dadd(22.81, 20.45, 43.3, 3.62)
pt3dadd(22.77, 20.41, 43.3, 3.62)
pt3dadd(22.7, 20.33, 43.3, 3.62)
pt3dadd(22.63, 20.21, 43.3, 3.62)
pt3dadd(22.49, 20.05, 43.3, 3.62)
pt3dadd(22.42, 19.97, 43.3, 3.62)
pt3dadd(22.35, 19.89, 43.3, 3.62)
pt3dadd(22.32, 19.77, 43.3, 3.62)
pt3dadd(22.22, 19.69, 43.3, 3.62)
pt3dadd(22.15, 19.58, 43.3, 3.62)
pt3dadd(21.97, 19.38, 43.3, 3.62)
pt3dadd(21.86, 19.3, 43.3, 3.62)
pt3dadd(21.8, 19.18, 43.3, 3.62)
pt3dadd(21.73, 19.1, 43.3, 3.62)
pt3dadd(21.66, 19.02, 43.3, 3.62)
pt3dadd(21.59, 18.94, 43.3, 3.62)
pt3dadd(21.48, 18.86, 43.3, 3.62)
pt3dadd(21.41, 18.75, 43.3, 3.62)
pt3dadd(21.14, 18.43, 43.3, 3.62)
pt3dadd(21.07, 18.35, 43.3, 3.62)
pt3dadd(21, 18.27, 43.3, 3.62)
pt3dadd(20.89, 18.15, 43.3, 3.62)
pt3dadd(20.82, 18.07, 43.3, 3.62)
pt3dadd(20.75, 17.99, 43.3, 3.62)
pt3dadd(20.68, 17.92, 43.3, 3.62)
pt3dadd(20.65, 17.83, 43.3, 3.62)
pt3dadd(20.61, 17.75, 43.3, 3.62)
pt3dadd(20.54, 17.68, 43.3, 3.62)
pt3dadd(20.47, 17.64, 43.3, 3.62)
pt3dadd(20.44, 17.56, 43.3, 3.62)
pt3dadd(20.37, 17.48, 43.3, 3.62)
pt3dadd(20.33, 17.44, 43.3, 3.62)
pt3dadd(20.3, 17.36, 43.3, 3.62)
pt3dadd(20.26, 17.32, 43.3, 3.62)
pt3dadd(20.23, 17.24, 43.3, 3.62)
pt3dadd(20.19, 17.2, 43.3, 3.62)
pt3dadd(20.19, 17.08, 43.3, 3.62)
pt3dadd(20.23, 17.12, 43.3, 3.62)
pt3dadd(20.23, 17.52, 43.3, 3.62)
pt3dadd(20.33, 17, 47.3, 3.62)
pt3dadd(20.3, 16.97, 47.3, 3.62)
pt3dadd(20.26, 16.92, 47.3, 3.62)
pt3dadd(20.19, 16.84, 47.3, 3.62)
pt3dadd(20.16, 16.81, 47.3, 3.62)
pt3dadd(20.09, 16.73, 47.3, 3.62)
pt3dadd(20.09, 16.61, 47.3, 3.62)
pt3dadd(20.06, 16.57, 47.3, 3.62)
pt3dadd(20.02, 16.49, 47.3, 3.62)
pt3dadd(19.99, 16.41, 47.3, 3.62)
pt3dadd(19.95, 16.37, 47.3, 3.62)
pt3dadd(19.92, 16.29, 47.3, 3.62)
pt3dadd(19.92, 16.17, 47.3, 3.62)
pt3dadd(19.88, 16.09, 47.3, 3.62)
pt3dadd(19.88, 15.98, 47.3, 3.62)
pt3dadd(19.84, 15.86, 47.3, 3.62)
pt3dadd(19.84, 15.7, 47.3, 3.62)
pt3dadd(19.81, 15.62, 47.3, 3.62)
pt3dadd(19.81, 15.42, 47.3, 3.62)
pt3dadd(19.77, 15.3, 47.3, 3.62)
pt3dadd(19.77, 15.1, 47.3, 3.62)
pt3dadd(19.74, 14.98, 47.3, 3.62)
pt3dadd(19.74, 14.79, 47.3, 3.62)
pt3dadd(19.7, 14.67, 47.3, 3.62)
pt3dadd(19.7, 14.43, 47.3, 3.62)
pt3dadd(19.67, 14.27, 47.3, 3.62)
pt3dadd(19.67, 12.57, 47.3, 3.62)
pt3dadd(19.64, 13.16, 49.3, 3.62)
pt3dadd(19.64, 12.65, 49.3, 3.62)
pt3dadd(19.6, 12.57, 49.3, 3.62)
pt3dadd(19.57, 12.53, 49.3, 3.62)
pt3dadd(19.57, 12.34, 49.3, 3.62)
pt3dadd(19.53, 12.3, 49.3, 3.62)
pt3dadd(19.5, 12.22, 49.3, 3.62)
pt3dadd(19.46, 12.14, 49.3, 3.62)
pt3dadd(19.39, 12.1, 49.3, 3.62)
pt3dadd(19.32, 12.02, 49.3, 3.62)
pt3dadd(19.29, 11.94, 49.3, 3.62)
pt3dadd(19.25, 11.9, 49.3, 3.62)
pt3dadd(19.18, 11.82, 49.3, 3.62)
pt3dadd(19.11, 11.74, 49.3, 3.62)
pt3dadd(19.04, 11.66, 49.3, 3.62)
pt3dadd(18.94, 11.54, 49.3, 3.62)
pt3dadd(18.91, 11.5, 49.3, 3.62)
pt3dadd(18.83, 11.47, 49.3, 3.62)
pt3dadd(18.8, 11.43, 49.3, 3.62)
pt3dadd(18.73, 11.39, 49.3, 3.62)
pt3dadd(18.66, 11.35, 49.3, 3.62)
pt3dadd(18.63, 11.31, 49.3, 3.62)
pt3dadd(18.56, 11.27, 49.3, 3.62)
pt3dadd(18.52, 11.23, 49.3, 3.62)
pt3dadd(18.45, 11.19, 49.3, 3.62)
pt3dadd(18.38, 11.15, 49.3, 3.62)
pt3dadd(18.35, 11.11, 49.3, 3.62)
pt3dadd(18.31, 11.07, 49.3, 3.62)
pt3dadd(18.1, 11.07, 49.3, 3.62)
pt3dadd(18.07, 11.03, 49.3, 3.62)
pt3dadd(17.02, 11.03, 49.3, 3.62)
}
dend[90] {pt3dclear()
pt3dadd(55.17, 59.74, -5.7, 8.64)
pt3dadd(54.06, 59.97, -5.7, 8.64)
pt3dadd(53.92, 59.9, -5.7, 8.64)
pt3dadd(53.15, 59.9, -5.7, 8.64)
pt3dadd(53.08, 59.82, -5.7, 8.64)
pt3dadd(53.01, 59.74, -5.7, 8.64)
pt3dadd(52.87, 59.74, -5.7, 8.64)
pt3dadd(52.73, 59.66, -5.7, 8.64)
pt3dadd(52.59, 59.66, -5.7, 8.64)
pt3dadd(52.45, 59.58, -5.7, 8.64)
pt3dadd(52.24, 59.58, -5.7, 8.64)
pt3dadd(52.17, 59.5, -5.7, 8.64)
pt3dadd(52.1, 59.42, -5.7, 8.64)
pt3dadd(51.97, 59.42, -5.7, 8.64)
pt3dadd(51.83, 59.34, -5.7, 8.64)
pt3dadd(51.69, 59.34, -5.7, 8.64)
pt3dadd(51.55, 59.26, -5.7, 8.64)
pt3dadd(51.34, 59.26, -5.7, 8.64)
pt3dadd(51.2, 59.19, -5.7, 8.64)
pt3dadd(50.01, 59.19, -5.7, 8.64)
pt3dadd(49.74, 59.26, -5.7, 8.64)
}
dend[91] {pt3dclear()
pt3dadd(49.74, 59.26, -5.7, 7.53)
pt3dadd(49.32, 59.03, -4.7, 7.53)
pt3dadd(48.34, 59.03, -4.7, 7.53)
pt3dadd(48.2, 58.95, -4.7, 7.53)
pt3dadd(48.06, 58.87, -4.7, 7.53)
pt3dadd(47.99, 58.79, -4.7, 7.53)
pt3dadd(47.92, 58.71, -4.7, 7.53)
pt3dadd(47.72, 58.63, -4.7, 7.53)
pt3dadd(47.58, 58.55, -4.7, 7.53)
pt3dadd(47.51, 58.47, -4.7, 7.53)
pt3dadd(47.02, 58.47, -4.7, 7.53)
pt3dadd(46.95, 58.39, -4.7, 7.53)
pt3dadd(46.88, 58.31, -4.7, 7.53)
pt3dadd(46.74, 58.24, -4.7, 7.53)
pt3dadd(46.67, 58.15, -4.7, 7.53)
pt3dadd(46.6, 58.08, -4.7, 7.53)
pt3dadd(46.46, 58.08, -4.7, 7.53)
pt3dadd(46.39, 58, -4.7, 7.53)
pt3dadd(46.32, 57.92, -4.7, 7.53)
pt3dadd(46.18, 57.84, -4.7, 7.53)
pt3dadd(46.11, 57.76, -4.7, 7.53)
pt3dadd(46.04, 57.68, -4.7, 7.53)
pt3dadd(45.9, 57.6, -4.7, 7.53)
pt3dadd(45.76, 57.52, -4.7, 7.53)
pt3dadd(45.69, 57.44, -4.7, 7.53)
pt3dadd(45.63, 57.37, -4.7, 7.53)
pt3dadd(45.42, 57.37, -4.7, 7.53)
pt3dadd(45.28, 57.28, -4.7, 7.53)
}
dend[92] {pt3dclear()
pt3dadd(45.28, 57.28, -4.7, 5.3)
pt3dadd(45.28, 56.73, -5.7, 5.3)
pt3dadd(45.21, 56.57, -5.7, 5.3)
pt3dadd(45.14, 56.1, -5.7, 5.02)
pt3dadd(45.07, 55.94, -5.7, 5.02)
pt3dadd(45, 55.7, -5.7, 5.02)
pt3dadd(44.93, 55.54, -5.7, 5.02)
pt3dadd(44.93, 55.38, -5.7, 5.02)
pt3dadd(44.86, 55.15, -5.7, 5.02)
pt3dadd(44.79, 55.07, -5.7, 5.02)
pt3dadd(44.79, 54.91, -5.7, 5.02)
pt3dadd(44.72, 54.83, -5.7, 5.02)
pt3dadd(44.72, 54.67, -5.7, 5.02)
pt3dadd(44.65, 54.51, -5.7, 5.02)
pt3dadd(44.65, 54.36, -5.7, 5.02)
pt3dadd(44.58, 54.28, -5.7, 5.02)
pt3dadd(44.58, 53.96, -5.7, 5.02)
pt3dadd(44.51, 53.88, -5.7, 5.02)
pt3dadd(44.51, 53.56, -5.7, 5.02)
pt3dadd(44.44, 53.49, -5.7, 5.02)
pt3dadd(44.44, 53.33, -5.7, 5.02)
pt3dadd(44.37, 53.09, -5.7, 5.02)
pt3dadd(44.37, 52.93, -5.7, 5.02)
pt3dadd(44.3, 52.78, -5.7, 5.02)
pt3dadd(44.3, 52.62, -5.7, 5.02)
pt3dadd(44.23, 52.46, -5.7, 5.02)
pt3dadd(44.23, 52.3, -5.7, 5.02)
pt3dadd(44.02, 51.83, -5.7, 4.74)
pt3dadd(43.88, 51.67, -5.7, 4.74)
pt3dadd(43.81, 51.51, -5.7, 4.74)
pt3dadd(43.74, 51.35, -5.7, 4.74)
pt3dadd(43.67, 51.27, -5.7, 4.74)
pt3dadd(43.6, 51.11, -5.7, 4.74)
pt3dadd(43.53, 51.03, -5.7, 4.74)
pt3dadd(43.4, 50.88, -5.7, 4.74)
}
}
proc shape3d_132() {
dend[92] { pt3dadd(43.4, 50.72, -5.7, 4.74)
pt3dadd(43.26, 50.64, -5.7, 4.74)
pt3dadd(43.26, 50.48, -5.7, 4.74)
pt3dadd(43.19, 50.32, -5.7, 4.74)
pt3dadd(43.19, 50.16, -5.7, 4.74)
pt3dadd(43.05, 50.01, -5.7, 4.74)
pt3dadd(43.05, 49.77, -5.7, 4.74)
pt3dadd(42.98, 49.61, -5.7, 4.74)
pt3dadd(42.91, 49.45, -5.7, 4.74)
pt3dadd(42.91, 49.29, -5.7, 4.74)
pt3dadd(42.84, 49.21, -5.7, 4.74)
pt3dadd(42.84, 48.97, -5.7, 4.74)
pt3dadd(42.77, 48.82, -5.7, 4.74)
pt3dadd(42.7, 48.74, -5.7, 4.74)
pt3dadd(42.7, 48.42, -5.7, 4.74)
pt3dadd(42.63, 48.26, -5.7, 4.74)
pt3dadd(42.63, 48.03, -5.7, 4.74)
pt3dadd(42.56, 47.87, -5.7, 4.74)
pt3dadd(42.49, 47.71, -5.7, 4.74)
pt3dadd(42.49, 47.55, -5.7, 4.74)
pt3dadd(42.42, 47.39, -5.7, 4.74)
pt3dadd(42.42, 47.24, -5.7, 4.74)
pt3dadd(42.35, 47.08, -5.7, 4.74)
pt3dadd(42.28, 46.92, -5.7, 4.74)
pt3dadd(42.28, 46.76, -5.7, 4.74)
pt3dadd(42.21, 46.68, -5.7, 4.74)
pt3dadd(42.21, 46.6, -5.7, 4.74)
pt3dadd(42.21, 46.68, -6.7, 3.62)
pt3dadd(42.07, 46.68, -6.7, 3.62)
pt3dadd(42, 46.6, -6.7, 3.62)
pt3dadd(41.93, 46.44, -6.7, 3.62)
pt3dadd(41.86, 46.28, -6.7, 3.62)
pt3dadd(41.79, 46.13, -6.7, 3.62)
pt3dadd(41.72, 45.97, -6.7, 3.62)
pt3dadd(41.65, 45.89, -6.7, 3.62)
pt3dadd(41.58, 45.73, -6.7, 3.62)
pt3dadd(41.51, 45.57, -6.7, 3.62)
pt3dadd(41.44, 45.42, -6.7, 3.62)
pt3dadd(41.38, 45.33, -6.7, 3.62)
pt3dadd(41.38, 45.18, -6.7, 3.62)
pt3dadd(41.31, 45.1, -6.7, 3.62)
pt3dadd(41.24, 45.02, -6.7, 3.62)
pt3dadd(41.24, 44.86, -6.7, 3.62)
pt3dadd(41.17, 44.78, -6.7, 3.62)
pt3dadd(41.1, 44.62, -6.7, 3.62)
pt3dadd(41.1, 44.47, -6.7, 3.62)
pt3dadd(41.03, 44.38, -6.7, 3.62)
pt3dadd(41.03, 44.23, -6.7, 3.62)
pt3dadd(40.89, 44.07, -6.7, 3.62)
pt3dadd(40.89, 43.83, -6.7, 3.62)
pt3dadd(40.82, 43.75, -6.7, 3.62)
pt3dadd(40.75, 43.6, -6.7, 3.62)
pt3dadd(40.68, 43.44, -6.7, 3.62)
pt3dadd(40.68, 43.28, -6.7, 3.62)
pt3dadd(40.54, 43.12, -6.7, 3.62)
pt3dadd(40.54, 42.88, -6.7, 3.62)
pt3dadd(40.47, 42.72, -6.7, 3.62)
pt3dadd(40.4, 42.56, -6.7, 3.62)
pt3dadd(40.4, 42.41, -6.7, 3.62)
pt3dadd(40.33, 42.25, -6.7, 3.62)
pt3dadd(40.26, 42.17, -6.7, 3.62)
pt3dadd(40.26, 42.01, -6.7, 3.62)
pt3dadd(40.19, 41.85, -6.7, 3.62)
pt3dadd(40.12, 41.69, -6.7, 3.62)
pt3dadd(40.05, 41.54, -6.7, 3.62)
pt3dadd(39.98, 41.38, -6.7, 3.62)
pt3dadd(39.91, 41.22, -6.7, 3.62)
pt3dadd(39.91, 41.06, -6.7, 3.62)
pt3dadd(39.84, 40.9, -6.7, 3.62)
pt3dadd(39.77, 40.74, -6.7, 3.62)
pt3dadd(39.7, 40.59, -6.7, 3.62)
pt3dadd(39.7, 40.43, -6.7, 3.62)
pt3dadd(39.63, 40.27, -6.7, 3.62)
pt3dadd(39.56, 40.19, -6.7, 3.62)
pt3dadd(39.49, 39.96, -6.7, 3.62)
pt3dadd(39.49, 39.72, -6.7, 3.62)
pt3dadd(39.42, 39.64, -6.7, 3.62)
pt3dadd(39.35, 39.48, -6.7, 3.62)
pt3dadd(39.35, 39.32, -6.7, 3.62)
pt3dadd(39.28, 39.16, -6.7, 3.62)
pt3dadd(39.22, 38.92, -6.7, 3.62)
pt3dadd(39.15, 38.77, -6.7, 3.62)
pt3dadd(39.08, 38.61, -6.7, 3.62)
pt3dadd(39.01, 38.45, -6.7, 3.62)
pt3dadd(39.01, 38.21, -6.7, 3.62)
pt3dadd(38.94, 38.06, -6.7, 3.62)
pt3dadd(38.87, 37.9, -6.7, 3.62)
pt3dadd(38.8, 37.82, -6.7, 3.62)
pt3dadd(38.73, 37.5, -6.7, 3.62)
pt3dadd(38.66, 37.34, -6.7, 3.62)
pt3dadd(38.59, 37.1, -6.7, 3.62)
pt3dadd(38.45, 37.03, -6.7, 3.62)
pt3dadd(38.45, 36.87, -6.7, 3.62)
pt3dadd(38.38, 36.71, -6.7, 3.62)
pt3dadd(38.31, 36.55, -6.7, 3.62)
pt3dadd(38.24, 36.47, -6.7, 3.62)
pt3dadd(38.17, 36.24, -6.7, 3.62)
pt3dadd(38.03, 36.15, -6.7, 3.62)
pt3dadd(38.03, 36, -6.7, 3.62)
pt3dadd(37.96, 35.92, -6.7, 3.62)
pt3dadd(37.89, 35.84, -6.7, 3.62)
pt3dadd(37.82, 35.76, -6.7, 3.62)
pt3dadd(37.75, 35.68, -6.7, 3.62)
pt3dadd(37.75, 35.76, -6.7, 3.62)
pt3dadd(37.82, 35.6, -6.7, 3.9)
pt3dadd(36.5, 33.23, -6.7, 3.9)
pt3dadd(36.92, 33.62, -6.7, 3.9)
pt3dadd(36.78, 33.47, -6.7, 3.9)
pt3dadd(36.71, 33.38, -6.7, 3.9)
pt3dadd(36.64, 33.31, -6.7, 3.9)
pt3dadd(36.57, 33.23, -6.7, 3.9)
pt3dadd(36.5, 33.07, -6.7, 3.9)
pt3dadd(36.36, 32.99, -6.7, 3.9)
pt3dadd(36.29, 32.91, -6.7, 3.9)
pt3dadd(36.22, 32.83, -6.7, 3.9)
pt3dadd(36.15, 32.75, -6.7, 3.9)
pt3dadd(36.08, 32.6, -6.7, 3.9)
pt3dadd(35.94, 32.51, -6.7, 3.9)
pt3dadd(35.87, 32.36, -6.7, 3.9)
pt3dadd(35.8, 32.28, -6.7, 3.9)
pt3dadd(35.73, 32.12, -6.7, 3.9)
pt3dadd(35.66, 32.04, -6.7, 3.9)
pt3dadd(35.59, 31.96, -6.7, 3.9)
pt3dadd(35.52, 31.88, -6.7, 3.9)
pt3dadd(35.45, 31.72, -6.7, 3.9)
pt3dadd(35.38, 31.65, -6.7, 3.9)
pt3dadd(35.24, 31.57, -6.7, 3.9)
pt3dadd(35.17, 31.41, -6.7, 3.9)
pt3dadd(35.03, 31.33, -6.7, 3.9)
pt3dadd(34.97, 31.25, -6.7, 3.9)
pt3dadd(34.9, 31.09, -6.7, 3.9)
pt3dadd(34.76, 30.93, -6.7, 3.9)
pt3dadd(34.69, 30.85, -6.7, 3.9)
pt3dadd(34.55, 30.77, -6.7, 3.9)
pt3dadd(34.48, 30.61, -6.7, 3.9)
pt3dadd(34.41, 30.54, -6.7, 3.9)
pt3dadd(34.27, 30.38, -6.7, 3.9)
pt3dadd(34.2, 30.22, -6.7, 3.9)
pt3dadd(34.13, 30.06, -6.7, 3.9)
pt3dadd(33.99, 29.98, -6.7, 3.9)
pt3dadd(33.92, 29.83, -6.7, 3.9)
pt3dadd(33.85, 29.75, -6.7, 3.9)
pt3dadd(33.78, 29.51, -6.7, 3.9)
pt3dadd(33.64, 29.35, -6.7, 3.9)
pt3dadd(33.57, 29.19, -6.7, 3.9)
pt3dadd(33.5, 29.03, -6.7, 3.9)
pt3dadd(33.43, 28.88, -6.7, 3.9)
pt3dadd(33.29, 28.8, -6.7, 3.9)
pt3dadd(33.22, 28.64, -6.7, 3.9)
pt3dadd(33.08, 28.48, -6.7, 3.9)
pt3dadd(33.01, 28.32, -6.7, 3.9)
pt3dadd(32.94, 28.24, -6.7, 3.9)
pt3dadd(32.88, 28.08, -6.7, 3.9)
pt3dadd(32.81, 28, -6.7, 3.9)
pt3dadd(32.67, 27.92, -6.7, 3.9)
pt3dadd(32.6, 27.77, -6.7, 3.9)
pt3dadd(32.53, 27.69, -6.7, 3.9)
pt3dadd(32.39, 27.61, -6.7, 3.9)
pt3dadd(32.32, 27.45, -6.7, 3.9)
pt3dadd(32.04, 27.13, -6.7, 3.9)
pt3dadd(31.97, 27.06, -6.7, 3.9)
pt3dadd(31.9, 26.9, -6.7, 3.9)
pt3dadd(31.76, 26.9, -6.7, 3.9)
pt3dadd(31.62, 26.74, -6.7, 3.9)
pt3dadd(31.48, 26.58, -6.7, 3.9)
pt3dadd(31.34, 26.5, -6.7, 3.9)
pt3dadd(31.2, 26.42, -6.7, 3.9)
pt3dadd(31.13, 26.34, -6.7, 3.9)
pt3dadd(31.06, 26.34, -6.7, 3.9)
pt3dadd(31.41, 26.5, -7.7, 3.9)
pt3dadd(31.27, 26.42, -7.7, 3.9)
pt3dadd(31.13, 26.42, -7.7, 3.9)
pt3dadd(31.06, 26.34, -7.7, 3.9)
pt3dadd(30.58, 25.79, -7.7, 3.9)
pt3dadd(30.5, 25.71, -7.7, 3.9)
pt3dadd(30.43, 25.63, -7.7, 3.9)
pt3dadd(30.36, 25.47, -7.7, 3.9)
pt3dadd(30.23, 25.47, -7.7, 3.9)
pt3dadd(30.16, 25.31, -7.7, 3.9)
pt3dadd(30.09, 25.24, -7.7, 3.9)
pt3dadd(29.95, 25.16, -7.7, 3.9)
pt3dadd(29.88, 25.08, -7.7, 3.9)
pt3dadd(29.81, 25, -7.7, 3.9)
pt3dadd(29.74, 24.92, -7.7, 3.9)
pt3dadd(29.67, 24.84, -7.7, 3.9)
pt3dadd(29.6, 24.68, -7.7, 3.9)
pt3dadd(29.46, 24.68, -7.7, 3.9)
pt3dadd(29.39, 24.6, -7.7, 3.9)
pt3dadd(29.32, 24.52, -7.7, 3.9)
pt3dadd(29.18, 24.36, -7.7, 3.9)
pt3dadd(29.11, 24.28, -7.7, 3.9)
pt3dadd(29.04, 24.13, -7.7, 3.9)
pt3dadd(28.97, 24.05, -7.7, 3.9)
pt3dadd(28.9, 23.97, -7.7, 3.9)
pt3dadd(28.76, 23.73, -7.7, 3.9)
pt3dadd(28.69, 23.57, -7.7, 3.9)
pt3dadd(28.63, 23.42, -7.7, 3.9)
pt3dadd(28.56, 23.25, -7.7, 3.9)
pt3dadd(28.42, 23.1, -7.7, 3.9)
pt3dadd(28.34, 23.02, -7.7, 3.9)
}
}
proc shape3d_133() {
dend[92] { pt3dadd(28.27, 22.86, -7.7, 3.9)
pt3dadd(28.2, 22.7, -7.7, 3.9)
pt3dadd(28.14, 22.62, -7.7, 3.9)
pt3dadd(28, 22.54, -7.7, 3.9)
pt3dadd(27.93, 22.54, -7.7, 3.9)
pt3dadd(28.34, 22.7, -9.7, 3.9)
pt3dadd(28.27, 22.62, -9.7, 3.9)
pt3dadd(28.2, 22.54, -9.7, 3.9)
pt3dadd(28.14, 22.47, -9.7, 3.9)
pt3dadd(28.07, 22.39, -9.7, 3.9)
pt3dadd(28, 22.31, -9.7, 3.9)
pt3dadd(27.93, 22.23, -9.7, 3.9)
pt3dadd(27.86, 22.07, -9.7, 3.9)
pt3dadd(27.79, 21.99, -9.7, 3.9)
pt3dadd(27.72, 21.91, -9.7, 3.9)
pt3dadd(27.65, 21.83, -9.7, 3.9)
pt3dadd(27.58, 21.75, -9.7, 3.9)
pt3dadd(27.58, 21.59, -9.7, 3.9)
pt3dadd(27.51, 21.43, -9.7, 3.9)
pt3dadd(27.44, 21.36, -9.7, 3.9)
pt3dadd(27.37, 21.2, -9.7, 3.9)
pt3dadd(27.3, 21.12, -9.7, 3.9)
pt3dadd(27.23, 20.96, -9.7, 3.9)
pt3dadd(27.16, 20.8, -9.7, 3.9)
pt3dadd(27.09, 20.72, -9.7, 3.9)
pt3dadd(27.02, 20.57, -9.7, 3.9)
pt3dadd(26.95, 20.49, -9.7, 3.9)
pt3dadd(26.81, 20.41, -9.7, 3.9)
pt3dadd(26.74, 20.25, -9.7, 3.9)
pt3dadd(26.67, 20.09, -9.7, 3.9)
pt3dadd(26.6, 19.93, -9.7, 3.9)
pt3dadd(26.53, 19.77, -9.7, 3.9)
pt3dadd(26.47, 19.61, -9.7, 3.9)
pt3dadd(26.4, 19.53, -9.7, 3.9)
pt3dadd(26.25, 19.3, -9.7, 3.9)
pt3dadd(26.18, 19.22, -9.7, 3.9)
pt3dadd(26.11, 19.06, -9.7, 3.9)
pt3dadd(26.05, 18.83, -9.7, 3.9)
pt3dadd(25.91, 18.67, -9.7, 3.9)
pt3dadd(25.84, 18.51, -9.7, 3.9)
pt3dadd(25.77, 18.35, -9.7, 3.9)
pt3dadd(25.63, 18.19, -9.7, 3.9)
pt3dadd(25.56, 18.03, -9.7, 3.9)
pt3dadd(25.49, 17.88, -9.7, 3.9)
pt3dadd(25.42, 17.64, -9.7, 3.9)
pt3dadd(25.35, 17.48, -9.7, 3.9)
pt3dadd(25.21, 17.32, -9.7, 3.9)
pt3dadd(25.14, 17.08, -9.7, 3.9)
pt3dadd(25.07, 17, -9.7, 3.9)
pt3dadd(24.93, 16.84, -9.7, 3.9)
pt3dadd(24.86, 16.69, -9.7, 3.9)
pt3dadd(24.79, 16.61, -9.7, 3.9)
pt3dadd(24.72, 16.45, -9.7, 3.9)
pt3dadd(24.51, 16.21, -9.7, 3.9)
pt3dadd(24.44, 16.13, -9.7, 3.9)
pt3dadd(24.38, 15.98, -9.7, 3.9)
pt3dadd(24.31, 15.9, -9.7, 3.9)
pt3dadd(24.24, 15.74, -9.7, 3.9)
pt3dadd(24.17, 15.58, -9.7, 3.9)
pt3dadd(24.09, 15.42, -9.7, 3.9)
pt3dadd(24.02, 15.34, -9.7, 3.9)
pt3dadd(23.95, 15.18, -9.7, 3.9)
pt3dadd(23.82, 15.02, -9.7, 3.9)
pt3dadd(23.75, 14.87, -9.7, 3.9)
pt3dadd(23.68, 14.71, -9.7, 3.9)
pt3dadd(23.54, 14.55, -9.7, 3.9)
pt3dadd(23.47, 14.31, -9.7, 3.9)
pt3dadd(23.33, 14.15, -9.7, 3.9)
pt3dadd(23.26, 14, -9.7, 3.9)
pt3dadd(23.19, 13.76, -9.7, 3.9)
pt3dadd(23.12, 13.68, -9.7, 3.9)
pt3dadd(23.05, 13.52, -9.7, 3.9)
pt3dadd(22.98, 13.36, -9.7, 3.9)
pt3dadd(22.91, 13.28, -9.7, 3.9)
pt3dadd(22.84, 13.2, -9.7, 3.9)
pt3dadd(22.77, 13.05, -9.7, 3.9)
pt3dadd(22.7, 12.97, -9.7, 3.9)
pt3dadd(22.63, 12.81, -9.7, 3.9)
pt3dadd(22.56, 12.65, -9.7, 3.9)
pt3dadd(22.49, 12.49, -9.7, 3.9)
pt3dadd(22.42, 12.34, -9.7, 3.9)
pt3dadd(22.35, 12.18, -9.7, 3.9)
pt3dadd(22.28, 12.1, -9.7, 3.9)
pt3dadd(22.28, 11.78, -9.7, 3.9)
pt3dadd(22.22, 11.62, -9.7, 3.9)
pt3dadd(22.15, 11.47, -9.7, 3.9)
pt3dadd(22.08, 11.39, -9.7, 3.9)
pt3dadd(22, 11.31, -9.7, 3.9)
pt3dadd(22, 11.54, -9.7, 3.9)
pt3dadd(22.15, 11.7, -9.7, 3.9)
pt3dadd(22.28, 12.1, -9.7, 3.9)
}
dend[93] {pt3dclear()
pt3dadd(45.28, 57.28, -4.7, 5.85)
pt3dadd(44.72, 57.21, -3.7, 5.85)
pt3dadd(42.91, 57.21, -3.7, 5.85)
pt3dadd(42.84, 57.13, -3.7, 5.85)
pt3dadd(42.7, 57.13, -3.7, 5.85)
pt3dadd(42.63, 57.05, -3.7, 5.85)
pt3dadd(42.49, 56.97, -3.7, 5.85)
pt3dadd(42.28, 56.97, -3.7, 5.85)
pt3dadd(42.14, 56.89, -3.7, 5.85)
pt3dadd(42, 56.81, -3.7, 5.85)
pt3dadd(41.86, 56.73, -3.7, 5.85)
pt3dadd(41.72, 56.73, -3.7, 5.85)
pt3dadd(41.65, 56.65, -3.7, 5.85)
pt3dadd(41.51, 56.57, -3.7, 5.85)
pt3dadd(41.38, 56.49, -3.7, 5.85)
pt3dadd(41.24, 56.49, -3.7, 5.85)
pt3dadd(41.1, 56.42, -3.7, 5.85)
pt3dadd(40.96, 56.33, -3.7, 5.85)
pt3dadd(40.82, 56.33, -3.7, 5.85)
pt3dadd(40.68, 56.26, -3.7, 5.85)
pt3dadd(40.61, 56.18, -3.7, 5.85)
pt3dadd(40.54, 56.1, -3.7, 5.85)
pt3dadd(40.33, 56.1, -3.7, 5.85)
pt3dadd(40.19, 56.02, -3.7, 5.85)
pt3dadd(40.05, 55.94, -3.7, 5.85)
pt3dadd(39.98, 55.86, -3.7, 5.85)
pt3dadd(39.91, 55.78, -3.7, 5.85)
pt3dadd(39.77, 55.7, -3.7, 5.85)
pt3dadd(39.7, 55.54, -3.7, 5.85)
pt3dadd(39.63, 55.47, -3.7, 5.85)
pt3dadd(39.49, 55.47, -3.7, 5.85)
pt3dadd(39.01, 56.26, -3.7, 5.85)
}
dend[94] {pt3dclear()
pt3dadd(39.01, 56.26, -3.7, 5.85)
pt3dadd(39.42, 55.31, -3.7, 5.85)
pt3dadd(39.35, 55.23, -3.7, 5.85)
pt3dadd(39.28, 55.15, -3.7, 5.85)
pt3dadd(39.22, 55.07, -3.7, 5.85)
pt3dadd(39.15, 54.91, -3.7, 5.85)
pt3dadd(39.08, 54.83, -3.7, 5.85)
pt3dadd(39.01, 54.75, -3.7, 5.85)
pt3dadd(38.94, 54.6, -3.7, 5.85)
pt3dadd(38.87, 54.51, -3.7, 5.85)
pt3dadd(38.8, 54.36, -3.7, 5.85)
pt3dadd(38.73, 54.28, -3.7, 5.85)
pt3dadd(38.66, 54.2, -3.7, 5.85)
pt3dadd(38.59, 54.04, -3.7, 5.85)
pt3dadd(38.52, 53.96, -3.7, 5.85)
pt3dadd(38.45, 53.88, -3.7, 5.85)
pt3dadd(38.45, 53.72, -3.7, 5.85)
pt3dadd(38.38, 53.65, -3.7, 5.85)
pt3dadd(38.31, 53.49, -3.7, 5.85)
pt3dadd(38.24, 53.41, -3.7, 5.85)
pt3dadd(38.17, 53.33, -3.7, 5.85)
pt3dadd(38.17, 53.17, -3.7, 5.85)
pt3dadd(38.1, 53.09, -3.7, 5.85)
pt3dadd(38.03, 52.93, -3.7, 5.85)
pt3dadd(37.96, 52.85, -3.7, 5.85)
pt3dadd(37.96, 52.69, -3.7, 5.85)
pt3dadd(37.89, 52.62, -3.7, 5.85)
pt3dadd(37.82, 52.54, -3.7, 5.85)
pt3dadd(37.75, 52.46, -3.7, 5.85)
pt3dadd(37.68, 52.38, -3.7, 5.85)
pt3dadd(37.61, 52.22, -3.7, 5.85)
pt3dadd(37.61, 52.06, -3.7, 5.85)
pt3dadd(37.54, 51.98, -3.7, 5.85)
pt3dadd(37.54, 51.83, -3.7, 5.85)
pt3dadd(37.47, 51.67, -3.7, 5.85)
pt3dadd(37.47, 50.48, -3.7, 5.85)
pt3dadd(37.4, 50.32, -3.7, 5.85)
pt3dadd(37.4, 50.08, -3.7, 5.85)
pt3dadd(37.33, 49.92, -3.7, 5.85)
pt3dadd(37.33, 49.77, -3.7, 5.85)
pt3dadd(37.26, 49.61, -3.7, 5.85)
pt3dadd(37.19, 49.45, -3.7, 5.85)
pt3dadd(37.19, 49.29, -3.7, 5.85)
pt3dadd(37.13, 49.21, -3.7, 5.85)
pt3dadd(37.13, 48.66, -3.7, 5.85)
pt3dadd(37.06, 48.58, -3.7, 5.85)
pt3dadd(37.06, 48.42, -3.7, 5.85)
pt3dadd(36.99, 48.26, -3.7, 5.85)
pt3dadd(36.99, 48.03, -3.7, 5.85)
pt3dadd(36.92, 47.87, -3.7, 5.85)
pt3dadd(36.92, 47.63, -3.7, 5.85)
pt3dadd(36.85, 47.47, -3.7, 5.85)
pt3dadd(36.78, 47.31, -3.7, 5.85)
pt3dadd(36.78, 47.15, -3.7, 5.85)
pt3dadd(36.71, 46.92, -3.7, 5.85)
pt3dadd(36.64, 46.76, -3.7, 5.85)
pt3dadd(36.57, 46.6, -3.7, 5.85)
pt3dadd(36.5, 46.44, -3.7, 5.85)
pt3dadd(36.43, 46.28, -3.7, 5.85)
pt3dadd(36.43, 46.13, -3.7, 5.85)
pt3dadd(36.36, 45.97, -3.7, 5.85)
pt3dadd(36.29, 45.81, -3.7, 5.85)
pt3dadd(36.22, 45.73, -3.7, 5.85)
pt3dadd(36.15, 45.57, -3.7, 5.85)
pt3dadd(36.08, 45.42, -3.7, 5.85)
pt3dadd(36.01, 45.26, -3.7, 5.85)
pt3dadd(36.01, 45.1, -3.7, 5.85)
pt3dadd(35.94, 45.02, -3.7, 5.85)
pt3dadd(35.87, 44.86, -3.7, 5.85)
pt3dadd(35.8, 44.7, -3.7, 5.85)
pt3dadd(35.8, 44.54, -3.7, 5.85)
pt3dadd(35.73, 44.47, -3.7, 5.85)
pt3dadd(35.59, 44.31, -3.7, 5.85)
pt3dadd(35.59, 44.15, -3.7, 5.85)
pt3dadd(35.52, 44.07, -3.7, 5.85)
pt3dadd(35.45, 43.91, -3.7, 5.85)
pt3dadd(35.38, 43.75, -3.7, 5.85)
}
}
proc shape3d_134() {
dend[94] { pt3dadd(35.31, 43.6, -3.7, 5.85)
pt3dadd(35.24, 43.51, -3.7, 5.85)
pt3dadd(35.17, 43.36, -3.7, 5.85)
pt3dadd(35.1, 43.12, -3.7, 5.85)
pt3dadd(35.03, 42.96, -3.7, 5.85)
pt3dadd(34.97, 42.8, -3.7, 5.85)
pt3dadd(34.9, 42.72, -3.7, 5.85)
pt3dadd(34.83, 42.56, -3.7, 5.85)
pt3dadd(34.76, 42.49, -3.7, 5.85)
pt3dadd(34.76, 42.33, -3.7, 5.85)
pt3dadd(34.69, 42.17, -3.7, 5.85)
pt3dadd(34.62, 42.01, -3.7, 5.85)
pt3dadd(34.55, 41.85, -3.7, 5.85)
pt3dadd(34.55, 41.69, -3.7, 5.85)
pt3dadd(34.48, 41.62, -3.7, 5.85)
pt3dadd(34.48, 41.3, -3.7, 5.85)
pt3dadd(34.41, 41.14, -3.7, 5.85)
pt3dadd(34.34, 40.98, -3.7, 5.85)
pt3dadd(34.34, 40.83, -3.7, 5.85)
pt3dadd(34.27, 40.59, -3.7, 5.85)
pt3dadd(34.2, 40.51, -3.7, 5.85)
pt3dadd(34.13, 40.35, -3.7, 5.85)
pt3dadd(34.06, 40.19, -3.7, 5.85)
pt3dadd(33.99, 40.03, -3.7, 5.85)
pt3dadd(33.92, 39.88, -3.7, 5.85)
pt3dadd(33.78, 39.64, -3.7, 5.85)
pt3dadd(33.71, 39.48, -3.7, 5.85)
pt3dadd(33.64, 39.32, -3.7, 5.85)
pt3dadd(33.57, 39.16, -3.7, 5.85)
pt3dadd(33.5, 39.08, -3.7, 5.85)
pt3dadd(33.43, 39.01, -3.7, 5.85)
pt3dadd(33.43, 38.85, -3.7, 5.85)
pt3dadd(33.36, 38.77, -3.7, 5.85)
pt3dadd(33.29, 38.69, -3.7, 5.85)
pt3dadd(33.22, 38.53, -3.7, 5.85)
pt3dadd(33.15, 38.45, -3.7, 5.85)
pt3dadd(33.15, 38.29, -3.7, 5.85)
pt3dadd(33.08, 38.13, -3.7, 5.85)
pt3dadd(33.01, 38.06, -3.7, 5.85)
}
dend[95] {pt3dclear()
pt3dadd(33.01, 38.06, -3.7, 3.76)
pt3dadd(32.74, 37.62, -4.7, 3.76)
pt3dadd(32.7, 37.58, -4.7, 3.76)
pt3dadd(32.67, 37.5, -4.7, 3.76)
pt3dadd(32.63, 37.42, -4.7, 3.76)
pt3dadd(32.56, 37.3, -4.7, 3.76)
pt3dadd(32.56, 37.19, -4.7, 3.76)
pt3dadd(32.53, 37.15, -4.7, 3.76)
pt3dadd(32.49, 37.1, -4.7, 3.76)
pt3dadd(32.46, 37.03, -4.7, 3.76)
pt3dadd(32.46, 36.91, -4.7, 3.76)
pt3dadd(32.42, 36.87, -4.7, 3.76)
pt3dadd(32.42, 36.75, -4.7, 3.76)
pt3dadd(32.39, 36.71, -4.7, 3.76)
pt3dadd(32.39, 36.63, -4.7, 3.76)
pt3dadd(32.35, 36.59, -4.7, 3.76)
pt3dadd(32.32, 36.51, -4.7, 3.76)
pt3dadd(32.28, 36.43, -4.7, 3.76)
pt3dadd(32.28, 36.31, -4.7, 3.76)
pt3dadd(32.21, 36.19, -4.7, 3.76)
pt3dadd(32.18, 36.08, -4.7, 3.76)
pt3dadd(32.14, 36.04, -4.7, 3.76)
pt3dadd(32.11, 35.96, -4.7, 3.76)
pt3dadd(32.07, 35.88, -4.7, 3.76)
pt3dadd(32.04, 35.76, -4.7, 3.76)
pt3dadd(32, 35.72, -4.7, 3.76)
pt3dadd(31.97, 35.64, -4.7, 3.76)
pt3dadd(31.93, 35.6, -4.7, 3.76)
pt3dadd(31.9, 35.52, -4.7, 3.76)
pt3dadd(31.9, 35.44, -4.7, 3.76)
pt3dadd(31.86, 35.4, -4.7, 3.76)
pt3dadd(31.83, 35.33, -4.7, 3.76)
pt3dadd(31.8, 35.28, -4.7, 3.76)
pt3dadd(31.8, 35.17, -4.7, 3.76)
pt3dadd(31.76, 35.09, -4.7, 3.76)
pt3dadd(31.73, 35.05, -4.7, 3.76)
pt3dadd(31.69, 34.97, -4.7, 3.76)
pt3dadd(31.66, 34.89, -4.7, 3.76)
pt3dadd(31.62, 34.81, -4.7, 3.76)
pt3dadd(31.58, 34.73, -4.7, 3.76)
pt3dadd(31.58, 34.65, -4.7, 3.76)
pt3dadd(31.55, 34.61, -4.7, 3.76)
pt3dadd(31.51, 34.53, -4.7, 3.76)
pt3dadd(31.48, 34.46, -4.7, 3.76)
pt3dadd(31.44, 34.38, -4.7, 3.76)
pt3dadd(31.41, 34.29, -4.7, 3.76)
pt3dadd(31.38, 34.18, -4.7, 3.76)
pt3dadd(31.34, 34.1, -4.7, 3.76)
pt3dadd(31.31, 34.02, -4.7, 3.76)
pt3dadd(31.27, 33.98, -4.7, 3.76)
pt3dadd(31.24, 33.86, -4.7, 3.76)
pt3dadd(31.2, 33.82, -4.7, 3.76)
pt3dadd(31.17, 33.74, -4.7, 3.76)
pt3dadd(31.13, 33.66, -4.7, 3.76)
pt3dadd(31.1, 33.62, -4.7, 3.76)
pt3dadd(31.06, 33.54, -4.7, 3.76)
pt3dadd(31.03, 33.51, -4.7, 3.76)
pt3dadd(31.1, 33.7, -5.7, 3.76)
pt3dadd(31.06, 33.66, -5.7, 3.76)
pt3dadd(31.03, 33.62, -5.7, 3.76)
pt3dadd(30.99, 33.58, -5.7, 3.76)
pt3dadd(30.96, 33.54, -5.7, 3.76)
pt3dadd(30.89, 33.38, -5.7, 3.76)
pt3dadd(30.85, 33.31, -5.7, 3.76)
pt3dadd(30.78, 33.27, -5.7, 3.76)
pt3dadd(30.75, 33.15, -5.7, 3.76)
pt3dadd(30.68, 33.07, -5.7, 3.76)
pt3dadd(30.65, 32.99, -5.7, 3.76)
pt3dadd(30.61, 32.87, -5.7, 3.76)
pt3dadd(30.58, 32.79, -5.7, 3.76)
pt3dadd(30.54, 32.71, -5.7, 3.76)
pt3dadd(30.47, 32.67, -5.7, 3.76)
pt3dadd(30.43, 32.6, -5.7, 3.76)
pt3dadd(30.4, 32.51, -5.7, 3.76)
pt3dadd(30.36, 32.4, -5.7, 3.76)
pt3dadd(30.33, 32.36, -5.7, 3.76)
pt3dadd(30.26, 32.28, -5.7, 3.76)
pt3dadd(30.26, 32.2, -5.7, 3.76)
pt3dadd(30.19, 32.08, -5.7, 3.76)
pt3dadd(30.16, 32, -5.7, 3.76)
pt3dadd(30.09, 31.92, -5.7, 3.76)
pt3dadd(30.05, 31.84, -5.7, 3.76)
pt3dadd(30.02, 31.76, -5.7, 3.76)
pt3dadd(29.95, 31.65, -5.7, 3.76)
pt3dadd(29.91, 31.52, -5.7, 3.76)
pt3dadd(29.88, 31.49, -5.7, 3.76)
pt3dadd(29.81, 31.41, -5.7, 3.76)
pt3dadd(29.77, 31.33, -5.7, 3.76)
pt3dadd(29.74, 31.25, -5.7, 3.76)
pt3dadd(29.7, 31.17, -5.7, 3.76)
pt3dadd(29.64, 31.05, -5.7, 3.76)
pt3dadd(29.57, 30.97, -5.7, 3.76)
pt3dadd(29.57, 30.89, -5.7, 3.76)
pt3dadd(29.53, 30.81, -5.7, 3.76)
pt3dadd(29.46, 30.74, -5.7, 3.76)
pt3dadd(29.42, 30.61, -5.7, 3.76)
pt3dadd(29.39, 30.58, -5.7, 3.76)
pt3dadd(29.35, 30.5, -5.7, 3.76)
pt3dadd(29.32, 30.42, -5.7, 3.76)
pt3dadd(29.25, 30.3, -5.7, 3.76)
pt3dadd(29.25, 30.22, -5.7, 3.76)
pt3dadd(29.18, 30.14, -5.7, 3.76)
pt3dadd(29.15, 30.02, -5.7, 3.76)
pt3dadd(29.11, 29.94, -5.7, 3.76)
pt3dadd(29.04, 29.9, -5.7, 3.76)
pt3dadd(29.04, 29.83, -5.7, 3.76)
pt3dadd(28.97, 29.78, -5.7, 3.76)
pt3dadd(28.94, 29.7, -5.7, 3.76)
pt3dadd(28.9, 29.67, -5.7, 3.76)
pt3dadd(28.83, 29.55, -5.7, 3.76)
pt3dadd(28.8, 29.47, -5.7, 3.76)
pt3dadd(28.76, 29.35, -5.7, 3.76)
pt3dadd(28.73, 29.31, -5.7, 3.76)
pt3dadd(28.69, 29.27, -5.7, 3.76)
pt3dadd(28.63, 29.23, -5.7, 3.76)
pt3dadd(28.59, 29.15, -5.7, 3.76)
pt3dadd(28.56, 29.11, -5.7, 3.76)
pt3dadd(28.49, 28.95, -5.7, 3.76)
pt3dadd(28.42, 28.88, -5.7, 3.76)
pt3dadd(28.38, 28.8, -5.7, 3.76)
pt3dadd(28.34, 28.72, -5.7, 3.76)
pt3dadd(28.27, 28.68, -5.7, 3.76)
pt3dadd(28.24, 28.6, -5.7, 3.76)
pt3dadd(28.17, 28.56, -5.7, 3.76)
pt3dadd(28.14, 28.52, -5.7, 3.76)
pt3dadd(28.1, 28.44, -5.7, 3.76)
pt3dadd(28.03, 28.4, -5.7, 3.76)
pt3dadd(27.96, 28.32, -5.7, 3.76)
pt3dadd(27.89, 28.24, -5.7, 3.76)
pt3dadd(27.82, 28.16, -5.7, 3.76)
pt3dadd(27.75, 28.08, -5.7, 3.76)
pt3dadd(27.72, 28, -5.7, 3.76)
pt3dadd(27.65, 27.97, -5.7, 3.76)
pt3dadd(27.61, 27.92, -5.7, 3.76)
pt3dadd(27.58, 27.84, -5.7, 3.76)
pt3dadd(27.55, 27.81, -5.7, 3.76)
pt3dadd(27.48, 27.73, -5.7, 3.76)
pt3dadd(27.33, 27.57, -5.7, 3.76)
pt3dadd(27.3, 27.53, -5.7, 3.76)
pt3dadd(27.26, 27.45, -5.7, 3.76)
pt3dadd(27.23, 27.41, -5.7, 3.76)
pt3dadd(27.16, 27.29, -5.7, 3.76)
pt3dadd(27.09, 27.25, -5.7, 3.76)
pt3dadd(27.06, 27.17, -5.7, 3.76)
pt3dadd(27.02, 27.13, -5.7, 3.76)
pt3dadd(26.95, 27.06, -5.7, 3.76)
pt3dadd(26.92, 27.01, -5.7, 3.76)
pt3dadd(26.85, 26.98, -5.7, 3.76)
pt3dadd(26.81, 26.93, -5.7, 3.76)
pt3dadd(26.71, 26.86, -5.7, 3.76)
pt3dadd(26.64, 26.82, -5.7, 3.76)
pt3dadd(26.6, 26.74, -5.7, 3.76)
pt3dadd(26.53, 26.66, -5.7, 3.76)
pt3dadd(26.5, 26.62, -5.7, 3.76)
pt3dadd(26.29, 26.38, -5.7, 3.76)
pt3dadd(26.25, 26.34, -5.7, 3.76)
pt3dadd(26.18, 26.26, -5.7, 3.76)
pt3dadd(26.15, 26.22, -5.7, 3.76)
pt3dadd(26.08, 26.15, -5.7, 3.76)
pt3dadd(26.05, 26.07, -5.7, 3.76)
pt3dadd(25.98, 25.99, -5.7, 3.76)
}
}
proc shape3d_135() {
dend[95] { pt3dadd(25.94, 25.95, -5.7, 3.76)
pt3dadd(25.91, 25.87, -5.7, 3.76)
pt3dadd(25.87, 25.79, -5.7, 3.76)
pt3dadd(25.77, 25.67, -5.7, 3.76)
pt3dadd(25.7, 25.59, -5.7, 3.76)
pt3dadd(25.66, 25.55, -5.7, 3.76)
pt3dadd(25.59, 25.43, -5.7, 3.76)
pt3dadd(25.56, 25.35, -5.7, 3.76)
pt3dadd(25.52, 25.27, -5.7, 3.76)
pt3dadd(25.45, 25.24, -5.7, 3.76)
pt3dadd(25.42, 25.16, -5.7, 3.76)
pt3dadd(25.35, 25.04, -5.7, 3.76)
pt3dadd(25.28, 24.96, -5.7, 3.76)
pt3dadd(25.25, 24.88, -5.7, 3.76)
pt3dadd(25.17, 24.8, -5.7, 3.76)
pt3dadd(25.14, 24.72, -5.7, 3.76)
pt3dadd(25.07, 24.64, -5.7, 3.76)
pt3dadd(25, 24.52, -5.7, 3.76)
pt3dadd(24.97, 24.44, -5.7, 3.76)
pt3dadd(24.93, 24.4, -5.7, 3.76)
pt3dadd(24.9, 24.33, -5.7, 3.76)
pt3dadd(24.83, 24.28, -5.7, 3.76)
pt3dadd(24.79, 24.2, -5.7, 3.76)
pt3dadd(24.72, 24.17, -5.7, 3.76)
pt3dadd(24.69, 24.09, -5.7, 3.76)
pt3dadd(24.65, 24.01, -5.7, 3.76)
pt3dadd(24.58, 23.97, -5.7, 3.76)
pt3dadd(24.55, 23.93, -5.7, 3.76)
pt3dadd(24.51, 23.89, -5.7, 3.76)
pt3dadd(24.48, 23.85, -5.7, 3.76)
pt3dadd(24.44, 23.77, -5.7, 3.76)
pt3dadd(24.31, 23.61, -5.7, 3.76)
pt3dadd(24.24, 23.53, -5.7, 3.76)
pt3dadd(24.17, 23.45, -5.7, 3.76)
pt3dadd(24.13, 23.33, -5.7, 3.76)
pt3dadd(24.09, 23.25, -5.7, 3.76)
pt3dadd(24.02, 23.22, -5.7, 3.76)
pt3dadd(23.99, 23.18, -5.7, 3.76)
pt3dadd(23.95, 23.1, -5.7, 3.76)
pt3dadd(23.89, 22.98, -5.7, 3.76)
pt3dadd(23.89, 22.9, -5.7, 3.76)
pt3dadd(23.82, 22.86, -5.7, 3.76)
pt3dadd(23.75, 22.82, -5.7, 3.76)
pt3dadd(23.71, 22.74, -5.7, 3.76)
pt3dadd(23.68, 22.7, -5.7, 3.76)
pt3dadd(23.64, 22.62, -5.7, 3.76)
pt3dadd(23.61, 22.54, -5.7, 3.76)
pt3dadd(23.54, 22.5, -5.7, 3.76)
pt3dadd(23.5, 22.47, -5.7, 3.76)
pt3dadd(23.47, 22.39, -5.7, 3.76)
pt3dadd(23.43, 22.34, -5.7, 3.76)
pt3dadd(23.33, 22.23, -5.7, 3.76)
pt3dadd(23.26, 22.15, -5.7, 3.76)
pt3dadd(23.23, 22.07, -5.7, 3.76)
pt3dadd(23.16, 21.99, -5.7, 3.76)
pt3dadd(23.08, 21.95, -5.7, 3.76)
pt3dadd(23.05, 21.87, -5.7, 3.76)
pt3dadd(22.98, 21.83, -5.7, 3.76)
pt3dadd(22.94, 21.75, -5.7, 3.76)
pt3dadd(22.88, 21.75, -5.7, 3.76)
pt3dadd(22.84, 21.71, -5.7, 3.76)
pt3dadd(22.74, 21.71, -5.7, 3.76)
pt3dadd(22.74, 21.79, -5.7, 3.76)
pt3dadd(22.81, 21.91, -5.7, 3.76)
pt3dadd(22.88, 22.11, -5.7, 3.76)
pt3dadd(22.91, 22.19, -5.7, 3.76)
pt3dadd(22.81, 21.87, -5.7, 3.76)
pt3dadd(22.74, 21.83, -5.7, 3.76)
pt3dadd(22.7, 21.79, -5.7, 3.76)
pt3dadd(22.67, 21.75, -5.7, 3.76)
pt3dadd(22.63, 21.71, -5.7, 3.76)
pt3dadd(22.56, 21.63, -5.7, 3.76)
pt3dadd(22.53, 21.59, -5.7, 3.76)
pt3dadd(22.49, 21.56, -5.7, 3.76)
pt3dadd(22.42, 21.43, -5.7, 3.76)
pt3dadd(22.35, 21.32, -5.7, 3.76)
pt3dadd(22.32, 21.24, -5.7, 3.76)
pt3dadd(22.18, 21.08, -5.7, 3.76)
pt3dadd(22.15, 21.04, -5.7, 3.76)
pt3dadd(22.11, 20.92, -5.7, 3.76)
pt3dadd(22.08, 20.84, -5.7, 3.76)
pt3dadd(22.04, 20.8, -5.7, 3.76)
pt3dadd(21.97, 20.72, -5.7, 3.76)
pt3dadd(21.9, 20.68, -5.7, 3.76)
pt3dadd(21.86, 20.57, -5.7, 3.76)
pt3dadd(21.83, 20.49, -5.7, 3.76)
pt3dadd(21.69, 20.33, -5.7, 3.76)
pt3dadd(21.66, 20.25, -5.7, 3.76)
pt3dadd(21.59, 20.21, -5.7, 3.76)
pt3dadd(21.55, 20.17, -5.7, 3.76)
pt3dadd(21.52, 20.09, -5.7, 3.76)
pt3dadd(21.41, 19.89, -5.7, 3.76)
pt3dadd(21.34, 19.77, -5.7, 3.76)
pt3dadd(21.17, 19.58, -5.7, 3.76)
pt3dadd(21.1, 19.46, -5.7, 3.76)
pt3dadd(21.07, 19.38, -5.7, 3.76)
pt3dadd(20.96, 19.18, -5.7, 3.76)
pt3dadd(20.82, 19.02, -5.7, 3.76)
pt3dadd(20.75, 18.9, -5.7, 3.76)
pt3dadd(20.68, 18.78, -5.7, 3.76)
pt3dadd(20.61, 18.67, -5.7, 3.76)
pt3dadd(20.54, 18.55, -5.7, 3.76)
pt3dadd(20.47, 18.47, -5.7, 3.76)
pt3dadd(20.33, 18.31, -5.7, 3.76)
pt3dadd(20.26, 18.19, -5.7, 3.76)
pt3dadd(20.19, 18.07, -5.7, 3.76)
pt3dadd(20.12, 17.92, -5.7, 3.76)
pt3dadd(20.06, 17.8, -5.7, 3.76)
pt3dadd(19.99, 17.68, -5.7, 3.76)
pt3dadd(19.92, 17.56, -5.7, 3.76)
pt3dadd(19.84, 17.44, -5.7, 3.76)
pt3dadd(19.81, 17.36, -5.7, 3.76)
pt3dadd(19.67, 17.16, -5.7, 3.76)
pt3dadd(19.57, 17, -5.7, 3.76)
pt3dadd(19.53, 16.89, -5.7, 3.76)
pt3dadd(19.36, 16.53, -5.7, 3.76)
pt3dadd(19.29, 16.45, -5.7, 3.76)
pt3dadd(19.25, 16.33, -5.7, 3.76)
pt3dadd(19.22, 16.29, -5.7, 3.76)
pt3dadd(19.18, 16.21, -5.7, 3.76)
pt3dadd(19.15, 16.13, -5.7, 3.76)
pt3dadd(19.11, 16.06, -5.7, 3.76)
pt3dadd(19.04, 15.98, -5.7, 3.76)
pt3dadd(19.01, 15.9, -5.7, 3.76)
pt3dadd(18.98, 15.78, -5.7, 3.76)
pt3dadd(18.94, 15.7, -5.7, 3.76)
pt3dadd(18.91, 15.58, -5.7, 3.76)
pt3dadd(18.87, 15.5, -5.7, 3.76)
pt3dadd(18.83, 15.42, -5.7, 3.76)
pt3dadd(18.76, 15.3, -5.7, 3.76)
pt3dadd(18.73, 15.22, -5.7, 3.76)
pt3dadd(18.66, 15.1, -5.7, 3.76)
pt3dadd(18.63, 15.02, -5.7, 3.76)
pt3dadd(18.59, 14.94, -5.7, 3.76)
pt3dadd(18.56, 14.87, -5.7, 3.76)
pt3dadd(18.52, 14.79, -5.7, 3.76)
pt3dadd(18.45, 14.67, -5.7, 3.76)
pt3dadd(18.42, 14.63, -5.7, 3.76)
pt3dadd(18.35, 14.47, -5.7, 3.76)
pt3dadd(18.31, 14.35, -5.7, 3.76)
pt3dadd(18.24, 14.27, -5.7, 3.76)
pt3dadd(18.21, 14.19, -5.7, 3.76)
pt3dadd(18.17, 14.07, -5.7, 3.76)
pt3dadd(18.1, 14, -5.7, 3.76)
pt3dadd(18.07, 13.92, -5.7, 3.76)
pt3dadd(18.03, 13.84, -5.7, 3.76)
pt3dadd(18, 13.76, -5.7, 3.76)
pt3dadd(17.93, 13.64, -5.7, 3.76)
pt3dadd(17.9, 13.56, -5.7, 3.76)
pt3dadd(17.83, 13.48, -5.7, 3.76)
pt3dadd(17.83, 13.4, -5.7, 3.76)
pt3dadd(17.79, 13.32, -5.7, 3.76)
pt3dadd(17.75, 13.24, -5.7, 3.76)
pt3dadd(17.72, 13.16, -5.7, 3.76)
pt3dadd(17.68, 13.09, -5.7, 3.76)
pt3dadd(17.61, 13.01, -5.7, 3.76)
pt3dadd(17.58, 12.97, -5.7, 3.76)
pt3dadd(17.51, 12.85, -5.7, 3.76)
pt3dadd(17.48, 12.77, -5.7, 3.76)
pt3dadd(17.41, 12.73, -5.7, 3.76)
pt3dadd(17.37, 12.65, -5.7, 3.76)
pt3dadd(17.34, 12.57, -5.7, 3.76)
pt3dadd(17.3, 12.49, -5.7, 3.76)
pt3dadd(17.23, 12.41, -5.7, 3.76)
pt3dadd(17.2, 12.34, -5.7, 3.76)
pt3dadd(17.16, 12.26, -5.7, 3.76)
pt3dadd(17.09, 12.18, -5.7, 3.76)
pt3dadd(17.02, 12.06, -5.7, 3.76)
pt3dadd(16.99, 11.98, -5.7, 3.76)
pt3dadd(16.95, 11.9, -5.7, 3.76)
pt3dadd(16.92, 11.82, -5.7, 3.76)
pt3dadd(16.85, 11.74, -5.7, 3.76)
pt3dadd(16.82, 11.66, -5.7, 3.76)
pt3dadd(16.78, 11.58, -5.7, 3.76)
pt3dadd(16.71, 11.5, -5.7, 3.76)
pt3dadd(16.67, 11.43, -5.7, 3.76)
pt3dadd(16.64, 11.35, -5.7, 3.76)
pt3dadd(16.57, 11.27, -5.7, 3.76)
pt3dadd(16.53, 11.19, -5.7, 3.76)
pt3dadd(16.5, 11.11, -5.7, 3.76)
pt3dadd(16.43, 11.03, -5.7, 3.76)
pt3dadd(16.4, 10.95, -5.7, 3.76)
pt3dadd(16.36, 10.87, -5.7, 3.76)
pt3dadd(16.33, 10.83, -5.7, 3.76)
pt3dadd(16.26, 10.75, -5.7, 3.76)
pt3dadd(16.22, 10.63, -5.7, 3.76)
pt3dadd(16.15, 10.59, -5.7, 3.76)
pt3dadd(16.15, 10.52, -5.7, 3.76)
pt3dadd(16.08, 10.48, -5.7, 3.76)
pt3dadd(16.01, 10.44, -5.7, 3.76)
pt3dadd(15.98, 10.4, -5.7, 3.76)
pt3dadd(15.94, 10.35, -5.7, 3.76)
pt3dadd(15.87, 10.35, -5.7, 3.76)
pt3dadd(15.87, 10.4, -5.7, 3.76)
pt3dadd(16.19, 10.63, -5.7, 3.76)
pt3dadd(16.08, 10.63, -5.7, 3.76)
pt3dadd(16.01, 10.59, -5.7, 3.76)
pt3dadd(15.98, 10.56, -5.7, 3.76)
pt3dadd(15.94, 10.52, -5.7, 3.76)
pt3dadd(15.91, 10.48, -5.7, 3.76)
}
}
proc shape3d_136() {
dend[95] { pt3dadd(15.87, 10.44, -5.7, 3.76)
pt3dadd(15.84, 10.35, -5.7, 3.76)
pt3dadd(15.8, 10.32, -5.7, 3.76)
pt3dadd(15.8, 10.24, -5.7, 3.76)
pt3dadd(15.73, 10.2, -5.7, 3.76)
pt3dadd(15.73, 10.08, -5.7, 3.76)
pt3dadd(15.66, 10.04, -5.7, 3.76)
pt3dadd(15.66, 9.96, -5.7, 3.76)
pt3dadd(15.63, 9.92, -5.7, 3.76)
pt3dadd(15.6, 9.84, -5.7, 3.76)
pt3dadd(15.56, 9.76, -5.7, 3.76)
pt3dadd(15.52, 9.68, -5.7, 3.76)
pt3dadd(15.52, 9.6, -5.7, 3.76)
pt3dadd(15.45, 9.48, -5.7, 3.76)
pt3dadd(15.42, 9.37, -5.7, 3.76)
pt3dadd(15.35, 9.29, -5.7, 3.76)
pt3dadd(15.35, 9.21, -5.7, 3.76)
pt3dadd(15.24, 9.01, -5.7, 3.76)
pt3dadd(15.24, 8.89, -5.7, 3.76)
pt3dadd(15.18, 8.77, -5.7, 3.76)
pt3dadd(15.14, 8.61, -5.7, 3.76)
pt3dadd(15.07, 8.57, -5.7, 3.76)
pt3dadd(15.07, 8.46, -5.7, 3.76)
pt3dadd(15, 8.3, -5.7, 3.76)
pt3dadd(14.93, 8.22, -5.7, 3.76)
pt3dadd(14.93, 8.14, -5.7, 3.76)
pt3dadd(14.86, 8.02, -5.7, 3.76)
pt3dadd(14.86, 7.94, -5.7, 3.76)
pt3dadd(14.79, 7.86, -5.7, 3.76)
pt3dadd(14.76, 7.74, -5.7, 3.76)
pt3dadd(14.72, 7.66, -5.7, 3.76)
pt3dadd(14.65, 7.59, -5.7, 3.76)
pt3dadd(14.62, 7.47, -5.7, 3.76)
pt3dadd(14.55, 7.35, -5.7, 3.76)
pt3dadd(14.52, 7.27, -5.7, 3.76)
pt3dadd(14.48, 7.11, -5.7, 3.76)
pt3dadd(14.41, 7.07, -5.7, 3.76)
pt3dadd(14.38, 6.99, -5.7, 3.76)
pt3dadd(14.34, 6.91, -5.7, 3.76)
pt3dadd(14.31, 6.84, -5.7, 3.76)
pt3dadd(14.23, 6.76, -5.7, 3.76)
pt3dadd(14.2, 6.64, -5.7, 3.76)
pt3dadd(14.16, 6.56, -5.7, 3.76)
pt3dadd(14.13, 6.44, -5.7, 3.76)
pt3dadd(14.06, 6.4, -5.7, 3.76)
pt3dadd(14.03, 6.28, -5.7, 3.76)
pt3dadd(13.99, 6.12, -5.7, 3.76)
pt3dadd(13.92, 6, -5.7, 3.76)
pt3dadd(13.89, 5.93, -5.7, 3.76)
pt3dadd(13.85, 5.84, -5.7, 3.76)
pt3dadd(13.78, 5.73, -5.7, 3.76)
pt3dadd(13.71, 5.57, -5.7, 3.76)
pt3dadd(13.68, 5.49, -5.7, 3.76)
pt3dadd(13.61, 5.33, -5.7, 3.76)
pt3dadd(13.51, 5.21, -5.7, 3.76)
pt3dadd(13.47, 5.13, -5.7, 3.76)
pt3dadd(13.44, 5.01, -5.7, 3.76)
pt3dadd(13.36, 4.93, -5.7, 3.76)
pt3dadd(13.33, 4.86, -5.7, 3.76)
pt3dadd(13.3, 4.78, -5.7, 3.76)
pt3dadd(13.12, 4.58, -5.7, 3.76)
pt3dadd(13.09, 4.5, -5.7, 3.76)
pt3dadd(13.02, 4.42, -5.7, 3.76)
pt3dadd(12.98, 4.3, -5.7, 3.76)
pt3dadd(12.91, 4.22, -5.7, 3.76)
pt3dadd(12.88, 4.14, -5.7, 3.76)
pt3dadd(12.84, 4.07, -5.7, 3.76)
pt3dadd(12.81, 3.98, -5.7, 3.76)
pt3dadd(12.77, 3.94, -5.7, 3.76)
pt3dadd(12.7, 3.87, -5.7, 3.76)
pt3dadd(12.67, 3.79, -5.7, 3.76)
pt3dadd(12.56, 3.59, -5.7, 3.76)
pt3dadd(12.49, 3.47, -5.7, 3.76)
pt3dadd(12.43, 3.39, -5.7, 3.76)
pt3dadd(12.35, 3.27, -5.7, 3.76)
pt3dadd(12.28, 3.19, -5.7, 3.76)
pt3dadd(12.25, 3.08, -5.7, 3.76)
pt3dadd(12.18, 2.99, -5.7, 3.76)
pt3dadd(12.15, 2.92, -5.7, 3.76)
pt3dadd(12.07, 2.84, -5.7, 3.76)
pt3dadd(12.01, 2.72, -5.7, 3.76)
pt3dadd(11.94, 2.64, -5.7, 3.76)
pt3dadd(11.9, 2.52, -5.7, 3.76)
pt3dadd(11.83, 2.44, -5.7, 3.76)
pt3dadd(11.76, 2.36, -5.7, 3.76)
pt3dadd(11.69, 2.24, -5.7, 3.76)
pt3dadd(11.62, 2.16, -5.7, 3.76)
pt3dadd(11.59, 2.05, -5.7, 3.76)
pt3dadd(11.52, 1.97, -5.7, 3.76)
pt3dadd(11.45, 1.81, -5.7, 3.76)
pt3dadd(11.38, 1.73, -5.7, 3.76)
pt3dadd(11.31, 1.65, -5.7, 3.76)
pt3dadd(11.27, 1.53, -5.7, 3.76)
pt3dadd(11.24, 1.41, -5.7, 3.76)
pt3dadd(11.17, 1.34, -5.7, 3.76)
pt3dadd(11.06, 1.25, -5.7, 3.76)
pt3dadd(11.03, 1.14, -5.7, 3.76)
pt3dadd(10.96, 1.06, -5.7, 3.76)
pt3dadd(10.93, 0.98, -5.7, 3.76)
pt3dadd(10.86, 0.86, -5.7, 3.76)
pt3dadd(10.82, 0.78, -5.7, 3.76)
pt3dadd(10.72, 0.66, -5.7, 3.76)
pt3dadd(10.65, 0.5, -5.7, 3.76)
pt3dadd(10.61, 0.43, -5.7, 3.76)
pt3dadd(10.54, 0.31, -5.7, 3.76)
pt3dadd(10.51, 0.19, -5.7, 3.76)
pt3dadd(10.44, 0.11, -5.7, 3.76)
pt3dadd(10.37, 0.03, -5.7, 3.76)
pt3dadd(10.3, -0.05, -5.7, 3.76)
pt3dadd(10.27, -0.17, -5.7, 3.76)
pt3dadd(10.23, -0.25, -5.7, 3.76)
pt3dadd(10.16, -0.37, -5.7, 3.76)
pt3dadd(10.09, -0.45, -5.7, 3.76)
pt3dadd(10.06, -0.56, -5.7, 3.76)
pt3dadd(9.98, -0.69, -5.7, 3.76)
pt3dadd(9.91, -0.8, -5.7, 3.76)
pt3dadd(9.88, -0.88, -5.7, 3.76)
pt3dadd(9.81, -0.96, -5.7, 3.76)
pt3dadd(9.78, -1.04, -5.7, 3.76)
pt3dadd(9.74, -1.12, -5.7, 3.76)
pt3dadd(9.71, -1.16, -5.7, 3.76)
pt3dadd(9.6, -1.28, -5.7, 3.76)
pt3dadd(9.57, -1.32, -5.7, 3.76)
pt3dadd(9.46, -1.48, -5.7, 3.76)
pt3dadd(9.43, -1.48, -5.7, 3.76)
pt3dadd(9.46, -1.36, -5.7, 3.76)
pt3dadd(9.5, -1.28, -5.7, 3.76)
pt3dadd(9.67, -1.28, -5.7, 3.76)
pt3dadd(8.21, -2.86, -5.7, 3.76)
pt3dadd(8.42, -2.58, -5.7, 3.76)
pt3dadd(8.38, -2.62, -5.7, 3.76)
pt3dadd(8.31, -2.7, -5.7, 3.76)
pt3dadd(8.28, -2.74, -5.7, 3.76)
pt3dadd(8.24, -2.82, -5.7, 3.76)
pt3dadd(8.18, -2.86, -5.7, 3.76)
pt3dadd(8.14, -2.94, -5.7, 3.76)
pt3dadd(8.1, -3.06, -5.7, 3.76)
pt3dadd(8.03, -3.1, -5.7, 3.76)
pt3dadd(7.97, -3.18, -5.7, 3.76)
pt3dadd(7.93, -3.26, -5.7, 3.76)
pt3dadd(7.86, -3.38, -5.7, 3.76)
pt3dadd(7.79, -3.45, -5.7, 3.76)
pt3dadd(7.76, -3.49, -5.7, 3.76)
pt3dadd(7.72, -3.57, -5.7, 3.76)
pt3dadd(7.68, -3.65, -5.7, 3.76)
pt3dadd(7.62, -3.73, -5.7, 3.76)
pt3dadd(7.58, -3.77, -5.7, 3.76)
pt3dadd(7.55, -3.85, -5.7, 3.76)
pt3dadd(7.48, -3.97, -5.7, 3.76)
pt3dadd(7.44, -4.01, -5.7, 3.76)
pt3dadd(7.37, -4.09, -5.7, 3.76)
pt3dadd(7.34, -4.13, -5.7, 3.76)
pt3dadd(7.3, -4.2, -5.7, 3.76)
pt3dadd(7.2, -4.32, -5.7, 3.76)
pt3dadd(7.16, -4.36, -5.7, 3.76)
pt3dadd(6.92, -4.64, -5.7, 3.76)
pt3dadd(6.85, -4.72, -5.7, 3.76)
pt3dadd(6.82, -4.76, -5.7, 3.76)
pt3dadd(6.78, -4.84, -5.7, 3.76)
pt3dadd(6.71, -4.88, -5.7, 3.76)
pt3dadd(6.64, -4.96, -5.7, 3.76)
pt3dadd(6.36, -5.28, -5.7, 3.76)
pt3dadd(6.33, -5.31, -5.7, 3.76)
pt3dadd(6.26, -5.35, -5.7, 3.76)
pt3dadd(6.22, -5.39, -5.7, 3.76)
pt3dadd(6.19, -5.47, -5.7, 3.76)
pt3dadd(6.15, -5.51, -5.7, 3.76)
pt3dadd(6.08, -5.55, -5.7, 3.76)
pt3dadd(6.01, -5.59, -5.7, 3.76)
pt3dadd(5.95, -5.67, -5.7, 3.76)
pt3dadd(5.84, -5.75, -5.7, 3.76)
pt3dadd(5.77, -5.79, -5.7, 3.76)
pt3dadd(5.66, -5.87, -5.7, 3.76)
pt3dadd(5.63, -5.95, -5.7, 3.76)
pt3dadd(5.56, -5.99, -5.7, 3.76)
pt3dadd(5.49, -6.03, -5.7, 3.76)
pt3dadd(5.42, -6.11, -5.7, 3.76)
pt3dadd(5.32, -6.18, -5.7, 3.76)
pt3dadd(5.21, -6.3, -5.7, 3.76)
pt3dadd(5.07, -6.42, -5.7, 3.76)
pt3dadd(5, -6.46, -5.7, 3.76)
pt3dadd(4.93, -6.5, -5.7, 3.76)
pt3dadd(4.9, -6.54, -5.7, 3.76)
pt3dadd(4.83, -6.58, -5.7, 3.76)
pt3dadd(4.8, -6.66, -5.7, 3.76)
pt3dadd(4.72, -6.7, -5.7, 3.76)
pt3dadd(4.66, -6.78, -5.7, 3.76)
pt3dadd(4.62, -6.82, -5.7, 3.76)
pt3dadd(4.51, -6.89, -5.7, 3.76)
pt3dadd(4.45, -6.93, -5.7, 3.76)
pt3dadd(4.38, -7.01, -5.7, 3.76)
pt3dadd(4.34, -7.05, -5.7, 3.76)
pt3dadd(4.27, -7.09, -5.7, 3.76)
pt3dadd(4.17, -7.17, -5.7, 3.76)
pt3dadd(4.13, -7.25, -5.7, 3.76)
pt3dadd(4.06, -7.29, -5.7, 3.76)
pt3dadd(3.99, -7.37, -5.7, 3.76)
pt3dadd(3.86, -7.49, -5.7, 3.76)
pt3dadd(3.79, -7.57, -5.7, 3.76)
pt3dadd(3.71, -7.65, -5.7, 3.76)
}
}
proc shape3d_137() {
dend[95] { pt3dadd(3.68, -7.73, -5.7, 3.76)
pt3dadd(3.61, -7.81, -5.7, 3.76)
pt3dadd(3.51, -7.89, -5.7, 3.76)
pt3dadd(3.47, -7.97, -5.7, 3.76)
pt3dadd(3.4, -8.04, -5.7, 3.76)
pt3dadd(3.33, -8.16, -5.7, 3.76)
pt3dadd(3.26, -8.24, -5.7, 3.76)
pt3dadd(3.19, -8.36, -5.7, 3.76)
pt3dadd(3.09, -8.48, -5.7, 3.76)
pt3dadd(3.02, -8.56, -5.7, 3.76)
pt3dadd(2.95, -8.68, -5.7, 3.76)
pt3dadd(2.88, -8.72, -5.7, 3.76)
pt3dadd(2.78, -8.88, -5.7, 3.76)
pt3dadd(2.6, -9.07, -5.7, 3.76)
pt3dadd(2.57, -9.11, -5.7, 3.76)
pt3dadd(2.49, -9.19, -5.7, 3.76)
pt3dadd(2.42, -9.31, -5.7, 3.76)
pt3dadd(2.39, -9.35, -5.7, 3.76)
pt3dadd(2.36, -9.43, -5.7, 3.76)
pt3dadd(2.29, -9.51, -5.7, 3.76)
pt3dadd(2.25, -9.55, -5.7, 3.76)
pt3dadd(2.18, -9.63, -5.7, 3.76)
pt3dadd(2.15, -9.66, -5.7, 3.76)
pt3dadd(2.11, -9.74, -5.7, 3.76)
pt3dadd(2.01, -9.82, -5.7, 3.76)
pt3dadd(1.94, -9.9, -5.7, 3.76)
pt3dadd(1.9, -9.98, -5.7, 3.76)
pt3dadd(1.83, -10.02, -5.7, 3.76)
pt3dadd(1.76, -10.14, -5.7, 3.76)
pt3dadd(1.73, -10.18, -5.7, 3.76)
pt3dadd(1.59, -10.34, -5.7, 3.76)
pt3dadd(1.52, -10.46, -5.7, 3.76)
pt3dadd(1.45, -10.5, -5.7, 3.76)
pt3dadd(1.41, -10.57, -5.7, 3.76)
pt3dadd(1.38, -10.65, -5.7, 3.76)
pt3dadd(1.21, -10.85, -5.7, 3.76)
pt3dadd(1.14, -10.93, -5.7, 3.76)
pt3dadd(1.07, -11.01, -5.7, 3.76)
pt3dadd(1, -11.09, -5.7, 3.76)
pt3dadd(0.93, -11.17, -5.7, 3.76)
pt3dadd(0.86, -11.25, -5.7, 3.76)
pt3dadd(0.79, -11.37, -5.7, 3.76)
pt3dadd(0.72, -11.45, -5.7, 3.76)
pt3dadd(0.62, -11.56, -5.7, 3.76)
pt3dadd(0.58, -11.65, -5.7, 3.76)
pt3dadd(0.51, -11.72, -5.7, 3.76)
pt3dadd(0.37, -11.88, -5.7, 3.76)
pt3dadd(0.34, -11.96, -5.7, 3.76)
pt3dadd(0.26, -12.08, -5.7, 3.76)
pt3dadd(0.23, -12.16, -5.7, 3.76)
pt3dadd(0.19, -12.24, -5.7, 3.76)
pt3dadd(0.13, -12.32, -5.7, 3.76)
pt3dadd(0.09, -12.4, -5.7, 3.76)
pt3dadd(0.06, -12.48, -5.7, 3.76)
pt3dadd(-0.05, -12.6, -5.7, 3.76)
pt3dadd(-0.08, -12.67, -5.7, 3.76)
pt3dadd(-0.12, -12.75, -5.7, 3.76)
pt3dadd(-0.19, -12.91, -5.7, 3.76)
pt3dadd(-0.26, -13.03, -5.7, 3.76)
pt3dadd(-0.33, -13.19, -5.7, 3.76)
pt3dadd(-0.43, -13.35, -5.7, 3.76)
pt3dadd(-0.47, -13.43, -5.7, 3.76)
pt3dadd(-0.54, -13.55, -5.7, 3.76)
pt3dadd(-0.57, -13.62, -5.7, 3.76)
pt3dadd(-0.61, -13.74, -5.7, 3.76)
pt3dadd(-0.64, -13.82, -5.7, 3.76)
pt3dadd(-0.68, -13.86, -5.7, 3.76)
pt3dadd(-0.75, -13.94, -5.7, 3.76)
pt3dadd(-0.78, -14.02, -5.7, 3.76)
pt3dadd(-0.81, -14.06, -5.7, 3.76)
pt3dadd(-0.85, -14.1, -5.7, 3.76)
pt3dadd(-0.88, -14.18, -5.7, 3.76)
pt3dadd(-0.92, -14.22, -5.7, 3.76)
pt3dadd(-0.99, -14.34, -5.7, 3.76)
pt3dadd(-1.02, -14.41, -5.7, 3.76)
pt3dadd(-1.09, -14.53, -5.7, 3.76)
pt3dadd(-1.16, -14.57, -5.7, 3.76)
pt3dadd(-1.2, -14.65, -5.7, 3.76)
pt3dadd(-1.23, -14.69, -5.7, 3.76)
pt3dadd(-1.27, -14.73, -5.7, 3.76)
pt3dadd(-1.3, -14.77, -5.7, 3.76)
pt3dadd(-1.34, -14.73, -5.7, 3.76)
pt3dadd(-1.34, -14.57, -5.7, 3.76)
pt3dadd(-1.27, -14.45, -5.7, 3.76)
pt3dadd(-1.23, -14.41, -5.7, 3.76)
pt3dadd(-1.16, -14.26, -5.7, 3.76)
pt3dadd(-1.27, -14.61, -4.7, 3.76)
pt3dadd(-1.3, -14.65, -4.7, 3.76)
pt3dadd(-1.51, -14.89, -4.7, 3.76)
pt3dadd(-1.54, -14.93, -4.7, 3.76)
pt3dadd(-1.62, -14.97, -4.7, 3.76)
pt3dadd(-1.65, -15.05, -4.7, 3.76)
pt3dadd(-1.68, -15.13, -4.7, 3.76)
pt3dadd(-1.72, -15.2, -4.7, 3.76)
pt3dadd(-1.79, -15.24, -4.7, 3.76)
pt3dadd(-1.83, -15.32, -4.7, 3.76)
pt3dadd(-1.93, -15.44, -4.7, 3.76)
pt3dadd(-1.97, -15.52, -4.7, 3.76)
pt3dadd(-2.03, -15.56, -4.7, 3.76)
pt3dadd(-2.1, -15.64, -4.7, 3.76)
pt3dadd(-2.17, -15.76, -4.7, 3.76)
pt3dadd(-2.24, -15.84, -4.7, 3.76)
pt3dadd(-2.31, -15.92, -4.7, 3.76)
pt3dadd(-2.38, -16, -4.7, 3.76)
pt3dadd(-2.42, -16.08, -4.7, 3.76)
pt3dadd(-2.8, -16.51, -4.7, 3.76)
pt3dadd(-2.87, -16.59, -4.7, 3.76)
pt3dadd(-3.08, -16.83, -4.7, 3.76)
pt3dadd(-3.18, -16.95, -4.7, 3.76)
pt3dadd(-3.29, -17.07, -4.7, 3.76)
pt3dadd(-3.46, -17.23, -4.7, 3.76)
pt3dadd(-3.53, -17.34, -4.7, 3.76)
pt3dadd(-3.63, -17.42, -4.7, 3.76)
pt3dadd(-3.78, -17.54, -4.7, 3.76)
pt3dadd(-3.88, -17.66, -4.7, 3.76)
pt3dadd(-3.98, -17.78, -4.7, 3.76)
pt3dadd(-4.09, -17.9, -4.7, 3.76)
pt3dadd(-4.19, -17.98, -4.7, 3.76)
pt3dadd(-4.37, -18.14, -4.7, 3.76)
pt3dadd(-4.47, -18.25, -4.7, 3.76)
pt3dadd(-4.54, -18.33, -4.7, 3.76)
pt3dadd(-4.65, -18.45, -4.7, 3.76)
pt3dadd(-4.86, -18.69, -4.7, 3.76)
pt3dadd(-4.96, -18.81, -4.7, 3.76)
pt3dadd(-5.07, -18.92, -4.7, 3.76)
pt3dadd(-5.17, -19.05, -4.7, 3.76)
pt3dadd(-5.24, -19.12, -4.7, 3.76)
pt3dadd(-5.31, -19.2, -4.7, 3.76)
pt3dadd(-5.41, -19.32, -4.7, 3.76)
pt3dadd(-5.48, -19.44, -4.7, 3.76)
pt3dadd(-5.69, -19.68, -4.7, 3.76)
pt3dadd(-5.8, -19.76, -4.7, 3.76)
pt3dadd(-5.93, -19.95, -4.7, 3.76)
pt3dadd(-6.04, -20.11, -4.7, 3.76)
pt3dadd(-6.11, -20.19, -4.7, 3.76)
pt3dadd(-6.22, -20.35, -4.7, 3.76)
pt3dadd(-6.28, -20.47, -4.7, 3.76)
pt3dadd(-6.35, -20.59, -4.7, 3.76)
pt3dadd(-6.42, -20.7, -4.7, 3.76)
pt3dadd(-6.49, -20.78, -4.7, 3.76)
pt3dadd(-6.56, -20.86, -4.7, 3.76)
pt3dadd(-6.6, -20.94, -4.7, 3.76)
pt3dadd(-6.67, -21.02, -4.7, 3.76)
pt3dadd(-6.74, -21.1, -4.7, 3.76)
pt3dadd(-6.77, -21.22, -4.7, 3.76)
pt3dadd(-6.84, -21.26, -4.7, 3.76)
pt3dadd(-6.88, -21.34, -4.7, 3.76)
pt3dadd(-6.95, -21.38, -4.7, 3.76)
pt3dadd(-7.01, -21.5, -4.7, 3.76)
pt3dadd(-7.05, -21.58, -4.7, 3.76)
pt3dadd(-7.12, -21.66, -4.7, 3.76)
pt3dadd(-7.22, -21.82, -4.7, 3.76)
pt3dadd(-7.26, -21.85, -4.7, 3.76)
pt3dadd(-7.33, -21.93, -4.7, 3.76)
pt3dadd(-7.36, -22.01, -4.7, 3.76)
pt3dadd(-7.4, -22.09, -4.7, 3.76)
pt3dadd(-7.47, -22.13, -4.7, 3.76)
pt3dadd(-7.5, -22.21, -4.7, 3.76)
pt3dadd(-7.57, -22.25, -4.7, 3.76)
pt3dadd(-7.61, -22.33, -4.7, 3.76)
pt3dadd(-7.64, -22.37, -4.7, 3.76)
pt3dadd(-7.68, -22.41, -4.7, 3.76)
pt3dadd(-7.78, -22.6, -4.7, 3.76)
pt3dadd(-7.82, -22.65, -4.7, 3.76)
pt3dadd(-7.85, -22.68, -4.7, 3.76)
pt3dadd(-7.92, -22.76, -4.7, 3.76)
pt3dadd(-8.02, -22.84, -4.7, 3.76)
pt3dadd(-8.06, -22.92, -4.7, 3.76)
pt3dadd(-8.1, -22.96, -4.7, 3.76)
pt3dadd(-8.16, -23.04, -4.7, 3.76)
pt3dadd(-8.2, -23.08, -4.7, 3.76)
pt3dadd(-8.23, -23.12, -4.7, 3.76)
pt3dadd(-8.65, -23.59, -4.7, 3.76)
pt3dadd(-8.72, -23.67, -4.7, 3.76)
pt3dadd(-8.83, -23.83, -4.7, 3.76)
pt3dadd(-8.9, -23.87, -4.7, 3.76)
pt3dadd(-8.97, -23.95, -4.7, 3.76)
pt3dadd(-9.03, -23.99, -4.7, 3.76)
pt3dadd(-9.1, -24.03, -4.7, 3.76)
pt3dadd(-9.14, -24.07, -4.7, 3.76)
pt3dadd(-9.18, -24.11, -4.7, 3.76)
pt3dadd(-9.24, -24.15, -4.7, 3.76)
pt3dadd(-9.28, -24.19, -4.7, 3.76)
pt3dadd(-9.31, -24.23, -4.7, 3.76)
pt3dadd(-9.35, -24.31, -4.7, 3.76)
pt3dadd(-9.42, -24.31, -4.7, 3.76)
pt3dadd(-9.42, -24.23, -4.7, 3.76)
pt3dadd(-9.39, -24.11, -4.7, 3.76)
pt3dadd(-9.31, -24.03, -4.7, 3.76)
pt3dadd(-9.21, -24.19, -3.7, 3.76)
pt3dadd(-9.28, -24.19, -3.7, 3.76)
pt3dadd(-9.14, -23.95, -3.7, 3.76)
pt3dadd(-10.26, -25.22, -3.7, 3.76)
pt3dadd(-10.01, -24.7, -3.7, 3.76)
pt3dadd(-10.05, -24.74, -3.7, 3.76)
pt3dadd(-10.08, -24.78, -3.7, 3.76)
pt3dadd(-10.11, -24.82, -3.7, 3.76)
pt3dadd(-10.15, -24.86, -3.7, 3.76)
pt3dadd(-10.19, -24.9, -3.7, 3.76)
pt3dadd(-10.26, -24.98, -3.7, 3.76)
}
}
proc shape3d_138() {
dend[95] { pt3dadd(-10.29, -25.06, -3.7, 3.76)
pt3dadd(-10.32, -25.18, -3.7, 3.76)
pt3dadd(-10.36, -25.26, -3.7, 3.76)
pt3dadd(-10.4, -25.33, -3.7, 3.76)
pt3dadd(-10.43, -25.38, -3.7, 3.76)
pt3dadd(-10.47, -25.42, -3.7, 3.76)
pt3dadd(-10.47, -25.5, -3.7, 3.76)
pt3dadd(-10.5, -25.53, -3.7, 3.76)
pt3dadd(-10.53, -25.61, -3.7, 3.76)
pt3dadd(-10.53, -25.69, -3.7, 3.76)
pt3dadd(-10.57, -25.77, -3.7, 3.76)
pt3dadd(-10.57, -25.85, -3.7, 3.76)
pt3dadd(-10.6, -25.89, -3.7, 3.76)
pt3dadd(-10.6, -25.97, -3.7, 3.76)
pt3dadd(-10.64, -26.05, -3.7, 3.76)
pt3dadd(-10.64, -26.13, -3.7, 3.76)
pt3dadd(-10.67, -26.25, -3.7, 3.76)
pt3dadd(-10.71, -26.33, -3.7, 3.76)
pt3dadd(-10.71, -26.41, -3.7, 3.76)
pt3dadd(-10.74, -26.48, -3.7, 3.76)
pt3dadd(-10.78, -26.56, -3.7, 3.76)
pt3dadd(-10.81, -26.64, -3.7, 3.76)
pt3dadd(-10.81, -26.72, -3.7, 3.76)
pt3dadd(-10.85, -26.8, -3.7, 3.76)
pt3dadd(-10.88, -26.88, -3.7, 3.76)
pt3dadd(-10.92, -26.92, -3.7, 3.76)
pt3dadd(-10.95, -27, -3.7, 3.76)
pt3dadd(-10.99, -27.08, -3.7, 3.76)
pt3dadd(-10.99, -27.16, -3.7, 3.76)
pt3dadd(-11.02, -27.24, -3.7, 3.76)
pt3dadd(-11.06, -27.27, -3.7, 3.76)
pt3dadd(-11.09, -27.35, -3.7, 3.76)
pt3dadd(-11.13, -27.39, -3.7, 3.76)
pt3dadd(-11.16, -27.47, -3.7, 3.76)
pt3dadd(-11.23, -27.51, -3.7, 3.76)
pt3dadd(-11.23, -27.59, -3.7, 3.76)
pt3dadd(-11.3, -27.67, -3.7, 3.76)
pt3dadd(-11.34, -27.75, -3.7, 3.76)
pt3dadd(-11.4, -27.87, -3.7, 3.76)
pt3dadd(-11.48, -27.95, -3.7, 3.76)
pt3dadd(-11.51, -28.03, -3.7, 3.76)
pt3dadd(-11.55, -28.1, -3.7, 3.76)
pt3dadd(-11.61, -28.15, -3.7, 3.76)
pt3dadd(-11.65, -28.23, -3.7, 3.76)
pt3dadd(-11.69, -28.3, -3.7, 3.76)
pt3dadd(-11.82, -28.46, -3.7, 3.76)
pt3dadd(-11.86, -28.5, -3.7, 3.76)
pt3dadd(-11.89, -28.58, -3.7, 3.76)
pt3dadd(-12.03, -28.74, -3.7, 3.76)
pt3dadd(-12.1, -28.82, -3.7, 3.76)
pt3dadd(-12.14, -28.9, -3.7, 3.76)
pt3dadd(-12.21, -28.98, -3.7, 3.76)
pt3dadd(-12.27, -29.14, -3.7, 3.76)
pt3dadd(-12.31, -29.25, -3.7, 3.76)
pt3dadd(-12.38, -29.33, -3.7, 3.76)
pt3dadd(-12.45, -29.41, -3.7, 3.76)
pt3dadd(-12.48, -29.49, -3.7, 3.76)
pt3dadd(-12.52, -29.61, -3.7, 3.76)
pt3dadd(-12.56, -29.69, -3.7, 3.76)
pt3dadd(-12.59, -29.73, -3.7, 3.76)
pt3dadd(-12.69, -29.89, -3.7, 3.76)
pt3dadd(-12.73, -29.97, -3.7, 3.76)
pt3dadd(-12.77, -30, -3.7, 3.76)
pt3dadd(-12.83, -30.08, -3.7, 3.76)
pt3dadd(-12.87, -30.16, -3.7, 3.76)
pt3dadd(-12.9, -30.28, -3.7, 3.76)
pt3dadd(-12.97, -30.36, -3.7, 3.76)
pt3dadd(-12.97, -30.44, -3.7, 3.76)
pt3dadd(-13.04, -30.52, -3.7, 3.76)
pt3dadd(-13.11, -30.6, -3.7, 3.76)
pt3dadd(-13.15, -30.72, -3.7, 3.76)
pt3dadd(-13.18, -30.8, -3.7, 3.76)
pt3dadd(-13.22, -30.83, -3.7, 3.76)
pt3dadd(-13.32, -31, -3.7, 3.76)
pt3dadd(-13.35, -31.07, -3.7, 3.76)
pt3dadd(-13.39, -31.15, -3.7, 3.76)
pt3dadd(-13.43, -31.19, -3.7, 3.76)
pt3dadd(-13.46, -31.23, -3.7, 3.76)
pt3dadd(-13.53, -31.27, -3.7, 3.76)
pt3dadd(-13.6, -31.31, -3.7, 3.76)
pt3dadd(-13.64, -31.35, -3.7, 3.76)
pt3dadd(-13.67, -31.39, -3.7, 3.76)
pt3dadd(-13.7, -31.43, -3.7, 3.76)
pt3dadd(-13.74, -31.47, -3.7, 3.76)
pt3dadd(-13.77, -31.51, -3.7, 3.76)
pt3dadd(-13.85, -31.55, -3.7, 3.76)
pt3dadd(-13.85, -31.63, -3.7, 3.76)
pt3dadd(-13.91, -31.71, -3.7, 3.76)
pt3dadd(-13.98, -31.78, -3.7, 3.76)
pt3dadd(-14.02, -31.86, -3.7, 3.76)
pt3dadd(-14.05, -31.91, -3.7, 3.76)
pt3dadd(-14.12, -32.02, -3.7, 3.76)
pt3dadd(-14.16, -32.1, -3.7, 3.76)
pt3dadd(-14.19, -32.14, -3.7, 3.76)
pt3dadd(-14.23, -32.22, -3.7, 3.76)
pt3dadd(-14.3, -32.26, -3.7, 3.76)
pt3dadd(-14.33, -32.34, -3.7, 3.76)
pt3dadd(-14.37, -32.42, -3.7, 3.76)
pt3dadd(-14.4, -32.5, -3.7, 3.76)
pt3dadd(-14.44, -32.58, -3.7, 3.76)
pt3dadd(-14.47, -32.69, -3.7, 3.76)
pt3dadd(-14.51, -32.78, -3.7, 3.76)
pt3dadd(-14.57, -32.85, -3.7, 3.76)
pt3dadd(-14.61, -32.97, -3.7, 3.76)
pt3dadd(-14.68, -33.09, -3.7, 3.76)
pt3dadd(-14.72, -33.17, -3.7, 3.76)
pt3dadd(-14.75, -33.29, -3.7, 3.76)
pt3dadd(-14.78, -33.41, -3.7, 3.76)
pt3dadd(-14.82, -33.49, -3.7, 3.76)
pt3dadd(-14.82, -33.56, -3.7, 3.76)
pt3dadd(-14.85, -33.69, -3.7, 3.76)
pt3dadd(-14.89, -33.76, -3.7, 3.76)
pt3dadd(-14.93, -33.84, -3.7, 3.76)
pt3dadd(-14.96, -33.96, -3.7, 3.76)
pt3dadd(-14.96, -34.04, -3.7, 3.76)
pt3dadd(-14.99, -34.16, -3.7, 3.76)
pt3dadd(-15.03, -34.28, -3.7, 3.76)
pt3dadd(-15.06, -34.36, -3.7, 3.76)
pt3dadd(-15.1, -34.47, -3.7, 3.76)
pt3dadd(-15.13, -34.56, -3.7, 3.76)
pt3dadd(-15.17, -34.71, -3.7, 3.76)
pt3dadd(-15.2, -34.83, -3.7, 3.76)
pt3dadd(-15.2, -34.99, -3.7, 3.76)
pt3dadd(-15.24, -35.11, -3.7, 3.76)
pt3dadd(-15.27, -35.23, -3.7, 3.76)
pt3dadd(-15.31, -35.27, -3.7, 3.76)
pt3dadd(-15.34, -35.38, -3.7, 3.76)
pt3dadd(-15.34, -35.51, -3.7, 3.76)
pt3dadd(-15.38, -35.58, -3.7, 3.76)
pt3dadd(-15.45, -35.74, -3.7, 3.76)
pt3dadd(-15.48, -35.78, -3.7, 3.76)
pt3dadd(-15.48, -35.86, -3.7, 3.76)
pt3dadd(-15.52, -35.94, -3.7, 3.76)
pt3dadd(-15.59, -36.02, -3.7, 3.76)
pt3dadd(-15.62, -36.1, -3.7, 3.76)
pt3dadd(-15.59, -36.14, -3.7, 3.76)
pt3dadd(-15.55, -36.1, -3.7, 3.76)
pt3dadd(-15.55, -36.06, -3.7, 3.76)
pt3dadd(-15.55, -35.94, -3.7, 3.76)
pt3dadd(-15.59, -35.98, -3.7, 3.76)
pt3dadd(-15.62, -36.06, -3.7, 3.76)
pt3dadd(-15.69, -36.18, -3.7, 3.76)
pt3dadd(-15.73, -36.3, -3.7, 3.76)
pt3dadd(-15.76, -36.38, -3.7, 3.76)
pt3dadd(-15.8, -36.42, -3.7, 3.76)
pt3dadd(-15.86, -36.53, -3.7, 3.76)
pt3dadd(-15.86, -36.61, -3.7, 3.76)
pt3dadd(-15.94, -36.69, -3.7, 3.76)
pt3dadd(-16, -36.81, -3.7, 3.76)
pt3dadd(-16.04, -36.89, -3.7, 3.76)
pt3dadd(-16.11, -37.01, -3.7, 3.76)
pt3dadd(-16.11, -37.09, -3.7, 3.76)
pt3dadd(-16.18, -37.17, -3.7, 3.76)
pt3dadd(-16.21, -37.33, -3.7, 3.76)
pt3dadd(-16.28, -37.4, -3.7, 3.76)
pt3dadd(-16.32, -37.48, -3.7, 3.76)
pt3dadd(-16.35, -37.6, -3.7, 3.76)
pt3dadd(-16.42, -37.72, -3.7, 3.76)
pt3dadd(-16.46, -37.8, -3.7, 3.76)
pt3dadd(-16.49, -37.88, -3.7, 3.76)
pt3dadd(-16.56, -37.96, -3.7, 3.76)
pt3dadd(-16.67, -38.15, -3.7, 3.76)
pt3dadd(-16.74, -38.28, -3.7, 3.76)
pt3dadd(-16.74, -38.39, -3.7, 3.76)
pt3dadd(-16.81, -38.47, -3.7, 3.76)
pt3dadd(-16.84, -38.59, -3.7, 3.76)
pt3dadd(-16.91, -38.71, -3.7, 3.76)
pt3dadd(-16.98, -38.91, -3.7, 3.76)
pt3dadd(-17.05, -39.03, -3.7, 3.76)
pt3dadd(-17.05, -39.19, -3.7, 3.76)
pt3dadd(-17.12, -39.26, -3.7, 3.76)
pt3dadd(-17.19, -39.42, -3.7, 3.76)
pt3dadd(-17.22, -39.54, -3.7, 3.76)
pt3dadd(-17.29, -39.66, -3.7, 3.76)
pt3dadd(-17.33, -39.78, -3.7, 3.76)
pt3dadd(-17.36, -39.86, -3.7, 3.76)
pt3dadd(-17.4, -39.98, -3.7, 3.76)
pt3dadd(-17.47, -40.1, -3.7, 3.76)
pt3dadd(-17.47, -40.17, -3.7, 3.76)
pt3dadd(-17.54, -40.33, -3.7, 3.76)
pt3dadd(-17.57, -40.45, -3.7, 3.76)
pt3dadd(-17.61, -40.57, -3.7, 3.76)
pt3dadd(-17.64, -40.69, -3.7, 3.76)
pt3dadd(-17.67, -40.77, -3.7, 3.76)
pt3dadd(-17.71, -40.92, -3.7, 3.76)
pt3dadd(-17.75, -41.01, -3.7, 3.76)
pt3dadd(-17.78, -41.16, -3.7, 3.76)
pt3dadd(-17.78, -41.28, -3.7, 3.76)
pt3dadd(-17.85, -41.4, -3.7, 3.76)
pt3dadd(-17.85, -41.52, -3.7, 3.76)
pt3dadd(-17.89, -41.64, -3.7, 3.76)
pt3dadd(-17.92, -41.88, -3.7, 3.76)
pt3dadd(-17.95, -41.96, -3.7, 3.76)
pt3dadd(-17.99, -42.11, -3.7, 3.76)
pt3dadd(-18.02, -42.23, -3.7, 3.76)
pt3dadd(-18.02, -42.35, -3.7, 3.76)
pt3dadd(-18.06, -42.47, -3.7, 3.76)
pt3dadd(-18.09, -42.55, -3.7, 3.76)
pt3dadd(-18.09, -42.63, -3.7, 3.76)
pt3dadd(-18.13, -42.78, -3.7, 3.76)
}
}
proc shape3d_139() {
dend[95] { pt3dadd(-18.17, -42.87, -3.7, 3.76)
pt3dadd(-18.2, -42.98, -3.7, 3.76)
pt3dadd(-18.23, -43.02, -3.7, 3.76)
pt3dadd(-18.27, -43.14, -3.7, 3.76)
pt3dadd(-18.3, -43.26, -3.7, 3.76)
pt3dadd(-18.3, -43.34, -3.7, 3.76)
pt3dadd(-18.34, -43.42, -3.7, 3.76)
pt3dadd(-18.37, -43.58, -3.7, 3.76)
pt3dadd(-18.41, -43.69, -3.7, 3.76)
pt3dadd(-18.44, -43.78, -3.7, 3.76)
pt3dadd(-18.48, -43.89, -3.7, 3.76)
pt3dadd(-18.51, -44.01, -3.7, 3.76)
pt3dadd(-18.51, -44.13, -3.7, 3.76)
pt3dadd(-18.55, -44.29, -3.7, 3.76)
pt3dadd(-18.58, -44.45, -3.7, 3.76)
pt3dadd(-18.62, -44.49, -3.7, 3.76)
pt3dadd(-18.65, -44.6, -3.7, 3.76)
pt3dadd(-18.65, -44.69, -3.7, 3.76)
pt3dadd(-18.69, -44.76, -3.7, 3.76)
pt3dadd(-18.72, -44.84, -3.7, 3.76)
pt3dadd(-18.75, -44.96, -3.7, 3.76)
pt3dadd(-18.79, -45.04, -3.7, 3.76)
pt3dadd(-18.79, -45.16, -3.7, 3.76)
pt3dadd(-18.83, -45.24, -3.7, 3.76)
pt3dadd(-18.86, -45.32, -3.7, 3.76)
pt3dadd(-18.9, -45.4, -3.7, 3.76)
pt3dadd(-18.9, -45.48, -3.7, 3.76)
pt3dadd(-18.93, -45.56, -3.7, 3.76)
pt3dadd(-18.97, -45.63, -3.7, 3.76)
pt3dadd(-19, -45.72, -3.7, 3.76)
pt3dadd(-19, -45.83, -3.7, 3.76)
pt3dadd(-19, -45.79, -3.7, 3.76)
pt3dadd(-18.93, -45.6, -3.7, 3.76)
pt3dadd(-19, -45.67, -3.7, 3.76)
pt3dadd(-19.03, -45.75, -3.7, 3.76)
pt3dadd(-19.07, -45.79, -3.7, 3.76)
pt3dadd(-19.17, -45.91, -3.7, 3.76)
pt3dadd(-19.21, -45.95, -3.7, 3.76)
pt3dadd(-19.25, -46.03, -3.7, 3.76)
pt3dadd(-19.28, -46.07, -3.7, 3.76)
pt3dadd(-19.31, -46.15, -3.7, 3.76)
pt3dadd(-19.35, -46.23, -3.7, 3.76)
pt3dadd(-19.42, -46.31, -3.7, 3.76)
pt3dadd(-19.45, -46.39, -3.7, 3.76)
pt3dadd(-19.49, -46.47, -3.7, 3.76)
pt3dadd(-19.56, -46.51, -3.7, 3.76)
pt3dadd(-19.59, -46.58, -3.7, 3.76)
pt3dadd(-19.63, -46.66, -3.7, 3.76)
pt3dadd(-19.73, -46.78, -3.7, 3.76)
pt3dadd(-19.77, -46.82, -3.7, 3.76)
pt3dadd(-19.8, -46.9, -3.7, 3.76)
pt3dadd(-19.83, -46.94, -3.7, 3.76)
pt3dadd(-19.87, -47.02, -3.7, 3.76)
pt3dadd(-19.94, -47.1, -3.7, 3.76)
pt3dadd(-19.98, -47.18, -3.7, 3.76)
pt3dadd(-20.01, -47.26, -3.7, 3.76)
pt3dadd(-20.08, -47.33, -3.7, 3.76)
pt3dadd(-20.11, -47.42, -3.7, 3.76)
pt3dadd(-20.15, -47.46, -3.7, 3.76)
pt3dadd(-20.22, -47.61, -3.7, 3.76)
pt3dadd(-20.25, -47.65, -3.7, 3.76)
pt3dadd(-20.33, -47.73, -3.7, 3.76)
pt3dadd(-20.36, -47.81, -3.7, 3.76)
pt3dadd(-20.43, -47.93, -3.7, 3.76)
pt3dadd(-20.46, -48.01, -3.7, 3.76)
pt3dadd(-20.5, -48.09, -3.7, 3.76)
pt3dadd(-20.57, -48.17, -3.7, 3.76)
pt3dadd(-20.6, -48.28, -3.7, 3.76)
pt3dadd(-20.67, -48.4, -3.7, 3.76)
pt3dadd(-20.71, -48.48, -3.7, 3.76)
pt3dadd(-20.74, -48.6, -3.7, 3.76)
pt3dadd(-20.78, -48.64, -3.7, 3.76)
pt3dadd(-20.85, -48.76, -3.7, 3.76)
pt3dadd(-20.92, -48.84, -3.7, 3.76)
pt3dadd(-20.95, -48.92, -3.7, 3.76)
pt3dadd(-20.99, -49, -3.7, 3.76)
pt3dadd(-21.02, -49.04, -3.7, 3.76)
pt3dadd(-21.09, -49.12, -3.7, 3.76)
pt3dadd(-21.13, -49.16, -3.7, 3.76)
pt3dadd(-21.16, -49.19, -3.7, 3.76)
pt3dadd(-21.19, -49.28, -3.7, 3.76)
pt3dadd(-21.26, -49.35, -3.7, 3.76)
pt3dadd(-21.3, -49.43, -3.7, 3.76)
pt3dadd(-21.33, -49.47, -3.7, 3.76)
pt3dadd(-21.41, -49.51, -3.7, 3.76)
pt3dadd(-21.41, -49.59, -3.7, 3.76)
pt3dadd(-21.47, -49.63, -3.7, 3.76)
pt3dadd(-21.51, -49.71, -3.7, 3.76)
pt3dadd(-21.54, -49.79, -3.7, 3.76)
pt3dadd(-21.58, -49.83, -3.7, 3.76)
pt3dadd(-21.65, -49.91, -3.7, 3.76)
pt3dadd(-21.68, -49.95, -3.7, 3.76)
pt3dadd(-21.72, -49.99, -3.7, 3.76)
pt3dadd(-21.75, -50.07, -3.7, 3.76)
pt3dadd(-21.79, -50.1, -3.7, 3.76)
pt3dadd(-21.82, -50.19, -3.7, 3.76)
pt3dadd(-21.86, -50.22, -3.7, 3.76)
pt3dadd(-21.89, -50.31, -3.7, 3.76)
pt3dadd(-21.93, -50.38, -3.7, 3.76)
pt3dadd(-21.96, -50.42, -3.7, 3.76)
pt3dadd(-22.07, -50.66, -3.7, 3.76)
pt3dadd(-22.1, -50.74, -3.7, 3.76)
pt3dadd(-22.14, -50.86, -3.7, 3.76)
pt3dadd(-22.17, -50.94, -3.7, 3.76)
pt3dadd(-22.2, -51.01, -3.7, 3.76)
pt3dadd(-22.24, -51.1, -3.7, 3.76)
pt3dadd(-22.27, -51.22, -3.7, 3.76)
pt3dadd(-22.34, -51.29, -3.7, 3.76)
pt3dadd(-22.38, -51.37, -3.7, 3.76)
pt3dadd(-22.42, -51.49, -3.7, 3.76)
pt3dadd(-22.45, -51.57, -3.7, 3.76)
pt3dadd(-22.49, -51.65, -3.7, 3.76)
pt3dadd(-22.55, -51.73, -3.7, 3.76)
pt3dadd(-22.55, -51.85, -3.7, 3.76)
pt3dadd(-22.59, -51.92, -3.7, 3.76)
pt3dadd(-22.66, -52.01, -3.7, 3.76)
pt3dadd(-22.66, -52.13, -3.7, 3.76)
pt3dadd(-22.73, -52.16, -3.7, 3.76)
pt3dadd(-22.76, -52.28, -3.7, 3.76)
pt3dadd(-22.8, -52.32, -3.7, 3.76)
pt3dadd(-22.83, -52.48, -3.7, 3.76)
pt3dadd(-22.87, -52.56, -3.7, 3.76)
pt3dadd(-22.94, -52.68, -3.7, 3.76)
pt3dadd(-23.01, -52.8, -3.7, 3.76)
pt3dadd(-23.04, -52.88, -3.7, 3.76)
pt3dadd(-23.08, -52.99, -3.7, 3.76)
pt3dadd(-23.11, -53.08, -3.7, 3.76)
pt3dadd(-23.15, -53.15, -3.7, 3.76)
pt3dadd(-23.18, -53.23, -3.7, 3.76)
pt3dadd(-23.25, -53.35, -3.7, 3.76)
pt3dadd(-23.28, -53.47, -3.7, 3.76)
pt3dadd(-23.35, -53.59, -3.7, 3.76)
pt3dadd(-23.39, -53.67, -3.7, 3.76)
pt3dadd(-22.76, -54.01, -3.7, 3.76)
}
dend[96] {pt3dclear()
pt3dadd(-22.76, -54.01, -3.7, 1.36)
pt3dadd(-24.97, -54.21, -14.7, 1.36)
pt3dadd(-26.79, -55.14, -14.7, 2.89)
pt3dadd(-26.83, -55.24, -14.7, 2.89)
pt3dadd(-26.88, -55.29, -14.7, 2.89)
pt3dadd(-26.97, -55.44, -14.7, 2.89)
pt3dadd(-27.01, -55.54, -14.7, 2.89)
pt3dadd(-27.1, -55.6, -14.7, 2.89)
pt3dadd(-27.15, -55.7, -14.7, 2.89)
pt3dadd(-27.19, -55.85, -14.7, 2.89)
pt3dadd(-27.28, -55.9, -14.7, 2.89)
pt3dadd(-27.28, -56, -14.7, 2.89)
pt3dadd(-27.37, -56.05, -14.7, 2.89)
pt3dadd(-27.42, -56.21, -14.7, 2.89)
pt3dadd(-27.46, -56.31, -14.7, 2.89)
pt3dadd(-27.55, -56.41, -14.7, 2.89)
pt3dadd(-27.64, -56.56, -14.7, 2.89)
pt3dadd(-27.77, -56.81, -14.7, 2.89)
pt3dadd(-27.86, -56.91, -14.7, 2.89)
pt3dadd(-27.91, -57.01, -14.7, 2.89)
pt3dadd(-27.95, -57.12, -14.7, 2.89)
pt3dadd(-28.04, -57.27, -14.7, 2.89)
pt3dadd(-28.08, -57.37, -14.7, 2.89)
pt3dadd(-28.13, -57.47, -14.7, 2.89)
pt3dadd(-28.22, -57.52, -14.7, 2.89)
pt3dadd(-28.26, -57.67, -14.7, 2.89)
pt3dadd(-28.31, -57.78, -14.7, 2.89)
pt3dadd(-28.35, -57.83, -14.7, 2.89)
pt3dadd(-28.4, -57.92, -14.7, 2.89)
pt3dadd(-28.44, -57.98, -14.7, 2.89)
pt3dadd(-28.53, -58.08, -14.7, 2.89)
pt3dadd(-28.57, -58.23, -14.7, 2.89)
pt3dadd(-28.62, -58.38, -14.7, 2.89)
pt3dadd(-28.66, -58.48, -14.7, 2.89)
pt3dadd(-28.71, -58.63, -14.7, 2.89)
pt3dadd(-28.75, -58.74, -14.7, 2.89)
pt3dadd(-28.84, -58.84, -14.7, 2.89)
pt3dadd(-28.89, -59.04, -14.7, 2.89)
pt3dadd(-28.93, -59.14, -14.7, 2.89)
pt3dadd(-28.93, -59.24, -14.7, 2.89)
pt3dadd(-28.98, -59.34, -14.7, 2.89)
pt3dadd(-29.02, -59.44, -14.7, 2.89)
pt3dadd(-29.06, -59.54, -14.7, 2.89)
pt3dadd(-29.11, -59.65, -14.7, 2.89)
pt3dadd(-29.11, -59.75, -14.7, 2.89)
pt3dadd(-29.15, -59.85, -14.7, 2.89)
pt3dadd(-29.15, -59.95, -14.7, 2.89)
pt3dadd(-29.2, -60.05, -14.7, 2.89)
pt3dadd(-29.24, -60.21, -14.7, 2.89)
pt3dadd(-29.24, -60.36, -14.7, 2.89)
pt3dadd(-29.28, -60.46, -14.7, 2.89)
pt3dadd(-29.33, -60.56, -14.7, 2.89)
pt3dadd(-29.33, -60.71, -14.7, 2.89)
pt3dadd(-29.38, -60.86, -14.7, 2.89)
pt3dadd(-29.42, -61.01, -14.7, 2.89)
pt3dadd(-29.47, -61.12, -14.7, 2.89)
pt3dadd(-29.47, -61.27, -14.7, 2.89)
pt3dadd(-29.51, -61.42, -14.7, 2.89)
pt3dadd(-29.51, -61.52, -14.7, 2.89)
pt3dadd(-29.55, -61.62, -14.7, 2.89)
pt3dadd(-29.55, -61.78, -14.7, 2.89)
pt3dadd(-29.6, -61.92, -14.7, 2.89)
pt3dadd(-29.64, -62.03, -14.7, 2.89)
pt3dadd(-29.69, -62.13, -14.7, 2.89)
pt3dadd(-29.69, -62.28, -14.7, 2.89)
pt3dadd(-29.73, -62.43, -14.7, 2.89)
}
}
proc shape3d_140() {
dend[96] { pt3dadd(-29.78, -62.58, -14.7, 2.89)
pt3dadd(-29.82, -62.69, -14.7, 2.89)
pt3dadd(-29.82, -62.84, -14.7, 2.89)
pt3dadd(-29.86, -62.99, -14.7, 2.89)
pt3dadd(-29.91, -63.14, -14.7, 2.89)
pt3dadd(-29.95, -63.29, -14.7, 2.89)
pt3dadd(-29.95, -63.4, -14.7, 2.89)
pt3dadd(-30, -63.55, -14.7, 2.89)
pt3dadd(-30.05, -63.7, -14.7, 2.89)
pt3dadd(-30.05, -63.85, -14.7, 2.89)
pt3dadd(-30.09, -64, -14.7, 2.89)
pt3dadd(-30.13, -64.15, -14.7, 2.89)
pt3dadd(-30.18, -64.25, -14.7, 2.89)
pt3dadd(-30.18, -64.36, -14.7, 2.89)
pt3dadd(-30.22, -64.51, -14.7, 2.89)
pt3dadd(-30.27, -64.66, -14.7, 2.89)
pt3dadd(-30.27, -64.81, -14.7, 2.89)
pt3dadd(-30.31, -64.91, -14.7, 2.89)
pt3dadd(-30.35, -65.01, -14.7, 2.89)
pt3dadd(-30.35, -65.17, -14.7, 2.89)
pt3dadd(-30.4, -65.32, -14.7, 2.89)
pt3dadd(-30.44, -65.47, -14.7, 2.89)
pt3dadd(-30.44, -65.57, -14.7, 2.89)
pt3dadd(-30.49, -65.67, -14.7, 2.89)
pt3dadd(-30.49, -65.82, -14.7, 2.89)
pt3dadd(-30.53, -65.93, -14.7, 2.89)
pt3dadd(-30.58, -66.08, -14.7, 2.89)
pt3dadd(-30.58, -66.43, -14.7, 2.89)
pt3dadd(-30.62, -66.58, -14.7, 2.89)
pt3dadd(-30.62, -66.79, -14.7, 2.89)
pt3dadd(-30.67, -66.94, -14.7, 2.89)
pt3dadd(-30.67, -67.19, -14.7, 2.89)
pt3dadd(-30.71, -67.29, -14.7, 2.89)
pt3dadd(-30.71, -67.55, -14.7, 2.89)
pt3dadd(-30.76, -67.65, -14.7, 2.89)
pt3dadd(-30.76, -67.9, -14.7, 2.89)
pt3dadd(-30.8, -67.95, -14.7, 2.89)
pt3dadd(-30.8, -68.15, -14.7, 2.89)
pt3dadd(-30.85, -68.21, -14.7, 2.89)
pt3dadd(-30.85, -68.25, -14.7, 2.89)
pt3dadd(-30.85, -68.11, -16.8, 2.55)
pt3dadd(-30.85, -68.46, -16.8, 2.55)
pt3dadd(-30.89, -68.51, -16.8, 2.55)
pt3dadd(-30.93, -68.66, -16.8, 2.55)
pt3dadd(-30.93, -68.92, -16.8, 2.55)
pt3dadd(-30.98, -69.01, -16.8, 2.55)
pt3dadd(-31.02, -69.12, -16.8, 2.55)
pt3dadd(-31.07, -69.22, -16.8, 2.55)
pt3dadd(-31.07, -69.37, -16.8, 2.55)
pt3dadd(-31.11, -69.42, -16.8, 2.55)
pt3dadd(-31.11, -69.52, -16.8, 2.55)
pt3dadd(-31.16, -69.57, -16.8, 2.55)
pt3dadd(-31.16, -69.67, -16.8, 2.55)
pt3dadd(-31.2, -69.72, -16.8, 2.55)
pt3dadd(-31.2, -69.82, -16.8, 2.55)
pt3dadd(-31.25, -69.88, -16.8, 2.55)
pt3dadd(-31.29, -69.98, -16.8, 2.55)
pt3dadd(-31.34, -70.08, -16.8, 2.55)
pt3dadd(-31.38, -70.18, -16.8, 2.55)
pt3dadd(-31.42, -70.28, -16.8, 2.55)
pt3dadd(-31.42, -70.38, -16.8, 2.55)
pt3dadd(-31.47, -70.43, -16.8, 2.55)
pt3dadd(-31.56, -70.64, -16.8, 2.55)
pt3dadd(-31.6, -70.74, -16.8, 2.55)
pt3dadd(-31.65, -70.84, -16.8, 2.55)
pt3dadd(-31.69, -70.99, -16.8, 2.55)
pt3dadd(-31.74, -71.14, -16.8, 2.55)
pt3dadd(-31.78, -71.24, -16.8, 2.55)
pt3dadd(-31.83, -71.39, -16.8, 2.55)
pt3dadd(-31.87, -71.5, -16.8, 2.55)
pt3dadd(-31.92, -71.6, -16.8, 2.55)
pt3dadd(-31.96, -71.75, -16.8, 2.55)
pt3dadd(-32.01, -71.85, -16.8, 2.55)
pt3dadd(-32.05, -71.95, -16.8, 2.55)
pt3dadd(-32.05, -72.11, -16.8, 2.55)
pt3dadd(-32.1, -72.21, -16.8, 2.55)
pt3dadd(-32.14, -72.31, -16.8, 2.55)
pt3dadd(-32.19, -72.36, -16.8, 2.55)
pt3dadd(-32.27, -72.51, -16.8, 2.55)
pt3dadd(-32.32, -72.66, -16.8, 2.55)
pt3dadd(-32.36, -72.76, -16.8, 2.55)
pt3dadd(-32.41, -72.81, -16.8, 2.55)
pt3dadd(-32.45, -72.92, -16.8, 2.55)
pt3dadd(-32.49, -73.01, -16.8, 2.55)
pt3dadd(-32.54, -73.12, -16.8, 2.55)
pt3dadd(-32.58, -73.22, -16.8, 2.55)
pt3dadd(-32.63, -73.32, -16.8, 2.55)
pt3dadd(-32.72, -73.42, -16.8, 2.55)
pt3dadd(-32.76, -73.47, -16.8, 2.55)
pt3dadd(-32.81, -73.62, -16.8, 2.55)
pt3dadd(-32.85, -73.68, -16.8, 2.55)
pt3dadd(-32.94, -73.78, -16.8, 2.55)
pt3dadd(-32.99, -73.88, -16.8, 2.55)
pt3dadd(-33.03, -73.98, -16.8, 2.55)
pt3dadd(-33.08, -74.08, -16.8, 2.55)
pt3dadd(-33.12, -74.13, -16.8, 2.55)
pt3dadd(-33.17, -74.23, -16.8, 2.55)
pt3dadd(-33.21, -74.28, -16.8, 2.55)
pt3dadd(-33.26, -74.38, -16.8, 2.55)
pt3dadd(-33.34, -74.49, -16.8, 2.55)
pt3dadd(-33.39, -74.58, -16.8, 2.55)
pt3dadd(-33.43, -74.69, -16.8, 2.55)
pt3dadd(-33.48, -74.79, -16.8, 2.55)
pt3dadd(-33.52, -74.89, -16.8, 2.55)
pt3dadd(-33.56, -74.94, -16.8, 2.55)
pt3dadd(-33.61, -74.99, -16.8, 2.55)
pt3dadd(-33.65, -75.09, -16.8, 2.55)
pt3dadd(-33.7, -75.14, -16.8, 2.55)
pt3dadd(-33.74, -75.24, -16.8, 2.55)
pt3dadd(-33.79, -75.29, -16.8, 2.55)
pt3dadd(-33.88, -75.39, -16.8, 2.55)
pt3dadd(-33.92, -75.44, -16.8, 2.55)
pt3dadd(-33.92, -75.55, -16.8, 2.55)
pt3dadd(-34.06, -75.7, -16.8, 2.55)
pt3dadd(-34.1, -75.8, -16.8, 2.55)
pt3dadd(-34.15, -75.85, -16.8, 2.55)
pt3dadd(-34.19, -75.95, -16.8, 2.55)
pt3dadd(-34.28, -76.11, -16.8, 2.55)
pt3dadd(-34.37, -76.21, -16.8, 2.55)
pt3dadd(-34.41, -76.31, -16.8, 2.55)
pt3dadd(-34.46, -76.41, -16.8, 2.55)
pt3dadd(-34.5, -76.51, -16.8, 2.55)
pt3dadd(-34.55, -76.61, -16.8, 2.55)
pt3dadd(-34.63, -76.76, -16.8, 2.55)
pt3dadd(-34.68, -76.86, -16.8, 2.55)
pt3dadd(-34.77, -77.07, -16.8, 2.55)
pt3dadd(-34.81, -77.12, -16.8, 2.55)
pt3dadd(-34.86, -77.27, -16.8, 2.55)
pt3dadd(-34.9, -77.37, -16.8, 2.55)
pt3dadd(-34.95, -77.47, -16.8, 2.55)
pt3dadd(-34.99, -77.57, -16.8, 2.55)
pt3dadd(-35.08, -77.62, -16.8, 2.55)
pt3dadd(-35.13, -77.72, -16.8, 2.55)
pt3dadd(-35.17, -77.78, -16.8, 2.55)
pt3dadd(-35.26, -77.88, -16.8, 2.55)
pt3dadd(-35.26, -77.98, -16.8, 2.55)
pt3dadd(-35.35, -78.03, -16.8, 2.55)
pt3dadd(-35.4, -78.08, -16.8, 2.55)
pt3dadd(-35.44, -78.13, -16.8, 2.55)
pt3dadd(-35.44, -78.03, -16.8, 2.55)
pt3dadd(-35.22, -77.72, -19.95, 2.55)
pt3dadd(-35.22, -77.82, -19.95, 2.55)
pt3dadd(-35.26, -77.88, -19.95, 2.55)
pt3dadd(-35.31, -77.98, -19.95, 2.55)
pt3dadd(-35.35, -78.08, -19.95, 2.55)
pt3dadd(-35.4, -78.18, -19.95, 2.55)
pt3dadd(-35.44, -78.23, -19.95, 2.55)
pt3dadd(-35.48, -78.28, -19.95, 2.55)
pt3dadd(-35.48, -78.38, -19.95, 2.55)
pt3dadd(-35.53, -78.43, -19.95, 2.55)
pt3dadd(-35.57, -78.54, -19.95, 2.55)
pt3dadd(-35.62, -78.64, -19.95, 2.55)
pt3dadd(-35.66, -78.79, -19.95, 2.55)
pt3dadd(-35.75, -78.94, -19.95, 2.55)
pt3dadd(-35.79, -79.04, -19.95, 2.55)
pt3dadd(-35.88, -79.14, -19.95, 2.55)
pt3dadd(-35.88, -79.25, -19.95, 2.55)
pt3dadd(-35.97, -79.35, -19.95, 2.55)
pt3dadd(-36.02, -79.5, -19.95, 2.55)
pt3dadd(-36.06, -79.6, -19.95, 2.55)
pt3dadd(-36.11, -79.75, -19.95, 2.55)
pt3dadd(-36.2, -79.85, -19.95, 2.55)
pt3dadd(-36.24, -79.95, -19.95, 2.55)
pt3dadd(-36.24, -80.06, -19.95, 2.55)
pt3dadd(-36.33, -80.15, -19.95, 2.55)
pt3dadd(-36.42, -80.26, -19.95, 2.55)
pt3dadd(-36.47, -80.41, -19.95, 2.55)
pt3dadd(-36.51, -80.51, -19.95, 2.55)
pt3dadd(-36.6, -80.66, -19.95, 2.55)
pt3dadd(-36.69, -80.81, -19.95, 2.55)
pt3dadd(-36.73, -80.92, -19.95, 2.55)
pt3dadd(-36.78, -81.01, -19.95, 2.55)
pt3dadd(-36.82, -81.12, -19.95, 2.55)
pt3dadd(-36.91, -81.22, -19.95, 2.55)
pt3dadd(-36.96, -81.32, -19.95, 2.55)
pt3dadd(-37, -81.42, -19.95, 2.55)
pt3dadd(-37.09, -81.52, -19.95, 2.55)
pt3dadd(-37.13, -81.57, -19.95, 2.55)
pt3dadd(-37.18, -81.63, -19.95, 2.55)
pt3dadd(-37.22, -81.68, -19.95, 2.55)
pt3dadd(-37.27, -81.72, -19.95, 2.55)
pt3dadd(-37.35, -81.78, -19.95, 2.55)
pt3dadd(-37.44, -81.83, -19.95, 2.55)
pt3dadd(-37.53, -81.83, -19.95, 2.55)
pt3dadd(-37.62, -81.88, -19.95, 2.55)
pt3dadd(-37.71, -81.88, -19.95, 2.55)
pt3dadd(-37.76, -81.93, -19.95, 2.55)
pt3dadd(-37.8, -81.98, -21, 2.04)
pt3dadd(-37.89, -82.03, -21, 2.04)
pt3dadd(-37.94, -82.08, -21, 2.04)
pt3dadd(-37.98, -82.13, -21, 2.04)
pt3dadd(-38.03, -82.18, -21, 2.04)
pt3dadd(-38.07, -82.28, -21, 2.04)
pt3dadd(-38.16, -82.38, -21, 2.04)
pt3dadd(-38.2, -82.43, -21, 2.04)
pt3dadd(-38.29, -82.54, -21, 2.04)
pt3dadd(-38.34, -82.64, -21, 2.04)
pt3dadd(-38.42, -82.69, -21, 2.04)
pt3dadd(-38.47, -82.74, -21, 2.04)
pt3dadd(-38.51, -82.84, -21, 2.04)
}
}
proc shape3d_141() {
dend[96] { pt3dadd(-38.56, -82.89, -21, 2.04)
pt3dadd(-38.6, -82.94, -21, 2.04)
pt3dadd(-38.74, -83.09, -21, 2.04)
pt3dadd(-38.78, -83.19, -21, 2.04)
pt3dadd(-38.83, -83.25, -21, 2.04)
pt3dadd(-38.87, -83.35, -21, 2.04)
pt3dadd(-38.92, -83.45, -21, 2.04)
pt3dadd(-38.96, -83.5, -21, 2.04)
pt3dadd(-39.1, -83.7, -21, 2.04)
pt3dadd(-39.14, -83.85, -21, 2.04)
pt3dadd(-39.23, -83.9, -21, 2.04)
pt3dadd(-39.27, -84, -21, 2.04)
pt3dadd(-39.32, -84.11, -21, 2.04)
pt3dadd(-39.45, -84.26, -21, 2.04)
pt3dadd(-39.49, -84.36, -21, 2.04)
pt3dadd(-39.54, -84.56, -21, 2.04)
pt3dadd(-39.58, -84.61, -21, 2.04)
pt3dadd(-39.63, -84.76, -21, 2.04)
pt3dadd(-39.72, -84.86, -21, 2.04)
pt3dadd(-39.76, -84.96, -21, 2.04)
pt3dadd(-39.81, -85.07, -21, 2.04)
pt3dadd(-39.85, -85.17, -21, 2.04)
pt3dadd(-39.9, -85.32, -21, 2.04)
pt3dadd(-39.94, -85.42, -21, 2.04)
pt3dadd(-39.99, -85.52, -21, 2.04)
pt3dadd(-40.03, -85.63, -21, 2.04)
pt3dadd(-40.12, -85.72, -21, 2.04)
pt3dadd(-40.17, -85.83, -21, 2.04)
pt3dadd(-40.17, -85.93, -21, 2.04)
pt3dadd(-40.21, -86.03, -21, 2.04)
pt3dadd(-40.25, -86.13, -21, 2.04)
pt3dadd(-40.3, -86.23, -21, 2.04)
pt3dadd(-40.34, -86.33, -21, 2.04)
pt3dadd(-40.39, -86.49, -21, 2.04)
pt3dadd(-40.43, -86.58, -21, 2.04)
pt3dadd(-40.48, -86.74, -21, 2.04)
pt3dadd(-40.52, -86.84, -21, 2.04)
pt3dadd(-40.56, -86.94, -21, 2.04)
pt3dadd(-40.61, -87.04, -21, 2.04)
pt3dadd(-40.61, -87.14, -21, 2.04)
pt3dadd(-40.65, -87.19, -21, 2.04)
pt3dadd(-40.65, -87.04, -21, 2.04)
pt3dadd(-40.61, -87.19, -23.1, 2.04)
pt3dadd(-40.97, -89.32, -23.1, 2.04)
pt3dadd(-40.88, -88.96, -23.1, 2.04)
pt3dadd(-40.88, -89.32, -23.1, 2.04)
pt3dadd(-40.92, -89.42, -23.1, 2.04)
pt3dadd(-40.92, -89.68, -23.1, 2.04)
pt3dadd(-40.97, -89.72, -23.1, 2.04)
pt3dadd(-40.97, -89.93, -23.1, 2.04)
pt3dadd(-41.01, -89.98, -23.1, 2.04)
pt3dadd(-41.01, -90.69, -23.1, 2.04)
pt3dadd(-41.06, -90.28, -25.2, 2.04)
pt3dadd(-41.06, -90.39, -25.2, 2.04)
pt3dadd(-41.1, -90.43, -25.2, 2.04)
pt3dadd(-41.1, -90.54, -25.2, 2.04)
pt3dadd(-41.15, -90.59, -25.2, 2.04)
pt3dadd(-41.15, -90.74, -25.2, 2.04)
pt3dadd(-41.19, -90.79, -25.2, 2.04)
pt3dadd(-41.19, -91.09, -25.2, 2.04)
pt3dadd(-41.24, -91.14, -25.2, 2.04)
pt3dadd(-41.24, -91.4, -25.2, 2.04)
pt3dadd(-41.28, -91.45, -25.2, 2.04)
pt3dadd(-41.28, -91.6, -25.2, 2.04)
pt3dadd(-41.32, -91.7, -25.2, 2.04)
pt3dadd(-41.32, -91.85, -25.2, 2.04)
pt3dadd(-41.37, -91.95, -25.2, 2.04)
pt3dadd(-41.37, -92.11, -25.2, 2.04)
pt3dadd(-41.41, -92.21, -25.2, 2.04)
pt3dadd(-41.41, -92.31, -25.2, 2.04)
pt3dadd(-41.46, -92.46, -25.2, 2.04)
pt3dadd(-41.46, -92.56, -25.2, 2.04)
pt3dadd(-41.5, -92.61, -25.2, 2.04)
pt3dadd(-41.5, -92.71, -25.2, 2.04)
pt3dadd(-41.55, -92.76, -25.2, 2.04)
pt3dadd(-41.55, -92.92, -25.2, 2.04)
pt3dadd(-41.59, -92.97, -25.2, 2.04)
pt3dadd(-41.63, -93.07, -25.2, 2.04)
pt3dadd(-41.63, -93.17, -25.2, 2.04)
pt3dadd(-41.68, -93.22, -25.2, 2.04)
pt3dadd(-41.77, -93.47, -25.2, 2.04)
pt3dadd(-41.81, -93.52, -25.2, 2.04)
pt3dadd(-41.81, -93.68, -25.2, 2.04)
pt3dadd(-41.86, -93.72, -25.2, 2.04)
pt3dadd(-41.9, -93.78, -25.2, 2.04)
pt3dadd(-41.95, -93.93, -25.2, 2.04)
pt3dadd(-41.95, -94.03, -25.2, 2.04)
pt3dadd(-41.99, -94.08, -25.2, 2.04)
pt3dadd(-42.04, -94.18, -25.2, 2.04)
pt3dadd(-42.08, -94.33, -25.2, 2.04)
pt3dadd(-42.13, -94.43, -25.2, 2.04)
pt3dadd(-42.17, -94.49, -25.2, 2.04)
pt3dadd(-42.17, -94.59, -25.2, 2.04)
pt3dadd(-42.22, -94.69, -25.2, 2.04)
pt3dadd(-42.26, -94.79, -25.2, 2.04)
pt3dadd(-42.26, -94.94, -25.2, 2.04)
pt3dadd(-42.31, -95.09, -25.2, 2.04)
pt3dadd(-42.35, -95.25, -25.2, 2.04)
pt3dadd(-42.39, -95.29, -25.2, 2.04)
pt3dadd(-42.44, -95.45, -25.2, 2.04)
pt3dadd(-42.44, -95.7, -25.2, 2.04)
pt3dadd(-42.31, -95.45, -25.2, 2.04)
pt3dadd(-42.35, -95.5, -25.2, 2.04)
pt3dadd(-42.44, -95.55, -25.2, 2.04)
pt3dadd(-42.53, -95.7, -25.2, 2.04)
pt3dadd(-42.57, -95.8, -25.2, 2.04)
pt3dadd(-42.62, -95.9, -25.2, 2.04)
pt3dadd(-42.66, -95.96, -25.2, 2.04)
pt3dadd(-42.66, -96.06, -25.2, 2.04)
pt3dadd(-42.71, -96.11, -25.2, 2.04)
pt3dadd(-42.75, -96.21, -25.2, 2.04)
pt3dadd(-42.75, -96.31, -25.2, 2.04)
pt3dadd(-42.79, -96.36, -25.2, 2.04)
pt3dadd(-42.84, -96.46, -25.2, 2.04)
pt3dadd(-42.84, -96.56, -25.2, 2.04)
pt3dadd(-42.88, -96.61, -25.2, 2.04)
pt3dadd(-42.93, -96.66, -25.2, 2.04)
pt3dadd(-42.93, -96.76, -25.2, 2.04)
pt3dadd(-42.97, -96.82, -25.2, 2.04)
pt3dadd(-43.02, -96.92, -25.2, 2.04)
pt3dadd(-43.02, -97.02, -25.2, 2.04)
pt3dadd(-43.06, -97.07, -25.2, 2.04)
pt3dadd(-43.11, -97.12, -25.2, 2.04)
pt3dadd(-43.11, -97.22, -25.2, 2.04)
pt3dadd(-43.15, -97.27, -25.2, 2.04)
pt3dadd(-43.15, -97.37, -25.2, 2.04)
pt3dadd(-43.19, -97.42, -25.2, 2.04)
pt3dadd(-43.24, -97.52, -25.2, 2.04)
pt3dadd(-43.28, -97.63, -25.2, 2.04)
pt3dadd(-43.33, -97.68, -25.2, 2.04)
pt3dadd(-43.38, -97.78, -25.2, 2.04)
pt3dadd(-43.42, -97.88, -25.2, 2.04)
pt3dadd(-43.46, -97.98, -25.2, 2.04)
pt3dadd(-43.51, -98.08, -25.2, 2.04)
pt3dadd(-43.55, -98.18, -25.2, 2.04)
pt3dadd(-43.6, -98.28, -25.2, 2.04)
pt3dadd(-43.64, -98.33, -25.2, 2.04)
pt3dadd(-43.69, -98.43, -25.2, 2.04)
pt3dadd(-43.73, -98.49, -25.2, 2.04)
pt3dadd(-43.78, -98.59, -25.2, 2.04)
pt3dadd(-43.82, -98.69, -25.2, 2.04)
pt3dadd(-43.91, -98.79, -25.2, 2.04)
pt3dadd(-43.96, -98.89, -25.2, 2.04)
pt3dadd(-44, -98.94, -25.2, 2.04)
pt3dadd(-44.04, -99.04, -25.2, 2.04)
pt3dadd(-44.18, -99.29, -25.2, 2.04)
pt3dadd(-44.22, -99.4, -25.2, 2.04)
pt3dadd(-44.31, -99.5, -25.2, 2.04)
pt3dadd(-44.4, -99.65, -25.2, 2.04)
pt3dadd(-44.44, -99.75, -25.2, 2.04)
pt3dadd(-44.49, -99.8, -25.2, 2.04)
pt3dadd(-44.53, -99.9, -25.2, 2.04)
pt3dadd(-44.58, -99.96, -25.2, 2.04)
pt3dadd(-44.62, -100.06, -25.2, 2.04)
pt3dadd(-44.67, -100.16, -25.2, 2.04)
pt3dadd(-44.71, -100.26, -25.2, 2.04)
pt3dadd(-44.76, -100.31, -25.2, 2.04)
pt3dadd(-44.8, -100.41, -25.2, 2.04)
pt3dadd(-44.89, -100.51, -25.2, 2.04)
pt3dadd(-44.94, -100.61, -25.2, 2.04)
pt3dadd(-44.98, -100.66, -25.2, 2.04)
pt3dadd(-44.98, -100.76, -25.2, 2.04)
pt3dadd(-45.03, -100.82, -25.2, 2.04)
pt3dadd(-45.11, -100.97, -25.2, 2.04)
pt3dadd(-45.16, -101.07, -25.2, 2.04)
pt3dadd(-45.2, -101.17, -25.2, 2.04)
pt3dadd(-45.25, -101.22, -25.2, 2.04)
pt3dadd(-45.33, -101.37, -25.2, 2.04)
pt3dadd(-45.38, -101.47, -25.2, 2.04)
pt3dadd(-45.42, -101.57, -25.2, 2.04)
pt3dadd(-45.51, -101.68, -25.2, 2.04)
pt3dadd(-45.56, -101.78, -25.2, 2.04)
pt3dadd(-45.6, -101.88, -25.2, 2.04)
pt3dadd(-45.65, -101.98, -25.2, 2.04)
pt3dadd(-45.69, -102.03, -25.2, 2.04)
pt3dadd(-45.74, -102.13, -25.2, 2.04)
pt3dadd(-45.74, -102.28, -25.2, 2.04)
pt3dadd(-45.78, -102.39, -25.2, 2.04)
pt3dadd(-45.78, -102.54, -25.2, 2.04)
pt3dadd(-45.83, -102.59, -25.2, 2.04)
pt3dadd(-45.87, -102.79, -25.2, 2.04)
pt3dadd(-45.87, -102.89, -25.2, 2.04)
pt3dadd(-45.92, -102.99, -25.2, 2.04)
pt3dadd(-45.92, -103.19, -25.2, 2.04)
pt3dadd(-45.96, -103.35, -25.2, 2.04)
pt3dadd(-45.96, -105.12, -25.2, 2.04)
pt3dadd(-45.96, -105.02, -25.2, 2.04)
pt3dadd(-45.92, -104.97, -25.2, 2.04)
pt3dadd(-45.87, -105.37, -25.2, 2.04)
pt3dadd(-45.87, -106.23, -25.2, 2.04)
}
dend[97] {pt3dclear()
pt3dadd(-22.76, -54.01, -3.7, 3.76)
pt3dadd(-23.46, -53.83, -3.7, 3.76)
pt3dadd(-23.5, -53.9, -3.7, 3.76)
pt3dadd(-23.53, -53.99, -3.7, 3.76)
pt3dadd(-23.57, -54.1, -3.7, 3.76)
pt3dadd(-23.6, -54.18, -3.7, 3.76)
pt3dadd(-23.67, -54.26, -3.7, 3.76)
pt3dadd(-23.7, -54.34, -3.7, 3.76)
pt3dadd(-23.74, -54.42, -3.7, 3.76)
pt3dadd(-23.77, -54.5, -3.7, 3.76)
}
}
proc shape3d_142() {
dend[97] { pt3dadd(-23.84, -54.58, -3.7, 3.76)
pt3dadd(-23.88, -54.66, -3.7, 3.76)
pt3dadd(-23.91, -54.74, -3.7, 3.76)
pt3dadd(-23.98, -54.81, -3.7, 3.76)
pt3dadd(-24.02, -54.93, -3.7, 3.76)
pt3dadd(-24.05, -54.97, -3.7, 3.76)
pt3dadd(-24.12, -55.05, -3.7, 3.76)
pt3dadd(-24.16, -55.13, -3.7, 3.76)
pt3dadd(-24.19, -55.21, -3.7, 3.76)
pt3dadd(-24.23, -55.29, -3.7, 3.76)
pt3dadd(-24.3, -55.33, -3.7, 3.76)
pt3dadd(-24.36, -55.45, -3.7, 3.76)
pt3dadd(-24.4, -55.53, -3.7, 3.76)
pt3dadd(-24.43, -55.57, -3.7, 3.76)
pt3dadd(-24.47, -55.65, -3.7, 3.76)
pt3dadd(-24.5, -55.69, -3.7, 3.76)
pt3dadd(-24.54, -55.76, -3.7, 3.76)
pt3dadd(-24.54, -55.84, -3.7, 3.76)
pt3dadd(-24.58, -55.92, -3.7, 3.76)
pt3dadd(-24.61, -55.96, -3.7, 3.76)
pt3dadd(-24.65, -56.04, -3.7, 3.76)
pt3dadd(-24.65, -56, -3.7, 3.76)
pt3dadd(-24.58, -55.96, -3.7, 3.76)
pt3dadd(-24.47, -55.84, -3.7, 3.76)
pt3dadd(-24.47, -55.6, -3.7, 3.76)
pt3dadd(-24.54, -55.65, -3.7, 3.76)
pt3dadd(-24.54, -55.72, -3.7, 3.76)
pt3dadd(-24.58, -55.76, -3.7, 3.76)
pt3dadd(-24.61, -55.81, -3.7, 3.76)
pt3dadd(-24.65, -55.84, -3.7, 3.76)
pt3dadd(-24.68, -55.92, -3.7, 3.76)
pt3dadd(-24.71, -55.96, -3.7, 3.76)
pt3dadd(-24.75, -56.04, -3.7, 3.76)
pt3dadd(-24.78, -56.12, -3.7, 3.76)
pt3dadd(-24.82, -56.16, -3.7, 3.76)
pt3dadd(-24.85, -56.24, -3.7, 3.76)
pt3dadd(-24.89, -56.28, -3.7, 3.76)
pt3dadd(-24.92, -56.4, -3.7, 3.76)
pt3dadd(-24.96, -56.44, -3.7, 3.76)
pt3dadd(-24.96, -56.52, -3.7, 3.76)
pt3dadd(-24.99, -56.56, -3.7, 3.76)
pt3dadd(-25.03, -56.6, -3.7, 3.76)
pt3dadd(-25.06, -56.63, -3.7, 3.76)
pt3dadd(-25.13, -56.67, -3.7, 3.76)
pt3dadd(-25.17, -56.75, -3.7, 3.76)
pt3dadd(-25.2, -56.79, -3.7, 3.76)
pt3dadd(-25.27, -56.87, -3.7, 3.76)
pt3dadd(-25.27, -56.95, -3.7, 3.76)
pt3dadd(-25.34, -56.99, -3.7, 3.76)
pt3dadd(-25.34, -57.07, -3.7, 3.76)
pt3dadd(-25.41, -57.15, -3.7, 3.76)
pt3dadd(-25.44, -57.19, -3.7, 3.76)
pt3dadd(-25.48, -57.31, -3.7, 3.76)
pt3dadd(-25.55, -57.35, -3.7, 3.76)
pt3dadd(-25.55, -57.43, -3.7, 3.76)
pt3dadd(-25.58, -57.47, -3.7, 3.76)
pt3dadd(-25.62, -57.54, -3.7, 3.76)
pt3dadd(-25.69, -57.63, -3.7, 3.76)
pt3dadd(-25.73, -57.7, -3.7, 3.76)
pt3dadd(-25.76, -57.78, -3.7, 3.76)
pt3dadd(-25.79, -57.86, -3.7, 3.76)
pt3dadd(-25.86, -57.9, -3.7, 3.76)
pt3dadd(-25.9, -57.98, -3.7, 3.76)
pt3dadd(-25.93, -58.02, -3.7, 3.76)
pt3dadd(-25.97, -58.06, -3.7, 3.76)
pt3dadd(-26, -58.14, -3.7, 3.76)
pt3dadd(-26.07, -58.22, -3.7, 3.76)
pt3dadd(-26.11, -58.3, -3.7, 3.76)
pt3dadd(-26.21, -58.42, -3.7, 3.76)
pt3dadd(-26.25, -58.49, -3.7, 3.76)
pt3dadd(-26.28, -58.53, -3.7, 3.76)
pt3dadd(-26.35, -58.58, -3.7, 3.76)
pt3dadd(-26.39, -58.61, -3.7, 3.76)
pt3dadd(-26.42, -58.69, -3.7, 3.76)
pt3dadd(-26.49, -58.73, -3.7, 3.76)
pt3dadd(-26.52, -58.77, -3.7, 3.76)
pt3dadd(-26.56, -58.85, -3.7, 3.76)
pt3dadd(-26.59, -58.89, -3.7, 3.76)
pt3dadd(-26.63, -59.01, -3.7, 3.76)
pt3dadd(-26.67, -59.05, -3.7, 3.76)
pt3dadd(-26.74, -59.13, -3.7, 3.76)
pt3dadd(-26.77, -59.25, -3.7, 3.76)
pt3dadd(-26.84, -59.28, -3.7, 3.76)
pt3dadd(-26.84, -59.37, -3.7, 3.76)
pt3dadd(-26.91, -59.4, -3.7, 3.76)
pt3dadd(-26.98, -59.52, -3.7, 3.76)
pt3dadd(-26.98, -59.6, -3.7, 3.76)
pt3dadd(-27.05, -59.68, -3.7, 3.76)
pt3dadd(-27.08, -59.76, -3.7, 3.76)
pt3dadd(-27.15, -59.84, -3.7, 3.76)
pt3dadd(-27.19, -59.92, -3.7, 3.76)
pt3dadd(-27.26, -60, -3.7, 3.76)
pt3dadd(-27.29, -60.08, -3.7, 3.76)
pt3dadd(-27.33, -60.16, -3.7, 3.76)
pt3dadd(-27.36, -60.2, -3.7, 3.76)
pt3dadd(-27.5, -60.35, -3.7, 3.76)
pt3dadd(-27.53, -60.43, -3.7, 3.76)
pt3dadd(-27.85, -60.79, -3.7, 3.76)
pt3dadd(-27.92, -60.87, -3.7, 3.76)
pt3dadd(-27.99, -60.95, -3.7, 3.76)
pt3dadd(-28.06, -61.03, -3.7, 3.76)
pt3dadd(-28.09, -61.11, -3.7, 3.76)
pt3dadd(-28.23, -61.26, -3.7, 3.76)
pt3dadd(-28.3, -61.31, -3.7, 3.76)
pt3dadd(-28.37, -61.38, -3.7, 3.76)
pt3dadd(-28.44, -61.42, -3.7, 3.76)
pt3dadd(-28.51, -61.5, -3.7, 3.76)
pt3dadd(-28.58, -61.54, -3.7, 3.76)
pt3dadd(-28.61, -61.62, -3.7, 3.76)
pt3dadd(-28.72, -61.7, -3.7, 3.76)
pt3dadd(-28.79, -61.74, -3.7, 3.76)
pt3dadd(-28.86, -61.78, -3.7, 3.76)
pt3dadd(-28.93, -61.86, -3.7, 3.76)
pt3dadd(-29, -61.86, -3.7, 3.76)
pt3dadd(-29.1, -61.94, -3.7, 3.76)
pt3dadd(-29.17, -62.02, -3.7, 3.76)
pt3dadd(-29.24, -62.02, -3.7, 3.76)
pt3dadd(-29.35, -62.1, -3.7, 3.76)
pt3dadd(-29.42, -62.13, -3.7, 3.76)
pt3dadd(-29.49, -62.13, -3.7, 3.76)
pt3dadd(-29.56, -62.22, -3.7, 3.76)
pt3dadd(-29.63, -62.22, -3.7, 3.76)
pt3dadd(-29.66, -62.26, -3.7, 3.76)
pt3dadd(-29.73, -62.29, -3.7, 3.76)
pt3dadd(-29.8, -62.29, -3.7, 3.76)
pt3dadd(-29.87, -62.33, -3.7, 3.76)
pt3dadd(-29.94, -62.37, -3.7, 3.76)
pt3dadd(-30.01, -62.37, -3.7, 3.76)
pt3dadd(-30.08, -62.41, -3.7, 3.76)
pt3dadd(-30.15, -62.45, -3.7, 3.76)
pt3dadd(-30.29, -62.45, -3.7, 3.76)
pt3dadd(-30.36, -62.49, -3.7, 3.76)
pt3dadd(-30.43, -62.49, -3.7, 3.76)
pt3dadd(-30.53, -62.53, -3.7, 3.76)
pt3dadd(-30.6, -62.57, -3.7, 3.76)
pt3dadd(-30.7, -62.61, -3.7, 3.76)
pt3dadd(-30.81, -62.61, -3.7, 3.76)
pt3dadd(-30.88, -62.65, -3.7, 3.76)
pt3dadd(-30.95, -62.69, -3.7, 3.76)
pt3dadd(-31.06, -62.73, -3.7, 3.76)
pt3dadd(-31.09, -62.77, -3.7, 3.76)
pt3dadd(-31.19, -62.81, -3.7, 3.76)
pt3dadd(-31.26, -62.85, -3.7, 3.76)
pt3dadd(-31.37, -62.89, -3.7, 3.76)
pt3dadd(-31.44, -62.93, -3.7, 3.76)
pt3dadd(-31.51, -62.97, -3.7, 3.76)
pt3dadd(-31.58, -63.01, -3.7, 3.76)
pt3dadd(-31.68, -63.04, -3.7, 3.76)
pt3dadd(-31.78, -63.08, -3.7, 3.76)
pt3dadd(-31.85, -63.17, -3.7, 3.76)
pt3dadd(-31.92, -63.2, -3.7, 3.76)
pt3dadd(-32.13, -63.2, -3.7, 3.76)
pt3dadd(-32.17, -63.24, -3.7, 3.76)
pt3dadd(-32.24, -63.28, -3.7, 3.76)
pt3dadd(-32.27, -63.32, -3.7, 3.76)
pt3dadd(-32.38, -63.36, -3.7, 3.76)
pt3dadd(-32.45, -63.4, -3.7, 3.76)
pt3dadd(-32.48, -63.44, -3.7, 3.76)
pt3dadd(-32.59, -63.48, -3.7, 3.76)
pt3dadd(-32.66, -63.56, -3.7, 3.76)
pt3dadd(-32.73, -63.56, -3.7, 3.76)
pt3dadd(-32.79, -63.6, -3.7, 3.76)
pt3dadd(-32.9, -63.68, -3.7, 3.76)
pt3dadd(-32.97, -63.72, -3.7, 3.76)
pt3dadd(-33.04, -63.76, -3.7, 3.76)
pt3dadd(-33.11, -63.8, -3.7, 3.76)
pt3dadd(-33.18, -63.84, -3.7, 3.76)
pt3dadd(-33.25, -63.84, -3.7, 3.76)
pt3dadd(-33.32, -63.92, -3.7, 3.76)
pt3dadd(-33.35, -63.96, -3.7, 3.76)
pt3dadd(-33.42, -63.99, -3.7, 3.76)
pt3dadd(-33.49, -64.04, -3.7, 3.76)
pt3dadd(-33.6, -64.07, -3.7, 3.76)
pt3dadd(-33.67, -64.15, -3.7, 3.76)
pt3dadd(-33.7, -64.19, -3.7, 3.76)
pt3dadd(-33.81, -64.19, -3.7, 3.76)
pt3dadd(-33.88, -64.23, -3.7, 3.76)
pt3dadd(-33.91, -64.27, -3.7, 3.76)
pt3dadd(-34.01, -64.31, -3.7, 3.76)
pt3dadd(-34.08, -64.35, -3.7, 3.76)
pt3dadd(-34.15, -64.39, -3.7, 3.76)
pt3dadd(-34.26, -64.43, -3.7, 3.76)
pt3dadd(-34.4, -64.55, -3.7, 3.76)
pt3dadd(-34.47, -64.59, -3.7, 3.76)
pt3dadd(-34.54, -64.63, -3.7, 3.76)
pt3dadd(-34.61, -64.71, -3.7, 3.76)
pt3dadd(-34.71, -64.75, -3.7, 3.76)
pt3dadd(-34.82, -64.79, -3.7, 3.76)
pt3dadd(-34.85, -64.82, -3.7, 3.76)
pt3dadd(-34.92, -64.9, -3.7, 3.76)
pt3dadd(-34.99, -64.94, -3.7, 3.76)
pt3dadd(-35.06, -64.99, -3.7, 3.76)
pt3dadd(-35.17, -65.03, -3.7, 3.76)
pt3dadd(-35.24, -65.1, -3.7, 3.76)
pt3dadd(-35.31, -65.14, -3.7, 3.76)
pt3dadd(-35.41, -65.22, -3.7, 3.76)
pt3dadd(-35.48, -65.26, -3.7, 3.76)
pt3dadd(-35.58, -65.34, -3.7, 3.76)
pt3dadd(-35.65, -65.38, -3.7, 3.76)
pt3dadd(-35.72, -65.42, -3.7, 3.76)
}
}
proc shape3d_143() {
dend[97] { pt3dadd(-35.86, -65.58, -3.7, 3.76)
pt3dadd(-35.93, -65.62, -3.7, 3.76)
pt3dadd(-36, -65.66, -3.7, 3.76)
pt3dadd(-36.1, -65.78, -3.7, 3.76)
pt3dadd(-36.21, -65.86, -3.7, 3.76)
pt3dadd(-36.31, -65.97, -3.7, 3.76)
pt3dadd(-36.35, -66.01, -3.7, 3.76)
pt3dadd(-36.42, -66.09, -3.7, 3.76)
pt3dadd(-36.49, -66.13, -3.7, 3.76)
pt3dadd(-36.52, -66.21, -3.7, 3.76)
pt3dadd(-36.59, -66.25, -3.7, 3.76)
pt3dadd(-36.7, -66.33, -3.7, 3.76)
pt3dadd(-36.73, -66.41, -3.7, 3.76)
pt3dadd(-36.77, -66.45, -3.7, 3.76)
pt3dadd(-36.87, -66.57, -3.7, 3.76)
pt3dadd(-36.94, -66.61, -3.7, 3.76)
pt3dadd(-37.08, -66.64, -3.7, 3.76)
pt3dadd(-37.19, -66.72, -3.7, 3.76)
pt3dadd(-37.22, -66.76, -3.7, 3.76)
pt3dadd(-37.29, -66.85, -3.7, 3.76)
pt3dadd(-37.33, -66.88, -3.7, 3.76)
pt3dadd(-37.4, -66.92, -3.7, 3.76)
pt3dadd(-37.47, -67, -3.7, 3.76)
pt3dadd(-37.53, -67.04, -3.7, 3.76)
pt3dadd(-37.64, -67.16, -3.7, 3.76)
pt3dadd(-37.67, -67.2, -3.7, 3.76)
pt3dadd(-37.78, -67.2, -3.7, 3.76)
pt3dadd(-37.74, -67.12, -3.7, 3.76)
pt3dadd(-37.6, -67, -3.7, 3.76)
pt3dadd(-37.53, -66.92, -3.7, 3.76)
pt3dadd(-37.47, -66.85, -3.7, 3.76)
pt3dadd(-37.6, -67.04, -3.7, 3.76)
pt3dadd(-37.67, -67.04, -3.7, 3.76)
pt3dadd(-37.71, -67.08, -3.7, 3.76)
pt3dadd(-37.78, -67.12, -3.7, 3.76)
pt3dadd(-37.85, -67.16, -3.7, 3.76)
pt3dadd(-37.88, -67.2, -3.7, 3.76)
pt3dadd(-37.95, -67.2, -3.7, 3.76)
pt3dadd(-37.99, -67.24, -3.7, 3.76)
pt3dadd(-38.06, -67.32, -3.7, 3.76)
pt3dadd(-38.09, -67.4, -3.7, 3.76)
pt3dadd(-38.16, -67.44, -3.7, 3.76)
pt3dadd(-38.19, -67.48, -3.7, 3.76)
pt3dadd(-38.23, -67.52, -3.7, 3.76)
pt3dadd(-38.26, -67.56, -3.7, 3.76)
pt3dadd(-38.33, -67.56, -3.7, 3.76)
pt3dadd(-38.37, -67.6, -3.7, 3.76)
pt3dadd(-38.44, -67.64, -3.7, 3.76)
pt3dadd(-38.47, -67.68, -3.7, 3.76)
pt3dadd(-38.58, -67.75, -3.7, 3.76)
pt3dadd(-38.62, -67.83, -3.7, 3.76)
pt3dadd(-38.65, -67.91, -3.7, 3.76)
pt3dadd(-38.72, -67.99, -3.7, 3.76)
pt3dadd(-38.75, -68.07, -3.7, 3.76)
pt3dadd(-38.79, -68.11, -3.7, 3.76)
pt3dadd(-38.86, -68.19, -3.7, 3.76)
pt3dadd(-38.96, -68.31, -3.7, 3.76)
pt3dadd(-39, -68.39, -3.7, 3.76)
pt3dadd(-39.03, -68.43, -3.7, 3.76)
pt3dadd(-39.1, -68.54, -3.7, 3.76)
pt3dadd(-39.14, -68.63, -3.7, 3.76)
pt3dadd(-39.17, -68.67, -3.7, 3.76)
pt3dadd(-39.21, -68.74, -3.7, 3.76)
pt3dadd(-39.28, -68.78, -3.7, 3.76)
pt3dadd(-39.31, -68.82, -3.7, 3.76)
pt3dadd(-39.35, -68.86, -3.7, 3.76)
pt3dadd(-39.17, -68.54, -3.7, 3.76)
pt3dadd(-39.21, -68.58, -3.7, 3.76)
pt3dadd(-39.24, -68.67, -3.7, 3.76)
pt3dadd(-39.28, -68.7, -3.7, 3.76)
pt3dadd(-39.35, -68.74, -3.7, 3.76)
pt3dadd(-39.38, -68.82, -3.7, 3.76)
pt3dadd(-39.42, -68.9, -3.7, 3.76)
pt3dadd(-39.49, -68.94, -3.7, 3.76)
pt3dadd(-39.49, -69.02, -3.7, 3.76)
pt3dadd(-39.56, -69.1, -3.7, 3.76)
pt3dadd(-39.63, -69.18, -3.7, 3.76)
pt3dadd(-39.66, -69.22, -3.7, 3.76)
pt3dadd(-39.69, -69.3, -3.7, 3.76)
pt3dadd(-39.76, -69.38, -3.7, 3.76)
pt3dadd(-39.8, -69.42, -3.7, 3.76)
pt3dadd(-39.83, -69.46, -3.7, 3.76)
pt3dadd(-39.87, -69.5, -3.7, 3.76)
pt3dadd(-39.9, -69.57, -3.7, 3.76)
pt3dadd(-39.94, -69.61, -3.7, 3.76)
pt3dadd(-39.97, -69.65, -3.7, 3.76)
pt3dadd(-40.01, -69.69, -3.7, 3.76)
pt3dadd(-40.04, -69.73, -3.7, 3.76)
pt3dadd(-40.08, -69.77, -3.7, 3.76)
pt3dadd(-40.11, -69.85, -3.7, 3.76)
pt3dadd(-40.18, -69.93, -3.7, 3.76)
pt3dadd(-40.25, -70.05, -3.7, 3.76)
pt3dadd(-40.28, -70.13, -3.7, 3.76)
pt3dadd(-40.32, -70.21, -3.7, 3.76)
pt3dadd(-40.42, -70.44, -3.7, 3.76)
pt3dadd(-40.46, -70.53, -3.7, 3.76)
pt3dadd(-40.49, -70.6, -3.7, 3.76)
pt3dadd(-40.53, -70.72, -3.7, 3.76)
pt3dadd(-40.6, -70.84, -3.7, 3.76)
pt3dadd(-40.63, -70.92, -3.7, 3.76)
pt3dadd(-40.71, -71.04, -3.7, 3.76)
pt3dadd(-40.71, -71.12, -3.7, 3.76)
pt3dadd(-40.78, -71.24, -3.7, 3.76)
pt3dadd(-40.84, -71.36, -3.7, 3.76)
pt3dadd(-40.88, -71.43, -3.7, 3.76)
pt3dadd(-40.91, -71.55, -3.7, 3.76)
pt3dadd(-40.98, -71.67, -3.7, 3.76)
pt3dadd(-41.02, -71.79, -3.7, 3.76)
pt3dadd(-41.09, -71.91, -3.7, 3.76)
pt3dadd(-41.16, -71.99, -3.7, 3.76)
pt3dadd(-41.23, -72.11, -3.7, 3.76)
pt3dadd(-41.26, -72.18, -3.7, 3.76)
pt3dadd(-41.3, -72.31, -3.7, 3.76)
pt3dadd(-41.37, -72.42, -3.7, 3.76)
pt3dadd(-41.47, -72.5, -3.7, 3.76)
pt3dadd(-41.51, -72.62, -3.7, 3.76)
pt3dadd(-41.58, -72.74, -3.7, 3.76)
pt3dadd(-41.61, -72.86, -3.7, 3.76)
pt3dadd(-41.68, -72.98, -3.7, 3.76)
pt3dadd(-41.78, -73.06, -3.7, 3.76)
pt3dadd(-41.82, -73.14, -3.7, 3.76)
pt3dadd(-41.89, -73.29, -3.7, 3.76)
pt3dadd(-41.92, -73.37, -3.7, 3.76)
pt3dadd(-41.96, -73.41, -3.7, 3.76)
pt3dadd(-42.03, -73.53, -3.7, 3.76)
pt3dadd(-42.1, -73.61, -3.7, 3.76)
pt3dadd(-42.13, -73.69, -3.7, 3.76)
pt3dadd(-42.2, -73.77, -3.7, 3.76)
pt3dadd(-42.27, -73.85, -3.7, 3.76)
pt3dadd(-42.34, -74, -3.7, 3.76)
pt3dadd(-42.41, -74.13, -3.7, 3.76)
pt3dadd(-42.48, -74.24, -3.7, 3.76)
pt3dadd(-42.55, -74.32, -3.7, 3.76)
pt3dadd(-42.62, -74.44, -3.7, 3.76)
pt3dadd(-42.69, -74.52, -3.7, 3.76)
pt3dadd(-42.83, -74.68, -3.7, 3.76)
pt3dadd(-42.9, -74.8, -3.7, 3.76)
pt3dadd(-42.97, -74.92, -3.7, 3.76)
pt3dadd(-43.07, -75.04, -3.7, 3.76)
pt3dadd(-43.14, -75.11, -3.7, 3.76)
pt3dadd(-43.21, -75.23, -3.7, 3.76)
pt3dadd(-43.32, -75.35, -3.7, 3.76)
pt3dadd(-43.39, -75.47, -3.7, 3.76)
pt3dadd(-43.46, -75.55, -3.7, 3.76)
pt3dadd(-43.53, -75.67, -3.7, 3.76)
pt3dadd(-43.6, -75.71, -3.7, 3.76)
pt3dadd(-43.63, -75.79, -3.7, 3.76)
pt3dadd(-43.7, -75.86, -3.7, 3.76)
pt3dadd(-43.77, -75.94, -3.7, 3.76)
pt3dadd(-43.81, -76.03, -3.7, 3.76)
pt3dadd(-43.84, -76.1, -3.7, 3.76)
pt3dadd(-43.88, -76.14, -3.7, 3.76)
pt3dadd(-43.94, -76.26, -3.7, 3.76)
pt3dadd(-44.05, -76.34, -3.7, 3.76)
pt3dadd(-44.08, -76.42, -3.7, 3.76)
pt3dadd(-44.12, -76.5, -3.7, 3.76)
pt3dadd(-44.19, -76.58, -3.7, 3.76)
pt3dadd(-44.26, -76.66, -3.7, 3.76)
pt3dadd(-44.33, -76.78, -3.7, 3.76)
pt3dadd(-44.36, -76.86, -3.7, 3.76)
pt3dadd(-44.43, -76.97, -3.7, 3.76)
pt3dadd(-44.54, -77.05, -3.7, 3.76)
pt3dadd(-44.57, -77.13, -3.7, 3.76)
pt3dadd(-44.64, -77.25, -3.7, 3.76)
pt3dadd(-44.71, -77.33, -3.7, 3.76)
pt3dadd(-44.78, -77.41, -3.7, 3.76)
pt3dadd(-44.85, -77.53, -3.7, 3.76)
pt3dadd(-44.92, -77.61, -3.7, 3.76)
pt3dadd(-45.03, -77.68, -3.7, 3.76)
pt3dadd(-45.06, -77.76, -3.7, 3.76)
pt3dadd(-45.13, -77.85, -3.7, 3.76)
pt3dadd(-45.2, -77.92, -3.7, 3.76)
pt3dadd(-45.23, -78, -3.7, 3.76)
pt3dadd(-45.44, -78.24, -3.7, 3.76)
pt3dadd(-45.51, -78.36, -3.7, 3.76)
pt3dadd(-45.58, -78.44, -3.7, 3.76)
pt3dadd(-45.62, -78.52, -3.7, 3.76)
pt3dadd(-45.69, -78.6, -3.7, 3.76)
pt3dadd(-45.79, -78.68, -3.7, 3.76)
pt3dadd(-45.9, -78.79, -3.7, 3.76)
pt3dadd(-45.97, -78.87, -3.7, 3.76)
pt3dadd(-46, -78.91, -3.7, 3.76)
pt3dadd(-46.07, -78.99, -3.7, 3.76)
pt3dadd(-46.14, -79.11, -3.7, 3.76)
pt3dadd(-46.21, -79.19, -3.7, 3.76)
pt3dadd(-46.28, -79.31, -3.7, 3.76)
pt3dadd(-46.45, -79.5, -3.7, 3.76)
pt3dadd(-46.52, -79.58, -3.7, 3.76)
pt3dadd(-46.56, -79.67, -3.7, 3.76)
pt3dadd(-46.63, -79.74, -3.7, 3.76)
pt3dadd(-46.76, -79.9, -3.7, 3.76)
pt3dadd(-46.8, -79.94, -3.7, 3.76)
pt3dadd(-46.87, -79.94, -3.7, 3.76)
pt3dadd(-46.87, -79.74, -3.7, 3.76)
pt3dadd(-46.66, -79.74, -5.7, 3.76)
pt3dadd(-46.7, -79.78, -5.7, 3.76)
pt3dadd(-46.76, -79.82, -5.7, 3.76)
pt3dadd(-46.8, -79.86, -5.7, 3.76)
pt3dadd(-46.83, -79.94, -5.7, 3.76)
pt3dadd(-46.87, -79.98, -5.7, 3.76)
}
}
proc shape3d_144() {
dend[97] { pt3dadd(-46.9, -80.02, -5.7, 3.76)
pt3dadd(-46.94, -80.06, -5.7, 3.76)
pt3dadd(-47.01, -80.18, -5.7, 3.76)
pt3dadd(-47.08, -80.26, -5.7, 3.76)
pt3dadd(-47.12, -80.34, -5.7, 3.76)
pt3dadd(-47.15, -80.42, -5.7, 3.76)
pt3dadd(-47.19, -80.5, -5.7, 3.76)
pt3dadd(-47.22, -80.57, -5.7, 3.76)
pt3dadd(-47.29, -80.61, -5.7, 3.76)
pt3dadd(-47.32, -80.69, -5.7, 3.76)
pt3dadd(-47.36, -80.77, -5.7, 3.76)
pt3dadd(-47.43, -80.85, -5.7, 3.76)
pt3dadd(-47.46, -80.93, -5.7, 3.76)
pt3dadd(-47.5, -80.97, -5.7, 3.76)
pt3dadd(-47.53, -81.05, -5.7, 3.76)
pt3dadd(-47.57, -81.13, -5.7, 3.76)
pt3dadd(-47.6, -81.21, -5.7, 3.76)
pt3dadd(-47.64, -81.25, -5.7, 3.76)
pt3dadd(-47.67, -81.29, -5.7, 3.76)
pt3dadd(-47.71, -81.36, -5.7, 3.76)
pt3dadd(-47.74, -81.44, -5.7, 3.76)
pt3dadd(-47.78, -81.53, -5.7, 3.76)
pt3dadd(-47.81, -81.6, -5.7, 3.76)
pt3dadd(-47.81, -81.68, -5.7, 3.76)
pt3dadd(-47.88, -81.8, -5.7, 3.76)
pt3dadd(-47.88, -81.88, -5.7, 3.76)
pt3dadd(-47.95, -82, -5.7, 3.76)
pt3dadd(-47.99, -82.08, -5.7, 3.76)
pt3dadd(-48.02, -82.2, -5.7, 3.76)
pt3dadd(-48.06, -82.32, -5.7, 3.76)
pt3dadd(-48.09, -82.43, -5.7, 3.76)
pt3dadd(-48.13, -82.51, -5.7, 3.76)
pt3dadd(-48.19, -82.71, -5.7, 3.76)
pt3dadd(-48.23, -82.83, -5.7, 3.76)
pt3dadd(-48.26, -82.95, -5.7, 3.76)
pt3dadd(-48.3, -83.11, -5.7, 3.76)
pt3dadd(-48.33, -83.22, -5.7, 3.76)
pt3dadd(-48.33, -83.39, -5.7, 3.76)
pt3dadd(-48.37, -83.5, -5.7, 3.76)
pt3dadd(-48.4, -83.66, -5.7, 3.76)
pt3dadd(-48.44, -83.78, -5.7, 3.76)
pt3dadd(-48.47, -83.9, -5.7, 3.76)
pt3dadd(-48.51, -84.02, -5.7, 3.76)
pt3dadd(-48.54, -84.14, -5.7, 3.76)
pt3dadd(-48.58, -84.29, -5.7, 3.76)
pt3dadd(-48.61, -84.41, -5.7, 3.76)
pt3dadd(-48.65, -84.49, -5.7, 3.76)
pt3dadd(-48.68, -84.61, -5.7, 3.76)
pt3dadd(-48.75, -84.73, -5.7, 3.76)
pt3dadd(-48.79, -84.81, -5.7, 3.76)
pt3dadd(-48.86, -84.93, -5.7, 3.76)
pt3dadd(-48.89, -85.08, -5.7, 3.76)
pt3dadd(-48.99, -85.32, -5.7, 3.76)
pt3dadd(-49.03, -85.44, -5.7, 3.76)
pt3dadd(-49.1, -85.56, -5.7, 3.76)
pt3dadd(-49.13, -85.64, -5.7, 3.76)
pt3dadd(-49.17, -85.76, -5.7, 3.76)
pt3dadd(-49.21, -85.84, -5.7, 3.76)
pt3dadd(-49.28, -85.96, -5.7, 3.76)
pt3dadd(-49.31, -86.04, -5.7, 3.76)
pt3dadd(-49.35, -86.15, -5.7, 3.76)
pt3dadd(-49.42, -86.27, -5.7, 3.76)
pt3dadd(-49.45, -86.35, -5.7, 3.76)
pt3dadd(-49.48, -86.43, -5.7, 3.76)
pt3dadd(-49.52, -86.51, -5.7, 3.76)
pt3dadd(-49.62, -86.71, -5.7, 3.76)
pt3dadd(-49.66, -86.79, -5.7, 3.76)
pt3dadd(-49.69, -86.86, -5.7, 3.76)
pt3dadd(-49.76, -86.94, -5.7, 3.76)
pt3dadd(-49.8, -87.07, -5.7, 3.76)
pt3dadd(-49.87, -87.22, -5.7, 3.76)
pt3dadd(-49.94, -87.34, -5.7, 3.76)
pt3dadd(-49.97, -87.46, -5.7, 3.76)
pt3dadd(-50.04, -87.58, -5.7, 3.76)
pt3dadd(-50.11, -87.7, -5.7, 3.76)
pt3dadd(-50.15, -87.82, -5.7, 3.76)
pt3dadd(-50.25, -87.97, -5.7, 3.76)
pt3dadd(-50.28, -88.09, -5.7, 3.76)
pt3dadd(-50.32, -88.21, -5.7, 3.76)
pt3dadd(-50.39, -88.33, -5.7, 3.76)
pt3dadd(-50.42, -88.41, -5.7, 3.76)
pt3dadd(-50.46, -88.49, -5.7, 3.76)
pt3dadd(-50.53, -88.57, -5.7, 3.76)
pt3dadd(-50.56, -88.65, -5.7, 3.76)
pt3dadd(-50.6, -88.69, -5.7, 3.76)
pt3dadd(-50.63, -88.72, -5.7, 3.76)
pt3dadd(-50.63, -88.65, -5.7, 3.76)
pt3dadd(-50.46, -88.41, -8.7, 3.76)
pt3dadd(-50.53, -88.45, -8.7, 3.76)
pt3dadd(-50.6, -88.49, -8.7, 3.76)
pt3dadd(-50.74, -88.65, -8.7, 3.76)
pt3dadd(-50.77, -88.69, -8.7, 3.76)
pt3dadd(-50.81, -88.76, -8.7, 3.76)
pt3dadd(-50.84, -88.85, -8.7, 3.76)
pt3dadd(-50.88, -88.92, -8.7, 3.76)
pt3dadd(-50.91, -89, -8.7, 3.76)
pt3dadd(-50.98, -89.08, -8.7, 3.76)
pt3dadd(-51.02, -89.16, -8.7, 3.76)
pt3dadd(-51.05, -89.28, -8.7, 3.76)
pt3dadd(-51.12, -89.36, -8.7, 3.76)
pt3dadd(-51.15, -89.44, -8.7, 3.76)
pt3dadd(-51.19, -89.52, -8.7, 3.76)
pt3dadd(-51.26, -89.64, -8.7, 3.76)
pt3dadd(-51.29, -89.75, -8.7, 3.76)
pt3dadd(-51.4, -89.87, -8.7, 3.76)
pt3dadd(-51.44, -89.99, -8.7, 3.76)
pt3dadd(-51.47, -90.03, -8.7, 3.76)
pt3dadd(-51.54, -90.15, -8.7, 3.76)
pt3dadd(-51.58, -90.23, -8.7, 3.76)
pt3dadd(-51.64, -90.39, -8.7, 3.76)
pt3dadd(-51.68, -90.51, -8.7, 3.76)
pt3dadd(-51.75, -90.58, -8.7, 3.76)
pt3dadd(-51.78, -90.67, -8.7, 3.76)
pt3dadd(-51.85, -90.82, -8.7, 3.76)
pt3dadd(-51.89, -90.9, -8.7, 3.76)
pt3dadd(-51.92, -90.98, -8.7, 3.76)
pt3dadd(-51.99, -91.06, -8.7, 3.76)
pt3dadd(-52.03, -91.14, -8.7, 3.76)
pt3dadd(-52.1, -91.3, -8.7, 3.76)
pt3dadd(-52.17, -91.38, -8.7, 3.76)
pt3dadd(-52.24, -91.46, -8.7, 3.76)
pt3dadd(-52.27, -91.57, -8.7, 3.76)
pt3dadd(-52.31, -91.69, -8.7, 3.76)
pt3dadd(-52.38, -91.77, -8.7, 3.76)
pt3dadd(-52.44, -91.89, -8.7, 3.76)
pt3dadd(-52.51, -91.97, -8.7, 3.76)
pt3dadd(-52.58, -92.05, -8.7, 3.76)
pt3dadd(-52.65, -92.13, -8.7, 3.76)
pt3dadd(-52.72, -92.21, -8.7, 3.76)
pt3dadd(-52.76, -92.29, -8.7, 3.76)
pt3dadd(-52.93, -92.49, -8.7, 3.76)
pt3dadd(-53, -92.57, -8.7, 3.76)
pt3dadd(-53.07, -92.64, -8.7, 3.76)
pt3dadd(-53.24, -92.84, -8.7, 3.76)
pt3dadd(-53.28, -92.92, -8.7, 3.76)
pt3dadd(-53.31, -92.96, -8.7, 3.76)
pt3dadd(-53.38, -93, -8.7, 3.76)
pt3dadd(-53.49, -93, -8.7, 3.76)
pt3dadd(-53.49, -92.72, -8.7, 3.76)
pt3dadd(-53.46, -92.64, -8.7, 3.76)
pt3dadd(-53.42, -92.76, -9.7, 3.76)
pt3dadd(-53.46, -92.8, -9.7, 3.76)
pt3dadd(-53.49, -92.84, -9.7, 3.76)
pt3dadd(-53.53, -92.88, -9.7, 3.76)
pt3dadd(-53.6, -92.92, -9.7, 3.76)
pt3dadd(-53.63, -93, -9.7, 3.76)
pt3dadd(-53.67, -93.04, -9.7, 3.76)
pt3dadd(-53.7, -93.12, -9.7, 3.76)
pt3dadd(-53.77, -93.16, -9.7, 3.76)
pt3dadd(-53.8, -93.2, -9.7, 3.76)
pt3dadd(-53.84, -93.32, -9.7, 3.76)
pt3dadd(-53.87, -93.39, -9.7, 3.76)
pt3dadd(-53.94, -93.43, -9.7, 3.76)
pt3dadd(-53.98, -93.51, -9.7, 3.76)
pt3dadd(-54.08, -93.63, -9.7, 3.76)
pt3dadd(-54.15, -93.71, -9.7, 3.76)
pt3dadd(-54.22, -93.83, -9.7, 3.76)
pt3dadd(-54.29, -93.91, -9.7, 3.76)
pt3dadd(-54.36, -93.99, -9.7, 3.76)
pt3dadd(-54.4, -94.07, -9.7, 3.76)
pt3dadd(-54.47, -94.19, -9.7, 3.76)
pt3dadd(-54.53, -94.26, -9.7, 3.76)
pt3dadd(-54.67, -94.43, -9.7, 3.76)
pt3dadd(-54.71, -94.5, -9.7, 3.76)
pt3dadd(-54.78, -94.62, -9.7, 3.76)
pt3dadd(-54.85, -94.7, -9.7, 3.76)
pt3dadd(-54.88, -94.78, -9.7, 3.76)
pt3dadd(-54.95, -94.86, -9.7, 3.76)
pt3dadd(-54.99, -94.98, -9.7, 3.76)
pt3dadd(-55.06, -95.06, -9.7, 3.76)
pt3dadd(-55.09, -95.14, -9.7, 3.76)
pt3dadd(-55.13, -95.21, -9.7, 3.76)
pt3dadd(-55.16, -95.29, -9.7, 3.76)
pt3dadd(-55.23, -95.33, -9.7, 3.76)
pt3dadd(-55.27, -95.41, -9.7, 3.76)
pt3dadd(-55.3, -95.49, -9.7, 3.76)
pt3dadd(-55.34, -95.57, -9.7, 3.76)
pt3dadd(-55.4, -95.65, -9.7, 3.76)
pt3dadd(-55.44, -95.73, -9.7, 3.76)
pt3dadd(-55.51, -95.85, -9.7, 3.76)
pt3dadd(-55.54, -95.93, -9.7, 3.76)
pt3dadd(-55.62, -96.13, -9.7, 3.76)
pt3dadd(-55.65, -96.21, -9.7, 3.76)
pt3dadd(-55.69, -96.28, -9.7, 3.76)
pt3dadd(-55.76, -96.36, -9.7, 3.76)
pt3dadd(-55.76, -96.44, -9.7, 3.76)
pt3dadd(-55.83, -96.56, -9.7, 3.76)
pt3dadd(-55.86, -96.6, -9.7, 3.76)
pt3dadd(-55.9, -96.76, -9.7, 3.76)
pt3dadd(-55.96, -96.84, -9.7, 3.76)
pt3dadd(-56, -96.92, -9.7, 3.76)
pt3dadd(-56.03, -97, -9.7, 3.76)
pt3dadd(-56.1, -97.07, -9.7, 3.76)
pt3dadd(-56.14, -97.15, -9.7, 3.76)
pt3dadd(-56.17, -97.23, -9.7, 3.76)
pt3dadd(-56.24, -97.27, -9.7, 3.76)
pt3dadd(-56.24, -97.39, -9.7, 3.76)
pt3dadd(-56.31, -97.47, -9.7, 3.76)
pt3dadd(-56.35, -97.55, -9.7, 3.76)
pt3dadd(-56.38, -97.67, -9.7, 3.76)
}
}
proc shape3d_145() {
dend[97] { pt3dadd(-56.45, -97.71, -9.7, 3.76)
pt3dadd(-56.49, -97.79, -9.7, 3.76)
pt3dadd(-56.56, -97.9, -9.7, 3.76)
pt3dadd(-56.59, -97.94, -9.7, 3.76)
pt3dadd(-56.66, -98.11, -9.7, 3.76)
pt3dadd(-56.69, -98.18, -9.7, 3.76)
pt3dadd(-56.76, -98.3, -9.7, 3.76)
pt3dadd(-56.8, -98.38, -9.7, 3.76)
pt3dadd(-56.83, -98.46, -9.7, 3.76)
pt3dadd(-56.87, -98.54, -9.7, 3.76)
pt3dadd(-56.94, -98.62, -9.7, 3.76)
pt3dadd(-56.94, -98.7, -9.7, 3.76)
pt3dadd(-57.01, -98.86, -9.7, 3.76)
pt3dadd(-57.08, -99.05, -9.7, 3.76)
pt3dadd(-57.11, -99.13, -9.7, 3.76)
pt3dadd(-57.15, -99.25, -9.7, 3.76)
pt3dadd(-57.18, -99.33, -9.7, 3.76)
pt3dadd(-57.18, -99.41, -9.7, 3.76)
pt3dadd(-57.25, -99.53, -9.7, 3.76)
pt3dadd(-57.25, -99.65, -9.7, 3.76)
pt3dadd(-57.29, -99.69, -9.7, 3.76)
pt3dadd(-57.32, -99.81, -9.7, 3.76)
pt3dadd(-57.36, -99.93, -9.7, 3.76)
pt3dadd(-57.39, -99.96, -9.7, 3.76)
pt3dadd(-57.43, -100.04, -9.7, 3.76)
pt3dadd(-57.46, -100.2, -9.7, 3.76)
pt3dadd(-57.5, -100.36, -9.7, 3.76)
pt3dadd(-57.53, -100.44, -9.7, 3.76)
pt3dadd(-57.56, -100.56, -9.7, 3.76)
pt3dadd(-57.56, -100.83, -9.7, 3.76)
pt3dadd(-57.6, -100.91, -9.7, 3.76)
pt3dadd(-57.6, -101.15, -9.7, 3.76)
pt3dadd(-57.63, -101.23, -9.7, 3.76)
pt3dadd(-57.63, -101.39, -9.7, 3.76)
pt3dadd(-57.67, -101.43, -9.7, 3.76)
pt3dadd(-57.67, -101.71, -9.7, 3.76)
pt3dadd(-57.71, -101.75, -9.7, 3.76)
pt3dadd(-57.71, -101.9, -9.7, 3.76)
pt3dadd(-57.74, -101.98, -9.7, 3.76)
pt3dadd(-57.78, -102.02, -9.7, 3.76)
pt3dadd(-57.78, -102.1, -9.7, 3.76)
pt3dadd(-57.81, -102.22, -9.7, 3.76)
pt3dadd(-57.85, -102.26, -9.7, 3.76)
pt3dadd(-57.88, -102.34, -9.7, 3.76)
pt3dadd(-57.92, -102.38, -9.7, 3.76)
pt3dadd(-57.95, -102.42, -9.7, 3.76)
pt3dadd(-57.95, -102.5, -9.7, 3.76)
pt3dadd(-57.99, -102.46, -9.7, 3.76)
pt3dadd(-57.99, -102.26, -9.7, 3.76)
pt3dadd(-57.95, -102.22, -9.7, 3.76)
pt3dadd(-59.1, -104, -9.7, 3.76)
pt3dadd(-59.06, -104.08, -9.7, 3.76)
pt3dadd(-59.31, -104.08, -9.7, 3.76)
pt3dadd(-59.38, -104.12, -9.7, 3.76)
pt3dadd(-59.45, -104.2, -9.7, 3.76)
pt3dadd(-59.52, -104.2, -9.7, 3.76)
pt3dadd(-59.59, -104.24, -9.7, 3.76)
pt3dadd(-59.72, -104.24, -9.7, 3.76)
}
dend[98] {pt3dclear()
pt3dadd(33.01, 38.06, -3.7, 4.46)
pt3dadd(32.74, 38.21, -4.7, 4.46)
pt3dadd(32.67, 38.29, -4.7, 4.46)
pt3dadd(32.6, 38.37, -4.7, 4.46)
pt3dadd(32.53, 38.45, -4.7, 4.46)
pt3dadd(32.49, 38.57, -4.7, 4.46)
pt3dadd(32.42, 38.61, -4.7, 4.46)
pt3dadd(32.39, 38.65, -4.7, 4.46)
pt3dadd(32.35, 38.69, -4.7, 4.46)
pt3dadd(32.32, 38.77, -4.7, 4.46)
pt3dadd(32.28, 38.81, -4.7, 4.46)
pt3dadd(32.25, 38.85, -4.7, 4.46)
pt3dadd(32.21, 38.88, -4.7, 4.46)
pt3dadd(32.14, 38.88, -4.7, 4.46)
pt3dadd(32.11, 38.92, -4.7, 4.46)
pt3dadd(32.07, 38.97, -4.7, 4.46)
pt3dadd(32, 39.01, -4.7, 4.46)
pt3dadd(31.93, 39.01, -4.7, 4.46)
pt3dadd(31.86, 39.04, -4.7, 4.46)
pt3dadd(30.4, 39.04, -4.7, 4.46)
pt3dadd(30.23, 39.01, -4.7, 3.34)
pt3dadd(30.09, 39.01, -4.7, 3.34)
pt3dadd(30.02, 38.97, -4.7, 3.34)
pt3dadd(29.98, 38.92, -4.7, 3.34)
pt3dadd(29.88, 38.92, -4.7, 3.34)
pt3dadd(29.84, 38.88, -4.7, 3.34)
pt3dadd(29.57, 38.88, -4.7, 3.34)
pt3dadd(29.53, 38.85, -4.7, 3.34)
pt3dadd(29.46, 38.85, -4.7, 3.34)
pt3dadd(29.42, 38.81, -4.7, 3.34)
pt3dadd(28.8, 38.81, -4.7, 3.34)
pt3dadd(28.76, 38.77, -4.7, 3.34)
pt3dadd(28.69, 38.77, -4.7, 3.34)
pt3dadd(28.66, 38.73, -4.7, 3.34)
pt3dadd(28.59, 38.69, -4.7, 3.34)
pt3dadd(28.56, 38.65, -4.7, 3.34)
pt3dadd(28.49, 38.61, -4.7, 3.34)
pt3dadd(28.42, 38.61, -4.7, 3.34)
pt3dadd(28.34, 38.57, -4.7, 3.34)
pt3dadd(28.27, 38.57, -4.7, 3.34)
pt3dadd(28.2, 38.53, -4.7, 3.34)
pt3dadd(28.17, 38.49, -4.7, 3.34)
pt3dadd(28.14, 38.45, -4.7, 3.34)
pt3dadd(28.1, 38.41, -4.7, 3.34)
pt3dadd(27.96, 38.41, -4.7, 3.34)
pt3dadd(27.93, 38.37, -4.7, 3.34)
pt3dadd(27.86, 38.37, -4.7, 3.34)
pt3dadd(27.79, 38.33, -4.7, 3.34)
pt3dadd(27.75, 38.29, -4.7, 3.34)
pt3dadd(27.68, 38.25, -4.7, 3.34)
pt3dadd(27.61, 38.21, -4.7, 3.34)
pt3dadd(27.55, 38.17, -4.7, 3.34)
pt3dadd(27.51, 38.13, -4.7, 3.34)
pt3dadd(27.44, 38.1, -4.7, 3.34)
pt3dadd(27.37, 38.1, -4.7, 3.34)
pt3dadd(27.33, 38.06, -4.7, 3.34)
pt3dadd(27.26, 38.06, -4.7, 3.34)
pt3dadd(27.23, 38.01, -4.7, 3.34)
pt3dadd(27.19, 37.97, -4.7, 3.34)
pt3dadd(27.13, 37.94, -4.7, 3.34)
pt3dadd(27.09, 37.9, -4.7, 3.34)
pt3dadd(27.02, 37.9, -4.7, 3.34)
pt3dadd(26.99, 37.86, -4.7, 3.34)
pt3dadd(26.92, 37.82, -4.7, 3.34)
pt3dadd(26.85, 37.82, -4.7, 3.34)
pt3dadd(26.81, 37.78, -4.7, 3.34)
pt3dadd(26.78, 37.74, -4.7, 3.34)
pt3dadd(26.74, 37.7, -4.7, 3.34)
pt3dadd(26.67, 37.66, -4.7, 3.34)
pt3dadd(26.53, 37.66, -4.7, 3.34)
pt3dadd(26.5, 37.62, -4.7, 3.34)
pt3dadd(26.43, 37.62, -4.7, 3.34)
pt3dadd(26.4, 37.58, -4.7, 3.34)
pt3dadd(26.36, 37.54, -4.7, 3.34)
pt3dadd(26.29, 37.54, -4.7, 3.34)
pt3dadd(26.25, 37.5, -4.7, 3.34)
pt3dadd(26.22, 37.46, -4.7, 3.34)
pt3dadd(26.15, 37.42, -4.7, 3.34)
pt3dadd(26.08, 37.34, -4.7, 3.34)
pt3dadd(26.01, 37.3, -4.7, 3.34)
pt3dadd(25.94, 37.3, -4.7, 3.34)
pt3dadd(25.91, 37.26, -4.7, 3.34)
pt3dadd(25.84, 37.22, -4.7, 3.34)
pt3dadd(25.8, 37.15, -4.7, 3.34)
pt3dadd(25.73, 37.1, -4.7, 3.34)
pt3dadd(25.66, 37.03, -4.7, 3.34)
pt3dadd(25.59, 36.95, -4.7, 3.34)
pt3dadd(25.56, 36.91, -4.7, 3.34)
pt3dadd(25.49, 36.83, -4.7, 3.34)
pt3dadd(25.45, 36.79, -4.7, 3.34)
pt3dadd(25.39, 36.71, -4.7, 3.34)
pt3dadd(25.32, 36.63, -4.7, 3.34)
pt3dadd(25.21, 36.51, -4.7, 3.34)
pt3dadd(25.14, 36.43, -4.7, 3.34)
pt3dadd(25.07, 36.35, -4.7, 3.34)
pt3dadd(25.03, 36.28, -4.7, 3.34)
pt3dadd(24.93, 36.19, -4.7, 3.34)
pt3dadd(24.9, 36.12, -4.7, 3.34)
pt3dadd(24.83, 36.08, -4.7, 3.34)
pt3dadd(24.79, 36.04, -4.7, 3.34)
pt3dadd(24.72, 35.96, -4.7, 3.34)
pt3dadd(24.69, 35.88, -4.7, 3.34)
pt3dadd(24.62, 35.84, -4.7, 3.34)
pt3dadd(24.55, 35.76, -4.7, 3.34)
pt3dadd(24.51, 35.68, -4.7, 3.34)
pt3dadd(24.44, 35.64, -4.7, 3.34)
pt3dadd(24.38, 35.64, -4.7, 3.34)
pt3dadd(24.27, 35.56, -4.7, 3.34)
pt3dadd(24.24, 35.48, -4.7, 3.34)
pt3dadd(24.17, 35.44, -4.7, 3.34)
pt3dadd(24.06, 35.37, -4.7, 3.34)
pt3dadd(24.02, 35.28, -4.7, 3.34)
pt3dadd(23.99, 35.24, -4.7, 3.34)
pt3dadd(23.92, 35.21, -4.7, 3.34)
pt3dadd(23.89, 35.13, -4.7, 3.34)
pt3dadd(23.85, 35.09, -4.7, 3.34)
pt3dadd(23.78, 35.05, -4.7, 3.34)
pt3dadd(23.75, 34.97, -4.7, 3.34)
pt3dadd(23.71, 34.93, -4.7, 3.34)
pt3dadd(23.64, 34.89, -4.7, 3.34)
pt3dadd(23.61, 34.81, -4.7, 3.34)
pt3dadd(23.54, 34.81, -4.7, 3.34)
pt3dadd(23.5, 34.77, -4.7, 3.34)
pt3dadd(23.43, 34.73, -4.7, 3.34)
pt3dadd(23.4, 34.69, -4.7, 3.34)
pt3dadd(23.36, 34.65, -4.7, 3.34)
pt3dadd(23.33, 34.61, -4.7, 3.34)
pt3dadd(23.26, 34.57, -4.7, 3.34)
pt3dadd(23.08, 34.57, -4.7, 3.34)
pt3dadd(23.33, 34.69, -6.7, 3.34)
pt3dadd(23.26, 34.69, -6.7, 3.34)
pt3dadd(23.19, 34.65, -6.7, 3.34)
pt3dadd(23.16, 34.57, -6.7, 3.34)
pt3dadd(23.12, 34.53, -6.7, 3.34)
pt3dadd(23.05, 34.53, -6.7, 3.34)
pt3dadd(23.01, 34.49, -6.7, 3.34)
pt3dadd(22.98, 34.42, -6.7, 3.34)
pt3dadd(22.91, 34.38, -6.7, 3.34)
pt3dadd(22.88, 34.29, -6.7, 3.34)
pt3dadd(22.81, 34.26, -6.7, 3.34)
pt3dadd(22.77, 34.22, -6.7, 3.34)
pt3dadd(22.7, 34.14, -6.7, 3.34)
}
}
proc shape3d_146() {
dend[98] { pt3dadd(22.67, 34.06, -6.7, 3.34)
pt3dadd(22.56, 33.98, -6.7, 3.34)
pt3dadd(22.53, 33.94, -6.7, 3.34)
pt3dadd(22.49, 33.9, -6.7, 3.34)
pt3dadd(22.42, 33.82, -6.7, 3.34)
pt3dadd(22.35, 33.74, -6.7, 3.34)
pt3dadd(22.32, 33.66, -6.7, 3.34)
pt3dadd(22.25, 33.58, -6.7, 3.34)
pt3dadd(22.22, 33.54, -6.7, 3.34)
pt3dadd(22.11, 33.47, -6.7, 3.34)
pt3dadd(22.08, 33.38, -6.7, 3.34)
pt3dadd(22, 33.35, -6.7, 3.34)
pt3dadd(21.93, 33.27, -6.7, 3.34)
pt3dadd(21.86, 33.19, -6.7, 3.34)
pt3dadd(21.8, 33.11, -6.7, 3.34)
pt3dadd(21.73, 33.03, -6.7, 3.34)
pt3dadd(21.62, 32.95, -6.7, 3.34)
pt3dadd(21.55, 32.83, -6.7, 3.34)
pt3dadd(21.45, 32.75, -6.7, 3.34)
pt3dadd(21.34, 32.63, -6.7, 3.34)
pt3dadd(21.27, 32.6, -6.7, 3.34)
pt3dadd(21.1, 32.4, -6.7, 3.34)
pt3dadd(21, 32.28, -6.7, 3.34)
pt3dadd(20.89, 32.2, -6.7, 3.34)
pt3dadd(20.78, 32.08, -6.7, 3.34)
pt3dadd(20.72, 32.04, -6.7, 3.34)
pt3dadd(20.61, 31.92, -6.7, 3.34)
pt3dadd(20.51, 31.88, -6.7, 3.34)
pt3dadd(20.44, 31.8, -6.7, 3.34)
pt3dadd(20.3, 31.65, -6.7, 3.34)
pt3dadd(20.23, 31.57, -6.7, 3.34)
pt3dadd(20.12, 31.49, -6.7, 3.34)
pt3dadd(20.06, 31.41, -6.7, 3.34)
pt3dadd(19.99, 31.33, -6.7, 3.34)
pt3dadd(19.95, 31.29, -6.7, 3.34)
pt3dadd(19.88, 31.25, -6.7, 3.34)
pt3dadd(19.81, 31.21, -6.7, 3.34)
pt3dadd(19.7, 31.21, -6.7, 3.34)
pt3dadd(19.67, 31.29, -10.7, 3.34)
pt3dadd(19.64, 31.25, -10.7, 3.34)
pt3dadd(19.53, 31.25, -10.7, 3.34)
pt3dadd(19.5, 31.21, -10.7, 3.34)
pt3dadd(19.43, 31.17, -10.7, 3.34)
pt3dadd(19.36, 31.13, -10.7, 3.34)
pt3dadd(19.29, 31.13, -10.7, 3.34)
pt3dadd(19.25, 31.09, -10.7, 3.34)
pt3dadd(19.18, 31.05, -10.7, 3.34)
pt3dadd(19.08, 31.05, -10.7, 3.34)
pt3dadd(18.98, 31.01, -10.7, 3.34)
pt3dadd(18.91, 30.97, -10.7, 3.34)
pt3dadd(18.8, 30.97, -10.7, 3.34)
pt3dadd(18.76, 30.93, -10.7, 3.34)
pt3dadd(18.69, 30.93, -10.7, 3.34)
pt3dadd(18.63, 30.89, -10.7, 3.34)
pt3dadd(18.56, 30.89, -10.7, 3.34)
pt3dadd(18.49, 30.85, -10.7, 3.34)
pt3dadd(18.38, 30.85, -10.7, 3.34)
pt3dadd(18.28, 30.77, -10.7, 3.34)
pt3dadd(18.03, 30.77, -10.7, 3.34)
pt3dadd(18, 30.74, -10.7, 3.34)
pt3dadd(17.9, 30.69, -10.7, 3.34)
pt3dadd(16.01, 30.69, -10.7, 3.34)
}
dend[99] {pt3dclear()
pt3dadd(39.01, 56.26, -3.7, 4.74)
pt3dadd(38.59, 55.94, 0.3, 4.74)
pt3dadd(36.36, 55.94, 0.3, 4.74)
pt3dadd(36.22, 55.86, 0.3, 4.74)
pt3dadd(36.08, 55.78, 0.3, 4.74)
pt3dadd(36.01, 55.7, 0.3, 4.74)
pt3dadd(35.87, 55.7, 0.3, 4.74)
pt3dadd(35.73, 55.54, 0.3, 4.74)
pt3dadd(35.66, 55.47, 0.3, 4.74)
pt3dadd(35.59, 55.38, 0.3, 4.74)
pt3dadd(35.45, 55.31, 0.3, 4.74)
pt3dadd(35.38, 55.23, 0.3, 4.74)
pt3dadd(35.24, 55.15, 0.3, 4.74)
pt3dadd(35.1, 55.07, 0.3, 4.74)
pt3dadd(35.03, 54.99, 0.3, 4.74)
pt3dadd(34.9, 54.91, 0.3, 4.74)
pt3dadd(34.83, 54.83, 0.3, 4.74)
pt3dadd(34.69, 54.75, 0.3, 4.74)
pt3dadd(34.48, 54.75, 0.3, 4.74)
pt3dadd(34.34, 54.67, 0.3, 4.74)
pt3dadd(33.99, 54.67, 0.3, 4.74)
pt3dadd(33.92, 54.6, 0.3, 4.74)
pt3dadd(32.39, 54.6, 0.3, 4.74)
pt3dadd(32.25, 54.51, 0.3, 4.74)
pt3dadd(32.11, 54.44, 0.3, 4.74)
pt3dadd(32.04, 54.36, 0.3, 4.74)
pt3dadd(31.9, 54.28, 0.3, 4.74)
pt3dadd(31.69, 54.28, 0.3, 4.74)
pt3dadd(31.62, 54.2, 0.3, 4.74)
pt3dadd(31.34, 54.2, 0.3, 4.74)
pt3dadd(31.27, 54.12, 0.3, 4.74)
pt3dadd(31.2, 54.04, 0.3, 4.74)
pt3dadd(30.92, 54.04, 0.3, 4.74)
pt3dadd(30.85, 53.96, 0.3, 4.74)
pt3dadd(30.78, 53.88, 0.3, 4.74)
pt3dadd(30.65, 53.8, 0.3, 4.74)
pt3dadd(30.5, 53.72, 0.3, 4.74)
pt3dadd(30.36, 53.65, 0.3, 4.74)
pt3dadd(30.23, 53.49, 0.3, 4.74)
pt3dadd(30.09, 53.49, 0.3, 4.74)
pt3dadd(30.02, 53.41, 0.3, 4.74)
pt3dadd(29.95, 53.33, 0.3, 4.74)
pt3dadd(29.81, 53.33, 0.3, 4.74)
pt3dadd(29.74, 53.25, 0.3, 4.74)
pt3dadd(29.67, 53.17, 0.3, 4.74)
pt3dadd(29.53, 53.17, 0.3, 4.74)
pt3dadd(29.46, 53.09, 0.3, 4.74)
pt3dadd(29.39, 53.01, 0.3, 4.74)
pt3dadd(29.32, 52.93, 0.3, 4.74)
pt3dadd(29.25, 52.85, 0.3, 4.74)
pt3dadd(29.11, 52.85, 0.3, 4.74)
pt3dadd(28.97, 52.78, 0.3, 4.74)
pt3dadd(28.9, 52.69, 0.3, 4.74)
pt3dadd(28.83, 52.62, 0.3, 4.74)
pt3dadd(28.76, 52.54, 0.3, 4.74)
pt3dadd(28.69, 52.46, 0.3, 4.74)
pt3dadd(28.56, 52.46, 0.3, 4.74)
pt3dadd(28.49, 52.38, 0.3, 4.74)
pt3dadd(28.27, 52.38, 0.3, 4.74)
pt3dadd(28.2, 52.3, 0.3, 4.74)
pt3dadd(28, 52.22, 0.3, 4.74)
pt3dadd(27.86, 52.14, 0.3, 4.74)
pt3dadd(27.79, 52.06, 0.3, 4.74)
pt3dadd(27.72, 51.98, 0.3, 4.74)
pt3dadd(27.65, 51.9, 0.3, 4.74)
pt3dadd(27.51, 51.9, 0.3, 4.74)
pt3dadd(27.37, 51.83, 0.3, 4.74)
pt3dadd(27.3, 51.74, 0.3, 4.74)
pt3dadd(27.16, 51.74, 0.3, 4.74)
pt3dadd(27.02, 51.59, 0.3, 4.74)
pt3dadd(26.88, 51.51, 0.3, 4.74)
pt3dadd(26.74, 51.43, 0.3, 4.74)
pt3dadd(26.25, 51.43, 0.3, 4.74)
pt3dadd(26.18, 51.35, 0.3, 4.74)
pt3dadd(25.98, 51.35, 0.3, 4.74)
pt3dadd(25.91, 51.27, 0.3, 4.74)
pt3dadd(25.84, 51.19, 0.3, 4.74)
pt3dadd(25.77, 51.11, 0.3, 4.74)
pt3dadd(25.7, 51.03, 0.3, 4.74)
pt3dadd(25.63, 50.96, 0.3, 4.74)
pt3dadd(25.56, 50.88, 0.3, 4.74)
pt3dadd(25.42, 50.79, 0.3, 4.74)
pt3dadd(25.28, 50.79, 0.3, 4.74)
pt3dadd(25.21, 50.72, 0.3, 4.74)
pt3dadd(25.14, 50.64, 0.3, 4.74)
pt3dadd(25.07, 50.56, 0.3, 4.74)
pt3dadd(24.93, 50.56, 0.3, 4.74)
pt3dadd(24.86, 50.48, 0.3, 4.74)
pt3dadd(24.79, 50.4, 0.3, 4.74)
pt3dadd(24.72, 50.32, 0.3, 4.74)
pt3dadd(24.65, 50.24, 0.3, 4.74)
pt3dadd(24.51, 50.24, 0.3, 4.74)
pt3dadd(24.38, 50.16, 0.3, 4.74)
pt3dadd(24.24, 50.08, 0.3, 4.74)
pt3dadd(24.17, 50.01, 0.3, 4.74)
pt3dadd(24.02, 49.85, 0.3, 4.74)
pt3dadd(23.95, 49.77, 0.3, 4.74)
pt3dadd(23.82, 49.69, 0.3, 4.74)
pt3dadd(23.75, 49.53, 0.3, 4.74)
pt3dadd(23.61, 49.37, 0.3, 4.74)
pt3dadd(23.54, 49.29, 0.3, 4.74)
pt3dadd(23.4, 49.13, 0.3, 4.74)
pt3dadd(23.33, 48.97, 0.3, 4.74)
pt3dadd(23.26, 48.9, 0.3, 4.74)
pt3dadd(23.12, 48.82, 0.3, 4.74)
pt3dadd(23.12, 48.66, 0.3, 4.74)
pt3dadd(23.05, 48.58, 0.3, 4.74)
pt3dadd(22.91, 48.5, 0.3, 4.74)
pt3dadd(22.84, 48.34, 0.3, 4.74)
pt3dadd(22.77, 48.26, 0.3, 4.74)
pt3dadd(22.63, 48.1, 0.3, 4.74)
pt3dadd(22.56, 48.03, 0.3, 4.74)
pt3dadd(22.42, 47.95, 0.3, 4.74)
pt3dadd(22.35, 47.87, 0.3, 4.74)
pt3dadd(22.28, 47.71, 0.3, 4.74)
pt3dadd(22.15, 47.63, 0.3, 4.74)
pt3dadd(22.08, 47.55, 0.3, 4.74)
pt3dadd(21.93, 47.39, 0.3, 4.74)
pt3dadd(21.8, 47.15, 0.3, 4.74)
pt3dadd(21.73, 47.08, 0.3, 4.74)
pt3dadd(21.66, 46.92, 0.3, 4.74)
pt3dadd(21.52, 46.84, 0.3, 4.74)
pt3dadd(21.45, 46.68, 0.3, 4.74)
pt3dadd(21.38, 46.52, 0.3, 4.74)
pt3dadd(21.24, 46.44, 0.3, 4.74)
pt3dadd(20.96, 46.13, 0.3, 4.74)
pt3dadd(20.89, 45.97, 0.3, 4.74)
pt3dadd(20.75, 45.81, 0.3, 4.74)
pt3dadd(20.68, 45.73, 0.3, 4.74)
pt3dadd(20.61, 45.57, 0.3, 4.74)
pt3dadd(20.4, 45.33, 0.3, 4.74)
pt3dadd(20.33, 45.26, 0.3, 4.74)
pt3dadd(20.26, 45.18, 0.3, 4.74)
pt3dadd(20.19, 45.02, 0.3, 4.74)
pt3dadd(19.99, 44.78, 0.3, 4.74)
pt3dadd(19.84, 44.62, 0.3, 4.74)
pt3dadd(19.77, 44.47, 0.3, 4.74)
pt3dadd(19.64, 44.31, 0.3, 4.74)
}
}
proc shape3d_147() {
dend[99] { pt3dadd(19.57, 44.23, 0.3, 4.74)
pt3dadd(19.22, 43.83, 0.3, 4.74)
pt3dadd(19.08, 43.67, 0.3, 4.74)
pt3dadd(18.94, 43.51, 0.3, 4.74)
pt3dadd(18.8, 43.36, 0.3, 4.74)
pt3dadd(18.52, 43.04, 0.3, 4.74)
pt3dadd(18.38, 42.96, 0.3, 4.74)
pt3dadd(18.31, 42.8, 0.3, 4.74)
pt3dadd(18.1, 42.72, 0.3, 4.74)
pt3dadd(17.96, 42.56, 0.3, 4.74)
pt3dadd(17.83, 42.49, 0.3, 4.74)
pt3dadd(17.75, 42.41, 0.3, 4.74)
pt3dadd(17.61, 42.25, 0.3, 4.74)
pt3dadd(17.41, 42.01, 0.3, 4.74)
pt3dadd(17.27, 41.93, 0.3, 4.74)
pt3dadd(17.06, 41.78, 0.3, 4.74)
pt3dadd(16.85, 41.62, 0.3, 4.74)
pt3dadd(16.5, 41.22, 0.3, 4.74)
pt3dadd(16.36, 40.98, 0.3, 4.74)
pt3dadd(16.22, 40.9, 0.3, 4.74)
pt3dadd(16.08, 40.74, 0.3, 4.74)
pt3dadd(15.94, 40.59, 0.3, 4.74)
pt3dadd(15.8, 40.51, 0.3, 4.74)
pt3dadd(15.66, 40.35, 0.3, 4.74)
pt3dadd(15.6, 40.19, 0.3, 4.74)
pt3dadd(15.45, 40.11, 0.3, 4.74)
pt3dadd(15.24, 39.96, 0.3, 4.74)
pt3dadd(15.18, 39.79, 0.3, 4.74)
pt3dadd(15.11, 39.72, 0.3, 4.74)
pt3dadd(14.83, 39.4, 0.3, 4.74)
pt3dadd(14.69, 39.32, 0.3, 4.74)
pt3dadd(14.62, 39.24, 0.3, 4.74)
pt3dadd(14.41, 39.01, 0.3, 4.74)
pt3dadd(14.34, 38.92, 0.3, 4.74)
pt3dadd(14.27, 38.77, 0.3, 4.74)
pt3dadd(14.13, 38.61, 0.3, 4.74)
pt3dadd(14.06, 38.45, 0.3, 4.74)
pt3dadd(13.92, 38.37, 0.3, 4.74)
pt3dadd(13.64, 38.06, 0.3, 4.74)
pt3dadd(13.57, 37.97, 0.3, 4.74)
pt3dadd(13.51, 37.82, 0.3, 4.74)
pt3dadd(13.36, 37.74, 0.3, 4.74)
pt3dadd(13.3, 37.66, 0.3, 4.74)
pt3dadd(13.23, 37.5, 0.3, 4.74)
pt3dadd(13.15, 37.42, 0.3, 4.74)
pt3dadd(13.09, 37.34, 0.3, 4.74)
pt3dadd(13.02, 37.26, 0.3, 4.74)
pt3dadd(12.95, 37.19, 0.3, 4.74)
pt3dadd(12.88, 37.1, 0.3, 4.74)
pt3dadd(12.81, 37.19, 0.3, 4.74)
pt3dadd(12.88, 37.34, 0.3, 4.74)
pt3dadd(12.88, 37.5, 0.3, 4.74)
pt3dadd(13.02, 37.66, 0.3, 4.74)
pt3dadd(13.09, 37.74, 0.3, 4.74)
pt3dadd(13.02, 37.5, 0.3, 4.18)
pt3dadd(12.88, 37.5, 0.3, 4.18)
pt3dadd(12.74, 37.42, 0.3, 4.18)
pt3dadd(12.74, 37.26, 0.3, 4.18)
pt3dadd(12.6, 37.1, 0.3, 4.18)
pt3dadd(12.53, 36.87, 0.3, 4.18)
pt3dadd(12.46, 36.79, 0.3, 4.18)
pt3dadd(12.39, 36.71, 0.3, 4.18)
pt3dadd(12.39, 36.39, 0.3, 4.18)
pt3dadd(12.32, 36.31, 0.3, 4.18)
pt3dadd(12.32, 35.84, 0.3, 4.18)
pt3dadd(12.25, 35.76, 0.3, 4.18)
pt3dadd(12.25, 35.52, 0.3, 4.18)
pt3dadd(12.18, 35.37, 0.3, 4.18)
pt3dadd(12.18, 35.21, 0.3, 4.18)
pt3dadd(12.11, 35.05, 0.3, 4.18)
pt3dadd(12.04, 34.97, 0.3, 4.18)
pt3dadd(11.97, 34.89, 0.3, 4.18)
pt3dadd(11.97, 34.73, 0.3, 4.18)
pt3dadd(11.83, 34.65, 0.3, 4.18)
pt3dadd(11.76, 34.49, 0.3, 4.18)
pt3dadd(11.62, 34.42, 0.3, 4.18)
pt3dadd(11.55, 34.33, 0.3, 4.18)
pt3dadd(11.41, 34.26, 0.3, 4.18)
pt3dadd(11.35, 34.18, 0.3, 4.18)
pt3dadd(11.27, 34.02, 0.3, 4.18)
pt3dadd(11.2, 33.94, 0.3, 4.18)
pt3dadd(11.14, 33.78, 0.3, 4.18)
pt3dadd(11.06, 33.7, 0.3, 4.18)
pt3dadd(10.93, 33.62, 0.3, 4.18)
pt3dadd(10.86, 33.38, 0.3, 4.18)
pt3dadd(10.79, 33.31, 0.3, 4.18)
pt3dadd(10.72, 33.15, 0.3, 4.18)
pt3dadd(10.65, 32.99, 0.3, 4.18)
pt3dadd(10.51, 32.91, 0.3, 4.18)
pt3dadd(10.51, 32.75, 0.3, 4.18)
pt3dadd(10.37, 32.6, 0.3, 4.18)
pt3dadd(10.3, 32.51, 0.3, 4.18)
pt3dadd(10.3, 32.36, 0.3, 4.18)
pt3dadd(10.16, 32.12, 0.3, 4.18)
pt3dadd(10.16, 31.96, 0.3, 4.18)
pt3dadd(10.09, 31.88, 0.3, 4.18)
pt3dadd(10.02, 31.72, 0.3, 4.18)
pt3dadd(9.95, 31.57, 0.3, 4.18)
pt3dadd(9.95, 31.41, 0.3, 4.18)
pt3dadd(9.88, 31.25, 0.3, 4.18)
pt3dadd(9.81, 31.09, 0.3, 4.18)
pt3dadd(9.74, 30.93, 0.3, 4.18)
pt3dadd(9.67, 30.85, 0.3, 4.18)
pt3dadd(9.6, 30.77, 0.3, 4.18)
pt3dadd(9.6, 30.61, 0.3, 4.18)
pt3dadd(9.53, 30.54, 0.3, 4.18)
pt3dadd(9.46, 30.38, 0.3, 4.18)
pt3dadd(9.32, 30.3, 0.3, 4.18)
pt3dadd(9.26, 30.14, 0.3, 4.18)
pt3dadd(9.19, 29.98, 0.3, 4.18)
pt3dadd(9.11, 29.9, 0.3, 4.18)
pt3dadd(8.98, 29.67, 0.3, 4.18)
pt3dadd(8.9, 29.59, 0.3, 4.18)
pt3dadd(8.84, 29.43, 0.3, 4.18)
pt3dadd(8.77, 29.27, 0.3, 4.18)
pt3dadd(8.7, 29.11, 0.3, 4.18)
pt3dadd(8.63, 29.03, 0.3, 4.18)
pt3dadd(8.56, 28.95, 0.3, 4.18)
pt3dadd(8.49, 28.8, 0.3, 4.18)
pt3dadd(8.35, 28.64, 0.3, 4.18)
pt3dadd(8.28, 28.48, 0.3, 4.18)
pt3dadd(8.21, 28.32, 0.3, 4.18)
pt3dadd(8.14, 28.16, 0.3, 4.18)
pt3dadd(8.07, 28, 0.3, 4.18)
pt3dadd(7.93, 27.77, 0.3, 4.18)
pt3dadd(7.86, 27.61, 0.3, 4.18)
pt3dadd(7.65, 27.37, 0.3, 4.18)
pt3dadd(7.58, 27.21, 0.3, 4.18)
pt3dadd(7.51, 26.98, 0.3, 4.18)
pt3dadd(7.44, 26.82, 0.3, 4.18)
pt3dadd(7.3, 26.66, 0.3, 4.18)
pt3dadd(7.23, 26.58, 0.3, 4.18)
pt3dadd(7.16, 26.34, 0.3, 4.18)
pt3dadd(7.09, 26.26, 0.3, 4.18)
pt3dadd(6.95, 26.18, 0.3, 4.18)
pt3dadd(6.89, 26.02, 0.3, 4.18)
pt3dadd(6.68, 25.79, 0.3, 4.18)
pt3dadd(6.61, 25.71, 0.3, 4.18)
pt3dadd(6.47, 25.47, 0.3, 4.18)
pt3dadd(6.4, 25.39, 0.3, 4.18)
pt3dadd(6.19, 25.16, 0.3, 4.18)
pt3dadd(6.12, 25.08, 0.3, 4.18)
pt3dadd(5.98, 24.92, 0.3, 4.18)
pt3dadd(5.91, 24.76, 0.3, 4.18)
pt3dadd(5.77, 24.6, 0.3, 4.18)
pt3dadd(5.7, 24.44, 0.3, 4.18)
pt3dadd(5.63, 24.36, 0.3, 4.18)
pt3dadd(5.35, 24.05, 0.3, 4.18)
pt3dadd(5.28, 23.89, 0.3, 4.18)
pt3dadd(5.21, 23.81, 0.3, 4.18)
pt3dadd(5.07, 23.73, 0.3, 4.18)
pt3dadd(4.93, 23.57, 0.3, 4.18)
pt3dadd(4.86, 23.49, 0.3, 4.18)
pt3dadd(4.8, 23.33, 0.3, 4.18)
pt3dadd(4.72, 23.25, 0.3, 4.18)
pt3dadd(4.59, 23.25, 0.3, 4.18)
pt3dadd(4.51, 23.18, 0.3, 4.18)
pt3dadd(4.38, 23.1, 0.3, 4.18)
pt3dadd(4.31, 22.94, 0.3, 4.18)
pt3dadd(4.17, 22.86, 0.3, 4.18)
pt3dadd(4.03, 22.78, 0.3, 4.18)
pt3dadd(3.96, 22.7, 0.3, 4.18)
pt3dadd(3.82, 22.54, 0.3, 4.18)
pt3dadd(3.75, 22.47, 0.3, 4.18)
pt3dadd(3.61, 22.31, 0.3, 4.18)
pt3dadd(3.47, 22.23, 0.3, 4.18)
pt3dadd(3.4, 22.07, 0.3, 4.18)
pt3dadd(3.26, 21.91, 0.3, 4.18)
pt3dadd(3.12, 21.83, 0.3, 4.18)
pt3dadd(3.05, 21.67, 0.3, 4.18)
pt3dadd(2.84, 21.59, 0.3, 4.18)
pt3dadd(2.7, 21.36, 0.3, 4.18)
pt3dadd(2.57, 21.28, 0.3, 4.18)
pt3dadd(2.49, 21.2, 0.3, 4.18)
pt3dadd(2.36, 21.12, 0.3, 4.18)
pt3dadd(2.22, 21.12, 0.3, 4.18)
pt3dadd(2.08, 21.04, 0.3, 4.18)
pt3dadd(1.94, 20.96, 0.3, 4.18)
pt3dadd(1.73, 20.8, 0.3, 4.18)
pt3dadd(1.66, 20.65, 0.3, 4.18)
pt3dadd(1.52, 20.57, 0.3, 4.18)
pt3dadd(1.38, 20.49, 0.3, 4.18)
pt3dadd(1.31, 20.41, 0.3, 4.18)
pt3dadd(1.17, 20.41, 0.3, 4.18)
pt3dadd(1.1, 20.33, 0.3, 4.18)
pt3dadd(0.96, 20.25, 0.3, 4.18)
pt3dadd(0.82, 20.17, 0.3, 4.18)
pt3dadd(0.75, 20.01, 0.3, 4.18)
pt3dadd(0.68, 19.93, 0.3, 4.18)
pt3dadd(0.55, 19.85, 0.3, 4.18)
pt3dadd(0.47, 19.77, 0.3, 4.18)
pt3dadd(0.34, 19.69, 0.3, 4.18)
pt3dadd(0.13, 19.46, 0.3, 4.18)
pt3dadd(0.06, 19.38, 0.3, 4.18)
pt3dadd(-0.08, 19.3, 0.3, 4.18)
pt3dadd(-0.15, 19.22, 0.3, 4.18)
pt3dadd(-0.29, 19.22, 0.3, 4.18)
pt3dadd(-0.36, 19.14, 0.3, 4.18)
pt3dadd(-0.5, 19.14, 0.3, 4.18)
pt3dadd(-0.5, 19.46, 0.3, 4.18)
}
}
proc shape3d_148() {
dend[99] { pt3dadd(-0.22, 19.38, 0.3, 4.18)
pt3dadd(-0.36, 19.38, 0.3, 4.18)
pt3dadd(-0.43, 19.3, 0.3, 4.18)
pt3dadd(-0.5, 19.22, 0.3, 4.18)
pt3dadd(-0.57, 19.14, 0.3, 4.18)
pt3dadd(-0.71, 19.06, 0.3, 4.18)
pt3dadd(-0.78, 18.98, 0.3, 4.18)
pt3dadd(-0.85, 18.83, 0.3, 4.18)
pt3dadd(-1.06, 18.59, 0.3, 4.18)
pt3dadd(-1.13, 18.43, 0.3, 4.18)
pt3dadd(-1.2, 18.35, 0.3, 4.18)
pt3dadd(-1.34, 18.19, 0.3, 4.18)
pt3dadd(-1.41, 18.11, 0.3, 4.18)
pt3dadd(-1.62, 17.88, 0.3, 4.18)
pt3dadd(-1.68, 17.8, 0.3, 4.18)
pt3dadd(-1.83, 17.72, 0.3, 4.18)
pt3dadd(-2.1, 17.4, 0.3, 4.18)
pt3dadd(-2.17, 17.24, 0.3, 4.18)
pt3dadd(-2.24, 17.16, 0.3, 4.18)
pt3dadd(-2.31, 17.08, 0.3, 4.18)
pt3dadd(-2.45, 17, 0.3, 4.18)
pt3dadd(-2.59, 16.84, 0.3, 4.18)
pt3dadd(-2.73, 16.69, 0.3, 4.18)
pt3dadd(-2.8, 16.61, 0.3, 4.18)
pt3dadd(-2.8, 16.45, 0.3, 4.18)
pt3dadd(-2.87, 16.37, 0.3, 4.18)
pt3dadd(-2.94, 16.29, 0.3, 4.18)
pt3dadd(-3.01, 16.21, 0.3, 4.18)
pt3dadd(-3.15, 15.98, 0.3, 4.18)
pt3dadd(-3.15, 15.82, 0.3, 4.18)
pt3dadd(-3.29, 15.74, 0.3, 4.18)
pt3dadd(-3.36, 15.5, 0.3, 4.18)
pt3dadd(-3.43, 15.34, 0.3, 4.18)
pt3dadd(-3.57, 15.18, 0.3, 4.18)
pt3dadd(-3.57, 14.94, 0.3, 4.18)
pt3dadd(-3.85, 14.63, 0.3, 4.18)
pt3dadd(-3.91, 14.47, 0.3, 4.18)
pt3dadd(-3.98, 14.31, 0.3, 4.18)
pt3dadd(-4.05, 14.15, 0.3, 4.18)
pt3dadd(-4.26, 14, 0.3, 4.18)
pt3dadd(-4.26, 13.84, 0.3, 4.18)
pt3dadd(-4.4, 13.76, 0.3, 4.18)
pt3dadd(-4.47, 13.6, 0.3, 4.18)
pt3dadd(-4.54, 13.44, 0.3, 4.18)
pt3dadd(-4.68, 13.36, 0.3, 4.18)
pt3dadd(-4.75, 13.2, 0.3, 4.18)
pt3dadd(-4.82, 13.05, 0.3, 4.18)
pt3dadd(-5.03, 12.81, 0.3, 4.18)
pt3dadd(-5.03, 12.65, 0.3, 4.18)
pt3dadd(-5.17, 12.57, 0.3, 4.18)
pt3dadd(-5.24, 12.49, 0.3, 4.18)
pt3dadd(-5.31, 12.34, 0.3, 4.18)
pt3dadd(-5.38, 12.26, 0.3, 4.18)
pt3dadd(-5.52, 12.1, 0.3, 4.18)
pt3dadd(-5.59, 12.02, 0.3, 4.18)
pt3dadd(-5.73, 11.86, 0.3, 4.18)
pt3dadd(-5.8, 11.78, 0.3, 4.18)
pt3dadd(-5.93, 11.7, 0.3, 4.18)
pt3dadd(-6.01, 11.62, 0.3, 4.18)
pt3dadd(-6.01, 11.47, 0.3, 4.18)
pt3dadd(-6.22, 11.31, 0.3, 4.18)
pt3dadd(-6.28, 11.15, 0.3, 4.18)
pt3dadd(-6.42, 10.99, 0.3, 4.18)
pt3dadd(-6.56, 10.83, 0.3, 4.18)
pt3dadd(-6.63, 10.75, 0.3, 4.18)
pt3dadd(-6.63, 10.59, 0.3, 4.18)
pt3dadd(-6.77, 10.52, 0.3, 4.18)
pt3dadd(-6.84, 10.44, 0.3, 4.18)
pt3dadd(-6.91, 10.28, 0.3, 4.18)
pt3dadd(-6.98, 10.2, 0.3, 4.18)
pt3dadd(-7.12, 10.12, 0.3, 4.18)
pt3dadd(-7.26, 9.96, 0.3, 4.18)
pt3dadd(-7.33, 9.88, 0.3, 4.18)
pt3dadd(-7.4, 9.72, 0.3, 4.18)
pt3dadd(-7.54, 9.56, 0.3, 4.18)
pt3dadd(-7.61, 9.41, 0.3, 4.18)
pt3dadd(-7.95, 9.01, 0.3, 4.18)
pt3dadd(-8.02, 8.93, 0.3, 4.18)
pt3dadd(-8.1, 8.77, 0.3, 4.18)
pt3dadd(-8.16, 8.61, 0.3, 4.18)
pt3dadd(-8.23, 8.46, 0.3, 4.18)
pt3dadd(-8.38, 8.3, 0.3, 4.18)
pt3dadd(-8.44, 8.14, 0.3, 4.18)
pt3dadd(-8.58, 7.9, 0.3, 4.18)
pt3dadd(-8.65, 7.82, 0.3, 4.18)
pt3dadd(-8.72, 7.74, 0.3, 4.18)
pt3dadd(-8.86, 7.59, 0.3, 4.18)
pt3dadd(-8.93, 7.43, 0.3, 4.18)
pt3dadd(-9.21, 7.11, 0.3, 4.18)
pt3dadd(-9.28, 7.03, 0.3, 4.18)
pt3dadd(-9.35, 6.95, 0.3, 4.18)
pt3dadd(-9.49, 6.95, 0.3, 4.18)
pt3dadd(-9.56, 6.88, 0.3, 4.18)
pt3dadd(-9.63, 6.72, 0.3, 4.18)
pt3dadd(-9.77, 6.64, 0.3, 4.18)
pt3dadd(-9.84, 6.48, 0.3, 4.18)
pt3dadd(-9.91, 6.4, 0.3, 4.18)
pt3dadd(-10.05, 6.32, 0.3, 4.18)
pt3dadd(-10.05, 6.16, 0.3, 4.18)
pt3dadd(-10.19, 6.16, 0.3, 4.18)
pt3dadd(-10.26, 6, 0.3, 4.18)
pt3dadd(-10.4, 5.84, 0.3, 4.18)
pt3dadd(-10.47, 5.69, 0.3, 4.18)
pt3dadd(-10.53, 5.53, 0.3, 4.18)
pt3dadd(-10.6, 5.45, 0.3, 4.18)
pt3dadd(-10.74, 5.37, 0.3, 4.18)
pt3dadd(-10.88, 5.13, 0.3, 4.18)
pt3dadd(-10.95, 4.97, 0.3, 4.18)
pt3dadd(-11.02, 4.89, 0.3, 4.18)
pt3dadd(-11.16, 4.74, 0.3, 4.18)
pt3dadd(-11.3, 4.58, 0.3, 4.18)
pt3dadd(-11.65, 4.18, 0.3, 4.18)
pt3dadd(-11.79, 4.03, 0.3, 4.18)
pt3dadd(-12, 3.87, 0.3, 4.18)
pt3dadd(-12.14, 3.71, 0.3, 4.18)
pt3dadd(-12.41, 3.55, 0.3, 4.18)
pt3dadd(-12.63, 3.31, 0.3, 4.18)
pt3dadd(-13.04, 2.99, 0.3, 4.18)
pt3dadd(-13.25, 2.76, 0.3, 4.18)
pt3dadd(-13.46, 2.68, 0.3, 4.18)
pt3dadd(-13.67, 2.52, 0.3, 4.18)
pt3dadd(-13.88, 2.36, 0.3, 4.18)
pt3dadd(-14.02, 2.29, 0.3, 4.18)
pt3dadd(-14.23, 2.2, 0.3, 4.18)
pt3dadd(-14.37, 2.13, 0.3, 4.18)
pt3dadd(-14.57, 2.13, 0.3, 4.18)
pt3dadd(-14.65, 2.05, 0.3, 4.18)
pt3dadd(-14.78, 1.97, 0.3, 4.18)
pt3dadd(-14.93, 1.89, 0.3, 4.18)
pt3dadd(-15.06, 1.89, 0.3, 4.18)
pt3dadd(-15.2, 1.81, 0.3, 4.18)
pt3dadd(-15.34, 1.81, 0.3, 4.18)
pt3dadd(-15.48, 1.73, 0.3, 4.18)
pt3dadd(-14.85, 2.13, 0.3, 4.18)
pt3dadd(-14.99, 2.13, 0.3, 4.18)
pt3dadd(-15.06, 2.05, 0.3, 4.18)
pt3dadd(-15.13, 1.97, 0.3, 4.18)
pt3dadd(-15.34, 1.97, 0.3, 4.18)
pt3dadd(-15.41, 1.89, 0.3, 4.18)
pt3dadd(-15.55, 1.89, 0.3, 4.18)
pt3dadd(-15.62, 1.81, 0.3, 4.18)
pt3dadd(-15.69, 1.65, 0.3, 4.18)
pt3dadd(-15.83, 1.57, 0.3, 4.18)
pt3dadd(-15.9, 1.49, 0.3, 4.18)
pt3dadd(-16.04, 1.49, 0.3, 4.18)
pt3dadd(-16.11, 1.41, 0.3, 4.18)
pt3dadd(-16.18, 1.34, 0.3, 4.18)
pt3dadd(-16.39, 1.34, 0.3, 4.18)
pt3dadd(-16.46, 1.25, 0.3, 4.18)
pt3dadd(-16.59, 1.17, 0.3, 4.18)
pt3dadd(-16.74, 1.1, 0.3, 4.18)
pt3dadd(-16.88, 1.02, 0.3, 4.18)
pt3dadd(-17.01, 0.94, 0.3, 4.18)
pt3dadd(-17.08, 0.86, 0.3, 4.18)
pt3dadd(-17.15, 0.78, 0.3, 4.18)
pt3dadd(-17.29, 0.7, 0.3, 4.18)
pt3dadd(-17.43, 0.54, 0.3, 4.18)
pt3dadd(-17.57, 0.46, 0.3, 4.18)
pt3dadd(-17.71, 0.38, 0.3, 4.18)
pt3dadd(-17.78, 0.31, 0.3, 4.18)
pt3dadd(-17.85, 0.23, 0.3, 4.18)
pt3dadd(-17.99, 0.15, 0.3, 4.18)
pt3dadd(-18.13, -0.01, 0.3, 4.18)
pt3dadd(-18.2, -0.09, 0.3, 4.18)
pt3dadd(-18.34, -0.09, 0.3, 4.18)
pt3dadd(-18.41, -0.25, 0.3, 4.18)
pt3dadd(-18.48, -0.33, 0.3, 4.18)
pt3dadd(-18.62, -0.41, 0.3, 4.18)
pt3dadd(-18.75, -0.56, 0.3, 4.18)
pt3dadd(-18.9, -0.64, 0.3, 4.18)
pt3dadd(-19.03, -0.8, 0.3, 4.18)
pt3dadd(-19.1, -0.88, 0.3, 4.18)
pt3dadd(-19.25, -0.96, 0.3, 4.18)
pt3dadd(-19.38, -1.04, 0.3, 4.18)
pt3dadd(-19.45, -1.2, 0.3, 4.18)
pt3dadd(-19.52, -1.28, 0.3, 4.18)
pt3dadd(-19.94, -1.75, 0.3, 4.18)
pt3dadd(-20.01, -1.83, 0.3, 4.18)
pt3dadd(-20.08, -1.99, 0.3, 4.18)
pt3dadd(-20.22, -2.15, 0.3, 4.18)
pt3dadd(-20.29, -2.31, 0.3, 4.18)
pt3dadd(-20.43, -2.46, 0.3, 4.18)
pt3dadd(-20.5, -2.62, 0.3, 4.18)
pt3dadd(-20.71, -3.02, 0.3, 4.18)
pt3dadd(-20.78, -3.18, 0.3, 4.18)
pt3dadd(-20.92, -3.26, 0.3, 4.18)
pt3dadd(-20.92, -3.41, 0.3, 4.18)
pt3dadd(-21.06, -3.57, 0.3, 4.18)
pt3dadd(-21.13, -3.65, 0.3, 4.18)
pt3dadd(-21.13, -3.81, 0.3, 4.18)
pt3dadd(-21.19, -3.97, 0.3, 4.18)
pt3dadd(-21.33, -4.13, 0.3, 4.18)
pt3dadd(-21.41, -4.28, 0.3, 4.18)
pt3dadd(-21.47, -4.44, 0.3, 4.18)
pt3dadd(-21.54, -4.52, 0.3, 4.18)
pt3dadd(-21.61, -4.68, 0.3, 4.18)
pt3dadd(-21.61, -4.84, 0.3, 4.18)
pt3dadd(-21.68, -5, 0.3, 4.18)
pt3dadd(-21.82, -5.07, 0.3, 4.18)
pt3dadd(-21.89, -5.31, 0.3, 4.18)
}
}
proc shape3d_149() {
dend[99] { pt3dadd(-22.03, -5.55, 0.3, 4.18)
pt3dadd(-22.03, -5.71, 0.3, 4.18)
pt3dadd(-22.1, -5.87, 0.3, 4.18)
pt3dadd(-22.24, -6.03, 0.3, 4.18)
pt3dadd(-22.38, -6.26, 0.3, 4.18)
pt3dadd(-22.45, -6.34, 0.3, 4.18)
pt3dadd(-22.52, -6.5, 0.3, 4.18)
pt3dadd(-22.59, -6.66, 0.3, 4.18)
pt3dadd(-22.73, -6.74, 0.3, 4.18)
pt3dadd(-22.73, -6.89, 0.3, 4.18)
pt3dadd(-22.8, -6.97, 0.3, 4.18)
pt3dadd(-22.87, -7.13, 0.3, 4.18)
pt3dadd(-23.01, -7.29, 0.3, 4.18)
pt3dadd(-23.15, -7.45, 0.3, 4.18)
pt3dadd(-23.22, -7.53, 0.3, 4.18)
pt3dadd(-23.28, -7.61, 0.3, 4.18)
pt3dadd(-23.35, -7.69, 0.3, 4.18)
pt3dadd(-23.42, -7.84, 0.3, 4.18)
pt3dadd(-23.5, -7.93, 0.3, 4.18)
pt3dadd(-23.57, -8.01, 0.3, 4.18)
pt3dadd(-23.7, -8.16, 0.3, 4.18)
pt3dadd(-23.77, -8.24, 0.3, 4.18)
pt3dadd(-23.77, -8.4, 0.3, 4.18)
pt3dadd(-23.84, -8.48, 0.3, 4.18)
pt3dadd(-23.91, -8.56, 0.3, 4.18)
pt3dadd(-24.05, -8.8, 0.3, 4.18)
pt3dadd(-24.12, -8.95, 0.3, 4.18)
pt3dadd(-24.19, -9.11, 0.3, 4.18)
pt3dadd(-24.19, -9.27, 0.3, 4.18)
pt3dadd(-24.26, -9.35, 0.3, 4.18)
pt3dadd(-24.33, -9.43, 0.3, 4.18)
pt3dadd(-24.33, -9.59, 0.3, 4.18)
pt3dadd(-24.4, -9.66, 0.3, 4.18)
pt3dadd(-24.47, -9.74, 0.3, 4.18)
pt3dadd(-24.54, -9.9, 0.3, 4.18)
pt3dadd(-24.68, -10.06, 0.3, 4.18)
pt3dadd(-24.61, -9.98, 0.3, 4.18)
pt3dadd(-24.47, -9.9, 0.3, 4.18)
pt3dadd(-24.47, -9.82, 0.3, 4.18)
pt3dadd(-24.68, -9.82, 4.3, 4.18)
pt3dadd(-24.68, -9.98, 4.3, 4.18)
pt3dadd(-24.75, -10.06, 4.3, 4.18)
pt3dadd(-24.82, -10.14, 4.3, 4.18)
pt3dadd(-24.89, -10.22, 4.3, 4.18)
pt3dadd(-24.96, -10.3, 4.3, 4.18)
pt3dadd(-25.03, -10.38, 4.3, 4.18)
pt3dadd(-25.1, -10.46, 4.3, 4.18)
pt3dadd(-25.24, -10.46, 4.3, 4.18)
pt3dadd(-25.38, -10.54, 4.3, 4.18)
pt3dadd(-25.51, -10.54, 4.3, 4.18)
pt3dadd(-25.58, -10.61, 4.3, 4.18)
pt3dadd(-25.66, -10.69, 4.3, 4.18)
pt3dadd(-27.05, -10.69, 4.3, 4.18)
pt3dadd(-27.12, -10.61, 4.3, 4.18)
pt3dadd(-27.26, -10.54, 4.3, 4.18)
pt3dadd(-27.4, -10.54, 4.3, 4.18)
pt3dadd(-27.53, -10.38, 4.3, 4.18)
pt3dadd(-27.6, -10.3, 4.3, 4.18)
pt3dadd(-27.75, -10.22, 4.3, 4.18)
pt3dadd(-27.88, -10.14, 4.3, 4.18)
pt3dadd(-27.95, -10.06, 4.3, 4.18)
pt3dadd(-28.02, -9.98, 4.3, 4.18)
pt3dadd(-28.16, -9.9, 4.3, 4.18)
pt3dadd(-28.23, -9.82, 4.3, 4.18)
pt3dadd(-28.37, -9.82, 4.3, 4.18)
pt3dadd(-28.44, -9.74, 4.3, 4.18)
pt3dadd(-28.51, -9.66, 4.3, 4.18)
pt3dadd(-28.58, -9.59, 4.3, 4.18)
pt3dadd(-28.72, -9.59, 4.3, 4.18)
pt3dadd(-28.86, -9.51, 4.3, 4.18)
pt3dadd(-28.93, -9.43, 4.3, 4.18)
pt3dadd(-29.07, -9.35, 4.3, 4.18)
pt3dadd(-29.21, -9.27, 4.3, 4.18)
pt3dadd(-29.35, -9.19, 4.3, 4.18)
pt3dadd(-29.49, -9.19, 4.3, 4.18)
pt3dadd(-29.56, -9.11, 4.3, 4.18)
pt3dadd(-29.69, -9.11, 4.3, 4.18)
pt3dadd(-29.83, -9.03, 4.3, 4.18)
pt3dadd(-30.04, -9.03, 4.3, 4.18)
pt3dadd(-30.11, -8.95, 4.3, 4.18)
pt3dadd(-31.92, -8.95, 4.3, 4.18)
pt3dadd(-32, -9.03, 4.3, 4.18)
pt3dadd(-32.06, -9.11, 4.3, 4.18)
pt3dadd(-32.13, -9.19, 4.3, 4.18)
pt3dadd(-32.27, -9.19, 4.3, 4.18)
pt3dadd(-32.34, -9.27, 4.3, 4.18)
pt3dadd(-32.41, -9.35, 4.3, 4.18)
pt3dadd(-32.55, -9.35, 4.3, 4.18)
pt3dadd(-32.62, -9.43, 4.3, 4.18)
pt3dadd(-32.69, -9.51, 4.3, 4.18)
pt3dadd(-32.76, -9.59, 4.3, 4.18)
pt3dadd(-32.83, -9.66, 4.3, 4.18)
pt3dadd(-32.97, -9.9, 4.3, 4.18)
pt3dadd(-33.04, -9.98, 4.3, 4.18)
pt3dadd(-33.11, -10.14, 4.3, 4.18)
pt3dadd(-33.18, -10.3, 4.3, 4.18)
pt3dadd(-33.25, -10.46, 4.3, 4.18)
pt3dadd(-33.39, -10.54, 4.3, 4.18)
pt3dadd(-33.53, -10.69, 4.3, 4.18)
pt3dadd(-33.67, -10.93, 4.3, 4.18)
pt3dadd(-33.88, -11.17, 4.3, 4.18)
pt3dadd(-33.94, -11.25, 4.3, 4.18)
pt3dadd(-34.08, -11.41, 4.3, 4.18)
pt3dadd(-34.15, -11.56, 4.3, 4.18)
pt3dadd(-34.29, -11.65, 4.3, 4.18)
pt3dadd(-34.43, -11.72, 4.3, 4.18)
pt3dadd(-34.5, -11.8, 4.3, 4.18)
pt3dadd(-34.64, -11.88, 4.3, 4.18)
pt3dadd(-34.78, -11.96, 4.3, 4.18)
pt3dadd(-34.92, -12.12, 4.3, 4.18)
pt3dadd(-34.99, -12.2, 4.3, 4.18)
pt3dadd(-35.13, -12.28, 4.3, 4.18)
pt3dadd(-35.27, -12.44, 4.3, 4.18)
pt3dadd(-35.41, -12.6, 4.3, 4.18)
pt3dadd(-35.48, -12.67, 4.3, 4.18)
pt3dadd(-35.62, -12.75, 4.3, 4.18)
pt3dadd(-35.69, -12.83, 4.3, 4.18)
pt3dadd(-35.83, -12.91, 4.3, 4.18)
pt3dadd(-35.9, -13.07, 4.3, 4.18)
pt3dadd(-36.03, -13.15, 4.3, 4.18)
pt3dadd(-36.17, -13.31, 4.3, 4.18)
pt3dadd(-36.31, -13.39, 4.3, 4.18)
pt3dadd(-36.46, -13.39, 4.3, 4.18)
pt3dadd(-36.59, -13.47, 4.3, 4.18)
pt3dadd(-36.73, -13.62, 4.3, 4.18)
pt3dadd(-36.8, -13.7, 4.3, 4.18)
pt3dadd(-36.94, -13.78, 4.3, 4.18)
pt3dadd(-37.08, -13.86, 4.3, 4.18)
pt3dadd(-37.15, -13.94, 4.3, 4.18)
pt3dadd(-37.29, -14.02, 4.3, 4.18)
pt3dadd(-37.5, -14.1, 4.3, 4.18)
pt3dadd(-37.57, -14.18, 4.3, 4.18)
pt3dadd(-37.78, -14.34, 4.3, 4.18)
pt3dadd(-37.99, -14.41, 4.3, 4.18)
pt3dadd(-38.13, -14.49, 4.3, 4.18)
pt3dadd(-38.26, -14.57, 4.3, 4.18)
pt3dadd(-38.33, -14.65, 4.3, 4.18)
pt3dadd(-38.47, -14.73, 4.3, 4.18)
pt3dadd(-38.68, -14.73, 4.3, 4.18)
pt3dadd(-38.82, -14.81, 4.3, 4.18)
pt3dadd(-38.96, -14.97, 4.3, 4.18)
pt3dadd(-39.17, -15.05, 4.3, 4.18)
pt3dadd(-39.38, -15.13, 4.3, 4.18)
pt3dadd(-39.52, -15.13, 4.3, 4.18)
pt3dadd(-39.73, -15.2, 4.3, 4.18)
pt3dadd(-39.87, -15.28, 4.3, 4.18)
pt3dadd(-40.01, -15.36, 4.3, 4.18)
pt3dadd(-40.42, -15.36, 4.3, 4.18)
pt3dadd(-40.49, -15.44, 4.3, 4.18)
pt3dadd(-40.63, -15.52, 4.3, 4.18)
pt3dadd(-41.12, -15.52, 4.3, 4.18)
pt3dadd(-41.26, -15.6, 4.3, 4.18)
pt3dadd(-41.61, -15.6, 4.3, 4.18)
pt3dadd(-41.75, -15.68, 4.3, 4.18)
pt3dadd(-41.82, -15.76, 4.3, 4.18)
pt3dadd(-41.96, -15.84, 4.3, 4.18)
pt3dadd(-42.03, -15.92, 4.3, 4.18)
pt3dadd(-42.17, -16, 4.3, 4.18)
pt3dadd(-42.24, -16.08, 4.3, 4.18)
pt3dadd(-42.44, -16.24, 4.3, 4.18)
pt3dadd(-42.58, -16.31, 4.3, 4.18)
pt3dadd(-42.72, -16.39, 4.3, 4.18)
pt3dadd(-42.94, -16.63, 4.3, 4.18)
pt3dadd(-43.07, -16.71, 4.3, 4.18)
pt3dadd(-43.21, -16.87, 4.3, 4.18)
pt3dadd(-43.35, -16.95, 4.3, 4.18)
pt3dadd(-43.42, -17.02, 4.3, 4.18)
pt3dadd(-43.56, -17.1, 4.3, 4.18)
pt3dadd(-43.63, -17.18, 4.3, 4.18)
pt3dadd(-43.77, -17.26, 4.3, 4.18)
pt3dadd(-43.91, -17.34, 4.3, 4.18)
pt3dadd(-44.05, -17.42, 4.3, 4.18)
pt3dadd(-44.81, -17.42, 4.3, 4.18)
pt3dadd(-44.96, -17.34, 4.3, 4.18)
pt3dadd(-45.1, -17.34, 4.3, 4.18)
pt3dadd(-45.16, -17.26, 4.3, 4.18)
pt3dadd(-45.3, -17.18, 4.3, 4.18)
pt3dadd(-45.37, -17.1, 4.3, 4.18)
pt3dadd(-45.51, -17.1, 4.3, 4.18)
pt3dadd(-45.58, -17.02, 4.3, 4.18)
pt3dadd(-45.72, -16.95, 4.3, 4.18)
pt3dadd(-45.86, -16.87, 4.3, 4.18)
pt3dadd(-46.42, -16.87, 4.3, 4.18)
pt3dadd(-46.49, -16.95, 4.3, 4.18)
pt3dadd(-46.63, -17.02, 4.3, 4.18)
pt3dadd(-46.7, -17.1, 4.3, 4.18)
pt3dadd(-46.83, -17.18, 4.3, 4.18)
pt3dadd(-46.97, -17.26, 4.3, 4.18)
pt3dadd(-46.97, -17.18, 5.3, 3.62)
pt3dadd(-47.12, -17.26, 5.3, 3.62)
pt3dadd(-47.19, -17.42, 5.3, 3.62)
pt3dadd(-47.26, -17.5, 5.3, 3.62)
pt3dadd(-47.32, -17.58, 5.3, 3.62)
pt3dadd(-47.39, -17.66, 5.3, 3.62)
pt3dadd(-47.46, -17.74, 5.3, 3.62)
pt3dadd(-47.53, -17.9, 5.3, 3.62)
pt3dadd(-47.6, -18.06, 5.3, 3.62)
pt3dadd(-47.74, -18.14, 5.3, 3.62)
pt3dadd(-47.81, -18.21, 5.3, 3.62)
pt3dadd(-47.88, -18.29, 5.3, 3.62)
}
}
proc shape3d_150() {
dend[99] { pt3dadd(-47.95, -18.45, 5.3, 3.62)
pt3dadd(-48.02, -18.53, 5.3, 3.62)
pt3dadd(-48.16, -18.61, 5.3, 3.62)
pt3dadd(-48.23, -18.69, 5.3, 3.62)
pt3dadd(-48.44, -18.92, 5.3, 3.62)
pt3dadd(-48.58, -19, 5.3, 3.62)
pt3dadd(-48.65, -19.08, 5.3, 3.62)
pt3dadd(-48.72, -19.16, 5.3, 3.62)
pt3dadd(-48.86, -19.24, 5.3, 3.62)
pt3dadd(-48.92, -19.32, 5.3, 3.62)
pt3dadd(-49.21, -19.64, 5.3, 3.62)
pt3dadd(-49.28, -19.72, 5.3, 3.62)
pt3dadd(-49.35, -19.88, 5.3, 3.62)
pt3dadd(-49.48, -20.03, 5.3, 3.62)
pt3dadd(-49.55, -20.11, 5.3, 3.62)
pt3dadd(-49.62, -20.19, 5.3, 3.62)
pt3dadd(-49.69, -20.35, 5.3, 3.62)
pt3dadd(-49.83, -20.43, 5.3, 3.62)
pt3dadd(-49.9, -20.51, 5.3, 3.62)
pt3dadd(-50.04, -20.59, 5.3, 3.62)
pt3dadd(-50.11, -20.67, 5.3, 3.62)
pt3dadd(-50.18, -20.75, 5.3, 3.62)
pt3dadd(-50.25, -20.91, 5.3, 3.62)
pt3dadd(-50.32, -20.98, 5.3, 3.62)
pt3dadd(-50.46, -21.06, 5.3, 3.62)
pt3dadd(-50.6, -21.14, 5.3, 3.62)
pt3dadd(-50.67, -21.22, 5.3, 3.62)
pt3dadd(-50.88, -21.46, 5.3, 3.62)
pt3dadd(-50.95, -21.54, 5.3, 3.62)
pt3dadd(-51.29, -21.93, 5.3, 3.62)
pt3dadd(-51.37, -22.01, 5.3, 3.62)
pt3dadd(-51.44, -22.17, 5.3, 3.62)
pt3dadd(-51.58, -22.25, 5.3, 3.62)
pt3dadd(-51.71, -22.33, 5.3, 3.62)
pt3dadd(-51.78, -22.41, 5.3, 3.62)
pt3dadd(-51.85, -22.49, 5.3, 3.62)
pt3dadd(-51.99, -22.57, 5.3, 3.62)
pt3dadd(-52.06, -22.65, 5.3, 3.62)
pt3dadd(-52.2, -22.65, 5.3, 3.62)
pt3dadd(-52.34, -22.73, 5.3, 3.62)
pt3dadd(-52.41, -22.8, 5.3, 3.62)
pt3dadd(-52.48, -22.88, 5.3, 3.62)
pt3dadd(-52.69, -22.88, 5.3, 3.62)
pt3dadd(-52.76, -22.96, 5.3, 3.62)
pt3dadd(-52.9, -22.96, 5.3, 3.62)
pt3dadd(-52.97, -23.04, 5.3, 3.62)
pt3dadd(-53.11, -23.12, 5.3, 3.62)
pt3dadd(-53.24, -23.2, 5.3, 3.62)
pt3dadd(-53.38, -23.28, 5.3, 3.62)
pt3dadd(-53.53, -23.36, 5.3, 3.62)
pt3dadd(-53.67, -23.43, 5.3, 3.62)
pt3dadd(-53.8, -23.51, 5.3, 3.62)
pt3dadd(-53.87, -23.59, 5.3, 3.62)
pt3dadd(-54.15, -23.59, 5.3, 3.62)
pt3dadd(-54.29, -23.67, 5.3, 3.62)
pt3dadd(-54.43, -23.75, 5.3, 3.62)
pt3dadd(-54.57, -23.83, 5.3, 3.62)
pt3dadd(-54.64, -23.91, 5.3, 3.62)
pt3dadd(-54.71, -23.99, 5.3, 3.62)
pt3dadd(-54.78, -24.15, 5.3, 3.62)
pt3dadd(-54.85, -24.23, 5.3, 3.62)
pt3dadd(-54.92, -24.31, 5.3, 3.62)
pt3dadd(-54.99, -24.39, 5.3, 3.62)
pt3dadd(-55.34, -24.62, 5.3, 3.62)
pt3dadd(-55.4, -24.78, 5.3, 3.62)
pt3dadd(-55.54, -24.94, 5.3, 3.62)
pt3dadd(-55.62, -25.02, 5.3, 3.62)
pt3dadd(-55.76, -25.1, 5.3, 3.62)
pt3dadd(-55.83, -25.26, 5.3, 3.62)
pt3dadd(-55.96, -25.5, 5.3, 3.62)
pt3dadd(-56.1, -25.57, 5.3, 3.62)
pt3dadd(-56.31, -25.73, 5.3, 3.62)
pt3dadd(-56.38, -25.81, 5.3, 3.62)
pt3dadd(-56.52, -25.89, 5.3, 3.62)
pt3dadd(-56.59, -26.05, 5.3, 3.62)
pt3dadd(-56.73, -26.13, 5.3, 3.62)
pt3dadd(-56.87, -26.28, 5.3, 3.62)
pt3dadd(-56.94, -26.36, 5.3, 3.62)
pt3dadd(-57.08, -26.44, 5.3, 3.62)
pt3dadd(-57.22, -26.44, 5.3, 3.62)
pt3dadd(-57.29, -26.52, 5.3, 3.62)
pt3dadd(-57.43, -26.6, 5.3, 3.62)
pt3dadd(-57.56, -26.68, 5.3, 3.62)
pt3dadd(-57.71, -26.84, 5.3, 3.62)
pt3dadd(-57.85, -26.92, 5.3, 3.62)
pt3dadd(-57.99, -27, 5.3, 3.62)
pt3dadd(-58.05, -27.08, 5.3, 3.62)
pt3dadd(-58.19, -27.08, 5.3, 3.62)
pt3dadd(-58.26, -27.16, 5.3, 3.62)
pt3dadd(-58.4, -27.24, 5.3, 3.62)
pt3dadd(-58.47, -27.32, 5.3, 3.62)
pt3dadd(-58.68, -27.32, 5.3, 3.62)
pt3dadd(-58.75, -27.39, 5.3, 3.62)
pt3dadd(-58.89, -27.47, 5.3, 3.62)
pt3dadd(-59.66, -27.47, 5.3, 3.62)
pt3dadd(-59.79, -27.55, 5.3, 3.62)
pt3dadd(-59.87, -27.63, 5.3, 3.62)
pt3dadd(-60.01, -27.63, 5.3, 3.62)
pt3dadd(-60.21, -27.79, 5.3, 3.62)
pt3dadd(-60.63, -27.79, 5.3, 3.62)
pt3dadd(-60.77, -27.87, 5.3, 3.62)
pt3dadd(-60.91, -27.95, 5.3, 3.62)
pt3dadd(-61.05, -28.03, 5.3, 3.62)
pt3dadd(-61.19, -28.1, 5.3, 3.62)
pt3dadd(-61.26, -28.18, 5.3, 3.62)
pt3dadd(-61.4, -28.18, 5.3, 3.62)
pt3dadd(-61.61, -28.34, 5.3, 3.62)
pt3dadd(-61.68, -28.42, 5.3, 3.62)
pt3dadd(-61.82, -28.5, 5.3, 3.62)
pt3dadd(-61.96, -28.58, 5.3, 3.62)
pt3dadd(-62.1, -28.66, 5.3, 3.62)
pt3dadd(-62.24, -28.74, 5.3, 3.62)
pt3dadd(-62.31, -28.82, 5.3, 3.62)
pt3dadd(-62.44, -28.9, 5.3, 3.62)
pt3dadd(-62.58, -28.98, 5.3, 3.62)
pt3dadd(-62.65, -29.06, 5.3, 3.62)
pt3dadd(-62.79, -29.14, 5.3, 3.62)
pt3dadd(-62.93, -29.14, 5.3, 3.62)
pt3dadd(-63.14, -29.29, 5.3, 3.62)
pt3dadd(-63.21, -29.37, 5.3, 3.62)
pt3dadd(-63.35, -29.37, 5.3, 3.62)
pt3dadd(-63.56, -29.53, 5.3, 3.62)
pt3dadd(-63.77, -29.53, 5.3, 3.62)
pt3dadd(-63.84, -29.61, 5.3, 3.62)
pt3dadd(-64.04, -29.61, 5.3, 3.62)
pt3dadd(-64.11, -29.69, 5.3, 3.62)
pt3dadd(-64.32, -29.69, 5.3, 3.62)
pt3dadd(-64.46, -29.77, 5.3, 3.62)
pt3dadd(-64.74, -29.77, 5.3, 3.62)
pt3dadd(-64.81, -29.85, 5.3, 3.62)
pt3dadd(-64.88, -29.92, 5.3, 3.62)
pt3dadd(-65.23, -29.92, 5.3, 3.62)
pt3dadd(-65.37, -30, 5.3, 3.62)
pt3dadd(-65.51, -30.08, 5.3, 3.62)
pt3dadd(-65.65, -30.16, 5.3, 3.62)
pt3dadd(-65.79, -30.24, 5.3, 3.62)
pt3dadd(-65.86, -30.32, 5.3, 3.62)
pt3dadd(-66.07, -30.32, 5.3, 3.62)
pt3dadd(-66.21, -30.4, 5.3, 3.62)
pt3dadd(-66.76, -30.4, 5.3, 3.62)
pt3dadd(-66.76, -30.24, 5.3, 3.62)
pt3dadd(-66.69, -30.16, 5.3, 3.62)
pt3dadd(-66.63, -30.16, 8.3, 3.62)
pt3dadd(-67.39, -30.16, 8.3, 3.62)
pt3dadd(-67.53, -30.24, 8.3, 3.62)
pt3dadd(-67.74, -30.32, 8.3, 3.62)
pt3dadd(-67.95, -30.48, 8.3, 3.62)
pt3dadd(-68.02, -30.64, 8.3, 3.62)
pt3dadd(-68.16, -30.72, 8.3, 3.62)
pt3dadd(-68.29, -30.88, 8.3, 3.62)
pt3dadd(-68.36, -30.95, 8.3, 3.62)
pt3dadd(-68.5, -31.03, 8.3, 3.62)
pt3dadd(-68.57, -31.11, 8.3, 3.62)
pt3dadd(-68.64, -31.19, 8.3, 3.62)
pt3dadd(-68.71, -31.27, 8.3, 3.62)
pt3dadd(-68.85, -31.35, 8.3, 3.62)
pt3dadd(-68.92, -31.43, 8.3, 3.62)
pt3dadd(-68.99, -31.51, 8.3, 3.62)
pt3dadd(-69.13, -31.59, 8.3, 3.62)
pt3dadd(-69.2, -31.67, 8.3, 3.62)
pt3dadd(-69.41, -31.83, 8.3, 3.62)
pt3dadd(-69.55, -31.91, 8.3, 3.62)
pt3dadd(-69.62, -31.98, 8.3, 3.62)
pt3dadd(-69.69, -32.06, 8.3, 3.62)
pt3dadd(-69.9, -32.14, 8.3, 3.62)
pt3dadd(-70.04, -32.3, 8.3, 3.62)
pt3dadd(-70.11, -32.46, 8.3, 3.62)
pt3dadd(-70.25, -32.54, 8.3, 3.62)
pt3dadd(-70.39, -32.62, 8.3, 3.62)
pt3dadd(-70.53, -32.69, 8.3, 3.62)
pt3dadd(-70.67, -32.78, 8.3, 3.62)
pt3dadd(-70.74, -32.85, 8.3, 3.62)
pt3dadd(-70.88, -33.01, 8.3, 3.62)
pt3dadd(-70.94, -33.09, 8.3, 3.62)
pt3dadd(-71.01, -33.17, 8.3, 3.62)
pt3dadd(-71.36, -33.56, 8.3, 3.62)
pt3dadd(-71.5, -33.65, 8.3, 3.62)
pt3dadd(-71.64, -33.8, 8.3, 3.62)
pt3dadd(-71.78, -33.96, 8.3, 3.62)
pt3dadd(-71.92, -34.12, 8.3, 3.62)
pt3dadd(-72.06, -34.2, 8.3, 3.62)
pt3dadd(-72.2, -34.36, 8.3, 3.62)
pt3dadd(-72.34, -34.51, 8.3, 3.62)
pt3dadd(-72.48, -34.75, 8.3, 3.62)
pt3dadd(-72.61, -34.83, 8.3, 3.62)
pt3dadd(-72.75, -34.99, 8.3, 3.62)
pt3dadd(-72.96, -35.23, 8.3, 3.62)
pt3dadd(-73.04, -35.31, 8.3, 3.62)
pt3dadd(-73.17, -35.47, 8.3, 3.62)
pt3dadd(-73.24, -35.54, 8.3, 3.62)
pt3dadd(-73.38, -35.62, 8.3, 3.62)
pt3dadd(-73.52, -35.78, 8.3, 3.62)
pt3dadd(-73.66, -35.86, 8.3, 3.62)
pt3dadd(-73.8, -35.94, 8.3, 3.62)
pt3dadd(-73.94, -36.1, 8.3, 3.62)
pt3dadd(-74.01, -36.26, 8.3, 3.62)
pt3dadd(-74.22, -36.33, 8.3, 3.62)
pt3dadd(-74.36, -36.49, 8.3, 3.62)
pt3dadd(-74.43, -36.57, 8.3, 3.62)
pt3dadd(-74.57, -36.65, 8.3, 3.62)
}
}
proc shape3d_151() {
dend[99] { pt3dadd(-74.64, -36.73, 8.3, 3.62)
pt3dadd(-74.78, -36.81, 8.3, 3.62)
pt3dadd(-74.85, -36.97, 8.3, 3.62)
pt3dadd(-74.99, -37.05, 8.3, 3.62)
pt3dadd(-75.06, -37.13, 8.3, 3.62)
pt3dadd(-75.33, -37.44, 8.3, 3.62)
pt3dadd(-75.54, -37.44, 8.3, 3.62)
pt3dadd(-75.61, -37.52, 8.3, 3.62)
pt3dadd(-75.54, -37.37, 11.3, 3.62)
pt3dadd(-75.68, -37.37, 11.3, 3.62)
pt3dadd(-75.96, -37.44, 11.3, 3.62)
pt3dadd(-76.03, -37.52, 11.3, 3.62)
pt3dadd(-76.1, -37.6, 11.3, 3.62)
pt3dadd(-76.8, -37.6, 11.3, 3.62)
pt3dadd(-76.87, -37.68, 11.3, 3.62)
pt3dadd(-77, -37.68, 11.3, 3.62)
pt3dadd(-77.14, -37.76, 11.3, 3.62)
pt3dadd(-77.56, -37.76, 11.3, 3.62)
pt3dadd(-77.7, -37.84, 11.3, 3.62)
pt3dadd(-83.28, -37.84, 11.3, 3.62)
pt3dadd(-83.35, -37.92, 13.3, 3.34)
pt3dadd(-83.56, -37.92, 13.3, 3.34)
pt3dadd(-83.63, -38, 13.3, 3.34)
pt3dadd(-83.83, -38, 13.3, 3.34)
pt3dadd(-83.97, -38.08, 13.3, 3.34)
pt3dadd(-84.11, -38.08, 13.3, 3.34)
pt3dadd(-84.18, -38.15, 13.3, 3.34)
pt3dadd(-84.6, -38.15, 13.3, 3.34)
pt3dadd(-84.74, -38.24, 13.3, 3.34)
pt3dadd(-85.16, -38.24, 13.3, 3.34)
pt3dadd(-85.23, -38.31, 13.3, 3.34)
pt3dadd(-85.44, -38.39, 13.3, 3.34)
pt3dadd(-85.57, -38.47, 13.3, 3.34)
pt3dadd(-85.79, -38.55, 13.3, 3.34)
pt3dadd(-85.93, -38.55, 13.3, 3.34)
pt3dadd(-86.07, -38.63, 13.3, 3.34)
pt3dadd(-86.2, -38.71, 13.3, 3.34)
pt3dadd(-86.34, -38.79, 13.3, 3.34)
pt3dadd(-86.48, -38.87, 13.3, 3.34)
pt3dadd(-86.69, -38.95, 13.3, 3.34)
pt3dadd(-86.83, -39.03, 13.3, 3.34)
pt3dadd(-86.97, -39.03, 13.3, 3.34)
pt3dadd(-87.11, -39.1, 13.3, 3.34)
pt3dadd(-87.25, -39.19, 13.3, 3.34)
pt3dadd(-87.53, -39.19, 13.3, 3.34)
pt3dadd(-87.67, -39.26, 13.3, 3.34)
pt3dadd(-88.15, -39.26, 13.3, 3.34)
pt3dadd(-88.29, -39.34, 13.3, 3.34)
pt3dadd(-88.43, -39.42, 13.3, 3.34)
pt3dadd(-88.57, -39.5, 13.3, 3.34)
pt3dadd(-88.85, -39.82, 13.3, 3.34)
pt3dadd(-88.92, -39.9, 13.3, 3.34)
pt3dadd(-88.99, -39.98, 13.3, 3.34)
pt3dadd(-89.13, -40.06, 13.3, 3.34)
pt3dadd(-89.2, -40.13, 13.3, 3.34)
pt3dadd(-89.34, -40.21, 13.3, 3.34)
pt3dadd(-89.41, -40.29, 13.3, 3.34)
pt3dadd(-89.48, -40.45, 13.3, 3.34)
pt3dadd(-89.55, -40.53, 13.3, 3.34)
pt3dadd(-89.69, -40.61, 13.3, 3.34)
pt3dadd(-89.76, -40.69, 13.3, 3.34)
pt3dadd(-89.83, -40.77, 13.3, 3.34)
pt3dadd(-89.89, -40.85, 13.3, 3.34)
pt3dadd(-90.11, -41.01, 13.3, 3.34)
pt3dadd(-90.25, -41.01, 13.3, 3.34)
pt3dadd(-90.32, -41.08, 13.3, 3.34)
pt3dadd(-90.45, -41.16, 13.3, 3.34)
pt3dadd(-90.52, -41.24, 13.3, 3.34)
pt3dadd(-90.73, -41.32, 13.3, 3.34)
pt3dadd(-90.87, -41.4, 13.3, 3.34)
pt3dadd(-91.01, -41.48, 13.3, 3.34)
pt3dadd(-91.15, -41.48, 13.3, 3.34)
pt3dadd(-91.29, -41.56, 13.3, 3.34)
pt3dadd(-91.99, -41.56, 13.3, 3.34)
pt3dadd(-92.13, -41.64, 13.3, 3.34)
pt3dadd(-92.54, -41.64, 13.3, 3.34)
pt3dadd(-92.68, -41.72, 13.3, 3.34)
pt3dadd(-92.82, -41.72, 13.3, 3.34)
pt3dadd(-92.96, -41.8, 13.3, 3.34)
pt3dadd(-93.1, -41.88, 13.3, 3.34)
pt3dadd(-93.24, -41.96, 13.3, 3.34)
pt3dadd(-93.31, -42.03, 13.3, 3.34)
pt3dadd(-93.52, -42.03, 13.3, 3.34)
pt3dadd(-93.59, -42.11, 13.3, 3.34)
pt3dadd(-93.66, -42.19, 13.3, 3.34)
pt3dadd(-93.8, -42.19, 13.3, 3.34)
pt3dadd(-94.08, -42.51, 13.3, 3.34)
pt3dadd(-94.21, -42.51, 13.3, 3.34)
pt3dadd(-94.29, -42.59, 13.3, 3.34)
pt3dadd(-94.36, -42.59, 13.3, 3.34)
pt3dadd(-94.01, -42.27, 16.3, 3.34)
pt3dadd(-94.36, -42.27, 16.3, 3.34)
pt3dadd(-94.43, -42.35, 16.3, 3.34)
pt3dadd(-94.57, -42.43, 16.3, 3.34)
pt3dadd(-94.77, -42.51, 16.3, 3.34)
pt3dadd(-94.91, -42.59, 16.3, 3.34)
pt3dadd(-95.05, -42.67, 16.3, 3.34)
pt3dadd(-95.19, -42.83, 16.3, 3.34)
pt3dadd(-95.4, -42.9, 16.3, 3.34)
pt3dadd(-95.47, -42.98, 16.3, 3.34)
pt3dadd(-95.61, -43.06, 16.3, 3.34)
pt3dadd(-95.68, -43.22, 16.3, 3.34)
pt3dadd(-95.82, -43.3, 16.3, 3.34)
pt3dadd(-95.96, -43.54, 16.3, 3.34)
pt3dadd(-96.1, -43.62, 16.3, 3.34)
pt3dadd(-96.17, -43.69, 16.3, 3.34)
pt3dadd(-96.31, -43.78, 16.3, 3.34)
pt3dadd(-96.38, -43.85, 16.3, 3.34)
pt3dadd(-96.51, -43.85, 16.3, 3.34)
pt3dadd(-96.58, -43.93, 16.3, 3.34)
pt3dadd(-96.65, -44.09, 16.3, 3.34)
pt3dadd(-96.79, -44.17, 16.3, 3.34)
pt3dadd(-96.86, -44.25, 16.3, 3.34)
pt3dadd(-97, -44.41, 16.3, 3.34)
pt3dadd(-97.07, -44.49, 16.3, 3.34)
pt3dadd(-97.21, -44.57, 16.3, 3.34)
pt3dadd(-97.28, -44.65, 16.3, 3.34)
pt3dadd(-97.35, -44.88, 16.3, 3.34)
pt3dadd(-97.42, -44.96, 16.3, 3.34)
pt3dadd(-97.49, -45.12, 16.3, 3.34)
pt3dadd(-97.56, -45.2, 16.3, 3.34)
pt3dadd(-97.7, -45.28, 16.3, 3.34)
pt3dadd(-97.77, -45.36, 16.3, 3.34)
pt3dadd(-97.84, -45.51, 16.3, 3.34)
pt3dadd(-97.91, -45.6, 16.3, 3.34)
pt3dadd(-98.05, -45.67, 16.3, 3.34)
pt3dadd(-98.12, -45.91, 16.3, 3.34)
pt3dadd(-98.19, -45.99, 16.3, 3.34)
pt3dadd(-98.33, -46.15, 16.3, 3.34)
pt3dadd(-98.47, -46.39, 16.3, 3.34)
pt3dadd(-98.61, -46.54, 16.3, 3.34)
pt3dadd(-98.68, -46.63, 16.3, 3.34)
pt3dadd(-98.75, -46.78, 16.3, 3.34)
pt3dadd(-98.75, -46.94, 16.3, 3.34)
pt3dadd(-98.82, -47.1, 16.3, 3.34)
pt3dadd(-98.89, -47.18, 16.3, 3.34)
pt3dadd(-98.96, -47.33, 16.3, 3.34)
pt3dadd(-99.02, -47.42, 16.3, 3.34)
pt3dadd(-99.09, -47.49, 16.3, 3.34)
pt3dadd(-99.16, -47.65, 16.3, 3.34)
pt3dadd(-99.23, -47.73, 16.3, 3.34)
pt3dadd(-99.3, -47.81, 16.3, 3.34)
pt3dadd(-99.37, -47.97, 16.3, 3.34)
}
dend[100] {pt3dclear()
pt3dadd(49.74, 59.26, -5.7, 3.9)
pt3dadd(49.6, 59.7, 10.3, 3.9)
pt3dadd(49.56, 59.74, 10.3, 3.9)
pt3dadd(49.46, 59.86, 10.3, 3.9)
pt3dadd(49.42, 59.94, 10.3, 3.9)
pt3dadd(49.35, 60.01, 10.3, 3.9)
pt3dadd(49.76, 60.76, 10.3, 8.64)
}
dend[101] {pt3dclear()
pt3dadd(49.76, 60.76, 10.3, 3.9)
pt3dadd(49.32, 60.06, 10.3, 3.9)
pt3dadd(49.25, 60.1, 10.3, 3.9)
pt3dadd(49.18, 60.13, 10.3, 3.9)
pt3dadd(49.15, 60.17, 10.3, 3.9)
pt3dadd(49.11, 60.21, 10.3, 3.9)
pt3dadd(49.04, 60.33, 10.3, 3.9)
pt3dadd(49.01, 60.37, 10.3, 3.9)
pt3dadd(48.97, 60.41, 10.3, 3.9)
pt3dadd(48.94, 60.45, 10.3, 3.9)
pt3dadd(48.9, 60.53, 10.3, 3.9)
pt3dadd(48.83, 60.57, 10.3, 3.9)
pt3dadd(48.79, 60.61, 10.3, 3.9)
pt3dadd(48.72, 60.73, 10.3, 3.9)
pt3dadd(48.69, 60.81, 10.3, 3.9)
pt3dadd(48.65, 60.89, 10.3, 3.9)
pt3dadd(48.62, 60.92, 10.3, 3.9)
pt3dadd(48.59, 61.01, 10.3, 3.9)
pt3dadd(48.48, 61.08, 10.3, 3.9)
pt3dadd(48.45, 61.16, 10.3, 3.9)
pt3dadd(48.38, 61.2, 10.3, 3.9)
pt3dadd(48.34, 61.28, 10.3, 3.9)
pt3dadd(48.31, 61.36, 10.3, 3.9)
pt3dadd(48.24, 61.4, 10.3, 3.9)
pt3dadd(48.2, 61.44, 10.3, 3.9)
pt3dadd(48.17, 61.52, 10.3, 3.9)
pt3dadd(48.13, 61.56, 10.3, 3.9)
pt3dadd(48.06, 61.64, 10.3, 3.9)
pt3dadd(48.03, 61.68, 10.3, 3.9)
pt3dadd(47.99, 61.76, 10.3, 3.9)
pt3dadd(47.92, 61.8, 10.3, 3.9)
pt3dadd(47.89, 61.88, 10.3, 3.9)
pt3dadd(47.82, 61.96, 10.3, 3.9)
pt3dadd(47.75, 62.03, 10.3, 3.9)
pt3dadd(47.72, 62.07, 10.3, 3.9)
pt3dadd(47.65, 62.15, 10.3, 3.9)
pt3dadd(47.58, 62.27, 10.3, 3.9)
pt3dadd(47.54, 62.35, 10.3, 3.9)
pt3dadd(47.51, 62.43, 10.3, 3.9)
pt3dadd(47.4, 62.55, 10.3, 3.9)
pt3dadd(47.37, 62.63, 10.3, 3.9)
pt3dadd(47.33, 62.71, 10.3, 3.9)
pt3dadd(47.26, 62.74, 10.3, 3.9)
pt3dadd(47.19, 62.83, 10.3, 3.9)
pt3dadd(47.16, 62.9, 10.3, 3.9)
pt3dadd(47.12, 62.94, 10.3, 3.9)
pt3dadd(47.05, 63.06, 10.3, 3.9)
pt3dadd(47.02, 63.1, 10.3, 3.9)
pt3dadd(46.95, 63.14, 10.3, 3.9)
pt3dadd(46.92, 63.22, 10.3, 3.9)
}
}
proc shape3d_152() {
dend[101] { pt3dadd(46.88, 63.3, 10.3, 3.9)
pt3dadd(46.85, 63.34, 10.3, 3.9)
pt3dadd(46.78, 63.38, 10.3, 3.9)
pt3dadd(46.74, 63.46, 10.3, 3.9)
pt3dadd(46.71, 63.5, 10.3, 3.9)
pt3dadd(46.67, 63.58, 10.3, 3.9)
pt3dadd(46.6, 63.62, 10.3, 3.9)
pt3dadd(46.53, 63.65, 10.3, 3.9)
pt3dadd(46.49, 63.69, 10.3, 3.9)
pt3dadd(46.49, 63.78, 10.3, 3.9)
pt3dadd(46.43, 63.81, 10.3, 3.9)
pt3dadd(46.39, 63.89, 10.3, 3.9)
pt3dadd(46.32, 63.93, 10.3, 3.9)
pt3dadd(46.32, 64.01, 10.3, 3.9)
pt3dadd(46.29, 64.05, 10.3, 3.9)
pt3dadd(46.25, 64.09, 10.3, 3.9)
pt3dadd(46.22, 64.13, 10.3, 3.9)
pt3dadd(46.36, 64.09, 12.3, 3.9)
pt3dadd(46.32, 64.17, 12.3, 3.9)
pt3dadd(46.29, 64.25, 12.3, 3.9)
pt3dadd(46.25, 64.33, 12.3, 3.9)
pt3dadd(46.18, 64.45, 12.3, 3.9)
pt3dadd(46.15, 64.53, 12.3, 3.9)
pt3dadd(46.08, 64.72, 12.3, 3.9)
pt3dadd(46.01, 64.8, 12.3, 3.9)
pt3dadd(45.97, 64.88, 12.3, 3.9)
pt3dadd(45.97, 64.96, 12.3, 3.9)
pt3dadd(45.94, 65.04, 12.3, 3.9)
pt3dadd(45.9, 65.12, 12.3, 3.9)
pt3dadd(45.9, 65.2, 12.3, 3.9)
pt3dadd(45.87, 65.28, 12.3, 3.9)
pt3dadd(45.83, 65.36, 12.3, 3.9)
pt3dadd(45.83, 65.48, 12.3, 3.9)
pt3dadd(45.8, 65.51, 12.3, 3.9)
pt3dadd(45.8, 65.64, 12.3, 3.9)
pt3dadd(45.76, 65.71, 12.3, 3.9)
pt3dadd(45.76, 65.83, 12.3, 3.9)
pt3dadd(45.73, 66.03, 12.3, 3.9)
pt3dadd(45.69, 66.15, 12.3, 3.9)
pt3dadd(45.69, 66.35, 12.3, 3.9)
pt3dadd(45.66, 66.43, 12.3, 3.9)
pt3dadd(45.66, 66.63, 12.3, 3.9)
pt3dadd(45.63, 66.7, 12.3, 3.9)
pt3dadd(45.63, 66.9, 12.3, 3.9)
pt3dadd(45.59, 66.98, 12.3, 3.9)
pt3dadd(45.59, 67.18, 12.3, 3.9)
pt3dadd(45.56, 67.33, 12.3, 3.9)
pt3dadd(45.56, 67.5, 12.3, 3.9)
pt3dadd(45.52, 67.57, 12.3, 3.9)
pt3dadd(45.52, 67.65, 12.3, 3.9)
pt3dadd(45.49, 67.73, 12.3, 3.9)
pt3dadd(45.49, 67.85, 12.3, 3.9)
pt3dadd(45.45, 67.93, 12.3, 3.9)
pt3dadd(45.42, 68.01, 12.3, 3.9)
pt3dadd(45.42, 68.13, 12.3, 3.9)
pt3dadd(45.38, 68.21, 12.3, 3.9)
pt3dadd(45.35, 68.32, 12.3, 3.9)
pt3dadd(45.35, 68.4, 12.3, 3.9)
pt3dadd(45.31, 68.44, 12.3, 3.9)
pt3dadd(45.28, 68.52, 12.3, 3.9)
pt3dadd(45.28, 68.64, 12.3, 3.9)
pt3dadd(45.24, 68.68, 12.3, 3.9)
pt3dadd(45.24, 68.76, 12.3, 3.9)
pt3dadd(45.21, 68.8, 12.3, 3.9)
pt3dadd(45.21, 68.88, 12.3, 3.9)
pt3dadd(45.17, 68.92, 12.3, 3.9)
pt3dadd(45.17, 69, 12.3, 3.9)
pt3dadd(45.14, 69.04, 12.3, 3.9)
pt3dadd(45.14, 69.08, 12.3, 3.9)
pt3dadd(45.35, 68.8, 14.3, 3.9)
pt3dadd(45.24, 68.88, 16.3, 3.9)
pt3dadd(45.24, 68.96, 16.3, 3.9)
pt3dadd(45.17, 69, 16.3, 3.9)
pt3dadd(45.1, 69.08, 16.3, 3.9)
pt3dadd(45.07, 69.16, 16.3, 3.9)
pt3dadd(45.03, 69.28, 16.3, 3.9)
pt3dadd(45, 69.32, 16.3, 3.9)
pt3dadd(44.89, 69.43, 16.3, 3.9)
pt3dadd(44.86, 69.51, 16.3, 3.9)
pt3dadd(44.79, 69.55, 16.3, 3.9)
pt3dadd(44.72, 69.63, 16.3, 3.9)
pt3dadd(44.65, 69.71, 16.3, 3.9)
pt3dadd(44.58, 69.79, 16.3, 3.9)
pt3dadd(44.54, 69.87, 16.3, 3.9)
pt3dadd(44.44, 69.95, 16.3, 3.9)
pt3dadd(44.37, 70.03, 16.3, 3.9)
pt3dadd(44.3, 70.11, 16.3, 3.9)
pt3dadd(44.2, 70.18, 16.3, 3.9)
pt3dadd(44.06, 70.31, 16.3, 3.9)
pt3dadd(43.95, 70.34, 16.3, 3.9)
pt3dadd(43.88, 70.42, 16.3, 3.9)
pt3dadd(43.71, 70.54, 16.3, 3.9)
pt3dadd(43.53, 70.66, 16.3, 3.9)
pt3dadd(43.47, 70.74, 16.3, 3.9)
pt3dadd(43.36, 70.78, 16.3, 3.9)
pt3dadd(43.26, 70.86, 16.3, 3.9)
pt3dadd(43.15, 70.94, 16.3, 3.9)
pt3dadd(43.08, 71.01, 16.3, 3.9)
pt3dadd(42.98, 71.06, 16.3, 3.9)
pt3dadd(42.87, 71.1, 16.3, 3.9)
pt3dadd(42.84, 71.14, 16.3, 3.9)
pt3dadd(42.67, 71.25, 16.3, 3.9)
pt3dadd(42.56, 71.29, 16.3, 3.9)
pt3dadd(42.46, 71.33, 16.3, 3.9)
pt3dadd(42.38, 71.41, 16.3, 3.9)
pt3dadd(42.21, 71.53, 16.3, 3.9)
pt3dadd(42.14, 71.57, 16.3, 3.9)
pt3dadd(41.9, 71.69, 16.3, 3.9)
pt3dadd(41.79, 71.77, 16.3, 3.9)
pt3dadd(41.69, 71.81, 16.3, 3.9)
pt3dadd(41.58, 71.85, 16.3, 3.9)
pt3dadd(41.51, 71.93, 16.3, 3.9)
pt3dadd(41.41, 71.96, 16.3, 3.9)
pt3dadd(41.38, 72, 16.3, 3.9)
pt3dadd(41.31, 72.04, 16.3, 3.9)
pt3dadd(41.24, 72.08, 16.3, 3.9)
pt3dadd(41.17, 72.13, 16.3, 3.9)
pt3dadd(41.06, 72.16, 16.3, 3.9)
pt3dadd(41.03, 72.24, 16.3, 3.9)
pt3dadd(40.96, 72.28, 16.3, 3.9)
pt3dadd(40.92, 72.32, 16.3, 3.9)
pt3dadd(40.82, 72.36, 16.3, 3.9)
pt3dadd(40.71, 72.48, 16.3, 3.9)
pt3dadd(40.64, 72.52, 16.3, 3.9)
pt3dadd(40.61, 72.56, 16.3, 3.9)
pt3dadd(40.54, 72.6, 16.3, 3.9)
pt3dadd(40.51, 72.64, 16.3, 3.9)
pt3dadd(40.47, 72.72, 16.3, 3.9)
pt3dadd(40.4, 72.76, 16.3, 3.9)
pt3dadd(40.37, 72.8, 16.3, 3.9)
pt3dadd(40.29, 72.88, 16.3, 3.9)
pt3dadd(40.26, 72.92, 16.3, 3.9)
pt3dadd(40.19, 73, 16.3, 3.9)
pt3dadd(40.15, 73.04, 16.3, 3.9)
pt3dadd(40.08, 73.07, 16.3, 3.9)
pt3dadd(40.05, 73.11, 16.3, 3.9)
pt3dadd(40.01, 73.15, 16.3, 3.9)
pt3dadd(39.98, 73.23, 16.3, 3.9)
pt3dadd(39.91, 73.27, 16.3, 3.9)
pt3dadd(39.77, 73.43, 16.3, 3.9)
pt3dadd(39.74, 73.47, 16.3, 3.9)
pt3dadd(39.67, 73.51, 16.3, 3.9)
pt3dadd(39.63, 73.55, 16.3, 3.9)
pt3dadd(39.6, 73.59, 16.3, 3.9)
pt3dadd(39.53, 73.67, 16.3, 3.9)
pt3dadd(39.49, 73.71, 16.3, 3.9)
pt3dadd(39.46, 73.79, 16.3, 3.9)
pt3dadd(39.42, 73.82, 16.3, 3.9)
pt3dadd(39.39, 73.86, 16.3, 3.9)
pt3dadd(39.35, 73.9, 16.3, 3.9)
pt3dadd(39.32, 73.94, 16.3, 3.9)
pt3dadd(39.28, 73.99, 16.3, 3.9)
pt3dadd(39.4, 74.07, 16.3, 3.9)
}
dend[102] {pt3dclear()
pt3dadd(39.4, 74.07, 16.3, 3.9)
pt3dadd(39.25, 74.06, 16.3, 3.9)
pt3dadd(39.25, 74.14, 16.3, 3.9)
pt3dadd(39.22, 74.18, 16.3, 3.9)
pt3dadd(39.18, 74.22, 16.3, 3.9)
pt3dadd(39.15, 74.3, 16.3, 3.9)
pt3dadd(39.11, 74.3, 16.3, 3.9)
pt3dadd(39.25, 73.99, 21.3, 3.9)
pt3dadd(39.22, 74.02, 21.3, 3.9)
pt3dadd(39.18, 74.1, 21.3, 3.9)
pt3dadd(39.11, 74.14, 21.3, 3.9)
pt3dadd(39.04, 74.26, 21.3, 3.9)
pt3dadd(39.01, 74.34, 21.3, 3.9)
pt3dadd(38.97, 74.46, 21.3, 3.9)
pt3dadd(38.9, 74.54, 21.3, 3.9)
pt3dadd(38.83, 74.62, 21.3, 3.9)
pt3dadd(38.76, 74.82, 21.3, 3.9)
pt3dadd(38.69, 74.89, 21.3, 3.9)
pt3dadd(38.59, 75.09, 21.3, 3.9)
pt3dadd(38.55, 75.21, 21.3, 3.9)
pt3dadd(38.45, 75.37, 21.3, 3.9)
pt3dadd(38.35, 75.53, 21.3, 3.9)
pt3dadd(38.28, 75.61, 21.3, 3.9)
pt3dadd(38.21, 75.72, 21.3, 3.9)
pt3dadd(38.13, 75.88, 21.3, 3.9)
pt3dadd(38.06, 75.96, 21.3, 3.9)
pt3dadd(38.03, 76.08, 21.3, 3.9)
pt3dadd(37.96, 76.2, 21.3, 3.9)
pt3dadd(37.89, 76.32, 21.3, 3.9)
pt3dadd(37.82, 76.4, 21.3, 3.9)
pt3dadd(37.75, 76.48, 21.3, 3.9)
pt3dadd(37.72, 76.6, 21.3, 3.9)
pt3dadd(37.68, 76.68, 21.3, 3.9)
pt3dadd(37.61, 76.79, 21.3, 3.9)
pt3dadd(37.58, 76.87, 21.3, 3.9)
pt3dadd(37.51, 76.91, 21.3, 3.9)
pt3dadd(37.47, 76.99, 21.3, 3.9)
pt3dadd(37.44, 77.11, 21.3, 3.9)
pt3dadd(37.4, 77.19, 21.3, 3.9)
pt3dadd(37.33, 77.27, 21.3, 3.9)
pt3dadd(37.3, 77.35, 21.3, 3.9)
pt3dadd(37.23, 77.43, 21.3, 3.9)
pt3dadd(37.19, 77.5, 21.3, 3.9)
pt3dadd(37.16, 77.58, 21.3, 3.9)
pt3dadd(37.13, 77.63, 21.3, 3.9)
pt3dadd(37.09, 77.67, 21.3, 3.9)
pt3dadd(37.06, 77.74, 21.3, 3.9)
}
}
proc shape3d_153() {
dend[102] { pt3dadd(37.02, 77.78, 21.3, 3.9)
pt3dadd(36.95, 77.9, 21.3, 3.9)
pt3dadd(36.88, 77.98, 21.3, 3.9)
pt3dadd(36.85, 78.02, 21.3, 3.9)
pt3dadd(36.85, 78.1, 21.3, 3.9)
pt3dadd(36.81, 78.14, 21.3, 3.9)
pt3dadd(36.78, 78.22, 21.3, 3.9)
pt3dadd(36.78, 78.3, 21.3, 3.9)
pt3dadd(36.74, 78.38, 21.3, 3.9)
pt3dadd(36.74, 78.54, 21.3, 3.9)
pt3dadd(36.71, 78.61, 21.3, 3.9)
pt3dadd(36.71, 81.9, 21.3, 3.9)
pt3dadd(36.67, 81.98, 21.3, 3.9)
pt3dadd(36.67, 82.25, 21.3, 3.9)
pt3dadd(36.64, 82.29, 21.3, 3.9)
pt3dadd(36.64, 82.45, 21.3, 3.9)
pt3dadd(36.6, 82.53, 21.3, 3.9)
pt3dadd(36.6, 82.65, 21.3, 3.9)
pt3dadd(36.57, 82.69, 21.3, 3.9)
pt3dadd(36.57, 82.77, 21.3, 3.9)
pt3dadd(36.74, 82.65, 25.3, 3.9)
pt3dadd(36.67, 82.69, 25.3, 3.9)
pt3dadd(36.64, 82.77, 25.3, 3.9)
pt3dadd(36.57, 82.85, 25.3, 3.9)
pt3dadd(36.5, 82.96, 25.3, 3.9)
pt3dadd(36.43, 83.04, 25.3, 3.9)
pt3dadd(36.32, 83.17, 25.3, 3.9)
pt3dadd(36.29, 83.24, 25.3, 3.9)
pt3dadd(36.19, 83.4, 25.3, 3.9)
pt3dadd(36.08, 83.52, 25.3, 3.9)
pt3dadd(36.04, 83.56, 25.3, 3.9)
pt3dadd(35.9, 83.72, 25.3, 3.9)
pt3dadd(35.83, 83.76, 25.3, 3.9)
pt3dadd(35.76, 83.84, 25.3, 3.9)
pt3dadd(35.7, 83.88, 25.3, 3.9)
pt3dadd(35.63, 83.96, 25.3, 3.9)
pt3dadd(35.52, 84.07, 25.3, 3.9)
pt3dadd(35.42, 84.15, 25.3, 3.9)
pt3dadd(35.31, 84.23, 25.3, 3.9)
pt3dadd(35.24, 84.27, 25.3, 3.9)
pt3dadd(35.14, 84.35, 25.3, 3.9)
pt3dadd(35.07, 84.39, 25.3, 3.9)
pt3dadd(34.97, 84.47, 25.3, 3.9)
pt3dadd(34.86, 84.55, 25.3, 3.9)
pt3dadd(34.76, 84.59, 25.3, 3.9)
pt3dadd(34.65, 84.67, 25.3, 3.9)
pt3dadd(34.55, 84.71, 25.3, 3.9)
pt3dadd(34.48, 84.75, 25.3, 3.9)
pt3dadd(34.41, 84.79, 25.3, 3.9)
pt3dadd(34.3, 84.86, 25.3, 3.9)
pt3dadd(34.2, 84.9, 25.3, 3.9)
pt3dadd(34.13, 84.99, 25.3, 3.9)
pt3dadd(34.03, 85.02, 25.3, 3.9)
pt3dadd(33.99, 85.1, 25.3, 3.9)
pt3dadd(33.92, 85.14, 25.3, 3.9)
pt3dadd(33.88, 85.18, 25.3, 3.9)
pt3dadd(33.85, 85.26, 25.3, 3.9)
pt3dadd(33.78, 85.3, 25.3, 3.9)
pt3dadd(33.74, 85.34, 25.3, 3.9)
pt3dadd(33.71, 85.34, 25.3, 3.9)
pt3dadd(33.99, 85.14, 27.3, 3.9)
pt3dadd(33.96, 85.18, 27.3, 3.9)
pt3dadd(33.88, 85.22, 27.3, 3.9)
pt3dadd(33.78, 85.26, 27.3, 3.9)
pt3dadd(33.71, 85.3, 27.3, 3.9)
pt3dadd(33.6, 85.38, 27.3, 3.9)
pt3dadd(33.54, 85.46, 27.3, 3.9)
pt3dadd(33.36, 85.58, 27.3, 3.9)
pt3dadd(33.22, 85.66, 27.3, 3.9)
pt3dadd(33.15, 85.7, 27.3, 3.9)
pt3dadd(33.05, 85.78, 27.3, 3.9)
pt3dadd(33.01, 85.82, 27.3, 3.9)
pt3dadd(32.94, 85.86, 27.3, 3.9)
pt3dadd(32.88, 85.89, 27.3, 3.9)
pt3dadd(32.84, 85.93, 27.3, 3.9)
pt3dadd(32.77, 86.01, 27.3, 3.9)
pt3dadd(32.74, 86.05, 27.3, 3.9)
pt3dadd(32.7, 86.13, 27.3, 3.9)
pt3dadd(32.67, 86.17, 27.3, 3.9)
pt3dadd(32.6, 86.21, 27.3, 3.9)
pt3dadd(32.56, 86.29, 27.3, 3.9)
pt3dadd(32.53, 86.33, 27.3, 3.9)
pt3dadd(32.49, 86.37, 27.3, 3.9)
pt3dadd(32.46, 86.41, 27.3, 3.9)
pt3dadd(32.39, 86.53, 27.3, 3.9)
pt3dadd(32.35, 86.61, 27.3, 3.9)
pt3dadd(32.32, 86.68, 27.3, 3.9)
pt3dadd(32.28, 86.76, 27.3, 3.9)
pt3dadd(32.28, 86.88, 27.3, 3.9)
pt3dadd(32.25, 86.96, 27.3, 3.9)
pt3dadd(32.25, 87.04, 27.3, 3.9)
pt3dadd(32.21, 87.12, 27.3, 3.9)
pt3dadd(32.21, 87.4, 27.3, 3.9)
pt3dadd(32.18, 87.52, 27.3, 3.9)
pt3dadd(32.18, 90.53, 27.3, 3.9)
pt3dadd(32.14, 90.56, 27.3, 3.9)
pt3dadd(32.14, 90.88, 27.3, 3.9)
pt3dadd(32.11, 90.96, 27.3, 3.9)
pt3dadd(32.07, 91, 27.3, 3.9)
pt3dadd(32.04, 91.04, 27.3, 3.9)
pt3dadd(32, 91.12, 27.3, 3.9)
pt3dadd(31.93, 91.2, 27.3, 3.9)
pt3dadd(31.9, 91.32, 27.3, 3.9)
pt3dadd(31.86, 91.39, 27.3, 3.9)
pt3dadd(31.8, 91.47, 27.3, 3.9)
pt3dadd(31.73, 91.59, 27.3, 3.9)
pt3dadd(31.69, 91.67, 27.3, 3.9)
pt3dadd(31.66, 91.75, 27.3, 3.9)
pt3dadd(31.62, 91.79, 27.3, 3.9)
pt3dadd(31.62, 91.83, 29.3, 3.9)
pt3dadd(31.58, 91.87, 29.3, 3.9)
pt3dadd(31.55, 91.91, 29.3, 3.9)
pt3dadd(31.48, 91.95, 29.3, 3.9)
pt3dadd(31.44, 92.03, 29.3, 3.9)
pt3dadd(31.38, 92.07, 29.3, 3.9)
pt3dadd(31.27, 92.15, 29.3, 3.9)
pt3dadd(31.24, 92.18, 29.3, 3.9)
pt3dadd(31.13, 92.26, 29.3, 3.9)
pt3dadd(31.06, 92.35, 29.3, 3.9)
pt3dadd(30.99, 92.38, 29.3, 3.9)
pt3dadd(30.92, 92.42, 29.3, 3.9)
pt3dadd(30.89, 92.5, 29.3, 3.9)
pt3dadd(30.82, 92.54, 29.3, 3.9)
pt3dadd(30.72, 92.58, 29.3, 3.9)
pt3dadd(30.61, 92.66, 29.3, 3.9)
pt3dadd(30.43, 92.74, 29.3, 3.9)
pt3dadd(30.33, 92.82, 29.3, 3.9)
pt3dadd(30.23, 92.86, 29.3, 3.9)
pt3dadd(30.12, 92.94, 29.3, 3.9)
pt3dadd(30.02, 92.98, 29.3, 3.9)
pt3dadd(29.91, 93.06, 29.3, 3.9)
pt3dadd(29.81, 93.1, 29.3, 3.9)
pt3dadd(29.7, 93.18, 29.3, 3.9)
pt3dadd(29.64, 93.21, 29.3, 3.9)
pt3dadd(29.53, 93.25, 29.3, 3.9)
pt3dadd(29.39, 93.29, 29.3, 3.9)
pt3dadd(29.32, 93.37, 29.3, 3.9)
pt3dadd(29.18, 93.41, 29.3, 3.9)
pt3dadd(29.08, 93.49, 29.3, 3.9)
pt3dadd(28.97, 93.53, 29.3, 3.9)
pt3dadd(28.87, 93.61, 29.3, 3.9)
pt3dadd(28.76, 93.65, 29.3, 3.9)
pt3dadd(28.66, 93.69, 29.3, 3.9)
pt3dadd(28.52, 93.77, 29.3, 3.9)
pt3dadd(28.42, 93.81, 29.3, 3.9)
pt3dadd(28.31, 93.89, 29.3, 3.9)
pt3dadd(28.2, 93.93, 29.3, 3.9)
pt3dadd(28.07, 93.97, 29.3, 3.9)
pt3dadd(28, 94.04, 29.3, 3.9)
pt3dadd(27.93, 94.08, 29.3, 3.9)
pt3dadd(27.82, 94.17, 29.3, 3.9)
pt3dadd(27.75, 94.17, 29.3, 3.9)
pt3dadd(27.68, 94.24, 29.3, 3.9)
pt3dadd(27.61, 94.24, 29.3, 3.9)
pt3dadd(27.55, 94.32, 29.3, 3.9)
pt3dadd(27.48, 94.36, 29.3, 3.9)
pt3dadd(27.41, 94.36, 29.3, 3.9)
pt3dadd(27.33, 94.4, 29.3, 3.9)
pt3dadd(27.41, 94.36, 33.3, 3.9)
pt3dadd(27.37, 94.4, 33.3, 3.9)
pt3dadd(27.3, 94.44, 33.3, 3.9)
pt3dadd(27.26, 94.48, 33.3, 3.9)
pt3dadd(27.13, 94.6, 33.3, 3.9)
pt3dadd(27.06, 94.64, 33.3, 3.9)
pt3dadd(26.92, 94.72, 33.3, 3.9)
pt3dadd(26.81, 94.8, 33.3, 3.9)
pt3dadd(26.71, 94.92, 33.3, 3.9)
pt3dadd(26.57, 95, 33.3, 3.9)
pt3dadd(26.43, 95.07, 33.3, 3.9)
pt3dadd(26.33, 95.19, 33.3, 3.9)
pt3dadd(26.22, 95.19, 33.3, 3.9)
pt3dadd(26.11, 95.31, 33.3, 3.9)
pt3dadd(26.01, 95.35, 33.3, 3.9)
pt3dadd(25.94, 95.39, 33.3, 3.9)
pt3dadd(25.87, 95.43, 33.3, 3.9)
pt3dadd(25.8, 95.47, 33.3, 3.9)
pt3dadd(25.73, 95.55, 33.3, 3.9)
pt3dadd(25.66, 95.59, 33.3, 3.9)
pt3dadd(25.56, 95.63, 33.3, 3.9)
pt3dadd(25.49, 95.71, 33.3, 3.9)
pt3dadd(25.39, 95.75, 33.3, 3.9)
pt3dadd(25.28, 95.79, 33.3, 3.9)
pt3dadd(25.17, 95.86, 33.3, 3.9)
pt3dadd(25.1, 95.86, 33.3, 3.9)
pt3dadd(25.03, 95.94, 33.3, 3.9)
pt3dadd(24.93, 95.99, 33.3, 3.9)
pt3dadd(24.83, 95.99, 33.3, 3.9)
pt3dadd(24.72, 96.03, 33.3, 3.9)
pt3dadd(24.62, 96.06, 33.3, 3.9)
pt3dadd(24.55, 96.1, 33.3, 3.9)
pt3dadd(24.44, 96.1, 33.3, 3.9)
pt3dadd(24.34, 96.14, 33.3, 3.9)
pt3dadd(23.47, 96.14, 33.3, 3.9)
pt3dadd(23.33, 96.18, 33.3, 3.9)
pt3dadd(21.66, 96.18, 33.3, 3.9)
pt3dadd(21.62, 96.22, 33.3, 3.9)
pt3dadd(21.59, 96.22, 33.3, 3.9)
pt3dadd(21.62, 96.1, 36.3, 3.9)
pt3dadd(21.55, 96.1, 36.3, 3.9)
pt3dadd(21.48, 96.18, 36.3, 3.9)
}
}
proc shape3d_154() {
dend[102] { pt3dadd(21.38, 96.22, 36.3, 3.9)
pt3dadd(21.27, 96.3, 36.3, 3.9)
pt3dadd(21.2, 96.34, 36.3, 3.9)
pt3dadd(21.14, 96.38, 36.3, 3.9)
pt3dadd(21, 96.46, 36.3, 3.9)
pt3dadd(20.96, 96.5, 36.3, 3.9)
pt3dadd(20.89, 96.54, 36.3, 3.9)
pt3dadd(20.82, 96.58, 36.3, 3.9)
pt3dadd(20.72, 96.66, 36.3, 3.9)
pt3dadd(20.65, 96.7, 36.3, 3.9)
pt3dadd(20.58, 96.74, 36.3, 3.9)
pt3dadd(20.47, 96.82, 36.3, 3.9)
pt3dadd(20.37, 96.86, 36.3, 3.9)
pt3dadd(20.3, 96.89, 36.3, 3.9)
pt3dadd(20.19, 96.93, 36.3, 3.9)
pt3dadd(20.16, 97.01, 36.3, 3.9)
pt3dadd(20.06, 97.05, 36.3, 3.9)
pt3dadd(19.99, 97.09, 36.3, 3.9)
pt3dadd(19.92, 97.13, 36.3, 3.9)
pt3dadd(19.84, 97.21, 36.3, 3.9)
pt3dadd(19.74, 97.25, 36.3, 3.9)
pt3dadd(19.67, 97.29, 36.3, 3.9)
pt3dadd(19.6, 97.33, 36.3, 3.9)
pt3dadd(19.5, 97.37, 36.3, 3.9)
pt3dadd(19.39, 97.45, 36.3, 3.9)
pt3dadd(19.32, 97.49, 36.3, 3.9)
pt3dadd(19.25, 97.53, 36.3, 3.9)
pt3dadd(19.18, 97.57, 36.3, 3.9)
pt3dadd(19.11, 97.61, 36.3, 3.9)
pt3dadd(19.04, 97.68, 36.3, 3.9)
pt3dadd(18.98, 97.72, 36.3, 3.9)
pt3dadd(18.91, 97.76, 36.3, 3.9)
pt3dadd(18.8, 97.85, 36.3, 3.9)
pt3dadd(18.73, 97.89, 36.3, 3.9)
pt3dadd(18.66, 97.92, 36.3, 3.9)
pt3dadd(18.63, 98, 36.3, 3.9)
pt3dadd(18.52, 98.08, 36.3, 3.9)
pt3dadd(18.31, 98.32, 36.3, 3.9)
pt3dadd(18.28, 98.4, 36.3, 3.9)
pt3dadd(18.24, 98.44, 36.3, 3.9)
pt3dadd(18.17, 98.48, 36.3, 3.9)
pt3dadd(18.14, 98.56, 36.3, 3.9)
pt3dadd(18.1, 98.6, 36.3, 3.9)
pt3dadd(18.07, 98.64, 36.3, 3.9)
pt3dadd(18, 98.71, 36.3, 3.9)
pt3dadd(17.93, 98.83, 36.3, 3.9)
pt3dadd(17.9, 98.91, 36.3, 3.9)
pt3dadd(17.86, 98.95, 36.3, 3.9)
pt3dadd(17.83, 99.03, 36.3, 3.9)
pt3dadd(17.79, 99.07, 36.3, 3.9)
pt3dadd(17.75, 99.15, 36.3, 3.9)
pt3dadd(17.72, 99.23, 36.3, 3.9)
pt3dadd(17.72, 99.31, 36.3, 3.9)
pt3dadd(17.65, 99.39, 36.3, 3.9)
pt3dadd(17.65, 99.47, 36.3, 3.9)
pt3dadd(17.61, 99.5, 36.3, 3.9)
pt3dadd(17.58, 99.58, 36.3, 3.9)
pt3dadd(17.55, 99.63, 36.3, 3.9)
pt3dadd(17.51, 99.67, 36.3, 3.9)
pt3dadd(17.51, 99.78, 36.3, 3.9)
pt3dadd(17.48, 99.82, 36.3, 3.9)
pt3dadd(17.44, 99.86, 36.3, 3.9)
pt3dadd(17.41, 99.94, 36.3, 3.9)
pt3dadd(17.37, 100.02, 36.3, 3.9)
pt3dadd(17.34, 100.06, 36.3, 3.9)
pt3dadd(17.34, 100.14, 36.3, 3.9)
pt3dadd(17.3, 100.18, 36.3, 3.9)
pt3dadd(17.27, 100.26, 36.3, 3.9)
pt3dadd(17.23, 100.3, 36.3, 3.9)
pt3dadd(17.2, 100.38, 36.3, 3.9)
pt3dadd(17.16, 100.46, 36.3, 3.9)
pt3dadd(17.13, 100.5, 36.3, 3.9)
pt3dadd(17.09, 100.57, 36.3, 3.9)
pt3dadd(17.06, 100.61, 36.3, 3.9)
pt3dadd(17.02, 100.65, 36.3, 3.9)
pt3dadd(16.99, 100.73, 36.3, 3.9)
pt3dadd(16.95, 100.77, 36.3, 3.9)
pt3dadd(16.88, 100.81, 36.3, 3.9)
pt3dadd(16.85, 100.89, 36.3, 3.9)
pt3dadd(16.82, 100.97, 36.3, 3.9)
pt3dadd(16.78, 101.01, 36.3, 3.9)
pt3dadd(16.75, 101.09, 36.3, 3.9)
pt3dadd(16.71, 101.13, 36.3, 3.9)
pt3dadd(16.64, 101.21, 36.3, 3.9)
pt3dadd(16.6, 101.29, 36.3, 3.9)
pt3dadd(16.57, 101.33, 36.3, 3.9)
pt3dadd(16.53, 101.44, 36.3, 3.9)
pt3dadd(16.5, 101.53, 36.3, 3.9)
pt3dadd(16.43, 101.64, 36.3, 3.9)
pt3dadd(16.33, 101.76, 36.3, 3.9)
pt3dadd(16.12, 102.16, 36.3, 3.9)
pt3dadd(15.87, 102.43, 36.3, 3.9)
pt3dadd(15.66, 102.79, 36.3, 3.9)
pt3dadd(15.49, 103.07, 36.3, 3.9)
pt3dadd(15.31, 103.26, 36.3, 3.9)
pt3dadd(15.21, 103.46, 36.3, 3.9)
pt3dadd(15.14, 103.54, 36.3, 3.9)
pt3dadd(15.11, 103.58, 36.3, 3.9)
pt3dadd(15.07, 103.62, 36.3, 3.9)
pt3dadd(15.04, 103.66, 36.3, 3.9)
pt3dadd(15, 103.7, 36.3, 3.9)
pt3dadd(14.93, 103.7, 36.3, 3.9)
pt3dadd(14.9, 103.74, 36.3, 3.9)
pt3dadd(14.86, 103.78, 36.3, 3.9)
pt3dadd(14.79, 103.78, 36.3, 3.9)
pt3dadd(14.76, 103.82, 36.3, 3.9)
pt3dadd(14.72, 103.86, 36.3, 3.9)
pt3dadd(14.97, 103.58, 39.3, 3.9)
pt3dadd(14.93, 103.62, 39.3, 3.9)
pt3dadd(14.86, 103.7, 39.3, 3.9)
pt3dadd(14.76, 103.78, 39.3, 3.9)
pt3dadd(14.62, 103.9, 39.3, 3.9)
pt3dadd(14.48, 104.1, 39.3, 3.9)
pt3dadd(14.34, 104.25, 39.3, 3.9)
pt3dadd(14.16, 104.37, 39.3, 3.9)
pt3dadd(14.03, 104.53, 39.3, 3.9)
pt3dadd(13.92, 104.69, 39.3, 3.9)
pt3dadd(13.82, 104.85, 39.3, 3.9)
pt3dadd(13.71, 104.97, 39.3, 3.9)
pt3dadd(13.61, 105.13, 39.3, 3.9)
pt3dadd(13.47, 105.28, 39.3, 3.9)
pt3dadd(13.4, 105.4, 39.3, 3.9)
pt3dadd(13.3, 105.56, 39.3, 3.9)
pt3dadd(13.23, 105.72, 39.3, 3.9)
pt3dadd(13.12, 105.84, 39.3, 3.9)
pt3dadd(13.05, 105.96, 39.3, 3.9)
pt3dadd(12.95, 106.11, 39.3, 3.9)
pt3dadd(12.88, 106.23, 39.3, 3.9)
pt3dadd(12.81, 106.39, 39.3, 3.9)
pt3dadd(12.7, 106.51, 39.3, 3.9)
pt3dadd(12.6, 106.71, 39.3, 3.9)
pt3dadd(12.53, 106.83, 39.3, 3.9)
pt3dadd(12.46, 106.9, 39.3, 3.9)
pt3dadd(12.39, 107.03, 39.3, 3.9)
pt3dadd(12.32, 107.14, 39.3, 3.9)
pt3dadd(12.25, 107.26, 39.3, 3.9)
pt3dadd(12.18, 107.38, 39.3, 3.9)
pt3dadd(12.15, 107.46, 39.3, 3.9)
pt3dadd(12.07, 107.58, 39.3, 3.9)
pt3dadd(12.01, 107.7, 39.3, 3.9)
pt3dadd(11.94, 107.82, 39.3, 3.9)
pt3dadd(11.87, 107.93, 39.3, 3.9)
pt3dadd(11.83, 108.01, 39.3, 3.9)
pt3dadd(11.73, 108.13, 39.3, 3.9)
pt3dadd(11.69, 108.21, 39.3, 3.9)
pt3dadd(11.66, 108.33, 39.3, 3.9)
pt3dadd(11.62, 108.37, 39.3, 3.9)
pt3dadd(11.59, 108.45, 39.3, 3.9)
pt3dadd(11.48, 108.57, 39.3, 3.9)
pt3dadd(11.45, 108.61, 39.3, 3.9)
pt3dadd(11.41, 108.65, 39.3, 3.9)
pt3dadd(11.38, 108.76, 39.3, 3.9)
pt3dadd(11.35, 108.85, 39.3, 3.9)
pt3dadd(11.31, 108.92, 39.3, 3.9)
pt3dadd(11.31, 109, 39.3, 3.9)
pt3dadd(11.27, 109.04, 39.3, 3.9)
pt3dadd(11.27, 109.12, 39.3, 3.9)
pt3dadd(11.24, 109.2, 39.3, 3.9)
pt3dadd(11.2, 109.28, 39.3, 3.9)
pt3dadd(11.2, 109.99, 39.3, 3.9)
pt3dadd(11.17, 110.03, 39.3, 3.9)
pt3dadd(11.17, 110.15, 39.3, 3.9)
pt3dadd(11.14, 110.19, 39.3, 3.9)
pt3dadd(11.14, 110.31, 39.3, 3.9)
pt3dadd(11.1, 110.35, 39.3, 3.9)
pt3dadd(11.1, 110.43, 39.3, 3.9)
pt3dadd(11.06, 110.47, 39.3, 3.9)
pt3dadd(11.17, 110.35, 42.3, 3.9)
pt3dadd(11.1, 110.39, 42.3, 3.9)
pt3dadd(11.06, 110.43, 42.3, 3.9)
pt3dadd(10.99, 110.51, 42.3, 3.9)
pt3dadd(10.96, 110.58, 42.3, 3.9)
pt3dadd(10.93, 110.63, 42.3, 3.9)
pt3dadd(10.86, 110.63, 42.3, 3.9)
pt3dadd(10.82, 110.67, 42.3, 3.9)
pt3dadd(10.79, 110.71, 42.3, 3.9)
pt3dadd(10.72, 110.78, 42.3, 3.9)
pt3dadd(10.61, 110.86, 42.3, 3.9)
pt3dadd(10.54, 110.9, 42.3, 3.9)
pt3dadd(10.51, 110.94, 42.3, 3.9)
pt3dadd(10.44, 111.02, 42.3, 3.9)
pt3dadd(10.37, 111.02, 42.3, 3.9)
pt3dadd(10.34, 111.06, 42.3, 3.9)
pt3dadd(10.27, 111.1, 42.3, 3.9)
pt3dadd(10.19, 111.14, 42.3, 3.9)
pt3dadd(10.13, 111.14, 42.3, 3.9)
pt3dadd(10.06, 111.18, 42.3, 3.9)
pt3dadd(9.95, 111.22, 42.3, 3.9)
pt3dadd(9.74, 111.22, 42.3, 3.9)
pt3dadd(9.67, 111.26, 42.3, 3.9)
pt3dadd(9.39, 111.26, 42.3, 3.9)
pt3dadd(9.36, 111.3, 42.3, 3.9)
pt3dadd(9.08, 111.3, 42.3, 3.9)
pt3dadd(9.01, 111.34, 42.3, 3.9)
pt3dadd(8.9, 111.34, 42.3, 3.9)
pt3dadd(8.87, 111.38, 42.3, 3.9)
pt3dadd(8.77, 111.38, 42.3, 3.9)
pt3dadd(8.73, 111.42, 42.3, 3.9)
pt3dadd(8.66, 111.46, 42.3, 3.9)
pt3dadd(8.63, 111.5, 42.3, 3.9)
}
}
proc shape3d_155() {
dend[102] { pt3dadd(8.56, 111.5, 42.3, 3.9)
pt3dadd(8.45, 111.61, 42.3, 3.9)
pt3dadd(8.35, 111.65, 42.3, 3.9)
pt3dadd(8.24, 111.69, 42.3, 3.9)
pt3dadd(8.14, 111.77, 42.3, 3.9)
pt3dadd(7.97, 111.89, 42.3, 3.9)
pt3dadd(7.86, 111.97, 42.3, 3.9)
pt3dadd(7.79, 112.05, 42.3, 3.9)
pt3dadd(7.72, 112.09, 42.3, 3.9)
pt3dadd(7.65, 112.13, 42.3, 3.9)
pt3dadd(7.58, 112.21, 42.3, 3.9)
pt3dadd(7.51, 112.29, 42.3, 3.9)
pt3dadd(7.44, 112.33, 42.3, 3.9)
pt3dadd(7.41, 112.37, 42.3, 3.9)
pt3dadd(7.34, 112.4, 42.3, 3.9)
pt3dadd(7.23, 112.44, 42.3, 3.9)
pt3dadd(7.2, 112.53, 42.3, 3.9)
pt3dadd(7.13, 112.6, 42.3, 3.9)
pt3dadd(7.06, 112.64, 42.3, 3.9)
pt3dadd(6.99, 112.72, 42.3, 3.9)
pt3dadd(6.92, 112.76, 42.3, 3.9)
pt3dadd(6.85, 112.8, 42.3, 3.9)
pt3dadd(6.82, 112.84, 42.3, 3.9)
pt3dadd(6.74, 112.88, 42.3, 3.9)
pt3dadd(6.68, 112.96, 42.3, 3.9)
pt3dadd(6.61, 113.08, 42.3, 3.9)
pt3dadd(6.54, 113.12, 42.3, 3.9)
pt3dadd(6.47, 113.16, 42.3, 3.9)
pt3dadd(6.43, 113.2, 42.3, 3.9)
pt3dadd(6.4, 113.28, 42.3, 3.9)
pt3dadd(6.33, 113.36, 42.3, 3.9)
pt3dadd(6.26, 113.39, 42.3, 3.9)
pt3dadd(6.19, 113.43, 42.3, 3.9)
pt3dadd(6.15, 113.51, 42.3, 3.9)
pt3dadd(6.08, 113.55, 42.3, 3.9)
pt3dadd(6.05, 113.59, 42.3, 3.9)
pt3dadd(6.01, 113.63, 42.3, 3.9)
pt3dadd(5.95, 113.71, 42.3, 3.9)
pt3dadd(5.88, 113.79, 42.3, 3.9)
pt3dadd(5.84, 113.83, 42.3, 3.9)
pt3dadd(5.74, 113.95, 42.3, 3.9)
pt3dadd(5.7, 113.99, 42.3, 3.9)
pt3dadd(5.66, 114.03, 42.3, 3.9)
pt3dadd(5.63, 114.07, 42.3, 3.9)
pt3dadd(5.56, 114.11, 42.3, 3.9)
pt3dadd(5.53, 114.15, 42.3, 3.9)
pt3dadd(5.49, 114.19, 42.3, 3.9)
pt3dadd(5.42, 114.22, 42.3, 3.9)
pt3dadd(5.35, 114.22, 42.3, 3.9)
pt3dadd(5.32, 114.26, 42.3, 3.9)
pt3dadd(5.28, 114.31, 42.3, 3.9)
pt3dadd(5.21, 114.31, 42.3, 3.9)
pt3dadd(5.28, 114.15, 45.3, 3.9)
pt3dadd(5.21, 114.19, 45.3, 3.9)
pt3dadd(5.14, 114.26, 45.3, 3.9)
pt3dadd(5.04, 114.31, 45.3, 3.9)
pt3dadd(4.9, 114.39, 45.3, 3.9)
pt3dadd(4.8, 114.46, 45.3, 3.9)
pt3dadd(4.66, 114.5, 45.3, 3.9)
pt3dadd(4.55, 114.58, 45.3, 3.9)
pt3dadd(4.45, 114.62, 45.3, 3.9)
pt3dadd(4.38, 114.66, 45.3, 3.9)
pt3dadd(4.27, 114.7, 45.3, 3.9)
pt3dadd(4.24, 114.78, 45.3, 3.9)
pt3dadd(4.17, 114.78, 45.3, 3.9)
pt3dadd(4.13, 114.82, 45.3, 3.9)
pt3dadd(4.06, 114.9, 45.3, 3.9)
pt3dadd(4.03, 114.94, 45.3, 3.9)
pt3dadd(3.99, 114.98, 45.3, 3.9)
pt3dadd(3.92, 115.02, 45.3, 3.9)
pt3dadd(3.89, 115.06, 45.3, 3.9)
pt3dadd(3.86, 115.1, 45.3, 3.9)
pt3dadd(3.82, 115.14, 45.3, 3.9)
pt3dadd(3.71, 115.18, 45.3, 3.9)
pt3dadd(3.61, 115.25, 45.3, 3.9)
pt3dadd(3.51, 115.29, 45.3, 3.9)
pt3dadd(3.43, 115.33, 45.3, 3.9)
pt3dadd(3.4, 115.37, 45.3, 3.9)
pt3dadd(3.33, 115.45, 45.3, 3.9)
pt3dadd(3.23, 115.49, 45.3, 3.9)
pt3dadd(3.12, 115.53, 45.3, 3.9)
pt3dadd(3.02, 115.61, 45.3, 3.9)
pt3dadd(2.91, 115.65, 45.3, 3.9)
pt3dadd(2.81, 115.69, 45.3, 3.9)
pt3dadd(2.74, 115.81, 45.3, 3.9)
pt3dadd(2.6, 115.85, 45.3, 3.9)
pt3dadd(2.53, 115.89, 45.3, 3.9)
pt3dadd(2.46, 115.97, 45.3, 3.9)
pt3dadd(2.39, 115.97, 45.3, 3.9)
pt3dadd(2.32, 116.04, 45.3, 3.9)
pt3dadd(2.22, 116.04, 45.3, 3.9)
pt3dadd(2.15, 116.13, 45.3, 3.9)
pt3dadd(2.08, 116.17, 45.3, 3.9)
pt3dadd(2.01, 116.21, 45.3, 3.9)
pt3dadd(1.94, 116.25, 45.3, 3.9)
pt3dadd(1.87, 116.32, 45.3, 3.9)
pt3dadd(1.8, 116.36, 45.3, 3.9)
pt3dadd(1.76, 116.4, 45.3, 3.9)
pt3dadd(1.66, 116.48, 45.3, 3.9)
pt3dadd(1.59, 116.52, 45.3, 3.9)
pt3dadd(1.52, 116.6, 45.3, 3.9)
pt3dadd(1.41, 116.64, 45.3, 3.9)
pt3dadd(1.38, 116.68, 45.3, 3.9)
pt3dadd(1.31, 116.76, 45.3, 3.9)
pt3dadd(1.27, 116.8, 45.3, 3.9)
pt3dadd(1.21, 116.84, 45.3, 3.9)
pt3dadd(1.14, 116.88, 45.3, 3.9)
pt3dadd(1.1, 116.92, 45.3, 3.9)
pt3dadd(1.07, 116.92, 45.3, 3.9)
pt3dadd(1.1, 116.8, 46.3, 3.62)
pt3dadd(1.03, 116.8, 46.3, 3.62)
pt3dadd(0.96, 116.88, 46.3, 3.62)
pt3dadd(0.89, 116.92, 46.3, 3.62)
pt3dadd(0.79, 116.96, 46.3, 3.62)
pt3dadd(0.68, 117.04, 46.3, 3.62)
pt3dadd(0.62, 117.07, 46.3, 3.62)
pt3dadd(0.55, 117.11, 46.3, 3.62)
pt3dadd(0.47, 117.15, 46.3, 3.62)
pt3dadd(0.37, 117.27, 46.3, 3.62)
pt3dadd(0.3, 117.27, 46.3, 3.62)
pt3dadd(0.26, 117.31, 46.3, 3.62)
pt3dadd(0.23, 117.35, 46.3, 3.62)
pt3dadd(0.19, 117.39, 46.3, 3.62)
pt3dadd(0.13, 117.47, 46.3, 3.62)
pt3dadd(0.09, 117.51, 46.3, 3.62)
pt3dadd(0.06, 117.55, 46.3, 3.62)
pt3dadd(0.02, 117.63, 46.3, 3.62)
pt3dadd(-0.05, 117.67, 46.3, 3.62)
pt3dadd(-0.08, 117.75, 46.3, 3.62)
pt3dadd(-0.12, 117.79, 46.3, 3.62)
pt3dadd(-0.19, 117.83, 46.3, 3.62)
pt3dadd(-0.22, 117.87, 46.3, 3.62)
pt3dadd(-0.29, 117.9, 46.3, 3.62)
pt3dadd(-0.33, 117.99, 46.3, 3.62)
pt3dadd(-0.4, 117.99, 46.3, 3.62)
pt3dadd(-0.43, 118.03, 46.3, 3.62)
pt3dadd(-0.47, 118.07, 46.3, 3.62)
pt3dadd(-0.5, 118.11, 46.3, 3.62)
pt3dadd(-0.54, 118.18, 46.3, 3.62)
pt3dadd(-0.57, 118.22, 46.3, 3.62)
pt3dadd(-0.61, 118.26, 46.3, 3.62)
pt3dadd(-0.68, 118.34, 46.3, 3.62)
pt3dadd(-0.71, 118.38, 46.3, 3.62)
pt3dadd(-0.85, 118.54, 46.3, 3.62)
pt3dadd(-0.92, 118.58, 46.3, 3.62)
pt3dadd(-0.95, 118.66, 46.3, 3.62)
pt3dadd(-0.99, 118.74, 46.3, 3.62)
pt3dadd(-1.06, 118.78, 46.3, 3.62)
pt3dadd(-1.13, 118.82, 46.3, 3.62)
pt3dadd(-1.16, 118.86, 46.3, 3.62)
pt3dadd(-1.23, 118.93, 46.3, 3.62)
pt3dadd(-1.27, 118.97, 46.3, 3.62)
pt3dadd(-1.3, 119.01, 46.3, 3.62)
pt3dadd(-1.37, 119.05, 46.3, 3.62)
pt3dadd(-1.44, 119.09, 46.3, 3.62)
pt3dadd(-1.48, 119.17, 46.3, 3.62)
pt3dadd(-1.51, 119.25, 46.3, 3.62)
pt3dadd(-1.54, 119.29, 46.3, 3.62)
pt3dadd(-1.58, 119.33, 46.3, 3.62)
pt3dadd(-1.68, 119.45, 46.3, 3.62)
pt3dadd(-1.72, 119.49, 46.3, 3.62)
pt3dadd(-1.89, 119.69, 46.3, 3.62)
pt3dadd(-1.93, 119.76, 46.3, 3.62)
pt3dadd(-2, 119.81, 46.3, 3.62)
pt3dadd(-2.03, 119.85, 46.3, 3.62)
pt3dadd(-2.1, 119.93, 46.3, 3.62)
pt3dadd(-2.14, 119.96, 46.3, 3.62)
pt3dadd(-2.21, 120.04, 46.3, 3.62)
pt3dadd(-2.24, 120.08, 46.3, 3.62)
pt3dadd(-2.28, 120.12, 46.3, 3.62)
pt3dadd(-2.35, 120.16, 46.3, 3.62)
pt3dadd(-2.38, 120.24, 46.3, 3.62)
pt3dadd(-2.45, 120.28, 46.3, 3.62)
pt3dadd(-2.49, 120.36, 46.3, 3.62)
pt3dadd(-2.56, 120.4, 46.3, 3.62)
pt3dadd(-2.59, 120.48, 46.3, 3.62)
pt3dadd(-2.66, 120.56, 46.3, 3.62)
pt3dadd(-2.69, 120.6, 46.3, 3.62)
pt3dadd(-2.73, 120.68, 46.3, 3.62)
pt3dadd(-2.77, 120.71, 46.3, 3.62)
pt3dadd(-2.8, 120.75, 46.3, 3.62)
pt3dadd(-2.84, 120.79, 46.3, 3.62)
pt3dadd(-2.87, 120.83, 46.3, 3.62)
pt3dadd(-2.9, 120.91, 46.3, 3.62)
pt3dadd(-2.94, 120.99, 46.3, 3.62)
pt3dadd(-3.05, 121.11, 46.3, 3.62)
pt3dadd(-3.08, 121.19, 46.3, 3.62)
pt3dadd(-3.11, 121.23, 46.3, 3.62)
pt3dadd(-3.15, 121.31, 46.3, 3.62)
pt3dadd(-3.18, 121.35, 46.3, 3.62)
pt3dadd(-3.18, 121.39, 46.3, 3.62)
pt3dadd(-3.22, 121.23, 48.3, 3.62)
pt3dadd(-3.32, 121.35, 48.3, 3.62)
pt3dadd(-3.39, 121.43, 48.3, 3.62)
pt3dadd(-3.46, 121.51, 48.3, 3.62)
pt3dadd(-3.5, 121.55, 48.3, 3.62)
pt3dadd(-3.57, 121.63, 48.3, 3.62)
pt3dadd(-3.6, 121.71, 48.3, 3.62)
pt3dadd(-3.7, 121.79, 48.3, 3.62)
pt3dadd(-3.74, 121.86, 48.3, 3.62)
}
}
proc shape3d_156() {
dend[102] { pt3dadd(-3.78, 121.9, 48.3, 3.62)
pt3dadd(-3.81, 121.98, 48.3, 3.62)
pt3dadd(-3.88, 122.02, 48.3, 3.62)
pt3dadd(-3.91, 122.06, 48.3, 3.62)
pt3dadd(-3.95, 122.14, 48.3, 3.62)
pt3dadd(-3.98, 122.22, 48.3, 3.62)
pt3dadd(-4.05, 122.26, 48.3, 3.62)
pt3dadd(-4.09, 122.34, 48.3, 3.62)
pt3dadd(-4.13, 122.38, 48.3, 3.62)
pt3dadd(-4.19, 122.46, 48.3, 3.62)
pt3dadd(-4.23, 122.5, 48.3, 3.62)
pt3dadd(-4.26, 122.57, 48.3, 3.62)
pt3dadd(-4.3, 122.65, 48.3, 3.62)
pt3dadd(-4.4, 122.77, 48.3, 3.62)
pt3dadd(-4.44, 122.81, 48.3, 3.62)
pt3dadd(-4.51, 122.97, 48.3, 3.62)
pt3dadd(-4.54, 123.05, 48.3, 3.62)
pt3dadd(-4.58, 123.09, 48.3, 3.62)
pt3dadd(-4.65, 123.17, 48.3, 3.62)
pt3dadd(-4.68, 123.25, 48.3, 3.62)
pt3dadd(-4.72, 123.33, 48.3, 3.62)
pt3dadd(-4.75, 123.37, 48.3, 3.62)
pt3dadd(-4.78, 123.44, 48.3, 3.62)
pt3dadd(-4.82, 123.53, 48.3, 3.62)
pt3dadd(-4.86, 123.61, 48.3, 3.62)
pt3dadd(-4.89, 123.64, 48.3, 3.62)
pt3dadd(-4.93, 123.72, 48.3, 3.62)
pt3dadd(-4.96, 123.8, 48.3, 3.62)
pt3dadd(-4.96, 123.92, 48.3, 3.62)
pt3dadd(-4.99, 123.96, 48.3, 3.62)
pt3dadd(-4.99, 124.04, 48.3, 3.62)
pt3dadd(-5.03, 124.16, 48.3, 3.62)
pt3dadd(-5.03, 124.39, 48.3, 3.62)
pt3dadd(-5.07, 124.47, 48.3, 3.62)
pt3dadd(-5.07, 124.67, 48.3, 3.62)
pt3dadd(-5.1, 124.79, 48.3, 3.62)
pt3dadd(-5.1, 124.95, 48.3, 3.62)
pt3dadd(-5.14, 125.03, 48.3, 3.62)
pt3dadd(-5.14, 125.31, 48.3, 3.62)
pt3dadd(-5.17, 125.35, 48.3, 3.62)
pt3dadd(-5.17, 125.46, 48.3, 3.62)
pt3dadd(-5.2, 125.5, 48.3, 3.62)
pt3dadd(-5.2, 125.7, 48.3, 3.62)
pt3dadd(-5.24, 125.78, 48.3, 3.62)
pt3dadd(-5.24, 125.86, 48.3, 3.62)
pt3dadd(-5.27, 125.94, 48.3, 3.62)
pt3dadd(-5.31, 126.02, 48.3, 3.62)
pt3dadd(-5.31, 126.18, 48.3, 3.62)
pt3dadd(-5.34, 126.25, 48.3, 3.62)
pt3dadd(-5.38, 126.29, 48.3, 3.62)
pt3dadd(-5.38, 126.41, 48.3, 3.62)
pt3dadd(-5.41, 126.49, 48.3, 3.62)
pt3dadd(-5.41, 126.53, 48.3, 3.62)
pt3dadd(-6.8, 123.99, 48.3, 4.8)
pt3dadd(-7.05, 124.13, 48.3, 4.8)
pt3dadd(-7.22, 124.13, 48.3, 5.77)
pt3dadd(-7.39, 124.23, 48.3, 5.77)
pt3dadd(-7.47, 124.32, 48.3, 5.77)
pt3dadd(-7.56, 124.42, 48.3, 5.77)
pt3dadd(-7.56, 124.71, 48.3, 5.77)
pt3dadd(-7.73, 124.9, 48.3, 5.77)
pt3dadd(-7.73, 125.1, 48.3, 5.77)
pt3dadd(-7.81, 125.19, 48.3, 5.77)
pt3dadd(-7.81, 125.39, 48.3, 4.8)
pt3dadd(-7.9, 125.48, 48.3, 4.7)
pt3dadd(-7.98, 125.58, 48.3, 5.77)
pt3dadd(-8.07, 125.68, 48.3, 4.8)
pt3dadd(-8.15, 125.77, 48.3, 4.8)
pt3dadd(-8.15, 125.96, 48.3, 5.77)
pt3dadd(-8.24, 126.06, 48.3, 5.77)
pt3dadd(-8.32, 126.16, 48.3, 4.8)
pt3dadd(-8.41, 126.25, 48.3, 4)
pt3dadd(-8.49, 126.35, 48.3, 5.77)
pt3dadd(-8.58, 126.45, 48.3, 4.8)
pt3dadd(-8.75, 126.54, 48.3, 5.77)
pt3dadd(-8.83, 126.64, 48.3, 5.77)
pt3dadd(-9.34, 126.64, 48.3, 5.77)
pt3dadd(-9.43, 126.74, 48.3, 5.77)
pt3dadd(-9.85, 126.74, 48.3, 5.77)
pt3dadd(-10.19, 126.59, 48.3, 4.42)
pt3dadd(-10.53, 126.59, 48.3, 4.42)
pt3dadd(-10.7, 126.5, 48.3, 4.42)
pt3dadd(-10.78, 126.4, 48.3, 4.42)
pt3dadd(-10.95, 126.3, 48.3, 4.42)
pt3dadd(-11.21, 126.11, 48.3, 4.42)
pt3dadd(-11.3, 126.01, 48.3, 4.42)
pt3dadd(-11.38, 125.92, 48.3, 4.42)
pt3dadd(-11.55, 125.72, 48.3, 4.42)
pt3dadd(-11.72, 125.63, 48.3, 4.42)
pt3dadd(-11.89, 125.63, 48.3, 4.42)
pt3dadd(-12.31, 125.29, 48.3, 4.08)
pt3dadd(-13.42, 125.29, 48.3, 4.08)
pt3dadd(-13.5, 125.39, 48.3, 4.08)
pt3dadd(-13.59, 125.48, 48.3, 4.08)
pt3dadd(-13.76, 125.48, 48.3, 4.08)
pt3dadd(-13.84, 125.58, 48.3, 4.08)
pt3dadd(-13.93, 125.68, 48.3, 4.08)
pt3dadd(-14.01, 125.77, 48.3, 4.08)
pt3dadd(-14.1, 125.87, 48.3, 4.08)
pt3dadd(-14.18, 125.96, 48.3, 4.08)
pt3dadd(-14.35, 125.96, 48.3, 4.08)
pt3dadd(-14.44, 126.06, 48.3, 4.08)
pt3dadd(-14.52, 126.16, 48.3, 4.08)
pt3dadd(-14.61, 126.25, 48.3, 4.08)
pt3dadd(-14.69, 126.35, 48.3, 4.08)
pt3dadd(-14.86, 126.35, 48.3, 4.08)
pt3dadd(-14.94, 126.45, 48.3, 4.08)
pt3dadd(-15.63, 126.45, 48.3, 4.08)
pt3dadd(-15.71, 126.54, 48.3, 4.08)
pt3dadd(-16.56, 126.54, 48.3, 4.08)
pt3dadd(-16.65, 126.45, 48.3, 4.08)
pt3dadd(-16.99, 126.45, 48.3, 4.08)
pt3dadd(-17.07, 126.25, 48.3, 4.08)
pt3dadd(-17.33, 125.96, 48.3, 4.08)
pt3dadd(-17.41, 125.87, 48.3, 4.08)
pt3dadd(-17.5, 125.68, 48.3, 4.08)
pt3dadd(-17.66, 125.58, 48.3, 4.08)
pt3dadd(-17.83, 125.48, 48.3, 4.08)
pt3dadd(-18, 125.39, 48.3, 4.08)
pt3dadd(-18.09, 125.29, 48.3, 4.08)
pt3dadd(-18.26, 125.19, 48.3, 4)
pt3dadd(-18.43, 125.1, 48.3, 4.08)
pt3dadd(-18.6, 125, 48.3, 4.08)
pt3dadd(-18.68, 124.9, 48.3, 4.08)
pt3dadd(-18.85, 124.81, 48.3, 4.08)
pt3dadd(-18.94, 124.71, 48.3, 4.08)
pt3dadd(-19.02, 124.61, 48.3, 4.08)
pt3dadd(-19.19, 124.52, 48.3, 4.08)
pt3dadd(-19.36, 124.42, 48.3, 4.08)
pt3dadd(-19.45, 124.32, 48.3, 4.08)
pt3dadd(-19.53, 124.23, 48.3, 4.08)
pt3dadd(-19.62, 124.13, 48.3, 4.08)
pt3dadd(-19.79, 124.04, 48.3, 4.08)
pt3dadd(-19.96, 124.04, 48.3, 4.08)
pt3dadd(-20.04, 123.84, 48.3, 4.08)
pt3dadd(-20.13, 123.75, 48.3, 4.08)
pt3dadd(-20.21, 123.65, 48.3, 4.08)
pt3dadd(-20.38, 123.65, 48.3, 4.08)
pt3dadd(-20.47, 123.55, 48.3, 4.08)
pt3dadd(-20.55, 123.46, 48.3, 4.08)
pt3dadd(-20.72, 123.46, 48.3, 4.08)
pt3dadd(-20.98, 123.36, 48.3, 4.08)
pt3dadd(-21.83, 123.36, 48.3, 4.08)
pt3dadd(-22, 123.55, 48.3, 4.08)
pt3dadd(-23.18, 123.55, 48.3, 4.08)
pt3dadd(-23.27, 123.46, 48.3, 4.08)
pt3dadd(-23.44, 123.36, 48.3, 4.08)
pt3dadd(-23.61, 123.26, 48.3, 4.08)
pt3dadd(-23.69, 123.17, 48.3, 4.08)
pt3dadd(-24.03, 122.78, 48.3, 4.08)
pt3dadd(-24.12, 122.68, 48.3, 4.08)
pt3dadd(-24.29, 122.68, 48.3, 4.08)
pt3dadd(-24.46, 122.59, 48.3, 4.08)
pt3dadd(-24.54, 122.49, 48.3, 4.08)
pt3dadd(-24.63, 122.39, 48.3, 4.08)
pt3dadd(-25.14, 122.39, 48.3, 4.08)
pt3dadd(-25.22, 122.3, 48.3, 4.08)
pt3dadd(-25.39, 122.2, 48.3, 4.08)
pt3dadd(-26.83, 122.2, 48.3, 4.08)
pt3dadd(-27, 122.11, 48.3, 4.08)
pt3dadd(-27.26, 122.11, 48.3, 4.08)
pt3dadd(-27.34, 122.01, 48.3, 4.08)
pt3dadd(-27.43, 121.91, 48.3, 4.08)
pt3dadd(-27.51, 121.82, 48.3, 4.08)
pt3dadd(-27.68, 121.72, 48.3, 4.08)
pt3dadd(-27.77, 121.63, 48.3, 4.08)
pt3dadd(-27.94, 121.53, 48.3, 4.08)
pt3dadd(-28.02, 121.33, 48.3, 4.08)
pt3dadd(-28.11, 121.24, 48.3, 4.08)
pt3dadd(-28.28, 121.14, 48.3, 4.08)
pt3dadd(-28.79, 121.14, 48.3, 4.08)
pt3dadd(-28.87, 121.24, 48.3, 4.08)
pt3dadd(-28.96, 121.33, 48.3, 4.08)
pt3dadd(-29.13, 121.33, 48.3, 4.08)
pt3dadd(-29.21, 121.43, 48.3, 4.08)
pt3dadd(-29.3, 121.53, 48.3, 4.08)
pt3dadd(-29.38, 121.63, 48.3, 4.08)
pt3dadd(-29.38, 121.82, 48.3, 4.08)
pt3dadd(-29.55, 122.01, 48.3, 4.08)
pt3dadd(-29.64, 122.2, 48.3, 4.08)
pt3dadd(-29.72, 122.3, 48.3, 4.08)
pt3dadd(-29.81, 122.39, 48.3, 4.08)
pt3dadd(-29.81, 122.59, 48.3, 4.08)
pt3dadd(-29.89, 122.68, 48.3, 4.08)
pt3dadd(-30.06, 122.78, 48.3, 4.08)
pt3dadd(-30.06, 122.97, 48.3, 4.08)
pt3dadd(-30.15, 123.07, 48.3, 4.08)
pt3dadd(-30.23, 123.17, 48.3, 4.08)
pt3dadd(-30.23, 123.36, 48.3, 4.08)
pt3dadd(-30.32, 123.46, 48.3, 4.08)
pt3dadd(-30.4, 123.55, 48.3, 4.08)
pt3dadd(-30.57, 123.65, 48.3, 4.08)
pt3dadd(-30.66, 123.84, 48.3, 4.08)
pt3dadd(-30.74, 123.94, 48.3, 4.08)
pt3dadd(-30.91, 124.04, 48.3, 4.08)
pt3dadd(-31, 124.13, 48.3, 4.08)
pt3dadd(-31.08, 124.23, 48.3, 4.08)
pt3dadd(-31.17, 124.42, 48.3, 4.08)
pt3dadd(-31.25, 124.52, 48.3, 4.08)
pt3dadd(-31.33, 124.61, 48.3, 4.08)
}
}
proc shape3d_157() {
dend[102] { pt3dadd(-31.42, 124.71, 48.3, 4.08)
pt3dadd(-31.5, 124.81, 48.3, 4.08)
pt3dadd(-31.59, 125, 48.3, 4.08)
pt3dadd(-31.76, 125.1, 48.3, 4.08)
pt3dadd(-31.84, 125.19, 48.3, 4.08)
pt3dadd(-31.93, 125.29, 48.3, 4.08)
pt3dadd(-32.1, 125.39, 48.3, 4.08)
pt3dadd(-32.19, 125.48, 48.3, 4.08)
pt3dadd(-32.27, 125.58, 48.3, 4.08)
pt3dadd(-32.35, 125.77, 48.3, 4.08)
pt3dadd(-32.53, 125.77, 48.3, 4.08)
pt3dadd(-32.27, 125.43, 48.3, 3.74)
pt3dadd(-32.44, 125.53, 48.3, 3.74)
pt3dadd(-32.61, 125.63, 48.3, 3.74)
pt3dadd(-35.07, 125.63, 48.3, 3.74)
pt3dadd(-35.24, 125.53, 48.3, 3.74)
pt3dadd(-35.75, 125.53, 48.3, 3.74)
pt3dadd(-35.92, 125.43, 48.3, 3.74)
pt3dadd(-36.01, 125.34, 48.3, 3.74)
pt3dadd(-36.35, 125.34, 48.3, 3.74)
pt3dadd(-36.43, 125.24, 48.3, 3.74)
pt3dadd(-36.51, 125.14, 48.3, 3.74)
pt3dadd(-36.69, 124.95, 48.3, 3.74)
pt3dadd(-36.77, 124.76, 48.3, 3.74)
pt3dadd(-36.94, 124.76, 48.3, 3.74)
pt3dadd(-37.03, 124.66, 48.3, 3.74)
pt3dadd(-37.11, 124.57, 48.3, 3.74)
pt3dadd(-37.53, 124.57, 48.3, 3.74)
pt3dadd(-37.62, 124.37, 48.3, 3.74)
pt3dadd(-37.79, 124.37, 48.3, 3.74)
pt3dadd(-37.96, 124.28, 48.3, 3.74)
pt3dadd(-38.13, 124.18, 48.3, 3.74)
pt3dadd(-38.3, 124.08, 48.3, 3.74)
pt3dadd(-38.55, 124.08, 48.3, 3.74)
pt3dadd(-38.72, 123.99, 48.3, 3.74)
pt3dadd(-38.89, 123.89, 48.3, 3.74)
pt3dadd(-39.06, 123.79, 48.3, 3.74)
pt3dadd(-40.08, 123.79, 48.3, 3.74)
pt3dadd(-40.17, 123.89, 48.3, 3.74)
pt3dadd(-40.34, 123.99, 48.3, 3.74)
pt3dadd(-40.42, 124.08, 48.3, 3.74)
pt3dadd(-40.59, 124.18, 48.3, 3.74)
pt3dadd(-40.59, 124.37, 48.3, 3.74)
pt3dadd(-40.68, 124.47, 48.3, 3.74)
pt3dadd(-40.85, 124.57, 48.3, 3.74)
pt3dadd(-40.85, 124.76, 48.3, 3.74)
pt3dadd(-40.93, 124.86, 48.3, 3.74)
pt3dadd(-41.01, 124.95, 48.3, 3.74)
pt3dadd(-41.1, 125.14, 48.3, 3.74)
pt3dadd(-41.1, 125.34, 48.3, 3.74)
pt3dadd(-41.19, 125.53, 48.3, 3.74)
pt3dadd(-41.27, 125.63, 48.3, 3.74)
pt3dadd(-41.35, 125.72, 48.3, 3.74)
pt3dadd(-41.44, 125.82, 48.3, 3.74)
pt3dadd(-41.44, 127.75, 48.3, 3.74)
pt3dadd(-41.53, 127.94, 48.3, 3.74)
pt3dadd(-41.61, 128.04, 48.3, 3.74)
pt3dadd(-41.69, 128.23, 48.3, 3.74)
pt3dadd(-41.78, 128.43, 48.3, 3.74)
pt3dadd(-41.87, 128.52, 48.3, 3.74)
pt3dadd(-41.95, 128.62, 48.3, 3.74)
pt3dadd(-41.95, 128.81, 48.3, 3.74)
pt3dadd(-42.03, 129, 48.3, 3.74)
}
dend[103] {pt3dclear()
pt3dadd(39.4, 74.07, 16.3, 1.36)
pt3dadd(40.25, 71.18, -7.35, 1.36)
pt3dadd(40.23, 71.38, -7.35, 2.23)
pt3dadd(40.3, 71.29, -7.35, 2.23)
pt3dadd(40.34, 71.25, -7.35, 2.23)
pt3dadd(40.37, 71.17, -7.35, 2.23)
pt3dadd(40.48, 71.04, -7.35, 2.23)
pt3dadd(40.52, 71, -7.35, 2.23)
pt3dadd(40.56, 70.92, -7.35, 2.23)
pt3dadd(40.59, 70.84, -7.35, 2.23)
pt3dadd(40.63, 70.79, -7.35, 2.23)
pt3dadd(40.67, 70.71, -7.35, 2.23)
pt3dadd(40.74, 70.67, -7.35, 2.23)
pt3dadd(40.78, 70.59, -7.35, 2.23)
pt3dadd(40.81, 70.54, -7.35, 2.23)
pt3dadd(40.92, 70.42, -7.35, 2.23)
pt3dadd(40.96, 70.38, -7.35, 2.23)
pt3dadd(41.03, 70.3, -7.35, 2.23)
pt3dadd(41.1, 70.21, -7.35, 2.23)
pt3dadd(41.14, 70.17, -7.35, 2.23)
pt3dadd(41.18, 70.09, -7.35, 2.23)
pt3dadd(41.25, 70, -7.35, 2.23)
pt3dadd(41.29, 69.92, -7.35, 2.23)
pt3dadd(41.4, 69.8, -7.35, 2.23)
pt3dadd(41.47, 69.67, -7.35, 2.23)
pt3dadd(41.54, 69.59, -7.35, 2.23)
pt3dadd(41.62, 69.51, -7.35, 2.23)
pt3dadd(41.76, 69.34, -7.35, 2.23)
pt3dadd(41.83, 69.21, -7.35, 2.23)
pt3dadd(41.91, 69.13, -7.35, 2.23)
pt3dadd(42.02, 69.01, -7.35, 2.23)
pt3dadd(42.09, 68.93, -7.35, 2.23)
pt3dadd(42.6, 68.34, -7.35, 2.23)
pt3dadd(42.64, 68.3, -7.35, 2.23)
pt3dadd(42.72, 68.22, -7.35, 2.23)
pt3dadd(42.79, 68.14, -7.35, 2.23)
pt3dadd(42.86, 68.1, -7.35, 2.23)
pt3dadd(43.12, 67.8, -7.35, 2.23)
pt3dadd(43.19, 67.76, -7.35, 2.23)
pt3dadd(43.3, 67.68, -7.35, 2.23)
pt3dadd(43.33, 67.6, -7.35, 2.23)
pt3dadd(43.41, 67.51, -7.35, 2.23)
pt3dadd(43.48, 67.43, -7.35, 2.23)
pt3dadd(43.56, 67.39, -7.35, 2.23)
pt3dadd(43.67, 67.26, -7.35, 2.23)
pt3dadd(43.78, 67.18, -7.35, 2.23)
pt3dadd(43.85, 67.1, -7.35, 2.23)
pt3dadd(43.96, 67.06, -7.35, 2.23)
pt3dadd(44.07, 66.97, -7.35, 2.23)
pt3dadd(44.18, 66.89, -7.35, 2.23)
pt3dadd(44.29, 66.81, -7.35, 2.23)
pt3dadd(44.36, 66.72, -7.35, 2.23)
pt3dadd(44.47, 66.68, -7.35, 2.23)
pt3dadd(44.58, 66.64, -7.35, 2.23)
pt3dadd(44.65, 66.56, -7.35, 2.23)
pt3dadd(44.72, 66.51, -7.35, 2.23)
pt3dadd(44.8, 66.47, -7.35, 2.23)
pt3dadd(44.83, 66.43, -7.35, 2.23)
pt3dadd(44.94, 66.39, -7.35, 2.23)
pt3dadd(44.98, 66.35, -7.35, 2.23)
pt3dadd(45.06, 66.31, -7.35, 2.23)
pt3dadd(45.13, 66.22, -7.35, 2.23)
pt3dadd(45.2, 66.18, -7.35, 2.23)
pt3dadd(45.31, 66.14, -7.35, 2.23)
pt3dadd(45.38, 66.1, -7.35, 2.23)
pt3dadd(45.46, 66.02, -7.35, 2.23)
pt3dadd(45.53, 65.97, -7.35, 2.23)
pt3dadd(45.6, 65.89, -7.35, 2.23)
pt3dadd(45.75, 65.81, -7.35, 2.23)
pt3dadd(45.93, 65.6, -7.35, 2.23)
pt3dadd(46.01, 65.56, -7.35, 2.23)
pt3dadd(46.22, 65.31, -7.35, 2.23)
pt3dadd(46.26, 65.27, -7.35, 2.23)
pt3dadd(46.3, 65.23, -7.35, 2.23)
pt3dadd(46.37, 65.14, -7.35, 2.23)
pt3dadd(46.44, 65.06, -7.35, 2.23)
pt3dadd(46.48, 64.94, -7.35, 2.23)
pt3dadd(46.56, 64.89, -7.35, 2.23)
pt3dadd(46.59, 64.81, -7.35, 2.23)
pt3dadd(46.67, 64.73, -7.35, 2.23)
pt3dadd(46.7, 64.69, -7.35, 2.23)
pt3dadd(46.74, 64.61, -7.35, 2.23)
pt3dadd(46.7, 64.61, -7.35, 2.23)
pt3dadd(46.7, 63.61, -7.35, 2.23)
pt3dadd(46.74, 63.56, -7.35, 2.23)
pt3dadd(46.74, 63.48, -7.35, 2.23)
pt3dadd(46.78, 63.44, -7.35, 2.23)
pt3dadd(46.81, 63.36, -7.35, 2.23)
pt3dadd(46.85, 63.31, -7.35, 2.23)
pt3dadd(46.88, 63.19, -7.35, 2.23)
pt3dadd(46.92, 63.07, -7.35, 2.23)
pt3dadd(46.96, 62.99, -7.35, 2.23)
pt3dadd(46.96, 62.9, -7.35, 2.23)
pt3dadd(46.99, 62.86, -7.35, 2.23)
pt3dadd(47.03, 62.82, -7.35, 2.23)
pt3dadd(47.07, 62.78, -7.35, 2.23)
pt3dadd(47.1, 62.74, -7.35, 2.23)
pt3dadd(47.14, 62.65, -7.35, 2.23)
pt3dadd(47.18, 62.57, -7.35, 2.23)
pt3dadd(47.21, 62.53, -7.35, 2.23)
pt3dadd(47.25, 62.49, -7.35, 2.23)
pt3dadd(47.29, 62.44, -7.35, 2.23)
pt3dadd(47.32, 62.4, -7.35, 2.23)
pt3dadd(47.36, 62.36, -7.35, 2.23)
pt3dadd(47.25, 62.44, -7.35, 2.23)
pt3dadd(47.47, 62.19, -7.35, 2.23)
pt3dadd(47.54, 62.11, -7.35, 2.23)
pt3dadd(47.62, 62.03, -7.35, 2.23)
pt3dadd(47.69, 61.94, -7.35, 2.23)
pt3dadd(47.72, 61.9, -7.35, 2.23)
pt3dadd(47.76, 61.82, -7.35, 2.23)
pt3dadd(47.76, 61.74, -7.35, 2.23)
pt3dadd(47.8, 61.69, -7.35, 2.23)
pt3dadd(47.83, 61.65, -7.35, 2.23)
pt3dadd(47.87, 61.57, -7.35, 2.23)
pt3dadd(47.91, 61.49, -7.35, 2.23)
pt3dadd(47.94, 61.4, -7.35, 2.23)
pt3dadd(47.98, 61.36, -7.35, 2.23)
pt3dadd(48.02, 61.32, -7.35, 2.23)
pt3dadd(48.06, 61.24, -7.35, 2.23)
pt3dadd(48.09, 61.2, -7.35, 2.23)
pt3dadd(48.17, 61.12, -7.35, 2.23)
pt3dadd(48.2, 61.07, -7.35, 2.23)
pt3dadd(48.24, 61.03, -7.35, 2.23)
pt3dadd(48.28, 60.99, -7.35, 2.23)
pt3dadd(48.35, 60.91, -7.35, 2.23)
pt3dadd(48.38, 60.82, -7.35, 2.23)
pt3dadd(48.71, 60.45, -7.35, 2.23)
pt3dadd(48.75, 60.41, -7.35, 2.23)
pt3dadd(48.79, 60.37, -7.35, 2.23)
pt3dadd(48.82, 60.33, -7.35, 2.23)
pt3dadd(48.86, 60.28, -7.35, 2.23)
pt3dadd(48.9, 60.24, -7.35, 2.23)
pt3dadd(48.93, 60.2, -7.35, 2.23)
pt3dadd(48.97, 60.16, -7.35, 2.23)
pt3dadd(49.01, 60.12, -7.35, 2.23)
pt3dadd(49.08, 60.12, -7.35, 2.23)
}
}
proc shape3d_158() {
dend[103] { pt3dadd(49.12, 60.08, -7.35, 2.23)
pt3dadd(49.15, 60.03, -7.35, 2.23)
pt3dadd(49.19, 59.99, -7.35, 2.23)
pt3dadd(49.22, 59.95, -7.35, 2.23)
pt3dadd(49.3, 59.95, -7.35, 2.23)
pt3dadd(49.33, 59.91, -7.35, 2.23)
pt3dadd(49.37, 59.87, -7.35, 2.23)
pt3dadd(49.41, 59.83, -7.35, 2.23)
pt3dadd(49.59, 59.83, -7.35, 2.23)
pt3dadd(49.63, 59.78, -7.35, 2.23)
pt3dadd(49.81, 59.78, -7.35, 2.23)
pt3dadd(49.85, 59.74, -7.35, 2.23)
pt3dadd(49.92, 59.74, -7.35, 2.23)
pt3dadd(49.96, 59.7, -7.35, 2.23)
pt3dadd(50.03, 59.66, -7.35, 2.23)
pt3dadd(50.1, 59.62, -7.35, 2.23)
pt3dadd(50.18, 59.58, -7.35, 2.23)
pt3dadd(50.25, 59.53, -7.35, 2.23)
pt3dadd(50.36, 59.53, -7.35, 2.23)
pt3dadd(50.43, 59.49, -7.35, 2.23)
pt3dadd(50.54, 59.49, -7.35, 1.4)
pt3dadd(50.62, 59.45, -7.35, 2.23)
pt3dadd(50.72, 59.41, -7.35, 2.23)
pt3dadd(50.8, 59.41, -7.35, 2.23)
pt3dadd(50.91, 59.37, -7.35, 2.23)
pt3dadd(51.93, 59.37, -7.35, 2.23)
pt3dadd(51.97, 59.33, -7.35, 2.23)
pt3dadd(52.04, 59.33, -7.35, 2.23)
pt3dadd(52.12, 59.28, -7.35, 2.23)
pt3dadd(52.19, 59.24, -7.35, 2.23)
pt3dadd(52.26, 59.2, -7.35, 2.23)
pt3dadd(52.37, 59.16, -7.35, 2.23)
pt3dadd(52.48, 59.04, -7.35, 2.23)
pt3dadd(52.52, 58.99, -7.35, 2.23)
pt3dadd(52.56, 58.95, -7.35, 2.23)
pt3dadd(52.59, 58.91, -7.35, 2.23)
pt3dadd(52.67, 58.87, -7.35, 2.23)
pt3dadd(52.7, 58.79, -7.35, 2.23)
pt3dadd(52.74, 58.71, -7.35, 2.23)
pt3dadd(52.77, 58.66, -7.35, 2.23)
pt3dadd(52.77, 58.62, -7.35, 2.23)
pt3dadd(52.81, 58.54, -8.4, 2.23)
pt3dadd(52.81, 58.46, -8.4, 2.23)
pt3dadd(52.85, 58.41, -8.4, 2.23)
pt3dadd(52.88, 58.33, -8.4, 2.23)
pt3dadd(52.96, 58.25, -8.4, 2.23)
pt3dadd(52.99, 58.21, -8.4, 2.23)
pt3dadd(53.03, 58.17, -8.4, 2.23)
pt3dadd(53.1, 58.08, -8.4, 2.23)
pt3dadd(53.14, 58.04, -8.4, 2.23)
pt3dadd(53.17, 58, -8.4, 2.23)
pt3dadd(53.21, 57.96, -8.4, 2.23)
pt3dadd(53.28, 57.87, -8.4, 2.23)
pt3dadd(53.36, 57.75, -8.4, 2.23)
pt3dadd(53.47, 57.63, -8.4, 2.23)
pt3dadd(53.54, 57.54, -8.4, 2.23)
pt3dadd(53.62, 57.46, -8.4, 2.23)
pt3dadd(53.69, 57.38, -8.4, 2.23)
pt3dadd(53.76, 57.25, -8.4, 2.23)
pt3dadd(53.83, 57.17, -8.4, 2.23)
pt3dadd(53.94, 57.08, -8.4, 2.23)
pt3dadd(54.02, 56.96, -8.4, 2.23)
pt3dadd(54.09, 56.88, -8.4, 2.23)
pt3dadd(54.2, 56.79, -8.4, 2.23)
pt3dadd(54.27, 56.67, -8.4, 2.23)
pt3dadd(54.46, 56.46, -8.4, 2.23)
pt3dadd(54.53, 56.38, -8.4, 2.23)
pt3dadd(54.6, 56.29, -8.4, 2.23)
pt3dadd(54.67, 56.21, -8.4, 2.23)
pt3dadd(54.78, 56.09, -8.4, 2.23)
pt3dadd(54.9, 56.01, -8.4, 2.23)
pt3dadd(55.01, 55.79, -8.4, 2.23)
pt3dadd(55.12, 55.71, -8.4, 2.23)
pt3dadd(55.19, 55.59, -8.4, 2.23)
pt3dadd(55.3, 55.51, -8.4, 2.23)
pt3dadd(55.37, 55.42, -8.4, 2.23)
pt3dadd(55.44, 55.34, -8.4, 2.23)
pt3dadd(55.52, 55.22, -8.4, 2.23)
pt3dadd(55.7, 55.01, -8.4, 2.23)
pt3dadd(55.77, 54.88, -8.4, 2.23)
pt3dadd(55.85, 54.8, -8.4, 2.23)
pt3dadd(55.96, 54.72, -8.4, 2.23)
pt3dadd(56.03, 54.59, -8.4, 2.23)
pt3dadd(56.1, 54.51, -8.4, 2.23)
pt3dadd(56.21, 54.38, -8.4, 2.23)
pt3dadd(56.25, 54.3, -8.4, 2.23)
pt3dadd(56.36, 54.17, -8.4, 2.23)
pt3dadd(56.47, 53.97, -8.4, 2.23)
pt3dadd(56.54, 53.88, -8.4, 2.23)
pt3dadd(56.65, 53.68, -8.4, 2.23)
pt3dadd(56.83, 53.47, -8.4, 2.23)
pt3dadd(56.87, 53.35, -8.4, 2.23)
pt3dadd(56.98, 53.18, -8.4, 2.23)
pt3dadd(57.05, 53.1, -8.4, 2.23)
pt3dadd(57.16, 52.93, -8.4, 2.23)
pt3dadd(57.2, 52.81, -8.4, 2.23)
pt3dadd(57.27, 52.68, -8.4, 2.23)
pt3dadd(57.31, 52.6, -8.4, 2.23)
pt3dadd(57.38, 52.51, -8.4, 2.23)
pt3dadd(57.46, 52.39, -8.4, 2.23)
pt3dadd(57.53, 52.26, -8.4, 2.23)
pt3dadd(57.27, 52.76, -11.55, 2.23)
pt3dadd(57.31, 52.72, -11.55, 2.23)
pt3dadd(57.35, 52.68, -11.55, 2.23)
pt3dadd(57.38, 52.6, -11.55, 2.23)
pt3dadd(57.42, 52.56, -11.55, 2.23)
pt3dadd(57.42, 52.47, -11.55, 2.23)
pt3dadd(57.46, 52.43, -11.55, 2.23)
pt3dadd(57.49, 52.39, -11.55, 2.23)
pt3dadd(57.53, 52.35, -11.55, 2.23)
pt3dadd(57.53, 52.26, -11.55, 2.23)
pt3dadd(57.56, 52.22, -11.55, 2.23)
pt3dadd(57.6, 52.18, -11.55, 2.23)
pt3dadd(57.6, 52.1, -11.55, 2.23)
pt3dadd(57.64, 52.06, -11.55, 2.23)
pt3dadd(57.67, 52.01, -11.55, 2.23)
pt3dadd(57.67, 51.93, -11.55, 2.23)
pt3dadd(57.71, 51.89, -11.55, 2.23)
pt3dadd(57.78, 51.89, -11.55, 2.23)
pt3dadd(57.82, 51.85, -11.55, 2.23)
pt3dadd(57.9, 51.76, -11.55, 2.23)
pt3dadd(57.93, 51.72, -11.55, 2.23)
pt3dadd(57.97, 51.68, -11.55, 2.23)
pt3dadd(58.04, 51.6, -11.55, 2.23)
pt3dadd(58.12, 51.6, -11.55, 2.23)
pt3dadd(58.15, 51.52, -11.55, 2.23)
pt3dadd(58.22, 51.52, -11.55, 2.23)
pt3dadd(58.26, 51.47, -11.55, 2.23)
pt3dadd(58.33, 51.47, -11.55, 2.23)
pt3dadd(58.37, 51.39, -11.55, 2.23)
pt3dadd(58.44, 51.39, -11.55, 2.23)
pt3dadd(58.48, 51.35, -11.55, 2.23)
pt3dadd(58.55, 51.35, -11.55, 2.23)
pt3dadd(58.59, 51.31, -11.55, 2.23)
pt3dadd(58.66, 51.27, -11.55, 2.23)
pt3dadd(58.74, 51.27, -11.55, 2.23)
pt3dadd(58.81, 51.22, -11.55, 2.23)
pt3dadd(59.03, 51.22, -11.55, 2.23)
pt3dadd(59.1, 51.19, -11.55, 2.23)
pt3dadd(59.14, 51.14, -11.55, 2.23)
pt3dadd(59.21, 51.1, -11.55, 2.23)
pt3dadd(59.28, 51.06, -11.55, 2.23)
pt3dadd(59.36, 51.06, -11.55, 2.23)
pt3dadd(59.4, 51.02, -11.55, 2.23)
pt3dadd(59.43, 50.98, -11.55, 2.23)
pt3dadd(59.51, 50.98, -11.55, 2.23)
pt3dadd(59.58, 50.94, -11.55, 2.23)
pt3dadd(59.65, 50.89, -11.55, 2.23)
pt3dadd(59.69, 50.85, -11.55, 2.23)
pt3dadd(59.8, 50.81, -11.55, 2.23)
pt3dadd(59.87, 50.77, -11.55, 2.23)
pt3dadd(59.98, 50.77, -11.55, 2.23)
pt3dadd(60.05, 50.73, -11.55, 2.23)
pt3dadd(60.09, 50.69, -11.55, 2.23)
pt3dadd(60.24, 50.69, -11.55, 2.23)
pt3dadd(60.35, 50.65, -11.55, 2.23)
pt3dadd(60.42, 50.6, -11.55, 2.23)
pt3dadd(60.49, 50.56, -11.55, 2.23)
pt3dadd(60.6, 50.52, -11.55, 2.23)
pt3dadd(60.71, 50.52, -11.55, 2.23)
pt3dadd(60.82, 50.48, -11.55, 2.23)
pt3dadd(60.9, 50.44, -11.55, 2.23)
pt3dadd(60.97, 50.44, -11.55, 2.23)
pt3dadd(61.08, 50.4, -11.55, 2.23)
pt3dadd(61.12, 50.31, -11.55, 2.23)
pt3dadd(61.22, 50.31, -11.55, 2.23)
pt3dadd(61.3, 50.27, -11.55, 2.23)
pt3dadd(61.37, 50.23, -11.55, 2.23)
pt3dadd(61.48, 50.23, -11.55, 2.23)
pt3dadd(61.59, 50.19, -11.55, 2.23)
pt3dadd(61.66, 50.15, -11.55, 2.23)
pt3dadd(61.77, 50.15, -11.55, 2.23)
pt3dadd(61.85, 50.1, -11.55, 2.23)
pt3dadd(61.96, 50.1, -11.55, 2.23)
pt3dadd(62.06, 50.06, -11.55, 2.23)
pt3dadd(62.14, 50.06, -11.55, 2.23)
pt3dadd(62.25, 50.02, -11.55, 2.23)
pt3dadd(62.36, 49.98, -11.55, 2.23)
pt3dadd(62.51, 49.98, -11.55, 2.23)
pt3dadd(62.58, 49.9, -11.55, 2.23)
pt3dadd(62.76, 49.9, -11.55, 2.23)
pt3dadd(62.87, 49.85, -11.55, 2.23)
pt3dadd(63.01, 49.85, -11.55, 2.23)
pt3dadd(63.09, 49.81, -11.55, 2.23)
pt3dadd(63.24, 49.81, -11.55, 2.23)
pt3dadd(63.27, 49.77, -11.55, 2.23)
pt3dadd(63.46, 49.77, -11.55, 2.23)
pt3dadd(63.49, 49.73, -11.55, 2.23)
pt3dadd(64.08, 49.73, -11.55, 2.23)
}
dend[104] {pt3dclear()
pt3dadd(49.76, 60.76, 10.3, 1.5)
pt3dadd(50.92, 57.14, 0, 1.5)
pt3dadd(50.19, 50.97, 0, 2.72)
pt3dadd(48.74, 46.88, 0, 2.72)
pt3dadd(45.35, 42.01, 0, 2.72)
pt3dadd(45.17, 38.87, 0, 2.72)
pt3dadd(45.85, 37.57, 0, 2.72)
pt3dadd(45.6, 35.78, 0, 2.72)
pt3dadd(44.24, 33.13, 0, 2.72)
pt3dadd(41.1, 30.38, 0, 2.72)
pt3dadd(37.87, 27.63, 0, 2.72)
}
}
proc shape3d_159() {
dend[104] { pt3dadd(36.69, 26.91, 0, 2.72)
pt3dadd(36.09, 27.06, 0, 2.72)
pt3dadd(35.33, 27.39, 0, 2.72)
pt3dadd(34.39, 29.08, 0, 2.72)
pt3dadd(32.95, 31.25, 0, 2.72)
pt3dadd(31.93, 33.23, 0, 2.72)
pt3dadd(31.42, 33.85, 0, 2.72)
pt3dadd(30.74, 33.52, 0, 2.72)
pt3dadd(29.98, 33.08, 0, 2.72)
pt3dadd(22.84, 28.41, 0, 2.38)
pt3dadd(17.15, 25.46, 0, 2.38)
pt3dadd(16.14, 24.45, 0, 2.38)
}
dend[105] {pt3dclear()
pt3dadd(70.65, 71.76, -5.7, 10.28)
pt3dadd(73.81, 94.95, 0, 10.28)
}
dend[106] {pt3dclear()
pt3dadd(71.33, 106.48, 14.3, 4.08)
pt3dadd(68.79, 108.99, -19.7, 4.08)
pt3dadd(66.57, 111.71, -19.7, 5.1)
pt3dadd(66.52, 111.81, -19.7, 5.1)
pt3dadd(66.39, 111.96, -19.7, 5.1)
pt3dadd(66.34, 112.01, -19.7, 5.1)
pt3dadd(66.3, 112.06, -19.7, 5.1)
pt3dadd(66.3, 112.16, -19.7, 5.1)
pt3dadd(66.25, 112.21, -19.7, 5.1)
pt3dadd(66.17, 112.26, -19.7, 5.1)
pt3dadd(66.24, 112.36, -19.7, 5.1)
}
dend[107] {pt3dclear()
pt3dadd(66.24, 112.36, -19.7, 5.1)
pt3dadd(66.12, 112.32, -19.7, 5.1)
pt3dadd(66.07, 112.36, -19.7, 5.1)
pt3dadd(66.03, 112.46, -19.7, 5.1)
pt3dadd(65.94, 112.52, -19.7, 5.1)
pt3dadd(65.9, 112.57, -19.7, 5.1)
pt3dadd(65.85, 112.67, -19.7, 5.1)
pt3dadd(65.81, 112.77, -19.7, 5.1)
pt3dadd(65.72, 112.82, -19.7, 5.1)
pt3dadd(65.68, 112.87, -19.7, 5.1)
pt3dadd(65.63, 112.92, -19.7, 5.1)
pt3dadd(65.58, 113.07, -19.7, 5.1)
pt3dadd(65.5, 113.13, -19.7, 5.1)
pt3dadd(65.45, 113.18, -19.7, 5.1)
pt3dadd(65.41, 113.28, -19.7, 5.1)
pt3dadd(65.32, 113.33, -19.7, 5.1)
pt3dadd(65.32, 113.43, -19.7, 5.1)
pt3dadd(65.23, 113.48, -19.7, 5.1)
pt3dadd(65.14, 113.58, -19.7, 5.1)
pt3dadd(65.1, 113.63, -19.7, 5.1)
pt3dadd(65.05, 113.68, -19.7, 5.1)
pt3dadd(65, 113.73, -19.7, 5.1)
pt3dadd(65, 113.83, -19.7, 5.1)
pt3dadd(64.96, 113.89, -19.7, 5.1)
pt3dadd(64.92, 113.93, -19.7, 5.1)
pt3dadd(64.87, 113.99, -19.7, 5.1)
pt3dadd(64.83, 114.09, -19.7, 5.1)
pt3dadd(64.74, 114.14, -19.7, 5.1)
pt3dadd(64.69, 114.24, -19.7, 5.1)
pt3dadd(64.65, 114.29, -19.7, 5.1)
pt3dadd(64.61, 114.39, -19.7, 5.1)
pt3dadd(64.51, 114.49, -19.7, 5.1)
pt3dadd(64.47, 114.59, -19.7, 5.1)
pt3dadd(64.38, 114.64, -19.7, 5.1)
pt3dadd(64.38, 114.75, -19.7, 5.1)
pt3dadd(64.34, 114.79, -19.7, 5.1)
pt3dadd(64.29, 114.85, -19.7, 5.1)
pt3dadd(64.25, 114.9, -19.7, 5.1)
pt3dadd(64.16, 115, -19.7, 5.1)
pt3dadd(64.25, 115, -19.7, 5.1)
}
dend[108] {pt3dclear()
pt3dadd(64.25, 115, -19.7, 5.1)
pt3dadd(64.61, 114.75, -23.9, 5.1)
pt3dadd(64.56, 114.85, -23.9, 5.1)
pt3dadd(64.51, 114.9, -23.9, 5.1)
pt3dadd(64.47, 115, -23.9, 5.1)
pt3dadd(64.43, 115.1, -23.9, 5.1)
pt3dadd(64.38, 115.15, -23.9, 5.1)
pt3dadd(64.34, 115.25, -23.9, 5.1)
pt3dadd(64.29, 115.35, -23.9, 5.1)
pt3dadd(64.25, 115.46, -23.9, 5.1)
pt3dadd(64.2, 115.56, -23.9, 5.1)
pt3dadd(64.11, 115.66, -23.9, 5.1)
pt3dadd(64.07, 115.81, -23.9, 5.1)
pt3dadd(64.03, 115.96, -23.9, 5.1)
pt3dadd(63.98, 116.01, -23.9, 5.1)
pt3dadd(63.94, 116.16, -23.9, 5.1)
pt3dadd(63.94, 116.32, -23.9, 5.1)
pt3dadd(63.89, 116.47, -23.9, 5.1)
pt3dadd(63.85, 116.57, -23.9, 5.1)
pt3dadd(63.85, 116.67, -23.9, 5.1)
pt3dadd(63.8, 116.77, -23.9, 5.1)
pt3dadd(63.76, 116.87, -23.9, 5.1)
pt3dadd(63.71, 117.02, -23.9, 5.1)
pt3dadd(63.67, 117.13, -23.9, 5.1)
pt3dadd(63.62, 117.22, -23.9, 5.1)
pt3dadd(63.62, 117.33, -23.9, 5.1)
pt3dadd(63.58, 117.38, -23.9, 5.1)
pt3dadd(63.53, 117.48, -23.9, 5.1)
pt3dadd(63.53, 117.58, -23.9, 5.1)
pt3dadd(63.49, 117.68, -23.9, 5.1)
pt3dadd(63.44, 117.78, -23.9, 5.1)
pt3dadd(63.44, 117.89, -23.9, 5.1)
pt3dadd(63.4, 117.99, -23.9, 5.1)
pt3dadd(63.35, 118.09, -23.9, 5.1)
pt3dadd(63.35, 118.19, -23.9, 5.1)
pt3dadd(63.31, 118.29, -23.9, 5.1)
pt3dadd(63.27, 118.39, -23.9, 5.1)
pt3dadd(63.22, 118.49, -23.9, 5.1)
pt3dadd(63.22, 118.59, -23.9, 5.1)
pt3dadd(63.18, 118.64, -23.9, 5.1)
pt3dadd(63.18, 118.79, -23.9, 5.1)
pt3dadd(63.13, 118.9, -23.9, 5.1)
pt3dadd(63.09, 119, -23.9, 5.1)
pt3dadd(63.04, 119.1, -23.9, 5.1)
pt3dadd(63, 119.2, -23.9, 5.1)
pt3dadd(63, 119.4, -23.9, 5.1)
pt3dadd(62.96, 119.46, -23.9, 5.1)
pt3dadd(62.96, 119.61, -23.9, 5.1)
pt3dadd(62.91, 119.66, -23.9, 5.1)
pt3dadd(62.87, 119.76, -23.9, 5.1)
pt3dadd(62.87, 119.91, -23.9, 5.1)
pt3dadd(62.82, 119.96, -23.9, 5.1)
pt3dadd(62.78, 120.01, -23.9, 5.1)
pt3dadd(62.78, 120.16, -23.9, 5.1)
pt3dadd(62.73, 120.26, -23.9, 5.1)
pt3dadd(62.69, 120.36, -23.9, 5.1)
pt3dadd(62.64, 120.47, -23.9, 5.1)
pt3dadd(62.64, 120.57, -23.9, 5.1)
pt3dadd(62.6, 120.67, -23.9, 5.1)
pt3dadd(62.55, 120.77, -23.9, 5.1)
}
dend[109] {pt3dclear()
pt3dadd(62.55, 120.77, -23.9, 3.74)
pt3dadd(62.42, 120.72, -26, 3.74)
pt3dadd(62.42, 120.82, -26, 3.74)
pt3dadd(62.38, 120.92, -26, 3.74)
pt3dadd(62.33, 120.97, -26, 3.74)
pt3dadd(62.33, 121.13, -26, 3.74)
pt3dadd(62.28, 121.23, -26, 3.74)
pt3dadd(62.24, 121.33, -26, 3.74)
pt3dadd(62.2, 121.38, -26, 3.74)
pt3dadd(62.2, 121.48, -26, 3.74)
pt3dadd(62.15, 121.53, -26, 3.74)
pt3dadd(62.11, 121.63, -26, 3.74)
pt3dadd(62.06, 121.73, -26, 3.74)
pt3dadd(62.02, 121.78, -26, 3.74)
pt3dadd(61.97, 121.89, -26, 3.74)
pt3dadd(61.93, 121.99, -26, 3.74)
pt3dadd(61.88, 122.09, -26, 3.74)
pt3dadd(61.84, 122.14, -26, 3.74)
pt3dadd(61.79, 122.24, -26, 3.74)
pt3dadd(61.75, 122.34, -26, 3.74)
pt3dadd(61.71, 122.44, -26, 3.74)
pt3dadd(61.57, 122.59, -26, 3.74)
pt3dadd(61.53, 122.64, -26, 3.74)
pt3dadd(61.44, 122.79, -26, 3.74)
pt3dadd(61.4, 122.9, -26, 3.74)
pt3dadd(61.31, 122.95, -26, 3.74)
pt3dadd(61.22, 123.05, -26, 3.74)
pt3dadd(61.22, 123.15, -26, 3.74)
pt3dadd(61.13, 123.2, -26, 3.74)
pt3dadd(61.08, 123.3, -26, 3.74)
pt3dadd(61.04, 123.35, -26, 3.74)
pt3dadd(60.95, 123.46, -26, 3.74)
pt3dadd(60.9, 123.5, -26, 3.74)
pt3dadd(60.81, 123.61, -26, 3.74)
pt3dadd(60.72, 123.66, -26, 3.74)
pt3dadd(60.72, 123.76, -26, 3.74)
pt3dadd(60.68, 123.81, -26, 3.74)
pt3dadd(60.63, 123.86, -26, 3.74)
}
dend[110] {pt3dclear()
pt3dadd(62.55, 120.77, -23.9, 4.42)
pt3dadd(62.73, 120.77, -28.1, 4.42)
pt3dadd(62.82, 120.87, -28.1, 4.42)
pt3dadd(62.87, 121.03, -28.1, 4.42)
pt3dadd(62.91, 121.07, -28.1, 4.42)
pt3dadd(63, 121.13, -28.1, 4.42)
pt3dadd(63.04, 121.23, -28.1, 4.42)
pt3dadd(63.13, 121.23, -28.1, 4.42)
pt3dadd(63.18, 121.33, -28.1, 4.42)
pt3dadd(63.22, 121.43, -28.1, 4.42)
pt3dadd(63.27, 121.48, -28.1, 4.42)
pt3dadd(63.31, 121.58, -28.1, 4.42)
pt3dadd(63.35, 121.68, -28.1, 4.42)
pt3dadd(63.44, 121.73, -28.1, 4.42)
pt3dadd(63.53, 121.83, -28.1, 4.42)
pt3dadd(63.58, 121.89, -28.1, 4.42)
pt3dadd(63.67, 121.93, -28.1, 4.42)
pt3dadd(63.71, 122.04, -28.1, 4.42)
pt3dadd(63.8, 122.09, -28.1, 4.42)
pt3dadd(63.85, 122.14, -28.1, 4.42)
pt3dadd(63.89, 122.19, -28.1, 4.42)
pt3dadd(63.94, 122.24, -28.1, 4.42)
pt3dadd(63.98, 122.34, -28.1, 4.42)
pt3dadd(64.03, 122.39, -28.1, 4.42)
pt3dadd(64.07, 122.44, -28.1, 4.42)
pt3dadd(64.11, 122.54, -28.1, 4.42)
pt3dadd(64.16, 122.64, -28.1, 4.42)
pt3dadd(64.2, 122.75, -28.1, 4.42)
pt3dadd(64.29, 122.85, -28.1, 4.42)
pt3dadd(64.34, 122.9, -28.1, 4.42)
pt3dadd(64.38, 122.95, -28.1, 4.42)
pt3dadd(64.43, 123.05, -28.1, 4.42)
pt3dadd(64.47, 123.1, -28.1, 4.42)
pt3dadd(64.61, 123.25, -28.1, 4.42)
pt3dadd(64.65, 123.3, -28.1, 4.42)
pt3dadd(64.69, 123.35, -28.1, 4.42)
pt3dadd(64.78, 123.4, -28.1, 4.42)
}
}
proc shape3d_160() {
dend[110] { pt3dadd(64.83, 123.5, -28.1, 4.42)
pt3dadd(64.87, 123.56, -28.1, 4.42)
pt3dadd(64.92, 123.66, -28.1, 4.42)
pt3dadd(64.96, 123.76, -28.1, 4.42)
pt3dadd(65, 123.81, -28.1, 4.42)
pt3dadd(65.1, 123.91, -28.1, 4.42)
pt3dadd(65.14, 123.96, -28.1, 4.42)
pt3dadd(65.23, 124.01, -28.1, 4.42)
pt3dadd(65.27, 124.11, -28.1, 4.42)
pt3dadd(65.41, 124.26, -28.1, 4.42)
pt3dadd(65.45, 124.32, -28.1, 4.42)
pt3dadd(65.5, 124.36, -28.1, 4.42)
pt3dadd(65.54, 124.47, -28.1, 4.42)
pt3dadd(65.63, 124.52, -28.1, 4.42)
pt3dadd(65.72, 124.57, -28.1, 4.42)
pt3dadd(65.76, 124.67, -28.1, 4.42)
pt3dadd(65.81, 124.77, -28.1, 4.42)
pt3dadd(65.85, 124.82, -28.1, 4.42)
pt3dadd(65.9, 124.87, -28.1, 4.42)
pt3dadd(65.94, 124.97, -28.1, 4.42)
pt3dadd(65.99, 125.03, -28.1, 4.42)
pt3dadd(66.03, 125.13, -28.1, 4.42)
pt3dadd(66.12, 125.23, -28.1, 4.42)
pt3dadd(66.17, 125.28, -28.1, 4.42)
pt3dadd(66.21, 125.33, -28.1, 4.42)
pt3dadd(66.25, 125.43, -28.1, 4.42)
pt3dadd(66.3, 125.48, -28.1, 4.42)
pt3dadd(66.34, 125.53, -28.1, 4.42)
pt3dadd(66.39, 125.58, -28.1, 4.42)
pt3dadd(66.43, 125.63, -28.1, 4.42)
pt3dadd(66.43, 125.68, -28.1, 4.42)
pt3dadd(66.39, 125.53, -30.2, 3.91)
pt3dadd(66.48, 125.58, -30.2, 3.91)
pt3dadd(66.48, 125.68, -30.2, 3.91)
pt3dadd(66.52, 125.78, -30.2, 3.91)
pt3dadd(66.57, 125.83, -30.2, 3.91)
pt3dadd(66.61, 125.93, -30.2, 3.91)
pt3dadd(66.65, 125.99, -30.2, 3.91)
pt3dadd(66.65, 126.09, -30.2, 3.91)
pt3dadd(66.7, 126.14, -30.2, 3.91)
pt3dadd(66.75, 126.24, -30.2, 3.91)
pt3dadd(66.79, 126.29, -30.2, 3.91)
pt3dadd(66.83, 126.39, -30.2, 3.91)
pt3dadd(66.88, 126.49, -30.2, 3.91)
pt3dadd(66.88, 126.6, -30.2, 3.91)
pt3dadd(66.92, 126.64, -30.2, 3.91)
pt3dadd(66.97, 126.75, -30.2, 3.91)
pt3dadd(67.01, 126.8, -30.2, 3.91)
pt3dadd(67.06, 126.85, -30.2, 3.91)
pt3dadd(67.1, 126.9, -30.2, 3.91)
pt3dadd(67.14, 126.95, -30.2, 3.91)
pt3dadd(67.19, 127, -30.2, 3.91)
pt3dadd(67.24, 127.05, -30.2, 3.91)
pt3dadd(68.75, 127.05, -30.2, 3.91)
pt3dadd(68.89, 127.1, -32.3, 3.74)
pt3dadd(68.93, 127.15, -32.3, 3.74)
pt3dadd(68.97, 127.25, -32.3, 3.74)
pt3dadd(69.02, 127.35, -32.3, 3.74)
pt3dadd(69.06, 127.4, -32.3, 3.74)
pt3dadd(69.11, 127.46, -32.3, 3.74)
pt3dadd(69.15, 127.5, -32.3, 3.74)
pt3dadd(69.19, 127.56, -32.3, 3.74)
pt3dadd(69.24, 127.66, -32.3, 3.74)
pt3dadd(69.29, 127.71, -32.3, 3.74)
pt3dadd(69.33, 127.76, -32.3, 3.74)
pt3dadd(69.38, 127.81, -32.3, 3.74)
pt3dadd(69.42, 127.91, -32.3, 3.74)
pt3dadd(69.46, 127.96, -32.3, 3.74)
pt3dadd(69.51, 128.06, -32.3, 3.74)
pt3dadd(69.55, 128.11, -32.3, 3.74)
pt3dadd(69.55, 128.21, -32.3, 3.74)
pt3dadd(69.6, 128.32, -32.3, 3.74)
pt3dadd(69.64, 128.37, -32.3, 3.74)
pt3dadd(69.68, 128.47, -32.3, 3.74)
pt3dadd(69.73, 128.57, -32.3, 3.74)
pt3dadd(69.78, 128.62, -32.3, 3.74)
pt3dadd(69.82, 128.67, -32.3, 3.74)
pt3dadd(69.86, 128.72, -32.3, 3.74)
pt3dadd(69.91, 128.77, -32.3, 3.74)
pt3dadd(69.96, 128.87, -32.3, 3.74)
pt3dadd(70.04, 128.92, -32.3, 3.74)
pt3dadd(70.09, 129.02, -32.3, 3.74)
pt3dadd(70.13, 129.07, -32.3, 3.74)
pt3dadd(70.22, 129.18, -32.3, 3.74)
pt3dadd(70.26, 129.23, -32.3, 3.74)
pt3dadd(70.36, 129.33, -32.3, 3.74)
pt3dadd(70.4, 129.38, -32.3, 3.74)
pt3dadd(70.53, 129.53, -32.3, 3.74)
pt3dadd(70.58, 129.58, -32.3, 3.74)
pt3dadd(70.67, 129.68, -32.3, 3.74)
pt3dadd(70.71, 129.73, -32.3, 3.74)
pt3dadd(70.75, 129.84, -32.3, 3.74)
pt3dadd(70.8, 129.88, -32.3, 3.74)
pt3dadd(70.85, 129.93, -32.3, 3.74)
pt3dadd(70.98, 130.04, -32.3, 3.74)
pt3dadd(71.07, 130.09, -32.3, 3.74)
pt3dadd(71.11, 130.19, -32.3, 3.74)
pt3dadd(71.16, 130.24, -32.3, 3.74)
pt3dadd(71.25, 130.29, -32.3, 3.74)
pt3dadd(71.43, 130.49, -32.3, 3.74)
pt3dadd(71.51, 130.54, -32.3, 3.74)
pt3dadd(71.65, 130.7, -32.3, 3.74)
pt3dadd(71.69, 130.74, -32.3, 3.74)
pt3dadd(71.78, 130.8, -32.3, 3.74)
pt3dadd(71.82, 130.85, -32.3, 3.74)
pt3dadd(71.92, 130.9, -32.3, 3.74)
pt3dadd(71.96, 130.95, -32.3, 3.74)
pt3dadd(72, 131, -32.3, 3.74)
pt3dadd(72.09, 131, -32.3, 3.74)
pt3dadd(72.14, 131.05, -32.3, 3.74)
pt3dadd(72.23, 131.1, -32.3, 3.74)
pt3dadd(72.32, 131.15, -32.3, 3.74)
pt3dadd(72.36, 131.2, -32.3, 3.74)
pt3dadd(72.45, 131.2, -32.3, 3.74)
pt3dadd(72.54, 131.25, -32.3, 3.74)
pt3dadd(72.63, 131.3, -32.3, 3.74)
pt3dadd(72.72, 131.3, -32.3, 3.74)
pt3dadd(72.76, 131.35, -32.3, 3.74)
pt3dadd(72.85, 131.4, -32.3, 3.74)
pt3dadd(72.63, 131.46, -36.5, 3.74)
pt3dadd(72.72, 131.51, -36.5, 3.74)
pt3dadd(72.81, 131.55, -36.5, 3.74)
pt3dadd(72.94, 131.66, -36.5, 3.74)
pt3dadd(73.03, 131.66, -36.5, 3.74)
pt3dadd(73.16, 131.76, -36.5, 3.74)
pt3dadd(73.25, 131.81, -36.5, 3.74)
pt3dadd(73.34, 131.86, -36.5, 3.74)
pt3dadd(73.43, 131.91, -36.5, 3.74)
pt3dadd(73.47, 131.96, -36.5, 3.74)
pt3dadd(73.61, 131.96, -36.5, 3.74)
pt3dadd(73.65, 132.01, -36.5, 3.74)
pt3dadd(73.7, 132.06, -36.5, 3.74)
pt3dadd(73.74, 132.11, -36.5, 3.74)
pt3dadd(73.83, 132.16, -36.5, 3.74)
pt3dadd(73.92, 132.16, -36.5, 3.74)
pt3dadd(74.01, 132.21, -36.5, 3.74)
pt3dadd(74.06, 132.26, -36.5, 3.74)
pt3dadd(74.1, 132.32, -36.5, 3.74)
pt3dadd(74.14, 132.37, -36.5, 3.74)
pt3dadd(74.23, 132.37, -36.5, 3.74)
pt3dadd(74.28, 132.42, -36.5, 3.74)
pt3dadd(74.32, 132.47, -36.5, 3.74)
pt3dadd(74.41, 132.52, -36.5, 3.74)
pt3dadd(74.46, 132.57, -36.5, 3.74)
pt3dadd(74.54, 132.62, -36.5, 3.74)
pt3dadd(74.68, 132.67, -36.5, 3.74)
pt3dadd(74.77, 132.67, -36.5, 3.74)
pt3dadd(74.81, 132.72, -36.5, 3.74)
pt3dadd(74.86, 132.77, -36.5, 3.74)
pt3dadd(74.95, 132.77, -36.5, 3.74)
pt3dadd(74.99, 132.82, -36.5, 3.74)
pt3dadd(75.08, 132.87, -36.5, 3.74)
pt3dadd(75.21, 132.87, -36.5, 3.74)
pt3dadd(75.3, 132.98, -36.5, 3.74)
pt3dadd(75.44, 132.98, -36.5, 3.74)
pt3dadd(75.53, 133.02, -36.5, 3.74)
pt3dadd(75.61, 133.02, -36.5, 3.74)
pt3dadd(75.66, 133.07, -36.5, 3.74)
pt3dadd(75.84, 133.07, -36.5, 3.74)
pt3dadd(75.93, 133.13, -36.5, 3.74)
pt3dadd(76.11, 133.13, -36.5, 3.74)
pt3dadd(76.19, 133.18, -36.5, 3.74)
pt3dadd(76.29, 133.18, -36.5, 3.74)
pt3dadd(76.37, 133.23, -36.5, 3.74)
pt3dadd(76.51, 133.23, -36.5, 3.74)
pt3dadd(76.6, 133.28, -36.5, 3.74)
pt3dadd(76.78, 133.28, -36.5, 3.74)
pt3dadd(76.91, 133.33, -36.5, 3.74)
pt3dadd(77.31, 133.33, -36.5, 3.74)
pt3dadd(77.22, 133.33, -40.7, 3.74)
pt3dadd(77.31, 133.33, -40.7, 3.74)
pt3dadd(77.36, 133.38, -40.7, 3.74)
pt3dadd(77.49, 133.38, -40.7, 3.74)
pt3dadd(77.58, 133.43, -40.7, 3.74)
pt3dadd(77.62, 133.48, -40.7, 3.74)
pt3dadd(77.71, 133.48, -40.7, 3.74)
pt3dadd(77.8, 133.53, -40.7, 3.74)
pt3dadd(77.85, 133.58, -40.7, 3.74)
pt3dadd(77.93, 133.63, -40.7, 3.74)
pt3dadd(77.98, 133.68, -40.7, 3.74)
pt3dadd(78.02, 133.73, -40.7, 3.74)
pt3dadd(78.07, 133.79, -40.7, 3.74)
pt3dadd(78.11, 133.84, -40.7, 3.74)
pt3dadd(78.16, 133.93, -40.7, 3.74)
pt3dadd(78.29, 134.09, -40.7, 3.74)
pt3dadd(78.33, 134.14, -40.7, 3.74)
pt3dadd(78.38, 134.19, -40.7, 3.74)
pt3dadd(78.43, 134.29, -40.7, 3.74)
pt3dadd(78.56, 134.44, -40.7, 3.74)
pt3dadd(78.6, 134.49, -40.7, 3.74)
pt3dadd(78.65, 134.54, -40.7, 3.74)
pt3dadd(78.69, 134.6, -40.7, 3.74)
pt3dadd(78.74, 134.7, -40.7, 3.74)
pt3dadd(78.78, 134.75, -40.7, 3.74)
pt3dadd(78.78, 134.85, -40.7, 3.74)
pt3dadd(78.82, 134.9, -40.7, 3.74)
pt3dadd(78.92, 135, -40.7, 3.74)
pt3dadd(78.96, 135.05, -40.7, 3.74)
pt3dadd(79.05, 135.15, -40.7, 3.74)
pt3dadd(79.09, 135.2, -40.7, 3.74)
}
}
proc shape3d_161() {
dend[110] { pt3dadd(79.18, 135.25, -40.7, 3.74)
pt3dadd(79.27, 135.35, -40.7, 3.74)
pt3dadd(79.36, 135.4, -40.7, 3.74)
pt3dadd(79.45, 135.46, -40.7, 3.74)
pt3dadd(79.5, 135.56, -40.7, 3.74)
pt3dadd(79.58, 135.61, -40.7, 3.74)
pt3dadd(79.63, 135.66, -40.7, 3.74)
pt3dadd(79.67, 135.76, -40.7, 3.74)
pt3dadd(79.72, 135.81, -40.7, 3.74)
pt3dadd(79.72, 135.91, -40.7, 3.74)
pt3dadd(79.81, 135.96, -40.7, 3.74)
pt3dadd(79.85, 136.01, -40.7, 3.74)
pt3dadd(79.89, 136.06, -40.7, 3.74)
pt3dadd(79.94, 136.16, -40.7, 3.74)
pt3dadd(79.99, 136.21, -40.7, 3.74)
pt3dadd(80.07, 136.32, -40.7, 3.74)
pt3dadd(80.12, 136.37, -40.7, 3.74)
pt3dadd(80.21, 136.47, -40.7, 3.74)
pt3dadd(80.25, 136.52, -40.7, 3.74)
pt3dadd(80.3, 136.62, -40.7, 3.74)
pt3dadd(80.34, 136.67, -40.7, 3.74)
pt3dadd(80.39, 136.72, -40.7, 3.74)
pt3dadd(80.43, 136.82, -40.7, 3.74)
pt3dadd(80.57, 136.98, -40.7, 3.74)
pt3dadd(80.61, 137.02, -40.7, 3.74)
pt3dadd(80.65, 137.07, -40.7, 3.74)
pt3dadd(80.7, 137.18, -40.7, 3.74)
pt3dadd(80.79, 137.28, -40.7, 3.74)
pt3dadd(80.83, 137.33, -40.7, 3.74)
pt3dadd(80.88, 137.38, -40.7, 3.74)
pt3dadd(80.92, 137.48, -40.7, 3.74)
pt3dadd(81.01, 137.53, -40.7, 3.74)
pt3dadd(81.06, 137.63, -40.7, 3.74)
pt3dadd(81.19, 137.79, -40.7, 3.74)
pt3dadd(81.23, 137.84, -40.7, 3.74)
pt3dadd(81.32, 137.94, -40.7, 3.74)
pt3dadd(81.37, 137.99, -40.7, 3.74)
pt3dadd(81.46, 138.04, -40.7, 3.74)
pt3dadd(81.5, 138.09, -40.7, 3.74)
pt3dadd(81.54, 138.14, -40.7, 3.74)
pt3dadd(81.59, 138.19, -40.7, 3.74)
pt3dadd(81.64, 138.24, -40.7, 3.74)
pt3dadd(81.68, 138.29, -40.7, 3.74)
pt3dadd(81.72, 138.34, -40.7, 3.74)
pt3dadd(81.77, 138.39, -40.7, 3.74)
pt3dadd(81.81, 138.44, -40.7, 3.74)
pt3dadd(81.86, 138.49, -40.7, 3.74)
pt3dadd(81.9, 138.6, -40.7, 3.74)
pt3dadd(81.95, 138.7, -40.7, 3.74)
pt3dadd(81.99, 138.75, -40.7, 3.74)
pt3dadd(82.04, 138.8, -40.7, 3.74)
pt3dadd(82.13, 138.9, -40.7, 3.74)
pt3dadd(82.17, 138.95, -40.7, 3.74)
pt3dadd(82.21, 139.05, -40.7, 3.74)
pt3dadd(82.3, 139.15, -40.7, 3.74)
pt3dadd(82.35, 139.2, -40.7, 3.74)
pt3dadd(82.44, 139.25, -40.7, 3.74)
pt3dadd(82.44, 139.35, -40.7, 3.74)
pt3dadd(82.48, 139.4, -40.7, 3.74)
pt3dadd(82.57, 139.51, -40.7, 3.74)
pt3dadd(82.61, 139.56, -40.7, 3.74)
pt3dadd(82.66, 139.61, -40.7, 3.74)
pt3dadd(82.66, 139.71, -40.7, 3.74)
pt3dadd(82.71, 139.81, -40.7, 3.74)
pt3dadd(82.75, 139.86, -40.7, 3.74)
pt3dadd(82.75, 140.06, -40.7, 3.74)
pt3dadd(82.79, 140.16, -40.7, 3.74)
pt3dadd(82.84, 140.26, -40.7, 3.74)
pt3dadd(82.88, 140.37, -40.7, 3.74)
pt3dadd(82.93, 140.42, -40.7, 3.74)
pt3dadd(82.97, 140.52, -40.7, 3.74)
pt3dadd(83.02, 140.57, -40.7, 3.74)
pt3dadd(83.06, 140.62, -40.7, 3.74)
pt3dadd(83.11, 140.72, -40.7, 3.74)
pt3dadd(83.15, 140.77, -40.7, 3.74)
pt3dadd(83.19, 140.87, -40.7, 3.74)
pt3dadd(83.24, 140.98, -40.7, 3.74)
pt3dadd(83.29, 141.02, -40.7, 3.74)
pt3dadd(83.33, 141.13, -40.7, 3.74)
pt3dadd(83.37, 141.23, -40.7, 3.74)
pt3dadd(83.42, 141.28, -40.7, 3.74)
pt3dadd(83.46, 141.33, -40.7, 3.74)
pt3dadd(83.46, 141.43, -40.7, 3.74)
pt3dadd(83.51, 141.53, -40.7, 3.74)
pt3dadd(83.55, 141.63, -40.7, 3.74)
pt3dadd(83.6, 141.68, -40.7, 3.74)
pt3dadd(83.6, 141.79, -40.7, 3.74)
pt3dadd(83.64, 141.84, -40.7, 3.74)
pt3dadd(83.68, 141.88, -40.7, 3.74)
pt3dadd(83.68, 142.39, -40.7, 3.74)
pt3dadd(83.64, 142.29, -43.85, 3.23)
pt3dadd(83.64, 142.44, -43.85, 3.23)
pt3dadd(83.68, 142.49, -43.85, 3.23)
pt3dadd(83.82, 142.65, -43.85, 3.23)
pt3dadd(83.86, 142.7, -43.85, 3.23)
pt3dadd(83.95, 142.8, -43.85, 3.23)
pt3dadd(83.86, 142.6, -43.85, 3.57)
pt3dadd(83.91, 142.7, -43.85, 3.57)
pt3dadd(83.95, 142.8, -43.85, 3.57)
pt3dadd(83.95, 142.95, -43.85, 3.57)
pt3dadd(84, 143, -43.85, 3.57)
pt3dadd(84, 143.2, -43.85, 3.57)
pt3dadd(84.04, 143.25, -43.85, 3.57)
pt3dadd(84.09, 143.3, -43.85, 3.57)
pt3dadd(84.13, 143.35, -43.85, 3.57)
pt3dadd(84.13, 143.51, -43.85, 3.57)
pt3dadd(84.18, 143.61, -43.85, 3.57)
pt3dadd(84.22, 143.66, -43.85, 3.57)
pt3dadd(84.26, 143.76, -43.85, 3.57)
pt3dadd(84.31, 143.81, -43.85, 3.57)
pt3dadd(84.36, 143.91, -43.85, 3.57)
pt3dadd(84.4, 144.01, -43.85, 3.57)
pt3dadd(84.44, 144.12, -43.85, 3.57)
pt3dadd(84.49, 144.16, -43.85, 3.57)
pt3dadd(84.53, 144.26, -43.85, 3.57)
pt3dadd(84.62, 144.32, -43.85, 3.57)
pt3dadd(84.67, 144.37, -43.85, 3.57)
pt3dadd(84.71, 144.42, -43.85, 3.57)
pt3dadd(84.75, 144.52, -43.85, 3.57)
pt3dadd(84.8, 144.57, -43.85, 3.57)
pt3dadd(84.89, 144.67, -43.85, 3.57)
pt3dadd(84.93, 144.72, -43.85, 3.57)
pt3dadd(84.98, 144.77, -43.85, 3.57)
pt3dadd(84.98, 144.87, -43.85, 3.57)
pt3dadd(85.02, 144.93, -43.85, 3.57)
pt3dadd(85.2, 145.13, -43.85, 3.57)
pt3dadd(85.29, 145.18, -43.85, 3.57)
pt3dadd(85.38, 145.33, -43.85, 3.57)
pt3dadd(85.47, 145.38, -43.85, 3.57)
pt3dadd(85.56, 145.48, -43.85, 3.57)
pt3dadd(85.65, 145.53, -43.85, 3.57)
pt3dadd(85.69, 145.58, -43.85, 3.57)
pt3dadd(85.74, 145.63, -43.85, 3.57)
pt3dadd(85.87, 145.79, -43.85, 3.57)
pt3dadd(85.96, 145.84, -43.85, 3.57)
pt3dadd(86, 145.89, -43.85, 3.57)
pt3dadd(86.05, 145.94, -43.85, 3.57)
pt3dadd(86.09, 146.04, -43.85, 3.57)
pt3dadd(86.14, 146.14, -43.85, 3.57)
pt3dadd(86.18, 146.19, -43.85, 3.57)
pt3dadd(86.23, 146.29, -43.85, 3.57)
pt3dadd(86.27, 146.39, -43.85, 3.57)
pt3dadd(86.32, 146.49, -43.85, 3.57)
pt3dadd(86.36, 146.54, -43.85, 3.57)
pt3dadd(86.4, 146.65, -43.85, 3.57)
pt3dadd(86.45, 146.7, -43.85, 3.57)
pt3dadd(86.5, 146.75, -43.85, 3.57)
pt3dadd(86.5, 146.85, -43.85, 3.57)
pt3dadd(86.54, 146.95, -43.85, 3.57)
pt3dadd(86.58, 147, -43.85, 3.57)
pt3dadd(86.63, 147.05, -43.85, 3.57)
pt3dadd(86.67, 147.15, -43.85, 3.57)
pt3dadd(86.72, 147.25, -43.85, 3.57)
pt3dadd(86.81, 147.35, -43.85, 3.57)
pt3dadd(86.81, 147.56, -43.85, 3.57)
pt3dadd(86.85, 147.61, -43.85, 3.57)
pt3dadd(86.89, 147.66, -43.85, 3.57)
pt3dadd(86.89, 147.81, -43.85, 3.57)
pt3dadd(86.94, 147.86, -43.85, 3.57)
pt3dadd(86.99, 147.96, -43.85, 3.57)
pt3dadd(87.03, 148.07, -43.85, 3.57)
pt3dadd(87.07, 148.16, -43.85, 3.57)
pt3dadd(87.12, 148.21, -43.85, 3.57)
pt3dadd(87.16, 148.27, -43.85, 3.57)
pt3dadd(87.07, 148.12, -48.05, 3.57)
pt3dadd(87.07, 148.32, -48.05, 3.57)
pt3dadd(87.12, 148.37, -48.05, 3.57)
pt3dadd(87.16, 148.42, -48.05, 3.57)
pt3dadd(87.21, 148.52, -48.05, 3.57)
pt3dadd(87.25, 148.57, -48.05, 3.57)
pt3dadd(87.29, 148.72, -48.05, 3.57)
pt3dadd(87.39, 148.82, -48.05, 3.57)
pt3dadd(87.43, 148.93, -48.05, 3.57)
pt3dadd(87.47, 149.02, -48.05, 3.57)
pt3dadd(87.52, 149.08, -48.05, 3.57)
pt3dadd(87.56, 149.18, -48.05, 3.57)
pt3dadd(87.61, 149.23, -48.05, 3.57)
pt3dadd(87.61, 149.33, -48.05, 3.57)
pt3dadd(87.65, 149.38, -48.05, 3.57)
pt3dadd(87.7, 149.43, -48.05, 3.57)
pt3dadd(87.7, 149.53, -48.05, 3.57)
pt3dadd(87.79, 149.68, -48.05, 3.57)
pt3dadd(87.83, 149.79, -48.05, 3.57)
pt3dadd(87.88, 149.84, -48.05, 3.57)
pt3dadd(87.92, 149.94, -48.05, 3.57)
pt3dadd(88.01, 149.99, -48.05, 3.57)
pt3dadd(88.06, 150.04, -48.05, 3.57)
pt3dadd(88.14, 150.14, -48.05, 3.57)
pt3dadd(88.23, 150.19, -48.05, 3.57)
pt3dadd(88.41, 150.39, -48.05, 3.57)
pt3dadd(88.5, 150.44, -48.05, 3.57)
pt3dadd(88.54, 150.49, -48.05, 3.57)
pt3dadd(88.63, 150.6, -48.05, 3.57)
pt3dadd(88.72, 150.65, -48.05, 3.57)
pt3dadd(88.94, 150.9, -48.05, 3.57)
pt3dadd(88.99, 150.95, -48.05, 3.57)
pt3dadd(89.13, 151, -48.05, 3.57)
pt3dadd(89.21, 151.05, -48.05, 3.57)
pt3dadd(89.26, 151.15, -48.05, 3.57)
pt3dadd(89.35, 151.2, -48.05, 3.57)
}
}
proc shape3d_162() {
dend[110] { pt3dadd(89.43, 151.3, -48.05, 3.57)
pt3dadd(89.48, 151.35, -48.05, 3.57)
pt3dadd(89.66, 151.56, -48.05, 3.57)
pt3dadd(89.75, 151.61, -48.05, 3.57)
pt3dadd(89.79, 151.66, -48.05, 3.57)
pt3dadd(89.88, 151.71, -48.05, 3.57)
pt3dadd(89.93, 151.81, -48.05, 3.57)
pt3dadd(90.01, 151.81, -48.05, 3.57)
pt3dadd(90.11, 151.91, -48.05, 3.57)
pt3dadd(90.19, 151.91, -48.05, 3.57)
pt3dadd(90.33, 152.07, -48.05, 3.57)
pt3dadd(90.37, 152.12, -48.05, 3.57)
pt3dadd(90.46, 152.16, -48.05, 3.57)
pt3dadd(90.55, 152.21, -48.05, 3.57)
pt3dadd(90.64, 152.27, -48.05, 3.57)
pt3dadd(90.73, 152.32, -48.05, 3.57)
pt3dadd(90.82, 152.37, -48.05, 3.57)
pt3dadd(90.86, 152.42, -48.05, 3.57)
pt3dadd(90.95, 152.47, -48.05, 3.57)
pt3dadd(91.04, 152.52, -48.05, 3.57)
pt3dadd(91.13, 152.57, -48.05, 3.57)
pt3dadd(91.22, 152.62, -48.05, 3.57)
pt3dadd(91.26, 152.67, -48.05, 3.57)
pt3dadd(91.35, 152.67, -48.05, 3.57)
pt3dadd(91.4, 152.72, -48.05, 3.57)
pt3dadd(91.49, 152.77, -48.05, 3.57)
pt3dadd(91.57, 152.88, -48.05, 3.57)
pt3dadd(91.62, 152.88, -48.05, 3.57)
pt3dadd(91.57, 152.62, -50.15, 3.57)
pt3dadd(91.57, 152.77, -50.15, 3.57)
pt3dadd(91.62, 152.82, -50.15, 3.57)
pt3dadd(91.67, 152.88, -50.15, 3.57)
pt3dadd(91.71, 152.98, -50.15, 3.57)
pt3dadd(91.75, 153.08, -50.15, 3.57)
pt3dadd(91.8, 153.13, -50.15, 3.57)
pt3dadd(91.89, 153.23, -50.15, 3.57)
pt3dadd(91.93, 153.33, -50.15, 3.57)
pt3dadd(92.11, 153.53, -50.15, 3.57)
pt3dadd(92.15, 153.58, -50.15, 3.57)
pt3dadd(92.29, 153.68, -50.15, 3.57)
pt3dadd(92.38, 153.74, -50.15, 3.57)
pt3dadd(92.47, 153.79, -50.15, 3.57)
pt3dadd(92.56, 153.89, -50.15, 3.57)
pt3dadd(92.64, 153.94, -50.15, 3.57)
pt3dadd(92.69, 153.99, -50.15, 3.57)
pt3dadd(92.78, 154.09, -50.15, 3.57)
pt3dadd(92.87, 154.09, -50.15, 3.57)
pt3dadd(93, 154.24, -50.15, 3.57)
pt3dadd(93.14, 154.29, -50.15, 3.57)
pt3dadd(93.18, 154.34, -50.15, 3.57)
pt3dadd(93.27, 154.39, -50.15, 3.57)
pt3dadd(93.4, 154.45, -50.15, 3.57)
pt3dadd(93.49, 154.54, -50.15, 3.57)
pt3dadd(93.58, 154.6, -50.15, 3.57)
pt3dadd(93.67, 154.65, -50.15, 3.57)
pt3dadd(93.76, 154.7, -50.15, 3.57)
pt3dadd(93.85, 154.8, -50.15, 3.57)
pt3dadd(93.94, 154.85, -50.15, 3.57)
pt3dadd(93.98, 154.9, -50.15, 3.57)
pt3dadd(94.03, 154.95, -50.15, 3.57)
pt3dadd(94.12, 155, -50.15, 3.57)
pt3dadd(94.21, 155.1, -50.15, 3.57)
pt3dadd(94.29, 155.15, -50.15, 3.57)
pt3dadd(94.34, 155.2, -50.15, 3.57)
pt3dadd(94.47, 155.3, -50.15, 3.57)
pt3dadd(94.52, 155.35, -50.15, 3.57)
pt3dadd(94.61, 155.4, -50.15, 3.57)
pt3dadd(94.65, 155.46, -50.15, 3.57)
pt3dadd(94.79, 155.61, -50.15, 3.57)
pt3dadd(94.88, 155.66, -50.15, 3.57)
pt3dadd(95.01, 155.81, -50.15, 3.57)
pt3dadd(95.1, 155.86, -50.15, 3.57)
pt3dadd(95.19, 155.91, -50.15, 3.57)
pt3dadd(95.23, 156.01, -50.15, 3.57)
pt3dadd(95.28, 156.07, -50.15, 3.57)
pt3dadd(95.32, 156.12, -50.15, 3.57)
pt3dadd(95.41, 156.16, -50.15, 3.57)
pt3dadd(95.46, 156.21, -50.15, 3.57)
pt3dadd(95.54, 156.27, -50.15, 3.57)
pt3dadd(95.59, 156.32, -50.15, 3.57)
pt3dadd(95.63, 156.42, -50.15, 3.57)
pt3dadd(95.72, 156.42, -50.15, 3.57)
pt3dadd(95.72, 156.47, -50.15, 3.57)
pt3dadd(95.72, 156.42, -51.2, 3.57)
pt3dadd(95.77, 156.47, -51.2, 3.57)
pt3dadd(95.81, 156.52, -51.2, 3.57)
pt3dadd(95.9, 156.57, -51.2, 3.57)
pt3dadd(96.04, 156.57, -51.2, 3.57)
pt3dadd(96.08, 156.62, -51.2, 3.57)
pt3dadd(96.26, 156.62, -51.2, 3.57)
pt3dadd(96.3, 156.67, -51.2, 3.57)
}
dend[111] {pt3dclear()
pt3dadd(62.55, 120.77, -23.9, 4.72)
pt3dadd(50.5, 143.83, 0, 4.72)
pt3dadd(30.19, 192.49, 0, 4.72)
pt3dadd(15.78, 237.94, 0, 4.72)
pt3dadd(9.8, 245.54, 0, 4.72)
pt3dadd(2.8, 255.27, 0, 4.72)
pt3dadd(1.2, 259.67, 0, 4.72)
pt3dadd(3.81, 268.86, 0, 4.72)
pt3dadd(7.43, 279.66, 0, 4.72)
}
dend[112] {pt3dclear()
pt3dadd(66.24, 112.36, -19.7, 1.36)
pt3dadd(64.03, 112.17, 42.9, 1.36)
pt3dadd(59.52, 114.9, 42.9, 5.1)
pt3dadd(59.43, 115, 42.9, 5.1)
pt3dadd(59.34, 115.1, 42.9, 5.1)
pt3dadd(59.17, 115.2, 42.9, 5.1)
pt3dadd(59.08, 115.4, 42.9, 5.1)
pt3dadd(58.99, 115.5, 42.9, 5.1)
pt3dadd(58.9, 115.61, 42.9, 5.1)
pt3dadd(58.81, 115.71, 42.9, 5.1)
pt3dadd(58.72, 115.81, 42.9, 5.1)
pt3dadd(58.54, 115.91, 42.9, 5.1)
pt3dadd(58.45, 116.01, 42.9, 5.1)
pt3dadd(58.36, 116.11, 42.9, 5.1)
pt3dadd(58.27, 116.21, 42.9, 5.1)
pt3dadd(58.19, 116.32, 42.9, 5.1)
pt3dadd(58.01, 116.42, 42.9, 5.1)
pt3dadd(57.92, 116.52, 42.9, 5.1)
pt3dadd(57.83, 116.62, 42.9, 5.1)
pt3dadd(57.74, 116.72, 42.9, 5.1)
pt3dadd(57.65, 116.82, 42.9, 5.1)
pt3dadd(57.56, 116.92, 42.9, 5.1)
pt3dadd(57.38, 116.92, 42.9, 5.1)
pt3dadd(57.29, 117.02, 42.9, 5.1)
pt3dadd(57.2, 117.13, 42.9, 5.1)
pt3dadd(57.03, 117.22, 42.9, 5.1)
pt3dadd(56.94, 117.33, 42.9, 5.1)
pt3dadd(56.76, 117.33, 42.9, 5.1)
pt3dadd(56.67, 117.43, 42.9, 5.1)
pt3dadd(56.49, 117.43, 42.9, 5.1)
pt3dadd(56.4, 117.53, 42.9, 5.1)
pt3dadd(56.13, 117.53, 42.9, 5.1)
pt3dadd(56.04, 117.63, 42.9, 5.1)
pt3dadd(55.78, 117.63, 42.9, 5.1)
pt3dadd(55.6, 117.73, 42.9, 5.1)
pt3dadd(55.24, 117.73, 42.9, 5.1)
pt3dadd(55.51, 117.83, 47.1, 4.76)
pt3dadd(55.24, 117.83, 47.1, 4.76)
pt3dadd(55.15, 118.04, 47.1, 4.76)
pt3dadd(55.06, 118.14, 47.1, 4.76)
pt3dadd(54.88, 118.14, 47.1, 4.76)
pt3dadd(54.79, 118.24, 47.1, 4.76)
pt3dadd(54.71, 118.34, 47.1, 4.76)
pt3dadd(54.62, 118.44, 47.1, 4.76)
pt3dadd(54.53, 118.64, 47.1, 4.76)
pt3dadd(54.44, 118.75, 47.1, 4.76)
pt3dadd(54.35, 118.85, 47.1, 4.76)
pt3dadd(54.26, 118.95, 47.1, 4.76)
pt3dadd(54.17, 119.05, 47.1, 4.76)
pt3dadd(54.17, 119.25, 47.1, 4.76)
pt3dadd(54.08, 119.35, 47.1, 4.76)
pt3dadd(53.99, 119.46, 47.1, 4.76)
pt3dadd(53.9, 119.56, 47.1, 4.76)
pt3dadd(53.72, 119.76, 47.1, 4.76)
pt3dadd(53.64, 119.86, 47.1, 4.76)
pt3dadd(53.55, 119.96, 47.1, 4.76)
pt3dadd(53.19, 120.36, 47.1, 4.76)
pt3dadd(53.01, 120.67, 47.1, 4.76)
pt3dadd(52.92, 120.77, 47.1, 4.76)
pt3dadd(52.83, 120.87, 47.1, 4.76)
pt3dadd(52.74, 120.97, 47.1, 4.76)
pt3dadd(52.65, 121.18, 47.1, 4.76)
pt3dadd(52.57, 121.38, 47.1, 4.76)
pt3dadd(52.39, 121.48, 47.1, 4.76)
pt3dadd(52.39, 121.68, 47.1, 4.76)
pt3dadd(52.21, 121.78, 47.1, 4.76)
pt3dadd(52.21, 121.99, 47.1, 4.76)
pt3dadd(52.03, 122.09, 47.1, 4.76)
pt3dadd(51.94, 122.19, 47.1, 4.76)
pt3dadd(51.85, 122.29, 47.1, 4.76)
pt3dadd(51.76, 122.49, 47.1, 4.76)
pt3dadd(51.67, 122.59, 47.1, 4.76)
pt3dadd(51.5, 122.79, 47.1, 4.76)
pt3dadd(51.41, 122.9, 47.1, 4.76)
pt3dadd(51.32, 123.1, 47.1, 4.76)
pt3dadd(51.14, 123.2, 47.1, 4.76)
pt3dadd(51.05, 123.3, 47.1, 4.76)
pt3dadd(50.96, 123.4, 47.1, 4.76)
pt3dadd(50.87, 123.5, 47.1, 4.76)
pt3dadd(50.78, 123.61, 47.1, 4.76)
pt3dadd(50.69, 123.71, 47.1, 4.76)
pt3dadd(50.6, 123.91, 47.1, 4.76)
pt3dadd(50.51, 124.01, 47.1, 4.76)
pt3dadd(50.43, 124.11, 47.1, 4.76)
pt3dadd(50.34, 124.21, 47.1, 4.76)
pt3dadd(50.25, 124.32, 47.1, 4.76)
pt3dadd(50.16, 124.52, 47.1, 4.76)
pt3dadd(49.98, 124.62, 47.1, 4.76)
pt3dadd(49.89, 124.72, 47.1, 4.76)
pt3dadd(49.8, 124.82, 47.1, 4.76)
pt3dadd(49.71, 124.92, 47.1, 4.76)
pt3dadd(49.63, 125.03, 47.1, 4.76)
pt3dadd(49.63, 125.13, 47.1, 4.76)
pt3dadd(50.07, 124.72, 49.2, 4.08)
pt3dadd(49.98, 124.92, 49.2, 4.08)
pt3dadd(49.89, 125.13, 49.2, 4.08)
pt3dadd(49.8, 125.33, 49.2, 4.08)
pt3dadd(49.71, 125.53, 49.2, 4.08)
pt3dadd(49.63, 125.73, 49.2, 4.08)
pt3dadd(49.53, 125.83, 49.2, 4.08)
}
}
proc shape3d_163() {
dend[112] { pt3dadd(49.53, 126.04, 49.2, 4.08)
pt3dadd(49.44, 126.14, 49.2, 4.08)
pt3dadd(49.36, 126.34, 49.2, 4.08)
pt3dadd(49.27, 126.44, 49.2, 4.08)
pt3dadd(49.18, 126.54, 49.2, 4.08)
pt3dadd(49.18, 126.75, 49.2, 4.08)
pt3dadd(49.09, 126.85, 49.2, 4.08)
pt3dadd(49, 126.95, 49.2, 4.08)
pt3dadd(48.91, 127.15, 49.2, 4.08)
pt3dadd(48.82, 127.25, 49.2, 4.08)
pt3dadd(48.73, 127.35, 49.2, 4.08)
pt3dadd(48.64, 127.46, 49.2, 4.08)
pt3dadd(48.47, 127.56, 49.2, 4.08)
pt3dadd(48.29, 127.76, 49.2, 4.08)
pt3dadd(48.2, 127.86, 49.2, 4.08)
pt3dadd(47.93, 128.16, 49.2, 4.08)
pt3dadd(47.84, 128.26, 49.2, 4.08)
pt3dadd(47.57, 128.26, 49.2, 4.08)
pt3dadd(47.49, 128.37, 49.2, 4.08)
pt3dadd(47.31, 128.37, 49.2, 4.08)
pt3dadd(47.22, 128.47, 49.2, 4.08)
pt3dadd(44.63, 128.47, 49.2, 4.08)
pt3dadd(44.54, 128.57, 49.2, 4.08)
pt3dadd(44.45, 128.67, 49.2, 4.08)
pt3dadd(44.36, 128.87, 49.2, 4.08)
pt3dadd(44.28, 128.97, 49.2, 4.08)
pt3dadd(44.19, 129.07, 49.2, 4.08)
pt3dadd(44.1, 129.18, 49.2, 4.08)
pt3dadd(44.01, 129.28, 49.2, 4.08)
pt3dadd(43.92, 129.38, 49.2, 4.08)
pt3dadd(43.92, 129.58, 49.2, 4.08)
pt3dadd(43.83, 129.68, 49.2, 4.08)
pt3dadd(43.74, 129.79, 49.2, 4.08)
pt3dadd(43.65, 129.88, 49.2, 4.08)
pt3dadd(43.56, 129.99, 49.2, 4.08)
pt3dadd(43.56, 130.19, 49.2, 4.08)
pt3dadd(43.38, 130.29, 49.2, 4.08)
pt3dadd(43.29, 130.39, 49.2, 4.08)
pt3dadd(43.21, 130.49, 49.2, 4.08)
pt3dadd(43.03, 130.6, 49.2, 4.08)
pt3dadd(42.94, 130.7, 49.2, 4.08)
pt3dadd(42.94, 130.9, 49.2, 4.08)
pt3dadd(42.76, 131, 49.2, 4.08)
pt3dadd(42.67, 131.1, 49.2, 4.08)
pt3dadd(42.58, 131.2, 49.2, 4.08)
pt3dadd(42.49, 131.3, 49.2, 4.08)
pt3dadd(42.4, 131.4, 49.2, 4.08)
pt3dadd(42.31, 131.51, 49.2, 4.08)
pt3dadd(42.22, 131.61, 49.2, 4.08)
pt3dadd(42.13, 131.71, 49.2, 4.08)
pt3dadd(42.04, 131.91, 49.2, 4.08)
pt3dadd(41.87, 132.01, 49.2, 4.08)
pt3dadd(41.82, 131.76, 52.35, 4.08)
pt3dadd(41.69, 131.76, 52.35, 4.08)
pt3dadd(41.65, 131.81, 52.35, 4.08)
pt3dadd(38.03, 131.81, 52.35, 4.08)
pt3dadd(37.99, 131.86, 52.35, 4.08)
pt3dadd(38.03, 131.76, 55.5, 3.91)
pt3dadd(37.9, 131.86, 55.5, 3.91)
pt3dadd(37.76, 131.96, 55.5, 3.91)
pt3dadd(37.59, 132.06, 55.5, 3.91)
pt3dadd(37.45, 132.21, 55.5, 3.91)
pt3dadd(37.32, 132.32, 55.5, 3.91)
pt3dadd(37.23, 132.37, 55.5, 3.91)
pt3dadd(37.14, 132.47, 55.5, 3.91)
pt3dadd(37.1, 132.52, 55.5, 3.91)
pt3dadd(37.01, 132.62, 55.5, 3.91)
pt3dadd(36.92, 132.67, 55.5, 3.91)
pt3dadd(36.88, 132.72, 55.5, 3.91)
pt3dadd(36.78, 132.82, 55.5, 3.91)
pt3dadd(36.69, 132.87, 55.5, 3.91)
pt3dadd(36.65, 132.92, 55.5, 3.91)
pt3dadd(36.56, 132.98, 55.5, 3.91)
pt3dadd(36.47, 133.02, 55.5, 3.91)
pt3dadd(36.43, 133.13, 55.5, 3.91)
pt3dadd(36.34, 133.18, 55.5, 3.91)
pt3dadd(36.21, 133.28, 55.5, 3.91)
pt3dadd(35.98, 133.43, 55.5, 3.91)
pt3dadd(35.89, 133.48, 55.5, 3.91)
pt3dadd(35.76, 133.58, 55.5, 3.91)
pt3dadd(35.72, 133.68, 55.5, 3.91)
pt3dadd(35.63, 133.73, 55.5, 3.91)
pt3dadd(35.54, 133.84, 55.5, 3.91)
pt3dadd(35.45, 133.88, 55.5, 3.91)
pt3dadd(35.36, 133.93, 55.5, 3.91)
pt3dadd(35.27, 133.99, 55.5, 3.91)
pt3dadd(35.18, 134.09, 55.5, 3.91)
pt3dadd(35.13, 134.14, 55.5, 3.91)
pt3dadd(35, 134.19, 55.5, 3.91)
pt3dadd(34.91, 134.29, 55.5, 3.91)
pt3dadd(34.82, 134.34, 55.5, 3.91)
pt3dadd(34.78, 134.44, 55.5, 3.91)
pt3dadd(34.69, 134.49, 55.5, 3.91)
pt3dadd(34.56, 134.6, 55.5, 3.91)
pt3dadd(34.51, 134.65, 55.5, 3.91)
pt3dadd(34.42, 134.7, 55.5, 3.91)
pt3dadd(34.33, 134.85, 55.5, 3.91)
pt3dadd(34.24, 134.9, 55.5, 3.91)
pt3dadd(34.2, 134.95, 55.5, 3.91)
pt3dadd(33.93, 135.25, 55.5, 3.91)
pt3dadd(33.89, 135.3, 55.5, 3.91)
pt3dadd(33.8, 135.4, 55.5, 3.91)
pt3dadd(33.75, 135.46, 55.5, 3.91)
pt3dadd(33.71, 135.51, 55.5, 3.91)
pt3dadd(33.67, 135.61, 55.5, 3.91)
pt3dadd(33.58, 135.66, 55.5, 3.91)
pt3dadd(33.53, 135.76, 55.5, 3.91)
pt3dadd(33.49, 135.81, 55.5, 3.91)
pt3dadd(33.4, 135.86, 55.5, 3.91)
pt3dadd(33.35, 135.91, 55.5, 3.91)
pt3dadd(33.31, 136.06, 55.5, 3.91)
pt3dadd(33.22, 136.11, 55.5, 3.91)
pt3dadd(33.17, 136.16, 55.5, 3.91)
pt3dadd(33.13, 136.26, 55.5, 3.91)
pt3dadd(33.08, 136.32, 55.5, 3.91)
pt3dadd(32.99, 136.37, 55.5, 3.91)
pt3dadd(32.95, 136.42, 55.5, 3.91)
pt3dadd(32.9, 136.52, 55.5, 3.91)
pt3dadd(32.86, 136.57, 55.5, 3.91)
pt3dadd(32.82, 136.62, 55.5, 3.91)
pt3dadd(32.73, 136.67, 55.5, 3.91)
pt3dadd(32.68, 136.72, 55.5, 3.91)
pt3dadd(32.64, 136.82, 55.5, 3.91)
pt3dadd(32.6, 136.87, 55.5, 3.91)
pt3dadd(32.55, 136.92, 55.5, 3.91)
pt3dadd(32.46, 136.98, 55.5, 3.91)
pt3dadd(32.42, 137.02, 55.5, 3.91)
pt3dadd(32.42, 137.13, 55.5, 3.91)
pt3dadd(32.37, 137.18, 55.5, 3.91)
pt3dadd(32.33, 137.23, 55.5, 3.91)
pt3dadd(32.28, 137.33, 55.5, 3.91)
pt3dadd(32.24, 137.38, 55.5, 3.91)
pt3dadd(32.19, 137.43, 55.5, 3.91)
pt3dadd(32.15, 137.48, 55.5, 3.91)
pt3dadd(32.1, 137.53, 55.5, 3.91)
pt3dadd(32.33, 137.28, 60.75, 3.91)
pt3dadd(32.28, 137.38, 60.75, 3.91)
pt3dadd(32.24, 137.48, 60.75, 3.91)
pt3dadd(32.1, 137.63, 60.75, 3.91)
pt3dadd(32.06, 137.74, 60.75, 3.91)
pt3dadd(32.01, 137.84, 60.75, 3.91)
pt3dadd(31.92, 137.94, 60.75, 3.91)
pt3dadd(31.88, 137.99, 60.75, 3.91)
pt3dadd(31.83, 138.04, 60.75, 3.91)
pt3dadd(31.83, 138.14, 60.75, 3.91)
pt3dadd(31.79, 138.19, 60.75, 3.91)
pt3dadd(31.48, 138.54, 60.75, 3.91)
pt3dadd(31.43, 138.6, 60.75, 3.91)
pt3dadd(31.34, 138.65, 60.75, 3.91)
pt3dadd(31.3, 138.75, 60.75, 3.91)
pt3dadd(31.26, 138.85, 60.75, 3.91)
pt3dadd(31.17, 138.95, 60.75, 3.91)
pt3dadd(31.08, 139, 60.75, 3.91)
pt3dadd(31.03, 139.1, 60.75, 3.91)
pt3dadd(30.99, 139.15, 60.75, 3.91)
pt3dadd(30.94, 139.2, 60.75, 3.91)
pt3dadd(30.9, 139.25, 60.75, 3.91)
pt3dadd(30.85, 139.35, 60.75, 3.91)
pt3dadd(30.81, 139.46, 60.75, 3.91)
pt3dadd(30.72, 139.56, 60.75, 3.91)
pt3dadd(30.68, 139.61, 60.75, 3.91)
pt3dadd(30.63, 139.71, 60.75, 3.91)
pt3dadd(30.59, 139.81, 60.75, 3.91)
pt3dadd(30.54, 139.86, 60.75, 3.91)
pt3dadd(30.45, 139.96, 60.75, 3.91)
pt3dadd(30.41, 140.06, 60.75, 3.91)
pt3dadd(30.36, 140.12, 60.75, 3.91)
pt3dadd(30.27, 140.26, 60.75, 3.91)
pt3dadd(30.19, 140.32, 60.75, 3.91)
pt3dadd(30.14, 140.47, 60.75, 3.91)
pt3dadd(30.1, 140.52, 60.75, 3.91)
pt3dadd(30.01, 140.57, 60.75, 3.91)
pt3dadd(29.96, 140.62, 60.75, 3.91)
pt3dadd(29.88, 140.72, 60.75, 3.91)
pt3dadd(29.83, 140.77, 60.75, 3.91)
pt3dadd(29.74, 140.87, 60.75, 3.91)
pt3dadd(29.69, 140.93, 60.75, 3.91)
pt3dadd(29.65, 140.98, 60.75, 3.91)
pt3dadd(29.61, 141.07, 60.75, 3.91)
pt3dadd(29.56, 141.18, 60.75, 3.91)
pt3dadd(29.52, 141.23, 60.75, 3.91)
pt3dadd(29.47, 141.28, 60.75, 3.91)
pt3dadd(29.43, 141.38, 60.75, 3.91)
pt3dadd(29.39, 141.43, 60.75, 3.91)
pt3dadd(29.3, 141.48, 60.75, 3.91)
pt3dadd(29.25, 141.53, 60.75, 3.91)
pt3dadd(29.16, 141.58, 60.75, 3.91)
pt3dadd(29.12, 141.63, 60.75, 3.91)
pt3dadd(29.03, 141.68, 60.75, 3.91)
pt3dadd(28.98, 141.74, 60.75, 3.91)
pt3dadd(28.94, 141.84, 60.75, 3.91)
pt3dadd(28.85, 141.88, 60.75, 3.91)
pt3dadd(28.81, 141.99, 60.75, 3.91)
pt3dadd(28.72, 142.04, 60.75, 3.91)
pt3dadd(28.67, 142.09, 60.75, 3.91)
pt3dadd(28.63, 142.19, 60.75, 3.91)
pt3dadd(28.58, 142.24, 60.75, 3.91)
pt3dadd(28.49, 142.34, 60.75, 3.91)
pt3dadd(28.45, 142.39, 60.75, 3.91)
pt3dadd(28.36, 142.44, 60.75, 3.91)
}
}
proc shape3d_164() {
dend[112] { pt3dadd(28.32, 142.54, 60.75, 3.91)
pt3dadd(28.27, 142.6, 60.75, 3.91)
pt3dadd(28.23, 142.65, 60.75, 3.91)
pt3dadd(28.18, 142.7, 60.75, 3.91)
pt3dadd(28.14, 142.8, 60.75, 3.91)
}
dend[113] {pt3dclear()
pt3dadd(78.85, 127.86, 11.3, 6.69)
pt3dadd(78.08, 127.15, 11.3, 6.69)
pt3dadd(77.38, 127.15, 11.3, 6.69)
pt3dadd(77.31, 127.23, 11.3, 6.69)
pt3dadd(77.24, 127.31, 11.3, 6.69)
pt3dadd(77.17, 127.46, 11.3, 6.69)
pt3dadd(77.11, 127.54, 11.3, 6.69)
pt3dadd(77.04, 127.62, 11.3, 6.69)
pt3dadd(76.96, 127.7, 11.3, 6.69)
pt3dadd(76.89, 127.78, 11.3, 6.69)
pt3dadd(76.82, 127.86, 11.3, 6.69)
pt3dadd(76.75, 127.94, 11.3, 6.69)
pt3dadd(76.75, 128.1, 11.3, 6.69)
pt3dadd(76.68, 128.18, 11.3, 6.69)
pt3dadd(76.51, 128.06, 11.3, 4.74)
pt3dadd(76.44, 128.06, 11.3, 4.74)
pt3dadd(76.41, 128.14, 11.3, 4.74)
pt3dadd(76.37, 128.18, 11.3, 4.74)
pt3dadd(76.37, 128.34, 11.3, 4.74)
pt3dadd(76.34, 128.38, 11.3, 4.74)
pt3dadd(76.34, 128.53, 11.3, 4.74)
pt3dadd(76.3, 128.61, 11.3, 4.74)
pt3dadd(76.3, 129.96, 11.3, 4.74)
pt3dadd(76.27, 130, 11.3, 4.74)
pt3dadd(76.27, 131.02, 11.3, 4.74)
pt3dadd(76.23, 131.1, 11.3, 4.74)
pt3dadd(76.23, 131.22, 11.3, 4.74)
pt3dadd(76.2, 131.3, 11.3, 4.74)
pt3dadd(76.2, 131.58, 11.3, 4.74)
pt3dadd(76.16, 131.66, 11.3, 4.74)
pt3dadd(76.16, 131.78, 11.3, 4.74)
pt3dadd(76.13, 131.9, 11.3, 4.74)
pt3dadd(76.13, 132.33, 11.3, 4.74)
pt3dadd(76.09, 132.41, 11.3, 4.74)
pt3dadd(76.09, 132.77, 11.3, 4.74)
pt3dadd(76.13, 132.57, 11.3, 4.04)
pt3dadd(76.09, 132.65, 11.3, 4.04)
pt3dadd(76.06, 132.73, 11.3, 4.04)
pt3dadd(76.06, 132.81, 11.3, 4.04)
pt3dadd(75.99, 132.93, 11.3, 4.04)
pt3dadd(75.99, 133.01, 11.3, 4.04)
pt3dadd(75.96, 133.08, 11.3, 4.04)
pt3dadd(75.92, 133.16, 11.3, 4.04)
pt3dadd(75.92, 133.32, 11.3, 4.04)
pt3dadd(75.89, 133.36, 11.3, 4.04)
pt3dadd(75.85, 133.44, 11.3, 4.04)
pt3dadd(75.85, 137.32, 11.3, 4.04)
pt3dadd(75.89, 137.43, 11.3, 4.04)
pt3dadd(75.89, 137.75, 11.3, 4.04)
pt3dadd(75.92, 137.87, 11.3, 4.04)
pt3dadd(75.92, 138.07, 11.3, 4.04)
pt3dadd(75.96, 138.11, 11.3, 4.04)
pt3dadd(75.96, 138.58, 11.3, 4.04)
pt3dadd(75.99, 138.66, 11.3, 4.04)
pt3dadd(76.03, 138.74, 11.3, 4.04)
pt3dadd(76.03, 138.98, 11.3, 4.04)
pt3dadd(76.06, 139.06, 11.3, 4.04)
pt3dadd(76.06, 139.14, 11.3, 4.04)
pt3dadd(76.09, 139.18, 11.3, 4.04)
pt3dadd(76.13, 139.26, 11.3, 4.04)
pt3dadd(76.13, 139.38, 11.3, 4.04)
pt3dadd(76.16, 139.46, 11.3, 4.04)
pt3dadd(76.2, 139.49, 11.3, 4.04)
pt3dadd(76.2, 139.93, 11.3, 4.04)
pt3dadd(76.23, 140.01, 11.3, 4.04)
pt3dadd(76.23, 140.8, 11.3, 4.04)
pt3dadd(76.27, 140.64, 12.3, 3.9)
pt3dadd(76.27, 141.35, 12.3, 3.9)
pt3dadd(76.23, 141.43, 12.3, 3.9)
pt3dadd(76.23, 141.59, 12.3, 3.9)
pt3dadd(76.2, 141.67, 12.3, 3.9)
pt3dadd(76.2, 141.83, 12.3, 3.9)
pt3dadd(76.16, 141.91, 12.3, 3.9)
pt3dadd(76.16, 142.02, 12.3, 3.9)
pt3dadd(76.13, 142.15, 12.3, 3.9)
pt3dadd(76.09, 142.23, 12.3, 3.9)
pt3dadd(76.09, 142.42, 12.3, 3.9)
pt3dadd(76.06, 142.54, 12.3, 3.9)
pt3dadd(76.03, 142.62, 12.3, 3.9)
pt3dadd(76.03, 142.86, 12.3, 3.9)
pt3dadd(75.99, 142.9, 12.3, 3.9)
pt3dadd(75.99, 146.65, 12.3, 3.9)
pt3dadd(76.03, 146.74, 12.3, 3.9)
pt3dadd(76.03, 147.45, 12.3, 3.9)
pt3dadd(76.06, 147.57, 12.3, 3.9)
pt3dadd(76.06, 147.73, 12.3, 3.9)
pt3dadd(76.09, 147.8, 12.3, 3.9)
pt3dadd(76.13, 147.88, 12.3, 3.9)
pt3dadd(76.13, 148, 12.3, 3.9)
pt3dadd(76.16, 148.08, 12.3, 3.9)
pt3dadd(76.2, 148.2, 12.3, 3.9)
pt3dadd(76.23, 148.28, 12.3, 3.9)
pt3dadd(76.27, 148.4, 12.3, 3.9)
pt3dadd(76.27, 148.48, 12.3, 3.9)
pt3dadd(76.3, 148.55, 12.3, 3.9)
pt3dadd(76.3, 148.67, 12.3, 3.9)
pt3dadd(76.34, 148.75, 12.3, 3.9)
pt3dadd(76.34, 149.15, 12.3, 3.9)
pt3dadd(76.37, 149.19, 12.3, 3.9)
pt3dadd(76.37, 149.7, 12.3, 3.9)
pt3dadd(76.41, 149.82, 12.3, 3.9)
pt3dadd(76.41, 150.14, 12.3, 3.9)
pt3dadd(76.44, 149.66, 13.3, 3.9)
pt3dadd(76.44, 153.3, 13.3, 3.9)
pt3dadd(76.41, 153.42, 13.3, 3.9)
pt3dadd(76.41, 153.62, 13.3, 3.9)
pt3dadd(76.37, 153.74, 13.3, 3.9)
pt3dadd(76.37, 153.86, 13.3, 3.9)
pt3dadd(76.34, 153.94, 13.3, 3.9)
pt3dadd(76.34, 154.05, 13.3, 3.9)
pt3dadd(76.3, 154.13, 13.3, 3.9)
pt3dadd(76.27, 154.25, 13.3, 3.9)
pt3dadd(76.27, 154.37, 13.3, 3.9)
pt3dadd(76.23, 154.45, 13.3, 3.9)
pt3dadd(76.2, 154.53, 13.3, 3.9)
pt3dadd(76.2, 154.61, 13.3, 3.9)
pt3dadd(76.16, 154.69, 13.3, 3.9)
pt3dadd(76.13, 154.81, 13.3, 3.9)
pt3dadd(76.13, 154.93, 13.3, 3.9)
pt3dadd(76.09, 155.01, 13.3, 3.9)
pt3dadd(76.06, 155.09, 13.3, 3.9)
pt3dadd(76.06, 155.2, 13.3, 3.9)
pt3dadd(76.03, 155.28, 13.3, 3.9)
pt3dadd(75.99, 155.4, 13.3, 3.9)
pt3dadd(75.96, 155.52, 13.3, 3.9)
pt3dadd(75.92, 155.6, 13.3, 3.9)
pt3dadd(75.89, 155.72, 13.3, 3.9)
pt3dadd(75.85, 155.84, 13.3, 3.9)
pt3dadd(75.82, 155.91, 13.3, 3.9)
pt3dadd(75.82, 155.99, 13.3, 3.9)
pt3dadd(75.78, 156.07, 13.3, 3.9)
pt3dadd(75.78, 156.15, 13.3, 3.9)
pt3dadd(75.75, 156.27, 13.3, 3.9)
pt3dadd(75.75, 156.35, 13.3, 3.9)
pt3dadd(75.71, 156.51, 13.3, 3.9)
pt3dadd(75.71, 156.63, 13.3, 3.9)
pt3dadd(75.68, 156.67, 13.3, 3.9)
pt3dadd(75.68, 156.79, 13.3, 3.9)
pt3dadd(75.64, 156.82, 13.3, 3.9)
pt3dadd(75.64, 157.38, 13.3, 3.9)
pt3dadd(75.61, 157.46, 13.3, 3.9)
pt3dadd(75.61, 157.97, 13.3, 3.9)
pt3dadd(75.57, 158.09, 13.3, 3.9)
pt3dadd(75.57, 158.29, 13.3, 3.9)
pt3dadd(75.54, 158.37, 13.3, 3.9)
pt3dadd(75.54, 158.65, 13.3, 3.9)
pt3dadd(75.5, 158.73, 13.3, 3.9)
pt3dadd(75.5, 158.8, 13.3, 3.9)
pt3dadd(75.47, 158.88, 13.3, 3.9)
pt3dadd(75.47, 159.08, 13.3, 3.9)
pt3dadd(75.43, 159.16, 13.3, 3.9)
pt3dadd(75.4, 159.2, 13.3, 3.9)
pt3dadd(75.4, 159.36, 13.3, 3.9)
pt3dadd(75.36, 159.44, 13.3, 3.9)
pt3dadd(75.36, 159.51, 13.3, 3.9)
pt3dadd(75.33, 159.55, 13.3, 3.9)
pt3dadd(75.29, 159.63, 13.3, 3.9)
pt3dadd(75.26, 159.71, 13.3, 3.9)
pt3dadd(75.22, 159.79, 13.3, 3.9)
pt3dadd(75.19, 159.87, 13.3, 3.9)
pt3dadd(75.15, 159.91, 13.3, 3.9)
pt3dadd(75.15, 160.03, 13.3, 3.9)
pt3dadd(75.12, 160.11, 13.3, 3.9)
pt3dadd(75.08, 160.15, 13.3, 3.9)
pt3dadd(75.05, 160.23, 13.3, 3.9)
pt3dadd(75.01, 160.31, 13.3, 3.9)
pt3dadd(74.98, 160.39, 13.3, 3.9)
pt3dadd(74.94, 160.46, 13.3, 3.9)
pt3dadd(74.91, 160.54, 13.3, 3.9)
pt3dadd(74.88, 160.59, 13.3, 3.9)
pt3dadd(74.88, 160.66, 13.3, 3.9)
pt3dadd(74.84, 160.7, 13.3, 3.9)
pt3dadd(74.81, 160.78, 13.3, 3.9)
pt3dadd(74.77, 160.86, 13.3, 3.9)
pt3dadd(74.74, 160.94, 13.3, 3.9)
pt3dadd(74.7, 160.98, 13.3, 3.9)
pt3dadd(74.7, 161.02, 13.3, 3.9)
pt3dadd(74.77, 160.66, 14.3, 3.9)
pt3dadd(74.77, 160.74, 14.3, 3.9)
pt3dadd(74.7, 160.78, 14.3, 3.9)
pt3dadd(74.67, 160.9, 14.3, 3.9)
pt3dadd(74.63, 161.06, 14.3, 3.9)
pt3dadd(74.56, 161.18, 14.3, 3.9)
pt3dadd(74.53, 161.34, 14.3, 3.9)
pt3dadd(74.49, 161.46, 14.3, 3.9)
pt3dadd(74.42, 161.65, 14.3, 3.9)
pt3dadd(74.39, 161.81, 14.3, 3.9)
pt3dadd(74.35, 161.93, 14.3, 3.9)
pt3dadd(74.28, 162.05, 14.3, 3.9)
pt3dadd(74.25, 162.13, 14.3, 3.9)
pt3dadd(74.21, 162.21, 14.3, 3.9)
pt3dadd(74.18, 162.29, 14.3, 3.9)
pt3dadd(74.14, 162.37, 14.3, 3.9)
pt3dadd(74.11, 162.48, 14.3, 3.9)
pt3dadd(74.11, 162.64, 14.3, 3.9)
}
}
proc shape3d_165() {
dend[113] { pt3dadd(74.07, 162.76, 14.3, 3.9)
pt3dadd(74.04, 162.92, 14.3, 3.9)
pt3dadd(74.04, 163.15, 14.3, 3.9)
pt3dadd(74, 163.32, 14.3, 3.9)
pt3dadd(73.97, 163.43, 14.3, 3.9)
pt3dadd(73.97, 163.63, 14.3, 3.9)
pt3dadd(73.93, 163.71, 14.3, 3.9)
pt3dadd(73.93, 163.83, 14.3, 3.9)
pt3dadd(73.9, 163.91, 14.3, 3.9)
pt3dadd(73.86, 164.1, 14.3, 3.9)
pt3dadd(73.83, 164.23, 14.3, 3.9)
pt3dadd(73.83, 164.34, 14.3, 3.9)
pt3dadd(73.79, 164.46, 14.3, 3.9)
pt3dadd(73.72, 164.66, 14.3, 3.9)
pt3dadd(73.72, 164.74, 14.3, 3.9)
pt3dadd(73.69, 164.86, 14.3, 3.9)
pt3dadd(73.65, 164.94, 14.3, 3.9)
pt3dadd(73.62, 165.05, 14.3, 3.9)
pt3dadd(73.58, 165.18, 14.3, 3.9)
pt3dadd(73.55, 165.25, 14.3, 3.9)
pt3dadd(73.48, 165.41, 14.3, 3.9)
pt3dadd(73.44, 165.45, 14.3, 3.9)
pt3dadd(73.41, 165.57, 14.3, 3.9)
pt3dadd(73.38, 165.65, 14.3, 3.9)
pt3dadd(73.27, 165.77, 14.3, 3.9)
pt3dadd(73.24, 165.85, 14.3, 3.9)
pt3dadd(73.2, 165.93, 14.3, 3.9)
pt3dadd(73.17, 166.04, 14.3, 3.9)
pt3dadd(73.1, 166.13, 14.3, 3.9)
pt3dadd(73.06, 166.28, 14.3, 3.9)
pt3dadd(72.99, 166.36, 14.3, 3.9)
pt3dadd(72.96, 166.48, 14.3, 3.9)
pt3dadd(72.92, 166.56, 14.3, 3.9)
pt3dadd(72.89, 166.64, 14.3, 3.9)
pt3dadd(72.82, 166.76, 14.3, 3.9)
pt3dadd(72.79, 166.88, 14.3, 3.9)
pt3dadd(72.75, 166.96, 14.3, 3.9)
pt3dadd(72.71, 167.04, 14.3, 3.9)
pt3dadd(72.71, 167.11, 14.3, 3.9)
pt3dadd(72.68, 167.23, 14.3, 3.9)
pt3dadd(72.64, 167.31, 14.3, 3.9)
pt3dadd(72.61, 167.43, 14.3, 3.9)
pt3dadd(72.57, 167.51, 14.3, 3.9)
pt3dadd(72.57, 167.63, 14.3, 3.9)
pt3dadd(72.5, 167.79, 14.3, 3.9)
pt3dadd(72.5, 167.9, 14.3, 3.9)
pt3dadd(72.47, 168.02, 14.3, 3.9)
pt3dadd(72.47, 168.18, 14.3, 3.9)
pt3dadd(72.4, 168.3, 14.3, 3.9)
pt3dadd(72.4, 171.43, 14.3, 3.9)
pt3dadd(72.43, 171.54, 14.3, 3.9)
pt3dadd(72.43, 172.49, 14.3, 3.9)
pt3dadd(72.33, 172.38, 14.3, 3.9)
pt3dadd(72.33, 174.27, 14.3, 3.9)
pt3dadd(72.29, 174.35, 14.3, 3.9)
pt3dadd(72.29, 174.47, 14.3, 3.9)
pt3dadd(72.26, 174.55, 14.3, 3.9)
pt3dadd(72.23, 174.63, 14.3, 3.9)
pt3dadd(72.19, 174.71, 14.3, 3.9)
pt3dadd(72.16, 174.79, 14.3, 3.9)
pt3dadd(72.09, 174.91, 14.3, 3.9)
pt3dadd(72.05, 174.95, 14.3, 3.9)
pt3dadd(72.02, 175.07, 14.3, 3.9)
pt3dadd(71.98, 175.15, 14.3, 3.9)
pt3dadd(71.95, 175.23, 14.3, 3.9)
pt3dadd(71.91, 175.3, 14.3, 3.9)
pt3dadd(71.88, 175.38, 14.3, 3.9)
pt3dadd(71.81, 175.5, 14.3, 3.9)
pt3dadd(71.77, 175.58, 14.3, 3.9)
pt3dadd(71.74, 175.66, 14.3, 3.9)
pt3dadd(71.71, 175.74, 14.3, 3.9)
pt3dadd(71.67, 175.82, 14.3, 3.9)
pt3dadd(71.64, 175.9, 14.3, 3.9)
pt3dadd(71.6, 175.98, 14.3, 3.9)
pt3dadd(71.57, 176.05, 14.3, 3.9)
pt3dadd(71.53, 176.18, 14.3, 3.9)
pt3dadd(71.53, 176.33, 14.3, 3.9)
pt3dadd(71.5, 176.45, 14.3, 3.9)
pt3dadd(71.46, 176.53, 14.3, 3.9)
pt3dadd(71.46, 176.85, 14.3, 3.9)
pt3dadd(71.43, 176.93, 14.3, 3.9)
pt3dadd(71.43, 177.32, 14.3, 3.9)
pt3dadd(71.39, 177.48, 14.3, 3.9)
pt3dadd(71.39, 179.34, 14.3, 3.9)
pt3dadd(71.36, 179.46, 14.3, 3.9)
pt3dadd(71.36, 179.82, 14.3, 3.9)
pt3dadd(71.32, 179.93, 14.3, 3.9)
pt3dadd(71.29, 180.17, 14.3, 3.9)
pt3dadd(71.29, 180.37, 14.3, 3.9)
pt3dadd(71.25, 180.49, 14.3, 3.9)
pt3dadd(71.25, 180.61, 14.3, 3.9)
pt3dadd(71.21, 180.68, 14.3, 3.9)
pt3dadd(71.18, 180.84, 14.3, 3.9)
pt3dadd(71.18, 181.04, 14.3, 3.9)
pt3dadd(71.15, 181.16, 14.3, 3.9)
pt3dadd(71.11, 181.24, 14.3, 3.9)
pt3dadd(71.08, 181.36, 14.3, 3.9)
pt3dadd(71.08, 181.48, 14.3, 3.9)
pt3dadd(71.04, 181.55, 14.3, 3.9)
pt3dadd(71.01, 181.68, 14.3, 3.9)
pt3dadd(70.97, 181.83, 14.3, 3.9)
pt3dadd(70.94, 181.91, 14.3, 3.9)
pt3dadd(70.9, 182.03, 14.3, 3.9)
pt3dadd(70.9, 182.19, 14.3, 3.9)
pt3dadd(70.87, 182.27, 14.3, 3.9)
pt3dadd(70.87, 182.39, 14.3, 3.9)
pt3dadd(70.83, 182.51, 14.3, 3.9)
pt3dadd(70.83, 182.59, 14.3, 3.9)
pt3dadd(70.8, 182.66, 14.3, 3.9)
pt3dadd(70.8, 182.82, 14.3, 3.9)
pt3dadd(70.76, 182.9, 14.3, 3.9)
pt3dadd(70.76, 183.02, 14.3, 3.9)
pt3dadd(70.73, 183.1, 14.3, 3.9)
pt3dadd(70.73, 183.14, 14.3, 3.9)
pt3dadd(70.73, 182.94, 14.3, 3.9)
pt3dadd(70.69, 182.98, 14.3, 3.9)
pt3dadd(70.69, 184.84, 14.3, 3.9)
pt3dadd(70.73, 185, 14.3, 3.9)
pt3dadd(70.73, 185.24, 14.3, 3.9)
pt3dadd(70.76, 185.32, 14.3, 3.9)
pt3dadd(70.8, 185.43, 14.3, 3.9)
pt3dadd(70.8, 185.63, 14.3, 3.9)
pt3dadd(70.83, 185.71, 14.3, 3.9)
pt3dadd(70.83, 185.91, 14.3, 3.9)
pt3dadd(70.87, 186.03, 14.3, 3.9)
pt3dadd(70.87, 186.18, 14.3, 3.9)
pt3dadd(70.9, 186.3, 14.3, 3.9)
pt3dadd(70.9, 186.46, 14.3, 3.9)
pt3dadd(70.94, 186.58, 14.3, 3.9)
pt3dadd(70.97, 186.74, 14.3, 3.9)
pt3dadd(71.01, 186.82, 14.3, 3.9)
pt3dadd(71.04, 186.94, 14.3, 3.9)
pt3dadd(71.04, 187.33, 14.3, 3.9)
pt3dadd(71.08, 187.41, 14.3, 3.9)
pt3dadd(71.08, 187.57, 14.3, 3.9)
pt3dadd(71.11, 187.69, 14.3, 3.9)
pt3dadd(71.18, 187.81, 14.3, 3.9)
pt3dadd(71.21, 187.89, 14.3, 3.9)
pt3dadd(71.29, 188.01, 14.3, 3.9)
pt3dadd(71.29, 188.13, 14.3, 3.9)
pt3dadd(71.36, 188.32, 14.3, 3.9)
pt3dadd(71.43, 188.4, 14.3, 3.9)
pt3dadd(71.43, 188.56, 14.3, 3.9)
pt3dadd(71.46, 188.6, 14.3, 3.9)
pt3dadd(71.46, 188.84, 14.3, 3.9)
pt3dadd(71.5, 188.88, 14.3, 3.9)
pt3dadd(71.5, 189.79, 14.3, 3.9)
pt3dadd(71.46, 189.55, 15.3, 3.9)
pt3dadd(71.46, 189.67, 15.3, 3.9)
pt3dadd(71.43, 189.75, 15.3, 3.9)
pt3dadd(71.43, 189.87, 15.3, 3.9)
pt3dadd(71.39, 190.02, 15.3, 3.9)
pt3dadd(71.36, 190.06, 15.3, 3.9)
pt3dadd(71.32, 190.18, 15.3, 3.9)
pt3dadd(71.29, 190.26, 15.3, 3.9)
pt3dadd(71.29, 190.34, 15.3, 3.9)
pt3dadd(71.25, 190.42, 15.3, 3.9)
pt3dadd(71.21, 190.5, 15.3, 3.9)
pt3dadd(71.18, 190.54, 15.3, 3.9)
pt3dadd(71.18, 190.62, 15.3, 3.9)
pt3dadd(71.15, 190.7, 15.3, 3.9)
pt3dadd(71.15, 190.77, 15.3, 3.9)
pt3dadd(71.11, 190.93, 15.3, 3.9)
pt3dadd(71.08, 191.01, 15.3, 3.9)
pt3dadd(71.04, 191.13, 15.3, 3.9)
pt3dadd(71.01, 191.21, 15.3, 3.9)
pt3dadd(70.97, 191.29, 15.3, 3.9)
pt3dadd(70.97, 191.37, 15.3, 3.9)
pt3dadd(70.94, 191.45, 15.3, 3.9)
pt3dadd(70.87, 191.57, 15.3, 3.9)
pt3dadd(70.8, 191.65, 15.3, 3.9)
pt3dadd(70.76, 191.73, 15.3, 3.9)
pt3dadd(70.73, 191.8, 15.3, 3.9)
pt3dadd(70.66, 191.88, 15.3, 3.9)
pt3dadd(70.63, 191.96, 15.3, 3.9)
pt3dadd(70.59, 192.08, 15.3, 3.9)
pt3dadd(70.56, 192.16, 15.3, 3.9)
pt3dadd(70.49, 192.24, 15.3, 3.9)
pt3dadd(70.45, 192.36, 15.3, 3.9)
pt3dadd(70.42, 192.44, 15.3, 3.9)
pt3dadd(70.38, 192.52, 15.3, 3.9)
pt3dadd(70.35, 192.56, 15.3, 3.9)
pt3dadd(70.31, 192.63, 15.3, 3.9)
pt3dadd(70.24, 192.71, 15.3, 3.9)
pt3dadd(70.21, 192.83, 15.3, 3.9)
pt3dadd(70.14, 192.91, 15.3, 3.9)
pt3dadd(70.1, 192.99, 15.3, 3.9)
pt3dadd(70.07, 193.07, 15.3, 3.9)
pt3dadd(70.03, 193.15, 15.3, 3.9)
pt3dadd(70.03, 193.23, 15.3, 3.9)
pt3dadd(70, 193.27, 15.3, 3.9)
pt3dadd(69.96, 193.35, 15.3, 3.9)
pt3dadd(69.89, 193.47, 15.3, 3.9)
pt3dadd(69.86, 193.54, 15.3, 3.9)
pt3dadd(69.82, 193.63, 15.3, 3.9)
pt3dadd(69.79, 193.71, 15.3, 3.9)
pt3dadd(69.75, 193.78, 15.3, 3.9)
pt3dadd(69.72, 193.86, 15.3, 3.9)
pt3dadd(69.68, 193.98, 15.3, 3.9)
pt3dadd(69.65, 194.06, 15.3, 3.9)
}
}
proc shape3d_166() {
dend[113] { pt3dadd(69.61, 194.14, 15.3, 3.9)
pt3dadd(69.61, 194.26, 15.3, 3.9)
pt3dadd(69.54, 194.3, 15.3, 3.9)
pt3dadd(69.54, 194.46, 15.3, 3.9)
pt3dadd(69.51, 194.57, 15.3, 3.9)
pt3dadd(69.47, 194.62, 15.3, 3.9)
pt3dadd(69.44, 194.77, 15.3, 3.9)
pt3dadd(69.4, 194.89, 15.3, 3.9)
pt3dadd(69.37, 195.01, 15.3, 3.9)
pt3dadd(69.33, 195.13, 15.3, 3.9)
pt3dadd(69.3, 195.21, 15.3, 3.9)
pt3dadd(69.26, 195.32, 15.3, 3.9)
pt3dadd(69.23, 195.45, 15.3, 3.9)
pt3dadd(69.16, 195.64, 15.3, 3.9)
pt3dadd(69.13, 195.76, 15.3, 3.9)
pt3dadd(69.09, 195.92, 15.3, 3.9)
pt3dadd(69.06, 196.08, 15.3, 3.9)
pt3dadd(69.02, 196.24, 15.3, 3.9)
pt3dadd(68.99, 196.4, 15.3, 3.9)
pt3dadd(68.95, 196.51, 15.3, 3.9)
pt3dadd(68.95, 196.67, 15.3, 3.9)
pt3dadd(68.92, 196.87, 15.3, 3.9)
pt3dadd(68.88, 197.03, 15.3, 3.9)
pt3dadd(68.85, 197.18, 15.3, 3.9)
pt3dadd(68.81, 197.38, 15.3, 3.9)
pt3dadd(68.81, 197.5, 15.3, 3.9)
pt3dadd(68.78, 197.66, 15.3, 3.9)
pt3dadd(68.74, 197.78, 15.3, 3.9)
pt3dadd(68.74, 197.94, 15.3, 3.9)
pt3dadd(68.71, 198.06, 15.3, 3.9)
pt3dadd(68.71, 198.13, 15.3, 3.9)
pt3dadd(68.67, 198.26, 15.3, 3.9)
pt3dadd(68.67, 198.33, 15.3, 3.9)
pt3dadd(68.64, 198.49, 15.3, 3.9)
pt3dadd(68.64, 198.61, 15.3, 3.9)
pt3dadd(68.6, 198.69, 15.3, 3.9)
pt3dadd(68.6, 198.81, 15.3, 3.9)
pt3dadd(68.57, 198.93, 15.3, 3.9)
pt3dadd(68.57, 199.04, 15.3, 3.9)
pt3dadd(68.53, 199.16, 15.3, 3.9)
pt3dadd(68.53, 199.36, 15.3, 3.9)
pt3dadd(68.5, 199.44, 15.3, 3.9)
pt3dadd(68.5, 200.99, 15.3, 3.9)
pt3dadd(68.46, 201.02, 15.3, 3.9)
pt3dadd(68.46, 201.14, 15.3, 3.9)
pt3dadd(68.39, 200.95, 16.3, 3.9)
pt3dadd(68.43, 201.02, 16.3, 3.9)
pt3dadd(68.43, 202.21, 16.3, 3.9)
pt3dadd(68.39, 202.29, 16.3, 3.9)
pt3dadd(68.39, 202.49, 16.3, 3.9)
pt3dadd(68.36, 202.53, 16.3, 3.9)
pt3dadd(68.32, 202.61, 16.3, 3.9)
pt3dadd(68.32, 202.76, 16.3, 3.9)
pt3dadd(68.29, 202.85, 16.3, 3.9)
pt3dadd(68.29, 202.96, 16.3, 3.9)
pt3dadd(68.25, 203.04, 16.3, 3.9)
pt3dadd(68.22, 203.12, 16.3, 3.9)
pt3dadd(68.22, 203.2, 16.3, 3.9)
pt3dadd(68.18, 203.28, 16.3, 3.9)
pt3dadd(68.15, 203.36, 16.3, 3.9)
pt3dadd(68.11, 203.44, 16.3, 3.9)
pt3dadd(68.11, 203.56, 16.3, 3.9)
pt3dadd(68.08, 203.6, 16.3, 3.9)
pt3dadd(68.04, 203.68, 16.3, 3.9)
pt3dadd(68.04, 203.76, 16.3, 3.9)
pt3dadd(68.01, 203.83, 16.3, 3.9)
pt3dadd(67.97, 203.91, 16.3, 3.9)
pt3dadd(67.94, 203.99, 16.3, 3.9)
pt3dadd(67.91, 204.07, 16.3, 3.9)
pt3dadd(67.91, 204.15, 16.3, 3.9)
pt3dadd(67.87, 204.23, 16.3, 3.9)
pt3dadd(67.84, 204.31, 16.3, 3.9)
pt3dadd(67.77, 204.39, 16.3, 3.9)
pt3dadd(67.77, 204.47, 16.3, 3.9)
pt3dadd(67.7, 204.54, 16.3, 3.9)
pt3dadd(67.7, 204.63, 16.3, 3.9)
pt3dadd(67.63, 204.74, 16.3, 3.9)
pt3dadd(67.59, 204.82, 16.3, 3.9)
pt3dadd(67.52, 204.98, 16.3, 3.9)
pt3dadd(67.45, 205.1, 16.3, 3.9)
pt3dadd(67.35, 205.22, 16.3, 3.9)
pt3dadd(67.32, 205.26, 16.3, 3.9)
pt3dadd(67.11, 205.49, 16.3, 3.9)
pt3dadd(67.07, 205.54, 16.3, 3.9)
pt3dadd(67, 205.62, 16.3, 3.9)
pt3dadd(66.93, 205.65, 16.3, 3.9)
pt3dadd(66.83, 205.77, 16.3, 3.9)
pt3dadd(66.76, 205.81, 16.3, 3.9)
pt3dadd(66.58, 206.01, 16.3, 3.9)
pt3dadd(66.55, 206.09, 16.3, 3.9)
pt3dadd(66.51, 206.13, 16.3, 3.9)
pt3dadd(66.48, 206.17, 16.3, 3.9)
pt3dadd(66.37, 206.29, 16.3, 3.9)
pt3dadd(66.34, 206.33, 16.3, 3.9)
pt3dadd(66.27, 206.4, 16.3, 3.9)
pt3dadd(66.2, 206.52, 16.3, 3.9)
pt3dadd(66.17, 206.57, 16.3, 3.9)
pt3dadd(66.13, 206.64, 16.3, 3.9)
pt3dadd(66.03, 206.72, 16.3, 3.9)
pt3dadd(65.96, 206.88, 16.3, 3.9)
pt3dadd(65.92, 207, 16.3, 3.9)
pt3dadd(65.85, 207.08, 16.3, 3.9)
pt3dadd(65.82, 207.16, 16.3, 3.9)
pt3dadd(65.78, 207.24, 16.3, 3.9)
pt3dadd(65.71, 207.35, 16.3, 3.9)
pt3dadd(65.68, 207.4, 16.3, 3.9)
pt3dadd(65.61, 207.55, 16.3, 3.9)
pt3dadd(65.57, 207.59, 16.3, 3.9)
pt3dadd(65.5, 207.67, 16.3, 3.9)
pt3dadd(65.43, 207.75, 16.3, 3.9)
pt3dadd(65.4, 207.79, 16.3, 3.9)
pt3dadd(65.36, 207.83, 16.3, 3.9)
pt3dadd(65.33, 207.91, 16.3, 3.9)
pt3dadd(65.29, 207.95, 16.3, 3.9)
pt3dadd(65.29, 208.03, 16.3, 3.9)
pt3dadd(65.26, 208.07, 16.3, 3.9)
pt3dadd(65.19, 208.03, 17.3, 3.9)
pt3dadd(65.15, 208.07, 17.3, 3.9)
pt3dadd(65.12, 208.11, 17.3, 3.9)
pt3dadd(65.05, 208.18, 17.3, 3.9)
pt3dadd(65.01, 208.23, 17.3, 3.9)
pt3dadd(64.98, 208.3, 17.3, 3.9)
pt3dadd(64.94, 208.42, 17.3, 3.9)
pt3dadd(64.88, 208.5, 17.3, 3.9)
pt3dadd(64.81, 208.7, 17.3, 3.9)
pt3dadd(64.77, 208.82, 17.3, 3.9)
pt3dadd(64.74, 208.94, 17.3, 3.9)
pt3dadd(64.67, 209.06, 17.3, 3.9)
pt3dadd(64.63, 209.13, 17.3, 3.9)
pt3dadd(64.6, 209.29, 17.3, 3.9)
pt3dadd(64.53, 209.45, 17.3, 3.9)
pt3dadd(64.49, 209.53, 17.3, 3.9)
pt3dadd(64.46, 209.65, 17.3, 3.9)
pt3dadd(64.39, 209.81, 17.3, 3.9)
pt3dadd(64.28, 210.01, 17.3, 3.9)
pt3dadd(64.28, 210.09, 17.3, 3.9)
pt3dadd(64.21, 210.21, 17.3, 3.9)
pt3dadd(64.18, 210.28, 17.3, 3.9)
pt3dadd(64.14, 210.36, 17.3, 3.9)
pt3dadd(64.11, 210.44, 17.3, 3.9)
pt3dadd(64.11, 210.52, 17.3, 3.9)
pt3dadd(64.07, 210.64, 17.3, 3.9)
pt3dadd(64, 210.76, 17.3, 3.9)
pt3dadd(63.97, 210.88, 17.3, 3.9)
pt3dadd(63.9, 211.04, 17.3, 3.9)
pt3dadd(63.83, 211.15, 17.3, 3.9)
pt3dadd(63.79, 211.23, 17.3, 3.9)
pt3dadd(63.76, 211.35, 17.3, 3.9)
pt3dadd(63.72, 211.47, 17.3, 3.9)
pt3dadd(63.69, 211.55, 17.3, 3.9)
pt3dadd(63.65, 211.67, 17.3, 3.9)
pt3dadd(63.62, 211.75, 17.3, 3.9)
pt3dadd(63.59, 211.83, 17.3, 3.9)
pt3dadd(63.52, 211.99, 17.3, 3.9)
pt3dadd(63.48, 212.07, 17.3, 3.9)
pt3dadd(63.45, 212.14, 17.3, 3.9)
pt3dadd(63.45, 212.26, 17.3, 3.9)
pt3dadd(63.41, 212.3, 17.3, 3.9)
pt3dadd(63.38, 212.42, 17.3, 3.9)
pt3dadd(63.38, 212.5, 17.3, 3.9)
pt3dadd(63.34, 212.66, 17.3, 3.9)
pt3dadd(63.31, 212.74, 17.3, 3.9)
pt3dadd(63.27, 212.85, 17.3, 3.9)
pt3dadd(63.24, 212.98, 17.3, 3.9)
pt3dadd(63.24, 213.05, 17.3, 3.9)
pt3dadd(63.2, 213.17, 17.3, 3.9)
pt3dadd(63.17, 213.25, 17.3, 3.9)
pt3dadd(63.13, 213.37, 17.3, 3.9)
pt3dadd(63.13, 213.57, 17.3, 3.9)
pt3dadd(63.1, 213.65, 17.3, 3.9)
pt3dadd(63.06, 213.76, 17.3, 3.9)
pt3dadd(63.06, 213.85, 17.3, 3.9)
pt3dadd(63.03, 213.93, 17.3, 3.9)
pt3dadd(63.03, 214.08, 17.3, 3.9)
pt3dadd(62.99, 214.16, 17.3, 3.9)
pt3dadd(62.96, 214.24, 17.3, 3.9)
pt3dadd(62.96, 214.36, 17.3, 3.9)
pt3dadd(62.92, 214.4, 17.3, 3.9)
pt3dadd(62.89, 214.52, 17.3, 3.9)
pt3dadd(62.89, 214.63, 17.3, 3.9)
pt3dadd(62.85, 214.76, 17.3, 3.9)
pt3dadd(62.82, 214.84, 17.3, 3.9)
pt3dadd(62.78, 214.99, 17.3, 3.9)
pt3dadd(62.75, 215.11, 17.3, 3.9)
pt3dadd(62.75, 215.27, 17.3, 3.9)
pt3dadd(62.72, 215.35, 17.3, 3.9)
pt3dadd(62.68, 215.47, 17.3, 3.9)
pt3dadd(62.68, 215.59, 17.3, 3.9)
pt3dadd(62.65, 215.66, 17.3, 3.9)
pt3dadd(62.61, 215.71, 17.3, 3.9)
pt3dadd(62.61, 215.82, 17.3, 3.9)
pt3dadd(62.58, 215.9, 17.3, 3.9)
pt3dadd(62.72, 215.71, 18.3, 3.9)
pt3dadd(62.68, 215.74, 18.3, 3.9)
pt3dadd(62.65, 215.78, 18.3, 3.9)
pt3dadd(62.61, 215.82, 18.3, 3.9)
pt3dadd(62.54, 215.86, 18.3, 3.9)
pt3dadd(62.51, 215.94, 18.3, 3.9)
pt3dadd(62.47, 216.02, 18.3, 3.9)
pt3dadd(62.4, 216.14, 18.3, 3.9)
}
}
proc shape3d_167() {
dend[113] { pt3dadd(62.33, 216.22, 18.3, 3.9)
pt3dadd(62.26, 216.38, 18.3, 3.9)
pt3dadd(62.23, 216.49, 18.3, 3.9)
pt3dadd(62.16, 216.57, 18.3, 3.9)
pt3dadd(62.12, 216.69, 18.3, 3.9)
pt3dadd(62.09, 216.77, 18.3, 3.9)
pt3dadd(62.05, 216.85, 18.3, 3.9)
pt3dadd(62.02, 216.93, 18.3, 3.9)
pt3dadd(61.99, 216.97, 18.3, 3.9)
pt3dadd(61.95, 217.09, 18.3, 3.9)
pt3dadd(61.88, 217.17, 18.3, 3.9)
pt3dadd(61.85, 217.25, 18.3, 3.9)
pt3dadd(61.78, 217.37, 18.3, 3.9)
pt3dadd(61.74, 217.45, 18.3, 3.9)
pt3dadd(61.71, 217.52, 18.3, 3.9)
pt3dadd(61.67, 217.6, 18.3, 3.9)
pt3dadd(61.63, 217.68, 18.3, 3.9)
pt3dadd(61.6, 217.76, 18.3, 3.9)
pt3dadd(61.53, 217.88, 18.3, 3.9)
pt3dadd(61.5, 217.96, 18.3, 3.9)
pt3dadd(61.5, 218.08, 18.3, 3.9)
pt3dadd(61.46, 218.2, 18.3, 3.9)
pt3dadd(61.43, 218.32, 18.3, 3.9)
pt3dadd(61.39, 218.48, 18.3, 3.9)
pt3dadd(61.36, 218.55, 18.3, 3.9)
pt3dadd(61.32, 218.71, 18.3, 3.9)
pt3dadd(61.29, 218.87, 18.3, 3.9)
pt3dadd(61.25, 219.03, 18.3, 3.9)
pt3dadd(61.25, 219.19, 18.3, 3.9)
pt3dadd(61.22, 219.35, 18.3, 3.9)
pt3dadd(61.18, 219.46, 18.3, 3.9)
pt3dadd(61.15, 219.62, 18.3, 3.9)
pt3dadd(61.15, 220.02, 18.3, 3.9)
pt3dadd(61.11, 220.13, 18.3, 3.9)
pt3dadd(61.11, 220.89, 18.3, 3.9)
pt3dadd(61.08, 220.97, 18.3, 3.9)
pt3dadd(61.08, 221.32, 18.3, 3.9)
pt3dadd(61.04, 221.44, 18.3, 3.9)
pt3dadd(61.04, 221.52, 18.3, 3.9)
pt3dadd(61.01, 221.64, 18.3, 3.9)
pt3dadd(61.01, 221.88, 18.3, 3.9)
pt3dadd(60.97, 221.99, 18.3, 3.9)
pt3dadd(60.97, 222.15, 18.3, 3.9)
pt3dadd(60.94, 222.27, 18.3, 3.9)
pt3dadd(60.94, 222.35, 18.3, 3.9)
pt3dadd(60.9, 222.51, 18.3, 3.9)
pt3dadd(60.87, 222.59, 18.3, 3.9)
pt3dadd(60.87, 222.71, 18.3, 3.9)
pt3dadd(60.83, 222.75, 18.3, 3.9)
pt3dadd(60.83, 222.9, 18.3, 3.9)
pt3dadd(60.8, 222.99, 18.3, 3.9)
pt3dadd(60.8, 223.1, 18.3, 3.9)
pt3dadd(60.76, 223.18, 18.3, 3.9)
pt3dadd(60.76, 223.34, 18.3, 3.9)
pt3dadd(60.73, 223.42, 18.3, 3.9)
pt3dadd(60.73, 223.58, 18.3, 3.9)
pt3dadd(60.69, 223.66, 18.3, 3.9)
pt3dadd(60.69, 224.01, 18.3, 3.9)
pt3dadd(60.66, 224.09, 18.3, 3.9)
pt3dadd(60.66, 225.71, 18.3, 3.9)
pt3dadd(60.69, 225.76, 18.3, 3.9)
pt3dadd(60.73, 225.84, 18.3, 3.9)
pt3dadd(60.76, 225.88, 18.3, 3.9)
pt3dadd(60.8, 225.95, 18.3, 3.9)
pt3dadd(60.8, 226.19, 18.3, 3.9)
pt3dadd(60.69, 225.48, 19.3, 3.9)
pt3dadd(60.69, 225.88, 19.3, 3.9)
pt3dadd(60.76, 225.95, 19.3, 3.9)
pt3dadd(60.8, 226.07, 19.3, 3.9)
pt3dadd(60.8, 231.34, 19.3, 3.9)
pt3dadd(60.76, 231.14, 20.3, 3.9)
pt3dadd(60.76, 231.53, 20.3, 3.9)
pt3dadd(60.73, 231.61, 20.3, 3.9)
pt3dadd(60.66, 231.69, 20.3, 3.9)
pt3dadd(60.63, 231.77, 20.3, 3.9)
pt3dadd(60.59, 231.89, 20.3, 3.9)
pt3dadd(60.52, 231.97, 20.3, 3.9)
pt3dadd(60.45, 232.13, 20.3, 3.9)
pt3dadd(60.42, 232.21, 20.3, 3.9)
pt3dadd(60.38, 232.32, 20.3, 3.9)
pt3dadd(60.31, 232.44, 20.3, 3.9)
pt3dadd(60.24, 232.56, 20.3, 3.9)
pt3dadd(60.21, 232.64, 20.3, 3.9)
pt3dadd(60.17, 232.72, 20.3, 3.9)
pt3dadd(60.14, 232.8, 20.3, 3.9)
pt3dadd(60.03, 232.92, 20.3, 3.9)
pt3dadd(60, 233.04, 20.3, 3.9)
pt3dadd(59.96, 233.15, 20.3, 3.9)
pt3dadd(59.83, 233.35, 20.3, 3.9)
pt3dadd(59.79, 233.43, 20.3, 3.9)
pt3dadd(59.72, 233.55, 20.3, 3.9)
pt3dadd(59.69, 233.63, 20.3, 3.9)
pt3dadd(59.62, 233.75, 20.3, 3.9)
pt3dadd(59.54, 233.87, 20.3, 3.9)
pt3dadd(59.47, 233.99, 20.3, 3.9)
pt3dadd(59.4, 234.1, 20.3, 3.9)
pt3dadd(59.37, 234.18, 20.3, 3.9)
pt3dadd(59.3, 234.26, 20.3, 3.9)
pt3dadd(59.23, 234.34, 20.3, 3.9)
pt3dadd(59.06, 234.54, 20.3, 3.9)
pt3dadd(58.99, 234.62, 20.3, 3.9)
pt3dadd(58.92, 234.7, 20.3, 3.9)
pt3dadd(58.85, 234.78, 20.3, 3.9)
pt3dadd(58.81, 234.82, 20.3, 3.9)
pt3dadd(58.78, 234.9, 20.3, 3.9)
pt3dadd(58.71, 234.93, 20.3, 3.9)
pt3dadd(58.64, 234.98, 20.3, 3.9)
pt3dadd(58.6, 235.05, 20.3, 3.9)
pt3dadd(58.53, 235.09, 20.3, 3.9)
pt3dadd(58.5, 235.17, 20.3, 3.9)
pt3dadd(58.43, 235.21, 20.3, 3.9)
pt3dadd(58.4, 235.29, 20.3, 3.9)
pt3dadd(58.33, 235.33, 20.3, 3.9)
pt3dadd(58.29, 235.37, 20.3, 3.9)
pt3dadd(58.29, 235.45, 20.3, 3.9)
pt3dadd(58.26, 235.49, 20.3, 3.9)
pt3dadd(58.22, 235.53, 20.3, 3.9)
pt3dadd(58.57, 235.21, 22.3, 3.9)
pt3dadd(58.53, 235.29, 22.3, 3.9)
pt3dadd(58.5, 235.33, 22.3, 3.9)
pt3dadd(58.43, 235.49, 22.3, 3.9)
pt3dadd(58.33, 235.65, 22.3, 3.9)
pt3dadd(58.22, 235.85, 22.3, 3.9)
pt3dadd(58.12, 236.04, 22.3, 3.9)
pt3dadd(58.05, 236.12, 22.3, 3.9)
pt3dadd(58.01, 236.24, 22.3, 3.9)
pt3dadd(57.98, 236.32, 22.3, 3.9)
pt3dadd(57.87, 236.48, 22.3, 3.9)
pt3dadd(57.84, 236.56, 22.3, 3.9)
pt3dadd(57.8, 236.68, 22.3, 3.9)
pt3dadd(57.73, 236.79, 22.3, 3.9)
pt3dadd(57.7, 236.88, 22.3, 3.9)
pt3dadd(57.6, 236.95, 22.3, 3.9)
pt3dadd(57.49, 237.15, 22.3, 3.9)
pt3dadd(57.46, 237.23, 22.3, 3.9)
pt3dadd(57.35, 237.31, 22.3, 3.9)
pt3dadd(57.24, 237.51, 22.3, 3.9)
pt3dadd(57.18, 237.59, 22.3, 3.9)
pt3dadd(57.11, 237.74, 22.3, 3.9)
pt3dadd(57.04, 237.86, 22.3, 3.9)
pt3dadd(56.97, 237.94, 22.3, 3.9)
pt3dadd(56.9, 238.02, 22.3, 3.9)
pt3dadd(56.79, 238.22, 22.3, 3.9)
pt3dadd(56.72, 238.3, 22.3, 3.9)
pt3dadd(56.62, 238.5, 22.3, 3.9)
pt3dadd(56.55, 238.57, 22.3, 3.9)
pt3dadd(56.48, 238.7, 22.3, 3.9)
pt3dadd(56.41, 238.81, 22.3, 3.9)
pt3dadd(56.34, 238.89, 22.3, 3.9)
pt3dadd(56.24, 239.09, 22.3, 3.9)
pt3dadd(56.2, 239.13, 22.3, 3.9)
pt3dadd(56.13, 239.25, 22.3, 3.9)
pt3dadd(56.06, 239.33, 22.3, 3.9)
pt3dadd(55.99, 239.41, 22.3, 3.9)
pt3dadd(55.96, 239.49, 22.3, 3.9)
pt3dadd(55.92, 239.57, 22.3, 3.9)
pt3dadd(55.85, 239.65, 22.3, 3.9)
pt3dadd(55.82, 239.68, 22.3, 3.9)
pt3dadd(55.68, 239.84, 22.3, 3.9)
pt3dadd(55.64, 239.88, 22.3, 3.9)
pt3dadd(55.61, 239.92, 22.3, 3.9)
pt3dadd(55.54, 240, 22.3, 3.9)
pt3dadd(55.47, 240.04, 22.3, 3.9)
pt3dadd(55.4, 240.12, 22.3, 3.9)
pt3dadd(55.33, 240.16, 22.3, 3.9)
pt3dadd(55.26, 240.2, 22.3, 3.9)
pt3dadd(55.19, 240.24, 22.3, 3.9)
pt3dadd(55.12, 240.28, 22.3, 3.9)
pt3dadd(55.08, 240.35, 22.3, 3.9)
pt3dadd(55.02, 240.43, 22.3, 3.9)
pt3dadd(54.95, 240.48, 22.3, 3.9)
pt3dadd(54.88, 240.51, 22.3, 3.9)
pt3dadd(54.81, 240.59, 22.3, 3.9)
pt3dadd(54.74, 240.63, 22.3, 3.9)
pt3dadd(54.67, 240.67, 22.3, 3.9)
pt3dadd(54.6, 240.75, 22.3, 3.9)
pt3dadd(54.56, 240.79, 22.3, 3.9)
pt3dadd(54.49, 240.83, 22.3, 3.9)
pt3dadd(54.42, 240.91, 22.3, 3.9)
pt3dadd(54.35, 240.91, 22.3, 3.9)
pt3dadd(54.32, 240.95, 22.3, 3.9)
pt3dadd(54.28, 240.99, 22.3, 3.9)
pt3dadd(54.22, 241.07, 22.3, 3.9)
pt3dadd(54.15, 241.11, 22.3, 3.9)
pt3dadd(54.15, 241.19, 22.3, 3.9)
pt3dadd(54.08, 241.19, 22.3, 3.9)
pt3dadd(54.04, 241.27, 22.3, 3.9)
pt3dadd(54.01, 241.3, 22.3, 3.9)
pt3dadd(53.94, 241.35, 22.3, 3.9)
pt3dadd(53.9, 241.38, 22.3, 3.9)
pt3dadd(54.22, 241.15, 25.3, 3.9)
pt3dadd(54.18, 241.19, 25.3, 3.9)
pt3dadd(54.15, 241.23, 25.3, 3.9)
pt3dadd(54.08, 241.27, 25.3, 3.9)
pt3dadd(54.04, 241.35, 25.3, 3.9)
pt3dadd(54.01, 241.38, 25.3, 3.9)
pt3dadd(53.97, 241.46, 25.3, 3.9)
pt3dadd(53.87, 241.58, 25.3, 3.9)
pt3dadd(53.83, 241.62, 25.3, 3.9)
pt3dadd(53.8, 241.7, 25.3, 3.9)
}
}
proc shape3d_168() {
dend[113] { pt3dadd(53.76, 241.74, 25.3, 3.9)
pt3dadd(53.73, 241.78, 25.3, 3.9)
pt3dadd(53.69, 241.86, 25.3, 3.9)
pt3dadd(53.66, 241.98, 25.3, 3.9)
pt3dadd(53.59, 242.06, 25.3, 3.9)
pt3dadd(53.55, 242.18, 25.3, 3.9)
pt3dadd(53.48, 242.29, 25.3, 3.9)
pt3dadd(53.45, 242.38, 25.3, 3.9)
pt3dadd(53.38, 242.45, 25.3, 3.9)
pt3dadd(53.35, 242.57, 25.3, 3.9)
pt3dadd(53.31, 242.69, 25.3, 3.9)
pt3dadd(53.28, 242.77, 25.3, 3.9)
pt3dadd(53.24, 242.85, 25.3, 3.9)
pt3dadd(53.21, 242.93, 25.3, 3.9)
pt3dadd(53.17, 243.01, 25.3, 3.9)
pt3dadd(53.17, 243.13, 25.3, 3.9)
pt3dadd(53.13, 243.21, 25.3, 3.9)
pt3dadd(53.13, 246.85, 25.3, 3.9)
pt3dadd(53.21, 246.73, 28.3, 3.9)
pt3dadd(53.21, 247.16, 28.3, 3.9)
pt3dadd(53.17, 247.32, 28.3, 3.9)
pt3dadd(53.17, 247.4, 28.3, 3.9)
pt3dadd(53.13, 247.52, 28.3, 3.9)
pt3dadd(53.13, 247.79, 28.3, 3.9)
pt3dadd(53.1, 247.88, 28.3, 3.9)
pt3dadd(53.06, 247.99, 28.3, 3.9)
pt3dadd(53.06, 248.11, 28.3, 3.9)
pt3dadd(53.03, 248.19, 28.3, 3.9)
pt3dadd(52.99, 248.31, 28.3, 3.9)
pt3dadd(52.96, 248.43, 28.3, 3.9)
pt3dadd(52.92, 248.55, 28.3, 3.9)
pt3dadd(52.86, 248.71, 28.3, 3.9)
pt3dadd(52.82, 248.79, 28.3, 3.9)
pt3dadd(52.79, 248.9, 28.3, 3.9)
pt3dadd(52.75, 248.98, 28.3, 3.9)
pt3dadd(52.72, 249.06, 28.3, 3.9)
pt3dadd(52.68, 249.18, 28.3, 3.9)
pt3dadd(52.68, 249.3, 28.3, 3.9)
pt3dadd(52.61, 249.38, 28.3, 3.9)
pt3dadd(52.58, 249.5, 28.3, 3.9)
pt3dadd(52.58, 249.62, 28.3, 3.9)
pt3dadd(52.54, 249.74, 28.3, 3.9)
pt3dadd(52.51, 249.85, 28.3, 3.9)
pt3dadd(52.47, 250.01, 28.3, 3.9)
pt3dadd(52.4, 250.13, 28.3, 3.9)
pt3dadd(52.37, 250.29, 28.3, 3.9)
pt3dadd(52.33, 250.41, 28.3, 3.9)
pt3dadd(52.3, 250.57, 28.3, 3.9)
pt3dadd(52.26, 250.68, 28.3, 3.9)
pt3dadd(52.26, 250.84, 28.3, 3.9)
pt3dadd(52.19, 250.96, 28.3, 3.9)
pt3dadd(52.19, 251.12, 28.3, 3.9)
pt3dadd(52.16, 251.24, 28.3, 3.9)
pt3dadd(52.13, 251.32, 28.3, 3.9)
pt3dadd(52.09, 251.43, 28.3, 3.9)
pt3dadd(52.06, 251.55, 28.3, 3.9)
pt3dadd(52.02, 251.67, 28.3, 3.9)
pt3dadd(51.99, 251.79, 28.3, 3.9)
pt3dadd(51.95, 251.87, 28.3, 3.9)
pt3dadd(51.95, 251.95, 28.3, 3.9)
pt3dadd(51.92, 251.99, 28.3, 3.9)
pt3dadd(51.92, 252.07, 28.3, 3.9)
pt3dadd(51.88, 252.11, 28.3, 3.9)
pt3dadd(51.88, 252.19, 28.3, 3.9)
pt3dadd(51.85, 252.27, 28.3, 3.9)
pt3dadd(51.81, 252.35, 28.3, 3.9)
pt3dadd(51.81, 252.43, 28.3, 3.9)
pt3dadd(51.78, 252.51, 28.3, 3.9)
pt3dadd(51.74, 252.58, 28.3, 3.9)
pt3dadd(51.74, 252.66, 28.3, 3.9)
pt3dadd(51.71, 252.7, 28.3, 3.9)
pt3dadd(51.67, 252.82, 28.3, 3.9)
pt3dadd(51.64, 252.9, 28.3, 3.9)
pt3dadd(51.64, 252.94, 28.3, 3.9)
pt3dadd(51.95, 252.3, 30.3, 3.9)
pt3dadd(51.88, 252.35, 30.3, 3.9)
pt3dadd(51.85, 252.43, 30.3, 3.9)
pt3dadd(51.78, 252.58, 30.3, 3.9)
pt3dadd(51.71, 252.66, 30.3, 3.9)
pt3dadd(51.67, 252.78, 30.3, 3.9)
pt3dadd(51.64, 252.9, 30.3, 3.9)
pt3dadd(51.57, 253.02, 30.3, 3.9)
pt3dadd(51.53, 253.14, 30.3, 3.9)
pt3dadd(51.5, 253.26, 30.3, 3.9)
pt3dadd(51.43, 253.34, 30.3, 3.9)
pt3dadd(51.39, 253.45, 30.3, 3.9)
pt3dadd(51.36, 253.61, 30.3, 3.9)
pt3dadd(51.29, 253.69, 30.3, 3.9)
pt3dadd(51.26, 253.85, 30.3, 3.9)
pt3dadd(51.22, 253.93, 30.3, 3.9)
pt3dadd(51.15, 254.05, 30.3, 3.9)
pt3dadd(51.04, 254.24, 30.3, 3.9)
pt3dadd(51.01, 254.37, 30.3, 3.9)
pt3dadd(50.97, 254.48, 30.3, 3.9)
pt3dadd(50.87, 254.68, 30.3, 3.9)
pt3dadd(50.8, 254.8, 30.3, 3.9)
pt3dadd(50.73, 254.92, 30.3, 3.9)
pt3dadd(50.7, 255.07, 30.3, 3.9)
pt3dadd(50.59, 255.2, 30.3, 3.9)
pt3dadd(50.56, 255.39, 30.3, 3.9)
pt3dadd(50.42, 255.79, 30.3, 3.9)
pt3dadd(50.35, 255.91, 30.3, 3.9)
pt3dadd(50.28, 256.11, 30.3, 3.9)
pt3dadd(50.24, 256.22, 30.3, 3.9)
pt3dadd(50.17, 256.38, 30.3, 3.9)
pt3dadd(50.14, 256.5, 30.3, 3.9)
pt3dadd(50.07, 256.7, 30.3, 3.9)
pt3dadd(50.03, 256.82, 30.3, 3.9)
pt3dadd(50, 256.98, 30.3, 3.9)
pt3dadd(49.93, 257.1, 30.3, 3.9)
pt3dadd(49.9, 257.17, 30.3, 3.9)
pt3dadd(49.86, 257.25, 30.3, 3.9)
pt3dadd(49.83, 257.37, 30.3, 3.9)
pt3dadd(49.79, 257.45, 30.3, 3.9)
pt3dadd(49.76, 257.53, 30.3, 3.9)
pt3dadd(49.69, 257.65, 30.3, 3.9)
pt3dadd(49.65, 257.69, 30.3, 3.9)
pt3dadd(49.65, 257.77, 30.3, 3.9)
pt3dadd(49.62, 257.85, 30.3, 3.9)
pt3dadd(49.58, 257.89, 30.3, 3.9)
pt3dadd(49.55, 257.96, 30.3, 3.9)
pt3dadd(49.51, 258.05, 30.3, 3.9)
pt3dadd(49.48, 258.12, 30.3, 3.9)
pt3dadd(49.44, 258.2, 30.3, 3.9)
pt3dadd(49.41, 258.28, 30.3, 3.9)
pt3dadd(49.37, 258.36, 30.3, 3.9)
pt3dadd(49.37, 258.48, 30.3, 3.9)
pt3dadd(49.3, 258.6, 30.3, 3.9)
pt3dadd(49.27, 258.72, 30.3, 3.9)
pt3dadd(49.23, 258.83, 30.3, 3.9)
pt3dadd(49.23, 258.92, 30.3, 3.9)
pt3dadd(49.2, 259.03, 30.3, 3.9)
pt3dadd(49.13, 259.07, 30.3, 3.9)
pt3dadd(49.13, 259.19, 30.3, 3.9)
pt3dadd(49.1, 259.23, 30.3, 3.9)
pt3dadd(49.1, 259.39, 30.3, 3.9)
pt3dadd(49.06, 259.43, 30.3, 3.9)
pt3dadd(49.03, 259.55, 30.3, 3.9)
pt3dadd(49.03, 259.7, 30.3, 3.9)
pt3dadd(48.99, 259.79, 30.3, 3.9)
pt3dadd(48.96, 259.9, 30.3, 3.9)
pt3dadd(48.96, 260.06, 30.3, 3.9)
pt3dadd(48.92, 260.18, 30.3, 3.9)
pt3dadd(48.92, 260.3, 30.3, 3.9)
pt3dadd(48.88, 260.38, 30.3, 3.9)
pt3dadd(48.85, 260.58, 30.3, 3.9)
pt3dadd(48.85, 260.73, 30.3, 3.9)
pt3dadd(48.81, 260.85, 30.3, 3.9)
pt3dadd(48.81, 260.93, 30.3, 3.9)
pt3dadd(48.78, 260.97, 30.3, 3.9)
pt3dadd(48.92, 260.81, 32.3, 3.9)
pt3dadd(48.92, 261.09, 32.3, 3.9)
pt3dadd(48.88, 261.25, 32.3, 3.9)
pt3dadd(48.85, 261.41, 32.3, 3.9)
pt3dadd(48.81, 261.61, 32.3, 3.9)
pt3dadd(48.81, 261.88, 32.3, 3.9)
pt3dadd(48.74, 262.08, 32.3, 3.9)
pt3dadd(48.74, 262.24, 32.3, 3.9)
pt3dadd(48.71, 262.36, 32.3, 3.9)
pt3dadd(48.71, 262.48, 32.3, 3.9)
pt3dadd(48.67, 262.6, 32.3, 3.9)
pt3dadd(48.64, 262.71, 32.3, 3.9)
pt3dadd(48.6, 262.83, 32.3, 3.9)
pt3dadd(48.57, 262.95, 32.3, 3.9)
pt3dadd(48.57, 263.03, 32.3, 3.9)
pt3dadd(48.5, 263.19, 32.3, 3.9)
pt3dadd(48.43, 263.35, 32.3, 3.9)
pt3dadd(48.4, 263.51, 32.3, 3.9)
pt3dadd(48.33, 263.62, 32.3, 3.9)
pt3dadd(48.29, 263.78, 32.3, 3.9)
pt3dadd(48.26, 263.9, 32.3, 3.9)
pt3dadd(48.22, 263.98, 32.3, 3.9)
pt3dadd(48.15, 264.14, 32.3, 3.9)
pt3dadd(48.12, 264.26, 32.3, 3.9)
pt3dadd(48.05, 264.38, 32.3, 3.9)
pt3dadd(48.01, 264.45, 32.3, 3.9)
pt3dadd(47.98, 264.53, 32.3, 3.9)
pt3dadd(47.91, 264.61, 32.3, 3.9)
pt3dadd(47.88, 264.69, 32.3, 3.9)
pt3dadd(47.84, 264.73, 32.3, 3.9)
pt3dadd(47.84, 264.81, 32.3, 3.9)
pt3dadd(47.81, 264.85, 32.3, 3.9)
pt3dadd(47.77, 264.89, 32.3, 3.9)
pt3dadd(47.74, 264.97, 32.3, 3.9)
pt3dadd(47.7, 265.01, 32.3, 3.9)
pt3dadd(47.67, 265.05, 32.3, 3.9)
pt3dadd(47.56, 265.17, 32.3, 3.9)
pt3dadd(47.49, 265.24, 32.3, 3.9)
pt3dadd(47.46, 265.29, 32.3, 3.9)
pt3dadd(47.42, 265.33, 32.3, 3.9)
pt3dadd(47.42, 265.4, 32.3, 3.9)
pt3dadd(47.39, 265.44, 32.3, 3.9)
pt3dadd(47.6, 265.17, 35.3, 3.9)
pt3dadd(47.56, 265.24, 35.3, 3.9)
pt3dadd(47.49, 265.33, 35.3, 3.9)
pt3dadd(47.46, 265.4, 35.3, 3.9)
pt3dadd(47.42, 265.48, 35.3, 3.9)
pt3dadd(47.39, 265.56, 35.3, 3.9)
pt3dadd(47.35, 265.6, 35.3, 3.9)
}
dend[114] {pt3dclear()
pt3dadd(77.05, 101.92, 1.3, 3.48)
}
}
proc shape3d_169() {
dend[114] { pt3dadd(76.28, 101.29, -10.7, 3.48)
pt3dadd(76.25, 101.21, -10.7, 3.48)
pt3dadd(76.21, 101.13, -10.7, 3.48)
pt3dadd(76.21, 101.05, -10.7, 3.48)
pt3dadd(76.18, 101.01, -10.7, 3.48)
pt3dadd(76.14, 100.93, -10.7, 3.48)
pt3dadd(76.11, 100.89, -10.7, 3.48)
pt3dadd(76.07, 100.85, -10.7, 3.48)
pt3dadd(76.04, 100.77, -10.7, 3.48)
pt3dadd(76, 100.69, -10.7, 3.48)
pt3dadd(75.93, 100.54, -10.7, 3.48)
pt3dadd(75.86, 100.42, -10.7, 3.48)
pt3dadd(75.76, 100.3, -10.7, 3.48)
pt3dadd(75.65, 100.18, -10.7, 3.48)
pt3dadd(75.62, 100.1, -10.7, 3.48)
pt3dadd(75.58, 100.02, -10.7, 3.48)
pt3dadd(73.98, 93.97, 16.3, 3.07)
pt3dadd(74.02, 93.89, 16.3, 3.07)
pt3dadd(74.02, 93.77, 16.3, 3.07)
pt3dadd(74.05, 93.69, 16.3, 3.07)
pt3dadd(74.09, 93.61, 16.3, 3.07)
pt3dadd(74.09, 93.49, 16.3, 3.07)
pt3dadd(74.12, 93.41, 16.3, 3.07)
pt3dadd(74.16, 93.33, 16.3, 3.07)
pt3dadd(74.19, 93.25, 16.3, 3.07)
pt3dadd(74.19, 93.18, 16.3, 3.07)
pt3dadd(74.19, 93.33, 12.3, 3.07)
pt3dadd(74.26, 93.25, 12.3, 3.07)
pt3dadd(74.33, 93.02, 12.3, 3.07)
pt3dadd(74.4, 92.86, 12.3, 3.07)
pt3dadd(74.47, 92.7, 12.3, 3.07)
pt3dadd(74.47, 92.54, 12.3, 3.07)
pt3dadd(74.54, 92.46, 12.3, 3.07)
pt3dadd(74.61, 92.31, 12.3, 3.07)
pt3dadd(74.68, 92.14, 12.3, 3.07)
pt3dadd(74.75, 92.07, 12.3, 3.07)
pt3dadd(74.82, 91.91, 12.3, 3.07)
pt3dadd(74.89, 91.75, 12.3, 3.07)
pt3dadd(74.96, 91.59, 12.3, 3.07)
pt3dadd(75.03, 91.36, 12.3, 3.07)
pt3dadd(75.1, 91.12, 12.3, 3.07)
pt3dadd(75.17, 91.04, 12.3, 3.07)
pt3dadd(75.31, 90.8, 12.3, 3.07)
pt3dadd(75.38, 90.49, 12.3, 3.07)
pt3dadd(75.52, 90.32, 12.3, 3.07)
pt3dadd(75.58, 90.01, 12.3, 3.07)
pt3dadd(75.65, 89.69, 12.3, 3.07)
pt3dadd(75.79, 89.46, 12.3, 3.07)
pt3dadd(75.93, 89.14, 12.3, 3.07)
pt3dadd(76, 88.98, 12.3, 3.07)
pt3dadd(75.93, 89.22, 13.3, 3.07)
pt3dadd(76.14, 89.22, 13.3, 3.07)
pt3dadd(76.21, 89.14, 13.3, 3.07)
pt3dadd(76.28, 89.06, 13.3, 3.07)
pt3dadd(76.35, 88.98, 13.3, 3.07)
pt3dadd(76.42, 88.9, 13.3, 3.07)
pt3dadd(76.49, 88.82, 13.3, 3.07)
pt3dadd(76.56, 88.74, 13.3, 3.07)
pt3dadd(76.56, 88.58, 13.3, 3.07)
pt3dadd(76.63, 88.5, 13.3, 3.07)
pt3dadd(76.7, 88.43, 13.3, 3.07)
pt3dadd(76.7, 88.27, 13.3, 3.07)
pt3dadd(76.77, 88.19, 13.3, 3.07)
pt3dadd(76.84, 88.11, 13.3, 3.07)
pt3dadd(76.91, 87.95, 13.3, 3.07)
pt3dadd(76.98, 87.87, 13.3, 3.07)
pt3dadd(77.05, 87.79, 13.3, 3.07)
pt3dadd(77.05, 87.56, 13.3, 3.07)
pt3dadd(77.12, 87.4, 13.3, 3.07)
pt3dadd(77.12, 86.68, 13.3, 3.07)
pt3dadd(77.19, 86.61, 13.3, 3.07)
pt3dadd(77.19, 86.45, 13.3, 3.07)
pt3dadd(77.26, 86.29, 13.3, 3.07)
pt3dadd(77.26, 85.89, 13.3, 3.07)
pt3dadd(77.33, 85.74, 13.3, 3.07)
pt3dadd(77.4, 85.66, 13.3, 3.07)
pt3dadd(77.47, 85.58, 13.3, 3.07)
pt3dadd(77.47, 84.86, 13.3, 3.07)
pt3dadd(77.54, 84.79, 13.3, 3.07)
pt3dadd(77.54, 82.89, 13.3, 3.07)
pt3dadd(77.61, 82.73, 13.3, 3.07)
pt3dadd(77.61, 81.78, 13.3, 3.07)
pt3dadd(77.68, 81.62, 13.3, 3.07)
pt3dadd(77.68, 81.14, 13.3, 3.07)
pt3dadd(77.75, 80.99, 13.3, 3.07)
pt3dadd(77.75, 80.83, 13.3, 3.07)
pt3dadd(77.82, 80.67, 13.3, 3.07)
pt3dadd(77.89, 80.43, 13.3, 3.07)
pt3dadd(77.89, 80.28, 13.3, 3.07)
pt3dadd(77.96, 80.19, 13.3, 3.07)
pt3dadd(77.96, 78.46, 13.3, 3.07)
pt3dadd(78.03, 78.22, 13.3, 3.07)
pt3dadd(78.03, 75.37, 13.3, 3.07)
pt3dadd(77.82, 75.37, 13.3, 3.07)
pt3dadd(77.82, 75.61, 13.3, 3.07)
pt3dadd(78.03, 75.92, 13.3, 3.07)
pt3dadd(78.03, 75.21, 13.3, 3.07)
pt3dadd(77.96, 75.13, 13.3, 3.07)
pt3dadd(77.96, 74.82, 13.3, 3.07)
pt3dadd(77.89, 74.74, 13.3, 3.07)
pt3dadd(77.82, 74.66, 13.3, 3.07)
pt3dadd(77.82, 74.5, 13.3, 3.07)
pt3dadd(77.75, 74.34, 13.3, 3.07)
pt3dadd(77.75, 74.1, 13.3, 3.07)
pt3dadd(77.68, 74.02, 13.3, 3.07)
pt3dadd(77.61, 73.94, 13.3, 3.07)
pt3dadd(77.61, 73.71, 13.3, 3.07)
pt3dadd(77.54, 73.63, 13.3, 3.07)
pt3dadd(77.47, 73.55, 13.3, 3.07)
pt3dadd(77.4, 73.39, 13.3, 3.07)
pt3dadd(77.4, 73.23, 13.3, 3.07)
pt3dadd(77.33, 73.07, 13.3, 3.07)
pt3dadd(77.26, 72.92, 13.3, 3.07)
pt3dadd(77.26, 72.76, 13.3, 3.07)
pt3dadd(77.19, 72.6, 13.3, 3.07)
pt3dadd(77.19, 72.36, 13.3, 3.07)
pt3dadd(77.12, 72.2, 13.3, 3.07)
pt3dadd(77.12, 71.73, 13.3, 3.07)
pt3dadd(77.05, 71.65, 13.3, 3.07)
pt3dadd(77.05, 65.79, 13.3, 3.07)
pt3dadd(77.05, 66.03, 14.3, 3.07)
pt3dadd(77.05, 65.56, 14.3, 3.07)
pt3dadd(77.19, 65.32, 14.3, 3.07)
pt3dadd(77.19, 64.37, 14.3, 3.07)
pt3dadd(77.26, 64.29, 14.3, 3.07)
pt3dadd(77.33, 64.21, 14.3, 3.07)
pt3dadd(77.33, 63.42, 14.3, 3.07)
pt3dadd(77.4, 63.34, 14.3, 3.07)
pt3dadd(77.4, 62.47, 14.3, 3.07)
pt3dadd(77.47, 62.31, 14.3, 3.07)
pt3dadd(77.54, 62.15, 14.3, 3.07)
pt3dadd(77.61, 61.92, 14.3, 3.07)
pt3dadd(77.61, 61.68, 14.3, 3.07)
pt3dadd(77.68, 61.52, 14.3, 3.07)
pt3dadd(77.68, 61.2, 14.3, 3.07)
pt3dadd(77.75, 61.04, 14.3, 3.07)
pt3dadd(77.82, 60.97, 14.3, 3.07)
pt3dadd(77.82, 60.81, 14.3, 3.07)
pt3dadd(77.75, 60.97, 17.3, 3.07)
pt3dadd(77.75, 60.17, 17.3, 3.07)
pt3dadd(77.82, 59.94, 17.3, 3.07)
pt3dadd(77.89, 59.78, 17.3, 3.07)
pt3dadd(77.89, 57.8, 17.3, 3.07)
pt3dadd(77.96, 57.56, 17.3, 3.07)
pt3dadd(77.96, 56.69, 17.3, 3.07)
pt3dadd(78.03, 56.61, 17.3, 3.07)
pt3dadd(78.1, 56.46, 17.3, 3.07)
pt3dadd(78.17, 56.3, 17.3, 3.07)
pt3dadd(78.24, 56.14, 17.3, 3.07)
pt3dadd(78.44, 55.9, 17.3, 3.07)
pt3dadd(78.51, 55.82, 17.3, 3.07)
pt3dadd(78.58, 55.66, 17.3, 3.07)
pt3dadd(78.65, 55.58, 17.3, 3.07)
pt3dadd(78.65, 55.42, 17.3, 3.07)
pt3dadd(78.72, 55.35, 17.3, 3.07)
pt3dadd(78.79, 55.27, 17.3, 3.07)
pt3dadd(78.93, 55.11, 17.3, 3.07)
pt3dadd(79, 55.03, 17.3, 3.07)
pt3dadd(79.07, 54.95, 17.3, 3.07)
pt3dadd(79.07, 54.79, 17.3, 3.07)
pt3dadd(79.14, 54.56, 17.3, 3.07)
pt3dadd(79.21, 54.47, 17.3, 3.07)
pt3dadd(79.35, 54.32, 17.3, 3.07)
pt3dadd(79.42, 54.24, 17.3, 3.07)
pt3dadd(79.49, 54.08, 17.3, 3.07)
pt3dadd(79.63, 54, 17.3, 3.07)
pt3dadd(79.7, 53.84, 17.3, 3.07)
pt3dadd(79.77, 53.76, 17.3, 3.07)
pt3dadd(79.84, 53.53, 17.3, 3.07)
pt3dadd(79.9, 53.37, 17.3, 3.07)
pt3dadd(79.9, 53.21, 17.3, 3.07)
pt3dadd(79.97, 53.13, 17.3, 3.07)
pt3dadd(79.97, 52.18, 17.3, 3.07)
pt3dadd(79.58, 52.42, 19.3, 3.07)
pt3dadd(80.11, 52.02, 19.3, 3.07)
pt3dadd(80.11, 51.78, 19.3, 3.07)
pt3dadd(80.19, 37.46, 0, 2.48)
pt3dadd(82.28, 25.33, 0, 2.48)
pt3dadd(82.21, 16.89, 0, 2.48)
}
dend[115] {pt3dclear()
pt3dadd(79.23, 101.03, -2.7, 5.43)
pt3dadd(79.79, 101.55, -1.7, 5.43)
pt3dadd(79.86, 101.55, -1.7, 5.43)
pt3dadd(79.93, 101.58, -1.7, 5.43)
pt3dadd(80, 101.63, -1.7, 5.43)
pt3dadd(80.03, 101.67, -1.7, 5.43)
pt3dadd(80.14, 101.71, -1.7, 5.43)
pt3dadd(80.17, 101.75, -1.7, 5.43)
pt3dadd(80.24, 101.79, -1.7, 5.43)
pt3dadd(80.28, 101.86, -1.7, 5.43)
pt3dadd(80.35, 101.86, -1.7, 5.43)
pt3dadd(80.41, 101.9, -1.7, 5.43)
pt3dadd(80.45, 101.94, -1.7, 5.43)
pt3dadd(80.48, 101.98, -1.7, 5.43)
pt3dadd(80.52, 102.02, -1.7, 5.43)
pt3dadd(80.55, 102.06, -1.7, 5.43)
pt3dadd(80.59, 102.14, -1.7, 5.43)
pt3dadd(80.62, 102.18, -1.7, 5.43)
pt3dadd(80.69, 102.22, -1.7, 5.43)
pt3dadd(80.76, 102.22, -1.7, 5.43)
pt3dadd(80.8, 102.26, -1.7, 5.43)
}
}
proc shape3d_170() {
dend[115] { pt3dadd(80.87, 102.3, -1.7, 5.43)
pt3dadd(80.9, 102.34, -1.7, 5.43)
pt3dadd(80.97, 102.34, -1.7, 5.43)
pt3dadd(81.04, 102.38, -1.7, 5.43)
pt3dadd(81.07, 102.42, -1.7, 5.43)
pt3dadd(81.14, 102.42, -1.7, 5.43)
pt3dadd(81.18, 102.46, -1.7, 5.43)
pt3dadd(81.29, 102.46, -1.7, 5.43)
pt3dadd(81.39, 102.5, -1.7, 5.43)
pt3dadd(81.46, 102.54, -1.7, 5.43)
pt3dadd(81.53, 102.54, -1.7, 5.43)
pt3dadd(81.6, 102.57, -1.7, 5.43)
pt3dadd(81.67, 102.57, -1.7, 5.43)
pt3dadd(81.7, 102.61, -1.7, 5.43)
pt3dadd(81.74, 102.65, -1.7, 5.43)
pt3dadd(81.84, 102.65, -1.7, 5.43)
pt3dadd(81.88, 102.69, -1.7, 5.43)
pt3dadd(81.95, 102.73, -1.7, 5.43)
pt3dadd(81.98, 102.77, -1.7, 5.43)
pt3dadd(82.01, 102.81, -1.7, 5.43)
pt3dadd(82.05, 102.85, -1.7, 5.43)
pt3dadd(82.12, 102.89, -1.7, 5.43)
pt3dadd(82.19, 102.93, -1.7, 5.43)
pt3dadd(82.22, 102.97, -1.7, 5.43)
pt3dadd(82.29, 103.01, -1.7, 5.43)
pt3dadd(82.33, 103.05, -1.7, 5.43)
pt3dadd(82.4, 103.09, -1.7, 5.43)
pt3dadd(82.47, 103.13, -1.7, 5.43)
pt3dadd(82.54, 103.13, -1.7, 5.43)
pt3dadd(82.57, 103.17, -1.7, 5.43)
pt3dadd(82.61, 103.21, -1.7, 5.43)
pt3dadd(82.68, 103.25, -1.7, 5.43)
pt3dadd(82.71, 103.29, -1.7, 5.43)
pt3dadd(82.78, 103.29, -1.7, 5.43)
pt3dadd(82.82, 103.33, -1.7, 5.43)
pt3dadd(82.89, 103.37, -1.7, 5.43)
pt3dadd(82.92, 103.4, -1.7, 5.43)
pt3dadd(82.96, 103.44, -1.7, 5.43)
pt3dadd(83.03, 103.44, -1.7, 5.43)
pt3dadd(83.06, 103.49, -1.7, 5.43)
pt3dadd(83.13, 103.53, -1.7, 5.43)
pt3dadd(83.2, 103.53, -1.7, 5.43)
pt3dadd(83.27, 103.57, -1.7, 5.43)
pt3dadd(83.31, 103.61, -1.7, 5.43)
pt3dadd(83.38, 103.64, -1.7, 5.43)
pt3dadd(83.44, 103.68, -1.7, 5.43)
pt3dadd(83.55, 103.72, -1.7, 5.43)
pt3dadd(83.62, 103.76, -1.7, 5.43)
pt3dadd(83.69, 103.8, -1.7, 5.43)
pt3dadd(83.72, 103.84, -1.7, 5.43)
pt3dadd(83.83, 103.88, -1.7, 5.43)
pt3dadd(83.9, 103.92, -1.7, 5.43)
pt3dadd(84, 103.96, -1.7, 5.43)
pt3dadd(84.04, 104, -1.7, 5.43)
pt3dadd(84.11, 104.04, -1.7, 5.43)
pt3dadd(84.21, 104.08, -1.7, 5.43)
pt3dadd(84.28, 104.12, -1.7, 5.43)
pt3dadd(84.35, 104.16, -1.7, 5.43)
pt3dadd(84.46, 104.2, -1.7, 5.43)
pt3dadd(84.53, 104.24, -1.7, 5.43)
pt3dadd(84.6, 104.28, -1.7, 5.43)
pt3dadd(84.67, 104.32, -1.7, 5.43)
pt3dadd(84.73, 104.39, -1.7, 5.43)
pt3dadd(84.8, 104.39, -1.7, 5.43)
pt3dadd(84.84, 104.47, -1.7, 5.43)
pt3dadd(84.91, 104.51, -1.7, 5.43)
pt3dadd(84.98, 104.55, -1.7, 5.43)
pt3dadd(85.05, 104.59, -1.7, 5.43)
pt3dadd(85.12, 104.67, -1.7, 5.43)
pt3dadd(85.19, 104.71, -1.7, 5.43)
pt3dadd(85.25, 104.75, -1.7, 5.43)
pt3dadd(85.36, 104.83, -1.7, 5.43)
pt3dadd(85.43, 104.87, -1.7, 5.43)
pt3dadd(85.54, 104.91, -1.7, 5.43)
pt3dadd(85.57, 104.95, -1.7, 5.43)
pt3dadd(85.64, 105.03, -1.7, 5.43)
pt3dadd(85.71, 105.07, -1.7, 5.43)
pt3dadd(85.78, 105.11, -1.7, 5.43)
pt3dadd(85.85, 105.15, -1.7, 5.43)
pt3dadd(85.95, 105.23, -1.7, 5.43)
pt3dadd(86.02, 105.26, -1.7, 5.43)
pt3dadd(86.13, 105.31, -1.7, 5.43)
pt3dadd(86.16, 105.35, -1.7, 5.43)
pt3dadd(86.23, 105.39, -1.7, 5.43)
pt3dadd(86.27, 105.43, -1.7, 5.43)
pt3dadd(86.33, 105.46, -1.7, 5.43)
pt3dadd(86.4, 105.46, -1.7, 5.43)
pt3dadd(86.47, 105.5, -1.7, 5.43)
pt3dadd(86.54, 105.54, -1.7, 5.43)
pt3dadd(86.61, 105.58, -1.7, 5.43)
pt3dadd(86.68, 105.58, -1.7, 5.43)
pt3dadd(86.75, 105.62, -1.7, 5.43)
pt3dadd(86.82, 105.66, -1.7, 5.43)
pt3dadd(86.93, 105.7, -1.7, 5.43)
pt3dadd(87.03, 105.74, -1.7, 5.43)
pt3dadd(87.07, 105.78, -1.7, 5.43)
pt3dadd(87.17, 105.78, -1.7, 5.43)
pt3dadd(87.31, 105.82, -1.7, 5.43)
pt3dadd(87.38, 105.86, -1.7, 5.43)
pt3dadd(87.52, 105.86, -1.7, 5.43)
pt3dadd(87.59, 105.9, -1.7, 5.43)
pt3dadd(87.73, 105.94, -1.7, 5.43)
pt3dadd(87.83, 105.94, -1.7, 5.43)
pt3dadd(87.97, 105.98, -1.7, 5.43)
pt3dadd(88.04, 106.02, -1.7, 5.43)
pt3dadd(88.11, 106.02, -1.7, 5.43)
pt3dadd(88.22, 106.06, -1.7, 5.43)
pt3dadd(88.32, 106.1, -1.7, 5.43)
pt3dadd(88.39, 106.1, -1.7, 5.43)
pt3dadd(88.46, 106.14, -1.7, 5.43)
pt3dadd(88.6, 106.14, -1.7, 5.43)
pt3dadd(88.67, 106.18, -1.7, 5.43)
pt3dadd(88.85, 106.18, -1.7, 5.43)
pt3dadd(88.92, 106.21, -1.7, 5.43)
pt3dadd(89.02, 106.25, -1.7, 5.43)
pt3dadd(89.16, 106.25, -1.7, 5.43)
pt3dadd(89.26, 106.29, -1.7, 5.43)
pt3dadd(89.47, 106.29, -1.7, 5.43)
pt3dadd(89.57, 106.33, -1.7, 5.43)
pt3dadd(89.71, 106.33, -1.7, 5.43)
pt3dadd(89.79, 106.38, -1.7, 5.43)
pt3dadd(89.96, 106.38, -1.7, 5.43)
pt3dadd(90.03, 106.41, -1.7, 5.43)
pt3dadd(90.31, 106.41, -1.7, 5.43)
pt3dadd(90.38, 106.45, -1.7, 5.43)
pt3dadd(90.48, 106.45, -1.7, 5.43)
pt3dadd(90.55, 106.49, -1.7, 5.43)
pt3dadd(90.76, 106.49, -1.7, 5.43)
pt3dadd(90.9, 106.53, -1.7, 5.43)
pt3dadd(92.36, 106.53, -1.7, 5.43)
pt3dadd(92.15, 106.65, -4.7, 5.02)
pt3dadd(92.26, 106.65, -4.7, 5.02)
pt3dadd(92.29, 106.69, -4.7, 5.02)
pt3dadd(92.43, 106.69, -4.7, 5.02)
pt3dadd(92.5, 106.73, -4.7, 5.02)
pt3dadd(92.57, 106.73, -4.7, 5.02)
pt3dadd(92.64, 106.77, -4.7, 5.02)
pt3dadd(92.71, 106.81, -4.7, 5.02)
pt3dadd(92.78, 106.81, -4.7, 5.02)
pt3dadd(92.89, 106.85, -4.7, 5.02)
pt3dadd(92.96, 106.89, -4.7, 5.02)
pt3dadd(93.1, 106.89, -4.7, 5.02)
pt3dadd(93.17, 106.93, -4.7, 5.02)
pt3dadd(96.68, 106.93, -4.7, 5.02)
}
dend[116] {pt3dclear()
pt3dadd(96.68, 106.93, -4.7, 5.02)
pt3dadd(96.93, 107.08, -4.7, 5.02)
pt3dadd(96.93, 107.17, -4.7, 5.02)
pt3dadd(96.96, 107.21, -4.7, 5.02)
pt3dadd(97.03, 107.25, -4.7, 5.02)
pt3dadd(97.07, 107.29, -4.7, 5.02)
pt3dadd(97.1, 107.36, -4.7, 5.02)
pt3dadd(97.14, 107.4, -4.7, 5.02)
pt3dadd(97.17, 107.44, -4.7, 5.02)
pt3dadd(97.17, 107.56, -4.7, 5.02)
pt3dadd(97.21, 107.64, -4.7, 5.02)
pt3dadd(97.24, 107.68, -4.7, 5.02)
pt3dadd(97.28, 107.76, -4.7, 5.02)
pt3dadd(97.31, 107.8, -4.7, 5.02)
pt3dadd(97.35, 107.84, -4.7, 5.02)
pt3dadd(97.38, 107.92, -4.7, 5.02)
pt3dadd(97.45, 107.96, -4.7, 5.02)
pt3dadd(97.45, 108.04, -4.7, 5.02)
pt3dadd(97.49, 108.07, -4.7, 5.02)
pt3dadd(97.56, 108.15, -4.7, 5.02)
pt3dadd(97.59, 108.19, -4.7, 5.02)
pt3dadd(97.62, 108.23, -4.7, 5.02)
pt3dadd(97.62, 108.35, -4.7, 5.02)
pt3dadd(97.66, 108.43, -4.7, 5.02)
pt3dadd(97.69, 108.47, -4.7, 5.02)
pt3dadd(97.69, 108.55, -4.7, 5.02)
pt3dadd(97.73, 108.59, -4.7, 5.02)
pt3dadd(97.76, 108.67, -4.7, 5.02)
pt3dadd(97.8, 108.75, -4.7, 5.02)
pt3dadd(97.83, 108.79, -4.7, 5.02)
pt3dadd(97.87, 108.83, -4.7, 5.02)
pt3dadd(97.87, 108.91, -4.7, 5.02)
pt3dadd(97.9, 108.94, -4.7, 5.02)
pt3dadd(97.9, 109.03, -4.7, 5.02)
pt3dadd(97.94, 109.07, -4.7, 5.02)
pt3dadd(97.97, 109.14, -4.7, 5.02)
pt3dadd(97.97, 109.22, -4.7, 5.02)
pt3dadd(98.01, 109.26, -4.7, 5.02)
pt3dadd(98.04, 109.3, -4.7, 5.02)
pt3dadd(98.08, 109.34, -4.7, 5.02)
pt3dadd(98.11, 109.42, -4.7, 5.02)
pt3dadd(98.14, 109.46, -4.7, 5.02)
pt3dadd(98.33, 109.38, -4.7, 5.02)
}
dend[117] {pt3dclear()
pt3dadd(98.33, 109.38, -4.7, 1.36)
pt3dadd(99.53, 108.41, 13.9, 1.36)
pt3dadd(99.67, 109.23, 13.9, 1.7)
pt3dadd(99.78, 109.3, 13.9, 1.7)
pt3dadd(99.84, 109.38, 13.9, 1.7)
pt3dadd(99.89, 109.4, 13.9, 1.7)
pt3dadd(99.93, 109.45, 13.9, 1.7)
pt3dadd(99.97, 109.5, 13.9, 1.7)
pt3dadd(99.99, 109.52, 13.9, 1.7)
pt3dadd(100.01, 109.54, 13.9, 1.7)
pt3dadd(100.08, 109.57, 13.9, 1.7)
pt3dadd(100.12, 109.64, 13.9, 1.7)
pt3dadd(100.14, 109.69, 13.9, 1.7)
}
}
proc shape3d_171() {
dend[117] { pt3dadd(100.18, 109.71, 13.9, 1.7)
pt3dadd(100.21, 109.76, 13.9, 1.7)
pt3dadd(100.27, 109.76, 13.9, 1.7)
pt3dadd(100.31, 109.81, 13.9, 1.7)
pt3dadd(100.33, 109.88, 13.9, 1.7)
pt3dadd(100.39, 109.93, 13.9, 1.7)
pt3dadd(100.46, 109.95, 13.9, 1.7)
pt3dadd(100.52, 110.05, 13.9, 1.7)
pt3dadd(100.57, 110.15, 13.9, 1.7)
pt3dadd(100.65, 110.22, 13.9, 1.7)
pt3dadd(100.71, 110.43, 13.9, 1.7)
pt3dadd(100.78, 110.51, 13.9, 1.7)
pt3dadd(100.84, 110.58, 13.9, 1.7)
pt3dadd(100.88, 110.68, 13.9, 1.7)
pt3dadd(100.95, 110.75, 13.9, 1.7)
pt3dadd(100.97, 110.77, 13.9, 1.7)
pt3dadd(101.01, 110.89, 13.9, 1.7)
pt3dadd(101.07, 110.97, 13.9, 1.7)
pt3dadd(101.12, 111.04, 13.9, 1.7)
pt3dadd(101.18, 111.11, 13.9, 1.7)
pt3dadd(101.22, 111.21, 13.9, 1.7)
pt3dadd(101.29, 111.28, 13.9, 1.7)
pt3dadd(101.35, 111.4, 13.9, 1.7)
pt3dadd(101.39, 111.5, 13.9, 1.7)
pt3dadd(101.43, 111.57, 13.9, 1.7)
pt3dadd(101.5, 111.64, 13.9, 1.7)
pt3dadd(101.54, 111.71, 13.9, 1.7)
pt3dadd(101.58, 111.79, 13.9, 1.7)
pt3dadd(101.61, 111.86, 13.9, 1.7)
pt3dadd(101.63, 111.93, 13.9, 1.7)
pt3dadd(101.69, 112, 13.9, 1.7)
pt3dadd(101.73, 112.07, 13.9, 1.7)
pt3dadd(101.78, 112.12, 13.9, 1.7)
pt3dadd(101.79, 112.19, 13.9, 1.7)
pt3dadd(101.84, 112.29, 13.9, 1.7)
pt3dadd(101.88, 112.36, 13.9, 1.7)
pt3dadd(101.9, 112.44, 13.9, 1.7)
pt3dadd(101.94, 112.53, 13.9, 1.7)
pt3dadd(102.01, 112.63, 13.9, 1.7)
pt3dadd(102.05, 112.75, 13.9, 1.7)
pt3dadd(102.11, 112.87, 13.9, 1.7)
pt3dadd(102.16, 112.94, 13.9, 1.7)
pt3dadd(102.18, 113.01, 13.9, 1.7)
pt3dadd(102.22, 113.09, 13.9, 1.7)
pt3dadd(102.24, 113.18, 13.9, 1.7)
pt3dadd(102.31, 113.28, 13.9, 1.7)
pt3dadd(102.33, 113.35, 13.9, 1.7)
pt3dadd(102.37, 113.47, 13.9, 1.7)
pt3dadd(102.41, 113.55, 13.9, 1.7)
pt3dadd(102.46, 113.62, 13.9, 1.7)
pt3dadd(102.47, 113.71, 13.9, 1.7)
pt3dadd(102.5, 113.76, 13.9, 1.7)
pt3dadd(102.56, 113.81, 13.9, 1.7)
pt3dadd(102.58, 113.86, 13.9, 1.7)
pt3dadd(102.63, 113.93, 13.9, 1.7)
pt3dadd(102.64, 113.98, 13.9, 1.7)
pt3dadd(102.67, 114.05, 13.9, 1.7)
pt3dadd(102.69, 114.1, 13.9, 1.7)
pt3dadd(102.73, 114.13, 13.9, 1.7)
pt3dadd(102.75, 114.17, 13.9, 1.7)
pt3dadd(102.77, 114.22, 13.9, 1.7)
pt3dadd(102.77, 114.27, 13.9, 1.7)
pt3dadd(102.79, 114.29, 13.9, 1.7)
pt3dadd(102.82, 114.32, 13.9, 1.7)
pt3dadd(102.84, 114.34, 13.9, 1.7)
pt3dadd(102.86, 114.36, 13.9, 1.7)
pt3dadd(102.86, 114.46, 13.9, 1.7)
pt3dadd(102.88, 114.49, 13.9, 1.7)
pt3dadd(102.9, 114.51, 13.9, 1.7)
pt3dadd(102.92, 114.54, 13.9, 1.7)
pt3dadd(102.86, 114.56, 15.9, 1.87)
pt3dadd(102.86, 114.58, 15.9, 1.87)
pt3dadd(102.9, 114.61, 15.9, 1.87)
pt3dadd(102.92, 114.68, 15.9, 1.87)
pt3dadd(102.96, 114.73, 15.9, 1.87)
pt3dadd(102.99, 114.8, 15.9, 1.87)
pt3dadd(103, 114.9, 15.9, 1.87)
pt3dadd(103.05, 114.99, 15.9, 1.87)
pt3dadd(103.07, 115.11, 15.9, 1.87)
pt3dadd(103.11, 115.18, 15.9, 1.87)
pt3dadd(103.13, 115.31, 15.9, 1.87)
pt3dadd(103.15, 115.4, 15.9, 1.87)
pt3dadd(103.2, 115.47, 15.9, 1.87)
pt3dadd(103.22, 115.55, 15.9, 1.87)
pt3dadd(103.24, 115.57, 15.9, 1.87)
pt3dadd(103.26, 115.6, 15.9, 1.87)
pt3dadd(103.26, 115.67, 15.9, 1.87)
pt3dadd(103.3, 115.69, 15.9, 1.87)
pt3dadd(103.3, 115.74, 15.9, 1.87)
pt3dadd(103.32, 115.79, 15.9, 1.87)
pt3dadd(103.39, 115.86, 15.9, 1.87)
pt3dadd(103.41, 115.89, 15.9, 1.87)
pt3dadd(103.43, 115.93, 15.9, 1.87)
pt3dadd(103.45, 115.98, 15.9, 1.87)
pt3dadd(103.5, 116, 15.9, 1.87)
pt3dadd(103.51, 116.03, 15.9, 1.87)
pt3dadd(103.54, 116.08, 15.9, 1.87)
pt3dadd(103.56, 116.13, 15.9, 1.87)
pt3dadd(103.6, 116.18, 15.9, 1.87)
pt3dadd(103.62, 116.2, 15.9, 1.87)
pt3dadd(103.64, 116.22, 15.9, 1.87)
pt3dadd(103.67, 116.27, 15.9, 1.87)
pt3dadd(103.68, 116.32, 15.9, 1.87)
pt3dadd(103.73, 116.34, 15.9, 1.87)
pt3dadd(103.75, 116.39, 15.9, 1.87)
pt3dadd(103.75, 116.44, 15.9, 1.87)
pt3dadd(103.79, 116.49, 15.9, 1.87)
pt3dadd(103.81, 116.51, 15.9, 1.87)
pt3dadd(103.83, 116.56, 15.9, 1.87)
pt3dadd(103.86, 116.58, 15.9, 1.87)
pt3dadd(103.9, 116.63, 15.9, 1.87)
pt3dadd(103.92, 116.66, 15.9, 1.87)
pt3dadd(103.92, 116.71, 15.9, 1.87)
pt3dadd(103.94, 116.75, 15.9, 1.87)
pt3dadd(103.96, 116.78, 15.9, 1.87)
pt3dadd(104, 116.82, 15.9, 1.87)
pt3dadd(104, 116.88, 15.9, 1.87)
pt3dadd(104.03, 116.92, 15.9, 1.87)
pt3dadd(104.05, 116.94, 15.9, 1.87)
pt3dadd(104.07, 117, 15.9, 1.87)
pt3dadd(104.09, 117.02, 15.9, 1.87)
pt3dadd(104.11, 117.04, 15.9, 1.87)
pt3dadd(104.11, 117.09, 15.9, 1.87)
pt3dadd(104.13, 117.14, 15.9, 1.87)
pt3dadd(104.15, 117.19, 15.9, 1.87)
pt3dadd(104.15, 117.29, 15.9, 1.87)
pt3dadd(104.18, 117.33, 15.9, 1.87)
pt3dadd(104.18, 117.4, 15.9, 1.87)
pt3dadd(104.19, 117.43, 15.9, 1.87)
pt3dadd(104.19, 117.53, 15.9, 1.87)
pt3dadd(104.21, 117.55, 15.9, 1.87)
pt3dadd(104.21, 117.69, 15.9, 1.87)
pt3dadd(104.24, 117.74, 15.9, 1.87)
pt3dadd(104.24, 118.78, 15.9, 1.87)
pt3dadd(104.26, 118.8, 15.9, 1.87)
pt3dadd(104.26, 118.85, 15.9, 1.87)
pt3dadd(104.28, 118.9, 15.9, 1.87)
pt3dadd(104.28, 118.97, 15.9, 1.87)
pt3dadd(104.3, 119, 15.9, 1.87)
pt3dadd(104.3, 119.04, 15.9, 1.87)
pt3dadd(104.18, 119, 15.9, 1.87)
pt3dadd(104.26, 119.09, 15.9, 1.87)
pt3dadd(104.28, 119.12, 15.9, 1.87)
pt3dadd(104.28, 119.17, 15.9, 1.87)
pt3dadd(104.32, 119.19, 15.9, 1.87)
pt3dadd(104.34, 119.21, 15.9, 1.87)
pt3dadd(104.36, 119.24, 15.9, 1.87)
pt3dadd(104.39, 119.29, 15.9, 1.87)
pt3dadd(104.41, 119.33, 15.9, 1.87)
pt3dadd(104.43, 119.36, 15.9, 1.87)
pt3dadd(104.39, 119.36, 15.9, 1.87)
pt3dadd(104.41, 119.31, 15.9, 1.87)
pt3dadd(104.41, 119.24, 15.9, 1.87)
pt3dadd(104.43, 119.26, 15.9, 1.87)
pt3dadd(104.45, 119.31, 15.9, 1.87)
pt3dadd(104.47, 119.4, 15.9, 1.87)
pt3dadd(104.49, 119.46, 15.9, 1.87)
pt3dadd(104.54, 119.57, 15.9, 1.87)
pt3dadd(104.56, 119.65, 15.9, 1.87)
pt3dadd(104.6, 119.74, 15.9, 1.87)
pt3dadd(104.6, 119.84, 15.9, 1.87)
pt3dadd(104.64, 119.93, 15.9, 1.87)
pt3dadd(104.68, 120.06, 15.9, 1.87)
pt3dadd(104.68, 120.15, 15.9, 1.87)
pt3dadd(104.71, 120.22, 15.9, 1.87)
pt3dadd(104.72, 120.3, 15.9, 1.87)
pt3dadd(104.75, 120.37, 15.9, 1.87)
pt3dadd(104.77, 120.39, 15.9, 1.87)
pt3dadd(104.79, 120.47, 15.9, 1.87)
pt3dadd(104.81, 120.54, 15.9, 1.87)
pt3dadd(104.85, 120.59, 15.9, 1.87)
pt3dadd(104.88, 120.66, 15.9, 1.87)
pt3dadd(104.92, 120.75, 15.9, 1.87)
pt3dadd(104.94, 120.81, 15.9, 1.87)
pt3dadd(104.96, 120.9, 15.9, 1.87)
pt3dadd(104.98, 120.97, 15.9, 1.87)
pt3dadd(105, 121.02, 15.9, 1.87)
pt3dadd(105.04, 121.04, 15.9, 1.87)
pt3dadd(105.04, 121.12, 15.9, 1.87)
pt3dadd(105.07, 121.17, 15.9, 1.87)
pt3dadd(105.09, 121.19, 15.9, 1.87)
pt3dadd(105.09, 121.24, 15.9, 1.87)
pt3dadd(105.11, 121.29, 15.9, 1.87)
pt3dadd(105.13, 121.33, 15.9, 1.87)
pt3dadd(105.17, 121.38, 15.9, 1.87)
pt3dadd(105.21, 121.46, 15.9, 1.87)
pt3dadd(105.21, 121.53, 15.9, 1.87)
pt3dadd(105.64, 121.53, 15.9, 1.87)
}
dend[118] {pt3dclear()
pt3dadd(105.64, 121.53, 15.9, 1.87)
pt3dadd(105.26, 121.63, 15.9, 1.87)
pt3dadd(105.28, 121.75, 15.9, 1.87)
pt3dadd(105.32, 121.79, 15.9, 1.87)
pt3dadd(105.34, 121.86, 15.9, 1.87)
pt3dadd(105.39, 121.99, 15.9, 1.87)
pt3dadd(105.4, 122.04, 15.9, 1.87)
pt3dadd(105.45, 122.15, 15.9, 1.87)
pt3dadd(105.47, 122.2, 15.9, 1.87)
pt3dadd(105.49, 122.25, 15.9, 1.87)
pt3dadd(105.53, 122.32, 15.9, 1.87)
pt3dadd(105.53, 122.39, 15.9, 1.87)
}
}
proc shape3d_172() {
dend[118] { pt3dadd(105.55, 122.44, 15.9, 1.87)
pt3dadd(105.6, 122.54, 15.9, 1.87)
pt3dadd(105.66, 122.66, 15.9, 1.87)
pt3dadd(105.68, 122.71, 15.9, 1.87)
pt3dadd(105.72, 122.76, 15.9, 1.87)
pt3dadd(105.75, 122.83, 15.9, 1.87)
pt3dadd(105.79, 122.88, 15.9, 1.87)
pt3dadd(105.79, 122.95, 15.9, 1.87)
pt3dadd(105.83, 123, 15.9, 1.87)
pt3dadd(105.85, 123.07, 15.9, 1.87)
pt3dadd(105.92, 123.12, 15.9, 1.87)
pt3dadd(105.96, 123.19, 15.9, 1.87)
pt3dadd(105.96, 123.24, 15.9, 1.87)
pt3dadd(106, 123.31, 15.9, 1.87)
pt3dadd(106.02, 123.39, 15.9, 1.87)
pt3dadd(106.06, 123.46, 15.9, 1.87)
pt3dadd(106.08, 123.5, 15.9, 1.87)
pt3dadd(106.13, 123.58, 15.9, 1.87)
pt3dadd(106.15, 123.65, 15.9, 1.87)
pt3dadd(106.19, 123.7, 15.9, 1.87)
pt3dadd(106.21, 123.75, 15.9, 1.87)
pt3dadd(106.23, 123.82, 15.9, 1.87)
pt3dadd(106.28, 123.87, 15.9, 1.87)
pt3dadd(106.3, 123.92, 15.9, 1.87)
pt3dadd(106.32, 123.99, 15.9, 1.87)
pt3dadd(106.36, 124.06, 15.9, 1.87)
pt3dadd(106.38, 124.08, 15.9, 1.87)
pt3dadd(106.4, 124.15, 15.9, 1.87)
pt3dadd(106.44, 124.23, 15.9, 1.87)
pt3dadd(106.47, 124.3, 15.9, 1.87)
pt3dadd(106.51, 124.32, 15.9, 1.87)
pt3dadd(106.55, 124.37, 15.9, 1.87)
pt3dadd(106.57, 124.42, 15.9, 1.87)
pt3dadd(106.6, 124.49, 15.9, 1.87)
pt3dadd(106.64, 124.52, 15.9, 1.87)
pt3dadd(106.66, 124.54, 15.9, 1.87)
pt3dadd(106.68, 124.61, 15.9, 1.87)
pt3dadd(106.7, 124.66, 15.9, 1.87)
pt3dadd(106.72, 124.74, 15.9, 1.87)
pt3dadd(106.74, 124.78, 15.9, 1.87)
pt3dadd(106.79, 124.86, 15.9, 1.87)
pt3dadd(106.81, 124.9, 15.9, 1.87)
pt3dadd(106.83, 124.95, 15.9, 1.87)
pt3dadd(106.83, 125.03, 15.9, 1.87)
pt3dadd(106.85, 125.07, 15.9, 1.87)
pt3dadd(106.89, 125.1, 15.9, 1.87)
pt3dadd(106.89, 125.14, 15.9, 1.87)
pt3dadd(106.91, 125.19, 15.9, 1.87)
pt3dadd(106.93, 125.26, 15.9, 1.87)
pt3dadd(106.96, 125.34, 15.9, 1.87)
pt3dadd(106.97, 125.43, 15.9, 1.87)
pt3dadd(106.97, 125.58, 15.9, 1.87)
pt3dadd(106.93, 125.58, 16.9, 1.95)
pt3dadd(106.96, 125.58, 16.9, 1.95)
pt3dadd(106.97, 125.63, 16.9, 1.95)
pt3dadd(107, 125.7, 16.9, 1.95)
pt3dadd(107.04, 125.75, 16.9, 1.95)
pt3dadd(107.06, 125.82, 16.9, 1.95)
pt3dadd(107.08, 125.87, 16.9, 1.95)
pt3dadd(107.13, 125.94, 16.9, 1.95)
pt3dadd(107.14, 125.99, 16.9, 1.95)
pt3dadd(107.17, 126.08, 16.9, 1.95)
pt3dadd(107.21, 126.16, 16.9, 1.95)
pt3dadd(107.23, 126.25, 16.9, 1.95)
pt3dadd(107.29, 126.35, 16.9, 1.95)
pt3dadd(107.29, 126.42, 16.9, 1.95)
pt3dadd(107.34, 126.5, 16.9, 1.95)
pt3dadd(107.36, 126.57, 16.9, 1.95)
pt3dadd(107.4, 126.64, 16.9, 1.95)
pt3dadd(107.44, 126.74, 16.9, 1.95)
pt3dadd(107.49, 126.83, 16.9, 1.95)
pt3dadd(107.53, 126.93, 16.9, 1.95)
pt3dadd(107.55, 126.98, 16.9, 1.95)
pt3dadd(107.59, 127.05, 16.9, 1.95)
pt3dadd(107.61, 127.12, 16.9, 1.95)
pt3dadd(107.65, 127.19, 16.9, 1.95)
pt3dadd(107.68, 127.29, 16.9, 1.95)
pt3dadd(107.72, 127.36, 16.9, 1.95)
pt3dadd(107.74, 127.43, 16.9, 1.95)
pt3dadd(107.78, 127.48, 16.9, 1.95)
pt3dadd(107.81, 127.53, 16.9, 1.95)
pt3dadd(107.82, 127.58, 16.9, 1.95)
pt3dadd(107.85, 127.65, 16.9, 1.95)
pt3dadd(107.87, 127.7, 16.9, 1.95)
pt3dadd(107.89, 127.77, 16.9, 1.95)
pt3dadd(107.93, 127.85, 16.9, 1.95)
pt3dadd(107.95, 127.89, 16.9, 1.95)
pt3dadd(107.97, 127.96, 16.9, 1.95)
pt3dadd(108.02, 128.04, 16.9, 1.95)
pt3dadd(108.06, 128.11, 16.9, 1.95)
pt3dadd(108.12, 128.16, 16.9, 1.95)
pt3dadd(108.14, 128.23, 16.9, 1.95)
pt3dadd(108.17, 128.28, 16.9, 1.95)
pt3dadd(108.21, 128.35, 16.9, 1.95)
pt3dadd(108.25, 128.43, 16.9, 1.95)
pt3dadd(108.27, 128.49, 16.9, 1.95)
pt3dadd(108.29, 128.54, 16.9, 1.95)
pt3dadd(108.33, 128.62, 16.9, 1.95)
pt3dadd(108.38, 128.66, 16.9, 1.95)
pt3dadd(108.4, 128.71, 16.9, 1.95)
pt3dadd(108.42, 128.76, 16.9, 1.95)
pt3dadd(108.46, 128.84, 16.9, 1.95)
pt3dadd(108.48, 128.88, 16.9, 1.95)
pt3dadd(108.5, 128.96, 16.9, 1.95)
pt3dadd(108.55, 129.03, 16.9, 1.95)
pt3dadd(108.57, 129.07, 16.9, 1.95)
pt3dadd(108.61, 129.12, 16.9, 1.95)
pt3dadd(108.65, 129.17, 16.9, 1.95)
pt3dadd(108.68, 129.24, 16.9, 1.95)
pt3dadd(108.69, 129.29, 16.9, 1.95)
pt3dadd(108.72, 129.32, 16.9, 1.95)
pt3dadd(108.74, 129.37, 16.9, 1.95)
pt3dadd(108.76, 129.41, 16.9, 1.95)
pt3dadd(108.78, 129.49, 16.9, 1.95)
pt3dadd(108.82, 129.53, 16.9, 1.95)
pt3dadd(108.86, 129.6, 16.9, 1.95)
pt3dadd(108.89, 129.68, 16.9, 1.95)
pt3dadd(108.91, 129.75, 16.9, 1.95)
pt3dadd(108.95, 129.8, 16.9, 1.95)
pt3dadd(108.97, 129.85, 16.9, 1.95)
pt3dadd(108.99, 129.9, 16.9, 1.95)
pt3dadd(109.01, 129.97, 16.9, 1.95)
pt3dadd(109.12, 130.09, 16.9, 1.95)
pt3dadd(109.14, 130.16, 16.9, 1.95)
pt3dadd(109.16, 130.21, 16.9, 1.95)
pt3dadd(109.21, 130.28, 16.9, 1.95)
pt3dadd(109.23, 130.35, 16.9, 1.95)
pt3dadd(109.27, 130.43, 16.9, 1.95)
pt3dadd(109.31, 130.5, 16.9, 1.95)
pt3dadd(109.33, 130.54, 16.9, 1.95)
pt3dadd(109.36, 130.6, 16.9, 1.95)
pt3dadd(109.36, 130.64, 16.9, 1.95)
pt3dadd(109.39, 130.67, 16.9, 1.95)
pt3dadd(109.42, 130.71, 16.9, 1.95)
pt3dadd(109.44, 130.76, 16.9, 1.95)
pt3dadd(109.46, 130.81, 16.9, 1.95)
pt3dadd(109.5, 130.93, 16.9, 1.95)
pt3dadd(109.52, 130.98, 16.9, 1.95)
pt3dadd(109.54, 131.05, 16.9, 1.95)
pt3dadd(109.57, 131.1, 16.9, 1.95)
pt3dadd(109.61, 131.13, 16.9, 1.95)
pt3dadd(109.63, 131.2, 16.9, 1.95)
pt3dadd(109.63, 131.27, 16.9, 1.95)
pt3dadd(109.65, 131.29, 16.9, 1.95)
pt3dadd(109.67, 131.32, 16.9, 1.95)
pt3dadd(109.69, 131.34, 16.9, 1.95)
pt3dadd(109.71, 131.39, 16.9, 1.95)
pt3dadd(109.71, 131.51, 16.9, 1.95)
pt3dadd(109.71, 131.41, 18.9, 2.04)
pt3dadd(109.71, 131.65, 18.9, 2.04)
pt3dadd(109.76, 131.75, 18.9, 2.04)
pt3dadd(109.8, 131.9, 18.9, 2.04)
pt3dadd(109.8, 132.09, 18.9, 2.04)
pt3dadd(109.84, 132.23, 18.9, 2.04)
pt3dadd(109.93, 132.43, 18.9, 2.04)
pt3dadd(109.97, 132.62, 18.9, 2.04)
pt3dadd(110.06, 132.81, 18.9, 2.04)
pt3dadd(110.1, 132.96, 18.9, 2.04)
pt3dadd(110.18, 133.2, 18.9, 2.04)
pt3dadd(110.22, 133.34, 18.9, 2.04)
pt3dadd(110.27, 133.49, 18.9, 2.04)
pt3dadd(110.31, 133.54, 18.9, 2.04)
pt3dadd(110.39, 133.63, 18.9, 2.04)
pt3dadd(110.39, 133.78, 18.9, 2.04)
pt3dadd(110.48, 133.92, 18.9, 2.04)
pt3dadd(110.52, 134.07, 18.9, 2.04)
pt3dadd(110.61, 134.12, 18.9, 2.04)
pt3dadd(110.61, 134.26, 18.9, 2.04)
pt3dadd(110.65, 134.31, 18.9, 2.04)
pt3dadd(110.69, 134.4, 18.9, 2.04)
pt3dadd(110.78, 134.45, 18.9, 2.04)
pt3dadd(110.82, 134.55, 18.9, 2.04)
pt3dadd(110.86, 134.65, 18.9, 2.04)
pt3dadd(110.9, 134.74, 18.9, 2.04)
pt3dadd(110.94, 134.93, 18.9, 2.04)
pt3dadd(110.94, 135.03, 18.9, 2.04)
pt3dadd(110.99, 135.13, 18.9, 2.04)
pt3dadd(111.07, 135.22, 18.9, 2.04)
pt3dadd(111.07, 135.37, 18.9, 2.04)
pt3dadd(111.16, 135.46, 18.9, 2.04)
pt3dadd(111.24, 135.61, 18.9, 2.04)
pt3dadd(111.24, 135.85, 18.9, 2.04)
pt3dadd(111.33, 136.04, 18.9, 2.04)
pt3dadd(111.37, 136.09, 18.9, 2.04)
pt3dadd(111.37, 136.29, 18.9, 2.04)
pt3dadd(111.46, 136.52, 18.9, 2.04)
pt3dadd(111.5, 136.62, 18.9, 2.04)
pt3dadd(111.54, 136.72, 18.9, 2.04)
pt3dadd(111.58, 136.82, 18.9, 2.04)
pt3dadd(111.58, 136.96, 18.9, 2.04)
pt3dadd(111.63, 137.05, 18.9, 2.04)
pt3dadd(111.67, 137.15, 18.9, 2.04)
pt3dadd(111.67, 137.4, 18.9, 2.04)
pt3dadd(111.71, 137.49, 18.9, 2.04)
pt3dadd(111.75, 137.59, 18.9, 2.04)
pt3dadd(111.79, 137.68, 18.9, 2.04)
pt3dadd(111.79, 137.78, 18.9, 2.04)
pt3dadd(111.84, 137.83, 18.9, 2.04)
pt3dadd(111.84, 137.97, 18.9, 2.04)
pt3dadd(111.88, 138.02, 18.9, 2.04)
}
}
proc shape3d_173() {
dend[118] { pt3dadd(111.92, 138.07, 18.9, 2.04)
pt3dadd(111.92, 138.16, 18.9, 2.04)
pt3dadd(111.96, 138.21, 18.9, 2.04)
pt3dadd(112.01, 138.26, 18.9, 2.04)
pt3dadd(112.05, 138.36, 18.9, 2.04)
pt3dadd(112.01, 138.36, 21.9, 2.04)
pt3dadd(112.01, 138.5, 21.9, 2.04)
pt3dadd(112.09, 138.6, 21.9, 2.04)
pt3dadd(112.09, 138.74, 21.9, 2.04)
pt3dadd(112.14, 138.89, 21.9, 2.04)
pt3dadd(112.22, 138.99, 21.9, 2.04)
pt3dadd(112.22, 139.08, 21.9, 2.04)
pt3dadd(112.26, 139.23, 21.9, 2.04)
pt3dadd(112.35, 139.37, 21.9, 2.04)
pt3dadd(112.39, 139.47, 21.9, 2.04)
pt3dadd(112.43, 139.57, 21.9, 2.04)
pt3dadd(112.47, 139.66, 21.9, 2.04)
pt3dadd(112.47, 139.8, 21.9, 2.04)
pt3dadd(112.52, 139.9, 21.9, 2.04)
pt3dadd(112.56, 139.95, 21.9, 2.04)
pt3dadd(112.6, 140.1, 21.9, 2.04)
pt3dadd(112.64, 140.19, 21.9, 2.04)
pt3dadd(112.69, 140.29, 21.9, 2.04)
pt3dadd(112.69, 140.38, 21.9, 2.04)
pt3dadd(112.82, 140.53, 21.9, 2.04)
pt3dadd(112.86, 140.63, 21.9, 2.04)
pt3dadd(112.86, 140.77, 21.9, 2.04)
pt3dadd(112.9, 140.87, 21.9, 2.04)
pt3dadd(112.94, 140.96, 21.9, 2.04)
pt3dadd(112.99, 141.01, 21.9, 2.04)
pt3dadd(112.99, 141.15, 21.9, 2.04)
pt3dadd(113.07, 141.2, 21.9, 2.04)
pt3dadd(113.11, 141.35, 21.9, 2.04)
pt3dadd(113.15, 141.54, 21.9, 2.04)
pt3dadd(113.24, 141.68, 21.9, 2.04)
pt3dadd(113.28, 141.88, 21.9, 2.04)
pt3dadd(113.32, 142.02, 21.9, 2.04)
pt3dadd(113.41, 142.12, 21.9, 2.04)
pt3dadd(113.41, 142.31, 21.9, 2.04)
pt3dadd(113.49, 142.41, 21.9, 2.04)
pt3dadd(113.54, 142.51, 21.9, 2.04)
pt3dadd(113.58, 142.65, 21.9, 2.04)
pt3dadd(113.58, 142.89, 21.9, 2.04)
pt3dadd(113.66, 142.99, 21.9, 2.04)
pt3dadd(113.71, 143.04, 21.9, 2.04)
pt3dadd(113.75, 143.13, 21.9, 2.04)
pt3dadd(113.83, 143.23, 21.9, 2.04)
pt3dadd(113.92, 143.37, 21.9, 2.04)
pt3dadd(114, 143.62, 21.9, 2.04)
pt3dadd(114.09, 143.81, 21.9, 2.04)
pt3dadd(114.13, 144.05, 21.9, 2.04)
pt3dadd(114.26, 144.24, 21.9, 2.04)
pt3dadd(114.39, 144.53, 21.9, 2.04)
pt3dadd(114.47, 144.73, 21.9, 2.04)
pt3dadd(114.56, 144.92, 21.9, 2.04)
pt3dadd(114.64, 145.01, 21.9, 2.04)
pt3dadd(114.68, 145.16, 21.9, 2.04)
pt3dadd(114.72, 145.3, 21.9, 2.04)
pt3dadd(114.81, 145.45, 21.9, 2.04)
pt3dadd(114.89, 145.54, 21.9, 2.04)
pt3dadd(114.94, 145.69, 21.9, 2.04)
pt3dadd(115.02, 145.79, 21.9, 2.04)
pt3dadd(115.11, 145.93, 21.9, 2.04)
pt3dadd(115.15, 146.02, 21.9, 2.04)
pt3dadd(115.19, 146.12, 21.9, 2.04)
pt3dadd(115.28, 146.22, 21.9, 2.04)
pt3dadd(115.32, 146.32, 21.9, 2.04)
pt3dadd(115.36, 146.36, 21.9, 2.04)
pt3dadd(115.45, 146.41, 21.9, 2.04)
pt3dadd(115.53, 146.51, 21.9, 2.04)
pt3dadd(115.62, 146.56, 21.9, 2.04)
pt3dadd(115.66, 146.6, 21.9, 2.04)
pt3dadd(115.7, 146.65, 21.9, 2.04)
pt3dadd(115.75, 146.7, 21.9, 2.04)
pt3dadd(115.79, 146.75, 21.9, 2.04)
pt3dadd(115.83, 146.8, 21.9, 2.04)
pt3dadd(115.53, 146.51, 24.9, 2.04)
pt3dadd(115.53, 146.46, 24.9, 2.04)
pt3dadd(115.57, 146.51, 24.9, 2.04)
pt3dadd(115.62, 146.56, 24.9, 2.04)
pt3dadd(115.66, 146.65, 24.9, 2.04)
pt3dadd(115.7, 146.85, 24.9, 2.04)
pt3dadd(115.79, 146.99, 24.9, 2.04)
pt3dadd(115.83, 147.18, 24.9, 2.04)
pt3dadd(115.91, 147.33, 24.9, 2.04)
pt3dadd(116, 147.57, 24.9, 2.04)
pt3dadd(116.04, 147.71, 24.9, 2.04)
pt3dadd(116.08, 147.81, 24.9, 2.04)
pt3dadd(116.17, 147.91, 24.9, 2.04)
pt3dadd(116.25, 147.96, 24.9, 2.04)
pt3dadd(116.25, 148.05, 24.9, 2.04)
pt3dadd(116.29, 148.1, 24.9, 2.04)
pt3dadd(116.34, 148.2, 24.9, 2.04)
pt3dadd(116.38, 148.29, 24.9, 2.04)
pt3dadd(116.42, 148.39, 24.9, 2.04)
pt3dadd(116.46, 148.44, 24.9, 2.04)
pt3dadd(116.55, 148.58, 24.9, 2.04)
pt3dadd(116.59, 148.68, 24.9, 2.04)
pt3dadd(116.64, 148.77, 24.9, 2.04)
pt3dadd(116.68, 148.87, 24.9, 2.04)
pt3dadd(116.72, 148.97, 24.9, 2.04)
pt3dadd(116.76, 149.11, 24.9, 2.04)
pt3dadd(116.81, 149.21, 24.9, 2.04)
pt3dadd(116.85, 149.3, 24.9, 2.04)
pt3dadd(116.89, 149.45, 24.9, 2.04)
pt3dadd(116.97, 149.55, 24.9, 2.04)
pt3dadd(117.02, 149.69, 24.9, 2.04)
pt3dadd(117.06, 149.79, 24.9, 2.04)
pt3dadd(117.1, 149.84, 24.9, 2.04)
pt3dadd(117.14, 149.98, 24.9, 2.04)
pt3dadd(117.14, 150.08, 24.9, 2.04)
pt3dadd(117.19, 150.13, 24.9, 2.04)
pt3dadd(117.23, 150.17, 24.9, 2.04)
pt3dadd(117.27, 150.27, 24.9, 2.04)
pt3dadd(117.32, 150.41, 24.9, 2.04)
pt3dadd(117.4, 150.56, 24.9, 2.04)
pt3dadd(117.44, 150.65, 24.9, 2.04)
pt3dadd(117.49, 150.75, 24.9, 2.04)
pt3dadd(117.57, 150.8, 24.9, 2.04)
pt3dadd(117.61, 150.9, 24.9, 2.04)
pt3dadd(117.65, 150.99, 24.9, 2.04)
pt3dadd(117.78, 151.14, 24.9, 2.04)
pt3dadd(117.82, 151.24, 24.9, 2.04)
pt3dadd(117.95, 151.38, 24.9, 2.04)
pt3dadd(118, 151.48, 24.9, 2.04)
pt3dadd(118.04, 151.57, 24.9, 2.04)
pt3dadd(118.08, 151.67, 24.9, 2.04)
pt3dadd(118.12, 151.76, 24.9, 2.04)
pt3dadd(118.17, 151.86, 24.9, 2.04)
pt3dadd(118.25, 151.91, 24.9, 2.04)
pt3dadd(118.25, 152.01, 24.9, 2.04)
pt3dadd(118.29, 152.05, 24.9, 2.04)
pt3dadd(118.33, 152.15, 24.9, 2.04)
pt3dadd(118.42, 152.25, 24.9, 2.04)
pt3dadd(118.46, 152.34, 24.9, 2.04)
pt3dadd(118.5, 152.44, 24.9, 2.04)
pt3dadd(118.59, 152.59, 24.9, 2.04)
pt3dadd(118.63, 152.68, 24.9, 2.04)
pt3dadd(118.67, 152.82, 24.9, 2.04)
pt3dadd(118.71, 152.88, 24.9, 2.04)
pt3dadd(118.8, 152.97, 24.9, 2.04)
pt3dadd(118.8, 153.16, 24.9, 2.04)
pt3dadd(118.89, 153.26, 24.9, 2.04)
pt3dadd(118.93, 153.4, 24.9, 2.04)
pt3dadd(118.97, 153.5, 24.9, 2.04)
pt3dadd(119.06, 153.65, 24.9, 2.04)
pt3dadd(119.1, 153.79, 24.9, 2.04)
pt3dadd(119.18, 153.93, 24.9, 2.04)
pt3dadd(119.27, 154.03, 24.9, 2.04)
pt3dadd(119.31, 154.18, 24.9, 2.04)
pt3dadd(119.44, 154.27, 24.9, 2.04)
pt3dadd(119.44, 154.42, 24.9, 2.04)
pt3dadd(119.52, 154.46, 24.9, 2.04)
pt3dadd(119.57, 154.56, 24.9, 2.04)
pt3dadd(119.61, 154.71, 24.9, 2.04)
pt3dadd(119.65, 154.76, 24.9, 2.04)
pt3dadd(119.69, 154.85, 24.9, 2.04)
pt3dadd(119.74, 154.95, 24.9, 2.04)
pt3dadd(119.78, 155.04, 24.9, 2.04)
pt3dadd(119.82, 155.14, 24.9, 2.04)
pt3dadd(119.86, 155.24, 24.9, 2.04)
pt3dadd(119.9, 155.33, 24.9, 2.04)
pt3dadd(119.95, 155.43, 24.9, 2.04)
pt3dadd(120.03, 155.57, 24.9, 2.04)
pt3dadd(120.07, 155.67, 24.9, 2.04)
pt3dadd(120.12, 155.77, 24.9, 2.04)
pt3dadd(120.12, 155.87, 24.9, 2.04)
pt3dadd(120.16, 156.01, 24.9, 2.04)
pt3dadd(120.2, 156.15, 24.9, 2.04)
pt3dadd(120.2, 156.68, 24.9, 2.04)
pt3dadd(119.99, 156.4, 26.9, 2.04)
pt3dadd(119.99, 156.3, 26.9, 2.04)
pt3dadd(120.03, 156.35, 26.9, 2.04)
pt3dadd(120.07, 156.44, 26.9, 2.04)
pt3dadd(120.12, 156.59, 26.9, 2.04)
pt3dadd(120.16, 156.73, 26.9, 2.04)
pt3dadd(120.2, 156.78, 26.9, 2.04)
pt3dadd(120.25, 156.93, 26.9, 2.04)
pt3dadd(120.25, 157.07, 26.9, 2.04)
pt3dadd(120.29, 157.21, 26.9, 2.04)
pt3dadd(120.33, 157.36, 26.9, 2.04)
pt3dadd(120.37, 157.41, 26.9, 2.04)
pt3dadd(120.37, 157.5, 26.9, 2.04)
pt3dadd(120.42, 157.6, 26.9, 2.04)
pt3dadd(120.46, 157.7, 26.9, 2.04)
pt3dadd(120.5, 157.84, 26.9, 2.04)
pt3dadd(120.5, 157.94, 26.9, 2.04)
pt3dadd(120.54, 157.99, 26.9, 2.04)
pt3dadd(120.58, 158.04, 26.9, 2.04)
pt3dadd(120.63, 158.13, 26.9, 2.04)
pt3dadd(120.67, 158.23, 26.9, 2.04)
pt3dadd(120.71, 158.27, 26.9, 2.04)
pt3dadd(120.75, 158.42, 26.9, 2.04)
pt3dadd(120.84, 158.52, 26.9, 2.04)
pt3dadd(120.88, 158.61, 26.9, 2.04)
pt3dadd(120.93, 158.71, 26.9, 2.04)
pt3dadd(121.01, 158.8, 26.9, 2.04)
pt3dadd(121.05, 159, 26.9, 2.04)
pt3dadd(121.14, 159.14, 26.9, 2.04)
pt3dadd(121.26, 159.29, 26.9, 2.04)
}
}
proc shape3d_174() {
dend[118] { pt3dadd(121.31, 159.43, 26.9, 2.04)
pt3dadd(121.35, 159.53, 26.9, 2.04)
pt3dadd(121.43, 159.72, 26.9, 2.04)
pt3dadd(121.47, 159.82, 26.9, 2.04)
pt3dadd(121.52, 159.96, 26.9, 2.04)
pt3dadd(121.6, 160.06, 26.9, 2.04)
pt3dadd(121.64, 160.15, 26.9, 2.04)
pt3dadd(121.69, 160.21, 26.9, 2.04)
pt3dadd(121.77, 160.35, 26.9, 2.04)
pt3dadd(121.82, 160.4, 26.9, 2.04)
pt3dadd(121.86, 160.45, 26.9, 2.04)
pt3dadd(121.94, 160.54, 26.9, 2.04)
pt3dadd(121.99, 160.59, 26.9, 2.04)
pt3dadd(122.11, 160.74, 26.9, 2.04)
pt3dadd(122.15, 160.78, 26.9, 2.04)
pt3dadd(122.2, 160.83, 26.9, 2.04)
pt3dadd(122.24, 160.93, 26.9, 2.04)
pt3dadd(122.28, 160.98, 26.9, 2.04)
pt3dadd(122.37, 161.12, 26.9, 2.04)
pt3dadd(122.45, 161.22, 26.9, 2.04)
pt3dadd(122.5, 161.31, 26.9, 2.04)
pt3dadd(122.54, 161.41, 26.9, 2.04)
pt3dadd(122.58, 161.46, 26.9, 2.04)
pt3dadd(122.67, 161.55, 26.9, 2.04)
pt3dadd(122.71, 161.7, 26.9, 2.04)
pt3dadd(122.75, 161.79, 26.9, 2.04)
pt3dadd(122.83, 161.85, 26.9, 2.04)
pt3dadd(122.92, 161.94, 26.9, 2.04)
pt3dadd(122.92, 162.09, 26.9, 2.04)
pt3dadd(123, 162.13, 26.9, 2.04)
pt3dadd(123.09, 162.23, 26.9, 2.04)
pt3dadd(123.18, 162.38, 26.9, 2.04)
pt3dadd(123.22, 162.47, 26.9, 2.04)
pt3dadd(123.3, 162.62, 26.9, 2.04)
pt3dadd(123.39, 162.71, 26.9, 2.04)
pt3dadd(123.43, 162.81, 26.9, 2.04)
pt3dadd(123.56, 162.95, 26.9, 2.04)
pt3dadd(123.64, 163, 26.9, 2.04)
pt3dadd(123.68, 163.1, 26.9, 2.04)
pt3dadd(123.72, 163.15, 26.9, 2.04)
pt3dadd(123.81, 163.2, 26.9, 2.04)
pt3dadd(123.85, 163.29, 26.9, 2.04)
pt3dadd(123.89, 163.34, 26.9, 2.04)
pt3dadd(123.94, 163.39, 26.9, 2.04)
pt3dadd(124.02, 163.43, 26.9, 2.04)
pt3dadd(124.11, 163.48, 26.9, 2.04)
pt3dadd(124.19, 163.53, 26.9, 2.04)
pt3dadd(124.24, 163.58, 26.9, 2.04)
pt3dadd(124.32, 163.63, 26.9, 2.04)
pt3dadd(124.36, 163.68, 26.9, 2.04)
pt3dadd(124.49, 163.68, 26.9, 2.04)
pt3dadd(124.57, 163.73, 26.9, 2.04)
pt3dadd(124.66, 163.77, 26.9, 2.04)
pt3dadd(124.75, 163.82, 26.9, 2.04)
pt3dadd(124.79, 163.87, 26.9, 2.04)
pt3dadd(124.87, 163.87, 26.9, 2.04)
pt3dadd(124.96, 163.92, 26.9, 2.04)
pt3dadd(125.04, 163.96, 26.9, 2.04)
pt3dadd(125.08, 164.01, 26.9, 2.04)
pt3dadd(125.17, 164.06, 26.9, 2.04)
pt3dadd(125.3, 164.21, 26.9, 2.04)
pt3dadd(125.34, 164.26, 26.9, 2.04)
pt3dadd(125.43, 164.3, 26.9, 2.04)
pt3dadd(125.51, 164.35, 26.9, 2.04)
pt3dadd(125.6, 164.4, 26.9, 2.04)
pt3dadd(125.64, 164.45, 26.9, 2.04)
pt3dadd(125.68, 164.5, 26.9, 2.04)
pt3dadd(125.76, 164.54, 26.9, 2.04)
pt3dadd(125.85, 164.59, 26.9, 2.04)
pt3dadd(125.89, 164.64, 26.9, 2.04)
pt3dadd(125.93, 164.69, 26.9, 2.04)
pt3dadd(125.98, 164.74, 26.9, 2.04)
pt3dadd(126.06, 164.79, 26.9, 2.04)
pt3dadd(126.15, 164.84, 26.9, 2.04)
pt3dadd(126.23, 164.88, 26.9, 2.04)
pt3dadd(126.32, 164.93, 26.9, 2.04)
pt3dadd(126.4, 164.98, 26.9, 2.04)
pt3dadd(126.44, 165.03, 26.9, 2.04)
pt3dadd(126.49, 165.07, 26.9, 2.04)
pt3dadd(126.53, 165.12, 26.9, 2.04)
pt3dadd(126.61, 165.17, 26.9, 2.04)
pt3dadd(126.61, 165.27, 26.9, 2.04)
pt3dadd(126.65, 165.32, 26.9, 2.04)
pt3dadd(126.7, 165.37, 26.9, 2.04)
pt3dadd(126.74, 165.41, 26.9, 2.04)
pt3dadd(126.78, 165.46, 26.9, 2.04)
pt3dadd(126.82, 165.51, 26.9, 2.04)
pt3dadd(126.87, 165.56, 26.9, 2.04)
pt3dadd(126.91, 165.6, 26.9, 2.04)
pt3dadd(126.91, 166.04, 26.9, 2.04)
pt3dadd(126.91, 165.8, 30.9, 2.04)
pt3dadd(126.91, 167.29, 30.9, 2.04)
pt3dadd(126.87, 167.34, 30.9, 2.04)
pt3dadd(126.87, 168.98, 30.9, 2.04)
pt3dadd(126.91, 169.08, 30.9, 2.04)
pt3dadd(126.91, 169.22, 30.9, 2.04)
pt3dadd(126.95, 169.27, 30.9, 2.04)
pt3dadd(126.95, 169.51, 30.9, 2.04)
pt3dadd(127, 169.71, 30.9, 2.04)
pt3dadd(127.04, 169.85, 30.9, 2.04)
pt3dadd(127.04, 169.99, 30.9, 2.04)
pt3dadd(127.08, 170.09, 30.9, 2.04)
pt3dadd(127.17, 170.24, 30.9, 2.04)
pt3dadd(127.21, 170.43, 30.9, 2.04)
pt3dadd(127.25, 170.52, 30.9, 2.04)
pt3dadd(127.29, 170.62, 30.9, 2.04)
pt3dadd(127.33, 170.72, 30.9, 2.04)
pt3dadd(127.33, 170.82, 30.9, 2.04)
pt3dadd(127.38, 170.91, 30.9, 2.04)
pt3dadd(127.46, 171.01, 30.9, 2.04)
pt3dadd(127.46, 171.15, 30.9, 2.04)
pt3dadd(127.5, 171.25, 30.9, 2.04)
pt3dadd(127.55, 171.35, 30.9, 2.04)
pt3dadd(127.59, 171.49, 30.9, 2.04)
pt3dadd(127.63, 171.63, 30.9, 2.04)
pt3dadd(127.72, 171.78, 30.9, 2.04)
pt3dadd(127.72, 171.88, 30.9, 2.04)
pt3dadd(127.8, 171.97, 30.9, 2.04)
pt3dadd(127.85, 172.02, 30.9, 2.04)
pt3dadd(127.89, 172.16, 30.9, 2.04)
pt3dadd(127.97, 172.31, 30.9, 2.04)
pt3dadd(127.97, 172.4, 30.9, 2.04)
pt3dadd(128.06, 172.5, 30.9, 2.04)
pt3dadd(128.06, 172.65, 30.9, 2.04)
pt3dadd(128.14, 172.79, 30.9, 2.04)
pt3dadd(128.18, 172.93, 30.9, 2.04)
pt3dadd(128.31, 173.08, 30.9, 2.04)
pt3dadd(128.35, 173.18, 30.9, 2.04)
pt3dadd(128.4, 173.23, 30.9, 2.04)
pt3dadd(128.4, 173.32, 30.9, 2.04)
pt3dadd(128.48, 173.32, 30.9, 2.04)
pt3dadd(128.48, 173.42, 30.9, 2.04)
pt3dadd(128.52, 173.47, 30.9, 2.04)
pt3dadd(128.52, 173.56, 30.9, 2.04)
pt3dadd(128.61, 173.56, 30.9, 2.04)
pt3dadd(128.61, 173.76, 30.9, 2.04)
pt3dadd(128.44, 173.51, 33.9, 2.04)
pt3dadd(128.48, 173.56, 33.9, 2.04)
pt3dadd(128.61, 173.66, 33.9, 2.04)
pt3dadd(128.7, 173.76, 33.9, 2.04)
pt3dadd(128.74, 173.85, 33.9, 2.04)
pt3dadd(128.82, 174, 33.9, 2.04)
pt3dadd(128.95, 174.14, 33.9, 2.04)
pt3dadd(129.03, 174.24, 33.9, 2.04)
pt3dadd(129.16, 174.43, 33.9, 2.04)
pt3dadd(129.24, 174.67, 33.9, 2.04)
pt3dadd(129.33, 174.77, 33.9, 2.04)
pt3dadd(129.41, 174.91, 33.9, 2.04)
pt3dadd(129.5, 175.06, 33.9, 2.04)
pt3dadd(129.59, 175.2, 33.9, 2.04)
pt3dadd(129.63, 175.3, 33.9, 2.04)
pt3dadd(129.67, 175.35, 33.9, 2.04)
pt3dadd(129.71, 175.44, 33.9, 2.04)
pt3dadd(129.76, 175.54, 33.9, 2.04)
pt3dadd(129.8, 175.64, 33.9, 2.04)
pt3dadd(129.84, 175.68, 33.9, 2.04)
pt3dadd(129.93, 175.78, 33.9, 2.04)
pt3dadd(130.01, 175.83, 33.9, 2.04)
pt3dadd(130.05, 175.93, 33.9, 2.04)
pt3dadd(130.1, 175.98, 33.9, 2.04)
pt3dadd(130.14, 176.07, 33.9, 2.04)
pt3dadd(130.22, 176.21, 33.9, 2.04)
pt3dadd(130.31, 176.36, 33.9, 2.04)
pt3dadd(130.35, 176.6, 33.9, 2.04)
pt3dadd(130.48, 176.74, 33.9, 2.04)
pt3dadd(130.56, 176.89, 33.9, 2.04)
pt3dadd(130.6, 177.08, 33.9, 2.04)
pt3dadd(130.69, 177.18, 33.9, 2.04)
pt3dadd(130.73, 177.23, 33.9, 2.04)
pt3dadd(130.82, 177.37, 33.9, 2.04)
pt3dadd(130.82, 177.47, 33.9, 2.04)
pt3dadd(130.9, 177.57, 33.9, 2.04)
pt3dadd(130.99, 177.71, 33.9, 2.04)
pt3dadd(131.07, 177.81, 33.9, 2.04)
pt3dadd(131.12, 177.95, 33.9, 2.04)
pt3dadd(131.2, 178.1, 33.9, 2.04)
pt3dadd(131.29, 178.19, 33.9, 2.04)
pt3dadd(131.33, 178.34, 33.9, 2.04)
pt3dadd(131.41, 178.48, 33.9, 2.04)
pt3dadd(131.46, 178.58, 33.9, 2.04)
pt3dadd(131.5, 178.72, 33.9, 2.04)
pt3dadd(131.54, 178.82, 33.9, 2.04)
pt3dadd(131.58, 178.91, 33.9, 2.04)
pt3dadd(131.62, 179.01, 33.9, 2.04)
pt3dadd(131.66, 179.16, 33.9, 2.04)
pt3dadd(131.71, 179.25, 33.9, 2.04)
pt3dadd(131.75, 179.35, 33.9, 2.04)
pt3dadd(131.79, 179.45, 33.9, 2.04)
pt3dadd(131.84, 179.59, 33.9, 2.04)
pt3dadd(131.88, 179.64, 33.9, 2.04)
pt3dadd(131.92, 179.74, 33.9, 2.04)
pt3dadd(131.96, 179.83, 33.9, 2.04)
pt3dadd(131.96, 179.93, 33.9, 2.04)
pt3dadd(132.05, 180.07, 33.9, 2.04)
pt3dadd(132.13, 180.17, 33.9, 2.04)
pt3dadd(132.18, 180.22, 33.9, 2.04)
pt3dadd(132.22, 180.32, 33.9, 2.04)
pt3dadd(132.26, 180.41, 33.9, 2.04)
pt3dadd(132.35, 180.51, 33.9, 2.04)
pt3dadd(132.35, 180.6, 33.9, 2.04)
}
}
proc shape3d_175() {
dend[118] { pt3dadd(132.47, 180.75, 33.9, 2.04)
pt3dadd(132.51, 180.89, 33.9, 2.04)
pt3dadd(132.56, 180.94, 33.9, 2.04)
pt3dadd(132.64, 180.99, 33.9, 2.04)
pt3dadd(132.68, 181.04, 33.9, 2.04)
pt3dadd(132.68, 181.18, 33.9, 2.04)
pt3dadd(132.73, 181.23, 33.9, 2.04)
pt3dadd(132.77, 181.28, 33.9, 2.04)
pt3dadd(132.77, 181.52, 33.9, 2.04)
pt3dadd(132.56, 181.28, 36.9, 2.04)
pt3dadd(132.56, 181.23, 36.9, 2.04)
pt3dadd(132.6, 181.33, 36.9, 2.04)
pt3dadd(132.68, 181.47, 36.9, 2.04)
pt3dadd(132.73, 181.66, 36.9, 2.04)
pt3dadd(132.85, 181.9, 36.9, 2.04)
pt3dadd(132.94, 182.15, 36.9, 2.04)
pt3dadd(133.02, 182.39, 36.9, 2.04)
pt3dadd(133.11, 182.58, 36.9, 2.04)
pt3dadd(133.2, 182.73, 36.9, 2.04)
pt3dadd(133.24, 182.87, 36.9, 2.04)
pt3dadd(133.24, 183.06, 36.9, 2.04)
pt3dadd(133.28, 183.16, 36.9, 2.04)
pt3dadd(133.32, 183.35, 36.9, 2.04)
pt3dadd(133.41, 183.5, 36.9, 2.04)
pt3dadd(133.45, 183.64, 36.9, 2.04)
pt3dadd(133.49, 183.84, 36.9, 2.04)
pt3dadd(133.54, 184.03, 36.9, 2.04)
pt3dadd(133.58, 184.17, 36.9, 2.04)
pt3dadd(133.58, 184.32, 36.9, 2.04)
pt3dadd(133.62, 184.41, 36.9, 2.04)
pt3dadd(133.66, 184.56, 36.9, 2.04)
pt3dadd(133.71, 184.65, 36.9, 2.04)
pt3dadd(133.75, 184.75, 36.9, 2.04)
pt3dadd(133.79, 184.9, 36.9, 2.04)
pt3dadd(133.83, 185.04, 36.9, 2.04)
pt3dadd(133.88, 185.14, 36.9, 2.04)
pt3dadd(133.92, 185.28, 36.9, 2.04)
pt3dadd(133.96, 185.38, 36.9, 2.04)
pt3dadd(134, 185.48, 36.9, 2.04)
pt3dadd(134.04, 185.52, 36.9, 2.04)
pt3dadd(134.04, 185.71, 36.9, 2.04)
pt3dadd(134.09, 185.81, 36.9, 2.04)
pt3dadd(134.13, 185.91, 36.9, 2.04)
pt3dadd(134.17, 186.01, 36.9, 2.04)
pt3dadd(134.21, 186.1, 36.9, 2.04)
pt3dadd(134.26, 186.2, 36.9, 2.04)
pt3dadd(134.3, 186.24, 36.9, 2.04)
pt3dadd(134.3, 186.39, 36.9, 2.04)
pt3dadd(134.38, 186.44, 36.9, 2.04)
pt3dadd(134.43, 186.54, 36.9, 2.04)
pt3dadd(134.47, 186.73, 36.9, 2.04)
pt3dadd(134.51, 186.78, 36.9, 2.04)
pt3dadd(134.51, 186.87, 36.9, 2.04)
pt3dadd(134.55, 186.97, 36.9, 2.04)
pt3dadd(134.6, 187.02, 36.9, 2.04)
pt3dadd(134.6, 187.16, 36.9, 2.04)
pt3dadd(134.68, 187.16, 36.9, 2.04)
pt3dadd(134.68, 187.26, 36.9, 2.04)
pt3dadd(134.76, 187.31, 36.9, 2.04)
pt3dadd(134.76, 187.4, 36.9, 2.04)
pt3dadd(134.85, 187.5, 36.9, 2.04)
pt3dadd(134.85, 187.6, 36.9, 2.04)
pt3dadd(134.89, 187.65, 36.9, 2.04)
pt3dadd(134.93, 187.69, 36.9, 2.04)
pt3dadd(134.98, 187.79, 36.9, 2.04)
pt3dadd(135.02, 187.84, 36.9, 2.04)
pt3dadd(135.06, 187.88, 36.9, 2.04)
pt3dadd(135.1, 187.93, 36.9, 2.04)
pt3dadd(135.15, 187.98, 36.9, 2.04)
pt3dadd(135.19, 188.03, 36.9, 2.04)
pt3dadd(135.23, 188.08, 36.9, 2.04)
pt3dadd(135.23, 188.18, 36.9, 2.04)
pt3dadd(135.27, 188.22, 36.9, 2.04)
pt3dadd(135.32, 188.27, 36.9, 2.04)
pt3dadd(135.36, 188.37, 36.9, 2.04)
pt3dadd(135.4, 188.41, 36.9, 2.04)
pt3dadd(135.49, 188.46, 36.9, 2.04)
pt3dadd(135.53, 188.56, 36.9, 2.04)
pt3dadd(135.57, 188.66, 36.9, 2.04)
pt3dadd(135.62, 188.75, 36.9, 2.04)
pt3dadd(135.66, 188.85, 36.9, 2.04)
pt3dadd(135.7, 188.9, 36.9, 2.04)
pt3dadd(135.74, 188.95, 36.9, 2.04)
pt3dadd(135.79, 189.04, 36.9, 2.04)
pt3dadd(135.83, 189.14, 36.9, 2.04)
pt3dadd(135.83, 189.24, 36.9, 2.04)
pt3dadd(135.87, 189.29, 36.9, 2.04)
pt3dadd(135.91, 189.33, 36.9, 2.04)
pt3dadd(135.96, 189.48, 36.9, 2.04)
pt3dadd(136, 189.52, 36.9, 2.04)
pt3dadd(136.04, 189.62, 36.9, 2.04)
pt3dadd(136.08, 189.72, 36.9, 2.04)
pt3dadd(136.08, 189.82, 36.9, 2.04)
pt3dadd(136.13, 189.86, 36.9, 2.04)
pt3dadd(136.17, 189.91, 36.9, 2.04)
pt3dadd(136.17, 190.05, 36.9, 2.04)
pt3dadd(136.21, 190.15, 36.9, 2.04)
pt3dadd(136.21, 190.25, 36.9, 2.04)
pt3dadd(136.25, 190.3, 36.9, 2.04)
pt3dadd(136.25, 190.63, 36.9, 2.04)
pt3dadd(136, 190.3, 37.9, 2.04)
pt3dadd(136, 190.2, 37.9, 2.04)
pt3dadd(136.04, 190.25, 37.9, 2.04)
pt3dadd(136.13, 190.3, 37.9, 2.04)
pt3dadd(136.17, 190.49, 37.9, 2.04)
pt3dadd(136.25, 190.59, 37.9, 2.04)
pt3dadd(136.29, 190.68, 37.9, 2.04)
pt3dadd(136.34, 190.78, 37.9, 2.04)
pt3dadd(136.38, 190.83, 37.9, 2.04)
pt3dadd(136.42, 190.93, 37.9, 2.04)
pt3dadd(136.51, 191.07, 37.9, 2.04)
pt3dadd(136.55, 191.21, 37.9, 2.04)
pt3dadd(136.63, 191.31, 37.9, 2.04)
pt3dadd(136.68, 191.46, 37.9, 2.04)
pt3dadd(136.72, 191.55, 37.9, 2.04)
pt3dadd(136.8, 191.7, 37.9, 2.04)
pt3dadd(136.85, 191.79, 37.9, 2.04)
pt3dadd(136.93, 191.94, 37.9, 2.04)
pt3dadd(136.97, 192.03, 37.9, 2.04)
pt3dadd(137.06, 192.13, 37.9, 2.04)
pt3dadd(137.14, 192.23, 37.9, 2.04)
pt3dadd(137.18, 192.32, 37.9, 2.04)
pt3dadd(137.23, 192.42, 37.9, 2.04)
pt3dadd(137.35, 192.51, 37.9, 2.04)
pt3dadd(137.4, 192.71, 37.9, 2.04)
pt3dadd(137.52, 192.85, 37.9, 2.04)
pt3dadd(137.61, 192.95, 37.9, 2.04)
pt3dadd(137.65, 193.04, 37.9, 2.04)
pt3dadd(137.7, 193.14, 37.9, 2.04)
pt3dadd(137.74, 193.24, 37.9, 2.04)
pt3dadd(137.82, 193.34, 37.9, 2.04)
pt3dadd(137.91, 193.43, 37.9, 2.04)
pt3dadd(137.99, 193.58, 37.9, 2.04)
pt3dadd(138.08, 193.77, 37.9, 2.04)
pt3dadd(138.29, 194.01, 37.9, 2.04)
pt3dadd(138.38, 194.15, 37.9, 2.04)
pt3dadd(138.5, 194.3, 37.9, 2.04)
pt3dadd(138.54, 194.4, 37.9, 2.04)
pt3dadd(138.59, 194.45, 37.9, 2.04)
pt3dadd(138.67, 194.54, 37.9, 2.04)
pt3dadd(138.71, 194.64, 37.9, 2.04)
pt3dadd(138.8, 194.73, 37.9, 2.04)
pt3dadd(138.88, 194.78, 37.9, 2.04)
pt3dadd(138.93, 194.83, 37.9, 2.04)
pt3dadd(138.97, 194.88, 37.9, 2.04)
pt3dadd(139.01, 194.93, 37.9, 2.04)
pt3dadd(139.1, 195.07, 37.9, 2.04)
pt3dadd(139.18, 195.17, 37.9, 2.04)
pt3dadd(139.23, 195.26, 37.9, 2.04)
pt3dadd(139.27, 195.36, 37.9, 2.04)
pt3dadd(139.35, 195.51, 37.9, 2.04)
pt3dadd(139.43, 195.65, 37.9, 2.04)
pt3dadd(139.48, 195.75, 37.9, 2.04)
pt3dadd(139.6, 195.89, 37.9, 2.04)
pt3dadd(139.65, 195.99, 37.9, 2.04)
pt3dadd(139.73, 196.09, 37.9, 2.04)
pt3dadd(139.77, 196.13, 37.9, 2.04)
pt3dadd(139.82, 196.28, 37.9, 2.04)
pt3dadd(139.95, 196.42, 37.9, 2.04)
pt3dadd(140.03, 196.62, 37.9, 2.04)
pt3dadd(140.12, 196.71, 37.9, 2.04)
pt3dadd(140.2, 196.95, 37.9, 2.04)
pt3dadd(140.24, 197, 37.9, 2.04)
pt3dadd(140.33, 197.19, 37.9, 2.04)
pt3dadd(140.46, 197.34, 37.9, 2.04)
pt3dadd(140.5, 197.43, 37.9, 2.04)
pt3dadd(140.54, 197.58, 37.9, 2.04)
pt3dadd(140.67, 197.72, 37.9, 2.04)
pt3dadd(140.75, 197.87, 37.9, 2.04)
pt3dadd(140.84, 198.06, 37.9, 2.04)
pt3dadd(140.96, 198.21, 37.9, 2.04)
pt3dadd(141.05, 198.4, 37.9, 2.04)
pt3dadd(141.13, 198.64, 37.9, 2.04)
pt3dadd(141.26, 198.79, 37.9, 2.04)
pt3dadd(141.35, 198.93, 37.9, 2.04)
pt3dadd(141.43, 199.07, 37.9, 2.04)
pt3dadd(141.48, 199.22, 37.9, 2.04)
pt3dadd(141.56, 199.36, 37.9, 2.04)
pt3dadd(141.65, 199.46, 37.9, 2.04)
pt3dadd(141.73, 199.55, 37.9, 2.04)
pt3dadd(141.77, 199.65, 37.9, 2.04)
pt3dadd(141.86, 199.8, 37.9, 2.04)
pt3dadd(141.94, 199.94, 37.9, 2.04)
pt3dadd(142.02, 200.04, 37.9, 2.04)
pt3dadd(142.11, 200.18, 37.9, 2.04)
pt3dadd(142.24, 200.43, 37.9, 2.04)
pt3dadd(142.37, 200.57, 37.9, 2.04)
pt3dadd(142.49, 200.81, 37.9, 2.04)
pt3dadd(142.58, 200.91, 37.9, 2.04)
pt3dadd(142.62, 201, 37.9, 2.04)
pt3dadd(142.71, 201.15, 37.9, 2.04)
pt3dadd(142.79, 201.24, 37.9, 2.04)
pt3dadd(142.83, 201.34, 37.9, 2.04)
pt3dadd(142.96, 201.49, 37.9, 2.04)
pt3dadd(143, 201.58, 37.9, 2.04)
pt3dadd(143.09, 201.68, 37.9, 2.04)
pt3dadd(143.13, 201.77, 37.9, 2.04)
pt3dadd(143.17, 201.87, 37.9, 2.04)
pt3dadd(143.21, 201.92, 37.9, 2.04)
pt3dadd(143.3, 202.01, 37.9, 2.04)
}
}
proc shape3d_176() {
dend[118] { pt3dadd(143.34, 202.07, 37.9, 2.04)
pt3dadd(143.43, 202.11, 37.9, 2.04)
pt3dadd(143.47, 202.16, 37.9, 2.04)
pt3dadd(143.51, 202.26, 37.9, 2.04)
pt3dadd(143.6, 202.3, 37.9, 2.04)
pt3dadd(143.64, 202.35, 37.9, 2.04)
pt3dadd(143.73, 202.4, 37.9, 2.04)
pt3dadd(143.77, 202.45, 37.9, 2.04)
pt3dadd(143.81, 202.5, 37.9, 2.04)
pt3dadd(143.9, 202.54, 37.9, 2.04)
pt3dadd(143.94, 202.6, 37.9, 2.04)
pt3dadd(143.98, 202.64, 37.9, 2.04)
pt3dadd(144.02, 202.69, 37.9, 2.04)
pt3dadd(143.73, 202.54, 39.9, 2.04)
pt3dadd(143.77, 202.6, 39.9, 2.04)
pt3dadd(143.81, 202.64, 39.9, 2.04)
pt3dadd(143.94, 202.74, 39.9, 2.04)
pt3dadd(144.07, 202.79, 39.9, 2.04)
pt3dadd(144.24, 202.98, 39.9, 2.04)
pt3dadd(144.45, 203.17, 39.9, 2.04)
pt3dadd(144.66, 203.32, 39.9, 2.04)
pt3dadd(144.79, 203.51, 39.9, 2.04)
pt3dadd(144.96, 203.65, 39.9, 2.04)
pt3dadd(145.08, 203.75, 39.9, 2.04)
pt3dadd(145.25, 203.95, 39.9, 2.04)
pt3dadd(145.34, 203.99, 39.9, 2.04)
pt3dadd(145.38, 204.09, 39.9, 2.04)
pt3dadd(145.42, 204.14, 39.9, 2.04)
pt3dadd(145.51, 204.18, 39.9, 2.04)
pt3dadd(145.55, 204.24, 39.9, 2.04)
pt3dadd(145.63, 204.28, 39.9, 2.04)
pt3dadd(145.68, 204.33, 39.9, 2.04)
pt3dadd(145.76, 204.43, 39.9, 2.04)
pt3dadd(145.85, 204.48, 39.9, 2.04)
pt3dadd(145.93, 204.57, 39.9, 2.04)
pt3dadd(146.02, 204.67, 39.9, 2.04)
pt3dadd(146.15, 204.81, 39.9, 2.04)
pt3dadd(146.23, 204.91, 39.9, 2.04)
pt3dadd(146.32, 205.01, 39.9, 2.04)
pt3dadd(146.53, 205.15, 39.9, 2.04)
pt3dadd(146.65, 205.29, 39.9, 2.04)
pt3dadd(146.74, 205.39, 39.9, 2.04)
pt3dadd(146.95, 205.54, 39.9, 2.04)
pt3dadd(147.04, 205.63, 39.9, 2.04)
pt3dadd(147.12, 205.68, 39.9, 2.04)
pt3dadd(147.16, 205.78, 39.9, 2.04)
pt3dadd(147.25, 205.82, 39.9, 2.04)
pt3dadd(147.29, 205.92, 39.9, 2.04)
pt3dadd(147.33, 205.97, 39.9, 2.04)
pt3dadd(147.42, 206.07, 39.9, 2.04)
pt3dadd(147.46, 206.12, 39.9, 2.04)
pt3dadd(147.54, 206.16, 39.9, 2.04)
pt3dadd(147.67, 206.26, 39.9, 2.04)
pt3dadd(147.84, 206.45, 39.9, 2.04)
pt3dadd(147.93, 206.55, 39.9, 2.04)
pt3dadd(148.01, 206.65, 39.9, 2.04)
pt3dadd(148.05, 206.74, 39.9, 2.04)
pt3dadd(148.1, 206.84, 39.9, 2.04)
pt3dadd(148.14, 206.89, 39.9, 2.04)
pt3dadd(148.23, 206.98, 39.9, 2.04)
pt3dadd(148.31, 207.08, 39.9, 2.04)
pt3dadd(148.35, 207.13, 39.9, 2.04)
pt3dadd(148.44, 207.27, 39.9, 2.04)
pt3dadd(148.48, 207.37, 39.9, 2.04)
pt3dadd(148.52, 207.42, 39.9, 2.04)
pt3dadd(148.61, 207.51, 39.9, 2.04)
pt3dadd(148.69, 207.66, 39.9, 2.04)
pt3dadd(148.74, 207.76, 39.9, 2.04)
pt3dadd(148.78, 207.85, 39.9, 2.04)
pt3dadd(148.82, 207.95, 39.9, 2.04)
pt3dadd(148.9, 208.04, 39.9, 2.04)
pt3dadd(148.95, 208.14, 39.9, 2.04)
pt3dadd(148.99, 208.24, 39.9, 2.04)
pt3dadd(149.03, 208.33, 39.9, 2.04)
pt3dadd(149.12, 208.43, 39.9, 2.04)
pt3dadd(149.16, 208.57, 39.9, 2.04)
pt3dadd(149.2, 208.62, 39.9, 2.04)
pt3dadd(149.24, 208.72, 39.9, 2.04)
pt3dadd(149.29, 208.77, 39.9, 2.04)
pt3dadd(149.46, 208.96, 39.9, 2.04)
pt3dadd(149.5, 209.06, 39.9, 2.04)
pt3dadd(149.59, 209.15, 39.9, 2.04)
pt3dadd(149.67, 209.3, 39.9, 2.04)
pt3dadd(149.71, 209.4, 39.9, 2.04)
pt3dadd(149.76, 209.44, 39.9, 2.04)
pt3dadd(149.84, 209.49, 39.9, 2.04)
pt3dadd(149.88, 209.59, 39.9, 2.04)
pt3dadd(149.92, 209.68, 39.9, 2.04)
pt3dadd(150.01, 209.68, 39.9, 2.04)
pt3dadd(150.05, 209.73, 39.9, 2.04)
pt3dadd(150.09, 209.78, 39.9, 2.04)
pt3dadd(150.13, 209.83, 39.9, 2.04)
pt3dadd(150.18, 209.88, 39.9, 2.04)
pt3dadd(150.22, 209.93, 39.9, 2.04)
pt3dadd(150.26, 209.97, 39.9, 2.04)
pt3dadd(149.84, 209.78, 40.9, 2.04)
pt3dadd(149.88, 209.83, 40.9, 2.04)
pt3dadd(150.01, 209.83, 40.9, 2.04)
pt3dadd(150.09, 209.88, 40.9, 2.04)
pt3dadd(150.13, 209.97, 40.9, 2.04)
pt3dadd(150.18, 210.02, 40.9, 2.04)
pt3dadd(150.22, 210.12, 40.9, 2.04)
pt3dadd(150.3, 210.16, 40.9, 2.04)
pt3dadd(150.35, 210.26, 40.9, 2.04)
pt3dadd(150.39, 210.31, 40.9, 2.04)
pt3dadd(150.48, 210.46, 40.9, 2.04)
pt3dadd(150.6, 210.55, 40.9, 2.04)
pt3dadd(150.65, 210.7, 40.9, 2.04)
pt3dadd(150.77, 210.79, 40.9, 2.04)
pt3dadd(150.86, 210.94, 40.9, 2.04)
pt3dadd(150.9, 211.04, 40.9, 2.04)
pt3dadd(151.03, 211.13, 40.9, 2.04)
pt3dadd(151.07, 211.23, 40.9, 2.04)
pt3dadd(151.15, 211.32, 40.9, 2.04)
pt3dadd(151.24, 211.47, 40.9, 2.04)
pt3dadd(151.28, 211.57, 40.9, 2.04)
pt3dadd(151.32, 211.61, 40.9, 2.04)
pt3dadd(151.41, 211.66, 40.9, 2.04)
pt3dadd(151.49, 211.71, 40.9, 2.04)
pt3dadd(151.54, 211.8, 40.9, 2.04)
pt3dadd(151.58, 211.85, 40.9, 2.04)
pt3dadd(151.71, 212, 40.9, 2.04)
pt3dadd(151.75, 212.1, 40.9, 2.04)
pt3dadd(151.84, 212.14, 40.9, 2.04)
pt3dadd(151.92, 212.24, 40.9, 2.04)
pt3dadd(151.96, 212.34, 40.9, 2.04)
pt3dadd(152.01, 212.43, 40.9, 2.04)
pt3dadd(152.09, 212.48, 40.9, 2.04)
pt3dadd(152.13, 212.58, 40.9, 2.04)
pt3dadd(152.18, 212.67, 40.9, 2.04)
pt3dadd(152.26, 212.77, 40.9, 2.04)
pt3dadd(152.35, 212.82, 40.9, 2.04)
pt3dadd(152.39, 212.91, 40.9, 2.04)
pt3dadd(152.47, 212.96, 40.9, 2.04)
pt3dadd(152.55, 213.01, 40.9, 2.04)
pt3dadd(152.6, 213.11, 40.9, 2.04)
pt3dadd(152.64, 213.15, 40.9, 2.04)
pt3dadd(152.68, 213.25, 40.9, 2.04)
pt3dadd(152.73, 213.3, 40.9, 2.04)
pt3dadd(152.94, 213.54, 40.9, 2.04)
pt3dadd(152.98, 213.64, 40.9, 2.04)
pt3dadd(153.02, 213.68, 40.9, 2.04)
pt3dadd(153.11, 213.78, 40.9, 2.04)
pt3dadd(153.19, 213.83, 40.9, 2.04)
pt3dadd(153.24, 213.88, 40.9, 2.04)
pt3dadd(153.28, 213.93, 40.9, 2.04)
pt3dadd(153.36, 213.98, 40.9, 2.04)
pt3dadd(153.4, 214.07, 40.9, 2.04)
pt3dadd(153.45, 214.17, 40.9, 2.04)
pt3dadd(153.49, 214.22, 40.9, 2.04)
pt3dadd(153.57, 214.26, 40.9, 2.04)
pt3dadd(153.62, 214.36, 40.9, 2.04)
pt3dadd(153.7, 214.41, 40.9, 2.04)
pt3dadd(153.74, 214.51, 40.9, 2.04)
pt3dadd(153.83, 214.65, 40.9, 2.04)
pt3dadd(153.87, 214.7, 40.9, 2.04)
pt3dadd(153.91, 214.79, 40.9, 2.04)
pt3dadd(154, 214.84, 40.9, 2.04)
pt3dadd(154.04, 214.94, 40.9, 2.04)
pt3dadd(154.09, 214.99, 40.9, 2.04)
pt3dadd(154.13, 215.09, 40.9, 2.04)
pt3dadd(154.21, 215.13, 40.9, 2.04)
pt3dadd(154.21, 215.23, 40.9, 2.04)
pt3dadd(154.3, 215.28, 40.9, 2.04)
pt3dadd(154.34, 215.32, 40.9, 2.04)
pt3dadd(154.38, 215.42, 40.9, 2.04)
pt3dadd(154.43, 215.52, 40.9, 2.04)
pt3dadd(154.55, 215.62, 40.9, 2.04)
pt3dadd(154.6, 215.71, 40.9, 2.04)
pt3dadd(154.72, 215.81, 40.9, 2.04)
pt3dadd(154.81, 215.95, 40.9, 2.04)
pt3dadd(154.85, 216.05, 40.9, 2.04)
pt3dadd(154.89, 216.2, 40.9, 2.04)
pt3dadd(154.93, 216.29, 40.9, 2.04)
pt3dadd(155.02, 216.39, 40.9, 2.04)
pt3dadd(155.06, 216.48, 40.9, 2.04)
pt3dadd(155.1, 216.58, 40.9, 2.04)
pt3dadd(155.15, 216.68, 40.9, 2.04)
pt3dadd(155.19, 216.73, 40.9, 2.04)
pt3dadd(155.27, 216.73, 40.9, 2.04)
pt3dadd(155.32, 216.82, 40.9, 2.04)
pt3dadd(155.36, 216.92, 40.9, 2.04)
pt3dadd(155.44, 216.96, 40.9, 2.04)
pt3dadd(155.49, 217.01, 40.9, 2.04)
pt3dadd(155.53, 217.06, 40.9, 2.04)
pt3dadd(155.57, 217.11, 40.9, 2.04)
pt3dadd(155.61, 217.16, 40.9, 2.04)
pt3dadd(155.61, 217.26, 40.9, 2.04)
pt3dadd(155.65, 217.3, 40.9, 2.04)
pt3dadd(155.7, 217.35, 40.9, 2.04)
pt3dadd(155.7, 217.45, 40.9, 2.04)
pt3dadd(155.65, 217.35, 42.9, 2.04)
pt3dadd(155.7, 217.35, 42.9, 2.04)
pt3dadd(155.7, 217.45, 42.9, 2.04)
pt3dadd(155.78, 217.54, 42.9, 2.04)
pt3dadd(155.82, 217.64, 42.9, 2.04)
pt3dadd(155.82, 217.74, 42.9, 2.04)
pt3dadd(155.87, 217.83, 42.9, 2.04)
pt3dadd(155.91, 217.93, 42.9, 2.04)
pt3dadd(155.91, 218.03, 42.9, 2.04)
}
}
proc shape3d_177() {
dend[118] { pt3dadd(155.95, 218.12, 42.9, 2.04)
pt3dadd(155.99, 218.27, 42.9, 2.04)
pt3dadd(155.99, 218.41, 42.9, 2.04)
pt3dadd(156.08, 218.51, 42.9, 2.04)
pt3dadd(156.12, 218.65, 42.9, 2.04)
pt3dadd(156.16, 218.8, 42.9, 2.04)
pt3dadd(156.16, 219.09, 42.9, 2.04)
pt3dadd(156.21, 219.13, 42.9, 2.04)
pt3dadd(156.21, 219.38, 42.9, 2.04)
pt3dadd(156.25, 219.47, 42.9, 2.04)
pt3dadd(156.25, 219.62, 42.9, 2.04)
pt3dadd(156.29, 219.76, 42.9, 2.04)
pt3dadd(156.34, 219.91, 42.9, 2.04)
pt3dadd(156.38, 220.05, 42.9, 2.04)
pt3dadd(156.38, 220.2, 42.9, 2.04)
pt3dadd(156.42, 220.29, 42.9, 2.04)
pt3dadd(156.42, 220.44, 42.9, 2.04)
pt3dadd(156.46, 220.54, 42.9, 2.04)
pt3dadd(156.55, 220.68, 42.9, 2.04)
pt3dadd(156.59, 220.82, 42.9, 2.04)
pt3dadd(156.59, 220.97, 42.9, 2.04)
pt3dadd(156.63, 221.07, 42.9, 2.04)
pt3dadd(156.63, 221.21, 42.9, 2.04)
pt3dadd(156.68, 221.26, 42.9, 2.04)
pt3dadd(156.72, 221.35, 42.9, 2.04)
pt3dadd(156.72, 221.45, 42.9, 2.04)
pt3dadd(156.76, 221.55, 42.9, 2.04)
pt3dadd(156.85, 221.64, 42.9, 2.04)
pt3dadd(156.89, 221.74, 42.9, 2.04)
pt3dadd(156.93, 221.88, 42.9, 2.04)
pt3dadd(156.93, 221.98, 42.9, 2.04)
pt3dadd(156.97, 222.03, 42.9, 2.04)
pt3dadd(157.01, 222.08, 42.9, 2.04)
pt3dadd(157.06, 222.13, 42.9, 2.04)
pt3dadd(157.1, 222.22, 42.9, 2.04)
pt3dadd(157.14, 222.27, 42.9, 2.04)
pt3dadd(157.18, 222.32, 42.9, 2.04)
pt3dadd(157.23, 222.37, 42.9, 2.04)
pt3dadd(157.27, 222.46, 42.9, 2.04)
pt3dadd(157.31, 222.51, 42.9, 2.04)
pt3dadd(157.35, 222.61, 42.9, 2.04)
pt3dadd(157.4, 222.65, 42.9, 2.04)
pt3dadd(157.44, 222.71, 42.9, 2.04)
pt3dadd(157.57, 222.85, 42.9, 2.04)
pt3dadd(157.61, 222.95, 42.9, 2.04)
pt3dadd(157.65, 222.99, 42.9, 2.04)
pt3dadd(157.69, 223.04, 42.9, 2.04)
pt3dadd(157.74, 223.14, 42.9, 2.04)
pt3dadd(157.82, 223.19, 42.9, 2.04)
pt3dadd(157.86, 223.28, 42.9, 2.04)
pt3dadd(157.95, 223.38, 42.9, 2.04)
pt3dadd(157.99, 223.43, 42.9, 2.04)
pt3dadd(158.03, 223.48, 42.9, 2.04)
pt3dadd(158.07, 223.52, 42.9, 2.04)
pt3dadd(158.12, 223.57, 42.9, 2.04)
pt3dadd(158.16, 223.62, 42.9, 2.04)
pt3dadd(158.2, 223.67, 42.9, 2.04)
pt3dadd(158.24, 223.72, 42.9, 2.04)
pt3dadd(158.33, 223.72, 42.9, 2.04)
pt3dadd(158.24, 223.86, 42.9, 3.06)
pt3dadd(170.51, 241.13, 42.9, 3.4)
pt3dadd(178.67, 255.5, 42.9, 3.4)
pt3dadd(187.84, 270.45, 42.9, 4.08)
pt3dadd(193.45, 286.94, 42.9, 4.08)
pt3dadd(193.45, 289.93, 42.9, 4.08)
pt3dadd(194.63, 292.15, 42.9, 4.08)
pt3dadd(196.33, 293.21, 42.9, 4.08)
pt3dadd(197.52, 293.89, 42.9, 4.08)
pt3dadd(198.2, 295.33, 42.9, 4.08)
pt3dadd(199.9, 298.13, 42.9, 4.76)
pt3dadd(203.63, 310.77, 42.9, 4.76)
pt3dadd(207.88, 325.42, 42.9, 4.76)
pt3dadd(221.47, 355.13, 42.9, 4.76)
pt3dadd(208.22, 327.45, 42.9, 5.43)
}
dend[119] {pt3dclear()
pt3dadd(105.64, 121.53, 15.9, 1.36)
pt3dadd(106.15, 120.56, 103.9, 1.36)
pt3dadd(106.24, 119.86, 103.9, 4.08)
pt3dadd(106.33, 120.06, 103.9, 3.74)
pt3dadd(106.42, 119.96, 103.9, 3.74)
pt3dadd(106.51, 119.86, 103.9, 3.74)
pt3dadd(106.6, 119.66, 103.9, 3.74)
pt3dadd(106.78, 119.56, 103.9, 3.74)
pt3dadd(106.96, 119.35, 103.9, 3.74)
pt3dadd(107.04, 119.25, 103.9, 3.74)
pt3dadd(107.14, 119.15, 103.9, 3.74)
pt3dadd(107.14, 116.92, 103.9, 3.74)
pt3dadd(107.22, 116.82, 103.9, 3.74)
pt3dadd(107.31, 116.72, 103.9, 3.74)
pt3dadd(107.31, 116.52, 103.9, 3.74)
pt3dadd(107.4, 116.32, 103.9, 3.74)
pt3dadd(107.4, 116.21, 103.9, 3.74)
pt3dadd(107.67, 116.11, 100.75, 3.74)
pt3dadd(107.67, 115.91, 100.75, 3.74)
pt3dadd(107.76, 115.81, 100.75, 3.74)
pt3dadd(107.85, 115.61, 100.75, 3.74)
pt3dadd(107.94, 115.5, 100.75, 3.74)
pt3dadd(108.03, 115.4, 100.75, 3.74)
pt3dadd(108.11, 115.3, 100.75, 3.74)
pt3dadd(108.11, 114.69, 100.75, 3.74)
pt3dadd(108.21, 114.59, 100.75, 3.74)
pt3dadd(108.21, 113.89, 100.75, 3.74)
pt3dadd(108.29, 113.78, 100.75, 3.74)
pt3dadd(108.38, 113.68, 100.75, 3.74)
pt3dadd(108.38, 111.86, 100.75, 3.74)
pt3dadd(108.47, 111.65, 100.75, 3.74)
pt3dadd(108.56, 111.45, 100.75, 3.74)
pt3dadd(108.56, 111.25, 100.75, 3.74)
pt3dadd(108.65, 111.15, 100.75, 3.74)
pt3dadd(108.65, 110.95, 100.75, 3.74)
pt3dadd(108.74, 110.85, 100.75, 3.74)
pt3dadd(109.01, 111.05, 97.6, 3.74)
pt3dadd(109.1, 110.95, 97.6, 3.74)
pt3dadd(109.1, 110.75, 97.6, 3.74)
pt3dadd(109.18, 110.64, 97.6, 3.74)
pt3dadd(109.28, 110.44, 97.6, 3.74)
pt3dadd(109.36, 110.34, 97.6, 3.74)
pt3dadd(109.45, 110.24, 97.6, 3.74)
pt3dadd(109.54, 110.04, 97.6, 3.74)
pt3dadd(109.63, 109.93, 97.6, 3.74)
pt3dadd(109.72, 109.73, 97.6, 3.74)
pt3dadd(109.81, 109.53, 97.6, 3.74)
pt3dadd(109.81, 109.33, 97.6, 3.74)
pt3dadd(109.9, 109.22, 97.6, 3.74)
pt3dadd(109.99, 109.13, 97.6, 3.74)
pt3dadd(110.08, 108.92, 97.6, 3.74)
pt3dadd(110.17, 108.72, 97.6, 3.74)
pt3dadd(110.17, 108.52, 97.6, 3.74)
pt3dadd(110.25, 108.32, 97.6, 3.74)
pt3dadd(110.25, 108.11, 97.6, 3.74)
pt3dadd(110.35, 108.01, 97.6, 3.74)
pt3dadd(110.43, 107.91, 97.6, 3.74)
pt3dadd(110.43, 107.61, 97.6, 3.74)
pt3dadd(110.52, 107.5, 97.6, 3.74)
pt3dadd(110.52, 107.2, 97.6, 3.74)
pt3dadd(110.61, 107.1, 97.6, 3.74)
pt3dadd(110.7, 107, 97.6, 3.74)
pt3dadd(110.79, 106.89, 97.6, 3.74)
pt3dadd(110.79, 106.59, 97.6, 3.74)
pt3dadd(110.88, 106.39, 97.6, 3.74)
pt3dadd(110.88, 106.29, 97.6, 3.74)
pt3dadd(111.15, 105.68, 96.55, 3.74)
pt3dadd(111.24, 105.58, 96.55, 3.74)
}
dend[120] {pt3dclear()
pt3dadd(111.24, 105.58, 96.55, 2.38)
pt3dadd(111.01, 105.38, 96.55, 2.38)
pt3dadd(110.97, 105.28, 96.55, 2.38)
pt3dadd(110.93, 105.22, 96.55, 2.38)
pt3dadd(110.88, 105.18, 96.55, 2.38)
pt3dadd(110.83, 105.13, 96.55, 2.38)
pt3dadd(110.79, 105.07, 96.55, 2.38)
pt3dadd(110.75, 105.02, 96.55, 2.38)
pt3dadd(110.7, 104.97, 96.55, 2.38)
pt3dadd(110.61, 104.92, 96.55, 2.38)
pt3dadd(110.52, 104.82, 96.55, 2.38)
pt3dadd(110.43, 104.77, 96.55, 2.38)
pt3dadd(110.35, 104.72, 96.55, 2.38)
pt3dadd(110.25, 104.62, 96.55, 2.38)
pt3dadd(110.17, 104.57, 96.55, 2.38)
pt3dadd(110.08, 104.42, 96.55, 2.38)
pt3dadd(109.99, 104.42, 96.55, 2.38)
pt3dadd(109.9, 104.31, 96.55, 2.38)
pt3dadd(109.86, 104.26, 96.55, 2.38)
pt3dadd(109.72, 104.16, 96.55, 2.38)
pt3dadd(109.68, 104.11, 96.55, 2.38)
pt3dadd(109.59, 104.06, 96.55, 2.38)
pt3dadd(109.54, 103.96, 96.55, 2.38)
pt3dadd(109.45, 103.91, 96.55, 2.38)
pt3dadd(109.36, 103.81, 96.55, 2.38)
pt3dadd(109.32, 103.76, 96.55, 2.38)
pt3dadd(109.28, 103.65, 96.55, 2.38)
pt3dadd(109.18, 103.61, 96.55, 2.38)
pt3dadd(109.1, 103.56, 96.55, 2.38)
pt3dadd(109.01, 103.45, 96.55, 2.38)
pt3dadd(108.92, 103.4, 96.55, 2.38)
pt3dadd(108.83, 103.35, 96.55, 2.38)
pt3dadd(108.74, 103.3, 96.55, 2.38)
pt3dadd(108.65, 103.25, 96.55, 2.38)
pt3dadd(108.61, 103.2, 96.55, 2.38)
pt3dadd(108.56, 103.15, 96.55, 2.38)
pt3dadd(108.52, 103.05, 96.55, 2.38)
pt3dadd(108.43, 103, 96.55, 2.38)
pt3dadd(108.38, 102.89, 96.55, 2.38)
pt3dadd(108.29, 102.85, 96.55, 2.38)
pt3dadd(108.21, 102.85, 96.55, 2.38)
pt3dadd(108.11, 102.79, 96.55, 2.38)
pt3dadd(108.03, 102.69, 96.55, 2.38)
pt3dadd(107.94, 102.64, 96.55, 2.38)
pt3dadd(107.89, 102.59, 96.55, 2.38)
pt3dadd(107.71, 102.39, 96.55, 2.38)
pt3dadd(107.63, 102.34, 96.55, 2.38)
pt3dadd(107.54, 102.29, 96.55, 2.38)
pt3dadd(107.4, 102.14, 96.55, 2.38)
pt3dadd(107.31, 102.14, 96.55, 2.38)
pt3dadd(107.22, 102.04, 96.55, 2.38)
pt3dadd(107.14, 101.99, 96.55, 2.38)
pt3dadd(107.09, 101.93, 96.55, 2.38)
pt3dadd(107, 101.83, 96.55, 2.38)
pt3dadd(106.91, 101.73, 96.55, 2.38)
pt3dadd(106.87, 101.68, 96.55, 2.38)
pt3dadd(106.74, 101.63, 96.55, 2.38)
pt3dadd(106.56, 101.48, 96.55, 2.38)
}
}
proc shape3d_178() {
dend[120] { pt3dadd(106.42, 101.43, 96.55, 2.38)
pt3dadd(106.33, 101.32, 96.55, 2.38)
pt3dadd(106.24, 101.32, 96.55, 2.38)
pt3dadd(106.15, 101.28, 96.55, 2.38)
pt3dadd(106.11, 101.22, 96.55, 2.38)
pt3dadd(105.93, 101.12, 96.55, 2.38)
pt3dadd(105.84, 101.07, 96.55, 2.38)
pt3dadd(105.8, 101.02, 96.55, 2.38)
pt3dadd(105.71, 101.02, 96.55, 2.38)
pt3dadd(105.67, 100.97, 96.55, 2.38)
pt3dadd(105.62, 100.92, 96.55, 2.38)
pt3dadd(105.57, 100.87, 96.55, 2.38)
pt3dadd(105.49, 100.82, 96.55, 2.38)
pt3dadd(105.4, 100.77, 96.55, 2.38)
pt3dadd(105.26, 100.72, 96.55, 2.38)
pt3dadd(105.17, 100.67, 96.55, 2.38)
pt3dadd(105.08, 100.67, 96.55, 2.38)
pt3dadd(105.04, 100.62, 96.55, 2.38)
pt3dadd(105, 100.57, 96.55, 2.38)
pt3dadd(104.86, 100.51, 96.55, 2.38)
pt3dadd(104.82, 100.46, 96.55, 2.38)
pt3dadd(104.77, 100.42, 96.55, 2.38)
pt3dadd(104.68, 100.42, 96.55, 2.38)
pt3dadd(104.64, 100.36, 96.55, 2.38)
pt3dadd(104.6, 100.31, 96.55, 2.38)
pt3dadd(104.5, 100.31, 96.55, 2.38)
pt3dadd(104.42, 100.26, 96.55, 2.38)
pt3dadd(104.37, 100.21, 96.55, 2.38)
pt3dadd(104.33, 100.16, 96.55, 2.38)
pt3dadd(104.24, 100.11, 96.55, 2.38)
pt3dadd(104.19, 100.06, 96.55, 2.38)
pt3dadd(104.1, 100.01, 96.55, 2.38)
pt3dadd(104.06, 99.96, 96.55, 2.38)
pt3dadd(104.01, 99.91, 96.55, 2.38)
pt3dadd(103.97, 99.86, 96.55, 2.38)
pt3dadd(103.97, 99.76, 96.55, 2.38)
pt3dadd(103.93, 99.71, 96.55, 2.38)
pt3dadd(103.84, 99.61, 96.55, 2.38)
pt3dadd(103.84, 99.5, 96.55, 2.38)
pt3dadd(103.79, 99.4, 96.55, 2.38)
pt3dadd(103.75, 99.35, 96.55, 2.38)
pt3dadd(103.75, 99.25, 96.55, 2.38)
pt3dadd(103.7, 99.2, 96.55, 2.38)
pt3dadd(103.7, 99.1, 96.55, 2.38)
pt3dadd(103.66, 99, 96.55, 2.38)
pt3dadd(103.66, 98.79, 96.55, 2.38)
pt3dadd(103.61, 98.69, 96.55, 2.38)
pt3dadd(103.61, 98.59, 96.55, 2.38)
pt3dadd(103.66, 98.64, 96.55, 2.38)
pt3dadd(103.61, 98.59, 96.55, 2.38)
pt3dadd(103.61, 96.06, 96.55, 2.38)
pt3dadd(103.57, 96.01, 96.55, 2.38)
pt3dadd(103.53, 95.91, 96.55, 2.38)
pt3dadd(103.48, 95.75, 96.55, 2.38)
pt3dadd(103.43, 95.65, 96.55, 2.38)
pt3dadd(103.39, 95.61, 96.55, 2.38)
pt3dadd(103.35, 95.5, 96.55, 2.38)
pt3dadd(103.3, 95.4, 96.55, 2.38)
pt3dadd(103.26, 95.35, 96.55, 2.38)
pt3dadd(103.21, 95.25, 96.55, 2.38)
pt3dadd(103.17, 95.2, 96.55, 2.38)
pt3dadd(103.04, 95.1, 96.55, 2.38)
pt3dadd(102.99, 95, 96.55, 2.38)
pt3dadd(102.94, 94.94, 96.55, 2.38)
pt3dadd(102.9, 94.85, 96.55, 2.38)
pt3dadd(102.81, 94.79, 96.55, 2.38)
pt3dadd(102.68, 94.69, 96.55, 2.38)
pt3dadd(102.63, 94.64, 96.55, 2.38)
pt3dadd(102.54, 94.59, 96.55, 2.38)
pt3dadd(102.5, 94.54, 96.55, 2.38)
pt3dadd(102.46, 94.49, 96.55, 2.38)
pt3dadd(102.36, 94.34, 96.55, 2.38)
pt3dadd(102.28, 94.24, 96.55, 2.38)
pt3dadd(102.23, 94.19, 96.55, 2.38)
pt3dadd(102.19, 94.04, 96.55, 2.38)
pt3dadd(102.1, 93.99, 96.55, 2.38)
pt3dadd(102.05, 93.88, 96.55, 2.38)
pt3dadd(101.96, 93.78, 96.55, 2.38)
pt3dadd(101.92, 93.68, 96.55, 2.38)
pt3dadd(101.88, 93.63, 96.55, 2.38)
pt3dadd(101.79, 93.58, 96.55, 2.38)
pt3dadd(101.74, 93.53, 96.55, 2.38)
pt3dadd(101.7, 93.43, 96.55, 2.38)
pt3dadd(101.61, 93.32, 96.55, 2.38)
pt3dadd(101.56, 93.22, 96.55, 2.38)
pt3dadd(101.52, 93.17, 96.55, 2.38)
pt3dadd(101.43, 93.12, 96.55, 2.38)
pt3dadd(101.39, 93.02, 96.55, 2.38)
pt3dadd(101.21, 92.77, 96.55, 2.38)
pt3dadd(101.16, 92.67, 96.55, 2.38)
pt3dadd(101.03, 92.57, 96.55, 2.38)
pt3dadd(100.98, 92.46, 96.55, 2.38)
pt3dadd(100.89, 92.42, 96.55, 2.38)
pt3dadd(100.85, 92.31, 96.55, 2.38)
pt3dadd(100.76, 92.26, 96.55, 2.38)
pt3dadd(100.67, 92.16, 96.55, 2.38)
pt3dadd(100.63, 92.11, 96.55, 2.38)
pt3dadd(100.58, 92.01, 96.55, 2.38)
pt3dadd(100.49, 91.86, 96.55, 2.38)
pt3dadd(100.4, 91.71, 96.55, 2.38)
pt3dadd(100.36, 91.55, 96.55, 2.38)
pt3dadd(100.27, 91.45, 96.55, 2.38)
pt3dadd(100.27, 91.35, 96.55, 2.38)
pt3dadd(100.18, 91.25, 96.55, 2.38)
pt3dadd(100.14, 91.1, 96.55, 2.38)
pt3dadd(100.05, 90.89, 96.55, 2.38)
pt3dadd(100, 90.79, 96.55, 2.38)
pt3dadd(99.91, 90.64, 96.55, 2.38)
pt3dadd(99.87, 90.54, 96.55, 2.38)
pt3dadd(99.78, 90.34, 96.55, 2.38)
pt3dadd(99.69, 90.18, 96.55, 2.38)
pt3dadd(99.64, 90.04, 96.55, 2.38)
pt3dadd(99.56, 89.88, 96.55, 2.38)
pt3dadd(99.51, 89.73, 96.55, 2.38)
pt3dadd(99.47, 89.63, 96.55, 2.38)
pt3dadd(99.38, 89.43, 96.55, 2.38)
pt3dadd(99.33, 89.32, 96.55, 2.38)
pt3dadd(99.29, 89.22, 96.55, 2.38)
pt3dadd(99.25, 89.07, 96.55, 2.38)
pt3dadd(99.2, 88.92, 96.55, 2.38)
pt3dadd(99.15, 88.82, 96.55, 2.38)
pt3dadd(99.11, 88.72, 96.55, 2.38)
pt3dadd(99.07, 88.62, 96.55, 2.38)
pt3dadd(99.02, 88.51, 96.55, 2.38)
pt3dadd(99.02, 88.42, 96.55, 2.38)
pt3dadd(98.93, 88.31, 96.55, 2.38)
pt3dadd(98.93, 88.21, 96.55, 2.38)
pt3dadd(98.89, 88.06, 96.55, 2.38)
pt3dadd(98.84, 87.91, 96.55, 2.38)
pt3dadd(98.84, 87.81, 96.55, 2.38)
pt3dadd(98.8, 87.55, 96.55, 2.38)
pt3dadd(98.75, 87.4, 96.55, 2.38)
pt3dadd(98.75, 87.2, 96.55, 2.38)
pt3dadd(98.71, 87.05, 96.55, 2.38)
pt3dadd(98.67, 86.79, 96.55, 2.38)
pt3dadd(98.62, 86.69, 96.55, 2.38)
pt3dadd(98.62, 86.49, 96.55, 2.38)
pt3dadd(98.57, 86.39, 96.55, 2.38)
pt3dadd(98.53, 86.29, 96.55, 2.38)
pt3dadd(98.53, 86.14, 96.55, 2.38)
pt3dadd(98.49, 86.08, 96.55, 2.38)
pt3dadd(98.49, 85.98, 96.55, 2.38)
pt3dadd(98.44, 85.88, 96.55, 2.38)
pt3dadd(98.44, 85.73, 96.55, 2.38)
pt3dadd(98.4, 85.53, 96.55, 2.38)
pt3dadd(98.4, 85.38, 96.55, 2.38)
pt3dadd(98.35, 85.32, 96.55, 2.38)
pt3dadd(98.35, 85.02, 96.55, 2.38)
pt3dadd(98.35, 85.12, 96.55, 2.38)
pt3dadd(98.35, 85.02, 96.55, 2.21)
pt3dadd(98.35, 84.92, 96.55, 2.21)
pt3dadd(98.31, 84.77, 96.55, 2.21)
pt3dadd(98.26, 84.67, 96.55, 2.21)
pt3dadd(98.26, 84.46, 96.55, 2.21)
pt3dadd(98.22, 84.41, 96.55, 2.21)
pt3dadd(98.18, 84.26, 96.55, 2.21)
pt3dadd(98.18, 84.11, 96.55, 2.21)
pt3dadd(98.13, 84.01, 96.55, 2.21)
pt3dadd(98.08, 83.81, 96.55, 2.21)
pt3dadd(98.04, 83.71, 96.55, 2.21)
pt3dadd(98.04, 83.55, 96.55, 2.21)
pt3dadd(98, 83.5, 96.55, 2.21)
pt3dadd(98, 83.4, 96.55, 2.21)
pt3dadd(97.91, 83.2, 96.55, 2.21)
pt3dadd(97.86, 83.05, 96.55, 2.21)
pt3dadd(97.86, 82.89, 96.55, 2.21)
pt3dadd(97.82, 82.79, 96.55, 2.21)
pt3dadd(97.77, 82.69, 96.55, 2.21)
pt3dadd(97.77, 82.59, 96.55, 2.21)
pt3dadd(97.73, 82.49, 96.55, 2.21)
pt3dadd(97.68, 82.39, 96.55, 2.21)
pt3dadd(97.68, 82.24, 96.55, 2.21)
pt3dadd(97.64, 82.14, 96.55, 2.21)
pt3dadd(97.55, 81.88, 96.55, 2.21)
pt3dadd(97.5, 81.73, 96.55, 2.21)
pt3dadd(97.5, 81.63, 96.55, 2.21)
pt3dadd(97.46, 81.53, 96.55, 2.21)
pt3dadd(97.42, 81.43, 96.55, 2.21)
pt3dadd(97.37, 81.38, 96.55, 2.21)
pt3dadd(97.33, 81.28, 96.55, 2.21)
pt3dadd(97.28, 81.17, 96.55, 2.21)
pt3dadd(97.24, 81.07, 96.55, 2.21)
pt3dadd(97.19, 80.97, 96.55, 2.21)
pt3dadd(97.11, 80.77, 96.55, 2.21)
pt3dadd(97.11, 80.67, 96.55, 2.21)
pt3dadd(97.06, 80.57, 96.55, 2.21)
pt3dadd(97.01, 80.46, 96.55, 2.21)
pt3dadd(96.97, 80.31, 96.55, 2.21)
pt3dadd(96.93, 80.21, 96.55, 2.21)
pt3dadd(96.93, 80.11, 96.55, 2.21)
pt3dadd(96.88, 79.96, 96.55, 2.21)
pt3dadd(96.84, 79.81, 96.55, 2.21)
pt3dadd(96.79, 79.71, 96.55, 2.21)
pt3dadd(96.75, 79.6, 96.55, 2.21)
pt3dadd(96.7, 79.4, 96.55, 2.21)
pt3dadd(96.66, 79.25, 96.55, 2.21)
pt3dadd(96.61, 79.15, 96.55, 2.21)
pt3dadd(96.57, 78.94, 96.55, 2.21)
pt3dadd(96.53, 78.84, 96.55, 2.21)
pt3dadd(96.39, 78.44, 96.55, 2.21)
}
}
proc shape3d_179() {
dend[120] { pt3dadd(96.35, 78.29, 96.55, 2.21)
pt3dadd(96.3, 78.24, 96.55, 2.21)
pt3dadd(96.26, 78.08, 96.55, 2.21)
pt3dadd(96.21, 77.98, 96.55, 2.21)
pt3dadd(96.17, 77.83, 96.55, 2.21)
pt3dadd(96.12, 77.73, 96.55, 2.21)
pt3dadd(96.08, 77.58, 96.55, 2.21)
pt3dadd(96.04, 77.48, 96.55, 2.21)
pt3dadd(96.04, 77.38, 96.55, 2.21)
pt3dadd(95.99, 77.28, 96.55, 2.21)
pt3dadd(95.94, 77.12, 96.55, 2.21)
pt3dadd(95.9, 77.02, 96.55, 2.21)
pt3dadd(95.9, 76.92, 96.55, 2.21)
pt3dadd(95.86, 76.77, 96.55, 2.21)
pt3dadd(95.81, 76.72, 96.55, 2.21)
pt3dadd(95.77, 76.57, 96.55, 2.21)
pt3dadd(95.77, 76.46, 96.55, 2.21)
pt3dadd(95.72, 76.31, 96.55, 2.21)
pt3dadd(95.68, 76.26, 96.55, 2.21)
pt3dadd(95.63, 76.11, 96.55, 2.21)
pt3dadd(95.59, 76.01, 96.55, 2.21)
pt3dadd(95.54, 75.91, 96.55, 2.21)
pt3dadd(95.5, 75.81, 96.55, 2.21)
pt3dadd(95.46, 75.55, 96.55, 2.21)
pt3dadd(95.41, 75.45, 96.55, 2.21)
pt3dadd(95.36, 75.3, 96.55, 2.21)
pt3dadd(95.32, 75.15, 96.55, 2.21)
pt3dadd(95.28, 75.04, 96.55, 2.21)
pt3dadd(95.23, 74.89, 96.55, 2.21)
pt3dadd(95.19, 74.74, 96.55, 2.21)
pt3dadd(95.14, 74.59, 96.55, 2.21)
pt3dadd(95.1, 74.49, 96.55, 2.21)
pt3dadd(95.01, 74.24, 96.55, 2.21)
pt3dadd(94.96, 74.08, 96.55, 2.21)
pt3dadd(94.92, 73.98, 96.55, 2.21)
pt3dadd(94.83, 73.78, 96.55, 2.21)
pt3dadd(94.79, 73.68, 96.55, 2.21)
pt3dadd(94.74, 73.63, 96.55, 2.21)
pt3dadd(94.7, 73.53, 96.55, 2.21)
pt3dadd(94.65, 73.43, 96.55, 2.21)
pt3dadd(94.61, 73.38, 96.55, 2.21)
pt3dadd(94.52, 73.22, 96.55, 2.21)
pt3dadd(94.43, 73.07, 96.55, 2.21)
pt3dadd(94.34, 72.97, 96.55, 2.21)
pt3dadd(94.34, 72.87, 96.55, 2.21)
pt3dadd(94.25, 72.72, 96.55, 2.21)
pt3dadd(94.21, 72.61, 96.55, 2.21)
pt3dadd(94.16, 72.51, 96.55, 2.21)
pt3dadd(94.12, 72.41, 96.55, 2.21)
pt3dadd(94.07, 72.31, 96.55, 2.21)
pt3dadd(93.94, 72.06, 96.55, 2.21)
pt3dadd(93.89, 71.96, 96.55, 2.21)
pt3dadd(93.81, 71.86, 96.55, 2.21)
pt3dadd(93.76, 71.75, 96.55, 2.21)
pt3dadd(93.71, 71.71, 96.55, 2.21)
pt3dadd(93.71, 71.81, 96.55, 2.21)
pt3dadd(93.94, 72.06, 98.65, 2.21)
pt3dadd(93.89, 71.96, 98.65, 2.21)
pt3dadd(93.85, 71.86, 98.65, 2.21)
pt3dadd(93.81, 71.71, 98.65, 2.21)
pt3dadd(93.76, 71.55, 98.65, 2.21)
pt3dadd(93.76, 71.4, 98.65, 2.21)
pt3dadd(93.71, 71.35, 98.65, 2.21)
pt3dadd(93.71, 71.25, 98.65, 2.21)
pt3dadd(93.67, 71.15, 98.65, 2.21)
pt3dadd(93.63, 71.04, 98.65, 2.21)
pt3dadd(93.63, 70.89, 98.65, 2.21)
pt3dadd(93.58, 70.79, 98.65, 2.21)
pt3dadd(93.58, 70.69, 98.65, 2.21)
pt3dadd(93.54, 70.64, 98.65, 2.21)
pt3dadd(93.54, 70.54, 98.65, 2.21)
pt3dadd(93.49, 70.49, 98.65, 2.21)
pt3dadd(93.45, 70.39, 98.65, 2.21)
pt3dadd(93.45, 70.24, 98.65, 2.21)
pt3dadd(93.36, 70.03, 98.65, 2.21)
pt3dadd(93.32, 69.93, 98.65, 2.21)
pt3dadd(93.27, 69.83, 98.65, 2.21)
pt3dadd(93.22, 69.73, 98.65, 2.21)
pt3dadd(93.18, 69.63, 98.65, 2.21)
pt3dadd(93.14, 69.47, 98.65, 2.21)
pt3dadd(93.09, 69.43, 98.65, 2.21)
pt3dadd(93.05, 69.32, 98.65, 2.21)
pt3dadd(93, 69.17, 98.65, 2.21)
pt3dadd(92.96, 69.07, 98.65, 2.21)
pt3dadd(92.91, 68.97, 98.65, 2.21)
pt3dadd(92.87, 68.87, 98.65, 2.21)
pt3dadd(92.82, 68.77, 98.65, 2.21)
pt3dadd(92.78, 68.67, 98.65, 2.21)
pt3dadd(92.74, 68.57, 98.65, 2.21)
pt3dadd(92.69, 68.51, 98.65, 2.21)
pt3dadd(92.64, 68.36, 98.65, 2.21)
pt3dadd(92.56, 68.26, 98.65, 2.21)
pt3dadd(92.51, 68.16, 98.65, 2.21)
pt3dadd(92.47, 68.11, 98.65, 2.21)
pt3dadd(92.42, 68.01, 98.65, 2.21)
pt3dadd(92.38, 67.96, 98.65, 2.21)
pt3dadd(92.33, 67.81, 98.65, 2.21)
pt3dadd(92.29, 67.7, 98.65, 2.21)
pt3dadd(92.2, 67.6, 98.65, 2.21)
pt3dadd(92.15, 67.5, 98.65, 2.21)
pt3dadd(92.11, 67.4, 98.65, 2.21)
pt3dadd(92.07, 67.35, 98.65, 2.21)
pt3dadd(92.02, 67.25, 98.65, 2.21)
pt3dadd(91.93, 67.1, 98.65, 2.21)
pt3dadd(91.89, 67, 98.65, 2.21)
pt3dadd(91.84, 66.84, 98.65, 2.21)
pt3dadd(91.75, 66.69, 98.65, 2.21)
pt3dadd(91.71, 66.54, 98.65, 2.21)
pt3dadd(91.62, 66.44, 98.65, 2.21)
pt3dadd(91.57, 66.34, 98.65, 2.21)
pt3dadd(91.49, 66.24, 98.65, 2.21)
pt3dadd(91.44, 66.13, 98.65, 2.21)
pt3dadd(91.4, 66.08, 98.65, 2.21)
pt3dadd(91.35, 65.98, 98.65, 2.21)
pt3dadd(91.31, 65.88, 98.65, 2.21)
pt3dadd(91.26, 65.78, 98.65, 2.21)
pt3dadd(91.22, 65.68, 98.65, 2.21)
pt3dadd(91.18, 65.63, 98.65, 2.21)
pt3dadd(91.08, 65.58, 98.65, 2.21)
pt3dadd(91.08, 65.47, 98.65, 2.21)
pt3dadd(90.95, 65.22, 98.65, 2.21)
pt3dadd(90.91, 65.12, 98.65, 2.21)
pt3dadd(90.86, 65.07, 98.65, 2.21)
pt3dadd(90.82, 64.97, 98.65, 2.21)
pt3dadd(90.77, 64.92, 98.65, 2.21)
pt3dadd(90.73, 64.82, 98.65, 2.21)
pt3dadd(90.68, 64.77, 98.65, 2.21)
pt3dadd(90.64, 64.67, 98.65, 2.21)
pt3dadd(90.6, 64.57, 98.65, 2.21)
pt3dadd(90.55, 64.46, 98.65, 2.21)
pt3dadd(90.5, 64.36, 98.65, 2.21)
pt3dadd(90.42, 64.31, 98.65, 2.21)
pt3dadd(90.37, 64.21, 98.65, 2.21)
pt3dadd(90.33, 64.11, 98.65, 2.21)
pt3dadd(90.28, 64.01, 98.65, 2.21)
pt3dadd(90.24, 63.9, 98.65, 2.21)
pt3dadd(90.19, 63.81, 98.65, 2.21)
pt3dadd(90.11, 63.65, 98.65, 2.21)
pt3dadd(90.01, 63.55, 98.65, 2.21)
pt3dadd(89.97, 63.45, 98.65, 2.21)
pt3dadd(89.93, 63.35, 98.65, 2.21)
pt3dadd(89.88, 63.25, 98.65, 2.21)
pt3dadd(89.84, 63.15, 98.65, 2.21)
pt3dadd(89.75, 63.04, 98.65, 2.21)
pt3dadd(89.7, 62.94, 98.65, 2.21)
pt3dadd(89.66, 62.79, 98.65, 2.21)
pt3dadd(89.61, 62.69, 98.65, 2.21)
pt3dadd(89.53, 62.54, 98.65, 2.21)
pt3dadd(89.48, 62.44, 98.65, 2.21)
pt3dadd(89.43, 62.39, 98.65, 2.21)
pt3dadd(89.39, 62.28, 98.65, 2.21)
pt3dadd(89.26, 62.03, 98.65, 2.21)
pt3dadd(89.17, 61.78, 98.65, 2.21)
pt3dadd(89.13, 61.68, 98.65, 2.21)
pt3dadd(88.99, 61.42, 98.65, 2.21)
pt3dadd(88.94, 61.27, 98.65, 2.21)
pt3dadd(88.9, 61.17, 98.65, 2.21)
pt3dadd(88.86, 61.02, 98.65, 2.21)
pt3dadd(88.77, 60.82, 98.65, 2.21)
pt3dadd(88.72, 60.72, 98.65, 2.21)
pt3dadd(88.68, 60.62, 98.65, 2.21)
pt3dadd(88.63, 60.51, 98.65, 2.21)
pt3dadd(88.54, 60.36, 98.65, 2.21)
pt3dadd(88.46, 60.21, 98.65, 2.21)
pt3dadd(88.41, 60.11, 98.65, 2.21)
pt3dadd(88.36, 60.01, 98.65, 2.21)
pt3dadd(88.32, 59.96, 98.65, 2.21)
pt3dadd(88.28, 59.85, 98.65, 2.21)
pt3dadd(88.23, 59.75, 98.65, 2.21)
pt3dadd(88.19, 59.6, 98.65, 2.21)
pt3dadd(88.14, 59.5, 98.65, 2.21)
pt3dadd(88.1, 59.45, 98.65, 2.21)
pt3dadd(88.06, 59.35, 98.65, 2.21)
pt3dadd(88.01, 59.3, 98.65, 2.21)
pt3dadd(87.92, 59.15, 98.65, 2.21)
pt3dadd(87.83, 58.99, 98.65, 2.21)
pt3dadd(87.79, 58.89, 98.65, 2.21)
pt3dadd(87.74, 58.84, 98.65, 2.21)
pt3dadd(87.7, 58.74, 98.65, 2.21)
pt3dadd(87.65, 58.64, 98.65, 2.21)
pt3dadd(87.65, 58.84, 98.65, 2.21)
pt3dadd(87.74, 58.99, 98.65, 2.21)
pt3dadd(87.61, 58.54, 98.65, 2.21)
pt3dadd(87.56, 58.49, 98.65, 2.21)
pt3dadd(87.52, 58.39, 98.65, 2.21)
pt3dadd(87.47, 58.33, 98.65, 2.21)
pt3dadd(87.43, 58.28, 98.65, 2.21)
pt3dadd(87.39, 58.24, 98.65, 2.21)
pt3dadd(87.34, 58.19, 98.65, 2.21)
pt3dadd(87.29, 58.08, 98.65, 2.21)
pt3dadd(87.25, 57.98, 98.65, 2.21)
pt3dadd(87.21, 57.88, 98.65, 2.21)
pt3dadd(87.16, 57.78, 98.65, 2.21)
pt3dadd(87.07, 57.63, 98.65, 2.21)
pt3dadd(87.03, 57.53, 98.65, 2.21)
pt3dadd(86.99, 57.42, 98.65, 2.21)
pt3dadd(86.94, 57.37, 98.65, 2.21)
pt3dadd(86.94, 57.27, 98.65, 2.21)
pt3dadd(86.89, 57.17, 98.65, 2.21)
pt3dadd(86.85, 57.07, 98.65, 2.21)
}
}
proc shape3d_180() {
dend[120] { pt3dadd(86.81, 57.02, 98.65, 2.21)
pt3dadd(86.81, 56.87, 98.65, 2.21)
pt3dadd(86.72, 56.72, 98.65, 2.21)
pt3dadd(86.67, 56.67, 98.65, 2.21)
pt3dadd(86.63, 56.56, 98.65, 2.21)
pt3dadd(86.63, 56.46, 98.65, 2.21)
pt3dadd(86.58, 56.41, 98.65, 2.21)
pt3dadd(86.54, 56.31, 98.65, 2.21)
pt3dadd(86.5, 56.21, 98.65, 2.21)
pt3dadd(86.5, 56.11, 98.65, 2.21)
pt3dadd(86.45, 56.01, 98.65, 2.21)
pt3dadd(86.4, 55.9, 98.65, 2.21)
pt3dadd(86.32, 55.75, 98.65, 2.21)
pt3dadd(86.27, 55.65, 98.65, 2.21)
pt3dadd(86.23, 55.55, 98.65, 2.21)
pt3dadd(86.23, 55.45, 98.65, 2.21)
pt3dadd(86.18, 55.35, 98.65, 2.21)
pt3dadd(86.09, 55.15, 98.65, 2.21)
pt3dadd(86.05, 54.99, 98.65, 2.21)
pt3dadd(86, 54.89, 98.65, 2.21)
pt3dadd(85.92, 54.74, 98.65, 2.21)
pt3dadd(85.87, 54.59, 98.65, 2.21)
pt3dadd(85.82, 54.44, 98.65, 2.21)
pt3dadd(85.78, 54.38, 98.65, 2.21)
pt3dadd(85.74, 54.28, 98.65, 2.21)
pt3dadd(85.69, 54.24, 98.65, 2.21)
pt3dadd(85.65, 54.08, 98.65, 2.21)
pt3dadd(85.56, 53.93, 98.65, 2.21)
pt3dadd(85.56, 53.83, 98.65, 2.21)
pt3dadd(85.51, 53.73, 98.65, 2.21)
pt3dadd(85.47, 53.63, 98.65, 2.21)
pt3dadd(85.43, 53.58, 98.65, 2.21)
pt3dadd(85.38, 53.47, 98.65, 2.21)
pt3dadd(85.33, 53.37, 98.65, 2.21)
pt3dadd(85.29, 53.32, 98.65, 2.21)
pt3dadd(85.29, 53.22, 98.65, 2.21)
pt3dadd(85.25, 53.17, 98.65, 2.21)
pt3dadd(85.2, 53.07, 98.65, 2.21)
pt3dadd(85.16, 52.97, 98.65, 2.21)
pt3dadd(85.11, 52.87, 98.65, 2.21)
pt3dadd(85.07, 52.76, 98.65, 2.21)
pt3dadd(85.07, 52.67, 98.65, 2.21)
pt3dadd(85.02, 52.56, 98.65, 2.21)
pt3dadd(84.98, 52.46, 98.65, 2.21)
pt3dadd(84.93, 52.31, 98.65, 2.21)
pt3dadd(84.89, 52.26, 98.65, 2.21)
pt3dadd(84.8, 52.01, 98.65, 2.21)
pt3dadd(84.75, 51.9, 98.65, 2.21)
pt3dadd(84.71, 51.8, 98.65, 2.21)
pt3dadd(84.71, 51.7, 98.65, 2.21)
pt3dadd(84.62, 51.6, 98.65, 2.21)
pt3dadd(84.62, 51.5, 98.65, 2.21)
pt3dadd(84.58, 51.35, 98.65, 2.21)
pt3dadd(84.53, 51.25, 98.65, 2.21)
pt3dadd(84.49, 51.15, 98.65, 2.21)
pt3dadd(84.44, 51.04, 98.65, 2.21)
pt3dadd(84.4, 50.89, 98.65, 2.21)
pt3dadd(84.36, 50.74, 98.65, 2.21)
pt3dadd(84.31, 50.59, 98.65, 2.21)
pt3dadd(84.26, 50.49, 98.65, 2.21)
pt3dadd(84.22, 50.44, 98.65, 2.21)
pt3dadd(84.22, 50.33, 98.65, 2.21)
pt3dadd(84.18, 50.24, 98.65, 2.21)
pt3dadd(84.09, 50.13, 98.65, 2.21)
pt3dadd(84.04, 50.03, 98.65, 2.21)
pt3dadd(84, 49.93, 98.65, 2.21)
pt3dadd(83.91, 49.78, 98.65, 2.21)
pt3dadd(83.73, 49.58, 98.65, 2.21)
pt3dadd(83.68, 49.47, 98.65, 2.21)
pt3dadd(83.64, 49.42, 98.65, 2.21)
pt3dadd(83.6, 49.37, 98.65, 2.21)
pt3dadd(83.55, 49.32, 98.65, 2.21)
pt3dadd(83.55, 49.22, 98.65, 2.21)
pt3dadd(83.46, 49.17, 98.65, 2.21)
pt3dadd(83.24, 48.92, 98.65, 2.21)
pt3dadd(83.19, 48.87, 98.65, 2.21)
pt3dadd(83.11, 48.76, 98.65, 2.21)
pt3dadd(83.06, 48.72, 98.65, 2.21)
pt3dadd(83.02, 48.67, 98.65, 2.21)
pt3dadd(82.97, 48.61, 98.65, 2.21)
pt3dadd(82.93, 48.51, 98.65, 2.21)
pt3dadd(82.84, 48.46, 98.65, 2.21)
pt3dadd(82.79, 48.41, 98.65, 2.21)
pt3dadd(82.75, 48.31, 98.65, 2.21)
pt3dadd(82.66, 48.21, 98.65, 2.21)
pt3dadd(82.61, 48.16, 98.65, 2.21)
pt3dadd(82.57, 48.11, 98.65, 2.21)
pt3dadd(82.48, 48.06, 98.65, 2.21)
pt3dadd(82.44, 48.01, 98.65, 2.21)
pt3dadd(82.35, 47.96, 98.65, 2.21)
pt3dadd(82.26, 47.8, 98.65, 2.21)
pt3dadd(82.17, 47.75, 98.65, 2.21)
pt3dadd(82.13, 47.65, 98.65, 2.21)
pt3dadd(82.04, 47.6, 98.65, 2.21)
pt3dadd(81.99, 47.5, 98.65, 2.21)
pt3dadd(81.9, 47.45, 98.65, 2.21)
pt3dadd(81.81, 47.35, 98.65, 2.21)
pt3dadd(81.72, 47.25, 98.65, 2.21)
pt3dadd(81.68, 47.15, 98.65, 2.21)
pt3dadd(81.64, 47.1, 98.65, 2.21)
pt3dadd(81.59, 47.04, 98.65, 2.21)
pt3dadd(81.54, 46.99, 98.65, 2.21)
pt3dadd(81.54, 47.15, 98.65, 2.21)
pt3dadd(81.64, 46.94, 100.75, 2.21)
pt3dadd(81.59, 46.89, 100.75, 2.21)
pt3dadd(81.54, 46.74, 100.75, 2.21)
pt3dadd(81.54, 46.59, 100.75, 2.21)
pt3dadd(81.5, 46.49, 100.75, 2.21)
pt3dadd(81.46, 46.38, 100.75, 2.21)
pt3dadd(81.46, 46.23, 100.75, 2.21)
pt3dadd(81.41, 46.13, 100.75, 2.21)
pt3dadd(81.37, 46.03, 100.75, 2.21)
pt3dadd(81.32, 45.98, 100.75, 2.21)
pt3dadd(81.28, 45.88, 100.75, 2.21)
pt3dadd(81.28, 45.78, 100.75, 2.21)
pt3dadd(81.23, 45.73, 100.75, 2.21)
pt3dadd(81.19, 45.68, 100.75, 2.21)
pt3dadd(81.19, 45.58, 100.75, 2.21)
pt3dadd(81.14, 45.47, 100.75, 2.21)
pt3dadd(81.1, 45.37, 100.75, 2.21)
pt3dadd(81.06, 45.32, 100.75, 2.21)
pt3dadd(81.01, 45.27, 100.75, 2.21)
pt3dadd(81.01, 45.17, 100.75, 2.21)
pt3dadd(80.92, 45.07, 100.75, 2.21)
pt3dadd(80.88, 44.97, 100.75, 2.21)
pt3dadd(80.83, 44.92, 100.75, 2.21)
pt3dadd(80.74, 44.81, 100.75, 2.21)
pt3dadd(80.7, 44.72, 100.75, 2.21)
pt3dadd(80.65, 44.61, 100.75, 2.21)
pt3dadd(80.57, 44.56, 100.75, 2.21)
pt3dadd(80.52, 44.46, 100.75, 2.21)
pt3dadd(80.47, 44.41, 100.75, 2.21)
pt3dadd(80.43, 44.31, 100.75, 2.21)
pt3dadd(80.34, 44.26, 100.75, 2.21)
pt3dadd(80.3, 44.16, 100.75, 2.21)
pt3dadd(80.21, 44.11, 100.75, 2.21)
pt3dadd(80.12, 44.06, 100.75, 2.21)
pt3dadd(79.99, 43.8, 100.75, 2.21)
pt3dadd(79.94, 43.75, 100.75, 2.21)
pt3dadd(79.85, 43.65, 100.75, 2.21)
pt3dadd(79.81, 43.6, 100.75, 2.21)
pt3dadd(79.72, 43.55, 100.75, 2.21)
pt3dadd(79.67, 43.5, 100.75, 2.21)
pt3dadd(79.63, 43.35, 100.75, 2.21)
pt3dadd(79.54, 43.3, 100.75, 2.21)
pt3dadd(79.45, 43.15, 100.75, 2.21)
pt3dadd(79.36, 42.99, 100.75, 2.21)
pt3dadd(79.27, 42.89, 100.75, 2.21)
pt3dadd(79.23, 42.84, 100.75, 2.21)
pt3dadd(79.18, 42.79, 100.75, 2.21)
pt3dadd(79.09, 42.64, 100.75, 2.21)
pt3dadd(79, 42.49, 100.75, 2.21)
pt3dadd(78.92, 42.38, 100.75, 2.21)
pt3dadd(78.87, 42.33, 100.75, 2.21)
pt3dadd(78.78, 42.18, 100.75, 2.21)
pt3dadd(78.74, 42.13, 100.75, 2.21)
pt3dadd(78.69, 42.03, 100.75, 2.21)
pt3dadd(78.6, 41.98, 100.75, 2.21)
pt3dadd(78.56, 41.93, 100.75, 2.21)
pt3dadd(78.51, 41.83, 100.75, 2.21)
pt3dadd(78.43, 41.78, 100.75, 2.21)
pt3dadd(78.29, 41.63, 100.75, 2.21)
pt3dadd(78.25, 41.58, 100.75, 2.21)
pt3dadd(78.16, 41.42, 100.75, 2.21)
pt3dadd(78.11, 41.37, 100.75, 2.21)
pt3dadd(78.02, 41.32, 100.75, 2.21)
pt3dadd(77.98, 41.22, 100.75, 2.21)
pt3dadd(77.89, 41.17, 100.75, 2.21)
pt3dadd(77.85, 41.12, 100.75, 2.21)
pt3dadd(77.8, 41.02, 100.75, 2.21)
pt3dadd(77.71, 40.97, 100.75, 2.21)
pt3dadd(77.67, 40.92, 100.75, 2.21)
pt3dadd(77.62, 40.81, 100.75, 2.21)
pt3dadd(77.44, 40.61, 100.75, 2.21)
pt3dadd(77.4, 40.51, 100.75, 2.21)
pt3dadd(77.36, 40.46, 100.75, 2.21)
pt3dadd(77.26, 40.41, 100.75, 2.21)
pt3dadd(77.22, 40.31, 100.75, 2.21)
pt3dadd(77.18, 40.21, 100.75, 2.21)
pt3dadd(77.13, 40.11, 100.75, 2.21)
pt3dadd(77.04, 40.01, 100.75, 2.21)
pt3dadd(77, 39.9, 100.75, 2.21)
pt3dadd(76.95, 39.8, 100.75, 2.21)
pt3dadd(76.91, 39.75, 100.75, 2.21)
pt3dadd(76.86, 39.65, 100.75, 2.21)
pt3dadd(76.82, 39.55, 100.75, 2.21)
pt3dadd(76.78, 39.45, 100.75, 2.21)
pt3dadd(76.64, 39.3, 100.75, 2.21)
pt3dadd(76.6, 39.19, 100.75, 2.21)
pt3dadd(76.42, 38.94, 100.75, 2.21)
pt3dadd(76.29, 38.79, 100.75, 2.21)
pt3dadd(76.24, 38.64, 100.75, 2.21)
pt3dadd(76.11, 38.49, 100.75, 2.21)
pt3dadd(76.02, 38.44, 100.75, 2.21)
pt3dadd(75.93, 38.33, 100.75, 2.21)
pt3dadd(75.88, 38.23, 100.75, 2.21)
pt3dadd(75.84, 38.13, 100.75, 2.21)
pt3dadd(75.79, 38.08, 100.75, 2.21)
pt3dadd(75.61, 37.83, 100.75, 2.21)
pt3dadd(75.57, 37.73, 100.75, 2.21)
}
}
proc shape3d_181() {
dend[120] { pt3dadd(75.48, 37.63, 100.75, 2.21)
pt3dadd(75.44, 37.53, 100.75, 2.21)
pt3dadd(75.39, 37.42, 100.75, 2.21)
pt3dadd(75.3, 37.37, 100.75, 2.21)
pt3dadd(75.26, 37.27, 100.75, 2.21)
pt3dadd(75.17, 37.17, 100.75, 2.21)
pt3dadd(75.13, 37.12, 100.75, 2.21)
pt3dadd(75.04, 37.02, 100.75, 2.21)
pt3dadd(74.95, 36.87, 100.75, 2.21)
pt3dadd(74.9, 36.76, 100.75, 2.21)
pt3dadd(74.86, 36.72, 100.75, 2.21)
pt3dadd(74.77, 36.61, 100.75, 2.21)
pt3dadd(74.72, 36.56, 100.75, 2.21)
pt3dadd(74.68, 36.46, 100.75, 2.21)
pt3dadd(74.46, 36.21, 100.75, 2.21)
pt3dadd(74.41, 36.16, 100.75, 2.21)
pt3dadd(74.37, 36.1, 100.75, 2.21)
pt3dadd(74.28, 36.06, 100.75, 2.21)
pt3dadd(74.19, 36.01, 100.75, 2.21)
pt3dadd(74.1, 35.9, 100.75, 2.21)
pt3dadd(74.06, 35.85, 100.75, 2.21)
pt3dadd(74.01, 35.8, 100.75, 2.21)
pt3dadd(73.88, 35.65, 100.75, 2.21)
pt3dadd(73.79, 35.55, 100.75, 2.21)
pt3dadd(73.52, 35.24, 100.75, 2.21)
pt3dadd(73.47, 35.19, 100.75, 2.21)
pt3dadd(73.43, 35.15, 100.75, 2.21)
pt3dadd(73.34, 35.04, 100.75, 2.21)
pt3dadd(73.3, 34.99, 100.75, 2.21)
pt3dadd(73.25, 34.94, 100.75, 2.21)
pt3dadd(73.16, 34.89, 100.75, 2.21)
pt3dadd(72.89, 34.59, 100.75, 2.21)
pt3dadd(72.85, 34.54, 100.75, 2.21)
pt3dadd(72.76, 34.44, 100.75, 2.21)
pt3dadd(72.67, 34.38, 100.75, 2.21)
pt3dadd(72.63, 34.28, 100.75, 2.21)
pt3dadd(72.5, 34.18, 100.75, 2.21)
pt3dadd(72.4, 34.08, 100.75, 2.21)
pt3dadd(72.32, 33.98, 100.75, 2.21)
pt3dadd(72.18, 33.88, 100.75, 2.21)
pt3dadd(72.09, 33.83, 100.75, 2.21)
pt3dadd(72.05, 33.73, 100.75, 2.21)
pt3dadd(71.96, 33.63, 100.75, 2.21)
pt3dadd(71.82, 33.58, 100.75, 2.21)
pt3dadd(71.74, 33.53, 100.75, 2.21)
pt3dadd(71.69, 33.47, 100.75, 2.21)
pt3dadd(71.6, 33.47, 100.75, 2.21)
pt3dadd(71.56, 33.42, 100.75, 2.21)
pt3dadd(71.47, 33.37, 100.75, 2.21)
pt3dadd(71.38, 33.32, 100.75, 2.21)
pt3dadd(71.51, 33.37, 100.75, 2.21)
pt3dadd(69.96, 32.06, 100.75, 2.21)
pt3dadd(69.96, 32.16, 100.75, 2.21)
pt3dadd(69.91, 32.1, 100.75, 2.21)
pt3dadd(69.86, 32.01, 100.75, 2.21)
pt3dadd(69.82, 31.9, 100.75, 2.21)
pt3dadd(69.55, 31.6, 100.75, 2.21)
pt3dadd(69.51, 31.55, 100.75, 2.21)
pt3dadd(69.46, 31.5, 100.75, 2.21)
pt3dadd(69.38, 31.4, 100.75, 2.21)
pt3dadd(69.33, 31.35, 100.75, 2.21)
pt3dadd(69.29, 31.25, 100.75, 2.21)
pt3dadd(69.24, 31.19, 100.75, 2.21)
pt3dadd(69.19, 31.15, 100.75, 2.21)
pt3dadd(69.11, 31.09, 100.75, 2.21)
pt3dadd(69.06, 30.99, 100.75, 2.21)
pt3dadd(69.02, 30.89, 100.75, 2.21)
pt3dadd(68.93, 30.84, 100.75, 2.21)
pt3dadd(68.89, 30.79, 100.75, 2.21)
pt3dadd(68.84, 30.69, 100.75, 2.21)
pt3dadd(68.79, 30.53, 100.75, 2.21)
pt3dadd(68.71, 30.49, 100.75, 2.21)
pt3dadd(68.66, 30.39, 100.75, 2.21)
pt3dadd(68.62, 30.28, 100.75, 2.21)
pt3dadd(68.57, 30.18, 100.75, 2.21)
pt3dadd(68.53, 30.13, 100.75, 2.21)
pt3dadd(68.48, 30.03, 100.75, 2.21)
pt3dadd(68.48, 29.88, 100.75, 2.21)
pt3dadd(68.39, 29.83, 100.75, 2.21)
pt3dadd(68.39, 29.67, 100.75, 2.21)
pt3dadd(68.35, 29.52, 100.75, 2.21)
pt3dadd(68.31, 29.42, 100.75, 2.21)
pt3dadd(68.26, 29.27, 100.75, 2.21)
pt3dadd(68.17, 29.12, 100.75, 2.21)
pt3dadd(68.13, 28.97, 100.75, 2.21)
pt3dadd(68.08, 28.86, 100.75, 2.21)
pt3dadd(68.04, 28.76, 100.75, 2.21)
pt3dadd(68.04, 28.61, 100.75, 2.21)
pt3dadd(67.95, 28.46, 100.75, 2.21)
pt3dadd(67.86, 28.36, 100.75, 2.21)
pt3dadd(67.86, 28.26, 100.75, 2.21)
pt3dadd(67.82, 28.16, 100.75, 2.21)
pt3dadd(67.77, 28.06, 100.75, 2.21)
pt3dadd(67.72, 28, 100.75, 2.21)
pt3dadd(67.68, 27.95, 100.75, 2.21)
pt3dadd(67.64, 27.85, 100.75, 2.21)
pt3dadd(67.59, 27.7, 100.75, 2.21)
pt3dadd(67.5, 27.6, 100.75, 2.21)
pt3dadd(67.46, 27.5, 100.75, 2.21)
pt3dadd(67.41, 27.4, 100.75, 2.21)
pt3dadd(67.37, 27.25, 100.75, 2.21)
pt3dadd(67.32, 27.19, 100.75, 2.21)
pt3dadd(67.28, 27.09, 100.75, 2.21)
pt3dadd(67.24, 27.04, 100.75, 2.21)
pt3dadd(67.19, 26.99, 100.75, 2.21)
pt3dadd(67.14, 26.89, 100.75, 2.21)
pt3dadd(67.1, 26.84, 100.75, 2.21)
pt3dadd(67.01, 26.69, 100.75, 2.21)
pt3dadd(66.97, 26.64, 100.75, 2.21)
pt3dadd(66.92, 26.53, 100.75, 2.21)
pt3dadd(66.83, 26.43, 100.75, 2.21)
pt3dadd(66.79, 26.39, 100.75, 2.21)
pt3dadd(66.65, 26.23, 100.75, 2.21)
pt3dadd(66.61, 26.18, 100.75, 2.21)
pt3dadd(66.52, 26.13, 100.75, 2.21)
pt3dadd(66.48, 26.08, 100.75, 2.21)
pt3dadd(66.39, 26.03, 100.75, 2.21)
pt3dadd(66.34, 25.98, 100.75, 2.21)
pt3dadd(66.25, 25.93, 100.75, 2.21)
pt3dadd(66.21, 25.88, 100.75, 2.21)
pt3dadd(66.12, 25.83, 100.75, 2.21)
pt3dadd(66.03, 25.83, 100.75, 2.21)
pt3dadd(65.94, 25.78, 100.75, 2.21)
pt3dadd(65.85, 25.73, 100.75, 2.21)
pt3dadd(65.76, 25.73, 100.75, 2.21)
pt3dadd(65.72, 25.67, 100.75, 2.21)
pt3dadd(65.68, 25.63, 100.75, 2.21)
pt3dadd(65.5, 25.52, 100.75, 2.21)
pt3dadd(65.41, 25.42, 100.75, 2.21)
pt3dadd(65.36, 25.37, 100.75, 2.21)
pt3dadd(65.23, 25.32, 100.75, 2.21)
pt3dadd(65.05, 25.32, 100.75, 2.21)
pt3dadd(65, 25.27, 100.75, 2.21)
pt3dadd(64.96, 25.22, 100.75, 2.21)
pt3dadd(64.83, 25.22, 100.75, 2.21)
pt3dadd(64.78, 25.17, 100.75, 2.21)
pt3dadd(64.69, 25.17, 100.75, 2.21)
pt3dadd(64.65, 25.12, 100.75, 2.21)
pt3dadd(64.56, 25.07, 100.75, 2.21)
pt3dadd(64.47, 25.02, 100.75, 2.21)
pt3dadd(64.38, 24.97, 100.75, 2.21)
pt3dadd(64.34, 24.92, 100.75, 2.21)
pt3dadd(64.29, 24.86, 100.75, 2.21)
pt3dadd(64.2, 24.76, 100.75, 2.21)
pt3dadd(64.16, 24.71, 100.75, 2.21)
pt3dadd(64.07, 24.71, 100.75, 2.21)
pt3dadd(64.03, 24.66, 100.75, 2.21)
pt3dadd(63.98, 24.61, 100.75, 2.21)
pt3dadd(63.89, 24.56, 100.75, 2.21)
pt3dadd(63.85, 24.51, 100.75, 2.21)
pt3dadd(63.8, 24.41, 100.75, 2.21)
pt3dadd(63.76, 24.36, 100.75, 2.21)
pt3dadd(63.71, 24.26, 100.75, 2.21)
pt3dadd(63.67, 24.21, 100.75, 2.21)
pt3dadd(63.58, 24, 100.75, 2.21)
pt3dadd(63.53, 23.85, 100.75, 2.21)
pt3dadd(63.49, 23.75, 100.75, 2.21)
pt3dadd(63.44, 23.7, 100.75, 2.21)
pt3dadd(63.4, 23.5, 100.75, 2.21)
pt3dadd(63.35, 23.4, 100.75, 2.21)
pt3dadd(63.31, 23.25, 100.75, 2.21)
pt3dadd(63.27, 23.14, 100.75, 2.21)
pt3dadd(63.22, 22.99, 100.75, 2.21)
pt3dadd(63.18, 22.94, 100.75, 2.21)
pt3dadd(63.13, 22.84, 100.75, 2.21)
pt3dadd(63.13, 22.74, 100.75, 2.21)
pt3dadd(63.09, 22.69, 100.75, 2.21)
pt3dadd(63.04, 22.64, 100.75, 2.21)
pt3dadd(63.04, 22.53, 100.75, 2.21)
pt3dadd(63, 22.49, 100.75, 2.21)
pt3dadd(62.96, 22.43, 100.75, 2.21)
pt3dadd(62.96, 22.33, 100.75, 2.21)
pt3dadd(62.91, 22.28, 100.75, 2.21)
pt3dadd(62.87, 22.18, 100.75, 2.21)
pt3dadd(62.87, 22.03, 100.75, 2.21)
pt3dadd(62.82, 21.93, 100.75, 2.21)
pt3dadd(62.82, 20.16, 100.75, 2.21)
pt3dadd(62.87, 20.06, 100.75, 2.21)
pt3dadd(62.91, 20, 100.75, 2.21)
pt3dadd(62.96, 19.9, 100.75, 2.21)
pt3dadd(63.04, 19.8, 100.75, 2.21)
pt3dadd(63.09, 19.75, 100.75, 2.21)
pt3dadd(63.13, 19.6, 100.75, 2.21)
pt3dadd(63.18, 19.5, 100.75, 2.21)
pt3dadd(63.22, 19.45, 100.75, 2.21)
pt3dadd(63.31, 19.34, 100.75, 2.21)
pt3dadd(63.35, 19.3, 100.75, 2.21)
pt3dadd(63.4, 19.25, 100.75, 2.21)
pt3dadd(63.44, 19.19, 100.75, 2.21)
pt3dadd(63.44, 19.09, 100.75, 2.21)
pt3dadd(63.53, 18.99, 100.75, 2.21)
pt3dadd(63.58, 18.94, 100.75, 2.21)
pt3dadd(63.62, 18.84, 100.75, 2.21)
pt3dadd(63.71, 18.74, 100.75, 2.21)
pt3dadd(63.76, 18.69, 100.75, 2.21)
pt3dadd(63.8, 18.64, 100.75, 2.21)
pt3dadd(63.85, 18.58, 100.75, 2.21)
pt3dadd(63.85, 18.49, 100.75, 2.21)
pt3dadd(63.94, 18.49, 100.75, 2.21)
pt3dadd(63.94, 18.38, 100.75, 2.21)
}
}
proc shape3d_182() {
dend[120] { pt3dadd(63.98, 18.33, 100.75, 2.21)
pt3dadd(64.03, 18.28, 100.75, 2.21)
pt3dadd(64.16, 18.18, 100.75, 2.21)
pt3dadd(64.25, 18.08, 100.75, 2.21)
pt3dadd(64.38, 17.93, 100.75, 2.21)
pt3dadd(64.43, 17.83, 100.75, 2.21)
pt3dadd(64.51, 17.77, 100.75, 2.21)
pt3dadd(64.61, 17.67, 100.75, 2.21)
pt3dadd(64.69, 17.57, 100.75, 2.21)
pt3dadd(64.78, 17.42, 100.75, 2.21)
pt3dadd(64.87, 17.32, 100.75, 2.21)
pt3dadd(64.87, 17.22, 100.75, 2.21)
pt3dadd(64.92, 17.17, 100.75, 2.21)
pt3dadd(64.83, 17.37, 98.65, 2.21)
pt3dadd(64.92, 17.37, 98.65, 2.21)
pt3dadd(64.92, 17.27, 98.65, 2.21)
pt3dadd(65, 17.17, 98.65, 2.21)
pt3dadd(65.14, 17.07, 98.65, 2.21)
pt3dadd(65.45, 16.71, 98.65, 2.21)
pt3dadd(65.5, 16.66, 98.65, 2.21)
pt3dadd(65.58, 16.56, 98.65, 2.21)
pt3dadd(65.68, 16.36, 98.65, 2.21)
pt3dadd(65.9, 16.06, 98.65, 2.21)
pt3dadd(65.9, 15.95, 98.65, 2.21)
pt3dadd(65.99, 15.8, 98.65, 2.21)
pt3dadd(66.07, 15.65, 98.65, 2.21)
pt3dadd(66.17, 15.55, 98.65, 2.21)
pt3dadd(66.21, 15.45, 98.65, 2.21)
pt3dadd(66.34, 15.3, 98.65, 2.21)
pt3dadd(66.39, 15.19, 98.65, 2.21)
pt3dadd(66.43, 15.09, 98.65, 2.21)
pt3dadd(66.65, 14.84, 98.65, 2.21)
pt3dadd(66.7, 14.79, 98.65, 2.21)
pt3dadd(66.83, 14.59, 98.65, 2.21)
pt3dadd(66.88, 14.48, 98.65, 2.21)
pt3dadd(66.97, 14.38, 98.65, 2.21)
pt3dadd(67.06, 14.23, 98.65, 2.21)
pt3dadd(67.1, 14.13, 98.65, 2.21)
pt3dadd(67.24, 13.88, 98.65, 2.21)
pt3dadd(67.28, 13.82, 98.65, 2.21)
pt3dadd(67.32, 13.68, 98.65, 2.21)
pt3dadd(67.46, 13.52, 98.65, 2.21)
pt3dadd(67.5, 13.42, 98.65, 2.21)
pt3dadd(67.55, 13.32, 98.65, 2.21)
pt3dadd(67.64, 13.22, 98.65, 2.21)
pt3dadd(67.68, 13.12, 98.65, 2.21)
pt3dadd(67.77, 12.97, 98.65, 2.21)
pt3dadd(67.82, 12.86, 98.65, 2.21)
pt3dadd(67.95, 12.71, 98.65, 2.21)
pt3dadd(67.99, 12.66, 98.65, 2.21)
pt3dadd(68.08, 12.46, 98.65, 2.21)
pt3dadd(68.17, 12.41, 98.65, 2.21)
pt3dadd(68.21, 12.31, 98.65, 2.21)
pt3dadd(68.26, 12.26, 98.65, 2.21)
pt3dadd(68.31, 12.1, 98.65, 2.21)
pt3dadd(68.44, 11.95, 98.65, 2.21)
pt3dadd(68.44, 11.85, 98.65, 2.21)
pt3dadd(68.48, 11.8, 98.65, 2.21)
pt3dadd(68.57, 11.75, 98.65, 2.21)
pt3dadd(68.62, 11.7, 98.65, 2.21)
pt3dadd(68.66, 11.6, 98.65, 2.21)
pt3dadd(68.84, 11.4, 98.65, 2.21)
pt3dadd(68.89, 11.3, 98.65, 2.21)
pt3dadd(68.93, 11.3, 98.65, 2.21)
pt3dadd(68.89, 11.44, 93.4, 2.21)
pt3dadd(68.97, 11.4, 93.4, 2.21)
pt3dadd(69.11, 11.35, 93.4, 2.21)
pt3dadd(69.24, 11.35, 93.4, 2.21)
pt3dadd(69.33, 11.3, 93.4, 2.21)
pt3dadd(69.46, 11.24, 93.4, 2.21)
pt3dadd(69.51, 11.19, 93.4, 2.21)
pt3dadd(69.64, 11.14, 93.4, 2.21)
pt3dadd(69.73, 11.14, 93.4, 2.21)
pt3dadd(69.82, 11.09, 93.4, 2.21)
pt3dadd(69.91, 11.04, 93.4, 2.21)
pt3dadd(69.96, 10.99, 93.4, 2.21)
pt3dadd(70.04, 10.94, 93.4, 2.21)
pt3dadd(70.18, 10.84, 93.4, 2.21)
pt3dadd(70.31, 10.79, 93.4, 2.21)
pt3dadd(70.36, 10.74, 93.4, 2.21)
pt3dadd(70.44, 10.64, 93.4, 2.21)
pt3dadd(70.53, 10.59, 93.4, 2.21)
pt3dadd(70.62, 10.48, 93.4, 2.21)
pt3dadd(70.67, 10.43, 93.4, 2.21)
pt3dadd(70.75, 10.38, 93.4, 2.21)
pt3dadd(70.89, 10.23, 93.4, 2.21)
pt3dadd(70.98, 10.18, 93.4, 2.21)
pt3dadd(71.11, 10.08, 93.4, 2.21)
pt3dadd(71.25, 9.98, 93.4, 2.21)
pt3dadd(71.33, 9.88, 93.4, 2.21)
pt3dadd(71.47, 9.77, 93.4, 2.21)
pt3dadd(71.56, 9.62, 93.4, 2.21)
pt3dadd(71.69, 9.52, 93.4, 2.21)
pt3dadd(71.74, 9.47, 93.4, 2.21)
pt3dadd(71.87, 9.32, 93.4, 2.21)
pt3dadd(71.96, 9.27, 93.4, 2.21)
pt3dadd(72.09, 9.12, 93.4, 2.21)
pt3dadd(72.18, 9.02, 93.4, 2.21)
pt3dadd(72.32, 8.91, 93.4, 2.21)
pt3dadd(72.45, 8.76, 93.4, 2.21)
pt3dadd(72.54, 8.66, 93.4, 2.21)
pt3dadd(72.63, 8.56, 93.4, 2.21)
pt3dadd(72.81, 8.41, 93.4, 2.21)
pt3dadd(72.94, 8.31, 93.4, 2.21)
pt3dadd(73.21, 8.05, 93.4, 2.21)
pt3dadd(73.34, 7.9, 93.4, 2.21)
pt3dadd(73.47, 7.8, 93.4, 2.21)
pt3dadd(73.61, 7.65, 93.4, 2.21)
pt3dadd(73.74, 7.5, 93.4, 2.21)
pt3dadd(73.88, 7.39, 93.4, 2.21)
pt3dadd(73.96, 7.3, 93.4, 2.21)
pt3dadd(74.06, 7.14, 93.4, 2.21)
pt3dadd(74.19, 7.04, 93.4, 2.21)
pt3dadd(74.23, 6.94, 93.4, 2.21)
pt3dadd(74.37, 6.84, 93.4, 2.21)
pt3dadd(74.5, 6.69, 93.4, 2.21)
pt3dadd(74.54, 6.64, 93.4, 2.21)
pt3dadd(74.64, 6.53, 93.4, 2.21)
pt3dadd(74.68, 6.49, 93.4, 2.21)
pt3dadd(74.77, 6.33, 93.4, 2.21)
pt3dadd(74.86, 6.28, 93.4, 2.21)
pt3dadd(74.9, 6.18, 93.4, 2.21)
pt3dadd(74.95, 6.13, 93.4, 2.21)
pt3dadd(74.99, 6.08, 93.4, 2.21)
pt3dadd(75.13, 5.93, 93.4, 2.21)
pt3dadd(75.17, 5.88, 93.4, 2.21)
pt3dadd(75.21, 5.82, 93.4, 2.21)
pt3dadd(75.17, 5.98, 88.15, 2.21)
pt3dadd(75.3, 5.88, 88.15, 2.21)
pt3dadd(75.48, 5.72, 88.15, 2.21)
pt3dadd(75.61, 5.67, 88.15, 2.21)
pt3dadd(75.75, 5.62, 88.15, 2.21)
pt3dadd(75.84, 5.52, 88.15, 2.21)
pt3dadd(75.88, 5.47, 88.15, 2.21)
pt3dadd(76.06, 5.47, 88.15, 2.21)
pt3dadd(76.15, 5.42, 88.15, 2.21)
pt3dadd(76.19, 5.37, 88.15, 2.21)
pt3dadd(76.33, 5.32, 88.15, 2.21)
pt3dadd(76.46, 5.27, 88.15, 2.21)
pt3dadd(76.55, 5.22, 88.15, 2.21)
pt3dadd(76.68, 5.12, 88.15, 2.21)
pt3dadd(76.78, 5.01, 88.15, 2.21)
pt3dadd(76.86, 5.01, 88.15, 2.21)
pt3dadd(77.09, 4.86, 88.15, 2.21)
pt3dadd(77.22, 4.81, 88.15, 2.21)
pt3dadd(77.31, 4.71, 88.15, 2.21)
pt3dadd(77.53, 4.56, 88.15, 2.21)
pt3dadd(77.62, 4.51, 88.15, 2.21)
pt3dadd(77.75, 4.36, 88.15, 2.21)
pt3dadd(77.89, 4.31, 88.15, 2.21)
pt3dadd(78.11, 4.11, 88.15, 2.21)
pt3dadd(78.25, 4, 88.15, 2.21)
pt3dadd(78.38, 3.9, 88.15, 2.21)
pt3dadd(78.51, 3.85, 88.15, 2.21)
pt3dadd(78.6, 3.75, 88.15, 2.21)
pt3dadd(78.74, 3.7, 88.15, 2.21)
pt3dadd(78.87, 3.6, 88.15, 2.21)
pt3dadd(79, 3.5, 88.15, 2.21)
pt3dadd(79.09, 3.44, 88.15, 2.21)
pt3dadd(79.23, 3.35, 88.15, 2.21)
pt3dadd(79.32, 3.35, 88.15, 2.21)
pt3dadd(79.4, 3.29, 88.15, 2.21)
pt3dadd(79.5, 3.24, 88.15, 2.21)
pt3dadd(79.58, 3.19, 88.15, 2.21)
pt3dadd(79.63, 3.14, 88.15, 2.21)
pt3dadd(79.76, 3.14, 88.15, 2.21)
pt3dadd(79.81, 3.09, 88.15, 2.21)
pt3dadd(79.89, 3.04, 88.15, 2.21)
pt3dadd(79.94, 2.99, 88.15, 2.21)
pt3dadd(80.03, 2.99, 88.15, 2.21)
pt3dadd(80.07, 2.99, 85, 2.21)
pt3dadd(80.21, 2.99, 85, 2.21)
pt3dadd(80.3, 2.94, 85, 2.21)
pt3dadd(80.47, 2.89, 85, 2.21)
pt3dadd(80.7, 2.79, 85, 2.21)
pt3dadd(80.96, 2.3, 85, 2.21)
pt3dadd(89.87, 3.15, 0, 1.86)
pt3dadd(101.87, 5.48, 0, 1.86)
pt3dadd(108.76, 8.05, 0, 1.86)
pt3dadd(110.54, 8.42, 0, 1.86)
}
dend[121] {pt3dclear()
pt3dadd(111.24, 105.58, 96.55, 3.74)
pt3dadd(111.44, 104.87, 96.55, 3.74)
pt3dadd(111.77, 104.97, 96.55, 3.74)
}
dend[122] {pt3dclear()
pt3dadd(111.24, 105.58, 96.55, 3.1)
pt3dadd(115.03, 102.52, 0, 3.1)
pt3dadd(123.63, 88.93, 0, 3.72)
pt3dadd(131.6, 70.19, 0, 3.72)
pt3dadd(144.06, 45.33, 0, 3.72)
pt3dadd(160.24, 8.97, 0, 3.72)
}
dend[123] {pt3dclear()
pt3dadd(98.33, 109.38, -4.7, 5.02)
pt3dadd(98.18, 109.5, -4.7, 5.02)
pt3dadd(98.21, 109.58, -4.7, 5.02)
pt3dadd(98.25, 109.62, -4.7, 5.02)
pt3dadd(98.29, 109.66, -4.7, 5.02)
pt3dadd(98.32, 109.7, -4.7, 5.02)
pt3dadd(98.43, 109.78, -4.7, 5.02)
pt3dadd(98.5, 109.82, -4.7, 5.02)
pt3dadd(98.53, 109.86, -4.7, 5.02)
pt3dadd(98.57, 109.89, -4.7, 5.02)
pt3dadd(98.6, 109.93, -4.7, 5.02)
}
}
proc shape3d_183() {
dend[123] { pt3dadd(98.64, 110.01, -4.7, 5.02)
pt3dadd(98.67, 110.06, -4.7, 5.02)
pt3dadd(98.7, 110.09, -4.7, 5.02)
pt3dadd(98.74, 110.17, -4.7, 5.02)
pt3dadd(98.77, 110.25, -4.7, 5.02)
pt3dadd(98.81, 110.29, -4.7, 5.02)
pt3dadd(98.81, 110.69, -4.7, 5.02)
pt3dadd(98.84, 110.76, -4.7, 5.02)
pt3dadd(98.84, 110.89, -4.7, 5.02)
pt3dadd(98.88, 110.93, -4.7, 5.02)
pt3dadd(98.88, 111.08, -4.7, 5.02)
pt3dadd(99.05, 111.2, -4.7, 3.62)
pt3dadd(99.05, 111.28, -4.7, 3.62)
pt3dadd(99.09, 111.36, -4.7, 3.62)
pt3dadd(99.12, 111.44, -4.7, 3.62)
pt3dadd(99.12, 111.56, -4.7, 3.62)
pt3dadd(99.16, 111.6, -4.7, 3.62)
pt3dadd(99.16, 112.07, -4.7, 3.62)
pt3dadd(99.19, 112.11, -4.7, 3.62)
pt3dadd(99.19, 112.27, -4.7, 3.62)
pt3dadd(99.22, 112.31, -4.7, 3.62)
pt3dadd(99.26, 112.39, -4.7, 3.62)
pt3dadd(99.29, 112.47, -4.7, 3.62)
pt3dadd(99.29, 112.67, -4.7, 3.62)
pt3dadd(99.33, 112.75, -4.7, 3.62)
pt3dadd(99.36, 112.82, -4.7, 3.62)
pt3dadd(99.36, 112.9, -4.7, 3.62)
pt3dadd(99.43, 112.9, -4.7, 3.62)
pt3dadd(99.43, 112.98, -4.7, 3.62)
pt3dadd(99.47, 113.02, -4.7, 3.62)
pt3dadd(99.5, 113.1, -4.7, 3.62)
pt3dadd(99.54, 113.18, -4.7, 3.62)
pt3dadd(99.57, 113.26, -4.7, 3.62)
pt3dadd(99.61, 113.3, -4.7, 3.62)
pt3dadd(99.64, 113.38, -4.7, 3.62)
pt3dadd(99.68, 113.46, -4.7, 3.62)
pt3dadd(99.71, 113.54, -4.7, 3.62)
pt3dadd(99.75, 113.61, -4.7, 3.62)
pt3dadd(99.78, 113.65, -4.7, 3.62)
pt3dadd(99.82, 113.69, -4.7, 3.62)
pt3dadd(99.89, 113.81, -4.7, 3.62)
pt3dadd(99.92, 113.89, -4.7, 3.62)
pt3dadd(99.96, 113.97, -4.7, 3.62)
pt3dadd(99.99, 114.05, -4.7, 3.62)
pt3dadd(100.03, 114.09, -4.7, 3.62)
pt3dadd(100.06, 114.17, -4.7, 3.62)
pt3dadd(100.13, 114.21, -4.7, 3.62)
pt3dadd(100.13, 114.29, -4.7, 3.62)
pt3dadd(100.2, 114.33, -4.7, 3.62)
pt3dadd(100.24, 114.37, -4.7, 3.62)
pt3dadd(100.27, 114.44, -4.7, 3.62)
pt3dadd(100.31, 114.49, -4.7, 3.62)
pt3dadd(100.34, 114.57, -4.7, 3.62)
pt3dadd(100.34, 114.64, -4.7, 3.62)
pt3dadd(100.38, 114.68, -4.7, 3.62)
pt3dadd(100.41, 114.76, -4.7, 3.62)
pt3dadd(100.44, 114.8, -4.7, 3.62)
pt3dadd(100.44, 114.88, -4.7, 3.62)
pt3dadd(100.48, 114.92, -4.7, 3.62)
pt3dadd(100.51, 114.96, -4.7, 3.62)
pt3dadd(100.51, 115.04, -4.7, 3.62)
pt3dadd(100.62, 115.16, -4.7, 3.62)
pt3dadd(100.62, 115.36, -4.7, 3.62)
pt3dadd(100.65, 115.43, -4.7, 3.62)
pt3dadd(100.65, 115.56, -4.7, 3.62)
pt3dadd(100.69, 115.59, -4.7, 3.62)
pt3dadd(100.69, 115.75, -4.7, 3.62)
pt3dadd(100.72, 115.79, -4.7, 3.62)
pt3dadd(100.76, 115.87, -4.7, 3.62)
pt3dadd(100.79, 115.91, -4.7, 3.62)
pt3dadd(100.83, 115.99, -4.7, 3.62)
pt3dadd(100.86, 116.03, -4.7, 3.62)
pt3dadd(100.9, 116.11, -4.7, 3.62)
pt3dadd(100.93, 116.15, -4.7, 3.62)
pt3dadd(100.97, 116.23, -4.7, 3.62)
pt3dadd(101, 116.27, -4.7, 3.62)
pt3dadd(101.04, 116.35, -4.7, 3.62)
pt3dadd(101.07, 116.39, -4.7, 3.62)
pt3dadd(101.14, 116.43, -4.7, 3.62)
pt3dadd(101.18, 116.5, -4.7, 3.62)
pt3dadd(101.21, 116.54, -4.7, 3.62)
pt3dadd(101.25, 116.58, -4.7, 3.62)
pt3dadd(101.32, 116.66, -4.7, 3.62)
pt3dadd(101.35, 116.7, -4.7, 3.62)
pt3dadd(101.42, 116.74, -4.7, 3.62)
pt3dadd(101.42, 116.82, -4.7, 3.62)
pt3dadd(101.46, 116.86, -4.7, 3.62)
pt3dadd(101.49, 116.9, -4.7, 3.62)
pt3dadd(101.53, 116.98, -4.7, 3.62)
pt3dadd(101.56, 117.02, -4.7, 3.62)
pt3dadd(101.6, 117.1, -4.7, 3.62)
pt3dadd(101.63, 117.14, -4.7, 3.62)
pt3dadd(101.67, 117.18, -4.7, 3.62)
pt3dadd(101.67, 117.25, -4.7, 3.62)
pt3dadd(101.7, 117.29, -4.7, 3.62)
pt3dadd(101.74, 117.33, -4.7, 3.62)
pt3dadd(101.77, 117.42, -4.7, 3.62)
pt3dadd(101.81, 117.45, -4.7, 3.62)
pt3dadd(101.84, 117.53, -4.7, 3.62)
pt3dadd(101.88, 117.61, -4.7, 3.62)
pt3dadd(101.91, 117.65, -4.7, 3.62)
pt3dadd(101.94, 117.77, -4.7, 3.62)
pt3dadd(101.98, 117.89, -4.7, 3.62)
pt3dadd(102.05, 117.97, -4.7, 3.62)
pt3dadd(102.08, 118.05, -4.7, 3.62)
pt3dadd(102.12, 118.13, -4.7, 3.62)
pt3dadd(102.15, 118.17, -4.7, 3.62)
pt3dadd(102.19, 118.25, -4.7, 3.62)
pt3dadd(102.22, 118.29, -4.7, 3.62)
pt3dadd(102.26, 118.36, -4.7, 3.62)
pt3dadd(102.29, 118.44, -4.7, 3.62)
pt3dadd(102.33, 118.48, -4.7, 3.62)
pt3dadd(102.36, 118.56, -4.7, 3.62)
pt3dadd(102.4, 118.64, -4.7, 3.62)
pt3dadd(102.43, 118.72, -4.7, 3.62)
pt3dadd(102.46, 118.8, -4.7, 3.62)
pt3dadd(102.5, 118.88, -4.7, 3.62)
pt3dadd(102.54, 118.96, -4.7, 3.62)
pt3dadd(102.54, 119.11, -4.7, 3.62)
pt3dadd(102.57, 119.15, -4.7, 3.62)
pt3dadd(102.57, 119.31, -4.7, 3.62)
pt3dadd(102.61, 119.39, -4.7, 3.62)
pt3dadd(102.64, 119.43, -4.7, 3.62)
pt3dadd(102.68, 119.51, -4.7, 3.62)
pt3dadd(102.71, 119.59, -4.7, 3.62)
pt3dadd(102.71, 119.75, -4.7, 3.62)
pt3dadd(102.75, 119.79, -4.7, 3.62)
pt3dadd(102.78, 119.87, -4.7, 3.62)
pt3dadd(102.78, 120.03, -4.7, 3.62)
pt3dadd(102.82, 120.07, -4.7, 3.62)
pt3dadd(102.85, 120.14, -4.7, 3.62)
pt3dadd(102.89, 120.18, -4.7, 3.62)
pt3dadd(102.89, 120.26, -4.7, 3.62)
pt3dadd(102.92, 120.34, -4.7, 3.62)
pt3dadd(102.96, 120.38, -4.7, 3.62)
pt3dadd(102.99, 120.42, -4.7, 3.62)
pt3dadd(102.99, 120.58, -4.7, 3.62)
pt3dadd(103.02, 120.62, -4.7, 3.62)
pt3dadd(103.06, 120.66, -4.7, 3.62)
pt3dadd(103.06, 120.86, -4.7, 3.62)
pt3dadd(103.06, 120.89, -4.7, 3.62)
pt3dadd(103.06, 120.97, -4.7, 3.62)
pt3dadd(103.09, 121.06, -4.7, 3.62)
pt3dadd(103.09, 121.17, -4.7, 3.62)
pt3dadd(103.13, 121.21, -4.7, 3.62)
pt3dadd(103.13, 121.29, -4.7, 3.62)
pt3dadd(103.16, 121.41, -4.7, 3.62)
pt3dadd(103.16, 122.28, -4.7, 3.62)
pt3dadd(103.2, 122.32, -4.7, 3.62)
pt3dadd(103.2, 122.4, -4.7, 3.62)
pt3dadd(103.23, 122.48, -4.7, 3.62)
pt3dadd(103.27, 122.56, -4.7, 3.62)
pt3dadd(103.27, 122.68, -4.7, 3.62)
pt3dadd(103.3, 122.75, -4.7, 3.62)
pt3dadd(103.3, 122.83, -4.7, 3.62)
pt3dadd(103.34, 122.92, -4.7, 3.62)
pt3dadd(103.37, 122.99, -4.7, 3.62)
pt3dadd(103.37, 123.11, -4.7, 3.62)
pt3dadd(103.41, 123.23, -4.7, 3.62)
pt3dadd(103.44, 123.27, -4.7, 3.62)
pt3dadd(103.48, 123.35, -4.7, 3.62)
pt3dadd(103.48, 123.43, -4.7, 3.62)
pt3dadd(103.51, 123.47, -4.7, 3.62)
pt3dadd(103.54, 123.59, -4.7, 3.62)
pt3dadd(103.54, 123.79, -4.7, 3.62)
pt3dadd(103.58, 123.86, -4.7, 3.62)
pt3dadd(103.58, 123.98, -4.7, 3.62)
pt3dadd(103.65, 124.1, -4.7, 3.62)
pt3dadd(103.68, 124.18, -4.7, 3.62)
pt3dadd(103.68, 124.38, -4.7, 3.62)
pt3dadd(103.72, 124.46, -4.7, 3.62)
pt3dadd(103.72, 124.57, -4.7, 3.62)
pt3dadd(103.75, 124.69, -4.7, 3.62)
pt3dadd(103.79, 124.74, -4.7, 3.62)
pt3dadd(103.79, 124.81, -4.7, 3.62)
pt3dadd(103.82, 124.89, -4.7, 3.62)
pt3dadd(103.82, 124.97, -4.7, 3.62)
pt3dadd(103.86, 125.05, -4.7, 3.62)
pt3dadd(103.86, 125.17, -4.7, 3.62)
pt3dadd(103.89, 125.29, -4.7, 3.62)
pt3dadd(103.89, 125.72, -4.7, 3.62)
pt3dadd(103.93, 125.76, -4.7, 3.62)
pt3dadd(103.93, 125.84, -4.7, 3.62)
pt3dadd(103.96, 125.92, -4.7, 3.62)
pt3dadd(103.96, 126, -4.7, 3.62)
pt3dadd(104, 126.04, -4.7, 3.62)
pt3dadd(104.04, 126.12, -4.7, 3.62)
pt3dadd(104.07, 126.2, -4.7, 3.62)
pt3dadd(104.07, 126.39, -4.7, 3.62)
pt3dadd(104.1, 126.43, -4.7, 3.62)
pt3dadd(104.14, 126.51, -4.7, 3.62)
pt3dadd(104.17, 126.56, -4.7, 3.62)
pt3dadd(104.21, 126.63, -4.7, 3.62)
pt3dadd(104.24, 126.67, -4.7, 3.62)
pt3dadd(104.28, 126.75, -4.7, 3.62)
pt3dadd(104.31, 126.79, -4.7, 3.62)
pt3dadd(104.38, 126.83, -4.7, 3.62)
pt3dadd(104.42, 126.87, -4.7, 3.62)
pt3dadd(104.45, 126.95, -4.7, 3.62)
pt3dadd(104.49, 126.99, -4.7, 3.62)
}
}
proc shape3d_184() {
dend[123] { pt3dadd(104.52, 127.03, -4.7, 3.62)
pt3dadd(104.56, 127.07, -4.7, 3.62)
pt3dadd(104.63, 127.15, -4.7, 3.62)
pt3dadd(104.66, 127.19, -4.7, 3.62)
pt3dadd(104.69, 127.23, -4.7, 3.62)
pt3dadd(104.73, 127.31, -4.7, 3.62)
pt3dadd(104.76, 127.39, -4.7, 3.62)
pt3dadd(104.8, 127.43, -4.7, 3.62)
pt3dadd(104.83, 127.46, -4.7, 3.62)
pt3dadd(104.87, 127.5, -4.7, 3.62)
pt3dadd(104.9, 127.54, -4.7, 3.62)
pt3dadd(104.94, 127.58, -4.7, 3.62)
pt3dadd(104.94, 127.66, -4.7, 3.62)
pt3dadd(104.97, 127.7, -4.7, 3.62)
pt3dadd(105.01, 127.78, -4.7, 3.62)
pt3dadd(105.04, 127.86, -4.7, 3.62)
pt3dadd(105.08, 127.94, -4.7, 3.62)
pt3dadd(105.11, 127.98, -4.7, 3.62)
pt3dadd(105.15, 128.06, -4.7, 3.62)
pt3dadd(105.18, 128.1, -4.7, 3.62)
pt3dadd(105.18, 128.18, -4.7, 3.62)
pt3dadd(105.22, 128.22, -4.7, 3.62)
pt3dadd(105.25, 128.29, -4.7, 3.62)
pt3dadd(105.29, 128.34, -4.7, 3.62)
pt3dadd(105.32, 128.38, -4.7, 3.62)
pt3dadd(105.39, 128.45, -4.7, 3.62)
pt3dadd(105.43, 128.49, -4.7, 3.62)
pt3dadd(105.46, 128.53, -4.7, 3.62)
pt3dadd(105.5, 128.57, -4.7, 3.62)
pt3dadd(105.5, 128.69, -4.7, 3.62)
pt3dadd(105.53, 128.73, -4.7, 3.62)
pt3dadd(105.57, 128.77, -4.7, 3.62)
pt3dadd(105.57, 130.63, -4.7, 3.62)
pt3dadd(105.5, 130.31, -4.7, 3.07)
pt3dadd(105.53, 130.43, -4.7, 3.07)
pt3dadd(105.57, 130.51, -4.7, 3.07)
pt3dadd(105.6, 130.55, -4.7, 3.07)
pt3dadd(105.67, 130.59, -4.7, 3.07)
pt3dadd(105.67, 130.67, -4.7, 3.07)
pt3dadd(105.71, 130.71, -4.7, 3.07)
pt3dadd(105.74, 130.79, -4.7, 3.07)
pt3dadd(105.74, 130.91, -4.7, 3.07)
pt3dadd(105.78, 130.99, -4.7, 3.07)
pt3dadd(105.78, 131.15, -4.7, 3.07)
pt3dadd(105.81, 131.22, -4.7, 3.07)
pt3dadd(105.81, 131.38, -4.7, 3.07)
pt3dadd(105.85, 131.46, -4.7, 3.07)
pt3dadd(105.85, 131.82, -4.7, 3.07)
pt3dadd(105.88, 131.9, -4.7, 3.07)
pt3dadd(105.88, 132.01, -4.7, 3.07)
pt3dadd(105.92, 132.1, -4.7, 3.07)
pt3dadd(105.92, 132.81, -4.7, 3.07)
pt3dadd(105.95, 132.88, -4.7, 3.07)
pt3dadd(105.95, 133.2, -4.7, 3.07)
pt3dadd(105.99, 133.28, -4.7, 3.07)
pt3dadd(105.99, 133.36, -4.7, 3.07)
pt3dadd(106.02, 133.44, -4.7, 3.07)
pt3dadd(106.06, 133.56, -4.7, 3.07)
pt3dadd(106.09, 133.6, -4.7, 3.07)
pt3dadd(106.09, 133.68, -4.7, 3.07)
pt3dadd(106.13, 133.72, -4.7, 3.07)
pt3dadd(106.13, 133.79, -4.7, 3.07)
pt3dadd(106.16, 133.88, -4.7, 3.07)
pt3dadd(106.19, 133.96, -4.7, 3.07)
pt3dadd(106.23, 134.03, -4.7, 3.07)
pt3dadd(106.23, 134.11, -4.7, 3.07)
pt3dadd(106.26, 134.23, -4.7, 3.07)
pt3dadd(106.3, 134.35, -4.7, 3.07)
pt3dadd(106.33, 134.39, -4.7, 3.07)
pt3dadd(106.37, 134.47, -4.7, 3.07)
pt3dadd(106.37, 134.55, -4.7, 3.07)
pt3dadd(106.4, 134.63, -4.7, 3.07)
pt3dadd(106.44, 134.71, -4.7, 3.07)
pt3dadd(106.47, 134.79, -4.7, 3.07)
pt3dadd(106.51, 134.87, -4.7, 3.07)
pt3dadd(106.54, 134.94, -4.7, 3.07)
pt3dadd(106.58, 135.06, -4.7, 3.07)
pt3dadd(106.58, 135.18, -4.7, 3.07)
pt3dadd(106.61, 135.26, -4.7, 3.07)
pt3dadd(106.65, 135.3, -4.7, 3.07)
pt3dadd(106.65, 135.38, -4.7, 3.07)
pt3dadd(106.68, 135.46, -4.7, 3.07)
pt3dadd(106.68, 135.54, -4.7, 3.07)
pt3dadd(106.72, 135.57, -4.7, 3.07)
pt3dadd(106.72, 135.65, -4.7, 3.07)
pt3dadd(106.75, 135.74, -4.7, 3.07)
pt3dadd(106.79, 135.81, -4.7, 3.07)
pt3dadd(106.82, 135.89, -4.7, 3.07)
pt3dadd(106.82, 135.97, -4.7, 3.07)
pt3dadd(106.86, 136.05, -4.7, 3.07)
pt3dadd(106.89, 136.13, -4.7, 3.07)
pt3dadd(106.93, 136.21, -4.7, 3.07)
pt3dadd(106.93, 136.41, -4.7, 3.07)
pt3dadd(106.96, 136.49, -4.7, 3.07)
pt3dadd(107, 136.57, -4.7, 3.07)
pt3dadd(107.03, 136.65, -4.7, 3.07)
pt3dadd(107.03, 136.8, -4.7, 3.07)
pt3dadd(107.07, 136.88, -4.7, 3.07)
pt3dadd(107.07, 137.08, -4.7, 3.07)
pt3dadd(107.1, 137.16, -4.7, 3.07)
pt3dadd(107.14, 137.24, -4.7, 3.07)
pt3dadd(107.17, 137.28, -4.7, 3.07)
pt3dadd(107.17, 137.36, -4.7, 3.07)
pt3dadd(107.21, 137.43, -4.7, 3.07)
pt3dadd(107.21, 137.6, -4.7, 3.07)
pt3dadd(107.24, 137.67, -4.7, 3.07)
pt3dadd(107.24, 137.87, -4.7, 3.07)
pt3dadd(107.28, 137.95, -4.7, 3.07)
pt3dadd(107.28, 138.11, -4.7, 3.07)
pt3dadd(107.31, 138.15, -4.7, 3.07)
pt3dadd(107.34, 138.23, -4.7, 3.07)
pt3dadd(107.34, 138.35, -4.7, 3.07)
pt3dadd(107.38, 138.43, -4.7, 3.07)
pt3dadd(107.41, 138.51, -4.7, 3.07)
pt3dadd(107.45, 138.54, -4.7, 3.07)
pt3dadd(107.48, 138.58, -4.7, 3.07)
pt3dadd(107.52, 138.62, -4.7, 3.07)
pt3dadd(107.55, 138.7, -4.7, 3.07)
pt3dadd(107.59, 138.78, -4.7, 3.07)
pt3dadd(107.62, 138.82, -4.7, 3.07)
pt3dadd(107.66, 138.86, -4.7, 3.07)
pt3dadd(107.66, 138.94, -4.7, 3.07)
pt3dadd(107.69, 139.02, -4.7, 3.07)
pt3dadd(107.73, 139.06, -4.7, 3.07)
pt3dadd(107.76, 139.1, -4.7, 3.07)
pt3dadd(107.76, 139.18, -4.7, 3.07)
pt3dadd(107.83, 139.26, -4.7, 3.07)
pt3dadd(107.86, 139.29, -4.7, 3.07)
pt3dadd(107.86, 139.41, -4.7, 3.07)
pt3dadd(107.9, 139.46, -4.7, 3.07)
pt3dadd(107.93, 139.53, -4.7, 3.07)
pt3dadd(107.97, 139.57, -4.7, 3.07)
pt3dadd(108, 139.65, -4.7, 3.07)
pt3dadd(108.04, 139.73, -4.7, 3.07)
pt3dadd(108.07, 139.77, -4.7, 3.07)
pt3dadd(108.11, 139.81, -4.7, 3.07)
pt3dadd(108.14, 139.89, -4.7, 3.07)
pt3dadd(108.18, 139.93, -4.7, 3.07)
pt3dadd(108.21, 140.01, -4.7, 3.07)
pt3dadd(108.25, 140.05, -4.7, 3.07)
pt3dadd(108.25, 140.21, -4.7, 3.07)
pt3dadd(108.29, 140.24, -4.7, 3.07)
pt3dadd(108.25, 140.09, -4.7, 3.07)
pt3dadd(108.29, 140.13, -4.7, 3.07)
pt3dadd(108.29, 140.21, -4.7, 3.07)
pt3dadd(108.32, 140.29, -4.7, 3.07)
pt3dadd(108.32, 140.37, -4.7, 3.07)
pt3dadd(108.36, 140.4, -4.7, 3.07)
pt3dadd(108.39, 140.48, -4.7, 3.07)
pt3dadd(108.39, 140.56, -4.7, 3.07)
pt3dadd(108.42, 140.68, -4.7, 3.07)
pt3dadd(108.46, 140.76, -4.7, 3.07)
pt3dadd(108.46, 140.96, -4.7, 3.07)
pt3dadd(108.49, 141, -4.7, 3.07)
pt3dadd(108.49, 141.12, -4.7, 3.07)
pt3dadd(108.53, 141.15, -4.7, 3.07)
pt3dadd(108.53, 141.27, -4.7, 3.07)
pt3dadd(108.56, 141.35, -4.7, 3.07)
pt3dadd(108.6, 141.43, -4.7, 3.07)
pt3dadd(108.6, 141.67, -4.7, 3.07)
pt3dadd(108.63, 141.71, -4.7, 3.07)
pt3dadd(108.63, 141.91, -4.7, 3.07)
pt3dadd(108.67, 141.99, -4.7, 3.07)
pt3dadd(108.67, 142.07, -4.7, 3.07)
pt3dadd(108.7, 142.1, -4.7, 3.07)
pt3dadd(108.7, 142.18, -4.7, 3.07)
pt3dadd(108.74, 142.23, -4.7, 3.07)
pt3dadd(108.74, 142.34, -4.7, 3.07)
pt3dadd(108.77, 142.38, -4.7, 3.07)
pt3dadd(108.81, 142.42, -4.7, 3.07)
pt3dadd(108.81, 142.5, -4.7, 3.07)
pt3dadd(108.84, 142.58, -4.7, 3.07)
pt3dadd(108.88, 142.66, -4.7, 3.07)
pt3dadd(108.91, 142.78, -4.7, 3.07)
pt3dadd(108.94, 142.86, -4.7, 3.07)
pt3dadd(108.98, 142.9, -4.7, 3.07)
pt3dadd(109.01, 142.93, -4.7, 3.07)
pt3dadd(109.01, 143.05, -4.7, 3.07)
pt3dadd(109.05, 143.1, -4.7, 3.07)
pt3dadd(109.08, 143.17, -4.7, 3.07)
pt3dadd(109.12, 143.25, -4.7, 3.07)
pt3dadd(109.15, 143.29, -4.7, 3.07)
pt3dadd(109.19, 143.33, -4.7, 3.07)
pt3dadd(109.22, 143.41, -4.7, 3.07)
pt3dadd(109.26, 143.45, -4.7, 3.07)
pt3dadd(109.29, 143.53, -4.7, 3.07)
pt3dadd(109.29, 143.65, -4.7, 3.07)
pt3dadd(109.33, 143.73, -4.7, 3.07)
pt3dadd(109.36, 143.77, -4.7, 3.07)
pt3dadd(109.36, 143.85, -4.7, 3.07)
pt3dadd(109.4, 143.93, -4.7, 3.07)
pt3dadd(109.43, 144.01, -4.7, 3.07)
pt3dadd(109.47, 144.08, -4.7, 3.07)
pt3dadd(109.57, 144.2, -4.7, 3.07)
pt3dadd(109.61, 144.32, -4.7, 3.07)
pt3dadd(109.64, 144.36, -4.7, 3.07)
pt3dadd(109.68, 144.44, -4.7, 3.07)
pt3dadd(109.71, 144.52, -4.7, 3.07)
pt3dadd(109.75, 144.6, -4.7, 3.07)
pt3dadd(109.78, 144.68, -4.7, 3.07)
}
}
proc shape3d_185() {
dend[123] { pt3dadd(109.78, 144.79, -4.7, 3.07)
pt3dadd(109.82, 144.88, -4.7, 3.07)
pt3dadd(109.82, 144.99, -4.7, 3.07)
pt3dadd(109.85, 145.07, -4.7, 3.07)
pt3dadd(109.89, 145.15, -4.7, 3.07)
pt3dadd(109.89, 145.27, -4.7, 3.07)
pt3dadd(109.92, 145.31, -4.7, 3.07)
pt3dadd(109.96, 145.39, -4.7, 3.07)
pt3dadd(109.99, 145.43, -4.7, 3.07)
pt3dadd(110.03, 145.51, -4.7, 3.07)
pt3dadd(110.06, 145.55, -4.7, 3.07)
pt3dadd(110.1, 145.63, -4.7, 3.07)
pt3dadd(110.13, 145.71, -4.7, 3.07)
pt3dadd(110.17, 145.74, -4.7, 3.07)
pt3dadd(110.2, 145.82, -4.7, 3.07)
pt3dadd(110.24, 145.87, -4.7, 3.07)
pt3dadd(110.27, 145.9, -4.7, 3.07)
pt3dadd(110.27, 145.98, -4.7, 3.07)
pt3dadd(110.31, 146.02, -4.7, 3.07)
pt3dadd(110.31, 146.1, -4.7, 3.07)
pt3dadd(110.34, 146.18, -4.7, 3.07)
pt3dadd(110.38, 146.22, -4.7, 3.07)
pt3dadd(110.41, 146.26, -4.7, 3.07)
pt3dadd(110.41, 146.38, -4.7, 3.07)
pt3dadd(110.44, 146.46, -4.7, 3.07)
pt3dadd(110.48, 146.5, -4.7, 3.07)
pt3dadd(110.51, 146.54, -4.7, 3.07)
pt3dadd(110.55, 146.58, -4.7, 3.07)
pt3dadd(110.58, 146.62, -4.7, 3.07)
pt3dadd(110.62, 146.65, -4.7, 3.07)
pt3dadd(110.62, 146.74, -4.7, 3.07)
pt3dadd(110.65, 146.77, -4.7, 3.07)
pt3dadd(110.69, 146.85, -4.7, 3.07)
pt3dadd(110.69, 146.93, -4.7, 3.07)
pt3dadd(110.72, 146.97, -4.7, 3.07)
pt3dadd(110.72, 147.13, -4.7, 3.07)
pt3dadd(110.76, 147.17, -4.7, 3.07)
pt3dadd(110.76, 147.25, -4.7, 3.07)
pt3dadd(110.79, 147.29, -4.7, 3.07)
pt3dadd(110.83, 147.37, -4.7, 3.07)
pt3dadd(110.83, 147.49, -4.7, 3.07)
pt3dadd(110.86, 147.52, -4.7, 3.07)
pt3dadd(110.86, 147.65, -4.7, 3.07)
pt3dadd(110.9, 147.68, -4.7, 3.07)
pt3dadd(110.93, 147.73, -4.7, 3.07)
pt3dadd(110.93, 148.04, -4.7, 3.07)
pt3dadd(110.97, 148.08, -4.7, 3.07)
pt3dadd(111, 148.12, -4.7, 3.07)
pt3dadd(111.04, 148.2, -4.7, 3.07)
pt3dadd(111.04, 148.48, -4.7, 3.07)
pt3dadd(111.07, 148.51, -4.7, 3.07)
pt3dadd(111.07, 148.75, -4.7, 3.07)
pt3dadd(111.11, 148.51, -4.7, 3.07)
pt3dadd(112.12, 150.34, -4.7, 3.07)
pt3dadd(111.87, 150.02, -4.7, 3.07)
pt3dadd(111.91, 150.1, -4.7, 3.07)
pt3dadd(111.94, 150.18, -4.7, 3.07)
pt3dadd(112.01, 150.26, -4.7, 3.07)
pt3dadd(112.05, 150.29, -4.7, 3.07)
pt3dadd(112.08, 150.34, -4.7, 3.07)
pt3dadd(112.08, 150.41, -4.7, 3.07)
pt3dadd(112.12, 150.46, -4.7, 3.07)
pt3dadd(112.12, 150.53, -4.7, 3.07)
pt3dadd(112.15, 150.57, -4.7, 3.07)
pt3dadd(112.18, 150.61, -4.7, 3.07)
pt3dadd(112.18, 150.69, -4.7, 3.07)
pt3dadd(112.22, 150.73, -4.7, 3.07)
pt3dadd(112.22, 150.89, -4.7, 3.07)
pt3dadd(112.25, 150.97, -4.7, 3.07)
pt3dadd(112.25, 151.09, -4.7, 3.07)
pt3dadd(112.29, 151.13, -4.7, 3.07)
pt3dadd(112.29, 151.21, -4.7, 3.07)
pt3dadd(112.36, 151.29, -4.7, 3.07)
pt3dadd(112.39, 151.32, -4.7, 3.07)
pt3dadd(112.39, 151.4, -4.7, 3.07)
pt3dadd(112.43, 151.44, -4.7, 3.07)
pt3dadd(112.43, 151.52, -4.7, 3.07)
pt3dadd(112.46, 151.56, -4.7, 3.07)
pt3dadd(112.46, 151.64, -4.7, 3.07)
pt3dadd(112.5, 151.68, -4.7, 3.07)
pt3dadd(112.54, 151.72, -4.7, 3.07)
pt3dadd(112.54, 151.8, -4.7, 3.07)
pt3dadd(112.61, 151.88, -4.7, 3.07)
pt3dadd(112.64, 151.96, -4.7, 3.07)
pt3dadd(112.71, 152.08, -4.7, 3.07)
pt3dadd(112.74, 152.12, -4.7, 3.07)
pt3dadd(112.81, 152.27, -4.7, 3.07)
pt3dadd(112.92, 152.39, -4.7, 3.07)
pt3dadd(112.95, 152.47, -4.7, 3.07)
pt3dadd(113.02, 152.55, -4.7, 3.07)
pt3dadd(113.06, 152.63, -4.7, 3.07)
pt3dadd(113.13, 152.67, -4.7, 3.07)
pt3dadd(113.16, 152.75, -4.7, 3.07)
pt3dadd(113.2, 152.83, -4.7, 3.07)
pt3dadd(113.3, 152.95, -4.7, 3.07)
pt3dadd(113.3, 153.03, -4.7, 3.07)
pt3dadd(113.4, 153.15, -4.7, 3.07)
pt3dadd(113.47, 153.26, -4.7, 3.07)
pt3dadd(113.51, 153.34, -4.7, 3.07)
pt3dadd(113.58, 153.46, -4.7, 3.07)
pt3dadd(113.68, 153.62, -4.7, 3.07)
pt3dadd(113.75, 153.7, -4.7, 3.07)
pt3dadd(113.79, 153.78, -4.7, 3.07)
pt3dadd(113.82, 153.86, -4.7, 3.07)
pt3dadd(113.86, 153.9, -4.7, 3.07)
pt3dadd(113.86, 153.98, -4.7, 3.07)
pt3dadd(113.89, 154.05, -4.7, 3.07)
pt3dadd(113.93, 154.1, -4.7, 3.07)
pt3dadd(113.93, 154.18, -4.7, 3.07)
pt3dadd(113.96, 154.25, -4.7, 3.07)
pt3dadd(114, 154.29, -4.7, 3.07)
pt3dadd(114.03, 154.37, -4.7, 3.07)
pt3dadd(114.03, 154.45, -4.7, 3.07)
pt3dadd(114.07, 154.53, -4.7, 3.07)
pt3dadd(114.07, 154.61, -4.7, 3.07)
pt3dadd(114.1, 154.73, -4.7, 3.07)
pt3dadd(114.14, 154.77, -4.7, 3.07)
pt3dadd(114.14, 154.85, -4.7, 3.07)
pt3dadd(114.17, 154.88, -4.7, 3.07)
pt3dadd(114.21, 154.96, -4.7, 3.07)
pt3dadd(114.24, 155.04, -4.7, 3.07)
pt3dadd(114.28, 155.12, -4.7, 3.07)
pt3dadd(114.31, 155.24, -4.7, 3.07)
pt3dadd(114.35, 155.32, -4.7, 3.07)
pt3dadd(114.38, 155.4, -4.7, 3.07)
pt3dadd(114.42, 155.48, -4.7, 3.07)
pt3dadd(114.42, 155.56, -4.7, 3.07)
pt3dadd(114.45, 155.64, -4.7, 3.07)
pt3dadd(114.52, 155.72, -4.7, 3.07)
pt3dadd(114.56, 155.79, -4.7, 3.07)
pt3dadd(114.59, 155.88, -4.7, 3.07)
pt3dadd(114.63, 155.91, -4.7, 3.07)
pt3dadd(114.69, 156.03, -4.7, 3.07)
pt3dadd(114.69, 156.11, -4.7, 3.07)
pt3dadd(114.73, 156.19, -4.7, 3.07)
pt3dadd(114.76, 156.27, -4.7, 3.07)
pt3dadd(114.76, 156.35, -4.7, 3.07)
pt3dadd(114.8, 156.39, -4.7, 3.07)
pt3dadd(114.83, 156.51, -4.7, 3.07)
pt3dadd(114.9, 156.55, -4.7, 3.07)
pt3dadd(114.94, 156.63, -4.7, 3.07)
pt3dadd(114.97, 156.71, -4.7, 3.07)
pt3dadd(115.01, 156.79, -4.7, 3.07)
pt3dadd(115.08, 156.9, -4.7, 3.07)
pt3dadd(115.08, 156.98, -4.7, 3.07)
pt3dadd(115.11, 157.02, -4.7, 3.07)
pt3dadd(115.15, 157.06, -4.7, 3.07)
pt3dadd(115.15, 157.14, -4.7, 3.07)
pt3dadd(115.18, 157.18, -4.7, 3.07)
pt3dadd(115.22, 157.22, -4.7, 3.07)
pt3dadd(115.22, 157.3, -4.7, 3.07)
pt3dadd(115.25, 157.38, -4.7, 3.07)
pt3dadd(115.29, 157.46, -4.7, 3.07)
pt3dadd(115.29, 157.54, -4.7, 3.07)
pt3dadd(115.32, 157.58, -4.7, 3.07)
pt3dadd(115.36, 157.65, -4.7, 3.07)
pt3dadd(115.39, 157.77, -4.7, 3.07)
pt3dadd(115.5, 157.89, -4.7, 3.07)
pt3dadd(115.53, 157.93, -4.7, 3.07)
pt3dadd(115.57, 158.01, -4.7, 3.07)
pt3dadd(115.6, 158.09, -4.7, 3.07)
pt3dadd(115.64, 158.13, -4.7, 3.07)
pt3dadd(115.71, 158.17, -4.7, 3.07)
pt3dadd(115.71, 158.25, -4.7, 3.07)
pt3dadd(115.78, 158.33, -4.7, 3.07)
pt3dadd(115.81, 158.37, -4.7, 3.07)
pt3dadd(115.85, 158.45, -4.7, 3.07)
pt3dadd(115.88, 158.49, -4.7, 3.07)
pt3dadd(115.92, 158.57, -4.7, 3.07)
pt3dadd(115.95, 158.6, -4.7, 3.07)
pt3dadd(115.95, 158.68, -4.7, 3.07)
pt3dadd(115.98, 158.73, -4.7, 3.07)
pt3dadd(116.05, 158.8, -4.7, 3.07)
pt3dadd(116.09, 158.84, -4.7, 3.07)
pt3dadd(116.09, 158.96, -4.7, 3.07)
pt3dadd(116.12, 159, -4.7, 3.07)
pt3dadd(116.16, 159.08, -4.7, 3.07)
pt3dadd(116.19, 159.12, -4.7, 3.07)
pt3dadd(116.23, 159.2, -4.7, 3.07)
pt3dadd(116.26, 159.28, -4.7, 3.07)
pt3dadd(116.3, 159.32, -4.7, 3.07)
pt3dadd(116.3, 159.36, -4.7, 3.07)
pt3dadd(116.16, 159, -4.7, 3.07)
pt3dadd(116.19, 159.08, -4.7, 3.07)
pt3dadd(116.23, 159.12, -4.7, 3.07)
pt3dadd(116.3, 159.16, -4.7, 3.07)
pt3dadd(116.33, 159.2, -4.7, 3.07)
pt3dadd(116.37, 159.28, -4.7, 3.07)
pt3dadd(116.4, 159.36, -4.7, 3.07)
pt3dadd(116.44, 159.4, -4.7, 3.07)
pt3dadd(116.47, 159.48, -4.7, 3.07)
pt3dadd(116.5, 159.55, -4.7, 3.07)
pt3dadd(116.54, 159.63, -4.7, 3.07)
pt3dadd(116.57, 159.68, -4.7, 3.07)
pt3dadd(116.61, 159.75, -4.7, 3.07)
pt3dadd(116.64, 159.79, -4.7, 3.07)
pt3dadd(116.75, 159.87, -4.7, 3.07)
pt3dadd(116.79, 159.95, -4.7, 3.07)
pt3dadd(116.86, 159.99, -4.7, 3.07)
pt3dadd(116.93, 160.03, -4.7, 3.07)
}
}
proc shape3d_186() {
dend[123] { pt3dadd(116.96, 160.07, -4.7, 3.07)
pt3dadd(117, 160.15, -4.7, 3.07)
pt3dadd(117.1, 160.27, -4.7, 3.07)
pt3dadd(117.13, 160.31, -4.7, 3.07)
pt3dadd(117.17, 160.39, -4.7, 3.07)
pt3dadd(117.2, 160.43, -4.7, 3.07)
pt3dadd(117.24, 160.46, -4.7, 3.07)
pt3dadd(117.27, 160.51, -4.7, 3.07)
pt3dadd(117.38, 160.62, -4.7, 3.07)
pt3dadd(117.45, 160.74, -4.7, 3.07)
pt3dadd(117.48, 160.78, -4.7, 3.07)
pt3dadd(117.52, 160.86, -4.7, 3.07)
pt3dadd(117.55, 160.94, -4.7, 3.07)
pt3dadd(117.58, 160.98, -4.7, 3.07)
pt3dadd(117.62, 161.06, -4.7, 3.07)
pt3dadd(117.65, 161.14, -4.7, 3.07)
pt3dadd(117.69, 161.22, -4.7, 3.07)
pt3dadd(117.72, 161.3, -4.7, 3.07)
pt3dadd(117.79, 161.38, -4.7, 3.07)
pt3dadd(117.83, 161.46, -4.7, 3.07)
pt3dadd(117.83, 161.54, -4.7, 3.07)
pt3dadd(117.86, 161.57, -4.7, 3.07)
pt3dadd(117.9, 161.65, -4.7, 3.07)
pt3dadd(117.97, 161.69, -4.7, 3.07)
pt3dadd(118, 161.77, -4.7, 3.07)
pt3dadd(118.07, 161.85, -4.7, 3.07)
pt3dadd(118.11, 161.93, -4.7, 3.07)
pt3dadd(118.14, 161.97, -4.7, 3.07)
pt3dadd(118.21, 162.05, -4.7, 3.07)
pt3dadd(118.28, 162.17, -4.7, 3.07)
pt3dadd(118.32, 162.24, -4.7, 3.07)
pt3dadd(118.35, 162.29, -4.7, 3.07)
pt3dadd(118.39, 162.37, -4.7, 3.07)
pt3dadd(118.42, 162.4, -4.7, 3.07)
pt3dadd(118.42, 162.48, -4.7, 3.07)
pt3dadd(118.53, 162.6, -4.7, 3.07)
pt3dadd(118.56, 162.72, -4.7, 3.07)
pt3dadd(118.6, 162.8, -4.7, 3.07)
pt3dadd(118.63, 162.84, -4.7, 3.07)
pt3dadd(118.7, 162.96, -4.7, 3.07)
pt3dadd(118.74, 163.04, -4.7, 3.07)
pt3dadd(118.77, 163.15, -4.7, 3.07)
pt3dadd(118.81, 163.2, -4.7, 3.07)
pt3dadd(118.84, 163.24, -4.7, 3.07)
pt3dadd(118.88, 163.32, -4.7, 3.07)
pt3dadd(118.91, 163.39, -4.7, 3.07)
pt3dadd(118.98, 163.51, -4.7, 3.07)
pt3dadd(119.08, 163.63, -4.7, 3.07)
pt3dadd(119.12, 163.71, -4.7, 3.07)
pt3dadd(119.15, 163.79, -4.7, 3.07)
pt3dadd(119.19, 163.87, -4.7, 3.07)
pt3dadd(119.22, 163.91, -4.7, 3.07)
pt3dadd(119.26, 164.03, -4.7, 3.07)
pt3dadd(119.26, 164.1, -4.7, 3.07)
pt3dadd(119.29, 164.15, -4.7, 3.07)
pt3dadd(119.36, 164.23, -4.7, 3.07)
pt3dadd(119.36, 164.3, -4.7, 3.07)
pt3dadd(119.4, 164.34, -4.7, 3.07)
pt3dadd(119.43, 164.38, -4.7, 3.07)
pt3dadd(119.43, 164.46, -4.7, 3.07)
pt3dadd(119.47, 164.5, -4.7, 3.07)
pt3dadd(119.5, 164.62, -4.7, 3.07)
pt3dadd(119.54, 164.7, -4.7, 3.07)
pt3dadd(119.57, 164.82, -4.7, 3.07)
pt3dadd(119.61, 164.9, -4.7, 3.07)
pt3dadd(119.68, 164.98, -4.7, 3.07)
pt3dadd(119.71, 165.05, -4.7, 3.07)
pt3dadd(119.75, 165.13, -4.7, 3.07)
pt3dadd(119.75, 165.21, -4.7, 3.07)
pt3dadd(119.78, 165.29, -4.7, 3.07)
pt3dadd(119.82, 165.37, -4.7, 3.07)
pt3dadd(119.85, 165.41, -4.7, 3.07)
pt3dadd(119.85, 165.53, -4.7, 3.07)
pt3dadd(119.89, 165.57, -4.7, 3.07)
pt3dadd(119.92, 165.65, -4.7, 3.07)
pt3dadd(119.96, 165.73, -4.7, 3.07)
pt3dadd(119.99, 165.81, -4.7, 3.07)
pt3dadd(120.06, 165.89, -4.7, 3.07)
pt3dadd(120.1, 165.96, -4.7, 3.07)
pt3dadd(120.13, 166.04, -4.7, 3.07)
pt3dadd(120.17, 166.13, -4.7, 3.07)
pt3dadd(120.2, 166.16, -4.7, 3.07)
pt3dadd(120.2, 166.24, -4.7, 3.07)
pt3dadd(120.23, 166.28, -4.7, 3.07)
pt3dadd(120.27, 166.32, -4.7, 3.07)
pt3dadd(120.3, 166.36, -4.7, 3.07)
pt3dadd(120.3, 166.48, -4.7, 3.07)
pt3dadd(120.34, 166.56, -4.7, 3.07)
pt3dadd(120.41, 166.64, -4.7, 3.07)
pt3dadd(120.44, 166.72, -4.7, 3.07)
pt3dadd(120.48, 166.8, -4.7, 3.07)
pt3dadd(120.51, 166.88, -4.7, 3.07)
pt3dadd(120.55, 166.96, -4.7, 3.07)
pt3dadd(120.58, 166.99, -4.7, 3.07)
pt3dadd(120.58, 167.23, -4.7, 3.07)
pt3dadd(120.51, 166.91, -4.7, 3.07)
pt3dadd(120.51, 166.99, -4.7, 3.07)
pt3dadd(120.58, 167.07, -4.7, 3.07)
pt3dadd(120.62, 167.15, -4.7, 3.07)
pt3dadd(120.69, 167.27, -4.7, 3.07)
pt3dadd(120.72, 167.31, -4.7, 3.07)
pt3dadd(120.76, 167.39, -4.7, 3.07)
pt3dadd(120.86, 167.51, -4.7, 3.07)
pt3dadd(120.89, 167.59, -4.7, 3.07)
pt3dadd(120.89, 167.74, -4.7, 3.07)
pt3dadd(120.93, 167.79, -4.7, 3.07)
pt3dadd(120.93, 167.9, -4.7, 3.07)
pt3dadd(120.96, 167.95, -4.7, 3.07)
pt3dadd(121.04, 168.06, -4.7, 3.07)
pt3dadd(121.11, 168.14, -4.7, 3.07)
pt3dadd(121.14, 168.18, -4.7, 3.07)
pt3dadd(121.14, 168.26, -4.7, 3.07)
pt3dadd(121.18, 168.3, -4.7, 3.07)
pt3dadd(121.21, 168.38, -4.7, 3.07)
pt3dadd(121.21, 168.46, -4.7, 3.07)
pt3dadd(121.25, 168.58, -4.7, 3.07)
pt3dadd(121.31, 168.66, -4.7, 3.07)
pt3dadd(121.35, 168.74, -4.7, 3.07)
pt3dadd(121.38, 168.82, -4.7, 3.07)
pt3dadd(121.42, 168.89, -4.7, 3.07)
pt3dadd(121.45, 168.97, -4.7, 3.07)
pt3dadd(121.52, 169.09, -4.7, 3.07)
pt3dadd(121.59, 169.17, -4.7, 3.07)
pt3dadd(121.63, 169.25, -4.7, 3.07)
pt3dadd(121.66, 169.33, -4.7, 3.07)
pt3dadd(121.73, 169.41, -4.7, 3.07)
pt3dadd(121.77, 169.49, -4.7, 3.07)
pt3dadd(121.77, 169.57, -4.7, 3.07)
pt3dadd(121.8, 169.65, -4.7, 3.07)
pt3dadd(121.84, 169.68, -4.7, 3.07)
pt3dadd(121.94, 169.8, -4.7, 3.07)
pt3dadd(121.97, 169.88, -4.7, 3.07)
pt3dadd(122.04, 170.08, -4.7, 3.07)
pt3dadd(122.08, 170.2, -4.7, 3.07)
pt3dadd(122.11, 170.32, -4.7, 3.07)
pt3dadd(122.18, 170.4, -4.7, 3.07)
pt3dadd(122.25, 170.48, -4.7, 3.07)
pt3dadd(122.32, 170.6, -4.7, 3.07)
pt3dadd(122.36, 170.68, -4.7, 3.07)
pt3dadd(122.36, 170.75, -4.7, 3.07)
pt3dadd(122.39, 170.83, -4.7, 3.07)
pt3dadd(122.43, 170.87, -4.7, 3.07)
pt3dadd(122.46, 170.95, -4.7, 3.07)
pt3dadd(122.46, 171.03, -4.7, 3.07)
pt3dadd(122.5, 171.11, -4.7, 3.07)
pt3dadd(122.5, 171.19, -4.7, 3.07)
pt3dadd(122.53, 171.27, -4.7, 3.07)
pt3dadd(122.57, 171.35, -4.7, 3.07)
pt3dadd(122.57, 171.43, -4.7, 3.07)
pt3dadd(122.6, 171.46, -4.7, 3.07)
pt3dadd(122.64, 171.51, -4.7, 3.07)
pt3dadd(122.64, 171.59, -4.7, 3.07)
pt3dadd(122.67, 171.63, -4.7, 3.07)
pt3dadd(122.71, 171.7, -4.7, 3.07)
pt3dadd(122.71, 171.78, -4.7, 3.07)
pt3dadd(122.74, 171.86, -4.7, 3.07)
pt3dadd(122.78, 171.94, -4.7, 3.07)
pt3dadd(122.78, 172.02, -4.7, 3.07)
pt3dadd(122.81, 172.1, -4.7, 3.07)
pt3dadd(122.81, 172.26, -4.7, 3.07)
pt3dadd(122.85, 172.34, -4.7, 3.07)
pt3dadd(122.88, 172.46, -4.7, 3.07)
pt3dadd(122.88, 172.54, -4.7, 3.07)
pt3dadd(122.92, 172.61, -4.7, 3.07)
pt3dadd(122.95, 172.73, -4.7, 3.07)
pt3dadd(122.95, 173.01, -4.7, 3.07)
pt3dadd(122.99, 173.09, -4.7, 3.07)
pt3dadd(122.99, 173.48, -4.7, 3.07)
pt3dadd(123.02, 173.56, -4.7, 3.07)
pt3dadd(123.06, 173.64, -4.7, 3.07)
pt3dadd(123.06, 173.76, -4.7, 3.07)
pt3dadd(123.13, 173.88, -4.7, 3.07)
pt3dadd(123.16, 173.96, -4.7, 3.07)
pt3dadd(123.19, 174.04, -4.7, 3.07)
pt3dadd(123.19, 174.12, -4.7, 3.07)
pt3dadd(123.23, 174.16, -4.7, 3.07)
pt3dadd(123.23, 174.24, -4.7, 3.07)
pt3dadd(123.26, 174.27, -4.7, 3.07)
pt3dadd(123.3, 174.35, -4.7, 3.07)
pt3dadd(123.33, 174.47, -4.7, 3.07)
pt3dadd(123.33, 174.55, -4.7, 3.07)
pt3dadd(123.37, 174.67, -4.7, 3.07)
pt3dadd(123.4, 174.75, -4.7, 3.07)
pt3dadd(123.44, 174.79, -4.7, 3.07)
pt3dadd(123.47, 174.87, -4.7, 3.07)
pt3dadd(123.47, 175.03, -4.7, 3.07)
pt3dadd(123.51, 175.1, -4.7, 3.07)
pt3dadd(123.58, 175.18, -4.7, 3.07)
pt3dadd(123.58, 175.26, -4.7, 3.07)
pt3dadd(123.61, 175.3, -4.7, 3.07)
pt3dadd(123.61, 175.38, -4.7, 3.07)
pt3dadd(123.65, 175.42, -4.7, 3.07)
pt3dadd(123.65, 175.5, -4.7, 3.07)
pt3dadd(123.68, 175.58, -4.7, 3.07)
pt3dadd(123.72, 175.66, -4.7, 3.07)
pt3dadd(123.75, 175.74, -4.7, 3.07)
pt3dadd(123.79, 175.82, -4.7, 3.07)
pt3dadd(123.82, 175.9, -4.7, 3.07)
pt3dadd(123.82, 175.98, -4.7, 3.07)
pt3dadd(123.86, 176.05, -4.7, 3.07)
}
}
proc shape3d_187() {
dend[123] { pt3dadd(123.89, 176.1, -4.7, 3.07)
pt3dadd(123.96, 176.13, -4.7, 3.07)
pt3dadd(124, 176.21, -4.7, 3.07)
pt3dadd(124.03, 176.25, -4.7, 3.07)
pt3dadd(124.07, 176.29, -4.7, 3.07)
pt3dadd(124.1, 176.33, -4.7, 3.07)
pt3dadd(124.1, 176.41, -4.7, 3.07)
pt3dadd(124.17, 176.49, -4.7, 3.07)
pt3dadd(124.21, 176.53, -4.7, 3.07)
pt3dadd(124.21, 176.61, -4.7, 3.07)
pt3dadd(124.24, 176.65, -4.7, 3.07)
pt3dadd(124.31, 176.69, -4.7, 3.07)
pt3dadd(124.35, 176.77, -4.7, 3.07)
pt3dadd(124.42, 176.85, -4.7, 3.07)
pt3dadd(124.49, 176.89, -4.7, 3.07)
pt3dadd(124.52, 176.96, -4.7, 3.07)
pt3dadd(124.66, 177.13, -4.7, 3.07)
pt3dadd(124.69, 177.16, -4.7, 3.07)
pt3dadd(124.76, 177.2, -4.7, 3.07)
pt3dadd(124.8, 177.24, -4.7, 3.07)
pt3dadd(124.83, 177.32, -4.7, 3.07)
pt3dadd(124.9, 177.36, -4.7, 3.07)
pt3dadd(124.94, 177.44, -4.7, 3.07)
pt3dadd(125.01, 177.52, -4.7, 3.07)
pt3dadd(125.08, 177.56, -4.7, 3.07)
pt3dadd(125.11, 177.6, -4.7, 3.07)
pt3dadd(125.14, 177.64, -4.7, 3.07)
pt3dadd(125.25, 177.76, -4.7, 3.07)
pt3dadd(125.29, 177.8, -4.7, 3.07)
pt3dadd(125.36, 177.88, -4.7, 3.07)
pt3dadd(125.43, 177.91, -4.7, 3.07)
pt3dadd(125.46, 177.96, -4.7, 3.07)
pt3dadd(125.57, 178.04, -4.7, 3.07)
pt3dadd(125.63, 178.07, -4.7, 3.07)
pt3dadd(125.67, 178.11, -4.7, 3.07)
pt3dadd(125.77, 178.19, -4.7, 3.07)
pt3dadd(125.81, 178.23, -4.7, 3.07)
pt3dadd(125.91, 178.31, -4.7, 3.07)
pt3dadd(125.98, 178.35, -4.7, 3.07)
pt3dadd(126.02, 178.39, -4.7, 3.07)
pt3dadd(126.09, 178.43, -4.7, 3.07)
pt3dadd(126.12, 178.47, -4.7, 3.07)
pt3dadd(126.19, 178.51, -4.7, 3.07)
pt3dadd(126.22, 178.59, -4.7, 3.07)
pt3dadd(126.26, 178.63, -4.7, 3.07)
pt3dadd(126.29, 178.67, -4.7, 3.07)
pt3dadd(126.02, 178.47, -4.7, 3.07)
pt3dadd(126.09, 178.55, -4.7, 3.07)
pt3dadd(126.22, 178.59, -4.7, 3.07)
pt3dadd(126.29, 178.67, -4.7, 3.07)
pt3dadd(126.4, 178.71, -4.7, 3.07)
pt3dadd(126.47, 178.79, -4.7, 3.07)
pt3dadd(126.5, 178.87, -4.7, 3.07)
pt3dadd(126.57, 178.9, -4.7, 3.07)
pt3dadd(126.61, 178.95, -4.7, 3.07)
pt3dadd(126.61, 179.02, -4.7, 3.07)
pt3dadd(126.64, 179.1, -4.7, 3.07)
pt3dadd(126.71, 179.14, -4.7, 3.07)
pt3dadd(126.78, 179.18, -4.7, 3.07)
pt3dadd(126.82, 179.22, -4.7, 3.07)
pt3dadd(126.85, 179.3, -4.7, 3.07)
pt3dadd(126.96, 179.38, -4.7, 3.07)
pt3dadd(126.99, 179.46, -4.7, 3.07)
pt3dadd(127.03, 179.54, -4.7, 3.07)
pt3dadd(127.1, 179.58, -4.7, 3.07)
pt3dadd(127.24, 179.74, -4.7, 3.07)
pt3dadd(127.27, 179.77, -4.7, 3.07)
pt3dadd(127.34, 179.9, -4.7, 3.07)
pt3dadd(127.41, 179.93, -4.7, 3.07)
pt3dadd(127.48, 180.01, -4.7, 3.07)
pt3dadd(127.55, 180.09, -4.7, 3.07)
pt3dadd(127.65, 180.17, -4.7, 3.07)
pt3dadd(127.76, 180.29, -4.7, 3.07)
pt3dadd(128.21, 180.8, -4.7, 3.07)
pt3dadd(128.28, 180.92, -4.7, 3.07)
pt3dadd(128.32, 181.04, -4.7, 3.07)
pt3dadd(128.38, 181.12, -4.7, 3.07)
pt3dadd(128.46, 181.2, -4.7, 3.07)
pt3dadd(128.52, 181.28, -4.7, 3.07)
pt3dadd(128.56, 181.4, -4.7, 3.07)
pt3dadd(128.66, 181.52, -4.7, 3.07)
pt3dadd(128.74, 181.63, -4.7, 3.07)
pt3dadd(128.77, 181.71, -4.7, 3.07)
pt3dadd(128.8, 181.79, -4.7, 3.07)
pt3dadd(128.87, 181.83, -4.7, 3.07)
pt3dadd(128.91, 181.91, -4.7, 3.07)
pt3dadd(128.91, 181.99, -4.7, 3.07)
pt3dadd(128.94, 182.03, -4.7, 3.07)
pt3dadd(129.01, 182.15, -4.7, 3.07)
pt3dadd(129.05, 182.19, -4.7, 3.07)
pt3dadd(129.08, 182.27, -4.7, 3.07)
pt3dadd(129.15, 182.35, -4.7, 3.07)
pt3dadd(129.19, 182.39, -4.7, 3.07)
pt3dadd(129.22, 182.51, -4.7, 3.07)
pt3dadd(129.29, 182.59, -4.7, 3.07)
pt3dadd(129.33, 182.63, -4.7, 3.07)
pt3dadd(129.36, 182.74, -4.7, 3.07)
pt3dadd(129.43, 182.86, -4.7, 3.07)
pt3dadd(129.46, 182.9, -4.7, 3.07)
pt3dadd(129.5, 182.98, -4.7, 3.07)
pt3dadd(129.57, 183.06, -4.7, 3.07)
pt3dadd(129.6, 183.18, -4.7, 3.07)
pt3dadd(129.64, 183.26, -4.7, 3.07)
pt3dadd(129.71, 183.3, -4.7, 3.07)
pt3dadd(129.74, 183.38, -4.7, 3.07)
pt3dadd(129.78, 183.41, -4.7, 3.07)
pt3dadd(129.85, 183.54, -4.7, 3.07)
pt3dadd(129.88, 183.57, -4.7, 3.07)
pt3dadd(129.92, 183.65, -4.7, 3.07)
pt3dadd(129.95, 183.73, -4.7, 3.07)
pt3dadd(129.99, 183.81, -4.7, 3.07)
pt3dadd(130.02, 183.89, -4.7, 3.07)
pt3dadd(130.06, 183.97, -4.7, 3.07)
pt3dadd(130.09, 184.01, -4.7, 3.07)
pt3dadd(130.16, 184.05, -4.7, 3.07)
pt3dadd(130.16, 184.13, -4.7, 3.07)
pt3dadd(130.23, 184.25, -4.7, 3.07)
pt3dadd(130.3, 184.32, -4.7, 3.07)
pt3dadd(130.34, 184.37, -4.7, 3.07)
pt3dadd(130.37, 184.45, -4.7, 3.07)
pt3dadd(130.44, 184.52, -4.7, 3.07)
pt3dadd(130.48, 184.6, -4.7, 3.07)
pt3dadd(130.51, 184.68, -4.7, 3.07)
pt3dadd(130.54, 184.72, -4.7, 3.07)
pt3dadd(130.58, 184.8, -4.7, 3.07)
pt3dadd(130.68, 184.88, -4.7, 3.07)
pt3dadd(130.72, 184.96, -4.7, 3.07)
pt3dadd(130.79, 185.08, -4.7, 3.07)
pt3dadd(130.82, 185.16, -4.7, 3.07)
pt3dadd(130.86, 185.24, -4.7, 3.07)
pt3dadd(130.93, 185.27, -4.7, 3.07)
pt3dadd(130.96, 185.32, -4.7, 3.07)
pt3dadd(131, 185.35, -4.7, 3.07)
pt3dadd(131.03, 185.43, -4.7, 3.07)
pt3dadd(131.1, 185.47, -4.7, 3.07)
pt3dadd(131.17, 185.55, -4.7, 3.07)
pt3dadd(131.21, 185.63, -4.7, 3.07)
pt3dadd(131.28, 185.67, -4.7, 3.07)
pt3dadd(131.31, 185.75, -4.7, 3.07)
pt3dadd(131.38, 185.79, -4.7, 3.07)
pt3dadd(131.45, 185.83, -4.7, 3.07)
pt3dadd(131.49, 185.87, -4.7, 3.07)
pt3dadd(131.55, 185.91, -4.7, 3.07)
pt3dadd(131.59, 185.95, -4.7, 3.07)
pt3dadd(131.66, 186.03, -4.7, 3.07)
pt3dadd(131.73, 186.07, -4.7, 3.07)
pt3dadd(131.84, 186.11, -4.7, 3.07)
pt3dadd(131.9, 186.18, -4.7, 3.07)
pt3dadd(131.94, 186.26, -4.7, 3.07)
pt3dadd(132.04, 186.3, -4.7, 3.07)
pt3dadd(132.15, 186.38, -4.7, 3.07)
pt3dadd(132.22, 186.42, -4.7, 3.07)
pt3dadd(132.32, 186.54, -4.7, 3.07)
pt3dadd(132.36, 186.58, -4.7, 3.07)
pt3dadd(132.53, 186.7, -4.7, 3.07)
pt3dadd(132.6, 186.7, -4.7, 3.07)
pt3dadd(132.63, 186.74, -4.7, 3.07)
pt3dadd(132.63, 186.82, -4.7, 3.07)
pt3dadd(132.67, 186.86, -4.7, 3.07)
pt3dadd(132.71, 186.9, -4.7, 3.07)
pt3dadd(132.77, 186.94, -4.7, 3.07)
pt3dadd(132.81, 187.02, -4.7, 3.07)
pt3dadd(132.85, 187.05, -4.7, 3.07)
pt3dadd(132.88, 187.13, -4.7, 3.07)
pt3dadd(132.95, 187.18, -4.7, 3.07)
pt3dadd(132.99, 187.21, -4.7, 3.07)
pt3dadd(133.05, 187.26, -4.7, 3.07)
pt3dadd(133.09, 187.29, -4.7, 3.07)
pt3dadd(133.13, 187.33, -4.7, 3.07)
pt3dadd(133.16, 187.37, -4.7, 3.07)
pt3dadd(133.19, 187.41, -4.7, 3.07)
pt3dadd(133.23, 187.45, -4.7, 3.07)
pt3dadd(133.26, 187.49, -4.7, 3.07)
pt3dadd(133.33, 187.53, -4.7, 3.07)
pt3dadd(133.4, 187.57, -4.7, 3.07)
pt3dadd(133.51, 187.69, -4.7, 3.07)
pt3dadd(133.58, 187.69, -4.7, 3.07)
pt3dadd(133.61, 187.77, -4.7, 3.07)
pt3dadd(133.68, 187.81, -4.7, 3.07)
pt3dadd(133.75, 187.85, -4.7, 3.07)
pt3dadd(133.89, 187.93, -4.7, 3.07)
pt3dadd(133.99, 187.96, -4.7, 3.07)
pt3dadd(134.17, 188.09, -4.7, 3.07)
pt3dadd(134.24, 188.13, -4.7, 3.07)
pt3dadd(134.31, 188.2, -4.7, 3.07)
pt3dadd(134.41, 188.2, -4.7, 3.07)
pt3dadd(134.45, 188.24, -4.7, 3.07)
pt3dadd(134.55, 188.32, -4.7, 3.07)
pt3dadd(134.62, 188.36, -4.7, 3.07)
pt3dadd(134.69, 188.4, -4.7, 3.07)
pt3dadd(134.79, 188.48, -4.7, 3.07)
pt3dadd(134.87, 188.48, -4.7, 3.07)
pt3dadd(135.01, 188.56, -4.7, 3.07)
pt3dadd(135.07, 188.6, -4.7, 3.07)
pt3dadd(135.15, 188.64, -4.7, 3.07)
pt3dadd(135.21, 188.68, -4.7, 3.07)
pt3dadd(135.29, 188.72, -4.7, 3.07)
pt3dadd(135.39, 188.76, -4.7, 3.07)
pt3dadd(135.49, 188.8, -4.7, 3.07)
pt3dadd(135.6, 188.84, -4.7, 3.07)
}
}
proc shape3d_188() {
dend[123] { pt3dadd(135.7, 188.88, -4.7, 3.07)
pt3dadd(135.74, 188.91, -4.7, 3.07)
pt3dadd(135.84, 188.96, -4.7, 3.07)
pt3dadd(135.91, 188.99, -4.7, 3.07)
pt3dadd(135.98, 189.07, -4.7, 3.07)
pt3dadd(136.05, 189.11, -4.7, 3.07)
pt3dadd(136.12, 189.15, -4.7, 3.07)
pt3dadd(136.19, 189.19, -4.7, 3.07)
pt3dadd(136.26, 189.23, -4.7, 3.07)
pt3dadd(136.29, 189.27, -4.7, 3.07)
pt3dadd(136.37, 189.27, -4.7, 3.07)
pt3dadd(136.43, 189.35, -4.7, 3.07)
pt3dadd(136.5, 189.39, -4.7, 3.07)
pt3dadd(136.54, 189.43, -4.7, 3.07)
pt3dadd(136.61, 189.43, -4.7, 3.07)
pt3dadd(136.64, 189.47, -4.7, 3.07)
pt3dadd(136.75, 189.51, -4.7, 3.07)
pt3dadd(136.85, 189.55, -4.7, 3.07)
pt3dadd(136.99, 189.59, -4.7, 3.07)
pt3dadd(137.13, 189.59, -4.7, 3.07)
pt3dadd(137.24, 189.63, -4.7, 3.07)
pt3dadd(137.34, 189.63, -4.7, 3.07)
pt3dadd(137.16, 189.63, -4.7, 3.07)
pt3dadd(137.2, 189.67, -4.7, 3.07)
pt3dadd(137.3, 189.71, -4.7, 3.07)
pt3dadd(137.45, 189.79, -4.7, 3.07)
pt3dadd(137.62, 189.9, -4.7, 3.07)
pt3dadd(137.76, 189.9, -4.7, 3.07)
pt3dadd(137.86, 189.99, -4.7, 3.07)
pt3dadd(137.93, 190.02, -4.7, 3.07)
pt3dadd(138.07, 190.06, -4.7, 3.07)
pt3dadd(138.1, 190.1, -4.7, 3.07)
pt3dadd(138.21, 190.18, -4.7, 3.07)
pt3dadd(138.32, 190.22, -4.7, 3.07)
pt3dadd(138.42, 190.3, -4.7, 3.07)
pt3dadd(138.49, 190.34, -4.7, 3.07)
pt3dadd(138.59, 190.38, -4.7, 3.07)
pt3dadd(138.7, 190.46, -4.7, 3.07)
pt3dadd(138.8, 190.5, -4.7, 3.07)
pt3dadd(138.94, 190.58, -4.7, 3.07)
pt3dadd(139.05, 190.62, -4.7, 3.07)
pt3dadd(139.15, 190.66, -4.7, 3.07)
pt3dadd(139.36, 190.77, -4.7, 3.07)
pt3dadd(139.5, 190.85, -4.7, 3.07)
pt3dadd(139.71, 190.97, -4.7, 3.07)
pt3dadd(139.81, 191.01, -4.7, 3.07)
pt3dadd(139.92, 191.05, -4.7, 3.07)
pt3dadd(140.06, 191.17, -4.7, 3.07)
pt3dadd(140.13, 191.21, -4.7, 3.07)
pt3dadd(140.26, 191.25, -4.7, 3.07)
pt3dadd(140.34, 191.33, -4.7, 3.07)
pt3dadd(140.4, 191.37, -4.7, 3.07)
pt3dadd(140.48, 191.41, -4.7, 3.07)
pt3dadd(140.54, 191.45, -4.7, 3.07)
pt3dadd(140.62, 191.53, -4.7, 3.07)
pt3dadd(140.72, 191.57, -4.7, 3.07)
pt3dadd(140.79, 191.61, -4.7, 3.07)
pt3dadd(140.82, 191.68, -4.7, 3.07)
pt3dadd(140.93, 191.73, -4.7, 3.07)
pt3dadd(141.03, 191.76, -4.7, 3.07)
pt3dadd(141.1, 191.8, -4.7, 3.07)
pt3dadd(141.21, 191.88, -4.7, 3.07)
pt3dadd(141.27, 191.92, -4.7, 3.07)
pt3dadd(141.35, 191.96, -4.7, 3.07)
pt3dadd(141.41, 192.04, -4.7, 3.07)
pt3dadd(141.52, 192.08, -4.7, 3.07)
pt3dadd(141.7, 192.2, -4.7, 3.07)
pt3dadd(141.8, 192.24, -4.7, 3.07)
pt3dadd(141.87, 192.32, -4.7, 3.07)
pt3dadd(142.01, 192.4, -4.7, 3.07)
pt3dadd(142.11, 192.48, -4.7, 3.07)
pt3dadd(142.22, 192.52, -4.7, 3.07)
pt3dadd(142.35, 192.63, -4.7, 3.07)
pt3dadd(142.43, 192.71, -4.7, 3.07)
pt3dadd(142.53, 192.76, -4.7, 3.07)
pt3dadd(142.63, 192.83, -4.7, 3.07)
pt3dadd(142.74, 192.91, -4.7, 3.07)
pt3dadd(142.81, 192.95, -4.7, 3.07)
pt3dadd(142.88, 192.99, -4.7, 3.07)
pt3dadd(143.02, 193.11, -4.7, 3.07)
pt3dadd(143.19, 193.23, -4.7, 3.07)
pt3dadd(143.3, 193.35, -4.7, 3.07)
pt3dadd(143.4, 193.39, -4.7, 3.07)
pt3dadd(143.51, 193.47, -4.7, 3.07)
pt3dadd(143.57, 193.51, -4.7, 3.07)
pt3dadd(143.65, 193.59, -4.7, 3.07)
pt3dadd(143.79, 193.71, -4.7, 3.07)
pt3dadd(143.89, 193.82, -4.7, 3.07)
pt3dadd(143.93, 193.86, -4.7, 3.07)
pt3dadd(144.03, 193.9, -4.7, 3.07)
pt3dadd(144.13, 194.02, -4.7, 3.07)
pt3dadd(144.2, 194.06, -4.7, 3.07)
pt3dadd(144.31, 194.14, -4.7, 3.07)
pt3dadd(144.34, 194.18, -4.7, 3.07)
pt3dadd(144.48, 194.34, -4.7, 3.07)
pt3dadd(144.55, 194.38, -4.7, 3.07)
pt3dadd(144.62, 194.46, -4.7, 3.07)
pt3dadd(144.69, 194.49, -4.7, 3.07)
pt3dadd(144.79, 194.57, -4.7, 3.07)
pt3dadd(144.9, 194.69, -4.7, 3.07)
pt3dadd(144.93, 194.73, -4.7, 3.07)
pt3dadd(144.97, 194.77, -4.7, 3.07)
pt3dadd(145.04, 194.81, -4.7, 3.07)
pt3dadd(145.11, 194.89, -4.7, 3.07)
pt3dadd(145.14, 194.93, -4.7, 3.07)
pt3dadd(145.18, 194.97, -4.7, 3.07)
pt3dadd(145.21, 195.05, -4.7, 3.07)
pt3dadd(145.28, 195.09, -4.7, 3.07)
pt3dadd(145.32, 195.13, -4.7, 3.07)
pt3dadd(145.35, 195.21, -4.7, 3.07)
pt3dadd(145.42, 195.25, -4.7, 3.07)
pt3dadd(145.46, 195.32, -4.7, 3.07)
pt3dadd(145.53, 195.4, -4.7, 3.07)
pt3dadd(145.56, 195.45, -4.7, 3.07)
pt3dadd(145.6, 195.49, -4.7, 3.07)
pt3dadd(145.63, 195.52, -4.7, 3.07)
pt3dadd(145.74, 195.6, -4.7, 3.07)
pt3dadd(145.77, 195.68, -4.7, 3.07)
pt3dadd(145.88, 195.76, -4.7, 3.07)
pt3dadd(145.91, 195.8, -4.7, 3.07)
pt3dadd(145.95, 195.88, -4.7, 3.07)
pt3dadd(145.98, 195.92, -4.7, 3.07)
pt3dadd(146.09, 195.96, -4.7, 3.07)
pt3dadd(146.09, 196.04, -4.7, 3.07)
pt3dadd(146.12, 196.08, -4.7, 3.07)
pt3dadd(146.19, 196.16, -4.7, 3.07)
pt3dadd(146.22, 196.2, -4.7, 3.07)
pt3dadd(146.26, 196.27, -4.7, 3.07)
pt3dadd(146.33, 196.32, -4.7, 3.07)
pt3dadd(146.36, 196.35, -4.7, 3.07)
pt3dadd(146.4, 196.43, -4.7, 3.07)
pt3dadd(146.43, 196.51, -4.7, 3.07)
pt3dadd(146.47, 196.55, -4.7, 3.07)
pt3dadd(146.47, 196.59, -4.7, 3.07)
pt3dadd(146.43, 196.32, -7.7, 3.07)
pt3dadd(146.47, 196.35, -7.7, 3.07)
pt3dadd(146.5, 196.4, -7.7, 3.07)
pt3dadd(146.54, 196.43, -7.7, 3.07)
pt3dadd(146.61, 196.43, -7.7, 3.07)
pt3dadd(146.64, 196.47, -7.7, 3.07)
pt3dadd(146.85, 196.47, -7.7, 3.07)
pt3dadd(146.96, 196.51, -7.7, 3.07)
pt3dadd(149.5, 196.51, -7.7, 3.07)
pt3dadd(149.57, 196.47, -7.7, 3.07)
pt3dadd(149.64, 196.43, -7.7, 3.07)
pt3dadd(149.71, 196.4, -7.7, 3.07)
pt3dadd(149.81, 196.35, -7.7, 3.07)
pt3dadd(149.88, 196.32, -7.7, 3.07)
pt3dadd(149.99, 196.27, -7.7, 3.07)
pt3dadd(150.02, 196.24, -7.7, 3.07)
pt3dadd(150.09, 196.2, -7.7, 3.07)
pt3dadd(150.16, 196.16, -7.7, 3.07)
pt3dadd(150.26, 196.12, -7.7, 3.07)
pt3dadd(150.34, 196.08, -7.7, 3.07)
pt3dadd(150.4, 196.04, -7.7, 3.07)
pt3dadd(150.51, 196, -7.7, 3.07)
pt3dadd(150.58, 195.96, -7.7, 3.07)
pt3dadd(150.68, 195.92, -7.7, 3.07)
pt3dadd(150.82, 195.84, -7.7, 3.07)
pt3dadd(150.89, 195.84, -7.7, 3.07)
pt3dadd(150.96, 195.8, -7.7, 3.07)
pt3dadd(151.03, 195.72, -7.7, 3.07)
pt3dadd(151.1, 195.68, -7.7, 3.07)
pt3dadd(151.21, 195.64, -7.7, 3.07)
pt3dadd(151.24, 195.6, -7.7, 3.07)
pt3dadd(151.31, 195.56, -7.7, 3.07)
pt3dadd(151.38, 195.52, -7.7, 3.07)
pt3dadd(151.45, 195.49, -7.7, 3.07)
pt3dadd(151.52, 195.45, -7.7, 3.07)
pt3dadd(151.59, 195.4, -7.7, 3.07)
pt3dadd(151.66, 195.37, -7.7, 3.07)
pt3dadd(151.8, 195.37, -7.7, 3.07)
pt3dadd(151.87, 195.32, -7.7, 3.07)
pt3dadd(151.94, 195.29, -7.7, 3.07)
pt3dadd(152.04, 195.29, -7.7, 3.07)
pt3dadd(152.11, 195.25, -7.7, 3.07)
pt3dadd(153.99, 195.25, -7.7, 3.07)
pt3dadd(154.06, 195.21, -7.7, 3.07)
pt3dadd(154.13, 195.17, -7.7, 3.07)
pt3dadd(154.24, 195.17, -7.7, 3.07)
pt3dadd(154.38, 195.13, -7.7, 3.07)
pt3dadd(154.45, 195.09, -7.7, 3.07)
pt3dadd(154.51, 195.05, -7.7, 3.07)
pt3dadd(154.59, 195.01, -7.7, 3.07)
pt3dadd(154.65, 195.01, -7.7, 3.07)
pt3dadd(154.72, 194.97, -7.7, 3.07)
pt3dadd(154.76, 194.93, -7.7, 3.07)
pt3dadd(154.83, 194.93, -7.7, 3.07)
pt3dadd(154.86, 194.89, -7.7, 3.07)
pt3dadd(154.97, 194.89, -7.7, 3.07)
pt3dadd(154.86, 194.73, -9.7, 3.07)
pt3dadd(154.9, 194.69, -9.7, 3.07)
pt3dadd(155, 194.65, -9.7, 3.07)
pt3dadd(155.11, 194.54, -9.7, 3.07)
pt3dadd(155.21, 194.49, -9.7, 3.07)
pt3dadd(155.28, 194.41, -9.7, 3.07)
pt3dadd(155.32, 194.38, -9.7, 3.07)
pt3dadd(155.38, 194.34, -9.7, 3.07)
pt3dadd(155.42, 194.3, -9.7, 3.07)
pt3dadd(155.46, 194.26, -9.7, 3.07)
}
}
proc shape3d_189() {
dend[123] { pt3dadd(155.49, 194.22, -9.7, 3.07)
pt3dadd(155.52, 194.14, -9.7, 3.07)
pt3dadd(155.6, 194.1, -9.7, 3.07)
pt3dadd(155.6, 194.02, -9.7, 3.07)
pt3dadd(155.63, 193.98, -9.7, 3.07)
pt3dadd(155.66, 193.9, -9.7, 3.07)
pt3dadd(155.74, 193.82, -9.7, 3.07)
pt3dadd(155.77, 193.71, -9.7, 3.07)
pt3dadd(155.8, 193.63, -9.7, 3.07)
pt3dadd(155.87, 193.54, -9.7, 3.07)
pt3dadd(155.87, 193.47, -9.7, 3.07)
pt3dadd(155.94, 193.35, -9.7, 3.07)
pt3dadd(156.01, 193.27, -9.7, 3.07)
pt3dadd(156.05, 193.23, -9.7, 3.07)
pt3dadd(156.12, 193.15, -9.7, 3.07)
pt3dadd(156.15, 193.07, -9.7, 3.07)
pt3dadd(156.19, 192.99, -9.7, 3.07)
pt3dadd(156.29, 192.87, -9.7, 3.07)
pt3dadd(156.29, 192.79, -9.7, 3.07)
pt3dadd(156.4, 192.68, -9.7, 3.07)
pt3dadd(156.43, 192.6, -9.7, 3.07)
pt3dadd(156.46, 192.52, -9.7, 3.07)
pt3dadd(156.5, 192.44, -9.7, 3.07)
pt3dadd(156.54, 192.36, -9.7, 3.07)
pt3dadd(156.57, 192.28, -9.7, 3.07)
pt3dadd(156.64, 192.2, -9.7, 3.07)
pt3dadd(156.71, 192.12, -9.7, 3.07)
pt3dadd(156.74, 192.04, -9.7, 3.07)
pt3dadd(156.78, 191.92, -9.7, 3.07)
pt3dadd(156.85, 191.85, -9.7, 3.07)
pt3dadd(156.88, 191.76, -9.7, 3.07)
pt3dadd(156.95, 191.65, -9.7, 3.07)
pt3dadd(156.95, 191.57, -9.7, 3.07)
pt3dadd(156.99, 191.45, -9.7, 3.07)
pt3dadd(157.06, 191.37, -9.7, 3.07)
pt3dadd(157.06, 191.25, -9.7, 3.07)
pt3dadd(157.09, 191.17, -9.7, 3.07)
pt3dadd(157.13, 191.05, -9.7, 3.07)
pt3dadd(157.16, 190.97, -9.7, 3.07)
pt3dadd(157.2, 190.9, -9.7, 3.07)
pt3dadd(157.23, 190.77, -9.7, 3.07)
pt3dadd(157.27, 190.7, -9.7, 3.07)
pt3dadd(157.27, 190.62, -9.7, 3.07)
pt3dadd(157.3, 190.54, -9.7, 3.07)
pt3dadd(157.34, 190.46, -9.7, 3.07)
pt3dadd(157.37, 190.38, -9.7, 3.07)
pt3dadd(157.37, 190.22, -9.7, 3.07)
pt3dadd(157.41, 190.1, -9.7, 3.07)
pt3dadd(157.44, 190.02, -9.7, 3.07)
pt3dadd(157.48, 189.95, -9.7, 3.07)
pt3dadd(157.51, 189.87, -9.7, 3.07)
pt3dadd(157.51, 189.79, -9.7, 3.07)
pt3dadd(157.54, 189.71, -9.7, 3.07)
pt3dadd(157.58, 189.63, -9.7, 3.07)
pt3dadd(157.62, 189.59, -9.7, 3.07)
pt3dadd(157.65, 189.47, -9.7, 3.07)
pt3dadd(157.68, 189.39, -9.7, 3.07)
pt3dadd(157.72, 189.31, -9.7, 3.07)
pt3dadd(157.76, 189.23, -9.7, 3.07)
pt3dadd(157.79, 189.15, -9.7, 3.07)
pt3dadd(157.82, 189.04, -9.7, 3.07)
pt3dadd(157.86, 188.96, -9.7, 3.07)
pt3dadd(157.9, 188.88, -9.7, 3.07)
pt3dadd(157.93, 188.8, -9.7, 3.07)
pt3dadd(157.96, 188.72, -9.7, 3.07)
pt3dadd(158, 188.6, -9.7, 3.07)
pt3dadd(158.03, 188.52, -9.7, 3.07)
pt3dadd(158.07, 188.44, -9.7, 3.07)
pt3dadd(158.07, 188.36, -9.7, 3.07)
pt3dadd(158.1, 188.28, -9.7, 3.07)
pt3dadd(158.14, 188.24, -9.7, 3.07)
pt3dadd(158.14, 188.16, -9.7, 3.07)
pt3dadd(158.17, 188.13, -9.7, 3.07)
pt3dadd(158.21, 188.04, -9.7, 3.07)
pt3dadd(158.28, 187.96, -9.7, 3.07)
pt3dadd(158.31, 187.89, -9.7, 3.07)
pt3dadd(158.35, 187.81, -9.7, 3.07)
pt3dadd(158.38, 187.73, -9.7, 3.07)
pt3dadd(158.45, 187.65, -9.7, 3.07)
pt3dadd(158.49, 187.57, -9.7, 3.07)
pt3dadd(158.52, 187.49, -9.7, 3.07)
pt3dadd(158.55, 187.45, -9.7, 3.07)
pt3dadd(158.55, 187.33, -9.7, 3.07)
pt3dadd(158.59, 187.29, -9.7, 3.07)
pt3dadd(158.66, 187.21, -9.7, 3.07)
pt3dadd(158.73, 187.1, -9.7, 3.07)
pt3dadd(158.76, 187.02, -9.7, 3.07)
pt3dadd(158.8, 186.98, -9.7, 3.07)
pt3dadd(158.87, 186.9, -9.7, 3.07)
pt3dadd(158.94, 186.82, -9.7, 3.07)
pt3dadd(158.98, 186.74, -9.7, 3.07)
pt3dadd(159.01, 186.62, -9.7, 3.07)
pt3dadd(159.08, 186.54, -9.7, 3.07)
pt3dadd(159.15, 186.42, -9.7, 3.07)
pt3dadd(159.22, 186.38, -9.7, 3.07)
pt3dadd(159.25, 186.3, -9.7, 3.07)
pt3dadd(159.32, 186.26, -9.7, 3.07)
pt3dadd(159.36, 186.18, -9.7, 3.07)
pt3dadd(159.39, 186.07, -9.7, 3.07)
pt3dadd(159.5, 185.95, -9.7, 3.07)
pt3dadd(159.53, 185.91, -9.7, 3.07)
pt3dadd(159.57, 185.83, -9.7, 3.07)
pt3dadd(159.6, 185.75, -9.7, 3.07)
pt3dadd(159.63, 185.71, -9.7, 3.07)
pt3dadd(159.67, 185.63, -9.7, 3.07)
pt3dadd(159.77, 185.51, -9.7, 3.07)
pt3dadd(159.81, 185.43, -9.7, 3.07)
pt3dadd(159.88, 185.4, -9.7, 3.07)
pt3dadd(159.95, 185.32, -9.7, 3.07)
pt3dadd(159.99, 185.24, -9.7, 3.07)
pt3dadd(160.05, 185.16, -9.7, 3.07)
pt3dadd(160.12, 185.08, -9.7, 3.07)
pt3dadd(160.19, 184.96, -9.7, 3.07)
pt3dadd(160.23, 184.92, -9.7, 3.07)
pt3dadd(160.3, 184.8, -9.7, 3.07)
pt3dadd(160.44, 184.64, -9.7, 3.07)
pt3dadd(160.54, 184.52, -9.7, 3.07)
pt3dadd(160.58, 184.45, -9.7, 3.07)
pt3dadd(160.71, 184.29, -9.7, 3.07)
pt3dadd(160.75, 184.25, -9.7, 3.07)
pt3dadd(160.82, 184.17, -9.7, 3.07)
pt3dadd(160.85, 184.09, -9.7, 3.07)
pt3dadd(160.89, 184.05, -9.7, 3.07)
pt3dadd(160.96, 183.97, -9.7, 3.07)
pt3dadd(160.99, 183.93, -9.7, 3.07)
pt3dadd(161.03, 183.85, -9.7, 3.07)
pt3dadd(161.07, 183.77, -9.7, 3.07)
pt3dadd(161.1, 183.69, -9.7, 3.07)
pt3dadd(161.13, 183.65, -9.7, 3.07)
pt3dadd(161.17, 183.57, -9.7, 3.07)
pt3dadd(161.2, 183.57, -9.7, 3.07)
pt3dadd(161.13, 183.65, -11.7, 3.07)
pt3dadd(161.2, 183.54, -11.7, 3.07)
pt3dadd(161.24, 183.46, -11.7, 3.07)
pt3dadd(161.31, 183.38, -11.7, 3.07)
pt3dadd(161.38, 183.26, -11.7, 3.07)
pt3dadd(161.45, 183.14, -11.7, 3.07)
pt3dadd(161.52, 183.02, -11.7, 3.07)
pt3dadd(161.55, 182.9, -11.7, 3.07)
pt3dadd(161.59, 182.82, -11.7, 3.07)
pt3dadd(161.66, 182.74, -11.7, 3.07)
pt3dadd(161.73, 182.63, -11.7, 3.07)
pt3dadd(161.76, 182.51, -11.7, 3.07)
pt3dadd(161.79, 182.43, -11.7, 3.07)
pt3dadd(161.87, 182.31, -11.7, 3.07)
pt3dadd(161.9, 182.19, -11.7, 3.07)
pt3dadd(161.93, 182.07, -11.7, 3.07)
pt3dadd(162.01, 181.95, -11.7, 3.07)
pt3dadd(162.07, 181.83, -11.7, 3.07)
pt3dadd(162.15, 181.71, -11.7, 3.07)
pt3dadd(162.28, 181.4, -11.7, 3.07)
pt3dadd(162.35, 181.24, -11.7, 3.07)
pt3dadd(162.42, 181.04, -11.7, 3.07)
pt3dadd(162.6, 180.65, -11.7, 3.07)
pt3dadd(162.7, 180.45, -11.7, 3.07)
pt3dadd(162.77, 180.25, -11.7, 3.07)
pt3dadd(162.8, 180.09, -11.7, 3.07)
pt3dadd(162.88, 179.93, -11.7, 3.07)
pt3dadd(162.95, 179.82, -11.7, 3.07)
pt3dadd(163.01, 179.58, -11.7, 3.07)
pt3dadd(163.09, 179.46, -11.7, 3.07)
pt3dadd(163.12, 179.38, -11.7, 3.07)
pt3dadd(163.15, 179.22, -11.7, 3.07)
pt3dadd(163.19, 179.02, -11.7, 3.07)
pt3dadd(163.26, 178.87, -11.7, 3.07)
pt3dadd(163.26, 178.71, -11.7, 3.07)
pt3dadd(163.33, 178.59, -11.7, 3.07)
pt3dadd(163.33, 178.43, -11.7, 3.07)
pt3dadd(163.4, 178.31, -11.7, 3.07)
pt3dadd(163.4, 178.15, -11.7, 3.07)
pt3dadd(163.43, 178.04, -11.7, 3.07)
pt3dadd(163.5, 177.88, -11.7, 3.07)
pt3dadd(163.57, 177.8, -11.7, 3.07)
pt3dadd(163.61, 177.64, -11.7, 3.07)
pt3dadd(163.68, 177.48, -11.7, 3.07)
pt3dadd(163.75, 177.32, -11.7, 3.07)
pt3dadd(163.78, 177.16, -11.7, 3.07)
pt3dadd(163.85, 177.01, -11.7, 3.07)
pt3dadd(163.88, 176.89, -11.7, 3.07)
pt3dadd(163.92, 176.81, -11.7, 3.07)
pt3dadd(163.96, 176.69, -11.7, 3.07)
pt3dadd(163.96, 176.53, -11.7, 3.07)
pt3dadd(163.99, 176.41, -11.7, 3.07)
pt3dadd(163.99, 176.29, -11.7, 3.07)
}
dend[124] {pt3dclear()
pt3dadd(96.68, 106.93, -4.7, 6.83)
pt3dadd(97, 105.98, -5.7, 6.83)
pt3dadd(97.03, 105.9, -5.7, 6.83)
pt3dadd(97.1, 105.78, -5.7, 6.83)
pt3dadd(97.17, 105.7, -5.7, 1.8)
pt3dadd(97.24, 105.58, -5.7, 6.83)
pt3dadd(97.28, 105.46, -5.7, 6.83)
pt3dadd(97.35, 105.39, -5.7, 6.83)
pt3dadd(97.38, 105.35, -5.7, 6.83)
pt3dadd(97.42, 105.26, -5.7, 6.83)
pt3dadd(97.45, 105.19, -5.7, 6.83)
pt3dadd(97.49, 105.11, -5.7, 6.83)
pt3dadd(97.49, 104.67, -5.7, 6.83)
pt3dadd(97.62, 104.04, -6.7, 4.74)
pt3dadd(97.66, 103.96, -6.7, 4.74)
pt3dadd(97.69, 103.84, -6.7, 4.74)
}
}
proc shape3d_190() {
dend[124] { pt3dadd(97.69, 103.76, -6.7, 4.74)
pt3dadd(97.73, 103.64, -6.7, 4.74)
pt3dadd(97.76, 103.53, -6.7, 4.74)
pt3dadd(97.8, 103.49, -6.7, 4.74)
pt3dadd(97.8, 103.25, -6.7, 4.74)
pt3dadd(97.83, 103.17, -6.7, 4.74)
pt3dadd(97.83, 102.54, -6.7, 4.74)
pt3dadd(97.87, 102.5, -6.7, 4.74)
pt3dadd(97.9, 102.46, -6.7, 4.74)
pt3dadd(97.9, 102.38, -6.7, 4.74)
pt3dadd(97.94, 102.3, -6.7, 4.74)
pt3dadd(97.97, 102.26, -6.7, 4.74)
pt3dadd(98.01, 102.22, -6.7, 4.74)
pt3dadd(98.04, 102.14, -6.7, 4.74)
pt3dadd(98.08, 102.06, -6.7, 4.74)
pt3dadd(98.11, 102.02, -6.7, 4.74)
pt3dadd(98.11, 101.9, -6.7, 4.74)
pt3dadd(98.14, 101.86, -6.7, 4.74)
pt3dadd(98.18, 101.82, -6.7, 4.74)
pt3dadd(98.21, 101.75, -6.7, 4.74)
pt3dadd(98.21, 101.63, -6.7, 4.74)
pt3dadd(98.25, 101.58, -6.7, 4.74)
pt3dadd(98.25, 101.51, -6.7, 4.74)
pt3dadd(98.29, 101.47, -6.7, 4.74)
pt3dadd(98.32, 101.43, -6.7, 4.74)
pt3dadd(98.36, 101.35, -6.7, 4.74)
pt3dadd(98.36, 101.27, -6.7, 4.74)
pt3dadd(98.39, 101.19, -6.7, 4.74)
pt3dadd(98.43, 101.11, -6.7, 4.74)
pt3dadd(98.43, 100.95, -6.7, 4.74)
pt3dadd(98.46, 100.88, -6.7, 4.74)
pt3dadd(98.5, 100.83, -6.7, 4.74)
pt3dadd(98.5, 100.6, -6.7, 4.74)
pt3dadd(98.53, 100.56, -6.7, 4.74)
pt3dadd(98.57, 100.52, -6.7, 4.74)
pt3dadd(98.57, 100.4, -6.7, 4.74)
pt3dadd(98.6, 100.36, -6.7, 4.74)
pt3dadd(98.64, 100.32, -6.7, 4.74)
pt3dadd(98.64, 100.28, -6.7, 4.74)
pt3dadd(98.74, 99.93, -7.7, 4.18)
pt3dadd(98.77, 99.85, -7.7, 4.18)
pt3dadd(98.81, 99.73, -7.7, 4.18)
pt3dadd(98.88, 99.57, -7.7, 4.18)
pt3dadd(98.98, 99.41, -7.7, 4.18)
pt3dadd(99.05, 99.33, -7.7, 4.18)
pt3dadd(99.12, 99.21, -7.7, 4.18)
pt3dadd(99.16, 99.09, -7.7, 4.18)
pt3dadd(99.19, 99.01, -7.7, 4.18)
pt3dadd(99.22, 98.93, -7.7, 4.18)
pt3dadd(99.29, 98.89, -7.7, 4.18)
pt3dadd(99.33, 98.82, -7.7, 4.18)
pt3dadd(99.36, 98.74, -7.7, 4.18)
pt3dadd(99.4, 98.66, -7.7, 4.18)
pt3dadd(99.43, 98.62, -7.7, 4.18)
pt3dadd(99.47, 98.54, -7.7, 4.18)
pt3dadd(99.54, 98.42, -7.7, 4.18)
pt3dadd(99.57, 98.34, -7.7, 4.18)
pt3dadd(99.64, 98.26, -7.7, 4.18)
pt3dadd(99.68, 98.22, -7.7, 4.18)
pt3dadd(99.75, 98.14, -7.7, 4.18)
pt3dadd(99.82, 98.07, -7.7, 4.18)
pt3dadd(99.85, 98.03, -7.7, 4.18)
pt3dadd(99.89, 97.94, -7.7, 4.18)
pt3dadd(99.96, 97.9, -7.7, 4.18)
pt3dadd(99.99, 97.83, -7.7, 4.18)
pt3dadd(100.13, 97.67, -7.7, 4.18)
pt3dadd(100.2, 97.63, -7.7, 4.18)
pt3dadd(100.34, 97.47, -7.7, 4.18)
pt3dadd(100.41, 97.43, -7.7, 4.18)
pt3dadd(100.44, 97.35, -7.7, 4.18)
pt3dadd(100.51, 97.31, -7.7, 4.18)
pt3dadd(100.55, 97.27, -7.7, 4.18)
pt3dadd(100.65, 97.15, -7.7, 4.18)
pt3dadd(100.69, 97.11, -7.7, 4.18)
pt3dadd(100.76, 97.07, -7.7, 4.18)
pt3dadd(100.83, 97.04, -7.7, 4.18)
pt3dadd(100.86, 97, -7.7, 4.18)
pt3dadd(100.97, 96.88, -7.7, 4.18)
pt3dadd(101.04, 96.88, -7.7, 4.18)
pt3dadd(101.11, 96.8, -7.7, 4.18)
pt3dadd(101.14, 96.76, -7.7, 4.18)
pt3dadd(101.21, 96.68, -7.7, 4.18)
pt3dadd(101.28, 96.64, -7.7, 4.18)
pt3dadd(101.35, 96.56, -7.7, 4.18)
pt3dadd(101.39, 96.52, -7.7, 4.18)
pt3dadd(101.46, 96.44, -7.7, 4.18)
pt3dadd(101.49, 96.4, -7.7, 4.18)
pt3dadd(101.53, 96.36, -7.7, 4.18)
pt3dadd(101.6, 96.32, -7.7, 4.18)
pt3dadd(101.63, 96.28, -7.7, 4.18)
pt3dadd(101.67, 96.25, -7.7, 4.18)
pt3dadd(101.74, 96.13, -7.7, 4.18)
pt3dadd(101.77, 96.05, -7.7, 4.18)
pt3dadd(101.81, 96.01, -7.7, 4.18)
pt3dadd(101.84, 95.97, -7.7, 4.18)
pt3dadd(101.88, 95.89, -7.7, 4.18)
pt3dadd(101.98, 95.77, -7.7, 4.18)
pt3dadd(102.01, 95.73, -7.7, 4.18)
pt3dadd(102.08, 95.61, -7.7, 4.18)
pt3dadd(102.12, 95.53, -7.7, 4.18)
pt3dadd(102.15, 95.45, -7.7, 4.18)
pt3dadd(102.19, 95.41, -7.7, 4.18)
pt3dadd(102.26, 95.29, -7.7, 4.18)
pt3dadd(102.33, 95.25, -7.7, 4.18)
pt3dadd(102.36, 95.14, -7.7, 4.18)
pt3dadd(102.36, 95.06, -7.7, 4.18)
pt3dadd(102.4, 94.94, -7.7, 4.18)
pt3dadd(102.46, 94.86, -7.7, 4.18)
pt3dadd(102.5, 94.74, -7.7, 4.18)
pt3dadd(102.57, 94.62, -7.7, 4.18)
pt3dadd(102.57, 94.46, -7.7, 4.18)
pt3dadd(102.61, 94.39, -7.7, 4.18)
pt3dadd(102.64, 94.26, -7.7, 4.18)
pt3dadd(102.68, 94.15, -7.7, 4.18)
pt3dadd(102.71, 94.07, -7.7, 4.18)
pt3dadd(102.71, 93.99, -7.7, 4.18)
pt3dadd(102.75, 93.91, -7.7, 4.18)
pt3dadd(102.75, 93.36, -7.7, 4.18)
pt3dadd(102.78, 93.24, -7.7, 4.18)
pt3dadd(102.78, 92.17, -7.7, 4.18)
pt3dadd(102.82, 92.05, -7.7, 4.18)
pt3dadd(102.82, 91.81, -7.7, 4.18)
pt3dadd(102.85, 91.77, -7.7, 4.18)
pt3dadd(102.85, 91.61, -7.7, 4.18)
pt3dadd(102.92, 91.5, -7.7, 4.18)
pt3dadd(102.96, 91.42, -7.7, 4.18)
pt3dadd(102.99, 91.34, -7.7, 4.18)
pt3dadd(102.99, 91.26, -7.7, 4.18)
pt3dadd(103.02, 91.22, -7.7, 4.18)
pt3dadd(103.06, 91.14, -7.7, 4.18)
pt3dadd(103.09, 91.1, -7.7, 4.18)
pt3dadd(103.13, 91.06, -7.7, 4.18)
pt3dadd(103.16, 90.98, -7.7, 4.18)
pt3dadd(103.2, 90.9, -7.7, 4.18)
pt3dadd(103.23, 90.82, -7.7, 4.18)
pt3dadd(103.23, 90.71, -7.7, 4.18)
pt3dadd(103.27, 90.67, -7.7, 4.18)
pt3dadd(103.3, 90.58, -7.7, 4.18)
pt3dadd(103.3, 90.54, -7.7, 4.18)
pt3dadd(103.3, 90.39, -9.7, 3.76)
pt3dadd(103.3, 90.19, -9.7, 3.76)
pt3dadd(103.34, 90.07, -9.7, 3.76)
pt3dadd(103.37, 89.99, -9.7, 3.76)
pt3dadd(103.41, 89.83, -9.7, 3.76)
pt3dadd(103.44, 89.71, -9.7, 3.76)
pt3dadd(103.44, 88.61, -9.7, 3.76)
pt3dadd(103.48, 88.49, -9.7, 3.76)
pt3dadd(103.48, 88.41, -9.7, 3.76)
pt3dadd(103.51, 88.33, -9.7, 3.76)
pt3dadd(103.54, 88.13, -9.7, 3.76)
pt3dadd(103.61, 88.05, -9.7, 3.76)
pt3dadd(103.61, 87.93, -9.7, 3.76)
pt3dadd(103.68, 87.82, -9.7, 3.76)
pt3dadd(103.75, 87.7, -9.7, 3.76)
pt3dadd(103.82, 87.58, -9.7, 3.76)
pt3dadd(103.86, 87.46, -9.7, 3.76)
pt3dadd(103.93, 87.38, -9.7, 3.76)
pt3dadd(103.96, 87.3, -9.7, 3.76)
pt3dadd(103.96, 87.22, -9.7, 3.76)
pt3dadd(104, 87.14, -9.7, 3.76)
pt3dadd(104.04, 87.07, -9.7, 3.76)
pt3dadd(104.04, 86.94, -9.7, 3.76)
pt3dadd(104.07, 86.86, -9.7, 3.76)
pt3dadd(104.1, 86.79, -9.7, 3.76)
pt3dadd(104.1, 86.31, -9.7, 3.76)
pt3dadd(104.14, 86.27, -9.7, 3.76)
pt3dadd(104.17, 86.19, -9.7, 3.76)
pt3dadd(104.21, 86.11, -9.7, 3.76)
pt3dadd(104.21, 85.92, -9.7, 3.76)
pt3dadd(104.24, 85.88, -9.7, 3.76)
pt3dadd(104.24, 85.72, -9.7, 3.76)
pt3dadd(104.28, 85.68, -9.7, 3.76)
pt3dadd(104.31, 85.64, -9.7, 3.76)
pt3dadd(104.31, 85.52, -9.7, 3.76)
pt3dadd(104.35, 85.48, -9.7, 3.76)
pt3dadd(104.38, 85.44, -9.7, 3.76)
pt3dadd(104.38, 85.36, -9.7, 3.76)
pt3dadd(104.42, 85.32, -9.7, 3.76)
pt3dadd(104.45, 85.21, -9.7, 3.76)
pt3dadd(104.49, 85.13, -9.7, 3.76)
pt3dadd(104.52, 85.01, -9.7, 3.76)
pt3dadd(104.59, 84.93, -9.7, 3.76)
pt3dadd(104.59, 84.85, -9.7, 3.76)
pt3dadd(104.66, 84.77, -9.7, 3.76)
pt3dadd(104.69, 84.65, -9.7, 3.76)
pt3dadd(104.73, 84.57, -9.7, 3.76)
pt3dadd(104.76, 84.49, -9.7, 3.76)
pt3dadd(104.83, 84.37, -9.7, 3.76)
pt3dadd(104.87, 84.29, -9.7, 3.76)
pt3dadd(104.9, 84.21, -9.7, 3.76)
pt3dadd(104.94, 84.18, -9.7, 3.76)
pt3dadd(104.97, 84.1, -9.7, 3.76)
pt3dadd(105.01, 83.98, -9.7, 3.76)
pt3dadd(105.04, 83.9, -9.7, 3.76)
pt3dadd(105.08, 83.78, -9.7, 3.76)
pt3dadd(105.22, 83.62, -9.7, 3.76)
pt3dadd(105.25, 83.54, -9.7, 3.76)
pt3dadd(105.29, 83.46, -9.7, 3.76)
pt3dadd(105.29, 83.39, -9.7, 3.76)
pt3dadd(105.32, 83.31, -9.7, 3.76)
}
}
proc shape3d_191() {
dend[124] { pt3dadd(105.36, 83.22, -9.7, 3.76)
pt3dadd(105.39, 83.15, -9.7, 3.76)
pt3dadd(105.43, 83.07, -9.7, 3.76)
pt3dadd(105.46, 82.99, -9.7, 3.76)
pt3dadd(105.46, 82.87, -9.7, 3.76)
pt3dadd(105.5, 82.83, -9.7, 3.76)
pt3dadd(105.53, 82.75, -9.7, 3.76)
pt3dadd(105.57, 82.63, -9.7, 3.76)
pt3dadd(105.57, 82.47, -9.7, 3.76)
pt3dadd(105.6, 82.39, -11.7, 3.76)
pt3dadd(105.6, 82.32, -11.7, 3.76)
pt3dadd(105.64, 82.2, -11.7, 3.76)
pt3dadd(105.67, 82.08, -11.7, 3.76)
pt3dadd(105.71, 82, -11.7, 3.76)
pt3dadd(105.74, 81.88, -11.7, 3.76)
pt3dadd(105.78, 81.76, -11.7, 3.76)
pt3dadd(105.78, 81.49, -11.7, 3.76)
pt3dadd(105.81, 81.4, -11.7, 3.76)
pt3dadd(105.81, 81.25, -11.7, 3.76)
pt3dadd(105.85, 81.17, -11.7, 3.76)
pt3dadd(105.85, 81.01, -11.7, 3.76)
pt3dadd(105.88, 80.93, -11.7, 3.76)
pt3dadd(105.92, 80.89, -11.7, 3.76)
pt3dadd(105.92, 80.77, -11.7, 3.76)
pt3dadd(105.95, 80.69, -11.7, 3.76)
pt3dadd(105.99, 80.57, -11.7, 3.76)
pt3dadd(105.99, 80.46, -11.7, 3.76)
pt3dadd(106.02, 80.38, -11.7, 3.76)
pt3dadd(106.02, 80.26, -11.7, 3.76)
pt3dadd(106.06, 80.18, -11.7, 3.76)
pt3dadd(106.09, 80.1, -11.7, 3.76)
pt3dadd(106.13, 80.02, -11.7, 3.76)
pt3dadd(106.19, 79.82, -11.7, 3.76)
pt3dadd(106.23, 79.74, -11.7, 3.76)
pt3dadd(106.26, 79.67, -11.7, 3.76)
pt3dadd(106.3, 79.58, -11.7, 3.76)
pt3dadd(106.33, 79.54, -11.7, 3.76)
pt3dadd(106.37, 79.47, -11.7, 3.76)
pt3dadd(106.37, 79.39, -11.7, 3.76)
pt3dadd(106.4, 79.31, -11.7, 3.76)
pt3dadd(106.47, 79.23, -11.7, 3.76)
pt3dadd(106.51, 79.15, -11.7, 3.76)
pt3dadd(106.51, 79.07, -11.7, 3.76)
pt3dadd(106.54, 78.99, -11.7, 3.76)
pt3dadd(106.58, 78.91, -11.7, 3.76)
pt3dadd(106.61, 78.83, -11.7, 3.76)
pt3dadd(106.61, 78.64, -11.7, 3.76)
}
dend[125] {pt3dclear()
pt3dadd(77.14, 97.85, -2.7, 0.56)
pt3dadd(75.73, 97.21, 0, 0.56)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
shape3d_36()
shape3d_37()
shape3d_38()
shape3d_39()
shape3d_40()
shape3d_41()
shape3d_42()
shape3d_43()
shape3d_44()
shape3d_45()
shape3d_46()
shape3d_47()
shape3d_48()
shape3d_49()
shape3d_50()
shape3d_51()
shape3d_52()
shape3d_53()
shape3d_54()
shape3d_55()
shape3d_56()
shape3d_57()
shape3d_58()
shape3d_59()
shape3d_60()
shape3d_61()
shape3d_62()
shape3d_63()
shape3d_64()
shape3d_65()
shape3d_66()
shape3d_67()
shape3d_68()
shape3d_69()
shape3d_70()
shape3d_71()
shape3d_72()
shape3d_73()
shape3d_74()
shape3d_75()
shape3d_76()
shape3d_77()
shape3d_78()
shape3d_79()
shape3d_80()
shape3d_81()
shape3d_82()
shape3d_83()
shape3d_84()
shape3d_85()
shape3d_86()
shape3d_87()
shape3d_88()
shape3d_89()
shape3d_90()
shape3d_91()
shape3d_92()
shape3d_93()
shape3d_94()
shape3d_95()
shape3d_96()
shape3d_97()
shape3d_98()
shape3d_99()
shape3d_100()
shape3d_101()
shape3d_102()
shape3d_103()
shape3d_104()
shape3d_105()
shape3d_106()
shape3d_107()
shape3d_108()
shape3d_109()
shape3d_110()
shape3d_111()
shape3d_112()
shape3d_113()
shape3d_114()
shape3d_115()
shape3d_116()
shape3d_117()
shape3d_118()
shape3d_119()
shape3d_120()
shape3d_121()
shape3d_122()
shape3d_123()
shape3d_124()
shape3d_125()
shape3d_126()
shape3d_127()
shape3d_128()
shape3d_129()
shape3d_130()
shape3d_131()
shape3d_132()
shape3d_133()
shape3d_134()
shape3d_135()
shape3d_136()
shape3d_137()
shape3d_138()
shape3d_139()
shape3d_140()
shape3d_141()
shape3d_142()
shape3d_143()
shape3d_144()
shape3d_145()
shape3d_146()
shape3d_147()
shape3d_148()
shape3d_149()
shape3d_150()
shape3d_151()
shape3d_152()
shape3d_153()
shape3d_154()
shape3d_155()
shape3d_156()
shape3d_157()
shape3d_158()
shape3d_159()
shape3d_160()
shape3d_161()
shape3d_162()
shape3d_163()
shape3d_164()
shape3d_165()
shape3d_166()
shape3d_167()
shape3d_168()
shape3d_169()
shape3d_170()
shape3d_171()
shape3d_172()
shape3d_173()
shape3d_174()
shape3d_175()
shape3d_176()
shape3d_177()
shape3d_178()
shape3d_179()
shape3d_180()
shape3d_181()
shape3d_182()
shape3d_183()
shape3d_184()
shape3d_185()
shape3d_186()
shape3d_187()
shape3d_188()
shape3d_189()
shape3d_190()
shape3d_191()
}
objref all, Soma, Dendrites, Axon
proc subsets() { local i
objref all, Soma, Dendrites, Axon
all = new SectionList()
soma all.append()
for i=0, 125 dend[i] all.append()
Soma = new SectionList()
soma Soma.append()
Dendrites = new SectionList()
for i=0, 125 dend[i] Dendrites.append()
Axon = new SectionList()
dend[47] Axon.append()
}
proc geom() {
forsec all { }
}
proc geom_nseg() {
forsec all { nseg = int((L/(0.1*lambda_f(100))+.9)/2)*2 + 1 }
}
proc biophys() {
forsec all {
cm = 0.9
insert pas
insert naf
insert kdr
g_pas = 0.001
e_pas = -70
}
forsec Dendrites {
gnabar_naf = 0.125
gkbar_kdr = 0.036
Ra = 250
}
forsec Soma {
Ra = 250
gnabar_naf = 187.5
gkbar_kdr = 0.018
}
forsec Axon {
Ra = 100
gnabar_naf = 400
gkbar_kdr = 0.036
}
}
access soma
/***********************************
tau_m function table for kaf ******/
objref kaf_taum, kaf_vtau, file
kaf_vtau = new Vector(11,0)
kaf_taum = new Vector(11,0)
file = new File()
file.ropen("./kaf_vtau.dat")
kaf_vtau.scanf(file)
file.close()
file.ropen("./kaf_taum.dat")
kaf_taum.scanf(file)
file.close()
table_taum_kaf(kaf_taum, kaf_vtau)
/***********************************
tau_h function table for nap ******/
objref nap_tauh, nap_vtau, file
nap_vtau = new Vector(15,0)
nap_tauh = new Vector(15,0)
file = new File()
file.ropen("./nap_vtau.dat")
nap_vtau.scanf(file)
file.close()
file.ropen("./nap_tauh.dat")
nap_tauh.scanf(file)
file.close()
table_tauh_nap(nap_tauh, nap_vtau)
/**********************************/
celldef()
celsius = 38
load_file("./frb_session.ses")