proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend_0[8], dend_7[78], apic[37], dend_5[24]
proc topol() { local i
connect dend_0(0), soma(0.5)
for i = 1, 4 connect dend_0[i](0), dend_0(1)
connect dend_0[5](0), soma(0.5)
for i = 6, 7 connect dend_0[i](0), dend_0[5](1)
connect dend_7(0), dend_0[1](1)
for i = 1, 2 connect dend_7[i](0), dend_7(1)
for i = 3, 4 connect dend_7[i](0), dend_7[2](1)
for i = 5, 6 connect dend_7[i](0), dend_7[4](1)
for i = 7, 8 connect dend_7[i](0), dend_7[6](1)
connect dend_7[9](0), dend_0[2](1)
for i = 10, 12 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[13](0), dend_7[11](1)
for i = 14, 16 connect dend_7[i](0), dend_7[13](1)
for i = 17, 18 connect dend_7[i](0), dend_7[16](1)
connect dend_7[19](0), dend_7[10](1)
for i = 20, 21 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[22](0), dend_7[20](1)
connect dend_7[23](0), dend_7[19](1)
connect dend_7[24](0), dend_7[9](1)
for i = 25, 27 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[28](0), dend_7[26](1)
connect dend_7[29](0), dend_7[25](1)
for i = 30, 31 connect dend_7[i](0), dend_7[29](1)
connect dend_7[32](0), dend_7[24](1)
for i = 33, 35 connect dend_7[i](0), dend_7[32](1)
connect dend_7[36](0), dend_0[3](1)
for i = 37, 39 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[40](0), dend_7[38](1)
connect dend_7[41](0), dend_7[37](1)
connect dend_7[42](0), dend_7[36](1)
for i = 43, 44 connect dend_7[i](0), dend_7[42](1)
for i = 45, 46 connect dend_7[i](0), dend_7[44](1)
for i = 47, 48 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[49](0), dend_7[47](1)
connect dend_7[50](0), dend_7[46](1)
connect dend_7[51](0), dend_0[4](1)
for i = 52, 53 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[54](0), dend_7[52](1)
connect dend_7[55](0), dend_7[51](1)
for i = 56, 57 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[58](0), dend_7[56](1)
for i = 59, 60 connect dend_7[i](0), dend_7[58](1)
connect dend_7[61](0), dend_7[55](1)
for i = 62, 64 connect dend_7[i](0), dend_7[61](1)
for i = 65, 66 connect dend_7[i](0), dend_7[64](1)
connect dend_7[67](0), dend_0[7](1)
for i = 68, 71 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[72](0), dend_7[70](1)
connect dend_7[73](0), dend_7[69](1)
connect dend_7[74](0), dend_7[68](1)
connect dend_7[75](0), dend_7[67](1)
for i = 76, 77 connect dend_7[i](0), dend_7[75](1)
connect apic(0), dend_0[6](1)
for i = 1, 5 connect apic[i](0), apic[i-1](1)
connect apic[6](0), apic[4](1)
connect apic[7](0), apic[3](1)
connect apic[8](0), apic[2](1)
for i = 9, 10 connect apic[i](0), apic[8](1)
connect apic[11](0), apic[1](1)
for i = 12, 13 connect apic[i](0), apic[11](1)
for i = 14, 15 connect apic[i](0), apic[13](1)
for i = 16, 18 connect apic[i](0), apic[i-1](1)
connect apic[19](0), apic[17](1)
for i = 20, 21 connect apic[i](0), apic[19](1)
connect apic[22](0), apic[16](1)
connect apic[23](0), apic[15](1)
connect apic[24](0), apic(1)
for i = 25, 26 connect apic[i](0), apic[24](1)
connect apic[27](0), apic[25](1)
connect apic[28](0), apic[24](1)
for i = 29, 30 connect apic[i](0), apic[i-1](1)
connect apic[31](0), apic[29](1)
connect apic[32](0), apic[28](1)
for i = 33, 34 connect apic[i](0), apic[i-1](1)
connect apic[35](0), apic[33](1)
connect apic[36](0), apic[32](1)
connect dend_5(0), apic[20](1)
for i = 1, 3 connect dend_5[i](0), dend_5[i-1](1)
connect dend_5[4](0), dend_5[2](1)
connect dend_5[5](0), dend_5[1](1)
connect dend_5[6](0), dend_5(1)
for i = 7, 8 connect dend_5[i](0), dend_5[6](1)
for i = 9, 10 connect dend_5[i](0), dend_5[8](1)
connect dend_5[11](0), apic[21](1)
for i = 12, 15 connect dend_5[i](0), dend_5[i-1](1)
connect dend_5[16](0), dend_5[14](1)
for i = 17, 18 connect dend_5[i](0), dend_5[16](1)
connect dend_5[19](0), dend_5[13](1)
connect dend_5[20](0), dend_5[12](1)
for i = 21, 22 connect dend_5[i](0), dend_5[20](1)
connect dend_5[23](0), dend_5[11](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(119.503, 92.601, 6.623, 13.184)
pt3dadd(126.095, 92.601, 6.623, 13.184)
pt3dadd(132.687, 92.601, 6.623, 13.184)
}
dend_0 {pt3dclear()
pt3dstyle(1, 126.095, 92.601, 6.623)
pt3dadd(126.212, 92.58, 6.624, 13.18)
pt3dadd(126.331, 92.558, 6.624, 13.172)
pt3dadd(126.449, 92.538, 6.625, 13.156)
pt3dadd(126.568, 92.517, 6.625, 13.138)
pt3dadd(126.685, 92.496, 6.626, 13.122)
pt3dadd(126.776, 92.48, 6.626, 13.108)
}
dend_0[1] {pt3dclear()
pt3dadd(126.776, 92.48, 6.626, 13.108)
pt3dadd(126.776, 92.441, 6.659, 13.096)
pt3dadd(126.776, 92.356, 6.729, 13.068)
pt3dadd(126.776, 92.271, 6.8, 13.042)
pt3dadd(126.776, 92.187, 6.871, 13.014)
pt3dadd(126.776, 92.102, 6.942, 12.986)
pt3dadd(126.776, 92.017, 7.012, 12.96)
pt3dadd(126.776, 91.932, 7.083, 12.932)
pt3dadd(126.776, 91.847, 7.154, 12.902)
pt3dadd(126.775, 91.762, 7.224, 12.87)
pt3dadd(126.775, 91.677, 7.294, 12.838)
pt3dadd(126.774, 91.591, 7.365, 12.806)
pt3dadd(126.774, 91.506, 7.435, 12.774)
pt3dadd(126.773, 91.421, 7.505, 12.742)
pt3dadd(126.773, 91.336, 7.576, 12.71)
pt3dadd(126.772, 91.251, 7.646, 12.68)
pt3dadd(126.772, 91.165, 7.717, 12.648)
pt3dadd(126.77, 91.08, 7.787, 12.616)
pt3dadd(126.758, 90.988, 7.85, 12.48)
pt3dadd(126.737, 90.892, 7.906, 12.272)
pt3dadd(126.715, 90.795, 7.963, 12.062)
pt3dadd(126.695, 90.698, 8.019, 11.854)
pt3dadd(126.673, 90.602, 8.076, 11.644)
pt3dadd(126.652, 90.505, 8.132, 11.436)
pt3dadd(126.631, 90.408, 8.189, 11.226)
pt3dadd(126.61, 90.312, 8.246, 11.018)
pt3dadd(126.588, 90.215, 8.302, 10.808)
pt3dadd(126.566, 90.118, 8.359, 10.6)
pt3dadd(126.54, 90.02, 8.411, 10.39)
pt3dadd(126.508, 89.92, 8.46, 10.182)
pt3dadd(126.476, 89.82, 8.509, 9.974)
pt3dadd(126.444, 89.721, 8.557, 9.766)
pt3dadd(126.413, 89.621, 8.606, 9.558)
pt3dadd(126.38, 89.521, 8.655, 9.35)
pt3dadd(126.349, 89.421, 8.704, 9.142)
pt3dadd(126.317, 89.322, 8.753, 8.932)
pt3dadd(126.286, 89.222, 8.802, 8.724)
pt3dadd(126.253, 89.122, 8.85, 8.516)
pt3dadd(126.214, 89.02, 8.892, 8.31)
pt3dadd(126.172, 88.918, 8.93, 8.106)
pt3dadd(126.128, 88.816, 8.968, 7.902)
pt3dadd(126.085, 88.714, 9.006, 7.698)
pt3dadd(126.042, 88.611, 9.044, 7.492)
pt3dadd(125.999, 88.509, 9.082, 7.288)
pt3dadd(125.956, 88.407, 9.12, 7.084)
pt3dadd(125.912, 88.305, 9.158, 6.88)
pt3dadd(125.869, 88.202, 9.196, 6.674)
}
dend_7 {pt3dclear()
pt3dadd(125.869, 88.202, 9.196, 6.674)
pt3dadd(125.826, 88.1, 9.234, 6.47)
pt3dadd(125.795, 87.997, 9.279, 6.258)
pt3dadd(125.77, 87.895, 9.325, 6.044)
pt3dadd(125.743, 87.792, 9.372, 5.83)
pt3dadd(125.717, 87.689, 9.418, 5.616)
pt3dadd(125.69, 87.586, 9.465, 5.402)
pt3dadd(125.664, 87.483, 9.512, 5.186)
pt3dadd(125.638, 87.38, 9.558, 4.972)
pt3dadd(125.611, 87.277, 9.605, 4.758)
pt3dadd(125.585, 87.175, 9.652, 4.544)
pt3dadd(125.558, 87.072, 9.698, 4.33)
pt3dadd(125.539, 86.963, 9.736, 4.134)
pt3dadd(125.521, 86.851, 9.77, 3.944)
pt3dadd(125.504, 86.74, 9.804, 3.756)
pt3dadd(125.488, 86.628, 9.838, 3.566)
pt3dadd(125.47, 86.517, 9.872, 3.378)
pt3dadd(125.453, 86.405, 9.906, 3.188)
pt3dadd(125.436, 86.293, 9.939, 3)
pt3dadd(125.418, 86.182, 9.974, 2.81)
pt3dadd(125.401, 86.07, 10.007, 2.62)
pt3dadd(125.384, 85.959, 10.041, 2.432)
pt3dadd(125.372, 85.844, 10.07, 2.316)
pt3dadd(125.364, 85.729, 10.097, 2.226)
pt3dadd(125.354, 85.614, 10.123, 2.134)
pt3dadd(125.345, 85.499, 10.15, 2.044)
pt3dadd(125.336, 85.383, 10.177, 1.952)
pt3dadd(125.327, 85.268, 10.204, 1.862)
pt3dadd(125.318, 85.153, 10.231, 1.772)
pt3dadd(125.309, 85.038, 10.257, 1.68)
pt3dadd(125.299, 84.922, 10.284, 1.59)
pt3dadd(125.291, 84.807, 10.311, 1.498)
pt3dadd(125.284, 84.692, 10.34, 1.464)
pt3dadd(125.276, 84.578, 10.369, 1.444)
pt3dadd(125.269, 84.463, 10.398, 1.426)
pt3dadd(125.262, 84.349, 10.428, 1.408)
pt3dadd(125.256, 84.234, 10.457, 1.39)
pt3dadd(125.249, 84.12, 10.487, 1.37)
pt3dadd(125.242, 84.006, 10.516, 1.352)
pt3dadd(125.236, 83.891, 10.545, 1.334)
pt3dadd(125.228, 83.777, 10.575, 1.316)
pt3dadd(125.221, 83.662, 10.604, 1.298)
pt3dadd(125.21, 83.551, 10.641, 1.28)
pt3dadd(125.2, 83.441, 10.681, 1.264)
pt3dadd(125.188, 83.331, 10.719, 1.248)
pt3dadd(125.177, 83.222, 10.759, 1.232)
pt3dadd(125.165, 83.112, 10.798, 1.214)
pt3dadd(125.154, 83.002, 10.837, 1.198)
pt3dadd(125.142, 82.892, 10.876, 1.182)
pt3dadd(125.131, 82.782, 10.915, 1.166)
pt3dadd(125.119, 82.672, 10.954, 1.15)
pt3dadd(125.108, 82.562, 10.993, 1.134)
pt3dadd(125.09, 82.45, 11.025, 1.13)
pt3dadd(125.07, 82.338, 11.056, 1.13)
pt3dadd(125.051, 82.225, 11.087, 1.13)
pt3dadd(125.03, 82.113, 11.117, 1.13)
pt3dadd(125.011, 82, 11.148, 1.13)
pt3dadd(124.991, 81.888, 11.179, 1.13)
pt3dadd(124.972, 81.775, 11.209, 1.13)
pt3dadd(124.951, 81.663, 11.24, 1.13)
pt3dadd(124.932, 81.55, 11.271, 1.13)
pt3dadd(124.912, 81.438, 11.301, 1.13)
pt3dadd(124.866, 81.332, 11.325, 1.13)
pt3dadd(124.814, 81.227, 11.348, 1.13)
pt3dadd(124.762, 81.122, 11.37, 1.13)
pt3dadd(124.71, 81.018, 11.393, 1.13)
pt3dadd(124.658, 80.913, 11.415, 1.13)
pt3dadd(124.606, 80.808, 11.438, 1.13)
pt3dadd(124.554, 80.703, 11.46, 1.13)
pt3dadd(124.501, 80.599, 11.482, 1.13)
pt3dadd(124.45, 80.494, 11.505, 1.13)
pt3dadd(124.398, 80.389, 11.527, 1.13)
pt3dadd(124.343, 80.289, 11.557, 1.13)
pt3dadd(124.286, 80.189, 11.587, 1.13)
pt3dadd(124.231, 80.089, 11.618, 1.13)
pt3dadd(124.175, 79.989, 11.648, 1.13)
pt3dadd(124.12, 79.89, 11.679, 1.13)
pt3dadd(124.064, 79.79, 11.709, 1.13)
pt3dadd(124.008, 79.69, 11.74, 1.13)
pt3dadd(123.953, 79.59, 11.77, 1.13)
pt3dadd(123.898, 79.49, 11.8, 1.13)
pt3dadd(123.841, 79.39, 11.831, 1.13)
pt3dadd(123.78, 79.296, 11.865, 1.116)
pt3dadd(123.716, 79.202, 11.899, 1.1)
pt3dadd(123.654, 79.109, 11.933, 1.086)
pt3dadd(123.592, 79.015, 11.967, 1.07)
pt3dadd(123.528, 78.921, 12.001, 1.054)
pt3dadd(123.466, 78.827, 12.035, 1.04)
pt3dadd(123.403, 78.734, 12.069, 1.024)
pt3dadd(123.341, 78.64, 12.103, 1.008)
pt3dadd(123.277, 78.546, 12.137, 0.994)
pt3dadd(123.215, 78.452, 12.171, 0.978)
pt3dadd(123.133, 78.37, 12.195, 0.926)
pt3dadd(123.05, 78.287, 12.219, 0.872)
pt3dadd(122.969, 78.204, 12.243, 0.82)
pt3dadd(122.886, 78.122, 12.267, 0.768)
pt3dadd(122.804, 78.039, 12.292, 0.714)
pt3dadd(122.723, 77.956, 12.316, 0.662)
pt3dadd(122.64, 77.874, 12.339, 0.61)
pt3dadd(122.558, 77.791, 12.364, 0.558)
pt3dadd(122.476, 77.708, 12.387, 0.504)
pt3dadd(122.394, 77.626, 12.411, 0.452)
}
dend_7[1] {pt3dclear()
pt3dadd(122.394, 77.626, 12.411, 0.452)
pt3dadd(122.322, 77.597, 12.421, 0.44)
pt3dadd(122.213, 77.553, 12.436, 0.42)
pt3dadd(122.102, 77.509, 12.451, 0.4)
pt3dadd(121.992, 77.465, 12.466, 0.38)
pt3dadd(121.879, 77.428, 12.48, 0.364)
pt3dadd(121.765, 77.392, 12.493, 0.348)
pt3dadd(121.652, 77.356, 12.507, 0.332)
pt3dadd(121.54, 77.32, 12.52, 0.318)
pt3dadd(121.426, 77.283, 12.534, 0.302)
pt3dadd(121.313, 77.247, 12.547, 0.288)
pt3dadd(121.199, 77.211, 12.561, 0.272)
pt3dadd(121.086, 77.174, 12.574, 0.256)
pt3dadd(120.973, 77.138, 12.588, 0.242)
pt3dadd(120.859, 77.102, 12.601, 0.226)
pt3dadd(120.74, 77.092, 12.61, 0.226)
pt3dadd(120.622, 77.081, 12.618, 0.226)
pt3dadd(120.503, 77.071, 12.627, 0.226)
pt3dadd(120.383, 77.06, 12.635, 0.226)
pt3dadd(120.264, 77.05, 12.644, 0.226)
pt3dadd(120.145, 77.04, 12.652, 0.226)
pt3dadd(120.026, 77.029, 12.661, 0.226)
pt3dadd(119.907, 77.019, 12.67, 0.226)
pt3dadd(119.788, 77.008, 12.678, 0.226)
pt3dadd(119.669, 76.998, 12.687, 0.226)
pt3dadd(119.55, 77.002, 12.701, 0.226)
pt3dadd(119.431, 77.006, 12.715, 0.226)
pt3dadd(119.312, 77.01, 12.729, 0.226)
pt3dadd(119.194, 77.014, 12.743, 0.226)
pt3dadd(119.075, 77.018, 12.757, 0.226)
pt3dadd(118.956, 77.022, 12.771, 0.226)
pt3dadd(118.837, 77.026, 12.786, 0.226)
pt3dadd(118.719, 77.03, 12.8, 0.226)
pt3dadd(118.6, 77.034, 12.814, 0.226)
pt3dadd(118.481, 77.038, 12.829, 0.226)
pt3dadd(118.372, 77.047, 12.87, 0.226)
pt3dadd(118.263, 77.055, 12.911, 0.226)
pt3dadd(118.154, 77.064, 12.952, 0.226)
pt3dadd(118.045, 77.073, 12.993, 0.226)
pt3dadd(117.936, 77.082, 13.034, 0.226)
pt3dadd(117.827, 77.091, 13.075, 0.226)
pt3dadd(117.718, 77.099, 13.116, 0.226)
}
}
proc shape3d_2() {
dend_7[1] { pt3dadd(117.609, 77.108, 13.157, 0.226)
pt3dadd(117.5, 77.117, 13.198, 0.226)
pt3dadd(117.391, 77.126, 13.239, 0.226)
pt3dadd(117.281, 77.141, 13.278, 0.226)
pt3dadd(117.172, 77.155, 13.317, 0.226)
pt3dadd(117.062, 77.17, 13.356, 0.226)
pt3dadd(116.952, 77.184, 13.395, 0.226)
pt3dadd(116.843, 77.199, 13.433, 0.226)
pt3dadd(116.733, 77.213, 13.472, 0.226)
pt3dadd(116.624, 77.228, 13.511, 0.226)
pt3dadd(116.514, 77.242, 13.55, 0.226)
pt3dadd(116.404, 77.257, 13.589, 0.226)
pt3dadd(116.295, 77.273, 13.628, 0.23)
pt3dadd(116.195, 77.319, 13.667, 0.286)
pt3dadd(116.095, 77.365, 13.707, 0.342)
pt3dadd(115.994, 77.411, 13.746, 0.4)
pt3dadd(115.894, 77.457, 13.785, 0.456)
pt3dadd(115.794, 77.503, 13.825, 0.512)
pt3dadd(115.693, 77.548, 13.864, 0.57)
pt3dadd(115.593, 77.594, 13.903, 0.626)
pt3dadd(115.493, 77.64, 13.943, 0.682)
pt3dadd(115.392, 77.686, 13.982, 0.74)
pt3dadd(115.295, 77.733, 14.025, 0.786)
pt3dadd(115.205, 77.783, 14.076, 0.808)
pt3dadd(115.114, 77.833, 14.126, 0.832)
pt3dadd(115.024, 77.883, 14.177, 0.854)
pt3dadd(114.933, 77.933, 14.228, 0.878)
pt3dadd(114.843, 77.983, 14.279, 0.9)
pt3dadd(114.752, 78.033, 14.33, 0.924)
pt3dadd(114.662, 78.083, 14.38, 0.946)
pt3dadd(114.571, 78.133, 14.431, 0.97)
pt3dadd(114.481, 78.183, 14.482, 0.992)
pt3dadd(114.39, 78.227, 14.536, 1.002)
pt3dadd(114.301, 78.261, 14.596, 0.992)
pt3dadd(114.211, 78.295, 14.656, 0.982)
pt3dadd(114.121, 78.33, 14.716, 0.972)
pt3dadd(114.031, 78.364, 14.776, 0.962)
pt3dadd(113.942, 78.398, 14.836, 0.952)
pt3dadd(113.852, 78.432, 14.896, 0.94)
pt3dadd(113.762, 78.466, 14.956, 0.93)
pt3dadd(113.672, 78.5, 15.016, 0.92)
pt3dadd(113.583, 78.534, 15.076, 0.91)
pt3dadd(113.493, 78.566, 15.136, 0.904)
pt3dadd(113.403, 78.596, 15.198, 0.902)
pt3dadd(113.313, 78.625, 15.26, 0.9)
pt3dadd(113.223, 78.654, 15.321, 0.898)
pt3dadd(113.134, 78.684, 15.383, 0.896)
pt3dadd(113.044, 78.713, 15.445, 0.894)
pt3dadd(112.954, 78.742, 15.507, 0.892)
pt3dadd(112.864, 78.771, 15.568, 0.89)
pt3dadd(112.774, 78.801, 15.63, 0.888)
pt3dadd(112.685, 78.83, 15.692, 0.886)
pt3dadd(112.592, 78.868, 15.746, 0.878)
pt3dadd(112.497, 78.918, 15.79, 0.862)
pt3dadd(112.401, 78.967, 15.834, 0.846)
pt3dadd(112.305, 79.016, 15.879, 0.828)
pt3dadd(112.21, 79.065, 15.923, 0.812)
pt3dadd(112.114, 79.114, 15.968, 0.796)
pt3dadd(112.019, 79.163, 16.012, 0.78)
pt3dadd(111.923, 79.212, 16.056, 0.764)
pt3dadd(111.828, 79.262, 16.101, 0.746)
pt3dadd(111.732, 79.311, 16.145, 0.73)
pt3dadd(111.637, 79.357, 16.193, 0.714)
pt3dadd(111.543, 79.399, 16.244, 0.696)
pt3dadd(111.449, 79.442, 16.296, 0.68)
pt3dadd(111.356, 79.484, 16.347, 0.664)
pt3dadd(111.262, 79.526, 16.399, 0.646)
pt3dadd(111.168, 79.568, 16.45, 0.63)
pt3dadd(111.074, 79.611, 16.501, 0.614)
pt3dadd(110.98, 79.653, 16.553, 0.596)
pt3dadd(110.886, 79.695, 16.604, 0.58)
pt3dadd(110.793, 79.738, 16.656, 0.562)
pt3dadd(110.701, 79.785, 16.707, 0.568)
pt3dadd(110.613, 79.837, 16.759, 0.6)
pt3dadd(110.525, 79.89, 16.811, 0.632)
pt3dadd(110.437, 79.942, 16.863, 0.662)
pt3dadd(110.349, 79.995, 16.915, 0.694)
pt3dadd(110.261, 80.047, 16.967, 0.726)
pt3dadd(110.173, 80.1, 17.019, 0.758)
pt3dadd(110.085, 80.152, 17.071, 0.788)
pt3dadd(109.997, 80.205, 17.123, 0.82)
pt3dadd(109.909, 80.257, 17.175, 0.852)
pt3dadd(109.825, 80.314, 17.228, 0.904)
pt3dadd(109.743, 80.375, 17.28, 0.97)
pt3dadd(109.661, 80.436, 17.333, 1.036)
pt3dadd(109.579, 80.497, 17.386, 1.104)
pt3dadd(109.498, 80.558, 17.439, 1.17)
pt3dadd(109.416, 80.619, 17.492, 1.236)
pt3dadd(109.334, 80.679, 17.545, 1.302)
pt3dadd(109.253, 80.74, 17.598, 1.37)
pt3dadd(109.171, 80.801, 17.651, 1.436)
pt3dadd(109.089, 80.862, 17.703, 1.502)
pt3dadd(109.004, 80.906, 17.762, 1.512)
pt3dadd(108.916, 80.942, 17.824, 1.494)
pt3dadd(108.829, 80.978, 17.885, 1.474)
pt3dadd(108.741, 81.014, 17.947, 1.456)
pt3dadd(108.654, 81.05, 18.008, 1.438)
pt3dadd(108.566, 81.086, 18.07, 1.42)
pt3dadd(108.479, 81.122, 18.131, 1.402)
pt3dadd(108.391, 81.158, 18.193, 1.384)
pt3dadd(108.304, 81.194, 18.254, 1.366)
pt3dadd(108.216, 81.23, 18.316, 1.346)
pt3dadd(108.125, 81.258, 18.376, 1.33)
pt3dadd(108.031, 81.283, 18.435, 1.312)
pt3dadd(107.938, 81.308, 18.495, 1.296)
pt3dadd(107.844, 81.332, 18.554, 1.278)
pt3dadd(107.751, 81.357, 18.613, 1.262)
pt3dadd(107.658, 81.382, 18.673, 1.246)
pt3dadd(107.564, 81.406, 18.732, 1.228)
pt3dadd(107.471, 81.431, 18.791, 1.212)
pt3dadd(107.378, 81.456, 18.851, 1.194)
pt3dadd(107.284, 81.481, 18.91, 1.178)
pt3dadd(107.185, 81.515, 18.958, 1.16)
pt3dadd(107.084, 81.554, 19.001, 1.144)
pt3dadd(106.983, 81.592, 19.044, 1.128)
pt3dadd(106.882, 81.631, 19.087, 1.11)
pt3dadd(106.781, 81.67, 19.13, 1.094)
pt3dadd(106.679, 81.708, 19.173, 1.078)
pt3dadd(106.578, 81.747, 19.216, 1.06)
pt3dadd(106.477, 81.786, 19.259, 1.044)
pt3dadd(106.376, 81.825, 19.302, 1.028)
pt3dadd(106.274, 81.863, 19.344, 1.01)
pt3dadd(106.169, 81.902, 19.378, 0.998)
pt3dadd(106.062, 81.941, 19.41, 0.988)
pt3dadd(105.955, 81.98, 19.441, 0.978)
pt3dadd(105.848, 82.019, 19.473, 0.968)
pt3dadd(105.741, 82.058, 19.504, 0.958)
pt3dadd(105.634, 82.097, 19.535, 0.948)
pt3dadd(105.527, 82.137, 19.567, 0.936)
pt3dadd(105.42, 82.176, 19.598, 0.926)
pt3dadd(105.312, 82.215, 19.63, 0.916)
pt3dadd(105.205, 82.254, 19.661, 0.906)
pt3dadd(105.094, 82.286, 19.687, 0.902)
pt3dadd(104.982, 82.317, 19.71, 0.9)
pt3dadd(104.869, 82.347, 19.734, 0.898)
pt3dadd(104.757, 82.378, 19.758, 0.896)
pt3dadd(104.644, 82.409, 19.782, 0.894)
pt3dadd(104.532, 82.439, 19.806, 0.89)
pt3dadd(104.42, 82.47, 19.83, 0.888)
pt3dadd(104.307, 82.501, 19.854, 0.886)
pt3dadd(104.195, 82.531, 19.878, 0.884)
pt3dadd(104.082, 82.562, 19.902, 0.882)
pt3dadd(103.973, 82.585, 19.937, 0.866)
pt3dadd(103.864, 82.607, 19.974, 0.85)
pt3dadd(103.755, 82.628, 20.012, 0.832)
pt3dadd(103.645, 82.65, 20.049, 0.814)
pt3dadd(103.536, 82.671, 20.087, 0.796)
pt3dadd(103.427, 82.693, 20.124, 0.78)
pt3dadd(103.318, 82.715, 20.162, 0.762)
pt3dadd(103.209, 82.736, 20.199, 0.744)
pt3dadd(103.1, 82.758, 20.237, 0.726)
pt3dadd(102.991, 82.779, 20.275, 0.708)
pt3dadd(102.878, 82.798, 20.304, 0.716)
pt3dadd(102.764, 82.816, 20.332, 0.73)
pt3dadd(102.65, 82.834, 20.36, 0.742)
pt3dadd(102.536, 82.852, 20.388, 0.756)
pt3dadd(102.422, 82.869, 20.416, 0.768)
pt3dadd(102.308, 82.887, 20.443, 0.78)
pt3dadd(102.195, 82.905, 20.471, 0.794)
pt3dadd(102.081, 82.923, 20.499, 0.806)
pt3dadd(101.967, 82.941, 20.527, 0.82)
pt3dadd(101.853, 82.959, 20.555, 0.832)
pt3dadd(101.742, 82.995, 20.575, 0.812)
pt3dadd(101.631, 83.035, 20.594, 0.786)
pt3dadd(101.52, 83.075, 20.613, 0.76)
pt3dadd(101.409, 83.114, 20.631, 0.732)
pt3dadd(101.298, 83.154, 20.65, 0.706)
pt3dadd(101.187, 83.194, 20.669, 0.68)
pt3dadd(101.076, 83.233, 20.688, 0.654)
pt3dadd(100.965, 83.273, 20.707, 0.626)
pt3dadd(100.854, 83.313, 20.725, 0.6)
pt3dadd(100.743, 83.352, 20.744, 0.574)
pt3dadd(100.635, 83.402, 20.757, 0.57)
pt3dadd(100.527, 83.452, 20.77, 0.568)
pt3dadd(100.419, 83.502, 20.783, 0.566)
pt3dadd(100.311, 83.552, 20.796, 0.564)
pt3dadd(100.203, 83.602, 20.809, 0.562)
pt3dadd(100.095, 83.652, 20.822, 0.56)
pt3dadd(99.987, 83.702, 20.834, 0.56)
pt3dadd(99.879, 83.752, 20.847, 0.558)
pt3dadd(99.771, 83.802, 20.86, 0.556)
pt3dadd(99.663, 83.852, 20.873, 0.554)
pt3dadd(99.553, 83.9, 20.885, 0.634)
pt3dadd(99.444, 83.947, 20.896, 0.716)
pt3dadd(99.335, 83.995, 20.907, 0.8)
pt3dadd(99.225, 84.042, 20.919, 0.884)
pt3dadd(99.116, 84.09, 20.931, 0.966)
pt3dadd(99.007, 84.138, 20.942, 1.05)
pt3dadd(98.898, 84.185, 20.954, 1.134)
pt3dadd(98.788, 84.233, 20.965, 1.216)
pt3dadd(98.679, 84.28, 20.977, 1.3)
pt3dadd(98.57, 84.328, 20.988, 1.384)
pt3dadd(98.469, 84.389, 21.007, 1.402)
pt3dadd(98.368, 84.451, 21.025, 1.422)
pt3dadd(98.268, 84.512, 21.044, 1.44)
pt3dadd(98.167, 84.574, 21.062, 1.458)
pt3dadd(98.067, 84.635, 21.081, 1.476)
pt3dadd(97.966, 84.697, 21.099, 1.494)
pt3dadd(97.865, 84.758, 21.118, 1.512)
pt3dadd(97.765, 84.82, 21.136, 1.53)
}
}
proc shape3d_3() {
dend_7[1] { pt3dadd(97.664, 84.881, 21.155, 1.55)
pt3dadd(97.563, 84.943, 21.173, 1.568)
pt3dadd(97.478, 84.988, 21.232, 1.486)
pt3dadd(97.393, 85.034, 21.291, 1.406)
pt3dadd(97.307, 85.08, 21.35, 1.324)
pt3dadd(97.222, 85.126, 21.409, 1.242)
pt3dadd(97.137, 85.171, 21.468, 1.162)
pt3dadd(97.051, 85.217, 21.528, 1.08)
pt3dadd(96.966, 85.263, 21.587, 0.998)
pt3dadd(96.881, 85.309, 21.646, 0.916)
pt3dadd(96.795, 85.354, 21.705, 0.836)
pt3dadd(96.71, 85.399, 21.764, 0.76)
pt3dadd(96.624, 85.426, 21.83, 0.75)
pt3dadd(96.537, 85.454, 21.896, 0.742)
pt3dadd(96.451, 85.481, 21.961, 0.734)
pt3dadd(96.365, 85.508, 22.027, 0.726)
pt3dadd(96.279, 85.536, 22.092, 0.718)
pt3dadd(96.192, 85.563, 22.158, 0.71)
pt3dadd(96.106, 85.59, 22.224, 0.702)
pt3dadd(96.019, 85.618, 22.289, 0.694)
pt3dadd(95.933, 85.645, 22.355, 0.686)
pt3dadd(95.846, 85.674, 22.419, 0.678)
pt3dadd(95.75, 85.713, 22.469, 0.692)
pt3dadd(95.653, 85.752, 22.519, 0.704)
pt3dadd(95.557, 85.791, 22.569, 0.718)
pt3dadd(95.46, 85.83, 22.619, 0.73)
pt3dadd(95.364, 85.869, 22.669, 0.742)
pt3dadd(95.268, 85.908, 22.719, 0.756)
pt3dadd(95.171, 85.947, 22.769, 0.768)
pt3dadd(95.075, 85.986, 22.819, 0.78)
pt3dadd(94.979, 86.025, 22.868, 0.794)
pt3dadd(94.881, 86.063, 22.916, 0.808)
pt3dadd(94.774, 86.1, 22.95, 0.826)
pt3dadd(94.668, 86.136, 22.985, 0.844)
pt3dadd(94.561, 86.173, 23.02, 0.862)
pt3dadd(94.455, 86.209, 23.054, 0.882)
pt3dadd(94.348, 86.245, 23.089, 0.9)
pt3dadd(94.242, 86.282, 23.124, 0.918)
pt3dadd(94.135, 86.318, 23.159, 0.936)
pt3dadd(94.029, 86.355, 23.193, 0.956)
pt3dadd(93.922, 86.391, 23.228, 0.974)
pt3dadd(93.814, 86.424, 23.261, 0.986)
pt3dadd(93.702, 86.445, 23.291, 0.984)
pt3dadd(93.589, 86.467, 23.321, 0.98)
pt3dadd(93.477, 86.489, 23.351, 0.976)
pt3dadd(93.365, 86.511, 23.382, 0.974)
pt3dadd(93.252, 86.532, 23.412, 0.97)
pt3dadd(93.14, 86.554, 23.442, 0.968)
pt3dadd(93.027, 86.576, 23.472, 0.964)
pt3dadd(92.915, 86.598, 23.502, 0.96)
pt3dadd(92.803, 86.619, 23.532, 0.958)
pt3dadd(92.692, 86.636, 23.567, 0.932)
pt3dadd(92.585, 86.642, 23.612, 0.86)
pt3dadd(92.479, 86.648, 23.658, 0.786)
pt3dadd(92.372, 86.654, 23.703, 0.714)
pt3dadd(92.265, 86.661, 23.748, 0.642)
pt3dadd(92.158, 86.667, 23.794, 0.568)
pt3dadd(92.052, 86.673, 23.839, 0.496)
pt3dadd(91.945, 86.679, 23.884, 0.424)
pt3dadd(91.838, 86.685, 23.93, 0.35)
pt3dadd(91.731, 86.691, 23.975, 0.278)
pt3dadd(91.623, 86.692, 24.018, 0.242)
pt3dadd(91.513, 86.681, 24.057, 0.282)
pt3dadd(91.403, 86.67, 24.095, 0.322)
pt3dadd(91.293, 86.659, 24.134, 0.362)
pt3dadd(91.183, 86.649, 24.173, 0.402)
pt3dadd(91.072, 86.638, 24.211, 0.442)
pt3dadd(90.962, 86.627, 24.25, 0.482)
pt3dadd(90.852, 86.616, 24.288, 0.522)
pt3dadd(90.742, 86.605, 24.327, 0.562)
pt3dadd(90.632, 86.595, 24.365, 0.602)
pt3dadd(90.529, 86.574, 24.41, 0.618)
pt3dadd(90.441, 86.532, 24.47, 0.584)
pt3dadd(90.354, 86.49, 24.529, 0.548)
pt3dadd(90.267, 86.449, 24.588, 0.514)
pt3dadd(90.179, 86.407, 24.647, 0.48)
pt3dadd(90.092, 86.365, 24.706, 0.446)
pt3dadd(90.005, 86.323, 24.765, 0.41)
pt3dadd(89.917, 86.282, 24.824, 0.376)
pt3dadd(89.83, 86.24, 24.883, 0.342)
pt3dadd(89.743, 86.198, 24.942, 0.308)
pt3dadd(89.646, 86.165, 24.993, 0.302)
pt3dadd(89.538, 86.142, 25.031, 0.338)
pt3dadd(89.43, 86.12, 25.07, 0.372)
pt3dadd(89.322, 86.097, 25.109, 0.408)
pt3dadd(89.213, 86.075, 25.148, 0.442)
pt3dadd(89.105, 86.052, 25.187, 0.478)
pt3dadd(88.997, 86.029, 25.226, 0.512)
pt3dadd(88.888, 86.007, 25.264, 0.546)
pt3dadd(88.78, 85.984, 25.303, 0.582)
pt3dadd(88.672, 85.962, 25.342, 0.616)
pt3dadd(88.561, 85.968, 25.372, 0.644)
pt3dadd(88.449, 86.001, 25.394, 0.668)
pt3dadd(88.337, 86.034, 25.416, 0.69)
pt3dadd(88.224, 86.066, 25.438, 0.714)
pt3dadd(88.112, 86.098, 25.461, 0.736)
pt3dadd(87.999, 86.131, 25.483, 0.76)
pt3dadd(87.887, 86.163, 25.505, 0.782)
pt3dadd(87.775, 86.196, 25.527, 0.806)
pt3dadd(87.662, 86.229, 25.549, 0.828)
pt3dadd(87.55, 86.261, 25.571, 0.852)
pt3dadd(87.436, 86.293, 25.59, 0.872)
pt3dadd(87.322, 86.326, 25.605, 0.89)
pt3dadd(87.208, 86.359, 25.621, 0.908)
pt3dadd(87.094, 86.391, 25.636, 0.928)
pt3dadd(86.98, 86.424, 25.652, 0.946)
pt3dadd(86.866, 86.456, 25.668, 0.966)
pt3dadd(86.753, 86.489, 25.683, 0.984)
pt3dadd(86.639, 86.521, 25.699, 1.002)
pt3dadd(86.525, 86.554, 25.714, 1.022)
pt3dadd(86.411, 86.586, 25.73, 1.04)
pt3dadd(86.298, 86.613, 25.755, 1.046)
pt3dadd(86.186, 86.637, 25.786, 1.046)
pt3dadd(86.074, 86.66, 25.816, 1.044)
pt3dadd(85.962, 86.684, 25.846, 1.042)
pt3dadd(85.85, 86.707, 25.877, 1.042)
pt3dadd(85.739, 86.731, 25.907, 1.04)
pt3dadd(85.627, 86.755, 25.937, 1.04)
pt3dadd(85.515, 86.778, 25.968, 1.038)
pt3dadd(85.403, 86.802, 25.998, 1.036)
pt3dadd(85.291, 86.825, 26.028, 1.036)
pt3dadd(85.182, 86.843, 26.067, 1.026)
pt3dadd(85.074, 86.859, 26.108, 1.012)
pt3dadd(84.966, 86.875, 26.149, 0.998)
pt3dadd(84.857, 86.891, 26.19, 0.986)
pt3dadd(84.749, 86.907, 26.232, 0.972)
pt3dadd(84.641, 86.923, 26.273, 0.96)
pt3dadd(84.533, 86.939, 26.314, 0.946)
pt3dadd(84.425, 86.955, 26.355, 0.934)
pt3dadd(84.316, 86.971, 26.396, 0.92)
pt3dadd(84.208, 86.987, 26.437, 0.906)
pt3dadd(84.097, 87, 26.474, 0.904)
pt3dadd(83.986, 87.012, 26.51, 0.904)
pt3dadd(83.875, 87.025, 26.545, 0.904)
pt3dadd(83.763, 87.037, 26.581, 0.904)
pt3dadd(83.652, 87.049, 26.617, 0.904)
pt3dadd(83.54, 87.062, 26.652, 0.904)
pt3dadd(83.429, 87.074, 26.688, 0.904)
pt3dadd(83.317, 87.086, 26.723, 0.904)
pt3dadd(83.206, 87.099, 26.759, 0.904)
pt3dadd(83.094, 87.111, 26.795, 0.904)
pt3dadd(82.989, 87.131, 26.839, 0.918)
pt3dadd(82.886, 87.153, 26.887, 0.934)
pt3dadd(82.783, 87.176, 26.935, 0.95)
pt3dadd(82.68, 87.198, 26.983, 0.968)
pt3dadd(82.577, 87.22, 27.031, 0.984)
pt3dadd(82.474, 87.242, 27.078, 1.002)
pt3dadd(82.371, 87.264, 27.126, 1.018)
pt3dadd(82.268, 87.287, 27.174, 1.036)
pt3dadd(82.165, 87.309, 27.222, 1.052)
pt3dadd(82.062, 87.331, 27.27, 1.068)
pt3dadd(81.96, 87.373, 27.308, 1.068)
pt3dadd(81.858, 87.421, 27.343, 1.062)
pt3dadd(81.757, 87.469, 27.378, 1.058)
pt3dadd(81.655, 87.516, 27.414, 1.052)
pt3dadd(81.554, 87.564, 27.449, 1.046)
pt3dadd(81.452, 87.612, 27.484, 1.04)
pt3dadd(81.35, 87.66, 27.52, 1.034)
pt3dadd(81.249, 87.708, 27.555, 1.028)
pt3dadd(81.147, 87.755, 27.59, 1.024)
pt3dadd(81.046, 87.803, 27.626, 1.018)
pt3dadd(80.949, 87.867, 27.652, 1.012)
pt3dadd(80.854, 87.933, 27.677, 1.006)
pt3dadd(80.758, 87.998, 27.702, 1)
pt3dadd(80.662, 88.064, 27.728, 0.994)
pt3dadd(80.566, 88.129, 27.753, 0.988)
pt3dadd(80.471, 88.195, 27.779, 0.982)
pt3dadd(80.375, 88.261, 27.804, 0.976)
pt3dadd(80.279, 88.326, 27.829, 0.97)
pt3dadd(80.183, 88.392, 27.855, 0.964)
pt3dadd(80.087, 88.457, 27.88, 0.958)
pt3dadd(79.998, 88.533, 27.9, 0.974)
pt3dadd(79.908, 88.61, 27.919, 0.99)
pt3dadd(79.819, 88.686, 27.939, 1.006)
pt3dadd(79.73, 88.763, 27.958, 1.022)
pt3dadd(79.64, 88.84, 27.978, 1.038)
pt3dadd(79.551, 88.916, 27.998, 1.054)
pt3dadd(79.461, 88.993, 28.017, 1.072)
pt3dadd(79.372, 89.069, 28.036, 1.088)
pt3dadd(79.283, 89.146, 28.056, 1.104)
pt3dadd(79.193, 89.222, 28.076, 1.12)
pt3dadd(79.114, 89.297, 28.118, 1.044)
pt3dadd(79.035, 89.371, 28.161, 0.966)
pt3dadd(78.957, 89.445, 28.204, 0.888)
pt3dadd(78.878, 89.52, 28.247, 0.81)
pt3dadd(78.799, 89.594, 28.29, 0.732)
pt3dadd(78.72, 89.668, 28.333, 0.654)
pt3dadd(78.642, 89.743, 28.377, 0.574)
pt3dadd(78.563, 89.817, 28.42, 0.496)
pt3dadd(78.484, 89.891, 28.463, 0.418)
pt3dadd(78.405, 89.965, 28.506, 0.34)
pt3dadd(78.32, 90.043, 28.534, 0.328)
pt3dadd(78.235, 90.12, 28.562, 0.316)
pt3dadd(78.15, 90.198, 28.59, 0.306)
pt3dadd(78.064, 90.275, 28.618, 0.294)
pt3dadd(77.979, 90.352, 28.647, 0.282)
pt3dadd(77.894, 90.43, 28.675, 0.272)
pt3dadd(77.808, 90.507, 28.703, 0.26)
pt3dadd(77.723, 90.584, 28.731, 0.248)
pt3dadd(77.638, 90.662, 28.759, 0.238)
}
}
proc shape3d_4() {
dend_7[1] { pt3dadd(77.552, 90.739, 28.787, 0.226)
pt3dadd(77.463, 90.817, 28.804, 0.26)
pt3dadd(77.374, 90.895, 28.82, 0.292)
pt3dadd(77.285, 90.973, 28.837, 0.326)
pt3dadd(77.196, 91.05, 28.854, 0.36)
pt3dadd(77.107, 91.128, 28.871, 0.392)
pt3dadd(77.018, 91.206, 28.888, 0.426)
pt3dadd(76.929, 91.284, 28.905, 0.458)
pt3dadd(76.839, 91.362, 28.921, 0.492)
pt3dadd(76.75, 91.439, 28.938, 0.524)
pt3dadd(76.661, 91.517, 28.955, 0.558)
pt3dadd(76.566, 91.589, 28.965, 0.598)
pt3dadd(76.47, 91.661, 28.976, 0.64)
pt3dadd(76.375, 91.733, 28.987, 0.68)
pt3dadd(76.28, 91.804, 28.997, 0.72)
pt3dadd(76.185, 91.876, 29.008, 0.76)
pt3dadd(76.089, 91.948, 29.018, 0.802)
pt3dadd(75.994, 92.02, 29.029, 0.842)
pt3dadd(75.899, 92.092, 29.04, 0.882)
pt3dadd(75.804, 92.164, 29.05, 0.924)
pt3dadd(75.708, 92.235, 29.061, 0.962)
pt3dadd(75.603, 92.293, 29.068, 0.976)
pt3dadd(75.499, 92.352, 29.075, 0.99)
pt3dadd(75.395, 92.411, 29.082, 1.002)
pt3dadd(75.291, 92.47, 29.089, 1.016)
pt3dadd(75.186, 92.528, 29.096, 1.03)
pt3dadd(75.082, 92.587, 29.103, 1.044)
pt3dadd(74.978, 92.646, 29.11, 1.058)
pt3dadd(74.874, 92.705, 29.117, 1.072)
pt3dadd(74.769, 92.764, 29.124, 1.086)
pt3dadd(74.666, 92.823, 29.131, 1.094)
pt3dadd(74.567, 92.891, 29.142, 1.04)
pt3dadd(74.469, 92.959, 29.153, 0.988)
pt3dadd(74.371, 93.027, 29.164, 0.934)
pt3dadd(74.273, 93.095, 29.175, 0.88)
pt3dadd(74.175, 93.162, 29.186, 0.828)
pt3dadd(74.077, 93.23, 29.198, 0.774)
pt3dadd(73.979, 93.298, 29.209, 0.72)
pt3dadd(73.881, 93.366, 29.22, 0.668)
pt3dadd(73.783, 93.434, 29.231, 0.614)
pt3dadd(73.685, 93.501, 29.245, 0.562)
pt3dadd(73.596, 93.565, 29.286, 0.534)
pt3dadd(73.507, 93.629, 29.326, 0.504)
pt3dadd(73.418, 93.692, 29.367, 0.474)
pt3dadd(73.329, 93.756, 29.408, 0.444)
pt3dadd(73.24, 93.82, 29.449, 0.414)
pt3dadd(73.151, 93.883, 29.49, 0.384)
pt3dadd(73.062, 93.947, 29.531, 0.356)
pt3dadd(72.973, 94.011, 29.572, 0.326)
pt3dadd(72.884, 94.074, 29.613, 0.296)
pt3dadd(72.795, 94.14, 29.651, 0.278)
pt3dadd(72.706, 94.212, 29.682, 0.304)
pt3dadd(72.617, 94.284, 29.712, 0.33)
pt3dadd(72.529, 94.356, 29.743, 0.354)
pt3dadd(72.44, 94.428, 29.774, 0.38)
pt3dadd(72.351, 94.5, 29.805, 0.406)
pt3dadd(72.263, 94.572, 29.835, 0.432)
pt3dadd(72.174, 94.644, 29.866, 0.456)
pt3dadd(72.085, 94.716, 29.896, 0.482)
pt3dadd(71.997, 94.788, 29.927, 0.508)
pt3dadd(71.907, 94.86, 29.954, 0.524)
pt3dadd(71.813, 94.932, 29.972, 0.52)
pt3dadd(71.72, 95.004, 29.991, 0.514)
pt3dadd(71.626, 95.076, 30.009, 0.508)
pt3dadd(71.532, 95.148, 30.027, 0.502)
pt3dadd(71.439, 95.22, 30.045, 0.496)
pt3dadd(71.345, 95.291, 30.063, 0.492)
pt3dadd(71.252, 95.363, 30.081, 0.486)
pt3dadd(71.158, 95.435, 30.1, 0.48)
pt3dadd(71.065, 95.507, 30.118, 0.474)
pt3dadd(70.969, 95.576, 30.134, 0.466)
pt3dadd(70.867, 95.638, 30.145, 0.452)
pt3dadd(70.765, 95.7, 30.157, 0.438)
pt3dadd(70.663, 95.762, 30.168, 0.424)
pt3dadd(70.561, 95.824, 30.18, 0.41)
pt3dadd(70.459, 95.886, 30.191, 0.396)
pt3dadd(70.357, 95.948, 30.202, 0.382)
pt3dadd(70.255, 96.01, 30.214, 0.37)
pt3dadd(70.154, 96.071, 30.225, 0.356)
pt3dadd(70.052, 96.133, 30.237, 0.342)
pt3dadd(69.946, 96.187, 30.247, 0.346)
pt3dadd(69.833, 96.226, 30.254, 0.382)
pt3dadd(69.72, 96.265, 30.262, 0.416)
pt3dadd(69.606, 96.304, 30.269, 0.452)
pt3dadd(69.493, 96.344, 30.277, 0.488)
pt3dadd(69.381, 96.383, 30.285, 0.524)
pt3dadd(69.267, 96.422, 30.292, 0.558)
pt3dadd(69.154, 96.462, 30.3, 0.594)
pt3dadd(69.041, 96.501, 30.308, 0.63)
pt3dadd(68.928, 96.54, 30.315, 0.664)
pt3dadd(68.813, 96.569, 30.325, 0.694)
pt3dadd(68.695, 96.582, 30.338, 0.712)
pt3dadd(68.577, 96.595, 30.352, 0.732)
pt3dadd(68.459, 96.608, 30.365, 0.75)
pt3dadd(68.34, 96.621, 30.378, 0.77)
pt3dadd(68.222, 96.635, 30.391, 0.788)
pt3dadd(68.104, 96.648, 30.404, 0.808)
pt3dadd(67.986, 96.661, 30.418, 0.826)
pt3dadd(67.868, 96.674, 30.431, 0.846)
pt3dadd(67.749, 96.687, 30.444, 0.864)
pt3dadd(67.634, 96.696, 30.466, 0.86)
pt3dadd(67.522, 96.698, 30.503, 0.816)
pt3dadd(67.41, 96.7, 30.539, 0.774)
pt3dadd(67.298, 96.702, 30.575, 0.732)
pt3dadd(67.186, 96.704, 30.611, 0.69)
pt3dadd(67.074, 96.706, 30.648, 0.648)
pt3dadd(66.963, 96.708, 30.684, 0.606)
pt3dadd(66.851, 96.71, 30.72, 0.564)
pt3dadd(66.739, 96.712, 30.756, 0.52)
pt3dadd(66.627, 96.714, 30.792, 0.478)
pt3dadd(66.515, 96.715, 30.828, 0.454)
pt3dadd(66.403, 96.715, 30.864, 0.452)
pt3dadd(66.291, 96.715, 30.899, 0.45)
pt3dadd(66.178, 96.715, 30.934, 0.448)
pt3dadd(66.066, 96.715, 30.97, 0.444)
pt3dadd(65.954, 96.715, 31.005, 0.442)
pt3dadd(65.842, 96.715, 31.041, 0.44)
pt3dadd(65.73, 96.715, 31.076, 0.438)
pt3dadd(65.617, 96.715, 31.111, 0.436)
pt3dadd(65.505, 96.715, 31.147, 0.434)
pt3dadd(65.392, 96.715, 31.18, 0.438)
pt3dadd(65.277, 96.715, 31.209, 0.45)
pt3dadd(65.163, 96.715, 31.239, 0.462)
pt3dadd(65.048, 96.715, 31.269, 0.476)
pt3dadd(64.934, 96.715, 31.299, 0.488)
pt3dadd(64.819, 96.715, 31.329, 0.5)
pt3dadd(64.704, 96.715, 31.358, 0.512)
pt3dadd(64.59, 96.715, 31.388, 0.526)
pt3dadd(64.475, 96.715, 31.418, 0.538)
pt3dadd(64.361, 96.715, 31.448, 0.55)
pt3dadd(64.246, 96.715, 31.476, 0.546)
pt3dadd(64.131, 96.715, 31.504, 0.52)
pt3dadd(64.015, 96.715, 31.532, 0.494)
pt3dadd(63.9, 96.716, 31.559, 0.468)
pt3dadd(63.785, 96.716, 31.587, 0.444)
pt3dadd(63.669, 96.716, 31.615, 0.418)
pt3dadd(63.554, 96.716, 31.642, 0.392)
pt3dadd(63.439, 96.716, 31.67, 0.368)
pt3dadd(63.323, 96.716, 31.698, 0.342)
pt3dadd(63.208, 96.716, 31.725, 0.316)
pt3dadd(63.096, 96.717, 31.761, 0.336)
pt3dadd(62.988, 96.717, 31.805, 0.404)
pt3dadd(62.881, 96.717, 31.849, 0.474)
pt3dadd(62.773, 96.717, 31.893, 0.544)
pt3dadd(62.665, 96.717, 31.937, 0.612)
pt3dadd(62.557, 96.718, 31.981, 0.682)
pt3dadd(62.45, 96.718, 32.024, 0.752)
pt3dadd(62.342, 96.718, 32.069, 0.82)
pt3dadd(62.234, 96.718, 32.112, 0.89)
pt3dadd(62.126, 96.719, 32.157, 0.958)
pt3dadd(62.017, 96.719, 32.198, 0.994)
pt3dadd(61.906, 96.719, 32.236, 0.994)
pt3dadd(61.796, 96.72, 32.275, 0.992)
pt3dadd(61.685, 96.72, 32.314, 0.992)
pt3dadd(61.574, 96.72, 32.352, 0.99)
pt3dadd(61.464, 96.721, 32.391, 0.99)
pt3dadd(61.353, 96.721, 32.429, 0.988)
pt3dadd(61.242, 96.721, 32.468, 0.988)
pt3dadd(61.131, 96.722, 32.507, 0.986)
pt3dadd(61.021, 96.722, 32.545, 0.986)
pt3dadd(60.912, 96.723, 32.587, 0.982)
pt3dadd(60.805, 96.723, 32.632, 0.974)
pt3dadd(60.698, 96.724, 32.678, 0.966)
pt3dadd(60.591, 96.725, 32.723, 0.956)
pt3dadd(60.484, 96.726, 32.768, 0.948)
pt3dadd(60.377, 96.726, 32.814, 0.94)
pt3dadd(60.27, 96.727, 32.859, 0.932)
pt3dadd(60.163, 96.728, 32.905, 0.924)
pt3dadd(60.056, 96.729, 32.95, 0.916)
pt3dadd(59.949, 96.729, 32.995, 0.908)
pt3dadd(59.844, 96.73, 33.043, 0.902)
pt3dadd(59.739, 96.731, 33.092, 0.898)
pt3dadd(59.635, 96.732, 33.141, 0.896)
pt3dadd(59.53, 96.733, 33.19, 0.892)
pt3dadd(59.426, 96.734, 33.239, 0.888)
pt3dadd(59.321, 96.735, 33.288, 0.884)
pt3dadd(59.217, 96.736, 33.338, 0.882)
pt3dadd(59.112, 96.737, 33.387, 0.878)
pt3dadd(59.008, 96.738, 33.436, 0.874)
pt3dadd(58.903, 96.739, 33.485, 0.87)
pt3dadd(58.795, 96.74, 33.528, 0.86)
pt3dadd(58.684, 96.743, 33.566, 0.84)
pt3dadd(58.573, 96.745, 33.603, 0.822)
pt3dadd(58.462, 96.747, 33.641, 0.804)
pt3dadd(58.35, 96.749, 33.678, 0.786)
pt3dadd(58.239, 96.751, 33.716, 0.768)
pt3dadd(58.128, 96.753, 33.753, 0.748)
pt3dadd(58.017, 96.756, 33.791, 0.73)
pt3dadd(57.906, 96.758, 33.828, 0.712)
pt3dadd(57.795, 96.76, 33.866, 0.694)
pt3dadd(57.688, 96.763, 33.912, 0.676)
pt3dadd(57.586, 96.767, 33.965, 0.658)
pt3dadd(57.485, 96.771, 34.017, 0.64)
pt3dadd(57.383, 96.775, 34.07, 0.624)
pt3dadd(57.281, 96.779, 34.123, 0.606)
pt3dadd(57.179, 96.783, 34.176, 0.588)
pt3dadd(57.077, 96.787, 34.229, 0.57)
pt3dadd(56.975, 96.791, 34.281, 0.552)
pt3dadd(56.874, 96.795, 34.334, 0.536)
pt3dadd(56.772, 96.799, 34.387, 0.518)
}
}
proc shape3d_5() {
dend_7[1] { pt3dadd(56.667, 96.805, 34.435, 0.528)
pt3dadd(56.559, 96.814, 34.479, 0.564)
pt3dadd(56.452, 96.823, 34.522, 0.598)
pt3dadd(56.344, 96.831, 34.566, 0.632)
pt3dadd(56.236, 96.84, 34.609, 0.668)
pt3dadd(56.129, 96.849, 34.653, 0.702)
pt3dadd(56.021, 96.858, 34.697, 0.738)
pt3dadd(55.914, 96.867, 34.74, 0.772)
pt3dadd(55.806, 96.875, 34.784, 0.806)
pt3dadd(55.698, 96.884, 34.828, 0.842)
pt3dadd(55.596, 96.898, 34.877, 0.85)
pt3dadd(55.496, 96.916, 34.932, 0.838)
pt3dadd(55.397, 96.934, 34.986, 0.826)
pt3dadd(55.298, 96.952, 35.04, 0.814)
pt3dadd(55.199, 96.97, 35.095, 0.8)
pt3dadd(55.1, 96.988, 35.149, 0.788)
pt3dadd(55, 97.006, 35.203, 0.776)
pt3dadd(54.901, 97.024, 35.257, 0.764)
pt3dadd(54.802, 97.042, 35.312, 0.752)
pt3dadd(54.703, 97.059, 35.366, 0.74)
pt3dadd(54.607, 97.1, 35.414, 0.716)
pt3dadd(54.512, 97.149, 35.459, 0.686)
pt3dadd(54.418, 97.199, 35.505, 0.656)
pt3dadd(54.323, 97.248, 35.551, 0.628)
pt3dadd(54.228, 97.298, 35.596, 0.598)
pt3dadd(54.134, 97.347, 35.642, 0.568)
pt3dadd(54.039, 97.396, 35.688, 0.54)
pt3dadd(53.944, 97.446, 35.733, 0.51)
pt3dadd(53.85, 97.495, 35.779, 0.48)
pt3dadd(53.755, 97.545, 35.824, 0.452)
pt3dadd(53.654, 97.603, 35.849, 0.452)
pt3dadd(53.553, 97.661, 35.874, 0.452)
pt3dadd(53.453, 97.719, 35.899, 0.452)
pt3dadd(53.352, 97.777, 35.924, 0.452)
pt3dadd(53.251, 97.835, 35.948, 0.452)
pt3dadd(53.151, 97.893, 35.973, 0.452)
pt3dadd(53.05, 97.951, 35.998, 0.452)
pt3dadd(52.949, 98.009, 36.023, 0.452)
pt3dadd(52.848, 98.067, 36.048, 0.452)
pt3dadd(52.748, 98.125, 36.072, 0.452)
pt3dadd(52.645, 98.184, 36.088, 0.46)
pt3dadd(52.543, 98.244, 36.105, 0.468)
pt3dadd(52.44, 98.303, 36.121, 0.476)
pt3dadd(52.338, 98.362, 36.137, 0.484)
pt3dadd(52.235, 98.421, 36.153, 0.492)
pt3dadd(52.132, 98.481, 36.17, 0.5)
pt3dadd(52.03, 98.54, 36.186, 0.508)
pt3dadd(51.927, 98.599, 36.202, 0.514)
pt3dadd(51.825, 98.658, 36.218, 0.522)
pt3dadd(51.723, 98.718, 36.235, 0.532)
pt3dadd(51.626, 98.786, 36.253, 0.546)
pt3dadd(51.529, 98.853, 36.272, 0.562)
pt3dadd(51.432, 98.92, 36.29, 0.576)
pt3dadd(51.335, 98.987, 36.308, 0.592)
pt3dadd(51.238, 99.055, 36.327, 0.606)
pt3dadd(51.141, 99.122, 36.345, 0.622)
pt3dadd(51.045, 99.189, 36.363, 0.636)
pt3dadd(50.948, 99.257, 36.382, 0.652)
pt3dadd(50.851, 99.324, 36.4, 0.666)
pt3dadd(50.756, 99.39, 36.424, 0.678)
pt3dadd(50.671, 99.454, 36.47, 0.678)
pt3dadd(50.585, 99.518, 36.516, 0.678)
pt3dadd(50.5, 99.581, 36.562, 0.678)
pt3dadd(50.414, 99.645, 36.608, 0.678)
pt3dadd(50.328, 99.708, 36.653, 0.678)
pt3dadd(50.243, 99.772, 36.699, 0.678)
pt3dadd(50.157, 99.836, 36.745, 0.678)
pt3dadd(50.072, 99.899, 36.791, 0.678)
pt3dadd(49.986, 99.963, 36.837, 0.678)
pt3dadd(49.9, 100.029, 36.878, 0.678)
pt3dadd(49.813, 100.105, 36.905, 0.678)
pt3dadd(49.725, 100.18, 36.933, 0.678)
pt3dadd(49.638, 100.256, 36.96, 0.678)
pt3dadd(49.551, 100.331, 36.987, 0.678)
pt3dadd(49.463, 100.407, 37.015, 0.678)
pt3dadd(49.376, 100.482, 37.042, 0.678)
pt3dadd(49.288, 100.557, 37.069, 0.678)
pt3dadd(49.201, 100.633, 37.097, 0.678)
pt3dadd(49.114, 100.708, 37.124, 0.678)
pt3dadd(49.022, 100.779, 37.149, 0.678)
pt3dadd(48.921, 100.839, 37.168, 0.678)
pt3dadd(48.819, 100.898, 37.187, 0.678)
pt3dadd(48.717, 100.957, 37.205, 0.678)
pt3dadd(48.615, 101.017, 37.224, 0.678)
pt3dadd(48.513, 101.076, 37.243, 0.678)
pt3dadd(48.411, 101.136, 37.262, 0.678)
pt3dadd(48.31, 101.195, 37.281, 0.678)
pt3dadd(48.208, 101.254, 37.3, 0.678)
pt3dadd(48.106, 101.314, 37.319, 0.678)
pt3dadd(48.007, 101.378, 37.335, 0.678)
pt3dadd(47.914, 101.453, 37.346, 0.678)
pt3dadd(47.821, 101.528, 37.357, 0.678)
pt3dadd(47.729, 101.603, 37.367, 0.678)
pt3dadd(47.636, 101.678, 37.378, 0.678)
pt3dadd(47.543, 101.753, 37.389, 0.678)
pt3dadd(47.451, 101.828, 37.4, 0.678)
pt3dadd(47.358, 101.903, 37.41, 0.678)
pt3dadd(47.265, 101.978, 37.421, 0.678)
pt3dadd(47.172, 102.054, 37.432, 0.678)
pt3dadd(47.085, 102.132, 37.447, 0.678)
pt3dadd(47.008, 102.219, 37.473, 0.678)
pt3dadd(46.932, 102.306, 37.5, 0.678)
pt3dadd(46.855, 102.393, 37.526, 0.678)
pt3dadd(46.779, 102.48, 37.552, 0.678)
pt3dadd(46.703, 102.567, 37.578, 0.678)
pt3dadd(46.626, 102.654, 37.605, 0.678)
pt3dadd(46.55, 102.741, 37.631, 0.678)
pt3dadd(46.474, 102.828, 37.657, 0.678)
pt3dadd(46.397, 102.915, 37.683, 0.678)
pt3dadd(46.326, 103.005, 37.712, 0.672)
pt3dadd(46.26, 103.098, 37.744, 0.66)
pt3dadd(46.194, 103.191, 37.775, 0.648)
pt3dadd(46.128, 103.284, 37.807, 0.636)
pt3dadd(46.062, 103.377, 37.838, 0.624)
pt3dadd(45.996, 103.469, 37.87, 0.612)
pt3dadd(45.93, 103.562, 37.902, 0.6)
pt3dadd(45.864, 103.655, 37.933, 0.588)
pt3dadd(45.798, 103.748, 37.965, 0.576)
pt3dadd(45.733, 103.841, 37.996, 0.564)
pt3dadd(45.664, 103.934, 38.022, 0.542)
pt3dadd(45.592, 104.027, 38.042, 0.508)
pt3dadd(45.52, 104.12, 38.062, 0.474)
pt3dadd(45.448, 104.213, 38.082, 0.442)
pt3dadd(45.376, 104.306, 38.102, 0.408)
pt3dadd(45.304, 104.399, 38.122, 0.376)
pt3dadd(45.232, 104.492, 38.142, 0.342)
pt3dadd(45.16, 104.585, 38.162, 0.308)
pt3dadd(45.088, 104.678, 38.182, 0.276)
pt3dadd(45.016, 104.771, 38.202, 0.242)
pt3dadd(44.933, 104.854, 38.215, 0.226)
pt3dadd(44.84, 104.929, 38.223, 0.226)
pt3dadd(44.746, 105.004, 38.231, 0.226)
pt3dadd(44.653, 105.079, 38.239, 0.226)
pt3dadd(44.559, 105.153, 38.246, 0.226)
pt3dadd(44.466, 105.228, 38.254, 0.226)
pt3dadd(44.373, 105.303, 38.262, 0.226)
pt3dadd(44.28, 105.378, 38.27, 0.226)
pt3dadd(44.186, 105.453, 38.278, 0.226)
pt3dadd(44.093, 105.528, 38.286, 0.226)
pt3dadd(44.013, 105.614, 38.282, 0.226)
pt3dadd(43.944, 105.712, 38.268, 0.226)
pt3dadd(43.876, 105.809, 38.254, 0.226)
pt3dadd(43.808, 105.906, 38.24, 0.226)
pt3dadd(43.74, 106.003, 38.226, 0.226)
pt3dadd(43.672, 106.101, 38.212, 0.226)
pt3dadd(43.604, 106.198, 38.198, 0.226)
pt3dadd(43.535, 106.295, 38.184, 0.226)
pt3dadd(43.467, 106.393, 38.17, 0.226)
pt3dadd(43.399, 106.49, 38.156, 0.226)
pt3dadd(43.339, 106.589, 38.132, 0.226)
pt3dadd(43.286, 106.69, 38.101, 0.226)
pt3dadd(43.233, 106.79, 38.069, 0.226)
pt3dadd(43.179, 106.891, 38.037, 0.226)
pt3dadd(43.126, 106.991, 38.005, 0.226)
pt3dadd(43.073, 107.092, 37.973, 0.226)
pt3dadd(43.02, 107.192, 37.941, 0.226)
pt3dadd(42.966, 107.293, 37.91, 0.226)
pt3dadd(42.913, 107.393, 37.878, 0.226)
pt3dadd(42.86, 107.494, 37.846, 0.226)
pt3dadd(42.783, 107.545, 37.782, 0.226)
pt3dadd(42.706, 107.596, 37.718, 0.226)
pt3dadd(42.63, 107.647, 37.654, 0.226)
pt3dadd(42.553, 107.699, 37.59, 0.226)
pt3dadd(42.476, 107.75, 37.526, 0.226)
pt3dadd(42.399, 107.801, 37.462, 0.226)
pt3dadd(42.323, 107.852, 37.398, 0.226)
pt3dadd(42.246, 107.904, 37.334, 0.226)
pt3dadd(42.169, 107.955, 37.27, 0.226)
pt3dadd(42.093, 108.006, 37.206, 0.226)
}
dend_7[2] {pt3dclear()
pt3dadd(122.394, 77.626, 12.411, 0.452)
pt3dadd(122.4, 77.543, 12.415, 0.442)
pt3dadd(122.408, 77.423, 12.421, 0.43)
pt3dadd(122.417, 77.304, 12.426, 0.418)
pt3dadd(122.425, 77.184, 12.432, 0.404)
pt3dadd(122.435, 77.065, 12.437, 0.392)
pt3dadd(122.443, 76.945, 12.443, 0.378)
pt3dadd(122.452, 76.826, 12.448, 0.366)
pt3dadd(122.46, 76.706, 12.454, 0.352)
pt3dadd(122.468, 76.587, 12.459, 0.34)
pt3dadd(122.477, 76.467, 12.465, 0.326)
pt3dadd(122.485, 76.348, 12.47, 0.314)
pt3dadd(122.494, 76.228, 12.476, 0.3)
pt3dadd(122.502, 76.109, 12.481, 0.288)
pt3dadd(122.51, 75.989, 12.486, 0.274)
pt3dadd(122.518, 75.87, 12.495, 0.304)
pt3dadd(122.525, 75.751, 12.504, 0.344)
pt3dadd(122.532, 75.631, 12.514, 0.384)
pt3dadd(122.538, 75.512, 12.524, 0.424)
pt3dadd(122.545, 75.393, 12.533, 0.462)
pt3dadd(122.551, 75.273, 12.542, 0.502)
pt3dadd(122.558, 75.154, 12.552, 0.542)
pt3dadd(122.566, 75.035, 12.561, 0.582)
pt3dadd(122.572, 74.916, 12.571, 0.622)
pt3dadd(122.579, 74.796, 12.58, 0.662)
pt3dadd(122.586, 74.677, 12.592, 0.702)
pt3dadd(122.593, 74.559, 12.604, 0.74)
pt3dadd(122.599, 74.44, 12.617, 0.78)
pt3dadd(122.606, 74.321, 12.629, 0.818)
pt3dadd(122.614, 74.202, 12.641, 0.858)
pt3dadd(122.621, 74.083, 12.654, 0.896)
}
}
proc shape3d_6() {
dend_7[2] { pt3dadd(122.628, 73.964, 12.666, 0.934)
pt3dadd(122.635, 73.845, 12.678, 0.974)
pt3dadd(122.642, 73.726, 12.691, 1.012)
pt3dadd(122.65, 73.608, 12.703, 1.052)
pt3dadd(122.659, 73.49, 12.722, 1.054)
pt3dadd(122.669, 73.373, 12.742, 1.048)
pt3dadd(122.68, 73.256, 12.762, 1.042)
pt3dadd(122.689, 73.139, 12.783, 1.036)
pt3dadd(122.7, 73.022, 12.803, 1.03)
pt3dadd(122.711, 72.905, 12.824, 1.024)
pt3dadd(122.72, 72.788, 12.844, 1.02)
pt3dadd(122.731, 72.671, 12.865, 1.012)
pt3dadd(122.741, 72.554, 12.885, 1.008)
pt3dadd(122.752, 72.437, 12.905, 1.002)
pt3dadd(122.764, 72.326, 12.941, 1.03)
pt3dadd(122.776, 72.216, 12.979, 1.066)
pt3dadd(122.789, 72.105, 13.017, 1.102)
pt3dadd(122.802, 71.995, 13.055, 1.136)
pt3dadd(122.814, 71.885, 13.094, 1.172)
pt3dadd(122.827, 71.775, 13.132, 1.206)
pt3dadd(122.839, 71.664, 13.17, 1.242)
pt3dadd(122.852, 71.554, 13.208, 1.278)
pt3dadd(122.864, 71.444, 13.246, 1.312)
pt3dadd(122.878, 71.334, 13.284, 1.348)
pt3dadd(122.916, 71.225, 13.311, 1.324)
pt3dadd(122.958, 71.117, 13.336, 1.29)
pt3dadd(123.001, 71.009, 13.361, 1.256)
pt3dadd(123.044, 70.901, 13.385, 1.222)
pt3dadd(123.086, 70.793, 13.41, 1.188)
pt3dadd(123.13, 70.685, 13.435, 1.154)
pt3dadd(123.172, 70.577, 13.46, 1.12)
pt3dadd(123.215, 70.469, 13.485, 1.086)
pt3dadd(123.258, 70.361, 13.51, 1.052)
pt3dadd(123.3, 70.253, 13.535, 1.018)
pt3dadd(123.335, 70.14, 13.555, 0.992)
pt3dadd(123.367, 70.027, 13.575, 0.968)
pt3dadd(123.4, 69.914, 13.595, 0.946)
pt3dadd(123.432, 69.801, 13.615, 0.922)
pt3dadd(123.464, 69.688, 13.635, 0.898)
pt3dadd(123.497, 69.575, 13.654, 0.874)
pt3dadd(123.529, 69.462, 13.674, 0.852)
pt3dadd(123.563, 69.349, 13.694, 0.828)
pt3dadd(123.595, 69.236, 13.714, 0.804)
pt3dadd(123.628, 69.123, 13.733, 0.78)
pt3dadd(123.649, 69.007, 13.749, 0.762)
pt3dadd(123.67, 68.89, 13.763, 0.742)
pt3dadd(123.69, 68.773, 13.778, 0.724)
pt3dadd(123.71, 68.656, 13.793, 0.706)
pt3dadd(123.731, 68.539, 13.808, 0.686)
pt3dadd(123.751, 68.422, 13.822, 0.668)
pt3dadd(123.772, 68.305, 13.837, 0.65)
pt3dadd(123.792, 68.188, 13.852, 0.63)
pt3dadd(123.812, 68.071, 13.867, 0.612)
pt3dadd(123.833, 67.954, 13.881, 0.592)
pt3dadd(123.841, 67.837, 13.899, 0.578)
pt3dadd(123.848, 67.719, 13.918, 0.564)
pt3dadd(123.857, 67.601, 13.937, 0.55)
pt3dadd(123.864, 67.484, 13.955, 0.536)
pt3dadd(123.872, 67.366, 13.974, 0.522)
pt3dadd(123.88, 67.248, 13.992, 0.508)
pt3dadd(123.888, 67.131, 14.011, 0.494)
pt3dadd(123.895, 67.013, 14.029, 0.48)
pt3dadd(123.904, 66.895, 14.048, 0.466)
pt3dadd(123.911, 66.778, 14.066, 0.452)
pt3dadd(123.908, 66.666, 14.104, 0.452)
pt3dadd(123.905, 66.555, 14.141, 0.452)
pt3dadd(123.902, 66.444, 14.178, 0.452)
pt3dadd(123.899, 66.332, 14.215, 0.452)
pt3dadd(123.896, 66.221, 14.252, 0.452)
pt3dadd(123.894, 66.109, 14.289, 0.452)
pt3dadd(123.89, 65.998, 14.327, 0.452)
pt3dadd(123.888, 65.887, 14.364, 0.452)
pt3dadd(123.884, 65.775, 14.401, 0.452)
pt3dadd(123.882, 65.664, 14.438, 0.452)
}
dend_7[3] {pt3dclear()
pt3dadd(123.882, 65.664, 14.438, 0.452)
pt3dadd(123.881, 65.641, 14.443, 0.474)
pt3dadd(123.872, 65.525, 14.467, 0.586)
pt3dadd(123.865, 65.408, 14.491, 0.698)
pt3dadd(123.857, 65.292, 14.515, 0.81)
pt3dadd(123.85, 65.176, 14.539, 0.922)
pt3dadd(123.841, 65.06, 14.563, 1.034)
pt3dadd(123.834, 64.943, 14.587, 1.144)
pt3dadd(123.826, 64.827, 14.608, 1.236)
pt3dadd(123.815, 64.709, 14.626, 1.296)
pt3dadd(123.805, 64.591, 14.644, 1.356)
pt3dadd(123.794, 64.474, 14.662, 1.416)
pt3dadd(123.785, 64.356, 14.68, 1.474)
pt3dadd(123.774, 64.239, 14.698, 1.534)
pt3dadd(123.764, 64.121, 14.715, 1.594)
pt3dadd(123.754, 64.003, 14.733, 1.654)
pt3dadd(123.744, 63.886, 14.751, 1.714)
pt3dadd(123.733, 63.768, 14.769, 1.772)
pt3dadd(123.719, 63.65, 14.783, 1.798)
pt3dadd(123.697, 63.533, 14.791, 1.772)
pt3dadd(123.676, 63.415, 14.799, 1.748)
pt3dadd(123.654, 63.297, 14.807, 1.722)
pt3dadd(123.632, 63.18, 14.815, 1.698)
pt3dadd(123.612, 63.062, 14.823, 1.672)
pt3dadd(123.59, 62.944, 14.831, 1.648)
pt3dadd(123.569, 62.827, 14.839, 1.622)
pt3dadd(123.547, 62.709, 14.847, 1.598)
pt3dadd(123.526, 62.591, 14.855, 1.572)
pt3dadd(123.494, 62.476, 14.859, 1.516)
pt3dadd(123.451, 62.364, 14.859, 1.428)
pt3dadd(123.409, 62.252, 14.859, 1.34)
pt3dadd(123.366, 62.14, 14.859, 1.25)
pt3dadd(123.323, 62.028, 14.859, 1.162)
pt3dadd(123.281, 61.915, 14.859, 1.072)
pt3dadd(123.238, 61.803, 14.859, 0.984)
pt3dadd(123.196, 61.691, 14.859, 0.896)
pt3dadd(123.152, 61.579, 14.859, 0.806)
pt3dadd(123.109, 61.467, 14.859, 0.718)
pt3dadd(123.076, 61.352, 14.859, 0.654)
pt3dadd(123.05, 61.235, 14.859, 0.616)
pt3dadd(123.026, 61.117, 14.859, 0.578)
pt3dadd(123.001, 61, 14.859, 0.54)
pt3dadd(122.976, 60.883, 14.859, 0.504)
pt3dadd(122.951, 60.765, 14.859, 0.466)
pt3dadd(122.927, 60.648, 14.859, 0.428)
pt3dadd(122.902, 60.53, 14.859, 0.39)
pt3dadd(122.876, 60.413, 14.859, 0.352)
pt3dadd(122.852, 60.296, 14.859, 0.316)
pt3dadd(122.836, 60.177, 14.859, 0.292)
pt3dadd(122.828, 60.057, 14.859, 0.286)
pt3dadd(122.821, 59.937, 14.859, 0.278)
pt3dadd(122.814, 59.818, 14.859, 0.272)
pt3dadd(122.807, 59.698, 14.859, 0.264)
pt3dadd(122.8, 59.578, 14.859, 0.258)
pt3dadd(122.792, 59.458, 14.859, 0.25)
pt3dadd(122.785, 59.339, 14.859, 0.244)
pt3dadd(122.778, 59.219, 14.859, 0.236)
pt3dadd(122.771, 59.099, 14.859, 0.23)
pt3dadd(122.772, 58.979, 14.859, 0.238)
pt3dadd(122.782, 58.86, 14.859, 0.262)
pt3dadd(122.791, 58.74, 14.859, 0.288)
pt3dadd(122.802, 58.62, 14.859, 0.312)
pt3dadd(122.812, 58.501, 14.859, 0.336)
pt3dadd(122.821, 58.381, 14.859, 0.36)
pt3dadd(122.831, 58.262, 14.859, 0.384)
pt3dadd(122.84, 58.142, 14.859, 0.41)
pt3dadd(122.85, 58.023, 14.859, 0.434)
pt3dadd(122.86, 57.903, 14.859, 0.458)
pt3dadd(122.882, 57.786, 14.859, 0.48)
pt3dadd(122.915, 57.67, 14.859, 0.502)
pt3dadd(122.947, 57.555, 14.859, 0.522)
pt3dadd(122.981, 57.439, 14.859, 0.544)
pt3dadd(123.013, 57.324, 14.859, 0.564)
pt3dadd(123.046, 57.208, 14.859, 0.586)
pt3dadd(123.079, 57.093, 14.859, 0.608)
pt3dadd(123.112, 56.977, 14.859, 0.628)
pt3dadd(123.144, 56.862, 14.859, 0.65)
pt3dadd(123.178, 56.747, 14.859, 0.67)
pt3dadd(123.221, 56.635, 14.859, 0.674)
pt3dadd(123.27, 56.526, 14.859, 0.668)
pt3dadd(123.32, 56.417, 14.859, 0.664)
pt3dadd(123.37, 56.307, 14.859, 0.658)
pt3dadd(123.419, 56.198, 14.859, 0.652)
pt3dadd(123.468, 56.088, 14.859, 0.648)
pt3dadd(123.517, 55.979, 14.859, 0.642)
pt3dadd(123.568, 55.87, 14.859, 0.636)
pt3dadd(123.617, 55.761, 14.859, 0.63)
pt3dadd(123.666, 55.651, 14.859, 0.626)
pt3dadd(123.709, 55.539, 14.859, 0.6)
pt3dadd(123.75, 55.426, 14.859, 0.564)
pt3dadd(123.791, 55.314, 14.859, 0.528)
pt3dadd(123.832, 55.201, 14.859, 0.492)
pt3dadd(123.871, 55.088, 14.859, 0.456)
pt3dadd(123.912, 54.975, 14.859, 0.42)
pt3dadd(123.953, 54.862, 14.859, 0.382)
pt3dadd(123.994, 54.749, 14.859, 0.346)
pt3dadd(124.034, 54.636, 14.859, 0.31)
pt3dadd(124.074, 54.523, 14.859, 0.274)
pt3dadd(124.123, 54.413, 14.859, 0.27)
pt3dadd(124.176, 54.306, 14.859, 0.282)
pt3dadd(124.229, 54.198, 14.859, 0.294)
pt3dadd(124.282, 54.09, 14.859, 0.306)
pt3dadd(124.334, 53.982, 14.859, 0.318)
pt3dadd(124.387, 53.874, 14.859, 0.33)
pt3dadd(124.44, 53.767, 14.859, 0.342)
pt3dadd(124.492, 53.659, 14.859, 0.352)
pt3dadd(124.544, 53.551, 14.859, 0.364)
pt3dadd(124.597, 53.443, 14.859, 0.376)
pt3dadd(124.64, 53.332, 14.859, 0.378)
pt3dadd(124.68, 53.218, 14.859, 0.374)
pt3dadd(124.718, 53.104, 14.859, 0.37)
pt3dadd(124.757, 52.991, 14.859, 0.366)
pt3dadd(124.795, 52.877, 14.859, 0.362)
pt3dadd(124.834, 52.763, 14.859, 0.36)
pt3dadd(124.872, 52.65, 14.859, 0.356)
pt3dadd(124.91, 52.536, 14.859, 0.352)
pt3dadd(124.949, 52.422, 14.859, 0.348)
pt3dadd(124.988, 52.309, 14.859, 0.344)
pt3dadd(125.014, 52.192, 14.859, 0.334)
pt3dadd(125.034, 52.074, 14.859, 0.322)
pt3dadd(125.054, 51.955, 14.859, 0.31)
pt3dadd(125.075, 51.837, 14.859, 0.298)
pt3dadd(125.095, 51.719, 14.859, 0.288)
pt3dadd(125.116, 51.601, 14.859, 0.276)
pt3dadd(125.136, 51.482, 14.859, 0.264)
pt3dadd(125.156, 51.364, 14.859, 0.252)
}
}
proc shape3d_7() {
dend_7[3] { pt3dadd(125.177, 51.246, 14.859, 0.24)
pt3dadd(125.197, 51.128, 14.859, 0.228)
pt3dadd(125.207, 51.008, 14.859, 0.226)
pt3dadd(125.212, 50.888, 14.859, 0.226)
pt3dadd(125.218, 50.768, 14.859, 0.226)
pt3dadd(125.224, 50.649, 14.859, 0.226)
pt3dadd(125.228, 50.529, 14.859, 0.226)
pt3dadd(125.234, 50.409, 14.859, 0.226)
pt3dadd(125.24, 50.289, 14.859, 0.226)
pt3dadd(125.246, 50.169, 14.859, 0.226)
pt3dadd(125.251, 50.049, 14.859, 0.226)
pt3dadd(125.257, 49.929, 14.859, 0.226)
pt3dadd(125.251, 49.81, 14.859, 0.226)
pt3dadd(125.242, 49.69, 14.859, 0.226)
pt3dadd(125.232, 49.57, 14.859, 0.226)
pt3dadd(125.222, 49.451, 14.859, 0.226)
pt3dadd(125.213, 49.331, 14.859, 0.226)
pt3dadd(125.203, 49.212, 14.859, 0.226)
pt3dadd(125.194, 49.092, 14.859, 0.226)
pt3dadd(125.184, 48.972, 14.859, 0.226)
pt3dadd(125.174, 48.853, 14.859, 0.226)
pt3dadd(125.165, 48.733, 14.859, 0.226)
pt3dadd(125.149, 48.614, 14.859, 0.226)
pt3dadd(125.134, 48.495, 14.859, 0.226)
pt3dadd(125.117, 48.376, 14.859, 0.226)
pt3dadd(125.1, 48.257, 14.859, 0.226)
pt3dadd(125.083, 48.139, 14.859, 0.226)
pt3dadd(125.068, 48.02, 14.859, 0.226)
pt3dadd(125.051, 47.901, 14.859, 0.226)
pt3dadd(125.034, 47.782, 14.859, 0.226)
pt3dadd(125.018, 47.663, 14.859, 0.226)
pt3dadd(125.002, 47.544, 14.859, 0.226)
pt3dadd(124.964, 47.431, 14.859, 0.26)
pt3dadd(124.921, 47.319, 14.859, 0.304)
pt3dadd(124.878, 47.207, 14.859, 0.348)
pt3dadd(124.834, 47.095, 14.859, 0.392)
pt3dadd(124.79, 46.983, 14.859, 0.436)
pt3dadd(124.747, 46.871, 14.859, 0.48)
pt3dadd(124.704, 46.759, 14.859, 0.524)
pt3dadd(124.661, 46.647, 14.859, 0.568)
pt3dadd(124.618, 46.536, 14.859, 0.612)
pt3dadd(124.574, 46.424, 14.859, 0.656)
pt3dadd(124.53, 46.312, 14.859, 0.676)
pt3dadd(124.487, 46.2, 14.859, 0.69)
pt3dadd(124.444, 46.088, 14.859, 0.704)
pt3dadd(124.399, 45.977, 14.859, 0.718)
pt3dadd(124.356, 45.865, 14.859, 0.732)
pt3dadd(124.312, 45.753, 14.859, 0.746)
pt3dadd(124.268, 45.641, 14.859, 0.76)
pt3dadd(124.224, 45.53, 14.859, 0.774)
pt3dadd(124.181, 45.418, 14.859, 0.788)
pt3dadd(124.138, 45.306, 14.859, 0.804)
pt3dadd(124.098, 45.193, 14.859, 0.794)
pt3dadd(124.061, 45.079, 14.859, 0.782)
pt3dadd(124.022, 44.965, 14.859, 0.77)
pt3dadd(123.984, 44.851, 14.859, 0.756)
pt3dadd(123.947, 44.737, 14.859, 0.744)
pt3dadd(123.908, 44.623, 14.859, 0.73)
pt3dadd(123.871, 44.509, 14.859, 0.718)
pt3dadd(123.833, 44.396, 14.859, 0.706)
pt3dadd(123.794, 44.282, 14.859, 0.692)
pt3dadd(123.757, 44.168, 14.859, 0.68)
pt3dadd(123.721, 44.054, 14.859, 0.678)
pt3dadd(123.685, 43.939, 14.859, 0.676)
pt3dadd(123.648, 43.825, 14.859, 0.674)
pt3dadd(123.612, 43.71, 14.859, 0.674)
pt3dadd(123.576, 43.596, 14.859, 0.672)
pt3dadd(123.54, 43.481, 14.859, 0.672)
pt3dadd(123.504, 43.367, 14.859, 0.67)
pt3dadd(123.468, 43.252, 14.859, 0.668)
pt3dadd(123.432, 43.138, 14.859, 0.668)
pt3dadd(123.396, 43.023, 14.859, 0.666)
pt3dadd(123.343, 42.916, 14.859, 0.652)
pt3dadd(123.288, 42.81, 14.859, 0.634)
pt3dadd(123.232, 42.703, 14.859, 0.618)
pt3dadd(123.176, 42.597, 14.859, 0.6)
pt3dadd(123.121, 42.491, 14.859, 0.584)
pt3dadd(123.065, 42.384, 14.859, 0.566)
pt3dadd(123.01, 42.278, 14.859, 0.55)
pt3dadd(122.953, 42.172, 14.859, 0.532)
pt3dadd(122.898, 42.066, 14.859, 0.516)
pt3dadd(122.843, 41.959, 14.859, 0.498)
pt3dadd(122.779, 41.857, 14.859, 0.502)
pt3dadd(122.717, 41.755, 14.859, 0.51)
pt3dadd(122.653, 41.653, 14.859, 0.518)
pt3dadd(122.59, 41.551, 14.859, 0.524)
pt3dadd(122.526, 41.45, 14.859, 0.532)
pt3dadd(122.462, 41.348, 14.859, 0.54)
pt3dadd(122.399, 41.246, 14.859, 0.548)
pt3dadd(122.335, 41.144, 14.859, 0.554)
pt3dadd(122.272, 41.043, 14.859, 0.562)
pt3dadd(122.208, 40.941, 14.859, 0.57)
pt3dadd(122.148, 40.836, 14.859, 0.58)
pt3dadd(122.089, 40.732, 14.859, 0.59)
pt3dadd(122.03, 40.627, 14.859, 0.602)
pt3dadd(121.972, 40.523, 14.859, 0.612)
pt3dadd(121.913, 40.418, 14.859, 0.624)
pt3dadd(121.854, 40.314, 14.859, 0.634)
pt3dadd(121.795, 40.209, 14.859, 0.644)
pt3dadd(121.736, 40.104, 14.86, 0.656)
pt3dadd(121.678, 40, 14.86, 0.666)
pt3dadd(121.619, 39.895, 14.86, 0.678)
pt3dadd(121.576, 39.783, 14.86, 0.676)
pt3dadd(121.534, 39.671, 14.86, 0.672)
pt3dadd(121.492, 39.558, 14.86, 0.67)
pt3dadd(121.45, 39.446, 14.86, 0.668)
pt3dadd(121.409, 39.334, 14.86, 0.664)
pt3dadd(121.367, 39.221, 14.86, 0.662)
pt3dadd(121.325, 39.109, 14.86, 0.66)
pt3dadd(121.283, 38.996, 14.86, 0.656)
pt3dadd(121.241, 38.884, 14.86, 0.654)
pt3dadd(121.199, 38.771, 14.86, 0.652)
pt3dadd(121.176, 38.653, 14.86, 0.616)
pt3dadd(121.156, 38.535, 14.86, 0.578)
pt3dadd(121.134, 38.417, 14.86, 0.54)
pt3dadd(121.112, 38.299, 14.86, 0.502)
pt3dadd(121.091, 38.181, 14.86, 0.464)
pt3dadd(121.069, 38.063, 14.86, 0.426)
pt3dadd(121.049, 37.945, 14.86, 0.388)
pt3dadd(121.027, 37.827, 14.86, 0.35)
pt3dadd(121.006, 37.709, 14.86, 0.314)
pt3dadd(120.984, 37.591, 14.86, 0.276)
pt3dadd(120.97, 37.472, 14.861, 0.268)
pt3dadd(120.954, 37.353, 14.861, 0.264)
pt3dadd(120.94, 37.233, 14.861, 0.258)
pt3dadd(120.925, 37.114, 14.861, 0.254)
pt3dadd(120.911, 36.995, 14.861, 0.25)
pt3dadd(120.896, 36.876, 14.861, 0.244)
pt3dadd(120.881, 36.757, 14.861, 0.24)
pt3dadd(120.866, 36.638, 14.862, 0.236)
pt3dadd(120.852, 36.519, 14.862, 0.23)
pt3dadd(120.838, 36.4, 14.862, 0.226)
pt3dadd(120.803, 36.285, 14.862, 0.25)
pt3dadd(120.768, 36.17, 14.862, 0.274)
pt3dadd(120.733, 36.055, 14.863, 0.3)
pt3dadd(120.697, 35.941, 14.863, 0.324)
pt3dadd(120.662, 35.826, 14.863, 0.35)
pt3dadd(120.626, 35.711, 14.863, 0.374)
pt3dadd(120.592, 35.597, 14.863, 0.4)
pt3dadd(120.557, 35.482, 14.864, 0.424)
pt3dadd(120.521, 35.367, 14.864, 0.45)
pt3dadd(120.486, 35.253, 14.864, 0.474)
pt3dadd(120.448, 35.139, 14.865, 0.496)
pt3dadd(120.41, 35.025, 14.865, 0.516)
pt3dadd(120.373, 34.911, 14.865, 0.536)
pt3dadd(120.335, 34.797, 14.866, 0.556)
pt3dadd(120.298, 34.683, 14.866, 0.576)
pt3dadd(120.259, 34.569, 14.867, 0.598)
pt3dadd(120.222, 34.455, 14.867, 0.618)
pt3dadd(120.185, 34.341, 14.868, 0.638)
pt3dadd(120.146, 34.227, 14.868, 0.658)
pt3dadd(120.109, 34.113, 14.868, 0.678)
pt3dadd(120.085, 33.996, 14.869, 0.668)
pt3dadd(120.061, 33.878, 14.87, 0.66)
pt3dadd(120.036, 33.761, 14.871, 0.65)
pt3dadd(120.012, 33.643, 14.872, 0.642)
pt3dadd(119.988, 33.526, 14.872, 0.634)
pt3dadd(119.963, 33.408, 14.873, 0.624)
pt3dadd(119.939, 33.291, 14.874, 0.616)
pt3dadd(119.914, 33.173, 14.875, 0.606)
pt3dadd(119.89, 33.056, 14.876, 0.598)
pt3dadd(119.866, 32.938, 14.877, 0.588)
pt3dadd(119.855, 32.819, 14.878, 0.55)
pt3dadd(119.845, 32.699, 14.879, 0.514)
pt3dadd(119.834, 32.58, 14.881, 0.478)
pt3dadd(119.823, 32.46, 14.883, 0.442)
pt3dadd(119.812, 32.341, 14.884, 0.406)
pt3dadd(119.801, 32.221, 14.886, 0.37)
pt3dadd(119.791, 32.102, 14.887, 0.332)
pt3dadd(119.78, 31.982, 14.889, 0.296)
pt3dadd(119.769, 31.863, 14.89, 0.26)
pt3dadd(119.759, 31.743, 14.892, 0.226)
pt3dadd(119.763, 31.623, 14.895, 0.226)
pt3dadd(119.766, 31.503, 14.898, 0.226)
pt3dadd(119.77, 31.383, 14.901, 0.226)
pt3dadd(119.773, 31.263, 14.904, 0.226)
pt3dadd(119.777, 31.144, 14.907, 0.226)
pt3dadd(119.781, 31.024, 14.91, 0.226)
pt3dadd(119.784, 30.904, 14.912, 0.226)
pt3dadd(119.788, 30.784, 14.915, 0.226)
pt3dadd(119.791, 30.664, 14.918, 0.226)
pt3dadd(119.795, 30.544, 14.921, 0.226)
pt3dadd(119.804, 30.425, 14.929, 0.226)
pt3dadd(119.813, 30.305, 14.936, 0.226)
pt3dadd(119.821, 30.186, 14.943, 0.226)
pt3dadd(119.83, 30.067, 14.95, 0.226)
pt3dadd(119.838, 29.947, 14.957, 0.226)
pt3dadd(119.847, 29.828, 14.965, 0.226)
pt3dadd(119.856, 29.709, 14.972, 0.226)
pt3dadd(119.864, 29.589, 14.979, 0.226)
pt3dadd(119.873, 29.47, 14.986, 0.226)
pt3dadd(119.882, 29.35, 14.993, 0.228)
pt3dadd(119.897, 29.232, 15.005, 0.244)
pt3dadd(119.911, 29.114, 15.017, 0.262)
pt3dadd(119.926, 28.996, 15.029, 0.28)
pt3dadd(119.94, 28.877, 15.041, 0.298)
pt3dadd(119.955, 28.759, 15.053, 0.314)
pt3dadd(119.969, 28.641, 15.065, 0.332)
pt3dadd(119.984, 28.523, 15.077, 0.35)
pt3dadd(119.998, 28.404, 15.089, 0.368)
}
}
proc shape3d_8() {
dend_7[3] { pt3dadd(120.013, 28.286, 15.101, 0.384)
pt3dadd(120.03, 28.169, 15.115, 0.404)
pt3dadd(120.079, 28.072, 15.157, 0.446)
pt3dadd(120.13, 27.975, 15.198, 0.488)
pt3dadd(120.179, 27.878, 15.239, 0.53)
pt3dadd(120.229, 27.78, 15.28, 0.572)
pt3dadd(120.28, 27.683, 15.322, 0.614)
pt3dadd(120.329, 27.586, 15.363, 0.654)
pt3dadd(120.379, 27.489, 15.405, 0.696)
pt3dadd(120.428, 27.392, 15.446, 0.738)
pt3dadd(120.479, 27.294, 15.487, 0.78)
pt3dadd(120.526, 27.194, 15.526, 0.804)
pt3dadd(120.568, 27.089, 15.56, 0.796)
pt3dadd(120.608, 26.984, 15.594, 0.786)
pt3dadd(120.649, 26.879, 15.628, 0.778)
pt3dadd(120.691, 26.774, 15.662, 0.77)
pt3dadd(120.732, 26.669, 15.695, 0.76)
pt3dadd(120.774, 26.564, 15.729, 0.752)
pt3dadd(120.815, 26.459, 15.763, 0.744)
pt3dadd(120.856, 26.354, 15.797, 0.734)
pt3dadd(120.898, 26.249, 15.831, 0.726)
pt3dadd(120.929, 26.139, 15.857, 0.704)
pt3dadd(120.949, 26.022, 15.873, 0.664)
pt3dadd(120.97, 25.905, 15.888, 0.626)
pt3dadd(120.989, 25.788, 15.904, 0.586)
pt3dadd(121.009, 25.671, 15.92, 0.548)
pt3dadd(121.03, 25.555, 15.935, 0.508)
pt3dadd(121.049, 25.438, 15.951, 0.468)
pt3dadd(121.069, 25.321, 15.967, 0.43)
pt3dadd(121.09, 25.204, 15.983, 0.39)
pt3dadd(121.109, 25.087, 15.998, 0.352)
pt3dadd(121.123, 24.969, 16.008, 0.334)
pt3dadd(121.129, 24.849, 16.011, 0.338)
pt3dadd(121.135, 24.729, 16.014, 0.342)
pt3dadd(121.142, 24.61, 16.017, 0.346)
pt3dadd(121.148, 24.49, 16.021, 0.35)
pt3dadd(121.154, 24.37, 16.024, 0.354)
pt3dadd(121.16, 24.25, 16.027, 0.358)
pt3dadd(121.168, 24.131, 16.03, 0.36)
pt3dadd(121.174, 24.011, 16.033, 0.364)
pt3dadd(121.18, 23.891, 16.036, 0.368)
pt3dadd(121.186, 23.771, 16.038, 0.37)
pt3dadd(121.19, 23.651, 16.038, 0.366)
pt3dadd(121.195, 23.532, 16.039, 0.364)
pt3dadd(121.2, 23.412, 16.039, 0.36)
pt3dadd(121.205, 23.292, 16.039, 0.358)
pt3dadd(121.21, 23.172, 16.039, 0.354)
pt3dadd(121.213, 23.052, 16.04, 0.352)
pt3dadd(121.218, 22.932, 16.04, 0.348)
pt3dadd(121.223, 22.812, 16.04, 0.346)
pt3dadd(121.228, 22.692, 16.04, 0.342)
pt3dadd(121.235, 22.572, 16.041, 0.336)
pt3dadd(121.244, 22.453, 16.041, 0.324)
pt3dadd(121.254, 22.333, 16.042, 0.312)
pt3dadd(121.264, 22.213, 16.042, 0.3)
pt3dadd(121.273, 22.094, 16.043, 0.29)
pt3dadd(121.283, 21.974, 16.043, 0.278)
pt3dadd(121.291, 21.855, 16.044, 0.266)
pt3dadd(121.301, 21.735, 16.044, 0.254)
pt3dadd(121.31, 21.615, 16.045, 0.242)
pt3dadd(121.32, 21.496, 16.045, 0.232)
pt3dadd(121.333, 21.377, 16.046, 0.226)
pt3dadd(121.35, 21.258, 16.047, 0.226)
pt3dadd(121.368, 21.139, 16.048, 0.226)
pt3dadd(121.385, 21.02, 16.048, 0.226)
pt3dadd(121.402, 20.901, 16.049, 0.226)
pt3dadd(121.418, 20.783, 16.05, 0.226)
pt3dadd(121.435, 20.664, 16.051, 0.226)
pt3dadd(121.452, 20.545, 16.052, 0.226)
pt3dadd(121.469, 20.426, 16.053, 0.226)
pt3dadd(121.486, 20.307, 16.054, 0.226)
pt3dadd(121.508, 20.19, 16.055, 0.226)
pt3dadd(121.537, 20.073, 16.057, 0.226)
pt3dadd(121.565, 19.956, 16.058, 0.226)
pt3dadd(121.594, 19.84, 16.06, 0.226)
pt3dadd(121.621, 19.723, 16.061, 0.226)
pt3dadd(121.65, 19.607, 16.063, 0.226)
pt3dadd(121.678, 19.49, 16.065, 0.226)
pt3dadd(121.706, 19.373, 16.066, 0.226)
pt3dadd(121.734, 19.257, 16.068, 0.226)
pt3dadd(121.762, 19.14, 16.069, 0.226)
pt3dadd(121.81, 19.032, 16.071, 0.226)
pt3dadd(121.873, 18.93, 16.074, 0.226)
pt3dadd(121.937, 18.828, 16.077, 0.226)
pt3dadd(122.002, 18.727, 16.08, 0.226)
pt3dadd(122.065, 18.625, 16.083, 0.226)
pt3dadd(122.129, 18.523, 16.085, 0.226)
pt3dadd(122.192, 18.422, 16.088, 0.226)
pt3dadd(122.256, 18.32, 16.091, 0.226)
pt3dadd(122.32, 18.219, 16.094, 0.226)
pt3dadd(122.383, 18.117, 16.096, 0.226)
pt3dadd(122.453, 18.02, 16.1, 0.226)
pt3dadd(122.527, 17.925, 16.106, 0.226)
pt3dadd(122.602, 17.831, 16.111, 0.226)
pt3dadd(122.676, 17.737, 16.116, 0.226)
pt3dadd(122.749, 17.643, 16.121, 0.226)
pt3dadd(122.824, 17.549, 16.126, 0.226)
pt3dadd(122.898, 17.455, 16.131, 0.226)
pt3dadd(122.972, 17.361, 16.136, 0.226)
pt3dadd(123.047, 17.267, 16.142, 0.226)
pt3dadd(123.121, 17.173, 16.147, 0.226)
pt3dadd(123.198, 17.081, 16.153, 0.23)
pt3dadd(123.278, 16.992, 16.16, 0.238)
pt3dadd(123.358, 16.903, 16.167, 0.244)
pt3dadd(123.438, 16.814, 16.175, 0.252)
pt3dadd(123.517, 16.725, 16.182, 0.258)
pt3dadd(123.598, 16.636, 16.189, 0.266)
pt3dadd(123.677, 16.546, 16.196, 0.274)
pt3dadd(123.757, 16.457, 16.204, 0.28)
pt3dadd(123.838, 16.368, 16.211, 0.288)
pt3dadd(123.917, 16.279, 16.218, 0.296)
pt3dadd(123.998, 16.192, 16.227, 0.316)
pt3dadd(124.082, 16.107, 16.238, 0.348)
pt3dadd(124.166, 16.022, 16.248, 0.378)
pt3dadd(124.249, 15.936, 16.259, 0.408)
pt3dadd(124.333, 15.851, 16.269, 0.44)
pt3dadd(124.416, 15.766, 16.28, 0.47)
pt3dadd(124.5, 15.681, 16.291, 0.502)
pt3dadd(124.583, 15.595, 16.301, 0.532)
pt3dadd(124.667, 15.51, 16.312, 0.564)
pt3dadd(124.751, 15.425, 16.322, 0.594)
pt3dadd(124.83, 15.342, 16.349, 0.63)
pt3dadd(124.906, 15.262, 16.388, 0.67)
pt3dadd(124.981, 15.181, 16.426, 0.71)
pt3dadd(125.058, 15.101, 16.465, 0.748)
pt3dadd(125.134, 15.021, 16.504, 0.788)
pt3dadd(125.209, 14.94, 16.542, 0.828)
pt3dadd(125.286, 14.86, 16.581, 0.868)
pt3dadd(125.362, 14.779, 16.62, 0.908)
pt3dadd(125.437, 14.699, 16.658, 0.946)
pt3dadd(125.514, 14.618, 16.697, 0.986)
pt3dadd(125.588, 14.536, 16.734, 1.008)
pt3dadd(125.663, 14.452, 16.769, 1.02)
pt3dadd(125.738, 14.369, 16.805, 1.034)
pt3dadd(125.813, 14.285, 16.84, 1.048)
pt3dadd(125.887, 14.201, 16.876, 1.06)
pt3dadd(125.963, 14.118, 16.911, 1.074)
pt3dadd(126.037, 14.034, 16.947, 1.086)
pt3dadd(126.112, 13.951, 16.982, 1.1)
pt3dadd(126.187, 13.867, 17.018, 1.114)
pt3dadd(126.262, 13.783, 17.054, 1.126)
pt3dadd(126.336, 13.696, 17.082, 1.114)
pt3dadd(126.412, 13.608, 17.107, 1.092)
pt3dadd(126.487, 13.519, 17.133, 1.07)
pt3dadd(126.562, 13.431, 17.159, 1.048)
pt3dadd(126.637, 13.343, 17.184, 1.026)
pt3dadd(126.712, 13.254, 17.21, 1.004)
pt3dadd(126.787, 13.166, 17.236, 0.982)
pt3dadd(126.863, 13.078, 17.261, 0.96)
pt3dadd(126.937, 12.989, 17.287, 0.938)
pt3dadd(127.013, 12.901, 17.312, 0.916)
pt3dadd(127.086, 12.81, 17.334, 0.876)
pt3dadd(127.159, 12.718, 17.355, 0.828)
pt3dadd(127.232, 12.626, 17.376, 0.78)
pt3dadd(127.306, 12.534, 17.396, 0.734)
pt3dadd(127.378, 12.442, 17.417, 0.686)
pt3dadd(127.451, 12.35, 17.438, 0.64)
pt3dadd(127.524, 12.258, 17.459, 0.592)
pt3dadd(127.597, 12.166, 17.479, 0.546)
pt3dadd(127.67, 12.074, 17.5, 0.498)
pt3dadd(127.744, 11.982, 17.521, 0.452)
pt3dadd(127.798, 11.883, 17.552, 0.428)
pt3dadd(127.848, 11.782, 17.586, 0.412)
pt3dadd(127.898, 11.681, 17.621, 0.396)
pt3dadd(127.948, 11.58, 17.655, 0.38)
pt3dadd(127.998, 11.479, 17.689, 0.364)
pt3dadd(128.047, 11.378, 17.723, 0.348)
pt3dadd(128.098, 11.277, 17.758, 0.332)
pt3dadd(128.148, 11.176, 17.792, 0.316)
pt3dadd(128.197, 11.075, 17.826, 0.298)
pt3dadd(128.248, 10.974, 17.861, 0.282)
pt3dadd(128.3, 10.872, 17.889, 0.276)
pt3dadd(128.356, 10.769, 17.915, 0.27)
pt3dadd(128.41, 10.667, 17.941, 0.264)
pt3dadd(128.465, 10.565, 17.967, 0.258)
pt3dadd(128.519, 10.463, 17.994, 0.254)
pt3dadd(128.573, 10.361, 18.02, 0.248)
pt3dadd(128.628, 10.259, 18.046, 0.242)
pt3dadd(128.682, 10.156, 18.073, 0.238)
pt3dadd(128.736, 10.054, 18.099, 0.232)
pt3dadd(128.791, 9.952, 18.125, 0.228)
pt3dadd(128.843, 9.847, 18.146, 0.238)
pt3dadd(128.894, 9.741, 18.166, 0.254)
pt3dadd(128.946, 9.635, 18.185, 0.27)
pt3dadd(128.998, 9.529, 18.205, 0.288)
pt3dadd(129.049, 9.424, 18.225, 0.304)
pt3dadd(129.101, 9.318, 18.245, 0.32)
pt3dadd(129.151, 9.212, 18.264, 0.336)
pt3dadd(129.203, 9.106, 18.284, 0.352)
pt3dadd(129.254, 9, 18.304, 0.368)
pt3dadd(129.306, 8.895, 18.323, 0.384)
pt3dadd(129.347, 8.783, 18.337, 0.43)
pt3dadd(129.385, 8.67, 18.35, 0.482)
pt3dadd(129.422, 8.558, 18.363, 0.532)
pt3dadd(129.461, 8.445, 18.376, 0.584)
pt3dadd(129.499, 8.332, 18.389, 0.636)
pt3dadd(129.538, 8.22, 18.401, 0.688)
pt3dadd(129.576, 8.107, 18.414, 0.74)
pt3dadd(129.614, 7.994, 18.427, 0.792)
pt3dadd(129.653, 7.882, 18.44, 0.844)
}
}
proc shape3d_9() {
dend_7[3] { pt3dadd(129.691, 7.769, 18.453, 0.896)
pt3dadd(129.725, 7.654, 18.461, 0.904)
pt3dadd(129.756, 7.539, 18.467, 0.904)
pt3dadd(129.788, 7.423, 18.474, 0.904)
pt3dadd(129.821, 7.308, 18.481, 0.904)
pt3dadd(129.853, 7.193, 18.488, 0.904)
pt3dadd(129.886, 7.078, 18.495, 0.904)
pt3dadd(129.918, 6.962, 18.501, 0.904)
pt3dadd(129.95, 6.847, 18.508, 0.904)
pt3dadd(129.983, 6.732, 18.515, 0.904)
pt3dadd(130.015, 6.616, 18.522, 0.904)
pt3dadd(130.063, 6.507, 18.531, 0.88)
pt3dadd(130.114, 6.399, 18.541, 0.852)
pt3dadd(130.165, 6.291, 18.551, 0.824)
pt3dadd(130.217, 6.184, 18.56, 0.796)
pt3dadd(130.267, 6.076, 18.57, 0.768)
pt3dadd(130.319, 5.968, 18.58, 0.738)
pt3dadd(130.37, 5.86, 18.59, 0.71)
pt3dadd(130.421, 5.752, 18.599, 0.682)
pt3dadd(130.472, 5.644, 18.609, 0.654)
pt3dadd(130.523, 5.536, 18.619, 0.626)
pt3dadd(130.576, 5.431, 18.64, 0.6)
pt3dadd(130.628, 5.327, 18.663, 0.574)
pt3dadd(130.681, 5.222, 18.685, 0.548)
pt3dadd(130.733, 5.118, 18.708, 0.524)
pt3dadd(130.786, 5.013, 18.73, 0.498)
pt3dadd(130.838, 4.909, 18.753, 0.472)
pt3dadd(130.89, 4.804, 18.775, 0.448)
pt3dadd(130.943, 4.7, 18.798, 0.422)
pt3dadd(130.996, 4.596, 18.82, 0.396)
pt3dadd(131.048, 4.491, 18.843, 0.37)
pt3dadd(131.1, 4.39, 18.875, 0.356)
pt3dadd(131.152, 4.289, 18.908, 0.342)
pt3dadd(131.203, 4.188, 18.94, 0.328)
pt3dadd(131.256, 4.087, 18.973, 0.312)
pt3dadd(131.308, 3.986, 19.005, 0.298)
pt3dadd(131.359, 3.885, 19.038, 0.284)
pt3dadd(131.411, 3.785, 19.07, 0.27)
pt3dadd(131.462, 3.684, 19.103, 0.256)
pt3dadd(131.515, 3.583, 19.136, 0.24)
pt3dadd(131.567, 3.482, 19.168, 0.226)
pt3dadd(131.635, 3.387, 19.19, 0.226)
pt3dadd(131.704, 3.292, 19.211, 0.226)
pt3dadd(131.773, 3.198, 19.233, 0.226)
pt3dadd(131.843, 3.103, 19.254, 0.226)
pt3dadd(131.911, 3.008, 19.275, 0.226)
pt3dadd(131.981, 2.913, 19.297, 0.226)
pt3dadd(132.049, 2.819, 19.318, 0.226)
pt3dadd(132.119, 2.724, 19.339, 0.226)
pt3dadd(132.188, 2.629, 19.361, 0.226)
pt3dadd(132.257, 2.535, 19.382, 0.226)
pt3dadd(132.335, 2.444, 19.393, 0.236)
pt3dadd(132.412, 2.353, 19.404, 0.246)
pt3dadd(132.49, 2.263, 19.415, 0.256)
pt3dadd(132.568, 2.172, 19.425, 0.264)
pt3dadd(132.646, 2.082, 19.436, 0.274)
pt3dadd(132.722, 1.991, 19.447, 0.284)
pt3dadd(132.8, 1.9, 19.458, 0.294)
pt3dadd(132.878, 1.81, 19.468, 0.304)
pt3dadd(132.955, 1.719, 19.479, 0.314)
pt3dadd(133.033, 1.629, 19.49, 0.324)
pt3dadd(133.114, 1.54, 19.497, 0.336)
pt3dadd(133.193, 1.451, 19.505, 0.35)
pt3dadd(133.273, 1.362, 19.512, 0.362)
pt3dadd(133.354, 1.273, 19.519, 0.376)
pt3dadd(133.433, 1.184, 19.527, 0.388)
pt3dadd(133.513, 1.095, 19.534, 0.4)
pt3dadd(133.594, 1.006, 19.542, 0.414)
pt3dadd(133.674, 0.917, 19.549, 0.426)
pt3dadd(133.753, 0.828, 19.556, 0.44)
pt3dadd(133.834, 0.739, 19.564, 0.452)
}
dend_7[4] {pt3dclear()
pt3dadd(123.882, 65.664, 14.438, 0.452)
pt3dadd(123.883, 65.646, 14.459, 0.464)
pt3dadd(123.887, 65.574, 14.54, 0.51)
pt3dadd(123.89, 65.503, 14.62, 0.556)
pt3dadd(123.894, 65.432, 14.701, 0.6)
pt3dadd(123.898, 65.361, 14.781, 0.646)
pt3dadd(123.901, 65.29, 14.862, 0.692)
pt3dadd(123.905, 65.219, 14.942, 0.738)
pt3dadd(123.908, 65.148, 15.023, 0.782)
pt3dadd(123.912, 65.077, 15.103, 0.828)
pt3dadd(123.916, 65.006, 15.184, 0.874)
pt3dadd(123.919, 64.935, 15.264, 0.92)
pt3dadd(123.923, 64.864, 15.345, 0.966)
pt3dadd(123.926, 64.792, 15.425, 1.01)
pt3dadd(123.93, 64.721, 15.505, 1.056)
pt3dadd(123.934, 64.65, 15.586, 1.102)
pt3dadd(123.937, 64.579, 15.666, 1.148)
pt3dadd(123.941, 64.508, 15.747, 1.192)
pt3dadd(123.944, 64.437, 15.827, 1.238)
pt3dadd(123.965, 64.35, 15.893, 1.284)
pt3dadd(123.99, 64.259, 15.955, 1.33)
pt3dadd(124.015, 64.168, 16.016, 1.374)
pt3dadd(124.042, 64.076, 16.077, 1.42)
pt3dadd(124.067, 63.985, 16.138, 1.466)
pt3dadd(124.092, 63.894, 16.199, 1.51)
pt3dadd(124.118, 63.802, 16.261, 1.556)
pt3dadd(124.144, 63.711, 16.322, 1.602)
pt3dadd(124.169, 63.619, 16.383, 1.646)
pt3dadd(124.195, 63.528, 16.444, 1.692)
pt3dadd(124.234, 63.432, 16.495, 1.698)
pt3dadd(124.273, 63.335, 16.544, 1.7)
pt3dadd(124.313, 63.239, 16.594, 1.702)
pt3dadd(124.352, 63.142, 16.643, 1.704)
pt3dadd(124.392, 63.046, 16.692, 1.704)
pt3dadd(124.432, 62.949, 16.742, 1.706)
pt3dadd(124.471, 62.853, 16.791, 1.708)
pt3dadd(124.511, 62.756, 16.84, 1.71)
pt3dadd(124.55, 62.66, 16.89, 1.712)
pt3dadd(124.59, 62.563, 16.939, 1.714)
}
dend_7[5] {pt3dclear()
pt3dadd(124.59, 62.563, 16.939, 1.714)
pt3dadd(124.53, 62.604, 16.979, 1.65)
pt3dadd(124.447, 62.661, 17.034, 1.564)
pt3dadd(124.364, 62.717, 17.09, 1.478)
pt3dadd(124.282, 62.774, 17.145, 1.392)
pt3dadd(124.2, 62.83, 17.2, 1.304)
pt3dadd(124.117, 62.887, 17.255, 1.218)
pt3dadd(124.034, 62.943, 17.31, 1.132)
pt3dadd(123.952, 63, 17.365, 1.046)
pt3dadd(123.869, 63.056, 17.42, 0.96)
pt3dadd(123.786, 63.113, 17.476, 0.872)
pt3dadd(123.703, 63.169, 17.531, 0.786)
pt3dadd(123.622, 63.226, 17.586, 0.7)
pt3dadd(123.58, 63.287, 17.661, 0.678)
pt3dadd(123.553, 63.349, 17.744, 0.678)
pt3dadd(123.526, 63.412, 17.826, 0.678)
pt3dadd(123.499, 63.475, 17.908, 0.678)
pt3dadd(123.463, 63.545, 17.981, 0.678)
pt3dadd(123.406, 63.632, 18.029, 0.678)
pt3dadd(123.347, 63.719, 18.078, 0.678)
pt3dadd(123.289, 63.807, 18.126, 0.678)
pt3dadd(123.23, 63.888, 18.179, 0.678)
pt3dadd(123.173, 63.939, 18.256, 0.678)
pt3dadd(123.116, 63.99, 18.333, 0.678)
pt3dadd(123.059, 64.041, 18.41, 0.678)
pt3dadd(123.001, 64.092, 18.487, 0.678)
pt3dadd(123, 64.137, 18.579, 0.678)
pt3dadd(123, 64.181, 18.672, 0.678)
pt3dadd(123, 64.226, 18.765, 0.678)
pt3dadd(123, 64.27, 18.858, 0.678)
pt3dadd(123, 64.315, 18.951, 0.678)
pt3dadd(122.968, 64.367, 19.033, 0.678)
pt3dadd(122.914, 64.425, 19.108, 0.678)
pt3dadd(122.858, 64.483, 19.183, 0.678)
pt3dadd(122.804, 64.541, 19.258, 0.678)
pt3dadd(122.771, 64.601, 19.337, 0.678)
pt3dadd(122.764, 64.664, 19.422, 0.678)
pt3dadd(122.76, 64.734, 19.502, 0.678)
pt3dadd(122.76, 64.816, 19.576, 0.678)
pt3dadd(122.76, 64.884, 19.654, 0.678)
pt3dadd(122.76, 64.898, 19.753, 0.678)
pt3dadd(122.76, 64.913, 19.853, 0.678)
pt3dadd(122.76, 64.92, 19.952, 0.678)
pt3dadd(122.76, 64.92, 20.052, 0.678)
pt3dadd(122.76, 64.92, 20.152, 0.678)
pt3dadd(122.76, 64.92, 20.252, 0.678)
pt3dadd(122.76, 64.92, 20.352, 0.678)
pt3dadd(122.76, 64.93, 20.452, 0.678)
pt3dadd(122.76, 64.95, 20.55, 0.678)
pt3dadd(122.76, 64.97, 20.649, 0.678)
pt3dadd(122.76, 64.989, 20.748, 0.678)
pt3dadd(122.76, 65.009, 20.846, 0.678)
pt3dadd(122.76, 65.029, 20.945, 0.678)
pt3dadd(122.76, 65.04, 21.044, 0.678)
pt3dadd(122.76, 65.04, 21.144, 0.678)
pt3dadd(122.76, 65.04, 21.244, 0.678)
pt3dadd(122.784, 65.04, 21.34, 0.678)
pt3dadd(122.837, 65.04, 21.429, 0.678)
pt3dadd(122.897, 65.04, 21.515, 0.678)
pt3dadd(122.978, 65.04, 21.588, 0.678)
pt3dadd(123.061, 65.046, 21.658, 0.678)
pt3dadd(123.154, 65.117, 21.681, 0.678)
pt3dadd(123.236, 65.189, 21.714, 0.678)
pt3dadd(123.281, 65.265, 21.781, 0.678)
pt3dadd(123.326, 65.342, 21.849, 0.678)
pt3dadd(123.368, 65.4, 21.923, 0.678)
pt3dadd(123.401, 65.4, 22.019, 0.678)
pt3dadd(123.434, 65.4, 22.115, 0.678)
pt3dadd(123.467, 65.4, 22.211, 0.678)
pt3dadd(123.491, 65.407, 22.309, 0.678)
pt3dadd(123.514, 65.414, 22.407, 0.678)
pt3dadd(123.538, 65.421, 22.505, 0.678)
pt3dadd(123.56, 65.428, 22.603, 0.678)
pt3dadd(123.584, 65.435, 22.701, 0.678)
pt3dadd(123.593, 65.444, 22.799, 0.678)
pt3dadd(123.571, 65.459, 22.896, 0.678)
pt3dadd(123.548, 65.474, 22.994, 0.678)
pt3dadd(123.527, 65.489, 23.091, 0.678)
pt3dadd(123.505, 65.503, 23.189, 0.678)
pt3dadd(123.484, 65.518, 23.286, 0.678)
pt3dadd(123.48, 65.505, 23.385, 0.678)
pt3dadd(123.48, 65.488, 23.484, 0.678)
pt3dadd(123.48, 65.471, 23.583, 0.678)
pt3dadd(123.48, 65.453, 23.682, 0.678)
pt3dadd(123.48, 65.436, 23.781, 0.678)
pt3dadd(123.48, 65.419, 23.88, 0.678)
pt3dadd(123.48, 65.387, 23.976, 0.678)
pt3dadd(123.48, 65.348, 24.071, 0.678)
pt3dadd(123.48, 65.309, 24.165, 0.678)
pt3dadd(123.48, 65.271, 24.26, 0.678)
}
}
proc shape3d_10() {
dend_7[5] { pt3dadd(123.48, 65.232, 24.354, 0.678)
pt3dadd(123.48, 65.196, 24.45, 0.678)
pt3dadd(123.48, 65.176, 24.548, 0.678)
pt3dadd(123.48, 65.155, 24.647, 0.678)
pt3dadd(123.48, 65.09, 24.721, 0.678)
pt3dadd(123.48, 64.991, 24.778, 0.678)
pt3dadd(123.48, 64.905, 24.845, 0.678)
pt3dadd(123.48, 64.837, 24.928, 0.678)
pt3dadd(123.462, 64.771, 25.005, 0.678)
pt3dadd(123.394, 64.71, 25.069, 0.678)
pt3dadd(123.308, 64.645, 25.105, 0.678)
pt3dadd(123.21, 64.578, 25.115, 0.678)
pt3dadd(123.112, 64.511, 25.125, 0.678)
pt3dadd(123.011, 64.452, 25.138, 0.678)
pt3dadd(122.898, 64.446, 25.173, 0.678)
pt3dadd(122.785, 64.441, 25.207, 0.678)
pt3dadd(122.677, 64.44, 25.251, 0.678)
pt3dadd(122.57, 64.44, 25.295, 0.678)
pt3dadd(122.462, 64.44, 25.34, 0.678)
pt3dadd(122.411, 64.44, 25.428, 0.678)
pt3dadd(122.365, 64.44, 25.52, 0.678)
pt3dadd(122.281, 64.44, 25.583, 0.678)
pt3dadd(122.173, 64.44, 25.628, 0.678)
pt3dadd(122.066, 64.44, 25.673, 0.678)
pt3dadd(121.962, 64.48, 25.692, 0.678)
pt3dadd(121.861, 64.544, 25.698, 0.678)
pt3dadd(121.796, 64.635, 25.7, 0.678)
pt3dadd(121.732, 64.731, 25.717, 0.678)
pt3dadd(121.655, 64.819, 25.739, 0.678)
pt3dadd(121.579, 64.908, 25.762, 0.678)
pt3dadd(121.502, 64.996, 25.785, 0.678)
pt3dadd(121.429, 65.074, 25.823, 0.678)
pt3dadd(121.361, 65.133, 25.889, 0.678)
pt3dadd(121.291, 65.192, 25.954, 0.678)
pt3dadd(121.223, 65.251, 26.02, 0.678)
pt3dadd(121.158, 65.306, 26.09, 0.678)
pt3dadd(121.102, 65.349, 26.17, 0.678)
pt3dadd(121.045, 65.393, 26.251, 0.678)
pt3dadd(120.989, 65.437, 26.331, 0.678)
pt3dadd(120.934, 65.481, 26.411, 0.678)
pt3dadd(120.857, 65.557, 26.456, 0.678)
pt3dadd(120.782, 65.635, 26.5, 0.678)
pt3dadd(120.715, 65.718, 26.544, 0.678)
pt3dadd(120.658, 65.804, 26.594, 0.678)
pt3dadd(120.613, 65.893, 26.65, 0.678)
pt3dadd(120.6, 66.002, 26.68, 0.678)
pt3dadd(120.6, 66.12, 26.7, 0.678)
}
dend_7[6] {pt3dclear()
pt3dadd(124.59, 62.563, 16.939, 1.714)
pt3dadd(124.652, 62.468, 16.971, 1.586)
pt3dadd(124.715, 62.373, 17.003, 1.458)
pt3dadd(124.777, 62.278, 17.035, 1.332)
pt3dadd(124.84, 62.183, 17.066, 1.204)
pt3dadd(124.902, 62.088, 17.098, 1.078)
pt3dadd(124.966, 61.993, 17.13, 0.95)
pt3dadd(125.028, 61.898, 17.162, 0.822)
pt3dadd(125.09, 61.803, 17.194, 0.696)
pt3dadd(125.153, 61.708, 17.226, 0.568)
pt3dadd(125.215, 61.613, 17.257, 0.442)
}
dend_7[7] {pt3dclear()
pt3dadd(125.215, 61.613, 17.257, 0.442)
pt3dadd(125.239, 61.571, 17.268, 0.434)
pt3dadd(125.299, 61.471, 17.292, 0.414)
pt3dadd(125.358, 61.37, 17.316, 0.394)
pt3dadd(125.417, 61.27, 17.341, 0.376)
pt3dadd(125.476, 61.17, 17.365, 0.356)
pt3dadd(125.534, 61.069, 17.39, 0.336)
pt3dadd(125.593, 60.969, 17.414, 0.318)
pt3dadd(125.652, 60.868, 17.439, 0.298)
pt3dadd(125.711, 60.768, 17.463, 0.278)
pt3dadd(125.77, 60.668, 17.488, 0.26)
pt3dadd(125.84, 60.582, 17.519, 0.262)
pt3dadd(125.929, 60.519, 17.561, 0.294)
pt3dadd(126.017, 60.455, 17.603, 0.326)
pt3dadd(126.106, 60.391, 17.645, 0.358)
pt3dadd(126.193, 60.327, 17.687, 0.392)
pt3dadd(126.282, 60.263, 17.729, 0.424)
pt3dadd(126.371, 60.2, 17.771, 0.456)
pt3dadd(126.458, 60.136, 17.813, 0.49)
pt3dadd(126.547, 60.072, 17.855, 0.522)
pt3dadd(126.635, 60.008, 17.897, 0.554)
pt3dadd(126.728, 59.947, 17.934, 0.568)
pt3dadd(126.824, 59.889, 17.968, 0.566)
pt3dadd(126.922, 59.83, 18.002, 0.564)
pt3dadd(127.018, 59.772, 18.036, 0.562)
pt3dadd(127.115, 59.714, 18.07, 0.56)
pt3dadd(127.211, 59.655, 18.104, 0.558)
pt3dadd(127.308, 59.597, 18.138, 0.556)
pt3dadd(127.404, 59.538, 18.172, 0.556)
pt3dadd(127.501, 59.48, 18.206, 0.554)
pt3dadd(127.597, 59.421, 18.24, 0.552)
pt3dadd(127.699, 59.369, 18.27, 0.55)
pt3dadd(127.805, 59.322, 18.297, 0.548)
pt3dadd(127.91, 59.276, 18.324, 0.546)
pt3dadd(128.016, 59.229, 18.351, 0.544)
pt3dadd(128.122, 59.182, 18.378, 0.542)
pt3dadd(128.227, 59.135, 18.406, 0.54)
pt3dadd(128.333, 59.088, 18.433, 0.538)
pt3dadd(128.437, 59.041, 18.46, 0.536)
pt3dadd(128.543, 58.995, 18.487, 0.536)
pt3dadd(128.648, 58.948, 18.514, 0.534)
pt3dadd(128.759, 58.912, 18.541, 0.546)
pt3dadd(128.87, 58.882, 18.567, 0.568)
pt3dadd(128.982, 58.853, 18.594, 0.59)
pt3dadd(129.095, 58.823, 18.62, 0.61)
pt3dadd(129.206, 58.794, 18.646, 0.632)
pt3dadd(129.318, 58.764, 18.673, 0.654)
pt3dadd(129.431, 58.735, 18.699, 0.676)
pt3dadd(129.542, 58.705, 18.725, 0.696)
pt3dadd(129.654, 58.676, 18.751, 0.718)
pt3dadd(129.766, 58.647, 18.778, 0.74)
pt3dadd(129.876, 58.623, 18.813, 0.77)
pt3dadd(129.984, 58.602, 18.853, 0.804)
pt3dadd(130.092, 58.582, 18.892, 0.84)
pt3dadd(130.2, 58.561, 18.932, 0.874)
pt3dadd(130.309, 58.541, 18.971, 0.91)
pt3dadd(130.417, 58.521, 19.011, 0.944)
pt3dadd(130.525, 58.5, 19.05, 0.98)
pt3dadd(130.633, 58.479, 19.09, 1.014)
pt3dadd(130.742, 58.459, 19.129, 1.048)
pt3dadd(130.85, 58.438, 19.169, 1.084)
pt3dadd(130.961, 58.421, 19.204, 1.054)
pt3dadd(131.074, 58.405, 19.236, 0.992)
pt3dadd(131.186, 58.39, 19.269, 0.928)
pt3dadd(131.298, 58.374, 19.301, 0.866)
pt3dadd(131.411, 58.358, 19.334, 0.804)
pt3dadd(131.524, 58.342, 19.366, 0.74)
pt3dadd(131.635, 58.327, 19.399, 0.678)
pt3dadd(131.748, 58.311, 19.431, 0.616)
pt3dadd(131.861, 58.295, 19.464, 0.554)
pt3dadd(131.972, 58.28, 19.496, 0.49)
pt3dadd(132.083, 58.249, 19.525, 0.462)
pt3dadd(132.193, 58.212, 19.551, 0.448)
pt3dadd(132.302, 58.175, 19.578, 0.436)
pt3dadd(132.412, 58.138, 19.604, 0.424)
pt3dadd(132.522, 58.101, 19.631, 0.41)
pt3dadd(132.631, 58.064, 19.657, 0.398)
pt3dadd(132.74, 58.027, 19.684, 0.384)
pt3dadd(132.851, 57.99, 19.71, 0.372)
pt3dadd(132.96, 57.953, 19.737, 0.358)
pt3dadd(133.069, 57.916, 19.763, 0.346)
pt3dadd(133.176, 57.874, 19.793, 0.362)
pt3dadd(133.282, 57.831, 19.825, 0.386)
pt3dadd(133.387, 57.788, 19.856, 0.41)
pt3dadd(133.493, 57.745, 19.887, 0.434)
pt3dadd(133.598, 57.701, 19.919, 0.46)
pt3dadd(133.704, 57.658, 19.95, 0.484)
pt3dadd(133.81, 57.615, 19.981, 0.508)
pt3dadd(133.914, 57.572, 20.012, 0.532)
pt3dadd(134.02, 57.529, 20.044, 0.556)
pt3dadd(134.125, 57.485, 20.075, 0.582)
pt3dadd(134.228, 57.449, 20.116, 0.612)
pt3dadd(134.332, 57.414, 20.159, 0.644)
pt3dadd(134.434, 57.379, 20.202, 0.676)
pt3dadd(134.537, 57.344, 20.245, 0.708)
pt3dadd(134.639, 57.309, 20.288, 0.74)
pt3dadd(134.741, 57.273, 20.33, 0.772)
pt3dadd(134.844, 57.238, 20.373, 0.802)
pt3dadd(134.946, 57.203, 20.416, 0.834)
pt3dadd(135.049, 57.168, 20.459, 0.866)
pt3dadd(135.151, 57.133, 20.502, 0.898)
pt3dadd(135.258, 57.102, 20.541, 0.904)
pt3dadd(135.365, 57.073, 20.578, 0.904)
pt3dadd(135.473, 57.043, 20.616, 0.904)
pt3dadd(135.58, 57.013, 20.653, 0.904)
pt3dadd(135.686, 56.983, 20.691, 0.904)
pt3dadd(135.793, 56.953, 20.728, 0.904)
pt3dadd(135.901, 56.923, 20.766, 0.904)
pt3dadd(136.008, 56.893, 20.803, 0.904)
pt3dadd(136.115, 56.863, 20.841, 0.904)
pt3dadd(136.223, 56.834, 20.878, 0.904)
pt3dadd(136.308, 56.782, 20.932, 0.904)
pt3dadd(136.39, 56.726, 20.989, 0.904)
pt3dadd(136.47, 56.67, 21.046, 0.904)
pt3dadd(136.552, 56.614, 21.103, 0.904)
pt3dadd(136.633, 56.558, 21.16, 0.904)
pt3dadd(136.714, 56.502, 21.217, 0.904)
pt3dadd(136.795, 56.446, 21.274, 0.904)
pt3dadd(136.877, 56.39, 21.331, 0.904)
pt3dadd(136.957, 56.334, 21.388, 0.904)
pt3dadd(137.039, 56.278, 21.445, 0.904)
pt3dadd(137.137, 56.229, 21.484, 0.854)
pt3dadd(137.238, 56.181, 21.52, 0.796)
pt3dadd(137.339, 56.133, 21.556, 0.74)
pt3dadd(137.44, 56.085, 21.593, 0.682)
pt3dadd(137.54, 56.037, 21.629, 0.624)
pt3dadd(137.641, 55.988, 21.666, 0.568)
pt3dadd(137.742, 55.94, 21.702, 0.51)
pt3dadd(137.843, 55.892, 21.738, 0.452)
pt3dadd(137.944, 55.844, 21.775, 0.396)
pt3dadd(138.044, 55.795, 21.811, 0.338)
pt3dadd(138.155, 55.759, 21.835, 0.324)
pt3dadd(138.266, 55.723, 21.858, 0.314)
pt3dadd(138.378, 55.687, 21.881, 0.302)
pt3dadd(138.488, 55.651, 21.904, 0.292)
pt3dadd(138.6, 55.616, 21.927, 0.28)
pt3dadd(138.712, 55.58, 21.95, 0.27)
pt3dadd(138.822, 55.544, 21.973, 0.258)
pt3dadd(138.934, 55.508, 21.996, 0.248)
pt3dadd(139.045, 55.473, 22.018, 0.238)
pt3dadd(139.156, 55.437, 22.042, 0.226)
pt3dadd(139.265, 55.389, 22.057, 0.226)
}
}
proc shape3d_11() {
dend_7[7] { pt3dadd(139.373, 55.342, 22.073, 0.226)
pt3dadd(139.482, 55.294, 22.089, 0.226)
pt3dadd(139.59, 55.247, 22.104, 0.226)
pt3dadd(139.699, 55.199, 22.12, 0.226)
pt3dadd(139.807, 55.151, 22.135, 0.226)
pt3dadd(139.915, 55.104, 22.151, 0.226)
pt3dadd(140.024, 55.056, 22.167, 0.226)
pt3dadd(140.132, 55.009, 22.182, 0.226)
pt3dadd(140.242, 54.961, 22.198, 0.226)
pt3dadd(140.347, 54.912, 22.223, 0.226)
pt3dadd(140.452, 54.864, 22.249, 0.226)
pt3dadd(140.557, 54.815, 22.274, 0.226)
pt3dadd(140.663, 54.767, 22.299, 0.226)
pt3dadd(140.768, 54.718, 22.325, 0.226)
pt3dadd(140.874, 54.669, 22.35, 0.226)
pt3dadd(140.98, 54.621, 22.375, 0.226)
pt3dadd(141.085, 54.572, 22.401, 0.226)
pt3dadd(141.19, 54.524, 22.426, 0.226)
pt3dadd(141.295, 54.476, 22.453, 0.226)
pt3dadd(141.396, 54.433, 22.494, 0.228)
pt3dadd(141.497, 54.391, 22.536, 0.228)
pt3dadd(141.598, 54.349, 22.577, 0.23)
pt3dadd(141.698, 54.306, 22.618, 0.232)
pt3dadd(141.799, 54.264, 22.659, 0.232)
pt3dadd(141.9, 54.222, 22.701, 0.234)
pt3dadd(142.001, 54.18, 22.742, 0.236)
pt3dadd(142.102, 54.137, 22.783, 0.236)
pt3dadd(142.202, 54.095, 22.824, 0.238)
pt3dadd(142.302, 54.05, 22.864, 0.242)
pt3dadd(142.398, 53.99, 22.897, 0.274)
pt3dadd(142.494, 53.929, 22.929, 0.306)
pt3dadd(142.59, 53.869, 22.962, 0.338)
pt3dadd(142.686, 53.808, 22.994, 0.37)
pt3dadd(142.782, 53.748, 23.027, 0.402)
pt3dadd(142.878, 53.687, 23.059, 0.434)
pt3dadd(142.974, 53.627, 23.092, 0.466)
pt3dadd(143.07, 53.566, 23.124, 0.498)
pt3dadd(143.166, 53.505, 23.157, 0.53)
pt3dadd(143.262, 53.446, 23.191, 0.56)
pt3dadd(143.358, 53.396, 23.235, 0.572)
pt3dadd(143.453, 53.346, 23.279, 0.584)
pt3dadd(143.549, 53.296, 23.323, 0.596)
pt3dadd(143.645, 53.246, 23.366, 0.608)
pt3dadd(143.74, 53.196, 23.41, 0.62)
pt3dadd(143.836, 53.146, 23.454, 0.632)
pt3dadd(143.93, 53.096, 23.498, 0.644)
pt3dadd(144.026, 53.046, 23.542, 0.656)
pt3dadd(144.122, 52.996, 23.586, 0.668)
pt3dadd(144.217, 52.946, 23.63, 0.678)
pt3dadd(144.311, 52.896, 23.676, 0.678)
pt3dadd(144.406, 52.845, 23.722, 0.678)
pt3dadd(144.499, 52.795, 23.767, 0.678)
pt3dadd(144.594, 52.745, 23.813, 0.678)
pt3dadd(144.688, 52.694, 23.859, 0.678)
pt3dadd(144.781, 52.644, 23.905, 0.678)
pt3dadd(144.876, 52.593, 23.95, 0.678)
pt3dadd(144.97, 52.543, 23.996, 0.678)
pt3dadd(145.064, 52.493, 24.042, 0.678)
pt3dadd(145.157, 52.438, 24.084, 0.678)
pt3dadd(145.248, 52.369, 24.116, 0.678)
pt3dadd(145.338, 52.301, 24.149, 0.678)
pt3dadd(145.429, 52.232, 24.181, 0.678)
pt3dadd(145.519, 52.164, 24.213, 0.678)
pt3dadd(145.61, 52.096, 24.246, 0.678)
pt3dadd(145.7, 52.027, 24.278, 0.678)
pt3dadd(145.792, 51.959, 24.31, 0.678)
pt3dadd(145.882, 51.89, 24.343, 0.678)
pt3dadd(145.973, 51.822, 24.375, 0.678)
pt3dadd(146.058, 51.754, 24.414, 0.684)
pt3dadd(146.128, 51.686, 24.473, 0.706)
pt3dadd(146.198, 51.619, 24.531, 0.728)
pt3dadd(146.268, 51.551, 24.59, 0.75)
pt3dadd(146.339, 51.483, 24.648, 0.772)
pt3dadd(146.408, 51.416, 24.707, 0.796)
pt3dadd(146.478, 51.348, 24.765, 0.818)
pt3dadd(146.549, 51.281, 24.824, 0.84)
pt3dadd(146.618, 51.213, 24.882, 0.862)
pt3dadd(146.688, 51.146, 24.941, 0.884)
pt3dadd(146.759, 51.071, 24.99, 0.894)
pt3dadd(146.828, 50.978, 25.014, 0.874)
pt3dadd(146.898, 50.885, 25.038, 0.854)
pt3dadd(146.968, 50.792, 25.063, 0.834)
pt3dadd(147.037, 50.699, 25.087, 0.814)
pt3dadd(147.108, 50.605, 25.111, 0.794)
pt3dadd(147.178, 50.512, 25.135, 0.774)
pt3dadd(147.247, 50.419, 25.16, 0.754)
pt3dadd(147.317, 50.326, 25.184, 0.734)
pt3dadd(147.386, 50.233, 25.208, 0.714)
pt3dadd(147.455, 50.15, 25.246, 0.704)
pt3dadd(147.516, 50.094, 25.319, 0.718)
pt3dadd(147.577, 50.039, 25.391, 0.732)
pt3dadd(147.638, 49.983, 25.463, 0.746)
pt3dadd(147.7, 49.927, 25.535, 0.76)
pt3dadd(147.761, 49.871, 25.608, 0.774)
pt3dadd(147.823, 49.816, 25.68, 0.788)
pt3dadd(147.84, 49.714, 25.7, 0.792)
pt3dadd(147.84, 49.594, 25.7, 0.792)
pt3dadd(147.84, 49.474, 25.7, 0.792)
pt3dadd(147.84, 49.354, 25.7, 0.792)
pt3dadd(147.84, 49.234, 25.7, 0.792)
pt3dadd(147.84, 49.114, 25.7, 0.792)
pt3dadd(147.84, 48.994, 25.7, 0.792)
pt3dadd(147.84, 48.874, 25.7, 0.792)
pt3dadd(147.84, 48.754, 25.7, 0.792)
pt3dadd(147.84, 48.634, 25.7, 0.792)
pt3dadd(147.844, 48.514, 25.7, 0.792)
pt3dadd(147.848, 48.394, 25.7, 0.792)
pt3dadd(147.852, 48.274, 25.7, 0.792)
pt3dadd(147.886, 48.16, 25.7, 0.792)
pt3dadd(147.926, 48.046, 25.7, 0.792)
pt3dadd(147.979, 47.94, 25.7, 0.792)
pt3dadd(148.046, 47.841, 25.7, 0.792)
pt3dadd(148.122, 47.759, 25.716, 0.792)
pt3dadd(148.216, 47.715, 25.768, 0.792)
pt3dadd(148.308, 47.671, 25.82, 0.792)
pt3dadd(148.402, 47.627, 25.87, 0.792)
pt3dadd(148.496, 47.583, 25.919, 0.792)
pt3dadd(148.555, 47.542, 25.989, 0.792)
pt3dadd(148.609, 47.491, 26.065, 0.792)
pt3dadd(148.674, 47.436, 26.135, 0.792)
pt3dadd(148.74, 47.381, 26.206, 0.792)
pt3dadd(148.805, 47.325, 26.276, 0.792)
pt3dadd(148.878, 47.255, 26.327, 0.792)
pt3dadd(148.956, 47.178, 26.367, 0.792)
pt3dadd(149.033, 47.1, 26.408, 0.792)
pt3dadd(149.111, 47.023, 26.448, 0.792)
pt3dadd(149.159, 46.924, 26.474, 0.792)
pt3dadd(149.183, 46.808, 26.489, 0.792)
pt3dadd(149.221, 46.701, 26.506, 0.792)
pt3dadd(149.306, 46.622, 26.53, 0.792)
pt3dadd(149.393, 46.571, 26.571, 0.792)
pt3dadd(149.477, 46.564, 26.642, 0.792)
pt3dadd(149.573, 46.56, 26.696, 0.792)
pt3dadd(149.689, 46.56, 26.718, 0.792)
pt3dadd(149.807, 46.56, 26.74, 0.792)
pt3dadd(149.897, 46.557, 26.803, 0.792)
pt3dadd(149.982, 46.553, 26.873, 0.792)
pt3dadd(150.066, 46.549, 26.944, 0.792)
pt3dadd(150.156, 46.521, 26.991, 0.792)
pt3dadd(150.252, 46.45, 26.996, 0.792)
pt3dadd(150.33, 46.366, 27, 0.792)
pt3dadd(150.377, 46.256, 27, 0.792)
pt3dadd(150.437, 46.153, 27, 0.792)
pt3dadd(150.502, 46.052, 27, 0.792)
pt3dadd(150.577, 45.958, 27, 0.792)
pt3dadd(150.655, 45.868, 27, 0.792)
pt3dadd(150.749, 45.793, 27, 0.792)
pt3dadd(150.842, 45.719, 27, 0.792)
pt3dadd(150.954, 45.672, 27, 0.792)
pt3dadd(151.064, 45.626, 27, 0.792)
pt3dadd(151.17, 45.58, 27.023, 0.792)
pt3dadd(151.274, 45.534, 27.054, 0.792)
pt3dadd(151.379, 45.488, 27.086, 0.792)
pt3dadd(151.429, 45.402, 27.102, 0.792)
pt3dadd(151.434, 45.282, 27.106, 0.792)
pt3dadd(151.439, 45.162, 27.11, 0.792)
pt3dadd(151.505, 45.09, 27.151, 0.792)
pt3dadd(151.59, 45.034, 27.202, 0.792)
pt3dadd(151.686, 44.992, 27.246, 0.792)
pt3dadd(151.799, 44.974, 27.277, 0.792)
pt3dadd(151.906, 44.939, 27.3, 0.792)
pt3dadd(152.003, 44.873, 27.314, 0.792)
pt3dadd(152.102, 44.812, 27.339, 0.792)
pt3dadd(152.202, 44.752, 27.364, 0.792)
pt3dadd(152.3, 44.692, 27.389, 0.792)
pt3dadd(152.398, 44.628, 27.414, 0.792)
pt3dadd(152.473, 44.54, 27.437, 0.792)
pt3dadd(152.55, 44.451, 27.46, 0.792)
pt3dadd(152.626, 44.363, 27.483, 0.792)
pt3dadd(152.702, 44.274, 27.506, 0.792)
pt3dadd(152.767, 44.177, 27.526, 0.792)
pt3dadd(152.83, 44.077, 27.546, 0.792)
pt3dadd(152.891, 43.977, 27.565, 0.792)
pt3dadd(152.953, 43.877, 27.585, 0.792)
pt3dadd(153.013, 43.775, 27.6, 0.792)
pt3dadd(153.066, 43.667, 27.6, 0.792)
pt3dadd(153.12, 43.56, 27.6, 0.792)
}
dend_7[8] {pt3dclear()
pt3dadd(125.215, 61.613, 17.257, 0.442)
pt3dadd(125.17, 61.575, 17.247, 0.442)
pt3dadd(125.078, 61.5, 17.227, 0.444)
pt3dadd(124.988, 61.425, 17.207, 0.444)
pt3dadd(124.897, 61.35, 17.187, 0.446)
pt3dadd(124.807, 61.275, 17.167, 0.448)
pt3dadd(124.716, 61.2, 17.146, 0.448)
pt3dadd(124.626, 61.125, 17.126, 0.45)
pt3dadd(124.535, 61.05, 17.106, 0.452)
pt3dadd(124.522, 60.945, 17.1, 0.452)
pt3dadd(124.542, 60.827, 17.1, 0.452)
pt3dadd(124.56, 60.709, 17.1, 0.452)
pt3dadd(124.56, 60.589, 17.1, 0.452)
pt3dadd(124.56, 60.469, 17.1, 0.452)
pt3dadd(124.56, 60.349, 17.1, 0.452)
pt3dadd(124.56, 60.229, 17.1, 0.452)
pt3dadd(124.56, 60.109, 17.1, 0.452)
pt3dadd(124.56, 59.989, 17.102, 0.452)
pt3dadd(124.56, 59.871, 17.121, 0.452)
pt3dadd(124.56, 59.76, 17.154, 0.452)
pt3dadd(124.56, 59.657, 17.206, 0.452)
pt3dadd(124.56, 59.555, 17.259, 0.452)
pt3dadd(124.56, 59.453, 17.311, 0.452)
}
}
proc shape3d_12() {
dend_7[8] { pt3dadd(124.56, 59.351, 17.364, 0.452)
pt3dadd(124.56, 59.253, 17.421, 0.452)
pt3dadd(124.56, 59.165, 17.489, 0.452)
pt3dadd(124.556, 59.079, 17.558, 0.452)
pt3dadd(124.536, 59.003, 17.633, 0.452)
pt3dadd(124.511, 58.916, 17.69, 0.452)
pt3dadd(124.477, 58.802, 17.695, 0.452)
pt3dadd(124.442, 58.687, 17.7, 0.452)
pt3dadd(124.422, 58.574, 17.729, 0.452)
pt3dadd(124.404, 58.462, 17.761, 0.452)
pt3dadd(124.358, 58.357, 17.788, 0.452)
pt3dadd(124.327, 58.248, 17.816, 0.452)
pt3dadd(124.315, 58.134, 17.846, 0.452)
pt3dadd(124.291, 58.031, 17.885, 0.452)
pt3dadd(124.237, 57.955, 17.949, 0.452)
pt3dadd(124.22, 57.894, 18.027, 0.452)
pt3dadd(124.234, 57.847, 18.118, 0.452)
pt3dadd(124.264, 57.762, 18.166, 0.452)
pt3dadd(124.306, 57.651, 18.183, 0.452)
pt3dadd(124.326, 57.541, 18.164, 0.452)
pt3dadd(124.351, 57.437, 18.139, 0.452)
pt3dadd(124.436, 57.358, 18.164, 0.452)
pt3dadd(124.522, 57.28, 18.19, 0.452)
pt3dadd(124.607, 57.201, 18.215, 0.452)
pt3dadd(124.69, 57.122, 18.245, 0.452)
pt3dadd(124.764, 57.039, 18.282, 0.452)
pt3dadd(124.856, 56.972, 18.3, 0.452)
pt3dadd(124.963, 56.918, 18.3, 0.452)
pt3dadd(125.071, 56.867, 18.3, 0.452)
pt3dadd(125.183, 56.82, 18.3, 0.452)
pt3dadd(125.293, 56.773, 18.3, 0.452)
pt3dadd(125.407, 56.768, 18.271, 0.452)
pt3dadd(125.522, 56.762, 18.243, 0.452)
pt3dadd(125.64, 56.772, 18.227, 0.452)
pt3dadd(125.758, 56.789, 18.217, 0.452)
pt3dadd(125.855, 56.829, 18.235, 0.452)
pt3dadd(125.88, 56.869, 18.323, 0.452)
pt3dadd(125.884, 56.88, 18.422, 0.452)
pt3dadd(125.911, 56.88, 18.518, 0.452)
pt3dadd(125.993, 56.868, 18.585, 0.452)
pt3dadd(126.103, 56.829, 18.6, 0.452)
pt3dadd(126.21, 56.775, 18.6, 0.452)
pt3dadd(126.307, 56.706, 18.6, 0.452)
pt3dadd(126.352, 56.596, 18.604, 0.452)
pt3dadd(126.368, 56.481, 18.626, 0.452)
pt3dadd(126.436, 56.397, 18.662, 0.452)
pt3dadd(126.517, 56.322, 18.699, 0.452)
pt3dadd(126.635, 56.3, 18.7, 0.452)
pt3dadd(126.754, 56.279, 18.7, 0.452)
pt3dadd(126.853, 56.23, 18.707, 0.452)
pt3dadd(126.922, 56.134, 18.724, 0.452)
pt3dadd(126.989, 56.041, 18.75, 0.452)
pt3dadd(127.056, 55.952, 18.787, 0.452)
pt3dadd(127.118, 55.854, 18.809, 0.452)
pt3dadd(127.177, 55.751, 18.822, 0.452)
pt3dadd(127.237, 55.648, 18.835, 0.452)
pt3dadd(127.298, 55.572, 18.868, 0.452)
pt3dadd(127.361, 55.565, 18.952, 0.452)
pt3dadd(127.428, 55.546, 19.028, 0.452)
pt3dadd(127.511, 55.469, 19.06, 0.452)
pt3dadd(127.594, 55.391, 19.093, 0.452)
pt3dadd(127.698, 55.337, 19.1, 0.452)
pt3dadd(127.808, 55.291, 19.1, 0.452)
pt3dadd(127.892, 55.216, 19.1, 0.452)
pt3dadd(127.936, 55.104, 19.1, 0.452)
pt3dadd(127.975, 54.991, 19.1, 0.452)
pt3dadd(128.015, 54.878, 19.1, 0.452)
pt3dadd(128.054, 54.764, 19.1, 0.452)
pt3dadd(128.095, 54.652, 19.1, 0.452)
pt3dadd(128.209, 54.613, 19.1, 0.452)
pt3dadd(128.322, 54.573, 19.1, 0.452)
pt3dadd(128.416, 54.505, 19.111, 0.452)
pt3dadd(128.498, 54.421, 19.129, 0.452)
pt3dadd(128.598, 54.377, 19.166, 0.452)
pt3dadd(128.7, 54.33, 19.19, 0.452)
pt3dadd(128.802, 54.266, 19.192, 0.452)
pt3dadd(128.903, 54.202, 19.194, 0.452)
pt3dadd(129.005, 54.138, 19.197, 0.452)
pt3dadd(129.106, 54.074, 19.199, 0.452)
pt3dadd(129.208, 54.03, 19.224, 0.452)
pt3dadd(129.308, 54.01, 19.274, 0.452)
pt3dadd(129.41, 53.99, 19.325, 0.452)
pt3dadd(129.511, 53.97, 19.376, 0.452)
pt3dadd(129.6, 53.913, 19.409, 0.452)
pt3dadd(129.677, 53.823, 19.426, 0.452)
pt3dadd(129.714, 53.724, 19.462, 0.452)
pt3dadd(129.727, 53.62, 19.511, 0.452)
pt3dadd(129.77, 53.529, 19.559, 0.452)
pt3dadd(129.838, 53.441, 19.591, 0.452)
pt3dadd(129.901, 53.34, 19.596, 0.452)
pt3dadd(129.966, 53.239, 19.6, 0.452)
pt3dadd(130.034, 53.14, 19.6, 0.452)
pt3dadd(130.108, 53.053, 19.604, 0.452)
pt3dadd(130.223, 53.047, 19.632, 0.452)
pt3dadd(130.337, 53.041, 19.661, 0.452)
pt3dadd(130.451, 53.04, 19.693, 0.452)
pt3dadd(130.564, 53.04, 19.726, 0.452)
pt3dadd(130.652, 53.023, 19.781, 0.452)
pt3dadd(130.708, 52.984, 19.863, 0.452)
pt3dadd(130.764, 52.945, 19.946, 0.452)
pt3dadd(130.825, 52.888, 20, 0.452)
pt3dadd(130.901, 52.794, 20, 0.452)
pt3dadd(130.982, 52.709, 20, 0.452)
pt3dadd(131.083, 52.646, 20.004, 0.452)
pt3dadd(131.177, 52.572, 20.014, 0.452)
pt3dadd(131.272, 52.498, 20.023, 0.452)
pt3dadd(131.365, 52.424, 20.033, 0.452)
pt3dadd(131.459, 52.35, 20.042, 0.452)
pt3dadd(131.566, 52.314, 20.069, 0.452)
pt3dadd(131.677, 52.289, 20.102, 0.452)
pt3dadd(131.788, 52.264, 20.134, 0.452)
pt3dadd(131.898, 52.239, 20.166, 0.452)
pt3dadd(132.008, 52.214, 20.199, 0.452)
pt3dadd(132.127, 52.211, 20.216, 0.452)
pt3dadd(132.245, 52.209, 20.233, 0.452)
pt3dadd(132.364, 52.207, 20.25, 0.452)
pt3dadd(132.481, 52.204, 20.266, 0.452)
pt3dadd(132.6, 52.202, 20.283, 0.452)
pt3dadd(132.719, 52.2, 20.3, 0.452)
pt3dadd(132.834, 52.2, 20.325, 0.452)
pt3dadd(132.95, 52.2, 20.35, 0.452)
pt3dadd(133.067, 52.2, 20.375, 0.452)
pt3dadd(133.183, 52.2, 20.4, 0.452)
pt3dadd(133.3, 52.2, 20.425, 0.452)
pt3dadd(133.409, 52.2, 20.461, 0.452)
pt3dadd(133.496, 52.2, 20.529, 0.452)
pt3dadd(133.586, 52.194, 20.592, 0.452)
pt3dadd(133.693, 52.147, 20.614, 0.452)
pt3dadd(133.794, 52.097, 20.641, 0.452)
pt3dadd(133.847, 52.021, 20.705, 0.452)
pt3dadd(133.902, 51.971, 20.778, 0.452)
pt3dadd(133.957, 51.965, 20.866, 0.452)
pt3dadd(134.006, 51.96, 20.956, 0.452)
pt3dadd(134.029, 51.96, 21.055, 0.452)
pt3dadd(134.042, 51.952, 21.153, 0.452)
pt3dadd(134.048, 51.936, 21.252, 0.452)
pt3dadd(134.053, 51.921, 21.351, 0.452)
pt3dadd(134.156, 51.881, 21.382, 0.452)
pt3dadd(134.264, 51.841, 21.41, 0.452)
pt3dadd(134.377, 51.84, 21.443, 0.452)
pt3dadd(134.49, 51.84, 21.476, 0.452)
pt3dadd(134.599, 51.805, 21.492, 0.452)
pt3dadd(134.705, 51.749, 21.497, 0.452)
pt3dadd(134.801, 51.679, 21.5, 0.452)
pt3dadd(134.887, 51.597, 21.501, 0.452)
pt3dadd(134.995, 51.547, 21.515, 0.452)
pt3dadd(135.103, 51.497, 21.529, 0.452)
pt3dadd(135.211, 51.447, 21.542, 0.452)
pt3dadd(135.319, 51.397, 21.556, 0.452)
pt3dadd(135.426, 51.358, 21.579, 0.452)
pt3dadd(135.532, 51.35, 21.626, 0.452)
pt3dadd(135.637, 51.342, 21.673, 0.452)
pt3dadd(135.743, 51.334, 21.72, 0.452)
pt3dadd(135.848, 51.326, 21.768, 0.452)
pt3dadd(135.956, 51.31, 21.8, 0.452)
pt3dadd(136.072, 51.277, 21.8, 0.452)
pt3dadd(136.187, 51.244, 21.8, 0.452)
pt3dadd(136.307, 51.24, 21.803, 0.452)
pt3dadd(136.427, 51.24, 21.807, 0.452)
pt3dadd(136.547, 51.24, 21.811, 0.452)
pt3dadd(136.608, 51.24, 21.897, 0.452)
pt3dadd(136.668, 51.24, 21.983, 0.452)
pt3dadd(136.729, 51.24, 22.07, 0.452)
pt3dadd(136.79, 51.24, 22.156, 0.452)
pt3dadd(136.886, 51.228, 22.191, 0.452)
pt3dadd(137.005, 51.21, 22.193, 0.452)
pt3dadd(137.123, 51.191, 22.196, 0.452)
pt3dadd(137.242, 51.172, 22.198, 0.452)
pt3dadd(137.358, 51.154, 22.211, 0.452)
pt3dadd(137.471, 51.135, 22.242, 0.452)
pt3dadd(137.584, 51.12, 22.272, 0.452)
pt3dadd(137.7, 51.117, 22.294, 0.452)
pt3dadd(137.819, 51.111, 22.307, 0.452)
pt3dadd(137.938, 51.104, 22.32, 0.452)
pt3dadd(138.056, 51.097, 22.333, 0.452)
pt3dadd(138.175, 51.09, 22.346, 0.452)
pt3dadd(138.294, 51.084, 22.36, 0.452)
pt3dadd(138.407, 51.059, 22.379, 0.452)
pt3dadd(138.512, 51.012, 22.406, 0.452)
pt3dadd(138.618, 50.965, 22.432, 0.452)
pt3dadd(138.724, 50.918, 22.459, 0.452)
pt3dadd(138.829, 50.871, 22.486, 0.452)
pt3dadd(138.946, 50.844, 22.491, 0.452)
pt3dadd(139.063, 50.819, 22.493, 0.452)
pt3dadd(139.181, 50.793, 22.495, 0.452)
pt3dadd(139.297, 50.768, 22.496, 0.452)
pt3dadd(139.415, 50.743, 22.498, 0.452)
pt3dadd(139.531, 50.715, 22.5, 0.452)
pt3dadd(139.638, 50.661, 22.5, 0.452)
pt3dadd(139.746, 50.607, 22.5, 0.452)
pt3dadd(139.858, 50.568, 22.514, 0.452)
pt3dadd(139.97, 50.53, 22.529, 0.452)
pt3dadd(140.062, 50.481, 22.575, 0.452)
pt3dadd(140.144, 50.428, 22.632, 0.452)
pt3dadd(140.182, 50.356, 22.704, 0.452)
pt3dadd(140.23, 50.287, 22.77, 0.452)
pt3dadd(140.339, 50.248, 22.795, 0.452)
pt3dadd(140.431, 50.187, 22.83, 0.452)
pt3dadd(140.521, 50.119, 22.867, 0.452)
pt3dadd(140.599, 50.033, 22.891, 0.452)
}
}
proc shape3d_13() {
dend_7[8] { pt3dadd(140.677, 49.957, 22.922, 0.452)
pt3dadd(140.754, 49.936, 22.997, 0.452)
pt3dadd(140.836, 49.92, 23.067, 0.452)
pt3dadd(140.94, 49.92, 23.118, 0.452)
pt3dadd(141.043, 49.918, 23.168, 0.452)
pt3dadd(141.142, 49.862, 23.2, 0.452)
pt3dadd(141.241, 49.806, 23.232, 0.452)
pt3dadd(141.34, 49.751, 23.264, 0.452)
pt3dadd(141.418, 49.663, 23.283, 0.452)
pt3dadd(141.494, 49.573, 23.3, 0.452)
pt3dadd(141.613, 49.556, 23.301, 0.452)
pt3dadd(141.726, 49.518, 23.307, 0.452)
pt3dadd(141.84, 49.48, 23.313, 0.452)
pt3dadd(141.954, 49.442, 23.32, 0.452)
pt3dadd(142.067, 49.404, 23.326, 0.452)
pt3dadd(142.181, 49.366, 23.332, 0.452)
pt3dadd(142.294, 49.327, 23.344, 0.452)
pt3dadd(142.405, 49.287, 23.358, 0.452)
pt3dadd(142.517, 49.247, 23.371, 0.452)
pt3dadd(142.63, 49.207, 23.384, 0.452)
pt3dadd(142.741, 49.167, 23.398, 0.452)
pt3dadd(142.859, 49.149, 23.402, 0.452)
pt3dadd(142.979, 49.137, 23.403, 0.452)
pt3dadd(143.098, 49.124, 23.405, 0.452)
pt3dadd(143.218, 49.111, 23.407, 0.452)
pt3dadd(143.336, 49.098, 23.409, 0.452)
pt3dadd(143.455, 49.086, 23.41, 0.452)
pt3dadd(143.567, 49.051, 23.422, 0.452)
pt3dadd(143.674, 48.999, 23.441, 0.452)
pt3dadd(143.779, 48.948, 23.46, 0.452)
pt3dadd(143.885, 48.896, 23.479, 0.452)
pt3dadd(143.99, 48.844, 23.498, 0.452)
pt3dadd(144.108, 48.822, 23.5, 0.452)
pt3dadd(144.227, 48.802, 23.5, 0.452)
pt3dadd(144.346, 48.783, 23.5, 0.452)
pt3dadd(144.463, 48.763, 23.5, 0.452)
pt3dadd(144.582, 48.743, 23.5, 0.452)
pt3dadd(144.7, 48.723, 23.5, 0.452)
pt3dadd(144.816, 48.701, 23.516, 0.452)
pt3dadd(144.931, 48.678, 23.535, 0.452)
pt3dadd(145.046, 48.655, 23.555, 0.452)
pt3dadd(145.163, 48.632, 23.574, 0.452)
pt3dadd(145.278, 48.608, 23.593, 0.452)
pt3dadd(145.381, 48.554, 23.6, 0.452)
pt3dadd(145.477, 48.482, 23.6, 0.452)
pt3dadd(145.573, 48.41, 23.6, 0.452)
pt3dadd(145.669, 48.338, 23.6, 0.452)
pt3dadd(145.765, 48.266, 23.6, 0.452)
pt3dadd(145.866, 48.202, 23.6, 0.452)
pt3dadd(145.97, 48.142, 23.6, 0.452)
pt3dadd(146.074, 48.082, 23.6, 0.452)
pt3dadd(146.178, 48.022, 23.6, 0.452)
pt3dadd(146.282, 47.962, 23.6, 0.452)
pt3dadd(146.393, 47.92, 23.6, 0.452)
pt3dadd(146.51, 47.893, 23.6, 0.452)
pt3dadd(146.627, 47.867, 23.6, 0.452)
pt3dadd(146.73, 47.806, 23.6, 0.452)
pt3dadd(146.833, 47.745, 23.6, 0.452)
pt3dadd(146.934, 47.679, 23.6, 0.452)
pt3dadd(147.032, 47.611, 23.6, 0.452)
pt3dadd(147.084, 47.511, 23.6, 0.452)
pt3dadd(147.11, 47.394, 23.6, 0.452)
pt3dadd(147.148, 47.285, 23.6, 0.452)
pt3dadd(147.253, 47.227, 23.6, 0.452)
pt3dadd(147.359, 47.169, 23.6, 0.452)
pt3dadd(147.463, 47.111, 23.6, 0.452)
pt3dadd(147.574, 47.065, 23.6, 0.452)
pt3dadd(147.689, 47.032, 23.6, 0.452)
pt3dadd(147.803, 46.998, 23.6, 0.452)
pt3dadd(147.9, 46.935, 23.614, 0.452)
pt3dadd(148.002, 46.899, 23.656, 0.452)
pt3dadd(148.104, 46.863, 23.699, 0.452)
pt3dadd(148.207, 46.827, 23.742, 0.452)
pt3dadd(148.309, 46.791, 23.784, 0.452)
pt3dadd(148.415, 46.743, 23.808, 0.452)
pt3dadd(148.522, 46.694, 23.83, 0.452)
pt3dadd(148.628, 46.645, 23.851, 0.452)
pt3dadd(148.734, 46.596, 23.873, 0.452)
pt3dadd(148.843, 46.551, 23.89, 0.452)
pt3dadd(148.958, 46.517, 23.895, 0.452)
pt3dadd(149.072, 46.482, 23.9, 0.452)
pt3dadd(149.177, 46.423, 23.9, 0.452)
pt3dadd(149.28, 46.362, 23.9, 0.452)
pt3dadd(149.352, 46.269, 23.9, 0.452)
pt3dadd(149.413, 46.166, 23.9, 0.452)
pt3dadd(149.458, 46.056, 23.9, 0.452)
pt3dadd(149.491, 45.94, 23.9, 0.452)
pt3dadd(149.525, 45.825, 23.9, 0.452)
pt3dadd(149.557, 45.71, 23.9, 0.452)
pt3dadd(149.614, 45.607, 23.901, 0.452)
pt3dadd(149.693, 45.517, 23.903, 0.452)
pt3dadd(149.772, 45.427, 23.906, 0.452)
pt3dadd(149.851, 45.337, 23.908, 0.452)
pt3dadd(149.93, 45.247, 23.91, 0.452)
pt3dadd(150.004, 45.165, 23.943, 0.452)
pt3dadd(150.072, 45.089, 23.994, 0.452)
pt3dadd(150.126, 45, 24.044, 0.452)
pt3dadd(150.184, 44.914, 24.09, 0.452)
pt3dadd(150.29, 44.858, 24.095, 0.452)
pt3dadd(150.396, 44.802, 24.1, 0.452)
pt3dadd(150.515, 44.786, 24.1, 0.452)
pt3dadd(150.634, 44.771, 24.1, 0.452)
pt3dadd(150.754, 44.76, 24.1, 0.452)
pt3dadd(150.874, 44.76, 24.1, 0.452)
pt3dadd(150.992, 44.756, 24.1, 0.452)
pt3dadd(151.112, 44.741, 24.1, 0.452)
pt3dadd(151.231, 44.726, 24.1, 0.452)
pt3dadd(151.343, 44.689, 24.1, 0.452)
pt3dadd(151.451, 44.635, 24.1, 0.452)
pt3dadd(151.552, 44.584, 24.12, 0.452)
pt3dadd(151.64, 44.54, 24.175, 0.452)
pt3dadd(151.714, 44.491, 24.242, 0.452)
pt3dadd(151.774, 44.438, 24.316, 0.452)
pt3dadd(151.832, 44.353, 24.362, 0.452)
pt3dadd(151.891, 44.258, 24.398, 0.452)
pt3dadd(151.975, 44.186, 24.371, 0.452)
pt3dadd(152.03, 44.143, 24.293, 0.452)
pt3dadd(152.083, 44.09, 24.219, 0.452)
pt3dadd(152.185, 44.04, 24.222, 0.452)
pt3dadd(152.28, 43.988, 24.265, 0.452)
pt3dadd(152.381, 43.935, 24.291, 0.452)
pt3dadd(152.486, 43.879, 24.296, 0.452)
pt3dadd(152.596, 43.83, 24.3, 0.452)
pt3dadd(152.708, 43.796, 24.31, 0.452)
pt3dadd(152.821, 43.76, 24.331, 0.452)
pt3dadd(152.933, 43.725, 24.351, 0.452)
pt3dadd(153.044, 43.689, 24.372, 0.452)
pt3dadd(153.157, 43.654, 24.392, 0.452)
pt3dadd(153.265, 43.607, 24.4, 0.452)
pt3dadd(153.373, 43.554, 24.4, 0.452)
pt3dadd(153.48, 43.5, 24.4, 0.452)
pt3dadd(153.588, 43.446, 24.4, 0.452)
pt3dadd(153.695, 43.392, 24.4, 0.452)
pt3dadd(153.806, 43.352, 24.4, 0.452)
pt3dadd(153.925, 43.331, 24.4, 0.452)
pt3dadd(154.043, 43.311, 24.4, 0.452)
pt3dadd(154.147, 43.266, 24.429, 0.452)
pt3dadd(154.247, 43.216, 24.465, 0.452)
pt3dadd(154.342, 43.179, 24.518, 0.452)
pt3dadd(154.429, 43.136, 24.569, 0.452)
pt3dadd(154.453, 43.021, 24.589, 0.452)
pt3dadd(154.477, 42.906, 24.609, 0.452)
pt3dadd(154.541, 42.822, 24.654, 0.452)
pt3dadd(154.595, 42.739, 24.709, 0.452)
pt3dadd(154.644, 42.655, 24.769, 0.452)
pt3dadd(154.692, 42.572, 24.828, 0.452)
pt3dadd(154.74, 42.488, 24.887, 0.452)
pt3dadd(154.783, 42.391, 24.931, 0.452)
pt3dadd(154.822, 42.285, 24.966, 0.452)
pt3dadd(154.859, 42.179, 25, 0.452)
pt3dadd(154.897, 42.073, 25.034, 0.452)
pt3dadd(154.937, 41.967, 25.067, 0.452)
pt3dadd(155.002, 41.867, 25.077, 0.452)
pt3dadd(155.066, 41.766, 25.086, 0.452)
pt3dadd(155.13, 41.665, 25.095, 0.452)
pt3dadd(155.195, 41.565, 25.104, 0.452)
pt3dadd(155.255, 41.466, 25.124, 0.452)
pt3dadd(155.305, 41.371, 25.169, 0.452)
pt3dadd(155.356, 41.276, 25.214, 0.452)
pt3dadd(155.406, 41.181, 25.258, 0.452)
pt3dadd(155.458, 41.087, 25.301, 0.452)
pt3dadd(155.53, 40.994, 25.321, 0.452)
pt3dadd(155.602, 40.901, 25.341, 0.452)
pt3dadd(155.674, 40.808, 25.361, 0.452)
pt3dadd(155.746, 40.715, 25.381, 0.452)
pt3dadd(155.806, 40.612, 25.39, 0.452)
pt3dadd(155.857, 40.504, 25.392, 0.452)
pt3dadd(155.909, 40.396, 25.395, 0.452)
pt3dadd(155.96, 40.287, 25.397, 0.452)
pt3dadd(156.012, 40.179, 25.399, 0.452)
pt3dadd(156.073, 40.079, 25.409, 0.452)
pt3dadd(156.149, 39.989, 25.429, 0.452)
pt3dadd(156.224, 39.898, 25.449, 0.452)
pt3dadd(156.3, 39.808, 25.469, 0.452)
pt3dadd(156.376, 39.72, 25.49, 0.452)
pt3dadd(156.485, 39.7, 25.527, 0.452)
pt3dadd(156.595, 39.681, 25.565, 0.452)
pt3dadd(156.673, 39.594, 25.583, 0.452)
pt3dadd(156.749, 39.504, 25.6, 0.452)
pt3dadd(156.83, 39.416, 25.6, 0.452)
pt3dadd(156.913, 39.328, 25.6, 0.452)
pt3dadd(156.938, 39.213, 25.6, 0.452)
pt3dadd(156.959, 39.095, 25.6, 0.452)
pt3dadd(156.997, 38.984, 25.6, 0.452)
pt3dadd(157.072, 38.89, 25.6, 0.452)
pt3dadd(157.165, 38.816, 25.6, 0.452)
pt3dadd(157.261, 38.744, 25.6, 0.452)
pt3dadd(157.357, 38.672, 25.6, 0.452)
pt3dadd(157.453, 38.6, 25.6, 0.452)
pt3dadd(157.549, 38.528, 25.6, 0.452)
pt3dadd(157.634, 38.443, 25.6, 0.452)
pt3dadd(157.717, 38.357, 25.6, 0.452)
pt3dadd(157.801, 38.271, 25.6, 0.452)
pt3dadd(157.884, 38.185, 25.6, 0.452)
pt3dadd(157.968, 38.098, 25.6, 0.452)
pt3dadd(158.032, 37.997, 25.6, 0.452)
pt3dadd(158.095, 37.895, 25.6, 0.452)
pt3dadd(158.158, 37.793, 25.6, 0.452)
pt3dadd(158.221, 37.691, 25.6, 0.452)
pt3dadd(158.284, 37.588, 25.6, 0.452)
}
}
proc shape3d_14() {
dend_7[8] { pt3dadd(158.339, 37.486, 25.623, 0.452)
pt3dadd(158.393, 37.384, 25.651, 0.452)
pt3dadd(158.447, 37.282, 25.678, 0.452)
pt3dadd(158.501, 37.181, 25.706, 0.452)
pt3dadd(158.554, 37.099, 25.755, 0.452)
pt3dadd(158.605, 37.048, 25.834, 0.452)
pt3dadd(158.63, 36.959, 25.884, 0.452)
pt3dadd(158.636, 36.844, 25.912, 0.452)
pt3dadd(158.64, 36.729, 25.941, 0.452)
pt3dadd(158.64, 36.614, 25.968, 0.452)
pt3dadd(158.64, 36.498, 25.996, 0.452)
pt3dadd(158.64, 36.379, 26, 0.452)
pt3dadd(158.64, 36.259, 26, 0.452)
pt3dadd(158.64, 36.139, 26, 0.452)
pt3dadd(158.674, 36.043, 26.046, 0.452)
pt3dadd(158.713, 35.95, 26.101, 0.452)
pt3dadd(158.753, 35.858, 26.156, 0.452)
pt3dadd(158.76, 35.791, 26.236, 0.452)
pt3dadd(158.76, 35.73, 26.322, 0.452)
pt3dadd(158.777, 35.637, 26.367, 0.452)
pt3dadd(158.804, 35.522, 26.386, 0.452)
pt3dadd(158.832, 35.408, 26.405, 0.452)
pt3dadd(158.86, 35.309, 26.453, 0.452)
pt3dadd(158.888, 35.216, 26.512, 0.452)
pt3dadd(158.929, 35.134, 26.57, 0.452)
pt3dadd(158.969, 35.022, 26.583, 0.452)
pt3dadd(159.008, 34.911, 26.596, 0.452)
pt3dadd(159.049, 34.799, 26.61, 0.452)
pt3dadd(159.089, 34.687, 26.623, 0.452)
pt3dadd(159.12, 34.574, 26.639, 0.452)
pt3dadd(159.12, 34.458, 26.667, 0.452)
pt3dadd(159.12, 34.343, 26.694, 0.452)
pt3dadd(159.132, 34.225, 26.7, 0.452)
pt3dadd(159.146, 34.106, 26.7, 0.452)
pt3dadd(159.17, 33.992, 26.7, 0.452)
pt3dadd(159.27, 33.924, 26.7, 0.452)
pt3dadd(159.368, 33.856, 26.7, 0.452)
pt3dadd(159.479, 33.809, 26.7, 0.452)
pt3dadd(159.589, 33.762, 26.7, 0.452)
pt3dadd(159.648, 33.67, 26.7, 0.452)
pt3dadd(159.682, 33.555, 26.7, 0.452)
pt3dadd(159.714, 33.439, 26.7, 0.452)
pt3dadd(159.748, 33.324, 26.7, 0.452)
pt3dadd(159.806, 33.222, 26.7, 0.452)
pt3dadd(159.882, 33.129, 26.7, 0.452)
pt3dadd(159.926, 33.023, 26.707, 0.452)
pt3dadd(159.938, 32.905, 26.72, 0.452)
pt3dadd(159.95, 32.787, 26.734, 0.452)
pt3dadd(159.973, 32.687, 26.762, 0.452)
pt3dadd(160.037, 32.659, 26.844, 0.452)
pt3dadd(160.111, 32.634, 26.916, 0.452)
pt3dadd(160.19, 32.57, 26.959, 0.452)
pt3dadd(160.259, 32.484, 27, 0.452)
pt3dadd(160.326, 32.397, 27.04, 0.452)
pt3dadd(160.393, 32.31, 27.08, 0.452)
pt3dadd(160.451, 32.213, 27.111, 0.452)
pt3dadd(160.498, 32.106, 27.133, 0.452)
pt3dadd(160.542, 32.024, 27.185, 0.452)
pt3dadd(160.586, 31.965, 27.264, 0.452)
pt3dadd(160.655, 31.887, 27.297, 0.452)
pt3dadd(160.736, 31.799, 27.308, 0.452)
pt3dadd(160.828, 31.737, 27.341, 0.452)
pt3dadd(160.924, 31.686, 27.384, 0.452)
pt3dadd(161.04, 31.68, 27.394, 0.452)
pt3dadd(161.16, 31.68, 27.4, 0.452)
pt3dadd(161.28, 31.68, 27.4, 0.452)
pt3dadd(161.4, 31.68, 27.4, 0.452)
pt3dadd(161.52, 31.68, 27.4, 0.452)
pt3dadd(161.64, 31.68, 27.4, 0.452)
}
dend_0[2] {pt3dclear()
pt3dadd(126.776, 92.48, 6.626, 13.108)
pt3dadd(126.859, 92.48, 6.695, 13.002)
pt3dadd(126.944, 92.48, 6.766, 12.894)
pt3dadd(127.03, 92.48, 6.836, 12.784)
pt3dadd(127.115, 92.48, 6.907, 12.676)
pt3dadd(127.199, 92.48, 6.978, 12.568)
pt3dadd(127.284, 92.48, 7.048, 12.458)
pt3dadd(127.369, 92.48, 7.119, 12.35)
pt3dadd(127.454, 92.48, 7.19, 12.242)
pt3dadd(127.538, 92.48, 7.261, 12.132)
pt3dadd(127.624, 92.48, 7.331, 12.024)
pt3dadd(127.709, 92.48, 7.402, 11.916)
pt3dadd(127.793, 92.48, 7.473, 11.806)
pt3dadd(127.878, 92.48, 7.543, 11.698)
pt3dadd(127.963, 92.48, 7.614, 11.59)
pt3dadd(128.048, 92.48, 7.685, 11.48)
pt3dadd(128.132, 92.48, 7.755, 11.372)
pt3dadd(128.219, 92.507, 7.806, 11.236)
pt3dadd(128.309, 92.586, 7.819, 11.046)
pt3dadd(128.398, 92.664, 7.832, 10.856)
pt3dadd(128.488, 92.743, 7.845, 10.666)
pt3dadd(128.578, 92.821, 7.857, 10.476)
pt3dadd(128.666, 92.899, 7.87, 10.286)
pt3dadd(128.756, 92.978, 7.883, 10.096)
pt3dadd(128.845, 93.056, 7.895, 9.906)
}
dend_7[9] {pt3dclear()
pt3dadd(128.845, 93.056, 7.895, 9.906)
pt3dadd(128.935, 93.135, 7.908, 9.716)
pt3dadd(129.025, 93.213, 7.921, 9.526)
pt3dadd(129.114, 93.291, 7.933, 9.336)
pt3dadd(129.204, 93.37, 7.946, 9.146)
pt3dadd(129.294, 93.448, 7.96, 8.96)
pt3dadd(129.384, 93.525, 7.975, 8.776)
pt3dadd(129.473, 93.603, 7.99, 8.594)
pt3dadd(129.563, 93.68, 8.005, 8.41)
pt3dadd(129.653, 93.758, 8.02, 8.228)
pt3dadd(129.743, 93.835, 8.035, 8.044)
pt3dadd(129.833, 93.913, 8.05, 7.862)
pt3dadd(129.923, 93.99, 8.065, 7.678)
pt3dadd(130.012, 94.068, 8.08, 7.496)
pt3dadd(130.102, 94.146, 8.095, 7.312)
pt3dadd(130.193, 94.22, 8.115, 7.138)
pt3dadd(130.285, 94.291, 8.139, 6.974)
pt3dadd(130.378, 94.362, 8.163, 6.808)
pt3dadd(130.469, 94.434, 8.188, 6.644)
pt3dadd(130.561, 94.505, 8.212, 6.478)
pt3dadd(130.654, 94.576, 8.236, 6.314)
pt3dadd(130.745, 94.647, 8.26, 6.148)
pt3dadd(130.837, 94.719, 8.284, 5.982)
pt3dadd(130.93, 94.79, 8.308, 5.818)
pt3dadd(131.022, 94.861, 8.332, 5.652)
pt3dadd(131.116, 94.918, 8.371, 5.518)
pt3dadd(131.209, 94.968, 8.417, 5.398)
pt3dadd(131.303, 95.018, 8.463, 5.28)
pt3dadd(131.398, 95.068, 8.509, 5.16)
pt3dadd(131.491, 95.118, 8.555, 5.04)
pt3dadd(131.586, 95.168, 8.601, 4.92)
pt3dadd(131.68, 95.218, 8.647, 4.802)
pt3dadd(131.773, 95.268, 8.693, 4.682)
pt3dadd(131.868, 95.319, 8.739, 4.562)
pt3dadd(131.962, 95.369, 8.785, 4.442)
pt3dadd(132.044, 95.413, 8.846, 4.334)
pt3dadd(132.124, 95.456, 8.913, 4.23)
pt3dadd(132.202, 95.498, 8.98, 4.126)
pt3dadd(132.28, 95.541, 9.047, 4.02)
pt3dadd(132.358, 95.583, 9.114, 3.916)
pt3dadd(132.436, 95.625, 9.182, 3.812)
pt3dadd(132.514, 95.668, 9.249, 3.708)
pt3dadd(132.592, 95.71, 9.316, 3.604)
pt3dadd(132.67, 95.752, 9.383, 3.5)
pt3dadd(132.749, 95.795, 9.45, 3.396)
pt3dadd(132.833, 95.852, 9.5, 3.306)
pt3dadd(132.922, 95.916, 9.543, 3.224)
pt3dadd(133.009, 95.98, 9.586, 3.142)
pt3dadd(133.097, 96.043, 9.629, 3.06)
pt3dadd(133.184, 96.107, 9.672, 2.976)
pt3dadd(133.272, 96.171, 9.715, 2.894)
pt3dadd(133.36, 96.234, 9.758, 2.812)
pt3dadd(133.447, 96.298, 9.801, 2.73)
pt3dadd(133.535, 96.361, 9.844, 2.646)
pt3dadd(133.622, 96.425, 9.887, 2.564)
pt3dadd(133.712, 96.499, 9.91, 2.518)
pt3dadd(133.802, 96.574, 9.93, 2.478)
pt3dadd(133.892, 96.65, 9.95, 2.438)
pt3dadd(133.984, 96.725, 9.97, 2.4)
pt3dadd(134.074, 96.8, 9.99, 2.36)
pt3dadd(134.164, 96.876, 10.011, 2.32)
pt3dadd(134.254, 96.951, 10.031, 2.28)
pt3dadd(134.344, 97.027, 10.051, 2.24)
pt3dadd(134.434, 97.102, 10.071, 2.202)
pt3dadd(134.524, 97.177, 10.091, 2.162)
pt3dadd(134.617, 97.253, 10.1, 2.15)
pt3dadd(134.71, 97.328, 10.107, 2.142)
pt3dadd(134.802, 97.404, 10.115, 2.134)
pt3dadd(134.896, 97.479, 10.123, 2.126)
pt3dadd(134.988, 97.555, 10.131, 2.116)
pt3dadd(135.08, 97.63, 10.139, 2.108)
pt3dadd(135.174, 97.706, 10.147, 2.1)
pt3dadd(135.266, 97.781, 10.155, 2.09)
pt3dadd(135.359, 97.857, 10.163, 2.082)
pt3dadd(135.452, 97.932, 10.171, 2.074)
pt3dadd(135.554, 97.995, 10.172, 2.09)
pt3dadd(135.656, 98.058, 10.174, 2.106)
pt3dadd(135.758, 98.121, 10.175, 2.124)
pt3dadd(135.86, 98.184, 10.176, 2.14)
pt3dadd(135.962, 98.247, 10.177, 2.156)
pt3dadd(136.066, 98.31, 10.179, 2.174)
pt3dadd(136.168, 98.373, 10.18, 2.19)
pt3dadd(136.27, 98.435, 10.181, 2.208)
pt3dadd(136.372, 98.498, 10.182, 2.224)
pt3dadd(136.474, 98.561, 10.184, 2.242)
pt3dadd(136.568, 98.634, 10.186, 2.202)
pt3dadd(136.663, 98.708, 10.188, 2.162)
pt3dadd(136.758, 98.781, 10.19, 2.12)
pt3dadd(136.853, 98.855, 10.193, 2.08)
pt3dadd(136.948, 98.928, 10.195, 2.04)
pt3dadd(137.042, 99.002, 10.197, 1.998)
pt3dadd(137.137, 99.075, 10.199, 1.958)
pt3dadd(137.232, 99.149, 10.201, 1.918)
pt3dadd(137.327, 99.223, 10.204, 1.876)
pt3dadd(137.422, 99.296, 10.206, 1.836)
pt3dadd(137.512, 99.376, 10.21, 1.818)
pt3dadd(137.6, 99.456, 10.214, 1.8)
pt3dadd(137.69, 99.536, 10.218, 1.782)
pt3dadd(137.779, 99.616, 10.222, 1.764)
pt3dadd(137.869, 99.696, 10.226, 1.744)
pt3dadd(137.958, 99.776, 10.229, 1.726)
pt3dadd(138.048, 99.856, 10.233, 1.708)
pt3dadd(138.137, 99.936, 10.237, 1.69)
pt3dadd(138.227, 100.016, 10.241, 1.672)
pt3dadd(138.316, 100.096, 10.245, 1.654)
pt3dadd(138.4, 100.181, 10.251, 1.67)
}
}
proc shape3d_15() {
dend_7[9] { pt3dadd(138.484, 100.266, 10.256, 1.684)
pt3dadd(138.568, 100.352, 10.262, 1.7)
pt3dadd(138.652, 100.437, 10.267, 1.716)
pt3dadd(138.737, 100.522, 10.273, 1.732)
pt3dadd(138.821, 100.608, 10.279, 1.746)
pt3dadd(138.905, 100.693, 10.284, 1.762)
pt3dadd(138.989, 100.778, 10.29, 1.778)
pt3dadd(139.073, 100.863, 10.296, 1.792)
pt3dadd(139.157, 100.949, 10.301, 1.808)
}
dend_7[10] {pt3dclear()
pt3dadd(139.157, 100.949, 10.301, 1.808)
pt3dadd(139.21, 101.019, 10.308, 1.774)
pt3dadd(139.282, 101.114, 10.317, 1.728)
pt3dadd(139.354, 101.21, 10.326, 1.682)
pt3dadd(139.426, 101.305, 10.336, 1.638)
pt3dadd(139.499, 101.4, 10.345, 1.592)
pt3dadd(139.571, 101.495, 10.354, 1.546)
pt3dadd(139.643, 101.591, 10.363, 1.5)
pt3dadd(139.715, 101.686, 10.372, 1.454)
pt3dadd(139.787, 101.781, 10.382, 1.408)
pt3dadd(139.859, 101.877, 10.391, 1.362)
pt3dadd(139.931, 101.972, 10.4, 1.316)
pt3dadd(140.003, 102.067, 10.409, 1.27)
pt3dadd(140.075, 102.162, 10.419, 1.226)
pt3dadd(140.147, 102.258, 10.428, 1.18)
pt3dadd(140.195, 102.361, 10.456, 1.168)
pt3dadd(140.236, 102.467, 10.49, 1.162)
pt3dadd(140.276, 102.572, 10.523, 1.158)
pt3dadd(140.317, 102.678, 10.556, 1.154)
pt3dadd(140.358, 102.783, 10.589, 1.15)
pt3dadd(140.399, 102.889, 10.622, 1.146)
pt3dadd(140.44, 102.994, 10.655, 1.142)
pt3dadd(140.48, 103.1, 10.689, 1.138)
pt3dadd(140.521, 103.206, 10.722, 1.134)
pt3dadd(140.563, 103.311, 10.755, 1.13)
pt3dadd(140.588, 103.423, 10.784, 1.158)
pt3dadd(140.611, 103.535, 10.813, 1.19)
pt3dadd(140.634, 103.648, 10.842, 1.224)
pt3dadd(140.657, 103.76, 10.871, 1.256)
pt3dadd(140.68, 103.873, 10.9, 1.288)
pt3dadd(140.704, 103.986, 10.929, 1.32)
pt3dadd(140.726, 104.098, 10.957, 1.352)
pt3dadd(140.749, 104.211, 10.986, 1.386)
pt3dadd(140.772, 104.323, 11.015, 1.418)
pt3dadd(140.795, 104.436, 11.044, 1.45)
pt3dadd(140.803, 104.553, 11.063, 1.486)
pt3dadd(140.81, 104.671, 11.082, 1.522)
pt3dadd(140.818, 104.788, 11.102, 1.558)
pt3dadd(140.825, 104.906, 11.121, 1.594)
pt3dadd(140.832, 105.024, 11.14, 1.63)
pt3dadd(140.839, 105.141, 11.159, 1.664)
pt3dadd(140.846, 105.259, 11.178, 1.7)
pt3dadd(140.854, 105.376, 11.197, 1.736)
pt3dadd(140.861, 105.494, 11.217, 1.772)
pt3dadd(140.868, 105.611, 11.236, 1.808)
pt3dadd(140.866, 105.731, 11.244, 1.794)
pt3dadd(140.864, 105.85, 11.253, 1.78)
pt3dadd(140.862, 105.97, 11.262, 1.768)
pt3dadd(140.86, 106.089, 11.271, 1.754)
pt3dadd(140.858, 106.209, 11.279, 1.74)
pt3dadd(140.856, 106.328, 11.288, 1.726)
pt3dadd(140.854, 106.448, 11.297, 1.714)
pt3dadd(140.851, 106.567, 11.306, 1.7)
pt3dadd(140.85, 106.687, 11.314, 1.686)
pt3dadd(140.848, 106.806, 11.323, 1.672)
pt3dadd(140.844, 106.926, 11.323, 1.596)
pt3dadd(140.84, 107.046, 11.322, 1.518)
pt3dadd(140.837, 107.166, 11.321, 1.442)
pt3dadd(140.833, 107.286, 11.321, 1.364)
pt3dadd(140.83, 107.406, 11.32, 1.288)
pt3dadd(140.827, 107.526, 11.319, 1.212)
pt3dadd(140.824, 107.646, 11.319, 1.134)
pt3dadd(140.82, 107.766, 11.318, 1.058)
pt3dadd(140.816, 107.886, 11.317, 0.98)
pt3dadd(140.813, 108.006, 11.317, 0.904)
}
dend_7[11] {pt3dclear()
pt3dadd(140.813, 108.006, 11.317, 0.904)
pt3dadd(140.806, 108.103, 11.316, 0.934)
pt3dadd(140.797, 108.222, 11.314, 0.974)
pt3dadd(140.789, 108.342, 11.313, 1.01)
pt3dadd(140.78, 108.462, 11.311, 1.046)
pt3dadd(140.771, 108.581, 11.31, 1.084)
pt3dadd(140.762, 108.701, 11.309, 1.12)
pt3dadd(140.753, 108.821, 11.307, 1.156)
pt3dadd(140.744, 108.94, 11.306, 1.192)
pt3dadd(140.736, 109.06, 11.304, 1.228)
pt3dadd(140.726, 109.18, 11.303, 1.266)
pt3dadd(140.718, 109.299, 11.301, 1.302)
pt3dadd(140.708, 109.419, 11.3, 1.338)
pt3dadd(140.696, 109.538, 11.297, 1.336)
pt3dadd(140.682, 109.657, 11.295, 1.318)
pt3dadd(140.668, 109.776, 11.292, 1.298)
pt3dadd(140.653, 109.896, 11.289, 1.28)
pt3dadd(140.64, 110.015, 11.286, 1.26)
pt3dadd(140.626, 110.134, 11.283, 1.242)
pt3dadd(140.611, 110.253, 11.28, 1.222)
pt3dadd(140.597, 110.372, 11.278, 1.202)
pt3dadd(140.582, 110.491, 11.275, 1.184)
pt3dadd(140.569, 110.61, 11.272, 1.164)
pt3dadd(140.537, 110.725, 11.267, 1.156)
pt3dadd(140.496, 110.838, 11.261, 1.154)
pt3dadd(140.455, 110.95, 11.255, 1.152)
pt3dadd(140.414, 111.063, 11.249, 1.148)
pt3dadd(140.374, 111.176, 11.243, 1.146)
pt3dadd(140.333, 111.288, 11.237, 1.142)
pt3dadd(140.293, 111.401, 11.231, 1.14)
pt3dadd(140.252, 111.514, 11.225, 1.136)
pt3dadd(140.212, 111.627, 11.219, 1.134)
pt3dadd(140.171, 111.739, 11.213, 1.13)
pt3dadd(140.134, 111.853, 11.205, 1.122)
pt3dadd(140.096, 111.966, 11.196, 1.112)
pt3dadd(140.06, 112.08, 11.187, 1.1)
pt3dadd(140.023, 112.194, 11.177, 1.09)
pt3dadd(139.987, 112.308, 11.168, 1.08)
pt3dadd(139.95, 112.422, 11.159, 1.068)
pt3dadd(139.914, 112.535, 11.15, 1.058)
pt3dadd(139.877, 112.649, 11.141, 1.048)
pt3dadd(139.841, 112.763, 11.132, 1.038)
pt3dadd(139.804, 112.877, 11.122, 1.026)
pt3dadd(139.776, 112.991, 11.105, 1.02)
pt3dadd(139.751, 113.106, 11.085, 1.014)
pt3dadd(139.726, 113.221, 11.064, 1.008)
pt3dadd(139.7, 113.335, 11.044, 1.002)
pt3dadd(139.675, 113.45, 11.023, 0.996)
pt3dadd(139.65, 113.565, 11.003, 0.99)
pt3dadd(139.625, 113.68, 10.983, 0.984)
pt3dadd(139.6, 113.794, 10.962, 0.978)
pt3dadd(139.574, 113.909, 10.942, 0.972)
pt3dadd(139.549, 114.024, 10.922, 0.968)
pt3dadd(139.532, 114.135, 10.888, 0.982)
pt3dadd(139.518, 114.246, 10.852, 1)
pt3dadd(139.502, 114.357, 10.817, 1.016)
pt3dadd(139.488, 114.469, 10.781, 1.034)
pt3dadd(139.472, 114.58, 10.745, 1.052)
pt3dadd(139.458, 114.691, 10.709, 1.07)
pt3dadd(139.442, 114.802, 10.673, 1.088)
pt3dadd(139.428, 114.913, 10.638, 1.106)
pt3dadd(139.412, 115.024, 10.602, 1.124)
pt3dadd(139.398, 115.135, 10.566, 1.142)
pt3dadd(139.388, 115.25, 10.541, 1.16)
pt3dadd(139.38, 115.367, 10.517, 1.178)
pt3dadd(139.372, 115.483, 10.493, 1.198)
pt3dadd(139.363, 115.599, 10.47, 1.216)
pt3dadd(139.355, 115.716, 10.446, 1.234)
pt3dadd(139.348, 115.832, 10.422, 1.254)
pt3dadd(139.339, 115.948, 10.399, 1.272)
pt3dadd(139.331, 116.064, 10.375, 1.29)
pt3dadd(139.322, 116.181, 10.351, 1.308)
pt3dadd(139.314, 116.297, 10.328, 1.328)
pt3dadd(139.302, 116.415, 10.314, 1.304)
pt3dadd(139.289, 116.533, 10.302, 1.274)
pt3dadd(139.276, 116.652, 10.289, 1.244)
pt3dadd(139.262, 116.77, 10.277, 1.214)
pt3dadd(139.248, 116.889, 10.265, 1.184)
pt3dadd(139.235, 117.007, 10.253, 1.154)
pt3dadd(139.222, 117.125, 10.241, 1.124)
pt3dadd(139.208, 117.244, 10.229, 1.094)
pt3dadd(139.195, 117.362, 10.216, 1.064)
pt3dadd(139.182, 117.48, 10.204, 1.032)
pt3dadd(139.151, 117.596, 10.2, 1.06)
pt3dadd(139.115, 117.71, 10.198, 1.096)
pt3dadd(139.08, 117.825, 10.195, 1.132)
pt3dadd(139.045, 117.94, 10.193, 1.168)
pt3dadd(139.01, 118.055, 10.19, 1.202)
pt3dadd(138.976, 118.169, 10.188, 1.238)
pt3dadd(138.94, 118.284, 10.185, 1.274)
pt3dadd(138.905, 118.399, 10.182, 1.31)
pt3dadd(138.87, 118.514, 10.18, 1.346)
pt3dadd(138.835, 118.628, 10.177, 1.382)
pt3dadd(138.797, 118.742, 10.179, 1.394)
pt3dadd(138.757, 118.855, 10.181, 1.408)
pt3dadd(138.719, 118.969, 10.183, 1.42)
pt3dadd(138.68, 119.082, 10.185, 1.432)
pt3dadd(138.641, 119.196, 10.187, 1.444)
pt3dadd(138.602, 119.309, 10.189, 1.458)
pt3dadd(138.563, 119.423, 10.191, 1.47)
pt3dadd(138.524, 119.536, 10.193, 1.482)
pt3dadd(138.486, 119.65, 10.194, 1.496)
pt3dadd(138.446, 119.763, 10.196, 1.508)
pt3dadd(138.42, 119.88, 10.2, 1.456)
pt3dadd(138.394, 119.997, 10.204, 1.402)
pt3dadd(138.367, 120.114, 10.207, 1.348)
pt3dadd(138.34, 120.232, 10.211, 1.296)
pt3dadd(138.313, 120.348, 10.214, 1.242)
pt3dadd(138.287, 120.464, 10.218, 1.188)
pt3dadd(138.26, 120.582, 10.221, 1.136)
pt3dadd(138.233, 120.698, 10.225, 1.082)
pt3dadd(138.206, 120.816, 10.229, 1.028)
pt3dadd(138.18, 120.932, 10.232, 0.976)
pt3dadd(138.166, 121.051, 10.239, 1.014)
pt3dadd(138.15, 121.17, 10.246, 1.052)
pt3dadd(138.136, 121.289, 10.253, 1.09)
pt3dadd(138.12, 121.408, 10.26, 1.128)
pt3dadd(138.106, 121.526, 10.267, 1.166)
pt3dadd(138.091, 121.645, 10.274, 1.204)
pt3dadd(138.076, 121.764, 10.281, 1.242)
pt3dadd(138.061, 121.883, 10.288, 1.28)
pt3dadd(138.046, 122.002, 10.295, 1.318)
pt3dadd(138.031, 122.12, 10.302, 1.356)
}
dend_7[12] {pt3dclear()
pt3dadd(138.031, 122.12, 10.302, 1.356)
pt3dadd(138.029, 122.197, 10.31, 1.294)
pt3dadd(138.025, 122.316, 10.321, 1.198)
}
}
proc shape3d_16() {
dend_7[12] { pt3dadd(138.023, 122.436, 10.333, 1.104)
pt3dadd(138.019, 122.555, 10.344, 1.008)
pt3dadd(138.016, 122.674, 10.356, 0.912)
pt3dadd(138.012, 122.794, 10.368, 0.818)
pt3dadd(138.008, 122.912, 10.379, 0.722)
pt3dadd(138.004, 123.029, 10.402, 0.668)
pt3dadd(137.998, 123.145, 10.427, 0.618)
pt3dadd(137.993, 123.262, 10.451, 0.57)
pt3dadd(137.987, 123.378, 10.476, 0.52)
pt3dadd(137.981, 123.493, 10.5, 0.472)
pt3dadd(137.976, 123.61, 10.524, 0.424)
pt3dadd(137.97, 123.726, 10.549, 0.374)
pt3dadd(137.964, 123.842, 10.573, 0.326)
pt3dadd(137.959, 123.959, 10.598, 0.276)
pt3dadd(137.953, 124.075, 10.622, 0.228)
pt3dadd(137.945, 124.187, 10.656, 0.226)
pt3dadd(137.935, 124.3, 10.691, 0.226)
pt3dadd(137.926, 124.412, 10.725, 0.226)
pt3dadd(137.917, 124.524, 10.759, 0.226)
pt3dadd(137.908, 124.637, 10.794, 0.226)
pt3dadd(137.899, 124.748, 10.828, 0.226)
pt3dadd(137.89, 124.861, 10.863, 0.226)
pt3dadd(137.88, 124.974, 10.897, 0.226)
pt3dadd(137.872, 125.086, 10.931, 0.226)
pt3dadd(137.862, 125.198, 10.966, 0.226)
pt3dadd(137.849, 125.314, 10.99, 0.226)
pt3dadd(137.836, 125.43, 11.014, 0.226)
pt3dadd(137.821, 125.545, 11.038, 0.226)
pt3dadd(137.808, 125.66, 11.062, 0.226)
pt3dadd(137.795, 125.777, 11.086, 0.226)
pt3dadd(137.78, 125.892, 11.11, 0.226)
pt3dadd(137.767, 126.008, 11.134, 0.226)
pt3dadd(137.754, 126.124, 11.158, 0.226)
pt3dadd(137.74, 126.239, 11.182, 0.226)
pt3dadd(137.726, 126.355, 11.207, 0.226)
pt3dadd(137.683, 126.466, 11.218, 0.262)
pt3dadd(137.639, 126.576, 11.228, 0.298)
pt3dadd(137.594, 126.688, 11.239, 0.332)
pt3dadd(137.55, 126.798, 11.25, 0.368)
pt3dadd(137.506, 126.908, 11.261, 0.404)
pt3dadd(137.461, 127.02, 11.272, 0.44)
pt3dadd(137.417, 127.13, 11.283, 0.474)
pt3dadd(137.372, 127.241, 11.293, 0.51)
pt3dadd(137.328, 127.352, 11.304, 0.546)
pt3dadd(137.284, 127.463, 11.315, 0.582)
pt3dadd(137.251, 127.578, 11.319, 0.618)
pt3dadd(137.218, 127.693, 11.323, 0.654)
pt3dadd(137.185, 127.808, 11.327, 0.692)
pt3dadd(137.152, 127.924, 11.331, 0.728)
pt3dadd(137.119, 128.039, 11.335, 0.766)
pt3dadd(137.086, 128.154, 11.339, 0.802)
pt3dadd(137.052, 128.269, 11.343, 0.84)
pt3dadd(137.02, 128.384, 11.347, 0.876)
pt3dadd(136.986, 128.5, 11.351, 0.914)
pt3dadd(136.954, 128.615, 11.355, 0.95)
pt3dadd(136.932, 128.734, 11.357, 0.938)
pt3dadd(136.912, 128.851, 11.36, 0.926)
pt3dadd(136.891, 128.97, 11.362, 0.914)
pt3dadd(136.87, 129.088, 11.364, 0.904)
pt3dadd(136.849, 129.206, 11.366, 0.892)
pt3dadd(136.829, 129.324, 11.368, 0.88)
pt3dadd(136.807, 129.442, 11.371, 0.868)
pt3dadd(136.787, 129.56, 11.373, 0.856)
pt3dadd(136.766, 129.678, 11.375, 0.846)
pt3dadd(136.746, 129.797, 11.377, 0.832)
pt3dadd(136.738, 129.917, 11.382, 0.788)
pt3dadd(136.728, 130.036, 11.386, 0.742)
pt3dadd(136.72, 130.156, 11.39, 0.698)
pt3dadd(136.711, 130.274, 11.395, 0.654)
pt3dadd(136.703, 130.394, 11.399, 0.608)
pt3dadd(136.693, 130.514, 11.403, 0.564)
pt3dadd(136.685, 130.633, 11.408, 0.52)
pt3dadd(136.676, 130.753, 11.412, 0.476)
pt3dadd(136.668, 130.873, 11.417, 0.43)
pt3dadd(136.66, 130.992, 11.421, 0.388)
pt3dadd(136.66, 131.112, 11.429, 0.38)
pt3dadd(136.66, 131.232, 11.437, 0.374)
pt3dadd(136.661, 131.351, 11.445, 0.366)
pt3dadd(136.661, 131.471, 11.453, 0.358)
pt3dadd(136.661, 131.591, 11.461, 0.352)
pt3dadd(136.661, 131.71, 11.469, 0.344)
pt3dadd(136.661, 131.83, 11.476, 0.336)
pt3dadd(136.662, 131.95, 11.484, 0.33)
pt3dadd(136.662, 132.068, 11.492, 0.322)
pt3dadd(136.662, 132.188, 11.5, 0.318)
pt3dadd(136.662, 132.307, 11.512, 0.376)
pt3dadd(136.663, 132.427, 11.524, 0.434)
pt3dadd(136.663, 132.546, 11.536, 0.49)
pt3dadd(136.663, 132.665, 11.548, 0.548)
pt3dadd(136.664, 132.785, 11.56, 0.606)
pt3dadd(136.664, 132.904, 11.572, 0.664)
pt3dadd(136.664, 133.022, 11.584, 0.72)
pt3dadd(136.664, 133.141, 11.596, 0.778)
pt3dadd(136.666, 133.261, 11.608, 0.836)
pt3dadd(136.666, 133.38, 11.622, 0.888)
pt3dadd(136.667, 133.49, 11.659, 0.854)
pt3dadd(136.667, 133.602, 11.696, 0.82)
pt3dadd(136.668, 133.714, 11.734, 0.788)
pt3dadd(136.668, 133.825, 11.771, 0.754)
pt3dadd(136.669, 133.936, 11.809, 0.72)
pt3dadd(136.669, 134.047, 11.846, 0.688)
pt3dadd(136.67, 134.159, 11.883, 0.654)
pt3dadd(136.67, 134.27, 11.921, 0.62)
pt3dadd(136.672, 134.381, 11.958, 0.586)
pt3dadd(136.672, 134.492, 11.995, 0.556)
pt3dadd(136.673, 134.608, 12.024, 0.558)
pt3dadd(136.675, 134.722, 12.054, 0.562)
pt3dadd(136.676, 134.837, 12.083, 0.564)
pt3dadd(136.678, 134.952, 12.113, 0.568)
pt3dadd(136.68, 135.066, 12.142, 0.57)
pt3dadd(136.681, 135.181, 12.172, 0.574)
pt3dadd(136.682, 135.295, 12.201, 0.576)
pt3dadd(136.685, 135.41, 12.23, 0.58)
pt3dadd(136.686, 135.524, 12.26, 0.584)
pt3dadd(136.687, 135.64, 12.288, 0.586)
pt3dadd(136.69, 135.757, 12.309, 0.584)
pt3dadd(136.693, 135.875, 12.329, 0.584)
pt3dadd(136.696, 135.992, 12.349, 0.584)
pt3dadd(136.698, 136.11, 12.37, 0.582)
pt3dadd(136.702, 136.228, 12.39, 0.582)
pt3dadd(136.704, 136.344, 12.41, 0.582)
pt3dadd(136.706, 136.462, 12.43, 0.58)
pt3dadd(136.71, 136.579, 12.451, 0.58)
pt3dadd(136.712, 136.697, 12.471, 0.578)
pt3dadd(136.715, 136.814, 12.49, 0.578)
pt3dadd(136.721, 136.933, 12.503, 0.572)
pt3dadd(136.727, 137.052, 12.516, 0.568)
pt3dadd(136.733, 137.171, 12.529, 0.562)
pt3dadd(136.739, 137.29, 12.542, 0.556)
pt3dadd(136.744, 137.408, 12.555, 0.55)
pt3dadd(136.75, 137.528, 12.568, 0.546)
pt3dadd(136.756, 137.647, 12.58, 0.54)
pt3dadd(136.762, 137.766, 12.593, 0.534)
pt3dadd(136.768, 137.885, 12.606, 0.53)
pt3dadd(136.774, 138.004, 12.619, 0.528)
pt3dadd(136.784, 138.122, 12.629, 0.548)
pt3dadd(136.796, 138.241, 12.64, 0.568)
pt3dadd(136.807, 138.36, 12.651, 0.59)
pt3dadd(136.819, 138.479, 12.662, 0.61)
pt3dadd(136.83, 138.598, 12.673, 0.63)
pt3dadd(136.841, 138.716, 12.684, 0.652)
pt3dadd(136.853, 138.834, 12.695, 0.672)
pt3dadd(136.864, 138.953, 12.705, 0.692)
pt3dadd(136.876, 139.072, 12.716, 0.714)
pt3dadd(136.888, 139.19, 12.729, 0.734)
pt3dadd(136.913, 139.304, 12.753, 0.746)
pt3dadd(136.938, 139.418, 12.777, 0.76)
pt3dadd(136.963, 139.531, 12.801, 0.774)
pt3dadd(136.987, 139.645, 12.825, 0.786)
pt3dadd(137.012, 139.759, 12.849, 0.8)
pt3dadd(137.038, 139.873, 12.873, 0.814)
pt3dadd(137.063, 139.987, 12.897, 0.826)
pt3dadd(137.087, 140.101, 12.921, 0.84)
pt3dadd(137.112, 140.214, 12.945, 0.854)
pt3dadd(137.148, 140.317, 12.98, 0.854)
pt3dadd(137.203, 140.404, 13.032, 0.832)
pt3dadd(137.258, 140.49, 13.084, 0.81)
pt3dadd(137.312, 140.576, 13.137, 0.788)
pt3dadd(137.368, 140.663, 13.189, 0.766)
pt3dadd(137.422, 140.749, 13.242, 0.742)
pt3dadd(137.477, 140.836, 13.294, 0.72)
pt3dadd(137.532, 140.922, 13.346, 0.698)
pt3dadd(137.586, 141.008, 13.399, 0.676)
pt3dadd(137.641, 141.095, 13.451, 0.654)
pt3dadd(137.688, 141.187, 13.499, 0.632)
pt3dadd(137.724, 141.29, 13.542, 0.612)
pt3dadd(137.761, 141.392, 13.584, 0.59)
pt3dadd(137.797, 141.494, 13.627, 0.568)
pt3dadd(137.834, 141.596, 13.669, 0.548)
pt3dadd(137.87, 141.7, 13.712, 0.526)
pt3dadd(137.908, 141.802, 13.754, 0.504)
pt3dadd(137.944, 141.904, 13.797, 0.484)
pt3dadd(137.981, 142.006, 13.84, 0.462)
pt3dadd(138.017, 142.109, 13.882, 0.44)
pt3dadd(138.047, 142.211, 13.928, 0.42)
pt3dadd(138.07, 142.312, 13.977, 0.402)
pt3dadd(138.092, 142.414, 14.027, 0.384)
pt3dadd(138.115, 142.516, 14.076, 0.366)
pt3dadd(138.138, 142.618, 14.126, 0.348)
pt3dadd(138.161, 142.72, 14.175, 0.33)
pt3dadd(138.184, 142.82, 14.225, 0.31)
pt3dadd(138.206, 142.922, 14.274, 0.292)
pt3dadd(138.229, 143.024, 14.324, 0.274)
pt3dadd(138.252, 143.126, 14.373, 0.256)
pt3dadd(138.274, 143.233, 14.413, 0.244)
pt3dadd(138.292, 143.347, 14.441, 0.242)
pt3dadd(138.31, 143.461, 14.469, 0.24)
pt3dadd(138.326, 143.575, 14.497, 0.238)
pt3dadd(138.344, 143.688, 14.524, 0.236)
pt3dadd(138.362, 143.802, 14.552, 0.234)
pt3dadd(138.38, 143.916, 14.58, 0.232)
pt3dadd(138.398, 144.03, 14.608, 0.23)
pt3dadd(138.416, 144.144, 14.636, 0.228)
pt3dadd(138.434, 144.258, 14.664, 0.226)
pt3dadd(138.463, 144.371, 14.686, 0.232)
pt3dadd(138.504, 144.481, 14.703, 0.242)
pt3dadd(138.545, 144.593, 14.72, 0.254)
pt3dadd(138.586, 144.703, 14.737, 0.266)
pt3dadd(138.626, 144.815, 14.754, 0.278)
pt3dadd(138.667, 144.925, 14.771, 0.29)
}
}
proc shape3d_17() {
dend_7[12] { pt3dadd(138.708, 145.037, 14.789, 0.3)
pt3dadd(138.749, 145.147, 14.806, 0.312)
pt3dadd(138.79, 145.259, 14.823, 0.324)
pt3dadd(138.83, 145.369, 14.84, 0.336)
pt3dadd(138.876, 145.478, 14.853, 0.358)
pt3dadd(138.925, 145.588, 14.864, 0.388)
pt3dadd(138.974, 145.697, 14.875, 0.416)
pt3dadd(139.024, 145.805, 14.886, 0.446)
pt3dadd(139.073, 145.914, 14.896, 0.476)
pt3dadd(139.121, 146.023, 14.907, 0.506)
pt3dadd(139.17, 146.131, 14.918, 0.536)
pt3dadd(139.219, 146.24, 14.929, 0.566)
pt3dadd(139.268, 146.348, 14.94, 0.596)
pt3dadd(139.318, 146.458, 14.951, 0.626)
pt3dadd(139.364, 146.568, 14.959, 0.666)
pt3dadd(139.409, 146.678, 14.967, 0.714)
pt3dadd(139.453, 146.79, 14.974, 0.762)
pt3dadd(139.499, 146.9, 14.982, 0.81)
pt3dadd(139.543, 147.012, 14.989, 0.858)
pt3dadd(139.588, 147.122, 14.997, 0.906)
pt3dadd(139.632, 147.234, 15.004, 0.954)
pt3dadd(139.678, 147.344, 15.012, 1.002)
pt3dadd(139.722, 147.456, 15.019, 1.05)
pt3dadd(139.766, 147.566, 15.027, 1.098)
pt3dadd(139.822, 147.672, 15.036, 1.106)
pt3dadd(139.88, 147.775, 15.048, 1.09)
pt3dadd(139.94, 147.878, 15.059, 1.074)
pt3dadd(140, 147.982, 15.07, 1.058)
pt3dadd(140.06, 148.085, 15.081, 1.04)
pt3dadd(140.12, 148.188, 15.093, 1.024)
pt3dadd(140.18, 148.291, 15.104, 1.008)
pt3dadd(140.24, 148.394, 15.115, 0.992)
pt3dadd(140.3, 148.498, 15.127, 0.974)
pt3dadd(140.36, 148.601, 15.138, 0.958)
pt3dadd(140.411, 148.705, 15.161, 0.948)
pt3dadd(140.455, 148.811, 15.191, 0.944)
pt3dadd(140.498, 148.916, 15.221, 0.94)
pt3dadd(140.543, 149.021, 15.252, 0.934)
pt3dadd(140.587, 149.126, 15.282, 0.93)
pt3dadd(140.632, 149.232, 15.312, 0.924)
pt3dadd(140.676, 149.338, 15.343, 0.92)
pt3dadd(140.72, 149.443, 15.373, 0.914)
pt3dadd(140.765, 149.549, 15.403, 0.91)
pt3dadd(140.809, 149.654, 15.434, 0.906)
pt3dadd(140.852, 149.759, 15.466, 0.9)
pt3dadd(140.894, 149.863, 15.5, 0.894)
pt3dadd(140.938, 149.968, 15.534, 0.888)
pt3dadd(140.98, 150.072, 15.568, 0.882)
pt3dadd(141.023, 150.176, 15.602, 0.876)
pt3dadd(141.065, 150.282, 15.636, 0.87)
pt3dadd(141.108, 150.386, 15.67, 0.864)
pt3dadd(141.15, 150.491, 15.704, 0.858)
pt3dadd(141.193, 150.595, 15.738, 0.852)
pt3dadd(141.235, 150.7, 15.772, 0.846)
pt3dadd(141.284, 150.803, 15.801, 0.832)
pt3dadd(141.336, 150.906, 15.828, 0.814)
pt3dadd(141.388, 151.01, 15.856, 0.798)
pt3dadd(141.438, 151.114, 15.883, 0.782)
pt3dadd(141.49, 151.217, 15.911, 0.764)
pt3dadd(141.541, 151.32, 15.938, 0.748)
pt3dadd(141.593, 151.423, 15.965, 0.732)
pt3dadd(141.644, 151.526, 15.993, 0.716)
pt3dadd(141.695, 151.63, 16.02, 0.698)
pt3dadd(141.746, 151.733, 16.048, 0.682)
pt3dadd(141.779, 151.844, 16.071, 0.678)
pt3dadd(141.803, 151.96, 16.093, 0.678)
pt3dadd(141.828, 152.074, 16.115, 0.678)
pt3dadd(141.853, 152.188, 16.137, 0.678)
pt3dadd(141.878, 152.303, 16.159, 0.678)
pt3dadd(141.904, 152.417, 16.181, 0.678)
pt3dadd(141.929, 152.531, 16.203, 0.678)
pt3dadd(141.954, 152.645, 16.225, 0.678)
pt3dadd(141.978, 152.76, 16.247, 0.678)
pt3dadd(142.003, 152.874, 16.269, 0.678)
pt3dadd(142.028, 152.988, 16.291, 0.678)
pt3dadd(142.054, 153.103, 16.313, 0.678)
pt3dadd(142.062, 153.215, 16.348, 0.648)
pt3dadd(142.067, 153.326, 16.385, 0.614)
pt3dadd(142.073, 153.437, 16.421, 0.58)
pt3dadd(142.078, 153.548, 16.458, 0.546)
pt3dadd(142.082, 153.66, 16.496, 0.514)
pt3dadd(142.088, 153.772, 16.532, 0.478)
pt3dadd(142.093, 153.883, 16.569, 0.444)
pt3dadd(142.099, 153.994, 16.606, 0.412)
pt3dadd(142.104, 154.105, 16.643, 0.378)
pt3dadd(142.109, 154.217, 16.68, 0.344)
pt3dadd(142.103, 154.331, 16.711, 0.328)
pt3dadd(142.096, 154.446, 16.74, 0.318)
pt3dadd(142.087, 154.56, 16.769, 0.306)
pt3dadd(142.079, 154.674, 16.798, 0.294)
pt3dadd(142.072, 154.789, 16.827, 0.284)
pt3dadd(142.063, 154.903, 16.857, 0.272)
pt3dadd(142.055, 155.018, 16.886, 0.262)
pt3dadd(142.048, 155.132, 16.915, 0.25)
pt3dadd(142.039, 155.246, 16.944, 0.238)
pt3dadd(142.032, 155.362, 16.973, 0.226)
pt3dadd(142.006, 155.476, 16.994, 0.226)
pt3dadd(141.977, 155.59, 17.014, 0.226)
pt3dadd(141.949, 155.705, 17.033, 0.226)
pt3dadd(141.92, 155.819, 17.053, 0.226)
pt3dadd(141.893, 155.933, 17.073, 0.226)
pt3dadd(141.864, 156.047, 17.092, 0.226)
pt3dadd(141.836, 156.161, 17.112, 0.226)
pt3dadd(141.808, 156.276, 17.132, 0.226)
pt3dadd(141.78, 156.39, 17.151, 0.226)
pt3dadd(141.751, 156.504, 17.171, 0.226)
pt3dadd(141.709, 156.616, 17.182, 0.226)
pt3dadd(141.668, 156.727, 17.194, 0.226)
pt3dadd(141.626, 156.839, 17.206, 0.226)
pt3dadd(141.584, 156.95, 17.218, 0.226)
pt3dadd(141.542, 157.062, 17.23, 0.226)
pt3dadd(141.5, 157.174, 17.241, 0.226)
pt3dadd(141.458, 157.285, 17.253, 0.226)
pt3dadd(141.416, 157.397, 17.265, 0.226)
pt3dadd(141.374, 157.508, 17.277, 0.226)
pt3dadd(141.334, 157.62, 17.288, 0.226)
pt3dadd(141.304, 157.736, 17.295, 0.226)
pt3dadd(141.275, 157.852, 17.302, 0.226)
pt3dadd(141.245, 157.968, 17.309, 0.226)
pt3dadd(141.216, 158.084, 17.316, 0.226)
pt3dadd(141.186, 158.2, 17.323, 0.226)
pt3dadd(141.156, 158.316, 17.329, 0.226)
pt3dadd(141.127, 158.432, 17.336, 0.226)
pt3dadd(141.097, 158.548, 17.343, 0.226)
pt3dadd(141.068, 158.664, 17.35, 0.226)
pt3dadd(141.038, 158.78, 17.357, 0.228)
pt3dadd(141.024, 158.898, 17.368, 0.302)
pt3dadd(141.008, 159.017, 17.379, 0.376)
pt3dadd(140.993, 159.134, 17.391, 0.448)
pt3dadd(140.977, 159.253, 17.402, 0.522)
pt3dadd(140.962, 159.371, 17.413, 0.594)
pt3dadd(140.946, 159.49, 17.425, 0.668)
pt3dadd(140.93, 159.607, 17.436, 0.74)
pt3dadd(140.915, 159.726, 17.447, 0.814)
pt3dadd(140.899, 159.844, 17.459, 0.888)
pt3dadd(140.885, 159.962, 17.471, 0.958)
pt3dadd(140.879, 160.075, 17.503, 0.99)
pt3dadd(140.872, 160.189, 17.534, 1.02)
pt3dadd(140.866, 160.303, 17.566, 1.052)
pt3dadd(140.86, 160.417, 17.597, 1.084)
pt3dadd(140.854, 160.531, 17.629, 1.114)
pt3dadd(140.846, 160.644, 17.66, 1.146)
pt3dadd(140.84, 160.758, 17.692, 1.178)
pt3dadd(140.834, 160.872, 17.723, 1.208)
pt3dadd(140.828, 160.986, 17.755, 1.24)
pt3dadd(140.821, 161.099, 17.786, 1.262)
pt3dadd(140.815, 161.213, 17.817, 1.224)
pt3dadd(140.809, 161.327, 17.847, 1.186)
pt3dadd(140.802, 161.441, 17.878, 1.148)
pt3dadd(140.796, 161.555, 17.909, 1.11)
pt3dadd(140.79, 161.67, 17.939, 1.072)
pt3dadd(140.783, 161.784, 17.97, 1.034)
pt3dadd(140.777, 161.898, 18.001, 0.996)
pt3dadd(140.771, 162.012, 18.031, 0.958)
pt3dadd(140.765, 162.126, 18.062, 0.92)
pt3dadd(140.758, 162.24, 18.091, 0.88)
pt3dadd(140.746, 162.358, 18.111, 0.824)
pt3dadd(140.735, 162.474, 18.132, 0.768)
pt3dadd(140.724, 162.592, 18.152, 0.714)
pt3dadd(140.713, 162.708, 18.172, 0.658)
pt3dadd(140.702, 162.826, 18.193, 0.602)
pt3dadd(140.69, 162.942, 18.213, 0.548)
pt3dadd(140.68, 163.058, 18.233, 0.492)
pt3dadd(140.669, 163.176, 18.253, 0.438)
pt3dadd(140.658, 163.292, 18.274, 0.382)
pt3dadd(140.645, 163.41, 18.292, 0.342)
pt3dadd(140.627, 163.528, 18.302, 0.376)
pt3dadd(140.608, 163.646, 18.313, 0.41)
pt3dadd(140.588, 163.764, 18.323, 0.444)
pt3dadd(140.569, 163.882, 18.333, 0.478)
pt3dadd(140.551, 163.999, 18.343, 0.514)
pt3dadd(140.532, 164.117, 18.353, 0.548)
pt3dadd(140.513, 164.236, 18.363, 0.582)
pt3dadd(140.494, 164.353, 18.373, 0.616)
pt3dadd(140.476, 164.471, 18.383, 0.65)
pt3dadd(140.45, 164.587, 18.391, 0.678)
pt3dadd(140.402, 164.698, 18.392, 0.678)
pt3dadd(140.354, 164.807, 18.392, 0.678)
pt3dadd(140.306, 164.917, 18.392, 0.678)
pt3dadd(140.258, 165.028, 18.393, 0.678)
pt3dadd(140.21, 165.137, 18.393, 0.678)
pt3dadd(140.162, 165.247, 18.393, 0.678)
pt3dadd(140.114, 165.358, 18.394, 0.678)
pt3dadd(140.066, 165.467, 18.394, 0.678)
pt3dadd(140.018, 165.577, 18.394, 0.678)
pt3dadd(139.972, 165.688, 18.395, 0.672)
pt3dadd(139.932, 165.8, 18.395, 0.642)
pt3dadd(139.892, 165.914, 18.396, 0.612)
pt3dadd(139.853, 166.027, 18.396, 0.582)
pt3dadd(139.812, 166.14, 18.397, 0.552)
pt3dadd(139.772, 166.254, 18.398, 0.522)
pt3dadd(139.733, 166.367, 18.398, 0.492)
pt3dadd(139.693, 166.48, 18.399, 0.462)
pt3dadd(139.654, 166.594, 18.4, 0.432)
pt3dadd(139.613, 166.706, 18.4, 0.402)
pt3dadd(139.574, 166.82, 18.401, 0.374)
pt3dadd(139.542, 166.936, 18.402, 0.36)
pt3dadd(139.508, 167.051, 18.403, 0.344)
pt3dadd(139.475, 167.166, 18.405, 0.328)
pt3dadd(139.441, 167.281, 18.406, 0.314)
}
}
proc shape3d_18() {
dend_7[12] { pt3dadd(139.409, 167.396, 18.407, 0.298)
pt3dadd(139.375, 167.512, 18.408, 0.284)
pt3dadd(139.342, 167.627, 18.41, 0.268)
pt3dadd(139.309, 167.742, 18.411, 0.254)
pt3dadd(139.276, 167.857, 18.412, 0.238)
pt3dadd(139.241, 167.972, 18.413, 0.228)
pt3dadd(139.202, 168.086, 18.416, 0.244)
pt3dadd(139.163, 168.199, 18.418, 0.258)
pt3dadd(139.124, 168.313, 18.42, 0.272)
pt3dadd(139.085, 168.426, 18.422, 0.286)
pt3dadd(139.046, 168.54, 18.424, 0.3)
pt3dadd(139.007, 168.653, 18.427, 0.314)
pt3dadd(138.968, 168.767, 18.429, 0.328)
pt3dadd(138.929, 168.881, 18.431, 0.342)
pt3dadd(138.89, 168.994, 18.433, 0.356)
pt3dadd(138.848, 169.106, 18.436, 0.374)
pt3dadd(138.797, 169.214, 18.439, 0.402)
pt3dadd(138.746, 169.322, 18.443, 0.432)
pt3dadd(138.695, 169.432, 18.447, 0.46)
pt3dadd(138.644, 169.54, 18.451, 0.488)
pt3dadd(138.593, 169.649, 18.454, 0.518)
pt3dadd(138.542, 169.757, 18.458, 0.546)
pt3dadd(138.491, 169.866, 18.462, 0.574)
pt3dadd(138.44, 169.974, 18.465, 0.602)
pt3dadd(138.389, 170.083, 18.469, 0.632)
pt3dadd(138.341, 170.192, 18.474, 0.648)
pt3dadd(138.298, 170.304, 18.482, 0.628)
pt3dadd(138.254, 170.416, 18.49, 0.608)
pt3dadd(138.211, 170.527, 18.498, 0.59)
pt3dadd(138.168, 170.639, 18.506, 0.57)
pt3dadd(138.125, 170.75, 18.514, 0.55)
pt3dadd(138.083, 170.862, 18.522, 0.53)
pt3dadd(138.04, 170.974, 18.53, 0.512)
pt3dadd(137.996, 171.085, 18.538, 0.492)
pt3dadd(137.953, 171.197, 18.546, 0.472)
pt3dadd(137.906, 171.306, 18.556, 0.452)
pt3dadd(137.848, 171.409, 18.569, 0.434)
pt3dadd(137.79, 171.514, 18.583, 0.414)
pt3dadd(137.731, 171.617, 18.597, 0.396)
pt3dadd(137.672, 171.72, 18.61, 0.376)
pt3dadd(137.614, 171.823, 18.624, 0.356)
pt3dadd(137.556, 171.928, 18.637, 0.338)
pt3dadd(137.497, 172.031, 18.651, 0.318)
pt3dadd(137.438, 172.134, 18.665, 0.298)
pt3dadd(137.38, 172.237, 18.678, 0.28)
pt3dadd(137.327, 172.339, 18.702, 0.264)
pt3dadd(137.287, 172.433, 18.754, 0.26)
pt3dadd(137.246, 172.528, 18.805, 0.256)
pt3dadd(137.207, 172.622, 18.857, 0.252)
pt3dadd(137.167, 172.717, 18.909, 0.248)
pt3dadd(137.126, 172.812, 18.96, 0.244)
pt3dadd(137.087, 172.907, 19.012, 0.24)
pt3dadd(137.046, 173.002, 19.064, 0.236)
pt3dadd(137.006, 173.095, 19.116, 0.232)
pt3dadd(136.967, 173.19, 19.167, 0.228)
pt3dadd(136.946, 173.29, 19.217, 0.226)
pt3dadd(136.945, 173.395, 19.266, 0.226)
pt3dadd(136.944, 173.5, 19.315, 0.226)
pt3dadd(136.943, 173.604, 19.363, 0.226)
pt3dadd(136.942, 173.71, 19.412, 0.226)
pt3dadd(136.94, 173.814, 19.46, 0.226)
pt3dadd(136.939, 173.92, 19.509, 0.226)
pt3dadd(136.938, 174.024, 19.558, 0.226)
pt3dadd(136.937, 174.128, 19.606, 0.226)
pt3dadd(136.936, 174.234, 19.655, 0.226)
pt3dadd(136.957, 174.336, 19.701, 0.226)
pt3dadd(136.996, 174.437, 19.746, 0.226)
pt3dadd(137.033, 174.538, 19.79, 0.226)
pt3dadd(137.071, 174.637, 19.834, 0.226)
pt3dadd(137.11, 174.738, 19.879, 0.226)
pt3dadd(137.148, 174.839, 19.923, 0.226)
pt3dadd(137.186, 174.94, 19.967, 0.226)
pt3dadd(137.225, 175.039, 20.012, 0.226)
pt3dadd(137.263, 175.14, 20.056, 0.226)
pt3dadd(137.302, 175.241, 20.1, 0.226)
pt3dadd(137.378, 175.292, 20.164, 0.226)
pt3dadd(137.455, 175.343, 20.228, 0.226)
pt3dadd(137.532, 175.394, 20.292, 0.226)
pt3dadd(137.609, 175.446, 20.356, 0.226)
pt3dadd(137.684, 175.496, 20.42, 0.226)
pt3dadd(137.761, 175.548, 20.484, 0.226)
pt3dadd(137.838, 175.6, 20.548, 0.226)
pt3dadd(137.915, 175.651, 20.612, 0.226)
pt3dadd(137.992, 175.702, 20.676, 0.226)
pt3dadd(138.068, 175.753, 20.74, 0.226)
}
dend_7[13] {pt3dclear()
pt3dadd(138.031, 122.12, 10.302, 1.356)
pt3dadd(138.017, 122.11, 10.259, 1.344)
pt3dadd(138.011, 122.171, 10.175, 1.304)
pt3dadd(138.005, 122.233, 10.091, 1.266)
pt3dadd(137.999, 122.294, 10.007, 1.228)
pt3dadd(137.993, 122.354, 9.923, 1.19)
pt3dadd(137.988, 122.417, 9.84, 1.152)
pt3dadd(137.982, 122.478, 9.756, 1.114)
pt3dadd(137.977, 122.539, 9.672, 1.076)
pt3dadd(137.97, 122.6, 9.588, 1.036)
pt3dadd(137.965, 122.662, 9.504, 0.998)
pt3dadd(137.959, 122.723, 9.42, 0.96)
pt3dadd(137.954, 122.784, 9.336, 0.922)
pt3dadd(137.948, 122.846, 9.253, 0.884)
pt3dadd(137.936, 122.929, 9.191, 0.858)
pt3dadd(137.922, 123.016, 9.136, 0.838)
pt3dadd(137.909, 123.104, 9.082, 0.816)
pt3dadd(137.894, 123.193, 9.027, 0.794)
pt3dadd(137.881, 123.281, 8.972, 0.774)
pt3dadd(137.867, 123.368, 8.917, 0.752)
pt3dadd(137.854, 123.457, 8.862, 0.73)
pt3dadd(137.839, 123.545, 8.807, 0.71)
pt3dadd(137.826, 123.634, 8.752, 0.688)
pt3dadd(137.807, 123.728, 8.717, 0.676)
pt3dadd(137.798, 123.71, 8.708, 0.676)
pt3dadd(137.774, 123.809, 8.69, 0.672)
pt3dadd(137.748, 123.91, 8.672, 0.67)
pt3dadd(137.723, 124.009, 8.654, 0.666)
pt3dadd(137.698, 124.109, 8.637, 0.662)
pt3dadd(137.672, 124.208, 8.619, 0.66)
pt3dadd(137.647, 124.309, 8.601, 0.656)
pt3dadd(137.622, 124.408, 8.584, 0.652)
pt3dadd(137.596, 124.508, 8.566, 0.65)
pt3dadd(137.588, 124.49, 8.557, 0.65)
pt3dadd(137.563, 124.59, 8.539, 0.646)
pt3dadd(137.528, 124.687, 8.519, 0.634)
pt3dadd(137.485, 124.783, 8.498, 0.614)
pt3dadd(137.443, 124.879, 8.477, 0.594)
pt3dadd(137.399, 124.974, 8.456, 0.576)
pt3dadd(137.357, 125.069, 8.434, 0.556)
pt3dadd(137.314, 125.165, 8.413, 0.536)
pt3dadd(137.272, 125.26, 8.392, 0.518)
pt3dadd(137.228, 125.356, 8.371, 0.498)
pt3dadd(137.186, 125.452, 8.349, 0.478)
pt3dadd(137.142, 125.548, 8.328, 0.46)
pt3dadd(137.131, 125.644, 8.302, 0.452)
pt3dadd(137.137, 125.742, 8.272, 0.452)
pt3dadd(137.146, 125.84, 8.243, 0.452)
pt3dadd(137.153, 125.938, 8.214, 0.452)
pt3dadd(137.16, 126.036, 8.184, 0.452)
pt3dadd(137.168, 126.136, 8.155, 0.452)
pt3dadd(137.174, 126.233, 8.125, 0.452)
pt3dadd(137.183, 126.331, 8.096, 0.452)
pt3dadd(137.189, 126.43, 8.066, 0.452)
pt3dadd(137.197, 126.528, 8.037, 0.452)
pt3dadd(137.201, 126.619, 7.992, 0.452)
pt3dadd(137.202, 126.708, 7.938, 0.452)
pt3dadd(137.194, 126.69, 7.929, 0.452)
pt3dadd(137.195, 126.778, 7.874, 0.452)
pt3dadd(137.196, 126.866, 7.82, 0.452)
pt3dadd(137.197, 126.954, 7.765, 0.452)
pt3dadd(137.198, 127.042, 7.711, 0.452)
pt3dadd(137.2, 127.13, 7.657, 0.452)
pt3dadd(137.201, 127.219, 7.602, 0.452)
pt3dadd(137.202, 127.308, 7.548, 0.452)
pt3dadd(137.203, 127.396, 7.493, 0.452)
pt3dadd(137.201, 127.48, 7.432, 0.462)
pt3dadd(137.197, 127.561, 7.368, 0.478)
pt3dadd(137.195, 127.642, 7.303, 0.494)
pt3dadd(137.191, 127.723, 7.239, 0.51)
pt3dadd(137.188, 127.805, 7.174, 0.526)
pt3dadd(137.185, 127.886, 7.11, 0.542)
pt3dadd(137.182, 127.968, 7.046, 0.558)
pt3dadd(137.178, 128.05, 6.981, 0.574)
pt3dadd(137.174, 128.131, 6.917, 0.59)
pt3dadd(137.172, 128.213, 6.852, 0.606)
pt3dadd(137.165, 128.291, 6.784, 0.63)
pt3dadd(137.156, 128.369, 6.715, 0.658)
pt3dadd(137.147, 128.446, 6.645, 0.688)
pt3dadd(137.138, 128.524, 6.576, 0.716)
pt3dadd(137.13, 128.6, 6.507, 0.744)
pt3dadd(137.122, 128.677, 6.437, 0.772)
pt3dadd(137.112, 128.755, 6.368, 0.802)
pt3dadd(137.105, 128.832, 6.298, 0.83)
pt3dadd(137.095, 128.91, 6.229, 0.858)
pt3dadd(137.087, 128.987, 6.159, 0.888)
pt3dadd(137.052, 129.066, 6.099, 0.882)
pt3dadd(137.006, 129.146, 6.042, 0.866)
pt3dadd(136.961, 129.227, 5.985, 0.85)
pt3dadd(136.916, 129.307, 5.928, 0.834)
pt3dadd(136.871, 129.388, 5.871, 0.818)
pt3dadd(136.826, 129.467, 5.814, 0.8)
pt3dadd(136.781, 129.547, 5.757, 0.784)
pt3dadd(136.736, 129.628, 5.7, 0.768)
pt3dadd(136.692, 129.708, 5.643, 0.752)
pt3dadd(136.646, 129.787, 5.586, 0.736)
pt3dadd(136.612, 129.868, 5.524, 0.71)
pt3dadd(136.58, 129.947, 5.459, 0.682)
pt3dadd(136.549, 130.025, 5.395, 0.654)
pt3dadd(136.518, 130.104, 5.331, 0.624)
pt3dadd(136.487, 130.183, 5.266, 0.596)
pt3dadd(136.456, 130.261, 5.202, 0.568)
pt3dadd(136.426, 130.34, 5.138, 0.54)
pt3dadd(136.393, 130.42, 5.073, 0.51)
pt3dadd(136.363, 130.499, 5.009, 0.482)
pt3dadd(136.331, 130.577, 4.945, 0.454)
pt3dadd(136.312, 130.655, 4.876, 0.444)
pt3dadd(136.295, 130.732, 4.806, 0.44)
pt3dadd(136.278, 130.807, 4.736, 0.436)
pt3dadd(136.261, 130.883, 4.665, 0.432)
pt3dadd(136.246, 130.96, 4.595, 0.428)
pt3dadd(136.228, 131.035, 4.525, 0.426)
pt3dadd(136.212, 131.112, 4.455, 0.422)
pt3dadd(136.194, 131.189, 4.385, 0.418)
pt3dadd(136.178, 131.266, 4.315, 0.414)
}
}
proc shape3d_19() {
dend_7[13] { pt3dadd(136.16, 131.341, 4.245, 0.41)
pt3dadd(136.159, 131.413, 4.171, 0.45)
pt3dadd(136.16, 131.486, 4.096, 0.502)
pt3dadd(136.16, 131.557, 4.021, 0.554)
pt3dadd(136.162, 131.629, 3.947, 0.604)
pt3dadd(136.163, 131.701, 3.872, 0.656)
pt3dadd(136.164, 131.772, 3.797, 0.706)
pt3dadd(136.164, 131.844, 3.723, 0.758)
pt3dadd(136.165, 131.917, 3.648, 0.808)
pt3dadd(136.165, 131.989, 3.573, 0.86)
pt3dadd(136.166, 132.06, 3.499, 0.912)
pt3dadd(136.223, 132.113, 3.432, 0.936)
pt3dadd(136.286, 132.163, 3.366, 0.956)
pt3dadd(136.349, 132.212, 3.299, 0.978)
pt3dadd(136.412, 132.264, 3.233, 1)
pt3dadd(136.475, 132.314, 3.167, 1.022)
pt3dadd(136.537, 132.365, 3.1, 1.042)
pt3dadd(136.6, 132.414, 3.034, 1.064)
pt3dadd(136.663, 132.464, 2.968, 1.086)
pt3dadd(136.726, 132.516, 2.902, 1.106)
pt3dadd(136.789, 132.565, 2.835, 1.128)
pt3dadd(136.842, 132.62, 2.766, 1.124)
pt3dadd(136.896, 132.676, 2.696, 1.118)
pt3dadd(136.948, 132.73, 2.625, 1.112)
pt3dadd(137.002, 132.785, 2.555, 1.106)
pt3dadd(137.053, 132.84, 2.485, 1.1)
pt3dadd(137.107, 132.895, 2.415, 1.094)
pt3dadd(137.16, 132.949, 2.345, 1.088)
pt3dadd(137.213, 133.004, 2.275, 1.082)
pt3dadd(137.266, 133.06, 2.205, 1.076)
pt3dadd(137.318, 133.114, 2.135, 1.072)
pt3dadd(137.413, 133.139, 2.089, 0.986)
pt3dadd(137.508, 133.165, 2.043, 0.902)
pt3dadd(137.603, 133.19, 1.997, 0.818)
pt3dadd(137.698, 133.216, 1.951, 0.734)
pt3dadd(137.792, 133.242, 1.906, 0.648)
pt3dadd(137.887, 133.267, 1.86, 0.564)
pt3dadd(137.982, 133.292, 1.814, 0.48)
pt3dadd(138.077, 133.319, 1.768, 0.396)
pt3dadd(138.172, 133.344, 1.723, 0.31)
pt3dadd(138.266, 133.369, 1.677, 0.226)
}
dend_7[14] {pt3dclear()
pt3dadd(138.266, 133.369, 1.677, 0.226)
pt3dadd(138.143, 133.284, 1.674, 0.678)
}
dend_7[15] {pt3dclear()
pt3dadd(138.266, 133.369, 1.677, 0.226)
pt3dadd(138.151, 133.302, 1.683, 0.678)
}
dend_7[16] {pt3dclear()
pt3dadd(138.266, 133.369, 1.677, 0.226)
pt3dadd(138.366, 133.4, 1.652, 0.726)
pt3dadd(138.415, 133.476, 1.609, 0.8)
pt3dadd(138.454, 133.559, 1.565, 0.884)
pt3dadd(138.438, 133.66, 1.556, 0.978)
pt3dadd(138.422, 133.762, 1.547, 1.074)
pt3dadd(138.406, 133.862, 1.538, 1.17)
pt3dadd(138.385, 133.963, 1.529, 1.262)
pt3dadd(138.365, 134.064, 1.52, 1.354)
pt3dadd(138.344, 134.165, 1.511, 1.446)
pt3dadd(138.324, 134.267, 1.502, 1.548)
pt3dadd(138.304, 134.368, 1.492, 1.632)
pt3dadd(138.283, 134.468, 1.483, 1.636)
pt3dadd(138.263, 134.569, 1.474, 1.64)
pt3dadd(138.242, 134.67, 1.465, 1.644)
pt3dadd(138.222, 134.771, 1.456, 1.648)
pt3dadd(138.202, 134.873, 1.447, 1.65)
pt3dadd(138.181, 134.974, 1.438, 1.654)
pt3dadd(138.174, 134.954, 1.429, 1.654)
pt3dadd(138.157, 135.056, 1.417, 1.658)
pt3dadd(138.156, 135.156, 1.389, 1.658)
pt3dadd(138.157, 135.254, 1.361, 1.658)
pt3dadd(138.157, 135.354, 1.333, 1.658)
pt3dadd(138.157, 135.454, 1.305, 1.658)
pt3dadd(138.158, 135.551, 1.277, 1.658)
pt3dadd(138.142, 135.653, 1.265, 1.648)
pt3dadd(138.124, 135.754, 1.256, 1.636)
pt3dadd(138.106, 135.856, 1.247, 1.626)
pt3dadd(138.086, 135.956, 1.238, 1.614)
pt3dadd(138.068, 136.057, 1.228, 1.604)
pt3dadd(138.049, 136.159, 1.219, 1.594)
pt3dadd(138.031, 136.26, 1.21, 1.582)
pt3dadd(138.011, 136.361, 1.201, 1.582)
pt3dadd(137.99, 136.462, 1.192, 1.582)
pt3dadd(137.97, 136.562, 1.183, 1.582)
pt3dadd(137.95, 136.664, 1.174, 1.582)
pt3dadd(137.929, 136.765, 1.165, 1.582)
pt3dadd(137.91, 136.866, 1.156, 1.582)
pt3dadd(137.89, 136.967, 1.147, 1.582)
pt3dadd(137.869, 137.068, 1.137, 1.572)
pt3dadd(137.849, 137.168, 1.128, 1.56)
pt3dadd(137.828, 137.269, 1.119, 1.55)
pt3dadd(137.808, 137.371, 1.11, 1.54)
pt3dadd(137.788, 137.472, 1.101, 1.528)
pt3dadd(137.767, 137.573, 1.092, 1.518)
pt3dadd(137.747, 137.674, 1.083, 1.506)
pt3dadd(137.726, 137.774, 1.074, 1.496)
pt3dadd(137.706, 137.875, 1.065, 1.486)
pt3dadd(137.686, 137.977, 1.055, 1.474)
pt3dadd(137.665, 138.078, 1.046, 1.464)
pt3dadd(137.645, 138.179, 1.037, 1.452)
pt3dadd(137.626, 138.28, 1.028, 1.442)
pt3dadd(137.605, 138.38, 1.019, 1.432)
pt3dadd(137.585, 138.481, 1.005, 1.406)
pt3dadd(137.564, 138.582, 0.991, 1.38)
pt3dadd(137.544, 138.684, 0.977, 1.352)
pt3dadd(137.524, 138.784, 0.963, 1.326)
pt3dadd(137.503, 138.884, 0.949, 1.3)
pt3dadd(137.483, 138.985, 0.935, 1.274)
pt3dadd(137.462, 139.086, 0.919, 1.248)
pt3dadd(137.442, 139.186, 0.899, 1.224)
pt3dadd(137.422, 139.286, 0.88, 1.202)
pt3dadd(137.402, 139.387, 0.86, 1.178)
pt3dadd(137.382, 139.488, 0.84, 1.154)
pt3dadd(137.362, 139.588, 0.821, 1.13)
pt3dadd(137.341, 139.688, 0.801, 1.106)
pt3dadd(137.309, 139.787, 0.792, 1.086)
pt3dadd(137.276, 139.886, 0.782, 1.066)
pt3dadd(137.243, 139.985, 0.773, 1.048)
pt3dadd(137.212, 140.083, 0.764, 1.028)
pt3dadd(137.178, 140.183, 0.755, 1.008)
pt3dadd(137.146, 140.282, 0.746, 0.988)
pt3dadd(137.116, 140.376, 0.715, 0.976)
pt3dadd(137.089, 140.466, 0.666, 0.972)
pt3dadd(137.062, 140.557, 0.618, 0.966)
pt3dadd(137.034, 140.647, 0.569, 0.962)
pt3dadd(137.008, 140.737, 0.521, 0.956)
pt3dadd(136.986, 140.814, 0.456, 0.954)
pt3dadd(136.969, 140.875, 0.373, 0.954)
pt3dadd(136.954, 140.939, 0.29, 0.954)
pt3dadd(136.937, 141, 0.206, 0.954)
pt3dadd(136.921, 141.061, 0.123, 0.954)
pt3dadd(136.903, 141.137, 0.056, 0.962)
pt3dadd(136.884, 141.227, 0.002, 0.976)
pt3dadd(136.865, 141.314, -0.052, 0.99)
pt3dadd(136.847, 141.402, -0.106, 1.006)
pt3dadd(136.828, 141.491, -0.16, 1.02)
pt3dadd(136.807, 141.583, -0.2, 1.03)
pt3dadd(136.787, 141.685, -0.209, 1.034)
pt3dadd(136.768, 141.786, -0.218, 1.038)
pt3dadd(136.747, 141.887, -0.227, 1.042)
pt3dadd(136.727, 141.988, -0.236, 1.046)
pt3dadd(136.706, 142.088, -0.245, 1.048)
pt3dadd(136.686, 142.189, -0.254, 1.052)
pt3dadd(136.673, 142.29, -0.263, 1.056)
pt3dadd(136.674, 142.391, -0.273, 1.06)
pt3dadd(136.676, 142.493, -0.282, 1.064)
pt3dadd(136.678, 142.594, -0.291, 1.068)
pt3dadd(136.681, 142.696, -0.3, 1.072)
pt3dadd(136.682, 142.796, -0.309, 1.076)
pt3dadd(136.693, 142.896, -0.325, 1.078)
pt3dadd(136.723, 142.987, -0.355, 1.072)
pt3dadd(136.752, 143.08, -0.386, 1.068)
pt3dadd(136.782, 143.173, -0.417, 1.062)
pt3dadd(136.812, 143.266, -0.448, 1.056)
pt3dadd(136.818, 143.364, -0.464, 1.068)
pt3dadd(136.813, 143.466, -0.473, 1.086)
pt3dadd(136.807, 143.568, -0.482, 1.104)
pt3dadd(136.792, 143.532, -0.5, 1.104)
}
dend_7[17] {pt3dclear()
pt3dadd(136.792, 143.532, -0.5, 1.104)
pt3dadd(136.808, 143.608, -0.5, 1.132)
pt3dadd(136.837, 143.724, -0.5, 1.174)
pt3dadd(136.871, 143.838, -0.5, 1.226)
pt3dadd(136.92, 143.947, -0.5, 1.294)
pt3dadd(136.975, 144.054, -0.5, 1.36)
pt3dadd(137.071, 144.125, -0.5, 1.394)
pt3dadd(137.168, 144.196, -0.5, 1.428)
pt3dadd(137.274, 144.251, -0.5, 1.432)
pt3dadd(137.371, 144.318, -0.5, 1.422)
pt3dadd(137.45, 144.408, -0.5, 1.396)
pt3dadd(137.531, 144.498, -0.5, 1.372)
pt3dadd(137.611, 144.587, -0.5, 1.346)
pt3dadd(137.69, 144.678, -0.5, 1.32)
pt3dadd(137.777, 144.76, -0.5, 1.296)
pt3dadd(137.875, 144.829, -0.5, 1.272)
pt3dadd(137.971, 144.899, -0.5, 1.248)
pt3dadd(138.068, 144.97, -0.5, 1.222)
pt3dadd(138.167, 145.04, -0.5, 1.198)
pt3dadd(138.265, 145.106, -0.5, 1.176)
pt3dadd(138.372, 145.162, -0.5, 1.162)
pt3dadd(138.479, 145.218, -0.5, 1.148)
pt3dadd(138.584, 145.274, -0.5, 1.134)
pt3dadd(138.691, 145.331, -0.5, 1.12)
pt3dadd(138.797, 145.386, -0.5, 1.106)
pt3dadd(138.895, 145.454, -0.5, 1.114)
pt3dadd(138.992, 145.525, -0.5, 1.124)
pt3dadd(139.088, 145.596, -0.5, 1.134)
pt3dadd(139.187, 145.666, -0.5, 1.142)
pt3dadd(139.283, 145.736, -0.5, 1.152)
pt3dadd(139.351, 145.834, -0.5, 1.158)
pt3dadd(139.409, 145.938, -0.5, 1.164)
pt3dadd(139.468, 146.044, -0.5, 1.168)
pt3dadd(139.525, 146.148, -0.5, 1.174)
pt3dadd(139.584, 146.254, -0.5, 1.178)
pt3dadd(139.604, 146.369, -0.5, 1.168)
pt3dadd(139.613, 146.488, -0.5, 1.152)
pt3dadd(139.62, 146.609, -0.5, 1.134)
pt3dadd(139.626, 146.729, -0.5, 1.118)
pt3dadd(139.634, 146.848, -0.5, 1.102)
pt3dadd(139.64, 146.968, -0.5, 1.086)
pt3dadd(139.646, 147.088, -0.5, 1.064)
pt3dadd(139.652, 147.208, -0.5, 1.04)
pt3dadd(139.656, 147.328, -0.5, 1.014)
pt3dadd(139.662, 147.448, -0.5, 0.99)
pt3dadd(139.666, 147.568, -0.5, 0.966)
}
}
proc shape3d_20() {
dend_7[17] { pt3dadd(139.672, 147.688, -0.5, 0.942)
pt3dadd(139.669, 147.805, -0.508, 0.932)
pt3dadd(139.658, 147.924, -0.525, 0.936)
pt3dadd(139.649, 148.043, -0.542, 0.94)
pt3dadd(139.638, 148.159, -0.558, 0.944)
pt3dadd(139.627, 148.278, -0.575, 0.948)
pt3dadd(139.618, 148.394, -0.592, 0.952)
pt3dadd(139.61, 148.514, -0.6, 0.964)
pt3dadd(139.602, 148.633, -0.6, 0.982)
pt3dadd(139.596, 148.753, -0.6, 1.002)
pt3dadd(139.589, 148.873, -0.6, 1.02)
pt3dadd(139.583, 148.993, -0.6, 1.038)
pt3dadd(139.576, 149.113, -0.6, 1.058)
pt3dadd(139.57, 149.233, -0.6, 1.076)
pt3dadd(139.591, 149.351, -0.6, 1.088)
pt3dadd(139.618, 149.467, -0.6, 1.096)
pt3dadd(139.643, 149.585, -0.6, 1.106)
pt3dadd(139.67, 149.701, -0.6, 1.114)
pt3dadd(139.697, 149.819, -0.6, 1.124)
pt3dadd(139.728, 149.933, -0.609, 1.118)
pt3dadd(139.768, 150.04, -0.639, 1.078)
pt3dadd(139.808, 150.146, -0.67, 1.038)
pt3dadd(139.848, 150.254, -0.7, 0.998)
pt3dadd(139.889, 150.361, -0.73, 0.958)
pt3dadd(139.981, 150.401, -0.778, 0.888)
pt3dadd(140.08, 150.431, -0.829, 0.81)
pt3dadd(140.155, 150.51, -0.867, 0.778)
pt3dadd(140.22, 150.596, -0.904, 0.756)
pt3dadd(140.213, 150.712, -0.932, 0.778)
pt3dadd(140.207, 150.827, -0.961, 0.8)
pt3dadd(140.197, 150.924, -1.017, 0.794)
pt3dadd(140.188, 151.016, -1.079, 0.782)
pt3dadd(140.178, 151.11, -1.142, 0.754)
pt3dadd(140.168, 151.206, -1.201, 0.728)
pt3dadd(140.156, 151.312, -1.248, 0.728)
pt3dadd(140.146, 151.416, -1.295, 0.728)
pt3dadd(140.135, 151.522, -1.342, 0.728)
pt3dadd(140.124, 151.626, -1.39, 0.728)
pt3dadd(140.113, 151.73, -1.439, 0.73)
pt3dadd(140.105, 151.81, -1.513, 0.744)
pt3dadd(140.096, 151.89, -1.587, 0.76)
pt3dadd(140.088, 151.972, -1.661, 0.774)
pt3dadd(140.08, 152.051, -1.735, 0.79)
pt3dadd(140.071, 152.129, -1.81, 0.806)
pt3dadd(140.064, 152.192, -1.895, 0.82)
pt3dadd(140.058, 152.254, -1.981, 0.836)
pt3dadd(140.051, 152.317, -2.066, 0.85)
pt3dadd(140.045, 152.38, -2.151, 0.864)
pt3dadd(140.038, 152.444, -2.235, 0.878)
pt3dadd(140.027, 152.545, -2.287, 0.878)
pt3dadd(140.016, 152.647, -2.34, 0.878)
pt3dadd(140.006, 152.748, -2.392, 0.878)
pt3dadd(139.996, 152.85, -2.445, 0.878)
pt3dadd(139.985, 152.951, -2.497, 0.878)
pt3dadd(139.95, 153.024, -2.572, 0.874)
pt3dadd(139.916, 153.092, -2.648, 0.868)
pt3dadd(139.882, 153.162, -2.724, 0.862)
pt3dadd(139.847, 153.233, -2.8, 0.856)
pt3dadd(139.825, 153.317, -2.867, 0.852)
pt3dadd(139.816, 153.413, -2.927, 0.846)
pt3dadd(139.805, 153.508, -2.987, 0.84)
pt3dadd(139.795, 153.604, -3.047, 0.836)
pt3dadd(139.786, 153.698, -3.107, 0.832)
pt3dadd(139.775, 153.797, -3.164, 0.826)
pt3dadd(139.765, 153.895, -3.219, 0.822)
pt3dadd(139.754, 153.996, -3.274, 0.816)
pt3dadd(139.744, 154.094, -3.329, 0.812)
pt3dadd(139.733, 154.195, -3.384, 0.806)
pt3dadd(139.722, 154.297, -3.436, 0.804)
pt3dadd(139.711, 154.4, -3.486, 0.804)
pt3dadd(139.7, 154.504, -3.536, 0.804)
pt3dadd(139.69, 154.607, -3.586, 0.804)
pt3dadd(139.679, 154.711, -3.636, 0.804)
pt3dadd(139.668, 154.814, -3.684, 0.804)
pt3dadd(139.657, 154.922, -3.729, 0.804)
pt3dadd(139.645, 155.028, -3.773, 0.804)
pt3dadd(139.634, 155.136, -3.818, 0.804)
pt3dadd(139.624, 155.242, -3.863, 0.804)
pt3dadd(139.613, 155.347, -3.91, 0.804)
pt3dadd(139.612, 155.442, -3.971, 0.81)
pt3dadd(139.61, 155.538, -4.031, 0.814)
pt3dadd(139.608, 155.634, -4.092, 0.82)
pt3dadd(139.607, 155.729, -4.152, 0.826)
pt3dadd(139.62, 155.826, -4.208, 0.828)
pt3dadd(139.652, 155.924, -4.257, 0.828)
pt3dadd(139.688, 156.017, -4.314, 0.828)
pt3dadd(139.724, 156.103, -4.376, 0.828)
pt3dadd(139.734, 156.216, -4.392, 0.828)
pt3dadd(139.738, 156.336, -4.397, 0.828)
pt3dadd(139.735, 156.456, -4.4, 0.826)
pt3dadd(139.718, 156.575, -4.4, 0.818)
pt3dadd(139.703, 156.694, -4.4, 0.81)
pt3dadd(139.661, 156.787, -4.418, 0.792)
pt3dadd(139.571, 156.827, -4.474, 0.758)
pt3dadd(139.48, 156.868, -4.531, 0.724)
pt3dadd(139.402, 156.931, -4.575, 0.676)
pt3dadd(139.344, 157.032, -4.597, 0.6)
pt3dadd(139.292, 157.135, -4.623, 0.528)
pt3dadd(139.252, 157.241, -4.657, 0.462)
pt3dadd(139.21, 157.346, -4.69, 0.398)
pt3dadd(139.178, 157.46, -4.7, 0.35)
pt3dadd(139.151, 157.577, -4.7, 0.314)
pt3dadd(139.124, 157.693, -4.7, 0.276)
pt3dadd(139.111, 157.812, -4.7, 0.226)
pt3dadd(139.099, 157.932, -4.7, 0.226)
pt3dadd(139.086, 158.051, -4.7, 0.226)
pt3dadd(139.074, 158.171, -4.7, 0.226)
pt3dadd(139.062, 158.29, -4.7, 0.226)
pt3dadd(139.049, 158.41, -4.7, 0.226)
pt3dadd(139.037, 158.528, -4.7, 0.226)
}
dend_7[18] {pt3dclear()
pt3dadd(136.792, 143.532, -0.5, 1.104)
pt3dadd(136.724, 143.53, -0.553, 1.156)
pt3dadd(136.637, 143.526, -0.621, 1.22)
pt3dadd(136.548, 143.522, -0.69, 1.286)
pt3dadd(136.46, 143.518, -0.758, 1.352)
pt3dadd(136.373, 143.515, -0.826, 1.416)
pt3dadd(136.285, 143.51, -0.895, 1.482)
pt3dadd(136.198, 143.507, -0.963, 1.546)
pt3dadd(136.145, 143.56, -1, 1.576)
pt3dadd(136.133, 143.678, -1, 1.56)
pt3dadd(136.12, 143.798, -1, 1.546)
pt3dadd(136.108, 143.917, -1, 1.532)
pt3dadd(136.096, 144.037, -1, 1.518)
pt3dadd(136.082, 144.156, -1, 1.504)
pt3dadd(136.07, 144.276, -1, 1.49)
pt3dadd(136.057, 144.395, -1, 1.466)
pt3dadd(136.045, 144.515, -1, 1.43)
pt3dadd(136.032, 144.634, -1, 1.394)
pt3dadd(136.02, 144.752, -1, 1.358)
pt3dadd(136.007, 144.872, -1, 1.322)
pt3dadd(135.995, 144.991, -1, 1.286)
pt3dadd(135.982, 145.111, -1, 1.25)
pt3dadd(135.96, 145.228, -1, 1.212)
pt3dadd(135.929, 145.344, -1, 1.17)
pt3dadd(135.898, 145.46, -1, 1.128)
pt3dadd(135.864, 145.576, -1, 1.088)
pt3dadd(135.833, 145.691, -1, 1.046)
pt3dadd(135.8, 145.807, -1, 1.006)
pt3dadd(135.776, 145.925, -1, 0.97)
pt3dadd(135.763, 146.044, -1, 0.944)
pt3dadd(135.751, 146.162, -1, 0.92)
pt3dadd(135.738, 146.282, -1, 0.894)
pt3dadd(135.726, 146.401, -1, 0.87)
pt3dadd(135.713, 146.521, -1, 0.844)
pt3dadd(135.701, 146.64, -1, 0.82)
pt3dadd(135.689, 146.76, -1, 0.804)
pt3dadd(135.676, 146.879, -1, 0.804)
pt3dadd(135.664, 146.999, -1, 0.804)
pt3dadd(135.65, 147.118, -1, 0.804)
pt3dadd(135.638, 147.238, -1, 0.804)
pt3dadd(135.625, 147.356, -1, 0.804)
pt3dadd(135.613, 147.475, -1, 0.804)
pt3dadd(135.595, 147.594, -1, 0.808)
pt3dadd(135.57, 147.712, -1, 0.82)
pt3dadd(135.546, 147.828, -1, 0.832)
pt3dadd(135.52, 147.947, -1, 0.844)
pt3dadd(135.496, 148.063, -1, 0.856)
pt3dadd(135.47, 148.181, -1, 0.868)
pt3dadd(135.445, 148.298, -1, 0.878)
pt3dadd(135.427, 148.417, -1, 0.886)
pt3dadd(135.409, 148.536, -1, 0.894)
pt3dadd(135.39, 148.654, -1, 0.902)
pt3dadd(135.372, 148.772, -1, 0.908)
pt3dadd(135.353, 148.891, -1, 0.916)
pt3dadd(135.335, 149.009, -1, 0.924)
pt3dadd(135.323, 149.129, -1.001, 0.928)
pt3dadd(135.323, 149.249, -1.002, 0.924)
pt3dadd(135.324, 149.369, -1.004, 0.92)
pt3dadd(135.324, 149.489, -1.006, 0.916)
pt3dadd(135.324, 149.609, -1.008, 0.912)
pt3dadd(135.324, 149.729, -1.01, 0.908)
pt3dadd(135.326, 149.848, -1.013, 0.904)
pt3dadd(135.346, 149.965, -1.03, 0.904)
pt3dadd(135.366, 150.082, -1.048, 0.904)
pt3dadd(135.385, 150.198, -1.065, 0.904)
pt3dadd(135.406, 150.314, -1.083, 0.904)
pt3dadd(135.422, 150.431, -1.1, 0.904)
pt3dadd(135.41, 150.551, -1.1, 0.908)
pt3dadd(135.398, 150.67, -1.1, 0.912)
pt3dadd(135.385, 150.79, -1.1, 0.914)
pt3dadd(135.373, 150.908, -1.1, 0.918)
pt3dadd(135.36, 151.028, -1.1, 0.922)
pt3dadd(135.348, 151.147, -1.1, 0.926)
pt3dadd(135.335, 151.267, -1.1, 0.93)
pt3dadd(135.323, 151.385, -1.107, 0.932)
pt3dadd(135.31, 151.504, -1.114, 0.936)
pt3dadd(135.298, 151.624, -1.12, 0.94)
pt3dadd(135.286, 151.742, -1.127, 0.944)
pt3dadd(135.272, 151.861, -1.134, 0.948)
pt3dadd(135.26, 151.98, -1.141, 0.952)
pt3dadd(135.247, 152.093, -1.167, 0.948)
pt3dadd(135.234, 152.197, -1.215, 0.932)
pt3dadd(135.221, 152.302, -1.263, 0.918)
pt3dadd(135.206, 152.406, -1.311, 0.902)
pt3dadd(135.192, 152.51, -1.36, 0.888)
pt3dadd(135.16, 152.61, -1.402, 0.872)
pt3dadd(135.098, 152.706, -1.435, 0.854)
pt3dadd(135.036, 152.801, -1.468, 0.838)
pt3dadd(134.974, 152.894, -1.501, 0.82)
pt3dadd(134.912, 152.989, -1.535, 0.804)
}
}
proc shape3d_21() {
dend_7[18] { pt3dadd(134.899, 153.059, -1.615, 0.792)
pt3dadd(134.885, 153.128, -1.696, 0.78)
pt3dadd(134.826, 153.205, -1.754, 0.792)
pt3dadd(134.766, 153.287, -1.8, 0.81)
pt3dadd(134.707, 153.394, -1.8, 0.842)
pt3dadd(134.65, 153.498, -1.8, 0.876)
pt3dadd(134.576, 153.593, -1.805, 0.9)
pt3dadd(134.504, 153.688, -1.81, 0.924)
pt3dadd(134.472, 153.793, -1.842, 0.942)
pt3dadd(134.447, 153.901, -1.88, 0.95)
pt3dadd(134.413, 154.008, -1.917, 0.94)
pt3dadd(134.38, 154.114, -1.954, 0.93)
pt3dadd(134.346, 154.22, -1.992, 0.918)
pt3dadd(134.312, 154.326, -2.029, 0.908)
pt3dadd(134.275, 154.422, -2.079, 0.894)
pt3dadd(134.236, 154.511, -2.137, 0.876)
pt3dadd(134.195, 154.598, -2.196, 0.86)
pt3dadd(134.154, 154.687, -2.255, 0.842)
pt3dadd(134.122, 154.782, -2.306, 0.828)
pt3dadd(134.106, 154.897, -2.329, 0.824)
pt3dadd(134.092, 155.014, -2.352, 0.82)
pt3dadd(134.077, 155.13, -2.375, 0.814)
pt3dadd(134.063, 155.245, -2.399, 0.81)
pt3dadd(134.048, 155.36, -2.422, 0.806)
pt3dadd(134.01, 155.462, -2.456, 0.796)
pt3dadd(133.949, 155.552, -2.499, 0.782)
pt3dadd(133.914, 155.634, -2.563, 0.778)
pt3dadd(133.892, 155.713, -2.636, 0.778)
pt3dadd(133.844, 155.808, -2.672, 0.76)
pt3dadd(133.787, 155.91, -2.694, 0.734)
pt3dadd(133.784, 156.024, -2.7, 0.728)
pt3dadd(133.801, 156.143, -2.7, 0.728)
pt3dadd(133.811, 156.259, -2.718, 0.732)
pt3dadd(133.81, 156.367, -2.759, 0.738)
pt3dadd(133.81, 156.478, -2.799, 0.746)
pt3dadd(133.81, 156.587, -2.84, 0.752)
pt3dadd(133.806, 156.634, -2.929, 0.782)
pt3dadd(133.801, 156.673, -3.023, 0.814)
pt3dadd(133.793, 156.715, -3.116, 0.848)
pt3dadd(133.774, 156.758, -3.208, 0.882)
pt3dadd(133.692, 156.761, -3.275, 0.918)
pt3dadd(133.578, 156.749, -3.297, 0.968)
pt3dadd(133.458, 156.736, -3.3, 1.038)
pt3dadd(133.339, 156.736, -3.3, 1.098)
pt3dadd(133.229, 156.778, -3.3, 1.104)
pt3dadd(133.138, 156.857, -3.3, 1.092)
pt3dadd(133.048, 156.935, -3.3, 1.08)
pt3dadd(132.947, 157.001, -3.3, 1.068)
pt3dadd(132.846, 157.064, -3.3, 1.056)
pt3dadd(132.792, 157.17, -3.3, 1.08)
pt3dadd(132.721, 157.266, -3.3, 1.08)
pt3dadd(132.65, 157.363, -3.3, 1.08)
pt3dadd(132.583, 157.462, -3.305, 1.06)
pt3dadd(132.516, 157.561, -3.31, 1.036)
pt3dadd(132.491, 157.669, -3.34, 0.988)
pt3dadd(132.479, 157.778, -3.379, 0.934)
pt3dadd(132.449, 157.87, -3.431, 0.878)
pt3dadd(132.396, 157.94, -3.5, 0.822)
pt3dadd(132.34, 158.029, -3.538, 0.794)
pt3dadd(132.278, 158.131, -3.562, 0.778)
pt3dadd(132.218, 158.231, -3.586, 0.762)
pt3dadd(132.179, 158.339, -3.6, 0.756)
pt3dadd(132.166, 158.458, -3.6, 0.766)
pt3dadd(132.154, 158.578, -3.6, 0.774)
pt3dadd(132.142, 158.696, -3.6, 0.788)
pt3dadd(132.128, 158.816, -3.6, 0.816)
pt3dadd(132.116, 158.935, -3.6, 0.85)
pt3dadd(132.103, 159.055, -3.6, 0.884)
pt3dadd(132.091, 159.174, -3.6, 0.92)
pt3dadd(132.078, 159.294, -3.6, 0.962)
pt3dadd(132.066, 159.413, -3.6, 1.004)
pt3dadd(132.032, 159.526, -3.6, 1.052)
pt3dadd(131.968, 159.625, -3.6, 1.108)
pt3dadd(131.9, 159.719, -3.609, 1.152)
pt3dadd(131.818, 159.772, -3.667, 1.138)
pt3dadd(131.747, 159.844, -3.715, 1.11)
pt3dadd(131.689, 159.941, -3.75, 1.062)
pt3dadd(131.632, 160.037, -3.786, 1.014)
pt3dadd(131.576, 160.134, -3.823, 0.948)
pt3dadd(131.522, 160.228, -3.865, 0.84)
pt3dadd(131.486, 160.333, -3.894, 0.718)
pt3dadd(131.474, 160.452, -3.9, 0.648)
pt3dadd(131.461, 160.572, -3.9, 0.64)
pt3dadd(131.449, 160.691, -3.9, 0.632)
pt3dadd(131.436, 160.811, -3.902, 0.642)
pt3dadd(131.424, 160.93, -3.906, 0.668)
pt3dadd(131.411, 161.048, -3.91, 0.694)
pt3dadd(131.4, 161.158, -3.943, 0.726)
pt3dadd(131.389, 161.26, -3.994, 0.76)
pt3dadd(131.359, 161.357, -4.044, 0.778)
pt3dadd(131.305, 161.447, -4.093, 0.778)
pt3dadd(131.26, 161.543, -4.138, 0.754)
pt3dadd(131.219, 161.646, -4.176, 0.724)
pt3dadd(131.184, 161.756, -4.203, 0.714)
pt3dadd(131.148, 161.866, -4.23, 0.704)
pt3dadd(131.112, 161.976, -4.256, 0.694)
pt3dadd(131.075, 162.086, -4.283, 0.684)
pt3dadd(131.05, 162.198, -4.309, 0.682)
pt3dadd(131.036, 162.314, -4.332, 0.69)
pt3dadd(131.024, 162.431, -4.354, 0.698)
pt3dadd(131.012, 162.547, -4.377, 0.708)
pt3dadd(131, 162.662, -4.4, 0.716)
pt3dadd(130.988, 162.779, -4.423, 0.724)
pt3dadd(130.975, 162.896, -4.439, 0.732)
pt3dadd(130.963, 163.015, -4.45, 0.74)
pt3dadd(130.951, 163.134, -4.46, 0.748)
pt3dadd(130.938, 163.253, -4.471, 0.756)
pt3dadd(130.926, 163.372, -4.481, 0.764)
pt3dadd(130.913, 163.49, -4.491, 0.772)
pt3dadd(130.901, 163.609, -4.501, 0.78)
pt3dadd(130.889, 163.728, -4.506, 0.792)
pt3dadd(130.876, 163.848, -4.511, 0.804)
pt3dadd(130.864, 163.967, -4.516, 0.814)
pt3dadd(130.85, 164.086, -4.521, 0.826)
pt3dadd(130.838, 164.204, -4.526, 0.838)
pt3dadd(130.825, 164.323, -4.531, 0.848)
pt3dadd(130.813, 164.441, -4.547, 0.86)
pt3dadd(130.801, 164.555, -4.575, 0.87)
pt3dadd(130.789, 164.671, -4.6, 0.88)
pt3dadd(130.776, 164.79, -4.6, 0.898)
pt3dadd(130.764, 164.91, -4.6, 0.914)
pt3dadd(130.752, 165.029, -4.602, 0.93)
pt3dadd(130.74, 165.144, -4.63, 0.94)
pt3dadd(130.728, 165.258, -4.658, 0.95)
pt3dadd(130.717, 165.359, -4.708, 0.954)
pt3dadd(130.708, 165.451, -4.771, 0.954)
pt3dadd(130.697, 165.548, -4.829, 0.946)
pt3dadd(130.686, 165.647, -4.885, 0.932)
pt3dadd(130.676, 165.746, -4.94, 0.918)
pt3dadd(130.666, 165.846, -4.996, 0.906)
pt3dadd(130.654, 165.964, -5, 0.888)
pt3dadd(130.64, 166.082, -5, 0.872)
pt3dadd(130.628, 166.202, -5, 0.856)
pt3dadd(130.615, 166.321, -5, 0.854)
pt3dadd(130.603, 166.441, -5.005, 0.85)
pt3dadd(130.59, 166.56, -5.01, 0.846)
pt3dadd(130.578, 166.68, -5.015, 0.842)
pt3dadd(130.566, 166.799, -5.02, 0.84)
pt3dadd(130.553, 166.918, -5.024, 0.836)
pt3dadd(130.541, 167.038, -5.03, 0.832)
pt3dadd(130.523, 167.153, -5.043, 0.824)
pt3dadd(130.484, 167.255, -5.084, 0.808)
pt3dadd(130.448, 167.358, -5.125, 0.792)
pt3dadd(130.411, 167.462, -5.166, 0.776)
pt3dadd(130.374, 167.566, -5.206, 0.76)
pt3dadd(130.325, 167.662, -5.247, 0.732)
pt3dadd(130.268, 167.755, -5.289, 0.696)
pt3dadd(130.212, 167.849, -5.33, 0.662)
pt3dadd(130.156, 167.944, -5.371, 0.626)
pt3dadd(130.103, 168.041, -5.407, 0.598)
pt3dadd(130.063, 168.15, -5.429, 0.582)
pt3dadd(130.021, 168.259, -5.452, 0.568)
pt3dadd(129.98, 168.37, -5.474, 0.552)
pt3dadd(129.938, 168.479, -5.497, 0.538)
pt3dadd(129.906, 168.586, -5.53, 0.528)
pt3dadd(129.889, 168.686, -5.583, 0.528)
pt3dadd(129.863, 168.785, -5.633, 0.538)
pt3dadd(129.81, 168.88, -5.674, 0.578)
pt3dadd(129.767, 168.983, -5.698, 0.61)
pt3dadd(129.739, 169.099, -5.694, 0.63)
pt3dadd(129.712, 169.217, -5.69, 0.65)
pt3dadd(129.696, 169.33, -5.662, 0.678)
pt3dadd(129.684, 169.442, -5.629, 0.71)
pt3dadd(129.672, 169.558, -5.608, 0.752)
pt3dadd(129.66, 169.676, -5.603, 0.806)
pt3dadd(129.643, 169.795, -5.6, 0.842)
pt3dadd(129.622, 169.914, -5.6, 0.864)
pt3dadd(129.601, 170.033, -5.6, 0.888)
pt3dadd(129.581, 170.15, -5.6, 0.91)
pt3dadd(129.56, 170.268, -5.6, 0.934)
pt3dadd(129.54, 170.387, -5.6, 0.956)
pt3dadd(129.52, 170.506, -5.6, 0.98)
pt3dadd(129.475, 170.616, -5.6, 0.988)
pt3dadd(129.43, 170.728, -5.6, 0.996)
pt3dadd(129.385, 170.839, -5.6, 1.006)
pt3dadd(129.34, 170.95, -5.6, 1.014)
pt3dadd(129.295, 171.061, -5.6, 1.024)
pt3dadd(129.239, 171.166, -5.6, 1.024)
pt3dadd(129.16, 171.257, -5.6, 1.01)
pt3dadd(129.082, 171.346, -5.6, 0.994)
pt3dadd(129.002, 171.437, -5.6, 0.98)
pt3dadd(128.923, 171.528, -5.6, 0.964)
pt3dadd(128.851, 171.623, -5.6, 0.948)
pt3dadd(128.796, 171.728, -5.6, 0.924)
pt3dadd(128.74, 171.835, -5.6, 0.9)
pt3dadd(128.683, 171.942, -5.6, 0.878)
pt3dadd(128.628, 172.048, -5.6, 0.854)
pt3dadd(128.572, 172.153, -5.6, 0.83)
pt3dadd(128.536, 172.267, -5.6, 0.828)
pt3dadd(128.501, 172.384, -5.6, 0.828)
pt3dadd(128.466, 172.498, -5.6, 0.828)
pt3dadd(128.432, 172.613, -5.6, 0.828)
pt3dadd(128.398, 172.727, -5.6, 0.828)
pt3dadd(128.363, 172.843, -5.6, 0.828)
pt3dadd(128.311, 172.951, -5.6, 0.85)
pt3dadd(128.258, 173.059, -5.6, 0.874)
pt3dadd(128.206, 173.165, -5.6, 0.896)
pt3dadd(128.152, 173.273, -5.6, 0.92)
pt3dadd(128.099, 173.381, -5.6, 0.942)
pt3dadd(128.053, 173.492, -5.6, 0.958)
}
}
proc shape3d_22() {
dend_7[18] { pt3dadd(128.016, 173.606, -5.6, 0.966)
pt3dadd(127.98, 173.719, -5.6, 0.976)
pt3dadd(127.943, 173.834, -5.6, 0.984)
pt3dadd(127.906, 173.948, -5.6, 0.992)
pt3dadd(127.868, 174.062, -5.6, 1)
pt3dadd(127.808, 174.163, -5.6, 0.996)
pt3dadd(127.729, 174.253, -5.6, 0.98)
pt3dadd(127.65, 174.344, -5.6, 0.966)
pt3dadd(127.571, 174.434, -5.6, 0.95)
pt3dadd(127.493, 174.526, -5.6, 0.936)
pt3dadd(127.422, 174.622, -5.6, 0.916)
pt3dadd(127.357, 174.722, -5.6, 0.892)
pt3dadd(127.292, 174.824, -5.6, 0.868)
pt3dadd(127.228, 174.924, -5.6, 0.844)
pt3dadd(127.163, 175.026, -5.6, 0.82)
pt3dadd(127.112, 175.132, -5.6, 0.806)
pt3dadd(127.087, 175.25, -5.6, 0.808)
pt3dadd(127.062, 175.367, -5.6, 0.812)
pt3dadd(127.037, 175.484, -5.6, 0.816)
pt3dadd(127.012, 175.602, -5.6, 0.82)
pt3dadd(126.986, 175.72, -5.6, 0.824)
pt3dadd(126.961, 175.836, -5.6, 0.828)
pt3dadd(126.936, 175.955, -5.6, 0.836)
pt3dadd(126.912, 176.071, -5.6, 0.844)
pt3dadd(126.887, 176.188, -5.6, 0.852)
pt3dadd(126.862, 176.306, -5.6, 0.86)
pt3dadd(126.836, 176.423, -5.6, 0.868)
pt3dadd(126.811, 176.54, -5.6, 0.876)
pt3dadd(126.76, 176.646, -5.6, 0.888)
pt3dadd(126.689, 176.743, -5.6, 0.902)
pt3dadd(126.619, 176.84, -5.6, 0.918)
pt3dadd(126.548, 176.938, -5.6, 0.932)
pt3dadd(126.479, 177.036, -5.6, 0.946)
pt3dadd(126.419, 177.139, -5.6, 0.95)
pt3dadd(126.371, 177.248, -5.6, 0.942)
pt3dadd(126.324, 177.359, -5.6, 0.932)
pt3dadd(126.276, 177.469, -5.6, 0.922)
pt3dadd(126.228, 177.578, -5.6, 0.914)
pt3dadd(126.18, 177.69, -5.6, 0.906)
pt3dadd(126.138, 177.802, -5.6, 0.904)
pt3dadd(126.096, 177.913, -5.6, 0.904)
pt3dadd(126.054, 178.026, -5.6, 0.904)
pt3dadd(126.012, 178.139, -5.6, 0.904)
pt3dadd(125.97, 178.252, -5.6, 0.904)
pt3dadd(125.923, 178.361, -5.6, 0.902)
pt3dadd(125.854, 178.459, -5.6, 0.892)
pt3dadd(125.783, 178.555, -5.6, 0.882)
pt3dadd(125.712, 178.652, -5.6, 0.874)
pt3dadd(125.641, 178.75, -5.6, 0.864)
pt3dadd(125.572, 178.847, -5.6, 0.854)
pt3dadd(125.52, 178.956, -5.6, 0.854)
pt3dadd(125.468, 179.064, -5.6, 0.854)
pt3dadd(125.417, 179.166, -5.623, 0.836)
pt3dadd(125.365, 179.267, -5.658, 0.81)
pt3dadd(125.298, 179.363, -5.679, 0.784)
pt3dadd(125.227, 179.456, -5.696, 0.76)
pt3dadd(125.13, 179.522, -5.7, 0.736)
pt3dadd(125.024, 179.58, -5.7, 0.712)
pt3dadd(124.913, 179.621, -5.7, 0.704)
pt3dadd(124.8, 179.654, -5.7, 0.704)
pt3dadd(124.738, 179.759, -5.7, 0.718)
pt3dadd(124.676, 179.862, -5.7, 0.732)
pt3dadd(124.615, 179.965, -5.7, 0.746)
pt3dadd(124.553, 180.067, -5.7, 0.762)
pt3dadd(124.492, 180.17, -5.7, 0.776)
pt3dadd(124.426, 180.271, -5.7, 0.794)
pt3dadd(124.358, 180.37, -5.7, 0.814)
pt3dadd(124.291, 180.469, -5.7, 0.832)
pt3dadd(124.223, 180.568, -5.7, 0.852)
pt3dadd(124.156, 180.667, -5.7, 0.872)
pt3dadd(124.078, 180.758, -5.7, 0.888)
pt3dadd(123.994, 180.844, -5.7, 0.904)
pt3dadd(123.91, 180.929, -5.7, 0.918)
pt3dadd(123.826, 181.015, -5.7, 0.934)
pt3dadd(123.74, 181.1, -5.7, 0.948)
pt3dadd(123.674, 181.198, -5.7, 0.952)
pt3dadd(123.619, 181.304, -5.7, 0.946)
pt3dadd(123.563, 181.411, -5.7, 0.942)
pt3dadd(123.506, 181.517, -5.7, 0.938)
pt3dadd(123.451, 181.624, -5.7, 0.932)
pt3dadd(123.384, 181.721, -5.7, 0.926)
pt3dadd(123.288, 181.79, -5.7, 0.91)
pt3dadd(123.191, 181.861, -5.7, 0.894)
pt3dadd(123.094, 181.933, -5.7, 0.88)
pt3dadd(122.998, 182.004, -5.7, 0.864)
pt3dadd(122.902, 182.076, -5.704, 0.848)
pt3dadd(122.812, 182.153, -5.719, 0.824)
pt3dadd(122.72, 182.228, -5.734, 0.802)
pt3dadd(122.629, 182.305, -5.749, 0.78)
pt3dadd(122.538, 182.382, -5.763, 0.758)
pt3dadd(122.468, 182.476, -5.779, 0.734)
pt3dadd(122.405, 182.575, -5.796, 0.71)
pt3dadd(122.315, 182.652, -5.804, 0.694)
pt3dadd(122.215, 182.719, -5.81, 0.682)
pt3dadd(122.162, 182.782, -5.868, 0.668)
pt3dadd(122.128, 182.84, -5.95, 0.656)
pt3dadd(122.058, 182.882, -6.022, 0.642)
pt3dadd(121.978, 182.921, -6.089, 0.628)
pt3dadd(121.861, 182.941, -6.096, 0.628)
pt3dadd(121.76, 182.995, -6.111, 0.636)
pt3dadd(121.679, 183.078, -6.134, 0.654)
pt3dadd(121.597, 183.161, -6.157, 0.67)
pt3dadd(121.516, 183.245, -6.18, 0.688)
pt3dadd(121.433, 183.328, -6.2, 0.704)
pt3dadd(121.343, 183.407, -6.2, 0.72)
pt3dadd(121.253, 183.487, -6.2, 0.736)
pt3dadd(121.163, 183.568, -6.2, 0.75)
pt3dadd(121.073, 183.647, -6.2, 0.766)
pt3dadd(120.992, 183.732, -6.2, 0.782)
pt3dadd(120.96, 183.847, -6.2, 0.8)
pt3dadd(120.928, 183.964, -6.2, 0.82)
pt3dadd(120.877, 184.07, -6.2, 0.828)
pt3dadd(120.812, 184.172, -6.2, 0.828)
pt3dadd(120.742, 184.267, -6.2, 0.832)
pt3dadd(120.658, 184.354, -6.2, 0.844)
pt3dadd(120.57, 184.435, -6.203, 0.856)
pt3dadd(120.473, 184.501, -6.221, 0.87)
pt3dadd(120.373, 184.549, -6.246, 0.878)
pt3dadd(120.268, 184.548, -6.294, 0.878)
pt3dadd(120.17, 184.606, -6.32, 0.868)
pt3dadd(120.074, 184.673, -6.343, 0.858)
pt3dadd(119.978, 184.74, -6.366, 0.846)
pt3dadd(119.883, 184.806, -6.389, 0.834)
pt3dadd(119.785, 184.872, -6.4, 0.824)
pt3dadd(119.686, 184.94, -6.4, 0.814)
pt3dadd(119.587, 185.009, -6.4, 0.804)
pt3dadd(119.488, 185.077, -6.4, 0.794)
pt3dadd(119.389, 185.144, -6.4, 0.784)
pt3dadd(119.287, 185.207, -6.4, 0.778)
pt3dadd(119.181, 185.264, -6.4, 0.778)
pt3dadd(119.072, 185.312, -6.4, 0.782)
pt3dadd(118.957, 185.348, -6.4, 0.794)
pt3dadd(118.843, 185.384, -6.4, 0.802)
pt3dadd(118.738, 185.441, -6.4, 0.792)
pt3dadd(118.632, 185.498, -6.4, 0.78)
pt3dadd(118.563, 185.594, -6.395, 0.734)
pt3dadd(118.496, 185.694, -6.39, 0.688)
pt3dadd(118.441, 185.765, -6.33, 0.612)
pt3dadd(118.372, 185.821, -6.266, 0.586)
pt3dadd(118.289, 185.874, -6.208, 0.6)
pt3dadd(118.228, 185.971, -6.2, 0.658)
pt3dadd(118.17, 186.077, -6.2, 0.724)
pt3dadd(118.085, 186.155, -6.2, 0.806)
pt3dadd(117.98, 186.211, -6.2, 0.898)
pt3dadd(117.873, 186.265, -6.2, 0.978)
pt3dadd(117.763, 186.316, -6.2, 1.034)
pt3dadd(117.659, 186.373, -6.2, 1.082)
pt3dadd(117.575, 186.458, -6.2, 1.098)
pt3dadd(117.491, 186.544, -6.2, 1.112)
pt3dadd(117.406, 186.629, -6.2, 1.126)
pt3dadd(117.335, 186.725, -6.2, 1.122)
pt3dadd(117.27, 186.826, -6.2, 1.112)
pt3dadd(117.19, 186.912, -6.2, 1.09)
pt3dadd(117.137, 187.013, -6.2, 1.06)
pt3dadd(117.105, 187.127, -6.2, 1.03)
pt3dadd(117.073, 187.243, -6.2, 1.002)
pt3dadd(117.046, 187.36, -6.2, 0.974)
pt3dadd(117.019, 187.476, -6.2, 0.946)
pt3dadd(116.959, 187.57, -6.2, 0.9)
pt3dadd(116.853, 187.626, -6.2, 0.83)
pt3dadd(116.744, 187.669, -6.2, 0.766)
pt3dadd(116.624, 187.678, -6.2, 0.718)
pt3dadd(116.505, 187.686, -6.2, 0.67)
pt3dadd(116.401, 187.738, -6.2, 0.63)
pt3dadd(116.307, 187.811, -6.2, 0.594)
pt3dadd(116.212, 187.884, -6.2, 0.558)
pt3dadd(116.123, 187.963, -6.2, 0.524)
pt3dadd(116.071, 188.071, -6.2, 0.504)
pt3dadd(116.02, 188.18, -6.2, 0.482)
pt3dadd(116.001, 188.297, -6.207, 0.472)
pt3dadd(115.993, 188.414, -6.217, 0.464)
pt3dadd(115.984, 188.534, -6.226, 0.458)
pt3dadd(115.993, 188.64, -6.244, 0.452)
pt3dadd(116.077, 188.694, -6.3, 0.452)
}
dend_7[19] {pt3dclear()
pt3dadd(140.813, 108.006, 11.317, 0.904)
pt3dadd(140.833, 108.026, 11.317, 0.916)
pt3dadd(140.921, 108.108, 11.318, 0.97)
pt3dadd(141.007, 108.191, 11.319, 1.022)
pt3dadd(141.095, 108.273, 11.319, 1.076)
pt3dadd(141.181, 108.356, 11.32, 1.128)
pt3dadd(141.269, 108.438, 11.321, 1.18)
pt3dadd(141.356, 108.521, 11.322, 1.234)
pt3dadd(141.443, 108.603, 11.323, 1.286)
pt3dadd(141.53, 108.686, 11.323, 1.34)
pt3dadd(141.618, 108.768, 11.324, 1.392)
pt3dadd(141.704, 108.851, 11.325, 1.446)
pt3dadd(141.792, 108.933, 11.326, 1.498)
pt3dadd(141.878, 109.016, 11.327, 1.552)
pt3dadd(141.964, 109.099, 11.339, 1.568)
pt3dadd(142.048, 109.182, 11.354, 1.576)
pt3dadd(142.132, 109.266, 11.37, 1.584)
pt3dadd(142.217, 109.349, 11.386, 1.592)
pt3dadd(142.301, 109.433, 11.401, 1.598)
pt3dadd(142.385, 109.516, 11.417, 1.606)
pt3dadd(142.469, 109.6, 11.432, 1.614)
pt3dadd(142.553, 109.683, 11.448, 1.62)
pt3dadd(142.637, 109.767, 11.464, 1.628)
pt3dadd(142.722, 109.85, 11.479, 1.636)
pt3dadd(142.801, 109.932, 11.51, 1.608)
pt3dadd(142.88, 110.013, 11.543, 1.572)
}
}
proc shape3d_23() {
dend_7[19] { pt3dadd(142.958, 110.094, 11.575, 1.538)
pt3dadd(143.038, 110.176, 11.608, 1.504)
pt3dadd(143.117, 110.257, 11.641, 1.47)
pt3dadd(143.195, 110.339, 11.674, 1.436)
pt3dadd(143.274, 110.42, 11.707, 1.402)
pt3dadd(143.353, 110.502, 11.74, 1.368)
pt3dadd(143.432, 110.583, 11.772, 1.334)
pt3dadd(143.51, 110.664, 11.805, 1.3)
pt3dadd(143.575, 110.734, 11.866, 1.26)
pt3dadd(143.639, 110.803, 11.928, 1.22)
pt3dadd(143.702, 110.872, 11.99, 1.18)
pt3dadd(143.766, 110.941, 12.052, 1.142)
pt3dadd(143.83, 111.011, 12.115, 1.102)
pt3dadd(143.894, 111.08, 12.177, 1.062)
pt3dadd(143.958, 111.149, 12.239, 1.022)
pt3dadd(144.022, 111.218, 12.301, 0.984)
pt3dadd(144.085, 111.287, 12.363, 0.944)
pt3dadd(144.149, 111.356, 12.425, 0.904)
pt3dadd(144.222, 111.433, 12.472, 0.904)
pt3dadd(144.294, 111.51, 12.519, 0.904)
pt3dadd(144.367, 111.588, 12.566, 0.904)
pt3dadd(144.44, 111.665, 12.613, 0.904)
pt3dadd(144.512, 111.742, 12.659, 0.904)
pt3dadd(144.586, 111.819, 12.706, 0.904)
pt3dadd(144.659, 111.896, 12.753, 0.904)
pt3dadd(144.732, 111.973, 12.8, 0.904)
pt3dadd(144.804, 112.05, 12.847, 0.904)
pt3dadd(144.877, 112.127, 12.893, 0.904)
}
dend_7[20] {pt3dclear()
pt3dadd(144.877, 112.127, 12.893, 0.904)
pt3dadd(144.906, 112.172, 12.933, 0.936)
pt3dadd(144.954, 112.248, 12.999, 0.988)
pt3dadd(145.002, 112.324, 13.065, 1.042)
pt3dadd(145.05, 112.399, 13.132, 1.094)
pt3dadd(145.098, 112.475, 13.198, 1.148)
pt3dadd(145.146, 112.551, 13.264, 1.2)
pt3dadd(145.194, 112.627, 13.33, 1.254)
pt3dadd(145.247, 112.698, 13.398, 1.282)
pt3dadd(145.304, 112.762, 13.468, 1.282)
pt3dadd(145.361, 112.827, 13.537, 1.282)
pt3dadd(145.418, 112.891, 13.607, 1.284)
pt3dadd(145.476, 112.956, 13.676, 1.284)
pt3dadd(145.532, 113.02, 13.746, 1.284)
pt3dadd(145.59, 113.085, 13.816, 1.284)
pt3dadd(145.648, 113.149, 13.885, 1.284)
pt3dadd(145.705, 113.214, 13.955, 1.284)
pt3dadd(145.762, 113.278, 14.024, 1.284)
pt3dadd(145.825, 113.333, 14.095, 1.254)
pt3dadd(145.894, 113.379, 14.168, 1.198)
pt3dadd(145.962, 113.426, 14.241, 1.144)
pt3dadd(146.029, 113.472, 14.313, 1.088)
pt3dadd(146.098, 113.519, 14.386, 1.034)
pt3dadd(146.166, 113.565, 14.459, 0.978)
pt3dadd(146.234, 113.612, 14.531, 0.924)
pt3dadd(146.302, 113.658, 14.604, 0.868)
pt3dadd(146.37, 113.705, 14.677, 0.814)
pt3dadd(146.438, 113.751, 14.749, 0.758)
pt3dadd(146.508, 113.788, 14.824, 0.764)
pt3dadd(146.578, 113.818, 14.901, 0.816)
pt3dadd(146.648, 113.848, 14.979, 0.868)
pt3dadd(146.719, 113.878, 15.055, 0.918)
pt3dadd(146.79, 113.908, 15.132, 0.97)
pt3dadd(146.86, 113.937, 15.21, 1.022)
pt3dadd(146.93, 113.967, 15.287, 1.072)
pt3dadd(147.001, 113.997, 15.363, 1.124)
pt3dadd(147.072, 114.027, 15.441, 1.174)
pt3dadd(147.142, 114.057, 15.517, 1.226)
pt3dadd(147.205, 114.107, 15.59, 1.286)
pt3dadd(147.263, 114.172, 15.659, 1.35)
pt3dadd(147.322, 114.237, 15.728, 1.414)
pt3dadd(147.379, 114.302, 15.796, 1.48)
pt3dadd(147.437, 114.366, 15.865, 1.544)
pt3dadd(147.496, 114.431, 15.934, 1.608)
pt3dadd(147.553, 114.496, 16.003, 1.674)
pt3dadd(147.611, 114.561, 16.072, 1.738)
pt3dadd(147.67, 114.626, 16.141, 1.804)
pt3dadd(147.727, 114.691, 16.21, 1.868)
pt3dadd(147.767, 114.759, 16.284, 1.82)
pt3dadd(147.798, 114.829, 16.361, 1.726)
pt3dadd(147.83, 114.9, 16.437, 1.634)
pt3dadd(147.862, 114.97, 16.514, 1.54)
pt3dadd(147.894, 115.04, 16.591, 1.448)
pt3dadd(147.925, 115.11, 16.667, 1.354)
pt3dadd(147.958, 115.18, 16.744, 1.262)
pt3dadd(147.989, 115.251, 16.821, 1.168)
pt3dadd(148.021, 115.321, 16.897, 1.076)
pt3dadd(148.052, 115.391, 16.974, 0.982)
pt3dadd(148.072, 115.47, 17.047, 0.952)
pt3dadd(148.086, 115.552, 17.119, 0.938)
pt3dadd(148.102, 115.634, 17.192, 0.924)
pt3dadd(148.116, 115.715, 17.264, 0.91)
pt3dadd(148.132, 115.797, 17.336, 0.896)
pt3dadd(148.146, 115.879, 17.408, 0.882)
pt3dadd(148.162, 115.96, 17.48, 0.868)
pt3dadd(148.176, 116.042, 17.552, 0.854)
pt3dadd(148.192, 116.124, 17.625, 0.84)
pt3dadd(148.207, 116.205, 17.697, 0.826)
pt3dadd(148.234, 116.296, 17.758, 0.814)
pt3dadd(148.264, 116.389, 17.816, 0.802)
pt3dadd(148.294, 116.481, 17.875, 0.788)
pt3dadd(148.322, 116.574, 17.933, 0.776)
pt3dadd(148.352, 116.667, 17.991, 0.764)
pt3dadd(148.382, 116.76, 18.05, 0.752)
pt3dadd(148.412, 116.853, 18.108, 0.74)
pt3dadd(148.442, 116.945, 18.167, 0.726)
pt3dadd(148.471, 117.038, 18.225, 0.714)
pt3dadd(148.501, 117.131, 18.283, 0.702)
pt3dadd(148.537, 117.229, 18.333, 0.688)
pt3dadd(148.573, 117.326, 18.382, 0.674)
pt3dadd(148.61, 117.424, 18.432, 0.658)
pt3dadd(148.646, 117.522, 18.481, 0.644)
pt3dadd(148.682, 117.62, 18.531, 0.63)
pt3dadd(148.72, 117.717, 18.58, 0.616)
pt3dadd(148.756, 117.815, 18.63, 0.602)
pt3dadd(148.792, 117.913, 18.679, 0.588)
pt3dadd(148.829, 118.011, 18.729, 0.574)
pt3dadd(148.865, 118.108, 18.778, 0.558)
pt3dadd(148.886, 118.208, 18.831, 0.594)
pt3dadd(148.908, 118.307, 18.884, 0.628)
pt3dadd(148.93, 118.407, 18.937, 0.662)
pt3dadd(148.951, 118.506, 18.99, 0.696)
pt3dadd(148.973, 118.605, 19.043, 0.732)
pt3dadd(148.994, 118.705, 19.096, 0.766)
pt3dadd(149.016, 118.804, 19.149, 0.8)
pt3dadd(149.038, 118.904, 19.202, 0.834)
pt3dadd(149.059, 119.003, 19.255, 0.87)
pt3dadd(149.081, 119.102, 19.309, 0.904)
}
dend_7[21] {pt3dclear()
pt3dadd(149.081, 119.102, 19.309, 0.904)
pt3dadd(149.081, 119.163, 19.331, 0.948)
pt3dadd(149.082, 119.273, 19.371, 1.03)
pt3dadd(149.083, 119.382, 19.411, 1.11)
pt3dadd(149.083, 119.492, 19.452, 1.192)
pt3dadd(149.084, 119.602, 19.492, 1.272)
pt3dadd(149.086, 119.712, 19.532, 1.354)
pt3dadd(149.086, 119.822, 19.572, 1.434)
pt3dadd(149.087, 119.932, 19.613, 1.516)
pt3dadd(149.087, 120.042, 19.653, 1.596)
pt3dadd(149.083, 120.148, 19.698, 1.644)
pt3dadd(149.059, 120.236, 19.761, 1.54)
pt3dadd(149.034, 120.326, 19.824, 1.438)
pt3dadd(149.01, 120.416, 19.888, 1.334)
pt3dadd(148.985, 120.505, 19.951, 1.232)
pt3dadd(148.961, 120.595, 20.015, 1.13)
pt3dadd(148.936, 120.684, 20.078, 1.026)
pt3dadd(148.912, 120.774, 20.142, 0.924)
pt3dadd(148.886, 120.863, 20.205, 0.822)
pt3dadd(148.862, 120.953, 20.269, 0.718)
pt3dadd(148.824, 121.042, 20.325, 0.642)
pt3dadd(148.759, 121.129, 20.366, 0.622)
pt3dadd(148.693, 121.217, 20.408, 0.602)
pt3dadd(148.628, 121.304, 20.449, 0.582)
pt3dadd(148.564, 121.392, 20.49, 0.562)
pt3dadd(148.498, 121.48, 20.531, 0.542)
pt3dadd(148.433, 121.567, 20.573, 0.522)
pt3dadd(148.367, 121.655, 20.614, 0.502)
pt3dadd(148.302, 121.742, 20.655, 0.482)
pt3dadd(148.236, 121.83, 20.697, 0.462)
pt3dadd(148.165, 121.916, 20.732, 0.452)
pt3dadd(148.087, 122.002, 20.76, 0.452)
pt3dadd(148.01, 122.086, 20.788, 0.452)
pt3dadd(147.932, 122.171, 20.816, 0.452)
pt3dadd(147.854, 122.256, 20.844, 0.452)
pt3dadd(147.776, 122.341, 20.872, 0.452)
pt3dadd(147.7, 122.426, 20.9, 0.452)
pt3dadd(147.622, 122.512, 20.928, 0.452)
pt3dadd(147.544, 122.597, 20.957, 0.452)
pt3dadd(147.466, 122.681, 20.985, 0.452)
pt3dadd(147.391, 122.765, 21.019, 0.448)
pt3dadd(147.318, 122.846, 21.06, 0.436)
pt3dadd(147.245, 122.928, 21.102, 0.426)
pt3dadd(147.173, 123.008, 21.143, 0.414)
pt3dadd(147.1, 123.09, 21.184, 0.404)
pt3dadd(147.026, 123.172, 21.226, 0.394)
pt3dadd(146.954, 123.253, 21.267, 0.382)
pt3dadd(146.881, 123.335, 21.309, 0.372)
pt3dadd(146.808, 123.416, 21.35, 0.362)
pt3dadd(146.736, 123.498, 21.391, 0.35)
pt3dadd(146.669, 123.578, 21.44, 0.34)
pt3dadd(146.605, 123.658, 21.492, 0.328)
pt3dadd(146.542, 123.738, 21.545, 0.316)
pt3dadd(146.478, 123.818, 21.597, 0.304)
pt3dadd(146.414, 123.898, 21.65, 0.29)
pt3dadd(146.351, 123.978, 21.702, 0.278)
pt3dadd(146.287, 124.057, 21.755, 0.266)
pt3dadd(146.224, 124.138, 21.807, 0.254)
pt3dadd(146.16, 124.218, 21.86, 0.242)
pt3dadd(146.096, 124.297, 21.912, 0.23)
pt3dadd(146.039, 124.382, 21.965, 0.244)
pt3dadd(145.985, 124.469, 22.017, 0.27)
pt3dadd(145.931, 124.555, 22.07, 0.298)
pt3dadd(145.877, 124.642, 22.122, 0.326)
pt3dadd(145.822, 124.728, 22.175, 0.352)
pt3dadd(145.768, 124.814, 22.227, 0.38)
pt3dadd(145.714, 124.901, 22.28, 0.406)
pt3dadd(145.66, 124.988, 22.332, 0.434)
pt3dadd(145.606, 125.075, 22.385, 0.462)
pt3dadd(145.552, 125.161, 22.437, 0.488)
pt3dadd(145.517, 125.248, 22.499, 0.56)
pt3dadd(145.489, 125.335, 22.563, 0.646)
pt3dadd(145.46, 125.423, 22.628, 0.734)
pt3dadd(145.433, 125.509, 22.693, 0.82)
}
}
proc shape3d_24() {
dend_7[21] { pt3dadd(145.404, 125.597, 22.757, 0.906)
pt3dadd(145.376, 125.684, 22.822, 0.992)
pt3dadd(145.349, 125.772, 22.886, 1.078)
pt3dadd(145.32, 125.858, 22.951, 1.164)
pt3dadd(145.292, 125.946, 23.015, 1.25)
pt3dadd(145.264, 126.034, 23.08, 1.336)
pt3dadd(145.246, 126.11, 23.154, 1.356)
pt3dadd(145.23, 126.185, 23.232, 1.356)
pt3dadd(145.214, 126.259, 23.309, 1.356)
pt3dadd(145.199, 126.334, 23.387, 1.356)
pt3dadd(145.183, 126.408, 23.464, 1.356)
pt3dadd(145.168, 126.481, 23.542, 1.356)
pt3dadd(145.153, 126.556, 23.619, 1.356)
pt3dadd(145.138, 126.63, 23.697, 1.356)
pt3dadd(145.122, 126.704, 23.774, 1.356)
pt3dadd(145.106, 126.779, 23.852, 1.356)
pt3dadd(145.099, 126.87, 23.916, 1.298)
pt3dadd(145.094, 126.965, 23.977, 1.22)
pt3dadd(145.091, 127.06, 24.038, 1.144)
pt3dadd(145.086, 127.156, 24.098, 1.068)
pt3dadd(145.081, 127.25, 24.159, 0.992)
pt3dadd(145.078, 127.346, 24.22, 0.916)
pt3dadd(145.073, 127.441, 24.28, 0.84)
pt3dadd(145.068, 127.536, 24.341, 0.764)
pt3dadd(145.063, 127.632, 24.402, 0.686)
pt3dadd(145.06, 127.727, 24.462, 0.61)
pt3dadd(145.054, 127.824, 24.521, 0.63)
pt3dadd(145.046, 127.921, 24.58, 0.674)
pt3dadd(145.039, 128.018, 24.638, 0.718)
pt3dadd(145.033, 128.116, 24.696, 0.762)
pt3dadd(145.026, 128.213, 24.755, 0.806)
pt3dadd(145.019, 128.31, 24.813, 0.85)
pt3dadd(145.013, 128.407, 24.872, 0.894)
pt3dadd(145.006, 128.503, 24.93, 0.938)
pt3dadd(145, 128.6, 24.989, 0.982)
pt3dadd(144.992, 128.698, 25.047, 1.026)
pt3dadd(144.984, 128.796, 25.104, 1.026)
pt3dadd(144.974, 128.894, 25.161, 1.014)
pt3dadd(144.965, 128.993, 25.218, 1.002)
pt3dadd(144.955, 129.091, 25.275, 0.99)
pt3dadd(144.947, 129.19, 25.332, 0.978)
pt3dadd(144.937, 129.288, 25.389, 0.966)
pt3dadd(144.928, 129.385, 25.445, 0.954)
pt3dadd(144.918, 129.484, 25.502, 0.942)
pt3dadd(144.908, 129.582, 25.559, 0.93)
pt3dadd(144.9, 129.68, 25.616, 0.92)
pt3dadd(144.886, 129.78, 25.67, 0.86)
pt3dadd(144.87, 129.881, 25.723, 0.792)
pt3dadd(144.854, 129.982, 25.776, 0.722)
pt3dadd(144.839, 130.082, 25.829, 0.652)
pt3dadd(144.823, 130.182, 25.882, 0.582)
pt3dadd(144.808, 130.283, 25.936, 0.514)
pt3dadd(144.792, 130.384, 25.989, 0.444)
pt3dadd(144.776, 130.484, 26.042, 0.374)
pt3dadd(144.762, 130.584, 26.095, 0.304)
pt3dadd(144.746, 130.685, 26.148, 0.236)
pt3dadd(144.708, 130.789, 26.185, 0.226)
pt3dadd(144.666, 130.894, 26.22, 0.226)
pt3dadd(144.625, 130.998, 26.256, 0.226)
pt3dadd(144.583, 131.102, 26.291, 0.226)
pt3dadd(144.541, 131.207, 26.326, 0.226)
pt3dadd(144.5, 131.311, 26.361, 0.226)
pt3dadd(144.458, 131.416, 26.396, 0.226)
pt3dadd(144.418, 131.52, 26.431, 0.226)
pt3dadd(144.376, 131.624, 26.467, 0.226)
pt3dadd(144.334, 131.729, 26.502, 0.226)
pt3dadd(144.304, 131.84, 26.526, 0.226)
pt3dadd(144.274, 131.953, 26.548, 0.226)
pt3dadd(144.245, 132.067, 26.571, 0.226)
pt3dadd(144.216, 132.18, 26.593, 0.226)
pt3dadd(144.186, 132.293, 26.616, 0.226)
pt3dadd(144.157, 132.407, 26.638, 0.226)
pt3dadd(144.127, 132.52, 26.661, 0.226)
pt3dadd(144.098, 132.632, 26.683, 0.226)
pt3dadd(144.07, 132.746, 26.706, 0.226)
pt3dadd(144.04, 132.859, 26.728, 0.226)
pt3dadd(144.026, 132.977, 26.746, 0.24)
pt3dadd(144.014, 133.094, 26.763, 0.254)
pt3dadd(144.004, 133.212, 26.78, 0.27)
pt3dadd(143.992, 133.33, 26.797, 0.284)
pt3dadd(143.98, 133.447, 26.814, 0.3)
pt3dadd(143.969, 133.565, 26.831, 0.316)
pt3dadd(143.957, 133.682, 26.848, 0.33)
pt3dadd(143.945, 133.8, 26.865, 0.346)
pt3dadd(143.933, 133.918, 26.882, 0.36)
pt3dadd(143.922, 134.035, 26.899, 0.376)
pt3dadd(143.933, 134.142, 26.944, 0.4)
pt3dadd(143.945, 134.248, 26.99, 0.424)
pt3dadd(143.957, 134.353, 27.037, 0.45)
pt3dadd(143.969, 134.459, 27.083, 0.476)
pt3dadd(143.982, 134.564, 27.129, 0.5)
pt3dadd(143.994, 134.67, 27.176, 0.526)
pt3dadd(144.006, 134.776, 27.222, 0.55)
pt3dadd(144.018, 134.881, 27.268, 0.576)
pt3dadd(144.031, 134.987, 27.315, 0.602)
pt3dadd(144.053, 135.09, 27.361, 0.622)
pt3dadd(144.102, 135.185, 27.406, 0.628)
pt3dadd(144.151, 135.281, 27.451, 0.634)
pt3dadd(144.199, 135.376, 27.496, 0.638)
pt3dadd(144.248, 135.47, 27.541, 0.646)
pt3dadd(144.298, 135.566, 27.586, 0.65)
pt3dadd(144.347, 135.661, 27.631, 0.656)
pt3dadd(144.396, 135.757, 27.676, 0.662)
pt3dadd(144.444, 135.852, 27.721, 0.668)
pt3dadd(144.493, 135.947, 27.766, 0.674)
pt3dadd(144.541, 136.045, 27.808, 0.672)
pt3dadd(144.587, 136.147, 27.846, 0.656)
pt3dadd(144.631, 136.249, 27.883, 0.642)
pt3dadd(144.677, 136.35, 27.92, 0.626)
pt3dadd(144.722, 136.452, 27.957, 0.612)
pt3dadd(144.768, 136.554, 27.995, 0.596)
pt3dadd(144.814, 136.656, 28.032, 0.582)
pt3dadd(144.858, 136.757, 28.069, 0.566)
pt3dadd(144.904, 136.859, 28.106, 0.55)
pt3dadd(144.949, 136.961, 28.143, 0.536)
pt3dadd(144.989, 137.062, 28.186, 0.524)
pt3dadd(145.019, 137.16, 28.236, 0.516)
pt3dadd(145.049, 137.26, 28.286, 0.508)
pt3dadd(145.08, 137.359, 28.337, 0.502)
pt3dadd(145.11, 137.458, 28.387, 0.494)
pt3dadd(145.14, 137.557, 28.437, 0.486)
pt3dadd(145.171, 137.657, 28.487, 0.478)
pt3dadd(145.201, 137.756, 28.538, 0.47)
pt3dadd(145.231, 137.855, 28.588, 0.464)
pt3dadd(145.261, 137.954, 28.638, 0.456)
pt3dadd(145.294, 138.044, 28.697, 0.462)
pt3dadd(145.327, 138.126, 28.765, 0.478)
pt3dadd(145.361, 138.206, 28.834, 0.496)
pt3dadd(145.394, 138.288, 28.902, 0.514)
pt3dadd(145.428, 138.368, 28.97, 0.532)
pt3dadd(145.462, 138.45, 29.039, 0.55)
pt3dadd(145.495, 138.53, 29.107, 0.568)
pt3dadd(145.529, 138.612, 29.175, 0.586)
pt3dadd(145.562, 138.692, 29.243, 0.604)
pt3dadd(145.596, 138.774, 29.312, 0.622)
pt3dadd(145.632, 138.838, 29.39, 0.652)
pt3dadd(145.669, 138.894, 29.472, 0.686)
pt3dadd(145.708, 138.95, 29.555, 0.722)
pt3dadd(145.745, 139.007, 29.637, 0.756)
pt3dadd(145.783, 139.063, 29.72, 0.79)
pt3dadd(145.82, 139.118, 29.802, 0.826)
pt3dadd(145.859, 139.175, 29.885, 0.86)
pt3dadd(145.896, 139.231, 29.967, 0.894)
pt3dadd(145.934, 139.288, 30.05, 0.93)
pt3dadd(145.972, 139.344, 30.133, 0.964)
pt3dadd(145.987, 139.41, 30.214, 0.96)
pt3dadd(145.996, 139.478, 30.296, 0.944)
pt3dadd(146.004, 139.547, 30.378, 0.928)
pt3dadd(146.012, 139.616, 30.459, 0.91)
pt3dadd(146.021, 139.685, 30.541, 0.894)
pt3dadd(146.029, 139.753, 30.623, 0.878)
pt3dadd(146.038, 139.822, 30.705, 0.862)
pt3dadd(146.047, 139.891, 30.786, 0.844)
pt3dadd(146.056, 139.96, 30.868, 0.828)
pt3dadd(146.052, 140.044, 30.932, 0.796)
pt3dadd(146.028, 140.154, 30.966, 0.734)
pt3dadd(146.005, 140.264, 31, 0.674)
pt3dadd(145.981, 140.375, 31.034, 0.614)
pt3dadd(145.958, 140.485, 31.067, 0.554)
pt3dadd(145.936, 140.596, 31.101, 0.494)
pt3dadd(145.912, 140.706, 31.135, 0.434)
pt3dadd(145.889, 140.816, 31.169, 0.374)
pt3dadd(145.865, 140.927, 31.203, 0.314)
pt3dadd(145.842, 141.037, 31.237, 0.254)
pt3dadd(145.841, 141.152, 31.257, 0.226)
pt3dadd(145.859, 141.271, 31.264, 0.226)
pt3dadd(145.877, 141.389, 31.272, 0.226)
pt3dadd(145.894, 141.508, 31.28, 0.226)
pt3dadd(145.912, 141.625, 31.287, 0.226)
pt3dadd(145.93, 141.744, 31.295, 0.226)
pt3dadd(145.948, 141.863, 31.302, 0.226)
pt3dadd(145.964, 141.98, 31.31, 0.226)
pt3dadd(145.982, 142.099, 31.318, 0.226)
pt3dadd(146, 142.218, 31.326, 0.226)
pt3dadd(146.054, 142.325, 31.326, 0.226)
pt3dadd(146.107, 142.432, 31.326, 0.226)
pt3dadd(146.161, 142.54, 31.326, 0.226)
pt3dadd(146.215, 142.646, 31.326, 0.226)
pt3dadd(146.268, 142.754, 31.326, 0.226)
pt3dadd(146.322, 142.861, 31.326, 0.226)
pt3dadd(146.376, 142.969, 31.326, 0.226)
pt3dadd(146.43, 143.076, 31.326, 0.226)
pt3dadd(146.483, 143.184, 31.326, 0.226)
pt3dadd(146.537, 143.291, 31.326, 0.226)
}
dend_7[22] {pt3dclear()
pt3dadd(149.081, 119.102, 19.309, 0.904)
pt3dadd(149.123, 119.107, 19.315, 0.892)
pt3dadd(149.24, 119.121, 19.333, 0.862)
pt3dadd(149.358, 119.134, 19.35, 0.83)
pt3dadd(149.476, 119.148, 19.368, 0.798)
pt3dadd(149.592, 119.161, 19.386, 0.768)
pt3dadd(149.71, 119.175, 19.403, 0.736)
pt3dadd(149.827, 119.188, 19.421, 0.704)
pt3dadd(149.945, 119.202, 19.439, 0.674)
pt3dadd(150.062, 119.215, 19.457, 0.642)
pt3dadd(150.179, 119.228, 19.474, 0.61)
pt3dadd(150.296, 119.242, 19.492, 0.58)
pt3dadd(150.414, 119.255, 19.51, 0.548)
pt3dadd(150.532, 119.269, 19.528, 0.516)
pt3dadd(150.648, 119.282, 19.545, 0.484)
pt3dadd(150.743, 119.354, 19.557, 0.468)
}
}
proc shape3d_25() {
dend_7[22] { pt3dadd(150.838, 119.426, 19.569, 0.45)
pt3dadd(150.932, 119.499, 19.58, 0.434)
pt3dadd(151.027, 119.572, 19.592, 0.418)
pt3dadd(151.122, 119.644, 19.603, 0.4)
pt3dadd(151.216, 119.717, 19.615, 0.384)
pt3dadd(151.31, 119.789, 19.627, 0.366)
pt3dadd(151.405, 119.862, 19.638, 0.35)
pt3dadd(151.5, 119.934, 19.65, 0.334)
pt3dadd(151.595, 120.007, 19.661, 0.322)
pt3dadd(151.69, 120.079, 19.674, 0.346)
pt3dadd(151.784, 120.151, 19.686, 0.368)
pt3dadd(151.879, 120.223, 19.698, 0.39)
pt3dadd(151.974, 120.295, 19.71, 0.414)
pt3dadd(152.069, 120.367, 19.722, 0.436)
pt3dadd(152.164, 120.439, 19.735, 0.46)
pt3dadd(152.258, 120.511, 19.747, 0.482)
pt3dadd(152.353, 120.583, 19.759, 0.506)
pt3dadd(152.448, 120.655, 19.771, 0.528)
pt3dadd(152.543, 120.726, 19.786, 0.556)
pt3dadd(152.636, 120.796, 19.81, 0.602)
pt3dadd(152.729, 120.865, 19.835, 0.65)
pt3dadd(152.822, 120.935, 19.86, 0.696)
pt3dadd(152.916, 121.004, 19.884, 0.742)
pt3dadd(153.008, 121.074, 19.909, 0.79)
pt3dadd(153.102, 121.144, 19.933, 0.836)
pt3dadd(153.196, 121.213, 19.958, 0.882)
pt3dadd(153.288, 121.283, 19.983, 0.93)
pt3dadd(153.382, 121.352, 20.007, 0.976)
pt3dadd(153.467, 121.428, 20.038, 0.99)
pt3dadd(153.536, 121.511, 20.08, 0.952)
pt3dadd(153.607, 121.594, 20.122, 0.914)
pt3dadd(153.678, 121.676, 20.163, 0.874)
pt3dadd(153.749, 121.759, 20.205, 0.836)
pt3dadd(153.82, 121.843, 20.247, 0.798)
pt3dadd(153.89, 121.926, 20.288, 0.76)
pt3dadd(153.961, 122.009, 20.33, 0.72)
pt3dadd(154.032, 122.092, 20.372, 0.682)
pt3dadd(154.103, 122.176, 20.413, 0.644)
pt3dadd(154.176, 122.258, 20.451, 0.606)
pt3dadd(154.252, 122.345, 20.481, 0.57)
pt3dadd(154.328, 122.43, 20.511, 0.534)
pt3dadd(154.404, 122.515, 20.541, 0.498)
pt3dadd(154.481, 122.6, 20.571, 0.462)
pt3dadd(154.558, 122.686, 20.601, 0.428)
pt3dadd(154.633, 122.771, 20.632, 0.392)
pt3dadd(154.71, 122.856, 20.662, 0.356)
pt3dadd(154.786, 122.941, 20.692, 0.32)
pt3dadd(154.862, 123.026, 20.722, 0.284)
pt3dadd(154.945, 123.106, 20.75, 0.282)
pt3dadd(155.036, 123.176, 20.776, 0.33)
pt3dadd(155.129, 123.248, 20.801, 0.38)
pt3dadd(155.22, 123.319, 20.826, 0.428)
pt3dadd(155.312, 123.391, 20.851, 0.476)
pt3dadd(155.404, 123.462, 20.876, 0.524)
pt3dadd(155.495, 123.533, 20.901, 0.574)
pt3dadd(155.587, 123.605, 20.926, 0.622)
pt3dadd(155.678, 123.676, 20.951, 0.67)
pt3dadd(155.771, 123.748, 20.976, 0.72)
pt3dadd(155.856, 123.822, 21.006, 0.742)
pt3dadd(155.933, 123.902, 21.044, 0.73)
pt3dadd(156.011, 123.982, 21.082, 0.718)
pt3dadd(156.088, 124.062, 21.119, 0.706)
pt3dadd(156.164, 124.142, 21.157, 0.694)
pt3dadd(156.242, 124.222, 21.195, 0.682)
pt3dadd(156.319, 124.302, 21.232, 0.67)
pt3dadd(156.396, 124.382, 21.27, 0.66)
pt3dadd(156.474, 124.462, 21.308, 0.648)
pt3dadd(156.551, 124.542, 21.345, 0.636)
pt3dadd(156.628, 124.624, 21.382, 0.616)
pt3dadd(156.703, 124.706, 21.417, 0.59)
pt3dadd(156.779, 124.789, 21.452, 0.562)
pt3dadd(156.854, 124.873, 21.487, 0.536)
pt3dadd(156.93, 124.956, 21.522, 0.508)
pt3dadd(157.006, 125.039, 21.557, 0.482)
pt3dadd(157.081, 125.123, 21.592, 0.456)
pt3dadd(157.157, 125.206, 21.627, 0.428)
pt3dadd(157.232, 125.288, 21.662, 0.402)
pt3dadd(157.308, 125.371, 21.696, 0.374)
pt3dadd(157.387, 125.454, 21.727, 0.36)
pt3dadd(157.469, 125.536, 21.754, 0.356)
pt3dadd(157.55, 125.618, 21.78, 0.352)
pt3dadd(157.632, 125.7, 21.807, 0.348)
pt3dadd(157.714, 125.782, 21.834, 0.344)
pt3dadd(157.795, 125.863, 21.86, 0.34)
pt3dadd(157.877, 125.946, 21.887, 0.334)
pt3dadd(157.958, 126.028, 21.913, 0.33)
pt3dadd(158.04, 126.109, 21.94, 0.326)
pt3dadd(158.123, 126.191, 21.967, 0.322)
pt3dadd(158.207, 126.271, 21.989, 0.346)
pt3dadd(158.296, 126.349, 22.009, 0.394)
pt3dadd(158.383, 126.427, 22.028, 0.442)
pt3dadd(158.471, 126.505, 22.048, 0.49)
pt3dadd(158.56, 126.584, 22.067, 0.536)
pt3dadd(158.647, 126.662, 22.087, 0.584)
pt3dadd(158.735, 126.74, 22.106, 0.632)
pt3dadd(158.824, 126.818, 22.125, 0.68)
pt3dadd(158.911, 126.896, 22.145, 0.726)
pt3dadd(159, 126.974, 22.164, 0.774)
pt3dadd(159.094, 127.039, 22.191, 0.782)
pt3dadd(159.194, 127.092, 22.223, 0.754)
pt3dadd(159.295, 127.145, 22.256, 0.726)
pt3dadd(159.396, 127.198, 22.288, 0.698)
pt3dadd(159.496, 127.25, 22.32, 0.67)
pt3dadd(159.596, 127.303, 22.353, 0.642)
pt3dadd(159.697, 127.356, 22.385, 0.614)
pt3dadd(159.797, 127.409, 22.418, 0.588)
pt3dadd(159.898, 127.463, 22.45, 0.56)
pt3dadd(159.998, 127.516, 22.483, 0.532)
pt3dadd(160.103, 127.559, 22.515, 0.502)
pt3dadd(160.21, 127.596, 22.547, 0.474)
pt3dadd(160.318, 127.634, 22.579, 0.444)
pt3dadd(160.424, 127.672, 22.611, 0.414)
pt3dadd(160.531, 127.71, 22.643, 0.384)
pt3dadd(160.638, 127.748, 22.676, 0.354)
pt3dadd(160.746, 127.786, 22.708, 0.324)
pt3dadd(160.853, 127.824, 22.74, 0.294)
pt3dadd(160.96, 127.862, 22.772, 0.264)
pt3dadd(161.066, 127.9, 22.804, 0.236)
pt3dadd(161.178, 127.932, 22.832, 0.228)
pt3dadd(161.29, 127.962, 22.857, 0.23)
pt3dadd(161.402, 127.992, 22.882, 0.232)
pt3dadd(161.514, 128.022, 22.907, 0.236)
pt3dadd(161.626, 128.052, 22.932, 0.238)
pt3dadd(161.738, 128.083, 22.958, 0.24)
pt3dadd(161.85, 128.113, 22.983, 0.242)
pt3dadd(161.963, 128.143, 23.008, 0.246)
pt3dadd(162.074, 128.173, 23.033, 0.248)
pt3dadd(162.187, 128.203, 23.058, 0.25)
pt3dadd(162.296, 128.245, 23.078, 0.264)
pt3dadd(162.406, 128.291, 23.096, 0.282)
pt3dadd(162.514, 128.338, 23.114, 0.298)
pt3dadd(162.622, 128.384, 23.131, 0.316)
pt3dadd(162.731, 128.431, 23.149, 0.334)
pt3dadd(162.839, 128.478, 23.167, 0.35)
pt3dadd(162.948, 128.524, 23.184, 0.368)
pt3dadd(163.056, 128.57, 23.202, 0.386)
pt3dadd(163.165, 128.617, 23.22, 0.402)
pt3dadd(163.273, 128.664, 23.237, 0.42)
pt3dadd(163.385, 128.704, 23.253, 0.416)
pt3dadd(163.498, 128.742, 23.267, 0.404)
pt3dadd(163.61, 128.779, 23.281, 0.39)
pt3dadd(163.723, 128.816, 23.296, 0.378)
pt3dadd(163.836, 128.855, 23.31, 0.366)
pt3dadd(163.948, 128.892, 23.324, 0.352)
pt3dadd(164.06, 128.929, 23.339, 0.34)
pt3dadd(164.173, 128.968, 23.353, 0.328)
pt3dadd(164.286, 129.005, 23.368, 0.314)
pt3dadd(164.399, 129.042, 23.382, 0.302)
pt3dadd(164.509, 129.074, 23.408, 0.316)
pt3dadd(164.62, 129.103, 23.439, 0.34)
pt3dadd(164.73, 129.132, 23.47, 0.364)
pt3dadd(164.84, 129.162, 23.501, 0.386)
pt3dadd(164.951, 129.191, 23.532, 0.41)
pt3dadd(165.061, 129.22, 23.563, 0.434)
pt3dadd(165.172, 129.25, 23.594, 0.458)
pt3dadd(165.282, 129.278, 23.625, 0.482)
pt3dadd(165.392, 129.308, 23.656, 0.506)
pt3dadd(165.503, 129.337, 23.687, 0.53)
pt3dadd(165.61, 129.366, 23.724, 0.556)
pt3dadd(165.716, 129.396, 23.764, 0.584)
pt3dadd(165.822, 129.425, 23.803, 0.612)
pt3dadd(165.929, 129.454, 23.842, 0.64)
pt3dadd(166.036, 129.484, 23.881, 0.668)
pt3dadd(166.141, 129.512, 23.92, 0.696)
pt3dadd(166.248, 129.542, 23.96, 0.724)
pt3dadd(166.355, 129.571, 23.999, 0.752)
pt3dadd(166.46, 129.6, 24.038, 0.78)
pt3dadd(166.567, 129.63, 24.077, 0.808)
pt3dadd(166.673, 129.671, 24.11, 0.782)
pt3dadd(166.778, 129.713, 24.142, 0.748)
pt3dadd(166.884, 129.755, 24.174, 0.714)
pt3dadd(166.99, 129.798, 24.206, 0.68)
pt3dadd(167.095, 129.84, 24.238, 0.646)
pt3dadd(167.201, 129.883, 24.271, 0.612)
pt3dadd(167.305, 129.925, 24.302, 0.578)
pt3dadd(167.411, 129.967, 24.334, 0.544)
pt3dadd(167.516, 130.01, 24.366, 0.51)
pt3dadd(167.622, 130.052, 24.399, 0.476)
pt3dadd(167.726, 130.081, 24.441, 0.484)
pt3dadd(167.831, 130.109, 24.485, 0.498)
pt3dadd(167.935, 130.135, 24.529, 0.512)
pt3dadd(168.04, 130.163, 24.573, 0.526)
pt3dadd(168.144, 130.189, 24.618, 0.54)
pt3dadd(168.248, 130.216, 24.662, 0.554)
pt3dadd(168.352, 130.243, 24.706, 0.568)
pt3dadd(168.456, 130.27, 24.75, 0.582)
pt3dadd(168.56, 130.297, 24.794, 0.594)
pt3dadd(168.665, 130.324, 24.838, 0.608)
pt3dadd(168.775, 130.343, 24.872, 0.616)
pt3dadd(168.888, 130.362, 24.905, 0.624)
pt3dadd(169, 130.38, 24.938, 0.63)
pt3dadd(169.111, 130.398, 24.97, 0.636)
pt3dadd(169.224, 130.417, 25.003, 0.644)
pt3dadd(169.336, 130.435, 25.035, 0.65)
pt3dadd(169.447, 130.453, 25.068, 0.658)
pt3dadd(169.559, 130.472, 25.101, 0.664)
pt3dadd(169.672, 130.49, 25.133, 0.67)
pt3dadd(169.783, 130.508, 25.166, 0.678)
pt3dadd(169.901, 130.517, 25.186, 0.662)
pt3dadd(170.018, 130.525, 25.205, 0.646)
}
}
proc shape3d_26() {
dend_7[22] { pt3dadd(170.135, 130.534, 25.225, 0.63)
pt3dadd(170.252, 130.541, 25.244, 0.614)
pt3dadd(170.37, 130.549, 25.264, 0.598)
pt3dadd(170.488, 130.556, 25.283, 0.58)
pt3dadd(170.605, 130.565, 25.302, 0.564)
pt3dadd(170.723, 130.573, 25.322, 0.548)
pt3dadd(170.84, 130.58, 25.341, 0.532)
pt3dadd(170.958, 130.589, 25.361, 0.516)
pt3dadd(171.077, 130.589, 25.369, 0.488)
pt3dadd(171.197, 130.589, 25.378, 0.458)
pt3dadd(171.316, 130.589, 25.386, 0.428)
pt3dadd(171.436, 130.589, 25.394, 0.4)
pt3dadd(171.556, 130.589, 25.403, 0.37)
pt3dadd(171.674, 130.589, 25.411, 0.342)
pt3dadd(171.794, 130.589, 25.42, 0.314)
pt3dadd(171.914, 130.589, 25.428, 0.284)
pt3dadd(172.033, 130.589, 25.436, 0.254)
pt3dadd(172.153, 130.589, 25.445, 0.226)
pt3dadd(172.273, 130.589, 25.445, 0.226)
pt3dadd(172.393, 130.589, 25.445, 0.226)
pt3dadd(172.513, 130.589, 25.445, 0.226)
pt3dadd(172.633, 130.589, 25.445, 0.226)
pt3dadd(172.753, 130.589, 25.445, 0.226)
pt3dadd(172.873, 130.589, 25.445, 0.226)
pt3dadd(172.993, 130.589, 25.445, 0.226)
pt3dadd(173.113, 130.589, 25.445, 0.226)
pt3dadd(173.233, 130.589, 25.445, 0.226)
pt3dadd(173.353, 130.589, 25.445, 0.226)
}
dend_7[23] {pt3dclear()
pt3dadd(144.877, 112.127, 12.893, 0.904)
pt3dadd(144.884, 112.174, 12.882, 0.918)
pt3dadd(144.904, 112.287, 12.853, 0.952)
pt3dadd(144.922, 112.401, 12.824, 0.986)
pt3dadd(144.941, 112.514, 12.795, 1.018)
pt3dadd(144.959, 112.627, 12.767, 1.052)
pt3dadd(144.978, 112.741, 12.738, 1.086)
pt3dadd(144.996, 112.854, 12.709, 1.12)
pt3dadd(145.014, 112.968, 12.68, 1.154)
pt3dadd(145.033, 113.081, 12.651, 1.186)
pt3dadd(145.055, 113.193, 12.628, 1.216)
pt3dadd(145.118, 113.288, 12.658, 1.206)
pt3dadd(145.181, 113.384, 12.689, 1.196)
pt3dadd(145.243, 113.479, 12.719, 1.186)
pt3dadd(145.307, 113.575, 12.75, 1.176)
pt3dadd(145.369, 113.67, 12.781, 1.166)
pt3dadd(145.433, 113.765, 12.811, 1.156)
pt3dadd(145.495, 113.861, 12.842, 1.146)
pt3dadd(145.558, 113.956, 12.872, 1.136)
pt3dadd(145.622, 114.037, 12.922, 1.09)
pt3dadd(145.687, 114.114, 12.976, 1.034)
pt3dadd(145.752, 114.192, 13.031, 0.978)
pt3dadd(145.816, 114.269, 13.085, 0.922)
pt3dadd(145.88, 114.347, 13.139, 0.866)
pt3dadd(145.945, 114.424, 13.193, 0.81)
pt3dadd(146.01, 114.502, 13.247, 0.754)
pt3dadd(146.075, 114.579, 13.301, 0.698)
pt3dadd(146.14, 114.657, 13.356, 0.642)
pt3dadd(146.195, 114.742, 13.403, 0.59)
pt3dadd(146.222, 114.856, 13.426, 0.552)
pt3dadd(146.25, 114.969, 13.449, 0.514)
pt3dadd(146.276, 115.083, 13.473, 0.476)
pt3dadd(146.304, 115.196, 13.496, 0.438)
pt3dadd(146.332, 115.31, 13.52, 0.402)
pt3dadd(146.358, 115.423, 13.543, 0.364)
pt3dadd(146.386, 115.537, 13.566, 0.326)
pt3dadd(146.413, 115.65, 13.59, 0.288)
pt3dadd(146.44, 115.764, 13.613, 0.25)
pt3dadd(146.46, 115.879, 13.631, 0.226)
pt3dadd(146.468, 115.998, 13.638, 0.226)
pt3dadd(146.476, 116.118, 13.646, 0.226)
pt3dadd(146.484, 116.237, 13.654, 0.226)
pt3dadd(146.491, 116.357, 13.661, 0.226)
pt3dadd(146.5, 116.476, 13.669, 0.226)
pt3dadd(146.508, 116.595, 13.676, 0.226)
pt3dadd(146.515, 116.715, 13.684, 0.226)
pt3dadd(146.524, 116.834, 13.692, 0.226)
pt3dadd(146.531, 116.954, 13.699, 0.226)
pt3dadd(146.536, 117.073, 13.705, 0.228)
pt3dadd(146.536, 117.193, 13.707, 0.234)
pt3dadd(146.536, 117.313, 13.708, 0.24)
pt3dadd(146.536, 117.433, 13.71, 0.248)
pt3dadd(146.536, 117.553, 13.712, 0.254)
pt3dadd(146.534, 117.673, 13.714, 0.26)
pt3dadd(146.534, 117.793, 13.716, 0.266)
pt3dadd(146.534, 117.913, 13.718, 0.272)
pt3dadd(146.534, 118.033, 13.72, 0.278)
pt3dadd(146.534, 118.153, 13.722, 0.284)
pt3dadd(146.534, 118.273, 13.724, 0.294)
pt3dadd(146.534, 118.393, 13.728, 0.31)
pt3dadd(146.534, 118.513, 13.732, 0.328)
pt3dadd(146.533, 118.633, 13.736, 0.344)
pt3dadd(146.533, 118.753, 13.739, 0.36)
pt3dadd(146.533, 118.873, 13.743, 0.376)
pt3dadd(146.533, 118.993, 13.747, 0.394)
pt3dadd(146.533, 119.112, 13.751, 0.41)
pt3dadd(146.532, 119.232, 13.754, 0.426)
pt3dadd(146.532, 119.352, 13.758, 0.442)
pt3dadd(146.532, 119.472, 13.763, 0.454)
pt3dadd(146.531, 119.592, 13.771, 0.458)
pt3dadd(146.531, 119.711, 13.78, 0.464)
pt3dadd(146.531, 119.831, 13.787, 0.468)
pt3dadd(146.53, 119.951, 13.795, 0.474)
pt3dadd(146.53, 120.07, 13.803, 0.478)
pt3dadd(146.528, 120.19, 13.811, 0.482)
pt3dadd(146.528, 120.31, 13.819, 0.488)
pt3dadd(146.528, 120.43, 13.827, 0.492)
pt3dadd(146.527, 120.548, 13.835, 0.498)
pt3dadd(146.527, 120.668, 13.846, 0.524)
pt3dadd(146.526, 120.787, 13.86, 0.584)
pt3dadd(146.525, 120.906, 13.874, 0.646)
pt3dadd(146.525, 121.025, 13.888, 0.706)
pt3dadd(146.524, 121.144, 13.903, 0.766)
pt3dadd(146.522, 121.262, 13.917, 0.826)
pt3dadd(146.522, 121.38, 13.931, 0.886)
pt3dadd(146.521, 121.499, 13.945, 0.948)
pt3dadd(146.52, 121.618, 13.96, 1.008)
pt3dadd(146.519, 121.736, 13.974, 1.068)
pt3dadd(146.518, 121.849, 14.004, 1.064)
pt3dadd(146.515, 121.951, 14.056, 0.976)
pt3dadd(146.513, 122.054, 14.107, 0.888)
pt3dadd(146.509, 122.158, 14.159, 0.8)
pt3dadd(146.507, 122.26, 14.21, 0.712)
pt3dadd(146.504, 122.363, 14.262, 0.624)
pt3dadd(146.502, 122.466, 14.313, 0.536)
pt3dadd(146.5, 122.568, 14.365, 0.448)
pt3dadd(146.496, 122.671, 14.417, 0.36)
pt3dadd(146.494, 122.774, 14.468, 0.272)
pt3dadd(146.49, 122.882, 14.508, 0.234)
pt3dadd(146.484, 122.998, 14.535, 0.25)
pt3dadd(146.479, 123.114, 14.562, 0.266)
pt3dadd(146.473, 123.229, 14.588, 0.28)
pt3dadd(146.467, 123.344, 14.615, 0.296)
pt3dadd(146.462, 123.46, 14.642, 0.312)
pt3dadd(146.456, 123.576, 14.669, 0.328)
pt3dadd(146.45, 123.691, 14.696, 0.344)
pt3dadd(146.446, 123.806, 14.723, 0.36)
pt3dadd(146.44, 123.922, 14.749, 0.376)
pt3dadd(146.432, 124.039, 14.768, 0.406)
pt3dadd(146.422, 124.158, 14.778, 0.452)
pt3dadd(146.411, 124.277, 14.789, 0.496)
pt3dadd(146.401, 124.396, 14.799, 0.542)
pt3dadd(146.39, 124.514, 14.809, 0.586)
pt3dadd(146.381, 124.633, 14.82, 0.63)
pt3dadd(146.37, 124.752, 14.83, 0.676)
pt3dadd(146.359, 124.872, 14.841, 0.722)
pt3dadd(146.35, 124.991, 14.851, 0.766)
pt3dadd(146.339, 125.11, 14.862, 0.812)
pt3dadd(146.327, 125.228, 14.867, 0.812)
pt3dadd(146.312, 125.347, 14.867, 0.774)
pt3dadd(146.299, 125.467, 14.868, 0.736)
pt3dadd(146.285, 125.586, 14.869, 0.7)
pt3dadd(146.272, 125.705, 14.869, 0.662)
pt3dadd(146.257, 125.825, 14.87, 0.624)
pt3dadd(146.243, 125.944, 14.87, 0.586)
pt3dadd(146.23, 126.062, 14.871, 0.548)
pt3dadd(146.215, 126.181, 14.872, 0.51)
pt3dadd(146.202, 126.301, 14.872, 0.472)
pt3dadd(146.171, 126.416, 14.873, 0.472)
pt3dadd(146.126, 126.527, 14.874, 0.508)
pt3dadd(146.082, 126.638, 14.876, 0.544)
pt3dadd(146.038, 126.75, 14.877, 0.58)
pt3dadd(145.992, 126.862, 14.878, 0.614)
pt3dadd(145.948, 126.973, 14.879, 0.65)
pt3dadd(145.903, 127.084, 14.881, 0.686)
pt3dadd(145.858, 127.195, 14.882, 0.722)
pt3dadd(145.813, 127.307, 14.883, 0.758)
pt3dadd(145.769, 127.418, 14.885, 0.794)
pt3dadd(145.73, 127.531, 14.886, 0.794)
pt3dadd(145.697, 127.646, 14.889, 0.762)
pt3dadd(145.663, 127.762, 14.891, 0.73)
pt3dadd(145.631, 127.878, 14.893, 0.698)
pt3dadd(145.597, 127.993, 14.896, 0.666)
pt3dadd(145.565, 128.108, 14.898, 0.634)
pt3dadd(145.531, 128.224, 14.9, 0.602)
pt3dadd(145.499, 128.339, 14.902, 0.57)
pt3dadd(145.465, 128.454, 14.905, 0.538)
pt3dadd(145.433, 128.569, 14.907, 0.506)
pt3dadd(145.406, 128.686, 14.911, 0.504)
pt3dadd(145.385, 128.804, 14.915, 0.528)
pt3dadd(145.364, 128.922, 14.92, 0.552)
pt3dadd(145.344, 129.041, 14.925, 0.576)
pt3dadd(145.322, 129.158, 14.93, 0.6)
pt3dadd(145.302, 129.276, 14.935, 0.624)
pt3dadd(145.28, 129.395, 14.94, 0.648)
pt3dadd(145.26, 129.512, 14.944, 0.672)
pt3dadd(145.24, 129.63, 14.949, 0.694)
pt3dadd(145.218, 129.749, 14.954, 0.718)
pt3dadd(145.205, 129.868, 14.961, 0.758)
pt3dadd(145.195, 129.986, 14.969, 0.806)
pt3dadd(145.187, 130.105, 14.977, 0.856)
pt3dadd(145.178, 130.225, 14.985, 0.906)
pt3dadd(145.169, 130.344, 14.994, 0.956)
pt3dadd(145.16, 130.464, 15.002, 1.006)
pt3dadd(145.151, 130.583, 15.01, 1.054)
pt3dadd(145.142, 130.702, 15.018, 1.104)
pt3dadd(145.133, 130.822, 15.026, 1.154)
pt3dadd(145.124, 130.94, 15.035, 1.204)
pt3dadd(145.121, 131.059, 15.047, 1.202)
pt3dadd(145.12, 131.178, 15.063, 1.168)
pt3dadd(145.12, 131.297, 15.078, 1.132)
pt3dadd(145.12, 131.416, 15.094, 1.098)
}
}
proc shape3d_27() {
dend_7[23] { pt3dadd(145.118, 131.533, 15.109, 1.062)
pt3dadd(145.118, 131.652, 15.124, 1.028)
pt3dadd(145.117, 131.771, 15.14, 0.992)
pt3dadd(145.117, 131.89, 15.155, 0.956)
pt3dadd(145.117, 132.008, 15.171, 0.922)
pt3dadd(145.116, 132.126, 15.186, 0.886)
pt3dadd(145.116, 132.241, 15.215, 0.862)
pt3dadd(145.115, 132.353, 15.251, 0.844)
pt3dadd(145.114, 132.464, 15.288, 0.826)
pt3dadd(145.114, 132.576, 15.325, 0.808)
pt3dadd(145.112, 132.688, 15.361, 0.79)
pt3dadd(145.112, 132.799, 15.398, 0.772)
pt3dadd(145.111, 132.911, 15.434, 0.754)
pt3dadd(145.11, 133.022, 15.471, 0.734)
pt3dadd(145.11, 133.134, 15.508, 0.716)
pt3dadd(145.109, 133.246, 15.544, 0.698)
pt3dadd(145.108, 133.361, 15.573, 0.68)
pt3dadd(145.106, 133.477, 15.596, 0.66)
pt3dadd(145.105, 133.594, 15.619, 0.642)
pt3dadd(145.103, 133.71, 15.642, 0.622)
pt3dadd(145.102, 133.828, 15.666, 0.602)
pt3dadd(145.1, 133.944, 15.689, 0.584)
pt3dadd(145.098, 134.06, 15.712, 0.564)
pt3dadd(145.097, 134.177, 15.735, 0.544)
pt3dadd(145.096, 134.294, 15.759, 0.526)
pt3dadd(145.093, 134.411, 15.782, 0.506)
pt3dadd(145.091, 134.53, 15.796, 0.506)
pt3dadd(145.087, 134.648, 15.805, 0.518)
pt3dadd(145.085, 134.768, 15.815, 0.528)
pt3dadd(145.081, 134.887, 15.824, 0.54)
pt3dadd(145.078, 135.007, 15.833, 0.55)
pt3dadd(145.074, 135.126, 15.842, 0.562)
pt3dadd(145.07, 135.246, 15.851, 0.572)
pt3dadd(145.068, 135.365, 15.86, 0.584)
pt3dadd(145.064, 135.485, 15.869, 0.594)
pt3dadd(145.061, 135.605, 15.878, 0.606)
pt3dadd(145.055, 135.724, 15.877, 0.642)
pt3dadd(145.046, 135.844, 15.871, 0.694)
pt3dadd(145.039, 135.962, 15.864, 0.744)
pt3dadd(145.032, 136.082, 15.858, 0.794)
pt3dadd(145.024, 136.201, 15.851, 0.846)
pt3dadd(145.016, 136.321, 15.845, 0.896)
pt3dadd(145.009, 136.441, 15.838, 0.946)
pt3dadd(145.002, 136.56, 15.832, 0.998)
pt3dadd(144.994, 136.68, 15.825, 1.048)
pt3dadd(144.986, 136.799, 15.819, 1.098)
pt3dadd(144.972, 136.912, 15.789, 1.08)
pt3dadd(144.956, 137.021, 15.749, 1.036)
pt3dadd(144.94, 137.129, 15.71, 0.988)
pt3dadd(144.923, 137.238, 15.67, 0.944)
pt3dadd(144.906, 137.347, 15.63, 0.896)
pt3dadd(144.89, 137.456, 15.59, 0.852)
pt3dadd(144.874, 137.564, 15.551, 0.806)
pt3dadd(144.857, 137.674, 15.511, 0.76)
pt3dadd(144.84, 137.783, 15.471, 0.714)
pt3dadd(144.824, 137.892, 15.432, 0.668)
pt3dadd(144.774, 137.994, 15.401, 0.68)
pt3dadd(144.724, 138.096, 15.37, 0.696)
pt3dadd(144.672, 138.198, 15.338, 0.712)
pt3dadd(144.622, 138.3, 15.307, 0.728)
pt3dadd(144.57, 138.402, 15.277, 0.744)
pt3dadd(144.52, 138.504, 15.246, 0.76)
pt3dadd(144.468, 138.606, 15.215, 0.776)
pt3dadd(144.418, 138.708, 15.184, 0.794)
pt3dadd(144.366, 138.81, 15.153, 0.81)
pt3dadd(144.316, 138.913, 15.124, 0.826)
pt3dadd(144.276, 139.026, 15.12, 0.854)
pt3dadd(144.235, 139.139, 15.115, 0.882)
pt3dadd(144.194, 139.252, 15.11, 0.91)
pt3dadd(144.154, 139.364, 15.105, 0.938)
pt3dadd(144.114, 139.477, 15.101, 0.966)
pt3dadd(144.073, 139.59, 15.096, 0.994)
pt3dadd(144.032, 139.703, 15.091, 1.02)
pt3dadd(143.993, 139.816, 15.086, 1.048)
pt3dadd(143.952, 139.928, 15.082, 1.076)
pt3dadd(143.915, 140.042, 15.08, 1.096)
pt3dadd(143.896, 140.159, 15.097, 1.078)
pt3dadd(143.876, 140.276, 15.113, 1.06)
pt3dadd(143.856, 140.393, 15.13, 1.042)
pt3dadd(143.837, 140.509, 15.146, 1.024)
pt3dadd(143.818, 140.626, 15.162, 1.006)
pt3dadd(143.798, 140.743, 15.179, 0.986)
pt3dadd(143.778, 140.86, 15.195, 0.968)
pt3dadd(143.759, 140.976, 15.211, 0.95)
pt3dadd(143.74, 141.094, 15.228, 0.932)
pt3dadd(143.724, 141.2, 15.258, 0.912)
pt3dadd(143.723, 141.271, 15.339, 0.888)
pt3dadd(143.722, 141.341, 15.42, 0.864)
pt3dadd(143.72, 141.412, 15.5, 0.84)
pt3dadd(143.72, 141.482, 15.581, 0.816)
pt3dadd(143.719, 141.553, 15.662, 0.79)
pt3dadd(143.718, 141.624, 15.743, 0.766)
pt3dadd(143.717, 141.695, 15.824, 0.742)
pt3dadd(143.716, 141.766, 15.905, 0.718)
pt3dadd(143.714, 141.836, 15.985, 0.694)
pt3dadd(143.699, 141.913, 16.014, 0.678)
pt3dadd(143.658, 142.003, 15.957, 0.678)
pt3dadd(143.616, 142.092, 15.899, 0.678)
pt3dadd(143.575, 142.182, 15.842, 0.678)
pt3dadd(143.533, 142.271, 15.785, 0.678)
pt3dadd(143.492, 142.361, 15.728, 0.678)
pt3dadd(143.45, 142.45, 15.67, 0.678)
pt3dadd(143.41, 142.54, 15.613, 0.678)
pt3dadd(143.365, 142.645, 15.602, 0.678)
pt3dadd(143.32, 142.756, 15.604, 0.678)
pt3dadd(143.274, 142.867, 15.606, 0.678)
pt3dadd(143.228, 142.979, 15.608, 0.678)
pt3dadd(143.184, 143.089, 15.61, 0.678)
pt3dadd(143.16, 143.204, 15.618, 0.678)
pt3dadd(143.16, 143.323, 15.632, 0.678)
pt3dadd(143.16, 143.442, 15.647, 0.678)
pt3dadd(143.16, 143.561, 15.661, 0.678)
pt3dadd(143.16, 143.68, 15.676, 0.678)
pt3dadd(143.16, 143.798, 15.69, 0.678)
pt3dadd(143.16, 143.917, 15.7, 0.678)
pt3dadd(143.16, 144.037, 15.7, 0.678)
pt3dadd(143.16, 144.157, 15.7, 0.678)
pt3dadd(143.16, 144.277, 15.7, 0.678)
pt3dadd(143.16, 144.397, 15.7, 0.678)
pt3dadd(143.16, 144.517, 15.7, 0.678)
pt3dadd(143.16, 144.637, 15.7, 0.678)
pt3dadd(143.16, 144.757, 15.7, 0.678)
pt3dadd(143.16, 144.877, 15.7, 0.678)
pt3dadd(143.16, 144.997, 15.7, 0.678)
pt3dadd(143.16, 145.117, 15.7, 0.678)
pt3dadd(143.16, 145.237, 15.7, 0.678)
pt3dadd(143.16, 145.357, 15.7, 0.678)
pt3dadd(143.16, 145.477, 15.7, 0.678)
pt3dadd(143.166, 145.596, 15.7, 0.678)
pt3dadd(143.185, 145.715, 15.7, 0.678)
pt3dadd(143.206, 145.834, 15.7, 0.678)
pt3dadd(143.225, 145.951, 15.7, 0.678)
pt3dadd(143.245, 146.07, 15.7, 0.678)
pt3dadd(143.264, 146.189, 15.7, 0.678)
pt3dadd(143.28, 146.308, 15.7, 0.678)
pt3dadd(143.28, 146.428, 15.7, 0.678)
pt3dadd(143.28, 146.548, 15.7, 0.678)
pt3dadd(143.28, 146.668, 15.7, 0.678)
pt3dadd(143.28, 146.788, 15.7, 0.678)
pt3dadd(143.28, 146.908, 15.7, 0.678)
pt3dadd(143.28, 147.028, 15.7, 0.678)
pt3dadd(143.286, 147.146, 15.7, 0.678)
pt3dadd(143.314, 147.263, 15.7, 0.678)
pt3dadd(143.341, 147.38, 15.7, 0.678)
pt3dadd(143.369, 147.497, 15.7, 0.678)
pt3dadd(143.395, 147.613, 15.7, 0.678)
pt3dadd(143.423, 147.731, 15.7, 0.678)
pt3dadd(143.454, 147.846, 15.7, 0.678)
pt3dadd(143.49, 147.961, 15.7, 0.678)
pt3dadd(143.526, 148.075, 15.7, 0.678)
pt3dadd(143.562, 148.19, 15.7, 0.678)
pt3dadd(143.598, 148.304, 15.7, 0.678)
pt3dadd(143.633, 148.418, 15.7, 0.678)
pt3dadd(143.64, 148.536, 15.713, 0.678)
pt3dadd(143.64, 148.655, 15.73, 0.678)
pt3dadd(143.64, 148.774, 15.746, 0.678)
pt3dadd(143.64, 148.891, 15.763, 0.678)
pt3dadd(143.64, 149.01, 15.779, 0.678)
pt3dadd(143.64, 149.129, 15.796, 0.678)
pt3dadd(143.658, 149.246, 15.8, 0.678)
pt3dadd(143.683, 149.364, 15.8, 0.678)
pt3dadd(143.707, 149.48, 15.8, 0.678)
pt3dadd(143.732, 149.598, 15.8, 0.678)
pt3dadd(143.758, 149.716, 15.8, 0.678)
pt3dadd(143.782, 149.833, 15.8, 0.678)
pt3dadd(143.815, 149.947, 15.815, 0.678)
pt3dadd(143.85, 150.059, 15.833, 0.678)
pt3dadd(143.886, 150.172, 15.851, 0.678)
pt3dadd(143.921, 150.284, 15.869, 0.678)
pt3dadd(143.956, 150.397, 15.887, 0.678)
pt3dadd(143.971, 150.516, 15.89, 0.678)
pt3dadd(143.984, 150.635, 15.892, 0.678)
pt3dadd(143.996, 150.755, 15.894, 0.678)
pt3dadd(144.01, 150.874, 15.896, 0.678)
pt3dadd(144.022, 150.994, 15.898, 0.678)
pt3dadd(144.035, 151.112, 15.899, 0.678)
pt3dadd(144.061, 151.229, 15.9, 0.678)
pt3dadd(144.097, 151.344, 15.9, 0.678)
pt3dadd(144.133, 151.458, 15.9, 0.678)
pt3dadd(144.169, 151.572, 15.9, 0.678)
pt3dadd(144.205, 151.687, 15.9, 0.678)
pt3dadd(144.241, 151.801, 15.9, 0.678)
pt3dadd(144.304, 151.903, 15.9, 0.678)
pt3dadd(144.367, 152.005, 15.9, 0.678)
pt3dadd(144.43, 152.108, 15.9, 0.678)
pt3dadd(144.493, 152.21, 15.9, 0.678)
pt3dadd(144.556, 152.312, 15.9, 0.678)
pt3dadd(144.596, 152.417, 15.935, 0.678)
pt3dadd(144.635, 152.521, 15.972, 0.678)
pt3dadd(144.673, 152.626, 16.009, 0.678)
pt3dadd(144.712, 152.73, 16.046, 0.678)
pt3dadd(144.767, 152.83, 16.07, 0.678)
pt3dadd(144.839, 152.924, 16.077, 0.678)
pt3dadd(144.912, 153.02, 16.084, 0.678)
pt3dadd(144.984, 153.115, 16.091, 0.678)
pt3dadd(145.057, 153.21, 16.098, 0.678)
pt3dadd(145.141, 153.293, 16.116, 0.678)
pt3dadd(145.229, 153.368, 16.139, 0.678)
pt3dadd(145.318, 153.445, 16.162, 0.678)
pt3dadd(145.406, 153.522, 16.184, 0.678)
}
}
proc shape3d_28() {
dend_7[23] { pt3dadd(145.486, 153.606, 16.2, 0.678)
pt3dadd(145.546, 153.71, 16.2, 0.678)
pt3dadd(145.606, 153.815, 16.2, 0.678)
pt3dadd(145.666, 153.918, 16.2, 0.678)
pt3dadd(145.726, 154.022, 16.2, 0.678)
pt3dadd(145.783, 154.127, 16.2, 0.678)
pt3dadd(145.834, 154.236, 16.2, 0.678)
pt3dadd(145.884, 154.345, 16.2, 0.678)
pt3dadd(145.934, 154.453, 16.2, 0.678)
pt3dadd(145.986, 154.562, 16.2, 0.678)
pt3dadd(146.036, 154.672, 16.2, 0.678)
pt3dadd(146.122, 154.754, 16.2, 0.678)
pt3dadd(146.21, 154.835, 16.2, 0.678)
pt3dadd(146.299, 154.915, 16.2, 0.678)
pt3dadd(146.388, 154.996, 16.2, 0.678)
pt3dadd(146.477, 155.077, 16.2, 0.678)
pt3dadd(146.573, 155.149, 16.2, 0.678)
pt3dadd(146.669, 155.221, 16.2, 0.678)
pt3dadd(146.765, 155.293, 16.2, 0.678)
pt3dadd(146.861, 155.365, 16.2, 0.678)
pt3dadd(146.957, 155.437, 16.2, 0.678)
pt3dadd(147.03, 155.532, 16.2, 0.678)
pt3dadd(147.102, 155.628, 16.2, 0.678)
pt3dadd(147.174, 155.724, 16.2, 0.678)
pt3dadd(147.246, 155.82, 16.2, 0.678)
pt3dadd(147.318, 155.916, 16.2, 0.678)
pt3dadd(147.374, 156.02, 16.214, 0.678)
pt3dadd(147.431, 156.125, 16.228, 0.678)
pt3dadd(147.488, 156.229, 16.242, 0.678)
pt3dadd(147.545, 156.334, 16.256, 0.678)
pt3dadd(147.6, 156.438, 16.272, 0.678)
pt3dadd(147.656, 156.541, 16.294, 0.678)
pt3dadd(147.712, 156.644, 16.316, 0.678)
pt3dadd(147.768, 156.746, 16.338, 0.678)
pt3dadd(147.823, 156.85, 16.36, 0.678)
pt3dadd(147.881, 156.95, 16.386, 0.678)
pt3dadd(147.938, 157.05, 16.414, 0.678)
pt3dadd(147.996, 157.151, 16.442, 0.678)
pt3dadd(148.054, 157.25, 16.47, 0.678)
pt3dadd(148.105, 157.354, 16.496, 0.678)
pt3dadd(148.145, 157.463, 16.52, 0.678)
pt3dadd(148.184, 157.573, 16.543, 0.678)
pt3dadd(148.224, 157.682, 16.566, 0.678)
pt3dadd(148.264, 157.793, 16.59, 0.678)
pt3dadd(148.326, 157.89, 16.6, 0.678)
pt3dadd(148.406, 157.979, 16.6, 0.678)
pt3dadd(148.488, 158.068, 16.6, 0.678)
pt3dadd(148.568, 158.156, 16.6, 0.678)
pt3dadd(148.649, 158.245, 16.6, 0.678)
pt3dadd(148.717, 158.344, 16.6, 0.678)
pt3dadd(148.778, 158.447, 16.6, 0.678)
pt3dadd(148.864, 158.509, 16.6, 0.678)
pt3dadd(148.984, 158.513, 16.6, 0.678)
pt3dadd(149.104, 158.518, 16.6, 0.678)
pt3dadd(149.222, 158.531, 16.6, 0.678)
pt3dadd(149.341, 158.551, 16.6, 0.678)
pt3dadd(149.459, 158.572, 16.6, 0.678)
pt3dadd(149.486, 158.683, 16.6, 0.678)
pt3dadd(149.507, 158.801, 16.6, 0.678)
pt3dadd(149.52, 158.92, 16.6, 0.678)
pt3dadd(149.52, 159.04, 16.6, 0.678)
pt3dadd(149.537, 159.156, 16.6, 0.678)
pt3dadd(149.587, 159.265, 16.6, 0.678)
pt3dadd(149.638, 159.374, 16.6, 0.678)
pt3dadd(149.688, 159.482, 16.6, 0.678)
pt3dadd(149.74, 159.592, 16.6, 0.678)
pt3dadd(149.788, 159.701, 16.601, 0.678)
pt3dadd(149.804, 159.817, 16.62, 0.678)
pt3dadd(149.822, 159.935, 16.638, 0.678)
pt3dadd(149.839, 160.051, 16.657, 0.678)
pt3dadd(149.857, 160.168, 16.676, 0.678)
pt3dadd(149.875, 160.284, 16.694, 0.678)
pt3dadd(149.88, 160.403, 16.7, 0.678)
pt3dadd(149.88, 160.523, 16.7, 0.678)
pt3dadd(149.88, 160.643, 16.7, 0.678)
pt3dadd(149.88, 160.763, 16.7, 0.678)
pt3dadd(149.88, 160.883, 16.7, 0.678)
pt3dadd(149.88, 161.003, 16.7, 0.678)
pt3dadd(149.88, 161.123, 16.7, 0.678)
pt3dadd(149.88, 161.243, 16.7, 0.678)
pt3dadd(149.88, 161.363, 16.7, 0.678)
pt3dadd(149.88, 161.483, 16.7, 0.678)
pt3dadd(149.884, 161.603, 16.7, 0.678)
pt3dadd(149.887, 161.723, 16.7, 0.678)
pt3dadd(149.892, 161.843, 16.7, 0.678)
pt3dadd(149.976, 161.916, 16.7, 0.678)
pt3dadd(150.079, 161.976, 16.7, 0.678)
pt3dadd(150.182, 162.037, 16.7, 0.678)
pt3dadd(150.287, 162.097, 16.7, 0.678)
pt3dadd(150.349, 162.184, 16.7, 0.678)
pt3dadd(150.356, 162.302, 16.7, 0.678)
pt3dadd(150.396, 162.409, 16.712, 0.678)
pt3dadd(150.467, 162.503, 16.735, 0.678)
pt3dadd(150.536, 162.596, 16.757, 0.678)
pt3dadd(150.606, 162.69, 16.78, 0.678)
pt3dadd(150.678, 162.782, 16.803, 0.678)
pt3dadd(150.763, 162.862, 16.826, 0.678)
pt3dadd(150.848, 162.941, 16.849, 0.678)
pt3dadd(150.934, 163.021, 16.872, 0.678)
pt3dadd(151.02, 163.1, 16.895, 0.678)
pt3dadd(151.102, 163.187, 16.9, 0.678)
pt3dadd(151.182, 163.276, 16.9, 0.678)
pt3dadd(151.262, 163.364, 16.9, 0.678)
pt3dadd(151.344, 163.453, 16.9, 0.678)
pt3dadd(151.424, 163.542, 16.9, 0.678)
pt3dadd(151.529, 163.598, 16.9, 0.678)
pt3dadd(151.639, 163.645, 16.9, 0.678)
pt3dadd(151.748, 163.693, 16.9, 0.678)
pt3dadd(151.859, 163.741, 16.9, 0.678)
pt3dadd(151.969, 163.788, 16.9, 0.678)
pt3dadd(152.076, 163.842, 16.9, 0.678)
pt3dadd(152.179, 163.903, 16.9, 0.678)
pt3dadd(152.281, 163.966, 16.9, 0.678)
pt3dadd(152.381, 164.034, 16.9, 0.678)
pt3dadd(152.47, 164.107, 16.902, 0.678)
pt3dadd(152.494, 164.224, 16.916, 0.678)
pt3dadd(152.516, 164.34, 16.931, 0.678)
pt3dadd(152.544, 164.425, 16.993, 0.678)
pt3dadd(152.572, 164.504, 17.065, 0.678)
pt3dadd(152.687, 164.515, 17.087, 0.678)
pt3dadd(152.786, 164.556, 17.1, 0.678)
pt3dadd(152.858, 164.652, 17.1, 0.678)
pt3dadd(152.93, 164.748, 17.1, 0.678)
pt3dadd(153.002, 164.844, 17.1, 0.678)
pt3dadd(153.074, 164.94, 17.1, 0.678)
pt3dadd(153.133, 165.042, 17.1, 0.678)
pt3dadd(153.169, 165.157, 17.1, 0.678)
pt3dadd(153.205, 165.271, 17.1, 0.678)
pt3dadd(153.241, 165.386, 17.1, 0.678)
pt3dadd(153.277, 165.5, 17.1, 0.678)
pt3dadd(153.313, 165.614, 17.1, 0.678)
pt3dadd(153.325, 165.733, 17.1, 0.678)
pt3dadd(153.331, 165.853, 17.1, 0.678)
pt3dadd(153.337, 165.973, 17.1, 0.678)
pt3dadd(153.343, 166.093, 17.1, 0.678)
pt3dadd(153.349, 166.213, 17.1, 0.678)
pt3dadd(153.355, 166.333, 17.1, 0.678)
pt3dadd(153.361, 166.453, 17.101, 0.678)
pt3dadd(153.367, 166.572, 17.112, 0.678)
pt3dadd(153.373, 166.691, 17.123, 0.678)
pt3dadd(153.38, 166.81, 17.134, 0.678)
pt3dadd(153.386, 166.93, 17.145, 0.678)
pt3dadd(153.394, 167.048, 17.156, 0.678)
pt3dadd(153.402, 167.167, 17.167, 0.678)
pt3dadd(153.44, 167.28, 17.173, 0.678)
pt3dadd(153.478, 167.394, 17.18, 0.678)
pt3dadd(153.516, 167.508, 17.186, 0.678)
pt3dadd(153.553, 167.621, 17.192, 0.678)
pt3dadd(153.592, 167.735, 17.199, 0.678)
pt3dadd(153.616, 167.85, 17.215, 0.678)
pt3dadd(153.636, 167.966, 17.234, 0.678)
pt3dadd(153.656, 168.083, 17.253, 0.678)
pt3dadd(153.677, 168.199, 17.271, 0.678)
pt3dadd(153.697, 168.314, 17.291, 0.678)
pt3dadd(153.718, 168.432, 17.301, 0.678)
pt3dadd(153.74, 168.55, 17.303, 0.678)
pt3dadd(153.763, 168.667, 17.305, 0.678)
pt3dadd(153.786, 168.785, 17.307, 0.678)
pt3dadd(153.809, 168.902, 17.309, 0.678)
pt3dadd(153.832, 169.021, 17.31, 0.678)
pt3dadd(153.853, 169.139, 17.318, 0.678)
pt3dadd(153.875, 169.255, 17.329, 0.678)
pt3dadd(153.895, 169.373, 17.34, 0.678)
pt3dadd(153.917, 169.49, 17.351, 0.678)
pt3dadd(153.938, 169.608, 17.362, 0.678)
pt3dadd(153.983, 169.716, 17.358, 0.678)
pt3dadd(154.043, 169.819, 17.344, 0.678)
pt3dadd(154.103, 169.921, 17.33, 0.678)
pt3dadd(154.163, 170.024, 17.315, 0.678)
pt3dadd(154.223, 170.126, 17.301, 0.678)
pt3dadd(154.292, 170.224, 17.3, 0.678)
pt3dadd(154.345, 170.33, 17.3, 0.678)
pt3dadd(154.399, 170.438, 17.3, 0.678)
pt3dadd(154.433, 170.554, 17.3, 0.678)
pt3dadd(154.465, 170.669, 17.3, 0.678)
pt3dadd(154.514, 170.776, 17.309, 0.678)
pt3dadd(154.553, 170.851, 17.372, 0.678)
pt3dadd(154.56, 170.875, 17.469, 0.678)
pt3dadd(154.57, 170.88, 17.568, 0.678)
pt3dadd(154.606, 170.899, 17.66, 0.678)
pt3dadd(154.658, 170.989, 17.697, 0.678)
pt3dadd(154.679, 171.107, 17.7, 0.678)
pt3dadd(154.68, 171.227, 17.7, 0.678)
pt3dadd(154.693, 171.347, 17.7, 0.678)
pt3dadd(154.734, 171.457, 17.7, 0.678)
pt3dadd(154.818, 171.542, 17.7, 0.678)
pt3dadd(154.888, 171.638, 17.7, 0.678)
pt3dadd(154.951, 171.74, 17.7, 0.678)
pt3dadd(155.014, 171.842, 17.7, 0.678)
pt3dadd(155.077, 171.944, 17.7, 0.678)
pt3dadd(155.14, 172.046, 17.7, 0.678)
pt3dadd(155.165, 172.16, 17.712, 0.678)
pt3dadd(155.172, 172.278, 17.729, 0.678)
pt3dadd(155.178, 172.396, 17.746, 0.678)
pt3dadd(155.185, 172.513, 17.764, 0.678)
pt3dadd(155.192, 172.632, 17.781, 0.678)
pt3dadd(155.198, 172.75, 17.798, 0.678)
pt3dadd(155.227, 172.866, 17.8, 0.678)
pt3dadd(155.257, 172.982, 17.8, 0.678)
pt3dadd(155.288, 173.099, 17.8, 0.678)
}
}
proc shape3d_29() {
dend_7[23] { pt3dadd(155.318, 173.214, 17.8, 0.678)
pt3dadd(155.348, 173.33, 17.8, 0.678)
pt3dadd(155.382, 173.446, 17.8, 0.678)
pt3dadd(155.432, 173.554, 17.8, 0.678)
pt3dadd(155.484, 173.663, 17.8, 0.678)
pt3dadd(155.534, 173.772, 17.8, 0.678)
pt3dadd(155.585, 173.881, 17.8, 0.678)
pt3dadd(155.635, 173.989, 17.8, 0.678)
pt3dadd(155.64, 174.108, 17.8, 0.678)
pt3dadd(155.653, 174.228, 17.8, 0.678)
pt3dadd(155.692, 174.34, 17.797, 0.678)
pt3dadd(155.744, 174.434, 17.759, 0.678)
pt3dadd(155.791, 174.473, 17.674, 0.678)
pt3dadd(155.882, 174.48, 17.616, 0.678)
pt3dadd(156, 174.48, 17.6, 0.678)
pt3dadd(156.12, 174.48, 17.6, 0.678)
pt3dadd(156.24, 174.48, 17.6, 0.678)
pt3dadd(156.36, 174.48, 17.6, 0.678)
pt3dadd(156.48, 174.48, 17.6, 0.678)
}
dend_7[24] {pt3dclear()
pt3dadd(139.157, 100.949, 10.301, 1.808)
pt3dadd(139.205, 100.949, 10.297, 1.79)
pt3dadd(139.324, 100.949, 10.287, 1.742)
pt3dadd(139.444, 100.949, 10.277, 1.696)
pt3dadd(139.562, 100.949, 10.267, 1.65)
pt3dadd(139.682, 100.949, 10.257, 1.602)
pt3dadd(139.801, 100.949, 10.247, 1.556)
pt3dadd(139.921, 100.949, 10.237, 1.51)
pt3dadd(140.04, 100.949, 10.226, 1.462)
pt3dadd(140.16, 100.949, 10.216, 1.416)
pt3dadd(140.279, 100.949, 10.206, 1.37)
pt3dadd(140.399, 100.949, 10.196, 1.322)
pt3dadd(140.518, 100.949, 10.186, 1.276)
}
dend_7[25] {pt3dclear()
pt3dadd(140.518, 100.949, 10.186, 1.276)
pt3dadd(140.558, 100.972, 10.185, 1.276)
pt3dadd(140.663, 101.032, 10.183, 1.28)
pt3dadd(140.766, 101.092, 10.181, 1.284)
pt3dadd(140.87, 101.152, 10.179, 1.286)
pt3dadd(140.975, 101.211, 10.177, 1.29)
pt3dadd(141.078, 101.271, 10.175, 1.292)
pt3dadd(141.182, 101.331, 10.173, 1.296)
pt3dadd(141.287, 101.391, 10.171, 1.298)
pt3dadd(141.39, 101.451, 10.17, 1.302)
pt3dadd(141.494, 101.51, 10.168, 1.304)
pt3dadd(141.582, 101.592, 10.169, 1.33)
pt3dadd(141.67, 101.674, 10.171, 1.356)
pt3dadd(141.758, 101.756, 10.173, 1.38)
pt3dadd(141.846, 101.837, 10.175, 1.406)
pt3dadd(141.934, 101.919, 10.177, 1.432)
pt3dadd(142.021, 102.001, 10.179, 1.458)
pt3dadd(142.109, 102.082, 10.181, 1.482)
pt3dadd(142.198, 102.164, 10.183, 1.508)
pt3dadd(142.285, 102.246, 10.185, 1.534)
pt3dadd(142.373, 102.328, 10.186, 1.558)
pt3dadd(142.462, 102.408, 10.189, 1.516)
pt3dadd(142.552, 102.488, 10.192, 1.476)
pt3dadd(142.64, 102.568, 10.194, 1.434)
pt3dadd(142.73, 102.648, 10.197, 1.392)
pt3dadd(142.819, 102.728, 10.199, 1.35)
pt3dadd(142.909, 102.808, 10.202, 1.308)
pt3dadd(142.998, 102.888, 10.205, 1.266)
pt3dadd(143.088, 102.968, 10.207, 1.224)
pt3dadd(143.177, 103.048, 10.21, 1.182)
pt3dadd(143.267, 103.128, 10.212, 1.142)
pt3dadd(143.358, 103.206, 10.217, 1.126)
pt3dadd(143.449, 103.284, 10.221, 1.108)
pt3dadd(143.54, 103.362, 10.226, 1.092)
pt3dadd(143.632, 103.439, 10.23, 1.076)
pt3dadd(143.722, 103.517, 10.234, 1.06)
pt3dadd(143.813, 103.595, 10.239, 1.044)
pt3dadd(143.904, 103.673, 10.243, 1.028)
pt3dadd(143.995, 103.751, 10.247, 1.012)
pt3dadd(144.086, 103.829, 10.252, 0.996)
pt3dadd(144.178, 103.907, 10.256, 0.98)
pt3dadd(144.27, 103.983, 10.262, 0.996)
pt3dadd(144.362, 104.059, 10.268, 1.01)
pt3dadd(144.456, 104.135, 10.274, 1.026)
pt3dadd(144.548, 104.211, 10.28, 1.04)
pt3dadd(144.641, 104.287, 10.286, 1.056)
pt3dadd(144.733, 104.363, 10.292, 1.07)
pt3dadd(144.826, 104.439, 10.298, 1.086)
pt3dadd(144.919, 104.514, 10.304, 1.1)
pt3dadd(145.012, 104.59, 10.31, 1.116)
pt3dadd(145.104, 104.666, 10.316, 1.13)
}
dend_7[26] {pt3dclear()
pt3dadd(145.104, 104.666, 10.316, 1.13)
pt3dadd(145.124, 104.676, 10.318, 1.124)
pt3dadd(145.231, 104.729, 10.33, 1.088)
pt3dadd(145.338, 104.782, 10.342, 1.054)
pt3dadd(145.445, 104.834, 10.354, 1.018)
pt3dadd(145.552, 104.887, 10.366, 0.984)
pt3dadd(145.66, 104.938, 10.381, 0.95)
pt3dadd(145.766, 104.989, 10.396, 0.918)
pt3dadd(145.873, 105.04, 10.412, 0.886)
pt3dadd(145.98, 105.09, 10.428, 0.854)
pt3dadd(146.087, 105.141, 10.443, 0.82)
pt3dadd(146.195, 105.192, 10.459, 0.788)
pt3dadd(146.302, 105.243, 10.475, 0.756)
pt3dadd(146.408, 105.294, 10.49, 0.722)
pt3dadd(146.515, 105.345, 10.506, 0.69)
pt3dadd(146.623, 105.395, 10.522, 0.658)
pt3dadd(146.726, 105.435, 10.558, 0.638)
pt3dadd(146.831, 105.473, 10.597, 0.622)
pt3dadd(146.935, 105.511, 10.635, 0.604)
pt3dadd(147.038, 105.549, 10.674, 0.586)
pt3dadd(147.143, 105.587, 10.713, 0.57)
pt3dadd(147.247, 105.625, 10.751, 0.552)
pt3dadd(147.35, 105.663, 10.79, 0.534)
pt3dadd(147.455, 105.701, 10.829, 0.518)
pt3dadd(147.558, 105.739, 10.867, 0.5)
pt3dadd(147.662, 105.777, 10.906, 0.482)
pt3dadd(147.76, 105.836, 10.936, 0.516)
pt3dadd(147.857, 105.898, 10.966, 0.554)
pt3dadd(147.953, 105.96, 10.996, 0.592)
pt3dadd(148.049, 106.022, 11.025, 0.632)
pt3dadd(148.146, 106.084, 11.055, 0.67)
pt3dadd(148.242, 106.146, 11.084, 0.708)
pt3dadd(148.338, 106.208, 11.114, 0.748)
pt3dadd(148.435, 106.27, 11.143, 0.786)
pt3dadd(148.531, 106.332, 11.173, 0.824)
pt3dadd(148.627, 106.394, 11.202, 0.864)
pt3dadd(148.717, 106.469, 11.226, 0.884)
pt3dadd(148.805, 106.545, 11.25, 0.904)
pt3dadd(148.894, 106.621, 11.273, 0.922)
pt3dadd(148.982, 106.697, 11.296, 0.942)
pt3dadd(149.071, 106.773, 11.32, 0.962)
pt3dadd(149.16, 106.848, 11.343, 0.98)
pt3dadd(149.249, 106.924, 11.367, 1)
pt3dadd(149.338, 107, 11.39, 1.02)
pt3dadd(149.426, 107.076, 11.413, 1.038)
pt3dadd(149.515, 107.151, 11.437, 1.058)
pt3dadd(149.597, 107.237, 11.455, 1.042)
pt3dadd(149.677, 107.322, 11.474, 1.028)
pt3dadd(149.759, 107.408, 11.492, 1.012)
pt3dadd(149.84, 107.493, 11.511, 0.996)
pt3dadd(149.921, 107.579, 11.529, 0.982)
pt3dadd(150.002, 107.664, 11.548, 0.966)
pt3dadd(150.084, 107.75, 11.566, 0.95)
pt3dadd(150.166, 107.835, 11.585, 0.934)
pt3dadd(150.246, 107.921, 11.603, 0.92)
pt3dadd(150.328, 108.006, 11.622, 0.904)
}
dend_7[27] {pt3dclear()
pt3dadd(150.328, 108.006, 11.622, 0.904)
pt3dadd(150.33, 108.011, 11.623, 0.906)
pt3dadd(150.382, 108.112, 11.658, 0.938)
pt3dadd(150.432, 108.212, 11.692, 0.97)
pt3dadd(150.484, 108.313, 11.726, 1.002)
pt3dadd(150.534, 108.413, 11.76, 1.034)
pt3dadd(150.586, 108.514, 11.794, 1.066)
pt3dadd(150.637, 108.614, 11.829, 1.098)
pt3dadd(150.688, 108.715, 11.863, 1.132)
pt3dadd(150.739, 108.815, 11.897, 1.164)
pt3dadd(150.791, 108.916, 11.93, 1.188)
pt3dadd(150.846, 109.017, 11.959, 1.174)
pt3dadd(150.901, 109.118, 11.987, 1.158)
pt3dadd(150.956, 109.219, 12.015, 1.144)
pt3dadd(151.012, 109.32, 12.043, 1.128)
pt3dadd(151.067, 109.421, 12.072, 1.114)
pt3dadd(151.122, 109.521, 12.1, 1.098)
pt3dadd(151.178, 109.622, 12.128, 1.084)
pt3dadd(151.234, 109.723, 12.157, 1.068)
pt3dadd(151.289, 109.824, 12.185, 1.054)
pt3dadd(151.344, 109.925, 12.212, 1.032)
pt3dadd(151.403, 110.027, 12.233, 0.97)
pt3dadd(151.462, 110.129, 12.255, 0.91)
pt3dadd(151.519, 110.23, 12.276, 0.85)
pt3dadd(151.578, 110.332, 12.297, 0.79)
pt3dadd(151.637, 110.434, 12.319, 0.728)
pt3dadd(151.694, 110.535, 12.34, 0.668)
pt3dadd(151.753, 110.637, 12.361, 0.608)
pt3dadd(151.812, 110.739, 12.383, 0.546)
pt3dadd(151.87, 110.84, 12.404, 0.486)
pt3dadd(151.926, 110.944, 12.424, 0.434)
pt3dadd(151.968, 111.055, 12.437, 0.416)
pt3dadd(152.011, 111.165, 12.45, 0.398)
pt3dadd(152.054, 111.276, 12.464, 0.38)
pt3dadd(152.096, 111.387, 12.477, 0.362)
pt3dadd(152.14, 111.498, 12.49, 0.344)
pt3dadd(152.183, 111.609, 12.503, 0.326)
pt3dadd(152.225, 111.72, 12.516, 0.31)
pt3dadd(152.268, 111.831, 12.53, 0.292)
pt3dadd(152.311, 111.942, 12.543, 0.274)
pt3dadd(152.356, 112.052, 12.555, 0.266)
pt3dadd(152.412, 112.158, 12.563, 0.304)
pt3dadd(152.467, 112.264, 12.571, 0.342)
pt3dadd(152.524, 112.37, 12.579, 0.378)
pt3dadd(152.579, 112.476, 12.587, 0.416)
pt3dadd(152.634, 112.582, 12.595, 0.454)
pt3dadd(152.69, 112.688, 12.603, 0.492)
pt3dadd(152.746, 112.794, 12.611, 0.53)
pt3dadd(152.801, 112.899, 12.619, 0.568)
pt3dadd(152.857, 113.005, 12.627, 0.604)
pt3dadd(152.911, 113.112, 12.635, 0.636)
pt3dadd(152.962, 113.22, 12.644, 0.638)
pt3dadd(153.012, 113.329, 12.654, 0.638)
pt3dadd(153.062, 113.437, 12.663, 0.64)
pt3dadd(153.112, 113.545, 12.673, 0.642)
pt3dadd(153.162, 113.654, 12.682, 0.644)
pt3dadd(153.212, 113.762, 12.691, 0.646)
pt3dadd(153.263, 113.871, 12.701, 0.648)
pt3dadd(153.312, 113.979, 12.71, 0.65)
pt3dadd(153.362, 114.088, 12.72, 0.652)
pt3dadd(153.41, 114.197, 12.731, 0.644)
}
}
proc shape3d_30() {
dend_7[27] { pt3dadd(153.449, 114.308, 12.749, 0.608)
pt3dadd(153.488, 114.42, 12.767, 0.572)
pt3dadd(153.527, 114.531, 12.785, 0.538)
pt3dadd(153.566, 114.643, 12.802, 0.502)
pt3dadd(153.605, 114.754, 12.82, 0.466)
pt3dadd(153.644, 114.866, 12.838, 0.43)
pt3dadd(153.683, 114.977, 12.856, 0.394)
pt3dadd(153.722, 115.088, 12.874, 0.358)
pt3dadd(153.761, 115.2, 12.892, 0.322)
pt3dadd(153.798, 115.31, 12.916, 0.306)
pt3dadd(153.833, 115.415, 12.954, 0.34)
pt3dadd(153.866, 115.521, 12.992, 0.374)
pt3dadd(153.901, 115.626, 13.03, 0.408)
pt3dadd(153.935, 115.732, 13.068, 0.442)
pt3dadd(153.968, 115.837, 13.106, 0.476)
pt3dadd(154.003, 115.943, 13.144, 0.51)
pt3dadd(154.037, 116.049, 13.183, 0.544)
pt3dadd(154.072, 116.154, 13.221, 0.578)
pt3dadd(154.105, 116.26, 13.259, 0.612)
pt3dadd(154.145, 116.364, 13.294, 0.632)
pt3dadd(154.2, 116.465, 13.323, 0.622)
pt3dadd(154.254, 116.567, 13.352, 0.612)
pt3dadd(154.308, 116.668, 13.381, 0.602)
pt3dadd(154.362, 116.769, 13.409, 0.592)
pt3dadd(154.417, 116.87, 13.438, 0.582)
pt3dadd(154.471, 116.972, 13.467, 0.572)
pt3dadd(154.525, 117.073, 13.496, 0.562)
pt3dadd(154.579, 117.174, 13.525, 0.554)
pt3dadd(154.634, 117.276, 13.553, 0.542)
pt3dadd(154.692, 117.375, 13.58, 0.534)
pt3dadd(154.756, 117.473, 13.604, 0.524)
pt3dadd(154.82, 117.57, 13.627, 0.516)
pt3dadd(154.885, 117.667, 13.651, 0.508)
pt3dadd(154.949, 117.764, 13.674, 0.5)
pt3dadd(155.014, 117.862, 13.698, 0.492)
pt3dadd(155.078, 117.959, 13.721, 0.482)
pt3dadd(155.142, 118.056, 13.745, 0.474)
pt3dadd(155.207, 118.153, 13.768, 0.466)
pt3dadd(155.272, 118.251, 13.792, 0.458)
pt3dadd(155.339, 118.347, 13.814, 0.452)
pt3dadd(155.41, 118.44, 13.833, 0.452)
pt3dadd(155.482, 118.533, 13.852, 0.452)
pt3dadd(155.554, 118.626, 13.872, 0.452)
pt3dadd(155.626, 118.72, 13.891, 0.452)
pt3dadd(155.698, 118.813, 13.91, 0.452)
pt3dadd(155.77, 118.906, 13.929, 0.452)
pt3dadd(155.842, 119, 13.948, 0.452)
pt3dadd(155.914, 119.093, 13.968, 0.452)
pt3dadd(155.984, 119.186, 13.987, 0.452)
pt3dadd(156.052, 119.281, 14.012, 0.446)
pt3dadd(156.108, 119.377, 14.048, 0.43)
pt3dadd(156.166, 119.474, 14.084, 0.414)
pt3dadd(156.222, 119.57, 14.12, 0.398)
pt3dadd(156.28, 119.667, 14.155, 0.384)
pt3dadd(156.336, 119.763, 14.191, 0.368)
pt3dadd(156.392, 119.86, 14.227, 0.352)
pt3dadd(156.45, 119.956, 14.263, 0.336)
pt3dadd(156.506, 120.053, 14.299, 0.32)
pt3dadd(156.564, 120.15, 14.334, 0.304)
pt3dadd(156.623, 120.245, 14.368, 0.298)
pt3dadd(156.686, 120.34, 14.399, 0.31)
pt3dadd(156.751, 120.434, 14.43, 0.322)
pt3dadd(156.815, 120.529, 14.462, 0.334)
pt3dadd(156.878, 120.623, 14.493, 0.346)
pt3dadd(156.942, 120.718, 14.524, 0.358)
pt3dadd(157.006, 120.812, 14.555, 0.368)
pt3dadd(157.07, 120.907, 14.586, 0.38)
pt3dadd(157.134, 121.001, 14.617, 0.392)
pt3dadd(157.198, 121.096, 14.648, 0.404)
pt3dadd(157.264, 121.189, 14.677, 0.424)
pt3dadd(157.334, 121.282, 14.703, 0.456)
pt3dadd(157.405, 121.374, 14.729, 0.488)
pt3dadd(157.475, 121.465, 14.756, 0.52)
pt3dadd(157.546, 121.558, 14.782, 0.552)
pt3dadd(157.616, 121.649, 14.808, 0.586)
pt3dadd(157.686, 121.741, 14.834, 0.618)
pt3dadd(157.757, 121.834, 14.86, 0.65)
pt3dadd(157.826, 121.925, 14.887, 0.682)
pt3dadd(157.897, 122.017, 14.913, 0.714)
pt3dadd(157.97, 122.107, 14.937, 0.746)
pt3dadd(158.048, 122.195, 14.957, 0.78)
pt3dadd(158.126, 122.284, 14.978, 0.812)
pt3dadd(158.204, 122.371, 14.999, 0.844)
pt3dadd(158.282, 122.459, 15.02, 0.876)
pt3dadd(158.36, 122.546, 15.04, 0.91)
pt3dadd(158.438, 122.634, 15.061, 0.942)
pt3dadd(158.516, 122.722, 15.082, 0.974)
pt3dadd(158.594, 122.809, 15.102, 1.006)
pt3dadd(158.672, 122.897, 15.123, 1.04)
pt3dadd(158.75, 122.981, 15.152, 1.056)
pt3dadd(158.828, 123.058, 15.194, 1.046)
pt3dadd(158.906, 123.133, 15.236, 1.038)
pt3dadd(158.983, 123.21, 15.277, 1.028)
pt3dadd(159.061, 123.287, 15.319, 1.018)
pt3dadd(159.139, 123.364, 15.361, 1.01)
pt3dadd(159.216, 123.44, 15.403, 1)
pt3dadd(159.294, 123.516, 15.444, 0.992)
pt3dadd(159.372, 123.593, 15.486, 0.982)
pt3dadd(159.45, 123.67, 15.528, 0.972)
pt3dadd(159.529, 123.745, 15.567, 0.958)
pt3dadd(159.612, 123.821, 15.604, 0.94)
pt3dadd(159.695, 123.895, 15.64, 0.92)
pt3dadd(159.778, 123.971, 15.677, 0.902)
pt3dadd(159.86, 124.046, 15.714, 0.882)
pt3dadd(159.943, 124.121, 15.75, 0.862)
pt3dadd(160.025, 124.196, 15.787, 0.844)
pt3dadd(160.108, 124.271, 15.824, 0.824)
pt3dadd(160.19, 124.346, 15.86, 0.806)
pt3dadd(160.273, 124.421, 15.897, 0.786)
pt3dadd(160.358, 124.496, 15.929, 0.78)
pt3dadd(160.445, 124.572, 15.957, 0.784)
pt3dadd(160.532, 124.649, 15.984, 0.79)
pt3dadd(160.619, 124.724, 16.012, 0.796)
pt3dadd(160.705, 124.8, 16.039, 0.802)
pt3dadd(160.793, 124.876, 16.067, 0.808)
pt3dadd(160.879, 124.951, 16.094, 0.814)
pt3dadd(160.967, 125.028, 16.122, 0.82)
pt3dadd(161.053, 125.104, 16.149, 0.824)
pt3dadd(161.141, 125.179, 16.177, 0.83)
pt3dadd(161.228, 125.254, 16.203, 0.848)
pt3dadd(161.32, 125.327, 16.228, 0.876)
pt3dadd(161.41, 125.4, 16.252, 0.904)
pt3dadd(161.5, 125.473, 16.277, 0.932)
pt3dadd(161.591, 125.546, 16.302, 0.96)
pt3dadd(161.681, 125.62, 16.326, 0.988)
pt3dadd(161.771, 125.693, 16.351, 1.016)
pt3dadd(161.861, 125.766, 16.376, 1.044)
pt3dadd(161.952, 125.839, 16.401, 1.072)
pt3dadd(162.042, 125.912, 16.425, 1.1)
pt3dadd(162.136, 125.974, 16.459, 1.102)
pt3dadd(162.232, 126.025, 16.501, 1.086)
pt3dadd(162.329, 126.077, 16.542, 1.07)
pt3dadd(162.425, 126.127, 16.584, 1.052)
pt3dadd(162.521, 126.179, 16.625, 1.036)
pt3dadd(162.617, 126.23, 16.667, 1.02)
pt3dadd(162.714, 126.282, 16.709, 1.002)
pt3dadd(162.81, 126.332, 16.75, 0.986)
pt3dadd(162.906, 126.384, 16.792, 0.968)
pt3dadd(163.003, 126.436, 16.833, 0.952)
pt3dadd(163.099, 126.49, 16.872, 0.936)
pt3dadd(163.194, 126.548, 16.908, 0.918)
pt3dadd(163.29, 126.606, 16.945, 0.9)
pt3dadd(163.386, 126.664, 16.981, 0.882)
pt3dadd(163.481, 126.722, 17.017, 0.866)
pt3dadd(163.577, 126.78, 17.054, 0.848)
pt3dadd(163.673, 126.838, 17.09, 0.832)
pt3dadd(163.768, 126.896, 17.126, 0.814)
pt3dadd(163.864, 126.954, 17.163, 0.796)
pt3dadd(163.958, 127.012, 17.199, 0.778)
pt3dadd(164.051, 127.068, 17.242, 0.772)
pt3dadd(164.141, 127.123, 17.291, 0.774)
pt3dadd(164.23, 127.177, 17.34, 0.774)
pt3dadd(164.32, 127.232, 17.389, 0.776)
pt3dadd(164.408, 127.286, 17.438, 0.776)
pt3dadd(164.498, 127.34, 17.487, 0.778)
pt3dadd(164.587, 127.396, 17.536, 0.78)
pt3dadd(164.676, 127.45, 17.585, 0.78)
pt3dadd(164.766, 127.505, 17.634, 0.782)
pt3dadd(164.855, 127.559, 17.682, 0.782)
pt3dadd(164.946, 127.606, 17.735, 0.784)
pt3dadd(165.037, 127.65, 17.788, 0.784)
pt3dadd(165.13, 127.693, 17.842, 0.786)
pt3dadd(165.221, 127.736, 17.895, 0.786)
pt3dadd(165.312, 127.78, 17.949, 0.788)
pt3dadd(165.403, 127.824, 18.002, 0.788)
pt3dadd(165.496, 127.867, 18.056, 0.79)
pt3dadd(165.587, 127.91, 18.109, 0.79)
pt3dadd(165.678, 127.955, 18.163, 0.792)
pt3dadd(165.769, 127.998, 18.216, 0.792)
pt3dadd(165.869, 128.047, 18.254, 0.784)
pt3dadd(165.97, 128.099, 18.287, 0.772)
pt3dadd(166.07, 128.149, 18.32, 0.76)
pt3dadd(166.172, 128.201, 18.353, 0.748)
pt3dadd(166.273, 128.251, 18.387, 0.738)
pt3dadd(166.374, 128.303, 18.42, 0.726)
pt3dadd(166.475, 128.353, 18.453, 0.714)
pt3dadd(166.576, 128.405, 18.486, 0.702)
pt3dadd(166.678, 128.455, 18.52, 0.692)
pt3dadd(166.778, 128.507, 18.553, 0.68)
pt3dadd(166.873, 128.564, 18.59, 0.686)
pt3dadd(166.968, 128.624, 18.627, 0.696)
pt3dadd(167.062, 128.683, 18.664, 0.706)
pt3dadd(167.156, 128.742, 18.702, 0.716)
pt3dadd(167.25, 128.801, 18.739, 0.726)
pt3dadd(167.345, 128.861, 18.776, 0.734)
pt3dadd(167.44, 128.92, 18.814, 0.744)
pt3dadd(167.533, 128.978, 18.851, 0.754)
pt3dadd(167.628, 129.038, 18.888, 0.764)
pt3dadd(167.722, 129.097, 18.926, 0.774)
pt3dadd(167.81, 129.157, 18.97, 0.77)
pt3dadd(167.9, 129.218, 19.014, 0.766)
pt3dadd(167.989, 129.278, 19.059, 0.762)
pt3dadd(168.078, 129.34, 19.103, 0.758)
pt3dadd(168.167, 129.4, 19.148, 0.754)
pt3dadd(168.256, 129.46, 19.192, 0.75)
pt3dadd(168.344, 129.521, 19.237, 0.746)
pt3dadd(168.433, 129.581, 19.281, 0.742)
pt3dadd(168.522, 129.641, 19.326, 0.738)
pt3dadd(168.611, 129.702, 19.37, 0.734)
pt3dadd(168.707, 129.762, 19.402, 0.712)
}
}
proc shape3d_31() {
dend_7[27] { pt3dadd(168.804, 129.822, 19.434, 0.688)
pt3dadd(168.9, 129.883, 19.466, 0.664)
pt3dadd(168.996, 129.943, 19.498, 0.642)
pt3dadd(169.093, 130.003, 19.529, 0.618)
pt3dadd(169.189, 130.063, 19.561, 0.596)
pt3dadd(169.286, 130.124, 19.593, 0.572)
pt3dadd(169.382, 130.184, 19.625, 0.548)
pt3dadd(169.478, 130.244, 19.657, 0.526)
pt3dadd(169.577, 130.303, 19.688, 0.506)
pt3dadd(169.685, 130.343, 19.717, 0.52)
pt3dadd(169.793, 130.382, 19.745, 0.534)
pt3dadd(169.901, 130.422, 19.773, 0.546)
pt3dadd(170.009, 130.463, 19.801, 0.56)
pt3dadd(170.117, 130.502, 19.83, 0.574)
pt3dadd(170.225, 130.542, 19.858, 0.588)
pt3dadd(170.333, 130.582, 19.886, 0.6)
pt3dadd(170.441, 130.622, 19.914, 0.614)
pt3dadd(170.549, 130.662, 19.942, 0.628)
pt3dadd(170.656, 130.7, 19.972, 0.634)
pt3dadd(170.761, 130.729, 20.014, 0.6)
pt3dadd(170.866, 130.758, 20.056, 0.568)
pt3dadd(170.971, 130.787, 20.099, 0.534)
pt3dadd(171.076, 130.816, 20.141, 0.5)
pt3dadd(171.181, 130.844, 20.183, 0.466)
pt3dadd(171.286, 130.873, 20.225, 0.432)
pt3dadd(171.391, 130.902, 20.267, 0.398)
pt3dadd(171.496, 130.931, 20.309, 0.364)
pt3dadd(171.601, 130.96, 20.351, 0.33)
pt3dadd(171.706, 130.991, 20.392, 0.3)
pt3dadd(171.808, 131.038, 20.427, 0.292)
pt3dadd(171.91, 131.084, 20.461, 0.284)
pt3dadd(172.013, 131.131, 20.496, 0.278)
pt3dadd(172.115, 131.179, 20.531, 0.27)
pt3dadd(172.217, 131.226, 20.565, 0.262)
pt3dadd(172.319, 131.273, 20.6, 0.254)
pt3dadd(172.422, 131.32, 20.635, 0.248)
pt3dadd(172.524, 131.366, 20.669, 0.24)
pt3dadd(172.626, 131.413, 20.704, 0.232)
pt3dadd(172.728, 131.461, 20.739, 0.23)
pt3dadd(172.828, 131.51, 20.777, 0.248)
pt3dadd(172.927, 131.558, 20.814, 0.268)
pt3dadd(173.027, 131.608, 20.852, 0.288)
pt3dadd(173.128, 131.657, 20.889, 0.308)
pt3dadd(173.227, 131.706, 20.927, 0.326)
pt3dadd(173.327, 131.755, 20.965, 0.346)
pt3dadd(173.426, 131.803, 21.002, 0.366)
pt3dadd(173.526, 131.852, 21.04, 0.386)
pt3dadd(173.627, 131.902, 21.078, 0.404)
pt3dadd(173.725, 131.95, 21.117, 0.43)
pt3dadd(173.822, 131.994, 21.162, 0.478)
pt3dadd(173.92, 132.038, 21.208, 0.526)
pt3dadd(174.017, 132.083, 21.253, 0.574)
pt3dadd(174.114, 132.127, 21.298, 0.622)
pt3dadd(174.211, 132.173, 21.344, 0.67)
pt3dadd(174.31, 132.217, 21.389, 0.72)
pt3dadd(174.407, 132.262, 21.434, 0.768)
pt3dadd(174.504, 132.306, 21.479, 0.816)
pt3dadd(174.601, 132.35, 21.525, 0.864)
pt3dadd(174.697, 132.4, 21.567, 0.9)
pt3dadd(174.792, 132.466, 21.594, 0.884)
pt3dadd(174.887, 132.532, 21.621, 0.868)
pt3dadd(174.98, 132.599, 21.649, 0.852)
pt3dadd(175.075, 132.665, 21.676, 0.834)
pt3dadd(175.17, 132.732, 21.703, 0.818)
pt3dadd(175.264, 132.798, 21.73, 0.802)
pt3dadd(175.358, 132.864, 21.758, 0.786)
pt3dadd(175.453, 132.931, 21.785, 0.77)
pt3dadd(175.547, 132.997, 21.812, 0.754)
pt3dadd(175.642, 133.064, 21.839, 0.742)
pt3dadd(175.734, 133.135, 21.862, 0.746)
pt3dadd(175.828, 133.206, 21.885, 0.75)
pt3dadd(175.92, 133.277, 21.908, 0.754)
pt3dadd(176.014, 133.348, 21.931, 0.758)
pt3dadd(176.106, 133.417, 21.954, 0.762)
pt3dadd(176.2, 133.488, 21.977, 0.766)
pt3dadd(176.292, 133.559, 22, 0.77)
pt3dadd(176.386, 133.63, 22.024, 0.774)
pt3dadd(176.478, 133.7, 22.047, 0.778)
pt3dadd(176.57, 133.771, 22.071, 0.782)
pt3dadd(176.66, 133.843, 22.099, 0.782)
pt3dadd(176.75, 133.915, 22.128, 0.782)
pt3dadd(176.839, 133.987, 22.156, 0.782)
pt3dadd(176.929, 134.058, 22.185, 0.782)
pt3dadd(177.019, 134.13, 22.213, 0.782)
pt3dadd(177.109, 134.202, 22.242, 0.78)
pt3dadd(177.199, 134.274, 22.271, 0.78)
pt3dadd(177.289, 134.346, 22.299, 0.78)
pt3dadd(177.378, 134.418, 22.327, 0.78)
pt3dadd(177.468, 134.486, 22.361, 0.776)
pt3dadd(177.556, 134.548, 22.406, 0.762)
pt3dadd(177.643, 134.61, 22.451, 0.748)
pt3dadd(177.732, 134.671, 22.496, 0.734)
pt3dadd(177.82, 134.732, 22.541, 0.72)
pt3dadd(177.907, 134.794, 22.585, 0.706)
pt3dadd(177.995, 134.855, 22.63, 0.692)
pt3dadd(178.084, 134.916, 22.675, 0.678)
pt3dadd(178.171, 134.978, 22.72, 0.664)
pt3dadd(178.259, 135.04, 22.765, 0.652)
pt3dadd(178.351, 135.098, 22.804, 0.652)
pt3dadd(178.453, 135.152, 22.833, 0.678)
pt3dadd(178.554, 135.206, 22.862, 0.702)
pt3dadd(178.655, 135.26, 22.891, 0.728)
pt3dadd(178.757, 135.316, 22.92, 0.754)
pt3dadd(178.858, 135.37, 22.95, 0.778)
pt3dadd(178.958, 135.424, 22.979, 0.804)
pt3dadd(179.06, 135.478, 23.008, 0.828)
pt3dadd(179.161, 135.532, 23.037, 0.854)
pt3dadd(179.262, 135.586, 23.066, 0.88)
pt3dadd(179.36, 135.648, 23.09, 0.868)
pt3dadd(179.454, 135.72, 23.108, 0.808)
pt3dadd(179.549, 135.791, 23.125, 0.75)
pt3dadd(179.642, 135.863, 23.142, 0.69)
pt3dadd(179.736, 135.935, 23.16, 0.63)
pt3dadd(179.831, 136.006, 23.177, 0.572)
pt3dadd(179.924, 136.078, 23.194, 0.512)
pt3dadd(180.018, 136.15, 23.212, 0.452)
pt3dadd(180.113, 136.22, 23.229, 0.392)
pt3dadd(180.206, 136.292, 23.247, 0.334)
pt3dadd(180.296, 136.369, 23.261, 0.324)
pt3dadd(180.383, 136.452, 23.271, 0.376)
pt3dadd(180.468, 136.536, 23.282, 0.428)
pt3dadd(180.553, 136.619, 23.293, 0.48)
pt3dadd(180.64, 136.702, 23.303, 0.53)
pt3dadd(180.725, 136.784, 23.314, 0.582)
pt3dadd(180.811, 136.867, 23.324, 0.634)
pt3dadd(180.896, 136.951, 23.335, 0.686)
pt3dadd(180.982, 137.034, 23.346, 0.738)
pt3dadd(181.068, 137.117, 23.356, 0.79)
pt3dadd(181.145, 137.201, 23.381, 0.83)
pt3dadd(181.213, 137.286, 23.423, 0.858)
pt3dadd(181.28, 137.371, 23.465, 0.886)
pt3dadd(181.348, 137.458, 23.507, 0.914)
pt3dadd(181.415, 137.543, 23.549, 0.942)
pt3dadd(181.483, 137.628, 23.591, 0.97)
pt3dadd(181.55, 137.713, 23.633, 0.998)
pt3dadd(181.618, 137.798, 23.676, 1.026)
pt3dadd(181.686, 137.884, 23.718, 1.054)
pt3dadd(181.753, 137.969, 23.76, 1.082)
pt3dadd(181.806, 138.066, 23.797, 1.106)
pt3dadd(181.848, 138.17, 23.83, 1.13)
pt3dadd(181.89, 138.276, 23.864, 1.154)
pt3dadd(181.932, 138.38, 23.898, 1.176)
pt3dadd(181.974, 138.485, 23.931, 1.2)
pt3dadd(182.016, 138.59, 23.965, 1.224)
pt3dadd(182.059, 138.695, 23.999, 1.246)
pt3dadd(182.101, 138.8, 24.032, 1.27)
pt3dadd(182.143, 138.905, 24.066, 1.292)
pt3dadd(182.185, 139.01, 24.099, 1.316)
pt3dadd(182.236, 139.115, 24.121, 1.272)
pt3dadd(182.291, 139.22, 24.136, 1.192)
pt3dadd(182.345, 139.325, 24.151, 1.112)
pt3dadd(182.4, 139.43, 24.166, 1.032)
pt3dadd(182.455, 139.536, 24.181, 0.954)
pt3dadd(182.509, 139.64, 24.196, 0.874)
pt3dadd(182.564, 139.746, 24.211, 0.794)
pt3dadd(182.62, 139.852, 24.226, 0.714)
pt3dadd(182.675, 139.956, 24.241, 0.634)
pt3dadd(182.729, 140.062, 24.256, 0.554)
pt3dadd(182.78, 140.17, 24.265, 0.516)
pt3dadd(182.828, 140.279, 24.271, 0.498)
pt3dadd(182.878, 140.388, 24.277, 0.482)
pt3dadd(182.926, 140.498, 24.283, 0.464)
pt3dadd(182.975, 140.608, 24.289, 0.446)
pt3dadd(183.023, 140.717, 24.295, 0.428)
pt3dadd(183.072, 140.826, 24.301, 0.41)
pt3dadd(183.12, 140.936, 24.307, 0.392)
pt3dadd(183.169, 141.046, 24.313, 0.376)
pt3dadd(183.217, 141.155, 24.319, 0.358)
pt3dadd(183.269, 141.263, 24.324, 0.354)
pt3dadd(183.322, 141.371, 24.329, 0.356)
pt3dadd(183.373, 141.479, 24.334, 0.358)
pt3dadd(183.426, 141.587, 24.339, 0.358)
pt3dadd(183.479, 141.694, 24.343, 0.36)
pt3dadd(183.532, 141.802, 24.348, 0.362)
pt3dadd(183.584, 141.91, 24.353, 0.364)
pt3dadd(183.636, 142.018, 24.358, 0.366)
pt3dadd(183.689, 142.126, 24.362, 0.368)
pt3dadd(183.742, 142.232, 24.367, 0.37)
pt3dadd(183.798, 142.338, 24.375, 0.372)
pt3dadd(183.857, 142.442, 24.383, 0.372)
pt3dadd(183.916, 142.547, 24.391, 0.374)
pt3dadd(183.974, 142.651, 24.399, 0.376)
pt3dadd(184.033, 142.754, 24.407, 0.38)
pt3dadd(184.092, 142.859, 24.416, 0.382)
pt3dadd(184.15, 142.963, 24.424, 0.384)
pt3dadd(184.208, 143.068, 24.432, 0.384)
pt3dadd(184.267, 143.172, 24.44, 0.386)
pt3dadd(184.326, 143.276, 24.449, 0.388)
pt3dadd(184.374, 143.384, 24.464, 0.44)
pt3dadd(184.42, 143.494, 24.482, 0.504)
pt3dadd(184.465, 143.602, 24.5, 0.568)
pt3dadd(184.511, 143.711, 24.517, 0.634)
pt3dadd(184.556, 143.82, 24.535, 0.698)
pt3dadd(184.602, 143.929, 24.553, 0.764)
pt3dadd(184.648, 144.038, 24.571, 0.828)
pt3dadd(184.693, 144.146, 24.588, 0.892)
pt3dadd(184.739, 144.256, 24.606, 0.958)
pt3dadd(184.784, 144.365, 24.624, 1.022)
pt3dadd(184.836, 144.456, 24.671, 0.96)
pt3dadd(184.89, 144.544, 24.722, 0.878)
}
}
proc shape3d_32() {
dend_7[27] { pt3dadd(184.943, 144.631, 24.774, 0.796)
pt3dadd(184.996, 144.72, 24.826, 0.716)
pt3dadd(185.048, 144.808, 24.877, 0.634)
pt3dadd(185.101, 144.896, 24.929, 0.552)
pt3dadd(185.154, 144.984, 24.98, 0.47)
pt3dadd(185.208, 145.072, 25.032, 0.39)
pt3dadd(185.261, 145.16, 25.084, 0.308)
pt3dadd(185.314, 145.248, 25.135, 0.226)
pt3dadd(185.388, 145.334, 25.166, 0.226)
pt3dadd(185.462, 145.421, 25.197, 0.226)
pt3dadd(185.537, 145.508, 25.228, 0.226)
pt3dadd(185.611, 145.595, 25.259, 0.226)
pt3dadd(185.686, 145.681, 25.29, 0.226)
pt3dadd(185.759, 145.768, 25.321, 0.226)
pt3dadd(185.833, 145.854, 25.352, 0.226)
pt3dadd(185.908, 145.942, 25.383, 0.226)
pt3dadd(185.982, 146.028, 25.414, 0.226)
pt3dadd(186.056, 146.114, 25.445, 0.226)
}
dend_7[28] {pt3dclear()
pt3dadd(150.328, 108.006, 11.622, 0.904)
pt3dadd(150.341, 108.006, 11.648, 0.91)
pt3dadd(150.388, 108.006, 11.741, 0.934)
pt3dadd(150.433, 108.006, 11.833, 0.958)
pt3dadd(150.48, 108.006, 11.925, 0.982)
pt3dadd(150.527, 108.007, 12.017, 1.004)
pt3dadd(150.616, 108.041, 12.078, 1.002)
pt3dadd(150.704, 108.075, 12.139, 1)
pt3dadd(150.793, 108.109, 12.2, 1)
pt3dadd(150.882, 108.143, 12.26, 0.998)
pt3dadd(150.971, 108.177, 12.321, 0.996)
pt3dadd(151.06, 108.211, 12.382, 0.994)
pt3dadd(151.148, 108.245, 12.443, 0.992)
pt3dadd(151.237, 108.279, 12.504, 0.99)
pt3dadd(151.338, 108.334, 12.518, 0.966)
pt3dadd(151.442, 108.394, 12.52, 0.936)
pt3dadd(151.546, 108.454, 12.522, 0.906)
pt3dadd(151.65, 108.514, 12.524, 0.876)
pt3dadd(151.754, 108.574, 12.526, 0.846)
pt3dadd(151.858, 108.634, 12.529, 0.816)
pt3dadd(151.962, 108.694, 12.531, 0.786)
pt3dadd(152.065, 108.754, 12.533, 0.756)
pt3dadd(152.17, 108.814, 12.535, 0.728)
pt3dadd(152.273, 108.874, 12.537, 0.696)
pt3dadd(152.386, 108.913, 12.54, 0.658)
pt3dadd(152.501, 108.947, 12.543, 0.616)
pt3dadd(152.616, 108.98, 12.546, 0.576)
pt3dadd(152.731, 109.013, 12.549, 0.534)
pt3dadd(152.846, 109.046, 12.552, 0.494)
pt3dadd(152.962, 109.08, 12.555, 0.452)
pt3dadd(153.078, 109.113, 12.558, 0.412)
pt3dadd(153.193, 109.146, 12.562, 0.37)
pt3dadd(153.308, 109.179, 12.565, 0.328)
pt3dadd(153.424, 109.213, 12.568, 0.288)
pt3dadd(153.541, 109.232, 12.574, 0.302)
pt3dadd(153.66, 109.248, 12.58, 0.33)
pt3dadd(153.779, 109.263, 12.587, 0.358)
pt3dadd(153.898, 109.279, 12.594, 0.386)
pt3dadd(154.016, 109.294, 12.6, 0.414)
pt3dadd(154.135, 109.31, 12.607, 0.442)
pt3dadd(154.254, 109.326, 12.614, 0.47)
pt3dadd(154.372, 109.341, 12.62, 0.498)
pt3dadd(154.49, 109.357, 12.627, 0.526)
pt3dadd(154.609, 109.373, 12.633, 0.554)
pt3dadd(154.729, 109.379, 12.643, 0.556)
pt3dadd(154.848, 109.383, 12.654, 0.556)
pt3dadd(154.967, 109.387, 12.664, 0.554)
pt3dadd(155.087, 109.391, 12.674, 0.554)
pt3dadd(155.206, 109.395, 12.685, 0.552)
pt3dadd(155.326, 109.399, 12.695, 0.552)
pt3dadd(155.444, 109.403, 12.705, 0.55)
pt3dadd(155.563, 109.407, 12.716, 0.55)
pt3dadd(155.683, 109.411, 12.726, 0.548)
pt3dadd(155.802, 109.415, 12.737, 0.548)
pt3dadd(155.918, 109.416, 12.759, 0.54)
pt3dadd(156.035, 109.416, 12.784, 0.53)
pt3dadd(156.151, 109.416, 12.809, 0.52)
pt3dadd(156.268, 109.416, 12.835, 0.51)
pt3dadd(156.384, 109.416, 12.859, 0.5)
pt3dadd(156.5, 109.416, 12.885, 0.492)
pt3dadd(156.616, 109.416, 12.91, 0.482)
pt3dadd(156.732, 109.416, 12.935, 0.472)
pt3dadd(156.848, 109.416, 12.96, 0.462)
pt3dadd(156.965, 109.416, 12.985, 0.452)
pt3dadd(157.078, 109.416, 13.019, 0.448)
pt3dadd(157.189, 109.416, 13.054, 0.444)
pt3dadd(157.302, 109.416, 13.089, 0.44)
pt3dadd(157.415, 109.416, 13.124, 0.436)
pt3dadd(157.528, 109.416, 13.159, 0.43)
pt3dadd(157.639, 109.416, 13.193, 0.426)
pt3dadd(157.752, 109.416, 13.228, 0.422)
pt3dadd(157.865, 109.416, 13.263, 0.418)
pt3dadd(157.976, 109.416, 13.298, 0.414)
pt3dadd(158.089, 109.416, 13.333, 0.41)
pt3dadd(158.206, 109.416, 13.359, 0.392)
pt3dadd(158.321, 109.416, 13.384, 0.374)
pt3dadd(158.437, 109.415, 13.409, 0.356)
pt3dadd(158.554, 109.415, 13.434, 0.336)
pt3dadd(158.67, 109.415, 13.46, 0.318)
pt3dadd(158.786, 109.415, 13.485, 0.3)
pt3dadd(158.902, 109.414, 13.51, 0.282)
pt3dadd(159.018, 109.414, 13.535, 0.264)
pt3dadd(159.134, 109.414, 13.56, 0.246)
pt3dadd(159.251, 109.414, 13.585, 0.226)
pt3dadd(159.37, 109.413, 13.6, 0.226)
pt3dadd(159.488, 109.413, 13.614, 0.226)
pt3dadd(159.607, 109.413, 13.628, 0.226)
pt3dadd(159.726, 109.412, 13.642, 0.226)
pt3dadd(159.845, 109.412, 13.656, 0.226)
pt3dadd(159.964, 109.411, 13.67, 0.226)
pt3dadd(160.082, 109.411, 13.684, 0.226)
pt3dadd(160.201, 109.411, 13.698, 0.226)
pt3dadd(160.32, 109.41, 13.712, 0.226)
pt3dadd(160.439, 109.41, 13.726, 0.226)
pt3dadd(160.558, 109.409, 13.734, 0.242)
pt3dadd(160.678, 109.409, 13.743, 0.256)
pt3dadd(160.798, 109.408, 13.751, 0.272)
pt3dadd(160.916, 109.408, 13.76, 0.288)
pt3dadd(161.036, 109.407, 13.768, 0.304)
pt3dadd(161.156, 109.406, 13.777, 0.32)
pt3dadd(161.275, 109.406, 13.785, 0.336)
pt3dadd(161.395, 109.405, 13.794, 0.352)
pt3dadd(161.514, 109.405, 13.802, 0.368)
pt3dadd(161.634, 109.404, 13.811, 0.384)
pt3dadd(161.754, 109.403, 13.821, 0.39)
pt3dadd(161.873, 109.402, 13.832, 0.398)
pt3dadd(161.992, 109.4, 13.842, 0.404)
pt3dadd(162.112, 109.399, 13.853, 0.412)
pt3dadd(162.23, 109.398, 13.863, 0.418)
pt3dadd(162.35, 109.397, 13.874, 0.424)
pt3dadd(162.469, 109.396, 13.885, 0.432)
pt3dadd(162.589, 109.394, 13.895, 0.438)
pt3dadd(162.708, 109.393, 13.906, 0.444)
pt3dadd(162.828, 109.392, 13.916, 0.452)
pt3dadd(162.944, 109.39, 13.94, 0.444)
pt3dadd(163.06, 109.388, 13.965, 0.436)
pt3dadd(163.176, 109.386, 13.989, 0.428)
pt3dadd(163.292, 109.383, 14.014, 0.42)
pt3dadd(163.409, 109.381, 14.039, 0.41)
pt3dadd(163.525, 109.379, 14.063, 0.402)
pt3dadd(163.642, 109.377, 14.088, 0.394)
pt3dadd(163.758, 109.375, 14.113, 0.386)
pt3dadd(163.874, 109.372, 14.137, 0.378)
pt3dadd(163.99, 109.37, 14.162, 0.37)
pt3dadd(164.102, 109.366, 14.199, 0.358)
pt3dadd(164.214, 109.362, 14.235, 0.348)
pt3dadd(164.326, 109.359, 14.271, 0.336)
pt3dadd(164.437, 109.355, 14.308, 0.326)
pt3dadd(164.549, 109.351, 14.344, 0.314)
pt3dadd(164.66, 109.347, 14.38, 0.304)
pt3dadd(164.772, 109.343, 14.416, 0.294)
pt3dadd(164.884, 109.339, 14.453, 0.282)
pt3dadd(164.996, 109.336, 14.489, 0.272)
pt3dadd(165.108, 109.332, 14.525, 0.262)
pt3dadd(165.223, 109.324, 14.552, 0.28)
pt3dadd(165.338, 109.316, 14.579, 0.3)
pt3dadd(165.454, 109.309, 14.605, 0.318)
pt3dadd(165.569, 109.301, 14.632, 0.336)
pt3dadd(165.684, 109.294, 14.659, 0.356)
pt3dadd(165.8, 109.286, 14.686, 0.374)
pt3dadd(165.916, 109.279, 14.713, 0.392)
pt3dadd(166.031, 109.271, 14.74, 0.41)
pt3dadd(166.146, 109.263, 14.767, 0.43)
pt3dadd(166.261, 109.256, 14.793, 0.446)
pt3dadd(166.379, 109.243, 14.812, 0.428)
pt3dadd(166.495, 109.231, 14.831, 0.41)
pt3dadd(166.613, 109.219, 14.849, 0.392)
pt3dadd(166.73, 109.206, 14.868, 0.374)
pt3dadd(166.848, 109.194, 14.887, 0.356)
pt3dadd(166.964, 109.182, 14.906, 0.338)
pt3dadd(167.082, 109.169, 14.925, 0.32)
pt3dadd(167.2, 109.157, 14.943, 0.304)
pt3dadd(167.316, 109.144, 14.962, 0.286)
pt3dadd(167.434, 109.131, 14.981, 0.27)
pt3dadd(167.546, 109.095, 14.995, 0.308)
pt3dadd(167.659, 109.059, 15.008, 0.346)
pt3dadd(167.773, 109.023, 15.022, 0.384)
pt3dadd(167.886, 108.987, 15.036, 0.422)
pt3dadd(168, 108.951, 15.05, 0.46)
pt3dadd(168.113, 108.915, 15.064, 0.498)
pt3dadd(168.226, 108.879, 15.078, 0.536)
pt3dadd(168.34, 108.843, 15.092, 0.574)
pt3dadd(168.452, 108.807, 15.105, 0.612)
pt3dadd(168.565, 108.771, 15.121, 0.646)
pt3dadd(168.677, 108.739, 15.148, 0.654)
pt3dadd(168.787, 108.707, 15.175, 0.662)
pt3dadd(168.899, 108.675, 15.203, 0.668)
pt3dadd(169.009, 108.643, 15.23, 0.676)
pt3dadd(169.121, 108.611, 15.257, 0.684)
pt3dadd(169.231, 108.579, 15.284, 0.69)
pt3dadd(169.343, 108.547, 15.312, 0.698)
pt3dadd(169.453, 108.515, 15.339, 0.706)
pt3dadd(169.564, 108.483, 15.366, 0.712)
pt3dadd(169.675, 108.455, 15.396, 0.712)
pt3dadd(169.784, 108.439, 15.434, 0.684)
pt3dadd(169.894, 108.422, 15.473, 0.658)
pt3dadd(170.004, 108.405, 15.511, 0.632)
pt3dadd(170.113, 108.389, 15.549, 0.604)
pt3dadd(170.222, 108.372, 15.587, 0.578)
pt3dadd(170.333, 108.356, 15.626, 0.552)
pt3dadd(170.442, 108.339, 15.664, 0.524)
pt3dadd(170.551, 108.323, 15.702, 0.498)
}
}
proc shape3d_33() {
dend_7[28] { pt3dadd(170.662, 108.306, 15.741, 0.472)
pt3dadd(170.772, 108.294, 15.777, 0.454)
pt3dadd(170.885, 108.295, 15.81, 0.456)
pt3dadd(170.999, 108.297, 15.842, 0.46)
pt3dadd(171.113, 108.298, 15.874, 0.464)
pt3dadd(171.226, 108.299, 15.907, 0.468)
pt3dadd(171.34, 108.3, 15.939, 0.472)
pt3dadd(171.454, 108.301, 15.971, 0.476)
pt3dadd(171.566, 108.302, 16.004, 0.48)
pt3dadd(171.68, 108.303, 16.036, 0.482)
pt3dadd(171.793, 108.304, 16.068, 0.486)
pt3dadd(171.906, 108.319, 16.098, 0.502)
pt3dadd(172.015, 108.359, 16.123, 0.542)
pt3dadd(172.123, 108.4, 16.148, 0.582)
pt3dadd(172.232, 108.44, 16.173, 0.622)
pt3dadd(172.342, 108.48, 16.198, 0.662)
pt3dadd(172.451, 108.521, 16.223, 0.7)
pt3dadd(172.56, 108.561, 16.248, 0.74)
pt3dadd(172.669, 108.601, 16.273, 0.78)
pt3dadd(172.777, 108.642, 16.297, 0.82)
pt3dadd(172.886, 108.682, 16.322, 0.858)
pt3dadd(172.992, 108.714, 16.358, 0.87)
pt3dadd(173.09, 108.731, 16.413, 0.83)
pt3dadd(173.189, 108.748, 16.468, 0.788)
pt3dadd(173.288, 108.765, 16.523, 0.748)
pt3dadd(173.387, 108.782, 16.579, 0.708)
pt3dadd(173.485, 108.799, 16.634, 0.666)
pt3dadd(173.584, 108.816, 16.689, 0.626)
pt3dadd(173.682, 108.833, 16.744, 0.586)
pt3dadd(173.782, 108.85, 16.799, 0.544)
pt3dadd(173.88, 108.867, 16.854, 0.504)
pt3dadd(173.981, 108.856, 16.9, 0.504)
pt3dadd(174.085, 108.815, 16.936, 0.548)
pt3dadd(174.188, 108.773, 16.972, 0.59)
pt3dadd(174.293, 108.732, 17.009, 0.634)
pt3dadd(174.397, 108.691, 17.045, 0.676)
pt3dadd(174.5, 108.649, 17.081, 0.72)
pt3dadd(174.605, 108.608, 17.117, 0.762)
pt3dadd(174.709, 108.567, 17.153, 0.806)
pt3dadd(174.812, 108.525, 17.189, 0.848)
pt3dadd(174.917, 108.484, 17.225, 0.892)
pt3dadd(175.025, 108.446, 17.255, 0.924)
pt3dadd(175.136, 108.412, 17.28, 0.944)
pt3dadd(175.247, 108.378, 17.304, 0.964)
pt3dadd(175.358, 108.343, 17.328, 0.984)
pt3dadd(175.47, 108.309, 17.352, 1.004)
pt3dadd(175.58, 108.275, 17.377, 1.024)
pt3dadd(175.692, 108.24, 17.401, 1.044)
pt3dadd(175.804, 108.206, 17.425, 1.064)
pt3dadd(175.914, 108.172, 17.449, 1.084)
pt3dadd(176.026, 108.138, 17.474, 1.104)
pt3dadd(176.136, 108.11, 17.504, 1.1)
pt3dadd(176.246, 108.09, 17.541, 1.068)
pt3dadd(176.356, 108.069, 17.577, 1.038)
pt3dadd(176.466, 108.049, 17.614, 1.006)
pt3dadd(176.575, 108.029, 17.651, 0.976)
pt3dadd(176.686, 108.009, 17.687, 0.944)
pt3dadd(176.795, 107.988, 17.724, 0.914)
pt3dadd(176.905, 107.968, 17.761, 0.882)
pt3dadd(177.014, 107.948, 17.797, 0.852)
pt3dadd(177.125, 107.927, 17.834, 0.82)
pt3dadd(177.236, 107.91, 17.867, 0.804)
pt3dadd(177.349, 107.895, 17.898, 0.804)
pt3dadd(177.463, 107.881, 17.928, 0.802)
pt3dadd(177.576, 107.866, 17.958, 0.802)
pt3dadd(177.69, 107.852, 17.988, 0.802)
pt3dadd(177.803, 107.837, 18.018, 0.8)
pt3dadd(177.917, 107.823, 18.048, 0.8)
pt3dadd(178.031, 107.808, 18.079, 0.8)
pt3dadd(178.144, 107.793, 18.109, 0.798)
pt3dadd(178.258, 107.779, 18.139, 0.798)
pt3dadd(178.372, 107.759, 18.164, 0.794)
pt3dadd(178.486, 107.734, 18.186, 0.79)
pt3dadd(178.601, 107.709, 18.207, 0.784)
pt3dadd(178.715, 107.684, 18.229, 0.78)
pt3dadd(178.829, 107.659, 18.25, 0.774)
pt3dadd(178.944, 107.634, 18.272, 0.77)
pt3dadd(179.058, 107.608, 18.293, 0.764)
pt3dadd(179.173, 107.583, 18.315, 0.76)
pt3dadd(179.287, 107.558, 18.337, 0.754)
pt3dadd(179.401, 107.533, 18.358, 0.75)
pt3dadd(179.515, 107.5, 18.375, 0.732)
pt3dadd(179.627, 107.462, 18.389, 0.706)
pt3dadd(179.74, 107.423, 18.403, 0.68)
pt3dadd(179.852, 107.385, 18.417, 0.654)
pt3dadd(179.965, 107.346, 18.43, 0.628)
pt3dadd(180.077, 107.308, 18.444, 0.602)
pt3dadd(180.19, 107.269, 18.458, 0.576)
pt3dadd(180.302, 107.231, 18.472, 0.55)
pt3dadd(180.414, 107.193, 18.486, 0.524)
pt3dadd(180.527, 107.154, 18.5, 0.498)
pt3dadd(180.643, 107.128, 18.511, 0.5)
pt3dadd(180.761, 107.107, 18.52, 0.516)
pt3dadd(180.878, 107.087, 18.529, 0.534)
pt3dadd(180.996, 107.067, 18.538, 0.55)
pt3dadd(181.114, 107.046, 18.547, 0.568)
pt3dadd(181.231, 107.026, 18.556, 0.584)
pt3dadd(181.35, 107.006, 18.565, 0.602)
pt3dadd(181.468, 106.985, 18.574, 0.618)
pt3dadd(181.585, 106.965, 18.583, 0.636)
pt3dadd(181.703, 106.945, 18.592, 0.652)
pt3dadd(181.818, 106.939, 18.616, 0.63)
pt3dadd(181.932, 106.942, 18.647, 0.59)
pt3dadd(182.046, 106.944, 18.679, 0.548)
pt3dadd(182.16, 106.946, 18.71, 0.506)
pt3dadd(182.274, 106.948, 18.742, 0.466)
pt3dadd(182.388, 106.95, 18.773, 0.424)
pt3dadd(182.501, 106.952, 18.805, 0.384)
pt3dadd(182.615, 106.955, 18.836, 0.342)
pt3dadd(182.729, 106.957, 18.868, 0.302)
pt3dadd(182.843, 106.959, 18.899, 0.26)
pt3dadd(182.952, 106.995, 18.918, 0.258)
pt3dadd(183.058, 107.049, 18.93, 0.278)
pt3dadd(183.164, 107.103, 18.943, 0.296)
pt3dadd(183.271, 107.157, 18.955, 0.316)
pt3dadd(183.377, 107.21, 18.967, 0.334)
pt3dadd(183.484, 107.264, 18.98, 0.354)
pt3dadd(183.589, 107.318, 18.992, 0.372)
pt3dadd(183.696, 107.371, 19.004, 0.392)
pt3dadd(183.802, 107.425, 19.017, 0.412)
pt3dadd(183.908, 107.479, 19.029, 0.43)
pt3dadd(183.99, 107.532, 18.984, 0.42)
pt3dadd(184.063, 107.585, 18.918, 0.398)
pt3dadd(184.135, 107.637, 18.852, 0.376)
pt3dadd(184.208, 107.69, 18.785, 0.356)
pt3dadd(184.282, 107.743, 18.719, 0.334)
pt3dadd(184.354, 107.795, 18.653, 0.312)
pt3dadd(184.427, 107.848, 18.587, 0.29)
pt3dadd(184.5, 107.901, 18.52, 0.268)
pt3dadd(184.572, 107.953, 18.454, 0.248)
pt3dadd(184.645, 108.006, 18.388, 0.226)
}
dend_7[29] {pt3dclear()
pt3dadd(145.104, 104.666, 10.316, 1.13)
pt3dadd(145.146, 104.682, 10.276, 1.124)
pt3dadd(145.224, 104.71, 10.204, 1.112)
pt3dadd(145.302, 104.738, 10.131, 1.098)
pt3dadd(145.38, 104.766, 10.059, 1.086)
pt3dadd(145.457, 104.794, 9.986, 1.074)
pt3dadd(145.535, 104.822, 9.914, 1.062)
pt3dadd(145.613, 104.85, 9.841, 1.05)
pt3dadd(145.691, 104.878, 9.769, 1.038)
pt3dadd(145.768, 104.906, 9.696, 1.026)
pt3dadd(145.846, 104.934, 9.624, 1.014)
pt3dadd(145.924, 104.962, 9.551, 1)
pt3dadd(146.002, 104.991, 9.479, 0.988)
pt3dadd(146.065, 105.044, 9.411, 0.974)
pt3dadd(146.118, 105.121, 9.347, 0.956)
pt3dadd(146.171, 105.197, 9.284, 0.938)
pt3dadd(146.224, 105.274, 9.221, 0.92)
pt3dadd(146.275, 105.35, 9.157, 0.902)
pt3dadd(146.328, 105.427, 9.094, 0.884)
pt3dadd(146.381, 105.503, 9.03, 0.866)
pt3dadd(146.434, 105.58, 8.967, 0.848)
pt3dadd(146.43, 105.685, 8.943, 0.832)
pt3dadd(146.405, 105.802, 8.935, 0.816)
pt3dadd(146.378, 105.919, 8.926, 0.8)
pt3dadd(146.353, 106.036, 8.918, 0.784)
pt3dadd(146.328, 106.152, 8.91, 0.768)
pt3dadd(146.303, 106.269, 8.901, 0.754)
pt3dadd(146.276, 106.386, 8.893, 0.736)
pt3dadd(146.251, 106.503, 8.885, 0.722)
pt3dadd(146.226, 106.62, 8.876, 0.706)
pt3dadd(146.201, 106.737, 8.868, 0.69)
pt3dadd(146.159, 106.848, 8.857, 0.714)
pt3dadd(146.11, 106.956, 8.846, 0.752)
pt3dadd(146.062, 107.065, 8.834, 0.792)
pt3dadd(146.012, 107.174, 8.822, 0.832)
pt3dadd(145.964, 107.283, 8.81, 0.87)
pt3dadd(145.915, 107.392, 8.799, 0.91)
pt3dadd(145.867, 107.501, 8.787, 0.95)
pt3dadd(145.818, 107.609, 8.775, 0.988)
pt3dadd(145.77, 107.718, 8.763, 1.028)
pt3dadd(145.721, 107.827, 8.752, 1.068)
pt3dadd(145.686, 107.939, 8.734, 1.082)
pt3dadd(145.656, 108.053, 8.714, 1.088)
pt3dadd(145.626, 108.167, 8.695, 1.092)
pt3dadd(145.596, 108.281, 8.675, 1.098)
pt3dadd(145.567, 108.395, 8.655, 1.102)
pt3dadd(145.537, 108.508, 8.635, 1.108)
pt3dadd(145.507, 108.622, 8.616, 1.114)
pt3dadd(145.477, 108.736, 8.596, 1.118)
pt3dadd(145.447, 108.85, 8.576, 1.124)
pt3dadd(145.417, 108.963, 8.556, 1.128)
pt3dadd(145.398, 109.073, 8.521, 1.114)
pt3dadd(145.382, 109.182, 8.48, 1.092)
pt3dadd(145.367, 109.29, 8.439, 1.072)
pt3dadd(145.351, 109.398, 8.398, 1.05)
pt3dadd(145.334, 109.507, 8.358, 1.028)
pt3dadd(145.319, 109.615, 8.317, 1.008)
pt3dadd(145.303, 109.723, 8.276, 0.986)
pt3dadd(145.288, 109.832, 8.235, 0.964)
pt3dadd(145.272, 109.94, 8.194, 0.942)
pt3dadd(145.255, 110.049, 8.153, 0.922)
pt3dadd(145.249, 110.15, 8.1, 0.902)
pt3dadd(145.244, 110.25, 8.046, 0.882)
pt3dadd(145.24, 110.351, 7.991, 0.862)
pt3dadd(145.234, 110.451, 7.937, 0.842)
pt3dadd(145.229, 110.552, 7.882, 0.822)
pt3dadd(145.224, 110.652, 7.828, 0.802)
pt3dadd(145.218, 110.753, 7.773, 0.782)
pt3dadd(145.213, 110.854, 7.719, 0.762)
}
}
proc shape3d_34() {
dend_7[29] { pt3dadd(145.208, 110.954, 7.664, 0.742)
pt3dadd(145.202, 111.055, 7.61, 0.722)
pt3dadd(145.207, 111.149, 7.548, 0.734)
pt3dadd(145.212, 111.243, 7.486, 0.75)
pt3dadd(145.217, 111.337, 7.424, 0.764)
pt3dadd(145.222, 111.43, 7.362, 0.78)
pt3dadd(145.228, 111.524, 7.3, 0.796)
pt3dadd(145.232, 111.618, 7.237, 0.81)
pt3dadd(145.237, 111.712, 7.175, 0.826)
pt3dadd(145.242, 111.806, 7.113, 0.84)
pt3dadd(145.247, 111.899, 7.051, 0.856)
pt3dadd(145.253, 111.993, 6.989, 0.872)
pt3dadd(145.262, 112.086, 6.925, 0.842)
pt3dadd(145.272, 112.178, 6.862, 0.808)
pt3dadd(145.283, 112.271, 6.799, 0.774)
pt3dadd(145.292, 112.363, 6.736, 0.742)
pt3dadd(145.302, 112.456, 6.673, 0.708)
pt3dadd(145.313, 112.548, 6.61, 0.674)
pt3dadd(145.322, 112.641, 6.547, 0.64)
pt3dadd(145.333, 112.734, 6.484, 0.608)
pt3dadd(145.343, 112.826, 6.421, 0.574)
pt3dadd(145.352, 112.919, 6.357, 0.54)
pt3dadd(145.369, 113.015, 6.3, 0.508)
pt3dadd(145.385, 113.113, 6.243, 0.478)
pt3dadd(145.402, 113.21, 6.186, 0.446)
pt3dadd(145.417, 113.307, 6.128, 0.414)
pt3dadd(145.434, 113.404, 6.071, 0.384)
pt3dadd(145.451, 113.501, 6.014, 0.352)
pt3dadd(145.466, 113.598, 5.957, 0.32)
pt3dadd(145.483, 113.695, 5.9, 0.288)
pt3dadd(145.499, 113.793, 5.843, 0.258)
pt3dadd(145.516, 113.89, 5.786, 0.226)
}
dend_7[30] {pt3dclear()
pt3dadd(145.516, 113.89, 5.786, 0.226)
pt3dadd(145.535, 113.954, 5.76, 0.226)
pt3dadd(145.565, 114.059, 5.719, 0.226)
pt3dadd(145.596, 114.164, 5.678, 0.226)
pt3dadd(145.627, 114.269, 5.637, 0.226)
pt3dadd(145.658, 114.374, 5.596, 0.226)
pt3dadd(145.688, 114.479, 5.555, 0.226)
pt3dadd(145.72, 114.584, 5.514, 0.226)
pt3dadd(145.751, 114.689, 5.473, 0.226)
pt3dadd(145.782, 114.793, 5.432, 0.226)
pt3dadd(145.812, 114.898, 5.391, 0.226)
pt3dadd(145.87, 114.996, 5.361, 0.226)
pt3dadd(145.938, 115.09, 5.338, 0.226)
pt3dadd(146.008, 115.184, 5.314, 0.226)
pt3dadd(146.076, 115.278, 5.29, 0.226)
pt3dadd(146.144, 115.372, 5.266, 0.226)
pt3dadd(146.213, 115.466, 5.242, 0.226)
pt3dadd(146.282, 115.56, 5.218, 0.226)
pt3dadd(146.351, 115.655, 5.194, 0.226)
pt3dadd(146.419, 115.749, 5.17, 0.226)
pt3dadd(146.488, 115.843, 5.146, 0.226)
pt3dadd(146.57, 115.915, 5.11, 0.248)
pt3dadd(146.66, 115.978, 5.069, 0.278)
pt3dadd(146.749, 116.041, 5.027, 0.308)
pt3dadd(146.839, 116.103, 4.986, 0.34)
pt3dadd(146.929, 116.166, 4.944, 0.37)
pt3dadd(147.018, 116.229, 4.903, 0.4)
pt3dadd(147.108, 116.291, 4.862, 0.432)
pt3dadd(147.197, 116.354, 4.82, 0.462)
pt3dadd(147.287, 116.417, 4.779, 0.494)
pt3dadd(147.376, 116.48, 4.737, 0.524)
pt3dadd(147.469, 116.539, 4.699, 0.55)
pt3dadd(147.563, 116.598, 4.662, 0.576)
pt3dadd(147.658, 116.657, 4.624, 0.6)
pt3dadd(147.752, 116.716, 4.587, 0.626)
pt3dadd(147.846, 116.775, 4.549, 0.65)
pt3dadd(147.941, 116.834, 4.512, 0.676)
pt3dadd(148.034, 116.893, 4.474, 0.7)
pt3dadd(148.129, 116.952, 4.437, 0.726)
pt3dadd(148.223, 117.012, 4.399, 0.75)
pt3dadd(148.318, 117.071, 4.362, 0.776)
pt3dadd(148.411, 117.129, 4.321, 0.786)
pt3dadd(148.504, 117.188, 4.281, 0.792)
pt3dadd(148.596, 117.246, 4.24, 0.798)
pt3dadd(148.688, 117.305, 4.2, 0.804)
pt3dadd(148.782, 117.363, 4.16, 0.81)
pt3dadd(148.874, 117.422, 4.119, 0.816)
pt3dadd(148.967, 117.481, 4.078, 0.822)
pt3dadd(149.06, 117.539, 4.038, 0.828)
pt3dadd(149.153, 117.598, 3.997, 0.834)
pt3dadd(149.245, 117.656, 3.957, 0.84)
pt3dadd(149.335, 117.707, 3.906, 0.816)
pt3dadd(149.425, 117.757, 3.855, 0.786)
pt3dadd(149.515, 117.807, 3.803, 0.758)
pt3dadd(149.605, 117.858, 3.751, 0.73)
pt3dadd(149.694, 117.908, 3.7, 0.702)
pt3dadd(149.784, 117.958, 3.648, 0.674)
pt3dadd(149.874, 118.008, 3.597, 0.644)
pt3dadd(149.964, 118.059, 3.545, 0.616)
pt3dadd(150.053, 118.109, 3.494, 0.588)
pt3dadd(150.144, 118.159, 3.443, 0.56)
pt3dadd(150.247, 118.212, 3.419, 0.534)
pt3dadd(150.352, 118.265, 3.395, 0.51)
pt3dadd(150.455, 118.317, 3.371, 0.486)
pt3dadd(150.559, 118.37, 3.346, 0.46)
pt3dadd(150.662, 118.423, 3.322, 0.436)
pt3dadd(150.767, 118.476, 3.298, 0.412)
pt3dadd(150.87, 118.528, 3.274, 0.386)
pt3dadd(150.974, 118.581, 3.25, 0.362)
pt3dadd(151.078, 118.634, 3.226, 0.336)
pt3dadd(151.181, 118.688, 3.203, 0.318)
pt3dadd(151.279, 118.756, 3.193, 0.354)
pt3dadd(151.378, 118.824, 3.183, 0.39)
pt3dadd(151.476, 118.892, 3.173, 0.424)
pt3dadd(151.574, 118.96, 3.163, 0.46)
pt3dadd(151.672, 119.028, 3.152, 0.496)
pt3dadd(151.77, 119.096, 3.142, 0.532)
pt3dadd(151.868, 119.164, 3.132, 0.566)
pt3dadd(151.967, 119.232, 3.122, 0.602)
pt3dadd(152.065, 119.299, 3.112, 0.638)
pt3dadd(152.162, 119.368, 3.103, 0.67)
pt3dadd(152.255, 119.444, 3.103, 0.67)
pt3dadd(152.348, 119.52, 3.103, 0.67)
pt3dadd(152.441, 119.596, 3.103, 0.672)
pt3dadd(152.533, 119.672, 3.103, 0.672)
pt3dadd(152.627, 119.748, 3.103, 0.674)
pt3dadd(152.719, 119.824, 3.103, 0.674)
pt3dadd(152.813, 119.9, 3.103, 0.676)
pt3dadd(152.905, 119.976, 3.103, 0.676)
pt3dadd(152.998, 120.053, 3.103, 0.678)
pt3dadd(153.09, 120.128, 3.103, 0.682)
pt3dadd(153.181, 120.206, 3.103, 0.716)
pt3dadd(153.272, 120.284, 3.103, 0.748)
pt3dadd(153.364, 120.362, 3.104, 0.782)
pt3dadd(153.455, 120.44, 3.104, 0.814)
pt3dadd(153.546, 120.518, 3.104, 0.848)
pt3dadd(153.637, 120.596, 3.105, 0.882)
pt3dadd(153.728, 120.674, 3.105, 0.916)
pt3dadd(153.82, 120.752, 3.105, 0.948)
pt3dadd(153.911, 120.83, 3.106, 0.982)
pt3dadd(154.002, 120.908, 3.106, 1.02)
pt3dadd(154.092, 120.989, 3.107, 1.092)
pt3dadd(154.181, 121.069, 3.107, 1.164)
pt3dadd(154.271, 121.148, 3.108, 1.236)
pt3dadd(154.361, 121.229, 3.108, 1.308)
pt3dadd(154.45, 121.308, 3.109, 1.382)
pt3dadd(154.54, 121.388, 3.109, 1.454)
pt3dadd(154.628, 121.469, 3.109, 1.526)
pt3dadd(154.718, 121.548, 3.11, 1.598)
pt3dadd(154.808, 121.628, 3.11, 1.67)
pt3dadd(154.898, 121.706, 3.111, 1.73)
pt3dadd(155, 121.771, 3.112, 1.676)
pt3dadd(155.101, 121.835, 3.113, 1.624)
pt3dadd(155.202, 121.9, 3.114, 1.57)
pt3dadd(155.304, 121.964, 3.115, 1.516)
pt3dadd(155.405, 122.029, 3.117, 1.464)
pt3dadd(155.506, 122.094, 3.118, 1.41)
pt3dadd(155.606, 122.158, 3.119, 1.358)
pt3dadd(155.708, 122.222, 3.12, 1.304)
pt3dadd(155.809, 122.287, 3.121, 1.252)
pt3dadd(155.91, 122.352, 3.122, 1.2)
pt3dadd(156.008, 122.422, 3.124, 1.162)
pt3dadd(156.106, 122.491, 3.126, 1.122)
pt3dadd(156.204, 122.56, 3.128, 1.084)
pt3dadd(156.302, 122.629, 3.13, 1.044)
pt3dadd(156.4, 122.699, 3.132, 1.006)
pt3dadd(156.498, 122.767, 3.133, 0.966)
pt3dadd(156.596, 122.837, 3.135, 0.928)
pt3dadd(156.694, 122.906, 3.137, 0.89)
pt3dadd(156.792, 122.975, 3.139, 0.85)
pt3dadd(156.889, 123.046, 3.141, 0.814)
pt3dadd(156.983, 123.121, 3.144, 0.8)
pt3dadd(157.075, 123.197, 3.146, 0.786)
pt3dadd(157.169, 123.272, 3.149, 0.774)
pt3dadd(157.261, 123.348, 3.152, 0.76)
pt3dadd(157.355, 123.424, 3.155, 0.746)
pt3dadd(157.447, 123.499, 3.157, 0.732)
pt3dadd(157.541, 123.575, 3.16, 0.718)
pt3dadd(157.634, 123.65, 3.163, 0.704)
pt3dadd(157.727, 123.726, 3.165, 0.69)
pt3dadd(157.819, 123.804, 3.168, 0.678)
pt3dadd(157.903, 123.888, 3.174, 0.678)
pt3dadd(157.988, 123.972, 3.18, 0.678)
pt3dadd(158.074, 124.057, 3.185, 0.678)
pt3dadd(158.159, 124.141, 3.191, 0.678)
pt3dadd(158.243, 124.226, 3.196, 0.678)
pt3dadd(158.328, 124.31, 3.202, 0.678)
pt3dadd(158.413, 124.396, 3.207, 0.678)
pt3dadd(158.498, 124.48, 3.213, 0.678)
pt3dadd(158.582, 124.565, 3.218, 0.678)
pt3dadd(158.666, 124.65, 3.224, 0.676)
pt3dadd(158.746, 124.74, 3.232, 0.656)
pt3dadd(158.824, 124.831, 3.24, 0.636)
pt3dadd(158.902, 124.921, 3.247, 0.618)
pt3dadd(158.98, 125.011, 3.255, 0.598)
pt3dadd(159.059, 125.102, 3.263, 0.58)
pt3dadd(159.137, 125.192, 3.271, 0.56)
pt3dadd(159.215, 125.282, 3.279, 0.54)
pt3dadd(159.293, 125.374, 3.286, 0.522)
pt3dadd(159.372, 125.464, 3.294, 0.502)
pt3dadd(159.449, 125.555, 3.303, 0.482)
pt3dadd(159.52, 125.651, 3.315, 0.456)
pt3dadd(159.59, 125.747, 3.328, 0.43)
pt3dadd(159.661, 125.842, 3.34, 0.404)
pt3dadd(159.732, 125.938, 3.352, 0.376)
pt3dadd(159.804, 126.034, 3.365, 0.35)
pt3dadd(159.875, 126.128, 3.377, 0.324)
pt3dadd(159.946, 126.224, 3.39, 0.298)
}
}
proc shape3d_35() {
dend_7[30] { pt3dadd(160.016, 126.32, 3.402, 0.272)
pt3dadd(160.087, 126.415, 3.415, 0.246)
pt3dadd(160.152, 126.514, 3.432, 0.226)
pt3dadd(160.198, 126.617, 3.467, 0.226)
pt3dadd(160.243, 126.72, 3.501, 0.226)
pt3dadd(160.289, 126.822, 3.535, 0.226)
pt3dadd(160.334, 126.925, 3.569, 0.226)
pt3dadd(160.38, 127.028, 3.604, 0.226)
pt3dadd(160.424, 127.132, 3.638, 0.226)
pt3dadd(160.47, 127.235, 3.672, 0.226)
pt3dadd(160.516, 127.338, 3.706, 0.226)
pt3dadd(160.561, 127.441, 3.741, 0.226)
pt3dadd(160.603, 127.547, 3.773, 0.226)
pt3dadd(160.637, 127.658, 3.799, 0.226)
pt3dadd(160.669, 127.769, 3.824, 0.226)
pt3dadd(160.702, 127.88, 3.85, 0.226)
pt3dadd(160.735, 127.992, 3.875, 0.226)
pt3dadd(160.768, 128.104, 3.901, 0.226)
pt3dadd(160.8, 128.214, 3.926, 0.226)
pt3dadd(160.834, 128.326, 3.952, 0.226)
pt3dadd(160.866, 128.437, 3.978, 0.226)
pt3dadd(160.898, 128.549, 4.003, 0.226)
pt3dadd(160.933, 128.659, 4.026, 0.226)
pt3dadd(160.974, 128.771, 4.042, 0.226)
pt3dadd(161.014, 128.882, 4.057, 0.226)
pt3dadd(161.054, 128.994, 4.073, 0.226)
pt3dadd(161.094, 129.106, 4.088, 0.226)
pt3dadd(161.135, 129.217, 4.104, 0.226)
pt3dadd(161.174, 129.329, 4.119, 0.226)
pt3dadd(161.215, 129.44, 4.135, 0.226)
pt3dadd(161.255, 129.552, 4.151, 0.226)
pt3dadd(161.296, 129.664, 4.166, 0.226)
pt3dadd(161.339, 129.774, 4.178, 0.23)
pt3dadd(161.387, 129.883, 4.184, 0.244)
pt3dadd(161.435, 129.994, 4.19, 0.258)
pt3dadd(161.483, 130.103, 4.196, 0.272)
pt3dadd(161.531, 130.213, 4.202, 0.286)
pt3dadd(161.579, 130.322, 4.208, 0.3)
pt3dadd(161.627, 130.432, 4.214, 0.314)
pt3dadd(161.675, 130.542, 4.22, 0.328)
pt3dadd(161.723, 130.651, 4.226, 0.342)
pt3dadd(161.771, 130.762, 4.232, 0.356)
pt3dadd(161.818, 130.872, 4.235, 0.384)
pt3dadd(161.86, 130.984, 4.232, 0.436)
pt3dadd(161.903, 131.096, 4.229, 0.488)
pt3dadd(161.945, 131.208, 4.226, 0.54)
pt3dadd(161.987, 131.321, 4.224, 0.592)
pt3dadd(162.03, 131.432, 4.221, 0.646)
pt3dadd(162.072, 131.545, 4.218, 0.698)
pt3dadd(162.115, 131.657, 4.215, 0.75)
pt3dadd(162.157, 131.77, 4.212, 0.802)
pt3dadd(162.199, 131.881, 4.209, 0.854)
pt3dadd(162.241, 131.994, 4.205, 0.866)
pt3dadd(162.283, 132.106, 4.198, 0.808)
pt3dadd(162.325, 132.218, 4.191, 0.75)
pt3dadd(162.366, 132.33, 4.184, 0.692)
pt3dadd(162.408, 132.443, 4.176, 0.634)
pt3dadd(162.449, 132.556, 4.169, 0.576)
pt3dadd(162.491, 132.667, 4.162, 0.518)
pt3dadd(162.533, 132.78, 4.155, 0.46)
pt3dadd(162.574, 132.892, 4.148, 0.402)
pt3dadd(162.616, 133.004, 4.141, 0.344)
pt3dadd(162.665, 133.112, 4.133, 0.31)
pt3dadd(162.731, 133.212, 4.123, 0.318)
pt3dadd(162.796, 133.312, 4.112, 0.324)
pt3dadd(162.86, 133.412, 4.102, 0.332)
pt3dadd(162.925, 133.512, 4.092, 0.338)
pt3dadd(162.991, 133.613, 4.082, 0.346)
pt3dadd(163.056, 133.712, 4.071, 0.352)
pt3dadd(163.121, 133.812, 4.061, 0.36)
pt3dadd(163.186, 133.913, 4.051, 0.366)
pt3dadd(163.252, 134.012, 4.04, 0.374)
pt3dadd(163.324, 134.105, 4.024, 0.382)
pt3dadd(163.408, 134.185, 3.998, 0.388)
pt3dadd(163.492, 134.264, 3.972, 0.396)
pt3dadd(163.574, 134.345, 3.946, 0.404)
pt3dadd(163.658, 134.425, 3.92, 0.412)
pt3dadd(163.742, 134.504, 3.894, 0.418)
pt3dadd(163.826, 134.585, 3.867, 0.426)
pt3dadd(163.91, 134.665, 3.841, 0.434)
pt3dadd(163.993, 134.746, 3.815, 0.442)
pt3dadd(164.077, 134.825, 3.789, 0.45)
pt3dadd(164.166, 134.898, 3.76, 0.45)
pt3dadd(164.257, 134.965, 3.728, 0.444)
pt3dadd(164.348, 135.032, 3.696, 0.44)
pt3dadd(164.44, 135.101, 3.664, 0.436)
pt3dadd(164.531, 135.168, 3.632, 0.432)
pt3dadd(164.623, 135.236, 3.6, 0.426)
pt3dadd(164.714, 135.304, 3.568, 0.422)
pt3dadd(164.806, 135.371, 3.536, 0.418)
pt3dadd(164.897, 135.439, 3.504, 0.414)
pt3dadd(164.988, 135.506, 3.472, 0.408)
pt3dadd(165.079, 135.58, 3.448, 0.396)
pt3dadd(165.169, 135.654, 3.427, 0.38)
pt3dadd(165.259, 135.73, 3.406, 0.364)
pt3dadd(165.35, 135.804, 3.386, 0.348)
pt3dadd(165.44, 135.88, 3.365, 0.332)
pt3dadd(165.53, 135.954, 3.345, 0.316)
pt3dadd(165.622, 136.03, 3.324, 0.3)
pt3dadd(165.712, 136.104, 3.303, 0.284)
pt3dadd(165.802, 136.178, 3.283, 0.268)
pt3dadd(165.892, 136.254, 3.262, 0.252)
pt3dadd(165.977, 136.337, 3.248, 0.264)
pt3dadd(166.06, 136.422, 3.237, 0.29)
pt3dadd(166.142, 136.508, 3.226, 0.316)
pt3dadd(166.225, 136.595, 3.215, 0.342)
pt3dadd(166.307, 136.681, 3.205, 0.366)
pt3dadd(166.39, 136.768, 3.194, 0.392)
pt3dadd(166.472, 136.854, 3.183, 0.418)
pt3dadd(166.554, 136.94, 3.173, 0.444)
pt3dadd(166.637, 137.027, 3.162, 0.47)
pt3dadd(166.72, 137.113, 3.151, 0.496)
pt3dadd(166.793, 137.207, 3.144, 0.516)
pt3dadd(166.861, 137.305, 3.139, 0.534)
pt3dadd(166.931, 137.402, 3.134, 0.552)
pt3dadd(166.999, 137.501, 3.129, 0.57)
pt3dadd(167.069, 137.599, 3.124, 0.586)
pt3dadd(167.137, 137.696, 3.119, 0.604)
pt3dadd(167.207, 137.795, 3.114, 0.622)
pt3dadd(167.275, 137.893, 3.109, 0.64)
pt3dadd(167.345, 137.99, 3.104, 0.656)
pt3dadd(167.413, 138.089, 3.099, 0.674)
pt3dadd(167.468, 138.196, 3.098, 0.676)
pt3dadd(167.519, 138.304, 3.098, 0.672)
pt3dadd(167.57, 138.413, 3.098, 0.668)
pt3dadd(167.621, 138.521, 3.098, 0.666)
pt3dadd(167.671, 138.63, 3.098, 0.662)
pt3dadd(167.723, 138.738, 3.098, 0.658)
pt3dadd(167.773, 138.847, 3.098, 0.654)
pt3dadd(167.824, 138.956, 3.098, 0.652)
pt3dadd(167.875, 139.064, 3.098, 0.648)
pt3dadd(167.926, 139.174, 3.098, 0.644)
pt3dadd(167.969, 139.285, 3.098, 0.628)
pt3dadd(168.008, 139.398, 3.098, 0.61)
pt3dadd(168.049, 139.511, 3.098, 0.59)
pt3dadd(168.09, 139.625, 3.098, 0.572)
pt3dadd(168.131, 139.738, 3.098, 0.552)
pt3dadd(168.172, 139.85, 3.098, 0.534)
pt3dadd(168.211, 139.963, 3.098, 0.514)
pt3dadd(168.252, 140.076, 3.098, 0.496)
pt3dadd(168.293, 140.189, 3.098, 0.476)
pt3dadd(168.334, 140.302, 3.098, 0.458)
pt3dadd(168.397, 140.402, 3.098, 0.466)
pt3dadd(168.467, 140.501, 3.098, 0.484)
pt3dadd(168.536, 140.598, 3.098, 0.502)
pt3dadd(168.606, 140.695, 3.098, 0.52)
pt3dadd(168.676, 140.794, 3.098, 0.536)
pt3dadd(168.745, 140.891, 3.098, 0.554)
pt3dadd(168.815, 140.989, 3.098, 0.572)
pt3dadd(168.886, 141.086, 3.098, 0.588)
pt3dadd(168.955, 141.184, 3.098, 0.606)
pt3dadd(169.025, 141.282, 3.098, 0.624)
pt3dadd(169.104, 141.371, 3.098, 0.632)
pt3dadd(169.187, 141.458, 3.098, 0.636)
pt3dadd(169.268, 141.546, 3.098, 0.642)
pt3dadd(169.351, 141.634, 3.098, 0.646)
pt3dadd(169.433, 141.721, 3.098, 0.652)
pt3dadd(169.516, 141.808, 3.098, 0.656)
pt3dadd(169.598, 141.895, 3.098, 0.662)
pt3dadd(169.68, 141.983, 3.098, 0.666)
pt3dadd(169.763, 142.07, 3.098, 0.672)
pt3dadd(169.844, 142.158, 3.098, 0.678)
pt3dadd(169.94, 142.229, 3.098, 0.666)
pt3dadd(170.039, 142.297, 3.098, 0.654)
pt3dadd(170.137, 142.366, 3.098, 0.64)
pt3dadd(170.237, 142.434, 3.098, 0.626)
pt3dadd(170.335, 142.502, 3.098, 0.614)
pt3dadd(170.434, 142.571, 3.098, 0.6)
pt3dadd(170.532, 142.639, 3.098, 0.588)
pt3dadd(170.63, 142.708, 3.098, 0.574)
pt3dadd(170.73, 142.776, 3.098, 0.56)
pt3dadd(170.828, 142.844, 3.098, 0.548)
pt3dadd(170.94, 142.889, 3.098, 0.516)
pt3dadd(171.05, 142.933, 3.098, 0.482)
pt3dadd(171.162, 142.979, 3.098, 0.45)
pt3dadd(171.274, 143.023, 3.098, 0.418)
pt3dadd(171.385, 143.068, 3.098, 0.386)
pt3dadd(171.497, 143.112, 3.098, 0.354)
pt3dadd(171.608, 143.156, 3.098, 0.322)
pt3dadd(171.719, 143.202, 3.098, 0.29)
pt3dadd(171.83, 143.246, 3.098, 0.258)
pt3dadd(171.942, 143.291, 3.098, 0.226)
}
dend_7[31] {pt3dclear()
pt3dadd(145.516, 113.89, 5.786, 0.226)
pt3dadd(145.435, 113.902, 5.77, 0.292)
pt3dadd(145.319, 113.919, 5.748, 0.386)
pt3dadd(145.204, 113.937, 5.725, 0.48)
pt3dadd(145.088, 113.954, 5.703, 0.574)
pt3dadd(144.972, 113.972, 5.68, 0.668)
pt3dadd(144.96, 114.052, 5.617, 0.678)
pt3dadd(144.96, 114.14, 5.549, 0.678)
pt3dadd(144.96, 114.251, 5.52, 0.678)
pt3dadd(144.96, 114.369, 5.503, 0.678)
pt3dadd(144.953, 114.484, 5.482, 0.678)
pt3dadd(144.91, 114.584, 5.44, 0.678)
pt3dadd(144.862, 114.686, 5.409, 0.678)
pt3dadd(144.805, 114.792, 5.401, 0.678)
pt3dadd(144.737, 114.883, 5.371, 0.678)
pt3dadd(144.668, 114.974, 5.34, 0.678)
pt3dadd(144.599, 115.065, 5.309, 0.678)
pt3dadd(144.53, 115.156, 5.278, 0.678)
}
}
proc shape3d_36() {
dend_7[31] { pt3dadd(144.445, 115.235, 5.257, 0.678)
pt3dadd(144.352, 115.308, 5.242, 0.678)
pt3dadd(144.258, 115.381, 5.228, 0.678)
pt3dadd(144.164, 115.454, 5.213, 0.678)
pt3dadd(144.073, 115.53, 5.199, 0.678)
pt3dadd(144.004, 115.626, 5.184, 0.678)
pt3dadd(143.934, 115.722, 5.169, 0.678)
pt3dadd(143.863, 115.818, 5.155, 0.678)
pt3dadd(143.794, 115.913, 5.14, 0.678)
pt3dadd(143.734, 116.003, 5.104, 0.678)
pt3dadd(143.681, 116.088, 5.047, 0.678)
pt3dadd(143.629, 116.172, 4.991, 0.678)
pt3dadd(143.578, 116.256, 4.934, 0.678)
pt3dadd(143.519, 116.339, 4.881, 0.678)
pt3dadd(143.45, 116.421, 4.835, 0.678)
pt3dadd(143.382, 116.502, 4.789, 0.678)
pt3dadd(143.314, 116.584, 4.743, 0.678)
pt3dadd(143.254, 116.642, 4.682, 0.678)
pt3dadd(143.213, 116.648, 4.588, 0.678)
pt3dadd(143.172, 116.659, 4.497, 0.678)
pt3dadd(143.144, 116.757, 4.444, 0.678)
pt3dadd(143.116, 116.858, 4.4, 0.678)
pt3dadd(143.082, 116.973, 4.4, 0.678)
pt3dadd(143.05, 117.089, 4.4, 0.678)
pt3dadd(143.04, 117.207, 4.4, 0.678)
pt3dadd(143.04, 117.327, 4.4, 0.678)
pt3dadd(143.04, 117.447, 4.4, 0.678)
pt3dadd(143.04, 117.567, 4.4, 0.678)
pt3dadd(143.04, 117.687, 4.4, 0.678)
pt3dadd(143.04, 117.801, 4.373, 0.678)
pt3dadd(143.04, 117.913, 4.336, 0.678)
pt3dadd(143.04, 118.024, 4.299, 0.678)
pt3dadd(143.04, 118.135, 4.262, 0.678)
pt3dadd(143.04, 118.247, 4.224, 0.678)
pt3dadd(143.04, 118.361, 4.2, 0.678)
pt3dadd(143.04, 118.481, 4.2, 0.678)
pt3dadd(143.04, 118.601, 4.2, 0.678)
pt3dadd(143.04, 118.717, 4.185, 0.678)
pt3dadd(143.04, 118.824, 4.14, 0.678)
pt3dadd(143.033, 118.927, 4.094, 0.678)
pt3dadd(142.963, 118.997, 4.036, 0.678)
pt3dadd(142.897, 119.079, 4, 0.678)
pt3dadd(142.836, 119.182, 4, 0.678)
pt3dadd(142.778, 119.287, 4, 0.678)
pt3dadd(142.735, 119.399, 4, 0.678)
pt3dadd(142.684, 119.507, 4, 0.678)
pt3dadd(142.627, 119.613, 4, 0.678)
pt3dadd(142.571, 119.719, 4, 0.678)
pt3dadd(142.513, 119.825, 4, 0.678)
pt3dadd(142.457, 119.93, 4, 0.678)
pt3dadd(142.388, 120.028, 4, 0.678)
pt3dadd(142.307, 120.115, 4, 0.678)
pt3dadd(142.244, 120.212, 3.995, 0.678)
pt3dadd(142.222, 120.329, 3.98, 0.678)
pt3dadd(142.199, 120.444, 3.963, 0.678)
pt3dadd(142.178, 120.521, 3.888, 0.678)
pt3dadd(142.154, 120.594, 3.812, 0.678)
pt3dadd(142.111, 120.653, 3.733, 0.678)
pt3dadd(142.069, 120.727, 3.671, 0.678)
pt3dadd(142.034, 120.839, 3.648, 0.678)
pt3dadd(142, 120.95, 3.626, 0.678)
pt3dadd(141.966, 121.062, 3.603, 0.678)
pt3dadd(141.96, 121.177, 3.577, 0.678)
pt3dadd(141.96, 121.292, 3.549, 0.678)
pt3dadd(141.953, 121.406, 3.52, 0.678)
pt3dadd(141.912, 121.514, 3.494, 0.678)
pt3dadd(141.862, 121.619, 3.47, 0.678)
pt3dadd(141.812, 121.724, 3.445, 0.678)
pt3dadd(141.762, 121.83, 3.421, 0.678)
pt3dadd(141.714, 121.936, 3.4, 0.678)
pt3dadd(141.672, 122.048, 3.4, 0.678)
pt3dadd(141.631, 122.161, 3.4, 0.678)
pt3dadd(141.589, 122.274, 3.4, 0.678)
pt3dadd(141.547, 122.387, 3.4, 0.678)
pt3dadd(141.506, 122.498, 3.4, 0.678)
pt3dadd(141.473, 122.609, 3.375, 0.678)
pt3dadd(141.445, 122.717, 3.339, 0.678)
pt3dadd(141.416, 122.825, 3.304, 0.678)
pt3dadd(141.388, 122.934, 3.268, 0.678)
pt3dadd(141.359, 123.042, 3.233, 0.678)
pt3dadd(141.325, 123.151, 3.202, 0.678)
pt3dadd(141.29, 123.26, 3.171, 0.678)
pt3dadd(141.257, 123.368, 3.14, 0.678)
pt3dadd(141.222, 123.478, 3.109, 0.678)
pt3dadd(141.196, 123.589, 3.083, 0.678)
pt3dadd(141.181, 123.707, 3.067, 0.678)
pt3dadd(141.167, 123.824, 3.051, 0.678)
pt3dadd(141.151, 123.942, 3.035, 0.678)
pt3dadd(141.137, 124.06, 3.019, 0.678)
pt3dadd(141.122, 124.177, 3.003, 0.678)
pt3dadd(141.124, 124.297, 3, 0.678)
pt3dadd(141.128, 124.417, 3, 0.678)
pt3dadd(141.133, 124.537, 3, 0.678)
pt3dadd(141.187, 124.633, 3.034, 0.678)
pt3dadd(141.246, 124.729, 3.067, 0.678)
pt3dadd(141.308, 124.831, 3.067, 0.678)
pt3dadd(141.35, 124.936, 3.048, 0.678)
pt3dadd(141.36, 125.04, 3, 0.678)
}
dend_7[32] {pt3dclear()
pt3dadd(140.518, 100.949, 10.186, 1.276)
pt3dadd(140.52, 100.903, 10.154, 1.23)
pt3dadd(140.533, 100.787, 10.129, 1.118)
pt3dadd(140.546, 100.67, 10.104, 1.006)
pt3dadd(140.561, 100.554, 10.079, 0.894)
pt3dadd(140.575, 100.437, 10.054, 0.782)
pt3dadd(140.588, 100.32, 10.029, 0.67)
pt3dadd(140.603, 100.204, 10.003, 0.558)
pt3dadd(140.616, 100.087, 9.978, 0.452)
pt3dadd(140.614, 99.97, 9.952, 0.452)
pt3dadd(140.611, 99.852, 9.927, 0.452)
pt3dadd(140.626, 99.741, 9.892, 0.452)
pt3dadd(140.674, 99.643, 9.843, 0.452)
pt3dadd(140.747, 99.562, 9.814, 0.452)
pt3dadd(140.846, 99.5, 9.806, 0.452)
pt3dadd(140.951, 99.455, 9.805, 0.452)
pt3dadd(141.061, 99.434, 9.817, 0.452)
pt3dadd(141.173, 99.413, 9.828, 0.452)
pt3dadd(141.284, 99.392, 9.839, 0.452)
pt3dadd(141.401, 99.389, 9.84, 0.452)
pt3dadd(141.516, 99.39, 9.839, 0.452)
pt3dadd(141.631, 99.388, 9.841, 0.452)
pt3dadd(141.73, 99.347, 9.867, 0.452)
pt3dadd(141.829, 99.305, 9.894, 0.452)
pt3dadd(141.91, 99.285, 9.944, 0.452)
pt3dadd(141.977, 99.281, 10.011, 0.452)
pt3dadd(142.064, 99.279, 10.06, 0.452)
pt3dadd(142.169, 99.28, 10.091, 0.452)
pt3dadd(142.274, 99.282, 10.122, 0.452)
pt3dadd(142.382, 99.293, 10.146, 0.452)
pt3dadd(142.49, 99.313, 10.164, 0.452)
pt3dadd(142.598, 99.348, 10.169, 0.452)
pt3dadd(142.708, 99.373, 10.175, 0.452)
pt3dadd(142.82, 99.382, 10.191, 0.452)
pt3dadd(142.931, 99.391, 10.206, 0.452)
pt3dadd(143.044, 99.4, 10.222, 0.452)
pt3dadd(143.155, 99.408, 10.237, 0.452)
pt3dadd(143.269, 99.408, 10.246, 0.452)
pt3dadd(143.384, 99.389, 10.241, 0.452)
pt3dadd(143.498, 99.369, 10.235, 0.452)
pt3dadd(143.614, 99.349, 10.229, 0.452)
pt3dadd(143.729, 99.329, 10.224, 0.452)
pt3dadd(143.844, 99.31, 10.218, 0.452)
pt3dadd(143.959, 99.304, 10.207, 0.452)
pt3dadd(144.077, 99.305, 10.194, 0.452)
pt3dadd(144.194, 99.306, 10.18, 0.452)
pt3dadd(144.312, 99.308, 10.167, 0.452)
pt3dadd(144.43, 99.309, 10.154, 0.452)
pt3dadd(144.546, 99.311, 10.14, 0.452)
pt3dadd(144.664, 99.312, 10.127, 0.452)
pt3dadd(144.779, 99.294, 10.105, 0.452)
pt3dadd(144.892, 99.265, 10.079, 0.452)
pt3dadd(145.004, 99.236, 10.052, 0.452)
pt3dadd(145.115, 99.207, 10.026, 0.452)
pt3dadd(145.228, 99.177, 10, 0.452)
pt3dadd(145.342, 99.155, 9.985, 0.452)
pt3dadd(145.457, 99.14, 9.984, 0.452)
pt3dadd(145.572, 99.126, 9.984, 0.452)
pt3dadd(145.687, 99.112, 9.984, 0.452)
pt3dadd(145.802, 99.097, 9.983, 0.452)
pt3dadd(145.916, 99.077, 9.985, 0.452)
pt3dadd(146.027, 99.047, 9.992, 0.452)
pt3dadd(146.136, 99.016, 9.999, 0.452)
pt3dadd(146.248, 98.985, 10.005, 0.452)
pt3dadd(146.358, 98.954, 10.012, 0.452)
pt3dadd(146.471, 98.931, 10.012, 0.452)
pt3dadd(146.586, 98.92, 10, 0.452)
pt3dadd(146.704, 98.908, 9.988, 0.452)
pt3dadd(146.82, 98.897, 9.977, 0.452)
pt3dadd(146.938, 98.885, 9.965, 0.452)
pt3dadd(147.054, 98.874, 9.953, 0.452)
pt3dadd(147.169, 98.866, 9.944, 0.452)
pt3dadd(147.283, 98.883, 9.954, 0.452)
pt3dadd(147.396, 98.899, 9.963, 0.452)
pt3dadd(147.509, 98.916, 9.973, 0.452)
pt3dadd(147.623, 98.933, 9.983, 0.452)
pt3dadd(147.734, 98.949, 9.992, 0.452)
pt3dadd(147.85, 98.971, 9.993, 0.452)
pt3dadd(147.964, 98.995, 9.992, 0.452)
pt3dadd(148.079, 99.018, 9.99, 0.452)
pt3dadd(148.192, 99.042, 9.989, 0.452)
pt3dadd(148.307, 99.065, 9.988, 0.452)
pt3dadd(148.422, 99.083, 9.988, 0.452)
pt3dadd(148.537, 99.091, 9.992, 0.452)
pt3dadd(148.652, 99.1, 9.996, 0.452)
pt3dadd(148.768, 99.108, 10, 0.452)
pt3dadd(148.883, 99.116, 10.004, 0.452)
pt3dadd(148.998, 99.125, 10.008, 0.452)
pt3dadd(149.116, 99.129, 10.001, 0.452)
pt3dadd(149.232, 99.13, 9.988, 0.452)
pt3dadd(149.35, 99.132, 9.974, 0.452)
pt3dadd(149.467, 99.133, 9.961, 0.452)
pt3dadd(149.585, 99.135, 9.947, 0.452)
pt3dadd(149.702, 99.136, 9.934, 0.452)
pt3dadd(149.819, 99.137, 9.92, 0.452)
pt3dadd(149.935, 99.139, 9.917, 0.452)
pt3dadd(150.052, 99.14, 9.92, 0.452)
pt3dadd(150.167, 99.142, 9.923, 0.452)
pt3dadd(150.283, 99.143, 9.926, 0.452)
pt3dadd(150.398, 99.145, 9.929, 0.452)
pt3dadd(150.514, 99.146, 9.932, 0.452)
pt3dadd(150.63, 99.146, 9.929, 0.452)
}
}
proc shape3d_37() {
dend_7[32] { pt3dadd(150.748, 99.146, 9.92, 0.452)
pt3dadd(150.864, 99.145, 9.912, 0.452)
pt3dadd(150.982, 99.145, 9.904, 0.452)
pt3dadd(151.099, 99.144, 9.895, 0.452)
pt3dadd(151.217, 99.144, 9.887, 0.452)
pt3dadd(151.334, 99.143, 9.878, 0.452)
pt3dadd(151.448, 99.126, 9.877, 0.452)
pt3dadd(151.564, 99.108, 9.875, 0.452)
pt3dadd(151.679, 99.091, 9.874, 0.452)
pt3dadd(151.794, 99.073, 9.872, 0.452)
pt3dadd(151.909, 99.055, 9.871, 0.452)
pt3dadd(152.022, 99.037, 9.857, 0.452)
pt3dadd(152.136, 99.018, 9.825, 0.452)
pt3dadd(152.249, 98.999, 9.792, 0.452)
pt3dadd(152.363, 98.981, 9.76, 0.452)
pt3dadd(152.476, 98.962, 9.727, 0.452)
pt3dadd(152.588, 98.941, 9.697, 0.452)
pt3dadd(152.699, 98.901, 9.678, 0.452)
pt3dadd(152.809, 98.86, 9.66, 0.452)
pt3dadd(152.888, 98.838, 9.581, 0.452)
pt3dadd(152.96, 98.819, 9.492, 0.452)
pt3dadd(153.072, 98.803, 9.456, 0.452)
pt3dadd(153.186, 98.787, 9.423, 0.452)
pt3dadd(153.299, 98.76, 9.406, 0.452)
pt3dadd(153.41, 98.727, 9.397, 0.452)
pt3dadd(153.522, 98.705, 9.399, 0.452)
pt3dadd(153.631, 98.707, 9.421, 0.452)
pt3dadd(153.746, 98.708, 9.42, 0.452)
pt3dadd(153.864, 98.709, 9.411, 0.452)
pt3dadd(153.98, 98.711, 9.403, 0.452)
pt3dadd(154.098, 98.712, 9.394, 0.452)
pt3dadd(154.216, 98.714, 9.386, 0.452)
pt3dadd(154.333, 98.715, 9.377, 0.452)
pt3dadd(154.451, 98.717, 9.366, 0.452)
pt3dadd(154.564, 98.718, 9.332, 0.452)
pt3dadd(154.679, 98.72, 9.298, 0.452)
pt3dadd(154.794, 98.721, 9.264, 0.452)
pt3dadd(154.909, 98.722, 9.23, 0.452)
pt3dadd(155.023, 98.724, 9.195, 0.452)
pt3dadd(155.137, 98.718, 9.162, 0.452)
pt3dadd(155.246, 98.682, 9.133, 0.452)
pt3dadd(155.357, 98.646, 9.104, 0.452)
pt3dadd(155.467, 98.61, 9.075, 0.452)
pt3dadd(155.575, 98.574, 9.046, 0.452)
pt3dadd(155.686, 98.54, 9.025, 0.452)
pt3dadd(155.797, 98.515, 9.033, 0.452)
pt3dadd(155.909, 98.49, 9.042, 0.452)
pt3dadd(156.02, 98.465, 9.051, 0.452)
pt3dadd(156.131, 98.44, 9.059, 0.452)
pt3dadd(156.239, 98.416, 9.075, 0.452)
pt3dadd(156.326, 98.397, 9.125, 0.452)
pt3dadd(156.413, 98.383, 9.178, 0.452)
pt3dadd(156.49, 98.384, 9.238, 0.452)
pt3dadd(156.574, 98.38, 9.288, 0.452)
pt3dadd(156.684, 98.34, 9.28, 0.452)
pt3dadd(156.793, 98.3, 9.271, 0.452)
pt3dadd(156.882, 98.224, 9.258, 0.452)
pt3dadd(156.967, 98.144, 9.245, 0.452)
pt3dadd(157.066, 98.082, 9.238, 0.452)
pt3dadd(157.164, 98.029, 9.245, 0.452)
pt3dadd(157.258, 97.978, 9.274, 0.452)
pt3dadd(157.35, 97.922, 9.293, 0.452)
pt3dadd(157.446, 97.86, 9.303, 0.452)
pt3dadd(157.531, 97.791, 9.322, 0.452)
pt3dadd(157.612, 97.718, 9.346, 0.452)
pt3dadd(157.685, 97.638, 9.305, 0.452)
pt3dadd(157.758, 97.558, 9.257, 0.452)
pt3dadd(157.849, 97.484, 9.248, 0.452)
pt3dadd(157.939, 97.41, 9.238, 0.452)
pt3dadd(158.027, 97.337, 9.234, 0.452)
pt3dadd(158.068, 97.28, 9.3, 0.452)
pt3dadd(158.123, 97.221, 9.346, 0.452)
pt3dadd(158.22, 97.156, 9.337, 0.452)
pt3dadd(158.317, 97.091, 9.327, 0.452)
pt3dadd(158.418, 97.032, 9.316, 0.452)
pt3dadd(158.522, 96.98, 9.303, 0.452)
pt3dadd(158.627, 96.928, 9.289, 0.452)
pt3dadd(158.729, 96.871, 9.284, 0.452)
pt3dadd(158.827, 96.812, 9.287, 0.452)
pt3dadd(158.927, 96.753, 9.29, 0.452)
pt3dadd(159.025, 96.693, 9.294, 0.452)
pt3dadd(159.124, 96.634, 9.297, 0.452)
pt3dadd(159.232, 96.599, 9.308, 0.452)
pt3dadd(159.34, 96.567, 9.32, 0.452)
pt3dadd(159.448, 96.535, 9.332, 0.452)
pt3dadd(159.557, 96.503, 9.344, 0.452)
pt3dadd(159.665, 96.471, 9.356, 0.452)
pt3dadd(159.772, 96.43, 9.363, 0.452)
pt3dadd(159.88, 96.389, 9.371, 0.452)
pt3dadd(159.985, 96.349, 9.379, 0.452)
pt3dadd(160.092, 96.308, 9.386, 0.452)
pt3dadd(160.199, 96.267, 9.394, 0.452)
pt3dadd(160.306, 96.226, 9.401, 0.452)
pt3dadd(160.414, 96.186, 9.409, 0.452)
pt3dadd(160.519, 96.145, 9.417, 0.452)
pt3dadd(160.626, 96.104, 9.424, 0.452)
pt3dadd(160.736, 96.067, 9.42, 0.452)
pt3dadd(160.848, 96.033, 9.406, 0.452)
pt3dadd(160.844, 96.034, 9.393, 0.452)
pt3dadd(160.957, 96, 9.379, 0.452)
pt3dadd(161.069, 95.966, 9.366, 0.452)
pt3dadd(161.182, 95.932, 9.352, 0.452)
pt3dadd(161.293, 95.898, 9.339, 0.452)
pt3dadd(161.41, 95.886, 9.325, 0.452)
pt3dadd(161.526, 95.875, 9.312, 0.452)
pt3dadd(161.642, 95.864, 9.298, 0.452)
pt3dadd(161.76, 95.852, 9.285, 0.452)
pt3dadd(161.875, 95.841, 9.272, 0.452)
pt3dadd(161.993, 95.83, 9.258, 0.452)
pt3dadd(162.109, 95.827, 9.234, 0.452)
pt3dadd(162.224, 95.828, 9.205, 0.452)
pt3dadd(162.341, 95.829, 9.175, 0.452)
pt3dadd(162.456, 95.831, 9.145, 0.452)
pt3dadd(162.571, 95.832, 9.115, 0.452)
pt3dadd(162.688, 95.834, 9.085, 0.452)
pt3dadd(162.804, 95.835, 9.061, 0.452)
pt3dadd(162.922, 95.837, 9.043, 0.452)
pt3dadd(163.038, 95.838, 9.024, 0.452)
pt3dadd(163.156, 95.84, 9.006, 0.452)
pt3dadd(163.273, 95.841, 8.987, 0.452)
pt3dadd(163.391, 95.843, 8.969, 0.452)
pt3dadd(163.506, 95.844, 8.95, 0.452)
pt3dadd(163.622, 95.845, 8.952, 0.452)
pt3dadd(163.738, 95.847, 8.957, 0.452)
pt3dadd(163.854, 95.848, 8.962, 0.452)
pt3dadd(163.969, 95.85, 8.966, 0.452)
pt3dadd(164.083, 95.851, 8.971, 0.452)
pt3dadd(164.198, 95.876, 8.948, 0.452)
pt3dadd(164.314, 95.9, 8.925, 0.452)
pt3dadd(164.428, 95.924, 8.902, 0.452)
pt3dadd(164.542, 95.949, 8.879, 0.452)
pt3dadd(164.657, 95.956, 8.859, 0.452)
pt3dadd(164.771, 95.929, 8.843, 0.452)
pt3dadd(164.885, 95.903, 8.828, 0.452)
pt3dadd(164.999, 95.877, 8.812, 0.452)
pt3dadd(165.113, 95.85, 8.797, 0.452)
pt3dadd(165.227, 95.824, 8.782, 0.452)
pt3dadd(165.34, 95.794, 8.767, 0.452)
pt3dadd(165.452, 95.762, 8.754, 0.452)
pt3dadd(165.566, 95.731, 8.741, 0.452)
pt3dadd(165.678, 95.699, 8.727, 0.452)
pt3dadd(165.791, 95.667, 8.714, 0.452)
pt3dadd(165.904, 95.636, 8.7, 0.452)
pt3dadd(166.019, 95.636, 8.702, 0.452)
pt3dadd(166.134, 95.637, 8.705, 0.452)
pt3dadd(166.25, 95.639, 8.708, 0.452)
pt3dadd(166.366, 95.64, 8.711, 0.452)
pt3dadd(166.482, 95.642, 8.714, 0.452)
pt3dadd(166.598, 95.643, 8.717, 0.452)
pt3dadd(166.715, 95.644, 8.706, 0.452)
pt3dadd(166.832, 95.646, 8.692, 0.452)
pt3dadd(166.95, 95.647, 8.679, 0.452)
pt3dadd(167.068, 95.649, 8.665, 0.452)
pt3dadd(167.185, 95.65, 8.652, 0.452)
pt3dadd(167.302, 95.652, 8.639, 0.452)
pt3dadd(167.419, 95.653, 8.625, 0.452)
pt3dadd(167.536, 95.666, 8.612, 0.452)
pt3dadd(167.652, 95.68, 8.598, 0.452)
pt3dadd(167.768, 95.694, 8.585, 0.452)
pt3dadd(167.885, 95.708, 8.571, 0.452)
pt3dadd(168.002, 95.722, 8.558, 0.452)
pt3dadd(168.119, 95.736, 8.544, 0.452)
pt3dadd(168.236, 95.751, 8.533, 0.452)
pt3dadd(168.352, 95.768, 8.524, 0.452)
pt3dadd(168.468, 95.785, 8.515, 0.452)
pt3dadd(168.578, 95.788, 8.532, 0.452)
pt3dadd(168.69, 95.789, 8.552, 0.452)
pt3dadd(168.803, 95.79, 8.552, 0.452)
pt3dadd(168.92, 95.792, 8.539, 0.452)
pt3dadd(169.038, 95.793, 8.525, 0.452)
pt3dadd(169.126, 95.795, 8.454, 0.452)
pt3dadd(169.205, 95.796, 8.367, 0.452)
pt3dadd(169.302, 95.79, 8.304, 0.452)
pt3dadd(169.411, 95.781, 8.254, 0.452)
pt3dadd(169.519, 95.771, 8.204, 0.452)
pt3dadd(169.628, 95.76, 8.157, 0.452)
pt3dadd(169.739, 95.724, 8.159, 0.452)
pt3dadd(169.847, 95.688, 8.161, 0.452)
pt3dadd(169.952, 95.686, 8.19, 0.452)
pt3dadd(170.057, 95.688, 8.222, 0.452)
pt3dadd(170.162, 95.689, 8.253, 0.452)
pt3dadd(170.276, 95.686, 8.254, 0.452)
pt3dadd(170.393, 95.682, 8.253, 0.452)
pt3dadd(170.504, 95.658, 8.248, 0.452)
pt3dadd(170.605, 95.599, 8.234, 0.452)
pt3dadd(170.704, 95.536, 8.221, 0.452)
pt3dadd(170.788, 95.455, 8.207, 0.452)
pt3dadd(170.874, 95.376, 8.194, 0.452)
pt3dadd(170.978, 95.325, 8.181, 0.452)
pt3dadd(171.066, 95.25, 8.167, 0.452)
pt3dadd(171.138, 95.158, 8.154, 0.452)
pt3dadd(171.206, 95.063, 8.14, 0.452)
pt3dadd(171.272, 94.966, 8.127, 0.452)
pt3dadd(171.347, 94.878, 8.112, 0.452)
pt3dadd(171.445, 94.816, 8.093, 0.452)
pt3dadd(171.545, 94.76, 8.069, 0.452)
pt3dadd(171.649, 94.735, 8.016, 0.452)
pt3dadd(171.752, 94.705, 7.964, 0.452)
pt3dadd(171.848, 94.652, 7.915, 0.452)
pt3dadd(171.964, 94.642, 7.889, 0.452)
}
}
proc shape3d_38() {
dend_7[32] { pt3dadd(172.079, 94.634, 7.864, 0.452)
pt3dadd(172.195, 94.627, 7.839, 0.452)
pt3dadd(172.312, 94.619, 7.814, 0.452)
pt3dadd(172.428, 94.612, 7.79, 0.452)
pt3dadd(172.543, 94.604, 7.765, 0.452)
pt3dadd(172.656, 94.573, 7.752, 0.452)
pt3dadd(172.769, 94.541, 7.738, 0.452)
pt3dadd(172.885, 94.528, 7.725, 0.452)
pt3dadd(173.003, 94.53, 7.711, 0.452)
pt3dadd(173.119, 94.531, 7.698, 0.452)
pt3dadd(173.233, 94.553, 7.681, 0.452)
pt3dadd(173.346, 94.589, 7.663, 0.452)
pt3dadd(173.45, 94.633, 7.635, 0.452)
pt3dadd(173.531, 94.703, 7.577, 0.452)
pt3dadd(173.626, 94.75, 7.554, 0.452)
pt3dadd(173.737, 94.775, 7.567, 0.452)
pt3dadd(173.848, 94.8, 7.58, 0.452)
pt3dadd(173.959, 94.826, 7.592, 0.452)
pt3dadd(174.066, 94.866, 7.6, 0.452)
pt3dadd(174.173, 94.906, 7.61, 0.452)
pt3dadd(174.259, 94.907, 7.652, 0.452)
pt3dadd(174.377, 94.909, 7.645, 0.452)
pt3dadd(174.493, 94.91, 7.639, 0.452)
pt3dadd(174.61, 94.911, 7.633, 0.452)
pt3dadd(174.727, 94.913, 7.626, 0.452)
pt3dadd(174.835, 94.931, 7.643, 0.452)
pt3dadd(174.937, 94.959, 7.673, 0.452)
pt3dadd(175.038, 94.986, 7.704, 0.452)
pt3dadd(175.14, 95.014, 7.734, 0.452)
pt3dadd(175.243, 95.04, 7.763, 0.452)
pt3dadd(175.356, 95.034, 7.776, 0.452)
pt3dadd(175.47, 95.028, 7.789, 0.452)
pt3dadd(175.582, 95.022, 7.803, 0.452)
pt3dadd(175.694, 95.016, 7.816, 0.452)
pt3dadd(175.807, 95.011, 7.829, 0.452)
pt3dadd(175.895, 94.981, 7.868, 0.452)
pt3dadd(175.967, 94.937, 7.924, 0.452)
pt3dadd(176.069, 94.932, 7.953, 0.452)
pt3dadd(176.177, 94.933, 7.979, 0.452)
pt3dadd(176.287, 94.915, 7.985, 0.452)
pt3dadd(176.4, 94.882, 7.976, 0.452)
pt3dadd(176.513, 94.857, 7.967, 0.452)
pt3dadd(176.63, 94.859, 7.953, 0.452)
pt3dadd(176.748, 94.86, 7.94, 0.452)
pt3dadd(176.85, 94.908, 7.903, 0.452)
pt3dadd(176.96, 94.932, 7.873, 0.452)
pt3dadd(177.077, 94.935, 7.849, 0.452)
pt3dadd(177.193, 94.939, 7.825, 0.452)
pt3dadd(177.311, 94.942, 7.801, 0.452)
pt3dadd(177.427, 94.946, 7.777, 0.452)
pt3dadd(177.544, 94.949, 7.752, 0.452)
pt3dadd(177.659, 94.944, 7.739, 0.452)
pt3dadd(177.772, 94.922, 7.745, 0.452)
pt3dadd(177.884, 94.901, 7.75, 0.452)
pt3dadd(177.997, 94.879, 7.756, 0.452)
pt3dadd(178.11, 94.857, 7.762, 0.452)
pt3dadd(178.224, 94.839, 7.765, 0.452)
pt3dadd(178.342, 94.841, 7.751, 0.452)
pt3dadd(178.459, 94.842, 7.738, 0.452)
pt3dadd(178.577, 94.844, 7.724, 0.452)
pt3dadd(178.693, 94.845, 7.711, 0.452)
pt3dadd(178.811, 94.846, 7.697, 0.452)
pt3dadd(178.927, 94.846, 7.684, 0.452)
pt3dadd(179.045, 94.832, 7.67, 0.452)
pt3dadd(179.16, 94.819, 7.657, 0.452)
pt3dadd(179.26, 94.792, 7.614, 0.452)
pt3dadd(179.339, 94.748, 7.539, 0.452)
pt3dadd(179.411, 94.735, 7.45, 0.452)
pt3dadd(179.479, 94.737, 7.356, 0.452)
pt3dadd(179.546, 94.738, 7.262, 0.452)
pt3dadd(179.621, 94.739, 7.176, 0.452)
pt3dadd(179.738, 94.736, 7.163, 0.452)
pt3dadd(179.855, 94.733, 7.149, 0.452)
pt3dadd(179.972, 94.724, 7.136, 0.452)
pt3dadd(180.084, 94.692, 7.122, 0.452)
pt3dadd(180.197, 94.661, 7.109, 0.452)
pt3dadd(180.31, 94.629, 7.095, 0.452)
pt3dadd(180.422, 94.597, 7.082, 0.452)
pt3dadd(180.534, 94.566, 7.068, 0.452)
pt3dadd(180.647, 94.534, 7.055, 0.452)
pt3dadd(180.755, 94.49, 7.037, 0.452)
pt3dadd(180.862, 94.441, 7.016, 0.452)
pt3dadd(180.968, 94.392, 6.996, 0.452)
pt3dadd(181.073, 94.343, 6.976, 0.452)
pt3dadd(181.18, 94.294, 6.956, 0.452)
pt3dadd(181.29, 94.26, 6.932, 0.452)
pt3dadd(181.403, 94.23, 6.905, 0.452)
pt3dadd(181.514, 94.201, 6.879, 0.452)
pt3dadd(181.627, 94.172, 6.853, 0.452)
pt3dadd(181.739, 94.143, 6.827, 0.452)
pt3dadd(181.852, 94.134, 6.793, 0.452)
pt3dadd(181.963, 94.147, 6.751, 0.452)
pt3dadd(182.075, 94.16, 6.708, 0.452)
pt3dadd(182.186, 94.173, 6.666, 0.452)
pt3dadd(182.184, 94.174, 6.653, 0.452)
}
dend_7[33] {pt3dclear()
pt3dadd(182.184, 94.174, 6.653, 0.452)
pt3dadd(181.868, 94.725, 6.895, 0.226)
pt3dadd(181.966, 94.658, 6.908, 0.226)
pt3dadd(182.008, 94.543, 6.922, 0.24)
pt3dadd(182.028, 94.424, 6.928, 0.302)
pt3dadd(182.042, 94.307, 6.918, 0.434)
pt3dadd(182.059, 94.212, 6.872, 0.598)
pt3dadd(182.1, 94.153, 6.806, 0.674)
}
dend_7[34] {pt3dclear()
pt3dadd(182.184, 94.174, 6.653, 0.452)
pt3dadd(182.156, 94.144, 6.733, 0.678)
}
dend_7[35] {pt3dclear()
pt3dadd(182.184, 94.174, 6.653, 0.452)
pt3dadd(182.182, 94.176, 6.639, 0.66)
pt3dadd(182.196, 94.237, 6.542, 0.576)
pt3dadd(182.194, 94.239, 6.528, 0.576)
pt3dadd(182.191, 94.24, 6.515, 0.576)
pt3dadd(182.251, 94.315, 6.448, 0.432)
pt3dadd(182.248, 94.316, 6.434, 0.432)
pt3dadd(182.316, 94.379, 6.358, 0.4)
pt3dadd(182.383, 94.443, 6.283, 0.386)
pt3dadd(182.45, 94.514, 6.212, 0.43)
pt3dadd(182.532, 94.582, 6.168, 0.548)
pt3dadd(182.606, 94.659, 6.119, 0.648)
pt3dadd(182.671, 94.74, 6.056, 0.71)
pt3dadd(182.736, 94.822, 5.993, 0.772)
pt3dadd(182.801, 94.903, 5.931, 0.832)
pt3dadd(182.875, 94.98, 5.874, 0.886)
pt3dadd(182.956, 95.054, 5.821, 0.934)
pt3dadd(183.035, 95.128, 5.767, 0.982)
pt3dadd(183.114, 95.203, 5.714, 1.03)
pt3dadd(183.202, 95.274, 5.677, 1.068)
pt3dadd(183.299, 95.343, 5.656, 1.092)
pt3dadd(183.395, 95.412, 5.636, 1.118)
pt3dadd(183.491, 95.481, 5.616, 1.144)
pt3dadd(183.588, 95.55, 5.596, 1.168)
pt3dadd(183.66, 95.638, 5.567, 1.18)
pt3dadd(183.713, 95.742, 5.531, 1.18)
pt3dadd(183.766, 95.847, 5.495, 1.18)
pt3dadd(183.82, 95.951, 5.459, 1.18)
pt3dadd(183.876, 96.053, 5.425, 1.18)
pt3dadd(183.958, 96.139, 5.404, 1.18)
pt3dadd(184.038, 96.226, 5.384, 1.18)
pt3dadd(184.12, 96.312, 5.363, 1.18)
pt3dadd(184.202, 96.399, 5.343, 1.18)
pt3dadd(184.294, 96.471, 5.32, 1.18)
pt3dadd(184.4, 96.517, 5.294, 1.18)
pt3dadd(184.508, 96.564, 5.267, 1.18)
pt3dadd(184.615, 96.611, 5.241, 1.18)
pt3dadd(184.722, 96.658, 5.214, 1.18)
pt3dadd(184.828, 96.709, 5.191, 1.182)
pt3dadd(184.926, 96.775, 5.177, 1.192)
pt3dadd(185.024, 96.841, 5.164, 1.202)
pt3dadd(185.123, 96.908, 5.15, 1.212)
pt3dadd(185.221, 96.974, 5.137, 1.22)
pt3dadd(185.32, 97.04, 5.123, 1.23)
pt3dadd(185.412, 97.112, 5.096, 1.23)
pt3dadd(185.506, 97.183, 5.068, 1.23)
pt3dadd(185.599, 97.255, 5.04, 1.23)
pt3dadd(185.693, 97.327, 5.012, 1.23)
pt3dadd(185.782, 97.402, 4.987, 1.23)
pt3dadd(185.866, 97.486, 4.967, 1.23)
pt3dadd(185.951, 97.57, 4.946, 1.23)
pt3dadd(186.035, 97.653, 4.926, 1.23)
pt3dadd(186.119, 97.737, 4.905, 1.23)
pt3dadd(186.116, 97.739, 4.892, 1.23)
pt3dadd(186.114, 97.74, 4.878, 1.23)
pt3dadd(186.216, 97.787, 4.854, 1.22)
pt3dadd(186.331, 97.806, 4.828, 1.2)
pt3dadd(186.446, 97.825, 4.802, 1.18)
pt3dadd(186.539, 97.879, 4.747, 1.18)
pt3dadd(186.625, 97.939, 4.69, 1.18)
pt3dadd(186.664, 98.035, 4.627, 1.18)
pt3dadd(186.703, 98.126, 4.557, 1.18)
pt3dadd(186.738, 98.207, 4.475, 1.18)
pt3dadd(186.798, 98.267, 4.397, 1.17)
pt3dadd(186.878, 98.313, 4.321, 1.154)
pt3dadd(186.959, 98.358, 4.246, 1.138)
pt3dadd(187.04, 98.389, 4.166, 1.118)
pt3dadd(187.121, 98.405, 4.082, 1.092)
pt3dadd(187.194, 98.461, 4.023, 1.08)
pt3dadd(187.26, 98.558, 3.992, 1.08)
pt3dadd(187.326, 98.656, 3.961, 1.08)
pt3dadd(187.412, 98.737, 3.946, 1.08)
pt3dadd(187.501, 98.816, 3.933, 1.08)
pt3dadd(187.568, 98.914, 3.919, 1.026)
pt3dadd(187.607, 99.026, 3.889, 0.964)
pt3dadd(187.648, 99.136, 3.858, 0.902)
pt3dadd(187.645, 99.138, 3.845, 0.902)
pt3dadd(187.642, 99.139, 3.831, 0.902)
pt3dadd(187.747, 99.178, 3.785, 0.854)
pt3dadd(187.852, 99.216, 3.739, 0.804)
pt3dadd(187.968, 99.231, 3.725, 0.788)
pt3dadd(188.084, 99.245, 3.712, 0.77)
pt3dadd(188.201, 99.259, 3.698, 0.754)
pt3dadd(188.317, 99.273, 3.685, 0.754)
pt3dadd(188.435, 99.287, 3.671, 0.754)
pt3dadd(188.551, 99.301, 3.658, 0.754)
pt3dadd(188.668, 99.315, 3.644, 0.742)
pt3dadd(188.784, 99.329, 3.631, 0.728)
pt3dadd(188.9, 99.343, 3.617, 0.724)
pt3dadd(189.018, 99.357, 3.604, 0.722)
pt3dadd(189.134, 99.371, 3.59, 0.718)
pt3dadd(189.251, 99.385, 3.577, 0.714)
pt3dadd(189.367, 99.399, 3.564, 0.71)
pt3dadd(189.485, 99.413, 3.55, 0.706)
pt3dadd(189.601, 99.427, 3.537, 0.704)
}
}
proc shape3d_39() {
dend_7[35] { pt3dadd(189.716, 99.441, 3.509, 0.7)
pt3dadd(189.832, 99.454, 3.481, 0.694)
pt3dadd(189.948, 99.468, 3.453, 0.692)
pt3dadd(190.063, 99.482, 3.426, 0.688)
pt3dadd(190.178, 99.496, 3.398, 0.682)
pt3dadd(190.294, 99.51, 3.37, 0.678)
pt3dadd(190.394, 99.558, 3.328, 0.682)
pt3dadd(190.492, 99.615, 3.282, 0.688)
pt3dadd(190.588, 99.672, 3.236, 0.694)
pt3dadd(190.685, 99.729, 3.19, 0.7)
pt3dadd(190.784, 99.774, 3.145, 0.704)
pt3dadd(190.895, 99.795, 3.1, 0.71)
pt3dadd(191.003, 99.816, 3.055, 0.714)
pt3dadd(191.113, 99.837, 3.01, 0.718)
pt3dadd(191.224, 99.857, 2.965, 0.724)
pt3dadd(191.333, 99.879, 2.921, 0.728)
pt3dadd(191.446, 99.912, 2.908, 0.732)
pt3dadd(191.558, 99.946, 2.894, 0.736)
pt3dadd(191.672, 99.979, 2.881, 0.74)
pt3dadd(191.784, 100.012, 2.867, 0.744)
pt3dadd(191.898, 100.046, 2.854, 0.748)
pt3dadd(192.01, 100.079, 2.84, 0.754)
pt3dadd(192.124, 100.11, 2.827, 0.754)
pt3dadd(192.238, 100.141, 2.813, 0.754)
pt3dadd(192.352, 100.173, 2.8, 0.754)
pt3dadd(192.464, 100.203, 2.786, 0.754)
pt3dadd(192.578, 100.235, 2.773, 0.754)
pt3dadd(192.692, 100.266, 2.759, 0.754)
pt3dadd(192.809, 100.285, 2.746, 0.75)
pt3dadd(192.925, 100.301, 2.733, 0.746)
pt3dadd(193.042, 100.317, 2.719, 0.744)
pt3dadd(193.158, 100.332, 2.706, 0.74)
pt3dadd(193.274, 100.348, 2.692, 0.736)
pt3dadd(193.391, 100.364, 2.679, 0.732)
pt3dadd(193.507, 100.38, 2.665, 0.728)
pt3dadd(193.624, 100.394, 2.652, 0.734)
pt3dadd(193.74, 100.408, 2.638, 0.742)
pt3dadd(193.858, 100.422, 2.625, 0.748)
pt3dadd(193.974, 100.436, 2.611, 0.756)
pt3dadd(194.09, 100.45, 2.598, 0.764)
pt3dadd(194.207, 100.464, 2.584, 0.77)
pt3dadd(194.324, 100.478, 2.571, 0.778)
pt3dadd(194.441, 100.492, 2.557, 0.784)
pt3dadd(194.557, 100.506, 2.544, 0.792)
pt3dadd(194.674, 100.52, 2.53, 0.8)
pt3dadd(194.791, 100.534, 2.517, 0.806)
pt3dadd(194.908, 100.548, 2.504, 0.814)
pt3dadd(195.024, 100.562, 2.49, 0.82)
pt3dadd(195.14, 100.576, 2.477, 0.828)
pt3dadd(195.257, 100.59, 2.463, 0.848)
pt3dadd(195.374, 100.604, 2.45, 0.87)
pt3dadd(195.491, 100.618, 2.436, 0.892)
pt3dadd(195.607, 100.632, 2.423, 0.912)
pt3dadd(195.724, 100.646, 2.409, 0.934)
pt3dadd(195.841, 100.66, 2.396, 0.956)
pt3dadd(195.958, 100.674, 2.382, 0.976)
pt3dadd(196.073, 100.688, 2.354, 0.986)
pt3dadd(196.187, 100.702, 2.324, 0.996)
pt3dadd(196.303, 100.716, 2.294, 1.004)
pt3dadd(196.418, 100.729, 2.264, 1.012)
pt3dadd(196.532, 100.743, 2.234, 1.02)
pt3dadd(196.648, 100.757, 2.205, 1.028)
pt3dadd(196.764, 100.771, 2.175, 1.04)
pt3dadd(196.878, 100.785, 2.145, 1.052)
pt3dadd(196.993, 100.799, 2.115, 1.064)
pt3dadd(197.107, 100.812, 2.085, 1.076)
pt3dadd(197.224, 100.826, 2.055, 1.09)
pt3dadd(197.339, 100.84, 2.025, 1.102)
pt3dadd(197.452, 100.868, 2.007, 1.108)
pt3dadd(197.564, 100.902, 1.994, 1.112)
pt3dadd(197.678, 100.935, 1.98, 1.116)
pt3dadd(197.79, 100.968, 1.967, 1.12)
pt3dadd(197.904, 101.002, 1.953, 1.124)
pt3dadd(198.017, 101.035, 1.94, 1.128)
pt3dadd(198.132, 101.059, 1.926, 1.142)
pt3dadd(198.248, 101.078, 1.913, 1.158)
pt3dadd(198.364, 101.096, 1.899, 1.176)
pt3dadd(198.472, 101.142, 1.882, 1.18)
pt3dadd(198.576, 101.197, 1.864, 1.18)
pt3dadd(198.661, 101.266, 1.825, 1.152)
pt3dadd(198.726, 101.351, 1.768, 1.094)
pt3dadd(198.792, 101.431, 1.705, 1.014)
pt3dadd(198.858, 101.509, 1.64, 0.928)
pt3dadd(198.962, 101.545, 1.591, 0.884)
pt3dadd(199.067, 101.581, 1.542, 0.84)
pt3dadd(199.17, 101.618, 1.492, 0.796)
pt3dadd(199.271, 101.672, 1.465, 0.772)
pt3dadd(199.369, 101.738, 1.451, 0.76)
pt3dadd(199.471, 101.797, 1.438, 0.764)
pt3dadd(199.577, 101.85, 1.423, 0.786)
pt3dadd(199.68, 101.908, 1.408, 0.8)
pt3dadd(199.783, 101.966, 1.392, 0.814)
pt3dadd(199.886, 102.024, 1.376, 0.83)
pt3dadd(199.99, 102.082, 1.361, 0.844)
pt3dadd(200.089, 102.145, 1.341, 0.856)
pt3dadd(200.179, 102.218, 1.307, 0.86)
pt3dadd(200.269, 102.291, 1.274, 0.866)
pt3dadd(200.36, 102.365, 1.241, 0.872)
pt3dadd(200.45, 102.438, 1.208, 0.878)
pt3dadd(200.546, 102.508, 1.19, 0.886)
pt3dadd(200.642, 102.577, 1.176, 0.896)
pt3dadd(200.738, 102.646, 1.163, 0.906)
pt3dadd(200.836, 102.716, 1.149, 0.916)
pt3dadd(200.932, 102.785, 1.136, 0.926)
pt3dadd(201.03, 102.851, 1.124, 0.93)
pt3dadd(201.13, 102.915, 1.112, 0.93)
pt3dadd(201.229, 102.979, 1.101, 0.93)
pt3dadd(201.329, 103.043, 1.09, 0.93)
pt3dadd(201.43, 103.107, 1.078, 0.93)
pt3dadd(201.526, 103.173, 1.074, 0.922)
pt3dadd(201.619, 103.243, 1.08, 0.906)
pt3dadd(201.712, 103.314, 1.086, 0.89)
pt3dadd(201.804, 103.384, 1.092, 0.872)
pt3dadd(201.898, 103.454, 1.098, 0.856)
pt3dadd(201.996, 103.518, 1.088, 0.838)
pt3dadd(202.097, 103.581, 1.074, 0.818)
pt3dadd(202.198, 103.644, 1.061, 0.8)
pt3dadd(202.297, 103.707, 1.047, 0.78)
pt3dadd(202.398, 103.77, 1.034, 0.762)
pt3dadd(202.498, 103.83, 1.008, 0.744)
pt3dadd(202.598, 103.889, 0.973, 0.728)
pt3dadd(202.698, 103.947, 0.938, 0.712)
pt3dadd(202.799, 104.005, 0.904, 0.696)
pt3dadd(202.898, 104.063, 0.869, 0.68)
pt3dadd(202.988, 104.133, 0.831, 0.688)
pt3dadd(203.078, 104.205, 0.792, 0.7)
pt3dadd(203.168, 104.276, 0.754, 0.71)
pt3dadd(203.26, 104.348, 0.715, 0.722)
pt3dadd(203.347, 104.421, 0.678, 0.73)
pt3dadd(203.436, 104.495, 0.642, 0.736)
pt3dadd(203.525, 104.569, 0.606, 0.742)
pt3dadd(203.615, 104.644, 0.57, 0.748)
pt3dadd(203.704, 104.718, 0.534, 0.754)
pt3dadd(203.813, 104.757, 0.504, 0.758)
pt3dadd(203.922, 104.796, 0.473, 0.762)
pt3dadd(204.031, 104.835, 0.443, 0.768)
pt3dadd(204.14, 104.874, 0.412, 0.772)
pt3dadd(204.251, 104.913, 0.381, 0.778)
pt3dadd(204.334, 104.994, 0.364, 0.778)
pt3dadd(204.41, 105.086, 0.351, 0.778)
pt3dadd(204.504, 105.156, 0.337, 0.8)
pt3dadd(204.606, 105.215, 0.324, 0.834)
pt3dadd(204.691, 105.293, 0.311, 0.876)
pt3dadd(204.744, 105.4, 0.297, 0.934)
pt3dadd(204.802, 105.504, 0.284, 0.992)
pt3dadd(204.872, 105.602, 0.27, 1.052)
pt3dadd(204.937, 105.701, 0.257, 1.11)
pt3dadd(204.954, 105.821, 0.243, 1.156)
pt3dadd(204.985, 105.936, 0.223, 1.186)
pt3dadd(205.032, 106.046, 0.195, 1.196)
pt3dadd(205.079, 106.155, 0.167, 1.206)
pt3dadd(205.124, 106.265, 0.14, 1.218)
pt3dadd(205.17, 106.375, 0.112, 1.228)
pt3dadd(205.222, 106.478, 0.071, 1.236)
pt3dadd(205.274, 106.579, 0.026, 1.24)
pt3dadd(205.327, 106.68, -0.019, 1.246)
pt3dadd(205.38, 106.781, -0.063, 1.252)
pt3dadd(205.43, 106.883, -0.108, 1.258)
pt3dadd(205.478, 106.987, -0.152, 1.264)
pt3dadd(205.528, 107.09, -0.196, 1.27)
pt3dadd(205.577, 107.193, -0.241, 1.276)
pt3dadd(205.626, 107.293, -0.291, 1.274)
pt3dadd(205.676, 107.377, -0.362, 1.246)
pt3dadd(205.75, 107.443, -0.422, 1.2)
pt3dadd(205.852, 107.489, -0.469, 1.138)
pt3dadd(205.909, 107.568, -0.515, 1.068)
pt3dadd(205.907, 107.57, -0.529, 1.068)
pt3dadd(205.918, 107.684, -0.575, 0.996)
pt3dadd(205.927, 107.8, -0.613, 0.93)
pt3dadd(205.936, 107.92, -0.641, 0.876)
pt3dadd(205.956, 108.031, -0.67, 0.82)
pt3dadd(206.051, 108.095, -0.71, 0.762)
pt3dadd(206.095, 108.198, -0.752, 0.734)
pt3dadd(206.128, 108.308, -0.795, 0.712)
pt3dadd(206.162, 108.418, -0.839, 0.69)
pt3dadd(206.195, 108.528, -0.882, 0.666)
pt3dadd(206.243, 108.631, -0.924, 0.644)
pt3dadd(206.312, 108.723, -0.963, 0.618)
pt3dadd(206.383, 108.814, -1.002, 0.592)
pt3dadd(206.454, 108.906, -1.041, 0.566)
pt3dadd(206.519, 108.991, -1.041, 0.47)
pt3dadd(206.588, 109.081, -1.046, 0.38)
pt3dadd(206.647, 109.167, -1.108, 0.362)
pt3dadd(206.695, 109.273, -1.142, 0.296)
pt3dadd(206.737, 109.385, -1.161, 0.252)
pt3dadd(206.772, 109.479, -1.221, 0.31)
pt3dadd(206.778, 109.511, -1.33, 0.398)
pt3dadd(206.774, 109.52, -1.443, 0.438)
pt3dadd(206.772, 109.521, -1.557, 0.464)
pt3dadd(206.777, 109.524, -1.67, 0.504)
pt3dadd(206.807, 109.568, -1.765, 0.552)
pt3dadd(206.85, 109.643, -1.848, 0.596)
pt3dadd(206.888, 109.74, -1.909, 0.626)
pt3dadd(206.928, 109.841, -1.966, 0.654)
pt3dadd(206.965, 109.934, -2.028, 0.674)
pt3dadd(207.017, 109.997, -2.114, 0.662)
pt3dadd(207.07, 110.059, -2.2, 0.65)
pt3dadd(207.122, 110.122, -2.286, 0.638)
pt3dadd(207.174, 110.191, -2.368, 0.624)
pt3dadd(207.221, 110.279, -2.436, 0.606)
}
}
proc shape3d_40() {
dend_7[35] { pt3dadd(207.269, 110.368, -2.504, 0.586)
pt3dadd(207.316, 110.457, -2.572, 0.568)
pt3dadd(207.358, 110.55, -2.635, 0.55)
pt3dadd(207.37, 110.666, -2.676, 0.534)
pt3dadd(207.383, 110.782, -2.717, 0.518)
pt3dadd(207.396, 110.898, -2.758, 0.504)
pt3dadd(207.409, 111.014, -2.799, 0.488)
pt3dadd(207.43, 111.128, -2.826, 0.478)
pt3dadd(207.469, 111.239, -2.821, 0.484)
pt3dadd(207.509, 111.351, -2.816, 0.49)
pt3dadd(207.55, 111.462, -2.811, 0.496)
pt3dadd(207.593, 111.571, -2.804, 0.504)
pt3dadd(207.66, 111.652, -2.771, 0.522)
pt3dadd(207.728, 111.733, -2.738, 0.54)
pt3dadd(207.796, 111.814, -2.705, 0.56)
pt3dadd(207.863, 111.895, -2.673, 0.578)
pt3dadd(207.865, 112.014, -2.667, 0.61)
pt3dadd(207.868, 112.133, -2.661, 0.644)
pt3dadd(207.896, 112.211, -2.612, 0.674)
pt3dadd(207.936, 112.273, -2.55, 0.704)
pt3dadd(208.007, 112.356, -2.604, 0.766)
pt3dadd(208.081, 112.441, -2.645, 0.838)
pt3dadd(208.16, 112.53, -2.663, 0.922)
pt3dadd(208.25, 112.601, -2.68, 1.014)
pt3dadd(208.363, 112.638, -2.694, 1.118)
pt3dadd(208.475, 112.673, -2.707, 1.158)
pt3dadd(208.589, 112.706, -2.721, 1.162)
pt3dadd(208.702, 112.74, -2.734, 1.166)
pt3dadd(208.698, 112.741, -2.748, 1.166)
pt3dadd(208.812, 112.775, -2.761, 1.17)
pt3dadd(208.925, 112.808, -2.775, 1.174)
pt3dadd(209.038, 112.841, -2.788, 1.178)
pt3dadd(209.144, 112.89, -2.798, 1.164)
pt3dadd(209.246, 112.949, -2.805, 1.134)
pt3dadd(209.347, 113.009, -2.812, 1.104)
pt3dadd(209.45, 113.069, -2.819, 1.076)
pt3dadd(209.552, 113.129, -2.826, 1.046)
pt3dadd(209.653, 113.19, -2.829, 1.006)
pt3dadd(209.753, 113.252, -2.829, 0.954)
pt3dadd(209.852, 113.314, -2.829, 0.902)
pt3dadd(209.952, 113.377, -2.828, 0.848)
pt3dadd(210.05, 113.439, -2.828, 0.796)
pt3dadd(210.156, 113.49, -2.848, 0.756)
pt3dadd(210.262, 113.535, -2.879, 0.72)
pt3dadd(210.37, 113.58, -2.91, 0.686)
pt3dadd(210.476, 113.624, -2.941, 0.652)
pt3dadd(210.584, 113.669, -2.972, 0.616)
pt3dadd(210.69, 113.72, -2.996, 0.59)
pt3dadd(210.794, 113.775, -3.014, 0.566)
pt3dadd(210.898, 113.831, -3.039, 0.562)
pt3dadd(210.996, 113.89, -3.074, 0.586)
pt3dadd(211.064, 113.931, -3.138, 0.602)
pt3dadd(211.075, 113.939, -3.25, 0.602)
pt3dadd(211.087, 113.947, -3.363, 0.602)
pt3dadd(211.105, 113.983, -3.47, 0.584)
pt3dadd(211.123, 114.026, -3.576, 0.558)
pt3dadd(211.21, 114.065, -3.606, 0.518)
pt3dadd(211.321, 114.103, -3.61, 0.472)
pt3dadd(211.416, 114.15, -3.587, 0.452)
pt3dadd(211.499, 114.225, -3.57, 0.544)
pt3dadd(211.585, 114.306, -3.579, 0.602)
pt3dadd(211.62, 114.421, -3.592, 0.602)
pt3dadd(211.666, 114.526, -3.606, 0.6)
pt3dadd(211.747, 114.612, -3.619, 0.596)
pt3dadd(211.83, 114.698, -3.633, 0.59)
pt3dadd(211.913, 114.784, -3.646, 0.586)
pt3dadd(211.996, 114.87, -3.66, 0.58)
pt3dadd(212.059, 114.968, -3.673, 0.552)
pt3dadd(212.099, 115.082, -3.687, 0.496)
}
dend_0[3] {pt3dclear()
pt3dadd(126.776, 92.48, 6.626, 13.108)
pt3dadd(126.829, 92.428, 6.626, 13.1)
pt3dadd(126.914, 92.343, 6.626, 13.086)
pt3dadd(126.998, 92.258, 6.626, 13.072)
pt3dadd(127.084, 92.174, 6.626, 13.058)
pt3dadd(127.169, 92.089, 6.626, 13.046)
pt3dadd(127.254, 92.004, 6.626, 13.032)
pt3dadd(127.339, 91.919, 6.626, 13.018)
pt3dadd(127.423, 91.834, 6.626, 13.004)
pt3dadd(127.508, 91.75, 6.626, 12.99)
pt3dadd(127.594, 91.665, 6.626, 12.978)
pt3dadd(127.678, 91.58, 6.626, 12.964)
pt3dadd(127.763, 91.495, 6.626, 12.95)
pt3dadd(127.848, 91.41, 6.626, 12.936)
pt3dadd(127.933, 91.325, 6.626, 12.922)
pt3dadd(128.017, 91.24, 6.626, 12.91)
pt3dadd(128.102, 91.156, 6.626, 12.896)
pt3dadd(128.191, 91.075, 6.626, 12.74)
pt3dadd(128.282, 90.997, 6.626, 12.532)
pt3dadd(128.372, 90.918, 6.626, 12.324)
pt3dadd(128.464, 90.84, 6.625, 12.118)
pt3dadd(128.555, 90.761, 6.625, 11.91)
pt3dadd(128.645, 90.682, 6.625, 11.702)
pt3dadd(128.736, 90.604, 6.625, 11.494)
pt3dadd(128.826, 90.525, 6.625, 11.286)
pt3dadd(128.917, 90.447, 6.625, 11.078)
pt3dadd(129.007, 90.368, 6.624, 10.872)
pt3dadd(129.098, 90.29, 6.624, 10.656)
pt3dadd(129.191, 90.212, 6.624, 10.438)
pt3dadd(129.282, 90.135, 6.624, 10.218)
pt3dadd(129.373, 90.057, 6.624, 10)
pt3dadd(129.464, 89.979, 6.623, 9.782)
pt3dadd(129.556, 89.901, 6.623, 9.562)
}
dend_7[36] {pt3dclear()
pt3dadd(129.556, 89.901, 6.623, 9.562)
pt3dadd(129.647, 89.823, 6.623, 9.344)
pt3dadd(129.738, 89.746, 6.623, 9.124)
pt3dadd(129.83, 89.668, 6.623, 8.906)
pt3dadd(129.922, 89.59, 6.623, 8.688)
pt3dadd(130.014, 89.513, 6.622, 8.482)
pt3dadd(130.106, 89.437, 6.622, 8.282)
pt3dadd(130.199, 89.361, 6.622, 8.082)
pt3dadd(130.291, 89.284, 6.621, 7.882)
pt3dadd(130.384, 89.208, 6.621, 7.682)
pt3dadd(130.476, 89.132, 6.621, 7.482)
pt3dadd(130.57, 89.055, 6.621, 7.282)
pt3dadd(130.662, 88.979, 6.621, 7.084)
pt3dadd(130.754, 88.903, 6.62, 6.884)
pt3dadd(130.847, 88.827, 6.62, 6.684)
pt3dadd(130.949, 88.764, 6.62, 6.5)
pt3dadd(131.054, 88.706, 6.619, 6.324)
pt3dadd(131.159, 88.648, 6.618, 6.148)
pt3dadd(131.264, 88.59, 6.618, 5.972)
pt3dadd(131.37, 88.533, 6.617, 5.796)
pt3dadd(131.474, 88.475, 6.617, 5.62)
pt3dadd(131.58, 88.417, 6.616, 5.444)
pt3dadd(131.686, 88.359, 6.616, 5.266)
pt3dadd(131.79, 88.302, 6.615, 5.09)
pt3dadd(131.896, 88.244, 6.615, 4.914)
pt3dadd(132.001, 88.186, 6.614, 4.764)
pt3dadd(132.106, 88.128, 6.613, 4.622)
pt3dadd(132.211, 88.07, 6.612, 4.48)
pt3dadd(132.316, 88.012, 6.611, 4.338)
pt3dadd(132.421, 87.954, 6.61, 4.196)
pt3dadd(132.526, 87.897, 6.609, 4.054)
pt3dadd(132.631, 87.839, 6.609, 3.912)
pt3dadd(132.737, 87.781, 6.608, 3.77)
pt3dadd(132.841, 87.723, 6.607, 3.628)
pt3dadd(132.947, 87.665, 6.606, 3.486)
pt3dadd(133.051, 87.607, 6.604, 3.37)
pt3dadd(133.157, 87.549, 6.603, 3.26)
pt3dadd(133.261, 87.491, 6.602, 3.152)
pt3dadd(133.367, 87.433, 6.6, 3.042)
pt3dadd(133.471, 87.375, 6.599, 2.934)
pt3dadd(133.577, 87.316, 6.597, 2.826)
pt3dadd(133.681, 87.258, 6.596, 2.716)
pt3dadd(133.787, 87.2, 6.594, 2.608)
pt3dadd(133.891, 87.142, 6.593, 2.498)
pt3dadd(133.997, 87.084, 6.591, 2.39)
pt3dadd(134.107, 87.038, 6.589, 2.31)
pt3dadd(134.219, 86.995, 6.586, 2.238)
pt3dadd(134.332, 86.952, 6.583, 2.168)
pt3dadd(134.443, 86.91, 6.581, 2.096)
pt3dadd(134.555, 86.867, 6.578, 2.024)
pt3dadd(134.668, 86.824, 6.575, 1.952)
pt3dadd(134.779, 86.781, 6.573, 1.88)
pt3dadd(134.891, 86.738, 6.57, 1.808)
pt3dadd(135.004, 86.695, 6.567, 1.736)
pt3dadd(135.115, 86.653, 6.565, 1.664)
pt3dadd(135.223, 86.599, 6.56, 1.632)
pt3dadd(135.329, 86.543, 6.554, 1.61)
pt3dadd(135.434, 86.487, 6.548, 1.588)
pt3dadd(135.54, 86.431, 6.542, 1.566)
pt3dadd(135.646, 86.374, 6.536, 1.544)
pt3dadd(135.751, 86.318, 6.53, 1.522)
pt3dadd(135.857, 86.262, 6.525, 1.5)
pt3dadd(135.964, 86.206, 6.519, 1.478)
pt3dadd(136.069, 86.15, 6.513, 1.456)
pt3dadd(136.175, 86.094, 6.507, 1.434)
pt3dadd(136.284, 86.045, 6.499, 1.424)
pt3dadd(136.394, 85.998, 6.49, 1.416)
pt3dadd(136.504, 85.951, 6.481, 1.408)
pt3dadd(136.614, 85.905, 6.472, 1.402)
pt3dadd(136.724, 85.858, 6.463, 1.394)
pt3dadd(136.834, 85.811, 6.454, 1.386)
pt3dadd(136.944, 85.764, 6.445, 1.38)
pt3dadd(137.054, 85.718, 6.437, 1.372)
pt3dadd(137.164, 85.671, 6.428, 1.364)
pt3dadd(137.274, 85.624, 6.419, 1.358)
pt3dadd(137.386, 85.587, 6.401, 1.36)
pt3dadd(137.498, 85.552, 6.382, 1.366)
pt3dadd(137.611, 85.516, 6.363, 1.372)
pt3dadd(137.723, 85.481, 6.344, 1.378)
pt3dadd(137.836, 85.446, 6.326, 1.382)
pt3dadd(137.948, 85.41, 6.306, 1.388)
pt3dadd(138.06, 85.375, 6.287, 1.394)
pt3dadd(138.173, 85.34, 6.269, 1.398)
pt3dadd(138.286, 85.304, 6.249, 1.404)
pt3dadd(138.397, 85.269, 6.231, 1.41)
pt3dadd(138.506, 85.239, 6.196, 1.426)
pt3dadd(138.614, 85.21, 6.16, 1.444)
pt3dadd(138.722, 85.181, 6.124, 1.462)
pt3dadd(138.83, 85.152, 6.088, 1.478)
pt3dadd(138.938, 85.123, 6.052, 1.496)
pt3dadd(139.046, 85.094, 6.016, 1.514)
pt3dadd(139.154, 85.065, 5.98, 1.53)
pt3dadd(139.262, 85.036, 5.944, 1.548)
pt3dadd(139.37, 85.007, 5.908, 1.566)
pt3dadd(139.48, 84.978, 5.872, 1.584)
pt3dadd(139.584, 84.928, 5.849, 1.616)
pt3dadd(139.69, 84.877, 5.828, 1.65)
pt3dadd(139.795, 84.825, 5.806, 1.684)
}
}
proc shape3d_41() {
dend_7[36] { pt3dadd(139.9, 84.773, 5.784, 1.716)
pt3dadd(140.005, 84.722, 5.762, 1.75)
pt3dadd(140.111, 84.67, 5.741, 1.784)
pt3dadd(140.215, 84.618, 5.719, 1.818)
pt3dadd(140.321, 84.567, 5.697, 1.852)
pt3dadd(140.426, 84.515, 5.676, 1.886)
pt3dadd(140.531, 84.464, 5.654, 1.918)
pt3dadd(140.64, 84.416, 5.64, 1.922)
pt3dadd(140.749, 84.369, 5.625, 1.92)
pt3dadd(140.857, 84.321, 5.611, 1.92)
pt3dadd(140.966, 84.274, 5.597, 1.92)
pt3dadd(141.076, 84.227, 5.583, 1.918)
pt3dadd(141.185, 84.179, 5.569, 1.918)
pt3dadd(141.294, 84.132, 5.555, 1.918)
pt3dadd(141.402, 84.085, 5.541, 1.918)
pt3dadd(141.511, 84.037, 5.527, 1.916)
pt3dadd(141.62, 83.99, 5.513, 1.916)
pt3dadd(141.728, 83.938, 5.506, 1.906)
pt3dadd(141.836, 83.886, 5.5, 1.896)
pt3dadd(141.944, 83.834, 5.493, 1.884)
pt3dadd(142.051, 83.782, 5.487, 1.874)
pt3dadd(142.159, 83.73, 5.481, 1.862)
pt3dadd(142.267, 83.678, 5.474, 1.852)
pt3dadd(142.375, 83.625, 5.468, 1.84)
pt3dadd(142.483, 83.573, 5.462, 1.83)
pt3dadd(142.591, 83.521, 5.455, 1.82)
pt3dadd(142.699, 83.469, 5.449, 1.808)
pt3dadd(142.801, 83.407, 5.449, 1.808)
pt3dadd(142.903, 83.345, 5.449, 1.808)
pt3dadd(143.006, 83.282, 5.449, 1.808)
pt3dadd(143.108, 83.22, 5.449, 1.808)
pt3dadd(143.212, 83.157, 5.449, 1.808)
pt3dadd(143.314, 83.095, 5.449, 1.81)
pt3dadd(143.417, 83.033, 5.449, 1.81)
pt3dadd(143.519, 82.97, 5.449, 1.81)
pt3dadd(143.621, 82.908, 5.449, 1.81)
pt3dadd(143.724, 82.845, 5.448, 1.81)
pt3dadd(143.833, 82.797, 5.448, 1.828)
pt3dadd(143.944, 82.749, 5.448, 1.844)
pt3dadd(144.054, 82.701, 5.448, 1.862)
pt3dadd(144.163, 82.653, 5.448, 1.88)
pt3dadd(144.274, 82.605, 5.448, 1.898)
pt3dadd(144.383, 82.557, 5.448, 1.916)
pt3dadd(144.493, 82.509, 5.447, 1.932)
pt3dadd(144.604, 82.46, 5.447, 1.95)
pt3dadd(144.713, 82.412, 5.447, 1.968)
pt3dadd(144.823, 82.364, 5.447, 1.986)
pt3dadd(144.928, 82.305, 5.447, 1.98)
pt3dadd(145.031, 82.245, 5.447, 1.972)
pt3dadd(145.135, 82.185, 5.446, 1.966)
pt3dadd(145.238, 82.125, 5.446, 1.958)
pt3dadd(145.343, 82.065, 5.446, 1.952)
pt3dadd(145.447, 82.004, 5.446, 1.944)
pt3dadd(145.55, 81.944, 5.446, 1.938)
pt3dadd(145.655, 81.884, 5.445, 1.93)
pt3dadd(145.758, 81.824, 5.445, 1.924)
pt3dadd(145.862, 81.764, 5.445, 1.916)
}
dend_7[37] {pt3dclear()
pt3dadd(145.862, 81.764, 5.445, 1.916)
pt3dadd(145.949, 81.709, 5.445, 1.892)
pt3dadd(146.05, 81.644, 5.444, 1.866)
pt3dadd(146.15, 81.579, 5.444, 1.84)
pt3dadd(146.251, 81.514, 5.444, 1.812)
pt3dadd(146.352, 81.449, 5.443, 1.786)
pt3dadd(146.454, 81.384, 5.443, 1.758)
pt3dadd(146.555, 81.319, 5.443, 1.732)
pt3dadd(146.656, 81.254, 5.442, 1.704)
pt3dadd(146.756, 81.189, 5.442, 1.678)
pt3dadd(146.857, 81.124, 5.442, 1.652)
pt3dadd(146.957, 81.058, 5.441, 1.606)
pt3dadd(147.058, 80.992, 5.44, 1.558)
pt3dadd(147.157, 80.925, 5.44, 1.51)
pt3dadd(147.257, 80.859, 5.439, 1.462)
pt3dadd(147.358, 80.793, 5.439, 1.414)
pt3dadd(147.457, 80.727, 5.438, 1.366)
pt3dadd(147.558, 80.66, 5.438, 1.318)
pt3dadd(147.658, 80.594, 5.437, 1.27)
pt3dadd(147.757, 80.528, 5.437, 1.222)
pt3dadd(147.858, 80.462, 5.436, 1.174)
pt3dadd(147.967, 80.414, 5.435, 1.178)
pt3dadd(148.079, 80.369, 5.434, 1.19)
pt3dadd(148.189, 80.323, 5.433, 1.204)
pt3dadd(148.301, 80.278, 5.431, 1.216)
pt3dadd(148.412, 80.233, 5.43, 1.23)
pt3dadd(148.523, 80.188, 5.429, 1.242)
pt3dadd(148.634, 80.143, 5.428, 1.256)
pt3dadd(148.746, 80.097, 5.426, 1.268)
pt3dadd(148.856, 80.052, 5.425, 1.28)
pt3dadd(148.968, 80.007, 5.424, 1.294)
pt3dadd(149.083, 79.976, 5.422, 1.278)
pt3dadd(149.2, 79.947, 5.419, 1.26)
pt3dadd(149.316, 79.918, 5.417, 1.24)
pt3dadd(149.432, 79.889, 5.415, 1.222)
pt3dadd(149.549, 79.86, 5.412, 1.202)
pt3dadd(149.665, 79.831, 5.41, 1.184)
pt3dadd(149.782, 79.802, 5.408, 1.164)
pt3dadd(149.898, 79.773, 5.405, 1.146)
pt3dadd(150.014, 79.744, 5.403, 1.126)
pt3dadd(150.131, 79.715, 5.401, 1.108)
pt3dadd(150.25, 79.696, 5.396, 1.096)
pt3dadd(150.368, 79.678, 5.391, 1.084)
pt3dadd(150.486, 79.659, 5.387, 1.072)
pt3dadd(150.605, 79.641, 5.382, 1.062)
pt3dadd(150.724, 79.623, 5.377, 1.05)
pt3dadd(150.842, 79.605, 5.372, 1.038)
pt3dadd(150.96, 79.587, 5.368, 1.028)
pt3dadd(151.079, 79.569, 5.363, 1.016)
pt3dadd(151.198, 79.551, 5.358, 1.004)
pt3dadd(151.316, 79.533, 5.353, 0.994)
pt3dadd(151.433, 79.51, 5.346, 0.996)
pt3dadd(151.55, 79.487, 5.338, 1)
pt3dadd(151.668, 79.464, 5.329, 1.004)
pt3dadd(151.786, 79.441, 5.321, 1.008)
pt3dadd(151.903, 79.418, 5.313, 1.012)
pt3dadd(152.02, 79.394, 5.305, 1.016)
pt3dadd(152.137, 79.371, 5.297, 1.02)
pt3dadd(152.255, 79.348, 5.289, 1.024)
pt3dadd(152.372, 79.325, 5.281, 1.028)
pt3dadd(152.49, 79.302, 5.273, 1.032)
pt3dadd(152.6, 79.257, 5.262, 0.996)
pt3dadd(152.711, 79.212, 5.252, 0.96)
pt3dadd(152.821, 79.167, 5.241, 0.926)
pt3dadd(152.932, 79.122, 5.23, 0.89)
pt3dadd(153.042, 79.077, 5.22, 0.854)
pt3dadd(153.152, 79.031, 5.209, 0.82)
pt3dadd(153.263, 78.986, 5.198, 0.784)
pt3dadd(153.373, 78.941, 5.187, 0.748)
pt3dadd(153.484, 78.896, 5.177, 0.714)
pt3dadd(153.594, 78.851, 5.166, 0.678)
}
dend_7[38] {pt3dclear()
pt3dadd(153.594, 78.851, 5.166, 0.678)
pt3dadd(153.601, 78.849, 5.163, 0.68)
pt3dadd(153.709, 78.82, 5.127, 0.716)
pt3dadd(153.817, 78.792, 5.091, 0.75)
pt3dadd(153.926, 78.763, 5.055, 0.784)
pt3dadd(154.034, 78.735, 5.019, 0.82)
pt3dadd(154.142, 78.706, 4.983, 0.854)
pt3dadd(154.25, 78.678, 4.947, 0.888)
pt3dadd(154.358, 78.649, 4.911, 0.922)
pt3dadd(154.466, 78.621, 4.874, 0.958)
pt3dadd(154.579, 78.598, 4.844, 0.994)
pt3dadd(154.691, 78.575, 4.814, 1.03)
pt3dadd(154.804, 78.552, 4.784, 1.066)
pt3dadd(154.915, 78.529, 4.754, 1.102)
pt3dadd(155.028, 78.507, 4.725, 1.138)
pt3dadd(155.14, 78.484, 4.695, 1.174)
pt3dadd(155.252, 78.461, 4.665, 1.21)
pt3dadd(155.364, 78.438, 4.635, 1.246)
pt3dadd(155.477, 78.416, 4.605, 1.28)
pt3dadd(155.59, 78.393, 4.575, 1.316)
pt3dadd(155.705, 78.378, 4.554, 1.34)
pt3dadd(155.822, 78.363, 4.534, 1.36)
pt3dadd(155.939, 78.348, 4.514, 1.38)
pt3dadd(156.055, 78.333, 4.494, 1.402)
pt3dadd(156.172, 78.318, 4.474, 1.422)
pt3dadd(156.288, 78.303, 4.454, 1.442)
pt3dadd(156.406, 78.288, 4.434, 1.464)
pt3dadd(156.522, 78.273, 4.414, 1.484)
pt3dadd(156.638, 78.258, 4.394, 1.504)
pt3dadd(156.755, 78.243, 4.374, 1.526)
pt3dadd(156.874, 78.232, 4.363, 1.506)
pt3dadd(156.992, 78.221, 4.354, 1.486)
pt3dadd(157.111, 78.21, 4.344, 1.464)
pt3dadd(157.23, 78.199, 4.334, 1.444)
pt3dadd(157.349, 78.188, 4.324, 1.422)
pt3dadd(157.468, 78.177, 4.314, 1.402)
pt3dadd(157.588, 78.167, 4.304, 1.38)
pt3dadd(157.706, 78.156, 4.295, 1.36)
pt3dadd(157.825, 78.145, 4.285, 1.34)
pt3dadd(157.944, 78.134, 4.275, 1.318)
pt3dadd(158.063, 78.117, 4.274, 1.28)
pt3dadd(158.182, 78.099, 4.274, 1.242)
pt3dadd(158.3, 78.082, 4.275, 1.204)
pt3dadd(158.419, 78.064, 4.275, 1.166)
pt3dadd(158.538, 78.047, 4.275, 1.128)
pt3dadd(158.657, 78.03, 4.275, 1.09)
pt3dadd(158.774, 78.012, 4.275, 1.052)
pt3dadd(158.893, 77.995, 4.275, 1.014)
pt3dadd(159.012, 77.977, 4.275, 0.976)
pt3dadd(159.131, 77.96, 4.275, 0.938)
pt3dadd(159.241, 77.913, 4.275, 0.994)
pt3dadd(159.352, 77.864, 4.275, 1.054)
pt3dadd(159.461, 77.816, 4.275, 1.116)
pt3dadd(159.57, 77.767, 4.276, 1.176)
pt3dadd(159.68, 77.718, 4.276, 1.236)
pt3dadd(159.79, 77.67, 4.276, 1.296)
pt3dadd(159.9, 77.621, 4.276, 1.356)
pt3dadd(160.009, 77.572, 4.276, 1.418)
pt3dadd(160.118, 77.524, 4.276, 1.478)
pt3dadd(160.229, 77.475, 4.276, 1.538)
pt3dadd(160.339, 77.429, 4.276, 1.49)
pt3dadd(160.451, 77.384, 4.277, 1.438)
pt3dadd(160.561, 77.338, 4.277, 1.388)
pt3dadd(160.673, 77.293, 4.277, 1.338)
pt3dadd(160.783, 77.247, 4.278, 1.288)
pt3dadd(160.895, 77.202, 4.278, 1.238)
pt3dadd(161.005, 77.156, 4.278, 1.186)
pt3dadd(161.117, 77.111, 4.278, 1.136)
pt3dadd(161.227, 77.065, 4.278, 1.086)
pt3dadd(161.339, 77.02, 4.279, 1.036)
}
dend_7[39] {pt3dclear()
pt3dadd(161.339, 77.02, 4.279, 1.036)
pt3dadd(161.406, 76.991, 4.279, 0.994)
}
}
proc shape3d_42() {
dend_7[39] { pt3dadd(161.516, 76.944, 4.279, 0.926)
pt3dadd(161.627, 76.897, 4.28, 0.856)
pt3dadd(161.737, 76.851, 4.28, 0.788)
pt3dadd(161.848, 76.804, 4.28, 0.718)
pt3dadd(161.958, 76.757, 4.281, 0.65)
pt3dadd(162.068, 76.71, 4.281, 0.58)
pt3dadd(162.179, 76.663, 4.282, 0.512)
pt3dadd(162.289, 76.616, 4.282, 0.442)
pt3dadd(162.4, 76.569, 4.282, 0.374)
pt3dadd(162.508, 76.517, 4.283, 0.368)
pt3dadd(162.614, 76.462, 4.283, 0.4)
pt3dadd(162.721, 76.407, 4.284, 0.434)
pt3dadd(162.827, 76.351, 4.285, 0.466)
pt3dadd(162.934, 76.296, 4.285, 0.498)
pt3dadd(163.04, 76.241, 4.286, 0.53)
pt3dadd(163.147, 76.185, 4.286, 0.562)
pt3dadd(163.253, 76.13, 4.287, 0.596)
pt3dadd(163.36, 76.074, 4.288, 0.628)
pt3dadd(163.466, 76.019, 4.288, 0.66)
pt3dadd(163.578, 75.978, 4.29, 0.662)
pt3dadd(163.694, 75.946, 4.291, 0.642)
pt3dadd(163.81, 75.914, 4.292, 0.624)
pt3dadd(163.925, 75.882, 4.294, 0.606)
pt3dadd(164.041, 75.85, 4.295, 0.586)
pt3dadd(164.156, 75.817, 4.297, 0.568)
pt3dadd(164.272, 75.785, 4.298, 0.55)
pt3dadd(164.388, 75.753, 4.299, 0.532)
pt3dadd(164.503, 75.721, 4.301, 0.512)
pt3dadd(164.618, 75.689, 4.302, 0.494)
pt3dadd(164.736, 75.662, 4.305, 0.494)
pt3dadd(164.852, 75.638, 4.307, 0.506)
pt3dadd(164.97, 75.613, 4.31, 0.518)
pt3dadd(165.088, 75.589, 4.313, 0.53)
pt3dadd(165.205, 75.565, 4.315, 0.542)
pt3dadd(165.323, 75.541, 4.318, 0.554)
pt3dadd(165.44, 75.517, 4.321, 0.566)
pt3dadd(165.558, 75.493, 4.323, 0.576)
pt3dadd(165.676, 75.469, 4.326, 0.588)
pt3dadd(165.793, 75.444, 4.328, 0.6)
pt3dadd(165.911, 75.424, 4.333, 0.602)
pt3dadd(166.03, 75.406, 4.339, 0.598)
pt3dadd(166.148, 75.388, 4.344, 0.594)
pt3dadd(166.266, 75.369, 4.35, 0.588)
pt3dadd(166.385, 75.351, 4.355, 0.584)
pt3dadd(166.504, 75.333, 4.361, 0.58)
pt3dadd(166.621, 75.315, 4.367, 0.576)
pt3dadd(166.74, 75.296, 4.372, 0.572)
pt3dadd(166.859, 75.278, 4.378, 0.568)
pt3dadd(166.976, 75.26, 4.383, 0.562)
pt3dadd(167.094, 75.234, 4.391, 0.564)
pt3dadd(167.209, 75.205, 4.4, 0.568)
pt3dadd(167.326, 75.176, 4.409, 0.572)
pt3dadd(167.441, 75.146, 4.418, 0.576)
pt3dadd(167.557, 75.117, 4.427, 0.58)
pt3dadd(167.672, 75.087, 4.437, 0.584)
pt3dadd(167.789, 75.058, 4.446, 0.588)
pt3dadd(167.904, 75.028, 4.455, 0.594)
pt3dadd(168.02, 74.999, 4.464, 0.598)
pt3dadd(168.136, 74.969, 4.473, 0.602)
pt3dadd(168.247, 74.928, 4.486, 0.622)
pt3dadd(168.356, 74.882, 4.501, 0.65)
pt3dadd(168.466, 74.837, 4.516, 0.678)
pt3dadd(168.576, 74.791, 4.531, 0.706)
pt3dadd(168.685, 74.745, 4.546, 0.734)
pt3dadd(168.794, 74.699, 4.562, 0.762)
pt3dadd(168.904, 74.654, 4.576, 0.79)
pt3dadd(169.013, 74.608, 4.592, 0.818)
pt3dadd(169.123, 74.562, 4.607, 0.846)
pt3dadd(169.232, 74.516, 4.622, 0.874)
pt3dadd(169.339, 74.48, 4.654, 0.866)
pt3dadd(169.445, 74.445, 4.691, 0.848)
pt3dadd(169.55, 74.41, 4.728, 0.832)
pt3dadd(169.657, 74.376, 4.766, 0.814)
pt3dadd(169.763, 74.341, 4.803, 0.796)
pt3dadd(169.868, 74.307, 4.84, 0.78)
pt3dadd(169.974, 74.272, 4.877, 0.762)
pt3dadd(170.081, 74.238, 4.914, 0.746)
pt3dadd(170.186, 74.203, 4.951, 0.728)
pt3dadd(170.292, 74.169, 4.988, 0.71)
pt3dadd(170.402, 74.139, 5.019, 0.704)
pt3dadd(170.514, 74.11, 5.047, 0.702)
pt3dadd(170.626, 74.082, 5.075, 0.7)
pt3dadd(170.737, 74.053, 5.104, 0.696)
pt3dadd(170.849, 74.024, 5.132, 0.694)
pt3dadd(170.96, 73.996, 5.16, 0.69)
pt3dadd(171.071, 73.967, 5.189, 0.688)
pt3dadd(171.182, 73.939, 5.217, 0.684)
pt3dadd(171.294, 73.91, 5.246, 0.682)
pt3dadd(171.406, 73.881, 5.274, 0.678)
pt3dadd(171.516, 73.843, 5.296, 0.688)
pt3dadd(171.626, 73.803, 5.318, 0.698)
pt3dadd(171.737, 73.763, 5.339, 0.71)
pt3dadd(171.846, 73.722, 5.36, 0.722)
pt3dadd(171.956, 73.682, 5.381, 0.732)
pt3dadd(172.067, 73.641, 5.402, 0.744)
pt3dadd(172.177, 73.601, 5.423, 0.756)
pt3dadd(172.286, 73.561, 5.444, 0.766)
pt3dadd(172.397, 73.52, 5.465, 0.778)
pt3dadd(172.507, 73.48, 5.486, 0.79)
pt3dadd(172.618, 73.437, 5.503, 0.8)
pt3dadd(172.728, 73.393, 5.518, 0.812)
pt3dadd(172.838, 73.349, 5.534, 0.824)
pt3dadd(172.948, 73.306, 5.549, 0.834)
pt3dadd(173.058, 73.262, 5.564, 0.846)
pt3dadd(173.168, 73.218, 5.58, 0.858)
pt3dadd(173.279, 73.175, 5.595, 0.868)
pt3dadd(173.389, 73.131, 5.611, 0.88)
pt3dadd(173.5, 73.088, 5.626, 0.892)
pt3dadd(173.61, 73.044, 5.642, 0.902)
pt3dadd(173.72, 73.007, 5.665, 0.898)
pt3dadd(173.831, 72.971, 5.69, 0.89)
pt3dadd(173.941, 72.936, 5.715, 0.882)
pt3dadd(174.052, 72.9, 5.74, 0.874)
pt3dadd(174.162, 72.864, 5.765, 0.866)
pt3dadd(174.272, 72.828, 5.79, 0.858)
pt3dadd(174.384, 72.792, 5.815, 0.85)
pt3dadd(174.494, 72.757, 5.84, 0.842)
pt3dadd(174.605, 72.721, 5.865, 0.836)
pt3dadd(174.715, 72.686, 5.891, 0.826)
pt3dadd(174.818, 72.658, 5.935, 0.79)
pt3dadd(174.923, 72.63, 5.979, 0.756)
pt3dadd(175.027, 72.601, 6.023, 0.72)
pt3dadd(175.132, 72.573, 6.067, 0.684)
pt3dadd(175.235, 72.545, 6.111, 0.65)
pt3dadd(175.339, 72.517, 6.155, 0.614)
pt3dadd(175.444, 72.489, 6.199, 0.578)
pt3dadd(175.548, 72.461, 6.242, 0.544)
pt3dadd(175.651, 72.433, 6.286, 0.508)
pt3dadd(175.757, 72.403, 6.326, 0.478)
pt3dadd(175.867, 72.364, 6.347, 0.47)
pt3dadd(175.978, 72.325, 6.368, 0.462)
pt3dadd(176.089, 72.285, 6.388, 0.454)
pt3dadd(176.2, 72.246, 6.409, 0.448)
pt3dadd(176.31, 72.207, 6.43, 0.44)
pt3dadd(176.42, 72.168, 6.45, 0.432)
pt3dadd(176.532, 72.129, 6.471, 0.424)
pt3dadd(176.642, 72.09, 6.492, 0.416)
pt3dadd(176.753, 72.051, 6.512, 0.41)
pt3dadd(176.862, 72.007, 6.528, 0.41)
pt3dadd(176.97, 71.954, 6.534, 0.428)
pt3dadd(177.077, 71.901, 6.541, 0.444)
pt3dadd(177.185, 71.848, 6.547, 0.462)
pt3dadd(177.292, 71.795, 6.553, 0.48)
pt3dadd(177.4, 71.741, 6.559, 0.498)
pt3dadd(177.506, 71.688, 6.565, 0.516)
pt3dadd(177.614, 71.635, 6.572, 0.532)
pt3dadd(177.721, 71.582, 6.578, 0.55)
pt3dadd(177.829, 71.529, 6.584, 0.568)
pt3dadd(177.937, 71.479, 6.587, 0.566)
pt3dadd(178.05, 71.436, 6.584, 0.532)
pt3dadd(178.162, 71.393, 6.582, 0.496)
pt3dadd(178.273, 71.349, 6.579, 0.462)
pt3dadd(178.385, 71.306, 6.576, 0.426)
pt3dadd(178.496, 71.263, 6.573, 0.392)
pt3dadd(178.609, 71.219, 6.571, 0.356)
pt3dadd(178.721, 71.176, 6.568, 0.322)
pt3dadd(178.832, 71.133, 6.565, 0.286)
pt3dadd(178.944, 71.089, 6.562, 0.252)
pt3dadd(179.053, 71.041, 6.558, 0.234)
pt3dadd(179.159, 70.983, 6.552, 0.252)
pt3dadd(179.263, 70.924, 6.546, 0.268)
pt3dadd(179.368, 70.866, 6.54, 0.284)
pt3dadd(179.472, 70.808, 6.534, 0.302)
pt3dadd(179.578, 70.75, 6.528, 0.318)
pt3dadd(179.682, 70.692, 6.521, 0.336)
pt3dadd(179.786, 70.634, 6.515, 0.352)
pt3dadd(179.891, 70.575, 6.509, 0.368)
pt3dadd(179.996, 70.517, 6.503, 0.386)
pt3dadd(180.103, 70.464, 6.496, 0.402)
pt3dadd(180.214, 70.418, 6.486, 0.42)
pt3dadd(180.324, 70.372, 6.477, 0.438)
pt3dadd(180.434, 70.327, 6.468, 0.456)
pt3dadd(180.545, 70.281, 6.458, 0.474)
pt3dadd(180.655, 70.236, 6.449, 0.492)
pt3dadd(180.766, 70.19, 6.439, 0.508)
pt3dadd(180.876, 70.145, 6.43, 0.526)
pt3dadd(180.986, 70.099, 6.421, 0.544)
pt3dadd(181.097, 70.054, 6.411, 0.562)
pt3dadd(181.207, 70.012, 6.397, 0.58)
pt3dadd(181.319, 69.975, 6.376, 0.598)
pt3dadd(181.43, 69.938, 6.354, 0.616)
pt3dadd(181.542, 69.902, 6.332, 0.634)
pt3dadd(181.652, 69.865, 6.311, 0.65)
pt3dadd(181.764, 69.828, 6.289, 0.668)
pt3dadd(181.876, 69.792, 6.268, 0.686)
pt3dadd(181.987, 69.755, 6.246, 0.704)
pt3dadd(182.098, 69.718, 6.225, 0.722)
pt3dadd(182.209, 69.682, 6.203, 0.74)
pt3dadd(182.318, 69.646, 6.176, 0.754)
pt3dadd(182.425, 69.611, 6.141, 0.764)
pt3dadd(182.533, 69.576, 6.107, 0.776)
pt3dadd(182.64, 69.542, 6.072, 0.786)
pt3dadd(182.747, 69.507, 6.038, 0.796)
pt3dadd(182.854, 69.472, 6.003, 0.806)
pt3dadd(182.962, 69.437, 5.969, 0.816)
pt3dadd(183.068, 69.402, 5.934, 0.828)
pt3dadd(183.175, 69.368, 5.899, 0.838)
pt3dadd(183.283, 69.333, 5.865, 0.848)
pt3dadd(183.388, 69.288, 5.837, 0.828)
pt3dadd(183.492, 69.234, 5.815, 0.778)
}
}
proc shape3d_43() {
dend_7[39] { pt3dadd(183.595, 69.179, 5.794, 0.728)
pt3dadd(183.7, 69.125, 5.773, 0.678)
pt3dadd(183.803, 69.07, 5.751, 0.628)
pt3dadd(183.907, 69.016, 5.73, 0.58)
pt3dadd(184.01, 68.961, 5.708, 0.53)
pt3dadd(184.115, 68.907, 5.687, 0.48)
pt3dadd(184.218, 68.853, 5.665, 0.43)
pt3dadd(184.322, 68.798, 5.644, 0.38)
pt3dadd(184.424, 68.739, 5.627, 0.372)
pt3dadd(184.525, 68.676, 5.614, 0.406)
pt3dadd(184.626, 68.612, 5.601, 0.442)
pt3dadd(184.727, 68.549, 5.589, 0.476)
pt3dadd(184.828, 68.485, 5.576, 0.51)
pt3dadd(184.928, 68.422, 5.563, 0.546)
pt3dadd(185.029, 68.359, 5.551, 0.58)
pt3dadd(185.13, 68.295, 5.538, 0.614)
pt3dadd(185.23, 68.232, 5.526, 0.65)
pt3dadd(185.33, 68.168, 5.513, 0.684)
pt3dadd(185.434, 68.107, 5.504, 0.716)
pt3dadd(185.537, 68.047, 5.497, 0.748)
pt3dadd(185.641, 67.988, 5.49, 0.78)
pt3dadd(185.746, 67.928, 5.484, 0.81)
pt3dadd(185.849, 67.869, 5.477, 0.842)
pt3dadd(185.953, 67.809, 5.471, 0.874)
pt3dadd(186.056, 67.75, 5.464, 0.906)
pt3dadd(186.161, 67.69, 5.457, 0.936)
pt3dadd(186.265, 67.631, 5.451, 0.968)
pt3dadd(186.368, 67.572, 5.444, 1)
pt3dadd(186.478, 67.522, 5.441, 0.992)
pt3dadd(186.589, 67.479, 5.44, 0.958)
pt3dadd(186.701, 67.436, 5.44, 0.922)
pt3dadd(186.814, 67.393, 5.439, 0.888)
pt3dadd(186.925, 67.35, 5.438, 0.854)
pt3dadd(187.037, 67.307, 5.438, 0.818)
pt3dadd(187.15, 67.264, 5.437, 0.784)
pt3dadd(187.261, 67.221, 5.437, 0.748)
pt3dadd(187.374, 67.178, 5.436, 0.714)
pt3dadd(187.486, 67.135, 5.435, 0.68)
pt3dadd(187.601, 67.103, 5.434, 0.654)
pt3dadd(187.718, 67.08, 5.433, 0.634)
pt3dadd(187.836, 67.056, 5.431, 0.616)
pt3dadd(187.954, 67.032, 5.43, 0.596)
pt3dadd(188.071, 67.009, 5.428, 0.576)
pt3dadd(188.189, 66.985, 5.427, 0.558)
pt3dadd(188.306, 66.961, 5.426, 0.538)
pt3dadd(188.424, 66.938, 5.424, 0.52)
pt3dadd(188.542, 66.914, 5.423, 0.5)
pt3dadd(188.659, 66.89, 5.421, 0.482)
pt3dadd(188.778, 66.869, 5.419, 0.462)
pt3dadd(188.896, 66.85, 5.417, 0.442)
pt3dadd(189.014, 66.831, 5.414, 0.424)
pt3dadd(189.133, 66.812, 5.411, 0.404)
pt3dadd(189.251, 66.793, 5.408, 0.384)
pt3dadd(189.37, 66.774, 5.405, 0.364)
pt3dadd(189.488, 66.755, 5.403, 0.346)
pt3dadd(189.607, 66.736, 5.4, 0.326)
pt3dadd(189.725, 66.717, 5.397, 0.306)
pt3dadd(189.844, 66.698, 5.395, 0.286)
pt3dadd(189.958, 66.663, 5.39, 0.276)
pt3dadd(190.068, 66.617, 5.384, 0.27)
pt3dadd(190.178, 66.571, 5.379, 0.266)
pt3dadd(190.289, 66.525, 5.373, 0.26)
pt3dadd(190.4, 66.479, 5.367, 0.254)
pt3dadd(190.511, 66.433, 5.361, 0.25)
pt3dadd(190.621, 66.387, 5.356, 0.244)
pt3dadd(190.732, 66.341, 5.35, 0.238)
pt3dadd(190.842, 66.295, 5.344, 0.234)
pt3dadd(190.952, 66.249, 5.339, 0.228)
pt3dadd(191.062, 66.199, 5.33, 0.246)
pt3dadd(191.168, 66.147, 5.321, 0.276)
pt3dadd(191.276, 66.094, 5.312, 0.304)
pt3dadd(191.384, 66.042, 5.302, 0.334)
pt3dadd(191.491, 65.99, 5.293, 0.364)
pt3dadd(191.599, 65.938, 5.284, 0.392)
pt3dadd(191.707, 65.886, 5.274, 0.422)
pt3dadd(191.814, 65.834, 5.265, 0.45)
pt3dadd(191.922, 65.782, 5.256, 0.48)
pt3dadd(192.029, 65.73, 5.247, 0.508)
pt3dadd(192.132, 65.673, 5.227, 0.53)
pt3dadd(192.232, 65.613, 5.204, 0.548)
pt3dadd(192.332, 65.554, 5.181, 0.564)
pt3dadd(192.433, 65.494, 5.158, 0.582)
pt3dadd(192.533, 65.435, 5.134, 0.6)
pt3dadd(192.634, 65.376, 5.111, 0.618)
pt3dadd(192.734, 65.316, 5.087, 0.636)
pt3dadd(192.835, 65.257, 5.064, 0.652)
pt3dadd(192.935, 65.197, 5.041, 0.67)
pt3dadd(193.036, 65.138, 5.017, 0.688)
pt3dadd(193.121, 65.068, 4.978, 0.644)
pt3dadd(193.206, 64.998, 4.939, 0.598)
pt3dadd(193.291, 64.928, 4.899, 0.55)
pt3dadd(193.375, 64.858, 4.859, 0.504)
pt3dadd(193.46, 64.788, 4.819, 0.456)
pt3dadd(193.546, 64.717, 4.779, 0.41)
pt3dadd(193.63, 64.647, 4.74, 0.364)
pt3dadd(193.715, 64.577, 4.7, 0.316)
pt3dadd(193.8, 64.507, 4.66, 0.27)
pt3dadd(193.885, 64.438, 4.621, 0.226)
pt3dadd(193.99, 64.384, 4.597, 0.236)
pt3dadd(194.093, 64.331, 4.572, 0.244)
pt3dadd(194.196, 64.277, 4.548, 0.252)
pt3dadd(194.299, 64.224, 4.524, 0.26)
pt3dadd(194.402, 64.17, 4.499, 0.268)
pt3dadd(194.506, 64.117, 4.475, 0.278)
pt3dadd(194.609, 64.063, 4.451, 0.286)
pt3dadd(194.712, 64.009, 4.426, 0.294)
pt3dadd(194.816, 63.956, 4.402, 0.302)
pt3dadd(194.92, 63.902, 4.379, 0.314)
pt3dadd(195.022, 63.841, 4.368, 0.35)
pt3dadd(195.124, 63.779, 4.358, 0.386)
pt3dadd(195.227, 63.718, 4.347, 0.424)
pt3dadd(195.329, 63.657, 4.336, 0.46)
pt3dadd(195.432, 63.596, 4.326, 0.498)
pt3dadd(195.534, 63.535, 4.315, 0.534)
pt3dadd(195.636, 63.474, 4.304, 0.572)
pt3dadd(195.739, 63.413, 4.294, 0.608)
pt3dadd(195.841, 63.351, 4.283, 0.644)
pt3dadd(195.946, 63.293, 4.274, 0.678)
pt3dadd(196.061, 63.26, 4.274, 0.678)
pt3dadd(196.176, 63.227, 4.274, 0.678)
pt3dadd(196.291, 63.193, 4.274, 0.678)
pt3dadd(196.406, 63.16, 4.274, 0.678)
pt3dadd(196.522, 63.127, 4.274, 0.678)
pt3dadd(196.637, 63.094, 4.274, 0.678)
pt3dadd(196.752, 63.06, 4.274, 0.678)
pt3dadd(196.867, 63.027, 4.274, 0.678)
pt3dadd(196.982, 62.994, 4.274, 0.678)
pt3dadd(197.099, 62.961, 4.274, 0.676)
pt3dadd(197.215, 62.935, 4.274, 0.646)
pt3dadd(197.333, 62.909, 4.274, 0.614)
pt3dadd(197.449, 62.883, 4.274, 0.584)
pt3dadd(197.567, 62.857, 4.274, 0.554)
pt3dadd(197.684, 62.831, 4.274, 0.524)
pt3dadd(197.801, 62.805, 4.274, 0.494)
pt3dadd(197.918, 62.778, 4.274, 0.464)
pt3dadd(198.035, 62.752, 4.274, 0.434)
pt3dadd(198.152, 62.726, 4.274, 0.404)
pt3dadd(198.27, 62.7, 4.274, 0.376)
pt3dadd(198.388, 62.679, 4.274, 0.36)
pt3dadd(198.505, 62.657, 4.274, 0.346)
pt3dadd(198.624, 62.635, 4.274, 0.33)
pt3dadd(198.742, 62.614, 4.274, 0.316)
pt3dadd(198.859, 62.592, 4.274, 0.3)
pt3dadd(198.978, 62.571, 4.274, 0.284)
pt3dadd(199.096, 62.549, 4.274, 0.27)
pt3dadd(199.214, 62.527, 4.274, 0.254)
pt3dadd(199.332, 62.506, 4.274, 0.24)
pt3dadd(199.45, 62.483, 4.274, 0.228)
pt3dadd(199.564, 62.445, 4.274, 0.254)
pt3dadd(199.678, 62.408, 4.274, 0.278)
pt3dadd(199.792, 62.371, 4.274, 0.302)
pt3dadd(199.906, 62.334, 4.274, 0.328)
pt3dadd(200.02, 62.297, 4.274, 0.352)
pt3dadd(200.135, 62.26, 4.274, 0.376)
pt3dadd(200.249, 62.223, 4.274, 0.4)
pt3dadd(200.363, 62.186, 4.274, 0.426)
pt3dadd(200.477, 62.149, 4.274, 0.45)
pt3dadd(200.588, 62.107, 4.274, 0.478)
pt3dadd(200.694, 62.05, 4.274, 0.514)
pt3dadd(200.8, 61.993, 4.274, 0.548)
pt3dadd(200.906, 61.936, 4.274, 0.584)
pt3dadd(201.012, 61.88, 4.274, 0.62)
pt3dadd(201.118, 61.823, 4.274, 0.656)
pt3dadd(201.223, 61.766, 4.274, 0.692)
pt3dadd(201.329, 61.709, 4.274, 0.728)
pt3dadd(201.434, 61.653, 4.274, 0.764)
pt3dadd(201.54, 61.596, 4.274, 0.8)
pt3dadd(201.646, 61.539, 4.274, 0.816)
pt3dadd(201.752, 61.483, 4.274, 0.778)
pt3dadd(201.858, 61.428, 4.274, 0.74)
pt3dadd(201.965, 61.372, 4.274, 0.702)
pt3dadd(202.07, 61.316, 4.274, 0.664)
pt3dadd(202.177, 61.26, 4.274, 0.626)
pt3dadd(202.284, 61.204, 4.274, 0.588)
pt3dadd(202.39, 61.149, 4.274, 0.55)
pt3dadd(202.496, 61.093, 4.274, 0.51)
pt3dadd(202.602, 61.037, 4.274, 0.472)
pt3dadd(202.702, 60.972, 4.274, 0.438)
pt3dadd(202.782, 60.884, 4.274, 0.418)
pt3dadd(202.864, 60.795, 4.274, 0.396)
pt3dadd(202.944, 60.706, 4.274, 0.374)
pt3dadd(203.024, 60.617, 4.274, 0.352)
pt3dadd(203.105, 60.528, 4.274, 0.332)
pt3dadd(203.186, 60.44, 4.274, 0.31)
pt3dadd(203.267, 60.351, 4.274, 0.288)
pt3dadd(203.347, 60.262, 4.274, 0.266)
pt3dadd(203.428, 60.173, 4.274, 0.244)
pt3dadd(203.51, 60.086, 4.274, 0.238)
pt3dadd(203.597, 60.003, 4.274, 0.274)
pt3dadd(203.683, 59.919, 4.274, 0.31)
pt3dadd(203.77, 59.836, 4.274, 0.346)
pt3dadd(203.856, 59.752, 4.274, 0.382)
pt3dadd(203.941, 59.669, 4.274, 0.418)
pt3dadd(204.028, 59.586, 4.274, 0.454)
pt3dadd(204.114, 59.502, 4.274, 0.49)
pt3dadd(204.2, 59.419, 4.274, 0.526)
pt3dadd(204.287, 59.335, 4.274, 0.562)
pt3dadd(204.377, 59.257, 4.274, 0.59)
pt3dadd(204.478, 59.192, 4.274, 0.6)
pt3dadd(204.58, 59.127, 4.274, 0.608)
}
}
proc shape3d_44() {
dend_7[39] { pt3dadd(204.68, 59.063, 4.274, 0.618)
pt3dadd(204.781, 58.998, 4.274, 0.626)
pt3dadd(204.882, 58.933, 4.274, 0.636)
pt3dadd(204.983, 58.868, 4.274, 0.646)
pt3dadd(205.085, 58.803, 4.274, 0.654)
pt3dadd(205.186, 58.739, 4.274, 0.664)
pt3dadd(205.286, 58.674, 4.274, 0.672)
pt3dadd(205.388, 58.611, 4.274, 0.672)
pt3dadd(205.494, 58.554, 4.274, 0.652)
pt3dadd(205.598, 58.496, 4.274, 0.634)
pt3dadd(205.704, 58.438, 4.274, 0.614)
pt3dadd(205.808, 58.38, 4.274, 0.596)
pt3dadd(205.914, 58.322, 4.274, 0.578)
pt3dadd(206.02, 58.264, 4.274, 0.558)
pt3dadd(206.124, 58.206, 4.274, 0.54)
pt3dadd(206.23, 58.148, 4.274, 0.52)
pt3dadd(206.334, 58.09, 4.274, 0.502)
pt3dadd(206.441, 58.033, 4.274, 0.48)
pt3dadd(206.548, 57.98, 4.274, 0.454)
pt3dadd(206.654, 57.926, 4.274, 0.428)
pt3dadd(206.762, 57.872, 4.274, 0.402)
pt3dadd(206.869, 57.818, 4.274, 0.374)
pt3dadd(206.977, 57.765, 4.274, 0.348)
pt3dadd(207.084, 57.711, 4.274, 0.322)
pt3dadd(207.191, 57.657, 4.274, 0.296)
pt3dadd(207.299, 57.603, 4.274, 0.27)
pt3dadd(207.406, 57.55, 4.274, 0.242)
pt3dadd(207.515, 57.501, 4.274, 0.226)
pt3dadd(207.629, 57.463, 4.274, 0.226)
pt3dadd(207.743, 57.425, 4.274, 0.226)
pt3dadd(207.857, 57.386, 4.274, 0.226)
pt3dadd(207.97, 57.348, 4.274, 0.226)
pt3dadd(208.084, 57.31, 4.274, 0.226)
pt3dadd(208.198, 57.271, 4.274, 0.226)
pt3dadd(208.312, 57.233, 4.274, 0.226)
pt3dadd(208.426, 57.195, 4.274, 0.226)
pt3dadd(208.538, 57.156, 4.274, 0.226)
pt3dadd(208.654, 57.121, 4.274, 0.226)
pt3dadd(208.769, 57.089, 4.274, 0.226)
pt3dadd(208.885, 57.058, 4.274, 0.226)
pt3dadd(209, 57.027, 4.274, 0.226)
pt3dadd(209.117, 56.996, 4.274, 0.226)
pt3dadd(209.232, 56.964, 4.274, 0.226)
pt3dadd(209.348, 56.933, 4.274, 0.226)
pt3dadd(209.465, 56.902, 4.274, 0.226)
pt3dadd(209.58, 56.87, 4.274, 0.226)
pt3dadd(209.696, 56.839, 4.274, 0.226)
pt3dadd(209.809, 56.802, 4.274, 0.236)
pt3dadd(209.92, 56.753, 4.274, 0.262)
pt3dadd(210.029, 56.704, 4.274, 0.29)
pt3dadd(210.138, 56.655, 4.274, 0.316)
pt3dadd(210.248, 56.606, 4.274, 0.342)
pt3dadd(210.358, 56.557, 4.274, 0.37)
pt3dadd(210.467, 56.508, 4.274, 0.396)
pt3dadd(210.576, 56.459, 4.274, 0.424)
pt3dadd(210.686, 56.41, 4.274, 0.45)
pt3dadd(210.796, 56.361, 4.274, 0.478)
pt3dadd(210.905, 56.312, 4.274, 0.5)
pt3dadd(211.014, 56.261, 4.274, 0.52)
pt3dadd(211.122, 56.21, 4.274, 0.538)
pt3dadd(211.231, 56.159, 4.274, 0.556)
pt3dadd(211.339, 56.108, 4.274, 0.574)
pt3dadd(211.448, 56.057, 4.274, 0.594)
pt3dadd(211.558, 56.007, 4.274, 0.612)
pt3dadd(211.666, 55.956, 4.274, 0.63)
pt3dadd(211.775, 55.905, 4.274, 0.648)
pt3dadd(211.883, 55.854, 4.274, 0.666)
pt3dadd(211.992, 55.803, 4.274, 0.676)
pt3dadd(212.1, 55.751, 4.274, 0.668)
pt3dadd(212.208, 55.699, 4.274, 0.66)
pt3dadd(212.316, 55.648, 4.274, 0.652)
pt3dadd(212.425, 55.596, 4.274, 0.646)
pt3dadd(212.533, 55.544, 4.275, 0.638)
pt3dadd(212.641, 55.492, 4.275, 0.63)
pt3dadd(212.749, 55.441, 4.275, 0.622)
pt3dadd(212.858, 55.389, 4.275, 0.616)
pt3dadd(212.966, 55.337, 4.275, 0.608)
pt3dadd(213.071, 55.279, 4.275, 0.59)
pt3dadd(213.17, 55.212, 4.275, 0.556)
pt3dadd(213.27, 55.145, 4.275, 0.522)
pt3dadd(213.37, 55.078, 4.275, 0.488)
pt3dadd(213.469, 55.012, 4.275, 0.454)
pt3dadd(213.569, 54.945, 4.275, 0.422)
pt3dadd(213.668, 54.878, 4.275, 0.388)
pt3dadd(213.768, 54.811, 4.275, 0.354)
pt3dadd(213.868, 54.744, 4.275, 0.32)
pt3dadd(213.967, 54.677, 4.276, 0.286)
pt3dadd(214.069, 54.614, 4.276, 0.266)
pt3dadd(214.174, 54.554, 4.276, 0.262)
pt3dadd(214.278, 54.495, 4.276, 0.258)
pt3dadd(214.382, 54.436, 4.276, 0.254)
pt3dadd(214.487, 54.377, 4.276, 0.25)
pt3dadd(214.591, 54.317, 4.276, 0.244)
pt3dadd(214.696, 54.258, 4.277, 0.24)
pt3dadd(214.8, 54.199, 4.277, 0.236)
pt3dadd(214.904, 54.14, 4.277, 0.232)
pt3dadd(215.009, 54.08, 4.277, 0.228)
pt3dadd(215.107, 54.014, 4.278, 0.226)
pt3dadd(215.201, 53.937, 4.278, 0.226)
pt3dadd(215.293, 53.861, 4.278, 0.226)
pt3dadd(215.386, 53.784, 4.279, 0.226)
pt3dadd(215.478, 53.708, 4.279, 0.226)
pt3dadd(215.57, 53.632, 4.279, 0.226)
pt3dadd(215.663, 53.555, 4.28, 0.226)
pt3dadd(215.755, 53.479, 4.28, 0.226)
pt3dadd(215.848, 53.403, 4.28, 0.226)
pt3dadd(215.941, 53.326, 4.281, 0.226)
pt3dadd(216.023, 53.24, 4.281, 0.226)
pt3dadd(216.094, 53.143, 4.282, 0.226)
pt3dadd(216.164, 53.046, 4.282, 0.226)
pt3dadd(216.236, 52.95, 4.283, 0.226)
pt3dadd(216.307, 52.853, 4.284, 0.226)
pt3dadd(216.378, 52.757, 4.284, 0.226)
pt3dadd(216.449, 52.66, 4.285, 0.226)
pt3dadd(216.521, 52.563, 4.286, 0.226)
pt3dadd(216.592, 52.467, 4.286, 0.226)
pt3dadd(216.662, 52.37, 4.287, 0.226)
pt3dadd(216.713, 52.262, 4.288, 0.226)
pt3dadd(216.754, 52.149, 4.289, 0.226)
pt3dadd(216.794, 52.036, 4.29, 0.226)
pt3dadd(216.835, 51.923, 4.292, 0.226)
pt3dadd(216.875, 51.81, 4.293, 0.226)
pt3dadd(216.916, 51.698, 4.294, 0.226)
pt3dadd(216.956, 51.585, 4.296, 0.226)
pt3dadd(216.997, 51.472, 4.297, 0.226)
pt3dadd(217.037, 51.359, 4.298, 0.226)
pt3dadd(217.078, 51.246, 4.299, 0.226)
pt3dadd(217.104, 51.129, 4.301, 0.226)
pt3dadd(217.124, 51.011, 4.304, 0.226)
pt3dadd(217.145, 50.893, 4.306, 0.226)
pt3dadd(217.166, 50.775, 4.308, 0.226)
pt3dadd(217.187, 50.656, 4.31, 0.226)
pt3dadd(217.207, 50.538, 4.313, 0.226)
pt3dadd(217.229, 50.42, 4.315, 0.226)
pt3dadd(217.249, 50.302, 4.317, 0.226)
pt3dadd(217.27, 50.184, 4.319, 0.226)
pt3dadd(217.291, 50.066, 4.321, 0.226)
pt3dadd(217.307, 49.947, 4.325, 0.226)
pt3dadd(217.32, 49.828, 4.329, 0.226)
pt3dadd(217.334, 49.709, 4.333, 0.226)
pt3dadd(217.349, 49.59, 4.337, 0.226)
pt3dadd(217.362, 49.47, 4.341, 0.226)
pt3dadd(217.376, 49.351, 4.345, 0.226)
pt3dadd(217.391, 49.232, 4.349, 0.226)
pt3dadd(217.405, 49.113, 4.353, 0.226)
pt3dadd(217.418, 48.994, 4.357, 0.226)
pt3dadd(217.433, 48.875, 4.362, 0.226)
pt3dadd(217.468, 48.762, 4.37, 0.238)
pt3dadd(217.511, 48.65, 4.379, 0.254)
pt3dadd(217.553, 48.538, 4.388, 0.272)
pt3dadd(217.595, 48.426, 4.398, 0.288)
pt3dadd(217.638, 48.315, 4.408, 0.304)
pt3dadd(217.68, 48.203, 4.417, 0.32)
pt3dadd(217.723, 48.092, 4.426, 0.338)
pt3dadd(217.765, 47.98, 4.436, 0.354)
pt3dadd(217.807, 47.868, 4.446, 0.37)
pt3dadd(217.85, 47.757, 4.455, 0.386)
pt3dadd(217.888, 47.644, 4.468, 0.386)
pt3dadd(217.924, 47.53, 4.481, 0.378)
pt3dadd(217.958, 47.417, 4.495, 0.372)
pt3dadd(217.994, 47.303, 4.508, 0.364)
pt3dadd(218.03, 47.19, 4.522, 0.356)
pt3dadd(218.066, 47.077, 4.536, 0.35)
pt3dadd(218.101, 46.963, 4.549, 0.342)
pt3dadd(218.137, 46.85, 4.563, 0.336)
pt3dadd(218.173, 46.736, 4.576, 0.328)
pt3dadd(218.209, 46.623, 4.59, 0.322)
pt3dadd(218.232, 46.512, 4.621, 0.312)
pt3dadd(218.252, 46.401, 4.656, 0.304)
pt3dadd(218.273, 46.291, 4.691, 0.294)
pt3dadd(218.293, 46.181, 4.726, 0.284)
pt3dadd(218.314, 46.07, 4.761, 0.274)
pt3dadd(218.334, 45.96, 4.797, 0.264)
pt3dadd(218.354, 45.849, 4.832, 0.254)
pt3dadd(218.375, 45.739, 4.867, 0.246)
pt3dadd(218.395, 45.628, 4.902, 0.236)
pt3dadd(218.416, 45.518, 4.937, 0.226)
pt3dadd(218.426, 45.415, 4.988, 0.226)
pt3dadd(218.436, 45.313, 5.04, 0.226)
pt3dadd(218.447, 45.21, 5.091, 0.226)
pt3dadd(218.456, 45.108, 5.142, 0.226)
pt3dadd(218.467, 45.005, 5.194, 0.226)
pt3dadd(218.478, 44.903, 5.245, 0.226)
pt3dadd(218.488, 44.8, 5.296, 0.226)
pt3dadd(218.498, 44.698, 5.347, 0.226)
pt3dadd(218.508, 44.595, 5.398, 0.226)
pt3dadd(218.519, 44.493, 5.45, 0.226)
}
dend_7[40] {pt3dclear()
pt3dadd(161.339, 77.02, 4.279, 1.036)
pt3dadd(161.358, 77.096, 4.239, 0.998)
pt3dadd(161.382, 77.197, 4.188, 0.95)
pt3dadd(161.407, 77.297, 4.137, 0.902)
pt3dadd(161.431, 77.397, 4.086, 0.854)
pt3dadd(161.455, 77.497, 4.035, 0.806)
pt3dadd(161.48, 77.597, 3.983, 0.756)
pt3dadd(161.504, 77.697, 3.932, 0.708)
pt3dadd(161.564, 77.76, 3.9, 0.678)
pt3dadd(161.684, 77.76, 3.9, 0.678)
pt3dadd(161.804, 77.76, 3.9, 0.678)
pt3dadd(161.924, 77.76, 3.9, 0.678)
pt3dadd(162.044, 77.76, 3.9, 0.678)
}
}
proc shape3d_45() {
dend_7[40] { pt3dadd(162.164, 77.76, 3.9, 0.678)
pt3dadd(162.284, 77.76, 3.9, 0.678)
pt3dadd(162.403, 77.751, 3.893, 0.678)
pt3dadd(162.518, 77.728, 3.874, 0.678)
pt3dadd(162.634, 77.705, 3.854, 0.678)
pt3dadd(162.75, 77.682, 3.835, 0.678)
pt3dadd(162.865, 77.659, 3.816, 0.678)
pt3dadd(162.98, 77.637, 3.8, 0.678)
pt3dadd(163.099, 77.617, 3.8, 0.678)
pt3dadd(163.218, 77.597, 3.8, 0.678)
pt3dadd(163.336, 77.577, 3.8, 0.678)
pt3dadd(163.454, 77.558, 3.8, 0.678)
pt3dadd(163.573, 77.538, 3.8, 0.678)
pt3dadd(163.691, 77.522, 3.8, 0.678)
pt3dadd(163.81, 77.542, 3.798, 0.678)
pt3dadd(163.927, 77.562, 3.796, 0.678)
pt3dadd(164.046, 77.582, 3.794, 0.678)
pt3dadd(164.165, 77.602, 3.792, 0.678)
pt3dadd(164.282, 77.622, 3.79, 0.678)
pt3dadd(164.4, 77.643, 3.787, 0.678)
pt3dadd(164.515, 77.672, 3.77, 0.678)
pt3dadd(164.629, 77.701, 3.752, 0.678)
pt3dadd(164.744, 77.729, 3.735, 0.678)
pt3dadd(164.86, 77.758, 3.717, 0.678)
pt3dadd(164.974, 77.786, 3.7, 0.678)
pt3dadd(165.088, 77.825, 3.7, 0.678)
pt3dadd(165.2, 77.864, 3.7, 0.678)
pt3dadd(165.314, 77.903, 3.7, 0.678)
pt3dadd(165.428, 77.941, 3.7, 0.678)
pt3dadd(165.541, 77.98, 3.7, 0.678)
pt3dadd(165.649, 78.031, 3.7, 0.678)
pt3dadd(165.751, 78.094, 3.7, 0.678)
pt3dadd(165.854, 78.157, 3.7, 0.678)
pt3dadd(165.956, 78.219, 3.7, 0.678)
pt3dadd(166.058, 78.282, 3.7, 0.678)
pt3dadd(166.166, 78.331, 3.7, 0.678)
pt3dadd(166.283, 78.359, 3.7, 0.678)
pt3dadd(166.4, 78.386, 3.7, 0.678)
pt3dadd(166.517, 78.414, 3.7, 0.678)
pt3dadd(166.633, 78.441, 3.7, 0.678)
pt3dadd(166.751, 78.468, 3.7, 0.678)
pt3dadd(166.866, 78.493, 3.689, 0.678)
pt3dadd(166.982, 78.516, 3.67, 0.678)
pt3dadd(167.098, 78.539, 3.651, 0.678)
pt3dadd(167.213, 78.563, 3.631, 0.678)
pt3dadd(167.328, 78.586, 3.612, 0.678)
pt3dadd(167.446, 78.6, 3.6, 0.678)
pt3dadd(167.566, 78.6, 3.6, 0.678)
pt3dadd(167.686, 78.6, 3.6, 0.678)
pt3dadd(167.806, 78.6, 3.6, 0.678)
pt3dadd(167.926, 78.6, 3.6, 0.678)
pt3dadd(168.046, 78.6, 3.6, 0.678)
pt3dadd(168.166, 78.6, 3.6, 0.678)
pt3dadd(168.286, 78.6, 3.6, 0.678)
pt3dadd(168.406, 78.6, 3.6, 0.678)
pt3dadd(168.526, 78.6, 3.6, 0.678)
pt3dadd(168.643, 78.615, 3.6, 0.678)
pt3dadd(168.756, 78.655, 3.6, 0.678)
pt3dadd(168.869, 78.695, 3.6, 0.678)
pt3dadd(168.968, 78.763, 3.6, 0.678)
pt3dadd(169.067, 78.831, 3.6, 0.678)
pt3dadd(169.133, 78.93, 3.6, 0.678)
pt3dadd(169.194, 79.033, 3.6, 0.678)
pt3dadd(169.249, 79.139, 3.6, 0.678)
pt3dadd(169.304, 79.246, 3.6, 0.678)
pt3dadd(169.366, 79.349, 3.6, 0.678)
pt3dadd(169.427, 79.453, 3.6, 0.678)
pt3dadd(169.474, 79.563, 3.6, 0.678)
pt3dadd(169.52, 79.674, 3.6, 0.678)
pt3dadd(169.607, 79.749, 3.6, 0.678)
pt3dadd(169.71, 79.81, 3.6, 0.678)
pt3dadd(169.818, 79.859, 3.608, 0.678)
pt3dadd(169.931, 79.897, 3.624, 0.678)
pt3dadd(170.041, 79.92, 3.65, 0.678)
pt3dadd(170.148, 79.92, 3.695, 0.678)
pt3dadd(170.258, 79.92, 3.735, 0.678)
pt3dadd(170.369, 79.92, 3.773, 0.678)
pt3dadd(170.485, 79.92, 3.791, 0.678)
pt3dadd(170.605, 79.92, 3.795, 0.678)
pt3dadd(170.725, 79.92, 3.799, 0.678)
pt3dadd(170.833, 79.92, 3.836, 0.678)
pt3dadd(170.936, 79.92, 3.887, 0.678)
pt3dadd(171.014, 79.93, 3.957, 0.678)
pt3dadd(171.067, 79.95, 4.045, 0.678)
pt3dadd(171.136, 80.002, 4.092, 0.678)
pt3dadd(171.221, 80.087, 4.097, 0.678)
pt3dadd(171.305, 80.171, 4.092, 0.678)
pt3dadd(171.35, 80.268, 4.055, 0.678)
pt3dadd(171.36, 80.357, 3.989, 0.678)
pt3dadd(171.385, 80.443, 3.926, 0.678)
pt3dadd(171.48, 80.5, 3.908, 0.678)
pt3dadd(171.595, 80.534, 3.904, 0.678)
pt3dadd(171.71, 80.568, 3.9, 0.678)
pt3dadd(171.826, 80.601, 3.9, 0.678)
pt3dadd(171.941, 80.634, 3.9, 0.678)
pt3dadd(172.06, 80.652, 3.9, 0.678)
pt3dadd(172.17, 80.698, 3.9, 0.678)
pt3dadd(172.28, 80.745, 3.9, 0.678)
pt3dadd(172.391, 80.793, 3.9, 0.678)
pt3dadd(172.501, 80.84, 3.9, 0.678)
pt3dadd(172.61, 80.888, 3.9, 0.678)
pt3dadd(172.712, 80.95, 3.9, 0.678)
pt3dadd(172.808, 81.022, 3.9, 0.678)
pt3dadd(172.904, 81.094, 3.9, 0.678)
pt3dadd(173, 81.166, 3.9, 0.678)
pt3dadd(173.096, 81.238, 3.9, 0.678)
pt3dadd(173.191, 81.312, 3.9, 0.678)
pt3dadd(173.285, 81.387, 3.9, 0.678)
pt3dadd(173.378, 81.462, 3.9, 0.678)
pt3dadd(173.472, 81.537, 3.9, 0.678)
pt3dadd(173.566, 81.612, 3.9, 0.678)
pt3dadd(173.672, 81.656, 3.888, 0.678)
pt3dadd(173.788, 81.682, 3.868, 0.678)
pt3dadd(173.903, 81.708, 3.849, 0.678)
pt3dadd(174.017, 81.734, 3.829, 0.678)
pt3dadd(174.132, 81.76, 3.809, 0.678)
pt3dadd(174.232, 81.814, 3.788, 0.678)
pt3dadd(174.317, 81.894, 3.765, 0.678)
pt3dadd(174.403, 81.973, 3.742, 0.678)
pt3dadd(174.488, 82.053, 3.719, 0.678)
pt3dadd(174.576, 82.13, 3.7, 0.678)
pt3dadd(174.674, 82.199, 3.7, 0.678)
pt3dadd(174.772, 82.268, 3.7, 0.678)
pt3dadd(174.87, 82.338, 3.7, 0.678)
pt3dadd(174.968, 82.407, 3.7, 0.678)
pt3dadd(175.066, 82.476, 3.7, 0.678)
pt3dadd(175.169, 82.534, 3.7, 0.678)
pt3dadd(175.284, 82.567, 3.7, 0.678)
pt3dadd(175.399, 82.599, 3.7, 0.678)
pt3dadd(175.493, 82.674, 3.7, 0.678)
pt3dadd(175.576, 82.76, 3.7, 0.678)
pt3dadd(175.65, 82.846, 3.677, 0.678)
pt3dadd(175.679, 82.903, 3.598, 0.678)
pt3dadd(175.68, 82.938, 3.503, 0.678)
pt3dadd(175.68, 83.006, 3.423, 0.678)
pt3dadd(175.693, 83.105, 3.368, 0.678)
pt3dadd(175.747, 83.184, 3.308, 0.678)
pt3dadd(175.804, 83.262, 3.248, 0.678)
pt3dadd(175.859, 83.34, 3.188, 0.678)
pt3dadd(175.914, 83.418, 3.128, 0.678)
pt3dadd(175.991, 83.448, 3.057, 0.678)
pt3dadd(176.069, 83.472, 2.984, 0.678)
pt3dadd(176.148, 83.496, 2.911, 0.678)
pt3dadd(176.226, 83.521, 2.838, 0.678)
pt3dadd(176.306, 83.559, 2.773, 0.678)
pt3dadd(176.39, 83.612, 2.716, 0.678)
pt3dadd(176.468, 83.665, 2.654, 0.678)
pt3dadd(176.544, 83.719, 2.591, 0.678)
pt3dadd(176.59, 83.739, 2.501, 0.678)
pt3dadd(176.635, 83.758, 2.409, 0.678)
pt3dadd(176.64, 83.756, 2.31, 0.678)
pt3dadd(176.64, 83.751, 2.211, 0.678)
pt3dadd(176.64, 83.746, 2.111, 0.678)
pt3dadd(176.68, 83.671, 2.041, 0.678)
pt3dadd(176.72, 83.595, 1.97, 0.678)
pt3dadd(176.76, 83.52, 1.9, 0.678)
}
dend_7[41] {pt3dclear()
pt3dadd(153.594, 78.851, 5.166, 0.678)
pt3dadd(153.56, 78.805, 5.173, 0.668)
pt3dadd(153.49, 78.71, 5.187, 0.644)
pt3dadd(153.419, 78.615, 5.201, 0.622)
pt3dadd(153.347, 78.519, 5.216, 0.598)
pt3dadd(153.276, 78.424, 5.23, 0.576)
pt3dadd(153.205, 78.329, 5.244, 0.554)
pt3dadd(153.134, 78.233, 5.258, 0.53)
pt3dadd(153.064, 78.138, 5.273, 0.508)
pt3dadd(152.993, 78.043, 5.287, 0.486)
pt3dadd(152.922, 77.948, 5.301, 0.462)
pt3dadd(152.851, 77.852, 5.315, 0.44)
pt3dadd(152.78, 77.757, 5.33, 0.418)
pt3dadd(152.71, 77.662, 5.344, 0.394)
pt3dadd(152.639, 77.566, 5.358, 0.372)
pt3dadd(152.567, 77.471, 5.372, 0.348)
pt3dadd(152.496, 77.376, 5.387, 0.326)
pt3dadd(152.425, 77.281, 5.401, 0.304)
pt3dadd(152.354, 77.185, 5.415, 0.28)
pt3dadd(152.286, 77.09, 5.429, 0.258)
pt3dadd(152.356, 76.992, 5.433, 0.254)
pt3dadd(152.424, 76.894, 5.437, 0.252)
pt3dadd(152.494, 76.796, 5.441, 0.248)
pt3dadd(152.563, 76.699, 5.445, 0.244)
pt3dadd(152.633, 76.601, 5.449, 0.24)
pt3dadd(152.701, 76.503, 5.453, 0.236)
pt3dadd(152.771, 76.405, 5.457, 0.234)
pt3dadd(152.84, 76.307, 5.461, 0.23)
pt3dadd(152.911, 76.211, 5.464, 0.226)
pt3dadd(152.995, 76.125, 5.466, 0.226)
pt3dadd(153.079, 76.039, 5.468, 0.226)
pt3dadd(153.163, 75.953, 5.47, 0.226)
pt3dadd(153.247, 75.867, 5.471, 0.226)
pt3dadd(153.33, 75.782, 5.473, 0.226)
pt3dadd(153.414, 75.696, 5.474, 0.226)
pt3dadd(153.498, 75.61, 5.476, 0.226)
pt3dadd(153.582, 75.524, 5.478, 0.226)
pt3dadd(153.666, 75.438, 5.48, 0.226)
pt3dadd(153.75, 75.353, 5.481, 0.226)
pt3dadd(153.834, 75.267, 5.484, 0.226)
pt3dadd(153.917, 75.181, 5.486, 0.226)
pt3dadd(154.001, 75.095, 5.488, 0.226)
pt3dadd(154.085, 75.009, 5.491, 0.226)
pt3dadd(154.168, 74.922, 5.493, 0.226)
}
}
proc shape3d_46() {
dend_7[41] { pt3dadd(154.252, 74.837, 5.495, 0.226)
pt3dadd(154.336, 74.751, 5.498, 0.226)
pt3dadd(154.418, 74.664, 5.5, 0.226)
pt3dadd(154.502, 74.578, 5.502, 0.226)
pt3dadd(154.586, 74.492, 5.505, 0.226)
pt3dadd(154.669, 74.405, 5.509, 0.236)
pt3dadd(154.751, 74.319, 5.513, 0.244)
pt3dadd(154.834, 74.232, 5.517, 0.252)
pt3dadd(154.916, 74.145, 5.521, 0.26)
pt3dadd(154.999, 74.058, 5.524, 0.268)
pt3dadd(155.082, 73.971, 5.529, 0.276)
pt3dadd(155.164, 73.884, 5.533, 0.284)
pt3dadd(155.246, 73.797, 5.536, 0.292)
pt3dadd(155.329, 73.71, 5.54, 0.3)
pt3dadd(155.412, 73.623, 5.544, 0.31)
pt3dadd(155.494, 73.536, 5.55, 0.324)
pt3dadd(155.575, 73.448, 5.555, 0.338)
pt3dadd(155.658, 73.361, 5.56, 0.352)
pt3dadd(155.74, 73.273, 5.565, 0.366)
pt3dadd(155.821, 73.185, 5.57, 0.38)
pt3dadd(155.903, 73.098, 5.576, 0.394)
pt3dadd(155.986, 73.011, 5.581, 0.408)
pt3dadd(156.067, 72.923, 5.586, 0.422)
pt3dadd(156.149, 72.835, 5.591, 0.436)
pt3dadd(156.23, 72.748, 5.596, 0.448)
pt3dadd(156.311, 72.659, 5.605, 0.434)
pt3dadd(156.39, 72.57, 5.614, 0.42)
pt3dadd(156.47, 72.481, 5.623, 0.406)
pt3dadd(156.55, 72.392, 5.631, 0.392)
pt3dadd(156.63, 72.303, 5.64, 0.378)
pt3dadd(156.709, 72.214, 5.649, 0.364)
pt3dadd(156.79, 72.125, 5.657, 0.35)
pt3dadd(156.869, 72.036, 5.666, 0.336)
pt3dadd(156.949, 71.947, 5.675, 0.322)
pt3dadd(157.028, 71.858, 5.685, 0.31)
pt3dadd(157.1, 71.764, 5.704, 0.302)
pt3dadd(157.172, 71.671, 5.723, 0.292)
pt3dadd(157.244, 71.578, 5.742, 0.284)
pt3dadd(157.316, 71.485, 5.761, 0.276)
pt3dadd(157.388, 71.392, 5.78, 0.266)
pt3dadd(157.46, 71.298, 5.799, 0.258)
pt3dadd(157.532, 71.205, 5.818, 0.25)
pt3dadd(157.604, 71.112, 5.837, 0.242)
pt3dadd(157.676, 71.019, 5.856, 0.232)
pt3dadd(157.746, 70.925, 5.878, 0.226)
pt3dadd(157.805, 70.829, 5.911, 0.226)
pt3dadd(157.865, 70.732, 5.944, 0.226)
pt3dadd(157.924, 70.636, 5.978, 0.226)
pt3dadd(157.984, 70.54, 6.011, 0.226)
pt3dadd(158.044, 70.443, 6.044, 0.226)
pt3dadd(158.102, 70.347, 6.077, 0.226)
pt3dadd(158.162, 70.25, 6.11, 0.226)
pt3dadd(158.221, 70.154, 6.143, 0.226)
pt3dadd(158.281, 70.058, 6.176, 0.226)
pt3dadd(158.344, 69.962, 6.207, 0.234)
pt3dadd(158.417, 69.871, 6.227, 0.264)
pt3dadd(158.491, 69.78, 6.247, 0.296)
pt3dadd(158.564, 69.688, 6.268, 0.326)
pt3dadd(158.639, 69.597, 6.288, 0.358)
pt3dadd(158.712, 69.505, 6.308, 0.388)
pt3dadd(158.786, 69.414, 6.329, 0.42)
pt3dadd(158.86, 69.322, 6.349, 0.452)
pt3dadd(158.934, 69.231, 6.369, 0.482)
pt3dadd(159.007, 69.139, 6.39, 0.514)
pt3dadd(159.083, 69.049, 6.409, 0.54)
pt3dadd(159.163, 68.961, 6.423, 0.544)
pt3dadd(159.242, 68.873, 6.436, 0.55)
pt3dadd(159.323, 68.786, 6.45, 0.556)
pt3dadd(159.403, 68.698, 6.464, 0.562)
pt3dadd(159.484, 68.61, 6.478, 0.566)
pt3dadd(159.563, 68.522, 6.492, 0.572)
pt3dadd(159.643, 68.434, 6.506, 0.578)
pt3dadd(159.724, 68.347, 6.52, 0.584)
pt3dadd(159.803, 68.259, 6.534, 0.588)
pt3dadd(159.886, 68.172, 6.547, 0.59)
pt3dadd(159.971, 68.089, 6.555, 0.576)
pt3dadd(160.057, 68.007, 6.563, 0.562)
pt3dadd(160.144, 67.924, 6.571, 0.546)
pt3dadd(160.23, 67.841, 6.579, 0.532)
pt3dadd(160.316, 67.758, 6.587, 0.518)
pt3dadd(160.403, 67.675, 6.596, 0.504)
pt3dadd(160.489, 67.592, 6.604, 0.49)
pt3dadd(160.574, 67.509, 6.612, 0.476)
pt3dadd(160.661, 67.426, 6.62, 0.462)
pt3dadd(160.752, 67.349, 6.626, 0.452)
pt3dadd(160.855, 67.288, 6.626, 0.452)
pt3dadd(160.957, 67.226, 6.626, 0.452)
pt3dadd(161.06, 67.164, 6.626, 0.452)
pt3dadd(161.164, 67.102, 6.626, 0.452)
pt3dadd(161.266, 67.04, 6.626, 0.452)
pt3dadd(161.369, 66.978, 6.626, 0.452)
pt3dadd(161.472, 66.916, 6.626, 0.452)
pt3dadd(161.574, 66.854, 6.626, 0.452)
pt3dadd(161.677, 66.792, 6.626, 0.452)
pt3dadd(161.778, 66.728, 6.626, 0.456)
pt3dadd(161.876, 66.658, 6.626, 0.466)
pt3dadd(161.974, 66.588, 6.626, 0.478)
pt3dadd(162.071, 66.519, 6.626, 0.488)
pt3dadd(162.169, 66.449, 6.626, 0.5)
pt3dadd(162.266, 66.379, 6.626, 0.51)
pt3dadd(162.364, 66.309, 6.626, 0.522)
pt3dadd(162.461, 66.239, 6.626, 0.532)
pt3dadd(162.559, 66.169, 6.626, 0.544)
pt3dadd(162.656, 66.099, 6.626, 0.554)
pt3dadd(162.752, 66.028, 6.626, 0.566)
pt3dadd(162.846, 65.953, 6.626, 0.578)
pt3dadd(162.941, 65.878, 6.626, 0.588)
pt3dadd(163.034, 65.803, 6.626, 0.6)
pt3dadd(163.128, 65.728, 6.626, 0.612)
pt3dadd(163.222, 65.653, 6.626, 0.624)
pt3dadd(163.315, 65.578, 6.626, 0.636)
pt3dadd(163.409, 65.503, 6.626, 0.646)
pt3dadd(163.502, 65.428, 6.626, 0.658)
pt3dadd(163.596, 65.353, 6.626, 0.67)
pt3dadd(163.688, 65.276, 6.626, 0.678)
pt3dadd(163.777, 65.195, 6.626, 0.678)
pt3dadd(163.865, 65.114, 6.626, 0.678)
pt3dadd(163.954, 65.033, 6.626, 0.678)
pt3dadd(164.042, 64.952, 6.626, 0.678)
pt3dadd(164.13, 64.871, 6.626, 0.678)
pt3dadd(164.219, 64.79, 6.626, 0.678)
pt3dadd(164.308, 64.708, 6.626, 0.678)
pt3dadd(164.395, 64.627, 6.626, 0.678)
pt3dadd(164.484, 64.546, 6.626, 0.678)
pt3dadd(164.572, 64.464, 6.626, 0.676)
pt3dadd(164.654, 64.378, 6.626, 0.666)
pt3dadd(164.738, 64.292, 6.626, 0.656)
pt3dadd(164.822, 64.206, 6.626, 0.646)
pt3dadd(164.906, 64.12, 6.626, 0.636)
pt3dadd(164.989, 64.034, 6.626, 0.626)
pt3dadd(165.073, 63.948, 6.626, 0.616)
pt3dadd(165.157, 63.862, 6.626, 0.606)
pt3dadd(165.241, 63.776, 6.626, 0.596)
pt3dadd(165.324, 63.69, 6.626, 0.586)
pt3dadd(165.408, 63.603, 6.626, 0.576)
pt3dadd(165.488, 63.515, 6.626, 0.568)
pt3dadd(165.57, 63.427, 6.626, 0.56)
pt3dadd(165.652, 63.339, 6.626, 0.552)
pt3dadd(165.733, 63.25, 6.626, 0.542)
pt3dadd(165.815, 63.162, 6.626, 0.534)
pt3dadd(165.895, 63.074, 6.626, 0.526)
pt3dadd(165.977, 62.986, 6.626, 0.518)
pt3dadd(166.058, 62.898, 6.626, 0.51)
pt3dadd(166.14, 62.809, 6.626, 0.502)
pt3dadd(166.22, 62.721, 6.626, 0.51)
pt3dadd(166.3, 62.63, 6.626, 0.552)
pt3dadd(166.379, 62.54, 6.626, 0.596)
pt3dadd(166.458, 62.45, 6.626, 0.64)
pt3dadd(166.537, 62.36, 6.626, 0.682)
pt3dadd(166.616, 62.27, 6.626, 0.726)
pt3dadd(166.697, 62.18, 6.626, 0.768)
pt3dadd(166.776, 62.09, 6.626, 0.812)
pt3dadd(166.855, 62, 6.626, 0.856)
pt3dadd(166.934, 61.91, 6.626, 0.898)
pt3dadd(167.01, 61.818, 6.626, 0.93)
pt3dadd(167.081, 61.72, 6.626, 0.932)
pt3dadd(167.15, 61.622, 6.626, 0.934)
pt3dadd(167.22, 61.525, 6.626, 0.936)
pt3dadd(167.29, 61.427, 6.626, 0.94)
pt3dadd(167.359, 61.33, 6.626, 0.942)
pt3dadd(167.43, 61.232, 6.626, 0.944)
pt3dadd(167.5, 61.134, 6.626, 0.946)
pt3dadd(167.569, 61.037, 6.626, 0.948)
pt3dadd(167.639, 60.939, 6.626, 0.952)
pt3dadd(167.706, 60.84, 6.626, 0.942)
pt3dadd(167.77, 60.738, 6.626, 0.916)
pt3dadd(167.832, 60.636, 6.626, 0.888)
pt3dadd(167.894, 60.533, 6.626, 0.86)
pt3dadd(167.958, 60.431, 6.626, 0.834)
pt3dadd(168.02, 60.329, 6.626, 0.806)
pt3dadd(168.083, 60.226, 6.626, 0.778)
pt3dadd(168.146, 60.124, 6.626, 0.75)
pt3dadd(168.209, 60.022, 6.626, 0.724)
pt3dadd(168.271, 59.92, 6.626, 0.696)
pt3dadd(168.337, 59.819, 6.626, 0.678)
pt3dadd(168.408, 59.723, 6.626, 0.678)
pt3dadd(168.48, 59.626, 6.626, 0.678)
pt3dadd(168.551, 59.529, 6.626, 0.678)
pt3dadd(168.622, 59.433, 6.626, 0.678)
pt3dadd(168.694, 59.336, 6.626, 0.678)
pt3dadd(168.764, 59.24, 6.626, 0.678)
pt3dadd(168.835, 59.143, 6.626, 0.678)
pt3dadd(168.907, 59.046, 6.626, 0.678)
pt3dadd(168.978, 58.95, 6.626, 0.678)
pt3dadd(169.051, 58.854, 6.626, 0.674)
pt3dadd(169.127, 58.762, 6.626, 0.664)
pt3dadd(169.202, 58.669, 6.626, 0.654)
pt3dadd(169.278, 58.576, 6.626, 0.644)
pt3dadd(169.355, 58.483, 6.626, 0.632)
pt3dadd(169.43, 58.39, 6.626, 0.622)
pt3dadd(169.506, 58.297, 6.626, 0.612)
pt3dadd(169.583, 58.204, 6.626, 0.602)
pt3dadd(169.658, 58.111, 6.625, 0.592)
pt3dadd(169.734, 58.018, 6.625, 0.58)
pt3dadd(169.811, 57.926, 6.625, 0.57)
pt3dadd(169.89, 57.835, 6.625, 0.554)
pt3dadd(169.968, 57.745, 6.625, 0.54)
pt3dadd(170.046, 57.654, 6.625, 0.526)
pt3dadd(170.125, 57.563, 6.625, 0.51)
pt3dadd(170.203, 57.472, 6.625, 0.496)
}
}
proc shape3d_47() {
dend_7[41] { pt3dadd(170.281, 57.381, 6.625, 0.482)
pt3dadd(170.36, 57.29, 6.625, 0.468)
pt3dadd(170.438, 57.199, 6.625, 0.452)
pt3dadd(170.516, 57.108, 6.625, 0.438)
pt3dadd(170.596, 57.018, 6.625, 0.424)
pt3dadd(170.677, 56.93, 6.625, 0.41)
pt3dadd(170.758, 56.841, 6.625, 0.396)
pt3dadd(170.839, 56.753, 6.625, 0.382)
pt3dadd(170.92, 56.664, 6.625, 0.366)
pt3dadd(171, 56.575, 6.625, 0.352)
pt3dadd(171.082, 56.487, 6.625, 0.338)
pt3dadd(171.162, 56.398, 6.625, 0.324)
pt3dadd(171.244, 56.31, 6.625, 0.31)
pt3dadd(171.324, 56.221, 6.625, 0.296)
pt3dadd(171.404, 56.132, 6.625, 0.29)
pt3dadd(171.484, 56.042, 6.625, 0.302)
pt3dadd(171.563, 55.951, 6.625, 0.312)
pt3dadd(171.642, 55.861, 6.625, 0.322)
pt3dadd(171.721, 55.771, 6.624, 0.334)
pt3dadd(171.8, 55.681, 6.624, 0.344)
pt3dadd(171.88, 55.591, 6.624, 0.354)
pt3dadd(171.959, 55.501, 6.624, 0.366)
pt3dadd(172.038, 55.41, 6.624, 0.376)
pt3dadd(172.117, 55.32, 6.624, 0.386)
pt3dadd(172.195, 55.23, 6.624, 0.404)
pt3dadd(172.273, 55.138, 6.624, 0.432)
pt3dadd(172.35, 55.046, 6.624, 0.46)
pt3dadd(172.427, 54.954, 6.624, 0.49)
pt3dadd(172.505, 54.862, 6.623, 0.518)
pt3dadd(172.582, 54.77, 6.623, 0.546)
pt3dadd(172.658, 54.678, 6.623, 0.574)
pt3dadd(172.736, 54.586, 6.623, 0.604)
pt3dadd(172.813, 54.495, 6.623, 0.632)
pt3dadd(172.89, 54.403, 6.623, 0.66)
pt3dadd(172.96, 54.305, 6.623, 0.678)
pt3dadd(173.015, 54.199, 6.622, 0.678)
pt3dadd(173.07, 54.092, 6.622, 0.678)
pt3dadd(173.125, 53.986, 6.622, 0.678)
pt3dadd(173.18, 53.879, 6.622, 0.678)
pt3dadd(173.236, 53.773, 6.621, 0.678)
pt3dadd(173.292, 53.667, 6.621, 0.678)
pt3dadd(173.347, 53.56, 6.621, 0.678)
pt3dadd(173.402, 53.454, 6.621, 0.678)
pt3dadd(173.458, 53.347, 6.62, 0.678)
pt3dadd(173.515, 53.242, 6.62, 0.67)
pt3dadd(173.575, 53.138, 6.62, 0.646)
pt3dadd(173.636, 53.035, 6.619, 0.622)
pt3dadd(173.698, 52.931, 6.619, 0.6)
pt3dadd(173.758, 52.828, 6.618, 0.576)
pt3dadd(173.819, 52.724, 6.618, 0.552)
pt3dadd(173.879, 52.621, 6.617, 0.53)
pt3dadd(173.94, 52.517, 6.617, 0.506)
pt3dadd(174.001, 52.414, 6.616, 0.482)
pt3dadd(174.061, 52.31, 6.616, 0.46)
pt3dadd(174.121, 52.206, 6.615, 0.436)
pt3dadd(174.18, 52.101, 6.614, 0.414)
pt3dadd(174.238, 51.997, 6.614, 0.392)
pt3dadd(174.296, 51.892, 6.613, 0.37)
pt3dadd(174.355, 51.787, 6.612, 0.348)
pt3dadd(174.413, 51.682, 6.611, 0.328)
pt3dadd(174.472, 51.577, 6.61, 0.306)
pt3dadd(174.529, 51.472, 6.61, 0.284)
pt3dadd(174.588, 51.367, 6.609, 0.262)
pt3dadd(174.647, 51.263, 6.608, 0.24)
pt3dadd(174.701, 51.156, 6.607, 0.226)
pt3dadd(174.751, 51.047, 6.606, 0.228)
pt3dadd(174.802, 50.938, 6.604, 0.228)
pt3dadd(174.851, 50.829, 6.603, 0.23)
pt3dadd(174.901, 50.72, 6.601, 0.23)
pt3dadd(174.952, 50.61, 6.6, 0.232)
pt3dadd(175.001, 50.501, 6.599, 0.234)
pt3dadd(175.051, 50.392, 6.597, 0.234)
pt3dadd(175.102, 50.283, 6.596, 0.236)
pt3dadd(175.151, 50.174, 6.594, 0.236)
pt3dadd(175.207, 50.069, 6.593, 0.244)
pt3dadd(175.273, 49.968, 6.59, 0.26)
pt3dadd(175.339, 49.868, 6.588, 0.276)
pt3dadd(175.405, 49.768, 6.585, 0.294)
pt3dadd(175.471, 49.668, 6.582, 0.31)
pt3dadd(175.537, 49.567, 6.58, 0.326)
pt3dadd(175.602, 49.467, 6.578, 0.342)
pt3dadd(175.668, 49.367, 6.575, 0.36)
pt3dadd(175.734, 49.266, 6.573, 0.376)
pt3dadd(175.8, 49.166, 6.57, 0.392)
pt3dadd(175.867, 49.067, 6.567, 0.4)
pt3dadd(175.936, 48.969, 6.561, 0.392)
pt3dadd(176.005, 48.87, 6.556, 0.386)
pt3dadd(176.074, 48.772, 6.551, 0.38)
pt3dadd(176.142, 48.674, 6.546, 0.372)
pt3dadd(176.212, 48.576, 6.541, 0.366)
pt3dadd(176.28, 48.478, 6.536, 0.36)
pt3dadd(176.348, 48.38, 6.531, 0.352)
pt3dadd(176.418, 48.282, 6.526, 0.346)
pt3dadd(176.486, 48.184, 6.521, 0.34)
pt3dadd(176.552, 48.084, 6.515, 0.338)
pt3dadd(176.616, 47.982, 6.506, 0.348)
pt3dadd(176.68, 47.881, 6.498, 0.358)
pt3dadd(176.742, 47.779, 6.49, 0.368)
pt3dadd(176.806, 47.678, 6.482, 0.378)
pt3dadd(176.869, 47.576, 6.473, 0.388)
pt3dadd(176.932, 47.475, 6.465, 0.396)
pt3dadd(176.995, 47.373, 6.457, 0.406)
pt3dadd(177.059, 47.272, 6.449, 0.416)
pt3dadd(177.121, 47.17, 6.44, 0.426)
pt3dadd(177.178, 47.066, 6.426, 0.446)
pt3dadd(177.224, 46.959, 6.406, 0.478)
pt3dadd(177.272, 46.851, 6.385, 0.512)
pt3dadd(177.32, 46.744, 6.365, 0.544)
pt3dadd(177.367, 46.636, 6.344, 0.576)
pt3dadd(177.415, 46.529, 6.324, 0.61)
pt3dadd(177.462, 46.421, 6.303, 0.642)
pt3dadd(177.51, 46.314, 6.283, 0.676)
pt3dadd(177.557, 46.206, 6.262, 0.708)
pt3dadd(177.605, 46.099, 6.242, 0.74)
pt3dadd(177.643, 45.996, 6.205, 0.73)
pt3dadd(177.677, 45.895, 6.158, 0.692)
pt3dadd(177.71, 45.795, 6.111, 0.652)
pt3dadd(177.743, 45.694, 6.065, 0.614)
pt3dadd(177.776, 45.593, 6.018, 0.576)
pt3dadd(177.81, 45.492, 5.971, 0.538)
pt3dadd(177.844, 45.392, 5.924, 0.498)
pt3dadd(177.877, 45.291, 5.877, 0.46)
pt3dadd(177.91, 45.191, 5.83, 0.422)
pt3dadd(177.943, 45.09, 5.784, 0.384)
pt3dadd(177.983, 44.984, 5.752, 0.384)
pt3dadd(178.025, 44.875, 5.727, 0.402)
pt3dadd(178.067, 44.767, 5.703, 0.42)
pt3dadd(178.108, 44.658, 5.678, 0.438)
pt3dadd(178.15, 44.55, 5.653, 0.456)
pt3dadd(178.192, 44.441, 5.629, 0.476)
pt3dadd(178.234, 44.333, 5.604, 0.494)
pt3dadd(178.276, 44.224, 5.579, 0.512)
pt3dadd(178.318, 44.116, 5.555, 0.53)
pt3dadd(178.36, 44.007, 5.53, 0.548)
pt3dadd(178.42, 43.905, 5.517, 0.526)
pt3dadd(178.483, 43.804, 5.506, 0.496)
pt3dadd(178.547, 43.704, 5.495, 0.464)
pt3dadd(178.61, 43.603, 5.484, 0.434)
pt3dadd(178.674, 43.502, 5.473, 0.402)
pt3dadd(178.739, 43.401, 5.462, 0.372)
pt3dadd(178.802, 43.301, 5.451, 0.34)
pt3dadd(178.866, 43.2, 5.44, 0.31)
pt3dadd(178.93, 43.099, 5.43, 0.278)
pt3dadd(178.994, 42.999, 5.419, 0.248)
pt3dadd(179.064, 42.901, 5.415, 0.256)
pt3dadd(179.135, 42.804, 5.413, 0.27)
pt3dadd(179.206, 42.708, 5.41, 0.286)
pt3dadd(179.276, 42.611, 5.408, 0.302)
pt3dadd(179.347, 42.514, 5.406, 0.318)
pt3dadd(179.418, 42.417, 5.403, 0.332)
pt3dadd(179.489, 42.321, 5.401, 0.348)
pt3dadd(179.561, 42.224, 5.399, 0.364)
pt3dadd(179.632, 42.127, 5.396, 0.38)
pt3dadd(179.702, 42.03, 5.394, 0.394)
pt3dadd(179.765, 41.928, 5.39, 0.412)
pt3dadd(179.825, 41.824, 5.385, 0.428)
pt3dadd(179.885, 41.721, 5.38, 0.444)
pt3dadd(179.945, 41.617, 5.375, 0.462)
pt3dadd(180.006, 41.514, 5.37, 0.478)
pt3dadd(180.066, 41.41, 5.365, 0.494)
pt3dadd(180.126, 41.307, 5.36, 0.512)
pt3dadd(180.186, 41.203, 5.355, 0.528)
pt3dadd(180.247, 41.099, 5.35, 0.544)
pt3dadd(180.307, 40.996, 5.345, 0.562)
pt3dadd(180.364, 40.89, 5.338, 0.568)
pt3dadd(180.42, 40.785, 5.331, 0.574)
pt3dadd(180.476, 40.679, 5.323, 0.58)
pt3dadd(180.533, 40.574, 5.316, 0.586)
pt3dadd(180.589, 40.468, 5.308, 0.592)
pt3dadd(180.646, 40.363, 5.3, 0.598)
pt3dadd(180.702, 40.257, 5.293, 0.604)
pt3dadd(180.758, 40.152, 5.285, 0.61)
pt3dadd(180.815, 40.046, 5.278, 0.616)
pt3dadd(180.871, 39.94, 5.27, 0.622)
pt3dadd(180.931, 39.837, 5.261, 0.608)
pt3dadd(180.992, 39.735, 5.251, 0.592)
pt3dadd(181.052, 39.632, 5.24, 0.574)
pt3dadd(181.114, 39.529, 5.23, 0.558)
pt3dadd(181.175, 39.426, 5.22, 0.542)
pt3dadd(181.235, 39.324, 5.21, 0.524)
pt3dadd(181.296, 39.221, 5.2, 0.508)
pt3dadd(181.357, 39.118, 5.19, 0.492)
pt3dadd(181.417, 39.015, 5.18, 0.476)
pt3dadd(181.478, 38.913, 5.17, 0.458)
pt3dadd(181.522, 38.808, 5.138, 0.442)
pt3dadd(181.561, 38.703, 5.104, 0.424)
pt3dadd(181.602, 38.598, 5.069, 0.408)
pt3dadd(181.642, 38.492, 5.034, 0.39)
pt3dadd(181.682, 38.387, 5, 0.374)
pt3dadd(181.722, 38.282, 4.965, 0.356)
pt3dadd(181.763, 38.177, 4.93, 0.34)
pt3dadd(181.802, 38.072, 4.896, 0.322)
pt3dadd(181.842, 37.967, 4.861, 0.306)
pt3dadd(181.883, 37.862, 4.826, 0.29)
pt3dadd(181.933, 37.758, 4.798, 0.292)
pt3dadd(181.985, 37.655, 4.77, 0.296)
pt3dadd(182.035, 37.551, 4.743, 0.302)
pt3dadd(182.087, 37.448, 4.715, 0.308)
pt3dadd(182.138, 37.345, 4.688, 0.314)
pt3dadd(182.19, 37.242, 4.66, 0.318)
}
}
proc shape3d_48() {
dend_7[41] { pt3dadd(182.242, 37.138, 4.633, 0.324)
pt3dadd(182.293, 37.035, 4.605, 0.328)
pt3dadd(182.345, 36.932, 4.578, 0.334)
pt3dadd(182.396, 36.829, 4.55, 0.34)
pt3dadd(182.446, 36.722, 4.532, 0.344)
pt3dadd(182.495, 36.615, 4.514, 0.35)
pt3dadd(182.544, 36.507, 4.496, 0.356)
pt3dadd(182.593, 36.4, 4.477, 0.36)
pt3dadd(182.642, 36.293, 4.459, 0.366)
pt3dadd(182.692, 36.186, 4.441, 0.37)
pt3dadd(182.742, 36.078, 4.423, 0.376)
pt3dadd(182.791, 35.971, 4.405, 0.38)
pt3dadd(182.84, 35.864, 4.387, 0.386)
pt3dadd(182.89, 35.757, 4.369, 0.39)
pt3dadd(182.924, 35.642, 4.359, 0.374)
pt3dadd(182.958, 35.528, 4.35, 0.358)
pt3dadd(182.993, 35.414, 4.34, 0.342)
pt3dadd(183.026, 35.299, 4.331, 0.324)
pt3dadd(183.061, 35.185, 4.321, 0.308)
pt3dadd(183.096, 35.07, 4.312, 0.292)
pt3dadd(183.13, 34.956, 4.302, 0.276)
pt3dadd(183.164, 34.842, 4.293, 0.258)
pt3dadd(183.198, 34.727, 4.283, 0.242)
pt3dadd(183.233, 34.613, 4.274, 0.226)
}
dend_7[42] {pt3dclear()
pt3dadd(145.862, 81.764, 5.445, 1.916)
pt3dadd(146.017, 81.866, 5.375, 1.902)
pt3dadd(146.104, 81.905, 5.262, 1.872)
pt3dadd(146.189, 81.943, 5.148, 1.84)
pt3dadd(146.275, 81.981, 5.035, 1.808)
pt3dadd(146.36, 82.019, 4.922, 1.776)
pt3dadd(146.446, 82.058, 4.809, 1.744)
pt3dadd(146.532, 82.096, 4.695, 1.712)
pt3dadd(146.617, 82.134, 4.582, 1.68)
pt3dadd(146.702, 82.172, 4.469, 1.65)
pt3dadd(146.789, 82.21, 4.356, 1.618)
pt3dadd(146.874, 82.249, 4.243, 1.586)
pt3dadd(146.96, 82.287, 4.129, 1.554)
pt3dadd(147.046, 82.325, 4.016, 1.522)
pt3dadd(147.131, 82.364, 3.903, 1.49)
pt3dadd(147.216, 82.402, 3.79, 1.46)
pt3dadd(147.301, 82.44, 3.676, 1.428)
pt3dadd(147.386, 82.478, 3.563, 1.396)
pt3dadd(147.473, 82.516, 3.45, 1.364)
pt3dadd(147.551, 82.477, 3.41, 1.356)
pt3dadd(147.626, 82.412, 3.396, 1.356)
pt3dadd(147.702, 82.346, 3.381, 1.356)
pt3dadd(147.778, 82.28, 3.367, 1.356)
pt3dadd(147.853, 82.215, 3.352, 1.356)
pt3dadd(147.929, 82.149, 3.338, 1.356)
pt3dadd(148.004, 82.083, 3.323, 1.356)
pt3dadd(148.08, 82.018, 3.309, 1.356)
pt3dadd(148.156, 81.952, 3.294, 1.356)
pt3dadd(148.231, 81.886, 3.28, 1.356)
pt3dadd(148.307, 81.821, 3.265, 1.356)
pt3dadd(148.382, 81.755, 3.251, 1.356)
pt3dadd(148.458, 81.689, 3.236, 1.356)
pt3dadd(148.534, 81.624, 3.213, 1.356)
pt3dadd(148.609, 81.56, 3.186, 1.356)
pt3dadd(148.685, 81.498, 3.155, 1.356)
pt3dadd(148.76, 81.484, 3.058, 1.356)
pt3dadd(148.836, 81.471, 2.961, 1.356)
pt3dadd(148.912, 81.505, 2.849, 1.356)
pt3dadd(148.987, 81.538, 2.737, 1.356)
pt3dadd(149.063, 81.521, 2.643, 1.356)
pt3dadd(149.138, 81.503, 2.549, 1.356)
pt3dadd(149.214, 81.557, 2.534, 1.356)
pt3dadd(149.29, 81.54, 2.439, 1.356)
pt3dadd(149.365, 81.522, 2.345, 1.356)
pt3dadd(149.441, 81.499, 2.257, 1.356)
pt3dadd(149.515, 81.437, 2.22, 1.356)
pt3dadd(149.591, 81.374, 2.183, 1.356)
pt3dadd(149.666, 81.369, 2.101, 1.356)
pt3dadd(149.742, 81.403, 1.988, 1.356)
pt3dadd(149.818, 81.437, 1.875, 1.356)
pt3dadd(149.893, 81.491, 1.761, 1.356)
pt3dadd(149.969, 81.545, 1.646, 1.356)
}
dend_7[43] {pt3dclear()
pt3dadd(149.969, 81.545, 1.646, 1.356)
pt3dadd(149.893, 81.491, 1.561, 1.356)
}
dend_7[44] {pt3dclear()
pt3dadd(149.969, 81.545, 1.646, 1.356)
pt3dadd(150.044, 81.6, 1.632, 2.034)
pt3dadd(150.12, 81.654, 1.617, 2.034)
pt3dadd(150.196, 81.708, 1.503, 2.056)
pt3dadd(150.271, 81.763, 1.388, 2.078)
pt3dadd(150.347, 81.817, 1.274, 2.098)
pt3dadd(150.422, 81.871, 1.159, 2.12)
pt3dadd(150.498, 81.926, 1.045, 2.142)
pt3dadd(150.574, 81.98, 0.93, 2.164)
pt3dadd(150.649, 82.034, 0.816, 2.184)
pt3dadd(150.727, 82.089, 0.701, 2.188)
pt3dadd(150.804, 82.143, 0.587, 2.192)
pt3dadd(150.882, 82.198, 0.472, 2.196)
pt3dadd(150.959, 82.252, 0.358, 2.2)
pt3dadd(151.037, 82.307, 0.244, 2.204)
pt3dadd(151.115, 82.362, 0.129, 2.206)
pt3dadd(151.267, 82.47, 0.011, 2.21)
}
dend_7[45] {pt3dclear()
pt3dadd(151.267, 82.47, 0.011, 2.21)
pt3dadd(151.243, 82.354, -0.004, 2.132)
pt3dadd(151.219, 82.238, -0.02, 2.054)
pt3dadd(151.196, 82.122, -0.035, 1.976)
pt3dadd(151.172, 82.006, -0.05, 1.896)
pt3dadd(151.148, 81.889, -0.065, 1.818)
pt3dadd(151.124, 81.773, -0.081, 1.74)
pt3dadd(151.1, 81.657, -0.096, 1.662)
pt3dadd(151.078, 81.541, -0.111, 1.584)
pt3dadd(151.054, 81.425, -0.127, 1.506)
pt3dadd(151.03, 81.308, -0.142, 1.428)
pt3dadd(151.006, 81.192, -0.157, 1.348)
pt3dadd(150.983, 81.076, -0.173, 1.27)
pt3dadd(150.959, 80.96, -0.188, 1.192)
pt3dadd(150.918, 80.856, -0.2, 1.138)
pt3dadd(150.81, 80.803, -0.2, 1.18)
pt3dadd(150.702, 80.75, -0.2, 1.222)
pt3dadd(150.595, 80.697, -0.2, 1.262)
pt3dadd(150.487, 80.644, -0.2, 1.304)
pt3dadd(150.379, 80.591, -0.2, 1.346)
pt3dadd(150.264, 80.565, -0.204, 1.37)
pt3dadd(150.145, 80.549, -0.209, 1.39)
pt3dadd(150.026, 80.532, -0.214, 1.41)
pt3dadd(149.908, 80.515, -0.219, 1.428)
pt3dadd(149.789, 80.499, -0.224, 1.448)
pt3dadd(149.671, 80.482, -0.23, 1.468)
pt3dadd(149.558, 80.451, -0.237, 1.484)
pt3dadd(149.459, 80.384, -0.252, 1.496)
pt3dadd(149.362, 80.317, -0.266, 1.506)
pt3dadd(149.263, 80.25, -0.28, 1.516)
pt3dadd(149.165, 80.183, -0.294, 1.528)
pt3dadd(149.062, 80.126, -0.309, 1.518)
pt3dadd(148.955, 80.077, -0.324, 1.494)
pt3dadd(148.847, 80.036, -0.35, 1.444)
pt3dadd(148.74, 80.005, -0.387, 1.36)
pt3dadd(148.664, 79.951, -0.433, 1.266)
pt3dadd(148.646, 79.856, -0.492, 1.16)
pt3dadd(148.633, 79.755, -0.544, 1.068)
pt3dadd(148.626, 79.647, -0.588, 0.994)
pt3dadd(148.588, 79.564, -0.642, 0.958)
pt3dadd(148.514, 79.506, -0.706, 0.966)
pt3dadd(148.444, 79.448, -0.77, 0.976)
pt3dadd(148.368, 79.373, -0.8, 1.004)
pt3dadd(148.289, 79.283, -0.8, 1.052)
pt3dadd(148.207, 79.195, -0.8, 1.124)
pt3dadd(148.153, 79.091, -0.8, 1.148)
pt3dadd(148.11, 78.978, -0.8, 1.138)
pt3dadd(148.068, 78.866, -0.8, 1.13)
pt3dadd(148.026, 78.754, -0.8, 1.12)
pt3dadd(147.983, 78.642, -0.8, 1.11)
pt3dadd(147.965, 78.526, -0.8, 1.102)
pt3dadd(147.972, 78.406, -0.8, 1.094)
pt3dadd(147.978, 78.286, -0.8, 1.086)
pt3dadd(147.985, 78.166, -0.8, 1.078)
pt3dadd(147.991, 78.046, -0.8, 1.072)
pt3dadd(147.998, 77.927, -0.8, 1.064)
pt3dadd(148.004, 77.807, -0.8, 1.056)
pt3dadd(147.998, 77.689, -0.815, 1.048)
pt3dadd(147.991, 77.571, -0.834, 1.038)
pt3dadd(147.984, 77.454, -0.853, 1.028)
pt3dadd(147.976, 77.336, -0.872, 1.018)
pt3dadd(147.967, 77.218, -0.891, 1.008)
pt3dadd(147.942, 77.104, -0.907, 1.002)
pt3dadd(147.899, 76.993, -0.921, 0.996)
pt3dadd(147.858, 76.882, -0.935, 0.992)
pt3dadd(147.816, 76.77, -0.949, 0.986)
pt3dadd(147.775, 76.659, -0.963, 0.98)
pt3dadd(147.76, 76.557, -1.009, 0.962)
pt3dadd(147.751, 76.457, -1.064, 0.94)
pt3dadd(147.745, 76.358, -1.12, 0.92)
pt3dadd(147.738, 76.258, -1.175, 0.898)
pt3dadd(147.732, 76.157, -1.228, 0.876)
pt3dadd(147.724, 76.046, -1.265, 0.852)
pt3dadd(147.716, 75.934, -1.3, 0.83)
pt3dadd(147.714, 75.814, -1.3, 0.838)
pt3dadd(147.712, 75.694, -1.3, 0.848)
pt3dadd(147.685, 75.582, -1.3, 0.872)
pt3dadd(147.62, 75.481, -1.3, 0.92)
pt3dadd(147.56, 75.379, -1.309, 0.968)
pt3dadd(147.522, 75.274, -1.345, 1.022)
pt3dadd(147.456, 75.192, -1.375, 1.06)
pt3dadd(147.349, 75.146, -1.398, 1.074)
pt3dadd(147.241, 75.1, -1.42, 1.09)
pt3dadd(147.134, 75.054, -1.443, 1.104)
pt3dadd(147.113, 75.007, -1.529, 1.104)
pt3dadd(147.098, 74.96, -1.62, 1.104)
pt3dadd(147.02, 74.932, -1.688, 1.088)
pt3dadd(146.932, 74.907, -1.751, 1.07)
pt3dadd(146.834, 74.886, -1.8, 1.05)
pt3dadd(146.716, 74.873, -1.8, 1.024)
pt3dadd(146.596, 74.86, -1.8, 0.998)
pt3dadd(146.48, 74.84, -1.808, 0.974)
pt3dadd(146.377, 74.793, -1.842, 0.956)
pt3dadd(146.275, 74.746, -1.876, 0.936)
pt3dadd(146.22, 74.656, -1.895, 0.922)
pt3dadd(146.196, 74.539, -1.905, 0.91)
pt3dadd(146.186, 74.423, -1.922, 0.892)
pt3dadd(146.167, 74.316, -1.956, 0.876)
pt3dadd(146.124, 74.214, -1.995, 0.87)
pt3dadd(146.082, 74.112, -2.034, 0.864)
pt3dadd(146.039, 74.01, -2.073, 0.858)
pt3dadd(145.998, 73.905, -2.102, 0.852)
pt3dadd(145.958, 73.792, -2.109, 0.848)
pt3dadd(145.92, 73.678, -2.115, 0.842)
pt3dadd(145.882, 73.565, -2.122, 0.838)
}
}
proc shape3d_49() {
dend_7[45] { pt3dadd(145.842, 73.452, -2.128, 0.832)
pt3dadd(145.795, 73.345, -2.14, 0.828)
pt3dadd(145.721, 73.254, -2.163, 0.828)
pt3dadd(145.648, 73.163, -2.186, 0.828)
pt3dadd(145.573, 73.072, -2.208, 0.828)
pt3dadd(145.5, 72.982, -2.232, 0.828)
pt3dadd(145.501, 72.869, -2.26, 0.828)
pt3dadd(145.507, 72.754, -2.289, 0.828)
pt3dadd(145.475, 72.645, -2.3, 0.836)
pt3dadd(145.418, 72.539, -2.3, 0.848)
pt3dadd(145.337, 72.461, -2.3, 0.868)
pt3dadd(145.225, 72.416, -2.3, 0.898)
pt3dadd(145.114, 72.372, -2.3, 0.93)
pt3dadd(145.006, 72.321, -2.3, 0.962)
pt3dadd(144.896, 72.269, -2.3, 0.994)
pt3dadd(144.793, 72.209, -2.3, 1.016)
pt3dadd(144.692, 72.147, -2.306, 1.026)
pt3dadd(144.589, 72.105, -2.342, 1.01)
pt3dadd(144.485, 72.062, -2.379, 0.994)
pt3dadd(144.383, 72.019, -2.415, 0.978)
pt3dadd(144.28, 71.976, -2.451, 0.962)
pt3dadd(144.186, 71.909, -2.471, 0.948)
pt3dadd(144.102, 71.824, -2.478, 0.938)
pt3dadd(144.018, 71.739, -2.485, 0.928)
pt3dadd(143.933, 71.654, -2.492, 0.916)
pt3dadd(143.849, 71.569, -2.499, 0.906)
pt3dadd(143.8, 71.462, -2.5, 0.904)
pt3dadd(143.758, 71.349, -2.5, 0.904)
pt3dadd(143.678, 71.269, -2.5, 0.936)
pt3dadd(143.573, 71.211, -2.5, 0.99)
pt3dadd(143.47, 71.163, -2.514, 1.048)
pt3dadd(143.368, 71.139, -2.563, 1.108)
pt3dadd(143.272, 71.107, -2.614, 1.168)
pt3dadd(143.194, 71.045, -2.67, 1.226)
pt3dadd(143.102, 71.004, -2.721, 1.256)
pt3dadd(142.996, 70.985, -2.764, 1.256)
pt3dadd(142.889, 70.967, -2.808, 1.256)
pt3dadd(142.783, 70.948, -2.851, 1.256)
pt3dadd(142.746, 70.846, -2.881, 1.222)
pt3dadd(142.717, 70.735, -2.909, 1.184)
pt3dadd(142.691, 70.632, -2.94, 1.066)
pt3dadd(142.597, 70.572, -2.976, 0.998)
pt3dadd(142.506, 70.507, -3.013, 0.936)
pt3dadd(142.424, 70.431, -3.05, 0.88)
pt3dadd(142.364, 70.336, -3.076, 0.826)
pt3dadd(142.322, 70.225, -3.092, 0.776)
pt3dadd(142.303, 70.113, -3.116, 0.748)
pt3dadd(142.303, 69.998, -3.146, 0.736)
pt3dadd(142.285, 69.89, -3.179, 0.73)
pt3dadd(142.226, 69.798, -3.221, 0.74)
pt3dadd(142.169, 69.706, -3.262, 0.748)
pt3dadd(142.096, 69.625, -3.297, 0.776)
pt3dadd(141.994, 69.567, -3.319, 0.838)
pt3dadd(141.926, 69.489, -3.341, 0.9)
pt3dadd(141.92, 69.372, -3.363, 0.958)
pt3dadd(141.914, 69.255, -3.386, 1.016)
pt3dadd(141.894, 69.141, -3.4, 1.088)
pt3dadd(141.844, 69.032, -3.4, 1.178)
pt3dadd(141.785, 68.935, -3.406, 1.262)
pt3dadd(141.678, 68.905, -3.442, 1.308)
pt3dadd(141.57, 68.874, -3.478, 1.354)
pt3dadd(141.49, 68.818, -3.519, 1.392)
pt3dadd(141.457, 68.718, -3.567, 1.42)
pt3dadd(141.412, 68.615, -3.591, 1.432)
pt3dadd(141.356, 68.509, -3.595, 1.432)
pt3dadd(141.3, 68.403, -3.599, 1.432)
pt3dadd(141.259, 68.291, -3.6, 1.44)
pt3dadd(141.224, 68.176, -3.6, 1.45)
pt3dadd(141.176, 68.067, -3.6, 1.456)
pt3dadd(141.118, 67.963, -3.6, 1.448)
pt3dadd(141.06, 67.857, -3.6, 1.436)
pt3dadd(140.972, 67.784, -3.6, 1.412)
pt3dadd(140.864, 67.733, -3.6, 1.38)
pt3dadd(140.78, 67.694, -3.6, 1.356)
pt3dadd(140.779, 67.693, -3.601, 1.358)
pt3dadd(140.701, 67.639, -3.664, 1.428)
pt3dadd(140.624, 67.586, -3.726, 1.498)
pt3dadd(140.548, 67.532, -3.788, 1.568)
pt3dadd(140.494, 67.462, -3.851, 1.652)
pt3dadd(140.468, 67.371, -3.913, 1.752)
pt3dadd(140.443, 67.281, -3.974, 1.85)
pt3dadd(140.422, 67.182, -4.027, 1.94)
pt3dadd(140.406, 67.073, -4.066, 2.016)
pt3dadd(140.362, 66.978, -4.102, 2.05)
pt3dadd(140.276, 66.903, -4.134, 2.03)
pt3dadd(140.19, 66.828, -4.166, 2.01)
pt3dadd(140.108, 66.743, -4.184, 1.906)
pt3dadd(140.026, 66.658, -4.2, 1.79)
pt3dadd(139.949, 66.568, -4.208, 1.566)
pt3dadd(139.886, 66.47, -4.231, 1.52)
pt3dadd(139.823, 66.372, -4.253, 1.474)
pt3dadd(139.759, 66.273, -4.276, 1.428)
pt3dadd(139.697, 66.175, -4.299, 1.382)
pt3dadd(139.643, 66.084, -4.347, 1.352)
pt3dadd(139.591, 65.994, -4.396, 1.32)
pt3dadd(139.538, 65.903, -4.444, 1.29)
pt3dadd(139.486, 65.812, -4.493, 1.26)
pt3dadd(139.388, 65.762, -4.529, 1.244)
pt3dadd(139.285, 65.717, -4.563, 1.232)
pt3dadd(139.222, 65.621, -4.582, 1.242)
pt3dadd(139.163, 65.518, -4.599, 1.254)
pt3dadd(139.08, 65.433, -4.6, 1.222)
pt3dadd(138.994, 65.349, -4.6, 1.188)
pt3dadd(138.943, 65.242, -4.6, 1.116)
pt3dadd(138.901, 65.13, -4.6, 1.038)
pt3dadd(138.866, 65.015, -4.602, 0.966)
pt3dadd(138.836, 64.899, -4.605, 0.9)
pt3dadd(138.806, 64.783, -4.608, 0.834)
pt3dadd(138.776, 64.667, -4.61, 0.768)
pt3dadd(138.686, 64.626, -4.642, 0.7)
pt3dadd(138.577, 64.609, -4.683, 0.632)
pt3dadd(138.475, 64.584, -4.729, 0.536)
pt3dadd(138.398, 64.505, -4.768, 0.528)
pt3dadd(138.322, 64.423, -4.801, 0.528)
pt3dadd(138.227, 64.35, -4.806, 0.54)
pt3dadd(138.136, 64.275, -4.813, 0.552)
pt3dadd(138.12, 64.165, -4.852, 0.566)
pt3dadd(138.106, 64.055, -4.889, 0.58)
pt3dadd(138.103, 63.936, -4.893, 0.608)
pt3dadd(138.1, 63.816, -4.898, 0.638)
pt3dadd(138.079, 63.699, -4.9, 0.692)
pt3dadd(138.036, 63.587, -4.9, 0.776)
pt3dadd(137.984, 63.479, -4.9, 0.816)
pt3dadd(137.933, 63.371, -4.9, 0.856)
pt3dadd(137.881, 63.263, -4.9, 0.896)
pt3dadd(137.828, 63.154, -4.9, 0.936)
pt3dadd(137.777, 63.046, -4.9, 0.974)
pt3dadd(137.752, 62.929, -4.904, 1.064)
pt3dadd(137.73, 62.812, -4.909, 1.162)
pt3dadd(137.698, 62.703, -4.935, 1.26)
pt3dadd(137.656, 62.603, -4.978, 1.356)
pt3dadd(137.612, 62.497, -5.006, 1.42)
pt3dadd(137.569, 62.389, -5.029, 1.472)
pt3dadd(137.519, 62.341, -5.102, 1.482)
pt3dadd(137.466, 62.308, -5.188, 1.482)
pt3dadd(137.402, 62.225, -5.229, 1.468)
pt3dadd(137.336, 62.133, -5.262, 1.45)
pt3dadd(137.269, 62.041, -5.295, 1.434)
pt3dadd(137.196, 61.948, -5.305, 1.39)
pt3dadd(137.12, 61.855, -5.31, 1.34)
pt3dadd(137.029, 61.791, -5.34, 1.198)
pt3dadd(136.95, 61.715, -5.38, 1.156)
pt3dadd(136.871, 61.639, -5.42, 1.114)
pt3dadd(136.792, 61.563, -5.46, 1.072)
pt3dadd(136.712, 61.486, -5.5, 1.028)
pt3dadd(136.656, 61.38, -5.5, 0.97)
pt3dadd(136.598, 61.275, -5.5, 0.912)
pt3dadd(136.504, 61.205, -5.5, 0.894)
pt3dadd(136.403, 61.14, -5.5, 0.884)
pt3dadd(136.291, 61.105, -5.508, 0.91)
pt3dadd(136.174, 61.087, -5.521, 0.958)
pt3dadd(136.06, 61.066, -5.535, 1.008)
pt3dadd(136.042, 60.966, -5.588, 1.086)
pt3dadd(136.025, 60.864, -5.639, 1.162)
pt3dadd(136.004, 60.758, -5.682, 1.222)
pt3dadd(135.941, 60.664, -5.711, 1.22)
pt3dadd(135.87, 60.573, -5.737, 1.208)
pt3dadd(135.798, 60.481, -5.762, 1.198)
pt3dadd(135.727, 60.39, -5.788, 1.186)
pt3dadd(135.654, 60.298, -5.803, 1.16)
pt3dadd(135.577, 60.205, -5.808, 1.124)
pt3dadd(135.523, 60.106, -5.832, 1.086)
pt3dadd(135.492, 60.002, -5.873, 1.044)
pt3dadd(135.466, 59.889, -5.892, 1.016)
pt3dadd(135.444, 59.771, -5.897, 0.994)
pt3dadd(135.432, 59.653, -5.901, 0.972)
pt3dadd(135.444, 59.534, -5.905, 0.946)
pt3dadd(135.457, 59.415, -5.909, 0.92)
pt3dadd(135.45, 59.299, -5.922, 0.898)
pt3dadd(135.416, 59.189, -5.95, 0.882)
pt3dadd(135.383, 59.078, -5.977, 0.866)
pt3dadd(135.347, 58.972, -6.009, 0.856)
pt3dadd(135.294, 58.89, -6.066, 0.87)
pt3dadd(135.239, 58.803, -6.118, 0.892)
pt3dadd(135.18, 58.711, -6.16, 0.924)
pt3dadd(135.119, 58.623, -6.2, 0.956)
pt3dadd(135.005, 58.585, -6.2, 0.996)
pt3dadd(134.891, 58.546, -6.2, 1.036)
pt3dadd(134.813, 58.469, -6.202, 1.06)
pt3dadd(134.762, 58.36, -6.206, 1.068)
pt3dadd(134.713, 58.251, -6.21, 1.078)
pt3dadd(134.657, 58.155, -6.242, 1.07)
pt3dadd(134.598, 58.065, -6.286, 1.056)
pt3dadd(134.514, 57.984, -6.3, 0.972)
pt3dadd(134.408, 57.927, -6.3, 0.95)
pt3dadd(134.304, 57.868, -6.3, 0.928)
pt3dadd(134.248, 57.762, -6.3, 0.906)
pt3dadd(134.19, 57.657, -6.3, 0.882)
pt3dadd(134.124, 57.57, -6.338, 0.866)
pt3dadd(134.053, 57.493, -6.383, 0.852)
pt3dadd(133.952, 57.477, -6.436, 0.84)
pt3dadd(133.853, 57.459, -6.489, 0.828)
pt3dadd(133.769, 57.374, -6.492, 0.836)
pt3dadd(133.685, 57.288, -6.495, 0.844)
pt3dadd(133.601, 57.202, -6.498, 0.85)
pt3dadd(133.547, 57.099, -6.5, 0.86)
pt3dadd(133.52, 56.983, -6.5, 0.87)
pt3dadd(133.483, 56.871, -6.5, 0.886)
pt3dadd(133.424, 56.772, -6.5, 0.904)
pt3dadd(133.398, 56.655, -6.5, 0.904)
}
}
proc shape3d_50() {
dend_7[45] { pt3dadd(133.37, 56.538, -6.5, 0.904)
pt3dadd(133.344, 56.421, -6.5, 0.904)
pt3dadd(133.318, 56.304, -6.5, 0.904)
pt3dadd(133.291, 56.187, -6.5, 0.904)
pt3dadd(133.273, 56.072, -6.521, 0.9)
pt3dadd(133.255, 55.956, -6.544, 0.894)
pt3dadd(133.238, 55.841, -6.566, 0.89)
pt3dadd(133.22, 55.725, -6.589, 0.884)
pt3dadd(133.202, 55.609, -6.611, 0.878)
pt3dadd(133.174, 55.523, -6.676, 0.874)
pt3dadd(133.145, 55.438, -6.742, 0.868)
pt3dadd(133.116, 55.352, -6.808, 0.862)
pt3dadd(133.087, 55.266, -6.874, 0.856)
pt3dadd(133.06, 55.167, -6.924, 0.846)
pt3dadd(133.034, 55.064, -6.97, 0.834)
pt3dadd(133.008, 54.96, -7.015, 0.822)
pt3dadd(132.982, 54.857, -7.061, 0.81)
pt3dadd(132.956, 54.75, -7.101, 0.802)
pt3dadd(132.93, 54.639, -7.132, 0.796)
pt3dadd(132.904, 54.528, -7.164, 0.79)
pt3dadd(132.877, 54.417, -7.195, 0.786)
pt3dadd(132.851, 54.307, -7.227, 0.78)
pt3dadd(132.815, 54.202, -7.264, 0.77)
pt3dadd(132.776, 54.098, -7.303, 0.758)
pt3dadd(132.737, 53.994, -7.341, 0.746)
pt3dadd(132.698, 53.891, -7.38, 0.734)
pt3dadd(132.66, 53.786, -7.416, 0.726)
pt3dadd(132.623, 53.679, -7.448, 0.72)
pt3dadd(132.586, 53.571, -7.481, 0.714)
pt3dadd(132.548, 53.464, -7.514, 0.708)
pt3dadd(132.511, 53.358, -7.548, 0.702)
pt3dadd(132.482, 53.267, -7.608, 0.696)
pt3dadd(132.455, 53.175, -7.669, 0.69)
pt3dadd(132.426, 53.084, -7.729, 0.686)
pt3dadd(132.398, 52.992, -7.789, 0.68)
pt3dadd(132.336, 52.899, -7.819, 0.678)
pt3dadd(132.265, 52.806, -7.842, 0.678)
pt3dadd(132.196, 52.712, -7.865, 0.678)
pt3dadd(132.125, 52.619, -7.888, 0.678)
pt3dadd(132.072, 52.515, -7.9, 0.678)
pt3dadd(132.04, 52.4, -7.9, 0.678)
pt3dadd(132.007, 52.284, -7.9, 0.678)
pt3dadd(131.975, 52.169, -7.9, 0.678)
pt3dadd(131.941, 52.054, -7.9, 0.678)
pt3dadd(131.912, 51.938, -7.9, 0.678)
pt3dadd(131.923, 51.818, -7.9, 0.682)
pt3dadd(131.934, 51.699, -7.9, 0.686)
pt3dadd(131.944, 51.579, -7.9, 0.69)
pt3dadd(131.954, 51.46, -7.9, 0.692)
pt3dadd(131.965, 51.34, -7.9, 0.696)
pt3dadd(131.976, 51.221, -7.9, 0.7)
pt3dadd(131.994, 51.103, -7.9, 0.704)
pt3dadd(132.041, 50.993, -7.9, 0.708)
pt3dadd(132.089, 50.883, -7.9, 0.712)
pt3dadd(132.137, 50.772, -7.9, 0.718)
pt3dadd(132.184, 50.662, -7.9, 0.722)
pt3dadd(132.232, 50.552, -7.9, 0.726)
pt3dadd(132.265, 50.438, -7.9, 0.732)
pt3dadd(132.29, 50.32, -7.9, 0.74)
pt3dadd(132.316, 50.203, -7.9, 0.748)
pt3dadd(132.341, 50.085, -7.9, 0.756)
pt3dadd(132.365, 49.968, -7.9, 0.764)
pt3dadd(132.39, 49.851, -7.9, 0.772)
pt3dadd(132.415, 49.733, -7.9, 0.778)
pt3dadd(132.439, 49.616, -7.9, 0.778)
pt3dadd(132.464, 49.499, -7.9, 0.778)
pt3dadd(132.49, 49.381, -7.9, 0.778)
pt3dadd(132.515, 49.264, -7.9, 0.778)
pt3dadd(132.54, 49.146, -7.9, 0.778)
pt3dadd(132.565, 49.029, -7.9, 0.778)
pt3dadd(132.58, 48.91, -7.9, 0.778)
pt3dadd(132.592, 48.791, -7.9, 0.778)
pt3dadd(132.605, 48.671, -7.9, 0.778)
pt3dadd(132.617, 48.552, -7.9, 0.778)
pt3dadd(132.63, 48.433, -7.9, 0.778)
pt3dadd(132.642, 48.313, -7.9, 0.778)
pt3dadd(132.654, 48.194, -7.9, 0.778)
pt3dadd(132.684, 48.078, -7.9, 0.772)
pt3dadd(132.716, 47.962, -7.9, 0.762)
pt3dadd(132.748, 47.847, -7.9, 0.754)
pt3dadd(132.78, 47.731, -7.9, 0.746)
pt3dadd(132.811, 47.615, -7.9, 0.738)
pt3dadd(132.844, 47.499, -7.9, 0.73)
pt3dadd(132.86, 47.381, -7.9, 0.726)
pt3dadd(132.874, 47.262, -7.9, 0.722)
pt3dadd(132.886, 47.142, -7.9, 0.718)
pt3dadd(132.899, 47.023, -7.9, 0.714)
pt3dadd(132.911, 46.904, -7.9, 0.71)
pt3dadd(132.923, 46.784, -7.9, 0.708)
pt3dadd(132.936, 46.665, -7.9, 0.704)
pt3dadd(132.95, 46.546, -7.9, 0.698)
pt3dadd(132.965, 46.427, -7.9, 0.69)
pt3dadd(132.979, 46.308, -7.9, 0.682)
pt3dadd(132.994, 46.188, -7.9, 0.676)
pt3dadd(133.008, 46.069, -7.9, 0.668)
pt3dadd(133.022, 45.95, -7.9, 0.662)
pt3dadd(133.037, 45.831, -7.9, 0.654)
pt3dadd(133.064, 45.714, -7.9, 0.65)
pt3dadd(133.094, 45.598, -7.9, 0.646)
pt3dadd(133.123, 45.482, -7.9, 0.642)
pt3dadd(133.153, 45.366, -7.9, 0.638)
pt3dadd(133.183, 45.249, -7.9, 0.634)
pt3dadd(133.212, 45.133, -7.9, 0.628)
pt3dadd(133.253, 45.02, -7.9, 0.62)
pt3dadd(133.298, 44.909, -7.9, 0.61)
pt3dadd(133.34, 44.799, -7.909, 0.61)
pt3dadd(133.378, 44.692, -7.942, 0.634)
pt3dadd(133.427, 44.59, -7.971, 0.666)
pt3dadd(133.512, 44.508, -7.988, 0.718)
pt3dadd(133.604, 44.442, -8.011, 0.77)
pt3dadd(133.712, 44.412, -8.046, 0.822)
pt3dadd(133.807, 44.359, -8.077, 0.862)
pt3dadd(133.879, 44.269, -8.105, 0.87)
pt3dadd(133.94, 44.173, -8.136, 0.806)
pt3dadd(134.002, 44.077, -8.168, 0.742)
pt3dadd(134.063, 43.981, -8.2, 0.678)
}
dend_7[46] {pt3dclear()
pt3dadd(151.267, 82.47, 0.011, 2.21)
pt3dadd(151.3, 82.474, -0.052, 2.204)
pt3dadd(151.346, 82.479, -0.144, 2.194)
pt3dadd(151.394, 82.484, -0.236, 2.184)
pt3dadd(151.441, 82.489, -0.328, 2.176)
pt3dadd(151.489, 82.494, -0.42, 2.166)
pt3dadd(151.526, 82.489, -0.513, 2.15)
pt3dadd(151.549, 82.469, -0.61, 2.128)
pt3dadd(151.572, 82.448, -0.707, 2.104)
pt3dadd(151.595, 82.428, -0.803, 2.08)
pt3dadd(151.618, 82.407, -0.9, 2.056)
pt3dadd(151.638, 82.389, -0.997, 2.032)
pt3dadd(151.658, 82.391, -1.096, 2.012)
pt3dadd(151.678, 82.393, -1.194, 1.992)
pt3dadd(151.698, 82.395, -1.293, 1.97)
pt3dadd(151.717, 82.397, -1.392, 1.95)
pt3dadd(151.738, 82.399, -1.49, 1.928)
pt3dadd(151.757, 82.401, -1.589, 1.908)
}
dend_7[47] {pt3dclear()
pt3dadd(151.757, 82.401, -1.589, 1.908)
pt3dadd(151.774, 82.403, -1.656, 1.896)
pt3dadd(151.799, 82.406, -1.754, 1.88)
pt3dadd(151.824, 82.408, -1.852, 1.862)
pt3dadd(151.848, 82.411, -1.95, 1.846)
pt3dadd(151.872, 82.413, -2.048, 1.828)
pt3dadd(151.896, 82.416, -2.145, 1.812)
pt3dadd(151.928, 82.419, -2.242, 1.792)
pt3dadd(151.961, 82.423, -2.338, 1.772)
pt3dadd(151.987, 82.425, -2.435, 1.752)
pt3dadd(152.003, 82.427, -2.534, 1.732)
pt3dadd(152.017, 82.428, -2.634, 1.714)
pt3dadd(152.044, 82.431, -2.731, 1.686)
pt3dadd(152.076, 82.435, -2.827, 1.656)
pt3dadd(152.105, 82.424, -2.921, 1.616)
pt3dadd(152.116, 82.369, -3.009, 1.544)
pt3dadd(152.135, 82.31, -3.089, 1.476)
pt3dadd(152.204, 82.212, -3.092, 1.42)
pt3dadd(152.274, 82.115, -3.095, 1.364)
pt3dadd(152.345, 82.018, -3.099, 1.308)
pt3dadd(152.398, 81.915, -3.117, 1.236)
pt3dadd(152.435, 81.808, -3.149, 1.152)
pt3dadd(152.49, 81.723, -3.193, 1.024)
pt3dadd(152.526, 81.624, -3.239, 1.016)
pt3dadd(152.557, 81.521, -3.283, 1.028)
pt3dadd(152.573, 81.404, -3.292, 1.068)
pt3dadd(152.585, 81.285, -3.296, 1.11)
pt3dadd(152.597, 81.165, -3.3, 1.154)
pt3dadd(152.662, 81.065, -3.305, 1.236)
pt3dadd(152.729, 80.966, -3.31, 1.318)
pt3dadd(152.802, 80.932, -3.375, 1.42)
pt3dadd(152.876, 80.912, -3.452, 1.528)
pt3dadd(152.94, 80.851, -3.519, 1.656)
pt3dadd(153.013, 80.773, -3.563, 1.726)
pt3dadd(153.09, 80.692, -3.6, 1.782)
pt3dadd(153.127, 80.597, -3.652, 1.756)
pt3dadd(153.168, 80.511, -3.708, 1.728)
pt3dadd(153.232, 80.511, -3.793, 1.68)
pt3dadd(153.296, 80.512, -3.877, 1.632)
pt3dadd(153.394, 80.522, -3.934, 1.574)
pt3dadd(153.492, 80.532, -3.991, 1.516)
pt3dadd(153.535, 80.537, -4.08, 1.502)
pt3dadd(153.568, 80.54, -4.176, 1.496)
pt3dadd(153.601, 80.544, -4.273, 1.49)
pt3dadd(153.634, 80.547, -4.369, 1.484)
pt3dadd(153.672, 80.551, -4.464, 1.474)
pt3dadd(153.712, 80.555, -4.558, 1.462)
pt3dadd(153.742, 80.551, -4.654, 1.47)
pt3dadd(153.768, 80.514, -4.745, 1.488)
pt3dadd(153.8, 80.465, -4.832, 1.5)
pt3dadd(153.832, 80.416, -4.919, 1.51)
pt3dadd(153.863, 80.366, -5.007, 1.522)
pt3dadd(153.894, 80.318, -5.094, 1.534)
pt3dadd(153.926, 80.281, -5.186, 1.566)
pt3dadd(153.959, 80.245, -5.277, 1.598)
pt3dadd(153.991, 80.209, -5.369, 1.63)
pt3dadd(154.022, 80.172, -5.46, 1.66)
pt3dadd(154.069, 80.135, -5.545, 1.694)
pt3dadd(154.145, 80.094, -5.615, 1.73)
pt3dadd(154.222, 80.054, -5.684, 1.768)
pt3dadd(154.297, 80.013, -5.754, 1.804)
pt3dadd(154.368, 79.977, -5.827, 1.838)
pt3dadd(154.423, 79.963, -5.915, 1.858)
pt3dadd(154.48, 79.949, -6.003, 1.88)
pt3dadd(154.535, 79.935, -6.091, 1.902)
pt3dadd(154.591, 79.921, -6.178, 1.924)
}
}
proc shape3d_51() {
dend_7[47] { pt3dadd(154.644, 79.891, -6.264, 1.948)
pt3dadd(154.691, 79.845, -6.348, 1.974)
pt3dadd(154.747, 79.784, -6.418, 2.012)
pt3dadd(154.808, 79.714, -6.482, 2.054)
pt3dadd(154.876, 79.633, -6.528, 2.084)
pt3dadd(154.95, 79.555, -6.568, 2.108)
pt3dadd(155.064, 79.522, -6.585, 2.096)
pt3dadd(155.174, 79.488, -6.603, 2.084)
pt3dadd(155.219, 79.456, -6.692, 2.052)
pt3dadd(155.263, 79.423, -6.781, 2.022)
pt3dadd(155.309, 79.391, -6.87, 1.99)
pt3dadd(155.377, 79.342, -6.939, 1.95)
pt3dadd(155.454, 79.288, -7.001, 1.906)
pt3dadd(155.537, 79.238, -7.043, 1.85)
pt3dadd(155.578, 79.188, -7.127, 1.826)
pt3dadd(155.62, 79.137, -7.21, 1.804)
pt3dadd(155.662, 79.086, -7.294, 1.78)
pt3dadd(155.704, 79.036, -7.378, 1.758)
pt3dadd(155.759, 78.998, -7.461, 1.704)
pt3dadd(155.808, 78.963, -7.546, 1.654)
pt3dadd(155.826, 78.949, -7.645, 1.634)
pt3dadd(155.845, 78.934, -7.743, 1.612)
pt3dadd(155.858, 78.889, -7.833, 1.642)
pt3dadd(155.869, 78.834, -7.922, 1.69)
pt3dadd(155.915, 78.753, -7.97, 1.748)
pt3dadd(155.98, 78.656, -7.993, 1.812)
pt3dadd(156.064, 78.573, -8, 1.904)
pt3dadd(156.151, 78.498, -8.014, 1.992)
pt3dadd(156.218, 78.423, -8.068, 2.022)
pt3dadd(156.286, 78.348, -8.123, 2.054)
pt3dadd(156.353, 78.273, -8.177, 2.084)
pt3dadd(156.413, 78.192, -8.229, 2.12)
pt3dadd(156.443, 78.085, -8.266, 2.18)
pt3dadd(156.48, 77.981, -8.301, 2.238)
pt3dadd(156.566, 77.899, -8.306, 2.276)
pt3dadd(156.652, 77.819, -8.315, 2.31)
pt3dadd(156.7, 77.773, -8.399, 2.31)
pt3dadd(156.748, 77.724, -8.481, 2.308)
pt3dadd(156.799, 77.663, -8.555, 2.294)
pt3dadd(156.848, 77.607, -8.633, 2.278)
pt3dadd(156.89, 77.56, -8.718, 2.262)
pt3dadd(156.934, 77.514, -8.803, 2.246)
pt3dadd(156.994, 77.471, -8.875, 2.224)
pt3dadd(157.102, 77.441, -8.91, 2.186)
pt3dadd(157.208, 77.417, -8.95, 2.096)
pt3dadd(157.316, 77.386, -8.978, 1.992)
pt3dadd(157.427, 77.344, -8.994, 1.93)
pt3dadd(157.537, 77.302, -9.011, 1.884)
pt3dadd(157.65, 77.261, -9.027, 1.846)
pt3dadd(157.742, 77.203, -9.062, 1.806)
pt3dadd(157.825, 77.135, -9.106, 1.762)
pt3dadd(157.85, 77.038, -9.158, 1.736)
pt3dadd(157.867, 76.938, -9.211, 1.712)
pt3dadd(157.886, 76.835, -9.26, 1.68)
pt3dadd(157.927, 76.741, -9.306, 1.66)
pt3dadd(158, 76.661, -9.349, 1.666)
pt3dadd(158.075, 76.581, -9.392, 1.672)
pt3dadd(158.147, 76.501, -9.435, 1.678)
pt3dadd(158.226, 76.429, -9.479, 1.68)
pt3dadd(158.318, 76.381, -9.528, 1.666)
pt3dadd(158.412, 76.332, -9.576, 1.654)
pt3dadd(158.504, 76.283, -9.625, 1.642)
pt3dadd(158.599, 76.235, -9.669, 1.624)
pt3dadd(158.71, 76.194, -9.686, 1.562)
pt3dadd(158.822, 76.156, -9.7, 1.5)
pt3dadd(158.941, 76.148, -9.7, 1.442)
pt3dadd(159.062, 76.141, -9.7, 1.384)
pt3dadd(159.169, 76.099, -9.7, 1.35)
pt3dadd(159.264, 76.026, -9.7, 1.338)
pt3dadd(159.347, 75.955, -9.725, 1.348)
pt3dadd(159.407, 75.885, -9.789, 1.392)
pt3dadd(159.432, 75.833, -9.872, 1.428)
pt3dadd(159.438, 75.785, -9.961, 1.454)
pt3dadd(159.455, 75.684, -10.014, 1.43)
pt3dadd(159.472, 75.584, -10.067, 1.406)
}
dend_7[48] {pt3dclear()
pt3dadd(159.472, 75.584, -10.067, 1.406)
pt3dadd(159.535, 75.564, -10.079, 1.378)
pt3dadd(159.647, 75.528, -10.102, 1.328)
pt3dadd(159.758, 75.52, -10.13, 1.282)
pt3dadd(159.871, 75.532, -10.163, 1.238)
pt3dadd(159.982, 75.543, -10.2, 1.198)
pt3dadd(160.084, 75.554, -10.251, 1.164)
pt3dadd(160.187, 75.565, -10.302, 1.128)
pt3dadd(160.279, 75.575, -10.364, 1.058)
pt3dadd(160.373, 75.584, -10.427, 1.012)
pt3dadd(160.468, 75.594, -10.489, 0.982)
pt3dadd(160.56, 75.604, -10.552, 0.95)
pt3dadd(160.654, 75.614, -10.614, 0.92)
pt3dadd(160.746, 75.624, -10.677, 0.89)
pt3dadd(160.852, 75.633, -10.722, 0.856)
pt3dadd(160.963, 75.642, -10.757, 0.818)
pt3dadd(161.075, 75.652, -10.793, 0.78)
pt3dadd(161.186, 75.661, -10.828, 0.742)
pt3dadd(161.299, 75.67, -10.864, 0.706)
pt3dadd(161.407, 75.665, -10.901, 0.666)
pt3dadd(161.507, 75.621, -10.943, 0.624)
pt3dadd(161.606, 75.578, -10.985, 0.584)
pt3dadd(161.707, 75.534, -11.027, 0.542)
pt3dadd(161.807, 75.49, -11.068, 0.5)
pt3dadd(161.906, 75.435, -11.1, 0.472)
pt3dadd(162.005, 75.38, -11.131, 0.442)
pt3dadd(162.106, 75.324, -11.162, 0.412)
pt3dadd(162.205, 75.269, -11.193, 0.384)
pt3dadd(162.308, 75.209, -11.2, 0.372)
pt3dadd(162.41, 75.148, -11.2, 0.368)
pt3dadd(162.514, 75.086, -11.2, 0.362)
pt3dadd(162.617, 75.025, -11.2, 0.358)
pt3dadd(162.72, 74.963, -11.2, 0.352)
pt3dadd(162.832, 74.926, -11.216, 0.352)
pt3dadd(162.944, 74.895, -11.237, 0.352)
pt3dadd(163.057, 74.864, -11.258, 0.352)
pt3dadd(163.17, 74.834, -11.28, 0.352)
pt3dadd(163.283, 74.804, -11.302, 0.352)
pt3dadd(163.357, 74.812, -11.38, 0.376)
pt3dadd(163.432, 74.82, -11.458, 0.4)
pt3dadd(163.546, 74.827, -11.478, 0.428)
pt3dadd(163.664, 74.835, -11.491, 0.456)
pt3dadd(163.778, 74.825, -11.511, 0.498)
pt3dadd(163.878, 74.776, -11.548, 0.568)
pt3dadd(163.978, 74.719, -11.575, 0.648)
pt3dadd(164.075, 74.653, -11.593, 0.738)
pt3dadd(164.178, 74.628, -11.626, 0.81)
pt3dadd(164.285, 74.634, -11.673, 0.868)
pt3dadd(164.39, 74.64, -11.719, 0.926)
pt3dadd(164.485, 74.623, -11.779, 0.978)
pt3dadd(164.585, 74.599, -11.827, 0.968)
pt3dadd(164.684, 74.621, -11.877, 0.936)
pt3dadd(164.78, 74.652, -11.93, 0.912)
pt3dadd(164.878, 74.684, -11.983, 0.89)
pt3dadd(164.975, 74.715, -12.036, 0.866)
pt3dadd(165.08, 74.741, -12.072, 0.854)
pt3dadd(165.198, 74.758, -12.085, 0.854)
pt3dadd(165.316, 74.776, -12.098, 0.854)
pt3dadd(165.428, 74.789, -12.128, 0.908)
pt3dadd(165.541, 74.8, -12.161, 0.972)
pt3dadd(165.647, 74.812, -12.205, 1.05)
pt3dadd(165.745, 74.822, -12.262, 1.142)
pt3dadd(165.832, 74.831, -12.328, 1.212)
pt3dadd(165.892, 74.837, -12.414, 1.236)
pt3dadd(165.958, 74.844, -12.496, 1.25)
pt3dadd(166.057, 74.855, -12.552, 1.208)
pt3dadd(166.156, 74.865, -12.607, 1.166)
pt3dadd(166.256, 74.876, -12.663, 1.124)
pt3dadd(166.366, 74.887, -12.691, 1.072)
pt3dadd(166.486, 74.9, -12.695, 1.012)
pt3dadd(166.604, 74.912, -12.699, 0.952)
pt3dadd(166.724, 74.925, -12.7, 0.866)
pt3dadd(166.837, 74.958, -12.7, 0.828)
pt3dadd(166.949, 75.003, -12.7, 0.828)
pt3dadd(167.059, 75.048, -12.7, 0.828)
pt3dadd(167.171, 75.093, -12.7, 0.828)
pt3dadd(167.284, 75.138, -12.7, 0.828)
pt3dadd(167.394, 75.183, -12.7, 0.828)
pt3dadd(167.512, 75.204, -12.705, 0.824)
pt3dadd(167.63, 75.225, -12.711, 0.82)
pt3dadd(167.747, 75.246, -12.716, 0.816)
pt3dadd(167.866, 75.267, -12.721, 0.812)
pt3dadd(167.984, 75.288, -12.726, 0.808)
pt3dadd(168.101, 75.308, -12.732, 0.804)
pt3dadd(168.221, 75.323, -12.742, 0.81)
pt3dadd(168.338, 75.336, -12.755, 0.818)
pt3dadd(168.457, 75.348, -12.767, 0.826)
pt3dadd(168.575, 75.361, -12.78, 0.834)
pt3dadd(168.692, 75.373, -12.792, 0.842)
pt3dadd(168.812, 75.386, -12.804, 0.85)
pt3dadd(168.92, 75.397, -12.837, 0.86)
pt3dadd(169.019, 75.407, -12.895, 0.876)
pt3dadd(169.117, 75.417, -12.952, 0.89)
pt3dadd(169.213, 75.428, -13.01, 0.906)
pt3dadd(169.312, 75.438, -13.067, 0.92)
pt3dadd(169.404, 75.448, -13.13, 0.936)
pt3dadd(169.49, 75.457, -13.199, 0.95)
pt3dadd(169.576, 75.466, -13.269, 0.966)
pt3dadd(169.661, 75.475, -13.338, 0.982)
pt3dadd(169.747, 75.484, -13.408, 0.996)
pt3dadd(169.838, 75.493, -13.472, 0.998)
pt3dadd(169.937, 75.504, -13.529, 0.982)
pt3dadd(170.034, 75.514, -13.587, 0.968)
pt3dadd(170.131, 75.524, -13.644, 0.952)
pt3dadd(170.228, 75.534, -13.702, 0.938)
pt3dadd(170.336, 75.536, -13.74, 0.918)
pt3dadd(170.454, 75.525, -13.754, 0.896)
pt3dadd(170.573, 75.515, -13.769, 0.872)
pt3dadd(170.69, 75.505, -13.783, 0.848)
pt3dadd(170.809, 75.495, -13.798, 0.826)
pt3dadd(170.928, 75.487, -13.814, 0.802)
pt3dadd(171.038, 75.499, -13.849, 0.788)
pt3dadd(171.151, 75.511, -13.883, 0.774)
pt3dadd(171.263, 75.522, -13.918, 0.76)
pt3dadd(171.376, 75.534, -13.953, 0.748)
pt3dadd(171.487, 75.546, -13.987, 0.734)
pt3dadd(171.599, 75.558, -14.024, 0.734)
pt3dadd(171.709, 75.569, -14.061, 0.744)
pt3dadd(171.82, 75.581, -14.098, 0.752)
pt3dadd(171.93, 75.593, -14.135, 0.762)
pt3dadd(172.042, 75.604, -14.172, 0.772)
pt3dadd(172.152, 75.616, -14.209, 0.784)
pt3dadd(172.265, 75.628, -14.243, 0.808)
pt3dadd(172.376, 75.639, -14.278, 0.83)
pt3dadd(172.489, 75.651, -14.313, 0.854)
}
}
proc shape3d_52() {
dend_7[48] { pt3dadd(172.6, 75.663, -14.347, 0.876)
pt3dadd(172.712, 75.675, -14.382, 0.9)
pt3dadd(172.83, 75.687, -14.39, 0.91)
pt3dadd(172.949, 75.7, -14.392, 0.918)
pt3dadd(173.069, 75.712, -14.393, 0.924)
pt3dadd(173.188, 75.725, -14.395, 0.932)
pt3dadd(173.308, 75.737, -14.397, 0.94)
pt3dadd(173.426, 75.75, -14.398, 0.946)
pt3dadd(173.546, 75.762, -14.4, 0.954)
pt3dadd(173.664, 75.775, -14.41, 0.946)
pt3dadd(173.784, 75.787, -14.42, 0.94)
pt3dadd(173.902, 75.8, -14.43, 0.932)
pt3dadd(174.022, 75.812, -14.441, 0.924)
pt3dadd(174.139, 75.825, -14.451, 0.916)
pt3dadd(174.258, 75.837, -14.462, 0.908)
pt3dadd(174.364, 75.861, -14.496, 0.882)
pt3dadd(174.458, 75.895, -14.551, 0.844)
pt3dadd(174.554, 75.929, -14.605, 0.804)
pt3dadd(174.648, 75.963, -14.659, 0.766)
pt3dadd(174.743, 75.997, -14.714, 0.728)
pt3dadd(174.829, 76.037, -14.776, 0.704)
pt3dadd(174.914, 76.077, -14.837, 0.68)
pt3dadd(175, 76.117, -14.899, 0.658)
pt3dadd(175.085, 76.157, -14.96, 0.634)
pt3dadd(175.168, 76.174, -15.03, 0.61)
pt3dadd(175.249, 76.183, -15.104, 0.588)
pt3dadd(175.33, 76.191, -15.177, 0.592)
pt3dadd(175.411, 76.2, -15.25, 0.616)
pt3dadd(175.51, 76.193, -15.294, 0.634)
pt3dadd(175.627, 76.169, -15.304, 0.644)
pt3dadd(175.741, 76.143, -15.321, 0.656)
pt3dadd(175.844, 76.111, -15.363, 0.67)
pt3dadd(175.946, 76.07, -15.403, 0.686)
pt3dadd(176.044, 76.015, -15.436, 0.706)
pt3dadd(176.155, 75.973, -15.45, 0.716)
pt3dadd(176.267, 75.932, -15.464, 0.726)
pt3dadd(176.378, 75.89, -15.478, 0.736)
pt3dadd(176.49, 75.848, -15.492, 0.748)
pt3dadd(176.603, 75.809, -15.5, 0.762)
pt3dadd(176.717, 75.774, -15.5, 0.784)
pt3dadd(176.826, 75.732, -15.5, 0.804)
pt3dadd(176.897, 75.635, -15.5, 0.804)
pt3dadd(176.969, 75.538, -15.5, 0.804)
pt3dadd(177.066, 75.475, -15.522, 0.778)
pt3dadd(177.163, 75.419, -15.549, 0.754)
pt3dadd(177.224, 75.425, -15.636, 0.754)
pt3dadd(177.284, 75.431, -15.722, 0.754)
pt3dadd(177.385, 75.442, -15.772, 0.77)
pt3dadd(177.492, 75.453, -15.817, 0.792)
pt3dadd(177.598, 75.464, -15.862, 0.812)
pt3dadd(177.707, 75.475, -15.9, 0.836)
pt3dadd(177.827, 75.483, -15.9, 0.888)
pt3dadd(177.946, 75.491, -15.9, 0.94)
pt3dadd(178.062, 75.485, -15.907, 0.992)
pt3dadd(178.169, 75.438, -15.933, 1.042)
pt3dadd(178.274, 75.391, -15.959, 1.092)
pt3dadd(178.355, 75.351, -16.021, 1.146)
pt3dadd(178.426, 75.313, -16.095, 1.202)
pt3dadd(178.536, 75.318, -16.13, 1.22)
pt3dadd(178.649, 75.325, -16.163, 1.238)
pt3dadd(178.763, 75.333, -16.196, 1.254)
pt3dadd(178.878, 75.308, -16.204, 1.246)
pt3dadd(178.994, 75.278, -16.209, 1.234)
pt3dadd(179.106, 75.251, -16.235, 1.2)
pt3dadd(179.212, 75.226, -16.274, 1.152)
pt3dadd(179.317, 75.197, -16.314, 1.1)
pt3dadd(179.387, 75.114, -16.357, 1.016)
pt3dadd(179.456, 75.028, -16.394, 0.9)
pt3dadd(179.554, 74.965, -16.4, 0.832)
pt3dadd(179.665, 74.923, -16.4, 0.836)
pt3dadd(179.778, 74.881, -16.4, 0.842)
pt3dadd(179.89, 74.839, -16.4, 0.846)
pt3dadd(180.001, 74.797, -16.4, 0.85)
pt3dadd(180.107, 74.749, -16.416, 0.864)
pt3dadd(180.199, 74.691, -16.456, 0.888)
pt3dadd(180.294, 74.633, -16.497, 0.912)
pt3dadd(180.386, 74.575, -16.537, 0.936)
pt3dadd(180.479, 74.522, -16.581, 0.966)
pt3dadd(180.571, 74.483, -16.637, 1.014)
pt3dadd(180.662, 74.444, -16.693, 1.064)
pt3dadd(180.754, 74.405, -16.75, 1.112)
pt3dadd(180.846, 74.368, -16.803, 1.16)
pt3dadd(180.96, 74.355, -16.836, 1.21)
pt3dadd(181.073, 74.34, -16.868, 1.256)
pt3dadd(181.187, 74.312, -16.889, 1.268)
pt3dadd(181.301, 74.285, -16.911, 1.28)
pt3dadd(181.381, 74.293, -16.984, 1.246)
pt3dadd(181.463, 74.302, -17.058, 1.21)
pt3dadd(181.519, 74.308, -17.145, 1.196)
pt3dadd(181.573, 74.313, -17.235, 1.184)
pt3dadd(181.619, 74.318, -17.326, 1.2)
pt3dadd(181.661, 74.323, -17.42, 1.232)
pt3dadd(181.691, 74.326, -17.517, 1.254)
pt3dadd(181.721, 74.329, -17.614, 1.276)
pt3dadd(181.752, 74.332, -17.71, 1.298)
pt3dadd(181.782, 74.335, -17.807, 1.32)
pt3dadd(181.811, 74.339, -17.904, 1.342)
pt3dadd(181.861, 74.344, -17.991, 1.372)
pt3dadd(181.949, 74.353, -18.059, 1.42)
pt3dadd(182.026, 74.361, -18.132, 1.462)
pt3dadd(182.065, 74.365, -18.227, 1.482)
pt3dadd(182.105, 74.369, -18.321, 1.504)
pt3dadd(182.18, 74.377, -18.397, 1.518)
pt3dadd(182.261, 74.386, -18.471, 1.528)
pt3dadd(182.365, 74.361, -18.506, 1.57)
pt3dadd(182.477, 74.326, -18.528, 1.62)
pt3dadd(182.518, 74.251, -18.583, 1.718)
pt3dadd(182.542, 74.166, -18.651, 1.898)
pt3dadd(182.591, 74.071, -18.691, 2.11)
pt3dadd(182.659, 73.974, -18.7, 2.258)
pt3dadd(182.738, 73.885, -18.7, 2.334)
pt3dadd(182.852, 73.854, -18.7, 2.302)
pt3dadd(182.974, 73.857, -18.705, 2.274)
pt3dadd(183.085, 73.869, -18.733, 2.244)
pt3dadd(183.154, 73.876, -18.81, 2.21)
pt3dadd(183.167, 73.878, -18.91, 2.188)
pt3dadd(183.168, 73.878, -19.009, 2.212)
pt3dadd(183.186, 73.88, -19.108, 2.234)
pt3dadd(183.242, 73.886, -19.191, 2.226)
pt3dadd(183.336, 73.896, -19.253, 2.202)
pt3dadd(183.433, 73.906, -19.311, 2.176)
pt3dadd(183.539, 73.917, -19.356, 2.142)
pt3dadd(183.646, 73.928, -19.402, 2.11)
pt3dadd(183.682, 73.932, -19.497, 2.094)
pt3dadd(183.72, 73.936, -19.591, 2.078)
pt3dadd(183.757, 73.94, -19.686, 2.062)
pt3dadd(183.767, 73.941, -19.785, 2.03)
pt3dadd(183.772, 73.941, -19.885, 1.994)
pt3dadd(183.776, 73.942, -19.985, 1.96)
pt3dadd(183.83, 73.947, -20.074, 1.77)
pt3dadd(183.892, 73.954, -20.16, 1.716)
pt3dadd(183.954, 73.96, -20.245, 1.662)
pt3dadd(184.018, 73.967, -20.33, 1.608)
pt3dadd(184.08, 73.974, -20.415, 1.554)
pt3dadd(184.147, 73.977, -20.497, 1.5)
pt3dadd(184.243, 73.96, -20.554, 1.448)
pt3dadd(184.339, 73.943, -20.612, 1.398)
pt3dadd(184.435, 73.925, -20.67, 1.346)
pt3dadd(184.531, 73.908, -20.728, 1.294)
pt3dadd(184.613, 73.909, -20.801, 1.154)
pt3dadd(184.668, 73.909, -20.889, 1.13)
pt3dadd(184.736, 73.881, -20.967, 1.13)
pt3dadd(184.84, 73.837, -20.995, 1.076)
pt3dadd(184.958, 73.828, -21, 0.996)
pt3dadd(185.078, 73.825, -21, 0.934)
pt3dadd(185.186, 73.795, -20.978, 0.854)
pt3dadd(185.232, 73.746, -20.899, 0.678)
pt3dadd(185.233, 73.733, -20.8, 0.552)
}
dend_7[49] {pt3dclear()
pt3dadd(159.472, 75.584, -10.067, 1.406)
pt3dadd(159.451, 75.573, -10.092, 1.412)
pt3dadd(159.386, 75.54, -10.172, 1.43)
pt3dadd(159.323, 75.506, -10.252, 1.45)
pt3dadd(159.26, 75.473, -10.332, 1.468)
pt3dadd(159.196, 75.44, -10.412, 1.486)
pt3dadd(159.132, 75.407, -10.492, 1.504)
pt3dadd(159.067, 75.373, -10.572, 1.524)
pt3dadd(159.004, 75.34, -10.652, 1.542)
pt3dadd(158.94, 75.306, -10.732, 1.56)
pt3dadd(158.875, 75.273, -10.812, 1.578)
pt3dadd(158.812, 75.24, -10.892, 1.598)
pt3dadd(158.749, 75.207, -10.972, 1.616)
pt3dadd(158.684, 75.173, -11.052, 1.634)
pt3dadd(158.621, 75.14, -11.132, 1.652)
pt3dadd(158.556, 75.107, -11.212, 1.672)
pt3dadd(158.492, 75.073, -11.292, 1.69)
pt3dadd(158.429, 75.04, -11.372, 1.708)
pt3dadd(158.364, 75.007, -11.451, 1.728)
pt3dadd(158.302, 74.973, -11.531, 1.746)
pt3dadd(158.237, 74.94, -11.611, 1.764)
pt3dadd(158.173, 74.907, -11.691, 1.782)
pt3dadd(158.11, 74.873, -11.771, 1.802)
pt3dadd(158.08, 74.874, -11.863, 1.788)
pt3dadd(158.072, 74.894, -11.961, 1.758)
pt3dadd(158.063, 74.914, -12.06, 1.728)
pt3dadd(158.053, 74.934, -12.158, 1.696)
pt3dadd(158.044, 74.954, -12.256, 1.666)
pt3dadd(158.036, 74.974, -12.355, 1.636)
pt3dadd(158.005, 74.974, -12.451, 1.606)
pt3dadd(157.973, 74.97, -12.547, 1.574)
pt3dadd(157.952, 74.983, -12.643, 1.538)
pt3dadd(157.95, 75.016, -12.739, 1.496)
pt3dadd(157.945, 75.049, -12.835, 1.456)
pt3dadd(157.879, 75.07, -12.917, 1.43)
pt3dadd(157.811, 75.094, -12.997, 1.4)
pt3dadd(157.73, 75.139, -13.06, 1.358)
pt3dadd(157.657, 75.169, -13.132, 1.338)
pt3dadd(157.598, 75.172, -13.22, 1.356)
pt3dadd(157.538, 75.226, -13.293, 1.362)
pt3dadd(157.477, 75.281, -13.365, 1.368)
pt3dadd(157.416, 75.336, -13.438, 1.374)
pt3dadd(157.355, 75.392, -13.511, 1.38)
pt3dadd(157.284, 75.439, -13.581, 1.406)
pt3dadd(157.21, 75.483, -13.651, 1.43)
pt3dadd(157.136, 75.503, -13.728, 1.416)
pt3dadd(157.06, 75.535, -13.794, 1.404)
pt3dadd(156.973, 75.613, -13.818, 1.39)
pt3dadd(156.892, 75.694, -13.845, 1.376)
pt3dadd(156.818, 75.781, -13.877, 1.362)
pt3dadd(156.78, 75.882, -13.864, 1.344)
pt3dadd(156.751, 75.99, -13.836, 1.33)
}
}
proc shape3d_53() {
dend_7[49] { pt3dadd(156.691, 76.093, -13.849, 1.324)
pt3dadd(156.632, 76.196, -13.861, 1.318)
pt3dadd(156.572, 76.299, -13.874, 1.312)
pt3dadd(156.512, 76.402, -13.886, 1.306)
pt3dadd(156.437, 76.494, -13.893, 1.316)
pt3dadd(156.358, 76.583, -13.899, 1.328)
pt3dadd(156.28, 76.666, -13.927, 1.372)
pt3dadd(156.204, 76.748, -13.964, 1.428)
pt3dadd(156.116, 76.795, -14.019, 1.484)
pt3dadd(156.029, 76.839, -14.077, 1.532)
pt3dadd(155.948, 76.884, -14.141, 1.532)
pt3dadd(155.885, 76.951, -14.198, 1.522)
pt3dadd(155.844, 77.048, -14.247, 1.498)
pt3dadd(155.804, 77.145, -14.295, 1.474)
pt3dadd(155.752, 77.231, -14.342, 1.448)
pt3dadd(155.65, 77.278, -14.378, 1.406)
pt3dadd(155.564, 77.348, -14.4, 1.368)
pt3dadd(155.525, 77.459, -14.4, 1.356)
pt3dadd(155.508, 77.578, -14.4, 1.356)
pt3dadd(155.485, 77.696, -14.4, 1.334)
pt3dadd(155.441, 77.807, -14.401, 1.276)
pt3dadd(155.376, 77.897, -14.433, 1.214)
pt3dadd(155.348, 77.94, -14.519, 1.202)
pt3dadd(155.32, 77.949, -14.615, 1.18)
pt3dadd(155.244, 77.941, -14.69, 1.18)
pt3dadd(155.141, 77.93, -14.737, 1.202)
pt3dadd(155.033, 77.919, -14.782, 1.158)
pt3dadd(154.927, 77.908, -14.826, 1.09)
pt3dadd(154.834, 77.898, -14.889, 1.054)
pt3dadd(154.769, 77.891, -14.971, 1.04)
pt3dadd(154.702, 77.884, -15.053, 0.958)
pt3dadd(154.598, 77.905, -15.094, 0.818)
pt3dadd(154.518, 77.989, -15.1, 0.778)
pt3dadd(154.488, 78.103, -15.114, 0.864)
pt3dadd(154.476, 78.215, -15.147, 0.95)
pt3dadd(154.464, 78.326, -15.182, 0.98)
pt3dadd(154.452, 78.443, -15.198, 0.98)
pt3dadd(154.44, 78.562, -15.21, 0.956)
pt3dadd(154.393, 78.657, -15.242, 0.9)
pt3dadd(154.291, 78.705, -15.279, 0.886)
pt3dadd(154.199, 78.767, -15.307, 0.884)
pt3dadd(154.112, 78.849, -15.324, 0.898)
pt3dadd(154.028, 78.896, -15.368, 0.924)
pt3dadd(153.928, 78.889, -15.421, 0.91)
pt3dadd(153.824, 78.878, -15.472, 0.886)
pt3dadd(153.719, 78.909, -15.492, 0.848)
pt3dadd(153.611, 78.962, -15.498, 0.8)
pt3dadd(153.545, 79.05, -15.5, 0.768)
pt3dadd(153.512, 79.165, -15.5, 0.748)
pt3dadd(153.481, 79.281, -15.5, 0.728)
pt3dadd(153.397, 79.367, -15.5, 0.74)
pt3dadd(153.312, 79.452, -15.5, 0.752)
pt3dadd(153.281, 79.564, -15.502, 0.772)
pt3dadd(153.26, 79.683, -15.504, 0.794)
pt3dadd(153.239, 79.801, -15.507, 0.816)
pt3dadd(153.217, 79.919, -15.509, 0.838)
pt3dadd(153.199, 80.027, -15.53, 0.87)
pt3dadd(153.191, 80.108, -15.604, 0.928)
pt3dadd(153.178, 80.19, -15.674, 0.988)
pt3dadd(153.13, 80.279, -15.729, 1.05)
pt3dadd(153.082, 80.367, -15.784, 1.112)
pt3dadd(153.005, 80.424, -15.84, 1.17)
pt3dadd(152.917, 80.469, -15.897, 1.226)
pt3dadd(152.854, 80.465, -15.978, 1.254)
pt3dadd(152.754, 80.455, -16.034, 1.242)
pt3dadd(152.656, 80.445, -16.09, 1.23)
pt3dadd(152.546, 80.46, -16.129, 1.23)
pt3dadd(152.441, 80.48, -16.168, 1.23)
pt3dadd(152.423, 80.594, -16.197, 1.242)
pt3dadd(152.405, 80.707, -16.225, 1.252)
pt3dadd(152.357, 80.795, -16.274, 1.246)
pt3dadd(152.296, 80.872, -16.331, 1.232)
pt3dadd(152.216, 80.877, -16.404, 1.176)
pt3dadd(152.155, 80.905, -16.485, 1.146)
pt3dadd(152.108, 80.951, -16.568, 1.134)
pt3dadd(152.039, 81.019, -16.622, 1.172)
pt3dadd(151.962, 81.095, -16.666, 1.23)
pt3dadd(151.909, 81.194, -16.701, 1.322)
pt3dadd(151.86, 81.295, -16.735, 1.41)
pt3dadd(151.848, 81.409, -16.763, 1.472)
pt3dadd(151.836, 81.524, -16.79, 1.536)
pt3dadd(151.802, 81.637, -16.8, 1.566)
pt3dadd(151.757, 81.747, -16.801, 1.582)
pt3dadd(151.678, 81.833, -16.823, 1.558)
pt3dadd(151.598, 81.919, -16.846, 1.536)
pt3dadd(151.519, 82.005, -16.869, 1.514)
pt3dadd(151.44, 82.091, -16.891, 1.49)
pt3dadd(151.4, 82.198, -16.9, 1.432)
pt3dadd(151.384, 82.317, -16.9, 1.354)
pt3dadd(151.366, 82.435, -16.9, 1.276)
pt3dadd(151.284, 82.509, -16.9, 1.188)
pt3dadd(151.178, 82.566, -16.9, 1.094)
pt3dadd(151.079, 82.632, -16.9, 1.02)
pt3dadd(150.983, 82.704, -16.9, 0.962)
pt3dadd(150.877, 82.756, -16.9, 0.92)
pt3dadd(150.761, 82.783, -16.9, 0.898)
pt3dadd(150.644, 82.812, -16.9, 0.874)
pt3dadd(150.532, 82.854, -16.9, 0.824)
pt3dadd(150.434, 82.92, -16.901, 0.788)
pt3dadd(150.346, 83.002, -16.904, 0.762)
pt3dadd(150.258, 83.083, -16.906, 0.736)
pt3dadd(150.169, 83.164, -16.908, 0.71)
pt3dadd(150.082, 83.246, -16.91, 0.686)
pt3dadd(149.978, 83.3, -16.925, 0.666)
pt3dadd(149.869, 83.344, -16.944, 0.65)
pt3dadd(149.76, 83.388, -16.964, 0.634)
pt3dadd(149.651, 83.431, -16.983, 0.618)
pt3dadd(149.544, 83.48, -17, 0.604)
pt3dadd(149.46, 83.565, -17, 0.608)
pt3dadd(149.375, 83.651, -17, 0.614)
pt3dadd(149.291, 83.736, -17, 0.618)
pt3dadd(149.207, 83.821, -17, 0.624)
pt3dadd(149.12, 83.905, -17, 0.634)
pt3dadd(149.024, 83.977, -17, 0.682)
pt3dadd(148.93, 84.049, -17, 0.728)
pt3dadd(148.858, 84.145, -17, 0.762)
pt3dadd(148.786, 84.242, -17, 0.798)
pt3dadd(148.68, 84.288, -17, 0.822)
pt3dadd(148.565, 84.323, -17, 0.844)
pt3dadd(148.451, 84.358, -17.012, 0.868)
pt3dadd(148.34, 84.393, -17.034, 0.892)
pt3dadd(148.277, 84.423, -17.096, 0.904)
pt3dadd(148.254, 84.448, -17.19, 0.904)
pt3dadd(148.141, 84.479, -17.213, 0.882)
pt3dadd(148.028, 84.51, -17.237, 0.86)
pt3dadd(147.917, 84.542, -17.261, 0.838)
pt3dadd(147.805, 84.573, -17.285, 0.818)
pt3dadd(147.69, 84.594, -17.307, 0.79)
pt3dadd(147.574, 84.596, -17.328, 0.752)
pt3dadd(147.456, 84.599, -17.349, 0.716)
pt3dadd(147.338, 84.601, -17.369, 0.678)
pt3dadd(147.221, 84.604, -17.39, 0.64)
pt3dadd(147.103, 84.606, -17.411, 0.604)
pt3dadd(147, 84.638, -17.454, 0.568)
pt3dadd(146.897, 84.671, -17.498, 0.534)
pt3dadd(146.795, 84.704, -17.541, 0.498)
pt3dadd(146.692, 84.737, -17.585, 0.464)
pt3dadd(146.579, 84.755, -17.613, 0.452)
pt3dadd(146.462, 84.766, -17.632, 0.452)
pt3dadd(146.345, 84.777, -17.651, 0.452)
pt3dadd(146.228, 84.788, -17.67, 0.452)
pt3dadd(146.11, 84.798, -17.69, 0.452)
pt3dadd(145.994, 84.811, -17.71, 0.47)
pt3dadd(145.878, 84.825, -17.732, 0.51)
pt3dadd(145.762, 84.84, -17.754, 0.55)
pt3dadd(145.645, 84.854, -17.777, 0.59)
pt3dadd(145.53, 84.869, -17.799, 0.63)
pt3dadd(145.417, 84.872, -17.829, 0.676)
pt3dadd(145.308, 84.861, -17.872, 0.728)
pt3dadd(145.2, 84.849, -17.914, 0.78)
pt3dadd(145.092, 84.838, -17.956, 0.832)
pt3dadd(144.984, 84.826, -17.998, 0.886)
pt3dadd(144.876, 84.815, -18.041, 0.934)
pt3dadd(144.773, 84.804, -18.091, 0.958)
pt3dadd(144.67, 84.793, -18.141, 0.982)
pt3dadd(144.566, 84.783, -18.191, 1.006)
pt3dadd(144.462, 84.772, -18.241, 1.032)
pt3dadd(144.36, 84.762, -18.291, 1.054)
pt3dadd(144.254, 84.774, -18.34, 1.05)
pt3dadd(144.15, 84.787, -18.388, 1.044)
pt3dadd(144.047, 84.799, -18.437, 1.038)
pt3dadd(143.942, 84.812, -18.485, 1.032)
pt3dadd(143.837, 84.827, -18.531, 1.014)
pt3dadd(143.729, 84.845, -18.572, 0.982)
pt3dadd(143.621, 84.863, -18.613, 0.948)
pt3dadd(143.513, 84.881, -18.655, 0.914)
pt3dadd(143.406, 84.899, -18.696, 0.882)
pt3dadd(143.29, 84.89, -18.715, 0.868)
pt3dadd(143.171, 84.877, -18.731, 0.856)
pt3dadd(143.054, 84.865, -18.748, 0.842)
pt3dadd(142.936, 84.853, -18.764, 0.83)
pt3dadd(142.819, 84.84, -18.781, 0.818)
pt3dadd(142.7, 84.828, -18.797, 0.806)
pt3dadd(142.582, 84.815, -18.801, 0.792)
pt3dadd(142.462, 84.803, -18.803, 0.776)
pt3dadd(142.343, 84.79, -18.805, 0.762)
pt3dadd(142.223, 84.778, -18.806, 0.748)
pt3dadd(142.104, 84.765, -18.808, 0.734)
pt3dadd(141.985, 84.753, -18.809, 0.718)
pt3dadd(141.865, 84.74, -18.811, 0.704)
pt3dadd(141.761, 84.705, -18.847, 0.694)
pt3dadd(141.655, 84.668, -18.885, 0.682)
pt3dadd(141.55, 84.631, -18.923, 0.672)
pt3dadd(141.445, 84.594, -18.96, 0.66)
pt3dadd(141.34, 84.555, -18.989, 0.652)
pt3dadd(141.229, 84.507, -18.991, 0.648)
pt3dadd(141.12, 84.458, -18.993, 0.642)
pt3dadd(141.01, 84.41, -18.996, 0.638)
pt3dadd(140.9, 84.362, -18.998, 0.634)
pt3dadd(140.79, 84.313, -19, 0.628)
pt3dadd(140.688, 84.262, -19.027, 0.668)
pt3dadd(140.588, 84.21, -19.062, 0.72)
pt3dadd(140.521, 84.138, -19.116, 0.79)
pt3dadd(140.454, 84.064, -19.169, 0.862)
pt3dadd(140.348, 84.014, -19.191, 0.922)
pt3dadd(140.243, 83.966, -19.213, 0.978)
pt3dadd(140.13, 83.954, -19.246, 0.956)
pt3dadd(140.017, 83.943, -19.279, 0.936)
pt3dadd(139.901, 83.93, -19.293, 0.892)
pt3dadd(139.781, 83.918, -19.299, 0.838)
}
}
proc shape3d_54() {
dend_7[49] { pt3dadd(139.662, 83.905, -19.304, 0.816)
pt3dadd(139.542, 83.893, -19.309, 0.802)
pt3dadd(139.423, 83.88, -19.314, 0.786)
pt3dadd(139.303, 83.868, -19.319, 0.772)
pt3dadd(139.184, 83.855, -19.324, 0.756)
pt3dadd(139.066, 83.843, -19.329, 0.742)
pt3dadd(138.948, 83.83, -19.34, 0.728)
pt3dadd(138.841, 83.819, -19.385, 0.734)
pt3dadd(138.734, 83.808, -19.429, 0.738)
pt3dadd(138.628, 83.796, -19.474, 0.744)
pt3dadd(138.521, 83.785, -19.519, 0.748)
pt3dadd(138.415, 83.774, -19.564, 0.754)
pt3dadd(138.305, 83.76, -19.602, 0.766)
pt3dadd(138.194, 83.746, -19.64, 0.78)
pt3dadd(138.084, 83.732, -19.678, 0.796)
pt3dadd(137.975, 83.718, -19.715, 0.81)
pt3dadd(137.864, 83.704, -19.753, 0.824)
pt3dadd(137.771, 83.677, -19.809, 0.832)
pt3dadd(137.686, 83.644, -19.875, 0.838)
pt3dadd(137.602, 83.611, -19.94, 0.844)
pt3dadd(137.518, 83.578, -20.005, 0.85)
pt3dadd(137.431, 83.536, -20.063, 0.856)
pt3dadd(137.339, 83.468, -20.093, 0.86)
pt3dadd(137.248, 83.4, -20.124, 0.866)
pt3dadd(137.156, 83.332, -20.155, 0.872)
pt3dadd(137.064, 83.264, -20.185, 0.878)
pt3dadd(136.96, 83.207, -20.198, 0.89)
pt3dadd(136.854, 83.153, -20.208, 0.9)
pt3dadd(136.744, 83.125, -20.236, 0.92)
pt3dadd(136.633, 83.107, -20.271, 0.942)
pt3dadd(136.519, 83.112, -20.291, 0.954)
pt3dadd(136.403, 83.142, -20.296, 0.954)
pt3dadd(136.29, 83.177, -20.3, 0.948)
pt3dadd(136.184, 83.234, -20.3, 0.926)
pt3dadd(136.079, 83.291, -20.3, 0.9)
pt3dadd(135.971, 83.345, -20.3, 0.848)
pt3dadd(135.898, 83.432, -20.3, 0.822)
pt3dadd(135.847, 83.541, -20.3, 0.812)
pt3dadd(135.79, 83.646, -20.3, 0.798)
pt3dadd(135.719, 83.743, -20.3, 0.774)
pt3dadd(135.646, 83.833, -20.303, 0.752)
pt3dadd(135.54, 83.835, -20.352, 0.728)
pt3dadd(135.437, 83.838, -20.401, 0.702)
pt3dadd(135.374, 83.915, -20.458, 0.646)
pt3dadd(135.312, 83.998, -20.502, 0.594)
pt3dadd(135.245, 84.096, -20.51, 0.558)
pt3dadd(135.188, 84.188, -20.553, 0.54)
pt3dadd(135.134, 84.277, -20.602, 0.526)
pt3dadd(135.08, 84.367, -20.651, 0.514)
pt3dadd(135.024, 84.459, -20.69, 0.502)
pt3dadd(134.958, 84.559, -20.695, 0.502)
pt3dadd(134.891, 84.658, -20.7, 0.504)
pt3dadd(134.826, 84.759, -20.7, 0.514)
pt3dadd(134.761, 84.861, -20.7, 0.526)
pt3dadd(134.725, 84.955, -20.652, 0.56)
pt3dadd(134.695, 85.049, -20.595, 0.598)
pt3dadd(134.69, 85.072, -20.5, 0.652)
pt3dadd(134.69, 85.072, -20.4, 0.652)
pt3dadd(134.69, 85.072, -20.3, 0.596)
pt3dadd(134.69, 85.072, -20.2, 0.528)
}
dend_7[50] {pt3dclear()
pt3dadd(151.757, 82.401, -1.589, 1.908)
pt3dadd(151.757, 82.46, -1.571, 1.888)
pt3dadd(151.758, 82.573, -1.538, 1.85)
pt3dadd(151.758, 82.686, -1.504, 1.812)
pt3dadd(151.759, 82.799, -1.47, 1.774)
pt3dadd(151.76, 82.911, -1.436, 1.736)
pt3dadd(151.76, 83.024, -1.402, 1.698)
pt3dadd(151.762, 83.137, -1.369, 1.66)
pt3dadd(151.762, 83.25, -1.335, 1.622)
pt3dadd(151.763, 83.363, -1.301, 1.584)
pt3dadd(151.878, 83.379, -1.3, 1.52)
pt3dadd(151.998, 83.392, -1.3, 1.454)
pt3dadd(152.117, 83.404, -1.3, 1.39)
pt3dadd(152.237, 83.417, -1.3, 1.326)
pt3dadd(152.356, 83.429, -1.3, 1.262)
pt3dadd(152.476, 83.442, -1.3, 1.196)
pt3dadd(152.594, 83.454, -1.3, 1.132)
pt3dadd(152.694, 83.52, -1.3, 1.088)
pt3dadd(152.792, 83.587, -1.3, 1.044)
pt3dadd(152.892, 83.655, -1.3, 1)
pt3dadd(152.993, 83.722, -1.3, 0.956)
pt3dadd(153.091, 83.789, -1.3, 0.914)
pt3dadd(153.176, 83.872, -1.3, 0.888)
pt3dadd(153.259, 83.96, -1.3, 0.868)
pt3dadd(153.342, 84.047, -1.3, 0.848)
pt3dadd(153.425, 84.134, -1.3, 0.828)
pt3dadd(153.506, 84.221, -1.3, 0.808)
pt3dadd(153.604, 84.292, -1.3, 0.808)
pt3dadd(153.702, 84.359, -1.3, 0.812)
pt3dadd(153.802, 84.427, -1.3, 0.818)
pt3dadd(153.901, 84.494, -1.3, 0.822)
pt3dadd(154.001, 84.561, -1.3, 0.828)
pt3dadd(154.111, 84.604, -1.3, 0.84)
pt3dadd(154.228, 84.633, -1.3, 0.856)
pt3dadd(154.344, 84.663, -1.3, 0.872)
pt3dadd(154.46, 84.693, -1.3, 0.888)
pt3dadd(154.577, 84.722, -1.3, 0.904)
pt3dadd(154.693, 84.752, -1.3, 0.92)
pt3dadd(154.806, 84.789, -1.3, 0.938)
pt3dadd(154.918, 84.834, -1.3, 0.956)
pt3dadd(155.029, 84.879, -1.3, 0.974)
pt3dadd(155.141, 84.924, -1.3, 0.992)
pt3dadd(155.251, 84.969, -1.3, 1.008)
pt3dadd(155.363, 85.014, -1.3, 1.026)
pt3dadd(155.473, 85.058, -1.3, 1.036)
pt3dadd(155.585, 85.103, -1.3, 1.046)
pt3dadd(155.698, 85.148, -1.3, 1.054)
pt3dadd(155.808, 85.193, -1.3, 1.064)
pt3dadd(155.92, 85.237, -1.3, 1.072)
pt3dadd(156.031, 85.281, -1.3, 1.078)
pt3dadd(156.145, 85.318, -1.3, 1.07)
pt3dadd(156.259, 85.355, -1.3, 1.062)
pt3dadd(156.374, 85.392, -1.3, 1.052)
pt3dadd(156.488, 85.429, -1.3, 1.044)
pt3dadd(156.602, 85.465, -1.3, 1.036)
pt3dadd(156.714, 85.505, -1.305, 1.026)
pt3dadd(156.823, 85.552, -1.326, 1.01)
pt3dadd(156.93, 85.599, -1.346, 0.994)
pt3dadd(157.037, 85.646, -1.367, 0.98)
pt3dadd(157.145, 85.694, -1.387, 0.964)
pt3dadd(157.252, 85.747, -1.401, 0.954)
pt3dadd(157.354, 85.809, -1.403, 0.954)
pt3dadd(157.456, 85.872, -1.405, 0.954)
pt3dadd(157.558, 85.934, -1.407, 0.954)
pt3dadd(157.661, 85.997, -1.409, 0.954)
pt3dadd(157.766, 86.049, -1.414, 0.956)
pt3dadd(157.884, 86.062, -1.428, 0.96)
pt3dadd(158.003, 86.074, -1.443, 0.964)
pt3dadd(158.12, 86.087, -1.457, 0.968)
pt3dadd(158.238, 86.099, -1.472, 0.972)
pt3dadd(158.357, 86.111, -1.486, 0.976)
pt3dadd(158.474, 86.124, -1.5, 0.98)
pt3dadd(158.594, 86.136, -1.5, 0.982)
pt3dadd(158.713, 86.149, -1.5, 0.986)
pt3dadd(158.833, 86.161, -1.5, 0.99)
pt3dadd(158.952, 86.174, -1.5, 0.994)
pt3dadd(159.072, 86.187, -1.5, 0.998)
pt3dadd(159.191, 86.199, -1.5, 1)
pt3dadd(159.308, 86.212, -1.5, 1.004)
pt3dadd(159.425, 86.242, -1.5, 1)
pt3dadd(159.541, 86.271, -1.5, 0.996)
pt3dadd(159.658, 86.301, -1.5, 0.992)
pt3dadd(159.774, 86.33, -1.5, 0.988)
pt3dadd(159.89, 86.36, -1.5, 0.984)
pt3dadd(160.007, 86.39, -1.5, 0.98)
pt3dadd(160.124, 86.406, -1.514, 0.99)
pt3dadd(160.242, 86.421, -1.531, 1.002)
pt3dadd(160.36, 86.436, -1.548, 1.016)
pt3dadd(160.477, 86.45, -1.564, 1.028)
pt3dadd(160.594, 86.465, -1.581, 1.04)
pt3dadd(160.712, 86.479, -1.598, 1.054)
pt3dadd(160.831, 86.492, -1.6, 1.064)
pt3dadd(160.95, 86.505, -1.6, 1.074)
pt3dadd(161.07, 86.517, -1.6, 1.086)
pt3dadd(161.189, 86.53, -1.6, 1.096)
pt3dadd(161.309, 86.542, -1.6, 1.108)
pt3dadd(161.428, 86.555, -1.6, 1.118)
pt3dadd(161.548, 86.567, -1.6, 1.128)
pt3dadd(161.666, 86.58, -1.6, 1.134)
pt3dadd(161.786, 86.592, -1.6, 1.136)
pt3dadd(161.905, 86.605, -1.6, 1.14)
pt3dadd(162.025, 86.618, -1.6, 1.144)
pt3dadd(162.144, 86.63, -1.6, 1.148)
pt3dadd(162.263, 86.643, -1.6, 1.152)
pt3dadd(162.383, 86.655, -1.6, 1.154)
pt3dadd(162.502, 86.668, -1.6, 1.14)
pt3dadd(162.622, 86.68, -1.6, 1.122)
pt3dadd(162.74, 86.693, -1.6, 1.104)
pt3dadd(162.86, 86.705, -1.6, 1.086)
pt3dadd(162.979, 86.718, -1.6, 1.068)
pt3dadd(163.099, 86.73, -1.6, 1.05)
pt3dadd(163.218, 86.743, -1.6, 1.032)
pt3dadd(163.338, 86.756, -1.6, 1.004)
pt3dadd(163.457, 86.768, -1.6, 0.976)
pt3dadd(163.576, 86.781, -1.6, 0.948)
pt3dadd(163.696, 86.793, -1.6, 0.918)
pt3dadd(163.814, 86.806, -1.6, 0.89)
pt3dadd(163.934, 86.818, -1.6, 0.862)
pt3dadd(164.053, 86.831, -1.6, 0.832)
pt3dadd(164.173, 86.845, -1.6, 0.81)
pt3dadd(164.292, 86.859, -1.6, 0.788)
pt3dadd(164.411, 86.874, -1.6, 0.766)
pt3dadd(164.53, 86.888, -1.6, 0.744)
pt3dadd(164.648, 86.903, -1.6, 0.722)
pt3dadd(164.767, 86.917, -1.6, 0.7)
pt3dadd(164.886, 86.932, -1.6, 0.678)
pt3dadd(165.002, 86.961, -1.6, 0.662)
pt3dadd(165.119, 86.991, -1.6, 0.646)
pt3dadd(165.235, 87.02, -1.6, 0.63)
pt3dadd(165.352, 87.05, -1.6, 0.614)
pt3dadd(165.468, 87.079, -1.6, 0.598)
pt3dadd(165.584, 87.109, -1.6, 0.58)
pt3dadd(165.703, 87.125, -1.6, 0.586)
pt3dadd(165.823, 87.137, -1.6, 0.598)
pt3dadd(165.942, 87.15, -1.6, 0.608)
pt3dadd(166.062, 87.162, -1.6, 0.618)
pt3dadd(166.181, 87.175, -1.6, 0.63)
pt3dadd(166.3, 87.188, -1.6, 0.64)
pt3dadd(166.42, 87.2, -1.6, 0.65)
pt3dadd(166.538, 87.213, -1.6, 0.668)
}
}
proc shape3d_55() {
dend_7[50] { pt3dadd(166.658, 87.225, -1.6, 0.686)
pt3dadd(166.777, 87.238, -1.6, 0.704)
pt3dadd(166.897, 87.25, -1.6, 0.722)
pt3dadd(167.016, 87.263, -1.6, 0.74)
pt3dadd(167.136, 87.275, -1.6, 0.758)
pt3dadd(167.255, 87.288, -1.6, 0.774)
pt3dadd(167.374, 87.3, -1.6, 0.804)
pt3dadd(167.494, 87.313, -1.6, 0.836)
pt3dadd(167.612, 87.326, -1.6, 0.868)
pt3dadd(167.732, 87.338, -1.6, 0.902)
pt3dadd(167.851, 87.351, -1.6, 0.934)
pt3dadd(167.971, 87.363, -1.6, 0.966)
pt3dadd(168.09, 87.376, -1.6, 0.998)
pt3dadd(168.21, 87.388, -1.6, 1.01)
pt3dadd(168.329, 87.401, -1.6, 1.018)
pt3dadd(168.449, 87.413, -1.6, 1.024)
pt3dadd(168.568, 87.426, -1.6, 1.032)
pt3dadd(168.686, 87.438, -1.6, 1.038)
pt3dadd(168.806, 87.451, -1.6, 1.046)
pt3dadd(168.925, 87.464, -1.6, 1.054)
pt3dadd(169.045, 87.476, -1.604, 1.046)
pt3dadd(169.164, 87.489, -1.609, 1.034)
pt3dadd(169.284, 87.501, -1.614, 1.022)
pt3dadd(169.403, 87.514, -1.619, 1.012)
pt3dadd(169.522, 87.526, -1.624, 1)
pt3dadd(169.64, 87.539, -1.629, 0.988)
pt3dadd(169.76, 87.551, -1.637, 0.974)
pt3dadd(169.873, 87.563, -1.667, 0.938)
pt3dadd(169.986, 87.575, -1.697, 0.902)
pt3dadd(170.101, 87.587, -1.727, 0.866)
pt3dadd(170.214, 87.599, -1.757, 0.83)
pt3dadd(170.329, 87.611, -1.786, 0.794)
pt3dadd(170.446, 87.623, -1.8, 0.772)
pt3dadd(170.566, 87.636, -1.8, 0.762)
pt3dadd(170.684, 87.648, -1.8, 0.75)
pt3dadd(170.804, 87.661, -1.8, 0.74)
pt3dadd(170.923, 87.674, -1.8, 0.73)
pt3dadd(171.043, 87.686, -1.8, 0.718)
pt3dadd(171.162, 87.699, -1.8, 0.708)
pt3dadd(171.281, 87.7, -1.8, 0.71)
pt3dadd(171.402, 87.693, -1.8, 0.722)
pt3dadd(171.521, 87.686, -1.8, 0.734)
pt3dadd(171.641, 87.679, -1.8, 0.746)
pt3dadd(171.761, 87.671, -1.8, 0.76)
pt3dadd(171.88, 87.664, -1.8, 0.772)
pt3dadd(172, 87.666, -1.8, 0.81)
pt3dadd(172.118, 87.678, -1.8, 0.876)
pt3dadd(172.238, 87.691, -1.8, 0.944)
pt3dadd(172.357, 87.704, -1.8, 1.006)
pt3dadd(172.477, 87.716, -1.8, 1.066)
pt3dadd(172.596, 87.729, -1.8, 1.124)
pt3dadd(172.716, 87.726, -1.8, 1.174)
pt3dadd(172.834, 87.705, -1.8, 1.216)
pt3dadd(172.951, 87.682, -1.8, 1.256)
pt3dadd(173.052, 87.618, -1.8, 1.256)
pt3dadd(173.154, 87.553, -1.8, 1.256)
pt3dadd(173.248, 87.479, -1.8, 1.208)
pt3dadd(173.344, 87.408, -1.8, 1.152)
pt3dadd(173.446, 87.344, -1.8, 1.092)
pt3dadd(173.532, 87.269, -1.813, 1.026)
pt3dadd(173.592, 87.174, -1.849, 0.946)
pt3dadd(173.671, 87.117, -1.893, 0.864)
pt3dadd(173.772, 87.1, -1.945, 0.786)
pt3dadd(173.869, 87.072, -2, 0.728)
pt3dadd(173.963, 87.037, -2.055, 0.686)
pt3dadd(174.073, 87.046, -2.083, 0.666)
pt3dadd(174.186, 87.069, -2.108, 0.654)
pt3dadd(174.289, 87.103, -2.151, 0.66)
pt3dadd(174.392, 87.137, -2.194, 0.664)
pt3dadd(174.494, 87.171, -2.237, 0.67)
pt3dadd(174.598, 87.204, -2.28, 0.676)
pt3dadd(174.709, 87.227, -2.3, 0.678)
pt3dadd(174.829, 87.239, -2.3, 0.678)
pt3dadd(174.948, 87.252, -2.3, 0.678)
pt3dadd(175.068, 87.267, -2.3, 0.682)
pt3dadd(175.187, 87.284, -2.3, 0.692)
pt3dadd(175.306, 87.301, -2.3, 0.7)
pt3dadd(175.379, 87.378, -2.3, 0.718)
pt3dadd(175.428, 87.487, -2.3, 0.74)
pt3dadd(175.478, 87.596, -2.3, 0.754)
pt3dadd(175.528, 87.706, -2.3, 0.754)
pt3dadd(175.595, 87.792, -2.3, 0.748)
pt3dadd(175.714, 87.816, -2.3, 0.732)
pt3dadd(175.83, 87.84, -2.3, 0.716)
pt3dadd(175.949, 87.864, -2.3, 0.7)
pt3dadd(176.065, 87.888, -2.3, 0.684)
pt3dadd(176.179, 87.926, -2.3, 0.642)
pt3dadd(176.291, 87.972, -2.3, 0.59)
pt3dadd(176.404, 88.012, -2.3, 0.538)
pt3dadd(176.52, 88.035, -2.3, 0.506)
pt3dadd(176.639, 88.053, -2.3, 0.514)
pt3dadd(176.758, 88.07, -2.3, 0.524)
pt3dadd(176.876, 88.088, -2.3, 0.534)
pt3dadd(176.995, 88.105, -2.3, 0.542)
pt3dadd(177.114, 88.122, -2.3, 0.552)
pt3dadd(177.234, 88.122, -2.3, 0.604)
pt3dadd(177.354, 88.119, -2.3, 0.66)
pt3dadd(177.474, 88.113, -2.3, 0.72)
pt3dadd(177.592, 88.092, -2.3, 0.792)
pt3dadd(177.71, 88.071, -2.3, 0.864)
pt3dadd(177.827, 88.045, -2.3, 0.938)
pt3dadd(177.943, 88.018, -2.3, 1.014)
pt3dadd(178.034, 87.957, -2.3, 1.078)
pt3dadd(178.091, 87.851, -2.3, 1.134)
pt3dadd(178.156, 87.752, -2.3, 1.188)
pt3dadd(178.256, 87.688, -2.3, 1.24)
pt3dadd(178.351, 87.614, -2.3, 1.252)
pt3dadd(178.444, 87.537, -2.3, 1.246)
pt3dadd(178.536, 87.46, -2.3, 1.242)
pt3dadd(178.628, 87.383, -2.3, 1.236)
pt3dadd(178.72, 87.306, -2.3, 1.232)
pt3dadd(178.764, 87.204, -2.324, 1.204)
pt3dadd(178.794, 87.094, -2.355, 1.168)
pt3dadd(178.876, 87.027, -2.377, 1.132)
pt3dadd(178.987, 86.986, -2.394, 1.094)
pt3dadd(179.102, 86.975, -2.4, 1.074)
pt3dadd(179.222, 86.983, -2.4, 1.066)
pt3dadd(179.342, 86.991, -2.4, 1.058)
pt3dadd(179.462, 87.002, -2.4, 1.042)
pt3dadd(179.581, 87.015, -2.4, 1.026)
pt3dadd(179.701, 87.027, -2.4, 1.008)
pt3dadd(179.81, 86.99, -2.4, 0.99)
pt3dadd(179.917, 86.934, -2.4, 0.968)
pt3dadd(180.023, 86.879, -2.4, 0.948)
pt3dadd(180.128, 86.822, -2.4, 0.926)
pt3dadd(180.229, 86.757, -2.4, 0.902)
pt3dadd(180.331, 86.693, -2.4, 0.88)
pt3dadd(180.442, 86.647, -2.4, 0.906)
pt3dadd(180.55, 86.595, -2.4, 0.91)
pt3dadd(180.658, 86.544, -2.4, 0.916)
pt3dadd(180.767, 86.492, -2.4, 0.92)
pt3dadd(180.875, 86.44, -2.4, 0.926)
pt3dadd(180.984, 86.391, -2.4, 0.928)
pt3dadd(181.098, 86.352, -2.4, 0.924)
pt3dadd(181.211, 86.312, -2.4, 0.918)
pt3dadd(181.325, 86.273, -2.4, 0.914)
pt3dadd(181.438, 86.234, -2.4, 0.91)
pt3dadd(181.552, 86.195, -2.4, 0.904)
pt3dadd(181.668, 86.169, -2.4, 0.892)
pt3dadd(181.786, 86.146, -2.4, 0.878)
pt3dadd(181.903, 86.123, -2.4, 0.866)
pt3dadd(182.021, 86.099, -2.4, 0.852)
pt3dadd(182.14, 86.076, -2.4, 0.838)
pt3dadd(182.258, 86.059, -2.4, 0.826)
pt3dadd(182.377, 86.056, -2.4, 0.818)
pt3dadd(182.497, 86.054, -2.4, 0.81)
pt3dadd(182.617, 86.051, -2.4, 0.802)
pt3dadd(182.737, 86.049, -2.4, 0.794)
pt3dadd(182.857, 86.047, -2.4, 0.786)
pt3dadd(182.977, 86.044, -2.4, 0.778)
pt3dadd(183.096, 86.023, -2.4, 0.758)
pt3dadd(183.214, 86.002, -2.4, 0.736)
pt3dadd(183.331, 85.981, -2.4, 0.728)
pt3dadd(183.45, 85.961, -2.4, 0.728)
pt3dadd(183.569, 85.94, -2.401, 0.73)
pt3dadd(183.685, 85.918, -2.406, 0.74)
pt3dadd(183.804, 85.895, -2.41, 0.752)
pt3dadd(183.895, 85.9, -2.469, 0.764)
pt3dadd(183.983, 85.909, -2.537, 0.776)
pt3dadd(184.074, 85.919, -2.601, 0.766)
pt3dadd(184.174, 85.921, -2.654, 0.75)
pt3dadd(184.286, 85.908, -2.687, 0.74)
pt3dadd(184.4, 85.895, -2.719, 0.73)
pt3dadd(184.512, 85.882, -2.751, 0.718)
pt3dadd(184.625, 85.868, -2.784, 0.708)
pt3dadd(184.74, 85.878, -2.8, 0.704)
pt3dadd(184.854, 85.909, -2.8, 0.704)
pt3dadd(184.97, 85.942, -2.8, 0.704)
pt3dadd(185.087, 85.974, -2.8, 0.704)
pt3dadd(185.202, 86.006, -2.8, 0.704)
pt3dadd(185.317, 86.037, -2.8, 0.704)
pt3dadd(185.422, 86.09, -2.8, 0.706)
pt3dadd(185.51, 86.172, -2.8, 0.71)
pt3dadd(185.598, 86.253, -2.8, 0.716)
pt3dadd(185.686, 86.335, -2.8, 0.72)
pt3dadd(185.773, 86.416, -2.8, 0.726)
pt3dadd(185.843, 86.511, -2.8, 0.732)
pt3dadd(185.885, 86.623, -2.8, 0.744)
pt3dadd(185.932, 86.733, -2.8, 0.756)
pt3dadd(185.995, 86.835, -2.8, 0.768)
pt3dadd(186.061, 86.935, -2.8, 0.778)
pt3dadd(186.146, 87.019, -2.8, 0.778)
pt3dadd(186.233, 87.103, -2.8, 0.778)
pt3dadd(186.32, 87.173, -2.833, 0.754)
pt3dadd(186.41, 87.237, -2.867, 0.726)
pt3dadd(186.529, 87.252, -2.875, 0.692)
pt3dadd(186.648, 87.268, -2.882, 0.66)
pt3dadd(186.768, 87.283, -2.889, 0.626)
pt3dadd(186.886, 87.298, -2.896, 0.594)
pt3dadd(187.003, 87.293, -2.892, 0.542)
pt3dadd(187.12, 87.267, -2.876, 0.47)
pt3dadd(187.22, 87.276, -2.849, 0.372)
pt3dadd(187.302, 87.344, -2.8, 0.226)
}
dend_0[4] {pt3dclear()
pt3dadd(126.776, 92.48, 6.626, 13.108)
pt3dadd(126.776, 92.381, 6.626, 13.108)
pt3dadd(126.776, 92.261, 6.626, 13.108)
pt3dadd(126.776, 92.141, 6.626, 13.108)
pt3dadd(126.776, 92.021, 6.626, 13.108)
pt3dadd(126.781, 91.901, 6.627, 13.082)
pt3dadd(126.791, 91.781, 6.628, 13.032)
}
}
proc shape3d_56() {
dend_0[4] { pt3dadd(126.8, 91.662, 6.629, 12.98)
pt3dadd(126.811, 91.542, 6.63, 12.928)
pt3dadd(126.821, 91.422, 6.631, 12.878)
pt3dadd(126.83, 91.303, 6.633, 12.826)
pt3dadd(126.84, 91.183, 6.634, 12.774)
pt3dadd(126.85, 91.064, 6.635, 12.724)
pt3dadd(126.859, 90.944, 6.636, 12.672)
pt3dadd(126.87, 90.824, 6.637, 12.622)
pt3dadd(126.895, 90.708, 6.641, 12.484)
pt3dadd(126.934, 90.594, 6.645, 12.288)
pt3dadd(126.971, 90.481, 6.65, 12.09)
pt3dadd(127.008, 90.367, 6.655, 11.894)
pt3dadd(127.046, 90.253, 6.659, 11.696)
pt3dadd(127.084, 90.139, 6.664, 11.5)
pt3dadd(127.121, 90.025, 6.668, 11.302)
pt3dadd(127.159, 89.911, 6.673, 11.106)
pt3dadd(127.196, 89.798, 6.678, 10.908)
pt3dadd(127.234, 89.684, 6.682, 10.712)
pt3dadd(127.284, 89.575, 6.688, 10.55)
pt3dadd(127.342, 89.47, 6.694, 10.41)
pt3dadd(127.399, 89.365, 6.701, 10.272)
pt3dadd(127.457, 89.26, 6.708, 10.134)
pt3dadd(127.514, 89.155, 6.714, 9.994)
pt3dadd(127.572, 89.05, 6.721, 9.856)
pt3dadd(127.63, 88.945, 6.727, 9.718)
pt3dadd(127.687, 88.84, 6.734, 9.578)
pt3dadd(127.745, 88.735, 6.74, 9.44)
pt3dadd(127.802, 88.63, 6.747, 9.302)
pt3dadd(127.862, 88.528, 6.754, 9.136)
pt3dadd(127.926, 88.426, 6.763, 8.952)
pt3dadd(127.99, 88.325, 6.772, 8.77)
pt3dadd(128.053, 88.224, 6.78, 8.588)
pt3dadd(128.117, 88.122, 6.789, 8.404)
pt3dadd(128.179, 88.021, 6.798, 8.222)
pt3dadd(128.243, 87.919, 6.807, 8.04)
pt3dadd(128.306, 87.818, 6.815, 7.856)
pt3dadd(128.37, 87.717, 6.824, 7.674)
pt3dadd(128.434, 87.615, 6.833, 7.492)
pt3dadd(128.494, 87.513, 6.846, 7.296)
}
dend_7[51] {pt3dclear()
pt3dadd(128.494, 87.513, 6.846, 7.296)
pt3dadd(128.552, 87.41, 6.862, 7.09)
pt3dadd(128.611, 87.307, 6.879, 6.884)
pt3dadd(128.67, 87.204, 6.895, 6.68)
pt3dadd(128.728, 87.102, 6.912, 6.474)
pt3dadd(128.786, 86.999, 6.928, 6.268)
pt3dadd(128.845, 86.896, 6.944, 6.064)
pt3dadd(128.904, 86.793, 6.961, 5.858)
pt3dadd(128.963, 86.69, 6.977, 5.652)
pt3dadd(129.022, 86.587, 6.994, 5.448)
pt3dadd(129.065, 86.482, 7.024, 5.256)
pt3dadd(129.103, 86.377, 7.059, 5.07)
pt3dadd(129.14, 86.271, 7.094, 4.884)
pt3dadd(129.179, 86.165, 7.129, 4.696)
pt3dadd(129.217, 86.059, 7.164, 4.51)
pt3dadd(129.254, 85.954, 7.199, 4.324)
pt3dadd(129.293, 85.848, 7.234, 4.138)
pt3dadd(129.33, 85.742, 7.269, 3.952)
pt3dadd(129.368, 85.636, 7.304, 3.764)
pt3dadd(129.407, 85.53, 7.339, 3.578)
pt3dadd(129.427, 85.418, 7.367, 3.442)
pt3dadd(129.443, 85.302, 7.391, 3.326)
pt3dadd(129.457, 85.187, 7.415, 3.208)
pt3dadd(129.472, 85.071, 7.439, 3.092)
pt3dadd(129.487, 84.956, 7.463, 2.974)
pt3dadd(129.502, 84.84, 7.488, 2.856)
pt3dadd(129.517, 84.725, 7.512, 2.74)
pt3dadd(129.532, 84.609, 7.536, 2.622)
pt3dadd(129.546, 84.494, 7.56, 2.506)
pt3dadd(129.562, 84.378, 7.584, 2.388)
pt3dadd(129.569, 84.26, 7.601, 2.294)
pt3dadd(129.572, 84.142, 7.614, 2.206)
pt3dadd(129.576, 84.023, 7.628, 2.12)
pt3dadd(129.581, 83.904, 7.642, 2.032)
pt3dadd(129.584, 83.785, 7.655, 1.946)
pt3dadd(129.589, 83.666, 7.669, 1.858)
pt3dadd(129.593, 83.548, 7.683, 1.772)
pt3dadd(129.596, 83.429, 7.697, 1.684)
pt3dadd(129.601, 83.31, 7.71, 1.598)
pt3dadd(129.605, 83.191, 7.724, 1.51)
pt3dadd(129.606, 83.071, 7.729, 1.472)
pt3dadd(129.607, 82.952, 7.733, 1.446)
pt3dadd(129.608, 82.832, 7.736, 1.42)
pt3dadd(129.608, 82.712, 7.739, 1.394)
pt3dadd(129.61, 82.592, 7.742, 1.366)
pt3dadd(129.61, 82.472, 7.745, 1.34)
pt3dadd(129.611, 82.352, 7.748, 1.314)
pt3dadd(129.612, 82.232, 7.752, 1.288)
pt3dadd(129.612, 82.112, 7.755, 1.262)
pt3dadd(129.613, 81.992, 7.758, 1.236)
pt3dadd(129.614, 81.872, 7.755, 1.242)
pt3dadd(129.616, 81.752, 7.751, 1.254)
pt3dadd(129.617, 81.632, 7.747, 1.266)
pt3dadd(129.617, 81.513, 7.743, 1.278)
pt3dadd(129.618, 81.393, 7.739, 1.292)
pt3dadd(129.619, 81.273, 7.735, 1.304)
pt3dadd(129.62, 81.153, 7.731, 1.316)
pt3dadd(129.622, 81.033, 7.727, 1.328)
pt3dadd(129.623, 80.913, 7.722, 1.342)
pt3dadd(129.624, 80.793, 7.718, 1.354)
pt3dadd(129.625, 80.673, 7.711, 1.356)
pt3dadd(129.628, 80.554, 7.704, 1.356)
pt3dadd(129.63, 80.434, 7.696, 1.356)
pt3dadd(129.632, 80.314, 7.689, 1.356)
pt3dadd(129.635, 80.195, 7.682, 1.356)
pt3dadd(129.636, 80.075, 7.674, 1.356)
pt3dadd(129.638, 79.956, 7.667, 1.356)
pt3dadd(129.641, 79.836, 7.659, 1.356)
pt3dadd(129.643, 79.716, 7.652, 1.356)
pt3dadd(129.646, 79.597, 7.644, 1.356)
pt3dadd(129.648, 79.477, 7.634, 1.356)
pt3dadd(129.653, 79.358, 7.623, 1.356)
pt3dadd(129.656, 79.239, 7.612, 1.356)
pt3dadd(129.66, 79.12, 7.601, 1.356)
pt3dadd(129.664, 79, 7.59, 1.356)
pt3dadd(129.667, 78.881, 7.579, 1.356)
pt3dadd(129.671, 78.762, 7.568, 1.356)
pt3dadd(129.674, 78.643, 7.558, 1.356)
pt3dadd(129.678, 78.524, 7.547, 1.356)
pt3dadd(129.682, 78.404, 7.536, 1.356)
pt3dadd(129.69, 78.291, 7.505, 1.384)
pt3dadd(129.697, 78.179, 7.469, 1.42)
pt3dadd(129.706, 78.067, 7.433, 1.456)
pt3dadd(129.714, 77.956, 7.398, 1.49)
pt3dadd(129.722, 77.844, 7.362, 1.526)
pt3dadd(129.731, 77.732, 7.327, 1.56)
pt3dadd(129.739, 77.62, 7.291, 1.596)
pt3dadd(129.748, 77.508, 7.255, 1.632)
pt3dadd(129.756, 77.397, 7.22, 1.666)
pt3dadd(129.764, 77.285, 7.184, 1.702)
pt3dadd(129.776, 77.17, 7.157, 1.706)
pt3dadd(129.79, 77.055, 7.131, 1.702)
pt3dadd(129.802, 76.939, 7.106, 1.698)
pt3dadd(129.815, 76.824, 7.081, 1.696)
pt3dadd(129.828, 76.709, 7.055, 1.692)
pt3dadd(129.841, 76.593, 7.03, 1.688)
pt3dadd(129.854, 76.478, 7.005, 1.684)
pt3dadd(129.868, 76.363, 6.979, 1.68)
pt3dadd(129.88, 76.247, 6.954, 1.678)
pt3dadd(129.893, 76.132, 6.929, 1.674)
pt3dadd(129.922, 76.017, 6.914, 1.658)
pt3dadd(129.953, 75.902, 6.902, 1.64)
pt3dadd(129.985, 75.787, 6.889, 1.622)
pt3dadd(130.016, 75.672, 6.877, 1.602)
pt3dadd(130.048, 75.558, 6.865, 1.584)
pt3dadd(130.079, 75.443, 6.852, 1.566)
pt3dadd(130.11, 75.328, 6.84, 1.548)
pt3dadd(130.142, 75.213, 6.827, 1.53)
pt3dadd(130.174, 75.098, 6.815, 1.51)
pt3dadd(130.205, 74.983, 6.803, 1.492)
pt3dadd(130.248, 74.871, 6.802, 1.47)
pt3dadd(130.292, 74.76, 6.802, 1.448)
pt3dadd(130.336, 74.648, 6.801, 1.426)
pt3dadd(130.38, 74.536, 6.801, 1.404)
pt3dadd(130.423, 74.424, 6.801, 1.382)
pt3dadd(130.466, 74.313, 6.801, 1.36)
pt3dadd(130.511, 74.201, 6.8, 1.338)
pt3dadd(130.554, 74.089, 6.8, 1.314)
pt3dadd(130.598, 73.977, 6.8, 1.292)
pt3dadd(130.642, 73.866, 6.8, 1.27)
pt3dadd(130.675, 73.751, 6.811, 1.234)
pt3dadd(130.709, 73.637, 6.822, 1.198)
pt3dadd(130.742, 73.522, 6.833, 1.16)
pt3dadd(130.776, 73.408, 6.844, 1.124)
pt3dadd(130.81, 73.293, 6.856, 1.088)
pt3dadd(130.842, 73.179, 6.867, 1.05)
pt3dadd(130.876, 73.065, 6.878, 1.014)
pt3dadd(130.909, 72.95, 6.889, 0.978)
pt3dadd(130.943, 72.836, 6.9, 0.94)
pt3dadd(130.976, 72.721, 6.911, 0.904)
}
dend_7[52] {pt3dclear()
pt3dadd(130.976, 72.721, 6.911, 0.904)
pt3dadd(130.981, 72.697, 6.919, 0.9)
pt3dadd(131.005, 72.588, 6.956, 0.882)
pt3dadd(131.029, 72.479, 6.993, 0.866)
pt3dadd(131.052, 72.37, 7.029, 0.848)
pt3dadd(131.076, 72.261, 7.066, 0.83)
pt3dadd(131.1, 72.152, 7.102, 0.812)
pt3dadd(131.124, 72.042, 7.139, 0.796)
pt3dadd(131.147, 71.932, 7.172, 0.782)
pt3dadd(131.171, 71.82, 7.204, 0.772)
pt3dadd(131.194, 71.709, 7.236, 0.76)
pt3dadd(131.218, 71.598, 7.268, 0.748)
pt3dadd(131.242, 71.487, 7.301, 0.736)
pt3dadd(131.264, 71.376, 7.333, 0.726)
pt3dadd(131.288, 71.265, 7.365, 0.714)
pt3dadd(131.312, 71.154, 7.398, 0.702)
pt3dadd(131.335, 71.043, 7.43, 0.69)
pt3dadd(131.359, 70.932, 7.462, 0.68)
pt3dadd(131.386, 70.818, 7.486, 0.676)
pt3dadd(131.412, 70.704, 7.508, 0.674)
pt3dadd(131.44, 70.59, 7.531, 0.672)
pt3dadd(131.466, 70.477, 7.553, 0.67)
pt3dadd(131.494, 70.363, 7.575, 0.67)
pt3dadd(131.52, 70.249, 7.598, 0.668)
pt3dadd(131.546, 70.135, 7.621, 0.666)
pt3dadd(131.574, 70.022, 7.643, 0.664)
pt3dadd(131.6, 69.908, 7.665, 0.662)
pt3dadd(131.628, 69.794, 7.688, 0.66)
pt3dadd(131.683, 69.689, 7.699, 0.644)
pt3dadd(131.741, 69.584, 7.709, 0.628)
pt3dadd(131.798, 69.479, 7.719, 0.61)
}
}
proc shape3d_57() {
dend_7[52] { pt3dadd(131.855, 69.375, 7.73, 0.594)
pt3dadd(131.912, 69.27, 7.74, 0.578)
pt3dadd(131.97, 69.165, 7.75, 0.56)
pt3dadd(132.028, 69.061, 7.761, 0.544)
pt3dadd(132.085, 68.956, 7.771, 0.528)
pt3dadd(132.143, 68.851, 7.781, 0.51)
pt3dadd(132.199, 68.747, 7.791, 0.494)
pt3dadd(132.266, 68.647, 7.795, 0.5)
pt3dadd(132.334, 68.548, 7.799, 0.508)
pt3dadd(132.401, 68.449, 7.802, 0.516)
pt3dadd(132.468, 68.349, 7.805, 0.524)
pt3dadd(132.535, 68.25, 7.809, 0.53)
pt3dadd(132.604, 68.151, 7.812, 0.538)
pt3dadd(132.671, 68.052, 7.816, 0.546)
pt3dadd(132.738, 67.953, 7.819, 0.554)
pt3dadd(132.805, 67.853, 7.822, 0.562)
pt3dadd(132.872, 67.754, 7.826, 0.57)
pt3dadd(132.937, 67.653, 7.828, 0.58)
pt3dadd(133.003, 67.553, 7.829, 0.592)
pt3dadd(133.068, 67.452, 7.831, 0.602)
pt3dadd(133.133, 67.351, 7.832, 0.612)
pt3dadd(133.199, 67.25, 7.834, 0.624)
pt3dadd(133.264, 67.149, 7.836, 0.634)
pt3dadd(133.328, 67.049, 7.838, 0.646)
pt3dadd(133.393, 66.948, 7.839, 0.656)
pt3dadd(133.459, 66.847, 7.841, 0.668)
pt3dadd(133.524, 66.746, 7.843, 0.678)
pt3dadd(133.577, 66.639, 7.845, 0.678)
pt3dadd(133.628, 66.531, 7.848, 0.678)
pt3dadd(133.681, 66.423, 7.851, 0.678)
pt3dadd(133.734, 66.315, 7.853, 0.678)
pt3dadd(133.786, 66.207, 7.856, 0.678)
pt3dadd(133.838, 66.099, 7.859, 0.678)
pt3dadd(133.891, 65.991, 7.861, 0.678)
pt3dadd(133.944, 65.883, 7.864, 0.678)
pt3dadd(133.996, 65.775, 7.867, 0.678)
pt3dadd(134.048, 65.668, 7.87, 0.678)
}
dend_7[53] {pt3dclear()
pt3dadd(134.048, 65.668, 7.87, 0.678)
pt3dadd(134.086, 65.599, 7.874, 0.7)
pt3dadd(134.142, 65.493, 7.88, 0.734)
pt3dadd(134.2, 65.388, 7.887, 0.768)
pt3dadd(134.256, 65.283, 7.893, 0.802)
pt3dadd(134.312, 65.177, 7.9, 0.836)
pt3dadd(134.37, 65.072, 7.906, 0.87)
pt3dadd(134.426, 64.966, 7.913, 0.904)
pt3dadd(134.484, 64.861, 7.919, 0.938)
pt3dadd(134.54, 64.756, 7.925, 0.97)
pt3dadd(134.597, 64.65, 7.932, 1.004)
pt3dadd(134.654, 64.545, 7.938, 1.038)
pt3dadd(134.711, 64.44, 7.945, 1.072)
pt3dadd(134.767, 64.334, 7.951, 1.106)
pt3dadd(134.804, 64.22, 7.963, 1.056)
pt3dadd(134.84, 64.107, 7.974, 1.008)
pt3dadd(134.876, 63.993, 7.986, 0.958)
pt3dadd(134.912, 63.88, 7.997, 0.91)
pt3dadd(134.948, 63.766, 8.009, 0.862)
pt3dadd(134.984, 63.652, 8.02, 0.812)
pt3dadd(135.02, 63.539, 8.031, 0.764)
pt3dadd(135.056, 63.425, 8.043, 0.714)
pt3dadd(135.094, 63.312, 8.054, 0.666)
pt3dadd(135.13, 63.198, 8.066, 0.618)
pt3dadd(135.157, 63.087, 8.096, 0.614)
pt3dadd(135.186, 62.977, 8.127, 0.61)
pt3dadd(135.215, 62.866, 8.157, 0.606)
pt3dadd(135.244, 62.755, 8.187, 0.6)
pt3dadd(135.272, 62.644, 8.217, 0.596)
pt3dadd(135.301, 62.534, 8.248, 0.592)
pt3dadd(135.33, 62.423, 8.278, 0.588)
pt3dadd(135.359, 62.312, 8.308, 0.584)
pt3dadd(135.388, 62.202, 8.339, 0.578)
pt3dadd(135.415, 62.091, 8.369, 0.574)
pt3dadd(135.443, 61.981, 8.403, 0.578)
pt3dadd(135.469, 61.871, 8.436, 0.58)
pt3dadd(135.496, 61.761, 8.469, 0.584)
pt3dadd(135.522, 61.651, 8.503, 0.586)
pt3dadd(135.548, 61.541, 8.536, 0.588)
pt3dadd(135.576, 61.431, 8.569, 0.592)
pt3dadd(135.602, 61.321, 8.602, 0.594)
pt3dadd(135.629, 61.212, 8.636, 0.596)
pt3dadd(135.655, 61.101, 8.669, 0.6)
pt3dadd(135.683, 60.992, 8.702, 0.6)
pt3dadd(135.719, 60.881, 8.727, 0.582)
pt3dadd(135.755, 60.77, 8.752, 0.564)
pt3dadd(135.79, 60.66, 8.776, 0.544)
pt3dadd(135.826, 60.549, 8.801, 0.526)
pt3dadd(135.86, 60.438, 8.826, 0.508)
pt3dadd(135.896, 60.327, 8.851, 0.49)
pt3dadd(135.931, 60.217, 8.876, 0.472)
pt3dadd(135.967, 60.106, 8.901, 0.452)
pt3dadd(136.002, 59.995, 8.926, 0.434)
pt3dadd(136.045, 59.888, 8.949, 0.416)
pt3dadd(136.112, 59.79, 8.965, 0.4)
pt3dadd(136.178, 59.693, 8.981, 0.382)
pt3dadd(136.246, 59.595, 8.997, 0.366)
pt3dadd(136.313, 59.497, 9.014, 0.35)
pt3dadd(136.38, 59.4, 9.03, 0.332)
pt3dadd(136.447, 59.302, 9.046, 0.316)
pt3dadd(136.514, 59.204, 9.062, 0.298)
pt3dadd(136.582, 59.107, 9.078, 0.282)
pt3dadd(136.649, 59.009, 9.094, 0.266)
pt3dadd(136.718, 58.914, 9.109, 0.254)
pt3dadd(136.8, 58.827, 9.12, 0.264)
pt3dadd(136.883, 58.74, 9.131, 0.276)
pt3dadd(136.964, 58.654, 9.142, 0.286)
pt3dadd(137.046, 58.567, 9.153, 0.296)
pt3dadd(137.128, 58.48, 9.163, 0.306)
pt3dadd(137.209, 58.393, 9.174, 0.316)
pt3dadd(137.292, 58.306, 9.185, 0.328)
pt3dadd(137.374, 58.22, 9.196, 0.338)
pt3dadd(137.455, 58.133, 9.207, 0.348)
pt3dadd(137.539, 58.049, 9.219, 0.362)
pt3dadd(137.629, 57.973, 9.238, 0.382)
pt3dadd(137.719, 57.897, 9.257, 0.404)
pt3dadd(137.809, 57.821, 9.276, 0.426)
pt3dadd(137.899, 57.745, 9.295, 0.448)
pt3dadd(137.989, 57.669, 9.314, 0.47)
pt3dadd(138.079, 57.593, 9.333, 0.49)
pt3dadd(138.169, 57.517, 9.352, 0.512)
pt3dadd(138.259, 57.441, 9.372, 0.534)
pt3dadd(138.349, 57.365, 9.391, 0.556)
pt3dadd(138.442, 57.295, 9.415, 0.582)
pt3dadd(138.538, 57.237, 9.449, 0.612)
pt3dadd(138.635, 57.178, 9.483, 0.644)
pt3dadd(138.731, 57.119, 9.517, 0.676)
pt3dadd(138.827, 57.06, 9.551, 0.706)
pt3dadd(138.924, 57.001, 9.585, 0.738)
pt3dadd(139.02, 56.942, 9.619, 0.77)
pt3dadd(139.116, 56.884, 9.653, 0.8)
pt3dadd(139.212, 56.825, 9.687, 0.832)
pt3dadd(139.309, 56.766, 9.72, 0.864)
pt3dadd(139.404, 56.702, 9.75, 0.878)
pt3dadd(139.496, 56.631, 9.773, 0.866)
pt3dadd(139.589, 56.56, 9.796, 0.854)
pt3dadd(139.681, 56.489, 9.818, 0.842)
pt3dadd(139.774, 56.417, 9.841, 0.83)
pt3dadd(139.867, 56.346, 9.864, 0.818)
pt3dadd(139.96, 56.275, 9.887, 0.806)
pt3dadd(140.052, 56.203, 9.91, 0.792)
pt3dadd(140.144, 56.132, 9.932, 0.78)
pt3dadd(140.237, 56.061, 9.955, 0.768)
pt3dadd(140.328, 55.987, 9.976, 0.758)
pt3dadd(140.417, 55.91, 9.995, 0.75)
pt3dadd(140.507, 55.833, 10.013, 0.742)
pt3dadd(140.596, 55.755, 10.032, 0.732)
pt3dadd(140.684, 55.678, 10.05, 0.724)
pt3dadd(140.773, 55.601, 10.068, 0.716)
pt3dadd(140.863, 55.524, 10.087, 0.708)
pt3dadd(140.952, 55.446, 10.105, 0.7)
pt3dadd(141.041, 55.369, 10.124, 0.692)
pt3dadd(141.131, 55.292, 10.142, 0.682)
pt3dadd(141.217, 55.212, 10.159, 0.678)
pt3dadd(141.302, 55.129, 10.173, 0.678)
pt3dadd(141.388, 55.046, 10.187, 0.678)
pt3dadd(141.473, 54.963, 10.201, 0.678)
pt3dadd(141.558, 54.88, 10.215, 0.678)
pt3dadd(141.643, 54.798, 10.229, 0.678)
pt3dadd(141.728, 54.715, 10.243, 0.678)
pt3dadd(141.814, 54.632, 10.257, 0.678)
pt3dadd(141.899, 54.549, 10.272, 0.678)
pt3dadd(141.983, 54.466, 10.286, 0.678)
pt3dadd(142.066, 54.38, 10.298, 0.684)
pt3dadd(142.142, 54.289, 10.307, 0.698)
pt3dadd(142.22, 54.198, 10.316, 0.712)
pt3dadd(142.298, 54.107, 10.325, 0.726)
pt3dadd(142.376, 54.016, 10.334, 0.74)
pt3dadd(142.453, 53.926, 10.344, 0.752)
pt3dadd(142.531, 53.835, 10.353, 0.766)
pt3dadd(142.609, 53.744, 10.362, 0.78)
pt3dadd(142.687, 53.653, 10.371, 0.794)
pt3dadd(142.764, 53.562, 10.38, 0.808)
pt3dadd(142.838, 53.469, 10.393, 0.816)
pt3dadd(142.906, 53.373, 10.412, 0.82)
pt3dadd(142.974, 53.277, 10.431, 0.822)
pt3dadd(143.041, 53.18, 10.45, 0.824)
pt3dadd(143.11, 53.084, 10.469, 0.826)
pt3dadd(143.177, 52.988, 10.488, 0.83)
pt3dadd(143.245, 52.891, 10.507, 0.832)
pt3dadd(143.314, 52.795, 10.526, 0.834)
pt3dadd(143.381, 52.699, 10.545, 0.836)
pt3dadd(143.449, 52.603, 10.564, 0.838)
pt3dadd(143.508, 52.504, 10.591, 0.83)
pt3dadd(143.558, 52.403, 10.625, 0.814)
pt3dadd(143.61, 52.303, 10.659, 0.798)
pt3dadd(143.662, 52.202, 10.692, 0.782)
pt3dadd(143.713, 52.101, 10.726, 0.766)
pt3dadd(143.765, 52.001, 10.76, 0.75)
pt3dadd(143.815, 51.9, 10.793, 0.734)
pt3dadd(143.867, 51.799, 10.827, 0.718)
pt3dadd(143.918, 51.699, 10.86, 0.702)
pt3dadd(143.97, 51.598, 10.894, 0.686)
pt3dadd(144.026, 51.497, 10.921, 0.688)
pt3dadd(144.086, 51.396, 10.941, 0.704)
pt3dadd(144.146, 51.296, 10.962, 0.72)
pt3dadd(144.206, 51.195, 10.983, 0.736)
pt3dadd(144.266, 51.094, 11.004, 0.752)
pt3dadd(144.326, 50.993, 11.025, 0.768)
pt3dadd(144.386, 50.892, 11.046, 0.784)
pt3dadd(144.448, 50.792, 11.066, 0.8)
pt3dadd(144.508, 50.691, 11.087, 0.816)
pt3dadd(144.568, 50.59, 11.108, 0.832)
}
}
proc shape3d_58() {
dend_7[53] { pt3dadd(144.623, 50.486, 11.126, 0.842)
pt3dadd(144.673, 50.378, 11.14, 0.848)
pt3dadd(144.724, 50.271, 11.155, 0.856)
pt3dadd(144.774, 50.164, 11.17, 0.862)
pt3dadd(144.826, 50.056, 11.184, 0.868)
pt3dadd(144.876, 49.949, 11.199, 0.876)
pt3dadd(144.926, 49.842, 11.214, 0.882)
pt3dadd(144.977, 49.734, 11.228, 0.888)
pt3dadd(145.028, 49.627, 11.243, 0.894)
pt3dadd(145.079, 49.52, 11.257, 0.902)
pt3dadd(145.129, 49.412, 11.268, 0.9)
pt3dadd(145.178, 49.303, 11.275, 0.896)
pt3dadd(145.228, 49.194, 11.282, 0.89)
pt3dadd(145.278, 49.085, 11.289, 0.884)
pt3dadd(145.327, 48.976, 11.296, 0.88)
pt3dadd(145.378, 48.867, 11.303, 0.874)
pt3dadd(145.427, 48.758, 11.311, 0.868)
pt3dadd(145.476, 48.649, 11.318, 0.864)
pt3dadd(145.526, 48.54, 11.325, 0.858)
pt3dadd(145.576, 48.431, 11.332, 0.852)
pt3dadd(145.632, 48.326, 11.335, 0.84)
pt3dadd(145.693, 48.222, 11.335, 0.824)
pt3dadd(145.754, 48.119, 11.335, 0.806)
pt3dadd(145.816, 48.016, 11.335, 0.79)
pt3dadd(145.877, 47.912, 11.336, 0.774)
pt3dadd(145.937, 47.809, 11.336, 0.758)
pt3dadd(145.998, 47.706, 11.336, 0.74)
pt3dadd(146.059, 47.602, 11.337, 0.724)
pt3dadd(146.12, 47.499, 11.337, 0.708)
pt3dadd(146.182, 47.396, 11.337, 0.69)
pt3dadd(146.231, 47.287, 11.337, 0.684)
pt3dadd(146.274, 47.175, 11.338, 0.684)
pt3dadd(146.318, 47.063, 11.339, 0.682)
pt3dadd(146.362, 46.951, 11.339, 0.682)
pt3dadd(146.405, 46.839, 11.34, 0.682)
pt3dadd(146.448, 46.728, 11.34, 0.68)
pt3dadd(146.491, 46.616, 11.341, 0.68)
pt3dadd(146.536, 46.504, 11.342, 0.68)
pt3dadd(146.579, 46.392, 11.342, 0.678)
pt3dadd(146.622, 46.28, 11.343, 0.678)
pt3dadd(146.672, 46.171, 11.344, 0.662)
pt3dadd(146.725, 46.064, 11.345, 0.64)
pt3dadd(146.778, 45.956, 11.346, 0.616)
pt3dadd(146.832, 45.849, 11.347, 0.592)
pt3dadd(146.885, 45.741, 11.348, 0.568)
pt3dadd(146.939, 45.634, 11.349, 0.544)
pt3dadd(146.992, 45.526, 11.35, 0.52)
pt3dadd(147.044, 45.419, 11.351, 0.498)
pt3dadd(147.098, 45.311, 11.352, 0.474)
pt3dadd(147.151, 45.204, 11.353, 0.45)
pt3dadd(147.203, 45.095, 11.355, 0.432)
pt3dadd(147.253, 44.986, 11.356, 0.416)
pt3dadd(147.305, 44.878, 11.358, 0.402)
pt3dadd(147.355, 44.769, 11.36, 0.386)
pt3dadd(147.406, 44.66, 11.362, 0.372)
pt3dadd(147.456, 44.551, 11.364, 0.356)
pt3dadd(147.508, 44.443, 11.365, 0.342)
pt3dadd(147.558, 44.334, 11.367, 0.326)
pt3dadd(147.608, 44.225, 11.369, 0.312)
pt3dadd(147.659, 44.117, 11.371, 0.296)
pt3dadd(147.701, 44.004, 11.373, 0.308)
pt3dadd(147.738, 43.89, 11.377, 0.334)
pt3dadd(147.775, 43.776, 11.38, 0.358)
pt3dadd(147.811, 43.662, 11.383, 0.384)
pt3dadd(147.848, 43.548, 11.386, 0.408)
pt3dadd(147.886, 43.434, 11.389, 0.434)
pt3dadd(147.923, 43.32, 11.393, 0.458)
pt3dadd(147.96, 43.206, 11.396, 0.484)
pt3dadd(147.997, 43.092, 11.399, 0.508)
pt3dadd(148.034, 42.978, 11.402, 0.532)
pt3dadd(148.067, 42.862, 11.408, 0.592)
pt3dadd(148.097, 42.746, 11.415, 0.666)
pt3dadd(148.127, 42.63, 11.422, 0.742)
pt3dadd(148.157, 42.514, 11.429, 0.816)
pt3dadd(148.187, 42.399, 11.435, 0.89)
pt3dadd(148.217, 42.283, 11.442, 0.964)
pt3dadd(148.247, 42.167, 11.449, 1.038)
pt3dadd(148.277, 42.051, 11.456, 1.112)
pt3dadd(148.307, 41.935, 11.463, 1.186)
pt3dadd(148.337, 41.819, 11.47, 1.26)
pt3dadd(148.38, 41.708, 11.479, 1.254)
pt3dadd(148.43, 41.6, 11.489, 1.216)
pt3dadd(148.48, 41.491, 11.499, 1.176)
pt3dadd(148.529, 41.383, 11.509, 1.138)
pt3dadd(148.579, 41.274, 11.519, 1.098)
pt3dadd(148.628, 41.166, 11.53, 1.058)
pt3dadd(148.678, 41.057, 11.54, 1.018)
pt3dadd(148.728, 40.948, 11.55, 0.98)
pt3dadd(148.777, 40.84, 11.56, 0.94)
pt3dadd(148.826, 40.731, 11.57, 0.9)
pt3dadd(148.873, 40.624, 11.591, 0.896)
pt3dadd(148.919, 40.517, 11.616, 0.904)
pt3dadd(148.963, 40.41, 11.642, 0.914)
pt3dadd(149.009, 40.303, 11.667, 0.922)
pt3dadd(149.054, 40.196, 11.693, 0.93)
pt3dadd(149.099, 40.089, 11.718, 0.94)
pt3dadd(149.144, 39.982, 11.743, 0.948)
pt3dadd(149.189, 39.875, 11.768, 0.956)
pt3dadd(149.234, 39.768, 11.794, 0.966)
pt3dadd(149.28, 39.661, 11.819, 0.974)
pt3dadd(149.324, 39.556, 11.85, 0.99)
pt3dadd(149.369, 39.451, 11.882, 1.008)
pt3dadd(149.412, 39.346, 11.913, 1.026)
pt3dadd(149.456, 39.242, 11.945, 1.044)
pt3dadd(149.501, 39.137, 11.977, 1.06)
pt3dadd(149.545, 39.032, 12.009, 1.078)
pt3dadd(149.59, 38.927, 12.041, 1.096)
pt3dadd(149.634, 38.823, 12.073, 1.114)
pt3dadd(149.677, 38.718, 12.105, 1.132)
pt3dadd(149.722, 38.613, 12.137, 1.15)
pt3dadd(149.777, 38.51, 12.16, 1.082)
pt3dadd(149.833, 38.407, 12.181, 1)
pt3dadd(149.89, 38.305, 12.203, 0.918)
pt3dadd(149.946, 38.202, 12.224, 0.836)
pt3dadd(150.002, 38.099, 12.246, 0.752)
pt3dadd(150.059, 37.997, 12.267, 0.67)
pt3dadd(150.115, 37.894, 12.289, 0.588)
pt3dadd(150.172, 37.791, 12.31, 0.506)
pt3dadd(150.228, 37.689, 12.332, 0.422)
pt3dadd(150.286, 37.586, 12.353, 0.34)
pt3dadd(150.328, 37.475, 12.367, 0.372)
pt3dadd(150.368, 37.363, 12.379, 0.426)
pt3dadd(150.409, 37.251, 12.392, 0.48)
pt3dadd(150.45, 37.139, 12.404, 0.534)
pt3dadd(150.491, 37.027, 12.417, 0.588)
pt3dadd(150.53, 36.915, 12.429, 0.642)
pt3dadd(150.571, 36.804, 12.441, 0.696)
pt3dadd(150.612, 36.692, 12.454, 0.75)
pt3dadd(150.653, 36.58, 12.466, 0.804)
pt3dadd(150.692, 36.468, 12.479, 0.858)
pt3dadd(150.727, 36.353, 12.485, 0.878)
pt3dadd(150.761, 36.238, 12.49, 0.892)
pt3dadd(150.796, 36.123, 12.495, 0.906)
pt3dadd(150.829, 36.008, 12.5, 0.922)
pt3dadd(150.863, 35.893, 12.505, 0.936)
pt3dadd(150.896, 35.778, 12.51, 0.95)
pt3dadd(150.93, 35.663, 12.515, 0.964)
pt3dadd(150.964, 35.548, 12.52, 0.98)
pt3dadd(150.997, 35.433, 12.525, 0.994)
pt3dadd(151.032, 35.318, 12.53, 1.008)
pt3dadd(151.072, 35.205, 12.532, 1)
pt3dadd(151.114, 35.093, 12.534, 0.99)
pt3dadd(151.154, 34.98, 12.536, 0.98)
pt3dadd(151.195, 34.867, 12.538, 0.968)
pt3dadd(151.237, 34.755, 12.54, 0.958)
pt3dadd(151.278, 34.642, 12.542, 0.948)
pt3dadd(151.32, 34.529, 12.544, 0.936)
pt3dadd(151.361, 34.417, 12.546, 0.926)
pt3dadd(151.402, 34.304, 12.548, 0.916)
pt3dadd(151.444, 34.191, 12.55, 0.904)
pt3dadd(151.495, 34.083, 12.553, 0.902)
pt3dadd(151.549, 33.976, 12.556, 0.898)
pt3dadd(151.602, 33.868, 12.56, 0.896)
pt3dadd(151.655, 33.761, 12.563, 0.892)
pt3dadd(151.709, 33.653, 12.567, 0.89)
pt3dadd(151.762, 33.546, 12.57, 0.886)
pt3dadd(151.814, 33.438, 12.573, 0.884)
pt3dadd(151.868, 33.331, 12.577, 0.88)
pt3dadd(151.921, 33.223, 12.58, 0.878)
pt3dadd(151.974, 33.116, 12.583, 0.874)
pt3dadd(152.022, 33.006, 12.59, 0.856)
pt3dadd(152.07, 32.896, 12.597, 0.838)
pt3dadd(152.117, 32.787, 12.604, 0.818)
pt3dadd(152.165, 32.677, 12.612, 0.8)
pt3dadd(152.212, 32.567, 12.619, 0.78)
pt3dadd(152.26, 32.457, 12.626, 0.762)
pt3dadd(152.308, 32.347, 12.633, 0.744)
pt3dadd(152.354, 32.237, 12.64, 0.724)
pt3dadd(152.402, 32.127, 12.647, 0.706)
pt3dadd(152.45, 32.018, 12.654, 0.686)
pt3dadd(152.515, 31.918, 12.665, 0.652)
pt3dadd(152.582, 31.819, 12.676, 0.616)
pt3dadd(152.65, 31.721, 12.687, 0.582)
pt3dadd(152.716, 31.622, 12.698, 0.546)
pt3dadd(152.783, 31.523, 12.709, 0.512)
pt3dadd(152.85, 31.424, 12.72, 0.476)
pt3dadd(152.917, 31.325, 12.731, 0.442)
pt3dadd(152.983, 31.227, 12.742, 0.406)
pt3dadd(153.05, 31.128, 12.753, 0.37)
pt3dadd(153.118, 31.029, 12.764, 0.336)
pt3dadd(153.18, 30.938, 12.801, 0.354)
pt3dadd(153.244, 30.846, 12.839, 0.376)
pt3dadd(153.306, 30.755, 12.877, 0.398)
pt3dadd(153.37, 30.664, 12.916, 0.42)
pt3dadd(153.432, 30.573, 12.954, 0.442)
pt3dadd(153.496, 30.482, 12.993, 0.464)
pt3dadd(153.558, 30.391, 13.031, 0.486)
pt3dadd(153.622, 30.3, 13.07, 0.508)
pt3dadd(153.684, 30.208, 13.108, 0.53)
pt3dadd(153.749, 30.118, 13.146, 0.548)
pt3dadd(153.82, 30.029, 13.179, 0.534)
pt3dadd(153.89, 29.941, 13.212, 0.518)
pt3dadd(153.961, 29.852, 13.244, 0.504)
pt3dadd(154.032, 29.764, 13.277, 0.488)
pt3dadd(154.103, 29.676, 13.31, 0.472)
pt3dadd(154.174, 29.587, 13.343, 0.458)
pt3dadd(154.244, 29.499, 13.376, 0.442)
pt3dadd(154.315, 29.41, 13.408, 0.426)
pt3dadd(154.387, 29.322, 13.441, 0.412)
pt3dadd(154.457, 29.232, 13.472, 0.398)
}
}
proc shape3d_59() {
dend_7[53] { pt3dadd(154.522, 29.133, 13.492, 0.392)
pt3dadd(154.586, 29.035, 13.512, 0.384)
pt3dadd(154.651, 28.937, 13.531, 0.378)
pt3dadd(154.716, 28.839, 13.552, 0.372)
pt3dadd(154.781, 28.741, 13.571, 0.364)
pt3dadd(154.846, 28.643, 13.591, 0.358)
pt3dadd(154.91, 28.545, 13.611, 0.352)
pt3dadd(154.975, 28.447, 13.631, 0.346)
pt3dadd(155.039, 28.348, 13.651, 0.338)
pt3dadd(155.104, 28.249, 13.669, 0.338)
pt3dadd(155.165, 28.147, 13.681, 0.356)
pt3dadd(155.227, 28.046, 13.692, 0.376)
pt3dadd(155.29, 27.944, 13.704, 0.394)
pt3dadd(155.351, 27.842, 13.715, 0.412)
pt3dadd(155.413, 27.74, 13.727, 0.43)
pt3dadd(155.474, 27.638, 13.738, 0.45)
pt3dadd(155.537, 27.536, 13.75, 0.468)
pt3dadd(155.598, 27.434, 13.761, 0.486)
pt3dadd(155.66, 27.332, 13.773, 0.504)
pt3dadd(155.725, 27.232, 13.783, 0.522)
pt3dadd(155.796, 27.136, 13.79, 0.538)
pt3dadd(155.867, 27.039, 13.797, 0.554)
pt3dadd(155.938, 26.943, 13.804, 0.57)
pt3dadd(156.01, 26.847, 13.811, 0.586)
pt3dadd(156.08, 26.75, 13.818, 0.602)
pt3dadd(156.151, 26.654, 13.825, 0.618)
pt3dadd(156.222, 26.558, 13.832, 0.634)
pt3dadd(156.293, 26.461, 13.839, 0.65)
pt3dadd(156.365, 26.365, 13.846, 0.666)
pt3dadd(156.438, 26.271, 13.854, 0.678)
pt3dadd(156.516, 26.181, 13.865, 0.678)
pt3dadd(156.594, 26.091, 13.877, 0.678)
pt3dadd(156.673, 26.001, 13.888, 0.678)
pt3dadd(156.751, 25.911, 13.899, 0.678)
pt3dadd(156.829, 25.821, 13.911, 0.678)
pt3dadd(156.907, 25.732, 13.922, 0.678)
pt3dadd(156.986, 25.642, 13.934, 0.678)
pt3dadd(157.064, 25.552, 13.945, 0.678)
pt3dadd(157.142, 25.462, 13.957, 0.678)
pt3dadd(157.22, 25.375, 13.975, 0.678)
pt3dadd(157.298, 25.294, 14.012, 0.678)
pt3dadd(157.375, 25.213, 14.048, 0.678)
pt3dadd(157.452, 25.132, 14.085, 0.678)
pt3dadd(157.529, 25.052, 14.122, 0.678)
pt3dadd(157.607, 24.971, 14.158, 0.678)
pt3dadd(157.684, 24.89, 14.195, 0.678)
pt3dadd(157.76, 24.809, 14.231, 0.678)
pt3dadd(157.837, 24.728, 14.268, 0.678)
pt3dadd(157.914, 24.648, 14.304, 0.678)
pt3dadd(157.992, 24.568, 14.342, 0.678)
pt3dadd(158.071, 24.489, 14.38, 0.678)
pt3dadd(158.149, 24.411, 14.418, 0.678)
pt3dadd(158.227, 24.333, 14.456, 0.678)
pt3dadd(158.306, 24.254, 14.494, 0.678)
pt3dadd(158.384, 24.176, 14.532, 0.678)
pt3dadd(158.464, 24.097, 14.571, 0.678)
pt3dadd(158.542, 24.019, 14.609, 0.678)
pt3dadd(158.62, 23.94, 14.647, 0.678)
pt3dadd(158.699, 23.862, 14.685, 0.678)
pt3dadd(158.778, 23.782, 14.718, 0.682)
pt3dadd(158.86, 23.7, 14.746, 0.688)
pt3dadd(158.941, 23.619, 14.774, 0.696)
pt3dadd(159.023, 23.538, 14.802, 0.704)
pt3dadd(159.104, 23.456, 14.829, 0.712)
pt3dadd(159.186, 23.374, 14.857, 0.718)
pt3dadd(159.268, 23.293, 14.885, 0.726)
pt3dadd(159.349, 23.211, 14.913, 0.734)
pt3dadd(159.431, 23.13, 14.941, 0.74)
pt3dadd(159.511, 23.048, 14.968, 0.748)
pt3dadd(159.594, 22.967, 14.995, 0.758)
pt3dadd(159.676, 22.884, 15.021, 0.77)
pt3dadd(159.757, 22.802, 15.046, 0.784)
pt3dadd(159.84, 22.72, 15.071, 0.796)
pt3dadd(159.922, 22.638, 15.097, 0.808)
pt3dadd(160.003, 22.556, 15.122, 0.82)
pt3dadd(160.086, 22.474, 15.147, 0.834)
pt3dadd(160.168, 22.392, 15.173, 0.846)
pt3dadd(160.25, 22.31, 15.198, 0.858)
pt3dadd(160.332, 22.228, 15.224, 0.87)
pt3dadd(160.41, 22.149, 15.26, 0.866)
pt3dadd(160.486, 22.074, 15.306, 0.848)
pt3dadd(160.561, 21.999, 15.352, 0.828)
pt3dadd(160.637, 21.923, 15.398, 0.81)
pt3dadd(160.711, 21.848, 15.444, 0.792)
pt3dadd(160.787, 21.773, 15.49, 0.772)
pt3dadd(160.862, 21.697, 15.537, 0.754)
pt3dadd(160.937, 21.622, 15.583, 0.734)
pt3dadd(161.012, 21.547, 15.629, 0.716)
pt3dadd(161.088, 21.471, 15.675, 0.698)
pt3dadd(161.166, 21.393, 15.713, 0.698)
pt3dadd(161.246, 21.312, 15.744, 0.718)
pt3dadd(161.327, 21.232, 15.775, 0.736)
pt3dadd(161.407, 21.151, 15.807, 0.756)
pt3dadd(161.488, 21.07, 15.838, 0.774)
pt3dadd(161.568, 20.99, 15.869, 0.794)
pt3dadd(161.65, 20.909, 15.9, 0.812)
pt3dadd(161.73, 20.828, 15.932, 0.832)
pt3dadd(161.81, 20.748, 15.963, 0.85)
pt3dadd(161.891, 20.667, 15.994, 0.87)
pt3dadd(161.972, 20.585, 16.02, 0.856)
pt3dadd(162.055, 20.502, 16.042, 0.814)
pt3dadd(162.138, 20.419, 16.064, 0.772)
pt3dadd(162.22, 20.336, 16.086, 0.73)
pt3dadd(162.302, 20.253, 16.108, 0.688)
pt3dadd(162.385, 20.17, 16.13, 0.646)
pt3dadd(162.468, 20.087, 16.152, 0.602)
pt3dadd(162.551, 20.004, 16.174, 0.56)
pt3dadd(162.634, 19.921, 16.196, 0.518)
pt3dadd(162.716, 19.838, 16.218, 0.476)
pt3dadd(162.797, 19.757, 16.246, 0.444)
pt3dadd(162.877, 19.676, 16.279, 0.422)
pt3dadd(162.956, 19.596, 16.312, 0.398)
pt3dadd(163.036, 19.515, 16.345, 0.374)
pt3dadd(163.116, 19.435, 16.378, 0.352)
pt3dadd(163.195, 19.355, 16.412, 0.328)
pt3dadd(163.274, 19.274, 16.445, 0.304)
pt3dadd(163.355, 19.194, 16.478, 0.282)
pt3dadd(163.434, 19.113, 16.511, 0.258)
pt3dadd(163.514, 19.033, 16.544, 0.234)
pt3dadd(163.594, 18.952, 16.578, 0.226)
pt3dadd(163.673, 18.872, 16.612, 0.226)
pt3dadd(163.752, 18.791, 16.646, 0.226)
pt3dadd(163.831, 18.711, 16.68, 0.226)
pt3dadd(163.91, 18.63, 16.713, 0.226)
pt3dadd(163.99, 18.55, 16.748, 0.226)
pt3dadd(164.069, 18.47, 16.781, 0.226)
pt3dadd(164.148, 18.389, 16.815, 0.226)
pt3dadd(164.226, 18.309, 16.849, 0.226)
pt3dadd(164.305, 18.228, 16.883, 0.226)
pt3dadd(164.387, 18.145, 16.908, 0.228)
pt3dadd(164.468, 18.061, 16.929, 0.23)
pt3dadd(164.551, 17.977, 16.949, 0.234)
pt3dadd(164.633, 17.893, 16.969, 0.236)
pt3dadd(164.716, 17.809, 16.99, 0.24)
pt3dadd(164.797, 17.725, 17.01, 0.242)
pt3dadd(164.879, 17.641, 17.03, 0.244)
pt3dadd(164.962, 17.557, 17.051, 0.248)
pt3dadd(165.043, 17.473, 17.071, 0.25)
pt3dadd(165.126, 17.389, 17.091, 0.254)
pt3dadd(165.208, 17.303, 17.104, 0.264)
pt3dadd(165.292, 17.217, 17.113, 0.28)
pt3dadd(165.374, 17.131, 17.122, 0.296)
pt3dadd(165.457, 17.045, 17.131, 0.312)
pt3dadd(165.54, 16.959, 17.14, 0.326)
pt3dadd(165.623, 16.873, 17.149, 0.342)
pt3dadd(165.706, 16.787, 17.158, 0.358)
pt3dadd(165.788, 16.701, 17.167, 0.374)
pt3dadd(165.871, 16.615, 17.176, 0.388)
pt3dadd(165.954, 16.529, 17.185, 0.404)
pt3dadd(166.037, 16.441, 17.189, 0.412)
pt3dadd(166.118, 16.354, 17.192, 0.416)
pt3dadd(166.2, 16.266, 17.194, 0.42)
pt3dadd(166.282, 16.178, 17.197, 0.426)
pt3dadd(166.363, 16.09, 17.199, 0.43)
pt3dadd(166.446, 16.003, 17.202, 0.434)
pt3dadd(166.528, 15.915, 17.204, 0.438)
pt3dadd(166.609, 15.827, 17.207, 0.442)
pt3dadd(166.691, 15.739, 17.209, 0.446)
pt3dadd(166.772, 15.652, 17.212, 0.45)
pt3dadd(166.854, 15.563, 17.213, 0.452)
pt3dadd(166.934, 15.475, 17.213, 0.452)
pt3dadd(167.016, 15.386, 17.213, 0.452)
pt3dadd(167.096, 15.297, 17.213, 0.452)
pt3dadd(167.178, 15.209, 17.213, 0.452)
pt3dadd(167.258, 15.12, 17.213, 0.452)
pt3dadd(167.339, 15.031, 17.213, 0.452)
pt3dadd(167.42, 14.943, 17.213, 0.452)
pt3dadd(167.501, 14.854, 17.213, 0.452)
pt3dadd(167.582, 14.766, 17.213, 0.452)
pt3dadd(167.662, 14.675, 17.213, 0.452)
pt3dadd(167.74, 14.585, 17.213, 0.452)
pt3dadd(167.818, 14.494, 17.213, 0.452)
pt3dadd(167.897, 14.403, 17.213, 0.452)
pt3dadd(167.975, 14.312, 17.214, 0.452)
pt3dadd(168.054, 14.222, 17.214, 0.452)
pt3dadd(168.132, 14.131, 17.214, 0.452)
pt3dadd(168.21, 14.04, 17.214, 0.452)
pt3dadd(168.289, 13.949, 17.214, 0.452)
pt3dadd(168.367, 13.858, 17.214, 0.452)
pt3dadd(168.438, 13.762, 17.214, 0.458)
pt3dadd(168.505, 13.662, 17.215, 0.468)
pt3dadd(168.574, 13.563, 17.215, 0.478)
pt3dadd(168.641, 13.464, 17.215, 0.488)
pt3dadd(168.708, 13.365, 17.215, 0.498)
pt3dadd(168.775, 13.265, 17.215, 0.506)
pt3dadd(168.842, 13.166, 17.216, 0.516)
pt3dadd(168.91, 13.067, 17.216, 0.526)
pt3dadd(168.978, 12.967, 17.216, 0.536)
pt3dadd(169.045, 12.868, 17.216, 0.546)
pt3dadd(169.108, 12.766, 17.217, 0.56)
pt3dadd(169.168, 12.662, 17.217, 0.576)
pt3dadd(169.228, 12.558, 17.217, 0.594)
pt3dadd(169.288, 12.454, 17.218, 0.61)
pt3dadd(169.348, 12.351, 17.218, 0.626)
pt3dadd(169.409, 12.247, 17.218, 0.644)
pt3dadd(169.469, 12.143, 17.219, 0.66)
pt3dadd(169.529, 12.039, 17.219, 0.676)
pt3dadd(169.589, 11.935, 17.219, 0.694)
pt3dadd(169.649, 11.832, 17.22, 0.71)
pt3dadd(169.714, 11.73, 17.22, 0.726)
}
}
proc shape3d_60() {
dend_7[53] { pt3dadd(169.78, 11.63, 17.221, 0.742)
pt3dadd(169.846, 11.53, 17.221, 0.758)
pt3dadd(169.912, 11.43, 17.222, 0.774)
pt3dadd(169.978, 11.329, 17.222, 0.79)
pt3dadd(170.044, 11.229, 17.223, 0.806)
pt3dadd(170.11, 11.129, 17.223, 0.822)
pt3dadd(170.176, 11.028, 17.224, 0.838)
pt3dadd(170.242, 10.928, 17.225, 0.854)
pt3dadd(170.306, 10.828, 17.225, 0.87)
pt3dadd(170.376, 10.729, 17.226, 0.848)
pt3dadd(170.444, 10.632, 17.227, 0.812)
pt3dadd(170.514, 10.534, 17.228, 0.778)
pt3dadd(170.584, 10.436, 17.229, 0.742)
pt3dadd(170.653, 10.338, 17.23, 0.706)
pt3dadd(170.722, 10.24, 17.232, 0.67)
pt3dadd(170.791, 10.142, 17.233, 0.636)
pt3dadd(170.861, 10.044, 17.234, 0.6)
pt3dadd(170.93, 9.946, 17.235, 0.564)
pt3dadd(171, 9.848, 17.236, 0.53)
pt3dadd(171.065, 9.747, 17.238, 0.508)
pt3dadd(171.127, 9.645, 17.239, 0.492)
pt3dadd(171.191, 9.543, 17.241, 0.474)
pt3dadd(171.254, 9.441, 17.243, 0.458)
pt3dadd(171.318, 9.34, 17.245, 0.442)
pt3dadd(171.382, 9.238, 17.247, 0.426)
pt3dadd(171.445, 9.136, 17.248, 0.408)
pt3dadd(171.508, 9.034, 17.25, 0.392)
pt3dadd(171.571, 8.932, 17.252, 0.376)
pt3dadd(171.635, 8.83, 17.254, 0.358)
pt3dadd(171.689, 8.723, 17.257, 0.38)
pt3dadd(171.74, 8.615, 17.26, 0.412)
pt3dadd(171.793, 8.507, 17.263, 0.442)
pt3dadd(171.845, 8.399, 17.266, 0.474)
pt3dadd(171.896, 8.291, 17.269, 0.504)
pt3dadd(171.948, 8.183, 17.272, 0.534)
pt3dadd(172, 8.074, 17.275, 0.566)
pt3dadd(172.052, 7.966, 17.278, 0.596)
pt3dadd(172.104, 7.858, 17.281, 0.628)
pt3dadd(172.156, 7.75, 17.284, 0.658)
pt3dadd(172.21, 7.643, 17.29, 0.652)
pt3dadd(172.265, 7.537, 17.296, 0.634)
pt3dadd(172.32, 7.431, 17.303, 0.618)
pt3dadd(172.375, 7.324, 17.31, 0.6)
pt3dadd(172.429, 7.218, 17.316, 0.582)
pt3dadd(172.484, 7.111, 17.323, 0.566)
pt3dadd(172.54, 7.005, 17.33, 0.548)
pt3dadd(172.595, 6.899, 17.336, 0.532)
pt3dadd(172.65, 6.792, 17.343, 0.514)
pt3dadd(172.705, 6.686, 17.349, 0.496)
pt3dadd(172.744, 6.573, 17.359, 0.478)
pt3dadd(172.78, 6.459, 17.37, 0.46)
pt3dadd(172.814, 6.346, 17.382, 0.442)
pt3dadd(172.849, 6.232, 17.392, 0.424)
pt3dadd(172.885, 6.118, 17.404, 0.404)
pt3dadd(172.92, 6.004, 17.415, 0.386)
pt3dadd(172.955, 5.89, 17.426, 0.368)
pt3dadd(172.991, 5.776, 17.437, 0.35)
pt3dadd(173.026, 5.662, 17.448, 0.332)
pt3dadd(173.06, 5.548, 17.459, 0.314)
pt3dadd(173.083, 5.435, 17.484, 0.304)
pt3dadd(173.105, 5.321, 17.513, 0.294)
pt3dadd(173.125, 5.208, 17.541, 0.286)
pt3dadd(173.146, 5.095, 17.569, 0.278)
pt3dadd(173.166, 4.981, 17.597, 0.268)
pt3dadd(173.186, 4.868, 17.625, 0.26)
pt3dadd(173.207, 4.755, 17.653, 0.252)
pt3dadd(173.227, 4.641, 17.681, 0.244)
pt3dadd(173.248, 4.528, 17.709, 0.234)
pt3dadd(173.268, 4.415, 17.737, 0.226)
pt3dadd(173.278, 4.303, 17.774, 0.226)
pt3dadd(173.286, 4.192, 17.81, 0.226)
pt3dadd(173.294, 4.08, 17.846, 0.226)
pt3dadd(173.303, 3.969, 17.882, 0.226)
pt3dadd(173.311, 3.857, 17.919, 0.226)
pt3dadd(173.32, 3.746, 17.955, 0.226)
pt3dadd(173.328, 3.634, 17.991, 0.226)
pt3dadd(173.336, 3.523, 18.028, 0.226)
pt3dadd(173.345, 3.411, 18.064, 0.226)
pt3dadd(173.353, 3.3, 18.1, 0.226)
pt3dadd(173.353, 3.185, 18.129, 0.226)
pt3dadd(173.353, 3.07, 18.158, 0.226)
pt3dadd(173.353, 2.955, 18.187, 0.226)
pt3dadd(173.353, 2.84, 18.215, 0.226)
pt3dadd(173.353, 2.725, 18.244, 0.226)
pt3dadd(173.353, 2.61, 18.273, 0.226)
pt3dadd(173.353, 2.495, 18.302, 0.226)
pt3dadd(173.353, 2.38, 18.33, 0.226)
pt3dadd(173.353, 2.265, 18.359, 0.226)
pt3dadd(173.353, 2.15, 18.388, 0.226)
}
dend_7[54] {pt3dclear()
pt3dadd(134.048, 65.668, 7.87, 0.678)
pt3dadd(134.033, 65.559, 7.864, 0.644)
pt3dadd(134.015, 65.441, 7.859, 0.606)
pt3dadd(133.997, 65.322, 7.853, 0.568)
pt3dadd(133.979, 65.204, 7.847, 0.53)
pt3dadd(133.961, 65.086, 7.842, 0.492)
pt3dadd(133.943, 64.967, 7.836, 0.454)
pt3dadd(133.925, 64.849, 7.831, 0.416)
pt3dadd(133.907, 64.73, 7.825, 0.378)
pt3dadd(133.889, 64.612, 7.819, 0.34)
pt3dadd(133.871, 64.493, 7.814, 0.302)
pt3dadd(133.847, 64.383, 7.799, 0.27)
pt3dadd(133.786, 64.324, 7.728, 0.266)
pt3dadd(133.726, 64.265, 7.657, 0.26)
pt3dadd(133.664, 64.205, 7.586, 0.256)
pt3dadd(133.604, 64.146, 7.515, 0.252)
pt3dadd(133.544, 64.087, 7.445, 0.246)
pt3dadd(133.483, 64.027, 7.374, 0.242)
pt3dadd(133.423, 63.968, 7.303, 0.238)
pt3dadd(133.362, 63.909, 7.232, 0.232)
pt3dadd(133.302, 63.849, 7.161, 0.228)
pt3dadd(133.252, 63.785, 7.089, 0.226)
pt3dadd(133.205, 63.718, 7.015, 0.226)
pt3dadd(133.159, 63.652, 6.941, 0.226)
pt3dadd(133.114, 63.585, 6.867, 0.226)
pt3dadd(133.067, 63.519, 6.793, 0.226)
pt3dadd(133.021, 63.452, 6.72, 0.226)
pt3dadd(132.976, 63.385, 6.646, 0.226)
pt3dadd(132.929, 63.319, 6.572, 0.226)
pt3dadd(132.883, 63.252, 6.498, 0.226)
pt3dadd(132.838, 63.185, 6.424, 0.226)
pt3dadd(132.815, 63.093, 6.365, 0.234)
pt3dadd(132.797, 62.997, 6.307, 0.242)
pt3dadd(132.778, 62.9, 6.249, 0.25)
pt3dadd(132.76, 62.804, 6.192, 0.258)
pt3dadd(132.742, 62.708, 6.134, 0.266)
pt3dadd(132.722, 62.612, 6.076, 0.274)
pt3dadd(132.704, 62.515, 6.018, 0.282)
pt3dadd(132.685, 62.419, 5.961, 0.29)
pt3dadd(132.667, 62.323, 5.903, 0.298)
pt3dadd(132.65, 62.225, 5.848, 0.308)
pt3dadd(132.652, 62.11, 5.818, 0.316)
pt3dadd(132.653, 61.996, 5.788, 0.326)
pt3dadd(132.654, 61.882, 5.757, 0.336)
pt3dadd(132.656, 61.767, 5.727, 0.346)
pt3dadd(132.658, 61.653, 5.696, 0.356)
pt3dadd(132.659, 61.539, 5.666, 0.364)
pt3dadd(132.66, 61.425, 5.635, 0.374)
pt3dadd(132.661, 61.31, 5.605, 0.384)
pt3dadd(132.662, 61.196, 5.575, 0.394)
pt3dadd(132.667, 61.081, 5.548, 0.396)
pt3dadd(132.686, 60.963, 5.538, 0.38)
pt3dadd(132.704, 60.845, 5.528, 0.362)
pt3dadd(132.724, 60.727, 5.518, 0.344)
pt3dadd(132.742, 60.609, 5.508, 0.326)
pt3dadd(132.761, 60.491, 5.498, 0.31)
pt3dadd(132.779, 60.373, 5.488, 0.292)
pt3dadd(132.798, 60.255, 5.478, 0.274)
pt3dadd(132.816, 60.137, 5.467, 0.256)
pt3dadd(132.834, 60.019, 5.457, 0.24)
pt3dadd(132.86, 59.904, 5.45, 0.226)
pt3dadd(132.908, 59.794, 5.45, 0.226)
pt3dadd(132.956, 59.684, 5.45, 0.226)
pt3dadd(133.004, 59.574, 5.45, 0.226)
pt3dadd(133.052, 59.464, 5.45, 0.226)
pt3dadd(133.1, 59.354, 5.45, 0.226)
pt3dadd(133.148, 59.244, 5.45, 0.226)
pt3dadd(133.196, 59.134, 5.45, 0.226)
pt3dadd(133.244, 59.024, 5.45, 0.226)
pt3dadd(133.292, 58.914, 5.45, 0.226)
pt3dadd(133.338, 58.803, 5.45, 0.236)
pt3dadd(133.379, 58.69, 5.45, 0.28)
pt3dadd(133.418, 58.577, 5.45, 0.324)
pt3dadd(133.459, 58.464, 5.45, 0.368)
pt3dadd(133.5, 58.351, 5.45, 0.412)
pt3dadd(133.54, 58.238, 5.45, 0.454)
pt3dadd(133.58, 58.125, 5.45, 0.498)
pt3dadd(133.62, 58.012, 5.45, 0.542)
pt3dadd(133.661, 57.899, 5.45, 0.586)
pt3dadd(133.7, 57.786, 5.45, 0.628)
pt3dadd(133.739, 57.672, 5.45, 0.664)
pt3dadd(133.774, 57.557, 5.45, 0.678)
pt3dadd(133.807, 57.442, 5.45, 0.692)
pt3dadd(133.841, 57.327, 5.45, 0.706)
pt3dadd(133.876, 57.212, 5.45, 0.72)
pt3dadd(133.909, 57.096, 5.45, 0.734)
pt3dadd(133.943, 56.981, 5.45, 0.748)
pt3dadd(133.978, 56.866, 5.45, 0.762)
pt3dadd(134.011, 56.751, 5.45, 0.776)
pt3dadd(134.045, 56.636, 5.45, 0.79)
pt3dadd(134.08, 56.521, 5.45, 0.8)
pt3dadd(134.118, 56.408, 5.45, 0.792)
pt3dadd(134.156, 56.294, 5.45, 0.786)
pt3dadd(134.195, 56.18, 5.45, 0.78)
pt3dadd(134.233, 56.066, 5.45, 0.774)
pt3dadd(134.272, 55.953, 5.45, 0.766)
pt3dadd(134.309, 55.839, 5.45, 0.76)
pt3dadd(134.347, 55.725, 5.45, 0.754)
pt3dadd(134.386, 55.611, 5.45, 0.748)
pt3dadd(134.424, 55.497, 5.45, 0.742)
pt3dadd(134.466, 55.386, 5.45, 0.742)
pt3dadd(134.519, 55.278, 5.45, 0.756)
pt3dadd(134.572, 55.17, 5.45, 0.772)
pt3dadd(134.624, 55.062, 5.45, 0.786)
pt3dadd(134.676, 54.954, 5.45, 0.802)
pt3dadd(134.729, 54.846, 5.45, 0.816)
pt3dadd(134.782, 54.738, 5.45, 0.832)
pt3dadd(134.833, 54.63, 5.45, 0.848)
pt3dadd(134.886, 54.522, 5.45, 0.862)
pt3dadd(134.939, 54.414, 5.45, 0.878)
pt3dadd(134.988, 54.305, 5.45, 0.872)
}
}
proc shape3d_61() {
dend_7[54] { pt3dadd(135.032, 54.194, 5.45, 0.818)
pt3dadd(135.077, 54.082, 5.45, 0.764)
pt3dadd(135.121, 53.971, 5.45, 0.71)
pt3dadd(135.166, 53.859, 5.45, 0.658)
pt3dadd(135.21, 53.748, 5.45, 0.604)
pt3dadd(135.254, 53.636, 5.45, 0.55)
pt3dadd(135.299, 53.525, 5.45, 0.496)
pt3dadd(135.343, 53.413, 5.45, 0.444)
pt3dadd(135.388, 53.302, 5.45, 0.39)
pt3dadd(135.437, 53.192, 5.45, 0.348)
pt3dadd(135.494, 53.087, 5.45, 0.336)
pt3dadd(135.552, 52.982, 5.45, 0.324)
pt3dadd(135.61, 52.877, 5.45, 0.31)
pt3dadd(135.667, 52.771, 5.45, 0.298)
pt3dadd(135.725, 52.666, 5.45, 0.286)
pt3dadd(135.782, 52.561, 5.45, 0.272)
pt3dadd(135.841, 52.456, 5.45, 0.26)
pt3dadd(135.899, 52.35, 5.45, 0.248)
pt3dadd(135.956, 52.245, 5.45, 0.234)
pt3dadd(136.013, 52.14, 5.45, 0.23)
pt3dadd(136.068, 52.033, 5.45, 0.244)
pt3dadd(136.123, 51.926, 5.45, 0.258)
pt3dadd(136.177, 51.819, 5.45, 0.274)
pt3dadd(136.232, 51.713, 5.45, 0.288)
pt3dadd(136.288, 51.606, 5.45, 0.302)
pt3dadd(136.342, 51.499, 5.45, 0.316)
pt3dadd(136.397, 51.393, 5.45, 0.33)
pt3dadd(136.452, 51.286, 5.45, 0.344)
pt3dadd(136.507, 51.179, 5.45, 0.358)
pt3dadd(136.559, 51.071, 5.45, 0.378)
pt3dadd(136.604, 50.96, 5.45, 0.412)
pt3dadd(136.651, 50.85, 5.45, 0.446)
pt3dadd(136.698, 50.739, 5.45, 0.478)
pt3dadd(136.744, 50.628, 5.45, 0.512)
pt3dadd(136.79, 50.517, 5.45, 0.546)
pt3dadd(136.836, 50.407, 5.45, 0.578)
pt3dadd(136.883, 50.296, 5.45, 0.612)
pt3dadd(136.928, 50.185, 5.45, 0.646)
pt3dadd(136.975, 50.075, 5.45, 0.678)
pt3dadd(137.027, 49.967, 5.45, 0.706)
pt3dadd(137.088, 49.863, 5.45, 0.722)
pt3dadd(137.149, 49.76, 5.45, 0.738)
pt3dadd(137.209, 49.656, 5.45, 0.756)
pt3dadd(137.27, 49.553, 5.45, 0.772)
pt3dadd(137.332, 49.45, 5.45, 0.788)
pt3dadd(137.393, 49.346, 5.45, 0.804)
pt3dadd(137.454, 49.243, 5.45, 0.822)
pt3dadd(137.514, 49.14, 5.45, 0.838)
pt3dadd(137.575, 49.036, 5.45, 0.854)
pt3dadd(137.632, 48.93, 5.45, 0.866)
pt3dadd(137.678, 48.82, 5.45, 0.87)
pt3dadd(137.725, 48.71, 5.45, 0.874)
pt3dadd(137.772, 48.599, 5.45, 0.878)
pt3dadd(137.819, 48.489, 5.45, 0.882)
pt3dadd(137.867, 48.378, 5.45, 0.886)
pt3dadd(137.914, 48.268, 5.45, 0.89)
pt3dadd(137.96, 48.158, 5.45, 0.894)
pt3dadd(138.007, 48.047, 5.45, 0.898)
pt3dadd(138.054, 47.937, 5.45, 0.902)
pt3dadd(138.103, 47.827, 5.45, 0.9)
pt3dadd(138.152, 47.718, 5.45, 0.892)
pt3dadd(138.203, 47.609, 5.45, 0.884)
pt3dadd(138.253, 47.5, 5.45, 0.874)
pt3dadd(138.302, 47.391, 5.45, 0.866)
pt3dadd(138.353, 47.282, 5.45, 0.858)
pt3dadd(138.403, 47.172, 5.45, 0.85)
pt3dadd(138.454, 47.063, 5.45, 0.84)
pt3dadd(138.503, 46.954, 5.45, 0.832)
pt3dadd(138.553, 46.845, 5.45, 0.824)
pt3dadd(138.605, 46.737, 5.45, 0.812)
pt3dadd(138.659, 46.63, 5.45, 0.794)
pt3dadd(138.713, 46.523, 5.45, 0.776)
pt3dadd(138.767, 46.416, 5.45, 0.76)
pt3dadd(138.821, 46.308, 5.45, 0.742)
pt3dadd(138.875, 46.201, 5.45, 0.726)
pt3dadd(138.929, 46.094, 5.45, 0.708)
pt3dadd(138.983, 45.987, 5.45, 0.692)
pt3dadd(139.037, 45.88, 5.45, 0.674)
pt3dadd(139.091, 45.773, 5.45, 0.656)
pt3dadd(139.138, 45.662, 5.45, 0.64)
pt3dadd(139.175, 45.548, 5.45, 0.622)
pt3dadd(139.212, 45.434, 5.45, 0.602)
pt3dadd(139.249, 45.32, 5.45, 0.584)
pt3dadd(139.285, 45.206, 5.45, 0.566)
pt3dadd(139.322, 45.092, 5.45, 0.548)
pt3dadd(139.36, 44.978, 5.45, 0.53)
pt3dadd(139.397, 44.863, 5.45, 0.512)
pt3dadd(139.434, 44.749, 5.45, 0.494)
pt3dadd(139.471, 44.635, 5.45, 0.474)
pt3dadd(139.505, 44.52, 5.45, 0.456)
pt3dadd(139.534, 44.403, 5.45, 0.438)
pt3dadd(139.562, 44.287, 5.45, 0.42)
pt3dadd(139.591, 44.171, 5.45, 0.4)
pt3dadd(139.62, 44.054, 5.45, 0.382)
pt3dadd(139.649, 43.938, 5.45, 0.364)
pt3dadd(139.678, 43.821, 5.45, 0.344)
pt3dadd(139.706, 43.705, 5.45, 0.326)
pt3dadd(139.735, 43.588, 5.45, 0.308)
pt3dadd(139.764, 43.472, 5.45, 0.288)
pt3dadd(139.799, 43.357, 5.45, 0.298)
pt3dadd(139.841, 43.245, 5.45, 0.344)
pt3dadd(139.883, 43.132, 5.45, 0.39)
pt3dadd(139.925, 43.02, 5.45, 0.436)
pt3dadd(139.968, 42.908, 5.45, 0.482)
pt3dadd(140.01, 42.795, 5.45, 0.528)
pt3dadd(140.052, 42.683, 5.45, 0.574)
pt3dadd(140.094, 42.571, 5.45, 0.62)
pt3dadd(140.136, 42.458, 5.45, 0.664)
pt3dadd(140.179, 42.346, 5.45, 0.71)
pt3dadd(140.221, 42.234, 5.45, 0.746)
pt3dadd(140.264, 42.122, 5.45, 0.77)
pt3dadd(140.306, 42.01, 5.45, 0.792)
pt3dadd(140.35, 41.898, 5.45, 0.816)
pt3dadd(140.393, 41.785, 5.45, 0.84)
pt3dadd(140.435, 41.673, 5.45, 0.864)
pt3dadd(140.478, 41.561, 5.45, 0.886)
pt3dadd(140.521, 41.449, 5.45, 0.91)
pt3dadd(140.563, 41.337, 5.45, 0.934)
pt3dadd(140.606, 41.225, 5.45, 0.958)
pt3dadd(140.645, 41.111, 5.45, 0.952)
pt3dadd(140.68, 40.997, 5.45, 0.914)
pt3dadd(140.716, 40.882, 5.45, 0.878)
pt3dadd(140.75, 40.767, 5.45, 0.84)
pt3dadd(140.785, 40.652, 5.45, 0.804)
pt3dadd(140.82, 40.537, 5.45, 0.768)
pt3dadd(140.855, 40.423, 5.45, 0.73)
pt3dadd(140.89, 40.308, 5.45, 0.694)
pt3dadd(140.924, 40.193, 5.45, 0.656)
pt3dadd(140.959, 40.078, 5.45, 0.62)
pt3dadd(140.99, 39.962, 5.45, 0.584)
pt3dadd(141.018, 39.846, 5.45, 0.546)
pt3dadd(141.046, 39.729, 5.45, 0.508)
pt3dadd(141.073, 39.612, 5.45, 0.47)
pt3dadd(141.101, 39.495, 5.45, 0.434)
pt3dadd(141.128, 39.378, 5.45, 0.396)
pt3dadd(141.156, 39.262, 5.45, 0.358)
pt3dadd(141.184, 39.145, 5.45, 0.322)
pt3dadd(141.211, 39.028, 5.45, 0.284)
pt3dadd(141.239, 38.911, 5.45, 0.246)
pt3dadd(141.276, 38.798, 5.45, 0.244)
pt3dadd(141.323, 38.687, 5.45, 0.28)
pt3dadd(141.368, 38.576, 5.45, 0.316)
pt3dadd(141.415, 38.465, 5.45, 0.35)
pt3dadd(141.461, 38.355, 5.45, 0.386)
pt3dadd(141.508, 38.244, 5.45, 0.42)
pt3dadd(141.554, 38.133, 5.45, 0.456)
pt3dadd(141.6, 38.023, 5.45, 0.49)
pt3dadd(141.647, 37.912, 5.45, 0.526)
pt3dadd(141.692, 37.801, 5.45, 0.56)
pt3dadd(141.734, 37.689, 5.45, 0.57)
pt3dadd(141.772, 37.575, 5.45, 0.554)
pt3dadd(141.808, 37.46, 5.45, 0.538)
pt3dadd(141.845, 37.346, 5.45, 0.52)
pt3dadd(141.882, 37.232, 5.45, 0.504)
pt3dadd(141.918, 37.118, 5.45, 0.488)
pt3dadd(141.955, 37.003, 5.45, 0.47)
pt3dadd(141.992, 36.889, 5.45, 0.454)
pt3dadd(142.028, 36.775, 5.45, 0.436)
pt3dadd(142.066, 36.661, 5.45, 0.42)
pt3dadd(142.098, 36.545, 5.45, 0.402)
pt3dadd(142.127, 36.429, 5.45, 0.384)
pt3dadd(142.154, 36.312, 5.45, 0.366)
pt3dadd(142.183, 36.196, 5.45, 0.346)
pt3dadd(142.212, 36.079, 5.45, 0.328)
pt3dadd(142.241, 35.962, 5.45, 0.31)
pt3dadd(142.268, 35.846, 5.45, 0.29)
pt3dadd(142.297, 35.729, 5.45, 0.272)
pt3dadd(142.326, 35.613, 5.45, 0.254)
pt3dadd(142.355, 35.496, 5.45, 0.236)
pt3dadd(142.38, 35.379, 5.45, 0.232)
pt3dadd(142.403, 35.261, 5.45, 0.244)
pt3dadd(142.426, 35.143, 5.45, 0.254)
pt3dadd(142.447, 35.025, 5.45, 0.266)
pt3dadd(142.47, 34.908, 5.45, 0.276)
pt3dadd(142.493, 34.79, 5.45, 0.288)
pt3dadd(142.516, 34.672, 5.45, 0.3)
pt3dadd(142.538, 34.554, 5.45, 0.31)
pt3dadd(142.561, 34.436, 5.45, 0.322)
pt3dadd(142.584, 34.318, 5.45, 0.334)
pt3dadd(142.607, 34.201, 5.45, 0.356)
pt3dadd(142.63, 34.083, 5.45, 0.388)
pt3dadd(142.652, 33.965, 5.45, 0.42)
pt3dadd(142.675, 33.847, 5.45, 0.452)
pt3dadd(142.699, 33.729, 5.45, 0.484)
pt3dadd(142.722, 33.612, 5.45, 0.516)
pt3dadd(142.745, 33.494, 5.45, 0.55)
pt3dadd(142.768, 33.376, 5.45, 0.582)
pt3dadd(142.79, 33.258, 5.451, 0.614)
pt3dadd(142.814, 33.141, 5.451, 0.646)
pt3dadd(142.854, 33.029, 5.451, 0.65)
pt3dadd(142.909, 32.922, 5.451, 0.634)
pt3dadd(142.963, 32.815, 5.451, 0.616)
pt3dadd(143.017, 32.708, 5.451, 0.6)
pt3dadd(143.072, 32.601, 5.451, 0.582)
pt3dadd(143.126, 32.494, 5.451, 0.564)
pt3dadd(143.18, 32.387, 5.451, 0.548)
pt3dadd(143.236, 32.28, 5.451, 0.53)
pt3dadd(143.29, 32.173, 5.451, 0.514)
pt3dadd(143.344, 32.066, 5.451, 0.496)
pt3dadd(143.396, 31.958, 5.451, 0.478)
}
}
proc shape3d_62() {
dend_7[54] { pt3dadd(143.447, 31.849, 5.451, 0.462)
pt3dadd(143.497, 31.74, 5.451, 0.444)
pt3dadd(143.548, 31.631, 5.451, 0.426)
pt3dadd(143.598, 31.522, 5.452, 0.41)
pt3dadd(143.648, 31.414, 5.452, 0.392)
pt3dadd(143.699, 31.305, 5.452, 0.374)
pt3dadd(143.749, 31.196, 5.452, 0.356)
pt3dadd(143.8, 31.087, 5.452, 0.34)
pt3dadd(143.85, 30.978, 5.452, 0.322)
pt3dadd(143.904, 30.871, 5.452, 0.31)
pt3dadd(143.963, 30.766, 5.453, 0.3)
pt3dadd(144.02, 30.661, 5.453, 0.292)
pt3dadd(144.079, 30.556, 5.453, 0.282)
pt3dadd(144.137, 30.451, 5.453, 0.274)
pt3dadd(144.196, 30.346, 5.453, 0.266)
pt3dadd(144.253, 30.241, 5.453, 0.256)
pt3dadd(144.311, 30.136, 5.454, 0.248)
pt3dadd(144.37, 30.031, 5.454, 0.238)
pt3dadd(144.427, 29.926, 5.454, 0.23)
pt3dadd(144.491, 29.825, 5.454, 0.228)
pt3dadd(144.558, 29.725, 5.454, 0.23)
pt3dadd(144.625, 29.625, 5.455, 0.232)
pt3dadd(144.691, 29.526, 5.455, 0.236)
pt3dadd(144.758, 29.426, 5.455, 0.238)
pt3dadd(144.826, 29.326, 5.456, 0.24)
pt3dadd(144.892, 29.227, 5.456, 0.242)
pt3dadd(144.959, 29.127, 5.456, 0.246)
pt3dadd(145.026, 29.028, 5.456, 0.248)
pt3dadd(145.093, 28.928, 5.457, 0.25)
pt3dadd(145.163, 28.83, 5.457, 0.27)
pt3dadd(145.234, 28.734, 5.457, 0.302)
pt3dadd(145.304, 28.637, 5.458, 0.332)
pt3dadd(145.376, 28.54, 5.458, 0.362)
pt3dadd(145.447, 28.444, 5.459, 0.394)
pt3dadd(145.519, 28.347, 5.46, 0.424)
pt3dadd(145.59, 28.251, 5.46, 0.456)
pt3dadd(145.661, 28.154, 5.461, 0.486)
pt3dadd(145.733, 28.058, 5.461, 0.518)
pt3dadd(145.804, 27.961, 5.462, 0.548)
pt3dadd(145.87, 27.861, 5.462, 0.568)
pt3dadd(145.931, 27.758, 5.463, 0.58)
pt3dadd(145.992, 27.655, 5.464, 0.592)
pt3dadd(146.053, 27.552, 5.465, 0.604)
pt3dadd(146.114, 27.448, 5.466, 0.614)
pt3dadd(146.176, 27.345, 5.467, 0.626)
pt3dadd(146.237, 27.242, 5.468, 0.638)
pt3dadd(146.299, 27.139, 5.469, 0.65)
pt3dadd(146.36, 27.036, 5.47, 0.662)
pt3dadd(146.422, 26.933, 5.471, 0.674)
pt3dadd(146.48, 26.828, 5.473, 0.682)
pt3dadd(146.537, 26.723, 5.474, 0.686)
pt3dadd(146.594, 26.617, 5.476, 0.692)
pt3dadd(146.652, 26.512, 5.477, 0.696)
pt3dadd(146.708, 26.406, 5.479, 0.7)
pt3dadd(146.766, 26.301, 5.481, 0.706)
pt3dadd(146.824, 26.195, 5.482, 0.71)
pt3dadd(146.88, 26.09, 5.484, 0.716)
pt3dadd(146.938, 25.984, 5.486, 0.72)
pt3dadd(146.995, 25.879, 5.487, 0.726)
pt3dadd(147.055, 25.775, 5.489, 0.738)
pt3dadd(147.118, 25.673, 5.492, 0.754)
pt3dadd(147.18, 25.57, 5.494, 0.77)
pt3dadd(147.242, 25.468, 5.497, 0.788)
pt3dadd(147.305, 25.366, 5.499, 0.804)
pt3dadd(147.367, 25.263, 5.502, 0.82)
pt3dadd(147.431, 25.161, 5.504, 0.836)
pt3dadd(147.493, 25.059, 5.506, 0.854)
pt3dadd(147.556, 24.956, 5.509, 0.87)
pt3dadd(147.618, 24.854, 5.511, 0.886)
pt3dadd(147.671, 24.747, 5.516, 0.904)
pt3dadd(147.719, 24.637, 5.523, 0.92)
pt3dadd(147.766, 24.527, 5.529, 0.938)
pt3dadd(147.814, 24.417, 5.535, 0.956)
pt3dadd(147.86, 24.307, 5.541, 0.974)
pt3dadd(147.908, 24.197, 5.547, 0.992)
pt3dadd(147.955, 24.087, 5.554, 1.01)
pt3dadd(148.003, 23.977, 5.56, 1.028)
pt3dadd(148.05, 23.867, 5.566, 1.046)
pt3dadd(148.098, 23.757, 5.572, 1.062)
pt3dadd(148.152, 23.651, 5.58, 1.046)
pt3dadd(148.211, 23.546, 5.589, 1.008)
pt3dadd(148.27, 23.442, 5.598, 0.972)
pt3dadd(148.328, 23.338, 5.606, 0.934)
pt3dadd(148.387, 23.234, 5.615, 0.898)
pt3dadd(148.446, 23.13, 5.624, 0.862)
pt3dadd(148.505, 23.026, 5.633, 0.824)
pt3dadd(148.562, 22.921, 5.641, 0.788)
pt3dadd(148.621, 22.817, 5.65, 0.75)
pt3dadd(148.68, 22.713, 5.659, 0.714)
pt3dadd(148.74, 22.611, 5.673, 0.672)
pt3dadd(148.801, 22.51, 5.69, 0.628)
pt3dadd(148.862, 22.408, 5.707, 0.586)
pt3dadd(148.924, 22.307, 5.723, 0.542)
pt3dadd(148.985, 22.206, 5.74, 0.498)
pt3dadd(149.046, 22.105, 5.757, 0.456)
pt3dadd(149.107, 22.003, 5.773, 0.412)
pt3dadd(149.168, 21.902, 5.79, 0.368)
pt3dadd(149.23, 21.801, 5.807, 0.326)
pt3dadd(149.291, 21.699, 5.824, 0.282)
pt3dadd(149.345, 21.599, 5.854, 0.284)
pt3dadd(149.394, 21.498, 5.888, 0.3)
pt3dadd(149.444, 21.397, 5.923, 0.316)
pt3dadd(149.495, 21.297, 5.958, 0.334)
pt3dadd(149.545, 21.196, 5.992, 0.35)
pt3dadd(149.596, 21.095, 6.027, 0.366)
pt3dadd(149.646, 20.994, 6.062, 0.384)
pt3dadd(149.696, 20.894, 6.096, 0.4)
pt3dadd(149.747, 20.793, 6.131, 0.416)
pt3dadd(149.797, 20.692, 6.165, 0.434)
pt3dadd(149.863, 20.598, 6.19, 0.428)
pt3dadd(149.935, 20.505, 6.212, 0.414)
pt3dadd(150.006, 20.412, 6.234, 0.402)
pt3dadd(150.078, 20.319, 6.255, 0.388)
pt3dadd(150.149, 20.227, 6.277, 0.376)
pt3dadd(150.221, 20.134, 6.299, 0.362)
pt3dadd(150.293, 20.041, 6.321, 0.35)
pt3dadd(150.364, 19.948, 6.342, 0.336)
pt3dadd(150.436, 19.856, 6.364, 0.324)
pt3dadd(150.508, 19.763, 6.385, 0.312)
pt3dadd(150.584, 19.673, 6.402, 0.314)
pt3dadd(150.664, 19.584, 6.417, 0.32)
pt3dadd(150.742, 19.496, 6.432, 0.326)
pt3dadd(150.821, 19.407, 6.447, 0.334)
pt3dadd(150.899, 19.318, 6.462, 0.34)
pt3dadd(150.978, 19.229, 6.477, 0.346)
pt3dadd(151.057, 19.141, 6.492, 0.354)
pt3dadd(151.135, 19.052, 6.507, 0.36)
pt3dadd(151.214, 18.963, 6.522, 0.366)
pt3dadd(151.292, 18.874, 6.536, 0.372)
pt3dadd(151.376, 18.789, 6.547, 0.398)
pt3dadd(151.46, 18.704, 6.555, 0.428)
pt3dadd(151.544, 18.619, 6.564, 0.458)
pt3dadd(151.628, 18.534, 6.573, 0.488)
pt3dadd(151.714, 18.45, 6.582, 0.52)
pt3dadd(151.798, 18.365, 6.591, 0.55)
pt3dadd(151.882, 18.28, 6.6, 0.58)
pt3dadd(151.966, 18.195, 6.609, 0.61)
pt3dadd(152.051, 18.111, 6.618, 0.64)
pt3dadd(152.135, 18.026, 6.626, 0.67)
pt3dadd(152.233, 17.958, 6.628, 0.662)
pt3dadd(152.335, 17.895, 6.628, 0.644)
pt3dadd(152.437, 17.832, 6.629, 0.628)
pt3dadd(152.539, 17.769, 6.629, 0.61)
pt3dadd(152.641, 17.706, 6.629, 0.594)
pt3dadd(152.743, 17.642, 6.629, 0.576)
pt3dadd(152.845, 17.579, 6.629, 0.56)
pt3dadd(152.947, 17.516, 6.629, 0.542)
pt3dadd(153.049, 17.453, 6.63, 0.526)
pt3dadd(153.151, 17.389, 6.63, 0.508)
pt3dadd(153.248, 17.319, 6.63, 0.51)
pt3dadd(153.343, 17.247, 6.63, 0.516)
pt3dadd(153.439, 17.174, 6.631, 0.522)
pt3dadd(153.535, 17.102, 6.631, 0.528)
pt3dadd(153.631, 17.03, 6.631, 0.534)
pt3dadd(153.727, 16.958, 6.632, 0.54)
pt3dadd(153.823, 16.885, 6.632, 0.546)
pt3dadd(153.919, 16.813, 6.632, 0.55)
pt3dadd(154.014, 16.741, 6.632, 0.556)
pt3dadd(154.11, 16.669, 6.633, 0.562)
pt3dadd(154.201, 16.591, 6.633, 0.576)
pt3dadd(154.291, 16.511, 6.634, 0.594)
pt3dadd(154.381, 16.432, 6.634, 0.61)
pt3dadd(154.471, 16.353, 6.635, 0.626)
pt3dadd(154.561, 16.273, 6.635, 0.642)
pt3dadd(154.651, 16.194, 6.636, 0.658)
pt3dadd(154.741, 16.114, 6.636, 0.674)
pt3dadd(154.831, 16.035, 6.637, 0.69)
pt3dadd(154.921, 15.956, 6.637, 0.706)
pt3dadd(155.011, 15.876, 6.637, 0.722)
pt3dadd(155.095, 15.791, 6.638, 0.738)
pt3dadd(155.179, 15.705, 6.639, 0.754)
pt3dadd(155.262, 15.618, 6.64, 0.77)
pt3dadd(155.345, 15.531, 6.641, 0.786)
pt3dadd(155.429, 15.445, 6.641, 0.802)
pt3dadd(155.512, 15.359, 6.642, 0.818)
pt3dadd(155.594, 15.272, 6.643, 0.832)
pt3dadd(155.678, 15.186, 6.643, 0.848)
pt3dadd(155.761, 15.099, 6.644, 0.864)
pt3dadd(155.844, 15.012, 6.645, 0.88)
pt3dadd(155.908, 14.911, 6.647, 0.858)
pt3dadd(155.966, 14.807, 6.648, 0.83)
pt3dadd(156.025, 14.702, 6.65, 0.802)
pt3dadd(156.085, 14.598, 6.652, 0.774)
pt3dadd(156.144, 14.493, 6.654, 0.746)
pt3dadd(156.203, 14.389, 6.655, 0.718)
pt3dadd(156.263, 14.285, 6.657, 0.69)
pt3dadd(156.322, 14.181, 6.659, 0.662)
pt3dadd(156.38, 14.076, 6.661, 0.632)
pt3dadd(156.44, 13.972, 6.662, 0.604)
pt3dadd(156.499, 13.868, 6.665, 0.598)
pt3dadd(156.559, 13.764, 6.668, 0.592)
pt3dadd(156.619, 13.66, 6.671, 0.586)
pt3dadd(156.679, 13.556, 6.674, 0.582)
pt3dadd(156.738, 13.452, 6.677, 0.576)
pt3dadd(156.798, 13.347, 6.679, 0.572)
pt3dadd(156.858, 13.243, 6.682, 0.566)
pt3dadd(156.918, 13.139, 6.685, 0.562)
pt3dadd(156.977, 13.035, 6.688, 0.556)
pt3dadd(157.037, 12.931, 6.691, 0.55)
pt3dadd(157.096, 12.827, 6.696, 0.558)
}
}
proc shape3d_63() {
dend_7[54] { pt3dadd(157.154, 12.723, 6.702, 0.564)
pt3dadd(157.213, 12.618, 6.707, 0.572)
pt3dadd(157.272, 12.514, 6.713, 0.58)
pt3dadd(157.331, 12.409, 6.718, 0.588)
pt3dadd(157.39, 12.305, 6.724, 0.596)
pt3dadd(157.448, 12.201, 6.73, 0.602)
pt3dadd(157.507, 12.096, 6.735, 0.61)
pt3dadd(157.566, 11.992, 6.741, 0.618)
pt3dadd(157.625, 11.887, 6.746, 0.626)
pt3dadd(157.675, 11.779, 6.757, 0.612)
pt3dadd(157.724, 11.67, 6.769, 0.598)
pt3dadd(157.772, 11.562, 6.781, 0.582)
pt3dadd(157.822, 11.453, 6.793, 0.568)
pt3dadd(157.871, 11.344, 6.804, 0.552)
pt3dadd(157.92, 11.236, 6.816, 0.538)
pt3dadd(157.969, 11.127, 6.828, 0.522)
pt3dadd(158.017, 11.019, 6.839, 0.508)
pt3dadd(158.066, 10.91, 6.851, 0.492)
pt3dadd(158.116, 10.801, 6.863, 0.478)
pt3dadd(158.18, 10.703, 6.879, 0.496)
pt3dadd(158.248, 10.605, 6.896, 0.518)
pt3dadd(158.314, 10.507, 6.914, 0.538)
pt3dadd(158.38, 10.409, 6.931, 0.558)
pt3dadd(158.447, 10.311, 6.948, 0.58)
pt3dadd(158.513, 10.213, 6.965, 0.6)
pt3dadd(158.579, 10.116, 6.982, 0.62)
pt3dadd(158.645, 10.018, 7, 0.642)
pt3dadd(158.712, 9.92, 7.017, 0.662)
pt3dadd(158.778, 9.822, 7.034, 0.682)
pt3dadd(158.824, 9.761, 7.111, 0.704)
pt3dadd(158.87, 9.699, 7.188, 0.726)
pt3dadd(158.916, 9.638, 7.264, 0.748)
pt3dadd(158.963, 9.576, 7.341, 0.772)
pt3dadd(159.008, 9.515, 7.418, 0.794)
pt3dadd(159.054, 9.453, 7.495, 0.816)
pt3dadd(159.101, 9.392, 7.572, 0.838)
pt3dadd(159.146, 9.33, 7.648, 0.86)
pt3dadd(159.193, 9.269, 7.725, 0.882)
pt3dadd(159.239, 9.207, 7.802, 0.904)
}
dend_7[55] {pt3dclear()
pt3dadd(130.976, 72.721, 6.911, 0.904)
pt3dadd(130.979, 72.636, 6.894, 0.932)
pt3dadd(130.981, 72.52, 6.871, 0.968)
pt3dadd(130.985, 72.403, 6.847, 1.006)
pt3dadd(130.987, 72.287, 6.824, 1.042)
pt3dadd(130.99, 72.17, 6.8, 1.08)
pt3dadd(130.993, 72.054, 6.777, 1.118)
pt3dadd(130.973, 71.941, 6.752, 1.154)
pt3dadd(130.933, 71.832, 6.727, 1.192)
pt3dadd(130.895, 71.723, 6.701, 1.23)
pt3dadd(130.855, 71.614, 6.676, 1.266)
pt3dadd(130.816, 71.504, 6.65, 1.304)
pt3dadd(130.776, 71.395, 6.625, 1.342)
pt3dadd(130.736, 71.286, 6.599, 1.38)
pt3dadd(130.697, 71.177, 6.574, 1.416)
pt3dadd(130.657, 71.068, 6.548, 1.454)
pt3dadd(130.592, 70.977, 6.525, 1.486)
pt3dadd(130.5, 70.905, 6.502, 1.516)
pt3dadd(130.408, 70.832, 6.48, 1.544)
pt3dadd(130.316, 70.76, 6.458, 1.572)
pt3dadd(130.224, 70.687, 6.436, 1.602)
pt3dadd(130.133, 70.615, 6.413, 1.63)
pt3dadd(130.04, 70.542, 6.391, 1.658)
pt3dadd(129.949, 70.47, 6.369, 1.686)
pt3dadd(129.857, 70.397, 6.347, 1.716)
pt3dadd(129.766, 70.325, 6.325, 1.744)
pt3dadd(129.672, 70.262, 6.292, 1.752)
pt3dadd(129.578, 70.208, 6.249, 1.742)
pt3dadd(129.485, 70.154, 6.206, 1.732)
pt3dadd(129.39, 70.1, 6.163, 1.72)
pt3dadd(129.296, 70.047, 6.12, 1.71)
pt3dadd(129.202, 69.993, 6.077, 1.698)
pt3dadd(129.108, 69.939, 6.034, 1.688)
pt3dadd(129.013, 69.885, 5.991, 1.676)
pt3dadd(128.92, 69.832, 5.948, 1.666)
pt3dadd(128.826, 69.778, 5.905, 1.656)
pt3dadd(128.734, 69.719, 5.865, 1.652)
pt3dadd(128.642, 69.657, 5.826, 1.658)
pt3dadd(128.551, 69.594, 5.787, 1.662)
pt3dadd(128.46, 69.531, 5.748, 1.666)
pt3dadd(128.369, 69.469, 5.709, 1.672)
pt3dadd(128.278, 69.406, 5.67, 1.676)
pt3dadd(128.186, 69.344, 5.631, 1.68)
pt3dadd(128.095, 69.281, 5.592, 1.684)
pt3dadd(128.004, 69.219, 5.554, 1.69)
pt3dadd(127.913, 69.156, 5.515, 1.694)
pt3dadd(127.828, 69.089, 5.472, 1.708)
pt3dadd(127.745, 69.02, 5.428, 1.728)
pt3dadd(127.663, 68.95, 5.383, 1.748)
pt3dadd(127.582, 68.881, 5.339, 1.766)
pt3dadd(127.5, 68.812, 5.294, 1.786)
pt3dadd(127.417, 68.742, 5.249, 1.806)
pt3dadd(127.336, 68.673, 5.205, 1.826)
pt3dadd(127.254, 68.603, 5.16, 1.846)
pt3dadd(127.171, 68.534, 5.115, 1.866)
pt3dadd(127.09, 68.464, 5.071, 1.886)
pt3dadd(127.024, 68.385, 5.02, 1.862)
pt3dadd(126.964, 68.303, 4.968, 1.824)
pt3dadd(126.902, 68.221, 4.915, 1.788)
pt3dadd(126.842, 68.139, 4.863, 1.752)
pt3dadd(126.781, 68.056, 4.81, 1.714)
pt3dadd(126.721, 67.974, 4.758, 1.678)
pt3dadd(126.66, 67.892, 4.705, 1.64)
pt3dadd(126.6, 67.81, 4.653, 1.604)
pt3dadd(126.539, 67.727, 4.6, 1.566)
pt3dadd(126.479, 67.645, 4.548, 1.53)
}
dend_7[56] {pt3dclear()
pt3dadd(126.479, 67.645, 4.548, 1.53)
pt3dadd(126.439, 67.571, 4.528, 1.472)
pt3dadd(126.383, 67.47, 4.501, 1.394)
pt3dadd(126.328, 67.368, 4.474, 1.316)
pt3dadd(126.272, 67.267, 4.447, 1.238)
pt3dadd(126.217, 67.165, 4.42, 1.158)
pt3dadd(126.162, 67.064, 4.393, 1.08)
pt3dadd(126.107, 66.962, 4.366, 1.002)
pt3dadd(126.052, 66.861, 4.339, 0.924)
pt3dadd(125.996, 66.759, 4.312, 0.846)
pt3dadd(125.941, 66.658, 4.285, 0.768)
pt3dadd(125.874, 66.561, 4.267, 0.766)
pt3dadd(125.803, 66.466, 4.252, 0.784)
pt3dadd(125.732, 66.371, 4.236, 0.804)
pt3dadd(125.662, 66.276, 4.22, 0.822)
pt3dadd(125.591, 66.181, 4.204, 0.84)
pt3dadd(125.52, 66.086, 4.189, 0.86)
pt3dadd(125.45, 65.991, 4.173, 0.878)
pt3dadd(125.38, 65.896, 4.157, 0.896)
pt3dadd(125.309, 65.801, 4.141, 0.916)
pt3dadd(125.238, 65.705, 4.126, 0.934)
pt3dadd(125.16, 65.615, 4.116, 0.95)
pt3dadd(125.08, 65.526, 4.107, 0.968)
pt3dadd(125, 65.437, 4.098, 0.984)
pt3dadd(124.92, 65.349, 4.089, 1)
pt3dadd(124.841, 65.259, 4.081, 1.016)
pt3dadd(124.76, 65.171, 4.072, 1.034)
pt3dadd(124.68, 65.082, 4.063, 1.05)
pt3dadd(124.601, 64.993, 4.054, 1.066)
pt3dadd(124.52, 64.904, 4.045, 1.084)
pt3dadd(124.441, 64.815, 4.036, 1.1)
pt3dadd(124.361, 64.735, 4.005, 1.104)
pt3dadd(124.279, 64.658, 3.969, 1.108)
pt3dadd(124.199, 64.581, 3.932, 1.11)
pt3dadd(124.118, 64.504, 3.896, 1.114)
pt3dadd(124.037, 64.427, 3.86, 1.116)
pt3dadd(123.956, 64.349, 3.823, 1.118)
pt3dadd(123.875, 64.272, 3.787, 1.122)
pt3dadd(123.794, 64.195, 3.751, 1.124)
pt3dadd(123.714, 64.118, 3.714, 1.128)
pt3dadd(123.632, 64.041, 3.678, 1.13)
pt3dadd(123.546, 63.964, 3.654, 1.102)
pt3dadd(123.457, 63.887, 3.631, 1.074)
pt3dadd(123.37, 63.81, 3.608, 1.042)
pt3dadd(123.281, 63.734, 3.585, 1.014)
pt3dadd(123.193, 63.657, 3.562, 0.984)
pt3dadd(123.106, 63.58, 3.539, 0.954)
pt3dadd(123.017, 63.503, 3.516, 0.924)
pt3dadd(122.929, 63.427, 3.493, 0.894)
pt3dadd(122.84, 63.35, 3.47, 0.864)
pt3dadd(122.753, 63.273, 3.447, 0.834)
pt3dadd(122.659, 63.198, 3.44, 0.836)
pt3dadd(122.567, 63.123, 3.433, 0.842)
pt3dadd(122.473, 63.048, 3.426, 0.848)
pt3dadd(122.38, 62.973, 3.42, 0.852)
pt3dadd(122.287, 62.898, 3.413, 0.858)
pt3dadd(122.194, 62.823, 3.406, 0.862)
pt3dadd(122.1, 62.748, 3.399, 0.868)
pt3dadd(122.006, 62.673, 3.393, 0.872)
pt3dadd(121.914, 62.598, 3.386, 0.878)
pt3dadd(121.82, 62.522, 3.379, 0.882)
}
dend_7[57] {pt3dclear()
pt3dadd(121.82, 62.522, 3.379, 0.882)
pt3dadd(121.793, 62.503, 3.382, 0.884)
pt3dadd(121.693, 62.437, 3.392, 0.89)
pt3dadd(121.595, 62.37, 3.402, 0.898)
pt3dadd(121.495, 62.303, 3.412, 0.904)
pt3dadd(121.397, 62.236, 3.422, 0.91)
pt3dadd(121.297, 62.169, 3.432, 0.918)
pt3dadd(121.199, 62.103, 3.442, 0.924)
pt3dadd(121.1, 62.036, 3.453, 0.93)
pt3dadd(121.001, 61.969, 3.463, 0.938)
pt3dadd(120.902, 61.902, 3.473, 0.944)
pt3dadd(120.802, 61.845, 3.494, 0.918)
pt3dadd(120.698, 61.799, 3.529, 0.852)
pt3dadd(120.595, 61.753, 3.563, 0.786)
pt3dadd(120.493, 61.707, 3.598, 0.72)
pt3dadd(120.39, 61.661, 3.632, 0.654)
pt3dadd(120.287, 61.615, 3.667, 0.588)
pt3dadd(120.185, 61.569, 3.701, 0.522)
pt3dadd(120.082, 61.522, 3.735, 0.456)
pt3dadd(119.979, 61.476, 3.77, 0.39)
pt3dadd(119.876, 61.43, 3.804, 0.324)
pt3dadd(119.769, 61.391, 3.835, 0.3)
pt3dadd(119.657, 61.359, 3.859, 0.326)
pt3dadd(119.545, 61.328, 3.884, 0.354)
pt3dadd(119.433, 61.296, 3.908, 0.38)
pt3dadd(119.321, 61.265, 3.933, 0.406)
pt3dadd(119.209, 61.233, 3.957, 0.434)
pt3dadd(119.097, 61.202, 3.982, 0.46)
pt3dadd(118.985, 61.17, 4.007, 0.486)
pt3dadd(118.873, 61.139, 4.031, 0.514)
pt3dadd(118.761, 61.107, 4.056, 0.54)
pt3dadd(118.651, 61.069, 4.076, 0.554)
pt3dadd(118.541, 61.024, 4.091, 0.556)
pt3dadd(118.431, 60.979, 4.106, 0.556)
}
}
proc shape3d_64() {
dend_7[57] { pt3dadd(118.322, 60.934, 4.121, 0.558)
pt3dadd(118.212, 60.889, 4.136, 0.558)
pt3dadd(118.102, 60.844, 4.151, 0.56)
pt3dadd(117.992, 60.798, 4.167, 0.56)
pt3dadd(117.883, 60.753, 4.182, 0.562)
pt3dadd(117.773, 60.708, 4.197, 0.562)
pt3dadd(117.663, 60.663, 4.212, 0.564)
pt3dadd(117.554, 60.615, 4.223, 0.562)
pt3dadd(117.446, 60.565, 4.23, 0.556)
pt3dadd(117.337, 60.515, 4.238, 0.552)
pt3dadd(117.228, 60.464, 4.245, 0.546)
pt3dadd(117.12, 60.414, 4.252, 0.542)
pt3dadd(117.011, 60.364, 4.26, 0.536)
pt3dadd(116.903, 60.314, 4.267, 0.532)
pt3dadd(116.794, 60.263, 4.274, 0.526)
pt3dadd(116.685, 60.213, 4.282, 0.522)
pt3dadd(116.577, 60.163, 4.289, 0.516)
pt3dadd(116.467, 60.114, 4.293, 0.522)
pt3dadd(116.357, 60.067, 4.295, 0.538)
pt3dadd(116.247, 60.02, 4.296, 0.552)
pt3dadd(116.136, 59.973, 4.298, 0.568)
pt3dadd(116.026, 59.925, 4.299, 0.582)
pt3dadd(115.916, 59.878, 4.3, 0.596)
pt3dadd(115.805, 59.831, 4.302, 0.612)
pt3dadd(115.695, 59.784, 4.303, 0.626)
pt3dadd(115.585, 59.737, 4.305, 0.64)
pt3dadd(115.474, 59.69, 4.306, 0.656)
pt3dadd(115.369, 59.633, 4.308, 0.652)
pt3dadd(115.267, 59.57, 4.311, 0.636)
pt3dadd(115.165, 59.506, 4.313, 0.62)
pt3dadd(115.063, 59.443, 4.316, 0.602)
pt3dadd(114.962, 59.379, 4.319, 0.586)
pt3dadd(114.86, 59.316, 4.321, 0.568)
pt3dadd(114.758, 59.252, 4.324, 0.552)
pt3dadd(114.656, 59.189, 4.326, 0.536)
pt3dadd(114.555, 59.125, 4.329, 0.518)
pt3dadd(114.453, 59.062, 4.331, 0.502)
pt3dadd(114.348, 59.005, 4.335, 0.516)
pt3dadd(114.24, 58.952, 4.341, 0.554)
pt3dadd(114.132, 58.9, 4.347, 0.592)
pt3dadd(114.024, 58.847, 4.353, 0.63)
pt3dadd(113.917, 58.795, 4.359, 0.668)
pt3dadd(113.809, 58.743, 4.365, 0.706)
pt3dadd(113.701, 58.69, 4.371, 0.744)
pt3dadd(113.594, 58.638, 4.377, 0.782)
pt3dadd(113.486, 58.585, 4.382, 0.82)
pt3dadd(113.378, 58.533, 4.388, 0.858)
pt3dadd(113.273, 58.476, 4.396, 0.884)
pt3dadd(113.17, 58.416, 4.405, 0.9)
pt3dadd(113.066, 58.356, 4.414, 0.916)
pt3dadd(112.963, 58.296, 4.423, 0.932)
pt3dadd(112.86, 58.236, 4.433, 0.948)
pt3dadd(112.757, 58.176, 4.442, 0.964)
pt3dadd(112.653, 58.116, 4.451, 0.98)
pt3dadd(112.55, 58.055, 4.46, 0.996)
pt3dadd(112.447, 57.995, 4.469, 1.012)
pt3dadd(112.343, 57.935, 4.478, 1.028)
pt3dadd(112.245, 57.87, 4.495, 1.02)
pt3dadd(112.15, 57.801, 4.516, 1.002)
pt3dadd(112.055, 57.732, 4.537, 0.982)
pt3dadd(111.96, 57.663, 4.557, 0.964)
pt3dadd(111.865, 57.594, 4.578, 0.944)
pt3dadd(111.77, 57.526, 4.599, 0.926)
pt3dadd(111.675, 57.457, 4.62, 0.906)
pt3dadd(111.58, 57.388, 4.641, 0.886)
pt3dadd(111.485, 57.319, 4.662, 0.868)
pt3dadd(111.39, 57.25, 4.683, 0.848)
pt3dadd(111.303, 57.182, 4.719, 0.828)
pt3dadd(111.218, 57.113, 4.761, 0.806)
pt3dadd(111.133, 57.044, 4.802, 0.784)
pt3dadd(111.048, 56.975, 4.843, 0.762)
pt3dadd(110.963, 56.906, 4.885, 0.742)
pt3dadd(110.879, 56.837, 4.926, 0.72)
pt3dadd(110.794, 56.768, 4.967, 0.698)
pt3dadd(110.709, 56.699, 5.009, 0.678)
pt3dadd(110.624, 56.63, 5.05, 0.656)
pt3dadd(110.54, 56.561, 5.091, 0.634)
pt3dadd(110.454, 56.483, 5.118, 0.616)
pt3dadd(110.369, 56.404, 5.142, 0.598)
pt3dadd(110.284, 56.325, 5.165, 0.58)
pt3dadd(110.198, 56.245, 5.189, 0.562)
pt3dadd(110.113, 56.166, 5.213, 0.544)
pt3dadd(110.028, 56.086, 5.237, 0.526)
pt3dadd(109.942, 56.007, 5.261, 0.508)
pt3dadd(109.857, 55.928, 5.285, 0.49)
pt3dadd(109.772, 55.848, 5.308, 0.472)
pt3dadd(109.686, 55.769, 5.332, 0.454)
pt3dadd(109.597, 55.69, 5.345, 0.452)
pt3dadd(109.507, 55.612, 5.356, 0.452)
pt3dadd(109.417, 55.534, 5.366, 0.452)
pt3dadd(109.326, 55.456, 5.377, 0.452)
pt3dadd(109.236, 55.378, 5.388, 0.452)
pt3dadd(109.146, 55.3, 5.399, 0.452)
pt3dadd(109.056, 55.222, 5.409, 0.452)
pt3dadd(108.966, 55.143, 5.42, 0.452)
pt3dadd(108.876, 55.065, 5.431, 0.452)
pt3dadd(108.786, 54.987, 5.442, 0.452)
pt3dadd(108.693, 54.912, 5.448, 0.476)
pt3dadd(108.599, 54.836, 5.454, 0.504)
pt3dadd(108.506, 54.761, 5.459, 0.534)
pt3dadd(108.413, 54.686, 5.465, 0.562)
pt3dadd(108.319, 54.611, 5.471, 0.59)
pt3dadd(108.226, 54.536, 5.476, 0.62)
pt3dadd(108.133, 54.461, 5.482, 0.648)
pt3dadd(108.04, 54.386, 5.487, 0.676)
pt3dadd(107.946, 54.31, 5.493, 0.704)
pt3dadd(107.853, 54.235, 5.499, 0.734)
pt3dadd(107.756, 54.165, 5.502, 0.766)
pt3dadd(107.658, 54.096, 5.505, 0.802)
pt3dadd(107.56, 54.027, 5.509, 0.836)
pt3dadd(107.462, 53.957, 5.512, 0.87)
pt3dadd(107.364, 53.888, 5.515, 0.904)
pt3dadd(107.266, 53.819, 5.518, 0.938)
pt3dadd(107.168, 53.75, 5.522, 0.972)
pt3dadd(107.07, 53.68, 5.525, 1.006)
pt3dadd(106.972, 53.611, 5.528, 1.04)
pt3dadd(106.874, 53.542, 5.531, 1.076)
pt3dadd(106.764, 53.496, 5.538, 1.046)
pt3dadd(106.652, 53.454, 5.545, 1.01)
pt3dadd(106.54, 53.411, 5.553, 0.974)
pt3dadd(106.429, 53.368, 5.56, 0.938)
pt3dadd(106.317, 53.325, 5.567, 0.902)
pt3dadd(106.205, 53.283, 5.575, 0.866)
pt3dadd(106.093, 53.24, 5.582, 0.83)
pt3dadd(105.981, 53.197, 5.589, 0.794)
pt3dadd(105.87, 53.154, 5.596, 0.758)
pt3dadd(105.758, 53.111, 5.603, 0.722)
pt3dadd(105.641, 53.088, 5.615, 0.714)
pt3dadd(105.524, 53.066, 5.628, 0.71)
pt3dadd(105.407, 53.045, 5.641, 0.706)
pt3dadd(105.29, 53.023, 5.653, 0.702)
pt3dadd(105.173, 53.002, 5.665, 0.698)
pt3dadd(105.056, 52.98, 5.678, 0.694)
pt3dadd(104.939, 52.959, 5.69, 0.69)
pt3dadd(104.822, 52.937, 5.703, 0.686)
pt3dadd(104.705, 52.916, 5.715, 0.682)
pt3dadd(104.588, 52.894, 5.728, 0.678)
pt3dadd(104.475, 52.879, 5.759, 0.666)
pt3dadd(104.362, 52.865, 5.792, 0.654)
pt3dadd(104.25, 52.851, 5.825, 0.64)
pt3dadd(104.137, 52.837, 5.857, 0.628)
pt3dadd(104.025, 52.822, 5.89, 0.616)
pt3dadd(103.912, 52.808, 5.922, 0.602)
pt3dadd(103.8, 52.794, 5.955, 0.59)
pt3dadd(103.687, 52.78, 5.988, 0.576)
pt3dadd(103.575, 52.766, 6.021, 0.564)
pt3dadd(103.462, 52.751, 6.053, 0.552)
pt3dadd(103.352, 52.734, 6.09, 0.558)
pt3dadd(103.242, 52.716, 6.127, 0.566)
pt3dadd(103.132, 52.698, 6.164, 0.574)
pt3dadd(103.021, 52.681, 6.201, 0.58)
pt3dadd(102.911, 52.663, 6.238, 0.588)
pt3dadd(102.801, 52.645, 6.274, 0.594)
pt3dadd(102.691, 52.628, 6.311, 0.602)
pt3dadd(102.581, 52.61, 6.348, 0.608)
pt3dadd(102.471, 52.592, 6.385, 0.616)
pt3dadd(102.361, 52.574, 6.422, 0.624)
pt3dadd(102.252, 52.539, 6.452, 0.638)
pt3dadd(102.143, 52.504, 6.482, 0.652)
pt3dadd(102.034, 52.469, 6.512, 0.666)
pt3dadd(101.925, 52.434, 6.542, 0.68)
pt3dadd(101.816, 52.399, 6.572, 0.694)
pt3dadd(101.707, 52.364, 6.602, 0.708)
pt3dadd(101.598, 52.329, 6.632, 0.722)
pt3dadd(101.489, 52.294, 6.662, 0.736)
pt3dadd(101.38, 52.259, 6.693, 0.75)
pt3dadd(101.273, 52.219, 6.722, 0.752)
pt3dadd(101.174, 52.157, 6.744, 0.7)
pt3dadd(101.075, 52.095, 6.767, 0.646)
pt3dadd(100.977, 52.032, 6.79, 0.594)
pt3dadd(100.878, 51.97, 6.813, 0.54)
pt3dadd(100.779, 51.907, 6.836, 0.488)
pt3dadd(100.68, 51.845, 6.859, 0.434)
pt3dadd(100.582, 51.782, 6.881, 0.38)
pt3dadd(100.483, 51.72, 6.904, 0.328)
pt3dadd(100.384, 51.657, 6.927, 0.274)
pt3dadd(100.29, 51.591, 6.953, 0.238)
pt3dadd(100.222, 51.506, 6.994, 0.294)
pt3dadd(100.153, 51.421, 7.036, 0.348)
pt3dadd(100.085, 51.336, 7.077, 0.404)
pt3dadd(100.016, 51.251, 7.118, 0.458)
pt3dadd(99.948, 51.166, 7.16, 0.514)
pt3dadd(99.879, 51.081, 7.201, 0.57)
pt3dadd(99.81, 50.996, 7.243, 0.624)
pt3dadd(99.742, 50.911, 7.284, 0.68)
pt3dadd(99.673, 50.826, 7.325, 0.734)
pt3dadd(99.602, 50.743, 7.366, 0.778)
pt3dadd(99.514, 50.673, 7.401, 0.76)
pt3dadd(99.426, 50.604, 7.437, 0.74)
pt3dadd(99.338, 50.534, 7.472, 0.722)
pt3dadd(99.251, 50.464, 7.508, 0.704)
pt3dadd(99.163, 50.394, 7.543, 0.684)
pt3dadd(99.075, 50.324, 7.579, 0.666)
pt3dadd(98.987, 50.255, 7.615, 0.648)
pt3dadd(98.899, 50.185, 7.65, 0.628)
pt3dadd(98.812, 50.115, 7.686, 0.61)
pt3dadd(98.722, 50.046, 7.719, 0.59)
pt3dadd(98.628, 49.979, 7.745, 0.564)
pt3dadd(98.533, 49.912, 7.772, 0.538)
pt3dadd(98.439, 49.845, 7.798, 0.512)
}
}
proc shape3d_65() {
dend_7[57] { pt3dadd(98.344, 49.778, 7.824, 0.488)
pt3dadd(98.25, 49.711, 7.85, 0.462)
pt3dadd(98.155, 49.644, 7.877, 0.436)
pt3dadd(98.061, 49.578, 7.903, 0.41)
pt3dadd(97.966, 49.511, 7.929, 0.384)
pt3dadd(97.872, 49.444, 7.956, 0.36)
pt3dadd(97.776, 49.378, 7.982, 0.34)
pt3dadd(97.679, 49.317, 8.01, 0.34)
pt3dadd(97.581, 49.256, 8.038, 0.34)
pt3dadd(97.483, 49.195, 8.065, 0.34)
pt3dadd(97.385, 49.134, 8.093, 0.34)
pt3dadd(97.287, 49.073, 8.12, 0.342)
pt3dadd(97.19, 49.011, 8.148, 0.342)
pt3dadd(97.092, 48.95, 8.176, 0.342)
pt3dadd(96.994, 48.889, 8.203, 0.342)
pt3dadd(96.896, 48.828, 8.231, 0.342)
pt3dadd(96.798, 48.771, 8.261, 0.352)
pt3dadd(96.697, 48.724, 8.299, 0.386)
pt3dadd(96.596, 48.676, 8.336, 0.418)
pt3dadd(96.496, 48.629, 8.374, 0.452)
pt3dadd(96.395, 48.581, 8.411, 0.486)
pt3dadd(96.294, 48.534, 8.449, 0.518)
pt3dadd(96.194, 48.486, 8.486, 0.552)
pt3dadd(96.093, 48.439, 8.524, 0.586)
pt3dadd(95.992, 48.391, 8.561, 0.618)
pt3dadd(95.892, 48.344, 8.598, 0.652)
pt3dadd(95.793, 48.29, 8.633, 0.676)
pt3dadd(95.7, 48.222, 8.66, 0.676)
pt3dadd(95.607, 48.154, 8.687, 0.676)
pt3dadd(95.514, 48.086, 8.715, 0.676)
pt3dadd(95.421, 48.018, 8.742, 0.676)
pt3dadd(95.328, 47.949, 8.769, 0.676)
pt3dadd(95.235, 47.881, 8.797, 0.676)
pt3dadd(95.141, 47.813, 8.824, 0.678)
pt3dadd(95.048, 47.745, 8.851, 0.678)
pt3dadd(94.955, 47.677, 8.879, 0.678)
pt3dadd(94.863, 47.607, 8.905, 0.676)
pt3dadd(94.772, 47.533, 8.928, 0.666)
pt3dadd(94.682, 47.459, 8.952, 0.656)
pt3dadd(94.592, 47.385, 8.975, 0.646)
pt3dadd(94.501, 47.312, 8.998, 0.636)
pt3dadd(94.411, 47.238, 9.021, 0.626)
pt3dadd(94.32, 47.164, 9.045, 0.616)
pt3dadd(94.23, 47.09, 9.068, 0.608)
pt3dadd(94.14, 47.016, 9.092, 0.598)
pt3dadd(94.049, 46.943, 9.115, 0.588)
pt3dadd(93.96, 46.868, 9.139, 0.576)
pt3dadd(93.874, 46.79, 9.165, 0.564)
pt3dadd(93.788, 46.713, 9.192, 0.55)
pt3dadd(93.702, 46.635, 9.218, 0.538)
pt3dadd(93.616, 46.558, 9.245, 0.524)
pt3dadd(93.53, 46.48, 9.271, 0.512)
pt3dadd(93.444, 46.403, 9.297, 0.5)
pt3dadd(93.358, 46.325, 9.323, 0.486)
pt3dadd(93.272, 46.248, 9.35, 0.474)
pt3dadd(93.186, 46.17, 9.376, 0.46)
pt3dadd(93.104, 46.093, 9.41, 0.452)
pt3dadd(93.029, 46.017, 9.455, 0.452)
pt3dadd(92.954, 45.941, 9.5, 0.452)
pt3dadd(92.879, 45.864, 9.545, 0.452)
pt3dadd(92.804, 45.788, 9.59, 0.452)
pt3dadd(92.729, 45.711, 9.635, 0.452)
pt3dadd(92.654, 45.635, 9.68, 0.452)
pt3dadd(92.578, 45.559, 9.725, 0.452)
pt3dadd(92.503, 45.482, 9.77, 0.452)
pt3dadd(92.428, 45.406, 9.815, 0.452)
pt3dadd(92.351, 45.328, 9.855, 0.452)
pt3dadd(92.272, 45.246, 9.887, 0.452)
pt3dadd(92.193, 45.164, 9.918, 0.452)
pt3dadd(92.113, 45.083, 9.95, 0.452)
pt3dadd(92.034, 45.001, 9.982, 0.452)
pt3dadd(91.955, 44.919, 10.013, 0.452)
pt3dadd(91.875, 44.838, 10.045, 0.452)
pt3dadd(91.796, 44.756, 10.076, 0.452)
pt3dadd(91.717, 44.674, 10.108, 0.452)
pt3dadd(91.637, 44.593, 10.14, 0.452)
pt3dadd(91.557, 44.51, 10.167, 0.452)
pt3dadd(91.476, 44.425, 10.188, 0.452)
pt3dadd(91.395, 44.34, 10.21, 0.452)
pt3dadd(91.315, 44.255, 10.231, 0.452)
pt3dadd(91.234, 44.17, 10.252, 0.452)
pt3dadd(91.153, 44.085, 10.274, 0.452)
pt3dadd(91.072, 44.001, 10.295, 0.452)
pt3dadd(90.991, 43.916, 10.316, 0.452)
pt3dadd(90.91, 43.831, 10.337, 0.452)
pt3dadd(90.829, 43.746, 10.359, 0.452)
pt3dadd(90.751, 43.662, 10.387, 0.464)
pt3dadd(90.678, 43.579, 10.424, 0.494)
pt3dadd(90.604, 43.495, 10.462, 0.524)
pt3dadd(90.53, 43.412, 10.5, 0.554)
pt3dadd(90.457, 43.329, 10.538, 0.584)
pt3dadd(90.383, 43.246, 10.575, 0.612)
pt3dadd(90.309, 43.163, 10.613, 0.642)
pt3dadd(90.236, 43.079, 10.651, 0.672)
pt3dadd(90.162, 42.996, 10.689, 0.702)
pt3dadd(90.089, 42.913, 10.726, 0.732)
pt3dadd(90.016, 42.827, 10.762, 0.748)
pt3dadd(89.944, 42.739, 10.794, 0.752)
pt3dadd(89.873, 42.651, 10.827, 0.756)
pt3dadd(89.801, 42.563, 10.859, 0.758)
pt3dadd(89.73, 42.475, 10.892, 0.762)
pt3dadd(89.658, 42.387, 10.924, 0.766)
pt3dadd(89.586, 42.299, 10.956, 0.768)
pt3dadd(89.515, 42.211, 10.989, 0.772)
pt3dadd(89.443, 42.123, 11.021, 0.776)
pt3dadd(89.372, 42.035, 11.054, 0.778)
pt3dadd(89.305, 41.94, 11.079, 0.77)
pt3dadd(89.243, 41.839, 11.097, 0.75)
pt3dadd(89.182, 41.739, 11.116, 0.73)
pt3dadd(89.12, 41.639, 11.135, 0.71)
pt3dadd(89.058, 41.538, 11.153, 0.692)
pt3dadd(88.996, 41.438, 11.172, 0.672)
pt3dadd(88.935, 41.337, 11.191, 0.652)
pt3dadd(88.873, 41.237, 11.209, 0.632)
pt3dadd(88.811, 41.137, 11.228, 0.612)
pt3dadd(88.749, 41.036, 11.247, 0.592)
pt3dadd(88.693, 40.931, 11.259, 0.58)
pt3dadd(88.64, 40.824, 11.266, 0.572)
pt3dadd(88.588, 40.717, 11.274, 0.564)
pt3dadd(88.535, 40.609, 11.282, 0.556)
pt3dadd(88.482, 40.502, 11.289, 0.548)
pt3dadd(88.43, 40.394, 11.297, 0.54)
pt3dadd(88.377, 40.287, 11.305, 0.532)
pt3dadd(88.324, 40.18, 11.313, 0.524)
pt3dadd(88.271, 40.072, 11.32, 0.516)
pt3dadd(88.219, 39.965, 11.328, 0.508)
pt3dadd(88.161, 39.86, 11.331, 0.516)
pt3dadd(88.1, 39.757, 11.331, 0.532)
pt3dadd(88.039, 39.653, 11.331, 0.55)
pt3dadd(87.978, 39.55, 11.331, 0.566)
pt3dadd(87.917, 39.447, 11.331, 0.582)
pt3dadd(87.856, 39.343, 11.331, 0.598)
pt3dadd(87.795, 39.24, 11.331, 0.616)
pt3dadd(87.734, 39.137, 11.331, 0.632)
pt3dadd(87.673, 39.033, 11.331, 0.648)
pt3dadd(87.612, 38.93, 11.331, 0.666)
pt3dadd(87.562, 38.821, 11.331, 0.694)
pt3dadd(87.518, 38.709, 11.331, 0.73)
pt3dadd(87.475, 38.598, 11.331, 0.764)
pt3dadd(87.431, 38.486, 11.331, 0.8)
pt3dadd(87.387, 38.374, 11.331, 0.834)
pt3dadd(87.343, 38.262, 11.331, 0.87)
pt3dadd(87.299, 38.151, 11.331, 0.904)
pt3dadd(87.255, 38.039, 11.331, 0.94)
pt3dadd(87.212, 37.927, 11.331, 0.976)
pt3dadd(87.168, 37.816, 11.331, 1.01)
pt3dadd(87.117, 37.707, 11.331, 1.006)
pt3dadd(87.063, 37.6, 11.331, 0.98)
pt3dadd(87.01, 37.492, 11.331, 0.956)
pt3dadd(86.956, 37.385, 11.331, 0.932)
pt3dadd(86.902, 37.278, 11.331, 0.906)
pt3dadd(86.849, 37.17, 11.331, 0.882)
pt3dadd(86.795, 37.063, 11.331, 0.858)
pt3dadd(86.741, 36.956, 11.331, 0.832)
pt3dadd(86.687, 36.849, 11.331, 0.808)
pt3dadd(86.634, 36.741, 11.331, 0.784)
pt3dadd(86.581, 36.633, 11.331, 0.748)
pt3dadd(86.53, 36.525, 11.331, 0.71)
pt3dadd(86.478, 36.416, 11.331, 0.67)
pt3dadd(86.427, 36.308, 11.331, 0.632)
pt3dadd(86.375, 36.2, 11.331, 0.592)
pt3dadd(86.324, 36.091, 11.331, 0.554)
pt3dadd(86.272, 35.983, 11.331, 0.514)
pt3dadd(86.221, 35.875, 11.331, 0.474)
pt3dadd(86.169, 35.766, 11.331, 0.436)
pt3dadd(86.118, 35.658, 11.331, 0.396)
pt3dadd(86.076, 35.546, 11.331, 0.374)
pt3dadd(86.037, 35.432, 11.331, 0.358)
pt3dadd(85.999, 35.318, 11.331, 0.342)
pt3dadd(85.961, 35.204, 11.331, 0.326)
pt3dadd(85.923, 35.091, 11.331, 0.31)
pt3dadd(85.884, 34.977, 11.331, 0.294)
pt3dadd(85.846, 34.863, 11.331, 0.278)
pt3dadd(85.808, 34.749, 11.331, 0.262)
pt3dadd(85.769, 34.636, 11.331, 0.246)
pt3dadd(85.731, 34.522, 11.331, 0.23)
pt3dadd(85.697, 34.407, 11.331, 0.226)
pt3dadd(85.664, 34.292, 11.331, 0.226)
pt3dadd(85.631, 34.176, 11.331, 0.226)
pt3dadd(85.598, 34.061, 11.331, 0.226)
pt3dadd(85.565, 33.946, 11.331, 0.226)
pt3dadd(85.532, 33.83, 11.331, 0.226)
pt3dadd(85.499, 33.715, 11.331, 0.226)
pt3dadd(85.466, 33.6, 11.331, 0.226)
pt3dadd(85.433, 33.484, 11.331, 0.226)
pt3dadd(85.4, 33.369, 11.331, 0.226)
pt3dadd(85.35, 33.26, 11.331, 0.238)
pt3dadd(85.294, 33.154, 11.331, 0.254)
pt3dadd(85.239, 33.047, 11.331, 0.272)
pt3dadd(85.183, 32.941, 11.331, 0.288)
pt3dadd(85.128, 32.835, 11.331, 0.306)
pt3dadd(85.072, 32.728, 11.331, 0.322)
pt3dadd(85.016, 32.622, 11.331, 0.338)
pt3dadd(84.96, 32.516, 11.331, 0.356)
pt3dadd(84.905, 32.409, 11.331, 0.372)
pt3dadd(84.849, 32.303, 11.331, 0.388)
pt3dadd(84.792, 32.198, 11.331, 0.388)
pt3dadd(84.735, 32.092, 11.331, 0.382)
pt3dadd(84.678, 31.987, 11.331, 0.374)
pt3dadd(84.62, 31.881, 11.331, 0.368)
}
}
proc shape3d_66() {
dend_7[57] { pt3dadd(84.563, 31.776, 11.331, 0.36)
pt3dadd(84.506, 31.671, 11.331, 0.354)
pt3dadd(84.448, 31.565, 11.331, 0.348)
pt3dadd(84.391, 31.46, 11.331, 0.34)
pt3dadd(84.333, 31.354, 11.331, 0.334)
pt3dadd(84.276, 31.249, 11.331, 0.326)
pt3dadd(84.211, 31.148, 11.331, 0.332)
pt3dadd(84.143, 31.05, 11.331, 0.34)
pt3dadd(84.075, 30.951, 11.331, 0.348)
pt3dadd(84.007, 30.852, 11.331, 0.356)
pt3dadd(83.938, 30.753, 11.331, 0.364)
pt3dadd(83.87, 30.654, 11.331, 0.372)
pt3dadd(83.802, 30.555, 11.331, 0.382)
pt3dadd(83.734, 30.457, 11.331, 0.39)
pt3dadd(83.666, 30.358, 11.331, 0.398)
pt3dadd(83.598, 30.259, 11.331, 0.406)
pt3dadd(83.513, 30.175, 11.331, 0.422)
pt3dadd(83.424, 30.095, 11.331, 0.44)
pt3dadd(83.334, 30.015, 11.331, 0.456)
pt3dadd(83.245, 29.935, 11.331, 0.474)
pt3dadd(83.155, 29.855, 11.331, 0.49)
pt3dadd(83.066, 29.775, 11.331, 0.508)
pt3dadd(82.977, 29.695, 11.331, 0.526)
pt3dadd(82.887, 29.615, 11.331, 0.542)
pt3dadd(82.798, 29.535, 11.331, 0.56)
pt3dadd(82.709, 29.454, 11.331, 0.578)
pt3dadd(82.599, 29.406, 11.331, 0.542)
pt3dadd(82.489, 29.357, 11.331, 0.506)
pt3dadd(82.38, 29.308, 11.331, 0.472)
pt3dadd(82.27, 29.26, 11.331, 0.436)
pt3dadd(82.16, 29.211, 11.331, 0.402)
pt3dadd(82.051, 29.162, 11.331, 0.366)
pt3dadd(81.941, 29.113, 11.331, 0.332)
pt3dadd(81.831, 29.065, 11.331, 0.296)
pt3dadd(81.722, 29.016, 11.331, 0.262)
pt3dadd(81.612, 28.967, 11.331, 0.226)
}
dend_7[58] {pt3dclear()
pt3dadd(121.82, 62.522, 3.379, 0.882)
pt3dadd(121.844, 62.473, 3.378, 0.878)
pt3dadd(121.852, 62.342, 3.406, 0.85)
pt3dadd(121.861, 62.211, 3.434, 0.824)
pt3dadd(121.871, 62.08, 3.461, 0.796)
pt3dadd(121.879, 61.948, 3.489, 0.768)
pt3dadd(121.889, 61.817, 3.517, 0.74)
pt3dadd(121.898, 61.686, 3.545, 0.712)
pt3dadd(121.907, 61.554, 3.572, 0.684)
pt3dadd(121.918, 61.419, 3.567, 0.678)
pt3dadd(121.93, 61.284, 3.553, 0.678)
pt3dadd(121.942, 61.148, 3.538, 0.678)
pt3dadd(121.954, 61.012, 3.523, 0.678)
pt3dadd(121.964, 60.876, 3.509, 0.678)
pt3dadd(121.976, 60.74, 3.494, 0.678)
pt3dadd(121.988, 60.607, 3.468, 0.678)
pt3dadd(122, 60.478, 3.431, 0.678)
pt3dadd(122.012, 60.348, 3.394, 0.678)
pt3dadd(122.024, 60.219, 3.357, 0.678)
pt3dadd(122.035, 60.089, 3.32, 0.678)
pt3dadd(122.047, 59.96, 3.285, 0.678)
pt3dadd(122.053, 59.823, 3.277, 0.678)
pt3dadd(122.058, 59.686, 3.27, 0.678)
pt3dadd(122.064, 59.55, 3.262, 0.678)
pt3dadd(122.069, 59.413, 3.255, 0.678)
pt3dadd(122.075, 59.277, 3.247, 0.678)
pt3dadd(122.081, 59.14, 3.239, 0.678)
pt3dadd(122.082, 59.004, 3.236, 0.678)
pt3dadd(122.081, 58.868, 3.233, 0.678)
pt3dadd(122.081, 58.732, 3.231, 0.678)
pt3dadd(122.078, 58.595, 3.229, 0.678)
pt3dadd(122.09, 58.578, 3.226, 0.678)
pt3dadd(122.09, 58.442, 3.224, 0.678)
pt3dadd(122.089, 58.306, 3.222, 0.678)
pt3dadd(122.083, 58.171, 3.219, 0.678)
pt3dadd(122.068, 58.037, 3.217, 0.678)
pt3dadd(122.052, 57.903, 3.215, 0.678)
pt3dadd(122.036, 57.77, 3.212, 0.678)
pt3dadd(122.021, 57.636, 3.21, 0.678)
pt3dadd(122.005, 57.502, 3.208, 0.678)
pt3dadd(121.963, 57.383, 3.206, 0.678)
pt3dadd(121.892, 57.277, 3.203, 0.678)
pt3dadd(121.824, 57.172, 3.201, 0.678)
pt3dadd(121.756, 57.066, 3.199, 0.678)
pt3dadd(121.686, 56.961, 3.196, 0.678)
pt3dadd(121.621, 56.852, 3.194, 0.678)
pt3dadd(121.556, 56.742, 3.192, 0.678)
pt3dadd(121.484, 56.641, 3.192, 0.678)
pt3dadd(121.4, 56.553, 3.195, 0.678)
pt3dadd(121.342, 56.452, 3.209, 0.678)
pt3dadd(121.336, 56.325, 3.244, 0.678)
pt3dadd(121.328, 56.196, 3.27, 0.678)
pt3dadd(121.325, 56.061, 3.272, 0.678)
pt3dadd(121.321, 55.925, 3.274, 0.678)
pt3dadd(121.298, 55.794, 3.273, 0.678)
pt3dadd(121.272, 55.664, 3.271, 0.678)
pt3dadd(121.28, 55.527, 3.269, 0.678)
pt3dadd(121.288, 55.39, 3.266, 0.678)
pt3dadd(121.29, 55.254, 3.264, 0.678)
pt3dadd(121.282, 55.119, 3.262, 0.678)
pt3dadd(121.273, 54.984, 3.26, 0.678)
pt3dadd(121.202, 54.901, 3.257, 0.678)
pt3dadd(121.102, 54.845, 3.255, 0.678)
pt3dadd(121.002, 54.782, 3.253, 0.678)
pt3dadd(120.911, 54.704, 3.25, 0.678)
pt3dadd(120.826, 54.621, 3.248, 0.678)
pt3dadd(120.792, 54.493, 3.246, 0.678)
pt3dadd(120.76, 54.365, 3.243, 0.678)
pt3dadd(120.726, 54.237, 3.241, 0.678)
pt3dadd(120.704, 54.106, 3.239, 0.678)
pt3dadd(120.716, 53.969, 3.236, 0.678)
pt3dadd(120.728, 53.832, 3.234, 0.678)
pt3dadd(120.74, 53.696, 3.228, 0.678)
pt3dadd(120.752, 53.562, 3.206, 0.678)
pt3dadd(120.763, 53.432, 3.171, 0.678)
pt3dadd(120.775, 53.302, 3.136, 0.678)
pt3dadd(120.787, 53.165, 3.13, 0.678)
pt3dadd(120.799, 53.028, 3.124, 0.678)
pt3dadd(120.809, 52.891, 3.118, 0.678)
pt3dadd(120.806, 52.755, 3.116, 0.678)
pt3dadd(120.803, 52.619, 3.113, 0.678)
pt3dadd(120.77, 52.497, 3.111, 0.678)
pt3dadd(120.701, 52.393, 3.109, 0.678)
pt3dadd(120.629, 52.289, 3.107, 0.678)
pt3dadd(120.557, 52.187, 3.104, 0.678)
pt3dadd(120.522, 52.061, 3.102, 0.678)
pt3dadd(120.492, 51.931, 3.1, 0.678)
pt3dadd(120.462, 51.802, 3.097, 0.678)
pt3dadd(120.432, 51.672, 3.095, 0.678)
pt3dadd(120.403, 51.543, 3.093, 0.678)
pt3dadd(120.385, 51.411, 3.09, 0.678)
pt3dadd(120.382, 51.274, 3.088, 0.678)
pt3dadd(120.379, 51.139, 3.086, 0.678)
pt3dadd(120.388, 51.002, 3.083, 0.678)
pt3dadd(120.4, 50.865, 3.081, 0.678)
pt3dadd(120.412, 50.728, 3.079, 0.678)
pt3dadd(120.422, 50.595, 3.055, 0.678)
pt3dadd(120.434, 50.463, 3.026, 0.678)
pt3dadd(120.426, 50.335, 3, 0.678)
pt3dadd(120.377, 50.217, 2.98, 0.678)
pt3dadd(120.307, 50.124, 2.964, 0.678)
pt3dadd(120.204, 50.076, 2.953, 0.678)
pt3dadd(120.101, 50.028, 2.942, 0.678)
pt3dadd(119.997, 49.979, 2.931, 0.678)
pt3dadd(119.907, 49.945, 2.889, 0.678)
pt3dadd(119.828, 49.921, 2.822, 0.678)
pt3dadd(119.753, 49.858, 2.78, 0.678)
pt3dadd(119.684, 49.754, 2.765, 0.678)
pt3dadd(119.614, 49.651, 2.75, 0.678)
pt3dadd(119.556, 49.536, 2.747, 0.678)
pt3dadd(119.5, 49.421, 2.744, 0.678)
pt3dadd(119.439, 49.309, 2.742, 0.678)
pt3dadd(119.417, 49.177, 2.735, 0.678)
pt3dadd(119.394, 49.045, 2.728, 0.678)
pt3dadd(119.334, 48.968, 2.682, 0.678)
pt3dadd(119.258, 48.914, 2.619, 0.678)
pt3dadd(119.241, 48.847, 2.532, 0.678)
pt3dadd(119.233, 48.777, 2.441, 0.678)
pt3dadd(119.242, 48.675, 2.371, 0.678)
pt3dadd(119.254, 48.567, 2.303, 0.678)
}
dend_7[59] {pt3dclear()
pt3dadd(119.254, 48.567, 2.303, 0.678)
pt3dadd(119.242, 48.512, 2.226, 0.678)
}
dend_7[60] {pt3dclear()
pt3dadd(119.254, 48.567, 2.303, 0.678)
pt3dadd(119.16, 48.494, 2.301, 0.692)
pt3dadd(119.065, 48.421, 2.299, 0.706)
pt3dadd(118.971, 48.348, 2.296, 0.72)
pt3dadd(118.876, 48.275, 2.294, 0.734)
pt3dadd(118.782, 48.202, 2.292, 0.748)
pt3dadd(118.709, 48.104, 2.289, 0.762)
pt3dadd(118.65, 47.991, 2.287, 0.778)
pt3dadd(118.591, 47.877, 2.285, 0.794)
pt3dadd(118.532, 47.763, 2.282, 0.808)
pt3dadd(118.473, 47.65, 2.28, 0.824)
pt3dadd(118.485, 47.633, 2.278, 0.824)
pt3dadd(118.403, 47.544, 2.276, 0.842)
pt3dadd(118.311, 47.469, 2.273, 0.86)
pt3dadd(118.218, 47.393, 2.271, 0.878)
pt3dadd(118.125, 47.317, 2.269, 0.898)
pt3dadd(118.032, 47.241, 2.266, 0.916)
pt3dadd(117.946, 47.157, 2.264, 0.936)
pt3dadd(117.872, 47.056, 2.262, 0.956)
pt3dadd(117.798, 46.955, 2.259, 0.976)
pt3dadd(117.725, 46.854, 2.257, 0.996)
pt3dadd(117.651, 46.752, 2.255, 1.016)
pt3dadd(117.571, 46.66, 2.253, 1.036)
pt3dadd(117.478, 46.585, 2.25, 1.056)
pt3dadd(117.385, 46.509, 2.248, 1.074)
pt3dadd(117.292, 46.433, 2.246, 1.092)
pt3dadd(117.2, 46.358, 2.243, 1.112)
pt3dadd(117.108, 46.281, 2.241, 1.13)
pt3dadd(117.12, 46.264, 2.239, 1.13)
pt3dadd(117.09, 46.134, 2.236, 1.142)
pt3dadd(117.059, 46.005, 2.234, 1.152)
pt3dadd(117.011, 45.885, 2.232, 1.156)
pt3dadd(116.959, 45.767, 2.23, 1.156)
pt3dadd(116.882, 45.673, 2.227, 1.148)
pt3dadd(116.793, 45.591, 2.225, 1.136)
pt3dadd(116.697, 45.523, 2.223, 1.13)
pt3dadd(116.593, 45.474, 2.22, 1.13)
pt3dadd(116.49, 45.424, 2.218, 1.13)
pt3dadd(116.393, 45.357, 2.216, 1.13)
pt3dadd(116.296, 45.291, 2.213, 1.124)
pt3dadd(116.192, 45.241, 2.211, 1.106)
pt3dadd(116.088, 45.192, 2.209, 1.086)
}
}
proc shape3d_67() {
dend_7[60] { pt3dadd(115.992, 45.125, 2.206, 1.05)
pt3dadd(115.899, 45.05, 2.204, 1.006)
pt3dadd(115.827, 44.956, 2.202, 0.956)
pt3dadd(115.789, 44.829, 2.2, 0.9)
pt3dadd(115.75, 44.704, 2.197, 0.854)
pt3dadd(115.704, 44.582, 2.195, 0.854)
pt3dadd(115.657, 44.461, 2.193, 0.856)
pt3dadd(115.568, 44.38, 2.19, 0.906)
pt3dadd(115.493, 44.283, 2.188, 0.942)
pt3dadd(115.431, 44.171, 2.186, 0.968)
pt3dadd(115.369, 44.06, 2.183, 0.994)
pt3dadd(115.307, 43.948, 2.181, 1.02)
pt3dadd(115.244, 43.837, 2.179, 1.044)
pt3dadd(115.164, 43.747, 2.177, 1.06)
pt3dadd(115.071, 43.671, 2.174, 1.07)
pt3dadd(114.978, 43.595, 2.172, 1.08)
pt3dadd(114.885, 43.52, 2.17, 1.088)
pt3dadd(114.793, 43.444, 2.167, 1.098)
pt3dadd(114.705, 43.362, 2.165, 1.114)
pt3dadd(114.631, 43.261, 2.163, 1.15)
pt3dadd(114.558, 43.159, 2.16, 1.182)
pt3dadd(114.484, 43.058, 2.158, 1.194)
pt3dadd(114.411, 42.956, 2.156, 1.206)
pt3dadd(114.306, 42.912, 2.154, 1.196)
pt3dadd(114.201, 42.868, 2.151, 1.186)
pt3dadd(114.1, 42.83, 2.133, 1.162)
pt3dadd(114.009, 42.802, 2.08, 1.106)
pt3dadd(113.925, 42.766, 2.025, 1.05)
pt3dadd(113.895, 42.667, 1.959, 1.016)
pt3dadd(113.866, 42.568, 1.892, 0.982)
pt3dadd(113.824, 42.475, 1.837, 0.95)
pt3dadd(113.727, 42.406, 1.835, 0.928)
pt3dadd(113.631, 42.338, 1.833, 0.908)
pt3dadd(113.539, 42.26, 1.83, 0.904)
pt3dadd(113.445, 42.187, 1.828, 0.904)
pt3dadd(113.351, 42.114, 1.826, 0.904)
pt3dadd(113.256, 42.041, 1.824, 0.904)
pt3dadd(113.162, 41.969, 1.821, 0.904)
pt3dadd(113.067, 41.896, 1.819, 0.904)
pt3dadd(112.964, 41.852, 1.817, 0.912)
pt3dadd(112.857, 41.821, 1.814, 0.922)
pt3dadd(112.749, 41.789, 1.812, 0.934)
pt3dadd(112.642, 41.758, 1.81, 0.944)
pt3dadd(112.535, 41.727, 1.807, 0.956)
pt3dadd(112.427, 41.695, 1.805, 0.966)
pt3dadd(112.32, 41.664, 1.803, 0.978)
pt3dadd(112.215, 41.619, 1.801, 0.996)
pt3dadd(112.112, 41.57, 1.798, 1.016)
pt3dadd(112.008, 41.521, 1.796, 1.038)
pt3dadd(111.904, 41.472, 1.794, 1.058)
pt3dadd(111.8, 41.423, 1.791, 1.078)
pt3dadd(111.696, 41.374, 1.789, 1.1)
pt3dadd(111.598, 41.31, 1.787, 1.126)
pt3dadd(111.502, 41.24, 1.784, 1.152)
pt3dadd(111.406, 41.17, 1.782, 1.18)
pt3dadd(111.311, 41.1, 1.78, 1.208)
pt3dadd(111.215, 41.03, 1.778, 1.236)
pt3dadd(111.121, 40.957, 1.775, 1.258)
pt3dadd(111.031, 40.875, 1.773, 1.262)
pt3dadd(110.942, 40.794, 1.771, 1.266)
pt3dadd(110.853, 40.713, 1.768, 1.272)
pt3dadd(110.763, 40.631, 1.766, 1.276)
pt3dadd(110.675, 40.549, 1.764, 1.28)
pt3dadd(110.601, 40.448, 1.761, 1.264)
pt3dadd(110.527, 40.346, 1.759, 1.25)
pt3dadd(110.454, 40.245, 1.757, 1.234)
pt3dadd(110.38, 40.144, 1.754, 1.22)
pt3dadd(110.311, 40.04, 1.752, 1.202)
pt3dadd(110.296, 39.906, 1.75, 1.17)
pt3dadd(110.28, 39.773, 1.748, 1.14)
pt3dadd(110.249, 39.645, 1.745, 1.13)
pt3dadd(110.211, 39.518, 1.743, 1.13)
pt3dadd(110.148, 39.412, 1.741, 1.154)
pt3dadd(110.064, 39.324, 1.738, 1.2)
pt3dadd(109.977, 39.238, 1.736, 1.238)
pt3dadd(109.888, 39.157, 1.734, 1.26)
pt3dadd(109.797, 39.078, 1.731, 1.28)
pt3dadd(109.695, 39.026, 1.729, 1.28)
pt3dadd(109.599, 38.958, 1.727, 1.274)
pt3dadd(109.516, 38.868, 1.725, 1.26)
pt3dadd(109.433, 38.778, 1.722, 1.246)
pt3dadd(109.35, 38.688, 1.72, 1.23)
pt3dadd(109.266, 38.598, 1.718, 1.216)
pt3dadd(109.185, 38.505, 1.715, 1.204)
pt3dadd(109.109, 38.406, 1.713, 1.198)
pt3dadd(109.033, 38.308, 1.711, 1.194)
pt3dadd(108.957, 38.209, 1.708, 1.188)
pt3dadd(108.881, 38.111, 1.706, 1.184)
pt3dadd(108.798, 38.021, 1.704, 1.178)
pt3dadd(108.703, 37.951, 1.701, 1.174)
pt3dadd(108.607, 37.881, 1.699, 1.17)
pt3dadd(108.511, 37.811, 1.697, 1.166)
pt3dadd(108.415, 37.741, 1.695, 1.16)
pt3dadd(108.319, 37.671, 1.692, 1.156)
pt3dadd(108.229, 37.591, 1.69, 1.152)
pt3dadd(108.14, 37.51, 1.688, 1.146)
pt3dadd(108.05, 37.428, 1.685, 1.142)
pt3dadd(107.961, 37.347, 1.683, 1.136)
pt3dadd(107.872, 37.266, 1.681, 1.132)
pt3dadd(107.78, 37.188, 1.678, 1.124)
pt3dadd(107.687, 37.112, 1.676, 1.114)
pt3dadd(107.595, 37.036, 1.674, 1.106)
pt3dadd(107.502, 36.961, 1.672, 1.096)
pt3dadd(107.513, 36.944, 1.669, 1.096)
pt3dadd(107.421, 36.868, 1.667, 1.086)
pt3dadd(107.33, 36.789, 1.665, 1.08)
pt3dadd(107.245, 36.702, 1.662, 1.08)
pt3dadd(107.159, 36.614, 1.66, 1.08)
pt3dadd(107.074, 36.527, 1.658, 1.08)
pt3dadd(106.989, 36.44, 1.655, 1.08)
pt3dadd(107, 36.423, 1.653, 1.08)
pt3dadd(106.912, 36.342, 1.651, 1.082)
pt3dadd(106.808, 36.291, 1.649, 1.09)
pt3dadd(106.705, 36.24, 1.646, 1.098)
pt3dadd(106.602, 36.189, 1.644, 1.106)
pt3dadd(106.499, 36.137, 1.642, 1.114)
pt3dadd(106.396, 36.086, 1.639, 1.124)
pt3dadd(106.294, 36.031, 1.637, 1.132)
pt3dadd(106.197, 35.964, 1.635, 1.14)
pt3dadd(106.099, 35.897, 1.632, 1.15)
pt3dadd(106.002, 35.83, 1.63, 1.16)
pt3dadd(105.905, 35.763, 1.628, 1.168)
pt3dadd(105.808, 35.696, 1.625, 1.178)
pt3dadd(105.723, 35.609, 1.623, 1.176)
pt3dadd(105.645, 35.513, 1.621, 1.172)
pt3dadd(105.566, 35.418, 1.619, 1.166)
pt3dadd(105.487, 35.322, 1.616, 1.162)
pt3dadd(105.409, 35.226, 1.614, 1.156)
pt3dadd(105.332, 35.129, 1.612, 1.148)
pt3dadd(105.255, 35.03, 1.609, 1.138)
pt3dadd(105.179, 34.932, 1.607, 1.128)
pt3dadd(105.103, 34.833, 1.605, 1.118)
pt3dadd(105.027, 34.734, 1.602, 1.108)
pt3dadd(104.946, 34.641, 1.6, 1.096)
pt3dadd(104.863, 34.551, 1.598, 1.08)
pt3dadd(104.78, 34.461, 1.596, 1.066)
pt3dadd(104.696, 34.371, 1.593, 1.05)
pt3dadd(104.613, 34.281, 1.591, 1.036)
pt3dadd(104.549, 34.174, 1.589, 1.03)
pt3dadd(104.499, 34.054, 1.586, 1.03)
pt3dadd(104.449, 33.934, 1.584, 1.03)
pt3dadd(104.4, 33.814, 1.582, 1.03)
pt3dadd(104.35, 33.694, 1.579, 1.03)
pt3dadd(104.28, 33.593, 1.577, 1.032)
pt3dadd(104.194, 33.506, 1.575, 1.038)
pt3dadd(104.109, 33.418, 1.573, 1.042)
pt3dadd(104.024, 33.331, 1.57, 1.048)
pt3dadd(103.938, 33.244, 1.568, 1.052)
pt3dadd(103.85, 33.162, 1.566, 1.062)
pt3dadd(103.861, 33.145, 1.563, 1.062)
pt3dadd(103.768, 33.069, 1.561, 1.076)
pt3dadd(103.676, 32.994, 1.559, 1.09)
pt3dadd(103.583, 32.918, 1.556, 1.104)
pt3dadd(103.49, 32.842, 1.554, 1.118)
pt3dadd(103.399, 32.764, 1.552, 1.132)
pt3dadd(103.323, 32.665, 1.549, 1.146)
pt3dadd(103.247, 32.567, 1.547, 1.162)
pt3dadd(103.171, 32.468, 1.545, 1.178)
pt3dadd(103.095, 32.37, 1.543, 1.192)
pt3dadd(103.016, 32.275, 1.54, 1.206)
pt3dadd(102.916, 32.214, 1.538, 1.216)
pt3dadd(102.816, 32.152, 1.536, 1.228)
pt3dadd(102.735, 32.063, 1.533, 1.222)
pt3dadd(102.661, 31.962, 1.531, 1.21)
pt3dadd(102.59, 31.859, 1.526, 1.192)
pt3dadd(102.519, 31.755, 1.518, 1.168)
pt3dadd(102.489, 31.639, 1.495, 1.16)
pt3dadd(102.5, 31.51, 1.457, 1.172)
pt3dadd(102.496, 31.382, 1.428, 1.198)
pt3dadd(102.462, 31.255, 1.418, 1.252)
pt3dadd(102.401, 31.143, 1.415, 1.27)
pt3dadd(102.339, 31.031, 1.413, 1.286)
pt3dadd(102.276, 30.92, 1.41, 1.3)
pt3dadd(102.214, 30.809, 1.408, 1.316)
pt3dadd(102.152, 30.697, 1.406, 1.33)
pt3dadd(102.067, 30.609, 1.403, 1.32)
pt3dadd(101.983, 30.521, 1.401, 1.308)
pt3dadd(101.889, 30.447, 1.395, 1.26)
pt3dadd(101.793, 30.377, 1.388, 1.206)
pt3dadd(101.709, 30.32, 1.348, 1.13)
pt3dadd(101.633, 30.273, 1.282, 1.038)
pt3dadd(101.604, 30.201, 1.206, 0.94)
pt3dadd(101.602, 30.114, 1.124, 0.836)
pt3dadd(101.568, 30.016, 1.062, 0.768)
pt3dadd(101.52, 29.915, 1.01, 0.716)
pt3dadd(101.471, 29.813, 0.958, 0.664)
pt3dadd(101.392, 29.737, 0.917, 0.612)
pt3dadd(101.304, 29.667, 0.88, 0.56)
pt3dadd(101.215, 29.587, 0.873, 0.556)
pt3dadd(101.126, 29.506, 0.871, 0.578)
pt3dadd(101.037, 29.424, 0.869, 0.6)
pt3dadd(100.956, 29.331, 0.867, 0.602)
pt3dadd(100.876, 29.236, 0.864, 0.602)
pt3dadd(100.809, 29.13, 0.866, 0.576)
pt3dadd(100.745, 29.02, 0.869, 0.538)
pt3dadd(100.703, 28.953, 0.93, 0.484)
pt3dadd(100.671, 28.904, 1.017, 0.422)
pt3dadd(100.648, 28.802, 1.066, 0.39)
pt3dadd(100.629, 28.677, 1.098, 0.376)
pt3dadd(100.611, 28.552, 1.131, 0.36)
}
}
proc shape3d_68() {
dend_7[60] { pt3dadd(100.553, 28.455, 1.143, 0.362)
pt3dadd(100.457, 28.385, 1.136, 0.386)
pt3dadd(100.365, 28.318, 1.117, 0.422)
pt3dadd(100.285, 28.259, 1.061, 0.502)
pt3dadd(100.209, 28.233, 0.992, 0.612)
pt3dadd(100.146, 28.209, 0.911, 0.608)
pt3dadd(100.12, 28.188, 0.815, 0.526)
pt3dadd(100.12, 28.17, 0.714, 0.506)
pt3dadd(100.128, 28.148, 0.612, 0.53)
pt3dadd(100.116, 28.106, 0.514, 0.544)
pt3dadd(100.105, 28.063, 0.416, 0.56)
pt3dadd(100.093, 28.02, 0.318, 0.574)
pt3dadd(100.081, 27.977, 0.22, 0.588)
pt3dadd(100.068, 27.931, 0.124, 0.604)
pt3dadd(100.036, 27.841, 0.051, 0.622)
pt3dadd(100.003, 27.752, -0.021, 0.64)
pt3dadd(99.97, 27.662, -0.094, 0.658)
pt3dadd(99.938, 27.572, -0.166, 0.676)
pt3dadd(99.904, 27.497, -0.248, 0.716)
pt3dadd(99.864, 27.423, -0.325, 0.756)
pt3dadd(99.787, 27.345, -0.37, 0.784)
pt3dadd(99.702, 27.274, -0.403, 0.8)
pt3dadd(99.6, 27.219, -0.405, 0.79)
pt3dadd(99.498, 27.163, -0.407, 0.78)
pt3dadd(99.472, 27.045, -0.398, 0.752)
pt3dadd(99.466, 26.911, -0.385, 0.718)
pt3dadd(99.454, 26.814, -0.33, 0.684)
pt3dadd(99.438, 26.745, -0.246, 0.654)
pt3dadd(99.422, 26.675, -0.162, 0.622)
pt3dadd(99.411, 26.605, -0.076, 0.598)
pt3dadd(99.406, 26.536, 0.011, 0.584)
pt3dadd(99.382, 26.472, 0.011, 0.578)
pt3dadd(99.346, 26.429, -0.078, 0.602)
pt3dadd(99.324, 26.397, -0.175, 0.67)
pt3dadd(99.26, 26.319, -0.226, 0.74)
pt3dadd(99.204, 26.205, -0.235, 0.754)
pt3dadd(99.188, 26.072, -0.237, 0.782)
pt3dadd(99.15, 25.946, -0.239, 0.804)
pt3dadd(99.113, 25.82, -0.242, 0.828)
pt3dadd(99.033, 25.729, -0.26, 0.864)
pt3dadd(98.95, 25.641, -0.279, 0.902)
pt3dadd(98.925, 25.515, -0.306, 0.932)
pt3dadd(98.902, 25.388, -0.334, 0.96)
pt3dadd(98.891, 25.257, -0.353, 0.992)
pt3dadd(98.9, 25.12, -0.355, 1.03)
pt3dadd(98.91, 24.983, -0.358, 1.066)
pt3dadd(98.929, 24.847, -0.36, 1.16)
pt3dadd(98.95, 24.71, -0.362, 1.234)
pt3dadd(98.97, 24.574, -0.365, 1.276)
pt3dadd(98.99, 24.437, -0.367, 1.32)
pt3dadd(98.964, 24.309, -0.373, 1.348)
pt3dadd(98.923, 24.185, -0.381, 1.372)
pt3dadd(98.867, 24.081, -0.414, 1.354)
pt3dadd(98.803, 23.987, -0.461, 1.31)
pt3dadd(98.72, 23.901, -0.477, 1.25)
pt3dadd(98.634, 23.815, -0.49, 1.19)
pt3dadd(98.57, 23.723, -0.535, 1.09)
pt3dadd(98.496, 23.629, -0.557, 1.048)
pt3dadd(98.415, 23.536, -0.566, 1.038)
pt3dadd(98.335, 23.443, -0.575, 1.026)
pt3dadd(98.255, 23.349, -0.584, 1.016)
pt3dadd(98.174, 23.256, -0.594, 1.006)
pt3dadd(98.119, 23.144, -0.617, 0.994)
pt3dadd(98.068, 23.029, -0.642, 0.984)
pt3dadd(98.016, 22.914, -0.667, 0.972)
pt3dadd(97.965, 22.798, -0.692, 0.96)
pt3dadd(97.914, 22.681, -0.709, 0.95)
pt3dadd(97.863, 22.562, -0.719, 0.938)
pt3dadd(97.813, 22.443, -0.728, 0.928)
pt3dadd(97.762, 22.324, -0.737, 0.918)
pt3dadd(97.712, 22.205, -0.747, 0.908)
pt3dadd(97.647, 22.107, -0.779, 0.892)
pt3dadd(97.576, 22.017, -0.821, 0.874)
pt3dadd(97.506, 21.927, -0.864, 0.856)
pt3dadd(97.435, 21.837, -0.906, 0.838)
pt3dadd(97.356, 21.75, -0.927, 0.82)
pt3dadd(97.268, 21.666, -0.929, 0.806)
pt3dadd(97.181, 21.581, -0.931, 0.792)
pt3dadd(97.093, 21.497, -0.934, 0.776)
pt3dadd(97.006, 21.413, -0.936, 0.762)
pt3dadd(96.933, 21.316, -0.93, 0.752)
pt3dadd(96.945, 21.299, -0.932, 0.752)
pt3dadd(96.897, 21.182, -0.912, 0.746)
pt3dadd(96.85, 21.064, -0.892, 0.74)
pt3dadd(96.802, 20.947, -0.871, 0.734)
pt3dadd(96.754, 20.829, -0.851, 0.728)
pt3dadd(96.687, 20.727, -0.874, 0.728)
pt3dadd(96.618, 20.625, -0.899, 0.728)
pt3dadd(96.55, 20.523, -0.925, 0.728)
pt3dadd(96.482, 20.421, -0.95, 0.728)
pt3dadd(96.402, 20.329, -0.961, 0.732)
pt3dadd(96.315, 20.245, -0.964, 0.736)
pt3dadd(96.227, 20.161, -0.966, 0.74)
pt3dadd(96.14, 20.076, -0.968, 0.746)
pt3dadd(96.053, 19.992, -0.971, 0.75)
pt3dadd(95.966, 19.906, -0.973, 0.752)
pt3dadd(95.88, 19.819, -0.975, 0.746)
pt3dadd(95.795, 19.732, -0.978, 0.742)
pt3dadd(95.71, 19.644, -0.98, 0.736)
pt3dadd(95.624, 19.557, -0.982, 0.732)
pt3dadd(95.536, 19.48, -0.995, 0.726)
pt3dadd(95.442, 19.427, -1.032, 0.722)
pt3dadd(95.347, 19.373, -1.07, 0.716)
pt3dadd(95.359, 19.356, -1.072, 0.716)
pt3dadd(95.265, 19.303, -1.109, 0.71)
pt3dadd(95.17, 19.249, -1.147, 0.706)
pt3dadd(95.08, 19.199, -1.193, 0.69)
pt3dadd(94.993, 19.152, -1.246, 0.664)
pt3dadd(94.934, 19.06, -1.279, 0.63)
pt3dadd(94.896, 18.936, -1.298, 0.592)
pt3dadd(94.84, 18.822, -1.308, 0.55)
pt3dadd(94.773, 18.715, -1.31, 0.502)
pt3dadd(94.785, 18.698, -1.312, 0.502)
pt3dadd(94.751, 18.577, -1.314, 0.458)
pt3dadd(94.755, 18.44, -1.317, 0.42)
pt3dadd(94.759, 18.303, -1.319, 0.382)
pt3dadd(94.781, 18.167, -1.321, 0.388)
pt3dadd(94.806, 18.031, -1.324, 0.4)
pt3dadd(94.83, 17.895, -1.326, 0.414)
pt3dadd(94.854, 17.758, -1.328, 0.428)
pt3dadd(94.878, 17.622, -1.331, 0.444)
pt3dadd(94.903, 17.486, -1.333, 0.458)
pt3dadd(94.927, 17.35, -1.335, 0.472)
pt3dadd(94.951, 17.214, -1.337, 0.486)
pt3dadd(94.976, 17.077, -1.34, 0.5)
pt3dadd(94.971, 16.942, -1.342, 0.534)
pt3dadd(94.962, 16.807, -1.344, 0.57)
pt3dadd(94.953, 16.672, -1.347, 0.604)
pt3dadd(94.944, 16.537, -1.349, 0.64)
pt3dadd(94.934, 16.402, -1.351, 0.676)
pt3dadd(94.927, 16.267, -1.354, 0.714)
pt3dadd(94.925, 16.131, -1.356, 0.764)
pt3dadd(94.923, 15.994, -1.358, 0.814)
pt3dadd(94.909, 15.861, -1.357, 0.852)
pt3dadd(94.892, 15.728, -1.354, 0.886)
pt3dadd(94.888, 15.619, -1.315, 0.892)
pt3dadd(94.9, 15.538, -1.232, 0.868)
pt3dadd(94.923, 15.447, -1.16, 0.836)
pt3dadd(94.965, 15.336, -1.105, 0.784)
pt3dadd(95.034, 15.233, -1.074, 0.708)
pt3dadd(95.139, 15.141, -1.076, 0.602)
pt3dadd(95.259, 15.094, -1.044, 0.55)
pt3dadd(95.376, 15.042, -1.011, 0.498)
pt3dadd(95.464, 14.943, -0.976, 0.456)
pt3dadd(95.551, 14.845, -0.942, 0.418)
pt3dadd(95.639, 14.746, -0.907, 0.39)
pt3dadd(95.718, 14.636, -0.89, 0.36)
pt3dadd(95.787, 14.514, -0.893, 0.328)
pt3dadd(95.849, 14.389, -0.895, 0.298)
pt3dadd(95.88, 14.254, -0.897, 0.286)
pt3dadd(95.909, 14.118, -0.9, 0.276)
pt3dadd(95.933, 13.982, -0.902, 0.276)
pt3dadd(95.958, 13.846, -0.904, 0.276)
pt3dadd(95.982, 13.71, -0.907, 0.276)
pt3dadd(96.006, 13.574, -0.909, 0.276)
pt3dadd(96.031, 13.437, -0.911, 0.276)
pt3dadd(96.055, 13.301, -0.913, 0.276)
pt3dadd(96.079, 13.167, -0.927, 0.28)
pt3dadd(96.103, 13.038, -0.964, 0.288)
pt3dadd(96.126, 12.91, -1.001, 0.298)
pt3dadd(96.15, 12.781, -1.038, 0.306)
pt3dadd(96.173, 12.652, -1.075, 0.316)
pt3dadd(96.197, 12.523, -1.112, 0.326)
pt3dadd(96.242, 12.393, -1.127, 0.336)
pt3dadd(96.289, 12.262, -1.139, 0.348)
pt3dadd(96.337, 12.131, -1.152, 0.358)
pt3dadd(96.385, 12.001, -1.164, 0.37)
pt3dadd(96.426, 11.868, -1.172, 0.396)
pt3dadd(96.456, 11.733, -1.174, 0.44)
pt3dadd(96.493, 11.601, -1.184, 0.49)
pt3dadd(96.557, 11.485, -1.221, 0.556)
pt3dadd(96.627, 11.371, -1.241, 0.618)
pt3dadd(96.712, 11.263, -1.22, 0.67)
pt3dadd(96.78, 11.164, -1.178, 0.708)
pt3dadd(96.819, 11.081, -1.1, 0.72)
pt3dadd(96.855, 10.982, -1.036, 0.704)
pt3dadd(96.889, 10.862, -0.991, 0.65)
pt3dadd(96.969, 10.757, -0.957, 0.582)
pt3dadd(97.057, 10.664, -0.922, 0.512)
pt3dadd(97.173, 10.615, -0.882, 0.446)
pt3dadd(97.266, 10.54, -0.844, 0.384)
pt3dadd(97.315, 10.42, -0.807, 0.334)
pt3dadd(97.355, 10.293, -0.783, 0.294)
pt3dadd(97.38, 10.157, -0.782, 0.278)
pt3dadd(97.404, 10.021, -0.78, 0.26)
pt3dadd(97.428, 9.885, -0.78, 0.246)
pt3dadd(97.453, 9.749, -0.783, 0.232)
pt3dadd(97.477, 9.613, -0.785, 0.226)
pt3dadd(97.501, 9.476, -0.787, 0.226)
pt3dadd(97.526, 9.34, -0.789, 0.238)
pt3dadd(97.55, 9.204, -0.792, 0.274)
pt3dadd(97.574, 9.068, -0.8, 0.342)
pt3dadd(97.598, 8.94, -0.833, 0.434)
pt3dadd(97.618, 8.845, -0.909, 0.54)
pt3dadd(97.635, 8.775, -1.001, 0.628)
pt3dadd(97.651, 8.718, -1.097, 0.652)
pt3dadd(97.665, 8.683, -1.198, 0.608)
pt3dadd(97.677, 8.665, -1.3, 0.532)
pt3dadd(97.688, 8.648, -1.403, 0.504)
pt3dadd(97.7, 8.631, -1.505, 0.526)
}
}
proc shape3d_69() {
dend_7[60] { pt3dadd(97.713, 8.6, -1.606, 0.604)
pt3dadd(97.729, 8.546, -1.703, 0.66)
pt3dadd(97.746, 8.485, -1.798, 0.678)
pt3dadd(97.771, 8.448, -1.898, 0.678)
pt3dadd(97.837, 8.432, -1.986, 0.678)
pt3dadd(97.958, 8.398, -2.022, 0.678)
pt3dadd(98.078, 8.339, -2.012, 0.644)
pt3dadd(98.168, 8.297, -1.944, 0.546)
pt3dadd(98.236, 8.283, -1.859, 0.47)
pt3dadd(98.33, 8.275, -1.789, 0.4)
pt3dadd(98.451, 8.269, -1.763, 0.358)
pt3dadd(98.582, 8.265, -1.753, 0.33)
pt3dadd(98.712, 8.261, -1.743, 0.302)
pt3dadd(98.842, 8.224, -1.745, 0.292)
pt3dadd(98.972, 8.186, -1.747, 0.28)
pt3dadd(99.102, 8.148, -1.749, 0.294)
pt3dadd(99.231, 8.116, -1.74, 0.312)
pt3dadd(99.361, 8.085, -1.727, 0.328)
pt3dadd(99.491, 8.054, -1.714, 0.342)
pt3dadd(99.62, 8.023, -1.701, 0.358)
pt3dadd(99.75, 7.992, -1.688, 0.372)
pt3dadd(99.871, 7.944, -1.709, 0.388)
pt3dadd(99.985, 7.89, -1.737, 0.4)
pt3dadd(100.074, 7.858, -1.664, 0.386)
pt3dadd(100.177, 7.835, -1.61, 0.374)
pt3dadd(100.307, 7.831, -1.599, 0.364)
pt3dadd(100.437, 7.826, -1.588, 0.354)
pt3dadd(100.55, 7.82, -1.636, 0.362)
pt3dadd(100.66, 7.814, -1.695, 0.374)
pt3dadd(100.755, 7.808, -1.768, 0.386)
pt3dadd(100.842, 7.803, -1.847, 0.402)
pt3dadd(100.93, 7.798, -1.926, 0.416)
pt3dadd(101.017, 7.811, -1.988, 0.424)
pt3dadd(101.101, 7.89, -1.991, 0.412)
pt3dadd(101.184, 7.97, -1.993, 0.392)
pt3dadd(101.272, 8.044, -1.995, 0.3)
pt3dadd(101.377, 8.102, -1.998, 0.23)
}
dend_7[61] {pt3dclear()
pt3dadd(126.479, 67.645, 4.548, 1.53)
pt3dadd(126.65, 67.68, 4.515, 1.516)
pt3dadd(126.761, 67.747, 4.426, 1.472)
pt3dadd(126.871, 67.815, 4.337, 1.426)
pt3dadd(126.98, 67.882, 4.248, 1.382)
pt3dadd(127.09, 67.949, 4.159, 1.336)
pt3dadd(127.2, 68.016, 4.07, 1.29)
pt3dadd(127.309, 68.084, 3.981, 1.246)
pt3dadd(127.418, 68.151, 3.892, 1.2)
pt3dadd(127.529, 68.218, 3.804, 1.156)
pt3dadd(127.626, 68.26, 3.708, 1.13)
pt3dadd(127.709, 68.27, 3.603, 1.13)
pt3dadd(127.792, 68.279, 3.499, 1.13)
pt3dadd(127.873, 68.288, 3.395, 1.13)
pt3dadd(127.956, 68.297, 3.29, 1.13)
pt3dadd(128.039, 68.306, 3.186, 1.13)
pt3dadd(128.12, 68.315, 3.081, 1.13)
pt3dadd(128.203, 68.324, 2.977, 1.13)
pt3dadd(128.286, 68.334, 2.872, 1.13)
pt3dadd(128.368, 68.343, 2.768, 1.13)
pt3dadd(128.45, 68.352, 2.663, 1.13)
pt3dadd(128.532, 68.361, 2.559, 1.13)
pt3dadd(128.615, 68.37, 2.455, 1.13)
pt3dadd(128.698, 68.388, 2.351, 1.13)
pt3dadd(128.779, 68.418, 2.248, 1.13)
pt3dadd(128.862, 68.447, 2.145, 1.13)
pt3dadd(128.951, 68.531, 2.065, 1.13)
pt3dadd(129.038, 68.625, 1.99, 1.13)
pt3dadd(129.15, 68.727, 1.929, 1.13)
pt3dadd(129.268, 68.831, 1.87, 1.13)
pt3dadd(129.383, 68.935, 1.812, 1.13)
pt3dadd(129.476, 69.055, 1.777, 1.13)
pt3dadd(129.559, 69.181, 1.753, 1.13)
}
dend_7[62] {pt3dclear()
pt3dadd(129.559, 69.181, 1.753, 1.13)
pt3dadd(129.815, 69.211, 1.727, 0.678)
pt3dadd(129.732, 69.202, 1.731, 0.678)
pt3dadd(129.649, 69.193, 1.736, 0.678)
pt3dadd(129.568, 69.184, 1.74, 0.678)
pt3dadd(129.485, 69.175, 1.744, 0.678)
}
dend_7[63] {pt3dclear()
pt3dadd(129.559, 69.181, 1.753, 1.13)
pt3dadd(129.522, 69.178, 1.749, 0.87)
}
dend_7[64] {pt3dclear()
pt3dadd(129.559, 69.181, 1.753, 1.13)
pt3dadd(129.761, 69.203, 1.749, 1.256)
pt3dadd(129.962, 69.225, 1.744, 1.322)
pt3dadd(130.164, 69.246, 1.74, 1.39)
pt3dadd(130.366, 69.268, 1.736, 1.456)
pt3dadd(130.566, 69.29, 1.719, 1.448)
pt3dadd(130.768, 69.311, 1.702, 1.438)
pt3dadd(130.955, 69.331, 1.665, 1.402)
pt3dadd(131.112, 69.348, 1.582, 1.308)
pt3dadd(131.27, 69.366, 1.501, 1.208)
pt3dadd(131.437, 69.384, 1.426, 1.084)
pt3dadd(131.612, 69.402, 1.359, 1.048)
pt3dadd(131.79, 69.422, 1.294, 1.036)
pt3dadd(131.968, 69.441, 1.23, 1.026)
pt3dadd(132.145, 69.46, 1.165, 1.016)
pt3dadd(132.324, 69.479, 1.101, 1.006)
pt3dadd(132.51, 69.499, 1.048, 1.03)
pt3dadd(132.7, 69.52, 0.999, 1.064)
pt3dadd(132.857, 69.537, 0.925, 1.102)
pt3dadd(132.985, 69.551, 0.828, 1.146)
pt3dadd(133.104, 69.564, 0.73, 1.19)
pt3dadd(133.192, 69.573, 0.625, 1.234)
pt3dadd(133.278, 69.583, 0.521, 1.278)
pt3dadd(133.364, 69.592, 0.417, 1.324)
pt3dadd(133.452, 69.602, 0.312, 1.376)
pt3dadd(133.538, 69.612, 0.208, 1.428)
pt3dadd(133.648, 69.624, 0.108, 1.48)
pt3dadd(133.783, 69.638, 0.015, 1.534)
pt3dadd(133.92, 69.653, -0.079, 1.588)
pt3dadd(134.056, 69.668, -0.173, 1.642)
pt3dadd(134.212, 69.685, -0.255, 1.708)
pt3dadd(134.375, 69.702, -0.333, 1.78)
pt3dadd(134.506, 69.717, -0.425, 1.808)
pt3dadd(134.616, 69.729, -0.527, 1.808)
pt3dadd(134.728, 69.741, -0.629, 1.808)
pt3dadd(134.831, 69.752, -0.731, 1.792)
pt3dadd(134.917, 69.762, -0.836, 1.74)
pt3dadd(135.005, 69.771, -0.94, 1.688)
pt3dadd(135.113, 69.766, -1.037, 1.632)
pt3dadd(135.253, 69.727, -1.115, 1.602)
pt3dadd(135.376, 69.631, -1.152, 1.824)
pt3dadd(135.473, 69.533, -1.199, 2.014)
pt3dadd(135.566, 69.435, -1.248, 2.06)
pt3dadd(135.66, 69.338, -1.297, 2.118)
pt3dadd(135.754, 69.24, -1.347, 2.182)
pt3dadd(135.847, 69.143, -1.396, 2.238)
pt3dadd(135.942, 69.042, -1.438, 2.292)
pt3dadd(136.036, 68.938, -1.475, 2.346)
pt3dadd(136.128, 68.852, -1.527, 2.396)
pt3dadd(136.214, 68.822, -1.626, 2.438)
pt3dadd(136.301, 68.793, -1.725, 2.482)
pt3dadd(136.427, 68.757, -1.814, 2.522)
pt3dadd(136.558, 68.72, -1.902, 2.562)
pt3dadd(136.688, 68.68, -1.988, 2.624)
pt3dadd(136.82, 68.662, -2.08, 2.646)
pt3dadd(136.951, 68.649, -2.174, 2.66)
pt3dadd(137.126, 68.663, -2.2, 2.662)
}
dend_7[65] {pt3dclear()
pt3dadd(137.126, 68.663, -2.2, 2.662)
pt3dadd(137.158, 68.625, -2.228, 2.648)
pt3dadd(137.219, 68.548, -2.285, 2.62)
pt3dadd(137.258, 68.442, -2.3, 2.562)
pt3dadd(137.291, 68.327, -2.3, 2.494)
pt3dadd(137.327, 68.213, -2.302, 2.418)
pt3dadd(137.383, 68.109, -2.318, 2.298)
pt3dadd(137.442, 68.009, -2.337, 2.178)
pt3dadd(137.533, 67.968, -2.394, 2.084)
pt3dadd(137.623, 67.928, -2.45, 1.99)
pt3dadd(137.717, 67.89, -2.502, 1.894)
pt3dadd(137.832, 67.864, -2.517, 1.776)
pt3dadd(137.948, 67.838, -2.533, 1.66)
pt3dadd(138.037, 67.81, -2.587, 1.442)
pt3dadd(138.152, 67.795, -2.612, 1.408)
pt3dadd(138.268, 67.78, -2.637, 1.372)
pt3dadd(138.383, 67.765, -2.661, 1.336)
pt3dadd(138.498, 67.75, -2.686, 1.3)
pt3dadd(138.605, 67.734, -2.725, 1.278)
pt3dadd(138.702, 67.717, -2.783, 1.272)
pt3dadd(138.798, 67.7, -2.841, 1.266)
pt3dadd(138.894, 67.682, -2.899, 1.262)
pt3dadd(138.99, 67.665, -2.957, 1.256)
pt3dadd(139.103, 67.646, -2.987, 1.272)
pt3dadd(139.216, 67.626, -3.018, 1.288)
pt3dadd(139.328, 67.607, -3.048, 1.304)
pt3dadd(139.441, 67.588, -3.079, 1.32)
pt3dadd(139.55, 67.563, -3.112, 1.344)
pt3dadd(139.655, 67.524, -3.15, 1.392)
pt3dadd(139.758, 67.485, -3.189, 1.438)
pt3dadd(139.861, 67.446, -3.228, 1.484)
pt3dadd(139.966, 67.407, -3.266, 1.532)
pt3dadd(140.071, 67.418, -3.311, 1.566)
pt3dadd(140.178, 67.429, -3.356, 1.598)
pt3dadd(140.291, 67.441, -3.387, 1.63)
pt3dadd(140.406, 67.453, -3.415, 1.662)
pt3dadd(140.497, 67.455, -3.463, 1.692)
pt3dadd(140.537, 67.437, -3.556, 1.722)
pt3dadd(140.578, 67.419, -3.649, 1.752)
pt3dadd(140.617, 67.4, -3.742, 1.782)
pt3dadd(140.653, 67.373, -3.832, 1.806)
pt3dadd(140.663, 67.288, -3.903, 1.788)
pt3dadd(140.677, 67.205, -3.973, 1.764)
pt3dadd(140.694, 67.122, -4.044, 1.738)
pt3dadd(140.712, 67.038, -4.115, 1.71)
pt3dadd(140.729, 66.955, -4.185, 1.684)
pt3dadd(140.746, 66.872, -4.256, 1.658)
pt3dadd(140.8, 66.817, -4.332, 1.61)
pt3dadd(140.854, 66.762, -4.409, 1.562)
pt3dadd(140.908, 66.707, -4.486, 1.514)
pt3dadd(140.962, 66.652, -4.563, 1.466)
pt3dadd(140.98, 66.562, -4.623, 1.42)
pt3dadd(140.99, 66.464, -4.68, 1.372)
pt3dadd(141.043, 66.389, -4.737, 1.366)
pt3dadd(141.12, 66.327, -4.795, 1.38)
pt3dadd(141.224, 66.332, -4.841, 1.432)
pt3dadd(141.33, 66.343, -4.885, 1.488)
pt3dadd(141.439, 66.351, -4.928, 1.53)
pt3dadd(141.548, 66.356, -4.968, 1.564)
pt3dadd(141.655, 66.346, -5.01, 1.578)
pt3dadd(141.761, 66.318, -5.052, 1.57)
pt3dadd(141.866, 66.291, -5.094, 1.562)
pt3dadd(141.943, 66.258, -5.153, 1.544)
pt3dadd(141.967, 66.216, -5.244, 1.508)
pt3dadd(141.99, 66.18, -5.337, 1.474)
}
}
proc shape3d_70() {
dend_7[65] { pt3dadd(142.022, 66.166, -5.432, 1.48)
pt3dadd(142.069, 66.151, -5.523, 1.528)
pt3dadd(142.106, 66.103, -5.6, 1.588)
pt3dadd(142.129, 66.006, -5.655, 1.662)
pt3dadd(142.18, 65.917, -5.691, 1.746)
pt3dadd(142.273, 65.842, -5.696, 1.844)
pt3dadd(142.361, 65.762, -5.706, 1.934)
pt3dadd(142.44, 65.674, -5.723, 2.012)
pt3dadd(142.495, 65.592, -5.765, 2.074)
pt3dadd(142.514, 65.523, -5.845, 2.112)
pt3dadd(142.534, 65.453, -5.924, 2.15)
pt3dadd(142.552, 65.383, -6.004, 2.184)
pt3dadd(142.558, 65.33, -6.094, 2.184)
pt3dadd(142.564, 65.277, -6.183, 2.184)
pt3dadd(142.566, 65.254, -6.28, 2.094)
pt3dadd(142.588, 65.237, -6.377, 2.05)
pt3dadd(142.613, 65.219, -6.474, 2.012)
pt3dadd(142.638, 65.202, -6.571, 1.974)
pt3dadd(142.662, 65.184, -6.668, 1.936)
pt3dadd(142.687, 65.166, -6.764, 1.898)
pt3dadd(142.716, 65.128, -6.855, 1.862)
pt3dadd(142.748, 65.079, -6.942, 1.83)
pt3dadd(142.778, 65.03, -7.03, 1.796)
pt3dadd(142.811, 64.98, -7.117, 1.764)
pt3dadd(142.846, 64.934, -7.203, 1.732)
pt3dadd(142.938, 64.944, -7.265, 1.72)
pt3dadd(143.032, 64.954, -7.328, 1.708)
pt3dadd(143.096, 64.942, -7.41, 1.754)
pt3dadd(143.16, 64.928, -7.495, 1.806)
pt3dadd(143.191, 64.845, -7.56, 1.882)
pt3dadd(143.221, 64.757, -7.623, 1.96)
pt3dadd(143.258, 64.653, -7.662, 2.022)
pt3dadd(143.298, 64.552, -7.701, 2.084)
pt3dadd(143.407, 64.548, -7.743, 2.114)
pt3dadd(143.516, 64.544, -7.784, 2.142)
pt3dadd(143.626, 64.54, -7.826, 2.172)
pt3dadd(143.712, 64.542, -7.89, 2.204)
pt3dadd(143.779, 64.549, -7.973, 2.24)
pt3dadd(143.856, 64.558, -8.047, 2.246)
pt3dadd(143.916, 64.564, -8.131, 2.218)
pt3dadd(143.96, 64.569, -8.224, 2.196)
pt3dadd(144.004, 64.573, -8.317, 2.172)
pt3dadd(144.048, 64.578, -8.41, 2.148)
pt3dadd(144.092, 64.582, -8.503, 2.126)
pt3dadd(144.134, 64.587, -8.596, 2.092)
pt3dadd(144.167, 64.593, -8.692, 2.038)
pt3dadd(144.2, 64.599, -8.788, 1.984)
pt3dadd(144.234, 64.605, -8.884, 1.93)
pt3dadd(144.266, 64.611, -8.98, 1.876)
pt3dadd(144.3, 64.617, -9.076, 1.822)
pt3dadd(144.31, 64.65, -9.17, 1.724)
pt3dadd(144.312, 64.692, -9.264, 1.612)
pt3dadd(144.314, 64.716, -9.361, 1.526)
pt3dadd(144.318, 64.721, -9.461, 1.462)
pt3dadd(144.323, 64.726, -9.561, 1.4)
pt3dadd(144.366, 64.732, -9.651, 1.39)
pt3dadd(144.427, 64.738, -9.737, 1.4)
pt3dadd(144.51, 64.747, -9.804, 1.436)
pt3dadd(144.612, 64.758, -9.855, 1.494)
pt3dadd(144.721, 64.769, -9.891, 1.55)
pt3dadd(144.84, 64.782, -9.897, 1.602)
pt3dadd(144.958, 64.794, -9.913, 1.634)
pt3dadd(145.07, 64.806, -9.943, 1.638)
pt3dadd(145.186, 64.818, -9.973, 1.644)
pt3dadd(145.298, 64.83, -10.003, 1.648)
pt3dadd(145.414, 64.842, -10.032, 1.652)
pt3dadd(145.526, 64.854, -10.062, 1.656)
pt3dadd(145.626, 64.884, -10.111, 1.628)
pt3dadd(145.723, 64.918, -10.162, 1.596)
pt3dadd(145.82, 64.952, -10.214, 1.562)
pt3dadd(145.918, 64.986, -10.265, 1.53)
pt3dadd(146.02, 65.019, -10.307, 1.498)
pt3dadd(146.134, 65.049, -10.328, 1.47)
pt3dadd(146.248, 65.078, -10.349, 1.44)
pt3dadd(146.36, 65.108, -10.37, 1.412)
pt3dadd(146.474, 65.138, -10.391, 1.384)
pt3dadd(146.587, 65.167, -10.413, 1.354)
pt3dadd(146.694, 65.186, -10.455, 1.326)
pt3dadd(146.801, 65.205, -10.497, 1.294)
pt3dadd(146.909, 65.225, -10.538, 1.266)
pt3dadd(147.017, 65.244, -10.58, 1.236)
pt3dadd(147.124, 65.263, -10.622, 1.206)
pt3dadd(147.236, 65.275, -10.655, 1.186)
pt3dadd(147.349, 65.287, -10.687, 1.168)
pt3dadd(147.462, 65.299, -10.719, 1.15)
pt3dadd(147.576, 65.31, -10.751, 1.132)
pt3dadd(147.688, 65.322, -10.783, 1.114)
pt3dadd(147.802, 65.346, -10.809, 1.096)
pt3dadd(147.913, 65.38, -10.829, 1.076)
pt3dadd(148.025, 65.416, -10.848, 1.056)
pt3dadd(148.138, 65.451, -10.867, 1.038)
pt3dadd(148.25, 65.486, -10.886, 1.018)
pt3dadd(148.363, 65.521, -10.904, 0.998)
pt3dadd(148.476, 65.558, -10.916, 0.974)
pt3dadd(148.589, 65.595, -10.928, 0.952)
pt3dadd(148.703, 65.631, -10.941, 0.928)
pt3dadd(148.816, 65.668, -10.953, 0.904)
pt3dadd(148.928, 65.705, -10.966, 0.88)
pt3dadd(149.022, 65.739, -11.021, 0.864)
pt3dadd(149.111, 65.773, -11.081, 0.846)
pt3dadd(149.202, 65.806, -11.141, 0.83)
pt3dadd(149.291, 65.84, -11.201, 0.812)
pt3dadd(149.393, 65.863, -11.247, 0.802)
pt3dadd(149.507, 65.875, -11.277, 0.798)
pt3dadd(149.621, 65.887, -11.307, 0.792)
pt3dadd(149.734, 65.899, -11.337, 0.788)
pt3dadd(149.849, 65.911, -11.366, 0.784)
pt3dadd(149.962, 65.923, -11.396, 0.778)
pt3dadd(150.074, 65.935, -11.43, 0.782)
pt3dadd(150.186, 65.947, -11.465, 0.788)
pt3dadd(150.299, 65.959, -11.5, 0.792)
pt3dadd(150.41, 65.97, -11.535, 0.796)
pt3dadd(150.523, 65.982, -11.569, 0.8)
pt3dadd(150.636, 65.994, -11.597, 0.808)
pt3dadd(150.752, 66.006, -11.615, 0.816)
pt3dadd(150.871, 66.019, -11.634, 0.824)
pt3dadd(150.988, 66.031, -11.653, 0.832)
pt3dadd(151.105, 66.043, -11.671, 0.84)
pt3dadd(151.223, 66.056, -11.689, 0.85)
pt3dadd(151.342, 66.068, -11.7, 0.854)
pt3dadd(151.46, 66.081, -11.7, 0.854)
pt3dadd(151.58, 66.093, -11.7, 0.854)
pt3dadd(151.699, 66.106, -11.7, 0.858)
pt3dadd(151.819, 66.118, -11.7, 0.866)
pt3dadd(151.938, 66.131, -11.7, 0.874)
pt3dadd(152.057, 66.144, -11.7, 0.886)
pt3dadd(152.177, 66.156, -11.7, 0.902)
pt3dadd(152.296, 66.169, -11.7, 0.92)
pt3dadd(152.408, 66.18, -11.722, 0.96)
pt3dadd(152.51, 66.191, -11.773, 1.028)
pt3dadd(152.59, 66.195, -11.835, 1.092)
pt3dadd(152.599, 66.176, -11.934, 1.14)
pt3dadd(152.608, 66.158, -12.032, 1.188)
pt3dadd(152.615, 66.139, -12.131, 1.236)
pt3dadd(152.628, 66.121, -12.228, 1.29)
pt3dadd(152.701, 66.1, -12.305, 1.41)
pt3dadd(152.78, 66.072, -12.374, 1.564)
pt3dadd(152.863, 66.009, -12.422, 1.7)
pt3dadd(152.936, 65.94, -12.476, 1.732)
pt3dadd(153.008, 65.872, -12.531, 1.762)
pt3dadd(153.083, 65.803, -12.586, 1.794)
pt3dadd(153.122, 65.742, -12.659, 1.808)
pt3dadd(153.134, 65.687, -12.747, 1.808)
pt3dadd(153.175, 65.63, -12.821, 1.79)
pt3dadd(153.259, 65.569, -12.872, 1.748)
pt3dadd(153.367, 65.557, -12.891, 1.692)
pt3dadd(153.486, 65.57, -12.895, 1.632)
pt3dadd(153.604, 65.582, -12.899, 1.57)
pt3dadd(153.714, 65.594, -12.935, 1.488)
pt3dadd(153.821, 65.605, -12.979, 1.398)
pt3dadd(153.918, 65.572, -13.018, 1.324)
pt3dadd(154.006, 65.501, -13.051, 1.266)
pt3dadd(154.093, 65.429, -13.085, 1.208)
pt3dadd(154.194, 65.373, -13.103, 1.142)
pt3dadd(154.306, 65.328, -13.108, 1.072)
pt3dadd(154.417, 65.298, -13.123, 0.988)
pt3dadd(154.523, 65.267, -13.16, 0.938)
pt3dadd(154.625, 65.224, -13.199, 0.914)
pt3dadd(154.726, 65.181, -13.238, 0.892)
pt3dadd(154.829, 65.139, -13.277, 0.868)
pt3dadd(154.916, 65.085, -13.324, 0.842)
pt3dadd(154.986, 65.015, -13.382, 0.812)
pt3dadd(155.058, 64.928, -13.404, 0.78)
pt3dadd(155.132, 64.834, -13.409, 0.744)
pt3dadd(155.208, 64.795, -13.455, 0.722)
pt3dadd(155.286, 64.797, -13.531, 0.708)
pt3dadd(155.375, 64.803, -13.597, 0.696)
pt3dadd(155.473, 64.813, -13.653, 0.686)
pt3dadd(155.579, 64.824, -13.69, 0.678)
pt3dadd(155.699, 64.837, -13.692, 0.678)
pt3dadd(155.818, 64.85, -13.694, 0.678)
pt3dadd(155.938, 64.862, -13.696, 0.678)
pt3dadd(156.056, 64.875, -13.699, 0.678)
pt3dadd(156.176, 64.885, -13.7, 0.682)
pt3dadd(156.296, 64.893, -13.7, 0.69)
pt3dadd(156.416, 64.901, -13.7, 0.7)
pt3dadd(156.534, 64.892, -13.7, 0.74)
pt3dadd(156.652, 64.869, -13.7, 0.756)
pt3dadd(156.769, 64.846, -13.7, 0.762)
pt3dadd(156.888, 64.822, -13.7, 0.766)
pt3dadd(157.004, 64.798, -13.7, 0.77)
pt3dadd(157.123, 64.775, -13.7, 0.774)
pt3dadd(157.241, 64.755, -13.7, 0.778)
pt3dadd(157.361, 64.75, -13.7, 0.778)
pt3dadd(157.481, 64.745, -13.7, 0.778)
pt3dadd(157.601, 64.74, -13.7, 0.778)
pt3dadd(157.721, 64.735, -13.7, 0.778)
pt3dadd(157.841, 64.731, -13.7, 0.778)
pt3dadd(157.961, 64.726, -13.7, 0.778)
pt3dadd(158.078, 64.736, -13.719, 0.77)
pt3dadd(158.195, 64.746, -13.738, 0.762)
pt3dadd(158.312, 64.756, -13.757, 0.752)
pt3dadd(158.43, 64.766, -13.776, 0.744)
pt3dadd(158.546, 64.776, -13.795, 0.736)
pt3dadd(158.663, 64.782, -13.816, 0.728)
pt3dadd(158.771, 64.758, -13.856, 0.734)
pt3dadd(158.878, 64.733, -13.896, 0.74)
pt3dadd(158.986, 64.708, -13.935, 0.746)
pt3dadd(159.094, 64.684, -13.975, 0.752)
pt3dadd(159.209, 64.679, -13.99, 0.756)
}
}
proc shape3d_71() {
dend_7[65] { pt3dadd(159.329, 64.685, -13.992, 0.76)
pt3dadd(159.449, 64.69, -13.994, 0.764)
pt3dadd(159.568, 64.696, -13.996, 0.768)
pt3dadd(159.688, 64.701, -13.998, 0.772)
pt3dadd(159.808, 64.707, -13.999, 0.778)
pt3dadd(159.923, 64.738, -14, 0.788)
pt3dadd(160.036, 64.778, -14, 0.8)
pt3dadd(160.15, 64.818, -14, 0.814)
pt3dadd(160.262, 64.857, -14, 0.826)
pt3dadd(160.375, 64.897, -14, 0.84)
pt3dadd(160.488, 64.937, -14, 0.852)
pt3dadd(160.602, 64.976, -14, 0.854)
pt3dadd(160.715, 65.016, -14, 0.854)
pt3dadd(160.829, 65.055, -14, 0.854)
pt3dadd(160.942, 65.095, -14, 0.854)
pt3dadd(161.054, 65.134, -14, 0.854)
pt3dadd(161.167, 65.174, -14.002, 0.852)
pt3dadd(161.276, 65.221, -14.023, 0.842)
pt3dadd(161.383, 65.268, -14.043, 0.832)
pt3dadd(161.491, 65.315, -14.064, 0.822)
pt3dadd(161.599, 65.362, -14.084, 0.812)
pt3dadd(161.704, 65.414, -14.105, 0.798)
pt3dadd(161.797, 65.484, -14.127, 0.77)
pt3dadd(161.892, 65.553, -14.149, 0.742)
pt3dadd(161.984, 65.623, -14.172, 0.714)
pt3dadd(162.078, 65.693, -14.194, 0.686)
pt3dadd(162.188, 65.735, -14.2, 0.666)
pt3dadd(162.305, 65.767, -14.2, 0.65)
pt3dadd(162.42, 65.799, -14.2, 0.634)
pt3dadd(162.536, 65.831, -14.2, 0.616)
pt3dadd(162.652, 65.863, -14.2, 0.6)
pt3dadd(162.767, 65.895, -14.2, 0.584)
pt3dadd(162.881, 65.932, -14.2, 0.574)
pt3dadd(162.994, 65.971, -14.2, 0.57)
pt3dadd(163.108, 66.011, -14.2, 0.566)
pt3dadd(163.222, 66.05, -14.2, 0.562)
pt3dadd(163.334, 66.09, -14.2, 0.558)
pt3dadd(163.448, 66.129, -14.2, 0.554)
pt3dadd(163.566, 66.147, -14.2, 0.564)
pt3dadd(163.685, 66.159, -14.2, 0.578)
pt3dadd(163.805, 66.172, -14.2, 0.594)
pt3dadd(163.924, 66.184, -14.2, 0.608)
pt3dadd(164.044, 66.197, -14.2, 0.622)
pt3dadd(164.162, 66.209, -14.2, 0.636)
pt3dadd(164.281, 66.222, -14.2, 0.65)
pt3dadd(164.399, 66.25, -14.2, 0.674)
pt3dadd(164.514, 66.282, -14.2, 0.698)
pt3dadd(164.63, 66.314, -14.2, 0.722)
pt3dadd(164.746, 66.346, -14.2, 0.748)
pt3dadd(164.861, 66.378, -14.2, 0.772)
pt3dadd(164.976, 66.41, -14.2, 0.798)
pt3dadd(165.092, 66.442, -14.2, 0.82)
pt3dadd(165.209, 66.474, -14.2, 0.84)
pt3dadd(165.323, 66.506, -14.2, 0.86)
pt3dadd(165.439, 66.538, -14.2, 0.88)
pt3dadd(165.556, 66.57, -14.2, 0.902)
pt3dadd(165.671, 66.602, -14.2, 0.922)
pt3dadd(165.787, 66.626, -14.211, 0.926)
pt3dadd(165.904, 66.645, -14.229, 0.922)
pt3dadd(166.02, 66.664, -14.246, 0.918)
pt3dadd(166.138, 66.683, -14.263, 0.914)
pt3dadd(166.254, 66.702, -14.281, 0.908)
pt3dadd(166.369, 66.722, -14.298, 0.904)
pt3dadd(166.472, 66.782, -14.298, 0.878)
pt3dadd(166.572, 66.848, -14.296, 0.848)
pt3dadd(166.673, 66.914, -14.294, 0.818)
pt3dadd(166.774, 66.979, -14.292, 0.79)
pt3dadd(166.874, 67.045, -14.289, 0.76)
pt3dadd(166.987, 67.077, -14.285, 0.722)
pt3dadd(167.106, 67.098, -14.28, 0.684)
pt3dadd(167.224, 67.119, -14.275, 0.644)
pt3dadd(167.341, 67.14, -14.27, 0.606)
pt3dadd(167.459, 67.159, -14.259, 0.564)
pt3dadd(167.575, 67.171, -14.235, 0.52)
pt3dadd(167.689, 67.183, -14.212, 0.476)
pt3dadd(167.777, 67.192, -14.28, 0.466)
pt3dadd(167.864, 67.202, -14.349, 0.454)
pt3dadd(167.966, 67.173, -14.393, 0.452)
pt3dadd(168.071, 67.14, -14.435, 0.452)
pt3dadd(168.138, 67.078, -14.499, 0.466)
pt3dadd(168.194, 67.017, -14.569, 0.488)
pt3dadd(168.221, 66.959, -14.654, 0.526)
pt3dadd(168.301, 66.884, -14.692, 0.55)
pt3dadd(168.384, 66.809, -14.73, 0.576)
pt3dadd(168.466, 66.734, -14.767, 0.6)
pt3dadd(168.548, 66.659, -14.804, 0.624)
pt3dadd(168.653, 66.609, -14.827, 0.642)
pt3dadd(168.762, 66.566, -14.846, 0.658)
pt3dadd(168.871, 66.522, -14.865, 0.674)
pt3dadd(168.98, 66.478, -14.885, 0.69)
pt3dadd(169.092, 66.442, -14.9, 0.706)
pt3dadd(169.211, 66.435, -14.9, 0.722)
pt3dadd(169.332, 66.428, -14.9, 0.74)
pt3dadd(169.452, 66.42, -14.9, 0.756)
pt3dadd(169.571, 66.413, -14.9, 0.772)
pt3dadd(169.691, 66.406, -14.9, 0.79)
pt3dadd(169.81, 66.398, -14.902, 0.806)
pt3dadd(169.927, 66.387, -14.922, 0.82)
pt3dadd(170.045, 66.376, -14.941, 0.834)
pt3dadd(170.162, 66.365, -14.96, 0.848)
pt3dadd(170.279, 66.354, -14.979, 0.864)
pt3dadd(170.396, 66.344, -14.999, 0.878)
pt3dadd(170.5, 66.287, -15.013, 0.91)
pt3dadd(170.603, 66.228, -15.028, 0.942)
pt3dadd(170.705, 66.168, -15.043, 0.976)
pt3dadd(170.808, 66.109, -15.057, 1.008)
pt3dadd(170.916, 66.069, -15.072, 1.044)
pt3dadd(171.035, 66.064, -15.085, 1.086)
pt3dadd(171.154, 66.06, -15.099, 1.128)
pt3dadd(171.268, 66.028, -15.115, 1.166)
pt3dadd(171.382, 65.994, -15.132, 1.202)
pt3dadd(171.474, 65.932, -15.167, 1.18)
pt3dadd(171.563, 65.865, -15.204, 1.148)
pt3dadd(171.646, 65.791, -15.242, 1.092)
pt3dadd(171.73, 65.714, -15.27, 1.04)
pt3dadd(171.814, 65.63, -15.28, 0.994)
pt3dadd(171.9, 65.547, -15.29, 0.95)
pt3dadd(171.985, 65.463, -15.3, 0.904)
pt3dadd(172.104, 65.475, -15.3, 0.862)
pt3dadd(172.224, 65.488, -15.3, 0.82)
pt3dadd(172.343, 65.5, -15.3, 0.778)
pt3dadd(172.463, 65.513, -15.3, 0.704)
pt3dadd(172.582, 65.526, -15.3, 0.69)
pt3dadd(172.7, 65.538, -15.3, 0.678)
}
dend_7[66] {pt3dclear()
pt3dadd(137.126, 68.663, -2.2, 2.662)
pt3dadd(137.056, 68.684, -2.24, 2.614)
pt3dadd(136.96, 68.713, -2.295, 2.546)
pt3dadd(136.864, 68.742, -2.349, 2.48)
pt3dadd(136.768, 68.77, -2.404, 2.414)
pt3dadd(136.67, 68.799, -2.459, 2.346)
pt3dadd(136.574, 68.827, -2.513, 2.28)
pt3dadd(136.478, 68.856, -2.568, 2.212)
pt3dadd(136.382, 68.885, -2.623, 2.146)
pt3dadd(136.285, 68.913, -2.678, 2.08)
pt3dadd(136.189, 68.942, -2.732, 2.012)
pt3dadd(136.093, 68.971, -2.787, 1.946)
pt3dadd(135.997, 68.999, -2.842, 1.88)
pt3dadd(135.901, 69.028, -2.896, 1.812)
pt3dadd(135.889, 69.073, -2.986, 1.696)
pt3dadd(135.884, 69.119, -3.078, 1.574)
pt3dadd(135.881, 69.162, -3.172, 1.538)
pt3dadd(135.876, 69.201, -3.266, 1.55)
pt3dadd(135.871, 69.251, -3.356, 1.584)
pt3dadd(135.863, 69.325, -3.434, 1.678)
pt3dadd(135.854, 69.405, -3.506, 1.774)
pt3dadd(135.844, 69.515, -3.545, 1.884)
pt3dadd(135.832, 69.625, -3.584, 1.994)
pt3dadd(135.82, 69.743, -3.594, 2.02)
pt3dadd(135.806, 69.862, -3.6, 2.034)
pt3dadd(135.794, 69.981, -3.61, 1.996)
pt3dadd(135.782, 70.099, -3.621, 1.956)
pt3dadd(135.769, 70.218, -3.631, 1.916)
pt3dadd(135.757, 70.337, -3.642, 1.878)
pt3dadd(135.744, 70.455, -3.652, 1.838)
pt3dadd(135.732, 70.574, -3.663, 1.798)
pt3dadd(135.72, 70.692, -3.677, 1.694)
pt3dadd(135.707, 70.81, -3.694, 1.55)
pt3dadd(135.695, 70.927, -3.711, 1.406)
pt3dadd(135.677, 71.038, -3.746, 1.282)
pt3dadd(135.66, 71.15, -3.78, 1.16)
pt3dadd(135.61, 71.23, -3.837, 1.064)
pt3dadd(135.548, 71.3, -3.9, 0.98)
pt3dadd(135.49, 71.354, -3.975, 0.952)
pt3dadd(135.425, 71.409, -4.044, 0.92)
pt3dadd(135.337, 71.467, -4.089, 0.878)
pt3dadd(135.22, 71.491, -4.099, 0.856)
pt3dadd(135.103, 71.514, -4.109, 0.832)
pt3dadd(135.053, 71.574, -4.175, 0.796)
pt3dadd(135.018, 71.642, -4.252, 0.756)
pt3dadd(135.005, 71.756, -4.277, 0.744)
pt3dadd(134.993, 71.873, -4.299, 0.734)
pt3dadd(134.989, 71.987, -4.328, 0.728)
pt3dadd(134.996, 72.097, -4.365, 0.728)
pt3dadd(134.992, 72.195, -4.417, 0.732)
pt3dadd(134.968, 72.271, -4.491, 0.742)
pt3dadd(134.942, 72.347, -4.566, 0.754)
pt3dadd(134.87, 72.442, -4.567, 0.738)
pt3dadd(134.809, 72.538, -4.552, 0.718)
pt3dadd(134.79, 72.647, -4.516, 0.684)
pt3dadd(134.778, 72.766, -4.512, 0.706)
pt3dadd(134.761, 72.876, -4.545, 0.79)
pt3dadd(134.718, 72.967, -4.599, 0.95)
pt3dadd(134.658, 72.996, -4.68, 1.068)
pt3dadd(134.635, 73, -4.777, 1.08)
pt3dadd(134.633, 73, -4.877, 1.06)
pt3dadd(134.621, 72.999, -4.977, 1.076)
pt3dadd(134.568, 72.993, -5.064, 1.104)
pt3dadd(134.474, 72.983, -5.126, 1.104)
pt3dadd(134.41, 72.976, -5.207, 1.104)
pt3dadd(134.323, 72.994, -5.275, 1.122)
pt3dadd(134.234, 73.012, -5.341, 1.138)
pt3dadd(134.147, 73.03, -5.407, 1.156)
pt3dadd(134.058, 73.049, -5.473, 1.174)
pt3dadd(133.969, 73.046, -5.538, 1.19)
pt3dadd(133.878, 73.028, -5.601, 1.206)
pt3dadd(133.786, 73.01, -5.664, 1.222)
pt3dadd(133.694, 72.992, -5.727, 1.238)
pt3dadd(133.603, 72.974, -5.79, 1.254)
pt3dadd(133.519, 72.948, -5.858, 1.288)
pt3dadd(133.436, 72.922, -5.927, 1.328)
}
}
proc shape3d_72() {
dend_7[66] { pt3dadd(133.354, 72.895, -5.996, 1.366)
pt3dadd(133.27, 72.869, -6.064, 1.404)
pt3dadd(133.188, 72.848, -6.135, 1.442)
pt3dadd(133.108, 72.839, -6.209, 1.478)
pt3dadd(133.027, 72.831, -6.283, 1.514)
pt3dadd(132.947, 72.823, -6.357, 1.55)
pt3dadd(132.868, 72.814, -6.431, 1.584)
pt3dadd(132.793, 72.806, -6.509, 1.616)
pt3dadd(132.731, 72.8, -6.594, 1.64)
pt3dadd(132.668, 72.793, -6.679, 1.666)
pt3dadd(132.606, 72.787, -6.764, 1.69)
pt3dadd(132.542, 72.78, -6.849, 1.714)
pt3dadd(132.491, 72.774, -6.938, 1.728)
pt3dadd(132.464, 72.772, -7.036, 1.708)
pt3dadd(132.438, 72.769, -7.133, 1.688)
pt3dadd(132.352, 72.793, -7.188, 1.62)
pt3dadd(132.247, 72.826, -7.229, 1.54)
pt3dadd(132.139, 72.856, -7.265, 1.472)
pt3dadd(132.031, 72.886, -7.3, 1.408)
pt3dadd(131.939, 72.96, -7.317, 1.38)
pt3dadd(131.849, 73.034, -7.337, 1.358)
pt3dadd(131.772, 73.095, -7.395, 1.38)
pt3dadd(131.681, 73.148, -7.442, 1.386)
pt3dadd(131.587, 73.2, -7.488, 1.392)
pt3dadd(131.494, 73.252, -7.533, 1.398)
pt3dadd(131.401, 73.304, -7.579, 1.404)
pt3dadd(131.323, 73.369, -7.632, 1.416)
pt3dadd(131.25, 73.437, -7.687, 1.428)
pt3dadd(131.177, 73.506, -7.742, 1.44)
pt3dadd(131.104, 73.574, -7.797, 1.454)
pt3dadd(131.014, 73.63, -7.843, 1.456)
pt3dadd(130.918, 73.681, -7.886, 1.456)
pt3dadd(130.823, 73.732, -7.928, 1.456)
pt3dadd(130.727, 73.783, -7.971, 1.456)
pt3dadd(130.636, 73.82, -8.027, 1.456)
pt3dadd(130.548, 73.845, -8.092, 1.456)
pt3dadd(130.46, 73.87, -8.157, 1.456)
pt3dadd(130.373, 73.896, -8.222, 1.456)
pt3dadd(130.301, 73.926, -8.294, 1.454)
pt3dadd(130.261, 73.966, -8.383, 1.45)
pt3dadd(130.222, 74.006, -8.471, 1.444)
pt3dadd(130.182, 74.046, -8.559, 1.438)
pt3dadd(130.142, 74.087, -8.647, 1.432)
pt3dadd(130.098, 74.125, -8.734, 1.462)
pt3dadd(130.051, 74.162, -8.821, 1.502)
pt3dadd(130.024, 74.18, -8.917, 1.554)
pt3dadd(130, 74.195, -9.014, 1.608)
pt3dadd(129.938, 74.196, -9.095, 1.686)
pt3dadd(129.851, 74.186, -9.163, 1.78)
pt3dadd(129.756, 74.176, -9.223, 1.858)
pt3dadd(129.654, 74.166, -9.273, 1.916)
pt3dadd(129.547, 74.161, -9.318, 1.962)
pt3dadd(129.432, 74.176, -9.343, 1.976)
pt3dadd(129.317, 74.19, -9.368, 1.99)
pt3dadd(129.202, 74.205, -9.393, 2.006)
pt3dadd(129.092, 74.247, -9.404, 1.966)
pt3dadd(128.984, 74.299, -9.409, 1.906)
pt3dadd(128.896, 74.317, -9.458, 1.838)
pt3dadd(128.818, 74.314, -9.535, 1.766)
pt3dadd(128.741, 74.31, -9.611, 1.692)
pt3dadd(128.675, 74.31, -9.695, 1.58)
pt3dadd(128.611, 74.309, -9.78, 1.46)
pt3dadd(128.575, 74.336, -9.87, 1.202)
pt3dadd(128.491, 74.372, -9.934, 1.154)
pt3dadd(128.407, 74.409, -9.998, 1.106)
pt3dadd(128.322, 74.445, -10.062, 1.058)
pt3dadd(128.238, 74.481, -10.126, 1.01)
pt3dadd(128.13, 74.505, -10.163, 0.948)
pt3dadd(128.018, 74.527, -10.197, 0.884)
pt3dadd(127.936, 74.606, -10.222, 0.854)
pt3dadd(127.858, 74.688, -10.248, 0.828)
pt3dadd(127.841, 74.697, -10.346, 0.828)
pt3dadd(127.824, 74.706, -10.445, 0.828)
pt3dadd(127.784, 74.735, -10.533, 0.828)
pt3dadd(127.728, 74.781, -10.613, 0.828)
pt3dadd(127.655, 74.794, -10.688, 0.856)
pt3dadd(127.574, 74.792, -10.763, 0.886)
pt3dadd(127.494, 74.783, -10.837, 0.9)
pt3dadd(127.414, 74.775, -10.911, 0.916)
pt3dadd(127.333, 74.766, -10.985, 0.93)
pt3dadd(127.253, 74.758, -11.059, 0.946)
pt3dadd(127.172, 74.75, -11.133, 0.966)
pt3dadd(127.093, 74.741, -11.207, 0.99)
pt3dadd(127.013, 74.733, -11.281, 1.016)
pt3dadd(126.932, 74.724, -11.355, 1.042)
pt3dadd(126.852, 74.716, -11.429, 1.066)
pt3dadd(126.776, 74.708, -11.506, 1.09)
pt3dadd(126.704, 74.7, -11.586, 1.11)
pt3dadd(126.632, 74.693, -11.666, 1.13)
pt3dadd(126.562, 74.685, -11.746, 1.15)
pt3dadd(126.49, 74.678, -11.826, 1.17)
pt3dadd(126.413, 74.67, -11.903, 1.21)
pt3dadd(126.331, 74.661, -11.976, 1.268)
pt3dadd(126.244, 74.671, -12.038, 1.326)
pt3dadd(126.143, 74.712, -12.081, 1.382)
pt3dadd(126.058, 74.783, -12.103, 1.446)
pt3dadd(125.984, 74.877, -12.108, 1.518)
pt3dadd(125.909, 74.963, -12.131, 1.582)
pt3dadd(125.832, 75.039, -12.175, 1.64)
pt3dadd(125.761, 75.13, -12.194, 1.682)
pt3dadd(125.694, 75.229, -12.2, 1.698)
pt3dadd(125.63, 75.33, -12.2, 1.664)
pt3dadd(125.563, 75.428, -12.2, 1.63)
pt3dadd(125.452, 75.473, -12.205, 1.582)
pt3dadd(125.34, 75.518, -12.211, 1.536)
pt3dadd(125.257, 75.513, -12.278, 1.488)
pt3dadd(125.176, 75.505, -12.352, 1.44)
pt3dadd(125.094, 75.496, -12.425, 1.394)
pt3dadd(125.012, 75.488, -12.498, 1.346)
pt3dadd(124.92, 75.499, -12.558, 1.25)
pt3dadd(124.831, 75.532, -12.618, 1.164)
pt3dadd(124.758, 75.58, -12.686, 1.128)
pt3dadd(124.684, 75.628, -12.754, 1.09)
pt3dadd(124.61, 75.676, -12.822, 1.054)
pt3dadd(124.53, 75.722, -12.885, 1.022)
pt3dadd(124.438, 75.765, -12.938, 0.998)
pt3dadd(124.346, 75.807, -12.992, 0.972)
pt3dadd(124.254, 75.849, -13.046, 0.948)
pt3dadd(124.169, 75.903, -13.095, 0.932)
pt3dadd(124.11, 76.001, -13.123, 0.944)
pt3dadd(124.046, 76.078, -13.166, 0.972)
pt3dadd(123.973, 76.099, -13.243, 1.04)
pt3dadd(123.887, 76.135, -13.291, 1.118)
pt3dadd(123.784, 76.195, -13.296, 1.216)
pt3dadd(123.69, 76.268, -13.3, 1.312)
pt3dadd(123.619, 76.364, -13.3, 1.402)
pt3dadd(123.546, 76.458, -13.301, 1.492)
pt3dadd(123.457, 76.539, -13.309, 1.566)
pt3dadd(123.383, 76.626, -13.336, 1.582)
pt3dadd(123.311, 76.715, -13.367, 1.582)
pt3dadd(123.239, 76.804, -13.398, 1.582)
pt3dadd(123.168, 76.893, -13.428, 1.582)
pt3dadd(123.089, 76.96, -13.473, 1.576)
pt3dadd(123.004, 77.003, -13.533, 1.564)
pt3dadd(122.917, 77.046, -13.592, 1.552)
pt3dadd(122.831, 77.089, -13.652, 1.54)
pt3dadd(122.756, 77.15, -13.707, 1.532)
pt3dadd(122.704, 77.24, -13.756, 1.532)
pt3dadd(122.648, 77.281, -13.827, 1.532)
pt3dadd(122.592, 77.281, -13.915, 1.532)
pt3dadd(122.519, 77.28, -13.991, 1.526)
pt3dadd(122.423, 77.276, -14.05, 1.514)
pt3dadd(122.324, 77.287, -14.104, 1.488)
pt3dadd(122.224, 77.329, -14.146, 1.432)
pt3dadd(122.116, 77.351, -14.178, 1.362)
pt3dadd(121.998, 77.358, -14.2, 1.28)
pt3dadd(121.892, 77.413, -14.2, 1.256)
pt3dadd(121.786, 77.468, -14.2, 1.23)
pt3dadd(121.679, 77.523, -14.2, 1.206)
pt3dadd(121.572, 77.578, -14.2, 1.18)
pt3dadd(121.465, 77.634, -14.2, 1.156)
pt3dadd(121.357, 77.683, -14.2, 1.11)
pt3dadd(121.247, 77.733, -14.2, 1.064)
pt3dadd(121.133, 77.764, -14.212, 1.036)
pt3dadd(121.018, 77.79, -14.228, 1.012)
pt3dadd(120.925, 77.807, -14.282, 0.98)
pt3dadd(120.848, 77.819, -14.357, 0.94)
pt3dadd(120.782, 77.874, -14.424, 0.888)
pt3dadd(120.721, 77.944, -14.487, 0.83)
pt3dadd(120.644, 78.014, -14.537, 0.778)
pt3dadd(120.568, 78.084, -14.587, 0.726)
pt3dadd(120.49, 78.152, -14.636, 0.674)
pt3dadd(120.385, 78.185, -14.678, 0.62)
pt3dadd(120.282, 78.22, -14.719, 0.578)
pt3dadd(120.179, 78.264, -14.755, 0.578)
pt3dadd(120.076, 78.307, -14.791, 0.578)
pt3dadd(120.007, 78.397, -14.8, 0.602)
pt3dadd(119.949, 78.502, -14.8, 0.636)
pt3dadd(119.864, 78.573, -14.8, 0.664)
pt3dadd(119.748, 78.604, -14.8, 0.688)
pt3dadd(119.632, 78.635, -14.8, 0.712)
pt3dadd(119.517, 78.651, -14.81, 0.724)
pt3dadd(119.402, 78.639, -14.837, 0.714)
pt3dadd(119.287, 78.627, -14.865, 0.704)
pt3dadd(119.172, 78.614, -14.889, 0.624)
pt3dadd(119.053, 78.602, -14.893, 0.588)
pt3dadd(118.934, 78.589, -14.897, 0.554)
pt3dadd(118.815, 78.577, -14.903, 0.52)
pt3dadd(118.696, 78.564, -14.915, 0.492)
pt3dadd(118.578, 78.552, -14.928, 0.464)
pt3dadd(118.466, 78.544, -14.959, 0.44)
pt3dadd(118.36, 78.539, -15.005, 0.416)
pt3dadd(118.261, 78.554, -15.056, 0.402)
pt3dadd(118.173, 78.598, -15.113, 0.402)
pt3dadd(118.09, 78.614, -15.181, 0.438)
pt3dadd(118.017, 78.623, -15.259, 0.486)
pt3dadd(117.961, 78.646, -15.346, 0.514)
pt3dadd(117.905, 78.67, -15.432, 0.542)
pt3dadd(117.849, 78.694, -15.518, 0.57)
pt3dadd(117.793, 78.718, -15.604, 0.596)
pt3dadd(117.734, 78.744, -15.688, 0.62)
pt3dadd(117.673, 78.771, -15.771, 0.644)
pt3dadd(117.612, 78.798, -15.855, 0.666)
pt3dadd(117.552, 78.825, -15.938, 0.69)
pt3dadd(117.477, 78.857, -16.008, 0.708)
pt3dadd(117.38, 78.894, -16.059, 0.72)
pt3dadd(117.284, 78.932, -16.109, 0.732)
pt3dadd(117.187, 78.97, -16.159, 0.744)
pt3dadd(117.088, 79.008, -16.204, 0.752)
pt3dadd(116.977, 79.046, -16.226, 0.746)
}
}
proc shape3d_73() {
dend_7[66] { pt3dadd(116.866, 79.083, -16.247, 0.742)
pt3dadd(116.755, 79.121, -16.269, 0.736)
pt3dadd(116.644, 79.158, -16.291, 0.73)
pt3dadd(116.529, 79.169, -16.309, 0.726)
pt3dadd(116.411, 79.159, -16.326, 0.722)
pt3dadd(116.293, 79.149, -16.343, 0.718)
pt3dadd(116.176, 79.139, -16.36, 0.714)
pt3dadd(116.058, 79.129, -16.376, 0.708)
pt3dadd(115.94, 79.118, -16.393, 0.704)
pt3dadd(115.824, 79.107, -16.416, 0.692)
pt3dadd(115.709, 79.095, -16.444, 0.67)
pt3dadd(115.594, 79.083, -16.471, 0.652)
pt3dadd(115.479, 79.071, -16.498, 0.64)
pt3dadd(115.365, 79.059, -16.526, 0.63)
pt3dadd(115.266, 79.081, -16.574, 0.618)
pt3dadd(115.173, 79.116, -16.629, 0.604)
pt3dadd(115.1, 79.153, -16.703, 0.616)
pt3dadd(115.022, 79.186, -16.768, 0.63)
pt3dadd(114.903, 79.193, -16.776, 0.642)
pt3dadd(114.783, 79.201, -16.784, 0.654)
pt3dadd(114.664, 79.208, -16.792, 0.666)
pt3dadd(114.545, 79.216, -16.8, 0.68)
pt3dadd(114.426, 79.237, -16.8, 0.712)
pt3dadd(114.308, 79.258, -16.8, 0.742)
pt3dadd(114.193, 79.277, -16.818, 0.766)
pt3dadd(114.079, 79.293, -16.847, 0.784)
pt3dadd(113.965, 79.31, -16.875, 0.802)
pt3dadd(113.925, 79.351, -16.957, 0.792)
pt3dadd(113.893, 79.395, -17.047, 0.78)
pt3dadd(113.786, 79.423, -17.07, 0.746)
pt3dadd(113.67, 79.448, -17.085, 0.712)
pt3dadd(113.555, 79.473, -17.102, 0.676)
pt3dadd(113.442, 79.487, -17.134, 0.614)
pt3dadd(113.33, 79.501, -17.167, 0.552)
pt3dadd(113.262, 79.59, -17.198, 0.506)
pt3dadd(113.169, 79.657, -17.224, 0.518)
pt3dadd(113.074, 79.725, -17.25, 0.53)
pt3dadd(112.98, 79.793, -17.275, 0.542)
pt3dadd(112.886, 79.861, -17.3, 0.554)
pt3dadd(112.79, 79.933, -17.3, 0.602)
pt3dadd(112.694, 80.004, -17.3, 0.65)
pt3dadd(112.582, 80.041, -17.315, 0.676)
pt3dadd(112.468, 80.075, -17.331, 0.7)
pt3dadd(112.372, 80.072, -17.386, 0.704)
pt3dadd(112.279, 80.062, -17.449, 0.704)
pt3dadd(112.178, 80.082, -17.497, 0.694)
pt3dadd(112.074, 80.115, -17.538, 0.68)
pt3dadd(112.048, 80.177, -17.614, 0.702)
pt3dadd(112.038, 80.244, -17.696, 0.73)
pt3dadd(112.027, 80.312, -17.778, 0.76)
pt3dadd(112.017, 80.386, -17.856, 0.798)
pt3dadd(112.007, 80.473, -17.924, 0.858)
pt3dadd(111.999, 80.548, -17.999, 0.916)
pt3dadd(111.996, 80.576, -18.096, 0.978)
pt3dadd(111.994, 80.604, -18.193, 1.038)
pt3dadd(111.991, 80.632, -18.29, 1.098)
pt3dadd(111.988, 80.653, -18.389, 1.14)
pt3dadd(111.986, 80.673, -18.487, 1.178)
pt3dadd(112.001, 80.714, -18.572, 1.218)
pt3dadd(112.056, 80.8, -18.624, 1.262)
pt3dadd(112.11, 80.887, -18.677, 1.304)
pt3dadd(112.155, 80.968, -18.74, 1.292)
pt3dadd(112.191, 81.058, -18.79, 1.274)
pt3dadd(112.193, 81.178, -18.793, 1.246)
pt3dadd(112.196, 81.298, -18.796, 1.216)
pt3dadd(112.199, 81.418, -18.799, 1.188)
pt3dadd(112.285, 81.473, -18.803, 1.136)
pt3dadd(112.4, 81.507, -18.808, 1.074)
pt3dadd(112.514, 81.539, -18.819, 1.002)
pt3dadd(112.602, 81.593, -18.863, 0.964)
pt3dadd(112.67, 81.666, -18.918, 0.982)
pt3dadd(112.738, 81.739, -18.973, 1.002)
pt3dadd(112.806, 81.813, -19.028, 1.02)
pt3dadd(112.891, 81.879, -19.067, 1.054)
pt3dadd(112.993, 81.936, -19.089, 1.104)
pt3dadd(113.077, 82.014, -19.109, 1.15)
pt3dadd(113.143, 82.112, -19.126, 1.188)
pt3dadd(113.197, 82.2, -19.17, 1.188)
pt3dadd(113.242, 82.281, -19.233, 1.16)
pt3dadd(113.268, 82.312, -19.324, 1.138)
pt3dadd(113.289, 82.332, -19.421, 1.116)
pt3dadd(113.322, 82.343, -19.516, 1.088)
pt3dadd(113.365, 82.348, -19.61, 1.056)
pt3dadd(113.37, 82.353, -19.709, 1.072)
pt3dadd(113.374, 82.358, -19.809, 1.09)
pt3dadd(113.376, 82.37, -19.908, 1.112)
pt3dadd(113.372, 82.41, -20.002, 1.144)
pt3dadd(113.368, 82.449, -20.097, 1.176)
pt3dadd(113.38, 82.461, -20.195, 1.214)
pt3dadd(113.395, 82.468, -20.294, 1.252)
pt3dadd(113.43, 82.475, -20.383, 1.284)
pt3dadd(113.524, 82.485, -20.446, 1.296)
pt3dadd(113.615, 82.495, -20.51, 1.306)
pt3dadd(113.689, 82.503, -20.588, 1.306)
pt3dadd(113.714, 82.516, -20.681, 1.292)
pt3dadd(113.717, 82.532, -20.78, 1.272)
pt3dadd(113.722, 82.551, -20.878, 1.254)
pt3dadd(113.736, 82.59, -20.972, 1.242)
pt3dadd(113.751, 82.629, -21.066, 1.23)
pt3dadd(113.825, 82.638, -21.144, 1.208)
pt3dadd(113.9, 82.645, -21.222, 1.184)
pt3dadd(113.98, 82.654, -21.296, 1.16)
pt3dadd(114.061, 82.662, -21.369, 1.136)
pt3dadd(114.158, 82.698, -21.415, 1.112)
pt3dadd(114.261, 82.743, -21.451, 1.088)
pt3dadd(114.363, 82.788, -21.486, 1.064)
pt3dadd(114.414, 82.78, -21.556, 1.034)
pt3dadd(114.43, 82.738, -21.649, 0.998)
pt3dadd(114.46, 82.699, -21.739, 0.926)
pt3dadd(114.532, 82.658, -21.811, 0.88)
pt3dadd(114.603, 82.633, -21.882, 0.852)
pt3dadd(114.645, 82.685, -21.965, 0.836)
pt3dadd(114.666, 82.734, -22.052, 0.828)
pt3dadd(114.661, 82.78, -22.145, 0.828)
pt3dadd(114.656, 82.829, -22.236, 0.828)
pt3dadd(114.649, 82.889, -22.322, 0.828)
pt3dadd(114.643, 82.95, -22.408, 0.828)
pt3dadd(114.642, 82.958, -22.508, 0.842)
pt3dadd(114.642, 82.965, -22.608, 0.856)
pt3dadd(114.646, 82.965, -22.707, 0.892)
pt3dadd(114.651, 82.966, -22.807, 0.926)
pt3dadd(114.67, 82.969, -22.902, 0.97)
pt3dadd(114.754, 82.984, -22.972, 1.056)
pt3dadd(114.829, 83.007, -23.044, 1.14)
pt3dadd(114.849, 83.081, -23.121, 1.222)
pt3dadd(114.862, 83.156, -23.197, 1.286)
pt3dadd(114.854, 83.238, -23.27, 1.31)
pt3dadd(114.846, 83.309, -23.347, 1.328)
pt3dadd(114.846, 83.318, -23.446, 1.306)
pt3dadd(114.845, 83.326, -23.546, 1.286)
pt3dadd(114.844, 83.335, -23.646, 1.264)
pt3dadd(114.843, 83.343, -23.746, 1.242)
pt3dadd(114.824, 83.346, -23.843, 1.206)
pt3dadd(114.785, 83.342, -23.937, 1.152)
pt3dadd(114.738, 83.337, -24.027, 1.096)
pt3dadd(114.632, 83.326, -24.071, 1.012)
pt3dadd(114.518, 83.314, -24.097, 0.91)
pt3dadd(114.399, 83.301, -24.1, 0.788)
pt3dadd(114.281, 83.278, -24.1, 0.634)
pt3dadd(114.174, 83.23, -24.115, 0.528)
pt3dadd(114.092, 83.166, -24.162, 0.592)
pt3dadd(113.992, 83.108, -24.187, 0.626)
pt3dadd(113.891, 83.05, -24.209, 0.65)
pt3dadd(113.813, 82.975, -24.252, 0.68)
pt3dadd(113.731, 82.906, -24.29, 0.706)
pt3dadd(113.614, 82.879, -24.294, 0.726)
pt3dadd(113.497, 82.851, -24.298, 0.746)
pt3dadd(113.379, 82.832, -24.3, 0.762)
pt3dadd(113.26, 82.819, -24.3, 0.78)
pt3dadd(113.14, 82.807, -24.3, 0.796)
pt3dadd(113.031, 82.795, -24.329, 0.81)
pt3dadd(112.928, 82.785, -24.38, 0.822)
pt3dadd(112.852, 82.777, -24.448, 0.828)
pt3dadd(112.819, 82.773, -24.544, 0.846)
pt3dadd(112.771, 82.768, -24.635, 0.88)
pt3dadd(112.742, 82.765, -24.732, 0.904)
pt3dadd(112.731, 82.769, -24.831, 0.904)
pt3dadd(112.728, 82.799, -24.926, 0.89)
pt3dadd(112.719, 82.889, -24.986, 0.834)
pt3dadd(112.706, 83.006, -25, 0.726)
pt3dadd(112.694, 83.125, -25, 0.624)
pt3dadd(112.681, 83.245, -25, 0.524)
pt3dadd(112.669, 83.364, -25, 0.45)
pt3dadd(112.656, 83.481, -24.982, 0.402)
pt3dadd(112.646, 83.583, -24.931, 0.402)
pt3dadd(112.635, 83.686, -24.881, 0.402)
pt3dadd(112.584, 83.782, -24.838, 0.44)
pt3dadd(112.528, 83.875, -24.802, 0.48)
pt3dadd(112.443, 83.954, -24.829, 0.522)
pt3dadd(112.359, 84.033, -24.857, 0.562)
pt3dadd(112.258, 84.088, -24.877, 0.594)
pt3dadd(112.147, 84.13, -24.894, 0.618)
pt3dadd(112.035, 84.171, -24.9, 0.608)
pt3dadd(111.92, 84.205, -24.9, 0.586)
pt3dadd(111.805, 84.238, -24.9, 0.568)
pt3dadd(111.689, 84.27, -24.9, 0.55)
pt3dadd(111.574, 84.303, -24.9, 0.53)
pt3dadd(111.458, 84.336, -24.9, 0.512)
pt3dadd(111.358, 84.394, -24.9, 0.49)
pt3dadd(111.274, 84.479, -24.9, 0.468)
pt3dadd(111.184, 84.558, -24.9, 0.456)
pt3dadd(111.082, 84.622, -24.9, 0.468)
pt3dadd(110.979, 84.682, -24.901, 0.494)
pt3dadd(110.868, 84.727, -24.906, 0.576)
pt3dadd(110.761, 84.771, -24.917, 0.66)
pt3dadd(110.707, 84.809, -25, 0.768)
pt3dadd(110.649, 84.837, -25.083, 0.876)
pt3dadd(110.574, 84.83, -25.161, 0.982)
pt3dadd(110.505, 84.822, -25.242, 1.004)
pt3dadd(110.437, 84.815, -25.325, 1.004)
pt3dadd(110.338, 84.808, -25.367, 0.98)
pt3dadd(110.22, 84.801, -25.385, 0.938)
pt3dadd(110.108, 84.807, -25.402, 0.896)
pt3dadd(110.03, 84.896, -25.419, 0.83)
pt3dadd(109.955, 84.982, -25.444, 0.768)
pt3dadd(109.893, 85.059, -25.501, 0.71)
pt3dadd(109.819, 85.103, -25.562, 0.662)
pt3dadd(109.73, 85.105, -25.628, 0.628)
pt3dadd(109.646, 85.122, -25.699, 0.622)
pt3dadd(109.563, 85.138, -25.769, 0.616)
}
}
proc shape3d_74() {
dend_7[66] { pt3dadd(109.479, 85.154, -25.84, 0.61)
pt3dadd(109.395, 85.171, -25.91, 0.604)
pt3dadd(109.3, 85.168, -25.97, 0.614)
pt3dadd(109.202, 85.161, -26.027, 0.628)
pt3dadd(109.104, 85.155, -26.085, 0.642)
pt3dadd(109.004, 85.148, -26.138, 0.656)
pt3dadd(108.89, 85.138, -26.169, 0.668)
pt3dadd(108.776, 85.128, -26.199, 0.682)
pt3dadd(108.662, 85.119, -26.229, 0.696)
pt3dadd(108.548, 85.109, -26.26, 0.71)
pt3dadd(108.434, 85.1, -26.29, 0.724)
pt3dadd(108.316, 85.102, -26.3, 0.742)
pt3dadd(108.196, 85.109, -26.3, 0.762)
pt3dadd(108.077, 85.116, -26.3, 0.784)
pt3dadd(107.957, 85.124, -26.3, 0.804)
pt3dadd(107.837, 85.131, -26.3, 0.824)
pt3dadd(107.717, 85.138, -26.3, 0.846)
pt3dadd(107.604, 85.17, -26.3, 0.882)
pt3dadd(107.494, 85.22, -26.3, 0.926)
pt3dadd(107.386, 85.271, -26.302, 0.974)
pt3dadd(107.278, 85.323, -26.307, 1.022)
pt3dadd(107.192, 85.387, -26.329, 1.054)
pt3dadd(107.154, 85.476, -26.388, 1.054)
pt3dadd(107.125, 85.575, -26.437, 1.046)
pt3dadd(107.107, 85.686, -26.471, 1.022)
pt3dadd(107.082, 85.795, -26.5, 0.992)
pt3dadd(107.017, 85.896, -26.5, 0.926)
pt3dadd(106.947, 85.994, -26.5, 0.896)
pt3dadd(106.876, 86.091, -26.5, 0.884)
pt3dadd(106.812, 86.19, -26.511, 0.878)
pt3dadd(106.753, 86.291, -26.533, 0.878)
pt3dadd(106.716, 86.347, -26.594, 0.878)
pt3dadd(106.699, 86.356, -26.692, 0.878)
pt3dadd(106.681, 86.365, -26.79, 0.878)
pt3dadd(106.599, 86.411, -26.854, 0.85)
pt3dadd(106.512, 86.459, -26.9, 0.816)
pt3dadd(106.406, 86.516, -26.9, 0.77)
pt3dadd(106.309, 86.58, -26.9, 0.712)
pt3dadd(106.282, 86.697, -26.9, 0.572)
pt3dadd(106.25, 86.812, -26.9, 0.448)
pt3dadd(106.191, 86.914, -26.891, 0.402)
pt3dadd(106.141, 87.013, -26.856, 0.426)
pt3dadd(106.086, 87.107, -26.82, 0.412)
pt3dadd(106.014, 87.198, -26.797, 0.386)
pt3dadd(105.926, 87.258, -26.756, 0.35)
pt3dadd(105.832, 87.301, -26.707, 0.306)
pt3dadd(105.722, 87.309, -26.67, 0.286)
pt3dadd(105.609, 87.311, -26.635, 0.268)
pt3dadd(105.497, 87.313, -26.6, 0.252)
pt3dadd(105.377, 87.3, -26.6, 0.238)
pt3dadd(105.258, 87.288, -26.6, 0.226)
}
dend_0[5] {pt3dclear()
pt3dstyle(1, 126.095, 92.601, 6.623)
pt3dadd(125.976, 92.622, 6.623, 13.19)
pt3dadd(125.858, 92.644, 6.622, 13.194)
pt3dadd(125.741, 92.665, 6.622, 13.2)
pt3dadd(125.622, 92.686, 6.621, 13.204)
pt3dadd(125.504, 92.708, 6.621, 13.21)
pt3dadd(125.386, 92.729, 6.62, 13.214)
pt3dadd(125.268, 92.751, 6.62, 13.218)
pt3dadd(125.15, 92.772, 6.619, 13.224)
pt3dadd(125.033, 92.798, 6.618, 13.112)
pt3dadd(124.916, 92.825, 6.618, 12.964)
pt3dadd(124.799, 92.852, 6.617, 12.816)
pt3dadd(124.682, 92.879, 6.616, 12.67)
pt3dadd(124.565, 92.906, 6.616, 12.522)
pt3dadd(124.448, 92.933, 6.615, 12.376)
pt3dadd(124.332, 92.96, 6.614, 12.228)
pt3dadd(124.214, 92.988, 6.614, 12.08)
pt3dadd(124.098, 93.015, 6.613, 11.934)
pt3dadd(123.98, 93.042, 6.612, 11.786)
pt3dadd(123.892, 93.023, 6.665, 11.602)
pt3dadd(123.81, 92.99, 6.733, 11.406)
pt3dadd(123.73, 92.957, 6.802, 11.212)
pt3dadd(123.648, 92.924, 6.87, 11.018)
}
dend_0[6] {pt3dclear()
pt3dadd(123.648, 92.924, 6.87, 11.018)
pt3dadd(123.605, 92.982, 6.839, 11.052)
pt3dadd(123.541, 93.068, 6.794, 11.102)
pt3dadd(123.476, 93.153, 6.749, 11.152)
pt3dadd(123.413, 93.239, 6.704, 11.204)
pt3dadd(123.349, 93.325, 6.658, 11.254)
pt3dadd(123.284, 93.411, 6.613, 11.306)
pt3dadd(123.19, 93.478, 6.603, 11.248)
pt3dadd(123.088, 93.54, 6.601, 11.164)
pt3dadd(122.986, 93.603, 6.6, 11.078)
pt3dadd(122.882, 93.665, 6.598, 10.994)
pt3dadd(122.78, 93.728, 6.596, 10.91)
pt3dadd(122.678, 93.79, 6.595, 10.826)
pt3dadd(122.575, 93.853, 6.593, 10.74)
pt3dadd(122.473, 93.915, 6.592, 10.656)
pt3dadd(122.37, 93.978, 6.59, 10.572)
pt3dadd(122.268, 94.04, 6.589, 10.488)
pt3dadd(122.171, 94.11, 6.586, 10.372)
pt3dadd(122.075, 94.182, 6.584, 10.248)
pt3dadd(121.978, 94.253, 6.582, 10.124)
pt3dadd(121.882, 94.325, 6.58, 10)
pt3dadd(121.786, 94.396, 6.577, 9.878)
pt3dadd(121.69, 94.467, 6.575, 9.754)
pt3dadd(121.592, 94.539, 6.573, 9.63)
pt3dadd(121.496, 94.611, 6.571, 9.508)
pt3dadd(121.4, 94.682, 6.568, 9.384)
pt3dadd(121.303, 94.754, 6.566, 9.26)
pt3dadd(121.201, 94.814, 6.561, 9.14)
pt3dadd(121.096, 94.873, 6.555, 9.02)
pt3dadd(120.991, 94.931, 6.55, 8.9)
pt3dadd(120.887, 94.99, 6.544, 8.78)
pt3dadd(120.782, 95.048, 6.539, 8.66)
pt3dadd(120.678, 95.106, 6.533, 8.542)
pt3dadd(120.574, 95.165, 6.527, 8.422)
pt3dadd(120.468, 95.223, 6.522, 8.302)
pt3dadd(120.364, 95.282, 6.516, 8.182)
pt3dadd(120.259, 95.34, 6.511, 8.062)
}
apic {pt3dclear()
pt3dadd(120.259, 95.34, 6.511, 8.062)
pt3dadd(120.156, 95.4, 6.503, 7.938)
pt3dadd(120.052, 95.46, 6.495, 7.814)
pt3dadd(119.948, 95.52, 6.487, 7.69)
pt3dadd(119.845, 95.579, 6.479, 7.566)
pt3dadd(119.741, 95.639, 6.471, 7.442)
pt3dadd(119.638, 95.699, 6.463, 7.316)
pt3dadd(119.534, 95.759, 6.455, 7.192)
pt3dadd(119.43, 95.819, 6.446, 7.068)
pt3dadd(119.327, 95.878, 6.438, 6.944)
pt3dadd(119.223, 95.938, 6.43, 6.82)
pt3dadd(119.122, 96, 6.418, 6.692)
pt3dadd(119.02, 96.062, 6.406, 6.564)
pt3dadd(118.919, 96.125, 6.394, 6.436)
pt3dadd(118.817, 96.187, 6.381, 6.308)
pt3dadd(118.716, 96.249, 6.368, 6.18)
pt3dadd(118.614, 96.311, 6.356, 6.05)
pt3dadd(118.513, 96.374, 6.343, 5.922)
pt3dadd(118.411, 96.436, 6.331, 5.794)
pt3dadd(118.31, 96.498, 6.318, 5.666)
pt3dadd(118.208, 96.56, 6.306, 5.538)
pt3dadd(118.106, 96.61, 6.274, 5.422)
pt3dadd(118.004, 96.659, 6.24, 5.308)
pt3dadd(117.902, 96.707, 6.206, 5.194)
pt3dadd(117.8, 96.755, 6.172, 5.08)
pt3dadd(117.698, 96.804, 6.138, 4.966)
pt3dadd(117.597, 96.852, 6.104, 4.852)
pt3dadd(117.495, 96.9, 6.07, 4.736)
pt3dadd(117.393, 96.949, 6.036, 4.622)
pt3dadd(117.291, 96.997, 6.002, 4.508)
pt3dadd(117.189, 97.045, 5.968, 4.394)
pt3dadd(117.09, 97.107, 5.943, 4.314)
pt3dadd(116.993, 97.171, 5.919, 4.238)
pt3dadd(116.895, 97.235, 5.896, 4.162)
pt3dadd(116.798, 97.298, 5.872, 4.086)
pt3dadd(116.7, 97.362, 5.848, 4.01)
pt3dadd(116.602, 97.426, 5.825, 3.934)
pt3dadd(116.505, 97.49, 5.801, 3.858)
pt3dadd(116.407, 97.553, 5.777, 3.782)
pt3dadd(116.309, 97.617, 5.754, 3.706)
pt3dadd(116.212, 97.681, 5.73, 3.63)
pt3dadd(116.117, 97.751, 5.713, 3.578)
pt3dadd(116.022, 97.822, 5.696, 3.528)
pt3dadd(115.927, 97.893, 5.679, 3.478)
pt3dadd(115.833, 97.964, 5.662, 3.428)
pt3dadd(115.738, 98.034, 5.645, 3.378)
pt3dadd(115.643, 98.105, 5.628, 3.328)
pt3dadd(115.548, 98.176, 5.611, 3.28)
pt3dadd(115.454, 98.247, 5.594, 3.23)
pt3dadd(115.359, 98.318, 5.577, 3.18)
pt3dadd(115.264, 98.388, 5.56, 3.13)
pt3dadd(115.172, 98.464, 5.551, 3.114)
pt3dadd(115.079, 98.54, 5.543, 3.098)
pt3dadd(114.987, 98.616, 5.534, 3.084)
pt3dadd(114.894, 98.691, 5.526, 3.07)
pt3dadd(114.802, 98.767, 5.517, 3.054)
pt3dadd(114.709, 98.843, 5.509, 3.04)
pt3dadd(114.617, 98.919, 5.5, 3.024)
pt3dadd(114.525, 98.994, 5.492, 3.01)
pt3dadd(114.432, 99.07, 5.483, 2.994)
pt3dadd(114.339, 99.146, 5.474, 2.98)
pt3dadd(114.249, 99.225, 5.472, 3.006)
pt3dadd(114.158, 99.303, 5.469, 3.032)
pt3dadd(114.067, 99.382, 5.467, 3.06)
pt3dadd(113.977, 99.46, 5.465, 3.086)
pt3dadd(113.886, 99.539, 5.462, 3.114)
pt3dadd(113.795, 99.617, 5.46, 3.14)
pt3dadd(113.705, 99.696, 5.457, 3.168)
pt3dadd(113.614, 99.774, 5.455, 3.194)
pt3dadd(113.523, 99.853, 5.453, 3.222)
pt3dadd(113.433, 99.931, 5.45, 3.248)
pt3dadd(113.341, 100.008, 5.45, 3.284)
pt3dadd(113.249, 100.086, 5.45, 3.322)
pt3dadd(113.157, 100.163, 5.45, 3.358)
pt3dadd(113.065, 100.239, 5.45, 3.396)
pt3dadd(112.973, 100.317, 5.451, 3.432)
pt3dadd(112.881, 100.394, 5.451, 3.468)
pt3dadd(112.788, 100.47, 5.451, 3.506)
pt3dadd(112.696, 100.548, 5.451, 3.542)
pt3dadd(112.604, 100.625, 5.451, 3.578)
pt3dadd(112.512, 100.701, 5.451, 3.616)
pt3dadd(112.41, 100.764, 5.451, 3.616)
pt3dadd(112.307, 100.825, 5.451, 3.616)
pt3dadd(112.204, 100.887, 5.451, 3.616)
pt3dadd(112.101, 100.949, 5.451, 3.616)
pt3dadd(111.998, 101.011, 5.451, 3.616)
pt3dadd(111.895, 101.073, 5.451, 3.616)
pt3dadd(111.792, 101.134, 5.451, 3.616)
pt3dadd(111.69, 101.196, 5.451, 3.616)
}
}
proc shape3d_75() {
apic { pt3dadd(111.587, 101.258, 5.451, 3.616)
pt3dadd(111.484, 101.32, 5.451, 3.616)
pt3dadd(111.387, 101.39, 5.451, 3.628)
pt3dadd(111.289, 101.46, 5.451, 3.64)
pt3dadd(111.192, 101.531, 5.451, 3.652)
pt3dadd(111.095, 101.601, 5.452, 3.664)
pt3dadd(110.998, 101.671, 5.452, 3.676)
pt3dadd(110.901, 101.742, 5.452, 3.688)
pt3dadd(110.803, 101.812, 5.452, 3.7)
pt3dadd(110.706, 101.882, 5.452, 3.712)
pt3dadd(110.609, 101.953, 5.452, 3.724)
pt3dadd(110.512, 102.023, 5.452, 3.736)
pt3dadd(110.418, 102.098, 5.453, 3.748)
pt3dadd(110.324, 102.173, 5.453, 3.758)
pt3dadd(110.231, 102.248, 5.453, 3.768)
pt3dadd(110.137, 102.323, 5.453, 3.778)
pt3dadd(110.044, 102.399, 5.453, 3.79)
pt3dadd(109.95, 102.474, 5.453, 3.8)
pt3dadd(109.856, 102.549, 5.453, 3.81)
pt3dadd(109.763, 102.624, 5.454, 3.82)
pt3dadd(109.669, 102.699, 5.454, 3.832)
pt3dadd(109.576, 102.774, 5.454, 3.842)
}
apic[1] {pt3dclear()
pt3dadd(109.576, 102.774, 5.454, 3.842)
pt3dadd(109.487, 102.854, 5.454, 3.842)
pt3dadd(109.398, 102.935, 5.454, 3.842)
pt3dadd(109.309, 103.015, 5.455, 3.842)
pt3dadd(109.221, 103.096, 5.455, 3.842)
pt3dadd(109.132, 103.177, 5.455, 3.842)
pt3dadd(109.043, 103.257, 5.455, 3.842)
pt3dadd(108.954, 103.338, 5.456, 3.842)
pt3dadd(108.865, 103.419, 5.456, 3.842)
pt3dadd(108.776, 103.499, 5.456, 3.842)
pt3dadd(108.687, 103.58, 5.456, 3.842)
pt3dadd(108.602, 103.665, 5.457, 3.8)
pt3dadd(108.518, 103.75, 5.457, 3.758)
pt3dadd(108.433, 103.835, 5.458, 3.716)
pt3dadd(108.348, 103.92, 5.458, 3.674)
pt3dadd(108.263, 104.004, 5.459, 3.632)
pt3dadd(108.179, 104.09, 5.459, 3.59)
pt3dadd(108.094, 104.175, 5.46, 3.546)
pt3dadd(108.009, 104.259, 5.46, 3.504)
pt3dadd(107.925, 104.344, 5.46, 3.462)
pt3dadd(107.84, 104.429, 5.461, 3.42)
pt3dadd(107.757, 104.516, 5.462, 3.372)
pt3dadd(107.674, 104.603, 5.462, 3.324)
pt3dadd(107.591, 104.689, 5.463, 3.276)
pt3dadd(107.508, 104.776, 5.463, 3.228)
pt3dadd(107.425, 104.863, 5.464, 3.18)
pt3dadd(107.342, 104.949, 5.464, 3.132)
pt3dadd(107.259, 105.036, 5.465, 3.082)
pt3dadd(107.176, 105.123, 5.466, 3.034)
pt3dadd(107.093, 105.21, 5.466, 2.986)
pt3dadd(107.01, 105.296, 5.467, 2.938)
pt3dadd(106.929, 105.385, 5.468, 2.938)
pt3dadd(106.848, 105.473, 5.469, 2.938)
pt3dadd(106.767, 105.562, 5.47, 2.938)
pt3dadd(106.686, 105.651, 5.471, 2.938)
pt3dadd(106.605, 105.739, 5.473, 2.938)
pt3dadd(106.524, 105.828, 5.474, 2.938)
pt3dadd(106.443, 105.916, 5.475, 2.938)
pt3dadd(106.362, 106.005, 5.476, 2.938)
pt3dadd(106.281, 106.093, 5.477, 2.938)
pt3dadd(106.2, 106.182, 5.478, 2.938)
pt3dadd(106.121, 106.272, 5.48, 2.906)
pt3dadd(106.042, 106.362, 5.482, 2.874)
pt3dadd(105.962, 106.452, 5.484, 2.844)
pt3dadd(105.883, 106.542, 5.486, 2.812)
pt3dadd(105.804, 106.632, 5.488, 2.78)
pt3dadd(105.724, 106.722, 5.489, 2.748)
pt3dadd(105.645, 106.812, 5.491, 2.716)
pt3dadd(105.566, 106.902, 5.493, 2.684)
pt3dadd(105.486, 106.992, 5.495, 2.654)
pt3dadd(105.407, 107.082, 5.497, 2.622)
pt3dadd(105.329, 107.173, 5.499, 2.562)
pt3dadd(105.251, 107.265, 5.502, 2.504)
pt3dadd(105.174, 107.356, 5.504, 2.446)
pt3dadd(105.096, 107.447, 5.507, 2.386)
pt3dadd(105.018, 107.538, 5.509, 2.328)
pt3dadd(104.94, 107.63, 5.511, 2.27)
pt3dadd(104.862, 107.721, 5.514, 2.21)
pt3dadd(104.785, 107.813, 5.516, 2.152)
pt3dadd(104.707, 107.904, 5.519, 2.092)
pt3dadd(104.629, 107.995, 5.521, 2.034)
}
apic[2] {pt3dclear()
pt3dadd(104.629, 107.995, 5.521, 2.034)
pt3dadd(104.596, 108.058, 5.525, 2.034)
pt3dadd(104.541, 108.164, 5.532, 2.034)
pt3dadd(104.486, 108.271, 5.539, 2.034)
pt3dadd(104.43, 108.377, 5.546, 2.034)
pt3dadd(104.375, 108.483, 5.553, 2.03)
pt3dadd(104.319, 108.589, 5.56, 2.026)
pt3dadd(104.264, 108.695, 5.568, 2.024)
pt3dadd(104.208, 108.801, 5.575, 2.02)
pt3dadd(104.153, 108.907, 5.582, 2.016)
pt3dadd(104.097, 109.013, 5.589, 2.012)
pt3dadd(104.041, 109.119, 5.596, 2.008)
pt3dadd(103.986, 109.225, 5.603, 2.004)
pt3dadd(103.93, 109.331, 5.61, 2)
pt3dadd(103.875, 109.437, 5.618, 1.996)
pt3dadd(103.813, 109.539, 5.628, 1.94)
pt3dadd(103.75, 109.64, 5.64, 1.874)
pt3dadd(103.687, 109.741, 5.651, 1.808)
pt3dadd(103.624, 109.843, 5.662, 1.742)
pt3dadd(103.562, 109.944, 5.674, 1.676)
pt3dadd(103.499, 110.045, 5.685, 1.61)
pt3dadd(103.436, 110.147, 5.696, 1.544)
pt3dadd(103.373, 110.248, 5.708, 1.476)
pt3dadd(103.31, 110.349, 5.719, 1.41)
pt3dadd(103.247, 110.451, 5.731, 1.344)
pt3dadd(103.195, 110.553, 5.758, 1.346)
pt3dadd(103.144, 110.656, 5.788, 1.362)
pt3dadd(103.094, 110.759, 5.818, 1.376)
pt3dadd(103.044, 110.861, 5.848, 1.392)
pt3dadd(102.993, 110.964, 5.878, 1.406)
pt3dadd(102.942, 111.066, 5.909, 1.422)
pt3dadd(102.892, 111.169, 5.939, 1.436)
pt3dadd(102.842, 111.272, 5.969, 1.45)
pt3dadd(102.791, 111.375, 5.999, 1.466)
pt3dadd(102.741, 111.477, 6.029, 1.48)
pt3dadd(102.688, 111.577, 6.064, 1.506)
pt3dadd(102.636, 111.677, 6.099, 1.534)
pt3dadd(102.584, 111.776, 6.133, 1.56)
pt3dadd(102.531, 111.876, 6.168, 1.588)
pt3dadd(102.479, 111.975, 6.203, 1.614)
pt3dadd(102.427, 112.075, 6.237, 1.642)
pt3dadd(102.374, 112.175, 6.272, 1.668)
pt3dadd(102.322, 112.274, 6.307, 1.694)
pt3dadd(102.27, 112.374, 6.341, 1.722)
pt3dadd(102.217, 112.474, 6.376, 1.748)
pt3dadd(102.151, 112.568, 6.404, 1.732)
pt3dadd(102.085, 112.662, 6.432, 1.716)
pt3dadd(102.019, 112.757, 6.46, 1.698)
pt3dadd(101.953, 112.851, 6.488, 1.682)
pt3dadd(101.887, 112.945, 6.516, 1.666)
pt3dadd(101.82, 113.04, 6.544, 1.648)
pt3dadd(101.754, 113.134, 6.572, 1.632)
pt3dadd(101.688, 113.228, 6.6, 1.616)
pt3dadd(101.622, 113.322, 6.629, 1.598)
pt3dadd(101.556, 113.417, 6.657, 1.582)
}
apic[3] {pt3dclear()
pt3dadd(101.556, 113.417, 6.657, 1.582)
pt3dadd(101.516, 113.485, 6.673, 1.556)
pt3dadd(101.457, 113.586, 6.697, 1.518)
pt3dadd(101.399, 113.686, 6.721, 1.478)
pt3dadd(101.34, 113.787, 6.746, 1.44)
pt3dadd(101.281, 113.887, 6.77, 1.402)
pt3dadd(101.222, 113.988, 6.794, 1.364)
pt3dadd(101.164, 114.088, 6.818, 1.324)
pt3dadd(101.105, 114.189, 6.843, 1.286)
pt3dadd(101.046, 114.289, 6.867, 1.248)
pt3dadd(100.97, 114.37, 6.901, 1.208)
pt3dadd(100.886, 114.443, 6.94, 1.17)
pt3dadd(100.803, 114.515, 6.979, 1.13)
pt3dadd(100.719, 114.587, 7.017, 1.09)
pt3dadd(100.635, 114.66, 7.056, 1.052)
pt3dadd(100.552, 114.732, 7.095, 1.012)
pt3dadd(100.468, 114.804, 7.134, 0.972)
pt3dadd(100.384, 114.876, 7.173, 0.932)
pt3dadd(100.3, 114.949, 7.211, 0.894)
pt3dadd(100.217, 115.021, 7.25, 0.854)
pt3dadd(100.123, 115.082, 7.286, 0.844)
pt3dadd(100.028, 115.142, 7.321, 0.836)
pt3dadd(99.933, 115.202, 7.357, 0.828)
pt3dadd(99.838, 115.262, 7.393, 0.822)
pt3dadd(99.744, 115.322, 7.428, 0.814)
pt3dadd(99.649, 115.382, 7.464, 0.806)
pt3dadd(99.554, 115.442, 7.499, 0.798)
pt3dadd(99.459, 115.502, 7.535, 0.79)
pt3dadd(99.364, 115.561, 7.57, 0.784)
pt3dadd(99.269, 115.621, 7.606, 0.776)
pt3dadd(99.168, 115.676, 7.633, 0.792)
pt3dadd(99.066, 115.73, 7.661, 0.81)
pt3dadd(98.964, 115.785, 7.688, 0.828)
pt3dadd(98.862, 115.839, 7.715, 0.846)
pt3dadd(98.76, 115.893, 7.742, 0.862)
pt3dadd(98.658, 115.948, 7.769, 0.88)
pt3dadd(98.557, 116.002, 7.797, 0.898)
pt3dadd(98.455, 116.056, 7.824, 0.916)
pt3dadd(98.353, 116.111, 7.851, 0.934)
pt3dadd(98.251, 116.165, 7.879, 0.952)
pt3dadd(98.14, 116.202, 7.9, 0.97)
pt3dadd(98.028, 116.239, 7.921, 0.988)
pt3dadd(97.917, 116.276, 7.943, 1.006)
pt3dadd(97.806, 116.313, 7.964, 1.024)
pt3dadd(97.695, 116.35, 7.985, 1.04)
pt3dadd(97.584, 116.387, 8.007, 1.058)
pt3dadd(97.472, 116.424, 8.028, 1.076)
pt3dadd(97.361, 116.461, 8.049, 1.094)
pt3dadd(97.25, 116.499, 8.071, 1.112)
pt3dadd(97.139, 116.536, 8.092, 1.13)
}
apic[4] {pt3dclear()
pt3dadd(97.139, 116.536, 8.092, 1.13)
pt3dadd(97.125, 116.539, 8.097, 1.128)
pt3dadd(97.017, 116.567, 8.133, 1.11)
pt3dadd(96.909, 116.595, 8.17, 1.094)
pt3dadd(96.801, 116.623, 8.207, 1.076)
pt3dadd(96.693, 116.652, 8.243, 1.058)
pt3dadd(96.585, 116.68, 8.28, 1.042)
pt3dadd(96.477, 116.708, 8.316, 1.024)
pt3dadd(96.369, 116.736, 8.353, 1.006)
pt3dadd(96.261, 116.764, 8.389, 0.99)
pt3dadd(96.153, 116.793, 8.426, 0.972)
pt3dadd(96.045, 116.821, 8.463, 0.954)
}
}
proc shape3d_76() {
apic[4] { pt3dadd(95.937, 116.849, 8.499, 0.938)
pt3dadd(95.83, 116.89, 8.528, 0.94)
pt3dadd(95.724, 116.937, 8.553, 0.952)
pt3dadd(95.618, 116.985, 8.578, 0.964)
pt3dadd(95.511, 117.031, 8.604, 0.974)
pt3dadd(95.405, 117.078, 8.629, 0.986)
pt3dadd(95.299, 117.126, 8.654, 0.998)
pt3dadd(95.193, 117.173, 8.679, 1.008)
pt3dadd(95.087, 117.219, 8.704, 1.02)
pt3dadd(94.981, 117.267, 8.73, 1.032)
pt3dadd(94.874, 117.314, 8.755, 1.042)
pt3dadd(94.767, 117.36, 8.774, 1.024)
pt3dadd(94.658, 117.407, 8.792, 0.998)
pt3dadd(94.55, 117.454, 8.81, 0.97)
pt3dadd(94.441, 117.501, 8.828, 0.944)
pt3dadd(94.333, 117.547, 8.846, 0.916)
pt3dadd(94.224, 117.594, 8.864, 0.89)
pt3dadd(94.116, 117.641, 8.882, 0.862)
pt3dadd(94.008, 117.688, 8.9, 0.834)
pt3dadd(93.899, 117.734, 8.918, 0.808)
pt3dadd(93.791, 117.781, 8.935, 0.78)
pt3dadd(93.681, 117.828, 8.948, 0.744)
pt3dadd(93.572, 117.874, 8.959, 0.706)
pt3dadd(93.462, 117.921, 8.97, 0.666)
pt3dadd(93.352, 117.967, 8.982, 0.626)
pt3dadd(93.242, 118.014, 8.993, 0.588)
pt3dadd(93.132, 118.06, 9.004, 0.548)
pt3dadd(93.023, 118.107, 9.015, 0.51)
pt3dadd(92.913, 118.154, 9.026, 0.47)
pt3dadd(92.803, 118.2, 9.037, 0.43)
pt3dadd(92.693, 118.247, 9.048, 0.392)
pt3dadd(92.587, 118.302, 9.055, 0.436)
pt3dadd(92.483, 118.36, 9.061, 0.504)
pt3dadd(92.378, 118.419, 9.067, 0.572)
pt3dadd(92.273, 118.477, 9.073, 0.64)
pt3dadd(92.168, 118.535, 9.078, 0.706)
pt3dadd(92.064, 118.593, 9.084, 0.774)
pt3dadd(91.959, 118.651, 9.09, 0.842)
pt3dadd(91.854, 118.71, 9.096, 0.91)
pt3dadd(91.75, 118.768, 9.101, 0.976)
pt3dadd(91.645, 118.826, 9.107, 1.044)
pt3dadd(91.534, 118.871, 9.116, 1.038)
pt3dadd(91.422, 118.912, 9.126, 1.012)
pt3dadd(91.31, 118.954, 9.135, 0.986)
pt3dadd(91.198, 118.995, 9.145, 0.962)
pt3dadd(91.086, 119.037, 9.155, 0.936)
pt3dadd(90.974, 119.078, 9.164, 0.91)
pt3dadd(90.862, 119.12, 9.174, 0.884)
pt3dadd(90.75, 119.161, 9.183, 0.858)
pt3dadd(90.638, 119.203, 9.193, 0.832)
pt3dadd(90.526, 119.244, 9.203, 0.806)
pt3dadd(90.416, 119.28, 9.226, 0.83)
pt3dadd(90.305, 119.315, 9.253, 0.866)
pt3dadd(90.195, 119.349, 9.28, 0.902)
pt3dadd(90.085, 119.384, 9.307, 0.936)
pt3dadd(89.975, 119.418, 9.335, 0.972)
pt3dadd(89.864, 119.452, 9.362, 1.008)
pt3dadd(89.754, 119.487, 9.389, 1.044)
pt3dadd(89.644, 119.521, 9.416, 1.08)
pt3dadd(89.534, 119.556, 9.443, 1.116)
pt3dadd(89.423, 119.59, 9.47, 1.152)
pt3dadd(89.316, 119.633, 9.498, 1.16)
pt3dadd(89.21, 119.676, 9.527, 1.168)
pt3dadd(89.103, 119.719, 9.555, 1.174)
pt3dadd(88.996, 119.762, 9.584, 1.18)
pt3dadd(88.89, 119.805, 9.612, 1.186)
pt3dadd(88.783, 119.848, 9.641, 1.192)
pt3dadd(88.677, 119.891, 9.669, 1.2)
pt3dadd(88.57, 119.935, 9.698, 1.206)
pt3dadd(88.463, 119.978, 9.726, 1.212)
pt3dadd(88.357, 120.02, 9.755, 1.218)
pt3dadd(88.254, 120.079, 9.771, 1.14)
pt3dadd(88.151, 120.139, 9.786, 1.06)
pt3dadd(88.049, 120.198, 9.802, 0.98)
pt3dadd(87.946, 120.258, 9.817, 0.902)
pt3dadd(87.843, 120.317, 9.833, 0.822)
pt3dadd(87.741, 120.376, 9.849, 0.742)
pt3dadd(87.638, 120.436, 9.864, 0.662)
pt3dadd(87.535, 120.494, 9.88, 0.582)
pt3dadd(87.433, 120.554, 9.895, 0.502)
pt3dadd(87.33, 120.613, 9.911, 0.422)
pt3dadd(87.226, 120.673, 9.913, 0.404)
pt3dadd(87.123, 120.733, 9.916, 0.384)
pt3dadd(87.019, 120.793, 9.918, 0.364)
pt3dadd(86.915, 120.853, 9.92, 0.344)
pt3dadd(86.811, 120.913, 9.923, 0.324)
pt3dadd(86.707, 120.974, 9.925, 0.304)
pt3dadd(86.603, 121.034, 9.928, 0.284)
pt3dadd(86.5, 121.094, 9.93, 0.266)
pt3dadd(86.396, 121.154, 9.932, 0.246)
pt3dadd(86.292, 121.214, 9.935, 0.226)
}
apic[5] {pt3dclear()
pt3dadd(86.292, 121.214, 9.935, 0.226)
pt3dadd(86.277, 121.237, 9.926, 0.226)
pt3dadd(86.214, 121.331, 9.892, 0.226)
pt3dadd(86.151, 121.424, 9.858, 0.226)
pt3dadd(86.088, 121.518, 9.824, 0.226)
pt3dadd(86.025, 121.612, 9.79, 0.226)
pt3dadd(85.962, 121.705, 9.755, 0.226)
pt3dadd(85.899, 121.799, 9.721, 0.226)
pt3dadd(85.835, 121.895, 9.695, 0.232)
pt3dadd(85.77, 121.992, 9.672, 0.242)
pt3dadd(85.705, 122.089, 9.649, 0.252)
pt3dadd(85.64, 122.186, 9.626, 0.26)
pt3dadd(85.575, 122.284, 9.603, 0.27)
pt3dadd(85.51, 122.38, 9.58, 0.28)
pt3dadd(85.445, 122.477, 9.557, 0.288)
pt3dadd(85.38, 122.574, 9.535, 0.298)
pt3dadd(85.316, 122.671, 9.512, 0.308)
pt3dadd(85.251, 122.768, 9.489, 0.316)
pt3dadd(85.189, 122.87, 9.481, 0.336)
pt3dadd(85.129, 122.975, 9.479, 0.358)
pt3dadd(85.068, 123.078, 9.476, 0.382)
pt3dadd(85.008, 123.181, 9.474, 0.404)
pt3dadd(84.947, 123.286, 9.472, 0.426)
pt3dadd(84.887, 123.389, 9.469, 0.45)
pt3dadd(84.826, 123.492, 9.467, 0.472)
pt3dadd(84.766, 123.596, 9.465, 0.494)
pt3dadd(84.706, 123.7, 9.462, 0.518)
pt3dadd(84.645, 123.804, 9.46, 0.54)
pt3dadd(84.603, 123.912, 9.484, 0.574)
pt3dadd(84.562, 124.02, 9.51, 0.608)
pt3dadd(84.522, 124.128, 9.537, 0.644)
pt3dadd(84.481, 124.237, 9.563, 0.678)
pt3dadd(84.44, 124.345, 9.589, 0.712)
pt3dadd(84.399, 124.453, 9.615, 0.748)
pt3dadd(84.358, 124.562, 9.641, 0.782)
pt3dadd(84.317, 124.67, 9.667, 0.816)
pt3dadd(84.276, 124.778, 9.693, 0.852)
pt3dadd(84.235, 124.888, 9.719, 0.886)
pt3dadd(84.181, 124.991, 9.741, 0.874)
pt3dadd(84.126, 125.094, 9.762, 0.86)
pt3dadd(84.071, 125.197, 9.784, 0.846)
pt3dadd(84.016, 125.302, 9.805, 0.832)
pt3dadd(83.96, 125.405, 9.827, 0.818)
pt3dadd(83.905, 125.508, 9.848, 0.804)
pt3dadd(83.85, 125.611, 9.87, 0.79)
pt3dadd(83.795, 125.714, 9.891, 0.776)
pt3dadd(83.74, 125.818, 9.913, 0.762)
pt3dadd(83.685, 125.922, 9.934, 0.746)
pt3dadd(83.64, 126.031, 9.949, 0.73)
pt3dadd(83.595, 126.142, 9.964, 0.712)
pt3dadd(83.551, 126.251, 9.979, 0.694)
pt3dadd(83.506, 126.361, 9.994, 0.676)
pt3dadd(83.462, 126.472, 10.009, 0.66)
pt3dadd(83.417, 126.581, 10.024, 0.642)
pt3dadd(83.373, 126.691, 10.039, 0.624)
pt3dadd(83.328, 126.802, 10.054, 0.606)
pt3dadd(83.284, 126.911, 10.069, 0.588)
pt3dadd(83.239, 127.021, 10.084, 0.572)
pt3dadd(83.206, 127.136, 10.091, 0.552)
pt3dadd(83.173, 127.252, 10.097, 0.534)
pt3dadd(83.14, 127.367, 10.104, 0.516)
pt3dadd(83.107, 127.482, 10.111, 0.498)
pt3dadd(83.074, 127.597, 10.118, 0.478)
pt3dadd(83.041, 127.711, 10.124, 0.46)
pt3dadd(83.009, 127.826, 10.131, 0.442)
pt3dadd(82.976, 127.942, 10.138, 0.424)
pt3dadd(82.943, 128.057, 10.145, 0.406)
pt3dadd(82.91, 128.172, 10.151, 0.386)
pt3dadd(82.881, 128.288, 10.151, 0.378)
pt3dadd(82.851, 128.405, 10.151, 0.37)
pt3dadd(82.822, 128.521, 10.15, 0.362)
pt3dadd(82.793, 128.638, 10.15, 0.352)
pt3dadd(82.764, 128.754, 10.15, 0.344)
pt3dadd(82.734, 128.87, 10.15, 0.336)
pt3dadd(82.705, 128.987, 10.149, 0.326)
pt3dadd(82.676, 129.103, 10.149, 0.318)
pt3dadd(82.647, 129.22, 10.149, 0.31)
pt3dadd(82.617, 129.336, 10.149, 0.304)
pt3dadd(82.572, 129.448, 10.148, 0.358)
pt3dadd(82.528, 129.559, 10.148, 0.41)
pt3dadd(82.483, 129.67, 10.147, 0.464)
pt3dadd(82.438, 129.781, 10.147, 0.518)
pt3dadd(82.394, 129.893, 10.146, 0.572)
pt3dadd(82.349, 130.004, 10.146, 0.624)
pt3dadd(82.305, 130.116, 10.146, 0.678)
pt3dadd(82.26, 130.228, 10.145, 0.732)
pt3dadd(82.215, 130.338, 10.144, 0.786)
pt3dadd(82.171, 130.45, 10.144, 0.836)
pt3dadd(82.14, 130.566, 10.143, 0.826)
pt3dadd(82.109, 130.682, 10.142, 0.818)
pt3dadd(82.078, 130.798, 10.141, 0.808)
pt3dadd(82.047, 130.914, 10.14, 0.798)
pt3dadd(82.016, 131.029, 10.139, 0.788)
pt3dadd(81.984, 131.146, 10.138, 0.778)
pt3dadd(81.953, 131.261, 10.137, 0.768)
pt3dadd(81.922, 131.377, 10.136, 0.76)
pt3dadd(81.891, 131.494, 10.135, 0.75)
pt3dadd(81.861, 131.609, 10.134, 0.738)
pt3dadd(81.842, 131.728, 10.132, 0.706)
pt3dadd(81.823, 131.846, 10.13, 0.674)
pt3dadd(81.804, 131.964, 10.128, 0.642)
pt3dadd(81.785, 132.083, 10.127, 0.612)
pt3dadd(81.766, 132.202, 10.125, 0.58)
pt3dadd(81.747, 132.32, 10.123, 0.548)
pt3dadd(81.729, 132.438, 10.121, 0.516)
pt3dadd(81.71, 132.557, 10.119, 0.484)
pt3dadd(81.691, 132.676, 10.117, 0.452)
pt3dadd(81.673, 132.794, 10.115, 0.42)
pt3dadd(81.665, 132.913, 10.111, 0.4)
}
}
proc shape3d_77() {
apic[5] { pt3dadd(81.658, 133.033, 10.108, 0.382)
pt3dadd(81.65, 133.153, 10.104, 0.362)
pt3dadd(81.643, 133.273, 10.1, 0.342)
pt3dadd(81.635, 133.392, 10.096, 0.322)
pt3dadd(81.628, 133.512, 10.092, 0.302)
pt3dadd(81.621, 133.632, 10.088, 0.284)
pt3dadd(81.613, 133.751, 10.084, 0.264)
pt3dadd(81.606, 133.871, 10.08, 0.244)
pt3dadd(81.599, 133.991, 10.076, 0.228)
pt3dadd(81.597, 134.111, 10.069, 0.24)
pt3dadd(81.596, 134.23, 10.062, 0.252)
pt3dadd(81.595, 134.35, 10.056, 0.266)
pt3dadd(81.594, 134.47, 10.049, 0.278)
pt3dadd(81.593, 134.59, 10.042, 0.292)
pt3dadd(81.591, 134.71, 10.035, 0.304)
pt3dadd(81.59, 134.828, 10.028, 0.318)
pt3dadd(81.589, 134.948, 10.022, 0.33)
pt3dadd(81.588, 135.068, 10.015, 0.344)
pt3dadd(81.587, 135.188, 10.007, 0.358)
pt3dadd(81.584, 135.307, 9.994, 0.382)
pt3dadd(81.582, 135.426, 9.98, 0.408)
pt3dadd(81.58, 135.545, 9.967, 0.434)
pt3dadd(81.577, 135.664, 9.954, 0.458)
pt3dadd(81.575, 135.782, 9.94, 0.484)
pt3dadd(81.573, 135.901, 9.927, 0.51)
pt3dadd(81.571, 136.02, 9.913, 0.534)
pt3dadd(81.568, 136.139, 9.899, 0.56)
pt3dadd(81.566, 136.258, 9.886, 0.586)
pt3dadd(81.563, 136.376, 9.87, 0.602)
pt3dadd(81.559, 136.489, 9.837, 0.564)
pt3dadd(81.555, 136.602, 9.804, 0.528)
pt3dadd(81.551, 136.715, 9.771, 0.49)
pt3dadd(81.547, 136.829, 9.738, 0.452)
pt3dadd(81.543, 136.942, 9.705, 0.414)
pt3dadd(81.539, 137.054, 9.671, 0.376)
pt3dadd(81.535, 137.168, 9.638, 0.338)
pt3dadd(81.531, 137.281, 9.605, 0.3)
pt3dadd(81.527, 137.394, 9.572, 0.264)
pt3dadd(81.522, 137.508, 9.542, 0.234)
pt3dadd(81.512, 137.627, 9.527, 0.254)
pt3dadd(81.501, 137.744, 9.512, 0.276)
pt3dadd(81.491, 137.863, 9.498, 0.298)
pt3dadd(81.481, 137.981, 9.483, 0.318)
pt3dadd(81.47, 138.1, 9.469, 0.34)
pt3dadd(81.46, 138.218, 9.454, 0.362)
pt3dadd(81.45, 138.336, 9.44, 0.384)
pt3dadd(81.439, 138.455, 9.425, 0.404)
pt3dadd(81.429, 138.572, 9.411, 0.426)
pt3dadd(81.416, 138.69, 9.403, 0.448)
pt3dadd(81.387, 138.797, 9.442, 0.476)
pt3dadd(81.358, 138.904, 9.48, 0.502)
pt3dadd(81.329, 139.01, 9.519, 0.53)
pt3dadd(81.3, 139.117, 9.558, 0.558)
pt3dadd(81.271, 139.224, 9.596, 0.584)
pt3dadd(81.242, 139.331, 9.635, 0.612)
pt3dadd(81.213, 139.438, 9.674, 0.64)
pt3dadd(81.184, 139.544, 9.712, 0.666)
pt3dadd(81.155, 139.651, 9.751, 0.694)
pt3dadd(81.118, 139.756, 9.786, 0.718)
pt3dadd(81.062, 139.858, 9.812, 0.73)
pt3dadd(81.006, 139.96, 9.838, 0.742)
pt3dadd(80.951, 140.06, 9.863, 0.756)
pt3dadd(80.895, 140.162, 9.889, 0.768)
pt3dadd(80.839, 140.264, 9.915, 0.78)
pt3dadd(80.783, 140.365, 9.941, 0.794)
pt3dadd(80.727, 140.467, 9.966, 0.806)
pt3dadd(80.671, 140.568, 9.992, 0.818)
pt3dadd(80.615, 140.67, 10.018, 0.832)
pt3dadd(80.563, 140.774, 10.039, 0.822)
pt3dadd(80.522, 140.887, 10.051, 0.762)
pt3dadd(80.481, 140.999, 10.063, 0.702)
pt3dadd(80.44, 141.11, 10.075, 0.642)
pt3dadd(80.399, 141.222, 10.086, 0.58)
pt3dadd(80.358, 141.335, 10.098, 0.52)
pt3dadd(80.317, 141.446, 10.109, 0.46)
pt3dadd(80.276, 141.558, 10.121, 0.4)
pt3dadd(80.235, 141.67, 10.133, 0.338)
pt3dadd(80.194, 141.782, 10.144, 0.278)
pt3dadd(80.157, 141.895, 10.153, 0.246)
pt3dadd(80.128, 142.012, 10.153, 0.282)
pt3dadd(80.099, 142.128, 10.153, 0.318)
pt3dadd(80.07, 142.244, 10.153, 0.354)
pt3dadd(80.041, 142.361, 10.154, 0.39)
pt3dadd(80.012, 142.477, 10.154, 0.426)
pt3dadd(79.983, 142.594, 10.154, 0.462)
pt3dadd(79.954, 142.71, 10.154, 0.496)
pt3dadd(79.925, 142.826, 10.154, 0.532)
pt3dadd(79.896, 142.943, 10.154, 0.568)
pt3dadd(79.863, 143.058, 10.155, 0.592)
pt3dadd(79.819, 143.17, 10.155, 0.588)
pt3dadd(79.775, 143.281, 10.155, 0.582)
pt3dadd(79.731, 143.393, 10.155, 0.576)
pt3dadd(79.687, 143.504, 10.155, 0.572)
pt3dadd(79.643, 143.616, 10.155, 0.566)
pt3dadd(79.599, 143.728, 10.155, 0.56)
pt3dadd(79.555, 143.839, 10.155, 0.556)
pt3dadd(79.511, 143.951, 10.155, 0.55)
pt3dadd(79.467, 144.062, 10.155, 0.544)
pt3dadd(79.423, 144.174, 10.155, 0.536)
pt3dadd(79.379, 144.287, 10.155, 0.518)
pt3dadd(79.335, 144.398, 10.155, 0.5)
pt3dadd(79.292, 144.51, 10.155, 0.482)
pt3dadd(79.248, 144.622, 10.155, 0.464)
pt3dadd(79.205, 144.733, 10.155, 0.446)
pt3dadd(79.161, 144.846, 10.155, 0.428)
pt3dadd(79.117, 144.958, 10.155, 0.41)
pt3dadd(79.074, 145.069, 10.155, 0.392)
pt3dadd(79.03, 145.181, 10.155, 0.374)
pt3dadd(78.989, 145.294, 10.155, 0.358)
pt3dadd(78.952, 145.408, 10.155, 0.35)
pt3dadd(78.915, 145.522, 10.155, 0.342)
pt3dadd(78.878, 145.636, 10.155, 0.332)
pt3dadd(78.841, 145.75, 10.155, 0.324)
pt3dadd(78.804, 145.864, 10.154, 0.316)
pt3dadd(78.767, 145.979, 10.154, 0.306)
pt3dadd(78.73, 146.093, 10.154, 0.298)
pt3dadd(78.693, 146.207, 10.154, 0.29)
pt3dadd(78.656, 146.321, 10.154, 0.28)
pt3dadd(78.62, 146.435, 10.154, 0.28)
pt3dadd(78.587, 146.551, 10.154, 0.3)
pt3dadd(78.553, 146.666, 10.154, 0.318)
pt3dadd(78.52, 146.782, 10.154, 0.336)
pt3dadd(78.487, 146.897, 10.154, 0.356)
pt3dadd(78.453, 147.012, 10.154, 0.374)
pt3dadd(78.42, 147.127, 10.154, 0.394)
pt3dadd(78.386, 147.242, 10.154, 0.412)
pt3dadd(78.353, 147.358, 10.154, 0.43)
pt3dadd(78.32, 147.473, 10.154, 0.45)
pt3dadd(78.279, 147.584, 10.154, 0.468)
pt3dadd(78.223, 147.691, 10.154, 0.486)
pt3dadd(78.168, 147.798, 10.154, 0.504)
pt3dadd(78.113, 147.905, 10.154, 0.52)
pt3dadd(78.057, 148.01, 10.154, 0.538)
pt3dadd(78.002, 148.117, 10.154, 0.556)
pt3dadd(77.947, 148.224, 10.154, 0.574)
pt3dadd(77.892, 148.331, 10.154, 0.59)
pt3dadd(77.836, 148.436, 10.154, 0.608)
pt3dadd(77.781, 148.543, 10.154, 0.626)
pt3dadd(77.727, 148.65, 10.154, 0.638)
pt3dadd(77.674, 148.758, 10.154, 0.642)
pt3dadd(77.622, 148.866, 10.154, 0.646)
pt3dadd(77.569, 148.974, 10.154, 0.65)
pt3dadd(77.517, 149.082, 10.154, 0.654)
pt3dadd(77.464, 149.19, 10.154, 0.66)
pt3dadd(77.412, 149.298, 10.154, 0.664)
pt3dadd(77.359, 149.406, 10.154, 0.668)
pt3dadd(77.307, 149.514, 10.154, 0.672)
pt3dadd(77.255, 149.622, 10.154, 0.676)
pt3dadd(77.199, 149.728, 10.154, 0.678)
pt3dadd(77.136, 149.83, 10.154, 0.678)
pt3dadd(77.073, 149.933, 10.154, 0.678)
pt3dadd(77.01, 150.035, 10.154, 0.678)
pt3dadd(76.947, 150.137, 10.154, 0.678)
pt3dadd(76.884, 150.239, 10.154, 0.678)
pt3dadd(76.822, 150.341, 10.154, 0.678)
pt3dadd(76.759, 150.444, 10.154, 0.678)
pt3dadd(76.696, 150.546, 10.154, 0.678)
pt3dadd(76.633, 150.648, 10.154, 0.678)
pt3dadd(76.565, 150.746, 10.154, 0.674)
pt3dadd(76.488, 150.839, 10.153, 0.662)
pt3dadd(76.411, 150.931, 10.153, 0.652)
pt3dadd(76.335, 151.022, 10.153, 0.64)
pt3dadd(76.258, 151.115, 10.153, 0.628)
pt3dadd(76.181, 151.207, 10.153, 0.618)
pt3dadd(76.104, 151.3, 10.153, 0.606)
pt3dadd(76.027, 151.392, 10.153, 0.594)
pt3dadd(75.951, 151.484, 10.153, 0.584)
pt3dadd(75.874, 151.577, 10.153, 0.572)
pt3dadd(75.793, 151.664, 10.153, 0.55)
pt3dadd(75.707, 151.748, 10.152, 0.516)
pt3dadd(75.621, 151.832, 10.152, 0.482)
pt3dadd(75.535, 151.915, 10.152, 0.448)
pt3dadd(75.449, 151.999, 10.152, 0.414)
pt3dadd(75.362, 152.082, 10.152, 0.38)
pt3dadd(75.276, 152.166, 10.151, 0.346)
pt3dadd(75.19, 152.25, 10.151, 0.312)
pt3dadd(75.104, 152.333, 10.151, 0.276)
pt3dadd(75.018, 152.417, 10.151, 0.242)
pt3dadd(74.945, 152.51, 10.15, 0.226)
pt3dadd(74.886, 152.615, 10.15, 0.226)
pt3dadd(74.826, 152.719, 10.15, 0.226)
pt3dadd(74.766, 152.824, 10.149, 0.226)
pt3dadd(74.706, 152.927, 10.149, 0.226)
pt3dadd(74.646, 153.031, 10.149, 0.226)
pt3dadd(74.587, 153.136, 10.148, 0.226)
pt3dadd(74.527, 153.239, 10.148, 0.226)
pt3dadd(74.467, 153.343, 10.147, 0.226)
pt3dadd(74.407, 153.448, 10.147, 0.226)
pt3dadd(74.358, 153.556, 10.146, 0.226)
pt3dadd(74.317, 153.67, 10.146, 0.228)
pt3dadd(74.277, 153.782, 10.145, 0.228)
pt3dadd(74.236, 153.895, 10.144, 0.228)
pt3dadd(74.196, 154.008, 10.144, 0.23)
pt3dadd(74.155, 154.121, 10.143, 0.23)
pt3dadd(74.115, 154.234, 10.142, 0.23)
pt3dadd(74.074, 154.346, 10.141, 0.232)
pt3dadd(74.033, 154.459, 10.141, 0.232)
pt3dadd(73.993, 154.572, 10.14, 0.232)
pt3dadd(73.943, 154.681, 10.139, 0.242)
pt3dadd(73.885, 154.787, 10.138, 0.258)
}
}
proc shape3d_78() {
apic[5] { pt3dadd(73.827, 154.891, 10.136, 0.276)
pt3dadd(73.77, 154.997, 10.135, 0.292)
pt3dadd(73.712, 155.102, 10.134, 0.31)
pt3dadd(73.654, 155.207, 10.133, 0.326)
pt3dadd(73.596, 155.312, 10.131, 0.342)
pt3dadd(73.539, 155.418, 10.13, 0.36)
pt3dadd(73.481, 155.522, 10.129, 0.376)
pt3dadd(73.423, 155.628, 10.128, 0.394)
pt3dadd(73.361, 155.73, 10.126, 0.398)
pt3dadd(73.294, 155.83, 10.124, 0.392)
pt3dadd(73.227, 155.929, 10.122, 0.386)
pt3dadd(73.161, 156.029, 10.12, 0.38)
pt3dadd(73.094, 156.13, 10.118, 0.374)
pt3dadd(73.027, 156.229, 10.116, 0.37)
pt3dadd(72.96, 156.329, 10.114, 0.364)
pt3dadd(72.894, 156.428, 10.111, 0.358)
pt3dadd(72.827, 156.528, 10.109, 0.352)
pt3dadd(72.76, 156.628, 10.107, 0.346)
pt3dadd(72.694, 156.727, 10.105, 0.336)
pt3dadd(72.628, 156.828, 10.101, 0.324)
pt3dadd(72.562, 156.928, 10.098, 0.314)
pt3dadd(72.495, 157.027, 10.094, 0.302)
pt3dadd(72.429, 157.128, 10.091, 0.29)
pt3dadd(72.363, 157.228, 10.088, 0.278)
pt3dadd(72.297, 157.327, 10.084, 0.266)
pt3dadd(72.231, 157.428, 10.081, 0.254)
pt3dadd(72.165, 157.528, 10.078, 0.242)
pt3dadd(72.098, 157.627, 10.074, 0.23)
pt3dadd(72.04, 157.732, 10.069, 0.226)
pt3dadd(71.988, 157.84, 10.063, 0.226)
pt3dadd(71.935, 157.948, 10.056, 0.226)
pt3dadd(71.882, 158.054, 10.05, 0.226)
pt3dadd(71.83, 158.162, 10.043, 0.226)
pt3dadd(71.777, 158.27, 10.037, 0.226)
pt3dadd(71.725, 158.377, 10.03, 0.226)
pt3dadd(71.672, 158.485, 10.024, 0.226)
pt3dadd(71.62, 158.593, 10.017, 0.226)
pt3dadd(71.567, 158.701, 10.011, 0.226)
pt3dadd(71.512, 158.807, 10.002, 0.236)
pt3dadd(71.456, 158.912, 9.992, 0.25)
pt3dadd(71.399, 159.017, 9.982, 0.266)
pt3dadd(71.343, 159.122, 9.972, 0.282)
pt3dadd(71.286, 159.227, 9.961, 0.298)
pt3dadd(71.23, 159.332, 9.951, 0.314)
pt3dadd(71.173, 159.438, 9.941, 0.33)
pt3dadd(71.117, 159.542, 9.931, 0.344)
pt3dadd(71.06, 159.648, 9.92, 0.36)
pt3dadd(71.004, 159.754, 9.91, 0.376)
pt3dadd(70.954, 159.859, 9.891, 0.386)
pt3dadd(70.91, 159.966, 9.865, 0.394)
pt3dadd(70.866, 160.074, 9.839, 0.4)
pt3dadd(70.822, 160.181, 9.813, 0.408)
pt3dadd(70.778, 160.288, 9.787, 0.414)
pt3dadd(70.734, 160.396, 9.761, 0.422)
pt3dadd(70.69, 160.502, 9.735, 0.428)
pt3dadd(70.646, 160.609, 9.709, 0.436)
pt3dadd(70.602, 160.717, 9.683, 0.442)
pt3dadd(70.558, 160.824, 9.657, 0.45)
pt3dadd(70.523, 160.932, 9.626, 0.448)
pt3dadd(70.491, 161.041, 9.592, 0.444)
pt3dadd(70.459, 161.149, 9.559, 0.438)
pt3dadd(70.427, 161.258, 9.526, 0.434)
pt3dadd(70.395, 161.366, 9.492, 0.43)
pt3dadd(70.363, 161.474, 9.459, 0.424)
pt3dadd(70.331, 161.584, 9.426, 0.42)
pt3dadd(70.299, 161.692, 9.392, 0.414)
pt3dadd(70.267, 161.801, 9.359, 0.41)
pt3dadd(70.235, 161.909, 9.326, 0.406)
pt3dadd(70.207, 162.02, 9.299, 0.39)
pt3dadd(70.18, 162.134, 9.274, 0.374)
pt3dadd(70.154, 162.247, 9.25, 0.356)
pt3dadd(70.127, 162.361, 9.225, 0.338)
pt3dadd(70.1, 162.474, 9.201, 0.32)
pt3dadd(70.074, 162.587, 9.176, 0.302)
pt3dadd(70.047, 162.701, 9.152, 0.284)
pt3dadd(70.02, 162.814, 9.127, 0.266)
pt3dadd(69.994, 162.926, 9.103, 0.248)
pt3dadd(69.967, 163.04, 9.078, 0.23)
pt3dadd(69.927, 163.151, 9.062, 0.226)
pt3dadd(69.882, 163.261, 9.047, 0.226)
pt3dadd(69.836, 163.37, 9.033, 0.226)
pt3dadd(69.791, 163.481, 9.019, 0.226)
pt3dadd(69.746, 163.59, 9.005, 0.226)
pt3dadd(69.701, 163.7, 8.991, 0.226)
pt3dadd(69.656, 163.81, 8.977, 0.226)
pt3dadd(69.61, 163.92, 8.963, 0.226)
pt3dadd(69.565, 164.03, 8.949, 0.226)
pt3dadd(69.52, 164.14, 8.935, 0.226)
pt3dadd(69.482, 164.252, 8.926, 0.226)
pt3dadd(69.447, 164.368, 8.918, 0.226)
pt3dadd(69.412, 164.482, 8.911, 0.226)
pt3dadd(69.377, 164.597, 8.904, 0.226)
pt3dadd(69.342, 164.711, 8.897, 0.226)
pt3dadd(69.308, 164.825, 8.889, 0.226)
pt3dadd(69.273, 164.94, 8.882, 0.226)
pt3dadd(69.238, 165.054, 8.875, 0.226)
pt3dadd(69.203, 165.169, 8.868, 0.226)
pt3dadd(69.168, 165.283, 8.861, 0.226)
pt3dadd(69.141, 165.398, 8.846, 0.24)
pt3dadd(69.116, 165.515, 8.83, 0.26)
pt3dadd(69.092, 165.63, 8.813, 0.278)
pt3dadd(69.067, 165.746, 8.797, 0.298)
pt3dadd(69.043, 165.862, 8.78, 0.316)
pt3dadd(69.018, 165.978, 8.764, 0.334)
pt3dadd(68.994, 166.093, 8.747, 0.354)
pt3dadd(68.969, 166.21, 8.731, 0.372)
pt3dadd(68.944, 166.325, 8.714, 0.392)
pt3dadd(68.92, 166.441, 8.698, 0.41)
pt3dadd(68.902, 166.558, 8.681, 0.436)
pt3dadd(68.885, 166.675, 8.665, 0.464)
pt3dadd(68.868, 166.792, 8.649, 0.49)
pt3dadd(68.851, 166.909, 8.632, 0.516)
pt3dadd(68.834, 167.027, 8.616, 0.544)
pt3dadd(68.818, 167.143, 8.6, 0.57)
pt3dadd(68.801, 167.261, 8.583, 0.598)
pt3dadd(68.784, 167.378, 8.567, 0.624)
pt3dadd(68.767, 167.495, 8.551, 0.652)
pt3dadd(68.75, 167.612, 8.535, 0.678)
pt3dadd(68.737, 167.73, 8.549, 0.674)
pt3dadd(68.723, 167.849, 8.562, 0.672)
pt3dadd(68.709, 167.966, 8.576, 0.668)
pt3dadd(68.696, 168.085, 8.59, 0.666)
pt3dadd(68.682, 168.203, 8.604, 0.662)
pt3dadd(68.669, 168.32, 8.618, 0.66)
pt3dadd(68.655, 168.439, 8.631, 0.656)
pt3dadd(68.642, 168.557, 8.645, 0.654)
pt3dadd(68.628, 168.676, 8.659, 0.65)
pt3dadd(68.614, 168.793, 8.673, 0.646)
pt3dadd(68.59, 168.91, 8.684, 0.61)
pt3dadd(68.567, 169.027, 8.695, 0.572)
pt3dadd(68.543, 169.144, 8.706, 0.534)
pt3dadd(68.519, 169.261, 8.717, 0.496)
pt3dadd(68.495, 169.378, 8.728, 0.46)
pt3dadd(68.471, 169.494, 8.739, 0.422)
pt3dadd(68.447, 169.612, 8.75, 0.384)
pt3dadd(68.423, 169.728, 8.761, 0.348)
pt3dadd(68.399, 169.844, 8.772, 0.31)
pt3dadd(68.375, 169.962, 8.783, 0.274)
pt3dadd(68.321, 170.069, 8.788, 0.298)
pt3dadd(68.267, 170.176, 8.794, 0.324)
pt3dadd(68.213, 170.282, 8.8, 0.348)
pt3dadd(68.159, 170.389, 8.805, 0.372)
pt3dadd(68.105, 170.496, 8.811, 0.398)
pt3dadd(68.051, 170.603, 8.816, 0.422)
pt3dadd(67.997, 170.71, 8.822, 0.446)
pt3dadd(67.942, 170.816, 8.827, 0.472)
pt3dadd(67.888, 170.924, 8.833, 0.496)
pt3dadd(67.834, 171.03, 8.838, 0.52)
pt3dadd(67.768, 171.131, 8.836, 0.536)
pt3dadd(67.703, 171.232, 8.835, 0.552)
pt3dadd(67.638, 171.332, 8.833, 0.568)
pt3dadd(67.573, 171.433, 8.832, 0.584)
pt3dadd(67.508, 171.534, 8.83, 0.6)
pt3dadd(67.443, 171.635, 8.828, 0.616)
pt3dadd(67.378, 171.736, 8.827, 0.632)
pt3dadd(67.313, 171.836, 8.825, 0.648)
pt3dadd(67.248, 171.937, 8.824, 0.664)
pt3dadd(67.182, 172.038, 8.821, 0.678)
pt3dadd(67.113, 172.135, 8.813, 0.678)
pt3dadd(67.043, 172.232, 8.804, 0.678)
pt3dadd(66.973, 172.33, 8.796, 0.678)
pt3dadd(66.903, 172.427, 8.787, 0.678)
pt3dadd(66.833, 172.523, 8.779, 0.678)
pt3dadd(66.763, 172.62, 8.77, 0.678)
pt3dadd(66.693, 172.717, 8.761, 0.678)
pt3dadd(66.624, 172.814, 8.753, 0.678)
pt3dadd(66.554, 172.912, 8.744, 0.678)
pt3dadd(66.486, 173.009, 8.733, 0.678)
pt3dadd(66.434, 173.112, 8.705, 0.678)
pt3dadd(66.381, 173.214, 8.676, 0.678)
pt3dadd(66.329, 173.316, 8.648, 0.678)
pt3dadd(66.276, 173.419, 8.619, 0.678)
pt3dadd(66.224, 173.521, 8.591, 0.678)
pt3dadd(66.172, 173.623, 8.562, 0.678)
pt3dadd(66.119, 173.725, 8.534, 0.678)
pt3dadd(66.067, 173.828, 8.505, 0.678)
pt3dadd(66.014, 173.93, 8.477, 0.678)
pt3dadd(65.961, 174.032, 8.45, 0.676)
pt3dadd(65.902, 174.136, 8.433, 0.652)
pt3dadd(65.844, 174.238, 8.416, 0.63)
pt3dadd(65.785, 174.341, 8.399, 0.608)
pt3dadd(65.726, 174.444, 8.381, 0.584)
pt3dadd(65.668, 174.546, 8.364, 0.562)
pt3dadd(65.609, 174.649, 8.347, 0.54)
pt3dadd(65.55, 174.751, 8.33, 0.518)
pt3dadd(65.492, 174.854, 8.313, 0.494)
pt3dadd(65.433, 174.956, 8.296, 0.472)
pt3dadd(65.375, 175.06, 8.282, 0.45)
pt3dadd(65.318, 175.165, 8.281, 0.426)
pt3dadd(65.261, 175.271, 8.28, 0.404)
pt3dadd(65.204, 175.376, 8.279, 0.38)
pt3dadd(65.147, 175.483, 8.279, 0.358)
pt3dadd(65.091, 175.589, 8.278, 0.334)
pt3dadd(65.034, 175.694, 8.277, 0.31)
pt3dadd(64.977, 175.8, 8.276, 0.288)
pt3dadd(64.92, 175.906, 8.276, 0.264)
pt3dadd(64.863, 176.011, 8.275, 0.242)
pt3dadd(64.811, 176.118, 8.282, 0.226)
pt3dadd(64.768, 176.226, 8.307, 0.226)
pt3dadd(64.725, 176.334, 8.332, 0.226)
}
}
proc shape3d_79() {
apic[5] { pt3dadd(64.681, 176.442, 8.356, 0.226)
pt3dadd(64.638, 176.55, 8.38, 0.226)
pt3dadd(64.595, 176.658, 8.405, 0.226)
pt3dadd(64.552, 176.766, 8.43, 0.226)
pt3dadd(64.509, 176.874, 8.454, 0.226)
pt3dadd(64.465, 176.982, 8.479, 0.226)
pt3dadd(64.422, 177.09, 8.503, 0.226)
pt3dadd(64.373, 177.196, 8.525, 0.232)
pt3dadd(64.312, 177.296, 8.543, 0.248)
pt3dadd(64.252, 177.398, 8.561, 0.264)
pt3dadd(64.191, 177.499, 8.579, 0.28)
pt3dadd(64.13, 177.6, 8.597, 0.296)
pt3dadd(64.07, 177.702, 8.615, 0.312)
pt3dadd(64.009, 177.803, 8.633, 0.328)
pt3dadd(63.948, 177.905, 8.651, 0.344)
pt3dadd(63.887, 178.006, 8.669, 0.36)
pt3dadd(63.827, 178.106, 8.687, 0.376)
pt3dadd(63.769, 178.211, 8.702, 0.39)
pt3dadd(63.718, 178.319, 8.71, 0.396)
pt3dadd(63.667, 178.427, 8.719, 0.402)
pt3dadd(63.615, 178.535, 8.727, 0.41)
pt3dadd(63.564, 178.643, 8.736, 0.416)
pt3dadd(63.513, 178.751, 8.745, 0.422)
pt3dadd(63.462, 178.859, 8.753, 0.428)
pt3dadd(63.411, 178.967, 8.762, 0.436)
pt3dadd(63.359, 179.075, 8.771, 0.442)
pt3dadd(63.308, 179.183, 8.78, 0.448)
pt3dadd(63.257, 179.291, 8.784, 0.45)
pt3dadd(63.207, 179.4, 8.781, 0.444)
pt3dadd(63.156, 179.508, 8.779, 0.438)
pt3dadd(63.105, 179.617, 8.776, 0.434)
pt3dadd(63.055, 179.726, 8.774, 0.428)
pt3dadd(63.004, 179.834, 8.771, 0.422)
pt3dadd(62.954, 179.944, 8.769, 0.416)
pt3dadd(62.903, 180.053, 8.766, 0.412)
pt3dadd(62.853, 180.161, 8.764, 0.406)
pt3dadd(62.802, 180.27, 8.761, 0.4)
pt3dadd(62.747, 180.376, 8.754, 0.39)
pt3dadd(62.686, 180.478, 8.742, 0.374)
pt3dadd(62.624, 180.58, 8.73, 0.358)
pt3dadd(62.563, 180.682, 8.717, 0.34)
pt3dadd(62.502, 180.784, 8.705, 0.324)
pt3dadd(62.44, 180.887, 8.693, 0.308)
pt3dadd(62.379, 180.989, 8.681, 0.292)
pt3dadd(62.318, 181.091, 8.668, 0.276)
pt3dadd(62.256, 181.193, 8.656, 0.258)
pt3dadd(62.195, 181.295, 8.644, 0.242)
pt3dadd(62.142, 181.397, 8.62, 0.234)
pt3dadd(62.1, 181.499, 8.581, 0.232)
pt3dadd(62.058, 181.601, 8.542, 0.232)
pt3dadd(62.016, 181.704, 8.503, 0.23)
pt3dadd(61.974, 181.806, 8.464, 0.23)
pt3dadd(61.932, 181.908, 8.425, 0.23)
pt3dadd(61.89, 182.01, 8.387, 0.228)
pt3dadd(61.848, 182.113, 8.348, 0.228)
pt3dadd(61.806, 182.215, 8.309, 0.228)
pt3dadd(61.763, 182.317, 8.27, 0.226)
pt3dadd(61.717, 182.418, 8.234, 0.226)
pt3dadd(61.665, 182.519, 8.2, 0.226)
pt3dadd(61.613, 182.62, 8.165, 0.226)
pt3dadd(61.562, 182.719, 8.131, 0.226)
pt3dadd(61.51, 182.82, 8.097, 0.226)
pt3dadd(61.458, 182.92, 8.063, 0.226)
pt3dadd(61.407, 183.02, 8.029, 0.226)
pt3dadd(61.355, 183.12, 7.995, 0.226)
pt3dadd(61.303, 183.221, 7.96, 0.226)
pt3dadd(61.252, 183.32, 7.926, 0.226)
pt3dadd(61.197, 183.42, 7.893, 0.228)
pt3dadd(61.14, 183.518, 7.862, 0.232)
pt3dadd(61.083, 183.618, 7.831, 0.236)
pt3dadd(61.026, 183.716, 7.799, 0.242)
pt3dadd(60.969, 183.815, 7.768, 0.246)
pt3dadd(60.912, 183.913, 7.736, 0.25)
pt3dadd(60.855, 184.012, 7.705, 0.254)
pt3dadd(60.798, 184.111, 7.674, 0.258)
pt3dadd(60.741, 184.21, 7.642, 0.262)
pt3dadd(60.684, 184.308, 7.611, 0.268)
pt3dadd(60.635, 184.408, 7.574, 0.286)
pt3dadd(60.594, 184.508, 7.531, 0.318)
pt3dadd(60.553, 184.608, 7.488, 0.35)
pt3dadd(60.512, 184.709, 7.446, 0.384)
pt3dadd(60.47, 184.81, 7.403, 0.416)
pt3dadd(60.429, 184.909, 7.361, 0.448)
pt3dadd(60.388, 185.01, 7.318, 0.48)
pt3dadd(60.347, 185.111, 7.276, 0.512)
pt3dadd(60.305, 185.21, 7.233, 0.544)
pt3dadd(60.264, 185.311, 7.19, 0.576)
pt3dadd(60.214, 185.412, 7.157, 0.584)
pt3dadd(60.157, 185.513, 7.13, 0.568)
pt3dadd(60.101, 185.614, 7.104, 0.554)
pt3dadd(60.044, 185.714, 7.078, 0.538)
pt3dadd(59.987, 185.815, 7.052, 0.524)
pt3dadd(59.93, 185.917, 7.026, 0.508)
pt3dadd(59.873, 186.018, 7, 0.494)
pt3dadd(59.816, 186.119, 6.974, 0.478)
pt3dadd(59.759, 186.22, 6.947, 0.464)
pt3dadd(59.703, 186.32, 6.921, 0.448)
pt3dadd(59.645, 186.422, 6.901, 0.44)
pt3dadd(59.587, 186.526, 6.885, 0.436)
pt3dadd(59.529, 186.629, 6.869, 0.43)
pt3dadd(59.47, 186.732, 6.853, 0.426)
pt3dadd(59.412, 186.835, 6.837, 0.422)
pt3dadd(59.354, 186.938, 6.821, 0.418)
pt3dadd(59.296, 187.042, 6.804, 0.414)
pt3dadd(59.238, 187.145, 6.788, 0.41)
pt3dadd(59.18, 187.248, 6.772, 0.406)
pt3dadd(59.122, 187.351, 6.756, 0.4)
pt3dadd(59.069, 187.458, 6.745, 0.43)
pt3dadd(59.018, 187.566, 6.737, 0.478)
pt3dadd(58.968, 187.675, 6.729, 0.528)
pt3dadd(58.918, 187.783, 6.722, 0.576)
pt3dadd(58.868, 187.892, 6.714, 0.624)
pt3dadd(58.818, 188, 6.706, 0.672)
pt3dadd(58.767, 188.11, 6.698, 0.72)
pt3dadd(58.717, 188.218, 6.69, 0.768)
pt3dadd(58.667, 188.327, 6.682, 0.816)
pt3dadd(58.617, 188.435, 6.675, 0.864)
pt3dadd(58.555, 188.538, 6.675, 0.85)
pt3dadd(58.488, 188.636, 6.679, 0.8)
pt3dadd(58.421, 188.736, 6.683, 0.752)
pt3dadd(58.354, 188.836, 6.687, 0.702)
pt3dadd(58.287, 188.935, 6.692, 0.654)
pt3dadd(58.22, 189.035, 6.696, 0.604)
pt3dadd(58.153, 189.133, 6.7, 0.556)
pt3dadd(58.086, 189.233, 6.704, 0.506)
pt3dadd(58.019, 189.332, 6.708, 0.458)
pt3dadd(57.952, 189.432, 6.713, 0.41)
pt3dadd(57.882, 189.529, 6.718, 0.388)
pt3dadd(57.812, 189.626, 6.723, 0.382)
pt3dadd(57.741, 189.724, 6.729, 0.376)
pt3dadd(57.67, 189.82, 6.735, 0.37)
pt3dadd(57.6, 189.917, 6.74, 0.364)
pt3dadd(57.529, 190.014, 6.746, 0.358)
pt3dadd(57.459, 190.11, 6.752, 0.352)
pt3dadd(57.388, 190.207, 6.757, 0.346)
pt3dadd(57.317, 190.303, 6.763, 0.34)
pt3dadd(57.247, 190.4, 6.768, 0.334)
pt3dadd(57.177, 190.498, 6.778, 0.338)
pt3dadd(57.109, 190.595, 6.79, 0.344)
pt3dadd(57.04, 190.693, 6.802, 0.352)
pt3dadd(56.972, 190.79, 6.814, 0.36)
pt3dadd(56.903, 190.888, 6.826, 0.366)
pt3dadd(56.835, 190.985, 6.838, 0.374)
pt3dadd(56.766, 191.082, 6.85, 0.382)
pt3dadd(56.697, 191.179, 6.862, 0.388)
pt3dadd(56.629, 191.278, 6.874, 0.396)
pt3dadd(56.56, 191.375, 6.886, 0.404)
pt3dadd(56.501, 191.474, 6.909, 0.392)
pt3dadd(56.446, 191.575, 6.937, 0.376)
pt3dadd(56.39, 191.677, 6.964, 0.358)
pt3dadd(56.334, 191.778, 6.992, 0.34)
pt3dadd(56.279, 191.879, 7.02, 0.322)
pt3dadd(56.223, 191.98, 7.047, 0.304)
pt3dadd(56.168, 192.082, 7.075, 0.288)
pt3dadd(56.112, 192.182, 7.102, 0.27)
pt3dadd(56.057, 192.283, 7.13, 0.252)
pt3dadd(56.001, 192.384, 7.158, 0.234)
pt3dadd(55.937, 192.484, 7.173, 0.244)
pt3dadd(55.87, 192.582, 7.183, 0.266)
pt3dadd(55.803, 192.682, 7.194, 0.286)
pt3dadd(55.737, 192.78, 7.205, 0.306)
pt3dadd(55.67, 192.88, 7.215, 0.328)
pt3dadd(55.603, 192.978, 7.226, 0.348)
pt3dadd(55.536, 193.076, 7.237, 0.368)
pt3dadd(55.469, 193.176, 7.247, 0.39)
pt3dadd(55.402, 193.274, 7.258, 0.41)
pt3dadd(55.335, 193.373, 7.268, 0.43)
pt3dadd(55.278, 193.452, 7.222, 0.42)
pt3dadd(55.224, 193.524, 7.156, 0.398)
pt3dadd(55.171, 193.596, 7.09, 0.378)
pt3dadd(55.117, 193.668, 7.024, 0.356)
pt3dadd(55.064, 193.741, 6.957, 0.334)
pt3dadd(55.01, 193.813, 6.891, 0.312)
pt3dadd(54.956, 193.885, 6.825, 0.29)
pt3dadd(54.903, 193.957, 6.759, 0.27)
pt3dadd(54.849, 194.029, 6.692, 0.248)
pt3dadd(54.796, 194.101, 6.626, 0.226)
}
apic[6] {pt3dclear()
pt3dadd(86.292, 121.214, 9.935, 0.226)
pt3dadd(86.237, 121.2, 9.976, 0.24)
pt3dadd(86.15, 121.176, 10.042, 0.26)
pt3dadd(86.062, 121.152, 10.107, 0.282)
pt3dadd(85.975, 121.128, 10.173, 0.304)
pt3dadd(85.887, 121.104, 10.239, 0.324)
pt3dadd(85.8, 121.081, 10.304, 0.346)
pt3dadd(85.713, 121.057, 10.37, 0.368)
pt3dadd(85.625, 121.033, 10.435, 0.388)
pt3dadd(85.538, 121.009, 10.501, 0.41)
pt3dadd(85.451, 120.985, 10.567, 0.43)
pt3dadd(85.363, 120.961, 10.632, 0.452)
pt3dadd(85.276, 120.937, 10.698, 0.474)
pt3dadd(85.189, 120.913, 10.764, 0.494)
pt3dadd(85.101, 120.889, 10.829, 0.516)
pt3dadd(85.014, 120.865, 10.895, 0.536)
pt3dadd(84.925, 120.847, 10.959, 0.558)
pt3dadd(84.828, 120.869, 11.015, 0.588)
pt3dadd(84.731, 120.89, 11.071, 0.616)
pt3dadd(84.634, 120.912, 11.126, 0.644)
pt3dadd(84.536, 120.934, 11.182, 0.674)
pt3dadd(84.439, 120.955, 11.238, 0.702)
pt3dadd(84.342, 120.976, 11.294, 0.73)
}
}
proc shape3d_80() {
apic[6] { pt3dadd(84.244, 120.997, 11.349, 0.758)
pt3dadd(84.147, 121.019, 11.405, 0.788)
pt3dadd(84.053, 121.054, 11.455, 0.816)
pt3dadd(83.967, 121.13, 11.482, 0.848)
pt3dadd(83.882, 121.208, 11.51, 0.878)
pt3dadd(83.796, 121.285, 11.538, 0.91)
pt3dadd(83.711, 121.363, 11.566, 0.94)
pt3dadd(83.625, 121.44, 11.593, 0.972)
pt3dadd(83.54, 121.518, 11.621, 1.002)
pt3dadd(83.454, 121.595, 11.649, 1.034)
pt3dadd(83.369, 121.673, 11.676, 1.064)
pt3dadd(83.284, 121.75, 11.704, 1.096)
pt3dadd(83.198, 121.822, 11.738, 1.114)
pt3dadd(83.114, 121.874, 11.794, 1.096)
pt3dadd(83.03, 121.927, 11.85, 1.076)
pt3dadd(82.946, 121.98, 11.906, 1.058)
pt3dadd(82.861, 122.033, 11.962, 1.038)
pt3dadd(82.777, 122.086, 12.018, 1.02)
pt3dadd(82.693, 122.14, 12.074, 1)
pt3dadd(82.608, 122.192, 12.13, 0.982)
pt3dadd(82.524, 122.245, 12.185, 0.962)
pt3dadd(82.44, 122.298, 12.241, 0.944)
pt3dadd(82.363, 122.358, 12.298, 0.914)
pt3dadd(82.308, 122.438, 12.355, 0.852)
pt3dadd(82.253, 122.52, 12.413, 0.79)
pt3dadd(82.198, 122.6, 12.471, 0.728)
pt3dadd(82.143, 122.682, 12.529, 0.664)
pt3dadd(82.087, 122.764, 12.586, 0.602)
pt3dadd(82.032, 122.844, 12.644, 0.54)
pt3dadd(81.977, 122.926, 12.702, 0.478)
pt3dadd(81.922, 123.006, 12.759, 0.416)
pt3dadd(81.867, 123.088, 12.817, 0.352)
pt3dadd(81.824, 123.162, 12.884, 0.322)
pt3dadd(81.803, 123.222, 12.969, 0.352)
pt3dadd(81.783, 123.282, 13.054, 0.384)
pt3dadd(81.762, 123.342, 13.138, 0.414)
pt3dadd(81.742, 123.402, 13.223, 0.446)
pt3dadd(81.722, 123.462, 13.308, 0.476)
pt3dadd(81.701, 123.522, 13.393, 0.508)
pt3dadd(81.681, 123.582, 13.478, 0.538)
pt3dadd(81.66, 123.642, 13.563, 0.57)
pt3dadd(81.64, 123.702, 13.648, 0.6)
pt3dadd(81.628, 123.764, 13.732, 0.634)
pt3dadd(81.625, 123.83, 13.816, 0.672)
pt3dadd(81.622, 123.895, 13.9, 0.708)
pt3dadd(81.62, 123.961, 13.983, 0.746)
pt3dadd(81.617, 124.026, 14.067, 0.782)
pt3dadd(81.614, 124.092, 14.151, 0.82)
pt3dadd(81.612, 124.158, 14.235, 0.858)
pt3dadd(81.609, 124.223, 14.318, 0.894)
pt3dadd(81.606, 124.289, 14.402, 0.932)
pt3dadd(81.604, 124.355, 14.486, 0.968)
pt3dadd(81.602, 124.414, 14.572, 0.99)
pt3dadd(81.601, 124.468, 14.662, 0.994)
pt3dadd(81.6, 124.52, 14.751, 0.996)
pt3dadd(81.6, 124.574, 14.841, 1)
pt3dadd(81.599, 124.627, 14.93, 1.004)
pt3dadd(81.598, 124.681, 15.02, 1.006)
pt3dadd(81.597, 124.735, 15.109, 1.01)
pt3dadd(81.596, 124.788, 15.199, 1.014)
pt3dadd(81.595, 124.842, 15.289, 1.016)
pt3dadd(81.594, 124.895, 15.378, 1.02)
pt3dadd(81.593, 124.946, 15.468, 1.012)
pt3dadd(81.592, 124.997, 15.559, 0.994)
pt3dadd(81.59, 125.046, 15.65, 0.978)
pt3dadd(81.589, 125.096, 15.741, 0.96)
pt3dadd(81.588, 125.147, 15.832, 0.942)
pt3dadd(81.586, 125.196, 15.923, 0.926)
pt3dadd(81.585, 125.246, 16.014, 0.908)
pt3dadd(81.583, 125.296, 16.105, 0.89)
pt3dadd(81.582, 125.346, 16.196, 0.872)
pt3dadd(81.58, 125.396, 16.287, 0.854)
pt3dadd(81.578, 125.452, 16.375, 0.838)
pt3dadd(81.576, 125.513, 16.461, 0.822)
pt3dadd(81.574, 125.574, 16.547, 0.804)
pt3dadd(81.572, 125.635, 16.633, 0.788)
pt3dadd(81.57, 125.695, 16.72, 0.772)
pt3dadd(81.568, 125.756, 16.806, 0.754)
pt3dadd(81.565, 125.818, 16.892, 0.738)
pt3dadd(81.563, 125.878, 16.978, 0.722)
pt3dadd(81.561, 125.939, 17.064, 0.706)
pt3dadd(81.559, 126, 17.15, 0.688)
pt3dadd(81.555, 126.05, 17.241, 0.662)
pt3dadd(81.55, 126.094, 17.334, 0.626)
pt3dadd(81.546, 126.136, 17.427, 0.59)
pt3dadd(81.541, 126.179, 17.521, 0.554)
pt3dadd(81.536, 126.221, 17.614, 0.518)
pt3dadd(81.531, 126.264, 17.708, 0.482)
pt3dadd(81.526, 126.306, 17.801, 0.446)
pt3dadd(81.522, 126.349, 17.894, 0.41)
pt3dadd(81.517, 126.391, 17.988, 0.374)
pt3dadd(81.512, 126.434, 18.081, 0.338)
pt3dadd(81.505, 126.482, 18.172, 0.318)
pt3dadd(81.496, 126.535, 18.262, 0.308)
pt3dadd(81.487, 126.589, 18.351, 0.298)
pt3dadd(81.477, 126.642, 18.44, 0.288)
pt3dadd(81.468, 126.695, 18.53, 0.278)
pt3dadd(81.459, 126.749, 18.619, 0.268)
pt3dadd(81.45, 126.802, 18.708, 0.26)
pt3dadd(81.441, 126.854, 18.798, 0.25)
pt3dadd(81.432, 126.907, 18.887, 0.24)
pt3dadd(81.423, 126.961, 18.976, 0.23)
pt3dadd(81.41, 127.012, 19.066, 0.23)
pt3dadd(81.394, 127.06, 19.157, 0.238)
pt3dadd(81.379, 127.108, 19.248, 0.246)
pt3dadd(81.363, 127.156, 19.339, 0.254)
pt3dadd(81.348, 127.204, 19.429, 0.262)
pt3dadd(81.333, 127.252, 19.52, 0.268)
pt3dadd(81.317, 127.3, 19.611, 0.276)
pt3dadd(81.302, 127.348, 19.701, 0.284)
pt3dadd(81.286, 127.396, 19.792, 0.292)
pt3dadd(81.271, 127.444, 19.883, 0.3)
pt3dadd(81.246, 127.482, 19.975, 0.32)
pt3dadd(81.217, 127.514, 20.068, 0.344)
pt3dadd(81.187, 127.547, 20.161, 0.37)
pt3dadd(81.158, 127.58, 20.254, 0.396)
pt3dadd(81.128, 127.613, 20.347, 0.422)
pt3dadd(81.099, 127.645, 20.44, 0.448)
pt3dadd(81.069, 127.679, 20.533, 0.474)
pt3dadd(81.039, 127.711, 20.626, 0.5)
pt3dadd(81.01, 127.744, 20.719, 0.524)
pt3dadd(80.98, 127.777, 20.812, 0.55)
pt3dadd(80.93, 127.804, 20.899, 0.596)
pt3dadd(80.872, 127.828, 20.985, 0.65)
pt3dadd(80.814, 127.853, 21.07, 0.702)
pt3dadd(80.756, 127.877, 21.155, 0.756)
pt3dadd(80.698, 127.901, 21.24, 0.81)
pt3dadd(80.64, 127.926, 21.325, 0.862)
pt3dadd(80.582, 127.95, 21.41, 0.916)
pt3dadd(80.524, 127.975, 21.495, 0.968)
pt3dadd(80.466, 127.999, 21.581, 1.022)
pt3dadd(80.408, 128.023, 21.666, 1.074)
pt3dadd(80.341, 128.047, 21.746, 1.08)
pt3dadd(80.271, 128.07, 21.825, 1.068)
pt3dadd(80.2, 128.093, 21.903, 1.056)
pt3dadd(80.13, 128.117, 21.982, 1.044)
pt3dadd(80.06, 128.14, 22.061, 1.034)
pt3dadd(79.989, 128.162, 22.139, 1.022)
pt3dadd(79.919, 128.185, 22.218, 1.01)
pt3dadd(79.848, 128.208, 22.297, 0.998)
pt3dadd(79.778, 128.232, 22.375, 0.986)
pt3dadd(79.707, 128.255, 22.454, 0.974)
pt3dadd(79.644, 128.303, 22.527, 0.966)
pt3dadd(79.582, 128.36, 22.598, 0.958)
pt3dadd(79.521, 128.419, 22.67, 0.952)
pt3dadd(79.46, 128.477, 22.741, 0.944)
pt3dadd(79.399, 128.534, 22.812, 0.938)
pt3dadd(79.337, 128.592, 22.883, 0.932)
pt3dadd(79.276, 128.65, 22.955, 0.924)
pt3dadd(79.215, 128.707, 23.026, 0.918)
pt3dadd(79.154, 128.765, 23.097, 0.91)
pt3dadd(79.093, 128.824, 23.168, 0.904)
pt3dadd(79.059, 128.909, 23.233, 0.926)
pt3dadd(79.024, 128.993, 23.298, 0.946)
pt3dadd(78.989, 129.077, 23.363, 0.968)
pt3dadd(78.954, 129.161, 23.428, 0.99)
pt3dadd(78.919, 129.246, 23.493, 1.01)
pt3dadd(78.885, 129.33, 23.558, 1.032)
pt3dadd(78.85, 129.414, 23.623, 1.052)
pt3dadd(78.815, 129.498, 23.688, 1.074)
pt3dadd(78.78, 129.583, 23.753, 1.094)
pt3dadd(78.748, 129.667, 23.819, 1.112)
pt3dadd(78.729, 129.751, 23.888, 1.102)
pt3dadd(78.71, 129.835, 23.958, 1.092)
pt3dadd(78.692, 129.919, 24.028, 1.082)
pt3dadd(78.673, 130.003, 24.097, 1.072)
pt3dadd(78.654, 130.087, 24.167, 1.062)
pt3dadd(78.636, 130.171, 24.237, 1.052)
pt3dadd(78.617, 130.255, 24.307, 1.042)
pt3dadd(78.598, 130.339, 24.376, 1.034)
pt3dadd(78.58, 130.423, 24.446, 1.024)
pt3dadd(78.56, 130.506, 24.517, 1.002)
pt3dadd(78.539, 130.583, 24.591, 0.926)
pt3dadd(78.517, 130.66, 24.666, 0.85)
pt3dadd(78.496, 130.738, 24.74, 0.774)
pt3dadd(78.474, 130.814, 24.814, 0.698)
pt3dadd(78.453, 130.891, 24.889, 0.622)
pt3dadd(78.432, 130.969, 24.963, 0.546)
pt3dadd(78.41, 131.046, 25.038, 0.472)
pt3dadd(78.388, 131.124, 25.112, 0.396)
pt3dadd(78.367, 131.201, 25.186, 0.32)
pt3dadd(78.338, 131.281, 25.256, 0.27)
pt3dadd(78.291, 131.369, 25.312, 0.29)
pt3dadd(78.244, 131.456, 25.367, 0.308)
pt3dadd(78.197, 131.544, 25.423, 0.328)
pt3dadd(78.15, 131.632, 25.479, 0.346)
pt3dadd(78.102, 131.719, 25.535, 0.364)
pt3dadd(78.055, 131.807, 25.591, 0.384)
pt3dadd(78.008, 131.894, 25.647, 0.402)
pt3dadd(77.961, 131.982, 25.703, 0.422)
pt3dadd(77.914, 132.07, 25.759, 0.44)
pt3dadd(77.872, 132.158, 25.816, 0.46)
pt3dadd(77.846, 132.251, 25.876, 0.476)
pt3dadd(77.819, 132.342, 25.936, 0.494)
pt3dadd(77.793, 132.434, 25.996, 0.51)
pt3dadd(77.766, 132.527, 26.056, 0.528)
pt3dadd(77.74, 132.619, 26.117, 0.546)
pt3dadd(77.713, 132.712, 26.177, 0.562)
pt3dadd(77.687, 132.803, 26.237, 0.58)
pt3dadd(77.66, 132.895, 26.297, 0.596)
}
}
proc shape3d_81() {
apic[6] { pt3dadd(77.634, 132.988, 26.357, 0.614)
pt3dadd(77.61, 133.08, 26.417, 0.622)
pt3dadd(77.595, 133.172, 26.479, 0.604)
pt3dadd(77.579, 133.266, 26.541, 0.586)
pt3dadd(77.563, 133.358, 26.603, 0.57)
pt3dadd(77.547, 133.452, 26.665, 0.552)
pt3dadd(77.532, 133.544, 26.727, 0.536)
pt3dadd(77.516, 133.638, 26.789, 0.518)
pt3dadd(77.5, 133.73, 26.851, 0.502)
pt3dadd(77.484, 133.823, 26.913, 0.484)
pt3dadd(77.469, 133.916, 26.975, 0.466)
pt3dadd(77.455, 134.01, 27.036, 0.452)
pt3dadd(77.447, 134.106, 27.096, 0.438)
pt3dadd(77.439, 134.202, 27.156, 0.426)
pt3dadd(77.431, 134.297, 27.216, 0.414)
pt3dadd(77.423, 134.393, 27.276, 0.402)
pt3dadd(77.415, 134.489, 27.336, 0.39)
pt3dadd(77.408, 134.585, 27.395, 0.376)
pt3dadd(77.4, 134.68, 27.455, 0.364)
pt3dadd(77.392, 134.776, 27.515, 0.352)
pt3dadd(77.384, 134.872, 27.575, 0.34)
pt3dadd(77.378, 134.969, 27.633, 0.342)
pt3dadd(77.379, 135.07, 27.688, 0.376)
pt3dadd(77.379, 135.17, 27.742, 0.41)
pt3dadd(77.379, 135.271, 27.797, 0.442)
pt3dadd(77.379, 135.372, 27.851, 0.476)
pt3dadd(77.379, 135.473, 27.906, 0.51)
pt3dadd(77.379, 135.572, 27.96, 0.542)
pt3dadd(77.379, 135.673, 28.014, 0.576)
pt3dadd(77.379, 135.774, 28.069, 0.61)
pt3dadd(77.379, 135.875, 28.123, 0.642)
pt3dadd(77.38, 135.97, 28.184, 0.658)
pt3dadd(77.38, 136.051, 28.258, 0.636)
pt3dadd(77.38, 136.133, 28.331, 0.614)
pt3dadd(77.38, 136.214, 28.404, 0.594)
pt3dadd(77.381, 136.296, 28.477, 0.572)
pt3dadd(77.381, 136.378, 28.55, 0.55)
pt3dadd(77.381, 136.459, 28.624, 0.53)
pt3dadd(77.381, 136.541, 28.697, 0.508)
pt3dadd(77.382, 136.622, 28.77, 0.488)
pt3dadd(77.382, 136.705, 28.843, 0.466)
pt3dadd(77.382, 136.789, 28.914, 0.452)
pt3dadd(77.382, 136.878, 28.982, 0.452)
pt3dadd(77.383, 136.966, 29.049, 0.452)
pt3dadd(77.383, 137.054, 29.117, 0.452)
pt3dadd(77.384, 137.143, 29.184, 0.452)
pt3dadd(77.384, 137.232, 29.251, 0.452)
pt3dadd(77.384, 137.321, 29.319, 0.452)
pt3dadd(77.385, 137.41, 29.386, 0.452)
pt3dadd(77.385, 137.498, 29.453, 0.452)
pt3dadd(77.385, 137.587, 29.521, 0.452)
pt3dadd(77.386, 137.681, 29.582, 0.452)
pt3dadd(77.387, 137.786, 29.63, 0.452)
pt3dadd(77.387, 137.891, 29.679, 0.452)
pt3dadd(77.388, 137.995, 29.728, 0.452)
pt3dadd(77.389, 138.101, 29.776, 0.452)
pt3dadd(77.389, 138.205, 29.825, 0.452)
pt3dadd(77.39, 138.311, 29.874, 0.452)
pt3dadd(77.391, 138.415, 29.922, 0.452)
pt3dadd(77.392, 138.52, 29.971, 0.452)
pt3dadd(77.392, 138.625, 30.02, 0.452)
pt3dadd(77.393, 138.733, 30.061, 0.446)
pt3dadd(77.395, 138.847, 30.093, 0.434)
pt3dadd(77.396, 138.961, 30.124, 0.42)
pt3dadd(77.398, 139.075, 30.155, 0.408)
pt3dadd(77.399, 139.189, 30.187, 0.394)
pt3dadd(77.401, 139.303, 30.218, 0.382)
pt3dadd(77.402, 139.417, 30.25, 0.368)
pt3dadd(77.403, 139.531, 30.281, 0.354)
pt3dadd(77.405, 139.644, 30.313, 0.342)
pt3dadd(77.406, 139.758, 30.344, 0.328)
pt3dadd(77.408, 139.872, 30.377, 0.32)
pt3dadd(77.411, 139.985, 30.411, 0.32)
pt3dadd(77.414, 140.098, 30.445, 0.32)
pt3dadd(77.417, 140.21, 30.479, 0.32)
pt3dadd(77.42, 140.323, 30.514, 0.32)
pt3dadd(77.422, 140.436, 30.548, 0.32)
pt3dadd(77.425, 140.548, 30.582, 0.32)
pt3dadd(77.428, 140.66, 30.616, 0.318)
pt3dadd(77.431, 140.773, 30.651, 0.318)
pt3dadd(77.433, 140.886, 30.685, 0.318)
pt3dadd(77.437, 140.998, 30.723, 0.324)
pt3dadd(77.442, 141.106, 30.765, 0.338)
pt3dadd(77.447, 141.215, 30.806, 0.352)
pt3dadd(77.452, 141.324, 30.848, 0.364)
pt3dadd(77.457, 141.433, 30.89, 0.378)
pt3dadd(77.463, 141.541, 30.932, 0.392)
pt3dadd(77.468, 141.65, 30.973, 0.404)
pt3dadd(77.473, 141.76, 31.015, 0.418)
pt3dadd(77.478, 141.869, 31.057, 0.432)
pt3dadd(77.483, 141.977, 31.099, 0.446)
pt3dadd(77.49, 142.087, 31.139, 0.456)
pt3dadd(77.501, 142.198, 31.177, 0.462)
pt3dadd(77.512, 142.307, 31.216, 0.47)
pt3dadd(77.522, 142.417, 31.254, 0.476)
pt3dadd(77.533, 142.528, 31.293, 0.484)
pt3dadd(77.543, 142.638, 31.331, 0.49)
pt3dadd(77.554, 142.748, 31.37, 0.498)
pt3dadd(77.564, 142.859, 31.408, 0.504)
pt3dadd(77.575, 142.969, 31.447, 0.512)
pt3dadd(77.586, 143.08, 31.485, 0.518)
pt3dadd(77.604, 143.185, 31.528, 0.544)
pt3dadd(77.63, 143.288, 31.575, 0.586)
pt3dadd(77.656, 143.39, 31.623, 0.63)
pt3dadd(77.682, 143.494, 31.67, 0.674)
pt3dadd(77.708, 143.596, 31.717, 0.718)
pt3dadd(77.734, 143.698, 31.764, 0.76)
pt3dadd(77.76, 143.801, 31.811, 0.804)
pt3dadd(77.786, 143.903, 31.859, 0.848)
pt3dadd(77.813, 144.006, 31.906, 0.892)
pt3dadd(77.839, 144.108, 31.953, 0.934)
pt3dadd(77.89, 144.166, 32.025, 0.944)
pt3dadd(77.948, 144.211, 32.104, 0.944)
pt3dadd(78.006, 144.257, 32.183, 0.946)
pt3dadd(78.064, 144.302, 32.261, 0.946)
pt3dadd(78.122, 144.349, 32.34, 0.948)
pt3dadd(78.18, 144.395, 32.419, 0.948)
pt3dadd(78.238, 144.44, 32.498, 0.948)
pt3dadd(78.297, 144.486, 32.577, 0.95)
pt3dadd(78.355, 144.532, 32.655, 0.95)
pt3dadd(78.413, 144.577, 32.734, 0.952)
pt3dadd(78.45, 144.589, 32.829, 0.878)
pt3dadd(78.488, 144.602, 32.923, 0.806)
pt3dadd(78.526, 144.614, 33.017, 0.734)
pt3dadd(78.564, 144.628, 33.112, 0.662)
pt3dadd(78.601, 144.64, 33.206, 0.588)
pt3dadd(78.639, 144.652, 33.3, 0.516)
pt3dadd(78.677, 144.665, 33.395, 0.444)
pt3dadd(78.714, 144.677, 33.489, 0.372)
pt3dadd(78.752, 144.69, 33.583, 0.298)
pt3dadd(78.79, 144.702, 33.678, 0.226)
}
apic[7] {pt3dclear()
pt3dadd(97.139, 116.536, 8.092, 1.13)
pt3dadd(97.139, 116.505, 8.086, 1.116)
pt3dadd(97.139, 116.388, 8.063, 1.062)
pt3dadd(97.138, 116.272, 8.04, 1.008)
pt3dadd(97.138, 116.155, 8.017, 0.954)
pt3dadd(97.138, 116.038, 7.994, 0.9)
pt3dadd(97.138, 115.921, 7.971, 0.848)
pt3dadd(97.138, 115.805, 7.948, 0.794)
pt3dadd(97.138, 115.688, 7.925, 0.74)
pt3dadd(97.113, 115.574, 7.917, 0.7)
pt3dadd(97.07, 115.462, 7.919, 0.67)
pt3dadd(97.026, 115.35, 7.921, 0.642)
pt3dadd(96.983, 115.238, 7.924, 0.612)
pt3dadd(96.94, 115.126, 7.926, 0.582)
pt3dadd(96.897, 115.014, 7.928, 0.554)
pt3dadd(96.854, 114.902, 7.931, 0.524)
pt3dadd(96.811, 114.79, 7.933, 0.496)
pt3dadd(96.767, 114.678, 7.935, 0.466)
pt3dadd(96.708, 114.58, 7.952, 0.456)
pt3dadd(96.632, 114.494, 7.983, 0.464)
pt3dadd(96.557, 114.408, 8.013, 0.47)
pt3dadd(96.481, 114.322, 8.043, 0.478)
pt3dadd(96.406, 114.236, 8.074, 0.486)
pt3dadd(96.331, 114.15, 8.104, 0.492)
pt3dadd(96.255, 114.064, 8.135, 0.5)
pt3dadd(96.18, 113.978, 8.165, 0.508)
pt3dadd(96.105, 113.892, 8.195, 0.516)
pt3dadd(96.029, 113.807, 8.226, 0.522)
pt3dadd(95.964, 113.726, 8.274, 0.56)
pt3dadd(95.907, 113.649, 8.334, 0.616)
pt3dadd(95.85, 113.572, 8.394, 0.674)
pt3dadd(95.792, 113.495, 8.454, 0.732)
pt3dadd(95.735, 113.418, 8.513, 0.788)
pt3dadd(95.677, 113.34, 8.573, 0.846)
pt3dadd(95.62, 113.263, 8.633, 0.904)
pt3dadd(95.563, 113.186, 8.693, 0.96)
pt3dadd(95.505, 113.109, 8.753, 1.018)
pt3dadd(95.448, 113.032, 8.813, 1.074)
pt3dadd(95.388, 112.947, 8.861, 1.082)
pt3dadd(95.326, 112.857, 8.904, 1.062)
pt3dadd(95.264, 112.768, 8.946, 1.044)
pt3dadd(95.202, 112.678, 8.988, 1.024)
pt3dadd(95.141, 112.589, 9.03, 1.004)
pt3dadd(95.079, 112.499, 9.073, 0.986)
pt3dadd(95.017, 112.41, 9.115, 0.966)
pt3dadd(94.956, 112.32, 9.157, 0.946)
pt3dadd(94.894, 112.231, 9.199, 0.926)
pt3dadd(94.832, 112.141, 9.242, 0.908)
pt3dadd(94.793, 112.049, 9.294, 0.89)
pt3dadd(94.765, 111.955, 9.352, 0.872)
pt3dadd(94.737, 111.861, 9.41, 0.854)
pt3dadd(94.71, 111.767, 9.467, 0.836)
pt3dadd(94.682, 111.673, 9.525, 0.818)
pt3dadd(94.654, 111.579, 9.583, 0.8)
pt3dadd(94.626, 111.485, 9.641, 0.784)
pt3dadd(94.599, 111.391, 9.698, 0.766)
pt3dadd(94.571, 111.297, 9.756, 0.748)
pt3dadd(94.543, 111.203, 9.814, 0.73)
pt3dadd(94.522, 111.103, 9.866, 0.722)
pt3dadd(94.505, 111, 9.915, 0.716)
pt3dadd(94.488, 110.897, 9.964, 0.712)
pt3dadd(94.47, 110.794, 10.013, 0.708)
pt3dadd(94.453, 110.691, 10.062, 0.702)
pt3dadd(94.436, 110.588, 10.111, 0.698)
pt3dadd(94.418, 110.484, 10.16, 0.694)
pt3dadd(94.401, 110.381, 10.209, 0.688)
pt3dadd(94.383, 110.278, 10.258, 0.684)
pt3dadd(94.366, 110.175, 10.307, 0.68)
pt3dadd(94.356, 110.075, 10.361, 0.702)
}
}
proc shape3d_82() {
apic[7] { pt3dadd(94.348, 109.975, 10.417, 0.74)
pt3dadd(94.34, 109.876, 10.473, 0.774)
pt3dadd(94.333, 109.777, 10.529, 0.81)
pt3dadd(94.325, 109.678, 10.585, 0.846)
pt3dadd(94.317, 109.579, 10.641, 0.882)
pt3dadd(94.31, 109.479, 10.697, 0.918)
pt3dadd(94.302, 109.38, 10.753, 0.954)
pt3dadd(94.295, 109.281, 10.809, 0.99)
pt3dadd(94.287, 109.182, 10.864, 1.026)
pt3dadd(94.283, 109.092, 10.931, 1.078)
pt3dadd(94.281, 109.005, 11, 1.132)
pt3dadd(94.279, 108.919, 11.069, 1.188)
pt3dadd(94.277, 108.832, 11.138, 1.242)
pt3dadd(94.274, 108.745, 11.207, 1.298)
pt3dadd(94.272, 108.658, 11.276, 1.352)
pt3dadd(94.27, 108.572, 11.345, 1.408)
pt3dadd(94.267, 108.485, 11.414, 1.464)
pt3dadd(94.265, 108.398, 11.483, 1.518)
pt3dadd(94.263, 108.311, 11.552, 1.574)
pt3dadd(94.258, 108.242, 11.633, 1.576)
pt3dadd(94.254, 108.177, 11.717, 1.57)
pt3dadd(94.249, 108.111, 11.8, 1.562)
pt3dadd(94.244, 108.045, 11.884, 1.554)
pt3dadd(94.24, 107.979, 11.968, 1.548)
pt3dadd(94.235, 107.914, 12.051, 1.54)
pt3dadd(94.23, 107.848, 12.135, 1.534)
pt3dadd(94.226, 107.782, 12.218, 1.526)
pt3dadd(94.221, 107.717, 12.302, 1.52)
pt3dadd(94.216, 107.651, 12.385, 1.512)
pt3dadd(94.208, 107.583, 12.468, 1.42)
pt3dadd(94.198, 107.515, 12.55, 1.312)
pt3dadd(94.188, 107.448, 12.632, 1.202)
pt3dadd(94.179, 107.38, 12.714, 1.094)
pt3dadd(94.169, 107.312, 12.796, 0.984)
pt3dadd(94.16, 107.244, 12.878, 0.876)
pt3dadd(94.15, 107.176, 12.96, 0.768)
pt3dadd(94.14, 107.109, 13.043, 0.658)
pt3dadd(94.131, 107.041, 13.125, 0.55)
pt3dadd(94.121, 106.973, 13.207, 0.44)
pt3dadd(94.104, 106.894, 13.28, 0.422)
pt3dadd(94.085, 106.813, 13.352, 0.422)
pt3dadd(94.066, 106.732, 13.424, 0.422)
pt3dadd(94.047, 106.651, 13.496, 0.42)
pt3dadd(94.028, 106.569, 13.568, 0.42)
pt3dadd(94.009, 106.488, 13.64, 0.42)
pt3dadd(93.99, 106.407, 13.712, 0.42)
pt3dadd(93.971, 106.326, 13.784, 0.418)
pt3dadd(93.951, 106.245, 13.856, 0.418)
pt3dadd(93.933, 106.164, 13.928, 0.418)
pt3dadd(93.878, 106.117, 14.006, 0.454)
pt3dadd(93.818, 106.076, 14.086, 0.496)
pt3dadd(93.758, 106.035, 14.165, 0.54)
pt3dadd(93.698, 105.994, 14.245, 0.582)
pt3dadd(93.638, 105.953, 14.324, 0.624)
pt3dadd(93.578, 105.912, 14.404, 0.666)
pt3dadd(93.518, 105.87, 14.483, 0.708)
pt3dadd(93.457, 105.829, 14.563, 0.75)
pt3dadd(93.397, 105.788, 14.642, 0.794)
pt3dadd(93.338, 105.752, 14.722, 0.828)
pt3dadd(93.286, 105.781, 14.809, 0.782)
pt3dadd(93.234, 105.811, 14.896, 0.734)
pt3dadd(93.182, 105.84, 14.983, 0.686)
pt3dadd(93.13, 105.869, 15.07, 0.638)
pt3dadd(93.078, 105.898, 15.156, 0.59)
pt3dadd(93.026, 105.928, 15.243, 0.542)
pt3dadd(92.975, 105.957, 15.33, 0.496)
pt3dadd(92.923, 105.986, 15.417, 0.448)
pt3dadd(92.871, 106.015, 15.504, 0.4)
pt3dadd(92.813, 106.048, 15.587, 0.376)
pt3dadd(92.746, 106.088, 15.662, 0.398)
pt3dadd(92.678, 106.128, 15.738, 0.42)
pt3dadd(92.611, 106.168, 15.813, 0.442)
pt3dadd(92.543, 106.209, 15.889, 0.464)
pt3dadd(92.476, 106.249, 15.965, 0.486)
pt3dadd(92.408, 106.289, 16.04, 0.508)
pt3dadd(92.34, 106.329, 16.116, 0.53)
pt3dadd(92.273, 106.369, 16.191, 0.55)
pt3dadd(92.205, 106.409, 16.267, 0.572)
pt3dadd(92.148, 106.445, 16.349, 0.612)
pt3dadd(92.106, 106.474, 16.439, 0.68)
pt3dadd(92.064, 106.504, 16.529, 0.748)
pt3dadd(92.022, 106.534, 16.62, 0.814)
pt3dadd(91.98, 106.564, 16.71, 0.882)
pt3dadd(91.938, 106.594, 16.8, 0.95)
pt3dadd(91.896, 106.623, 16.89, 1.016)
pt3dadd(91.854, 106.653, 16.981, 1.084)
pt3dadd(91.812, 106.683, 17.071, 1.152)
pt3dadd(91.769, 106.713, 17.161, 1.22)
pt3dadd(91.743, 106.736, 17.256, 1.266)
pt3dadd(91.731, 106.753, 17.354, 1.294)
pt3dadd(91.718, 106.769, 17.453, 1.324)
pt3dadd(91.706, 106.786, 17.551, 1.352)
pt3dadd(91.693, 106.803, 17.65, 1.382)
pt3dadd(91.681, 106.82, 17.748, 1.41)
pt3dadd(91.669, 106.837, 17.847, 1.44)
pt3dadd(91.656, 106.854, 17.945, 1.468)
pt3dadd(91.644, 106.871, 18.044, 1.498)
pt3dadd(91.631, 106.887, 18.142, 1.526)
pt3dadd(91.629, 106.916, 18.238, 1.508)
pt3dadd(91.633, 106.955, 18.333, 1.456)
pt3dadd(91.638, 106.993, 18.428, 1.402)
pt3dadd(91.642, 107.031, 18.523, 1.35)
pt3dadd(91.647, 107.069, 18.617, 1.296)
pt3dadd(91.652, 107.107, 18.712, 1.244)
pt3dadd(91.656, 107.145, 18.807, 1.19)
pt3dadd(91.661, 107.184, 18.902, 1.138)
pt3dadd(91.665, 107.222, 18.996, 1.084)
pt3dadd(91.67, 107.26, 19.091, 1.032)
pt3dadd(91.685, 107.296, 19.185, 1.01)
pt3dadd(91.707, 107.33, 19.279, 1.004)
pt3dadd(91.728, 107.365, 19.374, 1)
pt3dadd(91.749, 107.4, 19.468, 0.996)
pt3dadd(91.771, 107.434, 19.562, 0.992)
pt3dadd(91.792, 107.469, 19.656, 0.986)
pt3dadd(91.814, 107.503, 19.75, 0.982)
pt3dadd(91.835, 107.538, 19.844, 0.978)
pt3dadd(91.856, 107.573, 19.938, 0.972)
pt3dadd(91.878, 107.607, 20.032, 0.968)
pt3dadd(91.902, 107.632, 20.128, 1.002)
pt3dadd(91.927, 107.653, 20.224, 1.052)
pt3dadd(91.953, 107.675, 20.32, 1.102)
pt3dadd(91.978, 107.696, 20.416, 1.154)
pt3dadd(92.003, 107.717, 20.512, 1.204)
pt3dadd(92.028, 107.738, 20.608, 1.254)
pt3dadd(92.054, 107.759, 20.705, 1.304)
pt3dadd(92.079, 107.781, 20.801, 1.354)
pt3dadd(92.104, 107.802, 20.897, 1.404)
pt3dadd(92.13, 107.823, 20.993, 1.454)
pt3dadd(92.134, 107.833, 21.092, 1.49)
pt3dadd(92.133, 107.84, 21.192, 1.524)
pt3dadd(92.131, 107.847, 21.292, 1.556)
pt3dadd(92.13, 107.854, 21.391, 1.59)
pt3dadd(92.129, 107.861, 21.491, 1.622)
pt3dadd(92.128, 107.868, 21.591, 1.654)
pt3dadd(92.127, 107.875, 21.691, 1.688)
pt3dadd(92.125, 107.882, 21.791, 1.72)
pt3dadd(92.124, 107.889, 21.891, 1.752)
pt3dadd(92.123, 107.896, 21.99, 1.786)
pt3dadd(92.078, 107.888, 22.082, 1.772)
pt3dadd(92.028, 107.878, 22.173, 1.754)
pt3dadd(91.979, 107.868, 22.264, 1.736)
pt3dadd(91.93, 107.858, 22.354, 1.718)
pt3dadd(91.881, 107.848, 22.445, 1.702)
pt3dadd(91.831, 107.839, 22.536, 1.684)
pt3dadd(91.782, 107.829, 22.627, 1.666)
pt3dadd(91.732, 107.819, 22.718, 1.648)
pt3dadd(91.683, 107.809, 22.808, 1.63)
pt3dadd(91.634, 107.799, 22.899, 1.612)
pt3dadd(91.566, 107.785, 22.981, 1.584)
pt3dadd(91.497, 107.771, 23.062, 1.554)
pt3dadd(91.428, 107.757, 23.142, 1.526)
pt3dadd(91.359, 107.743, 23.223, 1.496)
pt3dadd(91.289, 107.729, 23.304, 1.466)
pt3dadd(91.22, 107.714, 23.385, 1.438)
pt3dadd(91.151, 107.7, 23.466, 1.408)
pt3dadd(91.082, 107.686, 23.546, 1.38)
pt3dadd(91.012, 107.672, 23.627, 1.35)
pt3dadd(90.943, 107.658, 23.708, 1.32)
pt3dadd(90.877, 107.629, 23.788, 1.282)
pt3dadd(90.81, 107.599, 23.867, 1.244)
pt3dadd(90.744, 107.57, 23.947, 1.204)
pt3dadd(90.677, 107.541, 24.027, 1.166)
pt3dadd(90.611, 107.511, 24.106, 1.126)
pt3dadd(90.545, 107.482, 24.186, 1.088)
pt3dadd(90.478, 107.452, 24.265, 1.048)
pt3dadd(90.412, 107.423, 24.345, 1.008)
pt3dadd(90.345, 107.393, 24.425, 0.97)
pt3dadd(90.28, 107.362, 24.504, 0.93)
pt3dadd(90.225, 107.312, 24.583, 0.882)
pt3dadd(90.17, 107.262, 24.661, 0.834)
pt3dadd(90.115, 107.211, 24.739, 0.786)
pt3dadd(90.06, 107.161, 24.818, 0.736)
pt3dadd(90.006, 107.111, 24.896, 0.688)
pt3dadd(89.951, 107.061, 24.975, 0.64)
pt3dadd(89.896, 107.01, 25.053, 0.592)
pt3dadd(89.841, 106.96, 25.132, 0.544)
pt3dadd(89.786, 106.91, 25.21, 0.496)
pt3dadd(89.73, 106.86, 25.288, 0.452)
pt3dadd(89.663, 106.817, 25.363, 0.452)
pt3dadd(89.596, 106.775, 25.438, 0.452)
pt3dadd(89.529, 106.732, 25.513, 0.452)
pt3dadd(89.462, 106.69, 25.588, 0.452)
pt3dadd(89.395, 106.647, 25.663, 0.452)
pt3dadd(89.328, 106.605, 25.738, 0.452)
pt3dadd(89.26, 106.562, 25.813, 0.452)
pt3dadd(89.193, 106.52, 25.888, 0.452)
pt3dadd(89.126, 106.477, 25.963, 0.452)
pt3dadd(89.059, 106.433, 26.036, 0.458)
pt3dadd(88.995, 106.365, 26.099, 0.532)
pt3dadd(88.93, 106.296, 26.161, 0.606)
pt3dadd(88.865, 106.228, 26.223, 0.678)
pt3dadd(88.801, 106.16, 26.286, 0.752)
pt3dadd(88.736, 106.092, 26.348, 0.824)
pt3dadd(88.671, 106.024, 26.41, 0.898)
pt3dadd(88.607, 105.956, 26.472, 0.972)
pt3dadd(88.542, 105.888, 26.535, 1.044)
pt3dadd(88.477, 105.82, 26.597, 1.118)
pt3dadd(88.41, 105.754, 26.658, 1.174)
pt3dadd(88.332, 105.694, 26.716, 1.17)
pt3dadd(88.255, 105.634, 26.774, 1.166)
}
}
proc shape3d_83() {
apic[7] { pt3dadd(88.178, 105.574, 26.832, 1.16)
pt3dadd(88.101, 105.514, 26.89, 1.156)
pt3dadd(88.023, 105.455, 26.948, 1.152)
pt3dadd(87.946, 105.395, 27.007, 1.148)
pt3dadd(87.869, 105.335, 27.065, 1.144)
pt3dadd(87.792, 105.275, 27.123, 1.14)
pt3dadd(87.714, 105.216, 27.181, 1.134)
pt3dadd(87.633, 105.158, 27.236, 1.118)
pt3dadd(87.545, 105.104, 27.287, 1.08)
pt3dadd(87.457, 105.049, 27.337, 1.04)
pt3dadd(87.369, 104.995, 27.388, 1)
pt3dadd(87.28, 104.941, 27.438, 0.962)
pt3dadd(87.192, 104.887, 27.489, 0.922)
pt3dadd(87.104, 104.832, 27.539, 0.884)
pt3dadd(87.016, 104.778, 27.59, 0.844)
pt3dadd(86.927, 104.724, 27.64, 0.806)
pt3dadd(86.839, 104.67, 27.691, 0.766)
pt3dadd(86.75, 104.612, 27.736, 0.75)
pt3dadd(86.658, 104.548, 27.774, 0.764)
pt3dadd(86.567, 104.485, 27.812, 0.778)
pt3dadd(86.476, 104.421, 27.849, 0.792)
pt3dadd(86.385, 104.358, 27.887, 0.806)
pt3dadd(86.293, 104.295, 27.925, 0.82)
pt3dadd(86.202, 104.231, 27.963, 0.836)
pt3dadd(86.111, 104.168, 28.001, 0.85)
pt3dadd(86.02, 104.105, 28.038, 0.864)
pt3dadd(85.928, 104.041, 28.076, 0.878)
pt3dadd(85.836, 103.987, 28.121, 0.87)
pt3dadd(85.744, 103.944, 28.173, 0.838)
pt3dadd(85.652, 103.902, 28.226, 0.806)
pt3dadd(85.559, 103.859, 28.279, 0.774)
pt3dadd(85.467, 103.816, 28.332, 0.742)
pt3dadd(85.374, 103.773, 28.385, 0.71)
pt3dadd(85.282, 103.73, 28.437, 0.678)
pt3dadd(85.189, 103.687, 28.49, 0.646)
pt3dadd(85.097, 103.645, 28.543, 0.614)
pt3dadd(85.004, 103.602, 28.596, 0.582)
pt3dadd(84.912, 103.553, 28.645, 0.564)
pt3dadd(84.822, 103.497, 28.691, 0.564)
pt3dadd(84.731, 103.44, 28.736, 0.562)
pt3dadd(84.64, 103.384, 28.781, 0.562)
pt3dadd(84.549, 103.327, 28.827, 0.562)
pt3dadd(84.458, 103.271, 28.872, 0.562)
pt3dadd(84.367, 103.215, 28.917, 0.562)
pt3dadd(84.276, 103.158, 28.963, 0.56)
pt3dadd(84.185, 103.102, 29.008, 0.56)
pt3dadd(84.094, 103.046, 29.054, 0.56)
pt3dadd(84.008, 102.985, 29.101, 0.566)
pt3dadd(83.925, 102.92, 29.149, 0.578)
pt3dadd(83.843, 102.855, 29.198, 0.59)
pt3dadd(83.761, 102.79, 29.246, 0.602)
pt3dadd(83.679, 102.725, 29.295, 0.614)
pt3dadd(83.596, 102.66, 29.343, 0.626)
pt3dadd(83.514, 102.595, 29.392, 0.638)
pt3dadd(83.431, 102.53, 29.441, 0.65)
pt3dadd(83.349, 102.465, 29.489, 0.662)
pt3dadd(83.267, 102.4, 29.538, 0.674)
pt3dadd(83.198, 102.334, 29.597, 0.678)
pt3dadd(83.136, 102.267, 29.663, 0.678)
pt3dadd(83.075, 102.201, 29.728, 0.678)
pt3dadd(83.014, 102.134, 29.794, 0.678)
pt3dadd(82.953, 102.067, 29.86, 0.678)
pt3dadd(82.892, 102.001, 29.925, 0.678)
pt3dadd(82.83, 101.934, 29.991, 0.678)
pt3dadd(82.769, 101.867, 30.056, 0.678)
pt3dadd(82.708, 101.8, 30.122, 0.678)
pt3dadd(82.647, 101.734, 30.188, 0.678)
pt3dadd(82.579, 101.689, 30.259, 0.678)
pt3dadd(82.507, 101.657, 30.335, 0.678)
pt3dadd(82.434, 101.626, 30.41, 0.678)
pt3dadd(82.362, 101.594, 30.486, 0.678)
pt3dadd(82.29, 101.562, 30.561, 0.678)
pt3dadd(82.218, 101.531, 30.636, 0.678)
pt3dadd(82.146, 101.499, 30.712, 0.678)
pt3dadd(82.073, 101.468, 30.787, 0.678)
pt3dadd(82.001, 101.436, 30.863, 0.678)
pt3dadd(81.929, 101.404, 30.938, 0.678)
pt3dadd(81.854, 101.387, 31.014, 0.686)
pt3dadd(81.777, 101.378, 31.091, 0.696)
pt3dadd(81.701, 101.369, 31.167, 0.708)
pt3dadd(81.624, 101.36, 31.244, 0.718)
pt3dadd(81.548, 101.351, 31.321, 0.73)
pt3dadd(81.471, 101.342, 31.397, 0.742)
pt3dadd(81.394, 101.333, 31.474, 0.752)
pt3dadd(81.318, 101.324, 31.55, 0.764)
pt3dadd(81.241, 101.314, 31.627, 0.774)
pt3dadd(81.165, 101.305, 31.704, 0.786)
pt3dadd(81.09, 101.315, 31.781, 0.784)
pt3dadd(81.016, 101.331, 31.858, 0.778)
pt3dadd(80.942, 101.347, 31.936, 0.772)
pt3dadd(80.868, 101.364, 32.014, 0.766)
pt3dadd(80.794, 101.38, 32.091, 0.76)
pt3dadd(80.72, 101.396, 32.169, 0.754)
pt3dadd(80.646, 101.413, 32.246, 0.748)
pt3dadd(80.572, 101.429, 32.324, 0.742)
pt3dadd(80.498, 101.445, 32.402, 0.736)
pt3dadd(80.424, 101.462, 32.479, 0.73)
pt3dadd(80.358, 101.507, 32.553, 0.684)
pt3dadd(80.292, 101.555, 32.626, 0.632)
pt3dadd(80.226, 101.603, 32.7, 0.582)
pt3dadd(80.161, 101.652, 32.773, 0.53)
pt3dadd(80.095, 101.7, 32.846, 0.48)
pt3dadd(80.029, 101.748, 32.92, 0.43)
pt3dadd(79.963, 101.797, 32.993, 0.378)
pt3dadd(79.898, 101.845, 33.066, 0.328)
pt3dadd(79.832, 101.893, 33.14, 0.276)
pt3dadd(79.766, 101.941, 33.213, 0.226)
pt3dadd(79.668, 101.983, 33.259, 0.226)
pt3dadd(79.571, 102.025, 33.306, 0.226)
pt3dadd(79.473, 102.067, 33.352, 0.226)
pt3dadd(79.375, 102.109, 33.399, 0.226)
pt3dadd(79.278, 102.151, 33.445, 0.226)
pt3dadd(79.18, 102.193, 33.492, 0.226)
pt3dadd(79.083, 102.234, 33.538, 0.226)
pt3dadd(78.985, 102.276, 33.585, 0.226)
pt3dadd(78.887, 102.318, 33.631, 0.226)
pt3dadd(78.79, 102.36, 33.678, 0.226)
}
apic[8] {pt3dclear()
pt3dadd(101.556, 113.417, 6.657, 1.582)
pt3dadd(101.553, 113.446, 6.677, 1.558)
pt3dadd(101.542, 113.538, 6.741, 1.482)
pt3dadd(101.532, 113.63, 6.804, 1.406)
pt3dadd(101.522, 113.721, 6.868, 1.332)
pt3dadd(101.511, 113.813, 6.932, 1.256)
pt3dadd(101.501, 113.905, 6.996, 1.18)
pt3dadd(101.491, 113.997, 7.06, 1.104)
pt3dadd(101.48, 114.088, 7.124, 1.03)
pt3dadd(101.47, 114.18, 7.187, 0.954)
pt3dadd(101.46, 114.272, 7.251, 0.878)
pt3dadd(101.449, 114.364, 7.315, 0.802)
pt3dadd(101.439, 114.455, 7.379, 0.726)
pt3dadd(101.429, 114.547, 7.443, 0.652)
pt3dadd(101.418, 114.639, 7.507, 0.576)
pt3dadd(101.408, 114.731, 7.571, 0.5)
pt3dadd(101.398, 114.822, 7.635, 0.424)
pt3dadd(101.387, 114.914, 7.699, 0.348)
pt3dadd(101.377, 115.006, 7.762, 0.272)
pt3dadd(101.415, 115.104, 7.785, 0.256)
pt3dadd(101.478, 115.207, 7.787, 0.268)
pt3dadd(101.541, 115.309, 7.789, 0.28)
pt3dadd(101.604, 115.411, 7.79, 0.292)
pt3dadd(101.666, 115.513, 7.792, 0.304)
pt3dadd(101.729, 115.616, 7.793, 0.316)
pt3dadd(101.792, 115.718, 7.795, 0.328)
pt3dadd(101.855, 115.82, 7.797, 0.34)
pt3dadd(101.918, 115.922, 7.798, 0.352)
pt3dadd(101.981, 116.025, 7.8, 0.364)
pt3dadd(102.037, 116.13, 7.8, 0.388)
pt3dadd(102.092, 116.237, 7.8, 0.414)
pt3dadd(102.147, 116.344, 7.8, 0.44)
pt3dadd(102.201, 116.451, 7.799, 0.466)
pt3dadd(102.256, 116.557, 7.799, 0.49)
pt3dadd(102.311, 116.664, 7.799, 0.516)
pt3dadd(102.366, 116.771, 7.799, 0.542)
pt3dadd(102.421, 116.878, 7.798, 0.568)
pt3dadd(102.475, 116.984, 7.798, 0.594)
pt3dadd(102.53, 117.091, 7.798, 0.62)
pt3dadd(102.571, 117.204, 7.798, 0.652)
pt3dadd(102.608, 117.318, 7.797, 0.686)
pt3dadd(102.645, 117.432, 7.797, 0.72)
pt3dadd(102.683, 117.546, 7.796, 0.754)
pt3dadd(102.72, 117.66, 7.796, 0.788)
pt3dadd(102.757, 117.774, 7.796, 0.822)
pt3dadd(102.795, 117.888, 7.795, 0.854)
pt3dadd(102.832, 118.002, 7.795, 0.888)
pt3dadd(102.87, 118.116, 7.794, 0.922)
pt3dadd(102.907, 118.23, 7.794, 0.956)
pt3dadd(102.939, 118.346, 7.793, 0.974)
pt3dadd(102.969, 118.462, 7.793, 0.99)
pt3dadd(103, 118.578, 7.792, 1.004)
pt3dadd(103.031, 118.694, 7.791, 1.02)
pt3dadd(103.061, 118.81, 7.79, 1.034)
pt3dadd(103.092, 118.926, 7.79, 1.05)
pt3dadd(103.123, 119.042, 7.789, 1.064)
pt3dadd(103.153, 119.158, 7.788, 1.08)
pt3dadd(103.184, 119.274, 7.788, 1.094)
pt3dadd(103.215, 119.39, 7.787, 1.11)
pt3dadd(103.26, 119.501, 7.786, 1.098)
pt3dadd(103.308, 119.611, 7.785, 1.08)
pt3dadd(103.356, 119.721, 7.783, 1.062)
pt3dadd(103.404, 119.831, 7.782, 1.044)
pt3dadd(103.453, 119.94, 7.781, 1.026)
pt3dadd(103.501, 120.05, 7.779, 1.01)
pt3dadd(103.549, 120.161, 7.778, 0.992)
pt3dadd(103.597, 120.27, 7.777, 0.974)
pt3dadd(103.645, 120.38, 7.775, 0.956)
pt3dadd(103.693, 120.49, 7.774, 0.94)
pt3dadd(103.735, 120.602, 7.772, 0.908)
pt3dadd(103.775, 120.715, 7.769, 0.876)
pt3dadd(103.815, 120.829, 7.767, 0.842)
pt3dadd(103.855, 120.942, 7.764, 0.81)
pt3dadd(103.896, 121.055, 7.762, 0.776)
pt3dadd(103.936, 121.168, 7.76, 0.744)
pt3dadd(103.976, 121.28, 7.757, 0.71)
pt3dadd(104.016, 121.393, 7.755, 0.678)
pt3dadd(104.057, 121.507, 7.752, 0.644)
pt3dadd(104.097, 121.62, 7.75, 0.612)
pt3dadd(104.132, 121.734, 7.745, 0.62)
pt3dadd(104.166, 121.849, 7.74, 0.638)
pt3dadd(104.2, 121.964, 7.735, 0.654)
pt3dadd(104.234, 122.078, 7.73, 0.67)
}
}
proc shape3d_84() {
apic[8] { pt3dadd(104.269, 122.194, 7.725, 0.688)
pt3dadd(104.303, 122.309, 7.72, 0.704)
pt3dadd(104.337, 122.424, 7.715, 0.72)
pt3dadd(104.371, 122.538, 7.71, 0.736)
pt3dadd(104.406, 122.653, 7.705, 0.754)
pt3dadd(104.44, 122.768, 7.7, 0.77)
pt3dadd(104.478, 122.881, 7.692, 0.804)
pt3dadd(104.517, 122.994, 7.684, 0.84)
pt3dadd(104.557, 123.107, 7.676, 0.876)
pt3dadd(104.596, 123.221, 7.667, 0.912)
pt3dadd(104.635, 123.334, 7.659, 0.948)
pt3dadd(104.674, 123.446, 7.651, 0.984)
pt3dadd(104.713, 123.559, 7.643, 1.02)
pt3dadd(104.753, 123.672, 7.635, 1.054)
pt3dadd(104.792, 123.785, 7.627, 1.09)
pt3dadd(104.831, 123.899, 7.619, 1.126)
pt3dadd(104.883, 124.006, 7.608, 1.13)
pt3dadd(104.935, 124.112, 7.596, 1.132)
pt3dadd(104.988, 124.219, 7.585, 1.132)
pt3dadd(105.041, 124.326, 7.573, 1.132)
pt3dadd(105.094, 124.433, 7.562, 1.134)
pt3dadd(105.147, 124.54, 7.55, 1.134)
pt3dadd(105.2, 124.646, 7.539, 1.134)
pt3dadd(105.253, 124.753, 7.528, 1.136)
pt3dadd(105.306, 124.86, 7.516, 1.136)
pt3dadd(105.359, 124.967, 7.505, 1.136)
pt3dadd(105.403, 125.071, 7.472, 1.152)
pt3dadd(105.447, 125.174, 7.437, 1.17)
pt3dadd(105.49, 125.279, 7.402, 1.186)
pt3dadd(105.534, 125.382, 7.367, 1.202)
pt3dadd(105.578, 125.486, 7.332, 1.22)
pt3dadd(105.621, 125.59, 7.297, 1.236)
pt3dadd(105.665, 125.693, 7.263, 1.252)
pt3dadd(105.709, 125.797, 7.228, 1.27)
pt3dadd(105.752, 125.9, 7.193, 1.286)
pt3dadd(105.796, 126.004, 7.158, 1.302)
pt3dadd(105.853, 126.106, 7.132, 1.258)
pt3dadd(105.91, 126.206, 7.107, 1.208)
pt3dadd(105.968, 126.307, 7.082, 1.156)
pt3dadd(106.026, 126.407, 7.057, 1.106)
pt3dadd(106.084, 126.508, 7.032, 1.056)
pt3dadd(106.142, 126.608, 7.006, 1.006)
pt3dadd(106.199, 126.709, 6.981, 0.956)
pt3dadd(106.257, 126.81, 6.956, 0.906)
pt3dadd(106.315, 126.911, 6.931, 0.854)
pt3dadd(106.373, 127.012, 6.906, 0.804)
pt3dadd(106.434, 127.112, 6.888, 0.746)
pt3dadd(106.495, 127.213, 6.87, 0.69)
pt3dadd(106.556, 127.315, 6.852, 0.632)
pt3dadd(106.617, 127.416, 6.835, 0.574)
pt3dadd(106.679, 127.517, 6.817, 0.516)
pt3dadd(106.74, 127.618, 6.799, 0.458)
pt3dadd(106.801, 127.718, 6.781, 0.4)
pt3dadd(106.862, 127.82, 6.764, 0.342)
pt3dadd(106.923, 127.921, 6.746, 0.284)
pt3dadd(106.985, 128.022, 6.728, 0.226)
pt3dadd(107.038, 128.129, 6.718, 0.226)
pt3dadd(107.092, 128.234, 6.708, 0.226)
pt3dadd(107.146, 128.341, 6.698, 0.226)
pt3dadd(107.2, 128.448, 6.687, 0.226)
pt3dadd(107.254, 128.555, 6.677, 0.226)
pt3dadd(107.307, 128.662, 6.667, 0.226)
pt3dadd(107.361, 128.768, 6.657, 0.226)
pt3dadd(107.415, 128.874, 6.647, 0.226)
pt3dadd(107.469, 128.981, 6.636, 0.226)
pt3dadd(107.522, 129.088, 6.626, 0.226)
}
apic[9] {pt3dclear()
pt3dadd(107.522, 129.088, 6.626, 0.226)
pt3dadd(107.594, 129.175, 6.626, 0.242)
pt3dadd(107.67, 129.268, 6.626, 0.258)
pt3dadd(107.746, 129.361, 6.626, 0.274)
pt3dadd(107.822, 129.454, 6.627, 0.29)
pt3dadd(107.898, 129.547, 6.627, 0.306)
pt3dadd(107.974, 129.64, 6.627, 0.322)
pt3dadd(108.05, 129.732, 6.627, 0.338)
pt3dadd(108.126, 129.826, 6.627, 0.354)
pt3dadd(108.202, 129.918, 6.627, 0.37)
pt3dadd(108.278, 130.012, 6.627, 0.386)
pt3dadd(108.354, 130.104, 6.627, 0.402)
pt3dadd(108.429, 130.196, 6.627, 0.42)
pt3dadd(108.511, 130.285, 6.627, 0.444)
pt3dadd(108.596, 130.37, 6.627, 0.472)
pt3dadd(108.68, 130.456, 6.627, 0.5)
pt3dadd(108.765, 130.541, 6.627, 0.53)
pt3dadd(108.849, 130.626, 6.627, 0.558)
pt3dadd(108.933, 130.711, 6.627, 0.586)
pt3dadd(109.018, 130.796, 6.627, 0.614)
pt3dadd(109.102, 130.882, 6.627, 0.644)
pt3dadd(109.187, 130.967, 6.627, 0.672)
pt3dadd(109.271, 131.052, 6.627, 0.7)
pt3dadd(109.362, 131.13, 6.627, 0.726)
pt3dadd(109.456, 131.204, 6.627, 0.752)
pt3dadd(109.55, 131.28, 6.627, 0.778)
pt3dadd(109.644, 131.354, 6.627, 0.804)
pt3dadd(109.738, 131.429, 6.628, 0.83)
pt3dadd(109.831, 131.504, 6.628, 0.856)
pt3dadd(109.925, 131.579, 6.628, 0.882)
pt3dadd(110.019, 131.653, 6.628, 0.908)
pt3dadd(110.113, 131.728, 6.628, 0.934)
pt3dadd(110.207, 131.803, 6.628, 0.96)
pt3dadd(110.309, 131.866, 6.628, 0.978)
pt3dadd(110.414, 131.923, 6.628, 0.992)
pt3dadd(110.519, 131.982, 6.628, 1.008)
pt3dadd(110.624, 132.041, 6.628, 1.022)
pt3dadd(110.728, 132.098, 6.629, 1.036)
pt3dadd(110.833, 132.157, 6.629, 1.05)
pt3dadd(110.938, 132.216, 6.629, 1.066)
pt3dadd(111.043, 132.275, 6.629, 1.08)
pt3dadd(111.148, 132.332, 6.629, 1.094)
pt3dadd(111.252, 132.391, 6.629, 1.108)
pt3dadd(111.354, 132.455, 6.629, 1.062)
pt3dadd(111.454, 132.521, 6.63, 0.998)
pt3dadd(111.555, 132.587, 6.63, 0.934)
pt3dadd(111.655, 132.652, 6.63, 0.868)
pt3dadd(111.756, 132.718, 6.63, 0.804)
pt3dadd(111.856, 132.784, 6.631, 0.74)
pt3dadd(111.957, 132.848, 6.631, 0.674)
pt3dadd(112.057, 132.914, 6.631, 0.61)
pt3dadd(112.158, 132.98, 6.632, 0.546)
pt3dadd(112.258, 133.045, 6.632, 0.482)
pt3dadd(112.358, 133.112, 6.632, 0.464)
pt3dadd(112.457, 133.18, 6.633, 0.46)
pt3dadd(112.556, 133.248, 6.633, 0.454)
pt3dadd(112.655, 133.315, 6.634, 0.45)
pt3dadd(112.755, 133.382, 6.634, 0.446)
pt3dadd(112.854, 133.45, 6.634, 0.442)
pt3dadd(112.953, 133.518, 6.635, 0.438)
pt3dadd(113.052, 133.585, 6.635, 0.434)
pt3dadd(113.151, 133.652, 6.636, 0.43)
pt3dadd(113.251, 133.72, 6.636, 0.426)
pt3dadd(113.351, 133.786, 6.637, 0.444)
pt3dadd(113.452, 133.85, 6.638, 0.47)
pt3dadd(113.553, 133.916, 6.638, 0.496)
pt3dadd(113.653, 133.981, 6.639, 0.52)
pt3dadd(113.754, 134.046, 6.64, 0.546)
pt3dadd(113.855, 134.112, 6.641, 0.572)
pt3dadd(113.956, 134.177, 6.641, 0.596)
pt3dadd(114.056, 134.242, 6.642, 0.622)
pt3dadd(114.157, 134.308, 6.643, 0.648)
pt3dadd(114.258, 134.372, 6.643, 0.672)
pt3dadd(114.365, 134.426, 6.645, 0.678)
pt3dadd(114.473, 134.477, 6.646, 0.678)
pt3dadd(114.582, 134.528, 6.647, 0.678)
pt3dadd(114.69, 134.58, 6.649, 0.678)
pt3dadd(114.799, 134.63, 6.65, 0.678)
pt3dadd(114.908, 134.682, 6.651, 0.678)
pt3dadd(115.016, 134.732, 6.653, 0.678)
pt3dadd(115.125, 134.784, 6.654, 0.678)
pt3dadd(115.233, 134.836, 6.655, 0.678)
pt3dadd(115.342, 134.886, 6.657, 0.678)
pt3dadd(115.455, 134.927, 6.66, 0.678)
pt3dadd(115.568, 134.965, 6.662, 0.678)
pt3dadd(115.682, 135.002, 6.665, 0.678)
pt3dadd(115.796, 135.041, 6.668, 0.678)
pt3dadd(115.91, 135.079, 6.671, 0.678)
pt3dadd(116.024, 135.116, 6.674, 0.678)
pt3dadd(116.137, 135.155, 6.677, 0.678)
pt3dadd(116.251, 135.193, 6.679, 0.678)
pt3dadd(116.365, 135.23, 6.682, 0.678)
pt3dadd(116.479, 135.269, 6.685, 0.678)
pt3dadd(116.587, 135.32, 6.69, 0.688)
pt3dadd(116.694, 135.374, 6.696, 0.702)
pt3dadd(116.8, 135.428, 6.702, 0.714)
pt3dadd(116.907, 135.482, 6.708, 0.728)
pt3dadd(117.014, 135.538, 6.714, 0.74)
pt3dadd(117.12, 135.592, 6.719, 0.752)
pt3dadd(117.227, 135.646, 6.725, 0.766)
pt3dadd(117.334, 135.701, 6.731, 0.778)
pt3dadd(117.441, 135.755, 6.737, 0.792)
pt3dadd(117.547, 135.809, 6.743, 0.804)
pt3dadd(117.647, 135.875, 6.751, 0.822)
pt3dadd(117.746, 135.943, 6.759, 0.838)
pt3dadd(117.844, 136.01, 6.768, 0.856)
pt3dadd(117.943, 136.078, 6.777, 0.874)
pt3dadd(118.041, 136.146, 6.785, 0.89)
pt3dadd(118.14, 136.213, 6.794, 0.908)
pt3dadd(118.239, 136.28, 6.803, 0.926)
pt3dadd(118.337, 136.349, 6.811, 0.942)
pt3dadd(118.436, 136.416, 6.82, 0.96)
pt3dadd(118.534, 136.484, 6.829, 0.978)
pt3dadd(118.627, 136.558, 6.843, 0.988)
pt3dadd(118.719, 136.633, 6.857, 1)
pt3dadd(118.811, 136.708, 6.872, 1.01)
pt3dadd(118.903, 136.783, 6.887, 1.02)
pt3dadd(118.995, 136.859, 6.902, 1.032)
pt3dadd(119.087, 136.933, 6.916, 1.042)
pt3dadd(119.179, 137.009, 6.931, 1.052)
pt3dadd(119.271, 137.083, 6.946, 1.064)
pt3dadd(119.363, 137.159, 6.96, 1.074)
pt3dadd(119.455, 137.233, 6.975, 1.084)
pt3dadd(119.538, 137.3, 7.02, 1.044)
pt3dadd(119.621, 137.366, 7.067, 1)
pt3dadd(119.704, 137.434, 7.113, 0.956)
pt3dadd(119.786, 137.5, 7.16, 0.912)
pt3dadd(119.869, 137.567, 7.207, 0.868)
pt3dadd(119.952, 137.633, 7.253, 0.824)
pt3dadd(120.035, 137.699, 7.3, 0.78)
pt3dadd(120.118, 137.766, 7.346, 0.736)
pt3dadd(120.2, 137.832, 7.393, 0.692)
pt3dadd(120.283, 137.898, 7.439, 0.65)
pt3dadd(120.377, 137.965, 7.469, 0.608)
}
}
proc shape3d_85() {
apic[9] { pt3dadd(120.47, 138.031, 7.499, 0.568)
pt3dadd(120.564, 138.097, 7.528, 0.528)
pt3dadd(120.658, 138.164, 7.557, 0.488)
pt3dadd(120.751, 138.23, 7.587, 0.448)
pt3dadd(120.845, 138.296, 7.616, 0.408)
pt3dadd(120.938, 138.362, 7.646, 0.368)
pt3dadd(121.032, 138.43, 7.675, 0.328)
pt3dadd(121.126, 138.496, 7.705, 0.288)
pt3dadd(121.219, 138.562, 7.734, 0.248)
pt3dadd(121.328, 138.601, 7.756, 0.264)
pt3dadd(121.44, 138.638, 7.777, 0.28)
pt3dadd(121.55, 138.677, 7.799, 0.298)
pt3dadd(121.662, 138.714, 7.82, 0.316)
pt3dadd(121.772, 138.752, 7.841, 0.334)
pt3dadd(121.884, 138.79, 7.863, 0.35)
pt3dadd(121.994, 138.828, 7.884, 0.368)
pt3dadd(122.106, 138.866, 7.906, 0.386)
pt3dadd(122.216, 138.904, 7.927, 0.402)
pt3dadd(122.327, 138.942, 7.949, 0.42)
pt3dadd(122.443, 138.967, 7.964, 0.456)
pt3dadd(122.558, 138.994, 7.98, 0.492)
pt3dadd(122.674, 139.02, 7.995, 0.528)
pt3dadd(122.79, 139.045, 8.011, 0.562)
pt3dadd(122.905, 139.072, 8.027, 0.598)
pt3dadd(123.022, 139.098, 8.042, 0.634)
pt3dadd(123.137, 139.123, 8.058, 0.67)
pt3dadd(123.252, 139.15, 8.074, 0.706)
pt3dadd(123.368, 139.175, 8.089, 0.742)
pt3dadd(123.484, 139.201, 8.105, 0.776)
pt3dadd(123.594, 139.222, 8.141, 0.752)
pt3dadd(123.704, 139.241, 8.176, 0.728)
pt3dadd(123.815, 139.261, 8.212, 0.704)
pt3dadd(123.925, 139.28, 8.247, 0.68)
pt3dadd(124.036, 139.301, 8.283, 0.654)
pt3dadd(124.146, 139.321, 8.318, 0.63)
pt3dadd(124.256, 139.34, 8.354, 0.606)
pt3dadd(124.367, 139.361, 8.389, 0.582)
pt3dadd(124.477, 139.38, 8.425, 0.558)
pt3dadd(124.586, 139.402, 8.461, 0.534)
pt3dadd(124.691, 139.436, 8.503, 0.528)
pt3dadd(124.794, 139.471, 8.544, 0.52)
pt3dadd(124.897, 139.506, 8.585, 0.512)
pt3dadd(125.002, 139.541, 8.626, 0.506)
pt3dadd(125.105, 139.576, 8.668, 0.498)
pt3dadd(125.208, 139.61, 8.709, 0.49)
pt3dadd(125.312, 139.645, 8.75, 0.484)
pt3dadd(125.416, 139.68, 8.792, 0.476)
pt3dadd(125.519, 139.715, 8.833, 0.468)
pt3dadd(125.621, 139.754, 8.874, 0.472)
pt3dadd(125.716, 139.811, 8.914, 0.508)
pt3dadd(125.81, 139.866, 8.954, 0.544)
pt3dadd(125.905, 139.922, 8.994, 0.58)
pt3dadd(126, 139.978, 9.033, 0.616)
pt3dadd(126.095, 140.034, 9.073, 0.652)
pt3dadd(126.19, 140.089, 9.113, 0.688)
pt3dadd(126.284, 140.146, 9.153, 0.726)
pt3dadd(126.379, 140.201, 9.193, 0.76)
pt3dadd(126.474, 140.257, 9.233, 0.796)
pt3dadd(126.564, 140.314, 9.278, 0.808)
pt3dadd(126.643, 140.374, 9.334, 0.768)
pt3dadd(126.724, 140.434, 9.39, 0.726)
pt3dadd(126.803, 140.494, 9.446, 0.686)
pt3dadd(126.882, 140.554, 9.502, 0.646)
pt3dadd(126.962, 140.612, 9.558, 0.604)
pt3dadd(127.042, 140.672, 9.614, 0.564)
pt3dadd(127.121, 140.732, 9.67, 0.524)
pt3dadd(127.201, 140.792, 9.725, 0.482)
pt3dadd(127.28, 140.851, 9.781, 0.442)
pt3dadd(127.362, 140.918, 9.826, 0.41)
pt3dadd(127.448, 140.995, 9.855, 0.392)
pt3dadd(127.534, 141.071, 9.884, 0.372)
pt3dadd(127.62, 141.148, 9.912, 0.352)
pt3dadd(127.705, 141.224, 9.941, 0.334)
pt3dadd(127.792, 141.3, 9.97, 0.314)
pt3dadd(127.877, 141.377, 9.999, 0.294)
pt3dadd(127.963, 141.454, 10.028, 0.276)
pt3dadd(128.048, 141.529, 10.057, 0.256)
pt3dadd(128.135, 141.606, 10.086, 0.236)
pt3dadd(128.227, 141.674, 10.111, 0.226)
pt3dadd(128.329, 141.733, 10.132, 0.228)
pt3dadd(128.43, 141.792, 10.154, 0.23)
pt3dadd(128.532, 141.851, 10.175, 0.23)
pt3dadd(128.634, 141.91, 10.196, 0.232)
pt3dadd(128.735, 141.968, 10.217, 0.234)
pt3dadd(128.837, 142.027, 10.238, 0.234)
pt3dadd(128.938, 142.086, 10.259, 0.236)
pt3dadd(129.04, 142.144, 10.28, 0.238)
pt3dadd(129.142, 142.202, 10.301, 0.24)
pt3dadd(129.232, 142.276, 10.32, 0.26)
pt3dadd(129.307, 142.367, 10.336, 0.306)
pt3dadd(129.384, 142.457, 10.353, 0.35)
pt3dadd(129.46, 142.548, 10.369, 0.396)
pt3dadd(129.535, 142.639, 10.386, 0.44)
pt3dadd(129.612, 142.729, 10.402, 0.486)
pt3dadd(129.688, 142.82, 10.418, 0.53)
pt3dadd(129.764, 142.91, 10.435, 0.576)
pt3dadd(129.84, 143.002, 10.451, 0.62)
pt3dadd(129.917, 143.092, 10.468, 0.666)
pt3dadd(129.996, 143.171, 10.499, 0.7)
pt3dadd(130.08, 143.236, 10.545, 0.72)
pt3dadd(130.163, 143.302, 10.592, 0.742)
pt3dadd(130.247, 143.366, 10.638, 0.764)
pt3dadd(130.331, 143.432, 10.685, 0.786)
pt3dadd(130.415, 143.498, 10.731, 0.806)
pt3dadd(130.498, 143.563, 10.778, 0.828)
pt3dadd(130.582, 143.629, 10.824, 0.85)
pt3dadd(130.666, 143.695, 10.87, 0.872)
pt3dadd(130.748, 143.76, 10.917, 0.892)
pt3dadd(130.82, 143.842, 10.955, 0.894)
pt3dadd(130.88, 143.939, 10.985, 0.872)
pt3dadd(130.94, 144.037, 11.015, 0.852)
pt3dadd(131, 144.134, 11.045, 0.832)
pt3dadd(131.06, 144.232, 11.075, 0.81)
pt3dadd(131.12, 144.33, 11.105, 0.79)
pt3dadd(131.179, 144.427, 11.135, 0.768)
pt3dadd(131.239, 144.524, 11.165, 0.748)
pt3dadd(131.299, 144.623, 11.195, 0.726)
pt3dadd(131.359, 144.72, 11.225, 0.706)
pt3dadd(131.425, 144.816, 11.248, 0.678)
pt3dadd(131.496, 144.911, 11.266, 0.646)
pt3dadd(131.568, 145.004, 11.283, 0.612)
pt3dadd(131.639, 145.098, 11.3, 0.58)
pt3dadd(131.711, 145.193, 11.317, 0.546)
pt3dadd(131.782, 145.286, 11.334, 0.514)
pt3dadd(131.854, 145.381, 11.352, 0.48)
pt3dadd(131.926, 145.475, 11.369, 0.448)
pt3dadd(131.996, 145.57, 11.386, 0.414)
pt3dadd(132.068, 145.663, 11.403, 0.382)
pt3dadd(132.14, 145.758, 11.418, 0.368)
pt3dadd(132.214, 145.852, 11.43, 0.372)
pt3dadd(132.287, 145.945, 11.442, 0.376)
pt3dadd(132.36, 146.039, 11.454, 0.38)
pt3dadd(132.433, 146.134, 11.466, 0.384)
pt3dadd(132.506, 146.227, 11.478, 0.388)
pt3dadd(132.58, 146.321, 11.49, 0.392)
pt3dadd(132.653, 146.416, 11.503, 0.396)
pt3dadd(132.726, 146.509, 11.515, 0.4)
pt3dadd(132.799, 146.603, 11.527, 0.404)
pt3dadd(132.872, 146.698, 11.539, 0.42)
pt3dadd(132.944, 146.792, 11.551, 0.448)
pt3dadd(133.018, 146.886, 11.563, 0.476)
pt3dadd(133.09, 146.981, 11.575, 0.502)
pt3dadd(133.162, 147.076, 11.587, 0.53)
pt3dadd(133.235, 147.17, 11.599, 0.556)
pt3dadd(133.307, 147.265, 11.611, 0.584)
pt3dadd(133.379, 147.36, 11.623, 0.612)
pt3dadd(133.451, 147.455, 11.635, 0.638)
pt3dadd(133.524, 147.548, 11.647, 0.666)
pt3dadd(133.589, 147.644, 11.671, 0.678)
pt3dadd(133.649, 147.74, 11.704, 0.678)
pt3dadd(133.708, 147.838, 11.738, 0.678)
pt3dadd(133.768, 147.934, 11.771, 0.678)
pt3dadd(133.826, 148.03, 11.804, 0.678)
pt3dadd(133.886, 148.126, 11.837, 0.678)
pt3dadd(133.945, 148.223, 11.871, 0.678)
pt3dadd(134.005, 148.319, 11.904, 0.678)
pt3dadd(134.064, 148.415, 11.937, 0.678)
pt3dadd(134.124, 148.512, 11.97, 0.678)
pt3dadd(134.189, 148.606, 11.999, 0.666)
pt3dadd(134.258, 148.699, 12.023, 0.644)
pt3dadd(134.328, 148.792, 12.048, 0.622)
pt3dadd(134.398, 148.885, 12.072, 0.598)
pt3dadd(134.468, 148.979, 12.096, 0.576)
pt3dadd(134.538, 149.071, 12.121, 0.554)
pt3dadd(134.608, 149.165, 12.145, 0.532)
pt3dadd(134.677, 149.257, 12.17, 0.51)
pt3dadd(134.747, 149.351, 12.194, 0.486)
pt3dadd(134.818, 149.443, 12.219, 0.464)
pt3dadd(134.891, 149.534, 12.239, 0.446)
pt3dadd(134.969, 149.624, 12.256, 0.432)
pt3dadd(135.046, 149.713, 12.274, 0.418)
pt3dadd(135.124, 149.802, 12.291, 0.404)
pt3dadd(135.2, 149.892, 12.308, 0.39)
pt3dadd(135.278, 149.981, 12.326, 0.376)
pt3dadd(135.355, 150.071, 12.343, 0.362)
pt3dadd(135.433, 150.16, 12.36, 0.348)
pt3dadd(135.51, 150.25, 12.378, 0.334)
pt3dadd(135.588, 150.338, 12.395, 0.32)
pt3dadd(135.67, 150.425, 12.407, 0.332)
pt3dadd(135.755, 150.508, 12.416, 0.364)
pt3dadd(135.841, 150.592, 12.425, 0.394)
pt3dadd(135.926, 150.676, 12.434, 0.426)
pt3dadd(136.012, 150.76, 12.443, 0.456)
pt3dadd(136.097, 150.842, 12.452, 0.488)
pt3dadd(136.182, 150.926, 12.461, 0.518)
pt3dadd(136.267, 151.01, 12.47, 0.55)
pt3dadd(136.352, 151.094, 12.479, 0.58)
pt3dadd(136.438, 151.178, 12.488, 0.612)
pt3dadd(136.534, 151.249, 12.492, 0.618)
pt3dadd(136.636, 151.312, 12.494, 0.608)
pt3dadd(136.738, 151.375, 12.495, 0.598)
pt3dadd(136.84, 151.438, 12.497, 0.588)
pt3dadd(136.942, 151.501, 12.498, 0.578)
pt3dadd(137.044, 151.564, 12.5, 0.568)
pt3dadd(137.146, 151.627, 12.502, 0.56)
pt3dadd(137.248, 151.69, 12.503, 0.55)
pt3dadd(137.35, 151.753, 12.505, 0.54)
pt3dadd(137.452, 151.816, 12.506, 0.53)
pt3dadd(137.554, 151.88, 12.507, 0.516)
pt3dadd(137.654, 151.945, 12.507, 0.5)
}
}
proc shape3d_86() {
apic[9] { pt3dadd(137.756, 152.009, 12.507, 0.484)
pt3dadd(137.857, 152.074, 12.507, 0.468)
pt3dadd(137.958, 152.138, 12.507, 0.452)
pt3dadd(138.059, 152.203, 12.507, 0.436)
pt3dadd(138.161, 152.268, 12.507, 0.42)
pt3dadd(138.262, 152.333, 12.507, 0.404)
pt3dadd(138.362, 152.398, 12.507, 0.388)
pt3dadd(138.463, 152.461, 12.507, 0.372)
pt3dadd(138.563, 152.53, 12.507, 0.358)
pt3dadd(138.661, 152.598, 12.507, 0.344)
pt3dadd(138.76, 152.666, 12.507, 0.33)
pt3dadd(138.858, 152.736, 12.507, 0.316)
pt3dadd(138.956, 152.804, 12.507, 0.302)
pt3dadd(139.055, 152.873, 12.507, 0.288)
pt3dadd(139.153, 152.942, 12.507, 0.274)
pt3dadd(139.252, 153.011, 12.507, 0.258)
pt3dadd(139.35, 153.079, 12.507, 0.244)
pt3dadd(139.448, 153.149, 12.507, 0.23)
pt3dadd(139.466, 153.22, 12.559, 0.236)
pt3dadd(139.446, 153.293, 12.637, 0.252)
pt3dadd(139.427, 153.366, 12.714, 0.268)
pt3dadd(139.406, 153.439, 12.792, 0.284)
pt3dadd(139.387, 153.512, 12.87, 0.302)
pt3dadd(139.367, 153.586, 12.947, 0.318)
pt3dadd(139.348, 153.659, 13.025, 0.334)
pt3dadd(139.327, 153.731, 13.102, 0.35)
pt3dadd(139.308, 153.804, 13.18, 0.366)
pt3dadd(139.288, 153.877, 13.258, 0.382)
pt3dadd(139.267, 153.95, 13.335, 0.398)
pt3dadd(139.248, 154.024, 13.413, 0.414)
pt3dadd(139.228, 154.097, 13.49, 0.43)
pt3dadd(139.208, 154.17, 13.568, 0.446)
pt3dadd(139.231, 154.264, 13.6, 0.452)
pt3dadd(139.285, 154.37, 13.6, 0.452)
pt3dadd(139.338, 154.477, 13.6, 0.452)
pt3dadd(139.392, 154.585, 13.6, 0.452)
pt3dadd(139.446, 154.692, 13.6, 0.452)
pt3dadd(139.499, 154.8, 13.6, 0.452)
pt3dadd(139.553, 154.907, 13.6, 0.452)
pt3dadd(139.607, 155.015, 13.6, 0.452)
pt3dadd(139.661, 155.122, 13.6, 0.452)
pt3dadd(139.715, 155.228, 13.6, 0.452)
pt3dadd(139.77, 155.335, 13.6, 0.452)
pt3dadd(139.832, 155.437, 13.6, 0.452)
pt3dadd(139.896, 155.54, 13.6, 0.452)
pt3dadd(139.958, 155.642, 13.6, 0.452)
pt3dadd(140.021, 155.744, 13.6, 0.452)
pt3dadd(140.086, 155.844, 13.601, 0.452)
pt3dadd(140.186, 155.908, 13.615, 0.452)
pt3dadd(140.287, 155.97, 13.63, 0.452)
pt3dadd(140.388, 156.034, 13.644, 0.452)
pt3dadd(140.489, 156.097, 13.658, 0.452)
pt3dadd(140.588, 156.161, 13.67, 0.452)
pt3dadd(140.688, 156.228, 13.677, 0.452)
pt3dadd(140.788, 156.294, 13.683, 0.452)
pt3dadd(140.887, 156.361, 13.69, 0.452)
pt3dadd(140.987, 156.427, 13.697, 0.452)
pt3dadd(141.088, 156.491, 13.7, 0.452)
pt3dadd(141.191, 156.554, 13.7, 0.452)
pt3dadd(141.293, 156.617, 13.7, 0.452)
pt3dadd(141.395, 156.679, 13.7, 0.452)
pt3dadd(141.497, 156.742, 13.7, 0.452)
pt3dadd(141.588, 156.818, 13.7, 0.452)
pt3dadd(141.67, 156.907, 13.7, 0.452)
pt3dadd(141.75, 156.996, 13.7, 0.452)
pt3dadd(141.83, 157.085, 13.7, 0.452)
pt3dadd(141.911, 157.174, 13.7, 0.452)
pt3dadd(141.997, 157.256, 13.7, 0.452)
pt3dadd(142.088, 157.334, 13.7, 0.452)
pt3dadd(142.181, 157.412, 13.7, 0.452)
pt3dadd(142.272, 157.49, 13.7, 0.452)
pt3dadd(142.363, 157.567, 13.7, 0.452)
pt3dadd(142.465, 157.627, 13.7, 0.452)
pt3dadd(142.576, 157.675, 13.7, 0.452)
pt3dadd(142.686, 157.723, 13.7, 0.452)
pt3dadd(142.796, 157.77, 13.7, 0.452)
pt3dadd(142.907, 157.818, 13.7, 0.452)
pt3dadd(143.008, 157.877, 13.705, 0.452)
pt3dadd(143.082, 157.967, 13.725, 0.452)
pt3dadd(143.158, 158.058, 13.746, 0.452)
pt3dadd(143.232, 158.148, 13.766, 0.452)
pt3dadd(143.308, 158.239, 13.786, 0.452)
pt3dadd(143.388, 158.327, 13.791, 0.452)
pt3dadd(143.471, 158.414, 13.793, 0.452)
pt3dadd(143.552, 158.501, 13.795, 0.452)
pt3dadd(143.635, 158.588, 13.798, 0.452)
pt3dadd(143.717, 158.676, 13.8, 0.452)
pt3dadd(143.777, 158.777, 13.779, 0.452)
pt3dadd(143.837, 158.878, 13.756, 0.452)
pt3dadd(143.896, 158.978, 13.734, 0.452)
pt3dadd(143.956, 159.079, 13.712, 0.452)
pt3dadd(143.996, 159.188, 13.7, 0.452)
pt3dadd(144.017, 159.306, 13.7, 0.452)
pt3dadd(144.037, 159.425, 13.7, 0.452)
pt3dadd(144.07, 159.54, 13.696, 0.452)
pt3dadd(144.104, 159.654, 13.691, 0.452)
pt3dadd(144.149, 159.748, 13.654, 0.452)
pt3dadd(144.203, 159.824, 13.591, 0.452)
pt3dadd(144.293, 159.875, 13.545, 0.452)
pt3dadd(144.392, 159.918, 13.503, 0.452)
pt3dadd(144.463, 160.013, 13.503, 0.452)
pt3dadd(144.532, 160.111, 13.506, 0.452)
pt3dadd(144.6, 160.21, 13.509, 0.452)
pt3dadd(144.684, 160.278, 13.527, 0.452)
pt3dadd(144.791, 160.304, 13.566, 0.452)
pt3dadd(144.904, 160.327, 13.595, 0.452)
pt3dadd(144.994, 160.392, 13.6, 0.452)
pt3dadd(145.069, 160.486, 13.6, 0.452)
pt3dadd(145.144, 160.579, 13.6, 0.452)
pt3dadd(145.219, 160.673, 13.6, 0.452)
pt3dadd(145.294, 160.766, 13.6, 0.452)
pt3dadd(145.355, 160.867, 13.616, 0.452)
pt3dadd(145.408, 160.97, 13.641, 0.452)
pt3dadd(145.46, 161.074, 13.665, 0.452)
pt3dadd(145.514, 161.177, 13.69, 0.452)
pt3dadd(145.562, 161.274, 13.723, 0.452)
pt3dadd(145.583, 161.327, 13.811, 0.452)
pt3dadd(145.608, 161.383, 13.894, 0.452)
pt3dadd(145.676, 161.467, 13.938, 0.452)
pt3dadd(145.741, 161.556, 13.973, 0.452)
pt3dadd(145.802, 161.658, 13.99, 0.452)
pt3dadd(145.856, 161.761, 14.013, 0.452)
pt3dadd(145.898, 161.864, 14.048, 0.452)
pt3dadd(145.94, 161.971, 14.054, 0.452)
pt3dadd(145.982, 162.078, 14.026, 0.452)
pt3dadd(146.024, 162.186, 13.999, 0.452)
pt3dadd(146.095, 162.264, 13.962, 0.452)
pt3dadd(146.185, 162.324, 13.918, 0.452)
pt3dadd(146.25, 162.419, 13.9, 0.452)
pt3dadd(146.304, 162.527, 13.9, 0.452)
pt3dadd(146.357, 162.634, 13.9, 0.452)
pt3dadd(146.411, 162.742, 13.9, 0.452)
pt3dadd(146.465, 162.848, 13.9, 0.452)
pt3dadd(146.518, 162.956, 13.9, 0.452)
pt3dadd(146.599, 163.039, 13.878, 0.452)
pt3dadd(146.682, 163.122, 13.855, 0.452)
pt3dadd(146.765, 163.205, 13.832, 0.452)
pt3dadd(146.848, 163.288, 13.809, 0.452)
pt3dadd(146.94, 163.361, 13.8, 0.452)
pt3dadd(147.041, 163.427, 13.8, 0.452)
pt3dadd(147.14, 163.494, 13.8, 0.452)
pt3dadd(147.24, 163.56, 13.8, 0.452)
}
apic[10] {pt3dclear()
pt3dadd(107.522, 129.088, 6.626, 0.226)
pt3dadd(107.475, 129.181, 6.623, 0.226)
pt3dadd(107.429, 129.293, 6.622, 0.226)
pt3dadd(107.384, 129.406, 6.62, 0.226)
pt3dadd(107.338, 129.517, 6.619, 0.226)
pt3dadd(107.292, 129.629, 6.617, 0.226)
pt3dadd(107.247, 129.739, 6.616, 0.226)
pt3dadd(107.201, 129.851, 6.614, 0.226)
pt3dadd(107.156, 129.962, 6.613, 0.226)
pt3dadd(107.11, 130.074, 6.611, 0.226)
pt3dadd(107.065, 130.186, 6.61, 0.226)
pt3dadd(107.019, 130.297, 6.608, 0.226)
pt3dadd(106.978, 130.41, 6.606, 0.234)
pt3dadd(106.946, 130.525, 6.603, 0.264)
pt3dadd(106.915, 130.64, 6.599, 0.292)
pt3dadd(106.884, 130.756, 6.596, 0.32)
pt3dadd(106.852, 130.871, 6.592, 0.348)
pt3dadd(106.821, 130.987, 6.589, 0.378)
pt3dadd(106.789, 131.102, 6.586, 0.406)
pt3dadd(106.758, 131.216, 6.582, 0.434)
pt3dadd(106.727, 131.332, 6.579, 0.464)
pt3dadd(106.695, 131.447, 6.575, 0.492)
pt3dadd(106.664, 131.562, 6.572, 0.512)
pt3dadd(106.632, 131.677, 6.567, 0.518)
pt3dadd(106.6, 131.794, 6.563, 0.524)
pt3dadd(106.569, 131.909, 6.559, 0.53)
pt3dadd(106.537, 132.024, 6.555, 0.536)
pt3dadd(106.505, 132.138, 6.551, 0.544)
pt3dadd(106.473, 132.253, 6.546, 0.548)
pt3dadd(106.441, 132.368, 6.542, 0.556)
pt3dadd(106.41, 132.485, 6.538, 0.56)
pt3dadd(106.378, 132.6, 6.534, 0.568)
pt3dadd(106.341, 132.713, 6.529, 0.57)
pt3dadd(106.291, 132.823, 6.523, 0.564)
pt3dadd(106.242, 132.934, 6.517, 0.56)
pt3dadd(106.193, 133.043, 6.511, 0.556)
pt3dadd(106.186, 133.04, 6.51, 0.556)
pt3dadd(106.137, 133.152, 6.504, 0.55)
pt3dadd(106.088, 133.262, 6.498, 0.546)
pt3dadd(106.039, 133.372, 6.492, 0.542)
pt3dadd(105.99, 133.482, 6.486, 0.536)
pt3dadd(105.941, 133.591, 6.48, 0.532)
pt3dadd(105.892, 133.702, 6.474, 0.528)
pt3dadd(105.835, 133.808, 6.467, 0.53)
pt3dadd(105.767, 133.91, 6.459, 0.546)
pt3dadd(105.7, 134.011, 6.451, 0.562)
pt3dadd(105.632, 134.112, 6.444, 0.576)
pt3dadd(105.565, 134.213, 6.436, 0.592)
pt3dadd(105.497, 134.315, 6.428, 0.608)
pt3dadd(105.43, 134.416, 6.42, 0.624)
pt3dadd(105.362, 134.516, 6.412, 0.638)
pt3dadd(105.294, 134.618, 6.404, 0.654)
pt3dadd(105.227, 134.72, 6.396, 0.67)
pt3dadd(105.154, 134.818, 6.387, 0.678)
pt3dadd(105.074, 134.91, 6.377, 0.678)
pt3dadd(104.995, 135.002, 6.366, 0.678)
pt3dadd(104.915, 135.095, 6.355, 0.678)
pt3dadd(104.835, 135.187, 6.344, 0.678)
}
}
proc shape3d_87() {
apic[10] { pt3dadd(104.755, 135.281, 6.333, 0.678)
pt3dadd(104.675, 135.373, 6.323, 0.678)
pt3dadd(104.595, 135.466, 6.312, 0.678)
pt3dadd(104.516, 135.559, 6.301, 0.678)
pt3dadd(104.436, 135.652, 6.291, 0.678)
pt3dadd(104.359, 135.745, 6.274, 0.678)
pt3dadd(104.288, 135.84, 6.249, 0.678)
pt3dadd(104.217, 135.936, 6.224, 0.678)
pt3dadd(104.145, 136.031, 6.199, 0.678)
pt3dadd(104.074, 136.127, 6.174, 0.678)
pt3dadd(104.003, 136.222, 6.15, 0.678)
pt3dadd(103.931, 136.316, 6.125, 0.678)
pt3dadd(103.86, 136.411, 6.1, 0.678)
pt3dadd(103.789, 136.508, 6.075, 0.678)
pt3dadd(103.717, 136.603, 6.05, 0.678)
pt3dadd(103.649, 136.698, 6.021, 0.678)
pt3dadd(103.583, 136.794, 5.989, 0.678)
pt3dadd(103.516, 136.889, 5.956, 0.678)
pt3dadd(103.45, 136.985, 5.924, 0.678)
pt3dadd(103.384, 137.08, 5.892, 0.678)
pt3dadd(103.317, 137.176, 5.859, 0.678)
pt3dadd(103.251, 137.272, 5.827, 0.678)
pt3dadd(103.185, 137.366, 5.795, 0.678)
pt3dadd(103.119, 137.462, 5.762, 0.678)
pt3dadd(103.053, 137.557, 5.73, 0.678)
pt3dadd(102.981, 137.651, 5.703, 0.678)
pt3dadd(102.905, 137.744, 5.682, 0.678)
pt3dadd(102.829, 137.838, 5.661, 0.678)
pt3dadd(102.753, 137.932, 5.639, 0.678)
pt3dadd(102.677, 138.024, 5.618, 0.678)
pt3dadd(102.601, 138.118, 5.597, 0.678)
pt3dadd(102.525, 138.21, 5.575, 0.678)
pt3dadd(102.449, 138.304, 5.554, 0.678)
pt3dadd(102.373, 138.396, 5.533, 0.678)
pt3dadd(102.297, 138.491, 5.511, 0.678)
pt3dadd(102.218, 138.583, 5.494, 0.688)
pt3dadd(102.138, 138.674, 5.48, 0.708)
pt3dadd(102.057, 138.766, 5.465, 0.728)
pt3dadd(101.977, 138.857, 5.451, 0.748)
pt3dadd(101.897, 138.949, 5.437, 0.768)
pt3dadd(101.816, 139.04, 5.423, 0.788)
pt3dadd(101.736, 139.133, 5.409, 0.808)
pt3dadd(101.655, 139.224, 5.395, 0.828)
pt3dadd(101.575, 139.316, 5.381, 0.848)
pt3dadd(101.494, 139.408, 5.366, 0.868)
pt3dadd(101.412, 139.498, 5.355, 0.888)
pt3dadd(101.329, 139.588, 5.346, 0.91)
pt3dadd(101.246, 139.679, 5.336, 0.93)
pt3dadd(101.163, 139.77, 5.327, 0.952)
pt3dadd(101.08, 139.86, 5.317, 0.972)
pt3dadd(100.997, 139.95, 5.308, 0.994)
pt3dadd(100.914, 140.04, 5.299, 1.014)
pt3dadd(100.831, 140.13, 5.289, 1.036)
pt3dadd(100.748, 140.22, 5.28, 1.056)
pt3dadd(100.665, 140.31, 5.271, 1.078)
pt3dadd(100.58, 140.4, 5.265, 1.07)
pt3dadd(100.494, 140.489, 5.262, 1.042)
pt3dadd(100.408, 140.578, 5.26, 1.012)
pt3dadd(100.322, 140.665, 5.257, 0.984)
pt3dadd(100.236, 140.754, 5.255, 0.954)
pt3dadd(100.151, 140.842, 5.252, 0.926)
pt3dadd(100.065, 140.93, 5.25, 0.896)
pt3dadd(99.979, 141.019, 5.247, 0.868)
pt3dadd(99.893, 141.108, 5.244, 0.838)
pt3dadd(99.807, 141.196, 5.242, 0.81)
pt3dadd(99.727, 141.289, 5.239, 0.784)
pt3dadd(99.653, 141.385, 5.236, 0.762)
pt3dadd(99.578, 141.482, 5.232, 0.74)
pt3dadd(99.503, 141.581, 5.229, 0.718)
pt3dadd(99.429, 141.678, 5.225, 0.696)
pt3dadd(99.354, 141.774, 5.222, 0.676)
pt3dadd(99.279, 141.871, 5.219, 0.654)
pt3dadd(99.205, 141.968, 5.215, 0.632)
pt3dadd(99.13, 142.064, 5.212, 0.61)
pt3dadd(99.055, 142.162, 5.208, 0.588)
pt3dadd(98.985, 142.262, 5.204, 0.578)
pt3dadd(98.916, 142.363, 5.199, 0.576)
pt3dadd(98.848, 142.464, 5.194, 0.576)
pt3dadd(98.78, 142.565, 5.19, 0.574)
pt3dadd(98.711, 142.666, 5.185, 0.574)
pt3dadd(98.643, 142.766, 5.18, 0.572)
pt3dadd(98.575, 142.867, 5.175, 0.57)
pt3dadd(98.507, 142.969, 5.17, 0.57)
pt3dadd(98.438, 143.07, 5.166, 0.568)
pt3dadd(98.37, 143.171, 5.161, 0.568)
pt3dadd(98.298, 143.269, 5.155, 0.596)
pt3dadd(98.224, 143.366, 5.147, 0.644)
pt3dadd(98.15, 143.464, 5.14, 0.692)
pt3dadd(98.076, 143.561, 5.133, 0.74)
pt3dadd(98.002, 143.659, 5.125, 0.786)
pt3dadd(97.928, 143.756, 5.118, 0.834)
pt3dadd(97.854, 143.852, 5.111, 0.882)
pt3dadd(97.779, 143.95, 5.103, 0.93)
pt3dadd(97.705, 144.047, 5.096, 0.978)
pt3dadd(97.631, 144.144, 5.089, 1.026)
pt3dadd(97.555, 144.239, 5.08, 1.026)
pt3dadd(97.477, 144.334, 5.069, 0.998)
pt3dadd(97.399, 144.428, 5.059, 0.968)
pt3dadd(97.321, 144.522, 5.049, 0.94)
pt3dadd(97.242, 144.616, 5.039, 0.91)
pt3dadd(97.164, 144.71, 5.029, 0.88)
pt3dadd(97.086, 144.804, 5.018, 0.852)
pt3dadd(97.008, 144.898, 5.008, 0.822)
pt3dadd(96.93, 144.992, 4.998, 0.794)
pt3dadd(96.852, 145.087, 4.988, 0.764)
pt3dadd(96.777, 145.182, 4.972, 0.734)
pt3dadd(96.703, 145.277, 4.953, 0.704)
pt3dadd(96.629, 145.372, 4.934, 0.674)
pt3dadd(96.556, 145.468, 4.915, 0.644)
pt3dadd(96.482, 145.562, 4.895, 0.614)
pt3dadd(96.408, 145.658, 4.876, 0.582)
pt3dadd(96.335, 145.754, 4.857, 0.552)
pt3dadd(96.261, 145.849, 4.838, 0.522)
pt3dadd(96.187, 145.944, 4.819, 0.492)
pt3dadd(96.113, 146.04, 4.8, 0.462)
pt3dadd(96.048, 146.136, 4.769, 0.452)
pt3dadd(95.986, 146.234, 4.735, 0.452)
pt3dadd(95.924, 146.33, 4.7, 0.452)
pt3dadd(95.862, 146.428, 4.665, 0.452)
pt3dadd(95.8, 146.524, 4.631, 0.452)
pt3dadd(95.738, 146.621, 4.596, 0.452)
pt3dadd(95.677, 146.718, 4.561, 0.452)
pt3dadd(95.615, 146.814, 4.527, 0.452)
pt3dadd(95.553, 146.912, 4.492, 0.452)
pt3dadd(95.491, 147.01, 4.457, 0.452)
pt3dadd(95.423, 147.106, 4.431, 0.442)
pt3dadd(95.353, 147.202, 4.408, 0.428)
pt3dadd(95.283, 147.299, 4.385, 0.412)
pt3dadd(95.213, 147.395, 4.362, 0.398)
pt3dadd(95.206, 147.392, 4.36, 0.398)
pt3dadd(95.136, 147.491, 4.337, 0.384)
pt3dadd(95.128, 147.488, 4.336, 0.384)
pt3dadd(95.058, 147.584, 4.313, 0.37)
pt3dadd(94.988, 147.68, 4.29, 0.354)
pt3dadd(94.918, 147.778, 4.267, 0.34)
pt3dadd(94.848, 147.874, 4.244, 0.326)
pt3dadd(94.778, 147.971, 4.22, 0.31)
pt3dadd(94.706, 148.068, 4.202, 0.302)
pt3dadd(94.633, 148.164, 4.185, 0.292)
pt3dadd(94.56, 148.261, 4.168, 0.284)
pt3dadd(94.488, 148.357, 4.152, 0.276)
pt3dadd(94.415, 148.454, 4.135, 0.268)
pt3dadd(94.342, 148.55, 4.118, 0.26)
pt3dadd(94.27, 148.648, 4.101, 0.252)
pt3dadd(94.197, 148.745, 4.085, 0.244)
pt3dadd(94.125, 148.842, 4.068, 0.236)
pt3dadd(94.052, 148.938, 4.051, 0.228)
pt3dadd(93.979, 149.035, 4.039, 0.226)
pt3dadd(93.905, 149.132, 4.028, 0.226)
pt3dadd(93.832, 149.23, 4.018, 0.226)
pt3dadd(93.759, 149.327, 4.007, 0.226)
pt3dadd(93.685, 149.425, 3.996, 0.226)
pt3dadd(93.612, 149.522, 3.986, 0.226)
pt3dadd(93.539, 149.62, 3.975, 0.226)
pt3dadd(93.465, 149.717, 3.964, 0.226)
pt3dadd(93.392, 149.814, 3.954, 0.226)
pt3dadd(93.319, 149.911, 3.943, 0.226)
pt3dadd(93.259, 150.017, 3.938, 0.226)
pt3dadd(93.204, 150.125, 3.935, 0.226)
pt3dadd(93.149, 150.232, 3.933, 0.226)
pt3dadd(93.094, 150.34, 3.93, 0.226)
pt3dadd(93.039, 150.448, 3.927, 0.226)
pt3dadd(92.984, 150.556, 3.924, 0.226)
pt3dadd(92.929, 150.662, 3.921, 0.226)
pt3dadd(92.874, 150.772, 3.919, 0.226)
pt3dadd(92.819, 150.88, 3.916, 0.226)
pt3dadd(92.764, 150.988, 3.913, 0.226)
pt3dadd(92.72, 151.099, 3.909, 0.248)
pt3dadd(92.68, 151.212, 3.905, 0.276)
pt3dadd(92.64, 151.325, 3.901, 0.306)
pt3dadd(92.6, 151.438, 3.897, 0.336)
pt3dadd(92.56, 151.552, 3.893, 0.364)
pt3dadd(92.52, 151.664, 3.889, 0.394)
pt3dadd(92.48, 151.778, 3.885, 0.422)
pt3dadd(92.44, 151.891, 3.881, 0.452)
pt3dadd(92.4, 152.004, 3.877, 0.482)
pt3dadd(92.36, 152.117, 3.873, 0.51)
pt3dadd(92.315, 152.228, 3.868, 0.514)
pt3dadd(92.268, 152.34, 3.861, 0.51)
pt3dadd(92.221, 152.452, 3.855, 0.506)
pt3dadd(92.175, 152.562, 3.848, 0.502)
pt3dadd(92.128, 152.672, 3.842, 0.498)
pt3dadd(92.081, 152.784, 3.835, 0.494)
pt3dadd(92.035, 152.894, 3.829, 0.49)
pt3dadd(91.988, 153.005, 3.823, 0.486)
pt3dadd(91.942, 153.118, 3.816, 0.482)
pt3dadd(91.895, 153.228, 3.81, 0.478)
pt3dadd(91.844, 153.337, 3.801, 0.466)
pt3dadd(91.793, 153.446, 3.792, 0.45)
pt3dadd(91.741, 153.554, 3.782, 0.436)
pt3dadd(91.69, 153.664, 3.773, 0.422)
pt3dadd(91.638, 153.772, 3.763, 0.406)
pt3dadd(91.587, 153.882, 3.754, 0.392)
pt3dadd(91.536, 153.991, 3.745, 0.378)
pt3dadd(91.484, 154.099, 3.735, 0.362)
pt3dadd(91.433, 154.208, 3.726, 0.348)
pt3dadd(91.381, 154.318, 3.717, 0.334)
pt3dadd(91.336, 154.428, 3.703, 0.36)
pt3dadd(91.293, 154.538, 3.69, 0.396)
pt3dadd(91.25, 154.651, 3.676, 0.43)
}
}
proc shape3d_88() {
apic[10] { pt3dadd(91.206, 154.762, 3.662, 0.466)
pt3dadd(91.163, 154.873, 3.648, 0.502)
pt3dadd(91.12, 154.985, 3.634, 0.538)
pt3dadd(91.076, 155.095, 3.62, 0.574)
pt3dadd(91.033, 155.207, 3.606, 0.608)
pt3dadd(90.99, 155.317, 3.592, 0.644)
pt3dadd(90.946, 155.43, 3.578, 0.68)
pt3dadd(90.912, 155.537, 3.544, 0.7)
pt3dadd(90.879, 155.642, 3.506, 0.718)
pt3dadd(90.846, 155.749, 3.467, 0.736)
pt3dadd(90.813, 155.855, 3.429, 0.754)
pt3dadd(90.78, 155.962, 3.391, 0.77)
pt3dadd(90.748, 156.068, 3.352, 0.788)
pt3dadd(90.715, 156.175, 3.314, 0.806)
pt3dadd(90.682, 156.281, 3.276, 0.824)
pt3dadd(90.649, 156.388, 3.237, 0.84)
pt3dadd(90.616, 156.493, 3.199, 0.858)
pt3dadd(90.571, 156.6, 3.169, 0.854)
pt3dadd(90.523, 156.706, 3.141, 0.844)
pt3dadd(90.476, 156.812, 3.113, 0.836)
pt3dadd(90.428, 156.919, 3.085, 0.828)
pt3dadd(90.38, 157.025, 3.057, 0.818)
pt3dadd(90.333, 157.13, 3.029, 0.81)
pt3dadd(90.285, 157.236, 3, 0.8)
pt3dadd(90.237, 157.343, 2.972, 0.792)
pt3dadd(90.189, 157.448, 2.944, 0.782)
pt3dadd(90.141, 157.555, 2.916, 0.774)
pt3dadd(90.095, 157.664, 2.895, 0.764)
pt3dadd(90.048, 157.772, 2.875, 0.754)
pt3dadd(90.001, 157.882, 2.855, 0.746)
pt3dadd(89.954, 157.99, 2.835, 0.736)
pt3dadd(89.907, 158.099, 2.815, 0.726)
pt3dadd(89.86, 158.207, 2.795, 0.716)
pt3dadd(89.814, 158.317, 2.775, 0.708)
pt3dadd(89.767, 158.425, 2.755, 0.698)
pt3dadd(89.72, 158.534, 2.734, 0.688)
pt3dadd(89.673, 158.644, 2.715, 0.678)
pt3dadd(89.634, 158.755, 2.702, 0.668)
pt3dadd(89.597, 158.869, 2.689, 0.658)
pt3dadd(89.56, 158.982, 2.677, 0.648)
pt3dadd(89.522, 159.096, 2.665, 0.638)
pt3dadd(89.485, 159.209, 2.653, 0.628)
pt3dadd(89.448, 159.322, 2.641, 0.618)
pt3dadd(89.41, 159.436, 2.628, 0.608)
pt3dadd(89.373, 159.548, 2.616, 0.598)
pt3dadd(89.335, 159.661, 2.604, 0.588)
pt3dadd(89.298, 159.774, 2.592, 0.578)
pt3dadd(89.268, 159.89, 2.585, 0.552)
pt3dadd(89.238, 160.006, 2.578, 0.524)
pt3dadd(89.209, 160.121, 2.572, 0.496)
pt3dadd(89.179, 160.237, 2.565, 0.468)
pt3dadd(89.15, 160.352, 2.559, 0.442)
pt3dadd(89.12, 160.468, 2.552, 0.414)
pt3dadd(89.091, 160.584, 2.546, 0.386)
pt3dadd(89.061, 160.699, 2.539, 0.358)
pt3dadd(89.032, 160.814, 2.533, 0.33)
pt3dadd(89.002, 160.93, 2.526, 0.302)
pt3dadd(88.976, 161.045, 2.513, 0.356)
pt3dadd(88.949, 161.16, 2.499, 0.416)
pt3dadd(88.923, 161.275, 2.486, 0.478)
pt3dadd(88.896, 161.392, 2.472, 0.538)
pt3dadd(88.869, 161.507, 2.458, 0.598)
pt3dadd(88.843, 161.622, 2.445, 0.658)
pt3dadd(88.817, 161.737, 2.431, 0.72)
pt3dadd(88.79, 161.852, 2.417, 0.78)
pt3dadd(88.764, 161.968, 2.404, 0.84)
pt3dadd(88.737, 162.083, 2.39, 0.9)
pt3dadd(88.676, 162.186, 2.371, 0.902)
pt3dadd(88.613, 162.288, 2.351, 0.902)
pt3dadd(88.55, 162.39, 2.331, 0.9)
pt3dadd(88.487, 162.491, 2.312, 0.898)
pt3dadd(88.425, 162.593, 2.292, 0.898)
pt3dadd(88.362, 162.695, 2.272, 0.896)
pt3dadd(88.299, 162.797, 2.253, 0.894)
pt3dadd(88.236, 162.899, 2.233, 0.892)
pt3dadd(88.173, 163.001, 2.213, 0.892)
pt3dadd(88.11, 163.103, 2.194, 0.89)
pt3dadd(88.057, 163.162, 2.116, 0.824)
pt3dadd(88.004, 163.22, 2.037, 0.758)
pt3dadd(87.95, 163.28, 1.959, 0.692)
pt3dadd(87.897, 163.339, 1.881, 0.624)
pt3dadd(87.843, 163.399, 1.802, 0.558)
pt3dadd(87.79, 163.458, 1.724, 0.492)
pt3dadd(87.737, 163.517, 1.646, 0.426)
pt3dadd(87.684, 163.577, 1.567, 0.358)
pt3dadd(87.63, 163.636, 1.489, 0.292)
pt3dadd(87.577, 163.694, 1.411, 0.226)
pt3dadd(87.45, 163.68, 1.409, 0.268)
pt3dadd(87.324, 163.666, 1.408, 0.31)
pt3dadd(87.197, 163.65, 1.406, 0.352)
pt3dadd(87.072, 163.636, 1.388, 0.4)
pt3dadd(86.947, 163.621, 1.369, 0.448)
pt3dadd(86.835, 163.608, 1.33, 0.482)
pt3dadd(86.74, 163.597, 1.26, 0.494)
pt3dadd(86.64, 163.583, 1.223, 0.502)
pt3dadd(86.633, 163.58, 1.221, 0.502)
pt3dadd(86.626, 163.578, 1.22, 0.502)
pt3dadd(86.513, 163.559, 1.263, 0.502)
pt3dadd(86.426, 163.526, 1.318, 0.498)
pt3dadd(86.405, 163.466, 1.403, 0.482)
pt3dadd(86.384, 163.406, 1.489, 0.468)
pt3dadd(86.363, 163.346, 1.574, 0.452)
pt3dadd(86.265, 163.313, 1.631, 0.476)
pt3dadd(86.164, 163.28, 1.687, 0.502)
pt3dadd(86.074, 163.285, 1.758, 0.542)
pt3dadd(85.984, 163.289, 1.828, 0.58)
pt3dadd(85.888, 163.318, 1.872, 0.628)
pt3dadd(85.782, 163.384, 1.876, 0.688)
pt3dadd(85.674, 163.446, 1.877, 0.74)
pt3dadd(85.56, 163.499, 1.872, 0.776)
pt3dadd(85.447, 163.553, 1.866, 0.812)
pt3dadd(85.385, 163.631, 1.835, 0.852)
pt3dadd(85.367, 163.729, 1.781, 0.896)
pt3dadd(85.376, 163.792, 1.716, 0.984)
pt3dadd(85.285, 163.86, 1.673, 1.004)
pt3dadd(85.195, 163.928, 1.63, 1.024)
pt3dadd(85.104, 163.996, 1.587, 1.046)
pt3dadd(85.01, 164.069, 1.561, 1.062)
pt3dadd(84.912, 164.146, 1.553, 1.078)
pt3dadd(84.815, 164.221, 1.544, 1.094)
pt3dadd(84.717, 164.297, 1.536, 1.11)
pt3dadd(84.62, 164.372, 1.527, 1.126)
pt3dadd(84.523, 164.44, 1.495, 1.164)
pt3dadd(84.426, 164.503, 1.456, 1.206)
pt3dadd(84.303, 164.536, 1.455, 1.228)
pt3dadd(84.181, 164.568, 1.453, 1.25)
pt3dadd(84.105, 164.654, 1.452, 1.256)
pt3dadd(84.046, 164.76, 1.45, 1.256)
pt3dadd(83.99, 164.867, 1.449, 1.24)
pt3dadd(83.937, 164.976, 1.447, 1.2)
pt3dadd(83.885, 165.085, 1.446, 1.158)
pt3dadd(83.833, 165.194, 1.444, 1.054)
pt3dadd(83.772, 165.296, 1.441, 0.966)
pt3dadd(83.688, 165.386, 1.432, 0.924)
pt3dadd(83.604, 165.476, 1.424, 0.882)
pt3dadd(83.52, 165.566, 1.415, 0.84)
pt3dadd(83.436, 165.656, 1.407, 0.8)
pt3dadd(83.341, 165.725, 1.384, 0.744)
pt3dadd(83.233, 165.77, 1.346, 0.676)
pt3dadd(83.137, 165.834, 1.358, 0.634)
pt3dadd(83.046, 165.906, 1.394, 0.606)
pt3dadd(82.985, 166.008, 1.406, 0.58)
pt3dadd(82.926, 166.114, 1.416, 0.556)
pt3dadd(82.906, 166.184, 1.343, 0.522)
pt3dadd(82.892, 166.249, 1.259, 0.486)
pt3dadd(82.848, 166.339, 1.21, 0.454)
pt3dadd(82.793, 166.439, 1.174, 0.424)
pt3dadd(82.738, 166.54, 1.139, 0.394)
pt3dadd(82.658, 166.621, 1.119, 0.366)
pt3dadd(82.549, 166.685, 1.118, 0.342)
pt3dadd(82.466, 166.763, 1.106, 0.32)
pt3dadd(82.434, 166.871, 1.074, 0.304)
pt3dadd(82.401, 166.981, 1.042, 0.286)
pt3dadd(82.374, 167.093, 1.021, 0.28)
pt3dadd(82.354, 167.21, 1.016, 0.288)
pt3dadd(82.334, 167.328, 1.011, 0.296)
pt3dadd(82.315, 167.444, 1.007, 0.364)
pt3dadd(82.295, 167.561, 0.997, 0.448)
pt3dadd(82.275, 167.676, 0.98, 0.49)
pt3dadd(82.256, 167.791, 0.962, 0.53)
pt3dadd(82.236, 167.908, 0.944, 0.572)
pt3dadd(82.216, 168.023, 0.926, 0.612)
pt3dadd(82.197, 168.138, 0.908, 0.654)
pt3dadd(82.174, 168.253, 0.904, 0.694)
pt3dadd(82.148, 168.367, 0.92, 0.734)
pt3dadd(82.121, 168.481, 0.936, 0.772)
pt3dadd(82.095, 168.596, 0.952, 0.812)
pt3dadd(82.069, 168.71, 0.968, 0.852)
pt3dadd(82.042, 168.824, 0.984, 0.89)
pt3dadd(81.994, 168.931, 0.976, 0.922)
pt3dadd(81.933, 169.034, 0.956, 0.948)
pt3dadd(81.873, 169.138, 0.936, 0.974)
pt3dadd(81.813, 169.241, 0.916, 1)
pt3dadd(81.753, 169.344, 0.896, 1.026)
pt3dadd(81.722, 169.459, 0.89, 1.03)
pt3dadd(81.696, 169.576, 0.887, 1.03)
pt3dadd(81.67, 169.692, 0.884, 1.03)
pt3dadd(81.644, 169.808, 0.881, 1.03)
pt3dadd(81.618, 169.924, 0.878, 1.03)
pt3dadd(81.593, 170.04, 0.874, 1.03)
pt3dadd(81.555, 170.152, 0.866, 1.03)
pt3dadd(81.485, 170.248, 0.843, 1.03)
pt3dadd(81.415, 170.345, 0.819, 1.03)
pt3dadd(81.344, 170.442, 0.796, 1.03)
pt3dadd(81.274, 170.538, 0.773, 1.03)
pt3dadd(81.209, 170.639, 0.764, 1.032)
pt3dadd(81.145, 170.743, 0.763, 1.038)
pt3dadd(81.082, 170.848, 0.761, 1.042)
pt3dadd(81.019, 170.952, 0.76, 1.046)
pt3dadd(80.956, 171.054, 0.758, 1.052)
pt3dadd(80.89, 171.157, 0.763, 1.06)
pt3dadd(80.82, 171.253, 0.784, 1.076)
pt3dadd(80.75, 171.349, 0.804, 1.092)
pt3dadd(80.679, 171.446, 0.824, 1.108)
pt3dadd(80.609, 171.542, 0.845, 1.126)
pt3dadd(80.546, 171.646, 0.85, 1.134)
pt3dadd(80.486, 171.751, 0.848, 1.138)
pt3dadd(80.425, 171.856, 0.847, 1.142)
pt3dadd(80.365, 171.961, 0.845, 1.148)
pt3dadd(80.304, 172.067, 0.844, 1.152)
}
}
proc shape3d_89() {
apic[10] { pt3dadd(80.241, 172.17, 0.846, 1.152)
pt3dadd(80.17, 172.268, 0.858, 1.136)
pt3dadd(80.099, 172.366, 0.871, 1.12)
pt3dadd(80.027, 172.464, 0.883, 1.104)
pt3dadd(79.956, 172.562, 0.896, 1.088)
pt3dadd(79.887, 172.66, 0.913, 1.062)
pt3dadd(79.821, 172.758, 0.936, 1.026)
pt3dadd(79.755, 172.856, 0.959, 0.99)
pt3dadd(79.689, 172.955, 0.981, 0.952)
pt3dadd(79.63, 173.058, 0.996, 0.918)
pt3dadd(79.585, 173.168, 0.994, 0.886)
pt3dadd(79.541, 173.281, 0.993, 0.854)
pt3dadd(79.496, 173.393, 0.991, 0.824)
pt3dadd(79.451, 173.504, 0.99, 0.792)
pt3dadd(79.379, 173.598, 0.998, 0.748)
pt3dadd(79.287, 173.677, 1.014, 0.696)
pt3dadd(79.205, 173.762, 1.042, 0.65)
pt3dadd(79.13, 173.848, 1.078, 0.61)
pt3dadd(79.019, 173.894, 1.096, 0.582)
pt3dadd(78.901, 173.934, 1.111, 0.556)
pt3dadd(78.805, 173.995, 1.076, 0.564)
pt3dadd(78.719, 174.061, 1.029, 0.584)
pt3dadd(78.703, 174.143, 0.957, 0.672)
pt3dadd(78.646, 174.228, 0.91, 0.73)
pt3dadd(78.567, 174.316, 0.878, 0.77)
pt3dadd(78.489, 174.402, 0.845, 0.812)
pt3dadd(78.41, 174.488, 0.813, 0.852)
pt3dadd(78.33, 174.553, 0.765, 0.906)
pt3dadd(78.25, 174.57, 0.687, 0.986)
pt3dadd(78.157, 174.607, 0.633, 1.048)
pt3dadd(78.05, 174.666, 0.608, 1.088)
pt3dadd(77.96, 174.745, 0.596, 1.112)
pt3dadd(77.881, 174.84, 0.595, 1.122)
pt3dadd(77.824, 174.943, 0.593, 1.13)
pt3dadd(77.817, 174.941, 0.592, 1.13)
pt3dadd(77.792, 175.057, 0.59, 1.13)
pt3dadd(77.768, 175.175, 0.589, 1.13)
pt3dadd(77.726, 175.285, 0.587, 1.126)
pt3dadd(77.666, 175.391, 0.586, 1.12)
pt3dadd(77.659, 175.388, 0.584, 1.12)
pt3dadd(77.599, 175.494, 0.583, 1.114)
pt3dadd(77.54, 175.601, 0.581, 1.108)
pt3dadd(77.442, 175.657, 0.58, 1.098)
pt3dadd(77.317, 175.682, 0.579, 1.088)
pt3dadd(77.206, 175.724, 0.577, 1.08)
pt3dadd(77.134, 175.824, 0.576, 1.08)
pt3dadd(77.062, 175.922, 0.574, 1.08)
pt3dadd(77.001, 176.026, 0.573, 1.084)
pt3dadd(76.972, 176.142, 0.571, 1.102)
pt3dadd(76.943, 176.258, 0.57, 1.12)
pt3dadd(76.888, 176.362, 0.57, 1.138)
pt3dadd(76.804, 176.452, 0.572, 1.156)
pt3dadd(76.72, 176.542, 0.575, 1.174)
pt3dadd(76.654, 176.605, 0.627, 1.172)
pt3dadd(76.598, 176.658, 0.705, 1.158)
pt3dadd(76.515, 176.713, 0.763, 1.136)
pt3dadd(76.428, 176.771, 0.818, 1.112)
pt3dadd(76.372, 176.858, 0.813, 1.088)
pt3dadd(76.332, 176.964, 0.777, 1.062)
pt3dadd(76.296, 177.076, 0.756, 1.032)
pt3dadd(76.212, 177.162, 0.77, 1.002)
pt3dadd(76.125, 177.247, 0.786, 0.974)
pt3dadd(76.038, 177.331, 0.803, 0.946)
pt3dadd(75.95, 177.416, 0.819, 0.916)
pt3dadd(75.873, 177.506, 0.811, 0.878)
pt3dadd(75.803, 177.602, 0.784, 0.832)
pt3dadd(75.734, 177.697, 0.757, 0.786)
pt3dadd(75.664, 177.794, 0.73, 0.74)
pt3dadd(75.599, 177.892, 0.71, 0.69)
pt3dadd(75.553, 178.003, 0.72, 0.622)
pt3dadd(75.507, 178.114, 0.73, 0.556)
pt3dadd(75.455, 178.222, 0.734, 0.502)
pt3dadd(75.378, 178.314, 0.718, 0.496)
pt3dadd(75.302, 178.409, 0.702, 0.49)
pt3dadd(75.225, 178.502, 0.685, 0.484)
pt3dadd(75.149, 178.597, 0.669, 0.478)
pt3dadd(75.038, 178.632, 0.653, 0.5)
pt3dadd(74.913, 178.64, 0.637, 0.532)
pt3dadd(74.803, 178.68, 0.627, 0.57)
pt3dadd(74.718, 178.77, 0.625, 0.618)
pt3dadd(74.647, 178.865, 0.624, 0.652)
pt3dadd(74.64, 178.862, 0.622, 0.652)
pt3dadd(74.616, 178.98, 0.621, 0.652)
pt3dadd(74.591, 179.096, 0.619, 0.652)
pt3dadd(74.556, 179.209, 0.613, 0.66)
pt3dadd(74.499, 179.315, 0.595, 0.684)
pt3dadd(74.445, 179.419, 0.573, 0.728)
pt3dadd(74.396, 179.516, 0.528, 0.844)
pt3dadd(74.32, 179.61, 0.521, 0.896)
pt3dadd(74.241, 179.705, 0.517, 0.94)
pt3dadd(74.162, 179.798, 0.514, 0.984)
pt3dadd(74.083, 179.892, 0.51, 1.03)
pt3dadd(74.004, 179.987, 0.506, 1.074)
pt3dadd(73.939, 180.09, 0.505, 1.096)
pt3dadd(73.876, 180.193, 0.503, 1.116)
pt3dadd(73.869, 180.191, 0.502, 1.116)
pt3dadd(73.806, 180.295, 0.5, 1.134)
pt3dadd(73.743, 180.4, 0.499, 1.152)
pt3dadd(73.679, 180.504, 0.497, 1.17)
pt3dadd(73.623, 180.611, 0.496, 1.178)
pt3dadd(73.574, 180.721, 0.494, 1.174)
pt3dadd(73.524, 180.83, 0.493, 1.17)
pt3dadd(73.475, 180.941, 0.491, 1.164)
pt3dadd(73.426, 181.051, 0.49, 1.16)
pt3dadd(73.376, 181.162, 0.488, 1.156)
pt3dadd(73.317, 181.267, 0.487, 1.138)
pt3dadd(73.253, 181.37, 0.485, 1.114)
pt3dadd(73.19, 181.475, 0.484, 1.09)
pt3dadd(73.127, 181.578, 0.482, 1.068)
pt3dadd(73.064, 181.682, 0.481, 1.044)
pt3dadd(72.991, 181.78, 0.479, 1.02)
pt3dadd(72.902, 181.865, 0.478, 0.996)
pt3dadd(72.813, 181.951, 0.476, 0.97)
pt3dadd(72.724, 182.036, 0.475, 0.944)
pt3dadd(72.635, 182.123, 0.473, 0.92)
pt3dadd(72.556, 182.215, 0.472, 0.89)
pt3dadd(72.493, 182.32, 0.471, 0.852)
pt3dadd(72.429, 182.423, 0.469, 0.816)
pt3dadd(72.366, 182.526, 0.468, 0.778)
pt3dadd(72.303, 182.63, 0.466, 0.74)
pt3dadd(72.24, 182.735, 0.465, 0.704)
pt3dadd(72.151, 182.82, 0.463, 0.668)
pt3dadd(72.062, 182.906, 0.462, 0.634)
pt3dadd(71.973, 182.992, 0.46, 0.598)
pt3dadd(71.885, 183.077, 0.459, 0.562)
pt3dadd(71.796, 183.163, 0.457, 0.528)
pt3dadd(71.732, 183.268, 0.456, 0.5)
pt3dadd(71.669, 183.371, 0.454, 0.472)
pt3dadd(71.606, 183.475, 0.453, 0.444)
pt3dadd(71.543, 183.578, 0.451, 0.416)
pt3dadd(71.479, 183.683, 0.45, 0.388)
pt3dadd(71.411, 183.784, 0.448, 0.37)
pt3dadd(71.339, 183.883, 0.447, 0.362)
pt3dadd(71.267, 183.982, 0.445, 0.352)
pt3dadd(71.196, 184.081, 0.444, 0.342)
pt3dadd(71.124, 184.18, 0.442, 0.332)
pt3dadd(71.052, 184.279, 0.441, 0.322)
pt3dadd(70.98, 184.378, 0.439, 0.31)
pt3dadd(70.905, 184.474, 0.437, 0.304)
pt3dadd(70.81, 184.553, 0.43, 0.33)
pt3dadd(70.721, 184.632, 0.417, 0.358)
pt3dadd(70.686, 184.704, 0.34, 0.424)
pt3dadd(70.653, 184.782, 0.273, 0.492)
pt3dadd(70.633, 184.897, 0.249, 0.572)
pt3dadd(70.614, 185.01, 0.225, 0.652)
pt3dadd(70.599, 185.077, 0.155, 0.708)
pt3dadd(70.587, 185.12, 0.061, 0.754)
pt3dadd(70.575, 185.162, -0.034, 0.8)
pt3dadd(70.563, 185.206, -0.128, 0.846)
pt3dadd(70.524, 185.28, -0.199, 0.898)
pt3dadd(70.48, 185.359, -0.266, 0.952)
pt3dadd(70.384, 185.426, -0.301, 0.944)
pt3dadd(70.286, 185.491, -0.335, 0.934)
pt3dadd(70.205, 185.572, -0.371, 0.9)
pt3dadd(70.137, 185.665, -0.408, 0.846)
pt3dadd(70.089, 185.755, -0.462, 0.786)
pt3dadd(70.051, 185.844, -0.523, 0.724)
pt3dadd(70.002, 185.911, -0.546, 0.662)
pt3dadd(69.925, 185.924, -0.467, 0.606)
pt3dadd(69.846, 185.927, -0.389, 0.526)
pt3dadd(69.762, 185.932, -0.315, 0.482)
pt3dadd(69.676, 185.941, -0.241, 0.456)
pt3dadd(69.559, 185.964, -0.218, 0.412)
pt3dadd(69.436, 185.987, -0.204, 0.366)
pt3dadd(69.318, 186.028, -0.201, 0.328)
pt3dadd(69.201, 186.076, -0.202, 0.292)
pt3dadd(69.118, 186.151, -0.221, 0.27)
pt3dadd(69.067, 186.252, -0.256, 0.256)
pt3dadd(68.978, 186.313, -0.287, 0.282)
pt3dadd(68.861, 186.346, -0.308, 0.332)
pt3dadd(68.757, 186.415, -0.309, 0.356)
pt3dadd(68.653, 186.485, -0.311, 0.382)
pt3dadd(68.549, 186.553, -0.312, 0.408)
pt3dadd(68.445, 186.623, -0.314, 0.432)
pt3dadd(68.341, 186.689, -0.32, 0.462)
pt3dadd(68.233, 186.748, -0.342, 0.502)
pt3dadd(68.226, 186.746, -0.343, 0.502)
pt3dadd(68.119, 186.805, -0.365, 0.54)
pt3dadd(68.011, 186.865, -0.386, 0.58)
pt3dadd(67.904, 186.925, -0.407, 0.62)
pt3dadd(67.789, 186.968, -0.397, 0.66)
pt3dadd(67.672, 187.008, -0.379, 0.698)
pt3dadd(67.555, 187.049, -0.36, 0.738)
pt3dadd(67.438, 187.09, -0.342, 0.778)
pt3dadd(67.328, 187.141, -0.33, 0.816)
pt3dadd(67.231, 187.219, -0.332, 0.85)
pt3dadd(67.135, 187.297, -0.333, 0.886)
pt3dadd(67.038, 187.375, -0.335, 0.922)
pt3dadd(66.941, 187.453, -0.336, 0.958)
pt3dadd(66.842, 187.526, -0.329, 0.984)
pt3dadd(66.739, 187.59, -0.308, 0.996)
pt3dadd(66.636, 187.655, -0.286, 1.006)
pt3dadd(66.532, 187.72, -0.265, 1.018)
pt3dadd(66.429, 187.783, -0.243, 1.03)
pt3dadd(66.311, 187.819, -0.223, 1.014)
pt3dadd(66.193, 187.854, -0.203, 0.998)
pt3dadd(66.075, 187.89, -0.183, 0.98)
pt3dadd(65.956, 187.925, -0.163, 0.964)
pt3dadd(65.837, 187.96, -0.151, 0.94)
pt3dadd(65.715, 187.993, -0.152, 0.902)
}
}
proc shape3d_90() {
apic[10] { pt3dadd(65.593, 188.027, -0.154, 0.864)
pt3dadd(65.471, 188.06, -0.155, 0.826)
pt3dadd(65.35, 188.094, -0.157, 0.79)
pt3dadd(65.228, 188.129, -0.158, 0.752)
pt3dadd(65.12, 188.191, -0.16, 0.732)
pt3dadd(65.012, 188.254, -0.161, 0.712)
pt3dadd(64.903, 188.316, -0.163, 0.692)
pt3dadd(64.795, 188.38, -0.164, 0.672)
pt3dadd(64.687, 188.442, -0.166, 0.654)
pt3dadd(64.588, 188.516, -0.167, 0.658)
pt3dadd(64.489, 188.591, -0.169, 0.664)
pt3dadd(64.389, 188.666, -0.17, 0.668)
pt3dadd(64.29, 188.74, -0.172, 0.674)
pt3dadd(64.197, 188.819, -0.173, 0.684)
pt3dadd(64.157, 188.933, -0.174, 0.742)
pt3dadd(64.117, 189.046, -0.176, 0.8)
pt3dadd(64.06, 189.151, -0.18, 0.84)
pt3dadd(63.986, 189.248, -0.187, 0.864)
pt3dadd(63.895, 189.308, -0.205, 0.878)
pt3dadd(63.776, 189.306, -0.243, 0.878)
pt3dadd(63.657, 189.314, -0.277, 0.874)
pt3dadd(63.542, 189.356, -0.302, 0.848)
pt3dadd(63.444, 189.413, -0.332, 0.828)
pt3dadd(63.396, 189.51, -0.376, 0.828)
pt3dadd(63.371, 189.628, -0.382, 0.838)
pt3dadd(63.346, 189.744, -0.388, 0.846)
pt3dadd(63.303, 189.845, -0.392, 0.856)
pt3dadd(63.187, 189.893, -0.394, 0.868)
pt3dadd(63.07, 189.94, -0.395, 0.88)
pt3dadd(62.945, 189.959, -0.397, 0.89)
pt3dadd(62.819, 189.978, -0.398, 0.9)
pt3dadd(62.693, 189.989, -0.4, 0.904)
pt3dadd(62.566, 189.994, -0.401, 0.904)
pt3dadd(62.439, 190, -0.403, 0.904)
pt3dadd(62.316, 190.028, -0.404, 0.904)
pt3dadd(62.199, 190.07, -0.416, 0.904)
pt3dadd(62.091, 190.128, -0.44, 0.904)
pt3dadd(61.983, 190.186, -0.464, 0.904)
pt3dadd(61.875, 190.241, -0.488, 0.904)
pt3dadd(61.769, 190.3, -0.512, 0.904)
pt3dadd(61.685, 190.387, -0.536, 0.892)
pt3dadd(61.602, 190.474, -0.561, 0.88)
pt3dadd(61.519, 190.56, -0.585, 0.87)
pt3dadd(61.436, 190.648, -0.609, 0.858)
pt3dadd(61.343, 190.726, -0.613, 0.846)
pt3dadd(61.242, 190.798, -0.606, 0.832)
pt3dadd(61.142, 190.871, -0.599, 0.82)
pt3dadd(61.042, 190.944, -0.592, 0.806)
pt3dadd(60.937, 191.009, -0.578, 0.804)
pt3dadd(60.831, 191.072, -0.563, 0.804)
pt3dadd(60.725, 191.134, -0.548, 0.804)
pt3dadd(60.619, 191.197, -0.533, 0.804)
pt3dadd(60.506, 191.245, -0.547, 0.82)
pt3dadd(60.39, 191.287, -0.571, 0.842)
pt3dadd(60.275, 191.33, -0.594, 0.864)
pt3dadd(60.159, 191.372, -0.618, 0.886)
pt3dadd(60.045, 191.418, -0.641, 0.908)
pt3dadd(59.938, 191.476, -0.666, 0.924)
pt3dadd(59.83, 191.533, -0.69, 0.942)
pt3dadd(59.722, 191.59, -0.714, 0.958)
pt3dadd(59.614, 191.648, -0.738, 0.976)
pt3dadd(59.504, 191.695, -0.769, 0.98)
pt3dadd(59.393, 191.742, -0.801, 0.98)
pt3dadd(59.282, 191.786, -0.833, 0.98)
pt3dadd(59.171, 191.832, -0.865, 0.98)
pt3dadd(59.059, 191.881, -0.89, 0.972)
pt3dadd(58.947, 191.935, -0.906, 0.956)
pt3dadd(58.835, 191.988, -0.922, 0.94)
pt3dadd(58.723, 192.041, -0.938, 0.922)
pt3dadd(58.611, 192.096, -0.954, 0.906)
pt3dadd(58.506, 192.156, -0.979, 0.894)
pt3dadd(58.402, 192.218, -1.006, 0.882)
pt3dadd(58.298, 192.281, -1.033, 0.872)
pt3dadd(58.194, 192.342, -1.061, 0.86)
pt3dadd(58.098, 192.406, -1.097, 0.846)
pt3dadd(58.007, 192.472, -1.143, 0.832)
pt3dadd(57.891, 192.508, -1.159, 0.838)
pt3dadd(57.767, 192.535, -1.165, 0.848)
pt3dadd(57.643, 192.542, -1.163, 0.868)
pt3dadd(57.517, 192.533, -1.151, 0.898)
pt3dadd(57.391, 192.524, -1.14, 0.928)
pt3dadd(57.383, 192.522, -1.141, 0.928)
pt3dadd(57.262, 192.524, -1.113, 0.962)
pt3dadd(57.141, 192.53, -1.083, 0.998)
pt3dadd(57.024, 192.562, -1.057, 1.004)
pt3dadd(56.904, 192.59, -1.04, 0.994)
pt3dadd(56.78, 192.61, -1.028, 0.974)
pt3dadd(56.656, 192.629, -1.017, 0.956)
pt3dadd(56.531, 192.648, -1.005, 0.936)
pt3dadd(56.407, 192.667, -0.994, 0.916)
pt3dadd(56.283, 192.689, -0.985, 0.896)
pt3dadd(56.158, 192.712, -0.98, 0.872)
pt3dadd(56.034, 192.736, -0.975, 0.848)
pt3dadd(55.91, 192.76, -0.97, 0.824)
pt3dadd(55.786, 192.782, -0.965, 0.8)
pt3dadd(55.662, 192.806, -0.958, 0.776)
pt3dadd(55.543, 192.817, -0.924, 0.762)
pt3dadd(55.425, 192.829, -0.891, 0.746)
pt3dadd(55.306, 192.84, -0.857, 0.73)
pt3dadd(55.187, 192.852, -0.823, 0.714)
pt3dadd(55.067, 192.869, -0.801, 0.702)
pt3dadd(54.944, 192.896, -0.8, 0.696)
pt3dadd(54.82, 192.925, -0.8, 0.692)
pt3dadd(54.697, 192.953, -0.799, 0.688)
pt3dadd(54.574, 192.982, -0.799, 0.682)
pt3dadd(54.45, 193.01, -0.798, 0.678)
pt3dadd(54.332, 193.015, -0.763, 0.678)
pt3dadd(54.219, 193.036, -0.724, 0.678)
pt3dadd(54.103, 193.081, -0.714, 0.726)
pt3dadd(53.986, 193.124, -0.725, 0.82)
pt3dadd(53.918, 193.182, -0.79, 0.84)
pt3dadd(53.898, 193.236, -0.88, 0.758)
pt3dadd(53.883, 193.306, -0.96, 0.694)
pt3dadd(53.857, 193.382, -1.035, 0.678)
pt3dadd(53.789, 193.442, -1.1, 0.69)
pt3dadd(53.678, 193.493, -1.124, 0.73)
pt3dadd(53.552, 193.511, -1.125, 0.786)
pt3dadd(53.427, 193.528, -1.127, 0.816)
pt3dadd(53.305, 193.56, -1.128, 0.808)
pt3dadd(53.185, 193.6, -1.13, 0.754)
pt3dadd(53.064, 193.634, -1.131, 0.756)
pt3dadd(52.94, 193.658, -1.133, 0.766)
pt3dadd(52.815, 193.682, -1.134, 0.774)
pt3dadd(52.691, 193.706, -1.136, 0.784)
pt3dadd(52.567, 193.732, -1.137, 0.794)
pt3dadd(52.443, 193.756, -1.139, 0.802)
pt3dadd(52.327, 193.804, -1.14, 0.82)
pt3dadd(52.213, 193.856, -1.142, 0.84)
pt3dadd(52.1, 193.909, -1.143, 0.86)
pt3dadd(51.986, 193.962, -1.145, 0.88)
pt3dadd(51.872, 194.017, -1.146, 0.9)
pt3dadd(51.787, 194.102, -1.148, 0.904)
pt3dadd(51.709, 194.197, -1.149, 0.904)
pt3dadd(51.631, 194.292, -1.151, 0.904)
pt3dadd(51.553, 194.387, -1.152, 0.904)
pt3dadd(51.476, 194.482, -1.154, 0.904)
pt3dadd(51.393, 194.573, -1.155, 0.888)
pt3dadd(51.308, 194.662, -1.156, 0.866)
pt3dadd(51.233, 194.759, -1.158, 0.838)
pt3dadd(51.168, 194.861, -1.159, 0.804)
pt3dadd(51.096, 194.951, -1.149, 0.778)
pt3dadd(51, 194.993, -1.093, 0.778)
pt3dadd(50.9, 195.019, -1.038, 0.79)
pt3dadd(50.795, 195.028, -0.982, 0.816)
pt3dadd(50.704, 195.073, -0.935, 0.834)
pt3dadd(50.625, 195.152, -0.895, 0.842)
pt3dadd(50.546, 195.233, -0.855, 0.85)
pt3dadd(50.461, 195.31, -0.818, 0.846)
pt3dadd(50.371, 195.38, -0.782, 0.832)
pt3dadd(50.275, 195.452, -0.758, 0.75)
pt3dadd(50.191, 195.527, -0.715, 0.722)
pt3dadd(50.111, 195.608, -0.686, 0.698)
pt3dadd(50.037, 195.706, -0.683, 0.688)
pt3dadd(49.963, 195.803, -0.679, 0.68)
pt3dadd(49.889, 195.9, -0.675, 0.692)
pt3dadd(49.816, 195.992, -0.666, 0.706)
pt3dadd(49.752, 196.037, -0.588, 0.748)
pt3dadd(49.679, 196.066, -0.514, 0.806)
pt3dadd(49.578, 196.054, -0.453, 0.912)
pt3dadd(49.485, 196.094, -0.399, 0.954)
pt3dadd(49.393, 196.146, -0.346, 0.986)
pt3dadd(49.301, 196.198, -0.292, 1.016)
pt3dadd(49.209, 196.249, -0.239, 1.048)
pt3dadd(49.131, 196.297, -0.172, 1.064)
pt3dadd(49.057, 196.343, -0.101, 1.076)
pt3dadd(48.983, 196.388, -0.029, 1.088)
pt3dadd(48.909, 196.435, 0.042, 1.1)
pt3dadd(48.822, 196.48, 0.103, 1.088)
pt3dadd(48.728, 196.524, 0.158, 1.064)
pt3dadd(48.633, 196.568, 0.214, 1.04)
pt3dadd(48.539, 196.614, 0.269, 1.016)
pt3dadd(48.428, 196.627, 0.303, 0.982)
pt3dadd(48.303, 196.619, 0.32, 0.942)
pt3dadd(48.18, 196.61, 0.34, 0.902)
pt3dadd(48.096, 196.622, 0.414, 0.858)
pt3dadd(48.018, 196.658, 0.453, 0.834)
pt3dadd(47.954, 196.752, 0.413, 0.848)
pt3dadd(47.873, 196.837, 0.392, 0.86)
pt3dadd(47.778, 196.918, 0.385, 0.874)
pt3dadd(47.696, 197.008, 0.381, 0.896)
pt3dadd(47.625, 197.107, 0.379, 0.93)
pt3dadd(47.591, 197.219, 0.36, 0.938)
pt3dadd(47.557, 197.333, 0.34, 0.948)
pt3dadd(47.523, 197.444, 0.32, 0.956)
pt3dadd(47.489, 197.557, 0.3, 0.966)
pt3dadd(47.455, 197.67, 0.28, 0.976)
pt3dadd(47.426, 197.785, 0.271, 0.988)
pt3dadd(47.402, 197.902, 0.27, 1.006)
pt3dadd(47.378, 198.018, 0.268, 1.024)
pt3dadd(47.304, 198.108, 0.267, 1.03)
pt3dadd(47.206, 198.184, 0.265, 1.03)
pt3dadd(47.115, 198.268, 0.264, 1.016)
pt3dadd(47.03, 198.356, 0.262, 0.994)
pt3dadd(46.93, 198.421, 0.261, 0.976)
pt3dadd(46.806, 198.446, 0.259, 0.964)
pt3dadd(46.681, 198.472, 0.258, 0.954)
pt3dadd(46.555, 198.48, 0.256, 0.954)
pt3dadd(46.431, 198.502, 0.252, 0.954)
pt3dadd(46.315, 198.548, 0.244, 0.954)
pt3dadd(46.198, 198.595, 0.236, 0.954)
}
}
proc shape3d_91() {
apic[10] { pt3dadd(46.082, 198.641, 0.228, 0.954)
pt3dadd(45.965, 198.688, 0.219, 0.954)
pt3dadd(45.857, 198.748, 0.208, 0.95)
pt3dadd(45.759, 198.822, 0.191, 0.938)
pt3dadd(45.661, 198.895, 0.175, 0.928)
pt3dadd(45.562, 198.97, 0.159, 0.916)
pt3dadd(45.464, 199.043, 0.143, 0.904)
pt3dadd(45.346, 199.086, 0.14, 0.848)
pt3dadd(45.225, 199.118, 0.145, 0.814)
pt3dadd(45.109, 199.146, 0.174, 0.778)
pt3dadd(45.008, 199.189, 0.22, 0.818)
pt3dadd(44.893, 199.236, 0.234, 0.918)
pt3dadd(44.779, 199.286, 0.233, 0.97)
pt3dadd(44.682, 199.357, 0.213, 0.944)
pt3dadd(44.638, 199.414, 0.136, 0.848)
pt3dadd(44.625, 199.43, 0.037, 0.784)
pt3dadd(44.615, 199.444, -0.063, 0.778)
pt3dadd(44.541, 199.525, -0.11, 0.796)
pt3dadd(44.467, 199.606, -0.157, 0.814)
pt3dadd(44.393, 199.687, -0.204, 0.834)
pt3dadd(44.319, 199.769, -0.251, 0.852)
pt3dadd(44.293, 199.867, -0.302, 0.894)
pt3dadd(44.275, 199.967, -0.355, 0.94)
pt3dadd(44.253, 200.074, -0.396, 0.984)
pt3dadd(44.228, 200.183, -0.432, 1.028)
pt3dadd(44.174, 200.279, -0.461, 1.06)
pt3dadd(44.082, 200.359, -0.479, 1.074)
pt3dadd(43.98, 200.428, -0.481, 1.074)
pt3dadd(43.87, 200.483, -0.465, 1.06)
pt3dadd(43.835, 200.552, -0.422, 1.022)
pt3dadd(43.859, 200.635, -0.357, 0.96)
pt3dadd(43.888, 200.682, -0.274, 0.804)
pt3dadd(43.934, 200.743, -0.208, 0.594)
pt3dadd(44.037, 200.784, -0.199, 0.4)
}
apic[11] {pt3dclear()
pt3dadd(104.629, 107.995, 5.521, 2.034)
pt3dadd(104.563, 107.99, 5.458, 2.076)
pt3dadd(104.471, 107.988, 5.387, 2.134)
pt3dadd(104.38, 107.986, 5.316, 2.19)
pt3dadd(104.288, 107.984, 5.245, 2.248)
pt3dadd(104.196, 107.982, 5.174, 2.304)
pt3dadd(104.105, 107.98, 5.103, 2.362)
pt3dadd(104.013, 107.978, 5.032, 2.418)
pt3dadd(103.921, 107.976, 4.961, 2.476)
pt3dadd(103.83, 107.974, 4.89, 2.532)
pt3dadd(103.738, 107.972, 4.818, 2.59)
pt3dadd(103.646, 107.97, 4.747, 2.646)
pt3dadd(103.555, 107.968, 4.676, 2.704)
pt3dadd(103.463, 107.966, 4.605, 2.762)
pt3dadd(103.371, 107.964, 4.534, 2.818)
pt3dadd(103.28, 107.962, 4.463, 2.876)
pt3dadd(103.188, 107.96, 4.392, 2.932)
pt3dadd(103.097, 107.958, 4.32, 2.99)
pt3dadd(102.996, 107.964, 4.266, 3.024)
pt3dadd(102.882, 107.984, 4.239, 3.026)
pt3dadd(102.768, 108.003, 4.211, 3.028)
pt3dadd(102.654, 108.023, 4.183, 3.028)
pt3dadd(102.54, 108.043, 4.155, 3.03)
pt3dadd(102.426, 108.062, 4.127, 3.032)
pt3dadd(102.312, 108.082, 4.099, 3.032)
pt3dadd(102.198, 108.101, 4.071, 3.034)
pt3dadd(102.084, 108.121, 4.043, 3.036)
pt3dadd(101.97, 108.14, 4.015, 3.036)
pt3dadd(101.858, 108.173, 3.998, 3.022)
pt3dadd(101.746, 108.208, 3.984, 3.004)
pt3dadd(101.634, 108.244, 3.97, 2.986)
pt3dadd(101.522, 108.279, 3.956, 2.968)
pt3dadd(101.409, 108.315, 3.943, 2.95)
pt3dadd(101.298, 108.35, 3.929, 2.932)
pt3dadd(101.185, 108.386, 3.915, 2.914)
pt3dadd(101.073, 108.421, 3.901, 2.896)
pt3dadd(100.961, 108.457, 3.887, 2.878)
pt3dadd(100.849, 108.493, 3.873, 2.86)
pt3dadd(100.741, 108.537, 3.857, 2.842)
pt3dadd(100.633, 108.582, 3.841, 2.822)
pt3dadd(100.525, 108.628, 3.825, 2.804)
pt3dadd(100.417, 108.674, 3.809, 2.784)
pt3dadd(100.309, 108.72, 3.792, 2.766)
pt3dadd(100.201, 108.765, 3.776, 2.746)
pt3dadd(100.094, 108.811, 3.76, 2.726)
pt3dadd(99.986, 108.857, 3.744, 2.708)
pt3dadd(99.878, 108.903, 3.728, 2.688)
pt3dadd(99.77, 108.948, 3.711, 2.67)
pt3dadd(99.658, 108.983, 3.692, 2.65)
pt3dadd(99.546, 109.017, 3.673, 2.632)
pt3dadd(99.434, 109.05, 3.653, 2.614)
pt3dadd(99.322, 109.084, 3.634, 2.596)
pt3dadd(99.21, 109.117, 3.615, 2.576)
pt3dadd(99.098, 109.151, 3.595, 2.558)
pt3dadd(98.986, 109.184, 3.576, 2.54)
pt3dadd(98.874, 109.218, 3.556, 2.522)
pt3dadd(98.761, 109.251, 3.537, 2.502)
pt3dadd(98.649, 109.284, 3.517, 2.484)
pt3dadd(98.541, 109.308, 3.476, 2.452)
pt3dadd(98.434, 109.331, 3.431, 2.416)
pt3dadd(98.327, 109.353, 3.386, 2.38)
pt3dadd(98.22, 109.376, 3.341, 2.346)
pt3dadd(98.112, 109.398, 3.296, 2.31)
pt3dadd(98.005, 109.421, 3.252, 2.276)
pt3dadd(97.898, 109.443, 3.207, 2.24)
pt3dadd(97.791, 109.466, 3.162, 2.204)
pt3dadd(97.683, 109.488, 3.117, 2.17)
pt3dadd(97.576, 109.511, 3.072, 2.134)
pt3dadd(97.469, 109.545, 3.036, 2.132)
pt3dadd(97.361, 109.581, 3.002, 2.136)
pt3dadd(97.254, 109.618, 2.967, 2.14)
pt3dadd(97.146, 109.654, 2.933, 2.142)
pt3dadd(97.039, 109.69, 2.898, 2.146)
pt3dadd(96.931, 109.726, 2.864, 2.148)
pt3dadd(96.824, 109.763, 2.829, 2.152)
pt3dadd(96.716, 109.799, 2.794, 2.154)
pt3dadd(96.609, 109.835, 2.76, 2.158)
pt3dadd(96.501, 109.871, 2.725, 2.162)
pt3dadd(96.391, 109.907, 2.699, 2.162)
pt3dadd(96.281, 109.943, 2.673, 2.164)
pt3dadd(96.171, 109.979, 2.647, 2.164)
pt3dadd(96.061, 110.015, 2.621, 2.166)
pt3dadd(95.951, 110.05, 2.595, 2.166)
pt3dadd(95.841, 110.086, 2.569, 2.168)
pt3dadd(95.731, 110.122, 2.543, 2.168)
pt3dadd(95.62, 110.158, 2.517, 2.17)
pt3dadd(95.51, 110.193, 2.491, 2.172)
pt3dadd(95.4, 110.229, 2.465, 2.172)
pt3dadd(95.285, 110.253, 2.449, 2.158)
pt3dadd(95.17, 110.275, 2.433, 2.146)
pt3dadd(95.054, 110.298, 2.417, 2.132)
pt3dadd(94.939, 110.32, 2.4, 2.118)
pt3dadd(94.823, 110.343, 2.384, 2.104)
pt3dadd(94.708, 110.366, 2.368, 2.09)
pt3dadd(94.593, 110.388, 2.352, 2.076)
pt3dadd(94.477, 110.411, 2.336, 2.062)
pt3dadd(94.362, 110.433, 2.32, 2.048)
pt3dadd(94.246, 110.456, 2.304, 2.034)
pt3dadd(94.129, 110.465, 2.296, 2.034)
pt3dadd(94.011, 110.475, 2.287, 2.034)
pt3dadd(93.893, 110.484, 2.279, 2.034)
pt3dadd(93.775, 110.493, 2.271, 2.034)
pt3dadd(93.657, 110.502, 2.263, 2.034)
pt3dadd(93.539, 110.512, 2.255, 2.034)
pt3dadd(93.421, 110.521, 2.247, 2.034)
pt3dadd(93.303, 110.53, 2.239, 2.034)
pt3dadd(93.185, 110.54, 2.231, 2.034)
pt3dadd(93.065, 110.554, 2.239, 2.034)
pt3dadd(91.572, 110.291, 2.268, 0.732)
}
apic[12] {pt3dclear()
pt3dadd(91.572, 110.291, 2.268, 0.732)
pt3dadd(91.446, 110.295, 2.26, 0.846)
}
apic[13] {pt3dclear()
pt3dadd(91.572, 110.291, 2.268, 0.732)
pt3dadd(91.321, 110.298, 2.252, 0.564)
}
apic[14] {pt3dclear()
pt3dadd(91.321, 110.298, 2.252, 0.564)
pt3dadd(91.307, 110.182, 2.278, 0.564)
pt3dadd(91.293, 110.065, 2.304, 0.564)
pt3dadd(91.278, 109.948, 2.329, 0.564)
pt3dadd(91.261, 109.832, 2.354, 0.564)
pt3dadd(91.2, 109.725, 2.371, 0.564)
pt3dadd(91.14, 109.618, 2.389, 0.564)
pt3dadd(91.074, 109.522, 2.426, 0.564)
pt3dadd(90.998, 109.434, 2.459, 0.564)
pt3dadd(90.893, 109.37, 2.483, 0.564)
pt3dadd(90.795, 109.32, 2.524, 0.564)
pt3dadd(90.711, 109.298, 2.599, 0.564)
pt3dadd(90.631, 109.244, 2.645, 0.564)
pt3dadd(90.555, 109.144, 2.648, 0.564)
pt3dadd(90.48, 109.044, 2.651, 0.564)
pt3dadd(90.404, 108.945, 2.655, 0.564)
pt3dadd(90.317, 108.854, 2.655, 0.564)
pt3dadd(90.228, 108.765, 2.655, 0.564)
pt3dadd(90.131, 108.685, 2.657, 0.564)
pt3dadd(90.055, 108.59, 2.68, 0.564)
pt3dadd(89.978, 108.495, 2.703, 0.564)
pt3dadd(89.901, 108.4, 2.726, 0.564)
pt3dadd(89.824, 108.305, 2.748, 0.564)
pt3dadd(89.748, 108.21, 2.741, 0.564)
pt3dadd(89.67, 108.115, 2.719, 0.564)
pt3dadd(89.593, 108.02, 2.696, 0.564)
pt3dadd(89.516, 107.925, 2.674, 0.564)
pt3dadd(89.446, 107.827, 2.651, 0.564)
pt3dadd(89.393, 107.718, 2.63, 0.564)
pt3dadd(89.34, 107.609, 2.609, 0.564)
pt3dadd(89.287, 107.499, 2.588, 0.564)
pt3dadd(89.234, 107.39, 2.567, 0.564)
pt3dadd(89.161, 107.292, 2.558, 0.564)
pt3dadd(89.073, 107.202, 2.558, 0.564)
pt3dadd(88.986, 107.112, 2.558, 0.564)
pt3dadd(88.898, 107.022, 2.558, 0.564)
pt3dadd(88.81, 106.932, 2.558, 0.564)
pt3dadd(88.713, 106.862, 2.583, 0.564)
pt3dadd(88.611, 106.804, 2.623, 0.564)
pt3dadd(88.51, 106.746, 2.662, 0.564)
pt3dadd(88.408, 106.688, 2.702, 0.564)
pt3dadd(88.297, 106.653, 2.733, 0.564)
pt3dadd(88.171, 106.652, 2.75, 0.564)
pt3dadd(88.046, 106.65, 2.767, 0.564)
pt3dadd(87.929, 106.628, 2.802, 0.564)
pt3dadd(87.814, 106.601, 2.841, 0.564)
pt3dadd(87.774, 106.499, 2.852, 0.564)
pt3dadd(87.751, 106.379, 2.857, 0.564)
pt3dadd(87.72, 106.261, 2.86, 0.564)
pt3dadd(87.659, 106.153, 2.861, 0.564)
pt3dadd(87.598, 106.045, 2.861, 0.564)
pt3dadd(87.516, 105.95, 2.861, 0.564)
pt3dadd(87.464, 105.841, 2.861, 0.564)
}
}
proc shape3d_92() {
apic[14] { pt3dadd(87.437, 105.722, 2.861, 0.564)
pt3dadd(87.409, 105.602, 2.861, 0.564)
pt3dadd(87.35, 105.493, 2.862, 0.564)
pt3dadd(87.289, 105.385, 2.862, 0.564)
pt3dadd(87.196, 105.303, 2.866, 0.564)
pt3dadd(87.092, 105.231, 2.871, 0.564)
pt3dadd(86.984, 105.183, 2.9, 0.564)
pt3dadd(86.872, 105.148, 2.94, 0.564)
pt3dadd(86.795, 105.06, 2.957, 0.564)
pt3dadd(86.724, 104.959, 2.963, 0.564)
pt3dadd(86.635, 104.87, 2.963, 0.564)
pt3dadd(86.547, 104.78, 2.963, 0.564)
pt3dadd(86.459, 104.69, 2.963, 0.564)
pt3dadd(86.371, 104.6, 2.963, 0.564)
pt3dadd(86.275, 104.52, 2.964, 0.564)
pt3dadd(86.165, 104.456, 2.964, 0.564)
pt3dadd(86.056, 104.392, 2.964, 0.564)
pt3dadd(85.947, 104.328, 2.964, 0.564)
pt3dadd(85.837, 104.264, 2.964, 0.564)
pt3dadd(85.723, 104.21, 2.964, 0.564)
pt3dadd(85.599, 104.182, 2.965, 0.564)
pt3dadd(85.475, 104.153, 2.965, 0.564)
pt3dadd(85.351, 104.124, 2.965, 0.564)
pt3dadd(85.227, 104.096, 2.965, 0.564)
pt3dadd(85.103, 104.067, 2.965, 0.564)
pt3dadd(84.98, 104.035, 2.966, 0.564)
pt3dadd(84.858, 103.998, 2.966, 0.564)
pt3dadd(84.736, 103.961, 2.966, 0.564)
pt3dadd(84.615, 103.924, 2.966, 0.564)
pt3dadd(84.493, 103.887, 2.966, 0.564)
pt3dadd(84.371, 103.85, 2.966, 0.564)
pt3dadd(84.247, 103.82, 2.967, 0.564)
pt3dadd(84.123, 103.792, 2.967, 0.564)
pt3dadd(83.999, 103.763, 2.967, 0.564)
pt3dadd(83.875, 103.735, 2.967, 0.564)
pt3dadd(83.751, 103.706, 2.967, 0.564)
pt3dadd(83.627, 103.676, 2.967, 0.564)
pt3dadd(83.514, 103.618, 2.968, 0.564)
pt3dadd(83.401, 103.56, 2.968, 0.564)
pt3dadd(83.289, 103.502, 2.968, 0.564)
pt3dadd(83.176, 103.444, 2.968, 0.564)
pt3dadd(83.063, 103.386, 2.968, 0.564)
pt3dadd(82.972, 103.31, 3.002, 0.564)
pt3dadd(82.885, 103.232, 3.039, 0.564)
pt3dadd(82.797, 103.154, 3.077, 0.564)
pt3dadd(82.709, 103.076, 3.115, 0.564)
pt3dadd(82.676, 102.98, 3.164, 0.564)
pt3dadd(82.663, 102.877, 3.217, 0.564)
pt3dadd(82.584, 102.81, 3.246, 0.564)
pt3dadd(82.467, 102.764, 3.263, 0.564)
pt3dadd(82.344, 102.735, 3.27, 0.564)
pt3dadd(82.218, 102.719, 3.27, 0.564)
pt3dadd(82.092, 102.703, 3.27, 0.564)
pt3dadd(81.969, 102.671, 3.27, 0.564)
pt3dadd(81.846, 102.637, 3.27, 0.564)
pt3dadd(81.724, 102.603, 3.271, 0.564)
pt3dadd(81.601, 102.569, 3.271, 0.564)
pt3dadd(81.478, 102.535, 3.271, 0.564)
pt3dadd(81.356, 102.501, 3.271, 0.564)
pt3dadd(81.261, 102.435, 3.271, 0.564)
pt3dadd(81.207, 102.324, 3.271, 0.564)
pt3dadd(81.147, 102.217, 3.272, 0.564)
pt3dadd(81.042, 102.145, 3.272, 0.564)
pt3dadd(80.937, 102.075, 3.272, 0.564)
pt3dadd(80.827, 102.018, 3.272, 0.564)
pt3dadd(80.7, 102.008, 3.272, 0.564)
pt3dadd(80.573, 101.997, 3.272, 0.564)
pt3dadd(80.448, 101.976, 3.273, 0.564)
pt3dadd(80.326, 101.942, 3.273, 0.564)
pt3dadd(80.203, 101.908, 3.273, 0.564)
pt3dadd(80.081, 101.877, 3.28, 0.564)
pt3dadd(79.961, 101.857, 3.312, 0.564)
pt3dadd(79.843, 101.835, 3.343, 0.564)
pt3dadd(79.735, 101.783, 3.379, 0.564)
pt3dadd(79.642, 101.722, 3.419, 0.564)
pt3dadd(79.599, 101.627, 3.474, 0.564)
pt3dadd(79.542, 101.561, 3.537, 0.564)
pt3dadd(79.461, 101.544, 3.615, 0.564)
pt3dadd(79.381, 101.526, 3.693, 0.564)
pt3dadd(79.297, 101.511, 3.769, 0.564)
pt3dadd(79.186, 101.51, 3.82, 0.564)
pt3dadd(79.076, 101.509, 3.87, 0.564)
pt3dadd(78.954, 101.477, 3.875, 0.564)
pt3dadd(78.831, 101.443, 3.875, 0.564)
pt3dadd(78.709, 101.409, 3.875, 0.564)
pt3dadd(78.585, 101.38, 3.876, 0.564)
pt3dadd(78.461, 101.352, 3.876, 0.564)
pt3dadd(78.343, 101.313, 3.876, 0.564)
pt3dadd(78.243, 101.25, 3.885, 0.564)
pt3dadd(78.121, 101.226, 3.904, 0.564)
pt3dadd(77.998, 101.202, 3.924, 0.564)
pt3dadd(77.875, 101.178, 3.943, 0.564)
pt3dadd(77.752, 101.154, 3.963, 0.564)
pt3dadd(77.628, 101.135, 3.976, 0.564)
pt3dadd(77.501, 101.134, 3.972, 0.564)
pt3dadd(77.374, 101.133, 3.969, 0.564)
pt3dadd(77.25, 101.132, 3.952, 0.564)
pt3dadd(77.132, 101.131, 3.914, 0.564)
pt3dadd(77.016, 101.126, 3.874, 0.564)
pt3dadd(76.914, 101.077, 3.828, 0.564)
pt3dadd(76.81, 101.038, 3.822, 0.564)
pt3dadd(76.706, 101.015, 3.878, 0.564)
pt3dadd(76.609, 101.005, 3.943, 0.564)
pt3dadd(76.511, 101.004, 4.006, 0.564)
pt3dadd(76.389, 101, 4.035, 0.564)
pt3dadd(76.267, 100.996, 4.064, 0.564)
pt3dadd(76.145, 100.992, 4.094, 0.564)
pt3dadd(76.023, 100.989, 4.123, 0.564)
pt3dadd(75.9, 100.98, 4.148, 0.564)
pt3dadd(75.777, 100.952, 4.155, 0.564)
pt3dadd(75.653, 100.924, 4.163, 0.564)
pt3dadd(75.529, 100.896, 4.171, 0.564)
pt3dadd(75.405, 100.868, 4.178, 0.564)
pt3dadd(75.282, 100.835, 4.18, 0.564)
pt3dadd(75.159, 100.801, 4.181, 0.564)
pt3dadd(75.037, 100.767, 4.181, 0.564)
pt3dadd(74.914, 100.733, 4.181, 0.564)
pt3dadd(74.792, 100.698, 4.181, 0.564)
pt3dadd(74.669, 100.663, 4.181, 0.564)
pt3dadd(74.553, 100.611, 4.181, 0.564)
pt3dadd(74.437, 100.56, 4.182, 0.564)
pt3dadd(74.321, 100.508, 4.182, 0.564)
pt3dadd(74.205, 100.456, 4.182, 0.564)
pt3dadd(74.089, 100.405, 4.182, 0.564)
pt3dadd(73.964, 100.391, 4.182, 0.564)
pt3dadd(73.837, 100.386, 4.182, 0.564)
pt3dadd(73.71, 100.381, 4.183, 0.564)
pt3dadd(73.582, 100.376, 4.183, 0.564)
pt3dadd(73.455, 100.371, 4.183, 0.564)
pt3dadd(73.328, 100.366, 4.183, 0.564)
pt3dadd(73.201, 100.36, 4.184, 0.564)
pt3dadd(73.08, 100.338, 4.21, 0.564)
pt3dadd(72.959, 100.316, 4.237, 0.564)
pt3dadd(72.838, 100.293, 4.264, 0.564)
pt3dadd(72.717, 100.271, 4.29, 0.564)
pt3dadd(72.595, 100.249, 4.317, 0.564)
pt3dadd(72.472, 100.223, 4.33, 0.564)
pt3dadd(72.348, 100.197, 4.342, 0.564)
pt3dadd(72.224, 100.171, 4.355, 0.564)
pt3dadd(72.101, 100.145, 4.367, 0.564)
pt3dadd(71.977, 100.119, 4.38, 0.564)
pt3dadd(71.856, 100.083, 4.385, 0.564)
pt3dadd(71.736, 100.04, 4.385, 0.564)
pt3dadd(71.616, 99.998, 4.385, 0.564)
pt3dadd(71.496, 99.955, 4.386, 0.564)
pt3dadd(71.376, 99.912, 4.386, 0.564)
pt3dadd(71.259, 99.865, 4.386, 0.564)
pt3dadd(71.153, 99.795, 4.386, 0.564)
pt3dadd(71.048, 99.725, 4.386, 0.564)
pt3dadd(70.942, 99.655, 4.386, 0.564)
pt3dadd(70.837, 99.585, 4.387, 0.564)
pt3dadd(70.732, 99.514, 4.387, 0.564)
pt3dadd(70.631, 99.438, 4.387, 0.564)
pt3dadd(70.53, 99.362, 4.387, 0.564)
pt3dadd(70.429, 99.285, 4.387, 0.564)
pt3dadd(70.328, 99.21, 4.387, 0.564)
pt3dadd(70.228, 99.132, 4.388, 0.564)
pt3dadd(70.135, 99.048, 4.388, 0.564)
pt3dadd(70.041, 98.963, 4.388, 0.564)
pt3dadd(69.948, 98.879, 4.388, 0.564)
pt3dadd(69.854, 98.794, 4.388, 0.564)
pt3dadd(69.758, 98.712, 4.388, 0.564)
pt3dadd(69.653, 98.642, 4.389, 0.564)
pt3dadd(69.547, 98.572, 4.389, 0.564)
pt3dadd(69.442, 98.502, 4.389, 0.564)
pt3dadd(69.336, 98.432, 4.389, 0.564)
pt3dadd(69.236, 98.357, 4.389, 0.564)
pt3dadd(69.156, 98.26, 4.389, 0.564)
pt3dadd(69.077, 98.163, 4.39, 0.564)
pt3dadd(68.998, 98.066, 4.39, 0.564)
pt3dadd(68.918, 97.969, 4.39, 0.564)
pt3dadd(68.834, 97.877, 4.39, 0.564)
pt3dadd(68.724, 97.813, 4.39, 0.564)
pt3dadd(68.615, 97.749, 4.39, 0.564)
pt3dadd(68.506, 97.685, 4.391, 0.564)
pt3dadd(68.396, 97.621, 4.391, 0.564)
pt3dadd(68.289, 97.556, 4.395, 0.564)
pt3dadd(68.203, 97.483, 4.442, 0.564)
pt3dadd(68.117, 97.41, 4.488, 0.564)
pt3dadd(68.031, 97.337, 4.534, 0.564)
pt3dadd(67.946, 97.265, 4.581, 0.564)
pt3dadd(67.84, 97.196, 4.59, 0.564)
pt3dadd(67.734, 97.127, 4.6, 0.564)
pt3dadd(67.628, 97.058, 4.609, 0.564)
pt3dadd(67.522, 96.99, 4.619, 0.564)
pt3dadd(67.416, 96.926, 4.635, 0.564)
pt3dadd(67.309, 96.874, 4.672, 0.564)
pt3dadd(67.193, 96.841, 4.693, 0.564)
pt3dadd(67.066, 96.836, 4.693, 0.564)
pt3dadd(66.939, 96.83, 4.693, 0.564)
pt3dadd(66.813, 96.824, 4.7, 0.564)
pt3dadd(66.686, 96.818, 4.713, 0.564)
pt3dadd(66.56, 96.812, 4.726, 0.564)
pt3dadd(66.519, 96.718, 4.776, 0.564)
pt3dadd(66.482, 96.62, 4.828, 0.564)
pt3dadd(66.369, 96.567, 4.848, 0.564)
pt3dadd(66.257, 96.513, 4.869, 0.564)
pt3dadd(66.145, 96.46, 4.889, 0.564)
pt3dadd(66.036, 96.408, 4.921, 0.564)
pt3dadd(65.929, 96.356, 4.957, 0.564)
}
}
proc shape3d_93() {
apic[14] { pt3dadd(65.809, 96.332, 4.984, 0.564)
pt3dadd(65.684, 96.311, 4.986, 0.564)
pt3dadd(65.558, 96.29, 4.988, 0.564)
pt3dadd(65.433, 96.269, 4.99, 0.564)
pt3dadd(65.307, 96.248, 4.992, 0.564)
pt3dadd(65.182, 96.226, 4.994, 0.564)
pt3dadd(65.056, 96.207, 4.996, 0.564)
pt3dadd(64.929, 96.198, 4.996, 0.564)
pt3dadd(64.802, 96.189, 4.996, 0.564)
pt3dadd(64.675, 96.18, 4.997, 0.564)
pt3dadd(64.548, 96.171, 4.997, 0.564)
pt3dadd(64.421, 96.162, 4.997, 0.564)
pt3dadd(64.294, 96.153, 4.997, 0.564)
pt3dadd(64.17, 96.128, 4.998, 0.564)
pt3dadd(64.047, 96.093, 5.001, 0.564)
pt3dadd(63.925, 96.058, 5.003, 0.564)
pt3dadd(63.802, 96.023, 5.005, 0.564)
pt3dadd(63.68, 95.988, 5.007, 0.564)
pt3dadd(63.558, 95.955, 5.012, 0.564)
pt3dadd(63.449, 95.948, 5.065, 0.564)
pt3dadd(63.34, 95.94, 5.118, 0.564)
pt3dadd(63.256, 95.866, 5.163, 0.564)
pt3dadd(63.165, 95.796, 5.199, 0.564)
pt3dadd(63.045, 95.756, 5.199, 0.564)
pt3dadd(62.924, 95.715, 5.199, 0.564)
pt3dadd(62.798, 95.708, 5.199, 0.564)
pt3dadd(62.671, 95.706, 5.199, 0.564)
pt3dadd(62.543, 95.705, 5.2, 0.564)
pt3dadd(62.42, 95.676, 5.2, 0.564)
pt3dadd(62.297, 95.642, 5.2, 0.564)
pt3dadd(62.175, 95.608, 5.2, 0.564)
pt3dadd(62.052, 95.574, 5.2, 0.564)
pt3dadd(61.973, 95.483, 5.2, 0.564)
pt3dadd(61.905, 95.379, 5.201, 0.564)
pt3dadd(61.812, 95.301, 5.211, 0.564)
pt3dadd(61.698, 95.255, 5.237, 0.564)
pt3dadd(61.583, 95.211, 5.264, 0.564)
pt3dadd(61.469, 95.166, 5.291, 0.564)
pt3dadd(61.354, 95.121, 5.318, 0.564)
pt3dadd(61.242, 95.092, 5.353, 0.564)
pt3dadd(61.132, 95.091, 5.406, 0.564)
pt3dadd(61.023, 95.09, 5.459, 0.564)
pt3dadd(60.913, 95.089, 5.511, 0.564)
pt3dadd(60.804, 95.088, 5.564, 0.564)
pt3dadd(60.696, 95.086, 5.618, 0.564)
pt3dadd(60.593, 95.085, 5.679, 0.564)
pt3dadd(60.49, 95.084, 5.739, 0.564)
pt3dadd(60.386, 95.083, 5.799, 0.564)
pt3dadd(60.283, 95.082, 5.859, 0.564)
pt3dadd(60.176, 95.079, 5.914, 0.564)
pt3dadd(60.059, 95.072, 5.955, 0.564)
pt3dadd(59.943, 95.062, 5.994, 0.564)
pt3dadd(59.828, 95.014, 6.017, 0.564)
pt3dadd(59.716, 94.967, 6.043, 0.564)
pt3dadd(59.63, 94.938, 6.115, 0.564)
pt3dadd(59.545, 94.895, 6.175, 0.564)
pt3dadd(59.462, 94.803, 6.192, 0.564)
pt3dadd(59.387, 94.705, 6.205, 0.564)
pt3dadd(59.335, 94.593, 6.205, 0.564)
pt3dadd(59.282, 94.481, 6.205, 0.564)
pt3dadd(59.229, 94.369, 6.205, 0.564)
pt3dadd(59.191, 94.253, 6.205, 0.564)
pt3dadd(59.169, 94.133, 6.206, 0.564)
pt3dadd(59.147, 94.012, 6.206, 0.564)
pt3dadd(59.136, 93.895, 6.185, 0.564)
pt3dadd(59.129, 93.788, 6.148, 0.564)
pt3dadd(59.122, 93.749, 6.055, 0.564)
pt3dadd(59.107, 93.741, 5.956, 0.564)
pt3dadd(59.061, 93.74, 5.863, 0.564)
pt3dadd(58.956, 93.717, 5.815, 0.564)
pt3dadd(58.842, 93.667, 5.815, 0.564)
pt3dadd(58.732, 93.625, 5.85, 0.564)
pt3dadd(58.616, 93.615, 5.889, 0.564)
pt3dadd(58.493, 93.614, 5.916, 0.564)
pt3dadd(58.378, 93.59, 5.953, 0.564)
pt3dadd(58.285, 93.521, 5.985, 0.564)
pt3dadd(58.195, 93.436, 6.003, 0.564)
pt3dadd(58.091, 93.395, 5.973, 0.564)
pt3dadd(57.983, 93.374, 5.922, 0.564)
pt3dadd(57.912, 93.336, 5.847, 0.564)
pt3dadd(57.857, 93.293, 5.763, 0.564)
pt3dadd(57.807, 93.248, 5.678, 0.564)
pt3dadd(57.773, 93.2, 5.589, 0.564)
pt3dadd(57.718, 93.16, 5.517, 0.564)
pt3dadd(57.592, 93.146, 5.504, 0.564)
pt3dadd(57.466, 93.133, 5.49, 0.564)
pt3dadd(57.341, 93.12, 5.477, 0.564)
pt3dadd(57.218, 93.118, 5.45, 0.564)
pt3dadd(57.096, 93.117, 5.423, 0.564)
pt3dadd(56.976, 93.118, 5.432, 0.564)
pt3dadd(56.86, 93.122, 5.474, 0.564)
pt3dadd(56.744, 93.125, 5.516, 0.564)
pt3dadd(56.676, 93.168, 5.579, 0.564)
pt3dadd(56.64, 93.238, 5.656, 0.564)
pt3dadd(56.544, 93.281, 5.695, 0.564)
pt3dadd(56.426, 93.314, 5.719, 0.564)
pt3dadd(56.307, 93.347, 5.744, 0.564)
pt3dadd(56.182, 93.347, 5.761, 0.564)
pt3dadd(56.056, 93.346, 5.777, 0.564)
pt3dadd(55.945, 93.32, 5.735, 0.564)
pt3dadd(55.836, 93.264, 5.712, 0.564)
pt3dadd(55.711, 93.255, 5.712, 0.564)
pt3dadd(55.592, 93.296, 5.712, 0.564)
pt3dadd(55.47, 93.328, 5.712, 0.564)
pt3dadd(55.344, 93.339, 5.715, 0.564)
pt3dadd(55.221, 93.338, 5.737, 0.564)
pt3dadd(55.135, 93.337, 5.806, 0.564)
pt3dadd(55.105, 93.336, 5.903, 0.564)
pt3dadd(55.096, 93.335, 6.003, 0.564)
pt3dadd(55.076, 93.334, 6.103, 0.564)
pt3dadd(54.998, 93.333, 6.174, 0.564)
pt3dadd(54.873, 93.331, 6.191, 0.564)
pt3dadd(54.747, 93.33, 6.208, 0.564)
pt3dadd(54.62, 93.329, 6.214, 0.564)
pt3dadd(54.493, 93.328, 6.214, 0.564)
pt3dadd(54.366, 93.327, 6.214, 0.564)
pt3dadd(54.239, 93.326, 6.215, 0.564)
pt3dadd(54.111, 93.325, 6.215, 0.564)
pt3dadd(53.984, 93.324, 6.215, 0.564)
pt3dadd(53.857, 93.322, 6.215, 0.564)
pt3dadd(53.73, 93.321, 6.215, 0.564)
pt3dadd(53.602, 93.32, 6.215, 0.564)
pt3dadd(53.475, 93.319, 6.216, 0.564)
pt3dadd(53.348, 93.318, 6.216, 0.564)
pt3dadd(53.22, 93.317, 6.216, 0.564)
pt3dadd(53.093, 93.316, 6.216, 0.564)
pt3dadd(52.966, 93.315, 6.216, 0.564)
pt3dadd(52.839, 93.314, 6.216, 0.564)
pt3dadd(52.711, 93.312, 6.217, 0.564)
pt3dadd(52.584, 93.311, 6.217, 0.564)
pt3dadd(52.457, 93.3, 6.217, 0.564)
pt3dadd(52.331, 93.285, 6.217, 0.564)
pt3dadd(52.205, 93.269, 6.217, 0.564)
pt3dadd(52.128, 93.171, 6.217, 0.564)
pt3dadd(52.053, 93.071, 6.218, 0.564)
pt3dadd(52.028, 92.953, 6.218, 0.564)
pt3dadd(52.013, 92.833, 6.218, 0.564)
pt3dadd(51.984, 92.716, 6.2, 0.564)
pt3dadd(51.954, 92.599, 6.181, 0.564)
pt3dadd(51.924, 92.483, 6.162, 0.564)
pt3dadd(51.893, 92.366, 6.143, 0.564)
pt3dadd(51.863, 92.249, 6.124, 0.564)
pt3dadd(51.849, 92.129, 6.119, 0.564)
pt3dadd(51.842, 92.008, 6.119, 0.564)
pt3dadd(51.835, 91.887, 6.119, 0.564)
pt3dadd(51.827, 91.767, 6.128, 0.564)
pt3dadd(51.802, 91.655, 6.159, 0.564)
pt3dadd(51.726, 91.577, 6.206, 0.564)
pt3dadd(51.615, 91.521, 6.22, 0.564)
pt3dadd(51.491, 91.495, 6.22, 0.564)
pt3dadd(51.364, 91.479, 6.22, 0.564)
pt3dadd(51.24, 91.452, 6.221, 0.564)
pt3dadd(51.137, 91.382, 6.221, 0.564)
pt3dadd(51.043, 91.299, 6.228, 0.564)
pt3dadd(50.96, 91.208, 6.246, 0.564)
pt3dadd(50.87, 91.128, 6.273, 0.564)
pt3dadd(50.773, 91.06, 6.311, 0.564)
pt3dadd(50.656, 91.029, 6.325, 0.564)
pt3dadd(50.529, 91.012, 6.329, 0.564)
pt3dadd(50.405, 90.998, 6.34, 0.564)
pt3dadd(50.295, 90.997, 6.391, 0.564)
pt3dadd(50.184, 90.996, 6.441, 0.564)
pt3dadd(50.07, 90.952, 6.47, 0.564)
pt3dadd(49.957, 90.906, 6.498, 0.564)
pt3dadd(49.843, 90.86, 6.525, 0.564)
pt3dadd(49.772, 90.805, 6.588, 0.564)
pt3dadd(49.721, 90.745, 6.667, 0.564)
pt3dadd(49.648, 90.697, 6.741, 0.564)
pt3dadd(49.566, 90.651, 6.81, 0.564)
pt3dadd(49.484, 90.605, 6.879, 0.564)
pt3dadd(49.402, 90.559, 6.947, 0.564)
pt3dadd(49.347, 90.499, 7.023, 0.564)
pt3dadd(49.303, 90.432, 7.101, 0.564)
pt3dadd(49.193, 90.393, 7.117, 0.564)
pt3dadd(49.071, 90.357, 7.122, 0.564)
pt3dadd(48.962, 90.3, 7.136, 0.564)
pt3dadd(48.866, 90.222, 7.157, 0.564)
pt3dadd(48.769, 90.145, 7.179, 0.564)
pt3dadd(48.685, 90.08, 7.222, 0.564)
pt3dadd(48.619, 90.035, 7.302, 0.564)
pt3dadd(48.584, 90, 7.392, 0.564)
pt3dadd(48.573, 89.975, 7.49, 0.564)
pt3dadd(48.561, 89.949, 7.588, 0.564)
pt3dadd(48.551, 89.916, 7.683, 0.564)
pt3dadd(48.544, 89.861, 7.773, 0.564)
pt3dadd(48.536, 89.808, 7.863, 0.564)
pt3dadd(48.497, 89.794, 7.959, 0.564)
pt3dadd(48.459, 89.779, 8.055, 0.564)
pt3dadd(48.419, 89.764, 8.15, 0.564)
pt3dadd(48.317, 89.719, 8.199, 0.564)
pt3dadd(48.213, 89.674, 8.245, 0.564)
pt3dadd(48.1, 89.652, 8.287, 0.564)
pt3dadd(47.987, 89.644, 8.334, 0.564)
pt3dadd(47.884, 89.608, 8.377, 0.564)
pt3dadd(47.794, 89.532, 8.414, 0.564)
pt3dadd(47.753, 89.436, 8.458, 0.564)
pt3dadd(47.74, 89.329, 8.505, 0.564)
pt3dadd(47.729, 89.228, 8.56, 0.564)
pt3dadd(47.722, 89.133, 8.622, 0.564)
pt3dadd(47.713, 89.039, 8.685, 0.564)
}
}
proc shape3d_94() {
apic[14] { pt3dadd(47.702, 88.946, 8.75, 0.564)
pt3dadd(47.691, 88.853, 8.814, 0.564)
pt3dadd(47.68, 88.76, 8.878, 0.564)
pt3dadd(47.587, 88.71, 8.929, 0.564)
pt3dadd(47.486, 88.664, 8.979, 0.564)
pt3dadd(47.405, 88.611, 9.045, 0.564)
pt3dadd(47.324, 88.559, 9.112, 0.564)
pt3dadd(47.258, 88.466, 9.13, 0.564)
pt3dadd(47.197, 88.358, 9.13, 0.564)
pt3dadd(47.155, 88.244, 9.13, 0.564)
pt3dadd(47.093, 88.142, 9.13, 0.564)
pt3dadd(47.004, 88.053, 9.131, 0.564)
pt3dadd(46.926, 87.961, 9.148, 0.564)
pt3dadd(46.86, 87.864, 9.185, 0.564)
pt3dadd(46.767, 87.825, 9.232, 0.564)
pt3dadd(46.658, 87.818, 9.285, 0.564)
pt3dadd(46.548, 87.814, 9.337, 0.564)
pt3dadd(46.437, 87.813, 9.388, 0.564)
pt3dadd(46.323, 87.812, 9.432, 0.564)
pt3dadd(46.201, 87.811, 9.463, 0.564)
pt3dadd(46.08, 87.81, 9.494, 0.564)
pt3dadd(45.958, 87.808, 9.525, 0.564)
pt3dadd(45.865, 87.805, 9.58, 0.564)
pt3dadd(45.816, 87.798, 9.674, 0.564)
pt3dadd(45.771, 87.782, 9.765, 0.564)
pt3dadd(45.749, 87.704, 9.842, 0.564)
pt3dadd(45.726, 87.627, 9.918, 0.564)
pt3dadd(45.684, 87.55, 9.988, 0.564)
pt3dadd(45.624, 87.473, 10.051, 0.564)
pt3dadd(45.515, 87.45, 10.082, 0.564)
pt3dadd(45.39, 87.444, 10.103, 0.564)
pt3dadd(45.265, 87.439, 10.123, 0.564)
pt3dadd(45.143, 87.419, 10.141, 0.564)
pt3dadd(45.023, 87.38, 10.157, 0.564)
pt3dadd(44.911, 87.339, 10.186, 0.564)
pt3dadd(44.793, 87.314, 10.207, 0.564)
pt3dadd(44.668, 87.297, 10.215, 0.564)
pt3dadd(44.542, 87.28, 10.222, 0.564)
pt3dadd(44.416, 87.263, 10.23, 0.564)
pt3dadd(44.29, 87.246, 10.238, 0.564)
pt3dadd(44.164, 87.229, 10.246, 0.564)
pt3dadd(44.043, 87.195, 10.263, 0.564)
pt3dadd(43.923, 87.159, 10.281, 0.564)
pt3dadd(43.803, 87.123, 10.299, 0.564)
pt3dadd(43.683, 87.087, 10.317, 0.564)
pt3dadd(43.563, 87.051, 10.335, 0.564)
pt3dadd(43.443, 87.009, 10.337, 0.564)
pt3dadd(43.323, 86.966, 10.337, 0.564)
pt3dadd(43.204, 86.924, 10.337, 0.564)
pt3dadd(43.084, 86.881, 10.337, 0.564)
pt3dadd(42.964, 86.838, 10.337, 0.564)
pt3dadd(42.845, 86.793, 10.337, 0.564)
pt3dadd(42.728, 86.744, 10.338, 0.564)
pt3dadd(42.61, 86.695, 10.338, 0.564)
pt3dadd(42.493, 86.647, 10.338, 0.564)
pt3dadd(42.376, 86.598, 10.338, 0.564)
pt3dadd(42.269, 86.541, 10.343, 0.564)
pt3dadd(42.228, 86.432, 10.377, 0.564)
pt3dadd(42.173, 86.339, 10.405, 0.564)
pt3dadd(42.046, 86.332, 10.405, 0.564)
pt3dadd(41.919, 86.325, 10.406, 0.564)
pt3dadd(41.833, 86.304, 10.335, 0.564)
pt3dadd(41.749, 86.282, 10.26, 0.564)
pt3dadd(41.666, 86.228, 10.197, 0.564)
pt3dadd(41.581, 86.164, 10.15, 0.564)
pt3dadd(41.493, 86.074, 10.147, 0.564)
pt3dadd(41.405, 85.984, 10.144, 0.564)
pt3dadd(41.317, 85.895, 10.141, 0.564)
pt3dadd(41.219, 85.816, 10.14, 0.564)
pt3dadd(41.118, 85.74, 10.14, 0.564)
pt3dadd(41.007, 85.678, 10.141, 0.564)
pt3dadd(40.929, 85.582, 10.141, 0.564)
pt3dadd(40.854, 85.482, 10.141, 0.564)
pt3dadd(40.815, 85.367, 10.141, 0.564)
pt3dadd(40.787, 85.248, 10.141, 0.564)
pt3dadd(40.749, 85.133, 10.141, 0.564)
pt3dadd(40.66, 85.044, 10.142, 0.564)
pt3dadd(40.57, 84.958, 10.142, 0.564)
pt3dadd(40.45, 84.915, 10.147, 0.564)
pt3dadd(40.33, 84.872, 10.152, 0.564)
pt3dadd(40.252, 84.808, 10.205, 0.564)
pt3dadd(40.185, 84.738, 10.27, 0.564)
pt3dadd(40.118, 84.668, 10.335, 0.564)
pt3dadd(40.032, 84.581, 10.343, 0.564)
pt3dadd(39.943, 84.492, 10.343, 0.564)
pt3dadd(39.831, 84.444, 10.325, 0.564)
pt3dadd(39.712, 84.409, 10.3, 0.564)
pt3dadd(39.594, 84.375, 10.277, 0.564)
pt3dadd(39.468, 84.373, 10.294, 0.564)
pt3dadd(39.342, 84.372, 10.31, 0.564)
pt3dadd(39.22, 84.365, 10.309, 0.564)
pt3dadd(39.106, 84.342, 10.267, 0.564)
pt3dadd(38.997, 84.31, 10.223, 0.564)
pt3dadd(38.895, 84.265, 10.174, 0.564)
pt3dadd(38.784, 84.217, 10.163, 0.564)
pt3dadd(38.667, 84.168, 10.174, 0.564)
pt3dadd(38.588, 84.096, 10.216, 0.564)
pt3dadd(38.528, 84.012, 10.273, 0.564)
pt3dadd(38.431, 83.937, 10.298, 0.564)
pt3dadd(38.331, 83.865, 10.319, 0.564)
pt3dadd(38.231, 83.792, 10.34, 0.564)
pt3dadd(38.112, 83.757, 10.346, 0.564)
pt3dadd(37.987, 83.736, 10.346, 0.564)
pt3dadd(37.863, 83.709, 10.346, 0.564)
pt3dadd(37.75, 83.653, 10.354, 0.564)
pt3dadd(37.638, 83.597, 10.373, 0.564)
pt3dadd(37.631, 83.596, 10.374, 0.564)
pt3dadd(37.52, 83.54, 10.393, 0.564)
pt3dadd(37.408, 83.484, 10.413, 0.564)
pt3dadd(37.297, 83.428, 10.432, 0.564)
pt3dadd(37.185, 83.37, 10.443, 0.564)
pt3dadd(37.073, 83.311, 10.453, 0.564)
pt3dadd(36.961, 83.252, 10.462, 0.564)
pt3dadd(36.849, 83.193, 10.472, 0.564)
pt3dadd(36.738, 83.134, 10.481, 0.564)
pt3dadd(36.63, 83.082, 10.516, 0.564)
pt3dadd(36.521, 83.033, 10.548, 0.564)
pt3dadd(36.397, 83.006, 10.549, 0.564)
pt3dadd(36.272, 82.978, 10.549, 0.564)
pt3dadd(36.193, 82.9, 10.549, 0.564)
pt3dadd(36.146, 82.786, 10.549, 0.564)
pt3dadd(36.09, 82.677, 10.549, 0.564)
pt3dadd(36.001, 82.588, 10.549, 0.564)
pt3dadd(35.912, 82.5, 10.55, 0.564)
pt3dadd(35.82, 82.414, 10.55, 0.564)
pt3dadd(35.727, 82.329, 10.55, 0.564)
pt3dadd(35.633, 82.244, 10.55, 0.564)
pt3dadd(35.54, 82.159, 10.55, 0.564)
pt3dadd(35.447, 82.074, 10.55, 0.564)
pt3dadd(35.353, 81.99, 10.551, 0.564)
pt3dadd(35.268, 81.906, 10.578, 0.564)
pt3dadd(35.186, 81.823, 10.616, 0.564)
pt3dadd(35.071, 81.774, 10.633, 0.564)
pt3dadd(34.954, 81.728, 10.649, 0.564)
pt3dadd(34.829, 81.709, 10.651, 0.564)
pt3dadd(34.702, 81.693, 10.652, 0.564)
pt3dadd(34.576, 81.68, 10.652, 0.564)
pt3dadd(34.449, 81.679, 10.652, 0.564)
pt3dadd(34.321, 81.678, 10.652, 0.564)
pt3dadd(34.194, 81.676, 10.652, 0.564)
pt3dadd(34.067, 81.675, 10.652, 0.564)
pt3dadd(33.939, 81.674, 10.653, 0.564)
pt3dadd(33.812, 81.673, 10.653, 0.564)
pt3dadd(33.685, 81.672, 10.653, 0.564)
pt3dadd(33.558, 81.671, 10.654, 0.564)
pt3dadd(33.431, 81.67, 10.658, 0.564)
pt3dadd(33.303, 81.669, 10.662, 0.564)
pt3dadd(33.188, 81.668, 10.687, 0.564)
pt3dadd(33.099, 81.666, 10.76, 0.564)
pt3dadd(33.008, 81.662, 10.832, 0.564)
pt3dadd(32.911, 81.64, 10.896, 0.564)
pt3dadd(32.813, 81.606, 10.952, 0.564)
pt3dadd(32.713, 81.539, 10.985, 0.564)
pt3dadd(32.614, 81.472, 11.018, 0.564)
pt3dadd(32.509, 81.423, 11.045, 0.564)
pt3dadd(32.382, 81.437, 11.049, 0.564)
pt3dadd(32.256, 81.452, 11.054, 0.564)
pt3dadd(32.138, 81.491, 11.055, 0.564)
pt3dadd(32.018, 81.524, 11.073, 0.564)
pt3dadd(31.898, 81.555, 11.094, 0.564)
pt3dadd(31.778, 81.587, 11.114, 0.564)
pt3dadd(31.657, 81.618, 11.135, 0.564)
pt3dadd(31.537, 81.649, 11.155, 0.564)
pt3dadd(31.411, 81.656, 11.169, 0.564)
pt3dadd(31.285, 81.661, 11.182, 0.564)
pt3dadd(31.159, 81.667, 11.195, 0.564)
pt3dadd(31.033, 81.672, 11.208, 0.564)
pt3dadd(30.907, 81.678, 11.222, 0.564)
pt3dadd(30.781, 81.684, 11.235, 0.564)
pt3dadd(30.66, 81.706, 11.259, 0.564)
pt3dadd(30.539, 81.729, 11.284, 0.564)
pt3dadd(30.417, 81.752, 11.308, 0.564)
pt3dadd(30.296, 81.774, 11.332, 0.564)
pt3dadd(30.175, 81.797, 11.357, 0.564)
pt3dadd(30.051, 81.811, 11.376, 0.564)
pt3dadd(29.927, 81.825, 11.394, 0.564)
pt3dadd(29.802, 81.838, 11.413, 0.564)
pt3dadd(29.678, 81.852, 11.431, 0.564)
pt3dadd(29.554, 81.865, 11.45, 0.564)
pt3dadd(29.428, 81.872, 11.459, 0.564)
pt3dadd(29.301, 81.871, 11.459, 0.564)
pt3dadd(29.173, 81.87, 11.459, 0.564)
pt3dadd(29.046, 81.868, 11.46, 0.564)
pt3dadd(28.919, 81.867, 11.46, 0.564)
pt3dadd(28.791, 81.866, 11.46, 0.564)
pt3dadd(28.664, 81.865, 11.46, 0.564)
pt3dadd(28.538, 81.873, 11.46, 0.564)
pt3dadd(28.412, 81.892, 11.46, 0.564)
pt3dadd(28.286, 81.911, 11.461, 0.564)
pt3dadd(28.161, 81.929, 11.461, 0.564)
pt3dadd(28.035, 81.948, 11.461, 0.564)
pt3dadd(27.909, 81.967, 11.461, 0.564)
pt3dadd(27.784, 81.985, 11.461, 0.564)
pt3dadd(27.658, 82.004, 11.461, 0.564)
pt3dadd(27.533, 82.023, 11.462, 0.564)
pt3dadd(27.407, 82.041, 11.462, 0.564)
pt3dadd(27.281, 82.06, 11.462, 0.564)
pt3dadd(27.156, 82.078, 11.462, 0.564)
pt3dadd(27.03, 82.084, 11.462, 0.564)
pt3dadd(26.904, 82.063, 11.462, 0.564)
}
}
proc shape3d_95() {
apic[14] { pt3dadd(26.779, 82.042, 11.462, 0.564)
pt3dadd(26.653, 82.022, 11.463, 0.564)
pt3dadd(26.527, 82.001, 11.463, 0.564)
pt3dadd(26.402, 81.98, 11.463, 0.564)
pt3dadd(26.276, 81.959, 11.463, 0.564)
pt3dadd(26.151, 81.938, 11.463, 0.564)
pt3dadd(26.025, 81.917, 11.464, 0.564)
pt3dadd(25.899, 81.897, 11.464, 0.564)
pt3dadd(25.774, 81.876, 11.464, 0.564)
pt3dadd(25.648, 81.855, 11.464, 0.564)
pt3dadd(25.522, 81.837, 11.464, 0.564)
pt3dadd(25.395, 81.836, 11.464, 0.564)
pt3dadd(25.268, 81.835, 11.465, 0.564)
pt3dadd(25.14, 81.834, 11.465, 0.564)
pt3dadd(25.013, 81.833, 11.465, 0.564)
pt3dadd(24.886, 81.831, 11.465, 0.564)
pt3dadd(24.759, 81.83, 11.465, 0.564)
pt3dadd(24.631, 81.832, 11.465, 0.564)
pt3dadd(24.505, 81.848, 11.466, 0.564)
pt3dadd(24.379, 81.864, 11.466, 0.564)
pt3dadd(24.253, 81.88, 11.466, 0.564)
pt3dadd(24.127, 81.897, 11.466, 0.564)
pt3dadd(24.001, 81.913, 11.466, 0.564)
pt3dadd(23.875, 81.929, 11.466, 0.564)
pt3dadd(23.756, 81.963, 11.487, 0.564)
pt3dadd(23.637, 81.997, 11.507, 0.564)
pt3dadd(23.517, 82.032, 11.528, 0.564)
pt3dadd(23.398, 82.066, 11.549, 0.564)
pt3dadd(23.278, 82.098, 11.567, 0.564)
pt3dadd(23.151, 82.109, 11.567, 0.564)
pt3dadd(23.025, 82.121, 11.568, 0.564)
pt3dadd(22.898, 82.132, 11.568, 0.564)
pt3dadd(22.772, 82.144, 11.568, 0.564)
pt3dadd(22.645, 82.155, 11.568, 0.564)
pt3dadd(22.518, 82.167, 11.568, 0.564)
pt3dadd(22.392, 82.169, 11.568, 0.564)
pt3dadd(22.264, 82.168, 11.569, 0.564)
pt3dadd(22.137, 82.167, 11.569, 0.564)
pt3dadd(22.01, 82.166, 11.569, 0.564)
pt3dadd(21.882, 82.165, 11.569, 0.564)
pt3dadd(21.755, 82.164, 11.569, 0.564)
pt3dadd(21.628, 82.162, 11.569, 0.564)
pt3dadd(21.511, 82.199, 11.556, 0.564)
pt3dadd(21.398, 82.249, 11.537, 0.564)
pt3dadd(21.285, 82.3, 11.518, 0.564)
pt3dadd(21.171, 82.35, 11.499, 0.564)
pt3dadd(21.057, 82.398, 11.482, 0.564)
pt3dadd(20.932, 82.419, 11.486, 0.564)
pt3dadd(20.807, 82.439, 11.49, 0.564)
pt3dadd(20.681, 82.459, 11.494, 0.564)
pt3dadd(20.556, 82.479, 11.498, 0.564)
pt3dadd(20.431, 82.499, 11.502, 0.564)
pt3dadd(20.307, 82.52, 11.513, 0.564)
pt3dadd(20.184, 82.542, 11.532, 0.564)
pt3dadd(20.061, 82.564, 11.552, 0.564)
pt3dadd(19.938, 82.586, 11.571, 0.564)
pt3dadd(19.816, 82.608, 11.59, 0.564)
pt3dadd(19.693, 82.625, 11.611, 0.564)
pt3dadd(19.569, 82.623, 11.634, 0.564)
pt3dadd(19.444, 82.622, 11.657, 0.564)
pt3dadd(19.437, 82.621, 11.657, 0.564)
pt3dadd(19.313, 82.62, 11.68, 0.564)
pt3dadd(19.189, 82.619, 11.703, 0.564)
pt3dadd(19.065, 82.618, 11.726, 0.564)
pt3dadd(18.94, 82.624, 11.742, 0.564)
pt3dadd(18.815, 82.641, 11.748, 0.564)
pt3dadd(18.689, 82.658, 11.754, 0.564)
pt3dadd(18.563, 82.675, 11.76, 0.564)
pt3dadd(18.438, 82.693, 11.766, 0.564)
pt3dadd(18.312, 82.71, 11.772, 0.564)
pt3dadd(18.187, 82.726, 11.764, 0.564)
pt3dadd(18.063, 82.743, 11.746, 0.564)
pt3dadd(17.939, 82.759, 11.727, 0.564)
pt3dadd(17.816, 82.775, 11.709, 0.564)
pt3dadd(17.692, 82.792, 11.69, 0.564)
pt3dadd(17.568, 82.81, 11.675, 0.564)
pt3dadd(17.444, 82.836, 11.675, 0.564)
pt3dadd(17.32, 82.862, 11.675, 0.564)
pt3dadd(17.195, 82.889, 11.676, 0.564)
pt3dadd(17.071, 82.915, 11.676, 0.564)
pt3dadd(16.947, 82.941, 11.676, 0.564)
pt3dadd(16.822, 82.958, 11.676, 0.564)
pt3dadd(16.695, 82.957, 11.676, 0.564)
pt3dadd(16.567, 82.955, 11.677, 0.564)
pt3dadd(16.44, 82.954, 11.677, 0.564)
pt3dadd(16.313, 82.953, 11.677, 0.564)
pt3dadd(16.186, 82.952, 11.677, 0.564)
pt3dadd(16.058, 82.951, 11.677, 0.564)
pt3dadd(15.932, 82.957, 11.677, 0.564)
pt3dadd(15.806, 82.975, 11.678, 0.564)
pt3dadd(15.68, 82.994, 11.678, 0.564)
pt3dadd(15.555, 83.013, 11.678, 0.564)
pt3dadd(15.429, 83.031, 11.678, 0.564)
pt3dadd(15.303, 83.05, 11.678, 0.564)
pt3dadd(15.18, 83.077, 11.678, 0.564)
pt3dadd(15.064, 83.127, 11.679, 0.564)
pt3dadd(15.057, 83.125, 11.679, 0.564)
pt3dadd(14.941, 83.175, 11.679, 0.564)
pt3dadd(14.825, 83.224, 11.679, 0.564)
pt3dadd(14.709, 83.274, 11.679, 0.564)
pt3dadd(14.593, 83.323, 11.679, 0.564)
pt3dadd(14.469, 83.353, 11.682, 0.564)
pt3dadd(14.346, 83.382, 11.684, 0.564)
pt3dadd(14.223, 83.412, 11.686, 0.564)
pt3dadd(14.1, 83.442, 11.688, 0.564)
pt3dadd(13.977, 83.472, 11.69, 0.564)
pt3dadd(13.856, 83.496, 11.706, 0.564)
pt3dadd(13.849, 83.495, 11.706, 0.564)
pt3dadd(13.732, 83.51, 11.745, 0.564)
pt3dadd(13.615, 83.525, 11.784, 0.564)
pt3dadd(13.499, 83.541, 11.823, 0.564)
pt3dadd(13.382, 83.556, 11.862, 0.564)
pt3dadd(13.269, 83.581, 11.903, 0.564)
pt3dadd(13.159, 83.616, 11.945, 0.564)
pt3dadd(13.05, 83.651, 11.988, 0.564)
pt3dadd(12.94, 83.686, 12.031, 0.564)
pt3dadd(12.829, 83.721, 12.071, 0.564)
pt3dadd(12.706, 83.748, 12.073, 0.564)
pt3dadd(12.582, 83.774, 12.075, 0.564)
pt3dadd(12.458, 83.801, 12.078, 0.564)
pt3dadd(12.334, 83.828, 12.08, 0.564)
pt3dadd(12.21, 83.855, 12.082, 0.564)
pt3dadd(12.086, 83.88, 12.088, 0.564)
pt3dadd(11.962, 83.901, 12.103, 0.564)
pt3dadd(11.838, 83.922, 12.118, 0.564)
pt3dadd(11.714, 83.943, 12.132, 0.564)
pt3dadd(11.59, 83.965, 12.147, 0.564)
pt3dadd(11.466, 83.986, 12.161, 0.564)
pt3dadd(11.376, 84.029, 12.223, 0.564)
pt3dadd(11.281, 84.068, 12.281, 0.564)
pt3dadd(11.164, 84.086, 12.318, 0.564)
pt3dadd(11.047, 84.107, 12.353, 0.564)
pt3dadd(10.928, 84.143, 12.369, 0.564)
pt3dadd(10.808, 84.18, 12.385, 0.564)
pt3dadd(10.688, 84.197, 12.354, 0.564)
pt3dadd(10.568, 84.215, 12.323, 0.564)
pt3dadd(10.444, 84.235, 12.321, 0.564)
pt3dadd(10.319, 84.256, 12.325, 0.564)
pt3dadd(10.194, 84.277, 12.328, 0.564)
pt3dadd(10.079, 84.298, 12.348, 0.564)
pt3dadd(9.995, 84.318, 12.424, 0.564)
pt3dadd(9.898, 84.331, 12.479, 0.564)
pt3dadd(9.772, 84.33, 12.493, 0.564)
pt3dadd(9.646, 84.328, 12.51, 0.564)
pt3dadd(9.52, 84.327, 12.527, 0.564)
pt3dadd(9.395, 84.326, 12.543, 0.564)
pt3dadd(9.269, 84.325, 12.56, 0.564)
pt3dadd(9.144, 84.324, 12.576, 0.564)
pt3dadd(9.018, 84.32, 12.595, 0.564)
pt3dadd(8.895, 84.31, 12.618, 0.564)
pt3dadd(8.771, 84.3, 12.64, 0.564)
pt3dadd(8.647, 84.29, 12.663, 0.564)
pt3dadd(8.523, 84.28, 12.686, 0.564)
pt3dadd(8.398, 84.26, 12.688, 0.564)
pt3dadd(8.272, 84.239, 12.689, 0.564)
pt3dadd(8.146, 84.222, 12.689, 0.564)
pt3dadd(8.019, 84.206, 12.689, 0.564)
pt3dadd(7.894, 84.193, 12.694, 0.564)
pt3dadd(7.773, 84.192, 12.728, 0.564)
pt3dadd(7.653, 84.19, 12.761, 0.564)
pt3dadd(7.553, 84.189, 12.822, 0.564)
pt3dadd(7.458, 84.188, 12.891, 0.564)
pt3dadd(7.349, 84.187, 12.943, 0.564)
pt3dadd(7.233, 84.186, 12.983, 0.564)
pt3dadd(7.107, 84.185, 13.001, 0.564)
pt3dadd(6.982, 84.184, 13.02, 0.564)
pt3dadd(6.857, 84.183, 13.039, 0.564)
pt3dadd(6.732, 84.182, 13.057, 0.564)
pt3dadd(6.607, 84.18, 13.076, 0.564)
pt3dadd(6.481, 84.179, 13.09, 0.564)
pt3dadd(6.354, 84.176, 13.085, 0.564)
pt3dadd(6.227, 84.173, 13.08, 0.564)
pt3dadd(6.1, 84.169, 13.075, 0.564)
pt3dadd(5.973, 84.166, 13.07, 0.564)
pt3dadd(5.846, 84.163, 13.066, 0.564)
pt3dadd(5.718, 84.16, 13.061, 0.564)
pt3dadd(5.607, 84.121, 13.036, 0.564)
pt3dadd(5.505, 84.061, 12.999, 0.564)
pt3dadd(5.391, 84.009, 12.988, 0.564)
pt3dadd(5.274, 83.96, 12.984, 0.564)
pt3dadd(5.156, 83.94, 12.959, 0.564)
pt3dadd(5.037, 83.939, 12.923, 0.564)
pt3dadd(4.917, 83.958, 12.902, 0.564)
pt3dadd(4.798, 83.998, 12.897, 0.564)
pt3dadd(4.676, 84.031, 12.894, 0.564)
pt3dadd(4.549, 84.037, 12.894, 0.564)
pt3dadd(4.424, 84.043, 12.904, 0.564)
pt3dadd(4.302, 84.049, 12.933, 0.564)
pt3dadd(4.18, 84.055, 12.962, 0.564)
pt3dadd(4.058, 84.062, 12.991, 0.564)
pt3dadd(3.936, 84.068, 13.021, 0.564)
pt3dadd(3.815, 84.074, 13.05, 0.564)
pt3dadd(3.688, 84.073, 13.059, 0.564)
pt3dadd(3.561, 84.072, 13.068, 0.564)
pt3dadd(3.434, 84.071, 13.076, 0.564)
pt3dadd(3.307, 84.07, 13.085, 0.564)
pt3dadd(3.18, 84.069, 13.093, 0.564)
pt3dadd(3.055, 84.055, 13.085, 0.564)
pt3dadd(2.93, 84.038, 13.072, 0.564)
pt3dadd(2.806, 84.026, 13.053, 0.564)
}
}
proc shape3d_96() {
apic[14] { pt3dadd(2.683, 84.025, 13.026, 0.564)
pt3dadd(2.561, 84.024, 12.998, 0.564)
pt3dadd(2.446, 84.072, 12.997, 0.564)
pt3dadd(2.331, 84.125, 12.997, 0.564)
pt3dadd(2.324, 84.124, 12.997, 0.564)
pt3dadd(2.236, 84.208, 12.997, 0.564)
pt3dadd(2.161, 84.306, 12.997, 0.564)
pt3dadd(2.067, 84.375, 12.981, 0.564)
pt3dadd(1.955, 84.42, 12.949, 0.564)
pt3dadd(1.843, 84.464, 12.918, 0.564)
pt3dadd(1.732, 84.493, 12.881, 0.564)
pt3dadd(1.621, 84.492, 12.83, 0.564)
pt3dadd(1.525, 84.491, 12.772, 0.564)
pt3dadd(1.511, 84.49, 12.673, 0.564)
pt3dadd(1.496, 84.489, 12.573, 0.564)
pt3dadd(1.482, 84.488, 12.473, 0.564)
pt3dadd(1.454, 84.494, 12.377, 0.564)
pt3dadd(1.401, 84.512, 12.286, 0.564)
pt3dadd(1.369, 84.545, 12.198, 0.564)
pt3dadd(1.393, 84.618, 12.127, 0.564)
pt3dadd(1.449, 84.712, 12.101, 0.564)
pt3dadd(1.512, 84.805, 12.1, 0.564)
}
apic[15] {pt3dclear()
pt3dadd(91.321, 110.298, 2.252, 0.564)
pt3dadd(91.21, 110.304, 2.244, 1.078)
pt3dadd(91.099, 110.31, 2.236, 1.194)
pt3dadd(90.988, 110.316, 2.228, 1.308)
pt3dadd(90.878, 110.331, 2.219, 1.388)
pt3dadd(90.772, 110.362, 2.211, 1.406)
pt3dadd(90.665, 110.394, 2.203, 1.426)
pt3dadd(90.558, 110.425, 2.194, 1.444)
pt3dadd(90.452, 110.456, 2.186, 1.462)
pt3dadd(90.345, 110.487, 2.178, 1.482)
pt3dadd(90.249, 110.544, 2.17, 1.452)
pt3dadd(90.153, 110.601, 2.161, 1.422)
pt3dadd(90.057, 110.658, 2.153, 1.392)
pt3dadd(89.961, 110.715, 2.145, 1.362)
pt3dadd(89.865, 110.772, 2.137, 1.332)
pt3dadd(89.76, 110.809, 2.122, 1.278)
pt3dadd(89.656, 110.847, 2.107, 1.224)
pt3dadd(89.551, 110.884, 2.092, 1.168)
pt3dadd(89.447, 110.921, 2.077, 1.114)
pt3dadd(89.342, 110.958, 2.062, 1.058)
pt3dadd(89.266, 111.028, 2.019, 0.976)
pt3dadd(89.191, 111.099, 1.984, 0.904)
pt3dadd(89.11, 111.164, 2.014, 0.904)
pt3dadd(89.03, 111.233, 2.038, 0.914)
pt3dadd(88.952, 111.309, 2.053, 0.94)
pt3dadd(88.886, 111.364, 2.097, 0.948)
pt3dadd(88.832, 111.4, 2.168, 0.934)
pt3dadd(88.778, 111.445, 2.236, 0.886)
pt3dadd(88.736, 111.476, 2.312, 0.784)
pt3dadd(88.725, 111.476, 2.402, 0.71)
pt3dadd(88.731, 111.487, 2.492, 0.678)
pt3dadd(88.728, 111.55, 2.564, 0.678)
pt3dadd(88.683, 111.645, 2.587, 0.678)
pt3dadd(88.588, 111.686, 2.555, 0.678)
pt3dadd(88.53, 111.685, 2.47, 0.678)
pt3dadd(88.584, 111.656, 2.375, 0.678)
pt3dadd(88.641, 111.602, 2.289, 0.678)
pt3dadd(88.661, 111.576, 2.184, 0.678)
pt3dadd(88.667, 111.579, 2.076, 0.684)
pt3dadd(88.669, 111.592, 1.969, 0.694)
pt3dadd(88.667, 111.608, 1.867, 0.704)
pt3dadd(88.588, 111.686, 1.875, 0.742)
pt3dadd(88.507, 111.756, 1.873, 0.814)
pt3dadd(88.458, 111.794, 1.788, 0.832)
pt3dadd(88.419, 111.842, 1.698, 0.854)
pt3dadd(88.365, 111.88, 1.613, 0.89)
pt3dadd(88.329, 111.916, 1.517, 1.002)
pt3dadd(88.261, 111.975, 1.514, 0.966)
pt3dadd(88.239, 111.983, 1.602, 0.788)
pt3dadd(88.24, 111.981, 1.693, 0.706)
pt3dadd(88.248, 111.986, 1.784, 0.678)
pt3dadd(88.244, 112.01, 1.872, 0.678)
pt3dadd(88.182, 112.071, 1.881, 0.678)
pt3dadd(88.153, 112.083, 1.781, 0.678)
pt3dadd(88.152, 112.08, 1.674, 0.678)
pt3dadd(88.161, 112.079, 1.565, 0.678)
pt3dadd(88.169, 112.082, 1.457, 0.678)
pt3dadd(88.151, 112.119, 1.365, 0.672)
pt3dadd(88.099, 112.187, 1.293, 0.658)
pt3dadd(88.032, 112.244, 1.226, 0.644)
pt3dadd(87.958, 112.296, 1.16, 0.628)
pt3dadd(87.946, 112.403, 1.117, 0.636)
pt3dadd(87.939, 112.513, 1.076, 0.644)
pt3dadd(87.932, 112.624, 1.035, 0.652)
pt3dadd(87.882, 112.725, 1.023, 0.692)
pt3dadd(87.826, 112.825, 1.015, 0.736)
pt3dadd(87.746, 112.894, 1.024, 0.786)
pt3dadd(87.653, 112.947, 1.042, 0.836)
pt3dadd(87.561, 113.002, 1.06, 0.882)
pt3dadd(87.483, 113.078, 1.076, 0.91)
pt3dadd(87.399, 113.141, 1.094, 0.918)
pt3dadd(87.301, 113.178, 1.119, 0.876)
pt3dadd(87.205, 113.22, 1.143, 0.832)
pt3dadd(87.123, 113.276, 1.097, 0.79)
pt3dadd(87.037, 113.326, 1.054, 0.75)
pt3dadd(86.928, 113.33, 1.061, 0.726)
pt3dadd(86.818, 113.335, 1.068, 0.704)
pt3dadd(86.798, 113.354, 1.154, 0.692)
pt3dadd(86.781, 113.374, 1.242, 0.68)
pt3dadd(86.718, 113.434, 1.284, 0.678)
pt3dadd(86.643, 113.505, 1.313, 0.678)
pt3dadd(86.567, 113.576, 1.342, 0.678)
pt3dadd(86.513, 113.67, 1.359, 0.688)
pt3dadd(86.463, 113.77, 1.373, 0.7)
pt3dadd(86.41, 113.813, 1.435, 0.72)
pt3dadd(86.356, 113.843, 1.508, 0.74)
pt3dadd(86.322, 113.864, 1.587, 0.762)
pt3dadd(86.326, 113.867, 1.678, 0.79)
pt3dadd(86.329, 113.869, 1.77, 0.816)
pt3dadd(86.312, 113.902, 1.851, 0.842)
pt3dadd(86.255, 113.953, 1.864, 0.828)
pt3dadd(86.218, 113.988, 1.768, 0.71)
pt3dadd(86.16, 114.054, 1.72, 0.576)
pt3dadd(86.087, 114.12, 1.755, 0.558)
pt3dadd(86.008, 114.196, 1.77, 0.584)
pt3dadd(85.94, 114.261, 1.805, 0.608)
pt3dadd(85.893, 114.305, 1.876, 0.622)
pt3dadd(85.847, 114.377, 1.924, 0.618)
pt3dadd(85.791, 114.463, 1.938, 0.574)
pt3dadd(85.694, 114.488, 1.893, 0.482)
pt3dadd(85.652, 114.485, 1.797, 0.488)
pt3dadd(85.641, 114.506, 1.692, 0.568)
pt3dadd(85.608, 114.557, 1.603, 0.626)
pt3dadd(85.563, 114.592, 1.511, 0.614)
pt3dadd(85.51, 114.637, 1.44, 0.588)
pt3dadd(85.431, 114.715, 1.448, 0.514)
pt3dadd(85.355, 114.769, 1.394, 0.454)
pt3dadd(85.319, 114.793, 1.307, 0.418)
pt3dadd(85.324, 114.791, 1.199, 0.4)
pt3dadd(85.328, 114.789, 1.091, 0.384)
pt3dadd(85.335, 114.787, 0.982, 0.392)
pt3dadd(85.344, 114.786, 0.874, 0.416)
pt3dadd(85.352, 114.784, 0.766, 0.472)
pt3dadd(85.361, 114.783, 0.657, 0.562)
pt3dadd(85.369, 114.79, 0.55, 0.636)
pt3dadd(85.375, 114.816, 0.444, 0.696)
pt3dadd(85.376, 114.864, 0.345, 0.764)
pt3dadd(85.355, 114.888, 0.243, 0.804)
pt3dadd(85.306, 114.902, 0.149, 0.778)
pt3dadd(85.233, 114.948, 0.084, 0.838)
pt3dadd(85.137, 115, 0.06, 0.984)
pt3dadd(85.053, 115.073, 0.052, 1.09)
pt3dadd(84.986, 115.16, 0.059, 1.13)
pt3dadd(84.904, 115.191, 0.106, 1.13)
pt3dadd(84.837, 115.208, 0.171, 1.094)
pt3dadd(84.811, 115.271, 0.239, 1.056)
pt3dadd(84.775, 115.35, 0.29, 1.066)
pt3dadd(84.69, 115.415, 0.309, 1.026)
pt3dadd(84.6, 115.475, 0.324, 0.984)
pt3dadd(84.536, 115.558, 0.35, 0.932)
pt3dadd(84.475, 115.644, 0.376, 0.878)
pt3dadd(84.395, 115.708, 0.33, 0.864)
pt3dadd(84.314, 115.776, 0.288, 0.86)
pt3dadd(84.236, 115.852, 0.256, 0.888)
pt3dadd(84.158, 115.92, 0.214, 0.912)
pt3dadd(84.078, 115.98, 0.164, 0.93)
pt3dadd(83.99, 116.045, 0.133, 0.93)
pt3dadd(83.903, 116.11, 0.102, 0.93)
pt3dadd(83.816, 116.175, 0.07, 0.93)
pt3dadd(83.729, 116.241, 0.039, 0.93)
pt3dadd(83.65, 116.312, 0.001, 0.924)
pt3dadd(83.571, 116.384, -0.039, 0.918)
pt3dadd(83.493, 116.456, -0.079, 0.912)
pt3dadd(83.415, 116.527, -0.119, 0.906)
pt3dadd(83.338, 116.601, -0.159, 0.908)
pt3dadd(83.263, 116.677, -0.198, 0.914)
pt3dadd(83.187, 116.752, -0.238, 0.92)
pt3dadd(83.112, 116.827, -0.278, 0.926)
pt3dadd(83.035, 116.904, -0.311, 0.936)
pt3dadd(82.956, 116.981, -0.334, 0.952)
pt3dadd(82.876, 117.059, -0.357, 0.97)
pt3dadd(82.797, 117.137, -0.38, 0.986)
pt3dadd(82.717, 117.215, -0.403, 1.002)
pt3dadd(82.661, 117.314, -0.413, 1.03)
pt3dadd(82.608, 117.415, -0.421, 1.058)
pt3dadd(82.555, 117.517, -0.429, 1.086)
pt3dadd(82.502, 117.618, -0.438, 1.116)
pt3dadd(82.45, 117.72, -0.446, 1.144)
pt3dadd(82.378, 117.806, -0.454, 1.18)
pt3dadd(82.295, 117.881, -0.462, 1.22)
pt3dadd(82.212, 117.957, -0.471, 1.26)
pt3dadd(82.129, 118.032, -0.479, 1.302)
pt3dadd(82.046, 118.108, -0.487, 1.342)
pt3dadd(81.957, 118.176, -0.5, 1.38)
pt3dadd(81.866, 118.24, -0.515, 1.418)
pt3dadd(81.775, 118.305, -0.531, 1.454)
pt3dadd(81.684, 118.369, -0.546, 1.492)
pt3dadd(81.592, 118.433, -0.561, 1.528)
pt3dadd(81.5, 118.494, -0.583, 1.556)
pt3dadd(81.408, 118.556, -0.606, 1.584)
pt3dadd(81.316, 118.617, -0.629, 1.612)
pt3dadd(81.224, 118.678, -0.652, 1.64)
pt3dadd(81.136, 118.745, -0.67, 1.67)
pt3dadd(81.054, 118.823, -0.678, 1.704)
pt3dadd(80.968, 118.893, -0.687, 1.74)
pt3dadd(80.865, 118.933, -0.695, 1.774)
pt3dadd(80.761, 118.974, -0.703, 1.808)
pt3dadd(80.691, 119.06, -0.728, 1.808)
}
}
proc shape3d_97() {
apic[15] { pt3dadd(80.622, 119.147, -0.755, 1.806)
pt3dadd(80.57, 119.215, -0.827, 1.748)
pt3dadd(80.519, 119.288, -0.895, 1.694)
pt3dadd(80.469, 119.37, -0.956, 1.642)
pt3dadd(80.42, 119.453, -1.017, 1.592)
pt3dadd(80.354, 119.524, -1.061, 1.55)
pt3dadd(80.254, 119.573, -1.069, 1.526)
pt3dadd(80.156, 119.625, -1.077, 1.516)
pt3dadd(80.074, 119.698, -1.094, 1.564)
pt3dadd(79.98, 119.755, -1.122, 1.58)
pt3dadd(79.887, 119.812, -1.15, 1.598)
pt3dadd(79.794, 119.868, -1.178, 1.614)
pt3dadd(79.7, 119.925, -1.207, 1.632)
pt3dadd(79.64, 120.007, -1.256, 1.632)
pt3dadd(79.582, 120.091, -1.307, 1.632)
pt3dadd(79.524, 120.176, -1.357, 1.632)
pt3dadd(79.467, 120.26, -1.408, 1.632)
pt3dadd(79.401, 120.331, -1.466, 1.622)
pt3dadd(79.333, 120.398, -1.526, 1.61)
pt3dadd(79.266, 120.464, -1.587, 1.598)
pt3dadd(79.198, 120.532, -1.647, 1.586)
pt3dadd(79.127, 120.582, -1.715, 1.552)
pt3dadd(79.055, 120.626, -1.787, 1.51)
pt3dadd(79.064, 120.624, -1.795, 1.51)
pt3dadd(78.966, 120.634, -1.849, 1.484)
pt3dadd(78.868, 120.641, -1.901, 1.458)
pt3dadd(78.83, 120.641, -1.999, 1.436)
pt3dadd(78.797, 120.641, -2.101, 1.414)
pt3dadd(78.76, 120.671, -2.196, 1.388)
pt3dadd(78.72, 120.714, -2.288, 1.36)
pt3dadd(78.691, 120.761, -2.382, 1.292)
pt3dadd(78.667, 120.841, -2.445, 1.238)
pt3dadd(78.646, 120.952, -2.478, 1.204)
pt3dadd(78.614, 121.034, -2.529, 1.168)
pt3dadd(78.557, 121.054, -2.619, 1.128)
pt3dadd(78.489, 121.069, -2.702, 1.094)
pt3dadd(78.406, 121.079, -2.774, 1.068)
pt3dadd(78.328, 121.126, -2.817, 1.042)
pt3dadd(78.257, 121.213, -2.831, 1.018)
pt3dadd(78.18, 121.295, -2.842, 0.996)
pt3dadd(78.095, 121.369, -2.85, 0.98)
pt3dadd(78.022, 121.456, -2.859, 0.98)
pt3dadd(77.949, 121.542, -2.867, 0.98)
pt3dadd(77.877, 121.628, -2.875, 0.98)
pt3dadd(77.804, 121.715, -2.883, 0.98)
pt3dadd(77.74, 121.8, -2.9, 0.98)
}
apic[16] {pt3dclear()
pt3dadd(77.74, 121.8, -2.9, 0.98)
pt3dadd(77.736, 121.805, -2.9, 0.98)
pt3dadd(77.66, 121.897, -2.9, 0.98)
pt3dadd(77.584, 121.99, -2.9, 0.98)
pt3dadd(77.508, 122.083, -2.9, 0.98)
pt3dadd(77.432, 122.176, -2.9, 0.98)
pt3dadd(77.355, 122.268, -2.9, 0.98)
pt3dadd(77.246, 122.318, -2.9, 0.99)
pt3dadd(77.137, 122.368, -2.9, 1.002)
pt3dadd(77.039, 122.436, -2.9, 1.024)
pt3dadd(76.943, 122.508, -2.9, 1.048)
pt3dadd(76.851, 122.585, -2.9, 1.054)
pt3dadd(76.76, 122.663, -2.9, 1.054)
pt3dadd(76.702, 122.762, -2.9, 1.054)
pt3dadd(76.669, 122.878, -2.9, 1.054)
pt3dadd(76.637, 122.994, -2.9, 1.054)
pt3dadd(76.565, 123.09, -2.9, 1.054)
pt3dadd(76.493, 123.185, -2.9, 1.054)
pt3dadd(76.42, 123.281, -2.9, 1.054)
pt3dadd(76.334, 123.356, -2.9, 1.076)
pt3dadd(76.219, 123.391, -2.9, 1.142)
pt3dadd(76.104, 123.426, -2.9, 1.212)
pt3dadd(75.993, 123.461, -2.9, 1.36)
pt3dadd(75.909, 123.546, -2.9, 1.38)
pt3dadd(75.825, 123.631, -2.9, 1.4)
pt3dadd(75.74, 123.716, -2.9, 1.42)
pt3dadd(75.656, 123.802, -2.9, 1.44)
pt3dadd(75.571, 123.887, -2.904, 1.454)
pt3dadd(75.486, 123.97, -2.918, 1.442)
pt3dadd(75.4, 124.051, -2.933, 1.432)
pt3dadd(75.315, 124.134, -2.948, 1.42)
pt3dadd(75.23, 124.217, -2.962, 1.41)
pt3dadd(75.192, 124.322, -2.979, 1.37)
pt3dadd(75.174, 124.44, -2.997, 1.32)
pt3dadd(75.147, 124.55, -3.02, 1.27)
pt3dadd(75.086, 124.64, -3.063, 1.214)
pt3dadd(75.006, 124.712, -3.093, 1.184)
pt3dadd(74.896, 124.76, -3.104, 1.198)
pt3dadd(74.79, 124.805, -3.126, 1.228)
pt3dadd(74.69, 124.847, -3.169, 1.298)
pt3dadd(74.584, 124.891, -3.193, 1.416)
pt3dadd(74.475, 124.938, -3.203, 1.562)
pt3dadd(74.37, 124.99, -3.225, 1.596)
pt3dadd(74.265, 125.042, -3.248, 1.63)
pt3dadd(74.16, 125.094, -3.27, 1.662)
pt3dadd(74.056, 125.146, -3.293, 1.696)
pt3dadd(73.959, 125.214, -3.3, 1.718)
pt3dadd(73.868, 125.292, -3.3, 1.732)
pt3dadd(73.776, 125.369, -3.3, 1.748)
pt3dadd(73.684, 125.446, -3.3, 1.764)
pt3dadd(73.592, 125.524, -3.3, 1.778)
pt3dadd(73.497, 125.597, -3.3, 1.758)
pt3dadd(73.4, 125.669, -3.3, 1.722)
pt3dadd(73.351, 125.768, -3.3, 1.692)
pt3dadd(73.334, 125.886, -3.3, 1.666)
pt3dadd(73.317, 126.005, -3.3, 1.64)
pt3dadd(73.262, 126.109, -3.3, 1.632)
pt3dadd(73.191, 126.205, -3.3, 1.632)
pt3dadd(73.095, 126.257, -3.3, 1.642)
pt3dadd(72.975, 126.264, -3.3, 1.662)
pt3dadd(72.855, 126.272, -3.3, 1.68)
pt3dadd(72.765, 126.34, -3.327, 1.704)
pt3dadd(72.678, 126.415, -3.356, 1.73)
pt3dadd(72.591, 126.49, -3.385, 1.754)
pt3dadd(72.554, 126.599, -3.406, 1.776)
pt3dadd(72.525, 126.713, -3.425, 1.798)
pt3dadd(72.456, 126.797, -3.449, 1.838)
pt3dadd(72.357, 126.856, -3.476, 1.888)
pt3dadd(72.256, 126.913, -3.5, 1.94)
pt3dadd(72.142, 126.948, -3.5, 1.994)
pt3dadd(72.027, 126.983, -3.5, 2.05)
pt3dadd(71.92, 127.033, -3.514, 2.134)
pt3dadd(71.828, 127.105, -3.535, 2.134)
pt3dadd(71.735, 127.178, -3.555, 2.134)
pt3dadd(71.642, 127.25, -3.575, 2.134)
pt3dadd(71.55, 127.322, -3.595, 2.134)
pt3dadd(71.461, 127.403, -3.6, 2.134)
pt3dadd(71.374, 127.486, -3.6, 2.134)
pt3dadd(71.287, 127.567, -3.6, 2.134)
pt3dadd(71.2, 127.65, -3.6, 2.134)
pt3dadd(71.113, 127.733, -3.6, 2.134)
pt3dadd(71.037, 127.812, -3.636, 2.144)
pt3dadd(70.964, 127.889, -3.682, 2.156)
pt3dadd(70.89, 127.967, -3.728, 2.168)
pt3dadd(70.817, 128.044, -3.774, 2.18)
pt3dadd(70.733, 128.118, -3.808, 2.196)
pt3dadd(70.643, 128.19, -3.837, 2.214)
pt3dadd(70.554, 128.262, -3.866, 2.232)
pt3dadd(70.465, 128.334, -3.894, 2.25)
pt3dadd(70.375, 128.408, -3.919, 2.262)
pt3dadd(70.285, 128.484, -3.94, 2.268)
pt3dadd(70.195, 128.56, -3.96, 2.274)
pt3dadd(70.105, 128.635, -3.98, 2.28)
pt3dadd(70.015, 128.711, -4, 2.286)
}
apic[17] {pt3dclear()
pt3dadd(70.015, 128.711, -4, 2.286)
pt3dadd(69.941, 128.778, -4.028, 2.286)
pt3dadd(69.857, 128.855, -4.059, 2.286)
pt3dadd(69.773, 128.932, -4.091, 2.286)
pt3dadd(69.688, 129.008, -4.122, 2.286)
pt3dadd(69.605, 129.091, -4.143, 2.278)
pt3dadd(69.523, 129.176, -4.157, 2.268)
pt3dadd(69.441, 129.262, -4.172, 2.256)
pt3dadd(69.358, 129.347, -4.187, 2.244)
pt3dadd(69.275, 129.432, -4.2, 2.232)
pt3dadd(69.179, 129.504, -4.2, 2.21)
pt3dadd(69.083, 129.575, -4.2, 2.186)
pt3dadd(69.002, 129.664, -4.205, 2.162)
pt3dadd(68.921, 129.752, -4.21, 2.136)
pt3dadd(68.858, 129.841, -4.249, 2.098)
pt3dadd(68.799, 129.932, -4.29, 2.056)
pt3dadd(68.771, 130.05, -4.299, 2.026)
pt3dadd(68.743, 130.166, -4.307, 1.996)
pt3dadd(68.694, 130.242, -4.356, 1.908)
pt3dadd(68.651, 130.314, -4.419, 1.804)
pt3dadd(68.633, 130.418, -4.466, 1.734)
pt3dadd(68.607, 130.524, -4.5, 1.662)
pt3dadd(68.556, 130.632, -4.5, 1.588)
pt3dadd(68.504, 130.74, -4.5, 1.512)
pt3dadd(68.4, 130.796, -4.5, 1.464)
pt3dadd(68.29, 130.844, -4.5, 1.418)
pt3dadd(68.199, 130.921, -4.5, 1.388)
pt3dadd(68.115, 131.006, -4.5, 1.366)
pt3dadd(68.021, 131.08, -4.5, 1.366)
pt3dadd(67.917, 131.138, -4.5, 1.384)
pt3dadd(67.801, 131.166, -4.5, 1.406)
pt3dadd(67.684, 131.194, -4.5, 1.428)
pt3dadd(67.564, 131.201, -4.5, 1.446)
pt3dadd(67.444, 131.202, -4.5, 1.466)
pt3dadd(67.325, 131.206, -4.5, 1.486)
pt3dadd(67.205, 131.213, -4.5, 1.514)
pt3dadd(67.085, 131.221, -4.5, 1.544)
pt3dadd(66.997, 131.275, -4.519, 1.578)
pt3dadd(66.937, 131.37, -4.555, 1.618)
pt3dadd(66.866, 131.443, -4.605, 1.704)
pt3dadd(66.783, 131.503, -4.655, 1.76)
pt3dadd(66.692, 131.561, -4.698, 1.768)
pt3dadd(66.601, 131.621, -4.742, 1.774)
pt3dadd(66.51, 131.68, -4.785, 1.78)
pt3dadd(66.429, 131.747, -4.829, 1.778)
pt3dadd(66.362, 131.831, -4.874, 1.766)
pt3dadd(66.295, 131.914, -4.92, 1.754)
pt3dadd(66.228, 131.998, -4.965, 1.742)
pt3dadd(66.157, 132.082, -5, 1.73)
pt3dadd(66.072, 132.167, -5, 1.714)
pt3dadd(65.988, 132.252, -5, 1.698)
pt3dadd(65.904, 132.337, -5, 1.684)
pt3dadd(65.82, 132.422, -5, 1.668)
pt3dadd(65.735, 132.508, -5, 1.654)
pt3dadd(65.651, 132.593, -5, 1.638)
pt3dadd(65.567, 132.678, -5, 1.624)
pt3dadd(65.482, 132.764, -5, 1.608)
pt3dadd(65.398, 132.85, -5, 1.592)
pt3dadd(65.312, 132.932, -5, 1.566)
pt3dadd(65.221, 133.012, -5, 1.506)
}
}
proc shape3d_98() {
apic[17] { pt3dadd(65.13, 133.091, -5, 1.45)
pt3dadd(65.04, 133.17, -5, 1.416)
pt3dadd(64.95, 133.248, -5, 1.38)
pt3dadd(64.846, 133.309, -5.005, 1.356)
pt3dadd(64.743, 133.369, -5.011, 1.332)
pt3dadd(64.685, 133.415, -5.088, 1.318)
pt3dadd(64.622, 133.464, -5.158, 1.304)
pt3dadd(64.521, 133.526, -5.171, 1.298)
pt3dadd(64.42, 133.59, -5.185, 1.29)
pt3dadd(64.32, 133.652, -5.198, 1.282)
pt3dadd(64.233, 133.735, -5.2, 1.28)
pt3dadd(64.149, 133.82, -5.2, 1.28)
pt3dadd(64.063, 133.898, -5.224, 1.274)
pt3dadd(63.978, 133.973, -5.256, 1.262)
pt3dadd(63.902, 134.035, -5.305, 1.242)
pt3dadd(63.847, 134.072, -5.389, 1.202)
pt3dadd(63.8, 134.099, -5.477, 1.114)
pt3dadd(63.766, 134.142, -5.565, 1.032)
pt3dadd(63.733, 134.194, -5.651, 0.966)
pt3dadd(63.647, 134.257, -5.681, 0.912)
pt3dadd(63.549, 134.323, -5.698, 0.86)
pt3dadd(63.475, 134.417, -5.7, 0.834)
pt3dadd(63.404, 134.513, -5.7, 0.81)
pt3dadd(63.342, 134.615, -5.7, 0.834)
pt3dadd(63.284, 134.72, -5.7, 0.878)
pt3dadd(63.204, 134.8, -5.7, 0.952)
pt3dadd(63.092, 134.843, -5.7, 1.07)
pt3dadd(63.026, 134.94, -5.7, 1.106)
pt3dadd(62.964, 135.043, -5.7, 1.134)
pt3dadd(62.903, 135.148, -5.7, 1.164)
pt3dadd(62.841, 135.25, -5.7, 1.192)
pt3dadd(62.779, 135.353, -5.7, 1.22)
pt3dadd(62.691, 135.428, -5.7, 1.236)
pt3dadd(62.588, 135.491, -5.7, 1.246)
pt3dadd(62.485, 135.552, -5.7, 1.258)
pt3dadd(62.382, 135.613, -5.7, 1.268)
pt3dadd(62.279, 135.676, -5.7, 1.278)
pt3dadd(62.185, 135.749, -5.7, 1.28)
pt3dadd(62.095, 135.828, -5.7, 1.28)
pt3dadd(62.005, 135.908, -5.7, 1.28)
pt3dadd(61.916, 135.986, -5.7, 1.28)
pt3dadd(61.826, 136.067, -5.7, 1.28)
pt3dadd(61.743, 136.154, -5.7, 1.28)
pt3dadd(61.665, 136.244, -5.7, 1.28)
pt3dadd(61.586, 136.334, -5.7, 1.28)
pt3dadd(61.507, 136.426, -5.7, 1.28)
pt3dadd(61.428, 136.516, -5.7, 1.28)
pt3dadd(61.33, 136.583, -5.7, 1.274)
pt3dadd(61.224, 136.638, -5.7, 1.264)
pt3dadd(61.117, 136.693, -5.7, 1.254)
pt3dadd(61.011, 136.748, -5.7, 1.244)
pt3dadd(60.904, 136.804, -5.7, 1.234)
pt3dadd(60.811, 136.877, -5.7, 1.23)
pt3dadd(60.727, 136.962, -5.7, 1.23)
pt3dadd(60.643, 137.047, -5.7, 1.23)
pt3dadd(60.558, 137.132, -5.7, 1.23)
pt3dadd(60.474, 137.219, -5.7, 1.23)
pt3dadd(60.384, 137.296, -5.713, 1.23)
pt3dadd(60.292, 137.368, -5.733, 1.23)
pt3dadd(60.199, 137.441, -5.753, 1.23)
pt3dadd(60.107, 137.513, -5.773, 1.23)
pt3dadd(60.013, 137.585, -5.789, 1.232)
pt3dadd(59.917, 137.657, -5.792, 1.236)
pt3dadd(59.822, 137.73, -5.794, 1.242)
pt3dadd(59.726, 137.802, -5.796, 1.248)
pt3dadd(59.63, 137.874, -5.799, 1.252)
pt3dadd(59.538, 137.95, -5.8, 1.248)
pt3dadd(59.451, 138.032, -5.8, 1.228)
pt3dadd(59.364, 138.116, -5.8, 1.208)
pt3dadd(59.277, 138.199, -5.8, 1.188)
pt3dadd(59.19, 138.281, -5.8, 1.168)
pt3dadd(59.104, 138.358, -5.817, 1.138)
pt3dadd(59.019, 138.422, -5.862, 1.094)
pt3dadd(58.935, 138.488, -5.907, 1.05)
pt3dadd(58.85, 138.554, -5.952, 1.004)
pt3dadd(58.764, 138.623, -5.962, 0.93)
pt3dadd(58.678, 138.694, -5.926, 0.814)
pt3dadd(58.63, 138.714, -6.005, 0.734)
pt3dadd(58.586, 138.731, -6.098, 0.654)
pt3dadd(58.585, 138.731, -6.197, 0.636)
pt3dadd(58.585, 138.731, -6.297, 0.62)
pt3dadd(58.585, 138.731, -6.398, 0.604)
pt3dadd(58.585, 138.731, -6.497, 0.594)
pt3dadd(58.585, 138.731, -6.597, 0.586)
pt3dadd(58.585, 138.731, -6.697, 0.578)
pt3dadd(58.585, 138.736, -6.797, 0.594)
pt3dadd(58.584, 138.74, -6.897, 0.612)
pt3dadd(58.582, 138.748, -6.997, 0.628)
pt3dadd(58.54, 138.792, -7.077, 0.612)
pt3dadd(58.44, 138.846, -7.1, 0.522)
pt3dadd(58.346, 138.919, -7.1, 0.488)
pt3dadd(58.276, 139.016, -7.1, 0.454)
pt3dadd(58.195, 139.068, -7.158, 0.44)
pt3dadd(58.114, 139.121, -7.218, 0.428)
pt3dadd(58.032, 139.171, -7.278, 0.416)
pt3dadd(57.951, 139.222, -7.338, 0.404)
pt3dadd(57.88, 139.291, -7.394, 0.402)
pt3dadd(57.81, 139.362, -7.448, 0.402)
pt3dadd(57.739, 139.434, -7.503, 0.402)
pt3dadd(57.669, 139.506, -7.558, 0.402)
pt3dadd(57.581, 139.58, -7.581, 0.424)
pt3dadd(57.489, 139.656, -7.599, 0.45)
pt3dadd(57.389, 139.72, -7.6, 0.452)
pt3dadd(57.288, 139.786, -7.6, 0.452)
pt3dadd(57.212, 139.853, -7.645, 0.44)
pt3dadd(57.145, 139.925, -7.702, 0.424)
pt3dadd(57.126, 140.034, -7.741, 0.38)
pt3dadd(57.095, 140.14, -7.754, 0.348)
pt3dadd(57.042, 140.238, -7.72, 0.334)
pt3dadd(56.991, 140.341, -7.693, 0.326)
pt3dadd(56.956, 140.441, -7.65, 0.386)
pt3dadd(56.925, 140.48, -7.562, 0.52)
pt3dadd(56.869, 140.495, -7.475, 0.63)
pt3dadd(56.836, 140.549, -7.392, 0.652)
pt3dadd(56.822, 140.626, -7.316, 0.652)
pt3dadd(56.795, 140.692, -7.238, 0.648)
pt3dadd(56.747, 140.737, -7.154, 0.634)
pt3dadd(56.727, 140.818, -7.108, 0.616)
pt3dadd(56.735, 140.938, -7.102, 0.59)
pt3dadd(56.741, 141.056, -7.1, 0.572)
pt3dadd(56.743, 141.178, -7.1, 0.562)
pt3dadd(56.745, 141.296, -7.1, 0.554)
pt3dadd(56.713, 141.406, -7.072, 0.532)
pt3dadd(56.676, 141.512, -7.039, 0.506)
pt3dadd(56.575, 141.536, -7.01, 0.474)
pt3dadd(56.457, 141.52, -7, 0.452)
pt3dadd(56.343, 141.486, -7.005, 0.452)
pt3dadd(56.264, 141.422, -7.046, 0.478)
pt3dadd(56.247, 141.392, -7.141, 0.534)
pt3dadd(56.227, 141.385, -7.239, 0.554)
pt3dadd(56.206, 141.378, -7.338, 0.574)
pt3dadd(56.121, 141.403, -7.395, 0.588)
pt3dadd(56.022, 141.438, -7.444, 0.602)
pt3dadd(55.944, 141.41, -7.516, 0.592)
pt3dadd(55.866, 141.383, -7.589, 0.58)
pt3dadd(55.761, 141.359, -7.628, 0.568)
pt3dadd(55.65, 141.334, -7.661, 0.554)
pt3dadd(55.561, 141.395, -7.689, 0.518)
pt3dadd(55.488, 141.487, -7.7, 0.482)
pt3dadd(55.407, 141.574, -7.7, 0.448)
pt3dadd(55.322, 141.659, -7.7, 0.412)
pt3dadd(55.252, 141.755, -7.7, 0.378)
pt3dadd(55.18, 141.846, -7.677, 0.428)
pt3dadd(55.122, 141.932, -7.63, 0.51)
pt3dadd(55.093, 142.045, -7.606, 0.552)
pt3dadd(55.043, 142.152, -7.6, 0.552)
pt3dadd(54.946, 142.218, -7.602, 0.49)
pt3dadd(54.844, 142.272, -7.629, 0.39)
pt3dadd(54.745, 142.302, -7.676, 0.28)
pt3dadd(54.63, 142.297, -7.705, 0.234)
pt3dadd(54.523, 142.285, -7.746, 0.228)
pt3dadd(54.481, 142.282, -7.839, 0.3)
pt3dadd(54.469, 142.286, -7.938, 0.366)
pt3dadd(54.462, 142.301, -8.037, 0.406)
pt3dadd(54.456, 142.315, -8.136, 0.444)
pt3dadd(54.411, 142.349, -8.223, 0.484)
pt3dadd(54.356, 142.386, -8.306, 0.524)
pt3dadd(54.344, 142.429, -8.398, 0.558)
pt3dadd(54.335, 142.474, -8.491, 0.592)
pt3dadd(54.326, 142.517, -8.584, 0.626)
pt3dadd(54.276, 142.621, -8.594, 0.67)
pt3dadd(54.222, 142.728, -8.599, 0.714)
pt3dadd(54.153, 142.814, -8.629, 0.742)
pt3dadd(54.077, 142.892, -8.672, 0.764)
pt3dadd(53.991, 142.943, -8.715, 0.774)
pt3dadd(53.883, 142.938, -8.76, 0.762)
pt3dadd(53.782, 142.936, -8.766, 0.74)
pt3dadd(53.692, 142.936, -8.7, 0.704)
}
apic[18] {pt3dclear()
pt3dadd(53.692, 142.936, -8.7, 0.704)
pt3dadd(53.591, 142.914, -8.717, 0.798)
pt3dadd(53.476, 142.89, -8.736, 0.906)
pt3dadd(53.361, 142.866, -8.756, 1.014)
pt3dadd(53.246, 142.841, -8.775, 1.122)
pt3dadd(53.131, 142.816, -8.795, 1.232)
pt3dadd(53.016, 142.792, -8.814, 1.34)
pt3dadd(52.9, 142.768, -8.833, 1.448)
pt3dadd(52.785, 142.742, -8.853, 1.556)
pt3dadd(52.67, 142.718, -8.872, 1.666)
pt3dadd(52.555, 142.694, -8.892, 1.774)
pt3dadd(52.44, 142.67, -8.911, 1.882)
pt3dadd(52.325, 142.644, -8.93, 1.99)
pt3dadd(52.21, 142.62, -8.95, 2.098)
pt3dadd(52.094, 142.596, -8.969, 2.208)
pt3dadd(51.979, 142.572, -8.989, 2.316)
pt3dadd(51.864, 142.548, -9.008, 2.424)
pt3dadd(51.749, 142.523, -9.027, 2.532)
pt3dadd(51.634, 142.499, -9.047, 2.642)
pt3dadd(51.519, 142.474, -9.066, 2.75)
pt3dadd(51.404, 142.45, -9.086, 2.858)
pt3dadd(51.288, 142.422, -9.1, 2.896)
pt3dadd(51.173, 142.388, -9.1, 2.738)
pt3dadd(51.059, 142.354, -9.1, 2.578)
pt3dadd(50.943, 142.32, -9.1, 2.418)
pt3dadd(50.829, 142.284, -9.1, 2.26)
pt3dadd(50.714, 142.25, -9.1, 2.1)
pt3dadd(50.602, 142.207, -9.1, 1.958)
pt3dadd(50.501, 142.142, -9.1, 1.862)
pt3dadd(50.4, 142.079, -9.1, 1.766)
pt3dadd(50.299, 142.014, -9.1, 1.67)
pt3dadd(50.198, 141.949, -9.1, 1.574)
}
}
proc shape3d_99() {
apic[18] { pt3dadd(50.098, 141.883, -9.1, 1.48)
pt3dadd(50.037, 141.78, -9.1, 1.428)
pt3dadd(49.975, 141.677, -9.1, 1.378)
pt3dadd(49.914, 141.575, -9.1, 1.328)
pt3dadd(49.852, 141.472, -9.1, 1.278)
pt3dadd(49.792, 141.368, -9.1, 1.23)
pt3dadd(49.758, 141.252, -9.1, 1.208)
pt3dadd(49.724, 141.138, -9.1, 1.186)
pt3dadd(49.656, 141.042, -9.1, 1.18)
pt3dadd(49.576, 140.951, -9.1, 1.18)
pt3dadd(49.506, 140.855, -9.1, 1.166)
pt3dadd(49.442, 140.753, -9.1, 1.142)
pt3dadd(49.351, 140.688, -9.1, 1.112)
pt3dadd(49.234, 140.662, -9.1, 1.074)
pt3dadd(49.118, 140.634, -9.1, 1.036)
pt3dadd(48.999, 140.618, -9.1, 0.99)
pt3dadd(48.879, 140.606, -9.1, 0.938)
pt3dadd(48.773, 140.555, -9.1, 0.914)
pt3dadd(48.67, 140.492, -9.1, 0.894)
pt3dadd(48.567, 140.431, -9.1, 0.876)
pt3dadd(48.464, 140.37, -9.1, 0.856)
pt3dadd(48.361, 140.308, -9.1, 0.838)
pt3dadd(48.256, 140.25, -9.1, 0.824)
pt3dadd(48.148, 140.197, -9.1, 0.814)
pt3dadd(48.041, 140.144, -9.1, 0.806)
pt3dadd(47.933, 140.09, -9.1, 0.796)
pt3dadd(47.826, 140.039, -9.1, 0.786)
pt3dadd(47.721, 139.98, -9.1, 0.778)
pt3dadd(47.654, 139.882, -9.1, 0.772)
pt3dadd(47.586, 139.783, -9.1, 0.768)
pt3dadd(47.518, 139.684, -9.1, 0.762)
pt3dadd(47.45, 139.585, -9.1, 0.758)
pt3dadd(47.378, 139.492, -9.1, 0.754)
pt3dadd(47.271, 139.435, -9.1, 0.754)
pt3dadd(47.165, 139.379, -9.1, 0.754)
pt3dadd(47.059, 139.324, -9.1, 0.754)
pt3dadd(46.953, 139.267, -9.1, 0.754)
pt3dadd(46.847, 139.212, -9.1, 0.754)
pt3dadd(46.731, 139.183, -9.1, 0.76)
pt3dadd(46.613, 139.166, -9.1, 0.768)
pt3dadd(46.494, 139.151, -9.1, 0.776)
pt3dadd(46.39, 139.092, -9.1, 0.778)
pt3dadd(46.289, 139.028, -9.1, 0.778)
pt3dadd(46.228, 138.932, -9.1, 0.772)
pt3dadd(46.193, 138.818, -9.1, 0.76)
pt3dadd(46.158, 138.703, -9.1, 0.742)
pt3dadd(46.123, 138.589, -9.1, 0.71)
pt3dadd(46.088, 138.474, -9.1, 0.678)
pt3dadd(46.012, 138.38, -9.1, 0.642)
pt3dadd(45.918, 138.31, -9.1, 0.628)
pt3dadd(45.813, 138.251, -9.1, 0.628)
pt3dadd(45.719, 138.181, -9.1, 0.632)
pt3dadd(45.647, 138.085, -9.1, 0.644)
pt3dadd(45.584, 137.984, -9.1, 0.66)
pt3dadd(45.557, 137.868, -9.1, 0.692)
pt3dadd(45.529, 137.75, -9.1, 0.724)
pt3dadd(45.501, 137.634, -9.1, 0.774)
pt3dadd(45.473, 137.518, -9.1, 0.826)
pt3dadd(45.443, 137.401, -9.1, 0.876)
pt3dadd(45.41, 137.287, -9.1, 0.922)
pt3dadd(45.377, 137.171, -9.1, 0.968)
pt3dadd(45.344, 137.056, -9.1, 1.014)
pt3dadd(45.259, 136.986, -9.1, 1.056)
pt3dadd(45.148, 136.942, -9.1, 1.098)
pt3dadd(45.051, 136.883, -9.1, 1.128)
pt3dadd(45.003, 136.772, -9.1, 1.12)
pt3dadd(44.955, 136.662, -9.1, 1.112)
pt3dadd(44.913, 136.55, -9.1, 1.092)
pt3dadd(44.886, 136.434, -9.1, 1.05)
pt3dadd(44.858, 136.316, -9.1, 1.008)
pt3dadd(44.853, 136.198, -9.1, 0.904)
pt3dadd(44.814, 136.084, -9.1, 0.89)
pt3dadd(44.775, 135.97, -9.1, 0.874)
pt3dadd(44.736, 135.857, -9.1, 0.86)
pt3dadd(44.697, 135.744, -9.1, 0.846)
pt3dadd(44.658, 135.63, -9.1, 0.832)
pt3dadd(44.628, 135.514, -9.1, 0.804)
pt3dadd(44.6, 135.396, -9.1, 0.772)
pt3dadd(44.573, 135.281, -9.1, 0.748)
pt3dadd(44.545, 135.164, -9.1, 0.738)
pt3dadd(44.515, 135.047, -9.101, 0.728)
pt3dadd(44.454, 134.948, -9.125, 0.742)
pt3dadd(44.396, 134.858, -9.159, 0.76)
pt3dadd(44.351, 134.81, -9.243, 0.802)
pt3dadd(44.309, 134.748, -9.318, 0.842)
pt3dadd(44.277, 134.654, -9.373, 0.88)
pt3dadd(44.264, 134.551, -9.425, 0.892)
pt3dadd(44.251, 134.45, -9.476, 0.902)
pt3dadd(44.238, 134.348, -9.528, 0.914)
pt3dadd(44.225, 134.246, -9.579, 0.924)
pt3dadd(44.218, 134.134, -9.611, 0.938)
pt3dadd(44.216, 134.017, -9.629, 0.952)
pt3dadd(44.213, 133.898, -9.647, 0.964)
pt3dadd(44.211, 133.781, -9.666, 0.978)
pt3dadd(44.209, 133.662, -9.684, 0.992)
pt3dadd(44.205, 133.546, -9.7, 1.006)
pt3dadd(44.189, 133.426, -9.7, 1.024)
pt3dadd(44.174, 133.307, -9.7, 1.042)
pt3dadd(44.159, 133.188, -9.7, 1.058)
pt3dadd(44.144, 133.068, -9.7, 1.076)
pt3dadd(44.129, 132.949, -9.7, 1.092)
pt3dadd(44.11, 132.832, -9.7, 1.106)
pt3dadd(44.08, 132.715, -9.7, 1.112)
pt3dadd(44.051, 132.599, -9.7, 1.116)
pt3dadd(44.021, 132.482, -9.7, 1.12)
pt3dadd(43.991, 132.366, -9.7, 1.124)
pt3dadd(43.962, 132.25, -9.7, 1.13)
pt3dadd(43.964, 132.131, -9.7, 1.1)
pt3dadd(43.972, 132.011, -9.7, 1.066)
pt3dadd(43.98, 131.891, -9.7, 1.032)
pt3dadd(43.991, 131.784, -9.743, 0.954)
pt3dadd(44.003, 131.676, -9.788, 0.876)
pt3dadd(43.99, 131.606, -9.863, 0.806)
pt3dadd(43.969, 131.549, -9.948, 0.742)
pt3dadd(43.884, 131.49, -9.984, 0.698)
pt3dadd(43.783, 131.432, -10.007, 0.66)
pt3dadd(43.745, 131.347, -10.059, 0.646)
pt3dadd(43.725, 131.254, -10.12, 0.638)
pt3dadd(43.704, 131.161, -10.181, 0.63)
pt3dadd(43.704, 131.069, -10.243, 0.636)
pt3dadd(43.714, 130.975, -10.306, 0.648)
pt3dadd(43.726, 130.868, -10.344, 0.674)
pt3dadd(43.738, 130.751, -10.364, 0.71)
pt3dadd(43.75, 130.634, -10.384, 0.748)
pt3dadd(43.76, 130.517, -10.4, 0.788)
pt3dadd(43.758, 130.397, -10.4, 0.844)
pt3dadd(43.756, 130.278, -10.4, 0.9)
pt3dadd(43.724, 130.166, -10.4, 0.962)
pt3dadd(43.698, 130.052, -10.4, 0.972)
pt3dadd(43.686, 129.932, -10.4, 0.964)
pt3dadd(43.674, 129.812, -10.4, 0.956)
pt3dadd(43.661, 129.694, -10.4, 0.948)
pt3dadd(43.649, 129.574, -10.4, 0.938)
pt3dadd(43.636, 129.454, -10.4, 0.93)
pt3dadd(43.628, 129.335, -10.4, 0.904)
pt3dadd(43.62, 129.215, -10.4, 0.876)
pt3dadd(43.587, 129.112, -10.4, 0.854)
pt3dadd(43.482, 129.054, -10.4, 0.854)
pt3dadd(43.376, 128.998, -10.4, 0.854)
pt3dadd(43.365, 128.879, -10.4, 0.864)
pt3dadd(43.357, 128.76, -10.4, 0.872)
pt3dadd(43.356, 128.64, -10.4, 0.886)
pt3dadd(43.369, 128.521, -10.4, 0.902)
pt3dadd(43.381, 128.401, -10.4, 0.918)
pt3dadd(43.394, 128.282, -10.4, 0.934)
pt3dadd(43.407, 128.162, -10.4, 0.946)
pt3dadd(43.402, 128.046, -10.408, 0.956)
pt3dadd(43.368, 127.933, -10.429, 0.962)
pt3dadd(43.334, 127.822, -10.45, 0.966)
pt3dadd(43.3, 127.709, -10.472, 0.972)
pt3dadd(43.266, 127.597, -10.493, 0.978)
pt3dadd(43.212, 127.492, -10.5, 0.972)
pt3dadd(43.147, 127.391, -10.5, 0.962)
pt3dadd(43.082, 127.29, -10.5, 0.952)
pt3dadd(43.017, 127.189, -10.5, 0.942)
pt3dadd(42.953, 127.088, -10.5, 0.932)
pt3dadd(42.938, 126.974, -10.5, 0.918)
pt3dadd(42.946, 126.854, -10.5, 0.9)
pt3dadd(42.954, 126.736, -10.5, 0.882)
pt3dadd(42.95, 126.616, -10.5, 0.856)
pt3dadd(42.942, 126.494, -10.5, 0.826)
pt3dadd(42.919, 126.382, -10.5, 0.804)
pt3dadd(42.84, 126.292, -10.5, 0.804)
pt3dadd(42.76, 126.202, -10.5, 0.804)
pt3dadd(42.675, 126.118, -10.5, 0.816)
pt3dadd(42.589, 126.034, -10.5, 0.828)
pt3dadd(42.489, 125.968, -10.5, 0.908)
pt3dadd(42.402, 125.888, -10.5, 0.982)
pt3dadd(42.33, 125.792, -10.5, 1.04)
pt3dadd(42.247, 125.708, -10.5, 1.088)
pt3dadd(42.141, 125.652, -10.5, 1.108)
pt3dadd(42.04, 125.592, -10.5, 1.128)
pt3dadd(42.026, 125.473, -10.5, 1.088)
pt3dadd(42.012, 125.353, -10.5, 1.048)
pt3dadd(41.991, 125.236, -10.5, 0.996)
pt3dadd(41.963, 125.119, -10.5, 0.932)
pt3dadd(41.925, 125.008, -10.5, 0.876)
pt3dadd(41.84, 124.924, -10.5, 0.854)
pt3dadd(41.754, 124.838, -10.5, 0.832)
pt3dadd(41.669, 124.756, -10.5, 0.812)
pt3dadd(41.578, 124.685, -10.522, 0.796)
pt3dadd(41.484, 124.625, -10.558, 0.782)
pt3dadd(41.442, 124.522, -10.575, 0.772)
pt3dadd(41.418, 124.405, -10.587, 0.764)
pt3dadd(41.394, 124.288, -10.598, 0.754)
pt3dadd(41.367, 124.172, -10.6, 0.736)
pt3dadd(41.339, 124.055, -10.6, 0.714)
pt3dadd(41.315, 123.937, -10.6, 0.704)
pt3dadd(41.267, 123.828, -10.6, 0.706)
pt3dadd(41.206, 123.726, -10.6, 0.712)
pt3dadd(41.144, 123.623, -10.6, 0.716)
pt3dadd(41.083, 123.52, -10.6, 0.722)
pt3dadd(41.021, 123.416, -10.6, 0.726)
pt3dadd(40.974, 123.306, -10.6, 0.732)
pt3dadd(40.935, 123.194, -10.6, 0.736)
pt3dadd(40.897, 123.08, -10.6, 0.74)
pt3dadd(40.858, 122.966, -10.6, 0.746)
pt3dadd(40.819, 122.854, -10.6, 0.75)
pt3dadd(40.767, 122.747, -10.6, 0.754)
pt3dadd(40.695, 122.651, -10.6, 0.754)
}
}
proc shape3d_100() {
apic[18] { pt3dadd(40.622, 122.555, -10.6, 0.754)
pt3dadd(40.551, 122.459, -10.6, 0.754)
pt3dadd(40.478, 122.363, -10.601, 0.752)
pt3dadd(40.403, 122.27, -10.606, 0.74)
pt3dadd(40.332, 122.178, -10.618, 0.726)
pt3dadd(40.312, 122.105, -10.696, 0.714)
pt3dadd(40.292, 122.022, -10.758, 0.702)
pt3dadd(40.276, 121.904, -10.77, 0.694)
pt3dadd(40.26, 121.786, -10.781, 0.688)
pt3dadd(40.245, 121.668, -10.793, 0.682)
pt3dadd(40.227, 121.549, -10.8, 0.678)
pt3dadd(40.206, 121.432, -10.8, 0.678)
pt3dadd(40.185, 121.313, -10.8, 0.678)
pt3dadd(40.157, 121.198, -10.8, 0.732)
pt3dadd(40.095, 121.094, -10.8, 0.758)
pt3dadd(40.034, 120.991, -10.8, 0.784)
pt3dadd(39.972, 120.889, -10.8, 0.808)
pt3dadd(39.911, 120.786, -10.8, 0.834)
pt3dadd(39.853, 120.68, -10.8, 0.86)
pt3dadd(39.814, 120.568, -10.8, 0.894)
pt3dadd(39.775, 120.454, -10.8, 0.926)
pt3dadd(39.736, 120.34, -10.8, 0.96)
pt3dadd(39.698, 120.227, -10.8, 0.994)
pt3dadd(39.659, 120.113, -10.8, 1.026)
pt3dadd(39.577, 120.026, -10.8, 1.052)
pt3dadd(39.492, 119.942, -10.8, 1.078)
pt3dadd(39.407, 119.857, -10.8, 1.104)
pt3dadd(39.321, 119.773, -10.8, 1.128)
pt3dadd(39.236, 119.689, -10.8, 1.154)
pt3dadd(39.15, 119.605, -10.8, 1.166)
pt3dadd(39.065, 119.52, -10.8, 1.178)
pt3dadd(38.967, 119.452, -10.8, 1.172)
pt3dadd(38.866, 119.387, -10.8, 1.16)
pt3dadd(38.789, 119.3, -10.8, 1.136)
pt3dadd(38.732, 119.194, -10.8, 1.1)
pt3dadd(38.695, 119.083, -10.8, 1.064)
pt3dadd(38.687, 118.963, -10.8, 1.026)
pt3dadd(38.679, 118.844, -10.8, 0.986)
pt3dadd(38.603, 118.762, -10.817, 0.942)
pt3dadd(38.51, 118.69, -10.837, 0.894)
pt3dadd(38.418, 118.618, -10.858, 0.848)
pt3dadd(38.341, 118.531, -10.877, 0.814)
pt3dadd(38.274, 118.433, -10.894, 0.788)
pt3dadd(38.195, 118.345, -10.9, 0.826)
pt3dadd(38.084, 118.3, -10.9, 0.854)
pt3dadd(37.971, 118.258, -10.9, 0.88)
pt3dadd(37.859, 118.216, -10.9, 0.906)
pt3dadd(37.747, 118.173, -10.9, 0.932)
pt3dadd(37.635, 118.131, -10.9, 0.958)
pt3dadd(37.522, 118.092, -10.903, 0.988)
pt3dadd(37.406, 118.063, -10.917, 1.03)
pt3dadd(37.291, 118.034, -10.931, 1.072)
pt3dadd(37.177, 118.015, -10.957, 1.106)
pt3dadd(37.064, 117.997, -10.986, 1.14)
pt3dadd(36.962, 117.949, -11, 1.16)
pt3dadd(36.87, 117.871, -11, 1.172)
pt3dadd(36.808, 117.778, -11, 1.176)
pt3dadd(36.801, 117.658, -11, 1.168)
pt3dadd(36.793, 117.539, -11, 1.158)
pt3dadd(36.742, 117.433, -11, 1.102)
pt3dadd(36.681, 117.33, -11, 1.048)
pt3dadd(36.629, 117.222, -11, 1.028)
pt3dadd(36.577, 117.113, -11, 1.008)
pt3dadd(36.525, 117.005, -11, 0.988)
pt3dadd(36.473, 116.897, -11, 0.97)
pt3dadd(36.422, 116.789, -11, 0.952)
pt3dadd(36.372, 116.679, -11, 0.94)
pt3dadd(36.319, 116.573, -11, 0.93)
pt3dadd(36.211, 116.522, -11, 0.93)
pt3dadd(36.102, 116.471, -11, 0.93)
pt3dadd(36.002, 116.405, -11, 0.914)
pt3dadd(35.906, 116.334, -11, 0.89)
pt3dadd(35.855, 116.238, -11, 0.86)
pt3dadd(35.847, 116.118, -11, 0.82)
pt3dadd(35.839, 115.998, -11, 0.782)
pt3dadd(35.764, 115.908, -11, 0.758)
pt3dadd(35.682, 115.82, -11, 0.738)
pt3dadd(35.6, 115.732, -11, 0.716)
pt3dadd(35.508, 115.66, -11, 0.704)
pt3dadd(35.397, 115.615, -11, 0.704)
pt3dadd(35.285, 115.57, -11, 0.704)
pt3dadd(35.218, 115.472, -11, 0.712)
pt3dadd(35.153, 115.371, -11, 0.72)
pt3dadd(35.091, 115.27, -11.003, 0.73)
pt3dadd(35.051, 115.165, -11.039, 0.744)
pt3dadd(35.008, 115.06, -11.07, 0.75)
pt3dadd(34.954, 114.954, -11.082, 0.742)
pt3dadd(34.9, 114.847, -11.095, 0.732)
pt3dadd(34.811, 114.786, -11.1, 0.728)
pt3dadd(34.694, 114.759, -11.1, 0.728)
pt3dadd(34.577, 114.732, -11.1, 0.728)
pt3dadd(34.46, 114.704, -11.1, 0.728)
pt3dadd(34.369, 114.627, -11.1, 0.728)
pt3dadd(34.279, 114.548, -11.1, 0.728)
pt3dadd(34.188, 114.469, -11.1, 0.728)
pt3dadd(34.098, 114.39, -11.1, 0.728)
pt3dadd(34.008, 114.311, -11.1, 0.728)
pt3dadd(33.917, 114.232, -11.1, 0.718)
pt3dadd(33.827, 114.153, -11.1, 0.708)
pt3dadd(33.736, 114.074, -11.1, 0.698)
pt3dadd(33.646, 113.995, -11.1, 0.688)
pt3dadd(33.555, 113.916, -11.1, 0.678)
pt3dadd(33.475, 113.828, -11.1, 0.674)
pt3dadd(33.395, 113.738, -11.1, 0.668)
pt3dadd(33.315, 113.649, -11.1, 0.664)
pt3dadd(33.235, 113.559, -11.1, 0.658)
pt3dadd(33.155, 113.47, -11.1, 0.654)
pt3dadd(33.05, 113.418, -11.12, 0.664)
pt3dadd(32.944, 113.368, -11.141, 0.674)
pt3dadd(32.838, 113.318, -11.162, 0.684)
pt3dadd(32.731, 113.268, -11.183, 0.694)
pt3dadd(32.63, 113.211, -11.2, 0.706)
pt3dadd(32.55, 113.122, -11.2, 0.726)
pt3dadd(32.47, 113.032, -11.2, 0.746)
pt3dadd(32.39, 112.943, -11.2, 0.768)
pt3dadd(32.31, 112.853, -11.2, 0.788)
pt3dadd(32.237, 112.76, -11.205, 0.806)
pt3dadd(32.192, 112.652, -11.227, 0.816)
pt3dadd(32.148, 112.543, -11.249, 0.828)
pt3dadd(32.103, 112.435, -11.271, 0.84)
pt3dadd(32.058, 112.327, -11.293, 0.85)
pt3dadd(32.024, 112.214, -11.3, 0.85)
pt3dadd(31.994, 112.097, -11.3, 0.846)
pt3dadd(31.964, 111.981, -11.3, 0.842)
pt3dadd(31.935, 111.865, -11.3, 0.836)
pt3dadd(31.905, 111.749, -11.3, 0.832)
pt3dadd(31.883, 111.631, -11.3, 0.82)
pt3dadd(31.886, 111.511, -11.3, 0.784)
pt3dadd(31.889, 111.391, -11.3, 0.748)
pt3dadd(31.869, 111.276, -11.3, 0.714)
pt3dadd(31.819, 111.167, -11.3, 0.678)
pt3dadd(31.763, 111.062, -11.3, 0.648)
pt3dadd(31.683, 110.972, -11.3, 0.624)
pt3dadd(31.604, 110.882, -11.3, 0.602)
pt3dadd(31.526, 110.791, -11.3, 0.602)
pt3dadd(31.447, 110.7, -11.3, 0.602)
pt3dadd(31.37, 110.609, -11.3, 0.602)
pt3dadd(31.292, 110.518, -11.3, 0.602)
pt3dadd(31.214, 110.426, -11.3, 0.602)
pt3dadd(31.176, 110.322, -11.3, 0.602)
pt3dadd(31.184, 110.202, -11.3, 0.602)
pt3dadd(31.191, 110.082, -11.3, 0.602)
pt3dadd(31.202, 109.963, -11.3, 0.616)
pt3dadd(31.203, 109.843, -11.3, 0.628)
pt3dadd(31.196, 109.723, -11.3, 0.628)
pt3dadd(31.189, 109.604, -11.3, 0.628)
pt3dadd(31.182, 109.484, -11.3, 0.628)
pt3dadd(31.174, 109.364, -11.3, 0.628)
pt3dadd(31.167, 109.244, -11.3, 0.628)
pt3dadd(31.138, 109.13, -11.3, 0.628)
pt3dadd(31.086, 109.022, -11.3, 0.628)
pt3dadd(31.034, 108.914, -11.3, 0.628)
pt3dadd(30.983, 108.806, -11.3, 0.628)
pt3dadd(30.931, 108.698, -11.3, 0.628)
pt3dadd(30.879, 108.589, -11.3, 0.626)
pt3dadd(30.827, 108.481, -11.3, 0.622)
pt3dadd(30.775, 108.373, -11.3, 0.616)
pt3dadd(30.724, 108.264, -11.3, 0.612)
pt3dadd(30.672, 108.156, -11.3, 0.606)
pt3dadd(30.627, 108.046, -11.307, 0.608)
pt3dadd(30.596, 107.933, -11.328, 0.624)
pt3dadd(30.566, 107.82, -11.349, 0.64)
pt3dadd(30.535, 107.706, -11.37, 0.656)
pt3dadd(30.505, 107.593, -11.391, 0.67)
pt3dadd(30.498, 107.476, -11.4, 0.696)
pt3dadd(30.511, 107.357, -11.4, 0.73)
pt3dadd(30.523, 107.238, -11.4, 0.764)
pt3dadd(30.536, 107.118, -11.4, 0.798)
pt3dadd(30.548, 106.999, -11.4, 0.83)
pt3dadd(30.561, 106.88, -11.4, 0.864)
pt3dadd(30.573, 106.763, -11.415, 0.884)
pt3dadd(30.585, 106.648, -11.443, 0.894)
pt3dadd(30.597, 106.534, -11.471, 0.904)
pt3dadd(30.609, 106.421, -11.504, 0.904)
pt3dadd(30.621, 106.308, -11.537, 0.904)
pt3dadd(30.626, 106.258, -11.619, 0.908)
pt3dadd(30.63, 106.225, -11.715, 0.916)
pt3dadd(30.633, 106.192, -11.811, 0.922)
pt3dadd(30.637, 106.159, -11.907, 0.928)
pt3dadd(30.622, 106.103, -11.993, 0.92)
pt3dadd(30.601, 106.037, -12.075, 0.906)
pt3dadd(30.503, 105.995, -12.095, 0.878)
pt3dadd(30.388, 105.964, -12.1, 0.83)
pt3dadd(30.269, 105.948, -12.1, 0.74)
pt3dadd(30.154, 105.915, -12.1, 0.692)
pt3dadd(30.057, 105.849, -12.1, 0.678)
pt3dadd(29.973, 105.764, -12.1, 0.688)
pt3dadd(29.921, 105.657, -12.1, 0.774)
pt3dadd(29.886, 105.542, -12.1, 0.83)
pt3dadd(29.852, 105.427, -12.1, 0.882)
pt3dadd(29.824, 105.31, -12.1, 0.926)
pt3dadd(29.796, 105.193, -12.1, 0.968)
pt3dadd(29.774, 105.075, -12.1, 0.934)
pt3dadd(29.739, 104.961, -12.1, 0.912)
pt3dadd(29.704, 104.846, -12.1, 0.892)
pt3dadd(29.668, 104.732, -12.1, 0.874)
pt3dadd(29.632, 104.617, -12.1, 0.854)
pt3dadd(29.596, 104.503, -12.1, 0.836)
pt3dadd(29.56, 104.388, -12.099, 0.834)
pt3dadd(29.523, 104.274, -12.097, 0.844)
}
}
proc shape3d_101() {
apic[18] { pt3dadd(29.487, 104.16, -12.094, 0.854)
pt3dadd(29.45, 104.046, -12.092, 0.864)
pt3dadd(29.413, 103.931, -12.09, 0.874)
pt3dadd(29.377, 103.82, -12.075, 0.898)
pt3dadd(29.343, 103.713, -12.04, 0.95)
pt3dadd(29.308, 103.606, -12.005, 1.002)
pt3dadd(29.274, 103.499, -11.969, 1.052)
pt3dadd(29.239, 103.392, -11.934, 1.104)
pt3dadd(29.226, 103.278, -11.907, 1.144)
pt3dadd(29.214, 103.163, -11.88, 1.184)
pt3dadd(29.202, 103.048, -11.853, 1.226)
pt3dadd(29.19, 102.933, -11.826, 1.266)
pt3dadd(29.177, 102.818, -11.8, 1.306)
pt3dadd(29.162, 102.699, -11.8, 1.306)
pt3dadd(29.147, 102.58, -11.8, 1.306)
pt3dadd(29.132, 102.461, -11.8, 1.306)
pt3dadd(29.117, 102.342, -11.8, 1.306)
pt3dadd(29.102, 102.223, -11.8, 1.306)
pt3dadd(29.09, 102.104, -11.8, 1.302)
pt3dadd(29.087, 101.984, -11.8, 1.278)
pt3dadd(29.085, 101.864, -11.8, 1.254)
pt3dadd(29.082, 101.744, -11.8, 1.228)
pt3dadd(29.08, 101.624, -11.8, 1.206)
pt3dadd(29.078, 101.504, -11.8, 1.18)
pt3dadd(29.075, 101.384, -11.8, 1.156)
pt3dadd(29.048, 101.267, -11.8, 1.134)
pt3dadd(29.018, 101.151, -11.8, 1.11)
pt3dadd(28.988, 101.035, -11.8, 1.088)
pt3dadd(28.959, 100.918, -11.8, 1.064)
pt3dadd(28.929, 100.802, -11.8, 1.042)
pt3dadd(28.92, 100.685, -11.794, 1.016)
pt3dadd(28.932, 100.566, -11.782, 0.988)
pt3dadd(28.944, 100.448, -11.769, 0.96)
pt3dadd(28.938, 100.356, -11.712, 0.924)
pt3dadd(28.926, 100.27, -11.642, 0.884)
pt3dadd(28.853, 100.185, -11.618, 0.834)
pt3dadd(28.771, 100.1, -11.601, 0.782)
pt3dadd(28.712, 99.996, -11.6, 0.734)
pt3dadd(28.655, 99.89, -11.6, 0.688)
pt3dadd(28.601, 99.783, -11.6, 0.65)
pt3dadd(28.54, 99.68, -11.6, 0.628)
pt3dadd(28.466, 99.586, -11.6, 0.628)
pt3dadd(28.392, 99.491, -11.6, 0.628)
pt3dadd(28.318, 99.397, -11.6, 0.628)
pt3dadd(28.245, 99.302, -11.6, 0.628)
pt3dadd(28.186, 99.2, -11.6, 0.632)
pt3dadd(28.15, 99.085, -11.6, 0.64)
pt3dadd(28.114, 98.971, -11.6, 0.65)
pt3dadd(28.078, 98.856, -11.6, 0.66)
pt3dadd(28.043, 98.742, -11.6, 0.67)
pt3dadd(28.009, 98.627, -11.6, 0.678)
pt3dadd(28.007, 98.507, -11.6, 0.682)
pt3dadd(28.004, 98.387, -11.6, 0.686)
pt3dadd(28.002, 98.267, -11.6, 0.69)
pt3dadd(27.999, 98.147, -11.6, 0.694)
pt3dadd(27.997, 98.027, -11.6, 0.698)
pt3dadd(27.995, 97.907, -11.6, 0.702)
pt3dadd(27.988, 97.787, -11.6, 0.696)
pt3dadd(27.981, 97.667, -11.6, 0.688)
pt3dadd(27.974, 97.547, -11.6, 0.68)
pt3dadd(27.967, 97.428, -11.6, 0.672)
pt3dadd(27.959, 97.308, -11.6, 0.664)
pt3dadd(27.952, 97.188, -11.6, 0.656)
pt3dadd(27.929, 97.071, -11.6, 0.642)
pt3dadd(27.899, 96.954, -11.6, 0.63)
pt3dadd(27.87, 96.838, -11.6, 0.616)
pt3dadd(27.84, 96.722, -11.6, 0.602)
pt3dadd(27.81, 96.606, -11.6, 0.588)
pt3dadd(27.785, 96.49, -11.609, 0.576)
pt3dadd(27.772, 96.378, -11.641, 0.572)
pt3dadd(27.759, 96.265, -11.673, 0.566)
pt3dadd(27.745, 96.152, -11.706, 0.56)
pt3dadd(27.732, 96.039, -11.738, 0.556)
pt3dadd(27.712, 95.925, -11.761, 0.556)
pt3dadd(27.685, 95.809, -11.771, 0.566)
pt3dadd(27.658, 95.693, -11.782, 0.576)
pt3dadd(27.63, 95.577, -11.793, 0.586)
pt3dadd(27.603, 95.46, -11.804, 0.596)
pt3dadd(27.577, 95.35, -11.83, 0.61)
pt3dadd(27.554, 95.249, -11.88, 0.626)
pt3dadd(27.531, 95.148, -11.931, 0.644)
pt3dadd(27.508, 95.048, -11.982, 0.66)
pt3dadd(27.485, 94.947, -12.033, 0.678)
pt3dadd(27.485, 94.833, -12.063, 0.722)
pt3dadd(27.485, 94.718, -12.093, 0.768)
pt3dadd(27.441, 94.611, -12.1, 0.814)
pt3dadd(27.384, 94.505, -12.1, 0.86)
pt3dadd(27.3, 94.425, -12.1, 0.9)
pt3dadd(27.199, 94.36, -12.1, 0.934)
pt3dadd(27.098, 94.295, -12.1, 0.954)
pt3dadd(26.996, 94.231, -12.1, 0.954)
pt3dadd(26.902, 94.16, -12.1, 0.952)
pt3dadd(26.846, 94.054, -12.1, 0.938)
pt3dadd(26.79, 93.948, -12.1, 0.924)
pt3dadd(26.734, 93.842, -12.1, 0.91)
pt3dadd(26.693, 93.73, -12.1, 0.892)
pt3dadd(26.666, 93.613, -12.1, 0.872)
pt3dadd(26.632, 93.499, -12.1, 0.85)
pt3dadd(26.573, 93.394, -12.1, 0.834)
pt3dadd(26.514, 93.29, -12.1, 0.816)
pt3dadd(26.439, 93.202, -12.1, 0.796)
pt3dadd(26.331, 93.151, -12.1, 0.776)
pt3dadd(26.222, 93.099, -12.1, 0.754)
pt3dadd(26.108, 93.067, -12.1, 0.678)
pt3dadd(26.037, 92.97, -12.1, 0.672)
pt3dadd(25.967, 92.873, -12.1, 0.668)
pt3dadd(25.896, 92.776, -12.1, 0.662)
pt3dadd(25.825, 92.68, -12.1, 0.658)
pt3dadd(25.755, 92.582, -12.1, 0.654)
pt3dadd(25.693, 92.479, -12.1, 0.658)
pt3dadd(25.632, 92.376, -12.1, 0.664)
pt3dadd(25.57, 92.273, -12.1, 0.668)
pt3dadd(25.509, 92.17, -12.1, 0.674)
pt3dadd(25.448, 92.067, -12.1, 0.678)
pt3dadd(25.396, 91.959, -12.1, 0.684)
pt3dadd(25.344, 91.85, -12.1, 0.688)
pt3dadd(25.292, 91.742, -12.1, 0.694)
pt3dadd(25.24, 91.634, -12.1, 0.698)
pt3dadd(25.19, 91.526, -12.1, 0.702)
pt3dadd(25.197, 91.406, -12.1, 0.686)
pt3dadd(25.206, 91.286, -12.1, 0.668)
pt3dadd(25.211, 91.166, -12.1, 0.65)
pt3dadd(25.204, 91.047, -12.1, 0.62)
pt3dadd(25.196, 90.927, -12.1, 0.592)
pt3dadd(25.134, 90.844, -12.1, 0.566)
pt3dadd(25.026, 90.793, -12.1, 0.544)
pt3dadd(24.922, 90.735, -12.1, 0.528)
pt3dadd(24.843, 90.645, -12.1, 0.528)
pt3dadd(24.768, 90.554, -12.097, 0.526)
pt3dadd(24.747, 90.461, -12.036, 0.518)
pt3dadd(24.727, 90.368, -11.975, 0.51)
pt3dadd(24.706, 90.275, -11.914, 0.502)
pt3dadd(24.717, 90.157, -11.907, 0.502)
pt3dadd(24.729, 90.038, -11.904, 0.502)
pt3dadd(24.742, 89.919, -11.9, 0.506)
pt3dadd(24.753, 89.799, -11.9, 0.554)
pt3dadd(24.746, 89.679, -11.9, 0.57)
pt3dadd(24.739, 89.56, -11.9, 0.586)
pt3dadd(24.732, 89.44, -11.9, 0.602)
pt3dadd(24.724, 89.32, -11.9, 0.62)
pt3dadd(24.717, 89.2, -11.9, 0.636)
pt3dadd(24.71, 89.081, -11.9, 0.652)
pt3dadd(24.722, 88.962, -11.89, 0.664)
pt3dadd(24.734, 88.843, -11.879, 0.676)
pt3dadd(24.747, 88.725, -11.869, 0.688)
pt3dadd(24.759, 88.606, -11.858, 0.7)
pt3dadd(24.772, 88.487, -11.848, 0.712)
pt3dadd(24.784, 88.368, -11.837, 0.724)
pt3dadd(24.789, 88.249, -11.83, 0.728)
pt3dadd(24.788, 88.129, -11.824, 0.728)
pt3dadd(24.787, 88.009, -11.819, 0.728)
pt3dadd(24.786, 87.89, -11.813, 0.728)
pt3dadd(24.786, 87.77, -11.808, 0.728)
pt3dadd(24.785, 87.65, -11.802, 0.728)
pt3dadd(24.769, 87.532, -11.8, 0.728)
pt3dadd(24.743, 87.415, -11.8, 0.728)
pt3dadd(24.717, 87.298, -11.8, 0.728)
pt3dadd(24.69, 87.181, -11.8, 0.728)
pt3dadd(24.664, 87.063, -11.8, 0.728)
pt3dadd(24.636, 86.947, -11.8, 0.728)
pt3dadd(24.561, 86.853, -11.8, 0.744)
pt3dadd(24.487, 86.759, -11.8, 0.76)
pt3dadd(24.413, 86.664, -11.8, 0.774)
pt3dadd(24.339, 86.57, -11.8, 0.79)
pt3dadd(24.27, 86.474, -11.8, 0.806)
pt3dadd(24.249, 86.355, -11.8, 0.838)
pt3dadd(24.228, 86.237, -11.8, 0.868)
pt3dadd(24.208, 86.119, -11.8, 0.9)
pt3dadd(24.187, 86.001, -11.8, 0.93)
pt3dadd(24.167, 85.882, -11.8, 0.962)
pt3dadd(24.13, 85.77, -11.8, 0.994)
pt3dadd(24.072, 85.665, -11.8, 1.03)
pt3dadd(24.013, 85.56, -11.8, 1.064)
pt3dadd(23.955, 85.455, -11.8, 1.1)
pt3dadd(23.896, 85.351, -11.8, 1.134)
pt3dadd(23.843, 85.243, -11.8, 1.16)
pt3dadd(23.798, 85.132, -11.8, 1.176)
pt3dadd(23.752, 85.021, -11.8, 1.19)
pt3dadd(23.707, 84.91, -11.8, 1.204)
pt3dadd(23.661, 84.799, -11.8, 1.22)
pt3dadd(23.609, 84.692, -11.8, 1.224)
pt3dadd(23.538, 84.595, -11.8, 1.202)
pt3dadd(23.465, 84.5, -11.8, 1.174)
pt3dadd(23.386, 84.41, -11.8, 1.114)
pt3dadd(23.307, 84.32, -11.8, 1.056)
pt3dadd(23.213, 84.246, -11.795, 0.984)
pt3dadd(23.118, 84.172, -11.789, 0.912)
pt3dadd(23.068, 84.121, -11.715, 0.844)
pt3dadd(23.021, 84.074, -11.632, 0.778)
pt3dadd(22.909, 84.062, -11.598, 0.766)
pt3dadd(22.797, 84.05, -11.564, 0.752)
pt3dadd(22.684, 84.038, -11.53, 0.74)
pt3dadd(22.572, 84.025, -11.5, 0.73)
pt3dadd(22.455, 83.998, -11.5, 0.738)
pt3dadd(22.338, 83.971, -11.5, 0.748)
pt3dadd(22.231, 83.924, -11.493, 0.802)
pt3dadd(22.133, 83.87, -11.46, 0.92)
pt3dadd(22.026, 83.849, -11.42, 1.024)
pt3dadd(21.912, 83.837, -11.393, 1.096)
pt3dadd(21.808, 83.802, -11.358, 1.092)
}
}
proc shape3d_102() {
apic[18] { pt3dadd(21.778, 83.705, -11.316, 0.994)
pt3dadd(21.788, 83.587, -11.3, 0.908)
pt3dadd(21.8, 83.468, -11.3, 0.832)
pt3dadd(21.813, 83.348, -11.3, 0.756)
pt3dadd(21.825, 83.229, -11.3, 0.754)
pt3dadd(21.838, 83.11, -11.3, 0.826)
pt3dadd(21.834, 82.99, -11.3, 0.986)
pt3dadd(21.776, 82.889, -11.3, 1.054)
pt3dadd(21.685, 82.811, -11.3, 1.054)
pt3dadd(21.594, 82.733, -11.3, 1.05)
pt3dadd(21.502, 82.655, -11.3, 1.014)
pt3dadd(21.411, 82.577, -11.3, 0.98)
pt3dadd(21.346, 82.483, -11.3, 0.926)
pt3dadd(21.332, 82.364, -11.3, 0.916)
pt3dadd(21.318, 82.245, -11.3, 0.906)
pt3dadd(21.259, 82.144, -11.3, 0.894)
pt3dadd(21.186, 82.048, -11.3, 0.882)
pt3dadd(21.112, 81.954, -11.296, 0.862)
pt3dadd(21.037, 81.861, -11.291, 0.838)
pt3dadd(20.966, 81.803, -11.242, 0.796)
pt3dadd(20.899, 81.767, -11.165, 0.742)
pt3dadd(20.86, 81.683, -11.11, 0.71)
pt3dadd(20.832, 81.58, -11.064, 0.686)
pt3dadd(20.804, 81.478, -11.017, 0.662)
pt3dadd(20.744, 81.383, -11, 0.638)
pt3dadd(20.664, 81.293, -11, 0.614)
pt3dadd(20.574, 81.215, -11, 0.62)
pt3dadd(20.473, 81.15, -11, 0.654)
pt3dadd(20.376, 81.081, -11, 0.678)
pt3dadd(20.291, 80.996, -11, 0.678)
pt3dadd(20.222, 80.899, -11.002, 0.678)
pt3dadd(20.167, 80.807, -11.039, 0.678)
pt3dadd(20.157, 80.766, -11.129, 0.636)
pt3dadd(20.188, 80.76, -11.224, 0.512)
pt3dadd(20.276, 80.769, -11.284, 0.344)
pt3dadd(20.393, 80.781, -11.3, 0.248)
pt3dadd(20.513, 80.794, -11.3, 0.226)
}
apic[19] {pt3dclear()
pt3dadd(53.692, 142.936, -8.7, 0.704)
pt3dadd(53.678, 142.957, -8.643, 0.66)
pt3dadd(53.671, 143.009, -8.554, 0.622)
pt3dadd(53.657, 143.063, -8.466, 0.618)
pt3dadd(53.609, 143.12, -8.389, 0.628)
pt3dadd(53.555, 143.146, -8.304, 0.59)
pt3dadd(53.537, 143.147, -8.206, 0.554)
pt3dadd(53.536, 143.147, -8.106, 0.506)
pt3dadd(53.536, 143.147, -8.006, 0.526)
pt3dadd(53.533, 143.161, -7.907, 0.612)
pt3dadd(53.497, 143.212, -7.828, 0.808)
pt3dadd(53.429, 143.25, -7.883, 0.786)
pt3dadd(53.404, 143.266, -7.979, 0.71)
pt3dadd(53.374, 143.308, -8.065, 0.678)
pt3dadd(53.302, 143.356, -8.03, 0.678)
pt3dadd(53.275, 143.371, -7.934, 0.678)
pt3dadd(53.268, 143.399, -7.838, 0.678)
pt3dadd(53.255, 143.473, -7.761, 0.678)
pt3dadd(53.201, 143.56, -7.724, 0.682)
pt3dadd(53.106, 143.584, -7.774, 0.748)
pt3dadd(53.044, 143.651, -7.838, 0.794)
pt3dadd(52.991, 143.729, -7.89, 0.84)
pt3dadd(52.974, 143.848, -7.894, 0.894)
pt3dadd(52.956, 143.966, -7.898, 0.948)
pt3dadd(52.92, 144.079, -7.9, 1.088)
pt3dadd(52.843, 144.168, -7.9, 1.214)
pt3dadd(52.758, 144.254, -7.9, 1.264)
pt3dadd(52.674, 144.34, -7.9, 1.314)
pt3dadd(52.589, 144.425, -7.9, 1.364)
pt3dadd(52.504, 144.51, -7.9, 1.416)
pt3dadd(52.418, 144.593, -7.9, 1.448)
pt3dadd(52.331, 144.676, -7.9, 1.474)
pt3dadd(52.244, 144.758, -7.9, 1.5)
pt3dadd(52.158, 144.841, -7.9, 1.524)
pt3dadd(52.071, 144.924, -7.9, 1.55)
pt3dadd(51.972, 144.991, -7.9, 1.56)
pt3dadd(51.869, 145.054, -7.9, 1.566)
pt3dadd(51.766, 145.115, -7.9, 1.57)
pt3dadd(51.663, 145.176, -7.9, 1.576)
pt3dadd(51.56, 145.238, -7.9, 1.58)
pt3dadd(51.47, 145.316, -7.9, 1.572)
pt3dadd(51.386, 145.402, -7.9, 1.556)
pt3dadd(51.302, 145.487, -7.9, 1.54)
pt3dadd(51.218, 145.572, -7.9, 1.526)
pt3dadd(51.133, 145.657, -7.9, 1.51)
pt3dadd(51.068, 145.757, -7.905, 1.492)
pt3dadd(51.01, 145.862, -7.911, 1.472)
pt3dadd(50.951, 145.967, -7.918, 1.452)
pt3dadd(50.893, 146.071, -7.924, 1.432)
pt3dadd(50.835, 146.176, -7.931, 1.414)
pt3dadd(50.798, 146.285, -7.953, 1.392)
pt3dadd(50.775, 146.398, -7.983, 1.37)
pt3dadd(50.715, 146.483, -8, 1.366)
pt3dadd(50.606, 146.532, -8, 1.388)
pt3dadd(50.494, 146.569, -8, 1.42)
pt3dadd(50.374, 146.561, -8, 1.48)
pt3dadd(50.255, 146.552, -8, 1.542)
pt3dadd(50.142, 146.561, -8.014, 1.624)
pt3dadd(50.041, 146.604, -8.057, 1.748)
pt3dadd(49.963, 146.624, -8.124, 1.864)
pt3dadd(49.901, 146.635, -8.204, 1.962)
pt3dadd(49.808, 146.702, -8.236, 1.992)
pt3dadd(49.716, 146.768, -8.267, 2.022)
pt3dadd(49.623, 146.834, -8.299, 2.052)
pt3dadd(49.53, 146.9, -8.33, 2.082)
pt3dadd(49.453, 146.981, -8.367, 2.11)
pt3dadd(49.374, 147.061, -8.4, 2.138)
pt3dadd(49.268, 147.118, -8.4, 2.172)
pt3dadd(49.163, 147.175, -8.4, 2.208)
pt3dadd(49.078, 147.242, -8.442, 2.224)
pt3dadd(49.005, 147.304, -8.495, 2.238)
pt3dadd(48.975, 147.34, -8.587, 2.25)
pt3dadd(48.943, 147.371, -8.679, 2.26)
pt3dadd(48.896, 147.376, -8.771, 2.26)
pt3dadd(48.839, 147.426, -8.844, 2.24)
pt3dadd(48.778, 147.496, -8.907, 2.212)
pt3dadd(48.728, 147.551, -8.985, 2.146)
pt3dadd(48.678, 147.61, -9.058, 2.076)
pt3dadd(48.628, 147.716, -9.08, 2.002)
pt3dadd(48.578, 147.822, -9.1, 1.932)
pt3dadd(48.526, 147.93, -9.1, 1.9)
pt3dadd(48.475, 148.038, -9.1, 1.868)
pt3dadd(48.38, 148.1, -9.1, 1.87)
pt3dadd(48.275, 148.153, -9.1, 1.884)
pt3dadd(48.193, 148.241, -9.1, 1.884)
pt3dadd(48.111, 148.328, -9.1, 1.884)
pt3dadd(48.03, 148.417, -9.1, 1.884)
pt3dadd(47.948, 148.505, -9.1, 1.884)
pt3dadd(47.877, 148.598, -9.1, 1.88)
pt3dadd(47.846, 148.714, -9.1, 1.868)
pt3dadd(47.813, 148.83, -9.1, 1.856)
pt3dadd(47.781, 148.945, -9.1, 1.844)
pt3dadd(47.749, 149.06, -9.1, 1.832)
pt3dadd(47.718, 149.177, -9.1, 1.818)
pt3dadd(47.683, 149.291, -9.1, 1.806)
pt3dadd(47.633, 149.401, -9.1, 1.788)
pt3dadd(47.582, 149.509, -9.1, 1.77)
pt3dadd(47.532, 149.618, -9.1, 1.752)
pt3dadd(47.481, 149.726, -9.1, 1.732)
pt3dadd(47.431, 149.836, -9.1, 1.714)
pt3dadd(47.366, 149.936, -9.1, 1.708)
pt3dadd(47.293, 150.031, -9.1, 1.708)
pt3dadd(47.22, 150.126, -9.1, 1.708)
pt3dadd(47.146, 150.221, -9.1, 1.708)
pt3dadd(47.073, 150.316, -9.1, 1.708)
pt3dadd(47.019, 150.421, -9.1, 1.728)
pt3dadd(46.98, 150.535, -9.1, 1.768)
pt3dadd(46.941, 150.648, -9.1, 1.81)
pt3dadd(46.85, 150.726, -9.1, 1.88)
pt3dadd(46.759, 150.805, -9.1, 1.952)
pt3dadd(46.699, 150.907, -9.1, 2.018)
pt3dadd(46.641, 151.014, -9.1, 2.084)
pt3dadd(46.547, 151.063, -9.1, 2.146)
pt3dadd(46.427, 151.076, -9.1, 2.206)
pt3dadd(46.308, 151.092, -9.1, 2.274)
pt3dadd(46.193, 151.124, -9.1, 2.42)
pt3dadd(46.117, 151.174, -9.142, 2.476)
pt3dadd(46.075, 151.238, -9.219, 2.456)
pt3dadd(46.032, 151.303, -9.295, 2.436)
pt3dadd(45.99, 151.367, -9.372, 2.418)
pt3dadd(45.948, 151.432, -9.448, 2.398)
pt3dadd(45.905, 151.498, -9.525, 2.38)
pt3dadd(45.863, 151.561, -9.601, 2.36)
pt3dadd(45.821, 151.626, -9.678, 2.34)
pt3dadd(45.778, 151.69, -9.754, 2.322)
pt3dadd(45.736, 151.756, -9.831, 2.302)
pt3dadd(45.693, 151.82, -9.907, 2.284)
pt3dadd(45.651, 151.884, -9.984, 2.264)
pt3dadd(45.609, 151.949, -10.06, 2.244)
pt3dadd(45.566, 152.012, -10.137, 2.226)
pt3dadd(45.524, 152.078, -10.213, 2.206)
pt3dadd(45.482, 152.143, -10.29, 2.188)
pt3dadd(45.439, 152.207, -10.366, 2.168)
pt3dadd(45.397, 152.272, -10.443, 2.148)
pt3dadd(45.354, 152.338, -10.519, 2.13)
pt3dadd(45.312, 152.401, -10.596, 2.11)
pt3dadd(45.2, 152.384, -10.618, 2.13)
pt3dadd(45.085, 152.363, -10.638, 2.152)
pt3dadd(44.969, 152.342, -10.657, 2.174)
pt3dadd(44.852, 152.332, -10.674, 2.202)
pt3dadd(44.733, 152.33, -10.689, 2.236)
pt3dadd(44.613, 152.329, -10.698, 2.256)
pt3dadd(44.494, 152.33, -10.7, 2.26)
pt3dadd(44.374, 152.335, -10.7, 2.26)
pt3dadd(44.276, 152.394, -10.7, 2.27)
pt3dadd(44.232, 152.503, -10.7, 2.316)
pt3dadd(44.214, 152.622, -10.7, 2.384)
pt3dadd(44.202, 152.742, -10.7, 2.476)
pt3dadd(44.189, 152.861, -10.7, 2.576)
pt3dadd(44.167, 152.98, -10.7, 2.702)
pt3dadd(44.133, 153.095, -10.7, 2.74)
pt3dadd(44.096, 153.209, -10.7, 2.744)
pt3dadd(44.059, 153.323, -10.7, 2.748)
pt3dadd(44.022, 153.436, -10.7, 2.754)
pt3dadd(43.985, 153.551, -10.7, 2.758)
pt3dadd(43.948, 153.665, -10.7, 2.762)
pt3dadd(43.869, 153.752, -10.7, 2.77)
pt3dadd(43.781, 153.834, -10.7, 2.78)
pt3dadd(43.694, 153.917, -10.7, 2.79)
pt3dadd(43.607, 154, -10.7, 2.802)
pt3dadd(43.52, 154.082, -10.7, 2.812)
pt3dadd(43.464, 154.182, -10.726, 2.822)
pt3dadd(43.413, 154.285, -10.755, 2.832)
}
}
proc shape3d_103() {
apic[19] { pt3dadd(43.361, 154.387, -10.783, 2.844)
pt3dadd(43.31, 154.49, -10.813, 2.854)
pt3dadd(43.249, 154.586, -10.837, 2.872)
pt3dadd(43.163, 154.669, -10.852, 2.906)
pt3dadd(43.078, 154.752, -10.867, 2.938)
pt3dadd(42.992, 154.835, -10.882, 2.972)
pt3dadd(42.907, 154.916, -10.896, 3.004)
pt3dadd(42.843, 155.017, -10.9, 3.024)
pt3dadd(42.787, 155.124, -10.9, 3.038)
pt3dadd(42.731, 155.23, -10.9, 3.052)
pt3dadd(42.676, 155.335, -10.9, 3.066)
pt3dadd(42.62, 155.441, -10.9, 3.08)
pt3dadd(42.558, 155.543, -10.908, 3.084)
pt3dadd(42.485, 155.635, -10.93, 3.074)
pt3dadd(42.412, 155.726, -10.953, 3.062)
pt3dadd(42.34, 155.818, -10.975, 3.05)
pt3dadd(42.267, 155.909, -10.998, 3.04)
pt3dadd(42.205, 156.01, -11.005, 2.872)
pt3dadd(42.168, 156.116, -11.038, 2.774)
pt3dadd(42.126, 156.222, -11.068, 2.68)
pt3dadd(42.048, 156.312, -11.082, 2.62)
pt3dadd(41.969, 156.401, -11.095, 2.558)
pt3dadd(41.891, 156.491, -11.108, 2.498)
pt3dadd(41.865, 156.558, -11.179, 2.41)
pt3dadd(41.852, 156.62, -11.264, 2.314)
pt3dadd(41.777, 156.637, -11.326, 2.244)
pt3dadd(41.675, 156.632, -11.379, 2.184)
pt3dadd(41.59, 156.686, -11.403, 2.152)
pt3dadd(41.517, 156.781, -11.408, 2.14)
pt3dadd(41.471, 156.884, -11.428, 2.162)
pt3dadd(41.453, 156.995, -11.463, 2.218)
pt3dadd(41.431, 157.108, -11.489, 2.268)
pt3dadd(41.394, 157.222, -11.491, 2.298)
pt3dadd(41.356, 157.336, -11.493, 2.328)
pt3dadd(41.319, 157.448, -11.495, 2.358)
pt3dadd(41.281, 157.564, -11.497, 2.388)
pt3dadd(41.244, 157.678, -11.499, 2.42)
pt3dadd(41.189, 157.782, -11.507, 2.456)
pt3dadd(41.113, 157.871, -11.521, 2.498)
pt3dadd(41.036, 157.962, -11.535, 2.542)
pt3dadd(40.959, 158.053, -11.55, 2.586)
pt3dadd(40.883, 158.143, -11.564, 2.63)
pt3dadd(40.796, 158.213, -11.601, 2.646)
pt3dadd(40.708, 158.279, -11.641, 2.66)
pt3dadd(40.62, 158.345, -11.681, 2.672)
pt3dadd(40.532, 158.41, -11.722, 2.684)
pt3dadd(40.478, 158.492, -11.775, 2.686)
pt3dadd(40.438, 158.58, -11.834, 2.686)
pt3dadd(40.398, 158.669, -11.893, 2.686)
pt3dadd(40.358, 158.758, -11.952, 2.686)
pt3dadd(40.317, 158.849, -12.003, 2.688)
pt3dadd(40.274, 158.951, -12.043, 2.694)
pt3dadd(40.23, 159.054, -12.082, 2.7)
pt3dadd(40.187, 159.156, -12.121, 2.706)
pt3dadd(40.144, 159.257, -12.16, 2.712)
pt3dadd(40.127, 159.37, -12.186, 2.74)
pt3dadd(40.114, 159.487, -12.208, 2.774)
pt3dadd(40.102, 159.602, -12.231, 2.81)
pt3dadd(40.09, 159.719, -12.254, 2.844)
pt3dadd(40.078, 159.835, -12.277, 2.878)
pt3dadd(40.065, 159.952, -12.3, 2.912)
}
apic[20] {pt3dclear()
pt3dadd(40.065, 159.952, -12.3, 2.912)
pt3dadd(40.038, 160.052, -12.3, 2.952)
pt3dadd(40.006, 160.166, -12.3, 2.998)
pt3dadd(39.974, 160.283, -12.3, 3.044)
pt3dadd(39.942, 160.399, -12.3, 3.088)
pt3dadd(39.91, 160.514, -12.3, 3.134)
pt3dadd(39.878, 160.63, -12.3, 3.18)
pt3dadd(39.807, 160.724, -12.3, 3.208)
pt3dadd(39.725, 160.812, -12.3, 3.234)
pt3dadd(39.644, 160.9, -12.3, 3.26)
pt3dadd(39.562, 160.987, -12.3, 3.284)
pt3dadd(39.48, 161.076, -12.3, 3.31)
pt3dadd(39.399, 161.164, -12.3, 3.284)
pt3dadd(39.317, 161.251, -12.3, 3.244)
pt3dadd(39.235, 161.34, -12.3, 3.202)
pt3dadd(39.154, 161.428, -12.3, 3.162)
pt3dadd(39.072, 161.515, -12.3, 3.122)
pt3dadd(38.984, 161.597, -12.3, 3.026)
pt3dadd(38.895, 161.676, -12.3, 2.914)
pt3dadd(38.805, 161.756, -12.3, 2.804)
pt3dadd(38.716, 161.837, -12.3, 2.692)
pt3dadd(38.626, 161.916, -12.3, 2.58)
pt3dadd(38.532, 161.992, -12.3, 2.452)
pt3dadd(38.438, 162.065, -12.3, 2.32)
pt3dadd(38.343, 162.14, -12.3, 2.188)
pt3dadd(38.249, 162.214, -12.3, 2.056)
pt3dadd(38.154, 162.288, -12.3, 1.924)
pt3dadd(38.091, 162.389, -12.3, 1.826)
pt3dadd(38.032, 162.493, -12.3, 1.732)
pt3dadd(37.974, 162.596, -12.3, 1.636)
pt3dadd(37.915, 162.702, -12.3, 1.542)
pt3dadd(37.856, 162.806, -12.3, 1.448)
pt3dadd(37.78, 162.898, -12.3, 1.386)
pt3dadd(37.691, 162.978, -12.3, 1.352)
pt3dadd(37.601, 163.057, -12.3, 1.316)
pt3dadd(37.512, 163.138, -12.3, 1.28)
pt3dadd(37.422, 163.217, -12.3, 1.244)
pt3dadd(37.33, 163.295, -12.3, 1.228)
pt3dadd(37.235, 163.368, -12.3, 1.222)
pt3dadd(37.141, 163.442, -12.3, 1.218)
pt3dadd(37.046, 163.516, -12.3, 1.212)
pt3dadd(36.952, 163.589, -12.3, 1.208)
pt3dadd(36.854, 163.66, -12.3, 1.208)
pt3dadd(36.755, 163.727, -12.3, 1.214)
pt3dadd(36.656, 163.795, -12.3, 1.218)
pt3dadd(36.557, 163.864, -12.3, 1.224)
pt3dadd(36.458, 163.931, -12.3, 1.228)
pt3dadd(36.353, 163.988, -12.3, 1.226)
pt3dadd(36.245, 164.039, -12.3, 1.222)
pt3dadd(36.137, 164.092, -12.3, 1.218)
pt3dadd(36.029, 164.143, -12.3, 1.212)
pt3dadd(35.92, 164.196, -12.3, 1.208)
pt3dadd(35.811, 164.242, -12.308, 1.206)
pt3dadd(35.699, 164.284, -12.322, 1.206)
pt3dadd(35.588, 164.326, -12.336, 1.206)
pt3dadd(35.477, 164.366, -12.35, 1.206)
pt3dadd(35.366, 164.408, -12.364, 1.206)
pt3dadd(35.251, 164.443, -12.374, 1.198)
pt3dadd(35.136, 164.476, -12.383, 1.188)
pt3dadd(35.021, 164.509, -12.392, 1.178)
pt3dadd(34.907, 164.542, -12.4, 1.168)
pt3dadd(34.792, 164.574, -12.409, 1.158)
pt3dadd(34.689, 164.612, -12.448, 1.132)
pt3dadd(34.59, 164.648, -12.495, 1.102)
pt3dadd(34.491, 164.686, -12.542, 1.072)
pt3dadd(34.392, 164.723, -12.589, 1.044)
pt3dadd(34.288, 164.756, -12.63, 0.902)
pt3dadd(34.204, 164.777, -12.698, 0.83)
pt3dadd(34.122, 164.797, -12.767, 0.778)
pt3dadd(34.003, 164.812, -12.778, 0.786)
pt3dadd(33.884, 164.824, -12.789, 0.796)
pt3dadd(33.766, 164.838, -12.8, 0.804)
pt3dadd(33.647, 164.827, -12.8, 0.828)
pt3dadd(33.527, 164.814, -12.8, 0.852)
pt3dadd(33.408, 164.802, -12.8, 0.878)
pt3dadd(33.288, 164.8, -12.8, 0.894)
pt3dadd(33.168, 164.8, -12.8, 0.912)
pt3dadd(33.048, 164.797, -12.8, 0.928)
pt3dadd(32.928, 164.797, -12.8, 0.944)
pt3dadd(32.831, 164.836, -12.8, 0.962)
pt3dadd(32.774, 164.94, -12.8, 0.984)
pt3dadd(32.712, 165.04, -12.8, 1.006)
pt3dadd(32.595, 165.067, -12.8, 1.038)
pt3dadd(32.478, 165.095, -12.8, 1.07)
pt3dadd(32.36, 165.118, -12.8, 1.124)
pt3dadd(32.242, 165.138, -12.8, 1.186)
pt3dadd(32.124, 165.15, -12.8, 1.24)
pt3dadd(32.004, 165.137, -12.8, 1.274)
pt3dadd(31.885, 165.125, -12.8, 1.308)
pt3dadd(31.766, 165.121, -12.8, 1.33)
pt3dadd(31.648, 165.142, -12.8, 1.33)
pt3dadd(31.57, 165.22, -12.8, 1.288)
pt3dadd(31.513, 165.324, -12.8, 1.222)
pt3dadd(31.432, 165.392, -12.8, 1.162)
pt3dadd(31.313, 165.401, -12.8, 1.114)
pt3dadd(31.193, 165.409, -12.8, 1.066)
pt3dadd(31.073, 165.404, -12.8, 1.042)
pt3dadd(30.953, 165.397, -12.8, 1.024)
pt3dadd(30.834, 165.389, -12.8, 1.006)
pt3dadd(30.714, 165.377, -12.795, 1.058)
pt3dadd(30.595, 165.364, -12.79, 1.116)
pt3dadd(30.482, 165.39, -12.803, 1.13)
pt3dadd(30.37, 165.427, -12.822, 1.13)
pt3dadd(30.258, 165.463, -12.84, 1.13)
pt3dadd(30.146, 165.502, -12.859, 1.13)
pt3dadd(30.034, 165.538, -12.877, 1.13)
pt3dadd(29.922, 165.576, -12.896, 1.13)
pt3dadd(29.81, 165.612, -12.914, 1.13)
pt3dadd(29.698, 165.65, -12.933, 1.13)
pt3dadd(29.586, 165.686, -12.951, 1.13)
pt3dadd(29.474, 165.724, -12.97, 1.13)
pt3dadd(29.362, 165.761, -12.988, 1.13)
pt3dadd(29.25, 165.798, -13.007, 1.13)
pt3dadd(29.138, 165.835, -13.025, 1.13)
pt3dadd(29.026, 165.872, -13.044, 1.13)
pt3dadd(28.915, 165.908, -13.062, 1.13)
pt3dadd(28.803, 165.947, -13.081, 1.13)
pt3dadd(28.691, 165.983, -13.099, 1.13)
pt3dadd(28.579, 166.021, -13.118, 1.13)
pt3dadd(28.467, 166.057, -13.136, 1.13)
pt3dadd(28.355, 166.096, -13.155, 1.13)
pt3dadd(28.243, 166.133, -13.173, 1.13)
pt3dadd(28.131, 166.169, -13.192, 1.13)
pt3dadd(28.022, 166.217, -13.2, 1.11)
pt3dadd(27.916, 166.272, -13.2, 1.076)
pt3dadd(27.809, 166.327, -13.2, 1.04)
pt3dadd(27.702, 166.382, -13.2, 1.006)
pt3dadd(27.596, 166.438, -13.2, 0.972)
pt3dadd(27.484, 166.475, -13.207, 0.944)
pt3dadd(27.367, 166.496, -13.22, 0.924)
pt3dadd(27.25, 166.518, -13.233, 0.906)
pt3dadd(27.133, 166.54, -13.245, 0.886)
pt3dadd(27.016, 166.561, -13.258, 0.866)
pt3dadd(26.904, 166.595, -13.277, 0.848)
pt3dadd(26.803, 166.649, -13.305, 0.83)
pt3dadd(26.702, 166.703, -13.333, 0.812)
pt3dadd(26.6, 166.758, -13.361, 0.796)
pt3dadd(26.498, 166.812, -13.389, 0.778)
pt3dadd(26.38, 166.834, -13.394, 0.79)
}
}
proc shape3d_104() {
apic[20] { pt3dadd(26.263, 166.855, -13.399, 0.8)
pt3dadd(26.145, 166.882, -13.4, 0.834)
pt3dadd(26.029, 166.909, -13.4, 0.876)
pt3dadd(25.924, 166.943, -13.422, 0.928)
pt3dadd(25.843, 166.988, -13.485, 1)
pt3dadd(25.777, 167.006, -13.563, 1.05)
pt3dadd(25.72, 167.006, -13.651, 1.086)
pt3dadd(25.651, 167.003, -13.732, 1.12)
pt3dadd(25.567, 166.996, -13.802, 1.156)
pt3dadd(25.48, 167.028, -13.866, 1.174)
pt3dadd(25.393, 167.06, -13.93, 1.192)
pt3dadd(25.307, 167.093, -13.993, 1.21)
pt3dadd(25.22, 167.125, -14.057, 1.228)
pt3dadd(25.122, 167.159, -14.106, 1.25)
pt3dadd(25.021, 167.191, -14.153, 1.274)
pt3dadd(24.92, 167.226, -14.2, 1.298)
pt3dadd(24.82, 167.258, -14.247, 1.32)
pt3dadd(24.719, 167.282, -14.297, 1.34)
pt3dadd(24.618, 167.299, -14.349, 1.358)
pt3dadd(24.517, 167.316, -14.401, 1.374)
pt3dadd(24.416, 167.332, -14.454, 1.392)
pt3dadd(24.325, 167.352, -14.51, 1.408)
pt3dadd(24.313, 167.407, -14.598, 1.432)
pt3dadd(24.301, 167.464, -14.686, 1.456)
pt3dadd(24.205, 167.531, -14.694, 1.504)
pt3dadd(24.106, 167.598, -14.7, 1.552)
pt3dadd(23.994, 167.642, -14.7, 1.64)
pt3dadd(23.882, 167.684, -14.7, 1.73)
pt3dadd(23.77, 167.728, -14.7, 1.834)
pt3dadd(23.658, 167.768, -14.7, 1.946)
pt3dadd(23.55, 167.821, -14.7, 2.088)
pt3dadd(23.449, 167.885, -14.7, 2.26)
pt3dadd(23.343, 167.94, -14.7, 2.296)
pt3dadd(23.236, 167.995, -14.7, 2.33)
pt3dadd(23.13, 168.05, -14.7, 2.366)
pt3dadd(23.023, 168.106, -14.7, 2.4)
pt3dadd(22.916, 168.161, -14.7, 2.434)
pt3dadd(22.81, 168.216, -14.7, 2.45)
pt3dadd(22.703, 168.271, -14.7, 2.466)
pt3dadd(22.597, 168.326, -14.7, 2.48)
pt3dadd(22.49, 168.382, -14.7, 2.496)
pt3dadd(22.383, 168.437, -14.7, 2.51)
pt3dadd(22.313, 168.533, -14.7, 2.498)
pt3dadd(22.245, 168.632, -14.7, 2.484)
pt3dadd(22.177, 168.731, -14.7, 2.468)
pt3dadd(22.11, 168.83, -14.7, 2.454)
pt3dadd(22.042, 168.93, -14.7, 2.44)
pt3dadd(21.96, 169.016, -14.7, 2.42)
pt3dadd(21.873, 169.099, -14.7, 2.4)
pt3dadd(21.786, 169.181, -14.7, 2.38)
pt3dadd(21.699, 169.264, -14.7, 2.36)
pt3dadd(21.612, 169.348, -14.7, 2.34)
pt3dadd(21.516, 169.418, -14.7, 2.328)
pt3dadd(21.417, 169.487, -14.7, 2.318)
pt3dadd(21.318, 169.554, -14.7, 2.308)
pt3dadd(21.219, 169.621, -14.7, 2.298)
pt3dadd(21.12, 169.69, -14.7, 2.286)
pt3dadd(21.006, 169.721, -14.7, 2.292)
pt3dadd(20.888, 169.745, -14.7, 2.302)
pt3dadd(20.771, 169.769, -14.7, 2.31)
pt3dadd(20.653, 169.792, -14.7, 2.32)
pt3dadd(20.535, 169.816, -14.7, 2.328)
pt3dadd(20.418, 169.842, -14.7, 2.332)
pt3dadd(20.304, 169.878, -14.7, 2.324)
pt3dadd(20.189, 169.914, -14.7, 2.314)
pt3dadd(20.075, 169.95, -14.7, 2.304)
pt3dadd(19.96, 169.986, -14.7, 2.296)
pt3dadd(19.845, 170.021, -14.7, 2.286)
pt3dadd(19.74, 170.077, -14.7, 2.268)
pt3dadd(19.635, 170.136, -14.7, 2.246)
pt3dadd(19.53, 170.195, -14.7, 2.228)
pt3dadd(19.425, 170.254, -14.7, 2.208)
pt3dadd(19.32, 170.311, -14.7, 2.188)
pt3dadd(19.223, 170.381, -14.7, 2.166)
pt3dadd(19.126, 170.453, -14.7, 2.146)
pt3dadd(19.029, 170.522, -14.7, 2.126)
pt3dadd(18.932, 170.593, -14.7, 2.106)
pt3dadd(18.835, 170.664, -14.7, 2.086)
pt3dadd(18.718, 170.686, -14.7, 2.096)
pt3dadd(18.6, 170.705, -14.7, 2.11)
pt3dadd(18.481, 170.723, -14.7, 2.122)
pt3dadd(18.363, 170.74, -14.7, 2.136)
pt3dadd(18.244, 170.759, -14.7, 2.15)
pt3dadd(18.128, 170.784, -14.7, 2.162)
pt3dadd(18.023, 170.842, -14.7, 2.178)
pt3dadd(17.918, 170.9, -14.7, 2.192)
pt3dadd(17.813, 170.959, -14.7, 2.208)
pt3dadd(17.709, 171.018, -14.7, 2.222)
pt3dadd(17.607, 171.078, -14.706, 2.234)
pt3dadd(17.522, 171.152, -14.74, 2.228)
pt3dadd(17.438, 171.227, -14.775, 2.222)
pt3dadd(17.353, 171.301, -14.809, 2.216)
pt3dadd(17.268, 171.376, -14.844, 2.21)
pt3dadd(17.159, 171.404, -14.878, 2.172)
pt3dadd(17.05, 171.431, -14.912, 2.134)
pt3dadd(16.941, 171.458, -14.947, 2.094)
pt3dadd(16.831, 171.484, -14.981, 2.056)
pt3dadd(16.725, 171.528, -15, 2.018)
pt3dadd(16.625, 171.593, -15, 1.982)
pt3dadd(16.523, 171.658, -15, 1.948)
pt3dadd(16.422, 171.722, -15, 1.912)
pt3dadd(16.321, 171.787, -15, 1.876)
pt3dadd(16.214, 171.838, -15, 1.838)
pt3dadd(16.099, 171.872, -15, 1.794)
pt3dadd(15.987, 171.911, -15.008, 1.758)
pt3dadd(15.892, 171.961, -15.052, 1.758)
pt3dadd(15.799, 171.998, -15.104, 1.768)
pt3dadd(15.711, 172.018, -15.169, 1.796)
pt3dadd(15.654, 172.045, -15.249, 1.808)
pt3dadd(15.624, 172.082, -15.341, 1.808)
pt3dadd(15.553, 172.103, -15.404, 1.798)
pt3dadd(15.439, 172.105, -15.434, 1.778)
pt3dadd(15.325, 172.108, -15.464, 1.756)
pt3dadd(15.211, 172.11, -15.495, 1.736)
pt3dadd(15.143, 172.199, -15.5, 1.678)
pt3dadd(15.086, 172.303, -15.5, 1.612)
pt3dadd(14.999, 172.375, -15.5, 1.582)
pt3dadd(14.881, 172.386, -15.5, 1.604)
pt3dadd(14.761, 172.387, -15.5, 1.632)
pt3dadd(14.641, 172.391, -15.5, 1.66)
pt3dadd(14.521, 172.392, -15.5, 1.688)
pt3dadd(14.401, 172.396, -15.5, 1.716)
pt3dadd(14.281, 172.397, -15.5, 1.744)
pt3dadd(14.161, 172.396, -15.5, 1.782)
pt3dadd(14.041, 172.387, -15.5, 1.826)
pt3dadd(13.922, 172.381, -15.5, 1.872)
pt3dadd(13.802, 172.375, -15.5, 1.916)
pt3dadd(13.682, 172.368, -15.5, 1.962)
pt3dadd(13.562, 172.362, -15.5, 2.006)
pt3dadd(13.442, 172.355, -15.5, 2.052)
pt3dadd(13.324, 172.374, -15.5, 2.078)
pt3dadd(13.207, 172.398, -15.5, 2.1)
pt3dadd(13.089, 172.422, -15.5, 2.124)
pt3dadd(12.971, 172.446, -15.5, 2.146)
pt3dadd(12.854, 172.469, -15.5, 2.168)
pt3dadd(12.736, 172.486, -15.501, 2.18)
pt3dadd(12.616, 172.482, -15.507, 2.16)
pt3dadd(12.496, 172.477, -15.512, 2.14)
pt3dadd(12.376, 172.474, -15.517, 2.12)
pt3dadd(12.257, 172.469, -15.523, 2.1)
pt3dadd(12.137, 172.465, -15.528, 2.08)
}
dend_5 {pt3dclear()
pt3dadd(12.137, 172.465, -15.528, 2.08)
pt3dadd(12.017, 172.46, -15.533, 2.06)
}
dend_5[1] {pt3dclear()
pt3dadd(12.017, 172.46, -15.533, 2.06)
pt3dadd(11.972, 172.464, -15.538, 2.044)
pt3dadd(11.853, 172.47, -15.55, 2.004)
pt3dadd(11.734, 172.477, -15.562, 1.962)
pt3dadd(11.615, 172.484, -15.574, 1.922)
pt3dadd(11.496, 172.49, -15.586, 1.88)
pt3dadd(11.377, 172.498, -15.598, 1.84)
pt3dadd(11.258, 172.488, -15.6, 1.822)
pt3dadd(11.139, 172.476, -15.6, 1.806)
pt3dadd(11.019, 172.464, -15.6, 1.792)
pt3dadd(10.9, 172.451, -15.6, 1.778)
pt3dadd(10.781, 172.439, -15.6, 1.764)
pt3dadd(10.661, 172.426, -15.6, 1.75)
pt3dadd(10.542, 172.414, -15.6, 1.736)
pt3dadd(10.422, 172.417, -15.6, 1.746)
pt3dadd(10.303, 172.424, -15.6, 1.762)
pt3dadd(10.183, 172.432, -15.6, 1.78)
pt3dadd(10.063, 172.439, -15.6, 1.796)
pt3dadd(9.943, 172.446, -15.6, 1.812)
pt3dadd(9.823, 172.453, -15.6, 1.828)
pt3dadd(9.706, 172.477, -15.6, 1.85)
pt3dadd(9.59, 172.506, -15.6, 1.874)
pt3dadd(9.474, 172.536, -15.6, 1.896)
pt3dadd(9.357, 172.566, -15.6, 1.92)
pt3dadd(9.241, 172.596, -15.6, 1.942)
pt3dadd(9.124, 172.613, -15.6, 1.964)
pt3dadd(9.004, 172.603, -15.6, 1.978)
pt3dadd(8.885, 172.592, -15.6, 1.992)
pt3dadd(8.765, 172.582, -15.6, 2.006)
pt3dadd(8.646, 172.571, -15.6, 2.022)
pt3dadd(8.526, 172.56, -15.6, 2.036)
pt3dadd(8.407, 172.549, -15.6, 2.05)
pt3dadd(8.287, 172.547, -15.6, 2.062)
pt3dadd(8.167, 172.554, -15.6, 2.07)
pt3dadd(8.048, 172.561, -15.6, 2.078)
pt3dadd(7.928, 172.568, -15.6, 2.088)
pt3dadd(7.808, 172.574, -15.6, 2.096)
pt3dadd(7.688, 172.583, -15.6, 2.104)
pt3dadd(7.568, 172.59, -15.6, 2.114)
pt3dadd(7.449, 172.597, -15.6, 2.132)
pt3dadd(7.329, 172.604, -15.6, 2.148)
pt3dadd(7.209, 172.612, -15.6, 2.164)
pt3dadd(7.089, 172.619, -15.6, 2.18)
pt3dadd(6.97, 172.626, -15.6, 2.198)
pt3dadd(6.85, 172.633, -15.6, 2.214)
pt3dadd(6.73, 172.64, -15.6, 2.23)
pt3dadd(6.61, 172.648, -15.6, 2.246)
pt3dadd(6.49, 172.655, -15.6, 2.264)
pt3dadd(6.371, 172.663, -15.6, 2.28)
pt3dadd(6.251, 172.669, -15.6, 2.296)
pt3dadd(6.131, 172.678, -15.601, 2.312)
pt3dadd(6.012, 172.685, -15.607, 2.33)
pt3dadd(5.892, 172.693, -15.612, 2.348)
pt3dadd(5.773, 172.703, -15.618, 2.366)
pt3dadd(5.653, 172.71, -15.624, 2.382)
pt3dadd(5.534, 172.718, -15.63, 2.4)
pt3dadd(5.415, 172.728, -15.641, 2.414)
}
}
proc shape3d_105() {
dend_5[1] { pt3dadd(5.297, 172.734, -15.66, 2.424)
pt3dadd(5.18, 172.742, -15.679, 2.434)
pt3dadd(5.062, 172.751, -15.697, 2.442)
pt3dadd(4.945, 172.759, -15.716, 2.452)
pt3dadd(4.827, 172.766, -15.736, 2.462)
pt3dadd(4.713, 172.759, -15.765, 2.472)
pt3dadd(4.598, 172.753, -15.794, 2.484)
pt3dadd(4.479, 172.753, -15.8, 2.494)
pt3dadd(4.359, 172.756, -15.8, 2.502)
pt3dadd(4.24, 172.759, -15.802, 2.514)
pt3dadd(4.126, 172.788, -15.824, 2.538)
pt3dadd(4.014, 172.813, -15.848, 2.56)
pt3dadd(3.969, 172.808, -15.94, 2.55)
pt3dadd(3.923, 172.804, -16.033, 2.538)
pt3dadd(3.825, 172.793, -16.076, 2.444)
pt3dadd(3.711, 172.784, -16.106, 2.326)
pt3dadd(3.604, 172.8, -16.149, 2.254)
pt3dadd(3.497, 172.814, -16.193, 2.184)
pt3dadd(3.391, 172.83, -16.237, 2.112)
pt3dadd(3.284, 172.844, -16.28, 2.042)
pt3dadd(3.17, 172.856, -16.3, 1.986)
pt3dadd(3.05, 172.862, -16.3, 1.944)
pt3dadd(2.93, 172.871, -16.3, 1.904)
pt3dadd(2.81, 172.877, -16.3, 1.862)
pt3dadd(2.69, 172.885, -16.3, 1.822)
pt3dadd(2.571, 172.892, -16.3, 1.78)
pt3dadd(2.451, 172.89, -16.3, 1.748)
pt3dadd(2.332, 172.878, -16.3, 1.726)
pt3dadd(2.212, 172.865, -16.3, 1.704)
pt3dadd(2.093, 172.853, -16.3, 1.684)
pt3dadd(1.974, 172.84, -16.3, 1.662)
pt3dadd(1.854, 172.828, -16.3, 1.64)
pt3dadd(1.735, 172.814, -16.3, 1.618)
pt3dadd(1.616, 172.802, -16.3, 1.598)
pt3dadd(1.496, 172.79, -16.3, 1.576)
pt3dadd(1.377, 172.777, -16.3, 1.554)
pt3dadd(1.258, 172.765, -16.3, 1.532)
pt3dadd(1.138, 172.752, -16.3, 1.512)
pt3dadd(1.019, 172.74, -16.3, 1.49)
pt3dadd(0.9, 172.727, -16.3, 1.468)
pt3dadd(0.78, 172.715, -16.3, 1.438)
pt3dadd(0.661, 172.702, -16.3, 1.398)
pt3dadd(0.542, 172.69, -16.3, 1.36)
pt3dadd(0.422, 172.676, -16.3, 1.32)
pt3dadd(0.303, 172.664, -16.3, 1.28)
pt3dadd(0.184, 172.652, -16.3, 1.24)
pt3dadd(0.064, 172.639, -16.3, 1.202)
pt3dadd(-0.055, 172.627, -16.3, 1.164)
pt3dadd(-0.174, 172.614, -16.3, 1.128)
pt3dadd(-0.294, 172.602, -16.3, 1.092)
pt3dadd(-0.413, 172.589, -16.3, 1.056)
pt3dadd(-0.532, 172.577, -16.3, 1.02)
pt3dadd(-0.652, 172.564, -16.3, 0.984)
pt3dadd(-0.771, 172.552, -16.3, 0.948)
pt3dadd(-0.885, 172.538, -16.32, 0.914)
pt3dadd(-0.992, 172.525, -16.363, 0.88)
pt3dadd(-1.1, 172.511, -16.406, 0.846)
pt3dadd(-1.207, 172.498, -16.449, 0.812)
pt3dadd(-1.315, 172.483, -16.492, 0.778)
pt3dadd(-1.411, 172.456, -16.541, 0.744)
pt3dadd(-1.481, 172.394, -16.604, 0.716)
pt3dadd(-1.564, 172.333, -16.653, 0.688)
pt3dadd(-1.659, 172.272, -16.688, 0.662)
pt3dadd(-1.768, 172.236, -16.7, 0.646)
pt3dadd(-1.885, 172.207, -16.7, 0.638)
pt3dadd(-2.002, 172.181, -16.7, 0.628)
pt3dadd(-2.121, 172.169, -16.7, 0.628)
pt3dadd(-2.241, 172.156, -16.7, 0.628)
pt3dadd(-2.36, 172.144, -16.7, 0.628)
pt3dadd(-2.479, 172.13, -16.7, 0.666)
pt3dadd(-2.599, 172.118, -16.7, 0.702)
pt3dadd(-2.718, 172.105, -16.702, 0.722)
pt3dadd(-2.837, 172.093, -16.703, 0.74)
pt3dadd(-2.957, 172.08, -16.705, 0.758)
pt3dadd(-3.076, 172.068, -16.706, 0.776)
pt3dadd(-3.195, 172.055, -16.708, 0.794)
pt3dadd(-3.315, 172.043, -16.71, 0.812)
pt3dadd(-3.434, 172.031, -16.713, 0.83)
pt3dadd(-3.551, 172.018, -16.734, 0.848)
pt3dadd(-3.667, 172.006, -16.754, 0.864)
pt3dadd(-3.784, 171.994, -16.775, 0.882)
pt3dadd(-3.901, 171.982, -16.796, 0.898)
pt3dadd(-4.018, 171.968, -16.817, 0.916)
pt3dadd(-4.134, 171.956, -16.84, 0.932)
pt3dadd(-4.246, 171.944, -16.873, 0.942)
pt3dadd(-4.359, 171.934, -16.906, 0.952)
pt3dadd(-4.45, 171.924, -16.968, 0.924)
pt3dadd(-4.538, 171.914, -17.037, 0.888)
pt3dadd(-4.621, 171.906, -17.108, 0.844)
pt3dadd(-4.702, 171.898, -17.181, 0.798)
pt3dadd(-4.74, 171.871, -17.267, 0.758)
pt3dadd(-4.748, 171.834, -17.362, 0.724)
pt3dadd(-4.779, 171.787, -17.445, 0.7)
pt3dadd(-4.851, 171.726, -17.506, 0.692)
pt3dadd(-4.923, 171.662, -17.567, 0.682)
pt3dadd(-5.003, 171.595, -17.611, 0.678)
pt3dadd(-5.094, 171.523, -17.634, 0.678)
pt3dadd(-5.181, 171.485, -17.683, 0.678)
pt3dadd(-5.266, 171.475, -17.754, 0.678)
pt3dadd(-5.35, 171.467, -17.824, 0.678)
pt3dadd(-5.423, 171.46, -17.904, 0.67)
pt3dadd(-5.49, 171.452, -17.986, 0.658)
pt3dadd(-5.572, 171.444, -18.057, 0.634)
pt3dadd(-5.682, 171.432, -18.095, 0.618)
pt3dadd(-5.794, 171.42, -18.128, 0.608)
pt3dadd(-5.888, 171.401, -18.181, 0.61)
pt3dadd(-5.961, 171.371, -18.257, 0.622)
pt3dadd(-6.036, 171.316, -18.314, 0.628)
pt3dadd(-6.112, 171.24, -18.359, 0.628)
pt3dadd(-6.169, 171.157, -18.413, 0.616)
pt3dadd(-6.224, 171.076, -18.47, 0.602)
pt3dadd(-6.307, 171.005, -18.511, 0.584)
pt3dadd(-6.389, 170.932, -18.552, 0.568)
pt3dadd(-6.475, 170.866, -18.592, 0.552)
pt3dadd(-6.587, 170.855, -18.625, 0.552)
pt3dadd(-6.7, 170.843, -18.658, 0.552)
pt3dadd(-6.814, 170.831, -18.687, 0.622)
pt3dadd(-6.931, 170.818, -18.71, 0.666)
pt3dadd(-7.047, 170.806, -18.732, 0.706)
pt3dadd(-7.134, 170.797, -18.784, 0.746)
pt3dadd(-7.179, 170.792, -18.876, 0.79)
pt3dadd(-7.235, 170.786, -18.958, 0.832)
pt3dadd(-7.353, 170.774, -18.975, 0.85)
pt3dadd(-7.47, 170.761, -18.992, 0.87)
pt3dadd(-7.588, 170.747, -19, 0.884)
pt3dadd(-7.707, 170.729, -19, 0.892)
pt3dadd(-7.826, 170.712, -19, 0.9)
pt3dadd(-7.936, 170.669, -19.005, 0.916)
pt3dadd(-8.043, 170.62, -19.014, 0.93)
pt3dadd(-8.16, 170.599, -19.029, 0.934)
pt3dadd(-8.277, 170.581, -19.045, 0.938)
pt3dadd(-8.394, 170.562, -19.06, 0.942)
pt3dadd(-8.511, 170.543, -19.075, 0.948)
pt3dadd(-8.628, 170.524, -19.09, 0.952)
pt3dadd(-8.746, 170.507, -19.1, 0.954)
pt3dadd(-8.866, 170.494, -19.1, 0.954)
pt3dadd(-8.985, 170.482, -19.1, 0.954)
pt3dadd(-9.104, 170.47, -19.1, 0.954)
pt3dadd(-9.224, 170.456, -19.1, 0.954)
pt3dadd(-9.343, 170.444, -19.1, 0.954)
pt3dadd(-9.462, 170.431, -19.1, 0.954)
pt3dadd(-9.582, 170.419, -19.1, 0.952)
pt3dadd(-9.701, 170.406, -19.1, 0.944)
pt3dadd(-9.82, 170.394, -19.1, 0.938)
pt3dadd(-9.94, 170.381, -19.1, 0.93)
pt3dadd(-10.059, 170.369, -19.1, 0.922)
pt3dadd(-10.178, 170.356, -19.1, 0.916)
pt3dadd(-10.298, 170.344, -19.1, 0.908)
pt3dadd(-10.416, 170.327, -19.1, 0.9)
pt3dadd(-10.534, 170.302, -19.1, 0.888)
pt3dadd(-10.651, 170.276, -19.1, 0.876)
pt3dadd(-10.768, 170.252, -19.1, 0.864)
pt3dadd(-10.886, 170.226, -19.1, 0.852)
pt3dadd(-11.003, 170.202, -19.1, 0.84)
pt3dadd(-11.12, 170.177, -19.1, 0.828)
pt3dadd(-11.226, 170.12, -19.102, 0.82)
pt3dadd(-11.332, 170.064, -19.104, 0.81)
pt3dadd(-11.438, 170.006, -19.106, 0.8)
pt3dadd(-11.544, 169.951, -19.108, 0.79)
pt3dadd(-11.649, 169.894, -19.111, 0.782)
pt3dadd(-11.759, 169.864, -19.135, 0.778)
pt3dadd(-11.87, 169.843, -19.169, 0.778)
pt3dadd(-11.981, 169.824, -19.203, 0.778)
pt3dadd(-12.092, 169.805, -19.237, 0.778)
pt3dadd(-12.203, 169.784, -19.271, 0.778)
pt3dadd(-12.316, 169.76, -19.29, 0.788)
pt3dadd(-12.432, 169.727, -19.292, 0.81)
pt3dadd(-12.548, 169.696, -19.293, 0.83)
pt3dadd(-12.663, 169.663, -19.295, 0.852)
pt3dadd(-12.779, 169.631, -19.297, 0.872)
pt3dadd(-12.894, 169.597, -19.299, 0.894)
pt3dadd(-13.012, 169.576, -19.3, 0.92)
pt3dadd(-13.131, 169.564, -19.3, 0.952)
pt3dadd(-13.25, 169.55, -19.3, 0.984)
pt3dadd(-13.37, 169.538, -19.3, 1.016)
pt3dadd(-13.489, 169.525, -19.3, 1.05)
pt3dadd(-13.608, 169.513, -19.3, 1.082)
pt3dadd(-13.728, 169.5, -19.3, 1.114)
pt3dadd(-13.847, 169.488, -19.302, 1.174)
pt3dadd(-13.966, 169.475, -19.306, 1.26)
pt3dadd(-14.085, 169.463, -19.31, 1.348)
pt3dadd(-14.201, 169.451, -19.331, 1.414)
pt3dadd(-14.313, 169.439, -19.364, 1.466)
pt3dadd(-14.422, 169.428, -19.403, 1.506)
pt3dadd(-14.521, 169.417, -19.46, 1.506)
pt3dadd(-14.615, 169.408, -19.52, 1.504)
pt3dadd(-14.676, 169.4, -19.606, 1.47)
pt3dadd(-14.736, 169.394, -19.692, 1.434)
pt3dadd(-14.839, 169.384, -19.741, 1.42)
pt3dadd(-14.945, 169.373, -19.785, 1.406)
pt3dadd(-15.052, 169.361, -19.83, 1.392)
pt3dadd(-15.161, 169.35, -19.869, 1.38)
pt3dadd(-15.279, 169.337, -19.881, 1.37)
pt3dadd(-15.398, 169.325, -19.894, 1.36)
pt3dadd(-15.517, 169.313, -19.9, 1.368)
pt3dadd(-15.627, 169.292, -19.925, 1.386)
pt3dadd(-15.727, 169.265, -19.974, 1.398)
pt3dadd(-15.827, 169.236, -20.024, 1.408)
pt3dadd(-15.927, 169.208, -20.074, 1.418)
pt3dadd(-16.028, 169.182, -20.124, 1.43)
}
}
proc shape3d_106() {
dend_5[1] { pt3dadd(-16.106, 169.108, -20.164, 1.454)
pt3dadd(-16.181, 169.026, -20.2, 1.482)
pt3dadd(-16.278, 168.955, -20.2, 1.47)
pt3dadd(-16.374, 168.883, -20.2, 1.458)
pt3dadd(-16.49, 168.858, -20.2, 1.412)
pt3dadd(-16.608, 168.84, -20.2, 1.36)
pt3dadd(-16.727, 168.823, -20.2, 1.308)
pt3dadd(-16.846, 168.811, -20.2, 1.234)
pt3dadd(-16.966, 168.798, -20.2, 1.158)
pt3dadd(-17.085, 168.786, -20.2, 1.084)
pt3dadd(-17.202, 168.773, -20.219, 0.954)
pt3dadd(-17.309, 168.762, -20.253, 0.846)
pt3dadd(-17.383, 168.755, -20.331, 0.81)
pt3dadd(-17.461, 168.746, -20.405, 0.782)
pt3dadd(-17.568, 168.734, -20.45, 0.804)
pt3dadd(-17.675, 168.724, -20.495, 0.826)
pt3dadd(-17.793, 168.712, -20.5, 0.872)
pt3dadd(-17.912, 168.698, -20.5, 0.922)
pt3dadd(-18.031, 168.686, -20.5, 0.974)
pt3dadd(-18.151, 168.673, -20.5, 1.002)
pt3dadd(-18.27, 168.661, -20.5, 1.026)
pt3dadd(-18.389, 168.648, -20.5, 1.052)
pt3dadd(-18.509, 168.636, -20.5, 1.044)
pt3dadd(-18.628, 168.624, -20.5, 1.032)
pt3dadd(-18.747, 168.611, -20.504, 1.014)
pt3dadd(-18.867, 168.599, -20.509, 0.994)
pt3dadd(-18.986, 168.586, -20.514, 0.976)
pt3dadd(-19.105, 168.574, -20.519, 0.956)
pt3dadd(-19.224, 168.56, -20.524, 0.938)
pt3dadd(-19.343, 168.548, -20.529, 0.92)
pt3dadd(-19.461, 168.536, -20.54, 0.894)
pt3dadd(-19.574, 168.524, -20.573, 0.84)
pt3dadd(-19.686, 168.512, -20.606, 0.786)
pt3dadd(-19.799, 168.5, -20.639, 0.752)
pt3dadd(-19.912, 168.488, -20.672, 0.72)
pt3dadd(-20.025, 168.466, -20.691, 0.704)
pt3dadd(-20.141, 168.433, -20.696, 0.704)
pt3dadd(-20.255, 168.4, -20.7, 0.704)
pt3dadd(-20.289, 168.283, -20.7, 0.726)
pt3dadd(-20.324, 168.169, -20.7, 0.746)
pt3dadd(-20.41, 168.097, -20.7, 0.8)
pt3dadd(-20.517, 168.043, -20.7, 0.856)
pt3dadd(-20.624, 167.99, -20.7, 0.87)
pt3dadd(-20.732, 167.936, -20.7, 0.884)
pt3dadd(-20.839, 167.884, -20.7, 0.898)
pt3dadd(-20.947, 167.831, -20.7, 0.912)
pt3dadd(-21.055, 167.777, -20.7, 0.926)
pt3dadd(-21.148, 167.704, -20.7, 0.932)
pt3dadd(-21.236, 167.622, -20.7, 0.938)
pt3dadd(-21.324, 167.54, -20.7, 0.942)
pt3dadd(-21.412, 167.459, -20.7, 0.948)
pt3dadd(-21.5, 167.377, -20.7, 0.952)
pt3dadd(-21.601, 167.315, -20.7, 0.944)
pt3dadd(-21.707, 167.257, -20.7, 0.93)
pt3dadd(-21.813, 167.202, -20.7, 0.916)
pt3dadd(-21.919, 167.146, -20.7, 0.902)
pt3dadd(-22.026, 167.09, -20.7, 0.888)
pt3dadd(-22.136, 167.047, -20.7, 0.87)
pt3dadd(-22.255, 167.029, -20.7, 0.844)
pt3dadd(-22.373, 167.012, -20.7, 0.818)
pt3dadd(-22.486, 166.978, -20.7, 0.804)
pt3dadd(-22.591, 166.92, -20.7, 0.804)
pt3dadd(-22.687, 166.854, -20.7, 0.81)
pt3dadd(-22.73, 166.742, -20.7, 0.854)
pt3dadd(-22.772, 166.628, -20.7, 0.9)
pt3dadd(-22.783, 166.511, -20.7, 0.94)
pt3dadd(-22.791, 166.391, -20.7, 0.978)
pt3dadd(-22.829, 166.291, -20.7, 1.004)
pt3dadd(-22.936, 166.237, -20.7, 1.004)
pt3dadd(-23.007, 166.148, -20.717, 0.992)
pt3dadd(-23.066, 166.046, -20.74, 0.974)
pt3dadd(-23.126, 165.947, -20.763, 0.958)
pt3dadd(-23.185, 165.846, -20.785, 0.94)
pt3dadd(-23.257, 165.755, -20.8, 0.916)
pt3dadd(-23.354, 165.683, -20.8, 0.882)
pt3dadd(-23.451, 165.613, -20.8, 0.856)
pt3dadd(-23.547, 165.541, -20.8, 0.868)
pt3dadd(-23.644, 165.47, -20.8, 0.878)
pt3dadd(-23.723, 165.38, -20.8, 0.914)
pt3dadd(-23.802, 165.29, -20.8, 0.948)
pt3dadd(-23.857, 165.184, -20.8, 0.994)
pt3dadd(-23.906, 165.076, -20.8, 1.038)
pt3dadd(-23.92, 164.959, -20.8, 1.098)
pt3dadd(-23.914, 164.839, -20.8, 1.164)
pt3dadd(-23.945, 164.725, -20.8, 1.206)
pt3dadd(-23.987, 164.611, -20.8, 1.24)
pt3dadd(-24.029, 164.5, -20.8, 1.274)
pt3dadd(-24.071, 164.387, -20.8, 1.306)
pt3dadd(-24.113, 164.275, -20.8, 1.34)
pt3dadd(-24.145, 164.16, -20.8, 1.374)
pt3dadd(-24.169, 164.042, -20.8, 1.404)
pt3dadd(-24.193, 163.924, -20.8, 1.436)
pt3dadd(-24.216, 163.807, -20.8, 1.468)
pt3dadd(-24.24, 163.69, -20.8, 1.5)
pt3dadd(-24.264, 163.572, -20.8, 1.53)
pt3dadd(-24.269, 163.452, -20.8, 1.532)
pt3dadd(-24.274, 163.332, -20.8, 1.532)
pt3dadd(-24.279, 163.212, -20.8, 1.532)
pt3dadd(-24.284, 163.092, -20.8, 1.532)
pt3dadd(-24.289, 162.972, -20.8, 1.532)
pt3dadd(-24.293, 162.853, -20.8, 1.532)
pt3dadd(-24.338, 162.743, -20.8, 1.504)
pt3dadd(-24.393, 162.636, -20.8, 1.47)
pt3dadd(-24.448, 162.53, -20.8, 1.436)
pt3dadd(-24.503, 162.422, -20.8, 1.4)
pt3dadd(-24.558, 162.317, -20.8, 1.366)
pt3dadd(-24.599, 162.211, -20.828, 1.31)
pt3dadd(-24.633, 162.106, -20.866, 1.246)
pt3dadd(-24.668, 162, -20.904, 1.184)
pt3dadd(-24.703, 161.896, -20.943, 1.12)
pt3dadd(-24.756, 161.804, -20.983, 1.048)
pt3dadd(-24.839, 161.735, -21.026, 0.964)
pt3dadd(-24.896, 161.669, -21.091, 0.92)
pt3dadd(-24.933, 161.606, -21.17, 0.908)
pt3dadd(-24.994, 161.516, -21.193, 0.942)
pt3dadd(-25.062, 161.418, -21.198, 0.99)
pt3dadd(-25.128, 161.317, -21.2, 1.03)
pt3dadd(-25.193, 161.216, -21.2, 1.064)
pt3dadd(-25.278, 161.136, -21.2, 1.1)
pt3dadd(-25.377, 161.069, -21.2, 1.13)
pt3dadd(-25.456, 160.979, -21.202, 1.124)
pt3dadd(-25.534, 160.889, -21.205, 1.12)
pt3dadd(-25.613, 160.796, -21.207, 1.114)
pt3dadd(-25.691, 160.706, -21.209, 1.108)
pt3dadd(-25.769, 160.616, -21.215, 1.102)
pt3dadd(-25.845, 160.526, -21.236, 1.084)
pt3dadd(-25.92, 160.436, -21.256, 1.068)
pt3dadd(-25.996, 160.346, -21.276, 1.05)
pt3dadd(-26.072, 160.256, -21.296, 1.034)
pt3dadd(-26.158, 160.174, -21.302, 1.014)
pt3dadd(-26.248, 160.094, -21.304, 0.994)
pt3dadd(-26.337, 160.014, -21.306, 0.972)
pt3dadd(-26.426, 159.935, -21.309, 0.952)
pt3dadd(-26.516, 159.853, -21.311, 0.932)
pt3dadd(-26.564, 159.756, -21.348, 0.894)
pt3dadd(-26.607, 159.658, -21.389, 0.856)
pt3dadd(-26.685, 159.566, -21.401, 0.88)
pt3dadd(-26.765, 159.48, -21.414, 0.91)
pt3dadd(-26.86, 159.426, -21.456, 1.006)
pt3dadd(-26.959, 159.376, -21.49, 1.106)
pt3dadd(-27.069, 159.329, -21.495, 1.236)
pt3dadd(-27.18, 159.282, -21.499, 1.366)
pt3dadd(-27.294, 159.266, -21.524, 1.49)
pt3dadd(-27.407, 159.254, -21.556, 1.582)
pt3dadd(-27.515, 159.244, -21.598, 1.582)
pt3dadd(-27.623, 159.232, -21.64, 1.582)
pt3dadd(-27.732, 159.221, -21.682, 1.582)
pt3dadd(-27.84, 159.209, -21.724, 1.582)
pt3dadd(-27.948, 159.198, -21.767, 1.582)
}
dend_5[2] {pt3dclear()
pt3dadd(-27.948, 159.198, -21.767, 1.582)
pt3dadd(-27.933, 159.174, -21.802, 1.562)
pt3dadd(-27.899, 159.116, -21.886, 1.518)
pt3dadd(-27.865, 159.059, -21.969, 1.472)
pt3dadd(-27.831, 159.002, -22.053, 1.426)
pt3dadd(-27.797, 158.946, -22.136, 1.382)
pt3dadd(-27.763, 158.888, -22.219, 1.336)
pt3dadd(-27.729, 158.832, -22.303, 1.292)
pt3dadd(-27.695, 158.776, -22.386, 1.246)
pt3dadd(-27.66, 158.719, -22.47, 1.2)
pt3dadd(-27.626, 158.662, -22.553, 1.156)
pt3dadd(-27.634, 158.585, -22.6, 1.158)
pt3dadd(-27.696, 158.482, -22.6, 1.224)
pt3dadd(-27.757, 158.38, -22.6, 1.29)
pt3dadd(-27.819, 158.276, -22.6, 1.354)
pt3dadd(-27.88, 158.173, -22.6, 1.42)
pt3dadd(-27.938, 158.068, -22.6, 1.454)
pt3dadd(-27.99, 157.96, -22.6, 1.45)
pt3dadd(-28.042, 157.852, -22.6, 1.444)
pt3dadd(-28.094, 157.744, -22.6, 1.44)
pt3dadd(-28.145, 157.634, -22.6, 1.434)
pt3dadd(-28.201, 157.529, -22.6, 1.42)
pt3dadd(-28.262, 157.426, -22.6, 1.384)
pt3dadd(-28.324, 157.322, -22.6, 1.348)
pt3dadd(-28.386, 157.22, -22.6, 1.314)
pt3dadd(-28.447, 157.117, -22.6, 1.278)
pt3dadd(-28.509, 157.014, -22.6, 1.242)
pt3dadd(-28.57, 156.911, -22.6, 1.202)
pt3dadd(-28.632, 156.808, -22.6, 1.162)
pt3dadd(-28.693, 156.704, -22.6, 1.122)
pt3dadd(-28.755, 156.602, -22.6, 1.08)
pt3dadd(-28.812, 156.497, -22.6, 1.03)
pt3dadd(-28.862, 156.388, -22.6, 0.962)
pt3dadd(-28.921, 156.288, -22.6, 0.902)
pt3dadd(-29.029, 156.236, -22.6, 0.892)
pt3dadd(-29.138, 156.184, -22.6, 0.88)
pt3dadd(-29.237, 156.116, -22.6, 0.87)
pt3dadd(-29.333, 156.047, -22.6, 0.858)
pt3dadd(-29.369, 155.945, -22.6, 0.848)
pt3dadd(-29.366, 155.825, -22.6, 0.84)
pt3dadd(-29.363, 155.706, -22.6, 0.83)
pt3dadd(-29.388, 155.588, -22.6, 0.802)
pt3dadd(-29.416, 155.472, -22.6, 0.776)
pt3dadd(-29.437, 155.353, -22.6, 0.766)
pt3dadd(-29.457, 155.236, -22.6, 0.754)
pt3dadd(-29.484, 155.118, -22.6, 0.762)
pt3dadd(-29.511, 155.002, -22.6, 0.772)
pt3dadd(-29.539, 154.884, -22.6, 0.81)
pt3dadd(-29.567, 154.768, -22.6, 0.874)
pt3dadd(-29.599, 154.652, -22.6, 0.948)
pt3dadd(-29.656, 154.548, -22.6, 1.076)
}
}
proc shape3d_107() {
dend_5[2] { pt3dadd(-29.713, 154.441, -22.6, 1.202)
pt3dadd(-29.831, 154.426, -22.6, 1.27)
pt3dadd(-29.95, 154.41, -22.6, 1.338)
pt3dadd(-30.069, 154.394, -22.6, 1.404)
pt3dadd(-30.188, 154.38, -22.6, 1.472)
pt3dadd(-30.307, 154.364, -22.6, 1.536)
pt3dadd(-30.426, 154.352, -22.6, 1.578)
pt3dadd(-30.546, 154.339, -22.6, 1.62)
pt3dadd(-30.665, 154.327, -22.6, 1.65)
pt3dadd(-30.784, 154.314, -22.6, 1.574)
pt3dadd(-30.904, 154.302, -22.6, 1.5)
pt3dadd(-31.023, 154.289, -22.6, 1.424)
pt3dadd(-31.141, 154.272, -22.6, 1.348)
pt3dadd(-31.242, 154.207, -22.6, 1.27)
pt3dadd(-31.343, 154.142, -22.6, 1.192)
pt3dadd(-31.407, 154.043, -22.6, 1.13)
pt3dadd(-31.464, 153.937, -22.6, 1.072)
pt3dadd(-31.515, 153.829, -22.6, 1.038)
pt3dadd(-31.565, 153.721, -22.6, 1.016)
pt3dadd(-31.644, 153.638, -22.601, 0.994)
pt3dadd(-31.751, 153.586, -22.604, 0.974)
pt3dadd(-31.859, 153.532, -22.607, 0.954)
pt3dadd(-31.966, 153.479, -22.61, 0.934)
pt3dadd(-32.065, 153.426, -22.641, 0.9)
pt3dadd(-32.16, 153.372, -22.682, 0.86)
pt3dadd(-32.236, 153.283, -22.692, 0.822)
pt3dadd(-32.309, 153.187, -22.696, 0.786)
pt3dadd(-32.382, 153.094, -22.702, 0.752)
pt3dadd(-32.459, 153.006, -22.726, 0.738)
pt3dadd(-32.528, 152.928, -22.764, 0.754)
pt3dadd(-32.57, 152.851, -22.823, 0.828)
pt3dadd(-32.617, 152.752, -22.863, 0.87)
pt3dadd(-32.664, 152.651, -22.902, 0.912)
pt3dadd(-32.71, 152.551, -22.941, 0.952)
pt3dadd(-32.749, 152.453, -22.986, 1.018)
pt3dadd(-32.775, 152.354, -23.04, 1.128)
pt3dadd(-32.836, 152.287, -23.094, 1.214)
pt3dadd(-32.931, 152.25, -23.146, 1.28)
pt3dadd(-32.998, 152.17, -23.177, 1.314)
pt3dadd(-33.048, 152.063, -23.194, 1.326)
pt3dadd(-33.131, 151.982, -23.2, 1.316)
pt3dadd(-33.232, 151.918, -23.2, 1.294)
pt3dadd(-33.34, 151.874, -23.2, 1.26)
pt3dadd(-33.46, 151.861, -23.2, 1.21)
pt3dadd(-33.578, 151.844, -23.2, 1.174)
pt3dadd(-33.696, 151.818, -23.2, 1.158)
pt3dadd(-33.813, 151.794, -23.2, 1.142)
pt3dadd(-33.93, 151.769, -23.2, 1.126)
pt3dadd(-34.048, 151.744, -23.2, 1.11)
pt3dadd(-34.165, 151.718, -23.2, 1.094)
pt3dadd(-34.282, 151.694, -23.201, 1.078)
pt3dadd(-34.395, 151.675, -23.23, 1.056)
pt3dadd(-34.509, 151.655, -23.259, 1.032)
pt3dadd(-34.622, 151.636, -23.288, 1.008)
pt3dadd(-34.735, 151.616, -23.317, 0.986)
pt3dadd(-34.848, 151.597, -23.346, 0.962)
pt3dadd(-34.955, 151.55, -23.362, 0.94)
pt3dadd(-35.059, 151.492, -23.371, 0.92)
pt3dadd(-35.163, 151.433, -23.379, 0.9)
pt3dadd(-35.267, 151.373, -23.388, 0.88)
pt3dadd(-35.37, 151.314, -23.397, 0.86)
pt3dadd(-35.472, 151.258, -23.42, 0.838)
pt3dadd(-35.573, 151.202, -23.449, 0.816)
pt3dadd(-35.673, 151.147, -23.479, 0.794)
pt3dadd(-35.774, 151.092, -23.508, 0.772)
pt3dadd(-35.875, 151.039, -23.539, 0.752)
pt3dadd(-35.976, 150.992, -23.576, 0.74)
pt3dadd(-36.078, 150.947, -23.612, 0.73)
pt3dadd(-36.18, 150.901, -23.649, 0.718)
pt3dadd(-36.281, 150.854, -23.686, 0.708)
pt3dadd(-36.386, 150.829, -23.727, 0.7)
pt3dadd(-36.493, 150.818, -23.772, 0.696)
pt3dadd(-36.6, 150.808, -23.817, 0.69)
pt3dadd(-36.706, 150.796, -23.862, 0.686)
pt3dadd(-36.813, 150.785, -23.906, 0.68)
pt3dadd(-36.923, 150.764, -23.938, 0.682)
pt3dadd(-37.037, 150.73, -23.95, 0.69)
pt3dadd(-37.151, 150.696, -23.962, 0.7)
pt3dadd(-37.265, 150.662, -23.975, 0.71)
pt3dadd(-37.379, 150.629, -23.987, 0.718)
pt3dadd(-37.493, 150.594, -23.999, 0.728)
pt3dadd(-37.594, 150.529, -24, 0.746)
pt3dadd(-37.693, 150.462, -24, 0.766)
pt3dadd(-37.792, 150.395, -24, 0.786)
pt3dadd(-37.892, 150.328, -24, 0.804)
pt3dadd(-37.991, 150.259, -24, 0.824)
pt3dadd(-38.088, 150.19, -24, 0.854)
pt3dadd(-38.186, 150.119, -24, 0.89)
pt3dadd(-38.283, 150.049, -24, 0.924)
pt3dadd(-38.38, 149.978, -24, 0.958)
pt3dadd(-38.477, 149.908, -24, 0.992)
pt3dadd(-38.574, 149.837, -24, 1.026)
pt3dadd(-38.671, 149.767, -24, 1.06)
pt3dadd(-38.768, 149.696, -24, 1.094)
pt3dadd(-38.865, 149.626, -24, 1.13)
pt3dadd(-38.963, 149.555, -24, 1.164)
pt3dadd(-39.068, 149.502, -24, 1.226)
pt3dadd(-39.182, 149.464, -24, 1.316)
pt3dadd(-39.296, 149.425, -24, 1.406)
pt3dadd(-39.345, 149.316, -24, 1.498)
pt3dadd(-39.395, 149.207, -24, 1.59)
pt3dadd(-39.394, 149.088, -24, 1.634)
pt3dadd(-39.382, 148.969, -24, 1.668)
pt3dadd(-39.369, 148.85, -24, 1.702)
pt3dadd(-39.384, 148.732, -24, 1.666)
pt3dadd(-39.405, 148.613, -24, 1.614)
pt3dadd(-39.453, 148.512, -24, 1.552)
pt3dadd(-39.545, 148.434, -24, 1.476)
pt3dadd(-39.638, 148.358, -24, 1.4)
pt3dadd(-39.73, 148.282, -24, 1.324)
pt3dadd(-39.81, 148.223, -24.049, 1.208)
pt3dadd(-39.887, 148.169, -24.111, 1.08)
pt3dadd(-39.905, 148.162, -24.207, 1.032)
pt3dadd(-39.95, 148.091, -24.28, 1.056)
pt3dadd(-39.995, 148.021, -24.352, 1.08)
pt3dadd(-40.039, 147.953, -24.425, 1.104)
pt3dadd(-40.084, 147.883, -24.498, 1.13)
pt3dadd(-40.153, 147.822, -24.561, 1.212)
pt3dadd(-40.219, 147.769, -24.63, 1.294)
pt3dadd(-40.269, 147.743, -24.718, 1.356)
pt3dadd(-40.332, 147.714, -24.79, 1.414)
pt3dadd(-40.442, 147.667, -24.795, 1.458)
pt3dadd(-40.553, 147.622, -24.799, 1.502)
pt3dadd(-40.67, 147.634, -24.8, 1.506)
pt3dadd(-40.788, 147.654, -24.8, 1.506)
pt3dadd(-40.907, 147.671, -24.8, 1.474)
pt3dadd(-41.027, 147.682, -24.8, 1.4)
pt3dadd(-41.136, 147.676, -24.766, 1.298)
pt3dadd(-41.243, 147.665, -24.722, 1.184)
pt3dadd(-41.35, 147.654, -24.677, 1.084)
pt3dadd(-41.457, 147.642, -24.632, 0.994)
pt3dadd(-41.567, 147.631, -24.6, 0.93)
pt3dadd(-41.686, 147.618, -24.6, 0.93)
pt3dadd(-41.806, 147.606, -24.6, 0.93)
pt3dadd(-41.919, 147.577, -24.6, 0.954)
pt3dadd(-42.015, 147.505, -24.6, 1.046)
pt3dadd(-42.105, 147.431, -24.6, 1.14)
pt3dadd(-42.126, 147.312, -24.6, 1.248)
pt3dadd(-42.156, 147.197, -24.6, 1.306)
pt3dadd(-42.198, 147.084, -24.6, 1.306)
pt3dadd(-42.242, 146.972, -24.6, 1.288)
pt3dadd(-42.292, 146.863, -24.6, 1.208)
pt3dadd(-42.343, 146.756, -24.6, 1.128)
pt3dadd(-42.452, 146.705, -24.6, 1.074)
pt3dadd(-42.561, 146.656, -24.6, 1.022)
pt3dadd(-42.654, 146.581, -24.6, 1.028)
pt3dadd(-42.739, 146.496, -24.6, 1.064)
pt3dadd(-42.84, 146.437, -24.6, 1.152)
pt3dadd(-42.954, 146.402, -24.6, 1.284)
pt3dadd(-43.073, 146.387, -24.6, 1.33)
pt3dadd(-43.192, 146.374, -24.6, 1.358)
pt3dadd(-43.311, 146.362, -24.6, 1.388)
pt3dadd(-43.431, 146.348, -24.6, 1.416)
pt3dadd(-43.55, 146.336, -24.6, 1.444)
pt3dadd(-43.67, 146.323, -24.6, 1.474)
pt3dadd(-43.789, 146.311, -24.6, 1.502)
pt3dadd(-43.908, 146.299, -24.6, 1.504)
pt3dadd(-44.028, 146.286, -24.6, 1.5)
pt3dadd(-44.147, 146.274, -24.6, 1.496)
pt3dadd(-44.266, 146.261, -24.6, 1.492)
pt3dadd(-44.386, 146.249, -24.6, 1.49)
pt3dadd(-44.505, 146.236, -24.6, 1.486)
pt3dadd(-44.624, 146.224, -24.6, 1.482)
pt3dadd(-44.744, 146.21, -24.6, 1.46)
pt3dadd(-44.863, 146.198, -24.6, 1.436)
pt3dadd(-44.982, 146.185, -24.6, 1.41)
pt3dadd(-45.102, 146.173, -24.6, 1.386)
pt3dadd(-45.221, 146.161, -24.6, 1.36)
pt3dadd(-45.34, 146.148, -24.6, 1.334)
pt3dadd(-45.46, 146.136, -24.6, 1.31)
pt3dadd(-45.568, 146.087, -24.6, 1.27)
pt3dadd(-45.674, 146.03, -24.6, 1.228)
pt3dadd(-45.78, 145.975, -24.6, 1.186)
pt3dadd(-45.886, 145.918, -24.6, 1.144)
pt3dadd(-45.993, 145.862, -24.6, 1.102)
pt3dadd(-46.096, 145.804, -24.594, 1.068)
pt3dadd(-46.196, 145.74, -24.58, 1.042)
pt3dadd(-46.296, 145.675, -24.566, 1.016)
pt3dadd(-46.396, 145.612, -24.552, 0.988)
pt3dadd(-46.497, 145.548, -24.538, 0.962)
pt3dadd(-46.568, 145.457, -24.521, 0.962)
pt3dadd(-46.626, 145.354, -24.504, 0.976)
pt3dadd(-46.709, 145.27, -24.5, 1.048)
pt3dadd(-46.8, 145.192, -24.5, 1.142)
pt3dadd(-46.901, 145.128, -24.5, 1.256)
pt3dadd(-47.01, 145.078, -24.5, 1.384)
pt3dadd(-47.12, 145.032, -24.5, 1.498)
pt3dadd(-47.237, 145.006, -24.5, 1.562)
pt3dadd(-47.354, 144.978, -24.5, 1.628)
pt3dadd(-47.472, 144.959, -24.5, 1.644)
pt3dadd(-47.592, 144.946, -24.5, 1.618)
pt3dadd(-47.711, 144.934, -24.5, 1.586)
pt3dadd(-47.83, 144.922, -24.5, 1.546)
pt3dadd(-47.95, 144.908, -24.5, 1.506)
pt3dadd(-48.069, 144.896, -24.5, 1.468)
pt3dadd(-48.189, 144.883, -24.5, 1.428)
pt3dadd(-48.308, 144.871, -24.5, 1.388)
pt3dadd(-48.427, 144.858, -24.5, 1.348)
pt3dadd(-48.546, 144.846, -24.503, 1.312)
pt3dadd(-48.666, 144.833, -24.508, 1.278)
}
}
proc shape3d_108() {
dend_5[2] { pt3dadd(-48.785, 144.821, -24.513, 1.244)
pt3dadd(-48.904, 144.809, -24.518, 1.21)
pt3dadd(-49.023, 144.796, -24.523, 1.178)
pt3dadd(-49.142, 144.784, -24.528, 1.144)
pt3dadd(-49.261, 144.77, -24.533, 1.11)
pt3dadd(-49.38, 144.758, -24.542, 1.092)
pt3dadd(-49.499, 144.745, -24.553, 1.076)
pt3dadd(-49.618, 144.733, -24.563, 1.06)
pt3dadd(-49.736, 144.721, -24.574, 1.044)
pt3dadd(-49.855, 144.708, -24.584, 1.028)
pt3dadd(-49.974, 144.696, -24.595, 1.012)
pt3dadd(-50.09, 144.672, -24.6, 1.006)
pt3dadd(-50.204, 144.634, -24.6, 1.01)
pt3dadd(-50.318, 144.596, -24.6, 1.014)
pt3dadd(-50.433, 144.56, -24.6, 1.02)
pt3dadd(-50.547, 144.523, -24.6, 1.024)
pt3dadd(-50.661, 144.486, -24.6, 1.028)
pt3dadd(-50.772, 144.44, -24.6, 1.036)
pt3dadd(-50.88, 144.389, -24.6, 1.046)
pt3dadd(-50.99, 144.348, -24.607, 1.054)
pt3dadd(-51.105, 144.336, -24.634, 1.054)
pt3dadd(-51.22, 144.324, -24.662, 1.054)
pt3dadd(-51.333, 144.307, -24.69, 1.064)
pt3dadd(-51.447, 144.289, -24.719, 1.074)
pt3dadd(-51.519, 144.242, -24.769, 1.094)
pt3dadd(-51.548, 144.166, -24.842, 1.12)
pt3dadd(-51.59, 144.083, -24.905, 1.172)
pt3dadd(-51.645, 144.002, -24.962, 1.226)
pt3dadd(-51.706, 143.926, -25.02, 1.27)
pt3dadd(-51.737, 143.864, -25.099, 1.32)
pt3dadd(-51.759, 143.807, -25.185, 1.372)
pt3dadd(-51.82, 143.741, -25.248, 1.428)
pt3dadd(-51.889, 143.668, -25.3, 1.484)
pt3dadd(-51.946, 143.562, -25.3, 1.52)
pt3dadd(-52.003, 143.456, -25.3, 1.554)
pt3dadd(-52.11, 143.408, -25.3, 1.556)
pt3dadd(-52.224, 143.374, -25.3, 1.554)
pt3dadd(-52.344, 143.36, -25.3, 1.546)
pt3dadd(-52.463, 143.348, -25.3, 1.538)
pt3dadd(-52.575, 143.317, -25.3, 1.528)
pt3dadd(-52.672, 143.246, -25.3, 1.516)
pt3dadd(-52.758, 143.168, -25.301, 1.504)
pt3dadd(-52.767, 143.05, -25.305, 1.484)
pt3dadd(-52.776, 142.931, -25.309, 1.464)
pt3dadd(-52.803, 142.847, -25.361, 1.422)
pt3dadd(-52.84, 142.783, -25.44, 1.366)
pt3dadd(-52.883, 142.682, -25.466, 1.326)
pt3dadd(-52.926, 142.572, -25.479, 1.29)
pt3dadd(-52.97, 142.462, -25.492, 1.252)
pt3dadd(-53.027, 142.358, -25.5, 1.216)
pt3dadd(-53.106, 142.268, -25.5, 1.18)
pt3dadd(-53.195, 142.195, -25.5, 1.148)
pt3dadd(-53.31, 142.165, -25.507, 1.134)
pt3dadd(-53.423, 142.13, -25.527, 1.144)
pt3dadd(-53.535, 142.094, -25.546, 1.154)
pt3dadd(-53.648, 142.06, -25.565, 1.162)
pt3dadd(-53.76, 142.025, -25.584, 1.172)
pt3dadd(-53.87, 141.984, -25.6, 1.184)
pt3dadd(-53.971, 141.918, -25.603, 1.204)
pt3dadd(-54.071, 141.853, -25.605, 1.222)
pt3dadd(-54.172, 141.787, -25.607, 1.242)
pt3dadd(-54.272, 141.722, -25.609, 1.262)
pt3dadd(-54.374, 141.659, -25.612, 1.282)
pt3dadd(-54.489, 141.632, -25.628, 1.3)
pt3dadd(-54.605, 141.605, -25.644, 1.318)
pt3dadd(-54.72, 141.578, -25.66, 1.336)
pt3dadd(-54.835, 141.552, -25.676, 1.354)
pt3dadd(-54.951, 141.526, -25.692, 1.372)
pt3dadd(-55.063, 141.486, -25.7, 1.376)
pt3dadd(-55.171, 141.434, -25.7, 1.366)
pt3dadd(-55.275, 141.378, -25.7, 1.346)
pt3dadd(-55.354, 141.288, -25.7, 1.274)
pt3dadd(-55.434, 141.198, -25.701, 1.202)
pt3dadd(-55.538, 141.142, -25.717, 1.118)
pt3dadd(-55.643, 141.086, -25.733, 1.034)
pt3dadd(-55.757, 141.072, -25.76, 0.99)
pt3dadd(-55.872, 141.06, -25.787, 0.948)
pt3dadd(-55.988, 141.047, -25.81, 0.922)
pt3dadd(-56.105, 141.035, -25.83, 0.906)
pt3dadd(-56.219, 141.023, -25.858, 0.912)
pt3dadd(-56.333, 141.011, -25.888, 0.92)
pt3dadd(-56.447, 140.999, -25.918, 0.93)
pt3dadd(-56.561, 140.987, -25.948, 0.938)
pt3dadd(-56.675, 140.975, -25.977, 0.948)
pt3dadd(-56.789, 140.958, -26, 0.96)
pt3dadd(-56.905, 140.927, -26, 0.986)
pt3dadd(-57.02, 140.894, -26, 1.01)
pt3dadd(-57.136, 140.862, -26, 1.034)
pt3dadd(-57.252, 140.83, -26, 1.06)
pt3dadd(-57.367, 140.798, -26, 1.084)
pt3dadd(-57.483, 140.77, -26, 1.118)
pt3dadd(-57.603, 140.756, -26, 1.202)
pt3dadd(-57.722, 140.744, -26, 1.286)
pt3dadd(-57.84, 140.729, -26.006, 1.374)
pt3dadd(-57.946, 140.698, -26.044, 1.484)
pt3dadd(-58.048, 140.663, -26.084, 1.586)
pt3dadd(-58.093, 140.582, -26.147, 1.63)
pt3dadd(-58.146, 140.495, -26.191, 1.644)
pt3dadd(-58.213, 140.396, -26.196, 1.608)
pt3dadd(-58.283, 140.299, -26.2, 1.562)
pt3dadd(-58.359, 140.206, -26.2, 1.49)
pt3dadd(-58.433, 140.122, -26.233, 1.47)
pt3dadd(-58.51, 140.04, -26.268, 1.458)
pt3dadd(-58.614, 139.985, -26.284, 1.484)
pt3dadd(-58.719, 139.93, -26.3, 1.506)
pt3dadd(-58.837, 139.946, -26.3, 1.506)
pt3dadd(-58.956, 139.963, -26.3, 1.506)
pt3dadd(-59.076, 139.969, -26.3, 1.48)
pt3dadd(-59.196, 139.972, -26.3, 1.442)
pt3dadd(-59.316, 139.974, -26.3, 1.402)
pt3dadd(-59.435, 139.961, -26.3, 1.314)
pt3dadd(-59.554, 139.948, -26.3, 1.23)
pt3dadd(-59.668, 139.91, -26.3, 1.208)
pt3dadd(-59.783, 139.873, -26.3, 1.186)
pt3dadd(-59.897, 139.836, -26.3, 1.166)
pt3dadd(-60.011, 139.8, -26.3, 1.144)
pt3dadd(-60.125, 139.763, -26.3, 1.124)
pt3dadd(-60.237, 139.722, -26.3, 1.104)
pt3dadd(-60.336, 139.654, -26.3, 1.1)
pt3dadd(-60.436, 139.586, -26.3, 1.094)
pt3dadd(-60.535, 139.518, -26.3, 1.09)
pt3dadd(-60.634, 139.451, -26.3, 1.084)
pt3dadd(-60.733, 139.384, -26.3, 1.08)
pt3dadd(-60.842, 139.339, -26.317, 1.09)
pt3dadd(-60.952, 139.296, -26.335, 1.1)
pt3dadd(-61.062, 139.253, -26.352, 1.11)
pt3dadd(-61.172, 139.208, -26.37, 1.12)
pt3dadd(-61.282, 139.166, -26.388, 1.13)
pt3dadd(-61.386, 139.134, -26.43, 1.154)
pt3dadd(-61.489, 139.103, -26.474, 1.178)
pt3dadd(-61.523, 139.018, -26.533, 1.168)
pt3dadd(-61.556, 138.93, -26.589, 1.15)
pt3dadd(-61.664, 138.877, -26.594, 1.094)
pt3dadd(-61.772, 138.824, -26.599, 1.04)
pt3dadd(-61.855, 138.742, -26.6, 0.962)
pt3dadd(-61.934, 138.649, -26.6, 0.878)
pt3dadd(-62.04, 138.61, -26.6, 0.816)
pt3dadd(-62.159, 138.59, -26.6, 0.764)
pt3dadd(-62.276, 138.564, -26.6, 0.746)
pt3dadd(-62.393, 138.538, -26.6, 0.736)
pt3dadd(-62.503, 138.5, -26.6, 0.732)
pt3dadd(-62.56, 138.396, -26.6, 0.768)
pt3dadd(-62.617, 138.289, -26.6, 0.802)
pt3dadd(-62.646, 138.173, -26.6, 0.834)
pt3dadd(-62.673, 138.056, -26.6, 0.866)
pt3dadd(-62.687, 137.94, -26.588, 0.898)
pt3dadd(-62.692, 137.822, -26.569, 0.932)
pt3dadd(-62.71, 137.724, -26.531, 0.954)
pt3dadd(-62.756, 137.666, -26.451, 0.954)
pt3dadd(-62.826, 137.603, -26.403, 0.916)
pt3dadd(-62.935, 137.555, -26.4, 0.878)
pt3dadd(-63.054, 137.551, -26.4, 0.894)
pt3dadd(-63.169, 137.581, -26.4, 0.974)
pt3dadd(-63.285, 137.609, -26.4, 1.09)
pt3dadd(-63.399, 137.605, -26.431, 1.134)
pt3dadd(-63.511, 137.599, -26.465, 1.168)
pt3dadd(-63.581, 137.594, -26.536, 1.166)
pt3dadd(-63.628, 137.59, -26.629, 1.144)
pt3dadd(-63.686, 137.582, -26.714, 1.114)
pt3dadd(-63.768, 137.569, -26.787, 1.068)
pt3dadd(-63.849, 137.556, -26.859, 1.024)
pt3dadd(-63.946, 137.519, -26.892, 0.964)
pt3dadd(-64.053, 137.465, -26.897, 0.898)
pt3dadd(-64.164, 137.422, -26.9, 0.844)
pt3dadd(-64.282, 137.4, -26.9, 0.832)
pt3dadd(-64.401, 137.388, -26.9, 0.84)
pt3dadd(-64.521, 137.375, -26.9, 0.846)
pt3dadd(-64.64, 137.363, -26.9, 0.854)
pt3dadd(-64.759, 137.35, -26.9, 0.86)
pt3dadd(-64.879, 137.338, -26.9, 0.868)
pt3dadd(-64.998, 137.326, -26.9, 0.874)
pt3dadd(-65.117, 137.312, -26.9, 0.88)
pt3dadd(-65.237, 137.3, -26.9, 0.884)
pt3dadd(-65.356, 137.287, -26.9, 0.888)
pt3dadd(-65.475, 137.275, -26.9, 0.892)
pt3dadd(-65.595, 137.262, -26.9, 0.894)
pt3dadd(-65.714, 137.25, -26.9, 0.898)
pt3dadd(-65.833, 137.237, -26.9, 0.902)
pt3dadd(-65.943, 137.2, -26.9, 0.898)
pt3dadd(-66.04, 137.129, -26.9, 0.882)
pt3dadd(-66.137, 137.058, -26.9, 0.868)
pt3dadd(-66.234, 136.987, -26.9, 0.854)
pt3dadd(-66.331, 136.916, -26.9, 0.838)
pt3dadd(-66.435, 136.862, -26.904, 0.824)
pt3dadd(-66.552, 136.841, -26.915, 0.812)
pt3dadd(-66.67, 136.82, -26.926, 0.8)
pt3dadd(-66.787, 136.798, -26.937, 0.786)
pt3dadd(-66.904, 136.777, -26.948, 0.774)
pt3dadd(-67.022, 136.757, -26.96, 0.762)
pt3dadd(-67.136, 136.726, -26.962, 0.76)
pt3dadd(-67.246, 136.68, -26.95, 0.776)
pt3dadd(-67.356, 136.634, -26.939, 0.792)
pt3dadd(-67.466, 136.588, -26.927, 0.808)
pt3dadd(-67.576, 136.542, -26.915, 0.824)
pt3dadd(-67.675, 136.476, -26.91, 0.854)
pt3dadd(-67.769, 136.402, -26.907, 0.888)
pt3dadd(-67.863, 136.327, -26.905, 0.924)
pt3dadd(-67.957, 136.253, -26.903, 0.958)
pt3dadd(-68.052, 136.178, -26.901, 0.994)
pt3dadd(-68.141, 136.099, -26.9, 1.018)
}
}
proc shape3d_109() {
dend_5[2] { pt3dadd(-68.229, 136.018, -26.9, 1.038)
pt3dadd(-68.317, 135.936, -26.9, 1.058)
pt3dadd(-68.405, 135.854, -26.9, 1.078)
pt3dadd(-68.493, 135.773, -26.9, 1.098)
pt3dadd(-68.603, 135.736, -26.9, 1.08)
pt3dadd(-68.721, 135.72, -26.9, 1.046)
pt3dadd(-68.84, 135.702, -26.9, 1.01)
pt3dadd(-68.937, 135.636, -26.9, 0.93)
pt3dadd(-69.028, 135.558, -26.9, 0.836)
pt3dadd(-69.065, 135.454, -26.9, 0.772)
pt3dadd(-69.073, 135.332, -26.9, 0.724)
pt3dadd(-69.082, 135.214, -26.9, 0.68)
pt3dadd(-69.11, 135.097, -26.9, 0.722)
pt3dadd(-69.137, 134.98, -26.9, 0.766)
pt3dadd(-69.142, 134.861, -26.9, 0.852)
pt3dadd(-69.136, 134.741, -26.9, 0.958)
pt3dadd(-69.125, 134.622, -26.9, 1.034)
pt3dadd(-69.112, 134.502, -26.9, 1.1)
pt3dadd(-69.1, 134.383, -26.9, 1.168)
pt3dadd(-69.12, 134.266, -26.9, 1.198)
pt3dadd(-69.148, 134.15, -26.9, 1.218)
pt3dadd(-69.198, 134.058, -26.874, 1.244)
pt3dadd(-69.275, 133.997, -26.817, 1.272)
pt3dadd(-69.352, 133.934, -26.761, 1.32)
pt3dadd(-69.429, 133.873, -26.704, 1.378)
pt3dadd(-69.542, 133.838, -26.7, 1.434)
pt3dadd(-69.657, 133.805, -26.7, 1.488)
pt3dadd(-69.773, 133.771, -26.7, 1.544)
pt3dadd(-69.891, 133.75, -26.7, 1.6)
pt3dadd(-70.009, 133.732, -26.7, 1.656)
pt3dadd(-70.074, 133.66, -26.7, 1.69)
pt3dadd(-70.095, 133.541, -26.7, 1.706)
pt3dadd(-70.085, 133.422, -26.7, 1.638)
pt3dadd(-70.086, 133.302, -26.7, 1.502)
pt3dadd(-70.116, 133.187, -26.7, 1.358)
pt3dadd(-70.192, 133.094, -26.7, 1.288)
pt3dadd(-70.289, 133.025, -26.7, 1.256)
pt3dadd(-70.38, 132.948, -26.7, 1.268)
pt3dadd(-70.472, 132.869, -26.7, 1.28)
pt3dadd(-70.568, 132.798, -26.7, 1.322)
pt3dadd(-70.664, 132.726, -26.7, 1.368)
pt3dadd(-70.752, 132.646, -26.7, 1.48)
pt3dadd(-70.843, 132.566, -26.7, 1.476)
pt3dadd(-70.933, 132.487, -26.7, 1.472)
pt3dadd(-71.024, 132.408, -26.7, 1.466)
pt3dadd(-71.114, 132.33, -26.7, 1.462)
pt3dadd(-71.204, 132.251, -26.7, 1.456)
pt3dadd(-71.305, 132.186, -26.7, 1.424)
pt3dadd(-71.406, 132.121, -26.7, 1.39)
pt3dadd(-71.508, 132.056, -26.7, 1.356)
pt3dadd(-71.609, 131.992, -26.7, 1.324)
pt3dadd(-71.71, 131.927, -26.7, 1.29)
pt3dadd(-71.825, 131.902, -26.7, 1.25)
pt3dadd(-71.944, 131.89, -26.7, 1.208)
pt3dadd(-72.063, 131.876, -26.7, 1.166)
pt3dadd(-72.169, 131.826, -26.7, 1.138)
pt3dadd(-72.27, 131.761, -26.7, 1.116)
pt3dadd(-72.349, 131.68, -26.719, 1.104)
pt3dadd(-72.406, 131.585, -26.756, 1.104)
pt3dadd(-72.459, 131.482, -26.779, 1.104)
pt3dadd(-72.508, 131.374, -26.796, 1.104)
pt3dadd(-72.561, 131.27, -26.82, 1.12)
pt3dadd(-72.631, 131.179, -26.842, 1.144)
pt3dadd(-72.718, 131.099, -26.859, 1.172)
pt3dadd(-72.804, 131.018, -26.876, 1.2)
pt3dadd(-72.891, 130.937, -26.893, 1.228)
pt3dadd(-72.977, 130.856, -26.911, 1.256)
pt3dadd(-73.022, 130.76, -26.955, 1.286)
pt3dadd(-73.067, 130.662, -27, 1.316)
pt3dadd(-73.111, 130.565, -27.046, 1.344)
pt3dadd(-73.155, 130.468, -27.091, 1.374)
pt3dadd(-73.237, 130.385, -27.1, 1.408)
pt3dadd(-73.328, 130.307, -27.1, 1.444)
pt3dadd(-73.359, 130.202, -27.1, 1.45)
pt3dadd(-73.356, 130.082, -27.1, 1.442)
pt3dadd(-73.353, 129.962, -27.1, 1.432)
pt3dadd(-73.42, 129.868, -27.1, 1.402)
pt3dadd(-73.499, 129.779, -27.1, 1.366)
pt3dadd(-73.601, 129.72, -27.1, 1.34)
pt3dadd(-73.713, 129.674, -27.1, 1.32)
pt3dadd(-73.825, 129.632, -27.1, 1.306)
pt3dadd(-73.94, 129.598, -27.1, 1.306)
pt3dadd(-74.041, 129.538, -27.1, 1.312)
pt3dadd(-74.134, 129.462, -27.1, 1.322)
pt3dadd(-74.227, 129.385, -27.1, 1.332)
pt3dadd(-74.319, 129.31, -27.1, 1.342)
pt3dadd(-74.412, 129.234, -27.1, 1.352)
pt3dadd(-74.501, 129.155, -27.112, 1.368)
pt3dadd(-74.587, 129.077, -27.135, 1.392)
pt3dadd(-74.673, 128.998, -27.158, 1.414)
pt3dadd(-74.759, 128.918, -27.181, 1.436)
pt3dadd(-74.844, 128.837, -27.2, 1.458)
pt3dadd(-74.924, 128.748, -27.2, 1.462)
pt3dadd(-75.004, 128.658, -27.2, 1.468)
pt3dadd(-75.084, 128.569, -27.2, 1.472)
pt3dadd(-75.164, 128.48, -27.2, 1.478)
pt3dadd(-75.245, 128.39, -27.2, 1.476)
pt3dadd(-75.33, 128.306, -27.2, 1.44)
pt3dadd(-75.412, 128.221, -27.2, 1.402)
pt3dadd(-75.414, 128.1, -27.2, 1.338)
pt3dadd(-75.416, 127.98, -27.2, 1.272)
pt3dadd(-75.415, 127.861, -27.205, 1.216)
pt3dadd(-75.407, 127.742, -27.218, 1.178)
pt3dadd(-75.4, 127.624, -27.23, 1.138)
pt3dadd(-75.479, 127.562, -27.26, 1.14)
pt3dadd(-75.583, 127.519, -27.293, 1.152)
pt3dadd(-75.689, 127.465, -27.3, 1.182)
pt3dadd(-75.794, 127.411, -27.309, 1.202)
pt3dadd(-75.894, 127.36, -27.344, 1.188)
pt3dadd(-75.996, 127.308, -27.372, 1.168)
pt3dadd(-76.104, 127.259, -27.388, 1.132)
pt3dadd(-76.212, 127.208, -27.4, 1.108)
pt3dadd(-76.321, 127.158, -27.4, 1.118)
pt3dadd(-76.429, 127.106, -27.4, 1.128)
pt3dadd(-76.475, 127.004, -27.419, 1.184)
pt3dadd(-76.511, 126.893, -27.441, 1.246)
pt3dadd(-76.509, 126.814, -27.512, 1.346)
pt3dadd(-76.5, 126.72, -27.563, 1.418)
pt3dadd(-76.487, 126.602, -27.58, 1.448)
pt3dadd(-76.475, 126.485, -27.597, 1.478)
pt3dadd(-76.479, 126.365, -27.6, 1.482)
pt3dadd(-76.487, 126.246, -27.6, 1.482)
pt3dadd(-76.515, 126.14, -27.61, 1.472)
pt3dadd(-76.605, 126.079, -27.653, 1.43)
pt3dadd(-76.664, 126.005, -27.703, 1.372)
pt3dadd(-76.683, 125.91, -27.762, 1.292)
pt3dadd(-76.729, 125.813, -27.793, 1.236)
pt3dadd(-76.798, 125.717, -27.805, 1.208)
pt3dadd(-76.865, 125.62, -27.828, 1.226)
pt3dadd(-76.932, 125.525, -27.85, 1.244)
pt3dadd(-76.998, 125.429, -27.873, 1.26)
pt3dadd(-77.065, 125.333, -27.896, 1.278)
pt3dadd(-77.16, 125.263, -27.9, 1.32)
pt3dadd(-77.262, 125.198, -27.9, 1.37)
pt3dadd(-77.363, 125.134, -27.9, 1.418)
pt3dadd(-77.464, 125.07, -27.9, 1.466)
pt3dadd(-77.565, 125.005, -27.9, 1.514)
pt3dadd(-77.666, 124.94, -27.9, 1.678)
pt3dadd(-77.776, 124.894, -27.9, 1.778)
pt3dadd(-77.894, 124.868, -27.9, 1.682)
pt3dadd(-78.013, 124.856, -27.9, 1.524)
pt3dadd(-78.132, 124.843, -27.902, 1.31)
pt3dadd(-78.249, 124.831, -27.918, 1.022)
pt3dadd(-78.357, 124.811, -27.957, 0.712)
pt3dadd(-78.431, 124.736, -27.992, 0.584)
pt3dadd(-78.444, 124.618, -28, 0.63)
pt3dadd(-78.438, 124.499, -28.007, 0.67)
pt3dadd(-78.439, 124.385, -28.033, 0.702)
pt3dadd(-78.48, 124.307, -28.099, 0.762)
pt3dadd(-78.53, 124.219, -28.153, 0.788)
pt3dadd(-78.58, 124.13, -28.208, 0.812)
pt3dadd(-78.63, 124.043, -28.262, 0.836)
pt3dadd(-78.678, 123.949, -28.302, 0.868)
pt3dadd(-78.723, 123.838, -28.307, 0.914)
pt3dadd(-78.767, 123.736, -28.325, 0.96)
pt3dadd(-78.804, 123.683, -28.408, 1.002)
pt3dadd(-78.828, 123.614, -28.484, 1.03)
pt3dadd(-78.817, 123.517, -28.54, 1.03)
pt3dadd(-78.807, 123.415, -28.589, 1.028)
pt3dadd(-78.799, 123.295, -28.594, 1.02)
pt3dadd(-78.792, 123.175, -28.597, 1.01)
pt3dadd(-78.817, 123.07, -28.6, 1.002)
pt3dadd(-78.903, 122.984, -28.6, 0.994)
pt3dadd(-78.988, 122.9, -28.6, 0.988)
pt3dadd(-79.074, 122.815, -28.6, 0.98)
pt3dadd(-79.164, 122.737, -28.6, 0.97)
pt3dadd(-79.255, 122.659, -28.6, 0.958)
pt3dadd(-79.311, 122.557, -28.6, 0.938)
pt3dadd(-79.348, 122.444, -28.6, 0.914)
pt3dadd(-79.384, 122.329, -28.6, 0.888)
pt3dadd(-79.42, 122.214, -28.6, 0.852)
pt3dadd(-79.455, 122.1, -28.6, 0.808)
pt3dadd(-79.505, 121.994, -28.6, 0.772)
pt3dadd(-79.591, 121.91, -28.6, 0.756)
pt3dadd(-79.676, 121.825, -28.6, 0.738)
pt3dadd(-79.769, 121.751, -28.6, 0.734)
pt3dadd(-79.87, 121.686, -28.6, 0.744)
pt3dadd(-79.967, 121.616, -28.6, 0.778)
pt3dadd(-80.053, 121.536, -28.612, 0.84)
pt3dadd(-80.139, 121.456, -28.635, 0.864)
pt3dadd(-80.225, 121.376, -28.657, 0.886)
pt3dadd(-80.311, 121.297, -28.68, 0.908)
pt3dadd(-80.399, 121.22, -28.703, 0.932)
pt3dadd(-80.497, 121.158, -28.724, 0.954)
pt3dadd(-80.596, 121.094, -28.746, 0.976)
pt3dadd(-80.695, 121.032, -28.768, 0.998)
pt3dadd(-80.793, 120.968, -28.79, 1.02)
pt3dadd(-80.902, 120.932, -28.81, 1.038)
pt3dadd(-81.019, 120.92, -28.829, 1.056)
pt3dadd(-81.137, 120.908, -28.847, 1.072)
pt3dadd(-81.254, 120.895, -28.866, 1.088)
pt3dadd(-81.371, 120.883, -28.884, 1.106)
pt3dadd(-81.488, 120.871, -28.903, 1.122)
pt3dadd(-81.594, 120.859, -28.943, 1.13)
pt3dadd(-81.691, 120.846, -29.002, 1.13)
pt3dadd(-81.787, 120.833, -29.06, 1.13)
pt3dadd(-81.884, 120.82, -29.118, 1.13)
pt3dadd(-81.98, 120.808, -29.177, 1.13)
pt3dadd(-82.08, 120.767, -29.214, 1.106)
pt3dadd(-82.181, 120.709, -29.236, 1.07)
}
}
proc shape3d_110() {
dend_5[2] { pt3dadd(-82.272, 120.678, -29.288, 1.016)
pt3dadd(-82.355, 120.661, -29.359, 0.956)
pt3dadd(-82.459, 120.648, -29.393, 0.924)
pt3dadd(-82.578, 120.636, -29.401, 0.914)
pt3dadd(-82.697, 120.624, -29.409, 0.906)
pt3dadd(-82.776, 120.554, -29.446, 0.96)
pt3dadd(-82.842, 120.47, -29.49, 1.032)
pt3dadd(-82.852, 120.356, -29.518, 1.11)
pt3dadd(-82.863, 120.241, -29.546, 1.188)
pt3dadd(-82.874, 120.127, -29.574, 1.266)
pt3dadd(-82.881, 120.011, -29.593, 1.36)
pt3dadd(-82.885, 119.891, -29.602, 1.472)
pt3dadd(-82.888, 119.771, -29.612, 1.582)
pt3dadd(-82.893, 119.674, -29.67, 1.658)
pt3dadd(-82.898, 119.578, -29.729, 1.734)
pt3dadd(-82.936, 119.492, -29.775, 1.782)
pt3dadd(-83.033, 119.426, -29.798, 1.782)
pt3dadd(-83.132, 119.368, -29.826, 1.7)
pt3dadd(-83.202, 119.305, -29.885, 1.61)
pt3dadd(-83.264, 119.238, -29.95, 1.548)
pt3dadd(-83.326, 119.172, -30.016, 1.486)
pt3dadd(-83.388, 119.106, -30.081, 1.424)
pt3dadd(-83.46, 119.065, -30.152, 1.374)
pt3dadd(-83.536, 119.032, -30.225, 1.328)
pt3dadd(-83.611, 119, -30.298, 1.282)
pt3dadd(-83.687, 118.968, -30.371, 1.238)
pt3dadd(-83.772, 118.935, -30.431, 1.2)
pt3dadd(-83.881, 118.898, -30.461, 1.178)
pt3dadd(-83.99, 118.862, -30.49, 1.158)
pt3dadd(-84.098, 118.826, -30.52, 1.138)
pt3dadd(-84.207, 118.79, -30.549, 1.116)
pt3dadd(-84.318, 118.764, -30.578, 1.11)
pt3dadd(-84.433, 118.752, -30.605, 1.12)
pt3dadd(-84.548, 118.74, -30.633, 1.13)
pt3dadd(-84.616, 118.732, -30.714, 1.152)
pt3dadd(-84.684, 118.725, -30.797, 1.176)
pt3dadd(-84.699, 118.724, -30.894, 1.188)
pt3dadd(-84.704, 118.723, -30.994, 1.196)
pt3dadd(-84.708, 118.723, -31.094, 1.204)
pt3dadd(-84.708, 118.723, -31.194, 1.222)
pt3dadd(-84.708, 118.723, -31.294, 1.238)
pt3dadd(-84.708, 118.723, -31.394, 1.254)
pt3dadd(-84.708, 118.723, -31.494, 1.29)
pt3dadd(-84.708, 118.723, -31.594, 1.328)
pt3dadd(-84.735, 118.705, -31.69, 1.34)
pt3dadd(-84.764, 118.687, -31.786, 1.35)
pt3dadd(-84.793, 118.668, -31.882, 1.36)
pt3dadd(-84.822, 118.649, -31.977, 1.368)
pt3dadd(-84.851, 118.632, -32.073, 1.378)
pt3dadd(-84.884, 118.61, -32.167, 1.372)
pt3dadd(-84.92, 118.587, -32.261, 1.36)
pt3dadd(-84.935, 118.578, -32.358, 1.336)
pt3dadd(-84.935, 118.578, -32.458, 1.302)
pt3dadd(-84.935, 118.578, -32.558, 1.27)
pt3dadd(-84.96, 118.565, -32.653, 1.212)
pt3dadd(-85.003, 118.541, -32.745, 1.14)
pt3dadd(-85.077, 118.503, -32.803, 1.06)
pt3dadd(-85.18, 118.451, -32.831, 0.97)
pt3dadd(-85.272, 118.422, -32.883, 0.91)
pt3dadd(-85.354, 118.414, -32.955, 0.874)
pt3dadd(-85.436, 118.405, -33.028, 0.84)
pt3dadd(-85.519, 118.396, -33.1, 0.804)
pt3dadd(-85.638, 118.384, -33.1, 0.812)
pt3dadd(-85.758, 118.371, -33.1, 0.82)
pt3dadd(-85.877, 118.359, -33.1, 0.828)
pt3dadd(-85.996, 118.346, -33.1, 0.93)
}
dend_5[3] {pt3dclear()
pt3dadd(-85.996, 118.346, -33.1, 0.93)
pt3dadd(-86.047, 118.32, -33.109, 0.936)
pt3dadd(-86.153, 118.268, -33.127, 0.952)
pt3dadd(-86.258, 118.215, -33.146, 0.968)
pt3dadd(-86.363, 118.161, -33.164, 0.984)
pt3dadd(-86.469, 118.109, -33.183, 0.998)
pt3dadd(-86.559, 118.034, -33.192, 0.988)
pt3dadd(-86.642, 117.948, -33.198, 0.964)
pt3dadd(-86.714, 117.852, -33.2, 0.918)
pt3dadd(-86.778, 117.751, -33.2, 0.86)
pt3dadd(-86.867, 117.684, -33.2, 0.806)
pt3dadd(-86.984, 117.657, -33.2, 0.76)
pt3dadd(-87.101, 117.63, -33.2, 0.714)
pt3dadd(-87.209, 117.585, -33.183, 0.666)
pt3dadd(-87.315, 117.534, -33.162, 0.616)
pt3dadd(-87.347, 117.509, -33.084, 0.588)
pt3dadd(-87.35, 117.493, -32.985, 0.57)
pt3dadd(-87.351, 117.48, -32.886, 0.548)
pt3dadd(-87.327, 117.482, -32.789, 0.528)
pt3dadd(-87.253, 117.49, -32.713, 0.492)
pt3dadd(-87.162, 117.498, -32.649, 0.39)
pt3dadd(-87.124, 117.472, -32.561, 0.266)
pt3dadd(-87.157, 117.387, -32.503, 0.226)
pt3dadd(-87.198, 117.284, -32.467, 0.226)
pt3dadd(-87.201, 117.179, -32.419, 0.226)
pt3dadd(-87.189, 117.072, -32.374, 0.226)
pt3dadd(-87.18, 116.976, -32.314, 0.226)
pt3dadd(-87.162, 116.889, -32.249, 0.226)
pt3dadd(-87.112, 116.794, -32.209, 0.226)
pt3dadd(-87.059, 116.69, -32.2, 0.226)
pt3dadd(-87.072, 116.582, -32.177, 0.27)
pt3dadd(-87.132, 116.538, -32.102, 0.374)
pt3dadd(-87.186, 116.532, -32.012, 0.476)
pt3dadd(-87.229, 116.527, -31.92, 0.572)
pt3dadd(-87.25, 116.525, -31.821, 0.622)
pt3dadd(-87.253, 116.525, -31.722, 0.628)
pt3dadd(-87.264, 116.524, -31.622, 0.584)
pt3dadd(-87.355, 116.508, -31.564, 0.578)
pt3dadd(-87.456, 116.491, -31.511, 0.578)
pt3dadd(-87.538, 116.439, -31.455, 0.578)
pt3dadd(-87.616, 116.379, -31.399, 0.578)
pt3dadd(-87.723, 116.349, -31.363, 0.596)
pt3dadd(-87.831, 116.318, -31.327, 0.614)
pt3dadd(-87.933, 116.274, -31.301, 0.634)
pt3dadd(-88.015, 116.187, -31.307, 0.658)
pt3dadd(-88.097, 116.105, -31.322, 0.702)
pt3dadd(-88.194, 116.059, -31.364, 0.766)
pt3dadd(-88.298, 116.016, -31.398, 0.788)
pt3dadd(-88.403, 115.973, -31.431, 0.81)
pt3dadd(-88.508, 115.931, -31.464, 0.83)
pt3dadd(-88.613, 115.888, -31.498, 0.852)
pt3dadd(-88.69, 115.798, -31.505, 0.888)
pt3dadd(-88.765, 115.705, -31.511, 0.924)
pt3dadd(-88.813, 115.666, -31.59, 0.94)
pt3dadd(-88.857, 115.635, -31.679, 0.952)
pt3dadd(-88.953, 115.622, -31.734, 0.914)
pt3dadd(-89.056, 115.611, -31.785, 0.868)
pt3dadd(-89.165, 115.577, -31.8, 0.81)
pt3dadd(-89.276, 115.531, -31.8, 0.748)
pt3dadd(-89.385, 115.481, -31.8, 0.676)
pt3dadd(-89.486, 115.418, -31.8, 0.574)
pt3dadd(-89.583, 115.359, -31.83, 0.534)
pt3dadd(-89.678, 115.303, -31.868, 0.512)
pt3dadd(-89.774, 115.246, -31.906, 0.488)
pt3dadd(-89.869, 115.19, -31.945, 0.466)
pt3dadd(-89.97, 115.153, -31.986, 0.438)
pt3dadd(-90.076, 115.142, -32.03, 0.404)
pt3dadd(-90.183, 115.124, -32.07, 0.37)
pt3dadd(-90.291, 115.075, -32.085, 0.334)
pt3dadd(-90.4, 115.026, -32.1, 0.3)
pt3dadd(-90.515, 114.993, -32.1, 0.292)
pt3dadd(-90.63, 114.961, -32.1, 0.282)
pt3dadd(-90.716, 114.893, -32.1, 0.292)
pt3dadd(-90.765, 114.784, -32.1, 0.326)
pt3dadd(-90.817, 114.676, -32.1, 0.364)
pt3dadd(-90.873, 114.57, -32.1, 0.414)
pt3dadd(-90.928, 114.462, -32.1, 0.462)
pt3dadd(-90.984, 114.357, -32.1, 0.51)
pt3dadd(-91.08, 114.303, -32.097, 0.578)
pt3dadd(-91.197, 114.275, -32.093, 0.656)
pt3dadd(-91.309, 114.243, -32.084, 0.742)
pt3dadd(-91.373, 114.186, -32.017, 0.822)
pt3dadd(-91.441, 114.152, -31.94, 0.808)
pt3dadd(-91.525, 114.098, -31.931, 0.758)
pt3dadd(-91.618, 114.034, -31.963, 0.686)
pt3dadd(-91.713, 113.993, -32.014, 0.642)
pt3dadd(-91.808, 113.955, -32.066, 0.604)
pt3dadd(-91.903, 113.896, -32.102, 0.616)
pt3dadd(-91.992, 113.832, -32.14, 0.632)
pt3dadd(-92.048, 113.748, -32.194, 0.666)
pt3dadd(-92.104, 113.663, -32.247, 0.702)
pt3dadd(-92.159, 113.573, -32.289, 0.728)
pt3dadd(-92.215, 113.467, -32.289, 0.728)
pt3dadd(-92.276, 113.368, -32.281, 0.716)
pt3dadd(-92.358, 113.291, -32.244, 0.664)
pt3dadd(-92.44, 113.217, -32.206, 0.612)
pt3dadd(-92.54, 113.153, -32.196, 0.526)
pt3dadd(-92.644, 113.094, -32.191, 0.436)
pt3dadd(-92.745, 113.038, -32.167, 0.276)
pt3dadd(-92.85, 112.984, -32.153, 0.272)
pt3dadd(-92.956, 112.929, -32.14, 0.266)
pt3dadd(-93.062, 112.875, -32.126, 0.262)
pt3dadd(-93.167, 112.82, -32.113, 0.256)
pt3dadd(-93.273, 112.766, -32.101, 0.252)
pt3dadd(-93.381, 112.719, -32.122, 0.262)
pt3dadd(-93.488, 112.672, -32.142, 0.272)
pt3dadd(-93.596, 112.626, -32.163, 0.282)
pt3dadd(-93.704, 112.578, -32.183, 0.292)
pt3dadd(-93.81, 112.529, -32.203, 0.304)
pt3dadd(-93.912, 112.468, -32.218, 0.322)
pt3dadd(-94.014, 112.408, -32.234, 0.34)
pt3dadd(-94.116, 112.348, -32.249, 0.356)
pt3dadd(-94.219, 112.287, -32.264, 0.374)
pt3dadd(-94.302, 112.214, -32.3, 0.39)
pt3dadd(-94.381, 112.138, -32.34, 0.404)
pt3dadd(-94.461, 112.062, -32.38, 0.42)
pt3dadd(-94.535, 111.989, -32.428, 0.43)
pt3dadd(-94.604, 111.919, -32.486, 0.436)
pt3dadd(-94.673, 111.849, -32.543, 0.442)
pt3dadd(-94.741, 111.778, -32.601, 0.448)
pt3dadd(-94.795, 111.719, -32.672, 0.452)
pt3dadd(-94.829, 111.674, -32.76, 0.452)
pt3dadd(-94.862, 111.629, -32.848, 0.452)
pt3dadd(-94.896, 111.584, -32.937, 0.452)
pt3dadd(-94.93, 111.538, -33.025, 0.452)
pt3dadd(-94.93, 111.507, -33.121, 0.422)
pt3dadd(-94.929, 111.492, -33.22, 0.36)
pt3dadd(-94.927, 111.472, -33.318, 0.282)
pt3dadd(-94.922, 111.428, -33.411, 0.234)
pt3dadd(-94.918, 111.391, -33.505, 0.226)
pt3dadd(-94.917, 111.357, -33.601, 0.226)
pt3dadd(-94.951, 111.302, -33.68, 0.226)
pt3dadd(-95.053, 111.251, -33.7, 0.226)
pt3dadd(-95.17, 111.228, -33.7, 0.226)
}
}
proc shape3d_111() {
dend_5[3] { pt3dadd(-95.29, 111.216, -33.7, 0.226)
pt3dadd(-95.409, 111.203, -33.7, 0.226)
pt3dadd(-95.527, 111.186, -33.7, 0.226)
pt3dadd(-95.643, 111.153, -33.7, 0.226)
pt3dadd(-95.758, 111.12, -33.7, 0.226)
pt3dadd(-95.805, 111.032, -33.7, 0.232)
pt3dadd(-95.813, 110.913, -33.7, 0.242)
pt3dadd(-95.82, 110.793, -33.7, 0.252)
pt3dadd(-95.811, 110.675, -33.701, 0.276)
pt3dadd(-95.886, 110.586, -33.727, 0.282)
pt3dadd(-95.961, 110.497, -33.753, 0.288)
pt3dadd(-96.035, 110.409, -33.778, 0.294)
pt3dadd(-96.11, 110.32, -33.804, 0.3)
pt3dadd(-96.157, 110.269, -33.877, 0.292)
pt3dadd(-96.194, 110.231, -33.967, 0.28)
pt3dadd(-96.26, 110.152, -33.993, 0.266)
pt3dadd(-96.335, 110.058, -33.998, 0.254)
pt3dadd(-96.44, 110.018, -34, 0.244)
pt3dadd(-96.559, 110.002, -34, 0.236)
pt3dadd(-96.678, 109.985, -34, 0.228)
pt3dadd(-96.797, 109.971, -34, 0.226)
pt3dadd(-96.917, 109.959, -34, 0.226)
pt3dadd(-97.036, 109.946, -34, 0.226)
pt3dadd(-97.155, 109.934, -34, 0.226)
pt3dadd(-97.275, 109.921, -34, 0.226)
pt3dadd(-97.394, 109.908, -34, 0.226)
pt3dadd(-97.513, 109.896, -34, 0.226)
pt3dadd(-97.633, 109.883, -34, 0.226)
pt3dadd(-97.752, 109.871, -34, 0.232)
pt3dadd(-97.871, 109.858, -34, 0.242)
pt3dadd(-97.991, 109.846, -34, 0.25)
pt3dadd(-98.11, 109.83, -34, 0.266)
pt3dadd(-98.228, 109.812, -34, 0.282)
pt3dadd(-98.347, 109.795, -34, 0.3)
pt3dadd(-98.426, 109.708, -33.995, 0.336)
pt3dadd(-98.501, 109.615, -33.99, 0.372)
pt3dadd(-98.524, 109.521, -33.937, 0.398)
pt3dadd(-98.54, 109.425, -33.877, 0.422)
pt3dadd(-98.555, 109.33, -33.817, 0.446)
pt3dadd(-98.58, 109.22, -33.8, 0.482)
pt3dadd(-98.607, 109.103, -33.8, 0.524)
pt3dadd(-98.646, 108.991, -33.8, 0.568)
pt3dadd(-98.705, 108.886, -33.8, 0.612)
pt3dadd(-98.764, 108.782, -33.8, 0.656)
pt3dadd(-98.851, 108.713, -33.8, 0.696)
pt3dadd(-98.966, 108.68, -33.8, 0.736)
pt3dadd(-99.082, 108.648, -33.8, 0.774)
pt3dadd(-99.199, 108.623, -33.803, 0.784)
pt3dadd(-99.317, 108.599, -33.806, 0.792)
pt3dadd(-99.434, 108.576, -33.809, 0.798)
pt3dadd(-99.521, 108.543, -33.84, 0.804)
pt3dadd(-99.543, 108.494, -33.929, 0.804)
pt3dadd(-99.573, 108.429, -34.004, 0.81)
pt3dadd(-99.619, 108.334, -34.051, 0.832)
pt3dadd(-99.666, 108.239, -34.098, 0.852)
pt3dadd(-99.781, 108.218, -34.1, 0.888)
pt3dadd(-99.9, 108.202, -34.1, 0.922)
pt3dadd(-100.019, 108.185, -34.1, 0.958)
pt3dadd(-100.138, 108.172, -34.1, 1.004)
pt3dadd(-100.257, 108.16, -34.1, 1.004)
pt3dadd(-100.377, 108.146, -34.1, 1.008)
pt3dadd(-100.492, 108.116, -34.1, 1.066)
pt3dadd(-100.6, 108.064, -34.1, 1.13)
pt3dadd(-100.705, 108.009, -34.11, 1.198)
pt3dadd(-100.794, 107.983, -34.166, 1.298)
pt3dadd(-100.828, 107.979, -34.261, 1.358)
pt3dadd(-100.843, 107.977, -34.36, 1.414)
pt3dadd(-100.872, 107.961, -34.455, 1.456)
pt3dadd(-100.919, 107.869, -34.495, 1.332)
pt3dadd(-100.94, 107.751, -34.5, 1.194)
pt3dadd(-100.989, 107.646, -34.5, 1.134)
pt3dadd(-101.096, 107.596, -34.5, 1.178)
pt3dadd(-101.215, 107.576, -34.5, 1.244)
pt3dadd(-101.334, 107.564, -34.5, 1.306)
pt3dadd(-101.453, 107.551, -34.5, 1.344)
pt3dadd(-101.573, 107.539, -34.5, 1.33)
pt3dadd(-101.69, 107.517, -34.5, 1.296)
pt3dadd(-101.806, 107.484, -34.5, 1.274)
pt3dadd(-101.921, 107.453, -34.5, 1.254)
pt3dadd(-102.037, 107.42, -34.5, 1.234)
pt3dadd(-102.153, 107.388, -34.5, 1.212)
pt3dadd(-102.268, 107.356, -34.5, 1.192)
pt3dadd(-102.385, 107.333, -34.505, 1.148)
pt3dadd(-102.504, 107.32, -34.518, 1.074)
pt3dadd(-102.622, 107.308, -34.53, 0.998)
pt3dadd(-102.713, 107.249, -34.561, 0.908)
pt3dadd(-102.795, 107.173, -34.598, 0.81)
pt3dadd(-102.854, 107.078, -34.635, 0.75)
pt3dadd(-102.91, 106.982, -34.672, 0.702)
pt3dadd(-102.958, 106.881, -34.709, 0.688)
pt3dadd(-103.005, 106.782, -34.748, 0.678)
pt3dadd(-103.056, 106.687, -34.789, 0.678)
pt3dadd(-103.133, 106.596, -34.794, 0.684)
pt3dadd(-103.21, 106.504, -34.799, 0.69)
pt3dadd(-103.287, 106.412, -34.803, 0.694)
pt3dadd(-103.364, 106.32, -34.808, 0.7)
pt3dadd(-103.44, 106.233, -34.826, 0.708)
pt3dadd(-103.516, 106.157, -34.87, 0.722)
pt3dadd(-103.615, 106.105, -34.892, 0.734)
pt3dadd(-103.73, 106.072, -34.896, 0.744)
pt3dadd(-103.835, 106.03, -34.899, 0.754)
pt3dadd(-103.846, 105.912, -34.884, 0.754)
pt3dadd(-103.857, 105.794, -34.87, 0.754)
pt3dadd(-103.906, 105.698, -34.832, 0.754)
pt3dadd(-103.967, 105.611, -34.787, 0.754)
pt3dadd(-104.064, 105.597, -34.73, 0.754)
pt3dadd(-104.162, 105.583, -34.673, 0.754)
pt3dadd(-104.26, 105.569, -34.616, 0.754)
pt3dadd(-104.365, 105.556, -34.572, 0.748)
pt3dadd(-104.478, 105.544, -34.539, 0.736)
pt3dadd(-104.592, 105.532, -34.509, 0.718)
pt3dadd(-104.71, 105.52, -34.5, 0.674)
pt3dadd(-104.83, 105.507, -34.5, 0.66)
pt3dadd(-104.949, 105.495, -34.5, 0.646)
pt3dadd(-105.068, 105.482, -34.5, 0.632)
pt3dadd(-105.188, 105.47, -34.5, 0.616)
pt3dadd(-105.307, 105.457, -34.5, 0.602)
pt3dadd(-105.426, 105.444, -34.5, 0.588)
pt3dadd(-105.545, 105.428, -34.5, 0.564)
pt3dadd(-105.662, 105.401, -34.5, 0.518)
pt3dadd(-105.779, 105.374, -34.5, 0.472)
pt3dadd(-105.871, 105.309, -34.51, 0.414)
pt3dadd(-105.945, 105.217, -34.527, 0.348)
pt3dadd(-106.024, 105.136, -34.558, 0.298)
pt3dadd(-106.105, 105.06, -34.595, 0.256)
pt3dadd(-106.185, 104.971, -34.6, 0.24)
pt3dadd(-106.264, 104.881, -34.6, 0.228)
pt3dadd(-106.28, 104.769, -34.6, 0.236)
pt3dadd(-106.274, 104.649, -34.6, 0.25)
pt3dadd(-106.267, 104.529, -34.6, 0.266)
pt3dadd(-106.259, 104.409, -34.6, 0.284)
pt3dadd(-106.251, 104.29, -34.6, 0.3)
pt3dadd(-106.277, 104.173, -34.6, 0.332)
pt3dadd(-106.305, 104.056, -34.6, 0.364)
pt3dadd(-106.324, 103.938, -34.6, 0.388)
pt3dadd(-106.338, 103.819, -34.6, 0.408)
pt3dadd(-106.361, 103.704, -34.6, 0.426)
pt3dadd(-106.457, 103.633, -34.6, 0.426)
pt3dadd(-106.553, 103.562, -34.6, 0.426)
pt3dadd(-106.666, 103.523, -34.6, 0.4)
pt3dadd(-106.775, 103.477, -34.6, 0.374)
pt3dadd(-106.857, 103.39, -34.6, 0.358)
pt3dadd(-106.94, 103.303, -34.6, 0.344)
pt3dadd(-107.023, 103.216, -34.6, 0.328)
pt3dadd(-107.105, 103.129, -34.6, 0.312)
pt3dadd(-107.192, 103.048, -34.604, 0.3)
pt3dadd(-107.294, 102.986, -34.62, 0.294)
pt3dadd(-107.395, 102.925, -34.637, 0.29)
pt3dadd(-107.496, 102.863, -34.653, 0.284)
pt3dadd(-107.597, 102.802, -34.67, 0.278)
pt3dadd(-107.669, 102.73, -34.71, 0.276)
pt3dadd(-107.715, 102.649, -34.773, 0.276)
pt3dadd(-107.794, 102.588, -34.826, 0.286)
pt3dadd(-107.884, 102.535, -34.874, 0.3)
pt3dadd(-107.985, 102.521, -34.925, 0.29)
pt3dadd(-108.089, 102.51, -34.976, 0.28)
pt3dadd(-108.203, 102.498, -34.992, 0.27)
pt3dadd(-108.323, 102.486, -34.996, 0.262)
pt3dadd(-108.442, 102.473, -34.999, 0.252)
pt3dadd(-108.561, 102.46, -35, 0.24)
pt3dadd(-108.681, 102.448, -35, 0.228)
pt3dadd(-108.8, 102.435, -35, 0.226)
pt3dadd(-108.919, 102.423, -35, 0.226)
pt3dadd(-109.039, 102.41, -35, 0.226)
pt3dadd(-109.158, 102.398, -35, 0.226)
pt3dadd(-109.277, 102.385, -35, 0.226)
pt3dadd(-109.397, 102.373, -35, 0.226)
pt3dadd(-109.516, 102.36, -35, 0.226)
pt3dadd(-109.635, 102.348, -35, 0.226)
pt3dadd(-109.755, 102.335, -35, 0.226)
pt3dadd(-109.874, 102.322, -35, 0.248)
pt3dadd(-109.991, 102.298, -35, 0.298)
pt3dadd(-110.088, 102.243, -35.025, 0.444)
pt3dadd(-110.118, 102.191, -35.106, 0.572)
pt3dadd(-110.118, 102.176, -35.205, 0.574)
pt3dadd(-110.118, 102.175, -35.305, 0.522)
pt3dadd(-110.116, 102.158, -35.404, 0.438)
pt3dadd(-110.119, 102.114, -35.496, 0.35)
pt3dadd(-110.15, 102.064, -35.582, 0.302)
pt3dadd(-110.2, 102.027, -35.666, 0.296)
pt3dadd(-110.238, 101.972, -35.75, 0.282)
pt3dadd(-110.305, 101.908, -35.792, 0.27)
pt3dadd(-110.4, 101.834, -35.797, 0.258)
pt3dadd(-110.504, 101.781, -35.8, 0.24)
pt3dadd(-110.609, 101.73, -35.8, 0.226)
pt3dadd(-110.707, 101.66, -35.8, 0.226)
pt3dadd(-110.805, 101.589, -35.8, 0.226)
pt3dadd(-110.901, 101.519, -35.8, 0.226)
pt3dadd(-110.998, 101.448, -35.8, 0.226)
pt3dadd(-111.097, 101.38, -35.8, 0.226)
pt3dadd(-111.209, 101.341, -35.8, 0.226)
pt3dadd(-111.328, 101.325, -35.8, 0.226)
pt3dadd(-111.447, 101.312, -35.8, 0.226)
pt3dadd(-111.567, 101.3, -35.8, 0.226)
pt3dadd(-111.684, 101.276, -35.8, 0.226)
pt3dadd(-111.78, 101.211, -35.8, 0.226)
pt3dadd(-111.813, 101.096, -35.8, 0.226)
pt3dadd(-111.835, 100.978, -35.8, 0.226)
pt3dadd(-111.871, 100.864, -35.8, 0.226)
pt3dadd(-111.892, 100.746, -35.8, 0.232)
}
}
proc shape3d_112() {
dend_5[3] { pt3dadd(-111.921, 100.63, -35.8, 0.278)
pt3dadd(-112.002, 100.566, -35.775, 0.334)
pt3dadd(-112.107, 100.528, -35.736, 0.384)
pt3dadd(-112.188, 100.475, -35.681, 0.44)
pt3dadd(-112.258, 100.414, -35.617, 0.496)
pt3dadd(-112.305, 100.323, -35.571, 0.606)
pt3dadd(-112.324, 100.227, -35.512, 0.62)
pt3dadd(-112.375, 100.15, -35.46, 0.628)
pt3dadd(-112.471, 100.098, -35.418, 0.628)
pt3dadd(-112.555, 100.04, -35.432, 0.62)
pt3dadd(-112.632, 99.978, -35.489, 0.606)
pt3dadd(-112.703, 99.911, -35.546, 0.614)
pt3dadd(-112.773, 99.839, -35.6, 0.628)
pt3dadd(-112.828, 99.733, -35.6, 0.636)
pt3dadd(-112.885, 99.627, -35.6, 0.642)
pt3dadd(-112.94, 99.52, -35.6, 0.65)
pt3dadd(-112.964, 99.408, -35.6, 0.672)
pt3dadd(-112.952, 99.289, -35.6, 0.714)
pt3dadd(-112.939, 99.169, -35.6, 0.756)
pt3dadd(-112.927, 99.051, -35.606, 0.868)
pt3dadd(-112.934, 98.937, -35.63, 0.972)
pt3dadd(-112.957, 98.826, -35.664, 1.006)
pt3dadd(-112.981, 98.716, -35.698, 1.038)
pt3dadd(-113.004, 98.605, -35.732, 1.072)
pt3dadd(-113.028, 98.495, -35.766, 1.104)
pt3dadd(-113.086, 98.397, -35.797, 1.088)
pt3dadd(-113.146, 98.299, -35.828, 1.07)
pt3dadd(-113.204, 98.202, -35.86, 1.052)
pt3dadd(-113.263, 98.105, -35.891, 1.034)
pt3dadd(-113.316, 97.999, -35.902, 0.99)
pt3dadd(-113.366, 97.89, -35.904, 0.936)
pt3dadd(-113.415, 97.78, -35.906, 0.88)
pt3dadd(-113.465, 97.671, -35.908, 0.826)
pt3dadd(-113.515, 97.562, -35.91, 0.77)
pt3dadd(-113.571, 97.466, -35.941, 0.648)
pt3dadd(-113.63, 97.376, -35.985, 0.49)
pt3dadd(-113.72, 97.298, -35.989, 0.396)
pt3dadd(-113.812, 97.222, -35.989, 0.308)
pt3dadd(-113.922, 97.199, -35.957, 0.292)
pt3dadd(-114.033, 97.181, -35.923, 0.28)
pt3dadd(-114.149, 97.167, -35.909, 0.282)
pt3dadd(-114.268, 97.155, -35.905, 0.29)
pt3dadd(-114.388, 97.142, -35.901, 0.3)
pt3dadd(-114.506, 97.155, -35.891, 0.312)
pt3dadd(-114.623, 97.175, -35.879, 0.326)
pt3dadd(-114.741, 97.195, -35.867, 0.338)
pt3dadd(-114.854, 97.214, -35.851, 0.352)
pt3dadd(-114.893, 97.21, -35.756, 0.352)
pt3dadd(-114.933, 97.206, -35.662, 0.352)
pt3dadd(-114.999, 97.192, -35.581, 0.326)
pt3dadd(-115.079, 97.153, -35.52, 0.272)
pt3dadd(-115.117, 97.047, -35.5, 0.226)
pt3dadd(-115.137, 96.929, -35.5, 0.226)
pt3dadd(-115.178, 96.818, -35.5, 0.24)
pt3dadd(-115.247, 96.723, -35.514, 0.304)
pt3dadd(-115.298, 96.628, -35.558, 0.346)
pt3dadd(-115.341, 96.526, -35.59, 0.384)
pt3dadd(-115.371, 96.41, -35.595, 0.406)
pt3dadd(-115.399, 96.294, -35.602, 0.428)
pt3dadd(-115.394, 96.193, -35.655, 0.44)
pt3dadd(-115.391, 96.091, -35.708, 0.452)
pt3dadd(-115.384, 96.021, -35.789, 0.452)
pt3dadd(-115.377, 95.954, -35.871, 0.452)
pt3dadd(-115.363, 95.847, -35.878, 0.462)
pt3dadd(-115.347, 95.729, -35.865, 0.474)
pt3dadd(-115.332, 95.611, -35.852, 0.486)
pt3dadd(-115.316, 95.493, -35.838, 0.498)
pt3dadd(-115.246, 95.411, -35.826, 0.546)
pt3dadd(-115.144, 95.348, -35.813, 0.614)
pt3dadd(-115.1, 95.248, -35.836, 0.67)
pt3dadd(-115.069, 95.138, -35.867, 0.722)
pt3dadd(-115.039, 95.028, -35.898, 0.776)
pt3dadd(-115.026, 94.91, -35.912, 0.806)
pt3dadd(-115.013, 94.792, -35.924, 0.834)
pt3dadd(-115.012, 94.678, -35.945, 0.846)
pt3dadd(-115.046, 94.576, -35.99, 0.816)
pt3dadd(-115.079, 94.474, -36.035, 0.784)
pt3dadd(-115.108, 94.399, -36.108, 0.734)
pt3dadd(-115.137, 94.331, -36.186, 0.68)
pt3dadd(-115.234, 94.287, -36.229, 0.602)
pt3dadd(-115.332, 94.264, -36.284, 0.602)
pt3dadd(-115.403, 94.231, -36.349, 0.598)
pt3dadd(-115.416, 94.176, -36.438, 0.586)
pt3dadd(-115.425, 94.115, -36.523, 0.568)
pt3dadd(-115.417, 94.041, -36.601, 0.532)
pt3dadd(-115.408, 93.961, -36.674, 0.494)
pt3dadd(-115.397, 93.855, -36.719, 0.45)
pt3dadd(-115.386, 93.748, -36.763, 0.406)
pt3dadd(-115.374, 93.63, -36.773, 0.382)
pt3dadd(-115.361, 93.511, -36.78, 0.36)
pt3dadd(-115.349, 93.392, -36.787, 0.338)
pt3dadd(-115.336, 93.273, -36.795, 0.318)
pt3dadd(-115.327, 93.153, -36.799, 0.298)
pt3dadd(-115.33, 93.033, -36.795, 0.29)
pt3dadd(-115.333, 92.914, -36.79, 0.28)
pt3dadd(-115.372, 92.809, -36.766, 0.328)
pt3dadd(-115.426, 92.702, -36.759, 0.35)
pt3dadd(-115.478, 92.595, -36.751, 0.374)
pt3dadd(-115.532, 92.488, -36.743, 0.396)
pt3dadd(-115.585, 92.381, -36.736, 0.42)
pt3dadd(-115.608, 92.265, -36.742, 0.44)
pt3dadd(-115.617, 92.147, -36.754, 0.458)
pt3dadd(-115.626, 92.028, -36.766, 0.476)
pt3dadd(-115.637, 91.909, -36.778, 0.494)
pt3dadd(-115.646, 91.791, -36.791, 0.514)
pt3dadd(-115.65, 91.672, -36.8, 0.534)
pt3dadd(-115.638, 91.553, -36.8, 0.558)
pt3dadd(-115.625, 91.433, -36.8, 0.584)
pt3dadd(-115.621, 91.314, -36.8, 0.61)
pt3dadd(-115.641, 91.196, -36.8, 0.642)
pt3dadd(-115.663, 91.078, -36.8, 0.672)
pt3dadd(-115.668, 90.958, -36.797, 0.694)
pt3dadd(-115.671, 90.838, -36.792, 0.714)
pt3dadd(-115.672, 90.727, -36.772, 0.726)
pt3dadd(-115.663, 90.646, -36.699, 0.714)
pt3dadd(-115.655, 90.569, -36.623, 0.698)
pt3dadd(-115.651, 90.526, -36.53, 0.65)
pt3dadd(-115.635, 90.479, -36.439, 0.592)
pt3dadd(-115.609, 90.428, -36.351, 0.53)
pt3dadd(-115.569, 90.347, -36.308, 0.49)
pt3dadd(-115.515, 90.239, -36.304, 0.468)
pt3dadd(-115.462, 90.133, -36.305, 0.452)
pt3dadd(-115.405, 90.029, -36.321, 0.452)
pt3dadd(-115.358, 89.924, -36.344, 0.462)
pt3dadd(-115.341, 89.819, -36.39, 0.51)
pt3dadd(-115.324, 89.716, -36.439, 0.558)
pt3dadd(-115.315, 89.632, -36.51, 0.63)
pt3dadd(-115.307, 89.55, -36.582, 0.692)
pt3dadd(-115.298, 89.469, -36.656, 0.752)
pt3dadd(-115.288, 89.368, -36.698, 0.81)
pt3dadd(-115.275, 89.25, -36.715, 0.868)
pt3dadd(-115.263, 89.133, -36.732, 0.926)
pt3dadd(-115.252, 89.029, -36.781, 1.006)
pt3dadd(-115.241, 88.926, -36.832, 1.086)
pt3dadd(-115.236, 88.881, -36.918, 1.15)
pt3dadd(-115.234, 88.855, -37.016, 1.21)
pt3dadd(-115.238, 88.815, -37.106, 1.26)
pt3dadd(-115.265, 88.733, -37.176, 1.276)
pt3dadd(-115.292, 88.65, -37.245, 1.292)
pt3dadd(-115.311, 88.561, -37.306, 1.302)
pt3dadd(-115.305, 88.447, -37.335, 1.28)
pt3dadd(-115.298, 88.332, -37.364, 1.258)
pt3dadd(-115.292, 88.218, -37.389, 1.102)
pt3dadd(-115.349, 88.112, -37.391, 1.066)
pt3dadd(-115.405, 88.006, -37.394, 1.032)
pt3dadd(-115.461, 87.9, -37.396, 0.996)
pt3dadd(-115.518, 87.794, -37.398, 0.96)
pt3dadd(-115.574, 87.688, -37.4, 0.926)
pt3dadd(-115.63, 87.582, -37.4, 0.902)
pt3dadd(-115.685, 87.475, -37.4, 0.876)
pt3dadd(-115.74, 87.369, -37.4, 0.852)
pt3dadd(-115.795, 87.262, -37.4, 0.826)
pt3dadd(-115.848, 87.155, -37.4, 0.802)
pt3dadd(-115.869, 87.036, -37.4, 0.794)
pt3dadd(-115.889, 86.918, -37.4, 0.786)
pt3dadd(-115.911, 86.8, -37.4, 0.776)
pt3dadd(-115.931, 86.682, -37.4, 0.768)
pt3dadd(-115.952, 86.564, -37.4, 0.758)
pt3dadd(-115.968, 86.446, -37.408, 0.754)
pt3dadd(-115.976, 86.328, -37.426, 0.754)
pt3dadd(-115.983, 86.211, -37.445, 0.754)
pt3dadd(-115.991, 86.093, -37.464, 0.754)
pt3dadd(-115.999, 85.975, -37.483, 0.754)
pt3dadd(-116.005, 85.859, -37.504, 0.752)
pt3dadd(-115.993, 85.748, -37.541, 0.738)
pt3dadd(-115.981, 85.637, -37.578, 0.724)
pt3dadd(-115.97, 85.526, -37.616, 0.71)
pt3dadd(-115.958, 85.415, -37.653, 0.696)
pt3dadd(-115.947, 85.305, -37.69, 0.682)
pt3dadd(-115.951, 85.189, -37.714, 0.664)
pt3dadd(-115.962, 85.072, -37.733, 0.644)
pt3dadd(-115.974, 84.955, -37.752, 0.626)
pt3dadd(-115.984, 84.837, -37.772, 0.606)
pt3dadd(-115.995, 84.72, -37.791, 0.586)
pt3dadd(-115.996, 84.602, -37.8, 0.554)
pt3dadd(-115.988, 84.482, -37.8, 0.51)
pt3dadd(-115.98, 84.362, -37.8, 0.468)
pt3dadd(-115.999, 84.248, -37.786, 0.452)
pt3dadd(-116.035, 84.136, -37.763, 0.452)
pt3dadd(-116.095, 84.078, -37.707, 0.468)
pt3dadd(-116.169, 84.05, -37.632, 0.494)
pt3dadd(-116.268, 84.014, -37.632, 0.54)
pt3dadd(-116.375, 83.975, -37.661, 0.592)
pt3dadd(-116.4, 83.872, -37.685, 0.616)
pt3dadd(-116.435, 83.774, -37.708, 0.626)
pt3dadd(-116.535, 83.716, -37.736, 0.618)
pt3dadd(-116.635, 83.658, -37.763, 0.612)
pt3dadd(-116.735, 83.6, -37.79, 0.606)
pt3dadd(-116.846, 83.576, -37.811, 0.598)
pt3dadd(-116.965, 83.57, -37.828, 0.588)
pt3dadd(-117.082, 83.565, -37.846, 0.58)
pt3dadd(-117.2, 83.559, -37.863, 0.57)
pt3dadd(-117.319, 83.554, -37.881, 0.562)
pt3dadd(-117.437, 83.548, -37.898, 0.554)
pt3dadd(-117.544, 83.538, -37.939, 0.542)
pt3dadd(-117.652, 83.526, -37.984, 0.532)
pt3dadd(-117.758, 83.515, -38.029, 0.534)
pt3dadd(-117.865, 83.504, -38.073, 0.546)
pt3dadd(-117.975, 83.508, -38.106, 0.552)
pt3dadd(-118.09, 83.533, -38.122, 0.552)
}
}
proc shape3d_113() {
dend_5[3] { pt3dadd(-118.191, 83.558, -38.156, 0.552)
pt3dadd(-118.248, 83.579, -38.242, 0.552)
pt3dadd(-118.316, 83.602, -38.322, 0.55)
pt3dadd(-118.402, 83.628, -38.387, 0.542)
pt3dadd(-118.489, 83.655, -38.453, 0.534)
pt3dadd(-118.585, 83.67, -38.499, 0.53)
pt3dadd(-118.704, 83.657, -38.495, 0.538)
pt3dadd(-118.824, 83.645, -38.491, 0.548)
pt3dadd(-118.934, 83.631, -38.467, 0.556)
pt3dadd(-119.033, 83.616, -38.411, 0.564)
pt3dadd(-119.131, 83.601, -38.356, 0.574)
pt3dadd(-119.231, 83.557, -38.324, 0.578)
pt3dadd(-119.33, 83.493, -38.307, 0.578)
pt3dadd(-119.4, 83.414, -38.27, 0.566)
pt3dadd(-119.447, 83.323, -38.218, 0.544)
pt3dadd(-119.499, 83.234, -38.168, 0.52)
pt3dadd(-119.568, 83.151, -38.123, 0.492)
pt3dadd(-119.644, 83.067, -38.1, 0.468)
pt3dadd(-119.73, 82.984, -38.101, 0.454)
pt3dadd(-119.839, 82.942, -38.122, 0.502)
pt3dadd(-119.939, 82.924, -38.173, 0.572)
pt3dadd(-120.006, 82.917, -38.253, 0.578)
pt3dadd(-120.031, 82.914, -38.35, 0.6)
pt3dadd(-120.079, 82.908, -38.436, 0.64)
pt3dadd(-120.161, 82.897, -38.509, 0.666)
pt3dadd(-120.242, 82.885, -38.582, 0.692)
pt3dadd(-120.323, 82.874, -38.655, 0.718)
pt3dadd(-120.406, 82.863, -38.728, 0.744)
pt3dadd(-120.497, 82.822, -38.774, 0.786)
pt3dadd(-120.595, 82.762, -38.802, 0.838)
pt3dadd(-120.694, 82.718, -38.843, 0.872)
pt3dadd(-120.794, 82.68, -38.889, 0.898)
pt3dadd(-120.829, 82.635, -38.97, 0.904)
pt3dadd(-120.844, 82.588, -39.061, 0.904)
pt3dadd(-120.84, 82.502, -39.123, 0.904)
pt3dadd(-120.829, 82.398, -39.172, 0.904)
pt3dadd(-120.818, 82.298, -39.152, 0.904)
pt3dadd(-120.809, 82.199, -39.095, 0.904)
pt3dadd(-120.8, 82.123, -39.023, 0.904)
pt3dadd(-120.814, 82.062, -38.939, 0.904)
pt3dadd(-120.899, 81.999, -38.903, 0.904)
pt3dadd(-121.014, 81.968, -38.9, 0.86)
pt3dadd(-121.13, 81.941, -38.9, 0.752)
pt3dadd(-121.222, 81.863, -38.9, 0.694)
pt3dadd(-121.313, 81.785, -38.9, 0.636)
pt3dadd(-121.344, 81.673, -38.9, 0.61)
pt3dadd(-121.364, 81.554, -38.9, 0.59)
pt3dadd(-121.394, 81.439, -38.9, 0.592)
pt3dadd(-121.426, 81.329, -38.925, 0.614)
pt3dadd(-121.448, 81.22, -38.962, 0.63)
pt3dadd(-121.472, 81.111, -38.998, 0.648)
pt3dadd(-121.498, 81.002, -39.035, 0.664)
pt3dadd(-121.525, 80.893, -39.068, 0.68)
pt3dadd(-121.58, 80.787, -39.075, 0.696)
pt3dadd(-121.637, 80.681, -39.082, 0.712)
pt3dadd(-121.692, 80.575, -39.088, 0.728)
pt3dadd(-121.747, 80.469, -39.095, 0.742)
pt3dadd(-121.811, 80.368, -39.1, 0.76)
pt3dadd(-121.89, 80.278, -39.1, 0.784)
pt3dadd(-121.967, 80.187, -39.107, 0.804)
pt3dadd(-122.032, 80.098, -39.145, 0.804)
pt3dadd(-122.09, 80.018, -39.198, 0.792)
pt3dadd(-122.135, 79.953, -39.273, 0.764)
pt3dadd(-122.18, 79.893, -39.351, 0.736)
pt3dadd(-122.226, 79.837, -39.43, 0.708)
pt3dadd(-122.242, 79.797, -39.522, 0.694)
pt3dadd(-122.25, 79.76, -39.617, 0.682)
pt3dadd(-122.274, 79.689, -39.689, 0.678)
pt3dadd(-122.348, 79.597, -39.694, 0.678)
pt3dadd(-122.426, 79.536, -39.646, 0.644)
pt3dadd(-122.483, 79.52, -39.559, 0.556)
pt3dadd(-122.536, 79.514, -39.469, 0.478)
pt3dadd(-122.567, 79.514, -39.373, 0.416)
pt3dadd(-122.587, 79.536, -39.277, 0.338)
pt3dadd(-122.632, 79.603, -39.21, 0.254)
pt3dadd(-122.72, 79.681, -39.2, 0.32)
pt3dadd(-122.813, 79.757, -39.2, 0.394)
pt3dadd(-122.909, 79.829, -39.2, 0.452)
pt3dadd(-123.013, 79.888, -39.2, 0.498)
pt3dadd(-123.122, 79.938, -39.2, 0.532)
pt3dadd(-123.229, 79.985, -39.214, 0.576)
pt3dadd(-123.322, 80.025, -39.26, 0.628)
pt3dadd(-123.358, 80.031, -39.355, 0.614)
pt3dadd(-123.391, 80.015, -39.449, 0.512)
pt3dadd(-123.469, 79.951, -39.495, 0.4)
pt3dadd(-123.538, 79.853, -39.5, 0.402)
pt3dadd(-123.552, 79.74, -39.532, 0.414)
pt3dadd(-123.566, 79.628, -39.564, 0.426)
pt3dadd(-123.629, 79.529, -39.583, 0.426)
pt3dadd(-123.696, 79.432, -39.6, 0.426)
pt3dadd(-123.81, 79.395, -39.597, 0.412)
pt3dadd(-123.925, 79.359, -39.593, 0.396)
pt3dadd(-124.039, 79.323, -39.59, 0.382)
pt3dadd(-124.087, 79.26, -39.534, 0.348)
pt3dadd(-124.106, 79.186, -39.457, 0.308)
pt3dadd(-124.075, 79.086, -39.417, 0.27)
pt3dadd(-124.019, 78.985, -39.4, 0.232)
pt3dadd(-123.959, 78.882, -39.4, 0.226)
}
dend_5[4] {pt3dclear()
pt3dadd(-85.996, 118.346, -33.1, 0.93)
pt3dadd(-86.037, 118.39, -33.08, 0.868)
pt3dadd(-86.113, 118.471, -33.043, 0.756)
pt3dadd(-86.143, 118.479, -33.107, 0.736)
pt3dadd(-86.158, 118.461, -33.205, 0.746)
pt3dadd(-86.197, 118.446, -33.294, 0.748)
pt3dadd(-86.279, 118.437, -33.367, 0.738)
pt3dadd(-86.367, 118.428, -33.432, 0.728)
pt3dadd(-86.477, 118.416, -33.47, 0.728)
pt3dadd(-86.587, 118.405, -33.509, 0.728)
pt3dadd(-86.673, 118.396, -33.578, 0.728)
pt3dadd(-86.714, 118.383, -33.664, 0.738)
pt3dadd(-86.717, 118.367, -33.764, 0.758)
pt3dadd(-86.721, 118.352, -33.863, 0.778)
pt3dadd(-86.787, 118.3, -33.932, 0.806)
pt3dadd(-86.866, 118.255, -33.99, 0.836)
pt3dadd(-86.985, 118.242, -33.998, 0.882)
pt3dadd(-87.104, 118.23, -34.006, 0.926)
pt3dadd(-87.22, 118.218, -34.024, 0.988)
pt3dadd(-87.333, 118.206, -34.057, 1.072)
pt3dadd(-87.446, 118.194, -34.089, 1.158)
pt3dadd(-87.565, 118.181, -34.095, 1.264)
pt3dadd(-87.682, 118.171, -34.107, 1.358)
pt3dadd(-87.786, 118.177, -34.157, 1.374)
pt3dadd(-87.889, 118.185, -34.207, 1.39)
pt3dadd(-87.993, 118.191, -34.257, 1.406)
pt3dadd(-88.097, 118.197, -34.306, 1.422)
pt3dadd(-88.169, 118.228, -34.371, 1.4)
pt3dadd(-88.203, 118.288, -34.453, 1.334)
pt3dadd(-88.285, 118.315, -34.491, 1.256)
pt3dadd(-88.405, 118.319, -34.496, 1.17)
pt3dadd(-88.525, 118.322, -34.5, 1.082)
pt3dadd(-88.626, 118.258, -34.5, 0.98)
pt3dadd(-88.728, 118.194, -34.5, 0.88)
pt3dadd(-88.794, 118.121, -34.547, 0.79)
pt3dadd(-88.848, 118.046, -34.611, 0.704)
pt3dadd(-88.927, 117.998, -34.674, 0.678)
pt3dadd(-89.007, 117.949, -34.737, 0.652)
pt3dadd(-89.087, 117.901, -34.8, 0.628)
pt3dadd(-89.206, 117.888, -34.8, 0.62)
pt3dadd(-89.325, 117.876, -34.8, 0.612)
pt3dadd(-89.444, 117.863, -34.8, 0.602)
pt3dadd(-89.564, 117.867, -34.8, 0.602)
pt3dadd(-89.681, 117.895, -34.8, 0.602)
pt3dadd(-89.798, 117.921, -34.8, 0.602)
pt3dadd(-89.915, 117.948, -34.8, 0.602)
pt3dadd(-90.032, 117.974, -34.8, 0.602)
pt3dadd(-90.149, 118.001, -34.8, 0.602)
pt3dadd(-90.26, 118.021, -34.826, 0.61)
pt3dadd(-90.367, 118.036, -34.869, 0.62)
pt3dadd(-90.474, 118.05, -34.913, 0.63)
pt3dadd(-90.581, 118.066, -34.957, 0.642)
pt3dadd(-90.688, 118.081, -35, 0.654)
pt3dadd(-90.789, 118.098, -35.053, 0.68)
pt3dadd(-90.891, 118.116, -35.101, 0.706)
pt3dadd(-91.009, 118.139, -35.105, 0.726)
pt3dadd(-91.126, 118.162, -35.11, 0.748)
pt3dadd(-91.216, 118.16, -35.168, 0.744)
pt3dadd(-91.297, 118.151, -35.242, 0.732)
pt3dadd(-91.364, 118.144, -35.323, 0.736)
pt3dadd(-91.425, 118.138, -35.41, 0.748)
pt3dadd(-91.51, 118.128, -35.468, 0.774)
pt3dadd(-91.625, 118.116, -35.496, 0.822)
pt3dadd(-91.729, 118.113, -35.545, 0.846)
pt3dadd(-91.831, 118.11, -35.597, 0.866)
pt3dadd(-91.933, 118.107, -35.65, 0.888)
pt3dadd(-92.035, 118.105, -35.703, 0.908)
pt3dadd(-92.137, 118.103, -35.755, 0.93)
pt3dadd(-92.254, 118.108, -35.777, 0.924)
pt3dadd(-92.371, 118.113, -35.798, 0.92)
pt3dadd(-92.488, 118.119, -35.819, 0.914)
pt3dadd(-92.606, 118.124, -35.84, 0.91)
pt3dadd(-92.723, 118.13, -35.861, 0.906)
pt3dadd(-92.836, 118.155, -35.885, 0.88)
pt3dadd(-92.947, 118.186, -35.912, 0.848)
pt3dadd(-93.058, 118.218, -35.938, 0.816)
pt3dadd(-93.169, 118.25, -35.965, 0.782)
pt3dadd(-93.28, 118.284, -35.989, 0.744)
pt3dadd(-93.388, 118.337, -35.995, 0.662)
pt3dadd(-93.496, 118.389, -36, 0.578)
pt3dadd(-93.612, 118.417, -36, 0.546)
pt3dadd(-93.729, 118.444, -36, 0.514)
pt3dadd(-93.84, 118.487, -36.011, 0.51)
pt3dadd(-93.947, 118.537, -36.028, 0.524)
pt3dadd(-94.037, 118.557, -36.083, 0.556)
pt3dadd(-94.118, 118.563, -36.156, 0.596)
pt3dadd(-94.213, 118.51, -36.189, 0.652)
pt3dadd(-94.311, 118.457, -36.224, 0.688)
pt3dadd(-94.409, 118.41, -36.267, 0.704)
pt3dadd(-94.507, 118.364, -36.31, 0.722)
pt3dadd(-94.605, 118.317, -36.352, 0.738)
pt3dadd(-94.706, 118.275, -36.393, 0.756)
pt3dadd(-94.819, 118.263, -36.423, 0.774)
pt3dadd(-94.933, 118.251, -36.453, 0.792)
pt3dadd(-95.047, 118.239, -36.483, 0.81)
pt3dadd(-95.161, 118.227, -36.512, 0.828)
pt3dadd(-95.275, 118.215, -36.542, 0.846)
pt3dadd(-95.383, 118.204, -36.583, 0.88)
pt3dadd(-95.486, 118.193, -36.634, 0.924)
pt3dadd(-95.583, 118.183, -36.691, 0.976)
pt3dadd(-95.671, 118.174, -36.759, 1.034)
pt3dadd(-95.739, 118.167, -36.835, 1.086)
}
}
proc shape3d_114() {
dend_5[4] { pt3dadd(-95.743, 118.166, -36.935, 1.112)
pt3dadd(-95.748, 118.166, -37.035, 1.138)
pt3dadd(-95.756, 118.152, -37.132, 1.164)
pt3dadd(-95.771, 118.113, -37.226, 1.186)
pt3dadd(-95.789, 118.06, -37.31, 1.2)
pt3dadd(-95.823, 117.961, -37.359, 1.172)
pt3dadd(-95.839, 117.855, -37.394, 1.112)
pt3dadd(-95.826, 117.736, -37.4, 0.98)
pt3dadd(-95.814, 117.617, -37.4, 0.842)
pt3dadd(-95.801, 117.498, -37.4, 0.754)
pt3dadd(-95.789, 117.378, -37.4, 0.728)
pt3dadd(-95.783, 117.258, -37.4, 0.742)
pt3dadd(-95.798, 117.14, -37.4, 0.756)
pt3dadd(-95.822, 117.023, -37.4, 0.76)
pt3dadd(-95.846, 116.904, -37.4, 0.766)
pt3dadd(-95.87, 116.787, -37.4, 0.77)
pt3dadd(-95.893, 116.669, -37.4, 0.774)
pt3dadd(-95.917, 116.552, -37.401, 0.778)
pt3dadd(-95.939, 116.447, -37.445, 0.79)
pt3dadd(-95.961, 116.342, -37.491, 0.802)
pt3dadd(-95.983, 116.237, -37.535, 0.812)
pt3dadd(-96.005, 116.132, -37.58, 0.824)
pt3dadd(-96.01, 116.028, -37.629, 0.838)
pt3dadd(-96.002, 115.925, -37.68, 0.852)
pt3dadd(-95.994, 115.822, -37.73, 0.868)
pt3dadd(-95.986, 115.719, -37.781, 0.882)
pt3dadd(-95.978, 115.616, -37.832, 0.896)
pt3dadd(-96, 115.514, -37.874, 0.908)
pt3dadd(-96.048, 115.412, -37.907, 0.914)
pt3dadd(-96.097, 115.309, -37.941, 0.918)
pt3dadd(-96.146, 115.208, -37.974, 0.924)
pt3dadd(-96.198, 115.108, -38.009, 0.932)
pt3dadd(-96.264, 115.019, -38.047, 0.946)
pt3dadd(-96.344, 114.941, -38.077, 0.954)
pt3dadd(-96.441, 114.875, -38.1, 0.954)
pt3dadd(-96.544, 114.834, -38.132, 0.954)
pt3dadd(-96.652, 114.817, -38.173, 0.954)
pt3dadd(-96.749, 114.803, -38.226, 0.942)
pt3dadd(-96.824, 114.795, -38.304, 0.908)
pt3dadd(-96.901, 114.786, -38.38, 0.874)
pt3dadd(-96.989, 114.773, -38.447, 0.844)
pt3dadd(-97.076, 114.76, -38.514, 0.816)
pt3dadd(-97.164, 114.747, -38.582, 0.786)
pt3dadd(-97.226, 114.665, -38.604, 0.752)
pt3dadd(-97.278, 114.556, -38.609, 0.716)
pt3dadd(-97.29, 114.444, -38.628, 0.684)
pt3dadd(-97.294, 114.33, -38.659, 0.688)
pt3dadd(-97.301, 114.217, -38.69, 0.7)
pt3dadd(-97.332, 114.104, -38.7, 0.71)
pt3dadd(-97.374, 113.991, -38.7, 0.722)
pt3dadd(-97.415, 113.883, -38.716, 0.74)
pt3dadd(-97.454, 113.778, -38.752, 0.768)
pt3dadd(-97.532, 113.702, -38.776, 0.778)
pt3dadd(-97.636, 113.645, -38.792, 0.778)
pt3dadd(-97.737, 113.583, -38.805, 0.778)
pt3dadd(-97.835, 113.513, -38.815, 0.778)
pt3dadd(-97.932, 113.445, -38.824, 0.778)
pt3dadd(-98.025, 113.374, -38.836, 0.776)
pt3dadd(-98.058, 113.27, -38.878, 0.75)
pt3dadd(-98.095, 113.167, -38.919, 0.72)
pt3dadd(-98.153, 113.114, -38.985, 0.696)
pt3dadd(-98.211, 113.088, -39.069, 0.682)
pt3dadd(-98.266, 113.025, -39.137, 0.678)
pt3dadd(-98.319, 112.942, -39.194, 0.678)
pt3dadd(-98.35, 112.829, -39.2, 0.678)
pt3dadd(-98.377, 112.713, -39.2, 0.678)
pt3dadd(-98.417, 112.6, -39.2, 0.678)
pt3dadd(-98.467, 112.491, -39.2, 0.678)
pt3dadd(-98.528, 112.393, -39.213, 0.678)
pt3dadd(-98.609, 112.317, -39.25, 0.678)
pt3dadd(-98.691, 112.242, -39.287, 0.678)
pt3dadd(-98.765, 112.188, -39.342, 0.678)
pt3dadd(-98.828, 112.176, -39.426, 0.678)
pt3dadd(-98.905, 112.163, -39.492, 0.678)
pt3dadd(-99.018, 112.149, -39.517, 0.674)
pt3dadd(-99.123, 112.131, -39.564, 0.662)
pt3dadd(-99.215, 112.104, -39.617, 0.65)
pt3dadd(-99.26, 112.039, -39.692, 0.636)
pt3dadd(-99.302, 111.97, -39.766, 0.628)
pt3dadd(-99.34, 111.9, -39.841, 0.628)
pt3dadd(-99.375, 111.801, -39.877, 0.652)
pt3dadd(-99.408, 111.687, -39.893, 0.688)
pt3dadd(-99.434, 111.575, -39.919, 0.726)
pt3dadd(-99.455, 111.463, -39.953, 0.762)
pt3dadd(-99.475, 111.352, -39.986, 0.8)
pt3dadd(-99.489, 111.258, -40.035, 0.846)
pt3dadd(-99.484, 111.212, -40.127, 0.912)
pt3dadd(-99.479, 111.165, -40.219, 0.976)
pt3dadd(-99.468, 111.052, -40.245, 1.008)
pt3dadd(-99.455, 110.936, -40.268, 1.038)
pt3dadd(-99.443, 110.82, -40.292, 1.07)
pt3dadd(-99.434, 110.702, -40.3, 1.086)
pt3dadd(-99.426, 110.582, -40.3, 1.094)
pt3dadd(-99.418, 110.462, -40.3, 1.102)
pt3dadd(-99.469, 110.359, -40.3, 1.078)
pt3dadd(-99.54, 110.262, -40.3, 1.042)
pt3dadd(-99.61, 110.164, -40.3, 1.006)
pt3dadd(-99.711, 110.102, -40.305, 0.952)
pt3dadd(-99.815, 110.043, -40.31, 0.894)
pt3dadd(-99.887, 109.965, -40.349, 0.794)
pt3dadd(-99.948, 109.881, -40.4, 0.678)
}
dend_5[5] {pt3dclear()
pt3dadd(-27.948, 159.198, -21.767, 1.582)
pt3dadd(-28.053, 159.187, -21.771, 1.556)
pt3dadd(-28.172, 159.174, -21.776, 1.526)
pt3dadd(-28.291, 159.162, -21.781, 1.496)
pt3dadd(-28.41, 159.149, -21.786, 1.466)
pt3dadd(-28.529, 159.137, -21.791, 1.436)
pt3dadd(-28.648, 159.124, -21.796, 1.406)
pt3dadd(-28.767, 159.112, -21.806, 1.376)
pt3dadd(-28.881, 159.1, -21.836, 1.348)
pt3dadd(-28.994, 159.088, -21.866, 1.322)
pt3dadd(-29.108, 159.076, -21.896, 1.294)
pt3dadd(-29.222, 159.064, -21.925, 1.268)
pt3dadd(-29.336, 159.052, -21.955, 1.24)
pt3dadd(-29.448, 159.018, -21.971, 1.228)
pt3dadd(-29.558, 158.971, -21.977, 1.222)
pt3dadd(-29.668, 158.926, -21.983, 1.218)
pt3dadd(-29.779, 158.879, -21.989, 1.214)
pt3dadd(-29.889, 158.832, -21.995, 1.208)
pt3dadd(-30.001, 158.791, -22, 1.206)
pt3dadd(-30.119, 158.772, -22, 1.206)
pt3dadd(-30.238, 158.75, -22, 1.206)
pt3dadd(-30.356, 158.73, -22, 1.206)
pt3dadd(-30.474, 158.708, -22, 1.206)
pt3dadd(-30.592, 158.689, -22, 1.206)
pt3dadd(-30.711, 158.669, -22, 1.206)
pt3dadd(-30.828, 158.653, -22.011, 1.194)
pt3dadd(-30.946, 158.641, -22.028, 1.178)
pt3dadd(-31.064, 158.629, -22.044, 1.16)
pt3dadd(-31.182, 158.616, -22.061, 1.144)
pt3dadd(-31.299, 158.604, -22.077, 1.128)
pt3dadd(-31.417, 158.592, -22.094, 1.112)
pt3dadd(-31.533, 158.567, -22.1, 1.088)
pt3dadd(-31.649, 158.536, -22.1, 1.058)
pt3dadd(-31.765, 158.503, -22.1, 1.03)
pt3dadd(-31.881, 158.472, -22.1, 1)
pt3dadd(-31.996, 158.44, -22.1, 0.972)
pt3dadd(-32.112, 158.407, -22.1, 0.942)
pt3dadd(-32.229, 158.386, -22.1, 0.926)
pt3dadd(-32.349, 158.374, -22.1, 0.918)
pt3dadd(-32.468, 158.36, -22.1, 0.912)
pt3dadd(-32.587, 158.348, -22.1, 0.904)
pt3dadd(-32.707, 158.335, -22.1, 0.896)
pt3dadd(-32.826, 158.323, -22.1, 0.89)
pt3dadd(-32.946, 158.31, -22.1, 0.882)
pt3dadd(-33.065, 158.298, -22.1, 0.888)
pt3dadd(-33.184, 158.285, -22.1, 0.906)
pt3dadd(-33.303, 158.273, -22.1, 0.924)
pt3dadd(-33.423, 158.26, -22.1, 0.942)
pt3dadd(-33.542, 158.248, -22.1, 0.96)
pt3dadd(-33.662, 158.236, -22.1, 0.978)
pt3dadd(-33.781, 158.222, -22.1, 0.996)
pt3dadd(-33.9, 158.21, -22.1, 1.022)
pt3dadd(-34.02, 158.197, -22.1, 1.054)
pt3dadd(-34.139, 158.185, -22.1, 1.086)
pt3dadd(-34.258, 158.172, -22.1, 1.118)
pt3dadd(-34.378, 158.16, -22.1, 1.15)
pt3dadd(-34.497, 158.147, -22.1, 1.182)
pt3dadd(-34.616, 158.135, -22.1, 1.214)
pt3dadd(-34.736, 158.123, -22.1, 1.238)
pt3dadd(-34.855, 158.11, -22.1, 1.252)
pt3dadd(-34.974, 158.098, -22.1, 1.266)
pt3dadd(-35.094, 158.084, -22.1, 1.28)
pt3dadd(-35.213, 158.072, -22.1, 1.296)
pt3dadd(-35.332, 158.059, -22.1, 1.31)
pt3dadd(-35.452, 158.047, -22.1, 1.324)
pt3dadd(-35.571, 158.034, -22.1, 1.328)
pt3dadd(-35.69, 158.022, -22.1, 1.32)
pt3dadd(-35.81, 158.009, -22.1, 1.312)
pt3dadd(-35.929, 157.997, -22.1, 1.306)
pt3dadd(-36.048, 157.985, -22.1, 1.298)
pt3dadd(-36.168, 157.972, -22.1, 1.292)
pt3dadd(-36.287, 157.96, -22.1, 1.284)
pt3dadd(-36.406, 157.946, -22.1, 1.268)
pt3dadd(-36.526, 157.934, -22.1, 1.242)
pt3dadd(-36.645, 157.921, -22.1, 1.218)
pt3dadd(-36.764, 157.909, -22.1, 1.192)
pt3dadd(-36.884, 157.896, -22.1, 1.168)
pt3dadd(-37.003, 157.884, -22.1, 1.142)
pt3dadd(-37.122, 157.871, -22.1, 1.116)
pt3dadd(-37.242, 157.859, -22.1, 1.096)
pt3dadd(-37.361, 157.847, -22.1, 1.078)
pt3dadd(-37.48, 157.834, -22.1, 1.06)
pt3dadd(-37.6, 157.822, -22.1, 1.042)
pt3dadd(-37.719, 157.808, -22.1, 1.024)
pt3dadd(-37.839, 157.796, -22.1, 1.006)
pt3dadd(-37.958, 157.783, -22.1, 0.988)
pt3dadd(-38.077, 157.782, -22.1, 0.966)
pt3dadd(-38.197, 157.788, -22.1, 0.942)
pt3dadd(-38.317, 157.795, -22.1, 0.916)
pt3dadd(-38.437, 157.804, -22.1, 0.892)
pt3dadd(-38.556, 157.81, -22.1, 0.868)
pt3dadd(-38.676, 157.818, -22.1, 0.842)
pt3dadd(-38.796, 157.816, -22.1, 0.826)
pt3dadd(-38.915, 157.804, -22.1, 0.818)
pt3dadd(-39.035, 157.792, -22.1, 0.812)
pt3dadd(-39.154, 157.778, -22.1, 0.804)
pt3dadd(-39.273, 157.766, -22.1, 0.796)
pt3dadd(-39.393, 157.753, -22.1, 0.79)
pt3dadd(-39.512, 157.741, -22.1, 0.782)
}
}
proc shape3d_115() {
dend_5[5] { pt3dadd(-39.631, 157.728, -22.1, 0.774)
pt3dadd(-39.751, 157.716, -22.1, 0.762)
pt3dadd(-39.87, 157.703, -22.1, 0.752)
pt3dadd(-39.989, 157.691, -22.1, 0.742)
pt3dadd(-40.109, 157.678, -22.1, 0.73)
pt3dadd(-40.228, 157.666, -22.1, 0.72)
pt3dadd(-40.347, 157.654, -22.1, 0.71)
pt3dadd(-40.464, 157.631, -22.107, 0.706)
pt3dadd(-40.577, 157.596, -22.124, 0.71)
pt3dadd(-40.69, 157.561, -22.141, 0.714)
pt3dadd(-40.803, 157.526, -22.158, 0.72)
pt3dadd(-40.916, 157.492, -22.175, 0.724)
pt3dadd(-41.03, 157.46, -22.189, 0.728)
pt3dadd(-41.15, 157.448, -22.191, 0.728)
pt3dadd(-41.269, 157.435, -22.192, 0.728)
pt3dadd(-41.388, 157.423, -22.194, 0.728)
pt3dadd(-41.508, 157.41, -22.196, 0.728)
pt3dadd(-41.627, 157.398, -22.197, 0.728)
pt3dadd(-41.746, 157.385, -22.199, 0.728)
pt3dadd(-41.866, 157.374, -22.2, 0.73)
pt3dadd(-41.985, 157.368, -22.2, 0.732)
pt3dadd(-42.105, 157.361, -22.2, 0.736)
pt3dadd(-42.225, 157.355, -22.2, 0.74)
pt3dadd(-42.345, 157.348, -22.2, 0.744)
pt3dadd(-42.465, 157.342, -22.2, 0.748)
pt3dadd(-42.585, 157.334, -22.2, 0.752)
pt3dadd(-42.705, 157.332, -22.2, 0.756)
pt3dadd(-42.825, 157.332, -22.2, 0.76)
pt3dadd(-42.945, 157.332, -22.2, 0.764)
pt3dadd(-43.065, 157.332, -22.2, 0.768)
pt3dadd(-43.185, 157.332, -22.2, 0.772)
pt3dadd(-43.305, 157.332, -22.2, 0.776)
pt3dadd(-43.425, 157.331, -22.2, 0.782)
pt3dadd(-43.545, 157.327, -22.2, 0.798)
pt3dadd(-43.664, 157.322, -22.2, 0.812)
pt3dadd(-43.784, 157.319, -22.2, 0.828)
pt3dadd(-43.904, 157.313, -22.2, 0.842)
pt3dadd(-44.024, 157.309, -22.2, 0.858)
pt3dadd(-44.144, 157.304, -22.2, 0.874)
pt3dadd(-44.257, 157.333, -22.2, 0.894)
pt3dadd(-44.367, 157.382, -22.2, 0.92)
pt3dadd(-44.477, 157.432, -22.2, 0.944)
pt3dadd(-44.586, 157.481, -22.2, 0.968)
pt3dadd(-44.696, 157.529, -22.2, 0.992)
pt3dadd(-44.805, 157.579, -22.2, 1.014)
pt3dadd(-44.913, 157.632, -22.2, 1.034)
pt3dadd(-45.021, 157.684, -22.2, 1.054)
pt3dadd(-45.129, 157.735, -22.2, 1.074)
pt3dadd(-45.237, 157.787, -22.2, 1.094)
pt3dadd(-45.351, 157.817, -22.2, 1.104)
pt3dadd(-45.471, 157.82, -22.2, 1.104)
pt3dadd(-45.591, 157.823, -22.2, 1.104)
pt3dadd(-45.71, 157.813, -22.2, 1.098)
pt3dadd(-45.83, 157.801, -22.2, 1.09)
pt3dadd(-45.949, 157.788, -22.2, 1.082)
pt3dadd(-46.06, 157.746, -22.2, 1.08)
pt3dadd(-46.169, 157.696, -22.2, 1.08)
pt3dadd(-46.248, 157.619, -22.2, 1.08)
pt3dadd(-46.283, 157.505, -22.2, 1.08)
pt3dadd(-46.326, 157.397, -22.2, 1.08)
pt3dadd(-46.437, 157.352, -22.2, 1.08)
pt3dadd(-46.548, 157.307, -22.2, 1.08)
pt3dadd(-46.66, 157.262, -22.2, 1.08)
pt3dadd(-46.771, 157.217, -22.2, 1.08)
pt3dadd(-46.882, 157.172, -22.2, 1.068)
pt3dadd(-46.993, 157.127, -22.2, 1.058)
pt3dadd(-47.105, 157.082, -22.2, 1.054)
pt3dadd(-47.208, 157.042, -22.234, 1.05)
pt3dadd(-47.31, 157.002, -22.275, 1.044)
pt3dadd(-47.411, 156.961, -22.317, 1.04)
pt3dadd(-47.513, 156.922, -22.358, 1.034)
pt3dadd(-47.601, 156.864, -22.393, 1.01)
pt3dadd(-47.681, 156.782, -22.4, 0.96)
pt3dadd(-47.796, 156.751, -22.4, 0.978)
pt3dadd(-47.915, 156.737, -22.4, 1.052)
pt3dadd(-48.035, 156.725, -22.4, 1.126)
pt3dadd(-48.154, 156.712, -22.4, 1.178)
pt3dadd(-48.273, 156.7, -22.4, 1.18)
pt3dadd(-48.393, 156.703, -22.4, 1.126)
pt3dadd(-48.49, 156.763, -22.4, 1.09)
pt3dadd(-48.533, 156.874, -22.4, 1.136)
pt3dadd(-48.551, 156.992, -22.4, 1.206)
pt3dadd(-48.573, 157.11, -22.4, 1.212)
pt3dadd(-48.63, 157.213, -22.4, 1.128)
pt3dadd(-48.748, 157.224, -22.415, 1.052)
pt3dadd(-48.867, 157.235, -22.429, 0.974)
pt3dadd(-48.977, 157.26, -22.459, 0.954)
pt3dadd(-49.085, 157.291, -22.494, 0.954)
pt3dadd(-49.202, 157.313, -22.5, 1.156)
pt3dadd(-49.321, 157.302, -22.5, 1.21)
pt3dadd(-49.441, 157.291, -22.5, 1.264)
pt3dadd(-49.56, 157.28, -22.5, 1.32)
pt3dadd(-49.68, 157.27, -22.5, 1.374)
pt3dadd(-49.8, 157.259, -22.5, 1.428)
pt3dadd(-49.919, 157.249, -22.5, 1.484)
pt3dadd(-50.037, 157.234, -22.5, 1.536)
pt3dadd(-50.145, 157.18, -22.5, 1.568)
pt3dadd(-50.252, 157.127, -22.5, 1.6)
pt3dadd(-50.36, 157.074, -22.5, 1.632)
pt3dadd(-50.468, 157.02, -22.5, 1.664)
pt3dadd(-50.575, 156.966, -22.5, 1.698)
pt3dadd(-50.683, 156.916, -22.5, 1.696)
pt3dadd(-50.793, 156.865, -22.5, 1.678)
pt3dadd(-50.901, 156.815, -22.5, 1.66)
pt3dadd(-51.01, 156.766, -22.5, 1.64)
pt3dadd(-51.119, 156.714, -22.5, 1.622)
pt3dadd(-51.229, 156.665, -22.5, 1.6)
pt3dadd(-51.342, 156.626, -22.5, 1.548)
pt3dadd(-51.455, 156.587, -22.5, 1.496)
pt3dadd(-51.569, 156.547, -22.5, 1.444)
pt3dadd(-51.682, 156.508, -22.5, 1.392)
pt3dadd(-51.795, 156.468, -22.5, 1.34)
pt3dadd(-51.911, 156.437, -22.5, 1.292)
pt3dadd(-52.03, 156.422, -22.5, 1.248)
pt3dadd(-52.149, 156.408, -22.5, 1.204)
pt3dadd(-52.268, 156.394, -22.5, 1.16)
pt3dadd(-52.387, 156.379, -22.5, 1.116)
pt3dadd(-52.506, 156.365, -22.5, 1.072)
pt3dadd(-52.625, 156.35, -22.5, 1.028)
pt3dadd(-52.743, 156.33, -22.5, 0.99)
pt3dadd(-52.86, 156.299, -22.5, 0.958)
pt3dadd(-52.976, 156.27, -22.5, 0.926)
pt3dadd(-53.092, 156.24, -22.5, 0.892)
pt3dadd(-53.208, 156.211, -22.5, 0.86)
pt3dadd(-53.325, 156.181, -22.5, 0.828)
pt3dadd(-53.442, 156.156, -22.5, 0.794)
pt3dadd(-53.561, 156.144, -22.5, 0.762)
pt3dadd(-53.681, 156.131, -22.5, 0.728)
pt3dadd(-53.8, 156.119, -22.501, 0.7)
pt3dadd(-53.919, 156.106, -22.505, 0.692)
pt3dadd(-54.038, 156.094, -22.509, 0.684)
pt3dadd(-54.149, 156.066, -22.527, 0.682)
pt3dadd(-54.243, 156.013, -22.569, 0.696)
pt3dadd(-54.338, 155.97, -22.618, 0.722)
pt3dadd(-54.432, 155.94, -22.675, 0.762)
pt3dadd(-54.506, 155.905, -22.746, 0.824)
pt3dadd(-54.582, 155.874, -22.814, 0.882)
pt3dadd(-54.687, 155.852, -22.859, 0.894)
pt3dadd(-54.792, 155.832, -22.903, 0.904)
pt3dadd(-54.898, 155.813, -22.948, 0.916)
pt3dadd(-55.003, 155.791, -22.993, 0.928)
pt3dadd(-55.119, 155.807, -23.004, 0.92)
pt3dadd(-55.237, 155.83, -23.009, 0.91)
pt3dadd(-55.352, 155.834, -23.028, 0.892)
pt3dadd(-55.465, 155.822, -23.061, 0.872)
pt3dadd(-55.578, 155.808, -23.09, 0.854)
pt3dadd(-55.695, 155.78, -23.094, 0.854)
pt3dadd(-55.811, 155.753, -23.098, 0.854)
pt3dadd(-55.899, 155.684, -23.09, 0.862)
pt3dadd(-55.965, 155.587, -23.073, 0.874)
pt3dadd(-55.986, 155.48, -23.042, 0.89)
pt3dadd(-56.002, 155.375, -23.011, 0.908)
pt3dadd(-56.089, 155.293, -23.008, 0.922)
pt3dadd(-56.176, 155.21, -23.006, 0.938)
pt3dadd(-56.263, 155.128, -23.004, 0.954)
pt3dadd(-56.35, 155.045, -23.002, 0.968)
pt3dadd(-56.443, 154.97, -23, 0.99)
pt3dadd(-56.55, 154.918, -23, 1.026)
pt3dadd(-56.658, 154.864, -23, 1.064)
pt3dadd(-56.765, 154.811, -23, 1.1)
pt3dadd(-56.873, 154.758, -23, 1.138)
pt3dadd(-56.981, 154.704, -23, 1.174)
pt3dadd(-57.098, 154.686, -23, 1.216)
pt3dadd(-57.217, 154.673, -23, 1.26)
pt3dadd(-57.337, 154.661, -23, 1.302)
pt3dadd(-57.456, 154.649, -23, 1.346)
pt3dadd(-57.575, 154.636, -23, 1.388)
pt3dadd(-57.695, 154.624, -23, 1.432)
pt3dadd(-57.814, 154.61, -23, 1.476)
pt3dadd(-57.933, 154.598, -23, 1.552)
pt3dadd(-58.053, 154.585, -23, 1.636)
pt3dadd(-58.172, 154.573, -23, 1.72)
pt3dadd(-58.291, 154.556, -23, 1.762)
pt3dadd(-58.41, 154.54, -23, 1.796)
pt3dadd(-58.529, 154.523, -23, 1.832)
pt3dadd(-58.621, 154.447, -23, 1.834)
pt3dadd(-58.713, 154.369, -23, 1.834)
pt3dadd(-58.788, 154.277, -23, 1.804)
pt3dadd(-58.86, 154.181, -23, 1.77)
pt3dadd(-58.961, 154.135, -22.986, 1.694)
pt3dadd(-59.076, 154.114, -22.963, 1.602)
pt3dadd(-59.177, 154.078, -22.92, 1.542)
pt3dadd(-59.279, 154.04, -22.876, 1.482)
pt3dadd(-59.38, 154.003, -22.833, 1.422)
pt3dadd(-59.481, 153.966, -22.789, 1.362)
pt3dadd(-59.589, 153.942, -22.752, 1.304)
pt3dadd(-59.703, 153.93, -22.722, 1.25)
pt3dadd(-59.817, 153.918, -22.692, 1.196)
pt3dadd(-59.931, 153.906, -22.662, 1.142)
pt3dadd(-60.045, 153.894, -22.633, 1.088)
pt3dadd(-60.159, 153.882, -22.603, 1.034)
pt3dadd(-60.277, 153.869, -22.6, 1)
pt3dadd(-60.397, 153.857, -22.6, 0.968)
pt3dadd(-60.516, 153.844, -22.6, 0.936)
pt3dadd(-60.635, 153.832, -22.6, 0.904)
pt3dadd(-60.755, 153.818, -22.6, 0.872)
pt3dadd(-60.874, 153.806, -22.6, 0.838)
pt3dadd(-60.993, 153.793, -22.6, 0.806)
pt3dadd(-61.111, 153.781, -22.615, 0.788)
pt3dadd(-61.229, 153.769, -22.631, 0.772)
}
}
proc shape3d_116() {
dend_5[5] { pt3dadd(-61.347, 153.757, -22.648, 0.756)
pt3dadd(-61.464, 153.744, -22.664, 0.74)
pt3dadd(-61.582, 153.732, -22.681, 0.722)
pt3dadd(-61.7, 153.72, -22.697, 0.706)
pt3dadd(-61.819, 153.707, -22.7, 0.7)
pt3dadd(-61.938, 153.695, -22.7, 0.696)
pt3dadd(-62.058, 153.682, -22.7, 0.692)
pt3dadd(-62.177, 153.67, -22.7, 0.69)
pt3dadd(-62.296, 153.656, -22.7, 0.686)
pt3dadd(-62.416, 153.644, -22.7, 0.682)
pt3dadd(-62.535, 153.631, -22.7, 0.678)
pt3dadd(-62.654, 153.619, -22.7, 0.678)
pt3dadd(-62.774, 153.607, -22.7, 0.678)
pt3dadd(-62.893, 153.594, -22.7, 0.678)
pt3dadd(-63.012, 153.582, -22.7, 0.678)
pt3dadd(-63.132, 153.569, -22.7, 0.678)
pt3dadd(-63.251, 153.557, -22.7, 0.678)
pt3dadd(-63.37, 153.544, -22.7, 0.678)
pt3dadd(-63.488, 153.521, -22.7, 0.682)
pt3dadd(-63.606, 153.497, -22.7, 0.686)
pt3dadd(-63.723, 153.47, -22.7, 0.69)
pt3dadd(-63.84, 153.446, -22.7, 0.694)
pt3dadd(-63.958, 153.421, -22.7, 0.696)
pt3dadd(-64.075, 153.396, -22.7, 0.702)
pt3dadd(-64.185, 153.352, -22.7, 0.708)
pt3dadd(-64.286, 153.288, -22.7, 0.718)
pt3dadd(-64.387, 153.223, -22.7, 0.726)
pt3dadd(-64.488, 153.16, -22.7, 0.736)
pt3dadd(-64.59, 153.095, -22.7, 0.746)
pt3dadd(-64.694, 153.038, -22.7, 0.756)
pt3dadd(-64.81, 153.006, -22.7, 0.768)
pt3dadd(-64.926, 152.974, -22.7, 0.782)
pt3dadd(-65.041, 152.942, -22.7, 0.794)
pt3dadd(-65.157, 152.91, -22.7, 0.806)
pt3dadd(-65.273, 152.879, -22.7, 0.818)
pt3dadd(-65.387, 152.843, -22.7, 0.832)
pt3dadd(-65.497, 152.796, -22.7, 0.85)
pt3dadd(-65.608, 152.748, -22.7, 0.868)
pt3dadd(-65.718, 152.701, -22.7, 0.886)
pt3dadd(-65.828, 152.653, -22.7, 0.904)
pt3dadd(-65.938, 152.605, -22.7, 0.922)
pt3dadd(-66.049, 152.564, -22.689, 0.938)
pt3dadd(-66.162, 152.531, -22.67, 0.952)
pt3dadd(-66.274, 152.495, -22.651, 0.966)
pt3dadd(-66.387, 152.46, -22.631, 0.98)
pt3dadd(-66.499, 152.425, -22.612, 0.996)
pt3dadd(-66.614, 152.396, -22.6, 1.008)
pt3dadd(-66.732, 152.377, -22.6, 1.02)
pt3dadd(-66.851, 152.359, -22.6, 1.032)
pt3dadd(-66.97, 152.34, -22.6, 1.042)
pt3dadd(-67.088, 152.322, -22.6, 1.054)
pt3dadd(-67.207, 152.303, -22.6, 1.066)
pt3dadd(-67.325, 152.285, -22.6, 1.076)
pt3dadd(-67.436, 152.243, -22.6, 1.08)
pt3dadd(-67.544, 152.19, -22.6, 1.08)
pt3dadd(-67.651, 152.136, -22.6, 1.08)
pt3dadd(-67.759, 152.083, -22.6, 1.08)
pt3dadd(-67.867, 152.03, -22.6, 1.08)
pt3dadd(-67.976, 151.987, -22.595, 1.082)
pt3dadd(-68.093, 151.973, -22.574, 1.09)
pt3dadd(-68.209, 151.958, -22.553, 1.1)
pt3dadd(-68.326, 151.943, -22.531, 1.108)
pt3dadd(-68.442, 151.928, -22.51, 1.116)
pt3dadd(-68.558, 151.914, -22.489, 1.126)
pt3dadd(-68.661, 151.904, -22.446, 1.136)
pt3dadd(-68.745, 151.903, -22.375, 1.148)
pt3dadd(-68.842, 151.914, -22.327, 1.16)
pt3dadd(-68.956, 151.949, -22.311, 1.172)
pt3dadd(-69.071, 151.963, -22.3, 1.17)
pt3dadd(-69.188, 151.94, -22.3, 1.142)
pt3dadd(-69.306, 151.918, -22.3, 1.112)
pt3dadd(-69.399, 151.847, -22.3, 1.078)
pt3dadd(-69.484, 151.763, -22.3, 1.042)
pt3dadd(-69.588, 151.709, -22.3, 1.01)
pt3dadd(-69.702, 151.673, -22.3, 0.982)
pt3dadd(-69.821, 151.66, -22.3, 0.98)
pt3dadd(-69.941, 151.646, -22.3, 0.98)
pt3dadd(-70.06, 151.634, -22.3, 0.98)
pt3dadd(-70.179, 151.621, -22.3, 0.98)
pt3dadd(-70.299, 151.609, -22.3, 0.98)
pt3dadd(-70.418, 151.597, -22.3, 0.98)
pt3dadd(-70.537, 151.584, -22.3, 0.98)
pt3dadd(-70.657, 151.572, -22.3, 0.976)
pt3dadd(-70.776, 151.559, -22.3, 0.972)
pt3dadd(-70.895, 151.547, -22.3, 0.968)
pt3dadd(-71.015, 151.534, -22.3, 0.966)
pt3dadd(-71.134, 151.522, -22.3, 0.962)
pt3dadd(-71.253, 151.508, -22.3, 0.958)
pt3dadd(-71.373, 151.496, -22.3, 0.954)
pt3dadd(-71.478, 151.445, -22.32, 0.954)
pt3dadd(-71.583, 151.392, -22.341, 0.954)
pt3dadd(-71.687, 151.339, -22.362, 0.954)
pt3dadd(-71.792, 151.285, -22.383, 0.954)
pt3dadd(-71.899, 151.238, -22.4, 0.954)
pt3dadd(-72.017, 151.22, -22.4, 0.95)
pt3dadd(-72.136, 151.201, -22.4, 0.946)
pt3dadd(-72.254, 151.183, -22.4, 0.942)
pt3dadd(-72.373, 151.164, -22.4, 0.938)
pt3dadd(-72.491, 151.146, -22.4, 0.934)
pt3dadd(-72.61, 151.127, -22.4, 0.93)
pt3dadd(-72.729, 151.114, -22.403, 0.928)
pt3dadd(-72.849, 151.104, -22.408, 0.924)
pt3dadd(-72.968, 151.092, -22.413, 0.92)
pt3dadd(-73.087, 151.082, -22.418, 0.916)
pt3dadd(-73.206, 151.072, -22.423, 0.912)
pt3dadd(-73.326, 151.061, -22.428, 0.908)
pt3dadd(-73.445, 151.05, -22.433, 0.904)
pt3dadd(-73.558, 151.06, -22.466, 0.884)
pt3dadd(-73.67, 151.07, -22.5, 0.864)
pt3dadd(-73.782, 151.08, -22.535, 0.842)
pt3dadd(-73.894, 151.091, -22.569, 0.822)
pt3dadd(-74.007, 151.099, -22.6, 0.802)
pt3dadd(-74.127, 151.086, -22.6, 0.786)
pt3dadd(-74.246, 151.074, -22.6, 0.768)
pt3dadd(-74.365, 151.061, -22.6, 0.754)
pt3dadd(-74.484, 151.049, -22.604, 0.754)
pt3dadd(-74.604, 151.036, -22.608, 0.754)
pt3dadd(-74.718, 151.033, -22.622, 0.76)
pt3dadd(-74.818, 151.068, -22.67, 0.786)
pt3dadd(-74.919, 151.094, -22.718, 0.798)
pt3dadd(-75.025, 151.111, -22.764, 0.786)
pt3dadd(-75.126, 151.151, -22.793, 0.752)
pt3dadd(-75.22, 151.225, -22.8, 0.692)
pt3dadd(-75.287, 151.324, -22.806, 0.614)
pt3dadd(-75.345, 151.405, -22.854, 0.602)
pt3dadd(-75.387, 151.432, -22.944, 0.602)
pt3dadd(-75.454, 151.429, -23.025, 0.576)
pt3dadd(-75.554, 151.424, -23.077, 0.54)
pt3dadd(-75.669, 151.442, -23.099, 0.55)
pt3dadd(-75.77, 151.507, -23.097, 0.594)
pt3dadd(-75.84, 151.586, -23.058, 0.652)
pt3dadd(-75.859, 151.619, -22.965, 0.6)
pt3dadd(-75.881, 151.626, -22.87, 0.504)
pt3dadd(-75.941, 151.62, -22.784, 0.434)
pt3dadd(-76.011, 151.609, -22.71, 0.37)
pt3dadd(-76.127, 151.582, -22.706, 0.332)
pt3dadd(-76.244, 151.554, -22.702, 0.292)
pt3dadd(-76.342, 151.494, -22.7, 0.276)
pt3dadd(-76.437, 151.42, -22.7, 0.316)
pt3dadd(-76.533, 151.35, -22.7, 0.362)
pt3dadd(-76.644, 151.31, -22.691, 0.424)
pt3dadd(-76.76, 151.288, -22.678, 0.496)
pt3dadd(-76.873, 151.258, -22.66, 0.566)
pt3dadd(-76.967, 151.196, -22.624, 0.632)
pt3dadd(-77.064, 151.148, -22.616, 0.69)
pt3dadd(-77.166, 151.126, -22.665, 0.726)
pt3dadd(-77.25, 151.087, -22.721, 0.748)
pt3dadd(-77.292, 151.016, -22.789, 0.728)
pt3dadd(-77.394, 150.954, -22.789, 0.718)
pt3dadd(-77.496, 150.89, -22.789, 0.708)
pt3dadd(-77.597, 150.827, -22.789, 0.698)
pt3dadd(-77.699, 150.762, -22.789, 0.688)
pt3dadd(-77.801, 150.7, -22.788, 0.678)
pt3dadd(-77.896, 150.647, -22.747, 0.65)
pt3dadd(-77.994, 150.596, -22.71, 0.626)
pt3dadd(-78.111, 150.569, -22.706, 0.616)
pt3dadd(-78.228, 150.541, -22.702, 0.608)
pt3dadd(-78.344, 150.514, -22.702, 0.608)
pt3dadd(-78.461, 150.486, -22.707, 0.618)
pt3dadd(-78.577, 150.458, -22.711, 0.628)
pt3dadd(-78.655, 150.406, -22.772, 0.642)
pt3dadd(-78.738, 150.36, -22.831, 0.664)
pt3dadd(-78.845, 150.349, -22.876, 0.714)
pt3dadd(-78.953, 150.316, -22.905, 0.736)
pt3dadd(-79.063, 150.275, -22.927, 0.746)
pt3dadd(-79.172, 150.234, -22.95, 0.756)
pt3dadd(-79.282, 150.193, -22.972, 0.766)
pt3dadd(-79.391, 150.151, -22.995, 0.776)
pt3dadd(-79.493, 150.09, -23, 0.778)
pt3dadd(-79.592, 150.022, -23, 0.778)
pt3dadd(-79.691, 149.954, -23, 0.778)
pt3dadd(-79.79, 149.887, -23, 0.778)
pt3dadd(-79.889, 149.819, -23, 0.778)
pt3dadd(-79.993, 149.76, -23, 0.762)
pt3dadd(-80.101, 149.707, -23, 0.734)
pt3dadd(-80.209, 149.654, -23, 0.706)
pt3dadd(-80.316, 149.6, -23, 0.68)
pt3dadd(-80.424, 149.549, -23, 0.652)
pt3dadd(-80.532, 149.496, -23, 0.622)
pt3dadd(-80.644, 149.454, -23, 0.588)
pt3dadd(-80.757, 149.412, -23, 0.552)
pt3dadd(-80.869, 149.37, -23, 0.518)
pt3dadd(-80.982, 149.328, -23, 0.482)
pt3dadd(-81.094, 149.286, -23, 0.448)
pt3dadd(-81.209, 149.261, -23.001, 0.418)
pt3dadd(-81.329, 149.261, -23.002, 0.394)
pt3dadd(-81.449, 149.262, -23.004, 0.37)
pt3dadd(-81.569, 149.262, -23.006, 0.344)
pt3dadd(-81.689, 149.262, -23.008, 0.32)
pt3dadd(-81.809, 149.263, -23.01, 0.296)
pt3dadd(-81.928, 149.263, -23.017, 0.272)
pt3dadd(-82.039, 149.272, -23.054, 0.248)
pt3dadd(-82.151, 149.279, -23.089, 0.226)
pt3dadd(-82.27, 149.288, -23.094, 0.226)
pt3dadd(-82.39, 149.297, -23.098, 0.226)
pt3dadd(-82.494, 149.344, -23.097, 0.24)
pt3dadd(-82.587, 149.42, -23.091, 0.264)
pt3dadd(-82.688, 149.453, -23.067, 0.294)
pt3dadd(-82.798, 149.447, -23.027, 0.33)
pt3dadd(-82.902, 149.44, -22.979, 0.364)
}
}
proc shape3d_117() {
dend_5[5] { pt3dadd(-82.995, 149.43, -22.916, 0.4)
pt3dadd(-83.076, 149.422, -22.847, 0.42)
pt3dadd(-83.101, 149.412, -22.75, 0.364)
pt3dadd(-83.103, 149.372, -22.657, 0.266)
pt3dadd(-83.093, 149.273, -22.611, 0.226)
pt3dadd(-83.081, 149.154, -22.62, 0.226)
pt3dadd(-83.069, 149.044, -22.657, 0.226)
pt3dadd(-83.058, 148.937, -22.702, 0.226)
pt3dadd(-83.046, 148.83, -22.746, 0.226)
pt3dadd(-83.045, 148.72, -22.784, 0.226)
pt3dadd(-83.093, 148.615, -22.8, 0.226)
pt3dadd(-83.163, 148.519, -22.8, 0.226)
pt3dadd(-83.212, 148.411, -22.8, 0.226)
pt3dadd(-83.274, 148.312, -22.8, 0.226)
pt3dadd(-83.371, 148.241, -22.8, 0.226)
pt3dadd(-83.469, 148.174, -22.8, 0.226)
pt3dadd(-83.585, 148.154, -22.8, 0.226)
pt3dadd(-83.659, 148.06, -22.8, 0.232)
pt3dadd(-83.733, 147.966, -22.8, 0.236)
pt3dadd(-83.807, 147.871, -22.8, 0.242)
pt3dadd(-83.881, 147.776, -22.8, 0.246)
pt3dadd(-83.955, 147.682, -22.8, 0.254)
pt3dadd(-84.035, 147.593, -22.8, 0.278)
pt3dadd(-84.114, 147.503, -22.8, 0.302)
pt3dadd(-84.158, 147.395, -22.777, 0.34)
pt3dadd(-84.2, 147.288, -22.751, 0.378)
pt3dadd(-84.221, 147.222, -22.669, 0.39)
pt3dadd(-84.245, 147.163, -22.585, 0.4)
pt3dadd(-84.281, 147.133, -22.493, 0.388)
pt3dadd(-84.321, 147.1, -22.404, 0.372)
pt3dadd(-84.391, 147.04, -22.341, 0.33)
pt3dadd(-84.477, 146.99, -22.3, 0.282)
pt3dadd(-84.595, 146.969, -22.3, 0.24)
pt3dadd(-84.715, 146.957, -22.3, 0.226)
pt3dadd(-84.834, 146.945, -22.3, 0.226)
pt3dadd(-84.953, 146.932, -22.3, 0.226)
pt3dadd(-85.072, 146.92, -22.306, 0.238)
pt3dadd(-85.167, 146.87, -22.336, 0.258)
pt3dadd(-85.242, 146.794, -22.38, 0.274)
pt3dadd(-85.287, 146.693, -22.412, 0.296)
pt3dadd(-85.325, 146.584, -22.441, 0.324)
pt3dadd(-85.332, 146.556, -22.531, 0.338)
pt3dadd(-85.334, 146.54, -22.63, 0.354)
pt3dadd(-85.336, 146.526, -22.73, 0.368)
pt3dadd(-85.352, 146.482, -22.814, 0.4)
pt3dadd(-85.388, 146.395, -22.876, 0.456)
pt3dadd(-85.435, 146.296, -22.9, 0.498)
pt3dadd(-85.488, 146.188, -22.9, 0.534)
pt3dadd(-85.541, 146.081, -22.9, 0.568)
pt3dadd(-85.597, 145.974, -22.9, 0.636)
pt3dadd(-85.654, 145.868, -22.9, 0.718)
pt3dadd(-85.728, 145.775, -22.9, 0.832)
pt3dadd(-85.768, 145.664, -22.9, 0.866)
pt3dadd(-85.801, 145.549, -22.9, 0.88)
pt3dadd(-85.834, 145.434, -22.9, 0.894)
pt3dadd(-85.866, 145.318, -22.9, 0.908)
pt3dadd(-85.899, 145.204, -22.9, 0.922)
pt3dadd(-85.95, 145.098, -22.891, 0.916)
pt3dadd(-86.023, 145.006, -22.871, 0.888)
pt3dadd(-86.095, 144.912, -22.85, 0.86)
pt3dadd(-86.167, 144.821, -22.83, 0.83)
pt3dadd(-86.241, 144.73, -22.811, 0.802)
pt3dadd(-86.345, 144.67, -22.806, 0.756)
pt3dadd(-86.449, 144.61, -22.801, 0.71)
pt3dadd(-86.537, 144.528, -22.8, 0.662)
pt3dadd(-86.622, 144.444, -22.8, 0.616)
pt3dadd(-86.647, 144.335, -22.8, 0.596)
pt3dadd(-86.65, 144.215, -22.8, 0.586)
pt3dadd(-86.652, 144.094, -22.8, 0.578)
pt3dadd(-86.673, 143.976, -22.8, 0.566)
pt3dadd(-86.694, 143.857, -22.8, 0.556)
pt3dadd(-86.73, 143.744, -22.803, 0.53)
pt3dadd(-86.774, 143.633, -22.808, 0.496)
pt3dadd(-86.814, 143.53, -22.837, 0.418)
pt3dadd(-86.829, 143.488, -22.927, 0.322)
pt3dadd(-86.827, 143.473, -23.026, 0.302)
pt3dadd(-86.832, 143.45, -23.123, 0.288)
pt3dadd(-86.862, 143.39, -23.204, 0.248)
pt3dadd(-86.912, 143.352, -23.287, 0.226)
pt3dadd(-86.945, 143.344, -23.383, 0.25)
pt3dadd(-87.006, 143.334, -23.465, 0.284)
pt3dadd(-87.11, 143.294, -23.497, 0.302)
pt3dadd(-87.199, 143.215, -23.5, 0.302)
pt3dadd(-87.284, 143.131, -23.5, 0.302)
pt3dadd(-87.38, 143.06, -23.5, 0.324)
pt3dadd(-87.465, 142.982, -23.479, 0.4)
pt3dadd(-87.49, 142.895, -23.419, 0.45)
pt3dadd(-87.505, 142.832, -23.34, 0.422)
pt3dadd(-87.564, 142.799, -23.258, 0.41)
pt3dadd(-87.64, 142.752, -23.201, 0.39)
pt3dadd(-87.737, 142.686, -23.179, 0.364)
pt3dadd(-87.794, 142.626, -23.124, 0.358)
pt3dadd(-87.808, 142.572, -23.036, 0.37)
pt3dadd(-87.822, 142.538, -22.943, 0.39)
pt3dadd(-87.837, 142.532, -22.844, 0.42)
pt3dadd(-87.852, 142.525, -22.745, 0.448)
pt3dadd(-87.934, 142.472, -22.694, 0.496)
pt3dadd(-88.025, 142.415, -22.651, 0.546)
pt3dadd(-88.116, 142.357, -22.607, 0.594)
pt3dadd(-88.216, 142.3, -22.581, 0.646)
pt3dadd(-88.318, 142.242, -22.559, 0.696)
pt3dadd(-88.398, 142.219, -22.493, 0.78)
pt3dadd(-88.484, 142.159, -22.446, 0.792)
pt3dadd(-88.57, 142.098, -22.398, 0.804)
pt3dadd(-88.657, 142.038, -22.35, 0.816)
pt3dadd(-88.743, 141.977, -22.302, 0.828)
pt3dadd(-88.852, 141.936, -22.281, 0.838)
pt3dadd(-88.963, 141.895, -22.261, 0.848)
pt3dadd(-89.073, 141.853, -22.241, 0.858)
pt3dadd(-89.183, 141.812, -22.222, 0.868)
pt3dadd(-89.294, 141.772, -22.202, 0.878)
pt3dadd(-89.406, 141.758, -22.17, 0.87)
pt3dadd(-89.519, 141.746, -22.137, 0.858)
pt3dadd(-89.596, 141.727, -22.072, 0.84)
pt3dadd(-89.647, 141.701, -21.984, 0.814)
pt3dadd(-89.703, 141.636, -21.931, 0.788)
pt3dadd(-89.764, 141.535, -21.908, 0.762)
pt3dadd(-89.847, 141.455, -21.896, 0.754)
pt3dadd(-89.942, 141.38, -21.891, 0.754)
pt3dadd(-90.048, 141.34, -21.875, 0.75)
pt3dadd(-90.163, 141.325, -21.85, 0.744)
pt3dadd(-90.279, 141.31, -21.825, 0.738)
pt3dadd(-90.394, 141.293, -21.8, 0.73)
pt3dadd(-90.479, 141.283, -21.741, 0.71)
pt3dadd(-90.539, 141.277, -21.655, 0.674)
pt3dadd(-90.578, 141.272, -21.564, 0.616)
pt3dadd(-90.592, 141.271, -21.466, 0.536)
pt3dadd(-90.632, 141.268, -21.372, 0.494)
pt3dadd(-90.672, 141.263, -21.278, 0.452)
pt3dadd(-90.783, 141.245, -21.243, 0.44)
pt3dadd(-90.894, 141.228, -21.208, 0.43)
pt3dadd(-90.977, 141.161, -21.172, 0.426)
pt3dadd(-91.051, 141.078, -21.134, 0.426)
pt3dadd(-91.103, 140.97, -21.133, 0.426)
pt3dadd(-91.162, 140.875, -21.149, 0.422)
pt3dadd(-91.238, 140.812, -21.206, 0.404)
pt3dadd(-91.314, 140.749, -21.263, 0.388)
pt3dadd(-91.376, 140.682, -21.326, 0.362)
pt3dadd(-91.414, 140.612, -21.4, 0.32)
pt3dadd(-91.464, 140.538, -21.466, 0.252)
pt3dadd(-91.541, 140.512, -21.539, 0.246)
pt3dadd(-91.618, 140.485, -21.612, 0.24)
pt3dadd(-91.695, 140.459, -21.686, 0.234)
pt3dadd(-91.773, 140.432, -21.759, 0.23)
pt3dadd(-91.822, 140.418, -21.844, 0.238)
pt3dadd(-91.846, 140.416, -21.942, 0.268)
pt3dadd(-91.91, 140.408, -22.024, 0.3)
pt3dadd(-91.985, 140.401, -22.103, 0.264)
pt3dadd(-92.047, 140.394, -22.188, 0.23)
pt3dadd(-92.123, 140.387, -22.262, 0.226)
pt3dadd(-92.235, 140.375, -22.289, 0.226)
pt3dadd(-92.35, 140.375, -22.27, 0.226)
pt3dadd(-92.44, 140.414, -22.215, 0.226)
pt3dadd(-92.53, 140.454, -22.16, 0.226)
pt3dadd(-92.633, 140.486, -22.125, 0.232)
pt3dadd(-92.736, 140.545, -22.108, 0.246)
pt3dadd(-92.822, 140.623, -22.1, 0.27)
pt3dadd(-92.893, 140.72, -22.1, 0.304)
pt3dadd(-92.975, 140.802, -22.091, 0.362)
pt3dadd(-93.074, 140.855, -22.059, 0.472)
pt3dadd(-93.141, 140.879, -21.98, 0.634)
pt3dadd(-93.178, 140.879, -21.886, 0.678)
pt3dadd(-93.191, 140.878, -21.786, 0.678)
pt3dadd(-93.191, 140.878, -21.686, 0.678)
pt3dadd(-93.191, 140.878, -21.586, 0.682)
pt3dadd(-93.191, 140.878, -21.486, 0.71)
pt3dadd(-93.193, 140.878, -21.387, 0.764)
pt3dadd(-93.217, 140.875, -21.29, 0.828)
pt3dadd(-93.29, 140.867, -21.214, 0.776)
pt3dadd(-93.383, 140.836, -21.16, 0.576)
pt3dadd(-93.414, 140.74, -21.116, 0.4)
pt3dadd(-93.42, 140.622, -21.1, 0.298)
pt3dadd(-93.479, 140.522, -21.1, 0.242)
pt3dadd(-93.589, 140.478, -21.1, 0.226)
pt3dadd(-93.708, 140.461, -21.1, 0.226)
pt3dadd(-93.827, 140.449, -21.1, 0.226)
pt3dadd(-93.946, 140.436, -21.1, 0.232)
pt3dadd(-94.066, 140.424, -21.1, 0.24)
pt3dadd(-94.185, 140.411, -21.1, 0.248)
pt3dadd(-94.303, 140.399, -21.089, 0.258)
pt3dadd(-94.421, 140.387, -21.072, 0.266)
pt3dadd(-94.535, 140.371, -21.052, 0.276)
pt3dadd(-94.585, 140.297, -20.986, 0.288)
pt3dadd(-94.635, 140.222, -20.919, 0.298)
pt3dadd(-94.7, 140.132, -20.9, 0.292)
pt3dadd(-94.772, 140.036, -20.9, 0.28)
pt3dadd(-94.872, 139.987, -20.9, 0.272)
pt3dadd(-94.991, 139.972, -20.9, 0.266)
pt3dadd(-95.11, 139.957, -20.9, 0.26)
pt3dadd(-95.229, 139.94, -20.9, 0.252)
pt3dadd(-95.348, 139.927, -20.9, 0.246)
pt3dadd(-95.467, 139.914, -20.9, 0.236)
pt3dadd(-95.586, 139.902, -20.9, 0.228)
pt3dadd(-95.706, 139.889, -20.9, 0.226)
pt3dadd(-95.825, 139.877, -20.9, 0.226)
pt3dadd(-95.945, 139.864, -20.9, 0.226)
pt3dadd(-96.064, 139.852, -20.9, 0.226)
pt3dadd(-96.183, 139.84, -20.9, 0.226)
pt3dadd(-96.303, 139.826, -20.9, 0.226)
pt3dadd(-96.422, 139.814, -20.9, 0.226)
}
}
proc shape3d_118() {
dend_5[5] { pt3dadd(-96.528, 139.764, -20.9, 0.226)
pt3dadd(-96.63, 139.7, -20.9, 0.226)
pt3dadd(-96.722, 139.626, -20.903, 0.226)
pt3dadd(-96.804, 139.538, -20.908, 0.226)
pt3dadd(-96.899, 139.474, -20.921, 0.226)
pt3dadd(-97.01, 139.44, -20.946, 0.226)
pt3dadd(-97.121, 139.405, -20.971, 0.226)
pt3dadd(-97.233, 139.372, -20.995, 0.226)
pt3dadd(-97.35, 139.355, -21, 0.226)
pt3dadd(-97.47, 139.342, -21, 0.226)
pt3dadd(-97.589, 139.33, -21, 0.226)
pt3dadd(-97.708, 139.316, -21, 0.226)
pt3dadd(-97.825, 139.29, -21, 0.226)
pt3dadd(-97.941, 139.261, -21, 0.226)
pt3dadd(-98.058, 139.231, -21, 0.226)
pt3dadd(-98.174, 139.201, -21, 0.226)
pt3dadd(-98.29, 139.172, -21, 0.226)
pt3dadd(-98.407, 139.142, -21, 0.226)
pt3dadd(-98.525, 139.121, -21, 0.226)
pt3dadd(-98.643, 139.104, -21, 0.226)
pt3dadd(-98.762, 139.086, -21, 0.226)
pt3dadd(-98.881, 139.073, -21, 0.226)
pt3dadd(-99.001, 139.061, -21, 0.226)
pt3dadd(-99.12, 139.048, -21, 0.226)
pt3dadd(-99.233, 139.012, -21, 0.226)
pt3dadd(-99.345, 138.966, -21, 0.226)
pt3dadd(-99.446, 138.907, -21, 0.226)
pt3dadd(-99.525, 138.817, -21, 0.226)
pt3dadd(-99.595, 138.722, -21, 0.228)
pt3dadd(-99.626, 138.606, -21, 0.246)
pt3dadd(-99.699, 138.518, -21, 0.272)
pt3dadd(-99.795, 138.448, -21, 0.308)
pt3dadd(-99.9, 138.395, -20.998, 0.348)
pt3dadd(-100.017, 138.368, -20.994, 0.396)
pt3dadd(-100.134, 138.341, -20.99, 0.446)
pt3dadd(-100.204, 138.324, -20.916, 0.504)
pt3dadd(-100.266, 138.312, -20.831, 0.564)
pt3dadd(-100.329, 138.257, -20.762, 0.61)
pt3dadd(-100.392, 138.188, -20.7, 0.652)
pt3dadd(-100.501, 138.144, -20.719, 0.652)
pt3dadd(-100.609, 138.098, -20.738, 0.652)
pt3dadd(-100.718, 138.053, -20.757, 0.652)
pt3dadd(-100.83, 138.014, -20.773, 0.648)
pt3dadd(-100.945, 137.986, -20.787, 0.638)
pt3dadd(-101.059, 137.953, -20.8, 0.624)
pt3dadd(-101.162, 137.894, -20.806, 0.602)
pt3dadd(-101.271, 137.857, -20.831, 0.602)
pt3dadd(-101.38, 137.845, -20.872, 0.608)
pt3dadd(-101.495, 137.827, -20.894, 0.64)
pt3dadd(-101.606, 137.786, -20.891, 0.674)
pt3dadd(-101.685, 137.72, -20.847, 0.678)
pt3dadd(-101.745, 137.686, -20.765, 0.678)
pt3dadd(-101.777, 137.682, -20.669, 0.646)
pt3dadd(-101.818, 137.678, -20.576, 0.628)
pt3dadd(-101.901, 137.657, -20.512, 0.678)
pt3dadd(-102.009, 137.608, -20.496, 0.696)
pt3dadd(-102.117, 137.558, -20.48, 0.674)
pt3dadd(-102.225, 137.521, -20.462, 0.648)
pt3dadd(-102.333, 137.551, -20.427, 0.608)
pt3dadd(-102.441, 137.563, -20.4, 0.57)
pt3dadd(-102.549, 137.51, -20.4, 0.542)
pt3dadd(-102.657, 137.459, -20.4, 0.514)
pt3dadd(-102.763, 137.405, -20.411, 0.494)
pt3dadd(-102.869, 137.352, -20.428, 0.48)
pt3dadd(-102.98, 137.36, -20.443, 0.454)
pt3dadd(-103.094, 137.394, -20.458, 0.422)
pt3dadd(-103.197, 137.412, -20.441, 0.398)
pt3dadd(-103.285, 137.404, -20.372, 0.386)
pt3dadd(-103.374, 137.394, -20.306, 0.368)
pt3dadd(-103.481, 137.383, -20.271, 0.358)
pt3dadd(-103.599, 137.37, -20.259, 0.37)
pt3dadd(-103.718, 137.358, -20.246, 0.382)
pt3dadd(-103.836, 137.346, -20.234, 0.394)
pt3dadd(-103.954, 137.333, -20.221, 0.406)
pt3dadd(-104.073, 137.321, -20.209, 0.418)
pt3dadd(-104.189, 137.309, -20.19, 0.432)
pt3dadd(-104.3, 137.297, -20.153, 0.45)
pt3dadd(-104.411, 137.285, -20.115, 0.47)
pt3dadd(-104.521, 137.273, -20.078, 0.488)
pt3dadd(-104.632, 137.262, -20.041, 0.506)
pt3dadd(-104.743, 137.25, -20.004, 0.526)
pt3dadd(-104.862, 137.238, -20, 0.58)
pt3dadd(-104.981, 137.225, -20, 0.638)
pt3dadd(-105.1, 137.213, -20, 0.696)
pt3dadd(-105.22, 137.2, -20, 0.756)
pt3dadd(-105.339, 137.188, -20, 0.814)
pt3dadd(-105.458, 137.174, -20, 0.872)
pt3dadd(-105.574, 137.144, -20, 0.93)
pt3dadd(-105.69, 137.112, -20, 0.988)
pt3dadd(-105.785, 137.056, -20, 1.04)
pt3dadd(-105.835, 136.948, -20, 1.074)
pt3dadd(-105.888, 136.841, -20.004, 1.104)
pt3dadd(-105.973, 136.766, -20.037, 1.104)
pt3dadd(-106.058, 136.691, -20.069, 1.104)
pt3dadd(-106.144, 136.62, -20.103, 1.102)
pt3dadd(-106.254, 136.615, -20.143, 1.068)
pt3dadd(-106.364, 136.609, -20.184, 1.034)
pt3dadd(-106.47, 136.654, -20.169, 0.994)
pt3dadd(-106.575, 136.703, -20.146, 0.952)
pt3dadd(-106.685, 136.742, -20.126, 0.924)
pt3dadd(-106.801, 136.768, -20.11, 0.912)
pt3dadd(-106.918, 136.78, -20.1, 0.904)
pt3dadd(-107.037, 136.768, -20.1, 0.906)
pt3dadd(-107.157, 136.756, -20.1, 0.908)
pt3dadd(-107.276, 136.742, -20.1, 0.912)
pt3dadd(-107.395, 136.73, -20.1, 0.916)
pt3dadd(-107.515, 136.717, -20.1, 0.92)
pt3dadd(-107.634, 136.705, -20.1, 0.924)
pt3dadd(-107.753, 136.692, -20.1, 0.926)
pt3dadd(-107.872, 136.692, -20.1, 0.922)
pt3dadd(-107.989, 136.716, -20.1, 0.9)
pt3dadd(-108.108, 136.74, -20.1, 0.876)
pt3dadd(-108.225, 136.764, -20.1, 0.854)
pt3dadd(-108.343, 136.787, -20.1, 0.832)
pt3dadd(-108.46, 136.81, -20.1, 0.81)
pt3dadd(-108.578, 136.796, -20.098, 0.79)
pt3dadd(-108.695, 136.77, -20.097, 0.772)
pt3dadd(-108.811, 136.742, -20.095, 0.754)
pt3dadd(-108.928, 136.716, -20.093, 0.736)
pt3dadd(-109.046, 136.69, -20.091, 0.718)
pt3dadd(-109.16, 136.658, -20.086, 0.698)
pt3dadd(-109.259, 136.596, -20.067, 0.66)
pt3dadd(-109.36, 136.534, -20.048, 0.622)
pt3dadd(-109.46, 136.471, -20.029, 0.584)
pt3dadd(-109.559, 136.409, -20.01, 0.546)
pt3dadd(-109.666, 136.36, -20.004, 0.52)
pt3dadd(-109.781, 136.327, -20.012, 0.508)
pt3dadd(-109.897, 136.294, -20.02, 0.494)
pt3dadd(-110.012, 136.26, -20.027, 0.48)
pt3dadd(-110.127, 136.226, -20.035, 0.468)
pt3dadd(-110.241, 136.193, -20.043, 0.454)
pt3dadd(-110.349, 136.153, -20.068, 0.442)
pt3dadd(-110.457, 136.11, -20.096, 0.43)
pt3dadd(-110.564, 136.068, -20.124, 0.42)
pt3dadd(-110.671, 136.026, -20.153, 0.408)
pt3dadd(-110.78, 135.983, -20.167, 0.41)
pt3dadd(-110.893, 135.938, -20.167, 0.426)
pt3dadd(-111.004, 135.896, -20.167, 0.442)
pt3dadd(-111.115, 135.852, -20.167, 0.46)
pt3dadd(-111.228, 135.809, -20.167, 0.476)
pt3dadd(-111.334, 135.754, -20.167, 0.528)
pt3dadd(-111.44, 135.702, -20.162, 0.582)
pt3dadd(-111.542, 135.691, -20.111, 0.616)
pt3dadd(-111.645, 135.68, -20.06, 0.65)
pt3dadd(-111.674, 135.677, -19.966, 0.662)
pt3dadd(-111.694, 135.674, -19.868, 0.672)
pt3dadd(-111.715, 135.66, -19.771, 0.678)
pt3dadd(-111.736, 135.618, -19.679, 0.678)
pt3dadd(-111.778, 135.571, -19.61, 0.678)
pt3dadd(-111.879, 135.504, -19.605, 0.678)
pt3dadd(-111.979, 135.439, -19.6, 0.682)
pt3dadd(-112.092, 135.4, -19.6, 0.73)
pt3dadd(-112.209, 135.379, -19.6, 0.82)
pt3dadd(-112.329, 135.367, -19.6, 0.91)
pt3dadd(-112.447, 135.348, -19.6, 0.942)
pt3dadd(-112.562, 135.312, -19.6, 0.914)
pt3dadd(-112.672, 135.265, -19.6, 0.904)
pt3dadd(-112.782, 135.218, -19.6, 0.904)
pt3dadd(-112.892, 135.17, -19.6, 0.904)
pt3dadd(-113.003, 135.122, -19.6, 0.904)
pt3dadd(-113.112, 135.074, -19.6, 0.904)
pt3dadd(-113.224, 135.031, -19.6, 0.908)
pt3dadd(-113.343, 135.019, -19.6, 0.942)
pt3dadd(-113.463, 135.006, -19.6, 0.974)
pt3dadd(-113.582, 134.994, -19.6, 1.006)
pt3dadd(-113.701, 134.981, -19.6, 1.014)
pt3dadd(-113.82, 134.969, -19.6, 1.022)
pt3dadd(-113.938, 134.951, -19.6, 1.024)
pt3dadd(-114.039, 134.886, -19.6, 0.98)
pt3dadd(-114.14, 134.82, -19.6, 0.934)
pt3dadd(-114.202, 134.729, -19.567, 0.806)
pt3dadd(-114.261, 134.639, -19.527, 0.67)
pt3dadd(-114.34, 134.605, -19.456, 0.59)
pt3dadd(-114.417, 134.57, -19.385, 0.51)
pt3dadd(-114.494, 134.537, -19.314, 0.43)
pt3dadd(-114.612, 134.524, -19.307, 0.378)
pt3dadd(-114.732, 134.512, -19.304, 0.324)
pt3dadd(-114.85, 134.498, -19.3, 0.274)
pt3dadd(-114.969, 134.486, -19.3, 0.226)
pt3dadd(-115.089, 134.473, -19.3, 0.226)
pt3dadd(-115.208, 134.461, -19.3, 0.226)
pt3dadd(-115.327, 134.448, -19.3, 0.226)
pt3dadd(-115.447, 134.436, -19.3, 0.226)
pt3dadd(-115.566, 134.423, -19.3, 0.226)
pt3dadd(-115.685, 134.411, -19.3, 0.226)
pt3dadd(-115.805, 134.399, -19.3, 0.226)
pt3dadd(-115.924, 134.386, -19.3, 0.23)
pt3dadd(-116.043, 134.374, -19.3, 0.234)
pt3dadd(-116.163, 134.36, -19.3, 0.238)
pt3dadd(-116.282, 134.348, -19.3, 0.24)
pt3dadd(-116.401, 134.335, -19.3, 0.244)
pt3dadd(-116.521, 134.323, -19.3, 0.248)
pt3dadd(-116.64, 134.311, -19.299, 0.252)
pt3dadd(-116.757, 134.322, -19.279, 0.266)
pt3dadd(-116.875, 134.334, -19.26, 0.28)
pt3dadd(-116.992, 134.345, -19.241, 0.296)
pt3dadd(-117.109, 134.356, -19.222, 0.31)
pt3dadd(-117.226, 134.366, -19.202, 0.324)
pt3dadd(-117.332, 134.341, -19.163, 0.35)
pt3dadd(-117.438, 134.31, -19.121, 0.376)
}
}
proc shape3d_119() {
dend_5[5] { pt3dadd(-117.542, 134.28, -19.079, 0.402)
pt3dadd(-117.646, 134.248, -19.037, 0.428)
pt3dadd(-117.75, 134.213, -19, 0.456)
pt3dadd(-117.853, 134.152, -19, 0.478)
pt3dadd(-117.956, 134.09, -19, 0.502)
pt3dadd(-118.058, 134.029, -19, 0.526)
pt3dadd(-118.162, 133.967, -19, 0.55)
pt3dadd(-118.265, 133.906, -19, 0.574)
pt3dadd(-118.372, 133.852, -19, 0.606)
pt3dadd(-118.481, 133.801, -19, 0.638)
pt3dadd(-118.582, 133.739, -18.997, 0.66)
pt3dadd(-118.676, 133.664, -18.992, 0.67)
pt3dadd(-118.767, 133.615, -18.96, 0.674)
pt3dadd(-118.849, 133.6, -18.889, 0.66)
pt3dadd(-118.944, 133.585, -18.832, 0.646)
pt3dadd(-119.057, 133.573, -18.799, 0.624)
pt3dadd(-119.169, 133.562, -18.766, 0.602)
pt3dadd(-119.271, 133.5, -18.749, 0.58)
pt3dadd(-119.372, 133.44, -18.732, 0.556)
pt3dadd(-119.474, 133.38, -18.715, 0.532)
pt3dadd(-119.567, 133.32, -18.745, 0.506)
pt3dadd(-119.656, 133.259, -18.787, 0.478)
pt3dadd(-119.749, 133.186, -18.8, 0.454)
pt3dadd(-119.843, 133.11, -18.8, 0.458)
pt3dadd(-119.935, 133.034, -18.8, 0.464)
pt3dadd(-120.029, 132.958, -18.8, 0.468)
pt3dadd(-120.12, 132.882, -18.8, 0.474)
pt3dadd(-120.215, 132.806, -18.8, 0.482)
pt3dadd(-120.312, 132.736, -18.8, 0.506)
pt3dadd(-120.407, 132.664, -18.8, 0.528)
pt3dadd(-120.485, 132.572, -18.8, 0.552)
pt3dadd(-120.564, 132.481, -18.8, 0.576)
pt3dadd(-120.658, 132.408, -18.795, 0.578)
pt3dadd(-120.752, 132.334, -18.79, 0.578)
pt3dadd(-120.86, 132.307, -18.76, 0.568)
pt3dadd(-120.972, 132.289, -18.726, 0.558)
pt3dadd(-121.087, 132.275, -18.708, 0.56)
pt3dadd(-121.206, 132.262, -18.702, 0.574)
pt3dadd(-121.325, 132.25, -18.687, 0.59)
pt3dadd(-121.441, 132.238, -18.669, 0.606)
pt3dadd(-121.56, 132.224, -18.65, 0.622)
pt3dadd(-121.676, 132.212, -18.632, 0.64)
pt3dadd(-121.794, 132.2, -18.613, 0.656)
pt3dadd(-121.91, 132.188, -18.595, 0.674)
pt3dadd(-122.029, 132.175, -18.579, 0.69)
pt3dadd(-122.147, 132.163, -18.564, 0.706)
pt3dadd(-122.266, 132.151, -18.55, 0.722)
pt3dadd(-122.383, 132.138, -18.536, 0.738)
pt3dadd(-122.501, 132.126, -18.521, 0.754)
pt3dadd(-122.62, 132.113, -18.507, 0.77)
pt3dadd(-122.731, 132.079, -18.5, 0.78)
pt3dadd(-122.837, 132.022, -18.5, 0.786)
pt3dadd(-122.944, 131.966, -18.5, 0.79)
pt3dadd(-123.049, 131.91, -18.5, 0.794)
pt3dadd(-123.156, 131.855, -18.5, 0.8)
pt3dadd(-123.258, 131.794, -18.5, 0.802)
pt3dadd(-123.337, 131.704, -18.5, 0.792)
pt3dadd(-123.418, 131.615, -18.5, 0.782)
pt3dadd(-123.498, 131.525, -18.5, 0.772)
pt3dadd(-123.577, 131.436, -18.5, 0.762)
pt3dadd(-123.647, 131.34, -18.5, 0.742)
pt3dadd(-123.661, 131.222, -18.495, 0.692)
pt3dadd(-123.656, 131.106, -18.473, 0.678)
pt3dadd(-123.666, 131, -18.429, 0.678)
pt3dadd(-123.745, 130.927, -18.393, 0.658)
pt3dadd(-123.853, 130.897, -18.359, 0.586)
pt3dadd(-123.962, 130.886, -18.322, 0.502)
pt3dadd(-124.081, 130.874, -18.304, 0.46)
pt3dadd(-124.199, 130.861, -18.3, 0.47)
pt3dadd(-124.318, 130.849, -18.3, 0.512)
pt3dadd(-124.438, 130.836, -18.3, 0.616)
pt3dadd(-124.556, 130.824, -18.3, 0.742)
pt3dadd(-124.668, 130.799, -18.273, 0.822)
pt3dadd(-124.775, 130.769, -18.236, 0.882)
pt3dadd(-124.842, 130.727, -18.168, 0.904)
pt3dadd(-124.888, 130.678, -18.085, 0.904)
pt3dadd(-124.922, 130.664, -17.992, 0.856)
pt3dadd(-124.956, 130.661, -17.896, 0.738)
pt3dadd(-125.003, 130.656, -17.806, 0.64)
pt3dadd(-125.081, 130.634, -17.733, 0.528)
pt3dadd(-125.143, 130.546, -17.697, 0.502)
pt3dadd(-125.155, 130.434, -17.664, 0.528)
pt3dadd(-125.173, 130.328, -17.62, 0.542)
pt3dadd(-125.221, 130.226, -17.622, 0.578)
pt3dadd(-125.258, 130.162, -17.697, 0.53)
pt3dadd(-125.298, 130.142, -17.789, 0.478)
pt3dadd(-125.344, 130.138, -17.881, 0.488)
pt3dadd(-125.383, 130.134, -17.976, 0.51)
pt3dadd(-125.435, 130.126, -18.059, 0.53)
pt3dadd(-125.549, 130.096, -18.078, 0.552)
pt3dadd(-125.663, 130.067, -18.097, 0.574)
pt3dadd(-125.758, 130.008, -18.069, 0.596)
pt3dadd(-125.813, 129.97, -17.996, 0.602)
pt3dadd(-125.845, 129.965, -17.901, 0.634)
pt3dadd(-125.891, 129.96, -17.81, 0.7)
pt3dadd(-125.966, 129.952, -17.732, 0.77)
pt3dadd(-126.053, 129.947, -17.664, 0.808)
pt3dadd(-126.124, 129.959, -17.584, 0.834)
pt3dadd(-126.196, 129.973, -17.505, 0.858)
pt3dadd(-126.27, 129.995, -17.429, 0.874)
pt3dadd(-126.373, 129.964, -17.407, 0.888)
pt3dadd(-126.482, 129.917, -17.403, 0.898)
pt3dadd(-126.595, 129.886, -17.388, 0.9)
pt3dadd(-126.709, 129.874, -17.36, 0.89)
pt3dadd(-126.826, 129.862, -17.333, 0.878)
pt3dadd(-126.941, 129.841, -17.312, 0.832)
pt3dadd(-127.049, 129.8, -17.292, 0.792)
pt3dadd(-127.144, 129.731, -17.272, 0.764)
pt3dadd(-127.238, 129.662, -17.253, 0.736)
pt3dadd(-127.334, 129.594, -17.233, 0.71)
pt3dadd(-127.429, 129.526, -17.214, 0.682)
pt3dadd(-127.513, 129.44, -17.207, 0.616)
pt3dadd(-127.596, 129.353, -17.201, 0.542)
pt3dadd(-127.694, 129.284, -17.2, 0.492)
pt3dadd(-127.794, 129.22, -17.2, 0.446)
pt3dadd(-127.903, 129.175, -17.189, 0.408)
pt3dadd(-128.017, 129.145, -17.17, 0.376)
pt3dadd(-128.112, 129.122, -17.131, 0.348)
pt3dadd(-128.159, 129.118, -17.038, 0.338)
pt3dadd(-128.206, 129.113, -16.946, 0.326)
pt3dadd(-128.304, 129.072, -16.902, 0.288)
pt3dadd(-128.401, 129.023, -16.86, 0.266)
pt3dadd(-128.496, 128.969, -16.818, 0.254)
pt3dadd(-128.605, 128.951, -16.784, 0.242)
pt3dadd(-128.718, 128.939, -16.751, 0.232)
pt3dadd(-128.834, 128.927, -16.727, 0.23)
pt3dadd(-128.952, 128.914, -16.715, 0.24)
pt3dadd(-129.071, 128.902, -16.703, 0.25)
pt3dadd(-129.172, 128.843, -16.7, 0.26)
pt3dadd(-129.268, 128.771, -16.7, 0.272)
pt3dadd(-129.307, 128.702, -16.75, 0.28)
pt3dadd(-129.308, 128.638, -16.833, 0.288)
pt3dadd(-129.31, 128.572, -16.917, 0.294)
pt3dadd(-129.322, 128.513, -16.998, 0.3)
pt3dadd(-129.409, 128.504, -17.066, 0.288)
pt3dadd(-129.497, 128.495, -17.134, 0.276)
pt3dadd(-129.608, 128.483, -17.17, 0.26)
pt3dadd(-129.724, 128.471, -17.195, 0.238)
pt3dadd(-129.841, 128.459, -17.2, 0.24)
pt3dadd(-129.961, 128.446, -17.2, 0.28)
pt3dadd(-130.08, 128.434, -17.193, 0.35)
pt3dadd(-130.193, 128.41, -17.168, 0.424)
pt3dadd(-130.235, 128.366, -17.087, 0.456)
pt3dadd(-130.238, 128.335, -16.99, 0.468)
pt3dadd(-130.254, 128.317, -16.9, 0.488)
pt3dadd(-130.336, 128.362, -16.836, 0.544)
pt3dadd(-130.434, 128.384, -16.8, 0.596)
pt3dadd(-130.553, 128.375, -16.8, 0.642)
pt3dadd(-130.673, 128.366, -16.8, 0.688)
pt3dadd(-130.793, 128.357, -16.8, 0.732)
pt3dadd(-130.906, 128.347, -16.776, 0.808)
pt3dadd(-131.011, 128.335, -16.731, 0.908)
pt3dadd(-131.11, 128.326, -16.677, 1.054)
pt3dadd(-131.208, 128.311, -16.634, 1.172)
pt3dadd(-131.324, 128.294, -16.616, 1.204)
pt3dadd(-131.438, 128.27, -16.6, 1.226)
pt3dadd(-131.531, 128.192, -16.6, 1.192)
pt3dadd(-131.622, 128.114, -16.6, 1.158)
pt3dadd(-131.647, 127.998, -16.6, 1.086)
pt3dadd(-131.666, 127.88, -16.6, 1.014)
pt3dadd(-131.719, 127.78, -16.609, 0.926)
pt3dadd(-131.801, 127.694, -16.626, 0.822)
pt3dadd(-131.882, 127.642, -16.674, 0.708)
pt3dadd(-131.956, 127.59, -16.728, 0.62)
pt3dadd(-132.017, 127.488, -16.745, 0.598)
pt3dadd(-132.077, 127.387, -16.762, 0.576)
pt3dadd(-132.138, 127.285, -16.779, 0.554)
pt3dadd(-132.198, 127.184, -16.796, 0.532)
pt3dadd(-132.245, 127.074, -16.8, 0.516)
pt3dadd(-132.287, 126.961, -16.8, 0.502)
pt3dadd(-132.33, 126.85, -16.8, 0.486)
pt3dadd(-132.371, 126.737, -16.8, 0.472)
pt3dadd(-132.413, 126.624, -16.8, 0.458)
pt3dadd(-132.46, 126.514, -16.8, 0.432)
pt3dadd(-132.51, 126.404, -16.8, 0.398)
pt3dadd(-132.57, 126.314, -16.822, 0.36)
pt3dadd(-132.648, 126.252, -16.879, 0.316)
pt3dadd(-132.744, 126.223, -16.928, 0.288)
pt3dadd(-132.851, 126.211, -16.973, 0.264)
pt3dadd(-132.962, 126.2, -17, 0.248)
pt3dadd(-133.081, 126.187, -17, 0.24)
pt3dadd(-133.201, 126.175, -17, 0.23)
pt3dadd(-133.32, 126.16, -17, 0.226)
pt3dadd(-133.439, 126.144, -17, 0.226)
pt3dadd(-133.558, 126.126, -17, 0.226)
pt3dadd(-133.667, 126.086, -17, 0.226)
pt3dadd(-133.723, 125.984, -17, 0.226)
pt3dadd(-133.723, 125.864, -17, 0.226)
pt3dadd(-133.711, 125.744, -17, 0.226)
pt3dadd(-133.698, 125.626, -17, 0.226)
pt3dadd(-133.696, 125.509, -16.997, 0.226)
pt3dadd(-133.771, 125.422, -16.971, 0.226)
pt3dadd(-133.844, 125.333, -16.945, 0.226)
pt3dadd(-133.92, 125.244, -16.92, 0.226)
pt3dadd(-133.996, 125.155, -16.894, 0.226)
pt3dadd(-134.092, 125.105, -16.855, 0.226)
pt3dadd(-134.192, 125.065, -16.814, 0.226)
pt3dadd(-134.294, 125.026, -16.773, 0.226)
pt3dadd(-134.396, 124.985, -16.731, 0.226)
pt3dadd(-134.502, 124.952, -16.7, 0.226)
}
}
proc shape3d_120() {
dend_5[5] { pt3dadd(-134.622, 124.939, -16.7, 0.226)
pt3dadd(-134.741, 124.927, -16.7, 0.226)
pt3dadd(-134.861, 124.914, -16.7, 0.226)
pt3dadd(-134.98, 124.902, -16.7, 0.226)
pt3dadd(-135.1, 124.889, -16.7, 0.226)
pt3dadd(-135.215, 124.867, -16.7, 0.226)
pt3dadd(-135.324, 124.816, -16.7, 0.226)
pt3dadd(-135.432, 124.765, -16.7, 0.226)
pt3dadd(-135.515, 124.679, -16.7, 0.226)
pt3dadd(-135.594, 124.589, -16.7, 0.226)
pt3dadd(-135.661, 124.49, -16.7, 0.226)
pt3dadd(-135.737, 124.398, -16.699, 0.226)
pt3dadd(-135.832, 124.324, -16.697, 0.226)
pt3dadd(-135.925, 124.25, -16.695, 0.226)
pt3dadd(-136.02, 124.175, -16.693, 0.226)
pt3dadd(-136.114, 124.102, -16.69, 0.226)
pt3dadd(-136.213, 124.043, -16.678, 0.238)
pt3dadd(-136.29, 123.998, -16.619, 0.306)
pt3dadd(-136.327, 123.926, -16.545, 0.414)
pt3dadd(-136.376, 123.829, -16.511, 0.442)
pt3dadd(-136.394, 123.721, -16.544, 0.378)
pt3dadd(-136.416, 123.665, -16.629, 0.276)
pt3dadd(-136.47, 123.613, -16.705, 0.226)
pt3dadd(-136.531, 123.55, -16.771, 0.226)
pt3dadd(-136.584, 123.522, -16.858, 0.226)
pt3dadd(-136.597, 123.487, -16.951, 0.226)
pt3dadd(-136.541, 123.402, -16.995, 0.226)
pt3dadd(-136.487, 123.295, -17, 0.226)
pt3dadd(-136.458, 123.179, -17, 0.226)
pt3dadd(-136.445, 123.06, -17, 0.226)
pt3dadd(-136.433, 122.94, -17, 0.226)
pt3dadd(-136.42, 122.821, -17, 0.226)
pt3dadd(-136.408, 122.701, -17, 0.226)
pt3dadd(-136.396, 122.582, -17, 0.226)
pt3dadd(-136.382, 122.464, -17, 0.226)
pt3dadd(-136.37, 122.344, -17, 0.226)
pt3dadd(-136.357, 122.225, -17, 0.226)
pt3dadd(-136.345, 122.105, -17, 0.226)
pt3dadd(-136.332, 121.986, -17, 0.226)
pt3dadd(-136.32, 121.866, -17, 0.226)
pt3dadd(-136.307, 121.747, -17, 0.226)
pt3dadd(-136.295, 121.627, -17, 0.226)
pt3dadd(-136.282, 121.508, -17, 0.226)
pt3dadd(-136.27, 121.388, -17, 0.226)
pt3dadd(-136.258, 121.27, -17, 0.226)
pt3dadd(-136.244, 121.151, -17, 0.226)
pt3dadd(-136.232, 121.031, -17, 0.226)
pt3dadd(-136.219, 120.912, -17, 0.226)
pt3dadd(-136.206, 120.794, -17.014, 0.226)
pt3dadd(-136.168, 120.702, -17.061, 0.226)
pt3dadd(-136.111, 120.68, -17.145, 0.258)
pt3dadd(-136.084, 120.683, -17.242, 0.328)
pt3dadd(-136.075, 120.684, -17.341, 0.388)
pt3dadd(-136.074, 120.678, -17.441, 0.39)
pt3dadd(-136.081, 120.652, -17.538, 0.322)
pt3dadd(-136.132, 120.569, -17.57, 0.276)
pt3dadd(-136.171, 120.473, -17.524, 0.29)
pt3dadd(-136.214, 120.365, -17.501, 0.276)
pt3dadd(-136.312, 120.305, -17.479, 0.344)
pt3dadd(-136.42, 120.286, -17.44, 0.482)
pt3dadd(-136.528, 120.254, -17.413, 0.604)
pt3dadd(-136.632, 120.196, -17.424, 0.618)
pt3dadd(-136.733, 120.134, -17.44, 0.626)
pt3dadd(-136.82, 120.066, -17.477, 0.612)
pt3dadd(-136.904, 119.99, -17.506, 0.56)
pt3dadd(-136.985, 119.915, -17.543, 0.496)
pt3dadd(-137.068, 119.846, -17.587, 0.454)
pt3dadd(-137.114, 119.736, -17.594, 0.43)
pt3dadd(-137.159, 119.625, -17.599, 0.406)
pt3dadd(-137.158, 119.509, -17.59, 0.394)
pt3dadd(-137.146, 119.391, -17.578, 0.386)
pt3dadd(-137.129, 119.274, -17.563, 0.378)
pt3dadd(-137.076, 119.175, -17.528, 0.392)
pt3dadd(-137.032, 119.071, -17.5, 0.404)
pt3dadd(-137.018, 118.951, -17.5, 0.414)
pt3dadd(-137.006, 118.832, -17.5, 0.426)
pt3dadd(-137.05, 118.726, -17.519, 0.504)
pt3dadd(-137.123, 118.657, -17.567, 0.68)
pt3dadd(-137.226, 118.605, -17.595, 0.792)
pt3dadd(-137.318, 118.533, -17.6, 0.756)
pt3dadd(-137.392, 118.438, -17.6, 0.73)
pt3dadd(-137.464, 118.341, -17.6, 0.708)
pt3dadd(-137.466, 118.226, -17.6, 0.694)
pt3dadd(-137.454, 118.107, -17.6, 0.684)
pt3dadd(-137.426, 117.995, -17.619, 0.678)
pt3dadd(-137.386, 117.893, -17.657, 0.678)
pt3dadd(-137.342, 117.79, -17.695, 0.678)
pt3dadd(-137.332, 117.712, -17.768, 0.678)
pt3dadd(-137.323, 117.637, -17.846, 0.678)
pt3dadd(-137.312, 117.533, -17.887, 0.656)
pt3dadd(-137.3, 117.415, -17.896, 0.644)
pt3dadd(-137.287, 117.295, -17.904, 0.636)
pt3dadd(-137.279, 117.178, -17.916, 0.626)
pt3dadd(-137.293, 117.069, -17.955, 0.614)
pt3dadd(-137.32, 116.964, -17.993, 0.604)
pt3dadd(-137.406, 116.889, -18.023, 0.618)
pt3dadd(-137.473, 116.829, -18.073, 0.634)
pt3dadd(-137.495, 116.803, -18.169, 0.658)
pt3dadd(-137.521, 116.77, -18.253, 0.68)
pt3dadd(-137.588, 116.675, -18.232, 0.7)
pt3dadd(-137.657, 116.578, -18.21, 0.718)
pt3dadd(-137.742, 116.499, -18.2, 0.734)
pt3dadd(-137.844, 116.435, -18.2, 0.746)
pt3dadd(-137.947, 116.384, -18.188, 0.748)
pt3dadd(-138.054, 116.368, -18.147, 0.732)
pt3dadd(-138.162, 116.352, -18.105, 0.714)
pt3dadd(-138.24, 116.324, -18.047, 0.69)
pt3dadd(-138.263, 116.275, -17.958, 0.652)
pt3dadd(-138.304, 116.216, -17.885, 0.61)
pt3dadd(-138.38, 116.14, -17.843, 0.556)
pt3dadd(-138.458, 116.063, -17.8, 0.502)
pt3dadd(-138.524, 115.966, -17.783, 0.45)
pt3dadd(-138.588, 115.866, -17.764, 0.398)
pt3dadd(-138.612, 115.755, -17.734, 0.354)
pt3dadd(-138.637, 115.644, -17.704, 0.308)
pt3dadd(-138.602, 115.532, -17.7, 0.284)
pt3dadd(-138.557, 115.421, -17.7, 0.262)
pt3dadd(-138.521, 115.308, -17.7, 0.238)
pt3dadd(-138.491, 115.19, -17.7, 0.226)
pt3dadd(-138.462, 115.074, -17.7, 0.226)
pt3dadd(-138.432, 114.959, -17.7, 0.226)
pt3dadd(-138.402, 114.842, -17.7, 0.226)
pt3dadd(-138.373, 114.726, -17.7, 0.226)
pt3dadd(-138.343, 114.609, -17.7, 0.226)
pt3dadd(-138.32, 114.491, -17.701, 0.23)
pt3dadd(-138.307, 114.372, -17.705, 0.238)
pt3dadd(-138.295, 114.254, -17.709, 0.246)
pt3dadd(-138.283, 114.137, -17.727, 0.262)
pt3dadd(-138.271, 114.025, -17.76, 0.282)
pt3dadd(-138.259, 113.914, -17.796, 0.304)
pt3dadd(-138.248, 113.815, -17.852, 0.328)
pt3dadd(-138.239, 113.717, -17.909, 0.35)
pt3dadd(-138.235, 113.688, -18.005, 0.352)
pt3dadd(-138.233, 113.662, -18.103, 0.352)
pt3dadd(-138.211, 113.597, -18.161, 0.346)
pt3dadd(-138.167, 113.487, -18.173, 0.332)
pt3dadd(-138.122, 113.375, -18.185, 0.318)
pt3dadd(-138.079, 113.265, -18.197, 0.304)
pt3dadd(-138.058, 113.148, -18.2, 0.296)
pt3dadd(-138.046, 113.029, -18.2, 0.286)
pt3dadd(-138.032, 112.909, -18.2, 0.278)
pt3dadd(-138.02, 112.79, -18.2, 0.294)
pt3dadd(-138.022, 112.671, -18.2, 0.308)
pt3dadd(-138.025, 112.551, -18.2, 0.316)
pt3dadd(-138.03, 112.431, -18.2, 0.324)
pt3dadd(-138.035, 112.311, -18.2, 0.332)
pt3dadd(-138.04, 112.191, -18.2, 0.34)
pt3dadd(-138.044, 112.071, -18.2, 0.348)
pt3dadd(-138.055, 111.957, -18.224, 0.352)
pt3dadd(-138.07, 111.851, -18.268, 0.352)
pt3dadd(-138.085, 111.744, -18.312, 0.352)
pt3dadd(-138.101, 111.637, -18.355, 0.352)
pt3dadd(-138.115, 111.53, -18.399, 0.352)
pt3dadd(-138.184, 111.46, -18.456, 0.324)
pt3dadd(-138.247, 111.381, -18.5, 0.296)
pt3dadd(-138.289, 111.268, -18.5, 0.274)
pt3dadd(-138.331, 111.156, -18.5, 0.252)
pt3dadd(-138.319, 111.037, -18.5, 0.238)
pt3dadd(-138.306, 110.918, -18.5, 0.226)
}
dend_5[6] {pt3dclear()
pt3dadd(12.017, 172.46, -15.533, 2.06)
pt3dadd(12.013, 172.477, -15.576, 2.046)
pt3dadd(12.003, 172.514, -15.671, 2.02)
pt3dadd(11.993, 172.553, -15.766, 1.992)
pt3dadd(11.984, 172.589, -15.861, 1.964)
pt3dadd(11.974, 172.626, -15.955, 1.936)
pt3dadd(11.964, 172.663, -16.05, 1.91)
pt3dadd(11.954, 172.7, -16.145, 1.882)
pt3dadd(11.945, 172.738, -16.24, 1.854)
pt3dadd(11.935, 172.775, -16.334, 1.826)
pt3dadd(11.906, 172.831, -16.4, 1.776)
pt3dadd(11.836, 172.927, -16.4, 1.674)
pt3dadd(11.766, 173.024, -16.4, 1.57)
pt3dadd(11.695, 173.122, -16.4, 1.468)
pt3dadd(11.625, 173.219, -16.4, 1.364)
pt3dadd(11.55, 173.312, -16.4, 1.274)
pt3dadd(11.458, 173.389, -16.4, 1.232)
pt3dadd(11.366, 173.466, -16.4, 1.192)
pt3dadd(11.274, 173.544, -16.4, 1.152)
pt3dadd(11.182, 173.621, -16.4, 1.112)
pt3dadd(11.085, 173.688, -16.4, 1.078)
pt3dadd(10.969, 173.72, -16.4, 1.074)
pt3dadd(10.854, 173.753, -16.4, 1.07)
pt3dadd(10.739, 173.785, -16.4, 1.064)
pt3dadd(10.623, 173.818, -16.4, 1.06)
pt3dadd(10.508, 173.85, -16.4, 1.056)
pt3dadd(10.389, 173.845, -16.4, 1.112)
pt3dadd(10.27, 173.832, -16.4, 1.178)
pt3dadd(10.15, 173.82, -16.4, 1.246)
pt3dadd(10.031, 173.808, -16.4, 1.334)
pt3dadd(9.911, 173.795, -16.4, 1.426)
pt3dadd(9.792, 173.783, -16.4, 1.518)
pt3dadd(9.672, 173.786, -16.4, 1.59)
pt3dadd(9.553, 173.795, -16.4, 1.656)
pt3dadd(9.45, 173.828, -16.4, 1.7)
pt3dadd(9.399, 173.936, -16.4, 1.668)
pt3dadd(9.349, 174.046, -16.4, 1.636)
pt3dadd(9.294, 174.152, -16.4, 1.488)
pt3dadd(9.24, 174.26, -16.4, 1.344)
pt3dadd(9.189, 174.368, -16.4, 1.238)
pt3dadd(9.138, 174.476, -16.4, 1.13)
}
}
proc shape3d_121() {
dend_5[6] { pt3dadd(9.093, 174.588, -16.4, 1.1)
pt3dadd(9.049, 174.7, -16.4, 1.068)
pt3dadd(8.97, 174.781, -16.4, 1.068)
pt3dadd(8.864, 174.838, -16.4, 1.092)
pt3dadd(8.755, 174.886, -16.4, 1.118)
pt3dadd(8.64, 174.922, -16.4, 1.152)
pt3dadd(8.527, 174.959, -16.4, 1.182)
pt3dadd(8.429, 175.028, -16.4, 1.196)
pt3dadd(8.331, 175.097, -16.4, 1.21)
pt3dadd(8.233, 175.166, -16.4, 1.224)
pt3dadd(8.169, 175.261, -16.4, 1.254)
pt3dadd(8.13, 175.374, -16.4, 1.294)
pt3dadd(8.089, 175.484, -16.403, 1.334)
pt3dadd(7.997, 175.543, -16.445, 1.388)
pt3dadd(7.906, 175.602, -16.487, 1.44)
pt3dadd(7.814, 175.618, -16.545, 1.482)
pt3dadd(7.723, 175.614, -16.61, 1.518)
pt3dadd(7.619, 175.636, -16.65, 1.506)
pt3dadd(7.508, 175.669, -16.675, 1.468)
pt3dadd(7.398, 175.705, -16.7, 1.43)
pt3dadd(7.296, 175.769, -16.7, 1.346)
pt3dadd(7.195, 175.834, -16.7, 1.264)
pt3dadd(7.153, 175.943, -16.7, 1.138)
pt3dadd(7.121, 176.058, -16.702, 1.004)
pt3dadd(7.109, 176.173, -16.724, 0.866)
pt3dadd(7.101, 176.251, -16.793, 0.804)
pt3dadd(7.099, 176.273, -16.89, 0.826)
pt3dadd(7.099, 176.274, -16.99, 0.92)
pt3dadd(7.099, 176.274, -17.09, 0.974)
pt3dadd(7.079, 176.306, -17.185, 0.968)
pt3dadd(7.056, 176.342, -17.278, 0.956)
pt3dadd(6.997, 176.36, -17.362, 0.894)
pt3dadd(6.926, 176.374, -17.442, 0.816)
pt3dadd(6.826, 176.37, -17.494, 0.76)
pt3dadd(6.72, 176.364, -17.54, 0.708)
pt3dadd(6.614, 176.358, -17.586, 0.656)
pt3dadd(6.538, 176.446, -17.594, 0.586)
pt3dadd(6.464, 176.539, -17.599, 0.514)
pt3dadd(6.405, 176.638, -17.583, 0.422)
pt3dadd(6.305, 176.678, -17.541, 0.38)
pt3dadd(6.212, 176.735, -17.51, 0.348)
pt3dadd(6.139, 176.83, -17.504, 0.336)
pt3dadd(6.073, 176.927, -17.492, 0.322)
pt3dadd(6.035, 177.03, -17.453, 0.296)
pt3dadd(5.997, 177.116, -17.402, 0.276)
pt3dadd(5.955, 177.138, -17.31, 0.276)
pt3dadd(5.918, 177.163, -17.218, 0.282)
pt3dadd(5.904, 177.209, -17.126, 0.316)
pt3dadd(5.856, 177.271, -17.055, 0.378)
pt3dadd(5.795, 177.341, -16.991, 0.45)
pt3dadd(5.756, 177.44, -16.945, 0.526)
pt3dadd(5.719, 177.539, -16.899, 0.604)
pt3dadd(5.671, 177.606, -16.826, 0.678)
pt3dadd(5.654, 177.684, -16.763, 0.742)
pt3dadd(5.696, 177.785, -16.72, 0.784)
pt3dadd(5.693, 177.877, -16.668, 0.804)
pt3dadd(5.652, 177.964, -16.608, 0.804)
pt3dadd(5.611, 178.05, -16.548, 0.804)
pt3dadd(5.571, 178.139, -16.489, 0.786)
pt3dadd(5.531, 178.228, -16.431, 0.758)
pt3dadd(5.463, 178.301, -16.468, 0.712)
pt3dadd(5.429, 178.382, -16.534, 0.646)
pt3dadd(5.419, 178.481, -16.588, 0.596)
pt3dadd(5.408, 178.589, -16.632, 0.554)
pt3dadd(5.37, 178.687, -16.678, 0.49)
pt3dadd(5.29, 178.769, -16.7, 0.478)
pt3dadd(5.186, 178.826, -16.7, 0.514)
pt3dadd(5.076, 178.872, -16.69, 0.528)
pt3dadd(5.016, 178.932, -16.626, 0.566)
pt3dadd(5.004, 178.987, -16.538, 0.554)
pt3dadd(4.899, 179.03, -16.519, 0.54)
pt3dadd(4.788, 179.075, -16.504, 0.526)
pt3dadd(4.678, 179.118, -16.489, 0.512)
pt3dadd(4.569, 179.146, -16.492, 0.492)
pt3dadd(4.467, 179.135, -16.543, 0.458)
pt3dadd(4.363, 179.128, -16.589, 0.428)
pt3dadd(4.246, 179.158, -16.594, 0.44)
pt3dadd(4.13, 179.186, -16.599, 0.45)
pt3dadd(4.063, 179.28, -16.6, 0.452)
pt3dadd(4.005, 179.384, -16.6, 0.452)
pt3dadd(3.936, 179.483, -16.6, 0.458)
pt3dadd(3.858, 179.573, -16.6, 0.47)
pt3dadd(3.769, 179.645, -16.588, 0.468)
pt3dadd(3.663, 179.686, -16.556, 0.444)
pt3dadd(3.556, 179.725, -16.524, 0.42)
pt3dadd(3.473, 179.773, -16.481, 0.394)
pt3dadd(3.465, 179.846, -16.403, 0.358)
pt3dadd(3.457, 179.926, -16.329, 0.32)
pt3dadd(3.446, 180.026, -16.278, 0.288)
pt3dadd(3.438, 180.108, -16.205, 0.37)
pt3dadd(3.429, 180.19, -16.134, 0.402)
pt3dadd(3.41, 180.3, -16.104, 0.386)
pt3dadd(3.37, 180.414, -16.1, 0.398)
pt3dadd(3.306, 180.506, -16.123, 0.436)
pt3dadd(3.271, 180.562, -16.202, 0.452)
pt3dadd(3.268, 180.577, -16.301, 0.452)
pt3dadd(3.266, 180.596, -16.399, 0.42)
pt3dadd(3.259, 180.665, -16.478, 0.338)
pt3dadd(3.249, 180.758, -16.541, 0.256)
pt3dadd(3.215, 180.828, -16.617, 0.252)
pt3dadd(3.174, 180.892, -16.689, 0.252)
pt3dadd(3.055, 180.9, -16.694, 0.272)
pt3dadd(2.935, 180.908, -16.698, 0.292)
pt3dadd(2.819, 180.923, -16.683, 0.32)
pt3dadd(2.706, 180.941, -16.654, 0.354)
pt3dadd(2.593, 180.942, -16.625, 0.382)
pt3dadd(2.483, 180.907, -16.599, 0.396)
pt3dadd(2.411, 180.931, -16.542, 0.388)
pt3dadd(2.371, 180.992, -16.463, 0.344)
pt3dadd(2.32, 181.073, -16.408, 0.34)
pt3dadd(2.26, 181.174, -16.408, 0.414)
pt3dadd(2.227, 181.268, -16.457, 0.452)
pt3dadd(2.191, 181.316, -16.543, 0.432)
pt3dadd(2.104, 181.357, -16.598, 0.356)
pt3dadd(2.013, 181.399, -16.649, 0.332)
pt3dadd(1.987, 181.409, -16.745, 0.446)
pt3dadd(2.005, 181.41, -16.843, 0.572)
pt3dadd(1.956, 181.441, -16.919, 0.614)
pt3dadd(1.88, 181.482, -16.989, 0.628)
pt3dadd(1.803, 181.52, -17.059, 0.644)
pt3dadd(1.72, 181.571, -17.114, 0.652)
pt3dadd(1.627, 181.634, -17.148, 0.652)
pt3dadd(1.535, 181.699, -17.183, 0.652)
pt3dadd(1.442, 181.763, -17.217, 0.652)
pt3dadd(1.359, 181.82, -17.262, 0.636)
pt3dadd(1.313, 181.858, -17.35, 0.536)
pt3dadd(1.251, 181.939, -17.389, 0.462)
pt3dadd(1.195, 182.02, -17.341, 0.458)
pt3dadd(1.169, 182.077, -17.256, 0.516)
pt3dadd(1.116, 182.134, -17.181, 0.624)
pt3dadd(1.066, 182.155, -17.094, 0.652)
pt3dadd(1.049, 182.172, -16.996, 0.618)
pt3dadd(1.044, 182.22, -16.906, 0.578)
pt3dadd(1.022, 182.299, -16.833, 0.628)
pt3dadd(0.962, 182.388, -16.791, 0.71)
pt3dadd(0.905, 182.472, -16.741, 0.796)
pt3dadd(0.871, 182.533, -16.659, 0.902)
pt3dadd(0.835, 182.582, -16.575, 1.002)
pt3dadd(0.793, 182.603, -16.483, 1.088)
pt3dadd(0.769, 182.632, -16.392, 1.17)
pt3dadd(0.807, 182.687, -16.309, 1.238)
pt3dadd(0.833, 182.726, -16.22, 1.286)
pt3dadd(0.838, 182.74, -16.121, 1.298)
pt3dadd(0.843, 182.753, -16.021, 1.31)
pt3dadd(0.848, 182.767, -15.922, 1.322)
pt3dadd(0.839, 182.798, -15.838, 1.334)
pt3dadd(0.779, 182.897, -15.809, 1.346)
pt3dadd(0.722, 182.995, -15.779, 1.356)
pt3dadd(0.67, 183.095, -15.744, 1.356)
pt3dadd(0.617, 183.193, -15.709, 1.356)
pt3dadd(0.524, 183.259, -15.704, 1.356)
pt3dadd(0.416, 183.311, -15.709, 1.356)
pt3dadd(0.316, 183.367, -15.736, 1.356)
pt3dadd(0.217, 183.398, -15.782, 1.374)
pt3dadd(0.104, 183.43, -15.8, 1.44)
pt3dadd(0.006, 183.498, -15.793, 1.522)
pt3dadd(-0.054, 183.59, -15.762, 1.462)
pt3dadd(-0.076, 183.692, -15.713, 1.28)
pt3dadd(-0.087, 183.8, -15.669, 1.16)
pt3dadd(-0.097, 183.888, -15.603, 1.122)
pt3dadd(-0.102, 183.941, -15.516, 1.072)
pt3dadd(-0.106, 183.974, -15.42, 0.966)
pt3dadd(-0.112, 184.037, -15.341, 0.876)
pt3dadd(-0.124, 184.153, -15.324, 0.856)
pt3dadd(-0.137, 184.272, -15.307, 0.838)
pt3dadd(-0.149, 184.39, -15.293, 0.84)
pt3dadd(-0.162, 184.508, -15.281, 0.858)
pt3dadd(-0.174, 184.626, -15.268, 0.876)
pt3dadd(-0.183, 184.736, -15.233, 0.958)
pt3dadd(-0.174, 184.855, -15.227, 0.98)
pt3dadd(-0.166, 184.974, -15.221, 1)
pt3dadd(-0.158, 185.095, -15.215, 1.022)
pt3dadd(-0.149, 185.214, -15.209, 1.044)
pt3dadd(-0.141, 185.333, -15.204, 1.066)
pt3dadd(-0.14, 185.453, -15.2, 1.088)
pt3dadd(-0.153, 185.572, -15.2, 1.11)
pt3dadd(-0.165, 185.692, -15.2, 1.13)
pt3dadd(-0.178, 185.81, -15.2, 1.152)
pt3dadd(-0.191, 185.93, -15.2, 1.174)
pt3dadd(-0.203, 186.049, -15.2, 1.196)
pt3dadd(-0.216, 186.168, -15.2, 1.216)
pt3dadd(-0.228, 186.288, -15.2, 1.256)
pt3dadd(-0.241, 186.407, -15.2, 1.322)
pt3dadd(-0.253, 186.527, -15.2, 1.39)
pt3dadd(-0.266, 186.646, -15.199, 1.46)
pt3dadd(-0.278, 186.766, -15.195, 1.538)
pt3dadd(-0.291, 186.884, -15.191, 1.616)
pt3dadd(-0.302, 186.989, -15.156, 1.698)
pt3dadd(-0.311, 187.075, -15.088, 1.78)
pt3dadd(-0.32, 187.164, -15.02, 1.854)
pt3dadd(-0.329, 187.25, -14.952, 1.914)
pt3dadd(-0.339, 187.345, -14.894, 1.962)
pt3dadd(-0.351, 187.462, -14.87, 1.974)
pt3dadd(-0.364, 187.577, -14.846, 1.986)
pt3dadd(-0.376, 187.692, -14.821, 1.998)
pt3dadd(-0.388, 187.808, -14.8, 2.008)
pt3dadd(-0.401, 187.927, -14.796, 2.008)
pt3dadd(-0.413, 188.047, -14.792, 2.008)
pt3dadd(-0.425, 188.165, -14.783, 1.982)
pt3dadd(-0.448, 188.276, -14.752, 1.89)
}
}
proc shape3d_122() {
dend_5[6] { pt3dadd(-0.484, 188.383, -14.717, 1.848)
pt3dadd(-0.521, 188.489, -14.682, 1.806)
pt3dadd(-0.557, 188.596, -14.647, 1.764)
pt3dadd(-0.594, 188.701, -14.612, 1.722)
pt3dadd(-0.613, 188.804, -14.565, 1.674)
pt3dadd(-0.624, 188.906, -14.513, 1.626)
pt3dadd(-0.635, 189.008, -14.46, 1.576)
pt3dadd(-0.645, 189.109, -14.408, 1.526)
pt3dadd(-0.656, 189.211, -14.355, 1.478)
pt3dadd(-0.68, 189.31, -14.304, 1.43)
pt3dadd(-0.714, 189.408, -14.252, 1.386)
pt3dadd(-0.748, 189.504, -14.201, 1.342)
pt3dadd(-0.782, 189.601, -14.149, 1.298)
pt3dadd(-0.816, 189.698, -14.099, 1.254)
pt3dadd(-0.853, 189.806, -14.066, 1.204)
pt3dadd(-0.89, 189.914, -14.034, 1.156)
pt3dadd(-0.982, 189.988, -14.016, 1.13)
pt3dadd(-1.072, 190.064, -14, 1.102)
pt3dadd(-1.139, 190.163, -13.994, 1.066)
pt3dadd(-1.206, 190.262, -13.989, 1.032)
pt3dadd(-1.232, 190.309, -13.903, 0.996)
pt3dadd(-1.256, 190.352, -13.812, 0.958)
pt3dadd(-1.259, 190.358, -13.713, 0.986)
pt3dadd(-1.259, 190.358, -13.613, 1.024)
pt3dadd(-1.309, 190.429, -13.551, 1.076)
pt3dadd(-1.366, 190.51, -13.495, 1.132)
pt3dadd(-1.423, 190.591, -13.439, 1.186)
pt3dadd(-1.48, 190.672, -13.383, 1.24)
pt3dadd(-1.553, 190.758, -13.356, 1.29)
pt3dadd(-1.632, 190.846, -13.342, 1.34)
pt3dadd(-1.712, 190.936, -13.327, 1.39)
pt3dadd(-1.791, 191.023, -13.313, 1.438)
pt3dadd(-1.871, 191.112, -13.3, 1.482)
pt3dadd(-1.952, 191.2, -13.3, 1.482)
pt3dadd(-2.034, 191.287, -13.3, 1.482)
pt3dadd(-2.116, 191.376, -13.3, 1.482)
pt3dadd(-2.197, 191.464, -13.3, 1.482)
pt3dadd(-2.278, 191.551, -13.3, 1.478)
pt3dadd(-2.354, 191.645, -13.3, 1.454)
pt3dadd(-2.43, 191.737, -13.3, 1.428)
pt3dadd(-2.507, 191.831, -13.3, 1.404)
pt3dadd(-2.583, 191.923, -13.3, 1.378)
pt3dadd(-2.659, 192.016, -13.3, 1.356)
pt3dadd(-2.736, 192.108, -13.298, 1.356)
pt3dadd(-2.813, 192.199, -13.295, 1.356)
pt3dadd(-2.891, 192.29, -13.293, 1.356)
pt3dadd(-2.968, 192.383, -13.291, 1.356)
pt3dadd(-3.044, 192.475, -13.287, 1.362)
pt3dadd(-3.109, 192.574, -13.267, 1.404)
pt3dadd(-3.175, 192.671, -13.248, 1.448)
pt3dadd(-3.24, 192.769, -13.229, 1.492)
pt3dadd(-3.306, 192.866, -13.21, 1.536)
pt3dadd(-3.39, 192.947, -13.2, 1.588)
pt3dadd(-3.493, 193.008, -13.2, 1.648)
pt3dadd(-3.596, 193.069, -13.2, 1.708)
pt3dadd(-3.699, 193.132, -13.2, 1.768)
pt3dadd(-3.802, 193.193, -13.2, 1.828)
pt3dadd(-3.894, 193.267, -13.2, 1.872)
pt3dadd(-3.976, 193.356, -13.2, 1.896)
pt3dadd(-4.058, 193.444, -13.2, 1.922)
pt3dadd(-4.139, 193.531, -13.2, 1.946)
pt3dadd(-4.221, 193.62, -13.2, 1.972)
pt3dadd(-4.317, 193.687, -13.2, 1.984)
pt3dadd(-4.427, 193.735, -13.2, 1.984)
pt3dadd(-4.536, 193.784, -13.2, 1.984)
pt3dadd(-4.646, 193.834, -13.2, 1.984)
pt3dadd(-4.755, 193.882, -13.2, 1.984)
pt3dadd(-4.862, 193.937, -13.2, 1.978)
pt3dadd(-4.963, 194.002, -13.2, 1.962)
pt3dadd(-5.064, 194.066, -13.2, 1.948)
pt3dadd(-5.165, 194.131, -13.2, 1.932)
pt3dadd(-5.266, 194.196, -13.2, 1.918)
pt3dadd(-5.363, 194.264, -13.192, 1.904)
pt3dadd(-5.453, 194.341, -13.172, 1.892)
pt3dadd(-5.543, 194.416, -13.152, 1.88)
pt3dadd(-5.633, 194.492, -13.131, 1.87)
pt3dadd(-5.723, 194.567, -13.111, 1.858)
pt3dadd(-5.776, 194.663, -13.07, 1.844)
pt3dadd(-5.827, 194.76, -13.031, 1.83)
pt3dadd(-5.856, 194.874, -13.011, 1.808)
pt3dadd(-5.885, 194.988, -12.992, 1.786)
pt3dadd(-5.934, 195.065, -12.932, 1.782)
pt3dadd(-5.987, 195.133, -12.862, 1.782)
pt3dadd(-6.041, 195.169, -12.779, 1.768)
pt3dadd(-6.103, 195.215, -12.711, 1.756)
pt3dadd(-6.196, 195.289, -12.707, 1.75)
pt3dadd(-6.289, 195.365, -12.704, 1.742)
pt3dadd(-6.382, 195.442, -12.701, 1.734)
pt3dadd(-6.446, 195.541, -12.696, 1.716)
pt3dadd(-6.499, 195.647, -12.691, 1.694)
pt3dadd(-6.533, 195.758, -12.676, 1.682)
pt3dadd(-6.579, 195.856, -12.639, 1.694)
pt3dadd(-6.642, 195.944, -12.596, 1.712)
pt3dadd(-6.706, 196.033, -12.554, 1.73)
pt3dadd(-6.769, 196.121, -12.512, 1.748)
pt3dadd(-6.841, 196.198, -12.466, 1.77)
pt3dadd(-6.925, 196.258, -12.415, 1.8)
pt3dadd(-6.959, 196.33, -12.346, 1.816)
pt3dadd(-6.974, 196.408, -12.27, 1.83)
pt3dadd(-7.017, 196.5, -12.23, 1.808)
pt3dadd(-7.075, 196.602, -12.207, 1.77)
pt3dadd(-7.129, 196.708, -12.2, 1.736)
pt3dadd(-7.18, 196.816, -12.2, 1.704)
pt3dadd(-7.226, 196.927, -12.2, 1.654)
pt3dadd(-7.262, 197.041, -12.2, 1.566)
pt3dadd(-7.283, 197.159, -12.2, 1.518)
pt3dadd(-7.296, 197.278, -12.2, 1.498)
pt3dadd(-7.308, 197.398, -12.2, 1.476)
pt3dadd(-7.321, 197.516, -12.2, 1.454)
pt3dadd(-7.333, 197.636, -12.2, 1.432)
pt3dadd(-7.346, 197.755, -12.2, 1.41)
pt3dadd(-7.358, 197.875, -12.2, 1.39)
pt3dadd(-7.372, 197.994, -12.2, 1.368)
pt3dadd(-7.387, 198.113, -12.2, 1.346)
pt3dadd(-7.401, 198.233, -12.2, 1.324)
pt3dadd(-7.416, 198.352, -12.2, 1.302)
pt3dadd(-7.43, 198.47, -12.2, 1.28)
pt3dadd(-7.444, 198.59, -12.2, 1.258)
pt3dadd(-7.459, 198.709, -12.2, 1.236)
pt3dadd(-7.528, 198.799, -12.2, 1.204)
pt3dadd(-7.619, 198.878, -12.2, 1.17)
pt3dadd(-7.678, 198.973, -12.181, 1.148)
pt3dadd(-7.715, 199.08, -12.148, 1.136)
pt3dadd(-7.738, 199.194, -12.124, 1.13)
pt3dadd(-7.751, 199.31, -12.107, 1.13)
pt3dadd(-7.763, 199.429, -12.09, 1.13)
pt3dadd(-7.77, 199.499, -12.011, 1.13)
pt3dadd(-7.777, 199.566, -11.928, 1.13)
pt3dadd(-7.789, 199.67, -11.889, 1.12)
pt3dadd(-7.801, 199.786, -11.862, 1.108)
pt3dadd(-7.813, 199.9, -11.835, 1.096)
pt3dadd(-7.825, 200.015, -11.807, 1.082)
pt3dadd(-7.837, 200.132, -11.8, 1.054)
pt3dadd(-7.85, 200.252, -11.8, 1.022)
pt3dadd(-7.862, 200.371, -11.8, 0.988)
pt3dadd(-7.874, 200.488, -11.776, 0.938)
pt3dadd(-7.886, 200.599, -11.745, 0.882)
pt3dadd(-7.898, 200.713, -11.713, 0.826)
pt3dadd(-7.908, 200.803, -11.655, 0.77)
pt3dadd(-7.915, 200.879, -11.576, 0.71)
pt3dadd(-7.925, 200.968, -11.513, 0.666)
pt3dadd(-7.936, 201.074, -11.469, 0.642)
pt3dadd(-7.947, 201.181, -11.424, 0.616)
pt3dadd(-7.959, 201.294, -11.4, 0.606)
pt3dadd(-7.972, 201.413, -11.4, 0.614)
pt3dadd(-7.984, 201.533, -11.4, 0.624)
pt3dadd(-7.997, 201.652, -11.4, 0.64)
pt3dadd(-7.985, 201.767, -11.389, 0.656)
pt3dadd(-7.947, 201.877, -11.364, 0.662)
pt3dadd(-7.909, 201.986, -11.34, 0.666)
pt3dadd(-7.87, 202.096, -11.316, 0.672)
pt3dadd(-7.832, 202.206, -11.291, 0.678)
pt3dadd(-7.826, 202.307, -11.239, 0.7)
pt3dadd(-7.823, 202.408, -11.184, 0.726)
pt3dadd(-7.763, 202.45, -11.109, 0.752)
pt3dadd(-7.695, 202.486, -11.033, 0.778)
pt3dadd(-7.662, 202.6, -11.017, 0.802)
pt3dadd(-7.628, 202.714, -11.001, 0.828)
pt3dadd(-7.638, 202.832, -11, 0.812)
pt3dadd(-7.651, 202.951, -11, 0.796)
pt3dadd(-7.663, 203.071, -11, 0.78)
pt3dadd(-7.676, 203.19, -11, 0.742)
pt3dadd(-7.688, 203.31, -11, 0.706)
pt3dadd(-7.687, 203.429, -11, 0.668)
pt3dadd(-7.685, 203.55, -11, 0.63)
pt3dadd(-7.666, 203.664, -10.999, 0.594)
pt3dadd(-7.598, 203.762, -10.993, 0.556)
pt3dadd(-7.54, 203.855, -10.973, 0.52)
pt3dadd(-7.527, 203.927, -10.893, 0.48)
pt3dadd(-7.519, 203.998, -10.813, 0.45)
pt3dadd(-7.527, 204.072, -10.735, 0.438)
pt3dadd(-7.536, 204.146, -10.657, 0.428)
pt3dadd(-7.556, 204.216, -10.578, 0.436)
pt3dadd(-7.575, 204.287, -10.498, 0.442)
pt3dadd(-7.594, 204.356, -10.418, 0.45)
pt3dadd(-7.633, 204.458, -10.4, 0.476)
pt3dadd(-7.678, 204.569, -10.4, 0.506)
pt3dadd(-7.712, 204.684, -10.4, 0.544)
pt3dadd(-7.732, 204.8, -10.393, 0.582)
pt3dadd(-7.767, 204.913, -10.374, 0.59)
pt3dadd(-7.802, 205.026, -10.355, 0.6)
pt3dadd(-7.837, 205.138, -10.336, 0.61)
pt3dadd(-7.872, 205.25, -10.316, 0.62)
pt3dadd(-7.904, 205.363, -10.302, 0.632)
pt3dadd(-7.917, 205.482, -10.317, 0.656)
pt3dadd(-7.929, 205.6, -10.331, 0.68)
pt3dadd(-7.941, 205.718, -10.345, 0.704)
pt3dadd(-7.954, 205.836, -10.36, 0.73)
pt3dadd(-7.966, 205.955, -10.374, 0.754)
pt3dadd(-7.979, 206.072, -10.389, 0.778)
pt3dadd(-7.972, 206.191, -10.391, 0.802)
pt3dadd(-7.964, 206.312, -10.393, 0.828)
pt3dadd(-7.956, 206.431, -10.394, 0.854)
pt3dadd(-7.949, 206.551, -10.396, 0.878)
pt3dadd(-7.941, 206.67, -10.398, 0.904)
pt3dadd(-7.933, 206.79, -10.4, 0.93)
pt3dadd(-7.946, 206.91, -10.4, 0.944)
pt3dadd(-7.959, 207.029, -10.4, 0.958)
pt3dadd(-7.971, 207.149, -10.4, 0.972)
pt3dadd(-7.984, 207.268, -10.4, 0.986)
}
}
proc shape3d_123() {
dend_5[6] { pt3dadd(-7.996, 207.388, -10.4, 1)
pt3dadd(-8.009, 207.506, -10.4, 1.016)
pt3dadd(-8.021, 207.625, -10.4, 1.03)
}
dend_5[7] {pt3dclear()
pt3dadd(-8.021, 207.625, -10.4, 1.03)
pt3dadd(-8.017, 207.649, -10.4, 1.028)
pt3dadd(-7.996, 207.767, -10.4, 1.024)
pt3dadd(-7.975, 207.886, -10.4, 1.02)
pt3dadd(-7.955, 208.003, -10.4, 1.016)
pt3dadd(-7.934, 208.122, -10.4, 1.01)
pt3dadd(-7.913, 208.241, -10.4, 1.006)
pt3dadd(-7.894, 208.358, -10.4, 1.004)
pt3dadd(-7.876, 208.477, -10.4, 1.004)
pt3dadd(-7.858, 208.596, -10.4, 1.004)
pt3dadd(-7.841, 208.715, -10.4, 1.004)
pt3dadd(-7.823, 208.832, -10.4, 1.004)
pt3dadd(-7.805, 208.951, -10.4, 1.004)
pt3dadd(-7.811, 209.071, -10.4, 1.01)
pt3dadd(-7.824, 209.191, -10.4, 1.018)
pt3dadd(-7.836, 209.31, -10.4, 1.024)
pt3dadd(-7.849, 209.43, -10.4, 1.032)
pt3dadd(-7.861, 209.549, -10.4, 1.038)
pt3dadd(-7.874, 209.669, -10.4, 1.046)
pt3dadd(-7.887, 209.788, -10.4, 1.054)
pt3dadd(-7.882, 209.906, -10.394, 1.048)
pt3dadd(-7.873, 210.025, -10.386, 1.038)
pt3dadd(-7.865, 210.145, -10.378, 1.03)
pt3dadd(-7.856, 210.264, -10.37, 1.022)
pt3dadd(-7.847, 210.384, -10.362, 1.012)
pt3dadd(-7.835, 210.5, -10.349, 1.002)
pt3dadd(-7.805, 210.598, -10.297, 0.984)
pt3dadd(-7.774, 210.696, -10.244, 0.966)
pt3dadd(-7.744, 210.793, -10.192, 0.948)
pt3dadd(-7.713, 210.89, -10.14, 0.932)
pt3dadd(-7.689, 211.006, -10.128, 0.912)
pt3dadd(-7.667, 211.123, -10.122, 0.894)
pt3dadd(-7.644, 211.241, -10.115, 0.876)
pt3dadd(-7.621, 211.358, -10.109, 0.856)
pt3dadd(-7.598, 211.476, -10.103, 0.838)
pt3dadd(-7.561, 211.59, -10.1, 0.834)
pt3dadd(-7.512, 211.698, -10.1, 0.846)
pt3dadd(-7.448, 211.798, -10.1, 0.858)
pt3dadd(-7.357, 211.876, -10.1, 0.87)
pt3dadd(-7.283, 211.961, -10.097, 0.88)
pt3dadd(-7.29, 212.078, -10.079, 0.89)
pt3dadd(-7.297, 212.195, -10.061, 0.9)
pt3dadd(-7.299, 212.278, -9.998, 0.904)
pt3dadd(-7.3, 212.341, -9.913, 0.904)
pt3dadd(-7.271, 212.417, -9.844, 0.878)
pt3dadd(-7.231, 212.508, -9.79, 0.85)
pt3dadd(-7.205, 212.606, -9.738, 0.838)
pt3dadd(-7.178, 212.706, -9.687, 0.826)
pt3dadd(-7.151, 212.806, -9.635, 0.814)
pt3dadd(-7.127, 212.906, -9.585, 0.804)
pt3dadd(-7.122, 213.017, -9.546, 0.804)
pt3dadd(-7.117, 213.127, -9.507, 0.804)
pt3dadd(-7.112, 213.238, -9.469, 0.804)
pt3dadd(-7.107, 213.348, -9.43, 0.804)
pt3dadd(-7.104, 213.461, -9.396, 0.81)
pt3dadd(-7.11, 213.578, -9.379, 0.836)
pt3dadd(-7.115, 213.696, -9.361, 0.862)
pt3dadd(-7.121, 213.815, -9.344, 0.888)
pt3dadd(-7.126, 213.932, -9.327, 0.914)
pt3dadd(-7.132, 214.05, -9.309, 0.94)
pt3dadd(-7.14, 214.165, -9.283, 0.972)
pt3dadd(-7.152, 214.277, -9.246, 1.008)
pt3dadd(-7.163, 214.387, -9.208, 1.046)
pt3dadd(-7.175, 214.499, -9.171, 1.084)
pt3dadd(-7.187, 214.609, -9.134, 1.12)
pt3dadd(-7.198, 214.718, -9.095, 1.16)
pt3dadd(-7.208, 214.811, -9.033, 1.218)
pt3dadd(-7.218, 214.906, -8.97, 1.278)
pt3dadd(-7.222, 214.948, -8.878, 1.27)
pt3dadd(-7.226, 214.986, -8.783, 1.26)
pt3dadd(-7.235, 215.071, -8.734, 1.232)
pt3dadd(-7.248, 215.189, -8.717, 1.194)
pt3dadd(-7.26, 215.306, -8.7, 1.156)
pt3dadd(-7.258, 215.428, -8.7, 1.136)
pt3dadd(-7.256, 215.546, -8.7, 1.118)
pt3dadd(-7.245, 215.665, -8.7, 1.114)
pt3dadd(-7.213, 215.78, -8.7, 1.148)
pt3dadd(-7.198, 215.899, -8.7, 1.17)
pt3dadd(-7.188, 216.019, -8.7, 1.192)
pt3dadd(-7.178, 216.139, -8.7, 1.212)
pt3dadd(-7.169, 216.258, -8.7, 1.234)
pt3dadd(-7.159, 216.378, -8.7, 1.254)
pt3dadd(-7.149, 216.498, -8.7, 1.276)
pt3dadd(-7.156, 216.617, -8.692, 1.292)
pt3dadd(-7.169, 216.734, -8.682, 1.308)
pt3dadd(-7.181, 216.854, -8.671, 1.324)
pt3dadd(-7.194, 216.972, -8.661, 1.34)
pt3dadd(-7.206, 217.092, -8.65, 1.356)
pt3dadd(-7.219, 217.21, -8.64, 1.372)
pt3dadd(-7.222, 217.328, -8.628, 1.382)
pt3dadd(-7.213, 217.447, -8.616, 1.388)
pt3dadd(-7.203, 217.566, -8.604, 1.392)
pt3dadd(-7.194, 217.686, -8.592, 1.396)
pt3dadd(-7.184, 217.804, -8.58, 1.402)
pt3dadd(-7.175, 217.922, -8.568, 1.406)
pt3dadd(-7.185, 218.036, -8.537, 1.39)
pt3dadd(-7.197, 218.148, -8.505, 1.372)
pt3dadd(-7.209, 218.262, -8.472, 1.352)
pt3dadd(-7.221, 218.375, -8.44, 1.334)
pt3dadd(-7.232, 218.488, -8.408, 1.316)
pt3dadd(-7.236, 218.59, -8.361, 1.29)
pt3dadd(-7.227, 218.676, -8.292, 1.252)
pt3dadd(-7.218, 218.762, -8.223, 1.212)
pt3dadd(-7.21, 218.85, -8.155, 1.174)
pt3dadd(-7.201, 218.938, -8.086, 1.134)
pt3dadd(-7.179, 219.043, -8.045, 1.086)
pt3dadd(-7.155, 219.152, -8.009, 1.036)
pt3dadd(-7.131, 219.26, -7.972, 0.986)
pt3dadd(-7.107, 219.371, -7.935, 0.936)
pt3dadd(-7.086, 219.479, -7.896, 0.89)
pt3dadd(-7.071, 219.586, -7.852, 0.852)
pt3dadd(-7.056, 219.692, -7.808, 0.814)
pt3dadd(-7.041, 219.799, -7.765, 0.776)
pt3dadd(-7.026, 219.906, -7.721, 0.736)
pt3dadd(-7.013, 220.013, -7.676, 0.716)
pt3dadd(-7.001, 220.117, -7.63, 0.7)
pt3dadd(-6.988, 220.224, -7.584, 0.682)
pt3dadd(-6.976, 220.331, -7.539, 0.666)
pt3dadd(-6.968, 220.438, -7.494, 0.654)
pt3dadd(-6.977, 220.548, -7.456, 0.658)
pt3dadd(-6.986, 220.658, -7.418, 0.664)
pt3dadd(-6.995, 220.769, -7.38, 0.668)
pt3dadd(-7.004, 220.88, -7.343, 0.672)
pt3dadd(-7.013, 220.99, -7.305, 0.678)
pt3dadd(-7.025, 221.107, -7.286, 0.686)
pt3dadd(-7.037, 221.225, -7.269, 0.694)
pt3dadd(-7.05, 221.342, -7.253, 0.702)
pt3dadd(-7.062, 221.46, -7.236, 0.71)
pt3dadd(-7.075, 221.579, -7.22, 0.718)
pt3dadd(-7.087, 221.695, -7.203, 0.726)
pt3dadd(-7.061, 221.81, -7.187, 0.728)
pt3dadd(-7.025, 221.923, -7.171, 0.728)
pt3dadd(-6.99, 222.035, -7.155, 0.728)
pt3dadd(-6.954, 222.149, -7.138, 0.728)
pt3dadd(-6.918, 222.26, -7.122, 0.728)
pt3dadd(-6.903, 222.377, -7.097, 0.724)
pt3dadd(-6.888, 222.492, -7.073, 0.718)
pt3dadd(-6.873, 222.607, -7.048, 0.714)
pt3dadd(-6.858, 222.722, -7.023, 0.708)
pt3dadd(-6.845, 222.838, -7, 0.704)
pt3dadd(-6.858, 222.958, -7, 0.71)
pt3dadd(-6.87, 223.076, -7, 0.718)
pt3dadd(-6.883, 223.196, -7, 0.726)
pt3dadd(-6.895, 223.315, -7, 0.732)
pt3dadd(-6.908, 223.435, -7, 0.74)
pt3dadd(-6.92, 223.554, -7, 0.746)
pt3dadd(-6.933, 223.674, -6.998, 0.754)
pt3dadd(-6.944, 223.784, -6.964, 0.772)
pt3dadd(-6.956, 223.897, -6.929, 0.792)
pt3dadd(-6.968, 224.009, -6.894, 0.81)
pt3dadd(-6.98, 224.122, -6.86, 0.828)
pt3dadd(-6.992, 224.233, -6.825, 0.846)
pt3dadd(-7.004, 224.347, -6.799, 0.866)
pt3dadd(-7.016, 224.465, -6.778, 0.888)
pt3dadd(-7.028, 224.581, -6.757, 0.908)
pt3dadd(-7.04, 224.698, -6.737, 0.93)
pt3dadd(-7.053, 224.814, -6.716, 0.952)
pt3dadd(-7.065, 224.932, -6.695, 0.972)
pt3dadd(-7.077, 225.042, -6.66, 0.98)
pt3dadd(-7.088, 225.151, -6.618, 0.98)
pt3dadd(-7.099, 225.258, -6.575, 0.98)
pt3dadd(-7.111, 225.367, -6.533, 0.98)
pt3dadd(-7.122, 225.475, -6.491, 0.98)
pt3dadd(-7.134, 225.586, -6.454, 0.98)
pt3dadd(-7.146, 225.7, -6.424, 0.98)
pt3dadd(-7.158, 225.814, -6.394, 0.98)
pt3dadd(-7.17, 225.928, -6.365, 0.98)
pt3dadd(-7.182, 226.042, -6.335, 0.98)
pt3dadd(-7.194, 226.156, -6.305, 0.98)
pt3dadd(-7.206, 226.274, -6.3, 0.972)
pt3dadd(-7.219, 226.393, -6.3, 0.964)
pt3dadd(-7.231, 226.513, -6.3, 0.956)
pt3dadd(-7.248, 226.632, -6.3, 0.962)
pt3dadd(-7.265, 226.751, -6.3, 0.97)
pt3dadd(-7.282, 226.87, -6.3, 0.978)
pt3dadd(-7.347, 226.958, -6.265, 0.954)
pt3dadd(-7.415, 227.046, -6.228, 0.924)
pt3dadd(-7.484, 227.13, -6.184, 0.882)
pt3dadd(-7.537, 227.192, -6.123, 0.836)
pt3dadd(-7.557, 227.218, -6.026, 0.786)
pt3dadd(-7.589, 227.306, -5.973, 0.778)
pt3dadd(-7.623, 227.408, -5.927, 0.778)
pt3dadd(-7.657, 227.509, -5.881, 0.778)
pt3dadd(-7.691, 227.61, -5.835, 0.778)
pt3dadd(-7.721, 227.714, -5.797, 0.782)
pt3dadd(-7.74, 227.832, -5.786, 0.794)
pt3dadd(-7.759, 227.951, -5.775, 0.806)
pt3dadd(-7.778, 228.068, -5.764, 0.818)
pt3dadd(-7.797, 228.186, -5.753, 0.832)
pt3dadd(-7.816, 228.304, -5.742, 0.844)
pt3dadd(-7.842, 228.419, -5.732, 0.858)
pt3dadd(-7.901, 228.523, -5.726, 0.878)
pt3dadd(-7.959, 228.629, -5.719, 0.896)
pt3dadd(-8.017, 228.732, -5.713, 0.916)
pt3dadd(-8.076, 228.838, -5.706, 0.936)
pt3dadd(-8.132, 228.942, -5.698, 0.954)
pt3dadd(-8.167, 229.055, -5.679, 0.96)
}
}
proc shape3d_124() {
dend_5[7] { pt3dadd(-8.202, 229.168, -5.66, 0.964)
pt3dadd(-8.237, 229.28, -5.64, 0.97)
pt3dadd(-8.272, 229.392, -5.621, 0.974)
pt3dadd(-8.307, 229.504, -5.602, 0.978)
pt3dadd(-8.369, 229.607, -5.6, 0.958)
pt3dadd(-8.434, 229.708, -5.6, 0.934)
pt3dadd(-8.498, 229.808, -5.6, 0.91)
pt3dadd(-8.563, 229.909, -5.6, 0.886)
pt3dadd(-8.628, 230.011, -5.6, 0.862)
pt3dadd(-8.676, 230.119, -5.604, 0.826)
pt3dadd(-8.717, 230.232, -5.61, 0.784)
pt3dadd(-8.758, 230.345, -5.616, 0.744)
pt3dadd(-8.799, 230.458, -5.622, 0.702)
pt3dadd(-8.84, 230.57, -5.628, 0.662)
pt3dadd(-8.877, 230.683, -5.635, 0.624)
pt3dadd(-8.896, 230.801, -5.646, 0.608)
pt3dadd(-8.915, 230.918, -5.657, 0.592)
pt3dadd(-8.934, 231.037, -5.668, 0.576)
pt3dadd(-8.953, 231.155, -5.679, 0.558)
pt3dadd(-8.972, 231.272, -5.69, 0.542)
pt3dadd(-8.992, 231.389, -5.699, 0.53)
pt3dadd(-9.018, 231.506, -5.687, 0.546)
pt3dadd(-9.045, 231.623, -5.675, 0.564)
pt3dadd(-9.071, 231.738, -5.664, 0.582)
pt3dadd(-9.097, 231.854, -5.652, 0.6)
pt3dadd(-9.123, 231.971, -5.64, 0.616)
pt3dadd(-9.144, 232.081, -5.613, 0.642)
pt3dadd(-9.154, 232.183, -5.561, 0.682)
pt3dadd(-9.165, 232.284, -5.508, 0.722)
pt3dadd(-9.176, 232.387, -5.456, 0.762)
pt3dadd(-9.187, 232.488, -5.404, 0.8)
pt3dadd(-9.197, 232.586, -5.347, 0.834)
pt3dadd(-9.206, 232.675, -5.28, 0.854)
pt3dadd(-9.215, 232.763, -5.212, 0.876)
pt3dadd(-9.225, 232.85, -5.145, 0.896)
pt3dadd(-9.234, 232.938, -5.078, 0.916)
pt3dadd(-9.244, 233.034, -5.018, 0.93)
pt3dadd(-9.255, 233.141, -4.973, 0.93)
pt3dadd(-9.266, 233.248, -4.929, 0.93)
pt3dadd(-9.277, 233.354, -4.884, 0.93)
pt3dadd(-9.289, 233.46, -4.839, 0.93)
pt3dadd(-9.3, 233.569, -4.8, 0.928)
pt3dadd(-9.31, 233.688, -4.8, 0.926)
pt3dadd(-9.321, 233.808, -4.8, 0.922)
pt3dadd(-9.332, 233.927, -4.8, 0.918)
pt3dadd(-9.342, 234.047, -4.8, 0.914)
pt3dadd(-9.353, 234.167, -4.8, 0.91)
pt3dadd(-9.364, 234.286, -4.8, 0.906)
pt3dadd(-9.369, 234.406, -4.8, 0.904)
pt3dadd(-9.357, 234.524, -4.8, 0.898)
pt3dadd(-9.344, 234.644, -4.8, 0.894)
pt3dadd(-9.332, 234.763, -4.8, 0.89)
pt3dadd(-9.319, 234.883, -4.8, 0.886)
pt3dadd(-9.307, 235.002, -4.8, 0.882)
pt3dadd(-9.288, 235.121, -4.8, 0.878)
pt3dadd(-9.255, 235.236, -4.8, 0.872)
pt3dadd(-9.223, 235.351, -4.8, 0.868)
pt3dadd(-9.19, 235.468, -4.8, 0.864)
pt3dadd(-9.157, 235.582, -4.8, 0.858)
pt3dadd(-9.125, 235.698, -4.8, 0.854)
pt3dadd(-9.103, 235.816, -4.8, 0.858)
pt3dadd(-9.082, 235.933, -4.8, 0.862)
pt3dadd(-9.061, 236.052, -4.8, 0.866)
pt3dadd(-9.041, 236.171, -4.8, 0.872)
pt3dadd(-9.02, 236.288, -4.8, 0.876)
pt3dadd(-9, 236.407, -4.8, 0.886)
pt3dadd(-8.982, 236.526, -4.8, 0.912)
pt3dadd(-8.964, 236.645, -4.8, 0.938)
pt3dadd(-8.947, 236.762, -4.8, 0.966)
pt3dadd(-8.929, 236.881, -4.8, 0.992)
pt3dadd(-8.911, 237, -4.8, 1.018)
pt3dadd(-8.899, 237.12, -4.8, 1.048)
pt3dadd(-8.892, 237.24, -4.8, 1.08)
pt3dadd(-8.884, 237.359, -4.8, 1.114)
pt3dadd(-8.877, 237.479, -4.8, 1.146)
pt3dadd(-8.87, 237.598, -4.8, 1.18)
pt3dadd(-8.863, 237.719, -4.8, 1.212)
pt3dadd(-8.848, 237.836, -4.8, 1.246)
pt3dadd(-8.824, 237.955, -4.8, 1.282)
pt3dadd(-8.801, 238.073, -4.8, 1.318)
pt3dadd(-8.777, 238.19, -4.8, 1.354)
pt3dadd(-8.753, 238.308, -4.8, 1.39)
pt3dadd(-8.729, 238.424, -4.8, 1.426)
pt3dadd(-8.706, 238.543, -4.8, 1.446)
pt3dadd(-8.682, 238.661, -4.8, 1.464)
pt3dadd(-8.658, 238.778, -4.8, 1.482)
pt3dadd(-8.635, 238.896, -4.8, 1.5)
pt3dadd(-8.611, 239.014, -4.8, 1.518)
pt3dadd(-8.592, 239.132, -4.8, 1.532)
pt3dadd(-8.584, 239.251, -4.8, 1.538)
pt3dadd(-8.577, 239.371, -4.8, 1.542)
pt3dadd(-8.57, 239.491, -4.8, 1.546)
pt3dadd(-8.563, 239.61, -4.8, 1.55)
pt3dadd(-8.556, 239.731, -4.8, 1.554)
pt3dadd(-8.547, 239.85, -4.8, 1.554)
pt3dadd(-8.532, 239.97, -4.8, 1.542)
pt3dadd(-8.517, 240.089, -4.8, 1.528)
pt3dadd(-8.501, 240.206, -4.8, 1.516)
pt3dadd(-8.487, 240.326, -4.8, 1.502)
pt3dadd(-8.471, 240.445, -4.8, 1.49)
pt3dadd(-8.459, 240.565, -4.799, 1.47)
pt3dadd(-8.452, 240.685, -4.797, 1.442)
pt3dadd(-8.444, 240.804, -4.796, 1.412)
pt3dadd(-8.436, 240.924, -4.794, 1.382)
pt3dadd(-8.429, 241.044, -4.792, 1.352)
pt3dadd(-8.421, 241.164, -4.79, 1.324)
pt3dadd(-8.422, 241.283, -4.783, 1.292)
pt3dadd(-8.434, 241.402, -4.769, 1.254)
pt3dadd(-8.446, 241.519, -4.754, 1.218)
pt3dadd(-8.459, 241.637, -4.74, 1.182)
pt3dadd(-8.471, 241.754, -4.726, 1.144)
pt3dadd(-8.484, 241.873, -4.711, 1.108)
pt3dadd(-8.499, 241.991, -4.7, 1.074)
pt3dadd(-8.524, 242.108, -4.7, 1.046)
pt3dadd(-8.549, 242.225, -4.7, 1.018)
pt3dadd(-8.574, 242.344, -4.7, 0.99)
pt3dadd(-8.599, 242.46, -4.7, 0.962)
pt3dadd(-8.624, 242.579, -4.7, 0.936)
pt3dadd(-8.649, 242.695, -4.7, 0.908)
pt3dadd(-8.669, 242.814, -4.7, 0.9)
pt3dadd(-8.687, 242.933, -4.7, 0.896)
pt3dadd(-8.705, 243.052, -4.7, 0.894)
pt3dadd(-8.724, 243.17, -4.7, 0.89)
pt3dadd(-8.742, 243.288, -4.7, 0.886)
pt3dadd(-8.761, 243.406, -4.7, 0.882)
pt3dadd(-8.778, 243.524, -4.7, 0.88)
pt3dadd(-8.79, 243.644, -4.7, 0.892)
pt3dadd(-8.803, 243.763, -4.7, 0.902)
pt3dadd(-8.816, 243.883, -4.7, 0.914)
pt3dadd(-8.828, 244.002, -4.7, 0.924)
pt3dadd(-8.841, 244.122, -4.7, 0.934)
pt3dadd(-8.853, 244.241, -4.7, 0.946)
pt3dadd(-8.866, 244.361, -4.7, 0.956)
pt3dadd(-8.878, 244.48, -4.7, 0.972)
pt3dadd(-8.891, 244.6, -4.7, 0.986)
pt3dadd(-8.903, 244.718, -4.7, 1)
pt3dadd(-8.916, 244.837, -4.7, 1.014)
pt3dadd(-8.928, 244.957, -4.7, 1.028)
pt3dadd(-8.941, 245.076, -4.7, 1.042)
pt3dadd(-8.954, 245.196, -4.7, 1.058)
pt3dadd(-8.966, 245.315, -4.7, 1.072)
pt3dadd(-8.979, 245.435, -4.7, 1.086)
pt3dadd(-8.991, 245.554, -4.7, 1.1)
pt3dadd(-9.004, 245.674, -4.7, 1.114)
pt3dadd(-9.016, 245.792, -4.7, 1.13)
pt3dadd(-9.029, 245.912, -4.7, 1.144)
pt3dadd(-9.041, 246.031, -4.7, 1.158)
pt3dadd(-9.054, 246.15, -4.7, 1.172)
pt3dadd(-9.066, 246.27, -4.7, 1.186)
pt3dadd(-9.079, 246.389, -4.7, 1.2)
pt3dadd(-9.091, 246.509, -4.7, 1.216)
pt3dadd(-9.104, 246.628, -4.7, 1.23)
pt3dadd(-9.117, 246.748, -4.7, 1.244)
pt3dadd(-9.129, 246.866, -4.7, 1.256)
pt3dadd(-9.142, 246.986, -4.7, 1.26)
pt3dadd(-9.154, 247.105, -4.7, 1.264)
pt3dadd(-9.167, 247.224, -4.7, 1.266)
pt3dadd(-9.179, 247.344, -4.7, 1.27)
pt3dadd(-9.192, 247.463, -4.7, 1.274)
pt3dadd(-9.204, 247.583, -4.7, 1.278)
pt3dadd(-9.217, 247.702, -4.7, 1.278)
pt3dadd(-9.229, 247.822, -4.7, 1.268)
pt3dadd(-9.242, 247.94, -4.7, 1.258)
pt3dadd(-9.255, 248.06, -4.7, 1.246)
pt3dadd(-9.267, 248.179, -4.7, 1.236)
pt3dadd(-9.28, 248.299, -4.7, 1.224)
pt3dadd(-9.292, 248.418, -4.7, 1.214)
pt3dadd(-9.305, 248.537, -4.7, 1.202)
pt3dadd(-9.317, 248.657, -4.7, 1.184)
pt3dadd(-9.33, 248.776, -4.7, 1.166)
pt3dadd(-9.342, 248.896, -4.7, 1.148)
pt3dadd(-9.355, 249.014, -4.7, 1.13)
pt3dadd(-9.367, 249.134, -4.7, 1.112)
pt3dadd(-9.38, 249.253, -4.7, 1.094)
pt3dadd(-9.393, 249.373, -4.695, 1.074)
pt3dadd(-9.405, 249.487, -4.668, 1.042)
pt3dadd(-9.417, 249.602, -4.64, 1.012)
pt3dadd(-9.433, 249.719, -4.623, 0.996)
pt3dadd(-9.45, 249.836, -4.611, 0.988)
pt3dadd(-9.484, 249.942, -4.6, 0.98)
pt3dadd(-9.593, 249.991, -4.6, 0.98)
pt3dadd(-9.702, 250.042, -4.6, 0.98)
pt3dadd(-9.812, 250.091, -4.6, 0.99)
pt3dadd(-9.921, 250.14, -4.6, 1.002)
pt3dadd(-9.956, 250.246, -4.606, 1.014)
pt3dadd(-9.971, 250.364, -4.613, 1.024)
pt3dadd(-9.987, 250.482, -4.62, 1.036)
pt3dadd(-10.002, 250.601, -4.628, 1.046)
pt3dadd(-10.027, 250.714, -4.641, 1.064)
pt3dadd(-10.088, 250.81, -4.677, 1.104)
pt3dadd(-10.163, 250.892, -4.7, 1.168)
pt3dadd(-10.273, 250.932, -4.71, 1.25)
pt3dadd(-10.372, 250.972, -4.75, 1.268)
pt3dadd(-10.414, 251.059, -4.803, 1.172)
pt3dadd(-10.426, 251.167, -4.847, 1.038)
pt3dadd(-10.437, 251.278, -4.882, 0.944)
pt3dadd(-10.45, 251.395, -4.898, 0.908)
pt3dadd(-10.462, 251.514, -4.889, 0.88)
pt3dadd(-10.474, 251.626, -4.857, 0.812)
pt3dadd(-10.483, 251.71, -4.787, 0.722)
}
}
proc shape3d_125() {
dend_5[7] { pt3dadd(-10.489, 251.768, -4.701, 0.654)
pt3dadd(-10.503, 251.854, -4.64, 0.594)
pt3dadd(-10.534, 251.969, -4.625, 0.558)
pt3dadd(-10.566, 252.082, -4.616, 0.526)
pt3dadd(-10.62, 252.17, -4.665, 0.512)
pt3dadd(-10.662, 252.265, -4.713, 0.512)
pt3dadd(-10.673, 252.379, -4.739, 0.536)
pt3dadd(-10.683, 252.497, -4.75, 0.552)
pt3dadd(-10.693, 252.617, -4.76, 0.568)
pt3dadd(-10.704, 252.736, -4.771, 0.584)
pt3dadd(-10.714, 252.853, -4.782, 0.6)
pt3dadd(-10.725, 252.973, -4.792, 0.616)
pt3dadd(-10.731, 253.092, -4.8, 0.634)
pt3dadd(-10.726, 253.212, -4.8, 0.654)
pt3dadd(-10.721, 253.332, -4.8, 0.674)
pt3dadd(-10.716, 253.452, -4.8, 0.694)
pt3dadd(-10.711, 253.572, -4.8, 0.714)
pt3dadd(-10.707, 253.692, -4.8, 0.736)
pt3dadd(-10.704, 253.812, -4.8, 0.756)
pt3dadd(-10.716, 253.931, -4.8, 0.782)
pt3dadd(-10.729, 254.051, -4.8, 0.806)
pt3dadd(-10.741, 254.17, -4.8, 0.832)
pt3dadd(-10.754, 254.288, -4.8, 0.856)
pt3dadd(-10.766, 254.408, -4.8, 0.882)
pt3dadd(-10.779, 254.527, -4.8, 0.906)
pt3dadd(-10.791, 254.647, -4.8, 0.932)
pt3dadd(-10.802, 254.766, -4.8, 0.954)
pt3dadd(-10.813, 254.886, -4.8, 0.976)
pt3dadd(-10.823, 255.006, -4.8, 0.998)
pt3dadd(-10.834, 255.125, -4.8, 1.02)
pt3dadd(-10.844, 255.245, -4.8, 1.04)
pt3dadd(-10.855, 255.365, -4.8, 1.062)
pt3dadd(-10.857, 255.484, -4.8, 1.086)
pt3dadd(-10.83, 255.6, -4.8, 1.118)
pt3dadd(-10.802, 255.716, -4.8, 1.15)
pt3dadd(-10.805, 255.835, -4.8, 1.156)
pt3dadd(-10.813, 255.955, -4.8, 1.156)
pt3dadd(-10.821, 256.075, -4.8, 1.156)
pt3dadd(-10.829, 256.195, -4.8, 1.138)
pt3dadd(-10.837, 256.314, -4.8, 1.12)
pt3dadd(-10.837, 256.43, -4.8, 1.104)
pt3dadd(-10.74, 256.502, -4.8, 1.092)
pt3dadd(-10.644, 256.573, -4.8, 1.082)
pt3dadd(-10.583, 256.675, -4.8, 1.054)
pt3dadd(-10.527, 256.782, -4.8, 1.028)
pt3dadd(-10.472, 256.888, -4.8, 1)
pt3dadd(-10.435, 256.998, -4.8, 0.97)
pt3dadd(-10.448, 257.117, -4.8, 0.936)
pt3dadd(-10.46, 257.237, -4.8, 0.902)
pt3dadd(-10.473, 257.356, -4.8, 0.844)
pt3dadd(-10.491, 257.474, -4.8, 0.752)
pt3dadd(-10.523, 257.591, -4.8, 0.748)
pt3dadd(-10.555, 257.705, -4.8, 0.744)
pt3dadd(-10.587, 257.821, -4.8, 0.74)
pt3dadd(-10.619, 257.938, -4.8, 0.736)
pt3dadd(-10.651, 258.053, -4.8, 0.732)
pt3dadd(-10.679, 258.169, -4.8, 0.73)
pt3dadd(-10.692, 258.288, -4.8, 0.738)
pt3dadd(-10.704, 258.408, -4.8, 0.746)
pt3dadd(-10.716, 258.523, -4.79, 0.758)
pt3dadd(-10.727, 258.628, -4.739, 0.78)
pt3dadd(-10.738, 258.728, -4.688, 0.804)
pt3dadd(-10.763, 258.78, -4.6, 0.804)
pt3dadd(-10.788, 258.83, -4.512, 0.804)
pt3dadd(-10.841, 258.9, -4.443, 0.776)
pt3dadd(-10.884, 258.959, -4.368, 0.746)
pt3dadd(-10.891, 258.979, -4.27, 0.716)
pt3dadd(-10.899, 259, -4.172, 0.686)
pt3dadd(-10.961, 259.045, -4.109, 0.622)
pt3dadd(-11.079, 259.062, -4.106, 0.616)
pt3dadd(-11.19, 259.056, -4.139, 0.67)
pt3dadd(-11.264, 259.049, -4.216, 0.772)
pt3dadd(-11.312, 259.055, -4.307, 0.834)
pt3dadd(-11.353, 259.076, -4.399, 0.846)
pt3dadd(-11.399, 259.128, -4.466, 0.844)
pt3dadd(-11.451, 259.231, -4.494, 0.818)
pt3dadd(-11.492, 259.338, -4.523, 0.786)
pt3dadd(-11.517, 259.451, -4.554, 0.744)
pt3dadd(-11.542, 259.561, -4.584, 0.7)
pt3dadd(-11.561, 259.676, -4.6, 0.662)
pt3dadd(-11.574, 259.795, -4.6, 0.628)
pt3dadd(-11.587, 259.915, -4.6, 0.596)
pt3dadd(-11.599, 260.034, -4.6, 0.554)
pt3dadd(-11.606, 260.154, -4.6, 0.53)
pt3dadd(-11.606, 260.275, -4.6, 0.534)
pt3dadd(-11.606, 260.394, -4.6, 0.536)
pt3dadd(-11.605, 260.514, -4.6, 0.54)
pt3dadd(-11.605, 260.634, -4.6, 0.544)
pt3dadd(-11.605, 260.754, -4.6, 0.548)
pt3dadd(-11.605, 260.874, -4.6, 0.556)
pt3dadd(-11.603, 260.994, -4.6, 0.584)
pt3dadd(-11.601, 261.114, -4.6, 0.612)
pt3dadd(-11.613, 261.232, -4.6, 0.652)
pt3dadd(-11.645, 261.348, -4.6, 0.71)
pt3dadd(-11.678, 261.463, -4.6, 0.768)
pt3dadd(-11.774, 261.504, -4.627, 0.84)
pt3dadd(-11.885, 261.524, -4.661, 0.916)
pt3dadd(-11.956, 261.611, -4.68, 0.96)
pt3dadd(-12.02, 261.712, -4.697, 0.998)
pt3dadd(-12.079, 261.815, -4.694, 0.976)
pt3dadd(-12.148, 261.91, -4.681, 0.946)
pt3dadd(-12.238, 261.984, -4.661, 0.922)
pt3dadd(-12.328, 262.061, -4.641, 0.9)
pt3dadd(-12.418, 262.135, -4.621, 0.878)
pt3dadd(-12.508, 262.212, -4.601, 0.854)
pt3dadd(-12.562, 262.31, -4.567, 0.804)
pt3dadd(-12.615, 262.409, -4.533, 0.752)
pt3dadd(-12.686, 262.505, -4.516, 0.714)
pt3dadd(-12.756, 262.6, -4.501, 0.676)
pt3dadd(-12.805, 262.708, -4.517, 0.652)
pt3dadd(-12.854, 262.814, -4.532, 0.63)
pt3dadd(-12.869, 262.93, -4.559, 0.618)
pt3dadd(-12.881, 263.045, -4.586, 0.608)
pt3dadd(-12.893, 263.162, -4.6, 0.61)
pt3dadd(-12.906, 263.281, -4.6, 0.622)
pt3dadd(-12.919, 263.4, -4.6, 0.634)
pt3dadd(-12.934, 263.52, -4.6, 0.644)
pt3dadd(-12.948, 263.639, -4.6, 0.656)
pt3dadd(-12.963, 263.758, -4.6, 0.666)
pt3dadd(-12.977, 263.878, -4.6, 0.678)
pt3dadd(-12.991, 263.996, -4.6, 0.688)
pt3dadd(-13.006, 264.115, -4.6, 0.698)
pt3dadd(-13.043, 264.227, -4.6, 0.73)
pt3dadd(-13.094, 264.335, -4.6, 0.772)
pt3dadd(-13.146, 264.445, -4.6, 0.818)
pt3dadd(-13.197, 264.553, -4.6, 0.872)
pt3dadd(-13.248, 264.661, -4.6, 0.924)
pt3dadd(-13.318, 264.758, -4.6, 0.95)
pt3dadd(-13.389, 264.856, -4.6, 0.972)
pt3dadd(-13.492, 264.907, -4.6, 0.996)
pt3dadd(-13.607, 264.943, -4.6, 1.016)
pt3dadd(-13.691, 265.01, -4.6, 1.026)
pt3dadd(-13.736, 265.121, -4.6, 1.02)
pt3dadd(-13.781, 265.232, -4.6, 1.014)
pt3dadd(-13.826, 265.344, -4.6, 1.008)
pt3dadd(-13.86, 265.458, -4.6, 1.01)
pt3dadd(-13.877, 265.577, -4.6, 1.028)
pt3dadd(-13.894, 265.696, -4.6, 1.046)
pt3dadd(-13.925, 265.811, -4.6, 1.024)
pt3dadd(-13.956, 265.927, -4.6, 0.996)
pt3dadd(-13.981, 266.044, -4.6, 0.984)
pt3dadd(-14.006, 266.16, -4.6, 0.972)
pt3dadd(-14.031, 266.279, -4.6, 0.96)
pt3dadd(-14.056, 266.395, -4.6, 0.948)
pt3dadd(-14.081, 266.513, -4.6, 0.938)
pt3dadd(-14.102, 266.63, -4.6, 0.918)
pt3dadd(-14.115, 266.75, -4.6, 0.886)
pt3dadd(-14.127, 266.869, -4.6, 0.854)
pt3dadd(-14.14, 266.989, -4.6, 0.822)
pt3dadd(-14.152, 267.108, -4.6, 0.79)
pt3dadd(-14.165, 267.227, -4.6, 0.758)
pt3dadd(-14.178, 267.347, -4.6, 0.726)
pt3dadd(-14.19, 267.464, -4.59, 0.68)
pt3dadd(-14.202, 267.577, -4.556, 0.604)
pt3dadd(-14.214, 267.689, -4.523, 0.53)
pt3dadd(-14.179, 267.778, -4.462, 0.46)
pt3dadd(-14.136, 267.865, -4.41, 0.398)
pt3dadd(-14.061, 267.959, -4.405, 0.372)
pt3dadd(-13.98, 268.044, -4.4, 0.35)
pt3dadd(-13.867, 268.082, -4.4, 0.34)
pt3dadd(-13.753, 268.121, -4.4, 0.33)
pt3dadd(-13.709, 268.208, -4.383, 0.318)
pt3dadd(-13.707, 268.322, -4.356, 0.304)
pt3dadd(-13.705, 268.439, -4.33, 0.292)
pt3dadd(-13.703, 268.554, -4.303, 0.278)
pt3dadd(-13.714, 268.673, -4.3, 0.276)
pt3dadd(-13.726, 268.793, -4.3, 0.276)
pt3dadd(-13.739, 268.912, -4.3, 0.276)
pt3dadd(-13.748, 269.032, -4.3, 0.282)
pt3dadd(-13.757, 269.152, -4.3, 0.288)
pt3dadd(-13.767, 269.27, -4.3, 0.294)
pt3dadd(-13.775, 269.389, -4.3, 0.302)
pt3dadd(-13.69, 269.471, -4.324, 0.342)
pt3dadd(-13.612, 269.54, -4.357, 0.38)
pt3dadd(-13.58, 269.544, -4.453, 0.412)
pt3dadd(-13.565, 269.552, -4.551, 0.442)
pt3dadd(-13.568, 269.579, -4.648, 0.452)
pt3dadd(-13.573, 269.628, -4.739, 0.45)
pt3dadd(-13.576, 269.656, -4.836, 0.412)
pt3dadd(-13.577, 269.67, -4.935, 0.346)
pt3dadd(-13.581, 269.702, -5.03, 0.27)
pt3dadd(-13.605, 269.789, -5.09, 0.226)
pt3dadd(-13.659, 269.894, -5.1, 0.226)
pt3dadd(-13.724, 269.995, -5.1, 0.226)
pt3dadd(-13.788, 270.096, -5.1, 0.23)
pt3dadd(-13.844, 270.199, -5.088, 0.256)
pt3dadd(-13.881, 270.306, -5.056, 0.268)
pt3dadd(-13.924, 270.41, -5.021, 0.29)
pt3dadd(-13.981, 270.505, -4.983, 0.334)
pt3dadd(-13.99, 270.611, -4.951, 0.368)
pt3dadd(-13.965, 270.725, -4.925, 0.398)
pt3dadd(-13.94, 270.838, -4.9, 0.428)
pt3dadd(-13.919, 270.955, -4.9, 0.48)
pt3dadd(-13.898, 271.073, -4.9, 0.532)
pt3dadd(-13.878, 271.193, -4.9, 0.61)
pt3dadd(-13.864, 271.31, -4.9, 0.634)
pt3dadd(-13.851, 271.43, -4.9, 0.644)
pt3dadd(-13.839, 271.55, -4.9, 0.652)
pt3dadd(-13.827, 271.669, -4.9, 0.66)
pt3dadd(-13.814, 271.789, -4.9, 0.668)
}
}
proc shape3d_126() {
dend_5[7] { pt3dadd(-13.802, 271.907, -4.9, 0.678)
pt3dadd(-13.769, 272.022, -4.885, 0.682)
pt3dadd(-13.733, 272.134, -4.869, 0.688)
pt3dadd(-13.697, 272.246, -4.853, 0.694)
pt3dadd(-13.661, 272.36, -4.837, 0.698)
pt3dadd(-13.63, 272.472, -4.818, 0.704)
pt3dadd(-13.642, 272.58, -4.776, 0.718)
pt3dadd(-13.653, 272.689, -4.734, 0.734)
pt3dadd(-13.664, 272.796, -4.691, 0.748)
pt3dadd(-13.676, 272.905, -4.649, 0.762)
pt3dadd(-13.687, 273.013, -4.607, 0.776)
pt3dadd(-13.716, 273.127, -4.6, 0.792)
pt3dadd(-13.748, 273.244, -4.6, 0.808)
pt3dadd(-13.78, 273.359, -4.6, 0.826)
pt3dadd(-13.812, 273.475, -4.6, 0.842)
pt3dadd(-13.844, 273.59, -4.6, 0.858)
pt3dadd(-13.876, 273.706, -4.6, 0.874)
pt3dadd(-13.893, 273.824, -4.6, 0.882)
pt3dadd(-13.906, 273.944, -4.6, 0.886)
pt3dadd(-13.918, 274.063, -4.6, 0.888)
pt3dadd(-13.931, 274.183, -4.6, 0.892)
pt3dadd(-13.943, 274.302, -4.6, 0.896)
pt3dadd(-13.956, 274.421, -4.6, 0.9)
pt3dadd(-13.968, 274.541, -4.6, 0.904)
pt3dadd(-13.945, 274.657, -4.6, 0.896)
pt3dadd(-13.909, 274.771, -4.6, 0.888)
pt3dadd(-13.873, 274.885, -4.6, 0.878)
pt3dadd(-13.837, 274.999, -4.6, 0.868)
pt3dadd(-13.802, 275.114, -4.6, 0.86)
pt3dadd(-13.778, 275.231, -4.592, 0.846)
pt3dadd(-13.77, 275.348, -4.573, 0.826)
pt3dadd(-13.762, 275.465, -4.554, 0.808)
pt3dadd(-13.754, 275.582, -4.535, 0.788)
pt3dadd(-13.746, 275.701, -4.516, 0.77)
pt3dadd(-13.743, 275.818, -4.5, 0.754)
pt3dadd(-13.767, 275.935, -4.5, 0.758)
pt3dadd(-13.792, 276.053, -4.5, 0.762)
pt3dadd(-13.818, 276.17, -4.5, 0.766)
pt3dadd(-13.843, 276.288, -4.5, 0.77)
pt3dadd(-13.868, 276.404, -4.5, 0.774)
pt3dadd(-13.893, 276.523, -4.5, 0.778)
pt3dadd(-13.897, 276.642, -4.5, 0.782)
pt3dadd(-13.896, 276.761, -4.5, 0.786)
pt3dadd(-13.894, 276.882, -4.5, 0.79)
pt3dadd(-13.892, 277.002, -4.5, 0.796)
pt3dadd(-13.891, 277.121, -4.5, 0.8)
pt3dadd(-13.889, 277.242, -4.5, 0.804)
pt3dadd(-13.882, 277.361, -4.5, 0.816)
pt3dadd(-13.874, 277.482, -4.5, 0.83)
pt3dadd(-13.867, 277.601, -4.5, 0.842)
pt3dadd(-13.86, 277.721, -4.5, 0.854)
pt3dadd(-13.853, 277.841, -4.5, 0.866)
pt3dadd(-13.845, 277.96, -4.5, 0.878)
pt3dadd(-13.858, 278.08, -4.5, 0.872)
pt3dadd(-13.87, 278.198, -4.5, 0.864)
pt3dadd(-13.883, 278.318, -4.5, 0.858)
pt3dadd(-13.895, 278.437, -4.5, 0.85)
pt3dadd(-13.908, 278.557, -4.5, 0.844)
pt3dadd(-13.92, 278.676, -4.5, 0.836)
pt3dadd(-13.933, 278.795, -4.5, 0.828)
pt3dadd(-13.988, 278.902, -4.5, 0.824)
pt3dadd(-14.044, 279.008, -4.5, 0.82)
pt3dadd(-14.1, 279.114, -4.5, 0.814)
pt3dadd(-14.156, 279.221, -4.5, 0.81)
pt3dadd(-14.212, 279.328, -4.5, 0.806)
pt3dadd(-14.254, 279.438, -4.5, 0.796)
pt3dadd(-14.286, 279.554, -4.5, 0.784)
pt3dadd(-14.318, 279.67, -4.5, 0.772)
pt3dadd(-14.35, 279.786, -4.5, 0.758)
pt3dadd(-14.382, 279.901, -4.5, 0.746)
pt3dadd(-14.414, 280.016, -4.5, 0.734)
pt3dadd(-14.436, 280.135, -4.5, 0.726)
pt3dadd(-14.448, 280.254, -4.5, 0.722)
pt3dadd(-14.461, 280.374, -4.5, 0.72)
pt3dadd(-14.473, 280.493, -4.5, 0.716)
pt3dadd(-14.486, 280.613, -4.5, 0.712)
pt3dadd(-14.498, 280.732, -4.5, 0.708)
pt3dadd(-14.511, 280.85, -4.5, 0.704)
pt3dadd(-14.549, 280.962, -4.5, 0.7)
pt3dadd(-14.61, 281.064, -4.5, 0.696)
pt3dadd(-14.672, 281.167, -4.5, 0.692)
pt3dadd(-14.734, 281.27, -4.5, 0.686)
pt3dadd(-14.795, 281.374, -4.5, 0.682)
pt3dadd(-14.849, 281.479, -4.5, 0.678)
pt3dadd(-14.879, 281.596, -4.5, 0.678)
pt3dadd(-14.908, 281.712, -4.5, 0.678)
pt3dadd(-14.938, 281.828, -4.5, 0.678)
pt3dadd(-14.968, 281.945, -4.5, 0.678)
pt3dadd(-14.997, 282.061, -4.5, 0.678)
pt3dadd(-15.029, 282.175, -4.5, 0.678)
pt3dadd(-15.091, 282.28, -4.5, 0.678)
pt3dadd(-15.152, 282.383, -4.5, 0.678)
pt3dadd(-15.214, 282.486, -4.5, 0.678)
pt3dadd(-15.276, 282.588, -4.5, 0.678)
pt3dadd(-15.337, 282.691, -4.5, 0.678)
pt3dadd(-15.37, 282.806, -4.5, 0.678)
pt3dadd(-15.395, 282.923, -4.5, 0.678)
pt3dadd(-15.42, 283.039, -4.5, 0.678)
pt3dadd(-15.445, 283.158, -4.5, 0.678)
pt3dadd(-15.47, 283.274, -4.5, 0.678)
pt3dadd(-15.495, 283.392, -4.5, 0.678)
pt3dadd(-15.515, 283.511, -4.5, 0.68)
pt3dadd(-15.527, 283.631, -4.5, 0.684)
pt3dadd(-15.54, 283.75, -4.5, 0.686)
pt3dadd(-15.552, 283.87, -4.5, 0.69)
pt3dadd(-15.565, 283.988, -4.5, 0.694)
pt3dadd(-15.577, 284.107, -4.5, 0.698)
pt3dadd(-15.59, 284.227, -4.5, 0.702)
pt3dadd(-15.602, 284.346, -4.5, 0.706)
pt3dadd(-15.615, 284.466, -4.5, 0.714)
pt3dadd(-15.627, 284.585, -4.5, 0.72)
pt3dadd(-15.64, 284.705, -4.5, 0.728)
pt3dadd(-15.652, 284.824, -4.5, 0.734)
pt3dadd(-15.665, 284.944, -4.5, 0.742)
pt3dadd(-15.678, 285.062, -4.5, 0.75)
pt3dadd(-15.69, 285.182, -4.5, 0.756)
pt3dadd(-15.703, 285.301, -4.5, 0.764)
pt3dadd(-15.715, 285.42, -4.5, 0.77)
pt3dadd(-15.728, 285.54, -4.5, 0.778)
pt3dadd(-15.74, 285.659, -4.5, 0.786)
pt3dadd(-15.753, 285.779, -4.5, 0.792)
pt3dadd(-15.765, 285.898, -4.5, 0.8)
pt3dadd(-15.778, 286.016, -4.505, 0.804)
pt3dadd(-15.79, 286.134, -4.518, 0.804)
pt3dadd(-15.803, 286.254, -4.53, 0.804)
pt3dadd(-15.862, 286.344, -4.561, 0.794)
pt3dadd(-15.938, 286.426, -4.598, 0.78)
pt3dadd(-16.025, 286.507, -4.605, 0.766)
pt3dadd(-16.111, 286.59, -4.61, 0.754)
pt3dadd(-16.16, 286.625, -4.692, 0.742)
pt3dadd(-16.204, 286.655, -4.782, 0.73)
pt3dadd(-16.239, 286.756, -4.818, 0.714)
pt3dadd(-16.274, 286.864, -4.85, 0.7)
pt3dadd(-16.308, 286.973, -4.882, 0.686)
pt3dadd(-16.356, 287.077, -4.9, 0.678)
pt3dadd(-16.421, 287.179, -4.9, 0.678)
pt3dadd(-16.481, 287.282, -4.9, 0.704)
pt3dadd(-16.516, 287.396, -4.9, 0.79)
pt3dadd(-16.537, 287.514, -4.9, 0.822)
pt3dadd(-16.557, 287.633, -4.9, 0.852)
pt3dadd(-16.578, 287.75, -4.9, 0.882)
pt3dadd(-16.598, 287.869, -4.9, 0.912)
pt3dadd(-16.619, 287.987, -4.9, 0.944)
pt3dadd(-16.639, 288.106, -4.9, 0.974)
pt3dadd(-16.663, 288.223, -4.9, 1.002)
pt3dadd(-16.688, 288.341, -4.9, 1.03)
pt3dadd(-16.713, 288.457, -4.9, 1.058)
pt3dadd(-16.739, 288.576, -4.9, 1.086)
pt3dadd(-16.764, 288.692, -4.9, 1.112)
pt3dadd(-16.789, 288.81, -4.9, 1.14)
pt3dadd(-16.808, 288.928, -4.9, 1.214)
pt3dadd(-16.82, 289.048, -4.9, 1.304)
pt3dadd(-16.833, 289.166, -4.9, 1.354)
pt3dadd(-16.845, 289.286, -4.9, 1.404)
pt3dadd(-16.865, 289.404, -4.9, 1.484)
pt3dadd(-16.913, 289.513, -4.9, 1.626)
pt3dadd(-17.017, 289.562, -4.9, 1.818)
pt3dadd(-17.137, 289.562, -4.9, 1.946)
pt3dadd(-17.256, 289.549, -4.9, 2.008)
pt3dadd(-17.376, 289.54, -4.9, 2)
pt3dadd(-17.494, 289.552, -4.9, 1.922)
pt3dadd(-17.591, 289.618, -4.9, 1.784)
pt3dadd(-17.658, 289.716, -4.9, 1.652)
pt3dadd(-17.717, 289.82, -4.9, 1.596)
pt3dadd(-17.753, 289.936, -4.9, 1.582)
pt3dadd(-17.771, 290.053, -4.9, 1.55)
pt3dadd(-17.783, 290.172, -4.9, 1.484)
pt3dadd(-17.805, 290.291, -4.9, 1.334)
pt3dadd(-17.844, 290.404, -4.9, 1.1)
pt3dadd(-17.892, 290.513, -4.9, 1.034)
pt3dadd(-17.94, 290.623, -4.9, 0.986)
pt3dadd(-17.987, 290.734, -4.9, 0.936)
pt3dadd(-18.035, 290.844, -4.9, 0.886)
pt3dadd(-18.083, 290.953, -4.9, 0.836)
pt3dadd(-18.119, 291.067, -4.9, 0.796)
pt3dadd(-18.134, 291.186, -4.9, 0.774)
pt3dadd(-18.148, 291.305, -4.9, 0.752)
pt3dadd(-18.163, 291.425, -4.9, 0.73)
pt3dadd(-18.177, 291.544, -4.9, 0.708)
pt3dadd(-18.191, 291.662, -4.9, 0.688)
pt3dadd(-18.206, 291.782, -4.9, 0.666)
pt3dadd(-18.234, 291.898, -4.9, 0.65)
pt3dadd(-18.279, 292.008, -4.9, 0.646)
pt3dadd(-18.324, 292.12, -4.9, 0.642)
pt3dadd(-18.369, 292.231, -4.9, 0.638)
pt3dadd(-18.414, 292.343, -4.9, 0.634)
pt3dadd(-18.459, 292.454, -4.9, 0.628)
pt3dadd(-18.483, 292.571, -4.9, 0.646)
pt3dadd(-18.501, 292.69, -4.9, 0.668)
pt3dadd(-18.52, 292.808, -4.9, 0.69)
pt3dadd(-18.538, 292.927, -4.9, 0.714)
pt3dadd(-18.556, 293.045, -4.9, 0.736)
pt3dadd(-18.575, 293.164, -4.9, 0.758)
pt3dadd(-18.594, 293.282, -4.9, 0.78)
pt3dadd(-18.624, 293.398, -4.9, 0.8)
pt3dadd(-18.654, 293.514, -4.9, 0.822)
pt3dadd(-18.683, 293.63, -4.9, 0.842)
pt3dadd(-18.713, 293.747, -4.9, 0.862)
pt3dadd(-18.743, 293.863, -4.9, 0.882)
pt3dadd(-18.772, 293.98, -4.9, 0.902)
}
}
proc shape3d_127() {
dend_5[7] { pt3dadd(-18.8, 294.096, -4.905, 0.912)
pt3dadd(-18.828, 294.212, -4.911, 0.92)
pt3dadd(-18.857, 294.329, -4.916, 0.928)
pt3dadd(-18.885, 294.446, -4.922, 0.938)
pt3dadd(-18.913, 294.563, -4.928, 0.946)
pt3dadd(-18.941, 294.679, -4.933, 0.954)
pt3dadd(-18.971, 294.79, -4.964, 0.932)
pt3dadd(-19.001, 294.899, -4.995, 0.908)
pt3dadd(-19.016, 295.016, -5, 0.89)
pt3dadd(-19.029, 295.135, -5, 0.874)
pt3dadd(-19.041, 295.255, -5, 0.856)
pt3dadd(-19.104, 295.356, -5, 0.844)
pt3dadd(-19.175, 295.452, -5, 0.832)
pt3dadd(-19.272, 295.508, -5.015, 0.82)
pt3dadd(-19.384, 295.544, -5.037, 0.808)
pt3dadd(-19.43, 295.608, -5.093, 0.798)
pt3dadd(-19.442, 295.69, -5.167, 0.792)
pt3dadd(-19.454, 295.769, -5.241, 0.784)
pt3dadd(-19.473, 295.855, -5.301, 0.78)
pt3dadd(-19.52, 295.964, -5.306, 0.792)
pt3dadd(-19.566, 296.076, -5.311, 0.802)
pt3dadd(-19.622, 296.117, -5.385, 0.838)
pt3dadd(-19.678, 296.148, -5.469, 0.878)
pt3dadd(-19.751, 296.167, -5.542, 0.926)
pt3dadd(-19.853, 296.162, -5.594, 0.986)
pt3dadd(-19.948, 296.176, -5.649, 1.042)
pt3dadd(-20.027, 296.252, -5.683, 1.026)
pt3dadd(-20.107, 296.338, -5.707, 0.986)
pt3dadd(-20.182, 296.37, -5.774, 0.914)
pt3dadd(-20.256, 296.392, -5.851, 0.834)
pt3dadd(-20.314, 296.488, -5.877, 0.77)
pt3dadd(-20.372, 296.59, -5.899, 0.706)
pt3dadd(-20.407, 296.704, -5.896, 0.656)
pt3dadd(-20.44, 296.819, -5.891, 0.606)
pt3dadd(-20.489, 296.915, -5.863, 0.528)
pt3dadd(-20.539, 296.998, -5.81, 0.444)
pt3dadd(-20.553, 297.104, -5.767, 0.42)
pt3dadd(-20.567, 297.214, -5.724, 0.396)
pt3dadd(-20.581, 297.32, -5.681, 0.372)
pt3dadd(-20.595, 297.427, -5.638, 0.348)
pt3dadd(-20.609, 297.538, -5.6, 0.318)
pt3dadd(-20.621, 297.656, -5.6, 0.248)
pt3dadd(-20.634, 297.775, -5.6, 0.226)
pt3dadd(-20.646, 297.895, -5.6, 0.226)
pt3dadd(-20.659, 298.014, -5.6, 0.226)
pt3dadd(-20.671, 298.134, -5.601, 0.226)
pt3dadd(-20.683, 298.249, -5.621, 0.234)
pt3dadd(-20.692, 298.331, -5.687, 0.266)
pt3dadd(-20.707, 298.356, -5.783, 0.3)
pt3dadd(-20.757, 298.374, -5.868, 0.266)
pt3dadd(-20.851, 298.423, -5.912, 0.226)
pt3dadd(-20.958, 298.445, -5.953, 0.28)
pt3dadd(-21.072, 298.451, -5.977, 0.316)
pt3dadd(-21.191, 298.456, -5.991, 0.338)
pt3dadd(-21.299, 298.486, -6.008, 0.356)
pt3dadd(-21.386, 298.562, -6.032, 0.37)
pt3dadd(-21.461, 298.634, -6.076, 0.376)
pt3dadd(-21.522, 298.7, -6.141, 0.376)
pt3dadd(-21.572, 298.775, -6.173, 0.38)
pt3dadd(-21.588, 298.871, -6.114, 0.392)
pt3dadd(-21.603, 298.957, -6.049, 0.408)
pt3dadd(-21.609, 299.02, -5.964, 0.444)
pt3dadd(-21.635, 299.113, -5.91, 0.452)
pt3dadd(-21.693, 299.216, -5.906, 0.466)
pt3dadd(-21.751, 299.314, -5.938, 0.536)
pt3dadd(-21.804, 299.398, -5.993, 0.642)
pt3dadd(-21.871, 299.405, -6.068, 0.678)
pt3dadd(-21.885, 299.352, -6.155, 0.67)
pt3dadd(-21.883, 299.327, -6.252, 0.63)
pt3dadd(-21.882, 299.32, -6.352, 0.576)
pt3dadd(-21.883, 299.327, -6.451, 0.552)
pt3dadd(-21.897, 299.354, -6.547, 0.596)
pt3dadd(-21.953, 299.437, -6.594, 0.616)
pt3dadd(-22.01, 299.54, -6.59, 0.534)
pt3dadd(-22.042, 299.647, -6.555, 0.46)
pt3dadd(-22.084, 299.747, -6.514, 0.404)
pt3dadd(-22.157, 299.842, -6.509, 0.398)
pt3dadd(-22.232, 299.935, -6.507, 0.392)
pt3dadd(-22.306, 300.03, -6.505, 0.388)
pt3dadd(-22.38, 300.124, -6.502, 0.382)
pt3dadd(-22.455, 300.218, -6.5, 0.376)
pt3dadd(-22.552, 300.288, -6.495, 0.412)
pt3dadd(-22.651, 300.354, -6.489, 0.448)
pt3dadd(-22.723, 300.437, -6.45, 0.502)
pt3dadd(-22.795, 300.517, -6.411, 0.562)
pt3dadd(-22.906, 300.564, -6.411, 0.648)
pt3dadd(-23.013, 300.613, -6.415, 0.732)
pt3dadd(-23.074, 300.683, -6.478, 0.804)
pt3dadd(-23.132, 300.763, -6.529, 0.868)
pt3dadd(-23.182, 300.87, -6.552, 0.912)
pt3dadd(-23.233, 300.974, -6.575, 0.956)
pt3dadd(-23.283, 301.08, -6.598, 1)
pt3dadd(-23.335, 301.188, -6.6, 1.014)
pt3dadd(-23.386, 301.297, -6.6, 1.024)
pt3dadd(-23.424, 301.41, -6.6, 0.998)
pt3dadd(-23.459, 301.524, -6.6, 0.966)
pt3dadd(-23.499, 301.638, -6.6, 0.944)
pt3dadd(-23.538, 301.751, -6.6, 0.922)
pt3dadd(-23.578, 301.865, -6.6, 0.9)
pt3dadd(-23.617, 301.978, -6.6, 0.878)
pt3dadd(-23.656, 302.09, -6.6, 0.858)
pt3dadd(-23.705, 302.201, -6.6, 0.846)
pt3dadd(-23.755, 302.309, -6.6, 0.838)
pt3dadd(-23.806, 302.418, -6.6, 0.828)
pt3dadd(-23.856, 302.527, -6.6, 0.818)
pt3dadd(-23.907, 302.636, -6.6, 0.81)
pt3dadd(-23.972, 302.732, -6.6, 0.804)
pt3dadd(-24.068, 302.804, -6.6, 0.804)
pt3dadd(-24.163, 302.875, -6.608, 0.806)
pt3dadd(-24.253, 302.941, -6.645, 0.82)
pt3dadd(-24.312, 303.026, -6.681, 0.824)
pt3dadd(-24.329, 303.137, -6.716, 0.812)
pt3dadd(-24.351, 303.236, -6.759, 0.802)
pt3dadd(-24.395, 303.264, -6.849, 0.788)
pt3dadd(-24.441, 303.307, -6.926, 0.776)
pt3dadd(-24.496, 303.41, -6.95, 0.76)
pt3dadd(-24.551, 303.512, -6.973, 0.746)
pt3dadd(-24.606, 303.616, -6.997, 0.73)
pt3dadd(-24.633, 303.731, -7, 0.712)
pt3dadd(-24.655, 303.85, -7, 0.694)
pt3dadd(-24.678, 303.966, -7, 0.672)
pt3dadd(-24.719, 304.078, -7.008, 0.598)
pt3dadd(-24.75, 304.188, -7.039, 0.578)
pt3dadd(-24.78, 304.297, -7.071, 0.558)
pt3dadd(-24.81, 304.408, -7.102, 0.536)
pt3dadd(-24.841, 304.518, -7.133, 0.516)
pt3dadd(-24.878, 304.626, -7.157, 0.498)
pt3dadd(-24.932, 304.733, -7.164, 0.482)
pt3dadd(-24.986, 304.841, -7.171, 0.468)
pt3dadd(-25.04, 304.946, -7.177, 0.452)
pt3dadd(-25.095, 305.053, -7.184, 0.438)
pt3dadd(-25.145, 305.159, -7.178, 0.424)
pt3dadd(-25.185, 305.261, -7.136, 0.412)
pt3dadd(-25.225, 305.362, -7.095, 0.402)
pt3dadd(-25.265, 305.464, -7.053, 0.39)
pt3dadd(-25.305, 305.566, -7.012, 0.38)
pt3dadd(-25.338, 305.665, -6.964, 0.386)
pt3dadd(-25.369, 305.764, -6.913, 0.398)
pt3dadd(-25.433, 305.85, -6.927, 0.422)
pt3dadd(-25.509, 305.932, -6.965, 0.45)
pt3dadd(-25.576, 306.012, -6.921, 0.504)
pt3dadd(-25.623, 306.101, -6.868, 0.55)
pt3dadd(-25.653, 306.194, -6.81, 0.588)
pt3dadd(-25.705, 306.274, -6.753, 0.63)
pt3dadd(-25.749, 306.36, -6.698, 0.658)
pt3dadd(-25.766, 306.461, -6.645, 0.67)
pt3dadd(-25.78, 306.562, -6.593, 0.678)
pt3dadd(-25.791, 306.665, -6.542, 0.678)
pt3dadd(-25.801, 306.758, -6.484, 0.678)
pt3dadd(-25.806, 306.804, -6.392, 0.678)
pt3dadd(-25.811, 306.851, -6.3, 0.678)
pt3dadd(-25.826, 306.865, -6.202, 0.678)
pt3dadd(-25.843, 306.874, -6.104, 0.678)
pt3dadd(-25.88, 306.912, -6.026, 0.686)
pt3dadd(-25.933, 306.985, -5.969, 0.704)
pt3dadd(-25.939, 307.022, -5.873, 0.708)
pt3dadd(-25.945, 307.057, -5.778, 0.714)
pt3dadd(-25.951, 307.094, -5.683, 0.718)
pt3dadd(-25.957, 307.129, -5.588, 0.722)
pt3dadd(-25.964, 307.166, -5.493, 0.726)
pt3dadd(-25.968, 307.2, -5.397, 0.75)
pt3dadd(-25.97, 307.216, -5.298, 0.728)
pt3dadd(-25.969, 307.234, -5.199, 0.698)
pt3dadd(-25.945, 307.286, -5.114, 0.678)
pt3dadd(-25.893, 307.339, -5.037, 0.678)
pt3dadd(-25.856, 307.385, -4.95, 0.678)
pt3dadd(-25.793, 307.462, -4.946, 0.652)
pt3dadd(-25.759, 307.478, -5.041, 0.574)
pt3dadd(-25.725, 307.492, -5.136, 0.474)
pt3dadd(-25.652, 307.543, -5.196, 0.362)
pt3dadd(-25.569, 307.604, -5.244, 0.326)
pt3dadd(-25.534, 307.624, -5.338, 0.394)
pt3dadd(-25.5, 307.634, -5.433, 0.426)
pt3dadd(-25.43, 307.687, -5.492, 0.39)
pt3dadd(-25.35, 307.775, -5.5, 0.334)
pt3dadd(-25.28, 307.872, -5.498, 0.272)
pt3dadd(-25.214, 307.966, -5.472, 0.232)
pt3dadd(-25.147, 308.044, -5.423, 0.226)
pt3dadd(-25.062, 308.124, -5.415, 0.226)
pt3dadd(-25.003, 308.196, -5.472, 0.226)
pt3dadd(-24.988, 308.254, -5.558, 0.26)
pt3dadd(-24.949, 308.285, -5.647, 0.318)
pt3dadd(-24.849, 308.275, -5.697, 0.344)
pt3dadd(-24.746, 308.238, -5.737, 0.384)
pt3dadd(-24.646, 308.197, -5.78, 0.398)
pt3dadd(-24.533, 308.165, -5.793, 0.428)
pt3dadd(-24.417, 308.135, -5.798, 0.462)
pt3dadd(-24.301, 308.123, -5.785, 0.478)
pt3dadd(-24.187, 308.126, -5.755, 0.478)
pt3dadd(-24.119, 308.134, -5.673, 0.466)
pt3dadd(-24.066, 308.14, -5.584, 0.452)
pt3dadd(-24.011, 308.146, -5.495, 0.482)
pt3dadd(-23.93, 308.154, -5.422, 0.552)
pt3dadd(-23.858, 308.179, -5.348, 0.578)
pt3dadd(-23.798, 308.213, -5.266, 0.578)
pt3dadd(-23.79, 308.286, -5.194, 0.552)
pt3dadd(-23.799, 308.375, -5.126, 0.516)
pt3dadd(-23.807, 308.454, -5.052, 0.416)
pt3dadd(-23.818, 308.558, -5.009, 0.292)
pt3dadd(-23.831, 308.678, -4.997, 0.244)
}
}
proc shape3d_128() {
dend_5[7] { pt3dadd(-23.843, 308.791, -4.973, 0.238)
pt3dadd(-23.85, 308.866, -4.901, 0.292)
pt3dadd(-23.853, 308.886, -4.803, 0.398)
pt3dadd(-23.835, 308.887, -4.704, 0.512)
pt3dadd(-23.764, 308.894, -4.629, 0.626)
pt3dadd(-23.651, 308.906, -4.604, 0.686)
pt3dadd(-23.532, 308.92, -4.592, 0.742)
pt3dadd(-23.417, 308.932, -4.567, 0.852)
pt3dadd(-23.308, 308.942, -4.527, 0.976)
pt3dadd(-23.191, 308.956, -4.509, 1.03)
pt3dadd(-23.072, 308.968, -4.506, 1.03)
pt3dadd(-22.953, 308.981, -4.502, 1.03)
pt3dadd(-22.834, 308.993, -4.493, 1.024)
pt3dadd(-22.716, 309.005, -4.481, 1.016)
pt3dadd(-22.597, 309.018, -4.469, 1.006)
pt3dadd(-22.492, 309.029, -4.424, 0.994)
pt3dadd(-22.389, 309.04, -4.373, 0.984)
pt3dadd(-22.309, 309.048, -4.302, 0.98)
pt3dadd(-22.242, 309.055, -4.219, 0.98)
pt3dadd(-22.156, 309.064, -4.154, 0.976)
pt3dadd(-22.051, 309.074, -4.105, 0.97)
pt3dadd(-21.947, 309.086, -4.057, 0.962)
pt3dadd(-21.843, 309.097, -4.009, 0.956)
pt3dadd(-21.726, 309.109, -4, 0.954)
pt3dadd(-21.606, 309.121, -4, 0.954)
pt3dadd(-21.487, 309.134, -4, 0.954)
pt3dadd(-21.368, 309.146, -4, 0.974)
pt3dadd(-21.249, 309.16, -3.997, 1)
pt3dadd(-21.129, 309.172, -3.993, 1.026)
pt3dadd(-21.01, 309.185, -3.989, 1.052)
pt3dadd(-20.906, 309.196, -3.942, 1.066)
pt3dadd(-20.803, 309.206, -3.891, 1.076)
pt3dadd(-20.7, 309.217, -3.84, 1.072)
pt3dadd(-20.597, 309.228, -3.79, 1.06)
pt3dadd(-20.51, 309.278, -3.746, 1.016)
pt3dadd(-20.436, 309.36, -3.709, 0.946)
pt3dadd(-20.423, 309.472, -3.7, 0.868)
pt3dadd(-20.428, 309.592, -3.7, 0.788)
pt3dadd(-20.343, 309.662, -3.681, 0.744)
pt3dadd(-20.245, 309.726, -3.659, 0.706)
pt3dadd(-20.146, 309.788, -3.637, 0.668)
pt3dadd(-20.047, 309.852, -3.615, 0.63)
pt3dadd(-19.956, 309.899, -3.577, 0.562)
pt3dadd(-19.863, 309.908, -3.519, 0.464)
pt3dadd(-19.746, 309.92, -3.501, 0.452)
pt3dadd(-19.628, 309.934, -3.512, 0.452)
pt3dadd(-19.515, 309.944, -3.544, 0.452)
pt3dadd(-19.403, 309.956, -3.575, 0.452)
pt3dadd(-19.301, 309.99, -3.55, 0.418)
pt3dadd(-19.27, 310.049, -3.469, 0.354)
pt3dadd(-19.25, 310.085, -3.376, 0.308)
pt3dadd(-19.202, 310.109, -3.287, 0.256)
pt3dadd(-19.184, 310.152, -3.201, 0.226)
pt3dadd(-19.235, 310.194, -3.118, 0.226)
pt3dadd(-19.301, 310.232, -3.042, 0.234)
pt3dadd(-19.38, 310.27, -2.973, 0.248)
pt3dadd(-19.396, 310.291, -2.882, 0.256)
pt3dadd(-19.389, 310.309, -2.783, 0.264)
pt3dadd(-19.383, 310.327, -2.685, 0.274)
pt3dadd(-19.358, 310.386, -2.608, 0.302)
pt3dadd(-19.322, 310.472, -2.545, 0.344)
pt3dadd(-19.346, 310.58, -2.525, 0.364)
pt3dadd(-19.384, 310.693, -2.514, 0.382)
pt3dadd(-19.422, 310.806, -2.503, 0.398)
pt3dadd(-19.454, 310.916, -2.477, 0.428)
pt3dadd(-19.485, 311.027, -2.446, 0.462)
pt3dadd(-19.504, 311.135, -2.407, 0.478)
pt3dadd(-19.55, 311.239, -2.382, 0.49)
pt3dadd(-19.604, 311.345, -2.361, 0.506)
pt3dadd(-19.657, 311.449, -2.34, 0.522)
pt3dadd(-19.711, 311.554, -2.319, 0.538)
pt3dadd(-19.766, 311.657, -2.3, 0.554)
pt3dadd(-19.836, 311.755, -2.3, 0.574)
pt3dadd(-19.906, 311.851, -2.3, 0.594)
pt3dadd(-19.976, 311.948, -2.3, 0.612)
pt3dadd(-20.046, 312.047, -2.3, 0.632)
pt3dadd(-20.117, 312.144, -2.3, 0.652)
pt3dadd(-20.19, 312.239, -2.3, 0.676)
pt3dadd(-20.263, 312.334, -2.3, 0.702)
pt3dadd(-20.337, 312.428, -2.3, 0.726)
pt3dadd(-20.41, 312.523, -2.3, 0.75)
pt3dadd(-20.483, 312.618, -2.3, 0.776)
pt3dadd(-20.508, 312.734, -2.296, 0.778)
pt3dadd(-20.525, 312.853, -2.293, 0.778)
pt3dadd(-20.543, 312.971, -2.286, 0.776)
pt3dadd(-20.574, 313.076, -2.248, 0.738)
pt3dadd(-20.604, 313.183, -2.21, 0.702)
pt3dadd(-20.658, 313.261, -2.148, 0.688)
pt3dadd(-20.7, 313.336, -2.08, 0.684)
pt3dadd(-20.708, 313.403, -1.998, 0.706)
pt3dadd(-20.717, 313.469, -1.915, 0.732)
pt3dadd(-20.748, 313.512, -1.826, 0.782)
pt3dadd(-20.786, 313.552, -1.74, 0.834)
pt3dadd(-20.897, 313.54, -1.707, 0.888)
pt3dadd(-21.016, 313.528, -1.7, 0.904)
pt3dadd(-21.135, 313.522, -1.7, 0.916)
pt3dadd(-21.251, 313.546, -1.7, 0.966)
pt3dadd(-21.34, 313.624, -1.699, 1.028)
pt3dadd(-21.411, 313.718, -1.682, 1.016)
pt3dadd(-21.481, 313.81, -1.66, 0.998)
pt3dadd(-21.55, 313.879, -1.603, 0.94)
pt3dadd(-21.601, 313.956, -1.542, 0.862)
pt3dadd(-21.62, 314.045, -1.476, 0.748)
pt3dadd(-21.624, 314.144, -1.423, 0.63)
pt3dadd(-21.591, 314.254, -1.401, 0.626)
pt3dadd(-21.503, 314.334, -1.4, 0.612)
pt3dadd(-21.405, 314.402, -1.4, 0.482)
pt3dadd(-21.302, 314.462, -1.4, 0.226)
}
dend_5[8] {pt3dclear()
pt3dadd(-8.021, 207.625, -10.4, 1.03)
pt3dadd(-8.056, 207.622, -10.375, 1.016)
pt3dadd(-8.146, 207.613, -10.309, 0.984)
pt3dadd(-8.236, 207.604, -10.243, 0.95)
pt3dadd(-8.325, 207.594, -10.177, 0.918)
pt3dadd(-8.415, 207.584, -10.111, 0.884)
pt3dadd(-8.505, 207.575, -10.045, 0.852)
pt3dadd(-8.595, 207.565, -9.98, 0.818)
pt3dadd(-8.684, 207.556, -9.914, 0.786)
pt3dadd(-8.774, 207.547, -9.848, 0.752)
pt3dadd(-8.864, 207.538, -9.782, 0.72)
pt3dadd(-8.954, 207.528, -9.716, 0.686)
pt3dadd(-9.059, 207.522, -9.731, 0.774)
pt3dadd(-9.168, 207.516, -9.771, 0.9)
pt3dadd(-9.281, 207.529, -9.792, 1.004)
pt3dadd(-9.398, 207.559, -9.797, 1.094)
pt3dadd(-9.515, 207.577, -9.796, 1.176)
pt3dadd(-9.633, 207.571, -9.783, 1.244)
pt3dadd(-9.752, 207.563, -9.77, 1.312)
pt3dadd(-9.85, 207.604, -9.735, 1.352)
pt3dadd(-9.94, 207.664, -9.69, 1.38)
pt3dadd(-9.994, 207.755, -9.645, 1.4)
pt3dadd(-10.077, 207.834, -9.628, 1.406)
pt3dadd(-10.17, 207.911, -9.621, 1.406)
pt3dadd(-10.263, 207.985, -9.614, 1.406)
pt3dadd(-10.356, 208.061, -9.607, 1.406)
pt3dadd(-10.449, 208.135, -9.6, 1.406)
pt3dadd(-10.514, 208.237, -9.6, 1.412)
pt3dadd(-10.578, 208.338, -9.6, 1.416)
pt3dadd(-10.643, 208.44, -9.6, 1.42)
pt3dadd(-10.707, 208.541, -9.6, 1.426)
pt3dadd(-10.772, 208.643, -9.6, 1.43)
pt3dadd(-10.85, 208.733, -9.6, 1.424)
pt3dadd(-10.931, 208.82, -9.6, 1.414)
pt3dadd(-11.013, 208.909, -9.6, 1.404)
pt3dadd(-11.095, 208.997, -9.6, 1.394)
pt3dadd(-11.176, 209.084, -9.6, 1.384)
pt3dadd(-11.214, 209.196, -9.6, 1.366)
pt3dadd(-11.242, 209.312, -9.6, 1.348)
pt3dadd(-11.275, 209.425, -9.6, 1.328)
pt3dadd(-11.366, 209.504, -9.6, 1.304)
pt3dadd(-11.457, 209.582, -9.6, 1.282)
pt3dadd(-11.573, 209.611, -9.6, 1.28)
pt3dadd(-11.69, 209.639, -9.6, 1.28)
pt3dadd(-11.808, 209.641, -9.6, 1.276)
pt3dadd(-11.928, 209.628, -9.6, 1.268)
pt3dadd(-12.047, 209.616, -9.6, 1.258)
pt3dadd(-12.159, 209.644, -9.6, 1.246)
pt3dadd(-12.268, 209.695, -9.6, 1.234)
pt3dadd(-12.376, 209.747, -9.6, 1.22)
pt3dadd(-12.485, 209.797, -9.6, 1.206)
pt3dadd(-12.568, 209.872, -9.563, 1.22)
pt3dadd(-12.654, 209.942, -9.525, 1.274)
pt3dadd(-12.739, 210.018, -9.501, 1.386)
pt3dadd(-12.816, 210.107, -9.483, 1.436)
pt3dadd(-12.893, 210.197, -9.466, 1.486)
pt3dadd(-12.97, 210.287, -9.449, 1.536)
pt3dadd(-13.048, 210.373, -9.429, 1.588)
pt3dadd(-13.131, 210.426, -9.372, 1.676)
pt3dadd(-13.209, 210.493, -9.328, 1.738)
pt3dadd(-13.28, 210.588, -9.311, 1.75)
pt3dadd(-13.36, 210.673, -9.291, 1.738)
pt3dadd(-13.454, 210.743, -9.268, 1.684)
pt3dadd(-13.533, 210.778, -9.214, 1.616)
pt3dadd(-13.596, 210.776, -9.129, 1.532)
pt3dadd(-13.667, 210.776, -9.048, 1.43)
pt3dadd(-13.746, 210.781, -8.975, 1.304)
pt3dadd(-13.82, 210.85, -8.92, 1.254)
pt3dadd(-13.893, 210.919, -8.865, 1.204)
pt3dadd(-13.966, 210.988, -8.81, 1.154)
pt3dadd(-14.04, 211.056, -8.756, 1.104)
}
dend_5[9] {pt3dclear()
pt3dadd(-14.04, 211.056, -8.756, 1.104)
pt3dadd(-14.063, 211.1, -8.705, 1.044)
pt3dadd(-14.098, 211.168, -8.628, 0.95)
pt3dadd(-14.154, 211.253, -8.578, 0.854)
pt3dadd(-14.215, 211.342, -8.535, 0.756)
pt3dadd(-14.312, 211.409, -8.517, 0.69)
pt3dadd(-14.409, 211.476, -8.5, 0.626)
pt3dadd(-14.487, 211.567, -8.5, 0.58)
pt3dadd(-14.564, 211.658, -8.5, 0.532)
pt3dadd(-14.656, 211.735, -8.5, 0.496)
pt3dadd(-14.741, 211.818, -8.507, 0.478)
pt3dadd(-14.818, 211.91, -8.521, 0.478)
pt3dadd(-14.894, 212.002, -8.536, 0.478)
pt3dadd(-14.97, 212.093, -8.55, 0.478)
pt3dadd(-15.047, 212.183, -8.565, 0.478)
pt3dadd(-15.105, 212.287, -8.572, 0.49)
pt3dadd(-15.16, 212.393, -8.579, 0.504)
pt3dadd(-15.216, 212.498, -8.585, 0.518)
pt3dadd(-15.271, 212.605, -8.592, 0.534)
pt3dadd(-15.327, 212.711, -8.598, 0.548)
pt3dadd(-15.393, 212.81, -8.6, 0.584)
}
}
proc shape3d_129() {
dend_5[9] { pt3dadd(-15.464, 212.906, -8.6, 0.63)
pt3dadd(-15.528, 213.007, -8.592, 0.672)
pt3dadd(-15.585, 213.113, -8.576, 0.708)
pt3dadd(-15.666, 213.176, -8.552, 0.722)
pt3dadd(-15.778, 213.19, -8.52, 0.71)
pt3dadd(-15.891, 213.216, -8.5, 0.686)
pt3dadd(-16.003, 213.257, -8.5, 0.64)
pt3dadd(-16.111, 213.306, -8.5, 0.596)
pt3dadd(-16.196, 213.392, -8.5, 0.554)
pt3dadd(-16.28, 213.478, -8.5, 0.512)
pt3dadd(-16.364, 213.563, -8.5, 0.468)
pt3dadd(-16.433, 213.659, -8.5, 0.432)
pt3dadd(-16.491, 213.766, -8.5, 0.4)
pt3dadd(-16.544, 213.872, -8.5, 0.386)
pt3dadd(-16.59, 213.983, -8.5, 0.414)
pt3dadd(-16.638, 214.092, -8.5, 0.436)
pt3dadd(-16.686, 214.204, -8.5, 0.458)
pt3dadd(-16.733, 214.313, -8.5, 0.48)
pt3dadd(-16.781, 214.422, -8.5, 0.502)
pt3dadd(-16.829, 214.534, -8.5, 0.526)
pt3dadd(-16.914, 214.616, -8.5, 0.546)
pt3dadd(-17.004, 214.696, -8.5, 0.566)
pt3dadd(-17.093, 214.776, -8.5, 0.586)
pt3dadd(-17.183, 214.855, -8.5, 0.606)
pt3dadd(-17.272, 214.936, -8.5, 0.626)
pt3dadd(-17.346, 215.03, -8.5, 0.632)
pt3dadd(-17.42, 215.125, -8.5, 0.638)
pt3dadd(-17.493, 215.22, -8.5, 0.642)
pt3dadd(-17.566, 215.315, -8.5, 0.648)
pt3dadd(-17.64, 215.41, -8.5, 0.652)
pt3dadd(-17.667, 215.522, -8.48, 0.644)
pt3dadd(-17.688, 215.638, -8.458, 0.632)
pt3dadd(-17.709, 215.753, -8.436, 0.62)
pt3dadd(-17.73, 215.867, -8.413, 0.61)
pt3dadd(-17.742, 215.982, -8.386, 0.588)
pt3dadd(-17.741, 216.096, -8.353, 0.55)
pt3dadd(-17.768, 216.192, -8.31, 0.516)
pt3dadd(-17.837, 216.26, -8.253, 0.486)
pt3dadd(-17.933, 216.312, -8.248, 0.478)
pt3dadd(-18.043, 216.347, -8.264, 0.478)
pt3dadd(-18.161, 216.341, -8.247, 0.492)
pt3dadd(-18.272, 216.353, -8.228, 0.51)
pt3dadd(-18.357, 216.432, -8.2, 0.552)
pt3dadd(-18.463, 216.487, -8.2, 0.562)
pt3dadd(-18.57, 216.542, -8.2, 0.572)
pt3dadd(-18.676, 216.598, -8.2, 0.582)
pt3dadd(-18.783, 216.653, -8.2, 0.592)
pt3dadd(-18.89, 216.708, -8.2, 0.602)
pt3dadd(-18.973, 216.793, -8.2, 0.616)
pt3dadd(-19.055, 216.882, -8.2, 0.632)
pt3dadd(-19.136, 216.97, -8.2, 0.646)
pt3dadd(-19.218, 217.057, -8.2, 0.662)
pt3dadd(-19.299, 217.146, -8.2, 0.676)
pt3dadd(-19.397, 217.208, -8.176, 0.688)
pt3dadd(-19.496, 217.268, -8.151, 0.7)
pt3dadd(-19.596, 217.33, -8.125, 0.712)
pt3dadd(-19.695, 217.39, -8.1, 0.724)
pt3dadd(-19.779, 217.459, -8.062, 0.736)
pt3dadd(-19.852, 217.536, -8.016, 0.748)
pt3dadd(-19.925, 217.614, -7.97, 0.76)
pt3dadd(-19.999, 217.691, -7.924, 0.772)
pt3dadd(-20.084, 217.753, -7.878, 0.786)
pt3dadd(-20.181, 217.798, -7.833, 0.806)
pt3dadd(-20.279, 217.841, -7.788, 0.824)
pt3dadd(-20.376, 217.885, -7.743, 0.842)
pt3dadd(-20.477, 217.932, -7.711, 0.86)
pt3dadd(-20.586, 217.981, -7.708, 0.88)
pt3dadd(-20.695, 218.032, -7.706, 0.9)
pt3dadd(-20.804, 218.082, -7.704, 0.92)
pt3dadd(-20.913, 218.13, -7.702, 0.94)
pt3dadd(-21.023, 218.18, -7.7, 0.96)
pt3dadd(-21.132, 218.231, -7.7, 0.984)
pt3dadd(-21.237, 218.284, -7.699, 1.002)
pt3dadd(-21.294, 218.389, -7.683, 0.978)
pt3dadd(-21.35, 218.492, -7.667, 0.954)
pt3dadd(-21.427, 218.568, -7.622, 0.926)
pt3dadd(-21.502, 218.636, -7.572, 0.9)
pt3dadd(-21.576, 218.682, -7.503, 0.886)
pt3dadd(-21.651, 218.708, -7.43, 0.882)
pt3dadd(-21.728, 218.712, -7.353, 0.89)
pt3dadd(-21.804, 218.717, -7.276, 0.898)
pt3dadd(-21.886, 218.725, -7.21, 0.9)
pt3dadd(-21.998, 218.771, -7.205, 0.878)
pt3dadd(-22.108, 218.815, -7.2, 0.854)
pt3dadd(-22.167, 218.92, -7.188, 0.826)
pt3dadd(-22.226, 219.023, -7.176, 0.8)
pt3dadd(-22.283, 219.113, -7.15, 0.77)
pt3dadd(-22.335, 219.14, -7.063, 0.732)
pt3dadd(-22.379, 219.173, -6.974, 0.684)
pt3dadd(-22.44, 219.209, -6.901, 0.65)
pt3dadd(-22.531, 219.248, -6.845, 0.644)
pt3dadd(-22.623, 219.287, -6.789, 0.638)
pt3dadd(-22.714, 219.325, -6.733, 0.632)
pt3dadd(-22.81, 219.361, -6.681, 0.628)
pt3dadd(-22.912, 219.39, -6.635, 0.628)
pt3dadd(-23.014, 219.419, -6.589, 0.628)
pt3dadd(-23.117, 219.45, -6.542, 0.628)
pt3dadd(-23.218, 219.481, -6.496, 0.63)
pt3dadd(-23.303, 219.539, -6.444, 0.648)
pt3dadd(-23.388, 219.595, -6.392, 0.666)
pt3dadd(-23.472, 219.652, -6.34, 0.686)
pt3dadd(-23.557, 219.709, -6.287, 0.704)
pt3dadd(-23.631, 219.73, -6.21, 0.758)
pt3dadd(-23.701, 219.763, -6.141, 0.808)
pt3dadd(-23.752, 219.869, -6.12, 0.832)
pt3dadd(-23.8, 219.974, -6.1, 0.854)
pt3dadd(-23.833, 220.091, -6.1, 0.854)
pt3dadd(-23.866, 220.206, -6.1, 0.854)
pt3dadd(-23.938, 220.272, -6.084, 0.848)
pt3dadd(-24.051, 220.285, -6.051, 0.836)
pt3dadd(-24.147, 220.326, -6.013, 0.828)
pt3dadd(-24.224, 220.4, -5.967, 0.828)
pt3dadd(-24.3, 220.475, -5.922, 0.828)
pt3dadd(-24.361, 220.568, -5.9, 0.834)
pt3dadd(-24.406, 220.68, -5.9, 0.844)
pt3dadd(-24.451, 220.787, -5.894, 0.856)
pt3dadd(-24.498, 220.867, -5.829, 0.876)
pt3dadd(-24.545, 220.945, -5.765, 0.898)
pt3dadd(-24.64, 220.974, -5.731, 0.926)
pt3dadd(-24.758, 220.979, -5.712, 0.96)
pt3dadd(-24.855, 221.021, -5.7, 0.982)
pt3dadd(-24.919, 221.122, -5.7, 0.992)
pt3dadd(-24.984, 221.224, -5.7, 1)
pt3dadd(-25.027, 221.332, -5.699, 0.998)
pt3dadd(-25.04, 221.45, -5.695, 0.98)
pt3dadd(-25.052, 221.57, -5.691, 0.962)
pt3dadd(-25.097, 221.67, -5.67, 0.938)
pt3dadd(-25.173, 221.752, -5.633, 0.906)
pt3dadd(-25.252, 221.83, -5.597, 0.876)
pt3dadd(-25.356, 221.884, -5.574, 0.85)
pt3dadd(-25.448, 221.932, -5.537, 0.854)
pt3dadd(-25.508, 221.977, -5.461, 0.918)
pt3dadd(-25.579, 222.029, -5.393, 0.942)
pt3dadd(-25.65, 222.08, -5.325, 0.968)
pt3dadd(-25.721, 222.132, -5.257, 0.992)
pt3dadd(-25.811, 222.176, -5.207, 1.018)
pt3dadd(-25.919, 222.212, -5.178, 1.046)
pt3dadd(-26.028, 222.25, -5.148, 1.074)
pt3dadd(-26.137, 222.286, -5.118, 1.102)
pt3dadd(-26.245, 222.323, -5.088, 1.13)
pt3dadd(-26.349, 222.354, -5.047, 1.13)
pt3dadd(-26.451, 222.394, -5.008, 1.124)
pt3dadd(-26.538, 222.47, -4.984, 1.084)
pt3dadd(-26.62, 222.552, -4.956, 1.032)
pt3dadd(-26.688, 222.64, -4.92, 0.948)
pt3dadd(-26.733, 222.742, -4.9, 0.88)
pt3dadd(-26.75, 222.86, -4.9, 0.828)
pt3dadd(-26.767, 222.979, -4.9, 0.776)
pt3dadd(-26.775, 223.096, -4.917, 0.738)
pt3dadd(-26.776, 223.211, -4.947, 0.71)
pt3dadd(-26.778, 223.325, -4.976, 0.684)
pt3dadd(-26.779, 223.44, -5.006, 0.658)
pt3dadd(-26.748, 223.511, -5.077, 0.642)
pt3dadd(-26.711, 223.573, -5.156, 0.628)
pt3dadd(-26.723, 223.692, -5.168, 0.642)
pt3dadd(-26.736, 223.81, -5.181, 0.656)
pt3dadd(-26.748, 223.93, -5.193, 0.67)
pt3dadd(-26.76, 224.047, -5.2, 0.682)
pt3dadd(-26.773, 224.167, -5.2, 0.69)
pt3dadd(-26.786, 224.286, -5.2, 0.698)
pt3dadd(-26.798, 224.406, -5.2, 0.714)
pt3dadd(-26.834, 224.516, -5.194, 0.734)
pt3dadd(-26.901, 224.615, -5.18, 0.75)
pt3dadd(-26.968, 224.712, -5.166, 0.766)
pt3dadd(-27.035, 224.81, -5.152, 0.782)
pt3dadd(-27.102, 224.908, -5.137, 0.798)
pt3dadd(-27.142, 225.019, -5.129, 0.824)
pt3dadd(-27.17, 225.136, -5.124, 0.854)
pt3dadd(-27.198, 225.253, -5.118, 0.884)
pt3dadd(-27.226, 225.37, -5.113, 0.914)
pt3dadd(-27.254, 225.486, -5.107, 0.942)
pt3dadd(-27.282, 225.601, -5.101, 0.972)
pt3dadd(-27.298, 225.72, -5.1, 1.024)
pt3dadd(-27.311, 225.839, -5.1, 1.082)
pt3dadd(-27.323, 225.959, -5.1, 1.14)
pt3dadd(-27.339, 226.078, -5.1, 1.182)
pt3dadd(-27.356, 226.196, -5.1, 1.216)
pt3dadd(-27.373, 226.315, -5.1, 1.25)
pt3dadd(-27.467, 226.381, -5.1, 1.256)
pt3dadd(-27.572, 226.438, -5.1, 1.256)
pt3dadd(-27.662, 226.507, -5.126, 1.206)
pt3dadd(-27.745, 226.582, -5.164, 1.136)
pt3dadd(-27.788, 226.68, -5.207, 1.064)
pt3dadd(-27.827, 226.781, -5.25, 0.992)
pt3dadd(-27.86, 226.883, -5.29, 0.918)
pt3dadd(-27.835, 227, -5.3, 0.816)
pt3dadd(-27.811, 227.118, -5.31, 0.716)
pt3dadd(-27.786, 227.179, -5.387, 0.66)
pt3dadd(-27.76, 227.234, -5.473, 0.612)
pt3dadd(-27.738, 227.287, -5.561, 0.566)
pt3dadd(-27.724, 227.333, -5.653, 0.53)
pt3dadd(-27.716, 227.395, -5.732, 0.498)
pt3dadd(-27.727, 227.504, -5.773, 0.48)
pt3dadd(-27.739, 227.617, -5.757, 0.492)
pt3dadd(-27.759, 227.726, -5.719, 0.578)
pt3dadd(-27.805, 227.833, -5.699, 0.654)
pt3dadd(-27.878, 227.922, -5.674, 0.694)
pt3dadd(-27.962, 228.005, -5.653, 0.708)
pt3dadd(-28.048, 228.084, -5.636, 0.714)
pt3dadd(-28.135, 228.166, -5.618, 0.718)
}
}
proc shape3d_130() {
dend_5[9] { pt3dadd(-28.221, 228.246, -5.601, 0.724)
pt3dadd(-28.3, 228.33, -5.575, 0.732)
pt3dadd(-28.361, 228.419, -5.533, 0.746)
pt3dadd(-28.406, 228.521, -5.501, 0.748)
pt3dadd(-28.435, 228.635, -5.482, 0.736)
pt3dadd(-28.466, 228.74, -5.452, 0.722)
pt3dadd(-28.503, 228.816, -5.38, 0.696)
pt3dadd(-28.561, 228.88, -5.319, 0.674)
pt3dadd(-28.662, 228.922, -5.276, 0.66)
pt3dadd(-28.743, 228.983, -5.228, 0.658)
pt3dadd(-28.805, 229.062, -5.175, 0.666)
pt3dadd(-28.868, 229.142, -5.122, 0.674)
pt3dadd(-28.932, 229.234, -5.09, 0.706)
pt3dadd(-28.995, 229.334, -5.074, 0.756)
pt3dadd(-29.066, 229.412, -5.034, 0.878)
pt3dadd(-29.169, 229.47, -5.016, 0.918)
pt3dadd(-29.272, 229.526, -5, 0.954)
pt3dadd(-29.381, 229.577, -5, 0.954)
pt3dadd(-29.491, 229.627, -5, 0.954)
pt3dadd(-29.567, 229.717, -5, 0.924)
pt3dadd(-29.638, 229.813, -5, 0.89)
pt3dadd(-29.671, 229.924, -5, 0.868)
pt3dadd(-29.683, 230.044, -5, 0.852)
pt3dadd(-29.696, 230.162, -5, 0.834)
pt3dadd(-29.716, 230.281, -5, 0.832)
pt3dadd(-29.74, 230.4, -5, 0.838)
pt3dadd(-29.764, 230.516, -5, 0.844)
pt3dadd(-29.788, 230.635, -5, 0.848)
pt3dadd(-29.819, 230.744, -5, 0.856)
pt3dadd(-29.934, 230.779, -5, 0.89)
pt3dadd(-30.049, 230.814, -5, 0.922)
pt3dadd(-30.132, 230.896, -5, 0.93)
pt3dadd(-30.207, 230.989, -5, 0.93)
pt3dadd(-30.281, 231.084, -5, 0.93)
pt3dadd(-30.396, 231.088, -4.997, 0.896)
pt3dadd(-30.516, 231.078, -4.992, 0.862)
pt3dadd(-30.635, 231.071, -4.986, 0.812)
pt3dadd(-30.743, 231.078, -4.955, 0.698)
pt3dadd(-30.837, 231.137, -4.915, 0.68)
pt3dadd(-30.93, 231.196, -4.874, 0.662)
pt3dadd(-31.023, 231.253, -4.834, 0.644)
pt3dadd(-31.114, 231.316, -4.797, 0.626)
pt3dadd(-31.186, 231.407, -4.774, 0.622)
pt3dadd(-31.259, 231.499, -4.752, 0.616)
pt3dadd(-31.332, 231.59, -4.729, 0.61)
pt3dadd(-31.404, 231.683, -4.707, 0.604)
pt3dadd(-31.44, 231.792, -4.692, 0.602)
pt3dadd(-31.459, 231.91, -4.681, 0.602)
pt3dadd(-31.478, 232.027, -4.67, 0.602)
pt3dadd(-31.497, 232.146, -4.659, 0.602)
pt3dadd(-31.516, 232.262, -4.648, 0.602)
pt3dadd(-31.535, 232.38, -4.637, 0.602)
pt3dadd(-31.565, 232.493, -4.616, 0.596)
pt3dadd(-31.6, 232.603, -4.589, 0.586)
pt3dadd(-31.636, 232.714, -4.562, 0.576)
pt3dadd(-31.672, 232.823, -4.536, 0.566)
pt3dadd(-31.708, 232.933, -4.509, 0.556)
pt3dadd(-31.751, 233.042, -4.497, 0.538)
pt3dadd(-31.798, 233.154, -4.492, 0.516)
pt3dadd(-31.834, 233.264, -4.477, 0.498)
pt3dadd(-31.851, 233.375, -4.442, 0.488)
pt3dadd(-31.873, 233.486, -4.411, 0.48)
pt3dadd(-31.926, 233.594, -4.406, 0.514)
pt3dadd(-31.979, 233.701, -4.401, 0.548)
pt3dadd(-32.053, 233.796, -4.4, 0.592)
pt3dadd(-32.131, 233.886, -4.4, 0.638)
pt3dadd(-32.237, 233.928, -4.4, 0.696)
pt3dadd(-32.355, 233.948, -4.4, 0.756)
pt3dadd(-32.473, 233.97, -4.4, 0.798)
pt3dadd(-32.592, 233.99, -4.4, 0.84)
pt3dadd(-32.711, 234.002, -4.4, 0.872)
pt3dadd(-32.831, 234.011, -4.4, 0.902)
pt3dadd(-32.946, 234.024, -4.399, 0.93)
pt3dadd(-32.988, 234.136, -4.384, 0.954)
pt3dadd(-33.029, 234.247, -4.369, 0.976)
pt3dadd(-33.121, 234.304, -4.336, 0.956)
pt3dadd(-33.221, 234.352, -4.3, 0.928)
pt3dadd(-33.299, 234.443, -4.292, 0.874)
pt3dadd(-33.379, 234.529, -4.276, 0.84)
pt3dadd(-33.461, 234.616, -4.256, 0.816)
pt3dadd(-33.542, 234.7, -4.236, 0.794)
pt3dadd(-33.623, 234.785, -4.216, 0.772)
pt3dadd(-33.7, 234.874, -4.201, 0.748)
pt3dadd(-33.76, 234.977, -4.206, 0.726)
pt3dadd(-33.82, 235.081, -4.212, 0.702)
pt3dadd(-33.857, 235.186, -4.251, 0.69)
pt3dadd(-33.896, 235.289, -4.289, 0.678)
pt3dadd(-33.965, 235.386, -4.289, 0.69)
pt3dadd(-34.034, 235.484, -4.289, 0.702)
pt3dadd(-34.13, 235.536, -4.246, 0.716)
pt3dadd(-34.221, 235.594, -4.208, 0.736)
pt3dadd(-34.291, 235.688, -4.191, 0.774)
pt3dadd(-34.349, 235.793, -4.178, 0.778)
pt3dadd(-34.405, 235.897, -4.165, 0.778)
pt3dadd(-34.461, 236.003, -4.153, 0.778)
pt3dadd(-34.517, 236.108, -4.141, 0.778)
pt3dadd(-34.565, 236.215, -4.144, 0.778)
pt3dadd(-34.601, 236.324, -4.171, 0.778)
pt3dadd(-34.637, 236.435, -4.198, 0.778)
pt3dadd(-34.673, 236.544, -4.225, 0.778)
pt3dadd(-34.709, 236.653, -4.252, 0.778)
pt3dadd(-34.752, 236.762, -4.267, 0.776)
pt3dadd(-34.804, 236.872, -4.267, 0.77)
pt3dadd(-34.856, 236.98, -4.267, 0.766)
pt3dadd(-34.908, 237.088, -4.267, 0.76)
pt3dadd(-34.96, 237.196, -4.267, 0.756)
pt3dadd(-35.024, 237.281, -4.238, 0.754)
pt3dadd(-35.1, 237.342, -4.18, 0.754)
pt3dadd(-35.188, 237.413, -4.149, 0.754)
pt3dadd(-35.261, 237.497, -4.144, 0.75)
pt3dadd(-35.298, 237.604, -4.176, 0.738)
pt3dadd(-35.34, 237.712, -4.201, 0.728)
pt3dadd(-35.393, 237.818, -4.206, 0.728)
pt3dadd(-35.446, 237.926, -4.212, 0.728)
pt3dadd(-35.466, 238.036, -4.25, 0.746)
pt3dadd(-35.497, 238.146, -4.278, 0.764)
pt3dadd(-35.535, 238.258, -4.297, 0.784)
pt3dadd(-35.572, 238.368, -4.317, 0.804)
pt3dadd(-35.61, 238.48, -4.337, 0.824)
pt3dadd(-35.648, 238.591, -4.356, 0.842)
pt3dadd(-35.695, 238.699, -4.374, 0.87)
pt3dadd(-35.751, 238.804, -4.39, 0.906)
pt3dadd(-35.792, 238.913, -4.4, 0.932)
pt3dadd(-35.81, 239.032, -4.4, 0.942)
pt3dadd(-35.827, 239.15, -4.4, 0.95)
pt3dadd(-35.87, 239.258, -4.4, 0.938)
pt3dadd(-35.941, 239.354, -4.4, 0.904)
pt3dadd(-36.026, 239.434, -4.4, 0.862)
pt3dadd(-36.14, 239.467, -4.4, 0.808)
pt3dadd(-36.255, 239.504, -4.4, 0.752)
pt3dadd(-36.33, 239.598, -4.4, 0.666)
pt3dadd(-36.399, 239.695, -4.4, 0.62)
pt3dadd(-36.463, 239.797, -4.4, 0.606)
pt3dadd(-36.528, 239.898, -4.4, 0.59)
pt3dadd(-36.592, 240, -4.4, 0.576)
pt3dadd(-36.657, 240.1, -4.4, 0.562)
pt3dadd(-36.717, 240.203, -4.393, 0.552)
pt3dadd(-36.767, 240.31, -4.372, 0.552)
pt3dadd(-36.817, 240.415, -4.351, 0.552)
pt3dadd(-36.867, 240.521, -4.331, 0.552)
pt3dadd(-36.918, 240.628, -4.31, 0.552)
pt3dadd(-36.971, 240.733, -4.3, 0.56)
pt3dadd(-37.027, 240.84, -4.3, 0.574)
pt3dadd(-37.083, 240.946, -4.3, 0.588)
pt3dadd(-37.139, 241.052, -4.3, 0.602)
pt3dadd(-37.195, 241.158, -4.3, 0.616)
pt3dadd(-37.245, 241.265, -4.304, 0.632)
pt3dadd(-37.263, 241.379, -4.333, 0.664)
pt3dadd(-37.281, 241.492, -4.362, 0.698)
pt3dadd(-37.324, 241.601, -4.38, 0.712)
pt3dadd(-37.373, 241.709, -4.395, 0.724)
pt3dadd(-37.451, 241.798, -4.4, 0.712)
pt3dadd(-37.541, 241.877, -4.4, 0.688)
pt3dadd(-37.648, 241.908, -4.4, 0.668)
pt3dadd(-37.768, 241.906, -4.4, 0.65)
pt3dadd(-37.888, 241.902, -4.4, 0.632)
pt3dadd(-37.995, 241.949, -4.4, 0.628)
pt3dadd(-38.099, 242.009, -4.4, 0.628)
pt3dadd(-38.203, 242.07, -4.4, 0.628)
pt3dadd(-38.301, 242.136, -4.401, 0.63)
pt3dadd(-38.374, 242.231, -4.406, 0.642)
pt3dadd(-38.444, 242.327, -4.414, 0.66)
pt3dadd(-38.493, 242.429, -4.439, 0.708)
pt3dadd(-38.573, 242.518, -4.453, 0.718)
pt3dadd(-38.652, 242.605, -4.468, 0.73)
pt3dadd(-38.732, 242.693, -4.483, 0.74)
pt3dadd(-38.811, 242.78, -4.497, 0.752)
pt3dadd(-38.879, 242.88, -4.5, 0.768)
pt3dadd(-38.943, 242.98, -4.5, 0.788)
pt3dadd(-39.008, 243.082, -4.5, 0.808)
pt3dadd(-39.072, 243.182, -4.5, 0.826)
pt3dadd(-39.137, 243.284, -4.5, 0.846)
pt3dadd(-39.171, 243.396, -4.5, 0.86)
pt3dadd(-39.183, 243.516, -4.5, 0.87)
pt3dadd(-39.196, 243.635, -4.5, 0.882)
pt3dadd(-39.209, 243.755, -4.5, 0.892)
pt3dadd(-39.221, 243.874, -4.5, 0.904)
pt3dadd(-39.234, 243.994, -4.5, 0.914)
pt3dadd(-39.246, 244.112, -4.5, 0.924)
pt3dadd(-39.259, 244.232, -4.5, 0.944)
pt3dadd(-39.271, 244.351, -4.5, 0.968)
pt3dadd(-39.284, 244.471, -4.5, 0.994)
pt3dadd(-39.296, 244.59, -4.5, 1.004)
pt3dadd(-39.309, 244.709, -4.5, 1.004)
pt3dadd(-39.321, 244.829, -4.5, 1.004)
pt3dadd(-39.357, 244.94, -4.5, 1.004)
pt3dadd(-39.408, 245.05, -4.5, 1.004)
pt3dadd(-39.466, 245.154, -4.5, 0.996)
pt3dadd(-39.544, 245.245, -4.5, 0.962)
pt3dadd(-39.621, 245.336, -4.5, 0.926)
pt3dadd(-39.696, 245.431, -4.5, 0.892)
pt3dadd(-39.767, 245.525, -4.488, 0.868)
pt3dadd(-39.836, 245.622, -4.468, 0.852)
pt3dadd(-39.904, 245.717, -4.449, 0.836)
pt3dadd(-39.973, 245.813, -4.429, 0.82)
pt3dadd(-40.039, 245.909, -4.411, 0.802)
pt3dadd(-40.056, 246.028, -4.407, 0.784)
pt3dadd(-40.073, 246.146, -4.403, 0.766)
pt3dadd(-40.1, 246.263, -4.399, 0.744)
pt3dadd(-40.153, 246.37, -4.394, 0.71)
}
}
proc shape3d_131() {
dend_5[9] { pt3dadd(-40.206, 246.476, -4.388, 0.678)
pt3dadd(-40.223, 246.588, -4.353, 0.644)
pt3dadd(-40.241, 246.7, -4.319, 0.61)
pt3dadd(-40.258, 246.802, -4.27, 0.574)
pt3dadd(-40.275, 246.902, -4.217, 0.54)
pt3dadd(-40.351, 246.932, -4.169, 0.504)
pt3dadd(-40.457, 246.929, -4.122, 0.468)
pt3dadd(-40.57, 246.919, -4.107, 0.408)
pt3dadd(-40.686, 246.906, -4.128, 0.338)
pt3dadd(-40.789, 246.917, -4.176, 0.308)
pt3dadd(-40.86, 246.979, -4.231, 0.374)
pt3dadd(-40.886, 247.082, -4.275, 0.482)
pt3dadd(-40.898, 247.199, -4.295, 0.57)
pt3dadd(-40.911, 247.319, -4.3, 0.634)
pt3dadd(-40.923, 247.436, -4.293, 0.67)
pt3dadd(-40.948, 247.549, -4.267, 0.654)
pt3dadd(-41.037, 247.597, -4.219, 0.554)
pt3dadd(-41.144, 247.648, -4.211, 0.508)
pt3dadd(-41.25, 247.703, -4.211, 0.482)
pt3dadd(-41.315, 247.79, -4.243, 0.478)
pt3dadd(-41.368, 247.885, -4.285, 0.478)
pt3dadd(-41.443, 247.975, -4.302, 0.56)
pt3dadd(-41.532, 248.054, -4.311, 0.586)
pt3dadd(-41.622, 248.134, -4.32, 0.612)
pt3dadd(-41.712, 248.213, -4.329, 0.638)
pt3dadd(-41.796, 248.296, -4.325, 0.67)
pt3dadd(-41.874, 248.386, -4.308, 0.71)
pt3dadd(-41.939, 248.479, -4.318, 0.728)
pt3dadd(-41.992, 248.578, -4.353, 0.728)
pt3dadd(-42.017, 248.69, -4.375, 0.722)
pt3dadd(-42.024, 248.809, -4.387, 0.712)
pt3dadd(-42.03, 248.928, -4.4, 0.702)
pt3dadd(-42.003, 249.044, -4.4, 0.67)
pt3dadd(-41.975, 249.161, -4.4, 0.638)
pt3dadd(-41.969, 249.278, -4.386, 0.586)
pt3dadd(-41.974, 249.395, -4.365, 0.524)
pt3dadd(-41.991, 249.509, -4.336, 0.468)
pt3dadd(-42.009, 249.623, -4.307, 0.414)
pt3dadd(-42.052, 249.731, -4.3, 0.378)
pt3dadd(-42.104, 249.84, -4.3, 0.346)
pt3dadd(-42.157, 249.947, -4.306, 0.322)
pt3dadd(-42.213, 250.051, -4.323, 0.31)
pt3dadd(-42.271, 250.152, -4.345, 0.314)
pt3dadd(-42.331, 250.247, -4.381, 0.356)
pt3dadd(-42.418, 250.307, -4.4, 0.434)
pt3dadd(-42.536, 250.327, -4.4, 0.558)
pt3dadd(-42.602, 250.421, -4.4, 0.628)
pt3dadd(-42.658, 250.526, -4.4, 0.69)
pt3dadd(-42.714, 250.632, -4.4, 0.75)
pt3dadd(-42.77, 250.738, -4.4, 0.81)
pt3dadd(-42.825, 250.844, -4.4, 0.872)
pt3dadd(-42.883, 250.95, -4.4, 0.928)
pt3dadd(-42.942, 251.054, -4.4, 0.98)
pt3dadd(-43.001, 251.159, -4.4, 1.032)
pt3dadd(-43.059, 251.264, -4.4, 1.084)
pt3dadd(-43.118, 251.369, -4.4, 1.136)
pt3dadd(-43.185, 251.461, -4.4, 1.188)
pt3dadd(-43.304, 251.474, -4.4, 1.248)
pt3dadd(-43.424, 251.489, -4.4, 1.308)
pt3dadd(-43.513, 251.554, -4.4, 1.33)
pt3dadd(-43.584, 251.651, -4.4, 1.33)
pt3dadd(-43.636, 251.756, -4.4, 1.318)
pt3dadd(-43.663, 251.873, -4.4, 1.29)
pt3dadd(-43.69, 251.99, -4.4, 1.262)
pt3dadd(-43.731, 252.102, -4.4, 1.202)
pt3dadd(-43.776, 252.215, -4.4, 1.13)
pt3dadd(-43.821, 252.325, -4.4, 1.046)
pt3dadd(-43.865, 252.437, -4.4, 0.936)
pt3dadd(-43.923, 252.539, -4.415, 0.884)
pt3dadd(-43.985, 252.637, -4.437, 0.858)
pt3dadd(-44.049, 252.737, -4.459, 0.83)
pt3dadd(-44.112, 252.835, -4.481, 0.802)
pt3dadd(-44.179, 252.931, -4.5, 0.778)
pt3dadd(-44.278, 252.997, -4.5, 0.768)
pt3dadd(-44.377, 253.066, -4.5, 0.756)
pt3dadd(-44.476, 253.134, -4.5, 0.746)
pt3dadd(-44.575, 253.202, -4.5, 0.736)
pt3dadd(-44.668, 253.276, -4.5, 0.726)
pt3dadd(-44.727, 253.38, -4.5, 0.718)
pt3dadd(-44.785, 253.483, -4.5, 0.708)
pt3dadd(-44.844, 253.589, -4.5, 0.698)
pt3dadd(-44.903, 253.693, -4.5, 0.69)
pt3dadd(-44.962, 253.799, -4.5, 0.68)
pt3dadd(-45.021, 253.903, -4.5, 0.662)
pt3dadd(-45.079, 254.008, -4.5, 0.644)
pt3dadd(-45.138, 254.112, -4.5, 0.624)
pt3dadd(-45.197, 254.216, -4.5, 0.606)
pt3dadd(-45.256, 254.321, -4.5, 0.588)
pt3dadd(-45.31, 254.426, -4.51, 0.572)
pt3dadd(-45.36, 254.532, -4.531, 0.562)
pt3dadd(-45.411, 254.639, -4.552, 0.552)
pt3dadd(-45.461, 254.744, -4.573, 0.542)
pt3dadd(-45.511, 254.85, -4.594, 0.53)
pt3dadd(-45.56, 254.96, -4.6, 0.522)
pt3dadd(-45.607, 255.07, -4.6, 0.512)
pt3dadd(-45.654, 255.18, -4.6, 0.504)
pt3dadd(-45.702, 255.29, -4.6, 0.494)
pt3dadd(-45.749, 255.401, -4.6, 0.486)
pt3dadd(-45.8, 255.508, -4.6, 0.478)
pt3dadd(-45.885, 255.593, -4.6, 0.49)
pt3dadd(-45.97, 255.678, -4.6, 0.502)
pt3dadd(-46.016, 255.79, -4.6, 0.502)
pt3dadd(-46.06, 255.9, -4.6, 0.502)
pt3dadd(-46.109, 256.006, -4.582, 0.516)
pt3dadd(-46.162, 256.105, -4.547, 0.542)
pt3dadd(-46.189, 256.214, -4.516, 0.572)
pt3dadd(-46.201, 256.328, -4.489, 0.602)
pt3dadd(-46.213, 256.442, -4.458, 0.66)
pt3dadd(-46.224, 256.548, -4.413, 0.828)
pt3dadd(-46.236, 256.655, -4.367, 0.93)
pt3dadd(-46.247, 256.759, -4.32, 1.002)
pt3dadd(-46.258, 256.865, -4.273, 1.076)
pt3dadd(-46.269, 256.969, -4.225, 1.148)
pt3dadd(-46.28, 257.075, -4.178, 1.222)
pt3dadd(-46.306, 257.172, -4.126, 1.304)
pt3dadd(-46.346, 257.263, -4.07, 1.396)
pt3dadd(-46.387, 257.354, -4.014, 1.488)
pt3dadd(-46.427, 257.446, -3.958, 1.58)
pt3dadd(-46.471, 257.537, -3.907, 1.67)
pt3dadd(-46.537, 257.634, -3.885, 1.748)
pt3dadd(-46.603, 257.723, -3.853, 1.796)
pt3dadd(-46.671, 257.785, -3.789, 1.738)
pt3dadd(-46.711, 257.837, -3.711, 1.648)
pt3dadd(-46.721, 257.878, -3.617, 1.526)
pt3dadd(-46.732, 257.934, -3.537, 1.404)
pt3dadd(-46.744, 258.047, -3.504, 1.288)
pt3dadd(-46.756, 258.158, -3.471, 1.17)
pt3dadd(-46.725, 258.222, -3.395, 1.092)
pt3dadd(-46.687, 258.278, -3.312, 1.018)
pt3dadd(-46.65, 258.334, -3.229, 0.946)
pt3dadd(-46.606, 258.39, -3.149, 0.864)
pt3dadd(-46.56, 258.448, -3.07, 0.782)
pt3dadd(-46.557, 258.532, -2.999, 0.752)
pt3dadd(-46.556, 258.617, -2.928, 0.724)
pt3dadd(-46.537, 258.704, -2.869, 0.698)
pt3dadd(-46.471, 258.797, -2.837, 0.68)
pt3dadd(-46.415, 258.883, -2.858, 0.712)
pt3dadd(-46.376, 258.991, -2.827, 0.744)
pt3dadd(-46.337, 259.099, -2.797, 0.774)
pt3dadd(-46.298, 259.206, -2.766, 0.806)
pt3dadd(-46.274, 259.312, -2.729, 0.842)
pt3dadd(-46.284, 259.411, -2.674, 0.886)
pt3dadd(-46.294, 259.512, -2.619, 0.93)
pt3dadd(-46.305, 259.61, -2.564, 0.976)
pt3dadd(-46.315, 259.711, -2.509, 1.02)
pt3dadd(-46.325, 259.806, -2.45, 1.068)
pt3dadd(-46.334, 259.886, -2.376, 1.122)
pt3dadd(-46.342, 259.966, -2.302, 1.178)
pt3dadd(-46.351, 260.047, -2.228, 1.234)
pt3dadd(-46.359, 260.128, -2.154, 1.29)
pt3dadd(-46.366, 260.191, -2.074, 1.344)
pt3dadd(-46.368, 260.212, -1.975, 1.392)
pt3dadd(-46.37, 260.231, -1.876, 1.44)
pt3dadd(-46.42, 260.299, -1.829, 1.448)
pt3dadd(-46.493, 260.39, -1.805, 1.434)
pt3dadd(-46.56, 260.49, -1.8, 1.37)
pt3dadd(-46.624, 260.591, -1.8, 1.292)
pt3dadd(-46.664, 260.699, -1.785, 1.222)
pt3dadd(-46.681, 260.813, -1.756, 1.156)
pt3dadd(-46.708, 260.922, -1.728, 1.084)
pt3dadd(-46.771, 261.02, -1.702, 0.986)
pt3dadd(-46.818, 261.128, -1.688, 0.966)
pt3dadd(-46.863, 261.239, -1.675, 0.952)
pt3dadd(-46.909, 261.348, -1.662, 0.936)
pt3dadd(-46.954, 261.458, -1.649, 0.922)
pt3dadd(-46.999, 261.568, -1.636, 0.908)
pt3dadd(-47.053, 261.667, -1.606, 0.81)
pt3dadd(-47.117, 261.76, -1.57, 0.71)
pt3dadd(-47.145, 261.859, -1.522, 0.678)
pt3dadd(-47.156, 261.967, -1.478, 0.662)
pt3dadd(-47.167, 262.073, -1.433, 0.602)
pt3dadd(-47.179, 262.189, -1.434, 0.5)
pt3dadd(-47.169, 262.261, -1.507, 0.422)
pt3dadd(-47.094, 262.29, -1.577, 0.328)
pt3dadd(-47.003, 262.355, -1.6, 0.252)
pt3dadd(-46.966, 262.468, -1.6, 0.258)
pt3dadd(-46.939, 262.585, -1.6, 0.28)
pt3dadd(-46.911, 262.702, -1.6, 0.302)
pt3dadd(-46.904, 262.816, -1.569, 0.336)
pt3dadd(-46.898, 262.93, -1.538, 0.372)
pt3dadd(-46.906, 263.044, -1.51, 0.428)
pt3dadd(-46.898, 263.164, -1.5, 0.452)
pt3dadd(-46.867, 263.279, -1.5, 0.452)
pt3dadd(-46.84, 263.395, -1.5, 0.452)
pt3dadd(-46.836, 263.515, -1.5, 0.452)
pt3dadd(-46.848, 263.634, -1.5, 0.452)
pt3dadd(-46.861, 263.754, -1.5, 0.452)
}
dend_5[10] {pt3dclear()
pt3dadd(-14.04, 211.056, -8.756, 1.104)
pt3dadd(-14.069, 211.103, -8.816, 1.092)
pt3dadd(-14.107, 211.164, -8.897, 1.074)
pt3dadd(-14.145, 211.224, -8.977, 1.058)
pt3dadd(-14.183, 211.284, -9.057, 1.04)
pt3dadd(-14.222, 211.345, -9.137, 1.024)
pt3dadd(-14.26, 211.405, -9.217, 1.006)
pt3dadd(-14.298, 211.466, -9.297, 0.99)
pt3dadd(-14.336, 211.528, -9.377, 0.972)
pt3dadd(-14.374, 211.588, -9.457, 0.956)
pt3dadd(-14.413, 211.649, -9.538, 0.938)
pt3dadd(-14.451, 211.71, -9.618, 0.922)
pt3dadd(-14.489, 211.771, -9.698, 0.904)
}
}
proc shape3d_132() {
dend_5[10] { pt3dadd(-14.607, 211.766, -9.7, 0.966)
pt3dadd(-14.727, 211.759, -9.7, 1.03)
pt3dadd(-14.847, 211.753, -9.7, 1.094)
pt3dadd(-14.966, 211.746, -9.7, 1.158)
pt3dadd(-15.086, 211.74, -9.7, 1.222)
pt3dadd(-15.206, 211.733, -9.7, 1.286)
pt3dadd(-15.324, 211.738, -9.7, 1.33)
pt3dadd(-15.44, 211.77, -9.7, 1.324)
pt3dadd(-15.555, 211.802, -9.7, 1.32)
pt3dadd(-15.671, 211.835, -9.7, 1.316)
pt3dadd(-15.786, 211.868, -9.7, 1.31)
pt3dadd(-15.902, 211.902, -9.7, 1.306)
pt3dadd(-15.983, 211.985, -9.716, 1.224)
pt3dadd(-16.062, 212.072, -9.733, 1.132)
pt3dadd(-16.175, 212.077, -9.762, 1.032)
pt3dadd(-16.289, 212.076, -9.792, 0.93)
pt3dadd(-16.406, 212.098, -9.8, 0.872)
pt3dadd(-16.522, 212.125, -9.8, 0.83)
pt3dadd(-16.64, 212.138, -9.795, 0.808)
pt3dadd(-16.758, 212.131, -9.782, 0.818)
pt3dadd(-16.877, 212.124, -9.769, 0.826)
pt3dadd(-16.975, 212.114, -9.716, 0.828)
pt3dadd(-17.075, 212.104, -9.663, 0.824)
pt3dadd(-17.186, 212.093, -9.626, 0.81)
pt3dadd(-17.297, 212.081, -9.589, 0.796)
pt3dadd(-17.408, 212.069, -9.552, 0.782)
pt3dadd(-17.519, 212.057, -9.515, 0.768)
pt3dadd(-17.629, 212.046, -9.478, 0.754)
pt3dadd(-17.739, 212.034, -9.438, 0.734)
pt3dadd(-17.849, 212.023, -9.399, 0.716)
pt3dadd(-17.958, 212.011, -9.359, 0.696)
pt3dadd(-18.068, 211.999, -9.319, 0.678)
pt3dadd(-18.177, 211.988, -9.28, 0.66)
pt3dadd(-18.285, 211.976, -9.236, 0.63)
pt3dadd(-18.399, 211.964, -9.208, 0.66)
pt3dadd(-18.514, 211.952, -9.18, 0.722)
pt3dadd(-18.624, 211.942, -9.144, 0.822)
pt3dadd(-18.739, 211.932, -9.124, 0.968)
pt3dadd(-18.833, 211.954, -9.171, 1.076)
pt3dadd(-18.861, 212.034, -9.239, 1.026)
pt3dadd(-18.883, 212.137, -9.284, 0.94)
pt3dadd(-18.936, 212.231, -9.323, 0.912)
pt3dadd(-18.99, 212.263, -9.403, 0.952)
pt3dadd(-19.038, 212.284, -9.492, 0.954)
pt3dadd(-19.088, 212.305, -9.582, 0.954)
pt3dadd(-19.177, 212.376, -9.594, 0.92)
pt3dadd(-19.27, 212.453, -9.599, 0.884)
pt3dadd(-19.386, 212.465, -9.6, 0.756)
pt3dadd(-19.498, 212.478, -9.634, 0.728)
pt3dadd(-19.609, 212.491, -9.669, 0.702)
pt3dadd(-19.721, 212.506, -9.705, 0.674)
pt3dadd(-19.833, 212.519, -9.74, 0.648)
pt3dadd(-19.944, 212.537, -9.765, 0.624)
pt3dadd(-20.058, 212.576, -9.757, 0.612)
pt3dadd(-20.171, 212.614, -9.748, 0.6)
pt3dadd(-20.285, 212.651, -9.74, 0.588)
pt3dadd(-20.397, 212.689, -9.74, 0.58)
pt3dadd(-20.502, 212.724, -9.779, 0.592)
pt3dadd(-20.607, 212.759, -9.817, 0.602)
pt3dadd(-20.712, 212.794, -9.855, 0.614)
pt3dadd(-20.818, 212.828, -9.893, 0.626)
pt3dadd(-20.917, 212.886, -9.919, 0.656)
pt3dadd(-21.016, 212.95, -9.942, 0.69)
pt3dadd(-21.114, 213.013, -9.964, 0.724)
pt3dadd(-21.212, 213.076, -9.987, 0.76)
pt3dadd(-21.272, 213.158, -10.02, 0.818)
pt3dadd(-21.283, 213.265, -10.064, 0.908)
pt3dadd(-21.307, 213.37, -10.1, 1.002)
pt3dadd(-21.378, 213.467, -10.1, 1.118)
pt3dadd(-21.45, 213.562, -10.1, 1.232)
pt3dadd(-21.567, 213.59, -10.1, 1.338)
pt3dadd(-21.683, 213.618, -10.1, 1.446)
pt3dadd(-21.802, 213.628, -10.1, 1.512)
pt3dadd(-21.922, 213.63, -10.1, 1.558)
pt3dadd(-22.042, 213.634, -10.1, 1.606)
pt3dadd(-22.162, 213.643, -10.1, 1.55)
pt3dadd(-22.281, 213.659, -10.1, 1.494)
pt3dadd(-22.398, 213.685, -10.1, 1.45)
pt3dadd(-22.515, 213.712, -10.1, 1.404)
pt3dadd(-22.632, 213.738, -10.1, 1.358)
pt3dadd(-22.749, 213.766, -10.1, 1.312)
pt3dadd(-22.866, 213.792, -10.1, 1.266)
pt3dadd(-22.969, 213.827, -10.135, 1.22)
pt3dadd(-23.068, 213.863, -10.183, 1.172)
pt3dadd(-23.167, 213.901, -10.23, 1.126)
pt3dadd(-23.266, 213.937, -10.277, 1.078)
pt3dadd(-23.37, 213.98, -10.3, 1.05)
pt3dadd(-23.48, 214.03, -10.3, 1.04)
pt3dadd(-23.59, 214.078, -10.3, 1.03)
pt3dadd(-23.7, 214.126, -10.3, 1.02)
pt3dadd(-23.81, 214.175, -10.3, 1.01)
pt3dadd(-23.911, 214.236, -10.3, 1.002)
pt3dadd(-24.001, 214.315, -10.3, 0.998)
pt3dadd(-24.09, 214.396, -10.3, 0.992)
pt3dadd(-24.18, 214.475, -10.3, 0.988)
pt3dadd(-24.269, 214.555, -10.3, 0.982)
pt3dadd(-24.365, 214.627, -10.3, 0.974)
pt3dadd(-24.468, 214.688, -10.3, 0.964)
pt3dadd(-24.571, 214.75, -10.3, 0.954)
pt3dadd(-24.674, 214.812, -10.3, 0.944)
pt3dadd(-24.777, 214.873, -10.3, 0.934)
pt3dadd(-24.88, 214.932, -10.31, 0.92)
pt3dadd(-24.982, 214.988, -10.332, 0.896)
pt3dadd(-25.085, 215.044, -10.355, 0.874)
pt3dadd(-25.188, 215.099, -10.378, 0.852)
pt3dadd(-25.291, 215.156, -10.4, 0.828)
pt3dadd(-25.364, 215.249, -10.414, 0.824)
pt3dadd(-25.437, 215.342, -10.429, 0.818)
pt3dadd(-25.51, 215.436, -10.443, 0.812)
pt3dadd(-25.584, 215.53, -10.458, 0.808)
pt3dadd(-25.662, 215.618, -10.47, 0.802)
pt3dadd(-25.748, 215.701, -10.48, 0.796)
pt3dadd(-25.834, 215.784, -10.489, 0.79)
pt3dadd(-25.92, 215.867, -10.499, 0.786)
pt3dadd(-26.006, 215.95, -10.508, 0.78)
pt3dadd(-26.079, 216.034, -10.543, 0.778)
pt3dadd(-26.146, 216.116, -10.588, 0.778)
pt3dadd(-26.213, 216.2, -10.634, 0.778)
pt3dadd(-26.28, 216.283, -10.679, 0.778)
pt3dadd(-26.355, 216.354, -10.727, 0.762)
pt3dadd(-26.439, 216.415, -10.779, 0.734)
pt3dadd(-26.537, 216.424, -10.831, 0.718)
pt3dadd(-26.639, 216.419, -10.884, 0.706)
pt3dadd(-26.701, 216.481, -10.938, 0.704)
pt3dadd(-26.746, 216.57, -10.992, 0.704)
pt3dadd(-26.855, 216.596, -11, 0.712)
pt3dadd(-26.974, 216.611, -11, 0.722)
pt3dadd(-27.087, 216.641, -11, 0.728)
pt3dadd(-27.188, 216.706, -11, 0.728)
pt3dadd(-27.3, 216.746, -10.987, 0.724)
pt3dadd(-27.412, 216.785, -10.973, 0.718)
pt3dadd(-27.525, 216.823, -10.96, 0.714)
pt3dadd(-27.637, 216.862, -10.946, 0.708)
pt3dadd(-27.749, 216.899, -10.935, 0.704)
pt3dadd(-27.862, 216.937, -10.95, 0.704)
pt3dadd(-27.974, 216.974, -10.966, 0.704)
pt3dadd(-28.087, 217.014, -10.981, 0.704)
pt3dadd(-28.199, 217.051, -10.997, 0.704)
pt3dadd(-28.299, 217.114, -11, 0.714)
pt3dadd(-28.396, 217.184, -11, 0.73)
pt3dadd(-28.493, 217.255, -11, 0.746)
pt3dadd(-28.59, 217.327, -11, 0.76)
pt3dadd(-28.687, 217.398, -11, 0.776)
pt3dadd(-28.736, 217.504, -11, 0.802)
pt3dadd(-28.774, 217.616, -11, 0.834)
pt3dadd(-28.833, 217.714, -11, 0.864)
pt3dadd(-28.939, 217.771, -11, 0.9)
pt3dadd(-29.045, 217.828, -11, 0.93)
pt3dadd(-29.154, 217.877, -11, 0.93)
pt3dadd(-29.263, 217.926, -11, 0.93)
pt3dadd(-29.382, 217.921, -11, 0.92)
pt3dadd(-29.502, 217.912, -11, 0.912)
pt3dadd(-29.621, 217.908, -11.001, 0.902)
pt3dadd(-29.733, 217.95, -11.01, 0.874)
pt3dadd(-29.845, 217.992, -11.02, 0.844)
pt3dadd(-29.957, 218.034, -11.029, 0.816)
pt3dadd(-30.052, 218.094, -11.055, 0.78)
pt3dadd(-30.135, 218.168, -11.092, 0.736)
pt3dadd(-30.228, 218.239, -11.086, 0.758)
pt3dadd(-30.332, 218.294, -11.066, 0.786)
pt3dadd(-30.436, 218.348, -11.046, 0.814)
pt3dadd(-30.54, 218.404, -11.026, 0.842)
pt3dadd(-30.644, 218.458, -11.007, 0.87)
pt3dadd(-30.743, 218.524, -11, 0.902)
pt3dadd(-30.84, 218.594, -11, 0.938)
pt3dadd(-30.937, 218.666, -11, 0.974)
pt3dadd(-31.034, 218.737, -11, 1.008)
pt3dadd(-31.13, 218.808, -11, 1.044)
pt3dadd(-31.24, 218.851, -11, 1.062)
pt3dadd(-31.356, 218.884, -11, 1.07)
pt3dadd(-31.471, 218.916, -11, 1.08)
pt3dadd(-31.587, 218.95, -11, 1.09)
pt3dadd(-31.702, 218.983, -11, 1.098)
pt3dadd(-31.817, 219.018, -11, 1.102)
pt3dadd(-31.929, 219.06, -11, 1.09)
pt3dadd(-32.04, 219.104, -11, 1.076)
pt3dadd(-32.142, 219.168, -11, 1.028)
pt3dadd(-32.243, 219.234, -11, 0.982)
pt3dadd(-32.33, 219.271, -11.059, 0.952)
pt3dadd(-32.408, 219.308, -11.126, 0.924)
pt3dadd(-32.446, 219.344, -11.216, 0.9)
pt3dadd(-32.497, 219.383, -11.289, 0.876)
pt3dadd(-32.609, 219.426, -11.293, 0.862)
pt3dadd(-32.721, 219.469, -11.296, 0.848)
pt3dadd(-32.833, 219.514, -11.299, 0.834)
pt3dadd(-32.929, 219.578, -11.3, 0.816)
pt3dadd(-33.013, 219.665, -11.3, 0.792)
pt3dadd(-33.089, 219.757, -11.3, 0.792)
pt3dadd(-33.178, 219.834, -11.3, 0.818)
pt3dadd(-33.279, 219.898, -11.3, 0.838)
pt3dadd(-33.38, 219.964, -11.3, 0.858)
pt3dadd(-33.481, 220.027, -11.3, 0.878)
pt3dadd(-33.582, 220.093, -11.3, 0.898)
pt3dadd(-33.689, 220.146, -11.3, 0.918)
pt3dadd(-33.799, 220.194, -11.3, 0.938)
pt3dadd(-33.909, 220.243, -11.3, 0.956)
pt3dadd(-34.019, 220.292, -11.3, 0.976)
pt3dadd(-34.128, 220.339, -11.3, 0.996)
pt3dadd(-34.237, 220.386, -11.312, 1.004)
pt3dadd(-34.345, 220.432, -11.335, 1.004)
}
}
proc shape3d_133() {
dend_5[10] { pt3dadd(-34.454, 220.476, -11.357, 1.004)
pt3dadd(-34.562, 220.522, -11.379, 1.004)
pt3dadd(-34.669, 220.566, -11.4, 1.002)
pt3dadd(-34.759, 220.645, -11.4, 0.956)
pt3dadd(-34.85, 220.724, -11.4, 0.908)
pt3dadd(-34.94, 220.804, -11.4, 0.85)
pt3dadd(-35.03, 220.883, -11.4, 0.792)
pt3dadd(-35.135, 220.939, -11.4, 0.752)
pt3dadd(-35.244, 220.988, -11.4, 0.718)
pt3dadd(-35.36, 221.01, -11.4, 0.708)
pt3dadd(-35.48, 221.012, -11.4, 0.718)
pt3dadd(-35.6, 221.015, -11.4, 0.728)
pt3dadd(-35.718, 221.033, -11.4, 0.798)
pt3dadd(-35.836, 221.054, -11.4, 0.86)
pt3dadd(-35.954, 221.078, -11.4, 0.882)
pt3dadd(-36.072, 221.102, -11.4, 0.904)
pt3dadd(-36.189, 221.125, -11.4, 0.928)
pt3dadd(-36.307, 221.149, -11.4, 0.95)
pt3dadd(-36.425, 221.173, -11.4, 0.972)
pt3dadd(-36.541, 221.203, -11.4, 0.982)
pt3dadd(-36.656, 221.236, -11.4, 0.988)
pt3dadd(-36.772, 221.268, -11.4, 0.992)
pt3dadd(-36.887, 221.302, -11.4, 0.996)
pt3dadd(-37.002, 221.334, -11.4, 1.002)
pt3dadd(-37.113, 221.376, -11.405, 0.996)
pt3dadd(-37.214, 221.44, -11.419, 0.968)
pt3dadd(-37.315, 221.502, -11.434, 0.94)
pt3dadd(-37.415, 221.566, -11.448, 0.914)
pt3dadd(-37.516, 221.628, -11.463, 0.886)
pt3dadd(-37.614, 221.694, -11.48, 0.84)
pt3dadd(-37.712, 221.76, -11.497, 0.788)
pt3dadd(-37.777, 221.858, -11.5, 0.752)
pt3dadd(-37.835, 221.963, -11.5, 0.718)
pt3dadd(-37.908, 222.055, -11.509, 0.696)
pt3dadd(-37.993, 222.138, -11.527, 0.682)
pt3dadd(-38.061, 222.182, -11.586, 0.646)
pt3dadd(-38.119, 222.204, -11.672, 0.594)
pt3dadd(-38.155, 222.287, -11.718, 0.568)
pt3dadd(-38.181, 222.4, -11.745, 0.556)
pt3dadd(-38.207, 222.511, -11.772, 0.542)
pt3dadd(-38.233, 222.624, -11.799, 0.528)
pt3dadd(-38.296, 222.726, -11.8, 0.528)
pt3dadd(-38.361, 222.827, -11.8, 0.528)
pt3dadd(-38.436, 222.92, -11.8, 0.558)
pt3dadd(-38.516, 223.009, -11.8, 0.602)
pt3dadd(-38.595, 223.099, -11.8, 0.646)
pt3dadd(-38.705, 223.144, -11.8, 0.7)
pt3dadd(-38.82, 223.178, -11.8, 0.754)
pt3dadd(-38.92, 223.237, -11.8, 0.798)
pt3dadd(-39.009, 223.319, -11.8, 0.834)
pt3dadd(-39.098, 223.399, -11.8, 0.868)
pt3dadd(-39.135, 223.507, -11.8, 0.878)
pt3dadd(-39.152, 223.626, -11.8, 0.878)
pt3dadd(-39.169, 223.745, -11.8, 0.878)
pt3dadd(-39.238, 223.838, -11.8, 0.878)
pt3dadd(-39.318, 223.93, -11.8, 0.878)
pt3dadd(-39.398, 224.018, -11.8, 0.878)
pt3dadd(-39.513, 224.048, -11.8, 0.9)
pt3dadd(-39.63, 224.076, -11.8, 0.92)
pt3dadd(-39.748, 224.088, -11.8, 0.98)
pt3dadd(-39.858, 224.131, -11.8, 1.004)
pt3dadd(-39.963, 224.19, -11.8, 1.004)
pt3dadd(-40.067, 224.248, -11.8, 1.004)
pt3dadd(-40.172, 224.306, -11.8, 1.004)
pt3dadd(-40.277, 224.364, -11.8, 1.004)
pt3dadd(-40.391, 224.396, -11.8, 0.976)
pt3dadd(-40.509, 224.418, -11.8, 0.934)
pt3dadd(-40.628, 224.435, -11.8, 0.894)
pt3dadd(-40.748, 224.443, -11.8, 0.856)
pt3dadd(-40.867, 224.45, -11.8, 0.816)
pt3dadd(-40.974, 224.486, -11.776, 0.794)
pt3dadd(-41.075, 224.534, -11.739, 0.78)
pt3dadd(-41.171, 224.59, -11.702, 0.778)
pt3dadd(-41.266, 224.647, -11.664, 0.776)
pt3dadd(-41.342, 224.72, -11.617, 0.71)
pt3dadd(-41.434, 224.795, -11.609, 0.676)
pt3dadd(-41.527, 224.872, -11.607, 0.644)
pt3dadd(-41.621, 224.947, -11.604, 0.614)
pt3dadd(-41.714, 225.022, -11.602, 0.582)
pt3dadd(-41.807, 225.097, -11.6, 0.552)
pt3dadd(-41.91, 225.16, -11.6, 0.522)
pt3dadd(-42.013, 225.221, -11.6, 0.492)
pt3dadd(-42.116, 225.282, -11.6, 0.462)
pt3dadd(-42.219, 225.343, -11.6, 0.432)
pt3dadd(-42.322, 225.406, -11.6, 0.402)
pt3dadd(-42.421, 225.473, -11.6, 0.392)
pt3dadd(-42.52, 225.54, -11.6, 0.382)
pt3dadd(-42.619, 225.608, -11.6, 0.372)
pt3dadd(-42.718, 225.677, -11.6, 0.362)
pt3dadd(-42.816, 225.744, -11.601, 0.352)
pt3dadd(-42.9, 225.828, -11.618, 0.352)
pt3dadd(-42.983, 225.913, -11.635, 0.352)
pt3dadd(-43.066, 225.997, -11.653, 0.352)
pt3dadd(-43.149, 226.081, -11.67, 0.352)
pt3dadd(-43.222, 226.162, -11.708, 0.358)
pt3dadd(-43.286, 226.24, -11.762, 0.37)
pt3dadd(-43.349, 226.319, -11.816, 0.382)
pt3dadd(-43.413, 226.396, -11.87, 0.396)
pt3dadd(-43.479, 226.478, -11.916, 0.414)
pt3dadd(-43.547, 226.567, -11.953, 0.442)
pt3dadd(-43.634, 226.642, -11.978, 0.476)
pt3dadd(-43.732, 226.708, -11.995, 0.516)
pt3dadd(-43.821, 226.786, -11.988, 0.554)
pt3dadd(-43.906, 226.867, -11.97, 0.594)
pt3dadd(-44.013, 226.896, -11.941, 0.612)
pt3dadd(-44.125, 226.91, -11.909, 0.624)
pt3dadd(-44.223, 226.968, -11.9, 0.614)
pt3dadd(-44.317, 227.046, -11.9, 0.6)
pt3dadd(-44.408, 227.122, -11.9, 0.59)
pt3dadd(-44.5, 227.198, -11.9, 0.58)
pt3dadd(-44.592, 227.276, -11.9, 0.57)
pt3dadd(-44.684, 227.353, -11.9, 0.558)
pt3dadd(-44.781, 227.424, -11.9, 0.552)
pt3dadd(-44.886, 227.482, -11.9, 0.552)
pt3dadd(-44.991, 227.54, -11.9, 0.552)
pt3dadd(-45.095, 227.598, -11.9, 0.552)
pt3dadd(-45.2, 227.657, -11.9, 0.552)
pt3dadd(-45.294, 227.729, -11.9, 0.56)
pt3dadd(-45.365, 227.825, -11.9, 0.584)
pt3dadd(-45.439, 227.918, -11.898, 0.604)
pt3dadd(-45.531, 227.993, -11.88, 0.618)
pt3dadd(-45.624, 228.06, -11.857, 0.622)
pt3dadd(-45.72, 228.11, -11.813, 0.594)
pt3dadd(-45.809, 228.142, -11.756, 0.548)
pt3dadd(-45.891, 228.145, -11.683, 0.486)
pt3dadd(-45.969, 228.193, -11.638, 0.434)
pt3dadd(-46.043, 228.286, -11.625, 0.396)
pt3dadd(-46.117, 228.378, -11.611, 0.358)
pt3dadd(-46.195, 228.468, -11.6, 0.322)
pt3dadd(-46.291, 228.54, -11.6, 0.286)
pt3dadd(-46.387, 228.611, -11.6, 0.25)
pt3dadd(-46.485, 228.68, -11.6, 0.228)
pt3dadd(-46.577, 228.757, -11.6, 0.232)
pt3dadd(-46.669, 228.835, -11.6, 0.238)
pt3dadd(-46.761, 228.911, -11.6, 0.242)
pt3dadd(-46.854, 228.988, -11.6, 0.248)
pt3dadd(-46.943, 229.068, -11.6, 0.254)
pt3dadd(-47.028, 229.153, -11.6, 0.264)
pt3dadd(-47.112, 229.238, -11.6, 0.274)
pt3dadd(-47.196, 229.324, -11.6, 0.284)
pt3dadd(-47.28, 229.409, -11.6, 0.294)
pt3dadd(-47.364, 229.49, -11.586, 0.322)
pt3dadd(-47.447, 229.565, -11.548, 0.38)
pt3dadd(-47.521, 229.654, -11.537, 0.43)
pt3dadd(-47.589, 229.753, -11.544, 0.474)
pt3dadd(-47.625, 229.822, -11.618, 0.516)
pt3dadd(-47.662, 229.892, -11.69, 0.552)
pt3dadd(-47.717, 229.999, -11.7, 0.552)
pt3dadd(-47.772, 230.105, -11.71, 0.552)
pt3dadd(-47.794, 230.194, -11.772, 0.57)
pt3dadd(-47.821, 230.297, -11.811, 0.578)
pt3dadd(-47.853, 230.41, -11.83, 0.578)
pt3dadd(-47.885, 230.524, -11.849, 0.578)
pt3dadd(-47.917, 230.636, -11.868, 0.578)
pt3dadd(-47.95, 230.749, -11.887, 0.578)
pt3dadd(-47.99, 230.86, -11.906, 0.58)
pt3dadd(-48.049, 230.962, -11.924, 0.592)
pt3dadd(-48.108, 231.064, -11.943, 0.602)
pt3dadd(-48.167, 231.166, -11.962, 0.612)
pt3dadd(-48.226, 231.268, -11.981, 0.624)
pt3dadd(-48.301, 231.359, -11.99, 0.636)
pt3dadd(-48.386, 231.443, -11.993, 0.652)
pt3dadd(-48.472, 231.527, -11.995, 0.668)
pt3dadd(-48.557, 231.612, -11.997, 0.682)
pt3dadd(-48.643, 231.696, -11.999, 0.698)
pt3dadd(-48.708, 231.796, -12, 0.72)
pt3dadd(-48.764, 231.901, -12, 0.742)
pt3dadd(-48.82, 232.007, -12, 0.766)
pt3dadd(-48.876, 232.114, -12, 0.79)
pt3dadd(-48.932, 232.219, -12, 0.812)
pt3dadd(-48.994, 232.321, -12, 0.854)
pt3dadd(-49.072, 232.412, -12, 0.934)
pt3dadd(-49.155, 232.498, -12, 1.012)
pt3dadd(-49.264, 232.548, -12, 1.07)
pt3dadd(-49.373, 232.597, -12, 1.128)
pt3dadd(-49.434, 232.7, -12, 1.162)
pt3dadd(-49.491, 232.805, -12, 1.194)
pt3dadd(-49.523, 232.919, -11.991, 1.198)
pt3dadd(-49.54, 233.036, -11.979, 1.19)
pt3dadd(-49.557, 233.153, -11.964, 1.182)
pt3dadd(-49.569, 233.264, -11.928, 1.198)
pt3dadd(-49.589, 233.378, -11.909, 1.216)
pt3dadd(-49.617, 233.495, -11.905, 1.236)
pt3dadd(-49.644, 233.611, -11.9, 1.254)
pt3dadd(-49.713, 233.71, -11.9, 1.278)
pt3dadd(-49.785, 233.806, -11.9, 1.3)
pt3dadd(-49.889, 233.855, -11.9, 1.264)
pt3dadd(-50.004, 233.888, -11.9, 1.21)
pt3dadd(-50.11, 233.941, -11.9, 1.126)
pt3dadd(-50.206, 234.013, -11.9, 1.008)
pt3dadd(-50.309, 234.072, -11.9, 0.868)
pt3dadd(-50.425, 234.103, -11.9, 0.69)
pt3dadd(-50.516, 234.176, -11.9, 0.628)
pt3dadd(-50.6, 234.262, -11.9, 0.598)
pt3dadd(-50.684, 234.347, -11.9, 0.568)
pt3dadd(-50.769, 234.432, -11.9, 0.538)
pt3dadd(-50.853, 234.517, -11.9, 0.508)
pt3dadd(-50.919, 234.617, -11.9, 0.494)
pt3dadd(-50.981, 234.72, -11.9, 0.484)
pt3dadd(-51.042, 234.823, -11.9, 0.476)
}
}
proc shape3d_134() {
dend_5[10] { pt3dadd(-51.104, 234.926, -11.9, 0.466)
pt3dadd(-51.166, 235.028, -11.9, 0.456)
pt3dadd(-51.213, 235.139, -11.9, 0.452)
pt3dadd(-51.247, 235.253, -11.9, 0.452)
pt3dadd(-51.281, 235.369, -11.9, 0.452)
pt3dadd(-51.316, 235.483, -11.9, 0.452)
pt3dadd(-51.35, 235.598, -11.9, 0.452)
pt3dadd(-51.385, 235.712, -11.9, 0.452)
pt3dadd(-51.425, 235.825, -11.9, 0.458)
pt3dadd(-51.47, 235.938, -11.9, 0.468)
pt3dadd(-51.515, 236.05, -11.9, 0.48)
pt3dadd(-51.559, 236.16, -11.9, 0.5)
pt3dadd(-51.604, 236.272, -11.9, 0.52)
pt3dadd(-51.667, 236.374, -11.9, 0.558)
pt3dadd(-51.738, 236.47, -11.9, 0.604)
pt3dadd(-51.833, 236.521, -11.9, 0.638)
pt3dadd(-51.953, 236.53, -11.9, 0.656)
pt3dadd(-52.073, 236.537, -11.9, 0.676)
pt3dadd(-52.181, 236.588, -11.9, 0.684)
pt3dadd(-52.287, 236.644, -11.9, 0.692)
pt3dadd(-52.393, 236.7, -11.9, 0.698)
pt3dadd(-52.489, 236.767, -11.9, 0.704)
pt3dadd(-52.56, 236.864, -11.9, 0.704)
pt3dadd(-52.631, 236.962, -11.9, 0.71)
pt3dadd(-52.688, 237.066, -11.899, 0.756)
pt3dadd(-52.734, 237.178, -11.897, 0.766)
pt3dadd(-52.779, 237.288, -11.895, 0.774)
pt3dadd(-52.825, 237.4, -11.893, 0.784)
pt3dadd(-52.87, 237.51, -11.891, 0.792)
pt3dadd(-52.916, 237.622, -11.889, 0.802)
pt3dadd(-52.953, 237.734, -11.875, 0.804)
pt3dadd(-52.987, 237.847, -11.859, 0.804)
pt3dadd(-53.022, 237.96, -11.842, 0.804)
pt3dadd(-53.057, 238.074, -11.825, 0.804)
pt3dadd(-53.092, 238.187, -11.808, 0.804)
pt3dadd(-53.114, 238.298, -11.781, 0.802)
pt3dadd(-53.126, 238.409, -11.744, 0.796)
pt3dadd(-53.138, 238.52, -11.706, 0.792)
pt3dadd(-53.149, 238.631, -11.669, 0.788)
pt3dadd(-53.161, 238.742, -11.632, 0.782)
pt3dadd(-53.173, 238.853, -11.598, 0.778)
pt3dadd(-53.185, 238.972, -11.581, 0.77)
pt3dadd(-53.197, 239.088, -11.565, 0.76)
pt3dadd(-53.21, 239.206, -11.549, 0.752)
pt3dadd(-53.222, 239.324, -11.532, 0.744)
pt3dadd(-53.235, 239.441, -11.516, 0.736)
pt3dadd(-53.247, 239.56, -11.499, 0.728)
pt3dadd(-53.259, 239.676, -11.478, 0.72)
pt3dadd(-53.272, 239.794, -11.458, 0.71)
pt3dadd(-53.284, 239.91, -11.437, 0.702)
pt3dadd(-53.296, 240.026, -11.416, 0.694)
pt3dadd(-53.308, 240.143, -11.396, 0.686)
pt3dadd(-53.321, 240.259, -11.373, 0.674)
pt3dadd(-53.339, 240.37, -11.338, 0.64)
pt3dadd(-53.357, 240.481, -11.304, 0.606)
pt3dadd(-53.404, 240.59, -11.3, 0.584)
pt3dadd(-53.456, 240.7, -11.3, 0.562)
pt3dadd(-53.521, 240.798, -11.3, 0.546)
pt3dadd(-53.599, 240.889, -11.3, 0.534)
pt3dadd(-53.692, 240.956, -11.3, 0.532)
pt3dadd(-53.809, 240.984, -11.3, 0.542)
pt3dadd(-53.925, 241.013, -11.3, 0.552)
pt3dadd(-54.031, 241.068, -11.3, 0.566)
pt3dadd(-54.137, 241.123, -11.3, 0.58)
pt3dadd(-54.244, 241.18, -11.3, 0.594)
pt3dadd(-54.325, 241.259, -11.298, 0.616)
pt3dadd(-54.371, 241.369, -11.293, 0.648)
pt3dadd(-54.414, 241.481, -11.286, 0.694)
pt3dadd(-54.426, 241.596, -11.264, 0.812)
pt3dadd(-54.439, 241.715, -11.253, 0.84)
pt3dadd(-54.451, 241.834, -11.243, 0.866)
pt3dadd(-54.464, 241.952, -11.232, 0.894)
pt3dadd(-54.476, 242.071, -11.222, 0.922)
pt3dadd(-54.489, 242.19, -11.211, 0.95)
pt3dadd(-54.501, 242.309, -11.201, 0.978)
pt3dadd(-54.513, 242.423, -11.172, 1.016)
pt3dadd(-54.525, 242.537, -11.142, 1.058)
pt3dadd(-54.537, 242.651, -11.113, 1.098)
pt3dadd(-54.549, 242.765, -11.083, 1.138)
pt3dadd(-54.561, 242.878, -11.053, 1.178)
pt3dadd(-54.566, 242.993, -11.024, 1.218)
pt3dadd(-54.557, 243.108, -10.998, 1.258)
pt3dadd(-54.548, 243.223, -10.971, 1.298)
pt3dadd(-54.538, 243.34, -10.945, 1.338)
pt3dadd(-54.529, 243.455, -10.918, 1.378)
pt3dadd(-54.51, 243.568, -10.894, 1.418)
pt3dadd(-54.466, 243.677, -10.875, 1.456)
pt3dadd(-54.422, 243.786, -10.856, 1.494)
pt3dadd(-54.378, 243.895, -10.836, 1.532)
pt3dadd(-54.335, 244.004, -10.817, 1.57)
pt3dadd(-54.306, 244.12, -10.808, 1.596)
pt3dadd(-54.283, 244.238, -10.803, 1.618)
pt3dadd(-54.255, 244.351, -10.787, 1.618)
pt3dadd(-54.216, 244.457, -10.751, 1.576)
pt3dadd(-54.145, 244.519, -10.709, 1.502)
pt3dadd(-54.043, 244.543, -10.66, 1.392)
pt3dadd(-53.957, 244.601, -10.625, 1.29)
pt3dadd(-53.891, 244.698, -10.608, 1.198)
pt3dadd(-53.832, 244.798, -10.581, 1.138)
pt3dadd(-53.78, 244.896, -10.544, 1.104)
pt3dadd(-53.728, 244.994, -10.507, 1.072)
pt3dadd(-53.709, 245.099, -10.469, 1.066)
pt3dadd(-53.72, 245.208, -10.43, 1.088)
pt3dadd(-53.732, 245.318, -10.39, 1.12)
pt3dadd(-53.74, 245.412, -10.331, 1.156)
pt3dadd(-53.746, 245.49, -10.256, 1.156)
pt3dadd(-53.751, 245.569, -10.181, 1.156)
pt3dadd(-53.757, 245.648, -10.106, 1.156)
pt3dadd(-53.763, 245.728, -10.031, 1.156)
pt3dadd(-53.738, 245.783, -9.949, 1.124)
pt3dadd(-53.693, 245.824, -9.862, 1.072)
pt3dadd(-53.679, 245.912, -9.813, 1.024)
pt3dadd(-53.679, 246.028, -9.783, 0.98)
pt3dadd(-53.65, 246.131, -9.75, 0.96)
pt3dadd(-53.584, 246.221, -9.713, 0.974)
pt3dadd(-53.502, 246.301, -9.7, 1.018)
pt3dadd(-53.41, 246.38, -9.7, 1.076)
pt3dadd(-53.327, 246.464, -9.7, 1.158)
pt3dadd(-53.251, 246.556, -9.696, 1.256)
pt3dadd(-53.173, 246.626, -9.647, 1.262)
pt3dadd(-53.096, 246.697, -9.598, 1.268)
pt3dadd(-53.018, 246.768, -9.549, 1.274)
pt3dadd(-52.94, 246.838, -9.501, 1.28)
pt3dadd(-52.944, 246.94, -9.448, 1.258)
pt3dadd(-52.948, 247.04, -9.395, 1.234)
pt3dadd(-52.93, 247.118, -9.321, 1.17)
pt3dadd(-52.909, 247.19, -9.244, 1.104)
pt3dadd(-52.792, 247.202, -9.222, 1.084)
pt3dadd(-52.676, 247.214, -9.2, 1.064)
pt3dadd(-52.562, 247.229, -9.172, 1.05)
pt3dadd(-52.451, 247.247, -9.137, 1.038)
pt3dadd(-52.356, 247.289, -9.11, 1.038)
pt3dadd(-52.311, 247.399, -9.105, 1.074)
pt3dadd(-52.273, 247.512, -9.099, 1.114)
pt3dadd(-52.285, 247.628, -9.083, 1.212)
pt3dadd(-52.296, 247.735, -9.042, 1.348)
pt3dadd(-52.305, 247.817, -8.968, 1.43)
pt3dadd(-52.279, 247.852, -8.877, 1.452)
pt3dadd(-52.188, 247.884, -8.832, 1.502)
pt3dadd(-52.076, 247.92, -8.812, 1.536)
pt3dadd(-52.006, 247.988, -8.8, 1.564)
pt3dadd(-51.998, 248.11, -8.8, 1.584)
pt3dadd(-51.99, 248.23, -8.8, 1.604)
pt3dadd(-51.999, 248.348, -8.8, 1.546)
pt3dadd(-51.968, 248.462, -8.8, 1.478)
pt3dadd(-51.925, 248.574, -8.8, 1.41)
pt3dadd(-51.875, 248.677, -8.779, 1.326)
pt3dadd(-51.817, 248.772, -8.742, 1.228)
pt3dadd(-51.814, 248.881, -8.708, 1.164)
pt3dadd(-51.825, 248.995, -8.675, 1.112)
pt3dadd(-51.834, 249.079, -8.618, 1.07)
pt3dadd(-51.839, 249.125, -8.525, 1.048)
pt3dadd(-51.835, 249.178, -8.441, 1.032)
pt3dadd(-51.771, 249.272, -8.412, 1.058)
pt3dadd(-51.706, 249.367, -8.383, 1.082)
pt3dadd(-51.641, 249.457, -8.35, 1.11)
pt3dadd(-51.567, 249.485, -8.275, 1.188)
pt3dadd(-51.487, 249.517, -8.211, 1.26)
pt3dadd(-51.375, 249.558, -8.207, 1.292)
pt3dadd(-51.262, 249.599, -8.204, 1.324)
pt3dadd(-51.15, 249.641, -8.2, 1.354)
pt3dadd(-51.11, 249.75, -8.2, 1.346)
pt3dadd(-51.075, 249.865, -8.2, 1.334)
pt3dadd(-51.036, 249.978, -8.2, 1.288)
pt3dadd(-50.979, 250.084, -8.2, 1.294)
pt3dadd(-50.921, 250.189, -8.2, 1.31)
pt3dadd(-50.863, 250.294, -8.2, 1.324)
pt3dadd(-50.804, 250.398, -8.2, 1.34)
pt3dadd(-50.746, 250.504, -8.2, 1.354)
pt3dadd(-50.658, 250.58, -8.18, 1.396)
pt3dadd(-50.567, 250.652, -8.158, 1.44)
pt3dadd(-50.475, 250.724, -8.135, 1.486)
pt3dadd(-50.383, 250.799, -8.113, 1.53)
pt3dadd(-50.285, 250.861, -8.1, 1.58)
pt3dadd(-50.176, 250.913, -8.1, 1.632)
pt3dadd(-50.072, 250.968, -8.1, 1.68)
pt3dadd(-50.022, 251.077, -8.1, 1.646)
pt3dadd(-49.972, 251.186, -8.1, 1.612)
pt3dadd(-49.935, 251.282, -8.051, 1.496)
pt3dadd(-49.902, 251.376, -7.996, 1.374)
pt3dadd(-49.884, 251.477, -7.943, 1.296)
pt3dadd(-49.852, 251.563, -7.891, 1.228)
pt3dadd(-49.751, 251.59, -7.842, 1.222)
pt3dadd(-49.65, 251.616, -7.792, 1.214)
pt3dadd(-49.55, 251.644, -7.743, 1.206)
pt3dadd(-49.455, 251.656, -7.683, 1.224)
pt3dadd(-49.362, 251.666, -7.62, 1.248)
pt3dadd(-49.29, 251.708, -7.552, 1.242)
pt3dadd(-49.227, 251.766, -7.482, 1.22)
pt3dadd(-49.161, 251.833, -7.426, 1.176)
pt3dadd(-49.083, 251.92, -7.402, 1.082)
pt3dadd(-49.029, 251.984, -7.347, 0.986)
pt3dadd(-49.003, 252.023, -7.255, 0.892)
pt3dadd(-48.977, 252.061, -7.162, 0.796)
pt3dadd(-48.892, 252.077, -7.1, 0.452)
}
apic[21] {pt3dclear()
pt3dadd(40.065, 159.952, -12.3, 2.912)
pt3dadd(40.09, 160.063, -12.32, 2.902)
pt3dadd(40.116, 160.178, -12.341, 2.892)
pt3dadd(40.141, 160.294, -12.361, 2.882)
pt3dadd(40.166, 160.406, -12.382, 2.872)
}
}
proc shape3d_135() {
apic[21] { pt3dadd(40.191, 160.522, -12.403, 2.862)
pt3dadd(40.217, 160.637, -12.423, 2.85)
pt3dadd(40.242, 160.752, -12.444, 2.84)
pt3dadd(40.267, 160.866, -12.465, 2.83)
pt3dadd(40.293, 160.98, -12.485, 2.82)
pt3dadd(40.307, 161.096, -12.5, 2.81)
pt3dadd(40.295, 161.215, -12.5, 2.804)
pt3dadd(40.282, 161.335, -12.5, 2.796)
pt3dadd(40.269, 161.454, -12.5, 2.788)
pt3dadd(40.257, 161.574, -12.5, 2.782)
pt3dadd(40.244, 161.693, -12.5, 2.774)
pt3dadd(40.232, 161.813, -12.5, 2.768)
pt3dadd(40.219, 161.932, -12.5, 2.758)
pt3dadd(40.207, 162.05, -12.5, 2.74)
pt3dadd(40.194, 162.17, -12.5, 2.722)
pt3dadd(40.182, 162.289, -12.5, 2.704)
pt3dadd(40.169, 162.409, -12.5, 2.686)
pt3dadd(40.157, 162.528, -12.5, 2.668)
pt3dadd(40.144, 162.648, -12.5, 2.65)
pt3dadd(40.137, 162.768, -12.5, 2.626)
pt3dadd(40.144, 162.888, -12.5, 2.59)
pt3dadd(40.152, 163.007, -12.5, 2.552)
pt3dadd(40.159, 163.127, -12.5, 2.514)
pt3dadd(40.166, 163.246, -12.5, 2.478)
pt3dadd(40.173, 163.367, -12.5, 2.44)
pt3dadd(40.183, 163.486, -12.5, 2.402)
pt3dadd(40.2, 163.604, -12.5, 2.364)
pt3dadd(40.218, 163.723, -12.5, 2.324)
pt3dadd(40.236, 163.842, -12.5, 2.284)
pt3dadd(40.254, 163.961, -12.5, 2.246)
pt3dadd(40.272, 164.078, -12.5, 2.206)
pt3dadd(40.291, 164.198, -12.5, 2.164)
pt3dadd(40.312, 164.316, -12.5, 2.12)
pt3dadd(40.332, 164.434, -12.5, 2.076)
pt3dadd(40.353, 164.552, -12.5, 2.032)
pt3dadd(40.374, 164.67, -12.5, 1.986)
pt3dadd(40.395, 164.789, -12.5, 1.942)
pt3dadd(40.389, 164.908, -12.504, 1.894)
pt3dadd(40.377, 165.028, -12.509, 1.846)
pt3dadd(40.364, 165.145, -12.514, 1.796)
pt3dadd(40.352, 165.265, -12.519, 1.748)
pt3dadd(40.339, 165.384, -12.524, 1.7)
pt3dadd(40.327, 165.504, -12.529, 1.65)
pt3dadd(40.314, 165.622, -12.537, 1.6)
pt3dadd(40.302, 165.737, -12.567, 1.536)
pt3dadd(40.29, 165.85, -12.597, 1.474)
pt3dadd(40.278, 165.965, -12.626, 1.41)
pt3dadd(40.266, 166.078, -12.656, 1.348)
pt3dadd(40.254, 166.192, -12.686, 1.286)
pt3dadd(40.257, 166.308, -12.701, 1.232)
pt3dadd(40.273, 166.427, -12.703, 1.188)
pt3dadd(40.288, 166.546, -12.705, 1.144)
pt3dadd(40.304, 166.666, -12.707, 1.1)
pt3dadd(40.319, 166.784, -12.709, 1.056)
pt3dadd(40.335, 166.903, -12.711, 1.012)
pt3dadd(40.339, 167.022, -12.724, 1.004)
pt3dadd(40.341, 167.14, -12.74, 1.004)
pt3dadd(40.344, 167.258, -12.756, 1.004)
pt3dadd(40.346, 167.377, -12.772, 1.004)
pt3dadd(40.348, 167.496, -12.788, 1.004)
pt3dadd(40.346, 167.612, -12.807, 1.016)
pt3dadd(40.334, 167.728, -12.835, 1.06)
pt3dadd(40.322, 167.843, -12.862, 1.104)
pt3dadd(40.31, 167.957, -12.89, 1.15)
pt3dadd(40.298, 168.072, -12.917, 1.194)
pt3dadd(40.286, 168.186, -12.945, 1.238)
pt3dadd(40.287, 168.304, -12.96, 1.29)
pt3dadd(40.295, 168.424, -12.968, 1.348)
pt3dadd(40.304, 168.544, -12.976, 1.406)
pt3dadd(40.313, 168.662, -12.984, 1.464)
pt3dadd(40.321, 168.781, -12.992, 1.52)
pt3dadd(40.33, 168.9, -12.999, 1.578)
pt3dadd(40.345, 169.019, -13, 1.61)
pt3dadd(40.36, 169.139, -13, 1.64)
pt3dadd(40.375, 169.258, -13, 1.67)
pt3dadd(40.39, 169.378, -13, 1.7)
pt3dadd(40.405, 169.496, -13, 1.732)
pt3dadd(40.418, 169.614, -13, 1.756)
pt3dadd(40.418, 169.735, -13, 1.744)
pt3dadd(40.419, 169.855, -13, 1.732)
pt3dadd(40.419, 169.975, -13, 1.72)
pt3dadd(40.419, 170.095, -13, 1.71)
pt3dadd(40.419, 170.215, -13, 1.698)
pt3dadd(40.419, 170.335, -13, 1.686)
pt3dadd(40.41, 170.453, -13.012, 1.652)
pt3dadd(40.397, 170.572, -13.029, 1.61)
pt3dadd(40.385, 170.688, -13.045, 1.568)
pt3dadd(40.372, 170.807, -13.062, 1.528)
pt3dadd(40.36, 170.924, -13.078, 1.486)
pt3dadd(40.348, 171.042, -13.095, 1.446)
pt3dadd(40.336, 171.155, -13.125, 1.398)
pt3dadd(40.324, 171.266, -13.162, 1.346)
pt3dadd(40.313, 171.377, -13.199, 1.294)
pt3dadd(40.301, 171.488, -13.236, 1.244)
pt3dadd(40.289, 171.598, -13.273, 1.192)
pt3dadd(40.278, 171.709, -13.31, 1.146)
pt3dadd(40.269, 171.821, -13.345, 1.112)
pt3dadd(40.26, 171.932, -13.381, 1.08)
pt3dadd(40.251, 172.045, -13.416, 1.048)
pt3dadd(40.241, 172.158, -13.451, 1.014)
pt3dadd(40.232, 172.268, -13.487, 0.982)
pt3dadd(40.236, 172.388, -13.491, 0.972)
pt3dadd(40.241, 172.507, -13.492, 0.964)
pt3dadd(40.246, 172.627, -13.494, 0.956)
pt3dadd(40.251, 172.747, -13.496, 0.946)
pt3dadd(40.257, 172.867, -13.498, 0.938)
pt3dadd(40.262, 172.987, -13.5, 0.93)
pt3dadd(40.269, 173.107, -13.5, 0.944)
pt3dadd(40.276, 173.226, -13.5, 0.96)
pt3dadd(40.283, 173.347, -13.5, 0.976)
pt3dadd(40.29, 173.467, -13.5, 0.994)
pt3dadd(40.298, 173.586, -13.5, 1.01)
pt3dadd(40.305, 173.706, -13.5, 1.026)
pt3dadd(40.296, 173.826, -13.5, 1.07)
pt3dadd(40.284, 173.945, -13.5, 1.12)
pt3dadd(40.271, 174.065, -13.5, 1.17)
pt3dadd(40.259, 174.184, -13.5, 1.232)
pt3dadd(40.246, 174.304, -13.5, 1.3)
pt3dadd(40.234, 174.422, -13.5, 1.366)
pt3dadd(40.221, 174.541, -13.513, 1.426)
pt3dadd(40.209, 174.658, -13.53, 1.484)
pt3dadd(40.198, 174.767, -13.56, 1.536)
pt3dadd(40.191, 174.833, -13.642, 1.56)
pt3dadd(40.183, 174.902, -13.724, 1.578)
pt3dadd(40.173, 175.003, -13.778, 1.474)
pt3dadd(40.161, 175.112, -13.813, 1.408)
pt3dadd(40.149, 175.229, -13.836, 1.37)
pt3dadd(40.137, 175.345, -13.859, 1.33)
pt3dadd(40.125, 175.462, -13.882, 1.292)
pt3dadd(40.112, 175.577, -13.905, 1.254)
pt3dadd(40.1, 175.693, -13.928, 1.214)
pt3dadd(40.094, 175.808, -13.955, 1.188)
pt3dadd(40.089, 175.924, -13.984, 1.164)
pt3dadd(40.084, 176.039, -14.014, 1.14)
pt3dadd(40.08, 176.153, -14.043, 1.118)
pt3dadd(40.075, 176.268, -14.072, 1.094)
pt3dadd(40.073, 176.384, -14.09, 1.088)
pt3dadd(40.073, 176.504, -14.091, 1.108)
pt3dadd(40.073, 176.623, -14.093, 1.128)
pt3dadd(40.074, 176.744, -14.095, 1.148)
pt3dadd(40.074, 176.863, -14.097, 1.168)
pt3dadd(40.074, 176.984, -14.099, 1.188)
pt3dadd(40.073, 177.103, -14.103, 1.21)
pt3dadd(40.06, 177.221, -14.121, 1.244)
pt3dadd(40.048, 177.337, -14.14, 1.278)
pt3dadd(40.036, 177.456, -14.158, 1.31)
pt3dadd(40.023, 177.572, -14.177, 1.344)
pt3dadd(40.011, 177.69, -14.196, 1.378)
pt3dadd(40.004, 177.806, -14.217, 1.41)
pt3dadd(40.029, 177.913, -14.257, 1.432)
pt3dadd(40.054, 178.02, -14.297, 1.454)
pt3dadd(40.078, 178.128, -14.337, 1.478)
pt3dadd(40.103, 178.235, -14.376, 1.5)
pt3dadd(40.111, 178.351, -14.39, 1.496)
pt3dadd(40.111, 178.471, -14.392, 1.48)
pt3dadd(40.111, 178.591, -14.394, 1.464)
pt3dadd(40.112, 178.711, -14.395, 1.448)
pt3dadd(40.112, 178.831, -14.397, 1.432)
pt3dadd(40.112, 178.951, -14.399, 1.416)
pt3dadd(40.107, 179.07, -14.4, 1.398)
pt3dadd(40.095, 179.19, -14.4, 1.376)
pt3dadd(40.082, 179.309, -14.4, 1.354)
pt3dadd(40.07, 179.429, -14.4, 1.332)
pt3dadd(40.057, 179.548, -14.4, 1.312)
pt3dadd(40.044, 179.668, -14.4, 1.29)
pt3dadd(40.032, 179.786, -14.4, 1.268)
pt3dadd(40.02, 179.906, -14.4, 1.248)
pt3dadd(40.01, 180.025, -14.4, 1.23)
pt3dadd(39.999, 180.145, -14.4, 1.212)
pt3dadd(39.988, 180.265, -14.4, 1.194)
pt3dadd(39.978, 180.384, -14.4, 1.174)
pt3dadd(39.967, 180.504, -14.4, 1.156)
pt3dadd(39.956, 180.623, -14.4, 1.138)
pt3dadd(39.967, 180.742, -14.4, 1.132)
pt3dadd(39.997, 180.858, -14.4, 1.138)
}
dend_5[11] {pt3dclear()
pt3dadd(39.997, 180.858, -14.4, 1.138)
pt3dadd(40.026, 180.973, -14.4, 1.142)
pt3dadd(40.056, 181.09, -14.4, 1.146)
pt3dadd(40.086, 181.206, -14.4, 1.15)
pt3dadd(40.113, 181.322, -14.4, 1.156)
pt3dadd(40.121, 181.442, -14.4, 1.16)
pt3dadd(40.128, 181.562, -14.4, 1.164)
pt3dadd(40.135, 181.682, -14.4, 1.168)
pt3dadd(40.142, 181.802, -14.4, 1.172)
pt3dadd(40.15, 181.921, -14.4, 1.176)
pt3dadd(40.157, 182.041, -14.4, 1.18)
}
dend_5[12] {pt3dclear()
pt3dadd(40.157, 182.041, -14.4, 1.18)
pt3dadd(40.146, 182.148, -14.4, 1.184)
pt3dadd(40.133, 182.267, -14.4, 1.186)
pt3dadd(40.121, 182.387, -14.4, 1.19)
pt3dadd(40.108, 182.506, -14.4, 1.194)
pt3dadd(40.096, 182.626, -14.4, 1.198)
pt3dadd(40.083, 182.744, -14.4, 1.202)
pt3dadd(40.071, 182.864, -14.4, 1.204)
pt3dadd(40.058, 182.983, -14.4, 1.182)
pt3dadd(40.045, 183.102, -14.4, 1.158)
pt3dadd(40.033, 183.222, -14.4, 1.132)
pt3dadd(40.02, 183.341, -14.4, 1.108)
pt3dadd(40.008, 183.461, -14.4, 1.082)
pt3dadd(39.995, 183.58, -14.4, 1.058)
}
}
proc shape3d_136() {
dend_5[12] { pt3dadd(39.983, 183.7, -14.4, 1.032)
pt3dadd(39.986, 183.82, -14.4, 1)
pt3dadd(39.99, 183.94, -14.4, 0.968)
pt3dadd(39.995, 184.058, -14.4, 0.936)
pt3dadd(40, 184.178, -14.4, 0.904)
pt3dadd(40.005, 184.298, -14.4, 0.87)
pt3dadd(40.01, 184.418, -14.4, 0.838)
pt3dadd(40.009, 184.538, -14.4, 0.784)
pt3dadd(40.006, 184.658, -14.4, 0.72)
pt3dadd(40.003, 184.777, -14.4, 0.658)
pt3dadd(40.028, 184.895, -14.4, 0.662)
pt3dadd(40.056, 185.012, -14.4, 0.674)
pt3dadd(40.091, 185.125, -14.391, 0.75)
pt3dadd(40.133, 185.237, -14.374, 0.874)
pt3dadd(40.209, 185.31, -14.348, 1.048)
pt3dadd(40.313, 185.354, -14.314, 1.264)
pt3dadd(40.356, 185.442, -14.3, 1.412)
pt3dadd(40.355, 185.563, -14.3, 1.512)
pt3dadd(40.354, 185.682, -14.3, 1.61)
pt3dadd(40.353, 185.803, -14.3, 1.708)
pt3dadd(40.352, 185.922, -14.3, 1.808)
pt3dadd(40.34, 186.042, -14.3, 1.908)
pt3dadd(40.327, 186.161, -14.3, 2.008)
pt3dadd(40.315, 186.28, -14.3, 2.108)
pt3dadd(40.302, 186.4, -14.3, 2.21)
pt3dadd(40.29, 186.518, -14.3, 2.21)
pt3dadd(40.277, 186.638, -14.3, 2.21)
pt3dadd(40.265, 186.757, -14.3, 2.21)
pt3dadd(40.252, 186.877, -14.3, 2.21)
pt3dadd(40.239, 186.996, -14.3, 2.21)
pt3dadd(40.227, 187.116, -14.3, 2.21)
pt3dadd(40.214, 187.235, -14.3, 2.21)
pt3dadd(40.202, 187.355, -14.3, 2.21)
pt3dadd(40.189, 187.474, -14.3, 2.21)
pt3dadd(40.177, 187.592, -14.3, 2.21)
pt3dadd(40.164, 187.712, -14.3, 2.21)
pt3dadd(40.152, 187.831, -14.3, 2.21)
pt3dadd(40.139, 187.951, -14.3, 2.21)
pt3dadd(40.127, 188.07, -14.3, 2.21)
pt3dadd(40.114, 188.19, -14.3, 2.224)
pt3dadd(40.101, 188.309, -14.3, 2.238)
pt3dadd(40.089, 188.429, -14.3, 2.252)
pt3dadd(40.076, 188.548, -14.3, 2.268)
pt3dadd(40.064, 188.668, -14.3, 2.282)
pt3dadd(40.051, 188.786, -14.3, 2.296)
pt3dadd(40.039, 188.905, -14.3, 2.31)
pt3dadd(40.026, 189.025, -14.3, 2.336)
pt3dadd(40.014, 189.144, -14.3, 2.36)
pt3dadd(40.001, 189.264, -14.3, 2.386)
pt3dadd(39.989, 189.383, -14.3, 2.41)
pt3dadd(39.976, 189.503, -14.3, 2.436)
pt3dadd(39.963, 189.622, -14.3, 2.46)
pt3dadd(39.951, 189.742, -14.3, 2.486)
pt3dadd(39.96, 189.862, -14.3, 2.52)
pt3dadd(39.97, 189.98, -14.3, 2.552)
pt3dadd(39.98, 190.1, -14.3, 2.586)
pt3dadd(39.99, 190.219, -14.3, 2.62)
pt3dadd(40, 190.34, -14.3, 2.654)
pt3dadd(40.009, 190.459, -14.3, 2.686)
}
dend_5[13] {pt3dclear()
pt3dadd(40.009, 190.459, -14.3, 2.686)
pt3dadd(40.051, 190.534, -14.3, 2.712)
pt3dadd(40.109, 190.637, -14.3, 2.746)
pt3dadd(40.167, 190.742, -14.3, 2.782)
pt3dadd(40.226, 190.848, -14.3, 2.816)
pt3dadd(40.284, 190.952, -14.3, 2.852)
pt3dadd(40.332, 191.063, -14.3, 2.9)
pt3dadd(40.374, 191.174, -14.3, 2.956)
pt3dadd(40.392, 191.29, -14.3, 3.01)
pt3dadd(40.379, 191.408, -14.3, 3.06)
pt3dadd(40.366, 191.528, -14.3, 3.112)
pt3dadd(40.354, 191.646, -14.288, 3.166)
pt3dadd(40.342, 191.761, -14.26, 3.228)
pt3dadd(40.33, 191.875, -14.232, 3.292)
pt3dadd(40.32, 191.969, -14.17, 3.362)
pt3dadd(40.31, 192.061, -14.107, 3.432)
pt3dadd(40.301, 192.155, -14.045, 3.44)
pt3dadd(40.307, 192.253, -13.99, 3.426)
pt3dadd(40.333, 192.356, -13.944, 3.398)
pt3dadd(40.359, 192.461, -13.899, 3.37)
pt3dadd(40.384, 192.564, -13.853, 3.342)
pt3dadd(40.41, 192.668, -13.811, 3.306)
pt3dadd(40.432, 192.786, -13.806, 3.198)
pt3dadd(40.455, 192.905, -13.801, 3.09)
pt3dadd(40.479, 193.021, -13.788, 2.974)
pt3dadd(40.505, 193.135, -13.773, 2.858)
pt3dadd(40.535, 193.244, -13.741, 2.72)
pt3dadd(40.566, 193.35, -13.699, 2.572)
pt3dadd(40.637, 193.409, -13.643, 2.442)
pt3dadd(40.721, 193.454, -13.582, 2.318)
pt3dadd(40.74, 193.552, -13.53, 2.26)
pt3dadd(40.754, 193.652, -13.478, 2.204)
pt3dadd(40.768, 193.754, -13.426, 2.15)
pt3dadd(40.789, 193.867, -13.408, 2.118)
pt3dadd(40.811, 193.986, -13.403, 2.098)
pt3dadd(40.82, 194.104, -13.4, 2.094)
pt3dadd(40.815, 194.224, -13.4, 2.114)
pt3dadd(40.822, 194.342, -13.4, 2.126)
pt3dadd(40.829, 194.464, -13.4, 2.138)
pt3dadd(40.837, 194.584, -13.4, 2.152)
pt3dadd(40.844, 194.702, -13.4, 2.164)
pt3dadd(40.851, 194.822, -13.4, 2.176)
pt3dadd(40.866, 194.941, -13.4, 2.188)
pt3dadd(40.899, 195.056, -13.4, 2.196)
pt3dadd(40.932, 195.172, -13.4, 2.206)
pt3dadd(40.964, 195.287, -13.4, 2.216)
pt3dadd(40.997, 195.403, -13.4, 2.224)
pt3dadd(41.03, 195.518, -13.4, 2.234)
pt3dadd(41.021, 195.637, -13.4, 2.242)
pt3dadd(41.008, 195.756, -13.4, 2.25)
pt3dadd(40.995, 195.876, -13.4, 2.26)
pt3dadd(40.983, 195.995, -13.396, 2.26)
pt3dadd(40.97, 196.114, -13.393, 2.26)
pt3dadd(40.959, 196.232, -13.387, 2.26)
pt3dadd(40.971, 196.31, -13.311, 2.246)
pt3dadd(40.989, 196.387, -13.237, 2.23)
pt3dadd(41.051, 196.456, -13.173, 2.186)
pt3dadd(41.101, 196.538, -13.118, 2.144)
pt3dadd(41.128, 196.643, -13.075, 2.104)
pt3dadd(41.155, 196.747, -13.033, 2.064)
pt3dadd(41.183, 196.855, -13, 2.026)
pt3dadd(41.21, 196.973, -13, 1.994)
pt3dadd(41.238, 197.089, -13, 1.962)
pt3dadd(41.259, 197.208, -12.999, 2.01)
pt3dadd(41.27, 197.324, -12.98, 2.034)
pt3dadd(41.281, 197.442, -12.96, 2.058)
pt3dadd(41.291, 197.56, -12.941, 2.082)
pt3dadd(41.302, 197.677, -12.922, 2.106)
pt3dadd(41.313, 197.794, -12.903, 2.132)
pt3dadd(41.338, 197.909, -12.882, 2.148)
pt3dadd(41.365, 198.023, -12.861, 2.164)
pt3dadd(41.392, 198.136, -12.84, 2.18)
pt3dadd(41.419, 198.251, -12.82, 2.194)
pt3dadd(41.446, 198.365, -12.799, 2.208)
pt3dadd(41.46, 198.482, -12.779, 2.194)
pt3dadd(41.474, 198.599, -12.76, 2.18)
pt3dadd(41.488, 198.715, -12.74, 2.164)
pt3dadd(41.502, 198.833, -12.721, 2.15)
pt3dadd(41.515, 198.949, -12.701, 2.136)
pt3dadd(41.558, 199.061, -12.695, 2.08)
pt3dadd(41.603, 199.172, -12.69, 2.02)
pt3dadd(41.692, 199.231, -12.656, 1.956)
pt3dadd(41.792, 199.274, -12.616, 1.892)
pt3dadd(41.807, 199.386, -12.607, 1.874)
pt3dadd(41.81, 199.506, -12.603, 1.864)
pt3dadd(41.808, 199.624, -12.592, 1.858)
pt3dadd(41.796, 199.739, -12.564, 1.858)
pt3dadd(41.784, 199.854, -12.537, 1.858)
pt3dadd(41.796, 199.969, -12.513, 1.888)
pt3dadd(41.805, 200.087, -12.5, 1.908)
pt3dadd(41.805, 200.207, -12.5, 1.908)
pt3dadd(41.805, 200.327, -12.5, 1.908)
pt3dadd(41.805, 200.447, -12.5, 1.908)
pt3dadd(41.805, 200.568, -12.5, 1.908)
pt3dadd(41.805, 200.687, -12.5, 1.908)
pt3dadd(41.808, 200.807, -12.5, 1.908)
pt3dadd(41.834, 200.924, -12.5, 1.904)
pt3dadd(41.861, 201.041, -12.5, 1.898)
pt3dadd(41.888, 201.157, -12.5, 1.894)
pt3dadd(41.914, 201.275, -12.5, 1.89)
pt3dadd(41.941, 201.391, -12.5, 1.886)
pt3dadd(41.965, 201.502, -12.474, 1.868)
pt3dadd(41.987, 201.606, -12.429, 1.838)
pt3dadd(42.009, 201.712, -12.384, 1.81)
pt3dadd(42.031, 201.816, -12.339, 1.782)
pt3dadd(42.055, 201.922, -12.296, 1.754)
pt3dadd(42.088, 202.032, -12.267, 1.72)
pt3dadd(42.12, 202.141, -12.238, 1.688)
pt3dadd(42.153, 202.252, -12.208, 1.654)
pt3dadd(42.186, 202.362, -12.179, 1.62)
pt3dadd(42.204, 202.474, -12.148, 1.566)
pt3dadd(42.21, 202.588, -12.117, 1.494)
pt3dadd(42.208, 202.703, -12.094, 1.452)
pt3dadd(42.196, 202.822, -12.082, 1.442)
pt3dadd(42.183, 202.94, -12.07, 1.434)
pt3dadd(42.204, 203.051, -12.04, 1.462)
pt3dadd(42.235, 203.159, -12.005, 1.5)
pt3dadd(42.295, 203.261, -12, 1.566)
pt3dadd(42.359, 203.363, -12, 1.638)
pt3dadd(42.432, 203.458, -12, 1.708)
pt3dadd(42.511, 203.546, -11.995, 1.766)
pt3dadd(42.6, 203.624, -11.978, 1.792)
pt3dadd(42.663, 203.712, -11.948, 1.808)
pt3dadd(42.68, 203.812, -11.895, 1.808)
pt3dadd(42.684, 203.918, -11.854, 1.808)
pt3dadd(42.672, 204.034, -11.827, 1.808)
pt3dadd(42.66, 204.148, -11.799, 1.808)
pt3dadd(42.648, 204.263, -11.772, 1.798)
pt3dadd(42.636, 204.377, -11.744, 1.786)
pt3dadd(42.624, 204.494, -11.721, 1.774)
pt3dadd(42.611, 204.611, -11.702, 1.76)
pt3dadd(42.64, 204.726, -11.7, 1.75)
pt3dadd(42.672, 204.842, -11.7, 1.74)
pt3dadd(42.705, 204.958, -11.7, 1.73)
pt3dadd(42.738, 205.073, -11.7, 1.722)
pt3dadd(42.77, 205.189, -11.7, 1.712)
pt3dadd(42.78, 205.306, -11.7, 1.704)
pt3dadd(42.767, 205.424, -11.7, 1.696)
pt3dadd(42.754, 205.544, -11.7, 1.69)
pt3dadd(42.742, 205.663, -11.7, 1.682)
pt3dadd(42.729, 205.783, -11.7, 1.676)
}
}
proc shape3d_137() {
dend_5[13] { pt3dadd(42.717, 205.902, -11.7, 1.668)
pt3dadd(42.704, 206.022, -11.7, 1.66)
pt3dadd(42.705, 206.137, -11.682, 1.644)
pt3dadd(42.719, 206.249, -11.647, 1.618)
pt3dadd(42.733, 206.36, -11.611, 1.59)
pt3dadd(42.747, 206.471, -11.576, 1.564)
pt3dadd(42.76, 206.582, -11.541, 1.538)
pt3dadd(42.797, 206.686, -11.501, 1.514)
pt3dadd(42.84, 206.785, -11.459, 1.49)
pt3dadd(42.884, 206.885, -11.417, 1.466)
pt3dadd(42.927, 206.986, -11.375, 1.442)
pt3dadd(42.943, 207.092, -11.34, 1.426)
pt3dadd(42.936, 207.208, -11.311, 1.418)
pt3dadd(42.929, 207.323, -11.283, 1.408)
pt3dadd(42.921, 207.438, -11.254, 1.398)
pt3dadd(42.914, 207.552, -11.226, 1.39)
pt3dadd(42.911, 207.666, -11.198, 1.382)
pt3dadd(42.949, 207.778, -11.176, 1.392)
pt3dadd(42.986, 207.889, -11.155, 1.404)
pt3dadd(43.024, 208, -11.133, 1.414)
pt3dadd(43.062, 208.11, -11.112, 1.426)
pt3dadd(43.078, 208.225, -11.1, 1.436)
pt3dadd(43.07, 208.345, -11.1, 1.444)
pt3dadd(43.062, 208.465, -11.1, 1.452)
pt3dadd(43.081, 208.576, -11.08, 1.434)
pt3dadd(43.121, 208.681, -11.044, 1.392)
pt3dadd(43.134, 208.787, -10.999, 1.328)
pt3dadd(43.136, 208.89, -10.95, 1.256)
pt3dadd(43.166, 208.969, -10.884, 1.174)
pt3dadd(43.212, 209.035, -10.809, 1.09)
pt3dadd(43.231, 209.142, -10.775, 1.06)
pt3dadd(43.247, 209.256, -10.746, 1.038)
pt3dadd(43.262, 209.37, -10.717, 1.018)
pt3dadd(43.272, 209.486, -10.7, 1.004)
pt3dadd(43.274, 209.606, -10.7, 1.004)
pt3dadd(43.276, 209.726, -10.7, 1.004)
pt3dadd(43.268, 209.845, -10.7, 1.078)
pt3dadd(43.28, 209.964, -10.691, 1.134)
pt3dadd(43.301, 210.08, -10.678, 1.172)
pt3dadd(43.323, 210.198, -10.665, 1.212)
pt3dadd(43.344, 210.314, -10.652, 1.25)
pt3dadd(43.366, 210.431, -10.639, 1.29)
pt3dadd(43.411, 210.54, -10.629, 1.334)
pt3dadd(43.473, 210.642, -10.622, 1.38)
pt3dadd(43.536, 210.745, -10.615, 1.428)
pt3dadd(43.598, 210.847, -10.608, 1.476)
pt3dadd(43.66, 210.949, -10.601, 1.524)
pt3dadd(43.726, 211.042, -10.57, 1.6)
pt3dadd(43.792, 211.13, -10.532, 1.682)
pt3dadd(43.881, 211.198, -10.496, 1.696)
pt3dadd(43.95, 211.276, -10.461, 1.708)
pt3dadd(43.944, 211.39, -10.432, 1.708)
pt3dadd(43.937, 211.505, -10.403, 1.708)
pt3dadd(43.956, 211.622, -10.396, 1.698)
pt3dadd(43.979, 211.74, -10.391, 1.688)
pt3dadd(44.002, 211.836, -10.348, 1.682)
pt3dadd(44.021, 211.927, -10.294, 1.676)
pt3dadd(44.029, 212.046, -10.275, 1.658)
pt3dadd(44.037, 212.164, -10.256, 1.638)
pt3dadd(44.045, 212.281, -10.237, 1.62)
pt3dadd(44.053, 212.398, -10.218, 1.6)
pt3dadd(44.063, 212.515, -10.2, 1.58)
pt3dadd(44.118, 212.622, -10.2, 1.56)
pt3dadd(44.174, 212.728, -10.2, 1.542)
pt3dadd(44.229, 212.836, -10.2, 1.522)
pt3dadd(44.284, 212.941, -10.2, 1.502)
pt3dadd(44.339, 213.048, -10.2, 1.482)
}
dend_5[14] {pt3dclear()
pt3dadd(44.339, 213.048, -10.2, 1.482)
pt3dadd(44.341, 213.144, -10.185, 1.466)
pt3dadd(44.343, 213.263, -10.167, 1.448)
pt3dadd(44.345, 213.379, -10.149, 1.43)
pt3dadd(44.347, 213.498, -10.13, 1.412)
pt3dadd(44.349, 213.616, -10.112, 1.394)
pt3dadd(44.351, 213.733, -10.1, 1.382)
pt3dadd(44.351, 213.854, -10.1, 1.382)
pt3dadd(44.351, 213.973, -10.1, 1.382)
pt3dadd(44.351, 214.094, -10.1, 1.382)
pt3dadd(44.351, 214.214, -10.1, 1.382)
pt3dadd(44.351, 214.334, -10.1, 1.382)
pt3dadd(44.352, 214.454, -10.1, 1.382)
pt3dadd(44.339, 214.572, -10.086, 1.392)
pt3dadd(44.327, 214.691, -10.072, 1.406)
pt3dadd(44.315, 214.808, -10.057, 1.418)
pt3dadd(44.302, 214.927, -10.043, 1.43)
pt3dadd(44.29, 215.045, -10.028, 1.442)
pt3dadd(44.277, 215.162, -10.014, 1.454)
pt3dadd(44.265, 215.281, -9.998, 1.476)
pt3dadd(44.253, 215.398, -9.982, 1.5)
pt3dadd(44.24, 215.516, -9.965, 1.526)
pt3dadd(44.228, 215.633, -9.949, 1.55)
pt3dadd(44.216, 215.752, -9.932, 1.576)
pt3dadd(44.203, 215.869, -9.916, 1.6)
pt3dadd(44.191, 215.987, -9.898, 1.632)
pt3dadd(44.178, 216.103, -9.879, 1.664)
pt3dadd(44.166, 216.222, -9.861, 1.698)
pt3dadd(44.154, 216.338, -9.842, 1.732)
pt3dadd(44.142, 216.456, -9.824, 1.766)
pt3dadd(44.129, 216.572, -9.805, 1.798)
pt3dadd(44.117, 216.686, -9.773, 1.828)
pt3dadd(44.106, 216.797, -9.736, 1.856)
pt3dadd(44.094, 216.907, -9.699, 1.884)
pt3dadd(44.082, 217.018, -9.662, 1.912)
pt3dadd(44.071, 217.128, -9.625, 1.94)
pt3dadd(44.059, 217.24, -9.588, 1.958)
pt3dadd(44.047, 217.35, -9.55, 1.952)
pt3dadd(44.036, 217.462, -9.513, 1.948)
pt3dadd(44.024, 217.572, -9.476, 1.944)
pt3dadd(44.013, 217.682, -9.439, 1.938)
pt3dadd(44.001, 217.793, -9.402, 1.934)
pt3dadd(43.988, 217.913, -9.4, 1.914)
pt3dadd(43.976, 218.032, -9.4, 1.892)
pt3dadd(43.963, 218.152, -9.4, 1.87)
pt3dadd(43.951, 218.27, -9.4, 1.848)
pt3dadd(43.938, 218.39, -9.4, 1.826)
pt3dadd(43.926, 218.509, -9.4, 1.806)
pt3dadd(43.913, 218.629, -9.4, 1.784)
pt3dadd(43.901, 218.748, -9.4, 1.758)
pt3dadd(43.888, 218.867, -9.4, 1.734)
pt3dadd(43.875, 218.987, -9.4, 1.708)
pt3dadd(43.863, 219.106, -9.4, 1.684)
pt3dadd(43.85, 219.226, -9.4, 1.658)
pt3dadd(43.838, 219.344, -9.4, 1.634)
pt3dadd(43.825, 219.464, -9.4, 1.608)
pt3dadd(43.813, 219.583, -9.4, 1.594)
pt3dadd(43.8, 219.703, -9.4, 1.58)
pt3dadd(43.788, 219.822, -9.4, 1.564)
pt3dadd(43.775, 219.942, -9.4, 1.55)
pt3dadd(43.763, 220.061, -9.4, 1.536)
pt3dadd(43.75, 220.18, -9.4, 1.522)
pt3dadd(43.737, 220.3, -9.4, 1.508)
pt3dadd(43.725, 220.418, -9.4, 1.49)
pt3dadd(43.712, 220.538, -9.4, 1.472)
pt3dadd(43.7, 220.657, -9.4, 1.454)
pt3dadd(43.687, 220.777, -9.4, 1.436)
pt3dadd(43.675, 220.896, -9.4, 1.418)
pt3dadd(43.662, 221.016, -9.4, 1.4)
pt3dadd(43.65, 221.135, -9.4, 1.382)
pt3dadd(43.637, 221.255, -9.4, 1.358)
pt3dadd(43.625, 221.374, -9.4, 1.332)
pt3dadd(43.612, 221.492, -9.4, 1.306)
pt3dadd(43.599, 221.612, -9.4, 1.282)
pt3dadd(43.587, 221.731, -9.4, 1.256)
pt3dadd(43.574, 221.851, -9.4, 1.232)
pt3dadd(43.562, 221.97, -9.4, 1.206)
pt3dadd(43.549, 222.09, -9.4, 1.158)
pt3dadd(43.537, 222.209, -9.4, 1.108)
pt3dadd(43.524, 222.329, -9.4, 1.058)
pt3dadd(43.512, 222.448, -9.4, 1.046)
pt3dadd(43.499, 222.566, -9.4, 1.038)
pt3dadd(43.487, 222.686, -9.4, 1.03)
pt3dadd(43.437, 222.796, -9.4, 1.07)
pt3dadd(43.386, 222.904, -9.4, 1.112)
pt3dadd(43.302, 222.982, -9.4, 1.164)
pt3dadd(43.197, 223.038, -9.4, 1.222)
pt3dadd(43.118, 223.12, -9.4, 1.27)
pt3dadd(43.073, 223.23, -9.4, 1.3)
pt3dadd(43.026, 223.342, -9.402, 1.298)
pt3dadd(42.977, 223.451, -9.404, 1.29)
pt3dadd(42.929, 223.56, -9.406, 1.28)
pt3dadd(42.881, 223.672, -9.408, 1.27)
pt3dadd(42.832, 223.781, -9.41, 1.262)
pt3dadd(42.791, 223.878, -9.436, 1.238)
pt3dadd(42.762, 223.952, -9.512, 1.186)
pt3dadd(42.741, 224.044, -9.565, 1.134)
pt3dadd(42.729, 224.16, -9.587, 1.084)
pt3dadd(42.716, 224.276, -9.609, 1.034)
pt3dadd(42.667, 224.372, -9.649, 0.98)
pt3dadd(42.614, 224.468, -9.688, 0.926)
pt3dadd(42.583, 224.58, -9.66, 0.864)
pt3dadd(42.552, 224.692, -9.633, 0.802)
pt3dadd(42.54, 224.809, -9.618, 0.77)
pt3dadd(42.509, 224.922, -9.61, 0.762)
pt3dadd(42.457, 225.031, -9.607, 0.782)
pt3dadd(42.406, 225.139, -9.604, 0.8)
pt3dadd(42.354, 225.247, -9.601, 0.818)
pt3dadd(42.301, 225.355, -9.6, 0.852)
pt3dadd(42.245, 225.461, -9.6, 0.904)
pt3dadd(42.189, 225.568, -9.6, 0.956)
pt3dadd(42.133, 225.674, -9.6, 1.006)
pt3dadd(42.077, 225.779, -9.6, 1.058)
pt3dadd(42.021, 225.886, -9.6, 1.11)
pt3dadd(41.965, 225.992, -9.6, 1.18)
pt3dadd(41.909, 226.098, -9.6, 1.25)
pt3dadd(41.853, 226.205, -9.6, 1.32)
pt3dadd(41.797, 226.31, -9.6, 1.39)
pt3dadd(41.741, 226.416, -9.6, 1.46)
pt3dadd(41.673, 226.514, -9.6, 1.522)
pt3dadd(41.6, 226.61, -9.6, 1.582)
pt3dadd(41.527, 226.705, -9.6, 1.642)
pt3dadd(41.453, 226.8, -9.6, 1.7)
pt3dadd(41.38, 226.895, -9.6, 1.76)
pt3dadd(41.3, 226.984, -9.6, 1.796)
pt3dadd(41.216, 227.069, -9.6, 1.816)
pt3dadd(41.131, 227.155, -9.6, 1.836)
pt3dadd(41.047, 227.24, -9.6, 1.856)
pt3dadd(40.963, 227.326, -9.6, 1.876)
pt3dadd(40.898, 227.425, -9.6, 1.88)
pt3dadd(40.845, 227.532, -9.6, 1.876)
pt3dadd(40.792, 227.64, -9.6, 1.872)
pt3dadd(40.738, 227.748, -9.6, 1.866)
}
}
proc shape3d_138() {
dend_5[14] { pt3dadd(40.685, 227.856, -9.6, 1.862)
pt3dadd(40.639, 227.965, -9.6, 1.856)
pt3dadd(40.627, 228.084, -9.6, 1.846)
pt3dadd(40.614, 228.204, -9.6, 1.834)
pt3dadd(40.602, 228.323, -9.6, 1.824)
pt3dadd(40.589, 228.443, -9.6, 1.814)
pt3dadd(40.577, 228.562, -9.6, 1.802)
pt3dadd(40.564, 228.682, -9.6, 1.792)
pt3dadd(40.551, 228.8, -9.6, 1.782)
pt3dadd(40.537, 228.919, -9.6, 1.778)
pt3dadd(40.522, 229.039, -9.6, 1.776)
pt3dadd(40.508, 229.158, -9.6, 1.772)
pt3dadd(40.493, 229.277, -9.6, 1.768)
pt3dadd(40.479, 229.397, -9.6, 1.764)
pt3dadd(40.464, 229.516, -9.6, 1.76)
pt3dadd(40.446, 229.633, -9.6, 1.754)
pt3dadd(40.416, 229.75, -9.6, 1.736)
pt3dadd(40.386, 229.866, -9.6, 1.72)
pt3dadd(40.357, 229.982, -9.6, 1.704)
pt3dadd(40.327, 230.099, -9.6, 1.688)
pt3dadd(40.298, 230.215, -9.6, 1.672)
pt3dadd(40.27, 230.332, -9.6, 1.656)
pt3dadd(40.257, 230.45, -9.6, 1.638)
pt3dadd(40.245, 230.57, -9.6, 1.62)
pt3dadd(40.232, 230.689, -9.6, 1.602)
pt3dadd(40.22, 230.808, -9.6, 1.584)
pt3dadd(40.207, 230.928, -9.6, 1.566)
pt3dadd(40.195, 231.047, -9.6, 1.548)
pt3dadd(40.182, 231.167, -9.6, 1.526)
pt3dadd(40.17, 231.286, -9.6, 1.476)
pt3dadd(40.157, 231.406, -9.6, 1.426)
pt3dadd(40.144, 231.524, -9.6, 1.38)
pt3dadd(40.132, 231.644, -9.6, 1.372)
pt3dadd(40.119, 231.763, -9.6, 1.364)
pt3dadd(40.1, 231.881, -9.6, 1.358)
pt3dadd(40.029, 231.977, -9.6, 1.382)
pt3dadd(39.958, 232.073, -9.6, 1.404)
pt3dadd(39.843, 232.093, -9.6, 1.434)
pt3dadd(39.723, 232.108, -9.6, 1.464)
pt3dadd(39.643, 232.164, -9.6, 1.478)
pt3dadd(39.619, 232.282, -9.6, 1.466)
pt3dadd(39.595, 232.399, -9.6, 1.456)
pt3dadd(39.571, 232.517, -9.6, 1.444)
pt3dadd(39.547, 232.634, -9.6, 1.434)
pt3dadd(39.533, 232.753, -9.6, 1.396)
pt3dadd(39.52, 232.873, -9.6, 1.354)
pt3dadd(39.508, 232.992, -9.6, 1.314)
pt3dadd(39.432, 233.08, -9.6, 1.262)
pt3dadd(39.343, 233.16, -9.6, 1.208)
pt3dadd(39.254, 233.24, -9.6, 1.156)
pt3dadd(39.158, 233.312, -9.6, 1.108)
pt3dadd(39.062, 233.384, -9.6, 1.06)
pt3dadd(38.966, 233.455, -9.6, 0.976)
pt3dadd(38.893, 233.55, -9.6, 0.962)
pt3dadd(38.819, 233.645, -9.6, 0.948)
pt3dadd(38.746, 233.74, -9.6, 0.932)
pt3dadd(38.673, 233.836, -9.6, 0.918)
pt3dadd(38.602, 233.932, -9.6, 0.904)
pt3dadd(38.563, 234.044, -9.6, 0.89)
pt3dadd(38.523, 234.158, -9.6, 0.878)
pt3dadd(38.484, 234.271, -9.6, 0.864)
pt3dadd(38.444, 234.385, -9.6, 0.852)
pt3dadd(38.405, 234.498, -9.6, 0.838)
pt3dadd(38.372, 234.613, -9.6, 0.826)
pt3dadd(38.359, 234.732, -9.6, 0.82)
pt3dadd(38.347, 234.852, -9.6, 0.812)
pt3dadd(38.334, 234.971, -9.6, 0.806)
pt3dadd(38.322, 235.091, -9.6, 0.798)
pt3dadd(38.309, 235.21, -9.6, 0.792)
pt3dadd(38.297, 235.33, -9.6, 0.784)
pt3dadd(38.284, 235.448, -9.6, 0.776)
pt3dadd(38.272, 235.567, -9.6, 0.768)
pt3dadd(38.259, 235.687, -9.6, 0.76)
pt3dadd(38.247, 235.805, -9.607, 0.754)
pt3dadd(38.235, 235.92, -9.634, 0.754)
pt3dadd(38.223, 236.034, -9.662, 0.754)
pt3dadd(38.211, 236.148, -9.694, 0.754)
pt3dadd(38.199, 236.26, -9.727, 0.754)
pt3dadd(38.189, 236.352, -9.783, 0.748)
pt3dadd(38.182, 236.42, -9.865, 0.736)
pt3dadd(38.174, 236.497, -9.939, 0.734)
pt3dadd(38.163, 236.598, -9.993, 0.75)
pt3dadd(38.152, 236.707, -10.032, 0.766)
pt3dadd(38.14, 236.819, -10.069, 0.78)
pt3dadd(38.128, 236.929, -10.106, 0.794)
pt3dadd(38.117, 237.04, -10.143, 0.808)
pt3dadd(38.105, 237.15, -10.181, 0.822)
pt3dadd(38.093, 237.266, -10.2, 0.844)
pt3dadd(38.081, 237.385, -10.2, 0.876)
pt3dadd(38.068, 237.505, -10.2, 0.908)
pt3dadd(38.055, 237.624, -10.2, 0.942)
pt3dadd(38.043, 237.744, -10.2, 0.974)
pt3dadd(38.03, 237.863, -10.2, 1.006)
pt3dadd(38.018, 237.982, -10.2, 1.038)
pt3dadd(38.005, 238.102, -10.2, 1.07)
pt3dadd(37.993, 238.22, -10.2, 1.102)
pt3dadd(37.98, 238.34, -10.2, 1.134)
pt3dadd(37.968, 238.459, -10.2, 1.168)
pt3dadd(37.955, 238.579, -10.2, 1.2)
pt3dadd(37.943, 238.698, -10.2, 1.232)
pt3dadd(37.93, 238.818, -10.2, 1.264)
pt3dadd(37.917, 238.937, -10.2, 1.296)
pt3dadd(37.905, 239.056, -10.2, 1.328)
pt3dadd(37.892, 239.176, -10.2, 1.36)
pt3dadd(37.88, 239.294, -10.2, 1.394)
pt3dadd(37.867, 239.414, -10.2, 1.426)
pt3dadd(37.855, 239.533, -10.2, 1.458)
pt3dadd(37.842, 239.653, -10.2, 1.49)
pt3dadd(37.83, 239.772, -10.2, 1.518)
pt3dadd(37.817, 239.892, -10.2, 1.544)
pt3dadd(37.805, 240.011, -10.2, 1.568)
pt3dadd(37.792, 240.13, -10.208, 1.586)
pt3dadd(37.78, 240.246, -10.225, 1.596)
pt3dadd(37.767, 240.364, -10.242, 1.606)
pt3dadd(37.76, 240.431, -10.32, 1.578)
pt3dadd(37.754, 240.492, -10.406, 1.542)
pt3dadd(37.752, 240.55, -10.494, 1.5)
pt3dadd(37.752, 240.606, -10.582, 1.452)
pt3dadd(37.765, 240.689, -10.647, 1.41)
pt3dadd(37.788, 240.792, -10.693, 1.37)
pt3dadd(37.811, 240.898, -10.739, 1.33)
pt3dadd(37.821, 241.007, -10.771, 1.292)
pt3dadd(37.808, 241.126, -10.784, 1.254)
pt3dadd(37.796, 241.243, -10.796, 1.216)
pt3dadd(37.783, 241.362, -10.8, 1.152)
pt3dadd(37.771, 241.482, -10.8, 1.126)
pt3dadd(37.758, 241.601, -10.8, 1.118)
pt3dadd(37.746, 241.721, -10.8, 1.11)
pt3dadd(37.733, 241.84, -10.8, 1.104)
pt3dadd(37.72, 241.96, -10.8, 1.096)
pt3dadd(37.708, 242.078, -10.8, 1.09)
pt3dadd(37.695, 242.198, -10.8, 1.082)
pt3dadd(37.683, 242.317, -10.8, 1.09)
pt3dadd(37.67, 242.436, -10.8, 1.104)
pt3dadd(37.658, 242.556, -10.8, 1.118)
pt3dadd(37.645, 242.675, -10.8, 1.132)
pt3dadd(37.633, 242.795, -10.8, 1.148)
pt3dadd(37.62, 242.914, -10.8, 1.162)
pt3dadd(37.608, 243.034, -10.8, 1.176)
pt3dadd(37.595, 243.152, -10.8, 1.202)
pt3dadd(37.583, 243.272, -10.8, 1.236)
pt3dadd(37.57, 243.391, -10.8, 1.268)
pt3dadd(37.557, 243.511, -10.8, 1.3)
pt3dadd(37.545, 243.63, -10.8, 1.332)
pt3dadd(37.532, 243.749, -10.8, 1.364)
pt3dadd(37.52, 243.869, -10.8, 1.396)
pt3dadd(37.507, 243.988, -10.807, 1.434)
pt3dadd(37.495, 244.106, -10.818, 1.474)
pt3dadd(37.482, 244.225, -10.828, 1.512)
pt3dadd(37.47, 244.344, -10.839, 1.552)
pt3dadd(37.457, 244.462, -10.849, 1.592)
pt3dadd(37.445, 244.582, -10.86, 1.632)
pt3dadd(37.432, 244.699, -10.868, 1.662)
pt3dadd(37.42, 244.819, -10.873, 1.672)
pt3dadd(37.407, 244.938, -10.878, 1.684)
pt3dadd(37.395, 245.057, -10.883, 1.696)
pt3dadd(37.382, 245.177, -10.888, 1.706)
pt3dadd(37.37, 245.296, -10.893, 1.718)
pt3dadd(37.357, 245.416, -10.898, 1.728)
pt3dadd(37.344, 245.534, -10.9, 1.728)
pt3dadd(37.329, 245.653, -10.9, 1.72)
pt3dadd(37.315, 245.773, -10.9, 1.714)
pt3dadd(37.3, 245.892, -10.9, 1.706)
pt3dadd(37.286, 246.011, -10.9, 1.698)
pt3dadd(37.271, 246.131, -10.9, 1.692)
pt3dadd(37.257, 246.25, -10.9, 1.684)
pt3dadd(37.209, 246.356, -10.911, 1.662)
pt3dadd(37.151, 246.461, -10.924, 1.636)
pt3dadd(37.094, 246.564, -10.938, 1.612)
pt3dadd(37.036, 246.668, -10.952, 1.586)
pt3dadd(36.978, 246.772, -10.965, 1.56)
pt3dadd(36.946, 246.887, -10.979, 1.5)
pt3dadd(36.918, 247.002, -10.993, 1.438)
pt3dadd(36.876, 247.106, -11.021, 1.358)
pt3dadd(36.823, 247.201, -11.063, 1.264)
pt3dadd(36.797, 247.26, -11.139, 1.186)
pt3dadd(36.787, 247.302, -11.232, 1.12)
pt3dadd(36.75, 247.342, -11.316, 1.058)
pt3dadd(36.671, 247.378, -11.385, 1)
pt3dadd(36.614, 247.435, -11.456, 0.964)
pt3dadd(36.571, 247.506, -11.529, 0.94)
pt3dadd(36.529, 247.577, -11.602, 0.914)
pt3dadd(36.472, 247.657, -11.654, 0.888)
pt3dadd(36.403, 247.745, -11.691, 0.86)
pt3dadd(36.338, 247.843, -11.7, 0.854)
pt3dadd(36.274, 247.944, -11.7, 0.866)
pt3dadd(36.209, 248.046, -11.7, 0.876)
pt3dadd(36.145, 248.147, -11.7, 0.878)
pt3dadd(36.08, 248.248, -11.7, 0.878)
pt3dadd(36.014, 248.347, -11.703, 0.866)
pt3dadd(35.947, 248.448, -11.708, 0.844)
pt3dadd(35.883, 248.536, -11.736, 0.812)
pt3dadd(35.822, 248.606, -11.799, 0.77)
pt3dadd(35.762, 248.656, -11.874, 0.714)
pt3dadd(35.702, 248.717, -11.933, 0.668)
pt3dadd(35.64, 248.814, -11.96, 0.646)
pt3dadd(35.578, 248.911, -11.986, 0.624)
pt3dadd(35.515, 249.008, -12.014, 0.6)
pt3dadd(35.449, 249.083, -12.069, 0.57)
pt3dadd(35.385, 249.16, -12.125, 0.552)
}
}
proc shape3d_139() {
dend_5[14] { pt3dadd(35.324, 249.236, -12.181, 0.552)
pt3dadd(35.26, 249.33, -12.2, 0.56)
pt3dadd(35.195, 249.432, -12.2, 0.572)
pt3dadd(35.13, 249.533, -12.198, 0.578)
pt3dadd(35.063, 249.631, -12.193, 0.578)
pt3dadd(35.004, 249.722, -12.168, 0.572)
pt3dadd(34.963, 249.797, -12.099, 0.552)
pt3dadd(34.906, 249.9, -12.077, 0.552)
pt3dadd(34.85, 250.002, -12.056, 0.552)
pt3dadd(34.793, 250.105, -12.035, 0.552)
pt3dadd(34.737, 250.207, -12.013, 0.552)
pt3dadd(34.675, 250.308, -12, 0.558)
pt3dadd(34.605, 250.406, -12, 0.572)
pt3dadd(34.534, 250.502, -12, 0.588)
pt3dadd(34.464, 250.6, -12, 0.602)
pt3dadd(34.394, 250.698, -12, 0.616)
pt3dadd(34.326, 250.793, -11.989, 0.636)
pt3dadd(34.266, 250.882, -11.944, 0.664)
pt3dadd(34.206, 250.972, -11.899, 0.694)
pt3dadd(34.146, 251.059, -11.854, 0.724)
pt3dadd(34.085, 251.148, -11.811, 0.754)
pt3dadd(34.005, 251.237, -11.809, 0.806)
pt3dadd(33.925, 251.327, -11.807, 0.856)
pt3dadd(33.845, 251.416, -11.804, 0.908)
pt3dadd(33.765, 251.506, -11.802, 0.958)
pt3dadd(33.684, 251.594, -11.8, 1.01)
pt3dadd(33.603, 251.682, -11.8, 1.06)
pt3dadd(33.521, 251.771, -11.8, 1.11)
pt3dadd(33.44, 251.858, -11.8, 1.16)
pt3dadd(33.358, 251.946, -11.8, 1.21)
pt3dadd(33.279, 252.037, -11.8, 1.26)
pt3dadd(33.229, 252.145, -11.8, 1.3)
pt3dadd(33.178, 252.254, -11.8, 1.342)
pt3dadd(33.128, 252.364, -11.8, 1.382)
pt3dadd(33.078, 252.472, -11.8, 1.424)
pt3dadd(33.027, 252.581, -11.8, 1.464)
pt3dadd(32.964, 252.682, -11.8, 1.474)
pt3dadd(32.891, 252.778, -11.8, 1.458)
pt3dadd(32.818, 252.872, -11.8, 1.444)
pt3dadd(32.745, 252.967, -11.8, 1.428)
pt3dadd(32.672, 253.063, -11.8, 1.414)
pt3dadd(32.592, 253.152, -11.8, 1.386)
pt3dadd(32.504, 253.235, -11.8, 1.346)
pt3dadd(32.417, 253.318, -11.8, 1.306)
pt3dadd(32.33, 253.399, -11.8, 1.264)
pt3dadd(32.243, 253.482, -11.8, 1.224)
pt3dadd(32.168, 253.572, -11.813, 1.17)
pt3dadd(32.104, 253.669, -11.837, 1.104)
pt3dadd(32.041, 253.766, -11.862, 1.036)
pt3dadd(31.977, 253.865, -11.887, 0.97)
pt3dadd(31.913, 253.962, -11.911, 0.904)
pt3dadd(31.855, 254.054, -11.951, 0.868)
pt3dadd(31.798, 254.148, -11.991, 0.832)
pt3dadd(31.74, 254.243, -12.031, 0.796)
pt3dadd(31.682, 254.335, -12.071, 0.76)
pt3dadd(31.6, 254.41, -12.047, 0.698)
pt3dadd(31.52, 254.486, -12.035, 0.644)
pt3dadd(31.455, 254.574, -12.074, 0.614)
pt3dadd(31.392, 254.671, -12.078, 0.586)
pt3dadd(31.331, 254.773, -12.06, 0.558)
pt3dadd(31.3, 254.856, -12, 0.552)
pt3dadd(31.278, 254.936, -11.927, 0.552)
pt3dadd(31.228, 255.035, -11.905, 0.58)
pt3dadd(31.167, 255.138, -11.9, 0.608)
pt3dadd(31.1, 255.238, -11.9, 0.622)
pt3dadd(31.033, 255.336, -11.9, 0.636)
pt3dadd(30.965, 255.436, -11.9, 0.652)
pt3dadd(30.898, 255.535, -11.9, 0.666)
pt3dadd(30.836, 255.635, -11.895, 0.682)
pt3dadd(30.803, 255.745, -11.863, 0.702)
pt3dadd(30.77, 255.854, -11.831, 0.722)
pt3dadd(30.736, 255.962, -11.799, 0.742)
pt3dadd(30.703, 256.072, -11.767, 0.764)
pt3dadd(30.675, 256.183, -11.743, 0.786)
pt3dadd(30.663, 256.301, -11.736, 0.812)
pt3dadd(30.65, 256.421, -11.729, 0.84)
pt3dadd(30.638, 256.54, -11.722, 0.866)
pt3dadd(30.625, 256.66, -11.715, 0.892)
pt3dadd(30.613, 256.777, -11.709, 0.92)
pt3dadd(30.6, 256.897, -11.702, 0.946)
pt3dadd(30.588, 257.016, -11.7, 0.974)
pt3dadd(30.575, 257.136, -11.7, 1.002)
pt3dadd(30.562, 257.255, -11.7, 1.032)
pt3dadd(30.55, 257.374, -11.7, 1.06)
pt3dadd(30.537, 257.494, -11.7, 1.09)
pt3dadd(30.525, 257.612, -11.7, 1.118)
pt3dadd(30.512, 257.732, -11.7, 1.146)
pt3dadd(30.469, 257.843, -11.7, 1.174)
pt3dadd(30.413, 257.948, -11.7, 1.202)
pt3dadd(30.357, 258.055, -11.7, 1.23)
pt3dadd(30.301, 258.161, -11.7, 1.258)
pt3dadd(30.245, 258.266, -11.7, 1.286)
pt3dadd(30.203, 258.378, -11.7, 1.306)
pt3dadd(30.191, 258.497, -11.7, 1.306)
pt3dadd(30.178, 258.617, -11.7, 1.306)
pt3dadd(30.165, 258.736, -11.7, 1.306)
pt3dadd(30.153, 258.856, -11.7, 1.306)
pt3dadd(30.14, 258.974, -11.7, 1.306)
pt3dadd(30.128, 259.094, -11.7, 1.306)
pt3dadd(30.11, 259.211, -11.699, 1.302)
pt3dadd(30.08, 259.327, -11.698, 1.29)
pt3dadd(30.05, 259.444, -11.696, 1.276)
pt3dadd(30.02, 259.56, -11.694, 1.264)
pt3dadd(29.99, 259.676, -11.692, 1.252)
pt3dadd(29.96, 259.793, -11.69, 1.24)
pt3dadd(29.934, 259.909, -11.685, 1.228)
pt3dadd(29.919, 260.028, -11.671, 1.214)
pt3dadd(29.905, 260.144, -11.656, 1.202)
pt3dadd(29.891, 260.262, -11.641, 1.19)
pt3dadd(29.876, 260.38, -11.627, 1.178)
pt3dadd(29.861, 260.498, -11.612, 1.166)
pt3dadd(29.847, 260.616, -11.6, 1.154)
pt3dadd(29.832, 260.735, -11.6, 1.146)
pt3dadd(29.818, 260.855, -11.6, 1.14)
pt3dadd(29.803, 260.974, -11.6, 1.132)
pt3dadd(29.789, 261.092, -11.6, 1.124)
pt3dadd(29.775, 261.211, -11.6, 1.118)
pt3dadd(29.76, 261.331, -11.6, 1.11)
pt3dadd(29.74, 261.446, -11.591, 1.102)
pt3dadd(29.707, 261.556, -11.559, 1.092)
pt3dadd(29.673, 261.665, -11.527, 1.082)
pt3dadd(29.64, 261.773, -11.495, 1.072)
pt3dadd(29.607, 261.882, -11.463, 1.06)
pt3dadd(29.564, 261.99, -11.441, 1.048)
pt3dadd(29.508, 262.094, -11.432, 1.034)
pt3dadd(29.452, 262.201, -11.423, 1.018)
pt3dadd(29.396, 262.306, -11.414, 1.004)
pt3dadd(29.339, 262.411, -11.406, 0.988)
pt3dadd(29.291, 262.52, -11.4, 0.98)
pt3dadd(29.256, 262.636, -11.4, 0.98)
pt3dadd(29.222, 262.75, -11.4, 0.98)
pt3dadd(29.187, 262.866, -11.4, 0.98)
pt3dadd(29.153, 262.98, -11.4, 0.98)
pt3dadd(29.118, 263.095, -11.4, 0.98)
pt3dadd(29.082, 263.209, -11.4, 0.982)
pt3dadd(29.043, 263.322, -11.4, 0.992)
pt3dadd(29.003, 263.436, -11.4, 1)
pt3dadd(28.964, 263.549, -11.4, 1.008)
pt3dadd(28.924, 263.664, -11.4, 1.016)
pt3dadd(28.885, 263.777, -11.4, 1.026)
pt3dadd(28.823, 263.876, -11.4, 1.04)
pt3dadd(28.742, 263.964, -11.4, 1.06)
pt3dadd(28.66, 264.052, -11.4, 1.08)
pt3dadd(28.578, 264.14, -11.4, 1.1)
pt3dadd(28.497, 264.228, -11.4, 1.12)
pt3dadd(28.419, 264.32, -11.4, 1.136)
pt3dadd(28.346, 264.415, -11.4, 1.146)
pt3dadd(28.273, 264.51, -11.4, 1.154)
pt3dadd(28.2, 264.605, -11.4, 1.164)
pt3dadd(28.126, 264.7, -11.4, 1.174)
pt3dadd(28.056, 264.797, -11.4, 1.186)
pt3dadd(27.988, 264.896, -11.4, 1.202)
pt3dadd(27.921, 264.995, -11.4, 1.216)
pt3dadd(27.853, 265.094, -11.4, 1.23)
pt3dadd(27.786, 265.193, -11.4, 1.246)
pt3dadd(27.705, 265.274, -11.4, 1.266)
pt3dadd(27.589, 265.301, -11.4, 1.31)
pt3dadd(27.472, 265.328, -11.4, 1.352)
pt3dadd(27.384, 265.404, -11.384, 1.416)
pt3dadd(27.298, 265.487, -11.367, 1.48)
pt3dadd(27.23, 265.576, -11.331, 1.508)
pt3dadd(27.161, 265.664, -11.3, 1.526)
pt3dadd(27.09, 265.76, -11.3, 1.492)
pt3dadd(27.019, 265.859, -11.3, 1.458)
pt3dadd(26.998, 265.975, -11.3, 1.354)
pt3dadd(26.976, 266.094, -11.3, 1.254)
pt3dadd(26.928, 266.203, -11.3, 1.222)
pt3dadd(26.881, 266.314, -11.3, 1.19)
pt3dadd(26.833, 266.424, -11.3, 1.158)
pt3dadd(26.785, 266.533, -11.3, 1.128)
pt3dadd(26.738, 266.645, -11.3, 1.096)
pt3dadd(26.705, 266.758, -11.3, 1.078)
pt3dadd(26.686, 266.876, -11.3, 1.074)
pt3dadd(26.668, 266.995, -11.3, 1.07)
pt3dadd(26.649, 267.114, -11.3, 1.066)
pt3dadd(26.631, 267.233, -11.3, 1.062)
pt3dadd(26.612, 267.352, -11.3, 1.06)
pt3dadd(26.594, 267.47, -11.3, 1.056)
pt3dadd(26.565, 267.587, -11.3, 1.082)
pt3dadd(26.532, 267.702, -11.3, 1.114)
pt3dadd(26.501, 267.817, -11.3, 1.148)
pt3dadd(26.469, 267.932, -11.3, 1.18)
pt3dadd(26.436, 268.049, -11.3, 1.214)
pt3dadd(26.405, 268.165, -11.3, 1.246)
pt3dadd(26.374, 268.28, -11.3, 1.286)
pt3dadd(26.345, 268.397, -11.3, 1.326)
pt3dadd(26.315, 268.513, -11.3, 1.366)
pt3dadd(26.286, 268.628, -11.3, 1.408)
pt3dadd(26.256, 268.745, -11.3, 1.448)
pt3dadd(26.226, 268.861, -11.3, 1.488)
pt3dadd(26.175, 268.964, -11.283, 1.532)
pt3dadd(26.107, 269.057, -11.252, 1.578)
pt3dadd(26.039, 269.148, -11.221, 1.624)
pt3dadd(25.971, 269.239, -11.191, 1.672)
pt3dadd(25.909, 269.334, -11.159, 1.708)
pt3dadd(25.872, 269.441, -11.124, 1.714)
pt3dadd(25.836, 269.546, -11.089, 1.72)
pt3dadd(25.799, 269.653, -11.054, 1.724)
pt3dadd(25.763, 269.759, -11.019, 1.73)
pt3dadd(25.731, 269.87, -11, 1.724)
}
}
proc shape3d_140() {
dend_5[14] { pt3dadd(25.703, 269.987, -11, 1.706)
pt3dadd(25.676, 270.104, -11, 1.686)
pt3dadd(25.631, 270.212, -10.983, 1.654)
pt3dadd(25.581, 270.318, -10.962, 1.618)
pt3dadd(25.548, 270.362, -10.886, 1.608)
pt3dadd(25.521, 270.384, -10.79, 1.608)
pt3dadd(25.457, 270.426, -10.732, 1.62)
pt3dadd(25.357, 270.487, -10.708, 1.648)
pt3dadd(25.293, 270.581, -10.7, 1.678)
pt3dadd(25.248, 270.69, -10.7, 1.708)
pt3dadd(25.158, 270.77, -10.7, 1.718)
pt3dadd(25.068, 270.85, -10.7, 1.728)
pt3dadd(24.979, 270.93, -10.7, 1.738)
pt3dadd(24.889, 271.01, -10.7, 1.748)
pt3dadd(24.801, 271.091, -10.7, 1.758)
pt3dadd(24.739, 271.194, -10.7, 1.758)
pt3dadd(24.678, 271.296, -10.7, 1.758)
pt3dadd(24.616, 271.4, -10.7, 1.758)
pt3dadd(24.554, 271.504, -10.7, 1.758)
pt3dadd(24.493, 271.606, -10.7, 1.758)
pt3dadd(24.433, 271.71, -10.7, 1.758)
pt3dadd(24.375, 271.814, -10.7, 1.758)
pt3dadd(24.316, 271.92, -10.7, 1.758)
pt3dadd(24.257, 272.023, -10.7, 1.758)
pt3dadd(24.198, 272.129, -10.7, 1.758)
pt3dadd(24.141, 272.233, -10.7, 1.756)
pt3dadd(24.085, 272.34, -10.7, 1.752)
pt3dadd(24.029, 272.446, -10.7, 1.746)
pt3dadd(23.973, 272.552, -10.7, 1.742)
pt3dadd(23.917, 272.658, -10.7, 1.738)
pt3dadd(23.859, 272.764, -10.7, 1.734)
pt3dadd(23.777, 272.851, -10.7, 1.738)
pt3dadd(23.695, 272.939, -10.7, 1.744)
pt3dadd(23.614, 273.028, -10.7, 1.748)
pt3dadd(23.532, 273.115, -10.7, 1.754)
pt3dadd(23.455, 273.205, -10.7, 1.758)
pt3dadd(23.423, 273.32, -10.7, 1.762)
pt3dadd(23.391, 273.436, -10.7, 1.766)
pt3dadd(23.359, 273.552, -10.7, 1.77)
pt3dadd(23.327, 273.668, -10.7, 1.774)
pt3dadd(23.295, 273.782, -10.7, 1.778)
pt3dadd(23.263, 273.899, -10.7, 1.782)
}
dend_5[15] {pt3dclear()
pt3dadd(23.263, 273.899, -10.7, 1.782)
pt3dadd(23.206, 273.959, -10.7, 1.78)
pt3dadd(23.124, 274.048, -10.7, 1.774)
pt3dadd(23.043, 274.135, -10.7, 1.77)
pt3dadd(22.961, 274.223, -10.7, 1.764)
pt3dadd(22.88, 274.312, -10.7, 1.76)
pt3dadd(22.794, 274.397, -10.7, 1.734)
pt3dadd(22.707, 274.478, -10.7, 1.698)
pt3dadd(22.62, 274.561, -10.7, 1.662)
pt3dadd(22.533, 274.644, -10.7, 1.626)
pt3dadd(22.446, 274.727, -10.7, 1.592)
pt3dadd(22.356, 274.805, -10.7, 1.538)
pt3dadd(22.263, 274.883, -10.7, 1.476)
pt3dadd(22.171, 274.96, -10.7, 1.416)
pt3dadd(22.079, 275.035, -10.7, 1.356)
pt3dadd(21.987, 275.112, -10.7, 1.294)
pt3dadd(21.914, 275.208, -10.7, 1.236)
pt3dadd(21.847, 275.306, -10.7, 1.178)
pt3dadd(21.779, 275.406, -10.7, 1.118)
pt3dadd(21.712, 275.504, -10.7, 1.06)
pt3dadd(21.645, 275.604, -10.7, 1.002)
pt3dadd(21.572, 275.7, -10.7, 0.958)
pt3dadd(21.496, 275.792, -10.7, 0.924)
pt3dadd(21.42, 275.886, -10.7, 0.888)
pt3dadd(21.344, 275.977, -10.7, 0.854)
pt3dadd(21.267, 276.071, -10.7, 0.82)
pt3dadd(21.206, 276.172, -10.7, 0.804)
pt3dadd(21.155, 276.281, -10.7, 0.804)
pt3dadd(21.105, 276.39, -10.7, 0.804)
pt3dadd(21.054, 276.499, -10.7, 0.804)
pt3dadd(21.004, 276.608, -10.7, 0.804)
pt3dadd(20.953, 276.716, -10.7, 0.804)
pt3dadd(20.898, 276.822, -10.7, 0.818)
pt3dadd(20.842, 276.929, -10.7, 0.832)
pt3dadd(20.786, 277.036, -10.7, 0.846)
pt3dadd(20.73, 277.141, -10.7, 0.86)
pt3dadd(20.673, 277.248, -10.7, 0.874)
pt3dadd(20.629, 277.357, -10.713, 0.888)
pt3dadd(20.591, 277.469, -10.732, 0.904)
pt3dadd(20.553, 277.58, -10.752, 0.918)
pt3dadd(20.516, 277.691, -10.771, 0.932)
pt3dadd(20.478, 277.802, -10.791, 0.948)
pt3dadd(20.425, 277.906, -10.812, 0.954)
pt3dadd(20.358, 278.003, -10.834, 0.954)
pt3dadd(20.292, 278.1, -10.856, 0.954)
pt3dadd(20.226, 278.195, -10.878, 0.954)
pt3dadd(20.16, 278.292, -10.9, 0.954)
pt3dadd(20.106, 278.4, -10.895, 0.92)
pt3dadd(20.054, 278.507, -10.89, 0.888)
pt3dadd(20.012, 278.611, -10.86, 0.86)
pt3dadd(19.974, 278.716, -10.821, 0.834)
pt3dadd(19.925, 278.822, -10.807, 0.812)
pt3dadd(19.872, 278.93, -10.802, 0.79)
pt3dadd(19.816, 279.034, -10.811, 0.778)
pt3dadd(19.759, 279.136, -10.833, 0.778)
pt3dadd(19.716, 279.193, -10.894, 0.77)
pt3dadd(19.687, 279.209, -10.99, 0.754)
pt3dadd(19.634, 279.286, -11.052, 0.768)
pt3dadd(19.582, 279.37, -11.101, 0.784)
pt3dadd(19.536, 279.481, -11.106, 0.806)
pt3dadd(19.491, 279.593, -11.111, 0.826)
pt3dadd(19.449, 279.622, -11.194, 0.874)
pt3dadd(19.407, 279.643, -11.286, 0.922)
pt3dadd(19.397, 279.68, -11.38, 0.966)
pt3dadd(19.393, 279.72, -11.475, 1.008)
pt3dadd(19.368, 279.793, -11.535, 1.04)
pt3dadd(19.321, 279.899, -11.561, 1.062)
pt3dadd(19.274, 280.004, -11.588, 1.086)
pt3dadd(19.224, 280.099, -11.62, 1.104)
pt3dadd(19.146, 280.097, -11.696, 1.092)
pt3dadd(19.069, 280.097, -11.772, 1.076)
pt3dadd(19.01, 280.134, -11.853, 1.014)
pt3dadd(18.956, 280.225, -11.889, 0.92)
pt3dadd(18.888, 280.303, -11.855, 0.904)
pt3dadd(18.851, 280.34, -11.765, 0.916)
pt3dadd(18.839, 280.402, -11.682, 0.858)
pt3dadd(18.834, 280.513, -11.645, 0.832)
pt3dadd(18.83, 280.626, -11.611, 0.806)
pt3dadd(18.826, 280.739, -11.577, 0.782)
pt3dadd(18.822, 280.85, -11.543, 0.758)
pt3dadd(18.817, 280.963, -11.509, 0.734)
pt3dadd(18.832, 281.081, -11.5, 0.714)
pt3dadd(18.853, 281.198, -11.5, 0.692)
pt3dadd(18.868, 281.317, -11.5, 0.672)
pt3dadd(18.87, 281.437, -11.5, 0.654)
pt3dadd(18.872, 281.557, -11.5, 0.634)
pt3dadd(18.884, 281.676, -11.5, 0.614)
pt3dadd(18.9, 281.795, -11.5, 0.592)
pt3dadd(18.877, 281.894, -11.5, 0.566)
pt3dadd(18.771, 281.951, -11.5, 0.532)
pt3dadd(18.664, 282.004, -11.5, 0.5)
pt3dadd(18.548, 282.036, -11.5, 0.484)
pt3dadd(18.475, 282.116, -11.5, 0.488)
pt3dadd(18.428, 282.226, -11.5, 0.506)
pt3dadd(18.38, 282.336, -11.5, 0.524)
pt3dadd(18.332, 282.446, -11.5, 0.542)
pt3dadd(18.285, 282.557, -11.5, 0.56)
pt3dadd(18.237, 282.666, -11.5, 0.578)
pt3dadd(18.189, 282.778, -11.5, 0.602)
pt3dadd(18.142, 282.887, -11.5, 0.624)
pt3dadd(18.094, 282.996, -11.5, 0.646)
pt3dadd(18.046, 283.108, -11.5, 0.668)
pt3dadd(17.999, 283.217, -11.5, 0.69)
pt3dadd(17.937, 283.318, -11.5, 0.714)
pt3dadd(17.858, 283.409, -11.5, 0.74)
pt3dadd(17.779, 283.499, -11.5, 0.764)
pt3dadd(17.7, 283.59, -11.5, 0.79)
pt3dadd(17.621, 283.68, -11.5, 0.814)
pt3dadd(17.546, 283.772, -11.5, 0.844)
pt3dadd(17.474, 283.87, -11.5, 0.878)
pt3dadd(17.414, 283.972, -11.5, 0.908)
pt3dadd(17.387, 284.088, -11.5, 0.928)
pt3dadd(17.36, 284.204, -11.5, 0.946)
pt3dadd(17.338, 284.323, -11.5, 0.954)
pt3dadd(17.321, 284.442, -11.5, 0.954)
pt3dadd(17.304, 284.561, -11.5, 0.954)
pt3dadd(17.239, 284.644, -11.525, 0.918)
pt3dadd(17.15, 284.71, -11.562, 0.86)
pt3dadd(17.05, 284.708, -11.614, 0.748)
pt3dadd(16.962, 284.708, -11.679, 0.64)
pt3dadd(16.892, 284.722, -11.759, 0.548)
pt3dadd(16.829, 284.772, -11.824, 0.482)
pt3dadd(16.776, 284.862, -11.872, 0.44)
pt3dadd(16.714, 284.958, -11.892, 0.442)
pt3dadd(16.647, 285.059, -11.898, 0.466)
pt3dadd(16.578, 285.156, -11.9, 0.502)
pt3dadd(16.507, 285.252, -11.9, 0.546)
pt3dadd(16.428, 285.337, -11.911, 0.586)
pt3dadd(16.332, 285.398, -11.944, 0.61)
pt3dadd(16.237, 285.46, -11.977, 0.636)
pt3dadd(16.161, 285.532, -12.016, 0.652)
pt3dadd(16.131, 285.63, -12.066, 0.652)
pt3dadd(16.106, 285.734, -12.111, 0.648)
pt3dadd(16.094, 285.847, -12.142, 0.632)
pt3dadd(16.083, 285.961, -12.174, 0.616)
pt3dadd(16.071, 286.074, -12.2, 0.6)
pt3dadd(16.058, 286.194, -12.2, 0.584)
pt3dadd(16.046, 286.313, -12.2, 0.566)
pt3dadd(16.033, 286.433, -12.2, 0.548)
pt3dadd(16.017, 286.552, -12.2, 0.528)
pt3dadd(15.988, 286.668, -12.2, 0.528)
pt3dadd(15.958, 286.784, -12.2, 0.528)
pt3dadd(15.929, 286.901, -12.2, 0.528)
pt3dadd(15.899, 287.017, -12.2, 0.528)
pt3dadd(15.869, 287.134, -12.2, 0.528)
pt3dadd(15.84, 287.249, -12.2, 0.528)
pt3dadd(15.823, 287.369, -12.2, 0.536)
pt3dadd(15.806, 287.488, -12.2, 0.544)
pt3dadd(15.789, 287.606, -12.2, 0.556)
pt3dadd(15.776, 287.725, -12.2, 0.598)
pt3dadd(15.764, 287.845, -12.2, 0.64)
pt3dadd(15.745, 287.96, -12.2, 0.688)
pt3dadd(15.674, 288.058, -12.2, 0.78)
pt3dadd(15.603, 288.155, -12.2, 0.872)
pt3dadd(15.487, 288.175, -12.2, 0.98)
pt3dadd(15.368, 288.19, -12.2, 1.09)
pt3dadd(15.279, 288.242, -12.2, 1.206)
pt3dadd(15.235, 288.354, -12.2, 1.33)
}
}
proc shape3d_141() {
dend_5[15] { pt3dadd(15.17, 288.455, -12.2, 1.38)
pt3dadd(15.099, 288.551, -12.2, 1.408)
pt3dadd(15.029, 288.648, -12.2, 1.438)
pt3dadd(14.958, 288.746, -12.2, 1.468)
pt3dadd(14.888, 288.842, -12.2, 1.496)
pt3dadd(14.805, 288.928, -12.2, 1.514)
pt3dadd(14.714, 289.007, -12.2, 1.526)
pt3dadd(14.618, 289.078, -12.2, 1.532)
pt3dadd(14.517, 289.144, -12.2, 1.532)
pt3dadd(14.433, 289.22, -12.214, 1.538)
pt3dadd(14.373, 289.314, -12.25, 1.55)
pt3dadd(14.285, 289.356, -12.285, 1.568)
pt3dadd(14.172, 289.349, -12.319, 1.592)
pt3dadd(14.083, 289.351, -12.371, 1.61)
pt3dadd(14.057, 289.373, -12.467, 1.622)
pt3dadd(14.032, 289.4, -12.559, 1.622)
pt3dadd(14.02, 289.51, -12.593, 1.476)
pt3dadd(14.008, 289.63, -12.6, 1.316)
pt3dadd(13.995, 289.748, -12.6, 1.198)
pt3dadd(13.976, 289.867, -12.6, 1.156)
pt3dadd(13.929, 289.976, -12.6, 1.172)
pt3dadd(13.83, 290.036, -12.6, 1.172)
pt3dadd(13.721, 290.086, -12.6, 1.16)
pt3dadd(13.619, 290.148, -12.6, 1.12)
pt3dadd(13.523, 290.22, -12.6, 1.06)
pt3dadd(13.459, 290.314, -12.6, 1.006)
pt3dadd(13.432, 290.43, -12.6, 0.958)
pt3dadd(13.405, 290.546, -12.6, 0.908)
pt3dadd(13.378, 290.665, -12.6, 0.86)
pt3dadd(13.325, 290.77, -12.614, 0.81)
pt3dadd(13.269, 290.874, -12.63, 0.762)
pt3dadd(13.218, 290.964, -12.678, 0.756)
pt3dadd(13.177, 291.06, -12.728, 0.774)
pt3dadd(13.137, 291.156, -12.778, 0.792)
pt3dadd(13.097, 291.252, -12.828, 0.808)
pt3dadd(13.057, 291.347, -12.878, 0.826)
pt3dadd(12.971, 291.374, -12.934, 0.838)
pt3dadd(12.873, 291.385, -12.991, 0.852)
pt3dadd(12.799, 291.446, -13.049, 0.842)
pt3dadd(12.736, 291.521, -13.1, 0.826)
pt3dadd(12.719, 291.64, -13.1, 0.8)
pt3dadd(12.702, 291.758, -13.1, 0.774)
pt3dadd(12.686, 291.877, -13.1, 0.748)
pt3dadd(12.673, 291.996, -13.1, 0.722)
pt3dadd(12.66, 292.116, -13.1, 0.698)
pt3dadd(12.648, 292.235, -13.099, 0.672)
pt3dadd(12.635, 292.355, -13.093, 0.646)
pt3dadd(12.623, 292.471, -13.078, 0.626)
pt3dadd(12.611, 292.584, -13.043, 0.622)
pt3dadd(12.6, 292.694, -13.009, 0.618)
pt3dadd(12.588, 292.807, -12.974, 0.612)
pt3dadd(12.576, 292.919, -12.939, 0.608)
pt3dadd(12.564, 293.032, -12.905, 0.604)
pt3dadd(12.569, 293.15, -12.9, 0.602)
pt3dadd(12.576, 293.27, -12.9, 0.602)
pt3dadd(12.584, 293.389, -12.9, 0.602)
pt3dadd(12.591, 293.509, -12.9, 0.602)
pt3dadd(12.598, 293.628, -12.9, 0.602)
pt3dadd(12.605, 293.748, -12.9, 0.602)
pt3dadd(12.657, 293.854, -12.907, 0.598)
pt3dadd(12.721, 293.954, -12.917, 0.594)
pt3dadd(12.784, 294.055, -12.926, 0.588)
pt3dadd(12.848, 294.156, -12.936, 0.582)
pt3dadd(12.907, 294.259, -12.948, 0.578)
pt3dadd(12.92, 294.372, -12.98, 0.578)
pt3dadd(12.933, 294.484, -13.012, 0.578)
pt3dadd(12.947, 294.598, -13.045, 0.578)
pt3dadd(12.96, 294.71, -13.077, 0.578)
pt3dadd(12.966, 294.826, -13.1, 0.582)
pt3dadd(12.956, 294.944, -13.1, 0.602)
pt3dadd(12.945, 295.064, -13.1, 0.62)
pt3dadd(12.934, 295.184, -13.1, 0.638)
pt3dadd(12.924, 295.303, -13.1, 0.656)
pt3dadd(12.913, 295.423, -13.1, 0.674)
pt3dadd(12.902, 295.542, -13.1, 0.692)
pt3dadd(12.891, 295.662, -13.1, 0.718)
pt3dadd(12.878, 295.781, -13.1, 0.754)
pt3dadd(12.866, 295.901, -13.1, 0.788)
pt3dadd(12.853, 296.02, -13.1, 0.824)
pt3dadd(12.841, 296.14, -13.1, 0.86)
pt3dadd(12.828, 296.258, -13.1, 0.896)
pt3dadd(12.816, 296.378, -13.1, 0.932)
pt3dadd(12.803, 296.497, -13.1, 0.966)
pt3dadd(12.791, 296.617, -13.1, 1)
pt3dadd(12.778, 296.736, -13.1, 1.032)
pt3dadd(12.766, 296.856, -13.1, 1.064)
pt3dadd(12.753, 296.975, -13.1, 1.096)
pt3dadd(12.741, 297.094, -13.1, 1.128)
pt3dadd(12.728, 297.214, -13.1, 1.16)
pt3dadd(12.715, 297.332, -13.1, 1.182)
pt3dadd(12.703, 297.452, -13.1, 1.186)
pt3dadd(12.69, 297.571, -13.1, 1.188)
pt3dadd(12.678, 297.691, -13.1, 1.192)
pt3dadd(12.665, 297.81, -13.1, 1.196)
pt3dadd(12.653, 297.93, -13.1, 1.2)
pt3dadd(12.64, 298.049, -13.1, 1.202)
pt3dadd(12.628, 298.168, -13.1, 1.198)
pt3dadd(12.615, 298.288, -13.1, 1.18)
pt3dadd(12.603, 298.406, -13.1, 1.162)
pt3dadd(12.59, 298.526, -13.1, 1.144)
pt3dadd(12.577, 298.645, -13.1, 1.126)
pt3dadd(12.565, 298.765, -13.1, 1.108)
pt3dadd(12.552, 298.884, -13.1, 1.09)
pt3dadd(12.54, 299.004, -13.1, 1.072)
pt3dadd(12.527, 299.123, -13.1, 1.05)
pt3dadd(12.515, 299.243, -13.1, 1.028)
pt3dadd(12.502, 299.362, -13.1, 1.006)
pt3dadd(12.49, 299.48, -13.1, 0.986)
pt3dadd(12.477, 299.6, -13.1, 0.964)
pt3dadd(12.465, 299.719, -13.1, 0.942)
pt3dadd(12.437, 299.834, -13.1, 0.922)
pt3dadd(12.387, 299.944, -13.1, 0.904)
pt3dadd(12.336, 300.053, -13.1, 0.886)
pt3dadd(12.286, 300.161, -13.1, 0.868)
pt3dadd(12.235, 300.27, -13.1, 0.85)
pt3dadd(12.185, 300.379, -13.1, 0.832)
pt3dadd(12.132, 300.487, -13.1, 0.816)
pt3dadd(12.079, 300.594, -13.1, 0.802)
pt3dadd(12.026, 300.702, -13.1, 0.788)
pt3dadd(11.973, 300.81, -13.1, 0.774)
pt3dadd(11.92, 300.917, -13.1, 0.762)
pt3dadd(11.882, 301.03, -13.1, 0.75)
pt3dadd(11.863, 301.147, -13.1, 0.742)
pt3dadd(11.845, 301.266, -13.1, 0.734)
pt3dadd(11.826, 301.385, -13.1, 0.728)
pt3dadd(11.808, 301.504, -13.1, 0.72)
pt3dadd(11.789, 301.621, -13.1, 0.712)
pt3dadd(11.771, 301.74, -13.1, 0.704)
pt3dadd(11.757, 301.86, -13.1, 0.704)
pt3dadd(11.744, 301.979, -13.1, 0.704)
pt3dadd(11.732, 302.098, -13.1, 0.704)
pt3dadd(11.719, 302.218, -13.1, 0.704)
pt3dadd(11.707, 302.336, -13.1, 0.704)
pt3dadd(11.694, 302.456, -13.1, 0.704)
pt3dadd(11.682, 302.575, -13.1, 0.704)
pt3dadd(11.669, 302.695, -13.1, 0.714)
pt3dadd(11.657, 302.814, -13.1, 0.728)
pt3dadd(11.644, 302.934, -13.1, 0.742)
pt3dadd(11.632, 303.053, -13.1, 0.758)
pt3dadd(11.619, 303.172, -13.1, 0.772)
pt3dadd(11.606, 303.292, -13.1, 0.786)
pt3dadd(11.594, 303.41, -13.1, 0.8)
pt3dadd(11.581, 303.53, -13.1, 0.818)
pt3dadd(11.569, 303.649, -13.1, 0.836)
pt3dadd(11.556, 303.769, -13.1, 0.852)
pt3dadd(11.544, 303.888, -13.1, 0.872)
pt3dadd(11.531, 304.008, -13.1, 0.888)
pt3dadd(11.519, 304.127, -13.1, 0.906)
pt3dadd(11.506, 304.247, -13.1, 0.924)
pt3dadd(11.494, 304.366, -13.1, 0.94)
pt3dadd(11.481, 304.484, -13.1, 0.954)
pt3dadd(11.468, 304.604, -13.1, 0.968)
pt3dadd(11.456, 304.723, -13.1, 0.984)
pt3dadd(11.443, 304.843, -13.1, 0.998)
pt3dadd(11.431, 304.962, -13.1, 1.012)
pt3dadd(11.418, 305.082, -13.1, 1.026)
pt3dadd(11.401, 305.201, -13.1, 1.026)
pt3dadd(11.383, 305.32, -13.1, 1.024)
pt3dadd(11.364, 305.438, -13.1, 1.02)
pt3dadd(11.346, 305.557, -13.1, 1.016)
pt3dadd(11.328, 305.676, -13.1, 1.012)
pt3dadd(11.309, 305.794, -13.1, 1.008)
pt3dadd(11.288, 305.911, -13.1, 1.004)
pt3dadd(11.241, 306.023, -13.1, 0.994)
pt3dadd(11.193, 306.132, -13.1, 0.986)
pt3dadd(11.146, 306.241, -13.1, 0.976)
pt3dadd(11.098, 306.353, -13.1, 0.968)
pt3dadd(11.05, 306.462, -13.1, 0.958)
pt3dadd(10.996, 306.569, -13.1, 0.95)
pt3dadd(10.934, 306.672, -13.1, 0.94)
pt3dadd(10.872, 306.775, -13.1, 0.93)
pt3dadd(10.811, 306.878, -13.1, 0.92)
pt3dadd(10.749, 306.98, -13.1, 0.912)
pt3dadd(10.693, 307.087, -13.1, 0.904)
pt3dadd(10.659, 307.201, -13.1, 0.91)
pt3dadd(10.625, 307.316, -13.1, 0.914)
pt3dadd(10.59, 307.43, -13.1, 0.918)
pt3dadd(10.556, 307.547, -13.1, 0.922)
pt3dadd(10.521, 307.661, -13.1, 0.926)
pt3dadd(10.485, 307.776, -13.1, 0.932)
pt3dadd(10.439, 307.886, -13.1, 0.942)
pt3dadd(10.394, 307.998, -13.1, 0.952)
pt3dadd(10.375, 308.116, -13.1, 0.96)
pt3dadd(10.363, 308.234, -13.1, 0.97)
pt3dadd(10.35, 308.354, -13.1, 0.978)
pt3dadd(10.307, 308.465, -13.1, 0.98)
pt3dadd(10.255, 308.573, -13.1, 0.98)
pt3dadd(10.178, 308.656, -13.1, 0.98)
pt3dadd(10.069, 308.705, -13.1, 0.98)
pt3dadd(9.965, 308.762, -13.103, 0.98)
pt3dadd(9.876, 308.843, -13.113, 0.98)
pt3dadd(9.787, 308.921, -13.123, 0.98)
pt3dadd(9.698, 309.001, -13.133, 0.98)
pt3dadd(9.675, 309.112, -13.16, 0.97)
pt3dadd(9.658, 309.226, -13.189, 0.958)
pt3dadd(9.643, 309.343, -13.2, 0.908)
pt3dadd(9.631, 309.462, -13.2, 0.87)
pt3dadd(9.618, 309.581, -13.2, 0.856)
pt3dadd(9.606, 309.701, -13.2, 0.842)
pt3dadd(9.593, 309.82, -13.2, 0.826)
}
}
proc shape3d_142() {
dend_5[15] { pt3dadd(9.58, 309.94, -13.2, 0.812)
pt3dadd(9.568, 310.058, -13.2, 0.798)
pt3dadd(9.555, 310.178, -13.2, 0.784)
pt3dadd(9.543, 310.297, -13.2, 0.77)
pt3dadd(9.53, 310.417, -13.2, 0.756)
pt3dadd(9.518, 310.536, -13.2, 0.74)
pt3dadd(9.505, 310.656, -13.2, 0.726)
pt3dadd(9.493, 310.775, -13.2, 0.712)
pt3dadd(9.48, 310.894, -13.2, 0.698)
pt3dadd(9.468, 311.014, -13.2, 0.684)
pt3dadd(9.467, 311.132, -13.2, 0.676)
pt3dadd(9.474, 311.254, -13.2, 0.672)
pt3dadd(9.482, 311.374, -13.2, 0.668)
pt3dadd(9.489, 311.492, -13.2, 0.664)
pt3dadd(9.496, 311.612, -13.2, 0.66)
pt3dadd(9.503, 311.732, -13.2, 0.654)
pt3dadd(9.549, 311.837, -13.2, 0.652)
pt3dadd(9.628, 311.927, -13.2, 0.652)
pt3dadd(9.678, 312.029, -13.2, 0.664)
pt3dadd(9.686, 312.149, -13.2, 0.694)
pt3dadd(9.694, 312.268, -13.2, 0.722)
pt3dadd(9.681, 312.388, -13.2, 0.756)
pt3dadd(9.664, 312.506, -13.2, 0.792)
pt3dadd(9.647, 312.625, -13.2, 0.826)
pt3dadd(9.599, 312.734, -13.2, 0.878)
pt3dadd(9.547, 312.842, -13.2, 0.93)
pt3dadd(9.514, 312.956, -13.2, 0.962)
pt3dadd(9.495, 313.075, -13.2, 0.974)
pt3dadd(9.478, 313.194, -13.2, 0.974)
pt3dadd(9.464, 313.313, -13.2, 0.968)
pt3dadd(9.449, 313.432, -13.2, 0.96)
pt3dadd(9.435, 313.552, -13.2, 0.952)
pt3dadd(9.421, 313.67, -13.2, 0.946)
pt3dadd(9.406, 313.789, -13.2, 0.938)
pt3dadd(9.392, 313.908, -13.2, 0.93)
pt3dadd(9.347, 314.018, -13.2, 0.914)
pt3dadd(9.294, 314.126, -13.2, 0.896)
pt3dadd(9.241, 314.234, -13.2, 0.878)
pt3dadd(9.188, 314.342, -13.2, 0.86)
pt3dadd(9.135, 314.449, -13.2, 0.84)
pt3dadd(9.073, 314.551, -13.2, 0.824)
pt3dadd(8.994, 314.641, -13.2, 0.808)
pt3dadd(8.915, 314.732, -13.2, 0.794)
pt3dadd(8.836, 314.822, -13.2, 0.778)
pt3dadd(8.757, 314.912, -13.2, 0.764)
pt3dadd(8.685, 315.008, -13.2, 0.748)
pt3dadd(8.629, 315.114, -13.2, 0.728)
pt3dadd(8.573, 315.22, -13.2, 0.71)
pt3dadd(8.517, 315.326, -13.2, 0.692)
pt3dadd(8.461, 315.432, -13.2, 0.674)
pt3dadd(8.405, 315.539, -13.2, 0.654)
pt3dadd(8.388, 315.655, -13.213, 0.634)
pt3dadd(8.373, 315.773, -13.228, 0.614)
pt3dadd(8.358, 315.892, -13.243, 0.592)
pt3dadd(8.344, 316.009, -13.257, 0.572)
pt3dadd(8.329, 316.127, -13.272, 0.55)
pt3dadd(8.315, 316.244, -13.287, 0.53)
pt3dadd(8.273, 316.356, -13.293, 0.49)
pt3dadd(8.226, 316.468, -13.298, 0.448)
pt3dadd(8.181, 316.577, -13.3, 0.416)
pt3dadd(8.137, 316.69, -13.3, 0.396)
pt3dadd(8.092, 316.8, -13.301, 0.378)
pt3dadd(8.046, 316.91, -13.305, 0.388)
pt3dadd(7.999, 317.021, -13.31, 0.4)
pt3dadd(7.999, 317.107, -13.37, 0.422)
pt3dadd(8.011, 317.184, -13.445, 0.448)
pt3dadd(8.051, 317.284, -13.487, 0.522)
pt3dadd(8.073, 317.398, -13.5, 0.568)
pt3dadd(8.083, 317.516, -13.5, 0.594)
pt3dadd(8.093, 317.636, -13.5, 0.618)
pt3dadd(8.103, 317.756, -13.5, 0.644)
pt3dadd(8.113, 317.875, -13.5, 0.668)
pt3dadd(8.122, 317.996, -13.5, 0.694)
pt3dadd(8.118, 318.115, -13.5, 0.714)
pt3dadd(8.105, 318.234, -13.5, 0.732)
pt3dadd(8.093, 318.354, -13.5, 0.75)
pt3dadd(8.08, 318.473, -13.5, 0.768)
pt3dadd(8.068, 318.593, -13.5, 0.786)
pt3dadd(8.055, 318.712, -13.5, 0.804)
pt3dadd(8.043, 318.83, -13.5, 0.822)
pt3dadd(8.03, 318.95, -13.5, 0.834)
pt3dadd(8.018, 319.069, -13.5, 0.84)
pt3dadd(8.005, 319.189, -13.5, 0.848)
pt3dadd(7.992, 319.308, -13.5, 0.854)
pt3dadd(7.98, 319.428, -13.5, 0.862)
pt3dadd(7.967, 319.547, -13.5, 0.87)
pt3dadd(7.955, 319.667, -13.5, 0.876)
pt3dadd(7.942, 319.786, -13.501, 0.872)
pt3dadd(7.93, 319.906, -13.503, 0.862)
pt3dadd(7.917, 320.024, -13.504, 0.85)
pt3dadd(7.905, 320.143, -13.506, 0.84)
pt3dadd(7.892, 320.263, -13.507, 0.828)
pt3dadd(7.88, 320.382, -13.509, 0.818)
pt3dadd(7.867, 320.502, -13.511, 0.806)
pt3dadd(7.857, 320.597, -13.562, 0.776)
pt3dadd(7.848, 320.684, -13.63, 0.742)
pt3dadd(7.837, 320.79, -13.666, 0.71)
pt3dadd(7.824, 320.909, -13.683, 0.68)
pt3dadd(7.812, 321.025, -13.7, 0.652)
pt3dadd(7.799, 321.145, -13.696, 0.636)
pt3dadd(7.787, 321.264, -13.692, 0.618)
pt3dadd(7.774, 321.383, -13.684, 0.598)
pt3dadd(7.763, 321.494, -13.651, 0.566)
pt3dadd(7.751, 321.608, -13.618, 0.534)
pt3dadd(7.739, 321.722, -13.59, 0.528)
pt3dadd(7.722, 321.836, -13.565, 0.532)
pt3dadd(7.679, 321.948, -13.552, 0.56)
pt3dadd(7.637, 322.058, -13.539, 0.59)
pt3dadd(7.594, 322.17, -13.526, 0.618)
pt3dadd(7.552, 322.28, -13.513, 0.648)
pt3dadd(7.509, 322.392, -13.501, 0.676)
pt3dadd(7.483, 322.51, -13.5, 0.73)
pt3dadd(7.458, 322.627, -13.5, 0.786)
pt3dadd(7.433, 322.744, -13.5, 0.84)
pt3dadd(7.408, 322.862, -13.5, 0.896)
pt3dadd(7.383, 322.979, -13.5, 0.952)
pt3dadd(7.358, 323.095, -13.5, 1.006)
pt3dadd(7.341, 323.214, -13.5, 1.064)
pt3dadd(7.328, 323.334, -13.5, 1.12)
pt3dadd(7.315, 323.453, -13.5, 1.178)
pt3dadd(7.303, 323.573, -13.5, 1.236)
pt3dadd(7.29, 323.692, -13.5, 1.292)
pt3dadd(7.278, 323.812, -13.5, 1.35)
pt3dadd(7.265, 323.93, -13.5, 1.408)
pt3dadd(7.241, 324.047, -13.5, 1.448)
pt3dadd(7.209, 324.163, -13.5, 1.476)
pt3dadd(7.177, 324.28, -13.5, 1.506)
pt3dadd(7.145, 324.395, -13.5, 1.534)
pt3dadd(7.113, 324.51, -13.5, 1.564)
pt3dadd(7.081, 324.626, -13.5, 1.592)
pt3dadd(7.026, 324.73, -13.5, 1.6)
pt3dadd(6.947, 324.82, -13.5, 1.584)
pt3dadd(6.868, 324.91, -13.5, 1.57)
pt3dadd(6.789, 325, -13.5, 1.554)
pt3dadd(6.71, 325.091, -13.5, 1.54)
pt3dadd(6.654, 325.194, -13.5, 1.508)
pt3dadd(6.622, 325.309, -13.5, 1.458)
pt3dadd(6.59, 325.424, -13.5, 1.41)
pt3dadd(6.558, 325.541, -13.5, 1.36)
pt3dadd(6.526, 325.655, -13.5, 1.31)
pt3dadd(6.494, 325.771, -13.5, 1.26)
pt3dadd(6.469, 325.889, -13.5, 1.22)
pt3dadd(6.454, 326.008, -13.5, 1.194)
pt3dadd(6.44, 326.126, -13.5, 1.17)
pt3dadd(6.425, 326.245, -13.5, 1.144)
pt3dadd(6.411, 326.365, -13.5, 1.118)
pt3dadd(6.397, 326.484, -13.5, 1.092)
pt3dadd(6.382, 326.603, -13.5, 1.068)
pt3dadd(6.359, 326.72, -13.5, 1.038)
pt3dadd(6.327, 326.837, -13.5, 1.006)
pt3dadd(6.295, 326.952, -13.5, 0.972)
pt3dadd(6.263, 327.067, -13.5, 0.94)
pt3dadd(6.231, 327.184, -13.5, 0.906)
pt3dadd(6.199, 327.299, -13.5, 0.874)
pt3dadd(6.158, 327.41, -13.5, 0.846)
pt3dadd(6.105, 327.518, -13.5, 0.828)
pt3dadd(6.052, 327.626, -13.5, 0.81)
pt3dadd(5.998, 327.734, -13.5, 0.79)
pt3dadd(5.945, 327.841, -13.5, 0.772)
pt3dadd(5.892, 327.949, -13.5, 0.754)
pt3dadd(5.869, 328.067, -13.5, 0.716)
pt3dadd(5.846, 328.184, -13.5, 0.678)
pt3dadd(5.824, 328.302, -13.5, 0.64)
pt3dadd(5.801, 328.421, -13.5, 0.6)
pt3dadd(5.779, 328.538, -13.5, 0.562)
pt3dadd(5.768, 328.657, -13.5, 0.538)
pt3dadd(5.761, 328.777, -13.5, 0.52)
pt3dadd(5.754, 328.897, -13.5, 0.502)
pt3dadd(5.748, 329.017, -13.5, 0.482)
pt3dadd(5.741, 329.137, -13.5, 0.464)
pt3dadd(5.734, 329.257, -13.5, 0.444)
pt3dadd(5.726, 329.376, -13.501, 0.426)
pt3dadd(5.684, 329.488, -13.513, 0.422)
pt3dadd(5.641, 329.598, -13.526, 0.416)
pt3dadd(5.599, 329.71, -13.539, 0.412)
pt3dadd(5.556, 329.821, -13.552, 0.408)
pt3dadd(5.514, 329.932, -13.565, 0.402)
pt3dadd(5.465, 330.041, -13.572, 0.43)
pt3dadd(5.416, 330.15, -13.578, 0.464)
pt3dadd(5.366, 330.259, -13.585, 0.496)
pt3dadd(5.317, 330.368, -13.591, 0.53)
pt3dadd(5.267, 330.478, -13.597, 0.562)
pt3dadd(5.227, 330.59, -13.6, 0.61)
pt3dadd(5.195, 330.706, -13.6, 0.668)
pt3dadd(5.163, 330.821, -13.6, 0.726)
pt3dadd(5.131, 330.937, -13.6, 0.784)
pt3dadd(5.099, 331.052, -13.6, 0.84)
pt3dadd(5.067, 331.169, -13.6, 0.898)
pt3dadd(5.024, 331.279, -13.6, 0.952)
pt3dadd(4.968, 331.386, -13.6, 0.998)
pt3dadd(4.912, 331.493, -13.6, 1.044)
pt3dadd(4.856, 331.597, -13.6, 1.09)
pt3dadd(4.8, 331.704, -13.6, 1.138)
pt3dadd(4.746, 331.812, -13.6, 1.182)
pt3dadd(4.711, 331.926, -13.6, 1.194)
pt3dadd(4.677, 332.041, -13.6, 1.206)
pt3dadd(4.643, 332.155, -13.6, 1.22)
pt3dadd(4.608, 332.272, -13.6, 1.232)
pt3dadd(4.574, 332.386, -13.6, 1.244)
pt3dadd(4.537, 332.5, -13.6, 1.254)
}
}
proc shape3d_143() {
dend_5[15] { pt3dadd(4.484, 332.608, -13.6, 1.226)
pt3dadd(4.431, 332.714, -13.6, 1.198)
pt3dadd(4.378, 332.822, -13.6, 1.17)
pt3dadd(4.325, 332.93, -13.6, 1.142)
pt3dadd(4.272, 333.038, -13.6, 1.114)
pt3dadd(4.215, 333.14, -13.617, 1.084)
pt3dadd(4.158, 333.241, -13.644, 1.05)
pt3dadd(4.1, 333.341, -13.671, 1.018)
pt3dadd(4.042, 333.442, -13.698, 0.984)
pt3dadd(3.983, 333.54, -13.725, 0.952)
pt3dadd(3.912, 333.631, -13.753, 0.922)
pt3dadd(3.841, 333.721, -13.781, 0.894)
pt3dadd(3.771, 333.814, -13.809, 0.866)
pt3dadd(3.7, 333.904, -13.837, 0.836)
pt3dadd(3.637, 333.98, -13.89, 0.824)
pt3dadd(3.577, 334.052, -13.952, 0.818)
pt3dadd(3.517, 334.124, -14.015, 0.812)
pt3dadd(3.457, 334.196, -14.077, 0.806)
pt3dadd(3.397, 334.286, -14.114, 0.8)
pt3dadd(3.337, 334.388, -14.135, 0.794)
pt3dadd(3.277, 334.489, -14.157, 0.79)
pt3dadd(3.218, 334.589, -14.178, 0.784)
pt3dadd(3.158, 334.69, -14.2, 0.778)
pt3dadd(3.11, 334.801, -14.2, 0.778)
pt3dadd(3.063, 334.91, -14.2, 0.778)
pt3dadd(3.015, 335.021, -14.2, 0.778)
pt3dadd(2.968, 335.131, -14.2, 0.778)
pt3dadd(2.921, 335.242, -14.2, 0.778)
pt3dadd(2.863, 335.346, -14.2, 0.772)
pt3dadd(2.789, 335.441, -14.2, 0.758)
pt3dadd(2.716, 335.536, -14.2, 0.742)
pt3dadd(2.643, 335.63, -14.2, 0.728)
pt3dadd(2.569, 335.725, -14.2, 0.714)
pt3dadd(2.504, 335.826, -14.2, 0.702)
pt3dadd(2.457, 335.935, -14.2, 0.698)
pt3dadd(2.409, 336.046, -14.2, 0.692)
pt3dadd(2.361, 336.156, -14.2, 0.688)
pt3dadd(2.314, 336.265, -14.2, 0.684)
pt3dadd(2.266, 336.376, -14.2, 0.68)
pt3dadd(2.239, 336.49, -14.218, 0.674)
pt3dadd(2.22, 336.604, -14.242, 0.67)
pt3dadd(2.201, 336.719, -14.266, 0.666)
pt3dadd(2.181, 336.834, -14.29, 0.662)
pt3dadd(2.162, 336.949, -14.315, 0.656)
pt3dadd(2.141, 337.06, -14.346, 0.654)
pt3dadd(2.113, 337.156, -14.401, 0.66)
pt3dadd(2.086, 337.252, -14.457, 0.666)
pt3dadd(2.058, 337.348, -14.512, 0.67)
pt3dadd(2.03, 337.444, -14.568, 0.676)
pt3dadd(2.002, 337.549, -14.604, 0.678)
pt3dadd(1.972, 337.662, -14.629, 0.678)
pt3dadd(1.951, 337.756, -14.678, 0.678)
pt3dadd(1.944, 337.823, -14.76, 0.678)
pt3dadd(1.936, 337.902, -14.83, 0.678)
pt3dadd(1.924, 338.015, -14.863, 0.678)
pt3dadd(1.912, 338.128, -14.896, 0.678)
pt3dadd(1.865, 338.236, -14.9, 0.678)
pt3dadd(1.813, 338.345, -14.9, 0.678)
pt3dadd(1.729, 338.405, -14.916, 0.678)
pt3dadd(1.616, 338.425, -14.946, 0.678)
pt3dadd(1.503, 338.444, -14.975, 0.678)
pt3dadd(1.391, 338.471, -15, 0.678)
pt3dadd(1.286, 338.527, -15, 0.678)
pt3dadd(1.18, 338.585, -15, 0.678)
pt3dadd(1.127, 338.692, -15.012, 0.678)
pt3dadd(1.073, 338.798, -15.023, 0.678)
pt3dadd(1.02, 338.903, -15.038, 0.676)
pt3dadd(0.968, 339.002, -15.073, 0.664)
pt3dadd(0.912, 339.102, -15.096, 0.644)
pt3dadd(0.86, 339.206, -15.08, 0.626)
pt3dadd(0.826, 339.318, -15.063, 0.62)
pt3dadd(0.791, 339.432, -15.046, 0.616)
pt3dadd(0.756, 339.545, -15.029, 0.61)
pt3dadd(0.722, 339.659, -15.012, 0.606)
pt3dadd(0.687, 339.772, -15, 0.608)
pt3dadd(0.655, 339.887, -15, 0.628)
pt3dadd(0.622, 340.003, -15, 0.646)
pt3dadd(0.573, 340.111, -15, 0.668)
pt3dadd(0.515, 340.216, -15, 0.69)
pt3dadd(0.452, 340.308, -15.022, 0.714)
pt3dadd(0.383, 340.378, -15.08, 0.744)
pt3dadd(0.346, 340.445, -15.154, 0.746)
pt3dadd(0.326, 340.508, -15.236, 0.732)
pt3dadd(0.267, 340.586, -15.273, 0.724)
pt3dadd(0.186, 340.675, -15.283, 0.716)
pt3dadd(0.105, 340.763, -15.293, 0.708)
pt3dadd(0.03, 340.855, -15.3, 0.694)
pt3dadd(-0.028, 340.96, -15.3, 0.662)
pt3dadd(-0.086, 341.065, -15.3, 0.628)
pt3dadd(-0.153, 341.161, -15.318, 0.546)
pt3dadd(-0.216, 341.26, -15.34, 0.53)
pt3dadd(-0.279, 341.358, -15.362, 0.514)
pt3dadd(-0.342, 341.458, -15.384, 0.498)
pt3dadd(-0.406, 341.556, -15.406, 0.482)
pt3dadd(-0.479, 341.638, -15.444, 0.478)
pt3dadd(-0.555, 341.713, -15.488, 0.478)
pt3dadd(-0.613, 341.796, -15.436, 0.492)
pt3dadd(-0.655, 341.887, -15.385, 0.506)
pt3dadd(-0.666, 341.995, -15.34, 0.518)
pt3dadd(-0.674, 342.101, -15.3, 0.53)
pt3dadd(-0.646, 342.218, -15.3, 0.55)
pt3dadd(-0.618, 342.335, -15.3, 0.572)
pt3dadd(-0.563, 342.44, -15.3, 0.644)
pt3dadd(-0.506, 342.545, -15.3, 0.72)
pt3dadd(-0.467, 342.659, -15.3, 0.772)
pt3dadd(-0.428, 342.773, -15.3, 0.824)
pt3dadd(-0.39, 342.887, -15.3, 0.878)
pt3dadd(-0.351, 343, -15.3, 0.93)
pt3dadd(-0.313, 343.112, -15.3, 0.982)
pt3dadd(-0.304, 343.234, -15.3, 1.05)
pt3dadd(-0.294, 343.352, -15.3, 1.116)
pt3dadd(-0.284, 343.472, -15.3, 1.184)
pt3dadd(-0.274, 343.591, -15.3, 1.252)
pt3dadd(-0.265, 343.711, -15.3, 1.318)
pt3dadd(-0.255, 343.831, -15.3, 1.384)
pt3dadd(-0.25, 343.951, -15.3, 1.446)
pt3dadd(-0.245, 344.071, -15.3, 1.506)
pt3dadd(-0.241, 344.191, -15.3, 1.568)
pt3dadd(-0.236, 344.311, -15.3, 1.628)
pt3dadd(-0.231, 344.431, -15.3, 1.69)
pt3dadd(-0.226, 344.551, -15.3, 1.75)
pt3dadd(-0.18, 344.659, -15.3, 1.78)
pt3dadd(-0.128, 344.768, -15.3, 1.804)
pt3dadd(-0.076, 344.876, -15.3, 1.83)
pt3dadd(-0.024, 344.984, -15.3, 1.854)
pt3dadd(0.028, 345.092, -15.3, 1.878)
pt3dadd(0.075, 345.203, -15.3, 1.848)
pt3dadd(0.12, 345.314, -15.3, 1.804)
pt3dadd(0.165, 345.426, -15.3, 1.76)
pt3dadd(0.21, 345.536, -15.3, 1.718)
pt3dadd(0.256, 345.648, -15.3, 1.674)
pt3dadd(0.311, 345.754, -15.3, 1.616)
pt3dadd(0.373, 345.857, -15.3, 1.552)
pt3dadd(0.434, 345.96, -15.3, 1.486)
pt3dadd(0.496, 346.062, -15.3, 1.42)
pt3dadd(0.557, 346.165, -15.3, 1.356)
pt3dadd(0.575, 346.279, -15.3, 1.276)
pt3dadd(0.567, 346.399, -15.3, 1.19)
pt3dadd(0.559, 346.519, -15.3, 1.102)
pt3dadd(0.583, 346.636, -15.3, 1.048)
pt3dadd(0.618, 346.75, -15.3, 1.004)
pt3dadd(0.68, 346.846, -15.3, 0.958)
pt3dadd(0.777, 346.916, -15.3, 0.914)
pt3dadd(0.869, 346.992, -15.3, 0.866)
pt3dadd(0.947, 347.083, -15.3, 0.82)
pt3dadd(1.029, 347.17, -15.3, 0.772)
pt3dadd(1.137, 347.222, -15.3, 0.724)
pt3dadd(1.236, 347.286, -15.287, 0.704)
pt3dadd(1.33, 347.356, -15.265, 0.704)
pt3dadd(1.425, 347.424, -15.243, 0.704)
pt3dadd(1.519, 347.495, -15.22, 0.704)
pt3dadd(1.613, 347.566, -15.2, 0.704)
pt3dadd(1.705, 347.641, -15.2, 0.714)
pt3dadd(1.798, 347.717, -15.2, 0.724)
pt3dadd(1.891, 347.794, -15.2, 0.734)
pt3dadd(1.984, 347.869, -15.2, 0.744)
pt3dadd(2.076, 347.946, -15.2, 0.754)
pt3dadd(2.147, 348.042, -15.2, 0.764)
pt3dadd(2.218, 348.139, -15.2, 0.774)
pt3dadd(2.289, 348.235, -15.2, 0.784)
pt3dadd(2.359, 348.332, -15.2, 0.794)
pt3dadd(2.429, 348.431, -15.2, 0.804)
pt3dadd(2.484, 348.538, -15.2, 0.804)
pt3dadd(2.54, 348.643, -15.2, 0.804)
pt3dadd(2.595, 348.75, -15.2, 0.804)
pt3dadd(2.65, 348.857, -15.2, 0.804)
pt3dadd(2.704, 348.964, -15.2, 0.804)
pt3dadd(2.706, 349.084, -15.2, 0.794)
pt3dadd(2.708, 349.204, -15.2, 0.784)
pt3dadd(2.713, 349.324, -15.198, 0.774)
pt3dadd(2.721, 349.444, -15.192, 0.76)
pt3dadd(2.707, 349.553, -15.171, 0.754)
pt3dadd(2.658, 349.648, -15.126, 0.754)
pt3dadd(2.682, 349.75, -15.108, 0.746)
pt3dadd(2.743, 349.852, -15.102, 0.732)
pt3dadd(2.836, 349.915, -15.1, 0.72)
pt3dadd(2.951, 349.95, -15.1, 0.704)
pt3dadd(3.041, 350.027, -15.1, 0.704)
pt3dadd(3.129, 350.108, -15.1, 0.704)
pt3dadd(3.217, 350.19, -15.1, 0.704)
pt3dadd(3.305, 350.272, -15.1, 0.704)
pt3dadd(3.393, 350.353, -15.1, 0.704)
pt3dadd(3.479, 350.437, -15.1, 0.724)
pt3dadd(3.564, 350.522, -15.1, 0.748)
pt3dadd(3.649, 350.606, -15.1, 0.79)
pt3dadd(3.734, 350.692, -15.1, 0.836)
pt3dadd(3.84, 350.74, -15.1, 0.884)
pt3dadd(3.957, 350.766, -15.1, 0.93)
pt3dadd(4.073, 350.794, -15.1, 0.976)
pt3dadd(4.193, 350.807, -15.1, 1.026)
pt3dadd(4.312, 350.82, -15.1, 1.078)
pt3dadd(4.431, 350.832, -15.1, 1.128)
pt3dadd(4.534, 350.843, -15.051, 1.176)
pt3dadd(4.636, 350.854, -14.999, 1.224)
pt3dadd(4.738, 350.864, -14.947, 1.272)
pt3dadd(4.83, 350.891, -14.892, 1.336)
pt3dadd(4.9, 350.951, -14.828, 1.436)
pt3dadd(4.947, 351.032, -14.77, 1.522)
pt3dadd(4.976, 351.128, -14.715, 1.594)
pt3dadd(5.001, 351.222, -14.658, 1.662)
}
}
proc shape3d_144() {
dend_5[15] { pt3dadd(4.999, 351.301, -14.582, 1.698)
pt3dadd(5.003, 351.379, -14.511, 1.73)
pt3dadd(5.086, 351.466, -14.507, 1.704)
pt3dadd(5.169, 351.552, -14.503, 1.676)
pt3dadd(5.244, 351.644, -14.5, 1.63)
pt3dadd(5.301, 351.75, -14.5, 1.536)
pt3dadd(5.36, 351.853, -14.494, 1.442)
pt3dadd(5.432, 351.934, -14.451, 1.334)
pt3dadd(5.504, 352.015, -14.409, 1.228)
pt3dadd(5.555, 352.085, -14.34, 1.138)
pt3dadd(5.601, 352.148, -14.266, 1.052)
pt3dadd(5.679, 352.206, -14.207, 0.906)
pt3dadd(5.749, 352.266, -14.143, 0.848)
pt3dadd(5.802, 352.308, -14.063, 0.786)
pt3dadd(5.846, 352.339, -13.974, 0.724)
pt3dadd(5.901, 352.416, -13.929, 0.668)
pt3dadd(5.962, 352.516, -13.905, 0.614)
pt3dadd(6.013, 352.616, -13.871, 0.58)
pt3dadd(6.062, 352.717, -13.834, 0.554)
pt3dadd(6.11, 352.802, -13.778, 0.574)
pt3dadd(6.173, 352.89, -13.734, 0.612)
pt3dadd(6.238, 352.979, -13.694, 0.654)
pt3dadd(6.303, 353.066, -13.653, 0.698)
pt3dadd(6.368, 353.155, -13.613, 0.74)
pt3dadd(6.442, 353.245, -13.6, 0.798)
pt3dadd(6.519, 353.338, -13.6, 0.864)
pt3dadd(6.596, 353.429, -13.6, 0.93)
pt3dadd(6.673, 353.522, -13.6, 0.996)
pt3dadd(6.75, 353.614, -13.6, 1.062)
pt3dadd(6.807, 353.718, -13.6, 1.206)
pt3dadd(6.857, 353.827, -13.6, 1.378)
pt3dadd(6.884, 353.942, -13.6, 1.518)
pt3dadd(6.892, 354.062, -13.6, 1.636)
pt3dadd(6.9, 354.181, -13.6, 1.752)
pt3dadd(6.962, 354.274, -13.565, 1.85)
pt3dadd(7.035, 354.355, -13.531, 1.936)
pt3dadd(7.146, 354.397, -13.516, 1.946)
pt3dadd(7.257, 354.439, -13.501, 1.958)
pt3dadd(7.301, 354.544, -13.476, 1.884)
pt3dadd(7.347, 354.647, -13.443, 1.776)
pt3dadd(7.395, 354.748, -13.406, 1.652)
pt3dadd(7.457, 354.848, -13.4, 1.544)
pt3dadd(7.522, 354.95, -13.4, 1.438)
pt3dadd(7.621, 355.006, -13.4, 1.292)
pt3dadd(7.736, 355.04, -13.4, 1.13)
}
dend_5[16] {pt3dclear()
pt3dadd(23.263, 273.899, -10.7, 1.782)
pt3dadd(23.285, 273.901, -10.683, 1.792)
pt3dadd(23.374, 273.911, -10.616, 1.828)
pt3dadd(23.463, 273.92, -10.549, 1.862)
pt3dadd(23.552, 273.929, -10.482, 1.898)
pt3dadd(23.64, 273.938, -10.415, 1.934)
pt3dadd(23.729, 273.948, -10.348, 1.97)
pt3dadd(23.818, 273.958, -10.281, 2.004)
pt3dadd(23.906, 273.966, -10.214, 2.04)
pt3dadd(23.995, 273.976, -10.148, 2.076)
pt3dadd(24.084, 273.985, -10.081, 2.112)
pt3dadd(24.173, 273.995, -10.014, 2.146)
pt3dadd(24.261, 274.004, -9.947, 2.182)
pt3dadd(24.35, 274.013, -9.88, 2.218)
pt3dadd(24.439, 274.022, -9.813, 2.252)
pt3dadd(24.451, 274.121, -9.8, 2.226)
pt3dadd(24.444, 274.241, -9.8, 2.186)
pt3dadd(24.438, 274.361, -9.8, 2.144)
pt3dadd(24.431, 274.481, -9.8, 2.102)
pt3dadd(24.424, 274.6, -9.8, 2.062)
pt3dadd(24.418, 274.72, -9.8, 2.02)
pt3dadd(24.412, 274.84, -9.8, 1.98)
pt3dadd(24.414, 274.96, -9.8, 1.952)
pt3dadd(24.417, 275.08, -9.8, 1.924)
pt3dadd(24.419, 275.2, -9.8, 1.896)
pt3dadd(24.422, 275.32, -9.8, 1.868)
pt3dadd(24.424, 275.44, -9.8, 1.84)
pt3dadd(24.426, 275.56, -9.8, 1.812)
pt3dadd(24.431, 275.68, -9.8, 1.79)
pt3dadd(24.436, 275.8, -9.8, 1.77)
pt3dadd(24.441, 275.92, -9.8, 1.75)
pt3dadd(24.445, 276.04, -9.8, 1.73)
pt3dadd(24.45, 276.16, -9.8, 1.71)
pt3dadd(24.455, 276.28, -9.8, 1.688)
pt3dadd(24.475, 276.397, -9.8, 1.666)
pt3dadd(24.501, 276.514, -9.8, 1.644)
pt3dadd(24.528, 276.631, -9.8, 1.622)
pt3dadd(24.555, 276.748, -9.8, 1.598)
pt3dadd(24.581, 276.864, -9.8, 1.576)
pt3dadd(24.613, 276.98, -9.8, 1.546)
pt3dadd(24.67, 277.085, -9.8, 1.476)
pt3dadd(24.727, 277.192, -9.8, 1.406)
pt3dadd(24.784, 277.296, -9.8, 1.336)
pt3dadd(24.841, 277.403, -9.8, 1.266)
pt3dadd(24.874, 277.517, -9.8, 1.202)
pt3dadd(24.901, 277.634, -9.8, 1.138)
pt3dadd(24.909, 277.752, -9.8, 1.092)
pt3dadd(24.896, 277.872, -9.8, 1.068)
pt3dadd(24.884, 277.991, -9.8, 1.042)
pt3dadd(24.871, 278.11, -9.8, 1.01)
pt3dadd(24.859, 278.23, -9.8, 0.974)
pt3dadd(24.852, 278.35, -9.8, 0.954)
pt3dadd(24.853, 278.468, -9.8, 0.954)
pt3dadd(24.853, 278.588, -9.8, 0.954)
pt3dadd(24.853, 278.71, -9.8, 0.954)
pt3dadd(24.853, 278.828, -9.8, 0.954)
pt3dadd(24.853, 278.95, -9.8, 0.954)
pt3dadd(24.852, 279.068, -9.8, 0.954)
pt3dadd(24.846, 279.188, -9.8, 0.954)
pt3dadd(24.839, 279.308, -9.8, 0.954)
pt3dadd(24.832, 279.428, -9.8, 0.954)
pt3dadd(24.826, 279.548, -9.8, 0.954)
pt3dadd(24.819, 279.668, -9.8, 0.954)
pt3dadd(24.812, 279.788, -9.8, 0.954)
pt3dadd(24.812, 279.907, -9.8, 0.958)
pt3dadd(24.819, 280.027, -9.8, 0.966)
pt3dadd(24.827, 280.147, -9.8, 0.974)
pt3dadd(24.834, 280.267, -9.8, 0.982)
pt3dadd(24.841, 280.386, -9.8, 0.992)
pt3dadd(24.848, 280.506, -9.8, 1)
pt3dadd(24.871, 280.622, -9.8, 1.004)
pt3dadd(24.92, 280.733, -9.8, 1.004)
pt3dadd(24.969, 280.841, -9.8, 1.004)
pt3dadd(25.017, 280.951, -9.8, 1.004)
pt3dadd(25.066, 281.062, -9.8, 1.004)
pt3dadd(25.113, 281.171, -9.8, 1.006)
pt3dadd(25.155, 281.285, -9.8, 1.016)
pt3dadd(25.197, 281.396, -9.8, 1.026)
pt3dadd(25.239, 281.508, -9.8, 1.036)
pt3dadd(25.281, 281.621, -9.8, 1.046)
pt3dadd(25.322, 281.734, -9.8, 1.054)
pt3dadd(25.332, 281.854, -9.8, 1.064)
pt3dadd(25.342, 281.972, -9.8, 1.072)
pt3dadd(25.352, 282.092, -9.8, 1.08)
pt3dadd(25.362, 282.212, -9.8, 1.088)
pt3dadd(25.371, 282.331, -9.8, 1.096)
pt3dadd(25.381, 282.451, -9.8, 1.106)
pt3dadd(25.388, 282.571, -9.8, 1.126)
pt3dadd(25.395, 282.691, -9.8, 1.146)
pt3dadd(25.403, 282.81, -9.8, 1.168)
pt3dadd(25.41, 282.93, -9.8, 1.188)
pt3dadd(25.417, 283.051, -9.8, 1.208)
pt3dadd(25.425, 283.17, -9.8, 1.23)
pt3dadd(25.456, 283.285, -9.8, 1.244)
pt3dadd(25.489, 283.4, -9.8, 1.258)
pt3dadd(25.521, 283.517, -9.8, 1.272)
pt3dadd(25.554, 283.632, -9.8, 1.286)
pt3dadd(25.587, 283.747, -9.8, 1.3)
pt3dadd(25.625, 283.861, -9.8, 1.312)
pt3dadd(25.667, 283.973, -9.8, 1.32)
pt3dadd(25.709, 284.087, -9.8, 1.33)
pt3dadd(25.751, 284.198, -9.8, 1.34)
pt3dadd(25.793, 284.311, -9.8, 1.35)
pt3dadd(25.828, 284.425, -9.8, 1.356)
pt3dadd(25.848, 284.543, -9.8, 1.356)
pt3dadd(25.869, 284.662, -9.8, 1.356)
pt3dadd(25.864, 284.78, -9.8, 1.348)
pt3dadd(25.856, 284.9, -9.8, 1.34)
pt3dadd(25.851, 285.019, -9.8, 1.33)
pt3dadd(25.942, 285.097, -9.8, 1.284)
pt3dadd(26.033, 285.175, -9.8, 1.236)
pt3dadd(26.108, 285.269, -9.8, 1.158)
pt3dadd(26.179, 285.365, -9.8, 1.076)
pt3dadd(26.246, 285.464, -9.8, 0.962)
pt3dadd(26.304, 285.569, -9.8, 0.876)
pt3dadd(26.346, 285.682, -9.8, 0.866)
pt3dadd(26.388, 285.794, -9.8, 0.856)
pt3dadd(26.43, 285.906, -9.8, 0.846)
pt3dadd(26.473, 286.019, -9.8, 0.838)
pt3dadd(26.511, 286.132, -9.8, 0.832)
pt3dadd(26.519, 286.252, -9.8, 0.862)
pt3dadd(26.527, 286.37, -9.8, 0.89)
pt3dadd(26.524, 286.49, -9.8, 0.922)
pt3dadd(26.512, 286.609, -9.8, 0.954)
pt3dadd(26.499, 286.729, -9.8, 0.988)
pt3dadd(26.507, 286.848, -9.8, 1.01)
pt3dadd(26.535, 286.964, -9.8, 1.02)
pt3dadd(26.574, 287.074, -9.8, 1.024)
pt3dadd(26.671, 287.144, -9.8, 0.99)
pt3dadd(26.767, 287.215, -9.8, 0.956)
pt3dadd(26.868, 287.281, -9.8, 0.906)
pt3dadd(26.971, 287.342, -9.8, 0.878)
pt3dadd(27.076, 287.401, -9.8, 0.878)
pt3dadd(27.178, 287.462, -9.8, 0.894)
pt3dadd(27.27, 287.539, -9.8, 0.976)
pt3dadd(27.359, 287.62, -9.8, 1.058)
pt3dadd(27.387, 287.736, -9.8, 1.176)
pt3dadd(27.414, 287.852, -9.8, 1.294)
pt3dadd(27.425, 287.971, -9.8, 1.388)
pt3dadd(27.427, 288.092, -9.8, 1.472)
pt3dadd(27.429, 288.211, -9.8, 1.556)
pt3dadd(27.44, 288.331, -9.8, 1.572)
pt3dadd(27.457, 288.45, -9.8, 1.572)
pt3dadd(27.49, 288.564, -9.8, 1.54)
pt3dadd(27.522, 288.68, -9.8, 1.508)
pt3dadd(27.555, 288.796, -9.8, 1.474)
pt3dadd(27.588, 288.911, -9.8, 1.442)
pt3dadd(27.621, 289.027, -9.8, 1.41)
pt3dadd(27.693, 289.122, -9.8, 1.366)
pt3dadd(27.77, 289.213, -9.8, 1.32)
pt3dadd(27.847, 289.306, -9.8, 1.274)
pt3dadd(27.925, 289.397, -9.8, 1.228)
pt3dadd(28.002, 289.489, -9.8, 1.182)
pt3dadd(28.07, 289.586, -9.8, 1.152)
pt3dadd(28.138, 289.687, -9.8, 1.12)
}
}
proc shape3d_145() {
dend_5[16] { pt3dadd(28.206, 289.786, -9.8, 1.09)
pt3dadd(28.273, 289.885, -9.8, 1.06)
pt3dadd(28.341, 289.984, -9.8, 1.03)
pt3dadd(28.446, 290.041, -9.8, 1.008)
pt3dadd(28.551, 290.1, -9.8, 0.986)
pt3dadd(28.65, 290.167, -9.8, 0.972)
pt3dadd(28.747, 290.238, -9.8, 0.96)
pt3dadd(28.841, 290.312, -9.8, 0.936)
pt3dadd(28.932, 290.39, -9.8, 0.902)
pt3dadd(28.994, 290.483, -9.8, 0.866)
pt3dadd(29.002, 290.603, -9.8, 0.826)
pt3dadd(29.01, 290.723, -9.8, 0.788)
pt3dadd(29.061, 290.827, -9.8, 0.738)
pt3dadd(29.116, 290.934, -9.8, 0.704)
pt3dadd(29.152, 291.048, -9.8, 0.704)
pt3dadd(29.187, 291.163, -9.8, 0.704)
pt3dadd(29.223, 291.277, -9.8, 0.704)
pt3dadd(29.259, 291.391, -9.8, 0.704)
pt3dadd(29.295, 291.506, -9.8, 0.704)
}
dend_5[17] {pt3dclear()
pt3dadd(29.295, 291.506, -9.8, 0.704)
pt3dadd(29.299, 291.526, -9.8, 0.704)
pt3dadd(29.323, 291.644, -9.8, 0.714)
pt3dadd(29.346, 291.762, -9.8, 0.722)
pt3dadd(29.37, 291.878, -9.8, 0.732)
pt3dadd(29.394, 291.997, -9.8, 0.74)
pt3dadd(29.417, 292.114, -9.8, 0.75)
pt3dadd(29.431, 292.234, -9.8, 0.758)
pt3dadd(29.439, 292.352, -9.8, 0.766)
pt3dadd(29.446, 292.472, -9.8, 0.774)
pt3dadd(29.453, 292.592, -9.8, 0.782)
pt3dadd(29.461, 292.712, -9.8, 0.792)
pt3dadd(29.468, 292.832, -9.8, 0.8)
pt3dadd(29.475, 292.951, -9.799, 0.808)
pt3dadd(29.483, 293.071, -9.797, 0.816)
pt3dadd(29.49, 293.192, -9.795, 0.824)
pt3dadd(29.498, 293.311, -9.793, 0.834)
pt3dadd(29.505, 293.431, -9.792, 0.842)
pt3dadd(29.513, 293.55, -9.79, 0.85)
pt3dadd(29.536, 293.666, -9.779, 0.862)
pt3dadd(29.573, 293.779, -9.76, 0.878)
pt3dadd(29.61, 293.89, -9.741, 0.894)
pt3dadd(29.646, 294.002, -9.722, 0.91)
pt3dadd(29.683, 294.115, -9.704, 0.926)
pt3dadd(29.691, 294.233, -9.7, 0.952)
pt3dadd(29.694, 294.353, -9.7, 0.98)
pt3dadd(29.696, 294.473, -9.7, 1.008)
pt3dadd(29.699, 294.593, -9.7, 1.036)
pt3dadd(29.701, 294.713, -9.7, 1.064)
pt3dadd(29.703, 294.833, -9.7, 1.092)
pt3dadd(29.717, 294.948, -9.685, 1.116)
pt3dadd(29.739, 295.062, -9.656, 1.138)
pt3dadd(29.761, 295.175, -9.628, 1.158)
pt3dadd(29.783, 295.288, -9.6, 1.18)
pt3dadd(29.805, 295.4, -9.572, 1.202)
pt3dadd(29.82, 295.512, -9.536, 1.196)
pt3dadd(29.835, 295.622, -9.498, 1.186)
pt3dadd(29.849, 295.732, -9.46, 1.176)
pt3dadd(29.863, 295.842, -9.422, 1.164)
pt3dadd(29.878, 295.952, -9.387, 1.148)
pt3dadd(29.897, 296.069, -9.369, 1.098)
pt3dadd(29.917, 296.185, -9.351, 1.048)
pt3dadd(29.937, 296.303, -9.334, 1)
pt3dadd(29.956, 296.419, -9.316, 0.95)
pt3dadd(29.975, 296.534, -9.295, 0.9)
pt3dadd(29.981, 296.638, -9.246, 0.858)
pt3dadd(29.987, 296.742, -9.196, 0.814)
pt3dadd(29.994, 296.845, -9.146, 0.772)
pt3dadd(30, 296.95, -9.096, 0.728)
pt3dadd(30.001, 297.038, -9.032, 0.696)
pt3dadd(29.994, 297.102, -8.949, 0.682)
pt3dadd(29.987, 297.168, -8.865, 0.668)
pt3dadd(29.98, 297.234, -8.781, 0.652)
pt3dadd(29.973, 297.299, -8.698, 0.638)
pt3dadd(29.965, 297.382, -8.632, 0.632)
pt3dadd(29.953, 297.494, -8.6, 0.642)
pt3dadd(29.941, 297.607, -8.567, 0.652)
pt3dadd(29.932, 297.695, -8.499, 0.688)
pt3dadd(29.923, 297.781, -8.43, 0.724)
pt3dadd(29.914, 297.864, -8.358, 0.77)
pt3dadd(29.906, 297.946, -8.285, 0.816)
pt3dadd(29.898, 297.977, -8.192, 0.872)
pt3dadd(29.892, 297.99, -8.093, 0.932)
pt3dadd(29.879, 298.002, -7.995, 0.99)
pt3dadd(29.836, 297.998, -7.902, 1.056)
pt3dadd(29.799, 297.994, -7.807, 1.118)
pt3dadd(29.778, 298.007, -7.709, 1.104)
pt3dadd(29.775, 298.044, -7.614, 1.04)
pt3dadd(29.77, 298.087, -7.522, 0.99)
pt3dadd(29.766, 298.12, -7.425, 0.98)
pt3dadd(29.761, 298.175, -7.34, 0.954)
pt3dadd(29.749, 298.285, -7.307, 0.964)
pt3dadd(29.736, 298.405, -7.3, 1.014)
pt3dadd(29.724, 298.524, -7.3, 1.09)
pt3dadd(29.711, 298.644, -7.294, 1.168)
pt3dadd(29.699, 298.759, -7.273, 1.222)
pt3dadd(29.689, 298.858, -7.219, 1.204)
pt3dadd(29.68, 298.945, -7.151, 1.18)
pt3dadd(29.671, 299.033, -7.083, 1.156)
pt3dadd(29.7, 299.136, -7.039, 1.156)
pt3dadd(29.732, 299.24, -7, 1.156)
pt3dadd(29.759, 299.357, -7, 1.178)
pt3dadd(29.786, 299.474, -7, 1.198)
pt3dadd(29.873, 299.534, -6.986, 1.23)
pt3dadd(29.985, 299.57, -6.966, 1.264)
pt3dadd(30.045, 299.634, -6.926, 1.296)
pt3dadd(30.051, 299.729, -6.865, 1.326)
pt3dadd(30.057, 299.825, -6.804, 1.356)
pt3dadd(30.062, 299.904, -6.735, 1.386)
pt3dadd(30.06, 299.924, -6.636, 1.404)
pt3dadd(30.057, 299.945, -6.537, 1.424)
pt3dadd(30.051, 300.005, -6.456, 1.432)
pt3dadd(30.042, 300.088, -6.385, 1.432)
pt3dadd(30.033, 300.173, -6.315, 1.432)
pt3dadd(30.049, 300.284, -6.296, 1.388)
pt3dadd(30.072, 300.401, -6.291, 1.334)
pt3dadd(30.088, 300.514, -6.267, 1.288)
pt3dadd(30.096, 300.619, -6.222, 1.25)
pt3dadd(30.105, 300.727, -6.176, 1.212)
pt3dadd(30.142, 300.774, -6.096, 1.156)
pt3dadd(30.186, 300.805, -6.007, 1.092)
pt3dadd(30.206, 300.812, -5.909, 1.058)
pt3dadd(30.199, 300.898, -5.843, 1.054)
pt3dadd(30.189, 300.99, -5.781, 1.054)
pt3dadd(30.179, 301.084, -5.719, 1.054)
pt3dadd(30.169, 301.176, -5.656, 1.054)
pt3dadd(30.159, 301.27, -5.594, 1.054)
pt3dadd(30.157, 301.296, -5.498, 1.09)
pt3dadd(30.155, 301.316, -5.399, 1.13)
pt3dadd(30.151, 301.349, -5.305, 1.174)
pt3dadd(30.145, 301.409, -5.219, 1.232)
pt3dadd(30.138, 301.477, -5.14, 1.288)
pt3dadd(30.126, 301.59, -5.107, 1.342)
pt3dadd(30.114, 301.703, -5.074, 1.394)
pt3dadd(30.104, 301.8, -5.018, 1.444)
pt3dadd(30.094, 301.894, -4.955, 1.49)
pt3dadd(30.083, 301.999, -4.915, 1.516)
pt3dadd(30.071, 302.114, -4.887, 1.532)
pt3dadd(30.06, 302.214, -4.832, 1.522)
pt3dadd(30.05, 302.314, -4.777, 1.512)
pt3dadd(30.039, 302.414, -4.722, 1.502)
pt3dadd(30.029, 302.513, -4.667, 1.492)
pt3dadd(30.018, 302.614, -4.613, 1.482)
pt3dadd(30.007, 302.72, -4.57, 1.45)
pt3dadd(29.996, 302.83, -4.528, 1.416)
pt3dadd(29.984, 302.938, -4.486, 1.382)
pt3dadd(29.973, 303.047, -4.444, 1.348)
pt3dadd(29.961, 303.154, -4.401, 1.316)
pt3dadd(29.97, 303.254, -4.35, 1.27)
pt3dadd(29.987, 303.354, -4.295, 1.218)
pt3dadd(30.004, 303.452, -4.24, 1.168)
pt3dadd(30.021, 303.551, -4.184, 1.116)
pt3dadd(30.03, 303.653, -4.134, 1.056)
pt3dadd(30.018, 303.763, -4.095, 0.968)
pt3dadd(30.006, 303.872, -4.056, 0.88)
pt3dadd(30.049, 303.906, -3.968, 0.842)
pt3dadd(30.093, 303.937, -3.879, 0.804)
pt3dadd(30.197, 303.974, -3.839, 0.816)
pt3dadd(30.3, 304.013, -3.8, 0.828)
pt3dadd(30.335, 304.127, -3.8, 0.85)
pt3dadd(30.369, 304.243, -3.8, 0.872)
pt3dadd(30.44, 304.334, -3.8, 0.904)
pt3dadd(30.522, 304.422, -3.8, 0.932)
pt3dadd(30.593, 304.518, -3.8, 0.944)
pt3dadd(30.66, 304.618, -3.8, 0.956)
pt3dadd(30.703, 304.729, -3.8, 0.968)
pt3dadd(30.745, 304.842, -3.8, 0.978)
pt3dadd(30.737, 304.96, -3.789, 0.97)
pt3dadd(30.724, 305.077, -3.776, 0.962)
pt3dadd(30.714, 305.19, -3.752, 0.952)
pt3dadd(30.711, 305.281, -3.687, 0.94)
pt3dadd(30.716, 305.376, -3.629, 0.918)
pt3dadd(30.757, 305.484, -3.603, 0.86)
pt3dadd(30.759, 305.587, -3.553, 0.83)
pt3dadd(30.757, 305.688, -3.5, 0.804)
pt3dadd(30.754, 305.79, -3.447, 0.778)
pt3dadd(30.752, 305.892, -3.395, 0.754)
pt3dadd(30.75, 305.994, -3.342, 0.726)
pt3dadd(30.763, 306.094, -3.288, 0.688)
pt3dadd(30.777, 306.194, -3.233, 0.648)
pt3dadd(30.79, 306.294, -3.179, 0.61)
pt3dadd(30.803, 306.394, -3.125, 0.57)
pt3dadd(30.818, 306.497, -3.075, 0.54)
pt3dadd(30.833, 306.601, -3.028, 0.518)
pt3dadd(30.849, 306.707, -2.982, 0.496)
pt3dadd(30.864, 306.812, -2.935, 0.474)
pt3dadd(30.88, 306.917, -2.889, 0.452)
pt3dadd(30.895, 307.025, -2.848, 0.468)
pt3dadd(30.909, 307.134, -2.807, 0.484)
pt3dadd(30.924, 307.243, -2.766, 0.5)
pt3dadd(30.939, 307.35, -2.725, 0.518)
pt3dadd(30.944, 307.463, -2.7, 0.54)
pt3dadd(30.933, 307.583, -2.7, 0.572)
pt3dadd(30.923, 307.703, -2.7, 0.606)
pt3dadd(30.912, 307.822, -2.7, 0.638)
pt3dadd(30.901, 307.942, -2.7, 0.67)
pt3dadd(30.891, 308.06, -2.7, 0.704)
pt3dadd(30.88, 308.18, -2.7, 0.736)
pt3dadd(30.868, 308.3, -2.693, 0.776)
pt3dadd(30.856, 308.418, -2.679, 0.826)
pt3dadd(30.844, 308.537, -2.664, 0.874)
}
}
proc shape3d_146() {
dend_5[17] { pt3dadd(30.831, 308.654, -2.65, 0.924)
pt3dadd(30.819, 308.772, -2.635, 0.972)
pt3dadd(30.806, 308.891, -2.621, 1.022)
pt3dadd(30.803, 309.004, -2.597, 1.068)
pt3dadd(30.818, 309.109, -2.55, 1.112)
pt3dadd(30.834, 309.215, -2.504, 1.156)
pt3dadd(30.849, 309.32, -2.457, 1.202)
pt3dadd(30.865, 309.424, -2.411, 1.246)
pt3dadd(30.859, 309.539, -2.387, 1.266)
pt3dadd(30.846, 309.658, -2.371, 1.278)
pt3dadd(30.834, 309.774, -2.354, 1.29)
pt3dadd(30.822, 309.893, -2.338, 1.302)
pt3dadd(30.809, 310.01, -2.322, 1.314)
pt3dadd(30.797, 310.128, -2.305, 1.328)
pt3dadd(30.784, 310.247, -2.3, 1.324)
pt3dadd(30.772, 310.367, -2.3, 1.312)
pt3dadd(30.759, 310.486, -2.3, 1.302)
pt3dadd(30.747, 310.606, -2.3, 1.292)
pt3dadd(30.734, 310.724, -2.3, 1.28)
pt3dadd(30.722, 310.843, -2.3, 1.27)
pt3dadd(30.709, 310.963, -2.3, 1.26)
pt3dadd(30.697, 311.076, -2.274, 1.246)
pt3dadd(30.686, 311.188, -2.237, 1.232)
pt3dadd(30.674, 311.298, -2.2, 1.218)
pt3dadd(30.662, 311.408, -2.163, 1.204)
pt3dadd(30.651, 311.519, -2.126, 1.19)
pt3dadd(30.642, 311.603, -2.07, 1.178)
pt3dadd(30.64, 311.623, -1.972, 1.168)
pt3dadd(30.638, 311.644, -1.873, 1.158)
pt3dadd(30.628, 311.732, -1.832, 1.168)
pt3dadd(30.616, 311.85, -1.815, 1.188)
pt3dadd(30.604, 311.968, -1.8, 1.206)
pt3dadd(30.591, 312.088, -1.8, 1.214)
pt3dadd(30.579, 312.206, -1.8, 1.222)
pt3dadd(30.564, 312.326, -1.8, 1.23)
pt3dadd(30.537, 312.443, -1.8, 1.23)
pt3dadd(30.51, 312.56, -1.8, 1.23)
pt3dadd(30.47, 312.672, -1.797, 1.224)
pt3dadd(30.412, 312.776, -1.789, 1.206)
pt3dadd(30.397, 312.894, -1.775, 1.214)
pt3dadd(30.382, 313.012, -1.76, 1.222)
pt3dadd(30.368, 313.129, -1.745, 1.23)
pt3dadd(30.353, 313.247, -1.731, 1.238)
pt3dadd(30.339, 313.366, -1.716, 1.246)
pt3dadd(30.324, 313.483, -1.701, 1.254)
pt3dadd(30.311, 313.602, -1.7, 1.27)
pt3dadd(30.299, 313.722, -1.7, 1.288)
pt3dadd(30.286, 313.841, -1.7, 1.304)
pt3dadd(30.273, 313.961, -1.7, 1.32)
pt3dadd(30.261, 314.08, -1.7, 1.338)
pt3dadd(30.248, 314.2, -1.7, 1.354)
pt3dadd(30.237, 314.303, -1.654, 1.366)
pt3dadd(30.227, 314.406, -1.603, 1.378)
pt3dadd(30.219, 314.478, -1.527, 1.39)
pt3dadd(30.213, 314.539, -1.441, 1.4)
pt3dadd(30.206, 314.608, -1.359, 1.396)
pt3dadd(30.198, 314.678, -1.28, 1.374)
pt3dadd(30.193, 314.725, -1.188, 1.296)
pt3dadd(30.188, 314.772, -1.095, 1.22)
pt3dadd(30.18, 314.851, -1.023, 1.1)
pt3dadd(30.171, 314.938, -0.954, 0.97)
pt3dadd(30.159, 315.048, -0.925, 0.858)
pt3dadd(30.147, 315.166, -0.912, 0.756)
pt3dadd(30.134, 315.284, -0.9, 0.652)
}
dend_5[18] {pt3dclear()
pt3dadd(29.295, 291.506, -9.8, 0.704)
pt3dadd(29.331, 291.496, -9.814, 0.708)
pt3dadd(29.437, 291.463, -9.852, 0.724)
pt3dadd(29.543, 291.43, -9.891, 0.74)
pt3dadd(29.649, 291.397, -9.93, 0.754)
pt3dadd(29.754, 291.365, -9.969, 0.77)
pt3dadd(29.86, 291.332, -10.008, 0.786)
pt3dadd(29.966, 291.3, -10.047, 0.8)
pt3dadd(30.071, 291.268, -10.086, 0.816)
pt3dadd(30.177, 291.236, -10.125, 0.832)
pt3dadd(30.283, 291.204, -10.164, 0.848)
pt3dadd(30.388, 291.172, -10.203, 0.862)
pt3dadd(30.494, 291.139, -10.242, 0.878)
pt3dadd(30.514, 291.035, -10.208, 0.992)
pt3dadd(30.551, 290.923, -10.194, 1.058)
pt3dadd(30.632, 290.854, -10.163, 1.046)
pt3dadd(30.74, 290.837, -10.124, 0.942)
pt3dadd(30.854, 290.809, -10.102, 0.858)
pt3dadd(30.953, 290.784, -10.06, 0.774)
pt3dadd(31.026, 290.764, -9.983, 0.694)
pt3dadd(31.121, 290.74, -9.937, 0.636)
pt3dadd(31.237, 290.714, -9.921, 0.6)
pt3dadd(31.352, 290.689, -9.906, 0.564)
pt3dadd(31.47, 290.689, -9.9, 0.546)
pt3dadd(31.59, 290.701, -9.9, 0.538)
pt3dadd(31.709, 290.714, -9.9, 0.53)
pt3dadd(31.829, 290.717, -9.9, 0.546)
pt3dadd(31.949, 290.712, -9.9, 0.556)
pt3dadd(32.069, 290.708, -9.9, 0.56)
pt3dadd(32.189, 290.702, -9.9, 0.564)
pt3dadd(32.309, 290.699, -9.9, 0.568)
pt3dadd(32.428, 290.694, -9.9, 0.572)
pt3dadd(32.548, 290.689, -9.9, 0.576)
pt3dadd(32.667, 290.694, -9.892, 0.582)
pt3dadd(32.785, 290.706, -9.877, 0.59)
pt3dadd(32.903, 290.719, -9.863, 0.598)
pt3dadd(33.021, 290.731, -9.849, 0.606)
pt3dadd(33.14, 290.743, -9.834, 0.614)
pt3dadd(33.258, 290.756, -9.82, 0.624)
pt3dadd(33.376, 290.768, -9.81, 0.63)
pt3dadd(33.496, 290.782, -9.809, 0.638)
pt3dadd(33.615, 290.794, -9.807, 0.646)
pt3dadd(33.734, 290.806, -9.806, 0.652)
pt3dadd(33.854, 290.819, -9.804, 0.66)
pt3dadd(33.973, 290.831, -9.802, 0.668)
pt3dadd(34.092, 290.844, -9.801, 0.674)
pt3dadd(34.211, 290.856, -9.808, 0.682)
pt3dadd(34.329, 290.868, -9.825, 0.69)
pt3dadd(34.446, 290.881, -9.841, 0.698)
pt3dadd(34.564, 290.893, -9.858, 0.706)
pt3dadd(34.682, 290.905, -9.874, 0.716)
pt3dadd(34.799, 290.918, -9.891, 0.724)
pt3dadd(34.914, 290.945, -9.9, 0.732)
pt3dadd(35.025, 290.99, -9.9, 0.742)
pt3dadd(35.137, 291.035, -9.9, 0.754)
pt3dadd(35.248, 291.079, -9.9, 0.742)
pt3dadd(35.36, 291.122, -9.9, 0.732)
pt3dadd(35.463, 291.184, -9.9, 0.722)
pt3dadd(35.559, 291.254, -9.9, 0.71)
pt3dadd(35.632, 291.342, -9.9, 0.708)
pt3dadd(35.666, 291.458, -9.9, 0.718)
pt3dadd(35.705, 291.57, -9.9, 0.732)
pt3dadd(35.8, 291.643, -9.9, 0.784)
pt3dadd(35.895, 291.716, -9.9, 0.816)
pt3dadd(35.99, 291.79, -9.9, 0.836)
pt3dadd(36.085, 291.863, -9.9, 0.856)
pt3dadd(36.18, 291.937, -9.9, 0.876)
pt3dadd(36.275, 292.009, -9.9, 0.896)
pt3dadd(36.381, 292.061, -9.9, 0.904)
pt3dadd(36.497, 292.092, -9.9, 0.904)
pt3dadd(36.612, 292.124, -9.9, 0.904)
pt3dadd(36.728, 292.156, -9.9, 0.904)
pt3dadd(36.844, 292.189, -9.9, 0.904)
pt3dadd(36.959, 292.22, -9.9, 0.904)
pt3dadd(37.063, 292.274, -9.9, 0.904)
pt3dadd(37.154, 292.352, -9.9, 0.904)
pt3dadd(37.244, 292.433, -9.9, 0.904)
pt3dadd(37.335, 292.511, -9.9, 0.904)
pt3dadd(37.425, 292.59, -9.9, 0.904)
pt3dadd(37.522, 292.658, -9.9, 0.904)
pt3dadd(37.628, 292.715, -9.9, 0.904)
pt3dadd(37.734, 292.771, -9.9, 0.904)
pt3dadd(37.841, 292.826, -9.9, 0.904)
pt3dadd(37.947, 292.883, -9.9, 0.904)
pt3dadd(38.054, 292.937, -9.9, 0.906)
pt3dadd(38.169, 292.97, -9.9, 0.934)
pt3dadd(38.285, 293.003, -9.9, 0.964)
pt3dadd(38.398, 293.041, -9.902, 0.984)
pt3dadd(38.508, 293.088, -9.907, 0.996)
pt3dadd(38.618, 293.131, -9.916, 1)
pt3dadd(38.725, 293.162, -9.954, 0.976)
pt3dadd(38.829, 293.197, -9.99, 0.95)
pt3dadd(38.89, 293.297, -10.014, 0.898)
pt3dadd(38.959, 293.388, -10.037, 0.85)
pt3dadd(39.063, 293.443, -10.057, 0.828)
pt3dadd(39.168, 293.496, -10.076, 0.806)
pt3dadd(39.272, 293.55, -10.096, 0.784)
pt3dadd(39.385, 293.572, -10.122, 0.77)
pt3dadd(39.499, 293.584, -10.149, 0.76)
pt3dadd(39.614, 293.596, -10.177, 0.754)
pt3dadd(39.731, 293.609, -10.19, 0.75)
pt3dadd(39.851, 293.621, -10.191, 0.742)
pt3dadd(39.97, 293.634, -10.193, 0.734)
pt3dadd(40.089, 293.646, -10.195, 0.728)
pt3dadd(40.209, 293.658, -10.196, 0.72)
pt3dadd(40.328, 293.671, -10.198, 0.712)
pt3dadd(40.447, 293.683, -10.199, 0.706)
pt3dadd(40.567, 293.696, -10.2, 0.692)
pt3dadd(40.686, 293.708, -10.2, 0.676)
pt3dadd(40.806, 293.722, -10.2, 0.658)
pt3dadd(40.923, 293.743, -10.203, 0.64)
pt3dadd(41.04, 293.771, -10.207, 0.62)
pt3dadd(41.149, 293.804, -10.215, 0.604)
pt3dadd(41.167, 293.899, -10.274, 0.632)
pt3dadd(41.195, 293.992, -10.331, 0.658)
pt3dadd(41.263, 294.076, -10.375, 0.688)
pt3dadd(41.353, 294.13, -10.4, 0.71)
pt3dadd(41.472, 294.149, -10.4, 0.726)
pt3dadd(41.59, 294.166, -10.4, 0.742)
pt3dadd(41.709, 294.185, -10.4, 0.758)
pt3dadd(41.828, 294.202, -10.4, 0.772)
pt3dadd(41.94, 294.242, -10.4, 0.786)
pt3dadd(42.048, 294.294, -10.4, 0.796)
pt3dadd(42.159, 294.337, -10.4, 0.812)
pt3dadd(42.273, 294.373, -10.402, 0.824)
pt3dadd(42.384, 294.419, -10.407, 0.814)
pt3dadd(42.494, 294.464, -10.414, 0.802)
pt3dadd(42.598, 294.502, -10.454, 0.776)
pt3dadd(42.7, 294.541, -10.493, 0.75)
pt3dadd(42.783, 294.604, -10.543, 0.706)
pt3dadd(42.865, 294.65, -10.601, 0.666)
pt3dadd(42.942, 294.665, -10.677, 0.63)
pt3dadd(43.009, 294.684, -10.757, 0.588)
pt3dadd(43.045, 294.718, -10.848, 0.532)
pt3dadd(43.142, 294.768, -10.881, 0.504)
pt3dadd(43.245, 294.82, -10.909, 0.478)
}
}
proc shape3d_147() {
dend_5[18] { pt3dadd(43.33, 294.838, -10.977, 0.478)
pt3dadd(43.413, 294.852, -11.048, 0.478)
pt3dadd(43.513, 294.906, -11.075, 0.5)
pt3dadd(43.615, 294.964, -11.098, 0.524)
pt3dadd(43.73, 294.99, -11.088, 0.554)
pt3dadd(43.846, 295.013, -11.075, 0.586)
pt3dadd(43.949, 295.055, -11.047, 0.62)
pt3dadd(44.039, 295.116, -11.01, 0.656)
pt3dadd(44.149, 295.162, -11.005, 0.666)
pt3dadd(44.26, 295.206, -11, 0.678)
pt3dadd(44.329, 295.303, -11, 0.668)
pt3dadd(44.394, 295.404, -11, 0.656)
pt3dadd(44.435, 295.516, -11, 0.636)
pt3dadd(44.47, 295.631, -11, 0.614)
pt3dadd(44.484, 295.747, -11, 0.598)
pt3dadd(44.476, 295.867, -11, 0.59)
pt3dadd(44.468, 295.987, -11, 0.582)
pt3dadd(44.461, 296.107, -11, 0.602)
pt3dadd(44.456, 296.227, -11, 0.64)
pt3dadd(44.475, 296.344, -11, 0.668)
pt3dadd(44.505, 296.46, -11, 0.692)
pt3dadd(44.534, 296.578, -11, 0.716)
pt3dadd(44.564, 296.694, -11, 0.738)
pt3dadd(44.593, 296.809, -11, 0.76)
pt3dadd(44.633, 296.921, -11.006, 0.786)
pt3dadd(44.703, 297.013, -11.029, 0.814)
pt3dadd(44.773, 297.107, -11.052, 0.844)
pt3dadd(44.843, 297.2, -11.075, 0.872)
pt3dadd(44.914, 297.294, -11.097, 0.9)
pt3dadd(44.958, 297.39, -11.142, 0.91)
pt3dadd(44.999, 297.487, -11.19, 0.916)
pt3dadd(45.04, 297.584, -11.238, 0.922)
pt3dadd(45.081, 297.682, -11.286, 0.928)
pt3dadd(45.117, 297.79, -11.315, 0.932)
pt3dadd(45.151, 297.901, -11.336, 0.938)
pt3dadd(45.185, 298.014, -11.358, 0.944)
pt3dadd(45.218, 298.126, -11.379, 0.948)
pt3dadd(45.252, 298.238, -11.4, 0.954)
pt3dadd(45.336, 298.316, -11.431, 0.942)
pt3dadd(45.419, 298.394, -11.463, 0.93)
pt3dadd(45.502, 298.471, -11.494, 0.918)
pt3dadd(45.585, 298.549, -11.525, 0.906)
pt3dadd(45.663, 298.637, -11.544, 0.896)
pt3dadd(45.74, 298.728, -11.559, 0.884)
pt3dadd(45.816, 298.819, -11.574, 0.874)
pt3dadd(45.892, 298.909, -11.589, 0.862)
pt3dadd(45.975, 298.993, -11.601, 0.844)
pt3dadd(46.083, 299.046, -11.606, 0.8)
pt3dadd(46.19, 299.099, -11.611, 0.754)
pt3dadd(46.29, 299.137, -11.655, 0.728)
pt3dadd(46.39, 299.176, -11.701, 0.704)
pt3dadd(46.473, 299.238, -11.751, 0.704)
pt3dadd(46.549, 299.311, -11.79, 0.708)
pt3dadd(46.602, 299.418, -11.795, 0.732)
pt3dadd(46.65, 299.526, -11.805, 0.756)
pt3dadd(46.671, 299.635, -11.843, 0.77)
pt3dadd(46.693, 299.744, -11.88, 0.786)
pt3dadd(46.714, 299.852, -11.918, 0.802)
pt3dadd(46.716, 299.923, -11.997, 0.804)
pt3dadd(46.716, 299.986, -12.082, 0.804)
pt3dadd(46.745, 300.018, -12.173, 0.75)
pt3dadd(46.795, 300.052, -12.258, 0.728)
pt3dadd(46.812, 300.11, -12.344, 0.778)
pt3dadd(46.805, 300.172, -12.429, 0.766)
pt3dadd(46.795, 300.266, -12.485, 0.664)
pt3dadd(46.783, 300.385, -12.5, 0.524)
pt3dadd(46.79, 300.504, -12.5, 0.386)
pt3dadd(46.854, 300.598, -12.5, 0.276)
pt3dadd(46.965, 300.64, -12.5, 0.234)
pt3dadd(47.082, 300.666, -12.5, 0.226)
pt3dadd(47.194, 300.708, -12.5, 0.226)
pt3dadd(47.289, 300.781, -12.5, 0.226)
pt3dadd(47.368, 300.871, -12.5, 0.226)
pt3dadd(47.437, 300.965, -12.5, 0.226)
pt3dadd(47.451, 301.085, -12.5, 0.226)
pt3dadd(47.465, 301.204, -12.5, 0.226)
pt3dadd(47.532, 301.292, -12.5, 0.226)
pt3dadd(47.628, 301.363, -12.5, 0.226)
pt3dadd(47.734, 301.415, -12.5, 0.226)
pt3dadd(47.851, 301.442, -12.5, 0.226)
pt3dadd(47.968, 301.469, -12.5, 0.226)
pt3dadd(48.083, 301.484, -12.479, 0.226)
pt3dadd(48.194, 301.496, -12.446, 0.226)
pt3dadd(48.281, 301.505, -12.378, 0.226)
pt3dadd(48.369, 301.514, -12.311, 0.226)
pt3dadd(48.489, 301.528, -12.307, 0.244)
pt3dadd(48.608, 301.54, -12.303, 0.262)
pt3dadd(48.726, 301.556, -12.3, 0.282)
pt3dadd(48.837, 301.601, -12.3, 0.322)
pt3dadd(48.948, 301.646, -12.3, 0.364)
pt3dadd(49.051, 301.706, -12.304, 0.418)
pt3dadd(49.151, 301.774, -12.309, 0.476)
pt3dadd(49.219, 301.816, -12.363, 0.522)
pt3dadd(49.262, 301.84, -12.454, 0.56)
pt3dadd(49.283, 301.852, -12.549, 0.59)
pt3dadd(49.283, 301.852, -12.649, 0.616)
pt3dadd(49.283, 301.852, -12.749, 0.652)
pt3dadd(49.283, 301.852, -12.849, 0.716)
pt3dadd(49.291, 301.853, -12.949, 0.794)
pt3dadd(49.317, 301.866, -13.045, 0.892)
pt3dadd(49.399, 301.922, -13.094, 1.002)
pt3dadd(49.502, 301.979, -13.11, 1.052)
pt3dadd(49.611, 302.008, -13.142, 1.054)
pt3dadd(49.717, 302.018, -13.187, 1.054)
pt3dadd(49.824, 302.029, -13.232, 1.006)
pt3dadd(49.918, 302.066, -13.287, 0.988)
pt3dadd(50.011, 302.102, -13.342, 0.97)
pt3dadd(50.104, 302.14, -13.397, 0.954)
pt3dadd(50.196, 302.177, -13.452, 0.936)
pt3dadd(50.297, 302.215, -13.496, 0.908)
pt3dadd(50.403, 302.255, -13.528, 0.872)
pt3dadd(50.509, 302.293, -13.561, 0.834)
pt3dadd(50.616, 302.334, -13.594, 0.798)
pt3dadd(50.722, 302.372, -13.627, 0.76)
pt3dadd(50.782, 302.428, -13.692, 0.556)
pt3dadd(50.794, 302.514, -13.762, 0.408)
pt3dadd(50.864, 302.593, -13.794, 0.34)
pt3dadd(50.976, 302.629, -13.791, 0.326)
pt3dadd(51.091, 302.645, -13.766, 0.376)
pt3dadd(51.179, 302.654, -13.699, 0.438)
pt3dadd(51.241, 302.66, -13.615, 0.452)
pt3dadd(51.294, 302.666, -13.525, 0.484)
pt3dadd(51.348, 302.672, -13.436, 0.562)
pt3dadd(51.401, 302.677, -13.346, 0.644)
pt3dadd(51.468, 302.724, -13.274, 0.664)
pt3dadd(51.541, 302.776, -13.211, 0.678)
pt3dadd(51.651, 302.822, -13.206, 0.678)
pt3dadd(51.762, 302.868, -13.201, 0.678)
pt3dadd(51.865, 302.928, -13.2, 0.678)
pt3dadd(51.953, 303.01, -13.2, 0.678)
pt3dadd(52.041, 303.091, -13.2, 0.678)
pt3dadd(52.129, 303.173, -13.2, 0.678)
pt3dadd(52.217, 303.254, -13.2, 0.678)
pt3dadd(52.305, 303.336, -13.2, 0.678)
pt3dadd(52.415, 303.384, -13.2, 0.678)
pt3dadd(52.525, 303.432, -13.2, 0.678)
pt3dadd(52.636, 303.479, -13.2, 0.678)
pt3dadd(52.746, 303.527, -13.2, 0.678)
pt3dadd(52.856, 303.574, -13.2, 0.678)
pt3dadd(52.967, 303.616, -13.208, 0.676)
pt3dadd(53.08, 303.65, -13.227, 0.672)
pt3dadd(53.192, 303.685, -13.246, 0.666)
pt3dadd(53.304, 303.721, -13.266, 0.662)
pt3dadd(53.417, 303.756, -13.285, 0.656)
pt3dadd(53.526, 303.798, -13.3, 0.65)
pt3dadd(53.626, 303.866, -13.3, 0.642)
pt3dadd(53.725, 303.934, -13.3, 0.632)
pt3dadd(53.824, 304.002, -13.3, 0.622)
pt3dadd(53.923, 304.069, -13.3, 0.612)
pt3dadd(54.023, 304.135, -13.3, 0.602)
pt3dadd(54.137, 304.172, -13.3, 0.594)
pt3dadd(54.251, 304.208, -13.3, 0.586)
pt3dadd(54.365, 304.246, -13.3, 0.576)
pt3dadd(54.48, 304.283, -13.3, 0.568)
pt3dadd(54.594, 304.319, -13.3, 0.56)
pt3dadd(54.705, 304.362, -13.301, 0.552)
pt3dadd(54.797, 304.438, -13.308, 0.546)
pt3dadd(54.889, 304.516, -13.315, 0.542)
pt3dadd(54.981, 304.591, -13.322, 0.536)
pt3dadd(55.073, 304.667, -13.329, 0.53)
pt3dadd(55.158, 304.746, -13.347, 0.528)
pt3dadd(55.228, 304.829, -13.391, 0.528)
pt3dadd(55.298, 304.91, -13.434, 0.528)
pt3dadd(55.368, 304.994, -13.477, 0.528)
pt3dadd(55.441, 305.076, -13.516, 0.526)
pt3dadd(55.522, 305.161, -13.536, 0.52)
pt3dadd(55.604, 305.245, -13.556, 0.514)
pt3dadd(55.686, 305.329, -13.576, 0.508)
pt3dadd(55.768, 305.413, -13.596, 0.504)
pt3dadd(55.855, 305.496, -13.6, 0.498)
pt3dadd(55.943, 305.578, -13.6, 0.494)
pt3dadd(56.031, 305.659, -13.6, 0.488)
pt3dadd(56.118, 305.741, -13.6, 0.484)
pt3dadd(56.206, 305.822, -13.6, 0.478)
pt3dadd(56.304, 305.89, -13.613, 0.468)
pt3dadd(56.404, 305.953, -13.63, 0.454)
pt3dadd(56.514, 305.982, -13.656, 0.46)
pt3dadd(56.628, 305.999, -13.684, 0.472)
pt3dadd(56.742, 306.024, -13.7, 0.486)
pt3dadd(56.858, 306.056, -13.7, 0.506)
pt3dadd(56.973, 306.089, -13.7, 0.524)
pt3dadd(56.997, 306.197, -13.704, 0.554)
pt3dadd(57.006, 306.316, -13.708, 0.584)
pt3dadd(57.024, 306.422, -13.734, 0.61)
pt3dadd(57.061, 306.508, -13.798, 0.626)
pt3dadd(57.097, 306.594, -13.862, 0.642)
pt3dadd(57.161, 306.667, -13.9, 0.652)
pt3dadd(57.266, 306.725, -13.9, 0.652)
pt3dadd(57.366, 306.788, -13.9, 0.646)
pt3dadd(57.449, 306.868, -13.905, 0.6)
pt3dadd(57.556, 306.92, -13.919, 0.596)
pt3dadd(57.663, 306.972, -13.932, 0.59)
pt3dadd(57.77, 307.024, -13.945, 0.586)
pt3dadd(57.878, 307.075, -13.959, 0.58)
pt3dadd(57.986, 307.12, -13.978, 0.582)
pt3dadd(58.096, 307.156, -14.004, 0.592)
pt3dadd(58.206, 307.193, -14.031, 0.602)
pt3dadd(58.315, 307.229, -14.058, 0.612)
pt3dadd(58.425, 307.264, -14.085, 0.622)
pt3dadd(58.525, 307.32, -14.1, 0.636)
}
}
proc shape3d_148() {
dend_5[18] { pt3dadd(58.613, 307.402, -14.1, 0.656)
pt3dadd(58.701, 307.483, -14.1, 0.676)
pt3dadd(58.789, 307.565, -14.1, 0.696)
pt3dadd(58.877, 307.646, -14.1, 0.718)
pt3dadd(58.97, 307.721, -14.106, 0.73)
pt3dadd(59.071, 307.784, -14.12, 0.736)
pt3dadd(59.171, 307.848, -14.134, 0.742)
pt3dadd(59.271, 307.913, -14.148, 0.746)
pt3dadd(59.371, 307.976, -14.162, 0.752)
pt3dadd(59.458, 308.042, -14.2, 0.744)
pt3dadd(59.539, 308.11, -14.248, 0.732)
pt3dadd(59.619, 308.177, -14.297, 0.72)
pt3dadd(59.7, 308.244, -14.345, 0.708)
pt3dadd(59.795, 308.304, -14.37, 0.694)
pt3dadd(59.901, 308.359, -14.377, 0.68)
pt3dadd(60.007, 308.414, -14.383, 0.666)
pt3dadd(60.114, 308.471, -14.39, 0.652)
pt3dadd(60.22, 308.525, -14.396, 0.636)
pt3dadd(60.331, 308.563, -14.4, 0.628)
pt3dadd(60.451, 308.576, -14.4, 0.648)
pt3dadd(60.57, 308.588, -14.4, 0.708)
pt3dadd(60.689, 308.602, -14.405, 0.8)
pt3dadd(60.801, 308.612, -14.434, 0.922)
pt3dadd(60.882, 308.622, -14.505, 1.058)
pt3dadd(60.936, 308.627, -14.594, 1.104)
pt3dadd(60.979, 308.642, -14.686, 1.066)
pt3dadd(60.993, 308.683, -14.778, 0.934)
pt3dadd(60.985, 308.766, -14.849, 0.794)
pt3dadd(60.973, 308.875, -14.886, 0.708)
pt3dadd(60.986, 308.988, -14.9, 0.65)
pt3dadd(61.083, 309.059, -14.9, 0.628)
pt3dadd(61.179, 309.131, -14.9, 0.604)
pt3dadd(61.286, 309.181, -14.914, 0.582)
pt3dadd(61.394, 309.23, -14.93, 0.558)
pt3dadd(61.486, 309.284, -14.969, 0.554)
pt3dadd(61.586, 309.349, -14.983, 0.558)
pt3dadd(61.687, 309.413, -14.997, 0.564)
pt3dadd(61.787, 309.476, -15.011, 0.57)
pt3dadd(61.887, 309.54, -15.025, 0.574)
pt3dadd(61.992, 309.583, -15.049, 0.584)
pt3dadd(62.102, 309.594, -15.086, 0.598)
pt3dadd(62.213, 309.606, -15.123, 0.612)
pt3dadd(62.324, 309.618, -15.16, 0.626)
pt3dadd(62.435, 309.629, -15.197, 0.64)
pt3dadd(62.545, 309.642, -15.234, 0.654)
pt3dadd(62.645, 309.707, -15.248, 0.68)
pt3dadd(62.746, 309.77, -15.262, 0.706)
pt3dadd(62.846, 309.834, -15.276, 0.732)
pt3dadd(62.946, 309.899, -15.29, 0.76)
pt3dadd(63.044, 309.966, -15.3, 0.79)
pt3dadd(63.134, 310.045, -15.3, 0.836)
pt3dadd(63.224, 310.123, -15.3, 0.88)
pt3dadd(63.315, 310.204, -15.3, 0.926)
pt3dadd(63.405, 310.282, -15.3, 0.97)
pt3dadd(63.497, 310.358, -15.3, 1.024)
pt3dadd(63.594, 310.43, -15.3, 1.104)
pt3dadd(63.688, 310.504, -15.3, 1.182)
pt3dadd(63.745, 310.609, -15.3, 1.204)
pt3dadd(63.802, 310.714, -15.3, 1.228)
pt3dadd(63.915, 310.74, -15.3, 1.2)
pt3dadd(64.033, 310.758, -15.3, 1.164)
pt3dadd(64.152, 310.775, -15.3, 1.13)
pt3dadd(64.259, 310.806, -15.338, 1.07)
pt3dadd(64.366, 310.836, -15.375, 1.008)
pt3dadd(64.408, 310.904, -15.447, 0.946)
pt3dadd(64.472, 310.98, -15.501, 0.92)
pt3dadd(64.546, 311.057, -15.547, 0.908)
pt3dadd(64.62, 311.134, -15.593, 0.896)
pt3dadd(64.694, 311.209, -15.639, 0.884)
pt3dadd(64.765, 311.276, -15.696, 0.86)
pt3dadd(64.835, 311.336, -15.76, 0.832)
pt3dadd(64.902, 311.43, -15.782, 0.782)
pt3dadd(64.968, 311.528, -15.799, 0.73)
pt3dadd(65.052, 311.609, -15.823, 0.676)
pt3dadd(65.129, 311.686, -15.852, 0.624)
pt3dadd(65.131, 311.728, -15.946, 0.568)
pt3dadd(65.133, 311.768, -16.04, 0.512)
pt3dadd(65.096, 311.857, -16.094, 0.476)
pt3dadd(65.052, 311.954, -16.139, 0.444)
pt3dadd(65.008, 312.052, -16.185, 0.412)
pt3dadd(64.982, 312.154, -16.231, 0.37)
pt3dadd(64.964, 312.259, -16.278, 0.324)
pt3dadd(64.956, 312.355, -16.335, 0.282)
pt3dadd(64.966, 312.449, -16.392, 0.244)
pt3dadd(65.043, 312.533, -16.4, 0.226)
pt3dadd(65.157, 312.569, -16.4, 0.226)
pt3dadd(65.276, 312.582, -16.4, 0.226)
pt3dadd(65.395, 312.595, -16.4, 0.226)
pt3dadd(65.514, 312.607, -16.4, 0.248)
pt3dadd(65.634, 312.62, -16.403, 0.274)
pt3dadd(65.753, 312.632, -16.407, 0.3)
pt3dadd(65.872, 312.646, -16.411, 0.326)
pt3dadd(65.957, 312.648, -16.481, 0.388)
pt3dadd(66.042, 312.649, -16.552, 0.45)
pt3dadd(66.152, 312.617, -16.577, 0.512)
pt3dadd(66.264, 312.581, -16.599, 0.574)
pt3dadd(66.381, 312.587, -16.583, 0.606)
pt3dadd(66.499, 312.593, -16.565, 0.636)
pt3dadd(66.572, 312.599, -16.51, 0.656)
pt3dadd(66.594, 312.605, -16.412, 0.662)
pt3dadd(66.615, 312.61, -16.313, 0.668)
pt3dadd(66.637, 312.616, -16.215, 0.674)
pt3dadd(66.68, 312.64, -16.144, 0.678)
pt3dadd(66.777, 312.71, -16.144, 0.678)
pt3dadd(66.821, 312.745, -16.215, 0.678)
pt3dadd(66.843, 312.769, -16.311, 0.67)
pt3dadd(66.867, 312.836, -16.384, 0.61)
pt3dadd(66.939, 312.929, -16.405, 0.494)
pt3dadd(67.018, 312.995, -16.448, 0.4)
pt3dadd(67.068, 313.051, -16.523, 0.388)
pt3dadd(67.137, 313.12, -16.581, 0.418)
pt3dadd(67.222, 313.195, -16.6, 0.45)
pt3dadd(67.313, 313.272, -16.6, 0.484)
pt3dadd(67.401, 313.354, -16.6, 0.574)
pt3dadd(67.49, 313.43, -16.616, 0.612)
pt3dadd(67.581, 313.505, -16.635, 0.622)
pt3dadd(67.671, 313.582, -16.655, 0.634)
pt3dadd(67.762, 313.656, -16.675, 0.646)
pt3dadd(67.858, 313.722, -16.694, 0.652)
pt3dadd(67.952, 313.793, -16.7, 0.612)
pt3dadd(68.038, 313.877, -16.7, 0.516)
pt3dadd(68.13, 313.952, -16.7, 0.478)
pt3dadd(68.231, 314.016, -16.7, 0.524)
pt3dadd(68.323, 314.083, -16.728, 0.59)
pt3dadd(68.373, 314.114, -16.81, 0.602)
pt3dadd(68.386, 314.116, -16.909, 0.63)
pt3dadd(68.386, 314.117, -17.009, 0.656)
pt3dadd(68.388, 314.136, -17.107, 0.678)
pt3dadd(68.424, 314.195, -17.184, 0.7)
pt3dadd(68.53, 314.244, -17.198, 0.724)
pt3dadd(68.639, 314.291, -17.208, 0.746)
pt3dadd(68.739, 314.342, -17.239, 0.798)
pt3dadd(68.834, 314.396, -17.281, 0.866)
pt3dadd(68.945, 314.43, -17.3, 0.98)
pt3dadd(69.036, 314.51, -17.3, 0.99)
pt3dadd(69.126, 314.588, -17.3, 1)
pt3dadd(69.216, 314.668, -17.3, 1.01)
pt3dadd(69.307, 314.746, -17.3, 1.02)
pt3dadd(69.397, 314.826, -17.3, 1.03)
pt3dadd(69.498, 314.891, -17.302, 1.01)
pt3dadd(69.598, 314.957, -17.304, 0.99)
pt3dadd(69.699, 315.022, -17.306, 0.97)
pt3dadd(69.799, 315.088, -17.309, 0.952)
pt3dadd(69.9, 315.152, -17.311, 0.932)
pt3dadd(69.992, 315.21, -17.35, 0.904)
pt3dadd(70.084, 315.266, -17.394, 0.874)
pt3dadd(70.175, 315.325, -17.438, 0.844)
pt3dadd(70.266, 315.382, -17.483, 0.816)
pt3dadd(70.353, 315.444, -17.528, 0.788)
pt3dadd(70.436, 315.511, -17.573, 0.764)
pt3dadd(70.519, 315.578, -17.619, 0.74)
pt3dadd(70.603, 315.644, -17.664, 0.716)
pt3dadd(70.681, 315.725, -17.69, 0.698)
pt3dadd(70.754, 315.82, -17.692, 0.688)
pt3dadd(70.826, 315.916, -17.694, 0.678)
pt3dadd(70.898, 316.012, -17.697, 0.668)
pt3dadd(70.971, 316.106, -17.699, 0.658)
pt3dadd(71.053, 316.192, -17.713, 0.646)
pt3dadd(71.142, 316.267, -17.736, 0.636)
pt3dadd(71.231, 316.343, -17.758, 0.624)
pt3dadd(71.32, 316.418, -17.781, 0.612)
pt3dadd(71.413, 316.488, -17.8, 0.602)
pt3dadd(71.529, 316.518, -17.8, 0.594)
pt3dadd(71.645, 316.547, -17.8, 0.586)
pt3dadd(71.762, 316.577, -17.8, 0.576)
pt3dadd(71.878, 316.607, -17.8, 0.568)
pt3dadd(71.994, 316.636, -17.8, 0.56)
pt3dadd(72.11, 316.666, -17.8, 0.552)
pt3dadd(72.219, 316.716, -17.8, 0.552)
pt3dadd(72.327, 316.769, -17.8, 0.552)
pt3dadd(72.422, 316.84, -17.8, 0.574)
pt3dadd(72.507, 316.924, -17.8, 0.61)
pt3dadd(72.579, 317.018, -17.8, 0.646)
pt3dadd(72.636, 317.124, -17.8, 0.68)
pt3dadd(72.683, 317.233, -17.8, 0.71)
pt3dadd(72.711, 317.351, -17.8, 0.732)
pt3dadd(72.739, 317.467, -17.8, 0.752)
pt3dadd(72.734, 317.587, -17.8, 0.728)
pt3dadd(72.73, 317.706, -17.803, 0.702)
pt3dadd(72.741, 317.816, -17.84, 0.692)
pt3dadd(72.752, 317.927, -17.878, 0.682)
pt3dadd(72.762, 318.037, -17.915, 0.67)
pt3dadd(72.773, 318.149, -17.952, 0.66)
pt3dadd(72.786, 318.257, -17.993, 0.652)
pt3dadd(72.801, 318.362, -18.039, 0.646)
pt3dadd(72.817, 318.468, -18.086, 0.64)
pt3dadd(72.832, 318.574, -18.132, 0.634)
pt3dadd(72.848, 318.678, -18.179, 0.628)
pt3dadd(72.843, 318.781, -18.23, 0.64)
pt3dadd(72.832, 318.882, -18.282, 0.654)
pt3dadd(72.822, 318.984, -18.335, 0.668)
pt3dadd(72.811, 319.085, -18.387, 0.684)
pt3dadd(72.8, 319.187, -18.44, 0.698)
pt3dadd(72.806, 319.297, -18.476, 0.714)
pt3dadd(72.819, 319.411, -18.506, 0.73)
pt3dadd(72.831, 319.525, -18.535, 0.744)
pt3dadd(72.844, 319.639, -18.565, 0.76)
pt3dadd(72.857, 319.752, -18.594, 0.776)
pt3dadd(72.851, 319.854, -18.646, 0.778)
pt3dadd(72.84, 319.952, -18.702, 0.778)
}
}
proc shape3d_149() {
dend_5[18] { pt3dadd(72.829, 320.06, -18.744, 0.75)
pt3dadd(72.817, 320.173, -18.777, 0.708)
pt3dadd(72.799, 320.287, -18.8, 0.66)
pt3dadd(72.767, 320.402, -18.8, 0.602)
pt3dadd(72.734, 320.518, -18.8, 0.544)
pt3dadd(72.654, 320.594, -18.783, 0.48)
pt3dadd(72.555, 320.656, -18.76, 0.414)
pt3dadd(72.583, 320.689, -18.685, 0.356)
pt3dadd(72.639, 320.717, -18.6, 0.302)
}
dend_5[19] {pt3dclear()
pt3dadd(44.339, 213.048, -10.2, 1.482)
pt3dadd(44.408, 213.043, -10.216, 1.45)
pt3dadd(44.523, 213.035, -10.242, 1.398)
pt3dadd(44.638, 213.026, -10.268, 1.344)
pt3dadd(44.754, 213.017, -10.295, 1.292)
pt3dadd(44.87, 213.008, -10.321, 1.238)
pt3dadd(44.985, 213, -10.347, 1.186)
pt3dadd(45.1, 212.992, -10.373, 1.132)
pt3dadd(45.216, 212.983, -10.4, 1.08)
pt3dadd(45.331, 212.975, -10.426, 1.026)
pt3dadd(45.447, 212.966, -10.452, 0.974)
pt3dadd(45.562, 212.957, -10.479, 0.92)
pt3dadd(45.678, 212.948, -10.505, 0.868)
pt3dadd(45.793, 212.94, -10.531, 0.814)
pt3dadd(45.909, 212.932, -10.558, 0.76)
pt3dadd(46.024, 212.923, -10.584, 0.708)
pt3dadd(46.139, 212.915, -10.61, 0.654)
pt3dadd(46.255, 212.906, -10.637, 0.602)
pt3dadd(46.37, 212.897, -10.663, 0.548)
pt3dadd(46.486, 212.888, -10.689, 0.496)
pt3dadd(46.578, 212.885, -10.728, 0.458)
pt3dadd(46.565, 212.914, -10.823, 0.502)
pt3dadd(46.569, 212.999, -10.887, 0.6)
pt3dadd(46.604, 213.11, -10.9, 0.662)
pt3dadd(46.669, 213.211, -10.9, 0.678)
pt3dadd(46.731, 213.313, -10.9, 0.678)
pt3dadd(46.773, 213.426, -10.9, 0.69)
pt3dadd(46.815, 213.538, -10.9, 0.724)
pt3dadd(46.864, 213.647, -10.9, 0.7)
pt3dadd(46.952, 213.728, -10.9, 0.674)
pt3dadd(47.04, 213.81, -10.9, 0.65)
pt3dadd(47.128, 213.892, -10.9, 0.624)
pt3dadd(47.216, 213.973, -10.9, 0.6)
pt3dadd(47.305, 214.051, -10.897, 0.572)
pt3dadd(47.404, 214.115, -10.875, 0.534)
pt3dadd(47.502, 214.177, -10.853, 0.496)
pt3dadd(47.601, 214.241, -10.831, 0.458)
pt3dadd(47.7, 214.304, -10.81, 0.418)
pt3dadd(47.794, 214.375, -10.8, 0.39)
pt3dadd(47.884, 214.454, -10.8, 0.37)
pt3dadd(47.975, 214.534, -10.8, 0.35)
pt3dadd(48.065, 214.613, -10.8, 0.33)
pt3dadd(48.156, 214.691, -10.8, 0.31)
pt3dadd(48.253, 214.759, -10.8, 0.304)
pt3dadd(48.358, 214.818, -10.8, 0.308)
pt3dadd(48.463, 214.877, -10.8, 0.314)
pt3dadd(48.567, 214.936, -10.8, 0.318)
pt3dadd(48.672, 214.996, -10.8, 0.322)
pt3dadd(48.767, 215.063, -10.8, 0.336)
pt3dadd(48.824, 215.17, -10.8, 0.382)
pt3dadd(48.882, 215.273, -10.8, 0.428)
pt3dadd(48.961, 215.363, -10.8, 0.452)
pt3dadd(49.04, 215.454, -10.8, 0.476)
pt3dadd(49.107, 215.551, -10.816, 0.464)
pt3dadd(49.174, 215.648, -10.834, 0.452)
pt3dadd(49.236, 215.7, -10.908, 0.424)
pt3dadd(49.299, 215.76, -10.972, 0.402)
pt3dadd(49.365, 215.855, -11, 0.402)
pt3dadd(49.441, 215.945, -11.014, 0.412)
pt3dadd(49.518, 216.036, -11.029, 0.424)
pt3dadd(49.594, 216.127, -11.044, 0.434)
pt3dadd(49.67, 216.218, -11.059, 0.446)
pt3dadd(49.743, 216.312, -11.073, 0.46)
pt3dadd(49.813, 216.407, -11.088, 0.476)
pt3dadd(49.883, 216.504, -11.103, 0.492)
pt3dadd(49.952, 216.599, -11.117, 0.51)
pt3dadd(50.022, 216.696, -11.132, 0.526)
pt3dadd(50.1, 216.774, -11.17, 0.556)
pt3dadd(50.18, 216.85, -11.21, 0.586)
pt3dadd(50.259, 216.926, -11.25, 0.616)
pt3dadd(50.338, 217.002, -11.291, 0.646)
pt3dadd(50.443, 217.046, -11.315, 0.672)
pt3dadd(50.556, 217.081, -11.334, 0.696)
pt3dadd(50.668, 217.116, -11.353, 0.72)
pt3dadd(50.78, 217.152, -11.372, 0.744)
pt3dadd(50.893, 217.187, -11.392, 0.768)
pt3dadd(50.991, 217.248, -11.4, 0.792)
pt3dadd(51.079, 217.33, -11.4, 0.818)
pt3dadd(51.167, 217.411, -11.4, 0.842)
pt3dadd(51.255, 217.493, -11.4, 0.868)
pt3dadd(51.343, 217.574, -11.4, 0.894)
pt3dadd(51.447, 217.628, -11.4, 0.916)
pt3dadd(51.562, 217.661, -11.4, 0.934)
pt3dadd(51.678, 217.694, -11.4, 0.954)
pt3dadd(51.729, 217.801, -11.4, 0.966)
pt3dadd(51.779, 217.909, -11.4, 0.976)
pt3dadd(51.791, 218.028, -11.4, 0.972)
pt3dadd(51.793, 218.148, -11.4, 0.962)
pt3dadd(51.797, 218.268, -11.4, 0.952)
pt3dadd(51.818, 218.386, -11.4, 0.932)
pt3dadd(51.839, 218.503, -11.4, 0.91)
pt3dadd(51.886, 218.612, -11.4, 0.894)
pt3dadd(51.946, 218.717, -11.4, 0.88)
pt3dadd(52.007, 218.82, -11.4, 0.866)
pt3dadd(52.071, 218.92, -11.4, 0.854)
pt3dadd(52.179, 218.972, -11.405, 0.854)
pt3dadd(52.286, 219.025, -11.41, 0.854)
pt3dadd(52.391, 219.067, -11.435, 0.854)
pt3dadd(52.464, 219.161, -11.45, 0.854)
pt3dadd(52.537, 219.254, -11.465, 0.854)
pt3dadd(52.61, 219.347, -11.479, 0.854)
pt3dadd(52.683, 219.44, -11.494, 0.854)
pt3dadd(52.738, 219.545, -11.5, 0.854)
pt3dadd(52.78, 219.659, -11.5, 0.854)
pt3dadd(52.822, 219.77, -11.5, 0.854)
pt3dadd(52.864, 219.883, -11.5, 0.854)
pt3dadd(52.906, 219.995, -11.5, 0.854)
pt3dadd(52.956, 220.104, -11.5, 0.854)
pt3dadd(53.017, 220.207, -11.5, 0.854)
pt3dadd(53.079, 220.31, -11.5, 0.854)
pt3dadd(53.14, 220.412, -11.5, 0.854)
pt3dadd(53.202, 220.516, -11.5, 0.854)
pt3dadd(53.247, 220.625, -11.507, 0.852)
pt3dadd(53.264, 220.741, -11.527, 0.848)
pt3dadd(53.281, 220.858, -11.547, 0.842)
pt3dadd(53.298, 220.974, -11.567, 0.838)
pt3dadd(53.315, 221.09, -11.587, 0.832)
pt3dadd(53.334, 221.206, -11.608, 0.826)
pt3dadd(53.359, 221.32, -11.631, 0.814)
pt3dadd(53.383, 221.434, -11.654, 0.804)
pt3dadd(53.408, 221.548, -11.677, 0.794)
pt3dadd(53.432, 221.663, -11.7, 0.784)
pt3dadd(53.454, 221.778, -11.721, 0.782)
pt3dadd(53.473, 221.893, -11.738, 0.786)
pt3dadd(53.493, 222.01, -11.756, 0.792)
pt3dadd(53.513, 222.127, -11.774, 0.796)
pt3dadd(53.532, 222.244, -11.791, 0.802)
pt3dadd(53.562, 222.359, -11.8, 0.81)
pt3dadd(53.6, 222.472, -11.8, 0.826)
pt3dadd(53.639, 222.586, -11.8, 0.84)
pt3dadd(53.678, 222.7, -11.8, 0.854)
pt3dadd(53.717, 222.812, -11.8, 0.868)
pt3dadd(53.752, 222.926, -11.805, 0.882)
pt3dadd(53.776, 223.042, -11.825, 0.892)
pt3dadd(53.8, 223.156, -11.846, 0.902)
pt3dadd(53.824, 223.271, -11.866, 0.912)
pt3dadd(53.847, 223.387, -11.887, 0.922)
pt3dadd(53.867, 223.502, -11.893, 0.928)
pt3dadd(53.878, 223.619, -11.874, 0.922)
pt3dadd(53.889, 223.736, -11.855, 0.918)
pt3dadd(53.899, 223.854, -11.836, 0.912)
pt3dadd(53.91, 223.972, -11.816, 0.908)
pt3dadd(53.926, 224.088, -11.8, 0.9)
pt3dadd(53.968, 224.201, -11.8, 0.878)
pt3dadd(54.01, 224.312, -11.8, 0.856)
pt3dadd(54.039, 224.429, -11.8, 0.834)
pt3dadd(54.066, 224.546, -11.8, 0.812)
pt3dadd(54.142, 224.618, -11.8, 0.804)
pt3dadd(54.255, 224.657, -11.8, 0.804)
pt3dadd(54.367, 224.699, -11.8, 0.804)
pt3dadd(54.446, 224.789, -11.8, 0.816)
pt3dadd(54.524, 224.879, -11.8, 0.828)
pt3dadd(54.63, 224.936, -11.8, 0.874)
pt3dadd(54.728, 225.002, -11.8, 0.908)
pt3dadd(54.814, 225.086, -11.8, 0.918)
pt3dadd(54.899, 225.169, -11.8, 0.928)
pt3dadd(54.985, 225.254, -11.8, 0.938)
pt3dadd(55.07, 225.338, -11.8, 0.948)
pt3dadd(55.134, 225.436, -11.8, 0.956)
pt3dadd(55.167, 225.551, -11.8, 0.96)
pt3dadd(55.2, 225.667, -11.8, 0.966)
pt3dadd(55.233, 225.781, -11.8, 0.97)
pt3dadd(55.265, 225.898, -11.8, 0.974)
pt3dadd(55.298, 226.013, -11.8, 0.98)
pt3dadd(55.348, 226.122, -11.8, 0.99)
pt3dadd(55.397, 226.232, -11.8, 1.002)
pt3dadd(55.418, 226.349, -11.8, 1.012)
pt3dadd(55.431, 226.469, -11.8, 1.022)
pt3dadd(55.475, 226.566, -11.8, 1.03)
pt3dadd(55.583, 226.618, -11.8, 1.03)
pt3dadd(55.692, 226.667, -11.8, 1.03)
pt3dadd(55.778, 226.751, -11.8, 0.996)
pt3dadd(55.863, 226.836, -11.8, 0.96)
pt3dadd(55.968, 226.883, -11.819, 0.91)
pt3dadd(56.071, 226.938, -11.839, 0.872)
pt3dadd(56.161, 227.015, -11.854, 0.856)
pt3dadd(56.252, 227.09, -11.868, 0.84)
pt3dadd(56.343, 227.167, -11.882, 0.824)
pt3dadd(56.434, 227.244, -11.897, 0.808)
pt3dadd(56.526, 227.32, -11.9, 0.804)
pt3dadd(56.619, 227.395, -11.9, 0.804)
pt3dadd(56.712, 227.472, -11.9, 0.804)
pt3dadd(56.805, 227.548, -11.9, 0.804)
pt3dadd(56.898, 227.624, -11.9, 0.804)
pt3dadd(56.97, 227.717, -11.9, 0.8)
pt3dadd(57.035, 227.82, -11.9, 0.794)
pt3dadd(57.099, 227.921, -11.9, 0.79)
pt3dadd(57.164, 228.022, -11.9, 0.784)
pt3dadd(57.229, 228.122, -11.9, 0.78)
pt3dadd(57.303, 228.214, -11.917, 0.778)
pt3dadd(57.38, 228.301, -11.94, 0.778)
}
}
proc shape3d_150() {
dend_5[19] { pt3dadd(57.456, 228.39, -11.963, 0.778)
pt3dadd(57.533, 228.478, -11.986, 0.778)
pt3dadd(57.612, 228.565, -12, 0.776)
pt3dadd(57.695, 228.652, -12, 0.772)
pt3dadd(57.778, 228.738, -12, 0.766)
pt3dadd(57.86, 228.826, -12, 0.762)
pt3dadd(57.943, 228.913, -12, 0.756)
pt3dadd(58.027, 228.998, -12, 0.75)
pt3dadd(58.112, 229.082, -12, 0.746)
pt3dadd(58.198, 229.168, -12, 0.742)
pt3dadd(58.283, 229.252, -12, 0.736)
pt3dadd(58.369, 229.336, -12, 0.73)
pt3dadd(58.445, 229.428, -12, 0.728)
pt3dadd(58.509, 229.529, -12, 0.728)
pt3dadd(58.574, 229.63, -12, 0.728)
pt3dadd(58.639, 229.73, -12, 0.728)
pt3dadd(58.704, 229.831, -12, 0.728)
pt3dadd(58.756, 229.938, -12, 0.73)
pt3dadd(58.795, 230.052, -12, 0.736)
pt3dadd(58.834, 230.166, -12, 0.74)
pt3dadd(58.873, 230.279, -12, 0.744)
pt3dadd(58.912, 230.393, -12, 0.75)
pt3dadd(58.955, 230.504, -12, 0.758)
pt3dadd(59.017, 230.608, -12, 0.778)
pt3dadd(59.078, 230.711, -12, 0.798)
pt3dadd(59.14, 230.814, -12, 0.818)
pt3dadd(59.201, 230.916, -12, 0.838)
pt3dadd(59.258, 231.022, -12, 0.856)
pt3dadd(59.294, 231.136, -12, 0.866)
pt3dadd(59.329, 231.251, -12, 0.874)
pt3dadd(59.365, 231.366, -12, 0.884)
pt3dadd(59.401, 231.479, -12, 0.894)
pt3dadd(59.437, 231.594, -12, 0.902)
pt3dadd(59.472, 231.709, -12, 0.9)
pt3dadd(59.508, 231.823, -12, 0.896)
pt3dadd(59.544, 231.938, -12, 0.89)
pt3dadd(59.58, 232.052, -12, 0.886)
pt3dadd(59.616, 232.166, -12, 0.88)
pt3dadd(59.678, 232.265, -12, 0.868)
pt3dadd(59.764, 232.349, -12, 0.848)
pt3dadd(59.849, 232.434, -12, 0.828)
pt3dadd(59.935, 232.518, -12, 0.808)
pt3dadd(60.02, 232.602, -12, 0.788)
pt3dadd(60.102, 232.69, -12, 0.772)
pt3dadd(60.182, 232.778, -12, 0.762)
pt3dadd(60.262, 232.868, -12, 0.752)
pt3dadd(60.342, 232.958, -12, 0.742)
pt3dadd(60.422, 233.047, -12, 0.732)
pt3dadd(60.475, 233.153, -12, 0.728)
pt3dadd(60.511, 233.267, -12, 0.728)
pt3dadd(60.547, 233.382, -12, 0.728)
pt3dadd(60.582, 233.495, -12, 0.728)
pt3dadd(60.618, 233.61, -12, 0.728)
pt3dadd(60.664, 233.72, -12, 0.732)
pt3dadd(60.736, 233.815, -12, 0.744)
pt3dadd(60.808, 233.912, -12, 0.754)
pt3dadd(60.88, 234.008, -12, 0.754)
pt3dadd(60.95, 234.104, -12, 0.754)
pt3dadd(60.952, 234.224, -12, 0.762)
pt3dadd(60.954, 234.344, -12, 0.772)
pt3dadd(60.953, 234.464, -12, 0.782)
pt3dadd(60.945, 234.584, -12, 0.79)
pt3dadd(60.937, 234.704, -12, 0.798)
pt3dadd(60.956, 234.818, -12, 0.804)
pt3dadd(61.007, 234.926, -12, 0.804)
pt3dadd(61.058, 235.036, -12, 0.804)
pt3dadd(61.11, 235.144, -12, 0.804)
pt3dadd(61.189, 235.232, -12, 0.794)
pt3dadd(61.274, 235.316, -12, 0.782)
pt3dadd(61.37, 235.388, -12, 0.778)
pt3dadd(61.425, 235.494, -12, 0.784)
pt3dadd(61.477, 235.602, -12, 0.788)
pt3dadd(61.529, 235.71, -12, 0.794)
pt3dadd(61.581, 235.818, -12, 0.798)
pt3dadd(61.633, 235.926, -12, 0.802)
pt3dadd(61.695, 236.029, -12, 0.804)
pt3dadd(61.76, 236.13, -12, 0.804)
pt3dadd(61.825, 236.231, -12, 0.804)
pt3dadd(61.89, 236.332, -12, 0.804)
pt3dadd(61.954, 236.432, -12, 0.804)
pt3dadd(62.032, 236.525, -12, 0.794)
pt3dadd(62.112, 236.614, -12, 0.784)
pt3dadd(62.192, 236.702, -12, 0.774)
pt3dadd(62.272, 236.792, -12, 0.764)
pt3dadd(62.352, 236.881, -12, 0.754)
pt3dadd(62.403, 236.989, -12, 0.744)
pt3dadd(62.452, 237.1, -12, 0.734)
pt3dadd(62.5, 237.209, -12, 0.724)
pt3dadd(62.549, 237.319, -12, 0.716)
pt3dadd(62.597, 237.43, -12, 0.706)
pt3dadd(62.662, 237.528, -11.988, 0.69)
pt3dadd(62.732, 237.624, -11.974, 0.674)
pt3dadd(62.802, 237.72, -11.959, 0.656)
pt3dadd(62.872, 237.816, -11.944, 0.64)
pt3dadd(62.941, 237.905, -11.919, 0.624)
pt3dadd(63.01, 237.974, -11.861, 0.604)
pt3dadd(63.079, 238.045, -11.804, 0.586)
pt3dadd(63.148, 238.115, -11.746, 0.568)
pt3dadd(63.219, 238.189, -11.697, 0.548)
pt3dadd(63.298, 238.277, -11.68, 0.522)
pt3dadd(63.378, 238.363, -11.664, 0.498)
pt3dadd(63.458, 238.452, -11.648, 0.474)
pt3dadd(63.534, 238.541, -11.636, 0.452)
pt3dadd(63.589, 238.644, -11.66, 0.444)
pt3dadd(63.643, 238.747, -11.684, 0.436)
pt3dadd(63.697, 238.85, -11.707, 0.428)
pt3dadd(63.783, 238.932, -11.709, 0.426)
pt3dadd(63.875, 239.009, -11.707, 0.426)
pt3dadd(63.967, 239.087, -11.705, 0.426)
pt3dadd(64.059, 239.164, -11.703, 0.426)
pt3dadd(64.15, 239.24, -11.7, 0.426)
pt3dadd(64.237, 239.305, -11.739, 0.438)
pt3dadd(64.323, 239.37, -11.785, 0.45)
pt3dadd(64.41, 239.434, -11.83, 0.462)
pt3dadd(64.496, 239.497, -11.875, 0.474)
pt3dadd(64.571, 239.56, -11.932, 0.506)
pt3dadd(64.641, 239.62, -11.996, 0.55)
pt3dadd(64.741, 239.646, -12.045, 0.598)
pt3dadd(64.843, 239.67, -12.094, 0.648)
pt3dadd(64.94, 239.736, -12.1, 0.684)
pt3dadd(65.037, 239.806, -12.1, 0.718)
pt3dadd(65.13, 239.882, -12.1, 0.736)
pt3dadd(65.221, 239.959, -12.1, 0.748)
pt3dadd(65.298, 240.05, -12.1, 0.754)
pt3dadd(65.365, 240.148, -12.1, 0.754)
pt3dadd(65.465, 240.215, -12.1, 0.758)
pt3dadd(65.564, 240.282, -12.1, 0.764)
pt3dadd(65.663, 240.35, -12.1, 0.768)
pt3dadd(65.763, 240.418, -12.1, 0.774)
pt3dadd(65.862, 240.485, -12.1, 0.778)
pt3dadd(65.969, 240.539, -12.1, 0.782)
pt3dadd(66.076, 240.592, -12.1, 0.788)
pt3dadd(66.184, 240.646, -12.1, 0.792)
pt3dadd(66.292, 240.698, -12.1, 0.796)
pt3dadd(66.399, 240.751, -12.1, 0.802)
pt3dadd(66.511, 240.794, -12.1, 0.814)
pt3dadd(66.626, 240.827, -12.1, 0.832)
pt3dadd(66.742, 240.86, -12.1, 0.852)
pt3dadd(66.83, 240.94, -12.1, 0.864)
pt3dadd(66.915, 241.024, -12.1, 0.876)
pt3dadd(67.018, 241.084, -12.1, 0.878)
pt3dadd(67.127, 241.133, -12.1, 0.878)
pt3dadd(67.201, 241.208, -12.087, 0.868)
pt3dadd(67.223, 241.32, -12.053, 0.844)
pt3dadd(67.258, 241.426, -12.022, 0.796)
pt3dadd(67.314, 241.526, -11.993, 0.716)
pt3dadd(67.382, 241.609, -11.948, 0.644)
pt3dadd(67.451, 241.684, -11.896, 0.572)
pt3dadd(67.521, 241.744, -11.832, 0.502)
pt3dadd(67.607, 241.813, -11.808, 0.454)
pt3dadd(67.701, 241.888, -11.802, 0.418)
pt3dadd(67.802, 241.952, -11.8, 0.402)
pt3dadd(67.907, 242.01, -11.8, 0.402)
pt3dadd(68.012, 242.069, -11.802, 0.412)
pt3dadd(68.117, 242.125, -11.81, 0.446)
pt3dadd(68.219, 242.185, -11.825, 0.456)
pt3dadd(68.321, 242.245, -11.842, 0.462)
pt3dadd(68.422, 242.306, -11.859, 0.468)
pt3dadd(68.524, 242.366, -11.876, 0.472)
pt3dadd(68.627, 242.425, -11.89, 0.476)
pt3dadd(68.735, 242.478, -11.896, 0.47)
pt3dadd(68.843, 242.53, -11.902, 0.462)
pt3dadd(68.95, 242.582, -11.907, 0.456)
pt3dadd(69.056, 242.629, -11.926, 0.44)
pt3dadd(69.155, 242.668, -11.972, 0.4)
pt3dadd(69.243, 242.72, -12.02, 0.366)
pt3dadd(69.312, 242.797, -12.071, 0.336)
pt3dadd(69.401, 242.867, -12.092, 0.318)
pt3dadd(69.5, 242.934, -12.097, 0.308)
pt3dadd(69.605, 242.992, -12.098, 0.306)
pt3dadd(69.716, 243.037, -12.093, 0.318)
pt3dadd(69.826, 243.078, -12.082, 0.336)
pt3dadd(69.935, 243.1, -12.043, 0.388)
pt3dadd(70.038, 243.148, -12.017, 0.448)
pt3dadd(70.14, 243.205, -11.995, 0.51)
pt3dadd(70.217, 243.246, -11.932, 0.586)
pt3dadd(70.284, 243.282, -11.855, 0.668)
pt3dadd(70.382, 243.337, -11.825, 0.744)
pt3dadd(70.483, 243.395, -11.803, 0.82)
pt3dadd(70.588, 243.452, -11.8, 0.876)
pt3dadd(70.693, 243.511, -11.8, 0.932)
pt3dadd(70.796, 243.572, -11.8, 0.964)
pt3dadd(70.895, 243.64, -11.8, 0.978)
pt3dadd(70.977, 243.727, -11.8, 0.962)
pt3dadd(71.06, 243.814, -11.8, 0.948)
pt3dadd(71.143, 243.901, -11.8, 0.932)
pt3dadd(71.226, 243.988, -11.8, 0.918)
pt3dadd(71.312, 244.068, -11.8, 0.902)
pt3dadd(71.427, 244.105, -11.8, 0.884)
pt3dadd(71.541, 244.142, -11.8, 0.868)
pt3dadd(71.655, 244.18, -11.8, 0.85)
pt3dadd(71.769, 244.216, -11.8, 0.834)
pt3dadd(71.883, 244.253, -11.8, 0.816)
pt3dadd(71.991, 244.301, -11.8, 0.802)
pt3dadd(72.073, 244.387, -11.8, 0.798)
pt3dadd(72.156, 244.475, -11.8, 0.792)
pt3dadd(72.239, 244.561, -11.8, 0.788)
pt3dadd(72.321, 244.649, -11.8, 0.782)
pt3dadd(72.395, 244.741, -11.8, 0.78)
pt3dadd(72.444, 244.852, -11.8, 0.784)
}
}
proc shape3d_151() {
dend_5[19] { pt3dadd(72.492, 244.961, -11.8, 0.79)
pt3dadd(72.541, 245.071, -11.8, 0.794)
pt3dadd(72.589, 245.18, -11.8, 0.8)
pt3dadd(72.639, 245.29, -11.798, 0.804)
pt3dadd(72.702, 245.39, -11.783, 0.804)
pt3dadd(72.765, 245.49, -11.769, 0.804)
pt3dadd(72.828, 245.591, -11.754, 0.804)
pt3dadd(72.891, 245.69, -11.74, 0.804)
pt3dadd(72.95, 245.795, -11.729, 0.798)
pt3dadd(73.006, 245.9, -11.722, 0.788)
pt3dadd(73.062, 246.007, -11.716, 0.776)
pt3dadd(73.117, 246.113, -11.709, 0.766)
pt3dadd(73.173, 246.218, -11.702, 0.756)
pt3dadd(73.238, 246.319, -11.7, 0.746)
pt3dadd(73.306, 246.419, -11.7, 0.736)
pt3dadd(73.374, 246.517, -11.7, 0.726)
pt3dadd(73.441, 246.617, -11.7, 0.716)
pt3dadd(73.509, 246.715, -11.7, 0.706)
pt3dadd(73.567, 246.82, -11.7, 0.7)
pt3dadd(73.622, 246.928, -11.7, 0.694)
pt3dadd(73.678, 247.033, -11.7, 0.69)
pt3dadd(73.733, 247.14, -11.7, 0.684)
pt3dadd(73.788, 247.247, -11.7, 0.68)
pt3dadd(73.805, 247.362, -11.7, 0.672)
pt3dadd(73.807, 247.483, -11.7, 0.662)
pt3dadd(73.808, 247.603, -11.7, 0.652)
pt3dadd(73.796, 247.722, -11.7, 0.644)
pt3dadd(73.783, 247.842, -11.7, 0.636)
pt3dadd(73.772, 247.961, -11.7, 0.628)
pt3dadd(73.8, 248.077, -11.7, 0.628)
pt3dadd(73.828, 248.194, -11.7, 0.628)
pt3dadd(73.899, 248.285, -11.7, 0.652)
pt3dadd(73.99, 248.362, -11.7, 0.686)
pt3dadd(74.05, 248.46, -11.7, 0.728)
pt3dadd(74.08, 248.576, -11.7, 0.778)
pt3dadd(74.153, 248.668, -11.678, 0.784)
pt3dadd(74.226, 248.759, -11.655, 0.79)
pt3dadd(74.3, 248.849, -11.632, 0.796)
pt3dadd(74.373, 248.94, -11.609, 0.802)
pt3dadd(74.447, 249.031, -11.586, 0.796)
pt3dadd(74.52, 249.121, -11.563, 0.784)
pt3dadd(74.594, 249.212, -11.54, 0.774)
pt3dadd(74.667, 249.304, -11.517, 0.762)
pt3dadd(74.74, 249.388, -11.485, 0.746)
pt3dadd(74.81, 249.457, -11.428, 0.716)
pt3dadd(74.865, 249.548, -11.391, 0.69)
pt3dadd(74.906, 249.659, -11.375, 0.666)
pt3dadd(74.981, 249.733, -11.35, 0.646)
pt3dadd(75.088, 249.769, -11.318, 0.634)
pt3dadd(75.197, 249.81, -11.3, 0.624)
pt3dadd(75.308, 249.856, -11.3, 0.612)
pt3dadd(75.42, 249.901, -11.3, 0.604)
pt3dadd(75.531, 249.946, -11.3, 0.618)
pt3dadd(75.641, 249.992, -11.3, 0.64)
pt3dadd(75.75, 250.044, -11.3, 0.672)
pt3dadd(75.858, 250.096, -11.3, 0.706)
pt3dadd(75.966, 250.147, -11.3, 0.77)
pt3dadd(76.075, 250.198, -11.3, 0.834)
pt3dadd(76.163, 250.276, -11.3, 0.896)
pt3dadd(76.242, 250.367, -11.3, 0.954)
pt3dadd(76.293, 250.471, -11.297, 0.986)
pt3dadd(76.322, 250.589, -11.292, 0.996)
pt3dadd(76.371, 250.691, -11.28, 0.994)
pt3dadd(76.458, 250.765, -11.251, 0.962)
pt3dadd(76.546, 250.84, -11.222, 0.928)
pt3dadd(76.637, 250.909, -11.2, 0.892)
pt3dadd(76.743, 250.968, -11.2, 0.836)
pt3dadd(76.848, 251.026, -11.2, 0.782)
pt3dadd(76.934, 251.104, -11.182, 0.7)
pt3dadd(77.038, 251.158, -11.161, 0.69)
pt3dadd(77.142, 251.21, -11.14, 0.678)
pt3dadd(77.247, 251.263, -11.119, 0.668)
pt3dadd(77.351, 251.317, -11.098, 0.658)
pt3dadd(77.452, 251.378, -11.078, 0.65)
pt3dadd(77.55, 251.442, -11.059, 0.644)
pt3dadd(77.648, 251.508, -11.039, 0.638)
pt3dadd(77.745, 251.574, -11.02, 0.634)
pt3dadd(77.843, 251.64, -11.001, 0.628)
pt3dadd(77.93, 251.722, -10.992, 0.616)
pt3dadd(78.016, 251.804, -10.983, 0.602)
pt3dadd(78.103, 251.887, -10.974, 0.588)
pt3dadd(78.188, 251.97, -10.966, 0.576)
pt3dadd(78.27, 252.058, -10.958, 0.57)
pt3dadd(78.352, 252.144, -10.95, 0.564)
pt3dadd(78.434, 252.232, -10.942, 0.56)
pt3dadd(78.516, 252.32, -10.934, 0.554)
pt3dadd(78.584, 252.416, -10.918, 0.552)
pt3dadd(78.65, 252.514, -10.901, 0.552)
pt3dadd(78.745, 252.587, -10.9, 0.596)
pt3dadd(78.842, 252.658, -10.9, 0.642)
pt3dadd(78.953, 252.696, -10.897, 0.682)
pt3dadd(79.07, 252.724, -10.892, 0.722)
pt3dadd(79.179, 252.755, -10.877, 0.76)
pt3dadd(79.248, 252.809, -10.809, 0.802)
pt3dadd(79.325, 252.859, -10.745, 0.822)
pt3dadd(79.412, 252.908, -10.69, 0.806)
pt3dadd(79.5, 252.958, -10.635, 0.788)
pt3dadd(79.598, 252.998, -10.6, 0.772)
pt3dadd(79.715, 253.026, -10.6, 0.754)
pt3dadd(79.832, 253.052, -10.6, 0.734)
pt3dadd(79.949, 253.08, -10.6, 0.71)
pt3dadd(80.052, 253.134, -10.585, 0.712)
pt3dadd(80.152, 253.196, -10.566, 0.722)
pt3dadd(80.252, 253.259, -10.547, 0.732)
pt3dadd(80.352, 253.321, -10.528, 0.744)
pt3dadd(80.451, 253.384, -10.506, 0.754)
pt3dadd(80.542, 253.442, -10.465, 0.766)
pt3dadd(80.634, 253.502, -10.423, 0.778)
pt3dadd(80.725, 253.564, -10.381, 0.79)
pt3dadd(80.816, 253.624, -10.339, 0.802)
pt3dadd(80.924, 253.646, -10.304, 0.794)
pt3dadd(81.035, 253.664, -10.27, 0.782)
pt3dadd(81.118, 253.679, -10.206, 0.75)
pt3dadd(81.18, 253.692, -10.121, 0.702)
pt3dadd(81.256, 253.729, -10.057, 0.65)
pt3dadd(81.345, 253.79, -10.014, 0.596)
pt3dadd(81.445, 253.849, -10, 0.57)
pt3dadd(81.55, 253.907, -10, 0.56)
pt3dadd(81.648, 253.975, -10, 0.566)
pt3dadd(81.733, 254.06, -10, 0.602)
pt3dadd(81.795, 254.162, -10, 0.608)
pt3dadd(81.857, 254.264, -10, 0.612)
pt3dadd(81.919, 254.368, -10, 0.618)
pt3dadd(81.98, 254.471, -10, 0.622)
pt3dadd(82.042, 254.574, -10, 0.628)
pt3dadd(82.079, 254.683, -9.971, 0.622)
pt3dadd(82.116, 254.791, -9.941, 0.616)
pt3dadd(82.152, 254.899, -9.912, 0.612)
pt3dadd(82.189, 255.008, -9.882, 0.606)
pt3dadd(82.227, 255.115, -9.849, 0.59)
pt3dadd(82.266, 255.22, -9.813, 0.562)
pt3dadd(82.295, 255.328, -9.779, 0.544)
pt3dadd(82.317, 255.439, -9.745, 0.532)
pt3dadd(82.392, 255.515, -9.723, 0.528)
pt3dadd(82.496, 255.571, -9.707, 0.528)
pt3dadd(82.596, 255.636, -9.7, 0.52)
pt3dadd(82.692, 255.708, -9.7, 0.51)
pt3dadd(82.777, 255.788, -9.69, 0.494)
pt3dadd(82.851, 255.871, -9.662, 0.478)
pt3dadd(82.961, 255.902, -9.631, 0.478)
pt3dadd(83.07, 255.934, -9.6, 0.478)
pt3dadd(83.179, 255.984, -9.6, 0.498)
pt3dadd(83.287, 256.036, -9.6, 0.52)
pt3dadd(83.388, 256.1, -9.6, 0.542)
pt3dadd(83.484, 256.171, -9.6, 0.566)
pt3dadd(83.579, 256.246, -9.6, 0.588)
pt3dadd(83.67, 256.324, -9.6, 0.612)
pt3dadd(83.73, 256.415, -9.6, 0.632)
pt3dadd(83.725, 256.535, -9.6, 0.646)
pt3dadd(83.74, 256.65, -9.608, 0.656)
pt3dadd(83.784, 256.76, -9.628, 0.66)
pt3dadd(83.828, 256.868, -9.647, 0.666)
pt3dadd(83.871, 256.978, -9.666, 0.672)
pt3dadd(83.915, 257.088, -9.685, 0.678)
pt3dadd(83.972, 257.192, -9.691, 0.666)
pt3dadd(84.032, 257.297, -9.693, 0.65)
pt3dadd(84.091, 257.4, -9.695, 0.636)
pt3dadd(84.151, 257.504, -9.698, 0.62)
pt3dadd(84.211, 257.609, -9.7, 0.604)
pt3dadd(84.255, 257.72, -9.7, 0.564)
pt3dadd(84.297, 257.832, -9.7, 0.518)
pt3dadd(84.339, 257.944, -9.689, 0.462)
pt3dadd(84.381, 258.055, -9.673, 0.4)
pt3dadd(84.35, 258.146, -9.642, 0.358)
pt3dadd(84.277, 258.228, -9.601, 0.328)
pt3dadd(84.204, 258.319, -9.577, 0.314)
pt3dadd(84.133, 258.412, -9.552, 0.302)
pt3dadd(84.097, 258.511, -9.506, 0.31)
pt3dadd(84.06, 258.61, -9.459, 0.318)
pt3dadd(84.024, 258.709, -9.413, 0.326)
pt3dadd(83.993, 258.816, -9.448, 0.35)
pt3dadd(83.962, 258.924, -9.485, 0.374)
pt3dadd(83.948, 259.04, -9.5, 0.43)
pt3dadd(83.936, 259.16, -9.5, 0.452)
}
dend_5[20] {pt3dclear()
pt3dadd(40.009, 190.459, -14.3, 2.686)
pt3dadd(39.941, 190.486, -14.366, 2.63)
pt3dadd(39.865, 190.516, -14.44, 2.568)
pt3dadd(39.789, 190.544, -14.513, 2.504)
pt3dadd(39.713, 190.574, -14.587, 2.442)
pt3dadd(39.637, 190.603, -14.66, 2.38)
pt3dadd(39.561, 190.633, -14.733, 2.316)
pt3dadd(39.491, 190.67, -14.8, 2.268)
pt3dadd(39.479, 190.789, -14.8, 2.342)
pt3dadd(39.466, 190.909, -14.8, 2.418)
pt3dadd(39.454, 191.028, -14.8, 2.494)
pt3dadd(39.441, 191.148, -14.8, 2.568)
pt3dadd(39.429, 191.267, -14.8, 2.644)
pt3dadd(39.416, 191.386, -14.8, 2.72)
pt3dadd(39.404, 191.506, -14.8, 2.792)
pt3dadd(39.391, 191.624, -14.8, 2.842)
pt3dadd(39.378, 191.744, -14.8, 2.892)
pt3dadd(39.366, 191.863, -14.8, 2.936)
pt3dadd(39.353, 191.983, -14.8, 2.92)
pt3dadd(39.341, 192.102, -14.8, 2.902)
pt3dadd(39.327, 192.222, -14.8, 2.88)
pt3dadd(39.3, 192.338, -14.8, 2.786)
pt3dadd(39.273, 192.456, -14.8, 2.692)
pt3dadd(39.228, 192.564, -14.8, 2.59)
pt3dadd(39.157, 192.661, -14.8, 2.476)
pt3dadd(39.075, 192.742, -14.8, 2.376)
}
}
proc shape3d_152() {
dend_5[20] { pt3dadd(38.957, 192.762, -14.8, 2.332)
pt3dadd(38.839, 192.784, -14.8, 2.29)
pt3dadd(38.721, 192.803, -14.8, 2.246)
pt3dadd(38.602, 192.821, -14.8, 2.2)
pt3dadd(38.482, 192.823, -14.8, 2.144)
pt3dadd(38.362, 192.826, -14.8, 2.088)
pt3dadd(38.246, 192.846, -14.8, 2.032)
pt3dadd(38.134, 192.889, -14.8, 1.972)
pt3dadd(38.021, 192.93, -14.8, 1.914)
pt3dadd(37.942, 193.007, -14.8, 1.832)
pt3dadd(37.898, 193.118, -14.8, 1.73)
pt3dadd(37.852, 193.229, -14.8, 1.61)
pt3dadd(37.792, 193.332, -14.8, 1.342)
pt3dadd(37.745, 193.442, -14.8, 1.296)
pt3dadd(37.697, 193.553, -14.8, 1.252)
pt3dadd(37.65, 193.663, -14.8, 1.208)
pt3dadd(37.602, 193.772, -14.8, 1.162)
pt3dadd(37.555, 193.884, -14.8, 1.118)
pt3dadd(37.497, 193.986, -14.814, 1.078)
pt3dadd(37.434, 194.086, -14.833, 1.04)
pt3dadd(37.372, 194.186, -14.852, 1.002)
pt3dadd(37.31, 194.286, -14.871, 0.964)
pt3dadd(37.245, 194.384, -14.89, 0.928)
pt3dadd(37.15, 194.455, -14.902, 0.918)
pt3dadd(37.055, 194.527, -14.914, 0.906)
pt3dadd(36.96, 194.599, -14.926, 0.896)
pt3dadd(36.864, 194.67, -14.938, 0.884)
pt3dadd(36.778, 194.74, -14.97, 0.882)
pt3dadd(36.702, 194.804, -15.025, 0.888)
pt3dadd(36.625, 194.868, -15.08, 0.894)
pt3dadd(36.549, 194.934, -15.135, 0.9)
pt3dadd(36.478, 195.013, -15.174, 0.92)
pt3dadd(36.414, 195.113, -15.19, 0.958)
pt3dadd(36.367, 195.214, -15.22, 0.99)
pt3dadd(36.343, 195.317, -15.269, 1.014)
pt3dadd(36.293, 195.391, -15.32, 1.03)
pt3dadd(36.196, 195.416, -15.374, 1.03)
pt3dadd(36.108, 195.476, -15.4, 1.036)
pt3dadd(36.03, 195.568, -15.4, 1.048)
pt3dadd(35.947, 195.653, -15.4, 1.062)
pt3dadd(35.854, 195.728, -15.4, 1.078)
pt3dadd(35.753, 195.794, -15.4, 1.084)
pt3dadd(35.652, 195.858, -15.4, 1.09)
pt3dadd(35.551, 195.924, -15.4, 1.094)
pt3dadd(35.45, 195.988, -15.4, 1.1)
pt3dadd(35.349, 196.054, -15.4, 1.104)
pt3dadd(35.234, 196.087, -15.4, 1.082)
pt3dadd(35.119, 196.12, -15.4, 1.06)
pt3dadd(35.003, 196.152, -15.4, 1.036)
pt3dadd(34.888, 196.184, -15.4, 1.012)
pt3dadd(34.772, 196.217, -15.4, 0.99)
pt3dadd(34.67, 196.276, -15.4, 0.962)
pt3dadd(34.579, 196.352, -15.4, 0.932)
pt3dadd(34.487, 196.429, -15.4, 0.9)
pt3dadd(34.395, 196.506, -15.4, 0.87)
pt3dadd(34.303, 196.584, -15.4, 0.84)
pt3dadd(34.202, 196.648, -15.4, 0.792)
pt3dadd(34.097, 196.705, -15.4, 0.734)
pt3dadd(34.014, 196.786, -15.4, 0.688)
pt3dadd(33.956, 196.89, -15.4, 0.654)
pt3dadd(33.887, 196.982, -15.4, 0.622)
pt3dadd(33.772, 197.018, -15.4, 0.588)
pt3dadd(33.658, 197.053, -15.4, 0.556)
pt3dadd(33.541, 197.081, -15.4, 0.534)
pt3dadd(33.424, 197.11, -15.4, 0.512)
pt3dadd(33.306, 197.118, -15.403, 0.532)
pt3dadd(33.186, 197.113, -15.41, 0.588)
pt3dadd(33.068, 197.12, -15.424, 0.624)
pt3dadd(32.95, 197.131, -15.441, 0.652)
pt3dadd(32.832, 197.141, -15.457, 0.682)
pt3dadd(32.715, 197.152, -15.474, 0.71)
pt3dadd(32.597, 197.162, -15.491, 0.738)
pt3dadd(32.48, 197.183, -15.5, 0.766)
pt3dadd(32.365, 197.215, -15.5, 0.794)
pt3dadd(32.249, 197.249, -15.5, 0.822)
pt3dadd(32.134, 197.281, -15.5, 0.85)
pt3dadd(32.018, 197.314, -15.5, 0.878)
pt3dadd(31.902, 197.345, -15.5, 0.906)
pt3dadd(31.783, 197.354, -15.5, 0.918)
pt3dadd(31.663, 197.364, -15.5, 0.93)
pt3dadd(31.544, 197.374, -15.5, 0.942)
pt3dadd(31.424, 197.384, -15.5, 0.956)
pt3dadd(31.305, 197.393, -15.5, 0.968)
pt3dadd(31.186, 197.406, -15.503, 0.982)
pt3dadd(31.085, 197.448, -15.543, 1.012)
pt3dadd(30.983, 197.492, -15.582, 1.04)
pt3dadd(30.881, 197.534, -15.621, 1.07)
pt3dadd(30.779, 197.576, -15.66, 1.1)
pt3dadd(30.697, 197.658, -15.681, 1.148)
pt3dadd(30.618, 197.746, -15.698, 1.2)
pt3dadd(30.52, 197.8, -15.732, 1.242)
pt3dadd(30.42, 197.848, -15.768, 1.28)
pt3dadd(30.335, 197.93, -15.785, 1.266)
pt3dadd(30.245, 198.001, -15.8, 1.256)
pt3dadd(30.126, 197.992, -15.8, 1.266)
pt3dadd(30.006, 197.984, -15.8, 1.274)
pt3dadd(29.888, 197.976, -15.807, 1.282)
pt3dadd(29.774, 197.964, -15.838, 1.288)
pt3dadd(29.66, 197.952, -15.869, 1.294)
pt3dadd(29.547, 197.94, -15.9, 1.302)
pt3dadd(29.44, 197.928, -15.941, 1.318)
pt3dadd(29.353, 197.92, -16.009, 1.366)
pt3dadd(29.261, 197.911, -16.068, 1.41)
pt3dadd(29.142, 197.91, -16.078, 1.432)
pt3dadd(29.022, 197.91, -16.088, 1.454)
pt3dadd(28.903, 197.909, -16.098, 1.476)
pt3dadd(28.785, 197.93, -16.1, 1.514)
pt3dadd(28.669, 197.958, -16.1, 1.558)
pt3dadd(28.551, 197.983, -16.101, 1.586)
pt3dadd(28.434, 198.005, -16.105, 1.594)
pt3dadd(28.316, 198.028, -16.109, 1.602)
pt3dadd(28.213, 198.043, -16.136, 1.6)
pt3dadd(28.15, 198.042, -16.221, 1.576)
pt3dadd(28.086, 198.059, -16.298, 1.548)
pt3dadd(28.02, 198.143, -16.345, 1.506)
pt3dadd(27.955, 198.226, -16.392, 1.464)
pt3dadd(27.845, 198.247, -16.4, 1.432)
pt3dadd(27.726, 198.256, -16.4, 1.404)
pt3dadd(27.608, 198.27, -16.4, 1.374)
pt3dadd(27.495, 198.306, -16.41, 1.354)
pt3dadd(27.38, 198.334, -16.431, 1.348)
pt3dadd(27.266, 198.36, -16.451, 1.344)
pt3dadd(27.152, 198.386, -16.472, 1.338)
pt3dadd(27.037, 198.413, -16.493, 1.332)
pt3dadd(26.928, 198.458, -16.5, 1.33)
pt3dadd(26.822, 198.515, -16.5, 1.33)
pt3dadd(26.715, 198.57, -16.5, 1.33)
pt3dadd(26.609, 198.625, -16.5, 1.33)
pt3dadd(26.502, 198.68, -16.5, 1.33)
pt3dadd(26.39, 198.721, -16.5, 1.33)
pt3dadd(26.274, 198.754, -16.5, 1.33)
pt3dadd(26.159, 198.787, -16.5, 1.33)
pt3dadd(26.044, 198.82, -16.5, 1.33)
pt3dadd(25.928, 198.852, -16.5, 1.33)
pt3dadd(25.812, 198.875, -16.5, 1.334)
pt3dadd(25.692, 198.862, -16.5, 1.352)
pt3dadd(25.573, 198.85, -16.5, 1.368)
pt3dadd(25.454, 198.844, -16.5, 1.382)
pt3dadd(25.336, 198.865, -16.5, 1.382)
pt3dadd(25.218, 198.886, -16.5, 1.382)
pt3dadd(25.098, 198.898, -16.5, 1.374)
pt3dadd(24.979, 198.904, -16.5, 1.364)
pt3dadd(24.865, 198.926, -16.5, 1.348)
pt3dadd(24.775, 199.006, -16.5, 1.314)
pt3dadd(24.687, 199.087, -16.5, 1.276)
pt3dadd(24.622, 199.187, -16.5, 1.208)
pt3dadd(24.549, 199.284, -16.5, 1.152)
pt3dadd(24.471, 199.374, -16.5, 1.106)
pt3dadd(24.386, 199.457, -16.5, 1.064)
pt3dadd(24.289, 199.529, -16.5, 1.028)
pt3dadd(24.197, 199.603, -16.505, 1.004)
pt3dadd(24.111, 199.686, -16.523, 1.004)
pt3dadd(24.015, 199.739, -16.545, 1.014)
pt3dadd(23.902, 199.745, -16.577, 1.038)
pt3dadd(23.786, 199.747, -16.6, 1.058)
pt3dadd(23.667, 199.735, -16.6, 1.07)
pt3dadd(23.55, 199.729, -16.61, 1.078)
pt3dadd(23.442, 199.744, -16.651, 1.066)
pt3dadd(23.333, 199.759, -16.692, 1.056)
pt3dadd(23.225, 199.772, -16.733, 1.044)
pt3dadd(23.116, 199.788, -16.773, 1.034)
pt3dadd(23.007, 199.808, -16.812, 1.016)
pt3dadd(22.898, 199.831, -16.848, 0.994)
pt3dadd(22.789, 199.856, -16.885, 0.972)
pt3dadd(22.68, 199.879, -16.922, 0.95)
pt3dadd(22.573, 199.906, -16.96, 0.926)
pt3dadd(22.482, 199.956, -17.012, 0.896)
pt3dadd(22.392, 200.005, -17.063, 0.866)
pt3dadd(22.302, 200.054, -17.115, 0.834)
pt3dadd(22.212, 200.104, -17.166, 0.804)
pt3dadd(22.112, 200.168, -17.174, 0.782)
pt3dadd(22.012, 200.234, -17.181, 0.762)
pt3dadd(21.912, 200.3, -17.188, 0.74)
pt3dadd(21.811, 200.366, -17.195, 0.72)
pt3dadd(21.709, 200.426, -17.2, 0.696)
pt3dadd(21.596, 200.468, -17.2, 0.67)
pt3dadd(21.484, 200.51, -17.2, 0.642)
pt3dadd(21.372, 200.554, -17.2, 0.616)
pt3dadd(21.29, 200.57, -17.246, 0.586)
pt3dadd(21.228, 200.582, -17.33, 0.608)
pt3dadd(21.145, 200.63, -17.386, 0.628)
pt3dadd(21.037, 200.678, -17.4, 0.654)
pt3dadd(20.928, 200.725, -17.391, 0.76)
pt3dadd(20.845, 200.758, -17.333, 0.786)
pt3dadd(20.819, 200.762, -17.236, 0.738)
pt3dadd(20.813, 200.772, -17.137, 0.746)
pt3dadd(20.795, 200.802, -17.043, 0.832)
pt3dadd(20.715, 200.879, -17.038, 0.936)
pt3dadd(20.64, 200.941, -17.096, 1.046)
pt3dadd(20.547, 200.977, -17.152, 1.132)
pt3dadd(20.459, 201.016, -17.21, 1.228)
pt3dadd(20.424, 201.062, -17.294, 1.382)
pt3dadd(20.35, 201.079, -17.368, 1.434)
pt3dadd(20.265, 201.092, -17.438, 1.468)
pt3dadd(20.179, 201.103, -17.508, 1.502)
pt3dadd(20.094, 201.116, -17.577, 1.536)
pt3dadd(20.004, 201.127, -17.642, 1.58)
pt3dadd(19.906, 201.138, -17.7, 1.644)
pt3dadd(19.806, 201.16, -17.748, 1.694)
pt3dadd(19.701, 201.199, -17.784, 1.72)
}
}
proc shape3d_153() {
dend_5[20] { pt3dadd(19.622, 201.275, -17.8, 1.702)
pt3dadd(19.564, 201.38, -17.8, 1.648)
pt3dadd(19.506, 201.485, -17.8, 1.584)
pt3dadd(19.448, 201.59, -17.8, 1.496)
pt3dadd(19.39, 201.695, -17.8, 1.408)
pt3dadd(19.285, 201.752, -17.8, 1.38)
pt3dadd(19.179, 201.808, -17.8, 1.352)
pt3dadd(19.073, 201.864, -17.8, 1.324)
pt3dadd(18.962, 201.907, -17.8, 1.314)
pt3dadd(18.844, 201.929, -17.8, 1.334)
pt3dadd(18.726, 201.948, -17.8, 1.354)
pt3dadd(18.608, 201.97, -17.8, 1.404)
pt3dadd(18.491, 201.997, -17.8, 1.39)
pt3dadd(18.374, 202.024, -17.8, 1.378)
pt3dadd(18.257, 202.05, -17.8, 1.364)
pt3dadd(18.14, 202.076, -17.8, 1.35)
pt3dadd(18.023, 202.104, -17.8, 1.336)
pt3dadd(17.905, 202.124, -17.8, 1.314)
pt3dadd(17.786, 202.142, -17.8, 1.288)
pt3dadd(17.667, 202.16, -17.8, 1.262)
pt3dadd(17.548, 202.178, -17.8, 1.236)
pt3dadd(17.43, 202.196, -17.8, 1.21)
pt3dadd(17.311, 202.213, -17.8, 1.184)
pt3dadd(17.199, 202.249, -17.819, 1.166)
pt3dadd(17.088, 202.285, -17.84, 1.15)
pt3dadd(16.977, 202.324, -17.862, 1.134)
pt3dadd(16.866, 202.361, -17.884, 1.118)
pt3dadd(16.755, 202.4, -17.9, 1.104)
pt3dadd(16.643, 202.441, -17.9, 1.104)
pt3dadd(16.53, 202.484, -17.9, 1.104)
pt3dadd(16.418, 202.526, -17.9, 1.104)
pt3dadd(16.305, 202.567, -17.9, 1.104)
pt3dadd(16.194, 202.612, -17.9, 1.104)
pt3dadd(16.109, 202.697, -17.9, 1.092)
pt3dadd(16.025, 202.782, -17.9, 1.082)
pt3dadd(15.941, 202.867, -17.9, 1.06)
pt3dadd(15.857, 202.954, -17.9, 1.036)
pt3dadd(15.746, 202.981, -17.9, 1.022)
pt3dadd(15.626, 202.988, -17.9, 1.012)
pt3dadd(15.507, 202.999, -17.9, 1.008)
pt3dadd(15.39, 203.027, -17.9, 1.028)
pt3dadd(15.274, 203.054, -17.9, 1.05)
pt3dadd(15.156, 203.077, -17.9, 1.092)
pt3dadd(15.04, 203.104, -17.9, 1.132)
pt3dadd(14.935, 203.162, -17.9, 1.142)
pt3dadd(14.83, 203.22, -17.9, 1.152)
pt3dadd(14.725, 203.279, -17.9, 1.162)
pt3dadd(14.62, 203.336, -17.9, 1.172)
pt3dadd(14.515, 203.395, -17.9, 1.182)
pt3dadd(14.41, 203.452, -17.9, 1.194)
pt3dadd(14.304, 203.509, -17.9, 1.206)
pt3dadd(14.226, 203.6, -17.9, 1.194)
pt3dadd(14.149, 203.693, -17.9, 1.182)
pt3dadd(14.038, 203.73, -17.9, 1.172)
pt3dadd(13.921, 203.758, -17.9, 1.16)
pt3dadd(13.803, 203.768, -17.9, 1.146)
pt3dadd(13.683, 203.76, -17.9, 1.13)
pt3dadd(13.564, 203.752, -17.9, 1.112)
pt3dadd(13.448, 203.772, -17.902, 1.096)
pt3dadd(13.334, 203.812, -17.905, 1.084)
pt3dadd(13.221, 203.851, -17.908, 1.07)
pt3dadd(13.108, 203.89, -17.911, 1.056)
pt3dadd(13.031, 203.911, -17.982, 1.006)
pt3dadd(12.957, 203.933, -18.058, 0.948)
pt3dadd(12.852, 203.964, -18.091, 0.844)
pt3dadd(12.735, 203.989, -18.095, 0.82)
pt3dadd(12.618, 204.014, -18.099, 0.796)
pt3dadd(12.501, 204.04, -18.103, 0.774)
pt3dadd(12.383, 204.065, -18.107, 0.75)
pt3dadd(12.267, 204.09, -18.114, 0.726)
pt3dadd(12.168, 204.124, -18.163, 0.67)
pt3dadd(12.068, 204.152, -18.212, 0.618)
pt3dadd(11.965, 204.162, -18.263, 0.58)
pt3dadd(11.873, 204.167, -18.323, 0.552)
pt3dadd(11.813, 204.16, -18.409, 0.552)
pt3dadd(11.753, 204.154, -18.496, 0.554)
pt3dadd(11.707, 204.149, -18.588, 0.588)
pt3dadd(11.661, 204.144, -18.68, 0.62)
pt3dadd(11.578, 204.17, -18.744, 0.66)
pt3dadd(11.484, 204.206, -18.799, 0.702)
pt3dadd(11.366, 204.223, -18.8, 0.748)
pt3dadd(11.246, 204.224, -18.8, 0.728)
pt3dadd(11.127, 204.234, -18.8, 0.74)
pt3dadd(11.012, 204.268, -18.8, 0.832)
pt3dadd(10.895, 204.292, -18.8, 0.954)
pt3dadd(10.776, 204.282, -18.8, 0.97)
pt3dadd(10.656, 204.27, -18.8, 0.984)
pt3dadd(10.536, 204.26, -18.8, 0.998)
pt3dadd(10.417, 204.248, -18.8, 1.012)
pt3dadd(10.297, 204.239, -18.8, 1.028)
pt3dadd(10.178, 204.228, -18.8, 1.042)
pt3dadd(10.059, 204.217, -18.804, 1.058)
pt3dadd(9.944, 204.205, -18.831, 1.078)
pt3dadd(9.83, 204.193, -18.859, 1.098)
pt3dadd(9.712, 204.184, -18.876, 1.112)
pt3dadd(9.593, 204.176, -18.889, 1.122)
pt3dadd(9.476, 204.176, -18.9, 1.128)
pt3dadd(9.366, 204.227, -18.9, 1.118)
pt3dadd(9.257, 204.275, -18.9, 1.106)
pt3dadd(9.148, 204.325, -18.9, 1.074)
pt3dadd(9.039, 204.376, -18.9, 1.038)
pt3dadd(8.941, 204.444, -18.9, 0.99)
pt3dadd(8.853, 204.52, -18.913, 0.956)
pt3dadd(8.777, 204.6, -18.953, 0.962)
pt3dadd(8.701, 204.679, -18.993, 0.968)
pt3dadd(8.625, 204.757, -19.034, 0.974)
pt3dadd(8.544, 204.834, -19.068, 0.984)
pt3dadd(8.44, 204.893, -19.075, 1.01)
pt3dadd(8.336, 204.952, -19.082, 1.036)
pt3dadd(8.232, 205.01, -19.089, 1.062)
pt3dadd(8.128, 205.07, -19.096, 1.088)
pt3dadd(8.032, 205.138, -19.109, 1.114)
pt3dadd(7.95, 205.222, -19.132, 1.136)
pt3dadd(7.867, 205.304, -19.154, 1.16)
pt3dadd(7.785, 205.387, -19.177, 1.182)
pt3dadd(7.703, 205.47, -19.2, 1.206)
}
dend_5[21] {pt3dclear()
pt3dadd(7.703, 205.47, -19.2, 1.206)
pt3dadd(7.652, 205.52, -19.201, 1.2)
pt3dadd(7.567, 205.604, -19.204, 1.188)
pt3dadd(7.481, 205.688, -19.206, 1.178)
pt3dadd(7.396, 205.772, -19.208, 1.168)
pt3dadd(7.31, 205.858, -19.21, 1.158)
pt3dadd(7.216, 205.928, -19.225, 1.14)
pt3dadd(7.119, 205.993, -19.245, 1.116)
pt3dadd(7.021, 206.059, -19.265, 1.094)
pt3dadd(6.924, 206.124, -19.285, 1.072)
pt3dadd(6.831, 206.192, -19.312, 1.052)
pt3dadd(6.751, 206.262, -19.359, 1.04)
pt3dadd(6.672, 206.332, -19.405, 1.026)
pt3dadd(6.592, 206.404, -19.451, 1.014)
pt3dadd(6.508, 206.466, -19.498, 1.008)
pt3dadd(6.407, 206.491, -19.547, 1.024)
pt3dadd(6.305, 206.518, -19.595, 1.042)
pt3dadd(6.204, 206.545, -19.644, 1.06)
pt3dadd(6.102, 206.57, -19.692, 1.078)
pt3dadd(6.032, 206.618, -19.761, 1.106)
pt3dadd(5.968, 206.67, -19.834, 1.136)
pt3dadd(5.904, 206.722, -19.907, 1.166)
pt3dadd(5.84, 206.773, -19.979, 1.196)
pt3dadd(5.781, 206.851, -20.034, 1.23)
pt3dadd(5.724, 206.941, -20.081, 1.266)
pt3dadd(5.667, 207.03, -20.128, 1.302)
pt3dadd(5.61, 207.12, -20.176, 1.338)
pt3dadd(5.556, 207.214, -20.217, 1.388)
pt3dadd(5.503, 207.313, -20.252, 1.454)
pt3dadd(5.451, 207.413, -20.287, 1.496)
pt3dadd(5.399, 207.512, -20.321, 1.522)
pt3dadd(5.33, 207.595, -20.362, 1.504)
pt3dadd(5.254, 207.672, -20.406, 1.46)
pt3dadd(5.173, 207.72, -20.468, 1.354)
pt3dadd(5.093, 207.767, -20.531, 1.244)
pt3dadd(5.017, 207.823, -20.593, 1.156)
pt3dadd(4.941, 207.881, -20.654, 1.07)
pt3dadd(4.864, 207.941, -20.691, 0.976)
pt3dadd(4.781, 208.015, -20.653, 0.864)
pt3dadd(4.713, 208.102, -20.617, 0.73)
pt3dadd(4.641, 208.187, -20.643, 0.704)
pt3dadd(4.567, 208.268, -20.682, 0.704)
pt3dadd(4.492, 208.35, -20.72, 0.704)
pt3dadd(4.417, 208.432, -20.759, 0.704)
pt3dadd(4.335, 208.51, -20.792, 0.712)
pt3dadd(4.251, 208.586, -20.823, 0.724)
pt3dadd(4.166, 208.663, -20.854, 0.736)
pt3dadd(4.082, 208.74, -20.886, 0.748)
pt3dadd(4, 208.823, -20.903, 0.774)
pt3dadd(3.92, 208.913, -20.908, 0.81)
pt3dadd(3.827, 208.975, -20.93, 0.842)
pt3dadd(3.722, 209.01, -20.969, 0.872)
pt3dadd(3.668, 209.068, -20.919, 0.902)
pt3dadd(3.629, 209.135, -20.844, 0.93)
pt3dadd(3.549, 209.22, -20.82, 0.97)
pt3dadd(3.467, 209.303, -20.8, 1.008)
pt3dadd(3.371, 209.376, -20.8, 1.038)
pt3dadd(3.276, 209.449, -20.8, 1.066)
pt3dadd(3.181, 209.522, -20.8, 1.094)
pt3dadd(3.096, 209.603, -20.815, 1.13)
pt3dadd(3.015, 209.687, -20.838, 1.17)
pt3dadd(2.972, 209.754, -20.904, 1.18)
pt3dadd(2.905, 209.834, -20.952, 1.174)
pt3dadd(2.838, 209.916, -21.001, 1.168)
pt3dadd(2.771, 209.995, -21.049, 1.162)
pt3dadd(2.704, 210.077, -21.098, 1.156)
pt3dadd(2.593, 210.12, -21.1, 1.144)
pt3dadd(2.481, 210.163, -21.1, 1.134)
pt3dadd(2.389, 210.228, -21.127, 1.12)
pt3dadd(2.306, 210.301, -21.165, 1.106)
pt3dadd(2.226, 210.386, -21.189, 1.068)
pt3dadd(2.147, 210.466, -21.216, 1.026)
pt3dadd(2.076, 210.479, -21.297, 0.96)
pt3dadd(2.009, 210.49, -21.378, 0.894)
pt3dadd(1.966, 210.486, -21.472, 0.812)
pt3dadd(1.939, 210.482, -21.568, 0.746)
pt3dadd(1.934, 210.492, -21.668, 0.748)
pt3dadd(1.914, 210.524, -21.761, 0.832)
pt3dadd(1.853, 210.575, -21.835, 0.854)
pt3dadd(1.789, 210.593, -21.918, 0.846)
pt3dadd(1.709, 210.618, -21.987, 0.926)
pt3dadd(1.61, 210.676, -21.974, 0.98)
pt3dadd(1.526, 210.736, -21.925, 1.014)
pt3dadd(1.422, 210.776, -21.889, 1.03)
}
}
proc shape3d_154() {
dend_5[21] { pt3dadd(1.327, 210.809, -21.841, 0.95)
pt3dadd(1.292, 210.859, -21.758, 0.874)
pt3dadd(1.289, 210.887, -21.661, 0.806)
pt3dadd(1.288, 210.896, -21.561, 0.744)
pt3dadd(1.287, 210.902, -21.462, 0.74)
pt3dadd(1.275, 210.926, -21.365, 0.806)
pt3dadd(1.205, 210.986, -21.329, 0.838)
pt3dadd(1.117, 211, -21.391, 0.742)
pt3dadd(1.058, 211.002, -21.476, 0.688)
pt3dadd(1.014, 211.036, -21.563, 0.682)
pt3dadd(0.934, 211.072, -21.621, 0.716)
pt3dadd(0.825, 211.082, -21.663, 0.744)
pt3dadd(0.719, 211.111, -21.656, 0.764)
pt3dadd(0.616, 211.15, -21.626, 0.778)
pt3dadd(0.57, 211.159, -21.718, 0.758)
pt3dadd(0.523, 211.169, -21.81, 0.74)
pt3dadd(0.472, 211.2, -21.893, 0.7)
pt3dadd(0.412, 211.262, -21.963, 0.63)
pt3dadd(0.339, 211.339, -21.977, 0.548)
pt3dadd(0.257, 211.388, -21.933, 0.464)
pt3dadd(0.174, 211.406, -21.862, 0.41)
pt3dadd(0.101, 211.471, -21.811, 0.3)
pt3dadd(0.005, 211.542, -21.8, 0.238)
pt3dadd(-0.092, 211.61, -21.8, 0.234)
pt3dadd(-0.189, 211.682, -21.8, 0.246)
pt3dadd(-0.264, 211.772, -21.8, 0.262)
pt3dadd(-0.322, 211.878, -21.8, 0.284)
pt3dadd(-0.386, 211.978, -21.8, 0.328)
pt3dadd(-0.471, 212.063, -21.8, 0.414)
pt3dadd(-0.522, 212.17, -21.8, 0.426)
pt3dadd(-0.549, 212.287, -21.8, 0.402)
pt3dadd(-0.585, 212.4, -21.8, 0.416)
pt3dadd(-0.666, 212.483, -21.8, 0.486)
pt3dadd(-0.771, 212.537, -21.815, 0.464)
pt3dadd(-0.854, 212.585, -21.871, 0.316)
pt3dadd(-0.915, 212.596, -21.956, 0.242)
pt3dadd(-0.968, 212.591, -22.045, 0.226)
pt3dadd(-1.022, 212.585, -22.135, 0.226)
pt3dadd(-1.09, 212.578, -22.212, 0.226)
pt3dadd(-1.197, 212.567, -22.257, 0.226)
pt3dadd(-1.304, 212.555, -22.3, 0.226)
pt3dadd(-1.423, 212.543, -22.3, 0.226)
pt3dadd(-1.542, 212.53, -22.3, 0.226)
pt3dadd(-1.662, 212.518, -22.3, 0.226)
pt3dadd(-1.782, 212.52, -22.3, 0.226)
pt3dadd(-1.902, 212.522, -22.3, 0.226)
pt3dadd(-2.022, 212.524, -22.3, 0.226)
pt3dadd(-2.121, 212.568, -22.302, 0.226)
pt3dadd(-2.195, 212.663, -22.308, 0.226)
pt3dadd(-2.269, 212.746, -22.331, 0.226)
pt3dadd(-2.342, 212.798, -22.394, 0.226)
pt3dadd(-2.389, 212.803, -22.485, 0.226)
pt3dadd(-2.409, 212.801, -22.583, 0.226)
pt3dadd(-2.411, 212.801, -22.683, 0.226)
pt3dadd(-2.424, 212.8, -22.782, 0.25)
pt3dadd(-2.461, 212.801, -22.875, 0.28)
pt3dadd(-2.54, 212.838, -22.944, 0.308)
pt3dadd(-2.625, 212.866, -23.008, 0.33)
pt3dadd(-2.723, 212.876, -23.066, 0.344)
pt3dadd(-2.813, 212.893, -23.129, 0.38)
pt3dadd(-2.895, 212.936, -23.17, 0.46)
pt3dadd(-2.972, 212.975, -23.106, 0.562)
pt3dadd(-3.051, 212.975, -23.031, 0.62)
pt3dadd(-3.12, 212.971, -22.951, 0.666)
pt3dadd(-3.168, 213.004, -22.865, 0.722)
pt3dadd(-3.226, 213.058, -22.791, 0.764)
pt3dadd(-3.313, 213.108, -22.742, 0.834)
pt3dadd(-3.414, 213.156, -22.705, 0.918)
pt3dadd(-3.528, 213.186, -22.7, 0.984)
pt3dadd(-3.645, 213.215, -22.7, 1.048)
pt3dadd(-3.76, 213.25, -22.7, 1.114)
pt3dadd(-3.872, 213.292, -22.7, 1.182)
pt3dadd(-3.986, 213.325, -22.7, 1.234)
pt3dadd(-4.106, 213.337, -22.7, 1.25)
pt3dadd(-4.217, 213.374, -22.7, 1.25)
pt3dadd(-4.322, 213.432, -22.7, 1.24)
pt3dadd(-4.427, 213.491, -22.7, 1.23)
pt3dadd(-4.531, 213.55, -22.7, 1.22)
pt3dadd(-4.636, 213.608, -22.7, 1.21)
pt3dadd(-4.735, 213.673, -22.708, 1.188)
pt3dadd(-4.829, 213.748, -22.723, 1.154)
pt3dadd(-4.922, 213.821, -22.737, 1.12)
pt3dadd(-5.016, 213.893, -22.752, 1.088)
pt3dadd(-5.109, 213.966, -22.767, 1.054)
pt3dadd(-5.215, 214.013, -22.795, 1.044)
pt3dadd(-5.32, 214.06, -22.823, 1.032)
pt3dadd(-5.426, 214.105, -22.85, 1.02)
pt3dadd(-5.531, 214.152, -22.878, 1.008)
pt3dadd(-5.636, 214.201, -22.904, 1.014)
pt3dadd(-5.741, 214.25, -22.929, 1.032)
pt3dadd(-5.847, 214.3, -22.954, 1.048)
pt3dadd(-5.952, 214.349, -22.979, 1.066)
pt3dadd(-6.054, 214.404, -23.003, 1.092)
pt3dadd(-6.146, 214.477, -23.021, 1.158)
pt3dadd(-6.237, 214.55, -23.043, 1.208)
pt3dadd(-6.327, 214.616, -23.081, 1.224)
pt3dadd(-6.406, 214.684, -23.128, 1.21)
pt3dadd(-6.475, 214.754, -23.185, 1.166)
pt3dadd(-6.559, 214.774, -23.25, 1.118)
pt3dadd(-6.648, 214.778, -23.317, 1.066)
pt3dadd(-6.741, 214.816, -23.369, 1.022)
pt3dadd(-6.834, 214.842, -23.426, 0.982)
pt3dadd(-6.926, 214.853, -23.489, 0.942)
pt3dadd(-6.979, 214.885, -23.57, 0.92)
pt3dadd(-7.01, 214.93, -23.659, 0.908)
pt3dadd(-7.069, 215.006, -23.692, 0.896)
pt3dadd(-7.143, 215.101, -23.698, 0.884)
pt3dadd(-7.241, 215.158, -23.7, 0.886)
pt3dadd(-7.358, 215.185, -23.7, 0.896)
pt3dadd(-7.474, 215.215, -23.7, 0.896)
pt3dadd(-7.586, 215.257, -23.7, 0.864)
pt3dadd(-7.694, 215.31, -23.7, 0.838)
pt3dadd(-7.799, 215.368, -23.7, 0.814)
pt3dadd(-7.896, 215.437, -23.7, 0.804)
pt3dadd(-7.986, 215.518, -23.7, 0.804)
pt3dadd(-8.078, 215.594, -23.702, 0.824)
pt3dadd(-8.171, 215.669, -23.708, 0.874)
pt3dadd(-8.248, 215.736, -23.742, 0.926)
pt3dadd(-8.297, 215.79, -23.821, 0.98)
pt3dadd(-8.372, 215.839, -23.882, 1.016)
pt3dadd(-8.466, 215.898, -23.919, 1.03)
pt3dadd(-8.556, 215.972, -23.939, 1.03)
pt3dadd(-8.646, 216.049, -23.959, 1.03)
pt3dadd(-8.736, 216.124, -23.979, 1.03)
pt3dadd(-8.826, 216.2, -23.999, 1.03)
pt3dadd(-8.922, 216.271, -24, 1.034)
pt3dadd(-9.019, 216.341, -24, 1.04)
pt3dadd(-9.116, 216.412, -24, 1.044)
pt3dadd(-9.213, 216.484, -24, 1.05)
pt3dadd(-9.309, 216.554, -24, 1.054)
pt3dadd(-9.399, 216.635, -24, 1.07)
pt3dadd(-9.488, 216.714, -24, 1.086)
pt3dadd(-9.578, 216.794, -24, 1.1)
pt3dadd(-9.667, 216.874, -24, 1.116)
pt3dadd(-9.758, 216.953, -24, 1.13)
pt3dadd(-9.863, 217.01, -24, 1.142)
pt3dadd(-9.969, 217.067, -24, 1.154)
pt3dadd(-10.045, 217.156, -24.021, 1.132)
pt3dadd(-10.118, 217.246, -24.044, 1.106)
pt3dadd(-10.168, 217.3, -24.123, 1.05)
pt3dadd(-10.215, 217.363, -24.193, 1)
pt3dadd(-10.244, 217.475, -24.218, 0.978)
pt3dadd(-10.274, 217.588, -24.243, 0.956)
pt3dadd(-10.338, 217.601, -24.324, 0.99)
pt3dadd(-10.403, 217.61, -24.408, 1.028)
pt3dadd(-10.469, 217.619, -24.491, 1.066)
pt3dadd(-10.548, 217.616, -24.565, 1.154)
pt3dadd(-10.635, 217.607, -24.633, 1.272)
pt3dadd(-10.729, 217.634, -24.676, 1.37)
pt3dadd(-10.83, 217.697, -24.693, 1.448)
pt3dadd(-10.93, 217.759, -24.71, 1.526)
pt3dadd(-10.983, 217.813, -24.785, 1.532)
pt3dadd(-11.039, 217.867, -24.858, 1.524)
pt3dadd(-11.136, 217.932, -24.88, 1.454)
pt3dadd(-11.234, 217.997, -24.902, 1.384)
pt3dadd(-11.313, 218.018, -24.961, 1.3)
pt3dadd(-11.381, 218.011, -25.043, 1.206)
pt3dadd(-11.452, 218.04, -25.11, 1.116)
pt3dadd(-11.529, 218.113, -25.158, 1.03)
pt3dadd(-11.609, 218.183, -25.2, 0.944)
pt3dadd(-11.714, 218.24, -25.2, 0.864)
pt3dadd(-11.82, 218.297, -25.2, 0.782)
pt3dadd(-11.929, 218.346, -25.188, 0.734)
pt3dadd(-12.038, 218.394, -25.176, 0.688)
pt3dadd(-12.131, 218.447, -25.149, 0.65)
pt3dadd(-12.175, 218.515, -25.076, 0.636)
pt3dadd(-12.237, 218.59, -25.033, 0.632)
pt3dadd(-12.325, 218.671, -25.033, 0.642)
pt3dadd(-12.413, 218.753, -25.035, 0.654)
pt3dadd(-12.496, 218.826, -25.073, 0.682)
pt3dadd(-12.579, 218.904, -25.1, 0.722)
pt3dadd(-12.656, 218.996, -25.1, 0.786)
pt3dadd(-12.727, 219.092, -25.1, 0.842)
pt3dadd(-12.791, 219.193, -25.1, 0.898)
pt3dadd(-12.842, 219.302, -25.1, 0.952)
pt3dadd(-12.894, 219.41, -25.1, 1.006)
pt3dadd(-12.972, 219.5, -25.1, 1.04)
pt3dadd(-13.05, 219.593, -25.1, 1.076)
pt3dadd(-13.164, 219.607, -25.1, 1.064)
pt3dadd(-13.284, 219.61, -25.1, 1.046)
pt3dadd(-13.404, 219.61, -25.1, 1.02)
pt3dadd(-13.524, 219.605, -25.1, 0.968)
pt3dadd(-13.637, 219.62, -25.1, 0.924)
pt3dadd(-13.734, 219.691, -25.1, 0.904)
pt3dadd(-13.831, 219.762, -25.1, 0.882)
pt3dadd(-13.928, 219.833, -25.1, 0.862)
pt3dadd(-14.025, 219.904, -25.1, 0.842)
pt3dadd(-14.126, 219.967, -25.1, 0.824)
pt3dadd(-14.235, 220.016, -25.1, 0.81)
pt3dadd(-14.345, 220.064, -25.1, 0.794)
pt3dadd(-14.455, 220.114, -25.1, 0.78)
pt3dadd(-14.564, 220.163, -25.1, 0.766)
pt3dadd(-14.675, 220.207, -25.1, 0.746)
pt3dadd(-14.792, 220.235, -25.1, 0.716)
pt3dadd(-14.909, 220.262, -25.1, 0.682)
pt3dadd(-14.989, 220.348, -25.104, 0.658)
pt3dadd(-15.063, 220.441, -25.11, 0.634)
pt3dadd(-15.118, 220.481, -25.177, 0.628)
pt3dadd(-15.168, 220.504, -25.267, 0.628)
pt3dadd(-15.257, 220.505, -25.329, 0.636)
}
}
proc shape3d_155() {
dend_5[21] { pt3dadd(-15.359, 220.5, -25.382, 0.648)
pt3dadd(-15.462, 220.537, -25.4, 0.662)
pt3dadd(-15.565, 220.598, -25.4, 0.676)
pt3dadd(-15.669, 220.658, -25.4, 0.69)
pt3dadd(-15.772, 220.72, -25.403, 0.702)
pt3dadd(-15.855, 220.787, -25.448, 0.688)
pt3dadd(-15.945, 220.841, -25.493, 0.672)
pt3dadd(-16.048, 220.861, -25.542, 0.652)
pt3dadd(-16.151, 220.883, -25.59, 0.632)
pt3dadd(-16.261, 220.877, -25.626, 0.594)
pt3dadd(-16.374, 220.865, -25.659, 0.552)
pt3dadd(-16.47, 220.855, -25.712, 0.48)
pt3dadd(-16.561, 220.866, -25.776, 0.448)
pt3dadd(-16.657, 220.883, -25.834, 0.442)
pt3dadd(-16.753, 220.901, -25.892, 0.436)
pt3dadd(-16.849, 220.918, -25.95, 0.43)
pt3dadd(-16.952, 220.932, -25.996, 0.426)
pt3dadd(-17.069, 220.94, -26.017, 0.426)
pt3dadd(-17.186, 220.949, -26.039, 0.426)
pt3dadd(-17.303, 220.957, -26.06, 0.426)
pt3dadd(-17.42, 220.966, -26.081, 0.426)
pt3dadd(-17.53, 220.973, -26.111, 0.43)
pt3dadd(-17.594, 220.973, -26.195, 0.454)
pt3dadd(-17.658, 220.972, -26.279, 0.478)
pt3dadd(-17.761, 220.961, -26.33, 0.488)
pt3dadd(-17.864, 220.95, -26.381, 0.5)
pt3dadd(-17.981, 220.938, -26.392, 0.532)
pt3dadd(-18.1, 220.925, -26.396, 0.566)
pt3dadd(-18.219, 220.913, -26.4, 0.6)
pt3dadd(-18.339, 220.9, -26.4, 0.634)
pt3dadd(-18.458, 220.888, -26.4, 0.668)
pt3dadd(-18.577, 220.874, -26.4, 0.702)
pt3dadd(-18.696, 220.862, -26.4, 0.774)
pt3dadd(-18.816, 220.85, -26.4, 0.85)
pt3dadd(-18.927, 220.838, -26.435, 0.876)
pt3dadd(-19.038, 220.826, -26.472, 0.9)
pt3dadd(-19.149, 220.814, -26.509, 0.922)
pt3dadd(-19.26, 220.804, -26.546, 0.946)
pt3dadd(-19.371, 220.792, -26.584, 0.968)
pt3dadd(-19.486, 220.78, -26.6, 0.996)
pt3dadd(-19.605, 220.766, -26.6, 1.024)
pt3dadd(-19.725, 220.754, -26.6, 1.052)
pt3dadd(-19.844, 220.742, -26.6, 1.082)
pt3dadd(-19.963, 220.729, -26.6, 1.11)
pt3dadd(-20.083, 220.717, -26.6, 1.138)
pt3dadd(-20.202, 220.704, -26.6, 1.168)
pt3dadd(-20.321, 220.692, -26.6, 1.218)
pt3dadd(-20.441, 220.679, -26.6, 1.284)
pt3dadd(-20.56, 220.667, -26.6, 1.352)
pt3dadd(-20.679, 220.654, -26.6, 1.404)
pt3dadd(-20.799, 220.642, -26.6, 1.446)
pt3dadd(-20.918, 220.628, -26.6, 1.488)
pt3dadd(-21.037, 220.614, -26.6, 1.506)
pt3dadd(-21.156, 220.597, -26.6, 1.506)
pt3dadd(-21.275, 220.579, -26.6, 1.506)
pt3dadd(-21.375, 220.522, -26.6, 1.46)
pt3dadd(-21.467, 220.445, -26.6, 1.39)
pt3dadd(-21.522, 220.346, -26.6, 1.308)
pt3dadd(-21.542, 220.228, -26.6, 1.216)
pt3dadd(-21.625, 220.148, -26.617, 1.16)
pt3dadd(-21.715, 220.073, -26.637, 1.11)
pt3dadd(-21.806, 219.997, -26.657, 1.06)
pt3dadd(-21.897, 219.923, -26.677, 1.01)
pt3dadd(-21.989, 219.859, -26.708, 0.968)
pt3dadd(-22.082, 219.811, -26.757, 0.94)
pt3dadd(-22.176, 219.764, -26.805, 0.91)
pt3dadd(-22.27, 219.718, -26.854, 0.882)
pt3dadd(-22.364, 219.67, -26.9, 0.852)
pt3dadd(-22.47, 219.614, -26.907, 0.824)
pt3dadd(-22.576, 219.559, -26.913, 0.794)
pt3dadd(-22.682, 219.504, -26.92, 0.764)
pt3dadd(-22.788, 219.448, -26.926, 0.736)
pt3dadd(-22.895, 219.394, -26.933, 0.706)
pt3dadd(-23.005, 219.365, -26.963, 0.698)
pt3dadd(-23.115, 219.34, -26.995, 0.694)
pt3dadd(-23.226, 219.316, -27.028, 0.688)
pt3dadd(-23.337, 219.292, -27.061, 0.684)
pt3dadd(-23.448, 219.266, -27.094, 0.678)
pt3dadd(-23.538, 219.198, -27.118, 0.678)
pt3dadd(-23.624, 219.119, -27.141, 0.678)
pt3dadd(-23.71, 219.04, -27.164, 0.678)
pt3dadd(-23.796, 218.96, -27.186, 0.678)
pt3dadd(-23.89, 218.894, -27.212, 0.684)
pt3dadd(-23.994, 218.849, -27.243, 0.7)
pt3dadd(-24.099, 218.803, -27.274, 0.716)
pt3dadd(-24.204, 218.759, -27.305, 0.732)
pt3dadd(-24.308, 218.712, -27.336, 0.748)
pt3dadd(-24.409, 218.662, -27.37, 0.77)
pt3dadd(-24.508, 218.609, -27.405, 0.792)
pt3dadd(-24.608, 218.557, -27.44, 0.814)
pt3dadd(-24.707, 218.504, -27.475, 0.838)
pt3dadd(-24.806, 218.447, -27.5, 0.866)
pt3dadd(-24.902, 218.375, -27.5, 0.912)
pt3dadd(-25, 218.308, -27.503, 0.96)
pt3dadd(-25.11, 218.278, -27.534, 1.018)
pt3dadd(-25.22, 218.248, -27.565, 1.076)
pt3dadd(-25.327, 218.234, -27.609, 1.122)
pt3dadd(-25.434, 218.224, -27.654, 1.168)
pt3dadd(-25.531, 218.2, -27.708, 1.218)
pt3dadd(-25.625, 218.168, -27.765, 1.268)
pt3dadd(-25.649, 218.125, -27.849, 1.308)
pt3dadd(-25.665, 218.071, -27.935, 1.328)
pt3dadd(-25.706, 218.003, -28.01, 1.316)
pt3dadd(-25.747, 217.933, -28.084, 1.302)
pt3dadd(-25.789, 217.866, -28.159, 1.29)
pt3dadd(-25.837, 217.802, -28.232, 1.278)
pt3dadd(-25.924, 217.769, -28.295, 1.262)
pt3dadd(-26.011, 217.736, -28.357, 1.244)
pt3dadd(-26.099, 217.703, -28.42, 1.226)
pt3dadd(-26.186, 217.669, -28.483, 1.21)
pt3dadd(-26.284, 217.649, -28.537, 1.198)
pt3dadd(-26.386, 217.636, -28.588, 1.188)
pt3dadd(-26.489, 217.622, -28.639, 1.178)
pt3dadd(-26.592, 217.609, -28.689, 1.168)
pt3dadd(-26.694, 217.596, -28.74, 1.158)
pt3dadd(-26.795, 217.555, -28.778, 1.182)
pt3dadd(-26.896, 217.504, -28.81, 1.22)
pt3dadd(-26.997, 217.451, -28.842, 1.26)
pt3dadd(-27.099, 217.399, -28.873, 1.298)
pt3dadd(-27.198, 217.343, -28.903, 1.342)
pt3dadd(-27.288, 217.268, -28.923, 1.402)
pt3dadd(-27.379, 217.193, -28.943, 1.464)
pt3dadd(-27.47, 217.118, -28.963, 1.526)
pt3dadd(-27.56, 217.043, -28.982, 1.586)
pt3dadd(-27.636, 216.953, -28.992, 1.714)
pt3dadd(-27.703, 216.853, -28.998, 1.872)
pt3dadd(-27.76, 216.749, -29, 1.99)
pt3dadd(-27.81, 216.64, -29, 2.082)
pt3dadd(-27.884, 216.56, -29.014, 2.156)
pt3dadd(-27.991, 216.523, -29.046, 2.204)
pt3dadd(-28.102, 216.493, -29.071, 2.242)
pt3dadd(-28.22, 216.475, -29.084, 2.262)
pt3dadd(-28.338, 216.458, -29.097, 2.282)
pt3dadd(-28.433, 216.397, -29.121, 2.316)
pt3dadd(-28.525, 216.338, -29.159, 2.342)
pt3dadd(-28.621, 216.295, -29.207, 2.352)
pt3dadd(-28.717, 216.252, -29.255, 2.364)
pt3dadd(-28.813, 216.209, -29.303, 2.376)
pt3dadd(-28.905, 216.167, -29.355, 2.382)
pt3dadd(-28.971, 216.14, -29.435, 2.356)
pt3dadd(-29.038, 216.108, -29.513, 2.318)
pt3dadd(-29.107, 216.054, -29.582, 2.234)
pt3dadd(-29.191, 216.011, -29.64, 2.138)
pt3dadd(-29.294, 215.981, -29.684, 2.026)
pt3dadd(-29.363, 215.918, -29.727, 1.914)
pt3dadd(-29.378, 215.809, -29.766, 1.8)
pt3dadd(-29.399, 215.7, -29.803, 1.7)
pt3dadd(-29.43, 215.592, -29.838, 1.622)
pt3dadd(-29.46, 215.484, -29.873, 1.544)
pt3dadd(-29.509, 215.394, -29.903, 1.46)
pt3dadd(-29.627, 215.377, -29.916, 1.352)
pt3dadd(-29.745, 215.36, -29.929, 1.246)
pt3dadd(-29.847, 215.347, -29.973, 1.006)
pt3dadd(-29.931, 215.33, -30.043, 0.96)
pt3dadd(-30.014, 215.314, -30.113, 0.938)
pt3dadd(-30.098, 215.297, -30.183, 0.918)
pt3dadd(-30.181, 215.279, -30.254, 0.896)
pt3dadd(-30.255, 215.263, -30.329, 0.88)
pt3dadd(-30.287, 215.251, -30.425, 0.886)
pt3dadd(-30.318, 215.239, -30.521, 0.89)
pt3dadd(-30.35, 215.227, -30.617, 0.896)
pt3dadd(-30.382, 215.215, -30.713, 0.9)
pt3dadd(-30.406, 215.214, -30.81, 0.908)
pt3dadd(-30.415, 215.234, -30.908, 0.922)
pt3dadd(-30.429, 215.23, -31.004, 0.914)
pt3dadd(-30.451, 215.188, -31.096, 0.878)
pt3dadd(-30.495, 215.158, -31.179, 0.828)
pt3dadd(-30.583, 215.149, -31.247, 0.758)
pt3dadd(-30.675, 215.14, -31.31, 0.686)
pt3dadd(-30.782, 215.128, -31.355, 0.606)
pt3dadd(-30.888, 215.117, -31.399, 0.528)
pt3dadd(-31.007, 215.096, -31.4, 0.462)
pt3dadd(-31.122, 215.076, -31.406, 0.4)
pt3dadd(-31.203, 215.044, -31.474, 0.376)
pt3dadd(-31.285, 215.011, -31.542, 0.354)
pt3dadd(-31.366, 214.979, -31.611, 0.332)
pt3dadd(-31.448, 214.944, -31.679, 0.308)
pt3dadd(-31.516, 214.93, -31.758, 0.294)
pt3dadd(-31.579, 214.924, -31.843, 0.284)
pt3dadd(-31.642, 214.916, -31.929, 0.274)
pt3dadd(-31.704, 214.91, -32.014, 0.264)
pt3dadd(-31.767, 214.903, -32.099, 0.256)
pt3dadd(-31.842, 214.87, -32.166, 0.242)
pt3dadd(-31.926, 214.814, -32.222, 0.228)
pt3dadd(-32.002, 214.781, -32.293, 0.226)
pt3dadd(-32.075, 214.753, -32.369, 0.226)
pt3dadd(-32.175, 214.74, -32.422, 0.226)
pt3dadd(-32.278, 214.729, -32.473, 0.226)
pt3dadd(-32.392, 214.717, -32.492, 0.226)
pt3dadd(-32.511, 214.705, -32.495, 0.226)
pt3dadd(-32.63, 214.692, -32.499, 0.226)
pt3dadd(-32.75, 214.68, -32.5, 0.266)
pt3dadd(-32.869, 214.667, -32.5, 0.316)
pt3dadd(-32.986, 214.649, -32.514, 0.348)
pt3dadd(-33.103, 214.631, -32.531, 0.374)
pt3dadd(-33.219, 214.61, -32.549, 0.4)
pt3dadd(-33.336, 214.591, -32.566, 0.426)
pt3dadd(-33.453, 214.573, -32.583, 0.452)
pt3dadd(-33.569, 214.554, -32.599, 0.478)
pt3dadd(-33.68, 214.525, -32.568, 0.518)
}
}
proc shape3d_156() {
dend_5[21] { pt3dadd(-33.791, 214.498, -32.538, 0.558)
pt3dadd(-33.901, 214.47, -32.507, 0.598)
pt3dadd(-34.012, 214.444, -32.476, 0.638)
pt3dadd(-34.123, 214.415, -32.445, 0.676)
pt3dadd(-34.237, 214.38, -32.437, 0.692)
pt3dadd(-34.351, 214.344, -32.429, 0.704)
pt3dadd(-34.465, 214.308, -32.421, 0.718)
pt3dadd(-34.579, 214.271, -32.413, 0.732)
pt3dadd(-34.693, 214.235, -32.405, 0.744)
pt3dadd(-34.807, 214.2, -32.407, 0.756)
pt3dadd(-34.92, 214.169, -32.426, 0.76)
pt3dadd(-35.034, 214.136, -32.445, 0.764)
pt3dadd(-35.147, 214.104, -32.464, 0.77)
pt3dadd(-35.26, 214.072, -32.483, 0.774)
pt3dadd(-35.374, 214.042, -32.502, 0.778)
pt3dadd(-35.492, 214.03, -32.518, 0.782)
pt3dadd(-35.61, 214.018, -32.535, 0.788)
pt3dadd(-35.727, 214.004, -32.551, 0.792)
pt3dadd(-35.845, 213.992, -32.567, 0.796)
pt3dadd(-35.963, 213.98, -32.584, 0.8)
pt3dadd(-36.081, 213.967, -32.6, 0.804)
pt3dadd(-36.2, 213.955, -32.6, 0.814)
pt3dadd(-36.319, 213.942, -32.6, 0.826)
pt3dadd(-36.439, 213.93, -32.6, 0.836)
pt3dadd(-36.558, 213.917, -32.6, 0.846)
pt3dadd(-36.677, 213.905, -32.6, 0.858)
pt3dadd(-36.797, 213.893, -32.6, 0.868)
pt3dadd(-36.916, 213.88, -32.6, 0.88)
pt3dadd(-37.035, 213.89, -32.6, 0.9)
pt3dadd(-37.155, 213.899, -32.6, 0.922)
pt3dadd(-37.275, 213.91, -32.6, 0.942)
pt3dadd(-37.394, 213.919, -32.6, 0.962)
pt3dadd(-37.514, 213.929, -32.6, 0.984)
pt3dadd(-37.632, 213.941, -32.6, 1.006)
pt3dadd(-37.71, 214.033, -32.6, 1.028)
pt3dadd(-37.788, 214.123, -32.6, 1.052)
pt3dadd(-37.902, 214.128, -32.6, 1.054)
pt3dadd(-38.022, 214.121, -32.6, 1.054)
pt3dadd(-38.142, 214.112, -32.6, 1.054)
pt3dadd(-38.261, 214.1, -32.604, 1.02)
pt3dadd(-38.38, 214.088, -32.608, 0.986)
pt3dadd(-38.495, 214.076, -32.618, 0.95)
pt3dadd(-38.555, 214.069, -32.705, 0.904)
pt3dadd(-38.615, 214.063, -32.791, 0.858)
pt3dadd(-38.711, 214.054, -32.85, 0.828)
pt3dadd(-38.81, 214.043, -32.905, 0.8)
pt3dadd(-38.909, 214.032, -32.961, 0.774)
pt3dadd(-39.014, 214.021, -33.004, 0.748)
pt3dadd(-39.132, 214.009, -33.016, 0.73)
pt3dadd(-39.251, 213.996, -33.028, 0.71)
pt3dadd(-39.362, 214.02, -33.049, 0.698)
pt3dadd(-39.467, 214.067, -33.076, 0.688)
pt3dadd(-39.572, 214.114, -33.104, 0.678)
pt3dadd(-39.66, 214.158, -33.161, 0.678)
pt3dadd(-39.744, 214.186, -33.224, 0.69)
pt3dadd(-39.837, 214.192, -33.284, 0.706)
pt3dadd(-39.942, 214.207, -33.33, 0.712)
pt3dadd(-40.047, 214.223, -33.377, 0.718)
pt3dadd(-40.152, 214.238, -33.423, 0.722)
pt3dadd(-40.258, 214.253, -33.467, 0.728)
pt3dadd(-40.377, 214.24, -33.478, 0.728)
pt3dadd(-40.495, 214.228, -33.488, 0.728)
pt3dadd(-40.614, 214.216, -33.499, 0.728)
pt3dadd(-40.733, 214.202, -33.509, 0.728)
pt3dadd(-40.851, 214.19, -33.52, 0.728)
pt3dadd(-40.97, 214.177, -33.53, 0.728)
pt3dadd(-41.081, 214.166, -33.564, 0.718)
pt3dadd(-41.187, 214.154, -33.609, 0.704)
pt3dadd(-41.294, 214.144, -33.654, 0.69)
pt3dadd(-41.401, 214.133, -33.699, 0.674)
pt3dadd(-41.507, 214.121, -33.743, 0.66)
pt3dadd(-41.614, 214.106, -33.788, 0.646)
pt3dadd(-41.719, 214.087, -33.833, 0.63)
pt3dadd(-41.825, 214.068, -33.877, 0.616)
pt3dadd(-41.931, 214.049, -33.922, 0.6)
pt3dadd(-42.036, 214.03, -33.966, 0.586)
pt3dadd(-42.147, 214.007, -33.997, 0.574)
pt3dadd(-42.262, 213.98, -34.013, 0.564)
pt3dadd(-42.378, 213.954, -34.029, 0.556)
pt3dadd(-42.493, 213.928, -34.045, 0.546)
pt3dadd(-42.609, 213.9, -34.061, 0.536)
pt3dadd(-42.724, 213.874, -34.077, 0.528)
pt3dadd(-42.835, 213.838, -34.101, 0.528)
pt3dadd(-42.946, 213.803, -34.125, 0.528)
pt3dadd(-43.057, 213.768, -34.149, 0.528)
pt3dadd(-43.168, 213.732, -34.174, 0.528)
pt3dadd(-43.278, 213.696, -34.198, 0.528)
pt3dadd(-43.394, 213.664, -34.2, 0.524)
pt3dadd(-43.509, 213.632, -34.2, 0.52)
pt3dadd(-43.625, 213.599, -34.2, 0.516)
pt3dadd(-43.741, 213.568, -34.2, 0.512)
pt3dadd(-43.856, 213.535, -34.2, 0.506)
pt3dadd(-43.972, 213.504, -34.2, 0.502)
pt3dadd(-44.079, 213.45, -34.2, 0.502)
pt3dadd(-44.184, 213.392, -34.2, 0.502)
pt3dadd(-44.294, 213.359, -34.184, 0.508)
pt3dadd(-44.407, 213.347, -34.154, 0.52)
pt3dadd(-44.521, 213.349, -34.128, 0.54)
pt3dadd(-44.635, 213.383, -34.112, 0.576)
pt3dadd(-44.75, 213.41, -34.1, 0.61)
pt3dadd(-44.87, 213.418, -34.1, 0.638)
pt3dadd(-44.989, 213.426, -34.1, 0.668)
pt3dadd(-45.094, 213.474, -34.105, 0.74)
pt3dadd(-45.197, 213.53, -34.117, 0.816)
pt3dadd(-45.312, 213.557, -34.135, 0.858)
pt3dadd(-45.427, 213.583, -34.153, 0.898)
pt3dadd(-45.542, 213.61, -34.171, 0.94)
pt3dadd(-45.657, 213.636, -34.189, 0.98)
pt3dadd(-45.773, 213.66, -34.2, 1.016)
pt3dadd(-45.892, 213.68, -34.2, 1.042)
pt3dadd(-46.01, 213.701, -34.2, 1.068)
pt3dadd(-46.128, 213.721, -34.2, 1.096)
pt3dadd(-46.246, 213.743, -34.2, 1.122)
pt3dadd(-46.365, 213.763, -34.2, 1.148)
pt3dadd(-46.481, 213.786, -34.21, 1.156)
pt3dadd(-46.598, 213.811, -34.223, 1.156)
pt3dadd(-46.714, 213.836, -34.236, 1.156)
pt3dadd(-46.83, 213.862, -34.249, 1.156)
pt3dadd(-46.947, 213.886, -34.263, 1.156)
pt3dadd(-47.063, 213.904, -34.282, 1.124)
pt3dadd(-47.179, 213.918, -34.304, 1.08)
pt3dadd(-47.295, 213.932, -34.326, 1.034)
pt3dadd(-47.411, 213.947, -34.348, 0.99)
pt3dadd(-47.527, 213.961, -34.37, 0.944)
pt3dadd(-47.609, 213.966, -34.433, 0.866)
pt3dadd(-47.673, 213.967, -34.518, 0.77)
pt3dadd(-47.763, 213.986, -34.568, 0.692)
pt3dadd(-47.875, 214.021, -34.59, 0.63)
pt3dadd(-47.989, 214.052, -34.6, 0.602)
pt3dadd(-48.106, 214.08, -34.6, 0.602)
pt3dadd(-48.223, 214.103, -34.6, 0.602)
pt3dadd(-48.343, 214.105, -34.6, 0.602)
pt3dadd(-48.463, 214.106, -34.6, 0.602)
pt3dadd(-48.578, 214.132, -34.6, 0.602)
pt3dadd(-48.689, 214.18, -34.6, 0.602)
pt3dadd(-48.799, 214.226, -34.6, 0.602)
pt3dadd(-48.91, 214.272, -34.6, 0.602)
pt3dadd(-49.004, 214.346, -34.6, 0.612)
pt3dadd(-49.095, 214.426, -34.6, 0.624)
pt3dadd(-49.152, 214.526, -34.6, 0.65)
pt3dadd(-49.191, 214.64, -34.6, 0.662)
pt3dadd(-49.229, 214.754, -34.6, 0.672)
pt3dadd(-49.299, 214.828, -34.606, 0.674)
pt3dadd(-49.418, 214.837, -34.62, 0.662)
pt3dadd(-49.536, 214.848, -34.636, 0.65)
pt3dadd(-49.649, 214.854, -34.668, 0.614)
pt3dadd(-49.763, 214.861, -34.699, 0.578)
pt3dadd(-49.871, 214.891, -34.666, 0.54)
pt3dadd(-49.979, 214.918, -34.633, 0.502)
pt3dadd(-50.089, 214.871, -34.624, 0.496)
pt3dadd(-50.199, 214.823, -34.615, 0.488)
pt3dadd(-50.309, 214.776, -34.606, 0.482)
pt3dadd(-50.417, 214.726, -34.6, 0.488)
pt3dadd(-50.522, 214.668, -34.6, 0.52)
pt3dadd(-50.627, 214.609, -34.6, 0.554)
pt3dadd(-50.727, 214.543, -34.6, 0.634)
pt3dadd(-50.824, 214.471, -34.6, 0.656)
pt3dadd(-50.919, 214.399, -34.6, 0.678)
pt3dadd(-50.997, 214.308, -34.6, 0.678)
pt3dadd(-51.076, 214.218, -34.6, 0.678)
pt3dadd(-51.193, 214.198, -34.6, 0.678)
pt3dadd(-51.312, 214.181, -34.6, 0.678)
pt3dadd(-51.431, 214.164, -34.6, 0.68)
pt3dadd(-51.55, 214.152, -34.6, 0.714)
pt3dadd(-51.67, 214.139, -34.6, 0.748)
pt3dadd(-51.789, 214.127, -34.602, 0.788)
pt3dadd(-51.903, 214.115, -34.629, 0.928)
pt3dadd(-52.017, 214.112, -34.659, 1.036)
pt3dadd(-52.131, 214.122, -34.69, 1.108)
pt3dadd(-52.244, 214.133, -34.722, 1.18)
pt3dadd(-52.358, 214.142, -34.754, 1.252)
pt3dadd(-52.471, 214.152, -34.786, 1.324)
pt3dadd(-52.585, 214.153, -34.816, 1.416)
pt3dadd(-52.7, 214.146, -34.845, 1.524)
pt3dadd(-52.815, 214.142, -34.871, 1.618)
pt3dadd(-52.933, 214.148, -34.891, 1.662)
pt3dadd(-53.05, 214.153, -34.91, 1.704)
pt3dadd(-53.093, 214.188, -34.995, 1.672)
pt3dadd(-53.13, 214.225, -35.085, 1.634)
pt3dadd(-53.226, 214.217, -35.143, 1.588)
pt3dadd(-53.325, 214.206, -35.2, 1.542)
pt3dadd(-53.412, 214.198, -35.268, 1.46)
pt3dadd(-53.487, 214.189, -35.345, 1.388)
pt3dadd(-53.547, 214.183, -35.431, 1.342)
pt3dadd(-53.615, 214.176, -35.511, 1.294)
pt3dadd(-53.714, 214.165, -35.568, 1.236)
pt3dadd(-53.813, 214.157, -35.624, 1.178)
pt3dadd(-53.923, 214.164, -35.661, 1.118)
pt3dadd(-54.034, 214.17, -35.699, 1.056)
pt3dadd(-54.135, 214.235, -35.7, 0.986)
pt3dadd(-54.236, 214.3, -35.7, 0.916)
pt3dadd(-54.349, 214.324, -35.68, 0.846)
pt3dadd(-54.464, 214.328, -35.655, 0.804)
pt3dadd(-54.579, 214.316, -35.628, 0.804)
pt3dadd(-54.694, 214.303, -35.6, 0.804)
pt3dadd(-54.813, 214.291, -35.6, 0.82)
pt3dadd(-54.933, 214.279, -35.6, 0.836)
pt3dadd(-55.052, 214.266, -35.6, 0.854)
pt3dadd(-55.172, 214.274, -35.6, 0.874)
pt3dadd(-55.291, 214.282, -35.6, 0.892)
}
}
proc shape3d_157() {
dend_5[21] { pt3dadd(-55.4, 214.318, -35.6, 0.89)
pt3dadd(-55.49, 214.397, -35.6, 0.854)
pt3dadd(-55.585, 214.47, -35.6, 0.81)
pt3dadd(-55.692, 214.523, -35.6, 0.74)
pt3dadd(-55.79, 214.591, -35.6, 0.67)
pt3dadd(-55.886, 214.663, -35.6, 0.598)
pt3dadd(-55.991, 214.718, -35.6, 0.562)
pt3dadd(-56.101, 214.769, -35.6, 0.538)
pt3dadd(-56.199, 214.812, -35.632, 0.528)
pt3dadd(-56.285, 214.848, -35.694, 0.528)
pt3dadd(-56.343, 214.868, -35.777, 0.554)
pt3dadd(-56.39, 214.883, -35.869, 0.59)
pt3dadd(-56.441, 214.943, -35.937, 0.658)
pt3dadd(-56.511, 215.008, -35.993, 0.722)
pt3dadd(-56.6, 215.051, -36.049, 0.766)
pt3dadd(-56.689, 215.093, -36.106, 0.808)
pt3dadd(-56.778, 215.137, -36.163, 0.85)
pt3dadd(-56.87, 215.177, -36.216, 0.896)
pt3dadd(-56.97, 215.214, -36.264, 0.942)
pt3dadd(-57.068, 215.251, -36.311, 0.99)
pt3dadd(-57.167, 215.29, -36.358, 1.038)
pt3dadd(-57.267, 215.328, -36.403, 1.084)
pt3dadd(-57.374, 215.376, -36.425, 1.124)
pt3dadd(-57.48, 215.424, -36.447, 1.162)
pt3dadd(-57.587, 215.473, -36.469, 1.202)
pt3dadd(-57.693, 215.521, -36.492, 1.24)
pt3dadd(-57.805, 215.561, -36.5, 1.262)
pt3dadd(-57.92, 215.596, -36.5, 1.274)
pt3dadd(-58.02, 215.651, -36.5, 1.28)
pt3dadd(-58.092, 215.747, -36.5, 1.28)
pt3dadd(-58.167, 215.839, -36.5, 1.28)
pt3dadd(-58.273, 215.896, -36.5, 1.28)
pt3dadd(-58.379, 215.953, -36.5, 1.28)
pt3dadd(-58.498, 215.947, -36.5, 1.298)
pt3dadd(-58.618, 215.939, -36.5, 1.316)
pt3dadd(-58.736, 215.93, -36.505, 1.33)
pt3dadd(-58.835, 215.92, -36.56, 1.33)
pt3dadd(-58.934, 215.909, -36.616, 1.33)
pt3dadd(-59.034, 215.899, -36.671, 1.33)
pt3dadd(-59.13, 215.888, -36.73, 1.32)
pt3dadd(-59.223, 215.879, -36.792, 1.296)
pt3dadd(-59.298, 215.878, -36.866, 1.268)
pt3dadd(-59.35, 215.914, -36.949, 1.26)
pt3dadd(-59.409, 215.962, -37.026, 1.266)
pt3dadd(-59.469, 216.01, -37.103, 1.272)
pt3dadd(-59.528, 216.058, -37.18, 1.278)
pt3dadd(-59.598, 216.092, -37.254, 1.284)
pt3dadd(-59.68, 216.112, -37.325, 1.29)
pt3dadd(-59.762, 216.131, -37.397, 1.294)
pt3dadd(-59.844, 216.15, -37.468, 1.3)
pt3dadd(-59.922, 216.168, -37.541, 1.306)
pt3dadd(-59.954, 216.164, -37.638, 1.298)
pt3dadd(-59.987, 216.161, -37.734, 1.296)
pt3dadd(-60.033, 216.156, -37.825, 1.328)
pt3dadd(-60.066, 216.154, -37.921, 1.356)
pt3dadd(-60.086, 216.175, -38.018, 1.346)
pt3dadd(-60.126, 216.24, -38.089, 1.256)
pt3dadd(-60.196, 216.335, -38.1, 1.11)
pt3dadd(-60.264, 216.433, -38.09, 1.01)
pt3dadd(-60.34, 216.509, -38.047, 0.94)
pt3dadd(-60.43, 216.569, -38.033, 0.908)
pt3dadd(-60.535, 216.605, -38.071, 0.922)
pt3dadd(-60.632, 216.653, -38.113, 0.936)
pt3dadd(-60.722, 216.712, -38.157, 0.952)
pt3dadd(-60.802, 216.775, -38.21, 1.006)
pt3dadd(-60.885, 216.839, -38.259, 1.012)
pt3dadd(-60.968, 216.902, -38.309, 1.018)
pt3dadd(-61.05, 216.966, -38.358, 1.024)
pt3dadd(-61.127, 217.034, -38.408, 1.032)
pt3dadd(-61.167, 217.128, -38.461, 1.042)
pt3dadd(-61.207, 217.22, -38.514, 1.054)
pt3dadd(-61.248, 217.314, -38.567, 1.066)
pt3dadd(-61.288, 217.408, -38.62, 1.076)
pt3dadd(-61.35, 217.483, -38.676, 1.09)
pt3dadd(-61.419, 217.554, -38.734, 1.104)
pt3dadd(-61.455, 217.628, -38.806, 1.092)
pt3dadd(-61.502, 217.699, -38.87, 1.074)
pt3dadd(-61.61, 217.744, -38.893, 1.036)
pt3dadd(-61.719, 217.776, -38.918, 0.998)
pt3dadd(-61.832, 217.771, -38.953, 0.964)
pt3dadd(-61.944, 217.765, -38.987, 0.93)
pt3dadd(-62.04, 217.694, -38.994, 0.93)
pt3dadd(-62.134, 217.621, -38.999, 0.93)
pt3dadd(-62.165, 217.508, -39, 0.926)
pt3dadd(-62.191, 217.391, -39, 0.848)
pt3dadd(-62.223, 217.277, -39, 0.732)
pt3dadd(-62.244, 217.159, -39, 0.682)
pt3dadd(-62.291, 217.054, -39, 0.678)
pt3dadd(-62.405, 217.015, -39, 0.678)
pt3dadd(-62.518, 216.978, -39, 0.678)
pt3dadd(-62.627, 216.926, -39, 0.678)
pt3dadd(-62.732, 216.869, -39, 0.678)
pt3dadd(-62.824, 216.798, -39, 0.672)
pt3dadd(-62.889, 216.697, -39, 0.654)
pt3dadd(-62.898, 216.578, -39, 0.628)
pt3dadd(-62.885, 216.46, -39, 0.606)
pt3dadd(-62.873, 216.34, -39, 0.628)
}
dend_5[22] {pt3dclear()
pt3dadd(7.703, 205.47, -19.2, 1.206)
pt3dadd(7.682, 205.448, -19.204, 1.192)
pt3dadd(7.599, 205.366, -19.219, 1.136)
pt3dadd(7.515, 205.28, -19.235, 1.082)
pt3dadd(7.432, 205.196, -19.25, 1.026)
pt3dadd(7.349, 205.112, -19.266, 0.97)
pt3dadd(7.265, 205.027, -19.281, 0.916)
pt3dadd(7.182, 204.944, -19.297, 0.86)
pt3dadd(7.099, 204.859, -19.312, 0.806)
pt3dadd(7.015, 204.775, -19.327, 0.75)
pt3dadd(6.932, 204.691, -19.343, 0.696)
pt3dadd(6.848, 204.606, -19.358, 0.64)
pt3dadd(6.765, 204.522, -19.374, 0.584)
pt3dadd(6.682, 204.438, -19.389, 0.53)
pt3dadd(6.598, 204.354, -19.405, 0.474)
pt3dadd(6.563, 204.328, -19.47, 0.534)
pt3dadd(6.553, 204.331, -19.569, 0.616)
pt3dadd(6.524, 204.328, -19.666, 0.602)
pt3dadd(6.47, 204.323, -19.755, 0.51)
pt3dadd(6.415, 204.307, -19.842, 0.478)
pt3dadd(6.337, 204.248, -19.893, 0.512)
pt3dadd(6.256, 204.161, -19.9, 0.506)
pt3dadd(6.174, 204.079, -19.92, 0.488)
pt3dadd(6.075, 204.041, -19.965, 0.572)
pt3dadd(5.971, 203.983, -19.973, 0.596)
pt3dadd(5.867, 203.924, -19.979, 0.616)
pt3dadd(5.762, 203.867, -19.986, 0.636)
pt3dadd(5.657, 203.809, -19.993, 0.656)
pt3dadd(5.553, 203.749, -19.999, 0.676)
pt3dadd(5.465, 203.671, -20.017, 0.682)
pt3dadd(5.381, 203.59, -20.037, 0.688)
pt3dadd(5.296, 203.509, -20.057, 0.694)
pt3dadd(5.211, 203.428, -20.077, 0.7)
pt3dadd(5.12, 203.352, -20.091, 0.704)
pt3dadd(5.02, 203.286, -20.096, 0.704)
pt3dadd(4.916, 203.227, -20.1, 0.7)
pt3dadd(4.801, 203.195, -20.1, 0.69)
pt3dadd(4.686, 203.162, -20.1, 0.682)
pt3dadd(4.604, 203.092, -20.126, 0.668)
pt3dadd(4.538, 203.002, -20.163, 0.654)
pt3dadd(4.502, 202.898, -20.204, 0.64)
pt3dadd(4.469, 202.798, -20.248, 0.628)
pt3dadd(4.414, 202.783, -20.335, 0.61)
pt3dadd(4.365, 202.732, -20.413, 0.602)
pt3dadd(4.321, 202.663, -20.486, 0.602)
pt3dadd(4.276, 202.594, -20.559, 0.602)
pt3dadd(4.231, 202.524, -20.631, 0.602)
pt3dadd(4.182, 202.46, -20.705, 0.596)
pt3dadd(4.128, 202.402, -20.779, 0.582)
pt3dadd(4.041, 202.363, -20.837, 0.578)
pt3dadd(3.942, 202.332, -20.887, 0.578)
pt3dadd(3.834, 202.291, -20.9, 0.594)
pt3dadd(3.723, 202.247, -20.9, 0.614)
pt3dadd(3.609, 202.211, -20.9, 0.642)
pt3dadd(3.49, 202.193, -20.9, 0.686)
pt3dadd(3.372, 202.176, -20.9, 0.728)
pt3dadd(3.258, 202.142, -20.9, 0.782)
pt3dadd(3.152, 202.087, -20.9, 0.846)
pt3dadd(3.036, 202.057, -20.9, 0.87)
pt3dadd(2.919, 202.031, -20.9, 0.89)
pt3dadd(2.801, 202.007, -20.9, 0.902)
pt3dadd(2.682, 201.994, -20.9, 0.894)
pt3dadd(2.563, 201.982, -20.9, 0.886)
pt3dadd(2.443, 201.968, -20.901, 0.876)
pt3dadd(2.324, 201.956, -20.905, 0.858)
pt3dadd(2.205, 201.943, -20.908, 0.84)
pt3dadd(2.099, 201.912, -20.925, 0.816)
pt3dadd(2.023, 201.835, -20.969, 0.772)
pt3dadd(1.954, 201.745, -20.993, 0.746)
pt3dadd(1.89, 201.644, -20.999, 0.73)
pt3dadd(1.826, 201.542, -21.005, 0.716)
pt3dadd(1.765, 201.452, -21.024, 0.704)
pt3dadd(1.722, 201.428, -21.115, 0.704)
pt3dadd(1.682, 201.406, -21.207, 0.706)
pt3dadd(1.68, 201.402, -21.306, 0.754)
pt3dadd(1.646, 201.354, -21.393, 0.766)
pt3dadd(1.612, 201.306, -21.48, 0.776)
pt3dadd(1.579, 201.257, -21.567, 0.788)
pt3dadd(1.545, 201.208, -21.654, 0.8)
pt3dadd(1.494, 201.178, -21.739, 0.804)
pt3dadd(1.431, 201.16, -21.823, 0.804)
pt3dadd(1.368, 201.143, -21.907, 0.804)
pt3dadd(1.305, 201.125, -21.991, 0.804)
pt3dadd(1.242, 201.108, -22.074, 0.804)
pt3dadd(1.15, 201.054, -22.113, 0.792)
pt3dadd(1.051, 200.996, -22.142, 0.78)
pt3dadd(0.992, 200.978, -22.224, 0.768)
pt3dadd(0.937, 200.966, -22.312, 0.756)
pt3dadd(0.883, 200.96, -22.402, 0.762)
pt3dadd(0.83, 200.954, -22.491, 0.774)
pt3dadd(0.797, 200.951, -22.586, 0.784)
pt3dadd(0.782, 200.95, -22.685, 0.792)
pt3dadd(0.767, 200.948, -22.784, 0.802)
pt3dadd(0.718, 200.947, -22.874, 0.824)
pt3dadd(0.661, 200.947, -22.962, 0.846)
pt3dadd(0.57, 200.984, -23, 0.852)
pt3dadd(0.493, 201.074, -23, 0.796)
pt3dadd(0.416, 201.167, -23, 0.712)
pt3dadd(0.332, 201.252, -23, 0.704)
pt3dadd(0.245, 201.335, -23, 0.708)
pt3dadd(0.155, 201.413, -23, 0.72)
pt3dadd(0.059, 201.466, -22.985, 0.724)
pt3dadd(-0.047, 201.461, -22.938, 0.712)
}
}
proc shape3d_158() {
dend_5[22] { pt3dadd(-0.149, 201.452, -22.888, 0.706)
pt3dadd(-0.237, 201.433, -22.822, 0.726)
pt3dadd(-0.323, 201.366, -22.797, 0.742)
pt3dadd(-0.351, 201.26, -22.763, 0.838)
pt3dadd(-0.346, 201.185, -22.686, 0.97)
pt3dadd(-0.34, 201.131, -22.597, 1.016)
pt3dadd(-0.333, 201.064, -22.515, 0.974)
pt3dadd(-0.325, 200.989, -22.437, 0.926)
pt3dadd(-0.319, 200.897, -22.379, 0.874)
pt3dadd(-0.313, 200.788, -22.338, 0.816)
pt3dadd(-0.335, 200.682, -22.309, 0.77)
pt3dadd(-0.411, 200.59, -22.304, 0.746)
pt3dadd(-0.487, 200.497, -22.3, 0.732)
pt3dadd(-0.566, 200.407, -22.3, 0.744)
pt3dadd(-0.65, 200.323, -22.3, 0.758)
pt3dadd(-0.762, 200.279, -22.3, 0.79)
pt3dadd(-0.876, 200.246, -22.3, 0.804)
pt3dadd(-0.994, 200.224, -22.3, 0.804)
pt3dadd(-1.112, 200.2, -22.3, 0.804)
pt3dadd(-1.23, 200.177, -22.3, 0.804)
pt3dadd(-1.347, 200.154, -22.3, 0.804)
pt3dadd(-1.465, 200.13, -22.3, 0.804)
pt3dadd(-1.58, 200.129, -22.3, 0.796)
pt3dadd(-1.69, 200.179, -22.3, 0.774)
pt3dadd(-1.8, 200.227, -22.3, 0.752)
pt3dadd(-1.916, 200.255, -22.3, 0.742)
pt3dadd(-2.033, 200.282, -22.3, 0.73)
pt3dadd(-2.152, 200.275, -22.3, 0.734)
pt3dadd(-2.27, 200.258, -22.3, 0.744)
pt3dadd(-2.389, 200.242, -22.3, 0.752)
pt3dadd(-2.484, 200.172, -22.3, 0.794)
pt3dadd(-2.576, 200.094, -22.3, 0.84)
pt3dadd(-2.64, 199.994, -22.3, 0.902)
pt3dadd(-2.705, 199.901, -22.306, 0.96)
pt3dadd(-2.809, 199.847, -22.33, 0.982)
pt3dadd(-2.912, 199.794, -22.354, 1.002)
pt3dadd(-3.016, 199.741, -22.377, 1.024)
pt3dadd(-3.119, 199.686, -22.401, 1.046)
pt3dadd(-3.195, 199.608, -22.432, 1.102)
pt3dadd(-3.264, 199.564, -22.504, 1.076)
pt3dadd(-3.354, 199.549, -22.568, 0.95)
pt3dadd(-3.459, 199.532, -22.614, 0.8)
pt3dadd(-3.548, 199.487, -22.667, 0.624)
pt3dadd(-3.624, 199.412, -22.649, 0.552)
pt3dadd(-3.68, 199.394, -22.562, 0.524)
pt3dadd(-3.737, 199.374, -22.476, 0.4)
pt3dadd(-3.798, 199.312, -22.409, 0.37)
pt3dadd(-3.879, 199.255, -22.353, 0.448)
pt3dadd(-3.973, 199.204, -22.311, 0.528)
pt3dadd(-4.059, 199.134, -22.336, 0.64)
pt3dadd(-4.098, 199.106, -22.425, 0.678)
pt3dadd(-4.113, 199.081, -22.521, 0.678)
pt3dadd(-4.143, 199.022, -22.602, 0.678)
pt3dadd(-4.227, 198.968, -22.657, 0.678)
pt3dadd(-4.324, 198.913, -22.692, 0.678)
pt3dadd(-4.425, 198.853, -22.692, 0.678)
pt3dadd(-4.518, 198.823, -22.641, 0.678)
pt3dadd(-4.555, 198.812, -22.548, 0.678)
pt3dadd(-4.57, 198.782, -22.452, 0.678)
pt3dadd(-4.63, 198.704, -22.444, 0.678)
pt3dadd(-4.66, 198.689, -22.539, 0.638)
pt3dadd(-4.668, 198.682, -22.638, 0.57)
pt3dadd(-4.666, 198.659, -22.736, 0.496)
pt3dadd(-4.674, 198.605, -22.824, 0.452)
pt3dadd(-4.72, 198.568, -22.91, 0.438)
pt3dadd(-4.76, 198.557, -23.003, 0.404)
pt3dadd(-4.811, 198.524, -23.088, 0.396)
pt3dadd(-4.864, 198.488, -23.173, 0.39)
pt3dadd(-4.918, 198.454, -23.258, 0.386)
pt3dadd(-4.971, 198.418, -23.342, 0.38)
pt3dadd(-5.02, 198.382, -23.428, 0.38)
pt3dadd(-5.063, 198.344, -23.516, 0.384)
pt3dadd(-5.106, 198.307, -23.604, 0.39)
pt3dadd(-5.15, 198.27, -23.692, 0.396)
pt3dadd(-5.193, 198.234, -23.78, 0.402)
pt3dadd(-5.271, 198.168, -23.828, 0.478)
pt3dadd(-5.321, 198.136, -23.91, 0.552)
pt3dadd(-5.336, 198.114, -24.007, 0.584)
pt3dadd(-5.36, 198.049, -24.083, 0.582)
pt3dadd(-5.418, 197.948, -24.077, 0.552)
pt3dadd(-5.48, 197.888, -24.013, 0.614)
pt3dadd(-5.567, 197.869, -23.947, 0.67)
pt3dadd(-5.671, 197.858, -23.898, 0.704)
pt3dadd(-5.758, 197.849, -23.83, 0.74)
pt3dadd(-5.816, 197.839, -23.744, 0.746)
pt3dadd(-5.864, 197.828, -23.653, 0.734)
pt3dadd(-5.891, 197.791, -23.566, 0.728)
pt3dadd(-5.89, 197.72, -23.486, 0.728)
pt3dadd(-5.886, 197.633, -23.43, 0.728)
pt3dadd(-5.877, 197.513, -23.421, 0.728)
pt3dadd(-5.869, 197.394, -23.411, 0.728)
pt3dadd(-5.86, 197.275, -23.402, 0.728)
pt3dadd(-5.885, 197.16, -23.4, 0.736)
pt3dadd(-5.92, 197.044, -23.4, 0.748)
pt3dadd(-5.981, 196.946, -23.4, 0.754)
pt3dadd(-6.071, 196.867, -23.4, 0.754)
pt3dadd(-6.16, 196.787, -23.4, 0.754)
pt3dadd(-6.257, 196.716, -23.4, 0.76)
pt3dadd(-6.358, 196.652, -23.4, 0.772)
pt3dadd(-6.463, 196.596, -23.4, 0.826)
pt3dadd(-6.579, 196.567, -23.4, 0.914)
pt3dadd(-6.698, 196.549, -23.4, 0.974)
pt3dadd(-6.817, 196.532, -23.4, 1.036)
pt3dadd(-6.928, 196.492, -23.4, 1.112)
pt3dadd(-7.037, 196.44, -23.4, 1.198)
pt3dadd(-7.136, 196.376, -23.4, 1.268)
pt3dadd(-7.215, 196.286, -23.4, 1.302)
pt3dadd(-7.293, 196.195, -23.4, 1.324)
pt3dadd(-7.364, 196.099, -23.4, 1.288)
pt3dadd(-7.438, 196.004, -23.401, 1.252)
pt3dadd(-7.529, 195.928, -23.411, 1.2)
pt3dadd(-7.62, 195.851, -23.42, 1.148)
pt3dadd(-7.711, 195.773, -23.43, 1.096)
pt3dadd(-7.808, 195.728, -23.469, 1.036)
pt3dadd(-7.907, 195.698, -23.52, 0.972)
pt3dadd(-8.011, 195.682, -23.566, 0.88)
pt3dadd(-8.126, 195.662, -23.588, 0.87)
pt3dadd(-8.242, 195.643, -23.61, 0.862)
pt3dadd(-8.357, 195.623, -23.632, 0.852)
pt3dadd(-8.473, 195.604, -23.654, 0.844)
pt3dadd(-8.589, 195.586, -23.676, 0.834)
pt3dadd(-8.703, 195.563, -23.697, 0.822)
pt3dadd(-8.818, 195.536, -23.718, 0.802)
pt3dadd(-8.932, 195.509, -23.738, 0.784)
pt3dadd(-9.046, 195.482, -23.759, 0.766)
pt3dadd(-9.16, 195.455, -23.78, 0.746)
pt3dadd(-9.275, 195.427, -23.8, 0.728)
pt3dadd(-9.381, 195.371, -23.8, 0.714)
pt3dadd(-9.487, 195.316, -23.8, 0.7)
pt3dadd(-9.593, 195.259, -23.8, 0.686)
pt3dadd(-9.699, 195.204, -23.8, 0.672)
pt3dadd(-9.805, 195.148, -23.8, 0.658)
pt3dadd(-9.918, 195.107, -23.8, 0.648)
pt3dadd(-10.033, 195.074, -23.8, 0.64)
pt3dadd(-10.149, 195.043, -23.8, 0.632)
pt3dadd(-10.264, 195.011, -23.8, 0.624)
pt3dadd(-10.38, 194.978, -23.8, 0.614)
pt3dadd(-10.496, 194.946, -23.8, 0.606)
pt3dadd(-10.613, 194.923, -23.8, 0.608)
pt3dadd(-10.732, 194.905, -23.8, 0.616)
pt3dadd(-10.851, 194.888, -23.8, 0.624)
pt3dadd(-10.963, 194.849, -23.8, 0.648)
pt3dadd(-11.071, 194.797, -23.8, 0.68)
pt3dadd(-11.181, 194.749, -23.8, 0.716)
pt3dadd(-11.295, 194.712, -23.8, 0.756)
pt3dadd(-11.409, 194.674, -23.8, 0.796)
pt3dadd(-11.472, 194.579, -23.8, 0.83)
pt3dadd(-11.521, 194.471, -23.8, 0.866)
pt3dadd(-11.573, 194.362, -23.8, 0.858)
pt3dadd(-11.633, 194.262, -23.803, 0.826)
pt3dadd(-11.74, 194.212, -23.824, 0.804)
pt3dadd(-11.846, 194.162, -23.845, 0.784)
pt3dadd(-11.952, 194.112, -23.865, 0.762)
pt3dadd(-12.058, 194.063, -23.886, 0.742)
pt3dadd(-12.167, 194.017, -23.906, 0.722)
pt3dadd(-12.28, 193.986, -23.925, 0.702)
pt3dadd(-12.393, 193.954, -23.944, 0.684)
pt3dadd(-12.507, 193.921, -23.963, 0.664)
pt3dadd(-12.62, 193.889, -23.982, 0.646)
pt3dadd(-12.733, 193.855, -24, 0.628)
pt3dadd(-12.839, 193.8, -24, 0.628)
pt3dadd(-12.945, 193.744, -24, 0.628)
pt3dadd(-13.052, 193.688, -24, 0.628)
pt3dadd(-13.158, 193.632, -24, 0.628)
pt3dadd(-13.264, 193.577, -24, 0.628)
pt3dadd(-13.37, 193.519, -24, 0.634)
pt3dadd(-13.476, 193.464, -24, 0.644)
pt3dadd(-13.582, 193.408, -24, 0.652)
pt3dadd(-13.688, 193.352, -24, 0.662)
pt3dadd(-13.795, 193.296, -24, 0.672)
pt3dadd(-13.902, 193.243, -24, 0.69)
pt3dadd(-14.013, 193.199, -24, 0.73)
pt3dadd(-14.124, 193.153, -24, 0.772)
pt3dadd(-14.234, 193.103, -24, 0.832)
pt3dadd(-14.342, 193.052, -24, 0.896)
pt3dadd(-14.426, 192.976, -24.009, 0.968)
pt3dadd(-14.484, 192.872, -24.026, 1.046)
pt3dadd(-14.549, 192.788, -24.065, 1.096)
pt3dadd(-14.618, 192.72, -24.122, 1.124)
pt3dadd(-14.716, 192.69, -24.172, 1.086)
pt3dadd(-14.822, 192.664, -24.209, 1.042)
pt3dadd(-14.934, 192.628, -24.231, 1.012)
pt3dadd(-15.046, 192.593, -24.252, 0.984)
pt3dadd(-15.157, 192.557, -24.274, 0.954)
pt3dadd(-15.269, 192.522, -24.296, 0.924)
pt3dadd(-15.375, 192.486, -24.328, 0.898)
pt3dadd(-15.468, 192.45, -24.383, 0.882)
pt3dadd(-15.561, 192.412, -24.438, 0.864)
pt3dadd(-15.654, 192.374, -24.494, 0.848)
pt3dadd(-15.747, 192.338, -24.549, 0.83)
pt3dadd(-15.843, 192.272, -24.566, 0.82)
pt3dadd(-15.94, 192.203, -24.577, 0.808)
pt3dadd(-16.037, 192.134, -24.589, 0.798)
pt3dadd(-16.134, 192.065, -24.601, 0.788)
pt3dadd(-16.228, 191.994, -24.616, 0.778)
pt3dadd(-16.294, 191.909, -24.659, 0.778)
pt3dadd(-16.36, 191.822, -24.703, 0.778)
pt3dadd(-16.426, 191.737, -24.746, 0.778)
pt3dadd(-16.492, 191.652, -24.789, 0.778)
pt3dadd(-16.57, 191.567, -24.815, 0.766)
}
}
proc shape3d_159() {
dend_5[22] { pt3dadd(-16.648, 191.479, -24.841, 0.754)
pt3dadd(-16.726, 191.394, -24.866, 0.744)
pt3dadd(-16.804, 191.308, -24.892, 0.732)
pt3dadd(-16.893, 191.234, -24.916, 0.724)
pt3dadd(-16.987, 191.164, -24.938, 0.718)
pt3dadd(-17.082, 191.095, -24.96, 0.714)
pt3dadd(-17.176, 191.024, -24.982, 0.708)
pt3dadd(-17.274, 190.961, -25, 0.704)
pt3dadd(-17.387, 190.922, -25, 0.704)
pt3dadd(-17.5, 190.883, -25, 0.704)
pt3dadd(-17.614, 190.843, -25, 0.704)
pt3dadd(-17.727, 190.804, -25, 0.704)
pt3dadd(-17.84, 190.764, -25, 0.704)
pt3dadd(-17.947, 190.712, -25, 0.708)
pt3dadd(-18.042, 190.639, -25, 0.724)
pt3dadd(-18.137, 190.566, -25, 0.738)
pt3dadd(-18.232, 190.493, -25, 0.754)
pt3dadd(-18.327, 190.418, -25, 0.768)
pt3dadd(-18.425, 190.35, -25, 0.786)
pt3dadd(-18.531, 190.295, -25, 0.808)
pt3dadd(-18.637, 190.238, -25, 0.832)
pt3dadd(-18.743, 190.183, -25, 0.856)
pt3dadd(-18.85, 190.127, -25, 0.878)
pt3dadd(-18.956, 190.072, -25, 0.902)
pt3dadd(-19.031, 189.978, -25, 0.968)
pt3dadd(-19.102, 189.882, -25, 1.04)
pt3dadd(-19.18, 189.791, -25, 1.092)
pt3dadd(-19.259, 189.701, -25, 1.14)
pt3dadd(-19.353, 189.628, -25, 1.17)
pt3dadd(-19.454, 189.563, -25, 1.192)
pt3dadd(-19.558, 189.505, -25.007, 1.19)
pt3dadd(-19.666, 189.455, -25.022, 1.156)
pt3dadd(-19.771, 189.409, -25.046, 1.096)
pt3dadd(-19.871, 189.367, -25.089, 0.98)
pt3dadd(-19.987, 189.355, -25.112, 0.958)
pt3dadd(-20.104, 189.343, -25.135, 0.936)
pt3dadd(-20.22, 189.33, -25.158, 0.914)
pt3dadd(-20.336, 189.318, -25.181, 0.894)
pt3dadd(-20.452, 189.306, -25.203, 0.872)
pt3dadd(-20.569, 189.294, -25.224, 0.852)
pt3dadd(-20.687, 189.281, -25.237, 0.844)
pt3dadd(-20.806, 189.269, -25.249, 0.836)
pt3dadd(-20.924, 189.257, -25.262, 0.828)
pt3dadd(-21.042, 189.244, -25.274, 0.82)
pt3dadd(-21.161, 189.232, -25.287, 0.812)
pt3dadd(-21.279, 189.22, -25.299, 0.804)
pt3dadd(-21.398, 189.206, -25.3, 0.806)
pt3dadd(-21.518, 189.194, -25.3, 0.81)
pt3dadd(-21.637, 189.181, -25.3, 0.814)
pt3dadd(-21.756, 189.169, -25.3, 0.818)
pt3dadd(-21.876, 189.156, -25.3, 0.822)
pt3dadd(-21.995, 189.144, -25.3, 0.824)
pt3dadd(-22.114, 189.131, -25.3, 0.828)
pt3dadd(-22.232, 189.119, -25.315, 0.818)
pt3dadd(-22.35, 189.107, -25.331, 0.806)
pt3dadd(-22.468, 189.095, -25.348, 0.792)
pt3dadd(-22.586, 189.082, -25.364, 0.78)
pt3dadd(-22.703, 189.07, -25.381, 0.768)
pt3dadd(-22.821, 189.058, -25.397, 0.756)
pt3dadd(-22.939, 189.044, -25.414, 0.746)
pt3dadd(-23.056, 189.032, -25.43, 0.738)
pt3dadd(-23.174, 189.02, -25.446, 0.73)
pt3dadd(-23.292, 189.007, -25.463, 0.722)
pt3dadd(-23.41, 188.995, -25.479, 0.714)
pt3dadd(-23.527, 188.983, -25.496, 0.706)
pt3dadd(-23.628, 188.972, -25.545, 0.7)
pt3dadd(-23.724, 188.962, -25.605, 0.694)
pt3dadd(-23.819, 188.952, -25.665, 0.69)
pt3dadd(-23.915, 188.942, -25.725, 0.684)
pt3dadd(-24.01, 188.932, -25.785, 0.68)
pt3dadd(-24.093, 188.905, -25.852, 0.682)
pt3dadd(-24.172, 188.873, -25.923, 0.688)
pt3dadd(-24.251, 188.84, -25.993, 0.694)
pt3dadd(-24.329, 188.807, -26.064, 0.7)
pt3dadd(-24.418, 188.78, -26.124, 0.7)
pt3dadd(-24.528, 188.767, -26.161, 0.69)
pt3dadd(-24.639, 188.753, -26.199, 0.68)
pt3dadd(-24.749, 188.738, -26.237, 0.672)
pt3dadd(-24.859, 188.725, -26.275, 0.662)
pt3dadd(-24.967, 188.711, -26.315, 0.65)
pt3dadd(-25.035, 188.704, -26.398, 0.604)
pt3dadd(-25.102, 188.696, -26.48, 0.558)
pt3dadd(-25.201, 188.687, -26.534, 0.532)
pt3dadd(-25.304, 188.676, -26.585, 0.508)
pt3dadd(-25.418, 188.664, -26.6, 0.514)
pt3dadd(-25.538, 188.651, -26.6, 0.53)
pt3dadd(-25.657, 188.639, -26.6, 0.548)
pt3dadd(-25.776, 188.626, -26.6, 0.588)
pt3dadd(-25.896, 188.614, -26.6, 0.638)
pt3dadd(-26.015, 188.6, -26.6, 0.688)
pt3dadd(-26.134, 188.588, -26.6, 0.746)
pt3dadd(-26.254, 188.575, -26.6, 0.81)
pt3dadd(-26.373, 188.563, -26.6, 0.834)
pt3dadd(-26.492, 188.55, -26.6, 0.84)
pt3dadd(-26.612, 188.538, -26.6, 0.848)
pt3dadd(-26.731, 188.526, -26.6, 0.856)
pt3dadd(-26.85, 188.513, -26.6, 0.862)
pt3dadd(-26.97, 188.501, -26.6, 0.87)
pt3dadd(-27.089, 188.488, -26.6, 0.876)
pt3dadd(-27.206, 188.462, -26.6, 0.87)
pt3dadd(-27.322, 188.43, -26.6, 0.858)
pt3dadd(-27.437, 188.398, -26.6, 0.846)
pt3dadd(-27.553, 188.365, -26.6, 0.834)
pt3dadd(-27.669, 188.334, -26.6, 0.82)
pt3dadd(-27.784, 188.302, -26.6, 0.808)
pt3dadd(-27.902, 188.281, -26.6, 0.798)
pt3dadd(-28.021, 188.269, -26.6, 0.786)
pt3dadd(-28.141, 188.257, -26.6, 0.776)
pt3dadd(-28.26, 188.244, -26.6, 0.764)
pt3dadd(-28.38, 188.232, -26.6, 0.754)
pt3dadd(-28.499, 188.219, -26.6, 0.744)
pt3dadd(-28.618, 188.207, -26.6, 0.732)
pt3dadd(-28.737, 188.19, -26.6, 0.726)
pt3dadd(-28.856, 188.172, -26.6, 0.722)
pt3dadd(-28.974, 188.153, -26.6, 0.718)
pt3dadd(-29.093, 188.135, -26.6, 0.714)
pt3dadd(-29.211, 188.117, -26.6, 0.71)
pt3dadd(-29.33, 188.098, -26.6, 0.708)
pt3dadd(-29.448, 188.08, -26.6, 0.704)
pt3dadd(-29.564, 188.047, -26.6, 0.706)
pt3dadd(-29.679, 188.011, -26.6, 0.712)
pt3dadd(-29.794, 187.978, -26.6, 0.716)
pt3dadd(-29.909, 187.943, -26.6, 0.72)
pt3dadd(-30.024, 187.909, -26.6, 0.724)
pt3dadd(-30.138, 187.874, -26.6, 0.728)
pt3dadd(-30.216, 187.784, -26.605, 0.74)
pt3dadd(-30.291, 187.691, -26.611, 0.752)
pt3dadd(-30.389, 187.666, -26.659, 0.732)
pt3dadd(-30.489, 187.649, -26.711, 0.708)
pt3dadd(-30.599, 187.637, -26.749, 0.678)
pt3dadd(-30.712, 187.625, -26.782, 0.646)
pt3dadd(-30.828, 187.615, -26.8, 0.624)
pt3dadd(-30.947, 187.606, -26.8, 0.616)
pt3dadd(-31.067, 187.598, -26.8, 0.606)
pt3dadd(-31.185, 187.612, -26.8, 0.63)
pt3dadd(-31.301, 187.643, -26.8, 0.678)
pt3dadd(-31.42, 187.637, -26.8, 0.696)
pt3dadd(-31.54, 187.631, -26.8, 0.716)
pt3dadd(-31.66, 187.624, -26.8, 0.734)
pt3dadd(-31.78, 187.618, -26.8, 0.754)
pt3dadd(-31.9, 187.61, -26.8, 0.772)
pt3dadd(-32.019, 187.604, -26.8, 0.792)
pt3dadd(-32.139, 187.595, -26.8, 0.804)
pt3dadd(-32.258, 187.583, -26.8, 0.808)
pt3dadd(-32.378, 187.57, -26.8, 0.812)
pt3dadd(-32.497, 187.558, -26.8, 0.816)
pt3dadd(-32.616, 187.544, -26.8, 0.82)
pt3dadd(-32.736, 187.532, -26.8, 0.822)
pt3dadd(-32.855, 187.52, -26.8, 0.826)
pt3dadd(-32.973, 187.502, -26.806, 0.826)
pt3dadd(-33.088, 187.476, -26.824, 0.816)
pt3dadd(-33.203, 187.448, -26.843, 0.808)
pt3dadd(-33.318, 187.422, -26.861, 0.798)
pt3dadd(-33.433, 187.396, -26.879, 0.788)
pt3dadd(-33.547, 187.369, -26.898, 0.78)
pt3dadd(-33.664, 187.34, -26.9, 0.746)
pt3dadd(-33.781, 187.314, -26.9, 0.708)
pt3dadd(-33.898, 187.29, -26.9, 0.674)
pt3dadd(-34.018, 187.277, -26.9, 0.648)
pt3dadd(-34.137, 187.265, -26.9, 0.624)
pt3dadd(-34.253, 187.252, -26.909, 0.594)
pt3dadd(-34.356, 187.241, -26.959, 0.548)
pt3dadd(-34.459, 187.23, -27.01, 0.504)
pt3dadd(-34.502, 187.232, -27.103, 0.458)
pt3dadd(-34.544, 187.234, -27.197, 0.414)
pt3dadd(-34.624, 187.252, -27.264, 0.378)
pt3dadd(-34.719, 187.277, -27.323, 0.346)
pt3dadd(-34.813, 187.302, -27.381, 0.312)
pt3dadd(-34.911, 187.334, -27.433, 0.282)
pt3dadd(-35.01, 187.367, -27.481, 0.256)
pt3dadd(-35.123, 187.391, -27.5, 0.252)
pt3dadd(-35.243, 187.399, -27.5, 0.256)
pt3dadd(-35.363, 187.406, -27.5, 0.26)
pt3dadd(-35.483, 187.412, -27.5, 0.264)
pt3dadd(-35.603, 187.421, -27.5, 0.268)
pt3dadd(-35.722, 187.427, -27.5, 0.272)
pt3dadd(-35.842, 187.434, -27.499, 0.276)
pt3dadd(-35.957, 187.427, -27.47, 0.286)
pt3dadd(-36.071, 187.42, -27.442, 0.294)
pt3dadd(-36.186, 187.412, -27.413, 0.304)
pt3dadd(-36.301, 187.405, -27.384, 0.314)
pt3dadd(-36.416, 187.398, -27.356, 0.322)
pt3dadd(-36.533, 187.399, -27.34, 0.33)
pt3dadd(-36.653, 187.405, -27.332, 0.334)
pt3dadd(-36.772, 187.411, -27.324, 0.338)
pt3dadd(-36.892, 187.417, -27.317, 0.342)
pt3dadd(-37.011, 187.423, -27.309, 0.346)
pt3dadd(-37.131, 187.43, -27.301, 0.35)
pt3dadd(-37.244, 187.421, -27.271, 0.364)
pt3dadd(-37.356, 187.409, -27.236, 0.378)
pt3dadd(-37.468, 187.397, -27.202, 0.39)
pt3dadd(-37.58, 187.385, -27.167, 0.404)
pt3dadd(-37.692, 187.374, -27.132, 0.418)
pt3dadd(-37.806, 187.361, -27.108, 0.432)
pt3dadd(-37.926, 187.349, -27.102, 0.448)
pt3dadd(-38.045, 187.337, -27.095, 0.462)
pt3dadd(-38.164, 187.324, -27.089, 0.476)
pt3dadd(-38.283, 187.312, -27.083, 0.492)
pt3dadd(-38.39, 187.286, -27.094, 0.518)
pt3dadd(-38.466, 187.229, -27.155, 0.58)
}
}
proc shape3d_160() {
dend_5[22] { pt3dadd(-38.56, 187.188, -27.151, 0.62)
pt3dadd(-38.664, 187.156, -27.11, 0.646)
pt3dadd(-38.773, 187.139, -27.07, 0.662)
pt3dadd(-38.883, 187.128, -27.031, 0.672)
pt3dadd(-38.99, 187.116, -27.034, 0.678)
pt3dadd(-39.094, 187.105, -27.083, 0.678)
pt3dadd(-39.154, 187.106, -27.154, 0.674)
pt3dadd(-39.155, 187.122, -27.253, 0.664)
pt3dadd(-39.157, 187.139, -27.352, 0.654)
pt3dadd(-39.118, 187.234, -27.395, 0.508)
pt3dadd(-39.088, 187.349, -27.4, 0.342)
pt3dadd(-39.084, 187.469, -27.4, 0.252)
pt3dadd(-39.097, 187.588, -27.4, 0.226)
pt3dadd(-39.11, 187.708, -27.4, 0.226)
}
dend_5[23] {pt3dclear()
pt3dadd(40.157, 182.041, -14.4, 1.18)
pt3dadd(40.193, 182.036, -14.422, 1.188)
pt3dadd(40.29, 182.021, -14.479, 1.21)
pt3dadd(40.387, 182.005, -14.537, 1.23)
pt3dadd(40.483, 181.991, -14.595, 1.252)
pt3dadd(40.58, 181.975, -14.653, 1.272)
pt3dadd(40.677, 181.96, -14.711, 1.294)
pt3dadd(40.773, 181.945, -14.769, 1.314)
pt3dadd(40.87, 181.93, -14.826, 1.336)
pt3dadd(40.967, 181.914, -14.884, 1.358)
pt3dadd(41.064, 181.9, -14.942, 1.378)
pt3dadd(41.16, 181.884, -15, 1.4)
pt3dadd(41.257, 181.868, -15.058, 1.42)
pt3dadd(41.354, 181.854, -15.115, 1.442)
pt3dadd(41.451, 181.838, -15.173, 1.462)
pt3dadd(41.547, 181.823, -15.231, 1.484)
pt3dadd(41.644, 181.808, -15.289, 1.504)
pt3dadd(41.741, 181.793, -15.347, 1.526)
pt3dadd(41.837, 181.778, -15.405, 1.548)
pt3dadd(41.934, 181.763, -15.462, 1.568)
pt3dadd(41.993, 181.79, -15.513, 1.604)
pt3dadd(41.982, 181.902, -15.55, 1.67)
pt3dadd(41.97, 182.012, -15.587, 1.736)
pt3dadd(41.958, 182.124, -15.624, 1.8)
pt3dadd(41.947, 182.234, -15.662, 1.866)
pt3dadd(41.935, 182.346, -15.699, 1.932)
pt3dadd(41.922, 182.464, -15.7, 1.974)
pt3dadd(41.91, 182.584, -15.7, 2.016)
pt3dadd(41.897, 182.702, -15.7, 2.058)
pt3dadd(41.885, 182.821, -15.704, 2.06)
pt3dadd(41.872, 182.941, -15.707, 2.06)
pt3dadd(41.86, 183.059, -15.715, 2.056)
pt3dadd(41.849, 183.162, -15.765, 2.022)
pt3dadd(41.838, 183.265, -15.816, 1.988)
pt3dadd(41.828, 183.364, -15.872, 1.954)
pt3dadd(41.817, 183.462, -15.929, 1.918)
pt3dadd(41.809, 183.544, -16.001, 1.922)
pt3dadd(41.8, 183.63, -16.065, 1.94)
pt3dadd(41.788, 183.742, -16.097, 1.958)
pt3dadd(41.776, 183.856, -16.13, 1.976)
pt3dadd(41.764, 183.968, -16.162, 1.994)
pt3dadd(41.753, 184.081, -16.194, 2.012)
pt3dadd(41.741, 184.194, -16.226, 2.03)
pt3dadd(41.73, 184.3, -16.272, 2.034)
pt3dadd(41.719, 184.403, -16.322, 2.034)
pt3dadd(41.708, 184.507, -16.372, 2.034)
pt3dadd(41.697, 184.609, -16.422, 2.034)
pt3dadd(41.686, 184.714, -16.472, 2.034)
pt3dadd(41.674, 184.825, -16.501, 2.012)
pt3dadd(41.662, 184.944, -16.52, 1.978)
pt3dadd(41.649, 185.06, -16.538, 1.944)
pt3dadd(41.637, 185.178, -16.557, 1.912)
pt3dadd(41.625, 185.294, -16.575, 1.878)
pt3dadd(41.613, 185.413, -16.594, 1.844)
pt3dadd(41.6, 185.531, -16.6, 1.792)
pt3dadd(41.588, 185.65, -16.6, 1.732)
pt3dadd(41.575, 185.77, -16.6, 1.67)
pt3dadd(41.562, 185.888, -16.6, 1.61)
pt3dadd(41.55, 186.008, -16.6, 1.548)
pt3dadd(41.537, 186.127, -16.6, 1.488)
pt3dadd(41.525, 186.247, -16.6, 1.426)
pt3dadd(41.525, 186.366, -16.6, 1.362)
pt3dadd(41.533, 186.486, -16.6, 1.296)
pt3dadd(41.54, 186.606, -16.6, 1.23)
pt3dadd(41.547, 186.726, -16.6, 1.164)
pt3dadd(41.554, 186.846, -16.6, 1.098)
pt3dadd(41.562, 186.965, -16.6, 1.032)
pt3dadd(41.558, 187.084, -16.608, 0.978)
pt3dadd(41.545, 187.202, -16.623, 0.934)
pt3dadd(41.533, 187.32, -16.637, 0.89)
pt3dadd(41.52, 187.439, -16.652, 0.844)
pt3dadd(41.508, 187.556, -16.666, 0.8)
pt3dadd(41.495, 187.675, -16.68, 0.754)
pt3dadd(41.483, 187.793, -16.696, 0.724)
pt3dadd(41.471, 187.91, -16.715, 0.71)
pt3dadd(41.458, 188.027, -16.734, 0.698)
pt3dadd(41.446, 188.144, -16.752, 0.686)
pt3dadd(41.434, 188.262, -16.771, 0.672)
pt3dadd(41.421, 188.378, -16.789, 0.66)
pt3dadd(41.409, 188.494, -16.815, 0.658)
pt3dadd(41.398, 188.604, -16.852, 0.672)
pt3dadd(41.386, 188.716, -16.889, 0.686)
pt3dadd(41.374, 188.826, -16.927, 0.7)
pt3dadd(41.363, 188.936, -16.964, 0.714)
pt3dadd(41.352, 189.047, -17, 0.73)
pt3dadd(41.359, 189.168, -17, 0.762)
pt3dadd(41.366, 189.288, -17, 0.796)
pt3dadd(41.373, 189.407, -17, 0.828)
pt3dadd(41.381, 189.527, -17, 0.862)
pt3dadd(41.388, 189.647, -17, 0.894)
pt3dadd(41.395, 189.766, -17, 0.928)
pt3dadd(41.384, 189.886, -17.005, 0.958)
pt3dadd(41.371, 190.004, -17.01, 0.988)
pt3dadd(41.359, 190.124, -17.015, 1.018)
pt3dadd(41.346, 190.243, -17.02, 1.048)
pt3dadd(41.334, 190.363, -17.025, 1.078)
pt3dadd(41.321, 190.481, -17.03, 1.108)
pt3dadd(41.309, 190.596, -17.047, 1.136)
pt3dadd(41.298, 190.698, -17.1, 1.162)
pt3dadd(41.288, 190.8, -17.152, 1.186)
pt3dadd(41.277, 190.901, -17.205, 1.21)
pt3dadd(41.266, 191.003, -17.257, 1.236)
pt3dadd(41.255, 191.106, -17.307, 1.256)
pt3dadd(41.244, 191.216, -17.344, 1.256)
pt3dadd(41.232, 191.327, -17.381, 1.256)
pt3dadd(41.22, 191.438, -17.418, 1.256)
pt3dadd(41.209, 191.549, -17.455, 1.256)
pt3dadd(41.197, 191.66, -17.492, 1.256)
pt3dadd(41.185, 191.777, -17.5, 1.242)
pt3dadd(41.172, 191.897, -17.5, 1.226)
pt3dadd(41.16, 192.016, -17.5, 1.208)
pt3dadd(41.159, 192.137, -17.5, 1.184)
pt3dadd(41.161, 192.256, -17.5, 1.156)
pt3dadd(41.172, 192.372, -17.5, 1.126)
pt3dadd(41.264, 192.449, -17.5, 1.078)
pt3dadd(41.355, 192.528, -17.5, 1.032)
pt3dadd(41.447, 192.605, -17.5, 1.018)
pt3dadd(41.538, 192.683, -17.5, 1.006)
pt3dadd(41.553, 192.794, -17.5, 1.036)
pt3dadd(41.547, 192.913, -17.5, 1.076)
pt3dadd(41.58, 193.026, -17.519, 1.124)
pt3dadd(41.618, 193.136, -17.541, 1.172)
pt3dadd(41.655, 193.248, -17.563, 1.222)
pt3dadd(41.693, 193.358, -17.584, 1.27)
pt3dadd(41.732, 193.469, -17.606, 1.316)
pt3dadd(41.777, 193.577, -17.628, 1.354)
pt3dadd(41.822, 193.686, -17.65, 1.394)
pt3dadd(41.867, 193.794, -17.672, 1.432)
pt3dadd(41.912, 193.901, -17.694, 1.472)
pt3dadd(41.967, 194.005, -17.716, 1.494)
pt3dadd(42.026, 194.105, -17.739, 1.512)
pt3dadd(42.086, 194.206, -17.762, 1.528)
pt3dadd(42.146, 194.306, -17.785, 1.546)
pt3dadd(42.201, 194.41, -17.8, 1.554)
pt3dadd(42.246, 194.52, -17.8, 1.544)
pt3dadd(42.291, 194.633, -17.8, 1.534)
pt3dadd(42.336, 194.743, -17.8, 1.524)
pt3dadd(42.382, 194.855, -17.8, 1.516)
pt3dadd(42.423, 194.966, -17.801, 1.506)
pt3dadd(42.446, 195.084, -17.806, 1.506)
pt3dadd(42.468, 195.202, -17.81, 1.506)
pt3dadd(42.506, 195.306, -17.847, 1.506)
pt3dadd(42.547, 195.406, -17.889, 1.506)
pt3dadd(42.663, 195.433, -17.898, 1.486)
pt3dadd(42.779, 195.462, -17.907, 1.466)
pt3dadd(42.894, 195.481, -17.929, 1.412)
pt3dadd(43.006, 195.493, -17.962, 1.326)
pt3dadd(43.117, 195.514, -17.993, 1.238)
pt3dadd(43.219, 195.571, -18.015, 1.138)
pt3dadd(43.304, 195.637, -18.043, 1.026)
pt3dadd(43.302, 195.746, -18.081, 0.97)
pt3dadd(43.289, 195.863, -18.098, 1.04)
pt3dadd(43.277, 195.983, -18.1, 1.116)
pt3dadd(43.264, 196.102, -18.1, 1.172)
pt3dadd(43.252, 196.222, -18.1, 1.18)
pt3dadd(43.244, 196.338, -18.124, 1.144)
pt3dadd(43.238, 196.452, -18.152, 1.102)
pt3dadd(43.254, 196.561, -18.185, 1.046)
pt3dadd(43.294, 196.666, -18.22, 0.978)
pt3dadd(43.312, 196.747, -18.286, 0.914)
pt3dadd(43.318, 196.814, -18.368, 0.852)
pt3dadd(43.364, 196.878, -18.439, 0.828)
pt3dadd(43.434, 196.939, -18.503, 0.828)
pt3dadd(43.524, 196.993, -18.55, 0.9)
pt3dadd(43.59, 197.051, -18.615, 0.964)
pt3dadd(43.642, 197.112, -18.69, 1.018)
pt3dadd(43.694, 197.172, -18.764, 1.072)
pt3dadd(43.746, 197.232, -18.839, 1.128)
pt3dadd(43.809, 197.296, -18.904, 1.182)
pt3dadd(43.884, 197.363, -18.959, 1.238)
pt3dadd(43.959, 197.43, -19.013, 1.292)
pt3dadd(44.034, 197.497, -19.068, 1.348)
pt3dadd(44.105, 197.578, -19.1, 1.404)
pt3dadd(44.169, 197.678, -19.1, 1.464)
pt3dadd(44.24, 197.773, -19.105, 1.51)
pt3dadd(44.329, 197.852, -19.122, 1.524)
pt3dadd(44.388, 197.927, -19.16, 1.524)
pt3dadd(44.388, 197.999, -19.24, 1.5)
pt3dadd(44.398, 198.068, -19.319, 1.486)
pt3dadd(44.444, 198.133, -19.394, 1.5)
pt3dadd(44.487, 198.215, -19.454, 1.51)
pt3dadd(44.524, 198.317, -19.498, 1.518)
pt3dadd(44.562, 198.418, -19.542, 1.528)
pt3dadd(44.588, 198.527, -19.573, 1.542)
pt3dadd(44.599, 198.644, -19.587, 1.564)
pt3dadd(44.623, 198.755, -19.6, 1.578)
}
}
proc shape3d_161() {
dend_5[23] { pt3dadd(44.727, 198.814, -19.6, 1.544)
pt3dadd(44.831, 198.872, -19.6, 1.512)
pt3dadd(44.93, 198.937, -19.601, 1.472)
pt3dadd(44.982, 199.045, -19.606, 1.39)
pt3dadd(45.035, 199.152, -19.611, 1.306)
pt3dadd(45.059, 199.237, -19.68, 1.224)
pt3dadd(45.083, 199.321, -19.748, 1.142)
pt3dadd(45.1, 199.41, -19.813, 1.09)
pt3dadd(45.111, 199.502, -19.877, 1.064)
pt3dadd(45.168, 199.571, -19.935, 1.13)
pt3dadd(45.215, 199.651, -19.998, 1.156)
pt3dadd(45.262, 199.732, -20.061, 1.18)
pt3dadd(45.31, 199.812, -20.124, 1.204)
pt3dadd(45.357, 199.892, -20.186, 1.23)
pt3dadd(45.359, 199.98, -20.254, 1.236)
pt3dadd(45.358, 200.069, -20.322, 1.24)
pt3dadd(45.357, 200.156, -20.39, 1.246)
pt3dadd(45.356, 200.243, -20.458, 1.252)
pt3dadd(45.357, 200.334, -20.525, 1.252)
pt3dadd(45.365, 200.428, -20.586, 1.236)
pt3dadd(45.373, 200.522, -20.647, 1.218)
pt3dadd(45.381, 200.617, -20.708, 1.202)
pt3dadd(45.388, 200.712, -20.769, 1.186)
pt3dadd(45.41, 200.819, -20.806, 1.166)
pt3dadd(45.438, 200.932, -20.833, 1.144)
pt3dadd(45.466, 201.044, -20.859, 1.122)
pt3dadd(45.495, 201.156, -20.885, 1.102)
pt3dadd(45.523, 201.269, -20.911, 1.08)
pt3dadd(45.559, 201.378, -20.938, 1.064)
pt3dadd(45.594, 201.488, -20.965, 1.046)
pt3dadd(45.63, 201.598, -20.992, 1.03)
pt3dadd(45.666, 201.708, -21.019, 1.014)
pt3dadd(45.684, 201.809, -21.063, 0.998)
pt3dadd(45.681, 201.9, -21.128, 0.986)
pt3dadd(45.695, 201.997, -21.181, 0.974)
pt3dadd(45.734, 202.102, -21.217, 0.96)
pt3dadd(45.776, 202.207, -21.251, 0.93)
pt3dadd(45.819, 202.312, -21.283, 0.888)
pt3dadd(45.882, 202.399, -21.253, 0.844)
pt3dadd(45.95, 202.483, -21.211, 0.804)
pt3dadd(46.02, 202.582, -21.202, 0.804)
pt3dadd(46.086, 202.681, -21.2, 0.814)
pt3dadd(46.151, 202.782, -21.2, 0.83)
pt3dadd(46.215, 202.883, -21.2, 0.844)
pt3dadd(46.28, 202.984, -21.2, 0.86)
pt3dadd(46.345, 203.084, -21.2, 0.874)
pt3dadd(46.429, 203.168, -21.2, 0.896)
pt3dadd(46.52, 203.246, -21.2, 0.92)
pt3dadd(46.564, 203.35, -21.2, 0.918)
pt3dadd(46.572, 203.468, -21.2, 0.898)
pt3dadd(46.579, 203.588, -21.2, 0.88)
pt3dadd(46.601, 203.707, -21.205, 0.836)
pt3dadd(46.624, 203.824, -21.209, 0.794)
pt3dadd(46.641, 203.9, -21.269, 0.762)
pt3dadd(46.655, 203.954, -21.357, 0.736)
pt3dadd(46.655, 204.023, -21.439, 0.74)
pt3dadd(46.647, 204.101, -21.514, 0.766)
pt3dadd(46.637, 204.194, -21.576, 0.824)
pt3dadd(46.629, 204.286, -21.64, 0.886)
pt3dadd(46.642, 204.348, -21.725, 0.962)
pt3dadd(46.661, 204.413, -21.806, 1.04)
pt3dadd(46.722, 204.497, -21.857, 1.142)
pt3dadd(46.793, 204.578, -21.891, 1.218)
pt3dadd(46.882, 204.659, -21.896, 1.256)
pt3dadd(46.967, 204.743, -21.9, 1.276)
pt3dadd(47.042, 204.836, -21.9, 1.258)
pt3dadd(47.108, 204.936, -21.9, 1.228)
pt3dadd(47.173, 205.037, -21.9, 1.198)
pt3dadd(47.238, 205.139, -21.9, 1.168)
pt3dadd(47.302, 205.24, -21.9, 1.138)
pt3dadd(47.367, 205.342, -21.9, 1.108)
pt3dadd(47.408, 205.453, -21.9, 1.074)
pt3dadd(47.447, 205.567, -21.9, 1.042)
pt3dadd(47.486, 205.68, -21.9, 1.008)
pt3dadd(47.525, 205.794, -21.9, 0.974)
pt3dadd(47.564, 205.908, -21.9, 0.942)
pt3dadd(47.596, 206.022, -21.909, 0.91)
pt3dadd(47.624, 206.138, -21.922, 0.88)
pt3dadd(47.652, 206.254, -21.935, 0.85)
pt3dadd(47.681, 206.369, -21.948, 0.82)
pt3dadd(47.709, 206.484, -21.962, 0.79)
pt3dadd(47.711, 206.603, -21.97, 0.772)
pt3dadd(47.698, 206.722, -21.975, 0.76)
pt3dadd(47.686, 206.84, -21.98, 0.748)
pt3dadd(47.673, 206.96, -21.985, 0.738)
pt3dadd(47.661, 207.078, -21.99, 0.726)
pt3dadd(47.648, 207.198, -21.995, 0.714)
pt3dadd(47.636, 207.317, -22, 0.704)
pt3dadd(47.623, 207.437, -22, 0.704)
pt3dadd(47.611, 207.556, -22, 0.704)
pt3dadd(47.598, 207.676, -22, 0.704)
pt3dadd(47.572, 207.792, -22, 0.72)
pt3dadd(47.544, 207.91, -22, 0.74)
pt3dadd(47.511, 208.024, -22.006, 0.76)
pt3dadd(47.461, 208.129, -22.028, 0.784)
pt3dadd(47.419, 208.23, -22.06, 0.806)
pt3dadd(47.411, 208.31, -22.134, 0.818)
pt3dadd(47.402, 208.393, -22.205, 0.826)
pt3dadd(47.391, 208.494, -22.259, 0.79)
pt3dadd(47.38, 208.6, -22.305, 0.776)
pt3dadd(47.369, 208.708, -22.347, 0.77)
pt3dadd(47.358, 208.816, -22.389, 0.766)
pt3dadd(47.346, 208.924, -22.432, 0.76)
pt3dadd(47.335, 209.033, -22.474, 0.756)
pt3dadd(47.323, 209.144, -22.505, 0.75)
pt3dadd(47.311, 209.262, -22.52, 0.742)
pt3dadd(47.298, 209.38, -22.534, 0.734)
pt3dadd(47.286, 209.498, -22.549, 0.726)
pt3dadd(47.274, 209.616, -22.563, 0.718)
pt3dadd(47.261, 209.735, -22.577, 0.71)
pt3dadd(47.239, 209.85, -22.592, 0.704)
pt3dadd(47.181, 209.953, -22.609, 0.71)
pt3dadd(47.122, 210.055, -22.625, 0.714)
pt3dadd(47.064, 210.158, -22.641, 0.72)
pt3dadd(47.005, 210.262, -22.657, 0.726)
pt3dadd(46.964, 210.371, -22.674, 0.726)
pt3dadd(46.948, 210.487, -22.691, 0.722)
pt3dadd(46.931, 210.605, -22.708, 0.718)
pt3dadd(46.914, 210.721, -22.725, 0.714)
pt3dadd(46.897, 210.839, -22.742, 0.71)
pt3dadd(46.88, 210.955, -22.759, 0.706)
pt3dadd(46.839, 211.061, -22.785, 0.71)
pt3dadd(46.777, 211.156, -22.818, 0.72)
pt3dadd(46.714, 211.25, -22.851, 0.732)
pt3dadd(46.652, 211.345, -22.884, 0.744)
pt3dadd(46.599, 211.442, -22.917, 0.762)
pt3dadd(46.587, 211.555, -22.95, 0.816)
pt3dadd(46.575, 211.668, -22.983, 0.87)
pt3dadd(46.563, 211.786, -22.995, 0.946)
pt3dadd(46.55, 211.906, -23.003, 1.026)
pt3dadd(46.537, 212.023, -23.012, 1.108)
pt3dadd(46.507, 212.13, -23.05, 1.206)
pt3dadd(46.476, 212.237, -23.087, 1.302)
pt3dadd(46.425, 212.308, -23.155, 1.36)
pt3dadd(46.376, 212.369, -23.229, 1.416)
pt3dadd(46.348, 212.382, -23.325, 1.466)
pt3dadd(46.301, 212.418, -23.41, 1.52)
pt3dadd(46.244, 212.464, -23.489, 1.574)
pt3dadd(46.175, 212.47, -23.57, 1.634)
pt3dadd(46.104, 212.468, -23.65, 1.696)
pt3dadd(46.006, 212.5, -23.695, 1.73)
pt3dadd(45.901, 212.539, -23.731, 1.756)
pt3dadd(45.858, 212.639, -23.77, 1.722)
pt3dadd(45.821, 212.742, -23.809, 1.684)
pt3dadd(45.76, 212.795, -23.881, 1.524)
pt3dadd(45.716, 212.888, -23.92, 1.446)
pt3dadd(45.677, 212.998, -23.948, 1.4)
pt3dadd(45.638, 213.107, -23.975, 1.354)
pt3dadd(45.599, 213.216, -24.002, 1.308)
pt3dadd(45.56, 213.324, -24.03, 1.262)
pt3dadd(45.531, 213.43, -24.069, 1.232)
pt3dadd(45.503, 213.535, -24.111, 1.206)
pt3dadd(45.475, 213.641, -24.153, 1.18)
pt3dadd(45.447, 213.746, -24.194, 1.154)
pt3dadd(45.418, 213.851, -24.237, 1.13)
pt3dadd(45.375, 213.935, -24.299, 1.136)
pt3dadd(45.332, 214.018, -24.362, 1.142)
pt3dadd(45.289, 214.1, -24.424, 1.148)
pt3dadd(45.246, 214.183, -24.486, 1.154)
pt3dadd(45.226, 214.276, -24.548, 1.162)
pt3dadd(45.214, 214.369, -24.609, 1.174)
pt3dadd(45.201, 214.464, -24.67, 1.184)
pt3dadd(45.189, 214.558, -24.731, 1.194)
pt3dadd(45.176, 214.652, -24.792, 1.204)
pt3dadd(45.165, 214.753, -24.846, 1.196)
pt3dadd(45.154, 214.854, -24.898, 1.186)
pt3dadd(45.144, 214.956, -24.95, 1.178)
pt3dadd(45.133, 215.058, -25.003, 1.168)
pt3dadd(45.122, 215.159, -25.055, 1.158)
pt3dadd(45.111, 215.273, -25.085, 1.132)
pt3dadd(45.098, 215.388, -25.108, 1.102)
pt3dadd(45.086, 215.506, -25.13, 1.072)
pt3dadd(45.074, 215.621, -25.153, 1.04)
pt3dadd(45.062, 215.736, -25.176, 1.01)
pt3dadd(45.049, 215.854, -25.199, 0.98)
pt3dadd(45.037, 215.972, -25.2, 0.924)
pt3dadd(45.024, 216.092, -25.2, 0.864)
pt3dadd(45.012, 216.211, -25.2, 0.806)
pt3dadd(44.999, 216.331, -25.2, 0.764)
pt3dadd(44.987, 216.45, -25.2, 0.722)
pt3dadd(44.974, 216.57, -25.2, 0.68)
pt3dadd(44.963, 216.673, -25.249, 0.646)
pt3dadd(44.952, 216.776, -25.299, 0.61)
pt3dadd(44.945, 216.851, -25.374, 0.594)
pt3dadd(44.937, 216.919, -25.457, 0.582)
pt3dadd(44.927, 217.018, -25.496, 0.604)
pt3dadd(44.915, 217.136, -25.509, 0.646)
pt3dadd(44.906, 217.222, -25.573, 0.678)
pt3dadd(44.898, 217.298, -25.649, 0.708)
pt3dadd(44.889, 217.376, -25.725, 0.738)
pt3dadd(44.881, 217.453, -25.801, 0.768)
pt3dadd(44.873, 217.53, -25.877, 0.8)
pt3dadd(44.862, 217.636, -25.922, 0.86)
pt3dadd(44.85, 217.746, -25.961, 0.926)
pt3dadd(44.839, 217.852, -26.006, 0.968)
pt3dadd(44.829, 217.955, -26.057, 0.99)
pt3dadd(44.825, 218.063, -26.09, 1.004)
pt3dadd(44.834, 218.184, -26.095, 1.004)
pt3dadd(44.842, 218.303, -26.099, 1.004)
pt3dadd(44.907, 218.401, -26.1, 0.984)
}
}
proc shape3d_162() {
dend_5[23] { pt3dadd(44.979, 218.497, -26.1, 0.96)
pt3dadd(45.02, 218.609, -26.1, 0.93)
pt3dadd(45.056, 218.723, -26.1, 0.9)
pt3dadd(45.115, 218.826, -26.1, 0.886)
pt3dadd(45.173, 218.932, -26.1, 0.872)
pt3dadd(45.232, 219.036, -26.1, 0.856)
pt3dadd(45.29, 219.142, -26.1, 0.84)
pt3dadd(45.352, 219.244, -26.1, 0.826)
pt3dadd(45.429, 219.336, -26.1, 0.816)
pt3dadd(45.506, 219.427, -26.1, 0.806)
pt3dadd(45.583, 219.52, -26.1, 0.796)
pt3dadd(45.66, 219.611, -26.1, 0.786)
pt3dadd(45.735, 219.704, -26.102, 0.778)
pt3dadd(45.802, 219.804, -26.112, 0.778)
pt3dadd(45.869, 219.904, -26.121, 0.778)
pt3dadd(45.936, 220.002, -26.131, 0.778)
pt3dadd(46.003, 220.1, -26.14, 0.778)
pt3dadd(46.072, 220.189, -26.17, 0.782)
pt3dadd(46.143, 220.268, -26.216, 0.788)
pt3dadd(46.213, 220.349, -26.263, 0.794)
pt3dadd(46.284, 220.427, -26.309, 0.8)
pt3dadd(46.328, 220.522, -26.352, 0.804)
pt3dadd(46.343, 220.631, -26.391, 0.804)
pt3dadd(46.357, 220.726, -26.447, 0.792)
pt3dadd(46.37, 220.802, -26.523, 0.764)
pt3dadd(46.419, 220.886, -26.569, 0.738)
pt3dadd(46.496, 220.973, -26.593, 0.712)
pt3dadd(46.521, 221.083, -26.6, 0.696)
pt3dadd(46.524, 221.203, -26.6, 0.688)
pt3dadd(46.526, 221.322, -26.6, 0.678)
pt3dadd(46.513, 221.442, -26.6, 0.678)
pt3dadd(46.501, 221.561, -26.6, 0.678)
pt3dadd(46.489, 221.674, -26.635, 0.678)
pt3dadd(46.477, 221.785, -26.67, 0.678)
pt3dadd(46.465, 221.898, -26.704, 0.678)
pt3dadd(46.454, 222.01, -26.739, 0.678)
pt3dadd(46.442, 222.121, -26.773, 0.678)
pt3dadd(46.43, 222.238, -26.791, 0.678)
pt3dadd(46.417, 222.358, -26.795, 0.678)
pt3dadd(46.405, 222.475, -26.799, 0.678)
pt3dadd(46.392, 222.595, -26.802, 0.672)
pt3dadd(46.38, 222.714, -26.806, 0.664)
pt3dadd(46.367, 222.834, -26.81, 0.654)
pt3dadd(46.358, 222.923, -26.868, 0.644)
pt3dadd(46.349, 223.004, -26.941, 0.632)
pt3dadd(46.353, 223.093, -27.008, 0.62)
pt3dadd(46.364, 223.184, -27.072, 0.606)
pt3dadd(46.431, 223.27, -27.091, 0.608)
pt3dadd(46.518, 223.351, -27.094, 0.616)
pt3dadd(46.606, 223.434, -27.098, 0.622)
pt3dadd(46.7, 223.505, -27.1, 0.636)
pt3dadd(46.815, 223.537, -27.1, 0.676)
pt3dadd(46.931, 223.57, -27.1, 0.714)
pt3dadd(47.027, 223.636, -27.1, 0.886)
pt3dadd(47.112, 223.72, -27.1, 0.936)
pt3dadd(47.197, 223.804, -27.1, 0.972)
pt3dadd(47.282, 223.889, -27.1, 1.008)
pt3dadd(47.368, 223.973, -27.1, 1.042)
pt3dadd(47.453, 224.058, -27.1, 1.078)
pt3dadd(47.501, 224.158, -27.135, 1.09)
pt3dadd(47.547, 224.261, -27.171, 1.102)
pt3dadd(47.593, 224.362, -27.207, 1.114)
pt3dadd(47.638, 224.465, -27.244, 1.126)
pt3dadd(47.699, 224.557, -27.279, 1.114)
pt3dadd(47.766, 224.648, -27.313, 1.09)
pt3dadd(47.834, 224.738, -27.348, 1.066)
pt3dadd(47.901, 224.828, -27.382, 1.042)
pt3dadd(47.981, 224.905, -27.419, 1.012)
pt3dadd(48.074, 224.964, -27.457, 0.978)
pt3dadd(48.167, 225.024, -27.496, 0.942)
pt3dadd(48.26, 225.084, -27.535, 0.908)
pt3dadd(48.357, 225.138, -27.568, 0.874)
pt3dadd(48.473, 225.172, -27.573, 0.848)
pt3dadd(48.588, 225.205, -27.579, 0.822)
pt3dadd(48.703, 225.238, -27.585, 0.796)
pt3dadd(48.818, 225.27, -27.591, 0.77)
pt3dadd(48.933, 225.304, -27.597, 0.744)
pt3dadd(49.05, 225.329, -27.6, 0.718)
pt3dadd(49.169, 225.341, -27.6, 0.692)
pt3dadd(49.289, 225.354, -27.6, 0.668)
pt3dadd(49.408, 225.368, -27.6, 0.652)
pt3dadd(49.527, 225.384, -27.6, 0.652)
pt3dadd(49.645, 225.402, -27.6, 0.652)
pt3dadd(49.743, 225.457, -27.6, 0.684)
pt3dadd(49.822, 225.548, -27.6, 0.742)
pt3dadd(49.908, 225.631, -27.6, 0.806)
pt3dadd(50.004, 225.702, -27.6, 0.874)
pt3dadd(50.1, 225.774, -27.6, 0.94)
pt3dadd(50.195, 225.848, -27.6, 0.992)
pt3dadd(50.247, 225.952, -27.6, 1)
pt3dadd(50.286, 226.066, -27.6, 0.996)
pt3dadd(50.325, 226.18, -27.6, 0.992)
pt3dadd(50.364, 226.292, -27.6, 0.986)
pt3dadd(50.403, 226.405, -27.6, 0.982)
pt3dadd(50.455, 226.512, -27.601, 0.972)
pt3dadd(50.521, 226.613, -27.603, 0.956)
pt3dadd(50.587, 226.714, -27.606, 0.942)
pt3dadd(50.653, 226.813, -27.608, 0.926)
pt3dadd(50.72, 226.913, -27.61, 0.91)
pt3dadd(50.765, 227.021, -27.623, 0.898)
pt3dadd(50.795, 227.135, -27.645, 0.888)
pt3dadd(50.826, 227.248, -27.666, 0.876)
pt3dadd(50.856, 227.36, -27.687, 0.866)
pt3dadd(50.887, 227.473, -27.708, 0.856)
pt3dadd(50.958, 227.566, -27.728, 0.85)
pt3dadd(51.037, 227.652, -27.748, 0.844)
pt3dadd(51.115, 227.741, -27.768, 0.838)
pt3dadd(51.194, 227.827, -27.788, 0.832)
pt3dadd(51.277, 227.909, -27.809, 0.836)
pt3dadd(51.366, 227.987, -27.832, 0.852)
pt3dadd(51.455, 228.062, -27.855, 0.87)
pt3dadd(51.544, 228.138, -27.877, 0.886)
pt3dadd(51.632, 228.215, -27.9, 0.904)
pt3dadd(51.723, 228.289, -27.92, 0.92)
pt3dadd(51.813, 228.364, -27.939, 0.938)
pt3dadd(51.904, 228.438, -27.959, 0.954)
pt3dadd(51.995, 228.515, -27.979, 0.97)
pt3dadd(52.067, 228.605, -27.99, 0.99)
pt3dadd(52.12, 228.712, -27.992, 1.01)
pt3dadd(52.173, 228.821, -27.994, 1.03)
pt3dadd(52.226, 228.928, -27.997, 1.05)
pt3dadd(52.28, 229.036, -27.999, 1.07)
pt3dadd(52.353, 229.128, -28, 1.08)
pt3dadd(52.445, 229.204, -28, 1.08)
pt3dadd(52.538, 229.279, -28, 1.08)
pt3dadd(52.631, 229.356, -28, 1.08)
pt3dadd(52.724, 229.432, -28, 1.08)
pt3dadd(52.797, 229.523, -28, 1.08)
pt3dadd(52.847, 229.632, -28, 1.08)
pt3dadd(52.906, 229.735, -28, 1.07)
pt3dadd(52.991, 229.818, -28, 1.036)
pt3dadd(53.067, 229.907, -28, 1)
pt3dadd(53.069, 230.027, -28.005, 0.96)
pt3dadd(53.072, 230.147, -28.009, 0.922)
pt3dadd(53.067, 230.262, -28.032, 0.868)
pt3dadd(53.056, 230.372, -28.071, 0.802)
pt3dadd(53.072, 230.466, -28.108, 0.746)
pt3dadd(53.174, 230.52, -28.138, 0.714)
pt3dadd(53.276, 230.572, -28.169, 0.684)
pt3dadd(53.377, 230.623, -28.2, 0.654)
pt3dadd(53.449, 230.718, -28.2, 0.618)
pt3dadd(53.521, 230.815, -28.2, 0.582)
pt3dadd(53.571, 230.923, -28.2, 0.578)
pt3dadd(53.636, 231.024, -28.2, 0.578)
pt3dadd(53.7, 231.125, -28.2, 0.578)
pt3dadd(53.765, 231.226, -28.2, 0.578)
pt3dadd(53.83, 231.328, -28.2, 0.578)
pt3dadd(53.901, 231.421, -28.201, 0.582)
pt3dadd(54.008, 231.475, -28.206, 0.604)
pt3dadd(54.116, 231.527, -28.211, 0.626)
pt3dadd(54.207, 231.588, -28.25, 0.64)
pt3dadd(54.295, 231.652, -28.289, 0.654)
pt3dadd(54.363, 231.751, -28.295, 0.68)
pt3dadd(54.431, 231.85, -28.3, 0.704)
pt3dadd(54.481, 231.959, -28.3, 0.726)
pt3dadd(54.53, 232.068, -28.3, 0.75)
pt3dadd(54.559, 232.184, -28.3, 0.77)
pt3dadd(54.584, 232.301, -28.3, 0.788)
pt3dadd(54.609, 232.418, -28.3, 0.808)
pt3dadd(54.633, 232.536, -28.3, 0.826)
pt3dadd(54.626, 232.656, -28.303, 0.844)
pt3dadd(54.613, 232.775, -28.307, 0.862)
pt3dadd(54.6, 232.895, -28.311, 0.878)
pt3dadd(54.59, 232.997, -28.36, 0.934)
pt3dadd(54.581, 233.084, -28.428, 0.958)
pt3dadd(54.578, 233.173, -28.49, 0.984)
pt3dadd(54.625, 233.284, -28.501, 1.02)
pt3dadd(54.674, 233.39, -28.514, 1.056)
pt3dadd(54.757, 233.46, -28.557, 1.084)
pt3dadd(54.838, 233.534, -28.59, 1.104)
pt3dadd(54.914, 233.628, -28.596, 1.104)
pt3dadd(54.995, 233.714, -28.6, 1.094)
pt3dadd(55.096, 233.779, -28.6, 1.042)
pt3dadd(55.165, 233.873, -28.6, 1.012)
pt3dadd(55.224, 233.978, -28.6, 0.986)
pt3dadd(55.282, 234.083, -28.6, 0.962)
pt3dadd(55.341, 234.188, -28.6, 0.936)
pt3dadd(55.399, 234.294, -28.6, 0.912)
pt3dadd(55.421, 234.408, -28.6, 0.87)
pt3dadd(55.429, 234.528, -28.6, 0.822)
pt3dadd(55.445, 234.644, -28.6, 0.776)
pt3dadd(55.524, 234.736, -28.6, 0.752)
pt3dadd(55.604, 234.826, -28.6, 0.728)
pt3dadd(55.641, 234.94, -28.605, 0.75)
pt3dadd(55.678, 235.052, -28.61, 0.774)
pt3dadd(55.684, 235.138, -28.672, 0.818)
pt3dadd(55.682, 235.216, -28.748, 0.866)
pt3dadd(55.7, 235.285, -28.827, 0.91)
pt3dadd(55.714, 235.378, -28.88, 0.924)
pt3dadd(55.718, 235.494, -28.905, 0.914)
pt3dadd(55.721, 235.61, -28.931, 0.904)
pt3dadd(55.724, 235.726, -28.956, 0.896)
pt3dadd(55.728, 235.842, -28.982, 0.886)
pt3dadd(55.734, 235.957, -29.006, 0.874)
pt3dadd(55.748, 236.075, -29.025, 0.854)
pt3dadd(55.762, 236.192, -29.045, 0.834)
pt3dadd(55.776, 236.309, -29.064, 0.814)
pt3dadd(55.79, 236.425, -29.084, 0.794)
pt3dadd(55.802, 236.543, -29.1, 0.776)
pt3dadd(55.809, 236.663, -29.1, 0.764)
}
}
proc shape3d_163() {
dend_5[23] { pt3dadd(55.817, 236.782, -29.1, 0.752)
pt3dadd(55.824, 236.903, -29.1, 0.74)
pt3dadd(55.831, 237.023, -29.1, 0.726)
pt3dadd(55.839, 237.142, -29.1, 0.714)
pt3dadd(55.849, 237.26, -29.102, 0.702)
pt3dadd(55.886, 237.372, -29.123, 0.698)
pt3dadd(55.924, 237.482, -29.145, 0.692)
pt3dadd(55.961, 237.594, -29.167, 0.686)
pt3dadd(55.999, 237.704, -29.188, 0.68)
pt3dadd(56.022, 237.82, -29.2, 0.68)
pt3dadd(56.03, 237.94, -29.2, 0.684)
pt3dadd(56.037, 238.058, -29.2, 0.688)
pt3dadd(56.044, 238.18, -29.2, 0.692)
pt3dadd(56.051, 238.3, -29.2, 0.696)
pt3dadd(56.059, 238.418, -29.2, 0.7)
pt3dadd(56.058, 238.538, -29.2, 0.712)
pt3dadd(56.046, 238.658, -29.2, 0.738)
pt3dadd(56.033, 238.777, -29.2, 0.762)
pt3dadd(56.021, 238.897, -29.2, 0.794)
pt3dadd(56.008, 239.016, -29.2, 0.836)
pt3dadd(55.996, 239.136, -29.2, 0.878)
pt3dadd(56.004, 239.252, -29.2, 0.926)
pt3dadd(56.046, 239.364, -29.2, 0.982)
pt3dadd(56.096, 239.47, -29.202, 1.034)
pt3dadd(56.196, 239.533, -29.219, 1.058)
pt3dadd(56.294, 239.598, -29.239, 1.08)
pt3dadd(56.377, 239.662, -29.286, 1.08)
pt3dadd(56.42, 239.772, -29.297, 1.066)
pt3dadd(56.46, 239.885, -29.306, 1.05)
pt3dadd(56.499, 239.996, -29.315, 1.036)
pt3dadd(56.539, 240.109, -29.324, 1.02)
pt3dadd(56.578, 240.222, -29.333, 1.004)
pt3dadd(56.624, 240.332, -29.347, 0.988)
pt3dadd(56.669, 240.442, -29.361, 0.972)
pt3dadd(56.714, 240.553, -29.376, 0.956)
pt3dadd(56.759, 240.662, -29.39, 0.94)
pt3dadd(56.794, 240.775, -29.4, 0.924)
pt3dadd(56.801, 240.895, -29.4, 0.902)
pt3dadd(56.809, 241.014, -29.4, 0.882)
pt3dadd(56.816, 241.134, -29.4, 0.862)
pt3dadd(56.823, 241.253, -29.4, 0.84)
pt3dadd(56.83, 241.374, -29.4, 0.82)
pt3dadd(56.834, 241.493, -29.4, 0.798)
pt3dadd(56.821, 241.613, -29.4, 0.774)
pt3dadd(56.809, 241.732, -29.4, 0.748)
pt3dadd(56.807, 241.85, -29.401, 0.724)
pt3dadd(56.852, 241.961, -29.406, 0.7)
pt3dadd(56.898, 242.068, -29.415, 0.678)
pt3dadd(56.982, 242.083, -29.485, 0.69)
pt3dadd(57.065, 242.098, -29.556, 0.704)
pt3dadd(57.15, 242.178, -29.579, 0.73)
pt3dadd(57.228, 242.263, -29.6, 0.76)
pt3dadd(57.258, 242.378, -29.6, 0.808)
pt3dadd(57.312, 242.482, -29.615, 0.828)
pt3dadd(57.384, 242.573, -29.641, 0.828)
pt3dadd(57.455, 242.664, -29.666, 0.828)
pt3dadd(57.526, 242.756, -29.692, 0.828)
pt3dadd(57.595, 242.834, -29.732, 0.822)
pt3dadd(57.656, 242.876, -29.81, 0.794)
pt3dadd(57.703, 242.95, -29.865, 0.758)
pt3dadd(57.73, 243.064, -29.886, 0.708)
pt3dadd(57.743, 243.178, -29.91, 0.678)
pt3dadd(57.731, 243.293, -29.938, 0.678)
pt3dadd(57.719, 243.407, -29.965, 0.678)
pt3dadd(57.706, 243.526, -29.978, 0.696)
pt3dadd(57.694, 243.643, -29.991, 0.714)
pt3dadd(57.681, 243.763, -30, 0.742)
pt3dadd(57.669, 243.882, -30, 0.792)
pt3dadd(57.667, 244, -30, 0.83)
pt3dadd(57.697, 244.117, -30, 0.834)
pt3dadd(57.726, 244.234, -30, 0.84)
pt3dadd(57.756, 244.349, -30, 0.844)
pt3dadd(57.786, 244.465, -30, 0.848)
pt3dadd(57.815, 244.582, -30, 0.852)
pt3dadd(57.855, 244.694, -30, 0.85)
pt3dadd(57.897, 244.807, -30, 0.846)
pt3dadd(57.939, 244.919, -30, 0.84)
pt3dadd(57.981, 245.033, -30, 0.836)
pt3dadd(58.023, 245.144, -30, 0.83)
pt3dadd(58.057, 245.258, -30, 0.81)
pt3dadd(58.084, 245.376, -30, 0.778)
pt3dadd(58.104, 245.491, -30.007, 0.748)
pt3dadd(58.098, 245.606, -30.036, 0.726)
pt3dadd(58.092, 245.722, -30.064, 0.704)
pt3dadd(58.144, 245.825, -30.082, 0.714)
pt3dadd(58.202, 245.929, -30.099, 0.728)
pt3dadd(58.259, 246.034, -30.1, 0.75)
pt3dadd(58.316, 246.14, -30.1, 0.774)
pt3dadd(58.418, 246.196, -30.1, 0.816)
pt3dadd(58.53, 246.236, -30.1, 0.854)
pt3dadd(58.647, 246.264, -30.1, 0.854)
pt3dadd(58.764, 246.29, -30.1, 0.854)
pt3dadd(58.871, 246.34, -30.1, 0.86)
pt3dadd(58.967, 246.412, -30.1, 0.872)
pt3dadd(59.05, 246.493, -30.102, 0.882)
pt3dadd(59.103, 246.601, -30.107, 0.894)
pt3dadd(59.151, 246.709, -30.12, 0.91)
pt3dadd(59.182, 246.812, -30.162, 0.936)
pt3dadd(59.21, 246.916, -30.207, 0.96)
pt3dadd(59.229, 247.015, -30.26, 0.976)
pt3dadd(59.249, 247.115, -30.313, 0.992)
pt3dadd(59.28, 247.207, -30.368, 1.004)
pt3dadd(59.357, 247.26, -30.431, 1.004)
pt3dadd(59.445, 247.313, -30.477, 1.004)
pt3dadd(59.55, 247.363, -30.502, 1.004)
pt3dadd(59.655, 247.414, -30.527, 1.004)
pt3dadd(59.751, 247.472, -30.559, 0.974)
pt3dadd(59.846, 247.532, -30.595, 0.934)
pt3dadd(59.937, 247.601, -30.627, 0.902)
pt3dadd(60.027, 247.669, -30.659, 0.872)
pt3dadd(60.096, 247.742, -30.705, 0.836)
pt3dadd(60.133, 247.822, -30.774, 0.794)
pt3dadd(60.186, 247.888, -30.844, 0.778)
pt3dadd(60.248, 247.945, -30.915, 0.778)
pt3dadd(60.322, 248, -30.971, 0.784)
pt3dadd(60.43, 248.051, -30.986, 0.808)
pt3dadd(60.538, 248.099, -31, 0.836)
pt3dadd(60.651, 248.138, -31, 0.882)
pt3dadd(60.767, 248.171, -31, 0.892)
pt3dadd(60.882, 248.204, -31, 0.902)
pt3dadd(60.975, 248.274, -31, 0.912)
pt3dadd(61.06, 248.359, -31, 0.924)
pt3dadd(61.158, 248.417, -31.019, 0.944)
pt3dadd(61.266, 248.453, -31.052, 0.968)
pt3dadd(61.335, 248.531, -31.079, 1)
pt3dadd(61.37, 248.641, -31.101, 1.038)
pt3dadd(61.419, 248.738, -31.139, 1.07)
pt3dadd(61.48, 248.821, -31.19, 1.1)
pt3dadd(61.577, 248.845, -31.236, 1.128)
pt3dadd(61.677, 248.818, -31.282, 1.088)
pt3dadd(61.755, 248.731, -31.3, 1.054)
pt3dadd(61.849, 248.66, -31.307, 1.038)
pt3dadd(61.96, 248.654, -31.338, 1.012)
pt3dadd(62.073, 248.66, -31.372, 0.99)
pt3dadd(62.183, 248.688, -31.394, 0.956)
pt3dadd(62.293, 248.736, -31.404, 0.91)
pt3dadd(62.4, 248.785, -31.421, 0.844)
pt3dadd(62.507, 248.831, -31.43, 0.796)
pt3dadd(62.619, 248.874, -31.425, 0.784)
pt3dadd(62.731, 248.917, -31.42, 0.772)
pt3dadd(62.843, 248.96, -31.414, 0.76)
pt3dadd(62.952, 249.004, -31.424, 0.756)
pt3dadd(63.057, 249.047, -31.456, 0.762)
pt3dadd(63.162, 249.089, -31.488, 0.77)
pt3dadd(63.267, 249.133, -31.521, 0.776)
pt3dadd(63.374, 249.179, -31.524, 0.778)
pt3dadd(63.482, 249.228, -31.508, 0.778)
pt3dadd(63.587, 249.284, -31.5, 0.774)
pt3dadd(63.688, 249.349, -31.5, 0.762)
pt3dadd(63.787, 249.415, -31.496, 0.748)
pt3dadd(63.882, 249.486, -31.479, 0.722)
pt3dadd(63.966, 249.56, -31.452, 0.704)
pt3dadd(64.019, 249.642, -31.394, 0.704)
pt3dadd(64.086, 249.727, -31.356, 0.716)
pt3dadd(64.167, 249.812, -31.334, 0.74)
pt3dadd(64.247, 249.898, -31.313, 0.764)
pt3dadd(64.334, 249.977, -31.3, 0.796)
pt3dadd(64.43, 250.049, -31.3, 0.842)
pt3dadd(64.53, 250.115, -31.3, 0.896)
pt3dadd(64.639, 250.163, -31.3, 0.952)
pt3dadd(64.747, 250.217, -31.3, 0.948)
pt3dadd(64.855, 250.268, -31.3, 0.944)
pt3dadd(64.962, 250.322, -31.3, 0.938)
pt3dadd(65.07, 250.375, -31.3, 0.934)
pt3dadd(65.178, 250.428, -31.3, 0.93)
pt3dadd(65.253, 250.517, -31.279, 0.908)
pt3dadd(65.327, 250.608, -31.256, 0.884)
pt3dadd(65.4, 250.698, -31.233, 0.862)
pt3dadd(65.474, 250.788, -31.21, 0.838)
pt3dadd(65.56, 250.865, -31.188, 0.816)
pt3dadd(65.657, 250.932, -31.165, 0.794)
pt3dadd(65.754, 250.998, -31.143, 0.772)
pt3dadd(65.85, 251.065, -31.121, 0.75)
pt3dadd(65.947, 251.129, -31.1, 0.728)
pt3dadd(66.063, 251.16, -31.1, 0.724)
pt3dadd(66.18, 251.189, -31.1, 0.72)
pt3dadd(66.296, 251.219, -31.1, 0.716)
pt3dadd(66.412, 251.248, -31.1, 0.712)
pt3dadd(66.528, 251.279, -31.1, 0.708)
pt3dadd(66.645, 251.308, -31.1, 0.704)
pt3dadd(66.764, 251.322, -31.1, 0.706)
pt3dadd(66.883, 251.335, -31.1, 0.71)
pt3dadd(67.002, 251.347, -31.1, 0.714)
pt3dadd(67.122, 251.36, -31.1, 0.716)
pt3dadd(67.241, 251.372, -31.1, 0.72)
pt3dadd(67.36, 251.386, -31.1, 0.724)
pt3dadd(67.48, 251.398, -31.1, 0.728)
pt3dadd(67.599, 251.41, -31.1, 0.722)
pt3dadd(67.718, 251.423, -31.1, 0.714)
pt3dadd(67.838, 251.435, -31.1, 0.708)
pt3dadd(67.957, 251.448, -31.1, 0.7)
pt3dadd(68.076, 251.46, -31.1, 0.694)
pt3dadd(68.196, 251.473, -31.1, 0.686)
pt3dadd(68.315, 251.485, -31.1, 0.68)
pt3dadd(68.43, 251.516, -31.112, 0.658)
pt3dadd(68.543, 251.551, -31.127, 0.634)
pt3dadd(68.657, 251.585, -31.141, 0.612)
pt3dadd(68.77, 251.62, -31.156, 0.588)
pt3dadd(68.884, 251.653, -31.17, 0.564)
pt3dadd(68.989, 251.692, -31.202, 0.538)
}
}
proc shape3d_164() {
dend_5[23] { pt3dadd(69.085, 251.731, -31.252, 0.51)
pt3dadd(69.18, 251.772, -31.302, 0.482)
pt3dadd(69.276, 251.812, -31.353, 0.454)
pt3dadd(69.373, 251.854, -31.4, 0.426)
pt3dadd(69.48, 251.906, -31.407, 0.422)
pt3dadd(69.588, 251.958, -31.413, 0.416)
pt3dadd(69.696, 252.011, -31.42, 0.412)
pt3dadd(69.803, 252.062, -31.426, 0.408)
pt3dadd(69.911, 252.116, -31.432, 0.402)
pt3dadd(70.003, 252.138, -31.488, 0.412)
pt3dadd(70.093, 252.154, -31.553, 0.424)
pt3dadd(70.205, 252.17, -31.577, 0.426)
pt3dadd(70.322, 252.188, -31.59, 0.426)
pt3dadd(70.437, 252.214, -31.595, 0.422)
pt3dadd(70.539, 252.271, -31.573, 0.396)
pt3dadd(70.635, 252.322, -31.54, 0.372)
pt3dadd(70.714, 252.344, -31.467, 0.346)
pt3dadd(70.8, 252.373, -31.41, 0.326)
pt3dadd(70.91, 252.421, -31.408, 0.326)
pt3dadd(71.019, 252.472, -31.405, 0.326)
pt3dadd(71.128, 252.521, -31.402, 0.326)
pt3dadd(71.227, 252.584, -31.402, 0.336)
pt3dadd(71.309, 252.671, -31.407, 0.36)
pt3dadd(71.392, 252.749, -31.429, 0.416)
pt3dadd(71.465, 252.788, -31.5, 0.48)
pt3dadd(71.532, 252.824, -31.577, 0.52)
pt3dadd(71.613, 252.878, -31.544, 0.554)
pt3dadd(71.691, 252.935, -31.485, 0.578)
pt3dadd(71.744, 252.985, -31.406, 0.578)
pt3dadd(71.798, 253.034, -31.327, 0.568)
pt3dadd(71.852, 253.084, -31.247, 0.54)
pt3dadd(71.913, 253.159, -31.215, 0.518)
pt3dadd(71.981, 253.259, -31.222, 0.504)
pt3dadd(72.05, 253.356, -31.229, 0.488)
pt3dadd(72.101, 253.459, -31.243, 0.474)
pt3dadd(72.115, 253.572, -31.276, 0.462)
pt3dadd(72.15, 253.674, -31.304, 0.452)
pt3dadd(72.244, 253.745, -31.321, 0.452)
pt3dadd(72.339, 253.816, -31.338, 0.452)
pt3dadd(72.389, 253.868, -31.401, 0.46)
pt3dadd(72.41, 253.91, -31.493, 0.472)
pt3dadd(72.428, 253.95, -31.586, 0.518)
pt3dadd(72.468, 253.988, -31.674, 0.572)
pt3dadd(72.513, 254.028, -31.761, 0.624)
pt3dadd(72.51, 254.138, -31.793, 0.658)
pt3dadd(72.504, 254.254, -31.822, 0.69)
pt3dadd(72.501, 254.342, -31.882, 0.71)
pt3dadd(72.499, 254.413, -31.963, 0.722)
pt3dadd(72.522, 254.454, -32.05, 0.704)
pt3dadd(72.563, 254.472, -32.142, 0.656)
pt3dadd(72.595, 254.502, -32.234, 0.586)
pt3dadd(72.609, 254.551, -32.324, 0.476)
pt3dadd(72.66, 254.578, -32.412, 0.35)
pt3dadd(72.711, 254.602, -32.5, 0.226)
}
apic[22] {pt3dclear()
pt3dadd(70.015, 128.711, -4, 2.286)
pt3dadd(70.053, 128.737, -4.041, 2.23)
pt3dadd(70.12, 128.784, -4.114, 2.134)
pt3dadd(70.187, 128.831, -4.187, 2.038)
pt3dadd(70.254, 128.878, -4.26, 1.94)
pt3dadd(70.321, 128.924, -4.333, 1.844)
pt3dadd(70.388, 128.972, -4.406, 1.748)
pt3dadd(70.455, 129.02, -4.479, 1.65)
pt3dadd(70.523, 129.067, -4.552, 1.554)
pt3dadd(70.59, 129.114, -4.625, 1.458)
pt3dadd(70.657, 129.161, -4.698, 1.36)
pt3dadd(70.724, 129.208, -4.771, 1.264)
pt3dadd(70.791, 129.256, -4.844, 1.168)
pt3dadd(70.858, 129.302, -4.917, 1.072)
pt3dadd(70.925, 129.349, -4.99, 0.974)
pt3dadd(70.992, 129.396, -5.063, 0.878)
pt3dadd(71.023, 129.452, -5.141, 0.798)
pt3dadd(71.013, 129.551, -5.188, 0.754)
pt3dadd(71.001, 129.665, -5.219, 0.754)
pt3dadd(70.991, 129.758, -5.278, 0.768)
pt3dadd(70.983, 129.832, -5.356, 0.83)
pt3dadd(70.973, 129.93, -5.413, 0.968)
pt3dadd(70.961, 130.04, -5.448, 1.052)
pt3dadd(70.949, 130.156, -5.476, 1.094)
pt3dadd(70.937, 130.27, -5.5, 1.132)
pt3dadd(70.925, 130.39, -5.503, 1.142)
pt3dadd(70.912, 130.508, -5.505, 1.152)
pt3dadd(70.899, 130.628, -5.507, 1.162)
pt3dadd(70.887, 130.747, -5.509, 1.172)
pt3dadd(70.877, 130.854, -5.531, 1.182)
pt3dadd(70.877, 130.918, -5.616, 1.194)
pt3dadd(70.887, 130.974, -5.699, 1.202)
pt3dadd(70.969, 130.982, -5.772, 1.178)
pt3dadd(71.05, 130.991, -5.845, 1.154)
pt3dadd(71.124, 131.02, -5.92, 1.09)
pt3dadd(71.201, 131.051, -5.989, 1.024)
pt3dadd(71.311, 131.096, -5.994, 0.958)
pt3dadd(71.422, 131.142, -5.999, 0.894)
pt3dadd(71.537, 131.164, -6.015, 0.834)
pt3dadd(71.654, 131.177, -6.035, 0.776)
pt3dadd(71.761, 131.214, -6.068, 0.752)
pt3dadd(71.867, 131.252, -6.1, 0.728)
pt3dadd(71.881, 131.371, -6.1, 0.708)
pt3dadd(71.895, 131.49, -6.1, 0.688)
pt3dadd(71.917, 131.609, -6.102, 0.69)
pt3dadd(71.946, 131.725, -6.107, 0.712)
pt3dadd(71.967, 131.839, -6.12, 0.748)
pt3dadd(71.961, 131.952, -6.154, 0.826)
pt3dadd(71.955, 132.065, -6.189, 0.904)
pt3dadd(72.018, 132.167, -6.191, 0.95)
pt3dadd(72.081, 132.269, -6.193, 0.996)
pt3dadd(72.144, 132.371, -6.196, 1.042)
pt3dadd(72.207, 132.473, -6.198, 1.088)
pt3dadd(72.274, 132.568, -6.2, 1.134)
pt3dadd(72.393, 132.588, -6.2, 1.174)
pt3dadd(72.507, 132.618, -6.2, 1.2)
pt3dadd(72.604, 132.688, -6.2, 1.178)
pt3dadd(72.7, 132.76, -6.2, 1.156)
pt3dadd(72.75, 132.869, -6.2, 1.132)
pt3dadd(72.799, 132.978, -6.2, 1.11)
pt3dadd(72.804, 133.092, -6.223, 1.088)
pt3dadd(72.798, 133.207, -6.252, 1.066)
pt3dadd(72.797, 133.322, -6.276, 1.034)
pt3dadd(72.802, 133.44, -6.295, 0.99)
pt3dadd(72.807, 133.553, -6.324, 0.946)
pt3dadd(72.816, 133.642, -6.39, 0.908)
pt3dadd(72.824, 133.732, -6.456, 0.87)
pt3dadd(72.832, 133.822, -6.522, 0.83)
pt3dadd(72.841, 133.912, -6.588, 0.792)
pt3dadd(72.848, 133.946, -6.676, 0.732)
pt3dadd(72.855, 133.955, -6.776, 0.662)
pt3dadd(72.895, 134.027, -6.844, 0.64)
pt3dadd(72.934, 134.113, -6.9, 0.63)
pt3dadd(72.926, 134.233, -6.905, 0.658)
pt3dadd(72.918, 134.352, -6.908, 0.686)
pt3dadd(72.92, 134.456, -6.937, 0.72)
pt3dadd(72.94, 134.53, -7.014, 0.774)
pt3dadd(73.006, 134.575, -7.064, 0.816)
pt3dadd(73.123, 134.587, -7.081, 0.846)
pt3dadd(73.241, 134.6, -7.098, 0.874)
pt3dadd(73.356, 134.633, -7.1, 0.878)
pt3dadd(73.466, 134.676, -7.1, 0.878)
pt3dadd(73.551, 134.76, -7.1, 0.878)
pt3dadd(73.637, 134.843, -7.1, 0.88)
pt3dadd(73.75, 134.873, -7.12, 0.934)
pt3dadd(73.865, 134.902, -7.139, 0.99)
pt3dadd(73.945, 134.935, -7.2, 1.102)
pt3dadd(74.013, 134.972, -7.278, 1.236)
pt3dadd(74.035, 135.07, -7.322, 1.374)
pt3dadd(74.05, 135.18, -7.361, 1.512)
pt3dadd(74.09, 135.282, -7.396, 1.692)
pt3dadd(74.169, 135.364, -7.426, 1.732)
pt3dadd(74.221, 135.415, -7.484, 1.762)
pt3dadd(74.23, 135.418, -7.583, 1.774)
pt3dadd(74.238, 135.422, -7.683, 1.784)
pt3dadd(74.246, 135.426, -7.783, 1.796)
pt3dadd(74.254, 135.431, -7.882, 1.806)
pt3dadd(74.256, 135.431, -7.982, 1.816)
pt3dadd(74.256, 135.431, -8.082, 1.824)
pt3dadd(74.256, 135.431, -8.182, 1.832)
pt3dadd(74.26, 135.431, -8.282, 1.834)
pt3dadd(74.264, 135.432, -8.382, 1.834)
pt3dadd(74.269, 135.432, -8.482, 1.834)
pt3dadd(74.361, 135.442, -8.542, 1.8)
pt3dadd(74.459, 135.452, -8.598, 1.766)
pt3dadd(74.528, 135.46, -8.678, 1.722)
pt3dadd(74.589, 135.466, -8.764, 1.676)
pt3dadd(74.63, 135.45, -8.854, 1.634)
pt3dadd(74.658, 135.416, -8.948, 1.592)
pt3dadd(74.687, 135.384, -9.041, 1.552)
pt3dadd(74.715, 135.35, -9.134, 1.51)
pt3dadd(74.743, 135.319, -9.228, 1.468)
pt3dadd(74.757, 135.274, -9.319, 1.432)
pt3dadd(74.765, 135.222, -9.409, 1.398)
pt3dadd(74.773, 135.172, -9.499, 1.364)
pt3dadd(74.781, 135.119, -9.589, 1.33)
pt3dadd(74.789, 135.068, -9.68, 1.296)
pt3dadd(74.83, 135.024, -9.762, 1.17)
pt3dadd(74.928, 134.977, -9.801, 1.156)
pt3dadd(75.02, 134.929, -9.843, 1.156)
pt3dadd(75.029, 134.88, -9.934, 1.174)
pt3dadd(75.039, 134.83, -10.025, 1.192)
pt3dadd(75.058, 134.791, -10.115, 1.212)
pt3dadd(75.118, 134.797, -10.201, 1.246)
pt3dadd(75.178, 134.803, -10.287, 1.28)
pt3dadd(75.287, 134.76, -10.305, 1.296)
pt3dadd(75.396, 134.714, -10.322, 1.31)
pt3dadd(75.506, 134.669, -10.339, 1.326)
pt3dadd(75.546, 134.641, -10.408, 1.344)
pt3dadd(75.548, 134.621, -10.507, 1.362)
pt3dadd(75.551, 134.599, -10.605, 1.382)
pt3dadd(75.573, 134.564, -10.699, 1.394)
pt3dadd(75.596, 134.527, -10.793, 1.406)
pt3dadd(75.662, 134.513, -10.874, 1.394)
pt3dadd(75.733, 134.5, -10.954, 1.382)
pt3dadd(75.849, 134.488, -10.975, 1.314)
pt3dadd(75.966, 134.477, -10.995, 1.246)
pt3dadd(76.07, 134.428, -11.017, 1.196)
pt3dadd(76.171, 134.369, -11.04, 1.15)
pt3dadd(76.271, 134.309, -11.063, 1.104)
pt3dadd(76.372, 134.25, -11.086, 1.058)
pt3dadd(76.479, 134.209, -11.104, 1.02)
pt3dadd(76.598, 134.202, -11.116, 0.992)
pt3dadd(76.717, 134.196, -11.128, 0.966)
pt3dadd(76.836, 134.189, -11.141, 0.938)
pt3dadd(76.955, 134.182, -11.153, 0.912)
}
}
proc shape3d_165() {
apic[22] { pt3dadd(77.074, 134.176, -11.164, 0.884)
pt3dadd(77.18, 134.142, -11.198, 0.874)
pt3dadd(77.284, 134.104, -11.237, 0.868)
pt3dadd(77.387, 134.064, -11.275, 0.862)
pt3dadd(77.491, 134.026, -11.314, 0.856)
pt3dadd(77.578, 133.988, -11.371, 0.854)
pt3dadd(77.671, 133.968, -11.431, 0.842)
pt3dadd(77.766, 133.949, -11.49, 0.828)
pt3dadd(77.878, 133.931, -11.523, 0.81)
pt3dadd(77.99, 133.912, -11.556, 0.79)
pt3dadd(78.077, 133.902, -11.61, 0.782)
pt3dadd(78.116, 133.906, -11.705, 0.792)
pt3dadd(78.156, 133.91, -11.799, 0.804)
pt3dadd(78.199, 133.914, -11.892, 0.828)
pt3dadd(78.241, 133.919, -11.986, 0.852)
pt3dadd(78.284, 133.924, -12.079, 0.876)
pt3dadd(78.395, 133.936, -12.096, 0.912)
pt3dadd(78.514, 133.948, -12.104, 0.946)
pt3dadd(78.63, 133.96, -12.118, 0.98)
pt3dadd(78.719, 133.969, -12.185, 0.988)
pt3dadd(78.808, 133.979, -12.252, 0.998)
pt3dadd(78.891, 133.987, -12.323, 1.004)
pt3dadd(78.958, 133.994, -12.405, 1.004)
pt3dadd(79.028, 133.993, -12.483, 1.004)
pt3dadd(79.113, 133.924, -12.524, 0.994)
pt3dadd(79.197, 133.855, -12.566, 0.986)
pt3dadd(79.287, 133.79, -12.6, 0.982)
pt3dadd(79.396, 133.74, -12.6, 0.992)
pt3dadd(79.505, 133.691, -12.6, 1.004)
pt3dadd(79.62, 133.702, -12.627, 1.014)
pt3dadd(79.734, 133.714, -12.655, 1.026)
pt3dadd(79.851, 133.726, -12.674, 1.034)
pt3dadd(79.97, 133.739, -12.686, 1.044)
pt3dadd(80.088, 133.751, -12.698, 1.054)
pt3dadd(80.207, 133.764, -12.7, 1.04)
pt3dadd(80.327, 133.776, -12.7, 1.024)
pt3dadd(80.446, 133.789, -12.7, 1.006)
pt3dadd(80.565, 133.801, -12.7, 0.996)
pt3dadd(80.685, 133.813, -12.7, 0.984)
pt3dadd(80.804, 133.826, -12.7, 0.974)
pt3dadd(80.923, 133.838, -12.7, 0.962)
pt3dadd(81.043, 133.852, -12.7, 0.952)
pt3dadd(81.162, 133.864, -12.7, 0.942)
pt3dadd(81.282, 133.877, -12.7, 0.93)
pt3dadd(81.39, 133.924, -12.7, 0.908)
pt3dadd(81.498, 133.978, -12.7, 0.886)
pt3dadd(81.606, 134.032, -12.7, 0.862)
pt3dadd(81.713, 134.083, -12.7, 0.84)
pt3dadd(81.821, 134.137, -12.7, 0.816)
pt3dadd(81.932, 134.179, -12.7, 0.78)
pt3dadd(82.049, 134.206, -12.7, 0.724)
pt3dadd(82.142, 134.274, -12.7, 0.68)
pt3dadd(82.221, 134.364, -12.7, 0.646)
pt3dadd(82.318, 134.426, -12.7, 0.628)
pt3dadd(82.433, 134.459, -12.7, 0.628)
pt3dadd(82.549, 134.49, -12.7, 0.628)
pt3dadd(82.656, 134.503, -12.741, 0.668)
pt3dadd(82.763, 134.515, -12.785, 0.714)
pt3dadd(82.87, 134.526, -12.83, 0.774)
pt3dadd(82.977, 134.537, -12.875, 0.84)
pt3dadd(83.086, 134.549, -12.914, 0.888)
pt3dadd(83.199, 134.561, -12.946, 0.912)
pt3dadd(83.312, 134.573, -12.979, 0.934)
pt3dadd(83.425, 134.585, -13.011, 0.958)
pt3dadd(83.538, 134.597, -13.043, 0.98)
pt3dadd(83.651, 134.608, -13.075, 1.002)
pt3dadd(83.76, 134.62, -13.117, 1.014)
pt3dadd(83.868, 134.63, -13.159, 1.022)
pt3dadd(83.976, 134.642, -13.201, 1.032)
pt3dadd(84.084, 134.653, -13.243, 1.042)
pt3dadd(84.192, 134.665, -13.285, 1.052)
pt3dadd(84.307, 134.677, -13.311, 1.058)
pt3dadd(84.425, 134.689, -13.327, 1.062)
pt3dadd(84.542, 134.702, -13.344, 1.066)
pt3dadd(84.66, 134.714, -13.36, 1.07)
pt3dadd(84.778, 134.726, -13.377, 1.074)
pt3dadd(84.895, 134.738, -13.393, 1.078)
pt3dadd(85.014, 134.752, -13.4, 1.122)
pt3dadd(85.133, 134.764, -13.4, 1.212)
pt3dadd(85.253, 134.777, -13.4, 1.298)
pt3dadd(85.372, 134.789, -13.4, 1.346)
pt3dadd(85.491, 134.802, -13.4, 1.356)
pt3dadd(85.61, 134.814, -13.407, 1.34)
pt3dadd(85.694, 134.836, -13.465, 1.314)
pt3dadd(85.76, 134.863, -13.545, 1.288)
pt3dadd(85.805, 134.905, -13.63, 1.242)
pt3dadd(85.842, 134.952, -13.717, 1.19)
pt3dadd(85.898, 134.988, -13.8, 1.126)
pt3dadd(85.958, 135.022, -13.882, 1.06)
pt3dadd(85.966, 135.134, -13.897, 1)
pt3dadd(85.97, 135.253, -13.906, 0.938)
pt3dadd(85.977, 135.352, -13.946, 0.882)
pt3dadd(85.99, 135.422, -14.026, 0.83)
pt3dadd(86.026, 135.47, -14.108, 0.766)
pt3dadd(86.054, 135.517, -14.197, 0.754)
pt3dadd(86.075, 135.566, -14.286, 0.754)
pt3dadd(86.106, 135.662, -14.334, 0.762)
pt3dadd(86.138, 135.768, -14.374, 0.772)
pt3dadd(86.156, 135.877, -14.4, 0.788)
pt3dadd(86.148, 135.997, -14.4, 0.814)
pt3dadd(86.14, 136.117, -14.4, 0.84)
pt3dadd(86.167, 136.22, -14.421, 0.874)
pt3dadd(86.237, 136.301, -14.466, 0.916)
pt3dadd(86.306, 136.381, -14.512, 0.96)
pt3dadd(86.371, 136.46, -14.564, 1.01)
pt3dadd(86.433, 136.536, -14.622, 1.068)
pt3dadd(86.487, 136.578, -14.702, 1.09)
pt3dadd(86.539, 136.61, -14.788, 1.104)
pt3dadd(86.542, 136.703, -14.845, 1.084)
pt3dadd(86.538, 136.805, -14.898, 1.06)
pt3dadd(86.529, 136.907, -14.95, 1.02)
pt3dadd(86.518, 137.01, -15, 0.974)
pt3dadd(86.508, 137.102, -15.062, 0.914)
pt3dadd(86.499, 137.19, -15.127, 0.848)
pt3dadd(86.487, 137.304, -15.16, 0.816)
pt3dadd(86.475, 137.416, -15.193, 0.784)
pt3dadd(86.463, 137.534, -15.203, 0.772)
pt3dadd(86.45, 137.653, -15.207, 0.762)
pt3dadd(86.438, 137.773, -15.211, 0.754)
pt3dadd(86.455, 137.851, -15.281, 0.766)
pt3dadd(86.479, 137.923, -15.356, 0.778)
pt3dadd(86.58, 137.981, -15.379, 0.792)
pt3dadd(86.679, 138.041, -15.403, 0.804)
pt3dadd(86.693, 138.131, -15.468, 0.822)
pt3dadd(86.708, 138.22, -15.533, 0.838)
pt3dadd(86.723, 138.31, -15.599, 0.856)
pt3dadd(86.738, 138.4, -15.664, 0.872)
pt3dadd(86.774, 138.469, -15.737, 0.882)
pt3dadd(86.822, 138.529, -15.814, 0.888)
pt3dadd(86.87, 138.588, -15.891, 0.894)
pt3dadd(86.918, 138.649, -15.968, 0.9)
pt3dadd(86.942, 138.716, -16.043, 0.904)
pt3dadd(86.933, 138.798, -16.118, 0.904)
pt3dadd(86.925, 138.877, -16.191, 0.904)
pt3dadd(86.917, 138.958, -16.265, 0.904)
pt3dadd(86.908, 139.037, -16.34, 0.904)
pt3dadd(86.9, 139.111, -16.418, 0.894)
pt3dadd(86.894, 139.177, -16.502, 0.874)
pt3dadd(86.887, 139.242, -16.585, 0.854)
pt3dadd(86.88, 139.308, -16.669, 0.834)
pt3dadd(86.873, 139.374, -16.752, 0.814)
pt3dadd(86.869, 139.45, -16.828, 0.796)
pt3dadd(86.873, 139.54, -16.893, 0.78)
pt3dadd(86.916, 139.634, -16.943, 0.81)
pt3dadd(86.948, 139.718, -17.004, 0.852)
pt3dadd(86.955, 139.778, -17.091, 0.924)
pt3dadd(86.975, 139.848, -17.162, 0.99)
pt3dadd(87.036, 139.948, -17.185, 1.03)
pt3dadd(87.085, 140.052, -17.202, 1.054)
pt3dadd(87.115, 140.17, -17.207, 1.054)
pt3dadd(87.139, 140.284, -17.217, 1.052)
pt3dadd(87.128, 140.389, -17.264, 1.038)
pt3dadd(87.117, 140.494, -17.312, 1.024)
pt3dadd(87.106, 140.599, -17.359, 1.01)
pt3dadd(87.095, 140.704, -17.406, 0.994)
pt3dadd(87.084, 140.809, -17.454, 0.98)
pt3dadd(87.073, 140.91, -17.507, 0.946)
pt3dadd(87.064, 140.998, -17.573, 0.93)
pt3dadd(87.056, 141.073, -17.651, 0.93)
pt3dadd(87.049, 141.144, -17.73, 0.938)
pt3dadd(87.042, 141.212, -17.813, 0.96)
pt3dadd(87.035, 141.274, -17.898, 0.986)
pt3dadd(87.031, 141.312, -17.992, 1.018)
pt3dadd(87.027, 141.352, -18.087, 1.05)
pt3dadd(87.022, 141.358, -18.186, 1.07)
pt3dadd(87.018, 141.358, -18.286, 1.088)
pt3dadd(87.013, 141.356, -18.386, 1.104)
pt3dadd(86.997, 141.355, -18.485, 1.116)
pt3dadd(86.979, 141.353, -18.584, 1.128)
pt3dadd(86.962, 141.352, -18.683, 1.142)
pt3dadd(86.945, 141.349, -18.781, 1.154)
pt3dadd(86.928, 141.348, -18.88, 1.166)
pt3dadd(86.91, 141.346, -18.979, 1.178)
pt3dadd(86.907, 141.346, -19.079, 1.192)
pt3dadd(86.907, 141.346, -19.179, 1.206)
pt3dadd(86.907, 141.346, -19.279, 1.22)
pt3dadd(86.907, 141.346, -19.379, 1.234)
pt3dadd(86.907, 141.346, -19.479, 1.25)
pt3dadd(86.907, 141.346, -19.579, 1.264)
pt3dadd(86.907, 141.346, -19.679, 1.278)
pt3dadd(86.935, 141.348, -19.776, 1.302)
pt3dadd(86.971, 141.352, -19.871, 1.33)
pt3dadd(87.006, 141.356, -19.966, 1.356)
pt3dadd(87.042, 141.36, -20.062, 1.382)
pt3dadd(87.078, 141.364, -20.157, 1.41)
pt3dadd(87.121, 141.365, -20.249, 1.436)
pt3dadd(87.196, 141.354, -20.327, 1.458)
pt3dadd(87.27, 141.344, -20.405, 1.48)
pt3dadd(87.345, 141.335, -20.483, 1.502)
pt3dadd(87.419, 141.324, -20.561, 1.524)
pt3dadd(87.496, 141.288, -20.63, 1.54)
pt3dadd(87.574, 141.236, -20.692, 1.552)
pt3dadd(87.652, 141.186, -20.755, 1.564)
pt3dadd(87.73, 141.136, -20.818, 1.576)
pt3dadd(87.784, 141.077, -20.89, 1.578)
pt3dadd(87.822, 141.013, -20.969, 1.572)
pt3dadd(87.859, 140.95, -21.048, 1.568)
pt3dadd(87.897, 140.886, -21.127, 1.562)
pt3dadd(87.928, 140.815, -21.202, 1.552)
pt3dadd(87.941, 140.722, -21.263, 1.532)
}
}
proc shape3d_166() {
apic[22] { pt3dadd(87.954, 140.628, -21.324, 1.512)
pt3dadd(87.966, 140.532, -21.385, 1.492)
pt3dadd(87.979, 140.438, -21.446, 1.47)
pt3dadd(88.007, 140.345, -21.5, 1.414)
pt3dadd(88.07, 140.255, -21.539, 1.274)
pt3dadd(88.106, 140.18, -21.61, 1.18)
pt3dadd(88.149, 140.111, -21.683, 1.1)
pt3dadd(88.214, 140.065, -21.757, 1.07)
pt3dadd(88.289, 140.042, -21.829, 1.064)
pt3dadd(88.376, 140.052, -21.897, 1.088)
pt3dadd(88.464, 140.062, -21.965, 1.116)
pt3dadd(88.551, 140.07, -22.033, 1.152)
pt3dadd(88.639, 140.08, -22.101, 1.182)
pt3dadd(88.733, 140.089, -22.163, 1.192)
pt3dadd(88.826, 140.099, -22.225, 1.202)
pt3dadd(88.919, 140.108, -22.288, 1.212)
pt3dadd(89.012, 140.119, -22.35, 1.222)
pt3dadd(89.1, 140.128, -22.417, 1.232)
pt3dadd(89.169, 140.135, -22.499, 1.236)
pt3dadd(89.238, 140.142, -22.58, 1.242)
pt3dadd(89.306, 140.149, -22.662, 1.246)
pt3dadd(89.375, 140.156, -22.744, 1.252)
pt3dadd(89.45, 140.165, -22.82, 1.256)
pt3dadd(89.553, 140.176, -22.87, 1.262)
pt3dadd(89.657, 140.186, -22.92, 1.266)
pt3dadd(89.76, 140.197, -22.97, 1.272)
pt3dadd(89.863, 140.208, -23.02, 1.276)
pt3dadd(89.967, 140.219, -23.07, 1.28)
pt3dadd(90.064, 140.23, -23.127, 1.276)
pt3dadd(90.162, 140.239, -23.185, 1.27)
pt3dadd(90.259, 140.25, -23.242, 1.266)
pt3dadd(90.357, 140.26, -23.3, 1.26)
pt3dadd(90.455, 140.27, -23.358, 1.256)
pt3dadd(90.545, 140.28, -23.423, 1.256)
pt3dadd(90.636, 140.29, -23.487, 1.256)
pt3dadd(90.727, 140.299, -23.552, 1.256)
pt3dadd(90.818, 140.309, -23.617, 1.256)
pt3dadd(90.906, 140.318, -23.684, 1.256)
pt3dadd(90.96, 140.323, -23.773, 1.26)
pt3dadd(91.013, 140.329, -23.862, 1.266)
pt3dadd(91.067, 140.335, -23.952, 1.27)
pt3dadd(91.12, 140.34, -24.041, 1.276)
pt3dadd(91.174, 140.346, -24.131, 1.28)
pt3dadd(91.223, 140.351, -24.221, 1.334)
pt3dadd(91.234, 140.352, -24.321, 1.356)
pt3dadd(91.234, 140.352, -24.421, 1.362)
pt3dadd(91.234, 140.352, -24.521, 1.392)
pt3dadd(91.234, 140.352, -24.621, 1.446)
pt3dadd(91.237, 140.353, -24.72, 1.512)
pt3dadd(91.264, 140.356, -24.817, 1.532)
pt3dadd(91.34, 140.363, -24.891, 1.492)
pt3dadd(91.445, 140.375, -24.938, 1.45)
pt3dadd(91.556, 140.386, -24.967, 1.382)
pt3dadd(91.67, 140.398, -24.944, 1.304)
pt3dadd(91.755, 140.407, -24.877, 1.218)
pt3dadd(91.831, 140.416, -24.8, 1.13)
}
apic[23] {pt3dclear()
pt3dadd(77.74, 121.8, -2.9, 0.98)
pt3dadd(77.7, 121.757, -2.929, 1.06)
pt3dadd(77.63, 121.68, -2.979, 1.2)
pt3dadd(77.56, 121.603, -3.029, 1.34)
pt3dadd(77.49, 121.526, -3.079, 1.482)
pt3dadd(77.42, 121.45, -3.13, 1.622)
pt3dadd(77.35, 121.373, -3.18, 1.762)
pt3dadd(77.28, 121.296, -3.23, 1.904)
pt3dadd(77.21, 121.219, -3.28, 2.044)
pt3dadd(77.14, 121.144, -3.331, 2.184)
pt3dadd(77.071, 121.067, -3.381, 2.326)
pt3dadd(77.001, 120.99, -3.431, 2.466)
pt3dadd(76.931, 120.913, -3.482, 2.606)
pt3dadd(76.861, 120.836, -3.532, 2.748)
pt3dadd(76.791, 120.76, -3.582, 2.888)
pt3dadd(76.761, 120.655, -3.6, 2.872)
pt3dadd(76.754, 120.535, -3.6, 2.768)
pt3dadd(76.747, 120.416, -3.6, 2.666)
pt3dadd(76.74, 120.296, -3.6, 2.562)
pt3dadd(76.732, 120.176, -3.6, 2.458)
pt3dadd(76.725, 120.056, -3.6, 2.356)
pt3dadd(76.713, 119.937, -3.6, 2.274)
pt3dadd(76.698, 119.818, -3.6, 2.21)
pt3dadd(76.683, 119.699, -3.6, 2.144)
pt3dadd(76.668, 119.58, -3.6, 2.08)
pt3dadd(76.653, 119.461, -3.6, 2.016)
pt3dadd(76.638, 119.342, -3.6, 1.95)
pt3dadd(76.608, 119.226, -3.6, 1.886)
pt3dadd(76.572, 119.112, -3.6, 1.82)
pt3dadd(76.536, 118.997, -3.6, 1.752)
pt3dadd(76.501, 118.882, -3.6, 1.686)
pt3dadd(76.465, 118.768, -3.6, 1.62)
pt3dadd(76.413, 118.662, -3.6, 1.556)
pt3dadd(76.339, 118.567, -3.6, 1.496)
pt3dadd(76.265, 118.473, -3.6, 1.436)
pt3dadd(76.191, 118.379, -3.6, 1.374)
pt3dadd(76.117, 118.284, -3.6, 1.314)
pt3dadd(76.057, 118.182, -3.6, 1.258)
pt3dadd(76.015, 118.069, -3.6, 1.21)
pt3dadd(75.973, 117.957, -3.6, 1.162)
pt3dadd(75.931, 117.845, -3.6, 1.114)
pt3dadd(75.889, 117.732, -3.6, 1.066)
pt3dadd(75.835, 117.628, -3.6, 1.012)
pt3dadd(75.744, 117.55, -3.6, 0.942)
pt3dadd(75.655, 117.471, -3.6, 0.878)
pt3dadd(75.59, 117.369, -3.6, 0.866)
pt3dadd(75.526, 117.268, -3.6, 0.854)
pt3dadd(75.502, 117.151, -3.6, 0.854)
pt3dadd(75.481, 117.033, -3.6, 0.854)
pt3dadd(75.478, 116.914, -3.6, 0.85)
pt3dadd(75.491, 116.795, -3.6, 0.842)
pt3dadd(75.503, 116.675, -3.6, 0.832)
pt3dadd(75.462, 116.576, -3.6, 0.818)
pt3dadd(75.374, 116.496, -3.6, 0.796)
pt3dadd(75.285, 116.415, -3.6, 0.776)
pt3dadd(75.196, 116.335, -3.6, 0.754)
pt3dadd(75.123, 116.24, -3.6, 0.73)
pt3dadd(75.051, 116.143, -3.6, 0.708)
pt3dadd(75.012, 116.031, -3.6, 0.69)
pt3dadd(74.989, 115.914, -3.604, 0.678)
pt3dadd(74.992, 115.801, -3.633, 0.678)
pt3dadd(74.999, 115.734, -3.71, 0.678)
pt3dadd(75.003, 115.698, -3.805, 0.684)
pt3dadd(75.01, 115.627, -3.883, 0.734)
pt3dadd(74.988, 115.53, -3.935, 0.784)
pt3dadd(74.954, 115.431, -3.984, 0.824)
pt3dadd(74.91, 115.32, -3.994, 0.86)
pt3dadd(74.866, 115.209, -3.999, 0.896)
pt3dadd(74.824, 115.097, -4.001, 1.056)
pt3dadd(74.773, 115.013, -4.058, 1.104)
pt3dadd(74.723, 114.929, -4.115, 1.154)
pt3dadd(74.672, 114.844, -4.173, 1.204)
pt3dadd(74.622, 114.76, -4.23, 1.252)
pt3dadd(74.584, 114.678, -4.297, 1.302)
pt3dadd(74.547, 114.597, -4.363, 1.35)
pt3dadd(74.511, 114.516, -4.43, 1.398)
pt3dadd(74.474, 114.435, -4.497, 1.446)
pt3dadd(74.417, 114.363, -4.561, 1.456)
pt3dadd(74.355, 114.294, -4.624, 1.456)
pt3dadd(74.293, 114.224, -4.687, 1.456)
pt3dadd(74.231, 114.155, -4.75, 1.456)
pt3dadd(74.19, 114.062, -4.801, 1.426)
pt3dadd(74.157, 113.961, -4.848, 1.384)
pt3dadd(74.124, 113.861, -4.895, 1.344)
pt3dadd(74.091, 113.76, -4.942, 1.302)
pt3dadd(74.058, 113.656, -4.984, 1.252)
pt3dadd(74.027, 113.55, -5.022, 1.19)
pt3dadd(73.996, 113.443, -5.06, 1.126)
pt3dadd(73.964, 113.337, -5.097, 1.064)
pt3dadd(73.932, 113.231, -5.136, 1.002)
pt3dadd(73.884, 113.154, -5.202, 0.966)
pt3dadd(73.836, 113.077, -5.267, 0.928)
pt3dadd(73.789, 113, -5.333, 0.892)
pt3dadd(73.741, 112.923, -5.398, 0.854)
pt3dadd(73.699, 112.813, -5.416, 0.842)
pt3dadd(73.657, 112.702, -5.432, 0.83)
pt3dadd(73.571, 112.632, -5.468, 0.854)
pt3dadd(73.491, 112.557, -5.5, 0.878)
pt3dadd(73.463, 112.44, -5.5, 0.878)
pt3dadd(73.436, 112.323, -5.5, 0.878)
pt3dadd(73.439, 112.205, -5.5, 0.878)
pt3dadd(73.452, 112.085, -5.5, 0.878)
pt3dadd(73.464, 111.966, -5.5, 0.878)
pt3dadd(73.444, 111.865, -5.543, 0.898)
pt3dadd(73.414, 111.769, -5.598, 0.922)
pt3dadd(73.385, 111.673, -5.653, 0.948)
pt3dadd(73.343, 111.594, -5.718, 1.008)
pt3dadd(73.297, 111.521, -5.788, 1.078)
pt3dadd(73.231, 111.446, -5.838, 1.18)
pt3dadd(73.187, 111.373, -5.908, 1.18)
pt3dadd(73.142, 111.3, -5.978, 1.18)
pt3dadd(73.098, 111.227, -6.049, 1.18)
pt3dadd(73.068, 111.148, -6.117, 1.17)
pt3dadd(73.075, 111.077, -6.194, 1.136)
pt3dadd(73.077, 111.055, -6.291, 1.13)
pt3dadd(73.064, 111.052, -6.391, 1.13)
pt3dadd(73.027, 111.049, -6.485, 1.13)
pt3dadd(72.973, 111.043, -6.575, 1.13)
pt3dadd(72.916, 111.019, -6.659, 1.102)
pt3dadd(72.872, 110.925, -6.696, 1.062)
pt3dadd(72.85, 110.807, -6.7, 1.054)
pt3dadd(72.826, 110.69, -6.7, 1.02)
pt3dadd(72.792, 110.575, -6.7, 0.954)
pt3dadd(72.788, 110.457, -6.711, 0.93)
pt3dadd(72.795, 110.339, -6.728, 0.93)
pt3dadd(72.802, 110.229, -6.754, 0.932)
pt3dadd(72.806, 110.19, -6.849, 0.964)
pt3dadd(72.81, 110.151, -6.943, 0.996)
pt3dadd(72.816, 110.101, -7.033, 1.156)
pt3dadd(72.826, 110.003, -7.091, 1.18)
pt3dadd(72.836, 109.905, -7.148, 1.206)
pt3dadd(72.846, 109.808, -7.206, 1.23)
pt3dadd(72.857, 109.71, -7.263, 1.256)
pt3dadd(72.867, 109.613, -7.321, 1.28)
pt3dadd(72.877, 109.517, -7.381, 1.296)
pt3dadd(72.887, 109.422, -7.441, 1.31)
pt3dadd(72.897, 109.326, -7.501, 1.326)
pt3dadd(72.907, 109.231, -7.561, 1.34)
pt3dadd(72.917, 109.135, -7.621, 1.356)
pt3dadd(72.929, 109.023, -7.654, 1.352)
pt3dadd(72.941, 108.91, -7.686, 1.346)
pt3dadd(72.953, 108.797, -7.718, 1.342)
pt3dadd(72.965, 108.684, -7.75, 1.338)
pt3dadd(72.977, 108.571, -7.783, 1.334)
}
}
proc shape3d_167() {
apic[23] { pt3dadd(72.989, 108.455, -7.805, 1.328)
pt3dadd(73.001, 108.336, -7.815, 1.32)
pt3dadd(73.014, 108.218, -7.826, 1.312)
pt3dadd(73.026, 108.099, -7.836, 1.304)
pt3dadd(73.039, 107.98, -7.847, 1.296)
pt3dadd(73.051, 107.862, -7.857, 1.288)
pt3dadd(73.064, 107.743, -7.867, 1.278)
pt3dadd(73.076, 107.624, -7.872, 1.26)
pt3dadd(73.089, 107.505, -7.877, 1.242)
pt3dadd(73.101, 107.385, -7.882, 1.222)
pt3dadd(73.114, 107.266, -7.887, 1.204)
pt3dadd(73.126, 107.147, -7.892, 1.184)
pt3dadd(73.139, 107.028, -7.897, 1.166)
pt3dadd(73.151, 106.91, -7.911, 1.146)
pt3dadd(73.163, 106.794, -7.936, 1.124)
pt3dadd(73.175, 106.679, -7.961, 1.102)
pt3dadd(73.188, 106.564, -7.986, 1.08)
pt3dadd(73.2, 106.448, -8.011, 1.058)
pt3dadd(73.212, 106.333, -8.036, 1.036)
pt3dadd(73.224, 106.218, -8.063, 1.018)
pt3dadd(73.236, 106.103, -8.09, 1)
pt3dadd(73.248, 105.988, -8.118, 0.982)
pt3dadd(73.26, 105.873, -8.146, 0.964)
pt3dadd(73.272, 105.759, -8.173, 0.946)
pt3dadd(73.284, 105.644, -8.2, 0.93)
pt3dadd(73.274, 105.524, -8.2, 0.924)
pt3dadd(73.264, 105.405, -8.2, 0.92)
pt3dadd(73.254, 105.285, -8.2, 0.916)
pt3dadd(73.245, 105.165, -8.2, 0.912)
pt3dadd(73.235, 105.046, -8.2, 0.908)
pt3dadd(73.224, 104.926, -8.2, 0.904)
pt3dadd(73.186, 104.813, -8.2, 0.894)
pt3dadd(73.147, 104.699, -8.2, 0.884)
pt3dadd(73.108, 104.586, -8.2, 0.876)
pt3dadd(73.069, 104.472, -8.2, 0.866)
pt3dadd(73.03, 104.359, -8.2, 0.856)
pt3dadd(72.988, 104.246, -8.2, 0.85)
pt3dadd(72.946, 104.134, -8.2, 0.846)
pt3dadd(72.904, 104.022, -8.2, 0.84)
pt3dadd(72.861, 103.909, -8.2, 0.836)
pt3dadd(72.819, 103.797, -8.2, 0.832)
pt3dadd(72.765, 103.691, -8.2, 0.836)
pt3dadd(72.7, 103.59, -8.2, 0.846)
pt3dadd(72.625, 103.5, -8.209, 0.876)
pt3dadd(72.534, 103.427, -8.233, 0.928)
pt3dadd(72.478, 103.358, -8.285, 0.974)
pt3dadd(72.457, 103.292, -8.367, 1.014)
pt3dadd(72.455, 103.202, -8.427, 1.022)
pt3dadd(72.466, 103.095, -8.471, 1.012)
pt3dadd(72.465, 102.991, -8.519, 0.982)
pt3dadd(72.446, 102.89, -8.57, 0.928)
pt3dadd(72.443, 102.774, -8.595, 0.914)
pt3dadd(72.439, 102.658, -8.621, 0.898)
pt3dadd(72.436, 102.542, -8.646, 0.884)
pt3dadd(72.433, 102.426, -8.672, 0.87)
pt3dadd(72.429, 102.31, -8.697, 0.856)
pt3dadd(72.438, 102.211, -8.752, 0.85)
pt3dadd(72.449, 102.113, -8.809, 0.844)
pt3dadd(72.459, 102.015, -8.867, 0.84)
pt3dadd(72.469, 101.918, -8.924, 0.834)
pt3dadd(72.479, 101.82, -8.982, 0.83)
pt3dadd(72.484, 101.713, -9.025, 0.834)
pt3dadd(72.487, 101.604, -9.067, 0.838)
pt3dadd(72.491, 101.495, -9.109, 0.842)
pt3dadd(72.494, 101.386, -9.151, 0.848)
pt3dadd(72.498, 101.277, -9.193, 0.852)
pt3dadd(72.491, 101.187, -9.258, 0.854)
pt3dadd(72.483, 101.1, -9.326, 0.854)
pt3dadd(72.474, 101.013, -9.395, 0.854)
pt3dadd(72.465, 100.926, -9.464, 0.854)
pt3dadd(72.463, 100.832, -9.522, 0.854)
pt3dadd(72.474, 100.72, -9.557, 0.854)
pt3dadd(72.486, 100.608, -9.591, 0.854)
pt3dadd(72.498, 100.496, -9.626, 0.854)
pt3dadd(72.51, 100.384, -9.661, 0.854)
pt3dadd(72.521, 100.272, -9.695, 0.854)
pt3dadd(72.534, 100.154, -9.7, 0.84)
pt3dadd(72.546, 100.035, -9.7, 0.822)
pt3dadd(72.559, 99.915, -9.7, 0.806)
pt3dadd(72.571, 99.802, -9.729, 0.786)
pt3dadd(72.583, 99.689, -9.762, 0.764)
pt3dadd(72.594, 99.584, -9.807, 0.748)
pt3dadd(72.604, 99.485, -9.863, 0.736)
pt3dadd(72.614, 99.389, -9.922, 0.736)
pt3dadd(72.624, 99.295, -9.984, 0.76)
pt3dadd(72.633, 99.211, -10.052, 0.796)
pt3dadd(72.639, 99.158, -10.142, 0.88)
pt3dadd(72.647, 99.079, -10.215, 0.922)
pt3dadd(72.656, 98.991, -10.283, 0.948)
pt3dadd(72.665, 98.902, -10.35, 0.974)
pt3dadd(72.675, 98.814, -10.417, 0.998)
pt3dadd(72.684, 98.726, -10.484, 1.024)
pt3dadd(72.7, 98.63, -10.543, 1.038)
pt3dadd(72.719, 98.532, -10.598, 1.048)
pt3dadd(72.738, 98.433, -10.653, 1.058)
pt3dadd(72.756, 98.335, -10.708, 1.068)
pt3dadd(72.775, 98.237, -10.764, 1.08)
pt3dadd(72.802, 98.125, -10.791, 1.076)
pt3dadd(72.829, 98.012, -10.816, 1.07)
pt3dadd(72.856, 97.9, -10.842, 1.066)
pt3dadd(72.884, 97.787, -10.868, 1.06)
pt3dadd(72.911, 97.674, -10.893, 1.056)
pt3dadd(72.913, 97.556, -10.9, 1.042)
pt3dadd(72.906, 97.436, -10.9, 1.026)
pt3dadd(72.899, 97.317, -10.9, 1.01)
pt3dadd(72.891, 97.197, -10.9, 0.994)
pt3dadd(72.884, 97.077, -10.9, 0.976)
pt3dadd(72.877, 96.957, -10.9, 0.96)
pt3dadd(72.882, 96.838, -10.9, 0.952)
pt3dadd(72.895, 96.718, -10.9, 0.948)
pt3dadd(72.907, 96.599, -10.9, 0.944)
pt3dadd(72.92, 96.48, -10.9, 0.942)
pt3dadd(72.933, 96.36, -10.9, 0.938)
pt3dadd(72.945, 96.241, -10.9, 0.934)
pt3dadd(72.958, 96.122, -10.9, 0.93)
pt3dadd(72.97, 96.002, -10.9, 0.932)
pt3dadd(72.983, 95.883, -10.9, 0.934)
pt3dadd(72.995, 95.764, -10.9, 0.938)
pt3dadd(73.008, 95.644, -10.9, 0.942)
pt3dadd(73.02, 95.525, -10.9, 0.946)
pt3dadd(73.033, 95.406, -10.9, 0.95)
pt3dadd(73.045, 95.286, -10.9, 0.952)
pt3dadd(73.058, 95.167, -10.9, 0.968)
pt3dadd(73.071, 95.048, -10.9, 0.99)
pt3dadd(73.083, 94.928, -10.9, 1.012)
pt3dadd(73.096, 94.809, -10.9, 1.032)
pt3dadd(73.108, 94.69, -10.9, 1.054)
pt3dadd(73.121, 94.57, -10.9, 1.076)
pt3dadd(73.133, 94.451, -10.9, 1.098)
pt3dadd(73.146, 94.333, -10.911, 1.114)
pt3dadd(73.158, 94.215, -10.927, 1.126)
pt3dadd(73.17, 94.097, -10.943, 1.138)
pt3dadd(73.183, 93.979, -10.96, 1.15)
pt3dadd(73.195, 93.862, -10.976, 1.162)
pt3dadd(73.208, 93.744, -10.993, 1.174)
pt3dadd(73.22, 93.625, -11, 1.184)
pt3dadd(73.233, 93.506, -11, 1.192)
pt3dadd(73.245, 93.387, -11, 1.198)
pt3dadd(73.258, 93.267, -11, 1.206)
pt3dadd(73.27, 93.148, -11, 1.212)
pt3dadd(73.283, 93.029, -11, 1.22)
pt3dadd(73.295, 92.909, -11, 1.228)
pt3dadd(73.308, 92.79, -11, 1.224)
pt3dadd(73.32, 92.671, -11, 1.214)
pt3dadd(73.333, 92.551, -11, 1.202)
pt3dadd(73.345, 92.432, -11, 1.192)
pt3dadd(73.358, 92.313, -11, 1.182)
pt3dadd(73.371, 92.193, -11, 1.17)
pt3dadd(73.383, 92.074, -11, 1.16)
pt3dadd(73.396, 91.955, -11, 1.146)
pt3dadd(73.408, 91.835, -11, 1.132)
pt3dadd(73.421, 91.716, -11, 1.118)
pt3dadd(73.433, 91.597, -11, 1.104)
pt3dadd(73.446, 91.477, -11, 1.09)
pt3dadd(73.458, 91.358, -11, 1.076)
pt3dadd(73.471, 91.239, -11, 1.062)
pt3dadd(73.483, 91.119, -11, 1.042)
pt3dadd(73.496, 91, -11, 1.022)
pt3dadd(73.509, 90.881, -11, 1)
pt3dadd(73.521, 90.761, -11, 0.978)
pt3dadd(73.534, 90.642, -11, 0.956)
pt3dadd(73.546, 90.522, -11, 0.934)
pt3dadd(73.559, 90.403, -11, 0.914)
pt3dadd(73.571, 90.285, -11.009, 0.894)
pt3dadd(73.584, 90.167, -11.026, 0.878)
pt3dadd(73.596, 90.049, -11.042, 0.862)
pt3dadd(73.608, 89.932, -11.059, 0.846)
pt3dadd(73.621, 89.814, -11.075, 0.828)
pt3dadd(73.633, 89.696, -11.092, 0.812)
pt3dadd(73.645, 89.578, -11.108, 0.8)
pt3dadd(73.658, 89.461, -11.124, 0.792)
pt3dadd(73.67, 89.343, -11.141, 0.784)
pt3dadd(73.683, 89.225, -11.157, 0.774)
pt3dadd(73.695, 89.108, -11.174, 0.766)
pt3dadd(73.707, 88.99, -11.19, 0.758)
pt3dadd(73.72, 88.872, -11.2, 0.754)
pt3dadd(73.732, 88.752, -11.2, 0.758)
pt3dadd(73.745, 88.633, -11.2, 0.762)
pt3dadd(73.757, 88.513, -11.2, 0.766)
pt3dadd(73.77, 88.394, -11.2, 0.77)
pt3dadd(73.782, 88.275, -11.2, 0.772)
pt3dadd(73.795, 88.155, -11.2, 0.776)
pt3dadd(73.808, 88.036, -11.2, 0.778)
pt3dadd(73.82, 87.917, -11.2, 0.778)
pt3dadd(73.833, 87.797, -11.2, 0.778)
pt3dadd(73.845, 87.678, -11.2, 0.778)
pt3dadd(73.858, 87.559, -11.2, 0.778)
pt3dadd(73.87, 87.439, -11.2, 0.778)
pt3dadd(73.883, 87.32, -11.2, 0.778)
pt3dadd(73.913, 87.206, -11.2, 0.78)
pt3dadd(73.969, 87.1, -11.2, 0.784)
pt3dadd(74.025, 86.994, -11.2, 0.79)
pt3dadd(74.081, 86.888, -11.2, 0.794)
pt3dadd(74.137, 86.781, -11.2, 0.8)
pt3dadd(74.192, 86.675, -11.2, 0.804)
pt3dadd(74.204, 86.557, -11.215, 0.808)
pt3dadd(74.217, 86.439, -11.229, 0.812)
pt3dadd(74.229, 86.321, -11.243, 0.816)
pt3dadd(74.241, 86.203, -11.258, 0.82)
pt3dadd(74.254, 86.085, -11.272, 0.824)
}
}
proc shape3d_168() {
apic[23] { pt3dadd(74.266, 85.966, -11.287, 0.828)
pt3dadd(74.279, 85.847, -11.292, 0.842)
pt3dadd(74.291, 85.728, -11.295, 0.856)
pt3dadd(74.304, 85.609, -11.298, 0.87)
pt3dadd(74.316, 85.489, -11.302, 0.886)
pt3dadd(74.329, 85.37, -11.305, 0.9)
pt3dadd(74.342, 85.251, -11.308, 0.916)
pt3dadd(74.354, 85.132, -11.313, 0.93)
pt3dadd(74.366, 85.02, -11.348, 0.948)
pt3dadd(74.378, 84.908, -11.382, 0.968)
pt3dadd(74.389, 84.796, -11.417, 0.986)
pt3dadd(74.401, 84.684, -11.452, 1.004)
pt3dadd(74.413, 84.572, -11.486, 1.022)
pt3dadd(74.437, 84.458, -11.5, 1.034)
pt3dadd(74.469, 84.343, -11.5, 1.042)
pt3dadd(74.501, 84.227, -11.5, 1.052)
pt3dadd(74.533, 84.111, -11.5, 1.06)
pt3dadd(74.565, 83.996, -11.5, 1.068)
pt3dadd(74.597, 83.88, -11.5, 1.076)
pt3dadd(74.619, 83.762, -11.503, 1.074)
pt3dadd(74.631, 83.643, -11.508, 1.062)
pt3dadd(74.644, 83.524, -11.513, 1.052)
pt3dadd(74.656, 83.405, -11.518, 1.04)
pt3dadd(74.669, 83.286, -11.523, 1.028)
pt3dadd(74.681, 83.166, -11.528, 1.018)
pt3dadd(74.694, 83.047, -11.532, 1.006)
pt3dadd(74.706, 82.928, -11.542, 0.984)
pt3dadd(74.719, 82.81, -11.553, 0.96)
pt3dadd(74.731, 82.691, -11.563, 0.936)
pt3dadd(74.744, 82.572, -11.574, 0.914)
pt3dadd(74.756, 82.454, -11.584, 0.89)
pt3dadd(74.769, 82.335, -11.595, 0.866)
pt3dadd(74.789, 82.224, -11.623, 0.838)
pt3dadd(74.817, 82.122, -11.67, 0.806)
pt3dadd(74.844, 82.02, -11.717, 0.774)
pt3dadd(74.872, 81.918, -11.764, 0.742)
pt3dadd(74.9, 81.816, -11.811, 0.71)
pt3dadd(74.946, 81.71, -11.834, 0.696)
pt3dadd(74.998, 81.604, -11.85, 0.686)
pt3dadd(75.05, 81.497, -11.866, 0.674)
pt3dadd(75.102, 81.391, -11.882, 0.664)
pt3dadd(75.154, 81.284, -11.898, 0.654)
pt3dadd(75.201, 81.18, -11.926, 0.648)
pt3dadd(75.246, 81.075, -11.957, 0.642)
pt3dadd(75.292, 80.97, -11.988, 0.638)
pt3dadd(75.338, 80.866, -12.019, 0.632)
pt3dadd(75.389, 80.766, -12.052, 0.628)
pt3dadd(75.465, 80.684, -12.089, 0.628)
pt3dadd(75.541, 80.602, -12.126, 0.628)
pt3dadd(75.617, 80.521, -12.163, 0.628)
pt3dadd(75.692, 80.439, -12.2, 0.628)
pt3dadd(75.761, 80.351, -12.237, 0.614)
pt3dadd(75.819, 80.258, -12.272, 0.606)
pt3dadd(75.837, 80.144, -12.301, 0.628)
pt3dadd(75.855, 80.03, -12.329, 0.65)
pt3dadd(75.923, 79.949, -12.371, 0.678)
pt3dadd(76, 79.881, -12.418, 0.704)
pt3dadd(76.082, 79.876, -12.491, 0.718)
pt3dadd(76.159, 79.858, -12.557, 0.726)
pt3dadd(76.203, 79.747, -12.569, 0.706)
pt3dadd(76.247, 79.637, -12.581, 0.686)
pt3dadd(76.291, 79.526, -12.593, 0.666)
pt3dadd(76.344, 79.42, -12.602, 0.648)
pt3dadd(76.411, 79.32, -12.607, 0.636)
pt3dadd(76.48, 79.225, -12.621, 0.66)
pt3dadd(76.519, 79.121, -12.645, 0.724)
pt3dadd(76.538, 79.005, -12.662, 0.754)
pt3dadd(76.557, 78.888, -12.679, 0.784)
pt3dadd(76.577, 78.771, -12.697, 0.814)
pt3dadd(76.596, 78.655, -12.714, 0.846)
pt3dadd(76.615, 78.538, -12.731, 0.876)
pt3dadd(76.628, 78.423, -12.758, 0.916)
pt3dadd(76.64, 78.308, -12.785, 0.958)
pt3dadd(76.652, 78.192, -12.8, 0.988)
pt3dadd(76.665, 78.072, -12.8, 1.004)
pt3dadd(76.677, 77.953, -12.8, 1.02)
pt3dadd(76.714, 77.842, -12.8, 1.04)
pt3dadd(76.779, 77.741, -12.8, 1.062)
pt3dadd(76.852, 77.648, -12.8, 1.094)
pt3dadd(76.953, 77.584, -12.8, 1.152)
pt3dadd(77.049, 77.515, -12.8, 1.208)
pt3dadd(77.102, 77.407, -12.8, 1.226)
pt3dadd(77.154, 77.299, -12.8, 1.246)
pt3dadd(77.207, 77.191, -12.8, 1.266)
pt3dadd(77.252, 77.081, -12.8, 1.28)
pt3dadd(77.269, 76.962, -12.8, 1.27)
pt3dadd(77.286, 76.844, -12.8, 1.262)
pt3dadd(77.312, 76.727, -12.8, 1.218)
pt3dadd(77.374, 76.628, -12.808, 1.144)
pt3dadd(77.454, 76.541, -12.826, 1.122)
pt3dadd(77.535, 76.455, -12.843, 1.1)
pt3dadd(77.616, 76.368, -12.86, 1.078)
pt3dadd(77.696, 76.282, -12.877, 1.056)
pt3dadd(77.714, 76.182, -12.93, 1.042)
pt3dadd(77.731, 76.081, -12.983, 1.032)
pt3dadd(77.78, 75.975, -12.993, 1.03)
pt3dadd(77.833, 75.867, -12.998, 1.03)
pt3dadd(77.897, 75.766, -13, 1.044)
pt3dadd(77.968, 75.67, -13, 1.066)
pt3dadd(78.047, 75.579, -13.002, 1.074)
pt3dadd(78.133, 75.497, -13.008, 1.062)
pt3dadd(78.223, 75.428, -13.029, 1.03)
pt3dadd(78.312, 75.371, -13.071, 0.972)
pt3dadd(78.369, 75.27, -13.095, 0.934)
pt3dadd(78.426, 75.168, -13.12, 0.896)
pt3dadd(78.483, 75.067, -13.144, 0.858)
pt3dadd(78.54, 74.966, -13.168, 0.82)
pt3dadd(78.593, 74.892, -13.224, 0.764)
pt3dadd(78.643, 74.838, -13.303, 0.694)
pt3dadd(78.719, 74.774, -13.356, 0.634)
pt3dadd(78.802, 74.706, -13.4, 0.578)
pt3dadd(78.892, 74.627, -13.4, 0.578)
pt3dadd(78.983, 74.548, -13.4, 0.578)
pt3dadd(79.078, 74.475, -13.4, 0.568)
pt3dadd(79.174, 74.404, -13.4, 0.556)
pt3dadd(79.268, 74.329, -13.4, 0.538)
pt3dadd(79.357, 74.248, -13.4, 0.522)
pt3dadd(79.435, 74.158, -13.4, 0.508)
pt3dadd(79.514, 74.067, -13.4, 0.492)
pt3dadd(79.593, 73.977, -13.4, 0.478)
pt3dadd(79.672, 73.887, -13.4, 0.462)
pt3dadd(79.747, 73.799, -13.416, 0.448)
pt3dadd(79.814, 73.719, -13.464, 0.436)
pt3dadd(79.881, 73.638, -13.513, 0.424)
pt3dadd(79.948, 73.557, -13.561, 0.412)
pt3dadd(80.013, 73.476, -13.611, 0.408)
pt3dadd(80.066, 73.391, -13.667, 0.436)
pt3dadd(80.133, 73.333, -13.726, 0.474)
pt3dadd(80.222, 73.314, -13.792, 0.528)
pt3dadd(80.279, 73.255, -13.853, 0.586)
pt3dadd(80.31, 73.161, -13.91, 0.652)
pt3dadd(80.34, 73.058, -13.952, 0.692)
pt3dadd(80.37, 72.948, -13.983, 0.716)
pt3dadd(80.415, 72.844, -14.012, 0.746)
pt3dadd(80.478, 72.75, -14.043, 0.78)
pt3dadd(80.539, 72.673, -14.1, 0.796)
pt3dadd(80.588, 72.594, -14.162, 0.804)
pt3dadd(80.617, 72.513, -14.232, 0.804)
pt3dadd(80.638, 72.414, -14.273, 0.798)
pt3dadd(80.65, 72.295, -14.285, 0.79)
pt3dadd(80.663, 72.177, -14.298, 0.78)
pt3dadd(80.675, 72.058, -14.3, 0.778)
pt3dadd(80.688, 71.938, -14.3, 0.778)
pt3dadd(80.7, 71.819, -14.3, 0.778)
pt3dadd(80.713, 71.7, -14.3, 0.808)
pt3dadd(80.726, 71.58, -14.3, 0.846)
pt3dadd(80.728, 71.46, -14.3, 0.864)
pt3dadd(80.728, 71.34, -14.3, 0.876)
pt3dadd(80.728, 71.22, -14.3, 0.888)
pt3dadd(80.728, 71.1, -14.3, 0.898)
pt3dadd(80.727, 70.98, -14.3, 0.91)
pt3dadd(80.727, 70.86, -14.3, 0.922)
pt3dadd(80.719, 70.741, -14.3, 0.932)
pt3dadd(80.702, 70.622, -14.3, 0.942)
pt3dadd(80.684, 70.504, -14.3, 0.95)
pt3dadd(80.666, 70.385, -14.3, 0.96)
pt3dadd(80.648, 70.266, -14.3, 0.968)
pt3dadd(80.631, 70.148, -14.3, 0.976)
pt3dadd(80.611, 70.029, -14.3, 0.976)
pt3dadd(80.59, 69.911, -14.3, 0.972)
pt3dadd(80.569, 69.793, -14.3, 0.968)
pt3dadd(80.548, 69.675, -14.3, 0.962)
pt3dadd(80.527, 69.557, -14.3, 0.958)
pt3dadd(80.506, 69.439, -14.3, 0.954)
pt3dadd(80.467, 69.325, -14.3, 0.95)
pt3dadd(80.428, 69.212, -14.3, 0.944)
pt3dadd(80.389, 69.098, -14.3, 0.94)
pt3dadd(80.35, 68.985, -14.3, 0.934)
pt3dadd(80.311, 68.871, -14.3, 0.93)
pt3dadd(80.309, 68.753, -14.3, 0.916)
pt3dadd(80.316, 68.633, -14.3, 0.898)
pt3dadd(80.325, 68.513, -14.3, 0.88)
pt3dadd(80.337, 68.394, -14.3, 0.864)
pt3dadd(80.349, 68.274, -14.3, 0.848)
pt3dadd(80.362, 68.155, -14.3, 0.83)
pt3dadd(80.341, 68.039, -14.314, 0.808)
pt3dadd(80.315, 67.923, -14.329, 0.784)
pt3dadd(80.28, 67.815, -14.36, 0.778)
pt3dadd(80.241, 67.71, -14.396, 0.778)
pt3dadd(80.142, 67.65, -14.4, 0.792)
pt3dadd(80.046, 67.582, -14.4, 0.804)
pt3dadd(79.976, 67.485, -14.4, 0.804)
pt3dadd(79.905, 67.388, -14.4, 0.804)
pt3dadd(79.834, 67.292, -14.4, 0.804)
pt3dadd(79.763, 67.195, -14.4, 0.804)
pt3dadd(79.71, 67.09, -14.4, 0.802)
pt3dadd(79.686, 66.972, -14.4, 0.798)
pt3dadd(79.662, 66.855, -14.4, 0.792)
pt3dadd(79.638, 66.737, -14.4, 0.788)
pt3dadd(79.615, 66.62, -14.4, 0.784)
pt3dadd(79.591, 66.502, -14.4, 0.78)
pt3dadd(79.584, 66.383, -14.4, 0.8)
pt3dadd(79.595, 66.263, -14.4, 0.892)
pt3dadd(79.608, 66.144, -14.4, 1.016)
pt3dadd(79.607, 66.024, -14.4, 1.08)
pt3dadd(79.581, 65.908, -14.403, 1.026)
pt3dadd(79.541, 65.8, -14.429, 0.872)
pt3dadd(79.527, 65.712, -14.495, 0.734)
pt3dadd(79.485, 65.648, -14.567, 0.678)
pt3dadd(79.373, 65.623, -14.597, 0.712)
}
}
proc shape3d_169() {
apic[23] { pt3dadd(79.258, 65.611, -14.624, 0.744)
pt3dadd(79.155, 65.585, -14.667, 0.702)
pt3dadd(79.076, 65.502, -14.696, 0.692)
pt3dadd(78.997, 65.418, -14.724, 0.68)
pt3dadd(78.918, 65.334, -14.753, 0.668)
pt3dadd(78.839, 65.251, -14.782, 0.656)
pt3dadd(78.798, 65.146, -14.81, 0.634)
pt3dadd(78.769, 65.035, -14.838, 0.608)
pt3dadd(78.752, 64.955, -14.906, 0.612)
pt3dadd(78.738, 64.884, -14.986, 0.626)
pt3dadd(78.662, 64.828, -15.04, 0.64)
pt3dadd(78.571, 64.775, -15.089, 0.652)
pt3dadd(78.464, 64.722, -15.094, 0.676)
pt3dadd(78.357, 64.669, -15.099, 0.698)
pt3dadd(78.303, 64.589, -15.145, 0.716)
pt3dadd(78.267, 64.499, -15.205, 0.732)
pt3dadd(78.231, 64.41, -15.264, 0.75)
pt3dadd(78.194, 64.341, -15.339, 0.786)
pt3dadd(78.156, 64.278, -15.418, 0.826)
pt3dadd(78.134, 64.201, -15.49, 0.884)
pt3dadd(78.137, 64.109, -15.554, 0.896)
pt3dadd(78.141, 64.023, -15.623, 0.9)
pt3dadd(78.149, 63.949, -15.701, 0.888)
pt3dadd(78.155, 63.867, -15.77, 0.878)
pt3dadd(78.15, 63.75, -15.789, 0.866)
pt3dadd(78.145, 63.632, -15.809, 0.856)
pt3dadd(78.116, 63.526, -15.848, 0.83)
pt3dadd(78.083, 63.422, -15.889, 0.804)
pt3dadd(78.052, 63.306, -15.895, 0.804)
pt3dadd(78.021, 63.191, -15.901, 0.804)
pt3dadd(77.99, 63.075, -15.907, 0.804)
pt3dadd(77.957, 62.983, -15.939, 0.8)
pt3dadd(77.92, 62.946, -16.028, 0.786)
pt3dadd(77.896, 62.91, -16.12, 0.778)
pt3dadd(77.874, 62.842, -16.187, 0.776)
pt3dadd(77.827, 62.742, -16.226, 0.77)
pt3dadd(77.781, 62.642, -16.266, 0.764)
pt3dadd(77.734, 62.542, -16.305, 0.758)
pt3dadd(77.686, 62.447, -16.35, 0.754)
pt3dadd(77.633, 62.365, -16.407, 0.754)
pt3dadd(77.572, 62.282, -16.458, 0.754)
pt3dadd(77.504, 62.198, -16.502, 0.754)
pt3dadd(77.411, 62.145, -16.543, 0.742)
pt3dadd(77.311, 62.1, -16.584, 0.73)
pt3dadd(77.295, 61.99, -16.593, 0.728)
pt3dadd(77.293, 61.87, -16.597, 0.728)
pt3dadd(77.275, 61.759, -16.614, 0.73)
pt3dadd(77.22, 61.671, -16.664, 0.74)
pt3dadd(77.164, 61.582, -16.713, 0.748)
pt3dadd(77.105, 61.513, -16.773, 0.764)
pt3dadd(77.037, 61.478, -16.85, 0.79)
pt3dadd(77.001, 61.4, -16.89, 0.804)
pt3dadd(76.999, 61.281, -16.894, 0.804)
pt3dadd(76.996, 61.161, -16.897, 0.804)
pt3dadd(76.993, 61.041, -16.901, 0.804)
pt3dadd(76.948, 60.96, -16.964, 0.804)
pt3dadd(76.906, 60.889, -17.034, 0.808)
pt3dadd(76.875, 60.844, -17.124, 0.828)
pt3dadd(76.843, 60.8, -17.213, 0.848)
pt3dadd(76.819, 60.779, -17.308, 0.886)
pt3dadd(76.798, 60.772, -17.406, 0.936)
pt3dadd(76.771, 60.757, -17.501, 0.984)
pt3dadd(76.71, 60.706, -17.575, 1.016)
pt3dadd(76.648, 60.655, -17.649, 1.048)
pt3dadd(76.553, 60.63, -17.702, 1.054)
pt3dadd(76.449, 60.612, -17.749, 1.054)
pt3dadd(76.338, 60.598, -17.784, 0.996)
pt3dadd(76.26, 60.542, -17.838, 0.964)
pt3dadd(76.191, 60.475, -17.898, 0.946)
pt3dadd(76.122, 60.409, -17.958, 0.928)
pt3dadd(76.053, 60.342, -18.018, 0.908)
pt3dadd(75.99, 60.268, -18.076, 0.872)
pt3dadd(75.928, 60.192, -18.134, 0.828)
pt3dadd(75.866, 60.116, -18.192, 0.784)
pt3dadd(75.817, 60.033, -18.248, 0.746)
pt3dadd(75.8, 59.932, -18.301, 0.72)
pt3dadd(75.75, 59.85, -18.341, 0.696)
pt3dadd(75.645, 59.797, -18.362, 0.682)
pt3dadd(75.594, 59.729, -18.308, 0.678)
pt3dadd(75.56, 59.638, -18.253, 0.678)
pt3dadd(75.527, 59.534, -18.211, 0.678)
pt3dadd(75.487, 59.424, -18.2, 0.678)
pt3dadd(75.445, 59.312, -18.2, 0.678)
pt3dadd(75.423, 59.196, -18.2, 0.678)
pt3dadd(75.421, 59.076, -18.2, 0.678)
pt3dadd(75.419, 58.956, -18.2, 0.678)
pt3dadd(75.428, 58.84, -18.222, 0.686)
pt3dadd(75.44, 58.725, -18.25, 0.696)
pt3dadd(75.451, 58.62, -18.292, 0.706)
pt3dadd(75.461, 58.53, -18.358, 0.712)
pt3dadd(75.47, 58.44, -18.424, 0.72)
pt3dadd(75.48, 58.351, -18.49, 0.728)
pt3dadd(75.483, 58.319, -18.583, 0.744)
pt3dadd(75.485, 58.299, -18.681, 0.764)
pt3dadd(75.489, 58.257, -18.767, 0.782)
pt3dadd(75.501, 58.151, -18.811, 0.8)
pt3dadd(75.512, 58.044, -18.856, 0.816)
pt3dadd(75.523, 57.934, -18.89, 0.836)
pt3dadd(75.536, 57.814, -18.894, 0.862)
pt3dadd(75.549, 57.695, -18.898, 0.888)
pt3dadd(75.561, 57.576, -18.905, 0.914)
pt3dadd(75.568, 57.469, -18.94, 0.924)
pt3dadd(75.57, 57.373, -19, 0.914)
pt3dadd(75.572, 57.278, -19.061, 0.904)
pt3dadd(75.573, 57.182, -19.122, 0.892)
pt3dadd(75.575, 57.087, -19.182, 0.882)
pt3dadd(75.552, 56.98, -19.215, 0.868)
pt3dadd(75.518, 56.868, -19.236, 0.852)
pt3dadd(75.484, 56.755, -19.258, 0.836)
pt3dadd(75.45, 56.643, -19.279, 0.82)
pt3dadd(75.416, 56.531, -19.3, 0.804)
pt3dadd(75.386, 56.415, -19.3, 0.798)
pt3dadd(75.356, 56.298, -19.3, 0.794)
pt3dadd(75.327, 56.182, -19.3, 0.79)
pt3dadd(75.297, 56.066, -19.3, 0.784)
pt3dadd(75.267, 55.949, -19.3, 0.78)
pt3dadd(75.262, 55.831, -19.3, 0.782)
pt3dadd(75.274, 55.712, -19.3, 0.79)
pt3dadd(75.287, 55.593, -19.3, 0.796)
pt3dadd(75.299, 55.473, -19.3, 0.804)
pt3dadd(75.312, 55.354, -19.3, 0.812)
pt3dadd(75.324, 55.235, -19.3, 0.818)
pt3dadd(75.337, 55.115, -19.3, 0.826)
pt3dadd(75.324, 54.998, -19.3, 0.832)
pt3dadd(75.291, 54.883, -19.3, 0.836)
pt3dadd(75.258, 54.767, -19.3, 0.84)
pt3dadd(75.226, 54.652, -19.3, 0.846)
pt3dadd(75.193, 54.536, -19.3, 0.85)
pt3dadd(75.161, 54.421, -19.304, 0.854)
pt3dadd(75.129, 54.309, -19.328, 0.854)
pt3dadd(75.098, 54.197, -19.352, 0.854)
pt3dadd(75.067, 54.085, -19.376, 0.854)
pt3dadd(75.036, 53.972, -19.399, 0.854)
pt3dadd(75.005, 53.864, -19.433, 0.86)
pt3dadd(74.977, 53.76, -19.476, 0.872)
pt3dadd(74.948, 53.655, -19.52, 0.882)
pt3dadd(74.919, 53.551, -19.563, 0.894)
pt3dadd(74.889, 53.447, -19.606, 0.908)
pt3dadd(74.849, 53.346, -19.648, 0.93)
pt3dadd(74.809, 53.244, -19.689, 0.954)
pt3dadd(74.769, 53.142, -19.731, 0.978)
pt3dadd(74.73, 53.041, -19.773, 1.002)
pt3dadd(74.684, 52.936, -19.802, 1.024)
pt3dadd(74.637, 52.831, -19.83, 1.048)
pt3dadd(74.591, 52.725, -19.858, 1.07)
pt3dadd(74.544, 52.62, -19.885, 1.092)
pt3dadd(74.499, 52.511, -19.9, 1.084)
pt3dadd(74.457, 52.399, -19.9, 1.038)
pt3dadd(74.415, 52.286, -19.9, 0.994)
pt3dadd(74.373, 52.174, -19.9, 0.948)
pt3dadd(74.331, 52.062, -19.9, 0.904)
}
apic[24] {pt3dclear()
pt3dadd(109.576, 102.774, 5.454, 3.842)
pt3dadd(109.59, 102.701, 5.312, 3.76)
pt3dadd(109.588, 102.636, 5.191, 3.668)
pt3dadd(109.586, 102.571, 5.07, 3.574)
pt3dadd(109.584, 102.506, 4.95, 3.482)
pt3dadd(109.582, 102.441, 4.829, 3.388)
pt3dadd(109.58, 102.376, 4.708, 3.296)
pt3dadd(109.578, 102.311, 4.588, 3.204)
pt3dadd(109.576, 102.246, 4.467, 3.11)
pt3dadd(109.574, 102.18, 4.346, 3.018)
pt3dadd(109.571, 102.115, 4.226, 2.924)
pt3dadd(109.569, 102.05, 4.105, 2.832)
pt3dadd(109.567, 101.985, 3.984, 2.74)
pt3dadd(109.565, 101.92, 3.864, 2.646)
pt3dadd(109.563, 101.855, 3.743, 2.554)
pt3dadd(109.561, 101.79, 3.622, 2.462)
pt3dadd(109.559, 101.725, 3.502, 2.368)
pt3dadd(109.557, 101.66, 3.381, 2.276)
pt3dadd(109.554, 101.595, 3.26, 2.182)
pt3dadd(109.552, 101.529, 3.14, 2.09)
pt3dadd(109.55, 101.464, 3.019, 1.998)
pt3dadd(109.548, 101.399, 2.898, 1.904)
pt3dadd(109.546, 101.334, 2.778, 1.812)
pt3dadd(109.565, 101.318, 2.647, 1.808)
pt3dadd(109.584, 101.305, 2.515, 1.808)
pt3dadd(109.608, 101.292, 2.385, 1.808)
pt3dadd(109.691, 101.278, 2.271, 1.808)
pt3dadd(109.774, 101.265, 2.157, 1.808)
pt3dadd(109.903, 101.251, 2.107, 1.808)
pt3dadd(110.037, 101.238, 2.063, 1.808)
pt3dadd(110.17, 101.225, 2.014, 1.808)
pt3dadd(110.299, 101.211, 1.95, 1.808)
pt3dadd(110.427, 101.198, 1.885, 1.808)
}
apic[25] {pt3dclear()
pt3dadd(110.427, 101.198, 1.885, 1.808)
pt3dadd(110.485, 101.198, 1.831, 1.808)
pt3dadd(110.535, 101.197, 1.769, 1.808)
pt3dadd(110.586, 101.197, 1.707, 1.808)
pt3dadd(110.634, 101.197, 1.645, 1.808)
pt3dadd(110.673, 101.196, 1.579, 1.808)
pt3dadd(110.712, 101.196, 1.512, 1.808)
pt3dadd(110.722, 101.196, 1.44, 1.808)
pt3dadd(110.715, 101.196, 1.366, 1.808)
pt3dadd(110.7, 101.209, 1.297, 1.808)
pt3dadd(110.33, 101.172, 1.828, 1.186)
}
apic[26] {pt3dclear()
pt3dadd(110.427, 101.198, 1.885, 1.808)
pt3dadd(110.319, 101.179, 1.856, 1.186)
}
apic[27] {pt3dclear()
pt3dadd(110.33, 101.172, 1.828, 1.186)
pt3dadd(110.432, 101.36, 2.084, 0.24)
pt3dadd(110.425, 101.236, 2.1, 0.304)
}
}
proc shape3d_170() {
apic[27] { pt3dadd(110.418, 101.112, 2.117, 0.366)
pt3dadd(110.411, 100.988, 2.133, 0.43)
pt3dadd(110.403, 100.863, 2.149, 0.492)
pt3dadd(110.397, 100.739, 2.165, 0.554)
pt3dadd(110.413, 100.613, 2.164, 0.576)
pt3dadd(110.43, 100.487, 2.163, 0.596)
pt3dadd(110.446, 100.361, 2.161, 0.618)
pt3dadd(110.462, 100.235, 2.16, 0.64)
pt3dadd(110.478, 100.109, 2.159, 0.662)
pt3dadd(110.495, 99.982, 2.158, 0.684)
pt3dadd(110.51, 99.856, 2.159, 0.706)
pt3dadd(110.519, 99.731, 2.171, 0.728)
pt3dadd(110.529, 99.606, 2.183, 0.75)
pt3dadd(110.538, 99.48, 2.196, 0.77)
pt3dadd(110.547, 99.355, 2.208, 0.792)
pt3dadd(110.557, 99.23, 2.22, 0.814)
pt3dadd(110.558, 99.105, 2.23, 0.836)
pt3dadd(110.539, 98.98, 2.232, 0.856)
pt3dadd(110.52, 98.856, 2.234, 0.878)
pt3dadd(110.524, 98.849, 2.231, 0.878)
pt3dadd(110.539, 98.729, 2.26, 0.9)
pt3dadd(110.554, 98.61, 2.29, 0.92)
pt3dadd(110.57, 98.486, 2.3, 0.94)
pt3dadd(110.586, 98.36, 2.297, 0.958)
pt3dadd(110.603, 98.234, 2.294, 0.976)
pt3dadd(110.617, 98.121, 2.249, 1.008)
pt3dadd(110.632, 98.012, 2.196, 1.042)
pt3dadd(110.647, 97.899, 2.146, 1.066)
pt3dadd(110.662, 97.784, 2.105, 1.078)
pt3dadd(110.678, 97.658, 2.101, 1.072)
pt3dadd(110.694, 97.532, 2.096, 1.064)
pt3dadd(110.711, 97.405, 2.092, 1.056)
pt3dadd(110.727, 97.279, 2.087, 1.05)
pt3dadd(110.743, 97.153, 2.083, 1.042)
pt3dadd(110.759, 97.027, 2.078, 1.036)
pt3dadd(110.776, 96.901, 2.074, 1.024)
pt3dadd(110.792, 96.775, 2.07, 1.006)
pt3dadd(110.808, 96.648, 2.065, 0.988)
pt3dadd(110.824, 96.522, 2.061, 0.97)
pt3dadd(110.841, 96.396, 2.056, 0.952)
pt3dadd(110.857, 96.27, 2.052, 0.934)
pt3dadd(110.873, 96.144, 2.047, 0.916)
pt3dadd(110.889, 96.019, 2.033, 0.896)
pt3dadd(110.905, 95.898, 2.003, 0.874)
pt3dadd(110.921, 95.776, 1.972, 0.852)
pt3dadd(110.937, 95.655, 1.942, 0.828)
pt3dadd(110.952, 95.533, 1.912, 0.806)
pt3dadd(110.968, 95.412, 1.881, 0.784)
pt3dadd(110.984, 95.29, 1.849, 0.768)
pt3dadd(111, 95.17, 1.817, 0.756)
pt3dadd(111.015, 95.049, 1.784, 0.742)
pt3dadd(111.031, 94.928, 1.752, 0.728)
pt3dadd(111.047, 94.807, 1.719, 0.714)
pt3dadd(111.062, 94.686, 1.689, 0.702)
pt3dadd(111.078, 94.561, 1.675, 0.694)
pt3dadd(111.095, 94.435, 1.662, 0.686)
pt3dadd(111.111, 94.31, 1.649, 0.678)
pt3dadd(111.127, 94.184, 1.635, 0.67)
pt3dadd(111.143, 94.059, 1.622, 0.662)
pt3dadd(111.159, 93.933, 1.609, 0.654)
pt3dadd(111.175, 93.811, 1.581, 0.646)
pt3dadd(111.191, 93.69, 1.548, 0.638)
pt3dadd(111.207, 93.57, 1.515, 0.628)
pt3dadd(111.222, 93.449, 1.483, 0.62)
pt3dadd(111.238, 93.328, 1.45, 0.61)
pt3dadd(111.254, 93.208, 1.417, 0.6)
pt3dadd(111.269, 93.088, 1.381, 0.578)
pt3dadd(111.285, 92.969, 1.345, 0.556)
pt3dadd(111.294, 92.909, 1.26, 0.562)
pt3dadd(111.302, 92.863, 1.162, 0.572)
pt3dadd(111.315, 92.791, 1.081, 0.594)
pt3dadd(111.319, 92.784, 1.078, 0.594)
pt3dadd(111.339, 92.682, 1.017, 0.63)
pt3dadd(111.373, 92.575, 0.976, 0.674)
pt3dadd(111.43, 92.461, 0.968, 0.73)
pt3dadd(111.483, 92.345, 0.961, 0.782)
pt3dadd(111.506, 92.22, 0.958, 0.808)
pt3dadd(111.527, 92.094, 0.955, 0.83)
pt3dadd(111.543, 91.968, 0.952, 0.834)
pt3dadd(111.56, 91.842, 0.95, 0.836)
pt3dadd(111.576, 91.716, 0.947, 0.84)
pt3dadd(111.592, 91.59, 0.944, 0.844)
pt3dadd(111.609, 91.463, 0.941, 0.848)
pt3dadd(111.625, 91.337, 0.938, 0.852)
pt3dadd(111.638, 91.211, 0.935, 0.85)
pt3dadd(111.642, 91.084, 0.933, 0.84)
pt3dadd(111.645, 90.957, 0.93, 0.828)
pt3dadd(111.649, 90.83, 0.927, 0.816)
pt3dadd(111.653, 90.703, 0.924, 0.804)
pt3dadd(111.656, 90.577, 0.921, 0.792)
pt3dadd(111.66, 90.45, 0.918, 0.78)
pt3dadd(111.65, 90.324, 0.916, 0.778)
pt3dadd(111.639, 90.198, 0.913, 0.778)
pt3dadd(111.627, 90.072, 0.91, 0.778)
pt3dadd(111.616, 89.946, 0.907, 0.778)
pt3dadd(111.605, 89.82, 0.904, 0.778)
pt3dadd(111.593, 89.694, 0.901, 0.78)
pt3dadd(111.576, 89.569, 0.899, 0.8)
pt3dadd(111.559, 89.444, 0.896, 0.822)
pt3dadd(111.523, 89.326, 0.903, 0.86)
pt3dadd(111.477, 89.212, 0.917, 0.912)
pt3dadd(111.458, 89.101, 0.954, 0.93)
pt3dadd(111.452, 88.991, 1.001, 0.93)
pt3dadd(111.459, 88.892, 1.061, 0.904)
pt3dadd(111.472, 88.797, 1.127, 0.87)
pt3dadd(111.486, 88.689, 1.171, 0.846)
pt3dadd(111.502, 88.568, 1.199, 0.834)
pt3dadd(111.518, 88.448, 1.227, 0.822)
pt3dadd(111.533, 88.328, 1.255, 0.808)
pt3dadd(111.549, 88.204, 1.265, 0.814)
pt3dadd(111.565, 88.078, 1.262, 0.83)
pt3dadd(111.582, 87.951, 1.259, 0.846)
pt3dadd(111.598, 87.825, 1.256, 0.898)
pt3dadd(111.614, 87.702, 1.271, 0.936)
pt3dadd(111.63, 87.582, 1.298, 0.95)
pt3dadd(111.645, 87.461, 1.325, 0.964)
pt3dadd(111.661, 87.34, 1.352, 0.978)
pt3dadd(111.677, 87.219, 1.379, 0.992)
pt3dadd(111.692, 87.099, 1.406, 1.004)
pt3dadd(111.709, 86.973, 1.408, 1.004)
pt3dadd(111.725, 86.847, 1.41, 1.004)
pt3dadd(111.741, 86.721, 1.412, 1.004)
pt3dadd(111.757, 86.595, 1.414, 1.004)
pt3dadd(111.774, 86.468, 1.416, 1.004)
pt3dadd(111.79, 86.342, 1.419, 1.004)
pt3dadd(111.806, 86.219, 1.431, 1.004)
pt3dadd(111.821, 86.101, 1.466, 1.004)
pt3dadd(111.836, 85.984, 1.5, 1.004)
pt3dadd(111.852, 85.866, 1.534, 1.004)
pt3dadd(111.867, 85.749, 1.568, 1.004)
pt3dadd(111.882, 85.631, 1.603, 1.004)
pt3dadd(111.896, 85.528, 1.658, 0.99)
pt3dadd(111.91, 85.425, 1.716, 0.976)
pt3dadd(111.924, 85.323, 1.773, 0.96)
pt3dadd(111.938, 85.221, 1.83, 0.946)
pt3dadd(111.951, 85.118, 1.887, 0.93)
pt3dadd(111.899, 85.027, 1.936, 0.888)
pt3dadd(111.842, 84.936, 1.983, 0.842)
pt3dadd(111.787, 84.839, 2.024, 0.786)
pt3dadd(111.763, 84.73, 2.052, 0.746)
pt3dadd(111.779, 84.605, 2.061, 0.726)
pt3dadd(111.795, 84.479, 2.071, 0.708)
pt3dadd(111.811, 84.353, 2.071, 0.696)
pt3dadd(111.828, 84.227, 2.068, 0.688)
pt3dadd(111.844, 84.101, 2.065, 0.68)
pt3dadd(111.86, 83.975, 2.062, 0.696)
pt3dadd(111.876, 83.849, 2.06, 0.722)
pt3dadd(111.875, 83.723, 2.052, 0.742)
pt3dadd(111.868, 83.596, 2.044, 0.76)
pt3dadd(111.86, 83.47, 2.035, 0.776)
pt3dadd(111.853, 83.344, 2.026, 0.794)
pt3dadd(111.846, 83.218, 2.018, 0.812)
pt3dadd(111.839, 83.092, 2.008, 0.83)
pt3dadd(111.835, 82.966, 1.994, 0.848)
pt3dadd(111.832, 82.84, 1.979, 0.866)
pt3dadd(111.829, 82.715, 1.964, 0.884)
pt3dadd(111.826, 82.589, 1.949, 0.902)
pt3dadd(111.823, 82.463, 1.934, 0.92)
pt3dadd(111.83, 82.337, 1.926, 0.932)
pt3dadd(111.846, 82.211, 1.923, 0.94)
pt3dadd(111.862, 82.085, 1.92, 0.948)
pt3dadd(111.879, 81.959, 1.917, 0.954)
pt3dadd(111.895, 81.832, 1.914, 0.962)
pt3dadd(111.899, 81.826, 1.911, 0.962)
pt3dadd(111.915, 81.699, 1.909, 0.968)
pt3dadd(111.931, 81.573, 1.906, 0.976)
pt3dadd(111.943, 81.452, 1.883, 0.976)
pt3dadd(111.95, 81.335, 1.84, 0.972)
pt3dadd(111.958, 81.218, 1.798, 0.966)
pt3dadd(111.965, 81.1, 1.756, 0.962)
pt3dadd(111.973, 80.983, 1.714, 0.956)
pt3dadd(111.979, 80.862, 1.689, 0.952)
pt3dadd(111.982, 80.735, 1.686, 0.948)
pt3dadd(111.986, 80.608, 1.683, 0.944)
pt3dadd(111.989, 80.481, 1.68, 0.94)
pt3dadd(111.993, 80.355, 1.677, 0.936)
pt3dadd(111.997, 80.228, 1.675, 0.932)
pt3dadd(112, 80.101, 1.671, 0.928)
pt3dadd(112.002, 79.976, 1.65, 0.914)
pt3dadd(112.003, 79.851, 1.628, 0.9)
pt3dadd(112.004, 79.727, 1.607, 0.886)
pt3dadd(112.005, 79.602, 1.586, 0.874)
pt3dadd(112.007, 79.477, 1.565, 0.86)
pt3dadd(111.986, 79.355, 1.555, 0.848)
pt3dadd(111.951, 79.235, 1.552, 0.838)
pt3dadd(111.916, 79.114, 1.549, 0.83)
pt3dadd(111.881, 78.994, 1.546, 0.82)
pt3dadd(111.845, 78.874, 1.543, 0.81)
pt3dadd(111.819, 78.752, 1.534, 0.802)
pt3dadd(111.808, 78.629, 1.512, 0.798)
pt3dadd(111.798, 78.505, 1.489, 0.792)
pt3dadd(111.788, 78.381, 1.467, 0.788)
pt3dadd(111.778, 78.257, 1.445, 0.782)
pt3dadd(111.773, 78.133, 1.425, 0.78)
pt3dadd(111.787, 78.007, 1.417, 0.788)
pt3dadd(111.801, 77.881, 1.41, 0.796)
pt3dadd(111.815, 77.755, 1.402, 0.802)
pt3dadd(111.83, 77.628, 1.394, 0.81)
pt3dadd(111.844, 77.502, 1.386, 0.818)
pt3dadd(111.858, 77.376, 1.378, 0.826)
}
}
proc shape3d_171() {
apic[27] { pt3dadd(111.836, 77.256, 1.364, 0.84)
pt3dadd(111.795, 77.139, 1.347, 0.854)
pt3dadd(111.753, 77.022, 1.33, 0.872)
pt3dadd(111.712, 76.906, 1.313, 0.886)
pt3dadd(111.67, 76.789, 1.296, 0.902)
pt3dadd(111.623, 76.674, 1.292, 0.918)
pt3dadd(111.574, 76.559, 1.29, 0.932)
pt3dadd(111.526, 76.444, 1.287, 0.948)
pt3dadd(111.478, 76.329, 1.284, 0.962)
pt3dadd(111.43, 76.214, 1.281, 0.976)
pt3dadd(111.419, 76.089, 1.278, 0.982)
pt3dadd(111.415, 75.963, 1.275, 0.986)
pt3dadd(111.412, 75.836, 1.273, 0.992)
pt3dadd(111.408, 75.709, 1.27, 0.996)
pt3dadd(111.405, 75.583, 1.267, 1)
pt3dadd(111.401, 75.456, 1.264, 1.004)
pt3dadd(111.385, 75.331, 1.261, 0.998)
pt3dadd(111.365, 75.207, 1.258, 0.988)
pt3dadd(111.345, 75.082, 1.255, 0.98)
pt3dadd(111.325, 74.958, 1.253, 0.97)
pt3dadd(111.305, 74.833, 1.25, 0.962)
pt3dadd(111.283, 74.71, 1.247, 0.952)
pt3dadd(111.247, 74.589, 1.244, 0.932)
pt3dadd(111.212, 74.469, 1.241, 0.912)
pt3dadd(111.177, 74.349, 1.238, 0.894)
pt3dadd(111.142, 74.228, 1.236, 0.874)
pt3dadd(111.107, 74.108, 1.233, 0.856)
pt3dadd(111.091, 73.99, 1.198, 0.844)
pt3dadd(111.078, 73.872, 1.159, 0.834)
pt3dadd(111.065, 73.755, 1.121, 0.822)
pt3dadd(111.051, 73.637, 1.082, 0.812)
pt3dadd(111.032, 73.519, 1.05, 0.804)
pt3dadd(110.99, 73.402, 1.041, 0.804)
pt3dadd(110.948, 73.284, 1.031, 0.804)
pt3dadd(110.907, 73.166, 1.022, 0.804)
pt3dadd(110.865, 73.049, 1.012, 0.804)
pt3dadd(110.829, 72.929, 1.004, 0.804)
pt3dadd(110.805, 72.806, 1.002, 0.804)
pt3dadd(110.781, 72.682, 0.999, 0.804)
pt3dadd(110.733, 72.567, 0.991, 0.782)
pt3dadd(110.685, 72.453, 0.983, 0.758)
pt3dadd(110.622, 72.364, 0.936, 0.73)
pt3dadd(110.559, 72.283, 0.879, 0.702)
pt3dadd(110.517, 72.229, 0.793, 0.688)
pt3dadd(110.483, 72.158, 0.723, 0.678)
pt3dadd(110.47, 72.033, 0.709, 0.678)
pt3dadd(110.458, 71.908, 0.694, 0.678)
pt3dadd(110.446, 71.783, 0.68, 0.678)
pt3dadd(110.44, 71.657, 0.669, 0.678)
pt3dadd(110.441, 71.53, 0.661, 0.678)
pt3dadd(110.442, 71.404, 0.654, 0.678)
pt3dadd(110.384, 71.31, 0.615, 0.696)
pt3dadd(110.316, 71.221, 0.569, 0.718)
pt3dadd(110.25, 71.132, 0.523, 0.758)
pt3dadd(110.186, 71.042, 0.475, 0.814)
pt3dadd(110.14, 70.93, 0.459, 0.868)
pt3dadd(110.1, 70.812, 0.452, 0.92)
pt3dadd(110.06, 70.693, 0.445, 0.972)
pt3dadd(110.021, 70.574, 0.442, 1.018)
pt3dadd(109.983, 70.455, 0.439, 1.064)
pt3dadd(109.943, 70.336, 0.436, 1.102)
pt3dadd(109.898, 70.223, 0.411, 1.094)
pt3dadd(109.853, 70.111, 0.383, 1.084)
pt3dadd(109.807, 69.999, 0.356, 1.072)
pt3dadd(109.761, 69.887, 0.328, 1.06)
pt3dadd(109.739, 69.771, 0.298, 1.048)
pt3dadd(109.745, 69.65, 0.265, 1.034)
pt3dadd(109.75, 69.528, 0.233, 1.02)
pt3dadd(109.756, 69.407, 0.2, 1.006)
pt3dadd(109.762, 69.285, 0.168, 0.99)
pt3dadd(109.76, 69.164, 0.14, 0.978)
pt3dadd(109.763, 69.157, 0.137, 0.978)
pt3dadd(109.731, 69.036, 0.125, 0.968)
pt3dadd(109.698, 68.916, 0.113, 0.958)
pt3dadd(109.665, 68.795, 0.102, 0.948)
pt3dadd(109.633, 68.674, 0.09, 0.936)
pt3dadd(109.6, 68.556, 0.072, 0.926)
pt3dadd(109.568, 68.446, 0.027, 0.916)
pt3dadd(109.536, 68.336, -0.017, 0.904)
pt3dadd(109.504, 68.226, -0.061, 0.892)
pt3dadd(109.471, 68.115, -0.105, 0.88)
pt3dadd(109.408, 68.012, -0.122, 0.868)
pt3dadd(109.341, 67.909, -0.136, 0.854)
pt3dadd(109.3, 67.803, -0.179, 0.828)
pt3dadd(109.262, 67.698, -0.228, 0.802)
pt3dadd(109.22, 67.618, -0.3, 0.788)
pt3dadd(109.192, 67.543, -0.378, 0.77)
pt3dadd(109.189, 67.477, -0.468, 0.746)
pt3dadd(109.175, 67.398, -0.542, 0.716)
pt3dadd(109.135, 67.289, -0.583, 0.678)
pt3dadd(109.102, 67.198, -0.65, 0.666)
pt3dadd(109.07, 67.106, -0.717, 0.654)
pt3dadd(109.037, 67.015, -0.784, 0.64)
pt3dadd(109.005, 66.924, -0.851, 0.628)
pt3dadd(108.968, 66.821, -0.903, 0.634)
pt3dadd(108.931, 66.717, -0.954, 0.64)
pt3dadd(108.893, 66.613, -1.005, 0.646)
pt3dadd(108.856, 66.509, -1.055, 0.652)
pt3dadd(108.819, 66.395, -1.085, 0.672)
pt3dadd(108.783, 66.278, -1.107, 0.7)
pt3dadd(108.746, 66.16, -1.129, 0.726)
pt3dadd(108.71, 66.043, -1.151, 0.754)
pt3dadd(108.672, 65.925, -1.172, 0.78)
pt3dadd(108.622, 65.811, -1.176, 0.8)
pt3dadd(108.571, 65.698, -1.18, 0.822)
pt3dadd(108.52, 65.584, -1.185, 0.842)
pt3dadd(108.47, 65.47, -1.189, 0.864)
pt3dadd(108.419, 65.356, -1.194, 0.886)
pt3dadd(108.368, 65.243, -1.198, 0.906)
pt3dadd(108.318, 65.129, -1.202, 0.928)
pt3dadd(108.291, 65.006, -1.205, 0.958)
pt3dadd(108.267, 64.882, -1.208, 0.99)
pt3dadd(108.254, 64.767, -1.239, 0.99)
pt3dadd(108.248, 64.657, -1.293, 0.964)
pt3dadd(108.254, 64.552, -1.353, 0.926)
pt3dadd(108.267, 64.452, -1.418, 0.88)
pt3dadd(108.281, 64.346, -1.476, 0.824)
pt3dadd(108.296, 64.233, -1.523, 0.756)
pt3dadd(108.312, 64.109, -1.544, 0.742)
pt3dadd(108.328, 63.984, -1.563, 0.73)
pt3dadd(108.344, 63.859, -1.582, 0.716)
pt3dadd(108.36, 63.735, -1.602, 0.704)
pt3dadd(108.377, 63.61, -1.621, 0.692)
pt3dadd(108.393, 63.486, -1.64, 0.68)
pt3dadd(108.402, 63.365, -1.673, 0.67)
pt3dadd(108.41, 63.244, -1.707, 0.66)
pt3dadd(108.418, 63.124, -1.742, 0.65)
pt3dadd(108.426, 63.003, -1.776, 0.642)
pt3dadd(108.434, 62.882, -1.81, 0.632)
pt3dadd(108.424, 62.76, -1.831, 0.624)
pt3dadd(108.401, 62.637, -1.842, 0.62)
pt3dadd(108.378, 62.513, -1.854, 0.616)
pt3dadd(108.355, 62.39, -1.865, 0.61)
pt3dadd(108.332, 62.266, -1.877, 0.606)
pt3dadd(108.325, 62.142, -1.89, 0.606)
pt3dadd(108.342, 62.018, -1.908, 0.614)
pt3dadd(108.358, 61.893, -1.925, 0.622)
pt3dadd(108.374, 61.768, -1.942, 0.63)
pt3dadd(108.39, 61.643, -1.959, 0.638)
pt3dadd(108.406, 61.518, -1.977, 0.646)
pt3dadd(108.422, 61.395, -1.999, 0.656)
pt3dadd(108.437, 61.277, -2.039, 0.67)
pt3dadd(108.453, 61.159, -2.079, 0.684)
pt3dadd(108.468, 61.042, -2.119, 0.698)
pt3dadd(108.483, 60.924, -2.159, 0.712)
pt3dadd(108.499, 60.806, -2.199, 0.726)
pt3dadd(108.515, 60.681, -2.207, 0.738)
pt3dadd(108.531, 60.555, -2.21, 0.748)
pt3dadd(108.547, 60.429, -2.213, 0.758)
pt3dadd(108.564, 60.303, -2.216, 0.77)
pt3dadd(108.58, 60.177, -2.219, 0.78)
pt3dadd(108.596, 60.051, -2.222, 0.792)
pt3dadd(108.612, 59.924, -2.224, 0.802)
pt3dadd(108.629, 59.798, -2.227, 0.8)
pt3dadd(108.645, 59.672, -2.23, 0.796)
pt3dadd(108.661, 59.546, -2.233, 0.794)
pt3dadd(108.677, 59.42, -2.236, 0.79)
pt3dadd(108.694, 59.293, -2.239, 0.786)
pt3dadd(108.71, 59.167, -2.241, 0.782)
pt3dadd(108.726, 59.041, -2.244, 0.778)
pt3dadd(108.74, 58.921, -2.277, 0.762)
pt3dadd(108.753, 58.803, -2.315, 0.744)
pt3dadd(108.766, 58.684, -2.354, 0.724)
pt3dadd(108.779, 58.565, -2.392, 0.706)
pt3dadd(108.792, 58.446, -2.43, 0.688)
pt3dadd(108.797, 58.324, -2.451, 0.672)
pt3dadd(108.796, 58.197, -2.456, 0.66)
pt3dadd(108.795, 58.07, -2.46, 0.646)
pt3dadd(108.793, 57.944, -2.465, 0.634)
pt3dadd(108.792, 57.817, -2.47, 0.622)
pt3dadd(108.79, 57.69, -2.474, 0.61)
pt3dadd(108.797, 57.564, -2.478, 0.606)
pt3dadd(108.813, 57.438, -2.481, 0.614)
pt3dadd(108.829, 57.311, -2.484, 0.62)
pt3dadd(108.846, 57.185, -2.487, 0.628)
pt3dadd(108.862, 57.059, -2.49, 0.634)
pt3dadd(108.878, 56.933, -2.492, 0.642)
pt3dadd(108.894, 56.807, -2.495, 0.648)
pt3dadd(108.911, 56.681, -2.498, 0.662)
pt3dadd(108.927, 56.554, -2.501, 0.684)
pt3dadd(108.943, 56.428, -2.504, 0.706)
pt3dadd(108.959, 56.302, -2.507, 0.728)
pt3dadd(108.976, 56.176, -2.51, 0.748)
pt3dadd(108.992, 56.05, -2.512, 0.77)
pt3dadd(109.008, 55.923, -2.515, 0.792)
pt3dadd(109.032, 55.799, -2.518, 0.81)
pt3dadd(109.065, 55.675, -2.521, 0.826)
pt3dadd(109.098, 55.552, -2.524, 0.844)
pt3dadd(109.132, 55.429, -2.527, 0.86)
pt3dadd(109.165, 55.306, -2.529, 0.876)
pt3dadd(109.198, 55.183, -2.532, 0.892)
pt3dadd(109.228, 55.059, -2.535, 0.904)
pt3dadd(109.246, 54.933, -2.538, 0.904)
pt3dadd(109.264, 54.807, -2.541, 0.904)
pt3dadd(109.282, 54.681, -2.544, 0.904)
pt3dadd(109.3, 54.555, -2.546, 0.904)
pt3dadd(109.319, 54.429, -2.549, 0.904)
pt3dadd(109.337, 54.303, -2.552, 0.904)
pt3dadd(109.354, 54.177, -2.555, 0.894)
pt3dadd(109.37, 54.051, -2.558, 0.87)
}
}
proc shape3d_172() {
apic[27] { pt3dadd(109.387, 53.925, -2.561, 0.844)
pt3dadd(109.403, 53.799, -2.563, 0.822)
pt3dadd(109.419, 53.673, -2.566, 0.806)
pt3dadd(109.435, 53.546, -2.569, 0.788)
pt3dadd(109.451, 53.425, -2.555, 0.77)
pt3dadd(109.466, 53.311, -2.513, 0.748)
pt3dadd(109.485, 53.199, -2.47, 0.722)
pt3dadd(109.526, 53.098, -2.421, 0.684)
pt3dadd(109.574, 53.009, -2.365, 0.644)
pt3dadd(109.578, 53.003, -2.368, 0.644)
pt3dadd(109.648, 52.958, -2.294, 0.602)
pt3dadd(109.718, 52.914, -2.219, 0.56)
pt3dadd(109.774, 52.875, -2.14, 0.516)
pt3dadd(109.778, 52.868, -2.143, 0.516)
pt3dadd(109.783, 52.847, -2.046, 0.46)
pt3dadd(109.788, 52.825, -1.95, 0.404)
pt3dadd(109.793, 52.811, -1.853, 0.324)
pt3dadd(109.797, 52.804, -1.756, 0.272)
pt3dadd(109.8, 52.798, -1.659, 0.266)
pt3dadd(109.804, 52.791, -1.562, 0.258)
pt3dadd(109.808, 52.784, -1.464, 0.25)
pt3dadd(109.812, 52.777, -1.367, 0.244)
pt3dadd(109.815, 52.77, -1.27, 0.236)
pt3dadd(109.819, 52.763, -1.173, 0.23)
pt3dadd(109.823, 52.757, -1.076, 0.228)
pt3dadd(109.826, 52.75, -0.979, 0.232)
pt3dadd(109.83, 52.743, -0.881, 0.236)
pt3dadd(109.834, 52.736, -0.784, 0.238)
pt3dadd(109.837, 52.729, -0.687, 0.242)
pt3dadd(109.841, 52.722, -0.59, 0.246)
pt3dadd(109.845, 52.716, -0.493, 0.25)
pt3dadd(109.841, 52.708, -0.396, 0.256)
pt3dadd(109.83, 52.7, -0.3, 0.264)
pt3dadd(109.818, 52.691, -0.203, 0.272)
pt3dadd(109.807, 52.683, -0.107, 0.28)
pt3dadd(109.796, 52.674, -0.011, 0.288)
pt3dadd(109.785, 52.666, 0.086, 0.296)
pt3dadd(109.755, 52.644, 0.169, 0.316)
pt3dadd(109.669, 52.583, 0.215, 0.37)
pt3dadd(109.603, 52.536, 0.28, 0.424)
pt3dadd(109.564, 52.505, 0.368, 0.472)
pt3dadd(109.532, 52.499, 0.457, 0.516)
pt3dadd(109.511, 52.535, 0.545, 0.552)
pt3dadd(109.48, 52.579, 0.625, 0.578)
pt3dadd(109.423, 52.643, 0.686, 0.578)
pt3dadd(109.341, 52.664, 0.737, 0.574)
pt3dadd(109.239, 52.649, 0.78, 0.566)
pt3dadd(109.136, 52.635, 0.823, 0.56)
pt3dadd(109.033, 52.621, 0.866, 0.554)
pt3dadd(108.92, 52.597, 0.879, 0.552)
pt3dadd(108.806, 52.573, 0.889, 0.552)
pt3dadd(108.698, 52.533, 0.895, 0.56)
pt3dadd(108.6, 52.462, 0.892, 0.586)
pt3dadd(108.503, 52.39, 0.889, 0.612)
pt3dadd(108.429, 52.301, 0.886, 0.64)
pt3dadd(108.398, 52.18, 0.884, 0.672)
pt3dadd(108.364, 52.06, 0.881, 0.704)
pt3dadd(108.267, 51.989, 0.878, 0.72)
pt3dadd(108.169, 51.918, 0.875, 0.738)
pt3dadd(108.07, 51.85, 0.872, 0.752)
pt3dadd(107.955, 51.826, 0.869, 0.734)
pt3dadd(107.84, 51.802, 0.867, 0.718)
pt3dadd(107.725, 51.779, 0.864, 0.694)
pt3dadd(107.609, 51.76, 0.861, 0.648)
pt3dadd(107.494, 51.74, 0.858, 0.624)
pt3dadd(107.378, 51.721, 0.855, 0.598)
pt3dadd(107.262, 51.701, 0.852, 0.576)
pt3dadd(107.147, 51.682, 0.845, 0.568)
pt3dadd(107.031, 51.663, 0.838, 0.558)
pt3dadd(106.929, 51.639, 0.811, 0.548)
pt3dadd(106.859, 51.603, 0.733, 0.536)
pt3dadd(106.783, 51.559, 0.665, 0.538)
pt3dadd(106.697, 51.498, 0.613, 0.564)
pt3dadd(106.619, 51.463, 0.546, 0.606)
pt3dadd(106.545, 51.447, 0.468, 0.658)
pt3dadd(106.449, 51.423, 0.412, 0.706)
pt3dadd(106.352, 51.399, 0.357, 0.754)
pt3dadd(106.254, 51.334, 0.332, 0.792)
pt3dadd(106.156, 51.27, 0.306, 0.83)
pt3dadd(106.062, 51.24, 0.248, 0.866)
pt3dadd(105.969, 51.209, 0.19, 0.904)
pt3dadd(105.966, 51.091, 0.15, 0.952)
pt3dadd(105.962, 50.973, 0.109, 1.002)
pt3dadd(105.924, 50.86, 0.078, 1.026)
pt3dadd(105.884, 50.746, 0.047, 1.05)
pt3dadd(105.844, 50.633, 0.016, 1.074)
pt3dadd(105.757, 50.573, -0.024, 1.1)
pt3dadd(105.657, 50.529, -0.066, 1.124)
pt3dadd(105.616, 50.425, -0.096, 1.122)
pt3dadd(105.592, 50.306, -0.124, 1.114)
pt3dadd(105.566, 50.191, -0.157, 1.104)
pt3dadd(105.523, 50.128, -0.239, 1.09)
pt3dadd(105.477, 50.058, -0.314, 1.08)
pt3dadd(105.42, 49.97, -0.37, 1.08)
pt3dadd(105.363, 49.881, -0.425, 1.08)
pt3dadd(105.272, 49.802, -0.43, 1.09)
pt3dadd(105.179, 49.724, -0.433, 1.102)
pt3dadd(105.07, 49.68, -0.436, 1.126)
pt3dadd(104.959, 49.66, -0.462, 1.12)
pt3dadd(104.848, 49.641, -0.493, 1.11)
pt3dadd(104.746, 49.6, -0.527, 1.086)
pt3dadd(104.655, 49.533, -0.565, 1.046)
pt3dadd(104.597, 49.44, -0.604, 0.99)
pt3dadd(104.561, 49.328, -0.643, 0.922)
pt3dadd(104.534, 49.208, -0.655, 0.866)
pt3dadd(104.511, 49.084, -0.658, 0.812)
pt3dadd(104.461, 48.98, -0.671, 0.764)
pt3dadd(104.369, 48.91, -0.7, 0.728)
pt3dadd(104.307, 48.815, -0.744, 0.734)
pt3dadd(104.246, 48.72, -0.787, 0.74)
pt3dadd(104.184, 48.625, -0.83, 0.746)
pt3dadd(104.123, 48.53, -0.873, 0.754)
pt3dadd(104.039, 48.441, -0.878, 0.768)
pt3dadd(103.955, 48.352, -0.881, 0.782)
pt3dadd(103.871, 48.264, -0.884, 0.798)
pt3dadd(103.787, 48.175, -0.887, 0.812)
pt3dadd(103.702, 48.087, -0.889, 0.828)
pt3dadd(103.655, 47.972, -0.892, 0.85)
pt3dadd(103.609, 47.856, -0.895, 0.874)
pt3dadd(103.574, 47.736, -0.898, 0.896)
pt3dadd(103.543, 47.614, -0.901, 0.918)
pt3dadd(103.494, 47.507, -0.921, 0.936)
pt3dadd(103.423, 47.418, -0.962, 0.95)
pt3dadd(103.323, 47.376, -0.988, 0.96)
pt3dadd(103.209, 47.357, -1.008, 0.97)
pt3dadd(103.096, 47.337, -1.03, 0.98)
pt3dadd(102.991, 47.31, -1.071, 0.98)
pt3dadd(102.902, 47.253, -1.117, 0.98)
pt3dadd(102.822, 47.179, -1.165, 0.98)
pt3dadd(102.743, 47.105, -1.213, 0.98)
pt3dadd(102.663, 47.031, -1.262, 0.98)
pt3dadd(102.594, 46.957, -1.319, 0.966)
pt3dadd(102.536, 46.882, -1.386, 0.936)
pt3dadd(102.477, 46.801, -1.448, 0.874)
pt3dadd(102.42, 46.717, -1.508, 0.802)
pt3dadd(102.374, 46.603, -1.527, 0.7)
pt3dadd(102.326, 46.49, -1.545, 0.598)
pt3dadd(102.252, 46.396, -1.524, 0.504)
pt3dadd(102.176, 46.315, -1.496, 0.422)
pt3dadd(102.089, 46.295, -1.434, 0.392)
pt3dadd(102.001, 46.275, -1.373, 0.364)
pt3dadd(101.914, 46.255, -1.312, 0.334)
pt3dadd(101.807, 46.235, -1.288, 0.334)
pt3dadd(101.692, 46.216, -1.278, 0.342)
pt3dadd(101.577, 46.197, -1.269, 0.354)
pt3dadd(101.462, 46.177, -1.272, 0.478)
pt3dadd(101.346, 46.158, -1.274, 0.546)
pt3dadd(101.231, 46.139, -1.277, 0.612)
pt3dadd(101.115, 46.12, -1.28, 0.68)
pt3dadd(100.999, 46.116, -1.287, 0.748)
pt3dadd(100.883, 46.111, -1.295, 0.816)
pt3dadd(100.886, 46.105, -1.297, 0.816)
pt3dadd(100.785, 46.127, -1.323, 0.88)
pt3dadd(100.703, 46.183, -1.372, 0.94)
pt3dadd(100.638, 46.267, -1.397, 0.904)
}
apic[28] {pt3dclear()
pt3dadd(110.427, 101.198, 1.885, 1.808)
pt3dadd(110.557, 101.204, 1.856, 1.316)
pt3dadd(110.688, 101.21, 1.828, 1.38)
pt3dadd(110.819, 101.216, 1.799, 1.444)
pt3dadd(110.949, 101.222, 1.77, 1.51)
pt3dadd(111.08, 101.228, 1.742, 1.574)
pt3dadd(111.211, 101.234, 1.713, 1.608)
pt3dadd(111.341, 101.24, 1.684, 1.636)
pt3dadd(111.472, 101.246, 1.655, 1.664)
pt3dadd(111.603, 101.252, 1.627, 1.694)
pt3dadd(111.733, 101.258, 1.598, 1.722)
pt3dadd(111.864, 101.264, 1.569, 1.75)
pt3dadd(111.995, 101.27, 1.54, 1.78)
pt3dadd(112.125, 101.276, 1.503, 1.81)
pt3dadd(112.255, 101.281, 1.463, 1.842)
pt3dadd(112.385, 101.287, 1.424, 1.874)
pt3dadd(112.515, 101.293, 1.385, 1.906)
pt3dadd(112.645, 101.299, 1.346, 1.936)
pt3dadd(112.775, 101.305, 1.307, 1.968)
pt3dadd(112.905, 101.311, 1.27, 1.994)
pt3dadd(113.035, 101.317, 1.236, 2.012)
pt3dadd(113.166, 101.323, 1.203, 2.03)
pt3dadd(113.296, 101.329, 1.169, 2.05)
pt3dadd(113.427, 101.335, 1.135, 2.068)
pt3dadd(113.557, 101.341, 1.102, 2.088)
pt3dadd(113.688, 101.347, 1.068, 2.106)
pt3dadd(113.81, 101.352, 1.006, 2.102)
pt3dadd(113.931, 101.357, 0.937, 2.092)
pt3dadd(114.052, 101.362, 0.869, 2.082)
pt3dadd(114.173, 101.367, 0.8, 2.074)
pt3dadd(114.294, 101.372, 0.732, 2.064)
pt3dadd(114.405, 101.376, 0.651, 2.032)
pt3dadd(114.507, 101.379, 0.557, 1.976)
pt3dadd(114.61, 101.382, 0.464, 1.92)
pt3dadd(114.712, 101.385, 0.37, 1.864)
pt3dadd(114.814, 101.388, 0.277, 1.808)
pt3dadd(114.927, 101.392, 0.198, 1.748)
pt3dadd(115.049, 101.397, 0.132, 1.682)
pt3dadd(115.171, 101.402, 0.066, 1.618)
pt3dadd(115.293, 101.407, 0, 1.552)
pt3dadd(115.415, 101.412, -0.066, 1.486)
pt3dadd(115.535, 101.421, -0.134, 1.422)
pt3dadd(115.641, 101.451, -0.215, 1.36)
pt3dadd(115.748, 101.482, -0.296, 1.298)
pt3dadd(115.854, 101.513, -0.377, 1.236)
}
}
proc shape3d_173() {
apic[28] { pt3dadd(115.961, 101.543, -0.458, 1.174)
pt3dadd(116.064, 101.594, -0.528, 1.126)
pt3dadd(116.166, 101.653, -0.593, 1.086)
pt3dadd(116.268, 101.712, -0.658, 1.044)
pt3dadd(116.369, 101.772, -0.723, 1.004)
pt3dadd(116.464, 101.815, -0.804, 0.952)
pt3dadd(116.549, 101.837, -0.908, 0.886)
pt3dadd(116.626, 101.892, -0.993, 0.84)
pt3dadd(116.694, 101.982, -1.059, 0.812)
pt3dadd(116.797, 102.03, -1.122, 0.804)
pt3dadd(116.916, 102.061, -1.183, 0.804)
pt3dadd(117.033, 102.105, -1.223, 0.818)
pt3dadd(117.149, 102.156, -1.252, 0.84)
pt3dadd(117.252, 102.209, -1.304, 0.868)
pt3dadd(117.331, 102.264, -1.397, 0.912)
pt3dadd(117.409, 102.32, -1.491, 0.956)
pt3dadd(117.481, 102.396, -1.558, 1.042)
pt3dadd(117.492, 102.389, -1.587, 1.042)
pt3dadd(117.556, 102.49, -1.621, 1.186)
pt3dadd(117.599, 102.595, -1.653, 1.316)
pt3dadd(117.601, 102.708, -1.682, 1.418)
pt3dadd(117.603, 102.821, -1.711, 1.522)
pt3dadd(117.606, 102.934, -1.739, 1.624)
pt3dadd(117.606, 103.047, -1.768, 1.73)
pt3dadd(117.605, 103.16, -1.797, 1.84)
pt3dadd(117.604, 103.273, -1.826, 1.948)
pt3dadd(117.602, 103.386, -1.854, 2.076)
pt3dadd(117.601, 103.499, -1.883, 2.16)
pt3dadd(117.6, 103.611, -1.912, 2.16)
pt3dadd(117.599, 103.724, -1.94, 2.16)
pt3dadd(117.598, 103.835, -1.981, 2.154)
pt3dadd(117.597, 103.943, -2.038, 2.144)
pt3dadd(117.596, 104.051, -2.094, 2.134)
pt3dadd(117.595, 104.162, -2.139, 2.104)
pt3dadd(117.594, 104.273, -2.185, 2.076)
pt3dadd(117.596, 104.36, -2.26, 2.05)
pt3dadd(117.6, 104.414, -2.375, 2.026)
pt3dadd(117.611, 104.462, -2.492, 2.008)
pt3dadd(117.623, 104.456, -2.521, 2.008)
pt3dadd(117.653, 104.485, -2.643, 2)
pt3dadd(117.683, 104.515, -2.766, 1.994)
pt3dadd(117.714, 104.544, -2.889, 1.986)
pt3dadd(117.741, 104.55, -3.015, 1.996)
pt3dadd(117.767, 104.545, -3.143, 2.016)
pt3dadd(117.804, 104.533, -3.3, 2.034)
}
apic[29] {pt3dclear()
pt3dadd(117.804, 104.533, -3.3, 2.034)
pt3dadd(117.804, 104.533, -3.369, 2.016)
pt3dadd(117.8, 104.574, -3.459, 1.986)
pt3dadd(117.794, 104.634, -3.546, 1.952)
pt3dadd(117.787, 104.693, -3.633, 1.916)
pt3dadd(117.781, 104.753, -3.719, 1.882)
pt3dadd(117.775, 104.813, -3.806, 1.848)
pt3dadd(117.771, 104.848, -3.899, 1.804)
pt3dadd(117.769, 104.865, -3.998, 1.75)
pt3dadd(117.767, 104.882, -4.097, 1.698)
pt3dadd(117.766, 104.899, -4.196, 1.646)
pt3dadd(117.764, 104.916, -4.295, 1.592)
pt3dadd(117.762, 104.933, -4.394, 1.54)
pt3dadd(117.758, 104.971, -4.486, 1.484)
pt3dadd(117.751, 105.043, -4.566, 1.424)
pt3dadd(117.743, 105.114, -4.646, 1.364)
pt3dadd(117.735, 105.186, -4.726, 1.302)
pt3dadd(117.728, 105.258, -4.806, 1.242)
pt3dadd(117.719, 105.342, -4.874, 1.19)
pt3dadd(117.708, 105.447, -4.921, 1.152)
pt3dadd(117.697, 105.552, -4.968, 1.112)
pt3dadd(117.686, 105.658, -5.015, 1.074)
pt3dadd(117.675, 105.763, -5.063, 1.036)
pt3dadd(117.664, 105.864, -5.114, 1.002)
pt3dadd(117.655, 105.953, -5.181, 0.992)
pt3dadd(117.646, 106.041, -5.248, 0.982)
pt3dadd(117.636, 106.13, -5.316, 0.972)
pt3dadd(117.627, 106.218, -5.383, 0.962)
pt3dadd(117.62, 106.302, -5.453, 0.958)
pt3dadd(117.619, 106.373, -5.534, 0.97)
pt3dadd(117.626, 106.434, -5.617, 0.986)
pt3dadd(117.667, 106.451, -5.71, 1.02)
pt3dadd(117.708, 106.469, -5.802, 1.054)
pt3dadd(117.707, 106.54, -5.883, 1.068)
pt3dadd(117.706, 106.611, -5.963, 1.08)
pt3dadd(117.694, 106.726, -5.983, 1.08)
pt3dadd(117.682, 106.844, -6, 1.08)
pt3dadd(117.67, 106.953, -6.033, 1.08)
pt3dadd(117.661, 107.046, -6.096, 1.08)
pt3dadd(117.627, 107.157, -6.118, 1.102)
pt3dadd(117.592, 107.27, -6.137, 1.126)
pt3dadd(117.557, 107.382, -6.156, 1.15)
pt3dadd(117.522, 107.494, -6.176, 1.174)
pt3dadd(117.487, 107.607, -6.195, 1.198)
pt3dadd(117.469, 107.724, -6.2, 1.254)
pt3dadd(117.456, 107.844, -6.2, 1.322)
pt3dadd(117.444, 107.963, -6.2, 1.388)
pt3dadd(117.432, 108.078, -6.224, 1.47)
pt3dadd(117.42, 108.19, -6.258, 1.554)
pt3dadd(117.408, 108.275, -6.314, 1.616)
pt3dadd(117.398, 108.316, -6.408, 1.638)
pt3dadd(117.377, 108.352, -6.496, 1.654)
pt3dadd(117.279, 108.363, -6.554, 1.628)
pt3dadd(117.186, 108.388, -6.604, 1.604)
pt3dadd(117.114, 108.481, -6.625, 1.588)
pt3dadd(117.042, 108.574, -6.645, 1.572)
pt3dadd(116.97, 108.666, -6.666, 1.558)
pt3dadd(116.915, 108.75, -6.721, 1.57)
pt3dadd(116.869, 108.84, -6.772, 1.594)
pt3dadd(116.857, 108.953, -6.803, 1.632)
pt3dadd(116.845, 109.063, -6.842, 1.632)
pt3dadd(116.834, 109.171, -6.883, 1.63)
pt3dadd(116.825, 109.258, -6.951, 1.606)
pt3dadd(116.816, 109.346, -7.019, 1.584)
pt3dadd(116.809, 109.408, -7.104, 1.538)
pt3dadd(116.803, 109.468, -7.191, 1.492)
pt3dadd(116.8, 109.498, -7.286, 1.466)
pt3dadd(116.798, 109.518, -7.385, 1.448)
pt3dadd(116.793, 109.543, -7.482, 1.444)
pt3dadd(116.779, 109.588, -7.574, 1.512)
pt3dadd(116.753, 109.653, -7.654, 1.58)
pt3dadd(116.721, 109.725, -7.729, 1.648)
pt3dadd(116.689, 109.797, -7.805, 1.716)
pt3dadd(116.657, 109.87, -7.88, 1.784)
pt3dadd(116.634, 109.927, -7.962, 1.876)
pt3dadd(116.632, 109.947, -8.06, 2.02)
pt3dadd(116.63, 109.967, -8.159, 2.166)
pt3dadd(116.623, 110.03, -8.24, 2.292)
pt3dadd(116.614, 110.112, -8.313, 2.41)
pt3dadd(116.6, 110.159, -8.4, 2.48)
pt3dadd(116.58, 110.18, -8.497, 2.512)
pt3dadd(116.543, 110.193, -8.587, 2.53)
pt3dadd(116.462, 110.184, -8.66, 2.506)
pt3dadd(116.38, 110.177, -8.734, 2.484)
pt3dadd(116.299, 110.181, -8.807, 2.468)
pt3dadd(116.218, 110.184, -8.881, 2.454)
pt3dadd(116.137, 110.188, -8.955, 2.438)
pt3dadd(116.117, 110.256, -9.028, 2.456)
pt3dadd(116.108, 110.338, -9.101, 2.48)
pt3dadd(116.1, 110.414, -9.178, 2.562)
}
apic[30] {pt3dclear()
pt3dadd(116.1, 110.414, -9.178, 2.562)
pt3dadd(116.093, 110.478, -9.213, 2.564)
pt3dadd(116.083, 110.577, -9.268, 2.57)
pt3dadd(116.072, 110.677, -9.323, 2.574)
pt3dadd(116.062, 110.777, -9.378, 2.58)
pt3dadd(116.052, 110.876, -9.433, 2.584)
pt3dadd(116.04, 110.971, -9.493, 2.566)
pt3dadd(116.028, 111.063, -9.556, 2.53)
pt3dadd(116.015, 111.155, -9.62, 2.494)
pt3dadd(116.003, 111.247, -9.683, 2.458)
pt3dadd(115.99, 111.339, -9.747, 2.422)
pt3dadd(115.948, 111.439, -9.778, 2.328)
pt3dadd(115.891, 111.543, -9.794, 2.206)
pt3dadd(115.859, 111.645, -9.833, 2.1)
pt3dadd(115.842, 111.745, -9.885, 2.006)
pt3dadd(115.834, 111.796, -9.963, 1.94)
pt3dadd(115.834, 111.801, -10.063, 1.906)
pt3dadd(115.833, 111.806, -10.163, 1.872)
pt3dadd(115.83, 111.832, -10.259, 1.844)
pt3dadd(115.826, 111.871, -10.353, 1.824)
pt3dadd(115.812, 111.925, -10.437, 1.786)
pt3dadd(115.77, 112.018, -10.49, 1.706)
pt3dadd(115.718, 112.121, -10.518, 1.668)
pt3dadd(115.669, 112.222, -10.548, 1.632)
pt3dadd(115.662, 112.283, -10.634, 1.608)
pt3dadd(115.656, 112.343, -10.72, 1.586)
pt3dadd(115.622, 112.364, -10.813, 1.572)
pt3dadd(115.582, 112.379, -10.907, 1.56)
pt3dadd(115.555, 112.408, -11, 1.532)
pt3dadd(115.533, 112.444, -11.094, 1.496)
pt3dadd(115.521, 112.478, -11.189, 1.428)
pt3dadd(115.518, 112.51, -11.286, 1.334)
pt3dadd(115.511, 112.578, -11.368, 1.292)
pt3dadd(115.503, 112.646, -11.45, 1.252)
pt3dadd(115.496, 112.715, -11.531, 1.212)
pt3dadd(115.489, 112.783, -11.613, 1.172)
pt3dadd(115.482, 112.852, -11.695, 1.132)
pt3dadd(115.481, 112.856, -11.794, 1.068)
pt3dadd(115.481, 112.856, -11.894, 1)
pt3dadd(115.481, 112.856, -11.994, 0.934)
pt3dadd(115.473, 112.888, -12.09, 0.868)
pt3dadd(115.463, 112.922, -12.186, 0.804)
pt3dadd(115.422, 112.986, -12.253, 0.752)
pt3dadd(115.36, 113.07, -12.303, 0.71)
pt3dadd(115.335, 113.177, -12.34, 0.684)
pt3dadd(115.318, 113.288, -12.375, 0.662)
pt3dadd(115.304, 113.399, -12.41, 0.624)
pt3dadd(115.292, 113.509, -12.447, 0.574)
pt3dadd(115.283, 113.551, -12.539, 0.45)
pt3dadd(115.254, 113.565, -12.635, 0.402)
pt3dadd(115.191, 113.624, -12.696, 0.434)
pt3dadd(115.151, 113.73, -12.729, 0.452)
pt3dadd(115.116, 113.83, -12.774, 0.492)
pt3dadd(115.042, 113.916, -12.799, 0.592)
pt3dadd(114.939, 113.974, -12.797, 0.706)
pt3dadd(114.824, 113.99, -12.774, 0.864)
pt3dadd(114.72, 114.004, -12.729, 0.968)
pt3dadd(114.659, 114.092, -12.709, 0.894)
pt3dadd(114.632, 114.209, -12.705, 0.826)
pt3dadd(114.604, 114.325, -12.7, 0.758)
pt3dadd(114.574, 114.436, -12.729, 0.688)
pt3dadd(114.544, 114.546, -12.761, 0.616)
pt3dadd(114.478, 114.607, -12.82, 0.586)
pt3dadd(114.403, 114.656, -12.887, 0.564)
pt3dadd(114.324, 114.714, -12.943, 0.58)
}
}
proc shape3d_174() {
apic[30] { pt3dadd(114.241, 114.782, -12.988, 0.636)
pt3dadd(114.158, 114.863, -13.001, 0.804)
pt3dadd(114.128, 114.947, -13.068, 0.844)
pt3dadd(114.098, 115.031, -13.135, 0.882)
pt3dadd(114.068, 115.114, -13.202, 0.922)
pt3dadd(114.038, 115.198, -13.269, 0.962)
pt3dadd(114.018, 115.3, -13.309, 0.994)
pt3dadd(114.006, 115.418, -13.326, 1.024)
pt3dadd(113.993, 115.535, -13.343, 1.052)
pt3dadd(113.964, 115.611, -13.415, 1.042)
pt3dadd(113.925, 115.684, -13.471, 1.016)
pt3dadd(113.844, 115.757, -13.43, 0.94)
pt3dadd(113.765, 115.831, -13.387, 0.874)
pt3dadd(113.688, 115.907, -13.343, 0.816)
pt3dadd(113.628, 116.006, -13.333, 0.782)
pt3dadd(113.571, 116.112, -13.333, 0.754)
pt3dadd(113.555, 116.202, -13.397, 0.742)
pt3dadd(113.512, 116.271, -13.469, 0.728)
pt3dadd(113.435, 116.333, -13.526, 0.768)
pt3dadd(113.365, 116.401, -13.583, 0.806)
pt3dadd(113.308, 116.485, -13.636, 0.812)
pt3dadd(113.251, 116.569, -13.689, 0.818)
pt3dadd(113.194, 116.653, -13.743, 0.824)
pt3dadd(113.136, 116.74, -13.79, 0.83)
pt3dadd(113.076, 116.843, -13.802, 0.84)
pt3dadd(113.016, 116.946, -13.813, 0.85)
pt3dadd(112.956, 117.049, -13.824, 0.86)
pt3dadd(112.896, 117.152, -13.836, 0.872)
pt3dadd(112.834, 117.252, -13.852, 0.88)
pt3dadd(112.765, 117.339, -13.889, 0.886)
pt3dadd(112.696, 117.427, -13.926, 0.892)
pt3dadd(112.626, 117.514, -13.963, 0.898)
pt3dadd(112.557, 117.602, -13.999, 0.904)
pt3dadd(112.499, 117.706, -14.006, 0.918)
pt3dadd(112.44, 117.81, -14.013, 0.934)
pt3dadd(112.382, 117.915, -14.02, 0.948)
pt3dadd(112.323, 118.02, -14.026, 0.962)
pt3dadd(112.265, 118.124, -14.033, 0.978)
pt3dadd(112.2, 118.216, -14.066, 0.974)
pt3dadd(112.134, 118.306, -14.102, 0.968)
pt3dadd(112.068, 118.396, -14.139, 0.962)
pt3dadd(112.002, 118.486, -14.175, 0.956)
pt3dadd(111.957, 118.57, -14.233, 0.958)
pt3dadd(111.924, 118.648, -14.303, 0.964)
pt3dadd(111.891, 118.727, -14.373, 0.97)
pt3dadd(111.859, 118.805, -14.444, 0.974)
pt3dadd(111.825, 118.884, -14.514, 0.976)
pt3dadd(111.786, 118.96, -14.584, 0.966)
pt3dadd(111.747, 119.037, -14.654, 0.954)
pt3dadd(111.708, 119.114, -14.723, 0.942)
pt3dadd(111.668, 119.191, -14.793, 0.93)
pt3dadd(111.635, 119.274, -14.859, 0.934)
pt3dadd(111.601, 119.359, -14.924, 0.94)
pt3dadd(111.568, 119.443, -14.989, 0.946)
pt3dadd(111.535, 119.528, -15.055, 0.952)
pt3dadd(111.5, 119.61, -15.122, 0.96)
pt3dadd(111.465, 119.689, -15.191, 0.972)
pt3dadd(111.428, 119.768, -15.26, 0.982)
pt3dadd(111.392, 119.848, -15.328, 0.994)
pt3dadd(111.357, 119.926, -15.397, 1.008)
pt3dadd(111.321, 120.002, -15.469, 1.03)
pt3dadd(111.285, 120.079, -15.54, 1.054)
pt3dadd(111.249, 120.155, -15.611, 1.076)
pt3dadd(111.214, 120.232, -15.683, 1.1)
pt3dadd(111.184, 120.287, -15.767, 1.114)
pt3dadd(111.156, 120.336, -15.855, 1.124)
pt3dadd(111.127, 120.384, -15.943, 1.134)
pt3dadd(111.099, 120.433, -16.032, 1.146)
pt3dadd(111.07, 120.485, -16.118, 1.154)
pt3dadd(111.03, 120.565, -16.185, 1.136)
pt3dadd(110.991, 120.644, -16.252, 1.118)
pt3dadd(110.952, 120.725, -16.319, 1.102)
pt3dadd(110.912, 120.804, -16.386, 1.084)
pt3dadd(110.875, 120.89, -16.448, 1.058)
pt3dadd(110.838, 120.978, -16.509, 1.028)
pt3dadd(110.801, 121.067, -16.57, 1)
pt3dadd(110.764, 121.154, -16.631, 0.972)
pt3dadd(110.712, 121.241, -16.679, 0.946)
pt3dadd(110.638, 121.327, -16.71, 0.93)
pt3dadd(110.563, 121.414, -16.742, 0.912)
pt3dadd(110.488, 121.5, -16.773, 0.894)
pt3dadd(110.412, 121.585, -16.8, 0.88)
pt3dadd(110.322, 121.666, -16.8, 0.884)
pt3dadd(110.232, 121.745, -16.8, 0.89)
pt3dadd(110.142, 121.824, -16.8, 0.894)
pt3dadd(110.053, 121.904, -16.8, 0.9)
pt3dadd(109.969, 121.988, -16.8, 0.904)
pt3dadd(109.913, 122.094, -16.8, 0.904)
pt3dadd(109.857, 122.201, -16.8, 0.904)
pt3dadd(109.801, 122.306, -16.8, 0.904)
pt3dadd(109.745, 122.413, -16.8, 0.904)
pt3dadd(109.689, 122.519, -16.8, 0.904)
pt3dadd(109.611, 122.609, -16.8, 0.876)
pt3dadd(109.527, 122.694, -16.8, 0.842)
pt3dadd(109.431, 122.766, -16.8, 0.806)
pt3dadd(109.33, 122.831, -16.8, 0.77)
pt3dadd(109.248, 122.915, -16.8, 0.764)
pt3dadd(109.183, 123.016, -16.8, 0.788)
pt3dadd(109.129, 123.121, -16.801, 0.822)
pt3dadd(109.101, 123.238, -16.806, 0.89)
pt3dadd(109.074, 123.354, -16.81, 0.958)
pt3dadd(109.058, 123.455, -16.854, 1.078)
pt3dadd(109.033, 123.544, -16.914, 1.188)
pt3dadd(108.966, 123.622, -16.965, 1.22)
pt3dadd(108.899, 123.7, -17.017, 1.25)
pt3dadd(108.832, 123.778, -17.068, 1.28)
pt3dadd(108.765, 123.859, -17.114, 1.306)
pt3dadd(108.7, 123.956, -17.134, 1.306)
pt3dadd(108.634, 124.055, -17.153, 1.306)
pt3dadd(108.568, 124.152, -17.172, 1.306)
pt3dadd(108.503, 124.25, -17.192, 1.306)
pt3dadd(108.444, 124.354, -17.203, 1.274)
pt3dadd(108.391, 124.462, -17.208, 1.218)
pt3dadd(108.336, 124.562, -17.224, 1.15)
pt3dadd(108.275, 124.652, -17.267, 1.054)
pt3dadd(108.229, 124.753, -17.301, 0.97)
pt3dadd(108.199, 124.866, -17.326, 0.902)
pt3dadd(108.176, 124.952, -17.372, 0.842)
pt3dadd(108.168, 124.973, -17.47, 0.802)
pt3dadd(108.161, 124.993, -17.569, 0.762)
pt3dadd(108.125, 125.08, -17.615, 0.748)
pt3dadd(108.081, 125.185, -17.649, 0.74)
pt3dadd(108.038, 125.29, -17.682, 0.732)
pt3dadd(108.009, 125.401, -17.7, 0.728)
pt3dadd(107.997, 125.52, -17.7, 0.728)
pt3dadd(107.984, 125.639, -17.7, 0.728)
pt3dadd(107.972, 125.759, -17.7, 0.74)
pt3dadd(107.944, 125.874, -17.7, 0.754)
pt3dadd(107.899, 125.986, -17.7, 0.754)
pt3dadd(107.854, 126.097, -17.7, 0.754)
pt3dadd(107.809, 126.208, -17.7, 0.774)
pt3dadd(107.765, 126.319, -17.7, 0.796)
pt3dadd(107.715, 126.421, -17.726, 0.838)
pt3dadd(107.661, 126.516, -17.768, 0.89)
pt3dadd(107.642, 126.6, -17.833, 0.958)
pt3dadd(107.633, 126.682, -17.906, 1.028)
pt3dadd(107.628, 126.732, -17.994, 1.094)
pt3dadd(107.624, 126.766, -18.09, 1.156)
pt3dadd(107.588, 126.845, -18.159, 1.172)
pt3dadd(107.552, 126.924, -18.228, 1.19)
pt3dadd(107.516, 127.003, -18.296, 1.208)
pt3dadd(107.48, 127.082, -18.365, 1.224)
pt3dadd(107.424, 127.156, -18.428, 1.23)
pt3dadd(107.357, 127.224, -18.488, 1.23)
pt3dadd(107.291, 127.294, -18.549, 1.23)
pt3dadd(107.224, 127.362, -18.609, 1.23)
pt3dadd(107.152, 127.438, -18.657, 1.224)
pt3dadd(107.076, 127.517, -18.697, 1.212)
pt3dadd(107, 127.596, -18.737, 1.198)
pt3dadd(106.923, 127.675, -18.778, 1.186)
pt3dadd(106.857, 127.759, -18.822, 1.15)
pt3dadd(106.803, 127.848, -18.871, 1.08)
pt3dadd(106.75, 127.949, -18.892, 1.026)
pt3dadd(106.697, 128.057, -18.897, 0.982)
pt3dadd(106.621, 128.137, -18.906, 0.954)
pt3dadd(106.508, 128.171, -18.922, 0.954)
pt3dadd(106.407, 128.194, -18.957, 0.966)
pt3dadd(106.336, 128.192, -19.038, 1.002)
pt3dadd(106.278, 128.212, -19.115, 1.034)
pt3dadd(106.265, 128.299, -19.183, 1.056)
pt3dadd(106.252, 128.388, -19.25, 1.078)
pt3dadd(106.239, 128.476, -19.318, 1.1)
pt3dadd(106.233, 128.526, -19.406, 1.114)
pt3dadd(106.229, 128.564, -19.5, 1.124)
pt3dadd(106.221, 128.636, -19.561, 1.13)
pt3dadd(106.209, 128.755, -19.573, 1.13)
pt3dadd(106.196, 128.874, -19.585, 1.13)
pt3dadd(106.184, 128.993, -19.598, 1.13)
pt3dadd(106.155, 129.108, -19.6, 1.13)
pt3dadd(106.122, 129.223, -19.6, 1.13)
pt3dadd(106.074, 129.328, -19.6, 1.122)
pt3dadd(106.006, 129.415, -19.611, 1.1)
pt3dadd(105.971, 129.528, -19.633, 1.09)
pt3dadd(105.936, 129.64, -19.655, 1.08)
pt3dadd(105.9, 129.75, -19.676, 1.07)
pt3dadd(105.865, 129.863, -19.698, 1.06)
pt3dadd(105.84, 129.97, -19.733, 1.05)
pt3dadd(105.829, 130.069, -19.788, 1.04)
pt3dadd(105.819, 130.169, -19.843, 1.03)
pt3dadd(105.808, 130.268, -19.898, 1.02)
pt3dadd(105.798, 130.368, -19.953, 1.01)
pt3dadd(105.787, 130.474, -19.995, 1.006)
pt3dadd(105.774, 130.591, -20.014, 1.01)
pt3dadd(105.762, 130.709, -20.032, 1.014)
pt3dadd(105.75, 130.825, -20.051, 1.018)
pt3dadd(105.738, 130.943, -20.069, 1.022)
pt3dadd(105.725, 131.06, -20.088, 1.026)
pt3dadd(105.713, 131.179, -20.1, 1.038)
pt3dadd(105.7, 131.298, -20.1, 1.064)
pt3dadd(105.688, 131.417, -20.1, 1.088)
pt3dadd(105.675, 131.537, -20.1, 1.114)
pt3dadd(105.663, 131.656, -20.1, 1.138)
pt3dadd(105.65, 131.776, -20.1, 1.164)
pt3dadd(105.631, 131.891, -20.111, 1.18)
pt3dadd(105.601, 132.001, -20.142, 1.18)
pt3dadd(105.56, 132.107, -20.17, 1.174)
pt3dadd(105.482, 132.194, -20.188, 1.148)
pt3dadd(105.406, 132.272, -20.22, 1.12)
pt3dadd(105.337, 132.319, -20.292, 1.086)
pt3dadd(105.268, 132.366, -20.363, 1.052)
}
}
proc shape3d_175() {
apic[30] { pt3dadd(105.221, 132.413, -20.442, 1.008)
pt3dadd(105.216, 132.46, -20.534, 0.942)
pt3dadd(105.211, 132.509, -20.624, 0.878)
pt3dadd(105.199, 132.62, -20.66, 0.836)
pt3dadd(105.187, 132.732, -20.696, 0.796)
pt3dadd(105.176, 132.842, -20.731, 0.756)
pt3dadd(105.166, 132.931, -20.798, 0.742)
pt3dadd(105.157, 133.02, -20.866, 0.73)
pt3dadd(105.116, 133.11, -20.919, 0.778)
pt3dadd(105.068, 133.204, -20.968, 0.84)
pt3dadd(104.996, 133.273, -21.002, 0.912)
pt3dadd(104.88, 133.303, -21.007, 1)
pt3dadd(104.764, 133.328, -21.014, 1.096)
pt3dadd(104.649, 133.324, -21.043, 1.198)
pt3dadd(104.537, 133.338, -21.075, 1.174)
pt3dadd(104.434, 133.372, -21.101, 1.134)
pt3dadd(104.36, 133.465, -21.107, 1.05)
pt3dadd(104.292, 133.562, -21.117, 0.968)
pt3dadd(104.254, 133.666, -21.156, 0.892)
pt3dadd(104.214, 133.77, -21.19, 0.826)
pt3dadd(104.161, 133.878, -21.195, 0.802)
pt3dadd(104.108, 133.986, -21.199, 0.78)
pt3dadd(104.085, 134.102, -21.2, 0.802)
pt3dadd(104.066, 134.221, -21.2, 0.828)
pt3dadd(104.054, 134.333, -21.233, 0.86)
pt3dadd(104.042, 134.446, -21.266, 0.892)
pt3dadd(103.998, 134.53, -21.319, 0.922)
pt3dadd(103.937, 134.6, -21.383, 0.952)
pt3dadd(103.847, 134.676, -21.394, 0.966)
pt3dadd(103.754, 134.752, -21.399, 0.978)
pt3dadd(103.663, 134.83, -21.4, 0.97)
pt3dadd(103.573, 134.908, -21.4, 0.958)
pt3dadd(103.505, 135.002, -21.417, 0.948)
pt3dadd(103.445, 135.103, -21.441, 0.94)
pt3dadd(103.386, 135.203, -21.465, 0.934)
pt3dadd(103.35, 135.286, -21.517, 0.93)
pt3dadd(103.344, 135.346, -21.603, 0.93)
pt3dadd(103.338, 135.404, -21.69, 0.938)
pt3dadd(103.332, 135.458, -21.78, 0.988)
pt3dadd(103.327, 135.511, -21.869, 1.004)
pt3dadd(103.319, 135.586, -21.947, 0.994)
pt3dadd(103.311, 135.661, -22.025, 0.98)
pt3dadd(103.306, 135.697, -22.119, 0.976)
pt3dadd(103.282, 135.71, -22.216, 0.944)
pt3dadd(103.211, 135.737, -22.288, 0.88)
pt3dadd(103.116, 135.809, -22.3, 0.854)
pt3dadd(103.015, 135.874, -22.3, 0.898)
pt3dadd(102.899, 135.895, -22.3, 0.954)
pt3dadd(102.783, 135.905, -22.31, 0.952)
pt3dadd(102.687, 135.943, -22.361, 0.94)
pt3dadd(102.59, 135.98, -22.411, 0.928)
pt3dadd(102.494, 136.019, -22.461, 0.916)
pt3dadd(102.397, 136.057, -22.512, 0.904)
pt3dadd(102.306, 136.112, -22.558, 0.886)
pt3dadd(102.216, 136.169, -22.604, 0.868)
pt3dadd(102.125, 136.224, -22.65, 0.848)
pt3dadd(102.034, 136.279, -22.696, 0.83)
pt3dadd(101.947, 136.36, -22.7, 0.814)
pt3dadd(101.86, 136.442, -22.7, 0.8)
pt3dadd(101.773, 136.525, -22.7, 0.784)
pt3dadd(101.686, 136.608, -22.7, 0.77)
pt3dadd(101.599, 136.69, -22.7, 0.754)
pt3dadd(101.53, 136.789, -22.7, 0.744)
pt3dadd(101.463, 136.888, -22.7, 0.734)
pt3dadd(101.395, 136.987, -22.7, 0.724)
pt3dadd(101.327, 137.087, -22.7, 0.716)
pt3dadd(101.26, 137.185, -22.7, 0.706)
pt3dadd(101.175, 137.268, -22.705, 0.7)
pt3dadd(101.084, 137.347, -22.712, 0.694)
pt3dadd(100.994, 137.425, -22.72, 0.688)
pt3dadd(100.903, 137.503, -22.727, 0.682)
pt3dadd(100.814, 137.584, -22.734, 0.678)
pt3dadd(100.744, 137.678, -22.748, 0.684)
pt3dadd(100.674, 137.776, -22.762, 0.688)
pt3dadd(100.603, 137.87, -22.777, 0.694)
pt3dadd(100.533, 137.966, -22.791, 0.7)
pt3dadd(100.463, 138.062, -22.8, 0.708)
pt3dadd(100.391, 138.16, -22.8, 0.718)
pt3dadd(100.316, 138.252, -22.8, 0.732)
pt3dadd(100.219, 138.324, -22.8, 0.756)
pt3dadd(100.124, 138.395, -22.802, 0.78)
pt3dadd(100.034, 138.46, -22.839, 0.808)
pt3dadd(99.952, 138.533, -22.878, 0.84)
pt3dadd(99.891, 138.622, -22.921, 0.882)
pt3dadd(99.827, 138.706, -22.968, 0.908)
pt3dadd(99.759, 138.781, -23.022, 0.916)
pt3dadd(99.692, 138.857, -23.075, 0.926)
pt3dadd(99.596, 138.896, -23.1, 0.924)
pt3dadd(99.477, 138.905, -23.1, 0.914)
pt3dadd(99.357, 138.912, -23.1, 0.904)
pt3dadd(99.258, 138.918, -23.155, 0.886)
pt3dadd(99.162, 138.922, -23.214, 0.868)
pt3dadd(99.069, 138.938, -23.274, 0.846)
pt3dadd(98.988, 138.984, -23.338, 0.816)
pt3dadd(98.9, 139.024, -23.397, 0.78)
pt3dadd(98.804, 139.051, -23.451, 0.772)
pt3dadd(98.707, 139.079, -23.506, 0.768)
pt3dadd(98.61, 139.106, -23.56, 0.762)
pt3dadd(98.514, 139.134, -23.615, 0.756)
pt3dadd(98.439, 139.152, -23.689, 0.778)
pt3dadd(98.376, 139.166, -23.774, 0.816)
pt3dadd(98.319, 139.18, -23.861, 0.854)
pt3dadd(98.265, 139.194, -23.949, 0.892)
pt3dadd(98.192, 139.229, -24.02, 0.942)
pt3dadd(98.111, 139.273, -24.084, 1)
pt3dadd(98.009, 139.333, -24.094, 1.016)
pt3dadd(97.906, 139.393, -24.099, 1.028)
pt3dadd(97.847, 139.49, -24.121, 1.062)
pt3dadd(97.784, 139.558, -24.17, 1.094)
pt3dadd(97.707, 139.586, -24.243, 1.122)
pt3dadd(97.629, 139.655, -24.278, 1.156)
pt3dadd(97.551, 139.745, -24.295, 1.196)
pt3dadd(97.497, 139.85, -24.3, 1.22)
pt3dadd(97.452, 139.961, -24.3, 1.242)
pt3dadd(97.418, 140.072, -24.31, 1.262)
pt3dadd(97.406, 140.185, -24.343, 1.284)
pt3dadd(97.394, 140.298, -24.376, 1.304)
pt3dadd(97.384, 140.359, -24.461, 1.312)
pt3dadd(97.374, 140.417, -24.548, 1.32)
pt3dadd(97.364, 140.477, -24.635, 1.326)
pt3dadd(97.326, 140.513, -24.715, 1.34)
pt3dadd(97.241, 140.509, -24.786, 1.364)
pt3dadd(97.174, 140.545, -24.842, 1.382)
pt3dadd(97.144, 140.656, -24.869, 1.382)
pt3dadd(97.114, 140.767, -24.895, 1.382)
pt3dadd(97.092, 140.869, -24.939, 1.376)
pt3dadd(97.083, 140.958, -25.007, 1.364)
pt3dadd(97.074, 141.046, -25.073, 1.336)
pt3dadd(97.049, 141.134, -25.136, 1.3)
pt3dadd(97.012, 141.221, -25.2, 1.288)
pt3dadd(96.976, 141.305, -25.263, 1.276)
pt3dadd(96.939, 141.39, -25.327, 1.264)
pt3dadd(96.908, 141.476, -25.391, 1.256)
pt3dadd(96.899, 141.566, -25.456, 1.256)
pt3dadd(96.889, 141.658, -25.521, 1.256)
pt3dadd(96.879, 141.749, -25.585, 1.256)
pt3dadd(96.87, 141.84, -25.65, 1.256)
pt3dadd(96.861, 141.922, -25.721, 1.258)
pt3dadd(96.856, 141.974, -25.81, 1.27)
pt3dadd(96.85, 142.028, -25.9, 1.28)
pt3dadd(96.803, 142.043, -25.991, 1.304)
pt3dadd(96.756, 142.057, -26.082, 1.33)
pt3dadd(96.667, 142.129, -26.094, 1.33)
pt3dadd(96.574, 142.205, -26.099, 1.33)
pt3dadd(96.517, 142.308, -26.1, 1.274)
pt3dadd(96.466, 142.416, -26.1, 1.21)
pt3dadd(96.435, 142.53, -26.11, 1.118)
pt3dadd(96.423, 142.648, -26.13, 1)
pt3dadd(96.411, 142.765, -26.142, 0.954)
pt3dadd(96.398, 142.885, -26.152, 0.922)
pt3dadd(96.386, 143.003, -26.163, 0.89)
pt3dadd(96.373, 143.122, -26.173, 0.858)
pt3dadd(96.361, 143.24, -26.184, 0.826)
pt3dadd(96.348, 143.358, -26.194, 0.796)
pt3dadd(96.326, 143.476, -26.2, 0.776)
pt3dadd(96.291, 143.591, -26.2, 0.772)
pt3dadd(96.257, 143.706, -26.2, 0.768)
pt3dadd(96.222, 143.821, -26.2, 0.764)
pt3dadd(96.188, 143.935, -26.2, 0.76)
pt3dadd(96.153, 144.052, -26.2, 0.756)
pt3dadd(96.119, 144.164, -26.209, 0.758)
pt3dadd(96.084, 144.277, -26.228, 0.768)
pt3dadd(96.049, 144.389, -26.248, 0.778)
pt3dadd(96.014, 144.503, -26.267, 0.786)
pt3dadd(95.979, 144.614, -26.286, 0.796)
pt3dadd(95.939, 144.725, -26.3, 0.808)
pt3dadd(95.886, 144.833, -26.3, 0.822)
pt3dadd(95.832, 144.941, -26.3, 0.836)
pt3dadd(95.779, 145.049, -26.3, 0.848)
pt3dadd(95.726, 145.156, -26.3, 0.862)
pt3dadd(95.673, 145.262, -26.3, 0.876)
pt3dadd(95.605, 145.362, -26.3, 0.878)
pt3dadd(95.534, 145.458, -26.3, 0.878)
pt3dadd(95.447, 145.54, -26.3, 0.864)
pt3dadd(95.35, 145.612, -26.3, 0.84)
pt3dadd(95.252, 145.68, -26.3, 0.822)
pt3dadd(95.151, 145.745, -26.3, 0.812)
pt3dadd(95.043, 145.787, -26.3, 0.804)
pt3dadd(94.923, 145.788, -26.3, 0.804)
pt3dadd(94.803, 145.79, -26.3, 0.804)
pt3dadd(94.688, 145.82, -26.3, 0.808)
pt3dadd(94.576, 145.862, -26.3, 0.814)
pt3dadd(94.464, 145.904, -26.3, 0.822)
pt3dadd(94.352, 145.946, -26.3, 0.828)
pt3dadd(94.266, 146.03, -26.3, 0.806)
pt3dadd(94.181, 146.114, -26.3, 0.782)
pt3dadd(94.129, 146.221, -26.3, 0.754)
pt3dadd(94.073, 146.324, -26.322, 0.754)
pt3dadd(94.016, 146.426, -26.343, 0.754)
pt3dadd(93.96, 146.53, -26.364, 0.754)
pt3dadd(93.903, 146.632, -26.386, 0.754)
pt3dadd(93.837, 146.729, -26.4, 0.756)
pt3dadd(93.753, 146.815, -26.4, 0.766)
pt3dadd(93.669, 146.9, -26.4, 0.776)
pt3dadd(93.584, 146.986, -26.4, 0.786)
pt3dadd(93.5, 147.071, -26.4, 0.798)
pt3dadd(93.415, 147.155, -26.4, 0.804)
pt3dadd(93.328, 147.238, -26.4, 0.804)
pt3dadd(93.241, 147.322, -26.4, 0.804)
pt3dadd(93.154, 147.404, -26.4, 0.804)
}
}
proc shape3d_176() {
apic[30] { pt3dadd(93.067, 147.486, -26.4, 0.804)
pt3dadd(92.985, 147.572, -26.409, 0.794)
pt3dadd(92.913, 147.664, -26.432, 0.768)
pt3dadd(92.847, 147.732, -26.482, 0.734)
pt3dadd(92.791, 147.779, -26.562, 0.692)
pt3dadd(92.706, 147.839, -26.592, 0.67)
pt3dadd(92.608, 147.906, -26.598, 0.658)
pt3dadd(92.497, 147.947, -26.6, 0.66)
pt3dadd(92.379, 147.967, -26.6, 0.67)
pt3dadd(92.267, 147.998, -26.6, 0.682)
pt3dadd(92.183, 148.084, -26.6, 0.712)
pt3dadd(92.099, 148.169, -26.6, 0.74)
pt3dadd(92.014, 148.254, -26.6, 0.768)
pt3dadd(91.969, 148.361, -26.6, 0.8)
pt3dadd(91.947, 148.478, -26.6, 0.836)
pt3dadd(91.925, 148.596, -26.6, 0.872)
pt3dadd(91.872, 148.693, -26.634, 0.914)
pt3dadd(91.813, 148.786, -26.675, 0.954)
pt3dadd(91.75, 148.842, -26.731, 0.994)
pt3dadd(91.679, 148.841, -26.811, 1.03)
pt3dadd(91.593, 148.847, -26.87, 1.06)
pt3dadd(91.476, 148.872, -26.882, 1.078)
pt3dadd(91.36, 148.896, -26.893, 1.094)
pt3dadd(91.246, 148.931, -26.902, 1.114)
pt3dadd(91.139, 148.984, -26.907, 1.138)
pt3dadd(91.047, 149.034, -26.934, 1.156)
pt3dadd(91, 149.077, -27.019, 1.156)
pt3dadd(90.952, 149.12, -27.103, 1.156)
pt3dadd(90.889, 149.124, -27.186, 1.156)
pt3dadd(90.822, 149.117, -27.269, 1.156)
pt3dadd(90.763, 149.141, -27.351, 1.136)
pt3dadd(90.709, 149.185, -27.432, 1.106)
pt3dadd(90.663, 149.233, -27.514, 1.074)
pt3dadd(90.656, 149.3, -27.596, 1.038)
pt3dadd(90.648, 149.366, -27.679, 1.004)
pt3dadd(90.598, 149.399, -27.766, 0.944)
pt3dadd(90.547, 149.43, -27.853, 0.886)
pt3dadd(90.47, 149.442, -27.918, 0.828)
pt3dadd(90.36, 149.431, -27.957, 0.774)
pt3dadd(90.248, 149.42, -27.99, 0.718)
pt3dadd(90.129, 149.414, -27.996, 0.662)
pt3dadd(90.009, 149.419, -28, 0.628)
pt3dadd(89.898, 149.456, -27.99, 0.65)
pt3dadd(89.813, 149.486, -27.929, 0.726)
pt3dadd(89.751, 149.501, -27.845, 0.854)
pt3dadd(89.651, 149.542, -27.809, 0.974)
pt3dadd(89.543, 149.594, -27.804, 1.022)
pt3dadd(89.456, 149.665, -27.8, 1.06)
pt3dadd(89.418, 149.778, -27.8, 1.08)
pt3dadd(89.379, 149.892, -27.8, 1.1)
pt3dadd(89.319, 149.994, -27.8, 1.13)
pt3dadd(89.208, 150.04, -27.8, 1.134)
pt3dadd(89.097, 150.085, -27.8, 1.14)
pt3dadd(88.986, 150.13, -27.8, 1.144)
pt3dadd(88.875, 150.176, -27.8, 1.15)
pt3dadd(88.764, 150.221, -27.8, 1.154)
pt3dadd(88.658, 150.277, -27.8, 1.168)
pt3dadd(88.553, 150.335, -27.8, 1.184)
pt3dadd(88.448, 150.394, -27.8, 1.198)
pt3dadd(88.343, 150.452, -27.8, 1.212)
pt3dadd(88.238, 150.511, -27.8, 1.228)
pt3dadd(88.133, 150.568, -27.806, 1.248)
pt3dadd(88.027, 150.623, -27.813, 1.268)
pt3dadd(87.921, 150.678, -27.82, 1.29)
pt3dadd(87.815, 150.734, -27.827, 1.31)
pt3dadd(87.71, 150.791, -27.834, 1.332)
pt3dadd(87.648, 150.88, -27.877, 1.36)
pt3dadd(87.585, 150.968, -27.92, 1.382)
pt3dadd(87.516, 151.05, -27.964, 1.382)
pt3dadd(87.429, 151.111, -28.001, 1.382)
pt3dadd(87.318, 151.139, -28.029, 1.382)
pt3dadd(87.226, 151.152, -28.081, 1.392)
pt3dadd(87.158, 151.145, -28.164, 1.414)
pt3dadd(87.08, 151.154, -28.229, 1.432)
pt3dadd(86.974, 151.202, -28.254, 1.432)
pt3dadd(86.868, 151.25, -28.278, 1.432)
pt3dadd(86.763, 151.301, -28.302, 1.426)
pt3dadd(86.665, 151.367, -28.319, 1.374)
pt3dadd(86.579, 151.439, -28.343, 1.28)
pt3dadd(86.545, 151.536, -28.395, 1.12)
pt3dadd(86.507, 151.631, -28.447, 1.054)
pt3dadd(86.421, 151.687, -28.477, 1.03)
pt3dadd(86.308, 151.72, -28.493, 1.03)
pt3dadd(86.192, 151.738, -28.511, 1.054)
pt3dadd(86.075, 151.742, -28.53, 1.098)
pt3dadd(85.977, 151.745, -28.569, 1.142)
pt3dadd(85.938, 151.741, -28.664, 1.184)
pt3dadd(85.899, 151.736, -28.758, 1.226)
pt3dadd(85.804, 151.77, -28.806, 1.238)
pt3dadd(85.703, 151.808, -28.85, 1.246)
pt3dadd(85.602, 151.847, -28.894, 1.254)
pt3dadd(85.516, 151.915, -28.932, 1.22)
pt3dadd(85.434, 151.991, -28.967, 1.176)
pt3dadd(85.362, 152.087, -28.976, 1.128)
pt3dadd(85.291, 152.183, -28.985, 1.08)
pt3dadd(85.223, 152.25, -28.951, 1.008)
pt3dadd(85.16, 152.288, -28.872, 0.912)
pt3dadd(85.082, 152.353, -28.833, 0.834)
pt3dadd(84.995, 152.432, -28.816, 0.766)
pt3dadd(84.908, 152.509, -28.806, 0.696)
pt3dadd(84.827, 152.555, -28.87, 0.624)
pt3dadd(84.767, 152.59, -28.945, 0.566)
pt3dadd(84.733, 152.621, -29.035, 0.568)
pt3dadd(84.685, 152.666, -29.118, 0.594)
pt3dadd(84.631, 152.711, -29.199, 0.622)
pt3dadd(84.575, 152.758, -29.279, 0.65)
pt3dadd(84.465, 152.783, -29.293, 0.672)
pt3dadd(84.347, 152.804, -29.298, 0.694)
pt3dadd(84.247, 152.862, -29.3, 0.716)
pt3dadd(84.163, 152.947, -29.3, 0.74)
pt3dadd(84.073, 153.024, -29.302, 0.768)
pt3dadd(83.974, 153.092, -29.308, 0.806)
pt3dadd(83.884, 153.158, -29.332, 0.844)
pt3dadd(83.851, 153.199, -29.418, 0.824)
pt3dadd(83.85, 153.211, -29.517, 0.744)
pt3dadd(83.85, 153.211, -29.617, 0.698)
pt3dadd(83.85, 153.214, -29.717, 0.678)
pt3dadd(83.846, 153.247, -29.809, 0.678)
pt3dadd(83.838, 153.328, -29.882, 0.678)
pt3dadd(83.829, 153.403, -29.958, 0.676)
pt3dadd(83.819, 153.443, -30.052, 0.666)
pt3dadd(83.809, 153.482, -30.146, 0.654)
pt3dadd(83.757, 153.529, -30.227, 0.64)
pt3dadd(83.699, 153.576, -30.305, 0.626)
pt3dadd(83.63, 153.647, -30.362, 0.612)
pt3dadd(83.551, 153.704, -30.382, 0.606)
pt3dadd(83.455, 153.738, -30.331, 0.614)
pt3dadd(83.358, 153.772, -30.279, 0.622)
pt3dadd(83.258, 153.812, -30.237, 0.632)
pt3dadd(83.154, 153.865, -30.214, 0.646)
pt3dadd(83.049, 153.917, -30.193, 0.686)
pt3dadd(82.961, 153.952, -30.136, 0.708)
pt3dadd(82.878, 153.982, -30.068, 0.714)
pt3dadd(82.796, 154.01, -30, 0.72)
pt3dadd(82.713, 154.039, -29.931, 0.726)
pt3dadd(82.617, 154.076, -29.888, 0.736)
pt3dadd(82.508, 154.121, -29.865, 0.748)
pt3dadd(82.431, 154.138, -29.803, 0.746)
pt3dadd(82.375, 154.138, -29.714, 0.734)
pt3dadd(82.323, 154.159, -29.628, 0.722)
pt3dadd(82.275, 154.205, -29.545, 0.708)
pt3dadd(82.198, 154.266, -29.518, 0.694)
pt3dadd(82.102, 154.337, -29.53, 0.682)
pt3dadd(82.022, 154.4, -29.578, 0.678)
pt3dadd(81.946, 154.462, -29.636, 0.678)
pt3dadd(81.87, 154.523, -29.693, 0.678)
pt3dadd(81.807, 154.556, -29.771, 0.678)
pt3dadd(81.782, 154.562, -29.868, 0.662)
pt3dadd(81.777, 154.561, -29.968, 0.602)
pt3dadd(81.745, 154.576, -30.061, 0.56)
pt3dadd(81.697, 154.596, -30.151, 0.532)
pt3dadd(81.649, 154.616, -30.241, 0.506)
pt3dadd(81.601, 154.637, -30.331, 0.48)
pt3dadd(81.553, 154.658, -30.421, 0.452)
pt3dadd(81.486, 154.651, -30.504, 0.394)
pt3dadd(81.418, 154.644, -30.586, 0.336)
pt3dadd(81.329, 154.676, -30.645, 0.302)
pt3dadd(81.233, 154.711, -30.682, 0.278)
pt3dadd(81.124, 154.726, -30.643, 0.292)
pt3dadd(81.014, 154.747, -30.613, 0.312)
pt3dadd(80.903, 154.792, -30.625, 0.364)
pt3dadd(80.813, 154.852, -30.646, 0.418)
pt3dadd(80.771, 154.951, -30.689, 0.478)
pt3dadd(80.702, 155.05, -30.7, 0.49)
pt3dadd(80.633, 155.146, -30.711, 0.502)
pt3dadd(80.528, 155.128, -30.749, 0.49)
pt3dadd(80.421, 155.104, -30.789, 0.478)
pt3dadd(80.31, 155.057, -30.794, 0.488)
pt3dadd(80.2, 155.011, -30.798, 0.498)
pt3dadd(80.083, 154.987, -30.797, 0.536)
pt3dadd(79.964, 154.974, -30.794, 0.59)
pt3dadd(79.845, 154.962, -30.79, 0.642)
pt3dadd(79.753, 154.952, -30.734, 0.75)
pt3dadd(79.685, 154.96, -30.656, 0.848)
pt3dadd(79.648, 154.997, -30.567, 0.898)
pt3dadd(79.581, 155.022, -30.522, 0.914)
pt3dadd(79.466, 155.03, -30.55, 0.876)
pt3dadd(79.35, 155.045, -30.573, 0.832)
pt3dadd(79.235, 155.071, -30.588, 0.772)
pt3dadd(79.119, 155.092, -30.605, 0.718)
pt3dadd(79.001, 155.096, -30.624, 0.674)
pt3dadd(78.883, 155.101, -30.643, 0.63)
pt3dadd(78.844, 155.106, -30.735, 0.628)
pt3dadd(78.774, 155.126, -30.79, 0.634)
pt3dadd(78.661, 155.166, -30.793, 0.648)
pt3dadd(78.548, 155.204, -30.796, 0.662)
pt3dadd(78.434, 155.244, -30.799, 0.674)
pt3dadd(78.319, 155.266, -30.785, 0.686)
pt3dadd(78.202, 155.284, -30.765, 0.696)
pt3dadd(78.086, 155.3, -30.745, 0.706)
pt3dadd(77.969, 155.317, -30.725, 0.716)
pt3dadd(77.853, 155.334, -30.705, 0.726)
pt3dadd(77.736, 155.358, -30.7, 0.728)
pt3dadd(77.619, 155.386, -30.7, 0.728)
pt3dadd(77.502, 155.412, -30.7, 0.728)
pt3dadd(77.385, 155.438, -30.7, 0.728)
pt3dadd(77.268, 155.466, -30.7, 0.728)
pt3dadd(77.151, 155.49, -30.7, 0.726)
pt3dadd(77.032, 155.507, -30.7, 0.718)
pt3dadd(76.914, 155.525, -30.7, 0.708)
}
}
proc shape3d_177() {
apic[30] { pt3dadd(76.795, 155.544, -30.7, 0.7)
pt3dadd(76.676, 155.562, -30.7, 0.692)
pt3dadd(76.557, 155.579, -30.7, 0.682)
pt3dadd(76.442, 155.608, -30.7, 0.676)
pt3dadd(76.329, 155.651, -30.7, 0.67)
pt3dadd(76.217, 155.692, -30.7, 0.666)
pt3dadd(76.105, 155.735, -30.7, 0.662)
pt3dadd(75.992, 155.776, -30.7, 0.656)
pt3dadd(75.884, 155.826, -30.7, 0.656)
pt3dadd(75.79, 155.9, -30.7, 0.666)
pt3dadd(75.696, 155.975, -30.7, 0.676)
pt3dadd(75.601, 156.048, -30.7, 0.686)
pt3dadd(75.507, 156.122, -30.7, 0.696)
pt3dadd(75.407, 156.186, -30.7, 0.706)
pt3dadd(75.292, 156.221, -30.7, 0.716)
pt3dadd(75.177, 156.257, -30.7, 0.724)
pt3dadd(75.063, 156.293, -30.7, 0.734)
pt3dadd(74.948, 156.329, -30.7, 0.744)
pt3dadd(74.834, 156.365, -30.7, 0.754)
pt3dadd(74.727, 156.42, -30.7, 0.754)
pt3dadd(74.621, 156.475, -30.7, 0.754)
pt3dadd(74.514, 156.53, -30.7, 0.754)
pt3dadd(74.407, 156.586, -30.7, 0.754)
pt3dadd(74.301, 156.641, -30.7, 0.754)
pt3dadd(74.184, 156.662, -30.7, 0.746)
pt3dadd(74.065, 156.684, -30.7, 0.736)
pt3dadd(73.947, 156.704, -30.7, 0.728)
pt3dadd(73.829, 156.725, -30.7, 0.718)
pt3dadd(73.711, 156.746, -30.7, 0.71)
pt3dadd(73.602, 156.782, -30.701, 0.704)
pt3dadd(73.522, 156.872, -30.707, 0.704)
pt3dadd(73.44, 156.955, -30.719, 0.706)
pt3dadd(73.35, 157.014, -30.763, 0.72)
pt3dadd(73.248, 157.058, -30.791, 0.724)
pt3dadd(73.13, 157.081, -30.796, 0.712)
pt3dadd(73.013, 157.102, -30.803, 0.702)
pt3dadd(72.899, 157.109, -30.834, 0.69)
pt3dadd(72.785, 157.115, -30.866, 0.678)
pt3dadd(72.668, 157.128, -30.884, 0.672)
pt3dadd(72.551, 157.14, -30.902, 0.664)
pt3dadd(72.433, 157.153, -30.92, 0.658)
pt3dadd(72.337, 157.192, -30.942, 0.656)
pt3dadd(72.3, 157.298, -30.974, 0.668)
pt3dadd(72.253, 157.402, -31, 0.664)
pt3dadd(72.155, 157.468, -31, 0.628)
pt3dadd(72.045, 157.517, -31, 0.628)
pt3dadd(71.936, 157.566, -31, 0.628)
pt3dadd(71.826, 157.614, -31, 0.628)
pt3dadd(71.717, 157.663, -31, 0.628)
pt3dadd(71.607, 157.714, -31, 0.632)
pt3dadd(71.499, 157.765, -31, 0.642)
pt3dadd(71.391, 157.816, -31, 0.652)
pt3dadd(71.283, 157.867, -31, 0.662)
pt3dadd(71.174, 157.92, -31, 0.67)
pt3dadd(71.07, 157.976, -31.007, 0.686)
pt3dadd(70.977, 158.046, -31.03, 0.716)
pt3dadd(70.883, 158.117, -31.052, 0.744)
pt3dadd(70.79, 158.188, -31.075, 0.772)
pt3dadd(70.697, 158.257, -31.098, 0.802)
pt3dadd(70.615, 158.344, -31.105, 0.814)
pt3dadd(70.535, 158.434, -31.11, 0.826)
pt3dadd(70.509, 158.528, -31.161, 0.808)
pt3dadd(70.492, 158.623, -31.22, 0.784)
pt3dadd(70.468, 158.69, -31.299, 0.748)
pt3dadd(70.442, 158.748, -31.384, 0.71)
pt3dadd(70.357, 158.786, -31.439, 0.692)
pt3dadd(70.257, 158.819, -31.488, 0.678)
pt3dadd(70.147, 158.866, -31.497, 0.678)
pt3dadd(70.045, 158.926, -31.509, 0.682)
pt3dadd(69.949, 158.995, -31.523, 0.686)
pt3dadd(69.853, 159.065, -31.538, 0.692)
pt3dadd(69.757, 159.136, -31.553, 0.698)
pt3dadd(69.661, 159.205, -31.569, 0.704)
pt3dadd(69.572, 159.275, -31.6, 0.716)
pt3dadd(69.482, 159.344, -31.632, 0.728)
pt3dadd(69.392, 159.415, -31.663, 0.74)
pt3dadd(69.302, 159.485, -31.695, 0.752)
pt3dadd(69.218, 159.558, -31.731, 0.776)
pt3dadd(69.135, 159.631, -31.77, 0.804)
pt3dadd(69.052, 159.684, -31.827, 0.804)
pt3dadd(68.96, 159.731, -31.872, 0.796)
pt3dadd(68.846, 159.764, -31.888, 0.772)
pt3dadd(68.731, 159.791, -31.9, 0.746)
pt3dadd(68.611, 159.792, -31.9, 0.718)
pt3dadd(68.491, 159.794, -31.9, 0.69)
pt3dadd(68.372, 159.788, -31.9, 0.658)
pt3dadd(68.252, 159.776, -31.9, 0.62)
pt3dadd(68.132, 159.773, -31.9, 0.588)
pt3dadd(68.013, 159.774, -31.9, 0.56)
pt3dadd(67.893, 159.776, -31.9, 0.532)
pt3dadd(67.793, 159.839, -31.9, 0.518)
pt3dadd(67.698, 159.911, -31.9, 0.506)
pt3dadd(67.606, 159.989, -31.9, 0.51)
pt3dadd(67.515, 160.067, -31.9, 0.522)
pt3dadd(67.46, 160.169, -31.9, 0.54)
pt3dadd(67.427, 160.283, -31.9, 0.558)
pt3dadd(67.394, 160.399, -31.9, 0.578)
pt3dadd(67.329, 160.5, -31.9, 0.578)
pt3dadd(67.255, 160.592, -31.905, 0.574)
pt3dadd(67.171, 160.679, -31.914, 0.57)
pt3dadd(67.088, 160.764, -31.924, 0.564)
pt3dadd(67.005, 160.849, -31.933, 0.558)
pt3dadd(66.921, 160.934, -31.943, 0.554)
pt3dadd(66.867, 160.994, -32.011, 0.552)
pt3dadd(66.817, 161.048, -32.089, 0.552)
pt3dadd(66.723, 161.117, -32.113, 0.58)
pt3dadd(66.629, 161.184, -32.139, 0.604)
pt3dadd(66.533, 161.242, -32.176, 0.618)
pt3dadd(66.431, 161.293, -32.2, 0.628)
pt3dadd(66.319, 161.336, -32.2, 0.628)
pt3dadd(66.207, 161.377, -32.2, 0.626)
pt3dadd(66.095, 161.42, -32.2, 0.61)
pt3dadd(65.979, 161.449, -32.2, 0.602)
pt3dadd(65.86, 161.468, -32.2, 0.602)
pt3dadd(65.745, 161.492, -32.207, 0.602)
pt3dadd(65.64, 161.532, -32.243, 0.602)
pt3dadd(65.537, 161.582, -32.273, 0.608)
pt3dadd(65.439, 161.648, -32.29, 0.62)
pt3dadd(65.364, 161.732, -32.3, 0.636)
pt3dadd(65.319, 161.844, -32.3, 0.656)
pt3dadd(65.275, 161.957, -32.3, 0.678)
pt3dadd(65.19, 162.037, -32.321, 0.702)
pt3dadd(65.105, 162.118, -32.342, 0.726)
pt3dadd(65.02, 162.198, -32.363, 0.75)
pt3dadd(64.915, 162.248, -32.386, 0.764)
pt3dadd(64.807, 162.29, -32.409, 0.776)
pt3dadd(64.695, 162.307, -32.44, 0.804)
pt3dadd(64.59, 162.342, -32.479, 0.804)
pt3dadd(64.485, 162.378, -32.517, 0.804)
pt3dadd(64.38, 162.413, -32.555, 0.804)
pt3dadd(64.275, 162.448, -32.593, 0.804)
pt3dadd(64.17, 162.499, -32.616, 0.808)
pt3dadd(64.066, 162.553, -32.636, 0.814)
pt3dadd(63.962, 162.608, -32.656, 0.82)
pt3dadd(63.858, 162.662, -32.676, 0.826)
pt3dadd(63.757, 162.725, -32.691, 0.82)
pt3dadd(63.664, 162.8, -32.696, 0.796)
pt3dadd(63.566, 162.86, -32.71, 0.768)
pt3dadd(63.456, 162.882, -32.743, 0.73)
pt3dadd(63.359, 162.928, -32.772, 0.692)
pt3dadd(63.296, 163.027, -32.788, 0.654)
pt3dadd(63.232, 163.128, -32.805, 0.624)
pt3dadd(63.168, 163.228, -32.821, 0.612)
pt3dadd(63.101, 163.319, -32.846, 0.596)
pt3dadd(63.023, 163.393, -32.889, 0.576)
pt3dadd(62.937, 163.477, -32.891, 0.566)
pt3dadd(62.852, 163.561, -32.894, 0.556)
pt3dadd(62.766, 163.645, -32.896, 0.546)
pt3dadd(62.681, 163.729, -32.898, 0.536)
pt3dadd(62.598, 163.812, -32.91, 0.526)
pt3dadd(62.524, 163.886, -32.959, 0.52)
pt3dadd(62.451, 163.961, -33.008, 0.514)
pt3dadd(62.377, 164.035, -33.058, 0.508)
pt3dadd(62.306, 164.11, -33.108, 0.506)
pt3dadd(62.244, 164.188, -33.164, 0.534)
pt3dadd(62.168, 164.25, -33.216, 0.578)
pt3dadd(62.068, 164.292, -33.259, 0.648)
pt3dadd(61.978, 164.305, -33.319, 0.712)
pt3dadd(61.897, 164.297, -33.392, 0.77)
pt3dadd(61.841, 164.308, -33.474, 0.82)
pt3dadd(61.819, 164.342, -33.568, 0.854)
pt3dadd(61.801, 164.383, -33.66, 0.88)
pt3dadd(61.796, 164.437, -33.75, 0.888)
pt3dadd(61.79, 164.49, -33.839, 0.894)
pt3dadd(61.785, 164.543, -33.929, 0.902)
pt3dadd(61.752, 164.623, -33.987, 0.904)
pt3dadd(61.699, 164.723, -34.021, 0.904)
pt3dadd(61.626, 164.809, -34.051, 0.898)
pt3dadd(61.541, 164.887, -34.078, 0.888)
pt3dadd(61.455, 164.964, -34.108, 0.874)
pt3dadd(61.366, 165.029, -34.145, 0.846)
pt3dadd(61.268, 165.08, -34.181, 0.778)
pt3dadd(61.155, 165.115, -34.193, 0.744)
pt3dadd(61.042, 165.151, -34.198, 0.732)
pt3dadd(60.929, 165.192, -34.2, 0.734)
pt3dadd(60.816, 165.234, -34.2, 0.746)
pt3dadd(60.712, 165.289, -34.2, 0.766)
pt3dadd(60.621, 165.37, -34.2, 0.802)
pt3dadd(60.529, 165.44, -34.208, 0.832)
pt3dadd(60.428, 165.49, -34.245, 0.846)
pt3dadd(60.36, 165.557, -34.29, 0.846)
pt3dadd(60.338, 165.652, -34.347, 0.828)
pt3dadd(60.271, 165.724, -34.404, 0.822)
pt3dadd(60.204, 165.796, -34.462, 0.816)
pt3dadd(60.137, 165.868, -34.519, 0.81)
pt3dadd(60.07, 165.94, -34.576, 0.804)
pt3dadd(59.997, 166.027, -34.605, 0.804)
pt3dadd(59.922, 166.115, -34.633, 0.804)
pt3dadd(59.848, 166.204, -34.662, 0.804)
pt3dadd(59.774, 166.291, -34.69, 0.804)
pt3dadd(59.695, 166.38, -34.7, 0.81)
pt3dadd(59.614, 166.468, -34.7, 0.82)
pt3dadd(59.532, 166.555, -34.7, 0.83)
pt3dadd(59.451, 166.644, -34.7, 0.84)
pt3dadd(59.369, 166.732, -34.7, 0.85)
pt3dadd(59.269, 166.795, -34.7, 0.856)
pt3dadd(59.16, 166.842, -34.7, 0.862)
pt3dadd(59.05, 166.891, -34.7, 0.866)
pt3dadd(58.94, 166.94, -34.7, 0.872)
pt3dadd(58.83, 166.988, -34.7, 0.876)
}
}
proc shape3d_178() {
apic[30] { pt3dadd(58.732, 167.054, -34.7, 0.89)
pt3dadd(58.645, 167.137, -34.7, 0.91)
pt3dadd(58.558, 167.22, -34.7, 0.93)
pt3dadd(58.471, 167.302, -34.7, 0.95)
pt3dadd(58.384, 167.384, -34.7, 0.97)
pt3dadd(58.299, 167.47, -34.7, 1.012)
pt3dadd(58.215, 167.555, -34.7, 1.07)
pt3dadd(58.136, 167.645, -34.7, 1.128)
pt3dadd(58.064, 167.742, -34.7, 1.186)
pt3dadd(57.985, 167.827, -34.7, 1.232)
pt3dadd(57.876, 167.878, -34.7, 1.244)
pt3dadd(57.766, 167.926, -34.7, 1.256)
pt3dadd(57.647, 167.933, -34.7, 1.236)
pt3dadd(57.527, 167.941, -34.7, 1.216)
pt3dadd(57.415, 167.974, -34.7, 1.182)
pt3dadd(57.314, 168.038, -34.7, 1.13)
pt3dadd(57.213, 168.103, -34.7, 1.094)
pt3dadd(57.112, 168.168, -34.7, 1.06)
pt3dadd(57.031, 168.256, -34.7, 1.014)
pt3dadd(56.953, 168.347, -34.7, 0.968)
pt3dadd(56.889, 168.446, -34.716, 0.918)
pt3dadd(56.832, 168.547, -34.738, 0.868)
pt3dadd(56.789, 168.582, -34.813, 0.822)
pt3dadd(56.752, 168.59, -34.908, 0.776)
pt3dadd(56.684, 168.613, -34.977, 0.742)
pt3dadd(56.583, 168.65, -35.021, 0.716)
pt3dadd(56.482, 168.688, -35.065, 0.692)
pt3dadd(56.39, 168.749, -35.091, 0.668)
pt3dadd(56.309, 168.838, -35.097, 0.642)
pt3dadd(56.235, 168.931, -35.1, 0.616)
pt3dadd(56.172, 169.031, -35.114, 0.606)
pt3dadd(56.109, 169.13, -35.136, 0.612)
pt3dadd(56.046, 169.229, -35.158, 0.618)
pt3dadd(55.983, 169.327, -35.179, 0.622)
pt3dadd(55.919, 169.426, -35.2, 0.628)
pt3dadd(55.834, 169.511, -35.2, 0.634)
pt3dadd(55.75, 169.596, -35.2, 0.638)
pt3dadd(55.666, 169.681, -35.2, 0.644)
pt3dadd(55.581, 169.766, -35.2, 0.648)
pt3dadd(55.495, 169.85, -35.2, 0.654)
pt3dadd(55.388, 169.903, -35.202, 0.658)
pt3dadd(55.28, 169.956, -35.205, 0.664)
pt3dadd(55.173, 170.008, -35.207, 0.668)
pt3dadd(55.065, 170.062, -35.209, 0.674)
pt3dadd(54.958, 170.114, -35.214, 0.678)
pt3dadd(54.862, 170.165, -35.258, 0.694)
pt3dadd(54.774, 170.227, -35.296, 0.71)
pt3dadd(54.701, 170.318, -35.319, 0.738)
pt3dadd(54.653, 170.4, -35.365, 0.772)
pt3dadd(54.646, 170.467, -35.448, 0.818)
pt3dadd(54.631, 170.52, -35.533, 0.864)
pt3dadd(54.589, 170.521, -35.626, 0.908)
pt3dadd(54.547, 170.522, -35.72, 0.954)
pt3dadd(54.452, 170.542, -35.778, 0.986)
pt3dadd(54.355, 170.562, -35.835, 1.018)
pt3dadd(54.259, 170.581, -35.892, 1.05)
pt3dadd(54.174, 170.642, -35.938, 1.092)
pt3dadd(54.09, 170.705, -35.985, 1.138)
pt3dadd(54.011, 170.717, -36.06, 1.192)
pt3dadd(53.94, 170.73, -36.14, 1.218)
pt3dadd(53.865, 170.76, -36.211, 1.23)
pt3dadd(53.783, 170.806, -36.274, 1.23)
pt3dadd(53.692, 170.849, -36.327, 1.23)
pt3dadd(53.597, 170.892, -36.377, 1.23)
pt3dadd(53.543, 170.969, -36.44, 1.202)
pt3dadd(53.481, 171.044, -36.49, 1.176)
pt3dadd(53.384, 171.116, -36.493, 1.154)
pt3dadd(53.287, 171.187, -36.496, 1.132)
pt3dadd(53.191, 171.257, -36.499, 1.11)
pt3dadd(53.097, 171.332, -36.504, 1.06)
pt3dadd(53.004, 171.408, -36.509, 0.998)
pt3dadd(52.915, 171.427, -36.559, 0.94)
pt3dadd(52.828, 171.424, -36.628, 0.886)
pt3dadd(52.741, 171.419, -36.696, 0.832)
pt3dadd(52.69, 171.42, -36.787, 0.786)
pt3dadd(52.641, 171.42, -36.878, 0.74)
pt3dadd(52.59, 171.467, -36.956, 0.696)
pt3dadd(52.527, 171.547, -36.998, 0.656)
pt3dadd(52.482, 171.658, -37, 0.564)
pt3dadd(52.457, 171.775, -37, 0.432)
pt3dadd(52.442, 171.893, -37, 0.34)
pt3dadd(52.41, 172.009, -37, 0.302)
pt3dadd(52.355, 172.116, -37, 0.276)
pt3dadd(52.29, 172.216, -37, 0.226)
}
apic[31] {pt3dclear()
pt3dadd(116.1, 110.414, -9.178, 2.562)
pt3dadd(116.178, 110.371, -9.232, 2.506)
pt3dadd(116.263, 110.323, -9.291, 2.448)
pt3dadd(116.348, 110.276, -9.35, 2.388)
pt3dadd(116.433, 110.229, -9.408, 2.33)
pt3dadd(116.517, 110.182, -9.467, 2.27)
pt3dadd(116.602, 110.135, -9.526, 2.21)
pt3dadd(116.687, 110.088, -9.585, 2.152)
pt3dadd(116.772, 110.041, -9.644, 2.092)
pt3dadd(116.857, 109.994, -9.703, 2.034)
pt3dadd(116.941, 109.947, -9.761, 1.974)
pt3dadd(117.026, 109.9, -9.82, 1.914)
pt3dadd(117.111, 109.853, -9.879, 1.856)
pt3dadd(117.196, 109.805, -9.938, 1.796)
pt3dadd(117.281, 109.758, -9.997, 1.738)
pt3dadd(117.366, 109.711, -10.056, 1.678)
pt3dadd(117.45, 109.664, -10.115, 1.618)
pt3dadd(117.535, 109.617, -10.173, 1.56)
pt3dadd(117.62, 109.57, -10.232, 1.5)
pt3dadd(117.705, 109.523, -10.291, 1.44)
pt3dadd(117.79, 109.476, -10.35, 1.382)
pt3dadd(117.875, 109.429, -10.409, 1.322)
pt3dadd(117.959, 109.382, -10.468, 1.264)
pt3dadd(118.044, 109.335, -10.526, 1.204)
pt3dadd(118.129, 109.287, -10.585, 1.144)
pt3dadd(118.155, 109.227, -10.663, 1.298)
pt3dadd(118.163, 109.153, -10.739, 1.472)
pt3dadd(118.173, 109.056, -10.797, 1.528)
pt3dadd(118.184, 108.958, -10.854, 1.582)
pt3dadd(118.194, 108.86, -10.912, 1.638)
pt3dadd(118.204, 108.763, -10.969, 1.692)
pt3dadd(118.213, 108.676, -11.035, 1.744)
pt3dadd(118.22, 108.616, -11.122, 1.782)
pt3dadd(118.226, 108.557, -11.208, 1.822)
pt3dadd(118.232, 108.497, -11.295, 1.862)
pt3dadd(118.238, 108.438, -11.382, 1.9)
pt3dadd(118.245, 108.374, -11.466, 1.936)
pt3dadd(118.254, 108.286, -11.533, 1.956)
pt3dadd(118.264, 108.198, -11.6, 1.978)
pt3dadd(118.273, 108.109, -11.668, 1.998)
pt3dadd(118.282, 108.021, -11.735, 2.018)
pt3dadd(118.292, 107.932, -11.802, 2.034)
pt3dadd(118.301, 107.841, -11.866, 2.028)
pt3dadd(118.311, 107.75, -11.931, 2.022)
pt3dadd(118.32, 107.66, -11.996, 2.018)
pt3dadd(118.33, 107.569, -12.061, 2.012)
pt3dadd(118.338, 107.491, -12.133, 2.006)
pt3dadd(118.341, 107.459, -12.229, 1.99)
pt3dadd(118.32, 107.403, -12.312, 1.958)
pt3dadd(118.282, 107.332, -12.386, 1.916)
pt3dadd(118.218, 107.275, -12.456, 1.85)
pt3dadd(118.148, 107.223, -12.523, 1.78)
pt3dadd(118.041, 107.193, -12.561, 1.682)
pt3dadd(117.934, 107.163, -12.599, 1.586)
pt3dadd(117.851, 107.077, -12.605, 1.488)
pt3dadd(117.769, 106.99, -12.611, 1.39)
pt3dadd(117.694, 106.94, -12.673, 1.348)
pt3dadd(117.619, 106.894, -12.742, 1.312)
pt3dadd(117.544, 106.849, -12.81, 1.278)
pt3dadd(117.47, 106.803, -12.878, 1.242)
pt3dadd(117.373, 106.781, -12.931, 1.21)
pt3dadd(117.266, 106.769, -12.975, 1.182)
pt3dadd(117.16, 106.758, -13.02, 1.152)
pt3dadd(117.053, 106.747, -13.065, 1.124)
pt3dadd(116.946, 106.736, -13.109, 1.096)
pt3dadd(116.852, 106.726, -13.168, 1.068)
pt3dadd(116.772, 106.717, -13.242, 1.042)
pt3dadd(116.691, 106.709, -13.316, 1.018)
pt3dadd(116.611, 106.701, -13.39, 0.992)
pt3dadd(116.531, 106.692, -13.464, 0.966)
pt3dadd(116.435, 106.694, -13.519, 0.94)
pt3dadd(116.324, 106.704, -13.556, 0.914)
pt3dadd(116.213, 106.715, -13.594, 0.888)
pt3dadd(116.103, 106.726, -13.631, 0.862)
pt3dadd(115.992, 106.737, -13.668, 0.836)
pt3dadd(115.899, 106.751, -13.729, 0.828)
pt3dadd(115.813, 106.788, -13.791, 0.828)
pt3dadd(115.716, 106.812, -13.839, 0.83)
pt3dadd(115.598, 106.813, -13.856, 0.838)
pt3dadd(115.48, 106.814, -13.872, 0.844)
pt3dadd(115.361, 106.815, -13.889, 0.85)
pt3dadd(115.246, 106.833, -13.9, 0.846)
pt3dadd(115.137, 106.883, -13.9, 0.822)
pt3dadd(115.026, 106.929, -13.9, 0.802)
pt3dadd(114.91, 106.957, -13.9, 0.792)
pt3dadd(114.793, 106.985, -13.9, 0.78)
pt3dadd(114.679, 107.012, -13.918, 0.758)
pt3dadd(114.565, 107.039, -13.939, 0.734)
pt3dadd(114.532, 107.057, -14.019, 0.72)
pt3dadd(114.525, 107.072, -14.118, 0.71)
pt3dadd(114.501, 107.082, -14.208, 0.704)
pt3dadd(114.394, 107.071, -14.252, 0.708)
pt3dadd(114.287, 107.06, -14.297, 0.714)
pt3dadd(114.18, 107.048, -14.342, 0.718)
pt3dadd(114.074, 107.037, -14.387, 0.724)
pt3dadd(113.967, 107.026, -14.431, 0.728)
pt3dadd(113.881, 106.99, -14.494, 0.734)
pt3dadd(113.796, 106.954, -14.558, 0.74)
pt3dadd(113.711, 106.917, -14.621, 0.746)
pt3dadd(113.626, 106.881, -14.685, 0.75)
pt3dadd(113.524, 106.859, -14.73, 0.758)
pt3dadd(113.411, 106.847, -14.762, 0.768)
pt3dadd(113.298, 106.835, -14.795, 0.776)
pt3dadd(113.185, 106.823, -14.827, 0.786)
pt3dadd(113.072, 106.811, -14.859, 0.796)
pt3dadd(112.959, 106.799, -14.89, 0.802)
pt3dadd(112.841, 106.787, -14.906, 0.786)
pt3dadd(112.724, 106.775, -14.923, 0.77)
pt3dadd(112.606, 106.762, -14.939, 0.752)
pt3dadd(112.488, 106.75, -14.956, 0.736)
pt3dadd(112.37, 106.737, -14.972, 0.72)
pt3dadd(112.253, 106.725, -14.989, 0.704)
pt3dadd(112.137, 106.693, -14.993, 0.69)
pt3dadd(112.022, 106.66, -14.996, 0.678)
pt3dadd(111.907, 106.627, -15, 0.664)
pt3dadd(111.791, 106.595, -15.004, 0.652)
}
}
proc shape3d_179() {
apic[31] { pt3dadd(111.676, 106.562, -15.008, 0.64)
pt3dadd(111.561, 106.532, -15.016, 0.626)
pt3dadd(111.452, 106.52, -15.055, 0.602)
pt3dadd(111.342, 106.509, -15.095, 0.578)
pt3dadd(111.232, 106.497, -15.135, 0.554)
pt3dadd(111.123, 106.486, -15.174, 0.53)
pt3dadd(111.013, 106.474, -15.214, 0.508)
pt3dadd(110.901, 106.462, -15.248, 0.51)
pt3dadd(110.788, 106.451, -15.28, 0.518)
pt3dadd(110.675, 106.439, -15.312, 0.528)
pt3dadd(110.562, 106.427, -15.345, 0.536)
pt3dadd(110.449, 106.415, -15.377, 0.546)
pt3dadd(110.334, 106.403, -15.4, 0.556)
pt3dadd(110.215, 106.39, -15.4, 0.566)
pt3dadd(110.096, 106.378, -15.4, 0.576)
pt3dadd(109.976, 106.365, -15.4, 0.588)
pt3dadd(109.857, 106.353, -15.4, 0.598)
pt3dadd(109.738, 106.34, -15.4, 0.61)
pt3dadd(109.618, 106.328, -15.4, 0.62)
pt3dadd(109.499, 106.315, -15.4, 0.648)
pt3dadd(109.38, 106.302, -15.403, 0.698)
pt3dadd(109.261, 106.29, -15.416, 0.68)
pt3dadd(109.143, 106.278, -15.428, 0.66)
pt3dadd(109.05, 106.268, -15.479, 0.64)
pt3dadd(108.976, 106.26, -15.557, 0.62)
pt3dadd(108.901, 106.252, -15.635, 0.598)
pt3dadd(108.828, 106.245, -15.714, 0.578)
pt3dadd(108.802, 106.242, -15.812, 0.578)
pt3dadd(108.776, 106.239, -15.909, 0.578)
pt3dadd(108.702, 106.231, -15.965, 0.602)
pt3dadd(108.584, 106.219, -15.982, 0.652)
pt3dadd(108.467, 106.206, -15.999, 0.7)
pt3dadd(108.348, 106.194, -16.004, 0.76)
pt3dadd(108.228, 106.182, -16.007, 0.82)
pt3dadd(108.109, 106.169, -16.012, 0.88)
pt3dadd(107.997, 106.157, -16.045, 0.922)
pt3dadd(107.884, 106.145, -16.078, 0.966)
pt3dadd(107.772, 106.128, -16.112, 0.98)
pt3dadd(107.661, 106.109, -16.146, 0.98)
pt3dadd(107.55, 106.09, -16.18, 0.98)
pt3dadd(107.439, 106.07, -16.215, 0.98)
pt3dadd(107.328, 106.051, -16.249, 0.98)
pt3dadd(107.216, 106.028, -16.279, 0.97)
pt3dadd(107.103, 106.001, -16.304, 0.952)
pt3dadd(106.99, 105.973, -16.33, 0.932)
pt3dadd(106.878, 105.946, -16.355, 0.912)
pt3dadd(106.765, 105.919, -16.381, 0.894)
pt3dadd(106.652, 105.889, -16.4, 0.868)
pt3dadd(106.537, 105.854, -16.4, 0.824)
pt3dadd(106.424, 105.813, -16.4, 0.786)
pt3dadd(106.313, 105.768, -16.4, 0.756)
pt3dadd(106.201, 105.727, -16.403, 0.726)
pt3dadd(106.087, 105.715, -16.431, 0.716)
pt3dadd(105.972, 105.703, -16.458, 0.706)
pt3dadd(105.866, 105.692, -16.502, 0.696)
pt3dadd(105.763, 105.681, -16.553, 0.684)
pt3dadd(105.689, 105.638, -16.613, 0.678)
pt3dadd(105.643, 105.565, -16.682, 0.678)
pt3dadd(105.58, 105.497, -16.745, 0.682)
pt3dadd(105.511, 105.43, -16.805, 0.688)
pt3dadd(105.442, 105.363, -16.865, 0.694)
pt3dadd(105.373, 105.297, -16.925, 0.702)
pt3dadd(105.301, 105.27, -16.998, 0.776)
pt3dadd(105.211, 105.255, -17.063, 0.814)
pt3dadd(105.121, 105.239, -17.128, 0.85)
pt3dadd(105.104, 105.131, -17.154, 0.862)
pt3dadd(105.094, 105.014, -17.177, 0.87)
pt3dadd(105.083, 104.898, -17.2, 0.878)
pt3dadd(105.048, 104.783, -17.2, 0.846)
pt3dadd(105.013, 104.668, -17.2, 0.812)
pt3dadd(104.982, 104.557, -17.222, 0.786)
pt3dadd(104.952, 104.447, -17.253, 0.764)
pt3dadd(104.923, 104.336, -17.284, 0.74)
pt3dadd(104.863, 104.259, -17.324, 0.716)
pt3dadd(104.768, 104.222, -17.377, 0.69)
pt3dadd(104.689, 104.15, -17.41, 0.678)
pt3dadd(104.623, 104.052, -17.427, 0.678)
pt3dadd(104.603, 103.944, -17.452, 0.678)
pt3dadd(104.609, 103.829, -17.48, 0.678)
pt3dadd(104.617, 103.714, -17.509, 0.678)
pt3dadd(104.63, 103.599, -17.536, 0.678)
pt3dadd(104.642, 103.485, -17.564, 0.678)
pt3dadd(104.653, 103.377, -17.606, 0.734)
pt3dadd(104.664, 103.27, -17.651, 0.78)
pt3dadd(104.675, 103.164, -17.696, 0.824)
pt3dadd(104.684, 103.081, -17.767, 0.876)
pt3dadd(104.692, 103.002, -17.842, 0.93)
pt3dadd(104.702, 102.925, -17.918, 0.982)
pt3dadd(104.726, 102.882, -18.009, 1.032)
pt3dadd(104.749, 102.839, -18.1, 1.08)
pt3dadd(104.807, 102.777, -18.171, 1.09)
pt3dadd(104.865, 102.715, -18.242, 1.102)
pt3dadd(104.931, 102.632, -18.278, 1.088)
pt3dadd(105.002, 102.537, -18.295, 1.064)
pt3dadd(105.049, 102.448, -18.343, 1.034)
pt3dadd(105.084, 102.363, -18.406, 1.002)
pt3dadd(105.118, 102.277, -18.47, 0.97)
pt3dadd(105.138, 102.204, -18.546, 0.936)
pt3dadd(105.144, 102.144, -18.632, 0.902)
pt3dadd(105.153, 102.066, -18.7, 0.872)
pt3dadd(105.165, 101.953, -18.733, 0.85)
pt3dadd(105.176, 101.841, -18.766, 0.828)
pt3dadd(105.188, 101.726, -18.794, 0.818)
pt3dadd(105.201, 101.611, -18.821, 0.808)
pt3dadd(105.209, 101.496, -18.849, 0.792)
pt3dadd(105.216, 101.382, -18.878, 0.77)
pt3dadd(105.219, 101.266, -18.905, 0.748)
pt3dadd(105.21, 101.149, -18.926, 0.73)
pt3dadd(105.202, 101.032, -18.948, 0.71)
pt3dadd(105.194, 100.916, -18.969, 0.69)
pt3dadd(105.185, 100.799, -18.99, 0.672)
pt3dadd(105.177, 100.682, -19.013, 0.652)
pt3dadd(105.188, 100.583, -19.068, 0.638)
pt3dadd(105.198, 100.483, -19.123, 0.622)
pt3dadd(105.209, 100.383, -19.178, 0.608)
pt3dadd(105.219, 100.283, -19.233, 0.592)
pt3dadd(105.23, 100.184, -19.288, 0.578)
pt3dadd(105.241, 100.074, -19.328, 0.578)
pt3dadd(105.253, 99.965, -19.368, 0.578)
pt3dadd(105.264, 99.855, -19.407, 0.578)
pt3dadd(105.276, 99.746, -19.447, 0.578)
pt3dadd(105.287, 99.636, -19.486, 0.578)
pt3dadd(105.301, 99.522, -19.511, 0.588)
pt3dadd(105.315, 99.404, -19.528, 0.606)
pt3dadd(105.33, 99.287, -19.544, 0.622)
pt3dadd(105.345, 99.169, -19.561, 0.64)
pt3dadd(105.359, 99.052, -19.578, 0.656)
pt3dadd(105.374, 98.934, -19.595, 0.672)
pt3dadd(105.419, 98.828, -19.615, 0.69)
pt3dadd(105.479, 98.727, -19.636, 0.706)
pt3dadd(105.539, 98.627, -19.658, 0.722)
pt3dadd(105.598, 98.526, -19.679, 0.738)
pt3dadd(105.657, 98.425, -19.7, 0.75)
pt3dadd(105.688, 98.309, -19.7, 0.694)
pt3dadd(105.739, 98.2, -19.7, 0.63)
pt3dadd(105.79, 98.092, -19.7, 0.566)
pt3dadd(105.815, 97.975, -19.703, 0.524)
pt3dadd(105.832, 97.857, -19.707, 0.488)
pt3dadd(105.849, 97.738, -19.712, 0.452)
pt3dadd(105.859, 97.646, -19.768, 0.436)
pt3dadd(105.863, 97.603, -19.861, 0.468)
pt3dadd(105.867, 97.571, -19.958, 0.522)
pt3dadd(105.872, 97.519, -20.047, 0.614)
pt3dadd(105.878, 97.457, -20.132, 0.682)
pt3dadd(105.888, 97.37, -20.199, 0.752)
pt3dadd(105.899, 97.263, -20.244, 0.828)
pt3dadd(105.91, 97.156, -20.289, 0.778)
pt3dadd(105.887, 97.064, -20.276, 0.53)
pt3dadd(105.84, 97.086, -20.189, 0.478)
pt3dadd(105.793, 97.117, -20.1, 0.452)
}
apic[32] {pt3dclear()
pt3dadd(117.804, 104.533, -3.3, 2.034)
pt3dadd(117.906, 104.582, -3.3, 2.002)
pt3dadd(118.014, 104.634, -3.3, 1.966)
pt3dadd(118.122, 104.686, -3.3, 1.932)
pt3dadd(118.23, 104.738, -3.3, 1.896)
pt3dadd(118.339, 104.79, -3.3, 1.862)
pt3dadd(118.447, 104.842, -3.3, 1.826)
pt3dadd(118.555, 104.893, -3.3, 1.792)
pt3dadd(118.663, 104.945, -3.3, 1.756)
pt3dadd(118.76, 105.012, -3.3, 1.72)
pt3dadd(118.832, 105.107, -3.3, 1.686)
pt3dadd(118.904, 105.203, -3.3, 1.652)
pt3dadd(118.976, 105.299, -3.3, 1.628)
pt3dadd(119.045, 105.397, -3.3, 1.606)
pt3dadd(119.087, 105.509, -3.3, 1.582)
pt3dadd(119.13, 105.622, -3.3, 1.56)
pt3dadd(119.125, 105.74, -3.3, 1.508)
pt3dadd(119.113, 105.859, -3.3, 1.448)
pt3dadd(119.1, 105.979, -3.3, 1.39)
pt3dadd(119.116, 106.097, -3.3, 1.262)
pt3dadd(119.14, 106.214, -3.304, 1.144)
pt3dadd(119.176, 106.326, -3.323, 1.096)
pt3dadd(119.213, 106.438, -3.342, 1.048)
pt3dadd(119.25, 106.55, -3.361, 1)
pt3dadd(119.286, 106.662, -3.38, 0.952)
pt3dadd(119.33, 106.771, -3.398, 0.83)
pt3dadd(119.354, 106.888, -3.399, 0.754)
pt3dadd(119.354, 107.006, -3.382, 0.746)
pt3dadd(119.343, 107.117, -3.346, 0.714)
pt3dadd(119.331, 107.229, -3.314, 0.682)
pt3dadd(119.318, 107.347, -3.3, 0.678)
pt3dadd(119.308, 107.465, -3.314, 0.682)
pt3dadd(119.326, 107.562, -3.362, 0.736)
pt3dadd(119.377, 107.595, -3.446, 0.836)
pt3dadd(119.41, 107.598, -3.542, 0.878)
pt3dadd(119.442, 107.601, -3.638, 0.832)
pt3dadd(119.484, 107.654, -3.716, 0.774)
pt3dadd(119.53, 107.728, -3.785, 0.73)
pt3dadd(119.56, 107.841, -3.794, 0.708)
pt3dadd(119.59, 107.958, -3.799, 0.684)
pt3dadd(119.594, 108.074, -3.783, 0.684)
pt3dadd(119.585, 108.19, -3.759, 0.692)
pt3dadd(119.577, 108.306, -3.735, 0.7)
pt3dadd(119.568, 108.416, -3.698, 0.698)
pt3dadd(119.557, 108.518, -3.647, 0.686)
pt3dadd(119.546, 108.626, -3.608, 0.662)
pt3dadd(119.528, 108.744, -3.6, 0.594)
pt3dadd(119.492, 108.858, -3.6, 0.536)
pt3dadd(119.433, 108.962, -3.6, 0.528)
pt3dadd(119.387, 109.07, -3.582, 0.486)
}
}
proc shape3d_180() {
apic[32] { pt3dadd(119.367, 109.178, -3.543, 0.4)
pt3dadd(119.355, 109.291, -3.512, 0.328)
pt3dadd(119.343, 109.408, -3.519, 0.346)
pt3dadd(119.334, 109.491, -3.584, 0.462)
pt3dadd(119.331, 109.517, -3.68, 0.58)
pt3dadd(119.331, 109.52, -3.78, 0.642)
pt3dadd(119.343, 109.522, -3.879, 0.676)
pt3dadd(119.402, 109.531, -3.96, 0.65)
pt3dadd(119.514, 109.56, -3.985, 0.626)
pt3dadd(119.626, 109.59, -4.01, 0.604)
pt3dadd(119.698, 109.642, -4.076, 0.576)
pt3dadd(119.763, 109.689, -4.148, 0.552)
pt3dadd(119.804, 109.713, -4.24, 0.552)
pt3dadd(119.845, 109.736, -4.332, 0.552)
pt3dadd(119.872, 109.797, -4.391, 0.568)
pt3dadd(119.874, 109.916, -4.395, 0.606)
pt3dadd(119.877, 110.036, -4.399, 0.646)
pt3dadd(119.868, 110.156, -4.4, 0.774)
pt3dadd(119.872, 110.275, -4.405, 0.832)
pt3dadd(119.88, 110.395, -4.41, 0.866)
pt3dadd(119.889, 110.514, -4.416, 0.902)
pt3dadd(119.897, 110.634, -4.422, 0.936)
pt3dadd(119.905, 110.753, -4.428, 0.97)
pt3dadd(119.913, 110.873, -4.434, 1.006)
pt3dadd(119.901, 110.987, -4.462, 1.036)
pt3dadd(119.889, 111.102, -4.489, 1.068)
pt3dadd(119.877, 111.217, -4.517, 1.098)
pt3dadd(119.865, 111.332, -4.544, 1.13)
pt3dadd(119.853, 111.446, -4.572, 1.16)
pt3dadd(119.833, 111.561, -4.59, 1.192)
pt3dadd(119.801, 111.677, -4.592, 1.22)
pt3dadd(119.768, 111.792, -4.593, 1.25)
pt3dadd(119.736, 111.908, -4.595, 1.28)
pt3dadd(119.704, 112.023, -4.597, 1.308)
pt3dadd(119.671, 112.139, -4.599, 1.338)
pt3dadd(119.626, 112.249, -4.6, 1.37)
pt3dadd(119.562, 112.35, -4.6, 1.404)
pt3dadd(119.503, 112.454, -4.6, 1.43)
pt3dadd(119.476, 112.571, -4.6, 1.42)
pt3dadd(119.449, 112.687, -4.6, 1.412)
pt3dadd(119.413, 112.801, -4.602, 1.38)
pt3dadd(119.366, 112.912, -4.607, 1.326)
pt3dadd(119.326, 113.015, -4.624, 1.276)
pt3dadd(119.319, 113.075, -4.71, 1.242)
pt3dadd(119.313, 113.136, -4.796, 1.206)
pt3dadd(119.288, 113.144, -4.894, 1.22)
pt3dadd(119.262, 113.177, -4.981, 1.236)
pt3dadd(119.236, 113.26, -5.049, 1.254)
pt3dadd(119.209, 113.344, -5.118, 1.27)
pt3dadd(119.183, 113.427, -5.187, 1.286)
pt3dadd(119.156, 113.51, -5.255, 1.304)
pt3dadd(119.107, 113.603, -5.301, 1.306)
pt3dadd(119.054, 113.698, -5.343, 1.306)
pt3dadd(119.026, 113.765, -5.422, 1.244)
pt3dadd(118.999, 113.831, -5.503, 1.178)
pt3dadd(118.993, 113.884, -5.592, 1.122)
pt3dadd(118.988, 113.938, -5.682, 1.066)
pt3dadd(118.986, 113.949, -5.779, 1.042)
pt3dadd(118.986, 113.949, -5.879, 1.024)
pt3dadd(118.986, 113.949, -5.979, 1.008)
pt3dadd(118.953, 113.966, -6.073, 1.024)
pt3dadd(118.912, 113.987, -6.165, 1.048)
pt3dadd(118.865, 114.068, -6.214, 1.076)
pt3dadd(118.842, 114.177, -6.251, 1.016)
pt3dadd(118.83, 114.288, -6.284, 0.94)
pt3dadd(118.818, 114.406, -6.299, 0.976)
pt3dadd(118.805, 114.525, -6.3, 1.12)
pt3dadd(118.793, 114.645, -6.3, 1.168)
pt3dadd(118.78, 114.764, -6.3, 1.206)
pt3dadd(118.767, 114.883, -6.3, 1.246)
pt3dadd(118.755, 115.003, -6.3, 1.286)
pt3dadd(118.742, 115.122, -6.3, 1.324)
pt3dadd(118.73, 115.242, -6.3, 1.364)
pt3dadd(118.717, 115.361, -6.3, 1.404)
pt3dadd(118.705, 115.48, -6.3, 1.484)
pt3dadd(118.692, 115.599, -6.3, 1.568)
pt3dadd(118.68, 115.719, -6.3, 1.652)
pt3dadd(118.698, 115.837, -6.3, 1.754)
pt3dadd(118.719, 115.955, -6.3, 1.858)
pt3dadd(118.734, 116.066, -6.326, 1.942)
pt3dadd(118.744, 116.169, -6.377, 2.004)
pt3dadd(118.768, 116.255, -6.44, 2.05)
pt3dadd(118.806, 116.326, -6.514, 2.076)
pt3dadd(118.833, 116.403, -6.587, 2.008)
pt3dadd(118.853, 116.495, -6.646, 1.932)
pt3dadd(118.869, 116.6, -6.693, 1.884)
pt3dadd(118.884, 116.705, -6.739, 1.834)
pt3dadd(118.9, 116.811, -6.786, 1.784)
pt3dadd(118.915, 116.916, -6.832, 1.734)
pt3dadd(118.908, 116.991, -6.91, 1.606)
pt3dadd(118.9, 117.065, -6.988, 1.476)
pt3dadd(118.89, 117.167, -7.038, 1.4)
pt3dadd(118.878, 117.274, -7.083, 1.332)
pt3dadd(118.901, 117.383, -7.103, 1.306)
pt3dadd(118.946, 117.494, -7.108, 1.306)
pt3dadd(119.021, 117.564, -7.128, 1.334)
pt3dadd(119.13, 117.588, -7.164, 1.392)
pt3dadd(119.231, 117.632, -7.192, 1.448)
pt3dadd(119.311, 117.721, -7.2, 1.504)
pt3dadd(119.375, 117.819, -7.222, 1.506)
pt3dadd(119.438, 117.917, -7.245, 1.506)
pt3dadd(119.501, 118.015, -7.268, 1.506)
pt3dadd(119.564, 118.114, -7.29, 1.506)
pt3dadd(119.607, 118.217, -7.322, 1.49)
pt3dadd(119.634, 118.325, -7.359, 1.462)
pt3dadd(119.662, 118.433, -7.396, 1.434)
pt3dadd(119.689, 118.541, -7.434, 1.406)
pt3dadd(119.722, 118.647, -7.47, 1.378)
pt3dadd(119.795, 118.734, -7.502, 1.348)
pt3dadd(119.869, 118.821, -7.533, 1.318)
pt3dadd(119.942, 118.908, -7.565, 1.288)
pt3dadd(120.016, 118.995, -7.596, 1.26)
pt3dadd(120.031, 119.111, -7.6, 1.222)
pt3dadd(120.038, 119.231, -7.6, 1.182)
pt3dadd(120.077, 119.328, -7.604, 1.158)
pt3dadd(120.187, 119.37, -7.619, 1.17)
pt3dadd(120.292, 119.415, -7.638, 1.184)
pt3dadd(120.31, 119.51, -7.697, 1.224)
pt3dadd(120.323, 119.602, -7.759, 1.26)
pt3dadd(120.314, 119.684, -7.832, 1.284)
pt3dadd(120.306, 119.767, -7.902, 1.306)
pt3dadd(120.293, 119.883, -7.926, 1.3)
pt3dadd(120.281, 119.999, -7.95, 1.294)
pt3dadd(120.269, 120.114, -7.975, 1.288)
pt3dadd(120.257, 120.23, -7.999, 1.28)
pt3dadd(120.245, 120.349, -8.004, 1.248)
pt3dadd(120.232, 120.469, -8.007, 1.212)
pt3dadd(120.22, 120.587, -8.014, 1.172)
pt3dadd(120.222, 120.692, -8.058, 1.072)
pt3dadd(120.254, 120.796, -8.102, 1.05)
pt3dadd(120.288, 120.899, -8.146, 1.026)
pt3dadd(120.32, 121.001, -8.189, 1.002)
pt3dadd(120.353, 121.104, -8.233, 0.98)
}
apic[33] {pt3dclear()
pt3dadd(120.353, 121.104, -8.233, 0.98)
pt3dadd(120.361, 121.163, -8.254, 0.972)
pt3dadd(120.377, 121.272, -8.293, 0.96)
pt3dadd(120.39, 121.36, -8.355, 0.954)
pt3dadd(120.403, 121.43, -8.435, 0.954)
pt3dadd(120.451, 121.49, -8.508, 0.962)
pt3dadd(120.521, 121.543, -8.577, 0.976)
pt3dadd(120.611, 121.613, -8.593, 0.96)
pt3dadd(120.706, 121.687, -8.599, 0.936)
pt3dadd(120.748, 121.765, -8.652, 0.912)
pt3dadd(120.769, 121.846, -8.724, 0.888)
pt3dadd(120.791, 121.926, -8.796, 0.862)
pt3dadd(120.792, 122.027, -8.843, 0.834)
pt3dadd(120.78, 122.14, -8.876, 0.802)
pt3dadd(120.764, 122.254, -8.9, 0.778)
pt3dadd(120.724, 122.363, -8.911, 0.786)
pt3dadd(120.662, 122.461, -8.938, 0.81)
pt3dadd(120.601, 122.56, -8.965, 0.832)
pt3dadd(120.54, 122.657, -8.992, 0.854)
pt3dadd(120.48, 122.755, -9.019, 0.876)
pt3dadd(120.443, 122.867, -9.035, 0.9)
pt3dadd(120.408, 122.981, -9.05, 0.922)
pt3dadd(120.373, 123.095, -9.064, 0.946)
pt3dadd(120.34, 123.208, -9.079, 0.97)
pt3dadd(120.305, 123.322, -9.093, 0.994)
pt3dadd(120.27, 123.434, -9.11, 1.02)
pt3dadd(120.235, 123.547, -9.129, 1.048)
pt3dadd(120.199, 123.66, -9.149, 1.078)
pt3dadd(120.164, 123.772, -9.168, 1.106)
pt3dadd(120.13, 123.884, -9.187, 1.136)
pt3dadd(120.102, 123.998, -9.2, 1.158)
pt3dadd(120.09, 124.118, -9.2, 1.17)
pt3dadd(120.077, 124.237, -9.2, 1.18)
pt3dadd(120.065, 124.357, -9.2, 1.19)
pt3dadd(120.052, 124.476, -9.2, 1.202)
pt3dadd(120.04, 124.596, -9.2, 1.212)
pt3dadd(120.026, 124.715, -9.2, 1.224)
pt3dadd(120.014, 124.832, -9.21, 1.234)
pt3dadd(120.002, 124.946, -9.24, 1.242)
pt3dadd(119.99, 125.06, -9.269, 1.252)
pt3dadd(119.978, 125.174, -9.299, 1.26)
pt3dadd(119.967, 125.288, -9.329, 1.27)
pt3dadd(119.955, 125.402, -9.359, 1.278)
pt3dadd(119.942, 125.518, -9.382, 1.28)
pt3dadd(119.93, 125.635, -9.403, 1.28)
pt3dadd(119.918, 125.752, -9.423, 1.28)
pt3dadd(119.905, 125.868, -9.444, 1.28)
pt3dadd(119.893, 125.986, -9.465, 1.28)
pt3dadd(119.881, 126.102, -9.485, 1.28)
pt3dadd(119.867, 126.215, -9.516, 1.276)
pt3dadd(119.853, 126.328, -9.549, 1.272)
pt3dadd(119.838, 126.44, -9.582, 1.268)
pt3dadd(119.824, 126.552, -9.615, 1.262)
pt3dadd(119.81, 126.665, -9.648, 1.258)
pt3dadd(119.778, 126.775, -9.669, 1.252)
pt3dadd(119.723, 126.881, -9.676, 1.242)
pt3dadd(119.667, 126.986, -9.682, 1.232)
pt3dadd(119.612, 127.093, -9.689, 1.222)
pt3dadd(119.557, 127.199, -9.695, 1.212)
pt3dadd(119.512, 127.309, -9.7, 1.196)
pt3dadd(119.494, 127.428, -9.7, 1.162)
pt3dadd(119.477, 127.547, -9.7, 1.126)
pt3dadd(119.447, 127.661, -9.7, 1.08)
pt3dadd(119.396, 127.77, -9.7, 1.016)
pt3dadd(119.345, 127.878, -9.7, 0.952)
pt3dadd(119.328, 127.997, -9.704, 0.89)
pt3dadd(119.311, 128.116, -9.708, 0.826)
}
}
proc shape3d_181() {
apic[33] { pt3dadd(119.291, 128.222, -9.73, 0.76)
pt3dadd(119.264, 128.288, -9.811, 0.682)
pt3dadd(119.227, 128.345, -9.891, 0.61)
pt3dadd(119.171, 128.388, -9.968, 0.552)
pt3dadd(119.157, 128.506, -9.987, 0.552)
pt3dadd(119.142, 128.622, -10.006, 0.552)
pt3dadd(119.127, 128.74, -10.025, 0.552)
pt3dadd(119.113, 128.856, -10.043, 0.552)
pt3dadd(119.098, 128.972, -10.062, 0.552)
pt3dadd(119.081, 129.088, -10.086, 0.554)
pt3dadd(119.05, 129.191, -10.129, 0.56)
pt3dadd(119.02, 129.295, -10.172, 0.566)
pt3dadd(118.989, 129.4, -10.215, 0.572)
pt3dadd(118.959, 129.504, -10.256, 0.578)
pt3dadd(118.935, 129.622, -10.263, 0.594)
pt3dadd(118.911, 129.738, -10.269, 0.608)
pt3dadd(118.887, 129.856, -10.276, 0.624)
pt3dadd(118.847, 129.968, -10.282, 0.632)
pt3dadd(118.8, 130.079, -10.288, 0.638)
pt3dadd(118.754, 130.189, -10.293, 0.646)
pt3dadd(118.707, 130.298, -10.299, 0.652)
pt3dadd(118.634, 130.393, -10.3, 0.682)
pt3dadd(118.556, 130.484, -10.3, 0.718)
pt3dadd(118.461, 130.553, -10.288, 0.764)
pt3dadd(118.358, 130.61, -10.271, 0.816)
pt3dadd(118.321, 130.693, -10.217, 0.884)
pt3dadd(118.305, 130.783, -10.152, 0.958)
pt3dadd(118.288, 130.892, -10.124, 1.02)
pt3dadd(118.27, 131.01, -10.111, 1.078)
pt3dadd(118.248, 131.126, -10.1, 1.14)
pt3dadd(118.193, 131.233, -10.1, 1.222)
pt3dadd(118.145, 131.341, -10.088, 1.264)
pt3dadd(118.101, 131.45, -10.068, 1.28)
pt3dadd(118.057, 131.56, -10.048, 1.294)
pt3dadd(118.013, 131.668, -10.028, 1.31)
pt3dadd(117.969, 131.777, -10.008, 1.326)
pt3dadd(117.903, 131.873, -9.986, 1.33)
pt3dadd(117.824, 131.958, -9.963, 1.33)
pt3dadd(117.745, 132.044, -9.94, 1.33)
pt3dadd(117.666, 132.13, -9.918, 1.33)
pt3dadd(117.59, 132.22, -9.9, 1.328)
pt3dadd(117.526, 132.32, -9.9, 1.32)
pt3dadd(117.461, 132.422, -9.9, 1.31)
pt3dadd(117.397, 132.522, -9.9, 1.3)
pt3dadd(117.332, 132.624, -9.9, 1.29)
pt3dadd(117.267, 132.725, -9.9, 1.28)
}
apic[34] {pt3dclear()
pt3dadd(117.267, 132.725, -9.9, 1.28)
pt3dadd(117.264, 132.751, -9.9, 1.276)
pt3dadd(117.247, 132.87, -9.9, 1.248)
pt3dadd(117.23, 132.989, -9.9, 1.222)
pt3dadd(117.195, 133.099, -9.9, 1.186)
pt3dadd(117.124, 133.196, -9.9, 1.13)
pt3dadd(117.046, 133.284, -9.9, 1.072)
pt3dadd(116.932, 133.32, -9.9, 1.006)
pt3dadd(116.817, 133.355, -9.9, 0.94)
pt3dadd(116.707, 133.402, -9.9, 0.862)
pt3dadd(116.598, 133.451, -9.9, 0.782)
pt3dadd(116.481, 133.47, -9.9, 0.708)
pt3dadd(116.361, 133.472, -9.9, 0.638)
pt3dadd(116.27, 133.543, -9.9, 0.606)
pt3dadd(116.183, 133.627, -9.9, 0.58)
pt3dadd(116.096, 133.71, -9.9, 0.556)
pt3dadd(116.009, 133.792, -9.9, 0.53)
pt3dadd(115.922, 133.874, -9.9, 0.504)
pt3dadd(115.833, 133.955, -9.9, 0.488)
pt3dadd(115.743, 134.034, -9.9, 0.474)
pt3dadd(115.654, 134.114, -9.9, 0.458)
pt3dadd(115.564, 134.194, -9.9, 0.442)
pt3dadd(115.475, 134.274, -9.9, 0.428)
pt3dadd(115.37, 134.333, -9.9, 0.426)
pt3dadd(115.265, 134.39, -9.9, 0.426)
pt3dadd(115.171, 134.464, -9.9, 0.464)
pt3dadd(115.08, 134.543, -9.9, 0.512)
pt3dadd(115.031, 134.646, -9.9, 0.564)
pt3dadd(115.004, 134.764, -9.9, 0.62)
pt3dadd(114.977, 134.88, -9.9, 0.676)
pt3dadd(114.964, 135, -9.9, 0.71)
pt3dadd(114.951, 135.119, -9.9, 0.744)
pt3dadd(114.939, 135.239, -9.9, 0.778)
pt3dadd(114.891, 135.348, -9.9, 0.796)
pt3dadd(114.843, 135.457, -9.9, 0.816)
pt3dadd(114.794, 135.568, -9.9, 0.834)
pt3dadd(114.746, 135.678, -9.9, 0.854)
pt3dadd(114.64, 135.734, -9.9, 0.866)
pt3dadd(114.535, 135.792, -9.9, 0.878)
pt3dadd(114.476, 135.893, -9.9, 0.886)
pt3dadd(114.427, 136.002, -9.9, 0.894)
pt3dadd(114.377, 136.111, -9.9, 0.902)
pt3dadd(114.33, 136.222, -9.9, 0.896)
pt3dadd(114.285, 136.333, -9.9, 0.886)
pt3dadd(114.24, 136.444, -9.9, 0.864)
pt3dadd(114.209, 136.558, -9.908, 0.824)
pt3dadd(114.195, 136.674, -9.927, 0.816)
pt3dadd(114.18, 136.793, -9.946, 0.808)
pt3dadd(114.165, 136.909, -9.965, 0.8)
pt3dadd(114.151, 137.026, -9.984, 0.79)
pt3dadd(114.136, 137.143, -10.003, 0.782)
pt3dadd(114.123, 137.257, -10.029, 0.784)
pt3dadd(114.111, 137.37, -10.063, 0.796)
pt3dadd(114.099, 137.484, -10.092, 0.81)
pt3dadd(114.087, 137.6, -10.109, 0.838)
pt3dadd(114.075, 137.719, -10.127, 0.868)
pt3dadd(114.06, 137.828, -10.161, 0.914)
pt3dadd(114.042, 137.934, -10.208, 0.972)
pt3dadd(114.007, 137.999, -10.273, 1.016)
pt3dadd(113.949, 138.02, -10.359, 1.042)
pt3dadd(113.867, 138.054, -10.417, 1.064)
pt3dadd(113.763, 138.1, -10.449, 1.08)
pt3dadd(113.658, 138.144, -10.481, 1.096)
pt3dadd(113.582, 138.218, -10.5, 1.1)
pt3dadd(113.543, 138.331, -10.5, 1.09)
pt3dadd(113.505, 138.445, -10.5, 1.08)
pt3dadd(113.442, 138.547, -10.5, 1.104)
pt3dadd(113.372, 138.646, -10.5, 1.1)
pt3dadd(113.301, 138.742, -10.5, 1.094)
pt3dadd(113.231, 138.839, -10.5, 1.09)
pt3dadd(113.16, 138.937, -10.5, 1.084)
pt3dadd(113.092, 139.034, -10.5, 1.08)
pt3dadd(113.079, 139.154, -10.5, 1.076)
pt3dadd(113.067, 139.273, -10.5, 1.072)
pt3dadd(113.054, 139.393, -10.5, 1.068)
pt3dadd(113.042, 139.512, -10.5, 1.066)
pt3dadd(113.029, 139.631, -10.5, 1.062)
pt3dadd(113.017, 139.751, -10.5, 1.058)
pt3dadd(113.004, 139.87, -10.5, 1.054)
pt3dadd(112.992, 139.99, -10.5, 1.052)
pt3dadd(112.979, 140.108, -10.5, 1.048)
pt3dadd(112.966, 140.228, -10.5, 1.044)
pt3dadd(112.954, 140.347, -10.5, 1.04)
pt3dadd(112.941, 140.467, -10.5, 1.036)
pt3dadd(112.929, 140.586, -10.5, 1.034)
pt3dadd(112.916, 140.706, -10.5, 1.03)
pt3dadd(112.904, 140.825, -10.5, 1.056)
pt3dadd(112.891, 140.944, -10.5, 1.08)
pt3dadd(112.879, 141.064, -10.5, 1.106)
pt3dadd(112.861, 141.182, -10.5, 1.15)
pt3dadd(112.845, 141.3, -10.5, 1.194)
pt3dadd(112.821, 141.418, -10.5, 1.234)
pt3dadd(112.764, 141.522, -10.5, 1.256)
pt3dadd(112.706, 141.628, -10.5, 1.278)
pt3dadd(112.631, 141.72, -10.5, 1.232)
pt3dadd(112.553, 141.812, -10.5, 1.172)
pt3dadd(112.464, 141.893, -10.5, 1.08)
pt3dadd(112.374, 141.971, -10.5, 0.998)
pt3dadd(112.289, 142.056, -10.5, 0.978)
pt3dadd(112.205, 142.141, -10.5, 0.958)
pt3dadd(112.121, 142.226, -10.5, 0.938)
pt3dadd(112.036, 142.312, -10.5, 0.918)
pt3dadd(111.95, 142.396, -10.5, 0.908)
pt3dadd(111.861, 142.476, -10.5, 0.918)
pt3dadd(111.771, 142.555, -10.5, 0.928)
pt3dadd(111.681, 142.636, -10.5, 0.938)
pt3dadd(111.591, 142.715, -10.5, 0.948)
pt3dadd(111.509, 142.802, -10.5, 0.958)
pt3dadd(111.442, 142.901, -10.5, 0.968)
pt3dadd(111.375, 143, -10.5, 0.976)
pt3dadd(111.307, 143.099, -10.5, 0.986)
pt3dadd(111.24, 143.198, -10.5, 0.996)
pt3dadd(111.175, 143.3, -10.5, 1.01)
pt3dadd(111.124, 143.408, -10.5, 1.042)
pt3dadd(111.073, 143.516, -10.5, 1.074)
pt3dadd(111, 143.611, -10.5, 1.08)
pt3dadd(110.922, 143.701, -10.5, 1.08)
pt3dadd(110.816, 143.73, -10.5, 1.074)
pt3dadd(110.696, 143.728, -10.5, 1.064)
pt3dadd(110.576, 143.724, -10.5, 1.056)
pt3dadd(110.465, 143.767, -10.5, 1.004)
pt3dadd(110.356, 143.818, -10.5, 0.948)
pt3dadd(110.248, 143.87, -10.5, 0.882)
pt3dadd(110.145, 143.929, -10.5, 0.826)
pt3dadd(110.056, 144.008, -10.5, 0.816)
pt3dadd(109.966, 144.09, -10.5, 0.806)
pt3dadd(109.877, 144.17, -10.5, 0.796)
pt3dadd(109.787, 144.25, -10.5, 0.786)
pt3dadd(109.707, 144.337, -10.5, 0.784)
pt3dadd(109.651, 144.443, -10.5, 0.802)
pt3dadd(109.595, 144.55, -10.5, 0.82)
pt3dadd(109.539, 144.655, -10.5, 0.84)
pt3dadd(109.483, 144.761, -10.5, 0.858)
pt3dadd(109.427, 144.868, -10.5, 0.876)
pt3dadd(109.345, 144.955, -10.5, 0.92)
pt3dadd(109.261, 145.039, -10.5, 0.968)
pt3dadd(109.191, 145.136, -10.5, 0.996)
pt3dadd(109.127, 145.238, -10.5, 1.02)
pt3dadd(109.049, 145.328, -10.5, 1.01)
pt3dadd(108.959, 145.406, -10.5, 0.976)
pt3dadd(108.86, 145.469, -10.509, 0.94)
pt3dadd(108.748, 145.504, -10.531, 0.902)
pt3dadd(108.665, 145.535, -10.582, 0.864)
pt3dadd(108.619, 145.558, -10.67, 0.83)
pt3dadd(108.521, 145.548, -10.727, 0.842)
pt3dadd(108.422, 145.537, -10.784, 0.852)
pt3dadd(108.312, 145.57, -10.809, 0.854)
pt3dadd(108.201, 145.604, -10.831, 0.854)
pt3dadd(108.151, 145.702, -10.864, 0.842)
pt3dadd(108.106, 145.806, -10.898, 0.83)
pt3dadd(107.996, 145.844, -10.9, 0.798)
pt3dadd(107.881, 145.879, -10.9, 0.766)
pt3dadd(107.805, 145.96, -10.9, 0.722)
pt3dadd(107.751, 146.066, -10.9, 0.676)
}
}
proc shape3d_182() {
apic[34] { pt3dadd(107.699, 146.176, -10.9, 0.644)
pt3dadd(107.648, 146.284, -10.9, 0.612)
pt3dadd(107.61, 146.398, -10.9, 0.588)
pt3dadd(107.578, 146.513, -10.9, 0.57)
pt3dadd(107.542, 146.627, -10.902, 0.552)
pt3dadd(107.486, 146.731, -10.918, 0.552)
pt3dadd(107.426, 146.831, -10.936, 0.556)
pt3dadd(107.321, 146.869, -10.971, 0.61)
pt3dadd(107.218, 146.916, -11, 0.67)
pt3dadd(107.125, 146.992, -11, 0.76)
pt3dadd(107.054, 147.088, -11, 0.798)
pt3dadd(106.99, 147.188, -11, 0.822)
pt3dadd(106.925, 147.29, -11, 0.846)
pt3dadd(106.861, 147.391, -11, 0.87)
pt3dadd(106.796, 147.492, -11, 0.894)
pt3dadd(106.718, 147.58, -11.013, 0.904)
pt3dadd(106.63, 147.656, -11.036, 0.904)
pt3dadd(106.542, 147.732, -11.059, 0.904)
pt3dadd(106.454, 147.81, -11.082, 0.904)
pt3dadd(106.374, 147.893, -11.101, 0.902)
pt3dadd(106.321, 148, -11.108, 0.892)
pt3dadd(106.269, 148.108, -11.114, 0.882)
pt3dadd(106.216, 148.216, -11.121, 0.874)
pt3dadd(106.164, 148.324, -11.127, 0.864)
pt3dadd(106.111, 148.432, -11.133, 0.854)
pt3dadd(106.055, 148.525, -11.174, 0.83)
pt3dadd(105.999, 148.619, -11.216, 0.808)
pt3dadd(105.942, 148.712, -11.257, 0.784)
pt3dadd(105.886, 148.806, -11.298, 0.76)
pt3dadd(105.816, 148.883, -11.346, 0.734)
pt3dadd(105.739, 148.952, -11.397, 0.704)
pt3dadd(105.673, 148.975, -11.477, 0.69)
pt3dadd(105.605, 148.998, -11.557, 0.678)
pt3dadd(105.497, 149.041, -11.579, 0.678)
pt3dadd(105.393, 149.09, -11.6, 0.678)
pt3dadd(105.329, 149.191, -11.6, 0.678)
pt3dadd(105.264, 149.293, -11.6, 0.678)
pt3dadd(105.238, 149.408, -11.6, 0.666)
pt3dadd(105.219, 149.527, -11.6, 0.654)
pt3dadd(105.139, 149.612, -11.622, 0.642)
pt3dadd(105.056, 149.695, -11.645, 0.63)
pt3dadd(104.974, 149.778, -11.668, 0.62)
pt3dadd(104.892, 149.861, -11.691, 0.608)
pt3dadd(104.81, 149.934, -11.727, 0.596)
pt3dadd(104.727, 150.002, -11.774, 0.584)
pt3dadd(104.645, 150.068, -11.82, 0.57)
pt3dadd(104.562, 150.136, -11.866, 0.558)
pt3dadd(104.48, 150.208, -11.906, 0.552)
pt3dadd(104.398, 150.286, -11.941, 0.552)
pt3dadd(104.316, 150.364, -11.975, 0.552)
pt3dadd(104.235, 150.442, -12.01, 0.552)
pt3dadd(104.157, 150.522, -12.045, 0.56)
pt3dadd(104.089, 150.611, -12.081, 0.588)
pt3dadd(104.014, 150.678, -12.131, 0.624)
pt3dadd(103.933, 150.722, -12.194, 0.666)
pt3dadd(103.905, 150.758, -12.282, 0.71)
pt3dadd(103.896, 150.793, -12.377, 0.754)
pt3dadd(103.887, 150.846, -12.464, 0.802)
pt3dadd(103.878, 150.928, -12.537, 0.862)
pt3dadd(103.858, 151.015, -12.599, 0.916)
pt3dadd(103.81, 151.117, -12.633, 0.954)
pt3dadd(103.763, 151.219, -12.667, 0.992)
pt3dadd(103.714, 151.32, -12.702, 1.03)
pt3dadd(103.637, 151.388, -12.753, 1.044)
pt3dadd(103.575, 151.472, -12.793, 1.016)
pt3dadd(103.522, 151.576, -12.8, 0.934)
pt3dadd(103.446, 151.669, -12.8, 0.894)
pt3dadd(103.37, 151.76, -12.8, 0.854)
pt3dadd(103.294, 151.854, -12.8, 0.814)
pt3dadd(103.218, 151.946, -12.8, 0.774)
pt3dadd(103.147, 152.042, -12.8, 0.738)
pt3dadd(103.082, 152.144, -12.8, 0.704)
pt3dadd(103.018, 152.245, -12.8, 0.67)
pt3dadd(102.953, 152.347, -12.8, 0.638)
pt3dadd(102.889, 152.448, -12.8, 0.604)
pt3dadd(102.826, 152.546, -12.811, 0.572)
pt3dadd(102.769, 152.635, -12.858, 0.548)
pt3dadd(102.712, 152.725, -12.906, 0.524)
pt3dadd(102.655, 152.814, -12.953, 0.5)
pt3dadd(102.598, 152.902, -13, 0.478)
pt3dadd(102.541, 153.005, -13.021, 0.478)
pt3dadd(102.485, 153.107, -13.043, 0.478)
pt3dadd(102.428, 153.211, -13.064, 0.478)
pt3dadd(102.371, 153.314, -13.085, 0.478)
pt3dadd(102.317, 153.418, -13.1, 0.48)
pt3dadd(102.266, 153.526, -13.1, 0.492)
pt3dadd(102.215, 153.635, -13.1, 0.502)
pt3dadd(102.122, 153.656, -13.157, 0.528)
pt3dadd(102.03, 153.672, -13.218, 0.554)
pt3dadd(101.98, 153.647, -13.306, 0.566)
pt3dadd(101.926, 153.62, -13.391, 0.58)
pt3dadd(101.823, 153.569, -13.419, 0.604)
pt3dadd(101.719, 153.521, -13.448, 0.628)
pt3dadd(101.611, 153.512, -13.49, 0.636)
pt3dadd(101.502, 153.505, -13.532, 0.642)
pt3dadd(101.394, 153.497, -13.575, 0.648)
pt3dadd(101.282, 153.504, -13.6, 0.662)
pt3dadd(101.165, 153.532, -13.6, 0.682)
pt3dadd(101.048, 153.558, -13.6, 0.702)
pt3dadd(100.929, 153.565, -13.6, 0.678)
pt3dadd(100.814, 153.598, -13.6, 0.672)
pt3dadd(100.698, 153.63, -13.6, 0.668)
pt3dadd(100.583, 153.662, -13.6, 0.664)
pt3dadd(100.467, 153.695, -13.6, 0.658)
pt3dadd(100.352, 153.728, -13.6, 0.654)
pt3dadd(100.258, 153.8, -13.6, 0.646)
pt3dadd(100.171, 153.882, -13.6, 0.636)
pt3dadd(100.084, 153.965, -13.6, 0.624)
pt3dadd(99.997, 154.048, -13.6, 0.614)
pt3dadd(99.911, 154.13, -13.6, 0.604)
pt3dadd(99.818, 154.206, -13.6, 0.614)
pt3dadd(99.723, 154.279, -13.6, 0.63)
pt3dadd(99.628, 154.354, -13.6, 0.646)
pt3dadd(99.534, 154.427, -13.6, 0.66)
pt3dadd(99.439, 154.502, -13.6, 0.676)
pt3dadd(99.328, 154.543, -13.6, 0.694)
pt3dadd(99.213, 154.578, -13.6, 0.714)
pt3dadd(99.099, 154.614, -13.6, 0.732)
pt3dadd(98.984, 154.651, -13.6, 0.75)
pt3dadd(98.87, 154.686, -13.6, 0.77)
pt3dadd(98.768, 154.745, -13.6, 0.784)
pt3dadd(98.679, 154.825, -13.6, 0.794)
pt3dadd(98.589, 154.904, -13.6, 0.804)
pt3dadd(98.5, 154.985, -13.6, 0.814)
pt3dadd(98.41, 155.065, -13.6, 0.824)
pt3dadd(98.331, 155.153, -13.61, 0.806)
pt3dadd(98.26, 155.248, -13.627, 0.768)
pt3dadd(98.178, 155.324, -13.656, 0.702)
pt3dadd(98.088, 155.392, -13.693, 0.618)
pt3dadd(97.988, 155.45, -13.714, 0.56)
pt3dadd(97.885, 155.509, -13.731, 0.508)
pt3dadd(97.801, 155.556, -13.789, 0.49)
pt3dadd(97.724, 155.6, -13.854, 0.478)
pt3dadd(97.676, 155.647, -13.937, 0.486)
pt3dadd(97.627, 155.694, -14.02, 0.494)
pt3dadd(97.58, 155.743, -14.101, 0.502)
pt3dadd(97.569, 155.854, -14.14, 0.524)
pt3dadd(97.557, 155.963, -14.179, 0.546)
pt3dadd(97.548, 156.052, -14.244, 0.572)
pt3dadd(97.54, 156.131, -14.319, 0.598)
pt3dadd(97.531, 156.21, -14.393, 0.626)
pt3dadd(97.527, 156.247, -14.488, 0.684)
pt3dadd(97.524, 156.281, -14.584, 0.746)
pt3dadd(97.49, 156.318, -14.67, 0.81)
pt3dadd(97.424, 156.361, -14.744, 0.872)
pt3dadd(97.352, 156.402, -14.815, 0.932)
pt3dadd(97.243, 156.418, -14.854, 0.956)
pt3dadd(97.133, 156.434, -14.891, 0.964)
pt3dadd(97.034, 156.478, -14.921, 0.868)
pt3dadd(96.96, 156.55, -14.973, 0.844)
pt3dadd(96.887, 156.622, -15.025, 0.82)
pt3dadd(96.814, 156.692, -15.077, 0.794)
pt3dadd(96.742, 156.773, -15.118, 0.778)
pt3dadd(96.673, 156.868, -15.137, 0.778)
pt3dadd(96.604, 156.964, -15.157, 0.778)
pt3dadd(96.536, 157.058, -15.176, 0.778)
pt3dadd(96.467, 157.154, -15.196, 0.778)
pt3dadd(96.411, 157.26, -15.2, 0.82)
pt3dadd(96.36, 157.368, -15.2, 0.872)
pt3dadd(96.323, 157.481, -15.207, 0.916)
pt3dadd(96.305, 157.597, -15.225, 0.946)
pt3dadd(96.288, 157.715, -15.243, 0.976)
pt3dadd(96.24, 157.772, -15.318, 0.966)
pt3dadd(96.186, 157.828, -15.39, 0.948)
pt3dadd(96.097, 157.907, -15.401, 0.898)
pt3dadd(96.005, 157.976, -15.416, 0.844)
pt3dadd(95.896, 157.985, -15.457, 0.77)
pt3dadd(95.809, 158.044, -15.5, 0.74)
pt3dadd(95.729, 158.117, -15.543, 0.72)
pt3dadd(95.65, 158.189, -15.586, 0.702)
pt3dadd(95.57, 158.263, -15.63, 0.684)
pt3dadd(95.493, 158.323, -15.686, 0.666)
pt3dadd(95.418, 158.378, -15.749, 0.648)
pt3dadd(95.343, 158.434, -15.812, 0.628)
pt3dadd(95.268, 158.488, -15.875, 0.61)
pt3dadd(95.169, 158.532, -15.9, 0.59)
pt3dadd(95.054, 158.566, -15.9, 0.568)
pt3dadd(94.94, 158.6, -15.907, 0.552)
pt3dadd(94.829, 158.638, -15.929, 0.552)
pt3dadd(94.748, 158.672, -15.975, 0.56)
pt3dadd(94.733, 158.706, -16.07, 0.582)
pt3dadd(94.711, 158.746, -16.158, 0.606)
pt3dadd(94.631, 158.83, -16.182, 0.632)
pt3dadd(94.553, 158.917, -16.202, 0.656)
pt3dadd(94.485, 159.017, -16.21, 0.674)
pt3dadd(94.441, 159.115, -16.249, 0.678)
pt3dadd(94.404, 159.215, -16.295, 0.678)
pt3dadd(94.362, 159.246, -16.381, 0.678)
pt3dadd(94.321, 159.266, -16.473, 0.678)
pt3dadd(94.305, 159.352, -16.536, 0.678)
pt3dadd(94.295, 159.451, -16.592, 0.678)
pt3dadd(94.256, 159.547, -16.639, 0.678)
pt3dadd(94.202, 159.642, -16.681, 0.678)
pt3dadd(94.123, 159.715, -16.723, 0.678)
pt3dadd(94.039, 159.784, -16.764, 0.678)
pt3dadd(93.954, 159.853, -16.806, 0.678)
pt3dadd(93.917, 159.893, -16.891, 0.678)
pt3dadd(93.887, 159.93, -16.983, 0.678)
pt3dadd(93.842, 159.977, -17.067, 0.678)
pt3dadd(93.793, 160.026, -17.148, 0.678)
}
}
proc shape3d_183() {
apic[34] { pt3dadd(93.755, 160.1, -17.207, 0.682)
pt3dadd(93.738, 160.217, -17.224, 0.692)
pt3dadd(93.72, 160.334, -17.242, 0.702)
pt3dadd(93.714, 160.386, -17.326, 0.718)
pt3dadd(93.709, 160.429, -17.419, 0.734)
pt3dadd(93.705, 160.471, -17.513, 0.75)
pt3dadd(93.69, 160.493, -17.61, 0.786)
pt3dadd(93.671, 160.508, -17.708, 0.828)
pt3dadd(93.639, 160.514, -17.802, 0.92)
pt3dadd(93.598, 160.55, -17.887, 0.99)
pt3dadd(93.565, 160.61, -17.969, 1.008)
pt3dadd(93.532, 160.669, -18.051, 1.024)
pt3dadd(93.498, 160.729, -18.134, 1.04)
pt3dadd(93.459, 160.793, -18.209, 1.054)
pt3dadd(93.392, 160.877, -18.254, 1.054)
pt3dadd(93.325, 160.96, -18.3, 1.054)
pt3dadd(93.258, 161.044, -18.345, 1.054)
pt3dadd(93.19, 161.126, -18.39, 1.054)
pt3dadd(93.111, 161.212, -18.416, 1.036)
pt3dadd(93.031, 161.296, -18.441, 1.02)
pt3dadd(92.951, 161.381, -18.467, 1.002)
pt3dadd(92.872, 161.464, -18.492, 0.984)
pt3dadd(92.802, 161.533, -18.545, 0.984)
pt3dadd(92.736, 161.596, -18.611, 0.99)
pt3dadd(92.67, 161.658, -18.677, 0.996)
pt3dadd(92.604, 161.72, -18.742, 1.002)
pt3dadd(92.549, 161.756, -18.823, 1.018)
pt3dadd(92.501, 161.777, -18.913, 1.04)
pt3dadd(92.453, 161.797, -19.003, 1.06)
pt3dadd(92.406, 161.818, -19.093, 1.082)
pt3dadd(92.358, 161.839, -19.183, 1.104)
pt3dadd(92.278, 161.888, -19.245, 1.14)
pt3dadd(92.197, 161.939, -19.305, 1.176)
pt3dadd(92.116, 161.989, -19.365, 1.214)
pt3dadd(92.034, 162.041, -19.426, 1.25)
pt3dadd(91.94, 162.062, -19.484, 1.27)
pt3dadd(91.844, 162.08, -19.542, 1.288)
pt3dadd(91.748, 162.096, -19.6, 1.304)
pt3dadd(91.652, 162.114, -19.658, 1.322)
pt3dadd(91.564, 162.145, -19.72, 1.336)
pt3dadd(91.487, 162.193, -19.785, 1.348)
pt3dadd(91.41, 162.24, -19.85, 1.362)
pt3dadd(91.333, 162.289, -19.916, 1.374)
pt3dadd(91.243, 162.324, -19.971, 1.382)
pt3dadd(91.134, 162.342, -20.009, 1.382)
pt3dadd(91.024, 162.359, -20.048, 1.382)
pt3dadd(90.915, 162.377, -20.086, 1.382)
pt3dadd(90.806, 162.395, -20.124, 1.382)
pt3dadd(90.719, 162.432, -20.183, 1.372)
pt3dadd(90.639, 162.476, -20.249, 1.36)
pt3dadd(90.56, 162.521, -20.313, 1.348)
pt3dadd(90.48, 162.565, -20.379, 1.334)
pt3dadd(90.394, 162.618, -20.433, 1.306)
pt3dadd(90.306, 162.673, -20.482, 1.27)
pt3dadd(90.218, 162.73, -20.531, 1.232)
pt3dadd(90.13, 162.786, -20.58, 1.196)
pt3dadd(90.049, 162.854, -20.625, 1.158)
pt3dadd(89.973, 162.931, -20.669, 1.122)
pt3dadd(89.896, 163.008, -20.712, 1.086)
pt3dadd(89.82, 163.085, -20.755, 1.048)
pt3dadd(89.741, 163.146, -20.808, 1.002)
pt3dadd(89.66, 163.192, -20.871, 0.946)
pt3dadd(89.599, 163.254, -20.938, 0.93)
pt3dadd(89.547, 163.324, -21.007, 0.93)
pt3dadd(89.543, 163.333, -21.105, 0.946)
pt3dadd(89.543, 163.337, -21.205, 0.962)
pt3dadd(89.542, 163.342, -21.305, 0.98)
pt3dadd(89.542, 163.346, -21.405, 1.016)
pt3dadd(89.541, 163.351, -21.505, 1.05)
pt3dadd(89.536, 163.364, -21.601, 1.084)
pt3dadd(89.503, 163.434, -21.678, 1.116)
pt3dadd(89.47, 163.502, -21.756, 1.148)
pt3dadd(89.437, 163.572, -21.833, 1.18)
pt3dadd(89.362, 163.625, -21.897, 1.224)
pt3dadd(89.295, 163.675, -21.967, 1.256)
pt3dadd(89.256, 163.736, -22.044, 1.246)
pt3dadd(89.22, 163.812, -22.115, 1.228)
pt3dadd(89.184, 163.889, -22.187, 1.21)
pt3dadd(89.148, 163.964, -22.258, 1.194)
pt3dadd(89.112, 164.041, -22.33, 1.172)
pt3dadd(89.073, 164.113, -22.402, 1.136)
pt3dadd(89.035, 164.186, -22.474, 1.102)
pt3dadd(88.996, 164.261, -22.546, 1.066)
pt3dadd(88.957, 164.334, -22.618, 1.032)
pt3dadd(88.913, 164.396, -22.695, 0.986)
pt3dadd(88.869, 164.458, -22.773, 0.938)
pt3dadd(88.826, 164.519, -22.851, 0.892)
pt3dadd(88.782, 164.579, -22.929, 0.844)
pt3dadd(88.749, 164.656, -23.001, 0.8)
pt3dadd(88.723, 164.738, -23.07, 0.756)
pt3dadd(88.696, 164.821, -23.138, 0.71)
pt3dadd(88.669, 164.904, -23.207, 0.666)
pt3dadd(88.64, 164.984, -23.277, 0.62)
pt3dadd(88.588, 165.046, -23.351, 0.564)
pt3dadd(88.533, 165.115, -23.417, 0.522)
pt3dadd(88.472, 165.199, -23.467, 0.508)
pt3dadd(88.389, 165.268, -23.505, 0.502)
pt3dadd(88.289, 165.323, -23.536, 0.502)
pt3dadd(88.204, 165.347, -23.598, 0.484)
pt3dadd(88.126, 165.36, -23.673, 0.458)
pt3dadd(88.028, 165.354, -23.65, 0.432)
pt3dadd(87.924, 165.343, -23.601, 0.408)
pt3dadd(87.873, 165.338, -23.517, 0.402)
pt3dadd(87.838, 165.334, -23.422, 0.432)
pt3dadd(87.792, 165.329, -23.33, 0.44)
pt3dadd(87.759, 165.326, -23.234, 0.41)
pt3dadd(87.727, 165.323, -23.138, 0.402)
pt3dadd(87.672, 165.323, -23.049, 0.436)
pt3dadd(87.615, 165.323, -22.961, 0.47)
pt3dadd(87.516, 165.364, -22.944, 0.53)
pt3dadd(87.423, 165.409, -22.968, 0.594)
pt3dadd(87.377, 165.446, -23.055, 0.652)
pt3dadd(87.319, 165.498, -23.129, 0.678)
pt3dadd(87.274, 165.517, -23.219, 0.678)
pt3dadd(87.26, 165.538, -23.316, 0.678)
pt3dadd(87.256, 165.581, -23.409, 0.694)
pt3dadd(87.234, 165.618, -23.501, 0.71)
pt3dadd(87.205, 165.652, -23.595, 0.72)
pt3dadd(87.177, 165.683, -23.688, 0.732)
pt3dadd(87.149, 165.716, -23.781, 0.742)
pt3dadd(87.121, 165.749, -23.875, 0.752)
pt3dadd(87.094, 165.788, -23.966, 0.834)
pt3dadd(87.032, 165.838, -24.04, 0.832)
pt3dadd(86.995, 165.852, -24.133, 0.74)
pt3dadd(86.975, 165.876, -24.229, 0.688)
pt3dadd(86.926, 165.946, -24.291, 0.678)
pt3dadd(86.83, 166.015, -24.3, 0.662)
pt3dadd(86.718, 166.049, -24.286, 0.594)
pt3dadd(86.635, 166.052, -24.22, 0.45)
pt3dadd(86.607, 166.049, -24.125, 0.348)
pt3dadd(86.602, 166.06, -24.025, 0.306)
pt3dadd(86.557, 166.121, -23.952, 0.302)
pt3dadd(86.505, 166.189, -23.882, 0.3)
pt3dadd(86.474, 166.234, -23.793, 0.288)
pt3dadd(86.437, 166.273, -23.707, 0.278)
pt3dadd(86.334, 166.262, -23.656, 0.288)
pt3dadd(86.231, 166.252, -23.605, 0.3)
pt3dadd(86.115, 166.238, -23.585, 0.318)
pt3dadd(85.998, 166.226, -23.568, 0.338)
pt3dadd(85.894, 166.223, -23.532, 0.362)
pt3dadd(85.826, 166.243, -23.451, 0.394)
pt3dadd(85.758, 166.264, -23.371, 0.428)
pt3dadd(85.691, 166.288, -23.332, 0.452)
pt3dadd(85.629, 166.325, -23.411, 0.452)
pt3dadd(85.571, 166.373, -23.488, 0.434)
pt3dadd(85.474, 166.396, -23.538, 0.394)
pt3dadd(85.369, 166.412, -23.584, 0.356)
pt3dadd(85.254, 166.44, -23.593, 0.342)
pt3dadd(85.137, 166.47, -23.598, 0.33)
pt3dadd(85.019, 166.486, -23.6, 0.314)
pt3dadd(84.899, 166.494, -23.6, 0.294)
pt3dadd(84.782, 166.506, -23.6, 0.276)
pt3dadd(84.704, 166.597, -23.6, 0.264)
pt3dadd(84.626, 166.688, -23.6, 0.252)
pt3dadd(84.604, 166.804, -23.6, 0.246)
pt3dadd(84.589, 166.924, -23.6, 0.242)
pt3dadd(84.573, 167.042, -23.6, 0.236)
pt3dadd(84.558, 167.161, -23.6, 0.232)
pt3dadd(84.543, 167.28, -23.6, 0.226)
pt3dadd(84.531, 167.4, -23.6, 0.226)
pt3dadd(84.518, 167.519, -23.6, 0.226)
pt3dadd(84.505, 167.639, -23.6, 0.226)
}
apic[35] {pt3dclear()
pt3dadd(117.267, 132.725, -9.9, 1.28)
pt3dadd(117.332, 132.74, -9.948, 1.286)
pt3dadd(117.42, 132.762, -10.013, 1.294)
pt3dadd(117.508, 132.781, -10.078, 1.304)
pt3dadd(117.597, 132.803, -10.143, 1.312)
pt3dadd(117.685, 132.824, -10.209, 1.32)
pt3dadd(117.773, 132.846, -10.274, 1.328)
pt3dadd(117.862, 132.866, -10.34, 1.336)
pt3dadd(117.95, 132.887, -10.405, 1.344)
pt3dadd(118.039, 132.908, -10.47, 1.352)
pt3dadd(118.096, 132.98, -10.5, 1.362)
pt3dadd(118.129, 133.097, -10.5, 1.37)
pt3dadd(118.162, 133.211, -10.5, 1.38)
pt3dadd(118.195, 133.327, -10.5, 1.388)
pt3dadd(118.227, 133.442, -10.5, 1.398)
pt3dadd(118.255, 133.559, -10.5, 1.404)
pt3dadd(118.255, 133.678, -10.5, 1.388)
pt3dadd(118.255, 133.799, -10.5, 1.372)
pt3dadd(118.255, 133.919, -10.5, 1.356)
pt3dadd(118.255, 134.039, -10.5, 1.34)
pt3dadd(118.255, 134.159, -10.5, 1.324)
pt3dadd(118.255, 134.279, -10.5, 1.308)
pt3dadd(118.263, 134.398, -10.5, 1.292)
pt3dadd(118.273, 134.518, -10.5, 1.276)
pt3dadd(118.282, 134.638, -10.5, 1.258)
pt3dadd(118.292, 134.758, -10.5, 1.242)
pt3dadd(118.302, 134.876, -10.5, 1.226)
pt3dadd(118.312, 134.996, -10.5, 1.208)
pt3dadd(118.353, 135.109, -10.5, 1.202)
pt3dadd(118.401, 135.217, -10.5, 1.196)
pt3dadd(118.449, 135.328, -10.5, 1.192)
pt3dadd(118.498, 135.438, -10.5, 1.186)
pt3dadd(118.546, 135.547, -10.5, 1.182)
pt3dadd(118.599, 135.654, -10.5, 1.17)
pt3dadd(118.655, 135.762, -10.5, 1.156)
pt3dadd(118.71, 135.868, -10.5, 1.14)
pt3dadd(118.765, 135.974, -10.5, 1.126)
pt3dadd(118.82, 136.081, -10.5, 1.11)
}
}
proc shape3d_184() {
apic[35] { pt3dadd(118.844, 136.195, -10.5, 1.1)
pt3dadd(118.849, 136.315, -10.5, 1.092)
pt3dadd(118.854, 136.435, -10.5, 1.084)
pt3dadd(118.858, 136.555, -10.5, 1.076)
pt3dadd(118.863, 136.675, -10.5, 1.068)
pt3dadd(118.868, 136.795, -10.5, 1.06)
pt3dadd(118.865, 136.915, -10.5, 1.048)
pt3dadd(118.852, 137.035, -10.5, 1.034)
pt3dadd(118.84, 137.154, -10.5, 1.02)
pt3dadd(118.827, 137.274, -10.5, 1.006)
pt3dadd(118.815, 137.393, -10.5, 0.99)
pt3dadd(118.802, 137.513, -10.5, 0.976)
pt3dadd(118.79, 137.632, -10.5, 0.962)
pt3dadd(118.777, 137.752, -10.5, 0.958)
pt3dadd(118.765, 137.87, -10.5, 0.964)
pt3dadd(118.752, 137.989, -10.5, 0.972)
pt3dadd(118.74, 138.109, -10.5, 0.978)
pt3dadd(118.727, 138.228, -10.5, 0.986)
pt3dadd(118.715, 138.348, -10.5, 0.994)
pt3dadd(118.702, 138.467, -10.5, 1)
pt3dadd(118.671, 138.581, -10.5, 1.01)
pt3dadd(118.618, 138.689, -10.5, 1.024)
pt3dadd(118.565, 138.796, -10.5, 1.038)
pt3dadd(118.512, 138.904, -10.5, 1.052)
pt3dadd(118.459, 139.012, -10.5, 1.066)
pt3dadd(118.406, 139.118, -10.5, 1.08)
pt3dadd(118.391, 139.238, -10.5, 1.098)
pt3dadd(118.377, 139.357, -10.5, 1.116)
pt3dadd(118.362, 139.476, -10.5, 1.134)
pt3dadd(118.348, 139.596, -10.5, 1.152)
pt3dadd(118.333, 139.715, -10.5, 1.17)
pt3dadd(118.319, 139.834, -10.5, 1.188)
pt3dadd(118.305, 139.952, -10.5, 1.206)
pt3dadd(118.292, 140.072, -10.5, 1.21)
pt3dadd(118.279, 140.191, -10.5, 1.212)
pt3dadd(118.267, 140.311, -10.5, 1.216)
pt3dadd(118.254, 140.43, -10.5, 1.22)
pt3dadd(118.242, 140.55, -10.5, 1.224)
pt3dadd(118.229, 140.669, -10.5, 1.228)
pt3dadd(118.212, 140.786, -10.5, 1.23)
pt3dadd(118.159, 140.894, -10.5, 1.236)
pt3dadd(118.106, 141.002, -10.5, 1.24)
pt3dadd(118.053, 141.109, -10.5, 1.244)
pt3dadd(118, 141.217, -10.5, 1.25)
pt3dadd(117.947, 141.325, -10.5, 1.254)
pt3dadd(117.903, 141.436, -10.5, 1.252)
pt3dadd(117.863, 141.548, -10.5, 1.248)
pt3dadd(117.823, 141.662, -10.5, 1.244)
pt3dadd(117.784, 141.775, -10.5, 1.24)
pt3dadd(117.745, 141.889, -10.5, 1.236)
pt3dadd(117.705, 142.003, -10.5, 1.232)
pt3dadd(117.633, 142.097, -10.5, 1.218)
pt3dadd(117.554, 142.187, -10.5, 1.202)
pt3dadd(117.475, 142.278, -10.5, 1.188)
pt3dadd(117.396, 142.368, -10.5, 1.172)
pt3dadd(117.317, 142.458, -10.5, 1.158)
pt3dadd(117.255, 142.56, -10.505, 1.132)
pt3dadd(117.196, 142.664, -10.512, 1.102)
pt3dadd(117.138, 142.77, -10.518, 1.072)
pt3dadd(117.08, 142.873, -10.525, 1.042)
pt3dadd(117.021, 142.978, -10.531, 1.012)
pt3dadd(116.948, 143.07, -10.544, 0.988)
pt3dadd(116.868, 143.159, -10.558, 0.966)
pt3dadd(116.788, 143.246, -10.573, 0.944)
pt3dadd(116.709, 143.335, -10.587, 0.922)
pt3dadd(116.631, 143.424, -10.6, 0.904)
pt3dadd(116.56, 143.522, -10.6, 0.904)
pt3dadd(116.49, 143.62, -10.6, 0.904)
pt3dadd(116.42, 143.716, -10.6, 0.904)
pt3dadd(116.35, 143.814, -10.6, 0.904)
pt3dadd(116.279, 143.911, -10.6, 0.904)
pt3dadd(116.213, 144.008, -10.622, 0.91)
pt3dadd(116.147, 144.103, -10.644, 0.916)
pt3dadd(116.081, 144.2, -10.666, 0.92)
pt3dadd(116.014, 144.298, -10.688, 0.926)
pt3dadd(115.949, 144.396, -10.7, 0.924)
pt3dadd(115.884, 144.497, -10.7, 0.914)
pt3dadd(115.819, 144.598, -10.7, 0.906)
pt3dadd(115.755, 144.698, -10.7, 0.896)
pt3dadd(115.69, 144.8, -10.7, 0.886)
pt3dadd(115.625, 144.901, -10.706, 0.874)
pt3dadd(115.562, 145, -10.727, 0.858)
pt3dadd(115.499, 145.098, -10.749, 0.842)
pt3dadd(115.437, 145.196, -10.771, 0.826)
pt3dadd(115.373, 145.295, -10.793, 0.81)
pt3dadd(115.324, 145.393, -10.83, 0.8)
pt3dadd(115.28, 145.49, -10.875, 0.794)
pt3dadd(115.237, 145.589, -10.92, 0.788)
pt3dadd(115.193, 145.687, -10.965, 0.782)
pt3dadd(115.151, 145.788, -11, 0.78)
pt3dadd(115.111, 145.902, -11, 0.784)
pt3dadd(115.072, 146.016, -11, 0.788)
pt3dadd(115.033, 146.129, -11, 0.792)
pt3dadd(114.993, 146.243, -11, 0.796)
pt3dadd(114.954, 146.356, -11, 0.802)
pt3dadd(114.911, 146.468, -11.002, 0.808)
pt3dadd(114.865, 146.578, -11.007, 0.818)
pt3dadd(114.821, 146.689, -11.014, 0.828)
pt3dadd(114.803, 146.801, -11.049, 0.828)
pt3dadd(114.786, 146.911, -11.083, 0.828)
pt3dadd(114.737, 147.018, -11.097, 0.828)
pt3dadd(114.682, 147.125, -11.108, 0.828)
pt3dadd(114.656, 147.202, -11.168, 0.82)
pt3dadd(114.643, 147.264, -11.253, 0.808)
pt3dadd(114.591, 147.335, -11.31, 0.794)
pt3dadd(114.511, 147.412, -11.348, 0.776)
pt3dadd(114.431, 147.488, -11.385, 0.76)
pt3dadd(114.356, 147.577, -11.4, 0.732)
pt3dadd(114.285, 147.674, -11.4, 0.698)
pt3dadd(114.231, 147.778, -11.399, 0.666)
pt3dadd(114.204, 147.895, -11.396, 0.638)
pt3dadd(114.176, 148.013, -11.392, 0.608)
pt3dadd(114.149, 148.129, -11.389, 0.58)
pt3dadd(114.102, 148.178, -11.311, 0.516)
pt3dadd(114.056, 148.228, -11.231, 0.448)
pt3dadd(114.045, 148.339, -11.194, 0.396)
pt3dadd(114.033, 148.45, -11.157, 0.344)
pt3dadd(114.019, 148.542, -11.191, 0.302)
pt3dadd(114.004, 148.625, -11.262, 0.264)
pt3dadd(113.968, 148.724, -11.299, 0.252)
pt3dadd(113.917, 148.831, -11.32, 0.274)
pt3dadd(113.867, 148.937, -11.341, 0.298)
pt3dadd(113.847, 149.023, -11.405, 0.332)
pt3dadd(113.831, 149.107, -11.476, 0.37)
pt3dadd(113.785, 149.209, -11.493, 0.404)
pt3dadd(113.732, 149.317, -11.498, 0.438)
pt3dadd(113.679, 149.424, -11.497, 0.464)
pt3dadd(113.626, 149.532, -11.492, 0.486)
pt3dadd(113.573, 149.634, -11.475, 0.514)
pt3dadd(113.521, 149.729, -11.436, 0.552)
pt3dadd(113.482, 149.836, -11.467, 0.552)
pt3dadd(113.443, 149.944, -11.497, 0.552)
pt3dadd(113.404, 150.05, -11.528, 0.552)
pt3dadd(113.364, 150.158, -11.559, 0.552)
pt3dadd(113.315, 150.264, -11.556, 0.552)
pt3dadd(113.261, 150.371, -11.54, 0.552)
pt3dadd(113.208, 150.476, -11.525, 0.552)
pt3dadd(113.154, 150.582, -11.51, 0.552)
pt3dadd(113.097, 150.686, -11.5, 0.546)
pt3dadd(113.033, 150.787, -11.5, 0.524)
pt3dadd(112.968, 150.889, -11.5, 0.502)
pt3dadd(112.904, 150.989, -11.5, 0.502)
pt3dadd(112.839, 151.091, -11.5, 0.502)
pt3dadd(112.803, 151.189, -11.542, 0.512)
pt3dadd(112.772, 151.289, -11.593, 0.526)
pt3dadd(112.762, 151.361, -11.671, 0.558)
pt3dadd(112.755, 151.428, -11.753, 0.592)
pt3dadd(112.746, 151.507, -11.827, 0.628)
pt3dadd(112.738, 151.585, -11.902, 0.656)
pt3dadd(112.732, 151.645, -11.989, 0.668)
pt3dadd(112.725, 151.706, -12.075, 0.678)
pt3dadd(112.719, 151.766, -12.161, 0.678)
pt3dadd(112.713, 151.828, -12.247, 0.678)
pt3dadd(112.665, 151.926, -12.281, 0.7)
pt3dadd(112.614, 152.029, -12.309, 0.726)
pt3dadd(112.539, 152.101, -12.358, 0.782)
pt3dadd(112.468, 152.166, -12.415, 0.852)
pt3dadd(112.419, 152.216, -12.496, 0.974)
pt3dadd(112.363, 152.262, -12.576, 1.046)
pt3dadd(112.312, 152.314, -12.654, 1.11)
pt3dadd(112.297, 152.396, -12.725, 1.146)
pt3dadd(112.276, 152.482, -12.79, 1.18)
pt3dadd(112.207, 152.579, -12.801, 1.18)
pt3dadd(112.137, 152.671, -12.813, 1.178)
pt3dadd(112.025, 152.672, -12.849, 1.132)
pt3dadd(111.913, 152.674, -12.885, 1.086)
pt3dadd(111.809, 152.712, -12.921, 0.954)
pt3dadd(111.7, 152.736, -12.955, 0.848)
pt3dadd(111.587, 152.752, -12.987, 0.762)
pt3dadd(111.485, 152.8, -13, 0.706)
pt3dadd(111.389, 152.873, -13, 0.672)
pt3dadd(111.291, 152.929, -13.021, 0.666)
pt3dadd(111.19, 152.97, -13.063, 0.694)
pt3dadd(111.149, 153.02, -13.136, 0.734)
pt3dadd(111.136, 153.076, -13.225, 0.782)
pt3dadd(111.088, 153.138, -13.291, 0.818)
pt3dadd(111.007, 153.208, -13.336, 0.842)
pt3dadd(110.927, 153.277, -13.382, 0.868)
pt3dadd(110.838, 153.35, -13.403, 0.878)
pt3dadd(110.745, 153.426, -13.409, 0.878)
pt3dadd(110.678, 153.516, -13.433, 0.868)
pt3dadd(110.631, 153.614, -13.472, 0.848)
pt3dadd(110.584, 153.715, -13.511, 0.828)
pt3dadd(110.568, 153.799, -13.582, 0.792)
pt3dadd(110.553, 153.882, -13.653, 0.754)
pt3dadd(110.501, 153.968, -13.706, 0.734)
pt3dadd(110.448, 154.057, -13.755, 0.746)
pt3dadd(110.402, 154.148, -13.81, 0.782)
pt3dadd(110.365, 154.237, -13.869, 0.836)
pt3dadd(110.283, 154.288, -13.916, 0.88)
pt3dadd(110.179, 154.32, -13.958, 0.92)
pt3dadd(110.085, 154.386, -13.98, 0.94)
pt3dadd(109.993, 154.46, -13.998, 0.952)
pt3dadd(109.89, 154.46, -14.043, 0.94)
pt3dadd(109.786, 154.45, -14.092, 0.924)
pt3dadd(109.682, 154.438, -14.141, 0.908)
pt3dadd(109.577, 154.399, -14.171, 0.888)
pt3dadd(109.471, 154.35, -14.192, 0.862)
pt3dadd(109.379, 154.326, -14.245, 0.854)
pt3dadd(109.295, 154.316, -14.316, 0.854)
}
}
proc shape3d_185() {
apic[35] { pt3dadd(109.21, 154.308, -14.387, 0.854)
pt3dadd(109.193, 154.318, -14.48, 0.854)
pt3dadd(109.191, 154.332, -14.58, 0.854)
pt3dadd(109.19, 154.35, -14.678, 0.852)
pt3dadd(109.185, 154.393, -14.771, 0.844)
pt3dadd(109.181, 154.436, -14.865, 0.836)
pt3dadd(109.175, 154.48, -14.956, 0.828)
pt3dadd(109.123, 154.583, -14.984, 0.776)
pt3dadd(109.071, 154.685, -15.014, 0.722)
pt3dadd(109.015, 154.765, -15.072, 0.648)
pt3dadd(108.955, 154.837, -15.135, 0.636)
pt3dadd(108.895, 154.909, -15.197, 0.624)
pt3dadd(108.835, 154.981, -15.259, 0.61)
pt3dadd(108.783, 155.065, -15.289, 0.608)
pt3dadd(108.746, 155.172, -15.256, 0.62)
pt3dadd(108.697, 155.269, -15.248, 0.638)
pt3dadd(108.62, 155.34, -15.297, 0.676)
pt3dadd(108.603, 155.41, -15.376, 0.712)
pt3dadd(108.589, 155.479, -15.456, 0.748)
pt3dadd(108.541, 155.572, -15.503, 0.776)
pt3dadd(108.488, 155.666, -15.545, 0.804)
pt3dadd(108.454, 155.702, -15.636, 0.804)
pt3dadd(108.439, 155.75, -15.726, 0.788)
pt3dadd(108.434, 155.803, -15.815, 0.766)
pt3dadd(108.429, 155.851, -15.907, 0.748)
pt3dadd(108.424, 155.891, -16.001, 0.738)
pt3dadd(108.42, 155.932, -16.095, 0.73)
pt3dadd(108.413, 156, -16.177, 0.74)
pt3dadd(108.406, 156.067, -16.26, 0.752)
pt3dadd(108.394, 156.18, -16.282, 0.788)
pt3dadd(108.382, 156.299, -16.299, 0.828)
pt3dadd(108.369, 156.413, -16.323, 0.874)
pt3dadd(108.358, 156.526, -16.359, 0.94)
pt3dadd(108.327, 156.636, -16.388, 0.962)
pt3dadd(108.291, 156.745, -16.414, 0.972)
pt3dadd(108.256, 156.854, -16.441, 0.982)
pt3dadd(108.22, 156.965, -16.468, 0.992)
pt3dadd(108.184, 157.074, -16.495, 1.002)
pt3dadd(108.168, 157.183, -16.534, 1)
pt3dadd(108.157, 157.291, -16.576, 0.996)
pt3dadd(108.145, 157.399, -16.619, 0.992)
pt3dadd(108.134, 157.508, -16.661, 0.986)
pt3dadd(108.122, 157.616, -16.703, 0.982)
pt3dadd(108.096, 157.711, -16.756, 0.97)
pt3dadd(108.056, 157.798, -16.817, 0.952)
pt3dadd(108.016, 157.883, -16.879, 0.934)
pt3dadd(107.976, 157.969, -16.941, 0.918)
pt3dadd(107.925, 158.051, -16.997, 0.902)
pt3dadd(107.837, 158.119, -17.034, 0.89)
pt3dadd(107.75, 158.186, -17.072, 0.878)
pt3dadd(107.662, 158.256, -17.109, 0.866)
pt3dadd(107.575, 158.326, -17.147, 0.854)
pt3dadd(107.509, 158.414, -17.183, 0.848)
pt3dadd(107.443, 158.506, -17.219, 0.842)
pt3dadd(107.377, 158.596, -17.256, 0.836)
pt3dadd(107.311, 158.686, -17.292, 0.83)
pt3dadd(107.287, 158.785, -17.342, 0.828)
pt3dadd(107.274, 158.885, -17.396, 0.828)
pt3dadd(107.26, 158.986, -17.449, 0.828)
pt3dadd(107.247, 159.086, -17.502, 0.828)
pt3dadd(107.234, 159.187, -17.556, 0.828)
pt3dadd(107.204, 159.26, -17.629, 0.838)
pt3dadd(107.17, 159.326, -17.707, 0.85)
pt3dadd(107.135, 159.392, -17.785, 0.86)
pt3dadd(107.101, 159.46, -17.863, 0.872)
pt3dadd(107.065, 159.534, -17.936, 0.882)
pt3dadd(107.029, 159.618, -17.999, 0.886)
pt3dadd(106.992, 159.703, -18.063, 0.892)
pt3dadd(106.956, 159.788, -18.127, 0.898)
pt3dadd(106.92, 159.875, -18.19, 0.904)
pt3dadd(106.908, 159.988, -18.222, 0.904)
pt3dadd(106.896, 160.1, -18.254, 0.904)
pt3dadd(106.884, 160.213, -18.286, 0.904)
pt3dadd(106.872, 160.326, -18.319, 0.904)
pt3dadd(106.86, 160.439, -18.351, 0.904)
pt3dadd(106.848, 160.555, -18.375, 0.884)
pt3dadd(106.836, 160.672, -18.392, 0.846)
pt3dadd(106.824, 160.789, -18.41, 0.808)
pt3dadd(106.814, 160.879, -18.473, 0.772)
pt3dadd(106.805, 160.967, -18.541, 0.736)
pt3dadd(106.761, 161.056, -18.594, 0.706)
pt3dadd(106.707, 161.147, -18.642, 0.68)
pt3dadd(106.686, 161.17, -18.738, 0.7)
pt3dadd(106.666, 161.192, -18.835, 0.72)
pt3dadd(106.656, 161.237, -18.925, 0.746)
pt3dadd(106.65, 161.296, -19.013, 0.774)
pt3dadd(106.644, 161.352, -19.1, 0.802)
pt3dadd(106.638, 161.41, -19.188, 0.828)
pt3dadd(106.62, 161.528, -19.193, 0.882)
pt3dadd(106.603, 161.647, -19.197, 0.936)
pt3dadd(106.577, 161.761, -19.2, 1.006)
pt3dadd(106.521, 161.868, -19.201, 1.082)
pt3dadd(106.475, 161.98, -19.203, 1.086)
pt3dadd(106.43, 162.09, -19.205, 1.09)
pt3dadd(106.384, 162.202, -19.207, 1.096)
pt3dadd(106.339, 162.312, -19.209, 1.1)
pt3dadd(106.293, 162.424, -19.211, 1.104)
pt3dadd(106.278, 162.535, -19.241, 1.076)
pt3dadd(106.266, 162.648, -19.274, 1.044)
pt3dadd(106.254, 162.764, -19.293, 1.004)
pt3dadd(106.242, 162.883, -19.301, 0.96)
pt3dadd(106.229, 163.002, -19.309, 0.914)
pt3dadd(106.185, 163.088, -19.359, 0.85)
pt3dadd(106.132, 163.166, -19.421, 0.78)
pt3dadd(106.104, 163.232, -19.501, 0.74)
pt3dadd(106.077, 163.301, -19.58, 0.702)
pt3dadd(106.066, 163.409, -19.621, 0.696)
pt3dadd(106.054, 163.518, -19.662, 0.69)
pt3dadd(106.043, 163.626, -19.703, 0.682)
pt3dadd(106.031, 163.735, -19.745, 0.676)
pt3dadd(106.02, 163.841, -19.79, 0.664)
pt3dadd(106.009, 163.949, -19.834, 0.652)
pt3dadd(105.997, 164.057, -19.873, 0.654)
pt3dadd(105.985, 164.174, -19.896, 0.658)
pt3dadd(105.973, 164.29, -19.919, 0.662)
pt3dadd(105.961, 164.406, -19.942, 0.668)
pt3dadd(105.949, 164.522, -19.965, 0.672)
pt3dadd(105.936, 164.639, -19.988, 0.676)
pt3dadd(105.925, 164.748, -20.024, 0.684)
pt3dadd(105.914, 164.85, -20.076, 0.7)
pt3dadd(105.903, 164.951, -20.129, 0.714)
pt3dadd(105.893, 165.053, -20.181, 0.73)
pt3dadd(105.882, 165.154, -20.234, 0.744)
pt3dadd(105.879, 165.257, -20.285, 0.758)
pt3dadd(105.888, 165.36, -20.336, 0.77)
pt3dadd(105.911, 165.457, -20.389, 0.768)
pt3dadd(105.956, 165.546, -20.446, 0.738)
pt3dadd(105.993, 165.649, -20.477, 0.698)
pt3dadd(106.027, 165.763, -20.493, 0.648)
pt3dadd(106.041, 165.878, -20.483, 0.608)
pt3dadd(106.041, 165.992, -20.453, 0.574)
pt3dadd(106.055, 166.104, -20.424, 0.56)
pt3dadd(106.096, 166.213, -20.4, 0.578)
pt3dadd(106.131, 166.327, -20.4, 0.598)
pt3dadd(106.167, 166.442, -20.4, 0.616)
pt3dadd(106.203, 166.556, -20.4, 0.636)
pt3dadd(106.239, 166.67, -20.4, 0.654)
pt3dadd(106.275, 166.786, -20.4, 0.672)
pt3dadd(106.3, 166.895, -20.431, 0.69)
pt3dadd(106.321, 167.002, -20.473, 0.706)
pt3dadd(106.343, 167.107, -20.515, 0.724)
pt3dadd(106.365, 167.215, -20.557, 0.74)
pt3dadd(106.378, 167.324, -20.594, 0.752)
pt3dadd(106.366, 167.441, -20.615, 0.748)
pt3dadd(106.353, 167.557, -20.635, 0.744)
pt3dadd(106.341, 167.675, -20.656, 0.74)
pt3dadd(106.329, 167.79, -20.677, 0.736)
pt3dadd(106.317, 167.908, -20.697, 0.732)
pt3dadd(106.305, 168.022, -20.725, 0.72)
pt3dadd(106.293, 168.13, -20.767, 0.696)
pt3dadd(106.282, 168.238, -20.809, 0.672)
pt3dadd(106.271, 168.347, -20.851, 0.65)
pt3dadd(106.259, 168.454, -20.893, 0.626)
pt3dadd(106.248, 168.562, -20.938, 0.6)
pt3dadd(106.239, 168.642, -21.011, 0.566)
pt3dadd(106.231, 168.724, -21.084, 0.53)
pt3dadd(106.223, 168.841, -21.093, 0.528)
pt3dadd(106.215, 168.96, -21.097, 0.528)
pt3dadd(106.219, 169.075, -21.106, 0.534)
pt3dadd(106.285, 169.165, -21.143, 0.576)
pt3dadd(106.358, 169.252, -21.176, 0.612)
pt3dadd(106.442, 169.331, -21.199, 0.64)
pt3dadd(106.49, 169.403, -21.253, 0.656)
pt3dadd(106.499, 169.463, -21.339, 0.664)
pt3dadd(106.508, 169.524, -21.425, 0.672)
pt3dadd(106.522, 169.586, -21.508, 0.68)
pt3dadd(106.568, 169.668, -21.571, 0.694)
pt3dadd(106.598, 169.762, -21.623, 0.704)
pt3dadd(106.594, 169.865, -21.671, 0.7)
pt3dadd(106.583, 169.962, -21.729, 0.694)
pt3dadd(106.573, 170.06, -21.786, 0.69)
pt3dadd(106.563, 170.158, -21.844, 0.684)
pt3dadd(106.553, 170.255, -21.901, 0.68)
pt3dadd(106.541, 170.363, -21.943, 0.67)
pt3dadd(106.53, 170.476, -21.975, 0.656)
pt3dadd(106.518, 170.59, -22.007, 0.642)
pt3dadd(106.506, 170.701, -22.039, 0.628)
pt3dadd(106.494, 170.815, -22.072, 0.614)
pt3dadd(106.482, 170.928, -22.102, 0.604)
pt3dadd(106.47, 171.046, -22.118, 0.608)
pt3dadd(106.457, 171.163, -22.135, 0.612)
pt3dadd(106.445, 171.281, -22.151, 0.616)
pt3dadd(106.432, 171.4, -22.168, 0.62)
pt3dadd(106.42, 171.516, -22.184, 0.624)
pt3dadd(106.407, 171.635, -22.2, 0.628)
pt3dadd(106.375, 171.75, -22.2, 0.646)
pt3dadd(106.343, 171.865, -22.2, 0.662)
pt3dadd(106.311, 171.982, -22.2, 0.678)
pt3dadd(106.279, 172.097, -22.2, 0.694)
pt3dadd(106.247, 172.212, -22.2, 0.71)
pt3dadd(106.215, 172.328, -22.2, 0.728)
pt3dadd(106.202, 172.448, -22.2, 0.748)
pt3dadd(106.189, 172.567, -22.2, 0.77)
pt3dadd(106.176, 172.686, -22.2, 0.792)
pt3dadd(106.164, 172.806, -22.2, 0.814)
pt3dadd(106.151, 172.925, -22.2, 0.834)
pt3dadd(106.139, 173.045, -22.2, 0.856)
pt3dadd(106.126, 173.164, -22.2, 0.878)
pt3dadd(106.114, 173.284, -22.2, 0.882)
pt3dadd(106.101, 173.402, -22.2, 0.886)
}
}
proc shape3d_186() {
apic[35] { pt3dadd(106.089, 173.522, -22.2, 0.89)
pt3dadd(106.076, 173.641, -22.2, 0.894)
pt3dadd(106.064, 173.76, -22.2, 0.896)
pt3dadd(106.051, 173.88, -22.2, 0.9)
pt3dadd(106.038, 173.999, -22.2, 0.904)
pt3dadd(106.003, 174.101, -22.242, 0.894)
pt3dadd(105.966, 174.203, -22.285, 0.882)
pt3dadd(105.929, 174.304, -22.329, 0.872)
pt3dadd(105.892, 174.404, -22.373, 0.86)
pt3dadd(105.855, 174.496, -22.428, 0.846)
pt3dadd(105.821, 174.565, -22.504, 0.822)
pt3dadd(105.786, 174.635, -22.58, 0.8)
pt3dadd(105.751, 174.704, -22.656, 0.776)
pt3dadd(105.716, 174.774, -22.732, 0.754)
pt3dadd(105.68, 174.853, -22.801, 0.736)
pt3dadd(105.644, 174.932, -22.87, 0.718)
pt3dadd(105.608, 175.013, -22.939, 0.702)
pt3dadd(105.572, 175.091, -23.008, 0.684)
pt3dadd(105.556, 175.146, -23.093, 0.664)
pt3dadd(105.552, 175.183, -23.187, 0.644)
pt3dadd(105.546, 175.244, -23.26, 0.628)
pt3dadd(105.533, 175.363, -23.277, 0.628)
pt3dadd(105.521, 175.48, -23.295, 0.628)
pt3dadd(105.505, 175.598, -23.3, 0.646)
pt3dadd(105.488, 175.717, -23.3, 0.672)
pt3dadd(105.471, 175.836, -23.3, 0.698)
pt3dadd(105.427, 175.946, -23.3, 0.728)
pt3dadd(105.376, 176.054, -23.3, 0.76)
pt3dadd(105.335, 176.167, -23.3, 0.784)
pt3dadd(105.308, 176.284, -23.3, 0.798)
pt3dadd(105.252, 176.388, -23.3, 0.782)
pt3dadd(105.179, 176.483, -23.3, 0.748)
pt3dadd(105.106, 176.579, -23.3, 0.712)
pt3dadd(105.033, 176.674, -23.3, 0.678)
}
apic[36] {pt3dclear()
pt3dadd(120.353, 121.104, -8.233, 0.98)
pt3dadd(120.44, 121.073, -8.24, 1.094)
pt3dadd(120.553, 121.032, -8.25, 1.24)
pt3dadd(120.665, 120.991, -8.259, 1.386)
pt3dadd(120.778, 120.952, -8.268, 1.534)
pt3dadd(120.89, 120.911, -8.278, 1.68)
pt3dadd(121.003, 120.87, -8.287, 1.828)
pt3dadd(121.115, 120.83, -8.296, 1.974)
pt3dadd(121.231, 120.802, -8.3, 1.944)
pt3dadd(121.349, 120.78, -8.3, 1.794)
pt3dadd(121.468, 120.76, -8.3, 1.642)
pt3dadd(121.585, 120.739, -8.3, 1.492)
pt3dadd(121.704, 120.718, -8.3, 1.342)
pt3dadd(121.822, 120.697, -8.3, 1.19)
pt3dadd(121.942, 120.686, -8.3, 1.13)
pt3dadd(122.06, 120.677, -8.3, 1.074)
pt3dadd(122.18, 120.667, -8.3, 1.02)
pt3dadd(122.3, 120.656, -8.3, 0.966)
pt3dadd(122.419, 120.647, -8.3, 0.912)
pt3dadd(122.539, 120.637, -8.3, 0.856)
pt3dadd(122.659, 120.643, -8.3, 0.828)
pt3dadd(122.779, 120.649, -8.3, 0.802)
pt3dadd(122.899, 120.656, -8.3, 0.776)
pt3dadd(123.018, 120.662, -8.3, 0.75)
pt3dadd(123.138, 120.67, -8.3, 0.724)
pt3dadd(123.258, 120.677, -8.3, 0.698)
pt3dadd(123.378, 120.679, -8.3, 0.68)
pt3dadd(123.498, 120.672, -8.3, 0.684)
pt3dadd(123.618, 120.665, -8.3, 0.688)
pt3dadd(123.737, 120.658, -8.3, 0.692)
pt3dadd(123.857, 120.65, -8.3, 0.696)
pt3dadd(123.977, 120.643, -8.3, 0.7)
pt3dadd(124.097, 120.64, -8.3, 0.702)
pt3dadd(124.216, 120.652, -8.3, 0.698)
pt3dadd(124.336, 120.665, -8.3, 0.696)
pt3dadd(124.454, 120.677, -8.3, 0.692)
pt3dadd(124.574, 120.69, -8.3, 0.688)
pt3dadd(124.693, 120.702, -8.3, 0.684)
pt3dadd(124.812, 120.715, -8.3, 0.68)
pt3dadd(124.932, 120.727, -8.3, 0.678)
pt3dadd(125.051, 120.739, -8.3, 0.678)
pt3dadd(125.171, 120.752, -8.3, 0.678)
pt3dadd(125.29, 120.764, -8.3, 0.678)
pt3dadd(125.41, 120.778, -8.3, 0.678)
pt3dadd(125.528, 120.79, -8.3, 0.678)
pt3dadd(125.648, 120.803, -8.3, 0.678)
pt3dadd(125.767, 120.815, -8.302, 0.676)
pt3dadd(125.886, 120.828, -8.312, 0.668)
pt3dadd(126.005, 120.84, -8.323, 0.66)
pt3dadd(126.124, 120.852, -8.333, 0.652)
pt3dadd(126.242, 120.865, -8.344, 0.646)
pt3dadd(126.361, 120.877, -8.354, 0.638)
pt3dadd(126.479, 120.889, -8.365, 0.63)
pt3dadd(126.599, 120.902, -8.371, 0.63)
pt3dadd(126.718, 120.914, -8.376, 0.634)
pt3dadd(126.836, 120.928, -8.381, 0.638)
pt3dadd(126.956, 120.94, -8.386, 0.642)
pt3dadd(127.075, 120.953, -8.391, 0.646)
pt3dadd(127.194, 120.965, -8.396, 0.65)
pt3dadd(127.313, 120.978, -8.402, 0.652)
pt3dadd(127.432, 120.99, -8.419, 0.648)
pt3dadd(127.549, 121.002, -8.435, 0.644)
pt3dadd(127.667, 121.014, -8.452, 0.64)
pt3dadd(127.784, 121.027, -8.468, 0.636)
pt3dadd(127.902, 121.039, -8.484, 0.632)
pt3dadd(128.02, 121.052, -8.501, 0.628)
pt3dadd(128.132, 121.087, -8.518, 0.628)
pt3dadd(128.245, 121.122, -8.535, 0.628)
pt3dadd(128.359, 121.157, -8.551, 0.628)
pt3dadd(128.472, 121.192, -8.568, 0.628)
pt3dadd(128.585, 121.226, -8.585, 0.628)
pt3dadd(128.7, 121.26, -8.59, 0.624)
pt3dadd(128.815, 121.291, -8.592, 0.62)
pt3dadd(128.93, 121.324, -8.594, 0.616)
pt3dadd(129.047, 121.356, -8.596, 0.612)
pt3dadd(129.162, 121.388, -8.598, 0.608)
pt3dadd(129.277, 121.421, -8.6, 0.604)
pt3dadd(129.385, 121.474, -8.6, 0.594)
pt3dadd(129.49, 121.531, -8.6, 0.584)
pt3dadd(129.6, 121.577, -8.6, 0.578)
pt3dadd(129.715, 121.609, -8.6, 0.578)
pt3dadd(129.832, 121.642, -8.6, 0.578)
pt3dadd(129.913, 121.727, -8.6, 0.578)
pt3dadd(129.991, 121.818, -8.6, 0.578)
pt3dadd(130.031, 121.93, -8.6, 0.612)
pt3dadd(130.058, 122.046, -8.6, 0.654)
pt3dadd(130.072, 122.164, -8.6, 0.696)
pt3dadd(130.066, 122.284, -8.6, 0.734)
pt3dadd(130.108, 122.386, -8.6, 0.762)
pt3dadd(130.19, 122.473, -8.6, 0.776)
pt3dadd(130.273, 122.56, -8.6, 0.792)
pt3dadd(130.356, 122.647, -8.6, 0.808)
pt3dadd(130.439, 122.734, -8.6, 0.822)
pt3dadd(130.525, 122.816, -8.6, 0.824)
pt3dadd(130.616, 122.894, -8.6, 0.812)
pt3dadd(130.706, 122.974, -8.6, 0.802)
pt3dadd(130.798, 123.053, -8.6, 0.792)
pt3dadd(130.888, 123.132, -8.6, 0.782)
pt3dadd(130.966, 123.222, -8.6, 0.772)
pt3dadd(131.033, 123.32, -8.6, 0.762)
pt3dadd(131.101, 123.42, -8.6, 0.752)
pt3dadd(131.17, 123.518, -8.6, 0.742)
pt3dadd(131.237, 123.618, -8.6, 0.732)
pt3dadd(131.29, 123.724, -8.59, 0.706)
pt3dadd(131.33, 123.834, -8.574, 0.67)
pt3dadd(131.387, 123.934, -8.545, 0.636)
pt3dadd(131.452, 124.022, -8.508, 0.608)
pt3dadd(131.542, 124.098, -8.5, 0.584)
pt3dadd(131.639, 124.169, -8.5, 0.562)
pt3dadd(131.748, 124.211, -8.5, 0.558)
pt3dadd(131.866, 124.234, -8.5, 0.566)
pt3dadd(131.984, 124.255, -8.5, 0.576)
pt3dadd(132.092, 124.303, -8.5, 0.63)
pt3dadd(132.203, 124.349, -8.5, 0.682)
pt3dadd(132.322, 124.367, -8.5, 0.702)
pt3dadd(132.439, 124.386, -8.5, 0.72)
pt3dadd(132.558, 124.404, -8.5, 0.74)
pt3dadd(132.677, 124.423, -8.5, 0.758)
pt3dadd(132.796, 124.441, -8.5, 0.776)
pt3dadd(132.914, 124.459, -8.5, 0.796)
pt3dadd(133.028, 124.49, -8.488, 0.812)
pt3dadd(133.138, 124.532, -8.469, 0.828)
pt3dadd(133.248, 124.573, -8.449, 0.842)
pt3dadd(133.358, 124.614, -8.429, 0.858)
pt3dadd(133.469, 124.655, -8.409, 0.872)
pt3dadd(133.562, 124.722, -8.4, 0.886)
pt3dadd(133.64, 124.813, -8.4, 0.898)
pt3dadd(133.728, 124.888, -8.385, 0.904)
pt3dadd(133.828, 124.939, -8.35, 0.904)
pt3dadd(133.904, 124.991, -8.293, 0.904)
pt3dadd(133.957, 125.04, -8.214, 0.904)
pt3dadd(134.009, 125.074, -8.128, 0.886)
pt3dadd(134.059, 125.099, -8.04, 0.862)
pt3dadd(134.144, 125.147, -8, 0.816)
pt3dadd(134.238, 125.213, -7.975, 0.766)
pt3dadd(134.312, 125.29, -7.928, 0.73)
pt3dadd(134.386, 125.365, -7.882, 0.694)
pt3dadd(134.46, 125.442, -7.836, 0.656)
pt3dadd(134.539, 125.514, -7.792, 0.624)
pt3dadd(134.634, 125.57, -7.753, 0.606)
pt3dadd(134.73, 125.627, -7.715, 0.59)
pt3dadd(134.825, 125.683, -7.677, 0.572)
pt3dadd(134.921, 125.74, -7.638, 0.554)
pt3dadd(135.017, 125.782, -7.59, 0.542)
pt3dadd(135.113, 125.822, -7.54, 0.532)
pt3dadd(135.208, 125.862, -7.489, 0.52)
pt3dadd(135.304, 125.903, -7.439, 0.508)
pt3dadd(135.401, 125.952, -7.4, 0.512)
pt3dadd(135.5, 126.012, -7.376, 0.534)
pt3dadd(135.6, 126.073, -7.352, 0.556)
pt3dadd(135.698, 126.133, -7.327, 0.578)
pt3dadd(135.798, 126.193, -7.303, 0.6)
pt3dadd(135.912, 126.229, -7.3, 0.618)
pt3dadd(136.028, 126.262, -7.3, 0.634)
pt3dadd(136.144, 126.293, -7.3, 0.65)
pt3dadd(136.259, 126.325, -7.3, 0.666)
pt3dadd(136.375, 126.358, -7.3, 0.684)
pt3dadd(136.49, 126.389, -7.3, 0.7)
pt3dadd(136.609, 126.407, -7.3, 0.714)
pt3dadd(136.728, 126.421, -7.3, 0.73)
pt3dadd(136.847, 126.436, -7.3, 0.744)
pt3dadd(136.966, 126.45, -7.3, 0.758)
pt3dadd(137.086, 126.464, -7.3, 0.772)
pt3dadd(137.204, 126.479, -7.3, 0.788)
pt3dadd(137.323, 126.493, -7.3, 0.802)
pt3dadd(137.443, 126.509, -7.3, 0.81)
}
}
proc shape3d_187() {
apic[36] { pt3dadd(137.562, 126.523, -7.3, 0.818)
pt3dadd(137.681, 126.538, -7.3, 0.824)
pt3dadd(137.8, 126.552, -7.3, 0.832)
pt3dadd(137.92, 126.566, -7.3, 0.84)
pt3dadd(138.038, 126.581, -7.3, 0.846)
pt3dadd(138.157, 126.595, -7.3, 0.854)
pt3dadd(138.265, 126.648, -7.3, 0.868)
pt3dadd(138.372, 126.702, -7.3, 0.882)
pt3dadd(138.48, 126.755, -7.3, 0.896)
pt3dadd(138.588, 126.808, -7.3, 0.91)
pt3dadd(138.696, 126.862, -7.3, 0.922)
pt3dadd(138.809, 126.892, -7.3, 0.942)
pt3dadd(138.929, 126.904, -7.3, 0.962)
pt3dadd(139.048, 126.917, -7.3, 0.984)
pt3dadd(139.168, 126.929, -7.3, 1.006)
pt3dadd(139.286, 126.942, -7.3, 1.028)
pt3dadd(139.406, 126.954, -7.3, 1.048)
pt3dadd(139.525, 126.967, -7.3, 1.07)
pt3dadd(139.643, 126.99, -7.3, 1.086)
pt3dadd(139.758, 127.022, -7.3, 1.1)
pt3dadd(139.874, 127.055, -7.3, 1.112)
pt3dadd(139.99, 127.086, -7.3, 1.124)
pt3dadd(140.106, 127.118, -7.3, 1.136)
pt3dadd(140.221, 127.151, -7.3, 1.148)
pt3dadd(140.339, 127.176, -7.3, 1.152)
pt3dadd(140.458, 127.194, -7.3, 1.144)
pt3dadd(140.576, 127.212, -7.3, 1.136)
pt3dadd(140.693, 127.231, -7.3, 1.128)
pt3dadd(140.812, 127.249, -7.3, 1.122)
pt3dadd(140.93, 127.268, -7.3, 1.114)
pt3dadd(141.049, 127.286, -7.3, 1.106)
pt3dadd(141.168, 127.31, -7.3, 1.086)
pt3dadd(141.284, 127.336, -7.3, 1.062)
pt3dadd(141.401, 127.36, -7.3, 1.038)
pt3dadd(141.52, 127.385, -7.3, 1.014)
pt3dadd(141.636, 127.41, -7.3, 0.992)
pt3dadd(141.754, 127.435, -7.3, 0.968)
pt3dadd(141.872, 127.454, -7.3, 0.944)
pt3dadd(141.992, 127.468, -7.3, 0.918)
pt3dadd(142.111, 127.48, -7.3, 0.894)
pt3dadd(142.223, 127.516, -7.3, 0.884)
pt3dadd(142.324, 127.579, -7.3, 0.894)
pt3dadd(142.412, 127.654, -7.3, 0.904)
pt3dadd(142.456, 127.766, -7.3, 0.904)
pt3dadd(142.496, 127.878, -7.3, 0.904)
pt3dadd(142.54, 127.991, -7.3, 0.882)
pt3dadd(142.582, 128.104, -7.3, 0.86)
pt3dadd(142.672, 128.172, -7.3, 0.836)
pt3dadd(142.778, 128.225, -7.3, 0.81)
pt3dadd(142.886, 128.276, -7.3, 0.784)
pt3dadd(142.994, 128.329, -7.3, 0.758)
pt3dadd(143.093, 128.388, -7.329, 0.732)
pt3dadd(143.186, 128.449, -7.365, 0.704)
pt3dadd(143.291, 128.492, -7.391, 0.708)
pt3dadd(143.408, 128.519, -7.399, 0.72)
pt3dadd(143.525, 128.544, -7.406, 0.732)
pt3dadd(143.641, 128.57, -7.414, 0.746)
pt3dadd(143.759, 128.596, -7.421, 0.758)
pt3dadd(143.875, 128.622, -7.429, 0.77)
pt3dadd(143.987, 128.662, -7.439, 0.784)
pt3dadd(144.089, 128.722, -7.452, 0.8)
pt3dadd(144.191, 128.783, -7.466, 0.816)
pt3dadd(144.293, 128.844, -7.48, 0.832)
pt3dadd(144.396, 128.905, -7.494, 0.848)
pt3dadd(144.496, 128.966, -7.512, 0.854)
pt3dadd(144.594, 129.03, -7.534, 0.854)
pt3dadd(144.694, 129.092, -7.556, 0.854)
pt3dadd(144.791, 129.156, -7.578, 0.854)
pt3dadd(144.889, 129.218, -7.6, 0.854)
pt3dadd(145.001, 129.232, -7.636, 0.836)
pt3dadd(145.111, 129.244, -7.674, 0.816)
pt3dadd(145.223, 129.254, -7.711, 0.798)
pt3dadd(145.333, 129.266, -7.748, 0.78)
pt3dadd(145.444, 129.278, -7.785, 0.76)
pt3dadd(145.555, 129.29, -7.82, 0.728)
pt3dadd(145.669, 129.301, -7.853, 0.686)
pt3dadd(145.768, 129.312, -7.899, 0.65)
pt3dadd(145.829, 129.318, -7.985, 0.638)
pt3dadd(145.889, 129.325, -8.072, 0.628)
pt3dadd(145.928, 129.329, -8.166, 0.64)
pt3dadd(145.967, 129.334, -8.26, 0.65)
pt3dadd(146.011, 129.368, -8.347, 0.652)
pt3dadd(146.057, 129.416, -8.43, 0.652)
pt3dadd(146.069, 129.445, -8.526, 0.626)
pt3dadd(146.078, 129.475, -8.622, 0.594)
pt3dadd(146.1, 129.516, -8.714, 0.558)
pt3dadd(146.134, 129.556, -8.801, 0.522)
pt3dadd(146.221, 129.586, -8.864, 0.496)
pt3dadd(146.299, 129.614, -8.934, 0.48)
pt3dadd(146.35, 129.64, -9.022, 0.492)
pt3dadd(146.401, 129.685, -9.09, 0.516)
pt3dadd(146.454, 129.793, -9.095, 0.576)
pt3dadd(146.498, 129.899, -9.108, 0.636)
pt3dadd(146.495, 130, -9.163, 0.694)
pt3dadd(146.492, 130.1, -9.217, 0.752)
pt3dadd(146.489, 130.201, -9.272, 0.81)
pt3dadd(146.558, 130.24, -9.324, 0.876)
pt3dadd(146.662, 130.25, -9.374, 0.944)
pt3dadd(146.772, 130.262, -9.4, 0.986)
pt3dadd(146.892, 130.274, -9.4, 0.998)
pt3dadd(147.011, 130.288, -9.4, 1.01)
pt3dadd(147.13, 130.3, -9.4, 1.024)
pt3dadd(147.25, 130.313, -9.402, 1.022)
pt3dadd(147.368, 130.325, -9.406, 1.004)
pt3dadd(147.488, 130.338, -9.41, 0.986)
pt3dadd(147.605, 130.35, -9.427, 0.96)
pt3dadd(147.724, 130.362, -9.442, 0.954)
pt3dadd(147.841, 130.375, -9.452, 0.954)
pt3dadd(147.96, 130.387, -9.462, 0.954)
pt3dadd(148.079, 130.399, -9.473, 0.954)
pt3dadd(148.198, 130.412, -9.483, 0.954)
pt3dadd(148.316, 130.424, -9.494, 0.954)
pt3dadd(148.434, 130.436, -9.51, 0.956)
pt3dadd(148.55, 130.45, -9.533, 0.96)
pt3dadd(148.666, 130.462, -9.556, 0.964)
pt3dadd(148.782, 130.474, -9.578, 0.968)
pt3dadd(148.898, 130.486, -9.601, 0.974)
pt3dadd(149.015, 130.498, -9.624, 0.978)
pt3dadd(149.132, 130.511, -9.641, 0.974)
pt3dadd(149.251, 130.523, -9.653, 0.966)
pt3dadd(149.369, 130.535, -9.666, 0.958)
pt3dadd(149.488, 130.548, -9.678, 0.95)
pt3dadd(149.605, 130.56, -9.69, 0.942)
pt3dadd(149.725, 130.573, -9.703, 0.934)
pt3dadd(149.84, 130.585, -9.722, 0.918)
pt3dadd(149.954, 130.597, -9.755, 0.886)
pt3dadd(150.066, 130.608, -9.788, 0.854)
pt3dadd(150.178, 130.626, -9.823, 0.81)
pt3dadd(150.288, 130.644, -9.857, 0.766)
pt3dadd(150.358, 130.691, -9.921, 0.744)
pt3dadd(150.412, 130.75, -9.996, 0.728)
pt3dadd(150.481, 130.818, -10.054, 0.742)
pt3dadd(150.547, 130.895, -10.1, 0.76)
pt3dadd(150.601, 131.002, -10.1, 0.796)
pt3dadd(150.678, 131.078, -10.135, 0.804)
pt3dadd(150.761, 131.146, -10.18, 0.804)
pt3dadd(150.845, 131.213, -10.226, 0.804)
pt3dadd(150.928, 131.279, -10.271, 0.804)
pt3dadd(151.021, 131.339, -10.307, 0.8)
pt3dadd(151.122, 131.394, -10.336, 0.794)
pt3dadd(151.223, 131.449, -10.365, 0.79)
pt3dadd(151.324, 131.504, -10.395, 0.784)
pt3dadd(151.426, 131.557, -10.425, 0.778)
pt3dadd(151.535, 131.576, -10.459, 0.778)
pt3dadd(151.646, 131.596, -10.493, 0.778)
pt3dadd(151.758, 131.615, -10.527, 0.778)
pt3dadd(151.87, 131.634, -10.561, 0.778)
pt3dadd(151.981, 131.653, -10.595, 0.778)
pt3dadd(152.094, 131.666, -10.624, 0.788)
pt3dadd(152.21, 131.678, -10.651, 0.798)
pt3dadd(152.323, 131.69, -10.681, 0.804)
pt3dadd(152.436, 131.702, -10.714, 0.804)
pt3dadd(152.543, 131.714, -10.751, 0.802)
pt3dadd(152.57, 131.736, -10.847, 0.78)
pt3dadd(152.599, 131.756, -10.943, 0.756)
pt3dadd(152.645, 131.843, -10.993, 0.73)
pt3dadd(152.699, 131.935, -11.036, 0.702)
pt3dadd(152.796, 131.992, -11.071, 0.694)
pt3dadd(152.892, 132.049, -11.107, 0.686)
pt3dadd(152.989, 132.107, -11.142, 0.678)
pt3dadd(153.073, 132.124, -11.211, 0.666)
pt3dadd(153.157, 132.139, -11.282, 0.654)
pt3dadd(153.271, 132.152, -11.3, 0.602)
pt3dadd(153.391, 132.164, -11.3, 0.528)
pt3dadd(153.51, 132.178, -11.3, 0.452)
}
dend_0[7] {pt3dclear()
pt3dadd(123.648, 92.924, 6.87, 11.018)
pt3dadd(123.583, 92.898, 6.925, 10.862)
pt3dadd(123.502, 92.866, 6.993, 10.666)
pt3dadd(123.421, 92.833, 7.062, 10.472)
pt3dadd(123.34, 92.8, 7.13, 10.276)
pt3dadd(123.259, 92.768, 7.199, 10.082)
pt3dadd(123.178, 92.735, 7.267, 9.886)
pt3dadd(123.096, 92.702, 7.336, 9.692)
pt3dadd(123.016, 92.67, 7.404, 9.496)
pt3dadd(122.934, 92.637, 7.472, 9.302)
pt3dadd(122.852, 92.604, 7.541, 9.106)
pt3dadd(122.761, 92.588, 7.603, 8.934)
pt3dadd(122.666, 92.576, 7.663, 8.77)
pt3dadd(122.572, 92.564, 7.724, 8.604)
pt3dadd(122.476, 92.551, 7.784, 8.44)
pt3dadd(122.381, 92.539, 7.844, 8.274)
pt3dadd(122.286, 92.527, 7.905, 8.108)
pt3dadd(122.191, 92.514, 7.965, 7.944)
pt3dadd(122.096, 92.502, 8.025, 7.778)
pt3dadd(122.002, 92.49, 8.086, 7.612)
pt3dadd(121.907, 92.478, 8.146, 7.448)
pt3dadd(121.806, 92.476, 8.2, 7.3)
pt3dadd(121.704, 92.476, 8.253, 7.154)
pt3dadd(121.602, 92.475, 8.306, 7.006)
pt3dadd(121.501, 92.474, 8.359, 6.86)
pt3dadd(121.399, 92.474, 8.412, 6.714)
pt3dadd(121.297, 92.473, 8.465, 6.568)
pt3dadd(121.196, 92.473, 8.519, 6.422)
pt3dadd(121.094, 92.472, 8.572, 6.274)
pt3dadd(120.992, 92.471, 8.625, 6.128)
pt3dadd(120.89, 92.471, 8.678, 5.982)
pt3dadd(120.78, 92.47, 8.715, 5.822)
pt3dadd(120.667, 92.469, 8.752, 5.66)
pt3dadd(120.556, 92.468, 8.788, 5.5)
pt3dadd(120.444, 92.467, 8.824, 5.338)
}
}
proc shape3d_188() {
dend_0[7] { pt3dadd(120.332, 92.467, 8.86, 5.176)
pt3dadd(120.221, 92.466, 8.897, 5.016)
pt3dadd(120.109, 92.465, 8.933, 4.854)
pt3dadd(119.997, 92.464, 8.969, 4.694)
pt3dadd(119.885, 92.463, 9.005, 4.532)
pt3dadd(119.773, 92.462, 9.042, 4.37)
pt3dadd(119.658, 92.461, 9.071, 4.256)
pt3dadd(119.544, 92.459, 9.1, 4.144)
pt3dadd(119.429, 92.458, 9.129, 4.03)
pt3dadd(119.314, 92.456, 9.158, 3.918)
pt3dadd(119.199, 92.455, 9.187, 3.806)
pt3dadd(119.084, 92.453, 9.215, 3.692)
pt3dadd(118.969, 92.452, 9.244, 3.58)
pt3dadd(118.854, 92.45, 9.273, 3.468)
pt3dadd(118.74, 92.448, 9.302, 3.356)
pt3dadd(118.625, 92.447, 9.331, 3.242)
pt3dadd(118.515, 92.444, 9.372, 3.172)
pt3dadd(118.406, 92.441, 9.413, 3.106)
pt3dadd(118.297, 92.438, 9.455, 3.038)
}
dend_7[67] {pt3dclear()
pt3dadd(118.297, 92.438, 9.455, 3.038)
pt3dadd(118.188, 92.435, 9.496, 2.97)
pt3dadd(118.078, 92.433, 9.538, 2.902)
pt3dadd(117.969, 92.43, 9.579, 2.836)
pt3dadd(117.86, 92.427, 9.621, 2.768)
pt3dadd(117.751, 92.424, 9.662, 2.7)
pt3dadd(117.642, 92.421, 9.703, 2.632)
pt3dadd(117.533, 92.418, 9.745, 2.566)
pt3dadd(117.428, 92.413, 9.794, 2.534)
pt3dadd(117.324, 92.408, 9.843, 2.504)
pt3dadd(117.22, 92.403, 9.893, 2.474)
pt3dadd(117.116, 92.398, 9.942, 2.444)
pt3dadd(117.011, 92.393, 9.992, 2.412)
pt3dadd(116.907, 92.388, 10.041, 2.382)
pt3dadd(116.803, 92.384, 10.09, 2.352)
pt3dadd(116.699, 92.379, 10.14, 2.322)
pt3dadd(116.594, 92.374, 10.189, 2.29)
pt3dadd(116.49, 92.369, 10.239, 2.26)
pt3dadd(116.39, 92.361, 10.293, 2.26)
pt3dadd(116.289, 92.354, 10.347, 2.26)
pt3dadd(116.189, 92.346, 10.401, 2.26)
pt3dadd(116.088, 92.339, 10.456, 2.26)
pt3dadd(115.988, 92.332, 10.51, 2.26)
pt3dadd(115.887, 92.324, 10.564, 2.26)
pt3dadd(115.787, 92.317, 10.619, 2.26)
pt3dadd(115.686, 92.309, 10.673, 2.26)
pt3dadd(115.586, 92.302, 10.728, 2.26)
pt3dadd(115.486, 92.294, 10.782, 2.26)
}
dend_7[68] {pt3dclear()
pt3dadd(115.486, 92.294, 10.782, 2.26)
pt3dadd(115.436, 92.288, 10.797, 2.228)
pt3dadd(115.324, 92.274, 10.83, 2.156)
pt3dadd(115.212, 92.261, 10.864, 2.084)
pt3dadd(115.1, 92.247, 10.898, 2.012)
pt3dadd(114.988, 92.233, 10.932, 1.942)
pt3dadd(114.876, 92.219, 10.965, 1.87)
pt3dadd(114.764, 92.205, 10.999, 1.798)
pt3dadd(114.652, 92.191, 11.033, 1.726)
pt3dadd(114.54, 92.177, 11.067, 1.654)
pt3dadd(114.427, 92.163, 11.1, 1.582)
pt3dadd(114.315, 92.13, 11.121, 1.542)
pt3dadd(114.203, 92.094, 11.139, 1.508)
pt3dadd(114.091, 92.057, 11.156, 1.474)
pt3dadd(113.979, 92.02, 11.174, 1.438)
pt3dadd(113.867, 91.983, 11.192, 1.404)
pt3dadd(113.754, 91.946, 11.21, 1.37)
pt3dadd(113.642, 91.909, 11.228, 1.336)
pt3dadd(113.53, 91.873, 11.246, 1.302)
pt3dadd(113.418, 91.836, 11.264, 1.268)
pt3dadd(113.306, 91.799, 11.281, 1.234)
pt3dadd(113.193, 91.759, 11.289, 1.214)
pt3dadd(113.08, 91.718, 11.295, 1.196)
pt3dadd(112.968, 91.678, 11.302, 1.178)
pt3dadd(112.855, 91.637, 11.309, 1.16)
pt3dadd(112.742, 91.597, 11.316, 1.142)
pt3dadd(112.629, 91.556, 11.323, 1.124)
pt3dadd(112.517, 91.516, 11.33, 1.106)
pt3dadd(112.404, 91.475, 11.337, 1.088)
pt3dadd(112.292, 91.435, 11.343, 1.07)
pt3dadd(112.179, 91.395, 11.35, 1.052)
pt3dadd(112.063, 91.364, 11.352, 1.034)
pt3dadd(111.947, 91.333, 11.354, 1.016)
pt3dadd(111.831, 91.303, 11.355, 0.996)
pt3dadd(111.715, 91.272, 11.357, 0.978)
pt3dadd(111.599, 91.242, 11.359, 0.96)
pt3dadd(111.483, 91.211, 11.36, 0.942)
pt3dadd(111.367, 91.18, 11.362, 0.922)
pt3dadd(111.251, 91.15, 11.364, 0.904)
pt3dadd(111.135, 91.119, 11.365, 0.886)
pt3dadd(111.019, 91.089, 11.367, 0.866)
pt3dadd(110.901, 91.066, 11.37, 0.848)
pt3dadd(110.783, 91.043, 11.372, 0.828)
pt3dadd(110.665, 91.02, 11.375, 0.81)
pt3dadd(110.547, 90.998, 11.378, 0.792)
pt3dadd(110.43, 90.975, 11.381, 0.772)
pt3dadd(110.312, 90.952, 11.384, 0.754)
pt3dadd(110.194, 90.93, 11.387, 0.734)
pt3dadd(110.076, 90.907, 11.389, 0.716)
pt3dadd(109.959, 90.884, 11.392, 0.696)
pt3dadd(109.841, 90.862, 11.395, 0.678)
}
dend_7[69] {pt3dclear()
pt3dadd(109.841, 90.862, 11.395, 0.678)
pt3dadd(109.737, 90.846, 11.401, 0.694)
pt3dadd(109.618, 90.83, 11.408, 0.714)
pt3dadd(109.5, 90.813, 11.415, 0.732)
pt3dadd(109.381, 90.796, 11.422, 0.752)
pt3dadd(109.262, 90.779, 11.429, 0.77)
pt3dadd(109.144, 90.762, 11.436, 0.79)
pt3dadd(109.025, 90.746, 11.443, 0.808)
pt3dadd(108.907, 90.729, 11.45, 0.828)
pt3dadd(108.788, 90.712, 11.457, 0.846)
pt3dadd(108.67, 90.695, 11.464, 0.866)
pt3dadd(108.557, 90.659, 11.473, 0.884)
pt3dadd(108.446, 90.615, 11.483, 0.902)
pt3dadd(108.335, 90.571, 11.493, 0.92)
pt3dadd(108.224, 90.527, 11.503, 0.936)
pt3dadd(108.113, 90.483, 11.513, 0.954)
pt3dadd(108.002, 90.439, 11.523, 0.972)
pt3dadd(107.891, 90.395, 11.533, 0.99)
pt3dadd(107.78, 90.351, 11.543, 1.008)
pt3dadd(107.669, 90.307, 11.553, 1.026)
pt3dadd(107.558, 90.263, 11.563, 1.044)
pt3dadd(107.449, 90.219, 11.583, 1.034)
pt3dadd(107.341, 90.174, 11.607, 1.016)
pt3dadd(107.234, 90.13, 11.631, 0.996)
pt3dadd(107.126, 90.086, 11.655, 0.978)
pt3dadd(107.018, 90.041, 11.679, 0.958)
pt3dadd(106.91, 89.997, 11.702, 0.94)
pt3dadd(106.803, 89.952, 11.726, 0.922)
pt3dadd(106.695, 89.908, 11.75, 0.902)
pt3dadd(106.587, 89.863, 11.774, 0.884)
pt3dadd(106.479, 89.819, 11.798, 0.866)
pt3dadd(106.373, 89.779, 11.829, 0.84)
pt3dadd(106.267, 89.74, 11.862, 0.812)
pt3dadd(106.16, 89.701, 11.895, 0.784)
pt3dadd(106.054, 89.661, 11.928, 0.756)
pt3dadd(105.948, 89.622, 11.961, 0.728)
pt3dadd(105.841, 89.583, 11.994, 0.702)
pt3dadd(105.735, 89.544, 12.027, 0.674)
pt3dadd(105.629, 89.505, 12.06, 0.646)
pt3dadd(105.522, 89.466, 12.093, 0.618)
pt3dadd(105.416, 89.426, 12.125, 0.59)
pt3dadd(105.306, 89.388, 12.15, 0.646)
pt3dadd(105.196, 89.349, 12.173, 0.718)
pt3dadd(105.086, 89.31, 12.196, 0.788)
pt3dadd(104.976, 89.271, 12.219, 0.86)
pt3dadd(104.866, 89.232, 12.241, 0.93)
pt3dadd(104.755, 89.194, 12.264, 1)
pt3dadd(104.645, 89.155, 12.287, 1.072)
pt3dadd(104.535, 89.116, 12.31, 1.142)
pt3dadd(104.425, 89.077, 12.333, 1.212)
pt3dadd(104.315, 89.039, 12.356, 1.284)
pt3dadd(104.212, 88.98, 12.368, 1.312)
pt3dadd(104.11, 88.917, 12.379, 1.334)
pt3dadd(104.008, 88.855, 12.39, 1.354)
pt3dadd(103.907, 88.792, 12.401, 1.376)
pt3dadd(103.805, 88.73, 12.412, 1.396)
pt3dadd(103.704, 88.667, 12.422, 1.418)
pt3dadd(103.602, 88.605, 12.433, 1.438)
pt3dadd(103.5, 88.542, 12.444, 1.46)
pt3dadd(103.399, 88.48, 12.455, 1.48)
pt3dadd(103.297, 88.417, 12.466, 1.502)
pt3dadd(103.201, 88.346, 12.471, 1.498)
pt3dadd(103.106, 88.273, 12.476, 1.49)
pt3dadd(103.011, 88.2, 12.481, 1.482)
pt3dadd(102.916, 88.127, 12.486, 1.476)
pt3dadd(102.821, 88.054, 12.491, 1.468)
pt3dadd(102.725, 87.981, 12.496, 1.462)
pt3dadd(102.63, 87.908, 12.501, 1.454)
pt3dadd(102.535, 87.836, 12.506, 1.446)
pt3dadd(102.44, 87.763, 12.511, 1.44)
pt3dadd(102.345, 87.69, 12.516, 1.432)
pt3dadd(102.255, 87.61, 12.516, 1.404)
pt3dadd(102.165, 87.53, 12.517, 1.376)
pt3dadd(102.076, 87.45, 12.517, 1.346)
pt3dadd(101.987, 87.37, 12.518, 1.318)
pt3dadd(101.897, 87.29, 12.518, 1.288)
pt3dadd(101.808, 87.21, 12.519, 1.26)
pt3dadd(101.718, 87.13, 12.519, 1.23)
pt3dadd(101.629, 87.051, 12.52, 1.202)
pt3dadd(101.539, 86.97, 12.52, 1.172)
pt3dadd(101.45, 86.891, 12.521, 1.144)
pt3dadd(101.365, 86.806, 12.522, 1.152)
pt3dadd(101.28, 86.721, 12.523, 1.164)
pt3dadd(101.196, 86.635, 12.524, 1.176)
pt3dadd(101.112, 86.55, 12.525, 1.188)
pt3dadd(101.027, 86.465, 12.526, 1.202)
pt3dadd(100.943, 86.379, 12.527, 1.214)
pt3dadd(100.858, 86.294, 12.528, 1.226)
pt3dadd(100.774, 86.209, 12.529, 1.238)
pt3dadd(100.689, 86.124, 12.53, 1.25)
pt3dadd(100.605, 86.038, 12.531, 1.262)
pt3dadd(100.521, 85.953, 12.532, 1.28)
pt3dadd(100.437, 85.867, 12.533, 1.3)
pt3dadd(100.353, 85.781, 12.535, 1.318)
pt3dadd(100.269, 85.695, 12.536, 1.338)
pt3dadd(100.186, 85.609, 12.538, 1.356)
pt3dadd(100.102, 85.524, 12.539, 1.376)
pt3dadd(100.018, 85.438, 12.541, 1.394)
pt3dadd(99.934, 85.352, 12.542, 1.412)
pt3dadd(99.85, 85.266, 12.543, 1.432)
pt3dadd(99.766, 85.18, 12.545, 1.45)
pt3dadd(99.683, 85.094, 12.547, 1.478)
}
}
proc shape3d_189() {
dend_7[69] { pt3dadd(99.6, 85.007, 12.549, 1.506)
pt3dadd(99.517, 84.921, 12.551, 1.536)
pt3dadd(99.434, 84.834, 12.553, 1.564)
pt3dadd(99.351, 84.748, 12.556, 1.592)
pt3dadd(99.267, 84.661, 12.558, 1.622)
pt3dadd(99.184, 84.575, 12.56, 1.65)
pt3dadd(99.101, 84.488, 12.562, 1.678)
pt3dadd(99.018, 84.402, 12.564, 1.708)
pt3dadd(98.935, 84.315, 12.566, 1.736)
pt3dadd(98.852, 84.229, 12.571, 1.744)
pt3dadd(98.769, 84.142, 12.576, 1.752)
pt3dadd(98.686, 84.056, 12.58, 1.758)
pt3dadd(98.603, 83.969, 12.585, 1.766)
pt3dadd(98.52, 83.883, 12.59, 1.772)
pt3dadd(98.437, 83.796, 12.594, 1.78)
pt3dadd(98.354, 83.71, 12.599, 1.786)
pt3dadd(98.271, 83.623, 12.604, 1.794)
pt3dadd(98.188, 83.537, 12.609, 1.8)
pt3dadd(98.105, 83.45, 12.613, 1.808)
pt3dadd(98.026, 83.361, 12.62, 1.8)
pt3dadd(97.947, 83.271, 12.627, 1.79)
pt3dadd(97.868, 83.181, 12.634, 1.782)
pt3dadd(97.788, 83.091, 12.641, 1.772)
pt3dadd(97.709, 83.001, 12.648, 1.762)
pt3dadd(97.63, 82.912, 12.655, 1.754)
pt3dadd(97.551, 82.822, 12.662, 1.744)
pt3dadd(97.472, 82.732, 12.669, 1.736)
pt3dadd(97.392, 82.642, 12.676, 1.726)
pt3dadd(97.313, 82.553, 12.683, 1.716)
pt3dadd(97.245, 82.455, 12.694, 1.682)
pt3dadd(97.177, 82.357, 12.705, 1.646)
pt3dadd(97.109, 82.259, 12.717, 1.61)
pt3dadd(97.041, 82.161, 12.728, 1.574)
pt3dadd(96.973, 82.063, 12.739, 1.538)
pt3dadd(96.905, 81.965, 12.75, 1.502)
pt3dadd(96.838, 81.867, 12.762, 1.464)
pt3dadd(96.77, 81.769, 12.773, 1.428)
pt3dadd(96.702, 81.671, 12.784, 1.392)
pt3dadd(96.634, 81.573, 12.796, 1.356)
pt3dadd(96.547, 81.505, 12.834, 1.336)
pt3dadd(96.459, 81.439, 12.873, 1.318)
pt3dadd(96.371, 81.372, 12.913, 1.3)
pt3dadd(96.283, 81.306, 12.952, 1.28)
pt3dadd(96.195, 81.239, 12.992, 1.262)
pt3dadd(96.107, 81.173, 13.031, 1.244)
pt3dadd(96.018, 81.106, 13.071, 1.224)
pt3dadd(95.931, 81.04, 13.11, 1.206)
pt3dadd(95.842, 80.973, 13.149, 1.186)
pt3dadd(95.754, 80.907, 13.189, 1.168)
pt3dadd(95.662, 80.837, 13.215, 1.164)
pt3dadd(95.57, 80.767, 13.241, 1.16)
pt3dadd(95.478, 80.697, 13.266, 1.156)
pt3dadd(95.385, 80.627, 13.292, 1.152)
pt3dadd(95.293, 80.556, 13.318, 1.148)
pt3dadd(95.201, 80.486, 13.344, 1.144)
pt3dadd(95.108, 80.416, 13.369, 1.142)
pt3dadd(95.016, 80.346, 13.395, 1.138)
pt3dadd(94.924, 80.276, 13.421, 1.134)
pt3dadd(94.831, 80.205, 13.447, 1.13)
pt3dadd(94.737, 80.134, 13.463, 1.13)
pt3dadd(94.643, 80.062, 13.48, 1.13)
pt3dadd(94.549, 79.991, 13.497, 1.13)
pt3dadd(94.455, 79.919, 13.513, 1.13)
pt3dadd(94.361, 79.847, 13.53, 1.13)
pt3dadd(94.267, 79.776, 13.546, 1.13)
pt3dadd(94.172, 79.704, 13.563, 1.13)
pt3dadd(94.078, 79.632, 13.58, 1.13)
pt3dadd(93.984, 79.56, 13.596, 1.13)
pt3dadd(93.89, 79.489, 13.613, 1.13)
pt3dadd(93.795, 79.416, 13.623, 1.13)
pt3dadd(93.7, 79.344, 13.633, 1.13)
pt3dadd(93.605, 79.272, 13.643, 1.13)
pt3dadd(93.51, 79.2, 13.653, 1.13)
pt3dadd(93.415, 79.127, 13.663, 1.13)
pt3dadd(93.32, 79.055, 13.673, 1.13)
pt3dadd(93.225, 78.983, 13.683, 1.13)
pt3dadd(93.13, 78.91, 13.693, 1.13)
pt3dadd(93.035, 78.838, 13.704, 1.13)
pt3dadd(92.94, 78.766, 13.714, 1.13)
}
dend_7[70] {pt3dclear()
pt3dadd(92.94, 78.766, 13.714, 1.13)
pt3dadd(92.855, 78.717, 13.716, 1.116)
pt3dadd(92.751, 78.658, 13.718, 1.098)
pt3dadd(92.647, 78.599, 13.721, 1.082)
pt3dadd(92.542, 78.539, 13.723, 1.064)
pt3dadd(92.438, 78.48, 13.726, 1.048)
pt3dadd(92.334, 78.421, 13.729, 1.03)
pt3dadd(92.23, 78.361, 13.731, 1.012)
pt3dadd(92.125, 78.302, 13.734, 0.996)
pt3dadd(92.021, 78.243, 13.736, 0.978)
pt3dadd(91.917, 78.183, 13.739, 0.962)
pt3dadd(91.816, 78.118, 13.744, 0.944)
pt3dadd(91.716, 78.053, 13.749, 0.928)
pt3dadd(91.615, 77.988, 13.754, 0.91)
pt3dadd(91.514, 77.923, 13.759, 0.894)
pt3dadd(91.414, 77.858, 13.764, 0.876)
pt3dadd(91.313, 77.792, 13.769, 0.86)
pt3dadd(91.213, 77.727, 13.774, 0.842)
pt3dadd(91.112, 77.662, 13.779, 0.824)
pt3dadd(91.012, 77.597, 13.784, 0.808)
pt3dadd(90.911, 77.531, 13.789, 0.79)
pt3dadd(90.814, 77.462, 13.796, 0.796)
pt3dadd(90.717, 77.392, 13.804, 0.802)
pt3dadd(90.62, 77.322, 13.812, 0.808)
pt3dadd(90.523, 77.252, 13.819, 0.814)
pt3dadd(90.425, 77.182, 13.827, 0.82)
pt3dadd(90.328, 77.112, 13.834, 0.826)
pt3dadd(90.231, 77.042, 13.842, 0.832)
pt3dadd(90.134, 76.973, 13.85, 0.838)
pt3dadd(90.037, 76.903, 13.857, 0.846)
pt3dadd(89.94, 76.833, 13.865, 0.852)
pt3dadd(89.846, 76.759, 13.876, 0.9)
pt3dadd(89.752, 76.686, 13.887, 0.95)
pt3dadd(89.658, 76.613, 13.897, 1)
pt3dadd(89.564, 76.539, 13.908, 1.05)
pt3dadd(89.469, 76.466, 13.919, 1.102)
pt3dadd(89.375, 76.392, 13.93, 1.152)
pt3dadd(89.281, 76.319, 13.941, 1.202)
pt3dadd(89.187, 76.246, 13.952, 1.252)
pt3dadd(89.093, 76.172, 13.963, 1.302)
pt3dadd(88.999, 76.099, 13.974, 1.352)
pt3dadd(88.911, 76.04, 14.021, 1.328)
pt3dadd(88.824, 75.982, 14.068, 1.302)
pt3dadd(88.736, 75.923, 14.116, 1.276)
pt3dadd(88.648, 75.865, 14.164, 1.25)
pt3dadd(88.56, 75.806, 14.211, 1.224)
pt3dadd(88.472, 75.748, 14.259, 1.198)
pt3dadd(88.385, 75.689, 14.307, 1.172)
pt3dadd(88.297, 75.631, 14.354, 1.146)
pt3dadd(88.209, 75.572, 14.402, 1.12)
pt3dadd(88.121, 75.514, 14.45, 1.094)
pt3dadd(88.019, 75.46, 14.478, 1.008)
pt3dadd(87.917, 75.407, 14.505, 0.92)
pt3dadd(87.815, 75.353, 14.533, 0.834)
pt3dadd(87.713, 75.3, 14.561, 0.746)
pt3dadd(87.611, 75.246, 14.589, 0.66)
pt3dadd(87.509, 75.193, 14.617, 0.574)
pt3dadd(87.407, 75.139, 14.645, 0.486)
pt3dadd(87.305, 75.085, 14.673, 0.4)
pt3dadd(87.203, 75.032, 14.701, 0.312)
pt3dadd(87.101, 74.978, 14.729, 0.226)
}
dend_7[71] {pt3dclear()
pt3dadd(87.101, 74.978, 14.729, 0.226)
pt3dadd(87.07, 74.984, 14.732, 0.226)
pt3dadd(86.953, 75.004, 14.744, 0.226)
pt3dadd(86.836, 75.024, 14.756, 0.226)
pt3dadd(86.718, 75.045, 14.768, 0.226)
pt3dadd(86.601, 75.065, 14.78, 0.226)
pt3dadd(86.484, 75.085, 14.793, 0.226)
pt3dadd(86.366, 75.105, 14.805, 0.226)
pt3dadd(86.249, 75.126, 14.817, 0.226)
pt3dadd(86.13, 75.143, 14.821, 0.226)
pt3dadd(86.012, 75.161, 14.825, 0.226)
pt3dadd(85.893, 75.179, 14.83, 0.226)
pt3dadd(85.774, 75.196, 14.834, 0.226)
pt3dadd(85.656, 75.214, 14.838, 0.226)
pt3dadd(85.537, 75.232, 14.842, 0.226)
pt3dadd(85.419, 75.249, 14.847, 0.226)
pt3dadd(85.3, 75.267, 14.851, 0.226)
pt3dadd(85.182, 75.285, 14.855, 0.226)
pt3dadd(85.063, 75.302, 14.859, 0.228)
pt3dadd(84.944, 75.317, 14.859, 0.244)
pt3dadd(84.825, 75.332, 14.859, 0.262)
pt3dadd(84.706, 75.347, 14.859, 0.28)
pt3dadd(84.587, 75.362, 14.859, 0.298)
pt3dadd(84.468, 75.376, 14.859, 0.316)
pt3dadd(84.348, 75.391, 14.859, 0.334)
pt3dadd(84.229, 75.406, 14.859, 0.352)
pt3dadd(84.11, 75.421, 14.859, 0.37)
pt3dadd(83.991, 75.436, 14.859, 0.388)
pt3dadd(83.872, 75.451, 14.859, 0.404)
pt3dadd(83.753, 75.46, 14.859, 0.422)
pt3dadd(83.633, 75.47, 14.859, 0.438)
pt3dadd(83.513, 75.48, 14.859, 0.454)
pt3dadd(83.394, 75.489, 14.859, 0.472)
pt3dadd(83.274, 75.499, 14.859, 0.488)
pt3dadd(83.154, 75.509, 14.859, 0.504)
pt3dadd(83.035, 75.519, 14.859, 0.52)
pt3dadd(82.915, 75.528, 14.859, 0.538)
pt3dadd(82.796, 75.538, 14.859, 0.554)
pt3dadd(82.676, 75.547, 14.859, 0.568)
pt3dadd(82.556, 75.548, 14.859, 0.534)
pt3dadd(82.436, 75.548, 14.859, 0.502)
pt3dadd(82.316, 75.548, 14.859, 0.47)
pt3dadd(82.196, 75.549, 14.859, 0.438)
pt3dadd(82.076, 75.549, 14.859, 0.406)
pt3dadd(81.956, 75.549, 14.859, 0.374)
pt3dadd(81.836, 75.55, 14.859, 0.342)
pt3dadd(81.716, 75.55, 14.859, 0.308)
pt3dadd(81.596, 75.55, 14.859, 0.276)
pt3dadd(81.476, 75.551, 14.859, 0.248)
pt3dadd(81.356, 75.551, 14.859, 0.266)
pt3dadd(81.236, 75.552, 14.859, 0.286)
pt3dadd(81.116, 75.553, 14.859, 0.306)
pt3dadd(80.996, 75.553, 14.859, 0.324)
pt3dadd(80.876, 75.554, 14.859, 0.344)
pt3dadd(80.756, 75.554, 14.859, 0.364)
pt3dadd(80.636, 75.555, 14.859, 0.382)
pt3dadd(80.516, 75.556, 14.859, 0.402)
pt3dadd(80.396, 75.556, 14.859, 0.42)
pt3dadd(80.276, 75.557, 14.859, 0.438)
pt3dadd(80.156, 75.558, 14.859, 0.44)
}
}
proc shape3d_190() {
dend_7[71] { pt3dadd(80.036, 75.559, 14.859, 0.442)
pt3dadd(79.916, 75.56, 14.859, 0.442)
pt3dadd(79.796, 75.561, 14.859, 0.444)
pt3dadd(79.676, 75.562, 14.859, 0.446)
pt3dadd(79.556, 75.563, 14.859, 0.446)
pt3dadd(79.436, 75.564, 14.859, 0.448)
pt3dadd(79.316, 75.566, 14.859, 0.45)
pt3dadd(79.196, 75.567, 14.859, 0.45)
pt3dadd(79.076, 75.568, 14.859, 0.452)
pt3dadd(78.956, 75.57, 14.859, 0.452)
pt3dadd(78.836, 75.572, 14.859, 0.452)
pt3dadd(78.716, 75.575, 14.859, 0.452)
pt3dadd(78.596, 75.577, 14.859, 0.452)
pt3dadd(78.476, 75.579, 14.859, 0.452)
pt3dadd(78.356, 75.581, 14.859, 0.452)
pt3dadd(78.236, 75.584, 14.859, 0.452)
pt3dadd(78.116, 75.586, 14.859, 0.452)
pt3dadd(77.996, 75.588, 14.859, 0.452)
pt3dadd(77.876, 75.591, 14.859, 0.452)
pt3dadd(77.757, 75.596, 14.859, 0.464)
pt3dadd(77.637, 75.601, 14.859, 0.474)
pt3dadd(77.517, 75.606, 14.859, 0.486)
pt3dadd(77.397, 75.611, 14.859, 0.496)
pt3dadd(77.277, 75.616, 14.859, 0.508)
pt3dadd(77.157, 75.621, 14.859, 0.52)
pt3dadd(77.037, 75.626, 14.859, 0.53)
pt3dadd(76.917, 75.631, 14.859, 0.542)
pt3dadd(76.797, 75.636, 14.859, 0.552)
pt3dadd(76.677, 75.641, 14.859, 0.562)
pt3dadd(76.558, 75.649, 14.859, 0.558)
pt3dadd(76.438, 75.657, 14.859, 0.556)
pt3dadd(76.318, 75.664, 14.859, 0.552)
pt3dadd(76.198, 75.672, 14.859, 0.548)
pt3dadd(76.079, 75.68, 14.859, 0.544)
pt3dadd(75.959, 75.687, 14.859, 0.54)
pt3dadd(75.839, 75.695, 14.859, 0.536)
pt3dadd(75.719, 75.703, 14.859, 0.532)
pt3dadd(75.6, 75.711, 14.859, 0.528)
pt3dadd(75.48, 75.719, 14.859, 0.524)
pt3dadd(75.361, 75.735, 14.859, 0.498)
pt3dadd(75.242, 75.751, 14.859, 0.472)
pt3dadd(75.123, 75.767, 14.859, 0.444)
pt3dadd(75.004, 75.783, 14.859, 0.42)
pt3dadd(74.885, 75.8, 14.859, 0.392)
pt3dadd(74.767, 75.816, 14.859, 0.366)
pt3dadd(74.648, 75.832, 14.859, 0.34)
pt3dadd(74.529, 75.848, 14.86, 0.314)
pt3dadd(74.41, 75.864, 14.86, 0.288)
pt3dadd(74.292, 75.884, 14.86, 0.268)
pt3dadd(74.179, 75.924, 14.86, 0.286)
pt3dadd(74.066, 75.965, 14.86, 0.304)
pt3dadd(73.953, 76.005, 14.86, 0.322)
pt3dadd(73.84, 76.046, 14.86, 0.34)
pt3dadd(73.727, 76.086, 14.86, 0.358)
pt3dadd(73.614, 76.126, 14.86, 0.376)
pt3dadd(73.501, 76.167, 14.86, 0.394)
pt3dadd(73.388, 76.207, 14.86, 0.412)
pt3dadd(73.275, 76.248, 14.86, 0.43)
pt3dadd(73.161, 76.283, 14.86, 0.446)
pt3dadd(73.041, 76.28, 14.86, 0.448)
pt3dadd(72.921, 76.278, 14.86, 0.448)
pt3dadd(72.801, 76.276, 14.86, 0.448)
pt3dadd(72.681, 76.274, 14.86, 0.448)
pt3dadd(72.561, 76.272, 14.86, 0.45)
pt3dadd(72.441, 76.269, 14.86, 0.45)
pt3dadd(72.321, 76.267, 14.86, 0.45)
pt3dadd(72.201, 76.265, 14.86, 0.452)
pt3dadd(72.081, 76.263, 14.86, 0.452)
pt3dadd(71.962, 76.265, 14.86, 0.454)
pt3dadd(71.844, 76.29, 14.861, 0.47)
pt3dadd(71.727, 76.316, 14.861, 0.484)
pt3dadd(71.61, 76.341, 14.861, 0.498)
pt3dadd(71.493, 76.367, 14.861, 0.514)
pt3dadd(71.375, 76.392, 14.861, 0.528)
pt3dadd(71.258, 76.417, 14.861, 0.544)
pt3dadd(71.141, 76.443, 14.861, 0.558)
pt3dadd(71.023, 76.468, 14.861, 0.572)
pt3dadd(70.906, 76.494, 14.862, 0.588)
pt3dadd(70.789, 76.519, 14.862, 0.598)
pt3dadd(70.671, 76.545, 14.862, 0.596)
pt3dadd(70.554, 76.57, 14.862, 0.592)
pt3dadd(70.437, 76.595, 14.862, 0.59)
pt3dadd(70.32, 76.621, 14.863, 0.586)
pt3dadd(70.203, 76.646, 14.863, 0.584)
pt3dadd(70.085, 76.672, 14.863, 0.58)
pt3dadd(69.968, 76.697, 14.863, 0.578)
pt3dadd(69.851, 76.723, 14.863, 0.574)
pt3dadd(69.733, 76.748, 14.864, 0.572)
pt3dadd(69.616, 76.773, 14.864, 0.568)
pt3dadd(69.498, 76.794, 14.864, 0.564)
pt3dadd(69.38, 76.815, 14.865, 0.56)
pt3dadd(69.262, 76.837, 14.865, 0.554)
pt3dadd(69.144, 76.858, 14.866, 0.55)
pt3dadd(69.026, 76.88, 14.866, 0.546)
pt3dadd(68.907, 76.901, 14.866, 0.54)
pt3dadd(68.789, 76.922, 14.867, 0.536)
pt3dadd(68.671, 76.944, 14.867, 0.532)
pt3dadd(68.553, 76.965, 14.868, 0.526)
pt3dadd(68.435, 76.987, 14.868, 0.528)
pt3dadd(68.317, 77.009, 14.869, 0.546)
pt3dadd(68.199, 77.031, 14.87, 0.566)
pt3dadd(68.082, 77.054, 14.871, 0.584)
pt3dadd(67.964, 77.076, 14.871, 0.604)
pt3dadd(67.846, 77.098, 14.872, 0.622)
pt3dadd(67.728, 77.121, 14.873, 0.642)
pt3dadd(67.61, 77.143, 14.873, 0.66)
pt3dadd(67.492, 77.165, 14.874, 0.678)
pt3dadd(67.374, 77.188, 14.875, 0.698)
pt3dadd(67.256, 77.209, 14.876, 0.716)
pt3dadd(67.137, 77.226, 14.877, 0.736)
pt3dadd(67.019, 77.244, 14.879, 0.754)
pt3dadd(66.9, 77.262, 14.88, 0.774)
pt3dadd(66.781, 77.28, 14.882, 0.792)
pt3dadd(66.663, 77.298, 14.883, 0.812)
pt3dadd(66.544, 77.315, 14.884, 0.83)
pt3dadd(66.425, 77.333, 14.886, 0.85)
pt3dadd(66.307, 77.351, 14.887, 0.868)
pt3dadd(66.188, 77.369, 14.889, 0.888)
pt3dadd(66.072, 77.395, 14.89, 0.898)
pt3dadd(65.964, 77.446, 14.893, 0.88)
pt3dadd(65.855, 77.498, 14.896, 0.864)
pt3dadd(65.747, 77.549, 14.898, 0.848)
pt3dadd(65.639, 77.601, 14.901, 0.83)
pt3dadd(65.53, 77.652, 14.903, 0.814)
pt3dadd(65.422, 77.704, 14.906, 0.796)
pt3dadd(65.313, 77.755, 14.908, 0.78)
pt3dadd(65.205, 77.807, 14.911, 0.762)
pt3dadd(65.097, 77.858, 14.913, 0.746)
pt3dadd(64.988, 77.908, 14.917, 0.74)
pt3dadd(64.877, 77.954, 14.922, 0.772)
pt3dadd(64.766, 78, 14.927, 0.804)
pt3dadd(64.656, 78.045, 14.933, 0.834)
pt3dadd(64.545, 78.091, 14.938, 0.866)
pt3dadd(64.434, 78.136, 14.943, 0.898)
pt3dadd(64.323, 78.182, 14.948, 0.928)
pt3dadd(64.212, 78.228, 14.954, 0.96)
pt3dadd(64.101, 78.273, 14.959, 0.992)
pt3dadd(63.991, 78.319, 14.965, 1.024)
pt3dadd(63.88, 78.366, 14.97, 1.048)
pt3dadd(63.771, 78.415, 14.979, 1.05)
pt3dadd(63.662, 78.464, 14.987, 1.052)
pt3dadd(63.553, 78.513, 14.995, 1.054)
pt3dadd(63.444, 78.562, 15.003, 1.058)
pt3dadd(63.335, 78.611, 15.011, 1.06)
pt3dadd(63.226, 78.66, 15.019, 1.062)
pt3dadd(63.117, 78.709, 15.027, 1.066)
pt3dadd(63.008, 78.758, 15.035, 1.068)
pt3dadd(62.899, 78.807, 15.043, 1.07)
pt3dadd(62.791, 78.859, 15.053, 1.054)
pt3dadd(62.686, 78.915, 15.065, 0.99)
pt3dadd(62.581, 78.971, 15.077, 0.926)
pt3dadd(62.476, 79.027, 15.089, 0.864)
pt3dadd(62.371, 79.083, 15.101, 0.8)
pt3dadd(62.266, 79.14, 15.113, 0.736)
pt3dadd(62.161, 79.196, 15.125, 0.674)
pt3dadd(62.056, 79.252, 15.137, 0.61)
pt3dadd(61.951, 79.308, 15.149, 0.546)
pt3dadd(61.845, 79.364, 15.161, 0.482)
pt3dadd(61.74, 79.414, 15.181, 0.434)
pt3dadd(61.634, 79.45, 15.216, 0.416)
pt3dadd(61.528, 79.486, 15.252, 0.4)
pt3dadd(61.421, 79.522, 15.287, 0.384)
pt3dadd(61.315, 79.558, 15.323, 0.366)
pt3dadd(61.209, 79.594, 15.358, 0.348)
pt3dadd(61.103, 79.63, 15.394, 0.332)
pt3dadd(60.996, 79.666, 15.429, 0.316)
pt3dadd(60.89, 79.702, 15.465, 0.298)
pt3dadd(60.784, 79.738, 15.5, 0.28)
pt3dadd(60.676, 79.773, 15.533, 0.272)
pt3dadd(60.565, 79.805, 15.559, 0.282)
pt3dadd(60.454, 79.838, 15.585, 0.29)
pt3dadd(60.342, 79.87, 15.612, 0.3)
pt3dadd(60.231, 79.902, 15.638, 0.308)
pt3dadd(60.12, 79.934, 15.664, 0.318)
pt3dadd(60.009, 79.966, 15.691, 0.326)
pt3dadd(59.898, 79.999, 15.717, 0.336)
pt3dadd(59.787, 80.031, 15.743, 0.346)
pt3dadd(59.675, 80.063, 15.77, 0.354)
pt3dadd(59.564, 80.099, 15.793, 0.36)
pt3dadd(59.454, 80.141, 15.81, 0.362)
pt3dadd(59.344, 80.184, 15.827, 0.362)
pt3dadd(59.233, 80.226, 15.843, 0.362)
pt3dadd(59.123, 80.269, 15.86, 0.364)
pt3dadd(59.013, 80.312, 15.877, 0.364)
pt3dadd(58.902, 80.354, 15.894, 0.366)
pt3dadd(58.792, 80.397, 15.911, 0.366)
pt3dadd(58.681, 80.439, 15.927, 0.366)
pt3dadd(58.571, 80.482, 15.944, 0.368)
pt3dadd(58.462, 80.529, 15.957, 0.362)
pt3dadd(58.355, 80.582, 15.966, 0.348)
pt3dadd(58.248, 80.635, 15.974, 0.334)
pt3dadd(58.141, 80.689, 15.982, 0.32)
pt3dadd(58.034, 80.742, 15.991, 0.306)
pt3dadd(57.927, 80.795, 15.999, 0.292)
pt3dadd(57.82, 80.849, 16.007, 0.276)
pt3dadd(57.713, 80.902, 16.016, 0.262)
pt3dadd(57.606, 80.955, 16.024, 0.248)
pt3dadd(57.499, 81.009, 16.032, 0.234)
pt3dadd(57.391, 81.06, 16.037, 0.226)
pt3dadd(57.281, 81.11, 16.037, 0.226)
}
}
proc shape3d_191() {
dend_7[71] { pt3dadd(57.172, 81.159, 16.037, 0.226)
pt3dadd(57.063, 81.208, 16.037, 0.226)
pt3dadd(56.953, 81.258, 16.038, 0.226)
pt3dadd(56.844, 81.307, 16.038, 0.226)
pt3dadd(56.734, 81.356, 16.038, 0.226)
pt3dadd(56.625, 81.405, 16.038, 0.226)
pt3dadd(56.515, 81.455, 16.038, 0.226)
pt3dadd(56.406, 81.504, 16.038, 0.226)
pt3dadd(56.3, 81.56, 16.038, 0.226)
pt3dadd(56.199, 81.624, 16.039, 0.226)
pt3dadd(56.097, 81.688, 16.039, 0.226)
pt3dadd(55.996, 81.753, 16.039, 0.226)
pt3dadd(55.895, 81.817, 16.039, 0.226)
pt3dadd(55.793, 81.881, 16.04, 0.226)
pt3dadd(55.692, 81.945, 16.04, 0.226)
pt3dadd(55.591, 82.01, 16.04, 0.226)
pt3dadd(55.49, 82.074, 16.04, 0.226)
pt3dadd(55.388, 82.138, 16.041, 0.226)
pt3dadd(55.288, 82.205, 16.041, 0.226)
pt3dadd(55.19, 82.273, 16.041, 0.226)
pt3dadd(55.091, 82.342, 16.042, 0.226)
pt3dadd(54.993, 82.41, 16.042, 0.226)
pt3dadd(54.894, 82.479, 16.042, 0.226)
pt3dadd(54.795, 82.547, 16.043, 0.226)
pt3dadd(54.697, 82.616, 16.043, 0.226)
pt3dadd(54.598, 82.684, 16.044, 0.226)
pt3dadd(54.5, 82.753, 16.044, 0.226)
pt3dadd(54.401, 82.821, 16.044, 0.226)
pt3dadd(54.304, 82.891, 16.045, 0.226)
pt3dadd(54.207, 82.961, 16.045, 0.226)
pt3dadd(54.11, 83.032, 16.046, 0.226)
pt3dadd(54.013, 83.103, 16.046, 0.226)
pt3dadd(53.916, 83.173, 16.047, 0.228)
pt3dadd(53.819, 83.244, 16.048, 0.228)
pt3dadd(53.722, 83.315, 16.048, 0.228)
pt3dadd(53.625, 83.386, 16.049, 0.228)
pt3dadd(53.528, 83.456, 16.049, 0.228)
pt3dadd(53.431, 83.527, 16.05, 0.228)
pt3dadd(53.33, 83.59, 16.051, 0.244)
pt3dadd(53.222, 83.644, 16.052, 0.278)
pt3dadd(53.115, 83.698, 16.053, 0.312)
pt3dadd(53.008, 83.752, 16.055, 0.346)
pt3dadd(52.901, 83.806, 16.056, 0.38)
pt3dadd(52.794, 83.86, 16.057, 0.414)
pt3dadd(52.687, 83.914, 16.059, 0.45)
pt3dadd(52.579, 83.968, 16.06, 0.484)
pt3dadd(52.472, 84.022, 16.061, 0.518)
pt3dadd(52.365, 84.076, 16.063, 0.552)
pt3dadd(52.259, 84.132, 16.064, 0.566)
pt3dadd(52.154, 84.19, 16.066, 0.554)
pt3dadd(52.049, 84.249, 16.069, 0.542)
pt3dadd(51.945, 84.307, 16.071, 0.53)
pt3dadd(51.84, 84.366, 16.073, 0.518)
pt3dadd(51.735, 84.424, 16.075, 0.504)
pt3dadd(51.63, 84.482, 16.077, 0.492)
pt3dadd(51.525, 84.541, 16.08, 0.48)
pt3dadd(51.42, 84.599, 16.082, 0.468)
pt3dadd(51.316, 84.657, 16.084, 0.456)
pt3dadd(51.21, 84.714, 16.087, 0.438)
pt3dadd(51.103, 84.768, 16.091, 0.416)
pt3dadd(50.996, 84.822, 16.095, 0.394)
pt3dadd(50.889, 84.876, 16.099, 0.372)
pt3dadd(50.782, 84.931, 16.103, 0.35)
pt3dadd(50.675, 84.985, 16.107, 0.328)
pt3dadd(50.568, 85.039, 16.111, 0.304)
pt3dadd(50.461, 85.093, 16.115, 0.282)
pt3dadd(50.354, 85.147, 16.119, 0.26)
pt3dadd(50.247, 85.202, 16.123, 0.238)
pt3dadd(50.138, 85.25, 16.129, 0.228)
pt3dadd(50.026, 85.292, 16.136, 0.232)
pt3dadd(49.914, 85.334, 16.143, 0.236)
pt3dadd(49.802, 85.376, 16.15, 0.24)
pt3dadd(49.69, 85.418, 16.157, 0.242)
pt3dadd(49.578, 85.46, 16.164, 0.246)
pt3dadd(49.465, 85.502, 16.172, 0.25)
pt3dadd(49.353, 85.544, 16.179, 0.254)
pt3dadd(49.241, 85.586, 16.186, 0.258)
pt3dadd(49.129, 85.628, 16.193, 0.262)
pt3dadd(49.02, 85.676, 16.202, 0.288)
pt3dadd(48.914, 85.731, 16.213, 0.34)
pt3dadd(48.808, 85.786, 16.224, 0.39)
pt3dadd(48.702, 85.84, 16.235, 0.442)
pt3dadd(48.596, 85.895, 16.246, 0.492)
pt3dadd(48.49, 85.949, 16.256, 0.544)
pt3dadd(48.384, 86.004, 16.267, 0.594)
pt3dadd(48.278, 86.058, 16.278, 0.646)
pt3dadd(48.171, 86.113, 16.289, 0.696)
pt3dadd(48.065, 86.168, 16.3, 0.746)
pt3dadd(47.958, 86.213, 16.32, 0.768)
pt3dadd(47.849, 86.247, 16.351, 0.754)
pt3dadd(47.74, 86.282, 16.382, 0.742)
pt3dadd(47.632, 86.316, 16.413, 0.728)
pt3dadd(47.523, 86.351, 16.444, 0.716)
pt3dadd(47.414, 86.385, 16.475, 0.704)
pt3dadd(47.305, 86.42, 16.506, 0.69)
pt3dadd(47.196, 86.454, 16.537, 0.678)
pt3dadd(47.088, 86.488, 16.567, 0.664)
pt3dadd(46.979, 86.523, 16.598, 0.652)
pt3dadd(46.869, 86.55, 16.63, 0.64)
pt3dadd(46.757, 86.571, 16.663, 0.628)
pt3dadd(46.646, 86.592, 16.696, 0.616)
pt3dadd(46.534, 86.614, 16.728, 0.606)
pt3dadd(46.423, 86.635, 16.761, 0.594)
pt3dadd(46.312, 86.657, 16.793, 0.582)
pt3dadd(46.2, 86.678, 16.826, 0.57)
pt3dadd(46.089, 86.7, 16.859, 0.56)
pt3dadd(45.978, 86.721, 16.891, 0.548)
pt3dadd(45.866, 86.743, 16.924, 0.536)
pt3dadd(45.752, 86.758, 16.952, 0.542)
pt3dadd(45.636, 86.769, 16.976, 0.556)
pt3dadd(45.521, 86.781, 17.001, 0.57)
pt3dadd(45.405, 86.793, 17.026, 0.586)
pt3dadd(45.289, 86.804, 17.05, 0.6)
pt3dadd(45.174, 86.816, 17.075, 0.614)
pt3dadd(45.058, 86.828, 17.1, 0.628)
pt3dadd(44.942, 86.839, 17.124, 0.644)
pt3dadd(44.826, 86.851, 17.149, 0.658)
pt3dadd(44.711, 86.863, 17.174, 0.672)
pt3dadd(44.593, 86.869, 17.194, 0.678)
pt3dadd(44.475, 86.871, 17.212, 0.678)
pt3dadd(44.357, 86.874, 17.229, 0.678)
pt3dadd(44.239, 86.877, 17.247, 0.678)
pt3dadd(44.121, 86.88, 17.265, 0.678)
pt3dadd(44.003, 86.882, 17.282, 0.678)
pt3dadd(43.885, 86.885, 17.3, 0.678)
pt3dadd(43.767, 86.888, 17.318, 0.678)
pt3dadd(43.649, 86.891, 17.336, 0.678)
pt3dadd(43.531, 86.893, 17.354, 0.678)
pt3dadd(43.412, 86.898, 17.367, 0.678)
pt3dadd(43.293, 86.903, 17.379, 0.678)
pt3dadd(43.174, 86.909, 17.39, 0.678)
pt3dadd(43.055, 86.914, 17.402, 0.678)
pt3dadd(42.936, 86.919, 17.414, 0.678)
pt3dadd(42.817, 86.925, 17.425, 0.678)
pt3dadd(42.698, 86.93, 17.437, 0.678)
pt3dadd(42.579, 86.936, 17.448, 0.678)
pt3dadd(42.46, 86.941, 17.46, 0.678)
pt3dadd(42.341, 86.946, 17.471, 0.678)
pt3dadd(42.225, 86.955, 17.497, 0.658)
pt3dadd(42.113, 86.966, 17.529, 0.63)
pt3dadd(42, 86.977, 17.562, 0.6)
pt3dadd(41.887, 86.988, 17.595, 0.57)
pt3dadd(41.774, 86.999, 17.628, 0.54)
pt3dadd(41.661, 87.01, 17.661, 0.512)
pt3dadd(41.548, 87.021, 17.693, 0.482)
pt3dadd(41.436, 87.031, 17.726, 0.452)
pt3dadd(41.323, 87.042, 17.759, 0.422)
pt3dadd(41.21, 87.053, 17.792, 0.394)
pt3dadd(41.097, 87.069, 17.822, 0.394)
pt3dadd(40.984, 87.087, 17.852, 0.41)
pt3dadd(40.87, 87.106, 17.882, 0.424)
pt3dadd(40.757, 87.124, 17.911, 0.438)
pt3dadd(40.644, 87.142, 17.941, 0.454)
pt3dadd(40.531, 87.161, 17.971, 0.468)
pt3dadd(40.418, 87.179, 18, 0.482)
pt3dadd(40.305, 87.197, 18.03, 0.498)
pt3dadd(40.192, 87.216, 18.059, 0.512)
pt3dadd(40.079, 87.234, 18.089, 0.526)
pt3dadd(39.966, 87.264, 18.111, 0.554)
pt3dadd(39.853, 87.299, 18.13, 0.586)
pt3dadd(39.741, 87.334, 18.15, 0.62)
pt3dadd(39.628, 87.368, 18.169, 0.652)
pt3dadd(39.516, 87.403, 18.188, 0.684)
pt3dadd(39.403, 87.438, 18.208, 0.716)
pt3dadd(39.291, 87.473, 18.227, 0.748)
pt3dadd(39.178, 87.507, 18.247, 0.78)
pt3dadd(39.066, 87.542, 18.266, 0.814)
pt3dadd(38.953, 87.577, 18.285, 0.846)
pt3dadd(38.848, 87.631, 18.296, 0.836)
pt3dadd(38.743, 87.689, 18.306, 0.82)
pt3dadd(38.639, 87.747, 18.316, 0.802)
pt3dadd(38.534, 87.804, 18.325, 0.786)
pt3dadd(38.429, 87.862, 18.335, 0.77)
pt3dadd(38.325, 87.92, 18.345, 0.752)
pt3dadd(38.22, 87.978, 18.354, 0.736)
pt3dadd(38.116, 88.035, 18.364, 0.718)
pt3dadd(38.011, 88.093, 18.374, 0.702)
pt3dadd(37.907, 88.151, 18.384, 0.686)
pt3dadd(37.809, 88.219, 18.385, 0.67)
pt3dadd(37.712, 88.29, 18.385, 0.654)
pt3dadd(37.615, 88.361, 18.386, 0.638)
pt3dadd(37.518, 88.431, 18.386, 0.624)
pt3dadd(37.421, 88.502, 18.386, 0.608)
pt3dadd(37.324, 88.573, 18.387, 0.592)
pt3dadd(37.227, 88.644, 18.387, 0.576)
pt3dadd(37.13, 88.714, 18.387, 0.56)
pt3dadd(37.033, 88.785, 18.387, 0.546)
pt3dadd(36.936, 88.856, 18.388, 0.53)
pt3dadd(36.834, 88.919, 18.388, 0.528)
pt3dadd(36.732, 88.982, 18.388, 0.53)
pt3dadd(36.629, 89.044, 18.388, 0.532)
pt3dadd(36.527, 89.107, 18.388, 0.532)
pt3dadd(36.424, 89.169, 18.388, 0.534)
pt3dadd(36.322, 89.232, 18.388, 0.534)
pt3dadd(36.22, 89.295, 18.388, 0.536)
pt3dadd(36.117, 89.357, 18.388, 0.538)
pt3dadd(36.015, 89.42, 18.388, 0.54)
pt3dadd(35.912, 89.482, 18.388, 0.54)
pt3dadd(35.806, 89.538, 18.388, 0.556)
pt3dadd(35.7, 89.594, 18.388, 0.572)
}
}
proc shape3d_192() {
dend_7[71] { pt3dadd(35.594, 89.65, 18.388, 0.59)
pt3dadd(35.488, 89.706, 18.388, 0.608)
pt3dadd(35.381, 89.761, 18.388, 0.624)
pt3dadd(35.275, 89.817, 18.388, 0.642)
pt3dadd(35.169, 89.873, 18.388, 0.658)
pt3dadd(35.062, 89.928, 18.388, 0.676)
pt3dadd(34.956, 89.984, 18.388, 0.692)
pt3dadd(34.85, 90.04, 18.388, 0.71)
pt3dadd(34.746, 90.1, 18.388, 0.726)
pt3dadd(34.643, 90.162, 18.388, 0.744)
pt3dadd(34.54, 90.223, 18.388, 0.76)
pt3dadd(34.437, 90.284, 18.388, 0.776)
pt3dadd(34.333, 90.345, 18.388, 0.794)
pt3dadd(34.23, 90.406, 18.388, 0.81)
pt3dadd(34.127, 90.467, 18.388, 0.826)
pt3dadd(34.024, 90.529, 18.388, 0.844)
pt3dadd(33.92, 90.59, 18.388, 0.86)
pt3dadd(33.817, 90.651, 18.388, 0.876)
pt3dadd(33.707, 90.698, 18.388, 0.84)
pt3dadd(33.596, 90.743, 18.388, 0.796)
pt3dadd(33.485, 90.788, 18.388, 0.752)
pt3dadd(33.373, 90.834, 18.388, 0.708)
pt3dadd(33.262, 90.879, 18.388, 0.666)
pt3dadd(33.151, 90.924, 18.388, 0.622)
pt3dadd(33.04, 90.969, 18.388, 0.578)
pt3dadd(32.929, 91.014, 18.388, 0.534)
pt3dadd(32.818, 91.06, 18.388, 0.49)
pt3dadd(32.706, 91.105, 18.388, 0.448)
pt3dadd(32.598, 91.157, 18.388, 0.424)
pt3dadd(32.49, 91.209, 18.388, 0.402)
pt3dadd(32.383, 91.262, 18.388, 0.38)
pt3dadd(32.275, 91.315, 18.388, 0.358)
pt3dadd(32.167, 91.367, 18.388, 0.336)
pt3dadd(32.059, 91.42, 18.388, 0.314)
pt3dadd(31.951, 91.472, 18.388, 0.292)
pt3dadd(31.843, 91.525, 18.388, 0.27)
pt3dadd(31.735, 91.578, 18.388, 0.25)
pt3dadd(31.628, 91.63, 18.388, 0.228)
pt3dadd(31.519, 91.681, 18.388, 0.226)
pt3dadd(31.41, 91.731, 18.388, 0.226)
pt3dadd(31.301, 91.782, 18.388, 0.226)
pt3dadd(31.192, 91.833, 18.388, 0.226)
pt3dadd(31.084, 91.883, 18.388, 0.226)
pt3dadd(30.975, 91.934, 18.388, 0.226)
pt3dadd(30.866, 91.984, 18.388, 0.226)
pt3dadd(30.757, 92.035, 18.388, 0.226)
pt3dadd(30.648, 92.085, 18.388, 0.226)
pt3dadd(30.539, 92.136, 18.388, 0.226)
pt3dadd(30.424, 92.17, 18.388, 0.226)
pt3dadd(30.309, 92.205, 18.388, 0.226)
pt3dadd(30.195, 92.239, 18.388, 0.226)
pt3dadd(30.08, 92.274, 18.388, 0.226)
pt3dadd(29.965, 92.308, 18.388, 0.226)
pt3dadd(29.85, 92.343, 18.388, 0.226)
pt3dadd(29.735, 92.377, 18.388, 0.226)
pt3dadd(29.62, 92.412, 18.388, 0.226)
pt3dadd(29.505, 92.446, 18.388, 0.226)
pt3dadd(29.39, 92.48, 18.388, 0.226)
}
dend_7[72] {pt3dclear()
pt3dadd(87.101, 74.978, 14.729, 0.226)
pt3dadd(87.078, 74.938, 14.731, 0.234)
pt3dadd(87.02, 74.833, 14.737, 0.256)
pt3dadd(86.962, 74.728, 14.743, 0.276)
pt3dadd(86.903, 74.624, 14.749, 0.296)
pt3dadd(86.845, 74.519, 14.755, 0.318)
pt3dadd(86.787, 74.414, 14.761, 0.338)
pt3dadd(86.729, 74.31, 14.767, 0.36)
pt3dadd(86.67, 74.205, 14.773, 0.38)
pt3dadd(86.612, 74.1, 14.779, 0.402)
pt3dadd(86.554, 73.996, 14.785, 0.422)
pt3dadd(86.496, 73.891, 14.791, 0.444)
pt3dadd(86.438, 73.786, 14.798, 0.464)
pt3dadd(86.379, 73.682, 14.804, 0.486)
pt3dadd(86.321, 73.577, 14.81, 0.506)
pt3dadd(86.263, 73.472, 14.816, 0.528)
pt3dadd(86.205, 73.368, 14.822, 0.548)
pt3dadd(86.148, 73.262, 14.828, 0.57)
pt3dadd(86.097, 73.154, 14.834, 0.588)
pt3dadd(86.045, 73.046, 14.839, 0.608)
pt3dadd(85.994, 72.938, 14.845, 0.626)
pt3dadd(85.942, 72.829, 14.851, 0.646)
pt3dadd(85.891, 72.721, 14.857, 0.666)
pt3dadd(85.84, 72.613, 14.862, 0.684)
pt3dadd(85.788, 72.505, 14.868, 0.704)
pt3dadd(85.737, 72.396, 14.874, 0.722)
pt3dadd(85.686, 72.288, 14.879, 0.742)
pt3dadd(85.635, 72.179, 14.885, 0.758)
pt3dadd(85.589, 72.069, 14.891, 0.768)
pt3dadd(85.542, 71.959, 14.897, 0.778)
pt3dadd(85.495, 71.848, 14.902, 0.788)
pt3dadd(85.449, 71.738, 14.908, 0.798)
pt3dadd(85.402, 71.628, 14.914, 0.808)
pt3dadd(85.355, 71.517, 14.919, 0.818)
pt3dadd(85.308, 71.407, 14.925, 0.826)
pt3dadd(85.262, 71.297, 14.931, 0.836)
pt3dadd(85.215, 71.186, 14.936, 0.846)
pt3dadd(85.163, 71.079, 14.943, 0.844)
pt3dadd(85.095, 70.98, 14.95, 0.806)
pt3dadd(85.027, 70.882, 14.958, 0.768)
pt3dadd(84.96, 70.784, 14.966, 0.728)
pt3dadd(84.891, 70.685, 14.974, 0.69)
pt3dadd(84.824, 70.587, 14.981, 0.652)
pt3dadd(84.756, 70.488, 14.989, 0.614)
pt3dadd(84.688, 70.39, 14.997, 0.574)
pt3dadd(84.62, 70.291, 15.005, 0.536)
pt3dadd(84.552, 70.193, 15.012, 0.498)
pt3dadd(84.481, 70.096, 15.021, 0.476)
pt3dadd(84.404, 70.005, 15.032, 0.506)
pt3dadd(84.327, 69.915, 15.043, 0.536)
pt3dadd(84.25, 69.824, 15.054, 0.564)
pt3dadd(84.172, 69.733, 15.066, 0.594)
pt3dadd(84.095, 69.642, 15.077, 0.624)
pt3dadd(84.018, 69.551, 15.088, 0.654)
pt3dadd(83.941, 69.46, 15.099, 0.684)
pt3dadd(83.863, 69.369, 15.11, 0.714)
pt3dadd(83.786, 69.279, 15.121, 0.744)
pt3dadd(83.709, 69.189, 15.137, 0.772)
pt3dadd(83.632, 69.106, 15.17, 0.798)
pt3dadd(83.556, 69.022, 15.202, 0.826)
pt3dadd(83.479, 68.938, 15.234, 0.852)
pt3dadd(83.403, 68.854, 15.266, 0.878)
pt3dadd(83.326, 68.77, 15.299, 0.904)
pt3dadd(83.249, 68.686, 15.331, 0.93)
pt3dadd(83.173, 68.602, 15.363, 0.956)
pt3dadd(83.096, 68.518, 15.395, 0.982)
pt3dadd(83.02, 68.434, 15.427, 1.008)
pt3dadd(82.944, 68.352, 15.462, 1.018)
pt3dadd(82.868, 68.271, 15.501, 1.002)
pt3dadd(82.792, 68.19, 15.54, 0.986)
pt3dadd(82.717, 68.11, 15.579, 0.97)
pt3dadd(82.641, 68.029, 15.618, 0.954)
pt3dadd(82.566, 67.948, 15.656, 0.938)
pt3dadd(82.49, 67.867, 15.695, 0.922)
pt3dadd(82.415, 67.787, 15.734, 0.906)
pt3dadd(82.339, 67.706, 15.773, 0.892)
pt3dadd(82.263, 67.625, 15.812, 0.876)
pt3dadd(82.187, 67.542, 15.846, 0.85)
pt3dadd(82.11, 67.457, 15.874, 0.812)
pt3dadd(82.032, 67.372, 15.902, 0.774)
pt3dadd(81.955, 67.287, 15.93, 0.736)
pt3dadd(81.877, 67.201, 15.958, 0.7)
pt3dadd(81.8, 67.116, 15.987, 0.662)
pt3dadd(81.723, 67.031, 16.015, 0.624)
pt3dadd(81.645, 66.946, 16.043, 0.586)
pt3dadd(81.568, 66.861, 16.071, 0.548)
pt3dadd(81.49, 66.775, 16.099, 0.51)
pt3dadd(81.413, 66.689, 16.124, 0.498)
pt3dadd(81.335, 66.601, 16.144, 0.514)
pt3dadd(81.257, 66.513, 16.165, 0.53)
pt3dadd(81.179, 66.425, 16.185, 0.546)
pt3dadd(81.101, 66.337, 16.205, 0.562)
pt3dadd(81.023, 66.249, 16.226, 0.578)
pt3dadd(80.945, 66.161, 16.246, 0.594)
pt3dadd(80.868, 66.073, 16.266, 0.61)
pt3dadd(80.79, 65.985, 16.287, 0.626)
pt3dadd(80.712, 65.897, 16.307, 0.642)
pt3dadd(80.641, 65.806, 16.333, 0.646)
pt3dadd(80.579, 65.711, 16.366, 0.636)
pt3dadd(80.517, 65.617, 16.399, 0.626)
pt3dadd(80.454, 65.522, 16.433, 0.614)
pt3dadd(80.392, 65.428, 16.466, 0.604)
pt3dadd(80.33, 65.333, 16.499, 0.594)
pt3dadd(80.268, 65.238, 16.532, 0.582)
pt3dadd(80.205, 65.144, 16.565, 0.572)
pt3dadd(80.143, 65.049, 16.598, 0.562)
pt3dadd(80.081, 64.954, 16.631, 0.552)
pt3dadd(80.017, 64.86, 16.663, 0.548)
pt3dadd(79.952, 64.767, 16.695, 0.55)
pt3dadd(79.887, 64.674, 16.727, 0.554)
pt3dadd(79.822, 64.58, 16.758, 0.558)
pt3dadd(79.757, 64.487, 16.79, 0.56)
pt3dadd(79.692, 64.393, 16.822, 0.564)
pt3dadd(79.627, 64.3, 16.854, 0.568)
pt3dadd(79.562, 64.206, 16.885, 0.57)
pt3dadd(79.497, 64.113, 16.917, 0.574)
pt3dadd(79.432, 64.02, 16.949, 0.578)
pt3dadd(79.363, 63.928, 16.977, 0.596)
pt3dadd(79.29, 63.838, 17.003, 0.626)
pt3dadd(79.217, 63.748, 17.029, 0.658)
pt3dadd(79.143, 63.659, 17.055, 0.69)
pt3dadd(79.07, 63.569, 17.082, 0.72)
pt3dadd(78.997, 63.479, 17.108, 0.752)
pt3dadd(78.924, 63.389, 17.134, 0.784)
pt3dadd(78.851, 63.299, 17.16, 0.814)
pt3dadd(78.778, 63.209, 17.186, 0.846)
pt3dadd(78.705, 63.12, 17.212, 0.876)
pt3dadd(78.626, 63.033, 17.234, 0.884)
pt3dadd(78.542, 62.951, 17.253, 0.872)
pt3dadd(78.458, 62.868, 17.272, 0.858)
pt3dadd(78.374, 62.785, 17.291, 0.844)
pt3dadd(78.29, 62.703, 17.31, 0.83)
pt3dadd(78.206, 62.62, 17.329, 0.818)
pt3dadd(78.122, 62.537, 17.347, 0.804)
pt3dadd(78.038, 62.454, 17.366, 0.79)
pt3dadd(77.954, 62.372, 17.385, 0.776)
pt3dadd(77.87, 62.289, 17.404, 0.764)
pt3dadd(77.782, 62.213, 17.427, 0.752)
pt3dadd(77.69, 62.143, 17.454, 0.744)
pt3dadd(77.598, 62.073, 17.48, 0.736)
pt3dadd(77.506, 62.002, 17.507, 0.728)
pt3dadd(77.414, 61.932, 17.533, 0.72)
}
}
proc shape3d_193() {
dend_7[72] { pt3dadd(77.322, 61.862, 17.56, 0.712)
pt3dadd(77.23, 61.792, 17.587, 0.704)
pt3dadd(77.138, 61.722, 17.613, 0.696)
pt3dadd(77.046, 61.652, 17.639, 0.688)
pt3dadd(76.954, 61.582, 17.666, 0.68)
pt3dadd(76.858, 61.52, 17.697, 0.678)
pt3dadd(76.76, 61.464, 17.731, 0.678)
pt3dadd(76.662, 61.408, 17.765, 0.678)
pt3dadd(76.564, 61.352, 17.798, 0.678)
pt3dadd(76.466, 61.296, 17.832, 0.678)
pt3dadd(76.368, 61.24, 17.866, 0.678)
pt3dadd(76.27, 61.184, 17.899, 0.678)
pt3dadd(76.172, 61.128, 17.933, 0.678)
pt3dadd(76.074, 61.072, 17.967, 0.678)
pt3dadd(75.975, 61.016, 18, 0.678)
pt3dadd(75.878, 60.954, 18.027, 0.678)
pt3dadd(75.781, 60.888, 18.05, 0.678)
pt3dadd(75.685, 60.823, 18.073, 0.678)
pt3dadd(75.588, 60.758, 18.096, 0.678)
pt3dadd(75.491, 60.692, 18.119, 0.678)
pt3dadd(75.394, 60.627, 18.142, 0.678)
pt3dadd(75.297, 60.561, 18.165, 0.678)
pt3dadd(75.201, 60.496, 18.188, 0.678)
pt3dadd(75.104, 60.431, 18.211, 0.678)
pt3dadd(75.007, 60.365, 18.234, 0.678)
pt3dadd(74.911, 60.297, 18.253, 0.672)
pt3dadd(74.816, 60.228, 18.271, 0.66)
pt3dadd(74.72, 60.159, 18.289, 0.65)
pt3dadd(74.625, 60.089, 18.307, 0.64)
pt3dadd(74.529, 60.02, 18.326, 0.628)
pt3dadd(74.434, 59.95, 18.344, 0.618)
pt3dadd(74.339, 59.881, 18.362, 0.608)
pt3dadd(74.243, 59.811, 18.38, 0.596)
pt3dadd(74.148, 59.742, 18.398, 0.586)
pt3dadd(74.052, 59.672, 18.416, 0.576)
pt3dadd(73.956, 59.604, 18.432, 0.568)
pt3dadd(73.858, 59.536, 18.446, 0.56)
pt3dadd(73.761, 59.468, 18.46, 0.554)
pt3dadd(73.664, 59.4, 18.475, 0.546)
pt3dadd(73.566, 59.331, 18.489, 0.54)
pt3dadd(73.469, 59.263, 18.504, 0.532)
pt3dadd(73.372, 59.195, 18.518, 0.526)
pt3dadd(73.275, 59.127, 18.533, 0.52)
pt3dadd(73.177, 59.059, 18.547, 0.512)
pt3dadd(73.08, 58.991, 18.562, 0.506)
pt3dadd(72.978, 58.93, 18.576, 0.516)
pt3dadd(72.875, 58.873, 18.591, 0.536)
pt3dadd(72.771, 58.815, 18.606, 0.556)
pt3dadd(72.667, 58.758, 18.621, 0.576)
pt3dadd(72.563, 58.7, 18.636, 0.596)
pt3dadd(72.459, 58.643, 18.651, 0.614)
pt3dadd(72.356, 58.585, 18.666, 0.634)
pt3dadd(72.252, 58.528, 18.681, 0.654)
pt3dadd(72.148, 58.47, 18.696, 0.674)
pt3dadd(72.044, 58.413, 18.711, 0.694)
pt3dadd(71.952, 58.355, 18.75, 0.708)
pt3dadd(71.863, 58.298, 18.797, 0.718)
pt3dadd(71.774, 58.24, 18.844, 0.73)
pt3dadd(71.685, 58.183, 18.891, 0.742)
pt3dadd(71.596, 58.125, 18.938, 0.754)
pt3dadd(71.507, 58.068, 18.986, 0.766)
pt3dadd(71.418, 58.01, 19.032, 0.778)
pt3dadd(71.329, 57.953, 19.08, 0.79)
pt3dadd(71.241, 57.895, 19.127, 0.8)
pt3dadd(71.152, 57.838, 19.174, 0.812)
pt3dadd(71.064, 57.764, 19.203, 0.768)
pt3dadd(70.978, 57.687, 19.228, 0.71)
pt3dadd(70.891, 57.61, 19.253, 0.652)
pt3dadd(70.804, 57.532, 19.278, 0.594)
pt3dadd(70.717, 57.455, 19.303, 0.536)
pt3dadd(70.631, 57.378, 19.328, 0.478)
pt3dadd(70.544, 57.3, 19.353, 0.42)
pt3dadd(70.457, 57.223, 19.378, 0.362)
pt3dadd(70.37, 57.146, 19.403, 0.304)
pt3dadd(70.284, 57.069, 19.427, 0.246)
pt3dadd(70.202, 56.982, 19.44, 0.248)
pt3dadd(70.121, 56.894, 19.45, 0.262)
pt3dadd(70.04, 56.806, 19.46, 0.276)
pt3dadd(69.96, 56.718, 19.469, 0.292)
pt3dadd(69.879, 56.63, 19.479, 0.306)
pt3dadd(69.798, 56.542, 19.489, 0.322)
pt3dadd(69.718, 56.454, 19.499, 0.336)
pt3dadd(69.637, 56.366, 19.508, 0.35)
pt3dadd(69.556, 56.278, 19.518, 0.366)
pt3dadd(69.476, 56.19, 19.528, 0.38)
pt3dadd(69.396, 56.101, 19.533, 0.382)
pt3dadd(69.316, 56.011, 19.537, 0.38)
pt3dadd(69.237, 55.921, 19.542, 0.38)
pt3dadd(69.157, 55.831, 19.546, 0.378)
pt3dadd(69.078, 55.742, 19.551, 0.376)
pt3dadd(68.998, 55.652, 19.555, 0.374)
pt3dadd(68.919, 55.562, 19.559, 0.374)
pt3dadd(68.839, 55.473, 19.564, 0.372)
pt3dadd(68.76, 55.383, 19.568, 0.37)
pt3dadd(68.68, 55.293, 19.572, 0.37)
pt3dadd(68.602, 55.202, 19.573, 0.358)
pt3dadd(68.523, 55.111, 19.574, 0.344)
pt3dadd(68.445, 55.02, 19.574, 0.33)
pt3dadd(68.367, 54.93, 19.575, 0.316)
pt3dadd(68.289, 54.839, 19.576, 0.302)
pt3dadd(68.21, 54.747, 19.576, 0.288)
pt3dadd(68.132, 54.657, 19.577, 0.274)
pt3dadd(68.054, 54.566, 19.577, 0.26)
pt3dadd(67.976, 54.475, 19.578, 0.246)
pt3dadd(67.897, 54.384, 19.578, 0.232)
pt3dadd(67.835, 54.281, 19.579, 0.244)
pt3dadd(67.777, 54.177, 19.58, 0.26)
pt3dadd(67.718, 54.072, 19.582, 0.278)
pt3dadd(67.659, 53.967, 19.583, 0.294)
pt3dadd(67.601, 53.863, 19.584, 0.312)
pt3dadd(67.542, 53.758, 19.585, 0.328)
pt3dadd(67.483, 53.653, 19.587, 0.346)
pt3dadd(67.425, 53.549, 19.588, 0.362)
pt3dadd(67.366, 53.444, 19.589, 0.38)
pt3dadd(67.307, 53.339, 19.59, 0.396)
pt3dadd(67.244, 53.237, 19.592, 0.394)
pt3dadd(67.18, 53.136, 19.595, 0.388)
pt3dadd(67.116, 53.035, 19.597, 0.382)
pt3dadd(67.052, 52.933, 19.599, 0.376)
pt3dadd(66.987, 52.832, 19.601, 0.37)
pt3dadd(66.923, 52.73, 19.603, 0.364)
pt3dadd(66.859, 52.629, 19.605, 0.358)
pt3dadd(66.795, 52.528, 19.607, 0.352)
pt3dadd(66.731, 52.426, 19.609, 0.346)
pt3dadd(66.667, 52.325, 19.611, 0.34)
pt3dadd(66.6, 52.226, 19.615, 0.338)
pt3dadd(66.532, 52.127, 19.618, 0.336)
pt3dadd(66.464, 52.028, 19.622, 0.336)
pt3dadd(66.396, 51.929, 19.625, 0.336)
pt3dadd(66.328, 51.83, 19.629, 0.334)
pt3dadd(66.26, 51.732, 19.633, 0.334)
pt3dadd(66.192, 51.633, 19.636, 0.334)
pt3dadd(66.124, 51.534, 19.64, 0.332)
pt3dadd(66.056, 51.435, 19.644, 0.332)
pt3dadd(65.988, 51.336, 19.647, 0.332)
pt3dadd(65.917, 51.24, 19.653, 0.36)
pt3dadd(65.846, 51.143, 19.659, 0.392)
pt3dadd(65.775, 51.047, 19.665, 0.426)
pt3dadd(65.704, 50.95, 19.671, 0.46)
pt3dadd(65.633, 50.854, 19.677, 0.492)
pt3dadd(65.562, 50.757, 19.683, 0.526)
pt3dadd(65.491, 50.661, 19.69, 0.558)
pt3dadd(65.42, 50.564, 19.696, 0.592)
pt3dadd(65.349, 50.468, 19.702, 0.626)
pt3dadd(65.278, 50.372, 19.708, 0.658)
pt3dadd(65.221, 50.267, 19.719, 0.696)
pt3dadd(65.166, 50.161, 19.73, 0.734)
pt3dadd(65.111, 50.056, 19.741, 0.772)
pt3dadd(65.056, 49.95, 19.753, 0.81)
pt3dadd(65.001, 49.844, 19.764, 0.848)
pt3dadd(64.946, 49.738, 19.776, 0.888)
pt3dadd(64.891, 49.632, 19.788, 0.926)
pt3dadd(64.836, 49.526, 19.799, 0.964)
pt3dadd(64.782, 49.421, 19.81, 1.002)
pt3dadd(64.727, 49.315, 19.822, 1.04)
pt3dadd(64.68, 49.216, 19.861, 1.002)
pt3dadd(64.635, 49.118, 19.905, 0.952)
pt3dadd(64.589, 49.02, 19.949, 0.902)
pt3dadd(64.544, 48.923, 19.993, 0.85)
pt3dadd(64.498, 48.825, 20.037, 0.8)
pt3dadd(64.453, 48.727, 20.081, 0.748)
pt3dadd(64.408, 48.63, 20.125, 0.698)
pt3dadd(64.362, 48.532, 20.17, 0.646)
pt3dadd(64.317, 48.434, 20.214, 0.596)
pt3dadd(64.272, 48.337, 20.257, 0.544)
pt3dadd(64.21, 48.24, 20.288, 0.518)
pt3dadd(64.148, 48.144, 20.318, 0.49)
pt3dadd(64.087, 48.047, 20.347, 0.462)
pt3dadd(64.025, 47.951, 20.377, 0.436)
pt3dadd(63.963, 47.854, 20.407, 0.408)
pt3dadd(63.902, 47.758, 20.437, 0.38)
pt3dadd(63.84, 47.661, 20.467, 0.354)
pt3dadd(63.778, 47.565, 20.497, 0.326)
pt3dadd(63.717, 47.468, 20.527, 0.298)
pt3dadd(63.655, 47.371, 20.556, 0.274)
pt3dadd(63.6, 47.267, 20.571, 0.284)
pt3dadd(63.545, 47.162, 20.587, 0.294)
pt3dadd(63.489, 47.057, 20.602, 0.304)
pt3dadd(63.434, 46.952, 20.617, 0.314)
pt3dadd(63.378, 46.847, 20.632, 0.324)
pt3dadd(63.323, 46.742, 20.648, 0.334)
pt3dadd(63.268, 46.637, 20.663, 0.344)
pt3dadd(63.212, 46.532, 20.678, 0.356)
pt3dadd(63.157, 46.428, 20.693, 0.366)
pt3dadd(63.101, 46.323, 20.707, 0.376)
pt3dadd(63.041, 46.219, 20.713, 0.384)
pt3dadd(62.982, 46.115, 20.718, 0.39)
pt3dadd(62.922, 46.011, 20.724, 0.398)
pt3dadd(62.862, 45.907, 20.729, 0.406)
pt3dadd(62.802, 45.804, 20.735, 0.414)
pt3dadd(62.742, 45.7, 20.74, 0.422)
pt3dadd(62.682, 45.596, 20.746, 0.43)
pt3dadd(62.623, 45.492, 20.751, 0.438)
pt3dadd(62.563, 45.388, 20.757, 0.446)
pt3dadd(62.503, 45.285, 20.762, 0.452)
pt3dadd(62.438, 45.184, 20.763, 0.46)
pt3dadd(62.373, 45.083, 20.764, 0.466)
pt3dadd(62.309, 44.982, 20.766, 0.472)
pt3dadd(62.244, 44.88, 20.767, 0.48)
pt3dadd(62.179, 44.779, 20.769, 0.486)
}
}
proc shape3d_194() {
dend_7[72] { pt3dadd(62.115, 44.678, 20.77, 0.492)
pt3dadd(62.05, 44.577, 20.772, 0.5)
pt3dadd(61.985, 44.476, 20.773, 0.506)
pt3dadd(61.92, 44.375, 20.775, 0.512)
pt3dadd(61.856, 44.274, 20.776, 0.522)
pt3dadd(61.79, 44.174, 20.779, 0.554)
pt3dadd(61.723, 44.074, 20.781, 0.586)
pt3dadd(61.657, 43.974, 20.784, 0.618)
pt3dadd(61.591, 43.874, 20.786, 0.65)
pt3dadd(61.525, 43.774, 20.788, 0.682)
pt3dadd(61.459, 43.674, 20.791, 0.714)
pt3dadd(61.393, 43.573, 20.793, 0.746)
pt3dadd(61.327, 43.473, 20.795, 0.778)
pt3dadd(61.261, 43.373, 20.798, 0.81)
pt3dadd(61.197, 43.272, 20.801, 0.834)
pt3dadd(61.149, 43.162, 20.806, 0.798)
pt3dadd(61.101, 43.052, 20.812, 0.762)
pt3dadd(61.053, 42.943, 20.818, 0.726)
pt3dadd(61.005, 42.833, 20.824, 0.69)
pt3dadd(60.957, 42.723, 20.83, 0.652)
pt3dadd(60.909, 42.613, 20.835, 0.616)
pt3dadd(60.861, 42.504, 20.841, 0.58)
pt3dadd(60.813, 42.394, 20.847, 0.544)
pt3dadd(60.765, 42.284, 20.853, 0.508)
pt3dadd(60.72, 42.173, 20.859, 0.472)
pt3dadd(60.688, 42.058, 20.868, 0.448)
pt3dadd(60.657, 41.943, 20.878, 0.422)
pt3dadd(60.625, 41.827, 20.887, 0.398)
pt3dadd(60.594, 41.712, 20.896, 0.372)
pt3dadd(60.562, 41.597, 20.905, 0.346)
pt3dadd(60.531, 41.482, 20.915, 0.322)
pt3dadd(60.499, 41.366, 20.924, 0.296)
pt3dadd(60.468, 41.251, 20.933, 0.272)
pt3dadd(60.436, 41.136, 20.943, 0.246)
pt3dadd(60.408, 41.02, 20.954, 0.228)
pt3dadd(60.39, 40.904, 20.974, 0.234)
pt3dadd(60.371, 40.788, 20.995, 0.24)
pt3dadd(60.353, 40.672, 21.015, 0.244)
pt3dadd(60.335, 40.556, 21.035, 0.25)
pt3dadd(60.316, 40.44, 21.055, 0.256)
pt3dadd(60.298, 40.324, 21.075, 0.262)
pt3dadd(60.28, 40.208, 21.095, 0.268)
pt3dadd(60.262, 40.092, 21.116, 0.274)
pt3dadd(60.243, 39.976, 21.136, 0.28)
pt3dadd(60.226, 39.861, 21.161, 0.29)
pt3dadd(60.212, 39.75, 21.197, 0.304)
pt3dadd(60.198, 39.639, 21.234, 0.32)
pt3dadd(60.184, 39.528, 21.27, 0.336)
pt3dadd(60.171, 39.418, 21.307, 0.352)
pt3dadd(60.157, 39.307, 21.344, 0.368)
pt3dadd(60.143, 39.196, 21.38, 0.384)
pt3dadd(60.129, 39.085, 21.417, 0.4)
pt3dadd(60.115, 38.974, 21.453, 0.416)
pt3dadd(60.101, 38.864, 21.49, 0.432)
pt3dadd(60.078, 38.753, 21.522, 0.436)
pt3dadd(60.036, 38.645, 21.545, 0.42)
pt3dadd(59.993, 38.536, 21.568, 0.402)
pt3dadd(59.951, 38.427, 21.591, 0.384)
pt3dadd(59.908, 38.318, 21.614, 0.368)
pt3dadd(59.866, 38.209, 21.637, 0.35)
pt3dadd(59.824, 38.1, 21.66, 0.332)
pt3dadd(59.781, 37.992, 21.683, 0.314)
pt3dadd(59.739, 37.883, 21.706, 0.298)
pt3dadd(59.697, 37.774, 21.729, 0.28)
pt3dadd(59.658, 37.663, 21.75, 0.272)
pt3dadd(59.628, 37.548, 21.764, 0.282)
pt3dadd(59.598, 37.434, 21.779, 0.292)
pt3dadd(59.568, 37.319, 21.794, 0.302)
pt3dadd(59.538, 37.204, 21.809, 0.31)
pt3dadd(59.508, 37.089, 21.824, 0.32)
pt3dadd(59.478, 36.974, 21.839, 0.332)
pt3dadd(59.448, 36.86, 21.854, 0.342)
pt3dadd(59.418, 36.745, 21.869, 0.35)
pt3dadd(59.388, 36.63, 21.884, 0.36)
pt3dadd(59.364, 36.514, 21.896, 0.366)
pt3dadd(59.349, 36.395, 21.903, 0.364)
pt3dadd(59.334, 36.276, 21.91, 0.362)
pt3dadd(59.318, 36.158, 21.918, 0.36)
pt3dadd(59.303, 36.039, 21.925, 0.358)
pt3dadd(59.288, 35.92, 21.932, 0.356)
pt3dadd(59.273, 35.801, 21.939, 0.354)
pt3dadd(59.258, 35.683, 21.947, 0.352)
pt3dadd(59.243, 35.564, 21.954, 0.35)
pt3dadd(59.228, 35.445, 21.961, 0.348)
pt3dadd(59.219, 35.326, 21.967, 0.344)
pt3dadd(59.22, 35.206, 21.972, 0.34)
pt3dadd(59.22, 35.086, 21.977, 0.334)
pt3dadd(59.22, 34.966, 21.981, 0.33)
pt3dadd(59.221, 34.847, 21.986, 0.324)
pt3dadd(59.221, 34.727, 21.991, 0.32)
pt3dadd(59.222, 34.607, 21.996, 0.316)
pt3dadd(59.222, 34.487, 22, 0.31)
pt3dadd(59.223, 34.367, 22.005, 0.306)
pt3dadd(59.223, 34.247, 22.01, 0.3)
pt3dadd(59.231, 34.128, 22.016, 0.302)
pt3dadd(59.248, 34.01, 22.024, 0.314)
pt3dadd(59.265, 33.891, 22.033, 0.326)
pt3dadd(59.282, 33.773, 22.041, 0.338)
pt3dadd(59.299, 33.654, 22.049, 0.35)
pt3dadd(59.316, 33.536, 22.058, 0.362)
pt3dadd(59.334, 33.418, 22.066, 0.374)
pt3dadd(59.351, 33.3, 22.074, 0.386)
pt3dadd(59.368, 33.181, 22.083, 0.398)
pt3dadd(59.385, 33.063, 22.091, 0.41)
pt3dadd(59.413, 32.947, 22.101, 0.408)
pt3dadd(59.453, 32.835, 22.113, 0.39)
pt3dadd(59.494, 32.723, 22.125, 0.372)
pt3dadd(59.534, 32.611, 22.137, 0.354)
pt3dadd(59.575, 32.499, 22.148, 0.336)
pt3dadd(59.615, 32.387, 22.16, 0.318)
pt3dadd(59.655, 32.275, 22.172, 0.3)
pt3dadd(59.696, 32.163, 22.184, 0.282)
pt3dadd(59.736, 32.051, 22.196, 0.264)
pt3dadd(59.777, 31.939, 22.208, 0.246)
pt3dadd(59.807, 31.828, 22.232, 0.236)
pt3dadd(59.824, 31.718, 22.27, 0.234)
pt3dadd(59.842, 31.608, 22.308, 0.234)
pt3dadd(59.859, 31.499, 22.346, 0.232)
pt3dadd(59.877, 31.389, 22.383, 0.232)
pt3dadd(59.895, 31.28, 22.421, 0.23)
pt3dadd(59.912, 31.17, 22.459, 0.23)
pt3dadd(59.93, 31.06, 22.497, 0.228)
pt3dadd(59.947, 30.951, 22.535, 0.228)
pt3dadd(59.965, 30.841, 22.573, 0.226)
pt3dadd(59.973, 30.729, 22.608, 0.24)
pt3dadd(59.972, 30.616, 22.64, 0.266)
pt3dadd(59.97, 30.502, 22.673, 0.292)
pt3dadd(59.969, 30.389, 22.705, 0.32)
pt3dadd(59.968, 30.275, 22.738, 0.346)
pt3dadd(59.966, 30.162, 22.77, 0.372)
pt3dadd(59.965, 30.048, 22.802, 0.4)
pt3dadd(59.964, 29.935, 22.835, 0.426)
pt3dadd(59.962, 29.821, 22.867, 0.452)
pt3dadd(59.961, 29.708, 22.899, 0.478)
pt3dadd(59.94, 29.596, 22.928, 0.49)
pt3dadd(59.904, 29.486, 22.953, 0.49)
pt3dadd(59.867, 29.375, 22.978, 0.49)
pt3dadd(59.831, 29.265, 23.004, 0.49)
pt3dadd(59.794, 29.155, 23.029, 0.49)
pt3dadd(59.758, 29.045, 23.054, 0.49)
pt3dadd(59.721, 28.935, 23.08, 0.49)
pt3dadd(59.685, 28.824, 23.105, 0.49)
pt3dadd(59.648, 28.714, 23.13, 0.49)
pt3dadd(59.612, 28.604, 23.155, 0.49)
pt3dadd(59.552, 28.503, 23.176, 0.474)
pt3dadd(59.487, 28.405, 23.195, 0.452)
pt3dadd(59.422, 28.307, 23.214, 0.43)
pt3dadd(59.357, 28.209, 23.233, 0.41)
pt3dadd(59.292, 28.11, 23.252, 0.388)
pt3dadd(59.227, 28.012, 23.271, 0.366)
pt3dadd(59.162, 27.914, 23.29, 0.346)
pt3dadd(59.097, 27.816, 23.309, 0.324)
pt3dadd(59.032, 27.717, 23.328, 0.302)
pt3dadd(58.967, 27.619, 23.347, 0.282)
pt3dadd(58.892, 27.529, 23.367, 0.292)
pt3dadd(58.815, 27.44, 23.386, 0.308)
pt3dadd(58.738, 27.35, 23.405, 0.324)
pt3dadd(58.662, 27.261, 23.425, 0.34)
pt3dadd(58.585, 27.172, 23.444, 0.356)
pt3dadd(58.508, 27.083, 23.463, 0.372)
pt3dadd(58.431, 26.994, 23.483, 0.388)
pt3dadd(58.354, 26.905, 23.502, 0.404)
pt3dadd(58.277, 26.816, 23.522, 0.42)
pt3dadd(58.2, 26.726, 23.541, 0.436)
pt3dadd(58.142, 26.668, 23.614, 0.414)
pt3dadd(58.084, 26.61, 23.687, 0.394)
pt3dadd(58.026, 26.552, 23.759, 0.372)
pt3dadd(57.967, 26.493, 23.832, 0.352)
pt3dadd(57.909, 26.435, 23.905, 0.33)
pt3dadd(57.851, 26.377, 23.978, 0.31)
pt3dadd(57.793, 26.319, 24.05, 0.288)
pt3dadd(57.734, 26.261, 24.123, 0.268)
pt3dadd(57.676, 26.202, 24.196, 0.248)
pt3dadd(57.618, 26.144, 24.269, 0.226)
}
dend_7[73] {pt3dclear()
pt3dadd(92.94, 78.766, 13.714, 1.13)
pt3dadd(92.938, 78.739, 13.634, 1.13)
pt3dadd(92.935, 78.708, 13.538, 1.13)
pt3dadd(92.932, 78.676, 13.441, 1.13)
pt3dadd(92.925, 78.643, 13.346, 1.128)
pt3dadd(92.916, 78.61, 13.25, 1.126)
pt3dadd(92.907, 78.577, 13.154, 1.124)
pt3dadd(92.899, 78.544, 13.058, 1.122)
pt3dadd(92.89, 78.511, 12.962, 1.12)
pt3dadd(92.881, 78.478, 12.866, 1.118)
pt3dadd(92.873, 78.444, 12.77, 1.116)
pt3dadd(92.864, 78.411, 12.675, 1.114)
pt3dadd(92.855, 78.378, 12.579, 1.112)
pt3dadd(92.835, 78.345, 12.491, 1.104)
pt3dadd(92.723, 78.313, 12.465, 1.064)
pt3dadd(92.612, 78.28, 12.44, 1.024)
pt3dadd(92.501, 78.247, 12.414, 0.982)
pt3dadd(92.39, 78.214, 12.388, 0.942)
pt3dadd(92.278, 78.182, 12.362, 0.9)
pt3dadd(92.167, 78.149, 12.337, 0.86)
pt3dadd(92.056, 78.116, 12.311, 0.818)
pt3dadd(91.945, 78.083, 12.285, 0.778)
pt3dadd(91.833, 78.051, 12.26, 0.736)
pt3dadd(91.726, 78.014, 12.231, 0.7)
pt3dadd(91.644, 77.95, 12.18, 0.696)
pt3dadd(91.563, 77.886, 12.13, 0.69)
}
}
proc shape3d_195() {
dend_7[73] { pt3dadd(91.481, 77.823, 12.079, 0.686)
pt3dadd(91.4, 77.759, 12.029, 0.68)
pt3dadd(91.318, 77.695, 11.978, 0.676)
pt3dadd(91.237, 77.631, 11.927, 0.672)
pt3dadd(91.155, 77.567, 11.877, 0.666)
pt3dadd(91.074, 77.503, 11.826, 0.662)
pt3dadd(90.993, 77.439, 11.775, 0.658)
pt3dadd(90.905, 77.381, 11.73, 0.646)
pt3dadd(90.797, 77.341, 11.701, 0.604)
pt3dadd(90.69, 77.301, 11.673, 0.564)
pt3dadd(90.582, 77.261, 11.645, 0.524)
pt3dadd(90.474, 77.221, 11.617, 0.484)
pt3dadd(90.366, 77.181, 11.589, 0.444)
pt3dadd(90.258, 77.141, 11.56, 0.404)
pt3dadd(90.15, 77.101, 11.532, 0.364)
pt3dadd(90.042, 77.062, 11.504, 0.324)
pt3dadd(89.934, 77.022, 11.476, 0.284)
pt3dadd(89.824, 76.985, 11.451, 0.262)
pt3dadd(89.708, 76.958, 11.439, 0.304)
pt3dadd(89.592, 76.932, 11.427, 0.346)
pt3dadd(89.475, 76.905, 11.414, 0.388)
pt3dadd(89.359, 76.879, 11.402, 0.43)
pt3dadd(89.243, 76.852, 11.39, 0.472)
pt3dadd(89.127, 76.826, 11.378, 0.514)
pt3dadd(89.011, 76.799, 11.366, 0.554)
pt3dadd(88.895, 76.773, 11.354, 0.596)
pt3dadd(88.779, 76.746, 11.342, 0.638)
pt3dadd(88.662, 76.721, 11.332, 0.662)
pt3dadd(88.544, 76.702, 11.332, 0.626)
pt3dadd(88.425, 76.682, 11.332, 0.59)
pt3dadd(88.307, 76.663, 11.332, 0.552)
pt3dadd(88.188, 76.643, 11.332, 0.516)
pt3dadd(88.07, 76.624, 11.331, 0.48)
pt3dadd(87.951, 76.604, 11.331, 0.442)
pt3dadd(87.833, 76.585, 11.331, 0.406)
pt3dadd(87.715, 76.566, 11.33, 0.37)
pt3dadd(87.596, 76.546, 11.33, 0.334)
pt3dadd(87.48, 76.52, 11.33, 0.306)
pt3dadd(87.369, 76.473, 11.33, 0.312)
pt3dadd(87.259, 76.425, 11.33, 0.318)
pt3dadd(87.149, 76.378, 11.33, 0.324)
pt3dadd(87.039, 76.331, 11.33, 0.33)
pt3dadd(86.929, 76.283, 11.33, 0.334)
pt3dadd(86.818, 76.236, 11.33, 0.34)
pt3dadd(86.708, 76.188, 11.33, 0.346)
pt3dadd(86.598, 76.141, 11.33, 0.352)
pt3dadd(86.488, 76.093, 11.33, 0.358)
pt3dadd(86.378, 76.044, 11.33, 0.362)
pt3dadd(86.27, 75.992, 11.33, 0.362)
pt3dadd(86.162, 75.94, 11.329, 0.364)
pt3dadd(86.054, 75.888, 11.329, 0.364)
pt3dadd(85.946, 75.836, 11.329, 0.364)
pt3dadd(85.838, 75.784, 11.329, 0.366)
pt3dadd(85.729, 75.732, 11.329, 0.366)
pt3dadd(85.621, 75.68, 11.329, 0.368)
pt3dadd(85.513, 75.628, 11.329, 0.368)
pt3dadd(85.405, 75.576, 11.329, 0.368)
pt3dadd(85.297, 75.524, 11.329, 0.368)
pt3dadd(85.189, 75.471, 11.329, 0.362)
pt3dadd(85.081, 75.418, 11.328, 0.356)
pt3dadd(84.974, 75.366, 11.328, 0.35)
pt3dadd(84.866, 75.313, 11.328, 0.346)
pt3dadd(84.758, 75.26, 11.328, 0.34)
pt3dadd(84.65, 75.208, 11.328, 0.334)
pt3dadd(84.542, 75.155, 11.328, 0.33)
pt3dadd(84.435, 75.102, 11.328, 0.324)
pt3dadd(84.327, 75.05, 11.327, 0.318)
pt3dadd(84.221, 74.992, 11.327, 0.33)
pt3dadd(84.122, 74.926, 11.327, 0.378)
pt3dadd(84.022, 74.859, 11.327, 0.426)
pt3dadd(83.922, 74.793, 11.326, 0.474)
pt3dadd(83.822, 74.726, 11.326, 0.522)
pt3dadd(83.722, 74.659, 11.326, 0.57)
pt3dadd(83.622, 74.593, 11.326, 0.62)
pt3dadd(83.523, 74.526, 11.325, 0.668)
pt3dadd(83.423, 74.46, 11.325, 0.716)
pt3dadd(83.323, 74.393, 11.325, 0.764)
pt3dadd(83.224, 74.325, 11.325, 0.792)
pt3dadd(83.127, 74.255, 11.324, 0.778)
pt3dadd(83.03, 74.184, 11.324, 0.764)
pt3dadd(82.932, 74.114, 11.323, 0.752)
pt3dadd(82.835, 74.044, 11.323, 0.738)
pt3dadd(82.738, 73.973, 11.322, 0.726)
pt3dadd(82.641, 73.903, 11.322, 0.712)
pt3dadd(82.544, 73.833, 11.321, 0.698)
pt3dadd(82.447, 73.762, 11.321, 0.686)
pt3dadd(82.349, 73.692, 11.321, 0.672)
pt3dadd(82.251, 73.623, 11.32, 0.66)
pt3dadd(82.151, 73.556, 11.319, 0.65)
pt3dadd(82.052, 73.49, 11.318, 0.64)
pt3dadd(81.952, 73.423, 11.318, 0.63)
pt3dadd(81.852, 73.357, 11.317, 0.62)
pt3dadd(81.752, 73.29, 11.316, 0.61)
pt3dadd(81.652, 73.224, 11.315, 0.6)
pt3dadd(81.552, 73.157, 11.315, 0.59)
pt3dadd(81.452, 73.091, 11.314, 0.58)
pt3dadd(81.352, 73.024, 11.313, 0.57)
pt3dadd(81.25, 72.962, 11.312, 0.574)
pt3dadd(81.144, 72.906, 11.311, 0.608)
pt3dadd(81.037, 72.851, 11.309, 0.642)
pt3dadd(80.931, 72.795, 11.308, 0.676)
pt3dadd(80.824, 72.74, 11.307, 0.71)
pt3dadd(80.718, 72.684, 11.306, 0.744)
pt3dadd(80.612, 72.629, 11.304, 0.776)
pt3dadd(80.505, 72.573, 11.303, 0.81)
pt3dadd(80.399, 72.518, 11.302, 0.844)
pt3dadd(80.292, 72.462, 11.3, 0.878)
pt3dadd(80.188, 72.404, 11.299, 0.886)
pt3dadd(80.086, 72.341, 11.296, 0.854)
pt3dadd(79.984, 72.278, 11.294, 0.82)
pt3dadd(79.882, 72.215, 11.291, 0.786)
pt3dadd(79.78, 72.151, 11.289, 0.752)
pt3dadd(79.678, 72.088, 11.286, 0.718)
pt3dadd(79.576, 72.025, 11.284, 0.686)
pt3dadd(79.474, 71.962, 11.281, 0.652)
pt3dadd(79.372, 71.898, 11.279, 0.618)
pt3dadd(79.27, 71.835, 11.276, 0.584)
pt3dadd(79.166, 71.776, 11.273, 0.564)
pt3dadd(79.059, 71.723, 11.267, 0.564)
pt3dadd(78.951, 71.67, 11.262, 0.566)
pt3dadd(78.844, 71.617, 11.256, 0.568)
pt3dadd(78.736, 71.563, 11.251, 0.57)
pt3dadd(78.629, 71.51, 11.245, 0.572)
pt3dadd(78.522, 71.457, 11.24, 0.574)
pt3dadd(78.414, 71.404, 11.234, 0.574)
pt3dadd(78.307, 71.351, 11.229, 0.576)
pt3dadd(78.199, 71.298, 11.223, 0.578)
pt3dadd(78.093, 71.243, 11.216, 0.586)
pt3dadd(77.988, 71.186, 11.207, 0.606)
pt3dadd(77.884, 71.128, 11.198, 0.624)
pt3dadd(77.779, 71.07, 11.19, 0.642)
pt3dadd(77.674, 71.012, 11.181, 0.66)
pt3dadd(77.57, 70.954, 11.172, 0.68)
pt3dadd(77.465, 70.896, 11.163, 0.698)
pt3dadd(77.361, 70.839, 11.154, 0.716)
pt3dadd(77.256, 70.781, 11.145, 0.736)
pt3dadd(77.151, 70.723, 11.136, 0.754)
pt3dadd(77.05, 70.661, 11.123, 0.77)
pt3dadd(76.954, 70.594, 11.103, 0.784)
pt3dadd(76.857, 70.526, 11.084, 0.798)
pt3dadd(76.761, 70.459, 11.065, 0.812)
pt3dadd(76.664, 70.392, 11.045, 0.828)
pt3dadd(76.568, 70.324, 11.026, 0.842)
pt3dadd(76.471, 70.257, 11.007, 0.856)
pt3dadd(76.374, 70.19, 10.987, 0.87)
pt3dadd(76.278, 70.122, 10.968, 0.884)
pt3dadd(76.181, 70.055, 10.948, 0.898)
pt3dadd(76.091, 69.989, 10.915, 0.906)
pt3dadd(76.004, 69.923, 10.872, 0.912)
pt3dadd(75.918, 69.858, 10.829, 0.916)
pt3dadd(75.832, 69.792, 10.786, 0.922)
pt3dadd(75.745, 69.727, 10.743, 0.926)
pt3dadd(75.659, 69.662, 10.7, 0.932)
pt3dadd(75.573, 69.596, 10.657, 0.936)
pt3dadd(75.486, 69.531, 10.614, 0.942)
pt3dadd(75.4, 69.465, 10.571, 0.946)
pt3dadd(75.314, 69.4, 10.528, 0.95)
pt3dadd(75.226, 69.328, 10.497, 0.962)
pt3dadd(75.138, 69.252, 10.473, 0.98)
pt3dadd(75.049, 69.177, 10.449, 0.996)
pt3dadd(74.96, 69.101, 10.425, 1.012)
pt3dadd(74.872, 69.025, 10.401, 1.028)
pt3dadd(74.783, 68.949, 10.377, 1.044)
pt3dadd(74.695, 68.874, 10.354, 1.06)
pt3dadd(74.606, 68.798, 10.33, 1.076)
pt3dadd(74.517, 68.722, 10.306, 1.092)
pt3dadd(74.429, 68.647, 10.282, 1.108)
pt3dadd(74.331, 68.58, 10.266, 1.1)
pt3dadd(74.229, 68.519, 10.254, 1.08)
pt3dadd(74.127, 68.458, 10.242, 1.06)
pt3dadd(74.025, 68.396, 10.231, 1.04)
pt3dadd(73.923, 68.335, 10.219, 1.02)
pt3dadd(73.821, 68.274, 10.207, 0.998)
pt3dadd(73.718, 68.212, 10.195, 0.978)
pt3dadd(73.616, 68.151, 10.183, 0.958)
pt3dadd(73.514, 68.09, 10.172, 0.938)
pt3dadd(73.412, 68.028, 10.16, 0.918)
pt3dadd(73.317, 67.956, 10.155, 0.89)
pt3dadd(73.226, 67.878, 10.155, 0.856)
pt3dadd(73.135, 67.8, 10.154, 0.824)
pt3dadd(73.044, 67.722, 10.153, 0.79)
pt3dadd(72.952, 67.644, 10.153, 0.758)
pt3dadd(72.861, 67.566, 10.152, 0.724)
pt3dadd(72.77, 67.488, 10.151, 0.692)
pt3dadd(72.679, 67.41, 10.15, 0.658)
pt3dadd(72.588, 67.332, 10.15, 0.624)
pt3dadd(72.496, 67.254, 10.149, 0.592)
pt3dadd(72.416, 67.166, 10.149, 0.588)
pt3dadd(72.34, 67.072, 10.148, 0.598)
pt3dadd(72.265, 66.979, 10.148, 0.608)
pt3dadd(72.189, 66.886, 10.147, 0.616)
pt3dadd(72.114, 66.792, 10.147, 0.626)
pt3dadd(72.039, 66.699, 10.146, 0.636)
pt3dadd(71.963, 66.606, 10.146, 0.646)
pt3dadd(71.888, 66.512, 10.145, 0.656)
pt3dadd(71.812, 66.419, 10.145, 0.666)
pt3dadd(71.737, 66.326, 10.144, 0.676)
pt3dadd(71.669, 66.227, 10.144, 0.686)
pt3dadd(71.603, 66.126, 10.143, 0.696)
pt3dadd(71.538, 66.026, 10.142, 0.706)
}
}
proc shape3d_196() {
dend_7[73] { pt3dadd(71.472, 65.926, 10.141, 0.716)
pt3dadd(71.406, 65.825, 10.14, 0.726)
pt3dadd(71.34, 65.725, 10.139, 0.736)
pt3dadd(71.275, 65.624, 10.139, 0.748)
pt3dadd(71.209, 65.524, 10.138, 0.758)
pt3dadd(71.143, 65.424, 10.137, 0.768)
pt3dadd(71.078, 65.323, 10.136, 0.778)
pt3dadd(71.011, 65.224, 10.135, 0.756)
pt3dadd(70.943, 65.124, 10.134, 0.722)
pt3dadd(70.876, 65.025, 10.132, 0.69)
pt3dadd(70.809, 64.926, 10.131, 0.658)
pt3dadd(70.741, 64.826, 10.13, 0.626)
pt3dadd(70.674, 64.727, 10.129, 0.594)
pt3dadd(70.606, 64.628, 10.128, 0.562)
pt3dadd(70.539, 64.529, 10.127, 0.53)
pt3dadd(70.472, 64.429, 10.125, 0.496)
pt3dadd(70.404, 64.33, 10.124, 0.464)
pt3dadd(70.332, 64.234, 10.122, 0.444)
pt3dadd(70.26, 64.139, 10.12, 0.428)
pt3dadd(70.187, 64.043, 10.117, 0.414)
pt3dadd(70.114, 63.948, 10.115, 0.398)
pt3dadd(70.041, 63.853, 10.113, 0.382)
pt3dadd(69.968, 63.758, 10.11, 0.364)
pt3dadd(69.895, 63.662, 10.108, 0.35)
pt3dadd(69.822, 63.567, 10.106, 0.334)
pt3dadd(69.749, 63.472, 10.103, 0.318)
pt3dadd(69.676, 63.377, 10.101, 0.302)
pt3dadd(69.609, 63.278, 10.097, 0.292)
pt3dadd(69.543, 63.177, 10.092, 0.284)
pt3dadd(69.477, 63.077, 10.087, 0.278)
pt3dadd(69.411, 62.977, 10.083, 0.27)
pt3dadd(69.345, 62.877, 10.078, 0.264)
pt3dadd(69.28, 62.777, 10.073, 0.256)
pt3dadd(69.214, 62.676, 10.068, 0.25)
pt3dadd(69.148, 62.576, 10.064, 0.242)
pt3dadd(69.082, 62.476, 10.059, 0.234)
pt3dadd(69.016, 62.376, 10.054, 0.228)
pt3dadd(68.953, 62.274, 10.047, 0.238)
pt3dadd(68.891, 62.172, 10.039, 0.254)
pt3dadd(68.828, 62.07, 10.031, 0.268)
pt3dadd(68.765, 61.968, 10.024, 0.284)
pt3dadd(68.703, 61.867, 10.016, 0.3)
pt3dadd(68.64, 61.765, 10.008, 0.314)
pt3dadd(68.577, 61.663, 10, 0.33)
pt3dadd(68.515, 61.561, 9.992, 0.346)
pt3dadd(68.452, 61.459, 9.984, 0.36)
pt3dadd(68.39, 61.357, 9.976, 0.376)
pt3dadd(68.321, 61.259, 9.966, 0.422)
pt3dadd(68.251, 61.163, 9.955, 0.474)
pt3dadd(68.181, 61.067, 9.943, 0.528)
pt3dadd(68.11, 60.97, 9.932, 0.58)
pt3dadd(68.04, 60.874, 9.921, 0.632)
pt3dadd(67.97, 60.777, 9.91, 0.686)
pt3dadd(67.9, 60.681, 9.899, 0.738)
pt3dadd(67.83, 60.584, 9.888, 0.79)
pt3dadd(67.76, 60.488, 9.877, 0.844)
pt3dadd(67.69, 60.391, 9.865, 0.896)
pt3dadd(67.621, 60.307, 9.825, 0.924)
pt3dadd(67.553, 60.226, 9.778, 0.946)
pt3dadd(67.485, 60.145, 9.731, 0.968)
pt3dadd(67.417, 60.064, 9.684, 0.992)
pt3dadd(67.348, 59.983, 9.637, 1.014)
pt3dadd(67.28, 59.902, 9.591, 1.036)
pt3dadd(67.212, 59.821, 9.544, 1.058)
pt3dadd(67.144, 59.739, 9.497, 1.08)
pt3dadd(67.076, 59.658, 9.45, 1.102)
pt3dadd(67.008, 59.577, 9.403, 1.126)
pt3dadd(66.926, 59.497, 9.375, 1.072)
pt3dadd(66.842, 59.416, 9.351, 1)
pt3dadd(66.757, 59.336, 9.327, 0.928)
pt3dadd(66.673, 59.256, 9.303, 0.856)
pt3dadd(66.588, 59.176, 9.28, 0.784)
pt3dadd(66.504, 59.095, 9.256, 0.714)
pt3dadd(66.419, 59.015, 9.232, 0.642)
pt3dadd(66.335, 58.935, 9.208, 0.57)
pt3dadd(66.25, 58.854, 9.184, 0.498)
pt3dadd(66.166, 58.774, 9.161, 0.426)
pt3dadd(66.078, 58.694, 9.145, 0.398)
pt3dadd(65.991, 58.614, 9.131, 0.38)
pt3dadd(65.903, 58.534, 9.117, 0.36)
pt3dadd(65.815, 58.454, 9.103, 0.342)
pt3dadd(65.727, 58.374, 9.089, 0.322)
pt3dadd(65.639, 58.294, 9.075, 0.304)
pt3dadd(65.552, 58.214, 9.061, 0.286)
pt3dadd(65.464, 58.134, 9.047, 0.266)
pt3dadd(65.376, 58.054, 9.033, 0.248)
pt3dadd(65.288, 57.974, 9.019, 0.23)
pt3dadd(65.199, 57.895, 9.01, 0.226)
pt3dadd(65.109, 57.816, 9.003, 0.226)
pt3dadd(65.019, 57.736, 8.995, 0.226)
pt3dadd(64.929, 57.657, 8.987, 0.226)
pt3dadd(64.839, 57.578, 8.979, 0.226)
pt3dadd(64.75, 57.499, 8.971, 0.226)
pt3dadd(64.66, 57.42, 8.964, 0.226)
pt3dadd(64.57, 57.341, 8.956, 0.226)
pt3dadd(64.48, 57.262, 8.948, 0.226)
pt3dadd(64.391, 57.183, 8.94, 0.226)
pt3dadd(64.299, 57.105, 8.937, 0.226)
pt3dadd(64.208, 57.028, 8.935, 0.226)
pt3dadd(64.116, 56.95, 8.932, 0.226)
pt3dadd(64.024, 56.873, 8.93, 0.226)
pt3dadd(63.933, 56.796, 8.928, 0.226)
pt3dadd(63.841, 56.718, 8.925, 0.226)
pt3dadd(63.749, 56.641, 8.923, 0.226)
pt3dadd(63.658, 56.563, 8.921, 0.226)
pt3dadd(63.566, 56.486, 8.919, 0.226)
pt3dadd(63.474, 56.409, 8.916, 0.226)
pt3dadd(63.372, 56.346, 8.911, 0.226)
pt3dadd(63.268, 56.287, 8.906, 0.226)
pt3dadd(63.164, 56.228, 8.9, 0.226)
pt3dadd(63.06, 56.168, 8.894, 0.226)
pt3dadd(62.956, 56.109, 8.889, 0.226)
pt3dadd(62.852, 56.05, 8.883, 0.226)
pt3dadd(62.748, 55.99, 8.877, 0.226)
pt3dadd(62.644, 55.931, 8.872, 0.226)
pt3dadd(62.54, 55.872, 8.866, 0.226)
pt3dadd(62.435, 55.813, 8.86, 0.226)
pt3dadd(62.33, 55.755, 8.852, 0.226)
pt3dadd(62.225, 55.698, 8.844, 0.226)
pt3dadd(62.12, 55.641, 8.835, 0.226)
pt3dadd(62.015, 55.585, 8.827, 0.226)
pt3dadd(61.91, 55.528, 8.818, 0.226)
pt3dadd(61.805, 55.471, 8.81, 0.226)
pt3dadd(61.7, 55.414, 8.802, 0.226)
pt3dadd(61.594, 55.357, 8.793, 0.226)
pt3dadd(61.489, 55.3, 8.785, 0.226)
pt3dadd(61.384, 55.243, 8.776, 0.226)
pt3dadd(61.28, 55.184, 8.764, 0.226)
pt3dadd(61.177, 55.126, 8.751, 0.226)
pt3dadd(61.073, 55.067, 8.738, 0.226)
pt3dadd(60.97, 55.009, 8.725, 0.226)
pt3dadd(60.866, 54.95, 8.712, 0.226)
pt3dadd(60.763, 54.892, 8.698, 0.226)
pt3dadd(60.659, 54.833, 8.686, 0.226)
pt3dadd(60.555, 54.774, 8.672, 0.226)
pt3dadd(60.452, 54.716, 8.659, 0.226)
pt3dadd(60.348, 54.657, 8.646, 0.226)
pt3dadd(60.244, 54.617, 8.611, 0.226)
pt3dadd(60.139, 54.578, 8.575, 0.226)
pt3dadd(60.034, 54.539, 8.539, 0.226)
pt3dadd(59.929, 54.5, 8.503, 0.226)
pt3dadd(59.825, 54.461, 8.466, 0.226)
pt3dadd(59.72, 54.422, 8.43, 0.226)
pt3dadd(59.615, 54.383, 8.394, 0.226)
pt3dadd(59.51, 54.344, 8.357, 0.226)
pt3dadd(59.406, 54.305, 8.321, 0.226)
pt3dadd(59.301, 54.266, 8.285, 0.226)
pt3dadd(59.197, 54.215, 8.257, 0.238)
pt3dadd(59.093, 54.164, 8.23, 0.25)
pt3dadd(58.989, 54.114, 8.203, 0.262)
pt3dadd(58.886, 54.063, 8.176, 0.276)
pt3dadd(58.782, 54.012, 8.149, 0.288)
pt3dadd(58.678, 53.961, 8.122, 0.3)
pt3dadd(58.575, 53.91, 8.095, 0.312)
pt3dadd(58.471, 53.859, 8.069, 0.324)
pt3dadd(58.367, 53.808, 8.042, 0.338)
pt3dadd(58.263, 53.757, 8.015, 0.35)
pt3dadd(58.156, 53.71, 7.993, 0.366)
pt3dadd(58.048, 53.664, 7.972, 0.384)
pt3dadd(57.941, 53.617, 7.95, 0.402)
pt3dadd(57.833, 53.571, 7.929, 0.418)
pt3dadd(57.726, 53.524, 7.907, 0.436)
pt3dadd(57.618, 53.478, 7.886, 0.454)
pt3dadd(57.51, 53.431, 7.865, 0.47)
pt3dadd(57.403, 53.385, 7.843, 0.488)
pt3dadd(57.295, 53.338, 7.822, 0.504)
pt3dadd(57.188, 53.292, 7.8, 0.522)
pt3dadd(57.074, 53.26, 7.784, 0.538)
pt3dadd(56.959, 53.229, 7.767, 0.554)
pt3dadd(56.845, 53.197, 7.751, 0.57)
pt3dadd(56.731, 53.166, 7.734, 0.584)
pt3dadd(56.617, 53.135, 7.717, 0.6)
pt3dadd(56.503, 53.103, 7.701, 0.616)
pt3dadd(56.389, 53.072, 7.684, 0.632)
pt3dadd(56.275, 53.04, 7.668, 0.648)
pt3dadd(56.161, 53.009, 7.651, 0.662)
pt3dadd(56.047, 52.978, 7.635, 0.678)
pt3dadd(55.93, 52.954, 7.623, 0.678)
pt3dadd(55.813, 52.929, 7.611, 0.678)
pt3dadd(55.697, 52.905, 7.599, 0.678)
pt3dadd(55.58, 52.881, 7.588, 0.678)
pt3dadd(55.463, 52.857, 7.576, 0.678)
pt3dadd(55.346, 52.833, 7.564, 0.678)
pt3dadd(55.23, 52.809, 7.552, 0.678)
pt3dadd(55.113, 52.785, 7.541, 0.678)
pt3dadd(54.996, 52.761, 7.529, 0.678)
pt3dadd(54.88, 52.737, 7.516, 0.676)
pt3dadd(54.77, 52.718, 7.479, 0.642)
pt3dadd(54.66, 52.699, 7.443, 0.608)
pt3dadd(54.55, 52.681, 7.406, 0.574)
pt3dadd(54.44, 52.662, 7.369, 0.54)
pt3dadd(54.33, 52.643, 7.332, 0.506)
pt3dadd(54.22, 52.625, 7.296, 0.472)
pt3dadd(54.11, 52.606, 7.259, 0.438)
pt3dadd(54, 52.587, 7.222, 0.404)
pt3dadd(53.89, 52.568, 7.186, 0.37)
pt3dadd(53.78, 52.548, 7.149, 0.336)
pt3dadd(53.674, 52.504, 7.121, 0.326)
pt3dadd(53.567, 52.46, 7.092, 0.314)
pt3dadd(53.461, 52.416, 7.064, 0.304)
}
}
proc shape3d_197() {
dend_7[73] { pt3dadd(53.355, 52.371, 7.035, 0.292)
pt3dadd(53.249, 52.327, 7.007, 0.28)
pt3dadd(53.143, 52.283, 6.979, 0.27)
pt3dadd(53.037, 52.238, 6.95, 0.258)
pt3dadd(52.93, 52.194, 6.922, 0.246)
pt3dadd(52.824, 52.15, 6.893, 0.236)
pt3dadd(52.718, 52.104, 6.866, 0.228)
pt3dadd(52.614, 52.049, 6.846, 0.234)
pt3dadd(52.51, 51.994, 6.826, 0.242)
pt3dadd(52.406, 51.939, 6.807, 0.25)
pt3dadd(52.302, 51.884, 6.787, 0.256)
pt3dadd(52.199, 51.829, 6.767, 0.264)
pt3dadd(52.095, 51.774, 6.747, 0.272)
pt3dadd(51.991, 51.719, 6.727, 0.278)
pt3dadd(51.887, 51.664, 6.707, 0.286)
pt3dadd(51.783, 51.609, 6.687, 0.294)
pt3dadd(51.679, 51.553, 6.668, 0.302)
pt3dadd(51.576, 51.494, 6.656, 0.314)
pt3dadd(51.473, 51.435, 6.643, 0.324)
pt3dadd(51.369, 51.375, 6.63, 0.336)
pt3dadd(51.266, 51.316, 6.618, 0.348)
pt3dadd(51.163, 51.256, 6.605, 0.36)
pt3dadd(51.06, 51.197, 6.592, 0.372)
pt3dadd(50.957, 51.137, 6.579, 0.382)
pt3dadd(50.854, 51.078, 6.567, 0.394)
pt3dadd(50.751, 51.018, 6.554, 0.406)
pt3dadd(50.651, 50.955, 6.543, 0.41)
pt3dadd(50.56, 50.876, 6.536, 0.392)
pt3dadd(50.469, 50.798, 6.529, 0.374)
pt3dadd(50.379, 50.72, 6.521, 0.356)
pt3dadd(50.288, 50.642, 6.514, 0.336)
pt3dadd(50.197, 50.563, 6.507, 0.318)
pt3dadd(50.107, 50.485, 6.5, 0.3)
pt3dadd(50.016, 50.407, 6.493, 0.282)
pt3dadd(49.926, 50.329, 6.486, 0.264)
pt3dadd(49.835, 50.251, 6.479, 0.244)
pt3dadd(49.752, 50.166, 6.47, 0.246)
pt3dadd(49.695, 50.062, 6.456, 0.31)
pt3dadd(49.637, 49.958, 6.442, 0.374)
pt3dadd(49.58, 49.854, 6.428, 0.438)
pt3dadd(49.522, 49.75, 6.414, 0.502)
pt3dadd(49.465, 49.646, 6.4, 0.566)
pt3dadd(49.407, 49.542, 6.386, 0.63)
pt3dadd(49.35, 49.438, 6.372, 0.694)
pt3dadd(49.292, 49.334, 6.358, 0.758)
pt3dadd(49.235, 49.23, 6.344, 0.822)
pt3dadd(49.182, 49.129, 6.321, 0.876)
pt3dadd(49.143, 49.034, 6.268, 0.898)
pt3dadd(49.104, 48.94, 6.216, 0.922)
pt3dadd(49.065, 48.846, 6.163, 0.944)
pt3dadd(49.027, 48.751, 6.111, 0.966)
pt3dadd(48.988, 48.657, 6.058, 0.988)
pt3dadd(48.949, 48.562, 6.005, 1.012)
pt3dadd(48.91, 48.468, 5.953, 1.034)
pt3dadd(48.871, 48.373, 5.9, 1.056)
pt3dadd(48.833, 48.279, 5.848, 1.078)
pt3dadd(48.793, 48.181, 5.801, 1.082)
pt3dadd(48.75, 48.076, 5.768, 1.04)
pt3dadd(48.708, 47.972, 5.735, 0.998)
pt3dadd(48.665, 47.867, 5.702, 0.956)
pt3dadd(48.623, 47.762, 5.668, 0.914)
pt3dadd(48.58, 47.657, 5.635, 0.872)
pt3dadd(48.538, 47.552, 5.602, 0.828)
pt3dadd(48.495, 47.447, 5.569, 0.786)
pt3dadd(48.453, 47.342, 5.536, 0.744)
pt3dadd(48.41, 47.237, 5.502, 0.702)
pt3dadd(48.354, 47.138, 5.475, 0.678)
pt3dadd(48.279, 47.048, 5.456, 0.678)
pt3dadd(48.203, 46.957, 5.438, 0.678)
pt3dadd(48.128, 46.867, 5.419, 0.678)
pt3dadd(48.052, 46.776, 5.401, 0.678)
pt3dadd(47.976, 46.686, 5.382, 0.678)
pt3dadd(47.901, 46.595, 5.363, 0.678)
pt3dadd(47.825, 46.505, 5.345, 0.678)
pt3dadd(47.75, 46.414, 5.326, 0.678)
pt3dadd(47.674, 46.324, 5.307, 0.678)
pt3dadd(47.593, 46.238, 5.292, 0.684)
pt3dadd(47.503, 46.16, 5.28, 0.7)
pt3dadd(47.413, 46.081, 5.269, 0.716)
pt3dadd(47.323, 46.003, 5.257, 0.732)
pt3dadd(47.233, 45.925, 5.245, 0.748)
pt3dadd(47.144, 45.846, 5.234, 0.764)
pt3dadd(47.054, 45.768, 5.222, 0.78)
pt3dadd(46.964, 45.69, 5.211, 0.796)
pt3dadd(46.874, 45.611, 5.199, 0.812)
pt3dadd(46.784, 45.533, 5.188, 0.828)
pt3dadd(46.69, 45.465, 5.169, 0.826)
pt3dadd(46.588, 45.41, 5.141, 0.802)
pt3dadd(46.487, 45.355, 5.113, 0.778)
pt3dadd(46.386, 45.3, 5.085, 0.752)
pt3dadd(46.285, 45.245, 5.056, 0.728)
pt3dadd(46.183, 45.19, 5.028, 0.704)
pt3dadd(46.082, 45.135, 5, 0.678)
pt3dadd(45.981, 45.081, 4.972, 0.654)
pt3dadd(45.88, 45.026, 4.944, 0.63)
pt3dadd(45.779, 44.971, 4.915, 0.604)
pt3dadd(45.673, 44.933, 4.881, 0.572)
pt3dadd(45.566, 44.904, 4.845, 0.534)
pt3dadd(45.458, 44.874, 4.808, 0.496)
pt3dadd(45.35, 44.845, 4.771, 0.46)
pt3dadd(45.243, 44.815, 4.734, 0.422)
pt3dadd(45.135, 44.786, 4.697, 0.386)
pt3dadd(45.028, 44.757, 4.66, 0.348)
pt3dadd(44.92, 44.727, 4.623, 0.31)
pt3dadd(44.813, 44.698, 4.586, 0.274)
pt3dadd(44.705, 44.668, 4.549, 0.236)
pt3dadd(44.593, 44.655, 4.516, 0.228)
pt3dadd(44.479, 44.648, 4.484, 0.23)
pt3dadd(44.366, 44.64, 4.453, 0.234)
pt3dadd(44.252, 44.633, 4.422, 0.236)
pt3dadd(44.138, 44.626, 4.39, 0.238)
pt3dadd(44.025, 44.618, 4.359, 0.242)
pt3dadd(43.911, 44.611, 4.327, 0.244)
pt3dadd(43.797, 44.604, 4.296, 0.248)
pt3dadd(43.684, 44.596, 4.265, 0.25)
pt3dadd(43.57, 44.589, 4.233, 0.252)
pt3dadd(43.455, 44.595, 4.205, 0.268)
pt3dadd(43.34, 44.605, 4.178, 0.288)
pt3dadd(43.225, 44.616, 4.15, 0.308)
pt3dadd(43.11, 44.627, 4.123, 0.328)
pt3dadd(42.995, 44.637, 4.096, 0.348)
pt3dadd(42.88, 44.648, 4.069, 0.368)
pt3dadd(42.765, 44.658, 4.042, 0.388)
pt3dadd(42.65, 44.669, 4.014, 0.408)
pt3dadd(42.535, 44.679, 3.987, 0.428)
pt3dadd(42.42, 44.69, 3.96, 0.448)
pt3dadd(42.318, 44.715, 3.914, 0.448)
pt3dadd(42.219, 44.745, 3.864, 0.444)
pt3dadd(42.119, 44.774, 3.813, 0.438)
pt3dadd(42.02, 44.804, 3.763, 0.434)
pt3dadd(41.921, 44.834, 3.712, 0.428)
pt3dadd(41.822, 44.863, 3.662, 0.424)
pt3dadd(41.722, 44.893, 3.611, 0.418)
pt3dadd(41.623, 44.922, 3.56, 0.414)
pt3dadd(41.524, 44.952, 3.51, 0.408)
pt3dadd(41.425, 44.982, 3.459, 0.404)
pt3dadd(41.323, 45.034, 3.432, 0.386)
pt3dadd(41.22, 45.089, 3.406, 0.368)
pt3dadd(41.118, 45.144, 3.381, 0.35)
pt3dadd(41.016, 45.198, 3.355, 0.332)
pt3dadd(40.914, 45.253, 3.33, 0.316)
pt3dadd(40.811, 45.308, 3.304, 0.298)
pt3dadd(40.709, 45.363, 3.279, 0.28)
pt3dadd(40.607, 45.417, 3.253, 0.262)
pt3dadd(40.504, 45.472, 3.228, 0.244)
pt3dadd(40.402, 45.527, 3.202, 0.226)
pt3dadd(40.289, 45.564, 3.192, 0.226)
pt3dadd(40.176, 45.602, 3.181, 0.226)
pt3dadd(40.062, 45.64, 3.171, 0.226)
pt3dadd(39.949, 45.678, 3.16, 0.226)
pt3dadd(39.836, 45.715, 3.15, 0.226)
pt3dadd(39.723, 45.753, 3.139, 0.226)
pt3dadd(39.609, 45.791, 3.129, 0.226)
pt3dadd(39.496, 45.828, 3.118, 0.226)
pt3dadd(39.383, 45.866, 3.108, 0.226)
pt3dadd(39.27, 45.904, 3.098, 0.226)
}
dend_7[74] {pt3dclear()
pt3dadd(109.841, 90.862, 11.395, 0.678)
pt3dadd(109.841, 90.883, 11.409, 0.68)
pt3dadd(109.841, 90.975, 11.473, 0.694)
pt3dadd(109.841, 91.068, 11.537, 0.706)
pt3dadd(109.841, 91.161, 11.6, 0.72)
pt3dadd(109.841, 91.253, 11.664, 0.732)
pt3dadd(109.841, 91.346, 11.727, 0.746)
pt3dadd(109.841, 91.438, 11.791, 0.758)
pt3dadd(109.841, 91.531, 11.854, 0.772)
pt3dadd(109.841, 91.623, 11.918, 0.784)
pt3dadd(109.841, 91.716, 11.982, 0.798)
pt3dadd(109.84, 91.809, 12.045, 0.81)
pt3dadd(109.84, 91.901, 12.109, 0.824)
pt3dadd(109.84, 91.994, 12.173, 0.836)
pt3dadd(109.84, 92.086, 12.236, 0.85)
pt3dadd(109.84, 92.179, 12.3, 0.862)
pt3dadd(109.84, 92.271, 12.364, 0.874)
pt3dadd(109.84, 92.364, 12.427, 0.888)
pt3dadd(109.838, 92.402, 12.501, 0.886)
pt3dadd(109.833, 92.349, 12.59, 0.856)
pt3dadd(109.828, 92.296, 12.68, 0.828)
pt3dadd(109.823, 92.243, 12.77, 0.798)
pt3dadd(109.817, 92.19, 12.859, 0.77)
pt3dadd(109.812, 92.137, 12.949, 0.742)
pt3dadd(109.807, 92.084, 13.038, 0.712)
pt3dadd(109.802, 92.031, 13.128, 0.684)
pt3dadd(109.797, 91.978, 13.218, 0.656)
pt3dadd(109.792, 91.925, 13.307, 0.626)
pt3dadd(109.785, 91.876, 13.398, 0.616)
pt3dadd(109.779, 91.827, 13.49, 0.608)
pt3dadd(109.772, 91.779, 13.581, 0.6)
pt3dadd(109.765, 91.73, 13.672, 0.59)
pt3dadd(109.758, 91.682, 13.764, 0.582)
pt3dadd(109.751, 91.633, 13.855, 0.574)
pt3dadd(109.744, 91.585, 13.946, 0.566)
pt3dadd(109.737, 91.536, 14.038, 0.558)
pt3dadd(109.73, 91.488, 14.129, 0.55)
pt3dadd(109.723, 91.439, 14.22, 0.54)
pt3dadd(109.713, 91.413, 14.317, 0.566)
pt3dadd(109.702, 91.387, 14.414, 0.594)
pt3dadd(109.691, 91.361, 14.512, 0.62)
pt3dadd(109.681, 91.335, 14.609, 0.646)
pt3dadd(109.67, 91.309, 14.706, 0.674)
pt3dadd(109.659, 91.283, 14.803, 0.7)
}
}
proc shape3d_198() {
dend_7[74] { pt3dadd(109.649, 91.257, 14.901, 0.726)
pt3dadd(109.638, 91.231, 14.998, 0.754)
pt3dadd(109.627, 91.206, 15.095, 0.78)
pt3dadd(109.616, 91.18, 15.192, 0.806)
pt3dadd(109.598, 91.168, 15.291, 0.844)
pt3dadd(109.579, 91.157, 15.389, 0.882)
pt3dadd(109.561, 91.146, 15.487, 0.92)
pt3dadd(109.542, 91.134, 15.586, 0.958)
pt3dadd(109.524, 91.123, 15.684, 0.996)
pt3dadd(109.505, 91.112, 15.782, 1.034)
pt3dadd(109.486, 91.1, 15.881, 1.072)
pt3dadd(109.468, 91.089, 15.979, 1.108)
pt3dadd(109.449, 91.078, 16.077, 1.146)
pt3dadd(109.429, 91.067, 16.175, 1.184)
pt3dadd(109.384, 91.067, 16.268, 1.22)
pt3dadd(109.339, 91.066, 16.361, 1.256)
pt3dadd(109.294, 91.066, 16.454, 1.292)
pt3dadd(109.249, 91.066, 16.546, 1.328)
pt3dadd(109.204, 91.066, 16.639, 1.364)
pt3dadd(109.16, 91.065, 16.732, 1.398)
pt3dadd(109.115, 91.065, 16.824, 1.434)
pt3dadd(109.07, 91.065, 16.917, 1.47)
pt3dadd(109.025, 91.065, 17.01, 1.506)
pt3dadd(108.98, 91.064, 17.103, 1.54)
pt3dadd(108.949, 91.064, 17.199, 1.562)
pt3dadd(108.918, 91.064, 17.296, 1.582)
pt3dadd(108.887, 91.063, 17.392, 1.604)
pt3dadd(108.856, 91.063, 17.489, 1.624)
pt3dadd(108.825, 91.063, 17.585, 1.644)
pt3dadd(108.794, 91.062, 17.682, 1.666)
pt3dadd(108.762, 91.062, 17.779, 1.686)
pt3dadd(108.731, 91.062, 17.875, 1.706)
pt3dadd(108.7, 91.061, 17.972, 1.728)
pt3dadd(108.67, 91.061, 18.069, 1.746)
pt3dadd(108.65, 91.06, 18.167, 1.74)
pt3dadd(108.631, 91.059, 18.266, 1.732)
pt3dadd(108.612, 91.059, 18.365, 1.726)
pt3dadd(108.592, 91.058, 18.463, 1.72)
pt3dadd(108.573, 91.057, 18.562, 1.712)
pt3dadd(108.554, 91.056, 18.661, 1.706)
pt3dadd(108.534, 91.056, 18.759, 1.698)
pt3dadd(108.515, 91.055, 18.858, 1.692)
pt3dadd(108.495, 91.054, 18.957, 1.684)
pt3dadd(108.477, 91.053, 19.056, 1.676)
pt3dadd(108.469, 91.052, 19.155, 1.648)
pt3dadd(108.46, 91.051, 19.255, 1.618)
pt3dadd(108.452, 91.049, 19.355, 1.588)
pt3dadd(108.443, 91.048, 19.455, 1.56)
pt3dadd(108.435, 91.046, 19.554, 1.53)
pt3dadd(108.426, 91.045, 19.654, 1.502)
pt3dadd(108.418, 91.043, 19.754, 1.472)
pt3dadd(108.41, 91.042, 19.854, 1.444)
pt3dadd(108.401, 91.041, 19.953, 1.414)
pt3dadd(108.393, 91.039, 20.053, 1.384)
pt3dadd(108.39, 91.036, 20.153, 1.344)
pt3dadd(108.387, 91.033, 20.253, 1.306)
pt3dadd(108.384, 91.031, 20.353, 1.266)
pt3dadd(108.38, 91.028, 20.453, 1.226)
pt3dadd(108.377, 91.025, 20.553, 1.186)
pt3dadd(108.374, 91.022, 20.653, 1.148)
pt3dadd(108.371, 91.02, 20.752, 1.108)
pt3dadd(108.367, 91.017, 20.852, 1.068)
pt3dadd(108.364, 91.014, 20.952, 1.03)
pt3dadd(108.361, 91.011, 21.052, 0.992)
pt3dadd(108.354, 91.006, 21.152, 0.982)
pt3dadd(108.347, 91, 21.252, 0.972)
pt3dadd(108.341, 90.995, 21.352, 0.962)
pt3dadd(108.334, 90.989, 21.451, 0.952)
pt3dadd(108.328, 90.984, 21.551, 0.942)
pt3dadd(108.321, 90.978, 21.651, 0.932)
pt3dadd(108.314, 90.972, 21.75, 0.922)
pt3dadd(108.308, 90.967, 21.85, 0.912)
pt3dadd(108.301, 90.961, 21.95, 0.902)
pt3dadd(108.294, 90.955, 22.05, 0.902)
pt3dadd(108.28, 90.943, 22.149, 0.984)
pt3dadd(108.266, 90.932, 22.247, 1.068)
pt3dadd(108.252, 90.92, 22.346, 1.152)
pt3dadd(108.239, 90.908, 22.445, 1.236)
pt3dadd(108.225, 90.896, 22.544, 1.318)
pt3dadd(108.211, 90.884, 22.643, 1.402)
pt3dadd(108.197, 90.872, 22.742, 1.486)
pt3dadd(108.183, 90.86, 22.84, 1.568)
pt3dadd(108.17, 90.848, 22.939, 1.652)
pt3dadd(108.154, 90.835, 23.038, 1.722)
pt3dadd(108.126, 90.812, 23.133, 1.66)
pt3dadd(108.098, 90.788, 23.228, 1.6)
pt3dadd(108.07, 90.765, 23.323, 1.54)
pt3dadd(108.042, 90.741, 23.419, 1.478)
pt3dadd(108.014, 90.718, 23.514, 1.418)
pt3dadd(107.986, 90.694, 23.609, 1.356)
pt3dadd(107.958, 90.671, 23.704, 1.296)
pt3dadd(107.93, 90.648, 23.799, 1.234)
pt3dadd(107.901, 90.624, 23.895, 1.174)
pt3dadd(107.861, 90.59, 23.98, 1.13)
pt3dadd(107.789, 90.527, 24.041, 1.13)
pt3dadd(107.717, 90.464, 24.101, 1.13)
pt3dadd(107.645, 90.402, 24.162, 1.13)
pt3dadd(107.573, 90.339, 24.223, 1.13)
pt3dadd(107.501, 90.277, 24.283, 1.13)
pt3dadd(107.428, 90.214, 24.344, 1.13)
pt3dadd(107.356, 90.151, 24.404, 1.13)
pt3dadd(107.284, 90.089, 24.465, 1.13)
pt3dadd(107.212, 90.026, 24.526, 1.13)
pt3dadd(107.141, 89.968, 24.589, 1.128)
pt3dadd(107.071, 89.919, 24.66, 1.126)
pt3dadd(107.001, 89.871, 24.73, 1.122)
pt3dadd(106.931, 89.822, 24.801, 1.118)
pt3dadd(106.861, 89.773, 24.871, 1.114)
pt3dadd(106.792, 89.725, 24.942, 1.11)
pt3dadd(106.722, 89.676, 25.012, 1.106)
pt3dadd(106.652, 89.627, 25.083, 1.102)
pt3dadd(106.582, 89.579, 25.153, 1.098)
pt3dadd(106.512, 89.53, 25.224, 1.094)
pt3dadd(106.436, 89.479, 25.286, 1.074)
pt3dadd(106.345, 89.422, 25.331, 1.014)
pt3dadd(106.254, 89.365, 25.376, 0.956)
pt3dadd(106.163, 89.308, 25.421, 0.896)
pt3dadd(106.072, 89.252, 25.466, 0.838)
pt3dadd(105.981, 89.195, 25.511, 0.778)
pt3dadd(105.89, 89.138, 25.556, 0.72)
pt3dadd(105.799, 89.081, 25.601, 0.662)
pt3dadd(105.709, 89.024, 25.646, 0.602)
pt3dadd(105.618, 88.968, 25.691, 0.544)
pt3dadd(105.525, 88.923, 25.74, 0.524)
pt3dadd(105.43, 88.904, 25.798, 0.582)
pt3dadd(105.334, 88.885, 25.857, 0.642)
pt3dadd(105.238, 88.866, 25.915, 0.702)
pt3dadd(105.142, 88.848, 25.973, 0.762)
pt3dadd(105.047, 88.829, 26.031, 0.822)
pt3dadd(104.951, 88.81, 26.09, 0.88)
pt3dadd(104.855, 88.791, 26.148, 0.94)
pt3dadd(104.76, 88.772, 26.206, 1)
pt3dadd(104.664, 88.753, 26.264, 1.06)
pt3dadd(104.568, 88.742, 26.323, 1.102)
pt3dadd(104.471, 88.742, 26.382, 1.118)
pt3dadd(104.373, 88.743, 26.44, 1.134)
pt3dadd(104.276, 88.744, 26.499, 1.148)
pt3dadd(104.179, 88.745, 26.557, 1.164)
pt3dadd(104.082, 88.746, 26.616, 1.18)
pt3dadd(103.985, 88.747, 26.675, 1.196)
pt3dadd(103.887, 88.747, 26.733, 1.212)
pt3dadd(103.79, 88.748, 26.792, 1.228)
pt3dadd(103.693, 88.749, 26.851, 1.244)
pt3dadd(103.595, 88.76, 26.907, 1.244)
pt3dadd(103.497, 88.783, 26.961, 1.222)
pt3dadd(103.399, 88.806, 27.015, 1.202)
pt3dadd(103.3, 88.829, 27.069, 1.18)
pt3dadd(103.202, 88.852, 27.123, 1.16)
pt3dadd(103.104, 88.875, 27.177, 1.138)
pt3dadd(103.005, 88.898, 27.232, 1.118)
pt3dadd(102.907, 88.921, 27.286, 1.096)
pt3dadd(102.809, 88.944, 27.339, 1.076)
pt3dadd(102.71, 88.967, 27.394, 1.054)
pt3dadd(102.615, 89.013, 27.438, 1.026)
pt3dadd(102.522, 89.072, 27.476, 0.992)
pt3dadd(102.428, 89.132, 27.514, 0.958)
pt3dadd(102.334, 89.191, 27.552, 0.924)
pt3dadd(102.241, 89.251, 27.59, 0.89)
pt3dadd(102.147, 89.31, 27.628, 0.858)
pt3dadd(102.054, 89.37, 27.667, 0.824)
pt3dadd(101.96, 89.43, 27.705, 0.79)
pt3dadd(101.866, 89.489, 27.743, 0.756)
pt3dadd(101.773, 89.548, 27.781, 0.722)
pt3dadd(101.684, 89.621, 27.81, 0.718)
pt3dadd(101.599, 89.7, 27.834, 0.73)
pt3dadd(101.513, 89.779, 27.857, 0.742)
pt3dadd(101.428, 89.858, 27.881, 0.754)
pt3dadd(101.342, 89.938, 27.904, 0.766)
pt3dadd(101.257, 90.017, 27.928, 0.78)
pt3dadd(101.171, 90.096, 27.951, 0.792)
pt3dadd(101.085, 90.176, 27.974, 0.804)
pt3dadd(101, 90.255, 27.998, 0.816)
pt3dadd(100.914, 90.334, 28.021, 0.828)
pt3dadd(100.837, 90.416, 28.056, 0.846)
pt3dadd(100.764, 90.498, 28.095, 0.866)
pt3dadd(100.692, 90.581, 28.135, 0.886)
pt3dadd(100.619, 90.664, 28.174, 0.906)
pt3dadd(100.546, 90.747, 28.214, 0.928)
pt3dadd(100.473, 90.83, 28.253, 0.948)
pt3dadd(100.401, 90.912, 28.293, 0.968)
pt3dadd(100.328, 90.995, 28.332, 0.988)
pt3dadd(100.255, 91.078, 28.372, 1.01)
pt3dadd(100.182, 91.161, 28.411, 1.03)
pt3dadd(100.129, 91.253, 28.456, 1.042)
pt3dadd(100.08, 91.348, 28.502, 1.052)
pt3dadd(100.032, 91.443, 28.548, 1.062)
pt3dadd(99.983, 91.538, 28.594, 1.07)
pt3dadd(99.935, 91.633, 28.639, 1.08)
pt3dadd(99.886, 91.728, 28.685, 1.09)
pt3dadd(99.837, 91.823, 28.731, 1.1)
pt3dadd(99.789, 91.918, 28.777, 1.11)
pt3dadd(99.74, 92.013, 28.823, 1.12)
pt3dadd(99.692, 92.108, 28.869, 1.13)
pt3dadd(99.641, 92.208, 28.903, 1.108)
pt3dadd(99.591, 92.309, 28.937, 1.084)
pt3dadd(99.54, 92.41, 28.971, 1.062)
pt3dadd(99.49, 92.512, 29.004, 1.038)
pt3dadd(99.439, 92.613, 29.038, 1.014)
pt3dadd(99.389, 92.714, 29.072, 0.99)
pt3dadd(99.338, 92.815, 29.105, 0.966)
}
}
proc shape3d_199() {
dend_7[74] { pt3dadd(99.288, 92.916, 29.139, 0.942)
pt3dadd(99.237, 93.017, 29.173, 0.92)
pt3dadd(99.187, 93.118, 29.206, 0.896)
pt3dadd(99.135, 93.216, 29.244, 0.874)
pt3dadd(99.083, 93.314, 29.282, 0.852)
pt3dadd(99.031, 93.413, 29.32, 0.83)
pt3dadd(98.979, 93.511, 29.357, 0.808)
pt3dadd(98.927, 93.609, 29.395, 0.786)
pt3dadd(98.874, 93.707, 29.433, 0.764)
pt3dadd(98.822, 93.805, 29.47, 0.742)
pt3dadd(98.77, 93.903, 29.508, 0.72)
pt3dadd(98.718, 94.002, 29.546, 0.698)
pt3dadd(98.666, 94.099, 29.584, 0.678)
pt3dadd(98.616, 94.19, 29.634, 0.688)
pt3dadd(98.566, 94.281, 29.684, 0.698)
pt3dadd(98.515, 94.373, 29.734, 0.708)
pt3dadd(98.465, 94.464, 29.784, 0.718)
pt3dadd(98.415, 94.555, 29.834, 0.726)
pt3dadd(98.365, 94.646, 29.884, 0.736)
pt3dadd(98.315, 94.737, 29.934, 0.746)
pt3dadd(98.265, 94.828, 29.984, 0.756)
pt3dadd(98.214, 94.919, 30.033, 0.766)
pt3dadd(98.161, 95.007, 30.085, 0.78)
pt3dadd(98.093, 95.077, 30.142, 0.816)
pt3dadd(98.024, 95.148, 30.199, 0.852)
pt3dadd(97.956, 95.219, 30.256, 0.888)
pt3dadd(97.887, 95.289, 30.314, 0.922)
pt3dadd(97.819, 95.36, 30.371, 0.96)
pt3dadd(97.75, 95.431, 30.428, 0.996)
pt3dadd(97.682, 95.501, 30.486, 1.032)
pt3dadd(97.614, 95.572, 30.543, 1.068)
pt3dadd(97.545, 95.643, 30.6, 1.104)
pt3dadd(97.484, 95.713, 30.662, 1.13)
pt3dadd(97.445, 95.784, 30.736, 1.13)
pt3dadd(97.406, 95.855, 30.809, 1.13)
pt3dadd(97.368, 95.925, 30.883, 1.13)
pt3dadd(97.329, 95.996, 30.957, 1.13)
pt3dadd(97.29, 96.067, 31.031, 1.13)
pt3dadd(97.251, 96.138, 31.105, 1.13)
pt3dadd(97.212, 96.209, 31.179, 1.13)
pt3dadd(97.173, 96.279, 31.253, 1.13)
pt3dadd(97.134, 96.35, 31.327, 1.13)
pt3dadd(97.097, 96.415, 31.405, 1.128)
pt3dadd(97.065, 96.464, 31.492, 1.124)
pt3dadd(97.032, 96.513, 31.579, 1.12)
pt3dadd(97, 96.563, 31.666, 1.116)
pt3dadd(96.967, 96.612, 31.753, 1.112)
pt3dadd(96.935, 96.661, 31.84, 1.108)
pt3dadd(96.903, 96.711, 31.927, 1.102)
pt3dadd(96.87, 96.76, 32.014, 1.098)
pt3dadd(96.838, 96.809, 32.102, 1.094)
pt3dadd(96.805, 96.859, 32.189, 1.09)
pt3dadd(96.766, 96.912, 32.271, 1.072)
pt3dadd(96.714, 96.974, 32.345, 1.026)
pt3dadd(96.662, 97.036, 32.419, 0.982)
pt3dadd(96.61, 97.098, 32.493, 0.936)
pt3dadd(96.558, 97.16, 32.567, 0.892)
pt3dadd(96.506, 97.222, 32.64, 0.846)
pt3dadd(96.454, 97.284, 32.714, 0.802)
pt3dadd(96.402, 97.346, 32.788, 0.756)
pt3dadd(96.35, 97.408, 32.862, 0.712)
pt3dadd(96.298, 97.47, 32.936, 0.666)
pt3dadd(96.261, 97.506, 33.021, 0.64)
pt3dadd(96.24, 97.515, 33.119, 0.636)
pt3dadd(96.219, 97.524, 33.218, 0.632)
pt3dadd(96.198, 97.532, 33.316, 0.628)
pt3dadd(96.177, 97.541, 33.414, 0.624)
pt3dadd(96.156, 97.549, 33.512, 0.62)
pt3dadd(96.136, 97.558, 33.611, 0.616)
pt3dadd(96.115, 97.566, 33.709, 0.612)
pt3dadd(96.094, 97.575, 33.807, 0.608)
pt3dadd(96.073, 97.584, 33.905, 0.602)
pt3dadd(96.081, 97.554, 33.998, 0.612)
pt3dadd(96.104, 97.506, 34.087, 0.626)
pt3dadd(96.127, 97.458, 34.177, 0.642)
pt3dadd(96.15, 97.41, 34.266, 0.658)
pt3dadd(96.173, 97.362, 34.356, 0.672)
pt3dadd(96.196, 97.314, 34.446, 0.688)
pt3dadd(96.219, 97.266, 34.535, 0.702)
pt3dadd(96.242, 97.218, 34.625, 0.718)
pt3dadd(96.265, 97.17, 34.715, 0.734)
pt3dadd(96.297, 97.106, 34.792, 0.728)
pt3dadd(96.342, 97.021, 34.851, 0.694)
pt3dadd(96.386, 96.936, 34.911, 0.66)
pt3dadd(96.431, 96.85, 34.97, 0.626)
pt3dadd(96.476, 96.765, 35.03, 0.592)
pt3dadd(96.521, 96.679, 35.089, 0.558)
pt3dadd(96.566, 96.594, 35.149, 0.524)
pt3dadd(96.611, 96.509, 35.208, 0.49)
pt3dadd(96.656, 96.423, 35.268, 0.456)
pt3dadd(96.7, 96.338, 35.327, 0.422)
pt3dadd(96.737, 96.249, 35.386, 0.396)
pt3dadd(96.765, 96.155, 35.445, 0.38)
pt3dadd(96.792, 96.062, 35.503, 0.362)
pt3dadd(96.819, 95.968, 35.562, 0.346)
pt3dadd(96.846, 95.875, 35.62, 0.328)
pt3dadd(96.873, 95.781, 35.678, 0.312)
pt3dadd(96.901, 95.688, 35.737, 0.294)
pt3dadd(96.928, 95.594, 35.795, 0.278)
pt3dadd(96.955, 95.501, 35.854, 0.262)
pt3dadd(96.983, 95.407, 35.912, 0.244)
pt3dadd(97.004, 95.313, 35.971, 0.254)
pt3dadd(97.017, 95.217, 36.03, 0.298)
pt3dadd(97.031, 95.121, 36.088, 0.34)
pt3dadd(97.045, 95.025, 36.147, 0.384)
pt3dadd(97.059, 94.929, 36.206, 0.426)
pt3dadd(97.073, 94.833, 36.265, 0.468)
pt3dadd(97.086, 94.737, 36.324, 0.512)
pt3dadd(97.1, 94.641, 36.383, 0.554)
pt3dadd(97.114, 94.545, 36.442, 0.598)
pt3dadd(97.128, 94.449, 36.501, 0.64)
pt3dadd(97.14, 94.35, 36.557, 0.664)
pt3dadd(97.15, 94.249, 36.61, 0.662)
pt3dadd(97.159, 94.147, 36.662, 0.662)
pt3dadd(97.169, 94.046, 36.715, 0.662)
pt3dadd(97.179, 93.944, 36.768, 0.66)
pt3dadd(97.189, 93.843, 36.82, 0.66)
pt3dadd(97.199, 93.741, 36.873, 0.66)
pt3dadd(97.209, 93.639, 36.926, 0.658)
pt3dadd(97.219, 93.538, 36.978, 0.658)
pt3dadd(97.229, 93.437, 37.031, 0.658)
pt3dadd(97.237, 93.333, 37.081, 0.638)
pt3dadd(97.244, 93.227, 37.127, 0.6)
pt3dadd(97.252, 93.121, 37.174, 0.562)
pt3dadd(97.259, 93.015, 37.22, 0.524)
pt3dadd(97.266, 92.909, 37.267, 0.488)
pt3dadd(97.273, 92.803, 37.314, 0.45)
pt3dadd(97.28, 92.697, 37.36, 0.412)
pt3dadd(97.288, 92.591, 37.407, 0.374)
pt3dadd(97.295, 92.485, 37.453, 0.336)
pt3dadd(97.302, 92.379, 37.5, 0.298)
pt3dadd(97.311, 92.275, 37.549, 0.296)
pt3dadd(97.321, 92.173, 37.6, 0.33)
pt3dadd(97.331, 92.07, 37.652, 0.364)
pt3dadd(97.341, 91.968, 37.703, 0.396)
pt3dadd(97.35, 91.866, 37.755, 0.43)
pt3dadd(97.36, 91.763, 37.806, 0.462)
pt3dadd(97.37, 91.661, 37.858, 0.496)
pt3dadd(97.38, 91.558, 37.91, 0.53)
pt3dadd(97.39, 91.456, 37.961, 0.562)
pt3dadd(97.4, 91.354, 38.013, 0.596)
pt3dadd(97.422, 91.25, 38.058, 0.6)
pt3dadd(97.454, 91.144, 38.097, 0.58)
pt3dadd(97.487, 91.038, 38.136, 0.558)
pt3dadd(97.519, 90.933, 38.174, 0.538)
pt3dadd(97.552, 90.827, 38.213, 0.516)
pt3dadd(97.585, 90.722, 38.252, 0.494)
pt3dadd(97.617, 90.616, 38.291, 0.474)
pt3dadd(97.65, 90.51, 38.33, 0.452)
pt3dadd(97.682, 90.405, 38.369, 0.432)
pt3dadd(97.715, 90.299, 38.408, 0.41)
pt3dadd(97.745, 90.195, 38.45, 0.4)
pt3dadd(97.774, 90.09, 38.494, 0.4)
pt3dadd(97.802, 89.987, 38.538, 0.4)
pt3dadd(97.83, 89.883, 38.582, 0.398)
pt3dadd(97.859, 89.779, 38.625, 0.398)
pt3dadd(97.887, 89.675, 38.67, 0.398)
pt3dadd(97.916, 89.571, 38.713, 0.396)
pt3dadd(97.944, 89.467, 38.757, 0.396)
pt3dadd(97.973, 89.363, 38.801, 0.396)
pt3dadd(98.001, 89.259, 38.845, 0.394)
pt3dadd(98.019, 89.155, 38.893, 0.412)
pt3dadd(98.03, 89.052, 38.943, 0.442)
pt3dadd(98.041, 88.949, 38.993, 0.47)
pt3dadd(98.053, 88.845, 39.043, 0.498)
pt3dadd(98.064, 88.742, 39.093, 0.528)
pt3dadd(98.075, 88.639, 39.143, 0.556)
pt3dadd(98.087, 88.536, 39.193, 0.584)
pt3dadd(98.098, 88.432, 39.243, 0.614)
pt3dadd(98.109, 88.329, 39.293, 0.642)
pt3dadd(98.121, 88.226, 39.343, 0.67)
pt3dadd(98.108, 88.119, 39.385, 0.678)
pt3dadd(98.086, 88.01, 39.424, 0.676)
pt3dadd(98.063, 87.902, 39.462, 0.676)
pt3dadd(98.041, 87.793, 39.501, 0.676)
pt3dadd(98.019, 87.685, 39.54, 0.674)
pt3dadd(97.997, 87.576, 39.578, 0.674)
pt3dadd(97.974, 87.468, 39.617, 0.674)
pt3dadd(97.952, 87.36, 39.655, 0.672)
pt3dadd(97.93, 87.251, 39.694, 0.672)
pt3dadd(97.908, 87.143, 39.733, 0.67)
pt3dadd(97.893, 87.041, 39.784, 0.64)
pt3dadd(97.88, 86.943, 39.84, 0.598)
pt3dadd(97.867, 86.844, 39.895, 0.558)
pt3dadd(97.854, 86.745, 39.951, 0.516)
pt3dadd(97.842, 86.646, 40.007, 0.476)
pt3dadd(97.829, 86.547, 40.063, 0.434)
pt3dadd(97.816, 86.449, 40.118, 0.392)
pt3dadd(97.804, 86.35, 40.174, 0.35)
pt3dadd(97.791, 86.251, 40.23, 0.31)
pt3dadd(97.778, 86.152, 40.286, 0.268)
pt3dadd(97.833, 86.073, 40.333, 0.254)
pt3dadd(97.913, 86.001, 40.378, 0.252)
pt3dadd(97.992, 85.929, 40.423, 0.248)
pt3dadd(98.072, 85.857, 40.467, 0.246)
pt3dadd(98.151, 85.784, 40.512, 0.242)
pt3dadd(98.231, 85.712, 40.556, 0.238)
pt3dadd(98.31, 85.64, 40.601, 0.236)
pt3dadd(98.39, 85.568, 40.646, 0.232)
pt3dadd(98.469, 85.495, 40.69, 0.23)
}
}
proc shape3d_200() {
dend_7[74] { pt3dadd(98.549, 85.423, 40.735, 0.226)
}
dend_7[75] {pt3dclear()
pt3dadd(115.486, 92.294, 10.782, 2.26)
pt3dadd(115.486, 92.304, 10.872, 2.248)
pt3dadd(115.486, 92.315, 10.971, 2.236)
pt3dadd(115.486, 92.325, 11.071, 2.222)
pt3dadd(115.486, 92.336, 11.171, 2.21)
pt3dadd(115.486, 92.347, 11.27, 2.196)
pt3dadd(115.486, 92.358, 11.37, 2.182)
pt3dadd(115.486, 92.369, 11.469, 2.17)
pt3dadd(115.486, 92.379, 11.569, 2.156)
pt3dadd(115.486, 92.39, 11.669, 2.144)
pt3dadd(115.486, 92.401, 11.768, 2.13)
pt3dadd(115.486, 92.412, 11.868, 2.118)
pt3dadd(115.486, 92.423, 11.967, 2.104)
pt3dadd(115.486, 92.433, 12.067, 2.092)
pt3dadd(115.484, 92.46, 12.164, 2.094)
pt3dadd(115.483, 92.49, 12.261, 2.098)
pt3dadd(115.481, 92.519, 12.358, 2.102)
pt3dadd(115.479, 92.549, 12.455, 2.104)
pt3dadd(115.478, 92.578, 12.552, 2.11)
pt3dadd(115.476, 92.607, 12.649, 2.112)
pt3dadd(115.475, 92.637, 12.746, 2.116)
pt3dadd(115.473, 92.666, 12.843, 2.12)
pt3dadd(115.472, 92.696, 12.94, 2.124)
pt3dadd(115.47, 92.725, 13.037, 2.128)
pt3dadd(115.467, 92.772, 13.129, 2.13)
pt3dadd(115.464, 92.82, 13.22, 2.132)
pt3dadd(115.461, 92.868, 13.312, 2.132)
pt3dadd(115.459, 92.916, 13.403, 2.134)
pt3dadd(115.456, 92.964, 13.495, 2.136)
pt3dadd(115.453, 93.012, 13.587, 2.136)
pt3dadd(115.45, 93.06, 13.678, 2.138)
pt3dadd(115.447, 93.108, 13.77, 2.14)
pt3dadd(115.444, 93.156, 13.862, 2.14)
pt3dadd(115.441, 93.204, 13.953, 2.142)
pt3dadd(115.438, 93.271, 14.036, 2.086)
pt3dadd(115.435, 93.337, 14.12, 2.03)
pt3dadd(115.431, 93.404, 14.203, 1.974)
pt3dadd(115.428, 93.471, 14.286, 1.918)
pt3dadd(115.425, 93.537, 14.369, 1.862)
pt3dadd(115.422, 93.604, 14.452, 1.806)
pt3dadd(115.419, 93.67, 14.535, 1.75)
pt3dadd(115.415, 93.737, 14.618, 1.694)
pt3dadd(115.412, 93.803, 14.702, 1.638)
pt3dadd(115.409, 93.87, 14.785, 1.582)
}
dend_7[76] {pt3dclear()
pt3dadd(115.409, 93.87, 14.785, 1.582)
pt3dadd(115.408, 93.883, 14.798, 1.588)
pt3dadd(115.4, 93.96, 14.874, 1.62)
pt3dadd(115.393, 94.037, 14.951, 1.652)
pt3dadd(115.386, 94.114, 15.027, 1.684)
pt3dadd(115.379, 94.191, 15.104, 1.716)
pt3dadd(115.372, 94.268, 15.18, 1.748)
pt3dadd(115.365, 94.345, 15.257, 1.78)
pt3dadd(115.358, 94.422, 15.333, 1.812)
pt3dadd(115.351, 94.499, 15.41, 1.844)
pt3dadd(115.344, 94.576, 15.486, 1.876)
pt3dadd(115.337, 94.653, 15.563, 1.908)
pt3dadd(115.328, 94.727, 15.641, 1.886)
pt3dadd(115.317, 94.798, 15.721, 1.814)
pt3dadd(115.305, 94.869, 15.801, 1.742)
pt3dadd(115.294, 94.941, 15.881, 1.67)
pt3dadd(115.283, 95.012, 15.961, 1.598)
pt3dadd(115.272, 95.083, 16.041, 1.526)
pt3dadd(115.261, 95.154, 16.121, 1.452)
pt3dadd(115.25, 95.225, 16.201, 1.38)
pt3dadd(115.239, 95.296, 16.281, 1.308)
pt3dadd(115.228, 95.367, 16.361, 1.236)
pt3dadd(115.208, 95.442, 16.437, 1.158)
pt3dadd(115.18, 95.52, 16.509, 1.074)
pt3dadd(115.152, 95.599, 16.581, 0.988)
pt3dadd(115.124, 95.677, 16.653, 0.904)
pt3dadd(115.096, 95.755, 16.726, 0.818)
pt3dadd(115.068, 95.833, 16.798, 0.734)
pt3dadd(115.04, 95.912, 16.87, 0.65)
pt3dadd(115.012, 95.99, 16.942, 0.564)
pt3dadd(114.984, 96.068, 17.014, 0.48)
pt3dadd(114.956, 96.146, 17.086, 0.394)
pt3dadd(114.917, 96.233, 17.146, 0.38)
pt3dadd(114.874, 96.323, 17.202, 0.388)
pt3dadd(114.831, 96.413, 17.257, 0.396)
pt3dadd(114.788, 96.503, 17.313, 0.404)
pt3dadd(114.745, 96.593, 17.368, 0.412)
pt3dadd(114.702, 96.683, 17.424, 0.422)
pt3dadd(114.659, 96.774, 17.479, 0.43)
pt3dadd(114.616, 96.864, 17.535, 0.438)
pt3dadd(114.573, 96.954, 17.59, 0.446)
pt3dadd(114.53, 97.044, 17.646, 0.454)
pt3dadd(114.5, 97.137, 17.704, 0.536)
pt3dadd(114.474, 97.231, 17.761, 0.64)
pt3dadd(114.447, 97.325, 17.819, 0.744)
pt3dadd(114.42, 97.419, 17.877, 0.846)
pt3dadd(114.394, 97.514, 17.935, 0.95)
pt3dadd(114.368, 97.608, 17.993, 1.054)
pt3dadd(114.341, 97.702, 18.051, 1.156)
pt3dadd(114.315, 97.796, 18.109, 1.26)
pt3dadd(114.288, 97.89, 18.167, 1.364)
pt3dadd(114.261, 97.984, 18.225, 1.466)
pt3dadd(114.246, 98.081, 18.282, 1.44)
pt3dadd(114.233, 98.178, 18.34, 1.376)
pt3dadd(114.221, 98.276, 18.397, 1.312)
pt3dadd(114.208, 98.373, 18.455, 1.248)
pt3dadd(114.195, 98.471, 18.512, 1.184)
pt3dadd(114.183, 98.568, 18.569, 1.12)
pt3dadd(114.17, 98.666, 18.627, 1.054)
pt3dadd(114.157, 98.763, 18.684, 0.992)
pt3dadd(114.145, 98.86, 18.742, 0.926)
pt3dadd(114.132, 98.958, 18.799, 0.862)
pt3dadd(114.125, 99.06, 18.851, 0.818)
pt3dadd(114.12, 99.163, 18.902, 0.778)
pt3dadd(114.114, 99.267, 18.952, 0.738)
pt3dadd(114.109, 99.37, 19.002, 0.698)
pt3dadd(114.103, 99.474, 19.053, 0.658)
pt3dadd(114.097, 99.577, 19.103, 0.618)
pt3dadd(114.092, 99.681, 19.154, 0.578)
pt3dadd(114.086, 99.784, 19.204, 0.538)
pt3dadd(114.081, 99.888, 19.255, 0.498)
pt3dadd(114.075, 99.991, 19.305, 0.458)
pt3dadd(114.074, 100.1, 19.346, 0.452)
pt3dadd(114.074, 100.211, 19.385, 0.452)
pt3dadd(114.074, 100.321, 19.424, 0.452)
pt3dadd(114.074, 100.432, 19.464, 0.452)
pt3dadd(114.074, 100.542, 19.503, 0.452)
pt3dadd(114.074, 100.653, 19.542, 0.452)
pt3dadd(114.074, 100.763, 19.581, 0.452)
pt3dadd(114.074, 100.874, 19.62, 0.452)
pt3dadd(114.074, 100.984, 19.659, 0.452)
pt3dadd(114.074, 101.094, 19.698, 0.452)
pt3dadd(114.074, 101.206, 19.735, 0.466)
pt3dadd(114.074, 101.318, 19.771, 0.482)
pt3dadd(114.074, 101.43, 19.808, 0.498)
pt3dadd(114.074, 101.541, 19.844, 0.514)
pt3dadd(114.074, 101.653, 19.88, 0.528)
pt3dadd(114.074, 101.765, 19.917, 0.544)
pt3dadd(114.074, 101.877, 19.953, 0.56)
pt3dadd(114.073, 101.988, 19.99, 0.576)
pt3dadd(114.073, 102.1, 20.026, 0.592)
pt3dadd(114.073, 102.212, 20.062, 0.608)
pt3dadd(114.073, 102.309, 20.121, 0.66)
pt3dadd(114.073, 102.407, 20.179, 0.712)
pt3dadd(114.072, 102.504, 20.238, 0.764)
pt3dadd(114.072, 102.601, 20.296, 0.816)
pt3dadd(114.072, 102.698, 20.355, 0.87)
pt3dadd(114.072, 102.796, 20.414, 0.922)
pt3dadd(114.072, 102.893, 20.472, 0.974)
pt3dadd(114.071, 102.99, 20.531, 1.026)
pt3dadd(114.071, 103.087, 20.59, 1.078)
pt3dadd(114.071, 103.185, 20.648, 1.13)
pt3dadd(114.071, 103.289, 20.698, 1.124)
pt3dadd(114.07, 103.393, 20.748, 1.12)
pt3dadd(114.07, 103.497, 20.797, 1.114)
pt3dadd(114.07, 103.601, 20.847, 1.108)
pt3dadd(114.07, 103.705, 20.897, 1.104)
pt3dadd(114.069, 103.809, 20.947, 1.098)
pt3dadd(114.069, 103.913, 20.996, 1.092)
pt3dadd(114.069, 104.017, 21.046, 1.088)
pt3dadd(114.069, 104.121, 21.096, 1.082)
pt3dadd(114.068, 104.225, 21.146, 1.076)
pt3dadd(114.068, 104.325, 21.201, 1.06)
pt3dadd(114.068, 104.425, 21.257, 1.042)
pt3dadd(114.067, 104.525, 21.313, 1.026)
pt3dadd(114.067, 104.624, 21.368, 1.01)
pt3dadd(114.067, 104.724, 21.424, 0.992)
pt3dadd(114.066, 104.824, 21.479, 0.976)
pt3dadd(114.066, 104.924, 21.535, 0.96)
pt3dadd(114.066, 105.024, 21.59, 0.942)
pt3dadd(114.065, 105.123, 21.646, 0.926)
pt3dadd(114.065, 105.224, 21.701, 0.91)
pt3dadd(114.064, 105.335, 21.738, 0.928)
pt3dadd(114.063, 105.446, 21.776, 0.946)
pt3dadd(114.062, 105.557, 21.813, 0.964)
pt3dadd(114.061, 105.668, 21.851, 0.982)
pt3dadd(114.06, 105.78, 21.889, 1)
pt3dadd(114.059, 105.891, 21.926, 1.018)
pt3dadd(114.058, 106.002, 21.964, 1.036)
pt3dadd(114.057, 106.113, 22.001, 1.052)
pt3dadd(114.056, 106.224, 22.039, 1.07)
pt3dadd(114.055, 106.335, 22.077, 1.088)
pt3dadd(114.053, 106.44, 22.126, 1.08)
pt3dadd(114.052, 106.545, 22.175, 1.07)
pt3dadd(114.05, 106.649, 22.224, 1.062)
pt3dadd(114.048, 106.754, 22.273, 1.054)
pt3dadd(114.047, 106.859, 22.321, 1.046)
pt3dadd(114.045, 106.963, 22.37, 1.038)
pt3dadd(114.043, 107.068, 22.419, 1.03)
pt3dadd(114.042, 107.173, 22.468, 1.022)
pt3dadd(114.04, 107.277, 22.517, 1.012)
pt3dadd(114.038, 107.382, 22.565, 1.002)
pt3dadd(114.036, 107.488, 22.613, 0.972)
pt3dadd(114.033, 107.593, 22.66, 0.942)
pt3dadd(114.03, 107.699, 22.708, 0.912)
pt3dadd(114.028, 107.805, 22.755, 0.88)
pt3dadd(114.025, 107.91, 22.803, 0.85)
pt3dadd(114.022, 108.016, 22.85, 0.82)
pt3dadd(114.02, 108.121, 22.898, 0.79)
pt3dadd(114.017, 108.227, 22.945, 0.76)
pt3dadd(114.014, 108.332, 22.993, 0.728)
pt3dadd(114.012, 108.438, 23.04, 0.698)
pt3dadd(114.007, 108.548, 23.081, 0.654)
pt3dadd(114.002, 108.657, 23.122, 0.612)
pt3dadd(113.998, 108.766, 23.163, 0.57)
}
}
proc shape3d_201() {
dend_7[76] { pt3dadd(113.993, 108.875, 23.205, 0.526)
pt3dadd(113.989, 108.984, 23.246, 0.484)
pt3dadd(113.984, 109.094, 23.287, 0.442)
pt3dadd(113.98, 109.203, 23.329, 0.398)
pt3dadd(113.975, 109.312, 23.37, 0.356)
pt3dadd(113.97, 109.421, 23.411, 0.314)
pt3dadd(113.965, 109.53, 23.453, 0.28)
pt3dadd(113.957, 109.631, 23.507, 0.328)
pt3dadd(113.948, 109.732, 23.56, 0.378)
pt3dadd(113.939, 109.833, 23.613, 0.426)
pt3dadd(113.93, 109.935, 23.666, 0.474)
pt3dadd(113.921, 110.036, 23.719, 0.524)
pt3dadd(113.912, 110.137, 23.772, 0.572)
pt3dadd(113.903, 110.239, 23.825, 0.62)
pt3dadd(113.894, 110.34, 23.878, 0.67)
pt3dadd(113.886, 110.441, 23.932, 0.718)
pt3dadd(113.876, 110.542, 23.985, 0.762)
pt3dadd(113.863, 110.643, 24.039, 0.764)
pt3dadd(113.849, 110.743, 24.093, 0.768)
pt3dadd(113.835, 110.843, 24.146, 0.77)
pt3dadd(113.822, 110.943, 24.2, 0.774)
pt3dadd(113.808, 111.043, 24.254, 0.776)
pt3dadd(113.795, 111.144, 24.308, 0.78)
pt3dadd(113.781, 111.244, 24.362, 0.782)
pt3dadd(113.768, 111.344, 24.416, 0.786)
pt3dadd(113.754, 111.444, 24.469, 0.788)
pt3dadd(113.739, 111.545, 24.523, 0.79)
pt3dadd(113.713, 111.647, 24.571, 0.778)
pt3dadd(113.688, 111.749, 24.619, 0.766)
pt3dadd(113.662, 111.851, 24.667, 0.756)
pt3dadd(113.636, 111.953, 24.715, 0.744)
pt3dadd(113.61, 112.055, 24.763, 0.732)
pt3dadd(113.584, 112.157, 24.811, 0.72)
pt3dadd(113.559, 112.259, 24.859, 0.71)
pt3dadd(113.533, 112.361, 24.907, 0.698)
pt3dadd(113.507, 112.463, 24.955, 0.686)
pt3dadd(113.475, 112.565, 24.999, 0.678)
pt3dadd(113.425, 112.667, 25.03, 0.678)
pt3dadd(113.375, 112.77, 25.061, 0.678)
pt3dadd(113.325, 112.872, 25.093, 0.678)
pt3dadd(113.274, 112.974, 25.124, 0.678)
pt3dadd(113.224, 113.077, 25.155, 0.678)
pt3dadd(113.174, 113.179, 25.186, 0.678)
pt3dadd(113.124, 113.282, 25.217, 0.678)
pt3dadd(113.074, 113.384, 25.248, 0.678)
pt3dadd(113.024, 113.486, 25.28, 0.678)
pt3dadd(112.975, 113.591, 25.306, 0.678)
pt3dadd(112.93, 113.701, 25.32, 0.678)
pt3dadd(112.885, 113.811, 25.333, 0.678)
pt3dadd(112.84, 113.921, 25.347, 0.678)
pt3dadd(112.794, 114.031, 25.36, 0.678)
pt3dadd(112.749, 114.141, 25.373, 0.678)
pt3dadd(112.704, 114.251, 25.387, 0.678)
pt3dadd(112.659, 114.361, 25.4, 0.678)
pt3dadd(112.614, 114.471, 25.413, 0.678)
pt3dadd(112.569, 114.581, 25.427, 0.678)
pt3dadd(112.521, 114.69, 25.438, 0.68)
pt3dadd(112.465, 114.796, 25.444, 0.692)
pt3dadd(112.41, 114.902, 25.45, 0.702)
pt3dadd(112.354, 115.008, 25.456, 0.712)
pt3dadd(112.298, 115.114, 25.462, 0.722)
pt3dadd(112.242, 115.22, 25.468, 0.734)
pt3dadd(112.186, 115.326, 25.474, 0.744)
pt3dadd(112.13, 115.432, 25.48, 0.754)
pt3dadd(112.074, 115.538, 25.486, 0.766)
pt3dadd(112.018, 115.644, 25.492, 0.776)
pt3dadd(111.962, 115.749, 25.498, 0.784)
pt3dadd(111.904, 115.854, 25.502, 0.786)
pt3dadd(111.846, 115.959, 25.506, 0.79)
pt3dadd(111.788, 116.064, 25.51, 0.792)
pt3dadd(111.73, 116.169, 25.514, 0.794)
pt3dadd(111.672, 116.274, 25.517, 0.798)
pt3dadd(111.614, 116.379, 25.521, 0.8)
pt3dadd(111.557, 116.484, 25.525, 0.802)
pt3dadd(111.499, 116.589, 25.529, 0.806)
pt3dadd(111.441, 116.694, 25.533, 0.808)
pt3dadd(111.387, 116.801, 25.538, 0.798)
pt3dadd(111.342, 116.912, 25.545, 0.764)
pt3dadd(111.296, 117.023, 25.553, 0.728)
pt3dadd(111.251, 117.133, 25.56, 0.692)
pt3dadd(111.205, 117.244, 25.567, 0.656)
pt3dadd(111.159, 117.355, 25.574, 0.622)
pt3dadd(111.114, 117.465, 25.582, 0.586)
pt3dadd(111.069, 117.576, 25.589, 0.55)
pt3dadd(111.023, 117.687, 25.596, 0.514)
pt3dadd(110.977, 117.798, 25.603, 0.48)
pt3dadd(110.926, 117.905, 25.612, 0.456)
pt3dadd(110.864, 118.007, 25.623, 0.456)
pt3dadd(110.801, 118.108, 25.634, 0.454)
pt3dadd(110.738, 118.21, 25.646, 0.454)
pt3dadd(110.676, 118.311, 25.657, 0.454)
pt3dadd(110.613, 118.413, 25.668, 0.454)
pt3dadd(110.551, 118.514, 25.68, 0.454)
pt3dadd(110.488, 118.615, 25.691, 0.452)
pt3dadd(110.425, 118.717, 25.702, 0.452)
pt3dadd(110.363, 118.818, 25.713, 0.452)
pt3dadd(110.303, 118.92, 25.73, 0.452)
pt3dadd(110.25, 119.023, 25.757, 0.452)
pt3dadd(110.196, 119.125, 25.784, 0.452)
pt3dadd(110.143, 119.227, 25.811, 0.452)
pt3dadd(110.089, 119.33, 25.838, 0.452)
pt3dadd(110.036, 119.432, 25.865, 0.452)
pt3dadd(109.982, 119.535, 25.892, 0.452)
pt3dadd(109.929, 119.637, 25.919, 0.452)
pt3dadd(109.875, 119.74, 25.946, 0.452)
pt3dadd(109.822, 119.842, 25.973, 0.452)
pt3dadd(109.77, 119.944, 26.003, 0.454)
pt3dadd(109.72, 120.044, 26.038, 0.462)
pt3dadd(109.669, 120.145, 26.073, 0.468)
pt3dadd(109.619, 120.245, 26.108, 0.476)
pt3dadd(109.569, 120.346, 26.143, 0.482)
pt3dadd(109.518, 120.446, 26.178, 0.488)
pt3dadd(109.468, 120.547, 26.213, 0.494)
pt3dadd(109.418, 120.648, 26.248, 0.502)
pt3dadd(109.367, 120.748, 26.283, 0.508)
pt3dadd(109.317, 120.848, 26.318, 0.516)
pt3dadd(109.26, 120.947, 26.349, 0.534)
pt3dadd(109.195, 121.043, 26.376, 0.564)
pt3dadd(109.13, 121.139, 26.403, 0.596)
pt3dadd(109.065, 121.234, 26.429, 0.626)
pt3dadd(109.001, 121.33, 26.456, 0.656)
pt3dadd(108.936, 121.426, 26.483, 0.688)
pt3dadd(108.871, 121.522, 26.51, 0.72)
pt3dadd(108.806, 121.618, 26.536, 0.75)
pt3dadd(108.742, 121.712, 26.563, 0.782)
pt3dadd(108.677, 121.808, 26.59, 0.812)
pt3dadd(108.61, 121.903, 26.615, 0.826)
pt3dadd(108.54, 121.998, 26.637, 0.822)
pt3dadd(108.471, 122.092, 26.659, 0.818)
pt3dadd(108.401, 122.186, 26.681, 0.814)
pt3dadd(108.332, 122.28, 26.703, 0.81)
pt3dadd(108.262, 122.375, 26.725, 0.806)
pt3dadd(108.193, 122.468, 26.747, 0.802)
pt3dadd(108.123, 122.563, 26.769, 0.798)
pt3dadd(108.054, 122.657, 26.791, 0.794)
pt3dadd(107.984, 122.75, 26.813, 0.79)
pt3dadd(107.916, 122.845, 26.837, 0.784)
pt3dadd(107.849, 122.94, 26.864, 0.778)
pt3dadd(107.783, 123.035, 26.89, 0.772)
pt3dadd(107.716, 123.13, 26.916, 0.766)
pt3dadd(107.65, 123.224, 26.942, 0.758)
pt3dadd(107.583, 123.319, 26.968, 0.752)
pt3dadd(107.517, 123.414, 26.994, 0.746)
pt3dadd(107.45, 123.509, 27.02, 0.74)
pt3dadd(107.384, 123.604, 27.047, 0.732)
pt3dadd(107.317, 123.698, 27.073, 0.726)
pt3dadd(107.258, 123.794, 27.106, 0.732)
pt3dadd(107.204, 123.89, 27.146, 0.748)
pt3dadd(107.151, 123.986, 27.186, 0.764)
pt3dadd(107.098, 124.082, 27.226, 0.78)
pt3dadd(107.044, 124.18, 27.266, 0.796)
pt3dadd(106.991, 124.276, 27.306, 0.812)
pt3dadd(106.938, 124.372, 27.346, 0.828)
pt3dadd(106.884, 124.468, 27.386, 0.846)
pt3dadd(106.831, 124.565, 27.426, 0.862)
pt3dadd(106.778, 124.661, 27.466, 0.878)
pt3dadd(106.719, 124.756, 27.502, 0.862)
pt3dadd(106.654, 124.848, 27.535, 0.82)
pt3dadd(106.59, 124.942, 27.568, 0.778)
pt3dadd(106.525, 125.034, 27.601, 0.736)
pt3dadd(106.461, 125.128, 27.634, 0.694)
pt3dadd(106.396, 125.22, 27.667, 0.652)
pt3dadd(106.332, 125.314, 27.7, 0.61)
pt3dadd(106.267, 125.407, 27.733, 0.568)
pt3dadd(106.203, 125.5, 27.766, 0.526)
pt3dadd(106.138, 125.593, 27.799, 0.484)
pt3dadd(106.076, 125.684, 27.837, 0.462)
pt3dadd(106.016, 125.776, 27.878, 0.456)
pt3dadd(105.956, 125.868, 27.92, 0.452)
pt3dadd(105.896, 125.959, 27.961, 0.446)
pt3dadd(105.835, 126.05, 28.002, 0.44)
pt3dadd(105.775, 126.142, 28.043, 0.436)
pt3dadd(105.715, 126.233, 28.085, 0.43)
pt3dadd(105.655, 126.324, 28.126, 0.426)
pt3dadd(105.595, 126.415, 28.167, 0.42)
pt3dadd(105.535, 126.506, 28.209, 0.414)
pt3dadd(105.47, 126.593, 28.252, 0.422)
pt3dadd(105.403, 126.676, 28.298, 0.438)
pt3dadd(105.336, 126.758, 28.344, 0.454)
pt3dadd(105.269, 126.841, 28.389, 0.47)
pt3dadd(105.201, 126.924, 28.435, 0.486)
pt3dadd(105.134, 127.007, 28.48, 0.502)
pt3dadd(105.067, 127.091, 28.526, 0.518)
pt3dadd(105, 127.174, 28.572, 0.534)
pt3dadd(104.932, 127.256, 28.617, 0.55)
pt3dadd(104.865, 127.339, 28.663, 0.566)
pt3dadd(104.77, 127.399, 28.695, 0.542)
pt3dadd(104.669, 127.453, 28.725, 0.506)
pt3dadd(104.568, 127.507, 28.754, 0.472)
pt3dadd(104.467, 127.561, 28.783, 0.438)
pt3dadd(104.366, 127.616, 28.813, 0.404)
pt3dadd(104.265, 127.67, 28.842, 0.368)
pt3dadd(104.164, 127.724, 28.872, 0.334)
pt3dadd(104.063, 127.778, 28.901, 0.3)
pt3dadd(103.962, 127.832, 28.93, 0.266)
pt3dadd(103.861, 127.888, 28.96, 0.23)
pt3dadd(103.751, 127.926, 28.982, 0.228)
pt3dadd(103.639, 127.961, 29.002, 0.228)
pt3dadd(103.527, 127.997, 29.023, 0.23)
pt3dadd(103.415, 128.032, 29.044, 0.232)
}
}
proc shape3d_202() {
dend_7[76] { pt3dadd(103.303, 128.068, 29.065, 0.232)
pt3dadd(103.191, 128.104, 29.085, 0.234)
pt3dadd(103.079, 128.138, 29.106, 0.236)
pt3dadd(102.967, 128.174, 29.127, 0.238)
pt3dadd(102.856, 128.21, 29.148, 0.238)
pt3dadd(102.744, 128.245, 29.168, 0.24)
pt3dadd(102.637, 128.297, 29.183, 0.256)
pt3dadd(102.531, 128.35, 29.197, 0.272)
pt3dadd(102.424, 128.404, 29.211, 0.29)
pt3dadd(102.318, 128.456, 29.225, 0.308)
pt3dadd(102.212, 128.509, 29.239, 0.324)
pt3dadd(102.106, 128.563, 29.253, 0.342)
pt3dadd(102, 128.616, 29.267, 0.36)
pt3dadd(101.893, 128.67, 29.281, 0.378)
pt3dadd(101.787, 128.723, 29.295, 0.394)
pt3dadd(101.681, 128.776, 29.309, 0.412)
pt3dadd(101.579, 128.822, 29.343, 0.452)
pt3dadd(101.477, 128.868, 29.38, 0.496)
pt3dadd(101.375, 128.912, 29.417, 0.54)
pt3dadd(101.273, 128.958, 29.455, 0.584)
pt3dadd(101.171, 129.004, 29.492, 0.628)
pt3dadd(101.07, 129.049, 29.529, 0.672)
pt3dadd(100.968, 129.094, 29.566, 0.716)
pt3dadd(100.866, 129.139, 29.603, 0.76)
pt3dadd(100.764, 129.185, 29.64, 0.804)
pt3dadd(100.662, 129.23, 29.677, 0.848)
pt3dadd(100.565, 129.282, 29.717, 0.848)
pt3dadd(100.469, 129.335, 29.757, 0.846)
pt3dadd(100.372, 129.386, 29.797, 0.844)
pt3dadd(100.275, 129.439, 29.837, 0.842)
pt3dadd(100.178, 129.491, 29.877, 0.838)
pt3dadd(100.081, 129.544, 29.917, 0.836)
pt3dadd(99.984, 129.596, 29.957, 0.834)
pt3dadd(99.888, 129.648, 29.996, 0.832)
pt3dadd(99.791, 129.701, 30.036, 0.83)
pt3dadd(99.694, 129.752, 30.076, 0.828)
pt3dadd(99.602, 129.815, 30.114, 0.772)
pt3dadd(99.51, 129.877, 30.152, 0.714)
pt3dadd(99.418, 129.94, 30.19, 0.658)
pt3dadd(99.327, 130.002, 30.228, 0.602)
pt3dadd(99.235, 130.064, 30.266, 0.546)
pt3dadd(99.143, 130.127, 30.304, 0.49)
pt3dadd(99.051, 130.189, 30.342, 0.432)
pt3dadd(98.959, 130.25, 30.38, 0.376)
pt3dadd(98.867, 130.313, 30.418, 0.32)
pt3dadd(98.775, 130.375, 30.457, 0.268)
pt3dadd(98.689, 130.422, 30.515, 0.304)
pt3dadd(98.603, 130.469, 30.572, 0.34)
pt3dadd(98.517, 130.516, 30.63, 0.376)
pt3dadd(98.431, 130.562, 30.687, 0.414)
pt3dadd(98.345, 130.61, 30.745, 0.45)
pt3dadd(98.259, 130.657, 30.802, 0.486)
pt3dadd(98.172, 130.704, 30.86, 0.522)
pt3dadd(98.086, 130.751, 30.917, 0.558)
pt3dadd(98, 130.798, 30.975, 0.596)
pt3dadd(97.915, 130.847, 31.032, 0.632)
pt3dadd(97.859, 130.933, 31.084, 0.656)
pt3dadd(97.803, 131.018, 31.135, 0.682)
pt3dadd(97.746, 131.105, 31.187, 0.706)
pt3dadd(97.69, 131.19, 31.239, 0.732)
pt3dadd(97.633, 131.276, 31.29, 0.758)
pt3dadd(97.577, 131.363, 31.342, 0.782)
pt3dadd(97.521, 131.448, 31.394, 0.808)
pt3dadd(97.464, 131.534, 31.445, 0.832)
pt3dadd(97.408, 131.62, 31.497, 0.858)
pt3dadd(97.358, 131.704, 31.553, 0.868)
pt3dadd(97.338, 131.778, 31.63, 0.806)
pt3dadd(97.319, 131.851, 31.708, 0.742)
pt3dadd(97.299, 131.924, 31.785, 0.68)
pt3dadd(97.28, 131.998, 31.862, 0.616)
pt3dadd(97.261, 132.072, 31.939, 0.554)
pt3dadd(97.241, 132.145, 32.017, 0.49)
pt3dadd(97.222, 132.218, 32.094, 0.428)
pt3dadd(97.202, 132.293, 32.171, 0.364)
pt3dadd(97.183, 132.366, 32.249, 0.302)
pt3dadd(97.169, 132.446, 32.321, 0.254)
pt3dadd(97.171, 132.545, 32.378, 0.252)
pt3dadd(97.173, 132.643, 32.435, 0.248)
pt3dadd(97.176, 132.742, 32.492, 0.246)
pt3dadd(97.178, 132.841, 32.549, 0.242)
pt3dadd(97.18, 132.94, 32.606, 0.24)
pt3dadd(97.182, 133.038, 32.663, 0.236)
pt3dadd(97.184, 133.136, 32.72, 0.234)
pt3dadd(97.186, 133.235, 32.777, 0.23)
pt3dadd(97.188, 133.333, 32.834, 0.228)
pt3dadd(97.191, 133.429, 32.894, 0.226)
pt3dadd(97.196, 133.517, 32.961, 0.226)
pt3dadd(97.202, 133.606, 33.029, 0.226)
pt3dadd(97.207, 133.694, 33.096, 0.226)
pt3dadd(97.212, 133.783, 33.164, 0.226)
pt3dadd(97.218, 133.871, 33.231, 0.226)
pt3dadd(97.223, 133.96, 33.299, 0.226)
pt3dadd(97.229, 134.048, 33.366, 0.226)
pt3dadd(97.234, 134.136, 33.433, 0.226)
pt3dadd(97.239, 134.225, 33.501, 0.226)
pt3dadd(97.245, 134.312, 33.569, 0.242)
pt3dadd(97.253, 134.396, 33.64, 0.3)
pt3dadd(97.26, 134.48, 33.711, 0.358)
pt3dadd(97.267, 134.564, 33.782, 0.416)
pt3dadd(97.274, 134.65, 33.853, 0.474)
pt3dadd(97.281, 134.734, 33.924, 0.53)
pt3dadd(97.289, 134.818, 33.995, 0.588)
pt3dadd(97.296, 134.902, 34.066, 0.646)
pt3dadd(97.303, 134.987, 34.137, 0.704)
pt3dadd(97.31, 135.071, 34.208, 0.76)
pt3dadd(97.32, 135.151, 34.281, 0.81)
pt3dadd(97.337, 135.226, 34.358, 0.842)
pt3dadd(97.353, 135.3, 34.436, 0.874)
pt3dadd(97.37, 135.373, 34.513, 0.906)
pt3dadd(97.387, 135.448, 34.591, 0.936)
pt3dadd(97.404, 135.522, 34.668, 0.968)
pt3dadd(97.42, 135.595, 34.746, 1)
pt3dadd(97.437, 135.67, 34.823, 1.032)
pt3dadd(97.454, 135.744, 34.901, 1.064)
pt3dadd(97.47, 135.817, 34.978, 1.094)
pt3dadd(97.494, 135.882, 35.06, 1.086)
pt3dadd(97.525, 135.934, 35.146, 1.028)
pt3dadd(97.557, 135.986, 35.232, 0.97)
pt3dadd(97.589, 136.038, 35.318, 0.91)
pt3dadd(97.621, 136.09, 35.404, 0.852)
pt3dadd(97.653, 136.141, 35.49, 0.792)
pt3dadd(97.685, 136.194, 35.576, 0.734)
pt3dadd(97.717, 136.246, 35.662, 0.676)
pt3dadd(97.749, 136.297, 35.749, 0.616)
pt3dadd(97.78, 136.35, 35.835, 0.558)
pt3dadd(97.799, 136.399, 35.924, 0.55)
pt3dadd(97.801, 136.446, 36.015, 0.602)
pt3dadd(97.804, 136.494, 36.107, 0.652)
pt3dadd(97.806, 136.541, 36.199, 0.704)
pt3dadd(97.809, 136.588, 36.291, 0.756)
pt3dadd(97.811, 136.636, 36.383, 0.808)
pt3dadd(97.814, 136.682, 36.475, 0.86)
pt3dadd(97.817, 136.729, 36.567, 0.912)
pt3dadd(97.819, 136.777, 36.659, 0.962)
pt3dadd(97.821, 136.824, 36.751, 1.014)
pt3dadd(97.753, 136.907, 36.796, 0.936)
pt3dadd(97.685, 136.988, 36.842, 0.856)
pt3dadd(97.616, 137.07, 36.887, 0.778)
pt3dadd(97.548, 137.153, 36.933, 0.7)
pt3dadd(97.479, 137.234, 36.979, 0.62)
pt3dadd(97.411, 137.316, 37.024, 0.542)
pt3dadd(97.343, 137.399, 37.07, 0.462)
pt3dadd(97.274, 137.48, 37.115, 0.384)
pt3dadd(97.206, 137.563, 37.161, 0.304)
pt3dadd(97.138, 137.645, 37.206, 0.226)
}
dend_7[77] {pt3dclear()
pt3dadd(115.409, 93.87, 14.785, 1.582)
pt3dadd(115.412, 93.871, 14.834, 1.572)
pt3dadd(115.418, 93.873, 14.934, 1.554)
pt3dadd(115.424, 93.874, 15.034, 1.536)
pt3dadd(115.43, 93.876, 15.134, 1.518)
pt3dadd(115.437, 93.878, 15.234, 1.5)
pt3dadd(115.444, 93.879, 15.334, 1.482)
pt3dadd(115.473, 93.877, 15.431, 1.46)
pt3dadd(115.502, 93.874, 15.528, 1.44)
pt3dadd(115.531, 93.871, 15.625, 1.418)
pt3dadd(115.56, 93.868, 15.722, 1.396)
pt3dadd(115.589, 93.865, 15.819, 1.374)
pt3dadd(115.618, 93.862, 15.916, 1.352)
pt3dadd(115.647, 93.859, 16.013, 1.33)
pt3dadd(115.676, 93.856, 16.11, 1.308)
pt3dadd(115.705, 93.853, 16.207, 1.288)
pt3dadd(115.76, 93.845, 16.292, 1.262)
pt3dadd(115.839, 93.831, 16.366, 1.236)
pt3dadd(115.918, 93.818, 16.44, 1.208)
pt3dadd(115.998, 93.804, 16.514, 1.182)
pt3dadd(116.077, 93.791, 16.589, 1.154)
pt3dadd(116.156, 93.777, 16.663, 1.128)
pt3dadd(116.235, 93.763, 16.737, 1.1)
pt3dadd(116.315, 93.75, 16.811, 1.074)
pt3dadd(116.394, 93.736, 16.886, 1.046)
pt3dadd(116.473, 93.723, 16.96, 1.02)
pt3dadd(116.552, 93.708, 17.034, 1.012)
pt3dadd(116.631, 93.692, 17.108, 1.024)
pt3dadd(116.71, 93.677, 17.183, 1.036)
pt3dadd(116.789, 93.661, 17.257, 1.048)
pt3dadd(116.867, 93.645, 17.331, 1.058)
pt3dadd(116.946, 93.63, 17.405, 1.07)
pt3dadd(117.025, 93.614, 17.48, 1.082)
pt3dadd(117.104, 93.598, 17.554, 1.092)
pt3dadd(117.183, 93.582, 17.628, 1.104)
pt3dadd(117.261, 93.567, 17.702, 1.116)
pt3dadd(117.336, 93.544, 17.778, 1.128)
pt3dadd(117.407, 93.514, 17.855, 1.14)
pt3dadd(117.477, 93.485, 17.932, 1.152)
pt3dadd(117.548, 93.456, 18.009, 1.164)
pt3dadd(117.618, 93.426, 18.086, 1.178)
pt3dadd(117.689, 93.397, 18.163, 1.19)
pt3dadd(117.76, 93.367, 18.24, 1.202)
pt3dadd(117.83, 93.338, 18.318, 1.214)
pt3dadd(117.901, 93.309, 18.395, 1.226)
pt3dadd(117.972, 93.279, 18.472, 1.24)
pt3dadd(118.029, 93.233, 18.55, 1.22)
pt3dadd(118.081, 93.18, 18.628, 1.186)
pt3dadd(118.132, 93.127, 18.707, 1.154)
pt3dadd(118.184, 93.073, 18.785, 1.12)
pt3dadd(118.236, 93.02, 18.864, 1.086)
pt3dadd(118.287, 92.967, 18.943, 1.054)
pt3dadd(118.339, 92.914, 19.021, 1.02)
pt3dadd(118.39, 92.86, 19.1, 0.986)
pt3dadd(118.442, 92.807, 19.179, 0.954)
}
}
proc shape3d_203() {
dend_7[77] { pt3dadd(118.494, 92.754, 19.257, 0.92)
pt3dadd(118.558, 92.699, 19.327, 0.94)
pt3dadd(118.628, 92.643, 19.394, 0.982)
pt3dadd(118.698, 92.586, 19.461, 1.026)
pt3dadd(118.767, 92.53, 19.527, 1.07)
pt3dadd(118.837, 92.474, 19.594, 1.112)
pt3dadd(118.907, 92.418, 19.66, 1.156)
pt3dadd(118.977, 92.362, 19.727, 1.198)
pt3dadd(119.047, 92.306, 19.793, 1.242)
pt3dadd(119.116, 92.25, 19.86, 1.286)
pt3dadd(119.186, 92.194, 19.927, 1.328)
pt3dadd(119.23, 92.125, 19.998, 1.342)
pt3dadd(119.263, 92.05, 20.071, 1.344)
pt3dadd(119.295, 91.976, 20.145, 1.346)
pt3dadd(119.328, 91.901, 20.218, 1.348)
pt3dadd(119.36, 91.826, 20.291, 1.348)
pt3dadd(119.393, 91.751, 20.365, 1.35)
pt3dadd(119.425, 91.676, 20.438, 1.352)
pt3dadd(119.458, 91.602, 20.511, 1.352)
pt3dadd(119.49, 91.527, 20.585, 1.354)
pt3dadd(119.523, 91.452, 20.658, 1.356)
pt3dadd(119.546, 91.386, 20.739, 1.334)
pt3dadd(119.566, 91.325, 20.823, 1.304)
pt3dadd(119.586, 91.263, 20.907, 1.272)
pt3dadd(119.606, 91.201, 20.992, 1.242)
pt3dadd(119.626, 91.14, 21.076, 1.212)
pt3dadd(119.646, 91.078, 21.16, 1.18)
pt3dadd(119.665, 91.016, 21.244, 1.15)
pt3dadd(119.685, 90.954, 21.328, 1.118)
pt3dadd(119.705, 90.893, 21.412, 1.088)
pt3dadd(119.725, 90.831, 21.497, 1.058)
pt3dadd(119.738, 90.765, 21.579, 1.038)
pt3dadd(119.749, 90.696, 21.661, 1.024)
pt3dadd(119.76, 90.628, 21.743, 1.01)
pt3dadd(119.77, 90.56, 21.824, 0.994)
pt3dadd(119.781, 90.492, 21.906, 0.98)
pt3dadd(119.792, 90.424, 21.988, 0.966)
pt3dadd(119.802, 90.355, 22.07, 0.952)
pt3dadd(119.813, 90.287, 22.152, 0.936)
pt3dadd(119.824, 90.219, 22.233, 0.922)
pt3dadd(119.835, 90.151, 22.315, 0.906)
pt3dadd(119.843, 90.076, 22.393, 0.9)
pt3dadd(119.851, 90, 22.47, 0.896)
pt3dadd(119.859, 89.924, 22.547, 0.892)
pt3dadd(119.867, 89.848, 22.624, 0.89)
pt3dadd(119.875, 89.772, 22.701, 0.886)
pt3dadd(119.883, 89.696, 22.778, 0.88)
pt3dadd(119.891, 89.619, 22.855, 0.878)
pt3dadd(119.899, 89.543, 22.932, 0.874)
pt3dadd(119.907, 89.467, 23.009, 0.87)
pt3dadd(119.914, 89.391, 23.086, 0.866)
pt3dadd(119.925, 89.31, 23.159, 0.852)
pt3dadd(119.936, 89.227, 23.231, 0.836)
pt3dadd(119.947, 89.145, 23.304, 0.82)
pt3dadd(119.958, 89.063, 23.376, 0.804)
pt3dadd(119.968, 88.98, 23.448, 0.788)
pt3dadd(119.979, 88.898, 23.52, 0.772)
pt3dadd(119.99, 88.816, 23.592, 0.756)
pt3dadd(120.001, 88.734, 23.665, 0.738)
pt3dadd(120.012, 88.651, 23.737, 0.722)
pt3dadd(120.023, 88.569, 23.809, 0.706)
pt3dadd(120.055, 88.477, 23.866, 0.714)
pt3dadd(120.092, 88.383, 23.92, 0.726)
pt3dadd(120.13, 88.289, 23.974, 0.738)
pt3dadd(120.167, 88.195, 24.028, 0.75)
pt3dadd(120.204, 88.101, 24.082, 0.762)
pt3dadd(120.241, 88.007, 24.136, 0.774)
pt3dadd(120.278, 87.913, 24.19, 0.786)
pt3dadd(120.316, 87.819, 24.243, 0.798)
pt3dadd(120.353, 87.725, 24.297, 0.81)
pt3dadd(120.39, 87.631, 24.351, 0.822)
pt3dadd(120.425, 87.543, 24.412, 0.83)
pt3dadd(120.46, 87.455, 24.474, 0.838)
pt3dadd(120.494, 87.368, 24.536, 0.846)
pt3dadd(120.529, 87.28, 24.598, 0.854)
pt3dadd(120.565, 87.193, 24.66, 0.864)
pt3dadd(120.6, 87.105, 24.722, 0.872)
pt3dadd(120.635, 87.018, 24.784, 0.88)
pt3dadd(120.67, 86.93, 24.846, 0.888)
pt3dadd(120.704, 86.843, 24.908, 0.896)
pt3dadd(120.74, 86.755, 24.97, 0.904)
pt3dadd(120.757, 86.672, 25.039, 0.886)
pt3dadd(120.775, 86.588, 25.11, 0.87)
pt3dadd(120.793, 86.504, 25.18, 0.852)
pt3dadd(120.811, 86.42, 25.25, 0.834)
pt3dadd(120.828, 86.336, 25.32, 0.816)
pt3dadd(120.846, 86.253, 25.39, 0.8)
pt3dadd(120.864, 86.169, 25.46, 0.782)
pt3dadd(120.881, 86.085, 25.53, 0.764)
pt3dadd(120.899, 86.001, 25.6, 0.746)
pt3dadd(120.916, 85.917, 25.67, 0.73)
pt3dadd(120.916, 85.823, 25.732, 0.706)
pt3dadd(120.914, 85.73, 25.795, 0.682)
pt3dadd(120.914, 85.636, 25.857, 0.66)
pt3dadd(120.914, 85.542, 25.92, 0.636)
pt3dadd(120.913, 85.449, 25.982, 0.614)
pt3dadd(120.913, 85.355, 26.045, 0.59)
pt3dadd(120.913, 85.261, 26.107, 0.568)
pt3dadd(120.913, 85.167, 26.17, 0.544)
pt3dadd(120.912, 85.074, 26.232, 0.522)
pt3dadd(120.91, 84.978, 26.292, 0.504)
pt3dadd(120.893, 84.872, 26.337, 0.522)
pt3dadd(120.876, 84.766, 26.381, 0.542)
pt3dadd(120.859, 84.66, 26.426, 0.56)
pt3dadd(120.842, 84.554, 26.47, 0.58)
pt3dadd(120.826, 84.448, 26.514, 0.598)
pt3dadd(120.81, 84.342, 26.559, 0.618)
pt3dadd(120.793, 84.235, 26.603, 0.636)
pt3dadd(120.776, 84.129, 26.648, 0.656)
pt3dadd(120.76, 84.023, 26.692, 0.674)
pt3dadd(120.738, 83.917, 26.734, 0.694)
pt3dadd(120.694, 83.81, 26.761, 0.71)
pt3dadd(120.65, 83.703, 26.789, 0.728)
pt3dadd(120.606, 83.597, 26.816, 0.744)
pt3dadd(120.562, 83.49, 26.843, 0.762)
pt3dadd(120.517, 83.383, 26.87, 0.778)
pt3dadd(120.474, 83.276, 26.898, 0.796)
pt3dadd(120.43, 83.17, 26.925, 0.812)
pt3dadd(120.385, 83.063, 26.952, 0.83)
pt3dadd(120.342, 82.956, 26.979, 0.848)
pt3dadd(120.3, 82.85, 27.009, 0.86)
pt3dadd(120.268, 82.745, 27.05, 0.852)
pt3dadd(120.235, 82.641, 27.092, 0.844)
pt3dadd(120.204, 82.537, 27.133, 0.836)
pt3dadd(120.172, 82.432, 27.175, 0.828)
pt3dadd(120.139, 82.328, 27.216, 0.82)
pt3dadd(120.108, 82.223, 27.258, 0.812)
pt3dadd(120.076, 82.119, 27.299, 0.802)
pt3dadd(120.044, 82.014, 27.34, 0.794)
pt3dadd(120.012, 81.91, 27.382, 0.786)
pt3dadd(119.982, 81.806, 27.425, 0.78)
pt3dadd(119.958, 81.705, 27.475, 0.782)
pt3dadd(119.935, 81.604, 27.525, 0.784)
pt3dadd(119.911, 81.502, 27.575, 0.786)
pt3dadd(119.888, 81.401, 27.625, 0.788)
pt3dadd(119.864, 81.3, 27.675, 0.79)
pt3dadd(119.841, 81.198, 27.724, 0.79)
pt3dadd(119.817, 81.097, 27.774, 0.792)
pt3dadd(119.794, 80.996, 27.824, 0.794)
pt3dadd(119.771, 80.894, 27.874, 0.796)
pt3dadd(119.749, 80.794, 27.925, 0.806)
pt3dadd(119.732, 80.696, 27.981, 0.836)
pt3dadd(119.716, 80.598, 28.037, 0.868)
pt3dadd(119.699, 80.5, 28.093, 0.9)
pt3dadd(119.682, 80.402, 28.149, 0.93)
pt3dadd(119.666, 80.304, 28.205, 0.962)
pt3dadd(119.649, 80.206, 28.261, 0.994)
pt3dadd(119.633, 80.107, 28.317, 1.024)
pt3dadd(119.616, 80.01, 28.373, 1.056)
pt3dadd(119.6, 79.911, 28.429, 1.088)
pt3dadd(119.585, 79.811, 28.482, 1.1)
pt3dadd(119.574, 79.702, 28.523, 1.052)
pt3dadd(119.564, 79.594, 28.565, 1.004)
pt3dadd(119.554, 79.485, 28.607, 0.958)
pt3dadd(119.544, 79.376, 28.648, 0.91)
pt3dadd(119.534, 79.268, 28.69, 0.862)
pt3dadd(119.523, 79.159, 28.732, 0.814)
pt3dadd(119.513, 79.05, 28.773, 0.766)
pt3dadd(119.503, 78.942, 28.815, 0.718)
pt3dadd(119.493, 78.833, 28.857, 0.672)
pt3dadd(119.478, 78.724, 28.896, 0.63)
pt3dadd(119.451, 78.613, 28.926, 0.612)
pt3dadd(119.423, 78.502, 28.957, 0.594)
pt3dadd(119.395, 78.391, 28.987, 0.576)
pt3dadd(119.367, 78.281, 29.017, 0.556)
pt3dadd(119.34, 78.17, 29.048, 0.538)
pt3dadd(119.312, 78.059, 29.079, 0.52)
pt3dadd(119.284, 77.948, 29.109, 0.502)
pt3dadd(119.256, 77.837, 29.139, 0.482)
pt3dadd(119.229, 77.726, 29.17, 0.464)
pt3dadd(119.201, 77.616, 29.201, 0.45)
pt3dadd(119.172, 77.506, 29.233, 0.444)
pt3dadd(119.143, 77.396, 29.265, 0.436)
pt3dadd(119.114, 77.286, 29.298, 0.43)
pt3dadd(119.085, 77.176, 29.33, 0.424)
pt3dadd(119.056, 77.066, 29.362, 0.418)
pt3dadd(119.027, 76.956, 29.394, 0.41)
pt3dadd(118.998, 76.847, 29.426, 0.404)
pt3dadd(118.969, 76.737, 29.458, 0.398)
pt3dadd(118.94, 76.627, 29.491, 0.392)
pt3dadd(118.918, 76.518, 29.528, 0.38)
pt3dadd(118.906, 76.411, 29.572, 0.364)
pt3dadd(118.894, 76.304, 29.616, 0.348)
pt3dadd(118.881, 76.197, 29.66, 0.332)
pt3dadd(118.869, 76.09, 29.703, 0.316)
pt3dadd(118.857, 75.983, 29.747, 0.3)
pt3dadd(118.845, 75.875, 29.791, 0.284)
pt3dadd(118.832, 75.768, 29.835, 0.268)
pt3dadd(118.82, 75.661, 29.879, 0.25)
pt3dadd(118.808, 75.554, 29.923, 0.234)
pt3dadd(118.815, 75.447, 29.964, 0.226)
pt3dadd(118.845, 75.34, 30.001, 0.226)
pt3dadd(118.874, 75.232, 30.038, 0.226)
pt3dadd(118.904, 75.125, 30.076, 0.226)
pt3dadd(118.934, 75.018, 30.113, 0.226)
pt3dadd(118.963, 74.91, 30.15, 0.226)
pt3dadd(118.993, 74.803, 30.188, 0.226)
pt3dadd(119.023, 74.696, 30.225, 0.226)
pt3dadd(119.052, 74.588, 30.262, 0.226)
pt3dadd(119.082, 74.481, 30.299, 0.226)
}
}
proc shape3d_204() {
dend_7[77] { pt3dadd(119.109, 74.376, 30.342, 0.232)
pt3dadd(119.132, 74.275, 30.392, 0.244)
pt3dadd(119.155, 74.173, 30.442, 0.258)
pt3dadd(119.178, 74.072, 30.491, 0.27)
pt3dadd(119.201, 73.97, 30.541, 0.284)
pt3dadd(119.225, 73.869, 30.59, 0.296)
pt3dadd(119.248, 73.767, 30.64, 0.308)
pt3dadd(119.271, 73.665, 30.69, 0.322)
pt3dadd(119.294, 73.564, 30.739, 0.334)
pt3dadd(119.318, 73.462, 30.789, 0.348)
pt3dadd(119.336, 73.36, 30.839, 0.354)
pt3dadd(119.35, 73.257, 30.888, 0.356)
pt3dadd(119.363, 73.153, 30.938, 0.36)
pt3dadd(119.377, 73.05, 30.987, 0.362)
pt3dadd(119.39, 72.947, 31.037, 0.364)
pt3dadd(119.404, 72.843, 31.087, 0.366)
pt3dadd(119.418, 72.74, 31.136, 0.368)
pt3dadd(119.431, 72.637, 31.186, 0.37)
pt3dadd(119.445, 72.534, 31.236, 0.372)
pt3dadd(119.459, 72.43, 31.286, 0.374)
pt3dadd(119.464, 72.326, 31.334, 0.368)
pt3dadd(119.461, 72.221, 31.382, 0.352)
pt3dadd(119.459, 72.115, 31.43, 0.338)
pt3dadd(119.457, 72.01, 31.477, 0.322)
pt3dadd(119.454, 71.904, 31.525, 0.308)
pt3dadd(119.452, 71.799, 31.573, 0.292)
pt3dadd(119.45, 71.694, 31.621, 0.278)
pt3dadd(119.448, 71.588, 31.669, 0.262)
pt3dadd(119.445, 71.483, 31.717, 0.248)
pt3dadd(119.443, 71.378, 31.764, 0.232)
pt3dadd(119.431, 71.279, 31.82, 0.226)
pt3dadd(119.412, 71.185, 31.88, 0.226)
pt3dadd(119.394, 71.092, 31.941, 0.226)
pt3dadd(119.376, 70.998, 32.001, 0.226)
pt3dadd(119.357, 70.904, 32.062, 0.226)
pt3dadd(119.339, 70.811, 32.122, 0.226)
pt3dadd(119.32, 70.717, 32.183, 0.226)
pt3dadd(119.302, 70.623, 32.243, 0.226)
pt3dadd(119.283, 70.529, 32.304, 0.226)
pt3dadd(119.265, 70.436, 32.364, 0.226)
pt3dadd(119.223, 70.36, 32.431, 0.236)
pt3dadd(119.165, 70.297, 32.501, 0.254)
pt3dadd(119.107, 70.234, 32.571, 0.272)
pt3dadd(119.05, 70.171, 32.641, 0.29)
pt3dadd(118.992, 70.107, 32.711, 0.306)
pt3dadd(118.935, 70.044, 32.781, 0.324)
pt3dadd(118.877, 69.981, 32.852, 0.342)
pt3dadd(118.819, 69.918, 32.922, 0.358)
pt3dadd(118.762, 69.855, 32.992, 0.376)
pt3dadd(118.704, 69.792, 33.062, 0.394)
pt3dadd(118.643, 69.72, 33.124, 0.434)
pt3dadd(118.581, 69.645, 33.182, 0.484)
pt3dadd(118.519, 69.57, 33.24, 0.534)
pt3dadd(118.456, 69.494, 33.298, 0.586)
pt3dadd(118.394, 69.419, 33.356, 0.636)
pt3dadd(118.332, 69.343, 33.414, 0.688)
pt3dadd(118.269, 69.268, 33.472, 0.738)
pt3dadd(118.207, 69.193, 33.53, 0.788)
pt3dadd(118.145, 69.117, 33.588, 0.838)
pt3dadd(118.082, 69.042, 33.646, 0.89)
pt3dadd(118.008, 68.976, 33.701, 0.9)
pt3dadd(117.93, 68.914, 33.757, 0.896)
pt3dadd(117.852, 68.852, 33.812, 0.894)
pt3dadd(117.773, 68.789, 33.867, 0.89)
pt3dadd(117.695, 68.727, 33.922, 0.886)
pt3dadd(117.616, 68.665, 33.977, 0.882)
pt3dadd(117.538, 68.603, 34.032, 0.878)
pt3dadd(117.46, 68.54, 34.088, 0.876)
pt3dadd(117.381, 68.478, 34.143, 0.872)
pt3dadd(117.303, 68.416, 34.198, 0.868)
pt3dadd(117.214, 68.353, 34.24, 0.838)
pt3dadd(117.124, 68.29, 34.28, 0.802)
pt3dadd(117.034, 68.228, 34.32, 0.766)
pt3dadd(116.943, 68.165, 34.36, 0.732)
pt3dadd(116.853, 68.102, 34.4, 0.696)
pt3dadd(116.763, 68.039, 34.44, 0.66)
pt3dadd(116.672, 67.976, 34.48, 0.626)
pt3dadd(116.582, 67.914, 34.52, 0.59)
pt3dadd(116.492, 67.851, 34.56, 0.554)
pt3dadd(116.401, 67.788, 34.6, 0.52)
pt3dadd(116.31, 67.717, 34.625, 0.49)
pt3dadd(116.218, 67.646, 34.651, 0.46)
pt3dadd(116.127, 67.574, 34.676, 0.432)
pt3dadd(116.035, 67.503, 34.701, 0.402)
pt3dadd(115.943, 67.432, 34.727, 0.372)
pt3dadd(115.852, 67.36, 34.752, 0.344)
pt3dadd(115.76, 67.289, 34.778, 0.314)
pt3dadd(115.669, 67.218, 34.803, 0.284)
pt3dadd(115.577, 67.146, 34.829, 0.256)
pt3dadd(115.486, 67.075, 34.854, 0.226)
}
}
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()
basic_shape_1()
}
proc basic_shape_1() {
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()
shape3d_192()
shape3d_193()
shape3d_194()
shape3d_195()
shape3d_196()
shape3d_197()
shape3d_198()
shape3d_199()
shape3d_200()
basic_shape_2()
}
proc basic_shape_2() {
shape3d_201()
shape3d_202()
shape3d_203()
shape3d_204()
}
objref all, dendritic_0, somatic, apical, dendritic_5, dendritic_7
proc subsets() { local i
objref all, dendritic_0, somatic, apical, dendritic_5, dendritic_7
all = new SectionList()
soma all.append()
for i=0, 7 dend_0[i] all.append()
for i=0, 77 dend_7[i] all.append()
for i=0, 36 apic[i] all.append()
for i=0, 23 dend_5[i] all.append()
dendritic_0 = new SectionList()
for i=0, 7 dend_0[i] dendritic_0.append()
somatic = new SectionList()
soma somatic.append()
apical = new SectionList()
for i=0, 36 apic[i] apical.append()
dendritic_5 = new SectionList()
for i=0, 23 dend_5[i] dendritic_5.append()
dendritic_7 = new SectionList()
for i=0, 77 dend_7[i] dendritic_7.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()