proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend_0[15], apic[27], dend_5[18], dend_7[58]
proc topol() { local i
connect dend_0(0), soma(0.5)
for i = 1, 2 connect dend_0[i](0), dend_0[i-1](1)
connect dend_0[3](0), dend_0[1](1)
for i = 4, 5 connect dend_0[i](0), dend_0[i-1](1)
connect dend_0[6](0), dend_0[4](1)
connect dend_0[7](0), dend_0[3](1)
connect dend_0[8](0), dend_0(1)
for i = 9, 10 connect dend_0[i](0), dend_0[8](1)
connect dend_0[11](0), dend_0(1)
connect dend_0[12](0), soma(0.5)
for i = 13, 14 connect dend_0[i](0), dend_0[12](1)
connect apic(0), dend_0[2](1)
for i = 1, 3 connect apic[i](0), apic[i-1](1)
connect apic[4](0), apic[2](1)
for i = 5, 7 connect apic[i](0), apic[i-1](1)
connect apic[8](0), apic[6](1)
connect apic[9](0), apic[5](1)
connect apic[10](0), apic[4](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)
connect apic[16](0), apic(1)
for i = 17, 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)
for i = 23, 24 connect apic[i](0), apic[i-1](1)
connect apic[25](0), apic[23](1)
connect apic[26](0), apic[22](1)
connect dend_5(0), apic[3](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)
connect dend_5[7](0), apic[7](1)
for i = 8, 10 connect dend_5[i](0), dend_5[i-1](1)
connect dend_5[11](0), dend_5[9](1)
connect dend_5[12](0), dend_5[8](1)
for i = 13, 14 connect dend_5[i](0), dend_5[12](1)
connect dend_5[15](0), dend_5[7](1)
for i = 16, 17 connect dend_5[i](0), dend_5[15](1)
connect dend_7(0), dend_0[5](1)
for i = 1, 2 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[3](0), dend_7[1](1)
connect dend_7[4](0), dend_7(1)
for i = 5, 6 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[7](0), dend_7[5](1)
for i = 8, 9 connect dend_7[i](0), dend_7[7](1)
connect dend_7[10](0), dend_7[4](1)
connect dend_7[11](0), dend_0[7](1)
connect dend_7[12](0), dend_0[9](1)
for i = 13, 14 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[15](0), dend_7[13](1)
for i = 16, 17 connect dend_7[i](0), dend_7[15](1)
connect dend_7[18](0), dend_7[12](1)
for i = 19, 20 connect dend_7[i](0), dend_7[18](1)
connect dend_7[21](0), dend_0[10](1)
for i = 22, 23 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[24](0), dend_7[22](1)
connect dend_7[25](0), dend_7[21](1)
for i = 26, 27 connect dend_7[i](0), dend_7[25](1)
for i = 28, 29 connect dend_7[i](0), dend_7[27](1)
connect dend_7[30](0), dend_0[11](1)
for i = 31, 33 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[34](0), dend_7[32](1)
for i = 35, 36 connect dend_7[i](0), dend_7[34](1)
connect dend_7[37](0), dend_7[31](1)
connect dend_7[38](0), dend_7[30](1)
for i = 39, 40 connect dend_7[i](0), dend_7[38](1)
for i = 41, 42 connect dend_7[i](0), dend_7[40](1)
connect dend_7[43](0), dend_0[13](1)
for i = 44, 46 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[47](0), dend_7[45](1)
connect dend_7[48](0), dend_7[44](1)
connect dend_7[49](0), dend_7[43](1)
connect dend_7[50](0), dend_0[14](1)
for i = 51, 52 connect dend_7[i](0), dend_7[i-1](1)
for i = 53, 54 connect dend_7[i](0), dend_7[51](1)
connect dend_7[55](0), dend_7[50](1)
for i = 56, 57 connect dend_7[i](0), dend_7[55](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(12.611, 101.76, 21.223, 11.03)
pt3dadd(18.126, 101.76, 21.223, 11.03)
pt3dadd(23.641, 101.76, 21.223, 11.03)
}
dend_0 {pt3dclear()
pt3dstyle(1, 18.126, 101.76, 21.223)
pt3dadd(18.147, 101.833, 21.301, 11.13)
pt3dadd(18.167, 101.906, 21.379, 11.23)
pt3dadd(18.187, 101.979, 21.456, 11.33)
pt3dadd(18.204, 102.039, 21.52, 11.412)
}
dend_0[1] {pt3dclear()
pt3dadd(18.204, 102.039, 21.52, 11.412)
pt3dadd(18.119, 102.123, 21.52, 11.494)
pt3dadd(18.085, 102.157, 21.52, 11.526)
}
dend_0[2] {pt3dclear()
pt3dadd(18.085, 102.157, 21.52, 11.526)
pt3dadd(18.073, 102.186, 21.506, 11.486)
pt3dadd(18.032, 102.283, 21.459, 11.344)
pt3dadd(17.991, 102.381, 21.412, 11.204)
pt3dadd(17.95, 102.478, 21.365, 11.062)
pt3dadd(17.909, 102.576, 21.318, 10.922)
pt3dadd(17.868, 102.673, 21.27, 10.78)
pt3dadd(17.828, 102.771, 21.223, 10.64)
pt3dadd(17.787, 102.868, 21.176, 10.5)
pt3dadd(17.746, 102.966, 21.129, 10.358)
pt3dadd(17.705, 103.064, 21.082, 10.218)
pt3dadd(17.664, 103.161, 21.035, 10.076)
pt3dadd(17.623, 103.259, 20.987, 9.936)
pt3dadd(17.582, 103.356, 20.94, 9.794)
pt3dadd(17.526, 103.454, 20.906, 9.682)
pt3dadd(17.466, 103.551, 20.874, 9.576)
pt3dadd(17.407, 103.648, 20.843, 9.468)
pt3dadd(17.348, 103.745, 20.811, 9.362)
pt3dadd(17.288, 103.842, 20.78, 9.254)
pt3dadd(17.229, 103.939, 20.748, 9.148)
pt3dadd(17.17, 104.037, 20.716, 9.042)
pt3dadd(17.11, 104.134, 20.685, 8.934)
pt3dadd(17.051, 104.231, 20.653, 8.828)
pt3dadd(16.992, 104.328, 20.622, 8.72)
pt3dadd(16.92, 104.422, 20.603, 8.63)
pt3dadd(16.848, 104.515, 20.585, 8.538)
pt3dadd(16.776, 104.609, 20.567, 8.448)
pt3dadd(16.704, 104.703, 20.549, 8.356)
pt3dadd(16.632, 104.796, 20.531, 8.266)
pt3dadd(16.56, 104.89, 20.513, 8.174)
pt3dadd(16.488, 104.983, 20.495, 8.084)
pt3dadd(16.416, 105.077, 20.477, 7.994)
pt3dadd(16.344, 105.17, 20.459, 7.902)
pt3dadd(16.272, 105.264, 20.441, 7.812)
pt3dadd(16.193, 105.354, 20.433, 7.712)
pt3dadd(16.114, 105.443, 20.424, 7.61)
pt3dadd(16.035, 105.533, 20.415, 7.51)
pt3dadd(15.956, 105.622, 20.406, 7.41)
pt3dadd(15.877, 105.712, 20.398, 7.308)
pt3dadd(15.798, 105.802, 20.389, 7.208)
pt3dadd(15.719, 105.891, 20.38, 7.108)
pt3dadd(15.64, 105.981, 20.371, 7.006)
pt3dadd(15.561, 106.071, 20.362, 6.906)
pt3dadd(15.482, 106.16, 20.354, 6.806)
pt3dadd(15.399, 106.247, 20.351, 6.718)
pt3dadd(15.316, 106.334, 20.348, 6.632)
pt3dadd(15.233, 106.42, 20.345, 6.544)
pt3dadd(15.15, 106.507, 20.342, 6.458)
pt3dadd(15.067, 106.593, 20.339, 6.37)
pt3dadd(14.984, 106.68, 20.336, 6.284)
pt3dadd(14.901, 106.767, 20.333, 6.196)
pt3dadd(14.818, 106.853, 20.33, 6.11)
pt3dadd(14.735, 106.94, 20.327, 6.024)
pt3dadd(14.652, 107.026, 20.324, 5.936)
pt3dadd(14.568, 107.112, 20.323, 5.854)
pt3dadd(14.483, 107.197, 20.322, 5.772)
pt3dadd(14.399, 107.283, 20.321, 5.69)
pt3dadd(14.315, 107.368, 20.32, 5.606)
pt3dadd(14.231, 107.454, 20.319, 5.524)
pt3dadd(14.147, 107.54, 20.318, 5.442)
pt3dadd(14.063, 107.625, 20.316, 5.36)
pt3dadd(13.979, 107.711, 20.315, 5.278)
pt3dadd(13.894, 107.796, 20.314, 5.196)
}
apic {pt3dclear()
pt3dadd(13.894, 107.796, 20.314, 5.196)
pt3dadd(13.81, 107.882, 20.313, 5.112)
pt3dadd(13.727, 107.968, 20.311, 5.03)
pt3dadd(13.643, 108.054, 20.309, 4.946)
pt3dadd(13.56, 108.14, 20.307, 4.864)
pt3dadd(13.476, 108.226, 20.305, 4.782)
pt3dadd(13.393, 108.312, 20.303, 4.698)
pt3dadd(13.309, 108.399, 20.301, 4.616)
pt3dadd(13.226, 108.485, 20.299, 4.532)
pt3dadd(13.142, 108.571, 20.297, 4.45)
pt3dadd(13.059, 108.657, 20.295, 4.366)
pt3dadd(12.975, 108.743, 20.292, 4.284)
pt3dadd(12.892, 108.83, 20.289, 4.214)
pt3dadd(12.81, 108.917, 20.285, 4.142)
pt3dadd(12.727, 109.004, 20.282, 4.072)
pt3dadd(12.645, 109.091, 20.278, 4.002)
pt3dadd(12.562, 109.178, 20.275, 3.932)
pt3dadd(12.48, 109.265, 20.271, 3.86)
pt3dadd(12.397, 109.352, 20.268, 3.79)
pt3dadd(12.314, 109.439, 20.264, 3.72)
pt3dadd(12.232, 109.526, 20.261, 3.648)
pt3dadd(12.149, 109.613, 20.257, 3.578)
pt3dadd(12.068, 109.701, 20.252, 3.522)
pt3dadd(11.986, 109.788, 20.247, 3.466)
pt3dadd(11.905, 109.876, 20.242, 3.41)
pt3dadd(11.823, 109.964, 20.237, 3.352)
pt3dadd(11.742, 110.052, 20.232, 3.296)
pt3dadd(11.66, 110.14, 20.226, 3.24)
pt3dadd(11.579, 110.228, 20.221, 3.184)
pt3dadd(11.497, 110.316, 20.216, 3.128)
pt3dadd(11.416, 110.404, 20.211, 3.07)
pt3dadd(11.334, 110.492, 20.206, 3.014)
pt3dadd(11.255, 110.581, 20.197, 2.994)
pt3dadd(11.176, 110.671, 20.189, 2.974)
pt3dadd(11.097, 110.76, 20.181, 2.954)
pt3dadd(11.018, 110.85, 20.173, 2.934)
pt3dadd(10.938, 110.94, 20.164, 2.914)
pt3dadd(10.859, 111.029, 20.156, 2.894)
pt3dadd(10.78, 111.119, 20.148, 2.874)
pt3dadd(10.701, 111.208, 20.14, 2.854)
pt3dadd(10.622, 111.298, 20.131, 2.834)
pt3dadd(10.542, 111.388, 20.123, 2.814)
pt3dadd(10.469, 111.481, 20.107, 2.804)
pt3dadd(10.396, 111.574, 20.091, 2.792)
pt3dadd(10.323, 111.667, 20.075, 2.782)
pt3dadd(10.25, 111.76, 20.059, 2.772)
pt3dadd(10.176, 111.853, 20.043, 2.762)
pt3dadd(10.103, 111.946, 20.027, 2.752)
pt3dadd(10.03, 112.039, 20.011, 2.742)
pt3dadd(9.957, 112.133, 19.995, 2.732)
pt3dadd(9.884, 112.226, 19.979, 2.722)
pt3dadd(9.812, 112.319, 19.961, 2.712)
pt3dadd(9.755, 112.417, 19.929, 2.712)
pt3dadd(9.698, 112.515, 19.896, 2.712)
pt3dadd(9.64, 112.613, 19.863, 2.712)
pt3dadd(9.583, 112.711, 19.83, 2.712)
pt3dadd(9.525, 112.809, 19.798, 2.712)
pt3dadd(9.468, 112.906, 19.765, 2.712)
pt3dadd(9.411, 113.004, 19.732, 2.712)
pt3dadd(9.353, 113.102, 19.699, 2.712)
pt3dadd(9.296, 113.2, 19.667, 2.712)
pt3dadd(9.238, 113.297, 19.635, 2.714)
pt3dadd(9.17, 113.393, 19.614, 2.726)
pt3dadd(9.103, 113.489, 19.592, 2.74)
pt3dadd(9.035, 113.585, 19.57, 2.752)
pt3dadd(8.968, 113.681, 19.549, 2.766)
pt3dadd(8.9, 113.776, 19.527, 2.78)
pt3dadd(8.833, 113.872, 19.505, 2.792)
pt3dadd(8.765, 113.968, 19.484, 2.806)
pt3dadd(8.698, 114.064, 19.462, 2.818)
pt3dadd(8.631, 114.159, 19.44, 2.832)
pt3dadd(8.562, 114.255, 19.42, 2.842)
pt3dadd(8.491, 114.349, 19.404, 2.834)
pt3dadd(8.419, 114.444, 19.388, 2.828)
pt3dadd(8.347, 114.538, 19.373, 2.82)
pt3dadd(8.275, 114.632, 19.357, 2.812)
pt3dadd(8.204, 114.727, 19.341, 2.804)
pt3dadd(8.132, 114.821, 19.326, 2.798)
pt3dadd(8.06, 114.915, 19.31, 2.79)
pt3dadd(7.988, 115.01, 19.295, 2.782)
pt3dadd(7.917, 115.104, 19.279, 2.776)
pt3dadd(7.844, 115.198, 19.264, 2.762)
pt3dadd(7.768, 115.29, 19.255, 2.718)
pt3dadd(7.692, 115.383, 19.247, 2.674)
pt3dadd(7.616, 115.475, 19.238, 2.628)
pt3dadd(7.54, 115.567, 19.229, 2.584)
pt3dadd(7.464, 115.66, 19.22, 2.54)
pt3dadd(7.389, 115.752, 19.211, 2.496)
pt3dadd(7.313, 115.844, 19.203, 2.45)
pt3dadd(7.237, 115.937, 19.194, 2.406)
pt3dadd(7.161, 116.029, 19.185, 2.362)
pt3dadd(7.084, 116.121, 19.177, 2.32)
pt3dadd(7.005, 116.211, 19.176, 2.302)
pt3dadd(6.926, 116.301, 19.174, 2.282)
pt3dadd(6.847, 116.391, 19.172, 2.264)
pt3dadd(6.768, 116.481, 19.17, 2.246)
pt3dadd(6.688, 116.571, 19.169, 2.226)
pt3dadd(6.609, 116.661, 19.167, 2.208)
pt3dadd(6.53, 116.752, 19.166, 2.19)
pt3dadd(6.451, 116.842, 19.164, 2.17)
pt3dadd(6.371, 116.932, 19.162, 2.152)
pt3dadd(6.293, 117.022, 19.161, 2.136)
pt3dadd(6.218, 117.116, 19.16, 2.13)
pt3dadd(6.143, 117.21, 19.159, 2.124)
pt3dadd(6.068, 117.304, 19.159, 2.12)
pt3dadd(5.994, 117.398, 19.158, 2.114)
pt3dadd(5.919, 117.492, 19.157, 2.108)
pt3dadd(5.844, 117.585, 19.156, 2.104)
pt3dadd(5.769, 117.679, 19.156, 2.098)
pt3dadd(5.694, 117.773, 19.155, 2.094)
pt3dadd(5.619, 117.867, 19.154, 2.088)
pt3dadd(5.547, 117.962, 19.153, 2.086)
pt3dadd(5.485, 118.065, 19.152, 2.104)
pt3dadd(5.422, 118.167, 19.151, 2.12)
pt3dadd(5.36, 118.27, 19.15, 2.136)
pt3dadd(5.297, 118.372, 19.148, 2.154)
pt3dadd(5.235, 118.475, 19.147, 2.17)
pt3dadd(5.173, 118.577, 19.146, 2.188)
pt3dadd(5.11, 118.68, 19.145, 2.204)
pt3dadd(5.048, 118.782, 19.143, 2.22)
pt3dadd(4.985, 118.885, 19.142, 2.238)
pt3dadd(4.921, 118.986, 19.141, 2.25)
pt3dadd(4.848, 119.081, 19.138, 2.252)
pt3dadd(4.775, 119.176, 19.136, 2.252)
pt3dadd(4.702, 119.271, 19.134, 2.254)
pt3dadd(4.629, 119.366, 19.131, 2.254)
pt3dadd(4.556, 119.461, 19.129, 2.256)
}
}
proc shape3d_2() {
apic { pt3dadd(4.482, 119.557, 19.127, 2.256)
pt3dadd(4.409, 119.652, 19.124, 2.258)
pt3dadd(4.336, 119.747, 19.122, 2.258)
pt3dadd(4.263, 119.842, 19.12, 2.26)
pt3dadd(4.189, 119.936, 19.117, 2.264)
pt3dadd(4.111, 120.026, 19.113, 2.286)
pt3dadd(4.032, 120.118, 19.109, 2.31)
pt3dadd(3.954, 120.209, 19.105, 2.332)
pt3dadd(3.875, 120.299, 19.101, 2.356)
pt3dadd(3.797, 120.39, 19.097, 2.378)
pt3dadd(3.718, 120.48, 19.093, 2.4)
pt3dadd(3.64, 120.571, 19.089, 2.424)
pt3dadd(3.561, 120.661, 19.085, 2.446)
pt3dadd(3.483, 120.752, 19.081, 2.47)
pt3dadd(3.403, 120.842, 19.076, 2.496)
pt3dadd(3.32, 120.928, 19.071, 2.542)
pt3dadd(3.237, 121.014, 19.065, 2.586)
pt3dadd(3.154, 121.1, 19.06, 2.632)
pt3dadd(3.071, 121.187, 19.054, 2.676)
pt3dadd(2.988, 121.273, 19.049, 2.722)
pt3dadd(2.904, 121.36, 19.043, 2.766)
pt3dadd(2.821, 121.446, 19.037, 2.812)
pt3dadd(2.738, 121.532, 19.032, 2.856)
pt3dadd(2.655, 121.619, 19.026, 2.902)
pt3dadd(2.57, 121.703, 19.02, 2.94)
pt3dadd(2.537, 121.8, 19.023, 2.888)
pt3dadd(2.562, 121.915, 19.038, 2.768)
pt3dadd(2.587, 122.032, 19.054, 2.646)
}
apic[1] {pt3dclear()
pt3dadd(2.587, 122.032, 19.054, 2.646)
pt3dadd(2.527, 122.063, 19.046, 2.674)
pt3dadd(2.422, 122.117, 19.032, 2.724)
pt3dadd(2.316, 122.171, 19.018, 2.772)
pt3dadd(2.21, 122.225, 19.003, 2.822)
pt3dadd(2.105, 122.28, 18.989, 2.87)
pt3dadd(1.999, 122.334, 18.975, 2.92)
pt3dadd(1.893, 122.388, 18.961, 2.968)
pt3dadd(1.788, 122.442, 18.947, 3.016)
pt3dadd(1.682, 122.496, 18.933, 3.066)
pt3dadd(1.581, 122.557, 18.915, 3.086)
pt3dadd(1.485, 122.624, 18.893, 3.068)
pt3dadd(1.39, 122.692, 18.872, 3.05)
pt3dadd(1.294, 122.76, 18.85, 3.032)
pt3dadd(1.198, 122.827, 18.828, 3.016)
pt3dadd(1.103, 122.894, 18.806, 2.998)
pt3dadd(1.007, 122.963, 18.784, 2.98)
pt3dadd(0.912, 123.03, 18.762, 2.962)
pt3dadd(0.816, 123.097, 18.74, 2.944)
pt3dadd(0.72, 123.166, 18.718, 2.926)
pt3dadd(0.623, 123.227, 18.69, 2.894)
pt3dadd(0.525, 123.283, 18.658, 2.852)
pt3dadd(0.427, 123.341, 18.625, 2.808)
pt3dadd(0.329, 123.397, 18.593, 2.764)
pt3dadd(0.23, 123.454, 18.56, 2.722)
pt3dadd(0.132, 123.511, 18.528, 2.678)
pt3dadd(0.034, 123.568, 18.495, 2.634)
pt3dadd(-0.064, 123.624, 18.463, 2.592)
pt3dadd(-0.162, 123.682, 18.43, 2.548)
pt3dadd(-0.261, 123.738, 18.398, 2.504)
pt3dadd(-0.358, 123.8, 18.371, 2.486)
pt3dadd(-0.455, 123.865, 18.35, 2.486)
pt3dadd(-0.552, 123.931, 18.329, 2.486)
pt3dadd(-0.649, 123.997, 18.307, 2.486)
pt3dadd(-0.747, 124.063, 18.286, 2.486)
pt3dadd(-0.843, 124.128, 18.264, 2.486)
pt3dadd(-0.941, 124.194, 18.243, 2.486)
pt3dadd(-1.038, 124.26, 18.221, 2.486)
pt3dadd(-1.135, 124.326, 18.2, 2.486)
pt3dadd(-1.232, 124.392, 18.178, 2.486)
pt3dadd(-1.328, 124.459, 18.161, 2.474)
pt3dadd(-1.424, 124.53, 18.146, 2.454)
pt3dadd(-1.519, 124.6, 18.131, 2.434)
pt3dadd(-1.615, 124.67, 18.116, 2.412)
pt3dadd(-1.711, 124.74, 18.101, 2.392)
pt3dadd(-1.806, 124.811, 18.086, 2.372)
pt3dadd(-1.902, 124.88, 18.071, 2.35)
pt3dadd(-1.998, 124.951, 18.056, 2.33)
pt3dadd(-2.093, 125.021, 18.041, 2.31)
pt3dadd(-2.189, 125.092, 18.026, 2.288)
pt3dadd(-2.285, 125.161, 18.014, 2.264)
pt3dadd(-2.382, 125.231, 18.003, 2.236)
pt3dadd(-2.479, 125.3, 17.993, 2.206)
pt3dadd(-2.576, 125.37, 17.983, 2.178)
pt3dadd(-2.673, 125.44, 17.972, 2.15)
pt3dadd(-2.77, 125.509, 17.962, 2.122)
pt3dadd(-2.867, 125.579, 17.951, 2.092)
pt3dadd(-2.964, 125.648, 17.94, 2.064)
pt3dadd(-3.061, 125.718, 17.93, 2.036)
pt3dadd(-3.158, 125.788, 17.919, 2.006)
pt3dadd(-3.259, 125.851, 17.911, 1.984)
pt3dadd(-3.363, 125.91, 17.904, 1.966)
pt3dadd(-3.467, 125.969, 17.897, 1.948)
pt3dadd(-3.572, 126.028, 17.89, 1.93)
pt3dadd(-3.676, 126.086, 17.884, 1.912)
pt3dadd(-3.78, 126.145, 17.877, 1.894)
pt3dadd(-3.884, 126.205, 17.87, 1.876)
pt3dadd(-3.988, 126.264, 17.863, 1.858)
pt3dadd(-4.093, 126.323, 17.856, 1.84)
pt3dadd(-4.197, 126.382, 17.849, 1.822)
pt3dadd(-4.297, 126.446, 17.84, 1.826)
pt3dadd(-4.394, 126.515, 17.829, 1.842)
pt3dadd(-4.492, 126.584, 17.818, 1.858)
pt3dadd(-4.589, 126.653, 17.806, 1.874)
pt3dadd(-4.687, 126.721, 17.795, 1.89)
pt3dadd(-4.784, 126.791, 17.784, 1.906)
pt3dadd(-4.881, 126.859, 17.773, 1.922)
pt3dadd(-4.979, 126.928, 17.762, 1.938)
pt3dadd(-5.076, 126.996, 17.751, 1.954)
pt3dadd(-5.174, 127.066, 17.74, 1.97)
pt3dadd(-5.266, 127.134, 17.713, 1.98)
pt3dadd(-5.355, 127.201, 17.676, 1.986)
pt3dadd(-5.444, 127.268, 17.64, 1.992)
pt3dadd(-5.533, 127.337, 17.603, 1.998)
pt3dadd(-5.622, 127.404, 17.567, 2.004)
pt3dadd(-5.71, 127.471, 17.53, 2.01)
pt3dadd(-5.799, 127.54, 17.494, 2.016)
pt3dadd(-5.888, 127.607, 17.457, 2.02)
pt3dadd(-5.977, 127.675, 17.421, 2.026)
pt3dadd(-6.066, 127.742, 17.384, 2.032)
pt3dadd(-6.151, 127.817, 17.35, 1.998)
pt3dadd(-6.235, 127.892, 17.316, 1.95)
pt3dadd(-6.319, 127.968, 17.282, 1.904)
pt3dadd(-6.403, 128.044, 17.249, 1.858)
pt3dadd(-6.487, 128.119, 17.215, 1.81)
pt3dadd(-6.571, 128.195, 17.181, 1.764)
pt3dadd(-6.655, 128.27, 17.148, 1.716)
pt3dadd(-6.739, 128.346, 17.114, 1.67)
pt3dadd(-6.823, 128.422, 17.08, 1.622)
pt3dadd(-6.907, 128.497, 17.046, 1.576)
pt3dadd(-6.992, 128.576, 17.023, 1.532)
pt3dadd(-7.077, 128.657, 17.001, 1.488)
pt3dadd(-7.162, 128.737, 16.979, 1.444)
pt3dadd(-7.248, 128.816, 16.957, 1.4)
pt3dadd(-7.333, 128.897, 16.935, 1.356)
pt3dadd(-7.418, 128.977, 16.913, 1.312)
pt3dadd(-7.503, 129.058, 16.892, 1.268)
pt3dadd(-7.589, 129.138, 16.87, 1.224)
pt3dadd(-7.674, 129.218, 16.848, 1.18)
pt3dadd(-7.759, 129.299, 16.826, 1.136)
pt3dadd(-7.846, 129.378, 16.81, 1.13)
pt3dadd(-7.934, 129.458, 16.794, 1.13)
pt3dadd(-8.022, 129.539, 16.779, 1.13)
pt3dadd(-8.109, 129.618, 16.763, 1.13)
pt3dadd(-8.197, 129.698, 16.748, 1.13)
pt3dadd(-8.284, 129.778, 16.733, 1.13)
pt3dadd(-8.372, 129.858, 16.717, 1.13)
pt3dadd(-8.459, 129.938, 16.702, 1.13)
pt3dadd(-8.547, 130.018, 16.686, 1.13)
pt3dadd(-8.634, 130.098, 16.671, 1.13)
pt3dadd(-8.724, 130.177, 16.66, 1.154)
pt3dadd(-8.814, 130.255, 16.65, 1.182)
pt3dadd(-8.904, 130.333, 16.64, 1.21)
pt3dadd(-8.994, 130.412, 16.629, 1.236)
pt3dadd(-9.084, 130.49, 16.619, 1.264)
pt3dadd(-9.174, 130.57, 16.609, 1.292)
pt3dadd(-9.264, 130.648, 16.599, 1.32)
pt3dadd(-9.354, 130.726, 16.589, 1.348)
pt3dadd(-9.444, 130.805, 16.579, 1.374)
pt3dadd(-9.534, 130.883, 16.569, 1.402)
pt3dadd(-9.627, 130.955, 16.55, 1.41)
pt3dadd(-9.722, 131.024, 16.53, 1.416)
pt3dadd(-9.816, 131.095, 16.51, 1.422)
pt3dadd(-9.91, 131.165, 16.49, 1.426)
pt3dadd(-10.004, 131.236, 16.47, 1.432)
pt3dadd(-10.098, 131.306, 16.45, 1.438)
pt3dadd(-10.193, 131.376, 16.43, 1.442)
pt3dadd(-10.287, 131.447, 16.41, 1.448)
pt3dadd(-10.381, 131.516, 16.39, 1.454)
pt3dadd(-10.475, 131.587, 16.37, 1.458)
pt3dadd(-10.573, 131.644, 16.335, 1.428)
pt3dadd(-10.67, 131.699, 16.3, 1.396)
pt3dadd(-10.768, 131.755, 16.265, 1.364)
pt3dadd(-10.865, 131.81, 16.23, 1.334)
pt3dadd(-10.963, 131.867, 16.194, 1.302)
pt3dadd(-11.06, 131.922, 16.159, 1.27)
pt3dadd(-11.158, 131.978, 16.124, 1.24)
pt3dadd(-11.255, 132.034, 16.089, 1.208)
pt3dadd(-11.353, 132.09, 16.054, 1.176)
pt3dadd(-11.45, 132.145, 16.019, 1.144)
pt3dadd(-11.546, 132.21, 15.992, 1.158)
pt3dadd(-11.642, 132.275, 15.966, 1.17)
pt3dadd(-11.738, 132.341, 15.94, 1.184)
pt3dadd(-11.834, 132.406, 15.914, 1.198)
pt3dadd(-11.93, 132.47, 15.888, 1.21)
pt3dadd(-12.026, 132.535, 15.862, 1.224)
pt3dadd(-12.122, 132.6, 15.835, 1.238)
pt3dadd(-12.217, 132.665, 15.809, 1.25)
pt3dadd(-12.313, 132.73, 15.783, 1.264)
pt3dadd(-12.409, 132.794, 15.757, 1.278)
pt3dadd(-12.504, 132.864, 15.735, 1.3)
pt3dadd(-12.598, 132.932, 15.713, 1.322)
pt3dadd(-12.693, 133.002, 15.69, 1.346)
pt3dadd(-12.787, 133.07, 15.668, 1.368)
pt3dadd(-12.882, 133.14, 15.646, 1.39)
pt3dadd(-12.977, 133.208, 15.624, 1.414)
pt3dadd(-13.071, 133.278, 15.602, 1.436)
pt3dadd(-13.166, 133.346, 15.58, 1.46)
pt3dadd(-13.26, 133.415, 15.557, 1.482)
pt3dadd(-13.355, 133.484, 15.535, 1.504)
pt3dadd(-13.448, 133.556, 15.517, 1.534)
pt3dadd(-13.541, 133.63, 15.498, 1.566)
}
}
proc shape3d_3() {
apic[1] { pt3dadd(-13.634, 133.702, 15.48, 1.596)
pt3dadd(-13.727, 133.774, 15.462, 1.626)
pt3dadd(-13.82, 133.846, 15.443, 1.656)
pt3dadd(-13.914, 133.919, 15.425, 1.686)
pt3dadd(-14.007, 133.991, 15.406, 1.716)
pt3dadd(-14.1, 134.063, 15.388, 1.748)
pt3dadd(-14.193, 134.136, 15.369, 1.778)
pt3dadd(-14.286, 134.208, 15.351, 1.808)
}
apic[2] {pt3dclear()
pt3dadd(-14.286, 134.208, 15.351, 1.808)
pt3dadd(-14.31, 134.222, 15.342, 1.812)
pt3dadd(-14.406, 134.28, 15.308, 1.828)
pt3dadd(-14.503, 134.339, 15.274, 1.844)
pt3dadd(-14.599, 134.396, 15.239, 1.86)
pt3dadd(-14.696, 134.455, 15.205, 1.876)
pt3dadd(-14.792, 134.513, 15.17, 1.892)
pt3dadd(-14.889, 134.572, 15.136, 1.908)
pt3dadd(-14.985, 134.629, 15.102, 1.924)
pt3dadd(-15.081, 134.688, 15.067, 1.94)
pt3dadd(-15.178, 134.747, 15.033, 1.956)
pt3dadd(-15.274, 134.804, 14.998, 1.972)
pt3dadd(-15.371, 134.863, 14.964, 1.986)
pt3dadd(-15.466, 134.926, 14.934, 1.976)
pt3dadd(-15.559, 134.994, 14.908, 1.932)
pt3dadd(-15.653, 135.064, 14.882, 1.886)
pt3dadd(-15.746, 135.132, 14.856, 1.842)
pt3dadd(-15.839, 135.2, 14.831, 1.796)
pt3dadd(-15.933, 135.27, 14.805, 1.752)
pt3dadd(-16.026, 135.338, 14.779, 1.708)
pt3dadd(-16.12, 135.407, 14.754, 1.662)
pt3dadd(-16.213, 135.475, 14.728, 1.618)
pt3dadd(-16.306, 135.545, 14.702, 1.572)
pt3dadd(-16.398, 135.616, 14.679, 1.54)
pt3dadd(-16.489, 135.691, 14.659, 1.518)
pt3dadd(-16.579, 135.766, 14.638, 1.498)
pt3dadd(-16.67, 135.841, 14.618, 1.478)
pt3dadd(-16.76, 135.916, 14.598, 1.458)
pt3dadd(-16.851, 135.991, 14.577, 1.438)
pt3dadd(-16.941, 136.066, 14.557, 1.418)
pt3dadd(-17.032, 136.141, 14.537, 1.398)
pt3dadd(-17.122, 136.216, 14.517, 1.378)
pt3dadd(-17.213, 136.291, 14.496, 1.356)
pt3dadd(-17.301, 136.368, 14.479, 1.378)
pt3dadd(-17.388, 136.45, 14.463, 1.44)
pt3dadd(-17.475, 136.53, 14.448, 1.504)
pt3dadd(-17.562, 136.61, 14.433, 1.566)
pt3dadd(-17.649, 136.692, 14.418, 1.63)
pt3dadd(-17.736, 136.772, 14.403, 1.694)
pt3dadd(-17.823, 136.853, 14.387, 1.756)
pt3dadd(-17.91, 136.934, 14.372, 1.82)
pt3dadd(-17.997, 137.015, 14.357, 1.884)
pt3dadd(-18.083, 137.095, 14.342, 1.946)
pt3dadd(-18.161, 137.184, 14.328, 1.974)
pt3dadd(-18.23, 137.282, 14.317, 1.964)
pt3dadd(-18.298, 137.38, 14.305, 1.952)
pt3dadd(-18.366, 137.477, 14.293, 1.942)
pt3dadd(-18.435, 137.575, 14.281, 1.93)
pt3dadd(-18.503, 137.672, 14.269, 1.92)
pt3dadd(-18.571, 137.77, 14.257, 1.908)
pt3dadd(-18.639, 137.868, 14.246, 1.898)
pt3dadd(-18.708, 137.965, 14.234, 1.886)
pt3dadd(-18.776, 138.062, 14.222, 1.876)
pt3dadd(-18.85, 138.152, 14.201, 1.86)
pt3dadd(-18.931, 138.233, 14.17, 1.842)
pt3dadd(-19.011, 138.314, 14.139, 1.822)
pt3dadd(-19.092, 138.395, 14.108, 1.804)
pt3dadd(-19.172, 138.476, 14.077, 1.786)
pt3dadd(-19.252, 138.557, 14.046, 1.766)
pt3dadd(-19.333, 138.638, 14.016, 1.748)
pt3dadd(-19.413, 138.72, 13.985, 1.73)
pt3dadd(-19.494, 138.8, 13.954, 1.71)
pt3dadd(-19.574, 138.882, 13.923, 1.692)
pt3dadd(-19.659, 138.956, 13.891, 1.684)
pt3dadd(-19.746, 139.03, 13.858, 1.68)
pt3dadd(-19.832, 139.103, 13.825, 1.678)
pt3dadd(-19.919, 139.176, 13.792, 1.674)
pt3dadd(-20.006, 139.248, 13.759, 1.672)
pt3dadd(-20.093, 139.321, 13.726, 1.668)
pt3dadd(-20.179, 139.394, 13.693, 1.664)
pt3dadd(-20.266, 139.468, 13.66, 1.662)
pt3dadd(-20.353, 139.54, 13.627, 1.658)
pt3dadd(-20.44, 139.613, 13.594, 1.654)
pt3dadd(-20.527, 139.688, 13.568, 1.666)
pt3dadd(-20.615, 139.766, 13.545, 1.68)
pt3dadd(-20.702, 139.843, 13.522, 1.696)
pt3dadd(-20.79, 139.92, 13.499, 1.712)
pt3dadd(-20.878, 139.997, 13.476, 1.726)
pt3dadd(-20.965, 140.075, 13.453, 1.742)
pt3dadd(-21.053, 140.152, 13.43, 1.758)
pt3dadd(-21.141, 140.228, 13.407, 1.772)
pt3dadd(-21.228, 140.306, 13.384, 1.788)
pt3dadd(-21.316, 140.383, 13.361, 1.804)
pt3dadd(-21.402, 140.464, 13.345, 1.808)
pt3dadd(-21.488, 140.546, 13.33, 1.808)
pt3dadd(-21.574, 140.628, 13.316, 1.808)
pt3dadd(-21.66, 140.71, 13.302, 1.808)
pt3dadd(-21.746, 140.792, 13.288, 1.808)
pt3dadd(-21.832, 140.874, 13.273, 1.808)
pt3dadd(-21.917, 140.957, 13.259, 1.808)
pt3dadd(-22.003, 141.038, 13.245, 1.808)
pt3dadd(-22.089, 141.12, 13.23, 1.808)
pt3dadd(-22.175, 141.203, 13.216, 1.808)
pt3dadd(-22.258, 141.288, 13.204, 1.808)
pt3dadd(-22.34, 141.374, 13.192, 1.808)
pt3dadd(-22.423, 141.461, 13.181, 1.808)
pt3dadd(-22.505, 141.546, 13.169, 1.808)
pt3dadd(-22.587, 141.632, 13.157, 1.808)
pt3dadd(-22.669, 141.719, 13.146, 1.808)
pt3dadd(-22.752, 141.805, 13.134, 1.808)
pt3dadd(-22.834, 141.892, 13.123, 1.808)
pt3dadd(-22.916, 141.978, 13.111, 1.808)
pt3dadd(-22.998, 142.064, 13.099, 1.808)
pt3dadd(-23.078, 142.153, 13.09, 1.808)
pt3dadd(-23.157, 142.242, 13.08, 1.808)
pt3dadd(-23.236, 142.332, 13.071, 1.808)
pt3dadd(-23.316, 142.422, 13.062, 1.808)
pt3dadd(-23.395, 142.511, 13.052, 1.808)
pt3dadd(-23.474, 142.601, 13.043, 1.808)
pt3dadd(-23.553, 142.691, 13.034, 1.808)
pt3dadd(-23.632, 142.78, 13.025, 1.808)
pt3dadd(-23.711, 142.87, 13.015, 1.808)
pt3dadd(-23.79, 142.96, 13.006, 1.808)
pt3dadd(-23.853, 143.054, 12.979, 1.784)
pt3dadd(-23.911, 143.152, 12.945, 1.754)
pt3dadd(-23.969, 143.249, 12.911, 1.724)
pt3dadd(-24.027, 143.345, 12.878, 1.692)
pt3dadd(-24.085, 143.442, 12.844, 1.662)
pt3dadd(-24.143, 143.539, 12.811, 1.63)
pt3dadd(-24.202, 143.636, 12.777, 1.6)
pt3dadd(-24.26, 143.734, 12.744, 1.568)
pt3dadd(-24.318, 143.83, 12.71, 1.538)
pt3dadd(-24.376, 143.927, 12.677, 1.508)
pt3dadd(-24.439, 144.023, 12.647, 1.496)
pt3dadd(-24.503, 144.119, 12.62, 1.49)
pt3dadd(-24.567, 144.215, 12.592, 1.484)
pt3dadd(-24.632, 144.31, 12.564, 1.478)
pt3dadd(-24.696, 144.406, 12.536, 1.472)
pt3dadd(-24.761, 144.5, 12.508, 1.466)
pt3dadd(-24.825, 144.596, 12.48, 1.46)
pt3dadd(-24.89, 144.692, 12.453, 1.454)
pt3dadd(-24.954, 144.787, 12.425, 1.448)
pt3dadd(-25.018, 144.883, 12.397, 1.442)
pt3dadd(-25.087, 144.977, 12.374, 1.452)
pt3dadd(-25.158, 145.07, 12.352, 1.466)
pt3dadd(-25.228, 145.164, 12.33, 1.48)
pt3dadd(-25.299, 145.258, 12.308, 1.494)
pt3dadd(-25.369, 145.351, 12.286, 1.508)
pt3dadd(-25.44, 145.445, 12.265, 1.522)
pt3dadd(-25.51, 145.538, 12.243, 1.536)
pt3dadd(-25.581, 145.632, 12.221, 1.55)
pt3dadd(-25.651, 145.726, 12.199, 1.564)
pt3dadd(-25.722, 145.819, 12.177, 1.58)
pt3dadd(-25.798, 145.909, 12.161, 1.582)
pt3dadd(-25.876, 145.999, 12.146, 1.582)
pt3dadd(-25.954, 146.088, 12.131, 1.582)
pt3dadd(-26.032, 146.178, 12.116, 1.582)
pt3dadd(-26.11, 146.267, 12.101, 1.582)
pt3dadd(-26.188, 146.357, 12.086, 1.582)
pt3dadd(-26.266, 146.446, 12.071, 1.582)
pt3dadd(-26.344, 146.536, 12.056, 1.582)
pt3dadd(-26.422, 146.624, 12.041, 1.582)
pt3dadd(-26.5, 146.714, 12.026, 1.582)
pt3dadd(-26.581, 146.801, 12.013, 1.582)
pt3dadd(-26.663, 146.888, 12.001, 1.582)
pt3dadd(-26.744, 146.975, 11.989, 1.582)
pt3dadd(-26.826, 147.061, 11.976, 1.582)
pt3dadd(-26.907, 147.148, 11.964, 1.582)
pt3dadd(-26.989, 147.235, 11.952, 1.582)
pt3dadd(-27.071, 147.322, 11.94, 1.582)
pt3dadd(-27.152, 147.408, 11.927, 1.582)
pt3dadd(-27.234, 147.496, 11.915, 1.582)
pt3dadd(-27.315, 147.582, 11.903, 1.582)
pt3dadd(-27.398, 147.667, 11.887, 1.584)
pt3dadd(-27.481, 147.751, 11.871, 1.588)
pt3dadd(-27.564, 147.836, 11.855, 1.592)
pt3dadd(-27.646, 147.92, 11.839, 1.594)
pt3dadd(-27.729, 148.006, 11.822, 1.598)
pt3dadd(-27.812, 148.09, 11.806, 1.602)
pt3dadd(-27.895, 148.175, 11.79, 1.604)
pt3dadd(-27.978, 148.26, 11.774, 1.608)
pt3dadd(-28.06, 148.344, 11.757, 1.612)
pt3dadd(-28.143, 148.429, 11.741, 1.614)
pt3dadd(-28.218, 148.507, 11.699, 1.634)
pt3dadd(-28.292, 148.585, 11.654, 1.654)
pt3dadd(-28.365, 148.663, 11.609, 1.674)
pt3dadd(-28.439, 148.741, 11.564, 1.694)
pt3dadd(-28.512, 148.818, 11.519, 1.716)
pt3dadd(-28.586, 148.896, 11.474, 1.736)
pt3dadd(-28.66, 148.974, 11.429, 1.756)
pt3dadd(-28.733, 149.052, 11.384, 1.776)
pt3dadd(-28.807, 149.13, 11.339, 1.798)
pt3dadd(-28.881, 149.208, 11.294, 1.818)
pt3dadd(-28.957, 149.292, 11.263, 1.836)
pt3dadd(-29.034, 149.377, 11.233, 1.854)
pt3dadd(-29.111, 149.462, 11.203, 1.872)
pt3dadd(-29.188, 149.546, 11.173, 1.89)
pt3dadd(-29.265, 149.632, 11.143, 1.908)
pt3dadd(-29.341, 149.717, 11.114, 1.926)
pt3dadd(-29.418, 149.802, 11.084, 1.944)
pt3dadd(-29.495, 149.887, 11.054, 1.964)
pt3dadd(-29.572, 149.971, 11.024, 1.982)
}
}
proc shape3d_4() {
apic[2] { pt3dadd(-29.649, 150.056, 10.994, 2)
pt3dadd(-29.726, 150.145, 10.972, 1.992)
pt3dadd(-29.803, 150.233, 10.951, 1.982)
pt3dadd(-29.88, 150.322, 10.931, 1.972)
pt3dadd(-29.957, 150.41, 10.91, 1.962)
pt3dadd(-30.034, 150.499, 10.889, 1.952)
pt3dadd(-30.111, 150.587, 10.868, 1.942)
pt3dadd(-30.188, 150.676, 10.847, 1.932)
pt3dadd(-30.265, 150.764, 10.826, 1.922)
pt3dadd(-30.342, 150.853, 10.805, 1.914)
pt3dadd(-30.419, 150.942, 10.784, 1.904)
pt3dadd(-30.489, 151.034, 10.76, 1.906)
pt3dadd(-30.558, 151.128, 10.735, 1.91)
pt3dadd(-30.627, 151.222, 10.71, 1.912)
pt3dadd(-30.697, 151.314, 10.685, 1.916)
pt3dadd(-30.766, 151.408, 10.661, 1.92)
pt3dadd(-30.835, 151.501, 10.636, 1.924)
pt3dadd(-30.905, 151.595, 10.611, 1.928)
pt3dadd(-30.974, 151.688, 10.586, 1.932)
pt3dadd(-31.043, 151.781, 10.562, 1.936)
pt3dadd(-31.113, 151.874, 10.537, 1.938)
pt3dadd(-31.17, 151.973, 10.505, 1.97)
pt3dadd(-31.228, 152.07, 10.472, 2.002)
pt3dadd(-31.285, 152.168, 10.44, 2.032)
pt3dadd(-31.343, 152.266, 10.407, 2.064)
pt3dadd(-31.4, 152.364, 10.375, 2.096)
pt3dadd(-31.457, 152.461, 10.342, 2.126)
pt3dadd(-31.515, 152.56, 10.309, 2.158)
pt3dadd(-31.572, 152.658, 10.277, 2.19)
pt3dadd(-31.63, 152.755, 10.245, 2.222)
pt3dadd(-31.687, 152.854, 10.212, 2.252)
pt3dadd(-31.756, 152.948, 10.192, 2.27)
pt3dadd(-31.825, 153.043, 10.173, 2.284)
pt3dadd(-31.894, 153.139, 10.153, 2.3)
pt3dadd(-31.963, 153.234, 10.134, 2.316)
pt3dadd(-32.033, 153.33, 10.114, 2.332)
pt3dadd(-32.102, 153.425, 10.095, 2.348)
pt3dadd(-32.171, 153.52, 10.075, 2.364)
pt3dadd(-32.24, 153.616, 10.056, 2.378)
pt3dadd(-32.309, 153.71, 10.036, 2.394)
pt3dadd(-32.379, 153.805, 10.017, 2.41)
pt3dadd(-32.452, 153.9, 10.003, 2.404)
pt3dadd(-32.525, 153.994, 9.99, 2.396)
pt3dadd(-32.598, 154.087, 9.977, 2.388)
pt3dadd(-32.671, 154.181, 9.964, 2.38)
pt3dadd(-32.744, 154.274, 9.95, 2.372)
pt3dadd(-32.817, 154.368, 9.937, 2.364)
pt3dadd(-32.89, 154.463, 9.924, 2.356)
pt3dadd(-32.963, 154.556, 9.91, 2.35)
pt3dadd(-33.037, 154.65, 9.897, 2.342)
pt3dadd(-33.11, 154.744, 9.884, 2.334)
pt3dadd(-33.186, 154.836, 9.876, 2.304)
pt3dadd(-33.263, 154.927, 9.869, 2.274)
pt3dadd(-33.339, 155.02, 9.861, 2.244)
pt3dadd(-33.416, 155.112, 9.854, 2.214)
pt3dadd(-33.492, 155.203, 9.846, 2.184)
pt3dadd(-33.568, 155.296, 9.839, 2.154)
pt3dadd(-33.645, 155.388, 9.831, 2.124)
pt3dadd(-33.721, 155.48, 9.823, 2.094)
pt3dadd(-33.798, 155.572, 9.816, 2.064)
pt3dadd(-33.874, 155.664, 9.808, 2.034)
}
apic[3] {pt3dclear()
pt3dadd(-33.874, 155.664, 9.808, 2.034)
pt3dadd(-33.951, 155.749, 9.81, 2.02)
pt3dadd(-34.032, 155.838, 9.813, 2.006)
pt3dadd(-34.113, 155.927, 9.815, 1.99)
pt3dadd(-34.194, 156.014, 9.817, 1.976)
pt3dadd(-34.275, 156.103, 9.819, 1.962)
pt3dadd(-34.355, 156.192, 9.821, 1.946)
pt3dadd(-34.436, 156.281, 9.823, 1.932)
pt3dadd(-34.517, 156.37, 9.826, 1.918)
pt3dadd(-34.598, 156.458, 9.828, 1.902)
pt3dadd(-34.678, 156.547, 9.83, 1.888)
pt3dadd(-34.754, 156.641, 9.834, 1.872)
pt3dadd(-34.827, 156.736, 9.838, 1.856)
pt3dadd(-34.901, 156.83, 9.842, 1.84)
pt3dadd(-34.974, 156.925, 9.846, 1.824)
pt3dadd(-35.048, 157.02, 9.85, 1.808)
pt3dadd(-35.121, 157.115, 9.855, 1.792)
pt3dadd(-35.194, 157.208, 9.859, 1.776)
pt3dadd(-35.268, 157.303, 9.863, 1.76)
pt3dadd(-35.341, 157.398, 9.867, 1.744)
pt3dadd(-35.415, 157.493, 9.871, 1.728)
pt3dadd(-35.484, 157.591, 9.878, 1.716)
pt3dadd(-35.551, 157.69, 9.885, 1.704)
pt3dadd(-35.618, 157.789, 9.892, 1.694)
pt3dadd(-35.686, 157.888, 9.899, 1.682)
pt3dadd(-35.753, 157.987, 9.906, 1.67)
pt3dadd(-35.821, 158.086, 9.913, 1.66)
pt3dadd(-35.888, 158.185, 9.92, 1.648)
pt3dadd(-35.955, 158.284, 9.927, 1.636)
pt3dadd(-36.023, 158.383, 9.934, 1.626)
pt3dadd(-36.09, 158.482, 9.941, 1.614)
pt3dadd(-36.166, 158.574, 9.95, 1.624)
pt3dadd(-36.243, 158.665, 9.96, 1.642)
pt3dadd(-36.321, 158.755, 9.97, 1.658)
pt3dadd(-36.399, 158.846, 9.981, 1.674)
pt3dadd(-36.476, 158.936, 9.99, 1.692)
pt3dadd(-36.554, 159.028, 10, 1.708)
pt3dadd(-36.632, 159.119, 10.01, 1.724)
pt3dadd(-36.709, 159.209, 10.021, 1.74)
pt3dadd(-36.787, 159.3, 10.031, 1.758)
pt3dadd(-36.864, 159.39, 10.04, 1.774)
pt3dadd(-36.953, 159.463, 10.067, 1.746)
pt3dadd(-37.045, 159.532, 10.098, 1.708)
pt3dadd(-37.136, 159.6, 10.128, 1.67)
pt3dadd(-37.228, 159.668, 10.159, 1.632)
pt3dadd(-37.319, 159.737, 10.19, 1.592)
pt3dadd(-37.411, 159.805, 10.221, 1.554)
pt3dadd(-37.502, 159.872, 10.252, 1.516)
pt3dadd(-37.594, 159.941, 10.282, 1.478)
pt3dadd(-37.685, 160.009, 10.313, 1.438)
pt3dadd(-37.777, 160.078, 10.344, 1.4)
pt3dadd(-37.871, 160.144, 10.372, 1.392)
pt3dadd(-37.965, 160.21, 10.4, 1.386)
pt3dadd(-38.06, 160.277, 10.427, 1.382)
pt3dadd(-38.154, 160.343, 10.455, 1.376)
pt3dadd(-38.249, 160.409, 10.483, 1.372)
pt3dadd(-38.343, 160.475, 10.511, 1.366)
pt3dadd(-38.438, 160.541, 10.539, 1.362)
pt3dadd(-38.532, 160.607, 10.566, 1.356)
pt3dadd(-38.626, 160.673, 10.594, 1.352)
pt3dadd(-38.721, 160.739, 10.622, 1.346)
pt3dadd(-38.816, 160.808, 10.642, 1.388)
pt3dadd(-38.91, 160.878, 10.662, 1.434)
pt3dadd(-39.005, 160.948, 10.681, 1.48)
pt3dadd(-39.1, 161.017, 10.701, 1.526)
pt3dadd(-39.195, 161.087, 10.72, 1.572)
pt3dadd(-39.29, 161.156, 10.74, 1.618)
pt3dadd(-39.385, 161.227, 10.759, 1.662)
pt3dadd(-39.48, 161.297, 10.779, 1.708)
pt3dadd(-39.574, 161.366, 10.798, 1.754)
pt3dadd(-39.669, 161.436, 10.818, 1.8)
pt3dadd(-39.761, 161.513, 10.827, 1.804)
pt3dadd(-39.852, 161.59, 10.836, 1.804)
pt3dadd(-39.943, 161.668, 10.844, 1.804)
pt3dadd(-40.034, 161.744, 10.852, 1.806)
pt3dadd(-40.125, 161.822, 10.861, 1.806)
pt3dadd(-40.216, 161.9, 10.87, 1.806)
pt3dadd(-40.307, 161.977, 10.878, 1.806)
pt3dadd(-40.398, 162.055, 10.887, 1.806)
pt3dadd(-40.489, 162.132, 10.895, 1.808)
pt3dadd(-40.58, 162.21, 10.904, 1.808)
pt3dadd(-40.671, 162.289, 10.909, 1.796)
pt3dadd(-40.761, 162.367, 10.913, 1.784)
pt3dadd(-40.851, 162.446, 10.918, 1.772)
pt3dadd(-40.941, 162.526, 10.923, 1.758)
pt3dadd(-41.031, 162.605, 10.927, 1.746)
pt3dadd(-41.121, 162.684, 10.932, 1.734)
pt3dadd(-41.211, 162.763, 10.937, 1.72)
pt3dadd(-41.301, 162.842, 10.941, 1.708)
pt3dadd(-41.391, 162.922, 10.946, 1.696)
pt3dadd(-41.481, 163.001, 10.951, 1.684)
pt3dadd(-41.57, 163.081, 10.951, 1.656)
pt3dadd(-41.658, 163.163, 10.951, 1.628)
pt3dadd(-41.747, 163.243, 10.951, 1.598)
pt3dadd(-41.835, 163.325, 10.951, 1.57)
pt3dadd(-41.924, 163.405, 10.951, 1.542)
pt3dadd(-42.013, 163.486, 10.951, 1.514)
pt3dadd(-42.101, 163.567, 10.951, 1.484)
pt3dadd(-42.19, 163.648, 10.951, 1.456)
pt3dadd(-42.279, 163.729, 10.951, 1.428)
pt3dadd(-42.367, 163.81, 10.951, 1.4)
pt3dadd(-42.458, 163.888, 10.951, 1.406)
pt3dadd(-42.549, 163.966, 10.95, 1.414)
pt3dadd(-42.641, 164.044, 10.95, 1.422)
pt3dadd(-42.732, 164.122, 10.95, 1.43)
pt3dadd(-42.823, 164.2, 10.95, 1.44)
pt3dadd(-42.914, 164.278, 10.95, 1.448)
pt3dadd(-43.005, 164.356, 10.95, 1.456)
pt3dadd(-43.096, 164.434, 10.95, 1.464)
pt3dadd(-43.188, 164.512, 10.95, 1.472)
pt3dadd(-43.279, 164.59, 10.95, 1.48)
pt3dadd(-43.375, 164.662, 10.95, 1.49)
pt3dadd(-43.472, 164.732, 10.949, 1.502)
pt3dadd(-43.569, 164.803, 10.949, 1.512)
pt3dadd(-43.666, 164.874, 10.949, 1.522)
pt3dadd(-43.763, 164.945, 10.949, 1.532)
pt3dadd(-43.86, 165.016, 10.949, 1.542)
}
dend_5 {pt3dclear()
pt3dadd(-43.86, 165.016, 10.949, 1.542)
pt3dadd(-43.957, 165.086, 10.949, 1.552)
pt3dadd(-44.053, 165.157, 10.948, 1.562)
pt3dadd(-44.15, 165.228, 10.948, 1.572)
pt3dadd(-44.247, 165.299, 10.948, 1.582)
pt3dadd(-44.354, 165.354, 10.948, 1.582)
pt3dadd(-44.461, 165.408, 10.948, 1.582)
pt3dadd(-44.568, 165.463, 10.947, 1.582)
pt3dadd(-44.674, 165.517, 10.947, 1.582)
pt3dadd(-44.781, 165.572, 10.947, 1.582)
pt3dadd(-44.888, 165.628, 10.947, 1.582)
pt3dadd(-44.995, 165.682, 10.946, 1.582)
pt3dadd(-45.102, 165.737, 10.946, 1.582)
pt3dadd(-45.208, 165.791, 10.946, 1.582)
pt3dadd(-45.315, 165.846, 10.946, 1.582)
}
dend_5[1] {pt3dclear()
pt3dadd(-45.315, 165.846, 10.946, 1.582)
pt3dadd(-45.393, 165.893, 10.945, 1.582)
pt3dadd(-45.496, 165.955, 10.944, 1.582)
pt3dadd(-45.599, 166.018, 10.944, 1.582)
pt3dadd(-45.701, 166.079, 10.943, 1.582)
pt3dadd(-45.804, 166.141, 10.943, 1.582)
pt3dadd(-45.907, 166.204, 10.942, 1.582)
}
}
proc shape3d_5() {
dend_5[1] { pt3dadd(-46.01, 166.265, 10.942, 1.582)
pt3dadd(-46.115, 166.322, 10.941, 1.582)
pt3dadd(-46.221, 166.379, 10.94, 1.582)
pt3dadd(-46.326, 166.436, 10.939, 1.582)
pt3dadd(-46.432, 166.493, 10.939, 1.582)
pt3dadd(-46.538, 166.549, 10.938, 1.582)
pt3dadd(-46.644, 166.606, 10.937, 1.582)
pt3dadd(-46.75, 166.662, 10.936, 1.582)
pt3dadd(-46.856, 166.718, 10.935, 1.582)
pt3dadd(-46.962, 166.775, 10.935, 1.582)
pt3dadd(-47.067, 166.831, 10.934, 1.582)
pt3dadd(-47.177, 166.879, 10.932, 1.58)
pt3dadd(-47.288, 166.926, 10.931, 1.58)
pt3dadd(-47.399, 166.973, 10.93, 1.578)
pt3dadd(-47.509, 167.02, 10.928, 1.576)
pt3dadd(-47.62, 167.065, 10.927, 1.576)
pt3dadd(-47.73, 167.112, 10.925, 1.574)
pt3dadd(-47.841, 167.159, 10.924, 1.572)
pt3dadd(-47.952, 167.206, 10.922, 1.572)
pt3dadd(-48.062, 167.251, 10.921, 1.57)
pt3dadd(-48.173, 167.298, 10.92, 1.568)
pt3dadd(-48.276, 167.359, 10.917, 1.554)
pt3dadd(-48.378, 167.422, 10.915, 1.536)
pt3dadd(-48.48, 167.485, 10.912, 1.52)
pt3dadd(-48.582, 167.548, 10.91, 1.504)
pt3dadd(-48.685, 167.61, 10.907, 1.486)
pt3dadd(-48.787, 167.674, 10.905, 1.47)
pt3dadd(-48.889, 167.736, 10.902, 1.452)
pt3dadd(-48.991, 167.8, 10.9, 1.436)
pt3dadd(-49.093, 167.862, 10.897, 1.418)
pt3dadd(-49.195, 167.924, 10.895, 1.402)
pt3dadd(-49.303, 167.977, 10.889, 1.396)
pt3dadd(-49.411, 168.029, 10.884, 1.392)
pt3dadd(-49.52, 168.08, 10.878, 1.386)
pt3dadd(-49.628, 168.131, 10.872, 1.382)
pt3dadd(-49.736, 168.182, 10.866, 1.378)
pt3dadd(-49.845, 168.234, 10.861, 1.374)
pt3dadd(-49.953, 168.284, 10.855, 1.37)
pt3dadd(-50.061, 168.336, 10.849, 1.366)
pt3dadd(-50.169, 168.388, 10.843, 1.36)
pt3dadd(-50.278, 168.438, 10.837, 1.356)
pt3dadd(-50.383, 168.496, 10.829, 1.366)
pt3dadd(-50.487, 168.553, 10.819, 1.374)
pt3dadd(-50.592, 168.612, 10.81, 1.384)
pt3dadd(-50.696, 168.67, 10.801, 1.394)
pt3dadd(-50.801, 168.727, 10.792, 1.404)
pt3dadd(-50.905, 168.785, 10.783, 1.414)
pt3dadd(-51.01, 168.842, 10.774, 1.424)
pt3dadd(-51.115, 168.901, 10.765, 1.434)
pt3dadd(-51.219, 168.959, 10.756, 1.444)
pt3dadd(-51.324, 169.016, 10.747, 1.454)
pt3dadd(-51.422, 169.08, 10.725, 1.468)
pt3dadd(-51.519, 169.145, 10.702, 1.48)
pt3dadd(-51.617, 169.208, 10.679, 1.494)
pt3dadd(-51.714, 169.273, 10.657, 1.506)
pt3dadd(-51.812, 169.338, 10.634, 1.518)
pt3dadd(-51.91, 169.402, 10.612, 1.532)
pt3dadd(-52.007, 169.466, 10.589, 1.544)
pt3dadd(-52.105, 169.531, 10.566, 1.558)
pt3dadd(-52.202, 169.595, 10.544, 1.57)
pt3dadd(-52.299, 169.658, 10.519, 1.58)
pt3dadd(-52.39, 169.72, 10.478, 1.558)
pt3dadd(-52.481, 169.781, 10.437, 1.538)
pt3dadd(-52.572, 169.842, 10.395, 1.518)
pt3dadd(-52.662, 169.903, 10.354, 1.496)
pt3dadd(-52.753, 169.963, 10.313, 1.476)
pt3dadd(-52.844, 170.024, 10.272, 1.456)
pt3dadd(-52.934, 170.086, 10.23, 1.434)
pt3dadd(-53.025, 170.147, 10.189, 1.414)
pt3dadd(-53.116, 170.208, 10.148, 1.394)
pt3dadd(-53.208, 170.269, 10.11, 1.368)
pt3dadd(-53.306, 170.333, 10.087, 1.33)
pt3dadd(-53.405, 170.395, 10.065, 1.292)
pt3dadd(-53.503, 170.459, 10.043, 1.252)
pt3dadd(-53.601, 170.522, 10.02, 1.214)
pt3dadd(-53.699, 170.586, 9.998, 1.174)
pt3dadd(-53.798, 170.65, 9.975, 1.136)
pt3dadd(-53.896, 170.712, 9.953, 1.098)
pt3dadd(-53.994, 170.776, 9.93, 1.058)
pt3dadd(-54.093, 170.839, 9.908, 1.02)
pt3dadd(-54.194, 170.897, 9.888, 1)
pt3dadd(-54.306, 170.938, 9.879, 1.04)
pt3dadd(-54.418, 170.98, 9.869, 1.078)
pt3dadd(-54.53, 171.02, 9.859, 1.116)
pt3dadd(-54.642, 171.062, 9.849, 1.154)
pt3dadd(-54.755, 171.103, 9.839, 1.192)
pt3dadd(-54.867, 171.145, 9.83, 1.232)
pt3dadd(-54.979, 171.186, 9.82, 1.27)
pt3dadd(-55.091, 171.227, 9.81, 1.308)
pt3dadd(-55.203, 171.269, 9.8, 1.346)
pt3dadd(-55.316, 171.307, 9.793, 1.38)
pt3dadd(-55.432, 171.338, 9.795, 1.398)
pt3dadd(-55.548, 171.37, 9.796, 1.418)
pt3dadd(-55.664, 171.4, 9.798, 1.436)
pt3dadd(-55.779, 171.431, 9.799, 1.456)
pt3dadd(-55.895, 171.462, 9.8, 1.474)
pt3dadd(-56.011, 171.493, 9.802, 1.492)
pt3dadd(-56.127, 171.524, 9.803, 1.512)
pt3dadd(-56.243, 171.554, 9.804, 1.53)
pt3dadd(-56.359, 171.586, 9.806, 1.55)
pt3dadd(-56.473, 171.623, 9.808, 1.564)
pt3dadd(-56.581, 171.674, 9.81, 1.566)
pt3dadd(-56.689, 171.726, 9.813, 1.568)
pt3dadd(-56.798, 171.778, 9.815, 1.57)
pt3dadd(-56.906, 171.829, 9.818, 1.572)
pt3dadd(-57.014, 171.882, 9.82, 1.574)
pt3dadd(-57.122, 171.934, 9.823, 1.574)
pt3dadd(-57.23, 171.985, 9.825, 1.576)
pt3dadd(-57.339, 172.037, 9.828, 1.578)
pt3dadd(-57.447, 172.088, 9.83, 1.58)
pt3dadd(-57.555, 172.14, 9.833, 1.576)
pt3dadd(-57.664, 172.19, 9.839, 1.552)
pt3dadd(-57.773, 172.24, 9.844, 1.528)
pt3dadd(-57.882, 172.29, 9.849, 1.504)
pt3dadd(-57.991, 172.339, 9.855, 1.48)
pt3dadd(-58.1, 172.39, 9.86, 1.456)
pt3dadd(-58.209, 172.439, 9.865, 1.434)
pt3dadd(-58.318, 172.489, 9.871, 1.41)
pt3dadd(-58.427, 172.538, 9.876, 1.386)
pt3dadd(-58.536, 172.589, 9.881, 1.362)
pt3dadd(-58.644, 172.64, 9.888, 1.34)
pt3dadd(-58.749, 172.697, 9.896, 1.318)
pt3dadd(-58.855, 172.752, 9.905, 1.296)
pt3dadd(-58.961, 172.808, 9.914, 1.274)
pt3dadd(-59.066, 172.865, 9.922, 1.252)
pt3dadd(-59.172, 172.921, 9.931, 1.23)
pt3dadd(-59.277, 172.976, 9.939, 1.21)
pt3dadd(-59.383, 173.033, 9.948, 1.188)
pt3dadd(-59.489, 173.089, 9.957, 1.166)
pt3dadd(-59.594, 173.144, 9.965, 1.144)
pt3dadd(-59.697, 173.204, 9.977, 1.132)
pt3dadd(-59.795, 173.27, 9.995, 1.14)
pt3dadd(-59.893, 173.338, 10.012, 1.148)
pt3dadd(-59.99, 173.404, 10.03, 1.156)
pt3dadd(-60.088, 173.47, 10.047, 1.164)
pt3dadd(-60.186, 173.537, 10.064, 1.172)
pt3dadd(-60.284, 173.603, 10.082, 1.18)
pt3dadd(-60.381, 173.669, 10.099, 1.188)
pt3dadd(-60.479, 173.736, 10.116, 1.196)
pt3dadd(-60.577, 173.802, 10.134, 1.204)
pt3dadd(-60.67, 173.866, 10.163, 1.224)
pt3dadd(-60.759, 173.928, 10.207, 1.258)
pt3dadd(-60.847, 173.989, 10.252, 1.292)
pt3dadd(-60.936, 174.05, 10.296, 1.326)
pt3dadd(-61.024, 174.113, 10.34, 1.358)
pt3dadd(-61.113, 174.174, 10.384, 1.392)
pt3dadd(-61.201, 174.235, 10.428, 1.426)
pt3dadd(-61.289, 174.296, 10.472, 1.46)
pt3dadd(-61.378, 174.359, 10.516, 1.494)
pt3dadd(-61.466, 174.42, 10.56, 1.526)
pt3dadd(-61.556, 174.487, 10.594, 1.532)
pt3dadd(-61.647, 174.559, 10.618, 1.512)
pt3dadd(-61.739, 174.631, 10.643, 1.492)
pt3dadd(-61.83, 174.703, 10.667, 1.474)
pt3dadd(-61.922, 174.775, 10.691, 1.454)
pt3dadd(-62.013, 174.847, 10.716, 1.434)
pt3dadd(-62.104, 174.919, 10.74, 1.414)
pt3dadd(-62.196, 174.991, 10.765, 1.394)
pt3dadd(-62.287, 175.063, 10.789, 1.374)
pt3dadd(-62.379, 175.135, 10.813, 1.354)
pt3dadd(-62.479, 175.196, 10.831, 1.324)
pt3dadd(-62.587, 175.246, 10.842, 1.284)
pt3dadd(-62.696, 175.295, 10.854, 1.246)
pt3dadd(-62.804, 175.345, 10.865, 1.206)
pt3dadd(-62.912, 175.394, 10.876, 1.166)
pt3dadd(-63.021, 175.445, 10.887, 1.128)
pt3dadd(-63.129, 175.494, 10.899, 1.088)
pt3dadd(-63.237, 175.543, 10.91, 1.05)
pt3dadd(-63.346, 175.594, 10.921, 1.01)
pt3dadd(-63.454, 175.643, 10.933, 0.972)
pt3dadd(-63.56, 175.699, 10.939, 0.958)
pt3dadd(-63.663, 175.76, 10.94, 0.968)
pt3dadd(-63.766, 175.822, 10.941, 0.976)
pt3dadd(-63.87, 175.883, 10.943, 0.986)
pt3dadd(-63.973, 175.944, 10.944, 0.996)
pt3dadd(-64.076, 176.004, 10.946, 1.006)
pt3dadd(-64.179, 176.065, 10.947, 1.014)
pt3dadd(-64.283, 176.126, 10.948, 1.024)
pt3dadd(-64.386, 176.188, 10.95, 1.034)
pt3dadd(-64.489, 176.249, 10.951, 1.044)
pt3dadd(-64.594, 176.308, 10.952, 1.058)
pt3dadd(-64.7, 176.363, 10.952, 1.074)
pt3dadd(-64.807, 176.419, 10.952, 1.092)
pt3dadd(-64.913, 176.474, 10.952, 1.108)
pt3dadd(-65.019, 176.53, 10.952, 1.126)
pt3dadd(-65.126, 176.585, 10.952, 1.142)
pt3dadd(-65.232, 176.641, 10.952, 1.16)
pt3dadd(-65.338, 176.696, 10.952, 1.176)
pt3dadd(-65.445, 176.752, 10.952, 1.194)
pt3dadd(-65.551, 176.808, 10.952, 1.21)
pt3dadd(-65.658, 176.861, 10.952, 1.222)
pt3dadd(-65.767, 176.912, 10.952, 1.228)
pt3dadd(-65.875, 176.965, 10.952, 1.236)
pt3dadd(-65.983, 177.017, 10.952, 1.242)
pt3dadd(-66.091, 177.068, 10.952, 1.248)
pt3dadd(-66.2, 177.12, 10.952, 1.256)
pt3dadd(-66.308, 177.172, 10.952, 1.262)
pt3dadd(-66.416, 177.224, 10.952, 1.27)
pt3dadd(-66.524, 177.276, 10.952, 1.276)
pt3dadd(-66.633, 177.328, 10.952, 1.282)
}
}
proc shape3d_6() {
dend_5[1] { pt3dadd(-66.737, 177.386, 10.952, 1.266)
pt3dadd(-66.838, 177.451, 10.952, 1.234)
pt3dadd(-66.939, 177.516, 10.952, 1.202)
pt3dadd(-67.04, 177.581, 10.952, 1.17)
pt3dadd(-67.141, 177.644, 10.952, 1.138)
pt3dadd(-67.242, 177.709, 10.952, 1.104)
pt3dadd(-67.344, 177.774, 10.952, 1.072)
pt3dadd(-67.445, 177.839, 10.952, 1.04)
pt3dadd(-67.546, 177.904, 10.952, 1.008)
pt3dadd(-67.647, 177.968, 10.952, 0.974)
pt3dadd(-67.748, 178.033, 10.952, 0.966)
pt3dadd(-67.848, 178.099, 10.952, 0.972)
pt3dadd(-67.947, 178.166, 10.952, 0.98)
pt3dadd(-68.047, 178.232, 10.952, 0.988)
pt3dadd(-68.147, 178.298, 10.952, 0.996)
pt3dadd(-68.247, 178.366, 10.952, 1.002)
pt3dadd(-68.347, 178.432, 10.952, 1.01)
pt3dadd(-68.447, 178.498, 10.952, 1.018)
pt3dadd(-68.547, 178.565, 10.952, 1.026)
pt3dadd(-68.647, 178.631, 10.952, 1.032)
pt3dadd(-68.75, 178.692, 10.952, 1.05)
pt3dadd(-68.855, 178.751, 10.952, 1.074)
pt3dadd(-68.96, 178.808, 10.952, 1.098)
pt3dadd(-69.065, 178.867, 10.952, 1.122)
pt3dadd(-69.17, 178.925, 10.952, 1.146)
pt3dadd(-69.275, 178.982, 10.952, 1.17)
pt3dadd(-69.38, 179.041, 10.952, 1.196)
pt3dadd(-69.485, 179.099, 10.952, 1.22)
pt3dadd(-69.59, 179.158, 10.952, 1.244)
pt3dadd(-69.695, 179.215, 10.952, 1.268)
pt3dadd(-69.805, 179.263, 10.952, 1.296)
pt3dadd(-69.917, 179.305, 10.952, 1.326)
pt3dadd(-70.029, 179.348, 10.952, 1.358)
pt3dadd(-70.142, 179.39, 10.952, 1.388)
pt3dadd(-70.254, 179.432, 10.952, 1.418)
pt3dadd(-70.366, 179.474, 10.952, 1.448)
pt3dadd(-70.479, 179.516, 10.952, 1.48)
pt3dadd(-70.591, 179.558, 10.952, 1.51)
pt3dadd(-70.703, 179.602, 10.952, 1.54)
pt3dadd(-70.816, 179.644, 10.952, 1.572)
pt3dadd(-70.931, 179.675, 10.952, 1.582)
pt3dadd(-71.049, 179.7, 10.952, 1.582)
pt3dadd(-71.166, 179.725, 10.952, 1.582)
pt3dadd(-71.283, 179.75, 10.952, 1.582)
pt3dadd(-71.4, 179.777, 10.952, 1.582)
pt3dadd(-71.518, 179.802, 10.952, 1.582)
pt3dadd(-71.635, 179.827, 10.952, 1.582)
pt3dadd(-71.752, 179.852, 10.952, 1.582)
pt3dadd(-71.869, 179.878, 10.952, 1.582)
pt3dadd(-71.987, 179.904, 10.952, 1.582)
pt3dadd(-72.104, 179.928, 10.952, 1.57)
pt3dadd(-72.222, 179.952, 10.952, 1.552)
pt3dadd(-72.339, 179.976, 10.952, 1.534)
pt3dadd(-72.457, 180, 10.952, 1.518)
pt3dadd(-72.575, 180.024, 10.952, 1.5)
pt3dadd(-72.692, 180.047, 10.952, 1.482)
pt3dadd(-72.81, 180.071, 10.952, 1.464)
pt3dadd(-72.927, 180.095, 10.952, 1.446)
pt3dadd(-73.045, 180.119, 10.952, 1.428)
pt3dadd(-73.163, 180.143, 10.952, 1.41)
pt3dadd(-73.275, 180.184, 10.952, 1.426)
pt3dadd(-73.384, 180.233, 10.952, 1.458)
pt3dadd(-73.493, 180.283, 10.952, 1.492)
pt3dadd(-73.603, 180.332, 10.952, 1.526)
pt3dadd(-73.712, 180.382, 10.952, 1.558)
pt3dadd(-73.821, 180.432, 10.952, 1.592)
pt3dadd(-73.93, 180.481, 10.952, 1.624)
pt3dadd(-74.04, 180.53, 10.952, 1.658)
pt3dadd(-74.149, 180.581, 10.952, 1.69)
pt3dadd(-74.258, 180.63, 10.952, 1.724)
pt3dadd(-74.362, 180.69, 10.952, 1.76)
pt3dadd(-74.464, 180.752, 10.952, 1.796)
pt3dadd(-74.566, 180.816, 10.952, 1.832)
pt3dadd(-74.668, 180.878, 10.952, 1.87)
pt3dadd(-74.771, 180.942, 10.952, 1.906)
pt3dadd(-74.873, 181.004, 10.952, 1.942)
pt3dadd(-74.975, 181.068, 10.952, 1.978)
pt3dadd(-75.077, 181.13, 10.952, 2.016)
pt3dadd(-75.179, 181.194, 10.952, 2.052)
pt3dadd(-75.281, 181.256, 10.952, 2.088)
pt3dadd(-75.38, 181.326, 10.952, 2.108)
pt3dadd(-75.477, 181.396, 10.952, 2.124)
pt3dadd(-75.574, 181.466, 10.952, 2.14)
pt3dadd(-75.671, 181.537, 10.952, 2.156)
pt3dadd(-75.768, 181.608, 10.952, 2.172)
pt3dadd(-75.865, 181.678, 10.952, 2.186)
pt3dadd(-75.962, 181.748, 10.952, 2.202)
pt3dadd(-76.059, 181.819, 10.952, 2.218)
pt3dadd(-76.156, 181.89, 10.952, 2.234)
pt3dadd(-76.253, 181.961, 10.952, 2.248)
pt3dadd(-76.358, 182.018, 10.952, 2.204)
pt3dadd(-76.465, 182.072, 10.952, 2.138)
pt3dadd(-76.573, 182.125, 10.952, 2.074)
pt3dadd(-76.68, 182.179, 10.952, 2.008)
pt3dadd(-76.787, 182.233, 10.952, 1.942)
pt3dadd(-76.894, 182.287, 10.952, 1.878)
pt3dadd(-77.002, 182.341, 10.952, 1.812)
pt3dadd(-77.109, 182.395, 10.953, 1.748)
pt3dadd(-77.216, 182.449, 10.953, 1.682)
pt3dadd(-77.323, 182.502, 10.953, 1.618)
pt3dadd(-77.43, 182.558, 10.953, 1.608)
pt3dadd(-77.536, 182.614, 10.953, 1.616)
pt3dadd(-77.642, 182.67, 10.953, 1.624)
pt3dadd(-77.748, 182.726, 10.953, 1.632)
pt3dadd(-77.854, 182.782, 10.953, 1.64)
pt3dadd(-77.96, 182.838, 10.953, 1.648)
pt3dadd(-78.066, 182.894, 10.953, 1.656)
pt3dadd(-78.173, 182.951, 10.953, 1.664)
pt3dadd(-78.279, 183.006, 10.953, 1.672)
pt3dadd(-78.385, 183.062, 10.953, 1.68)
pt3dadd(-78.492, 183.115, 10.953, 1.71)
pt3dadd(-78.601, 183.167, 10.953, 1.744)
pt3dadd(-78.709, 183.22, 10.953, 1.78)
pt3dadd(-78.817, 183.271, 10.953, 1.816)
pt3dadd(-78.925, 183.323, 10.953, 1.85)
pt3dadd(-79.033, 183.374, 10.954, 1.886)
pt3dadd(-79.142, 183.427, 10.954, 1.922)
pt3dadd(-79.25, 183.479, 10.954, 1.956)
pt3dadd(-79.358, 183.53, 10.954, 1.992)
pt3dadd(-79.466, 183.582, 10.954, 2.026)
pt3dadd(-79.579, 183.623, 10.954, 2.03)
pt3dadd(-79.693, 183.66, 10.954, 2.022)
pt3dadd(-79.807, 183.698, 10.954, 2.016)
pt3dadd(-79.921, 183.736, 10.954, 2.01)
pt3dadd(-80.035, 183.773, 10.955, 2.004)
pt3dadd(-80.149, 183.811, 10.955, 1.998)
pt3dadd(-80.263, 183.848, 10.955, 1.992)
pt3dadd(-80.377, 183.886, 10.955, 1.986)
pt3dadd(-80.491, 183.923, 10.955, 1.978)
pt3dadd(-80.605, 183.961, 10.955, 1.972)
pt3dadd(-80.72, 183.992, 10.955, 1.898)
pt3dadd(-80.836, 184.024, 10.956, 1.804)
pt3dadd(-80.952, 184.054, 10.956, 1.71)
pt3dadd(-81.068, 184.085, 10.956, 1.618)
pt3dadd(-81.184, 184.115, 10.957, 1.524)
pt3dadd(-81.3, 184.146, 10.957, 1.432)
pt3dadd(-81.417, 184.176, 10.957, 1.338)
pt3dadd(-81.533, 184.207, 10.957, 1.246)
pt3dadd(-81.649, 184.237, 10.958, 1.152)
pt3dadd(-81.765, 184.268, 10.958, 1.06)
pt3dadd(-81.875, 184.314, 10.959, 1.088)
pt3dadd(-81.985, 184.363, 10.959, 1.15)
pt3dadd(-82.094, 184.412, 10.96, 1.21)
pt3dadd(-82.204, 184.462, 10.96, 1.27)
pt3dadd(-82.313, 184.511, 10.961, 1.33)
pt3dadd(-82.422, 184.56, 10.961, 1.39)
pt3dadd(-82.532, 184.609, 10.962, 1.45)
pt3dadd(-82.641, 184.66, 10.962, 1.512)
pt3dadd(-82.751, 184.709, 10.963, 1.572)
pt3dadd(-82.86, 184.758, 10.964, 1.632)
pt3dadd(-82.97, 184.806, 10.964, 1.69)
pt3dadd(-83.08, 184.854, 10.965, 1.75)
pt3dadd(-83.19, 184.902, 10.966, 1.808)
pt3dadd(-83.3, 184.95, 10.967, 1.868)
pt3dadd(-83.41, 184.998, 10.968, 1.926)
pt3dadd(-83.52, 185.046, 10.969, 1.984)
pt3dadd(-83.63, 185.094, 10.97, 2.044)
pt3dadd(-83.739, 185.142, 10.971, 2.102)
pt3dadd(-83.85, 185.19, 10.972, 2.162)
pt3dadd(-83.959, 185.238, 10.973, 2.22)
pt3dadd(-84.069, 185.287, 10.975, 2.24)
pt3dadd(-84.178, 185.336, 10.977, 2.25)
pt3dadd(-84.288, 185.386, 10.978, 2.262)
pt3dadd(-84.397, 185.435, 10.98, 2.274)
pt3dadd(-84.507, 185.484, 10.982, 2.286)
pt3dadd(-84.616, 185.532, 10.983, 2.296)
pt3dadd(-84.726, 185.581, 10.985, 2.308)
pt3dadd(-84.835, 185.63, 10.987, 2.32)
pt3dadd(-84.945, 185.68, 10.988, 2.332)
pt3dadd(-85.054, 185.729, 10.99, 2.342)
pt3dadd(-85.159, 185.788, 10.993, 2.302)
pt3dadd(-85.262, 185.849, 10.995, 2.252)
pt3dadd(-85.365, 185.91, 10.997, 2.202)
pt3dadd(-85.468, 185.971, 11, 2.152)
pt3dadd(-85.572, 186.032, 11.003, 2.102)
pt3dadd(-85.675, 186.094, 11.005, 2.054)
pt3dadd(-85.778, 186.154, 11.008, 2.004)
pt3dadd(-85.882, 186.215, 11.01, 1.954)
pt3dadd(-85.985, 186.276, 11.013, 1.904)
pt3dadd(-86.088, 186.337, 11.015, 1.854)
pt3dadd(-86.199, 186.384, 11.021, 1.758)
pt3dadd(-86.31, 186.427, 11.027, 1.656)
pt3dadd(-86.421, 186.472, 11.034, 1.552)
pt3dadd(-86.532, 186.516, 11.04, 1.448)
pt3dadd(-86.644, 186.56, 11.046, 1.346)
pt3dadd(-86.755, 186.605, 11.053, 1.242)
pt3dadd(-86.866, 186.649, 11.059, 1.138)
pt3dadd(-86.978, 186.692, 11.066, 1.036)
pt3dadd(-87.089, 186.737, 11.072, 0.932)
pt3dadd(-87.2, 186.781, 11.078, 0.828)
pt3dadd(-87.308, 186.833, 11.087, 0.784)
pt3dadd(-87.415, 186.886, 11.096, 0.746)
pt3dadd(-87.523, 186.938, 11.106, 0.71)
pt3dadd(-87.63, 186.99, 11.115, 0.674)
pt3dadd(-87.737, 187.043, 11.124, 0.638)
pt3dadd(-87.845, 187.096, 11.133, 0.602)
pt3dadd(-87.952, 187.148, 11.142, 0.564)
pt3dadd(-88.059, 187.201, 11.152, 0.528)
pt3dadd(-88.167, 187.253, 11.161, 0.492)
pt3dadd(-88.274, 187.306, 11.17, 0.456)
}
}
proc shape3d_7() {
dend_5[1] { pt3dadd(-88.38, 187.357, 11.188, 0.476)
pt3dadd(-88.486, 187.409, 11.207, 0.504)
pt3dadd(-88.593, 187.459, 11.226, 0.532)
pt3dadd(-88.699, 187.511, 11.245, 0.56)
pt3dadd(-88.805, 187.561, 11.263, 0.588)
pt3dadd(-88.911, 187.613, 11.282, 0.616)
pt3dadd(-89.017, 187.663, 11.301, 0.642)
pt3dadd(-89.124, 187.715, 11.32, 0.67)
pt3dadd(-89.23, 187.765, 11.339, 0.698)
pt3dadd(-89.336, 187.817, 11.358, 0.726)
pt3dadd(-89.442, 187.853, 11.394, 0.812)
pt3dadd(-89.548, 187.888, 11.43, 0.898)
pt3dadd(-89.654, 187.924, 11.467, 0.982)
pt3dadd(-89.76, 187.96, 11.503, 1.068)
pt3dadd(-89.866, 187.996, 11.539, 1.154)
pt3dadd(-89.972, 188.03, 11.575, 1.24)
pt3dadd(-90.078, 188.066, 11.611, 1.326)
pt3dadd(-90.184, 188.102, 11.647, 1.41)
pt3dadd(-90.29, 188.137, 11.684, 1.496)
pt3dadd(-90.396, 188.173, 11.72, 1.582)
}
dend_5[2] {pt3dclear()
pt3dadd(-90.396, 188.173, 11.72, 1.582)
pt3dadd(-90.432, 188.183, 11.728, 1.594)
pt3dadd(-90.544, 188.212, 11.752, 1.63)
pt3dadd(-90.657, 188.242, 11.777, 1.666)
pt3dadd(-90.769, 188.272, 11.802, 1.704)
pt3dadd(-90.881, 188.302, 11.827, 1.74)
pt3dadd(-90.994, 188.332, 11.852, 1.776)
pt3dadd(-91.106, 188.362, 11.876, 1.812)
pt3dadd(-91.218, 188.392, 11.901, 1.85)
pt3dadd(-91.331, 188.422, 11.926, 1.886)
pt3dadd(-91.443, 188.45, 11.951, 1.922)
pt3dadd(-91.555, 188.48, 11.976, 1.96)
pt3dadd(-91.665, 188.525, 11.993, 1.91)
pt3dadd(-91.773, 188.574, 12.008, 1.83)
pt3dadd(-91.881, 188.623, 12.023, 1.748)
pt3dadd(-91.989, 188.672, 12.038, 1.668)
pt3dadd(-92.097, 188.72, 12.053, 1.588)
pt3dadd(-92.205, 188.77, 12.068, 1.506)
pt3dadd(-92.313, 188.819, 12.083, 1.426)
pt3dadd(-92.421, 188.868, 12.098, 1.346)
pt3dadd(-92.529, 188.917, 12.113, 1.266)
pt3dadd(-92.637, 188.966, 12.128, 1.184)
pt3dadd(-92.745, 189.016, 12.139, 1.112)
pt3dadd(-92.854, 189.065, 12.149, 1.044)
pt3dadd(-92.963, 189.114, 12.158, 0.974)
pt3dadd(-93.071, 189.164, 12.168, 0.904)
pt3dadd(-93.18, 189.214, 12.178, 0.836)
pt3dadd(-93.289, 189.263, 12.187, 0.766)
pt3dadd(-93.398, 189.312, 12.197, 0.696)
pt3dadd(-93.506, 189.362, 12.207, 0.628)
pt3dadd(-93.615, 189.412, 12.216, 0.558)
pt3dadd(-93.724, 189.461, 12.226, 0.488)
pt3dadd(-93.831, 189.514, 12.235, 0.474)
pt3dadd(-93.938, 189.566, 12.243, 0.474)
pt3dadd(-94.046, 189.619, 12.252, 0.476)
pt3dadd(-94.153, 189.672, 12.26, 0.476)
pt3dadd(-94.26, 189.725, 12.269, 0.476)
pt3dadd(-94.367, 189.779, 12.277, 0.478)
pt3dadd(-94.474, 189.832, 12.286, 0.478)
pt3dadd(-94.581, 189.884, 12.294, 0.478)
pt3dadd(-94.689, 189.937, 12.302, 0.48)
pt3dadd(-94.796, 189.99, 12.311, 0.48)
pt3dadd(-94.897, 190.052, 12.325, 0.536)
pt3dadd(-94.996, 190.117, 12.34, 0.604)
pt3dadd(-95.096, 190.181, 12.355, 0.672)
pt3dadd(-95.196, 190.246, 12.371, 0.74)
pt3dadd(-95.295, 190.31, 12.386, 0.808)
pt3dadd(-95.395, 190.374, 12.401, 0.876)
pt3dadd(-95.494, 190.439, 12.416, 0.944)
pt3dadd(-95.594, 190.504, 12.432, 1.012)
pt3dadd(-95.694, 190.567, 12.447, 1.08)
pt3dadd(-95.793, 190.632, 12.462, 1.148)
pt3dadd(-95.886, 190.687, 12.506, 1.16)
pt3dadd(-95.977, 190.741, 12.552, 1.168)
pt3dadd(-96.068, 190.795, 12.599, 1.174)
pt3dadd(-96.16, 190.849, 12.645, 1.18)
pt3dadd(-96.251, 190.903, 12.692, 1.188)
pt3dadd(-96.342, 190.957, 12.738, 1.194)
pt3dadd(-96.434, 191.011, 12.785, 1.2)
pt3dadd(-96.525, 191.065, 12.832, 1.208)
pt3dadd(-96.617, 191.12, 12.878, 1.214)
pt3dadd(-96.708, 191.174, 12.925, 1.22)
pt3dadd(-96.807, 191.233, 12.952, 1.152)
pt3dadd(-96.906, 191.293, 12.978, 1.08)
pt3dadd(-97.005, 191.353, 13.004, 1.006)
pt3dadd(-97.104, 191.413, 13.03, 0.934)
pt3dadd(-97.204, 191.473, 13.056, 0.862)
pt3dadd(-97.303, 191.533, 13.082, 0.788)
pt3dadd(-97.402, 191.592, 13.108, 0.716)
pt3dadd(-97.501, 191.652, 13.134, 0.644)
pt3dadd(-97.601, 191.712, 13.16, 0.57)
pt3dadd(-97.7, 191.772, 13.186, 0.498)
pt3dadd(-97.817, 191.795, 13.199, 0.562)
pt3dadd(-97.933, 191.818, 13.212, 0.624)
pt3dadd(-98.05, 191.842, 13.224, 0.688)
pt3dadd(-98.167, 191.864, 13.237, 0.75)
pt3dadd(-98.283, 191.887, 13.25, 0.814)
pt3dadd(-98.4, 191.91, 13.263, 0.878)
pt3dadd(-98.517, 191.933, 13.276, 0.94)
pt3dadd(-98.634, 191.957, 13.289, 1.004)
pt3dadd(-98.751, 191.98, 13.302, 1.066)
pt3dadd(-98.867, 192.002, 13.315, 1.13)
}
dend_5[3] {pt3dclear()
pt3dadd(-98.867, 192.002, 13.315, 1.13)
pt3dadd(-98.899, 192.002, 13.315, 1.12)
pt3dadd(-99.019, 192.001, 13.316, 1.082)
pt3dadd(-99.139, 192, 13.318, 1.042)
pt3dadd(-99.259, 192, 13.319, 1.004)
pt3dadd(-99.379, 191.999, 13.321, 0.966)
pt3dadd(-99.499, 191.998, 13.322, 0.928)
pt3dadd(-99.619, 191.996, 13.324, 0.888)
pt3dadd(-99.739, 191.996, 13.325, 0.85)
pt3dadd(-99.859, 191.995, 13.326, 0.812)
pt3dadd(-99.979, 191.994, 13.328, 0.774)
pt3dadd(-100.099, 191.994, 13.329, 0.734)
pt3dadd(-100.218, 191.992, 13.331, 0.698)
pt3dadd(-100.33, 191.948, 13.334, 0.696)
pt3dadd(-100.442, 191.905, 13.336, 0.694)
pt3dadd(-100.554, 191.863, 13.339, 0.692)
pt3dadd(-100.667, 191.82, 13.341, 0.69)
pt3dadd(-100.779, 191.777, 13.344, 0.688)
pt3dadd(-100.891, 191.735, 13.347, 0.686)
pt3dadd(-101.003, 191.692, 13.349, 0.684)
pt3dadd(-101.115, 191.648, 13.352, 0.682)
pt3dadd(-101.227, 191.606, 13.355, 0.68)
pt3dadd(-101.339, 191.564, 13.358, 0.676)
pt3dadd(-101.454, 191.53, 13.363, 0.65)
pt3dadd(-101.569, 191.495, 13.369, 0.626)
pt3dadd(-101.683, 191.46, 13.374, 0.6)
pt3dadd(-101.798, 191.426, 13.38, 0.574)
pt3dadd(-101.913, 191.392, 13.386, 0.548)
pt3dadd(-102.028, 191.357, 13.391, 0.524)
pt3dadd(-102.142, 191.322, 13.397, 0.498)
pt3dadd(-102.257, 191.288, 13.403, 0.472)
pt3dadd(-102.372, 191.254, 13.408, 0.448)
pt3dadd(-102.487, 191.22, 13.414, 0.424)
pt3dadd(-102.604, 191.197, 13.423, 0.422)
pt3dadd(-102.721, 191.174, 13.433, 0.42)
pt3dadd(-102.839, 191.152, 13.442, 0.418)
pt3dadd(-102.956, 191.129, 13.451, 0.416)
pt3dadd(-103.073, 191.106, 13.46, 0.414)
pt3dadd(-103.191, 191.083, 13.469, 0.412)
pt3dadd(-103.308, 191.06, 13.479, 0.41)
pt3dadd(-103.425, 191.038, 13.488, 0.408)
pt3dadd(-103.542, 191.015, 13.497, 0.404)
pt3dadd(-103.66, 190.993, 13.507, 0.408)
pt3dadd(-103.777, 190.981, 13.527, 0.44)
pt3dadd(-103.894, 190.969, 13.546, 0.472)
pt3dadd(-104.011, 190.957, 13.565, 0.506)
pt3dadd(-104.128, 190.944, 13.584, 0.538)
pt3dadd(-104.245, 190.932, 13.603, 0.57)
pt3dadd(-104.363, 190.92, 13.622, 0.604)
pt3dadd(-104.48, 190.908, 13.641, 0.636)
pt3dadd(-104.597, 190.896, 13.66, 0.668)
pt3dadd(-104.714, 190.884, 13.679, 0.702)
pt3dadd(-104.83, 190.873, 13.702, 0.73)
pt3dadd(-104.941, 190.87, 13.74, 0.748)
pt3dadd(-105.052, 190.866, 13.777, 0.766)
pt3dadd(-105.163, 190.862, 13.815, 0.784)
pt3dadd(-105.275, 190.859, 13.852, 0.802)
pt3dadd(-105.386, 190.854, 13.89, 0.82)
pt3dadd(-105.497, 190.85, 13.928, 0.838)
pt3dadd(-105.608, 190.847, 13.965, 0.856)
pt3dadd(-105.719, 190.843, 14.003, 0.874)
pt3dadd(-105.83, 190.84, 14.041, 0.892)
pt3dadd(-105.942, 190.834, 14.076, 0.91)
pt3dadd(-106.058, 190.825, 14.101, 0.928)
pt3dadd(-106.174, 190.816, 14.126, 0.946)
pt3dadd(-106.289, 190.806, 14.152, 0.966)
pt3dadd(-106.405, 190.796, 14.177, 0.984)
pt3dadd(-106.521, 190.787, 14.202, 1.002)
pt3dadd(-106.636, 190.777, 14.227, 1.022)
pt3dadd(-106.752, 190.768, 14.253, 1.04)
pt3dadd(-106.868, 190.758, 14.278, 1.058)
pt3dadd(-106.984, 190.748, 14.303, 1.076)
pt3dadd(-107.1, 190.738, 14.327, 1.09)
pt3dadd(-107.217, 190.723, 14.343, 1.078)
pt3dadd(-107.334, 190.708, 14.359, 1.066)
pt3dadd(-107.452, 190.692, 14.376, 1.056)
pt3dadd(-107.569, 190.676, 14.392, 1.044)
pt3dadd(-107.687, 190.661, 14.408, 1.034)
pt3dadd(-107.804, 190.646, 14.424, 1.022)
pt3dadd(-107.922, 190.631, 14.44, 1.01)
pt3dadd(-108.039, 190.615, 14.457, 1)
pt3dadd(-108.156, 190.6, 14.473, 0.988)
pt3dadd(-108.273, 190.579, 14.488, 0.978)
pt3dadd(-108.386, 190.542, 14.497, 0.97)
pt3dadd(-108.5, 190.505, 14.507, 0.962)
pt3dadd(-108.613, 190.468, 14.516, 0.954)
pt3dadd(-108.727, 190.43, 14.526, 0.948)
pt3dadd(-108.84, 190.393, 14.535, 0.94)
pt3dadd(-108.954, 190.356, 14.545, 0.932)
pt3dadd(-109.067, 190.318, 14.555, 0.924)
pt3dadd(-109.181, 190.28, 14.564, 0.916)
pt3dadd(-109.294, 190.243, 14.574, 0.91)
pt3dadd(-109.406, 190.202, 14.583, 0.906)
pt3dadd(-109.516, 190.156, 14.591, 0.912)
pt3dadd(-109.626, 190.108, 14.599, 0.918)
pt3dadd(-109.735, 190.06, 14.608, 0.924)
pt3dadd(-109.845, 190.013, 14.616, 0.93)
pt3dadd(-109.955, 189.965, 14.624, 0.936)
}
}
proc shape3d_8() {
dend_5[3] { pt3dadd(-110.065, 189.918, 14.632, 0.942)
pt3dadd(-110.174, 189.87, 14.641, 0.948)
pt3dadd(-110.284, 189.822, 14.649, 0.954)
pt3dadd(-110.394, 189.775, 14.657, 0.96)
pt3dadd(-110.504, 189.73, 14.667, 0.97)
pt3dadd(-110.615, 189.686, 14.682, 0.984)
pt3dadd(-110.726, 189.644, 14.696, 1)
pt3dadd(-110.837, 189.602, 14.71, 1.014)
pt3dadd(-110.948, 189.56, 14.725, 1.028)
pt3dadd(-111.059, 189.518, 14.739, 1.042)
pt3dadd(-111.17, 189.476, 14.753, 1.058)
pt3dadd(-111.282, 189.434, 14.768, 1.072)
pt3dadd(-111.393, 189.392, 14.782, 1.088)
pt3dadd(-111.504, 189.35, 14.797, 1.102)
pt3dadd(-111.612, 189.31, 14.82, 1.104)
pt3dadd(-111.716, 189.271, 14.858, 1.086)
pt3dadd(-111.82, 189.233, 14.896, 1.068)
pt3dadd(-111.924, 189.193, 14.934, 1.05)
pt3dadd(-112.028, 189.155, 14.973, 1.032)
pt3dadd(-112.132, 189.116, 15.011, 1.014)
pt3dadd(-112.235, 189.077, 15.049, 0.996)
pt3dadd(-112.339, 189.038, 15.087, 0.978)
pt3dadd(-112.443, 189, 15.125, 0.96)
pt3dadd(-112.547, 188.962, 15.164, 0.942)
pt3dadd(-112.648, 188.914, 15.197, 0.914)
pt3dadd(-112.745, 188.849, 15.224, 0.866)
pt3dadd(-112.842, 188.785, 15.25, 0.818)
pt3dadd(-112.938, 188.722, 15.276, 0.77)
pt3dadd(-113.035, 188.657, 15.302, 0.722)
pt3dadd(-113.131, 188.593, 15.328, 0.674)
pt3dadd(-113.228, 188.53, 15.354, 0.626)
pt3dadd(-113.325, 188.466, 15.38, 0.58)
pt3dadd(-113.421, 188.401, 15.406, 0.532)
pt3dadd(-113.518, 188.338, 15.432, 0.484)
pt3dadd(-113.607, 188.264, 15.455, 0.46)
pt3dadd(-113.688, 188.178, 15.474, 0.468)
pt3dadd(-113.768, 188.092, 15.492, 0.476)
pt3dadd(-113.848, 188.004, 15.511, 0.484)
pt3dadd(-113.928, 187.918, 15.529, 0.494)
pt3dadd(-114.008, 187.831, 15.548, 0.502)
pt3dadd(-114.088, 187.745, 15.566, 0.51)
pt3dadd(-114.168, 187.658, 15.585, 0.518)
pt3dadd(-114.248, 187.572, 15.603, 0.528)
pt3dadd(-114.328, 187.486, 15.622, 0.536)
pt3dadd(-114.402, 187.392, 15.636, 0.558)
pt3dadd(-114.47, 187.295, 15.648, 0.588)
pt3dadd(-114.538, 187.196, 15.659, 0.618)
pt3dadd(-114.606, 187.099, 15.67, 0.65)
pt3dadd(-114.675, 187.001, 15.682, 0.68)
pt3dadd(-114.743, 186.904, 15.693, 0.71)
pt3dadd(-114.811, 186.805, 15.704, 0.742)
pt3dadd(-114.879, 186.708, 15.716, 0.772)
pt3dadd(-114.948, 186.61, 15.727, 0.802)
pt3dadd(-115.016, 186.512, 15.739, 0.834)
pt3dadd(-115.086, 186.416, 15.747, 0.836)
pt3dadd(-115.158, 186.32, 15.754, 0.818)
pt3dadd(-115.23, 186.224, 15.761, 0.802)
pt3dadd(-115.302, 186.13, 15.768, 0.786)
pt3dadd(-115.375, 186.034, 15.774, 0.768)
pt3dadd(-115.447, 185.938, 15.781, 0.752)
pt3dadd(-115.519, 185.843, 15.788, 0.736)
pt3dadd(-115.591, 185.747, 15.795, 0.718)
pt3dadd(-115.663, 185.651, 15.802, 0.702)
pt3dadd(-115.735, 185.556, 15.809, 0.684)
pt3dadd(-115.812, 185.465, 15.818, 0.678)
pt3dadd(-115.893, 185.377, 15.83, 0.678)
pt3dadd(-115.974, 185.29, 15.841, 0.678)
pt3dadd(-116.055, 185.202, 15.852, 0.678)
pt3dadd(-116.135, 185.114, 15.864, 0.678)
pt3dadd(-116.216, 185.027, 15.875, 0.678)
pt3dadd(-116.297, 184.939, 15.887, 0.678)
pt3dadd(-116.378, 184.852, 15.898, 0.678)
pt3dadd(-116.459, 184.764, 15.91, 0.678)
pt3dadd(-116.54, 184.676, 15.921, 0.678)
pt3dadd(-116.621, 184.596, 15.948, 0.678)
pt3dadd(-116.704, 184.52, 15.985, 0.678)
pt3dadd(-116.786, 184.446, 16.021, 0.678)
pt3dadd(-116.869, 184.37, 16.058, 0.678)
pt3dadd(-116.951, 184.295, 16.095, 0.678)
pt3dadd(-117.034, 184.22, 16.132, 0.678)
pt3dadd(-117.116, 184.145, 16.169, 0.678)
pt3dadd(-117.199, 184.07, 16.206, 0.678)
pt3dadd(-117.281, 183.995, 16.242, 0.678)
pt3dadd(-117.364, 183.92, 16.279, 0.678)
pt3dadd(-117.451, 183.851, 16.318, 0.706)
pt3dadd(-117.538, 183.784, 16.356, 0.744)
pt3dadd(-117.626, 183.716, 16.395, 0.78)
pt3dadd(-117.714, 183.649, 16.434, 0.818)
pt3dadd(-117.802, 183.582, 16.473, 0.854)
pt3dadd(-117.89, 183.516, 16.511, 0.89)
pt3dadd(-117.978, 183.449, 16.55, 0.928)
pt3dadd(-118.066, 183.382, 16.589, 0.964)
pt3dadd(-118.154, 183.314, 16.628, 1.002)
pt3dadd(-118.242, 183.247, 16.667, 1.038)
pt3dadd(-118.34, 183.19, 16.697, 1.04)
pt3dadd(-118.441, 183.134, 16.726, 1.034)
pt3dadd(-118.542, 183.078, 16.755, 1.028)
pt3dadd(-118.642, 183.023, 16.784, 1.022)
pt3dadd(-118.743, 182.968, 16.813, 1.016)
pt3dadd(-118.843, 182.912, 16.841, 1.01)
pt3dadd(-118.944, 182.857, 16.87, 1.002)
pt3dadd(-119.045, 182.801, 16.899, 0.996)
pt3dadd(-119.145, 182.746, 16.928, 0.99)
pt3dadd(-119.246, 182.69, 16.957, 0.984)
pt3dadd(-119.354, 182.652, 16.985, 0.94)
pt3dadd(-119.463, 182.614, 17.014, 0.892)
pt3dadd(-119.572, 182.576, 17.043, 0.846)
pt3dadd(-119.68, 182.539, 17.071, 0.798)
pt3dadd(-119.789, 182.502, 17.1, 0.75)
pt3dadd(-119.898, 182.465, 17.129, 0.702)
pt3dadd(-120.006, 182.428, 17.157, 0.654)
pt3dadd(-120.115, 182.39, 17.186, 0.608)
pt3dadd(-120.224, 182.353, 17.215, 0.56)
pt3dadd(-120.332, 182.316, 17.243, 0.512)
pt3dadd(-120.44, 182.286, 17.28, 0.526)
pt3dadd(-120.547, 182.256, 17.317, 0.544)
pt3dadd(-120.655, 182.226, 17.354, 0.562)
pt3dadd(-120.762, 182.196, 17.392, 0.58)
pt3dadd(-120.87, 182.167, 17.429, 0.598)
pt3dadd(-120.977, 182.137, 17.466, 0.616)
pt3dadd(-121.084, 182.107, 17.504, 0.634)
pt3dadd(-121.192, 182.078, 17.541, 0.652)
pt3dadd(-121.298, 182.048, 17.578, 0.67)
pt3dadd(-121.406, 182.018, 17.615, 0.688)
pt3dadd(-121.511, 181.968, 17.641, 0.722)
pt3dadd(-121.614, 181.915, 17.665, 0.756)
pt3dadd(-121.718, 181.862, 17.69, 0.792)
pt3dadd(-121.822, 181.811, 17.715, 0.826)
pt3dadd(-121.926, 181.758, 17.739, 0.86)
pt3dadd(-122.029, 181.706, 17.764, 0.894)
pt3dadd(-122.134, 181.654, 17.789, 0.928)
pt3dadd(-122.238, 181.602, 17.813, 0.962)
pt3dadd(-122.341, 181.549, 17.838, 0.996)
pt3dadd(-122.446, 181.498, 17.863, 1.032)
pt3dadd(-122.552, 181.448, 17.883, 1.028)
pt3dadd(-122.659, 181.4, 17.903, 1.026)
pt3dadd(-122.767, 181.352, 17.923, 1.022)
pt3dadd(-122.874, 181.304, 17.943, 1.018)
pt3dadd(-122.981, 181.255, 17.962, 1.014)
pt3dadd(-123.089, 181.207, 17.982, 1.01)
pt3dadd(-123.196, 181.159, 18.002, 1.008)
pt3dadd(-123.304, 181.111, 18.022, 1.004)
pt3dadd(-123.41, 181.062, 18.042, 1)
pt3dadd(-123.517, 181.014, 18.062, 0.996)
pt3dadd(-123.622, 180.958, 18.077, 1.004)
pt3dadd(-123.726, 180.9, 18.091, 1.014)
pt3dadd(-123.829, 180.844, 18.106, 1.022)
pt3dadd(-123.934, 180.786, 18.121, 1.032)
pt3dadd(-124.038, 180.728, 18.135, 1.04)
pt3dadd(-124.142, 180.672, 18.15, 1.05)
pt3dadd(-124.246, 180.614, 18.165, 1.06)
pt3dadd(-124.35, 180.558, 18.18, 1.068)
pt3dadd(-124.454, 180.5, 18.194, 1.078)
pt3dadd(-124.558, 180.443, 18.209, 1.086)
pt3dadd(-124.655, 180.378, 18.23, 1.102)
pt3dadd(-124.752, 180.312, 18.252, 1.118)
pt3dadd(-124.849, 180.246, 18.273, 1.134)
pt3dadd(-124.946, 180.181, 18.294, 1.15)
pt3dadd(-125.044, 180.115, 18.315, 1.166)
pt3dadd(-125.141, 180.049, 18.337, 1.182)
pt3dadd(-125.238, 179.983, 18.358, 1.196)
pt3dadd(-125.335, 179.918, 18.379, 1.212)
pt3dadd(-125.432, 179.852, 18.401, 1.228)
pt3dadd(-125.528, 179.788, 18.426, 1.236)
pt3dadd(-125.616, 179.726, 18.47, 1.202)
pt3dadd(-125.705, 179.664, 18.514, 1.168)
pt3dadd(-125.792, 179.602, 18.558, 1.134)
pt3dadd(-125.881, 179.54, 18.602, 1.1)
pt3dadd(-125.969, 179.478, 18.646, 1.066)
pt3dadd(-126.058, 179.417, 18.691, 1.032)
pt3dadd(-126.145, 179.354, 18.735, 0.998)
pt3dadd(-126.233, 179.293, 18.779, 0.964)
pt3dadd(-126.322, 179.231, 18.823, 0.93)
pt3dadd(-126.41, 179.167, 18.863, 0.904)
pt3dadd(-126.503, 179.098, 18.89, 0.906)
pt3dadd(-126.595, 179.029, 18.917, 0.908)
pt3dadd(-126.688, 178.96, 18.944, 0.91)
pt3dadd(-126.78, 178.89, 18.97, 0.912)
pt3dadd(-126.872, 178.82, 18.997, 0.914)
pt3dadd(-126.965, 178.751, 19.024, 0.916)
pt3dadd(-127.057, 178.681, 19.051, 0.918)
pt3dadd(-127.15, 178.612, 19.077, 0.92)
pt3dadd(-127.242, 178.542, 19.104, 0.922)
pt3dadd(-127.339, 178.478, 19.129, 0.928)
pt3dadd(-127.447, 178.432, 19.147, 0.948)
pt3dadd(-127.555, 178.384, 19.166, 0.968)
pt3dadd(-127.663, 178.337, 19.184, 0.986)
pt3dadd(-127.771, 178.289, 19.202, 1.006)
pt3dadd(-127.879, 178.242, 19.221, 1.026)
pt3dadd(-127.987, 178.194, 19.239, 1.046)
pt3dadd(-128.095, 178.146, 19.258, 1.064)
pt3dadd(-128.203, 178.099, 19.276, 1.084)
pt3dadd(-128.311, 178.051, 19.295, 1.104)
pt3dadd(-128.418, 178.001, 19.311, 1.118)
pt3dadd(-128.521, 177.942, 19.322, 1.12)
pt3dadd(-128.624, 177.882, 19.332, 1.12)
pt3dadd(-128.728, 177.823, 19.343, 1.122)
pt3dadd(-128.832, 177.763, 19.354, 1.122)
pt3dadd(-128.935, 177.704, 19.364, 1.124)
pt3dadd(-129.038, 177.644, 19.375, 1.126)
}
}
proc shape3d_9() {
dend_5[3] { pt3dadd(-129.143, 177.586, 19.385, 1.126)
pt3dadd(-129.246, 177.527, 19.396, 1.128)
pt3dadd(-129.349, 177.467, 19.407, 1.13)
pt3dadd(-129.454, 177.41, 19.421, 1.122)
pt3dadd(-129.559, 177.362, 19.446, 1.092)
pt3dadd(-129.665, 177.314, 19.471, 1.064)
pt3dadd(-129.77, 177.266, 19.496, 1.034)
pt3dadd(-129.876, 177.218, 19.521, 1.004)
pt3dadd(-129.983, 177.17, 19.546, 0.976)
pt3dadd(-130.088, 177.122, 19.571, 0.946)
pt3dadd(-130.194, 177.074, 19.596, 0.916)
pt3dadd(-130.3, 177.026, 19.621, 0.886)
pt3dadd(-130.405, 176.977, 19.646, 0.858)
pt3dadd(-130.511, 176.932, 19.674, 0.828)
pt3dadd(-130.616, 176.89, 19.706, 0.796)
pt3dadd(-130.722, 176.849, 19.738, 0.766)
pt3dadd(-130.828, 176.807, 19.771, 0.734)
pt3dadd(-130.933, 176.765, 19.803, 0.704)
pt3dadd(-131.039, 176.723, 19.835, 0.672)
pt3dadd(-131.144, 176.681, 19.868, 0.642)
pt3dadd(-131.25, 176.639, 19.9, 0.61)
pt3dadd(-131.356, 176.597, 19.933, 0.58)
pt3dadd(-131.461, 176.555, 19.965, 0.55)
pt3dadd(-131.566, 176.508, 19.993, 0.546)
pt3dadd(-131.67, 176.455, 20.015, 0.578)
pt3dadd(-131.774, 176.402, 20.037, 0.612)
pt3dadd(-131.879, 176.35, 20.059, 0.646)
pt3dadd(-131.983, 176.296, 20.081, 0.678)
pt3dadd(-132.088, 176.243, 20.103, 0.712)
pt3dadd(-132.192, 176.19, 20.125, 0.746)
pt3dadd(-132.296, 176.136, 20.147, 0.78)
pt3dadd(-132.401, 176.083, 20.169, 0.812)
pt3dadd(-132.504, 176.03, 20.191, 0.846)
pt3dadd(-132.613, 175.986, 20.21, 0.868)
pt3dadd(-132.728, 175.955, 20.223, 0.872)
pt3dadd(-132.842, 175.924, 20.236, 0.874)
pt3dadd(-132.958, 175.894, 20.249, 0.878)
pt3dadd(-133.073, 175.862, 20.263, 0.882)
pt3dadd(-133.187, 175.831, 20.276, 0.886)
pt3dadd(-133.302, 175.8, 20.289, 0.89)
pt3dadd(-133.417, 175.769, 20.303, 0.894)
pt3dadd(-133.531, 175.738, 20.316, 0.898)
pt3dadd(-133.646, 175.706, 20.329, 0.902)
pt3dadd(-133.763, 175.682, 20.339, 0.886)
pt3dadd(-133.882, 175.664, 20.345, 0.848)
pt3dadd(-134, 175.648, 20.351, 0.81)
pt3dadd(-134.119, 175.63, 20.357, 0.772)
pt3dadd(-134.237, 175.613, 20.363, 0.732)
pt3dadd(-134.356, 175.595, 20.369, 0.694)
pt3dadd(-134.474, 175.578, 20.375, 0.656)
pt3dadd(-134.593, 175.56, 20.381, 0.616)
pt3dadd(-134.711, 175.543, 20.387, 0.578)
pt3dadd(-134.83, 175.525, 20.393, 0.54)
pt3dadd(-134.948, 175.514, 20.398, 0.51)
pt3dadd(-135.068, 175.51, 20.403, 0.49)
pt3dadd(-135.188, 175.505, 20.408, 0.47)
pt3dadd(-135.308, 175.5, 20.413, 0.45)
pt3dadd(-135.428, 175.495, 20.418, 0.43)
pt3dadd(-135.547, 175.489, 20.423, 0.41)
pt3dadd(-135.667, 175.484, 20.428, 0.39)
pt3dadd(-135.787, 175.48, 20.433, 0.37)
pt3dadd(-135.907, 175.475, 20.438, 0.35)
pt3dadd(-136.027, 175.47, 20.443, 0.33)
pt3dadd(-136.146, 175.47, 20.45, 0.324)
pt3dadd(-136.266, 175.474, 20.458, 0.33)
pt3dadd(-136.385, 175.477, 20.467, 0.338)
pt3dadd(-136.505, 175.481, 20.476, 0.346)
pt3dadd(-136.625, 175.484, 20.484, 0.352)
pt3dadd(-136.744, 175.488, 20.493, 0.36)
pt3dadd(-136.864, 175.492, 20.501, 0.368)
pt3dadd(-136.982, 175.495, 20.51, 0.374)
pt3dadd(-137.102, 175.499, 20.518, 0.382)
pt3dadd(-137.221, 175.502, 20.527, 0.388)
pt3dadd(-137.341, 175.508, 20.539, 0.384)
pt3dadd(-137.459, 175.514, 20.554, 0.368)
pt3dadd(-137.578, 175.522, 20.569, 0.35)
pt3dadd(-137.696, 175.529, 20.584, 0.334)
pt3dadd(-137.814, 175.535, 20.6, 0.318)
pt3dadd(-137.933, 175.542, 20.615, 0.3)
pt3dadd(-138.052, 175.549, 20.63, 0.284)
pt3dadd(-138.169, 175.555, 20.645, 0.266)
pt3dadd(-138.288, 175.562, 20.661, 0.25)
pt3dadd(-138.407, 175.568, 20.676, 0.234)
pt3dadd(-138.521, 175.577, 20.703, 0.226)
pt3dadd(-138.631, 175.586, 20.741, 0.226)
pt3dadd(-138.743, 175.595, 20.778, 0.226)
pt3dadd(-138.853, 175.604, 20.816, 0.226)
pt3dadd(-138.964, 175.613, 20.854, 0.226)
pt3dadd(-139.075, 175.622, 20.891, 0.226)
pt3dadd(-139.186, 175.631, 20.929, 0.226)
pt3dadd(-139.296, 175.64, 20.966, 0.226)
pt3dadd(-139.408, 175.649, 21.004, 0.226)
pt3dadd(-139.518, 175.658, 21.042, 0.226)
pt3dadd(-139.63, 175.68, 21.073, 0.226)
pt3dadd(-139.741, 175.711, 21.099, 0.226)
pt3dadd(-139.853, 175.744, 21.125, 0.226)
pt3dadd(-139.963, 175.775, 21.15, 0.226)
pt3dadd(-140.075, 175.807, 21.176, 0.226)
pt3dadd(-140.186, 175.84, 21.202, 0.226)
pt3dadd(-140.298, 175.871, 21.228, 0.226)
pt3dadd(-140.41, 175.903, 21.254, 0.226)
pt3dadd(-140.521, 175.934, 21.28, 0.226)
pt3dadd(-140.633, 175.967, 21.306, 0.226)
pt3dadd(-140.747, 175.992, 21.327, 0.24)
pt3dadd(-140.863, 176.014, 21.344, 0.264)
pt3dadd(-140.978, 176.035, 21.362, 0.288)
pt3dadd(-141.095, 176.057, 21.379, 0.312)
pt3dadd(-141.211, 176.077, 21.397, 0.336)
pt3dadd(-141.328, 176.099, 21.415, 0.36)
pt3dadd(-141.444, 176.12, 21.432, 0.384)
pt3dadd(-141.56, 176.141, 21.45, 0.408)
pt3dadd(-141.676, 176.162, 21.467, 0.432)
pt3dadd(-141.792, 176.184, 21.485, 0.456)
pt3dadd(-141.91, 176.183, 21.497, 0.484)
pt3dadd(-142.028, 176.17, 21.507, 0.514)
pt3dadd(-142.147, 176.158, 21.516, 0.546)
pt3dadd(-142.266, 176.144, 21.525, 0.576)
pt3dadd(-142.385, 176.131, 21.535, 0.606)
pt3dadd(-142.504, 176.119, 21.544, 0.638)
pt3dadd(-142.622, 176.106, 21.553, 0.668)
pt3dadd(-142.741, 176.093, 21.563, 0.7)
pt3dadd(-142.86, 176.08, 21.572, 0.73)
pt3dadd(-142.979, 176.068, 21.582, 0.76)
pt3dadd(-143.092, 176.026, 21.588, 0.762)
pt3dadd(-143.203, 175.981, 21.593, 0.76)
pt3dadd(-143.314, 175.938, 21.599, 0.76)
pt3dadd(-143.425, 175.894, 21.605, 0.758)
pt3dadd(-143.537, 175.85, 21.611, 0.758)
pt3dadd(-143.648, 175.806, 21.616, 0.756)
pt3dadd(-143.76, 175.763, 21.622, 0.756)
pt3dadd(-143.872, 175.718, 21.628, 0.754)
pt3dadd(-143.983, 175.675, 21.634, 0.754)
pt3dadd(-144.095, 175.631, 21.639, 0.752)
pt3dadd(-144.204, 175.583, 21.651, 0.702)
pt3dadd(-144.312, 175.534, 21.662, 0.65)
pt3dadd(-144.421, 175.484, 21.674, 0.598)
pt3dadd(-144.529, 175.436, 21.686, 0.544)
pt3dadd(-144.638, 175.387, 21.697, 0.492)
pt3dadd(-144.746, 175.338, 21.709, 0.44)
pt3dadd(-144.856, 175.289, 21.721, 0.386)
pt3dadd(-144.965, 175.24, 21.732, 0.334)
pt3dadd(-145.073, 175.192, 21.744, 0.282)
pt3dadd(-145.182, 175.142, 21.755, 0.228)
pt3dadd(-145.28, 175.076, 21.772, 0.226)
pt3dadd(-145.378, 175.01, 21.789, 0.226)
pt3dadd(-145.476, 174.944, 21.806, 0.226)
pt3dadd(-145.573, 174.878, 21.823, 0.226)
pt3dadd(-145.672, 174.811, 21.84, 0.226)
pt3dadd(-145.77, 174.745, 21.858, 0.226)
pt3dadd(-145.867, 174.679, 21.875, 0.226)
pt3dadd(-145.966, 174.613, 21.892, 0.226)
pt3dadd(-146.063, 174.546, 21.909, 0.226)
pt3dadd(-146.161, 174.48, 21.926, 0.226)
pt3dadd(-146.222, 174.434, 22.003, 0.226)
pt3dadd(-146.284, 174.388, 22.079, 0.226)
pt3dadd(-146.346, 174.342, 22.156, 0.226)
pt3dadd(-146.407, 174.295, 22.233, 0.226)
pt3dadd(-146.468, 174.25, 22.31, 0.226)
pt3dadd(-146.53, 174.204, 22.387, 0.226)
pt3dadd(-146.591, 174.157, 22.464, 0.226)
pt3dadd(-146.653, 174.112, 22.54, 0.226)
pt3dadd(-146.714, 174.065, 22.617, 0.226)
pt3dadd(-146.776, 174.019, 22.694, 0.226)
}
dend_5[4] {pt3dclear()
pt3dadd(-98.867, 192.002, 13.315, 1.13)
pt3dadd(-98.867, 192.048, 13.314, 1.106)
pt3dadd(-98.867, 192.168, 13.313, 1.044)
pt3dadd(-98.867, 192.288, 13.312, 0.982)
pt3dadd(-98.867, 192.408, 13.311, 0.92)
pt3dadd(-98.867, 192.528, 13.31, 0.858)
pt3dadd(-98.867, 192.648, 13.309, 0.796)
pt3dadd(-98.867, 192.768, 13.308, 0.732)
pt3dadd(-98.867, 192.888, 13.307, 0.67)
pt3dadd(-98.867, 193.008, 13.306, 0.608)
pt3dadd(-98.867, 193.128, 13.305, 0.546)
pt3dadd(-98.867, 193.248, 13.304, 0.484)
pt3dadd(-98.867, 193.368, 13.304, 0.422)
pt3dadd(-98.867, 193.488, 13.302, 0.36)
pt3dadd(-98.867, 193.608, 13.302, 0.298)
pt3dadd(-98.868, 193.728, 13.301, 0.236)
pt3dadd(-98.894, 193.844, 13.301, 0.252)
pt3dadd(-98.921, 193.962, 13.301, 0.268)
pt3dadd(-98.948, 194.078, 13.301, 0.282)
pt3dadd(-98.974, 194.196, 13.301, 0.298)
pt3dadd(-99.001, 194.312, 13.301, 0.314)
pt3dadd(-99.028, 194.43, 13.3, 0.33)
pt3dadd(-99.055, 194.546, 13.3, 0.346)
pt3dadd(-99.081, 194.664, 13.3, 0.36)
pt3dadd(-99.108, 194.78, 13.3, 0.376)
pt3dadd(-99.135, 194.898, 13.3, 0.392)
pt3dadd(-99.178, 195.01, 13.3, 0.398)
pt3dadd(-99.221, 195.121, 13.3, 0.404)
pt3dadd(-99.264, 195.234, 13.3, 0.41)
pt3dadd(-99.306, 195.346, 13.3, 0.416)
pt3dadd(-99.349, 195.457, 13.3, 0.422)
pt3dadd(-99.392, 195.57, 13.3, 0.428)
pt3dadd(-99.435, 195.682, 13.3, 0.434)
pt3dadd(-99.478, 195.794, 13.3, 0.44)
pt3dadd(-99.521, 195.906, 13.3, 0.446)
pt3dadd(-99.564, 196.018, 13.3, 0.452)
pt3dadd(-99.607, 196.13, 13.3, 0.452)
}
}
proc shape3d_10() {
dend_5[4] { pt3dadd(-99.649, 196.242, 13.3, 0.452)
pt3dadd(-99.692, 196.355, 13.3, 0.452)
pt3dadd(-99.734, 196.466, 13.3, 0.452)
pt3dadd(-99.777, 196.579, 13.3, 0.452)
pt3dadd(-99.819, 196.691, 13.3, 0.452)
pt3dadd(-99.862, 196.804, 13.3, 0.452)
pt3dadd(-99.905, 196.915, 13.3, 0.452)
pt3dadd(-99.947, 197.028, 13.3, 0.452)
pt3dadd(-99.989, 197.141, 13.3, 0.452)
pt3dadd(-100.019, 197.256, 13.3, 0.464)
pt3dadd(-100.05, 197.372, 13.3, 0.474)
pt3dadd(-100.081, 197.489, 13.3, 0.484)
pt3dadd(-100.112, 197.604, 13.3, 0.494)
pt3dadd(-100.143, 197.72, 13.3, 0.504)
pt3dadd(-100.173, 197.837, 13.3, 0.514)
pt3dadd(-100.204, 197.952, 13.3, 0.524)
pt3dadd(-100.235, 198.068, 13.3, 0.534)
pt3dadd(-100.266, 198.184, 13.299, 0.544)
pt3dadd(-100.296, 198.3, 13.299, 0.556)
pt3dadd(-100.32, 198.418, 13.299, 0.59)
pt3dadd(-100.344, 198.535, 13.299, 0.622)
pt3dadd(-100.368, 198.653, 13.299, 0.654)
pt3dadd(-100.392, 198.77, 13.299, 0.686)
pt3dadd(-100.417, 198.888, 13.299, 0.718)
pt3dadd(-100.441, 199.006, 13.299, 0.75)
pt3dadd(-100.465, 199.123, 13.299, 0.784)
pt3dadd(-100.489, 199.241, 13.299, 0.816)
pt3dadd(-100.513, 199.358, 13.299, 0.848)
pt3dadd(-100.537, 199.476, 13.299, 0.874)
pt3dadd(-100.557, 199.594, 13.299, 0.836)
pt3dadd(-100.577, 199.712, 13.299, 0.798)
pt3dadd(-100.598, 199.831, 13.299, 0.76)
pt3dadd(-100.618, 199.949, 13.298, 0.722)
pt3dadd(-100.638, 200.068, 13.298, 0.682)
pt3dadd(-100.658, 200.185, 13.298, 0.646)
pt3dadd(-100.679, 200.304, 13.298, 0.608)
pt3dadd(-100.699, 200.422, 13.298, 0.57)
pt3dadd(-100.719, 200.54, 13.298, 0.532)
pt3dadd(-100.743, 200.658, 13.298, 0.498)
pt3dadd(-100.795, 200.766, 13.297, 0.508)
pt3dadd(-100.847, 200.874, 13.297, 0.52)
pt3dadd(-100.899, 200.982, 13.297, 0.53)
pt3dadd(-100.951, 201.09, 13.296, 0.54)
pt3dadd(-101.003, 201.198, 13.296, 0.55)
pt3dadd(-101.055, 201.306, 13.296, 0.562)
pt3dadd(-101.107, 201.414, 13.296, 0.572)
pt3dadd(-101.159, 201.523, 13.295, 0.584)
pt3dadd(-101.211, 201.631, 13.295, 0.594)
pt3dadd(-101.263, 201.739, 13.295, 0.604)
pt3dadd(-101.318, 201.846, 13.295, 0.612)
pt3dadd(-101.372, 201.953, 13.294, 0.62)
pt3dadd(-101.426, 202.06, 13.294, 0.626)
pt3dadd(-101.481, 202.166, 13.293, 0.634)
pt3dadd(-101.535, 202.273, 13.293, 0.642)
pt3dadd(-101.589, 202.381, 13.292, 0.65)
pt3dadd(-101.644, 202.488, 13.292, 0.656)
pt3dadd(-101.698, 202.595, 13.291, 0.664)
pt3dadd(-101.752, 202.702, 13.291, 0.672)
pt3dadd(-101.807, 202.808, 13.29, 0.676)
pt3dadd(-101.866, 202.913, 13.29, 0.668)
pt3dadd(-101.924, 203.018, 13.289, 0.66)
pt3dadd(-101.983, 203.123, 13.288, 0.652)
pt3dadd(-102.041, 203.227, 13.287, 0.644)
pt3dadd(-102.1, 203.333, 13.287, 0.636)
pt3dadd(-102.158, 203.437, 13.286, 0.628)
pt3dadd(-102.217, 203.542, 13.285, 0.62)
pt3dadd(-102.275, 203.647, 13.284, 0.612)
pt3dadd(-102.334, 203.752, 13.284, 0.604)
pt3dadd(-102.395, 203.855, 13.283, 0.59)
pt3dadd(-102.468, 203.95, 13.282, 0.56)
pt3dadd(-102.541, 204.044, 13.28, 0.528)
pt3dadd(-102.614, 204.14, 13.279, 0.498)
pt3dadd(-102.687, 204.235, 13.278, 0.466)
pt3dadd(-102.76, 204.33, 13.277, 0.436)
pt3dadd(-102.833, 204.426, 13.276, 0.404)
pt3dadd(-102.906, 204.521, 13.275, 0.372)
pt3dadd(-102.979, 204.616, 13.273, 0.342)
pt3dadd(-103.053, 204.71, 13.272, 0.31)
pt3dadd(-103.127, 204.805, 13.271, 0.284)
pt3dadd(-103.207, 204.894, 13.269, 0.278)
pt3dadd(-103.287, 204.984, 13.267, 0.272)
pt3dadd(-103.367, 205.074, 13.265, 0.266)
pt3dadd(-103.447, 205.163, 13.263, 0.26)
pt3dadd(-103.527, 205.253, 13.261, 0.254)
pt3dadd(-103.606, 205.342, 13.259, 0.248)
pt3dadd(-103.686, 205.432, 13.257, 0.242)
pt3dadd(-103.766, 205.52, 13.255, 0.236)
pt3dadd(-103.846, 205.61, 13.253, 0.23)
pt3dadd(-103.927, 205.699, 13.25, 0.228)
pt3dadd(-104.01, 205.786, 13.247, 0.236)
pt3dadd(-104.094, 205.871, 13.244, 0.242)
pt3dadd(-104.177, 205.957, 13.241, 0.25)
pt3dadd(-104.261, 206.044, 13.238, 0.258)
pt3dadd(-104.344, 206.13, 13.235, 0.266)
pt3dadd(-104.428, 206.215, 13.232, 0.274)
pt3dadd(-104.511, 206.302, 13.229, 0.282)
pt3dadd(-104.595, 206.388, 13.226, 0.29)
pt3dadd(-104.678, 206.474, 13.223, 0.298)
pt3dadd(-104.763, 206.558, 13.219, 0.31)
pt3dadd(-104.852, 206.64, 13.214, 0.338)
pt3dadd(-104.94, 206.72, 13.209, 0.366)
pt3dadd(-105.029, 206.801, 13.203, 0.394)
pt3dadd(-105.118, 206.881, 13.198, 0.424)
pt3dadd(-105.207, 206.962, 13.193, 0.452)
pt3dadd(-105.296, 207.042, 13.187, 0.48)
pt3dadd(-105.384, 207.122, 13.182, 0.508)
pt3dadd(-105.473, 207.203, 13.177, 0.536)
pt3dadd(-105.562, 207.283, 13.171, 0.566)
pt3dadd(-105.651, 207.364, 13.165, 0.588)
pt3dadd(-105.742, 207.442, 13.158, 0.586)
pt3dadd(-105.833, 207.52, 13.15, 0.586)
pt3dadd(-105.923, 207.598, 13.142, 0.584)
pt3dadd(-106.014, 207.674, 13.134, 0.584)
pt3dadd(-106.105, 207.752, 13.126, 0.582)
pt3dadd(-106.196, 207.83, 13.118, 0.582)
pt3dadd(-106.287, 207.908, 13.11, 0.58)
pt3dadd(-106.378, 207.986, 13.102, 0.58)
pt3dadd(-106.468, 208.064, 13.094, 0.578)
pt3dadd(-106.56, 208.141, 13.085, 0.574)
pt3dadd(-106.654, 208.214, 13.072, 0.56)
pt3dadd(-106.747, 208.288, 13.059, 0.544)
pt3dadd(-106.841, 208.361, 13.046, 0.53)
pt3dadd(-106.935, 208.434, 13.033, 0.514)
pt3dadd(-107.029, 208.507, 13.02, 0.5)
pt3dadd(-107.122, 208.58, 13.007, 0.484)
pt3dadd(-107.216, 208.654, 12.994, 0.468)
pt3dadd(-107.31, 208.727, 12.981, 0.454)
pt3dadd(-107.404, 208.8, 12.968, 0.438)
pt3dadd(-107.5, 208.867, 12.949, 0.424)
pt3dadd(-107.601, 208.916, 12.915, 0.408)
pt3dadd(-107.702, 208.966, 12.881, 0.39)
pt3dadd(-107.803, 209.016, 12.846, 0.374)
pt3dadd(-107.904, 209.065, 12.812, 0.358)
pt3dadd(-108.005, 209.116, 12.778, 0.342)
pt3dadd(-108.107, 209.165, 12.743, 0.326)
pt3dadd(-108.208, 209.214, 12.709, 0.31)
pt3dadd(-108.309, 209.264, 12.674, 0.294)
pt3dadd(-108.41, 209.314, 12.64, 0.278)
pt3dadd(-108.512, 209.365, 12.608, 0.264)
pt3dadd(-108.614, 209.419, 12.583, 0.26)
pt3dadd(-108.717, 209.473, 12.557, 0.256)
pt3dadd(-108.819, 209.528, 12.532, 0.252)
pt3dadd(-108.922, 209.582, 12.506, 0.248)
pt3dadd(-109.024, 209.636, 12.481, 0.244)
pt3dadd(-109.127, 209.69, 12.455, 0.24)
pt3dadd(-109.229, 209.746, 12.43, 0.236)
pt3dadd(-109.332, 209.8, 12.405, 0.232)
pt3dadd(-109.434, 209.854, 12.379, 0.228)
pt3dadd(-109.538, 209.906, 12.356, 0.232)
pt3dadd(-109.646, 209.956, 12.337, 0.254)
pt3dadd(-109.753, 210.005, 12.318, 0.274)
pt3dadd(-109.86, 210.053, 12.298, 0.296)
pt3dadd(-109.967, 210.102, 12.279, 0.316)
pt3dadd(-110.074, 210.151, 12.26, 0.336)
pt3dadd(-110.182, 210.199, 12.241, 0.358)
pt3dadd(-110.289, 210.248, 12.222, 0.38)
pt3dadd(-110.396, 210.298, 12.203, 0.4)
pt3dadd(-110.503, 210.346, 12.184, 0.42)
pt3dadd(-110.613, 210.39, 12.167, 0.45)
pt3dadd(-110.726, 210.426, 12.154, 0.49)
pt3dadd(-110.84, 210.462, 12.141, 0.532)
pt3dadd(-110.953, 210.497, 12.129, 0.574)
pt3dadd(-111.067, 210.533, 12.116, 0.616)
pt3dadd(-111.18, 210.569, 12.103, 0.658)
pt3dadd(-111.294, 210.605, 12.091, 0.7)
pt3dadd(-111.408, 210.64, 12.078, 0.742)
pt3dadd(-111.521, 210.676, 12.065, 0.784)
pt3dadd(-111.635, 210.712, 12.053, 0.826)
pt3dadd(-111.749, 210.744, 12.042, 0.84)
pt3dadd(-111.865, 210.773, 12.034, 0.802)
pt3dadd(-111.982, 210.802, 12.027, 0.766)
pt3dadd(-112.098, 210.829, 12.019, 0.728)
pt3dadd(-112.214, 210.858, 12.012, 0.69)
pt3dadd(-112.33, 210.887, 12.004, 0.654)
pt3dadd(-112.446, 210.916, 11.997, 0.616)
pt3dadd(-112.563, 210.943, 11.989, 0.578)
pt3dadd(-112.679, 210.972, 11.982, 0.542)
pt3dadd(-112.795, 211.001, 11.974, 0.504)
pt3dadd(-112.909, 211.036, 11.965, 0.474)
pt3dadd(-113.019, 211.081, 11.954, 0.454)
pt3dadd(-113.129, 211.128, 11.942, 0.436)
pt3dadd(-113.238, 211.174, 11.93, 0.416)
pt3dadd(-113.348, 211.22, 11.919, 0.398)
pt3dadd(-113.458, 211.267, 11.907, 0.378)
pt3dadd(-113.568, 211.313, 11.895, 0.36)
pt3dadd(-113.678, 211.36, 11.884, 0.34)
pt3dadd(-113.787, 211.406, 11.872, 0.322)
pt3dadd(-113.897, 211.452, 11.86, 0.302)
pt3dadd(-114.006, 211.496, 11.842, 0.288)
pt3dadd(-114.114, 211.536, 11.814, 0.282)
pt3dadd(-114.222, 211.577, 11.785, 0.274)
pt3dadd(-114.33, 211.616, 11.756, 0.268)
pt3dadd(-114.437, 211.656, 11.727, 0.262)
pt3dadd(-114.545, 211.697, 11.699, 0.256)
pt3dadd(-114.653, 211.736, 11.67, 0.248)
pt3dadd(-114.761, 211.776, 11.641, 0.242)
pt3dadd(-114.868, 211.817, 11.612, 0.236)
pt3dadd(-114.976, 211.856, 11.584, 0.23)
pt3dadd(-115.084, 211.894, 11.552, 0.226)
pt3dadd(-115.191, 211.926, 11.516, 0.226)
}
}
proc shape3d_11() {
dend_5[4] { pt3dadd(-115.298, 211.96, 11.48, 0.226)
pt3dadd(-115.405, 211.993, 11.445, 0.226)
pt3dadd(-115.512, 212.027, 11.409, 0.226)
pt3dadd(-115.619, 212.059, 11.373, 0.226)
pt3dadd(-115.726, 212.093, 11.338, 0.226)
pt3dadd(-115.833, 212.126, 11.302, 0.226)
pt3dadd(-115.94, 212.159, 11.267, 0.226)
pt3dadd(-116.047, 212.192, 11.231, 0.226)
pt3dadd(-116.156, 212.224, 11.198, 0.226)
pt3dadd(-116.267, 212.254, 11.168, 0.228)
pt3dadd(-116.377, 212.282, 11.139, 0.228)
pt3dadd(-116.488, 212.312, 11.109, 0.228)
pt3dadd(-116.599, 212.342, 11.079, 0.23)
pt3dadd(-116.71, 212.371, 11.049, 0.23)
pt3dadd(-116.82, 212.401, 11.019, 0.232)
pt3dadd(-116.931, 212.43, 10.99, 0.232)
pt3dadd(-117.042, 212.46, 10.96, 0.234)
pt3dadd(-117.152, 212.489, 10.93, 0.234)
pt3dadd(-117.261, 212.528, 10.904, 0.25)
pt3dadd(-117.366, 212.579, 10.883, 0.284)
pt3dadd(-117.472, 212.63, 10.861, 0.318)
pt3dadd(-117.578, 212.681, 10.84, 0.352)
pt3dadd(-117.683, 212.731, 10.818, 0.386)
pt3dadd(-117.789, 212.782, 10.797, 0.42)
pt3dadd(-117.895, 212.833, 10.775, 0.454)
pt3dadd(-118, 212.884, 10.754, 0.488)
pt3dadd(-118.106, 212.934, 10.733, 0.522)
pt3dadd(-118.212, 212.986, 10.711, 0.556)
pt3dadd(-118.317, 213.032, 10.684, 0.584)
pt3dadd(-118.422, 213.076, 10.652, 0.606)
pt3dadd(-118.526, 213.12, 10.619, 0.628)
pt3dadd(-118.631, 213.163, 10.586, 0.65)
pt3dadd(-118.736, 213.206, 10.554, 0.672)
pt3dadd(-118.84, 213.25, 10.521, 0.694)
pt3dadd(-118.945, 213.293, 10.488, 0.716)
pt3dadd(-119.05, 213.337, 10.456, 0.738)
pt3dadd(-119.155, 213.38, 10.423, 0.76)
pt3dadd(-119.259, 213.424, 10.39, 0.782)
pt3dadd(-119.363, 213.468, 10.357, 0.794)
pt3dadd(-119.467, 213.514, 10.322, 0.794)
pt3dadd(-119.57, 213.559, 10.288, 0.794)
pt3dadd(-119.673, 213.605, 10.254, 0.794)
pt3dadd(-119.776, 213.65, 10.22, 0.794)
pt3dadd(-119.879, 213.696, 10.185, 0.794)
pt3dadd(-119.982, 213.742, 10.151, 0.794)
pt3dadd(-120.085, 213.787, 10.117, 0.794)
pt3dadd(-120.188, 213.832, 10.083, 0.796)
pt3dadd(-120.292, 213.877, 10.048, 0.796)
pt3dadd(-120.394, 213.929, 10.018, 0.778)
pt3dadd(-120.494, 213.985, 9.99, 0.746)
pt3dadd(-120.595, 214.04, 9.963, 0.714)
pt3dadd(-120.696, 214.097, 9.935, 0.68)
pt3dadd(-120.797, 214.153, 9.908, 0.648)
pt3dadd(-120.898, 214.21, 9.88, 0.616)
pt3dadd(-120.998, 214.265, 9.853, 0.584)
pt3dadd(-121.099, 214.321, 9.825, 0.55)
pt3dadd(-121.2, 214.378, 9.798, 0.518)
pt3dadd(-121.301, 214.434, 9.77, 0.486)
pt3dadd(-121.406, 214.481, 9.745, 0.462)
pt3dadd(-121.517, 214.52, 9.722, 0.442)
pt3dadd(-121.626, 214.56, 9.699, 0.424)
pt3dadd(-121.736, 214.6, 9.675, 0.406)
pt3dadd(-121.846, 214.639, 9.652, 0.386)
pt3dadd(-121.956, 214.679, 9.629, 0.368)
pt3dadd(-122.065, 214.718, 9.606, 0.35)
pt3dadd(-122.176, 214.758, 9.583, 0.33)
pt3dadd(-122.285, 214.798, 9.56, 0.312)
pt3dadd(-122.395, 214.837, 9.536, 0.294)
pt3dadd(-122.503, 214.874, 9.507, 0.3)
pt3dadd(-122.611, 214.908, 9.473, 0.33)
pt3dadd(-122.719, 214.943, 9.439, 0.358)
pt3dadd(-122.826, 214.978, 9.406, 0.386)
pt3dadd(-122.934, 215.011, 9.372, 0.414)
pt3dadd(-123.041, 215.046, 9.338, 0.444)
pt3dadd(-123.149, 215.08, 9.304, 0.472)
pt3dadd(-123.257, 215.114, 9.27, 0.5)
pt3dadd(-123.364, 215.149, 9.236, 0.528)
pt3dadd(-123.472, 215.183, 9.202, 0.556)
pt3dadd(-123.577, 215.22, 9.167, 0.578)
pt3dadd(-123.682, 215.261, 9.131, 0.594)
pt3dadd(-123.786, 215.3, 9.094, 0.612)
pt3dadd(-123.89, 215.34, 9.058, 0.628)
pt3dadd(-123.995, 215.38, 9.022, 0.644)
pt3dadd(-124.099, 215.42, 8.986, 0.662)
pt3dadd(-124.205, 215.46, 8.95, 0.678)
pt3dadd(-124.309, 215.5, 8.913, 0.694)
pt3dadd(-124.414, 215.539, 8.877, 0.71)
pt3dadd(-124.518, 215.58, 8.841, 0.728)
pt3dadd(-124.62, 215.628, 8.809, 0.702)
pt3dadd(-124.721, 215.682, 8.779, 0.654)
pt3dadd(-124.823, 215.736, 8.749, 0.606)
pt3dadd(-124.924, 215.79, 8.719, 0.556)
pt3dadd(-125.024, 215.843, 8.689, 0.508)
pt3dadd(-125.125, 215.897, 8.659, 0.458)
pt3dadd(-125.226, 215.951, 8.629, 0.41)
pt3dadd(-125.328, 216.005, 8.599, 0.36)
pt3dadd(-125.429, 216.059, 8.569, 0.312)
pt3dadd(-125.53, 216.113, 8.539, 0.262)
pt3dadd(-125.627, 216.175, 8.513, 0.264)
pt3dadd(-125.723, 216.242, 8.49, 0.294)
pt3dadd(-125.818, 216.31, 8.468, 0.324)
pt3dadd(-125.914, 216.378, 8.445, 0.354)
pt3dadd(-126.008, 216.445, 8.422, 0.384)
pt3dadd(-126.103, 216.512, 8.399, 0.416)
pt3dadd(-126.199, 216.581, 8.377, 0.446)
pt3dadd(-126.294, 216.648, 8.354, 0.476)
pt3dadd(-126.39, 216.715, 8.331, 0.506)
pt3dadd(-126.485, 216.784, 8.308, 0.536)
pt3dadd(-126.582, 216.84, 8.275, 0.556)
pt3dadd(-126.68, 216.892, 8.236, 0.57)
pt3dadd(-126.778, 216.942, 8.197, 0.582)
pt3dadd(-126.876, 216.994, 8.158, 0.596)
pt3dadd(-126.974, 217.044, 8.119, 0.608)
pt3dadd(-127.072, 217.096, 8.08, 0.622)
pt3dadd(-127.17, 217.146, 8.041, 0.636)
pt3dadd(-127.268, 217.198, 8.002, 0.648)
pt3dadd(-127.366, 217.249, 7.963, 0.662)
pt3dadd(-127.464, 217.3, 7.924, 0.676)
pt3dadd(-127.561, 217.342, 7.878, 0.678)
pt3dadd(-127.658, 217.38, 7.829, 0.678)
pt3dadd(-127.756, 217.42, 7.78, 0.678)
pt3dadd(-127.853, 217.458, 7.732, 0.678)
pt3dadd(-127.95, 217.498, 7.683, 0.678)
pt3dadd(-128.048, 217.536, 7.634, 0.678)
pt3dadd(-128.146, 217.576, 7.586, 0.678)
pt3dadd(-128.243, 217.614, 7.537, 0.678)
pt3dadd(-128.34, 217.654, 7.488, 0.678)
pt3dadd(-128.437, 217.692, 7.44, 0.678)
pt3dadd(-128.526, 217.765, 7.423, 0.666)
pt3dadd(-128.614, 217.847, 7.415, 0.652)
pt3dadd(-128.701, 217.928, 7.407, 0.638)
pt3dadd(-128.788, 218.011, 7.398, 0.624)
pt3dadd(-128.875, 218.093, 7.39, 0.61)
pt3dadd(-128.962, 218.174, 7.382, 0.596)
pt3dadd(-129.049, 218.256, 7.374, 0.582)
pt3dadd(-129.137, 218.339, 7.366, 0.568)
pt3dadd(-129.223, 218.42, 7.358, 0.552)
pt3dadd(-129.311, 218.502, 7.35, 0.538)
pt3dadd(-129.397, 218.585, 7.341, 0.524)
pt3dadd(-129.485, 218.666, 7.333, 0.51)
pt3dadd(-129.572, 218.748, 7.325, 0.496)
pt3dadd(-129.659, 218.83, 7.317, 0.482)
pt3dadd(-129.746, 218.912, 7.309, 0.468)
pt3dadd(-129.834, 218.994, 7.301, 0.454)
pt3dadd(-129.95, 219, 7.3, 0.452)
pt3dadd(-130.07, 219, 7.3, 0.452)
pt3dadd(-130.19, 219, 7.3, 0.452)
pt3dadd(-130.31, 219, 7.3, 0.452)
pt3dadd(-130.43, 219, 7.3, 0.452)
pt3dadd(-130.55, 219, 7.3, 0.452)
pt3dadd(-130.67, 219, 7.3, 0.452)
pt3dadd(-130.79, 219, 7.288, 0.452)
pt3dadd(-130.903, 219, 7.257, 0.452)
pt3dadd(-131.015, 219, 7.22, 0.452)
pt3dadd(-131.132, 219, 7.203, 0.452)
pt3dadd(-131.251, 219.011, 7.2, 0.452)
pt3dadd(-131.354, 219.066, 7.2, 0.452)
pt3dadd(-131.393, 219.179, 7.2, 0.452)
pt3dadd(-131.4, 219.298, 7.2, 0.452)
pt3dadd(-131.4, 219.418, 7.194, 0.452)
pt3dadd(-131.4, 219.534, 7.173, 0.452)
pt3dadd(-131.422, 219.637, 7.129, 0.452)
pt3dadd(-131.514, 219.691, 7.109, 0.452)
pt3dadd(-131.633, 219.713, 7.104, 0.452)
pt3dadd(-131.749, 219.734, 7.1, 0.452)
pt3dadd(-131.854, 219.796, 7.1, 0.452)
pt3dadd(-131.957, 219.857, 7.1, 0.452)
pt3dadd(-132.052, 219.928, 7.096, 0.452)
pt3dadd(-132.15, 219.986, 7.065, 0.452)
pt3dadd(-132.248, 220.044, 7.035, 0.452)
pt3dadd(-132.347, 220.103, 7.004, 0.452)
pt3dadd(-132.445, 220.16, 6.974, 0.452)
pt3dadd(-132.517, 220.25, 6.953, 0.452)
pt3dadd(-132.581, 220.35, 6.936, 0.452)
pt3dadd(-132.644, 220.45, 6.919, 0.452)
pt3dadd(-132.709, 220.549, 6.902, 0.452)
pt3dadd(-132.775, 220.646, 6.885, 0.452)
pt3dadd(-132.847, 220.74, 6.865, 0.452)
pt3dadd(-132.919, 220.832, 6.845, 0.452)
pt3dadd(-132.991, 220.926, 6.825, 0.452)
pt3dadd(-133.063, 221.018, 6.805, 0.452)
pt3dadd(-133.144, 221.104, 6.782, 0.452)
pt3dadd(-133.226, 221.186, 6.759, 0.452)
pt3dadd(-133.309, 221.269, 6.736, 0.452)
pt3dadd(-133.391, 221.351, 6.714, 0.452)
pt3dadd(-133.471, 221.437, 6.699, 0.452)
pt3dadd(-133.548, 221.53, 6.696, 0.452)
pt3dadd(-133.626, 221.622, 6.693, 0.452)
pt3dadd(-133.703, 221.713, 6.69, 0.452)
pt3dadd(-133.748, 221.822, 6.689, 0.452)
pt3dadd(-133.784, 221.938, 6.689, 0.452)
pt3dadd(-133.804, 222.05, 6.669, 0.452)
pt3dadd(-133.81, 222.163, 6.635, 0.452)
pt3dadd(-133.834, 222.271, 6.608, 0.452)
pt3dadd(-133.9, 222.371, 6.597, 0.452)
pt3dadd(-133.964, 222.454, 6.565, 0.452)
pt3dadd(-134.022, 222.497, 6.486, 0.452)
pt3dadd(-134.095, 222.552, 6.427, 0.452)
pt3dadd(-134.185, 222.622, 6.396, 0.452)
pt3dadd(-134.276, 222.697, 6.381, 0.452)
}
}
proc shape3d_12() {
dend_5[4] { pt3dadd(-134.366, 222.774, 6.367, 0.452)
pt3dadd(-134.458, 222.851, 6.352, 0.452)
pt3dadd(-134.549, 222.926, 6.337, 0.452)
pt3dadd(-134.656, 222.977, 6.329, 0.452)
pt3dadd(-134.768, 223.018, 6.322, 0.452)
pt3dadd(-134.881, 223.058, 6.316, 0.452)
pt3dadd(-134.993, 223.1, 6.31, 0.452)
pt3dadd(-135.106, 223.141, 6.303, 0.452)
pt3dadd(-135.204, 223.204, 6.3, 0.452)
pt3dadd(-135.29, 223.288, 6.3, 0.452)
pt3dadd(-135.377, 223.37, 6.3, 0.452)
pt3dadd(-135.463, 223.454, 6.3, 0.452)
pt3dadd(-135.55, 223.537, 6.3, 0.452)
pt3dadd(-135.635, 223.621, 6.303, 0.452)
pt3dadd(-135.719, 223.706, 6.308, 0.452)
pt3dadd(-135.81, 223.774, 6.333, 0.452)
pt3dadd(-135.906, 223.825, 6.376, 0.452)
pt3dadd(-136.004, 223.872, 6.362, 0.452)
pt3dadd(-136.105, 223.919, 6.323, 0.452)
pt3dadd(-136.187, 223.964, 6.261, 0.452)
pt3dadd(-136.274, 224.012, 6.21, 0.452)
pt3dadd(-136.38, 224.069, 6.202, 0.452)
pt3dadd(-136.466, 224.116, 6.15, 0.452)
pt3dadd(-136.548, 224.161, 6.087, 0.452)
pt3dadd(-136.58, 224.202, 5.997, 0.452)
pt3dadd(-136.618, 224.243, 5.911, 0.452)
pt3dadd(-136.73, 224.284, 5.906, 0.452)
pt3dadd(-136.843, 224.324, 5.901, 0.452)
pt3dadd(-136.921, 224.408, 5.887, 0.452)
pt3dadd(-136.99, 224.504, 5.869, 0.452)
pt3dadd(-137.058, 224.587, 5.826, 0.452)
pt3dadd(-137.147, 224.654, 5.794, 0.452)
pt3dadd(-137.246, 224.714, 5.769, 0.452)
pt3dadd(-137.346, 224.774, 5.744, 0.452)
pt3dadd(-137.446, 224.834, 5.719, 0.452)
pt3dadd(-137.545, 224.89, 5.689, 0.452)
pt3dadd(-137.645, 224.926, 5.643, 0.452)
pt3dadd(-137.746, 224.962, 5.597, 0.452)
pt3dadd(-137.846, 224.998, 5.552, 0.452)
pt3dadd(-137.946, 225.035, 5.506, 0.452)
pt3dadd(-138.06, 225.068, 5.5, 0.452)
pt3dadd(-138.175, 225.101, 5.5, 0.452)
pt3dadd(-138.288, 225.128, 5.484, 0.452)
pt3dadd(-138.397, 225.148, 5.446, 0.452)
pt3dadd(-138.485, 225.175, 5.391, 0.452)
pt3dadd(-138.535, 225.218, 5.308, 0.452)
pt3dadd(-138.577, 225.24, 5.218, 0.452)
pt3dadd(-138.61, 225.24, 5.122, 0.452)
pt3dadd(-138.647, 225.241, 5.028, 0.452)
pt3dadd(-138.734, 225.253, 4.961, 0.452)
pt3dadd(-138.823, 225.265, 4.894, 0.452)
pt3dadd(-138.912, 225.277, 4.828, 0.452)
pt3dadd(-139.014, 225.322, 4.807, 0.452)
pt3dadd(-139.12, 225.378, 4.802, 0.452)
pt3dadd(-139.217, 225.446, 4.8, 0.452)
pt3dadd(-139.324, 225.5, 4.798, 0.452)
pt3dadd(-139.433, 225.552, 4.796, 0.452)
pt3dadd(-139.541, 225.604, 4.794, 0.452)
pt3dadd(-139.649, 225.654, 4.792, 0.452)
pt3dadd(-139.758, 225.706, 4.79, 0.452)
pt3dadd(-139.862, 225.72, 4.752, 0.452)
pt3dadd(-139.966, 225.72, 4.701, 0.452)
pt3dadd(-140.054, 225.761, 4.654, 0.452)
pt3dadd(-140.13, 225.836, 4.609, 0.452)
pt3dadd(-140.15, 225.948, 4.6, 0.452)
pt3dadd(-140.155, 226.067, 4.6, 0.452)
pt3dadd(-140.16, 226.187, 4.6, 0.452)
pt3dadd(-140.173, 226.307, 4.6, 0.452)
pt3dadd(-140.188, 226.426, 4.6, 0.452)
pt3dadd(-140.215, 226.537, 4.593, 0.452)
pt3dadd(-140.291, 226.622, 4.56, 0.452)
pt3dadd(-140.366, 226.706, 4.527, 0.452)
pt3dadd(-140.444, 226.79, 4.5, 0.452)
pt3dadd(-140.532, 226.871, 4.5, 0.452)
pt3dadd(-140.622, 226.949, 4.5, 0.452)
pt3dadd(-140.74, 226.976, 4.5, 0.452)
pt3dadd(-140.856, 227.005, 4.5, 0.452)
pt3dadd(-140.972, 227.033, 4.5, 0.452)
pt3dadd(-141.09, 227.04, 4.487, 0.452)
pt3dadd(-141.209, 227.04, 4.47, 0.452)
pt3dadd(-141.318, 227.04, 4.442, 0.452)
pt3dadd(-141.382, 227.04, 4.357, 0.452)
pt3dadd(-141.439, 227.04, 4.269, 0.452)
pt3dadd(-141.469, 227.04, 4.173, 0.452)
pt3dadd(-141.484, 227.04, 4.073, 0.452)
pt3dadd(-141.505, 227.04, 3.975, 0.452)
pt3dadd(-141.554, 227.051, 3.886, 0.452)
pt3dadd(-141.6, 227.125, 3.823, 0.452)
pt3dadd(-141.638, 227.234, 3.801, 0.452)
pt3dadd(-141.688, 227.344, 3.797, 0.452)
pt3dadd(-141.727, 227.452, 3.772, 0.452)
pt3dadd(-141.775, 227.546, 3.729, 0.452)
pt3dadd(-141.836, 227.648, 3.712, 0.452)
pt3dadd(-141.895, 227.75, 3.7, 0.452)
pt3dadd(-141.948, 227.858, 3.7, 0.452)
pt3dadd(-142.004, 227.964, 3.701, 0.452)
pt3dadd(-142.094, 228.041, 3.718, 0.452)
pt3dadd(-142.184, 228.108, 3.742, 0.452)
pt3dadd(-142.272, 228.122, 3.809, 0.452)
pt3dadd(-142.356, 228.148, 3.868, 0.452)
pt3dadd(-142.423, 228.247, 3.878, 0.452)
pt3dadd(-142.49, 228.346, 3.888, 0.452)
pt3dadd(-142.558, 228.444, 3.898, 0.452)
pt3dadd(-142.608, 228.551, 3.888, 0.452)
pt3dadd(-142.654, 228.661, 3.872, 0.452)
pt3dadd(-142.685, 228.752, 3.822, 0.452)
pt3dadd(-142.764, 228.842, 3.815, 0.452)
pt3dadd(-142.842, 228.934, 3.809, 0.452)
pt3dadd(-142.92, 229.024, 3.802, 0.452)
pt3dadd(-142.99, 229.118, 3.787, 0.452)
pt3dadd(-143.056, 229.217, 3.767, 0.452)
pt3dadd(-143.122, 229.314, 3.747, 0.452)
pt3dadd(-143.186, 229.412, 3.727, 0.452)
pt3dadd(-143.251, 229.511, 3.71, 0.452)
pt3dadd(-143.315, 229.613, 3.705, 0.452)
pt3dadd(-143.38, 229.712, 3.7, 0.452)
pt3dadd(-143.465, 229.798, 3.694, 0.452)
pt3dadd(-143.548, 229.882, 3.687, 0.452)
pt3dadd(-143.598, 229.924, 3.603, 0.452)
pt3dadd(-143.644, 229.974, 3.522, 0.452)
pt3dadd(-143.664, 230.057, 3.452, 0.452)
pt3dadd(-143.693, 230.131, 3.38, 0.452)
pt3dadd(-143.748, 230.174, 3.298, 0.452)
pt3dadd(-143.8, 230.226, 3.219, 0.452)
pt3dadd(-143.844, 230.276, 3.137, 0.452)
pt3dadd(-143.863, 230.321, 3.046, 0.452)
pt3dadd(-143.88, 230.371, 2.957, 0.452)
pt3dadd(-143.88, 230.453, 2.883, 0.452)
pt3dadd(-143.88, 230.534, 2.811, 0.452)
pt3dadd(-143.88, 230.654, 2.807, 0.452)
pt3dadd(-143.88, 230.774, 2.803, 0.452)
pt3dadd(-143.884, 230.894, 2.8, 0.452)
pt3dadd(-143.917, 231.01, 2.8, 0.452)
pt3dadd(-143.95, 231.125, 2.8, 0.452)
pt3dadd(-143.983, 231.24, 2.8, 0.452)
pt3dadd(-144.022, 231.352, 2.8, 0.452)
pt3dadd(-144.125, 231.412, 2.8, 0.452)
pt3dadd(-144.228, 231.473, 2.8, 0.452)
pt3dadd(-144.302, 231.554, 2.82, 0.452)
pt3dadd(-144.407, 231.589, 2.861, 0.452)
pt3dadd(-144.509, 231.632, 2.879, 0.452)
pt3dadd(-144.602, 231.695, 2.846, 0.452)
pt3dadd(-144.69, 231.77, 2.823, 0.452)
pt3dadd(-144.774, 231.854, 2.805, 0.452)
pt3dadd(-144.81, 231.962, 2.8, 0.452)
pt3dadd(-144.826, 232.081, 2.8, 0.452)
pt3dadd(-144.84, 232.2, 2.8, 0.452)
}
dend_5[5] {pt3dclear()
pt3dadd(-90.396, 188.173, 11.72, 1.582)
pt3dadd(-90.399, 188.173, 11.718, 1.582)
pt3dadd(-90.5, 188.168, 11.664, 1.614)
pt3dadd(-90.601, 188.164, 11.61, 1.646)
pt3dadd(-90.702, 188.159, 11.555, 1.678)
pt3dadd(-90.802, 188.155, 11.501, 1.71)
pt3dadd(-90.903, 188.15, 11.447, 1.742)
pt3dadd(-91.004, 188.146, 11.393, 1.774)
pt3dadd(-91.104, 188.142, 11.338, 1.806)
pt3dadd(-91.205, 188.137, 11.284, 1.838)
pt3dadd(-91.306, 188.132, 11.23, 1.87)
pt3dadd(-91.407, 188.128, 11.176, 1.902)
pt3dadd(-91.507, 188.124, 11.122, 1.934)
pt3dadd(-91.608, 188.119, 11.067, 1.966)
pt3dadd(-91.721, 188.116, 11.037, 1.91)
pt3dadd(-91.838, 188.111, 11.018, 1.816)
pt3dadd(-91.956, 188.107, 10.998, 1.722)
pt3dadd(-92.073, 188.104, 10.979, 1.628)
pt3dadd(-92.191, 188.1, 10.959, 1.534)
pt3dadd(-92.309, 188.095, 10.94, 1.44)
pt3dadd(-92.426, 188.092, 10.92, 1.346)
pt3dadd(-92.544, 188.088, 10.901, 1.252)
pt3dadd(-92.662, 188.084, 10.881, 1.158)
pt3dadd(-92.779, 188.08, 10.862, 1.064)
pt3dadd(-92.898, 188.075, 10.848, 1.008)
pt3dadd(-93.017, 188.07, 10.836, 0.958)
pt3dadd(-93.136, 188.065, 10.823, 0.91)
pt3dadd(-93.255, 188.06, 10.811, 0.86)
pt3dadd(-93.374, 188.056, 10.799, 0.812)
pt3dadd(-93.493, 188.05, 10.786, 0.762)
pt3dadd(-93.612, 188.045, 10.774, 0.714)
pt3dadd(-93.731, 188.04, 10.762, 0.664)
pt3dadd(-93.85, 188.035, 10.749, 0.616)
pt3dadd(-93.969, 188.03, 10.737, 0.566)
pt3dadd(-94.085, 188.023, 10.714, 0.564)
pt3dadd(-94.202, 188.017, 10.69, 0.568)
pt3dadd(-94.318, 188.01, 10.665, 0.57)
pt3dadd(-94.434, 188.004, 10.641, 0.574)
pt3dadd(-94.55, 187.997, 10.617, 0.578)
pt3dadd(-94.666, 187.991, 10.592, 0.582)
pt3dadd(-94.782, 187.984, 10.568, 0.586)
pt3dadd(-94.899, 187.976, 10.543, 0.59)
pt3dadd(-95.015, 187.97, 10.519, 0.594)
pt3dadd(-95.131, 187.963, 10.495, 0.598)
pt3dadd(-95.243, 187.952, 10.46, 0.588)
pt3dadd(-95.354, 187.94, 10.425, 0.576)
pt3dadd(-95.466, 187.928, 10.389, 0.564)
pt3dadd(-95.578, 187.916, 10.354, 0.554)
pt3dadd(-95.689, 187.904, 10.318, 0.542)
pt3dadd(-95.801, 187.892, 10.283, 0.53)
pt3dadd(-95.912, 187.88, 10.247, 0.518)
pt3dadd(-96.024, 187.868, 10.212, 0.506)
pt3dadd(-96.136, 187.856, 10.177, 0.496)
}
}
proc shape3d_13() {
dend_5[5] { pt3dadd(-96.247, 187.844, 10.141, 0.484)
pt3dadd(-96.358, 187.81, 10.117, 0.502)
pt3dadd(-96.469, 187.775, 10.093, 0.52)
pt3dadd(-96.58, 187.74, 10.069, 0.538)
pt3dadd(-96.692, 187.705, 10.044, 0.556)
pt3dadd(-96.803, 187.67, 10.02, 0.572)
pt3dadd(-96.914, 187.636, 9.996, 0.59)
pt3dadd(-97.025, 187.601, 9.972, 0.608)
pt3dadd(-97.136, 187.565, 9.948, 0.626)
pt3dadd(-97.247, 187.53, 9.924, 0.644)
pt3dadd(-97.358, 187.495, 9.899, 0.662)
pt3dadd(-97.476, 187.5, 9.885, 0.698)
pt3dadd(-97.595, 187.506, 9.87, 0.734)
pt3dadd(-97.714, 187.512, 9.855, 0.772)
pt3dadd(-97.832, 187.517, 9.84, 0.808)
pt3dadd(-97.951, 187.523, 9.825, 0.844)
pt3dadd(-98.069, 187.528, 9.811, 0.88)
pt3dadd(-98.188, 187.534, 9.796, 0.916)
pt3dadd(-98.306, 187.538, 9.781, 0.954)
pt3dadd(-98.425, 187.544, 9.766, 0.99)
pt3dadd(-98.544, 187.549, 9.752, 1.022)
pt3dadd(-98.663, 187.553, 9.743, 0.992)
pt3dadd(-98.782, 187.556, 9.734, 0.96)
pt3dadd(-98.902, 187.56, 9.725, 0.93)
pt3dadd(-99.021, 187.565, 9.716, 0.898)
pt3dadd(-99.141, 187.568, 9.707, 0.868)
pt3dadd(-99.26, 187.572, 9.698, 0.836)
pt3dadd(-99.38, 187.576, 9.689, 0.806)
pt3dadd(-99.499, 187.579, 9.68, 0.774)
pt3dadd(-99.619, 187.583, 9.671, 0.744)
pt3dadd(-99.738, 187.585, 9.662, 0.714)
pt3dadd(-99.856, 187.566, 9.653, 0.686)
pt3dadd(-99.974, 187.548, 9.644, 0.66)
pt3dadd(-100.092, 187.529, 9.634, 0.634)
pt3dadd(-100.21, 187.511, 9.625, 0.606)
pt3dadd(-100.328, 187.492, 9.616, 0.58)
pt3dadd(-100.446, 187.474, 9.606, 0.554)
pt3dadd(-100.564, 187.454, 9.597, 0.526)
pt3dadd(-100.682, 187.435, 9.588, 0.5)
pt3dadd(-100.8, 187.417, 9.578, 0.474)
pt3dadd(-100.917, 187.396, 9.567, 0.452)
pt3dadd(-101.03, 187.362, 9.549, 0.446)
pt3dadd(-101.143, 187.327, 9.53, 0.44)
pt3dadd(-101.256, 187.294, 9.511, 0.436)
pt3dadd(-101.369, 187.26, 9.492, 0.43)
pt3dadd(-101.482, 187.226, 9.473, 0.424)
pt3dadd(-101.594, 187.193, 9.454, 0.42)
pt3dadd(-101.707, 187.158, 9.435, 0.414)
pt3dadd(-101.82, 187.124, 9.416, 0.408)
pt3dadd(-101.933, 187.091, 9.398, 0.402)
pt3dadd(-102.045, 187.058, 9.374, 0.394)
pt3dadd(-102.152, 187.027, 9.338, 0.378)
pt3dadd(-102.26, 186.997, 9.302, 0.36)
pt3dadd(-102.368, 186.966, 9.266, 0.342)
pt3dadd(-102.476, 186.936, 9.231, 0.326)
pt3dadd(-102.583, 186.905, 9.194, 0.308)
pt3dadd(-102.691, 186.875, 9.159, 0.29)
pt3dadd(-102.799, 186.844, 9.123, 0.274)
pt3dadd(-102.906, 186.814, 9.087, 0.256)
pt3dadd(-103.014, 186.782, 9.051, 0.238)
pt3dadd(-103.124, 186.754, 9.018, 0.226)
pt3dadd(-103.238, 186.731, 8.994, 0.226)
pt3dadd(-103.352, 186.708, 8.971, 0.226)
pt3dadd(-103.467, 186.686, 8.947, 0.226)
pt3dadd(-103.581, 186.664, 8.924, 0.226)
pt3dadd(-103.695, 186.641, 8.9, 0.226)
pt3dadd(-103.81, 186.618, 8.877, 0.226)
pt3dadd(-103.924, 186.595, 8.853, 0.226)
pt3dadd(-104.039, 186.572, 8.83, 0.226)
pt3dadd(-104.153, 186.55, 8.806, 0.226)
pt3dadd(-104.268, 186.528, 8.785, 0.226)
pt3dadd(-104.386, 186.509, 8.771, 0.226)
pt3dadd(-104.503, 186.49, 8.757, 0.226)
pt3dadd(-104.62, 186.472, 8.743, 0.226)
pt3dadd(-104.738, 186.452, 8.729, 0.226)
pt3dadd(-104.855, 186.433, 8.716, 0.226)
pt3dadd(-104.972, 186.414, 8.702, 0.226)
pt3dadd(-105.09, 186.395, 8.688, 0.226)
pt3dadd(-105.207, 186.376, 8.674, 0.226)
pt3dadd(-105.324, 186.358, 8.66, 0.226)
pt3dadd(-105.44, 186.332, 8.649, 0.226)
pt3dadd(-105.554, 186.295, 8.644, 0.226)
pt3dadd(-105.668, 186.257, 8.639, 0.226)
pt3dadd(-105.781, 186.218, 8.635, 0.226)
pt3dadd(-105.895, 186.18, 8.63, 0.226)
pt3dadd(-106.009, 186.142, 8.625, 0.226)
pt3dadd(-106.122, 186.104, 8.621, 0.226)
pt3dadd(-106.236, 186.066, 8.616, 0.226)
pt3dadd(-106.35, 186.028, 8.611, 0.226)
pt3dadd(-106.463, 185.989, 8.606, 0.226)
pt3dadd(-106.575, 185.947, 8.604, 0.226)
pt3dadd(-106.684, 185.897, 8.604, 0.226)
pt3dadd(-106.793, 185.846, 8.604, 0.226)
pt3dadd(-106.902, 185.796, 8.604, 0.226)
pt3dadd(-107.011, 185.747, 8.604, 0.226)
pt3dadd(-107.12, 185.696, 8.604, 0.226)
pt3dadd(-107.229, 185.646, 8.604, 0.226)
pt3dadd(-107.338, 185.597, 8.604, 0.226)
pt3dadd(-107.447, 185.546, 8.604, 0.226)
pt3dadd(-107.556, 185.496, 8.604, 0.226)
pt3dadd(-107.667, 185.448, 8.604, 0.226)
pt3dadd(-107.778, 185.405, 8.604, 0.226)
pt3dadd(-107.89, 185.36, 8.604, 0.228)
pt3dadd(-108.002, 185.317, 8.604, 0.228)
pt3dadd(-108.113, 185.273, 8.604, 0.228)
pt3dadd(-108.225, 185.228, 8.604, 0.228)
pt3dadd(-108.337, 185.185, 8.604, 0.23)
pt3dadd(-108.448, 185.141, 8.604, 0.23)
pt3dadd(-108.56, 185.098, 8.604, 0.23)
pt3dadd(-108.672, 185.053, 8.604, 0.23)
pt3dadd(-108.78, 185.003, 8.604, 0.258)
pt3dadd(-108.884, 184.943, 8.604, 0.324)
pt3dadd(-108.987, 184.882, 8.604, 0.39)
pt3dadd(-109.091, 184.822, 8.604, 0.458)
pt3dadd(-109.195, 184.762, 8.604, 0.524)
pt3dadd(-109.299, 184.7, 8.604, 0.59)
pt3dadd(-109.402, 184.64, 8.604, 0.656)
pt3dadd(-109.506, 184.58, 8.604, 0.724)
pt3dadd(-109.61, 184.519, 8.604, 0.79)
pt3dadd(-109.713, 184.459, 8.604, 0.856)
pt3dadd(-109.82, 184.404, 8.604, 0.896)
pt3dadd(-109.93, 184.356, 8.604, 0.896)
pt3dadd(-110.04, 184.308, 8.604, 0.896)
pt3dadd(-110.15, 184.26, 8.604, 0.896)
pt3dadd(-110.26, 184.212, 8.604, 0.896)
pt3dadd(-110.37, 184.164, 8.604, 0.896)
pt3dadd(-110.48, 184.116, 8.604, 0.896)
pt3dadd(-110.59, 184.068, 8.604, 0.896)
pt3dadd(-110.7, 184.02, 8.604, 0.896)
pt3dadd(-110.81, 183.972, 8.604, 0.896)
pt3dadd(-110.92, 183.925, 8.604, 0.882)
pt3dadd(-111.031, 183.878, 8.604, 0.854)
pt3dadd(-111.141, 183.832, 8.604, 0.826)
pt3dadd(-111.252, 183.786, 8.604, 0.796)
pt3dadd(-111.363, 183.739, 8.604, 0.768)
pt3dadd(-111.473, 183.692, 8.604, 0.74)
pt3dadd(-111.584, 183.646, 8.604, 0.71)
pt3dadd(-111.694, 183.6, 8.604, 0.682)
pt3dadd(-111.805, 183.553, 8.604, 0.654)
pt3dadd(-111.916, 183.506, 8.604, 0.626)
pt3dadd(-112.025, 183.457, 8.604, 0.602)
pt3dadd(-112.133, 183.404, 8.604, 0.586)
pt3dadd(-112.241, 183.352, 8.604, 0.57)
pt3dadd(-112.348, 183.299, 8.604, 0.556)
pt3dadd(-112.456, 183.246, 8.604, 0.54)
pt3dadd(-112.564, 183.194, 8.604, 0.524)
pt3dadd(-112.672, 183.142, 8.604, 0.508)
pt3dadd(-112.78, 183.089, 8.604, 0.492)
pt3dadd(-112.887, 183.036, 8.604, 0.476)
pt3dadd(-112.995, 182.983, 8.604, 0.46)
pt3dadd(-113.107, 182.942, 8.604, 0.452)
pt3dadd(-113.224, 182.914, 8.604, 0.452)
pt3dadd(-113.34, 182.885, 8.604, 0.452)
pt3dadd(-113.457, 182.856, 8.604, 0.452)
pt3dadd(-113.573, 182.827, 8.604, 0.452)
pt3dadd(-113.69, 182.798, 8.604, 0.452)
pt3dadd(-113.806, 182.77, 8.603, 0.452)
pt3dadd(-113.923, 182.741, 8.603, 0.452)
pt3dadd(-114.039, 182.712, 8.603, 0.452)
pt3dadd(-114.156, 182.683, 8.603, 0.452)
pt3dadd(-114.273, 182.66, 8.603, 0.444)
pt3dadd(-114.393, 182.645, 8.603, 0.428)
pt3dadd(-114.511, 182.63, 8.603, 0.41)
pt3dadd(-114.63, 182.615, 8.603, 0.394)
pt3dadd(-114.75, 182.599, 8.603, 0.378)
pt3dadd(-114.869, 182.584, 8.603, 0.36)
pt3dadd(-114.988, 182.569, 8.603, 0.344)
pt3dadd(-115.107, 182.554, 8.603, 0.328)
pt3dadd(-115.226, 182.538, 8.603, 0.31)
pt3dadd(-115.345, 182.524, 8.603, 0.294)
pt3dadd(-115.464, 182.513, 8.603, 0.29)
pt3dadd(-115.584, 182.509, 8.603, 0.296)
pt3dadd(-115.704, 182.506, 8.603, 0.304)
pt3dadd(-115.824, 182.501, 8.603, 0.31)
pt3dadd(-115.944, 182.497, 8.603, 0.318)
pt3dadd(-116.064, 182.494, 8.603, 0.326)
pt3dadd(-116.184, 182.49, 8.603, 0.332)
pt3dadd(-116.304, 182.485, 8.603, 0.34)
pt3dadd(-116.424, 182.482, 8.603, 0.348)
pt3dadd(-116.544, 182.478, 8.603, 0.356)
pt3dadd(-116.664, 182.476, 8.603, 0.358)
pt3dadd(-116.784, 182.476, 8.603, 0.358)
pt3dadd(-116.904, 182.476, 8.603, 0.358)
pt3dadd(-117.024, 182.476, 8.603, 0.356)
pt3dadd(-117.144, 182.476, 8.603, 0.356)
pt3dadd(-117.264, 182.476, 8.603, 0.356)
pt3dadd(-117.384, 182.476, 8.603, 0.354)
pt3dadd(-117.504, 182.476, 8.603, 0.354)
pt3dadd(-117.624, 182.476, 8.603, 0.354)
pt3dadd(-117.744, 182.476, 8.602, 0.354)
pt3dadd(-117.864, 182.476, 8.602, 0.356)
pt3dadd(-117.984, 182.476, 8.602, 0.364)
pt3dadd(-118.104, 182.477, 8.602, 0.37)
pt3dadd(-118.224, 182.477, 8.602, 0.378)
pt3dadd(-118.344, 182.477, 8.602, 0.384)
pt3dadd(-118.464, 182.477, 8.602, 0.392)
pt3dadd(-118.584, 182.477, 8.602, 0.398)
pt3dadd(-118.704, 182.478, 8.602, 0.406)
pt3dadd(-118.824, 182.478, 8.602, 0.412)
pt3dadd(-118.944, 182.478, 8.602, 0.42)
}
}
proc shape3d_14() {
dend_5[5] { pt3dadd(-119.064, 182.478, 8.601, 0.442)
pt3dadd(-119.184, 182.479, 8.601, 0.48)
pt3dadd(-119.304, 182.479, 8.601, 0.52)
pt3dadd(-119.424, 182.479, 8.601, 0.558)
pt3dadd(-119.544, 182.48, 8.601, 0.596)
pt3dadd(-119.664, 182.48, 8.601, 0.634)
pt3dadd(-119.784, 182.482, 8.601, 0.672)
pt3dadd(-119.904, 182.482, 8.6, 0.712)
pt3dadd(-120.024, 182.482, 8.6, 0.75)
pt3dadd(-120.144, 182.483, 8.6, 0.788)
pt3dadd(-120.264, 182.483, 8.6, 0.778)
pt3dadd(-120.384, 182.484, 8.6, 0.722)
pt3dadd(-120.504, 182.484, 8.599, 0.664)
pt3dadd(-120.624, 182.485, 8.599, 0.606)
pt3dadd(-120.744, 182.486, 8.599, 0.548)
pt3dadd(-120.864, 182.486, 8.598, 0.49)
pt3dadd(-120.984, 182.488, 8.598, 0.432)
pt3dadd(-121.104, 182.488, 8.598, 0.374)
pt3dadd(-121.224, 182.489, 8.597, 0.318)
pt3dadd(-121.344, 182.49, 8.597, 0.26)
pt3dadd(-121.464, 182.491, 8.597, 0.23)
pt3dadd(-121.584, 182.492, 8.596, 0.23)
pt3dadd(-121.704, 182.494, 8.595, 0.23)
pt3dadd(-121.824, 182.496, 8.595, 0.228)
pt3dadd(-121.944, 182.497, 8.594, 0.228)
pt3dadd(-122.064, 182.5, 8.594, 0.228)
pt3dadd(-122.183, 182.501, 8.593, 0.228)
pt3dadd(-122.303, 182.502, 8.592, 0.228)
pt3dadd(-122.423, 182.504, 8.592, 0.226)
pt3dadd(-122.543, 182.506, 8.591, 0.226)
pt3dadd(-122.663, 182.508, 8.59, 0.226)
pt3dadd(-122.783, 182.512, 8.589, 0.226)
pt3dadd(-122.903, 182.515, 8.587, 0.226)
pt3dadd(-123.023, 182.518, 8.586, 0.226)
pt3dadd(-123.143, 182.521, 8.585, 0.226)
pt3dadd(-123.263, 182.525, 8.584, 0.226)
pt3dadd(-123.383, 182.528, 8.582, 0.226)
pt3dadd(-123.503, 182.531, 8.581, 0.226)
pt3dadd(-123.623, 182.534, 8.58, 0.226)
pt3dadd(-123.743, 182.538, 8.579, 0.226)
pt3dadd(-123.863, 182.543, 8.577, 0.232)
pt3dadd(-123.983, 182.549, 8.575, 0.244)
pt3dadd(-124.103, 182.556, 8.572, 0.256)
pt3dadd(-124.222, 182.562, 8.57, 0.27)
pt3dadd(-124.342, 182.569, 8.567, 0.282)
pt3dadd(-124.462, 182.575, 8.565, 0.294)
pt3dadd(-124.582, 182.582, 8.563, 0.306)
pt3dadd(-124.702, 182.588, 8.56, 0.318)
pt3dadd(-124.82, 182.596, 8.558, 0.33)
pt3dadd(-124.94, 182.602, 8.556, 0.344)
pt3dadd(-125.06, 182.611, 8.552, 0.35)
pt3dadd(-125.179, 182.622, 8.547, 0.352)
pt3dadd(-125.299, 182.633, 8.543, 0.352)
pt3dadd(-125.418, 182.645, 8.538, 0.354)
pt3dadd(-125.538, 182.656, 8.533, 0.356)
pt3dadd(-125.657, 182.666, 8.528, 0.358)
pt3dadd(-125.777, 182.678, 8.523, 0.358)
pt3dadd(-125.896, 182.689, 8.519, 0.36)
pt3dadd(-126.016, 182.7, 8.514, 0.362)
pt3dadd(-126.134, 182.711, 8.509, 0.362)
pt3dadd(-126.253, 182.729, 8.503, 0.362)
pt3dadd(-126.37, 182.752, 8.495, 0.358)
pt3dadd(-126.487, 182.774, 8.486, 0.354)
pt3dadd(-126.605, 182.796, 8.478, 0.35)
pt3dadd(-126.722, 182.819, 8.47, 0.346)
pt3dadd(-126.84, 182.842, 8.462, 0.342)
pt3dadd(-126.958, 182.864, 8.454, 0.338)
pt3dadd(-127.075, 182.887, 8.446, 0.334)
pt3dadd(-127.192, 182.91, 8.438, 0.332)
pt3dadd(-127.309, 182.933, 8.43, 0.328)
pt3dadd(-127.423, 182.969, 8.42, 0.346)
pt3dadd(-127.534, 183.013, 8.409, 0.382)
pt3dadd(-127.644, 183.058, 8.398, 0.416)
pt3dadd(-127.754, 183.102, 8.387, 0.452)
pt3dadd(-127.866, 183.146, 8.376, 0.486)
pt3dadd(-127.976, 183.192, 8.365, 0.52)
pt3dadd(-128.087, 183.236, 8.354, 0.556)
pt3dadd(-128.197, 183.281, 8.343, 0.59)
pt3dadd(-128.308, 183.325, 8.332, 0.626)
pt3dadd(-128.418, 183.37, 8.321, 0.66)
pt3dadd(-128.528, 183.404, 8.296, 0.656)
pt3dadd(-128.636, 183.432, 8.26, 0.62)
pt3dadd(-128.744, 183.46, 8.223, 0.586)
pt3dadd(-128.854, 183.487, 8.187, 0.55)
pt3dadd(-128.962, 183.514, 8.151, 0.516)
pt3dadd(-129.07, 183.541, 8.115, 0.482)
pt3dadd(-129.179, 183.569, 8.078, 0.446)
pt3dadd(-129.287, 183.596, 8.042, 0.412)
pt3dadd(-129.396, 183.624, 8.006, 0.378)
pt3dadd(-129.504, 183.65, 7.97, 0.342)
pt3dadd(-129.616, 183.673, 7.938, 0.322)
pt3dadd(-129.73, 183.691, 7.911, 0.312)
pt3dadd(-129.844, 183.709, 7.883, 0.302)
pt3dadd(-129.958, 183.728, 7.856, 0.292)
pt3dadd(-130.072, 183.746, 7.828, 0.28)
pt3dadd(-130.184, 183.764, 7.8, 0.27)
pt3dadd(-130.298, 183.782, 7.773, 0.26)
pt3dadd(-130.412, 183.802, 7.745, 0.25)
pt3dadd(-130.526, 183.82, 7.717, 0.24)
pt3dadd(-130.64, 183.838, 7.69, 0.23)
pt3dadd(-130.757, 183.851, 7.668, 0.226)
pt3dadd(-130.874, 183.859, 7.65, 0.226)
pt3dadd(-130.992, 183.869, 7.632, 0.226)
pt3dadd(-131.11, 183.878, 7.615, 0.226)
pt3dadd(-131.227, 183.887, 7.597, 0.226)
pt3dadd(-131.345, 183.896, 7.579, 0.226)
pt3dadd(-131.462, 183.905, 7.561, 0.226)
pt3dadd(-131.581, 183.914, 7.543, 0.226)
pt3dadd(-131.699, 183.924, 7.525, 0.226)
pt3dadd(-131.816, 183.932, 7.507, 0.226)
pt3dadd(-131.935, 183.94, 7.496, 0.23)
pt3dadd(-132.054, 183.944, 7.488, 0.236)
pt3dadd(-132.174, 183.949, 7.48, 0.242)
pt3dadd(-132.294, 183.954, 7.472, 0.248)
pt3dadd(-132.413, 183.959, 7.464, 0.254)
pt3dadd(-132.533, 183.964, 7.455, 0.26)
pt3dadd(-132.652, 183.968, 7.447, 0.266)
pt3dadd(-132.772, 183.973, 7.439, 0.27)
pt3dadd(-132.89, 183.978, 7.431, 0.276)
pt3dadd(-133.01, 183.984, 7.423, 0.282)
pt3dadd(-133.13, 183.991, 7.42, 0.294)
pt3dadd(-133.249, 184.001, 7.419, 0.308)
pt3dadd(-133.369, 184.009, 7.418, 0.322)
pt3dadd(-133.489, 184.019, 7.418, 0.336)
pt3dadd(-133.609, 184.027, 7.417, 0.352)
pt3dadd(-133.728, 184.037, 7.416, 0.366)
pt3dadd(-133.848, 184.046, 7.415, 0.38)
pt3dadd(-133.968, 184.055, 7.414, 0.394)
pt3dadd(-134.087, 184.064, 7.414, 0.408)
pt3dadd(-134.207, 184.073, 7.413, 0.422)
pt3dadd(-134.327, 184.086, 7.412, 0.414)
pt3dadd(-134.446, 184.099, 7.41, 0.396)
pt3dadd(-134.564, 184.114, 7.409, 0.376)
pt3dadd(-134.683, 184.127, 7.407, 0.358)
pt3dadd(-134.803, 184.141, 7.406, 0.338)
pt3dadd(-134.922, 184.156, 7.404, 0.32)
pt3dadd(-135.041, 184.169, 7.403, 0.3)
pt3dadd(-135.161, 184.183, 7.401, 0.28)
pt3dadd(-135.28, 184.196, 7.4, 0.262)
pt3dadd(-135.398, 184.211, 7.398, 0.242)
pt3dadd(-135.514, 184.244, 7.396, 0.236)
pt3dadd(-135.625, 184.288, 7.393, 0.234)
pt3dadd(-135.737, 184.33, 7.39, 0.234)
pt3dadd(-135.85, 184.373, 7.387, 0.232)
pt3dadd(-135.961, 184.416, 7.385, 0.232)
pt3dadd(-136.073, 184.459, 7.382, 0.23)
pt3dadd(-136.186, 184.502, 7.379, 0.23)
pt3dadd(-136.297, 184.546, 7.376, 0.228)
pt3dadd(-136.409, 184.588, 7.374, 0.228)
pt3dadd(-136.522, 184.631, 7.371, 0.226)
pt3dadd(-136.636, 184.668, 7.366, 0.226)
pt3dadd(-136.75, 184.702, 7.36, 0.226)
pt3dadd(-136.865, 184.735, 7.354, 0.226)
pt3dadd(-136.98, 184.77, 7.348, 0.226)
pt3dadd(-137.095, 184.804, 7.343, 0.226)
pt3dadd(-137.209, 184.837, 7.337, 0.226)
pt3dadd(-137.324, 184.871, 7.331, 0.226)
pt3dadd(-137.44, 184.904, 7.325, 0.226)
pt3dadd(-137.555, 184.938, 7.319, 0.226)
pt3dadd(-137.669, 184.973, 7.313, 0.226)
pt3dadd(-137.786, 184.998, 7.305, 0.244)
pt3dadd(-137.904, 185.02, 7.295, 0.272)
pt3dadd(-138.022, 185.04, 7.285, 0.298)
pt3dadd(-138.138, 185.062, 7.276, 0.326)
pt3dadd(-138.256, 185.083, 7.266, 0.352)
pt3dadd(-138.373, 185.105, 7.256, 0.38)
pt3dadd(-138.491, 185.126, 7.246, 0.406)
pt3dadd(-138.608, 185.148, 7.237, 0.434)
pt3dadd(-138.726, 185.17, 7.227, 0.46)
pt3dadd(-138.844, 185.191, 7.217, 0.488)
pt3dadd(-138.961, 185.204, 7.2, 0.518)
pt3dadd(-139.078, 185.214, 7.18, 0.548)
pt3dadd(-139.195, 185.224, 7.16, 0.58)
pt3dadd(-139.312, 185.233, 7.14, 0.61)
pt3dadd(-139.429, 185.243, 7.12, 0.642)
pt3dadd(-139.547, 185.252, 7.1, 0.674)
pt3dadd(-139.663, 185.262, 7.08, 0.704)
pt3dadd(-139.781, 185.272, 7.06, 0.736)
pt3dadd(-139.898, 185.281, 7.04, 0.766)
pt3dadd(-140.015, 185.291, 7.02, 0.798)
pt3dadd(-140.126, 185.292, 6.984, 0.774)
pt3dadd(-140.238, 185.292, 6.945, 0.74)
pt3dadd(-140.348, 185.292, 6.907, 0.704)
pt3dadd(-140.459, 185.292, 6.868, 0.67)
pt3dadd(-140.569, 185.292, 6.829, 0.634)
pt3dadd(-140.68, 185.292, 6.79, 0.6)
pt3dadd(-140.79, 185.292, 6.751, 0.564)
pt3dadd(-140.902, 185.292, 6.713, 0.528)
pt3dadd(-141.012, 185.292, 6.674, 0.494)
pt3dadd(-141.122, 185.292, 6.635, 0.458)
pt3dadd(-141.236, 185.292, 6.605, 0.452)
pt3dadd(-141.352, 185.292, 6.577, 0.452)
pt3dadd(-141.467, 185.292, 6.549, 0.452)
pt3dadd(-141.582, 185.292, 6.521, 0.452)
pt3dadd(-141.697, 185.292, 6.493, 0.452)
pt3dadd(-141.812, 185.292, 6.465, 0.452)
pt3dadd(-141.928, 185.292, 6.438, 0.452)
pt3dadd(-142.043, 185.292, 6.41, 0.452)
pt3dadd(-142.158, 185.292, 6.382, 0.452)
pt3dadd(-142.273, 185.292, 6.354, 0.452)
}
}
proc shape3d_15() {
dend_5[5] { pt3dadd(-142.391, 185.292, 6.33, 0.476)
pt3dadd(-142.507, 185.292, 6.308, 0.508)
pt3dadd(-142.624, 185.292, 6.285, 0.538)
pt3dadd(-142.741, 185.292, 6.262, 0.568)
pt3dadd(-142.858, 185.292, 6.239, 0.598)
pt3dadd(-142.975, 185.292, 6.217, 0.628)
pt3dadd(-143.092, 185.292, 6.194, 0.66)
pt3dadd(-143.208, 185.292, 6.171, 0.69)
pt3dadd(-143.326, 185.292, 6.148, 0.72)
pt3dadd(-143.442, 185.292, 6.126, 0.75)
pt3dadd(-143.56, 185.292, 6.107, 0.748)
pt3dadd(-143.678, 185.292, 6.089, 0.736)
pt3dadd(-143.796, 185.292, 6.071, 0.726)
pt3dadd(-143.914, 185.292, 6.052, 0.716)
pt3dadd(-144.032, 185.292, 6.034, 0.706)
pt3dadd(-144.15, 185.292, 6.016, 0.694)
pt3dadd(-144.268, 185.292, 5.998, 0.684)
pt3dadd(-144.386, 185.292, 5.98, 0.674)
pt3dadd(-144.504, 185.292, 5.962, 0.664)
pt3dadd(-144.622, 185.292, 5.944, 0.652)
pt3dadd(-144.736, 185.292, 5.911, 0.634)
pt3dadd(-144.847, 185.292, 5.876, 0.614)
pt3dadd(-144.96, 185.292, 5.841, 0.594)
pt3dadd(-145.073, 185.292, 5.806, 0.574)
pt3dadd(-145.184, 185.292, 5.771, 0.554)
pt3dadd(-145.297, 185.292, 5.736, 0.534)
pt3dadd(-145.41, 185.292, 5.701, 0.512)
pt3dadd(-145.522, 185.292, 5.665, 0.492)
pt3dadd(-145.634, 185.292, 5.63, 0.472)
pt3dadd(-145.746, 185.292, 5.595, 0.452)
pt3dadd(-145.849, 185.292, 5.544, 0.452)
pt3dadd(-145.952, 185.292, 5.492, 0.452)
pt3dadd(-146.056, 185.292, 5.441, 0.452)
pt3dadd(-146.158, 185.292, 5.39, 0.452)
pt3dadd(-146.261, 185.292, 5.338, 0.452)
pt3dadd(-146.364, 185.292, 5.287, 0.452)
pt3dadd(-146.467, 185.292, 5.235, 0.452)
pt3dadd(-146.569, 185.292, 5.184, 0.452)
pt3dadd(-146.672, 185.292, 5.132, 0.452)
pt3dadd(-146.776, 185.292, 5.081, 0.452)
}
dend_5[6] {pt3dclear()
pt3dadd(-45.315, 165.846, 10.946, 1.582)
pt3dadd(-45.315, 165.889, 10.946, 1.53)
pt3dadd(-45.316, 166.009, 10.946, 1.386)
pt3dadd(-45.317, 166.129, 10.947, 1.242)
pt3dadd(-45.318, 166.249, 10.948, 1.098)
pt3dadd(-45.319, 166.369, 10.948, 0.954)
pt3dadd(-45.32, 166.489, 10.949, 0.81)
pt3dadd(-45.298, 166.606, 10.95, 0.72)
pt3dadd(-45.26, 166.718, 10.95, 0.678)
pt3dadd(-45.221, 166.832, 10.95, 0.634)
pt3dadd(-45.182, 166.945, 10.95, 0.59)
pt3dadd(-45.143, 167.059, 10.951, 0.546)
pt3dadd(-45.104, 167.173, 10.951, 0.502)
pt3dadd(-45.066, 167.286, 10.951, 0.46)
pt3dadd(-45.027, 167.4, 10.951, 0.416)
pt3dadd(-44.988, 167.513, 10.952, 0.372)
pt3dadd(-44.949, 167.627, 10.952, 0.328)
pt3dadd(-44.896, 167.735, 10.952, 0.332)
pt3dadd(-44.84, 167.84, 10.952, 0.342)
pt3dadd(-44.785, 167.947, 10.952, 0.352)
pt3dadd(-44.73, 168.054, 10.952, 0.362)
pt3dadd(-44.674, 168.16, 10.952, 0.372)
pt3dadd(-44.619, 168.266, 10.952, 0.382)
pt3dadd(-44.563, 168.373, 10.952, 0.392)
pt3dadd(-44.508, 168.48, 10.952, 0.402)
pt3dadd(-44.453, 168.586, 10.952, 0.412)
pt3dadd(-44.397, 168.692, 10.952, 0.422)
pt3dadd(-44.366, 168.808, 10.952, 0.404)
pt3dadd(-44.336, 168.924, 10.952, 0.384)
pt3dadd(-44.307, 169.04, 10.952, 0.366)
pt3dadd(-44.278, 169.157, 10.952, 0.346)
pt3dadd(-44.249, 169.273, 10.952, 0.326)
pt3dadd(-44.22, 169.39, 10.953, 0.306)
pt3dadd(-44.191, 169.506, 10.953, 0.286)
pt3dadd(-44.161, 169.622, 10.953, 0.266)
pt3dadd(-44.132, 169.739, 10.953, 0.248)
pt3dadd(-44.103, 169.855, 10.953, 0.228)
pt3dadd(-44.092, 169.975, 10.953, 0.226)
pt3dadd(-44.082, 170.094, 10.953, 0.226)
pt3dadd(-44.072, 170.214, 10.953, 0.226)
pt3dadd(-44.062, 170.334, 10.953, 0.226)
pt3dadd(-44.052, 170.453, 10.953, 0.226)
pt3dadd(-44.042, 170.573, 10.953, 0.226)
pt3dadd(-44.032, 170.693, 10.953, 0.226)
pt3dadd(-44.022, 170.812, 10.953, 0.226)
pt3dadd(-44.012, 170.932, 10.953, 0.226)
pt3dadd(-44.002, 171.052, 10.953, 0.226)
pt3dadd(-44.007, 171.17, 10.953, 0.226)
pt3dadd(-44.013, 171.29, 10.953, 0.226)
pt3dadd(-44.02, 171.41, 10.954, 0.226)
pt3dadd(-44.026, 171.53, 10.954, 0.226)
pt3dadd(-44.032, 171.65, 10.954, 0.226)
pt3dadd(-44.038, 171.77, 10.954, 0.226)
pt3dadd(-44.045, 171.89, 10.954, 0.226)
pt3dadd(-44.051, 172.009, 10.954, 0.226)
pt3dadd(-44.057, 172.129, 10.954, 0.226)
pt3dadd(-44.064, 172.249, 10.955, 0.226)
pt3dadd(-44.075, 172.369, 10.955, 0.252)
pt3dadd(-44.087, 172.488, 10.955, 0.278)
pt3dadd(-44.1, 172.608, 10.955, 0.306)
pt3dadd(-44.112, 172.727, 10.955, 0.332)
pt3dadd(-44.124, 172.847, 10.956, 0.36)
pt3dadd(-44.136, 172.966, 10.956, 0.388)
pt3dadd(-44.148, 173.086, 10.956, 0.414)
pt3dadd(-44.161, 173.204, 10.957, 0.442)
pt3dadd(-44.173, 173.324, 10.957, 0.468)
pt3dadd(-44.185, 173.443, 10.957, 0.496)
pt3dadd(-44.214, 173.56, 10.957, 0.514)
pt3dadd(-44.244, 173.676, 10.958, 0.532)
pt3dadd(-44.275, 173.791, 10.958, 0.552)
pt3dadd(-44.305, 173.908, 10.959, 0.57)
pt3dadd(-44.336, 174.024, 10.959, 0.588)
pt3dadd(-44.366, 174.14, 10.96, 0.606)
pt3dadd(-44.396, 174.256, 10.96, 0.624)
pt3dadd(-44.427, 174.372, 10.961, 0.642)
pt3dadd(-44.457, 174.488, 10.961, 0.66)
pt3dadd(-44.488, 174.605, 10.962, 0.678)
pt3dadd(-44.528, 174.718, 10.962, 0.678)
pt3dadd(-44.568, 174.83, 10.963, 0.678)
pt3dadd(-44.608, 174.943, 10.964, 0.678)
pt3dadd(-44.649, 175.056, 10.965, 0.678)
pt3dadd(-44.689, 175.17, 10.966, 0.678)
pt3dadd(-44.729, 175.283, 10.967, 0.678)
pt3dadd(-44.77, 175.396, 10.967, 0.678)
pt3dadd(-44.81, 175.508, 10.968, 0.678)
pt3dadd(-44.85, 175.621, 10.969, 0.678)
pt3dadd(-44.89, 175.735, 10.97, 0.678)
pt3dadd(-44.917, 175.852, 10.971, 0.68)
pt3dadd(-44.944, 175.968, 10.973, 0.682)
pt3dadd(-44.971, 176.086, 10.974, 0.682)
pt3dadd(-44.998, 176.202, 10.976, 0.684)
pt3dadd(-45.026, 176.32, 10.977, 0.686)
pt3dadd(-45.053, 176.436, 10.979, 0.688)
pt3dadd(-45.08, 176.552, 10.98, 0.69)
pt3dadd(-45.107, 176.67, 10.982, 0.69)
pt3dadd(-45.134, 176.786, 10.983, 0.692)
pt3dadd(-45.16, 176.904, 10.985, 0.694)
pt3dadd(-45.172, 177.023, 10.988, 0.714)
pt3dadd(-45.184, 177.143, 10.991, 0.734)
pt3dadd(-45.196, 177.262, 10.994, 0.754)
pt3dadd(-45.208, 177.382, 10.997, 0.774)
pt3dadd(-45.22, 177.5, 11, 0.794)
pt3dadd(-45.232, 177.62, 11.003, 0.814)
pt3dadd(-45.244, 177.739, 11.005, 0.832)
pt3dadd(-45.256, 177.858, 11.009, 0.852)
pt3dadd(-45.268, 177.978, 11.011, 0.872)
pt3dadd(-45.279, 178.097, 11.014, 0.888)
pt3dadd(-45.277, 178.217, 11.022, 0.832)
pt3dadd(-45.274, 178.337, 11.029, 0.776)
pt3dadd(-45.272, 178.457, 11.036, 0.718)
pt3dadd(-45.269, 178.576, 11.043, 0.662)
pt3dadd(-45.266, 178.696, 11.051, 0.606)
pt3dadd(-45.264, 178.816, 11.058, 0.548)
pt3dadd(-45.261, 178.934, 11.065, 0.492)
pt3dadd(-45.259, 179.054, 11.072, 0.436)
pt3dadd(-45.256, 179.174, 11.08, 0.38)
pt3dadd(-45.253, 179.293, 11.087, 0.326)
pt3dadd(-45.245, 179.413, 11.099, 0.352)
pt3dadd(-45.237, 179.532, 11.111, 0.378)
pt3dadd(-45.228, 179.651, 11.124, 0.404)
pt3dadd(-45.22, 179.77, 11.136, 0.432)
pt3dadd(-45.211, 179.888, 11.148, 0.458)
pt3dadd(-45.203, 180.007, 11.16, 0.484)
pt3dadd(-45.195, 180.126, 11.172, 0.51)
pt3dadd(-45.186, 180.245, 11.184, 0.536)
pt3dadd(-45.178, 180.364, 11.197, 0.562)
pt3dadd(-45.169, 180.481, 11.211, 0.586)
pt3dadd(-45.152, 180.586, 11.258, 0.552)
pt3dadd(-45.135, 180.69, 11.304, 0.52)
pt3dadd(-45.118, 180.796, 11.351, 0.486)
pt3dadd(-45.101, 180.9, 11.398, 0.452)
pt3dadd(-45.084, 181.004, 11.445, 0.42)
pt3dadd(-45.068, 181.109, 11.492, 0.386)
pt3dadd(-45.051, 181.213, 11.539, 0.354)
pt3dadd(-45.034, 181.318, 11.586, 0.32)
pt3dadd(-45.017, 181.423, 11.633, 0.288)
pt3dadd(-44.992, 181.526, 11.676, 0.26)
pt3dadd(-44.941, 181.63, 11.706, 0.258)
pt3dadd(-44.889, 181.732, 11.736, 0.254)
pt3dadd(-44.838, 181.834, 11.765, 0.25)
pt3dadd(-44.787, 181.937, 11.795, 0.246)
pt3dadd(-44.735, 182.039, 11.825, 0.242)
pt3dadd(-44.684, 182.141, 11.855, 0.24)
pt3dadd(-44.633, 182.244, 11.885, 0.236)
pt3dadd(-44.581, 182.346, 11.915, 0.232)
pt3dadd(-44.53, 182.448, 11.944, 0.228)
pt3dadd(-44.484, 182.554, 11.97, 0.226)
pt3dadd(-44.451, 182.669, 11.984, 0.226)
pt3dadd(-44.418, 182.783, 11.997, 0.226)
pt3dadd(-44.386, 182.897, 12.011, 0.226)
pt3dadd(-44.353, 183.011, 12.025, 0.226)
pt3dadd(-44.32, 183.126, 12.039, 0.226)
pt3dadd(-44.288, 183.24, 12.052, 0.226)
pt3dadd(-44.255, 183.354, 12.066, 0.226)
pt3dadd(-44.223, 183.468, 12.08, 0.226)
pt3dadd(-44.19, 183.582, 12.094, 0.226)
pt3dadd(-44.163, 183.698, 12.104, 0.226)
pt3dadd(-44.15, 183.817, 12.106, 0.226)
pt3dadd(-44.136, 183.937, 12.108, 0.226)
pt3dadd(-44.122, 184.056, 12.111, 0.226)
}
}
proc shape3d_16() {
dend_5[6] { pt3dadd(-44.109, 184.175, 12.113, 0.226)
pt3dadd(-44.095, 184.295, 12.115, 0.226)
pt3dadd(-44.082, 184.414, 12.118, 0.226)
pt3dadd(-44.068, 184.532, 12.12, 0.226)
pt3dadd(-44.054, 184.652, 12.122, 0.226)
pt3dadd(-44.041, 184.771, 12.125, 0.226)
pt3dadd(-44.032, 184.891, 12.126, 0.23)
pt3dadd(-44.034, 185.01, 12.126, 0.242)
pt3dadd(-44.037, 185.13, 12.126, 0.254)
pt3dadd(-44.039, 185.25, 12.126, 0.266)
pt3dadd(-44.041, 185.37, 12.126, 0.278)
pt3dadd(-44.043, 185.49, 12.126, 0.29)
pt3dadd(-44.045, 185.61, 12.126, 0.302)
pt3dadd(-44.047, 185.73, 12.126, 0.316)
pt3dadd(-44.049, 185.85, 12.126, 0.328)
pt3dadd(-44.051, 185.97, 12.126, 0.34)
pt3dadd(-44.056, 186.09, 12.126, 0.35)
pt3dadd(-44.068, 186.21, 12.126, 0.362)
pt3dadd(-44.08, 186.329, 12.126, 0.372)
pt3dadd(-44.091, 186.449, 12.126, 0.382)
pt3dadd(-44.103, 186.568, 12.126, 0.392)
pt3dadd(-44.115, 186.688, 12.126, 0.404)
pt3dadd(-44.127, 186.806, 12.126, 0.414)
pt3dadd(-44.138, 186.926, 12.126, 0.424)
pt3dadd(-44.15, 187.045, 12.126, 0.434)
pt3dadd(-44.161, 187.165, 12.126, 0.446)
pt3dadd(-44.178, 187.284, 12.126, 0.452)
pt3dadd(-44.201, 187.402, 12.126, 0.452)
pt3dadd(-44.225, 187.519, 12.126, 0.452)
pt3dadd(-44.248, 187.637, 12.126, 0.452)
pt3dadd(-44.272, 187.754, 12.126, 0.452)
pt3dadd(-44.296, 187.872, 12.126, 0.452)
pt3dadd(-44.319, 187.99, 12.126, 0.452)
pt3dadd(-44.343, 188.107, 12.126, 0.452)
pt3dadd(-44.367, 188.225, 12.126, 0.452)
pt3dadd(-44.39, 188.342, 12.126, 0.452)
pt3dadd(-44.424, 188.458, 12.126, 0.452)
pt3dadd(-44.47, 188.568, 12.126, 0.452)
pt3dadd(-44.517, 188.678, 12.126, 0.452)
pt3dadd(-44.563, 188.789, 12.126, 0.452)
pt3dadd(-44.609, 188.9, 12.126, 0.452)
pt3dadd(-44.656, 189.011, 12.126, 0.452)
pt3dadd(-44.702, 189.121, 12.126, 0.452)
pt3dadd(-44.748, 189.232, 12.126, 0.452)
pt3dadd(-44.795, 189.343, 12.126, 0.452)
pt3dadd(-44.841, 189.454, 12.126, 0.452)
pt3dadd(-44.882, 189.566, 12.126, 0.444)
pt3dadd(-44.916, 189.682, 12.126, 0.426)
pt3dadd(-44.95, 189.796, 12.126, 0.406)
pt3dadd(-44.984, 189.911, 12.126, 0.388)
pt3dadd(-45.018, 190.026, 12.126, 0.37)
pt3dadd(-45.053, 190.141, 12.126, 0.352)
pt3dadd(-45.087, 190.256, 12.126, 0.334)
pt3dadd(-45.121, 190.372, 12.126, 0.316)
pt3dadd(-45.155, 190.487, 12.126, 0.296)
pt3dadd(-45.189, 190.602, 12.126, 0.278)
pt3dadd(-45.219, 190.717, 12.126, 0.274)
pt3dadd(-45.242, 190.835, 12.126, 0.284)
pt3dadd(-45.266, 190.952, 12.126, 0.294)
pt3dadd(-45.29, 191.07, 12.126, 0.304)
pt3dadd(-45.314, 191.189, 12.126, 0.314)
pt3dadd(-45.337, 191.306, 12.126, 0.324)
pt3dadd(-45.361, 191.424, 12.126, 0.336)
pt3dadd(-45.385, 191.542, 12.126, 0.346)
pt3dadd(-45.408, 191.659, 12.126, 0.356)
pt3dadd(-45.432, 191.777, 12.126, 0.366)
pt3dadd(-45.459, 191.893, 12.126, 0.372)
pt3dadd(-45.489, 192.01, 12.126, 0.368)
pt3dadd(-45.519, 192.126, 12.126, 0.366)
pt3dadd(-45.549, 192.242, 12.126, 0.362)
pt3dadd(-45.579, 192.358, 12.126, 0.36)
pt3dadd(-45.608, 192.474, 12.126, 0.358)
pt3dadd(-45.638, 192.59, 12.126, 0.356)
pt3dadd(-45.668, 192.707, 12.126, 0.352)
pt3dadd(-45.698, 192.823, 12.126, 0.35)
pt3dadd(-45.728, 192.94, 12.126, 0.348)
pt3dadd(-45.754, 193.056, 12.126, 0.346)
pt3dadd(-45.775, 193.175, 12.126, 0.348)
pt3dadd(-45.796, 193.292, 12.126, 0.35)
pt3dadd(-45.818, 193.411, 12.126, 0.35)
pt3dadd(-45.839, 193.529, 12.126, 0.352)
pt3dadd(-45.86, 193.646, 12.126, 0.354)
pt3dadd(-45.882, 193.765, 12.126, 0.354)
pt3dadd(-45.903, 193.883, 12.126, 0.356)
pt3dadd(-45.924, 194.002, 12.126, 0.358)
pt3dadd(-45.946, 194.119, 12.126, 0.358)
pt3dadd(-45.949, 194.238, 12.126, 0.376)
pt3dadd(-45.943, 194.358, 12.126, 0.4)
pt3dadd(-45.936, 194.478, 12.126, 0.426)
pt3dadd(-45.929, 194.598, 12.126, 0.452)
pt3dadd(-45.923, 194.718, 12.126, 0.476)
pt3dadd(-45.916, 194.838, 12.126, 0.502)
pt3dadd(-45.91, 194.957, 12.126, 0.528)
pt3dadd(-45.903, 195.077, 12.126, 0.554)
pt3dadd(-45.896, 195.197, 12.126, 0.578)
pt3dadd(-45.89, 195.317, 12.126, 0.604)
pt3dadd(-45.888, 195.437, 12.126, 0.588)
pt3dadd(-45.89, 195.557, 12.126, 0.55)
pt3dadd(-45.891, 195.677, 12.126, 0.51)
pt3dadd(-45.892, 195.797, 12.126, 0.472)
pt3dadd(-45.893, 195.917, 12.126, 0.434)
pt3dadd(-45.895, 196.037, 12.126, 0.396)
pt3dadd(-45.896, 196.157, 12.126, 0.356)
pt3dadd(-45.897, 196.277, 12.126, 0.318)
pt3dadd(-45.898, 196.397, 12.126, 0.28)
pt3dadd(-45.9, 196.517, 12.126, 0.242)
pt3dadd(-45.927, 196.632, 12.126, 0.228)
pt3dadd(-45.967, 196.745, 12.126, 0.228)
pt3dadd(-46.008, 196.858, 12.126, 0.228)
pt3dadd(-46.049, 196.97, 12.126, 0.228)
pt3dadd(-46.09, 197.083, 12.126, 0.228)
pt3dadd(-46.13, 197.196, 12.126, 0.226)
pt3dadd(-46.171, 197.309, 12.126, 0.226)
pt3dadd(-46.212, 197.422, 12.127, 0.226)
pt3dadd(-46.253, 197.534, 12.127, 0.226)
pt3dadd(-46.293, 197.648, 12.127, 0.226)
pt3dadd(-46.335, 197.76, 12.127, 0.226)
pt3dadd(-46.376, 197.873, 12.127, 0.226)
pt3dadd(-46.417, 197.986, 12.127, 0.226)
pt3dadd(-46.459, 198.098, 12.127, 0.226)
pt3dadd(-46.5, 198.211, 12.127, 0.226)
pt3dadd(-46.542, 198.324, 12.127, 0.226)
pt3dadd(-46.583, 198.436, 12.127, 0.226)
pt3dadd(-46.625, 198.548, 12.127, 0.226)
pt3dadd(-46.666, 198.661, 12.127, 0.226)
pt3dadd(-46.708, 198.774, 12.127, 0.226)
pt3dadd(-46.754, 198.884, 12.127, 0.226)
pt3dadd(-46.803, 198.995, 12.127, 0.226)
pt3dadd(-46.851, 199.104, 12.127, 0.226)
pt3dadd(-46.9, 199.213, 12.127, 0.226)
pt3dadd(-46.949, 199.324, 12.127, 0.226)
pt3dadd(-46.998, 199.433, 12.127, 0.226)
pt3dadd(-47.046, 199.542, 12.127, 0.226)
pt3dadd(-47.095, 199.652, 12.127, 0.226)
pt3dadd(-47.144, 199.762, 12.127, 0.226)
pt3dadd(-47.193, 199.872, 12.127, 0.226)
pt3dadd(-47.244, 199.98, 12.127, 0.23)
pt3dadd(-47.296, 200.088, 12.127, 0.236)
pt3dadd(-47.348, 200.196, 12.127, 0.242)
pt3dadd(-47.4, 200.305, 12.127, 0.248)
pt3dadd(-47.451, 200.413, 12.127, 0.256)
pt3dadd(-47.503, 200.521, 12.127, 0.262)
pt3dadd(-47.555, 200.629, 12.128, 0.268)
pt3dadd(-47.607, 200.737, 12.128, 0.274)
pt3dadd(-47.659, 200.845, 12.128, 0.28)
pt3dadd(-47.711, 200.953, 12.128, 0.286)
pt3dadd(-47.749, 201.067, 12.128, 0.314)
pt3dadd(-47.781, 201.182, 12.128, 0.352)
pt3dadd(-47.813, 201.299, 12.128, 0.388)
pt3dadd(-47.845, 201.414, 12.128, 0.426)
pt3dadd(-47.877, 201.53, 12.128, 0.462)
pt3dadd(-47.909, 201.646, 12.128, 0.5)
pt3dadd(-47.94, 201.761, 12.129, 0.538)
pt3dadd(-47.972, 201.877, 12.129, 0.574)
pt3dadd(-48.004, 201.992, 12.129, 0.612)
pt3dadd(-48.036, 202.109, 12.129, 0.648)
pt3dadd(-48.061, 202.225, 12.129, 0.636)
pt3dadd(-48.083, 202.344, 12.129, 0.602)
pt3dadd(-48.105, 202.462, 12.13, 0.568)
pt3dadd(-48.127, 202.579, 12.13, 0.534)
pt3dadd(-48.149, 202.698, 12.13, 0.5)
pt3dadd(-48.171, 202.816, 12.131, 0.464)
pt3dadd(-48.193, 202.933, 12.131, 0.43)
pt3dadd(-48.215, 203.051, 12.131, 0.396)
pt3dadd(-48.237, 203.17, 12.131, 0.362)
pt3dadd(-48.259, 203.287, 12.132, 0.328)
pt3dadd(-48.276, 203.406, 12.132, 0.312)
pt3dadd(-48.292, 203.525, 12.133, 0.302)
pt3dadd(-48.308, 203.644, 12.133, 0.294)
pt3dadd(-48.323, 203.762, 12.134, 0.284)
pt3dadd(-48.339, 203.882, 12.134, 0.274)
pt3dadd(-48.355, 204.001, 12.135, 0.266)
pt3dadd(-48.371, 204.12, 12.135, 0.256)
pt3dadd(-48.386, 204.239, 12.136, 0.248)
pt3dadd(-48.402, 204.358, 12.136, 0.238)
pt3dadd(-48.418, 204.476, 12.137, 0.228)
pt3dadd(-48.445, 204.593, 12.138, 0.226)
pt3dadd(-48.477, 204.709, 12.139, 0.226)
pt3dadd(-48.509, 204.824, 12.14, 0.226)
pt3dadd(-48.541, 204.941, 12.141, 0.226)
pt3dadd(-48.573, 205.056, 12.142, 0.226)
pt3dadd(-48.604, 205.171, 12.143, 0.226)
pt3dadd(-48.636, 205.288, 12.144, 0.226)
pt3dadd(-48.668, 205.403, 12.145, 0.226)
pt3dadd(-48.7, 205.519, 12.146, 0.226)
pt3dadd(-48.732, 205.634, 12.147, 0.226)
pt3dadd(-48.77, 205.748, 12.149, 0.236)
pt3dadd(-48.81, 205.861, 12.15, 0.246)
pt3dadd(-48.85, 205.974, 12.152, 0.258)
pt3dadd(-48.889, 206.088, 12.154, 0.27)
pt3dadd(-48.929, 206.201, 12.156, 0.282)
pt3dadd(-48.969, 206.314, 12.157, 0.294)
pt3dadd(-49.009, 206.428, 12.159, 0.304)
pt3dadd(-49.049, 206.54, 12.161, 0.316)
pt3dadd(-49.088, 206.653, 12.162, 0.328)
pt3dadd(-49.128, 206.767, 12.164, 0.34)
pt3dadd(-49.158, 206.882, 12.167, 0.366)
pt3dadd(-49.185, 207, 12.17, 0.396)
pt3dadd(-49.212, 207.116, 12.173, 0.426)
pt3dadd(-49.24, 207.233, 12.176, 0.456)
}
}
proc shape3d_17() {
dend_5[6] { pt3dadd(-49.267, 207.35, 12.179, 0.486)
pt3dadd(-49.294, 207.467, 12.183, 0.516)
pt3dadd(-49.322, 207.583, 12.186, 0.546)
pt3dadd(-49.349, 207.701, 12.189, 0.574)
pt3dadd(-49.376, 207.817, 12.192, 0.604)
pt3dadd(-49.403, 207.934, 12.195, 0.634)
pt3dadd(-49.419, 208.052, 12.201, 0.608)
pt3dadd(-49.433, 208.171, 12.208, 0.57)
pt3dadd(-49.446, 208.291, 12.215, 0.532)
pt3dadd(-49.459, 208.41, 12.222, 0.494)
pt3dadd(-49.473, 208.529, 12.229, 0.456)
pt3dadd(-49.486, 208.648, 12.236, 0.416)
pt3dadd(-49.499, 208.766, 12.242, 0.378)
pt3dadd(-49.513, 208.885, 12.249, 0.34)
pt3dadd(-49.526, 209.004, 12.256, 0.302)
pt3dadd(-49.539, 209.124, 12.263, 0.264)
pt3dadd(-49.543, 209.243, 12.273, 0.284)
pt3dadd(-49.544, 209.362, 12.284, 0.316)
pt3dadd(-49.545, 209.482, 12.295, 0.348)
pt3dadd(-49.547, 209.6, 12.306, 0.38)
pt3dadd(-49.548, 209.719, 12.317, 0.412)
pt3dadd(-49.549, 209.839, 12.328, 0.444)
pt3dadd(-49.551, 209.958, 12.339, 0.476)
pt3dadd(-49.552, 210.078, 12.35, 0.508)
pt3dadd(-49.553, 210.197, 12.361, 0.54)
pt3dadd(-49.554, 210.316, 12.372, 0.572)
pt3dadd(-49.555, 210.431, 12.399, 0.564)
pt3dadd(-49.555, 210.546, 12.429, 0.548)
pt3dadd(-49.556, 210.66, 12.46, 0.53)
pt3dadd(-49.556, 210.774, 12.49, 0.514)
pt3dadd(-49.557, 210.888, 12.521, 0.496)
pt3dadd(-49.557, 211.003, 12.551, 0.48)
pt3dadd(-49.558, 211.117, 12.582, 0.464)
pt3dadd(-49.558, 211.231, 12.612, 0.446)
pt3dadd(-49.558, 211.345, 12.642, 0.43)
pt3dadd(-49.559, 211.46, 12.673, 0.412)
pt3dadd(-49.56, 211.574, 12.703, 0.394)
pt3dadd(-49.56, 211.688, 12.733, 0.376)
pt3dadd(-49.561, 211.804, 12.764, 0.358)
pt3dadd(-49.562, 211.918, 12.794, 0.338)
pt3dadd(-49.563, 212.032, 12.824, 0.32)
pt3dadd(-49.563, 212.147, 12.854, 0.302)
pt3dadd(-49.564, 212.261, 12.884, 0.282)
pt3dadd(-49.565, 212.375, 12.914, 0.264)
pt3dadd(-49.566, 212.49, 12.945, 0.246)
pt3dadd(-49.567, 212.604, 12.975, 0.228)
pt3dadd(-49.568, 212.722, 12.994, 0.232)
pt3dadd(-49.57, 212.839, 13.013, 0.238)
pt3dadd(-49.571, 212.958, 13.031, 0.244)
pt3dadd(-49.573, 213.076, 13.05, 0.25)
pt3dadd(-49.574, 213.193, 13.069, 0.256)
pt3dadd(-49.576, 213.311, 13.087, 0.262)
pt3dadd(-49.577, 213.428, 13.106, 0.268)
pt3dadd(-49.579, 213.547, 13.124, 0.274)
pt3dadd(-49.581, 213.665, 13.143, 0.28)
pt3dadd(-49.582, 213.782, 13.162, 0.286)
pt3dadd(-49.585, 213.902, 13.168, 0.298)
pt3dadd(-49.588, 214.022, 13.174, 0.312)
pt3dadd(-49.591, 214.142, 13.179, 0.324)
pt3dadd(-49.594, 214.261, 13.185, 0.338)
pt3dadd(-49.597, 214.381, 13.191, 0.352)
pt3dadd(-49.6, 214.501, 13.196, 0.364)
pt3dadd(-49.603, 214.621, 13.202, 0.378)
pt3dadd(-49.606, 214.741, 13.208, 0.392)
pt3dadd(-49.609, 214.86, 13.213, 0.404)
pt3dadd(-49.612, 214.98, 13.219, 0.418)
pt3dadd(-49.618, 215.1, 13.211, 0.406)
pt3dadd(-49.624, 215.219, 13.202, 0.394)
pt3dadd(-49.63, 215.339, 13.194, 0.382)
pt3dadd(-49.636, 215.458, 13.185, 0.37)
pt3dadd(-49.642, 215.578, 13.177, 0.358)
pt3dadd(-49.648, 215.696, 13.168, 0.346)
pt3dadd(-49.654, 215.816, 13.16, 0.334)
pt3dadd(-49.66, 215.935, 13.151, 0.322)
pt3dadd(-49.666, 216.055, 13.143, 0.31)
pt3dadd(-49.672, 216.174, 13.134, 0.298)
pt3dadd(-49.694, 216.292, 13.126, 0.304)
pt3dadd(-49.717, 216.409, 13.117, 0.31)
pt3dadd(-49.739, 216.527, 13.108, 0.316)
pt3dadd(-49.761, 216.644, 13.1, 0.32)
pt3dadd(-49.784, 216.762, 13.091, 0.326)
pt3dadd(-49.806, 216.88, 13.082, 0.332)
pt3dadd(-49.829, 216.996, 13.074, 0.338)
pt3dadd(-49.851, 217.114, 13.065, 0.344)
pt3dadd(-49.874, 217.231, 13.057, 0.348)
pt3dadd(-49.896, 217.349, 13.048, 0.354)
pt3dadd(-49.918, 217.466, 13.039, 0.36)
pt3dadd(-49.941, 217.584, 13.031, 0.366)
pt3dadd(-49.963, 217.702, 13.022, 0.372)
pt3dadd(-49.986, 217.818, 13.013, 0.378)
pt3dadd(-50.008, 217.936, 13.005, 0.384)
pt3dadd(-50.031, 218.053, 12.996, 0.388)
pt3dadd(-50.053, 218.171, 12.987, 0.394)
pt3dadd(-50.075, 218.288, 12.979, 0.4)
pt3dadd(-50.098, 218.406, 12.97, 0.406)
pt3dadd(-50.12, 218.524, 12.962, 0.412)
pt3dadd(-50.143, 218.64, 12.953, 0.418)
pt3dadd(-50.165, 218.758, 12.944, 0.422)
pt3dadd(-50.187, 218.875, 12.936, 0.428)
pt3dadd(-50.21, 218.993, 12.927, 0.434)
pt3dadd(-50.232, 219.11, 12.918, 0.44)
pt3dadd(-50.255, 219.228, 12.91, 0.446)
pt3dadd(-50.277, 219.346, 12.901, 0.452)
pt3dadd(-50.222, 219.438, 12.868, 0.452)
pt3dadd(-50.157, 219.528, 12.83, 0.452)
pt3dadd(-50.115, 219.632, 12.796, 0.452)
pt3dadd(-50.077, 219.738, 12.762, 0.452)
pt3dadd(-50.058, 219.851, 12.73, 0.452)
pt3dadd(-50.04, 219.964, 12.701, 0.452)
pt3dadd(-50.04, 220.079, 12.728, 0.452)
pt3dadd(-50.04, 220.194, 12.756, 0.452)
pt3dadd(-50.04, 220.31, 12.779, 0.452)
pt3dadd(-50.04, 220.428, 12.798, 0.452)
pt3dadd(-50.067, 220.544, 12.8, 0.452)
pt3dadd(-50.097, 220.661, 12.8, 0.452)
pt3dadd(-50.127, 220.777, 12.8, 0.452)
pt3dadd(-50.158, 220.894, 12.8, 0.452)
pt3dadd(-50.188, 221.009, 12.8, 0.452)
pt3dadd(-50.223, 221.124, 12.8, 0.452)
pt3dadd(-50.283, 221.227, 12.8, 0.452)
pt3dadd(-50.342, 221.332, 12.8, 0.452)
pt3dadd(-50.402, 221.436, 12.8, 0.452)
pt3dadd(-50.462, 221.539, 12.8, 0.452)
pt3dadd(-50.52, 221.644, 12.8, 0.452)
pt3dadd(-50.52, 221.764, 12.8, 0.452)
pt3dadd(-50.52, 221.884, 12.8, 0.452)
pt3dadd(-50.52, 222.004, 12.8, 0.452)
pt3dadd(-50.52, 222.124, 12.8, 0.452)
pt3dadd(-50.52, 222.244, 12.8, 0.452)
pt3dadd(-50.52, 222.364, 12.8, 0.452)
pt3dadd(-50.52, 222.484, 12.8, 0.452)
pt3dadd(-50.518, 222.604, 12.8, 0.452)
pt3dadd(-50.516, 222.724, 12.8, 0.452)
pt3dadd(-50.514, 222.844, 12.8, 0.452)
pt3dadd(-50.512, 222.964, 12.8, 0.452)
pt3dadd(-50.51, 223.084, 12.8, 0.452)
pt3dadd(-50.508, 223.204, 12.8, 0.452)
pt3dadd(-50.504, 223.324, 12.8, 0.452)
pt3dadd(-50.487, 223.442, 12.8, 0.452)
pt3dadd(-50.47, 223.561, 12.8, 0.452)
pt3dadd(-50.452, 223.68, 12.8, 0.452)
pt3dadd(-50.435, 223.799, 12.8, 0.452)
pt3dadd(-50.418, 223.918, 12.8, 0.452)
pt3dadd(-50.4, 224.036, 12.8, 0.452)
pt3dadd(-50.4, 224.156, 12.8, 0.452)
pt3dadd(-50.4, 224.276, 12.8, 0.452)
pt3dadd(-50.4, 224.396, 12.8, 0.452)
pt3dadd(-50.4, 224.516, 12.8, 0.452)
pt3dadd(-50.4, 224.636, 12.8, 0.452)
pt3dadd(-50.4, 224.756, 12.8, 0.452)
pt3dadd(-50.4, 224.876, 12.8, 0.452)
pt3dadd(-50.4, 224.996, 12.8, 0.452)
pt3dadd(-50.4, 225.116, 12.8, 0.452)
pt3dadd(-50.4, 225.236, 12.8, 0.452)
pt3dadd(-50.4, 225.356, 12.8, 0.452)
pt3dadd(-50.4, 225.476, 12.8, 0.452)
pt3dadd(-50.4, 225.596, 12.8, 0.452)
pt3dadd(-50.4, 225.716, 12.8, 0.452)
pt3dadd(-50.377, 225.83, 12.823, 0.452)
pt3dadd(-50.353, 225.944, 12.848, 0.452)
pt3dadd(-50.329, 226.058, 12.872, 0.452)
pt3dadd(-50.305, 226.172, 12.896, 0.452)
pt3dadd(-50.282, 226.286, 12.921, 0.452)
pt3dadd(-50.24, 226.388, 12.96, 0.452)
pt3dadd(-50.197, 226.489, 13.001, 0.452)
pt3dadd(-50.154, 226.59, 13.042, 0.452)
pt3dadd(-50.111, 226.691, 13.083, 0.452)
pt3dadd(-50.069, 226.796, 13.112, 0.452)
pt3dadd(-50.027, 226.906, 13.133, 0.452)
pt3dadd(-49.985, 227.015, 13.154, 0.452)
pt3dadd(-49.943, 227.125, 13.175, 0.452)
pt3dadd(-49.901, 227.234, 13.196, 0.452)
pt3dadd(-49.865, 227.346, 13.215, 0.452)
pt3dadd(-49.83, 227.459, 13.233, 0.452)
pt3dadd(-49.795, 227.572, 13.251, 0.452)
pt3dadd(-49.76, 227.684, 13.268, 0.452)
pt3dadd(-49.725, 227.797, 13.287, 0.452)
pt3dadd(-49.692, 227.912, 13.296, 0.452)
pt3dadd(-49.659, 228.028, 13.304, 0.452)
pt3dadd(-49.627, 228.143, 13.313, 0.452)
pt3dadd(-49.595, 228.258, 13.321, 0.452)
pt3dadd(-49.562, 228.373, 13.329, 0.452)
pt3dadd(-49.537, 228.49, 13.34, 0.452)
pt3dadd(-49.517, 228.606, 13.352, 0.452)
pt3dadd(-49.498, 228.724, 13.364, 0.452)
pt3dadd(-49.479, 228.841, 13.376, 0.452)
pt3dadd(-49.46, 228.959, 13.388, 0.452)
pt3dadd(-49.44, 229.076, 13.4, 0.452)
pt3dadd(-49.462, 229.193, 13.381, 0.452)
pt3dadd(-49.486, 229.308, 13.362, 0.452)
pt3dadd(-49.509, 229.423, 13.343, 0.452)
pt3dadd(-49.532, 229.538, 13.323, 0.452)
pt3dadd(-49.555, 229.655, 13.304, 0.452)
pt3dadd(-49.545, 229.772, 13.3, 0.452)
pt3dadd(-49.525, 229.89, 13.3, 0.452)
pt3dadd(-49.505, 230.009, 13.3, 0.452)
pt3dadd(-49.485, 230.128, 13.3, 0.452)
pt3dadd(-49.466, 230.245, 13.3, 0.452)
pt3dadd(-49.446, 230.364, 13.3, 0.452)
pt3dadd(-49.44, 230.483, 13.3, 0.452)
}
}
proc shape3d_18() {
dend_5[6] { pt3dadd(-49.44, 230.603, 13.3, 0.452)
pt3dadd(-49.44, 230.723, 13.3, 0.452)
pt3dadd(-49.44, 230.843, 13.3, 0.452)
pt3dadd(-49.44, 230.963, 13.3, 0.452)
pt3dadd(-49.44, 231.083, 13.3, 0.452)
pt3dadd(-49.44, 231.203, 13.3, 0.452)
pt3dadd(-49.44, 231.323, 13.307, 0.452)
pt3dadd(-49.44, 231.443, 13.318, 0.452)
pt3dadd(-49.44, 231.562, 13.328, 0.452)
pt3dadd(-49.44, 231.68, 13.339, 0.452)
pt3dadd(-49.44, 231.8, 13.349, 0.452)
pt3dadd(-49.44, 231.919, 13.36, 0.452)
pt3dadd(-49.447, 232.038, 13.369, 0.452)
pt3dadd(-49.468, 232.157, 13.374, 0.452)
pt3dadd(-49.488, 232.274, 13.38, 0.452)
pt3dadd(-49.509, 232.392, 13.386, 0.452)
pt3dadd(-49.53, 232.511, 13.392, 0.452)
pt3dadd(-49.551, 232.628, 13.398, 0.452)
pt3dadd(-49.596, 232.738, 13.399, 0.452)
pt3dadd(-49.66, 232.838, 13.396, 0.452)
pt3dadd(-49.724, 232.94, 13.394, 0.452)
pt3dadd(-49.788, 233.041, 13.392, 0.452)
pt3dadd(-49.852, 233.143, 13.39, 0.452)
pt3dadd(-49.909, 233.246, 13.378, 0.452)
pt3dadd(-49.961, 233.352, 13.359, 0.452)
pt3dadd(-50.012, 233.459, 13.34, 0.452)
pt3dadd(-50.064, 233.564, 13.321, 0.452)
pt3dadd(-50.115, 233.67, 13.302, 0.452)
pt3dadd(-50.163, 233.78, 13.306, 0.452)
pt3dadd(-50.211, 233.89, 13.312, 0.452)
pt3dadd(-50.259, 234, 13.318, 0.452)
pt3dadd(-50.308, 234.109, 13.325, 0.452)
pt3dadd(-50.362, 234.215, 13.335, 0.452)
pt3dadd(-50.417, 234.322, 13.345, 0.452)
pt3dadd(-50.472, 234.427, 13.355, 0.452)
pt3dadd(-50.526, 234.534, 13.365, 0.452)
pt3dadd(-50.553, 234.649, 13.369, 0.452)
pt3dadd(-50.575, 234.768, 13.371, 0.452)
pt3dadd(-50.598, 234.886, 13.373, 0.452)
pt3dadd(-50.62, 235.003, 13.376, 0.452)
pt3dadd(-50.64, 235.118, 13.386, 0.452)
pt3dadd(-50.64, 235.212, 13.448, 0.452)
pt3dadd(-50.64, 235.321, 13.486, 0.452)
pt3dadd(-50.64, 235.44, 13.5, 0.452)
pt3dadd(-50.64, 235.559, 13.5, 0.452)
pt3dadd(-50.657, 235.678, 13.5, 0.452)
pt3dadd(-50.702, 235.787, 13.5, 0.452)
pt3dadd(-50.787, 235.871, 13.5, 0.452)
pt3dadd(-50.9, 235.908, 13.5, 0.452)
pt3dadd(-51.019, 235.92, 13.502, 0.452)
pt3dadd(-51.137, 235.92, 13.518, 0.452)
pt3dadd(-51.249, 235.92, 13.554, 0.452)
pt3dadd(-51.36, 235.907, 13.589, 0.452)
pt3dadd(-51.471, 235.865, 13.6, 0.452)
pt3dadd(-51.584, 235.829, 13.6, 0.452)
pt3dadd(-51.698, 235.854, 13.6, 0.452)
pt3dadd(-51.787, 235.933, 13.6, 0.452)
pt3dadd(-51.84, 236.04, 13.6, 0.452)
}
apic[4] {pt3dclear()
pt3dadd(-33.874, 155.664, 9.808, 2.034)
pt3dadd(-33.877, 155.665, 9.788, 2.034)
pt3dadd(-33.892, 155.668, 9.688, 2.034)
pt3dadd(-33.906, 155.671, 9.589, 2.034)
pt3dadd(-33.921, 155.674, 9.49, 2.034)
pt3dadd(-33.935, 155.677, 9.391, 2.034)
pt3dadd(-33.95, 155.68, 9.291, 2.034)
pt3dadd(-33.964, 155.683, 9.192, 2.034)
pt3dadd(-33.979, 155.687, 9.093, 2.034)
pt3dadd(-33.993, 155.689, 8.994, 2.034)
pt3dadd(-34.02, 155.712, 8.906, 2.028)
pt3dadd(-34.083, 155.79, 8.85, 2.006)
pt3dadd(-34.145, 155.868, 8.795, 1.984)
pt3dadd(-34.207, 155.946, 8.74, 1.96)
pt3dadd(-34.27, 156.024, 8.684, 1.938)
pt3dadd(-34.332, 156.102, 8.629, 1.916)
pt3dadd(-34.395, 156.18, 8.573, 1.894)
pt3dadd(-34.457, 156.258, 8.518, 1.872)
pt3dadd(-34.52, 156.336, 8.463, 1.848)
pt3dadd(-34.588, 156.43, 8.437, 1.822)
pt3dadd(-34.657, 156.523, 8.415, 1.798)
pt3dadd(-34.726, 156.618, 8.393, 1.772)
pt3dadd(-34.795, 156.713, 8.37, 1.746)
pt3dadd(-34.863, 156.808, 8.348, 1.72)
pt3dadd(-34.932, 156.901, 8.326, 1.694)
pt3dadd(-35.001, 156.996, 8.303, 1.668)
pt3dadd(-35.07, 157.091, 8.281, 1.642)
pt3dadd(-35.139, 157.186, 8.259, 1.616)
pt3dadd(-35.208, 157.279, 8.236, 1.59)
pt3dadd(-35.256, 157.376, 8.194, 1.606)
pt3dadd(-35.302, 157.474, 8.15, 1.624)
pt3dadd(-35.348, 157.572, 8.106, 1.642)
pt3dadd(-35.394, 157.669, 8.062, 1.66)
pt3dadd(-35.44, 157.766, 8.017, 1.678)
pt3dadd(-35.487, 157.864, 7.973, 1.696)
pt3dadd(-35.533, 157.961, 7.929, 1.712)
pt3dadd(-35.579, 158.058, 7.885, 1.73)
pt3dadd(-35.625, 158.155, 7.841, 1.748)
pt3dadd(-35.671, 158.252, 7.797, 1.766)
pt3dadd(-35.729, 158.35, 7.763, 1.748)
pt3dadd(-35.788, 158.446, 7.729, 1.728)
pt3dadd(-35.847, 158.543, 7.695, 1.708)
pt3dadd(-35.905, 158.639, 7.662, 1.686)
pt3dadd(-35.964, 158.735, 7.628, 1.666)
pt3dadd(-36.023, 158.832, 7.594, 1.646)
pt3dadd(-36.082, 158.928, 7.56, 1.624)
pt3dadd(-36.14, 159.025, 7.527, 1.604)
pt3dadd(-36.199, 159.121, 7.493, 1.584)
pt3dadd(-36.258, 159.217, 7.459, 1.564)
pt3dadd(-36.316, 159.313, 7.423, 1.554)
pt3dadd(-36.373, 159.409, 7.387, 1.544)
pt3dadd(-36.431, 159.505, 7.351, 1.536)
pt3dadd(-36.489, 159.601, 7.315, 1.526)
pt3dadd(-36.546, 159.697, 7.279, 1.518)
pt3dadd(-36.604, 159.793, 7.243, 1.508)
pt3dadd(-36.662, 159.889, 7.207, 1.5)
pt3dadd(-36.719, 159.985, 7.171, 1.49)
pt3dadd(-36.777, 160.081, 7.135, 1.482)
pt3dadd(-36.835, 160.177, 7.099, 1.472)
pt3dadd(-36.883, 160.272, 7.054, 1.506)
pt3dadd(-36.932, 160.368, 7.008, 1.538)
pt3dadd(-36.981, 160.463, 6.963, 1.572)
pt3dadd(-37.029, 160.558, 6.917, 1.604)
pt3dadd(-37.078, 160.652, 6.872, 1.638)
pt3dadd(-37.126, 160.748, 6.826, 1.67)
pt3dadd(-37.175, 160.843, 6.781, 1.704)
pt3dadd(-37.224, 160.938, 6.735, 1.736)
pt3dadd(-37.272, 161.034, 6.69, 1.77)
pt3dadd(-37.321, 161.129, 6.644, 1.804)
}
apic[5] {pt3dclear()
pt3dadd(-37.321, 161.129, 6.644, 1.804)
pt3dadd(-37.308, 161.029, 6.664, 1.8)
pt3dadd(-37.367, 161.059, 6.653, 1.784)
pt3dadd(-37.426, 161.088, 6.641, 1.768)
pt3dadd(-37.485, 161.118, 6.629, 1.752)
pt3dadd(-37.543, 161.148, 6.618, 1.736)
pt3dadd(-37.602, 161.177, 6.606, 1.72)
pt3dadd(-37.66, 161.207, 6.594, 1.704)
pt3dadd(-37.719, 161.236, 6.583, 1.688)
pt3dadd(-37.778, 161.266, 6.571, 1.672)
pt3dadd(-37.836, 161.296, 6.559, 1.656)
pt3dadd(-37.899, 161.321, 6.549, 1.646)
pt3dadd(-37.972, 161.338, 6.54, 1.652)
pt3dadd(-38.045, 161.353, 6.531, 1.658)
pt3dadd(-38.118, 161.37, 6.523, 1.664)
pt3dadd(-38.192, 161.387, 6.514, 1.67)
pt3dadd(-38.265, 161.402, 6.506, 1.674)
pt3dadd(-38.338, 161.419, 6.497, 1.68)
pt3dadd(-38.412, 161.435, 6.488, 1.686)
pt3dadd(-38.485, 161.452, 6.48, 1.692)
pt3dadd(-38.558, 161.468, 6.471, 1.698)
pt3dadd(-38.634, 161.482, 6.464, 1.7)
pt3dadd(-38.713, 161.492, 6.46, 1.694)
pt3dadd(-38.793, 161.502, 6.456, 1.69)
pt3dadd(-38.873, 161.513, 6.452, 1.686)
pt3dadd(-38.952, 161.524, 6.448, 1.68)
pt3dadd(-39.032, 161.533, 6.444, 1.676)
pt3dadd(-39.112, 161.544, 6.44, 1.67)
pt3dadd(-39.191, 161.554, 6.436, 1.666)
pt3dadd(-39.271, 161.564, 6.432, 1.662)
pt3dadd(-39.35, 161.575, 6.428, 1.656)
pt3dadd(-39.428, 161.587, 6.424, 1.644)
pt3dadd(-39.502, 161.604, 6.418, 1.616)
pt3dadd(-39.576, 161.62, 6.412, 1.59)
pt3dadd(-39.65, 161.636, 6.406, 1.562)
pt3dadd(-39.724, 161.653, 6.401, 1.534)
pt3dadd(-39.799, 161.67, 6.395, 1.508)
pt3dadd(-39.873, 161.687, 6.389, 1.48)
pt3dadd(-39.947, 161.702, 6.383, 1.454)
pt3dadd(-40.021, 161.719, 6.378, 1.426)
pt3dadd(-40.095, 161.736, 6.372, 1.398)
pt3dadd(-40.156, 161.758, 6.353, 1.392)
pt3dadd(-40.201, 161.785, 6.32, 1.41)
pt3dadd(-40.246, 161.812, 6.287, 1.43)
pt3dadd(-40.291, 161.839, 6.254, 1.448)
pt3dadd(-40.336, 161.867, 6.221, 1.466)
pt3dadd(-40.382, 161.893, 6.187, 1.484)
pt3dadd(-40.427, 161.921, 6.154, 1.504)
pt3dadd(-40.472, 161.947, 6.121, 1.522)
pt3dadd(-40.517, 161.975, 6.088, 1.54)
pt3dadd(-40.563, 162.002, 6.055, 1.558)
pt3dadd(-40.617, 162.023, 6.024, 1.56)
pt3dadd(-40.68, 162.038, 5.995, 1.542)
pt3dadd(-40.744, 162.053, 5.966, 1.524)
pt3dadd(-40.808, 162.067, 5.938, 1.506)
pt3dadd(-40.872, 162.083, 5.909, 1.49)
pt3dadd(-40.936, 162.097, 5.88, 1.472)
pt3dadd(-40.999, 162.112, 5.851, 1.454)
pt3dadd(-41.063, 162.126, 5.823, 1.436)
pt3dadd(-41.127, 162.142, 5.794, 1.418)
pt3dadd(-41.191, 162.156, 5.765, 1.4)
pt3dadd(-41.245, 162.174, 5.731, 1.382)
pt3dadd(-41.29, 162.197, 5.691, 1.362)
pt3dadd(-41.334, 162.217, 5.651, 1.342)
pt3dadd(-41.378, 162.24, 5.611, 1.324)
pt3dadd(-41.423, 162.263, 5.571, 1.304)
pt3dadd(-41.467, 162.284, 5.531, 1.284)
pt3dadd(-41.511, 162.306, 5.491, 1.266)
pt3dadd(-41.555, 162.328, 5.451, 1.246)
pt3dadd(-41.6, 162.35, 5.41, 1.226)
pt3dadd(-41.644, 162.373, 5.37, 1.206)
pt3dadd(-41.693, 162.396, 5.337, 1.2)
pt3dadd(-41.747, 162.42, 5.309, 1.204)
}
}
proc shape3d_19() {
apic[5] { pt3dadd(-41.801, 162.444, 5.281, 1.21)
pt3dadd(-41.855, 162.469, 5.254, 1.214)
pt3dadd(-41.909, 162.494, 5.226, 1.218)
pt3dadd(-41.963, 162.518, 5.198, 1.222)
pt3dadd(-42.017, 162.544, 5.17, 1.226)
pt3dadd(-42.071, 162.568, 5.143, 1.232)
pt3dadd(-42.125, 162.593, 5.115, 1.236)
pt3dadd(-42.179, 162.618, 5.087, 1.24)
pt3dadd(-42.238, 162.641, 5.066, 1.246)
pt3dadd(-42.3, 162.665, 5.048, 1.252)
pt3dadd(-42.362, 162.688, 5.031, 1.256)
pt3dadd(-42.424, 162.712, 5.013, 1.262)
pt3dadd(-42.487, 162.736, 4.995, 1.268)
pt3dadd(-42.549, 162.758, 4.978, 1.274)
pt3dadd(-42.611, 162.782, 4.96, 1.278)
pt3dadd(-42.674, 162.805, 4.942, 1.284)
pt3dadd(-42.736, 162.829, 4.925, 1.29)
pt3dadd(-42.798, 162.853, 4.907, 1.296)
pt3dadd(-42.862, 162.875, 4.891, 1.288)
pt3dadd(-42.927, 162.898, 4.876, 1.27)
pt3dadd(-42.992, 162.919, 4.861, 1.254)
pt3dadd(-43.057, 162.942, 4.846, 1.236)
pt3dadd(-43.122, 162.965, 4.831, 1.22)
pt3dadd(-43.187, 162.986, 4.817, 1.204)
pt3dadd(-43.252, 163.009, 4.802, 1.186)
pt3dadd(-43.317, 163.031, 4.787, 1.17)
pt3dadd(-43.383, 163.054, 4.772, 1.152)
pt3dadd(-43.448, 163.076, 4.757, 1.136)
pt3dadd(-43.518, 163.076, 4.726, 1.13)
pt3dadd(-43.59, 163.067, 4.685, 1.13)
pt3dadd(-43.663, 163.056, 4.644, 1.13)
pt3dadd(-43.736, 163.046, 4.603, 1.13)
pt3dadd(-43.809, 163.036, 4.562, 1.13)
pt3dadd(-43.881, 163.025, 4.522, 1.13)
pt3dadd(-43.954, 163.015, 4.481, 1.13)
pt3dadd(-44.027, 163.003, 4.44, 1.13)
pt3dadd(-44.1, 162.994, 4.399, 1.13)
pt3dadd(-44.173, 162.984, 4.359, 1.13)
pt3dadd(-44.157, 162.923, 4.372, 1.13)
pt3dadd(-44.142, 162.863, 4.385, 1.13)
pt3dadd(-44.197, 162.844, 4.326, 1.152)
pt3dadd(-44.24, 162.821, 4.258, 1.188)
pt3dadd(-44.284, 162.798, 4.189, 1.224)
pt3dadd(-44.328, 162.774, 4.121, 1.26)
pt3dadd(-44.371, 162.751, 4.053, 1.294)
pt3dadd(-44.415, 162.727, 3.984, 1.33)
pt3dadd(-44.459, 162.704, 3.916, 1.366)
pt3dadd(-44.502, 162.682, 3.847, 1.402)
pt3dadd(-44.546, 162.659, 3.779, 1.438)
pt3dadd(-44.59, 162.636, 3.711, 1.472)
pt3dadd(-44.607, 162.635, 3.643, 1.43)
pt3dadd(-44.62, 162.641, 3.576, 1.372)
pt3dadd(-44.632, 162.647, 3.508, 1.316)
pt3dadd(-44.644, 162.652, 3.441, 1.258)
pt3dadd(-44.657, 162.656, 3.373, 1.2)
pt3dadd(-44.669, 162.661, 3.306, 1.142)
pt3dadd(-44.681, 162.667, 3.238, 1.084)
pt3dadd(-44.694, 162.672, 3.171, 1.026)
pt3dadd(-44.706, 162.677, 3.103, 0.968)
pt3dadd(-44.718, 162.683, 3.036, 0.91)
pt3dadd(-44.704, 162.67, 2.957, 0.842)
pt3dadd(-44.689, 162.656, 2.878, 0.772)
pt3dadd(-44.674, 162.644, 2.799, 0.704)
pt3dadd(-44.659, 162.63, 2.721, 0.636)
pt3dadd(-44.644, 162.618, 2.642, 0.568)
pt3dadd(-44.629, 162.605, 2.563, 0.5)
pt3dadd(-44.613, 162.592, 2.484, 0.43)
pt3dadd(-44.598, 162.58, 2.406, 0.362)
pt3dadd(-44.583, 162.565, 2.327, 0.294)
pt3dadd(-44.568, 162.553, 2.248, 0.226)
pt3dadd(-44.553, 162.492, 2.261, 1.13)
pt3dadd(-44.638, 162.498, 2.274, 1.29)
pt3dadd(-44.722, 162.505, 2.287, 1.45)
pt3dadd(-44.808, 162.511, 2.3, 1.61)
pt3dadd(-44.883, 162.528, 2.313, 1.726)
pt3dadd(-44.942, 162.56, 2.326, 1.77)
pt3dadd(-45.003, 162.594, 2.339, 1.816)
pt3dadd(-45.062, 162.628, 2.352, 1.862)
pt3dadd(-45.121, 162.66, 2.365, 1.906)
pt3dadd(-45.174, 162.698, 2.378, 1.938)
pt3dadd(-45.216, 162.744, 2.391, 1.948)
pt3dadd(-45.257, 162.79, 2.404, 1.958)
pt3dadd(-45.299, 162.834, 2.418, 1.966)
pt3dadd(-45.341, 162.88, 2.431, 1.976)
pt3dadd(-45.377, 162.926, 2.444, 1.968)
pt3dadd(-45.394, 162.982, 2.457, 1.906)
pt3dadd(-45.395, 163.039, 2.462, 1.86)
pt3dadd(-45.385, 163.098, 2.462, 1.82)
pt3dadd(-45.377, 163.152, 2.459, 1.782)
pt3dadd(-45.41, 163.127, 2.385, 1.77)
pt3dadd(-45.445, 163.103, 2.313, 1.764)
pt3dadd(-45.49, 163.094, 2.251, 1.806)
pt3dadd(-45.538, 163.078, 2.188, 1.852)
pt3dadd(-45.594, 163.046, 2.124, 1.904)
pt3dadd(-45.627, 163.039, 2.064, 1.97)
pt3dadd(-45.6, 162.934, 2.078, 1.984)
}
apic[6] {pt3dclear()
pt3dadd(-45.6, 162.934, 2.078, 1.984)
pt3dadd(-45.606, 163.018, 2.007, 1.96)
pt3dadd(-45.613, 163.103, 1.936, 1.934)
pt3dadd(-45.652, 163.175, 1.863, 1.894)
pt3dadd(-45.691, 163.244, 1.789, 1.852)
pt3dadd(-45.731, 163.315, 1.716, 1.81)
pt3dadd(-45.829, 163.38, 1.706, 1.74)
pt3dadd(-45.93, 163.444, 1.701, 1.668)
pt3dadd(-46.004, 163.534, 1.686, 1.592)
pt3dadd(-46.073, 163.631, 1.668, 1.514)
pt3dadd(-46.098, 163.709, 1.599, 1.412)
pt3dadd(-46.12, 163.786, 1.524, 1.308)
pt3dadd(-46.159, 163.819, 1.434, 1.206)
pt3dadd(-46.2, 163.853, 1.345, 1.106)
pt3dadd(-46.22, 163.92, 1.264, 1.072)
pt3dadd(-46.241, 163.988, 1.183, 1.038)
pt3dadd(-46.262, 164.056, 1.102, 1.006)
pt3dadd(-46.283, 164.124, 1.021, 0.972)
pt3dadd(-46.33, 164.165, 0.944, 0.946)
pt3dadd(-46.405, 164.179, 0.868, 0.93)
pt3dadd(-46.448, 164.23, 0.785, 0.944)
pt3dadd(-46.501, 164.274, 0.706, 0.954)
pt3dadd(-46.588, 164.303, 0.64, 0.954)
pt3dadd(-46.667, 164.35, 0.58, 0.948)
pt3dadd(-46.736, 164.426, 0.529, 0.934)
pt3dadd(-46.806, 164.513, 0.496, 0.912)
pt3dadd(-46.877, 164.605, 0.472, 0.886)
pt3dadd(-46.969, 164.66, 0.432, 0.878)
pt3dadd(-47.014, 164.68, 0.411, 0.878)
}
apic[7] {pt3dclear()
pt3dadd(-47.014, 164.68, 0.411, 0.878)
pt3dadd(-47.084, 164.777, 0.406, 0.892)
pt3dadd(-47.155, 164.873, 0.4, 0.904)
pt3dadd(-47.248, 164.95, 0.4, 0.948)
pt3dadd(-47.341, 165.024, 0.4, 0.994)
pt3dadd(-47.426, 165.082, 0.355, 1.028)
pt3dadd(-47.507, 165.134, 0.297, 1.054)
pt3dadd(-47.52, 165.178, 0.204, 1.042)
pt3dadd(-47.532, 165.221, 0.111, 1.032)
pt3dadd(-47.574, 165.312, 0.061, 1.014)
pt3dadd(-47.621, 165.408, 0.017, 0.996)
pt3dadd(-47.669, 165.505, -0.027, 0.978)
pt3dadd(-47.716, 165.602, -0.072, 0.96)
pt3dadd(-47.771, 165.692, -0.117, 0.946)
pt3dadd(-47.832, 165.78, -0.163, 0.934)
pt3dadd(-47.894, 165.868, -0.208, 0.922)
pt3dadd(-47.956, 165.955, -0.254, 0.91)
pt3dadd(-48.024, 166.039, -0.296, 0.906)
pt3dadd(-48.101, 166.118, -0.333, 0.914)
pt3dadd(-48.179, 166.199, -0.371, 0.918)
pt3dadd(-48.256, 166.279, -0.408, 0.926)
pt3dadd(-48.32, 166.367, -0.447, 0.934)
pt3dadd(-48.359, 166.47, -0.487, 0.952)
pt3dadd(-48.398, 166.572, -0.527, 0.968)
pt3dadd(-48.438, 166.675, -0.567, 0.986)
pt3dadd(-48.476, 166.777, -0.608, 1.002)
pt3dadd(-48.52, 166.876, -0.652, 1.116)
pt3dadd(-48.612, 166.927, -0.677, 1.202)
pt3dadd(-48.726, 166.957, -0.692, 1.27)
pt3dadd(-48.799, 167.023, -0.718, 1.312)
pt3dadd(-48.826, 167.13, -0.757, 1.324)
pt3dadd(-48.844, 167.234, -0.803, 1.302)
pt3dadd(-48.85, 167.336, -0.856, 1.242)
pt3dadd(-48.871, 167.441, -0.891, 1.176)
pt3dadd(-48.92, 167.551, -0.896, 1.094)
pt3dadd(-48.97, 167.659, -0.905, 1.026)
pt3dadd(-49.024, 167.761, -0.933, 1.002)
pt3dadd(-49.078, 167.863, -0.96, 0.98)
pt3dadd(-49.132, 167.965, -0.988, 0.958)
pt3dadd(-49.186, 168.067, -1.015, 0.934)
pt3dadd(-49.22, 168.175, -1.044, 0.93)
pt3dadd(-49.248, 168.287, -1.074, 0.93)
pt3dadd(-49.276, 168.397, -1.105, 0.93)
pt3dadd(-49.303, 168.509, -1.135, 0.93)
pt3dadd(-49.332, 168.619, -1.165, 0.93)
pt3dadd(-49.385, 168.703, -1.22, 0.94)
pt3dadd(-49.44, 168.785, -1.277, 0.952)
pt3dadd(-49.496, 168.866, -1.334, 0.966)
pt3dadd(-49.552, 168.948, -1.391, 0.978)
pt3dadd(-49.607, 169.046, -1.419, 0.998)
pt3dadd(-49.663, 169.15, -1.441, 1.02)
pt3dadd(-49.718, 169.253, -1.463, 1.042)
pt3dadd(-49.775, 169.356, -1.485, 1.064)
pt3dadd(-49.837, 169.454, -1.501, 1.086)
pt3dadd(-49.916, 169.544, -1.503, 1.106)
pt3dadd(-49.996, 169.634, -1.505, 1.128)
pt3dadd(-50.075, 169.726, -1.507, 1.148)
pt3dadd(-50.154, 169.816, -1.51, 1.168)
pt3dadd(-50.232, 169.906, -1.52, 1.188)
pt3dadd(-50.306, 169.996, -1.54, 1.204)
pt3dadd(-50.382, 170.086, -1.56, 1.222)
pt3dadd(-50.458, 170.177, -1.58, 1.238)
pt3dadd(-50.533, 170.267, -1.6, 1.256)
pt3dadd(-50.648, 170.285, -1.622, 1.256)
pt3dadd(-50.744, 170.323, -1.662, 1.234)
pt3dadd(-50.821, 170.384, -1.719, 1.19)
pt3dadd(-50.856, 170.458, -1.79, 1.15)
pt3dadd(-50.876, 170.533, -1.865, 1.112)
pt3dadd(-50.88, 170.62, -1.934, 1.066)
pt3dadd(-50.88, 170.708, -2.002, 1.018)
pt3dadd(-50.885, 170.779, -2.082, 0.988)
pt3dadd(-50.891, 170.842, -2.167, 0.964)
pt3dadd(-50.924, 170.922, -2.231, 0.944)
pt3dadd(-50.976, 171.011, -2.282, 0.926)
pt3dadd(-51.028, 171.101, -2.332, 0.906)
}
}
proc shape3d_20() {
apic[7] { pt3dadd(-51.078, 171.191, -2.383, 0.888)
pt3dadd(-51.125, 171.286, -2.431, 0.878)
pt3dadd(-51.164, 171.386, -2.474, 0.878)
pt3dadd(-51.204, 171.487, -2.517, 0.878)
pt3dadd(-51.244, 171.588, -2.56, 0.878)
pt3dadd(-51.284, 171.688, -2.603, 0.88)
pt3dadd(-51.344, 171.78, -2.643, 0.892)
pt3dadd(-51.406, 171.872, -2.683, 0.904)
pt3dadd(-51.466, 171.964, -2.722, 0.916)
pt3dadd(-51.526, 172.056, -2.762, 0.928)
pt3dadd(-51.612, 172.136, -2.773, 0.952)
pt3dadd(-51.703, 172.216, -2.78, 0.98)
pt3dadd(-51.793, 172.294, -2.787, 1.006)
pt3dadd(-51.883, 172.373, -2.794, 1.032)
pt3dadd(-51.972, 172.45, -2.805, 1.06)
pt3dadd(-52.058, 172.52, -2.843, 1.09)
pt3dadd(-52.145, 172.591, -2.88, 1.12)
pt3dadd(-52.231, 172.661, -2.917, 1.15)
pt3dadd(-52.318, 172.732, -2.955, 1.18)
pt3dadd(-52.349, 172.835, -2.99, 1.22)
pt3dadd(-52.397, 172.944, -2.996, 1.186)
pt3dadd(-52.445, 173.052, -3.005, 1.15)
pt3dadd(-52.483, 173.154, -3.048, 1.102)
pt3dadd(-52.52, 173.256, -3.09, 1.054)
pt3dadd(-52.559, 173.358, -3.132, 1.006)
pt3dadd(-52.56, 173.44, -3.205, 0.946)
pt3dadd(-52.56, 173.521, -3.278, 0.888)
pt3dadd(-52.56, 173.636, -3.292, 0.886)
pt3dadd(-52.56, 173.755, -3.296, 0.894)
pt3dadd(-52.56, 173.875, -3.3, 0.904)
pt3dadd(-52.56, 173.995, -3.3, 0.952)
pt3dadd(-52.56, 174.115, -3.3, 1.002)
pt3dadd(-52.56, 174.235, -3.3, 1.052)
pt3dadd(-52.56, 174.355, -3.304, 1.122)
pt3dadd(-52.56, 174.475, -3.308, 1.192)
pt3dadd(-52.564, 174.595, -3.313, 1.258)
pt3dadd(-52.608, 174.703, -3.331, 1.29)
pt3dadd(-52.652, 174.812, -3.35, 1.322)
pt3dadd(-52.698, 174.922, -3.368, 1.352)
pt3dadd(-52.742, 175.031, -3.387, 1.384)
pt3dadd(-52.783, 175.138, -3.414, 1.412)
pt3dadd(-52.817, 175.24, -3.459, 1.428)
pt3dadd(-52.849, 175.342, -3.504, 1.446)
pt3dadd(-52.883, 175.444, -3.549, 1.462)
pt3dadd(-52.915, 175.546, -3.594, 1.48)
pt3dadd(-52.97, 175.636, -3.642, 1.482)
pt3dadd(-53.028, 175.722, -3.69, 1.482)
pt3dadd(-53.087, 175.81, -3.739, 1.482)
}
dend_5[7] {pt3dclear()
pt3dadd(-53.087, 175.81, -3.739, 1.482)
pt3dadd(-53.144, 175.897, -3.787, 1.482)
pt3dadd(-53.219, 175.984, -3.817, 1.482)
pt3dadd(-53.298, 176.069, -3.84, 1.482)
pt3dadd(-53.377, 176.154, -3.863, 1.482)
pt3dadd(-53.458, 176.24, -3.886, 1.482)
pt3dadd(-53.536, 176.324, -3.911, 1.486)
pt3dadd(-53.615, 176.41, -3.939, 1.498)
pt3dadd(-53.693, 176.494, -3.968, 1.51)
pt3dadd(-53.771, 176.578, -3.997, 1.522)
pt3dadd(-53.845, 176.662, -4.03, 1.534)
pt3dadd(-53.89, 176.735, -4.099, 1.566)
pt3dadd(-53.934, 176.809, -4.168, 1.596)
pt3dadd(-53.98, 176.882, -4.238, 1.626)
pt3dadd(-54.024, 176.957, -4.307, 1.656)
pt3dadd(-54.103, 176.999, -4.372, 1.728)
pt3dadd(-54.168, 177.035, -4.45, 1.714)
pt3dadd(-54.2, 177.053, -4.489, 1.708)
}
dend_5[8] {pt3dclear()
pt3dadd(-54.2, 177.053, -4.489, 1.708)
pt3dadd(-54.211, 177.168, -4.515, 1.674)
pt3dadd(-54.221, 177.283, -4.541, 1.642)
pt3dadd(-54.232, 177.398, -4.568, 1.608)
pt3dadd(-54.24, 177.515, -4.59, 1.576)
pt3dadd(-54.24, 177.635, -4.598, 1.54)
pt3dadd(-54.24, 177.755, -4.606, 1.504)
pt3dadd(-54.247, 177.87, -4.626, 1.476)
pt3dadd(-54.266, 177.979, -4.663, 1.464)
pt3dadd(-54.295, 178.088, -4.696, 1.468)
pt3dadd(-54.342, 178.195, -4.718, 1.506)
pt3dadd(-54.404, 178.286, -4.745, 1.546)
pt3dadd(-54.5, 178.344, -4.782, 1.586)
pt3dadd(-54.583, 178.415, -4.82, 1.61)
pt3dadd(-54.654, 178.499, -4.861, 1.616)
pt3dadd(-54.725, 178.583, -4.901, 1.622)
pt3dadd(-54.796, 178.667, -4.941, 1.628)
pt3dadd(-54.85, 178.762, -4.977, 1.622)
pt3dadd(-54.874, 178.874, -5.004, 1.598)
pt3dadd(-54.898, 178.987, -5.03, 1.572)
pt3dadd(-54.922, 179.101, -5.057, 1.546)
pt3dadd(-54.946, 179.214, -5.084, 1.522)
pt3dadd(-54.964, 179.327, -5.115, 1.49)
pt3dadd(-54.971, 179.437, -5.152, 1.452)
pt3dadd(-54.978, 179.549, -5.189, 1.412)
pt3dadd(-54.986, 179.66, -5.225, 1.374)
pt3dadd(-54.994, 179.772, -5.262, 1.334)
pt3dadd(-55.004, 179.878, -5.306, 1.294)
pt3dadd(-55.022, 179.969, -5.369, 1.25)
pt3dadd(-55.039, 180.059, -5.433, 1.206)
pt3dadd(-55.057, 180.15, -5.497, 1.162)
pt3dadd(-55.075, 180.241, -5.56, 1.118)
pt3dadd(-55.08, 180.334, -5.623, 1.03)
pt3dadd(-55.086, 180.397, -5.708, 1.018)
pt3dadd(-55.093, 180.461, -5.792, 1.006)
pt3dadd(-55.15, 180.548, -5.838, 0.986)
pt3dadd(-55.211, 180.638, -5.88, 0.964)
pt3dadd(-55.258, 180.742, -5.9, 0.932)
pt3dadd(-55.29, 180.857, -5.9, 0.89)
pt3dadd(-55.322, 180.972, -5.901, 0.854)
pt3dadd(-55.351, 181.088, -5.913, 0.846)
pt3dadd(-55.379, 181.204, -5.925, 0.84)
pt3dadd(-55.408, 181.32, -5.936, 0.834)
pt3dadd(-55.434, 181.408, -5.974, 0.84)
pt3dadd(-55.458, 181.432, -6.069, 0.874)
pt3dadd(-55.488, 181.462, -6.158, 0.91)
pt3dadd(-55.574, 181.54, -6.182, 0.978)
pt3dadd(-55.644, 181.627, -6.201, 1.038)
pt3dadd(-55.66, 181.746, -6.205, 1.078)
pt3dadd(-55.675, 181.866, -6.21, 1.116)
pt3dadd(-55.685, 181.962, -6.257, 1.17)
pt3dadd(-55.691, 182.046, -6.328, 1.232)
pt3dadd(-55.728, 182.122, -6.396, 1.348)
pt3dadd(-55.772, 182.195, -6.465, 1.478)
pt3dadd(-55.801, 182.274, -6.537, 1.586)
pt3dadd(-55.844, 182.354, -6.6, 1.658)
pt3dadd(-55.897, 182.438, -6.657, 1.7)
pt3dadd(-55.915, 182.55, -6.678, 1.666)
pt3dadd(-55.926, 182.669, -6.691, 1.616)
pt3dadd(-55.956, 182.78, -6.7, 1.538)
pt3dadd(-56.024, 182.879, -6.7, 1.41)
pt3dadd(-56.094, 182.975, -6.707, 1.294)
pt3dadd(-56.171, 183.052, -6.748, 1.234)
pt3dadd(-56.249, 183.13, -6.788, 1.172)
pt3dadd(-56.327, 183.206, -6.829, 1.112)
pt3dadd(-56.405, 183.286, -6.867, 1.054)
pt3dadd(-56.477, 183.38, -6.874, 1.038)
pt3dadd(-56.55, 183.475, -6.881, 1.022)
pt3dadd(-56.622, 183.57, -6.888, 1.006)
pt3dadd(-56.695, 183.666, -6.895, 0.99)
pt3dadd(-56.752, 183.768, -6.9, 0.988)
pt3dadd(-56.766, 183.887, -6.9, 1.016)
pt3dadd(-56.821, 183.98, -6.908, 1.042)
pt3dadd(-56.917, 184.049, -6.926, 1.068)
pt3dadd(-57.006, 184.117, -6.958, 1.064)
pt3dadd(-57.09, 184.186, -7.002, 1.036)
pt3dadd(-57.112, 184.28, -7.053, 0.982)
pt3dadd(-57.118, 184.382, -7.106, 0.922)
pt3dadd(-57.12, 184.486, -7.157, 0.872)
pt3dadd(-57.12, 184.589, -7.208, 0.826)
pt3dadd(-57.12, 184.687, -7.265, 0.786)
pt3dadd(-57.12, 184.754, -7.346, 0.796)
pt3dadd(-57.12, 184.816, -7.432, 0.82)
pt3dadd(-57.122, 184.883, -7.515, 0.84)
pt3dadd(-57.127, 184.955, -7.595, 0.858)
pt3dadd(-57.132, 185.027, -7.675, 0.876)
pt3dadd(-57.216, 185.092, -7.693, 0.878)
pt3dadd(-57.318, 185.155, -7.699, 0.878)
pt3dadd(-57.38, 185.252, -7.708, 0.866)
pt3dadd(-57.428, 185.362, -7.72, 0.848)
pt3dadd(-57.475, 185.471, -7.732, 0.83)
pt3dadd(-57.48, 185.56, -7.795, 0.808)
pt3dadd(-57.48, 185.648, -7.864, 0.784)
pt3dadd(-57.48, 185.73, -7.937, 0.778)
pt3dadd(-57.48, 185.809, -8.011, 0.778)
pt3dadd(-57.48, 185.89, -8.086, 0.778)
pt3dadd(-57.514, 186.004, -8.094, 0.8)
pt3dadd(-57.547, 186.118, -8.098, 0.82)
pt3dadd(-57.588, 186.23, -8.106, 0.838)
pt3dadd(-57.632, 186.341, -8.115, 0.852)
pt3dadd(-57.677, 186.452, -8.124, 0.866)
pt3dadd(-57.721, 186.562, -8.135, 0.88)
pt3dadd(-57.776, 186.588, -8.221, 0.892)
pt3dadd(-57.828, 186.622, -8.304, 0.906)
pt3dadd(-57.841, 186.726, -8.353, 0.918)
pt3dadd(-57.856, 186.83, -8.4, 0.93)
pt3dadd(-57.918, 186.931, -8.405, 0.942)
pt3dadd(-57.982, 187.033, -8.411, 0.954)
pt3dadd(-58.088, 187.058, -8.446, 0.954)
pt3dadd(-58.198, 187.078, -8.484, 0.954)
pt3dadd(-58.249, 187.176, -8.491, 0.946)
pt3dadd(-58.292, 187.289, -8.493, 0.936)
pt3dadd(-58.334, 187.4, -8.495, 0.928)
pt3dadd(-58.376, 187.513, -8.497, 0.918)
pt3dadd(-58.42, 187.626, -8.499, 0.908)
pt3dadd(-58.44, 187.741, -8.5, 0.884)
pt3dadd(-58.44, 187.861, -8.5, 0.848)
pt3dadd(-58.44, 187.978, -8.517, 0.824)
pt3dadd(-58.44, 188.092, -8.55, 0.812)
pt3dadd(-58.44, 188.202, -8.587, 0.806)
pt3dadd(-58.44, 188.302, -8.643, 0.818)
pt3dadd(-58.44, 188.4, -8.7, 0.828)
pt3dadd(-58.468, 188.464, -8.782, 0.882)
pt3dadd(-58.502, 188.527, -8.858, 0.934)
pt3dadd(-58.595, 188.598, -8.882, 0.974)
pt3dadd(-58.67, 188.68, -8.9, 1.01)
pt3dadd(-58.685, 188.798, -8.9, 1.038)
pt3dadd(-58.734, 188.896, -8.907, 1.054)
pt3dadd(-58.831, 188.964, -8.925, 1.054)
pt3dadd(-58.921, 189.034, -8.955, 1.054)
pt3dadd(-59.004, 189.101, -8.999, 1.054)
pt3dadd(-59.032, 189.202, -9.036, 1.046)
pt3dadd(-59.036, 189.314, -9.071, 1.036)
pt3dadd(-59.04, 189.428, -9.099, 1.024)
}
}
proc shape3d_21() {
dend_5[8] { pt3dadd(-59.04, 189.546, -9.122, 1.014)
pt3dadd(-59.04, 189.662, -9.144, 1.004)
pt3dadd(-59.04, 189.767, -9.192, 1.004)
pt3dadd(-59.04, 189.871, -9.242, 1.004)
pt3dadd(-59.04, 189.976, -9.292, 1.004)
pt3dadd(-59.04, 190.079, -9.342, 1.004)
pt3dadd(-59.04, 190.183, -9.392, 1.004)
pt3dadd(-59.04, 190.274, -9.456, 1.008)
pt3dadd(-59.04, 190.363, -9.524, 1.014)
pt3dadd(-59.04, 190.452, -9.591, 1.018)
pt3dadd(-59.04, 190.541, -9.658, 1.024)
pt3dadd(-59.04, 190.63, -9.725, 1.028)
pt3dadd(-59.047, 190.691, -9.808, 0.996)
pt3dadd(-59.1, 190.775, -9.865, 0.94)
pt3dadd(-59.153, 190.859, -9.921, 0.888)
pt3dadd(-59.202, 190.944, -9.978, 0.846)
pt3dadd(-59.251, 191.03, -10.034, 0.802)
pt3dadd(-59.28, 191.096, -10.107, 0.76)
pt3dadd(-59.28, 191.136, -10.201, 0.718)
pt3dadd(-59.28, 191.178, -10.295, 0.676)
pt3dadd(-59.28, 191.245, -10.377, 0.64)
pt3dadd(-59.28, 191.314, -10.46, 0.606)
pt3dadd(-59.28, 191.414, -10.513, 0.56)
pt3dadd(-59.28, 191.518, -10.564, 0.516)
pt3dadd(-59.28, 191.621, -10.614, 0.478)
pt3dadd(-59.28, 191.724, -10.665, 0.444)
pt3dadd(-59.28, 191.831, -10.71, 0.42)
pt3dadd(-59.28, 191.941, -10.75, 0.406)
pt3dadd(-59.28, 192.052, -10.789, 0.392)
pt3dadd(-59.28, 192.162, -10.829, 0.376)
pt3dadd(-59.28, 192.272, -10.868, 0.362)
pt3dadd(-59.28, 192.384, -10.9, 0.35)
pt3dadd(-59.28, 192.504, -10.9, 0.348)
pt3dadd(-59.28, 192.624, -10.9, 0.344)
pt3dadd(-59.28, 192.744, -10.9, 0.34)
pt3dadd(-59.28, 192.864, -10.9, 0.336)
pt3dadd(-59.28, 192.984, -10.9, 0.332)
pt3dadd(-59.28, 193.104, -10.9, 0.33)
pt3dadd(-59.29, 193.223, -10.9, 0.324)
pt3dadd(-59.334, 193.334, -10.9, 0.316)
pt3dadd(-59.378, 193.446, -10.9, 0.306)
pt3dadd(-59.423, 193.556, -10.9, 0.296)
pt3dadd(-59.467, 193.668, -10.9, 0.288)
pt3dadd(-59.512, 193.78, -10.9, 0.278)
pt3dadd(-59.52, 193.898, -10.9, 0.274)
pt3dadd(-59.52, 194.018, -10.9, 0.27)
pt3dadd(-59.52, 194.138, -10.9, 0.266)
pt3dadd(-59.52, 194.258, -10.9, 0.262)
pt3dadd(-59.52, 194.378, -10.9, 0.258)
pt3dadd(-59.52, 194.498, -10.9, 0.256)
pt3dadd(-59.52, 194.618, -10.9, 0.252)
pt3dadd(-59.526, 194.738, -10.9, 0.24)
pt3dadd(-59.533, 194.857, -10.9, 0.226)
pt3dadd(-59.609, 194.947, -10.9, 0.226)
pt3dadd(-59.69, 195.036, -10.9, 0.226)
pt3dadd(-59.725, 195.146, -10.912, 0.234)
pt3dadd(-59.749, 195.263, -10.926, 0.246)
pt3dadd(-59.76, 195.374, -10.956, 0.274)
pt3dadd(-59.76, 195.482, -11.001, 0.318)
pt3dadd(-59.76, 195.588, -11.047, 0.376)
pt3dadd(-59.76, 195.691, -11.097, 0.468)
pt3dadd(-59.76, 195.794, -11.148, 0.556)
pt3dadd(-59.76, 195.898, -11.201, 0.606)
pt3dadd(-59.76, 196, -11.253, 0.654)
pt3dadd(-59.76, 196.102, -11.306, 0.704)
pt3dadd(-59.76, 196.204, -11.358, 0.754)
pt3dadd(-59.76, 196.306, -11.411, 0.804)
pt3dadd(-59.76, 196.417, -11.448, 0.846)
pt3dadd(-59.76, 196.529, -11.485, 0.888)
pt3dadd(-59.76, 196.64, -11.522, 0.93)
pt3dadd(-59.76, 196.751, -11.559, 0.972)
pt3dadd(-59.76, 196.862, -11.596, 1.014)
pt3dadd(-59.76, 196.972, -11.638, 1.102)
pt3dadd(-59.76, 197.074, -11.688, 1.214)
pt3dadd(-59.76, 197.135, -11.774, 1.282)
pt3dadd(-59.76, 197.195, -11.86, 1.35)
pt3dadd(-59.76, 197.286, -11.925, 1.4)
pt3dadd(-59.76, 197.38, -11.987, 1.446)
pt3dadd(-59.76, 197.488, -12.031, 1.466)
pt3dadd(-59.76, 197.598, -12.069, 1.476)
pt3dadd(-59.76, 197.713, -12.091, 1.464)
pt3dadd(-59.76, 197.833, -12.095, 1.43)
pt3dadd(-59.76, 197.953, -12.099, 1.394)
pt3dadd(-59.76, 198.073, -12.104, 1.34)
pt3dadd(-59.76, 198.192, -12.109, 1.274)
pt3dadd(-59.76, 198.307, -12.135, 1.21)
pt3dadd(-59.76, 198.421, -12.168, 1.146)
pt3dadd(-59.76, 198.536, -12.195, 1.09)
pt3dadd(-59.76, 198.654, -12.212, 1.052)
pt3dadd(-59.76, 198.773, -12.229, 1.014)
pt3dadd(-59.708, 198.869, -12.262, 0.952)
pt3dadd(-59.642, 198.958, -12.299, 0.88)
pt3dadd(-59.549, 199.032, -12.3, 0.834)
pt3dadd(-59.455, 199.108, -12.3, 0.786)
pt3dadd(-59.42, 199.216, -12.316, 0.77)
pt3dadd(-59.398, 199.332, -12.335, 0.76)
pt3dadd(-59.374, 199.447, -12.355, 0.75)
pt3dadd(-59.351, 199.562, -12.374, 0.742)
pt3dadd(-59.328, 199.678, -12.393, 0.732)
pt3dadd(-59.299, 199.794, -12.4, 0.728)
pt3dadd(-59.29, 199.913, -12.4, 0.742)
pt3dadd(-59.285, 200.033, -12.4, 0.76)
pt3dadd(-59.28, 200.153, -12.4, 0.778)
pt3dadd(-59.269, 200.272, -12.4, 0.784)
pt3dadd(-59.257, 200.392, -12.4, 0.788)
pt3dadd(-59.246, 200.51, -12.4, 0.794)
pt3dadd(-59.234, 200.63, -12.4, 0.8)
pt3dadd(-59.192, 200.731, -12.4, 0.808)
pt3dadd(-59.093, 200.8, -12.4, 0.82)
pt3dadd(-59.005, 200.876, -12.4, 0.824)
pt3dadd(-58.966, 200.989, -12.4, 0.802)
pt3dadd(-58.926, 201.102, -12.4, 0.782)
pt3dadd(-58.92, 201.221, -12.403, 0.756)
pt3dadd(-58.92, 201.341, -12.407, 0.73)
pt3dadd(-58.92, 201.461, -12.411, 0.704)
pt3dadd(-58.901, 201.54, -12.483, 0.678)
pt3dadd(-58.88, 201.617, -12.556, 0.654)
pt3dadd(-58.865, 201.733, -12.577, 0.662)
pt3dadd(-58.85, 201.85, -12.598, 0.672)
pt3dadd(-58.835, 201.966, -12.618, 0.682)
pt3dadd(-58.82, 202.082, -12.639, 0.69)
pt3dadd(-58.805, 202.199, -12.66, 0.7)
pt3dadd(-58.787, 202.316, -12.67, 0.718)
pt3dadd(-58.765, 202.435, -12.676, 0.74)
pt3dadd(-58.745, 202.553, -12.682, 0.76)
pt3dadd(-58.724, 202.67, -12.688, 0.782)
pt3dadd(-58.703, 202.789, -12.694, 0.804)
pt3dadd(-58.682, 202.907, -12.699, 0.826)
pt3dadd(-58.679, 203.027, -12.7, 0.844)
pt3dadd(-58.676, 203.147, -12.7, 0.864)
pt3dadd(-58.674, 203.267, -12.7, 0.882)
pt3dadd(-58.673, 203.387, -12.7, 0.9)
pt3dadd(-58.67, 203.507, -12.7, 0.918)
pt3dadd(-58.669, 203.627, -12.7, 0.936)
pt3dadd(-58.667, 203.747, -12.7, 0.954)
pt3dadd(-58.618, 203.855, -12.714, 0.98)
pt3dadd(-58.567, 203.963, -12.728, 1.006)
pt3dadd(-58.518, 204.07, -12.741, 1.032)
pt3dadd(-58.468, 204.178, -12.755, 1.058)
pt3dadd(-58.415, 204.283, -12.771, 1.09)
pt3dadd(-58.351, 204.38, -12.798, 1.152)
pt3dadd(-58.276, 204.47, -12.816, 1.18)
pt3dadd(-58.2, 204.562, -12.834, 1.206)
pt3dadd(-58.141, 204.656, -12.87, 1.164)
pt3dadd(-58.092, 204.756, -12.9, 1.126)
pt3dadd(-58.087, 204.876, -12.9, 1.1)
pt3dadd(-58.084, 204.996, -12.9, 1.074)
pt3dadd(-58.08, 205.116, -12.9, 1.044)
pt3dadd(-58.08, 205.236, -12.9, 1.012)
pt3dadd(-58.08, 205.356, -12.9, 0.978)
pt3dadd(-58.073, 205.472, -12.911, 0.952)
pt3dadd(-58.046, 205.58, -12.949, 0.94)
pt3dadd(-58.021, 205.688, -12.987, 0.93)
pt3dadd(-57.996, 205.796, -13.025, 0.918)
pt3dadd(-57.97, 205.904, -13.063, 0.908)
pt3dadd(-57.96, 206.006, -13.113, 0.886)
pt3dadd(-57.96, 206.105, -13.17, 0.856)
pt3dadd(-57.96, 206.202, -13.228, 0.826)
pt3dadd(-57.96, 206.3, -13.285, 0.796)
pt3dadd(-57.96, 206.399, -13.343, 0.766)
pt3dadd(-57.96, 206.509, -13.373, 0.74)
pt3dadd(-57.96, 206.629, -13.383, 0.716)
pt3dadd(-57.96, 206.748, -13.394, 0.692)
pt3dadd(-57.96, 206.868, -13.404, 0.668)
pt3dadd(-57.96, 206.987, -13.415, 0.646)
pt3dadd(-57.96, 207.106, -13.425, 0.622)
pt3dadd(-57.96, 207.224, -13.438, 0.598)
pt3dadd(-57.96, 207.342, -13.461, 0.572)
pt3dadd(-57.96, 207.458, -13.484, 0.546)
pt3dadd(-57.96, 207.575, -13.507, 0.52)
pt3dadd(-57.96, 207.692, -13.53, 0.494)
pt3dadd(-57.96, 207.809, -13.553, 0.468)
pt3dadd(-57.96, 207.926, -13.572, 0.45)
pt3dadd(-57.96, 208.045, -13.584, 0.446)
pt3dadd(-57.96, 208.165, -13.596, 0.442)
pt3dadd(-57.96, 208.284, -13.609, 0.438)
pt3dadd(-57.96, 208.403, -13.621, 0.434)
pt3dadd(-57.96, 208.522, -13.634, 0.43)
pt3dadd(-57.96, 208.64, -13.648, 0.426)
pt3dadd(-57.96, 208.756, -13.675, 0.426)
pt3dadd(-57.96, 208.871, -13.703, 0.426)
pt3dadd(-57.96, 208.987, -13.73, 0.426)
pt3dadd(-57.96, 209.102, -13.758, 0.426)
pt3dadd(-57.96, 209.218, -13.785, 0.426)
pt3dadd(-57.96, 209.335, -13.8, 0.484)
pt3dadd(-57.96, 209.455, -13.802, 0.58)
pt3dadd(-57.96, 209.575, -13.806, 0.64)
pt3dadd(-57.96, 209.695, -13.809, 0.702)
pt3dadd(-57.96, 209.8, -13.846, 0.764)
pt3dadd(-57.96, 209.893, -13.909, 0.828)
pt3dadd(-57.96, 209.988, -13.971, 0.892)
pt3dadd(-57.96, 210.08, -14.034, 0.954)
pt3dadd(-57.96, 210.12, -14.128, 0.986)
pt3dadd(-57.96, 210.16, -14.223, 1.018)
pt3dadd(-57.96, 210.25, -14.27, 1.016)
pt3dadd(-57.96, 210.366, -14.292, 0.996)
pt3dadd(-57.96, 210.484, -14.316, 0.97)
pt3dadd(-57.96, 210.596, -14.349, 0.906)
pt3dadd(-57.96, 210.709, -14.382, 0.842)
pt3dadd(-57.96, 210.828, -14.392, 0.808)
}
}
proc shape3d_22() {
dend_5[8] { pt3dadd(-57.96, 210.948, -14.396, 0.782)
pt3dadd(-57.96, 211.068, -14.4, 0.756)
pt3dadd(-57.947, 211.187, -14.4, 0.754)
pt3dadd(-57.931, 211.306, -14.4, 0.754)
pt3dadd(-57.917, 211.426, -14.4, 0.754)
pt3dadd(-57.901, 211.544, -14.4, 0.754)
pt3dadd(-57.887, 211.663, -14.4, 0.754)
pt3dadd(-57.872, 211.782, -14.4, 0.754)
pt3dadd(-57.85, 211.9, -14.4, 0.764)
pt3dadd(-57.822, 212.017, -14.4, 0.782)
pt3dadd(-57.794, 212.134, -14.4, 0.798)
pt3dadd(-57.767, 212.25, -14.4, 0.816)
pt3dadd(-57.739, 212.368, -14.4, 0.834)
pt3dadd(-57.712, 212.484, -14.4, 0.85)
pt3dadd(-57.672, 212.597, -14.4, 0.88)
pt3dadd(-57.635, 212.711, -14.404, 0.904)
pt3dadd(-57.619, 212.828, -14.418, 0.904)
pt3dadd(-57.602, 212.946, -14.432, 0.904)
pt3dadd(-57.6, 213.037, -14.493, 0.852)
pt3dadd(-57.6, 213.125, -14.561, 0.792)
pt3dadd(-57.6, 213.198, -14.64, 0.744)
pt3dadd(-57.6, 213.265, -14.723, 0.696)
pt3dadd(-57.6, 213.346, -14.796, 0.65)
pt3dadd(-57.6, 213.433, -14.864, 0.602)
pt3dadd(-57.587, 213.526, -14.926, 0.578)
pt3dadd(-57.56, 213.622, -14.981, 0.578)
pt3dadd(-57.533, 213.719, -15.036, 0.578)
pt3dadd(-57.506, 213.815, -15.091, 0.578)
pt3dadd(-57.478, 213.91, -15.147, 0.578)
pt3dadd(-57.422, 213.985, -15.21, 0.578)
pt3dadd(-57.366, 214.061, -15.272, 0.578)
pt3dadd(-57.311, 214.135, -15.335, 0.578)
pt3dadd(-57.256, 214.211, -15.398, 0.578)
pt3dadd(-57.245, 214.324, -15.428, 0.61)
pt3dadd(-57.24, 214.414, -15.483, 0.628)
pt3dadd(-57.24, 214.475, -15.569, 0.628)
pt3dadd(-57.24, 214.53, -15.657, 0.626)
pt3dadd(-57.24, 214.57, -15.752, 0.614)
pt3dadd(-57.24, 214.609, -15.846, 0.604)
pt3dadd(-57.235, 214.72, -15.872, 0.584)
pt3dadd(-57.23, 214.837, -15.89, 0.564)
pt3dadd(-57.21, 214.954, -15.9, 0.548)
pt3dadd(-57.17, 215.066, -15.9, 0.538)
pt3dadd(-57.132, 215.179, -15.902, 0.528)
pt3dadd(-57.104, 215.291, -15.932, 0.528)
pt3dadd(-57.077, 215.401, -15.962, 0.528)
pt3dadd(-57.048, 215.513, -15.992, 0.528)
pt3dadd(-57.02, 215.623, -16.022, 0.528)
pt3dadd(-56.994, 215.735, -16.052, 0.526)
pt3dadd(-56.969, 215.845, -16.085, 0.52)
pt3dadd(-56.944, 215.957, -16.117, 0.516)
pt3dadd(-56.918, 216.067, -16.149, 0.51)
pt3dadd(-56.894, 216.178, -16.182, 0.506)
pt3dadd(-56.88, 216.293, -16.203, 0.496)
pt3dadd(-56.88, 216.413, -16.208, 0.484)
pt3dadd(-56.88, 216.515, -16.248, 0.478)
pt3dadd(-56.88, 216.602, -16.316, 0.478)
pt3dadd(-56.88, 216.703, -16.363, 0.494)
pt3dadd(-56.88, 216.821, -16.38, 0.532)
pt3dadd(-56.88, 216.94, -16.397, 0.57)
pt3dadd(-56.848, 217.054, -16.4, 0.64)
pt3dadd(-56.807, 217.166, -16.4, 0.714)
pt3dadd(-56.738, 217.256, -16.403, 0.798)
pt3dadd(-56.636, 217.32, -16.408, 0.894)
pt3dadd(-56.546, 217.388, -16.428, 0.966)
pt3dadd(-56.474, 217.468, -16.475, 0.996)
pt3dadd(-56.402, 217.546, -16.521, 1.028)
pt3dadd(-56.33, 217.625, -16.567, 1.058)
pt3dadd(-56.249, 217.696, -16.6, 1.09)
pt3dadd(-56.142, 217.75, -16.6, 1.124)
pt3dadd(-56.05, 217.826, -16.6, 1.112)
pt3dadd(-55.961, 217.907, -16.6, 1.088)
pt3dadd(-55.93, 218.015, -16.603, 1.056)
pt3dadd(-55.925, 218.135, -16.607, 1.02)
pt3dadd(-55.92, 218.255, -16.611, 0.984)
pt3dadd(-55.92, 218.369, -16.641, 0.922)
pt3dadd(-55.92, 218.482, -16.674, 0.858)
pt3dadd(-55.912, 218.598, -16.691, 0.812)
pt3dadd(-55.896, 218.717, -16.695, 0.784)
pt3dadd(-55.882, 218.836, -16.7, 0.754)
pt3dadd(-55.838, 218.947, -16.7, 0.754)
pt3dadd(-55.811, 219.064, -16.7, 0.768)
pt3dadd(-55.807, 219.182, -16.7, 0.802)
pt3dadd(-55.802, 219.302, -16.7, 0.838)
pt3dadd(-55.792, 219.422, -16.702, 0.874)
pt3dadd(-55.777, 219.541, -16.707, 0.914)
pt3dadd(-55.762, 219.66, -16.711, 0.952)
pt3dadd(-55.662, 219.7, -16.749, 1.004)
pt3dadd(-55.559, 219.734, -16.789, 1.054)
pt3dadd(-55.488, 219.828, -16.813, 1.068)
pt3dadd(-55.42, 219.92, -16.838, 1.08)
pt3dadd(-55.367, 220.02, -16.874, 1.08)
pt3dadd(-55.314, 220.118, -16.91, 1.08)
pt3dadd(-55.261, 220.217, -16.946, 1.08)
pt3dadd(-55.21, 220.316, -16.983, 1.08)
pt3dadd(-55.177, 220.429, -16.99, 1.084)
pt3dadd(-55.15, 220.547, -16.992, 1.088)
pt3dadd(-55.121, 220.663, -16.994, 1.092)
pt3dadd(-55.093, 220.78, -16.996, 1.096)
pt3dadd(-55.066, 220.896, -16.998, 1.102)
pt3dadd(-55.037, 221.012, -17, 1.106)
pt3dadd(-55.003, 221.128, -17, 1.124)
pt3dadd(-54.971, 221.244, -17, 1.142)
pt3dadd(-54.937, 221.359, -17, 1.16)
pt3dadd(-54.905, 221.474, -17, 1.178)
pt3dadd(-54.871, 221.59, -17, 1.196)
pt3dadd(-54.844, 221.706, -17, 1.214)
pt3dadd(-54.821, 221.824, -17, 1.236)
pt3dadd(-54.799, 221.942, -17, 1.256)
pt3dadd(-54.776, 222.06, -17, 1.278)
pt3dadd(-54.755, 222.178, -17, 1.298)
pt3dadd(-54.732, 222.295, -17, 1.32)
pt3dadd(-54.72, 222.414, -17.006, 1.356)
pt3dadd(-54.72, 222.53, -17.029, 1.382)
pt3dadd(-54.72, 222.643, -17.063, 1.382)
pt3dadd(-54.72, 222.756, -17.096, 1.382)
pt3dadd(-54.72, 222.868, -17.132, 1.382)
pt3dadd(-54.72, 222.98, -17.168, 1.382)
pt3dadd(-54.72, 223.086, -17.21, 1.386)
pt3dadd(-54.72, 223.14, -17.299, 1.432)
pt3dadd(-54.72, 223.193, -17.389, 1.476)
pt3dadd(-54.689, 223.295, -17.426, 1.528)
pt3dadd(-54.653, 223.403, -17.457, 1.58)
pt3dadd(-54.616, 223.512, -17.487, 1.634)
pt3dadd(-54.562, 223.594, -17.535, 1.714)
pt3dadd(-54.493, 223.656, -17.599, 1.814)
pt3dadd(-54.442, 223.688, -17.684, 1.864)
pt3dadd(-54.395, 223.715, -17.773, 1.902)
pt3dadd(-54.299, 223.766, -17.793, 1.898)
pt3dadd(-54.193, 223.822, -17.798, 1.886)
pt3dadd(-54.112, 223.906, -17.804, 1.858)
pt3dadd(-54.041, 224.003, -17.809, 1.822)
pt3dadd(-54.007, 224.107, -17.835, 1.786)
pt3dadd(-53.993, 224.218, -17.869, 1.756)
pt3dadd(-53.947, 224.328, -17.885, 1.744)
pt3dadd(-53.899, 224.435, -17.902, 1.734)
pt3dadd(-53.822, 224.526, -17.919, 1.746)
pt3dadd(-53.747, 224.605, -17.946, 1.756)
pt3dadd(-53.668, 224.634, -18.017, 1.742)
pt3dadd(-53.584, 224.675, -18.072, 1.716)
pt3dadd(-53.488, 224.743, -18.089, 1.664)
pt3dadd(-53.392, 224.814, -18.1, 1.616)
pt3dadd(-53.298, 224.888, -18.1, 1.57)
pt3dadd(-53.204, 224.964, -18.1, 1.524)
pt3dadd(-53.111, 225.038, -18.1, 1.48)
pt3dadd(-53.017, 225.114, -18.1, 1.434)
pt3dadd(-52.96, 225.16, -18.1, 1.406)
}
dend_5[9] {pt3dclear()
pt3dadd(-52.96, 225.16, -18.1, 1.406)
pt3dadd(-52.852, 225.203, -18.124, 1.358)
pt3dadd(-52.742, 225.245, -18.148, 1.31)
pt3dadd(-52.634, 225.288, -18.171, 1.262)
pt3dadd(-52.526, 225.331, -18.195, 1.212)
pt3dadd(-52.418, 225.368, -18.224, 1.17)
pt3dadd(-52.312, 225.395, -18.265, 1.138)
pt3dadd(-52.205, 225.42, -18.306, 1.104)
pt3dadd(-52.099, 225.446, -18.347, 1.072)
pt3dadd(-51.992, 225.472, -18.388, 1.04)
pt3dadd(-51.894, 225.532, -18.4, 1.006)
pt3dadd(-51.806, 225.613, -18.4, 1.028)
pt3dadd(-51.719, 225.695, -18.4, 1.052)
pt3dadd(-51.608, 225.738, -18.408, 1.072)
pt3dadd(-51.494, 225.773, -18.417, 1.092)
pt3dadd(-51.38, 225.809, -18.425, 1.112)
pt3dadd(-51.277, 225.853, -18.437, 1.134)
pt3dadd(-51.259, 225.966, -18.468, 1.17)
pt3dadd(-51.24, 226.078, -18.5, 1.204)
pt3dadd(-51.18, 226.182, -18.5, 1.228)
pt3dadd(-51.12, 226.285, -18.5, 1.25)
pt3dadd(-51.022, 226.333, -18.527, 1.256)
pt3dadd(-50.914, 226.367, -18.56, 1.256)
pt3dadd(-50.864, 226.45, -18.611, 1.212)
pt3dadd(-50.828, 226.543, -18.665, 1.156)
pt3dadd(-50.718, 226.57, -18.691, 1.046)
pt3dadd(-50.604, 226.606, -18.701, 1.012)
pt3dadd(-50.492, 226.643, -18.713, 0.98)
pt3dadd(-50.462, 226.733, -18.774, 1.004)
pt3dadd(-50.432, 226.823, -18.835, 1.028)
pt3dadd(-50.402, 226.914, -18.896, 1.052)
pt3dadd(-50.35, 227.02, -18.9, 1.076)
pt3dadd(-50.297, 227.126, -18.9, 1.098)
pt3dadd(-50.209, 227.202, -18.912, 1.114)
pt3dadd(-50.108, 227.263, -18.929, 1.126)
pt3dadd(-50.015, 227.323, -18.965, 1.09)
pt3dadd(-49.926, 227.383, -19.008, 1.034)
pt3dadd(-49.819, 227.412, -19.048, 1.006)
pt3dadd(-49.712, 227.438, -19.087, 0.98)
pt3dadd(-49.606, 227.48, -19.114, 0.98)
pt3dadd(-49.498, 227.525, -19.141, 0.98)
pt3dadd(-49.391, 227.568, -19.167, 0.98)
pt3dadd(-49.284, 227.611, -19.194, 0.98)
pt3dadd(-49.175, 227.644, -19.224, 0.992)
pt3dadd(-49.064, 227.652, -19.263, 1.026)
pt3dadd(-48.992, 227.74, -19.282, 1.03)
pt3dadd(-48.924, 227.836, -19.299, 1.03)
pt3dadd(-48.826, 227.905, -19.3, 0.996)
pt3dadd(-48.727, 227.972, -19.3, 0.962)
pt3dadd(-48.611, 227.99, -19.3, 0.934)
pt3dadd(-48.491, 227.995, -19.3, 0.908)
pt3dadd(-48.371, 228, -19.3, 0.882)
pt3dadd(-48.251, 228, -19.3, 0.872)
}
}
proc shape3d_23() {
dend_5[9] { pt3dadd(-48.131, 228, -19.3, 0.864)
pt3dadd(-48.011, 228, -19.3, 0.854)
pt3dadd(-47.893, 228.018, -19.3, 0.868)
pt3dadd(-47.774, 228.037, -19.3, 0.886)
pt3dadd(-47.656, 228.058, -19.3, 0.902)
pt3dadd(-47.538, 228.077, -19.3, 0.918)
pt3dadd(-47.419, 228.097, -19.3, 0.934)
pt3dadd(-47.302, 228.116, -19.3, 0.952)
pt3dadd(-47.184, 228.143, -19.3, 0.972)
pt3dadd(-47.068, 228.17, -19.3, 0.994)
pt3dadd(-46.95, 228.198, -19.3, 1.014)
pt3dadd(-46.834, 228.224, -19.3, 1.036)
pt3dadd(-46.717, 228.252, -19.3, 1.058)
pt3dadd(-46.6, 228.28, -19.3, 1.08)
pt3dadd(-46.488, 228.299, -19.334, 1.1)
pt3dadd(-46.378, 228.318, -19.368, 1.12)
pt3dadd(-46.266, 228.337, -19.402, 1.142)
pt3dadd(-46.154, 228.356, -19.436, 1.162)
pt3dadd(-46.044, 228.378, -19.468, 1.18)
pt3dadd(-45.936, 228.427, -19.482, 1.174)
pt3dadd(-45.828, 228.478, -19.496, 1.17)
pt3dadd(-45.72, 228.527, -19.509, 1.164)
pt3dadd(-45.612, 228.577, -19.523, 1.158)
pt3dadd(-45.509, 228.63, -19.543, 1.148)
pt3dadd(-45.416, 228.694, -19.58, 1.126)
pt3dadd(-45.325, 228.756, -19.617, 1.102)
pt3dadd(-45.233, 228.82, -19.654, 1.078)
pt3dadd(-45.14, 228.882, -19.69, 1.054)
pt3dadd(-45.032, 228.925, -19.714, 1.032)
pt3dadd(-44.923, 228.967, -19.738, 1.01)
pt3dadd(-44.815, 229.01, -19.762, 0.988)
pt3dadd(-44.707, 229.054, -19.785, 0.968)
pt3dadd(-44.597, 229.092, -19.808, 0.956)
pt3dadd(-44.484, 229.124, -19.828, 0.962)
pt3dadd(-44.37, 229.157, -19.848, 0.966)
pt3dadd(-44.257, 229.189, -19.868, 0.972)
pt3dadd(-44.144, 229.222, -19.888, 0.976)
pt3dadd(-44.032, 229.254, -19.909, 0.992)
pt3dadd(-43.919, 229.286, -19.929, 1.022)
pt3dadd(-43.806, 229.319, -19.949, 1.054)
pt3dadd(-43.693, 229.351, -19.969, 1.084)
pt3dadd(-43.579, 229.384, -19.989, 1.114)
pt3dadd(-43.466, 229.412, -20.013, 1.146)
pt3dadd(-43.354, 229.436, -20.04, 1.182)
pt3dadd(-43.241, 229.46, -20.066, 1.218)
pt3dadd(-43.128, 229.484, -20.093, 1.254)
pt3dadd(-43.014, 229.508, -20.12, 1.288)
pt3dadd(-42.901, 229.525, -20.15, 1.314)
pt3dadd(-42.788, 229.536, -20.182, 1.328)
pt3dadd(-42.676, 229.546, -20.214, 1.342)
pt3dadd(-42.562, 229.556, -20.246, 1.356)
pt3dadd(-42.449, 229.566, -20.278, 1.372)
pt3dadd(-42.34, 229.592, -20.307, 1.382)
pt3dadd(-42.239, 229.652, -20.33, 1.382)
pt3dadd(-42.138, 229.711, -20.352, 1.382)
pt3dadd(-42.037, 229.77, -20.374, 1.382)
pt3dadd(-41.936, 229.83, -20.396, 1.382)
pt3dadd(-41.826, 229.876, -20.4, 1.354)
pt3dadd(-41.717, 229.925, -20.4, 1.324)
pt3dadd(-41.614, 229.985, -20.4, 1.302)
pt3dadd(-41.513, 230.05, -20.401, 1.276)
pt3dadd(-41.442, 230.147, -20.406, 1.228)
pt3dadd(-41.371, 230.24, -20.412, 1.178)
pt3dadd(-41.264, 230.261, -20.456, 1.13)
pt3dadd(-41.159, 230.28, -20.5, 1.08)
pt3dadd(-41.053, 230.3, -20.545, 1.03)
pt3dadd(-40.948, 230.32, -20.589, 0.98)
pt3dadd(-40.832, 230.342, -20.611, 0.98)
pt3dadd(-40.717, 230.366, -20.632, 0.98)
pt3dadd(-40.603, 230.39, -20.654, 0.98)
pt3dadd(-40.488, 230.413, -20.676, 0.98)
pt3dadd(-40.373, 230.437, -20.697, 0.98)
pt3dadd(-40.265, 230.485, -20.7, 1.064)
pt3dadd(-40.148, 230.518, -20.7, 1.126)
pt3dadd(-40.033, 230.55, -20.7, 1.188)
pt3dadd(-39.92, 230.58, -20.72, 1.218)
pt3dadd(-39.81, 230.61, -20.748, 1.236)
pt3dadd(-39.698, 230.639, -20.777, 1.254)
pt3dadd(-39.632, 230.646, -20.859, 1.244)
pt3dadd(-39.569, 230.652, -20.944, 1.232)
pt3dadd(-39.468, 230.688, -20.981, 1.182)
pt3dadd(-39.361, 230.729, -21.011, 1.124)
pt3dadd(-39.254, 230.772, -21.038, 1.06)
pt3dadd(-39.15, 230.825, -21.06, 0.978)
pt3dadd(-39.072, 230.904, -21.04, 0.918)
pt3dadd(-39.005, 230.993, -21.003, 0.868)
pt3dadd(-38.939, 231.082, -20.966, 0.818)
pt3dadd(-38.888, 231.149, -20.899, 0.774)
pt3dadd(-38.845, 231.208, -20.819, 0.732)
pt3dadd(-38.779, 231.288, -20.771, 0.716)
pt3dadd(-38.706, 231.368, -20.731, 0.71)
pt3dadd(-38.605, 231.43, -20.714, 0.762)
pt3dadd(-38.502, 231.487, -20.7, 0.816)
pt3dadd(-38.392, 231.534, -20.7, 0.892)
pt3dadd(-38.281, 231.581, -20.7, 0.97)
pt3dadd(-38.164, 231.606, -20.7, 1.008)
pt3dadd(-38.046, 231.629, -20.7, 1.042)
pt3dadd(-37.927, 231.65, -20.7, 1.076)
pt3dadd(-37.81, 231.673, -20.7, 1.11)
pt3dadd(-37.692, 231.695, -20.7, 1.142)
pt3dadd(-37.574, 231.718, -20.7, 1.176)
pt3dadd(-37.466, 231.763, -20.681, 1.204)
pt3dadd(-37.36, 231.812, -20.659, 1.232)
pt3dadd(-37.253, 231.862, -20.638, 1.258)
pt3dadd(-37.147, 231.91, -20.616, 1.286)
pt3dadd(-37.042, 231.964, -20.6, 1.31)
pt3dadd(-36.942, 232.03, -20.6, 1.324)
pt3dadd(-36.841, 232.096, -20.6, 1.34)
pt3dadd(-36.742, 232.162, -20.6, 1.354)
pt3dadd(-36.641, 232.228, -20.6, 1.37)
pt3dadd(-36.544, 232.297, -20.6, 1.384)
pt3dadd(-36.461, 232.384, -20.6, 1.394)
pt3dadd(-36.377, 232.469, -20.6, 1.404)
pt3dadd(-36.293, 232.555, -20.6, 1.414)
pt3dadd(-36.21, 232.642, -20.6, 1.424)
pt3dadd(-36.124, 232.726, -20.6, 1.458)
pt3dadd(-36.03, 232.8, -20.6, 1.506)
pt3dadd(-35.936, 232.876, -20.6, 1.506)
pt3dadd(-35.838, 232.944, -20.6, 1.5)
pt3dadd(-35.734, 233.003, -20.6, 1.482)
pt3dadd(-35.629, 233.062, -20.6, 1.466)
pt3dadd(-35.561, 233.142, -20.618, 1.438)
pt3dadd(-35.534, 233.25, -20.657, 1.402)
pt3dadd(-35.47, 233.32, -20.695, 1.384)
pt3dadd(-35.362, 233.347, -20.732, 1.392)
pt3dadd(-35.254, 233.376, -20.768, 1.4)
pt3dadd(-35.144, 233.4, -20.805, 1.412)
pt3dadd(-35.032, 233.4, -20.838, 1.454)
pt3dadd(-34.918, 233.4, -20.871, 1.498)
pt3dadd(-34.826, 233.405, -20.933, 1.554)
pt3dadd(-34.742, 233.412, -21.004, 1.616)
pt3dadd(-34.682, 233.484, -21.054, 1.652)
pt3dadd(-34.631, 233.58, -21.097, 1.68)
pt3dadd(-34.524, 233.624, -21.104, 1.652)
pt3dadd(-34.411, 233.665, -21.109, 1.618)
pt3dadd(-34.314, 233.72, -21.139, 1.588)
pt3dadd(-34.224, 233.78, -21.182, 1.556)
pt3dadd(-34.134, 233.842, -21.225, 1.526)
pt3dadd(-34.044, 233.903, -21.268, 1.496)
pt3dadd(-33.986, 233.992, -21.296, 1.448)
pt3dadd(-33.96, 234.107, -21.311, 1.382)
pt3dadd(-33.954, 234.17, -21.396, 1.358)
pt3dadd(-33.948, 234.234, -21.48, 1.334)
pt3dadd(-33.853, 234.24, -21.535, 1.29)
pt3dadd(-33.75, 234.24, -21.585, 1.244)
pt3dadd(-33.636, 234.254, -21.6, 1.19)
pt3dadd(-33.518, 234.275, -21.6, 1.132)
pt3dadd(-33.408, 234.305, -21.6, 1.076)
pt3dadd(-33.37, 234.419, -21.6, 1.032)
pt3dadd(-33.33, 234.533, -21.6, 0.99)
pt3dadd(-33.244, 234.607, -21.6, 0.976)
pt3dadd(-33.142, 234.671, -21.6, 0.97)
pt3dadd(-33.038, 234.733, -21.6, 0.966)
pt3dadd(-32.936, 234.796, -21.6, 0.96)
pt3dadd(-32.834, 234.858, -21.6, 0.956)
pt3dadd(-32.728, 234.908, -21.616, 0.968)
pt3dadd(-32.62, 234.95, -21.639, 0.99)
pt3dadd(-32.512, 234.994, -21.663, 1.012)
pt3dadd(-32.402, 235.037, -21.687, 1.034)
pt3dadd(-32.294, 235.08, -21.711, 1.054)
pt3dadd(-32.203, 235.098, -21.774, 1.082)
pt3dadd(-32.112, 235.115, -21.838, 1.11)
pt3dadd(-32.022, 235.133, -21.901, 1.138)
pt3dadd(-31.931, 235.151, -21.965, 1.164)
pt3dadd(-31.846, 235.192, -22.022, 1.202)
pt3dadd(-31.766, 235.26, -22.071, 1.252)
pt3dadd(-31.687, 235.328, -22.12, 1.302)
pt3dadd(-31.609, 235.397, -22.169, 1.35)
pt3dadd(-31.56, 235.44, -22.2, 1.382)
}
dend_5[10] {pt3dclear()
pt3dadd(-31.56, 235.44, -22.2, 1.382)
pt3dadd(-31.55, 235.446, -22.203, 1.39)
pt3dadd(-31.454, 235.511, -22.229, 1.47)
pt3dadd(-31.375, 235.538, -22.297, 1.47)
pt3dadd(-31.298, 235.559, -22.373, 1.458)
pt3dadd(-31.23, 235.56, -22.455, 1.37)
pt3dadd(-31.163, 235.56, -22.537, 1.276)
pt3dadd(-31.056, 235.56, -22.569, 1.18)
pt3dadd(-30.937, 235.56, -22.586, 1.084)
pt3dadd(-30.82, 235.566, -22.6, 0.992)
pt3dadd(-30.704, 235.598, -22.6, 0.92)
pt3dadd(-30.589, 235.632, -22.6, 0.846)
pt3dadd(-30.472, 235.658, -22.6, 0.796)
pt3dadd(-30.354, 235.68, -22.602, 0.754)
pt3dadd(-30.241, 235.68, -22.635, 0.754)
pt3dadd(-30.128, 235.68, -22.668, 0.754)
pt3dadd(-30.023, 235.685, -22.715, 0.754)
pt3dadd(-29.921, 235.691, -22.768, 0.754)
pt3dadd(-29.839, 235.724, -22.83, 0.77)
pt3dadd(-29.771, 235.778, -22.9, 0.798)
pt3dadd(-29.72, 235.808, -22.986, 0.836)
pt3dadd(-29.674, 235.836, -23.075, 0.874)
pt3dadd(-29.593, 235.88, -23.136, 0.91)
pt3dadd(-29.507, 235.928, -23.193, 0.946)
pt3dadd(-29.419, 235.976, -23.249, 0.982)
pt3dadd(-29.333, 236.026, -23.305, 1.018)
pt3dadd(-29.242, 236.052, -23.365, 1.052)
pt3dadd(-29.148, 236.07, -23.425, 1.086)
pt3dadd(-29.054, 236.088, -23.486, 1.118)
pt3dadd(-28.961, 236.105, -23.547, 1.152)
pt3dadd(-28.87, 236.129, -23.608, 1.186)
}
}
proc shape3d_24() {
dend_5[10] { pt3dadd(-28.79, 236.188, -23.665, 1.23)
pt3dadd(-28.712, 236.246, -23.722, 1.272)
pt3dadd(-28.633, 236.305, -23.78, 1.316)
pt3dadd(-28.555, 236.365, -23.836, 1.36)
pt3dadd(-28.475, 236.432, -23.884, 1.424)
pt3dadd(-28.396, 236.518, -23.91, 1.432)
pt3dadd(-28.318, 236.603, -23.935, 1.43)
pt3dadd(-28.235, 236.678, -23.972, 1.388)
pt3dadd(-28.162, 236.762, -24, 1.348)
pt3dadd(-28.115, 236.873, -24, 1.314)
pt3dadd(-28.068, 236.983, -24, 1.282)
pt3dadd(-28.028, 237.096, -24, 1.24)
pt3dadd(-27.989, 237.21, -24, 1.196)
pt3dadd(-27.959, 237.325, -24.004, 1.17)
pt3dadd(-27.935, 237.443, -24.01, 1.152)
pt3dadd(-27.912, 237.56, -24.015, 1.134)
pt3dadd(-27.888, 237.678, -24.021, 1.116)
pt3dadd(-27.865, 237.796, -24.027, 1.098)
pt3dadd(-27.841, 237.913, -24.033, 1.08)
pt3dadd(-27.84, 238.019, -24.077, 1.058)
pt3dadd(-27.84, 238.124, -24.125, 1.032)
pt3dadd(-27.84, 238.23, -24.172, 1.008)
pt3dadd(-27.84, 238.337, -24.22, 0.984)
pt3dadd(-27.84, 238.442, -24.267, 0.96)
pt3dadd(-27.84, 238.538, -24.326, 0.928)
pt3dadd(-27.827, 238.639, -24.372, 0.904)
pt3dadd(-27.79, 238.751, -24.388, 0.904)
pt3dadd(-27.743, 238.859, -24.4, 0.916)
pt3dadd(-27.661, 238.946, -24.4, 0.976)
pt3dadd(-27.577, 239.029, -24.403, 1.036)
pt3dadd(-27.47, 239.056, -24.443, 1.098)
pt3dadd(-27.371, 239.084, -24.486, 1.162)
pt3dadd(-27.344, 239.131, -24.576, 1.224)
pt3dadd(-27.314, 239.18, -24.663, 1.282)
pt3dadd(-27.263, 239.244, -24.736, 1.288)
pt3dadd(-27.211, 239.309, -24.808, 1.294)
pt3dadd(-27.16, 239.374, -24.881, 1.3)
pt3dadd(-27.108, 239.437, -24.954, 1.306)
pt3dadd(-27.064, 239.521, -25.014, 1.234)
pt3dadd(-27.018, 239.596, -25.083, 1.178)
pt3dadd(-26.984, 239.654, -25.164, 1.126)
pt3dadd(-26.958, 239.701, -25.253, 1.076)
pt3dadd(-26.88, 239.742, -25.298, 1.012)
pt3dadd(-26.764, 239.76, -25.315, 0.954)
pt3dadd(-26.668, 239.76, -25.371, 0.954)
pt3dadd(-26.593, 239.76, -25.449, 0.976)
pt3dadd(-26.492, 239.784, -25.498, 0.934)
pt3dadd(-26.413, 239.855, -25.535, 0.828)
pt3dadd(-26.4, 239.942, -25.602, 0.778)
pt3dadd(-26.4, 240.024, -25.675, 0.85)
pt3dadd(-26.4, 240.116, -25.738, 0.946)
pt3dadd(-26.4, 240.217, -25.791, 0.98)
pt3dadd(-26.398, 240.314, -25.848, 0.98)
pt3dadd(-26.395, 240.41, -25.909, 0.98)
pt3dadd(-26.393, 240.505, -25.97, 0.98)
pt3dadd(-26.39, 240.6, -26.031, 0.98)
pt3dadd(-26.387, 240.695, -26.092, 0.98)
pt3dadd(-26.345, 240.769, -26.161, 0.98)
pt3dadd(-26.296, 240.84, -26.231, 0.98)
pt3dadd(-26.248, 240.911, -26.301, 0.98)
pt3dadd(-26.198, 240.982, -26.371, 0.98)
pt3dadd(-26.138, 241.062, -26.423, 0.974)
pt3dadd(-26.074, 241.147, -26.469, 0.968)
pt3dadd(-26.009, 241.231, -26.515, 0.962)
pt3dadd(-25.944, 241.316, -26.561, 0.956)
pt3dadd(-25.907, 241.4, -26.622, 0.904)
pt3dadd(-25.812, 241.444, -26.671, 0.862)
pt3dadd(-25.716, 241.484, -26.721, 0.826)
pt3dadd(-25.62, 241.51, -26.777, 0.81)
pt3dadd(-25.524, 241.535, -26.833, 0.794)
pt3dadd(-25.428, 241.56, -26.888, 0.778)
pt3dadd(-25.309, 241.56, -26.906, 0.788)
pt3dadd(-25.192, 241.56, -26.923, 0.798)
pt3dadd(-25.075, 241.567, -26.946, 0.818)
pt3dadd(-24.962, 241.586, -26.977, 0.852)
pt3dadd(-24.858, 241.619, -27.01, 0.894)
pt3dadd(-24.776, 241.693, -27.047, 0.95)
pt3dadd(-24.731, 241.788, -27.08, 0.99)
pt3dadd(-24.725, 241.903, -27.109, 1.012)
pt3dadd(-24.715, 242.015, -27.141, 1.036)
pt3dadd(-24.684, 242.111, -27.195, 1.076)
pt3dadd(-24.632, 242.201, -27.245, 1.118)
pt3dadd(-24.578, 242.292, -27.29, 1.166)
pt3dadd(-24.508, 242.389, -27.295, 1.25)
pt3dadd(-24.434, 242.484, -27.3, 1.336)
pt3dadd(-24.331, 242.544, -27.3, 1.44)
pt3dadd(-24.228, 242.605, -27.3, 1.542)
pt3dadd(-24.138, 242.683, -27.3, 1.648)
pt3dadd(-24.049, 242.765, -27.3, 1.754)
pt3dadd(-23.971, 242.856, -27.301, 1.858)
pt3dadd(-23.89, 242.93, -27.338, 1.83)
pt3dadd(-23.803, 242.988, -27.381, 1.792)
pt3dadd(-23.707, 242.993, -27.441, 1.73)
pt3dadd(-23.611, 242.998, -27.501, 1.666)
pt3dadd(-23.552, 243.002, -27.579, 1.6)
pt3dadd(-23.537, 243.007, -27.678, 1.532)
pt3dadd(-23.522, 243.012, -27.777, 1.464)
pt3dadd(-23.503, 243.108, -27.825, 1.408)
pt3dadd(-23.484, 243.216, -27.866, 1.352)
pt3dadd(-23.452, 243.314, -27.905, 1.298)
pt3dadd(-23.351, 243.365, -27.941, 1.244)
pt3dadd(-23.26, 243.42, -27.983, 1.198)
pt3dadd(-23.191, 243.49, -28.041, 1.178)
pt3dadd(-23.122, 243.559, -28.099, 1.156)
pt3dadd(-23.06, 243.58, -28.183, 1.156)
pt3dadd(-22.999, 243.6, -28.267, 1.156)
pt3dadd(-22.932, 243.604, -28.35, 1.176)
pt3dadd(-22.864, 243.607, -28.432, 1.198)
pt3dadd(-22.795, 243.611, -28.514, 1.22)
pt3dadd(-22.71, 243.641, -28.567, 1.256)
pt3dadd(-22.607, 243.695, -28.59, 1.308)
pt3dadd(-22.53, 243.779, -28.6, 1.344)
pt3dadd(-22.477, 243.887, -28.6, 1.366)
pt3dadd(-22.423, 243.994, -28.6, 1.378)
pt3dadd(-22.369, 244.102, -28.6, 1.366)
pt3dadd(-22.316, 244.208, -28.6, 1.354)
pt3dadd(-22.262, 244.315, -28.6, 1.332)
pt3dadd(-22.208, 244.423, -28.6, 1.31)
pt3dadd(-22.2, 244.538, -28.617, 1.306)
pt3dadd(-22.19, 244.652, -28.639, 1.308)
pt3dadd(-22.122, 244.735, -28.684, 1.322)
pt3dadd(-22.039, 244.796, -28.726, 1.326)
pt3dadd(-21.932, 244.824, -28.765, 1.314)
pt3dadd(-21.832, 244.87, -28.791, 1.286)
pt3dadd(-21.74, 244.949, -28.796, 1.238)
pt3dadd(-21.641, 245.005, -28.8, 1.184)
pt3dadd(-21.521, 245.02, -28.8, 1.118)
pt3dadd(-21.402, 245.035, -28.8, 1.052)
pt3dadd(-21.282, 245.04, -28.8, 0.948)
pt3dadd(-21.163, 245.044, -28.808, 0.878)
pt3dadd(-21.044, 245.048, -28.821, 0.84)
pt3dadd(-20.927, 245.056, -28.836, 0.802)
pt3dadd(-20.828, 245.1, -28.881, 0.782)
pt3dadd(-20.731, 245.143, -28.927, 0.762)
pt3dadd(-20.677, 245.16, -29.004, 0.734)
pt3dadd(-20.651, 245.16, -29.101, 0.704)
pt3dadd(-20.616, 245.16, -29.192, 0.678)
pt3dadd(-20.503, 245.16, -29.228, 0.67)
pt3dadd(-20.392, 245.16, -29.264, 0.662)
pt3dadd(-20.28, 245.16, -29.3, 0.652)
pt3dadd(-20.16, 245.16, -29.304, 0.67)
pt3dadd(-20.04, 245.16, -29.308, 0.688)
pt3dadd(-19.925, 245.16, -29.32, 0.706)
pt3dadd(-19.854, 245.16, -29.401, 0.742)
pt3dadd(-19.783, 245.16, -29.482, 0.778)
pt3dadd(-19.712, 245.16, -29.562, 0.812)
pt3dadd(-19.654, 245.164, -29.649, 0.848)
pt3dadd(-19.606, 245.17, -29.74, 0.882)
pt3dadd(-19.568, 245.196, -29.828, 0.904)
pt3dadd(-19.555, 245.262, -29.911, 0.904)
pt3dadd(-19.511, 245.321, -29.972, 0.888)
pt3dadd(-19.402, 245.366, -29.988, 0.84)
pt3dadd(-19.291, 245.41, -30.004, 0.804)
pt3dadd(-19.178, 245.447, -30.02, 0.804)
pt3dadd(-19.069, 245.482, -30.041, 0.808)
pt3dadd(-18.974, 245.492, -30.102, 0.84)
pt3dadd(-18.881, 245.504, -30.164, 0.872)
pt3dadd(-18.787, 245.515, -30.226, 0.904)
pt3dadd(-18.694, 245.527, -30.287, 0.936)
pt3dadd(-18.607, 245.557, -30.349, 0.988)
pt3dadd(-18.533, 245.612, -30.412, 1.068)
pt3dadd(-18.457, 245.669, -30.475, 1.148)
pt3dadd(-18.382, 245.724, -30.537, 1.228)
pt3dadd(-18.313, 245.782, -30.603, 1.306)
pt3dadd(-18.254, 245.844, -30.673, 1.38)
pt3dadd(-18.196, 245.905, -30.744, 1.454)
pt3dadd(-18.137, 245.968, -30.814, 1.528)
pt3dadd(-18.074, 246.035, -30.874, 1.624)
pt3dadd(-17.998, 246.122, -30.9, 1.784)
pt3dadd(-17.928, 246.22, -30.905, 1.858)
pt3dadd(-17.857, 246.316, -30.911, 1.93)
pt3dadd(-17.788, 246.34, -30.988, 2.008)
pt3dadd(-17.719, 246.36, -31.068, 2.084)
pt3dadd(-17.62, 246.36, -31.124, 2.132)
pt3dadd(-17.521, 246.36, -31.181, 2.178)
pt3dadd(-17.412, 246.36, -31.222, 2.138)
pt3dadd(-17.302, 246.36, -31.261, 2.082)
pt3dadd(-17.197, 246.377, -31.306, 2.024)
pt3dadd(-17.098, 246.407, -31.356, 1.962)
pt3dadd(-16.998, 246.437, -31.406, 1.9)
pt3dadd(-16.9, 246.467, -31.457, 1.836)
pt3dadd(-16.799, 246.499, -31.503, 1.774)
pt3dadd(-16.691, 246.545, -31.524, 1.71)
pt3dadd(-16.583, 246.59, -31.546, 1.646)
pt3dadd(-16.475, 246.636, -31.567, 1.582)
pt3dadd(-16.367, 246.682, -31.588, 1.518)
pt3dadd(-16.261, 246.721, -31.62, 1.47)
pt3dadd(-16.159, 246.755, -31.665, 1.44)
pt3dadd(-16.057, 246.787, -31.71, 1.412)
pt3dadd(-15.955, 246.821, -31.755, 1.384)
pt3dadd(-15.853, 246.853, -31.8, 1.356)
pt3dadd(-15.74, 246.883, -31.822, 1.352)
pt3dadd(-15.626, 246.912, -31.845, 1.346)
pt3dadd(-15.514, 246.942, -31.867, 1.34)
pt3dadd(-15.401, 246.971, -31.89, 1.336)
pt3dadd(-15.288, 247.001, -31.912, 1.33)
pt3dadd(-15.176, 247.039, -31.93, 1.33)
pt3dadd(-15.065, 247.078, -31.948, 1.33)
pt3dadd(-14.952, 247.116, -31.967, 1.33)
pt3dadd(-14.84, 247.154, -31.985, 1.33)
}
}
proc shape3d_25() {
dend_5[10] { pt3dadd(-14.731, 247.19, -32.007, 1.33)
pt3dadd(-14.628, 247.218, -32.054, 1.318)
pt3dadd(-14.525, 247.243, -32.1, 1.308)
pt3dadd(-14.422, 247.271, -32.147, 1.296)
pt3dadd(-14.32, 247.297, -32.193, 1.286)
pt3dadd(-14.222, 247.308, -32.25, 1.268)
pt3dadd(-14.13, 247.312, -32.314, 1.248)
pt3dadd(-14.038, 247.314, -32.377, 1.226)
pt3dadd(-13.945, 247.316, -32.441, 1.206)
pt3dadd(-13.852, 247.319, -32.505, 1.186)
pt3dadd(-13.758, 247.361, -32.551, 1.162)
pt3dadd(-13.663, 247.417, -32.59, 1.14)
pt3dadd(-13.57, 247.475, -32.63, 1.116)
pt3dadd(-13.475, 247.531, -32.669, 1.092)
pt3dadd(-13.37, 247.572, -32.7, 1.07)
pt3dadd(-13.255, 247.595, -32.721, 1.05)
pt3dadd(-13.14, 247.619, -32.743, 1.03)
pt3dadd(-13.026, 247.642, -32.765, 1.012)
pt3dadd(-12.911, 247.666, -32.787, 0.992)
pt3dadd(-12.799, 247.7, -32.8, 0.972)
pt3dadd(-12.692, 247.754, -32.8, 0.956)
pt3dadd(-12.576, 247.776, -32.817, 0.954)
pt3dadd(-12.46, 247.793, -32.837, 0.954)
pt3dadd(-12.362, 247.804, -32.886, 0.962)
pt3dadd(-12.278, 247.811, -32.957, 0.974)
pt3dadd(-12.187, 247.853, -32.992, 0.98)
pt3dadd(-12.09, 247.922, -32.997, 0.98)
pt3dadd(-12.016, 248.008, -33.017, 0.98)
pt3dadd(-11.966, 248.108, -33.053, 0.98)
pt3dadd(-11.902, 248.2, -33.088, 0.982)
pt3dadd(-11.828, 248.285, -33.122, 0.988)
pt3dadd(-11.755, 248.371, -33.157, 0.994)
pt3dadd(-11.682, 248.456, -33.191, 1)
pt3dadd(-11.64, 248.554, -33.226, 1.004)
pt3dadd(-11.64, 248.665, -33.262, 1.004)
pt3dadd(-11.608, 248.778, -33.28, 0.994)
pt3dadd(-11.569, 248.89, -33.296, 0.982)
pt3dadd(-11.504, 248.989, -33.3, 0.936)
pt3dadd(-11.43, 249.083, -33.3, 0.878)
pt3dadd(-11.333, 249.148, -33.3, 0.828)
pt3dadd(-11.222, 249.194, -33.3, 0.784)
pt3dadd(-11.112, 249.229, -33.311, 0.742)
pt3dadd(-10.999, 249.234, -33.345, 0.71)
pt3dadd(-10.886, 249.24, -33.379, 0.678)
pt3dadd(-10.769, 249.24, -33.4, 0.688)
pt3dadd(-10.651, 249.24, -33.42, 0.696)
pt3dadd(-10.534, 249.24, -33.441, 0.704)
pt3dadd(-10.417, 249.24, -33.462, 0.712)
pt3dadd(-10.3, 249.24, -33.483, 0.72)
pt3dadd(-10.182, 249.242, -33.5, 0.73)
pt3dadd(-10.063, 249.263, -33.5, 0.742)
pt3dadd(-9.944, 249.282, -33.5, 0.754)
pt3dadd(-9.827, 249.302, -33.5, 0.768)
pt3dadd(-9.708, 249.322, -33.5, 0.78)
pt3dadd(-9.59, 249.342, -33.5, 0.792)
pt3dadd(-9.472, 249.36, -33.5, 0.804)
pt3dadd(-9.352, 249.36, -33.5, 0.82)
pt3dadd(-9.232, 249.36, -33.5, 0.834)
pt3dadd(-9.112, 249.36, -33.5, 0.848)
pt3dadd(-8.992, 249.36, -33.5, 0.862)
pt3dadd(-8.872, 249.36, -33.5, 0.876)
pt3dadd(-8.752, 249.36, -33.5, 0.89)
pt3dadd(-8.632, 249.361, -33.5, 0.904)
pt3dadd(-8.513, 249.382, -33.5, 0.908)
pt3dadd(-8.395, 249.401, -33.5, 0.912)
pt3dadd(-8.276, 249.42, -33.5, 0.916)
pt3dadd(-8.158, 249.44, -33.5, 0.92)
pt3dadd(-8.04, 249.46, -33.5, 0.926)
pt3dadd(-7.921, 249.48, -33.5, 0.93)
pt3dadd(-7.806, 249.503, -33.519, 0.92)
pt3dadd(-7.691, 249.526, -33.538, 0.91)
pt3dadd(-7.574, 249.548, -33.558, 0.9)
pt3dadd(-7.459, 249.572, -33.577, 0.89)
pt3dadd(-7.344, 249.595, -33.596, 0.88)
pt3dadd(-7.229, 249.618, -33.615, 0.872)
pt3dadd(-7.112, 249.641, -33.634, 0.862)
pt3dadd(-6.997, 249.665, -33.654, 0.852)
pt3dadd(-6.882, 249.688, -33.673, 0.842)
pt3dadd(-6.767, 249.71, -33.692, 0.832)
pt3dadd(-6.652, 249.734, -33.713, 0.832)
pt3dadd(-6.536, 249.757, -33.735, 0.836)
pt3dadd(-6.422, 249.781, -33.756, 0.842)
pt3dadd(-6.307, 249.804, -33.778, 0.846)
pt3dadd(-6.192, 249.828, -33.8, 0.852)
pt3dadd(-6.076, 249.84, -33.818, 0.862)
pt3dadd(-5.957, 249.84, -33.833, 0.878)
pt3dadd(-5.838, 249.84, -33.847, 0.894)
pt3dadd(-5.719, 249.84, -33.861, 0.91)
pt3dadd(-5.6, 249.84, -33.876, 0.926)
pt3dadd(-5.482, 249.84, -33.89, 0.942)
pt3dadd(-5.363, 249.84, -33.9, 0.97)
pt3dadd(-5.244, 249.842, -33.909, 1)
pt3dadd(-5.13, 249.847, -33.938, 0.99)
pt3dadd(-5.015, 249.853, -33.966, 0.98)
pt3dadd(-4.91, 249.907, -33.983, 0.952)
pt3dadd(-4.805, 249.962, -34, 0.924)
pt3dadd(-4.717, 250.015, -34.036, 0.896)
pt3dadd(-4.666, 250.067, -34.116, 0.868)
pt3dadd(-4.606, 250.14, -34.164, 0.854)
pt3dadd(-4.535, 250.236, -34.181, 0.854)
pt3dadd(-4.465, 250.331, -34.198, 0.854)
pt3dadd(-4.402, 250.405, -34.236, 0.866)
pt3dadd(-4.356, 250.424, -34.327, 0.916)
pt3dadd(-4.316, 250.44, -34.42, 0.964)
pt3dadd(-4.296, 250.44, -34.518, 1.012)
pt3dadd(-4.276, 250.44, -34.617, 1.06)
pt3dadd(-4.202, 250.464, -34.673, 1.11)
pt3dadd(-4.094, 250.505, -34.701, 1.162)
pt3dadd(-3.988, 250.532, -34.739, 1.172)
pt3dadd(-3.882, 250.553, -34.783, 1.16)
pt3dadd(-3.775, 250.56, -34.827, 1.114)
pt3dadd(-3.667, 250.56, -34.872, 1.046)
pt3dadd(-3.56, 250.56, -34.917, 0.98)
pt3dadd(-3.454, 250.56, -34.961, 0.912)
pt3dadd(-3.341, 250.594, -34.98, 0.852)
pt3dadd(-3.229, 250.631, -34.996, 0.794)
pt3dadd(-3.124, 250.686, -35, 0.752)
pt3dadd(-3.019, 250.746, -35, 0.718)
pt3dadd(-2.918, 250.811, -35, 0.69)
pt3dadd(-2.82, 250.879, -35, 0.666)
pt3dadd(-2.72, 250.945, -35, 0.646)
pt3dadd(-2.618, 251.01, -35, 0.628)
pt3dadd(-2.53, 251.09, -35, 0.616)
pt3dadd(-2.442, 251.172, -35, 0.604)
pt3dadd(-2.338, 251.225, -35.018, 0.614)
pt3dadd(-2.231, 251.273, -35.041, 0.626)
pt3dadd(-2.149, 251.297, -35.107, 0.638)
pt3dadd(-2.074, 251.317, -35.182, 0.652)
pt3dadd(-1.968, 251.357, -35.215, 0.676)
pt3dadd(-1.86, 251.398, -35.243, 0.702)
pt3dadd(-1.76, 251.425, -35.293, 0.714)
pt3dadd(-1.662, 251.452, -35.346, 0.724)
pt3dadd(-1.564, 251.479, -35.398, 0.736)
pt3dadd(-1.465, 251.506, -35.45, 0.748)
pt3dadd(-1.382, 251.52, -35.518, 0.778)
pt3dadd(-1.319, 251.52, -35.602, 0.83)
pt3dadd(-1.258, 251.54, -35.687, 0.868)
pt3dadd(-1.194, 251.563, -35.768, 0.906)
pt3dadd(-1.093, 251.623, -35.785, 0.944)
pt3dadd(-0.992, 251.687, -35.8, 0.98)
pt3dadd(-0.905, 251.768, -35.8, 0.992)
pt3dadd(-0.817, 251.85, -35.8, 1.004)
pt3dadd(-0.749, 251.948, -35.8, 0.994)
pt3dadd(-0.68, 252.048, -35.8, 0.982)
pt3dadd(-0.598, 252.134, -35.8, 0.962)
pt3dadd(-0.512, 252.217, -35.8, 0.942)
pt3dadd(-0.426, 252.301, -35.8, 0.922)
pt3dadd(-0.34, 252.384, -35.8, 0.902)
pt3dadd(-0.253, 252.468, -35.8, 0.882)
pt3dadd(-0.142, 252.505, -35.8, 0.868)
pt3dadd(-0.025, 252.535, -35.8, 0.854)
pt3dadd(0.091, 252.566, -35.8, 0.842)
pt3dadd(0.208, 252.596, -35.8, 0.828)
pt3dadd(0.324, 252.626, -35.8, 0.816)
pt3dadd(0.437, 252.661, -35.8, 0.802)
pt3dadd(0.528, 252.739, -35.8, 0.786)
pt3dadd(0.619, 252.817, -35.8, 0.772)
pt3dadd(0.71, 252.895, -35.8, 0.756)
pt3dadd(0.802, 252.973, -35.8, 0.742)
pt3dadd(0.89, 253.05, -35.807, 0.728)
pt3dadd(0.97, 253.118, -35.856, 0.728)
pt3dadd(1.049, 253.188, -35.905, 0.728)
pt3dadd(1.127, 253.256, -35.954, 0.728)
pt3dadd(1.204, 253.327, -36.004, 0.73)
pt3dadd(1.255, 253.418, -36.051, 0.742)
pt3dadd(1.306, 253.511, -36.099, 0.754)
pt3dadd(1.357, 253.603, -36.147, 0.766)
pt3dadd(1.408, 253.696, -36.194, 0.776)
pt3dadd(1.49, 253.76, -36.241, 0.8)
pt3dadd(1.578, 253.822, -36.286, 0.824)
pt3dadd(1.666, 253.884, -36.332, 0.848)
pt3dadd(1.753, 253.945, -36.378, 0.874)
pt3dadd(1.838, 254.022, -36.4, 0.93)
pt3dadd(1.937, 254.089, -36.4, 0.93)
pt3dadd(2.036, 254.158, -36.4, 0.93)
pt3dadd(2.122, 254.242, -36.4, 0.92)
pt3dadd(2.207, 254.327, -36.4, 0.912)
pt3dadd(2.286, 254.414, -36.4, 0.904)
pt3dadd(2.333, 254.525, -36.4, 0.904)
pt3dadd(2.38, 254.636, -36.4, 0.904)
pt3dadd(2.419, 254.747, -36.416, 0.892)
pt3dadd(2.458, 254.858, -36.435, 0.878)
pt3dadd(2.496, 254.97, -36.455, 0.862)
pt3dadd(2.52, 255.072, -36.492, 0.84)
pt3dadd(2.52, 255.161, -36.56, 0.806)
pt3dadd(2.525, 255.238, -36.634, 0.772)
pt3dadd(2.544, 255.283, -36.725, 0.748)
pt3dadd(2.572, 255.324, -36.814, 0.732)
pt3dadd(2.64, 255.344, -36.895, 0.758)
pt3dadd(2.717, 255.36, -36.969, 0.792)
pt3dadd(2.815, 255.36, -37.026, 0.85)
pt3dadd(2.914, 255.364, -37.082, 0.906)
pt3dadd(3.006, 255.412, -37.132, 0.936)
pt3dadd(3.098, 255.46, -37.182, 0.966)
pt3dadd(3.19, 255.508, -37.233, 0.996)
pt3dadd(3.282, 255.554, -37.283, 1.026)
pt3dadd(3.382, 255.601, -37.322, 1.076)
pt3dadd(3.472, 255.661, -37.365, 1.062)
pt3dadd(3.553, 255.733, -37.406, 1.046)
pt3dadd(3.624, 255.818, -37.444, 1.03)
}
}
proc shape3d_26() {
dend_5[10] { pt3dadd(3.696, 255.902, -37.481, 1.014)
pt3dadd(3.757, 255.949, -37.544, 0.998)
pt3dadd(3.805, 255.956, -37.636, 0.988)
pt3dadd(3.869, 255.966, -37.717, 0.98)
pt3dadd(3.965, 255.986, -37.774, 0.98)
pt3dadd(4.048, 256.031, -37.826, 0.97)
pt3dadd(4.108, 256.122, -37.87, 0.942)
pt3dadd(4.187, 256.198, -37.906, 0.906)
pt3dadd(4.28, 256.262, -37.936, 0.866)
pt3dadd(4.363, 256.306, -37.995, 0.832)
pt3dadd(4.441, 256.339, -38.065, 0.804)
pt3dadd(4.519, 256.374, -38.136, 0.774)
pt3dadd(4.597, 256.408, -38.206, 0.744)
pt3dadd(4.668, 256.436, -38.283, 0.676)
pt3dadd(4.736, 256.445, -38.364, 0.634)
pt3dadd(4.807, 256.452, -38.445, 0.61)
pt3dadd(4.895, 256.486, -38.504, 0.626)
pt3dadd(4.988, 256.53, -38.554, 0.656)
pt3dadd(5.09, 256.56, -38.59, 0.688)
pt3dadd(5.21, 256.56, -38.594, 0.724)
pt3dadd(5.33, 256.56, -38.598, 0.758)
pt3dadd(5.43, 256.601, -38.6, 0.79)
pt3dadd(5.501, 256.697, -38.6, 0.818)
pt3dadd(5.572, 256.794, -38.6, 0.846)
pt3dadd(5.641, 256.891, -38.6, 0.874)
pt3dadd(5.728, 256.975, -38.6, 0.878)
pt3dadd(5.815, 257.057, -38.6, 0.878)
pt3dadd(5.903, 257.138, -38.6, 0.87)
pt3dadd(5.99, 257.22, -38.6, 0.858)
pt3dadd(6.084, 257.294, -38.61, 0.854)
pt3dadd(6.18, 257.363, -38.627, 0.854)
pt3dadd(6.282, 257.39, -38.664, 0.868)
pt3dadd(6.389, 257.398, -38.71, 0.892)
pt3dadd(6.499, 257.4, -38.746, 0.906)
pt3dadd(6.616, 257.4, -38.771, 0.91)
pt3dadd(6.732, 257.4, -38.797, 0.916)
pt3dadd(6.848, 257.4, -38.822, 0.92)
pt3dadd(6.964, 257.4, -38.847, 0.924)
pt3dadd(7.08, 257.4, -38.872, 0.928)
pt3dadd(7.188, 257.4, -38.914, 0.926)
pt3dadd(7.294, 257.4, -38.962, 0.92)
pt3dadd(7.399, 257.4, -39.009, 0.916)
pt3dadd(7.506, 257.4, -39.056, 0.91)
pt3dadd(7.612, 257.4, -39.103, 0.906)
pt3dadd(7.708, 257.418, -39.159, 0.89)
pt3dadd(7.796, 257.449, -39.221, 0.866)
pt3dadd(7.886, 257.48, -39.283, 0.844)
pt3dadd(7.975, 257.51, -39.344, 0.82)
pt3dadd(8.04, 257.543, -39.415, 0.778)
pt3dadd(8.075, 257.58, -39.499, 0.716)
pt3dadd(8.149, 257.626, -39.567, 0.686)
pt3dadd(8.244, 257.681, -39.591, 0.682)
pt3dadd(8.348, 257.741, -39.594, 0.69)
pt3dadd(8.453, 257.8, -39.597, 0.696)
pt3dadd(8.55, 257.864, -39.601, 0.706)
pt3dadd(8.592, 257.977, -39.605, 0.728)
pt3dadd(8.634, 258.09, -39.61, 0.75)
pt3dadd(8.657, 258.164, -39.679, 0.776)
pt3dadd(8.677, 258.234, -39.759, 0.802)
pt3dadd(8.767, 258.246, -39.82, 0.792)
pt3dadd(8.864, 258.252, -39.879, 0.78)
pt3dadd(8.974, 258.288, -39.893, 0.76)
pt3dadd(9.086, 258.33, -39.898, 0.738)
pt3dadd(9.202, 258.354, -39.91, 0.726)
pt3dadd(9.319, 258.366, -39.928, 0.72)
pt3dadd(9.437, 258.378, -39.946, 0.716)
pt3dadd(9.554, 258.389, -39.964, 0.712)
pt3dadd(9.671, 258.401, -39.982, 0.708)
pt3dadd(9.788, 258.414, -40, 0.704)
pt3dadd(9.89, 258.476, -40, 0.714)
pt3dadd(9.992, 258.54, -40, 0.722)
pt3dadd(10.096, 258.602, -40, 0.732)
pt3dadd(10.198, 258.666, -40, 0.742)
pt3dadd(10.3, 258.728, -40, 0.752)
pt3dadd(10.412, 258.752, -40.024, 0.758)
pt3dadd(10.526, 258.774, -40.051, 0.762)
pt3dadd(10.64, 258.796, -40.077, 0.768)
pt3dadd(10.753, 258.816, -40.104, 0.772)
pt3dadd(10.867, 258.838, -40.13, 0.778)
pt3dadd(10.973, 258.84, -40.177, 0.788)
pt3dadd(11.076, 258.84, -40.227, 0.796)
pt3dadd(11.18, 258.84, -40.277, 0.806)
pt3dadd(11.285, 258.84, -40.327, 0.816)
pt3dadd(11.388, 258.84, -40.377, 0.826)
pt3dadd(11.504, 258.84, -40.39, 0.838)
pt3dadd(11.624, 258.84, -40.392, 0.848)
pt3dadd(11.744, 258.84, -40.393, 0.858)
pt3dadd(11.864, 258.84, -40.395, 0.87)
pt3dadd(11.984, 258.84, -40.397, 0.88)
pt3dadd(12.104, 258.84, -40.398, 0.892)
pt3dadd(12.224, 258.84, -40.4, 0.902)
pt3dadd(12.344, 258.84, -40.4, 0.922)
pt3dadd(12.464, 258.84, -40.4, 0.944)
pt3dadd(12.584, 258.84, -40.4, 0.966)
pt3dadd(12.704, 258.84, -40.4, 0.988)
pt3dadd(12.824, 258.84, -40.4, 1.008)
pt3dadd(12.944, 258.84, -40.4, 1.03)
pt3dadd(13.064, 258.84, -40.4, 1.052)
pt3dadd(13.184, 258.84, -40.4, 1.076)
pt3dadd(13.304, 258.84, -40.4, 1.102)
pt3dadd(13.423, 258.84, -40.411, 1.08)
pt3dadd(13.543, 258.84, -40.423, 1.052)
pt3dadd(13.655, 258.845, -40.446, 1.008)
pt3dadd(13.733, 258.874, -40.518, 0.886)
pt3dadd(13.792, 258.92, -40.588, 0.762)
pt3dadd(13.805, 259.009, -40.655, 0.636)
pt3dadd(13.836, 259.044, -40.72, 0.52)
pt3dadd(13.904, 258.976, -40.78, 0.422)
pt3dadd(13.972, 258.908, -40.84, 0.324)
pt3dadd(14.04, 258.84, -40.9, 0.226)
}
dend_5[11] {pt3dclear()
pt3dadd(-31.56, 235.44, -22.2, 1.382)
pt3dadd(-31.582, 235.456, -22.2, 1.4)
pt3dadd(-31.678, 235.528, -22.2, 1.486)
pt3dadd(-31.774, 235.6, -22.2, 1.57)
pt3dadd(-31.87, 235.672, -22.2, 1.656)
pt3dadd(-31.966, 235.744, -22.2, 1.742)
pt3dadd(-32.028, 235.824, -22.2, 1.792)
pt3dadd(-31.975, 235.931, -22.2, 1.714)
pt3dadd(-31.921, 236.039, -22.2, 1.638)
pt3dadd(-31.867, 236.146, -22.2, 1.56)
pt3dadd(-31.814, 236.254, -22.2, 1.484)
pt3dadd(-31.76, 236.36, -22.2, 1.406)
pt3dadd(-31.718, 236.473, -22.2, 1.346)
pt3dadd(-31.678, 236.586, -22.2, 1.286)
pt3dadd(-31.636, 236.698, -22.2, 1.226)
pt3dadd(-31.594, 236.81, -22.2, 1.166)
pt3dadd(-31.553, 236.923, -22.2, 1.106)
pt3dadd(-31.492, 237.025, -22.2, 1.052)
pt3dadd(-31.417, 237.119, -22.2, 1.002)
pt3dadd(-31.343, 237.212, -22.2, 0.952)
pt3dadd(-31.267, 237.306, -22.2, 0.9)
pt3dadd(-31.193, 237.401, -22.2, 0.85)
pt3dadd(-31.124, 237.499, -22.2, 0.818)
pt3dadd(-31.061, 237.601, -22.2, 0.798)
pt3dadd(-30.998, 237.703, -22.2, 0.778)
pt3dadd(-30.936, 237.805, -22.2, 0.758)
pt3dadd(-30.872, 237.907, -22.2, 0.738)
pt3dadd(-30.792, 237.994, -22.2, 0.728)
pt3dadd(-30.695, 238.062, -22.2, 0.728)
pt3dadd(-30.596, 238.132, -22.2, 0.728)
pt3dadd(-30.498, 238.2, -22.2, 0.728)
pt3dadd(-30.4, 238.27, -22.2, 0.728)
pt3dadd(-30.304, 238.342, -22.2, 0.73)
pt3dadd(-30.21, 238.416, -22.2, 0.736)
pt3dadd(-30.116, 238.492, -22.2, 0.74)
pt3dadd(-30.023, 238.566, -22.2, 0.746)
pt3dadd(-29.929, 238.642, -22.2, 0.75)
pt3dadd(-29.836, 238.717, -22.2, 0.754)
pt3dadd(-29.744, 238.795, -22.2, 0.754)
pt3dadd(-29.653, 238.873, -22.2, 0.754)
pt3dadd(-29.562, 238.951, -22.2, 0.754)
pt3dadd(-29.471, 239.029, -22.2, 0.754)
pt3dadd(-29.382, 239.107, -22.188, 0.754)
pt3dadd(-29.297, 239.186, -22.165, 0.754)
pt3dadd(-29.212, 239.267, -22.142, 0.754)
pt3dadd(-29.125, 239.346, -22.119, 0.754)
pt3dadd(-29.039, 239.424, -22.1, 0.754)
pt3dadd(-28.943, 239.496, -22.1, 0.754)
pt3dadd(-28.847, 239.568, -22.1, 0.754)
pt3dadd(-28.751, 239.64, -22.1, 0.754)
pt3dadd(-28.655, 239.712, -22.1, 0.754)
pt3dadd(-28.559, 239.785, -22.098, 0.752)
pt3dadd(-28.469, 239.861, -22.083, 0.746)
pt3dadd(-28.378, 239.938, -22.068, 0.742)
pt3dadd(-28.286, 240.014, -22.054, 0.736)
pt3dadd(-28.195, 240.09, -22.039, 0.73)
pt3dadd(-28.106, 240.17, -22.029, 0.726)
pt3dadd(-28.019, 240.252, -22.022, 0.72)
pt3dadd(-27.932, 240.334, -22.015, 0.714)
pt3dadd(-27.845, 240.415, -22.008, 0.708)
pt3dadd(-27.757, 240.497, -22.001, 0.704)
pt3dadd(-27.685, 240.593, -22, 0.698)
pt3dadd(-27.617, 240.691, -22, 0.694)
pt3dadd(-27.547, 240.79, -22, 0.688)
pt3dadd(-27.479, 240.887, -22, 0.684)
pt3dadd(-27.409, 240.985, -22, 0.678)
pt3dadd(-27.328, 241.069, -21.983, 0.682)
pt3dadd(-27.242, 241.151, -21.963, 0.688)
pt3dadd(-27.158, 241.232, -21.942, 0.694)
pt3dadd(-27.073, 241.314, -21.922, 0.7)
pt3dadd(-26.989, 241.398, -21.91, 0.706)
pt3dadd(-26.904, 241.482, -21.908, 0.71)
pt3dadd(-26.819, 241.567, -21.905, 0.716)
pt3dadd(-26.735, 241.652, -21.903, 0.72)
pt3dadd(-26.65, 241.738, -21.901, 0.726)
pt3dadd(-26.568, 241.824, -21.9, 0.732)
pt3dadd(-26.486, 241.913, -21.9, 0.736)
pt3dadd(-26.406, 242.002, -21.9, 0.742)
pt3dadd(-26.324, 242.09, -21.9, 0.746)
pt3dadd(-26.244, 242.179, -21.9, 0.752)
pt3dadd(-26.189, 242.282, -21.9, 0.75)
pt3dadd(-26.15, 242.396, -21.9, 0.746)
pt3dadd(-26.112, 242.51, -21.9, 0.742)
pt3dadd(-26.074, 242.623, -21.9, 0.736)
pt3dadd(-26.035, 242.737, -21.9, 0.732)
pt3dadd(-25.993, 242.849, -21.899, 0.728)
pt3dadd(-25.92, 242.942, -21.884, 0.728)
pt3dadd(-25.847, 243.036, -21.869, 0.728)
pt3dadd(-25.774, 243.13, -21.855, 0.728)
pt3dadd(-25.7, 243.223, -21.84, 0.728)
}
}
proc shape3d_27() {
dend_5[11] { pt3dadd(-25.638, 243.324, -21.83, 0.73)
pt3dadd(-25.585, 243.431, -21.823, 0.736)
pt3dadd(-25.531, 243.538, -21.816, 0.74)
pt3dadd(-25.477, 243.646, -21.81, 0.746)
pt3dadd(-25.424, 243.752, -21.803, 0.75)
pt3dadd(-25.367, 243.858, -21.8, 0.758)
pt3dadd(-25.307, 243.962, -21.8, 0.768)
pt3dadd(-25.248, 244.066, -21.8, 0.778)
pt3dadd(-25.188, 244.17, -21.8, 0.788)
pt3dadd(-25.128, 244.273, -21.8, 0.798)
pt3dadd(-25.076, 244.381, -21.8, 0.804)
pt3dadd(-25.037, 244.495, -21.8, 0.804)
pt3dadd(-24.998, 244.608, -21.799, 0.802)
pt3dadd(-24.974, 244.724, -21.784, 0.792)
pt3dadd(-24.952, 244.841, -21.77, 0.78)
pt3dadd(-24.883, 244.925, -21.738, 0.768)
pt3dadd(-24.8, 245, -21.7, 0.754)
pt3dadd(-24.707, 245.075, -21.7, 0.754)
pt3dadd(-24.613, 245.15, -21.7, 0.754)
pt3dadd(-24.545, 245.243, -21.677, 0.736)
pt3dadd(-24.463, 245.324, -21.653, 0.722)
pt3dadd(-24.372, 245.398, -21.63, 0.71)
pt3dadd(-24.281, 245.471, -21.607, 0.698)
pt3dadd(-24.19, 245.544, -21.584, 0.686)
pt3dadd(-24.102, 245.621, -21.563, 0.676)
pt3dadd(-24.026, 245.712, -21.549, 0.664)
pt3dadd(-23.95, 245.803, -21.534, 0.654)
pt3dadd(-23.873, 245.894, -21.519, 0.642)
pt3dadd(-23.797, 245.984, -21.505, 0.632)
pt3dadd(-23.74, 246.086, -21.485, 0.628)
pt3dadd(-23.69, 246.193, -21.464, 0.628)
pt3dadd(-23.641, 246.3, -21.442, 0.628)
pt3dadd(-23.593, 246.406, -21.42, 0.628)
pt3dadd(-23.543, 246.512, -21.4, 0.628)
pt3dadd(-23.473, 246.61, -21.4, 0.638)
pt3dadd(-23.405, 246.708, -21.4, 0.648)
pt3dadd(-23.335, 246.806, -21.4, 0.658)
pt3dadd(-23.267, 246.905, -21.4, 0.668)
pt3dadd(-23.198, 247.003, -21.4, 0.678)
pt3dadd(-23.162, 247.117, -21.4, 0.688)
pt3dadd(-23.128, 247.232, -21.4, 0.696)
pt3dadd(-23.092, 247.346, -21.4, 0.706)
pt3dadd(-23.056, 247.462, -21.4, 0.714)
pt3dadd(-23.021, 247.576, -21.4, 0.724)
pt3dadd(-22.986, 247.691, -21.4, 0.732)
pt3dadd(-22.952, 247.806, -21.4, 0.744)
pt3dadd(-22.92, 247.921, -21.4, 0.754)
pt3dadd(-22.92, 248.041, -21.4, 0.762)
pt3dadd(-22.92, 248.161, -21.4, 0.77)
pt3dadd(-22.919, 248.281, -21.4, 0.778)
pt3dadd(-22.866, 248.389, -21.4, 0.802)
pt3dadd(-22.812, 248.496, -21.4, 0.824)
pt3dadd(-22.723, 248.573, -21.4, 0.846)
pt3dadd(-22.624, 248.64, -21.4, 0.87)
pt3dadd(-22.54, 248.724, -21.4, 0.868)
pt3dadd(-22.471, 248.821, -21.404, 0.852)
pt3dadd(-22.43, 248.932, -21.422, 0.842)
pt3dadd(-22.39, 249.042, -21.44, 0.832)
pt3dadd(-22.348, 249.152, -21.459, 0.82)
pt3dadd(-22.307, 249.264, -21.477, 0.81)
pt3dadd(-22.256, 249.371, -21.49, 0.798)
pt3dadd(-22.193, 249.472, -21.492, 0.784)
pt3dadd(-22.129, 249.574, -21.494, 0.768)
pt3dadd(-22.064, 249.674, -21.496, 0.752)
pt3dadd(-22.001, 249.776, -21.499, 0.738)
pt3dadd(-21.94, 249.88, -21.5, 0.73)
pt3dadd(-21.882, 249.985, -21.5, 0.734)
pt3dadd(-21.826, 250.091, -21.5, 0.74)
pt3dadd(-21.769, 250.196, -21.5, 0.744)
pt3dadd(-21.713, 250.302, -21.5, 0.75)
pt3dadd(-21.649, 250.404, -21.5, 0.754)
pt3dadd(-21.562, 250.484, -21.5, 0.754)
pt3dadd(-21.473, 250.566, -21.5, 0.754)
pt3dadd(-21.385, 250.648, -21.5, 0.766)
pt3dadd(-21.296, 250.729, -21.5, 0.778)
pt3dadd(-21.271, 250.843, -21.486, 0.758)
pt3dadd(-21.248, 250.961, -21.472, 0.736)
pt3dadd(-21.227, 251.056, -21.421, 0.72)
pt3dadd(-21.205, 251.138, -21.351, 0.706)
pt3dadd(-21.162, 251.237, -21.314, 0.674)
pt3dadd(-21.114, 251.345, -21.3, 0.65)
pt3dadd(-21.072, 251.458, -21.3, 0.646)
pt3dadd(-21.031, 251.569, -21.3, 0.642)
pt3dadd(-20.989, 251.682, -21.3, 0.638)
pt3dadd(-20.947, 251.795, -21.3, 0.632)
pt3dadd(-20.905, 251.908, -21.3, 0.628)
pt3dadd(-20.82, 251.989, -21.285, 0.616)
pt3dadd(-20.735, 252.072, -21.27, 0.606)
pt3dadd(-20.65, 252.155, -21.256, 0.594)
pt3dadd(-20.564, 252.236, -21.241, 0.584)
pt3dadd(-20.471, 252.308, -21.225, 0.578)
pt3dadd(-20.37, 252.37, -21.208, 0.578)
pt3dadd(-20.275, 252.442, -21.2, 0.584)
pt3dadd(-20.188, 252.523, -21.2, 0.596)
pt3dadd(-20.116, 252.616, -21.2, 0.616)
pt3dadd(-20.069, 252.726, -21.2, 0.648)
pt3dadd(-20.023, 252.838, -21.2, 0.68)
pt3dadd(-19.984, 252.95, -21.2, 0.702)
pt3dadd(-19.944, 253.064, -21.2, 0.722)
pt3dadd(-19.909, 253.178, -21.2, 0.74)
pt3dadd(-19.877, 253.294, -21.199, 0.754)
pt3dadd(-19.842, 253.409, -21.195, 0.754)
pt3dadd(-19.807, 253.524, -21.19, 0.754)
pt3dadd(-19.8, 253.637, -21.163, 0.754)
pt3dadd(-19.8, 253.751, -21.129, 0.754)
pt3dadd(-19.798, 253.864, -21.096, 0.754)
pt3dadd(-19.792, 253.976, -21.061, 0.754)
pt3dadd(-19.768, 254.076, -21.025, 0.756)
pt3dadd(-19.673, 254.128, -20.982, 0.77)
pt3dadd(-19.572, 254.161, -20.94, 0.784)
pt3dadd(-19.464, 254.165, -20.897, 0.798)
pt3dadd(-19.355, 254.168, -20.855, 0.81)
pt3dadd(-19.246, 254.172, -20.813, 0.824)
pt3dadd(-19.141, 254.215, -20.8, 0.844)
pt3dadd(-19.038, 254.276, -20.8, 0.868)
pt3dadd(-18.935, 254.333, -20.784, 0.884)
pt3dadd(-18.834, 254.387, -20.753, 0.894)
pt3dadd(-18.733, 254.44, -20.722, 0.904)
pt3dadd(-18.674, 254.484, -20.643, 0.904)
pt3dadd(-18.607, 254.525, -20.573, 0.904)
pt3dadd(-18.496, 254.555, -20.545, 0.904)
pt3dadd(-18.384, 254.584, -20.516, 0.904)
pt3dadd(-18.272, 254.617, -20.5, 0.9)
pt3dadd(-18.158, 254.657, -20.5, 0.888)
pt3dadd(-18.049, 254.7, -20.499, 0.874)
pt3dadd(-17.975, 254.784, -20.474, 0.82)
pt3dadd(-17.881, 254.844, -20.437, 0.796)
pt3dadd(-17.786, 254.904, -20.401, 0.772)
pt3dadd(-17.692, 254.964, -20.364, 0.748)
pt3dadd(-17.597, 255.025, -20.332, 0.726)
pt3dadd(-17.5, 255.095, -20.325, 0.71)
pt3dadd(-17.402, 255.164, -20.318, 0.694)
pt3dadd(-17.305, 255.234, -20.311, 0.678)
pt3dadd(-17.208, 255.304, -20.304, 0.662)
pt3dadd(-17.102, 255.354, -20.3, 0.65)
pt3dadd(-16.984, 255.374, -20.3, 0.642)
pt3dadd(-16.866, 255.394, -20.3, 0.634)
pt3dadd(-16.747, 255.414, -20.3, 0.626)
pt3dadd(-16.628, 255.433, -20.3, 0.616)
pt3dadd(-16.511, 255.452, -20.3, 0.608)
pt3dadd(-16.393, 255.474, -20.296, 0.602)
pt3dadd(-16.277, 255.499, -20.284, 0.602)
pt3dadd(-16.16, 255.523, -20.272, 0.602)
pt3dadd(-16.043, 255.548, -20.259, 0.602)
pt3dadd(-15.926, 255.574, -20.247, 0.602)
pt3dadd(-15.81, 255.598, -20.234, 0.602)
pt3dadd(-15.698, 255.623, -20.206, 0.594)
pt3dadd(-15.586, 255.647, -20.177, 0.584)
pt3dadd(-15.474, 255.672, -20.147, 0.572)
pt3dadd(-15.362, 255.696, -20.118, 0.562)
pt3dadd(-15.251, 255.721, -20.088, 0.552)
pt3dadd(-15.144, 255.746, -20.047, 0.536)
pt3dadd(-15.037, 255.773, -20.006, 0.52)
pt3dadd(-14.93, 255.798, -19.965, 0.504)
pt3dadd(-14.825, 255.824, -19.925, 0.488)
pt3dadd(-14.716, 255.852, -19.893, 0.472)
pt3dadd(-14.602, 255.884, -19.875, 0.456)
pt3dadd(-14.488, 255.916, -19.858, 0.442)
pt3dadd(-14.374, 255.948, -19.84, 0.426)
pt3dadd(-14.26, 255.979, -19.823, 0.412)
pt3dadd(-14.149, 256.019, -19.802, 0.402)
pt3dadd(-14.046, 256.072, -19.778, 0.402)
pt3dadd(-13.943, 256.124, -19.753, 0.402)
pt3dadd(-13.84, 256.178, -19.729, 0.402)
pt3dadd(-13.736, 256.231, -19.704, 0.402)
pt3dadd(-13.622, 256.267, -19.7, 0.41)
pt3dadd(-13.507, 256.301, -19.7, 0.418)
pt3dadd(-13.392, 256.333, -19.7, 0.426)
pt3dadd(-13.277, 256.367, -19.7, 0.436)
pt3dadd(-13.162, 256.4, -19.7, 0.444)
pt3dadd(-13.045, 256.428, -19.7, 0.456)
pt3dadd(-12.925, 256.433, -19.7, 0.482)
pt3dadd(-12.805, 256.436, -19.7, 0.508)
pt3dadd(-12.689, 256.456, -19.7, 0.536)
pt3dadd(-12.582, 256.51, -19.7, 0.57)
pt3dadd(-12.476, 256.565, -19.7, 0.604)
pt3dadd(-12.401, 256.658, -19.7, 0.628)
pt3dadd(-12.326, 256.753, -19.7, 0.652)
pt3dadd(-12.23, 256.786, -19.652, 0.666)
pt3dadd(-12.133, 256.814, -19.599, 0.678)
pt3dadd(-12.114, 256.864, -19.509, 0.66)
pt3dadd(-12.047, 256.918, -19.45, 0.65)
pt3dadd(-11.954, 256.975, -19.408, 0.642)
pt3dadd(-11.862, 257.033, -19.365, 0.638)
pt3dadd(-11.77, 257.09, -19.323, 0.63)
pt3dadd(-11.666, 257.131, -19.291, 0.626)
pt3dadd(-11.551, 257.154, -19.272, 0.62)
pt3dadd(-11.436, 257.177, -19.252, 0.616)
pt3dadd(-11.321, 257.201, -19.233, 0.612)
pt3dadd(-11.204, 257.224, -19.214, 0.606)
pt3dadd(-11.089, 257.245, -19.195, 0.606)
pt3dadd(-10.973, 257.262, -19.176, 0.616)
pt3dadd(-10.856, 257.28, -19.156, 0.628)
pt3dadd(-10.792, 257.286, -19.073, 0.628)
pt3dadd(-10.728, 257.292, -18.989, 0.628)
pt3dadd(-10.637, 257.338, -18.94, 0.616)
pt3dadd(-10.54, 257.387, -18.9, 0.602)
pt3dadd(-10.42, 257.392, -18.9, 0.576)
pt3dadd(-10.3, 257.396, -18.9, 0.548)
pt3dadd(-10.18, 257.4, -18.899, 0.522)
}
}
proc shape3d_28() {
dend_5[11] { pt3dadd(-10.06, 257.4, -18.893, 0.496)
pt3dadd(-9.941, 257.394, -18.884, 0.476)
pt3dadd(-9.826, 257.371, -18.868, 0.47)
pt3dadd(-9.709, 257.348, -18.851, 0.466)
pt3dadd(-9.593, 257.326, -18.834, 0.462)
pt3dadd(-9.476, 257.303, -18.817, 0.456)
pt3dadd(-9.361, 257.28, -18.8, 0.452)
pt3dadd(-9.242, 257.28, -18.815, 0.456)
pt3dadd(-9.124, 257.28, -18.83, 0.46)
pt3dadd(-9.005, 257.28, -18.845, 0.464)
pt3dadd(-8.886, 257.28, -18.86, 0.468)
pt3dadd(-8.767, 257.28, -18.875, 0.474)
pt3dadd(-8.65, 257.281, -18.888, 0.478)
pt3dadd(-8.54, 257.323, -18.867, 0.494)
pt3dadd(-8.43, 257.366, -18.846, 0.51)
pt3dadd(-8.321, 257.408, -18.825, 0.526)
pt3dadd(-8.212, 257.45, -18.804, 0.542)
pt3dadd(-8.11, 257.504, -18.783, 0.558)
pt3dadd(-8.024, 257.586, -18.763, 0.574)
pt3dadd(-7.94, 257.668, -18.743, 0.592)
pt3dadd(-7.855, 257.749, -18.723, 0.608)
pt3dadd(-7.771, 257.831, -18.702, 0.626)
pt3dadd(-7.661, 257.867, -18.68, 0.632)
pt3dadd(-7.548, 257.896, -18.658, 0.638)
pt3dadd(-7.435, 257.926, -18.635, 0.642)
pt3dadd(-7.322, 257.954, -18.613, 0.648)
pt3dadd(-7.208, 257.984, -18.591, 0.652)
pt3dadd(-7.11, 257.989, -18.535, 0.638)
pt3dadd(-7.013, 257.992, -18.476, 0.624)
pt3dadd(-6.916, 257.995, -18.418, 0.608)
pt3dadd(-6.818, 257.998, -18.359, 0.594)
pt3dadd(-6.721, 258, -18.301, 0.578)
pt3dadd(-6.612, 258.042, -18.279, 0.562)
pt3dadd(-6.503, 258.084, -18.258, 0.546)
pt3dadd(-6.392, 258.126, -18.237, 0.53)
pt3dadd(-6.283, 258.168, -18.216, 0.514)
pt3dadd(-6.172, 258.202, -18.2, 0.5)
pt3dadd(-6.052, 258.208, -18.198, 0.488)
pt3dadd(-5.932, 258.214, -18.196, 0.476)
pt3dadd(-5.812, 258.22, -18.194, 0.466)
pt3dadd(-5.693, 258.226, -18.193, 0.454)
pt3dadd(-5.573, 258.232, -18.191, 0.442)
pt3dadd(-5.453, 258.238, -18.19, 0.43)
pt3dadd(-5.336, 258.24, -18.167, 0.42)
pt3dadd(-5.224, 258.24, -18.135, 0.412)
pt3dadd(-5.11, 258.24, -18.103, 0.402)
pt3dadd(-4.996, 258.24, -18.07, 0.394)
pt3dadd(-4.883, 258.24, -18.038, 0.384)
pt3dadd(-4.769, 258.236, -18.008, 0.376)
pt3dadd(-4.654, 258.212, -17.986, 0.372)
pt3dadd(-4.54, 258.19, -17.964, 0.366)
pt3dadd(-4.424, 258.166, -17.943, 0.362)
pt3dadd(-4.309, 258.143, -17.921, 0.356)
pt3dadd(-4.195, 258.12, -17.898, 0.352)
pt3dadd(-4.085, 258.112, -17.859, 0.368)
pt3dadd(-3.976, 258.104, -17.82, 0.382)
pt3dadd(-3.865, 258.096, -17.78, 0.396)
pt3dadd(-3.755, 258.089, -17.741, 0.412)
pt3dadd(-3.644, 258.08, -17.702, 0.426)
pt3dadd(-3.527, 258.067, -17.689, 0.452)
pt3dadd(-3.408, 258.053, -17.677, 0.478)
pt3dadd(-3.29, 258.04, -17.666, 0.504)
pt3dadd(-3.172, 258.025, -17.654, 0.53)
pt3dadd(-3.054, 258.011, -17.642, 0.558)
pt3dadd(-2.935, 258, -17.632, 0.58)
pt3dadd(-2.815, 258, -17.627, 0.596)
pt3dadd(-2.695, 258, -17.622, 0.61)
pt3dadd(-2.575, 258, -17.617, 0.626)
pt3dadd(-2.455, 258, -17.612, 0.64)
pt3dadd(-2.335, 258, -17.607, 0.656)
pt3dadd(-2.215, 258, -17.602, 0.67)
pt3dadd(-2.096, 258.011, -17.6, 0.676)
pt3dadd(-1.979, 258.03, -17.6, 0.672)
pt3dadd(-1.86, 258.05, -17.6, 0.668)
pt3dadd(-1.741, 258.07, -17.6, 0.664)
pt3dadd(-1.624, 258.09, -17.6, 0.66)
pt3dadd(-1.505, 258.109, -17.6, 0.656)
pt3dadd(-1.386, 258.128, -17.597, 0.648)
pt3dadd(-1.268, 258.146, -17.589, 0.634)
pt3dadd(-1.15, 258.166, -17.581, 0.62)
pt3dadd(-1.032, 258.184, -17.573, 0.608)
pt3dadd(-0.913, 258.203, -17.566, 0.594)
pt3dadd(-0.796, 258.221, -17.558, 0.582)
pt3dadd(-0.688, 258.229, -17.52, 0.574)
pt3dadd(-0.584, 258.232, -17.469, 0.57)
pt3dadd(-0.481, 258.234, -17.419, 0.564)
pt3dadd(-0.378, 258.236, -17.368, 0.56)
pt3dadd(-0.275, 258.239, -17.317, 0.554)
pt3dadd(-0.16, 258.24, -17.297, 0.564)
pt3dadd(-0.04, 258.24, -17.294, 0.582)
pt3dadd(0.08, 258.24, -17.29, 0.598)
pt3dadd(0.194, 258.24, -17.263, 0.612)
pt3dadd(0.308, 258.24, -17.23, 0.622)
pt3dadd(0.422, 258.24, -17.202, 0.624)
pt3dadd(0.54, 258.24, -17.18, 0.614)
pt3dadd(0.656, 258.24, -17.158, 0.604)
pt3dadd(0.691, 258.24, -17.067, 0.576)
pt3dadd(0.718, 258.24, -16.969, 0.546)
pt3dadd(0.779, 258.25, -16.898, 0.522)
pt3dadd(0.889, 258.272, -16.866, 0.506)
pt3dadd(1.001, 258.295, -16.834, 0.492)
pt3dadd(1.112, 258.319, -16.802, 0.478)
pt3dadd(1.214, 258.377, -16.784, 0.454)
pt3dadd(1.315, 258.438, -16.767, 0.428)
pt3dadd(1.398, 258.476, -16.707, 0.402)
pt3dadd(1.505, 258.502, -16.667, 0.402)
pt3dadd(1.612, 258.528, -16.626, 0.402)
pt3dadd(1.717, 258.554, -16.585, 0.402)
pt3dadd(1.824, 258.58, -16.544, 0.402)
pt3dadd(1.938, 258.604, -16.529, 0.412)
pt3dadd(2.056, 258.628, -16.523, 0.424)
pt3dadd(2.173, 258.65, -16.517, 0.438)
pt3dadd(2.291, 258.674, -16.511, 0.452)
pt3dadd(2.408, 258.697, -16.506, 0.464)
pt3dadd(2.526, 258.72, -16.502, 0.478)
pt3dadd(2.638, 258.72, -16.536, 0.492)
pt3dadd(2.75, 258.72, -16.571, 0.506)
pt3dadd(2.863, 258.72, -16.606, 0.52)
pt3dadd(2.976, 258.72, -16.64, 0.534)
pt3dadd(3.089, 258.72, -16.675, 0.546)
pt3dadd(3.204, 258.72, -16.701, 0.554)
pt3dadd(3.322, 258.72, -16.722, 0.56)
pt3dadd(3.439, 258.72, -16.743, 0.564)
pt3dadd(3.556, 258.72, -16.763, 0.568)
pt3dadd(3.673, 258.72, -16.784, 0.572)
pt3dadd(3.791, 258.72, -16.805, 0.576)
pt3dadd(3.89, 258.732, -16.855, 0.574)
pt3dadd(3.98, 258.75, -16.919, 0.568)
pt3dadd(4.072, 258.768, -16.983, 0.562)
pt3dadd(4.163, 258.785, -17.046, 0.558)
pt3dadd(4.256, 258.805, -17.103, 0.552)
pt3dadd(4.369, 258.841, -17.124, 0.546)
pt3dadd(4.481, 258.876, -17.144, 0.542)
pt3dadd(4.592, 258.912, -17.165, 0.536)
pt3dadd(4.705, 258.947, -17.185, 0.532)
pt3dadd(4.818, 258.98, -17.2, 0.528)
pt3dadd(4.936, 259.004, -17.2, 0.532)
pt3dadd(5.053, 259.03, -17.2, 0.536)
pt3dadd(5.171, 259.054, -17.2, 0.542)
pt3dadd(5.287, 259.079, -17.2, 0.546)
pt3dadd(5.405, 259.104, -17.2, 0.55)
pt3dadd(5.524, 259.124, -17.2, 0.554)
pt3dadd(5.642, 259.136, -17.2, 0.558)
pt3dadd(5.762, 259.15, -17.2, 0.562)
pt3dadd(5.881, 259.162, -17.2, 0.566)
pt3dadd(6.001, 259.175, -17.2, 0.57)
pt3dadd(6.12, 259.187, -17.2, 0.574)
pt3dadd(6.239, 259.2, -17.2, 0.578)
pt3dadd(6.355, 259.23, -17.2, 0.586)
pt3dadd(6.472, 259.26, -17.2, 0.596)
pt3dadd(6.588, 259.29, -17.2, 0.604)
pt3dadd(6.704, 259.32, -17.2, 0.612)
pt3dadd(6.82, 259.35, -17.2, 0.622)
pt3dadd(6.934, 259.388, -17.2, 0.628)
pt3dadd(7.037, 259.447, -17.2, 0.634)
pt3dadd(7.141, 259.507, -17.2, 0.638)
pt3dadd(7.246, 259.567, -17.2, 0.644)
pt3dadd(7.349, 259.627, -17.2, 0.648)
pt3dadd(7.453, 259.688, -17.2, 0.652)
pt3dadd(7.555, 259.751, -17.2, 0.652)
pt3dadd(7.657, 259.814, -17.2, 0.652)
pt3dadd(7.759, 259.877, -17.2, 0.652)
pt3dadd(7.861, 259.94, -17.2, 0.652)
pt3dadd(7.963, 260.004, -17.2, 0.652)
pt3dadd(8.045, 260.092, -17.2, 0.628)
pt3dadd(8.126, 260.179, -17.2, 0.604)
pt3dadd(8.227, 260.244, -17.205, 0.58)
pt3dadd(8.328, 260.308, -17.21, 0.556)
pt3dadd(8.408, 260.357, -17.267, 0.54)
pt3dadd(8.483, 260.401, -17.336, 0.528)
pt3dadd(8.551, 260.422, -17.416, 0.528)
pt3dadd(8.622, 260.447, -17.489, 0.526)
pt3dadd(8.714, 260.524, -17.492, 0.512)
pt3dadd(8.806, 260.6, -17.496, 0.496)
pt3dadd(8.898, 260.678, -17.499, 0.482)
pt3dadd(8.998, 260.744, -17.5, 0.456)
pt3dadd(9.101, 260.806, -17.5, 0.422)
pt3dadd(9.211, 260.845, -17.499, 0.392)
pt3dadd(9.33, 260.856, -17.496, 0.372)
pt3dadd(9.45, 260.867, -17.493, 0.35)
pt3dadd(9.569, 260.879, -17.489, 0.33)
pt3dadd(9.659, 260.886, -17.429, 0.326)
pt3dadd(9.744, 260.892, -17.358, 0.326)
pt3dadd(9.845, 260.938, -17.331, 0.35)
pt3dadd(9.949, 260.992, -17.314, 0.378)
pt3dadd(10.055, 261.047, -17.3, 0.408)
pt3dadd(10.162, 261.101, -17.3, 0.452)
pt3dadd(10.27, 261.154, -17.3, 0.498)
pt3dadd(10.367, 261.22, -17.294, 0.604)
pt3dadd(10.474, 261.254, -17.26, 0.616)
pt3dadd(10.582, 261.289, -17.226, 0.626)
pt3dadd(10.688, 261.324, -17.192, 0.638)
pt3dadd(10.796, 261.359, -17.158, 0.648)
pt3dadd(10.902, 261.389, -17.118, 0.652)
pt3dadd(11.006, 261.415, -17.075, 0.652)
pt3dadd(11.112, 261.442, -17.031, 0.652)
pt3dadd(11.216, 261.467, -16.987, 0.652)
pt3dadd(11.321, 261.493, -16.944, 0.652)
pt3dadd(11.43, 261.542, -16.935, 0.648)
pt3dadd(11.54, 261.59, -16.927, 0.642)
}
}
proc shape3d_29() {
dend_5[11] { pt3dadd(11.65, 261.638, -16.918, 0.638)
pt3dadd(11.759, 261.686, -16.909, 0.632)
pt3dadd(11.868, 261.733, -16.9, 0.628)
pt3dadd(11.986, 261.758, -16.9, 0.62)
pt3dadd(12.103, 261.784, -16.9, 0.61)
pt3dadd(12.221, 261.808, -16.9, 0.602)
pt3dadd(12.338, 261.833, -16.9, 0.594)
pt3dadd(12.456, 261.858, -16.9, 0.586)
pt3dadd(12.572, 261.883, -16.9, 0.576)
pt3dadd(12.688, 261.917, -16.9, 0.566)
pt3dadd(12.803, 261.949, -16.9, 0.556)
pt3dadd(12.922, 261.964, -16.9, 0.54)
pt3dadd(13.042, 261.967, -16.9, 0.524)
pt3dadd(13.162, 261.972, -16.9, 0.506)
pt3dadd(13.271, 262.01, -16.882, 0.492)
pt3dadd(13.379, 262.057, -16.86, 0.48)
pt3dadd(13.451, 262.072, -16.788, 0.458)
pt3dadd(13.514, 262.078, -16.704, 0.434)
pt3dadd(13.586, 262.08, -16.623, 0.414)
pt3dadd(13.668, 262.093, -16.556, 0.402)
pt3dadd(13.766, 262.144, -16.517, 0.402)
pt3dadd(13.865, 262.193, -16.479, 0.402)
pt3dadd(13.964, 262.242, -16.44, 0.402)
pt3dadd(14.063, 262.292, -16.401, 0.402)
pt3dadd(14.166, 262.352, -16.398, 0.416)
pt3dadd(14.27, 262.414, -16.396, 0.432)
pt3dadd(14.374, 262.474, -16.393, 0.446)
pt3dadd(14.477, 262.535, -16.391, 0.462)
pt3dadd(14.58, 262.596, -16.389, 0.476)
pt3dadd(14.687, 262.64, -16.364, 0.498)
pt3dadd(14.795, 262.684, -16.338, 0.52)
pt3dadd(14.902, 262.727, -16.311, 0.542)
pt3dadd(15.008, 262.771, -16.285, 0.562)
pt3dadd(15.12, 262.801, -16.263, 0.582)
pt3dadd(15.239, 262.802, -16.252, 0.598)
pt3dadd(15.359, 262.805, -16.242, 0.614)
pt3dadd(15.478, 262.807, -16.231, 0.63)
pt3dadd(15.596, 262.81, -16.221, 0.648)
pt3dadd(15.716, 262.811, -16.21, 0.664)
pt3dadd(15.834, 262.817, -16.2, 0.68)
pt3dadd(15.941, 262.874, -16.2, 0.694)
pt3dadd(16.046, 262.931, -16.2, 0.708)
pt3dadd(16.152, 262.988, -16.2, 0.722)
pt3dadd(16.258, 263.045, -16.2, 0.738)
pt3dadd(16.363, 263.102, -16.2, 0.752)
pt3dadd(16.466, 263.162, -16.2, 0.774)
pt3dadd(16.57, 263.224, -16.2, 0.798)
pt3dadd(16.667, 263.293, -16.2, 0.804)
pt3dadd(16.76, 263.369, -16.2, 0.804)
pt3dadd(16.852, 263.438, -16.179, 0.788)
pt3dadd(16.94, 263.506, -16.141, 0.76)
pt3dadd(17.041, 263.552, -16.106, 0.722)
pt3dadd(17.146, 263.594, -16.071, 0.684)
pt3dadd(17.216, 263.628, -15.997, 0.626)
pt3dadd(17.272, 263.666, -15.915, 0.586)
pt3dadd(17.321, 263.71, -15.831, 0.558)
pt3dadd(17.413, 263.762, -15.807, 0.544)
pt3dadd(17.519, 263.819, -15.802, 0.532)
pt3dadd(17.627, 263.852, -15.777, 0.52)
pt3dadd(17.737, 263.872, -15.739, 0.508)
pt3dadd(17.82, 263.88, -15.675, 0.484)
pt3dadd(17.88, 263.88, -15.589, 0.45)
pt3dadd(17.95, 263.875, -15.508, 0.416)
pt3dadd(18.035, 263.864, -15.438, 0.386)
pt3dadd(18.119, 263.852, -15.368, 0.356)
pt3dadd(18.204, 263.839, -15.3, 0.326)
pt3dadd(18.318, 263.8, -15.3, 0.304)
pt3dadd(18.431, 263.76, -15.3, 0.282)
pt3dadd(18.546, 263.724, -15.3, 0.318)
pt3dadd(18.656, 263.687, -15.281, 0.38)
pt3dadd(18.767, 263.647, -15.26, 0.44)
pt3dadd(18.859, 263.64, -15.2, 0.49)
pt3dadd(18.947, 263.64, -15.132, 0.538)
pt3dadd(19.057, 263.644, -15.117, 0.552)
pt3dadd(19.176, 263.65, -15.126, 0.552)
pt3dadd(19.286, 263.665, -15.147, 0.538)
pt3dadd(19.37, 263.719, -15.204, 0.482)
pt3dadd(19.465, 263.748, -15.253, 0.436)
pt3dadd(19.576, 263.753, -15.294, 0.4)
pt3dadd(19.685, 263.756, -15.335, 0.364)
pt3dadd(19.794, 263.76, -15.376, 0.328)
pt3dadd(19.908, 263.76, -15.349, 0.304)
pt3dadd(20.023, 263.76, -15.319, 0.282)
pt3dadd(20.135, 263.76, -15.285, 0.288)
pt3dadd(20.238, 263.756, -15.24, 0.322)
pt3dadd(20.276, 263.728, -15.151, 0.414)
pt3dadd(20.281, 263.677, -15.06, 0.452)
pt3dadd(20.309, 263.653, -14.967, 0.452)
pt3dadd(20.387, 263.693, -14.908, 0.452)
pt3dadd(20.476, 263.772, -14.9, 0.452)
pt3dadd(20.563, 263.848, -14.917, 0.452)
pt3dadd(20.666, 263.878, -14.96, 0.452)
pt3dadd(20.778, 263.899, -14.991, 0.452)
pt3dadd(20.888, 263.94, -14.993, 0.458)
pt3dadd(20.999, 263.984, -14.977, 0.47)
pt3dadd(21.102, 264.035, -14.953, 0.482)
pt3dadd(21.198, 264.094, -14.916, 0.496)
pt3dadd(21.301, 264.145, -14.9, 0.508)
pt3dadd(21.412, 264.192, -14.9, 0.52)
pt3dadd(21.524, 264.224, -14.9, 0.524)
pt3dadd(21.644, 264.214, -14.9, 0.514)
pt3dadd(21.763, 264.203, -14.9, 0.504)
pt3dadd(21.84, 264.12, -14.9, 0.452)
}
dend_5[12] {pt3dclear()
pt3dadd(-52.96, 225.16, -18.1, 1.406)
pt3dadd(-52.97, 225.17, -18.153, 1.392)
pt3dadd(-52.99, 225.19, -18.25, 1.364)
pt3dadd(-53.009, 225.209, -18.348, 1.338)
pt3dadd(-53.029, 225.229, -18.445, 1.31)
pt3dadd(-53.048, 225.248, -18.542, 1.284)
pt3dadd(-53.068, 225.268, -18.64, 1.258)
pt3dadd(-53.087, 225.287, -18.737, 1.23)
pt3dadd(-53.107, 225.307, -18.834, 1.204)
pt3dadd(-53.126, 225.326, -18.932, 1.176)
pt3dadd(-53.146, 225.346, -19.029, 1.15)
pt3dadd(-53.192, 225.365, -19.1, 1.124)
pt3dadd(-53.31, 225.385, -19.1, 1.098)
pt3dadd(-53.429, 225.404, -19.1, 1.074)
pt3dadd(-53.548, 225.425, -19.1, 1.048)
pt3dadd(-53.665, 225.444, -19.1, 1.024)
pt3dadd(-53.784, 225.464, -19.1, 1)
pt3dadd(-53.903, 225.48, -19.1, 0.98)
pt3dadd(-54.023, 225.48, -19.1, 0.99)
pt3dadd(-54.143, 225.48, -19.1, 0.998)
pt3dadd(-54.263, 225.481, -19.1, 1.002)
pt3dadd(-54.383, 225.485, -19.1, 0.994)
pt3dadd(-54.503, 225.49, -19.1, 0.986)
pt3dadd(-54.619, 225.506, -19.1, 0.972)
pt3dadd(-54.73, 225.553, -19.1, 0.95)
pt3dadd(-54.841, 225.6, -19.1, 0.928)
pt3dadd(-54.94, 225.668, -19.1, 0.894)
pt3dadd(-55.038, 225.736, -19.1, 0.86)
pt3dadd(-55.126, 225.818, -19.1, 0.838)
pt3dadd(-55.223, 225.883, -19.1, 0.834)
pt3dadd(-55.336, 225.924, -19.1, 0.844)
pt3dadd(-55.45, 225.96, -19.1, 0.856)
pt3dadd(-55.57, 225.965, -19.1, 0.872)
pt3dadd(-55.69, 225.97, -19.1, 0.89)
pt3dadd(-55.807, 225.982, -19.1, 0.912)
pt3dadd(-55.919, 226.028, -19.1, 0.956)
pt3dadd(-56.029, 226.075, -19.1, 1)
pt3dadd(-56.124, 226.147, -19.1, 1.036)
pt3dadd(-56.219, 226.222, -19.1, 1.072)
pt3dadd(-56.258, 226.33, -19.1, 1.08)
pt3dadd(-56.284, 226.446, -19.1, 1.078)
pt3dadd(-56.336, 226.554, -19.1, 1.032)
pt3dadd(-56.39, 226.661, -19.1, 0.988)
pt3dadd(-56.462, 226.748, -19.131, 0.91)
pt3dadd(-56.537, 226.831, -19.167, 0.826)
pt3dadd(-56.612, 226.921, -19.185, 0.774)
pt3dadd(-56.694, 227.003, -19.202, 0.726)
pt3dadd(-56.81, 227.02, -19.222, 0.716)
pt3dadd(-56.927, 227.036, -19.241, 0.704)
pt3dadd(-57.008, 227.04, -19.309, 0.776)
pt3dadd(-57.083, 227.072, -19.372, 0.848)
pt3dadd(-57.157, 227.154, -19.412, 0.898)
pt3dadd(-57.232, 227.234, -19.453, 0.946)
pt3dadd(-57.306, 227.315, -19.493, 0.994)
pt3dadd(-57.379, 227.396, -19.534, 1.044)
pt3dadd(-57.451, 227.478, -19.577, 1.092)
pt3dadd(-57.522, 227.558, -19.621, 1.142)
pt3dadd(-57.594, 227.64, -19.664, 1.19)
pt3dadd(-57.67, 227.719, -19.704, 1.234)
pt3dadd(-57.766, 227.785, -19.726, 1.25)
pt3dadd(-57.863, 227.851, -19.749, 1.268)
pt3dadd(-57.959, 227.917, -19.772, 1.284)
pt3dadd(-58.055, 227.983, -19.794, 1.302)
pt3dadd(-58.132, 228.046, -19.847, 1.306)
pt3dadd(-58.2, 228.107, -19.911, 1.306)
pt3dadd(-58.276, 228.161, -19.975, 1.306)
pt3dadd(-58.361, 228.205, -20.032, 1.302)
pt3dadd(-58.47, 228.224, -20.069, 1.29)
pt3dadd(-58.582, 228.241, -20.1, 1.278)
pt3dadd(-58.702, 228.245, -20.1, 1.26)
pt3dadd(-58.822, 228.25, -20.1, 1.242)
pt3dadd(-58.936, 228.271, -20.1, 1.22)
pt3dadd(-59.039, 228.334, -20.1, 1.186)
pt3dadd(-59.141, 228.396, -20.1, 1.152)
pt3dadd(-59.244, 228.458, -20.1, 1.118)
pt3dadd(-59.315, 228.548, -20.111, 1.088)
pt3dadd(-59.368, 228.654, -20.127, 1.064)
pt3dadd(-59.4, 228.757, -20.166, 1.006)
pt3dadd(-59.4, 228.876, -20.179, 1.004)
pt3dadd(-59.4, 228.995, -20.191, 1.004)
pt3dadd(-59.411, 229.112, -20.2, 1.002)
pt3dadd(-59.452, 229.225, -20.2, 0.99)
pt3dadd(-59.491, 229.339, -20.2, 0.98)
pt3dadd(-59.564, 229.43, -20.216, 0.992)
pt3dadd(-59.641, 229.52, -20.234, 1.004)
pt3dadd(-59.719, 229.549, -20.306, 1.032)
pt3dadd(-59.797, 229.586, -20.368, 1.056)
pt3dadd(-59.874, 229.679, -20.378, 1.064)
pt3dadd(-59.95, 229.771, -20.388, 1.072)
pt3dadd(-60.025, 229.864, -20.398, 1.078)
pt3dadd(-60.136, 229.897, -20.4, 1.08)
pt3dadd(-60.254, 229.918, -20.4, 1.08)
pt3dadd(-60.372, 229.94, -20.4, 1.074)
pt3dadd(-60.469, 229.999, -20.4, 1.054)
pt3dadd(-60.541, 230.095, -20.4, 1.054)
pt3dadd(-60.613, 230.19, -20.4, 1.054)
pt3dadd(-60.685, 230.286, -20.4, 1.054)
}
}
proc shape3d_30() {
dend_5[12] { pt3dadd(-60.757, 230.382, -20.4, 1.054)
pt3dadd(-60.829, 230.473, -20.384, 1.05)
pt3dadd(-60.9, 230.557, -20.343, 1.038)
pt3dadd(-60.971, 230.641, -20.303, 1.026)
pt3dadd(-61.042, 230.725, -20.263, 1.014)
pt3dadd(-61.114, 230.813, -20.231, 0.998)
pt3dadd(-61.186, 230.908, -20.224, 0.978)
pt3dadd(-61.259, 231.002, -20.217, 0.956)
pt3dadd(-61.331, 231.097, -20.21, 0.936)
pt3dadd(-61.404, 231.193, -20.204, 0.914)
pt3dadd(-61.471, 231.292, -20.2, 0.896)
pt3dadd(-61.535, 231.394, -20.2, 0.882)
pt3dadd(-61.597, 231.496, -20.2, 0.866)
pt3dadd(-61.661, 231.598, -20.2, 0.852)
pt3dadd(-61.723, 231.7, -20.2, 0.838)
pt3dadd(-61.782, 231.805, -20.2, 0.83)
pt3dadd(-61.832, 231.913, -20.2, 0.836)
pt3dadd(-61.883, 232.022, -20.2, 0.84)
pt3dadd(-61.933, 232.132, -20.2, 0.846)
pt3dadd(-61.984, 232.24, -20.2, 0.85)
pt3dadd(-62.034, 232.349, -20.2, 0.858)
pt3dadd(-62.084, 232.458, -20.2, 0.882)
pt3dadd(-62.135, 232.567, -20.2, 0.904)
pt3dadd(-62.186, 232.675, -20.2, 0.928)
pt3dadd(-62.237, 232.784, -20.2, 0.952)
pt3dadd(-62.287, 232.894, -20.2, 0.976)
pt3dadd(-62.362, 232.987, -20.2, 1.002)
pt3dadd(-62.44, 233.078, -20.2, 1.026)
pt3dadd(-62.516, 233.17, -20.2, 1.052)
pt3dadd(-62.594, 233.261, -20.2, 1.078)
pt3dadd(-62.672, 233.352, -20.2, 1.102)
pt3dadd(-62.777, 233.41, -20.2, 1.136)
pt3dadd(-62.885, 233.462, -20.2, 1.17)
pt3dadd(-62.996, 233.507, -20.2, 1.188)
pt3dadd(-63.109, 233.546, -20.2, 1.198)
pt3dadd(-63.193, 233.61, -20.2, 1.2)
pt3dadd(-63.214, 233.728, -20.2, 1.18)
pt3dadd(-63.234, 233.846, -20.2, 1.16)
pt3dadd(-63.278, 233.957, -20.2, 1.122)
pt3dadd(-63.332, 234.065, -20.2, 1.078)
pt3dadd(-63.401, 234.161, -20.2, 1.012)
pt3dadd(-63.484, 234.247, -20.2, 0.928)
pt3dadd(-63.53, 234.358, -20.2, 0.914)
pt3dadd(-63.578, 234.468, -20.2, 0.9)
pt3dadd(-63.625, 234.578, -20.2, 0.886)
pt3dadd(-63.673, 234.688, -20.2, 0.872)
pt3dadd(-63.721, 234.798, -20.2, 0.858)
pt3dadd(-63.757, 234.912, -20.2, 0.854)
pt3dadd(-63.791, 235.027, -20.2, 0.854)
pt3dadd(-63.824, 235.142, -20.2, 0.854)
pt3dadd(-63.857, 235.259, -20.2, 0.854)
pt3dadd(-63.89, 235.374, -20.2, 0.854)
pt3dadd(-63.923, 235.489, -20.2, 0.854)
pt3dadd(-63.953, 235.606, -20.2, 0.864)
pt3dadd(-63.983, 235.721, -20.2, 0.872)
pt3dadd(-64.013, 235.837, -20.2, 0.88)
pt3dadd(-64.043, 235.954, -20.2, 0.89)
pt3dadd(-64.073, 236.07, -20.2, 0.898)
pt3dadd(-64.106, 236.185, -20.2, 0.908)
pt3dadd(-64.145, 236.299, -20.2, 0.922)
pt3dadd(-64.183, 236.412, -20.2, 0.936)
pt3dadd(-64.223, 236.526, -20.2, 0.95)
pt3dadd(-64.261, 236.64, -20.2, 0.964)
pt3dadd(-64.3, 236.753, -20.2, 0.976)
pt3dadd(-64.354, 236.861, -20.2, 1)
pt3dadd(-64.41, 236.966, -20.2, 1.024)
pt3dadd(-64.466, 237.072, -20.2, 1.048)
pt3dadd(-64.523, 237.178, -20.2, 1.072)
pt3dadd(-64.58, 237.283, -20.2, 1.096)
pt3dadd(-64.622, 237.395, -20.2, 1.116)
pt3dadd(-64.658, 237.51, -20.2, 1.134)
pt3dadd(-64.694, 237.624, -20.2, 1.152)
pt3dadd(-64.73, 237.738, -20.2, 1.17)
pt3dadd(-64.766, 237.853, -20.2, 1.188)
pt3dadd(-64.805, 237.966, -20.2, 1.206)
pt3dadd(-64.873, 238.064, -20.2, 1.226)
pt3dadd(-64.943, 238.163, -20.2, 1.246)
pt3dadd(-65.011, 238.261, -20.2, 1.266)
pt3dadd(-65.081, 238.36, -20.2, 1.286)
pt3dadd(-65.149, 238.458, -20.2, 1.306)
pt3dadd(-65.196, 238.568, -20.2, 1.3)
pt3dadd(-65.244, 238.678, -20.2, 1.296)
pt3dadd(-65.291, 238.788, -20.2, 1.292)
pt3dadd(-65.339, 238.898, -20.2, 1.286)
pt3dadd(-65.387, 239.009, -20.2, 1.282)
pt3dadd(-65.45, 239.11, -20.198, 1.278)
pt3dadd(-65.52, 239.207, -20.196, 1.272)
pt3dadd(-65.591, 239.304, -20.194, 1.266)
pt3dadd(-65.662, 239.401, -20.192, 1.262)
pt3dadd(-65.731, 239.498, -20.189, 1.256)
pt3dadd(-65.767, 239.61, -20.176, 1.248)
pt3dadd(-65.792, 239.725, -20.159, 1.238)
pt3dadd(-65.818, 239.84, -20.141, 1.228)
pt3dadd(-65.844, 239.957, -20.124, 1.22)
pt3dadd(-65.869, 240.072, -20.107, 1.21)
pt3dadd(-65.906, 240.185, -20.1, 1.208)
pt3dadd(-65.951, 240.296, -20.1, 1.212)
pt3dadd(-65.995, 240.408, -20.1, 1.218)
pt3dadd(-66.04, 240.518, -20.1, 1.222)
pt3dadd(-66.084, 240.63, -20.1, 1.226)
pt3dadd(-66.132, 240.74, -20.096, 1.232)
pt3dadd(-66.191, 240.84, -20.073, 1.244)
pt3dadd(-66.25, 240.942, -20.051, 1.254)
pt3dadd(-66.31, 241.043, -20.029, 1.266)
pt3dadd(-66.368, 241.144, -20.007, 1.278)
pt3dadd(-66.444, 241.235, -20, 1.28)
pt3dadd(-66.526, 241.322, -20, 1.28)
pt3dadd(-66.58, 241.427, -20, 1.256)
pt3dadd(-66.612, 241.542, -20, 1.216)
pt3dadd(-66.646, 241.656, -19.997, 1.166)
pt3dadd(-66.684, 241.766, -19.975, 1.068)
pt3dadd(-66.724, 241.87, -19.947, 0.972)
pt3dadd(-66.763, 241.895, -19.855, 0.886)
pt3dadd(-66.803, 241.92, -19.763, 0.8)
pt3dadd(-66.856, 241.92, -19.674, 0.734)
pt3dadd(-66.91, 241.92, -19.584, 0.684)
pt3dadd(-66.95, 241.937, -19.492, 0.674)
pt3dadd(-66.994, 241.991, -19.411, 0.614)
pt3dadd(-67.06, 242.059, -19.351, 0.552)
pt3dadd(-67.127, 242.143, -19.311, 0.612)
pt3dadd(-67.196, 242.236, -19.331, 0.676)
pt3dadd(-67.266, 242.305, -19.388, 0.678)
pt3dadd(-67.315, 242.39, -19.444, 0.686)
pt3dadd(-67.366, 242.488, -19.474, 0.784)
pt3dadd(-67.439, 242.568, -19.434, 0.862)
pt3dadd(-67.523, 242.645, -19.409, 0.936)
pt3dadd(-67.62, 242.716, -19.403, 1.01)
pt3dadd(-67.696, 242.802, -19.4, 1.066)
pt3dadd(-67.739, 242.914, -19.4, 1.1)
pt3dadd(-67.782, 243.026, -19.4, 1.132)
pt3dadd(-67.826, 243.138, -19.4, 1.158)
pt3dadd(-67.873, 243.248, -19.4, 1.17)
pt3dadd(-67.92, 243.359, -19.4, 1.18)
pt3dadd(-67.975, 243.466, -19.4, 1.1)
pt3dadd(-68.038, 243.568, -19.4, 1.08)
pt3dadd(-68.101, 243.67, -19.4, 1.06)
pt3dadd(-68.164, 243.772, -19.4, 1.04)
pt3dadd(-68.227, 243.874, -19.4, 1.022)
pt3dadd(-68.287, 243.977, -19.4, 1.002)
pt3dadd(-68.332, 244.088, -19.4, 0.988)
pt3dadd(-68.376, 244.2, -19.4, 0.974)
pt3dadd(-68.42, 244.312, -19.4, 0.96)
pt3dadd(-68.465, 244.423, -19.4, 0.946)
pt3dadd(-68.509, 244.535, -19.4, 0.932)
pt3dadd(-68.555, 244.646, -19.4, 0.93)
pt3dadd(-68.599, 244.757, -19.4, 0.93)
pt3dadd(-68.644, 244.868, -19.4, 0.93)
pt3dadd(-68.688, 244.98, -19.4, 0.93)
pt3dadd(-68.732, 245.092, -19.4, 0.93)
pt3dadd(-68.777, 245.203, -19.4, 0.932)
pt3dadd(-68.821, 245.315, -19.4, 0.942)
pt3dadd(-68.867, 245.426, -19.4, 0.952)
pt3dadd(-68.911, 245.537, -19.4, 0.96)
pt3dadd(-68.956, 245.648, -19.4, 0.97)
pt3dadd(-69, 245.76, -19.4, 0.98)
}
dend_5[13] {pt3dclear()
pt3dadd(-69, 245.76, -19.4, 0.98)
pt3dadd(-69.035, 245.806, -19.4, 0.986)
pt3dadd(-69.107, 245.902, -19.4, 1.002)
pt3dadd(-69.179, 245.998, -19.4, 1.016)
pt3dadd(-69.251, 246.094, -19.4, 1.032)
pt3dadd(-69.323, 246.19, -19.4, 1.046)
pt3dadd(-69.37, 246.296, -19.4, 1.06)
pt3dadd(-69.389, 246.415, -19.4, 1.074)
pt3dadd(-69.409, 246.534, -19.4, 1.086)
pt3dadd(-69.428, 246.652, -19.4, 1.098)
pt3dadd(-69.449, 246.77, -19.4, 1.11)
pt3dadd(-69.468, 246.889, -19.4, 1.122)
pt3dadd(-69.493, 247.004, -19.392, 1.136)
pt3dadd(-69.524, 247.118, -19.372, 1.152)
pt3dadd(-69.557, 247.231, -19.352, 1.166)
pt3dadd(-69.589, 247.344, -19.332, 1.182)
pt3dadd(-69.622, 247.457, -19.311, 1.196)
pt3dadd(-69.659, 247.57, -19.3, 1.208)
pt3dadd(-69.703, 247.681, -19.3, 1.212)
pt3dadd(-69.749, 247.793, -19.3, 1.216)
pt3dadd(-69.793, 247.903, -19.3, 1.222)
pt3dadd(-69.838, 248.015, -19.3, 1.226)
pt3dadd(-69.881, 248.126, -19.3, 1.23)
pt3dadd(-69.914, 248.242, -19.3, 1.208)
pt3dadd(-69.948, 248.357, -19.3, 1.188)
pt3dadd(-69.962, 248.476, -19.3, 1.148)
pt3dadd(-69.967, 248.596, -19.3, 1.096)
pt3dadd(-69.972, 248.716, -19.3, 1.044)
pt3dadd(-70.024, 248.82, -19.3, 0.978)
pt3dadd(-70.091, 248.918, -19.3, 0.908)
pt3dadd(-70.187, 248.98, -19.3, 0.854)
pt3dadd(-70.302, 249.012, -19.3, 0.814)
pt3dadd(-70.415, 249.05, -19.3, 0.778)
pt3dadd(-70.508, 249.126, -19.3, 0.778)
pt3dadd(-70.586, 249.216, -19.3, 0.786)
pt3dadd(-70.658, 249.312, -19.3, 0.796)
pt3dadd(-70.73, 249.408, -19.3, 0.806)
pt3dadd(-70.802, 249.504, -19.3, 0.816)
pt3dadd(-70.874, 249.6, -19.3, 0.826)
pt3dadd(-70.932, 249.704, -19.3, 0.832)
pt3dadd(-70.986, 249.811, -19.3, 0.838)
pt3dadd(-71.04, 249.919, -19.3, 0.842)
pt3dadd(-71.093, 250.026, -19.3, 0.846)
pt3dadd(-71.147, 250.134, -19.3, 0.852)
pt3dadd(-71.219, 250.228, -19.3, 0.848)
}
}
proc shape3d_31() {
dend_5[13] { pt3dadd(-71.308, 250.308, -19.3, 0.838)
pt3dadd(-71.396, 250.388, -19.3, 0.828)
pt3dadd(-71.485, 250.47, -19.3, 0.818)
pt3dadd(-71.574, 250.55, -19.3, 0.808)
pt3dadd(-71.664, 250.628, -19.292, 0.794)
pt3dadd(-71.754, 250.705, -19.277, 0.778)
pt3dadd(-71.845, 250.781, -19.263, 0.762)
pt3dadd(-71.936, 250.858, -19.248, 0.744)
pt3dadd(-72.028, 250.933, -19.233, 0.728)
pt3dadd(-72.127, 251, -19.226, 0.722)
pt3dadd(-72.227, 251.066, -19.219, 0.718)
pt3dadd(-72.326, 251.134, -19.212, 0.712)
pt3dadd(-72.426, 251.2, -19.206, 0.708)
pt3dadd(-72.518, 251.273, -19.2, 0.704)
pt3dadd(-72.584, 251.372, -19.2, 0.708)
pt3dadd(-72.65, 251.473, -19.2, 0.714)
pt3dadd(-72.716, 251.573, -19.2, 0.718)
pt3dadd(-72.782, 251.674, -19.2, 0.724)
pt3dadd(-72.851, 251.772, -19.197, 0.728)
pt3dadd(-72.93, 251.857, -19.174, 0.728)
pt3dadd(-73.009, 251.942, -19.151, 0.728)
pt3dadd(-73.09, 252.028, -19.128, 0.728)
pt3dadd(-73.169, 252.114, -19.105, 0.728)
pt3dadd(-73.226, 252.217, -19.1, 0.72)
pt3dadd(-73.277, 252.326, -19.1, 0.712)
pt3dadd(-73.327, 252.434, -19.1, 0.702)
pt3dadd(-73.378, 252.544, -19.1, 0.692)
pt3dadd(-73.428, 252.653, -19.1, 0.682)
pt3dadd(-73.463, 252.767, -19.1, 0.676)
pt3dadd(-73.483, 252.884, -19.1, 0.672)
pt3dadd(-73.502, 253.003, -19.1, 0.668)
pt3dadd(-73.523, 253.121, -19.1, 0.664)
pt3dadd(-73.542, 253.24, -19.1, 0.66)
pt3dadd(-73.561, 253.358, -19.1, 0.656)
pt3dadd(-73.595, 253.472, -19.1, 0.65)
pt3dadd(-73.645, 253.582, -19.1, 0.646)
pt3dadd(-73.696, 253.69, -19.1, 0.642)
pt3dadd(-73.746, 253.799, -19.1, 0.636)
pt3dadd(-73.796, 253.908, -19.1, 0.632)
pt3dadd(-73.849, 254.016, -19.1, 0.628)
pt3dadd(-73.912, 254.118, -19.1, 0.628)
pt3dadd(-73.975, 254.22, -19.1, 0.628)
pt3dadd(-74.038, 254.322, -19.1, 0.628)
pt3dadd(-74.101, 254.424, -19.1, 0.628)
pt3dadd(-74.165, 254.526, -19.1, 0.628)
pt3dadd(-74.243, 254.617, -19.1, 0.622)
pt3dadd(-74.321, 254.708, -19.1, 0.618)
pt3dadd(-74.399, 254.8, -19.1, 0.612)
pt3dadd(-74.476, 254.891, -19.1, 0.608)
pt3dadd(-74.552, 254.983, -19.1, 0.602)
pt3dadd(-74.612, 255.088, -19.1, 0.602)
pt3dadd(-74.672, 255.192, -19.1, 0.602)
pt3dadd(-74.732, 255.295, -19.1, 0.602)
pt3dadd(-74.792, 255.4, -19.1, 0.602)
pt3dadd(-74.852, 255.504, -19.1, 0.602)
pt3dadd(-74.921, 255.602, -19.1, 0.608)
pt3dadd(-74.989, 255.7, -19.1, 0.612)
pt3dadd(-75.059, 255.798, -19.1, 0.618)
pt3dadd(-75.127, 255.896, -19.1, 0.622)
pt3dadd(-75.197, 255.995, -19.1, 0.628)
pt3dadd(-75.302, 256.05, -19.1, 0.642)
pt3dadd(-75.409, 256.104, -19.1, 0.656)
pt3dadd(-75.516, 256.158, -19.1, 0.67)
pt3dadd(-75.624, 256.212, -19.1, 0.684)
pt3dadd(-75.731, 256.266, -19.1, 0.7)
pt3dadd(-75.824, 256.339, -19.1, 0.726)
pt3dadd(-75.913, 256.42, -19.1, 0.756)
pt3dadd(-76.002, 256.501, -19.1, 0.786)
pt3dadd(-76.091, 256.582, -19.1, 0.816)
pt3dadd(-76.181, 256.662, -19.1, 0.848)
pt3dadd(-76.274, 256.736, -19.1, 0.87)
pt3dadd(-76.37, 256.808, -19.1, 0.89)
pt3dadd(-76.466, 256.88, -19.1, 0.91)
pt3dadd(-76.562, 256.952, -19.1, 0.93)
pt3dadd(-76.658, 257.024, -19.1, 0.95)
pt3dadd(-76.74, 257.111, -19.1, 0.954)
pt3dadd(-76.818, 257.202, -19.1, 0.954)
pt3dadd(-76.896, 257.293, -19.1, 0.954)
pt3dadd(-76.974, 257.386, -19.1, 0.954)
pt3dadd(-77.052, 257.477, -19.1, 0.954)
pt3dadd(-77.1, 257.585, -19.095, 0.934)
pt3dadd(-77.141, 257.698, -19.088, 0.91)
pt3dadd(-77.182, 257.81, -19.082, 0.886)
pt3dadd(-77.222, 257.922, -19.076, 0.862)
pt3dadd(-77.263, 258.035, -19.069, 0.838)
pt3dadd(-77.28, 258.149, -19.05, 0.804)
pt3dadd(-77.28, 258.265, -19.023, 0.762)
pt3dadd(-77.28, 258.38, -19, 0.724)
pt3dadd(-77.28, 258.5, -19, 0.698)
pt3dadd(-77.28, 258.62, -19, 0.674)
pt3dadd(-77.287, 258.739, -19, 0.65)
pt3dadd(-77.327, 258.853, -19, 0.628)
pt3dadd(-77.366, 258.966, -19, 0.606)
pt3dadd(-77.441, 259.058, -19, 0.574)
pt3dadd(-77.522, 259.147, -19, 0.538)
pt3dadd(-77.584, 259.248, -19, 0.516)
pt3dadd(-77.633, 259.357, -19, 0.504)
pt3dadd(-77.663, 259.474, -19, 0.508)
pt3dadd(-77.693, 259.59, -19, 0.512)
pt3dadd(-77.723, 259.706, -19, 0.516)
pt3dadd(-77.754, 259.822, -19, 0.52)
pt3dadd(-77.784, 259.938, -19, 0.524)
pt3dadd(-77.815, 260.054, -19, 0.546)
pt3dadd(-77.848, 260.17, -19, 0.588)
pt3dadd(-77.88, 260.285, -19, 0.628)
pt3dadd(-77.885, 260.405, -19, 0.654)
pt3dadd(-77.89, 260.525, -19, 0.68)
pt3dadd(-77.908, 260.636, -19, 0.708)
pt3dadd(-78.007, 260.705, -19, 0.744)
pt3dadd(-78.106, 260.772, -19, 0.778)
pt3dadd(-78.209, 260.833, -19, 0.802)
pt3dadd(-78.313, 260.894, -19, 0.824)
pt3dadd(-78.373, 260.994, -19, 0.85)
pt3dadd(-78.422, 261.103, -19, 0.876)
pt3dadd(-78.472, 261.212, -19, 0.904)
pt3dadd(-78.521, 261.322, -19, 0.93)
pt3dadd(-78.596, 261.415, -19, 0.976)
pt3dadd(-78.672, 261.509, -19, 1.024)
pt3dadd(-78.715, 261.618, -18.986, 1.026)
pt3dadd(-78.767, 261.724, -18.967, 1.01)
pt3dadd(-78.818, 261.829, -18.948, 0.994)
pt3dadd(-78.87, 261.936, -18.928, 0.978)
pt3dadd(-78.922, 262.042, -18.909, 0.962)
pt3dadd(-78.948, 262.15, -18.881, 0.942)
pt3dadd(-78.95, 262.261, -18.843, 0.918)
pt3dadd(-78.953, 262.373, -18.805, 0.894)
pt3dadd(-78.955, 262.483, -18.767, 0.87)
pt3dadd(-78.958, 262.595, -18.729, 0.848)
pt3dadd(-78.96, 262.708, -18.698, 0.828)
pt3dadd(-78.96, 262.826, -18.687, 0.824)
pt3dadd(-78.96, 262.946, -18.677, 0.82)
pt3dadd(-78.96, 263.065, -18.666, 0.816)
pt3dadd(-78.96, 263.185, -18.656, 0.812)
pt3dadd(-78.96, 263.304, -18.645, 0.808)
pt3dadd(-78.96, 263.423, -18.635, 0.804)
pt3dadd(-78.979, 263.54, -18.623, 0.8)
pt3dadd(-79.001, 263.658, -18.611, 0.796)
pt3dadd(-79.022, 263.774, -18.598, 0.79)
pt3dadd(-79.045, 263.892, -18.586, 0.786)
pt3dadd(-79.067, 264.01, -18.574, 0.782)
pt3dadd(-79.087, 264.126, -18.562, 0.776)
pt3dadd(-79.106, 264.244, -18.55, 0.772)
pt3dadd(-79.126, 264.361, -18.538, 0.768)
pt3dadd(-79.145, 264.479, -18.526, 0.762)
pt3dadd(-79.164, 264.596, -18.514, 0.758)
pt3dadd(-79.183, 264.714, -18.502, 0.754)
pt3dadd(-79.189, 264.833, -18.489, 0.75)
pt3dadd(-79.19, 264.952, -18.477, 0.746)
pt3dadd(-79.193, 265.07, -18.464, 0.742)
pt3dadd(-79.195, 265.19, -18.451, 0.738)
pt3dadd(-79.198, 265.309, -18.439, 0.734)
pt3dadd(-79.199, 265.428, -18.426, 0.73)
pt3dadd(-79.199, 265.546, -18.408, 0.732)
pt3dadd(-79.196, 265.663, -18.387, 0.736)
pt3dadd(-79.194, 265.781, -18.366, 0.74)
pt3dadd(-79.192, 265.897, -18.345, 0.744)
pt3dadd(-79.189, 266.015, -18.324, 0.748)
pt3dadd(-79.187, 266.132, -18.303, 0.752)
pt3dadd(-79.171, 266.251, -18.3, 0.76)
pt3dadd(-79.154, 266.37, -18.3, 0.768)
pt3dadd(-79.138, 266.489, -18.3, 0.776)
pt3dadd(-79.12, 266.608, -18.3, 0.784)
pt3dadd(-79.103, 266.726, -18.3, 0.794)
pt3dadd(-79.085, 266.844, -18.3, 0.802)
pt3dadd(-79.08, 266.964, -18.299, 0.802)
pt3dadd(-79.08, 267.084, -18.297, 0.798)
pt3dadd(-79.08, 267.204, -18.296, 0.794)
pt3dadd(-79.08, 267.324, -18.294, 0.79)
pt3dadd(-79.08, 267.444, -18.292, 0.786)
pt3dadd(-79.08, 267.564, -18.291, 0.782)
pt3dadd(-79.08, 267.684, -18.289, 0.78)
pt3dadd(-79.08, 267.799, -18.265, 0.76)
pt3dadd(-79.08, 267.914, -18.235, 0.738)
pt3dadd(-79.08, 268.028, -18.205, 0.716)
pt3dadd(-79.08, 268.144, -18.175, 0.692)
pt3dadd(-79.08, 268.258, -18.145, 0.67)
pt3dadd(-79.078, 268.37, -18.112, 0.646)
pt3dadd(-79.07, 268.477, -18.068, 0.616)
pt3dadd(-79.062, 268.585, -18.023, 0.586)
pt3dadd(-79.055, 268.692, -17.978, 0.556)
pt3dadd(-79.046, 268.799, -17.934, 0.526)
pt3dadd(-79.032, 268.908, -17.9, 0.494)
pt3dadd(-79, 269.023, -17.9, 0.464)
pt3dadd(-78.966, 269.138, -17.9, 0.432)
pt3dadd(-78.964, 269.258, -17.9, 0.442)
pt3dadd(-78.968, 269.378, -17.9, 0.458)
pt3dadd(-78.973, 269.497, -17.9, 0.476)
pt3dadd(-79.015, 269.608, -17.885, 0.51)
pt3dadd(-79.06, 269.718, -17.869, 0.546)
pt3dadd(-79.072, 269.82, -17.822, 0.572)
pt3dadd(-79.079, 269.922, -17.769, 0.596)
pt3dadd(-79.08, 270.01, -17.701, 0.602)
pt3dadd(-79.08, 270.092, -17.629, 0.602)
pt3dadd(-79.08, 270.175, -17.556, 0.602)
pt3dadd(-79.08, 270.266, -17.5, 0.604)
pt3dadd(-79.08, 270.386, -17.5, 0.612)
pt3dadd(-79.08, 270.506, -17.5, 0.622)
pt3dadd(-79.08, 270.626, -17.5, 0.622)
pt3dadd(-79.08, 270.745, -17.493, 0.602)
pt3dadd(-79.08, 270.859, -17.464, 0.598)
}
}
proc shape3d_32() {
dend_5[13] { pt3dadd(-79.08, 270.974, -17.434, 0.592)
pt3dadd(-79.08, 271.088, -17.404, 0.588)
pt3dadd(-79.08, 271.204, -17.374, 0.584)
pt3dadd(-79.08, 271.318, -17.344, 0.58)
pt3dadd(-79.099, 271.433, -17.326, 0.566)
pt3dadd(-79.13, 271.548, -17.315, 0.546)
pt3dadd(-79.16, 271.663, -17.304, 0.528)
pt3dadd(-79.19, 271.778, -17.292, 0.508)
pt3dadd(-79.2, 271.897, -17.29, 0.502)
pt3dadd(-79.2, 272.017, -17.292, 0.502)
pt3dadd(-79.2, 272.137, -17.293, 0.502)
pt3dadd(-79.2, 272.257, -17.295, 0.502)
pt3dadd(-79.2, 272.377, -17.296, 0.502)
pt3dadd(-79.2, 272.497, -17.298, 0.502)
pt3dadd(-79.2, 272.617, -17.3, 0.502)
pt3dadd(-79.2, 272.737, -17.3, 0.502)
pt3dadd(-79.2, 272.857, -17.3, 0.502)
pt3dadd(-79.2, 272.977, -17.3, 0.502)
pt3dadd(-79.2, 273.097, -17.3, 0.502)
pt3dadd(-79.2, 273.217, -17.3, 0.502)
pt3dadd(-79.2, 273.337, -17.3, 0.502)
pt3dadd(-79.2, 273.457, -17.3, 0.502)
pt3dadd(-79.184, 273.576, -17.3, 0.508)
pt3dadd(-79.164, 273.694, -17.3, 0.518)
pt3dadd(-79.145, 273.812, -17.3, 0.526)
pt3dadd(-79.124, 273.931, -17.3, 0.534)
pt3dadd(-79.105, 274.049, -17.3, 0.542)
pt3dadd(-79.086, 274.168, -17.3, 0.55)
pt3dadd(-79.08, 274.283, -17.278, 0.562)
pt3dadd(-79.08, 274.398, -17.249, 0.576)
pt3dadd(-79.08, 274.512, -17.219, 0.59)
pt3dadd(-79.08, 274.627, -17.189, 0.602)
pt3dadd(-79.08, 274.741, -17.159, 0.616)
pt3dadd(-79.08, 274.855, -17.127, 0.63)
pt3dadd(-79.08, 274.962, -17.082, 0.644)
pt3dadd(-79.08, 275.069, -17.038, 0.658)
pt3dadd(-79.08, 275.177, -16.993, 0.674)
pt3dadd(-79.08, 275.284, -16.948, 0.688)
pt3dadd(-79.08, 275.392, -16.904, 0.702)
pt3dadd(-79.08, 275.498, -16.859, 0.724)
pt3dadd(-79.08, 275.606, -16.814, 0.746)
pt3dadd(-79.108, 275.718, -16.8, 0.746)
pt3dadd(-79.147, 275.831, -16.8, 0.736)
pt3dadd(-79.199, 275.924, -16.779, 0.718)
pt3dadd(-79.274, 275.977, -16.716, 0.69)
pt3dadd(-79.31, 276.024, -16.635, 0.658)
pt3dadd(-79.316, 276.066, -16.541, 0.626)
pt3dadd(-79.331, 276.122, -16.457, 0.59)
pt3dadd(-79.366, 276.205, -16.393, 0.548)
pt3dadd(-79.418, 276.236, -16.309, 0.528)
pt3dadd(-79.439, 276.24, -16.211, 0.528)
pt3dadd(-79.44, 276.253, -16.112, 0.528)
pt3dadd(-79.44, 276.289, -16.017, 0.558)
pt3dadd(-79.44, 276.343, -15.927, 0.608)
pt3dadd(-79.44, 276.412, -15.846, 0.628)
pt3dadd(-79.44, 276.521, -15.808, 0.582)
pt3dadd(-79.44, 276.641, -15.8, 0.502)
pt3dadd(-79.44, 276.761, -15.8, 0.436)
pt3dadd(-79.44, 276.881, -15.8, 0.394)
pt3dadd(-79.445, 277.001, -15.8, 0.386)
pt3dadd(-79.47, 277.116, -15.807, 0.432)
pt3dadd(-79.544, 277.189, -15.842, 0.542)
pt3dadd(-79.624, 277.2, -15.916, 0.638)
pt3dadd(-79.668, 277.216, -16.006, 0.678)
pt3dadd(-79.68, 277.266, -16.094, 0.678)
pt3dadd(-79.68, 277.367, -16.143, 0.684)
pt3dadd(-79.68, 277.48, -16.177, 0.696)
pt3dadd(-79.68, 277.595, -16.2, 0.712)
pt3dadd(-79.68, 277.715, -16.2, 0.746)
pt3dadd(-79.68, 277.835, -16.2, 0.78)
pt3dadd(-79.68, 277.955, -16.2, 0.84)
pt3dadd(-79.68, 278.075, -16.2, 0.932)
pt3dadd(-79.68, 278.195, -16.2, 0.938)
pt3dadd(-79.68, 278.315, -16.2, 0.946)
pt3dadd(-79.68, 278.435, -16.2, 0.952)
pt3dadd(-79.68, 278.555, -16.2, 0.96)
pt3dadd(-79.68, 278.675, -16.2, 0.968)
pt3dadd(-79.68, 278.795, -16.2, 0.974)
pt3dadd(-79.682, 278.912, -16.189, 0.972)
pt3dadd(-79.69, 279.022, -16.149, 0.948)
pt3dadd(-79.698, 279.132, -16.11, 0.922)
pt3dadd(-79.705, 279.242, -16.071, 0.898)
pt3dadd(-79.714, 279.352, -16.031, 0.874)
pt3dadd(-79.722, 279.463, -15.996, 0.848)
pt3dadd(-79.738, 279.581, -15.978, 0.816)
pt3dadd(-79.752, 279.697, -15.96, 0.784)
pt3dadd(-79.766, 279.815, -15.941, 0.75)
pt3dadd(-79.781, 279.931, -15.923, 0.718)
pt3dadd(-79.796, 280.049, -15.905, 0.686)
pt3dadd(-79.811, 280.168, -15.9, 0.596)
pt3dadd(-79.841, 280.283, -15.9, 0.632)
pt3dadd(-79.89, 280.392, -15.9, 0.764)
pt3dadd(-79.914, 280.51, -15.9, 0.856)
pt3dadd(-79.92, 280.628, -15.893, 0.894)
pt3dadd(-79.92, 280.74, -15.859, 0.882)
pt3dadd(-79.92, 280.789, -15.77, 0.812)
pt3dadd(-79.925, 280.8, -15.671, 0.736)
pt3dadd(-79.948, 280.807, -15.574, 0.69)
pt3dadd(-80.004, 280.846, -15.494, 0.678)
pt3dadd(-80.035, 280.898, -15.41, 0.662)
pt3dadd(-80.052, 280.91, -15.312, 0.63)
pt3dadd(-80.068, 280.916, -15.213, 0.602)
pt3dadd(-80.087, 280.916, -15.115, 0.566)
pt3dadd(-80.124, 280.898, -15.022, 0.508)
pt3dadd(-80.16, 280.879, -14.928, 0.448)
pt3dadd(-80.16, 280.859, -14.829, 0.386)
pt3dadd(-80.16, 280.842, -14.731, 0.326)
pt3dadd(-80.16, 280.924, -14.658, 0.29)
pt3dadd(-80.16, 281.005, -14.585, 0.254)
pt3dadd(-80.16, 281.12, -14.561, 0.246)
pt3dadd(-80.16, 281.238, -14.543, 0.24)
pt3dadd(-80.16, 281.356, -14.525, 0.234)
pt3dadd(-80.16, 281.474, -14.507, 0.228)
pt3dadd(-80.16, 281.593, -14.5, 0.226)
pt3dadd(-80.16, 281.713, -14.5, 0.226)
pt3dadd(-80.16, 281.833, -14.5, 0.226)
pt3dadd(-80.16, 281.953, -14.5, 0.226)
pt3dadd(-80.16, 282.072, -14.51, 0.236)
pt3dadd(-80.16, 282.191, -14.526, 0.252)
pt3dadd(-80.16, 282.31, -14.543, 0.27)
pt3dadd(-80.16, 282.427, -14.559, 0.286)
pt3dadd(-80.16, 282.546, -14.576, 0.302)
pt3dadd(-80.16, 282.665, -14.592, 0.318)
pt3dadd(-80.16, 282.781, -14.615, 0.346)
pt3dadd(-80.16, 282.896, -14.642, 0.38)
pt3dadd(-80.16, 283.012, -14.67, 0.416)
pt3dadd(-80.16, 283.127, -14.697, 0.452)
pt3dadd(-80.16, 283.242, -14.725, 0.488)
pt3dadd(-80.16, 283.358, -14.752, 0.522)
pt3dadd(-80.172, 283.476, -14.762, 0.564)
pt3dadd(-80.185, 283.595, -14.77, 0.606)
pt3dadd(-80.198, 283.714, -14.777, 0.648)
pt3dadd(-80.213, 283.834, -14.785, 0.69)
pt3dadd(-80.226, 283.952, -14.792, 0.732)
pt3dadd(-80.239, 284.071, -14.799, 0.776)
pt3dadd(-80.26, 284.189, -14.8, 0.832)
pt3dadd(-80.28, 284.308, -14.8, 0.89)
pt3dadd(-80.309, 284.423, -14.8, 0.936)
pt3dadd(-80.356, 284.533, -14.8, 0.958)
pt3dadd(-80.404, 284.642, -14.8, 0.98)
pt3dadd(-80.497, 284.718, -14.8, 0.98)
pt3dadd(-80.591, 284.792, -14.8, 0.98)
pt3dadd(-80.698, 284.848, -14.8, 0.97)
pt3dadd(-80.804, 284.902, -14.8, 0.958)
pt3dadd(-80.885, 284.987, -14.8, 0.94)
pt3dadd(-80.952, 285.086, -14.8, 0.92)
pt3dadd(-81.018, 285.186, -14.8, 0.898)
pt3dadd(-81.082, 285.287, -14.8, 0.878)
pt3dadd(-81.096, 285.406, -14.8, 0.86)
pt3dadd(-81.11, 285.526, -14.8, 0.84)
pt3dadd(-81.126, 285.644, -14.8, 0.818)
pt3dadd(-81.152, 285.761, -14.8, 0.808)
pt3dadd(-81.192, 285.874, -14.8, 0.82)
pt3dadd(-81.23, 285.988, -14.8, 0.828)
pt3dadd(-81.257, 286.104, -14.8, 0.818)
pt3dadd(-81.282, 286.222, -14.8, 0.808)
pt3dadd(-81.353, 286.309, -14.8, 0.796)
pt3dadd(-81.452, 286.376, -14.8, 0.784)
pt3dadd(-81.553, 286.441, -14.8, 0.784)
pt3dadd(-81.656, 286.502, -14.8, 0.796)
pt3dadd(-81.763, 286.556, -14.8, 0.81)
pt3dadd(-81.877, 286.594, -14.8, 0.836)
pt3dadd(-81.991, 286.63, -14.8, 0.86)
pt3dadd(-82.105, 286.667, -14.8, 0.886)
pt3dadd(-82.189, 286.728, -14.8, 0.918)
pt3dadd(-82.199, 286.848, -14.8, 0.962)
pt3dadd(-82.208, 286.967, -14.8, 1.008)
pt3dadd(-82.23, 287.084, -14.8, 1.046)
pt3dadd(-82.255, 287.202, -14.8, 1.04)
pt3dadd(-82.277, 287.32, -14.8, 1.02)
pt3dadd(-82.3, 287.437, -14.8, 0.998)
pt3dadd(-82.321, 287.556, -14.8, 0.978)
pt3dadd(-82.344, 287.674, -14.8, 0.956)
pt3dadd(-82.366, 287.791, -14.8, 0.936)
pt3dadd(-82.396, 287.908, -14.8, 0.902)
pt3dadd(-82.429, 288.023, -14.8, 0.862)
pt3dadd(-82.462, 288.138, -14.8, 0.822)
pt3dadd(-82.495, 288.253, -14.8, 0.782)
pt3dadd(-82.528, 288.368, -14.8, 0.742)
pt3dadd(-82.562, 288.484, -14.799, 0.702)
pt3dadd(-82.621, 288.584, -14.777, 0.656)
pt3dadd(-82.681, 288.685, -14.755, 0.612)
pt3dadd(-82.74, 288.786, -14.733, 0.568)
pt3dadd(-82.799, 288.887, -14.71, 0.522)
pt3dadd(-82.858, 288.991, -14.7, 0.494)
pt3dadd(-82.914, 289.097, -14.7, 0.48)
pt3dadd(-82.97, 289.202, -14.7, 0.466)
pt3dadd(-83.028, 289.308, -14.7, 0.45)
pt3dadd(-83.084, 289.414, -14.7, 0.436)
pt3dadd(-83.132, 289.523, -14.7, 0.426)
pt3dadd(-83.156, 289.639, -14.692, 0.444)
pt3dadd(-83.16, 289.756, -14.668, 0.452)
pt3dadd(-83.185, 289.858, -14.623, 0.5)
pt3dadd(-83.245, 289.956, -14.617, 0.612)
pt3dadd(-83.276, 290.02, -14.692, 0.67)
pt3dadd(-83.293, 290.04, -14.789, 0.678)
pt3dadd(-83.346, 290.066, -14.872, 0.678)
pt3dadd(-83.436, 290.124, -14.914, 0.678)
pt3dadd(-83.533, 290.167, -14.959, 0.678)
pt3dadd(-83.606, 290.252, -14.987, 0.666)
}
}
proc shape3d_33() {
dend_5[13] { pt3dadd(-83.677, 290.345, -15.01, 0.654)
pt3dadd(-83.773, 290.396, -15.053, 0.626)
pt3dadd(-83.869, 290.449, -15.092, 0.584)
pt3dadd(-83.959, 290.525, -15.093, 0.522)
pt3dadd(-84.039, 290.612, -15.078, 0.51)
pt3dadd(-84.118, 290.701, -15.063, 0.5)
pt3dadd(-84.198, 290.789, -15.049, 0.488)
pt3dadd(-84.277, 290.878, -15.034, 0.478)
pt3dadd(-84.32, 290.981, -15, 0.464)
pt3dadd(-84.361, 291.086, -14.965, 0.452)
pt3dadd(-84.38, 291.199, -14.934, 0.452)
pt3dadd(-84.398, 291.311, -14.903, 0.452)
pt3dadd(-84.431, 291.426, -14.904, 0.462)
pt3dadd(-84.466, 291.54, -14.909, 0.472)
pt3dadd(-84.484, 291.637, -14.953, 0.492)
pt3dadd(-84.49, 291.721, -15.024, 0.516)
pt3dadd(-84.525, 291.798, -15.092, 0.562)
pt3dadd(-84.585, 291.878, -15.139, 0.612)
pt3dadd(-84.648, 291.979, -15.153, 0.632)
pt3dadd(-84.711, 292.08, -15.168, 0.654)
pt3dadd(-84.774, 292.181, -15.182, 0.676)
pt3dadd(-84.837, 292.28, -15.196, 0.698)
pt3dadd(-84.898, 292.384, -15.2, 0.762)
pt3dadd(-84.959, 292.487, -15.2, 0.842)
pt3dadd(-85.008, 292.596, -15.2, 0.944)
pt3dadd(-85.048, 292.709, -15.2, 1.062)
pt3dadd(-85.083, 292.824, -15.2, 1.176)
pt3dadd(-85.098, 292.943, -15.2, 1.278)
pt3dadd(-85.112, 293.062, -15.2, 1.38)
pt3dadd(-85.17, 293.155, -15.2, 1.46)
pt3dadd(-85.269, 293.222, -15.2, 1.52)
pt3dadd(-85.375, 293.269, -15.2, 1.552)
pt3dadd(-85.495, 293.276, -15.2, 1.54)
pt3dadd(-85.597, 293.311, -15.221, 1.52)
pt3dadd(-85.679, 293.38, -15.267, 1.496)
pt3dadd(-85.76, 293.448, -15.313, 1.472)
pt3dadd(-85.842, 293.516, -15.36, 1.446)
pt3dadd(-85.933, 293.567, -15.404, 1.426)
pt3dadd(-86.04, 293.587, -15.447, 1.41)
pt3dadd(-86.147, 293.606, -15.489, 1.394)
pt3dadd(-86.254, 293.626, -15.531, 1.378)
pt3dadd(-86.361, 293.646, -15.573, 1.362)
pt3dadd(-86.46, 293.695, -15.605, 1.334)
pt3dadd(-86.554, 293.764, -15.63, 1.3)
pt3dadd(-86.649, 293.831, -15.656, 1.266)
pt3dadd(-86.743, 293.898, -15.681, 1.23)
pt3dadd(-86.84, 293.963, -15.7, 1.18)
pt3dadd(-86.944, 294.024, -15.7, 1.09)
pt3dadd(-87.047, 294.084, -15.703, 0.996)
pt3dadd(-87.152, 294.125, -15.737, 0.892)
pt3dadd(-87.248, 294.176, -15.769, 0.796)
pt3dadd(-87.301, 294.282, -15.786, 0.746)
pt3dadd(-87.347, 294.39, -15.8, 0.702)
pt3dadd(-87.352, 294.51, -15.8, 0.694)
pt3dadd(-87.357, 294.63, -15.8, 0.684)
pt3dadd(-87.373, 294.746, -15.8, 0.676)
pt3dadd(-87.427, 294.854, -15.8, 0.67)
pt3dadd(-87.481, 294.961, -15.8, 0.662)
pt3dadd(-87.535, 295.068, -15.8, 0.656)
pt3dadd(-87.6, 295.169, -15.8, 0.634)
pt3dadd(-87.674, 295.262, -15.8, 0.6)
pt3dadd(-87.749, 295.34, -15.826, 0.56)
pt3dadd(-87.822, 295.391, -15.892, 0.518)
pt3dadd(-87.898, 295.441, -15.957, 0.476)
pt3dadd(-88.008, 295.481, -15.978, 0.438)
pt3dadd(-88.119, 295.52, -16, 0.402)
pt3dadd(-88.22, 295.573, -16.014, 0.376)
pt3dadd(-88.301, 295.628, -16.071, 0.376)
pt3dadd(-88.383, 295.685, -16.128, 0.376)
pt3dadd(-88.464, 295.74, -16.185, 0.376)
pt3dadd(-88.548, 295.795, -16.239, 0.376)
pt3dadd(-88.643, 295.854, -16.276, 0.376)
pt3dadd(-88.736, 295.921, -16.3, 0.376)
pt3dadd(-88.824, 296.002, -16.3, 0.376)
pt3dadd(-88.909, 296.077, -16.313, 0.376)
pt3dadd(-88.985, 296.131, -16.377, 0.376)
pt3dadd(-89.047, 296.168, -16.453, 0.376)
pt3dadd(-89.093, 296.188, -16.544, 0.376)
pt3dadd(-89.154, 296.227, -16.613, 0.38)
pt3dadd(-89.243, 296.298, -16.646, 0.388)
pt3dadd(-89.331, 296.369, -16.679, 0.396)
pt3dadd(-89.427, 296.43, -16.706, 0.406)
pt3dadd(-89.537, 296.476, -16.722, 0.418)
pt3dadd(-89.64, 296.52, -16.75, 0.426)
pt3dadd(-89.718, 296.58, -16.807, 0.418)
pt3dadd(-89.79, 296.645, -16.865, 0.406)
pt3dadd(-89.863, 296.711, -16.923, 0.394)
pt3dadd(-89.935, 296.777, -16.98, 0.382)
pt3dadd(-90.03, 296.836, -17, 0.31)
pt3dadd(-90.145, 296.87, -17, 0.252)
pt3dadd(-90.258, 296.909, -17, 0.27)
pt3dadd(-90.34, 296.988, -17.009, 0.364)
pt3dadd(-90.36, 297.079, -17.065, 0.434)
pt3dadd(-90.36, 297.114, -17.159, 0.452)
pt3dadd(-90.36, 297.128, -17.258, 0.452)
pt3dadd(-90.36, 297.17, -17.351, 0.452)
pt3dadd(-90.336, 297.272, -17.393, 0.452)
pt3dadd(-90.289, 297.382, -17.4, 0.452)
pt3dadd(-90.253, 297.496, -17.4, 0.452)
pt3dadd(-90.24, 297.614, -17.402, 0.452)
pt3dadd(-90.24, 297.731, -17.421, 0.452)
pt3dadd(-90.24, 297.812, -17.487, 0.468)
pt3dadd(-90.24, 297.851, -17.582, 0.5)
pt3dadd(-90.244, 297.911, -17.665, 0.52)
pt3dadd(-90.284, 298.013, -17.698, 0.502)
pt3dadd(-90.386, 298.07, -17.7, 0.506)
pt3dadd(-90.501, 298.104, -17.695, 0.516)
pt3dadd(-90.587, 298.16, -17.655, 0.502)
pt3dadd(-90.569, 298.195, -17.562, 0.52)
pt3dadd(-90.48, 298.2, -17.5, 0.502)
}
dend_5[14] {pt3dclear()
pt3dadd(-69, 245.76, -19.4, 0.98)
pt3dadd(-69.013, 245.863, -19.4, 0.996)
pt3dadd(-69.028, 245.982, -19.4, 1.014)
pt3dadd(-69.058, 246.092, -19.4, 1.034)
pt3dadd(-69.156, 246.161, -19.4, 1.058)
pt3dadd(-69.256, 246.228, -19.4, 1.08)
pt3dadd(-69.365, 246.272, -19.416, 1.056)
pt3dadd(-69.474, 246.318, -19.432, 1.03)
pt3dadd(-69.571, 246.34, -19.487, 0.98)
pt3dadd(-69.667, 246.36, -19.545, 0.93)
pt3dadd(-69.725, 246.36, -19.632, 0.916)
pt3dadd(-69.784, 246.36, -19.72, 0.902)
pt3dadd(-69.841, 246.36, -19.808, 0.888)
pt3dadd(-69.89, 246.36, -19.898, 0.882)
pt3dadd(-69.924, 246.36, -19.994, 0.892)
pt3dadd(-69.956, 246.36, -20.09, 0.902)
pt3dadd(-69.96, 246.36, -20.19, 0.95)
pt3dadd(-69.983, 246.398, -20.282, 0.958)
pt3dadd(-70.008, 246.44, -20.373, 0.964)
pt3dadd(-70.033, 246.482, -20.465, 0.97)
pt3dadd(-70.058, 246.524, -20.556, 0.974)
pt3dadd(-70.08, 246.564, -20.648, 0.98)
pt3dadd(-70.08, 246.583, -20.747, 0.98)
pt3dadd(-70.08, 246.604, -20.845, 0.98)
pt3dadd(-70.11, 246.655, -20.924, 0.988)
pt3dadd(-70.163, 246.732, -20.988, 1.002)
pt3dadd(-70.259, 246.788, -21.013, 1.014)
pt3dadd(-70.364, 246.842, -21.03, 1.026)
pt3dadd(-70.433, 246.928, -21.062, 1.018)
pt3dadd(-70.49, 247.024, -21.099, 1.004)
pt3dadd(-70.591, 247.088, -21.1, 0.938)
pt3dadd(-70.678, 247.166, -21.112, 0.89)
pt3dadd(-70.751, 247.258, -21.135, 0.86)
pt3dadd(-70.823, 247.349, -21.157, 0.832)
pt3dadd(-70.896, 247.44, -21.18, 0.804)
pt3dadd(-70.968, 247.532, -21.202, 0.776)
pt3dadd(-71.039, 247.628, -21.216, 0.754)
pt3dadd(-71.108, 247.724, -21.231, 0.732)
pt3dadd(-71.178, 247.82, -21.246, 0.71)
pt3dadd(-71.249, 247.916, -21.26, 0.688)
pt3dadd(-71.291, 248.015, -21.294, 0.658)
pt3dadd(-71.311, 248.117, -21.345, 0.62)
pt3dadd(-71.344, 248.22, -21.387, 0.58)
pt3dadd(-71.386, 248.324, -21.421, 0.54)
pt3dadd(-71.435, 248.429, -21.448, 0.516)
pt3dadd(-71.492, 248.528, -21.462, 0.504)
pt3dadd(-71.581, 248.596, -21.425, 0.518)
pt3dadd(-71.669, 248.666, -21.392, 0.536)
pt3dadd(-71.753, 248.747, -21.367, 0.564)
pt3dadd(-71.838, 248.826, -21.342, 0.594)
pt3dadd(-71.902, 248.908, -21.371, 0.63)
pt3dadd(-71.954, 248.992, -21.427, 0.674)
pt3dadd(-72.017, 249.062, -21.489, 0.688)
pt3dadd(-72.08, 249.131, -21.552, 0.698)
pt3dadd(-72.11, 249.184, -21.632, 0.696)
pt3dadd(-72.116, 249.226, -21.726, 0.686)
pt3dadd(-72.121, 249.281, -21.813, 0.668)
pt3dadd(-72.126, 249.362, -21.885, 0.642)
pt3dadd(-72.131, 249.445, -21.958, 0.614)
pt3dadd(-72.186, 249.524, -21.992, 0.596)
pt3dadd(-72.277, 249.602, -21.997, 0.584)
pt3dadd(-72.374, 249.667, -21.986, 0.588)
pt3dadd(-72.473, 249.712, -21.95, 0.622)
pt3dadd(-72.563, 249.72, -21.885, 0.674)
pt3dadd(-72.649, 249.744, -21.819, 0.678)
pt3dadd(-72.725, 249.805, -21.763, 0.678)
pt3dadd(-72.793, 249.883, -21.715, 0.678)
pt3dadd(-72.839, 249.991, -21.721, 0.678)
pt3dadd(-72.884, 250.068, -21.782, 0.708)
pt3dadd(-72.968, 250.088, -21.851, 0.786)
pt3dadd(-73.05, 250.135, -21.909, 0.802)
pt3dadd(-73.105, 250.223, -21.96, 0.79)
pt3dadd(-73.16, 250.31, -22.012, 0.776)
pt3dadd(-73.216, 250.397, -22.063, 0.764)
pt3dadd(-73.272, 250.483, -22.112, 0.752)
pt3dadd(-73.357, 250.564, -22.135, 0.742)
pt3dadd(-73.442, 250.643, -22.158, 0.73)
pt3dadd(-73.529, 250.722, -22.181, 0.718)
pt3dadd(-73.614, 250.802, -22.204, 0.706)
pt3dadd(-73.672, 250.896, -22.238, 0.682)
pt3dadd(-73.718, 250.997, -22.276, 0.654)
pt3dadd(-73.795, 251.076, -22.243, 0.638)
pt3dadd(-73.859, 251.134, -22.262, 0.622)
pt3dadd(-73.902, 251.161, -22.352, 0.608)
pt3dadd(-73.951, 251.219, -22.427, 0.612)
pt3dadd(-74.005, 251.294, -22.49, 0.626)
pt3dadd(-74.077, 251.386, -22.5, 0.634)
pt3dadd(-74.152, 251.479, -22.5, 0.64)
pt3dadd(-74.226, 251.573, -22.5, 0.648)
pt3dadd(-74.31, 251.656, -22.5, 0.656)
}
}
proc shape3d_34() {
dend_5[14] { pt3dadd(-74.418, 251.708, -22.5, 0.668)
pt3dadd(-74.525, 251.762, -22.501, 0.678)
pt3dadd(-74.622, 251.822, -22.533, 0.688)
pt3dadd(-74.719, 251.881, -22.565, 0.698)
pt3dadd(-74.786, 251.95, -22.618, 0.72)
pt3dadd(-74.831, 252.024, -22.686, 0.748)
pt3dadd(-74.918, 252.079, -22.733, 0.77)
pt3dadd(-75.017, 252.127, -22.773, 0.79)
pt3dadd(-75.12, 252.174, -22.8, 0.808)
pt3dadd(-75.233, 252.214, -22.8, 0.818)
pt3dadd(-75.347, 252.253, -22.8, 0.828)
pt3dadd(-75.401, 252.296, -22.881, 0.85)
pt3dadd(-75.455, 252.34, -22.963, 0.87)
pt3dadd(-75.502, 252.36, -23.051, 0.908)
pt3dadd(-75.541, 252.36, -23.145, 0.96)
pt3dadd(-75.594, 252.36, -23.23, 1.03)
pt3dadd(-75.701, 252.36, -23.275, 1.164)
pt3dadd(-75.816, 252.36, -23.298, 1.342)
pt3dadd(-75.936, 252.36, -23.3, 1.482)
pt3dadd(-76.056, 252.36, -23.3, 1.546)
pt3dadd(-76.176, 252.36, -23.3, 1.556)
pt3dadd(-76.296, 252.36, -23.3, 1.456)
pt3dadd(-76.416, 252.36, -23.3, 1.27)
pt3dadd(-76.522, 252.36, -23.342, 1.194)
pt3dadd(-76.624, 252.36, -23.395, 1.15)
pt3dadd(-76.727, 252.36, -23.447, 1.106)
pt3dadd(-76.829, 252.36, -23.499, 1.062)
pt3dadd(-76.931, 252.36, -23.552, 1.016)
pt3dadd(-77.011, 252.343, -23.622, 0.992)
pt3dadd(-77.083, 252.319, -23.7, 0.976)
pt3dadd(-77.155, 252.295, -23.777, 0.958)
pt3dadd(-77.227, 252.271, -23.854, 0.942)
pt3dadd(-77.281, 252.247, -23.937, 0.932)
pt3dadd(-77.287, 252.227, -24.036, 0.942)
pt3dadd(-77.292, 252.205, -24.134, 0.952)
pt3dadd(-77.333, 252.167, -24.221, 0.996)
pt3dadd(-77.383, 252.124, -24.304, 1.05)
pt3dadd(-77.418, 252.083, -24.393, 1.066)
pt3dadd(-77.45, 252.042, -24.483, 1.08)
pt3dadd(-77.564, 252.025, -24.493, 1.062)
pt3dadd(-77.683, 252.01, -24.497, 1.042)
pt3dadd(-77.801, 252, -24.51, 0.992)
pt3dadd(-77.916, 252, -24.537, 0.882)
pt3dadd(-78.008, 252, -24.597, 0.82)
pt3dadd(-78.092, 252, -24.669, 0.774)
pt3dadd(-78.175, 252, -24.741, 0.73)
pt3dadd(-78.259, 252, -24.813, 0.684)
pt3dadd(-78.342, 252, -24.885, 0.638)
pt3dadd(-78.448, 252, -24.929, 0.602)
pt3dadd(-78.559, 252, -24.966, 0.57)
pt3dadd(-78.671, 252, -25.003, 0.536)
pt3dadd(-78.782, 252, -25.041, 0.504)
pt3dadd(-78.893, 252, -25.078, 0.472)
pt3dadd(-79.006, 251.983, -25.1, 0.45)
pt3dadd(-79.117, 251.941, -25.1, 0.446)
pt3dadd(-79.23, 251.9, -25.1, 0.44)
pt3dadd(-79.343, 251.858, -25.1, 0.436)
pt3dadd(-79.456, 251.816, -25.1, 0.432)
pt3dadd(-79.568, 251.776, -25.1, 0.428)
pt3dadd(-79.669, 251.711, -25.1, 0.446)
pt3dadd(-79.769, 251.645, -25.1, 0.466)
pt3dadd(-79.87, 251.579, -25.1, 0.486)
pt3dadd(-79.969, 251.513, -25.1, 0.506)
pt3dadd(-80.07, 251.447, -25.1, 0.526)
pt3dadd(-80.173, 251.402, -25.131, 0.562)
pt3dadd(-80.279, 251.362, -25.166, 0.602)
pt3dadd(-80.348, 251.292, -25.223, 0.616)
pt3dadd(-80.426, 251.227, -25.261, 0.62)
pt3dadd(-80.531, 251.174, -25.239, 0.586)
pt3dadd(-80.641, 251.132, -25.222, 0.578)
pt3dadd(-80.754, 251.095, -25.206, 0.578)
pt3dadd(-80.869, 251.066, -25.2, 0.578)
pt3dadd(-80.987, 251.042, -25.2, 0.578)
pt3dadd(-81.107, 251.04, -25.2, 0.58)
pt3dadd(-81.227, 251.04, -25.2, 0.584)
pt3dadd(-81.347, 251.04, -25.2, 0.588)
pt3dadd(-81.467, 251.04, -25.2, 0.592)
pt3dadd(-81.587, 251.04, -25.2, 0.596)
pt3dadd(-81.707, 251.04, -25.2, 0.598)
pt3dadd(-81.827, 251.04, -25.2, 0.602)
pt3dadd(-81.944, 251.023, -25.211, 0.594)
pt3dadd(-82.062, 251.004, -25.223, 0.586)
pt3dadd(-82.18, 250.985, -25.235, 0.576)
pt3dadd(-82.297, 250.966, -25.247, 0.568)
pt3dadd(-82.415, 250.946, -25.259, 0.558)
pt3dadd(-82.529, 250.932, -25.282, 0.548)
pt3dadd(-82.636, 250.93, -25.327, 0.532)
pt3dadd(-82.742, 250.927, -25.373, 0.518)
pt3dadd(-82.849, 250.925, -25.419, 0.504)
pt3dadd(-82.956, 250.922, -25.464, 0.488)
pt3dadd(-83.064, 250.927, -25.504, 0.474)
pt3dadd(-83.177, 250.958, -25.524, 0.458)
pt3dadd(-83.29, 250.991, -25.545, 0.444)
pt3dadd(-83.404, 251.023, -25.565, 0.428)
pt3dadd(-83.516, 251.056, -25.585, 0.414)
pt3dadd(-83.624, 251.098, -25.604, 0.404)
pt3dadd(-83.72, 251.167, -25.618, 0.408)
pt3dadd(-83.816, 251.237, -25.633, 0.414)
pt3dadd(-83.912, 251.308, -25.647, 0.42)
pt3dadd(-84.008, 251.377, -25.662, 0.426)
pt3dadd(-84.092, 251.461, -25.661, 0.434)
pt3dadd(-84.171, 251.551, -25.654, 0.446)
pt3dadd(-84.249, 251.642, -25.646, 0.458)
pt3dadd(-84.327, 251.732, -25.638, 0.47)
pt3dadd(-84.408, 251.819, -25.624, 0.482)
pt3dadd(-84.494, 251.898, -25.601, 0.494)
pt3dadd(-84.579, 251.977, -25.578, 0.504)
pt3dadd(-84.665, 252.058, -25.555, 0.516)
pt3dadd(-84.751, 252.136, -25.533, 0.528)
pt3dadd(-84.853, 252.199, -25.526, 0.522)
pt3dadd(-84.954, 252.263, -25.519, 0.516)
pt3dadd(-85.056, 252.326, -25.512, 0.512)
pt3dadd(-85.158, 252.389, -25.505, 0.506)
pt3dadd(-85.262, 252.448, -25.5, 0.502)
pt3dadd(-85.376, 252.482, -25.5, 0.496)
pt3dadd(-85.491, 252.518, -25.5, 0.492)
pt3dadd(-85.605, 252.554, -25.5, 0.488)
pt3dadd(-85.72, 252.59, -25.5, 0.484)
pt3dadd(-85.835, 252.625, -25.5, 0.478)
pt3dadd(-85.944, 252.668, -25.513, 0.47)
pt3dadd(-86.051, 252.718, -25.535, 0.46)
pt3dadd(-86.157, 252.767, -25.556, 0.448)
pt3dadd(-86.264, 252.816, -25.578, 0.438)
pt3dadd(-86.37, 252.865, -25.599, 0.428)
pt3dadd(-86.453, 252.938, -25.636, 0.414)
pt3dadd(-86.534, 253.016, -25.67, 0.402)
pt3dadd(-86.61, 253.108, -25.687, 0.402)
pt3dadd(-86.679, 253.202, -25.706, 0.412)
pt3dadd(-86.726, 253.309, -25.728, 0.45)
pt3dadd(-86.76, 253.411, -25.763, 0.49)
pt3dadd(-86.76, 253.499, -25.831, 0.538)
pt3dadd(-86.762, 253.591, -25.889, 0.58)
pt3dadd(-86.774, 253.711, -25.892, 0.59)
pt3dadd(-86.785, 253.83, -25.894, 0.602)
pt3dadd(-86.797, 253.95, -25.897, 0.612)
pt3dadd(-86.809, 254.069, -25.899, 0.624)
pt3dadd(-86.873, 254.162, -25.9, 0.628)
pt3dadd(-86.961, 254.244, -25.9, 0.628)
pt3dadd(-87.029, 254.34, -25.9, 0.666)
pt3dadd(-87.052, 254.456, -25.9, 0.698)
pt3dadd(-87.067, 254.576, -25.9, 0.722)
pt3dadd(-87.082, 254.695, -25.9, 0.746)
pt3dadd(-87.096, 254.814, -25.9, 0.77)
pt3dadd(-87.111, 254.933, -25.9, 0.794)
pt3dadd(-87.126, 255.052, -25.9, 0.818)
pt3dadd(-87.143, 255.17, -25.9, 0.848)
pt3dadd(-87.16, 255.289, -25.9, 0.886)
pt3dadd(-87.177, 255.408, -25.9, 0.922)
pt3dadd(-87.194, 255.527, -25.9, 0.958)
pt3dadd(-87.212, 255.646, -25.9, 0.994)
pt3dadd(-87.229, 255.764, -25.9, 1.032)
pt3dadd(-87.24, 255.884, -25.9, 1.07)
pt3dadd(-87.24, 256.004, -25.9, 1.112)
pt3dadd(-87.24, 256.124, -25.9, 1.154)
pt3dadd(-87.24, 256.243, -25.906, 1.188)
pt3dadd(-87.24, 256.361, -25.923, 1.206)
pt3dadd(-87.24, 256.48, -25.94, 1.226)
pt3dadd(-87.256, 256.566, -26.002, 1.2)
pt3dadd(-87.276, 256.642, -26.077, 1.16)
pt3dadd(-87.364, 256.71, -26.098, 1.112)
pt3dadd(-87.463, 256.776, -26.109, 1.064)
pt3dadd(-87.569, 256.802, -26.145, 0.962)
pt3dadd(-87.676, 256.838, -26.174, 0.88)
pt3dadd(-87.782, 256.891, -26.191, 0.83)
pt3dadd(-87.88, 256.95, -26.217, 0.792)
pt3dadd(-87.969, 257.017, -26.254, 0.762)
pt3dadd(-88.029, 257.084, -26.316, 0.754)
pt3dadd(-88.074, 257.152, -26.39, 0.754)
pt3dadd(-88.085, 257.202, -26.479, 0.744)
pt3dadd(-88.091, 257.251, -26.57, 0.732)
pt3dadd(-88.161, 257.278, -26.636, 0.724)
pt3dadd(-88.261, 257.293, -26.689, 0.716)
pt3dadd(-88.361, 257.309, -26.743, 0.708)
pt3dadd(-88.445, 257.346, -26.8, 0.694)
pt3dadd(-88.499, 257.422, -26.863, 0.664)
pt3dadd(-88.542, 257.519, -26.898, 0.632)
pt3dadd(-88.624, 257.6, -26.92, 0.618)
pt3dadd(-88.713, 257.676, -26.943, 0.606)
pt3dadd(-88.801, 257.753, -26.966, 0.594)
pt3dadd(-88.89, 257.83, -26.989, 0.584)
pt3dadd(-88.992, 257.882, -27, 0.574)
pt3dadd(-89.108, 257.912, -27, 0.564)
pt3dadd(-89.224, 257.942, -27, 0.556)
pt3dadd(-89.341, 257.972, -27, 0.546)
pt3dadd(-89.457, 258.002, -27, 0.538)
pt3dadd(-89.573, 258.032, -27, 0.53)
pt3dadd(-89.686, 258.071, -27.005, 0.516)
pt3dadd(-89.799, 258.112, -27.011, 0.502)
pt3dadd(-89.911, 258.152, -27.018, 0.488)
pt3dadd(-90.024, 258.193, -27.024, 0.474)
pt3dadd(-90.136, 258.235, -27.03, 0.458)
pt3dadd(-90.24, 258.277, -27.059, 0.446)
pt3dadd(-90.337, 258.322, -27.106, 0.434)
pt3dadd(-90.433, 258.365, -27.153, 0.422)
pt3dadd(-90.53, 258.409, -27.199, 0.41)
pt3dadd(-90.623, 258.463, -27.237, 0.404)
pt3dadd(-90.709, 258.546, -27.252, 0.408)
pt3dadd(-90.794, 258.628, -27.267, 0.414)
pt3dadd(-90.88, 258.71, -27.282, 0.42)
pt3dadd(-90.965, 258.793, -27.296, 0.426)
}
}
proc shape3d_35() {
dend_5[14] { pt3dadd(-91.056, 258.866, -27.318, 0.446)
pt3dadd(-91.148, 258.937, -27.341, 0.474)
pt3dadd(-91.231, 258.959, -27.408, 0.51)
pt3dadd(-91.311, 258.972, -27.481, 0.548)
pt3dadd(-91.42, 259.01, -27.493, 0.562)
pt3dadd(-91.533, 259.052, -27.498, 0.574)
pt3dadd(-91.65, 259.069, -27.5, 0.588)
pt3dadd(-91.77, 259.074, -27.5, 0.606)
pt3dadd(-91.89, 259.079, -27.5, 0.624)
pt3dadd(-92.01, 259.08, -27.5, 0.656)
pt3dadd(-92.13, 259.08, -27.5, 0.694)
pt3dadd(-92.246, 259.097, -27.486, 0.714)
pt3dadd(-92.362, 259.121, -27.466, 0.728)
pt3dadd(-92.477, 259.144, -27.447, 0.742)
pt3dadd(-92.593, 259.166, -27.428, 0.758)
pt3dadd(-92.708, 259.189, -27.409, 0.772)
pt3dadd(-92.826, 259.2, -27.4, 0.78)
pt3dadd(-92.946, 259.2, -27.4, 0.784)
pt3dadd(-93.066, 259.2, -27.4, 0.788)
pt3dadd(-93.186, 259.2, -27.4, 0.792)
pt3dadd(-93.306, 259.2, -27.4, 0.794)
pt3dadd(-93.426, 259.2, -27.4, 0.798)
pt3dadd(-93.546, 259.2, -27.4, 0.802)
pt3dadd(-93.662, 259.2, -27.381, 0.794)
pt3dadd(-93.775, 259.2, -27.346, 0.774)
pt3dadd(-93.887, 259.2, -27.311, 0.756)
pt3dadd(-94, 259.2, -27.277, 0.738)
pt3dadd(-94.112, 259.2, -27.242, 0.72)
pt3dadd(-94.225, 259.202, -27.209, 0.702)
pt3dadd(-94.339, 259.226, -27.184, 0.682)
pt3dadd(-94.453, 259.25, -27.16, 0.662)
pt3dadd(-94.567, 259.274, -27.136, 0.642)
pt3dadd(-94.681, 259.298, -27.111, 0.622)
pt3dadd(-94.795, 259.321, -27.086, 0.6)
pt3dadd(-94.905, 259.342, -27.052, 0.56)
pt3dadd(-95.015, 259.366, -27.028, 0.528)
pt3dadd(-95.115, 259.412, -27.066, 0.528)
pt3dadd(-95.223, 259.44, -27.096, 0.524)
pt3dadd(-95.341, 259.44, -27.113, 0.514)
pt3dadd(-95.459, 259.44, -27.13, 0.504)
pt3dadd(-95.542, 259.44, -27.197, 0.492)
pt3dadd(-95.617, 259.44, -27.276, 0.48)
pt3dadd(-95.704, 259.44, -27.343, 0.478)
pt3dadd(-95.804, 259.44, -27.394, 0.48)
pt3dadd(-95.922, 259.44, -27.415, 0.488)
pt3dadd(-96.039, 259.44, -27.436, 0.496)
pt3dadd(-96.157, 259.44, -27.456, 0.504)
pt3dadd(-96.274, 259.44, -27.477, 0.514)
pt3dadd(-96.391, 259.44, -27.498, 0.522)
pt3dadd(-96.505, 259.458, -27.518, 0.534)
pt3dadd(-96.611, 259.51, -27.537, 0.55)
pt3dadd(-96.717, 259.561, -27.556, 0.566)
pt3dadd(-96.822, 259.613, -27.575, 0.582)
pt3dadd(-96.928, 259.664, -27.594, 0.598)
pt3dadd(-97.043, 259.694, -27.6, 0.606)
pt3dadd(-97.161, 259.714, -27.6, 0.61)
pt3dadd(-97.28, 259.733, -27.6, 0.614)
pt3dadd(-97.398, 259.753, -27.6, 0.618)
pt3dadd(-97.516, 259.772, -27.6, 0.622)
pt3dadd(-97.635, 259.793, -27.6, 0.626)
pt3dadd(-97.753, 259.8, -27.61, 0.626)
pt3dadd(-97.872, 259.8, -27.627, 0.622)
pt3dadd(-97.99, 259.8, -27.643, 0.616)
pt3dadd(-98.108, 259.8, -27.66, 0.612)
pt3dadd(-98.227, 259.8, -27.676, 0.608)
pt3dadd(-98.345, 259.8, -27.692, 0.604)
pt3dadd(-98.464, 259.793, -27.7, 0.596)
pt3dadd(-98.583, 259.778, -27.7, 0.582)
pt3dadd(-98.702, 259.764, -27.7, 0.57)
pt3dadd(-98.821, 259.751, -27.7, 0.556)
pt3dadd(-98.94, 259.736, -27.7, 0.542)
pt3dadd(-99.06, 259.722, -27.7, 0.53)
pt3dadd(-99.177, 259.744, -27.7, 0.518)
pt3dadd(-99.293, 259.774, -27.7, 0.508)
pt3dadd(-99.391, 259.747, -27.68, 0.51)
pt3dadd(-99.473, 259.672, -27.642, 0.524)
pt3dadd(-99.576, 259.619, -27.621, 0.554)
pt3dadd(-99.686, 259.574, -27.605, 0.592)
pt3dadd(-99.795, 259.547, -27.626, 0.62)
pt3dadd(-99.905, 259.528, -27.663, 0.644)
pt3dadd(-99.959, 259.49, -27.733, 0.664)
pt3dadd(-100.003, 259.448, -27.805, 0.678)
pt3dadd(-100.119, 259.432, -27.823, 0.678)
pt3dadd(-100.236, 259.414, -27.842, 0.678)
pt3dadd(-100.353, 259.397, -27.861, 0.678)
pt3dadd(-100.469, 259.379, -27.879, 0.678)
pt3dadd(-100.586, 259.362, -27.898, 0.678)
pt3dadd(-100.704, 259.342, -27.9, 0.678)
pt3dadd(-100.822, 259.321, -27.9, 0.678)
pt3dadd(-100.928, 259.282, -27.905, 0.682)
pt3dadd(-101.004, 259.19, -27.922, 0.694)
pt3dadd(-101.072, 259.105, -27.956, 0.708)
pt3dadd(-101.126, 259.03, -28.02, 0.722)
pt3dadd(-101.169, 258.96, -28.092, 0.736)
pt3dadd(-101.204, 258.895, -28.17, 0.75)
pt3dadd(-101.297, 258.857, -28.214, 0.71)
pt3dadd(-101.402, 258.82, -28.248, 0.666)
pt3dadd(-101.503, 258.77, -28.284, 0.638)
pt3dadd(-101.604, 258.721, -28.32, 0.608)
pt3dadd(-101.705, 258.672, -28.355, 0.58)
pt3dadd(-101.806, 258.625, -28.39, 0.55)
pt3dadd(-101.919, 258.595, -28.413, 0.52)
pt3dadd(-102.033, 258.565, -28.435, 0.49)
pt3dadd(-102.146, 258.536, -28.458, 0.46)
pt3dadd(-102.259, 258.506, -28.48, 0.428)
pt3dadd(-102.373, 258.48, -28.5, 0.4)
pt3dadd(-102.493, 258.48, -28.504, 0.392)
pt3dadd(-102.613, 258.48, -28.508, 0.384)
pt3dadd(-102.731, 258.48, -28.518, 0.382)
pt3dadd(-102.844, 258.48, -28.551, 0.402)
pt3dadd(-102.958, 258.48, -28.584, 0.424)
pt3dadd(-103.076, 258.48, -28.582, 0.452)
pt3dadd(-103.196, 258.48, -28.573, 0.482)
pt3dadd(-103.308, 258.48, -28.548, 0.498)
pt3dadd(-103.401, 258.48, -28.486, 0.488)
pt3dadd(-103.499, 258.48, -28.43, 0.47)
pt3dadd(-103.616, 258.48, -28.411, 0.426)
pt3dadd(-103.735, 258.48, -28.4, 0.39)
pt3dadd(-103.855, 258.48, -28.4, 0.364)
pt3dadd(-103.975, 258.48, -28.4, 0.34)
pt3dadd(-104.095, 258.48, -28.4, 0.33)
pt3dadd(-104.215, 258.48, -28.4, 0.338)
pt3dadd(-104.335, 258.48, -28.4, 0.348)
pt3dadd(-104.455, 258.48, -28.402, 0.368)
pt3dadd(-104.575, 258.48, -28.406, 0.402)
pt3dadd(-104.695, 258.48, -28.409, 0.438)
pt3dadd(-104.781, 258.48, -28.46, 0.484)
pt3dadd(-104.842, 258.48, -28.546, 0.542)
pt3dadd(-104.883, 258.49, -28.637, 0.596)
pt3dadd(-104.891, 258.514, -28.734, 0.642)
pt3dadd(-104.932, 258.553, -28.821, 0.664)
pt3dadd(-104.983, 258.596, -28.904, 0.676)
pt3dadd(-105.01, 258.636, -28.996, 0.656)
pt3dadd(-105.036, 258.676, -29.088, 0.63)
pt3dadd(-105.114, 258.704, -29.157, 0.604)
pt3dadd(-105.2, 258.733, -29.222, 0.578)
pt3dadd(-105.296, 258.785, -29.265, 0.55)
pt3dadd(-105.395, 258.828, -29.305, 0.53)
pt3dadd(-105.51, 258.83, -29.333, 0.542)
pt3dadd(-105.625, 258.834, -29.362, 0.556)
pt3dadd(-105.74, 258.838, -29.39, 0.568)
pt3dadd(-105.837, 258.84, -29.434, 0.582)
pt3dadd(-105.876, 258.84, -29.529, 0.604)
pt3dadd(-105.916, 258.84, -29.623, 0.626)
pt3dadd(-105.971, 258.836, -29.711, 0.678)
pt3dadd(-106.043, 258.812, -29.789, 0.684)
pt3dadd(-106.115, 258.788, -29.866, 0.69)
pt3dadd(-106.187, 258.764, -29.944, 0.696)
pt3dadd(-106.259, 258.74, -30.021, 0.702)
pt3dadd(-106.306, 258.72, -30.11, 0.752)
pt3dadd(-106.324, 258.7, -30.207, 0.842)
pt3dadd(-106.366, 258.647, -30.283, 0.9)
pt3dadd(-106.476, 258.61, -30.303, 0.866)
pt3dadd(-106.589, 258.6, -30.329, 0.802)
pt3dadd(-106.666, 258.613, -30.399, 0.754)
pt3dadd(-106.68, 258.655, -30.492, 0.744)
pt3dadd(-106.68, 258.709, -30.581, 0.71)
pt3dadd(-106.68, 258.78, -30.661, 0.676)
pt3dadd(-106.68, 258.88, -30.716, 0.616)
pt3dadd(-106.68, 258.99, -30.754, 0.544)
pt3dadd(-106.68, 259.104, -30.787, 0.492)
pt3dadd(-106.7, 259.207, -30.823, 0.434)
pt3dadd(-106.776, 259.283, -30.867, 0.362)
pt3dadd(-106.875, 259.32, -30.89, 0.32)
pt3dadd(-106.995, 259.32, -30.893, 0.306)
pt3dadd(-107.115, 259.32, -30.896, 0.294)
pt3dadd(-107.234, 259.32, -30.899, 0.282)
pt3dadd(-107.35, 259.343, -30.91, 0.29)
pt3dadd(-107.462, 259.381, -30.925, 0.314)
pt3dadd(-107.563, 259.422, -30.961, 0.428)
pt3dadd(-107.678, 259.436, -30.979, 0.496)
pt3dadd(-107.797, 259.447, -30.992, 0.548)
pt3dadd(-107.901, 259.488, -31.002, 0.598)
pt3dadd(-107.986, 259.573, -31.008, 0.646)
pt3dadd(-108.062, 259.637, -31.041, 0.692)
pt3dadd(-108.126, 259.666, -31.123, 0.732)
pt3dadd(-108.205, 259.68, -31.193, 0.764)
pt3dadd(-108.304, 259.68, -31.249, 0.788)
pt3dadd(-108.409, 259.68, -31.291, 0.808)
pt3dadd(-108.529, 259.68, -31.296, 0.82)
pt3dadd(-108.649, 259.68, -31.3, 0.832)
pt3dadd(-108.769, 259.68, -31.3, 0.84)
pt3dadd(-108.889, 259.68, -31.3, 0.848)
pt3dadd(-109.009, 259.68, -31.305, 0.866)
pt3dadd(-109.128, 259.68, -31.317, 0.894)
pt3dadd(-109.247, 259.68, -31.33, 0.922)
pt3dadd(-109.343, 259.68, -31.382, 0.964)
pt3dadd(-109.431, 259.68, -31.45, 1.01)
pt3dadd(-109.494, 259.68, -31.533, 1.056)
pt3dadd(-109.541, 259.68, -31.625, 1.1)
pt3dadd(-109.599, 259.68, -31.711, 1.146)
pt3dadd(-109.684, 259.68, -31.781, 1.2)
pt3dadd(-109.779, 259.68, -31.842, 1.214)
pt3dadd(-109.875, 259.68, -31.903, 1.224)
pt3dadd(-109.971, 259.68, -31.962, 1.234)
pt3dadd(-110.067, 259.68, -32.022, 1.244)
pt3dadd(-110.163, 259.68, -32.083, 1.254)
pt3dadd(-110.252, 259.68, -32.149, 1.256)
pt3dadd(-110.34, 259.68, -32.217, 1.256)
pt3dadd(-110.443, 259.68, -32.268, 1.248)
}
}
proc shape3d_36() {
dend_5[14] { pt3dadd(-110.55, 259.68, -32.312, 1.236)
pt3dadd(-110.659, 259.667, -32.351, 1.236)
pt3dadd(-110.77, 259.64, -32.383, 1.25)
pt3dadd(-110.855, 259.582, -32.417, 1.276)
pt3dadd(-110.913, 259.486, -32.454, 1.316)
pt3dadd(-111.01, 259.447, -32.48, 1.362)
pt3dadd(-111.127, 259.44, -32.5, 1.404)
pt3dadd(-111.247, 259.44, -32.501, 1.376)
pt3dadd(-111.364, 259.44, -32.518, 1.284)
pt3dadd(-111.458, 259.44, -32.577, 1.19)
pt3dadd(-111.517, 259.44, -32.663, 1.204)
pt3dadd(-111.575, 259.412, -32.747, 1.308)
pt3dadd(-111.6, 259.32, -32.8, 1.356)
}
dend_5[15] {pt3dclear()
pt3dadd(-54.2, 177.053, -4.489, 1.708)
pt3dadd(-54.194, 177.048, -4.501, 1.712)
pt3dadd(-54.152, 177.007, -4.588, 1.746)
pt3dadd(-54.11, 176.968, -4.676, 1.78)
pt3dadd(-54.067, 176.928, -4.763, 1.814)
pt3dadd(-54.025, 176.888, -4.851, 1.848)
pt3dadd(-53.983, 176.849, -4.938, 1.88)
pt3dadd(-53.941, 176.809, -5.026, 1.914)
pt3dadd(-53.898, 176.77, -5.113, 1.948)
pt3dadd(-53.856, 176.73, -5.201, 1.982)
pt3dadd(-53.814, 176.69, -5.289, 2.016)
pt3dadd(-53.772, 176.651, -5.376, 2.05)
pt3dadd(-53.846, 176.64, -5.412, 2.086)
pt3dadd(-53.964, 176.64, -5.428, 2.124)
pt3dadd(-54.083, 176.64, -5.445, 2.16)
pt3dadd(-54.202, 176.64, -5.461, 2.198)
pt3dadd(-54.319, 176.64, -5.478, 2.234)
pt3dadd(-54.438, 176.64, -5.494, 2.272)
pt3dadd(-54.557, 176.64, -5.509, 2.262)
pt3dadd(-54.676, 176.64, -5.524, 2.224)
pt3dadd(-54.794, 176.64, -5.538, 2.188)
pt3dadd(-54.913, 176.64, -5.553, 2.152)
pt3dadd(-55.032, 176.64, -5.567, 2.116)
pt3dadd(-55.151, 176.64, -5.581, 2.078)
pt3dadd(-55.262, 176.64, -5.611, 2.02)
pt3dadd(-55.369, 176.64, -5.658, 1.938)
pt3dadd(-55.475, 176.64, -5.706, 1.856)
pt3dadd(-55.58, 176.64, -5.753, 1.772)
pt3dadd(-55.686, 176.64, -5.8, 1.69)
pt3dadd(-55.795, 176.646, -5.837, 1.608)
pt3dadd(-55.913, 176.665, -5.849, 1.526)
pt3dadd(-56.03, 176.684, -5.861, 1.446)
pt3dadd(-56.148, 176.704, -5.873, 1.364)
pt3dadd(-56.266, 176.723, -5.885, 1.282)
pt3dadd(-56.383, 176.742, -5.897, 1.2)
pt3dadd(-56.502, 176.748, -5.9, 1.162)
pt3dadd(-56.622, 176.75, -5.9, 1.136)
pt3dadd(-56.742, 176.752, -5.9, 1.11)
pt3dadd(-56.862, 176.754, -5.9, 1.084)
pt3dadd(-56.982, 176.756, -5.9, 1.06)
pt3dadd(-57.102, 176.758, -5.9, 1.034)
pt3dadd(-57.222, 176.76, -5.9, 1.008)
pt3dadd(-57.337, 176.785, -5.917, 1)
pt3dadd(-57.451, 176.814, -5.937, 0.996)
pt3dadd(-57.565, 176.843, -5.957, 0.99)
pt3dadd(-57.679, 176.872, -5.977, 0.986)
pt3dadd(-57.793, 176.902, -5.996, 0.98)
pt3dadd(-57.901, 176.926, -6.033, 0.988)
pt3dadd(-58.009, 176.947, -6.073, 0.998)
pt3dadd(-58.117, 176.97, -6.113, 1.01)
pt3dadd(-58.224, 176.993, -6.153, 1.02)
pt3dadd(-58.328, 177.019, -6.196, 1.028)
pt3dadd(-58.408, 177.074, -6.255, 1.022)
pt3dadd(-58.486, 177.131, -6.315, 1.016)
pt3dadd(-58.564, 177.186, -6.375, 1.01)
pt3dadd(-58.643, 177.241, -6.434, 1.004)
pt3dadd(-58.747, 177.276, -6.474, 0.982)
pt3dadd(-58.852, 177.312, -6.514, 0.958)
pt3dadd(-58.956, 177.348, -6.554, 0.936)
pt3dadd(-59.06, 177.384, -6.593, 0.914)
pt3dadd(-59.171, 177.413, -6.622, 0.89)
pt3dadd(-59.286, 177.436, -6.641, 0.866)
pt3dadd(-59.401, 177.458, -6.66, 0.842)
pt3dadd(-59.516, 177.481, -6.679, 0.818)
pt3dadd(-59.633, 177.504, -6.699, 0.794)
pt3dadd(-59.743, 177.534, -6.724, 0.774)
pt3dadd(-59.846, 177.577, -6.762, 0.762)
pt3dadd(-59.948, 177.619, -6.8, 0.752)
pt3dadd(-60.052, 177.662, -6.838, 0.74)
pt3dadd(-60.154, 177.704, -6.876, 0.728)
pt3dadd(-60.209, 177.756, -6.953, 0.754)
pt3dadd(-60.266, 177.803, -7.028, 0.788)
pt3dadd(-60.373, 177.822, -7.072, 0.862)
pt3dadd(-60.474, 177.841, -7.121, 0.938)
pt3dadd(-60.538, 177.847, -7.205, 1.022)
pt3dadd(-60.6, 177.854, -7.29, 1.106)
pt3dadd(-60.6, 177.922, -7.372, 1.164)
pt3dadd(-60.6, 177.99, -7.455, 1.222)
pt3dadd(-60.659, 178.082, -7.481, 1.252)
pt3dadd(-60.727, 178.178, -7.498, 1.278)
pt3dadd(-60.842, 178.2, -7.5, 1.282)
pt3dadd(-60.96, 178.2, -7.514, 1.31)
pt3dadd(-61.073, 178.2, -7.547, 1.342)
pt3dadd(-61.181, 178.2, -7.592, 1.318)
pt3dadd(-61.284, 178.217, -7.64, 1.226)
pt3dadd(-61.392, 178.24, -7.68, 1.206)
pt3dadd(-61.5, 178.262, -7.72, 1.184)
pt3dadd(-61.607, 178.285, -7.76, 1.162)
pt3dadd(-61.715, 178.308, -7.8, 1.142)
pt3dadd(-61.813, 178.332, -7.851, 1.128)
pt3dadd(-61.902, 178.36, -7.914, 1.122)
pt3dadd(-61.991, 178.387, -7.978, 1.116)
pt3dadd(-62.078, 178.415, -8.042, 1.11)
pt3dadd(-62.17, 178.44, -8.101, 1.104)
pt3dadd(-62.288, 178.44, -8.113, 1.094)
pt3dadd(-62.408, 178.44, -8.126, 1.086)
pt3dadd(-62.508, 178.442, -8.165, 1.08)
pt3dadd(-62.579, 178.448, -8.245, 1.08)
pt3dadd(-62.644, 178.47, -8.326, 1.076)
pt3dadd(-62.695, 178.522, -8.405, 1.062)
pt3dadd(-62.737, 178.549, -8.493, 1.054)
pt3dadd(-62.772, 178.555, -8.589, 1.054)
pt3dadd(-62.809, 178.56, -8.683, 1.048)
pt3dadd(-62.863, 178.56, -8.773, 1.014)
pt3dadd(-62.942, 178.566, -8.845, 0.99)
pt3dadd(-63.032, 178.574, -8.911, 0.968)
pt3dadd(-63.122, 178.583, -8.977, 0.948)
pt3dadd(-63.212, 178.591, -9.042, 0.926)
pt3dadd(-63.302, 178.6, -9.108, 0.904)
pt3dadd(-63.412, 178.615, -9.148, 0.884)
pt3dadd(-63.521, 178.632, -9.187, 0.864)
pt3dadd(-63.63, 178.649, -9.226, 0.844)
pt3dadd(-63.739, 178.664, -9.264, 0.822)
pt3dadd(-63.85, 178.68, -9.3, 0.802)
pt3dadd(-63.97, 178.68, -9.3, 0.794)
pt3dadd(-64.09, 178.68, -9.3, 0.786)
pt3dadd(-64.21, 178.68, -9.3, 0.78)
pt3dadd(-64.33, 178.68, -9.3, 0.796)
pt3dadd(-64.45, 178.68, -9.3, 0.814)
pt3dadd(-64.57, 178.68, -9.301, 0.83)
pt3dadd(-64.688, 178.68, -9.318, 0.84)
pt3dadd(-64.806, 178.68, -9.336, 0.848)
pt3dadd(-64.908, 178.684, -9.379, 0.866)
pt3dadd(-64.993, 178.69, -9.449, 0.89)
pt3dadd(-65.08, 178.718, -9.51, 0.942)
pt3dadd(-65.173, 178.769, -9.553, 1.016)
pt3dadd(-65.281, 178.804, -9.587, 1.06)
pt3dadd(-65.389, 178.838, -9.621, 1.102)
pt3dadd(-65.496, 178.873, -9.655, 1.146)
pt3dadd(-65.604, 178.908, -9.689, 1.19)
pt3dadd(-65.716, 178.92, -9.72, 1.224)
pt3dadd(-65.83, 178.92, -9.75, 1.25)
pt3dadd(-65.945, 178.92, -9.779, 1.278)
pt3dadd(-66.059, 178.92, -9.809, 1.304)
pt3dadd(-66.174, 178.92, -9.839, 1.332)
pt3dadd(-66.287, 178.92, -9.871, 1.356)
pt3dadd(-66.383, 178.92, -9.931, 1.366)
pt3dadd(-66.479, 178.92, -9.991, 1.376)
pt3dadd(-66.575, 178.92, -10.051, 1.386)
pt3dadd(-66.671, 178.92, -10.111, 1.396)
pt3dadd(-66.767, 178.92, -10.171, 1.406)
pt3dadd(-66.865, 178.92, -10.229, 1.396)
pt3dadd(-66.964, 178.92, -10.286, 1.386)
pt3dadd(-67.062, 178.92, -10.344, 1.376)
pt3dadd(-67.159, 178.92, -10.401, 1.366)
pt3dadd(-67.259, 178.92, -10.458, 1.356)
pt3dadd(-67.364, 178.92, -10.505, 1.34)
pt3dadd(-67.47, 178.92, -10.552, 1.326)
pt3dadd(-67.576, 178.92, -10.6, 1.312)
pt3dadd(-67.681, 178.92, -10.647, 1.298)
pt3dadd(-67.787, 178.92, -10.694, 1.282)
pt3dadd(-67.883, 178.92, -10.755, 1.23)
pt3dadd(-67.976, 178.92, -10.817, 1.17)
pt3dadd(-68.029, 178.92, -10.903, 1.1)
pt3dadd(-68.069, 178.92, -10.998, 1.024)
pt3dadd(-68.138, 178.92, -11.062, 0.954)
pt3dadd(-68.257, 178.92, -11.079, 0.886)
pt3dadd(-68.375, 178.92, -11.096, 0.818)
pt3dadd(-68.491, 178.925, -11.123, 0.778)
pt3dadd(-68.605, 178.93, -11.151, 0.746)
pt3dadd(-68.681, 178.948, -11.21, 0.738)
pt3dadd(-68.712, 178.979, -11.304, 0.76)
pt3dadd(-68.743, 179.009, -11.397, 0.782)
pt3dadd(-68.774, 179.04, -11.49, 0.804)
pt3dadd(-68.858, 179.046, -11.56, 0.854)
pt3dadd(-68.944, 179.053, -11.63, 0.902)
pt3dadd(-69.028, 179.096, -11.692, 0.934)
pt3dadd(-69.112, 179.141, -11.753, 0.966)
pt3dadd(-69.208, 179.16, -11.808, 0.966)
pt3dadd(-69.311, 179.16, -11.858, 0.942)
pt3dadd(-69.42, 179.16, -11.894, 0.896)
pt3dadd(-69.536, 179.16, -11.917, 0.854)
pt3dadd(-69.648, 179.16, -11.952, 0.854)
pt3dadd(-69.761, 179.16, -11.987, 0.854)
pt3dadd(-69.874, 179.16, -12.021, 0.854)
pt3dadd(-69.986, 179.16, -12.056, 0.854)
pt3dadd(-70.099, 179.16, -12.089, 0.854)
pt3dadd(-70.219, 179.16, -12.091, 0.87)
pt3dadd(-70.339, 179.16, -12.092, 0.884)
pt3dadd(-70.459, 179.16, -12.094, 0.898)
pt3dadd(-70.579, 179.16, -12.095, 0.912)
pt3dadd(-70.699, 179.16, -12.097, 0.928)
pt3dadd(-70.819, 179.16, -12.099, 0.942)
pt3dadd(-70.939, 179.16, -12.1, 0.956)
pt3dadd(-71.059, 179.16, -12.1, 0.97)
pt3dadd(-71.179, 179.16, -12.1, 0.986)
pt3dadd(-71.299, 179.16, -12.1, 1)
}
}
proc shape3d_37() {
dend_5[15] { pt3dadd(-71.419, 179.16, -12.1, 1.014)
pt3dadd(-71.539, 179.16, -12.1, 1.028)
pt3dadd(-71.659, 179.16, -12.1, 1.042)
pt3dadd(-71.779, 179.16, -12.1, 1.052)
pt3dadd(-71.899, 179.16, -12.1, 1.042)
pt3dadd(-72.019, 179.16, -12.1, 1.032)
pt3dadd(-72.139, 179.16, -12.1, 1.02)
pt3dadd(-72.259, 179.16, -12.1, 1.01)
pt3dadd(-72.379, 179.16, -12.1, 1)
pt3dadd(-72.499, 179.16, -12.1, 0.988)
pt3dadd(-72.619, 179.16, -12.102, 0.974)
pt3dadd(-72.738, 179.16, -12.112, 0.948)
pt3dadd(-72.858, 179.16, -12.123, 0.92)
pt3dadd(-72.977, 179.16, -12.133, 0.892)
pt3dadd(-73.097, 179.16, -12.144, 0.864)
pt3dadd(-73.216, 179.16, -12.154, 0.836)
pt3dadd(-73.334, 179.16, -12.164, 0.81)
pt3dadd(-73.445, 179.16, -12.202, 0.788)
pt3dadd(-73.552, 179.16, -12.247, 0.77)
pt3dadd(-73.66, 179.16, -12.292, 0.75)
pt3dadd(-73.766, 179.16, -12.336, 0.73)
pt3dadd(-73.874, 179.16, -12.381, 0.712)
pt3dadd(-73.988, 179.16, -12.4, 0.712)
pt3dadd(-74.108, 179.16, -12.4, 0.73)
pt3dadd(-74.228, 179.16, -12.4, 0.746)
pt3dadd(-74.348, 179.16, -12.402, 0.778)
pt3dadd(-74.468, 179.16, -12.406, 0.822)
pt3dadd(-74.588, 179.16, -12.41, 0.866)
pt3dadd(-74.687, 179.16, -12.458, 0.904)
pt3dadd(-74.774, 179.16, -12.526, 0.938)
pt3dadd(-74.858, 179.16, -12.597, 0.948)
pt3dadd(-74.941, 179.16, -12.67, 0.936)
pt3dadd(-75.006, 179.16, -12.752, 0.908)
pt3dadd(-75.048, 179.16, -12.845, 0.86)
pt3dadd(-75.137, 179.16, -12.911, 0.832)
pt3dadd(-75.23, 179.16, -12.974, 0.806)
pt3dadd(-75.324, 179.16, -13.036, 0.78)
pt3dadd(-75.418, 179.16, -13.099, 0.756)
pt3dadd(-75.511, 179.16, -13.161, 0.73)
pt3dadd(-75.588, 179.16, -13.237, 0.64)
pt3dadd(-75.664, 179.16, -13.316, 0.62)
pt3dadd(-75.706, 179.16, -13.407, 0.652)
pt3dadd(-75.721, 179.16, -13.507, 0.678)
pt3dadd(-75.743, 179.16, -13.604, 0.678)
pt3dadd(-75.818, 179.16, -13.675, 0.678)
pt3dadd(-75.934, 179.16, -13.697, 0.678)
pt3dadd(-76.054, 179.16, -13.7, 0.678)
pt3dadd(-76.174, 179.16, -13.7, 0.698)
pt3dadd(-76.294, 179.16, -13.7, 0.762)
pt3dadd(-76.414, 179.16, -13.7, 0.896)
pt3dadd(-76.534, 179.16, -13.7, 1.046)
pt3dadd(-76.652, 179.16, -13.713, 1.09)
pt3dadd(-76.771, 179.16, -13.729, 1.102)
pt3dadd(-76.889, 179.16, -13.746, 1.114)
pt3dadd(-77.008, 179.16, -13.762, 1.126)
pt3dadd(-77.126, 179.16, -13.779, 1.14)
pt3dadd(-77.244, 179.16, -13.795, 1.152)
pt3dadd(-77.363, 179.147, -13.8, 1.152)
pt3dadd(-77.482, 179.126, -13.8, 1.148)
pt3dadd(-77.599, 179.107, -13.8, 1.144)
pt3dadd(-77.718, 179.087, -13.8, 1.14)
pt3dadd(-77.836, 179.068, -13.8, 1.136)
pt3dadd(-77.954, 179.047, -13.8, 1.132)
pt3dadd(-78.073, 179.04, -13.81, 1.122)
pt3dadd(-78.191, 179.04, -13.827, 1.11)
pt3dadd(-78.31, 179.04, -13.843, 1.098)
pt3dadd(-78.428, 179.04, -13.859, 1.086)
pt3dadd(-78.546, 179.04, -13.876, 1.072)
pt3dadd(-78.665, 179.04, -13.892, 1.06)
pt3dadd(-78.781, 179.04, -13.915, 1.044)
pt3dadd(-78.896, 179.04, -13.942, 1.022)
pt3dadd(-79.013, 179.04, -13.968, 1.002)
pt3dadd(-79.132, 179.04, -13.98, 0.984)
pt3dadd(-79.25, 179.04, -13.993, 0.966)
pt3dadd(-79.367, 179.023, -14.009, 0.948)
pt3dadd(-79.477, 178.985, -14.031, 0.936)
pt3dadd(-79.552, 178.946, -14.079, 0.92)
pt3dadd(-79.564, 178.912, -14.174, 0.898)
pt3dadd(-79.588, 178.872, -14.257, 0.876)
pt3dadd(-79.693, 178.818, -14.271, 0.862)
pt3dadd(-79.799, 178.763, -14.284, 0.848)
pt3dadd(-79.904, 178.708, -14.296, 0.832)
pt3dadd(-80.021, 178.69, -14.3, 0.81)
pt3dadd(-80.141, 178.685, -14.3, 0.784)
pt3dadd(-80.261, 178.681, -14.3, 0.758)
pt3dadd(-80.381, 178.68, -14.3, 0.69)
pt3dadd(-80.501, 178.68, -14.3, 0.664)
pt3dadd(-80.621, 178.68, -14.3, 0.648)
pt3dadd(-80.741, 178.68, -14.3, 0.63)
pt3dadd(-80.861, 178.68, -14.3, 0.62)
pt3dadd(-80.981, 178.68, -14.3, 0.612)
pt3dadd(-81.101, 178.68, -14.3, 0.604)
pt3dadd(-81.215, 178.68, -14.328, 0.62)
pt3dadd(-81.329, 178.68, -14.361, 0.642)
pt3dadd(-81.409, 178.68, -14.423, 0.664)
pt3dadd(-81.456, 178.68, -14.515, 0.686)
pt3dadd(-81.516, 178.68, -14.594, 0.706)
pt3dadd(-81.631, 178.68, -14.622, 0.718)
pt3dadd(-81.746, 178.68, -14.649, 0.73)
pt3dadd(-81.862, 178.68, -14.677, 0.742)
pt3dadd(-81.978, 178.68, -14.7, 0.75)
pt3dadd(-82.098, 178.68, -14.7, 0.734)
pt3dadd(-82.218, 178.68, -14.7, 0.718)
pt3dadd(-82.338, 178.68, -14.702, 0.694)
pt3dadd(-82.453, 178.674, -14.721, 0.652)
pt3dadd(-82.56, 178.648, -14.762, 0.652)
pt3dadd(-82.667, 178.621, -14.803, 0.652)
pt3dadd(-82.774, 178.596, -14.844, 0.652)
pt3dadd(-82.879, 178.57, -14.885, 0.652)
pt3dadd(-82.993, 178.56, -14.909, 0.666)
pt3dadd(-83.112, 178.56, -14.923, 0.686)
pt3dadd(-83.231, 178.56, -14.938, 0.706)
pt3dadd(-83.35, 178.56, -14.952, 0.726)
pt3dadd(-83.468, 178.56, -14.966, 0.746)
pt3dadd(-83.587, 178.56, -14.981, 0.768)
pt3dadd(-83.706, 178.56, -14.997, 0.794)
pt3dadd(-83.824, 178.56, -15.016, 0.826)
pt3dadd(-83.941, 178.56, -15.034, 0.86)
pt3dadd(-84.06, 178.56, -15.053, 0.894)
pt3dadd(-84.177, 178.56, -15.071, 0.928)
pt3dadd(-84.295, 178.56, -15.09, 0.96)
pt3dadd(-84.412, 178.56, -15.113, 0.99)
pt3dadd(-84.526, 178.56, -15.143, 1.012)
pt3dadd(-84.641, 178.56, -15.173, 1.034)
pt3dadd(-84.755, 178.56, -15.203, 1.058)
pt3dadd(-84.87, 178.56, -15.233, 1.08)
pt3dadd(-84.984, 178.56, -15.263, 1.102)
pt3dadd(-85.104, 178.56, -15.271, 1.108)
pt3dadd(-85.224, 178.56, -15.276, 1.112)
pt3dadd(-85.343, 178.56, -15.281, 1.116)
pt3dadd(-85.463, 178.56, -15.286, 1.12)
pt3dadd(-85.583, 178.56, -15.291, 1.124)
pt3dadd(-85.703, 178.56, -15.296, 1.128)
pt3dadd(-85.822, 178.555, -15.3, 1.126)
pt3dadd(-85.94, 178.534, -15.3, 1.106)
pt3dadd(-86.058, 178.511, -15.3, 1.084)
pt3dadd(-86.176, 178.489, -15.3, 1.064)
pt3dadd(-86.294, 178.466, -15.3, 1.042)
pt3dadd(-86.412, 178.445, -15.3, 1.022)
pt3dadd(-86.53, 178.423, -15.3, 1.002)
pt3dadd(-86.649, 178.406, -15.3, 0.984)
pt3dadd(-86.768, 178.388, -15.3, 0.968)
pt3dadd(-86.886, 178.372, -15.3, 0.952)
pt3dadd(-87.005, 178.355, -15.3, 0.936)
pt3dadd(-87.124, 178.337, -15.3, 0.92)
pt3dadd(-87.243, 178.32, -15.3, 0.904)
pt3dadd(-87.361, 178.32, -15.317, 0.892)
pt3dadd(-87.479, 178.32, -15.333, 0.878)
pt3dadd(-87.598, 178.32, -15.35, 0.866)
pt3dadd(-87.716, 178.32, -15.366, 0.854)
pt3dadd(-87.834, 178.32, -15.383, 0.842)
pt3dadd(-87.953, 178.32, -15.399, 0.83)
pt3dadd(-88.072, 178.333, -15.4, 0.828)
pt3dadd(-88.191, 178.349, -15.4, 0.828)
pt3dadd(-88.308, 178.37, -15.404, 0.826)
pt3dadd(-88.417, 178.416, -15.42, 0.814)
pt3dadd(-88.521, 178.466, -15.441, 0.798)
pt3dadd(-88.597, 178.543, -15.486, 0.77)
pt3dadd(-88.652, 178.616, -15.544, 0.748)
pt3dadd(-88.68, 178.687, -15.621, 0.734)
pt3dadd(-88.743, 178.751, -15.681, 0.728)
pt3dadd(-88.808, 178.804, -15.744, 0.73)
pt3dadd(-88.832, 178.85, -15.834, 0.736)
pt3dadd(-88.855, 178.897, -15.924, 0.742)
pt3dadd(-88.879, 178.944, -16.014, 0.746)
pt3dadd(-88.902, 178.991, -16.104, 0.752)
pt3dadd(-88.907, 179.051, -16.19, 0.742)
pt3dadd(-88.907, 179.114, -16.275, 0.73)
pt3dadd(-88.907, 179.177, -16.36, 0.716)
pt3dadd(-88.907, 179.24, -16.444, 0.704)
pt3dadd(-88.913, 179.297, -16.533, 0.656)
pt3dadd(-88.919, 179.352, -16.621, 0.61)
pt3dadd(-88.92, 179.406, -16.71, 0.544)
pt3dadd(-88.92, 179.46, -16.8, 0.478)
pt3dadd(-88.958, 179.494, -16.886, 0.42)
pt3dadd(-89.019, 179.513, -16.971, 0.37)
pt3dadd(-89.08, 179.52, -17.056, 0.344)
pt3dadd(-89.141, 179.52, -17.143, 0.332)
pt3dadd(-89.197, 179.506, -17.229, 0.344)
pt3dadd(-89.248, 179.468, -17.313, 0.392)
pt3dadd(-89.277, 179.418, -17.398, 0.468)
pt3dadd(-89.28, 179.4, -17.497, 0.526)
pt3dadd(-89.297, 179.4, -17.595, 0.608)
pt3dadd(-89.366, 179.394, -17.672, 0.666)
pt3dadd(-89.475, 179.362, -17.699, 0.678)
pt3dadd(-89.582, 179.309, -17.7, 0.718)
pt3dadd(-89.687, 179.252, -17.692, 0.806)
pt3dadd(-89.778, 179.19, -17.655, 0.93)
pt3dadd(-89.882, 179.162, -17.614, 1.044)
pt3dadd(-90, 179.16, -17.6, 1.104)
}
dend_5[16] {pt3dclear()
pt3dadd(-90, 179.16, -17.6, 1.104)
pt3dadd(-90.105, 179.16, -17.644, 1.138)
pt3dadd(-90.212, 179.16, -17.688, 1.172)
pt3dadd(-90.307, 179.155, -17.748, 1.208)
pt3dadd(-90.398, 179.149, -17.813, 1.244)
pt3dadd(-90.467, 179.078, -17.851, 1.282)
pt3dadd(-90.525, 178.978, -17.878, 1.322)
pt3dadd(-90.591, 178.886, -17.9, 1.352)
pt3dadd(-90.702, 178.84, -17.9, 1.33)
pt3dadd(-90.812, 178.793, -17.9, 1.308)
}
}
proc shape3d_38() {
dend_5[16] { pt3dadd(-90.927, 178.758, -17.901, 1.128)
pt3dadd(-91.037, 178.715, -17.914, 1.076)
pt3dadd(-91.148, 178.672, -17.928, 1.026)
pt3dadd(-91.259, 178.628, -17.941, 0.974)
pt3dadd(-91.37, 178.585, -17.955, 0.924)
pt3dadd(-91.481, 178.542, -17.967, 0.876)
pt3dadd(-91.595, 178.506, -17.972, 0.846)
pt3dadd(-91.71, 178.471, -17.976, 0.818)
pt3dadd(-91.824, 178.435, -17.98, 0.788)
pt3dadd(-91.939, 178.399, -17.984, 0.76)
pt3dadd(-92.053, 178.363, -17.988, 0.732)
pt3dadd(-92.153, 178.302, -17.971, 0.724)
pt3dadd(-92.251, 178.237, -17.952, 0.718)
pt3dadd(-92.349, 178.172, -17.932, 0.712)
pt3dadd(-92.447, 178.106, -17.912, 0.706)
pt3dadd(-92.55, 178.049, -17.9, 0.704)
pt3dadd(-92.66, 178.002, -17.9, 0.704)
pt3dadd(-92.768, 177.952, -17.9, 0.704)
pt3dadd(-92.849, 177.863, -17.9, 0.716)
pt3dadd(-92.931, 177.775, -17.9, 0.728)
pt3dadd(-93.048, 177.754, -17.9, 0.728)
pt3dadd(-93.166, 177.733, -17.9, 0.728)
pt3dadd(-93.285, 177.72, -17.895, 0.732)
pt3dadd(-93.404, 177.72, -17.883, 0.742)
pt3dadd(-93.523, 177.72, -17.871, 0.75)
pt3dadd(-93.637, 177.72, -17.842, 0.742)
pt3dadd(-93.75, 177.72, -17.807, 0.724)
pt3dadd(-93.862, 177.72, -17.774, 0.704)
pt3dadd(-93.951, 177.72, -17.71, 0.744)
pt3dadd(-94.019, 177.697, -17.632, 0.848)
pt3dadd(-94.108, 177.638, -17.588, 0.904)
pt3dadd(-94.21, 177.613, -17.544, 0.886)
pt3dadd(-94.289, 177.678, -17.508, 0.812)
pt3dadd(-94.314, 177.794, -17.5, 0.778)
pt3dadd(-94.329, 177.913, -17.5, 0.83)
pt3dadd(-94.371, 178.024, -17.5, 0.95)
pt3dadd(-94.48, 178.068, -17.5, 1)
pt3dadd(-94.6, 178.073, -17.5, 0.984)
pt3dadd(-94.72, 178.076, -17.5, 0.966)
pt3dadd(-94.84, 178.081, -17.5, 0.94)
pt3dadd(-94.959, 178.086, -17.5, 0.896)
pt3dadd(-95.079, 178.091, -17.5, 0.854)
pt3dadd(-95.174, 178.121, -17.529, 0.806)
pt3dadd(-95.237, 178.183, -17.596, 0.75)
pt3dadd(-95.303, 178.244, -17.663, 0.7)
pt3dadd(-95.385, 178.29, -17.725, 0.672)
pt3dadd(-95.476, 178.32, -17.78, 0.656)
pt3dadd(-95.586, 178.32, -17.82, 0.664)
pt3dadd(-95.696, 178.32, -17.861, 0.672)
pt3dadd(-95.806, 178.308, -17.895, 0.696)
pt3dadd(-95.916, 178.27, -17.917, 0.758)
pt3dadd(-96.022, 178.229, -17.947, 0.854)
pt3dadd(-96.126, 178.235, -17.977, 0.962)
pt3dadd(-96.24, 178.268, -17.994, 1.012)
pt3dadd(-96.357, 178.29, -18.003, 1.03)
pt3dadd(-96.476, 178.306, -18.007, 1.03)
pt3dadd(-96.594, 178.321, -18.014, 1.028)
pt3dadd(-96.7, 178.34, -18.058, 0.99)
pt3dadd(-96.804, 178.362, -18.104, 0.952)
pt3dadd(-96.87, 178.406, -18.178, 0.896)
pt3dadd(-96.937, 178.44, -18.255, 0.84)
pt3dadd(-97.001, 178.44, -18.339, 0.788)
pt3dadd(-97.086, 178.454, -18.407, 0.778)
pt3dadd(-97.177, 178.472, -18.47, 0.778)
pt3dadd(-97.268, 178.489, -18.534, 0.778)
pt3dadd(-97.359, 178.507, -18.597, 0.778)
pt3dadd(-97.447, 178.525, -18.664, 0.786)
pt3dadd(-97.523, 178.547, -18.739, 0.812)
pt3dadd(-97.614, 178.56, -18.79, 0.834)
pt3dadd(-97.734, 178.56, -18.794, 0.852)
pt3dadd(-97.854, 178.56, -18.798, 0.87)
pt3dadd(-97.973, 178.56, -18.808, 0.884)
pt3dadd(-98.091, 178.56, -18.825, 0.892)
pt3dadd(-98.209, 178.56, -18.842, 0.902)
pt3dadd(-98.25, 178.56, -18.927, 0.896)
pt3dadd(-98.276, 178.56, -19.025, 0.886)
pt3dadd(-98.308, 178.56, -19.121, 0.874)
pt3dadd(-98.352, 178.56, -19.214, 0.858)
pt3dadd(-98.374, 178.547, -19.311, 0.846)
pt3dadd(-98.39, 178.53, -19.409, 0.834)
pt3dadd(-98.411, 178.505, -19.505, 0.834)
pt3dadd(-98.436, 178.465, -19.597, 0.846)
pt3dadd(-98.488, 178.433, -19.676, 0.85)
pt3dadd(-98.584, 178.412, -19.734, 0.836)
pt3dadd(-98.686, 178.384, -19.776, 0.818)
pt3dadd(-98.797, 178.345, -19.797, 0.794)
pt3dadd(-98.897, 178.32, -19.837, 0.768)
pt3dadd(-98.98, 178.32, -19.91, 0.74)
pt3dadd(-99.063, 178.32, -19.982, 0.712)
pt3dadd(-99.146, 178.32, -20.055, 0.682)
pt3dadd(-99.201, 178.284, -20.136, 0.666)
pt3dadd(-99.252, 178.241, -20.219, 0.654)
pt3dadd(-99.346, 178.208, -20.274, 0.652)
pt3dadd(-99.459, 178.2, -20.298, 0.674)
pt3dadd(-99.578, 178.188, -20.3, 0.678)
pt3dadd(-99.692, 178.153, -20.298, 0.678)
pt3dadd(-99.795, 178.1, -20.273, 0.678)
pt3dadd(-99.899, 178.08, -20.231, 0.678)
pt3dadd(-100.018, 178.08, -20.219, 0.678)
pt3dadd(-100.137, 178.08, -20.207, 0.678)
pt3dadd(-100.257, 178.08, -20.206, 0.678)
pt3dadd(-100.376, 178.08, -20.218, 0.678)
pt3dadd(-100.495, 178.08, -20.231, 0.678)
pt3dadd(-100.606, 178.094, -20.263, 0.678)
pt3dadd(-100.716, 178.114, -20.3, 0.678)
pt3dadd(-100.806, 178.152, -20.356, 0.678)
pt3dadd(-100.888, 178.196, -20.418, 0.678)
pt3dadd(-100.988, 178.2, -20.472, 0.678)
pt3dadd(-101.086, 178.2, -20.53, 0.66)
pt3dadd(-101.163, 178.2, -20.606, 0.626)
pt3dadd(-101.217, 178.2, -20.695, 0.602)
pt3dadd(-101.271, 178.2, -20.785, 0.602)
pt3dadd(-101.345, 178.198, -20.861, 0.574)
pt3dadd(-101.451, 178.166, -20.889, 0.514)
pt3dadd(-101.518, 178.108, -20.832, 0.514)
pt3dadd(-101.56, 178.067, -20.744, 0.602)
pt3dadd(-101.644, 177.996, -20.736, 0.628)
pt3dadd(-101.723, 177.924, -20.775, 0.646)
pt3dadd(-101.813, 177.847, -20.792, 0.686)
pt3dadd(-101.892, 177.76, -20.809, 0.732)
pt3dadd(-101.96, 177.664, -20.827, 0.784)
pt3dadd(-102.048, 177.59, -20.849, 0.822)
pt3dadd(-102.148, 177.533, -20.876, 0.852)
pt3dadd(-102.25, 177.479, -20.9, 0.878)
pt3dadd(-102.368, 177.458, -20.9, 0.878)
pt3dadd(-102.487, 177.438, -20.9, 0.878)
pt3dadd(-102.583, 177.382, -20.9, 0.844)
pt3dadd(-102.69, 177.342, -20.913, 0.826)
pt3dadd(-102.806, 177.319, -20.93, 0.82)
pt3dadd(-102.922, 177.296, -20.947, 0.816)
pt3dadd(-103.038, 177.275, -20.963, 0.81)
pt3dadd(-103.154, 177.252, -20.98, 0.806)
pt3dadd(-103.272, 177.24, -20.99, 0.808)
pt3dadd(-103.392, 177.24, -20.994, 0.814)
pt3dadd(-103.512, 177.24, -20.997, 0.822)
pt3dadd(-103.632, 177.24, -21, 0.83)
pt3dadd(-103.752, 177.24, -21.004, 0.836)
pt3dadd(-103.872, 177.24, -21.007, 0.844)
pt3dadd(-103.992, 177.24, -21.01, 0.852)
pt3dadd(-104.109, 177.24, -21.031, 0.872)
pt3dadd(-104.224, 177.24, -21.058, 0.9)
pt3dadd(-104.339, 177.24, -21.086, 0.926)
pt3dadd(-104.455, 177.24, -21.113, 0.952)
pt3dadd(-104.57, 177.24, -21.141, 0.98)
pt3dadd(-104.685, 177.24, -21.169, 1.008)
pt3dadd(-104.788, 177.24, -21.22, 1.064)
pt3dadd(-104.892, 177.24, -21.271, 1.122)
pt3dadd(-104.995, 177.24, -21.321, 1.17)
pt3dadd(-105.099, 177.24, -21.372, 1.216)
pt3dadd(-105.207, 177.24, -21.415, 1.23)
pt3dadd(-105.318, 177.24, -21.454, 1.23)
pt3dadd(-105.401, 177.24, -21.513, 1.234)
pt3dadd(-105.441, 177.24, -21.608, 1.246)
pt3dadd(-105.48, 177.24, -21.702, 1.256)
pt3dadd(-105.504, 177.24, -21.8, 1.24)
pt3dadd(-105.53, 177.24, -21.898, 1.234)
pt3dadd(-105.563, 177.24, -21.994, 1.244)
pt3dadd(-105.597, 177.24, -22.09, 1.254)
pt3dadd(-105.636, 177.24, -22.184, 1.256)
pt3dadd(-105.675, 177.24, -22.279, 1.256)
pt3dadd(-105.741, 177.24, -22.359, 1.262)
pt3dadd(-105.829, 177.24, -22.427, 1.274)
pt3dadd(-105.929, 177.24, -22.474, 1.272)
pt3dadd(-106.048, 177.24, -22.491, 1.254)
pt3dadd(-106.166, 177.24, -22.508, 1.234)
pt3dadd(-106.275, 177.24, -22.548, 1.174)
pt3dadd(-106.386, 177.24, -22.585, 1.122)
pt3dadd(-106.503, 177.24, -22.605, 1.096)
pt3dadd(-106.621, 177.24, -22.626, 1.07)
pt3dadd(-106.738, 177.24, -22.647, 1.044)
pt3dadd(-106.855, 177.24, -22.667, 1.02)
pt3dadd(-106.973, 177.24, -22.688, 0.994)
pt3dadd(-107.091, 177.24, -22.7, 0.958)
pt3dadd(-107.211, 177.24, -22.7, 0.908)
pt3dadd(-107.331, 177.24, -22.7, 0.858)
pt3dadd(-107.448, 177.24, -22.714, 0.802)
pt3dadd(-107.562, 177.24, -22.747, 0.738)
pt3dadd(-107.674, 177.241, -22.782, 0.674)
pt3dadd(-107.77, 177.262, -22.839, 0.608)
pt3dadd(-107.866, 177.29, -22.89, 0.548)
pt3dadd(-107.956, 177.368, -22.895, 0.51)
pt3dadd(-108.048, 177.444, -22.9, 0.476)
pt3dadd(-108.156, 177.498, -22.9, 0.46)
pt3dadd(-108.262, 177.551, -22.887, 0.452)
pt3dadd(-108.367, 177.602, -22.865, 0.452)
pt3dadd(-108.471, 177.655, -22.844, 0.452)
pt3dadd(-108.576, 177.708, -22.822, 0.452)
pt3dadd(-108.681, 177.76, -22.8, 0.452)
pt3dadd(-108.778, 177.816, -22.77, 0.452)
pt3dadd(-108.847, 177.84, -22.693, 0.42)
pt3dadd(-108.934, 177.84, -22.627, 0.338)
pt3dadd(-109.049, 177.84, -22.603, 0.284)
pt3dadd(-109.168, 177.84, -22.6, 0.294)
pt3dadd(-109.288, 177.84, -22.6, 0.376)
pt3dadd(-109.408, 177.84, -22.609, 0.484)
pt3dadd(-109.512, 177.84, -22.653, 0.608)
pt3dadd(-109.552, 177.84, -22.746, 0.662)
pt3dadd(-109.56, 177.84, -22.845, 0.69)
pt3dadd(-109.56, 177.84, -22.945, 0.726)
pt3dadd(-109.574, 177.84, -23.044, 0.76)
}
}
proc shape3d_39() {
dend_5[16] { pt3dadd(-109.604, 177.84, -23.14, 0.772)
pt3dadd(-109.634, 177.84, -23.237, 0.786)
pt3dadd(-109.664, 177.84, -23.334, 0.798)
pt3dadd(-109.694, 177.84, -23.431, 0.812)
pt3dadd(-109.724, 177.84, -23.528, 0.824)
pt3dadd(-109.764, 177.8, -23.613, 0.838)
pt3dadd(-109.808, 177.744, -23.693, 0.848)
pt3dadd(-109.851, 177.688, -23.774, 0.86)
pt3dadd(-109.895, 177.632, -23.854, 0.872)
pt3dadd(-109.92, 177.553, -23.919, 0.884)
pt3dadd(-109.92, 177.446, -23.964, 0.894)
pt3dadd(-109.92, 177.349, -24.018, 0.906)
pt3dadd(-109.92, 177.295, -24.107, 0.918)
pt3dadd(-109.92, 177.242, -24.197, 0.928)
pt3dadd(-109.924, 177.24, -24.296, 0.946)
pt3dadd(-109.929, 177.24, -24.396, 0.964)
pt3dadd(-109.938, 177.24, -24.495, 0.98)
pt3dadd(-110.006, 177.24, -24.577, 1.004)
pt3dadd(-110.074, 177.24, -24.66, 1.028)
pt3dadd(-110.172, 177.24, -24.716, 1.03)
pt3dadd(-110.267, 177.24, -24.776, 1.02)
pt3dadd(-110.353, 177.24, -24.846, 1)
pt3dadd(-110.439, 177.24, -24.916, 0.98)
pt3dadd(-110.525, 177.24, -24.985, 0.96)
pt3dadd(-110.611, 177.24, -25.055, 0.94)
pt3dadd(-110.709, 177.239, -25.11, 0.916)
pt3dadd(-110.819, 177.236, -25.15, 0.892)
pt3dadd(-110.929, 177.234, -25.19, 0.868)
pt3dadd(-111.039, 177.232, -25.231, 0.844)
pt3dadd(-111.149, 177.229, -25.271, 0.82)
pt3dadd(-111.259, 177.221, -25.308, 0.798)
pt3dadd(-111.373, 177.199, -25.334, 0.778)
pt3dadd(-111.487, 177.179, -25.361, 0.758)
pt3dadd(-111.601, 177.157, -25.387, 0.738)
pt3dadd(-111.714, 177.136, -25.413, 0.718)
pt3dadd(-111.828, 177.12, -25.442, 0.704)
pt3dadd(-111.939, 177.12, -25.479, 0.708)
pt3dadd(-112.05, 177.12, -25.517, 0.714)
pt3dadd(-112.162, 177.12, -25.554, 0.718)
pt3dadd(-112.273, 177.12, -25.591, 0.722)
pt3dadd(-112.385, 177.12, -25.628, 0.728)
pt3dadd(-112.465, 177.12, -25.701, 0.742)
pt3dadd(-112.54, 177.12, -25.779, 0.756)
pt3dadd(-112.615, 177.12, -25.857, 0.772)
pt3dadd(-112.69, 177.12, -25.935, 0.786)
pt3dadd(-112.765, 177.12, -26.013, 0.802)
pt3dadd(-112.846, 177.136, -26.085, 0.818)
pt3dadd(-112.929, 177.154, -26.156, 0.834)
pt3dadd(-113.011, 177.172, -26.227, 0.852)
pt3dadd(-113.093, 177.188, -26.298, 0.868)
pt3dadd(-113.179, 177.212, -26.365, 0.88)
pt3dadd(-113.269, 177.246, -26.425, 0.886)
pt3dadd(-113.359, 177.281, -26.485, 0.892)
pt3dadd(-113.449, 177.314, -26.544, 0.898)
pt3dadd(-113.54, 177.347, -26.603, 0.904)
pt3dadd(-113.641, 177.349, -26.657, 0.91)
pt3dadd(-113.742, 177.353, -26.71, 0.914)
pt3dadd(-113.844, 177.355, -26.764, 0.92)
pt3dadd(-113.945, 177.358, -26.817, 0.924)
pt3dadd(-114.048, 177.36, -26.868, 0.93)
pt3dadd(-114.167, 177.36, -26.88, 0.948)
pt3dadd(-114.286, 177.36, -26.892, 0.968)
pt3dadd(-114.406, 177.36, -26.9, 0.988)
pt3dadd(-114.526, 177.36, -26.9, 1.014)
pt3dadd(-114.646, 177.36, -26.9, 1.04)
pt3dadd(-114.759, 177.36, -26.919, 1.06)
pt3dadd(-114.863, 177.36, -26.97, 1.07)
pt3dadd(-114.954, 177.36, -27.029, 1.078)
pt3dadd(-114.994, 177.36, -27.123, 1.068)
pt3dadd(-115.034, 177.36, -27.217, 1.056)
pt3dadd(-115.128, 177.36, -27.273, 1.038)
pt3dadd(-115.233, 177.36, -27.322, 1.018)
pt3dadd(-115.338, 177.36, -27.37, 0.996)
pt3dadd(-115.444, 177.359, -27.416, 0.976)
pt3dadd(-115.557, 177.353, -27.451, 0.954)
pt3dadd(-115.669, 177.348, -27.486, 0.932)
pt3dadd(-115.782, 177.318, -27.505, 0.904)
pt3dadd(-115.897, 177.302, -27.53, 0.898)
pt3dadd(-116.012, 177.287, -27.556, 0.894)
pt3dadd(-116.127, 177.271, -27.582, 0.888)
pt3dadd(-116.242, 177.256, -27.607, 0.884)
pt3dadd(-116.357, 177.24, -27.633, 0.88)
pt3dadd(-116.464, 177.209, -27.669, 0.868)
pt3dadd(-116.572, 177.178, -27.705, 0.858)
pt3dadd(-116.679, 177.145, -27.741, 0.846)
pt3dadd(-116.786, 177.114, -27.777, 0.836)
pt3dadd(-116.884, 177.073, -27.821, 0.812)
pt3dadd(-116.968, 177.02, -27.878, 0.77)
pt3dadd(-117.046, 177, -27.948, 0.746)
pt3dadd(-117.121, 177, -28.026, 0.734)
pt3dadd(-117.211, 177, -28.088, 0.734)
pt3dadd(-117.319, 177, -28.133, 0.744)
pt3dadd(-117.429, 177, -28.17, 0.76)
pt3dadd(-117.548, 177, -28.182, 0.788)
pt3dadd(-117.667, 177, -28.194, 0.816)
pt3dadd(-117.786, 177, -28.2, 0.836)
pt3dadd(-117.906, 177, -28.2, 0.848)
pt3dadd(-118.013, 177, -28.233, 0.852)
pt3dadd(-118.109, 177, -28.293, 0.846)
pt3dadd(-118.205, 177, -28.353, 0.84)
pt3dadd(-118.301, 177, -28.413, 0.836)
pt3dadd(-118.397, 177, -28.473, 0.832)
pt3dadd(-118.485, 177.02, -28.536, 0.816)
pt3dadd(-118.568, 177.059, -28.602, 0.792)
pt3dadd(-118.65, 177.096, -28.668, 0.768)
pt3dadd(-118.732, 177.134, -28.734, 0.744)
pt3dadd(-118.824, 177.164, -28.789, 0.724)
pt3dadd(-118.936, 177.181, -28.822, 0.714)
pt3dadd(-119.048, 177.197, -28.855, 0.704)
pt3dadd(-119.16, 177.214, -28.889, 0.694)
pt3dadd(-119.272, 177.229, -28.922, 0.684)
pt3dadd(-119.385, 177.24, -28.954, 0.678)
pt3dadd(-119.5, 177.24, -28.981, 0.678)
pt3dadd(-119.616, 177.24, -29.008, 0.678)
pt3dadd(-119.731, 177.24, -29.036, 0.678)
pt3dadd(-119.846, 177.24, -29.063, 0.678)
pt3dadd(-119.962, 177.24, -29.091, 0.678)
pt3dadd(-120.08, 177.24, -29.107, 0.692)
pt3dadd(-120.199, 177.24, -29.117, 0.71)
pt3dadd(-120.318, 177.24, -29.128, 0.73)
pt3dadd(-120.438, 177.24, -29.138, 0.75)
pt3dadd(-120.557, 177.24, -29.149, 0.77)
pt3dadd(-120.677, 177.24, -29.159, 0.79)
pt3dadd(-120.792, 177.24, -29.18, 0.81)
pt3dadd(-120.9, 177.24, -29.225, 0.834)
pt3dadd(-121.007, 177.24, -29.27, 0.86)
pt3dadd(-121.114, 177.24, -29.314, 0.882)
pt3dadd(-121.222, 177.24, -29.359, 0.906)
pt3dadd(-121.326, 177.24, -29.406, 0.93)
pt3dadd(-121.402, 177.24, -29.485, 0.952)
pt3dadd(-121.476, 177.24, -29.563, 0.972)
pt3dadd(-121.552, 177.24, -29.641, 0.992)
pt3dadd(-121.626, 177.24, -29.719, 1.012)
pt3dadd(-121.705, 177.24, -29.793, 1.03)
pt3dadd(-121.814, 177.24, -29.833, 1.024)
pt3dadd(-121.925, 177.24, -29.872, 1.02)
pt3dadd(-122.035, 177.24, -29.912, 1.014)
pt3dadd(-122.146, 177.24, -29.952, 1.01)
pt3dadd(-122.255, 177.24, -29.991, 1.006)
pt3dadd(-122.374, 177.24, -30, 0.998)
pt3dadd(-122.494, 177.24, -30, 0.992)
pt3dadd(-122.614, 177.24, -30, 0.984)
pt3dadd(-122.734, 177.24, -30, 0.978)
pt3dadd(-122.854, 177.24, -30, 0.97)
pt3dadd(-122.974, 177.24, -30, 0.962)
pt3dadd(-123.094, 177.24, -30, 0.956)
pt3dadd(-123.203, 177.227, -30.034, 0.942)
pt3dadd(-123.308, 177.21, -30.079, 0.926)
pt3dadd(-123.415, 177.193, -30.123, 0.91)
pt3dadd(-123.521, 177.176, -30.167, 0.894)
pt3dadd(-123.628, 177.16, -30.212, 0.878)
pt3dadd(-123.722, 177.112, -30.259, 0.878)
pt3dadd(-123.817, 177.065, -30.306, 0.878)
pt3dadd(-123.912, 177.018, -30.354, 0.878)
pt3dadd(-124.006, 176.971, -30.401, 0.878)
pt3dadd(-124.075, 176.902, -30.456, 0.87)
pt3dadd(-124.138, 176.826, -30.514, 0.856)
pt3dadd(-124.2, 176.749, -30.571, 0.844)
pt3dadd(-124.262, 176.674, -30.629, 0.832)
pt3dadd(-124.337, 176.648, -30.699, 0.81)
pt3dadd(-124.415, 176.642, -30.775, 0.786)
pt3dadd(-124.487, 176.627, -30.854, 0.744)
pt3dadd(-124.555, 176.605, -30.934, 0.692)
pt3dadd(-124.652, 176.566, -30.972, 0.65)
pt3dadd(-124.759, 176.519, -30.994, 0.612)
pt3dadd(-124.858, 176.464, -31.027, 0.572)
pt3dadd(-124.952, 176.405, -31.064, 0.53)
pt3dadd(-125.04, 176.33, -31.092, 0.47)
pt3dadd(-125.131, 176.255, -31.1, 0.404)
pt3dadd(-125.216, 176.184, -31.13, 0.43)
pt3dadd(-125.272, 176.142, -31.209, 0.54)
pt3dadd(-125.321, 176.08, -31.278, 0.678)
pt3dadd(-125.414, 176.044, -31.232, 0.748)
pt3dadd(-125.49, 176.012, -31.161, 0.728)
pt3dadd(-125.506, 175.918, -31.111, 0.754)
pt3dadd(-125.461, 175.808, -31.105, 0.804)
pt3dadd(-125.396, 175.717, -31.137, 0.778)
pt3dadd(-125.329, 175.673, -31.211, 0.816)
pt3dadd(-125.288, 175.598, -31.275, 0.896)
pt3dadd(-125.28, 175.484, -31.304, 0.962)
pt3dadd(-125.28, 175.374, -31.344, 1.054)
pt3dadd(-125.28, 175.319, -31.432, 1.078)
pt3dadd(-125.28, 175.258, -31.518, 1.066)
pt3dadd(-125.28, 175.194, -31.602, 1.054)
pt3dadd(-125.28, 175.084, -31.641, 1.032)
pt3dadd(-125.28, 174.973, -31.68, 1.01)
pt3dadd(-125.266, 174.864, -31.717, 0.996)
pt3dadd(-125.246, 174.754, -31.755, 0.984)
pt3dadd(-125.188, 174.678, -31.806, 0.97)
pt3dadd(-125.111, 174.617, -31.864, 0.954)
pt3dadd(-125.046, 174.544, -31.921, 0.93)
pt3dadd(-124.981, 174.469, -31.979, 0.904)
pt3dadd(-124.92, 174.394, -32.036, 0.876)
pt3dadd(-124.92, 174.29, -32.087, 0.83)
pt3dadd(-124.92, 174.187, -32.138, 0.784)
pt3dadd(-124.92, 174.106, -32.209, 0.73)
pt3dadd(-124.92, 174.01, -32.269, 0.74)
pt3dadd(-124.92, 173.914, -32.329, 0.75)
pt3dadd(-124.92, 173.818, -32.389, 0.76)
pt3dadd(-124.92, 173.722, -32.449, 0.77)
}
}
proc shape3d_40() {
dend_5[16] { pt3dadd(-124.92, 173.621, -32.5, 0.784)
pt3dadd(-124.92, 173.501, -32.5, 0.826)
pt3dadd(-124.92, 173.381, -32.5, 0.868)
pt3dadd(-124.92, 173.262, -32.503, 0.912)
pt3dadd(-124.92, 173.143, -32.52, 0.96)
pt3dadd(-124.92, 173.026, -32.537, 1.008)
pt3dadd(-124.92, 172.958, -32.599, 1.046)
pt3dadd(-124.92, 172.932, -32.696, 1.076)
pt3dadd(-124.921, 172.904, -32.793, 1.106)
pt3dadd(-124.94, 172.852, -32.882, 1.118)
pt3dadd(-124.963, 172.798, -32.967, 1.13)
pt3dadd(-125.046, 172.714, -32.985, 1.116)
pt3dadd(-125.126, 172.627, -33, 1.096)
pt3dadd(-125.18, 172.52, -33, 1.016)
pt3dadd(-125.233, 172.412, -33, 0.916)
pt3dadd(-125.269, 172.298, -33, 0.852)
pt3dadd(-125.308, 172.184, -33, 0.838)
pt3dadd(-125.389, 172.105, -33, 0.872)
pt3dadd(-125.504, 172.08, -33.011, 0.878)
pt3dadd(-125.616, 172.08, -33.044, 0.816)
pt3dadd(-125.701, 172.08, -33.114, 0.778)
pt3dadd(-125.747, 172.066, -33.203, 0.832)
pt3dadd(-125.76, 172.022, -33.295, 0.9)
pt3dadd(-125.76, 171.968, -33.385, 0.968)
pt3dadd(-125.76, 171.894, -33.461, 1.058)
pt3dadd(-125.76, 171.782, -33.493, 1.058)
pt3dadd(-125.767, 171.664, -33.5, 0.962)
pt3dadd(-125.792, 171.546, -33.5, 0.832)
pt3dadd(-125.869, 171.461, -33.513, 0.784)
pt3dadd(-125.96, 171.385, -33.531, 0.758)
pt3dadd(-126.054, 171.324, -33.564, 0.754)
pt3dadd(-126.148, 171.264, -33.601, 0.754)
pt3dadd(-126.185, 171.163, -33.646, 0.744)
pt3dadd(-126.222, 171.062, -33.69, 0.732)
pt3dadd(-126.244, 170.981, -33.755, 0.722)
pt3dadd(-126.25, 170.917, -33.84, 0.71)
pt3dadd(-126.269, 170.833, -33.895, 0.704)
pt3dadd(-126.31, 170.726, -33.925, 0.712)
pt3dadd(-126.352, 170.622, -33.96, 0.726)
pt3dadd(-126.36, 170.507, -33.98, 0.744)
pt3dadd(-126.36, 170.388, -33.997, 0.762)
pt3dadd(-126.36, 170.272, -34.019, 0.782)
pt3dadd(-126.36, 170.161, -34.058, 0.804)
pt3dadd(-126.36, 170.05, -34.096, 0.826)
pt3dadd(-126.36, 169.955, -34.157, 0.892)
pt3dadd(-126.36, 169.861, -34.219, 0.964)
pt3dadd(-126.36, 169.814, -34.308, 1.076)
pt3dadd(-126.36, 169.778, -34.403, 1.186)
pt3dadd(-126.36, 169.728, -34.494, 1.23)
pt3dadd(-126.36, 169.678, -34.584, 1.272)
pt3dadd(-126.36, 169.627, -34.675, 1.316)
pt3dadd(-126.36, 169.577, -34.766, 1.358)
pt3dadd(-126.36, 169.526, -34.856, 1.402)
pt3dadd(-126.36, 169.489, -34.951, 1.426)
pt3dadd(-126.36, 169.453, -35.047, 1.448)
pt3dadd(-126.36, 169.417, -35.142, 1.472)
pt3dadd(-126.36, 169.381, -35.237, 1.494)
pt3dadd(-126.36, 169.345, -35.333, 1.516)
pt3dadd(-126.365, 169.32, -35.43, 1.54)
pt3dadd(-126.386, 169.32, -35.528, 1.532)
pt3dadd(-126.432, 169.32, -35.62, 1.446)
pt3dadd(-126.467, 169.319, -35.715, 1.408)
pt3dadd(-126.485, 169.297, -35.812, 1.466)
pt3dadd(-126.517, 169.232, -35.885, 1.62)
pt3dadd(-126.57, 169.129, -35.904, 1.796)
pt3dadd(-126.598, 169.016, -35.929, 1.958)
pt3dadd(-126.602, 168.908, -35.97, 2.1)
pt3dadd(-126.628, 168.796, -35.995, 2.226)
pt3dadd(-126.677, 168.686, -36, 2.352)
pt3dadd(-126.739, 168.588, -36.022, 2.41)
pt3dadd(-126.8, 168.493, -36.048, 2.462)
pt3dadd(-126.822, 168.487, -36.146, 2.482)
pt3dadd(-126.844, 168.482, -36.244, 2.502)
pt3dadd(-126.871, 168.48, -36.342, 2.478)
pt3dadd(-126.938, 168.43, -36.403, 2.442)
pt3dadd(-127.016, 168.36, -36.452, 2.418)
pt3dadd(-127.096, 168.292, -36.501, 2.394)
pt3dadd(-127.174, 168.223, -36.551, 2.368)
pt3dadd(-127.213, 168.132, -36.601, 2.326)
pt3dadd(-127.234, 168.031, -36.651, 2.276)
pt3dadd(-127.277, 167.942, -36.706, 2.21)
pt3dadd(-127.33, 167.858, -36.763, 2.138)
pt3dadd(-127.436, 167.812, -36.782, 2.054)
pt3dadd(-127.546, 167.766, -36.798, 1.97)
pt3dadd(-127.663, 167.755, -36.811, 1.874)
pt3dadd(-127.782, 167.75, -36.824, 1.778)
pt3dadd(-127.878, 167.714, -36.839, 1.69)
pt3dadd(-127.916, 167.604, -36.858, 1.634)
pt3dadd(-127.955, 167.492, -36.877, 1.576)
pt3dadd(-127.993, 167.381, -36.896, 1.518)
pt3dadd(-128.046, 167.274, -36.904, 1.45)
pt3dadd(-128.102, 167.168, -36.909, 1.378)
pt3dadd(-128.15, 167.088, -36.961, 1.342)
pt3dadd(-128.202, 167.044, -37.04, 1.33)
pt3dadd(-128.29, 167.04, -37.107, 1.384)
pt3dadd(-128.368, 167.04, -37.18, 1.42)
pt3dadd(-128.398, 167.029, -37.275, 1.39)
pt3dadd(-128.4, 166.975, -37.361, 1.29)
pt3dadd(-128.4, 166.864, -37.393, 1.174)
pt3dadd(-128.407, 166.745, -37.4, 1.09)
pt3dadd(-128.432, 166.627, -37.4, 1.002)
pt3dadd(-128.482, 166.518, -37.4, 0.93)
pt3dadd(-128.534, 166.411, -37.4, 0.982)
pt3dadd(-128.612, 166.324, -37.4, 1.054)
pt3dadd(-128.711, 166.256, -37.4, 1.1)
pt3dadd(-128.812, 166.19, -37.4, 1.13)
pt3dadd(-128.915, 166.13, -37.4, 1.13)
pt3dadd(-129.01, 166.061, -37.4, 1.118)
pt3dadd(-129.076, 165.971, -37.418, 1.07)
pt3dadd(-129.161, 165.902, -37.462, 1.046)
pt3dadd(-129.245, 165.835, -37.505, 1.02)
pt3dadd(-129.329, 165.767, -37.548, 0.996)
pt3dadd(-129.402, 165.695, -37.597, 0.976)
pt3dadd(-129.45, 165.613, -37.659, 0.964)
pt3dadd(-129.499, 165.533, -37.721, 0.952)
pt3dadd(-129.547, 165.452, -37.783, 0.94)
pt3dadd(-129.587, 165.372, -37.847, 0.928)
pt3dadd(-129.59, 165.293, -37.922, 0.922)
pt3dadd(-129.593, 165.214, -37.998, 0.918)
pt3dadd(-129.595, 165.134, -38.073, 0.912)
pt3dadd(-129.598, 165.055, -38.148, 0.908)
pt3dadd(-129.6, 164.98, -38.225, 0.904)
pt3dadd(-129.6, 164.911, -38.308, 0.904)
pt3dadd(-129.6, 164.848, -38.392, 0.904)
pt3dadd(-129.6, 164.808, -38.486, 0.904)
pt3dadd(-129.6, 164.768, -38.58, 0.904)
pt3dadd(-129.6, 164.718, -38.671, 0.912)
pt3dadd(-129.6, 164.664, -38.76, 0.924)
pt3dadd(-129.624, 164.587, -38.827, 0.944)
pt3dadd(-129.668, 164.492, -38.876, 0.972)
pt3dadd(-129.722, 164.389, -38.895, 1.032)
pt3dadd(-129.785, 164.288, -38.9, 1.1)
pt3dadd(-129.86, 164.195, -38.9, 1.158)
pt3dadd(-129.923, 164.096, -38.9, 1.212)
pt3dadd(-129.938, 163.976, -38.9, 1.25)
pt3dadd(-129.953, 163.858, -38.9, 1.288)
pt3dadd(-129.96, 163.738, -38.9, 1.302)
pt3dadd(-129.96, 163.618, -38.9, 1.294)
pt3dadd(-129.96, 163.498, -38.9, 1.284)
pt3dadd(-129.96, 163.387, -38.926, 1.246)
pt3dadd(-129.96, 163.283, -38.977, 1.176)
pt3dadd(-129.971, 163.199, -39.04, 1.112)
pt3dadd(-130.003, 163.153, -39.128, 1.058)
pt3dadd(-130.036, 163.109, -39.217, 1.004)
pt3dadd(-130.07, 163.063, -39.305, 0.952)
pt3dadd(-130.121, 163.012, -39.384, 0.91)
pt3dadd(-130.17, 162.964, -39.466, 0.888)
pt3dadd(-130.19, 162.895, -39.543, 0.934)
pt3dadd(-130.198, 162.81, -39.613, 0.982)
pt3dadd(-130.204, 162.761, -39.699, 1.038)
pt3dadd(-130.208, 162.739, -39.798, 1.098)
pt3dadd(-130.219, 162.716, -39.893, 1.162)
pt3dadd(-130.302, 162.672, -39.956, 1.26)
pt3dadd(-130.39, 162.622, -40.005, 1.356)
pt3dadd(-130.49, 162.562, -40.022, 1.446)
pt3dadd(-130.572, 162.486, -40.044, 1.522)
pt3dadd(-130.609, 162.379, -40.078, 1.568)
pt3dadd(-130.645, 162.272, -40.112, 1.614)
pt3dadd(-130.681, 162.168, -40.149, 1.662)
pt3dadd(-130.703, 162.091, -40.224, 1.74)
pt3dadd(-130.729, 162.013, -40.294, 1.826)
pt3dadd(-130.78, 161.918, -40.336, 1.88)
pt3dadd(-130.817, 161.818, -40.382, 1.874)
pt3dadd(-130.853, 161.718, -40.427, 1.868)
pt3dadd(-130.889, 161.617, -40.473, 1.862)
pt3dadd(-130.92, 161.516, -40.519, 1.854)
pt3dadd(-130.92, 161.412, -40.569, 1.824)
pt3dadd(-130.92, 161.309, -40.619, 1.794)
pt3dadd(-130.92, 161.204, -40.669, 1.766)
pt3dadd(-130.92, 161.1, -40.719, 1.736)
pt3dadd(-130.921, 160.996, -40.768, 1.706)
pt3dadd(-130.945, 160.884, -40.797, 1.676)
pt3dadd(-130.97, 160.772, -40.827, 1.644)
pt3dadd(-130.994, 160.66, -40.856, 1.614)
pt3dadd(-131.02, 160.548, -40.886, 1.584)
pt3dadd(-131.04, 160.435, -40.915, 1.534)
pt3dadd(-131.04, 160.324, -40.949, 1.408)
pt3dadd(-131.04, 160.216, -40.993, 1.36)
pt3dadd(-131.04, 160.122, -41.055, 1.322)
pt3dadd(-131.048, 160.054, -41.136, 1.232)
pt3dadd(-131.113, 159.991, -41.196, 1.188)
pt3dadd(-131.222, 159.962, -41.228, 1.264)
pt3dadd(-131.318, 159.96, -41.286, 1.336)
pt3dadd(-131.413, 159.96, -41.348, 1.342)
pt3dadd(-131.521, 159.96, -41.389, 1.28)
pt3dadd(-131.64, 159.96, -41.4, 1.206)
}
dend_5[17] {pt3dclear()
pt3dadd(-90, 179.16, -17.6, 1.104)
pt3dadd(-90, 179.16, -17.598, 1.102)
pt3dadd(-89.98, 179.18, -17.5, 0.96)
pt3dadd(-89.961, 179.2, -17.403, 0.816)
pt3dadd(-89.941, 179.219, -17.306, 0.674)
pt3dadd(-89.922, 179.238, -17.208, 0.532)
pt3dadd(-89.902, 179.257, -17.111, 0.388)
pt3dadd(-89.883, 179.278, -17.014, 0.246)
pt3dadd(-89.983, 179.28, -17, 0.27)
pt3dadd(-90.103, 179.28, -17, 0.32)
pt3dadd(-90.223, 179.28, -17, 0.37)
pt3dadd(-90.343, 179.28, -17, 0.42)
pt3dadd(-90.463, 179.28, -17, 0.47)
pt3dadd(-90.583, 179.28, -17, 0.52)
}
}
proc shape3d_41() {
dend_5[17] { pt3dadd(-90.703, 179.28, -17, 0.57)
pt3dadd(-90.823, 179.281, -17, 0.58)
pt3dadd(-90.943, 179.284, -17, 0.584)
pt3dadd(-91.063, 179.286, -17, 0.588)
pt3dadd(-91.183, 179.287, -17, 0.592)
pt3dadd(-91.303, 179.29, -17, 0.596)
pt3dadd(-91.423, 179.291, -17, 0.598)
pt3dadd(-91.543, 179.293, -17, 0.602)
pt3dadd(-91.656, 179.334, -17, 0.59)
pt3dadd(-91.768, 179.375, -17, 0.576)
pt3dadd(-91.881, 179.417, -17, 0.562)
pt3dadd(-91.993, 179.459, -17, 0.548)
pt3dadd(-92.106, 179.5, -17, 0.534)
pt3dadd(-92.219, 179.525, -17.017, 0.52)
pt3dadd(-92.332, 179.536, -17.049, 0.506)
pt3dadd(-92.445, 179.545, -17.081, 0.49)
pt3dadd(-92.558, 179.556, -17.113, 0.476)
pt3dadd(-92.671, 179.566, -17.145, 0.462)
pt3dadd(-92.777, 179.594, -17.179, 0.452)
pt3dadd(-92.869, 179.658, -17.216, 0.452)
pt3dadd(-92.961, 179.722, -17.253, 0.452)
pt3dadd(-93.052, 179.784, -17.29, 0.452)
pt3dadd(-93.14, 179.845, -17.332, 0.458)
pt3dadd(-93.199, 179.89, -17.411, 0.514)
pt3dadd(-93.261, 179.94, -17.484, 0.566)
pt3dadd(-93.33, 180.01, -17.542, 0.608)
pt3dadd(-93.423, 180.062, -17.579, 0.642)
pt3dadd(-93.533, 180.101, -17.601, 0.666)
pt3dadd(-93.645, 180.12, -17.628, 0.684)
pt3dadd(-93.758, 180.12, -17.661, 0.694)
pt3dadd(-93.872, 180.12, -17.69, 0.706)
pt3dadd(-93.992, 180.12, -17.696, 0.718)
pt3dadd(-94.112, 180.12, -17.7, 0.73)
pt3dadd(-94.232, 180.12, -17.7, 0.732)
pt3dadd(-94.352, 180.12, -17.7, 0.736)
pt3dadd(-94.472, 180.12, -17.7, 0.74)
pt3dadd(-94.592, 180.12, -17.7, 0.744)
pt3dadd(-94.712, 180.12, -17.7, 0.748)
pt3dadd(-94.832, 180.12, -17.7, 0.75)
pt3dadd(-94.952, 180.12, -17.7, 0.754)
pt3dadd(-95.072, 180.12, -17.7, 0.754)
pt3dadd(-95.192, 180.12, -17.7, 0.754)
pt3dadd(-95.312, 180.12, -17.7, 0.754)
pt3dadd(-95.432, 180.12, -17.7, 0.754)
pt3dadd(-95.552, 180.12, -17.7, 0.754)
pt3dadd(-95.672, 180.12, -17.7, 0.754)
pt3dadd(-95.792, 180.12, -17.7, 0.754)
pt3dadd(-95.912, 180.12, -17.7, 0.754)
pt3dadd(-96.032, 180.12, -17.7, 0.754)
pt3dadd(-96.152, 180.12, -17.7, 0.754)
pt3dadd(-96.272, 180.12, -17.7, 0.754)
pt3dadd(-96.392, 180.12, -17.7, 0.754)
pt3dadd(-96.512, 180.12, -17.7, 0.754)
pt3dadd(-96.632, 180.12, -17.702, 0.754)
pt3dadd(-96.752, 180.12, -17.709, 0.754)
pt3dadd(-96.871, 180.12, -17.715, 0.754)
pt3dadd(-96.991, 180.12, -17.722, 0.754)
pt3dadd(-97.111, 180.12, -17.729, 0.754)
pt3dadd(-97.231, 180.12, -17.736, 0.754)
pt3dadd(-97.35, 180.12, -17.742, 0.754)
pt3dadd(-97.467, 180.12, -17.763, 0.754)
pt3dadd(-97.582, 180.12, -17.791, 0.754)
pt3dadd(-97.698, 180.12, -17.818, 0.754)
pt3dadd(-97.813, 180.12, -17.846, 0.754)
pt3dadd(-97.929, 180.12, -17.873, 0.754)
pt3dadd(-98.044, 180.12, -17.901, 0.754)
pt3dadd(-98.155, 180.12, -17.938, 0.758)
pt3dadd(-98.267, 180.12, -17.976, 0.762)
pt3dadd(-98.378, 180.12, -18.013, 0.768)
pt3dadd(-98.489, 180.12, -18.05, 0.772)
pt3dadd(-98.601, 180.12, -18.087, 0.776)
pt3dadd(-98.712, 180.12, -18.124, 0.782)
pt3dadd(-98.824, 180.12, -18.161, 0.786)
pt3dadd(-98.935, 180.12, -18.198, 0.79)
pt3dadd(-99.046, 180.12, -18.236, 0.796)
pt3dadd(-99.158, 180.12, -18.273, 0.8)
pt3dadd(-99.271, 180.12, -18.303, 0.804)
pt3dadd(-99.391, 180.12, -18.313, 0.804)
pt3dadd(-99.51, 180.12, -18.324, 0.804)
pt3dadd(-99.629, 180.12, -18.334, 0.804)
pt3dadd(-99.749, 180.12, -18.345, 0.804)
pt3dadd(-99.868, 180.12, -18.355, 0.804)
pt3dadd(-99.987, 180.12, -18.366, 0.804)
pt3dadd(-100.094, 180.113, -18.409, 0.79)
pt3dadd(-100.2, 180.104, -18.456, 0.774)
pt3dadd(-100.305, 180.097, -18.504, 0.76)
pt3dadd(-100.411, 180.089, -18.551, 0.744)
pt3dadd(-100.516, 180.08, -18.598, 0.728)
pt3dadd(-100.628, 180.042, -18.613, 0.714)
pt3dadd(-100.74, 180.002, -18.626, 0.698)
pt3dadd(-100.852, 179.962, -18.639, 0.684)
pt3dadd(-100.964, 179.922, -18.653, 0.668)
pt3dadd(-101.076, 179.881, -18.666, 0.654)
pt3dadd(-101.195, 179.88, -18.671, 0.65)
pt3dadd(-101.315, 179.88, -18.677, 0.646)
pt3dadd(-101.435, 179.88, -18.681, 0.642)
pt3dadd(-101.555, 179.88, -18.687, 0.638)
pt3dadd(-101.675, 179.88, -18.691, 0.634)
pt3dadd(-101.794, 179.88, -18.696, 0.63)
pt3dadd(-101.913, 179.88, -18.708, 0.634)
pt3dadd(-102.028, 179.88, -18.735, 0.654)
pt3dadd(-102.144, 179.88, -18.763, 0.676)
pt3dadd(-102.262, 179.88, -18.777, 0.694)
pt3dadd(-102.381, 179.88, -18.79, 0.712)
pt3dadd(-102.5, 179.88, -18.806, 0.728)
pt3dadd(-102.613, 179.88, -18.839, 0.728)
pt3dadd(-102.726, 179.88, -18.872, 0.728)
pt3dadd(-102.816, 179.885, -18.936, 0.718)
pt3dadd(-102.901, 179.892, -19.006, 0.706)
pt3dadd(-102.993, 179.92, -19.064, 0.69)
pt3dadd(-103.088, 179.954, -19.118, 0.674)
pt3dadd(-103.183, 179.989, -19.172, 0.658)
pt3dadd(-103.295, 180, -19.191, 0.648)
pt3dadd(-103.415, 180, -19.195, 0.638)
pt3dadd(-103.535, 180, -19.199, 0.63)
pt3dadd(-103.655, 180, -19.2, 0.628)
pt3dadd(-103.775, 180, -19.2, 0.648)
pt3dadd(-103.895, 180, -19.2, 0.672)
pt3dadd(-104.015, 180, -19.2, 0.698)
pt3dadd(-104.124, 180.044, -19.204, 0.74)
pt3dadd(-104.23, 180.101, -19.209, 0.788)
pt3dadd(-104.29, 180.162, -19.262, 0.822)
pt3dadd(-104.326, 180.228, -19.341, 0.848)
pt3dadd(-104.41, 180.276, -19.395, 0.842)
pt3dadd(-104.505, 180.319, -19.444, 0.828)
pt3dadd(-104.593, 180.332, -19.51, 0.806)
pt3dadd(-104.682, 180.344, -19.577, 0.784)
pt3dadd(-104.77, 180.356, -19.644, 0.76)
pt3dadd(-104.871, 180.36, -19.696, 0.738)
pt3dadd(-104.978, 180.36, -19.741, 0.716)
pt3dadd(-105.089, 180.36, -19.778, 0.676)
pt3dadd(-105.207, 180.36, -19.79, 0.648)
pt3dadd(-105.327, 180.36, -19.792, 0.642)
pt3dadd(-105.447, 180.36, -19.793, 0.634)
pt3dadd(-105.567, 180.36, -19.795, 0.626)
pt3dadd(-105.687, 180.36, -19.796, 0.62)
pt3dadd(-105.807, 180.36, -19.798, 0.612)
pt3dadd(-105.927, 180.36, -19.8, 0.604)
pt3dadd(-106.045, 180.376, -19.809, 0.596)
pt3dadd(-106.162, 180.398, -19.821, 0.586)
pt3dadd(-106.279, 180.42, -19.833, 0.578)
pt3dadd(-106.396, 180.442, -19.846, 0.568)
pt3dadd(-106.513, 180.463, -19.858, 0.56)
pt3dadd(-106.631, 180.481, -19.868, 0.552)
pt3dadd(-106.751, 180.488, -19.873, 0.552)
pt3dadd(-106.87, 180.494, -19.879, 0.552)
pt3dadd(-106.99, 180.5, -19.884, 0.552)
pt3dadd(-107.11, 180.506, -19.889, 0.552)
pt3dadd(-107.229, 180.512, -19.894, 0.552)
pt3dadd(-107.349, 180.518, -19.899, 0.552)
pt3dadd(-107.463, 180.554, -19.9, 0.56)
pt3dadd(-107.577, 180.594, -19.9, 0.57)
pt3dadd(-107.69, 180.632, -19.9, 0.58)
pt3dadd(-107.804, 180.671, -19.9, 0.588)
pt3dadd(-107.918, 180.709, -19.9, 0.598)
pt3dadd(-108.032, 180.742, -19.906, 0.606)
pt3dadd(-108.149, 180.761, -19.923, 0.616)
pt3dadd(-108.266, 180.781, -19.94, 0.626)
pt3dadd(-108.382, 180.8, -19.956, 0.634)
pt3dadd(-108.499, 180.821, -19.973, 0.644)
pt3dadd(-108.616, 180.841, -19.989, 0.652)
pt3dadd(-108.733, 180.866, -19.993, 0.658)
pt3dadd(-108.85, 180.892, -19.997, 0.662)
pt3dadd(-108.967, 180.918, -20.001, 0.666)
pt3dadd(-109.084, 180.943, -20.005, 0.67)
pt3dadd(-109.201, 180.968, -20.009, 0.676)
pt3dadd(-109.303, 181.014, -20.026, 0.678)
pt3dadd(-109.371, 181.097, -20.07, 0.678)
pt3dadd(-109.448, 181.181, -20.092, 0.678)
pt3dadd(-109.533, 181.266, -20.097, 0.678)
pt3dadd(-109.635, 181.309, -20.102, 0.674)
pt3dadd(-109.755, 181.314, -20.106, 0.664)
pt3dadd(-109.875, 181.319, -20.11, 0.656)
pt3dadd(-109.989, 181.325, -20.137, 0.644)
pt3dadd(-110.102, 181.33, -20.171, 0.634)
pt3dadd(-110.207, 181.36, -20.206, 0.618)
pt3dadd(-110.309, 181.41, -20.237, 0.602)
pt3dadd(-110.422, 181.446, -20.25, 0.602)
pt3dadd(-110.535, 181.483, -20.263, 0.602)
pt3dadd(-110.648, 181.52, -20.276, 0.602)
pt3dadd(-110.761, 181.556, -20.289, 0.602)
pt3dadd(-110.873, 181.595, -20.304, 0.602)
pt3dadd(-110.981, 181.642, -20.326, 0.602)
pt3dadd(-111.083, 181.681, -20.358, 0.6)
pt3dadd(-111.168, 181.687, -20.429, 0.588)
pt3dadd(-111.254, 181.704, -20.49, 0.578)
pt3dadd(-111.351, 181.775, -20.495, 0.578)
pt3dadd(-111.443, 181.849, -20.5, 0.578)
pt3dadd(-111.475, 181.964, -20.5, 0.578)
pt3dadd(-111.508, 182.08, -20.5, 0.578)
pt3dadd(-111.553, 182.188, -20.517, 0.602)
pt3dadd(-111.608, 182.288, -20.544, 0.628)
pt3dadd(-111.666, 182.387, -20.575, 0.628)
pt3dadd(-111.724, 182.485, -20.606, 0.628)
pt3dadd(-111.783, 182.584, -20.637, 0.628)
pt3dadd(-111.842, 182.681, -20.667, 0.628)
pt3dadd(-111.942, 182.736, -20.698, 0.622)
pt3dadd(-112.043, 182.79, -20.728, 0.616)
pt3dadd(-112.143, 182.845, -20.758, 0.61)
pt3dadd(-112.243, 182.899, -20.789, 0.604)
}
}
proc shape3d_42() {
dend_5[17] { pt3dadd(-112.352, 182.944, -20.808, 0.596)
pt3dadd(-112.465, 182.98, -20.821, 0.586)
pt3dadd(-112.578, 183.017, -20.835, 0.576)
pt3dadd(-112.691, 183.054, -20.848, 0.566)
pt3dadd(-112.804, 183.091, -20.861, 0.556)
pt3dadd(-112.911, 183.126, -20.892, 0.552)
pt3dadd(-113.013, 183.158, -20.937, 0.552)
pt3dadd(-113.115, 183.191, -20.982, 0.552)
pt3dadd(-113.217, 183.224, -21.027, 0.552)
pt3dadd(-113.318, 183.262, -21.069, 0.554)
pt3dadd(-113.415, 183.33, -21.086, 0.568)
pt3dadd(-113.512, 183.397, -21.101, 0.578)
pt3dadd(-113.613, 183.461, -21.106, 0.578)
pt3dadd(-113.712, 183.523, -21.117, 0.576)
pt3dadd(-113.77, 183.568, -21.197, 0.562)
pt3dadd(-113.843, 183.599, -21.26, 0.552)
pt3dadd(-113.961, 183.593, -21.278, 0.552)
pt3dadd(-114.079, 183.588, -21.296, 0.552)
pt3dadd(-114.192, 183.553, -21.3, 0.578)
pt3dadd(-114.306, 183.516, -21.3, 0.606)
pt3dadd(-114.425, 183.502, -21.3, 0.626)
pt3dadd(-114.544, 183.487, -21.3, 0.644)
pt3dadd(-114.664, 183.48, -21.3, 0.658)
pt3dadd(-114.784, 183.48, -21.3, 0.666)
pt3dadd(-114.904, 183.48, -21.3, 0.674)
pt3dadd(-115.024, 183.48, -21.302, 0.678)
pt3dadd(-115.144, 183.48, -21.306, 0.678)
pt3dadd(-115.263, 183.48, -21.31, 0.678)
pt3dadd(-115.347, 183.484, -21.365, 0.678)
pt3dadd(-115.411, 183.491, -21.45, 0.678)
pt3dadd(-115.445, 183.518, -21.538, 0.678)
pt3dadd(-115.459, 183.565, -21.628, 0.68)
pt3dadd(-115.524, 183.62, -21.699, 0.692)
pt3dadd(-115.589, 183.676, -21.769, 0.704)
pt3dadd(-115.654, 183.731, -21.84, 0.716)
pt3dadd(-115.719, 183.786, -21.91, 0.728)
pt3dadd(-115.772, 183.862, -21.973, 0.784)
pt3dadd(-115.827, 183.941, -22.032, 0.846)
pt3dadd(-115.887, 184.031, -22.076, 0.916)
pt3dadd(-115.969, 184.104, -22.1, 0.964)
pt3dadd(-116.076, 184.158, -22.1, 0.986)
pt3dadd(-116.184, 184.208, -22.1, 1)
pt3dadd(-116.298, 184.248, -22.1, 0.978)
pt3dadd(-116.411, 184.288, -22.1, 0.958)
pt3dadd(-116.492, 184.368, -22.123, 0.866)
pt3dadd(-116.574, 184.448, -22.153, 0.806)
pt3dadd(-116.659, 184.524, -22.185, 0.77)
pt3dadd(-116.744, 184.6, -22.216, 0.734)
pt3dadd(-116.83, 184.675, -22.248, 0.7)
pt3dadd(-116.925, 184.739, -22.269, 0.672)
pt3dadd(-117.035, 184.786, -22.276, 0.658)
pt3dadd(-117.145, 184.834, -22.282, 0.642)
pt3dadd(-117.255, 184.88, -22.289, 0.628)
pt3dadd(-117.365, 184.927, -22.295, 0.612)
pt3dadd(-117.477, 184.972, -22.3, 0.602)
pt3dadd(-117.591, 185.006, -22.3, 0.596)
pt3dadd(-117.706, 185.042, -22.3, 0.592)
pt3dadd(-117.82, 185.078, -22.3, 0.588)
pt3dadd(-117.935, 185.114, -22.3, 0.584)
pt3dadd(-118.049, 185.15, -22.3, 0.578)
pt3dadd(-118.167, 185.161, -22.311, 0.584)
pt3dadd(-118.285, 185.164, -22.325, 0.592)
pt3dadd(-118.404, 185.166, -22.34, 0.6)
pt3dadd(-118.523, 185.168, -22.355, 0.608)
pt3dadd(-118.641, 185.171, -22.369, 0.616)
pt3dadd(-118.76, 185.172, -22.384, 0.626)
pt3dadd(-118.867, 185.213, -22.404, 0.628)
pt3dadd(-118.968, 185.272, -22.426, 0.628)
pt3dadd(-119.069, 185.332, -22.448, 0.628)
pt3dadd(-119.17, 185.39, -22.47, 0.628)
pt3dadd(-119.268, 185.453, -22.493, 0.628)
pt3dadd(-119.358, 185.526, -22.519, 0.628)
pt3dadd(-119.447, 185.6, -22.545, 0.628)
pt3dadd(-119.536, 185.675, -22.57, 0.628)
pt3dadd(-119.626, 185.748, -22.596, 0.628)
pt3dadd(-119.719, 185.808, -22.633, 0.622)
pt3dadd(-119.814, 185.864, -22.673, 0.616)
pt3dadd(-119.909, 185.921, -22.712, 0.61)
pt3dadd(-120.004, 185.978, -22.751, 0.606)
pt3dadd(-120.102, 186.031, -22.787, 0.602)
pt3dadd(-120.203, 186.084, -22.82, 0.602)
pt3dadd(-120.302, 186.136, -22.853, 0.602)
pt3dadd(-120.403, 186.187, -22.886, 0.602)
pt3dadd(-120.506, 186.228, -22.919, 0.606)
pt3dadd(-120.619, 186.234, -22.954, 0.616)
pt3dadd(-120.732, 186.24, -22.988, 0.628)
pt3dadd(-120.852, 186.24, -22.993, 0.636)
pt3dadd(-120.972, 186.24, -22.997, 0.646)
pt3dadd(-121.091, 186.24, -23.002, 0.654)
pt3dadd(-121.21, 186.24, -23.019, 0.664)
pt3dadd(-121.328, 186.24, -23.036, 0.674)
pt3dadd(-121.4, 186.24, -23.093, 0.674)
pt3dadd(-121.427, 186.24, -23.191, 0.662)
pt3dadd(-121.453, 186.24, -23.288, 0.652)
pt3dadd(-121.552, 186.244, -23.346, 0.646)
pt3dadd(-121.65, 186.247, -23.402, 0.638)
pt3dadd(-121.748, 186.251, -23.459, 0.632)
pt3dadd(-121.853, 186.276, -23.491, 0.616)
pt3dadd(-121.962, 186.325, -23.496, 0.594)
pt3dadd(-122.071, 186.376, -23.5, 0.578)
pt3dadd(-122.18, 186.422, -23.51, 0.58)
pt3dadd(-122.291, 186.463, -23.528, 0.586)
pt3dadd(-122.401, 186.505, -23.547, 0.59)
pt3dadd(-122.512, 186.546, -23.565, 0.596)
pt3dadd(-122.622, 186.588, -23.584, 0.602)
pt3dadd(-122.73, 186.636, -23.601, 0.618)
pt3dadd(-122.837, 186.686, -23.617, 0.64)
pt3dadd(-122.944, 186.738, -23.634, 0.66)
pt3dadd(-123.05, 186.788, -23.65, 0.682)
pt3dadd(-123.157, 186.839, -23.666, 0.702)
pt3dadd(-123.275, 186.86, -23.674, 0.716)
pt3dadd(-123.392, 186.882, -23.682, 0.73)
pt3dadd(-123.51, 186.904, -23.69, 0.742)
pt3dadd(-123.629, 186.924, -23.698, 0.756)
pt3dadd(-123.746, 186.946, -23.706, 0.77)
pt3dadd(-123.862, 186.96, -23.724, 0.778)
pt3dadd(-123.972, 186.96, -23.763, 0.778)
pt3dadd(-124.081, 186.96, -23.803, 0.778)
pt3dadd(-124.192, 186.96, -23.843, 0.778)
pt3dadd(-124.302, 186.96, -23.882, 0.778)
pt3dadd(-124.412, 186.96, -23.922, 0.778)
pt3dadd(-124.525, 186.96, -23.955, 0.736)
pt3dadd(-124.639, 186.96, -23.988, 0.694)
pt3dadd(-124.756, 186.964, -24.008, 0.654)
pt3dadd(-124.874, 186.968, -24.021, 0.614)
pt3dadd(-124.991, 186.977, -24.035, 0.578)
pt3dadd(-125.074, 187.052, -24.073, 0.578)
pt3dadd(-125.158, 187.129, -24.1, 0.588)
pt3dadd(-125.245, 187.211, -24.1, 0.622)
pt3dadd(-125.338, 187.284, -24.101, 0.66)
pt3dadd(-125.454, 187.309, -24.108, 0.708)
pt3dadd(-125.572, 187.332, -24.12, 0.73)
pt3dadd(-125.687, 187.355, -24.137, 0.736)
pt3dadd(-125.803, 187.378, -24.154, 0.74)
pt3dadd(-125.92, 187.4, -24.171, 0.746)
pt3dadd(-126.035, 187.423, -24.188, 0.75)
pt3dadd(-126.152, 187.44, -24.205, 0.754)
pt3dadd(-126.27, 187.44, -24.221, 0.758)
pt3dadd(-126.389, 187.44, -24.237, 0.762)
pt3dadd(-126.508, 187.44, -24.254, 0.766)
pt3dadd(-126.625, 187.44, -24.27, 0.77)
pt3dadd(-126.744, 187.44, -24.287, 0.774)
pt3dadd(-126.863, 187.44, -24.3, 0.78)
pt3dadd(-126.983, 187.44, -24.3, 0.786)
pt3dadd(-127.103, 187.44, -24.3, 0.794)
pt3dadd(-127.223, 187.44, -24.3, 0.802)
pt3dadd(-127.343, 187.44, -24.3, 0.808)
pt3dadd(-127.463, 187.44, -24.3, 0.816)
pt3dadd(-127.583, 187.44, -24.3, 0.822)
pt3dadd(-127.703, 187.44, -24.3, 0.83)
pt3dadd(-127.823, 187.44, -24.3, 0.838)
pt3dadd(-127.943, 187.44, -24.3, 0.848)
pt3dadd(-128.063, 187.44, -24.3, 0.852)
pt3dadd(-128.183, 187.44, -24.3, 0.844)
pt3dadd(-128.303, 187.44, -24.3, 0.836)
pt3dadd(-128.423, 187.442, -24.3, 0.824)
pt3dadd(-128.542, 187.458, -24.3, 0.796)
pt3dadd(-128.66, 187.472, -24.3, 0.768)
pt3dadd(-128.764, 187.52, -24.3, 0.736)
pt3dadd(-128.852, 187.602, -24.3, 0.7)
pt3dadd(-128.93, 187.692, -24.3, 0.666)
pt3dadd(-128.995, 187.793, -24.3, 0.63)
pt3dadd(-129.109, 187.819, -24.302, 0.62)
pt3dadd(-129.228, 187.838, -24.304, 0.612)
pt3dadd(-129.347, 187.859, -24.305, 0.604)
pt3dadd(-129.464, 187.879, -24.307, 0.594)
pt3dadd(-129.583, 187.898, -24.309, 0.586)
pt3dadd(-129.701, 187.919, -24.311, 0.578)
pt3dadd(-129.818, 187.901, -24.327, 0.574)
pt3dadd(-129.935, 187.882, -24.343, 0.568)
pt3dadd(-130.051, 187.861, -24.36, 0.564)
pt3dadd(-130.168, 187.841, -24.376, 0.56)
pt3dadd(-130.285, 187.822, -24.393, 0.554)
pt3dadd(-130.403, 187.812, -24.397, 0.548)
pt3dadd(-130.523, 187.81, -24.392, 0.54)
pt3dadd(-130.643, 187.808, -24.387, 0.532)
pt3dadd(-130.763, 187.806, -24.382, 0.524)
pt3dadd(-130.883, 187.804, -24.377, 0.518)
pt3dadd(-131.003, 187.802, -24.372, 0.51)
pt3dadd(-131.122, 187.8, -24.366, 0.502)
pt3dadd(-131.23, 187.8, -24.321, 0.48)
pt3dadd(-131.336, 187.8, -24.277, 0.456)
pt3dadd(-131.431, 187.805, -24.216, 0.434)
pt3dadd(-131.522, 187.811, -24.151, 0.408)
pt3dadd(-131.627, 187.846, -24.122, 0.402)
pt3dadd(-131.736, 187.891, -24.105, 0.402)
pt3dadd(-131.844, 187.938, -24.115, 0.418)
pt3dadd(-131.951, 187.985, -24.137, 0.444)
pt3dadd(-132.022, 188.021, -24.202, 0.492)
pt3dadd(-132.096, 188.05, -24.267, 0.532)
pt3dadd(-132.208, 188.074, -24.296, 0.542)
pt3dadd(-132.32, 188.099, -24.326, 0.552)
pt3dadd(-132.432, 188.123, -24.356, 0.562)
pt3dadd(-132.544, 188.148, -24.385, 0.572)
pt3dadd(-132.659, 188.172, -24.4, 0.58)
pt3dadd(-132.776, 188.197, -24.4, 0.584)
pt3dadd(-132.893, 188.222, -24.4, 0.588)
pt3dadd(-133.01, 188.246, -24.4, 0.592)
pt3dadd(-133.128, 188.272, -24.4, 0.596)
pt3dadd(-133.246, 188.297, -24.4, 0.6)
}
}
proc shape3d_43() {
dend_5[17] { pt3dadd(-133.362, 188.321, -24.407, 0.602)
pt3dadd(-133.478, 188.346, -24.42, 0.602)
pt3dadd(-133.595, 188.371, -24.432, 0.602)
pt3dadd(-133.712, 188.395, -24.444, 0.602)
pt3dadd(-133.828, 188.42, -24.457, 0.602)
pt3dadd(-133.942, 188.452, -24.463, 0.602)
pt3dadd(-134.046, 188.508, -24.448, 0.602)
pt3dadd(-134.15, 188.566, -24.432, 0.602)
pt3dadd(-134.254, 188.622, -24.416, 0.602)
pt3dadd(-134.358, 188.678, -24.4, 0.602)
pt3dadd(-134.436, 188.77, -24.4, 0.612)
pt3dadd(-134.514, 188.861, -24.4, 0.622)
pt3dadd(-134.592, 188.952, -24.4, 0.632)
pt3dadd(-134.67, 189.043, -24.4, 0.642)
pt3dadd(-134.748, 189.134, -24.4, 0.654)
pt3dadd(-134.848, 189.202, -24.4, 0.688)
pt3dadd(-134.946, 189.27, -24.4, 0.724)
pt3dadd(-135.019, 189.362, -24.415, 0.762)
pt3dadd(-135.088, 189.458, -24.432, 0.8)
pt3dadd(-135.198, 189.472, -24.46, 0.814)
pt3dadd(-135.313, 189.478, -24.488, 0.824)
pt3dadd(-135.431, 189.482, -24.5, 0.828)
pt3dadd(-135.551, 189.487, -24.5, 0.828)
pt3dadd(-135.671, 189.492, -24.5, 0.828)
pt3dadd(-135.779, 189.53, -24.518, 0.802)
pt3dadd(-135.887, 189.577, -24.539, 0.768)
pt3dadd(-135.998, 189.617, -24.552, 0.742)
pt3dadd(-136.11, 189.656, -24.566, 0.718)
pt3dadd(-136.223, 189.696, -24.579, 0.692)
pt3dadd(-136.334, 189.737, -24.592, 0.668)
pt3dadd(-136.441, 189.787, -24.603, 0.636)
pt3dadd(-136.541, 189.853, -24.61, 0.594)
pt3dadd(-136.64, 189.92, -24.617, 0.552)
pt3dadd(-136.74, 189.986, -24.624, 0.51)
pt3dadd(-136.84, 190.054, -24.63, 0.468)
pt3dadd(-136.897, 190.127, -24.676, 0.404)
pt3dadd(-136.926, 190.206, -24.748, 0.322)
pt3dadd(-137.004, 190.277, -24.779, 0.282)
pt3dadd(-137.1, 190.345, -24.796, 0.256)
pt3dadd(-137.191, 190.412, -24.771, 0.274)
pt3dadd(-137.28, 190.48, -24.733, 0.302)
pt3dadd(-137.39, 190.519, -24.712, 0.338)
pt3dadd(-137.501, 190.558, -24.69, 0.374)
pt3dadd(-137.611, 190.595, -24.666, 0.398)
pt3dadd(-137.722, 190.632, -24.642, 0.422)
pt3dadd(-137.832, 190.668, -24.618, 0.444)
pt3dadd(-137.923, 190.711, -24.654, 0.472)
pt3dadd(-138.006, 190.757, -24.716, 0.5)
pt3dadd(-138.072, 190.817, -24.774, 0.556)
pt3dadd(-138.175, 190.873, -24.796, 0.566)
pt3dadd(-138.277, 190.928, -24.818, 0.578)
pt3dadd(-138.38, 190.985, -24.84, 0.59)
pt3dadd(-138.484, 191.041, -24.862, 0.6)
pt3dadd(-138.593, 191.087, -24.872, 0.61)
pt3dadd(-138.704, 191.131, -24.878, 0.62)
pt3dadd(-138.816, 191.176, -24.885, 0.63)
pt3dadd(-138.926, 191.219, -24.891, 0.64)
pt3dadd(-139.038, 191.263, -24.898, 0.65)
pt3dadd(-139.141, 191.323, -24.9, 0.652)
pt3dadd(-139.24, 191.392, -24.9, 0.652)
pt3dadd(-139.338, 191.461, -24.9, 0.652)
pt3dadd(-139.436, 191.53, -24.9, 0.652)
pt3dadd(-139.534, 191.599, -24.9, 0.652)
pt3dadd(-139.638, 191.654, -24.914, 0.65)
pt3dadd(-139.744, 191.701, -24.938, 0.644)
pt3dadd(-139.852, 191.747, -24.963, 0.638)
pt3dadd(-139.958, 191.794, -24.987, 0.634)
pt3dadd(-140.065, 191.839, -25.011, 0.628)
pt3dadd(-140.171, 191.891, -25.03, 0.628)
pt3dadd(-140.276, 191.942, -25.049, 0.628)
pt3dadd(-140.383, 191.994, -25.068, 0.628)
pt3dadd(-140.489, 192.046, -25.087, 0.628)
pt3dadd(-140.59, 192.106, -25.102, 0.632)
pt3dadd(-140.681, 192.184, -25.107, 0.644)
pt3dadd(-140.77, 192.259, -25.123, 0.65)
pt3dadd(-140.854, 192.326, -25.167, 0.634)
pt3dadd(-140.956, 192.36, -25.191, 0.614)
pt3dadd(-141.076, 192.36, -25.195, 0.588)
pt3dadd(-141.194, 192.36, -25.199, 0.562)
pt3dadd(-141.314, 192.36, -25.2, 0.536)
pt3dadd(-141.434, 192.36, -25.2, 0.512)
pt3dadd(-141.554, 192.36, -25.2, 0.486)
pt3dadd(-141.674, 192.36, -25.2, 0.47)
pt3dadd(-141.794, 192.36, -25.2, 0.456)
pt3dadd(-141.906, 192.377, -25.226, 0.456)
pt3dadd(-142.013, 192.402, -25.266, 0.46)
pt3dadd(-142.12, 192.428, -25.307, 0.466)
pt3dadd(-142.226, 192.454, -25.348, 0.472)
pt3dadd(-142.332, 192.48, -25.389, 0.478)
pt3dadd(-142.45, 192.505, -25.391, 0.482)
pt3dadd(-142.567, 192.53, -25.393, 0.486)
pt3dadd(-142.685, 192.556, -25.395, 0.49)
pt3dadd(-142.801, 192.581, -25.396, 0.494)
pt3dadd(-142.919, 192.606, -25.399, 0.498)
pt3dadd(-143.035, 192.636, -25.4, 0.506)
pt3dadd(-143.146, 192.682, -25.4, 0.528)
pt3dadd(-143.256, 192.728, -25.4, 0.55)
pt3dadd(-143.364, 192.775, -25.42, 0.564)
pt3dadd(-143.471, 192.822, -25.442, 0.576)
pt3dadd(-143.527, 192.874, -25.517, 0.602)
pt3dadd(-143.582, 192.926, -25.592, 0.63)
pt3dadd(-143.676, 192.991, -25.622, 0.642)
pt3dadd(-143.765, 193.057, -25.658, 0.652)
pt3dadd(-143.839, 193.127, -25.712, 0.652)
pt3dadd(-143.914, 193.195, -25.766, 0.652)
pt3dadd(-144.001, 193.253, -25.806, 0.648)
pt3dadd(-144.113, 193.291, -25.821, 0.636)
pt3dadd(-144.215, 193.33, -25.85, 0.624)
pt3dadd(-144.282, 193.375, -25.925, 0.602)
pt3dadd(-144.349, 193.42, -25.999, 0.582)
pt3dadd(-144.365, 193.445, -26.093, 0.57)
pt3dadd(-144.37, 193.465, -26.192, 0.558)
pt3dadd(-144.407, 193.499, -26.268, 0.538)
pt3dadd(-144.508, 193.549, -26.3, 0.496)
pt3dadd(-144.626, 193.564, -26.3, 0.434)
pt3dadd(-144.744, 193.584, -26.3, 0.356)
pt3dadd(-144.856, 193.628, -26.3, 0.308)
pt3dadd(-144.962, 193.681, -26.3, 0.328)
pt3dadd(-145.069, 193.734, -26.306, 0.354)
pt3dadd(-145.175, 193.787, -26.328, 0.358)
pt3dadd(-145.279, 193.84, -26.35, 0.364)
pt3dadd(-145.384, 193.891, -26.372, 0.37)
pt3dadd(-145.489, 193.944, -26.393, 0.376)
pt3dadd(-145.583, 193.991, -26.439, 0.368)
pt3dadd(-145.672, 194.035, -26.495, 0.354)
pt3dadd(-145.756, 194.088, -26.551, 0.338)
pt3dadd(-145.838, 194.144, -26.595, 0.328)
pt3dadd(-145.921, 194.219, -26.557, 0.342)
pt3dadd(-146.016, 194.275, -26.528, 0.372)
pt3dadd(-146.132, 194.298, -26.514, 0.426)
pt3dadd(-146.246, 194.326, -26.5, 0.488)
pt3dadd(-146.332, 194.411, -26.5, 0.63)
pt3dadd(-146.386, 194.514, -26.5, 0.734)
pt3dadd(-146.425, 194.628, -26.5, 0.82)
pt3dadd(-146.484, 194.725, -26.5, 0.9)
pt3dadd(-146.587, 194.786, -26.5, 0.968)
pt3dadd(-146.692, 194.846, -26.5, 1.034)
pt3dadd(-146.797, 194.903, -26.506, 1.068)
pt3dadd(-146.903, 194.958, -26.511, 1.104)
pt3dadd(-147.012, 194.978, -26.547, 1.082)
pt3dadd(-147.122, 194.998, -26.585, 1.058)
pt3dadd(-147.24, 195, -26.6, 0.98)
pt3dadd(-147.356, 195.005, -26.616, 0.898)
pt3dadd(-147.454, 195.052, -26.66, 0.84)
pt3dadd(-147.551, 195.098, -26.704, 0.78)
pt3dadd(-147.647, 195.145, -26.748, 0.722)
pt3dadd(-147.744, 195.193, -26.793, 0.662)
pt3dadd(-147.839, 195.258, -26.819, 0.614)
pt3dadd(-147.932, 195.328, -26.842, 0.57)
pt3dadd(-148.026, 195.397, -26.864, 0.524)
pt3dadd(-148.12, 195.467, -26.887, 0.478)
pt3dadd(-148.217, 195.535, -26.9, 0.44)
pt3dadd(-148.318, 195.601, -26.9, 0.41)
pt3dadd(-148.417, 195.667, -26.9, 0.38)
pt3dadd(-148.518, 195.733, -26.9, 0.35)
pt3dadd(-148.618, 195.799, -26.9, 0.32)
pt3dadd(-148.723, 195.85, -26.893, 0.298)
pt3dadd(-148.838, 195.876, -26.873, 0.288)
pt3dadd(-148.954, 195.902, -26.854, 0.278)
pt3dadd(-149.068, 195.928, -26.834, 0.268)
pt3dadd(-149.183, 195.954, -26.814, 0.258)
pt3dadd(-149.297, 195.985, -26.8, 0.25)
pt3dadd(-149.407, 196.03, -26.8, 0.246)
pt3dadd(-149.519, 196.074, -26.8, 0.24)
pt3dadd(-149.63, 196.118, -26.8, 0.236)
pt3dadd(-149.742, 196.164, -26.8, 0.232)
pt3dadd(-149.854, 196.208, -26.8, 0.226)
pt3dadd(-149.96, 196.26, -26.786, 0.226)
pt3dadd(-150.066, 196.313, -26.771, 0.226)
pt3dadd(-150.173, 196.366, -26.755, 0.226)
pt3dadd(-150.278, 196.42, -26.739, 0.226)
pt3dadd(-150.374, 196.481, -26.756, 0.234)
pt3dadd(-150.463, 196.547, -26.793, 0.248)
pt3dadd(-150.556, 196.621, -26.8, 0.27)
pt3dadd(-150.65, 196.696, -26.8, 0.294)
pt3dadd(-150.703, 196.798, -26.797, 0.316)
pt3dadd(-150.738, 196.913, -26.792, 0.338)
pt3dadd(-150.792, 196.997, -26.768, 0.356)
pt3dadd(-150.884, 197.026, -26.709, 0.37)
pt3dadd(-150.978, 197.072, -26.666, 0.376)
pt3dadd(-151.072, 197.141, -26.641, 0.376)
pt3dadd(-151.165, 197.209, -26.616, 0.376)
pt3dadd(-151.259, 197.28, -26.606, 0.376)
pt3dadd(-151.349, 197.357, -26.623, 0.376)
pt3dadd(-151.43, 197.43, -26.658, 0.358)
pt3dadd(-151.53, 197.488, -26.656, 0.342)
pt3dadd(-151.636, 197.543, -26.643, 0.33)
pt3dadd(-151.74, 197.598, -26.63, 0.318)
pt3dadd(-151.846, 197.654, -26.617, 0.306)
pt3dadd(-151.952, 197.704, -26.622, 0.298)
pt3dadd(-152.063, 197.747, -26.641, 0.292)
pt3dadd(-152.172, 197.79, -26.66, 0.288)
pt3dadd(-152.281, 197.833, -26.679, 0.282)
pt3dadd(-152.392, 197.876, -26.698, 0.276)
pt3dadd(-152.492, 197.936, -26.682, 0.282)
pt3dadd(-152.592, 197.999, -26.662, 0.286)
pt3dadd(-152.693, 198.06, -26.643, 0.292)
pt3dadd(-152.792, 198.122, -26.623, 0.298)
pt3dadd(-152.888, 198.186, -26.598, 0.31)
pt3dadd(-152.981, 198.252, -26.564, 0.334)
}
}
proc shape3d_44() {
dend_5[17] { pt3dadd(-153.072, 198.318, -26.53, 0.358)
pt3dadd(-153.163, 198.384, -26.495, 0.382)
pt3dadd(-153.247, 198.446, -26.454, 0.41)
pt3dadd(-153.298, 198.49, -26.37, 0.464)
pt3dadd(-153.354, 198.548, -26.309, 0.512)
pt3dadd(-153.425, 198.644, -26.304, 0.55)
pt3dadd(-153.5, 198.737, -26.3, 0.578)
pt3dadd(-153.594, 198.811, -26.3, 0.578)
pt3dadd(-153.69, 198.882, -26.3, 0.576)
pt3dadd(-153.805, 198.916, -26.3, 0.566)
pt3dadd(-153.922, 198.949, -26.3, 0.556)
pt3dadd(-154.037, 198.982, -26.3, 0.562)
pt3dadd(-154.151, 199.015, -26.3, 0.578)
pt3dadd(-154.253, 199.079, -26.307, 0.594)
pt3dadd(-154.355, 199.142, -26.314, 0.61)
pt3dadd(-154.457, 199.206, -26.321, 0.624)
pt3dadd(-154.558, 199.268, -26.328, 0.64)
pt3dadd(-154.661, 199.33, -26.336, 0.656)
pt3dadd(-154.769, 199.379, -26.35, 0.672)
pt3dadd(-154.877, 199.429, -26.364, 0.688)
pt3dadd(-154.985, 199.478, -26.377, 0.702)
pt3dadd(-155.093, 199.529, -26.391, 0.718)
pt3dadd(-155.204, 199.561, -26.394, 0.726)
pt3dadd(-155.322, 199.564, -26.377, 0.716)
pt3dadd(-155.441, 199.565, -26.36, 0.708)
pt3dadd(-155.558, 199.567, -26.344, 0.7)
pt3dadd(-155.677, 199.57, -26.327, 0.692)
pt3dadd(-155.796, 199.572, -26.31, 0.682)
pt3dadd(-155.91, 199.594, -26.295, 0.67)
pt3dadd(-156.018, 199.643, -26.281, 0.648)
pt3dadd(-156.126, 199.692, -26.267, 0.628)
pt3dadd(-156.233, 199.742, -26.253, 0.608)
pt3dadd(-156.341, 199.793, -26.239, 0.586)
pt3dadd(-156.449, 199.844, -26.229, 0.56)
pt3dadd(-156.556, 199.897, -26.223, 0.53)
pt3dadd(-156.662, 199.951, -26.216, 0.5)
pt3dadd(-156.77, 200.005, -26.209, 0.47)
pt3dadd(-156.877, 200.058, -26.203, 0.44)
pt3dadd(-156.961, 200.137, -26.19, 0.416)
pt3dadd(-157.028, 200.234, -26.174, 0.398)
pt3dadd(-157.097, 200.332, -26.158, 0.38)
pt3dadd(-157.164, 200.429, -26.142, 0.362)
pt3dadd(-157.249, 200.509, -26.137, 0.344)
pt3dadd(-157.351, 200.569, -26.145, 0.326)
pt3dadd(-157.454, 200.63, -26.152, 0.31)
pt3dadd(-157.558, 200.69, -26.16, 0.292)
pt3dadd(-157.66, 200.752, -26.17, 0.276)
pt3dadd(-157.751, 200.815, -26.209, 0.268)
pt3dadd(-157.841, 200.878, -26.248, 0.26)
pt3dadd(-157.932, 200.941, -26.288, 0.254)
pt3dadd(-158.039, 200.984, -26.303, 0.244)
pt3dadd(-158.154, 201.018, -26.308, 0.232)
pt3dadd(-158.245, 201.074, -26.327, 0.226)
pt3dadd(-158.297, 201.17, -26.37, 0.226)
pt3dadd(-158.371, 201.253, -26.382, 0.226)
pt3dadd(-158.466, 201.326, -26.37, 0.226)
pt3dadd(-158.575, 201.35, -26.346, 0.242)
pt3dadd(-158.69, 201.356, -26.317, 0.264)
pt3dadd(-158.807, 201.36, -26.302, 0.302)
pt3dadd(-158.927, 201.36, -26.308, 0.368)
pt3dadd(-159.046, 201.36, -26.318, 0.42)
pt3dadd(-159.164, 201.36, -26.333, 0.456)
pt3dadd(-159.283, 201.36, -26.347, 0.494)
pt3dadd(-159.402, 201.36, -26.361, 0.53)
pt3dadd(-159.521, 201.36, -26.376, 0.566)
pt3dadd(-159.64, 201.36, -26.39, 0.602)
pt3dadd(-159.758, 201.36, -26.4, 0.638)
pt3dadd(-159.878, 201.36, -26.4, 0.67)
pt3dadd(-159.998, 201.36, -26.4, 0.702)
pt3dadd(-160.118, 201.36, -26.4, 0.736)
pt3dadd(-160.238, 201.36, -26.4, 0.768)
pt3dadd(-160.358, 201.36, -26.4, 0.8)
pt3dadd(-160.478, 201.36, -26.4, 0.832)
pt3dadd(-160.598, 201.36, -26.4, 0.91)
pt3dadd(-160.718, 201.365, -26.4, 1.048)
pt3dadd(-160.836, 201.388, -26.4, 1.054)
pt3dadd(-160.946, 201.433, -26.4, 0.946)
pt3dadd(-161.06, 201.469, -26.4, 0.824)
pt3dadd(-161.176, 201.502, -26.4, 0.722)
pt3dadd(-161.285, 201.547, -26.408, 0.602)
pt3dadd(-161.368, 201.594, -26.461, 0.568)
pt3dadd(-161.396, 201.634, -26.552, 0.642)
pt3dadd(-161.401, 201.684, -26.642, 0.674)
pt3dadd(-161.436, 201.714, -26.732, 0.624)
pt3dadd(-161.531, 201.72, -26.788, 0.53)
pt3dadd(-161.65, 201.72, -26.8, 0.446)
pt3dadd(-161.77, 201.72, -26.8, 0.37)
pt3dadd(-161.89, 201.72, -26.799, 0.298)
pt3dadd(-162.006, 201.72, -26.781, 0.276)
pt3dadd(-162.094, 201.728, -26.719, 0.292)
pt3dadd(-162.191, 201.769, -26.683, 0.306)
pt3dadd(-162.299, 201.815, -26.662, 0.31)
pt3dadd(-162.407, 201.86, -26.641, 0.316)
pt3dadd(-162.515, 201.905, -26.619, 0.322)
pt3dadd(-162.624, 201.949, -26.6, 0.326)
pt3dadd(-162.742, 201.971, -26.6, 0.33)
pt3dadd(-162.86, 201.994, -26.6, 0.336)
pt3dadd(-162.978, 202.015, -26.6, 0.34)
pt3dadd(-163.096, 202.038, -26.6, 0.344)
pt3dadd(-163.213, 202.06, -26.6, 0.348)
pt3dadd(-163.331, 202.084, -26.6, 0.352)
pt3dadd(-163.446, 202.12, -26.6, 0.356)
pt3dadd(-163.56, 202.156, -26.6, 0.362)
pt3dadd(-163.675, 202.192, -26.6, 0.366)
pt3dadd(-163.789, 202.226, -26.6, 0.37)
pt3dadd(-163.904, 202.262, -26.6, 0.374)
pt3dadd(-164.018, 202.295, -26.59, 0.374)
pt3dadd(-164.132, 202.325, -26.57, 0.37)
pt3dadd(-164.246, 202.354, -26.55, 0.364)
pt3dadd(-164.36, 202.382, -26.53, 0.36)
pt3dadd(-164.474, 202.411, -26.51, 0.354)
pt3dadd(-164.591, 202.428, -26.5, 0.356)
pt3dadd(-164.711, 202.429, -26.5, 0.362)
pt3dadd(-164.831, 202.432, -26.5, 0.37)
pt3dadd(-164.951, 202.434, -26.5, 0.376)
pt3dadd(-165.071, 202.435, -26.5, 0.384)
pt3dadd(-165.191, 202.438, -26.5, 0.392)
pt3dadd(-165.311, 202.439, -26.5, 0.398)
pt3dadd(-165.427, 202.46, -26.496, 0.416)
pt3dadd(-165.542, 202.495, -26.49, 0.44)
pt3dadd(-165.656, 202.53, -26.484, 0.462)
pt3dadd(-165.772, 202.566, -26.478, 0.486)
pt3dadd(-165.886, 202.601, -26.472, 0.51)
pt3dadd(-165.997, 202.642, -26.463, 0.538)
pt3dadd(-166.1, 202.702, -26.449, 0.58)
pt3dadd(-166.202, 202.76, -26.435, 0.624)
pt3dadd(-166.306, 202.82, -26.421, 0.666)
pt3dadd(-166.408, 202.88, -26.406, 0.71)
pt3dadd(-166.518, 202.921, -26.408, 0.742)
pt3dadd(-166.634, 202.946, -26.423, 0.766)
pt3dadd(-166.75, 202.972, -26.438, 0.788)
pt3dadd(-166.866, 202.997, -26.452, 0.812)
pt3dadd(-166.982, 203.022, -26.467, 0.836)
pt3dadd(-167.092, 203.04, -26.495, 0.872)
pt3dadd(-167.185, 203.04, -26.557, 0.904)
pt3dadd(-167.298, 203.04, -26.589, 0.902)
pt3dadd(-167.417, 203.04, -26.582, 0.862)
pt3dadd(-167.526, 203.05, -26.544, 0.776)
pt3dadd(-167.608, 203.114, -26.508, 0.69)
pt3dadd(-167.634, 203.231, -26.5, 0.64)
pt3dadd(-167.64, 203.351, -26.5, 0.614)
pt3dadd(-167.64, 203.471, -26.5, 0.632)
pt3dadd(-167.648, 203.59, -26.5, 0.702)
pt3dadd(-167.69, 203.701, -26.5, 0.82)
pt3dadd(-167.796, 203.75, -26.497, 0.922)
pt3dadd(-167.91, 203.76, -26.471, 1.02)
pt3dadd(-167.996, 203.76, -26.404, 1.102)
pt3dadd(-168.077, 203.755, -26.333, 1.12)
pt3dadd(-168.179, 203.712, -26.301, 1.06)
pt3dadd(-168.239, 203.616, -26.289, 0.95)
pt3dadd(-168.307, 203.557, -26.223, 0.926)
pt3dadd(-168.377, 203.498, -26.158, 0.9)
pt3dadd(-168.445, 203.44, -26.092, 0.876)
pt3dadd(-168.517, 203.384, -26.029, 0.852)
pt3dadd(-168.623, 203.358, -25.985, 0.83)
pt3dadd(-168.727, 203.332, -25.942, 0.808)
pt3dadd(-168.832, 203.305, -25.898, 0.786)
pt3dadd(-168.936, 203.279, -25.854, 0.764)
pt3dadd(-169.036, 203.239, -25.811, 0.748)
pt3dadd(-169.13, 203.185, -25.769, 0.736)
pt3dadd(-169.225, 203.131, -25.727, 0.724)
pt3dadd(-169.32, 203.077, -25.685, 0.712)
pt3dadd(-169.408, 203.034, -25.632, 0.7)
pt3dadd(-169.476, 203.014, -25.552, 0.686)
pt3dadd(-169.538, 202.985, -25.47, 0.674)
pt3dadd(-169.588, 202.942, -25.387, 0.66)
pt3dadd(-169.661, 202.91, -25.316, 0.64)
pt3dadd(-169.757, 202.89, -25.259, 0.614)
pt3dadd(-169.862, 202.86, -25.225, 0.584)
pt3dadd(-169.974, 202.822, -25.209, 0.548)
pt3dadd(-170.089, 202.793, -25.199, 0.522)
pt3dadd(-170.208, 202.774, -25.196, 0.51)
pt3dadd(-170.327, 202.754, -25.194, 0.498)
pt3dadd(-170.444, 202.736, -25.191, 0.488)
pt3dadd(-170.554, 202.717, -25.176, 0.474)
pt3dadd(-170.598, 202.698, -25.085, 0.45)
pt3dadd(-170.64, 202.679, -24.993, 0.422)
pt3dadd(-170.641, 202.656, -24.896, 0.37)
pt3dadd(-170.647, 202.592, -24.812, 0.334)
pt3dadd(-170.662, 202.53, -24.732, 0.3)
pt3dadd(-170.771, 202.484, -24.716, 0.276)
pt3dadd(-170.881, 202.44, -24.7, 0.252)
pt3dadd(-171.001, 202.44, -24.7, 0.242)
pt3dadd(-171.121, 202.44, -24.7, 0.234)
pt3dadd(-171.241, 202.44, -24.7, 0.226)
pt3dadd(-171.361, 202.44, -24.7, 0.226)
pt3dadd(-171.481, 202.44, -24.7, 0.226)
pt3dadd(-171.601, 202.44, -24.7, 0.226)
pt3dadd(-171.721, 202.44, -24.7, 0.226)
pt3dadd(-171.841, 202.44, -24.7, 0.226)
pt3dadd(-171.961, 202.44, -24.7, 0.226)
pt3dadd(-172.081, 202.44, -24.7, 0.226)
pt3dadd(-172.201, 202.44, -24.7, 0.226)
pt3dadd(-172.321, 202.44, -24.7, 0.226)
pt3dadd(-172.441, 202.44, -24.7, 0.226)
pt3dadd(-172.561, 202.44, -24.7, 0.226)
pt3dadd(-172.681, 202.44, -24.7, 0.226)
pt3dadd(-172.801, 202.44, -24.7, 0.226)
pt3dadd(-172.921, 202.44, -24.7, 0.226)
pt3dadd(-173.041, 202.44, -24.7, 0.226)
}
}
proc shape3d_45() {
dend_5[17] { pt3dadd(-173.161, 202.44, -24.7, 0.226)
pt3dadd(-173.281, 202.44, -24.7, 0.226)
pt3dadd(-173.401, 202.44, -24.7, 0.226)
pt3dadd(-173.519, 202.421, -24.7, 0.226)
pt3dadd(-173.614, 202.352, -24.7, 0.226)
pt3dadd(-173.675, 202.25, -24.7, 0.226)
pt3dadd(-173.725, 202.141, -24.7, 0.226)
pt3dadd(-173.752, 202.025, -24.7, 0.226)
pt3dadd(-173.76, 201.905, -24.7, 0.226)
pt3dadd(-173.778, 201.79, -24.69, 0.226)
pt3dadd(-173.816, 201.679, -24.668, 0.226)
pt3dadd(-173.85, 201.618, -24.616, 0.226)
pt3dadd(-173.874, 201.63, -24.519, 0.226)
pt3dadd(-173.916, 201.653, -24.436, 0.226)
pt3dadd(-174.013, 201.707, -24.4, 0.226)
pt3dadd(-174.133, 201.72, -24.4, 0.226)
pt3dadd(-174.253, 201.72, -24.4, 0.226)
pt3dadd(-174.373, 201.72, -24.4, 0.226)
pt3dadd(-174.493, 201.72, -24.399, 0.226)
pt3dadd(-174.611, 201.72, -24.383, 0.232)
pt3dadd(-174.716, 201.702, -24.344, 0.268)
pt3dadd(-174.805, 201.658, -24.288, 0.31)
pt3dadd(-174.881, 201.613, -24.222, 0.368)
pt3dadd(-174.948, 201.569, -24.147, 0.44)
pt3dadd(-175.015, 201.509, -24.083, 0.562)
pt3dadd(-175.067, 201.467, -24, 0.528)
pt3dadd(-175.118, 201.415, -23.924, 0.478)
pt3dadd(-175.218, 201.37, -23.92, 0.51)
pt3dadd(-175.298, 201.349, -23.989, 0.508)
pt3dadd(-175.344, 201.305, -24.073, 0.468)
pt3dadd(-175.402, 201.252, -24.147, 0.424)
pt3dadd(-175.468, 201.24, -24.229, 0.338)
pt3dadd(-175.56, 201.227, -24.289, 0.25)
pt3dadd(-175.667, 201.179, -24.3, 0.226)
pt3dadd(-175.756, 201.098, -24.29, 0.248)
pt3dadd(-175.793, 201.026, -24.224, 0.338)
pt3dadd(-175.8, 201.004, -24.126, 0.394)
pt3dadd(-175.8, 200.989, -24.027, 0.382)
pt3dadd(-175.828, 200.956, -23.942, 0.326)
pt3dadd(-175.938, 200.916, -23.92, 0.326)
pt3dadd(-176.048, 200.878, -23.9, 0.328)
pt3dadd(-176.164, 200.843, -23.895, 0.35)
pt3dadd(-176.278, 200.808, -23.89, 0.372)
pt3dadd(-176.354, 200.776, -23.829, 0.408)
pt3dadd(-176.394, 200.76, -23.739, 0.426)
pt3dadd(-176.4, 200.752, -23.64, 0.41)
pt3dadd(-176.4, 200.724, -23.543, 0.358)
pt3dadd(-176.404, 200.651, -23.465, 0.312)
pt3dadd(-176.45, 200.564, -23.413, 0.254)
pt3dadd(-176.552, 200.504, -23.4, 0.226)
pt3dadd(-176.651, 200.438, -23.4, 0.226)
pt3dadd(-176.726, 200.346, -23.4, 0.226)
pt3dadd(-176.789, 200.244, -23.4, 0.226)
pt3dadd(-176.885, 200.178, -23.4, 0.226)
pt3dadd(-176.989, 200.117, -23.4, 0.226)
pt3dadd(-177.092, 200.057, -23.4, 0.226)
pt3dadd(-177.175, 199.972, -23.4, 0.234)
pt3dadd(-177.25, 199.878, -23.4, 0.246)
pt3dadd(-177.341, 199.804, -23.4, 0.264)
pt3dadd(-177.445, 199.742, -23.4, 0.288)
pt3dadd(-177.528, 199.675, -23.426, 0.318)
pt3dadd(-177.581, 199.6, -23.489, 0.362)
pt3dadd(-177.618, 199.561, -23.574, 0.41)
pt3dadd(-177.65, 199.54, -23.667, 0.472)
pt3dadd(-177.718, 199.482, -23.732, 0.576)
pt3dadd(-177.796, 199.414, -23.781, 0.62)
pt3dadd(-177.896, 199.355, -23.8, 0.716)
pt3dadd(-178.013, 199.333, -23.8, 0.8)
pt3dadd(-178.127, 199.363, -23.8, 0.81)
pt3dadd(-178.193, 199.456, -23.816, 0.766)
pt3dadd(-178.236, 199.553, -23.862, 0.706)
pt3dadd(-178.325, 199.619, -23.894, 0.628)
pt3dadd(-178.435, 199.662, -23.9, 0.562)
pt3dadd(-178.554, 199.684, -23.9, 0.544)
pt3dadd(-178.672, 199.704, -23.9, 0.534)
pt3dadd(-178.781, 199.741, -23.904, 0.528)
pt3dadd(-178.865, 199.824, -23.922, 0.528)
pt3dadd(-178.957, 199.886, -23.944, 0.528)
pt3dadd(-179.07, 199.906, -23.975, 0.528)
pt3dadd(-179.183, 199.912, -24, 0.53)
pt3dadd(-179.296, 199.872, -24, 0.54)
pt3dadd(-179.408, 199.832, -24, 0.55)
pt3dadd(-179.498, 199.754, -24, 0.582)
pt3dadd(-179.574, 199.663, -24.002, 0.608)
pt3dadd(-179.638, 199.561, -24.008, 0.62)
pt3dadd(-179.705, 199.468, -24.026, 0.624)
pt3dadd(-179.782, 199.392, -24.07, 0.608)
pt3dadd(-179.882, 199.351, -24.091, 0.58)
pt3dadd(-180.001, 199.336, -24.096, 0.542)
pt3dadd(-180.12, 199.32, -24.1, 0.502)
pt3dadd(-180.238, 199.3, -24.1, 0.464)
pt3dadd(-180.356, 199.279, -24.1, 0.424)
pt3dadd(-180.457, 199.229, -24.1, 0.374)
pt3dadd(-180.532, 199.135, -24.1, 0.304)
pt3dadd(-180.62, 199.055, -24.1, 0.292)
pt3dadd(-180.709, 198.973, -24.1, 0.282)
pt3dadd(-180.798, 198.893, -24.1, 0.272)
pt3dadd(-180.887, 198.812, -24.1, 0.262)
pt3dadd(-180.974, 198.731, -24.1, 0.252)
pt3dadd(-181.015, 198.618, -24.1, 0.246)
pt3dadd(-181.057, 198.505, -24.1, 0.242)
pt3dadd(-181.099, 198.394, -24.1, 0.238)
pt3dadd(-181.141, 198.281, -24.1, 0.232)
pt3dadd(-181.182, 198.168, -24.1, 0.228)
pt3dadd(-181.21, 198.052, -24.1, 0.226)
pt3dadd(-181.228, 197.933, -24.1, 0.226)
pt3dadd(-181.244, 197.814, -24.1, 0.226)
pt3dadd(-181.261, 197.695, -24.1, 0.226)
pt3dadd(-181.279, 197.576, -24.1, 0.226)
pt3dadd(-181.296, 197.459, -24.1, 0.226)
pt3dadd(-181.313, 197.339, -24.1, 0.226)
pt3dadd(-181.32, 197.22, -24.1, 0.226)
pt3dadd(-181.32, 197.1, -24.1, 0.226)
pt3dadd(-181.32, 196.98, -24.1, 0.226)
pt3dadd(-181.32, 196.86, -24.1, 0.226)
pt3dadd(-181.32, 196.74, -24.1, 0.226)
pt3dadd(-181.327, 196.62, -24.1, 0.226)
pt3dadd(-181.366, 196.508, -24.1, 0.226)
pt3dadd(-181.466, 196.452, -24.1, 0.226)
pt3dadd(-181.586, 196.44, -24.1, 0.226)
pt3dadd(-181.706, 196.44, -24.1, 0.226)
pt3dadd(-181.826, 196.44, -24.1, 0.226)
pt3dadd(-181.946, 196.44, -24.1, 0.226)
pt3dadd(-182.066, 196.439, -24.1, 0.226)
pt3dadd(-182.185, 196.434, -24.1, 0.226)
pt3dadd(-182.305, 196.43, -24.1, 0.226)
pt3dadd(-182.414, 196.399, -24.098, 0.226)
pt3dadd(-182.498, 196.314, -24.093, 0.226)
pt3dadd(-182.586, 196.238, -24.077, 0.226)
pt3dadd(-182.682, 196.188, -24.034, 0.226)
pt3dadd(-182.771, 196.14, -23.982, 0.226)
pt3dadd(-182.854, 196.094, -23.92, 0.226)
pt3dadd(-182.927, 196.018, -23.879, 0.226)
pt3dadd(-182.995, 195.926, -23.849, 0.226)
pt3dadd(-183.064, 195.835, -23.818, 0.226)
pt3dadd(-183.149, 195.774, -23.849, 0.226)
pt3dadd(-183.239, 195.721, -23.899, 0.226)
pt3dadd(-183.352, 195.72, -23.931, 0.226)
pt3dadd(-183.466, 195.72, -23.963, 0.226)
pt3dadd(-183.58, 195.72, -23.994, 0.226)
pt3dadd(-183.698, 195.72, -24, 0.226)
pt3dadd(-183.818, 195.72, -24, 0.226)
pt3dadd(-183.938, 195.72, -24, 0.226)
pt3dadd(-184.058, 195.72, -24, 0.226)
pt3dadd(-184.178, 195.72, -24, 0.226)
pt3dadd(-184.298, 195.72, -24, 0.226)
pt3dadd(-184.418, 195.72, -24, 0.226)
pt3dadd(-184.538, 195.72, -24, 0.226)
pt3dadd(-184.658, 195.72, -24, 0.226)
pt3dadd(-184.778, 195.72, -24, 0.226)
pt3dadd(-184.898, 195.72, -24, 0.226)
pt3dadd(-185.017, 195.72, -24.01, 0.226)
pt3dadd(-185.117, 195.72, -24.06, 0.226)
pt3dadd(-185.153, 195.72, -24.154, 0.238)
pt3dadd(-185.16, 195.72, -24.254, 0.278)
pt3dadd(-185.168, 195.72, -24.353, 0.332)
pt3dadd(-185.195, 195.72, -24.451, 0.352)
pt3dadd(-185.28, 195.715, -24.516, 0.332)
pt3dadd(-185.377, 195.708, -24.575, 0.306)
pt3dadd(-185.448, 195.629, -24.593, 0.282)
pt3dadd(-185.512, 195.528, -24.598, 0.26)
pt3dadd(-185.608, 195.464, -24.6, 0.246)
pt3dadd(-185.719, 195.421, -24.6, 0.238)
pt3dadd(-185.832, 195.379, -24.6, 0.23)
pt3dadd(-185.948, 195.36, -24.6, 0.226)
pt3dadd(-186.068, 195.36, -24.6, 0.226)
pt3dadd(-186.188, 195.36, -24.6, 0.226)
pt3dadd(-186.308, 195.36, -24.6, 0.226)
pt3dadd(-186.428, 195.36, -24.6, 0.23)
pt3dadd(-186.548, 195.36, -24.6, 0.238)
pt3dadd(-186.668, 195.36, -24.6, 0.244)
pt3dadd(-186.788, 195.36, -24.6, 0.252)
pt3dadd(-186.908, 195.36, -24.6, 0.258)
pt3dadd(-187.028, 195.36, -24.6, 0.266)
pt3dadd(-187.148, 195.36, -24.6, 0.274)
pt3dadd(-187.268, 195.36, -24.6, 0.296)
pt3dadd(-187.388, 195.36, -24.6, 0.328)
pt3dadd(-187.508, 195.36, -24.6, 0.362)
pt3dadd(-187.625, 195.341, -24.597, 0.414)
pt3dadd(-187.74, 195.306, -24.593, 0.478)
pt3dadd(-187.84, 195.275, -24.567, 0.54)
pt3dadd(-187.892, 195.256, -24.479, 0.59)
pt3dadd(-187.955, 195.234, -24.398, 0.638)
pt3dadd(-188.047, 195.205, -24.338, 0.678)
pt3dadd(-188.134, 195.154, -24.3, 0.706)
pt3dadd(-188.208, 195.06, -24.3, 0.712)
pt3dadd(-188.284, 194.966, -24.3, 0.72)
pt3dadd(-188.358, 194.873, -24.3, 0.726)
pt3dadd(-188.464, 194.822, -24.3, 0.736)
pt3dadd(-188.576, 194.783, -24.3, 0.748)
pt3dadd(-188.693, 194.76, -24.306, 0.74)
pt3dadd(-188.796, 194.729, -24.336, 0.722)
pt3dadd(-188.886, 194.671, -24.381, 0.71)
pt3dadd(-188.975, 194.614, -24.427, 0.698)
pt3dadd(-189.065, 194.555, -24.472, 0.686)
pt3dadd(-189.163, 194.502, -24.5, 0.66)
pt3dadd(-189.274, 194.455, -24.5, 0.616)
pt3dadd(-189.384, 194.411, -24.503, 0.572)
pt3dadd(-189.494, 194.384, -24.536, 0.51)
pt3dadd(-189.605, 194.358, -24.568, 0.45)
}
}
proc shape3d_46() {
dend_5[17] { pt3dadd(-189.715, 194.314, -24.584, 0.414)
pt3dadd(-189.824, 194.268, -24.6, 0.378)
pt3dadd(-189.887, 194.166, -24.6, 0.388)
pt3dadd(-189.947, 194.062, -24.6, 0.4)
pt3dadd(-189.979, 193.948, -24.595, 0.438)
pt3dadd(-190.009, 193.835, -24.581, 0.478)
pt3dadd(-190.056, 193.738, -24.536, 0.478)
pt3dadd(-190.103, 193.642, -24.492, 0.478)
pt3dadd(-190.15, 193.544, -24.448, 0.478)
pt3dadd(-190.196, 193.447, -24.403, 0.478)
pt3dadd(-190.252, 193.345, -24.38, 0.456)
pt3dadd(-190.308, 193.242, -24.358, 0.434)
pt3dadd(-190.363, 193.139, -24.336, 0.412)
pt3dadd(-190.418, 193.037, -24.313, 0.39)
pt3dadd(-190.46, 192.928, -24.3, 0.37)
pt3dadd(-190.477, 192.809, -24.3, 0.354)
pt3dadd(-190.495, 192.69, -24.3, 0.338)
pt3dadd(-190.512, 192.571, -24.3, 0.322)
pt3dadd(-190.529, 192.452, -24.3, 0.306)
pt3dadd(-190.547, 192.334, -24.3, 0.29)
pt3dadd(-190.567, 192.216, -24.3, 0.274)
pt3dadd(-190.603, 192.101, -24.3, 0.266)
pt3dadd(-190.639, 191.987, -24.3, 0.256)
pt3dadd(-190.675, 191.873, -24.3, 0.248)
pt3dadd(-190.711, 191.758, -24.3, 0.238)
pt3dadd(-190.747, 191.644, -24.3, 0.23)
pt3dadd(-190.811, 191.545, -24.3, 0.226)
pt3dadd(-190.891, 191.456, -24.3, 0.226)
pt3dadd(-190.972, 191.366, -24.3, 0.226)
pt3dadd(-191.052, 191.278, -24.3, 0.226)
pt3dadd(-191.134, 191.189, -24.3, 0.226)
pt3dadd(-191.232, 191.124, -24.3, 0.226)
pt3dadd(-191.339, 191.07, -24.3, 0.226)
pt3dadd(-191.432, 190.999, -24.3, 0.226)
pt3dadd(-191.507, 190.906, -24.3, 0.226)
pt3dadd(-191.586, 190.816, -24.3, 0.226)
pt3dadd(-191.674, 190.734, -24.3, 0.226)
pt3dadd(-191.748, 190.645, -24.3, 0.226)
pt3dadd(-191.752, 190.525, -24.3, 0.226)
pt3dadd(-191.756, 190.405, -24.3, 0.226)
pt3dadd(-191.76, 190.286, -24.3, 0.226)
pt3dadd(-191.76, 190.166, -24.3, 0.226)
pt3dadd(-191.777, 190.051, -24.3, 0.226)
pt3dadd(-191.838, 189.947, -24.3, 0.226)
pt3dadd(-191.903, 189.847, -24.3, 0.226)
pt3dadd(-192.001, 189.779, -24.3, 0.226)
pt3dadd(-192.101, 189.712, -24.3, 0.226)
pt3dadd(-192.112, 189.594, -24.3, 0.226)
pt3dadd(-192.115, 189.475, -24.3, 0.226)
pt3dadd(-192.12, 189.355, -24.3, 0.226)
pt3dadd(-192.12, 189.235, -24.3, 0.226)
pt3dadd(-192.12, 189.115, -24.3, 0.226)
pt3dadd(-192.12, 188.995, -24.3, 0.226)
pt3dadd(-192.12, 188.875, -24.3, 0.226)
pt3dadd(-192.12, 188.755, -24.3, 0.226)
pt3dadd(-192.126, 188.635, -24.3, 0.226)
pt3dadd(-192.132, 188.515, -24.3, 0.226)
pt3dadd(-192.138, 188.395, -24.3, 0.226)
pt3dadd(-192.144, 188.275, -24.3, 0.226)
pt3dadd(-192.15, 188.155, -24.3, 0.226)
pt3dadd(-192.156, 188.035, -24.3, 0.226)
pt3dadd(-192.18, 187.92, -24.3, 0.226)
pt3dadd(-192.233, 187.813, -24.3, 0.226)
pt3dadd(-192.284, 187.705, -24.3, 0.226)
pt3dadd(-192.317, 187.589, -24.3, 0.226)
pt3dadd(-192.35, 187.474, -24.3, 0.226)
pt3dadd(-192.388, 187.36, -24.3, 0.226)
pt3dadd(-192.427, 187.247, -24.3, 0.226)
pt3dadd(-192.492, 187.157, -24.3, 0.226)
pt3dadd(-192.604, 187.11, -24.3, 0.226)
pt3dadd(-192.714, 187.066, -24.3, 0.226)
pt3dadd(-192.832, 187.04, -24.3, 0.226)
pt3dadd(-192.948, 187.014, -24.3, 0.226)
pt3dadd(-193.066, 186.989, -24.3, 0.226)
pt3dadd(-193.183, 186.964, -24.3, 0.226)
pt3dadd(-193.303, 186.96, -24.3, 0.226)
pt3dadd(-193.423, 186.96, -24.3, 0.226)
pt3dadd(-193.543, 186.96, -24.3, 0.226)
pt3dadd(-193.663, 186.96, -24.3, 0.226)
pt3dadd(-193.781, 186.943, -24.3, 0.226)
pt3dadd(-193.9, 186.924, -24.3, 0.226)
pt3dadd(-194.018, 186.904, -24.3, 0.226)
pt3dadd(-194.136, 186.884, -24.3, 0.226)
pt3dadd(-194.255, 186.864, -24.3, 0.226)
pt3dadd(-194.374, 186.845, -24.3, 0.226)
pt3dadd(-194.491, 186.824, -24.3, 0.226)
pt3dadd(-194.61, 186.805, -24.3, 0.226)
pt3dadd(-194.728, 186.785, -24.3, 0.226)
pt3dadd(-194.846, 186.766, -24.3, 0.226)
pt3dadd(-194.965, 186.745, -24.3, 0.226)
pt3dadd(-195.084, 186.726, -24.3, 0.226)
pt3dadd(-195.203, 186.72, -24.3, 0.226)
pt3dadd(-195.323, 186.72, -24.3, 0.226)
pt3dadd(-195.443, 186.71, -24.3, 0.226)
pt3dadd(-195.551, 186.662, -24.3, 0.226)
pt3dadd(-195.625, 186.569, -24.3, 0.238)
pt3dadd(-195.712, 186.486, -24.3, 0.294)
pt3dadd(-195.809, 186.424, -24.32, 0.398)
pt3dadd(-195.883, 186.372, -24.383, 0.452)
pt3dadd(-195.934, 186.36, -24.472, 0.452)
pt3dadd(-195.955, 186.36, -24.57, 0.468)
pt3dadd(-195.96, 186.36, -24.67, 0.512)
pt3dadd(-195.96, 186.36, -24.77, 0.58)
pt3dadd(-195.96, 186.35, -24.869, 0.642)
pt3dadd(-195.96, 186.32, -24.966, 0.678)
pt3dadd(-195.988, 186.266, -25.051, 0.678)
pt3dadd(-196.044, 186.221, -25.129, 0.678)
pt3dadd(-196.076, 186.131, -25.182, 0.642)
pt3dadd(-196.08, 186.013, -25.199, 0.562)
pt3dadd(-196.093, 185.894, -25.2, 0.428)
pt3dadd(-196.13, 185.782, -25.197, 0.332)
pt3dadd(-196.182, 185.678, -25.171, 0.256)
pt3dadd(-196.2, 185.573, -25.13, 0.228)
pt3dadd(-196.2, 185.454, -25.118, 0.238)
pt3dadd(-196.2, 185.335, -25.106, 0.246)
pt3dadd(-196.232, 185.225, -25.1, 0.264)
pt3dadd(-196.294, 185.12, -25.1, 0.286)
pt3dadd(-196.374, 185.046, -25.102, 0.312)
pt3dadd(-196.493, 185.024, -25.106, 0.342)
pt3dadd(-196.61, 185.004, -25.111, 0.372)
pt3dadd(-196.651, 184.921, -25.162, 0.388)
pt3dadd(-196.679, 184.828, -25.221, 0.402)
pt3dadd(-196.68, 184.717, -25.259, 0.396)
pt3dadd(-196.68, 184.607, -25.297, 0.388)
pt3dadd(-196.68, 184.495, -25.335, 0.382)
pt3dadd(-196.674, 184.384, -25.369, 0.372)
pt3dadd(-196.637, 184.271, -25.385, 0.336)
pt3dadd(-196.6, 184.159, -25.4, 0.302)
pt3dadd(-196.588, 184.04, -25.386, 0.294)
pt3dadd(-196.576, 183.923, -25.373, 0.286)
pt3dadd(-196.564, 183.804, -25.359, 0.278)
pt3dadd(-196.544, 183.716, -25.3, 0.286)
pt3dadd(-196.524, 183.641, -25.225, 0.298)
pt3dadd(-196.474, 183.541, -25.205, 0.346)
pt3dadd(-196.409, 183.44, -25.2, 0.406)
pt3dadd(-196.315, 183.372, -25.214, 0.482)
pt3dadd(-196.232, 183.36, -25.28, 0.618)
pt3dadd(-196.204, 183.36, -25.375, 0.75)
pt3dadd(-196.2, 183.36, -25.475, 0.778)
pt3dadd(-196.2, 183.33, -25.571, 0.738)
pt3dadd(-196.2, 183.29, -25.665, 0.686)
pt3dadd(-196.202, 183.233, -25.75, 0.618)
pt3dadd(-196.21, 183.148, -25.821, 0.532)
pt3dadd(-196.247, 183.071, -25.876, 0.434)
pt3dadd(-196.346, 183.012, -25.9, 0.318)
pt3dadd(-196.465, 182.996, -25.9, 0.246)
pt3dadd(-196.58, 182.97, -25.9, 0.226)
pt3dadd(-196.657, 182.886, -25.9, 0.226)
pt3dadd(-196.693, 182.772, -25.9, 0.278)
pt3dadd(-196.763, 182.681, -25.9, 0.388)
pt3dadd(-196.873, 182.634, -25.9, 0.432)
pt3dadd(-196.984, 182.588, -25.9, 0.476)
pt3dadd(-196.969, 182.477, -25.872, 0.478)
pt3dadd(-196.949, 182.402, -25.813, 0.462)
pt3dadd(-196.925, 182.378, -25.717, 0.428)
pt3dadd(-196.896, 182.335, -25.639, 0.392)
pt3dadd(-196.849, 182.227, -25.617, 0.354)
pt3dadd(-196.812, 182.118, -25.6, 0.324)
pt3dadd(-196.805, 181.998, -25.6, 0.31)
pt3dadd(-196.8, 181.878, -25.6, 0.302)
pt3dadd(-196.8, 181.758, -25.6, 0.302)
pt3dadd(-196.8, 181.638, -25.6, 0.302)
pt3dadd(-196.8, 181.518, -25.6, 0.304)
pt3dadd(-196.8, 181.398, -25.6, 0.312)
pt3dadd(-196.8, 181.278, -25.6, 0.32)
pt3dadd(-196.812, 181.159, -25.602, 0.33)
pt3dadd(-196.847, 181.045, -25.607, 0.342)
pt3dadd(-196.882, 180.932, -25.614, 0.352)
pt3dadd(-196.925, 180.882, -25.697, 0.352)
pt3dadd(-196.964, 180.822, -25.773, 0.35)
pt3dadd(-196.988, 180.714, -25.813, 0.342)
pt3dadd(-197.012, 180.607, -25.853, 0.336)
pt3dadd(-197.035, 180.499, -25.893, 0.328)
pt3dadd(-197.044, 180.382, -25.9, 0.326)
pt3dadd(-197.048, 180.262, -25.9, 0.326)
pt3dadd(-197.053, 180.142, -25.9, 0.326)
pt3dadd(-197.09, 180.04, -25.861, 0.346)
pt3dadd(-197.129, 179.938, -25.819, 0.368)
pt3dadd(-197.108, 179.849, -25.773, 0.398)
pt3dadd(-197.05, 179.766, -25.744, 0.434)
pt3dadd(-197.04, 179.657, -25.782, 0.452)
pt3dadd(-197.04, 179.538, -25.789, 0.452)
pt3dadd(-197.064, 179.431, -25.753, 0.442)
pt3dadd(-197.122, 179.341, -25.71, 0.374)
pt3dadd(-197.158, 179.227, -25.7, 0.326)
pt3dadd(-197.194, 179.114, -25.708, 0.364)
pt3dadd(-197.255, 179.048, -25.764, 0.402)
pt3dadd(-197.311, 179.04, -25.852, 0.382)
pt3dadd(-197.365, 179.017, -25.938, 0.41)
pt3dadd(-197.35, 178.934, -25.997, 0.452)
pt3dadd(-197.28, 178.858, -26.048, 0.452)
pt3dadd(-197.226, 178.811, -26.118, 0.452)
pt3dadd(-197.191, 178.805, -26.213, 0.452)
pt3dadd(-197.161, 178.798, -26.309, 0.45)
pt3dadd(-197.17, 178.772, -26.407, 0.434)
pt3dadd(-197.195, 178.716, -26.483, 0.386)
pt3dadd(-197.254, 178.614, -26.5, 0.294)
pt3dadd(-197.306, 178.507, -26.5, 0.292)
pt3dadd(-197.36, 178.399, -26.5, 0.378)
pt3dadd(-197.418, 178.295, -26.499, 0.43)
}
}
proc shape3d_47() {
dend_5[17] { pt3dadd(-197.489, 178.198, -26.493, 0.442)
pt3dadd(-197.566, 178.111, -26.481, 0.452)
pt3dadd(-197.665, 178.069, -26.439, 0.452)
pt3dadd(-197.759, 178.012, -26.408, 0.458)
pt3dadd(-197.839, 177.922, -26.4, 0.476)
pt3dadd(-197.872, 177.812, -26.425, 0.522)
pt3dadd(-197.892, 177.736, -26.496, 0.576)
pt3dadd(-197.933, 177.72, -26.588, 0.636)
pt3dadd(-197.987, 177.72, -26.678, 0.652)
pt3dadd(-198.056, 177.72, -26.759, 0.636)
pt3dadd(-198.131, 177.72, -26.837, 0.612)
pt3dadd(-198.233, 177.72, -26.857, 0.58)
pt3dadd(-198.352, 177.72, -26.84, 0.542)
pt3dadd(-198.455, 177.709, -26.87, 0.514)
pt3dadd(-198.547, 177.691, -26.931, 0.49)
pt3dadd(-198.6, 177.666, -27.008, 0.472)
pt3dadd(-198.6, 177.634, -27.104, 0.462)
pt3dadd(-198.6, 177.6, -27.2, 0.452)
}
apic[8] {pt3dclear()
pt3dadd(-47.014, 164.68, 0.411, 0.878)
pt3dadd(-47.081, 164.59, 0.409, 1.08)
pt3dadd(-47.152, 164.494, 0.407, 1.294)
pt3dadd(-47.224, 164.396, 0.405, 1.508)
pt3dadd(-47.296, 164.3, 0.403, 1.722)
pt3dadd(-47.366, 164.204, 0.401, 1.936)
pt3dadd(-47.464, 164.16, 0.393, 1.958)
pt3dadd(-47.584, 164.16, 0.381, 1.818)
pt3dadd(-47.702, 164.16, 0.369, 1.678)
pt3dadd(-47.791, 164.114, 0.318, 1.56)
pt3dadd(-47.867, 164.058, 0.261, 1.45)
pt3dadd(-47.874, 163.968, 0.196, 1.376)
pt3dadd(-47.881, 163.877, 0.131, 1.304)
pt3dadd(-47.902, 163.78, 0.074, 1.252)
pt3dadd(-47.928, 163.691, 0.015, 1.2)
pt3dadd(-48.011, 163.67, -0.054, 1.14)
pt3dadd(-48.089, 163.616, -0.114, 1.094)
pt3dadd(-48.167, 163.555, -0.17, 1.052)
pt3dadd(-48.256, 163.488, -0.207, 1.01)
pt3dadd(-48.329, 163.418, -0.253, 0.972)
pt3dadd(-48.356, 163.339, -0.325, 0.944)
pt3dadd(-48.395, 163.272, -0.4, 0.918)
pt3dadd(-48.446, 163.22, -0.48, 0.89)
pt3dadd(-48.472, 163.186, -0.57, 0.85)
pt3dadd(-48.48, 163.159, -0.667, 0.804)
pt3dadd(-48.533, 163.075, -0.724, 0.78)
pt3dadd(-48.584, 162.991, -0.78, 0.754)
pt3dadd(-48.636, 162.907, -0.837, 0.73)
pt3dadd(-48.688, 162.823, -0.894, 0.706)
pt3dadd(-48.743, 162.742, -0.951, 0.686)
pt3dadd(-48.798, 162.66, -1.008, 0.668)
pt3dadd(-48.853, 162.578, -1.065, 0.65)
pt3dadd(-48.91, 162.497, -1.122, 0.632)
pt3dadd(-48.926, 162.397, -1.173, 0.624)
pt3dadd(-48.935, 162.294, -1.223, 0.618)
pt3dadd(-48.943, 162.19, -1.273, 0.614)
pt3dadd(-48.952, 162.086, -1.323, 0.608)
pt3dadd(-48.959, 161.983, -1.373, 0.604)
pt3dadd(-48.984, 161.88, -1.42, 0.598)
pt3dadd(-49.01, 161.777, -1.467, 0.592)
pt3dadd(-49.037, 161.675, -1.513, 0.586)
pt3dadd(-49.063, 161.572, -1.56, 0.582)
pt3dadd(-49.088, 161.462, -1.59, 0.576)
pt3dadd(-49.111, 161.345, -1.592, 0.572)
pt3dadd(-49.134, 161.227, -1.593, 0.568)
pt3dadd(-49.157, 161.11, -1.595, 0.564)
pt3dadd(-49.178, 160.992, -1.597, 0.558)
pt3dadd(-49.201, 160.873, -1.599, 0.554)
pt3dadd(-49.241, 160.763, -1.611, 0.55)
pt3dadd(-49.296, 160.661, -1.633, 0.544)
pt3dadd(-49.352, 160.558, -1.655, 0.538)
pt3dadd(-49.408, 160.454, -1.677, 0.534)
pt3dadd(-49.464, 160.351, -1.699, 0.528)
pt3dadd(-49.484, 160.241, -1.732, 0.528)
pt3dadd(-49.504, 160.129, -1.766, 0.528)
pt3dadd(-49.523, 160.019, -1.8, 0.528)
pt3dadd(-49.542, 159.907, -1.834, 0.528)
pt3dadd(-49.56, 159.796, -1.867, 0.528)
pt3dadd(-49.546, 159.677, -1.875, 0.522)
pt3dadd(-49.532, 159.558, -1.882, 0.518)
pt3dadd(-49.519, 159.439, -1.889, 0.514)
pt3dadd(-49.505, 159.32, -1.897, 0.51)
pt3dadd(-49.492, 159.202, -1.904, 0.506)
pt3dadd(-49.477, 159.083, -1.915, 0.5)
pt3dadd(-49.451, 158.976, -1.954, 0.474)
pt3dadd(-49.422, 158.87, -1.993, 0.45)
pt3dadd(-49.369, 158.774, -2.036, 0.422)
pt3dadd(-49.333, 158.672, -2.071, 0.398)
pt3dadd(-49.333, 158.554, -2.084, 0.388)
pt3dadd(-49.333, 158.435, -2.098, 0.378)
pt3dadd(-49.385, 158.33, -2.104, 0.386)
pt3dadd(-49.448, 158.228, -2.11, 0.398)
pt3dadd(-49.516, 158.142, -2.145, 0.432)
pt3dadd(-49.577, 158.05, -2.18, 0.458)
pt3dadd(-49.63, 157.946, -2.205, 0.47)
pt3dadd(-49.682, 157.843, -2.23, 0.48)
pt3dadd(-49.736, 157.739, -2.254, 0.492)
pt3dadd(-49.79, 157.638, -2.281, 0.504)
pt3dadd(-49.865, 157.594, -2.349, 0.532)
pt3dadd(-49.94, 157.542, -2.413, 0.556)
pt3dadd(-50.017, 157.474, -2.464, 0.57)
pt3dadd(-50.076, 157.382, -2.494, 0.584)
pt3dadd(-50.119, 157.271, -2.505, 0.596)
pt3dadd(-50.152, 157.159, -2.524, 0.598)
pt3dadd(-50.164, 157.048, -2.56, 0.586)
pt3dadd(-50.186, 156.94, -2.591, 0.576)
pt3dadd(-50.252, 156.84, -2.602, 0.562)
pt3dadd(-50.327, 156.752, -2.618, 0.552)
pt3dadd(-50.429, 156.722, -2.661, 0.594)
pt3dadd(-50.543, 156.72, -2.69, 0.656)
pt3dadd(-50.663, 156.72, -2.7, 0.678)
pt3dadd(-50.783, 156.718, -2.7, 0.678)
pt3dadd(-50.898, 156.691, -2.7, 0.678)
pt3dadd(-50.976, 156.608, -2.7, 0.66)
pt3dadd(-50.999, 156.492, -2.7, 0.63)
pt3dadd(-51, 156.372, -2.7, 0.582)
pt3dadd(-51, 156.253, -2.711, 0.552)
pt3dadd(-51, 156.142, -2.745, 0.502)
pt3dadd(-51, 156.071, -2.822, 0.502)
pt3dadd(-51, 156.024, -2.915, 0.502)
pt3dadd(-51.008, 155.975, -3.004, 0.508)
pt3dadd(-51.053, 155.917, -3.083, 0.534)
pt3dadd(-51.106, 155.855, -3.155, 0.568)
pt3dadd(-51.182, 155.798, -3.216, 0.588)
pt3dadd(-51.26, 155.747, -3.279, 0.6)
pt3dadd(-51.338, 155.695, -3.341, 0.612)
pt3dadd(-51.416, 155.642, -3.403, 0.624)
pt3dadd(-51.491, 155.588, -3.468, 0.636)
pt3dadd(-51.562, 155.532, -3.533, 0.648)
pt3dadd(-51.634, 155.477, -3.598, 0.662)
pt3dadd(-51.706, 155.422, -3.664, 0.674)
pt3dadd(-51.782, 155.4, -3.735, 0.684)
pt3dadd(-51.864, 155.4, -3.808, 0.694)
pt3dadd(-51.944, 155.4, -3.883, 0.704)
pt3dadd(-52.025, 155.4, -3.957, 0.714)
pt3dadd(-52.105, 155.4, -4.031, 0.724)
pt3dadd(-52.206, 155.389, -4.079, 0.738)
pt3dadd(-52.316, 155.374, -4.115, 0.754)
pt3dadd(-52.428, 155.357, -4.151, 0.768)
pt3dadd(-52.538, 155.34, -4.187, 0.784)
pt3dadd(-52.649, 155.324, -4.223, 0.8)
pt3dadd(-52.762, 155.306, -4.256, 0.82)
pt3dadd(-52.873, 155.287, -4.287, 0.844)
pt3dadd(-52.981, 155.244, -4.3, 0.868)
pt3dadd(-53.084, 155.184, -4.3, 0.89)
pt3dadd(-53.162, 155.102, -4.3, 0.896)
pt3dadd(-53.202, 154.988, -4.3, 0.874)
pt3dadd(-53.243, 154.876, -4.302, 0.852)
pt3dadd(-53.285, 154.776, -4.344, 0.826)
pt3dadd(-53.332, 154.682, -4.39, 0.8)
pt3dadd(-53.395, 154.624, -4.459, 0.784)
pt3dadd(-53.46, 154.564, -4.527, 0.766)
pt3dadd(-53.515, 154.51, -4.601, 0.754)
pt3dadd(-53.549, 154.469, -4.691, 0.754)
pt3dadd(-53.604, 154.44, -4.768, 0.744)
pt3dadd(-53.693, 154.426, -4.83, 0.728)
pt3dadd(-53.766, 154.398, -4.906, 0.728)
pt3dadd(-53.838, 154.37, -4.982, 0.728)
pt3dadd(-53.911, 154.343, -5.058, 0.728)
pt3dadd(-53.99, 154.32, -5.128, 0.728)
pt3dadd(-54.101, 154.32, -5.167, 0.728)
pt3dadd(-54.211, 154.32, -5.206, 0.728)
pt3dadd(-54.296, 154.32, -5.274, 0.748)
pt3dadd(-54.378, 154.32, -5.348, 0.772)
pt3dadd(-54.424, 154.32, -5.438, 0.786)
pt3dadd(-54.457, 154.32, -5.534, 0.796)
pt3dadd(-54.491, 154.32, -5.63, 0.814)
pt3dadd(-54.523, 154.32, -5.726, 0.844)
pt3dadd(-54.557, 154.32, -5.822, 0.876)
pt3dadd(-54.607, 154.32, -5.913, 0.924)
pt3dadd(-54.677, 154.32, -5.991, 0.972)
pt3dadd(-54.77, 154.32, -6.054, 1.02)
pt3dadd(-54.858, 154.315, -6.121, 1.058)
pt3dadd(-54.926, 154.295, -6.201, 1.072)
pt3dadd(-54.998, 154.253, -6.263, 1.072)
pt3dadd(-55.076, 154.166, -6.287, 1.044)
pt3dadd(-55.174, 154.112, -6.3, 1)
pt3dadd(-55.292, 154.098, -6.3, 0.934)
pt3dadd(-55.412, 154.084, -6.3, 0.87)
pt3dadd(-55.531, 154.08, -6.304, 0.762)
pt3dadd(-55.651, 154.08, -6.31, 0.644)
pt3dadd(-55.765, 154.08, -6.34, 0.544)
pt3dadd(-55.879, 154.08, -6.373, 0.448)
pt3dadd(-55.994, 154.08, -6.4, 0.376)
pt3dadd(-56.111, 154.08, -6.422, 0.326)
pt3dadd(-56.227, 154.08, -6.445, 0.276)
pt3dadd(-56.267, 154.08, -6.54, 0.254)
pt3dadd(-56.306, 154.08, -6.634, 0.234)
pt3dadd(-56.341, 154.08, -6.73, 0.226)
pt3dadd(-56.375, 154.08, -6.826, 0.226)
pt3dadd(-56.4, 154.08, -6.923, 0.226)
pt3dadd(-56.4, 154.08, -7.023, 0.226)
pt3dadd(-56.4, 154.075, -7.122, 0.226)
pt3dadd(-56.4, 154.056, -7.221, 0.226)
pt3dadd(-56.4, 154.036, -7.32, 0.226)
pt3dadd(-56.4, 154.016, -7.418, 0.226)
pt3dadd(-56.4, 153.996, -7.517, 0.226)
pt3dadd(-56.4, 153.977, -7.616, 0.226)
pt3dadd(-56.4, 153.947, -7.709, 0.226)
pt3dadd(-56.4, 153.87, -7.783, 0.226)
pt3dadd(-56.4, 153.844, -7.879, 0.226)
pt3dadd(-56.412, 153.84, -7.978, 0.226)
}
}
proc shape3d_48() {
apic[8] { pt3dadd(-56.468, 153.84, -8.062, 0.256)
pt3dadd(-56.58, 153.833, -8.094, 0.288)
pt3dadd(-56.696, 153.806, -8.1, 0.302)
pt3dadd(-56.795, 153.74, -8.1, 0.302)
pt3dadd(-56.888, 153.665, -8.1, 0.288)
pt3dadd(-56.996, 153.618, -8.1, 0.256)
pt3dadd(-57.115, 153.601, -8.1, 0.276)
pt3dadd(-57.235, 153.6, -8.1, 0.372)
pt3dadd(-57.353, 153.581, -8.1, 0.4)
pt3dadd(-57.472, 153.562, -8.1, 0.426)
pt3dadd(-57.59, 153.541, -8.1, 0.45)
pt3dadd(-57.708, 153.522, -8.1, 0.474)
pt3dadd(-57.827, 153.503, -8.1, 0.5)
pt3dadd(-57.944, 153.482, -8.1, 0.524)
pt3dadd(-58.064, 153.48, -8.1, 0.556)
pt3dadd(-58.184, 153.48, -8.1, 0.59)
pt3dadd(-58.304, 153.48, -8.1, 0.624)
pt3dadd(-58.424, 153.467, -8.1, 0.644)
pt3dadd(-58.543, 153.452, -8.1, 0.662)
pt3dadd(-58.656, 153.427, -8.107, 0.676)
pt3dadd(-58.738, 153.352, -8.144, 0.662)
pt3dadd(-58.796, 153.26, -8.175, 0.644)
pt3dadd(-58.82, 153.145, -8.195, 0.622)
pt3dadd(-58.859, 153.049, -8.222, 0.598)
pt3dadd(-58.956, 153.034, -8.279, 0.576)
pt3dadd(-59.052, 153.018, -8.337, 0.552)
pt3dadd(-59.149, 153.001, -8.394, 0.53)
pt3dadd(-59.252, 153, -8.445, 0.506)
pt3dadd(-59.356, 153, -8.496, 0.484)
pt3dadd(-59.462, 153, -8.542, 0.454)
pt3dadd(-59.533, 153, -8.622, 0.486)
pt3dadd(-59.597, 153, -8.705, 0.538)
pt3dadd(-59.672, 153, -8.784, 0.58)
pt3dadd(-59.74, 153, -8.866, 0.59)
pt3dadd(-59.792, 153, -8.955, 0.536)
pt3dadd(-59.85, 153.028, -9.038, 0.512)
pt3dadd(-59.878, 153.122, -9.086, 0.614)
pt3dadd(-59.88, 153.241, -9.1, 0.728)
pt3dadd(-59.88, 153.359, -9.114, 0.804)
pt3dadd(-59.88, 153.468, -9.152, 0.782)
pt3dadd(-59.88, 153.554, -9.221, 0.74)
pt3dadd(-59.88, 153.636, -9.294, 0.716)
pt3dadd(-59.88, 153.696, -9.378, 0.688)
pt3dadd(-59.88, 153.728, -9.474, 0.658)
pt3dadd(-59.879, 153.762, -9.57, 0.626)
pt3dadd(-59.834, 153.816, -9.651, 0.586)
pt3dadd(-59.791, 153.87, -9.733, 0.544)
pt3dadd(-59.771, 153.962, -9.774, 0.494)
pt3dadd(-59.765, 154.081, -9.787, 0.436)
pt3dadd(-59.76, 154.2, -9.8, 0.376)
pt3dadd(-59.76, 154.32, -9.8, 0.276)
pt3dadd(-59.76, 154.44, -9.8, 0.26)
pt3dadd(-59.76, 154.56, -9.8, 0.242)
pt3dadd(-59.76, 154.68, -9.8, 0.226)
}
apic[9] {pt3dclear()
pt3dadd(-45.6, 162.934, 2.078, 1.984)
pt3dadd(-45.512, 162.893, 2.025, 1.886)
pt3dadd(-45.421, 162.85, 1.97, 1.782)
pt3dadd(-45.33, 162.806, 1.916, 1.68)
pt3dadd(-45.24, 162.763, 1.861, 1.578)
pt3dadd(-45.149, 162.72, 1.806, 1.476)
pt3dadd(-45.058, 162.678, 1.752, 1.374)
pt3dadd(-44.968, 162.635, 1.697, 1.272)
pt3dadd(-44.876, 162.592, 1.642, 1.17)
pt3dadd(-44.785, 162.548, 1.588, 1.068)
pt3dadd(-44.695, 162.505, 1.533, 0.966)
pt3dadd(-44.608, 162.463, 1.525, 0.88)
pt3dadd(-44.525, 162.422, 1.589, 0.82)
pt3dadd(-44.442, 162.382, 1.653, 0.76)
pt3dadd(-44.359, 162.34, 1.716, 0.7)
pt3dadd(-44.274, 162.298, 1.778, 0.646)
pt3dadd(-44.185, 162.253, 1.834, 0.61)
pt3dadd(-44.096, 162.209, 1.89, 0.574)
pt3dadd(-44.008, 162.163, 1.946, 0.538)
pt3dadd(-43.918, 162.119, 2.001, 0.502)
pt3dadd(-43.808, 162.091, 2.036, 0.482)
pt3dadd(-43.7, 162.064, 2.071, 0.462)
pt3dadd(-43.591, 162.035, 2.106, 0.442)
pt3dadd(-43.48, 162.013, 2.132, 0.424)
pt3dadd(-43.361, 162.011, 2.127, 0.408)
pt3dadd(-43.241, 162.008, 2.122, 0.392)
pt3dadd(-43.121, 162.007, 2.117, 0.378)
pt3dadd(-43.001, 162.005, 2.112, 0.362)
pt3dadd(-42.881, 162.002, 2.107, 0.346)
pt3dadd(-42.761, 162.001, 2.102, 0.332)
pt3dadd(-42.641, 162, 2.1, 0.322)
pt3dadd(-42.521, 162, 2.1, 0.314)
pt3dadd(-42.401, 162, 2.1, 0.308)
pt3dadd(-42.281, 162, 2.1, 0.3)
pt3dadd(-42.161, 162, 2.1, 0.292)
pt3dadd(-42.041, 162, 2.1, 0.286)
pt3dadd(-41.921, 162, 2.1, 0.278)
pt3dadd(-41.801, 161.996, 2.1, 0.264)
pt3dadd(-41.681, 161.993, 2.1, 0.248)
pt3dadd(-41.562, 161.988, 2.1, 0.23)
pt3dadd(-41.458, 161.935, 2.1, 0.234)
pt3dadd(-41.358, 161.867, 2.1, 0.246)
pt3dadd(-41.273, 161.785, 2.097, 0.266)
pt3dadd(-41.195, 161.694, 2.091, 0.29)
pt3dadd(-41.106, 161.65, 2.056, 0.328)
pt3dadd(-41.01, 161.644, 1.997, 0.376)
pt3dadd(-40.955, 161.624, 1.92, 0.412)
pt3dadd(-40.944, 161.593, 1.824, 0.43)
pt3dadd(-40.934, 161.562, 1.728, 0.45)
pt3dadd(-40.924, 161.531, 1.632, 0.47)
pt3dadd(-40.907, 161.474, 1.547, 0.486)
pt3dadd(-40.886, 161.406, 1.466, 0.498)
pt3dadd(-40.81, 161.347, 1.418, 0.458)
pt3dadd(-40.703, 161.304, 1.4, 0.366)
pt3dadd(-40.585, 161.284, 1.4, 0.268)
pt3dadd(-40.466, 161.268, 1.4, 0.228)
pt3dadd(-40.357, 161.228, 1.382, 0.234)
pt3dadd(-40.268, 161.173, 1.334, 0.324)
pt3dadd(-40.152, 161.171, 1.313, 0.352)
pt3dadd(-40.034, 161.168, 1.291, 0.378)
pt3dadd(-39.917, 161.166, 1.27, 0.404)
pt3dadd(-39.799, 161.164, 1.249, 0.43)
pt3dadd(-39.683, 161.162, 1.228, 0.456)
pt3dadd(-39.565, 161.16, 1.206, 0.482)
pt3dadd(-39.449, 161.16, 1.181, 0.508)
pt3dadd(-39.334, 161.16, 1.156, 0.534)
pt3dadd(-39.217, 161.16, 1.131, 0.56)
pt3dadd(-39.101, 161.16, 1.106, 0.586)
pt3dadd(-38.984, 161.16, 1.081, 0.614)
pt3dadd(-38.867, 161.16, 1.062, 0.636)
pt3dadd(-38.748, 161.16, 1.052, 0.656)
pt3dadd(-38.628, 161.16, 1.041, 0.676)
pt3dadd(-38.509, 161.16, 1.031, 0.696)
pt3dadd(-38.389, 161.16, 1.02, 0.716)
pt3dadd(-38.27, 161.16, 1.01, 0.734)
pt3dadd(-38.15, 161.16, 1, 0.754)
pt3dadd(-38.03, 161.16, 1, 0.758)
pt3dadd(-37.91, 161.16, 1, 0.76)
pt3dadd(-37.79, 161.16, 1, 0.764)
pt3dadd(-37.67, 161.16, 1, 0.768)
pt3dadd(-37.55, 161.16, 1, 0.772)
pt3dadd(-37.43, 161.16, 1, 0.774)
pt3dadd(-37.31, 161.159, 1, 0.778)
pt3dadd(-37.192, 161.152, 1, 0.778)
pt3dadd(-37.072, 161.143, 1, 0.778)
pt3dadd(-36.952, 161.135, 1, 0.778)
pt3dadd(-36.832, 161.128, 1, 0.778)
pt3dadd(-36.713, 161.119, 1, 0.778)
pt3dadd(-36.593, 161.111, 1, 0.778)
pt3dadd(-36.475, 161.09, 1, 0.774)
pt3dadd(-36.36, 161.058, 1, 0.766)
pt3dadd(-36.245, 161.024, 1, 0.756)
pt3dadd(-36.128, 160.991, 1, 0.748)
pt3dadd(-36.013, 160.958, 1, 0.738)
pt3dadd(-35.898, 160.925, 1, 0.73)
pt3dadd(-35.785, 160.885, 1, 0.72)
pt3dadd(-35.672, 160.843, 1, 0.712)
pt3dadd(-35.56, 160.801, 1, 0.702)
pt3dadd(-35.448, 160.76, 1, 0.692)
pt3dadd(-35.335, 160.718, 1, 0.684)
pt3dadd(-35.22, 160.685, 1, 0.674)
pt3dadd(-35.102, 160.662, 1, 0.66)
pt3dadd(-34.985, 160.64, 1, 0.648)
pt3dadd(-34.867, 160.618, 1, 0.636)
pt3dadd(-34.748, 160.596, 1, 0.622)
pt3dadd(-34.631, 160.573, 1, 0.61)
pt3dadd(-34.513, 160.56, 0.993, 0.598)
pt3dadd(-34.394, 160.56, 0.977, 0.586)
pt3dadd(-34.276, 160.56, 0.961, 0.572)
pt3dadd(-34.158, 160.56, 0.944, 0.56)
pt3dadd(-34.039, 160.56, 0.928, 0.548)
pt3dadd(-33.92, 160.56, 0.911, 0.536)
pt3dadd(-33.802, 160.56, 0.9, 0.524)
pt3dadd(-33.682, 160.56, 0.9, 0.514)
pt3dadd(-33.562, 160.56, 0.9, 0.504)
pt3dadd(-33.442, 160.56, 0.9, 0.494)
pt3dadd(-33.322, 160.56, 0.9, 0.484)
pt3dadd(-33.202, 160.56, 0.9, 0.476)
pt3dadd(-33.082, 160.56, 0.9, 0.472)
pt3dadd(-32.962, 160.56, 0.9, 0.468)
pt3dadd(-32.842, 160.56, 0.9, 0.466)
pt3dadd(-32.722, 160.56, 0.9, 0.462)
pt3dadd(-32.602, 160.56, 0.9, 0.458)
pt3dadd(-32.482, 160.56, 0.9, 0.454)
pt3dadd(-32.363, 160.56, 0.897, 0.454)
pt3dadd(-32.243, 160.56, 0.886, 0.462)
pt3dadd(-32.124, 160.56, 0.876, 0.47)
pt3dadd(-32.004, 160.56, 0.865, 0.478)
pt3dadd(-31.885, 160.56, 0.855, 0.486)
pt3dadd(-31.765, 160.56, 0.844, 0.494)
pt3dadd(-31.646, 160.56, 0.834, 0.502)
pt3dadd(-31.528, 160.56, 0.818, 0.518)
pt3dadd(-31.409, 160.56, 0.801, 0.534)
pt3dadd(-31.291, 160.56, 0.785, 0.55)
pt3dadd(-31.172, 160.56, 0.768, 0.568)
pt3dadd(-31.055, 160.56, 0.752, 0.584)
pt3dadd(-30.936, 160.56, 0.736, 0.6)
pt3dadd(-30.816, 160.56, 0.729, 0.622)
pt3dadd(-30.696, 160.56, 0.724, 0.644)
pt3dadd(-30.576, 160.56, 0.719, 0.668)
pt3dadd(-30.457, 160.56, 0.714, 0.69)
pt3dadd(-30.337, 160.56, 0.709, 0.712)
pt3dadd(-30.217, 160.56, 0.704, 0.734)
pt3dadd(-30.097, 160.56, 0.7, 0.76)
pt3dadd(-29.977, 160.56, 0.7, 0.794)
pt3dadd(-29.857, 160.56, 0.7, 0.826)
}
}
proc shape3d_49() {
apic[9] { pt3dadd(-29.738, 160.554, 0.7, 0.856)
pt3dadd(-29.623, 160.52, 0.7, 0.866)
pt3dadd(-29.507, 160.488, 0.7, 0.876)
pt3dadd(-29.394, 160.45, 0.7, 0.854)
pt3dadd(-29.28, 160.41, 0.7, 0.822)
pt3dadd(-29.188, 160.345, 0.7, 0.784)
pt3dadd(-29.128, 160.242, 0.7, 0.74)
pt3dadd(-29.065, 160.141, 0.694, 0.696)
pt3dadd(-28.996, 160.049, 0.665, 0.664)
pt3dadd(-28.926, 159.958, 0.636, 0.63)
pt3dadd(-28.849, 159.877, 0.611, 0.602)
pt3dadd(-28.73, 159.862, 0.606, 0.592)
pt3dadd(-28.612, 159.846, 0.602, 0.582)
pt3dadd(-28.492, 159.84, 0.6, 0.564)
pt3dadd(-28.372, 159.84, 0.6, 0.552)
pt3dadd(-28.252, 159.84, 0.6, 0.552)
pt3dadd(-28.132, 159.84, 0.6, 0.552)
pt3dadd(-28.013, 159.84, 0.607, 0.542)
pt3dadd(-27.894, 159.84, 0.619, 0.524)
pt3dadd(-27.774, 159.84, 0.632, 0.504)
pt3dadd(-27.678, 159.84, 0.688, 0.502)
pt3dadd(-27.584, 159.84, 0.751, 0.502)
pt3dadd(-27.476, 159.84, 0.791, 0.51)
pt3dadd(-27.362, 159.84, 0.824, 0.52)
pt3dadd(-27.276, 159.84, 0.88, 0.546)
pt3dadd(-27.234, 159.84, 0.974, 0.594)
pt3dadd(-27.187, 159.84, 1.066, 0.612)
pt3dadd(-27.142, 159.84, 1.158, 0.622)
pt3dadd(-27.065, 159.829, 1.228, 0.62)
pt3dadd(-26.963, 159.809, 1.278, 0.608)
pt3dadd(-26.854, 159.781, 1.3, 0.584)
pt3dadd(-26.738, 159.748, 1.3, 0.554)
pt3dadd(-26.623, 159.719, 1.304, 0.524)
pt3dadd(-26.508, 159.714, 1.333, 0.502)
pt3dadd(-26.394, 159.708, 1.362, 0.48)
pt3dadd(-26.288, 159.664, 1.388, 0.462)
pt3dadd(-26.178, 159.623, 1.403, 0.45)
pt3dadd(-26.063, 159.59, 1.409, 0.444)
pt3dadd(-25.948, 159.559, 1.416, 0.44)
pt3dadd(-25.831, 159.527, 1.422, 0.436)
pt3dadd(-25.716, 159.496, 1.428, 0.43)
pt3dadd(-25.601, 159.464, 1.435, 0.426)
pt3dadd(-25.483, 159.445, 1.447, 0.422)
pt3dadd(-25.366, 159.426, 1.459, 0.418)
pt3dadd(-25.248, 159.407, 1.471, 0.412)
pt3dadd(-25.13, 159.388, 1.483, 0.408)
pt3dadd(-25.013, 159.368, 1.495, 0.404)
pt3dadd(-24.894, 159.359, 1.503, 0.4)
pt3dadd(-24.774, 159.356, 1.508, 0.396)
pt3dadd(-24.654, 159.355, 1.513, 0.392)
pt3dadd(-24.534, 159.353, 1.518, 0.388)
pt3dadd(-24.414, 159.35, 1.523, 0.384)
pt3dadd(-24.294, 159.349, 1.528, 0.38)
pt3dadd(-24.175, 159.347, 1.533, 0.376)
pt3dadd(-24.074, 159.298, 1.569, 0.376)
pt3dadd(-23.972, 159.25, 1.6, 0.376)
pt3dadd(-23.855, 159.223, 1.6, 0.376)
pt3dadd(-23.738, 159.198, 1.6, 0.376)
pt3dadd(-23.656, 159.124, 1.6, 0.39)
pt3dadd(-23.594, 159.02, 1.6, 0.414)
pt3dadd(-23.534, 158.917, 1.6, 0.446)
pt3dadd(-23.473, 158.813, 1.6, 0.492)
pt3dadd(-23.402, 158.72, 1.599, 0.536)
pt3dadd(-23.298, 158.66, 1.596, 0.57)
pt3dadd(-23.195, 158.6, 1.593, 0.606)
pt3dadd(-23.09, 158.542, 1.59, 0.64)
pt3dadd(-23.01, 158.52, 1.536, 0.66)
pt3dadd(-22.942, 158.52, 1.453, 0.672)
pt3dadd(-22.891, 158.52, 1.364, 0.648)
pt3dadd(-22.807, 158.52, 1.303, 0.614)
pt3dadd(-22.7, 158.52, 1.258, 0.596)
pt3dadd(-22.592, 158.52, 1.214, 0.576)
pt3dadd(-22.486, 158.52, 1.169, 0.556)
pt3dadd(-22.378, 158.52, 1.124, 0.538)
pt3dadd(-22.265, 158.52, 1.1, 0.524)
pt3dadd(-22.145, 158.52, 1.1, 0.516)
pt3dadd(-22.025, 158.52, 1.1, 0.51)
pt3dadd(-21.905, 158.52, 1.1, 0.502)
pt3dadd(-21.785, 158.52, 1.1, 0.496)
pt3dadd(-21.665, 158.52, 1.1, 0.488)
pt3dadd(-21.545, 158.52, 1.1, 0.48)
pt3dadd(-21.425, 158.521, 1.1, 0.478)
pt3dadd(-21.305, 158.522, 1.1, 0.478)
pt3dadd(-21.185, 158.525, 1.1, 0.478)
pt3dadd(-21.065, 158.526, 1.1, 0.478)
pt3dadd(-20.945, 158.528, 1.1, 0.478)
pt3dadd(-20.825, 158.531, 1.1, 0.478)
pt3dadd(-20.705, 158.532, 1.1, 0.478)
pt3dadd(-20.594, 158.567, 1.1, 0.48)
pt3dadd(-20.49, 158.627, 1.1, 0.484)
pt3dadd(-20.386, 158.687, 1.1, 0.49)
pt3dadd(-20.282, 158.747, 1.1, 0.494)
pt3dadd(-20.178, 158.807, 1.1, 0.5)
pt3dadd(-20.069, 158.852, 1.1, 0.506)
pt3dadd(-19.951, 158.88, 1.1, 0.514)
pt3dadd(-19.835, 158.908, 1.1, 0.524)
pt3dadd(-19.718, 158.935, 1.1, 0.532)
pt3dadd(-19.601, 158.963, 1.1, 0.54)
pt3dadd(-19.484, 158.989, 1.1, 0.55)
pt3dadd(-19.366, 159, 1.1, 0.554)
pt3dadd(-19.246, 159, 1.1, 0.558)
pt3dadd(-19.126, 159, 1.1, 0.562)
pt3dadd(-19.006, 159, 1.1, 0.566)
pt3dadd(-18.886, 159, 1.1, 0.57)
pt3dadd(-18.766, 159, 1.1, 0.572)
pt3dadd(-18.646, 159, 1.1, 0.576)
pt3dadd(-18.526, 159, 1.1, 0.582)
pt3dadd(-18.406, 159, 1.1, 0.59)
pt3dadd(-18.286, 159, 1.1, 0.596)
pt3dadd(-18.166, 159, 1.1, 0.604)
pt3dadd(-18.046, 159, 1.1, 0.61)
pt3dadd(-17.926, 159, 1.1, 0.618)
pt3dadd(-17.806, 159, 1.1, 0.626)
pt3dadd(-17.694, 159.034, 1.1, 0.634)
pt3dadd(-17.586, 159.086, 1.1, 0.646)
pt3dadd(-17.479, 159.14, 1.1, 0.662)
pt3dadd(-17.371, 159.194, 1.1, 0.684)
pt3dadd(-17.262, 159.239, 1.1, 0.706)
pt3dadd(-17.142, 159.235, 1.1, 0.722)
pt3dadd(-17.022, 159.23, 1.1, 0.74)
pt3dadd(-16.904, 159.216, 1.1, 0.762)
pt3dadd(-16.792, 159.175, 1.1, 0.796)
pt3dadd(-16.679, 159.133, 1.1, 0.83)
pt3dadd(-16.56, 159.12, 1.1, 0.904)
}
apic[10] {pt3dclear()
pt3dadd(-37.321, 161.129, 6.644, 1.804)
pt3dadd(-37.308, 161.118, 6.639, 1.798)
pt3dadd(-37.242, 161.21, 6.641, 1.726)
pt3dadd(-37.176, 161.304, 6.643, 1.654)
pt3dadd(-37.11, 161.396, 6.644, 1.582)
pt3dadd(-37.044, 161.489, 6.646, 1.51)
pt3dadd(-36.979, 161.582, 6.648, 1.438)
pt3dadd(-36.913, 161.675, 6.65, 1.366)
pt3dadd(-36.847, 161.768, 6.651, 1.294)
pt3dadd(-36.781, 161.861, 6.653, 1.222)
pt3dadd(-36.715, 161.954, 6.655, 1.15)
pt3dadd(-36.649, 162.047, 6.657, 1.078)
pt3dadd(-36.584, 162.14, 6.659, 1.006)
pt3dadd(-36.518, 162.233, 6.66, 0.934)
pt3dadd(-36.426, 162.238, 6.66, 0.904)
pt3dadd(-36.306, 162.204, 6.645, 0.904)
pt3dadd(-36.191, 162.194, 6.607, 0.904)
pt3dadd(-36.094, 162.185, 6.542, 0.904)
pt3dadd(-36.003, 162.196, 6.473, 0.904)
pt3dadd(-35.922, 162.245, 6.414, 0.904)
pt3dadd(-35.844, 162.271, 6.338, 0.904)
pt3dadd(-35.762, 162.269, 6.262, 0.904)
pt3dadd(-35.661, 162.32, 6.231, 0.904)
pt3dadd(-35.559, 162.372, 6.2, 0.904)
pt3dadd(-35.457, 162.424, 6.17, 0.904)
pt3dadd(-35.356, 162.474, 6.139, 0.904)
pt3dadd(-35.252, 162.528, 6.127, 0.904)
pt3dadd(-35.148, 162.584, 6.124, 0.904)
pt3dadd(-35.044, 162.641, 6.122, 0.904)
pt3dadd(-35.04, 162.631, 6.119, 0.904)
pt3dadd(-34.936, 162.688, 6.116, 0.904)
pt3dadd(-34.832, 162.744, 6.114, 0.904)
pt3dadd(-34.721, 162.787, 6.11, 0.904)
pt3dadd(-34.606, 162.823, 6.105, 0.904)
pt3dadd(-34.491, 162.859, 6.1, 0.904)
pt3dadd(-34.376, 162.895, 6.095, 0.904)
pt3dadd(-34.261, 162.93, 6.09, 0.904)
pt3dadd(-34.15, 162.972, 6.08, 0.904)
pt3dadd(-34.048, 163.027, 6.057, 0.904)
pt3dadd(-33.946, 163.084, 6.035, 0.904)
pt3dadd(-33.845, 163.139, 6.012, 0.904)
pt3dadd(-33.743, 163.194, 5.99, 0.904)
pt3dadd(-33.649, 163.259, 5.965, 0.904)
pt3dadd(-33.556, 163.326, 5.939, 0.904)
pt3dadd(-33.464, 163.393, 5.914, 0.904)
pt3dadd(-33.372, 163.459, 5.888, 0.904)
pt3dadd(-33.285, 163.534, 5.873, 0.904)
pt3dadd(-33.207, 163.618, 5.87, 0.904)
pt3dadd(-33.128, 163.702, 5.868, 0.904)
pt3dadd(-33.049, 163.786, 5.865, 0.904)
pt3dadd(-32.97, 163.87, 5.862, 0.904)
pt3dadd(-32.88, 163.942, 5.86, 0.904)
pt3dadd(-32.778, 164.002, 5.857, 0.904)
pt3dadd(-32.675, 164.06, 5.854, 0.904)
pt3dadd(-32.573, 164.12, 5.852, 0.904)
pt3dadd(-32.471, 164.179, 5.849, 0.904)
pt3dadd(-32.377, 164.248, 5.846, 0.904)
pt3dadd(-32.292, 164.326, 5.843, 0.904)
pt3dadd(-32.208, 164.405, 5.841, 0.904)
pt3dadd(-32.123, 164.484, 5.838, 0.904)
pt3dadd(-32.039, 164.563, 5.835, 0.904)
pt3dadd(-31.943, 164.629, 5.824, 0.904)
pt3dadd(-31.838, 164.68, 5.805, 0.904)
pt3dadd(-31.728, 164.712, 5.777, 0.904)
pt3dadd(-31.613, 164.729, 5.741, 0.904)
pt3dadd(-31.512, 164.758, 5.694, 0.904)
pt3dadd(-31.425, 164.802, 5.635, 0.904)
pt3dadd(-31.362, 164.831, 5.554, 0.904)
pt3dadd(-31.31, 164.855, 5.464, 0.904)
pt3dadd(-31.227, 164.903, 5.408, 0.904)
pt3dadd(-31.137, 164.957, 5.36, 0.904)
pt3dadd(-31.047, 165.011, 5.312, 0.904)
pt3dadd(-30.932, 165.04, 5.303, 0.904)
pt3dadd(-30.813, 165.062, 5.3, 0.904)
pt3dadd(-30.694, 165.086, 5.298, 0.904)
pt3dadd(-30.572, 165.092, 5.287, 0.904)
}
}
proc shape3d_50() {
apic[10] { pt3dadd(-30.449, 165.088, 5.271, 0.904)
pt3dadd(-30.326, 165.083, 5.255, 0.904)
pt3dadd(-30.207, 165.072, 5.225, 0.904)
pt3dadd(-30.088, 165.062, 5.195, 0.904)
pt3dadd(-29.97, 165.053, 5.161, 0.904)
pt3dadd(-29.853, 165.043, 5.125, 0.904)
pt3dadd(-29.744, 165.034, 5.079, 0.904)
pt3dadd(-29.74, 165.024, 5.076, 0.904)
pt3dadd(-29.654, 165.014, 5.001, 0.904)
pt3dadd(-29.565, 165.006, 4.928, 0.904)
pt3dadd(-29.457, 165.008, 4.877, 0.904)
pt3dadd(-29.348, 165.01, 4.826, 0.904)
pt3dadd(-29.24, 165.011, 4.775, 0.904)
pt3dadd(-29.139, 165.056, 4.757, 0.904)
pt3dadd(-29.042, 165.122, 4.754, 0.904)
pt3dadd(-28.932, 165.164, 4.752, 0.904)
pt3dadd(-28.815, 165.193, 4.749, 0.904)
pt3dadd(-28.697, 165.223, 4.746, 0.904)
pt3dadd(-28.578, 165.244, 4.744, 0.904)
pt3dadd(-28.455, 165.248, 4.741, 0.904)
pt3dadd(-28.332, 165.253, 4.738, 0.904)
pt3dadd(-28.208, 165.248, 4.733, 0.904)
pt3dadd(-28.084, 165.238, 4.726, 0.904)
pt3dadd(-27.96, 165.228, 4.72, 0.904)
pt3dadd(-27.884, 165.218, 4.647, 0.904)
pt3dadd(-27.82, 165.209, 4.558, 0.904)
pt3dadd(-27.739, 165.218, 4.482, 0.904)
pt3dadd(-27.649, 165.239, 4.415, 0.904)
pt3dadd(-27.558, 165.259, 4.347, 0.904)
pt3dadd(-27.459, 165.296, 4.314, 0.904)
pt3dadd(-27.352, 165.347, 4.311, 0.904)
pt3dadd(-27.24, 165.389, 4.309, 0.904)
pt3dadd(-27.123, 165.418, 4.305, 0.904)
pt3dadd(-27.006, 165.449, 4.3, 0.904)
pt3dadd(-26.89, 165.481, 4.295, 0.904)
pt3dadd(-26.774, 165.515, 4.29, 0.904)
pt3dadd(-26.658, 165.547, 4.286, 0.904)
pt3dadd(-26.542, 165.575, 4.275, 0.904)
pt3dadd(-26.427, 165.582, 4.236, 0.904)
pt3dadd(-26.313, 165.589, 4.197, 0.904)
pt3dadd(-26.198, 165.595, 4.158, 0.904)
pt3dadd(-26.083, 165.602, 4.12, 0.904)
pt3dadd(-25.967, 165.61, 4.084, 0.904)
pt3dadd(-25.849, 165.617, 4.056, 0.904)
pt3dadd(-25.732, 165.624, 4.026, 0.904)
pt3dadd(-25.667, 165.614, 3.937, 0.904)
pt3dadd(-25.602, 165.605, 3.848, 0.904)
pt3dadd(-25.542, 165.6, 3.758, 0.904)
pt3dadd(-25.481, 165.596, 3.667, 0.904)
pt3dadd(-25.441, 165.654, 3.596, 0.904)
pt3dadd(-25.409, 165.737, 3.534, 0.904)
pt3dadd(-25.333, 165.757, 3.462, 0.904)
pt3dadd(-25.247, 165.764, 3.388, 0.904)
pt3dadd(-25.161, 165.77, 3.313, 0.904)
pt3dadd(-25.054, 165.767, 3.27, 0.904)
pt3dadd(-24.932, 165.757, 3.25, 0.904)
pt3dadd(-24.81, 165.748, 3.23, 0.904)
pt3dadd(-24.69, 165.738, 3.201, 0.904)
pt3dadd(-24.571, 165.728, 3.17, 0.904)
pt3dadd(-24.452, 165.719, 3.14, 0.904)
pt3dadd(-24.33, 165.709, 3.118, 0.904)
pt3dadd(-24.208, 165.7, 3.098, 0.904)
pt3dadd(-24.099, 165.69, 3.067, 0.904)
pt3dadd(-24.069, 165.68, 2.966, 0.904)
pt3dadd(-24.038, 165.67, 2.866, 0.904)
pt3dadd(-23.973, 165.66, 2.781, 0.904)
pt3dadd(-23.887, 165.65, 2.705, 0.904)
pt3dadd(-23.826, 165.641, 2.618, 0.904)
pt3dadd(-23.79, 165.631, 2.519, 0.904)
pt3dadd(-23.782, 165.622, 2.417, 0.904)
pt3dadd(-23.765, 165.612, 2.315, 0.904)
pt3dadd(-23.72, 165.602, 2.219, 0.904)
pt3dadd(-23.632, 165.593, 2.146, 0.904)
pt3dadd(-23.518, 165.583, 2.108, 0.904)
pt3dadd(-23.398, 165.595, 2.092, 0.904)
pt3dadd(-23.301, 165.655, 2.09, 0.904)
pt3dadd(-23.223, 165.739, 2.087, 0.904)
pt3dadd(-23.121, 165.798, 2.084, 0.904)
pt3dadd(-23.017, 165.854, 2.082, 0.904)
pt3dadd(-22.93, 165.925, 2.059, 0.904)
pt3dadd(-22.857, 165.991, 2.005, 0.904)
pt3dadd(-22.802, 166.07, 1.953, 0.904)
pt3dadd(-22.771, 166.164, 1.905, 0.904)
pt3dadd(-22.732, 166.23, 1.837, 0.904)
pt3dadd(-22.686, 166.268, 1.75, 0.904)
pt3dadd(-22.639, 166.306, 1.663, 0.904)
pt3dadd(-22.635, 166.296, 1.66, 0.678)
pt3dadd(-22.631, 166.286, 1.657, 0.678)
pt3dadd(-22.515, 166.232, 1.655, 0.682)
pt3dadd(-22.4, 166.178, 1.652, 0.688)
pt3dadd(-22.284, 166.124, 1.649, 0.692)
pt3dadd(-22.17, 166.069, 1.647, 0.696)
pt3dadd(-22.054, 166.015, 1.644, 0.702)
pt3dadd(-21.934, 165.989, 1.641, 0.708)
pt3dadd(-21.81, 165.979, 1.639, 0.714)
pt3dadd(-21.686, 165.968, 1.636, 0.722)
pt3dadd(-21.562, 165.959, 1.633, 0.73)
pt3dadd(-21.438, 165.949, 1.63, 0.736)
pt3dadd(-21.314, 165.94, 1.628, 0.744)
pt3dadd(-21.19, 165.93, 1.625, 0.75)
pt3dadd(-21.072, 165.911, 1.599, 0.762)
pt3dadd(-20.959, 165.884, 1.557, 0.778)
pt3dadd(-20.846, 165.858, 1.516, 0.794)
pt3dadd(-20.733, 165.832, 1.474, 0.81)
pt3dadd(-20.618, 165.805, 1.433, 0.824)
pt3dadd(-20.504, 165.757, 1.417, 0.832)
pt3dadd(-20.39, 165.701, 1.41, 0.838)
pt3dadd(-20.275, 165.646, 1.403, 0.842)
pt3dadd(-20.161, 165.589, 1.396, 0.846)
pt3dadd(-20.047, 165.533, 1.389, 0.852)
pt3dadd(-19.932, 165.498, 1.362, 0.852)
pt3dadd(-19.818, 165.481, 1.32, 0.846)
pt3dadd(-19.704, 165.463, 1.278, 0.842)
pt3dadd(-19.59, 165.446, 1.236, 0.836)
pt3dadd(-19.476, 165.428, 1.194, 0.832)
pt3dadd(-19.368, 165.415, 1.144, 0.826)
pt3dadd(-19.265, 165.404, 1.084, 0.822)
pt3dadd(-19.163, 165.395, 1.024, 0.816)
pt3dadd(-19.061, 165.385, 0.963, 0.812)
pt3dadd(-18.959, 165.376, 0.903, 0.806)
pt3dadd(-18.851, 165.366, 0.851, 0.804)
pt3dadd(-18.738, 165.356, 0.808, 0.804)
pt3dadd(-18.624, 165.347, 0.766, 0.804)
pt3dadd(-18.62, 165.337, 0.763, 0.804)
pt3dadd(-18.505, 165.328, 0.721, 0.804)
pt3dadd(-18.391, 165.318, 0.679, 0.804)
pt3dadd(-18.276, 165.308, 0.639, 0.804)
pt3dadd(-18.155, 165.298, 0.615, 0.814)
pt3dadd(-18.033, 165.288, 0.592, 0.822)
pt3dadd(-17.912, 165.278, 0.568, 0.83)
pt3dadd(-17.79, 165.269, 0.545, 0.838)
pt3dadd(-17.669, 165.259, 0.522, 0.848)
pt3dadd(-17.55, 165.246, 0.496, 0.852)
pt3dadd(-17.433, 165.221, 0.46, 0.842)
pt3dadd(-17.317, 165.194, 0.424, 0.832)
pt3dadd(-17.202, 165.169, 0.387, 0.822)
pt3dadd(-17.085, 165.143, 0.351, 0.812)
pt3dadd(-16.969, 165.114, 0.318, 0.8)
pt3dadd(-16.851, 165.076, 0.296, 0.786)
pt3dadd(-16.734, 165.037, 0.273, 0.77)
pt3dadd(-16.616, 164.998, 0.25, 0.756)
pt3dadd(-16.498, 164.959, 0.228, 0.74)
pt3dadd(-16.38, 164.926, 0.203, 0.724)
pt3dadd(-16.376, 164.915, 0.201, 0.724)
pt3dadd(-16.258, 164.903, 0.168, 0.696)
pt3dadd(-16.139, 164.891, 0.135, 0.668)
pt3dadd(-16.021, 164.879, 0.101, 0.64)
pt3dadd(-15.903, 164.867, 0.068, 0.614)
pt3dadd(-15.785, 164.855, 0.035, 0.586)
pt3dadd(-15.663, 164.844, 0.015, 0.564)
pt3dadd(-15.539, 164.834, 0, 0.546)
pt3dadd(-15.416, 164.825, -0.015, 0.528)
pt3dadd(-15.294, 164.815, -0.03, 0.536)
pt3dadd(-15.171, 164.806, -0.046, 0.546)
pt3dadd(-15.061, 164.796, -0.082, 0.568)
pt3dadd(-15.057, 164.786, -0.084, 0.568)
pt3dadd(-15.053, 164.777, -0.087, 0.568)
pt3dadd(-14.975, 164.767, -0.168, 0.614)
pt3dadd(-14.892, 164.756, -0.246, 0.658)
pt3dadd(-14.794, 164.747, -0.311, 0.68)
pt3dadd(-14.697, 164.737, -0.375, 0.702)
pt3dadd(-14.585, 164.728, -0.423, 0.682)
pt3dadd(-14.474, 164.718, -0.47, 0.662)
pt3dadd(-14.362, 164.708, -0.517, 0.642)
pt3dadd(-14.247, 164.699, -0.55, 0.614)
pt3dadd(-14.123, 164.689, -0.553, 0.572)
pt3dadd(-13.999, 164.68, -0.556, 0.53)
pt3dadd(-13.876, 164.67, -0.562, 0.466)
pt3dadd(-13.761, 164.659, -0.597, 0.404)
pt3dadd(-13.659, 164.65, -0.657, 0.41)
pt3dadd(-13.557, 164.64, -0.717, 0.414)
pt3dadd(-13.456, 164.63, -0.777, 0.42)
pt3dadd(-13.353, 164.621, -0.838, 0.424)
pt3dadd(-13.246, 164.603, -0.889, 0.436)
pt3dadd(-13.132, 164.57, -0.926, 0.456)
pt3dadd(-13.017, 164.539, -0.963, 0.476)
pt3dadd(-12.903, 164.507, -1, 0.498)
pt3dadd(-12.789, 164.474, -1.038, 0.518)
pt3dadd(-12.683, 164.416, -1.065, 0.564)
pt3dadd(-12.582, 164.338, -1.085, 0.63)
pt3dadd(-12.474, 164.269, -1.094, 0.674)
pt3dadd(-12.364, 164.206, -1.096, 0.708)
pt3dadd(-12.25, 164.156, -1.111, 0.728)
pt3dadd(-12.134, 164.128, -1.145, 0.728)
pt3dadd(-12.031, 164.093, -1.192, 0.72)
pt3dadd(-11.969, 164.039, -1.274, 0.694)
pt3dadd(-11.907, 163.987, -1.357, 0.668)
pt3dadd(-11.848, 163.939, -1.442, 0.642)
pt3dadd(-11.789, 163.891, -1.528, 0.618)
pt3dadd(-11.707, 163.855, -1.589, 0.602)
pt3dadd(-11.584, 163.846, -1.604, 0.602)
pt3dadd(-11.461, 163.836, -1.619, 0.602)
pt3dadd(-11.337, 163.826, -1.626, 0.62)
pt3dadd(-11.213, 163.817, -1.629, 0.632)
pt3dadd(-11.089, 163.807, -1.631, 0.64)
pt3dadd(-10.965, 163.798, -1.634, 0.646)
pt3dadd(-10.841, 163.788, -1.637, 0.654)
pt3dadd(-10.717, 163.778, -1.639, 0.662)
pt3dadd(-10.594, 163.769, -1.642, 0.668)
pt3dadd(-10.47, 163.759, -1.645, 0.676)
}
}
proc shape3d_51() {
apic[10] { pt3dadd(-10.346, 163.753, -1.648, 0.674)
pt3dadd(-10.222, 163.75, -1.65, 0.666)
pt3dadd(-10.098, 163.745, -1.653, 0.658)
pt3dadd(-9.974, 163.741, -1.656, 0.65)
pt3dadd(-9.85, 163.738, -1.658, 0.642)
pt3dadd(-9.727, 163.734, -1.661, 0.636)
pt3dadd(-9.603, 163.73, -1.664, 0.628)
pt3dadd(-9.485, 163.752, -1.686, 0.632)
pt3dadd(-9.368, 163.775, -1.709, 0.638)
pt3dadd(-9.252, 163.798, -1.732, 0.642)
pt3dadd(-9.135, 163.82, -1.755, 0.648)
pt3dadd(-9.018, 163.843, -1.777, 0.654)
pt3dadd(-8.895, 163.853, -1.78, 0.666)
pt3dadd(-8.773, 163.862, -1.783, 0.678)
pt3dadd(-8.651, 163.873, -1.785, 0.69)
pt3dadd(-8.528, 163.883, -1.788, 0.702)
pt3dadd(-8.407, 163.892, -1.791, 0.716)
pt3dadd(-8.284, 163.903, -1.793, 0.728)
pt3dadd(-8.165, 163.924, -1.808, 0.76)
pt3dadd(-8.046, 163.944, -1.824, 0.794)
pt3dadd(-7.926, 163.964, -1.839, 0.828)
pt3dadd(-7.807, 163.986, -1.855, 0.862)
pt3dadd(-7.689, 164.006, -1.87, 0.894)
pt3dadd(-7.575, 164.005, -1.909, 0.912)
pt3dadd(-7.464, 163.996, -1.956, 0.92)
pt3dadd(-7.352, 163.986, -2.003, 0.93)
pt3dadd(-7.242, 163.976, -2.051, 0.94)
pt3dadd(-7.13, 163.967, -2.098, 0.95)
pt3dadd(-7.013, 163.957, -2.131, 0.952)
pt3dadd(-6.891, 163.948, -2.15, 0.948)
pt3dadd(-6.768, 163.938, -2.17, 0.944)
pt3dadd(-6.646, 163.927, -2.189, 0.94)
pt3dadd(-6.524, 163.918, -2.208, 0.936)
pt3dadd(-6.401, 163.908, -2.227, 0.932)
pt3dadd(-6.279, 163.898, -2.239, 0.922)
pt3dadd(-6.155, 163.889, -2.242, 0.904)
pt3dadd(-6.031, 163.879, -2.245, 0.886)
pt3dadd(-5.907, 163.87, -2.247, 0.868)
pt3dadd(-5.783, 163.86, -2.25, 0.85)
pt3dadd(-5.659, 163.85, -2.253, 0.832)
pt3dadd(-5.535, 163.841, -2.255, 0.814)
pt3dadd(-5.411, 163.83, -2.258, 0.8)
pt3dadd(-5.287, 163.82, -2.261, 0.788)
pt3dadd(-5.163, 163.811, -2.264, 0.778)
pt3dadd(-5.039, 163.801, -2.266, 0.766)
pt3dadd(-4.915, 163.792, -2.269, 0.756)
pt3dadd(-4.791, 163.782, -2.272, 0.746)
pt3dadd(-4.667, 163.772, -2.274, 0.734)
pt3dadd(-4.544, 163.752, -2.277, 0.726)
pt3dadd(-4.423, 163.717, -2.28, 0.722)
pt3dadd(-4.301, 163.684, -2.282, 0.718)
pt3dadd(-4.18, 163.649, -2.285, 0.714)
pt3dadd(-4.059, 163.614, -2.288, 0.71)
pt3dadd(-3.938, 163.579, -2.291, 0.706)
pt3dadd(-3.815, 163.55, -2.293, 0.708)
pt3dadd(-3.692, 163.525, -2.296, 0.716)
pt3dadd(-3.57, 163.501, -2.299, 0.724)
pt3dadd(-3.446, 163.476, -2.301, 0.732)
pt3dadd(-3.323, 163.452, -2.304, 0.74)
pt3dadd(-3.2, 163.427, -2.307, 0.748)
pt3dadd(-3.081, 163.393, -2.315, 0.758)
pt3dadd(-2.971, 163.331, -2.339, 0.78)
pt3dadd(-2.863, 163.27, -2.364, 0.802)
pt3dadd(-2.755, 163.207, -2.388, 0.824)
pt3dadd(-2.646, 163.145, -2.413, 0.846)
pt3dadd(-2.549, 163.079, -2.455, 0.866)
pt3dadd(-2.457, 163.01, -2.506, 0.884)
pt3dadd(-2.366, 162.943, -2.557, 0.902)
pt3dadd(-2.275, 162.875, -2.609, 0.92)
pt3dadd(-2.173, 162.811, -2.644, 0.938)
pt3dadd(-2.063, 162.75, -2.666, 0.954)
pt3dadd(-1.954, 162.689, -2.688, 0.97)
pt3dadd(-1.844, 162.628, -2.709, 0.986)
pt3dadd(-1.733, 162.566, -2.731, 1.002)
pt3dadd(-1.622, 162.508, -2.744, 1.008)
pt3dadd(-1.507, 162.45, -2.756, 1.014)
pt3dadd(-1.394, 162.392, -2.767, 1.02)
pt3dadd(-1.281, 162.335, -2.779, 1.024)
pt3dadd(-1.168, 162.277, -2.79, 1.028)
pt3dadd(-1.083, 162.188, -2.825, 1.034)
pt3dadd(-1.003, 162.096, -2.862, 1.04)
pt3dadd(-0.923, 162.004, -2.899, 1.046)
pt3dadd(-0.842, 161.91, -2.936, 1.052)
pt3dadd(-0.75, 161.848, -2.986, 1.05)
pt3dadd(-0.652, 161.797, -3.041, 1.044)
pt3dadd(-0.554, 161.747, -3.095, 1.038)
pt3dadd(-0.456, 161.696, -3.15, 1.034)
pt3dadd(-0.365, 161.627, -3.193, 1.018)
pt3dadd(-0.282, 161.531, -3.219, 0.99)
pt3dadd(-0.229, 161.448, -3.279, 0.956)
pt3dadd(-0.197, 161.375, -3.363, 0.918)
pt3dadd(-0.138, 161.33, -3.447, 0.878)
pt3dadd(-0.066, 161.3, -3.53, 0.84)
pt3dadd(0.033, 161.285, -3.591, 0.812)
pt3dadd(0.14, 161.275, -3.644, 0.788)
pt3dadd(0.256, 161.266, -3.681, 0.786)
pt3dadd(0.377, 161.256, -3.703, 0.802)
pt3dadd(0.5, 161.246, -3.709, 0.832)
pt3dadd(0.624, 161.237, -3.712, 0.864)
pt3dadd(0.748, 161.227, -3.715, 0.898)
pt3dadd(0.872, 161.218, -3.717, 0.938)
pt3dadd(0.996, 161.208, -3.72, 0.98)
pt3dadd(1.12, 161.198, -3.723, 1.022)
pt3dadd(1.233, 161.183, -3.764, 1.05)
pt3dadd(1.342, 161.167, -3.814, 1.072)
pt3dadd(1.432, 161.119, -3.875, 1.07)
pt3dadd(1.511, 161.056, -3.941, 1.056)
pt3dadd(1.621, 161.024, -3.986, 0.986)
pt3dadd(1.698, 160.993, -4.058, 0.938)
pt3dadd(1.75, 160.961, -4.15, 0.912)
pt3dadd(1.803, 160.928, -4.242, 0.886)
pt3dadd(1.855, 160.896, -4.335, 0.858)
pt3dadd(1.907, 160.864, -4.427, 0.832)
pt3dadd(1.958, 160.852, -4.521, 0.782)
pt3dadd(2.008, 160.841, -4.616, 0.726)
pt3dadd(2.012, 160.831, -4.619, 0.726)
pt3dadd(2.016, 160.822, -4.622, 0.726)
pt3dadd(2.093, 160.812, -4.699, 0.69)
pt3dadd(2.191, 160.802, -4.764, 0.666)
pt3dadd(2.289, 160.793, -4.83, 0.668)
pt3dadd(2.386, 160.783, -4.895, 0.704)
pt3dadd(2.492, 160.774, -4.945, 0.746)
pt3dadd(2.615, 160.764, -4.96, 0.802)
pt3dadd(2.738, 160.754, -4.975, 0.858)
pt3dadd(2.862, 160.745, -4.982, 0.926)
pt3dadd(2.986, 160.734, -4.985, 1.002)
pt3dadd(3.109, 160.724, -4.988, 1.06)
pt3dadd(3.233, 160.715, -4.99, 1.08)
pt3dadd(3.357, 160.705, -4.993, 1.064)
pt3dadd(3.481, 160.696, -5.003, 1.054)
pt3dadd(3.602, 160.686, -5.029, 1.032)
pt3dadd(3.705, 160.646, -5.077, 0.91)
pt3dadd(3.763, 160.54, -5.103, 0.76)
pt3dadd(3.783, 160.412, -5.122, 0.664)
pt3dadd(3.787, 160.29, -5.158, 0.568)
pt3dadd(3.791, 160.169, -5.195, 0.508)
pt3dadd(3.795, 160.04, -5.213, 0.524)
pt3dadd(3.812, 159.912, -5.217, 0.602)
pt3dadd(3.877, 159.826, -5.277, 0.632)
pt3dadd(3.942, 159.748, -5.343, 0.656)
pt3dadd(4.004, 159.694, -5.425, 0.67)
pt3dadd(4.05, 159.642, -5.513, 0.694)
pt3dadd(4.07, 159.614, -5.613, 0.718)
pt3dadd(4.09, 159.594, -5.715, 0.738)
pt3dadd(4.124, 159.564, -5.807, 0.764)
pt3dadd(4.205, 159.5, -5.873, 0.806)
pt3dadd(4.294, 159.43, -5.917, 0.842)
pt3dadd(4.395, 159.352, -5.937, 0.868)
pt3dadd(4.501, 159.282, -5.947, 0.886)
pt3dadd(4.612, 159.218, -5.95, 0.896)
pt3dadd(4.727, 159.172, -5.952, 0.908)
pt3dadd(4.851, 159.162, -5.955, 0.92)
pt3dadd(4.975, 159.152, -5.958, 0.93)
pt3dadd(5.099, 159.143, -5.963, 0.934)
pt3dadd(5.223, 159.133, -5.967, 0.938)
pt3dadd(5.347, 159.124, -5.971, 0.942)
pt3dadd(5.471, 159.113, -5.975, 0.944)
pt3dadd(5.595, 159.103, -5.98, 0.948)
pt3dadd(5.719, 159.094, -5.984, 0.952)
pt3dadd(5.838, 159.084, -6.006, 0.954)
pt3dadd(5.951, 159.074, -6.05, 0.954)
pt3dadd(6.064, 159.065, -6.095, 0.954)
pt3dadd(6.176, 159.055, -6.14, 0.954)
pt3dadd(6.29, 159.046, -6.185, 0.954)
pt3dadd(6.4, 159.036, -6.233, 0.948)
pt3dadd(6.498, 159.026, -6.298, 0.9)
pt3dadd(6.595, 159.016, -6.363, 0.852)
pt3dadd(6.689, 159, -6.431, 0.792)
pt3dadd(6.785, 158.983, -6.499, 0.73)
pt3dadd(6.872, 158.922, -6.558, 0.66)
pt3dadd(6.965, 158.861, -6.606, 0.598)
pt3dadd(7.08, 158.804, -6.609, 0.576)
pt3dadd(7.194, 158.748, -6.612, 0.554)
pt3dadd(7.251, 158.636, -6.635, 0.53)
pt3dadd(7.301, 158.52, -6.66, 0.504)
pt3dadd(7.311, 158.459, -6.748, 0.478)
pt3dadd(7.338, 158.44, -6.848, 0.49)
pt3dadd(7.388, 158.429, -6.943, 0.54)
pt3dadd(7.432, 158.401, -7.038, 0.586)
pt3dadd(7.511, 158.352, -7.097, 0.634)
pt3dadd(7.625, 158.303, -7.121, 0.646)
pt3dadd(7.738, 158.268, -7.156, 0.662)
pt3dadd(7.848, 158.252, -7.205, 0.686)
pt3dadd(7.932, 158.227, -7.268, 0.724)
pt3dadd(7.993, 158.174, -7.345, 0.76)
pt3dadd(8.081, 158.116, -7.406, 0.772)
pt3dadd(8.169, 158.058, -7.468, 0.784)
pt3dadd(8.257, 157.999, -7.53, 0.796)
pt3dadd(8.34, 157.943, -7.596, 0.804)
pt3dadd(8.344, 157.933, -7.599, 0.804)
pt3dadd(8.423, 157.878, -7.67, 0.804)
pt3dadd(8.485, 157.825, -7.751, 0.786)
pt3dadd(8.539, 157.772, -7.837, 0.758)
pt3dadd(8.626, 157.692, -7.862, 0.734)
pt3dadd(8.721, 157.604, -7.87, 0.71)
pt3dadd(8.833, 157.55, -7.874, 0.704)
pt3dadd(8.953, 157.507, -7.876, 0.704)
pt3dadd(9.062, 157.462, -7.899, 0.712)
pt3dadd(9.148, 157.406, -7.964, 0.74)
pt3dadd(9.199, 157.367, -8.048, 0.804)
}
}
proc shape3d_52() {
apic[10] { pt3dadd(9.208, 157.328, -8.147, 0.874)
pt3dadd(9.217, 157.244, -8.227, 0.912)
pt3dadd(9.254, 157.148, -8.291, 0.978)
pt3dadd(9.355, 157.108, -8.342, 1.064)
pt3dadd(9.359, 157.098, -8.344, 1.064)
pt3dadd(9.476, 157.082, -8.382, 1.086)
pt3dadd(9.589, 157.068, -8.423, 1.106)
pt3dadd(9.681, 157.058, -8.494, 1.118)
pt3dadd(9.772, 157.048, -8.565, 1.13)
pt3dadd(9.862, 156.988, -8.624, 1.13)
pt3dadd(9.951, 156.926, -8.683, 1.13)
pt3dadd(10.023, 156.841, -8.734, 1.13)
pt3dadd(10.087, 156.742, -8.78, 1.13)
pt3dadd(10.153, 156.654, -8.838, 1.13)
pt3dadd(10.205, 156.558, -8.897, 1.13)
pt3dadd(10.257, 156.461, -8.956, 1.13)
pt3dadd(10.309, 156.365, -9.015, 1.13)
pt3dadd(10.355, 156.274, -9.079, 1.13)
pt3dadd(10.359, 156.21, -9.171, 1.13)
pt3dadd(10.363, 156.146, -9.263, 1.108)
pt3dadd(10.392, 156.101, -9.357, 1.072)
pt3dadd(10.478, 156.071, -9.426, 1.076)
pt3dadd(10.592, 156.024, -9.447, 1.11)
pt3dadd(10.707, 155.969, -9.449, 1.118)
pt3dadd(10.828, 155.938, -9.452, 1.054)
pt3dadd(10.952, 155.923, -9.455, 0.94)
pt3dadd(11.076, 155.914, -9.457, 0.814)
pt3dadd(11.2, 155.904, -9.46, 0.69)
pt3dadd(11.324, 155.894, -9.463, 0.618)
pt3dadd(11.447, 155.897, -9.466, 0.606)
pt3dadd(11.57, 155.904, -9.468, 0.61)
pt3dadd(11.692, 155.911, -9.471, 0.614)
pt3dadd(11.815, 155.92, -9.474, 0.618)
pt3dadd(11.938, 155.927, -9.476, 0.622)
pt3dadd(12.061, 155.934, -9.479, 0.626)
pt3dadd(12.176, 155.959, -9.493, 0.642)
pt3dadd(12.287, 155.998, -9.518, 0.67)
pt3dadd(12.398, 156.037, -9.542, 0.696)
pt3dadd(12.508, 156.077, -9.566, 0.724)
pt3dadd(12.618, 156.115, -9.59, 0.75)
pt3dadd(12.727, 156.162, -9.608, 0.762)
pt3dadd(12.836, 156.209, -9.625, 0.774)
pt3dadd(12.944, 156.256, -9.642, 0.784)
pt3dadd(13.053, 156.302, -9.658, 0.794)
pt3dadd(13.163, 156.341, -9.674, 0.802)
pt3dadd(13.286, 156.344, -9.682, 0.794)
pt3dadd(13.41, 156.348, -9.69, 0.786)
pt3dadd(13.533, 156.352, -9.698, 0.778)
pt3dadd(13.656, 156.355, -9.706, 0.768)
pt3dadd(13.778, 156.359, -9.715, 0.76)
pt3dadd(13.901, 156.361, -9.726, 0.75)
pt3dadd(14.019, 156.359, -9.761, 0.732)
pt3dadd(14.136, 156.358, -9.795, 0.712)
pt3dadd(14.254, 156.355, -9.829, 0.694)
pt3dadd(14.372, 156.353, -9.864, 0.674)
pt3dadd(14.488, 156.35, -9.898, 0.656)
pt3dadd(14.593, 156.365, -9.95, 0.648)
pt3dadd(14.697, 156.382, -10.005, 0.642)
pt3dadd(14.799, 156.4, -10.06, 0.636)
pt3dadd(14.901, 156.416, -10.115, 0.632)
pt3dadd(14.987, 156.425, -10.184, 0.632)
pt3dadd(15.047, 156.422, -10.275, 0.644)
pt3dadd(15.113, 156.436, -10.355, 0.656)
pt3dadd(15.192, 156.503, -10.402, 0.67)
pt3dadd(15.282, 156.565, -10.435, 0.678)
pt3dadd(15.382, 156.624, -10.455, 0.678)
pt3dadd(15.479, 156.69, -10.465, 0.678)
pt3dadd(15.57, 156.762, -10.468, 0.678)
pt3dadd(15.651, 156.842, -10.471, 0.686)
pt3dadd(15.72, 156.935, -10.474, 0.702)
pt3dadd(15.834, 156.972, -10.483, 0.708)
pt3dadd(15.947, 157.01, -10.492, 0.712)
pt3dadd(16.062, 157.048, -10.501, 0.718)
pt3dadd(16.176, 157.085, -10.51, 0.722)
pt3dadd(16.289, 157.122, -10.52, 0.728)
pt3dadd(16.41, 157.14, -10.534, 0.732)
pt3dadd(16.53, 157.154, -10.549, 0.736)
pt3dadd(16.65, 157.17, -10.564, 0.742)
pt3dadd(16.771, 157.184, -10.579, 0.746)
pt3dadd(16.891, 157.2, -10.594, 0.75)
pt3dadd(17.01, 157.222, -10.603, 0.75)
pt3dadd(17.128, 157.25, -10.606, 0.746)
pt3dadd(17.245, 157.28, -10.608, 0.742)
pt3dadd(17.363, 157.309, -10.611, 0.738)
pt3dadd(17.481, 157.338, -10.614, 0.732)
pt3dadd(17.598, 157.367, -10.617, 0.728)
pt3dadd(17.717, 157.384, -10.639, 0.724)
pt3dadd(17.836, 157.399, -10.661, 0.718)
pt3dadd(17.954, 157.416, -10.683, 0.714)
pt3dadd(18.073, 157.433, -10.706, 0.708)
pt3dadd(18.191, 157.448, -10.728, 0.704)
pt3dadd(18.302, 157.488, -10.752, 0.704)
pt3dadd(18.41, 157.531, -10.777, 0.704)
pt3dadd(18.519, 157.573, -10.801, 0.704)
pt3dadd(18.628, 157.616, -10.826, 0.704)
pt3dadd(18.723, 157.675, -10.844, 0.706)
pt3dadd(18.787, 157.769, -10.846, 0.718)
pt3dadd(18.856, 157.859, -10.851, 0.73)
pt3dadd(18.957, 157.918, -10.871, 0.742)
pt3dadd(19.061, 157.964, -10.892, 0.752)
pt3dadd(19.18, 157.955, -10.923, 0.742)
pt3dadd(19.299, 157.945, -10.953, 0.73)
pt3dadd(19.422, 157.934, -10.965, 0.728)
pt3dadd(19.546, 157.925, -10.972, 0.728)
pt3dadd(19.67, 157.915, -10.978, 0.728)
pt3dadd(19.773, 157.933, -11.028, 0.71)
pt3dadd(19.885, 157.945, -11.065, 0.698)
pt3dadd(20.004, 157.95, -11.091, 0.688)
pt3dadd(20.125, 157.956, -11.117, 0.678)
pt3dadd(20.244, 157.961, -11.142, 0.668)
pt3dadd(20.364, 157.967, -11.168, 0.66)
pt3dadd(20.482, 157.982, -11.189, 0.644)
pt3dadd(20.595, 158.02, -11.198, 0.614)
pt3dadd(20.71, 158.057, -11.207, 0.584)
pt3dadd(20.824, 158.094, -11.217, 0.554)
pt3dadd(20.938, 158.132, -11.226, 0.526)
pt3dadd(20.942, 158.122, -11.229, 0.526)
pt3dadd(21.055, 158.156, -11.245, 0.498)
pt3dadd(21.165, 158.183, -11.284, 0.476)
pt3dadd(21.275, 158.208, -11.323, 0.452)
pt3dadd(21.384, 158.233, -11.363, 0.43)
pt3dadd(21.495, 158.26, -11.402, 0.408)
pt3dadd(21.607, 158.29, -11.431, 0.41)
pt3dadd(21.72, 158.322, -11.455, 0.42)
pt3dadd(21.833, 158.354, -11.479, 0.43)
pt3dadd(21.946, 158.387, -11.502, 0.44)
pt3dadd(22.061, 158.419, -11.526, 0.452)
pt3dadd(22.167, 158.412, -11.579, 0.49)
pt3dadd(22.273, 158.402, -11.635, 0.528)
pt3dadd(22.379, 158.393, -11.69, 0.568)
pt3dadd(22.486, 158.383, -11.745, 0.608)
pt3dadd(22.592, 158.374, -11.8, 0.648)
pt3dadd(22.596, 158.364, -11.803, 0.648)
pt3dadd(22.693, 158.375, -11.864, 0.692)
pt3dadd(22.791, 158.388, -11.927, 0.736)
pt3dadd(22.887, 158.402, -11.989, 0.782)
pt3dadd(22.985, 158.417, -12.052, 0.826)
pt3dadd(23.088, 158.435, -12.104, 0.864)
pt3dadd(23.199, 158.459, -12.14, 0.89)
pt3dadd(23.298, 158.507, -12.17, 0.892)
pt3dadd(23.377, 158.587, -12.19, 0.866)
pt3dadd(23.457, 158.664, -12.22, 0.826)
pt3dadd(23.536, 158.737, -12.26, 0.768)
pt3dadd(23.564, 158.836, -12.286, 0.738)
pt3dadd(23.574, 158.944, -12.307, 0.718)
pt3dadd(23.599, 159.031, -12.341, 0.696)
pt3dadd(23.673, 159.049, -12.421, 0.67)
pt3dadd(23.765, 159.058, -12.477, 0.634)
pt3dadd(23.889, 159.048, -12.487, 0.568)
pt3dadd(24.013, 159.038, -12.495, 0.514)
pt3dadd(24.129, 159.029, -12.528, 0.502)
pt3dadd(24.195, 159.019, -12.613, 0.582)
pt3dadd(24.253, 159.008, -12.693, 0.63)
pt3dadd(24.373, 158.996, -12.721, 0.64)
pt3dadd(24.494, 158.984, -12.75, 0.648)
pt3dadd(24.613, 158.972, -12.778, 0.656)
pt3dadd(24.733, 158.96, -12.806, 0.666)
pt3dadd(24.853, 158.948, -12.835, 0.674)
pt3dadd(24.963, 158.906, -12.869, 0.662)
pt3dadd(25.067, 158.846, -12.908, 0.634)
pt3dadd(25.186, 158.821, -12.922, 0.614)
pt3dadd(25.31, 158.807, -12.929, 0.596)
pt3dadd(25.434, 158.792, -12.935, 0.578)
pt3dadd(25.548, 158.783, -12.976, 0.566)
pt3dadd(25.662, 158.772, -13.018, 0.556)
pt3dadd(25.749, 158.749, -13.088, 0.562)
pt3dadd(25.821, 158.719, -13.171, 0.574)
pt3dadd(25.909, 158.663, -13.23, 0.578)
pt3dadd(26.003, 158.599, -13.281, 0.578)
pt3dadd(26.097, 158.536, -13.333, 0.578)
pt3dadd(26.214, 158.502, -13.346, 0.562)
pt3dadd(26.337, 158.478, -13.349, 0.544)
pt3dadd(26.46, 158.455, -13.351, 0.52)
pt3dadd(26.583, 158.446, -13.354, 0.444)
pt3dadd(26.707, 158.436, -13.357, 0.37)
pt3dadd(26.831, 158.425, -13.359, 0.296)
pt3dadd(26.955, 158.417, -13.362, 0.248)
pt3dadd(27.078, 158.426, -13.365, 0.232)
pt3dadd(27.189, 158.466, -13.368, 0.278)
pt3dadd(27.278, 158.537, -13.383, 0.38)
pt3dadd(27.316, 158.593, -13.458, 0.442)
pt3dadd(27.324, 158.605, -13.559, 0.452)
pt3dadd(27.34, 158.598, -13.66, 0.452)
pt3dadd(27.379, 158.588, -13.759, 0.486)
pt3dadd(27.429, 158.579, -13.853, 0.562)
pt3dadd(27.457, 158.578, -13.953, 0.62)
pt3dadd(27.464, 158.615, -14.046, 0.598)
pt3dadd(27.433, 158.707, -14.087, 0.446)
pt3dadd(27.342, 158.764, -14.095, 0.306)
pt3dadd(27.229, 158.77, -14.097, 0.248)
}
apic[11] {pt3dclear()
pt3dadd(-14.286, 134.208, 15.351, 1.808)
pt3dadd(-14.357, 134.226, 15.365, 1.776)
pt3dadd(-14.47, 134.254, 15.389, 1.722)
pt3dadd(-14.583, 134.281, 15.412, 1.668)
pt3dadd(-14.696, 134.31, 15.435, 1.616)
pt3dadd(-14.81, 134.338, 15.459, 1.562)
pt3dadd(-14.923, 134.365, 15.482, 1.51)
pt3dadd(-15.036, 134.394, 15.505, 1.456)
pt3dadd(-15.151, 134.394, 15.525, 1.406)
pt3dadd(-15.267, 134.371, 15.542, 1.358)
}
}
proc shape3d_53() {
apic[11] { pt3dadd(-15.384, 134.35, 15.559, 1.312)
pt3dadd(-15.5, 134.328, 15.576, 1.264)
pt3dadd(-15.616, 134.306, 15.593, 1.216)
pt3dadd(-15.732, 134.284, 15.61, 1.168)
pt3dadd(-15.848, 134.262, 15.627, 1.122)
pt3dadd(-15.964, 134.24, 15.645, 1.074)
pt3dadd(-16.081, 134.218, 15.662, 1.026)
pt3dadd(-16.175, 134.149, 15.668, 0.994)
pt3dadd(-16.262, 134.068, 15.672, 0.968)
pt3dadd(-16.349, 133.986, 15.676, 0.942)
pt3dadd(-16.437, 133.903, 15.68, 0.914)
pt3dadd(-16.524, 133.822, 15.684, 0.888)
pt3dadd(-16.612, 133.739, 15.688, 0.86)
pt3dadd(-16.699, 133.657, 15.692, 0.834)
pt3dadd(-16.786, 133.576, 15.696, 0.808)
pt3dadd(-16.874, 133.493, 15.7, 0.78)
pt3dadd(-16.961, 133.411, 15.704, 0.754)
pt3dadd(-17.048, 133.328, 15.709, 0.732)
pt3dadd(-17.135, 133.246, 15.715, 0.712)
pt3dadd(-17.222, 133.163, 15.72, 0.694)
pt3dadd(-17.309, 133.081, 15.726, 0.674)
pt3dadd(-17.395, 132.998, 15.732, 0.654)
pt3dadd(-17.482, 132.916, 15.738, 0.634)
pt3dadd(-17.569, 132.833, 15.743, 0.614)
pt3dadd(-17.656, 132.751, 15.749, 0.594)
pt3dadd(-17.743, 132.668, 15.755, 0.574)
pt3dadd(-17.83, 132.586, 15.761, 0.556)
pt3dadd(-17.92, 132.508, 15.769, 0.556)
pt3dadd(-18.012, 132.431, 15.777, 0.56)
pt3dadd(-18.104, 132.354, 15.786, 0.566)
pt3dadd(-18.196, 132.278, 15.794, 0.572)
pt3dadd(-18.288, 132.202, 15.803, 0.578)
pt3dadd(-18.379, 132.125, 15.811, 0.584)
pt3dadd(-18.471, 132.048, 15.82, 0.59)
pt3dadd(-18.563, 131.971, 15.828, 0.594)
pt3dadd(-18.655, 131.894, 15.837, 0.6)
pt3dadd(-18.746, 131.818, 15.845, 0.606)
pt3dadd(-18.839, 131.744, 15.861, 0.628)
pt3dadd(-18.933, 131.672, 15.878, 0.656)
pt3dadd(-19.026, 131.599, 15.895, 0.682)
pt3dadd(-19.119, 131.526, 15.912, 0.708)
pt3dadd(-19.212, 131.454, 15.929, 0.734)
pt3dadd(-19.305, 131.381, 15.946, 0.76)
pt3dadd(-19.399, 131.308, 15.963, 0.788)
pt3dadd(-19.492, 131.236, 15.98, 0.814)
pt3dadd(-19.585, 131.162, 15.997, 0.84)
pt3dadd(-19.678, 131.089, 16.014, 0.866)
pt3dadd(-19.745, 131.003, 16.053, 0.85)
pt3dadd(-19.811, 130.914, 16.093, 0.832)
pt3dadd(-19.876, 130.826, 16.133, 0.812)
pt3dadd(-19.942, 130.738, 16.173, 0.794)
pt3dadd(-20.007, 130.65, 16.213, 0.774)
pt3dadd(-20.073, 130.561, 16.253, 0.756)
pt3dadd(-20.139, 130.474, 16.294, 0.736)
pt3dadd(-20.204, 130.385, 16.334, 0.718)
pt3dadd(-20.27, 130.297, 16.374, 0.698)
pt3dadd(-20.335, 130.208, 16.414, 0.68)
pt3dadd(-20.404, 130.115, 16.439, 0.71)
pt3dadd(-20.474, 130.021, 16.462, 0.746)
pt3dadd(-20.543, 129.928, 16.486, 0.78)
pt3dadd(-20.612, 129.834, 16.51, 0.814)
pt3dadd(-20.682, 129.74, 16.533, 0.848)
pt3dadd(-20.751, 129.647, 16.557, 0.882)
pt3dadd(-20.821, 129.553, 16.58, 0.916)
pt3dadd(-20.89, 129.458, 16.604, 0.952)
pt3dadd(-20.959, 129.365, 16.627, 0.986)
pt3dadd(-21.029, 129.271, 16.651, 1.02)
pt3dadd(-21.098, 129.175, 16.667, 1.01)
pt3dadd(-21.167, 129.079, 16.683, 1)
pt3dadd(-21.236, 128.982, 16.698, 0.988)
pt3dadd(-21.305, 128.886, 16.714, 0.976)
pt3dadd(-21.374, 128.79, 16.73, 0.966)
pt3dadd(-21.443, 128.694, 16.745, 0.954)
pt3dadd(-21.512, 128.597, 16.761, 0.944)
pt3dadd(-21.581, 128.501, 16.777, 0.932)
pt3dadd(-21.65, 128.405, 16.792, 0.922)
pt3dadd(-21.719, 128.309, 16.808, 0.91)
pt3dadd(-21.784, 128.208, 16.819, 0.908)
pt3dadd(-21.848, 128.107, 16.83, 0.906)
pt3dadd(-21.912, 128.006, 16.84, 0.904)
pt3dadd(-21.977, 127.907, 16.851, 0.902)
pt3dadd(-22.041, 127.806, 16.862, 0.9)
pt3dadd(-22.105, 127.705, 16.873, 0.898)
pt3dadd(-22.169, 127.604, 16.883, 0.896)
pt3dadd(-22.234, 127.505, 16.894, 0.894)
pt3dadd(-22.298, 127.404, 16.905, 0.892)
pt3dadd(-22.362, 127.303, 16.916, 0.89)
pt3dadd(-22.413, 127.195, 16.924, 0.95)
pt3dadd(-22.464, 127.087, 16.932, 1.012)
pt3dadd(-22.515, 126.979, 16.94, 1.072)
pt3dadd(-22.566, 126.87, 16.948, 1.134)
pt3dadd(-22.617, 126.762, 16.956, 1.196)
pt3dadd(-22.667, 126.654, 16.964, 1.256)
pt3dadd(-22.718, 126.546, 16.972, 1.318)
pt3dadd(-22.769, 126.437, 16.98, 1.38)
pt3dadd(-22.82, 126.329, 16.988, 1.44)
pt3dadd(-22.871, 126.221, 16.997, 1.502)
pt3dadd(-22.906, 126.107, 17.011, 1.398)
pt3dadd(-22.94, 125.994, 17.025, 1.292)
pt3dadd(-22.975, 125.88, 17.04, 1.188)
pt3dadd(-23.01, 125.767, 17.054, 1.082)
pt3dadd(-23.045, 125.653, 17.069, 0.978)
pt3dadd(-23.08, 125.539, 17.083, 0.872)
pt3dadd(-23.114, 125.426, 17.098, 0.768)
pt3dadd(-23.149, 125.312, 17.112, 0.662)
pt3dadd(-23.184, 125.2, 17.126, 0.558)
pt3dadd(-23.219, 125.086, 17.141, 0.452)
}
apic[12] {pt3dclear()
pt3dadd(-23.219, 125.086, 17.141, 0.452)
pt3dadd(-23.262, 125.035, 17.173, 0.438)
pt3dadd(-23.33, 124.957, 17.223, 0.416)
pt3dadd(-23.398, 124.879, 17.273, 0.394)
pt3dadd(-23.466, 124.8, 17.323, 0.372)
pt3dadd(-23.532, 124.717, 17.371, 0.354)
pt3dadd(-23.596, 124.632, 17.416, 0.34)
pt3dadd(-23.66, 124.547, 17.462, 0.326)
pt3dadd(-23.724, 124.462, 17.508, 0.312)
pt3dadd(-23.789, 124.376, 17.554, 0.3)
pt3dadd(-23.853, 124.291, 17.599, 0.286)
pt3dadd(-23.917, 124.206, 17.645, 0.272)
pt3dadd(-23.981, 124.121, 17.691, 0.258)
pt3dadd(-24.045, 124.036, 17.737, 0.244)
pt3dadd(-24.109, 123.95, 17.782, 0.23)
pt3dadd(-24.173, 123.86, 17.82, 0.236)
pt3dadd(-24.237, 123.767, 17.853, 0.252)
pt3dadd(-24.301, 123.673, 17.887, 0.266)
pt3dadd(-24.365, 123.58, 17.92, 0.282)
pt3dadd(-24.429, 123.486, 17.953, 0.298)
pt3dadd(-24.492, 123.392, 17.986, 0.312)
pt3dadd(-24.556, 123.299, 18.019, 0.328)
pt3dadd(-24.62, 123.205, 18.053, 0.344)
pt3dadd(-24.684, 123.112, 18.086, 0.358)
pt3dadd(-24.748, 123.018, 18.119, 0.374)
pt3dadd(-24.817, 122.928, 18.151, 0.392)
pt3dadd(-24.888, 122.84, 18.183, 0.412)
pt3dadd(-24.96, 122.752, 18.215, 0.43)
pt3dadd(-25.031, 122.663, 18.246, 0.45)
pt3dadd(-25.102, 122.574, 18.278, 0.47)
pt3dadd(-25.174, 122.485, 18.309, 0.488)
pt3dadd(-25.245, 122.396, 18.341, 0.508)
pt3dadd(-25.317, 122.308, 18.373, 0.528)
pt3dadd(-25.388, 122.22, 18.404, 0.546)
pt3dadd(-25.46, 122.131, 18.436, 0.566)
pt3dadd(-25.527, 122.048, 18.482, 0.542)
pt3dadd(-25.594, 121.968, 18.531, 0.508)
pt3dadd(-25.661, 121.888, 18.58, 0.474)
pt3dadd(-25.728, 121.808, 18.629, 0.44)
pt3dadd(-25.795, 121.728, 18.678, 0.404)
pt3dadd(-25.862, 121.648, 18.727, 0.37)
pt3dadd(-25.929, 121.567, 18.777, 0.336)
pt3dadd(-25.996, 121.487, 18.826, 0.3)
pt3dadd(-26.063, 121.406, 18.875, 0.266)
pt3dadd(-26.13, 121.326, 18.924, 0.232)
pt3dadd(-26.206, 121.246, 18.961, 0.228)
pt3dadd(-26.284, 121.165, 18.996, 0.232)
pt3dadd(-26.363, 121.084, 19.031, 0.236)
pt3dadd(-26.441, 121.003, 19.066, 0.24)
pt3dadd(-26.519, 120.923, 19.1, 0.244)
pt3dadd(-26.598, 120.842, 19.135, 0.246)
pt3dadd(-26.676, 120.761, 19.17, 0.25)
pt3dadd(-26.754, 120.68, 19.205, 0.254)
pt3dadd(-26.833, 120.6, 19.24, 0.258)
pt3dadd(-26.911, 120.518, 19.275, 0.262)
pt3dadd(-26.985, 120.436, 19.31, 0.284)
pt3dadd(-27.06, 120.35, 19.346, 0.31)
pt3dadd(-27.133, 120.266, 19.382, 0.336)
pt3dadd(-27.207, 120.182, 19.417, 0.362)
pt3dadd(-27.281, 120.098, 19.453, 0.388)
pt3dadd(-27.355, 120.014, 19.488, 0.414)
pt3dadd(-27.429, 119.93, 19.524, 0.44)
pt3dadd(-27.503, 119.845, 19.56, 0.466)
pt3dadd(-27.577, 119.761, 19.595, 0.492)
pt3dadd(-27.651, 119.678, 19.632, 0.52)
pt3dadd(-27.746, 119.636, 19.683, 0.558)
pt3dadd(-27.84, 119.595, 19.735, 0.594)
pt3dadd(-27.933, 119.554, 19.787, 0.632)
pt3dadd(-28.027, 119.512, 19.838, 0.67)
pt3dadd(-28.121, 119.471, 19.89, 0.708)
pt3dadd(-28.215, 119.429, 19.942, 0.746)
pt3dadd(-28.309, 119.388, 19.993, 0.784)
pt3dadd(-28.403, 119.346, 20.045, 0.822)
pt3dadd(-28.497, 119.305, 20.097, 0.86)
pt3dadd(-28.592, 119.265, 20.148, 0.894)
pt3dadd(-28.7, 119.257, 20.192, 0.874)
pt3dadd(-28.808, 119.249, 20.235, 0.854)
pt3dadd(-28.915, 119.241, 20.278, 0.834)
pt3dadd(-29.023, 119.232, 20.322, 0.814)
pt3dadd(-29.131, 119.224, 20.365, 0.794)
pt3dadd(-29.239, 119.216, 20.408, 0.774)
pt3dadd(-29.347, 119.208, 20.452, 0.754)
pt3dadd(-29.455, 119.199, 20.495, 0.734)
pt3dadd(-29.562, 119.191, 20.538, 0.714)
pt3dadd(-29.67, 119.183, 20.582, 0.694)
pt3dadd(-29.77, 119.189, 20.637, 0.678)
pt3dadd(-29.871, 119.194, 20.692, 0.66)
pt3dadd(-29.971, 119.2, 20.746, 0.644)
pt3dadd(-30.072, 119.205, 20.801, 0.626)
pt3dadd(-30.172, 119.21, 20.855, 0.608)
pt3dadd(-30.272, 119.216, 20.91, 0.592)
pt3dadd(-30.373, 119.221, 20.964, 0.574)
pt3dadd(-30.473, 119.227, 21.019, 0.558)
}
}
proc shape3d_54() {
apic[12] { pt3dadd(-30.573, 119.232, 21.074, 0.54)
pt3dadd(-30.674, 119.238, 21.128, 0.522)
pt3dadd(-30.775, 119.26, 21.179, 0.506)
pt3dadd(-30.876, 119.281, 21.229, 0.488)
pt3dadd(-30.978, 119.303, 21.28, 0.47)
pt3dadd(-31.079, 119.324, 21.33, 0.452)
pt3dadd(-31.18, 119.346, 21.381, 0.434)
pt3dadd(-31.281, 119.367, 21.432, 0.416)
pt3dadd(-31.383, 119.388, 21.483, 0.398)
pt3dadd(-31.484, 119.41, 21.533, 0.38)
pt3dadd(-31.585, 119.431, 21.584, 0.362)
pt3dadd(-31.686, 119.453, 21.635, 0.346)
pt3dadd(-31.783, 119.474, 21.69, 0.34)
pt3dadd(-31.881, 119.496, 21.746, 0.334)
pt3dadd(-31.978, 119.518, 21.801, 0.328)
pt3dadd(-32.076, 119.54, 21.856, 0.322)
pt3dadd(-32.174, 119.562, 21.912, 0.316)
pt3dadd(-32.271, 119.583, 21.967, 0.31)
pt3dadd(-32.369, 119.605, 22.022, 0.304)
pt3dadd(-32.466, 119.627, 22.078, 0.298)
pt3dadd(-32.564, 119.649, 22.133, 0.294)
pt3dadd(-32.657, 119.663, 22.193, 0.294)
pt3dadd(-32.741, 119.659, 22.265, 0.312)
pt3dadd(-32.824, 119.655, 22.336, 0.33)
pt3dadd(-32.908, 119.651, 22.408, 0.348)
pt3dadd(-32.991, 119.647, 22.48, 0.368)
pt3dadd(-33.075, 119.643, 22.552, 0.386)
pt3dadd(-33.159, 119.639, 22.623, 0.404)
pt3dadd(-33.242, 119.635, 22.695, 0.422)
pt3dadd(-33.326, 119.631, 22.767, 0.44)
pt3dadd(-33.409, 119.627, 22.838, 0.458)
pt3dadd(-33.474, 119.599, 22.914, 0.476)
pt3dadd(-33.516, 119.542, 22.995, 0.494)
pt3dadd(-33.559, 119.484, 23.075, 0.512)
pt3dadd(-33.601, 119.427, 23.156, 0.53)
pt3dadd(-33.644, 119.37, 23.236, 0.548)
pt3dadd(-33.686, 119.313, 23.317, 0.566)
pt3dadd(-33.728, 119.256, 23.397, 0.584)
pt3dadd(-33.771, 119.198, 23.478, 0.602)
pt3dadd(-33.813, 119.141, 23.558, 0.62)
pt3dadd(-33.855, 119.084, 23.639, 0.638)
pt3dadd(-33.887, 119.018, 23.717, 0.654)
pt3dadd(-33.907, 118.942, 23.793, 0.67)
pt3dadd(-33.926, 118.866, 23.868, 0.686)
pt3dadd(-33.946, 118.79, 23.944, 0.702)
pt3dadd(-33.965, 118.714, 24.019, 0.716)
pt3dadd(-33.985, 118.638, 24.095, 0.732)
pt3dadd(-34.004, 118.561, 24.17, 0.748)
pt3dadd(-34.024, 118.485, 24.246, 0.764)
pt3dadd(-34.043, 118.409, 24.322, 0.778)
pt3dadd(-34.062, 118.333, 24.397, 0.794)
pt3dadd(-34.079, 118.254, 24.471, 0.804)
pt3dadd(-34.092, 118.173, 24.544, 0.81)
pt3dadd(-34.105, 118.092, 24.617, 0.816)
pt3dadd(-34.118, 118.01, 24.689, 0.822)
pt3dadd(-34.131, 117.929, 24.762, 0.826)
pt3dadd(-34.144, 117.847, 24.835, 0.832)
pt3dadd(-34.157, 117.766, 24.907, 0.838)
pt3dadd(-34.17, 117.685, 24.98, 0.844)
pt3dadd(-34.184, 117.603, 25.053, 0.848)
pt3dadd(-34.197, 117.522, 25.125, 0.854)
pt3dadd(-34.208, 117.438, 25.197, 0.85)
pt3dadd(-34.218, 117.353, 25.266, 0.834)
pt3dadd(-34.228, 117.267, 25.336, 0.82)
pt3dadd(-34.238, 117.182, 25.406, 0.804)
pt3dadd(-34.248, 117.096, 25.475, 0.788)
pt3dadd(-34.257, 117.011, 25.545, 0.774)
pt3dadd(-34.267, 116.925, 25.615, 0.758)
pt3dadd(-34.277, 116.84, 25.684, 0.744)
pt3dadd(-34.287, 116.754, 25.754, 0.728)
pt3dadd(-34.297, 116.669, 25.824, 0.714)
pt3dadd(-34.311, 116.583, 25.892, 0.706)
pt3dadd(-34.33, 116.497, 25.96, 0.702)
pt3dadd(-34.348, 116.411, 26.028, 0.7)
pt3dadd(-34.366, 116.325, 26.096, 0.696)
pt3dadd(-34.385, 116.238, 26.164, 0.694)
pt3dadd(-34.403, 116.152, 26.232, 0.69)
pt3dadd(-34.422, 116.066, 26.3, 0.688)
pt3dadd(-34.44, 115.98, 26.367, 0.686)
pt3dadd(-34.458, 115.893, 26.435, 0.682)
pt3dadd(-34.477, 115.807, 26.503, 0.68)
pt3dadd(-34.509, 115.723, 26.568, 0.678)
pt3dadd(-34.553, 115.641, 26.631, 0.678)
pt3dadd(-34.598, 115.558, 26.693, 0.678)
pt3dadd(-34.642, 115.476, 26.756, 0.678)
pt3dadd(-34.686, 115.393, 26.818, 0.678)
pt3dadd(-34.731, 115.311, 26.881, 0.678)
pt3dadd(-34.775, 115.228, 26.944, 0.678)
pt3dadd(-34.82, 115.146, 27.006, 0.678)
pt3dadd(-34.864, 115.063, 27.069, 0.678)
pt3dadd(-34.908, 114.981, 27.131, 0.678)
pt3dadd(-34.982, 114.906, 27.177, 0.678)
pt3dadd(-35.062, 114.833, 27.22, 0.678)
pt3dadd(-35.142, 114.759, 27.262, 0.678)
pt3dadd(-35.222, 114.686, 27.305, 0.678)
pt3dadd(-35.302, 114.613, 27.347, 0.678)
pt3dadd(-35.382, 114.539, 27.39, 0.678)
pt3dadd(-35.463, 114.466, 27.433, 0.678)
pt3dadd(-35.543, 114.393, 27.475, 0.678)
pt3dadd(-35.623, 114.319, 27.518, 0.678)
pt3dadd(-35.703, 114.246, 27.56, 0.678)
pt3dadd(-35.786, 114.172, 27.597, 0.682)
pt3dadd(-35.871, 114.098, 27.633, 0.688)
pt3dadd(-35.955, 114.024, 27.668, 0.694)
pt3dadd(-36.039, 113.95, 27.704, 0.698)
pt3dadd(-36.123, 113.876, 27.74, 0.704)
pt3dadd(-36.207, 113.802, 27.776, 0.71)
pt3dadd(-36.291, 113.728, 27.812, 0.714)
pt3dadd(-36.375, 113.654, 27.847, 0.72)
pt3dadd(-36.459, 113.58, 27.883, 0.724)
pt3dadd(-36.543, 113.506, 27.92, 0.73)
pt3dadd(-36.611, 113.436, 27.978, 0.732)
pt3dadd(-36.679, 113.365, 28.036, 0.736)
pt3dadd(-36.746, 113.295, 28.094, 0.738)
pt3dadd(-36.814, 113.225, 28.152, 0.74)
pt3dadd(-36.882, 113.154, 28.21, 0.744)
pt3dadd(-36.95, 113.084, 28.268, 0.746)
pt3dadd(-37.018, 113.014, 28.327, 0.748)
pt3dadd(-37.086, 112.944, 28.385, 0.752)
pt3dadd(-37.153, 112.873, 28.443, 0.754)
pt3dadd(-37.221, 112.802, 28.5, 0.752)
pt3dadd(-37.281, 112.718, 28.55, 0.702)
pt3dadd(-37.342, 112.633, 28.6, 0.65)
pt3dadd(-37.403, 112.548, 28.649, 0.6)
pt3dadd(-37.464, 112.464, 28.699, 0.548)
pt3dadd(-37.524, 112.379, 28.749, 0.496)
pt3dadd(-37.585, 112.295, 28.799, 0.446)
pt3dadd(-37.646, 112.21, 28.849, 0.394)
pt3dadd(-37.706, 112.126, 28.898, 0.342)
pt3dadd(-37.767, 112.041, 28.948, 0.292)
pt3dadd(-37.824, 111.957, 29, 0.25)
pt3dadd(-37.853, 111.87, 29.065, 0.268)
pt3dadd(-37.883, 111.784, 29.13, 0.286)
pt3dadd(-37.912, 111.698, 29.195, 0.304)
pt3dadd(-37.942, 111.611, 29.26, 0.324)
pt3dadd(-37.972, 111.525, 29.325, 0.342)
pt3dadd(-38.001, 111.439, 29.39, 0.36)
pt3dadd(-38.031, 111.353, 29.455, 0.378)
pt3dadd(-38.06, 111.266, 29.52, 0.398)
pt3dadd(-38.09, 111.18, 29.585, 0.416)
pt3dadd(-38.118, 111.096, 29.652, 0.434)
pt3dadd(-38.136, 111.024, 29.73, 0.454)
pt3dadd(-38.155, 110.952, 29.809, 0.474)
pt3dadd(-38.173, 110.881, 29.888, 0.494)
pt3dadd(-38.192, 110.809, 29.967, 0.514)
pt3dadd(-38.21, 110.737, 30.045, 0.534)
pt3dadd(-38.228, 110.665, 30.124, 0.554)
pt3dadd(-38.247, 110.594, 30.203, 0.574)
pt3dadd(-38.265, 110.522, 30.281, 0.594)
pt3dadd(-38.283, 110.45, 30.36, 0.614)
pt3dadd(-38.3, 110.376, 30.437, 0.626)
pt3dadd(-38.309, 110.291, 30.507, 0.598)
pt3dadd(-38.319, 110.206, 30.577, 0.568)
pt3dadd(-38.328, 110.121, 30.647, 0.538)
pt3dadd(-38.337, 110.036, 30.717, 0.508)
pt3dadd(-38.346, 109.95, 30.787, 0.478)
pt3dadd(-38.355, 109.865, 30.858, 0.45)
pt3dadd(-38.364, 109.78, 30.927, 0.42)
pt3dadd(-38.373, 109.695, 30.998, 0.39)
pt3dadd(-38.382, 109.61, 31.068, 0.36)
pt3dadd(-38.391, 109.525, 31.138, 0.334)
pt3dadd(-38.403, 109.44, 31.208, 0.324)
pt3dadd(-38.415, 109.356, 31.278, 0.312)
pt3dadd(-38.427, 109.271, 31.349, 0.302)
pt3dadd(-38.438, 109.187, 31.419, 0.29)
pt3dadd(-38.45, 109.102, 31.49, 0.28)
pt3dadd(-38.462, 109.018, 31.56, 0.268)
pt3dadd(-38.473, 108.933, 31.63, 0.256)
pt3dadd(-38.485, 108.849, 31.701, 0.246)
pt3dadd(-38.497, 108.765, 31.771, 0.234)
pt3dadd(-38.511, 108.684, 31.844, 0.234)
pt3dadd(-38.532, 108.615, 31.923, 0.27)
pt3dadd(-38.554, 108.546, 32.003, 0.306)
pt3dadd(-38.576, 108.477, 32.083, 0.342)
pt3dadd(-38.598, 108.408, 32.163, 0.38)
pt3dadd(-38.619, 108.339, 32.243, 0.416)
pt3dadd(-38.641, 108.271, 32.323, 0.452)
pt3dadd(-38.663, 108.202, 32.403, 0.488)
pt3dadd(-38.684, 108.133, 32.483, 0.524)
pt3dadd(-38.706, 108.064, 32.563, 0.562)
pt3dadd(-38.736, 108.002, 32.644, 0.594)
pt3dadd(-38.783, 107.957, 32.727, 0.616)
pt3dadd(-38.83, 107.911, 32.811, 0.64)
pt3dadd(-38.877, 107.865, 32.895, 0.664)
pt3dadd(-38.924, 107.819, 32.978, 0.686)
pt3dadd(-38.971, 107.773, 33.062, 0.71)
pt3dadd(-39.018, 107.728, 33.146, 0.732)
pt3dadd(-39.066, 107.682, 33.229, 0.756)
pt3dadd(-39.113, 107.636, 33.313, 0.78)
pt3dadd(-39.16, 107.59, 33.397, 0.802)
pt3dadd(-39.22, 107.548, 33.474, 0.806)
pt3dadd(-39.294, 107.508, 33.546, 0.794)
pt3dadd(-39.369, 107.469, 33.617, 0.78)
pt3dadd(-39.443, 107.429, 33.689, 0.766)
pt3dadd(-39.517, 107.39, 33.76, 0.752)
pt3dadd(-39.591, 107.351, 33.832, 0.738)
pt3dadd(-39.665, 107.311, 33.903, 0.724)
pt3dadd(-39.739, 107.272, 33.975, 0.71)
pt3dadd(-39.813, 107.232, 34.046, 0.696)
pt3dadd(-39.887, 107.193, 34.118, 0.682)
}
}
proc shape3d_55() {
apic[12] { pt3dadd(-39.972, 107.14, 34.171, 0.678)
pt3dadd(-40.061, 107.082, 34.216, 0.676)
pt3dadd(-40.151, 107.023, 34.262, 0.674)
pt3dadd(-40.24, 106.965, 34.307, 0.674)
pt3dadd(-40.33, 106.907, 34.353, 0.672)
pt3dadd(-40.42, 106.848, 34.398, 0.67)
pt3dadd(-40.509, 106.79, 34.443, 0.67)
pt3dadd(-40.599, 106.731, 34.489, 0.668)
pt3dadd(-40.688, 106.673, 34.534, 0.666)
pt3dadd(-40.778, 106.614, 34.579, 0.666)
pt3dadd(-40.862, 106.555, 34.631, 0.65)
pt3dadd(-40.943, 106.496, 34.685, 0.628)
pt3dadd(-41.025, 106.436, 34.739, 0.606)
pt3dadd(-41.106, 106.377, 34.793, 0.584)
pt3dadd(-41.188, 106.317, 34.847, 0.562)
pt3dadd(-41.269, 106.257, 34.901, 0.542)
pt3dadd(-41.351, 106.198, 34.955, 0.52)
pt3dadd(-41.432, 106.138, 35.009, 0.498)
pt3dadd(-41.514, 106.079, 35.063, 0.476)
pt3dadd(-41.595, 106.019, 35.118, 0.454)
pt3dadd(-41.683, 105.948, 35.145, 0.434)
pt3dadd(-41.774, 105.872, 35.163, 0.416)
pt3dadd(-41.864, 105.796, 35.181, 0.396)
pt3dadd(-41.954, 105.72, 35.199, 0.376)
pt3dadd(-42.045, 105.644, 35.217, 0.358)
pt3dadd(-42.135, 105.568, 35.235, 0.338)
pt3dadd(-42.225, 105.492, 35.253, 0.318)
pt3dadd(-42.315, 105.416, 35.271, 0.3)
pt3dadd(-42.406, 105.34, 35.289, 0.28)
pt3dadd(-42.496, 105.264, 35.306, 0.262)
pt3dadd(-42.59, 105.19, 35.313, 0.264)
pt3dadd(-42.686, 105.118, 35.316, 0.276)
pt3dadd(-42.782, 105.045, 35.319, 0.288)
pt3dadd(-42.877, 104.973, 35.322, 0.3)
pt3dadd(-42.973, 104.901, 35.325, 0.312)
pt3dadd(-43.068, 104.828, 35.327, 0.322)
pt3dadd(-43.164, 104.756, 35.33, 0.334)
pt3dadd(-43.26, 104.683, 35.333, 0.346)
pt3dadd(-43.355, 104.611, 35.336, 0.358)
pt3dadd(-43.451, 104.538, 35.339, 0.37)
pt3dadd(-43.553, 104.478, 35.325, 0.386)
pt3dadd(-43.656, 104.423, 35.306, 0.404)
pt3dadd(-43.76, 104.367, 35.287, 0.422)
pt3dadd(-43.864, 104.311, 35.268, 0.438)
pt3dadd(-43.968, 104.255, 35.249, 0.456)
pt3dadd(-44.071, 104.199, 35.23, 0.474)
pt3dadd(-44.175, 104.143, 35.211, 0.492)
pt3dadd(-44.279, 104.087, 35.192, 0.508)
pt3dadd(-44.382, 104.031, 35.174, 0.526)
pt3dadd(-44.486, 103.975, 35.155, 0.544)
pt3dadd(-44.594, 103.939, 35.123, 0.558)
pt3dadd(-44.702, 103.902, 35.092, 0.57)
pt3dadd(-44.81, 103.866, 35.06, 0.584)
pt3dadd(-44.918, 103.83, 35.029, 0.598)
pt3dadd(-45.026, 103.793, 34.997, 0.612)
pt3dadd(-45.134, 103.757, 34.966, 0.624)
pt3dadd(-45.242, 103.721, 34.934, 0.638)
pt3dadd(-45.35, 103.684, 34.903, 0.652)
pt3dadd(-45.458, 103.648, 34.871, 0.664)
pt3dadd(-45.566, 103.612, 34.84, 0.678)
pt3dadd(-45.681, 103.592, 34.819, 0.678)
pt3dadd(-45.797, 103.572, 34.797, 0.678)
pt3dadd(-45.912, 103.552, 34.776, 0.678)
pt3dadd(-46.028, 103.532, 34.755, 0.678)
pt3dadd(-46.143, 103.511, 34.733, 0.678)
pt3dadd(-46.259, 103.491, 34.712, 0.678)
pt3dadd(-46.374, 103.471, 34.691, 0.678)
pt3dadd(-46.49, 103.451, 34.67, 0.678)
pt3dadd(-46.605, 103.431, 34.648, 0.678)
pt3dadd(-46.721, 103.411, 34.628, 0.678)
pt3dadd(-46.84, 103.399, 34.623, 0.698)
pt3dadd(-46.959, 103.387, 34.618, 0.716)
pt3dadd(-47.079, 103.375, 34.613, 0.736)
pt3dadd(-47.198, 103.362, 34.608, 0.754)
pt3dadd(-47.317, 103.35, 34.604, 0.774)
pt3dadd(-47.436, 103.338, 34.599, 0.792)
pt3dadd(-47.556, 103.326, 34.594, 0.812)
pt3dadd(-47.675, 103.314, 34.589, 0.83)
pt3dadd(-47.794, 103.302, 34.584, 0.848)
pt3dadd(-47.913, 103.289, 34.58, 0.868)
pt3dadd(-48.027, 103.253, 34.587, 0.886)
pt3dadd(-48.142, 103.217, 34.594, 0.904)
pt3dadd(-48.256, 103.182, 34.601, 0.922)
pt3dadd(-48.37, 103.146, 34.608, 0.942)
pt3dadd(-48.484, 103.11, 34.615, 0.96)
pt3dadd(-48.598, 103.074, 34.622, 0.978)
pt3dadd(-48.713, 103.038, 34.629, 0.996)
pt3dadd(-48.827, 103.002, 34.636, 1.014)
pt3dadd(-48.941, 102.966, 34.643, 1.032)
pt3dadd(-49.055, 102.931, 34.651, 1.046)
pt3dadd(-49.168, 102.902, 34.675, 1.014)
pt3dadd(-49.281, 102.873, 34.699, 0.982)
pt3dadd(-49.393, 102.843, 34.723, 0.952)
pt3dadd(-49.506, 102.814, 34.747, 0.92)
pt3dadd(-49.619, 102.785, 34.771, 0.888)
pt3dadd(-49.732, 102.756, 34.794, 0.856)
pt3dadd(-49.845, 102.726, 34.818, 0.824)
pt3dadd(-49.958, 102.697, 34.842, 0.792)
pt3dadd(-50.07, 102.668, 34.866, 0.76)
pt3dadd(-50.183, 102.642, 34.891, 0.724)
pt3dadd(-50.297, 102.63, 34.922, 0.674)
pt3dadd(-50.411, 102.617, 34.952, 0.622)
pt3dadd(-50.524, 102.605, 34.982, 0.57)
pt3dadd(-50.638, 102.592, 35.012, 0.52)
pt3dadd(-50.752, 102.579, 35.042, 0.468)
pt3dadd(-50.865, 102.567, 35.073, 0.416)
pt3dadd(-50.979, 102.554, 35.103, 0.366)
pt3dadd(-51.093, 102.541, 35.133, 0.314)
pt3dadd(-51.207, 102.529, 35.163, 0.262)
pt3dadd(-51.321, 102.522, 35.19, 0.226)
pt3dadd(-51.44, 102.529, 35.206, 0.228)
pt3dadd(-51.558, 102.537, 35.223, 0.23)
pt3dadd(-51.676, 102.544, 35.239, 0.232)
pt3dadd(-51.794, 102.552, 35.256, 0.234)
pt3dadd(-51.912, 102.56, 35.272, 0.236)
pt3dadd(-52.03, 102.567, 35.289, 0.238)
pt3dadd(-52.148, 102.575, 35.306, 0.24)
pt3dadd(-52.266, 102.582, 35.322, 0.242)
pt3dadd(-52.384, 102.59, 35.339, 0.242)
pt3dadd(-52.499, 102.612, 35.349, 0.25)
pt3dadd(-52.609, 102.661, 35.35, 0.268)
pt3dadd(-52.719, 102.71, 35.351, 0.286)
pt3dadd(-52.828, 102.759, 35.352, 0.304)
pt3dadd(-52.938, 102.808, 35.353, 0.322)
pt3dadd(-53.047, 102.857, 35.354, 0.34)
pt3dadd(-53.157, 102.906, 35.355, 0.358)
pt3dadd(-53.267, 102.954, 35.356, 0.376)
pt3dadd(-53.376, 103.003, 35.356, 0.394)
pt3dadd(-53.486, 103.052, 35.357, 0.412)
pt3dadd(-53.595, 103.098, 35.347, 0.418)
pt3dadd(-53.703, 103.137, 35.319, 0.406)
pt3dadd(-53.811, 103.177, 35.29, 0.394)
pt3dadd(-53.919, 103.216, 35.262, 0.382)
pt3dadd(-54.027, 103.256, 35.233, 0.37)
pt3dadd(-54.135, 103.295, 35.205, 0.358)
pt3dadd(-54.243, 103.335, 35.176, 0.346)
pt3dadd(-54.351, 103.374, 35.147, 0.334)
pt3dadd(-54.459, 103.414, 35.119, 0.322)
pt3dadd(-54.567, 103.453, 35.09, 0.31)
pt3dadd(-54.676, 103.491, 35.063, 0.3)
pt3dadd(-54.787, 103.526, 35.038, 0.292)
pt3dadd(-54.897, 103.561, 35.013, 0.284)
pt3dadd(-55.008, 103.596, 34.988, 0.276)
pt3dadd(-55.119, 103.631, 34.963, 0.27)
pt3dadd(-55.23, 103.666, 34.938, 0.262)
pt3dadd(-55.34, 103.701, 34.913, 0.254)
pt3dadd(-55.451, 103.737, 34.888, 0.246)
pt3dadd(-55.562, 103.772, 34.863, 0.238)
pt3dadd(-55.673, 103.807, 34.838, 0.23)
pt3dadd(-55.783, 103.847, 34.82, 0.234)
pt3dadd(-55.894, 103.892, 34.81, 0.25)
pt3dadd(-56.004, 103.937, 34.801, 0.266)
pt3dadd(-56.115, 103.983, 34.791, 0.284)
pt3dadd(-56.225, 104.028, 34.781, 0.3)
pt3dadd(-56.336, 104.073, 34.771, 0.316)
pt3dadd(-56.446, 104.118, 34.761, 0.332)
pt3dadd(-56.557, 104.164, 34.752, 0.348)
pt3dadd(-56.667, 104.209, 34.742, 0.364)
pt3dadd(-56.778, 104.254, 34.732, 0.382)
pt3dadd(-56.882, 104.31, 34.737, 0.398)
pt3dadd(-56.983, 104.373, 34.752, 0.416)
pt3dadd(-57.084, 104.436, 34.767, 0.432)
pt3dadd(-57.184, 104.499, 34.781, 0.45)
pt3dadd(-57.285, 104.562, 34.796, 0.468)
pt3dadd(-57.386, 104.625, 34.811, 0.484)
pt3dadd(-57.486, 104.688, 34.825, 0.502)
pt3dadd(-57.587, 104.751, 34.84, 0.52)
pt3dadd(-57.688, 104.814, 34.855, 0.536)
pt3dadd(-57.788, 104.877, 34.869, 0.554)
pt3dadd(-57.871, 104.946, 34.912, 0.526)
pt3dadd(-57.952, 105.015, 34.957, 0.492)
pt3dadd(-58.034, 105.085, 35.002, 0.458)
pt3dadd(-58.115, 105.154, 35.048, 0.426)
pt3dadd(-58.196, 105.224, 35.093, 0.392)
pt3dadd(-58.277, 105.294, 35.139, 0.36)
pt3dadd(-58.358, 105.363, 35.184, 0.326)
pt3dadd(-58.439, 105.433, 35.23, 0.292)
pt3dadd(-58.52, 105.503, 35.275, 0.26)
pt3dadd(-58.602, 105.572, 35.32, 0.226)
pt3dadd(-58.683, 105.653, 35.349, 0.226)
pt3dadd(-58.764, 105.735, 35.379, 0.226)
pt3dadd(-58.845, 105.816, 35.408, 0.226)
pt3dadd(-58.926, 105.897, 35.437, 0.226)
pt3dadd(-59.007, 105.978, 35.465, 0.226)
pt3dadd(-59.089, 106.059, 35.494, 0.226)
pt3dadd(-59.17, 106.141, 35.523, 0.226)
pt3dadd(-59.251, 106.222, 35.552, 0.226)
pt3dadd(-59.332, 106.303, 35.582, 0.226)
pt3dadd(-59.414, 106.384, 35.611, 0.226)
}
apic[13] {pt3dclear()
pt3dadd(-23.219, 125.086, 17.141, 0.452)
pt3dadd(-23.191, 124.974, 17.121, 0.452)
pt3dadd(-23.163, 124.86, 17.101, 0.452)
pt3dadd(-23.135, 124.746, 17.081, 0.452)
pt3dadd(-23.107, 124.632, 17.06, 0.452)
pt3dadd(-23.079, 124.517, 17.04, 0.452)
pt3dadd(-23.051, 124.403, 17.02, 0.452)
pt3dadd(-23.023, 124.289, 17, 0.452)
pt3dadd(-22.995, 124.175, 16.979, 0.452)
pt3dadd(-22.967, 124.061, 16.959, 0.452)
pt3dadd(-22.942, 123.946, 16.939, 0.454)
}
}
proc shape3d_56() {
apic[13] { pt3dadd(-22.929, 123.829, 16.921, 0.46)
pt3dadd(-22.915, 123.712, 16.903, 0.468)
pt3dadd(-22.902, 123.594, 16.884, 0.476)
pt3dadd(-22.888, 123.478, 16.866, 0.482)
pt3dadd(-22.875, 123.36, 16.847, 0.49)
pt3dadd(-22.861, 123.244, 16.829, 0.496)
pt3dadd(-22.848, 123.126, 16.81, 0.504)
pt3dadd(-22.834, 123.008, 16.792, 0.512)
pt3dadd(-22.821, 122.892, 16.774, 0.518)
pt3dadd(-22.815, 122.774, 16.756, 0.53)
pt3dadd(-22.824, 122.656, 16.74, 0.548)
pt3dadd(-22.833, 122.538, 16.725, 0.566)
pt3dadd(-22.841, 122.419, 16.709, 0.584)
pt3dadd(-22.85, 122.302, 16.693, 0.602)
pt3dadd(-22.859, 122.183, 16.678, 0.622)
pt3dadd(-22.868, 122.065, 16.662, 0.64)
pt3dadd(-22.876, 121.946, 16.646, 0.658)
pt3dadd(-22.885, 121.829, 16.631, 0.676)
pt3dadd(-22.894, 121.71, 16.615, 0.694)
pt3dadd(-22.904, 121.592, 16.597, 0.71)
pt3dadd(-22.918, 121.476, 16.575, 0.724)
pt3dadd(-22.931, 121.361, 16.553, 0.738)
pt3dadd(-22.945, 121.244, 16.531, 0.752)
pt3dadd(-22.958, 121.128, 16.509, 0.766)
pt3dadd(-22.972, 121.012, 16.486, 0.78)
pt3dadd(-22.985, 120.895, 16.464, 0.794)
pt3dadd(-22.999, 120.779, 16.442, 0.808)
pt3dadd(-23.012, 120.662, 16.42, 0.822)
pt3dadd(-23.026, 120.546, 16.398, 0.836)
pt3dadd(-23.041, 120.436, 16.365, 0.822)
pt3dadd(-23.06, 120.332, 16.317, 0.766)
pt3dadd(-23.079, 120.229, 16.268, 0.712)
pt3dadd(-23.098, 120.126, 16.22, 0.656)
pt3dadd(-23.117, 120.023, 16.171, 0.6)
pt3dadd(-23.136, 119.919, 16.123, 0.546)
pt3dadd(-23.154, 119.816, 16.075, 0.49)
pt3dadd(-23.173, 119.713, 16.026, 0.436)
pt3dadd(-23.192, 119.609, 15.978, 0.38)
pt3dadd(-23.211, 119.506, 15.929, 0.324)
pt3dadd(-23.244, 119.406, 15.883, 0.308)
pt3dadd(-23.297, 119.313, 15.839, 0.35)
pt3dadd(-23.351, 119.219, 15.796, 0.392)
pt3dadd(-23.405, 119.125, 15.752, 0.434)
pt3dadd(-23.458, 119.031, 15.709, 0.476)
pt3dadd(-23.512, 118.937, 15.665, 0.516)
pt3dadd(-23.565, 118.843, 15.622, 0.558)
pt3dadd(-23.619, 118.75, 15.579, 0.6)
pt3dadd(-23.673, 118.656, 15.535, 0.642)
pt3dadd(-23.726, 118.562, 15.492, 0.684)
pt3dadd(-23.782, 118.477, 15.44, 0.722)
pt3dadd(-23.842, 118.404, 15.379, 0.756)
pt3dadd(-23.901, 118.33, 15.317, 0.788)
pt3dadd(-23.961, 118.256, 15.256, 0.822)
pt3dadd(-24.02, 118.182, 15.194, 0.856)
pt3dadd(-24.08, 118.109, 15.133, 0.888)
pt3dadd(-24.139, 118.035, 15.071, 0.922)
pt3dadd(-24.198, 117.961, 15.01, 0.956)
pt3dadd(-24.258, 117.887, 14.949, 0.988)
pt3dadd(-24.317, 117.814, 14.887, 1.022)
pt3dadd(-24.383, 117.755, 14.82, 1.04)
pt3dadd(-24.452, 117.705, 14.75, 1.05)
pt3dadd(-24.521, 117.655, 14.68, 1.06)
pt3dadd(-24.59, 117.605, 14.609, 1.07)
pt3dadd(-24.66, 117.555, 14.539, 1.08)
pt3dadd(-24.729, 117.505, 14.469, 1.088)
pt3dadd(-24.798, 117.455, 14.398, 1.098)
pt3dadd(-24.867, 117.405, 14.328, 1.108)
pt3dadd(-24.936, 117.355, 14.258, 1.118)
pt3dadd(-25.005, 117.306, 14.187, 1.128)
pt3dadd(-25.082, 117.257, 14.122, 1.116)
pt3dadd(-25.162, 117.208, 14.06, 1.094)
pt3dadd(-25.242, 117.16, 13.997, 1.072)
pt3dadd(-25.322, 117.111, 13.935, 1.052)
pt3dadd(-25.402, 117.063, 13.872, 1.03)
pt3dadd(-25.483, 117.014, 13.81, 1.01)
pt3dadd(-25.563, 116.966, 13.747, 0.988)
pt3dadd(-25.643, 116.917, 13.684, 0.966)
pt3dadd(-25.723, 116.869, 13.622, 0.946)
pt3dadd(-25.803, 116.82, 13.559, 0.924)
pt3dadd(-25.885, 116.756, 13.511, 0.864)
pt3dadd(-25.968, 116.688, 13.466, 0.794)
pt3dadd(-26.052, 116.62, 13.422, 0.724)
pt3dadd(-26.135, 116.552, 13.377, 0.656)
pt3dadd(-26.218, 116.484, 13.332, 0.586)
pt3dadd(-26.301, 116.416, 13.287, 0.516)
pt3dadd(-26.384, 116.349, 13.242, 0.448)
pt3dadd(-26.467, 116.281, 13.197, 0.378)
pt3dadd(-26.55, 116.213, 13.152, 0.308)
pt3dadd(-26.633, 116.145, 13.108, 0.24)
pt3dadd(-26.697, 116.061, 13.061, 0.268)
pt3dadd(-26.756, 115.974, 13.013, 0.318)
pt3dadd(-26.816, 115.887, 12.966, 0.366)
pt3dadd(-26.875, 115.799, 12.919, 0.416)
pt3dadd(-26.935, 115.712, 12.871, 0.464)
pt3dadd(-26.995, 115.625, 12.824, 0.514)
pt3dadd(-27.054, 115.537, 12.777, 0.562)
pt3dadd(-27.114, 115.45, 12.729, 0.612)
pt3dadd(-27.174, 115.363, 12.682, 0.662)
pt3dadd(-27.233, 115.276, 12.635, 0.71)
pt3dadd(-27.299, 115.186, 12.597, 0.742)
pt3dadd(-27.366, 115.097, 12.561, 0.772)
pt3dadd(-27.433, 115.007, 12.525, 0.8)
pt3dadd(-27.501, 114.918, 12.489, 0.828)
pt3dadd(-27.568, 114.828, 12.453, 0.856)
pt3dadd(-27.635, 114.738, 12.417, 0.886)
pt3dadd(-27.702, 114.649, 12.381, 0.914)
pt3dadd(-27.769, 114.559, 12.345, 0.942)
pt3dadd(-27.836, 114.47, 12.309, 0.97)
pt3dadd(-27.903, 114.38, 12.273, 1)
pt3dadd(-27.976, 114.291, 12.244, 1.012)
pt3dadd(-28.049, 114.202, 12.216, 1.02)
pt3dadd(-28.122, 114.112, 12.188, 1.03)
pt3dadd(-28.194, 114.023, 12.16, 1.04)
pt3dadd(-28.267, 113.934, 12.132, 1.05)
pt3dadd(-28.34, 113.845, 12.104, 1.06)
pt3dadd(-28.413, 113.756, 12.076, 1.068)
pt3dadd(-28.486, 113.667, 12.048, 1.078)
pt3dadd(-28.559, 113.577, 12.02, 1.088)
pt3dadd(-28.632, 113.488, 11.992, 1.098)
pt3dadd(-28.711, 113.403, 11.966, 1.086)
pt3dadd(-28.791, 113.319, 11.941, 1.07)
pt3dadd(-28.871, 113.235, 11.916, 1.054)
pt3dadd(-28.951, 113.15, 11.891, 1.038)
pt3dadd(-29.03, 113.066, 11.866, 1.022)
pt3dadd(-29.11, 112.982, 11.841, 1.006)
pt3dadd(-29.19, 112.897, 11.816, 0.99)
pt3dadd(-29.27, 112.813, 11.79, 0.974)
pt3dadd(-29.35, 112.729, 11.765, 0.958)
pt3dadd(-29.43, 112.645, 11.74, 0.942)
pt3dadd(-29.518, 112.579, 11.7, 0.938)
pt3dadd(-29.607, 112.517, 11.658, 0.934)
pt3dadd(-29.696, 112.454, 11.616, 0.93)
pt3dadd(-29.785, 112.391, 11.574, 0.926)
pt3dadd(-29.874, 112.328, 11.532, 0.922)
pt3dadd(-29.963, 112.266, 11.49, 0.92)
pt3dadd(-30.052, 112.203, 11.448, 0.916)
pt3dadd(-30.141, 112.14, 11.406, 0.912)
pt3dadd(-30.23, 112.077, 11.364, 0.908)
pt3dadd(-30.319, 112.015, 11.322, 0.904)
pt3dadd(-30.398, 111.952, 11.268, 0.89)
pt3dadd(-30.478, 111.89, 11.214, 0.874)
pt3dadd(-30.558, 111.828, 11.16, 0.86)
pt3dadd(-30.637, 111.766, 11.106, 0.844)
pt3dadd(-30.717, 111.703, 11.052, 0.83)
pt3dadd(-30.796, 111.641, 10.998, 0.814)
pt3dadd(-30.876, 111.579, 10.944, 0.8)
pt3dadd(-30.955, 111.517, 10.89, 0.784)
pt3dadd(-31.035, 111.454, 10.836, 0.77)
pt3dadd(-31.113, 111.392, 10.781, 0.754)
pt3dadd(-31.178, 111.322, 10.72, 0.728)
pt3dadd(-31.244, 111.253, 10.659, 0.704)
pt3dadd(-31.309, 111.184, 10.599, 0.678)
pt3dadd(-31.374, 111.115, 10.538, 0.654)
pt3dadd(-31.44, 111.045, 10.477, 0.63)
pt3dadd(-31.505, 110.976, 10.416, 0.604)
pt3dadd(-31.571, 110.907, 10.355, 0.58)
pt3dadd(-31.636, 110.838, 10.294, 0.556)
pt3dadd(-31.702, 110.769, 10.234, 0.53)
pt3dadd(-31.77, 110.7, 10.175, 0.514)
pt3dadd(-31.855, 110.637, 10.128, 0.554)
pt3dadd(-31.94, 110.574, 10.081, 0.594)
pt3dadd(-32.025, 110.51, 10.035, 0.634)
pt3dadd(-32.11, 110.447, 9.988, 0.672)
pt3dadd(-32.196, 110.384, 9.941, 0.712)
pt3dadd(-32.281, 110.32, 9.894, 0.752)
pt3dadd(-32.366, 110.257, 9.848, 0.792)
pt3dadd(-32.451, 110.194, 9.801, 0.832)
pt3dadd(-32.536, 110.13, 9.754, 0.87)
pt3dadd(-32.621, 110.064, 9.711, 0.904)
pt3dadd(-32.702, 109.981, 9.687, 0.904)
pt3dadd(-32.784, 109.898, 9.663, 0.904)
pt3dadd(-32.865, 109.815, 9.639, 0.904)
pt3dadd(-32.947, 109.732, 9.614, 0.904)
pt3dadd(-33.028, 109.648, 9.59, 0.904)
pt3dadd(-33.11, 109.565, 9.566, 0.904)
pt3dadd(-33.192, 109.482, 9.542, 0.904)
pt3dadd(-33.273, 109.399, 9.517, 0.904)
pt3dadd(-33.355, 109.316, 9.493, 0.904)
pt3dadd(-33.433, 109.231, 9.467, 0.902)
pt3dadd(-33.494, 109.139, 9.428, 0.888)
pt3dadd(-33.556, 109.047, 9.389, 0.876)
pt3dadd(-33.617, 108.955, 9.351, 0.862)
pt3dadd(-33.678, 108.863, 9.312, 0.85)
pt3dadd(-33.74, 108.771, 9.273, 0.836)
pt3dadd(-33.801, 108.679, 9.234, 0.824)
pt3dadd(-33.863, 108.587, 9.196, 0.81)
pt3dadd(-33.924, 108.495, 9.157, 0.798)
pt3dadd(-33.986, 108.403, 9.118, 0.784)
pt3dadd(-34.046, 108.31, 9.079, 0.77)
pt3dadd(-34.102, 108.215, 9.041, 0.754)
pt3dadd(-34.159, 108.12, 9.003, 0.738)
pt3dadd(-34.216, 108.024, 8.965, 0.722)
pt3dadd(-34.272, 107.929, 8.927, 0.704)
pt3dadd(-34.329, 107.834, 8.888, 0.688)
pt3dadd(-34.386, 107.739, 8.85, 0.672)
pt3dadd(-34.442, 107.643, 8.812, 0.656)
pt3dadd(-34.499, 107.548, 8.774, 0.638)
pt3dadd(-34.556, 107.453, 8.735, 0.622)
pt3dadd(-34.613, 107.357, 8.699, 0.606)
pt3dadd(-34.672, 107.26, 8.667, 0.59)
}
}
proc shape3d_57() {
apic[13] { pt3dadd(-34.732, 107.163, 8.635, 0.576)
pt3dadd(-34.791, 107.066, 8.603, 0.56)
pt3dadd(-34.85, 106.969, 8.571, 0.544)
pt3dadd(-34.91, 106.872, 8.539, 0.528)
pt3dadd(-34.969, 106.775, 8.507, 0.512)
pt3dadd(-35.028, 106.678, 8.475, 0.496)
pt3dadd(-35.088, 106.581, 8.443, 0.482)
pt3dadd(-35.147, 106.484, 8.411, 0.466)
pt3dadd(-35.201, 106.387, 8.375, 0.454)
pt3dadd(-35.243, 106.29, 8.327, 0.454)
pt3dadd(-35.284, 106.193, 8.279, 0.454)
pt3dadd(-35.325, 106.096, 8.232, 0.454)
pt3dadd(-35.366, 105.999, 8.184, 0.454)
pt3dadd(-35.408, 105.902, 8.136, 0.452)
pt3dadd(-35.449, 105.805, 8.088, 0.452)
pt3dadd(-35.49, 105.708, 8.04, 0.452)
pt3dadd(-35.531, 105.611, 7.993, 0.452)
pt3dadd(-35.573, 105.513, 7.945, 0.452)
pt3dadd(-35.617, 105.417, 7.9, 0.45)
pt3dadd(-35.67, 105.319, 7.861, 0.44)
pt3dadd(-35.724, 105.222, 7.823, 0.432)
pt3dadd(-35.777, 105.125, 7.784, 0.424)
pt3dadd(-35.83, 105.028, 7.746, 0.414)
pt3dadd(-35.884, 104.931, 7.707, 0.406)
pt3dadd(-35.937, 104.834, 7.669, 0.396)
pt3dadd(-35.99, 104.737, 7.63, 0.388)
pt3dadd(-36.044, 104.64, 7.592, 0.38)
pt3dadd(-36.097, 104.543, 7.553, 0.37)
pt3dadd(-36.153, 104.446, 7.517, 0.362)
pt3dadd(-36.214, 104.351, 7.484, 0.356)
pt3dadd(-36.275, 104.255, 7.452, 0.35)
pt3dadd(-36.336, 104.159, 7.42, 0.344)
pt3dadd(-36.397, 104.063, 7.388, 0.338)
pt3dadd(-36.458, 103.967, 7.356, 0.332)
pt3dadd(-36.519, 103.871, 7.324, 0.326)
pt3dadd(-36.58, 103.775, 7.292, 0.32)
pt3dadd(-36.641, 103.68, 7.259, 0.314)
pt3dadd(-36.702, 103.584, 7.227, 0.308)
pt3dadd(-36.759, 103.488, 7.19, 0.328)
pt3dadd(-36.808, 103.392, 7.146, 0.394)
pt3dadd(-36.857, 103.297, 7.101, 0.458)
pt3dadd(-36.907, 103.202, 7.057, 0.524)
pt3dadd(-36.956, 103.106, 7.012, 0.588)
pt3dadd(-37.005, 103.011, 6.968, 0.654)
pt3dadd(-37.054, 102.915, 6.923, 0.718)
pt3dadd(-37.104, 102.82, 6.879, 0.784)
pt3dadd(-37.153, 102.724, 6.834, 0.85)
pt3dadd(-37.202, 102.629, 6.789, 0.914)
pt3dadd(-37.259, 102.535, 6.75, 0.954)
pt3dadd(-37.328, 102.444, 6.721, 0.946)
pt3dadd(-37.398, 102.353, 6.691, 0.94)
pt3dadd(-37.467, 102.261, 6.662, 0.934)
pt3dadd(-37.537, 102.17, 6.632, 0.928)
pt3dadd(-37.606, 102.079, 6.602, 0.92)
pt3dadd(-37.676, 101.988, 6.573, 0.914)
pt3dadd(-37.746, 101.897, 6.543, 0.908)
pt3dadd(-37.815, 101.806, 6.514, 0.9)
pt3dadd(-37.885, 101.715, 6.484, 0.894)
pt3dadd(-37.96, 101.627, 6.459, 0.884)
pt3dadd(-38.041, 101.542, 6.437, 0.868)
pt3dadd(-38.122, 101.458, 6.416, 0.852)
pt3dadd(-38.204, 101.373, 6.395, 0.838)
pt3dadd(-38.285, 101.289, 6.374, 0.822)
pt3dadd(-38.366, 101.204, 6.353, 0.806)
pt3dadd(-38.448, 101.12, 6.332, 0.79)
pt3dadd(-38.529, 101.035, 6.311, 0.774)
pt3dadd(-38.611, 100.951, 6.289, 0.76)
pt3dadd(-38.692, 100.866, 6.268, 0.744)
pt3dadd(-38.778, 100.786, 6.249, 0.744)
pt3dadd(-38.868, 100.709, 6.233, 0.76)
pt3dadd(-38.958, 100.633, 6.217, 0.778)
pt3dadd(-39.049, 100.556, 6.201, 0.794)
pt3dadd(-39.139, 100.48, 6.185, 0.81)
pt3dadd(-39.23, 100.403, 6.168, 0.826)
pt3dadd(-39.32, 100.327, 6.152, 0.844)
pt3dadd(-39.411, 100.25, 6.136, 0.86)
pt3dadd(-39.501, 100.174, 6.12, 0.876)
pt3dadd(-39.591, 100.098, 6.103, 0.894)
pt3dadd(-39.693, 100.04, 6.089, 0.892)
pt3dadd(-39.805, 100.002, 6.076, 0.874)
pt3dadd(-39.918, 99.964, 6.063, 0.856)
pt3dadd(-40.031, 99.926, 6.05, 0.838)
pt3dadd(-40.144, 99.889, 6.037, 0.82)
pt3dadd(-40.257, 99.851, 6.024, 0.802)
pt3dadd(-40.37, 99.813, 6.012, 0.784)
pt3dadd(-40.482, 99.775, 5.999, 0.766)
pt3dadd(-40.595, 99.737, 5.986, 0.748)
pt3dadd(-40.708, 99.699, 5.973, 0.728)
pt3dadd(-40.82, 99.675, 5.949, 0.702)
pt3dadd(-40.932, 99.665, 5.912, 0.67)
pt3dadd(-41.043, 99.655, 5.876, 0.636)
pt3dadd(-41.154, 99.644, 5.84, 0.602)
pt3dadd(-41.266, 99.634, 5.804, 0.568)
pt3dadd(-41.377, 99.624, 5.768, 0.534)
pt3dadd(-41.489, 99.613, 5.732, 0.5)
pt3dadd(-41.6, 99.603, 5.696, 0.466)
pt3dadd(-41.712, 99.593, 5.66, 0.432)
pt3dadd(-41.823, 99.582, 5.623, 0.398)
pt3dadd(-41.934, 99.585, 5.586, 0.422)
pt3dadd(-42.045, 99.596, 5.549, 0.474)
pt3dadd(-42.155, 99.606, 5.511, 0.528)
pt3dadd(-42.266, 99.617, 5.473, 0.582)
pt3dadd(-42.377, 99.627, 5.436, 0.636)
pt3dadd(-42.487, 99.638, 5.398, 0.688)
pt3dadd(-42.598, 99.648, 5.36, 0.742)
pt3dadd(-42.708, 99.659, 5.323, 0.796)
pt3dadd(-42.819, 99.669, 5.285, 0.85)
pt3dadd(-42.93, 99.68, 5.247, 0.902)
pt3dadd(-43.036, 99.715, 5.213, 0.92)
pt3dadd(-43.139, 99.76, 5.18, 0.922)
pt3dadd(-43.243, 99.806, 5.147, 0.926)
pt3dadd(-43.347, 99.852, 5.114, 0.928)
pt3dadd(-43.45, 99.897, 5.081, 0.93)
pt3dadd(-43.554, 99.943, 5.048, 0.932)
pt3dadd(-43.658, 99.988, 5.015, 0.934)
pt3dadd(-43.761, 100.034, 4.981, 0.938)
pt3dadd(-43.865, 100.079, 4.949, 0.94)
pt3dadd(-43.969, 100.125, 4.915, 0.942)
}
apic[14] {pt3dclear()
pt3dadd(-43.969, 100.125, 4.915, 0.942)
pt3dadd(-44.023, 100.145, 4.871, 0.904)
pt3dadd(-44.109, 100.196, 4.825, 0.852)
pt3dadd(-44.195, 100.247, 4.779, 0.8)
pt3dadd(-44.28, 100.298, 4.733, 0.748)
pt3dadd(-44.366, 100.35, 4.687, 0.696)
pt3dadd(-44.452, 100.401, 4.641, 0.644)
pt3dadd(-44.538, 100.452, 4.595, 0.592)
pt3dadd(-44.623, 100.503, 4.549, 0.54)
pt3dadd(-44.709, 100.555, 4.503, 0.486)
pt3dadd(-44.795, 100.606, 4.457, 0.434)
pt3dadd(-44.883, 100.653, 4.41, 0.434)
pt3dadd(-44.971, 100.699, 4.362, 0.446)
pt3dadd(-45.059, 100.745, 4.314, 0.46)
pt3dadd(-45.148, 100.791, 4.266, 0.474)
pt3dadd(-45.236, 100.836, 4.219, 0.486)
pt3dadd(-45.324, 100.882, 4.171, 0.5)
pt3dadd(-45.413, 100.928, 4.123, 0.514)
pt3dadd(-45.501, 100.974, 4.076, 0.526)
pt3dadd(-45.589, 101.02, 4.028, 0.54)
pt3dadd(-45.678, 101.065, 3.98, 0.554)
pt3dadd(-45.766, 101.118, 3.941, 0.528)
pt3dadd(-45.855, 101.172, 3.904, 0.496)
pt3dadd(-45.943, 101.226, 3.867, 0.462)
pt3dadd(-46.032, 101.28, 3.831, 0.43)
pt3dadd(-46.12, 101.334, 3.794, 0.396)
pt3dadd(-46.209, 101.388, 3.757, 0.364)
pt3dadd(-46.297, 101.442, 3.72, 0.33)
pt3dadd(-46.386, 101.496, 3.683, 0.298)
pt3dadd(-46.474, 101.55, 3.646, 0.264)
pt3dadd(-46.563, 101.604, 3.609, 0.232)
pt3dadd(-46.655, 101.655, 3.579, 0.226)
pt3dadd(-46.748, 101.707, 3.551, 0.226)
pt3dadd(-46.842, 101.758, 3.522, 0.226)
pt3dadd(-46.935, 101.809, 3.494, 0.226)
pt3dadd(-47.028, 101.861, 3.465, 0.226)
pt3dadd(-47.122, 101.912, 3.437, 0.226)
pt3dadd(-47.215, 101.963, 3.408, 0.226)
pt3dadd(-47.308, 102.015, 3.38, 0.226)
pt3dadd(-47.402, 102.066, 3.351, 0.226)
pt3dadd(-47.495, 102.117, 3.323, 0.226)
pt3dadd(-47.591, 102.157, 3.285, 0.226)
pt3dadd(-47.688, 102.194, 3.244, 0.226)
pt3dadd(-47.785, 102.231, 3.204, 0.226)
pt3dadd(-47.883, 102.268, 3.164, 0.226)
pt3dadd(-47.979, 102.305, 3.124, 0.226)
pt3dadd(-48.077, 102.342, 3.083, 0.226)
pt3dadd(-48.174, 102.38, 3.043, 0.226)
pt3dadd(-48.271, 102.417, 3.003, 0.226)
pt3dadd(-48.368, 102.454, 2.963, 0.226)
pt3dadd(-48.465, 102.491, 2.922, 0.226)
pt3dadd(-48.567, 102.51, 2.879, 0.238)
pt3dadd(-48.67, 102.527, 2.835, 0.25)
pt3dadd(-48.773, 102.544, 2.791, 0.262)
pt3dadd(-48.876, 102.561, 2.747, 0.274)
pt3dadd(-48.979, 102.578, 2.704, 0.286)
pt3dadd(-49.083, 102.595, 2.66, 0.298)
pt3dadd(-49.186, 102.612, 2.616, 0.31)
pt3dadd(-49.289, 102.63, 2.572, 0.322)
pt3dadd(-49.392, 102.647, 2.528, 0.336)
pt3dadd(-49.495, 102.664, 2.485, 0.348)
pt3dadd(-49.604, 102.662, 2.447, 0.38)
pt3dadd(-49.713, 102.661, 2.41, 0.414)
pt3dadd(-49.822, 102.66, 2.372, 0.446)
pt3dadd(-49.931, 102.658, 2.335, 0.48)
pt3dadd(-50.041, 102.657, 2.298, 0.512)
pt3dadd(-50.15, 102.655, 2.26, 0.546)
pt3dadd(-50.259, 102.654, 2.223, 0.578)
pt3dadd(-50.368, 102.652, 2.186, 0.612)
pt3dadd(-50.477, 102.651, 2.148, 0.646)
pt3dadd(-50.586, 102.649, 2.111, 0.678)
pt3dadd(-50.581, 102.636, 2.102, 0.678)
pt3dadd(-50.576, 102.623, 2.093, 0.678)
pt3dadd(-50.682, 102.567, 2.085, 0.466)
pt3dadd(-50.79, 102.511, 2.076, 0.48)
pt3dadd(-50.896, 102.455, 2.067, 0.496)
pt3dadd(-50.891, 102.442, 2.058, 0.496)
pt3dadd(-50.997, 102.386, 2.05, 0.51)
pt3dadd(-51.104, 102.33, 2.041, 0.524)
pt3dadd(-51.216, 102.319, 2.032, 0.536)
pt3dadd(-51.329, 102.324, 2.023, 0.548)
pt3dadd(-51.443, 102.328, 2.015, 0.56)
}
}
proc shape3d_58() {
apic[14] { pt3dadd(-51.557, 102.333, 2.006, 0.574)
pt3dadd(-51.67, 102.337, 1.997, 0.586)
pt3dadd(-51.784, 102.341, 1.988, 0.598)
pt3dadd(-51.897, 102.336, 1.977, 0.612)
pt3dadd(-52.012, 102.323, 1.965, 0.63)
pt3dadd(-52.127, 102.31, 1.952, 0.648)
pt3dadd(-52.217, 102.301, 1.893, 0.652)
pt3dadd(-52.296, 102.295, 1.814, 0.652)
pt3dadd(-52.381, 102.33, 1.765, 0.636)
pt3dadd(-52.468, 102.388, 1.733, 0.608)
pt3dadd(-52.564, 102.438, 1.718, 0.568)
pt3dadd(-52.662, 102.486, 1.71, 0.522)
pt3dadd(-52.737, 102.516, 1.654, 0.488)
pt3dadd(-52.795, 102.533, 1.564, 0.464)
pt3dadd(-52.853, 102.55, 1.474, 0.44)
pt3dadd(-52.93, 102.574, 1.409, 0.426)
pt3dadd(-53.033, 102.608, 1.378, 0.426)
pt3dadd(-53.139, 102.629, 1.351, 0.482)
pt3dadd(-53.219, 102.641, 1.286, 0.546)
pt3dadd(-53.281, 102.659, 1.199, 0.574)
pt3dadd(-53.343, 102.677, 1.111, 0.604)
pt3dadd(-53.405, 102.694, 1.024, 0.632)
pt3dadd(-53.462, 102.718, 0.936, 0.656)
pt3dadd(-53.508, 102.756, 0.847, 0.67)
pt3dadd(-53.58, 102.774, 0.774, 0.672)
pt3dadd(-53.68, 102.767, 0.719, 0.66)
pt3dadd(-53.785, 102.759, 0.678, 0.648)
pt3dadd(-53.9, 102.746, 0.67, 0.63)
pt3dadd(-54.015, 102.733, 0.661, 0.614)
pt3dadd(-54.129, 102.72, 0.652, 0.608)
pt3dadd(-54.244, 102.707, 0.643, 0.624)
pt3dadd(-54.359, 102.694, 0.635, 0.642)
pt3dadd(-54.474, 102.681, 0.626, 0.664)
pt3dadd(-54.588, 102.668, 0.617, 0.702)
pt3dadd(-54.703, 102.655, 0.608, 0.738)
pt3dadd(-54.818, 102.642, 0.599, 0.772)
pt3dadd(-54.933, 102.629, 0.591, 0.806)
pt3dadd(-55.047, 102.616, 0.582, 0.832)
pt3dadd(-55.162, 102.604, 0.573, 0.84)
pt3dadd(-55.277, 102.591, 0.564, 0.848)
pt3dadd(-55.392, 102.576, 0.552, 0.85)
pt3dadd(-55.505, 102.558, 0.53, 0.84)
pt3dadd(-55.619, 102.54, 0.508, 0.832)
pt3dadd(-55.688, 102.487, 0.441, 0.808)
pt3dadd(-55.743, 102.422, 0.357, 0.78)
pt3dadd(-55.844, 102.369, 0.322, 0.76)
pt3dadd(-55.929, 102.291, 0.28, 0.75)
pt3dadd(-56.001, 102.198, 0.234, 0.744)
pt3dadd(-56.072, 102.105, 0.188, 0.738)
pt3dadd(-56.144, 102.012, 0.142, 0.732)
pt3dadd(-56.227, 101.931, 0.097, 0.722)
pt3dadd(-56.323, 101.867, 0.056, 0.712)
pt3dadd(-56.417, 101.802, 0.014, 0.7)
pt3dadd(-56.513, 101.737, -0.028, 0.688)
pt3dadd(-56.609, 101.675, -0.069, 0.678)
pt3dadd(-56.717, 101.638, -0.105, 0.678)
pt3dadd(-56.826, 101.601, -0.14, 0.678)
pt3dadd(-56.933, 101.563, -0.176, 0.678)
pt3dadd(-57.041, 101.526, -0.212, 0.678)
pt3dadd(-57.148, 101.492, -0.248, 0.68)
pt3dadd(-57.258, 101.479, -0.286, 0.698)
pt3dadd(-57.367, 101.466, -0.325, 0.716)
pt3dadd(-57.477, 101.454, -0.364, 0.734)
pt3dadd(-57.586, 101.441, -0.402, 0.752)
pt3dadd(-57.694, 101.428, -0.441, 0.77)
pt3dadd(-57.804, 101.415, -0.479, 0.788)
pt3dadd(-57.913, 101.402, -0.518, 0.806)
pt3dadd(-58.023, 101.389, -0.557, 0.824)
pt3dadd(-58.132, 101.376, -0.595, 0.842)
pt3dadd(-58.242, 101.363, -0.634, 0.86)
pt3dadd(-58.351, 101.35, -0.672, 0.878)
pt3dadd(-58.435, 101.337, -0.747, 0.884)
pt3dadd(-58.519, 101.325, -0.823, 0.888)
pt3dadd(-58.602, 101.312, -0.899, 0.894)
pt3dadd(-58.686, 101.299, -0.975, 0.9)
pt3dadd(-58.77, 101.286, -1.051, 0.904)
pt3dadd(-58.865, 101.273, -1.115, 0.89)
pt3dadd(-58.959, 101.26, -1.178, 0.874)
pt3dadd(-59.055, 101.247, -1.242, 0.86)
pt3dadd(-59.149, 101.234, -1.306, 0.844)
pt3dadd(-59.245, 101.221, -1.369, 0.83)
pt3dadd(-59.288, 101.19, -1.468, 0.818)
pt3dadd(-59.327, 101.158, -1.568, 0.806)
pt3dadd(-59.388, 101.096, -1.648, 0.792)
pt3dadd(-59.452, 101.026, -1.72, 0.776)
pt3dadd(-59.527, 100.925, -1.74, 0.764)
pt3dadd(-59.606, 100.832, -1.764, 0.75)
pt3dadd(-59.705, 100.785, -1.813, 0.724)
pt3dadd(-59.799, 100.726, -1.857, 0.698)
pt3dadd(-59.878, 100.63, -1.883, 0.68)
pt3dadd(-59.976, 100.56, -1.911, 0.678)
pt3dadd(-60.074, 100.492, -1.939, 0.678)
pt3dadd(-60.173, 100.425, -1.967, 0.678)
pt3dadd(-60.272, 100.357, -1.995, 0.678)
pt3dadd(-60.374, 100.294, -2.017, 0.674)
pt3dadd(-60.483, 100.241, -2.026, 0.664)
pt3dadd(-60.59, 100.189, -2.034, 0.654)
pt3dadd(-60.7, 100.169, -2.071, 0.632)
pt3dadd(-60.809, 100.151, -2.109, 0.61)
pt3dadd(-60.917, 100.136, -2.149, 0.588)
pt3dadd(-61.026, 100.123, -2.191, 0.568)
pt3dadd(-61.121, 100.11, -2.247, 0.552)
pt3dadd(-61.182, 100.097, -2.338, 0.552)
pt3dadd(-61.25, 100.084, -2.425, 0.554)
pt3dadd(-61.351, 100.071, -2.482, 0.568)
pt3dadd(-61.45, 100.058, -2.539, 0.582)
pt3dadd(-61.55, 100.045, -2.596, 0.596)
pt3dadd(-61.651, 100.008, -2.631, 0.614)
pt3dadd(-61.753, 99.941, -2.64, 0.636)
pt3dadd(-61.856, 99.877, -2.652, 0.654)
pt3dadd(-61.961, 99.821, -2.677, 0.664)
pt3dadd(-62.066, 99.765, -2.701, 0.674)
pt3dadd(-62.133, 99.717, -2.761, 0.678)
pt3dadd(-62.152, 99.68, -2.866, 0.678)
pt3dadd(-62.169, 99.625, -2.96, 0.678)
pt3dadd(-62.23, 99.537, -3.009, 0.674)
pt3dadd(-62.323, 99.469, -3.051, 0.668)
pt3dadd(-62.417, 99.4, -3.093, 0.664)
pt3dadd(-62.51, 99.332, -3.135, 0.658)
pt3dadd(-62.608, 99.278, -3.177, 0.65)
pt3dadd(-62.715, 99.265, -3.218, 0.642)
pt3dadd(-62.824, 99.252, -3.259, 0.632)
pt3dadd(-62.933, 99.239, -3.3, 0.624)
pt3dadd(-63.04, 99.226, -3.341, 0.614)
pt3dadd(-63.149, 99.213, -3.382, 0.606)
pt3dadd(-63.257, 99.2, -3.424, 0.58)
pt3dadd(-63.365, 99.187, -3.466, 0.546)
pt3dadd(-63.474, 99.174, -3.503, 0.524)
pt3dadd(-63.586, 99.161, -3.534, 0.514)
pt3dadd(-63.698, 99.148, -3.565, 0.504)
pt3dadd(-63.743, 99.135, -3.659, 0.502)
pt3dadd(-63.776, 99.123, -3.762, 0.502)
pt3dadd(-63.833, 99.12, -3.852, 0.516)
pt3dadd(-63.912, 99.128, -3.931, 0.542)
pt3dadd(-63.988, 99.158, -4.002, 0.566)
pt3dadd(-64.066, 99.179, -4.073, 0.58)
pt3dadd(-64.148, 99.169, -4.15, 0.586)
pt3dadd(-64.23, 99.159, -4.227, 0.59)
pt3dadd(-64.313, 99.148, -4.304, 0.596)
pt3dadd(-64.395, 99.138, -4.381, 0.6)
pt3dadd(-64.485, 99.126, -4.451, 0.598)
pt3dadd(-64.579, 99.113, -4.514, 0.588)
pt3dadd(-64.674, 99.101, -4.578, 0.578)
pt3dadd(-64.769, 99.088, -4.642, 0.568)
pt3dadd(-64.864, 99.075, -4.705, 0.558)
pt3dadd(-64.96, 99.065, -4.768, 0.528)
pt3dadd(-65.057, 99.058, -4.83, 0.48)
pt3dadd(-65.155, 99.068, -4.879, 0.432)
pt3dadd(-65.257, 99.102, -4.91, 0.382)
pt3dadd(-65.359, 99.128, -4.948, 0.352)
pt3dadd(-65.46, 99.142, -4.996, 0.352)
pt3dadd(-65.532, 99.161, -5.065, 0.368)
pt3dadd(-65.56, 99.189, -5.164, 0.406)
pt3dadd(-65.611, 99.198, -5.253, 0.436)
pt3dadd(-65.694, 99.186, -5.331, 0.458)
pt3dadd(-65.775, 99.173, -5.409, 0.478)
pt3dadd(-65.856, 99.16, -5.486, 0.5)
pt3dadd(-65.961, 99.13, -5.53, 0.512)
pt3dadd(-66.069, 99.098, -5.57, 0.524)
pt3dadd(-66.172, 99.04, -5.587, 0.552)
pt3dadd(-66.279, 98.995, -5.615, 0.562)
pt3dadd(-66.387, 98.95, -5.644, 0.572)
pt3dadd(-66.495, 98.904, -5.673, 0.584)
pt3dadd(-66.603, 98.859, -5.702, 0.594)
pt3dadd(-66.711, 98.816, -5.732, 0.604)
pt3dadd(-66.82, 98.803, -5.768, 0.624)
pt3dadd(-66.93, 98.791, -5.804, 0.646)
pt3dadd(-67.037, 98.748, -5.833, 0.66)
pt3dadd(-67.142, 98.69, -5.858, 0.672)
pt3dadd(-67.236, 98.617, -5.887, 0.678)
pt3dadd(-67.323, 98.534, -5.92, 0.678)
pt3dadd(-67.318, 98.521, -5.928, 0.678)
pt3dadd(-67.369, 98.482, -6.01, 0.678)
pt3dadd(-67.405, 98.463, -6.112, 0.678)
pt3dadd(-67.473, 98.447, -6.189, 0.678)
pt3dadd(-67.579, 98.434, -6.233, 0.678)
pt3dadd(-67.656, 98.421, -6.314, 0.678)
pt3dadd(-67.728, 98.409, -6.399, 0.678)
pt3dadd(-67.801, 98.396, -6.484, 0.678)
pt3dadd(-67.874, 98.383, -6.569, 0.678)
pt3dadd(-67.869, 98.37, -6.577, 0.678)
pt3dadd(-67.941, 98.357, -6.662, 0.678)
pt3dadd(-68.034, 98.344, -6.727, 0.682)
pt3dadd(-68.129, 98.331, -6.791, 0.688)
pt3dadd(-68.224, 98.318, -6.855, 0.692)
pt3dadd(-68.319, 98.305, -6.919, 0.698)
pt3dadd(-68.414, 98.292, -6.982, 0.702)
pt3dadd(-68.524, 98.279, -7.016, 0.706)
pt3dadd(-68.637, 98.266, -7.045, 0.71)
pt3dadd(-68.749, 98.254, -7.075, 0.716)
pt3dadd(-68.861, 98.241, -7.104, 0.72)
pt3dadd(-68.972, 98.228, -7.134, 0.724)
pt3dadd(-69.085, 98.215, -7.163, 0.728)
pt3dadd(-69.189, 98.202, -7.131, 0.752)
pt3dadd(-69.291, 98.189, -7.097, 0.776)
pt3dadd(-69.398, 98.176, -7.068, 0.804)
pt3dadd(-69.503, 98.16, -7.046, 0.832)
pt3dadd(-69.602, 98.105, -7.09, 0.872)
pt3dadd(-69.699, 98.043, -7.127, 0.908)
pt3dadd(-69.781, 97.949, -7.136, 0.932)
}
}
proc shape3d_59() {
apic[14] { pt3dadd(-69.859, 97.853, -7.145, 0.954)
pt3dadd(-69.816, 97.725, -7.154, 0.954)
pt3dadd(-69.775, 97.598, -7.162, 0.954)
pt3dadd(-69.683, 97.508, -7.173, 0.92)
pt3dadd(-69.565, 97.466, -7.204, 0.85)
pt3dadd(-69.457, 97.431, -7.257, 0.752)
pt3dadd(-69.383, 97.334, -7.302, 0.71)
pt3dadd(-69.293, 97.26, -7.353, 0.694)
pt3dadd(-69.194, 97.197, -7.407, 0.682)
pt3dadd(-69.094, 97.133, -7.46, 0.67)
pt3dadd(-68.994, 97.07, -7.514, 0.658)
pt3dadd(-68.916, 96.992, -7.578, 0.634)
pt3dadd(-68.856, 96.904, -7.649, 0.604)
pt3dadd(-68.794, 96.816, -7.721, 0.574)
pt3dadd(-68.734, 96.728, -7.792, 0.542)
pt3dadd(-68.654, 96.642, -7.844, 0.5)
pt3dadd(-68.557, 96.558, -7.876, 0.446)
pt3dadd(-68.499, 96.461, -7.931, 0.418)
pt3dadd(-68.466, 96.355, -7.999, 0.406)
pt3dadd(-68.453, 96.316, -8.097, 0.402)
pt3dadd(-68.448, 96.299, -8.206, 0.402)
pt3dadd(-68.443, 96.281, -8.315, 0.402)
pt3dadd(-68.442, 96.254, -8.423, 0.394)
pt3dadd(-68.442, 96.226, -8.53, 0.384)
pt3dadd(-68.464, 96.183, -8.622, 0.37)
pt3dadd(-68.544, 96.102, -8.672, 0.344)
pt3dadd(-68.625, 96.021, -8.722, 0.318)
pt3dadd(-68.708, 95.954, -8.778, 0.292)
pt3dadd(-68.795, 95.912, -8.846, 0.266)
pt3dadd(-68.852, 95.832, -8.891, 0.244)
pt3dadd(-68.872, 95.702, -8.906, 0.228)
pt3dadd(-68.87, 95.569, -8.916, 0.226)
pt3dadd(-68.865, 95.436, -8.925, 0.248)
pt3dadd(-68.848, 95.304, -8.934, 0.298)
pt3dadd(-68.798, 95.189, -8.968, 0.388)
pt3dadd(-68.742, 95.123, -9.052, 0.376)
pt3dadd(-68.729, 95, -9.1, 0.332)
pt3dadd(-68.697, 94.884, -9.123, 0.296)
pt3dadd(-68.625, 94.782, -9.095, 0.282)
pt3dadd(-68.529, 94.703, -9.086, 0.276)
pt3dadd(-68.414, 94.643, -9.095, 0.276)
pt3dadd(-68.298, 94.584, -9.109, 0.282)
pt3dadd(-68.186, 94.524, -9.14, 0.308)
pt3dadd(-68.092, 94.451, -9.178, 0.326)
pt3dadd(-68.052, 94.34, -9.237, 0.326)
pt3dadd(-68.013, 94.229, -9.295, 0.326)
pt3dadd(-67.97, 94.118, -9.348, 0.328)
pt3dadd(-67.901, 94.003, -9.362, 0.34)
pt3dadd(-67.833, 93.889, -9.378, 0.352)
pt3dadd(-67.776, 93.791, -9.443, 0.352)
pt3dadd(-67.721, 93.693, -9.508, 0.352)
pt3dadd(-67.692, 93.636, -9.602, 0.394)
}
apic[15] {pt3dclear()
pt3dadd(-43.969, 100.125, 4.915, 0.942)
pt3dadd(-43.997, 100.098, 4.897, 0.914)
pt3dadd(-44.073, 100.027, 4.848, 0.834)
pt3dadd(-44.149, 99.955, 4.799, 0.754)
pt3dadd(-44.225, 99.883, 4.75, 0.676)
pt3dadd(-44.301, 99.811, 4.701, 0.596)
pt3dadd(-44.377, 99.74, 4.652, 0.518)
pt3dadd(-44.432, 99.663, 4.618, 0.452)
pt3dadd(-44.401, 99.563, 4.665, 0.452)
pt3dadd(-44.4, 99.456, 4.71, 0.452)
pt3dadd(-44.41, 99.352, 4.758, 0.452)
pt3dadd(-44.478, 99.272, 4.792, 0.452)
pt3dadd(-44.594, 99.246, 4.8, 0.452)
pt3dadd(-44.714, 99.24, 4.8, 0.452)
pt3dadd(-44.833, 99.249, 4.8, 0.452)
pt3dadd(-44.95, 99.277, 4.8, 0.452)
pt3dadd(-45.058, 99.326, 4.797, 0.452)
pt3dadd(-45.161, 99.37, 4.766, 0.452)
pt3dadd(-45.25, 99.423, 4.716, 0.452)
pt3dadd(-45.351, 99.453, 4.67, 0.452)
pt3dadd(-45.457, 99.473, 4.626, 0.452)
pt3dadd(-45.572, 99.48, 4.609, 0.452)
pt3dadd(-45.692, 99.48, 4.605, 0.452)
pt3dadd(-45.812, 99.48, 4.601, 0.452)
pt3dadd(-45.932, 99.48, 4.6, 0.452)
pt3dadd(-46.052, 99.48, 4.6, 0.452)
pt3dadd(-46.172, 99.48, 4.6, 0.452)
pt3dadd(-46.29, 99.48, 4.615, 0.452)
pt3dadd(-46.407, 99.477, 4.634, 0.452)
pt3dadd(-46.514, 99.426, 4.651, 0.452)
pt3dadd(-46.621, 99.375, 4.667, 0.452)
pt3dadd(-46.728, 99.325, 4.684, 0.452)
pt3dadd(-46.835, 99.274, 4.7, 0.452)
pt3dadd(-46.945, 99.23, 4.711, 0.452)
pt3dadd(-47.061, 99.198, 4.711, 0.452)
pt3dadd(-47.176, 99.167, 4.711, 0.452)
pt3dadd(-47.292, 99.136, 4.711, 0.452)
pt3dadd(-47.408, 99.103, 4.711, 0.452)
pt3dadd(-47.517, 99.055, 4.706, 0.452)
pt3dadd(-47.627, 99.006, 4.701, 0.452)
pt3dadd(-47.709, 98.92, 4.695, 0.452)
pt3dadd(-47.787, 98.829, 4.69, 0.452)
pt3dadd(-47.885, 98.791, 4.651, 0.452)
pt3dadd(-47.988, 98.763, 4.605, 0.452)
pt3dadd(-48.088, 98.76, 4.55, 0.452)
pt3dadd(-48.186, 98.76, 4.493, 0.452)
pt3dadd(-48.283, 98.713, 4.457, 0.452)
pt3dadd(-48.378, 98.648, 4.428, 0.452)
pt3dadd(-48.472, 98.583, 4.399, 0.452)
pt3dadd(-48.559, 98.513, 4.363, 0.452)
pt3dadd(-48.64, 98.44, 4.322, 0.452)
pt3dadd(-48.738, 98.375, 4.329, 0.452)
pt3dadd(-48.83, 98.298, 4.32, 0.452)
pt3dadd(-48.921, 98.221, 4.311, 0.452)
pt3dadd(-49.012, 98.144, 4.303, 0.452)
pt3dadd(-49.07, 98.05, 4.271, 0.452)
pt3dadd(-49.113, 97.95, 4.229, 0.452)
pt3dadd(-49.177, 97.882, 4.169, 0.452)
pt3dadd(-49.249, 97.821, 4.111, 0.452)
pt3dadd(-49.351, 97.757, 4.105, 0.452)
pt3dadd(-49.453, 97.694, 4.1, 0.452)
pt3dadd(-49.566, 97.654, 4.1, 0.452)
pt3dadd(-49.679, 97.614, 4.1, 0.452)
pt3dadd(-49.792, 97.582, 4.085, 0.452)
pt3dadd(-49.903, 97.547, 4.063, 0.452)
pt3dadd(-50.008, 97.491, 4.049, 0.452)
pt3dadd(-50.112, 97.434, 4.035, 0.452)
pt3dadd(-50.217, 97.378, 4.021, 0.452)
pt3dadd(-50.322, 97.321, 4.007, 0.452)
pt3dadd(-50.431, 97.274, 4, 0.452)
pt3dadd(-50.544, 97.235, 4, 0.452)
pt3dadd(-50.658, 97.197, 4, 0.452)
pt3dadd(-50.771, 97.158, 4, 0.452)
pt3dadd(-50.885, 97.119, 4, 0.452)
pt3dadd(-50.999, 97.08, 4, 0.452)
pt3dadd(-51.098, 97.013, 4, 0.452)
pt3dadd(-51.197, 96.945, 4, 0.452)
pt3dadd(-51.295, 96.877, 4, 0.452)
pt3dadd(-51.394, 96.809, 4, 0.452)
pt3dadd(-51.468, 96.717, 4, 0.452)
pt3dadd(-51.528, 96.614, 4, 0.452)
pt3dadd(-51.567, 96.503, 4, 0.452)
pt3dadd(-51.582, 96.384, 4, 0.452)
pt3dadd(-51.597, 96.265, 4, 0.452)
pt3dadd(-51.6, 96.145, 4, 0.452)
pt3dadd(-51.6, 96.025, 4, 0.452)
pt3dadd(-51.645, 95.917, 4.011, 0.452)
pt3dadd(-51.701, 95.813, 4.025, 0.452)
pt3dadd(-51.758, 95.708, 4.04, 0.452)
pt3dadd(-51.814, 95.604, 4.054, 0.452)
pt3dadd(-51.874, 95.503, 4.068, 0.452)
pt3dadd(-51.98, 95.45, 4.084, 0.452)
pt3dadd(-52.083, 95.394, 4.099, 0.452)
pt3dadd(-52.144, 95.293, 4.082, 0.452)
pt3dadd(-52.205, 95.192, 4.065, 0.452)
pt3dadd(-52.268, 95.093, 4.042, 0.452)
pt3dadd(-52.362, 95.05, 4.05, 0.452)
pt3dadd(-52.477, 95.044, 4.079, 0.452)
pt3dadd(-52.591, 95.029, 4.1, 0.452)
pt3dadd(-52.704, 94.989, 4.1, 0.452)
pt3dadd(-52.818, 94.95, 4.1, 0.452)
pt3dadd(-52.893, 94.868, 4.073, 0.452)
pt3dadd(-52.92, 94.814, 3.991, 0.452)
pt3dadd(-52.92, 94.799, 3.892, 0.452)
pt3dadd(-52.92, 94.777, 3.795, 0.452)
pt3dadd(-52.92, 94.698, 3.728, 0.452)
pt3dadd(-52.92, 94.588, 3.689, 0.452)
pt3dadd(-52.92, 94.483, 3.644, 0.452)
pt3dadd(-52.92, 94.416, 3.561, 0.452)
pt3dadd(-52.92, 94.347, 3.479, 0.452)
pt3dadd(-52.962, 94.248, 3.437, 0.452)
pt3dadd(-53.004, 94.146, 3.399, 0.452)
pt3dadd(-53.039, 94.031, 3.395, 0.452)
pt3dadd(-53.073, 93.916, 3.39, 0.452)
pt3dadd(-53.125, 93.821, 3.351, 0.452)
pt3dadd(-53.156, 93.714, 3.33, 0.452)
pt3dadd(-53.172, 93.595, 3.324, 0.452)
pt3dadd(-53.188, 93.476, 3.319, 0.452)
pt3dadd(-53.203, 93.357, 3.313, 0.452)
pt3dadd(-53.219, 93.238, 3.308, 0.452)
pt3dadd(-53.235, 93.12, 3.302, 0.452)
pt3dadd(-53.276, 93.009, 3.3, 0.452)
pt3dadd(-53.329, 92.901, 3.3, 0.452)
pt3dadd(-53.371, 92.793, 3.286, 0.452)
pt3dadd(-53.397, 92.682, 3.253, 0.452)
pt3dadd(-53.433, 92.577, 3.217, 0.452)
pt3dadd(-53.484, 92.482, 3.174, 0.452)
pt3dadd(-53.52, 92.426, 3.102, 0.452)
pt3dadd(-53.544, 92.402, 3.006, 0.452)
pt3dadd(-53.567, 92.345, 2.939, 0.452)
pt3dadd(-53.588, 92.228, 2.925, 0.452)
pt3dadd(-53.609, 92.111, 2.911, 0.452)
pt3dadd(-53.629, 91.994, 2.896, 0.452)
pt3dadd(-53.649, 91.881, 2.871, 0.452)
pt3dadd(-53.669, 91.771, 2.833, 0.452)
pt3dadd(-53.716, 91.673, 2.809, 0.452)
pt3dadd(-53.803, 91.59, 2.805, 0.452)
pt3dadd(-53.89, 91.508, 2.801, 0.452)
pt3dadd(-53.988, 91.44, 2.8, 0.452)
pt3dadd(-54.092, 91.379, 2.8, 0.452)
pt3dadd(-54.191, 91.312, 2.8, 0.452)
pt3dadd(-54.277, 91.229, 2.807, 0.452)
pt3dadd(-54.362, 91.145, 2.815, 0.452)
pt3dadd(-54.446, 91.06, 2.824, 0.452)
pt3dadd(-54.531, 90.976, 2.833, 0.452)
pt3dadd(-54.612, 90.888, 2.842, 0.452)
pt3dadd(-54.693, 90.8, 2.851, 0.452)
pt3dadd(-54.774, 90.712, 2.859, 0.452)
}
}
proc shape3d_60() {
apic[15] { pt3dadd(-54.852, 90.624, 2.86, 0.452)
pt3dadd(-54.919, 90.535, 2.823, 0.452)
pt3dadd(-54.998, 90.454, 2.8, 0.452)
pt3dadd(-55.097, 90.386, 2.8, 0.452)
pt3dadd(-55.191, 90.321, 2.815, 0.452)
pt3dadd(-55.267, 90.268, 2.878, 0.452)
pt3dadd(-55.332, 90.231, 2.953, 0.452)
pt3dadd(-55.385, 90.211, 3.041, 0.452)
pt3dadd(-55.452, 90.161, 3.09, 0.452)
pt3dadd(-55.537, 90.076, 3.094, 0.452)
pt3dadd(-55.622, 89.991, 3.097, 0.452)
pt3dadd(-55.707, 89.907, 3.1, 0.452)
pt3dadd(-55.753, 89.796, 3.1, 0.452)
pt3dadd(-55.8, 89.685, 3.1, 0.452)
pt3dadd(-55.892, 89.622, 3.103, 0.452)
pt3dadd(-56.004, 89.577, 3.106, 0.452)
pt3dadd(-56.115, 89.533, 3.11, 0.452)
pt3dadd(-56.221, 89.52, 3.147, 0.452)
pt3dadd(-56.324, 89.52, 3.198, 0.452)
pt3dadd(-56.422, 89.52, 3.255, 0.452)
pt3dadd(-56.534, 89.52, 3.289, 0.452)
pt3dadd(-56.649, 89.52, 3.317, 0.452)
pt3dadd(-56.759, 89.512, 3.353, 0.452)
pt3dadd(-56.861, 89.472, 3.39, 0.452)
pt3dadd(-56.941, 89.384, 3.4, 0.452)
pt3dadd(-56.984, 89.275, 3.4, 0.452)
pt3dadd(-57, 89.156, 3.4, 0.452)
pt3dadd(-57, 89.036, 3.4, 0.452)
pt3dadd(-56.982, 88.917, 3.4, 0.452)
pt3dadd(-56.935, 88.809, 3.4, 0.452)
pt3dadd(-56.86, 88.715, 3.4, 0.452)
pt3dadd(-56.809, 88.633, 3.345, 0.452)
pt3dadd(-56.79, 88.553, 3.284, 0.452)
pt3dadd(-56.851, 88.476, 3.227, 0.452)
pt3dadd(-56.905, 88.382, 3.206, 0.452)
pt3dadd(-56.953, 88.273, 3.218, 0.452)
pt3dadd(-57, 88.163, 3.23, 0.452)
pt3dadd(-57.071, 88.075, 3.258, 0.452)
pt3dadd(-57.153, 87.998, 3.287, 0.452)
pt3dadd(-57.241, 87.932, 3.261, 0.452)
pt3dadd(-57.308, 87.834, 3.246, 0.452)
pt3dadd(-57.374, 87.735, 3.232, 0.452)
pt3dadd(-57.441, 87.637, 3.217, 0.452)
pt3dadd(-57.507, 87.539, 3.203, 0.452)
pt3dadd(-57.564, 87.433, 3.2, 0.452)
pt3dadd(-57.617, 87.326, 3.2, 0.452)
pt3dadd(-57.688, 87.232, 3.19, 0.452)
pt3dadd(-57.772, 87.148, 3.173, 0.452)
pt3dadd(-57.863, 87.081, 3.143, 0.452)
pt3dadd(-57.958, 87.023, 3.106, 0.452)
pt3dadd(-58.068, 86.979, 3.104, 0.452)
pt3dadd(-58.18, 86.937, 3.109, 0.452)
pt3dadd(-58.273, 86.88, 3.139, 0.452)
pt3dadd(-58.352, 86.801, 3.17, 0.452)
pt3dadd(-58.428, 86.709, 3.177, 0.452)
pt3dadd(-58.503, 86.616, 3.184, 0.452)
pt3dadd(-58.579, 86.523, 3.191, 0.452)
pt3dadd(-58.655, 86.431, 3.198, 0.452)
pt3dadd(-58.724, 86.333, 3.2, 0.452)
pt3dadd(-58.79, 86.233, 3.2, 0.452)
pt3dadd(-58.856, 86.132, 3.2, 0.452)
pt3dadd(-58.922, 86.032, 3.2, 0.452)
pt3dadd(-58.988, 85.932, 3.2, 0.452)
pt3dadd(-59.074, 85.851, 3.2, 0.452)
pt3dadd(-59.173, 85.784, 3.2, 0.452)
pt3dadd(-59.245, 85.695, 3.2, 0.452)
pt3dadd(-59.284, 85.581, 3.2, 0.452)
pt3dadd(-59.329, 85.472, 3.198, 0.452)
pt3dadd(-59.42, 85.396, 3.181, 0.452)
pt3dadd(-59.514, 85.332, 3.16, 0.452)
pt3dadd(-59.626, 85.326, 3.126, 0.452)
pt3dadd(-59.739, 85.32, 3.091, 0.452)
pt3dadd(-59.824, 85.247, 3.062, 0.452)
pt3dadd(-59.907, 85.168, 3.033, 0.452)
pt3dadd(-59.991, 85.089, 3.003, 0.452)
pt3dadd(-60.073, 85.014, 2.967, 0.452)
pt3dadd(-60.158, 84.942, 2.93, 0.452)
pt3dadd(-60.253, 84.882, 2.899, 0.452)
pt3dadd(-60.336, 84.802, 2.873, 0.452)
pt3dadd(-60.42, 84.721, 2.848, 0.452)
pt3dadd(-60.503, 84.641, 2.822, 0.452)
pt3dadd(-60.588, 84.564, 2.806, 0.452)
pt3dadd(-60.684, 84.506, 2.842, 0.452)
pt3dadd(-60.779, 84.444, 2.872, 0.452)
pt3dadd(-60.875, 84.375, 2.89, 0.452)
pt3dadd(-60.961, 84.297, 2.891, 0.452)
pt3dadd(-61.033, 84.204, 2.867, 0.452)
pt3dadd(-61.095, 84.135, 2.814, 0.452)
pt3dadd(-61.151, 84.088, 2.735, 0.452)
pt3dadd(-61.224, 84.016, 2.758, 0.452)
pt3dadd(-61.286, 83.916, 2.77, 0.452)
pt3dadd(-61.344, 83.812, 2.775, 0.452)
pt3dadd(-61.402, 83.707, 2.78, 0.452)
pt3dadd(-61.46, 83.602, 2.784, 0.452)
pt3dadd(-61.518, 83.497, 2.789, 0.452)
pt3dadd(-61.59, 83.403, 2.77, 0.452)
pt3dadd(-61.662, 83.31, 2.75, 0.452)
pt3dadd(-61.734, 83.217, 2.73, 0.452)
pt3dadd(-61.805, 83.125, 2.71, 0.452)
pt3dadd(-61.876, 83.029, 2.696, 0.452)
pt3dadd(-61.946, 82.932, 2.689, 0.452)
pt3dadd(-62.015, 82.834, 2.683, 0.452)
pt3dadd(-62.085, 82.737, 2.675, 0.452)
pt3dadd(-62.154, 82.64, 2.669, 0.452)
pt3dadd(-62.243, 82.562, 2.656, 0.452)
pt3dadd(-62.339, 82.493, 2.641, 0.452)
pt3dadd(-62.435, 82.423, 2.627, 0.452)
pt3dadd(-62.532, 82.353, 2.612, 0.452)
pt3dadd(-62.626, 82.281, 2.6, 0.452)
pt3dadd(-62.709, 82.194, 2.6, 0.452)
pt3dadd(-62.793, 82.108, 2.6, 0.452)
pt3dadd(-62.876, 82.022, 2.6, 0.452)
pt3dadd(-62.96, 81.936, 2.6, 0.452)
pt3dadd(-63.038, 81.846, 2.601, 0.452)
pt3dadd(-63.098, 81.743, 2.608, 0.452)
pt3dadd(-63.158, 81.639, 2.615, 0.452)
pt3dadd(-63.218, 81.535, 2.622, 0.452)
pt3dadd(-63.278, 81.432, 2.629, 0.452)
pt3dadd(-63.333, 81.328, 2.644, 0.452)
pt3dadd(-63.375, 81.224, 2.679, 0.452)
pt3dadd(-63.413, 81.115, 2.7, 0.452)
pt3dadd(-63.446, 80.999, 2.7, 0.452)
pt3dadd(-63.479, 80.884, 2.7, 0.452)
pt3dadd(-63.486, 80.778, 2.655, 0.452)
pt3dadd(-63.492, 80.672, 2.608, 0.452)
pt3dadd(-63.544, 80.59, 2.553, 0.452)
pt3dadd(-63.606, 80.512, 2.501, 0.452)
pt3dadd(-63.673, 80.413, 2.511, 0.452)
pt3dadd(-63.74, 80.314, 2.521, 0.452)
pt3dadd(-63.807, 80.215, 2.53, 0.452)
pt3dadd(-63.835, 80.106, 2.555, 0.452)
pt3dadd(-63.847, 79.992, 2.585, 0.452)
pt3dadd(-63.887, 79.886, 2.6, 0.452)
pt3dadd(-63.957, 79.788, 2.6, 0.452)
pt3dadd(-64.027, 79.691, 2.6, 0.452)
pt3dadd(-64.117, 79.616, 2.6, 0.452)
pt3dadd(-64.221, 79.555, 2.6, 0.452)
pt3dadd(-64.32, 79.488, 2.6, 0.452)
pt3dadd(-64.406, 79.406, 2.61, 0.452)
pt3dadd(-64.488, 79.32, 2.625, 0.452)
pt3dadd(-64.57, 79.235, 2.64, 0.452)
pt3dadd(-64.653, 79.149, 2.655, 0.452)
pt3dadd(-64.74, 79.071, 2.663, 0.452)
pt3dadd(-64.849, 79.025, 2.645, 0.452)
pt3dadd(-64.957, 78.978, 2.627, 0.452)
pt3dadd(-65.066, 78.932, 2.609, 0.452)
pt3dadd(-65.174, 78.885, 2.591, 0.452)
pt3dadd(-65.26, 78.806, 2.573, 0.452)
pt3dadd(-65.344, 78.723, 2.555, 0.452)
pt3dadd(-65.427, 78.639, 2.537, 0.452)
pt3dadd(-65.511, 78.556, 2.519, 0.452)
pt3dadd(-65.611, 78.497, 2.508, 0.452)
pt3dadd(-65.724, 78.456, 2.502, 0.452)
pt3dadd(-65.836, 78.415, 2.497, 0.452)
pt3dadd(-65.949, 78.374, 2.491, 0.452)
pt3dadd(-66.037, 78.325, 2.447, 0.452)
pt3dadd(-66.113, 78.271, 2.383, 0.452)
pt3dadd(-66.189, 78.198, 2.337, 0.452)
pt3dadd(-66.272, 78.132, 2.3, 0.452)
pt3dadd(-66.392, 78.122, 2.3, 0.452)
pt3dadd(-66.511, 78.113, 2.3, 0.452)
pt3dadd(-66.627, 78.09, 2.306, 0.452)
pt3dadd(-66.737, 78.045, 2.322, 0.452)
pt3dadd(-66.847, 78.023, 2.339, 0.452)
pt3dadd(-66.961, 78.054, 2.359, 0.452)
pt3dadd(-67.074, 78.085, 2.378, 0.452)
pt3dadd(-67.188, 78.117, 2.398, 0.452)
pt3dadd(-67.261, 78.175, 2.343, 0.452)
pt3dadd(-67.33, 78.227, 2.276, 0.452)
pt3dadd(-67.397, 78.232, 2.193, 0.452)
pt3dadd(-67.463, 78.237, 2.11, 0.452)
pt3dadd(-67.528, 78.24, 2.026, 0.452)
pt3dadd(-67.589, 78.24, 1.94, 0.452)
pt3dadd(-67.645, 78.24, 1.852, 0.452)
pt3dadd(-67.683, 78.24, 1.757, 0.452)
pt3dadd(-67.729, 78.24, 1.665, 0.452)
pt3dadd(-67.778, 78.236, 1.575, 0.452)
pt3dadd(-67.861, 78.168, 1.531, 0.452)
pt3dadd(-67.952, 78.104, 1.5, 0.452)
pt3dadd(-68.059, 78.051, 1.5, 0.452)
pt3dadd(-68.167, 78, 1.5, 0.452)
pt3dadd(-68.287, 78, 1.5, 0.452)
pt3dadd(-68.407, 78, 1.5, 0.452)
pt3dadd(-68.527, 78, 1.5, 0.452)
pt3dadd(-68.647, 78, 1.5, 0.452)
pt3dadd(-68.767, 78, 1.5, 0.452)
pt3dadd(-68.887, 78, 1.5, 0.452)
pt3dadd(-69.007, 78, 1.5, 0.452)
pt3dadd(-69.127, 78, 1.5, 0.452)
pt3dadd(-69.247, 78, 1.5, 0.452)
pt3dadd(-69.367, 78, 1.5, 0.452)
pt3dadd(-69.487, 78, 1.5, 0.452)
pt3dadd(-69.607, 77.999, 1.5, 0.452)
pt3dadd(-69.726, 77.984, 1.5, 0.452)
pt3dadd(-69.845, 77.969, 1.5, 0.452)
pt3dadd(-69.96, 77.94, 1.5, 0.452)
pt3dadd(-70.067, 77.886, 1.5, 0.452)
pt3dadd(-70.17, 77.827, 1.5, 0.452)
pt3dadd(-70.245, 77.734, 1.5, 0.452)
pt3dadd(-70.32, 77.64, 1.5, 0.452)
}
}
proc shape3d_61() {
apic[15] { }
apic[16] {pt3dclear()
pt3dadd(2.587, 122.032, 19.054, 2.646)
pt3dadd(2.587, 122.108, 19.061, 2.582)
pt3dadd(2.587, 122.227, 19.072, 2.482)
pt3dadd(2.587, 122.346, 19.083, 2.38)
pt3dadd(2.586, 122.466, 19.094, 2.28)
pt3dadd(2.586, 122.585, 19.105, 2.18)
pt3dadd(2.586, 122.704, 19.117, 2.078)
pt3dadd(2.586, 122.824, 19.128, 1.978)
pt3dadd(2.585, 122.942, 19.139, 1.878)
pt3dadd(2.585, 123.062, 19.15, 1.776)
pt3dadd(2.585, 123.181, 19.161, 1.676)
pt3dadd(2.595, 123.299, 19.153, 1.606)
pt3dadd(2.611, 123.415, 19.134, 1.552)
pt3dadd(2.628, 123.532, 19.115, 1.498)
pt3dadd(2.644, 123.649, 19.096, 1.446)
pt3dadd(2.66, 123.766, 19.076, 1.392)
pt3dadd(2.676, 123.882, 19.057, 1.338)
pt3dadd(2.693, 123.998, 19.038, 1.284)
pt3dadd(2.709, 124.115, 19.019, 1.232)
pt3dadd(2.725, 124.232, 19, 1.178)
pt3dadd(2.741, 124.349, 18.981, 1.124)
pt3dadd(2.759, 124.462, 18.953, 1.102)
pt3dadd(2.778, 124.574, 18.92, 1.092)
pt3dadd(2.797, 124.686, 18.887, 1.084)
pt3dadd(2.816, 124.798, 18.854, 1.076)
pt3dadd(2.835, 124.909, 18.822, 1.066)
pt3dadd(2.853, 125.021, 18.789, 1.058)
pt3dadd(2.872, 125.132, 18.756, 1.05)
pt3dadd(2.891, 125.245, 18.723, 1.04)
pt3dadd(2.91, 125.357, 18.691, 1.032)
pt3dadd(2.929, 125.468, 18.658, 1.024)
pt3dadd(2.959, 125.578, 18.625, 1.028)
pt3dadd(2.994, 125.686, 18.593, 1.04)
pt3dadd(3.029, 125.794, 18.56, 1.05)
pt3dadd(3.064, 125.902, 18.528, 1.062)
pt3dadd(3.098, 126.01, 18.496, 1.074)
pt3dadd(3.133, 126.118, 18.463, 1.084)
pt3dadd(3.168, 126.226, 18.431, 1.096)
pt3dadd(3.203, 126.334, 18.398, 1.106)
pt3dadd(3.238, 126.442, 18.366, 1.118)
pt3dadd(3.273, 126.55, 18.333, 1.128)
pt3dadd(3.323, 126.655, 18.312, 1.13)
pt3dadd(3.376, 126.761, 18.292, 1.13)
pt3dadd(3.428, 126.865, 18.272, 1.13)
pt3dadd(3.481, 126.971, 18.252, 1.13)
pt3dadd(3.534, 127.075, 18.232, 1.13)
pt3dadd(3.586, 127.181, 18.212, 1.13)
pt3dadd(3.639, 127.286, 18.192, 1.13)
pt3dadd(3.692, 127.391, 18.172, 1.13)
pt3dadd(3.744, 127.496, 18.152, 1.13)
pt3dadd(3.797, 127.601, 18.132, 1.13)
pt3dadd(3.846, 127.71, 18.121, 1.13)
pt3dadd(3.895, 127.819, 18.112, 1.13)
pt3dadd(3.944, 127.928, 18.102, 1.13)
pt3dadd(3.993, 128.036, 18.093, 1.13)
pt3dadd(4.042, 128.146, 18.084, 1.13)
pt3dadd(4.091, 128.255, 18.075, 1.13)
pt3dadd(4.14, 128.364, 18.065, 1.13)
pt3dadd(4.188, 128.473, 18.056, 1.13)
pt3dadd(4.237, 128.582, 18.047, 1.13)
pt3dadd(4.286, 128.692, 18.038, 1.13)
pt3dadd(4.348, 128.794, 18.036, 1.142)
pt3dadd(4.412, 128.896, 18.036, 1.156)
pt3dadd(4.475, 128.998, 18.036, 1.17)
pt3dadd(4.539, 129.098, 18.036, 1.184)
pt3dadd(4.603, 129.2, 18.036, 1.196)
pt3dadd(4.666, 129.302, 18.036, 1.21)
pt3dadd(4.73, 129.404, 18.036, 1.224)
pt3dadd(4.794, 129.505, 18.036, 1.238)
pt3dadd(4.857, 129.607, 18.036, 1.252)
pt3dadd(4.921, 129.709, 18.036, 1.266)
pt3dadd(4.989, 129.808, 18.039, 1.268)
pt3dadd(5.058, 129.906, 18.042, 1.268)
pt3dadd(5.127, 130.004, 18.045, 1.27)
pt3dadd(5.195, 130.103, 18.048, 1.272)
pt3dadd(5.264, 130.201, 18.051, 1.274)
pt3dadd(5.332, 130.3, 18.055, 1.274)
pt3dadd(5.401, 130.398, 18.058, 1.276)
pt3dadd(5.47, 130.496, 18.061, 1.278)
pt3dadd(5.538, 130.595, 18.064, 1.278)
pt3dadd(5.607, 130.693, 18.067, 1.28)
pt3dadd(5.676, 130.79, 18.072, 1.264)
pt3dadd(5.746, 130.889, 18.077, 1.248)
pt3dadd(5.815, 130.986, 18.082, 1.23)
pt3dadd(5.885, 131.083, 18.087, 1.214)
pt3dadd(5.955, 131.182, 18.092, 1.196)
pt3dadd(6.024, 131.279, 18.097, 1.18)
pt3dadd(6.094, 131.376, 18.102, 1.162)
pt3dadd(6.163, 131.474, 18.108, 1.146)
pt3dadd(6.233, 131.572, 18.113, 1.128)
pt3dadd(6.303, 131.669, 18.118, 1.112)
pt3dadd(6.358, 131.774, 18.126, 1.092)
pt3dadd(6.413, 131.881, 18.134, 1.074)
pt3dadd(6.467, 131.988, 18.143, 1.054)
pt3dadd(6.522, 132.094, 18.151, 1.034)
pt3dadd(6.576, 132.2, 18.16, 1.016)
pt3dadd(6.631, 132.307, 18.168, 0.996)
pt3dadd(6.685, 132.413, 18.177, 0.976)
pt3dadd(6.74, 132.52, 18.185, 0.958)
pt3dadd(6.794, 132.626, 18.194, 0.938)
pt3dadd(6.849, 132.733, 18.202, 0.918)
pt3dadd(6.897, 132.833, 18.239, 0.94)
pt3dadd(6.944, 132.932, 18.279, 0.964)
pt3dadd(6.992, 133.031, 18.318, 0.988)
pt3dadd(7.039, 133.13, 18.358, 1.014)
pt3dadd(7.087, 133.23, 18.398, 1.038)
pt3dadd(7.135, 133.33, 18.437, 1.062)
pt3dadd(7.182, 133.429, 18.477, 1.086)
pt3dadd(7.23, 133.528, 18.517, 1.112)
pt3dadd(7.277, 133.627, 18.556, 1.136)
pt3dadd(7.325, 133.727, 18.596, 1.16)
pt3dadd(7.392, 133.825, 18.608, 1.202)
pt3dadd(7.458, 133.924, 18.621, 1.244)
pt3dadd(7.525, 134.023, 18.633, 1.286)
pt3dadd(7.592, 134.122, 18.646, 1.328)
pt3dadd(7.658, 134.22, 18.658, 1.372)
pt3dadd(7.725, 134.318, 18.67, 1.414)
pt3dadd(7.792, 134.417, 18.683, 1.456)
pt3dadd(7.859, 134.516, 18.695, 1.498)
pt3dadd(7.925, 134.615, 18.707, 1.54)
pt3dadd(7.992, 134.713, 18.72, 1.582)
}
apic[17] {pt3dclear()
pt3dadd(7.992, 134.713, 18.72, 1.582)
pt3dadd(8.021, 134.77, 18.702, 1.592)
pt3dadd(8.073, 134.872, 18.671, 1.61)
pt3dadd(8.125, 134.974, 18.64, 1.63)
pt3dadd(8.177, 135.074, 18.609, 1.648)
pt3dadd(8.229, 135.176, 18.578, 1.666)
pt3dadd(8.281, 135.277, 18.547, 1.684)
pt3dadd(8.333, 135.379, 18.515, 1.704)
pt3dadd(8.385, 135.48, 18.484, 1.722)
pt3dadd(8.437, 135.582, 18.453, 1.74)
pt3dadd(8.489, 135.684, 18.422, 1.758)
pt3dadd(8.541, 135.785, 18.391, 1.778)
pt3dadd(8.593, 135.887, 18.36, 1.796)
pt3dadd(8.654, 135.984, 18.331, 1.738)
pt3dadd(8.718, 136.08, 18.304, 1.65)
pt3dadd(8.782, 136.176, 18.277, 1.56)
pt3dadd(8.847, 136.272, 18.25, 1.472)
pt3dadd(8.911, 136.368, 18.223, 1.382)
pt3dadd(8.975, 136.464, 18.196, 1.292)
pt3dadd(9.04, 136.56, 18.169, 1.204)
pt3dadd(9.104, 136.656, 18.141, 1.114)
pt3dadd(9.168, 136.752, 18.114, 1.024)
pt3dadd(9.232, 136.848, 18.087, 0.936)
pt3dadd(9.299, 136.943, 18.062, 0.882)
pt3dadd(9.368, 137.038, 18.039, 0.844)
pt3dadd(9.436, 137.131, 18.015, 0.806)
pt3dadd(9.504, 137.226, 17.991, 0.768)
pt3dadd(9.572, 137.321, 17.967, 0.732)
pt3dadd(9.64, 137.416, 17.943, 0.694)
pt3dadd(9.708, 137.51, 17.919, 0.656)
pt3dadd(9.776, 137.604, 17.896, 0.618)
pt3dadd(9.844, 137.699, 17.872, 0.58)
pt3dadd(9.912, 137.794, 17.848, 0.542)
pt3dadd(9.982, 137.887, 17.825, 0.542)
pt3dadd(10.053, 137.981, 17.804, 0.556)
pt3dadd(10.123, 138.074, 17.782, 0.57)
pt3dadd(10.193, 138.168, 17.76, 0.586)
pt3dadd(10.263, 138.262, 17.738, 0.6)
pt3dadd(10.334, 138.355, 17.716, 0.616)
pt3dadd(10.404, 138.449, 17.694, 0.63)
pt3dadd(10.474, 138.542, 17.672, 0.644)
pt3dadd(10.545, 138.636, 17.65, 0.66)
pt3dadd(10.615, 138.73, 17.628, 0.674)
pt3dadd(10.673, 138.826, 17.593, 0.678)
pt3dadd(10.727, 138.92, 17.552, 0.678)
pt3dadd(10.78, 139.016, 17.51, 0.678)
pt3dadd(10.834, 139.111, 17.469, 0.678)
pt3dadd(10.887, 139.207, 17.428, 0.678)
pt3dadd(10.941, 139.302, 17.387, 0.678)
pt3dadd(10.994, 139.398, 17.346, 0.678)
pt3dadd(11.048, 139.493, 17.305, 0.678)
pt3dadd(11.101, 139.589, 17.264, 0.678)
pt3dadd(11.155, 139.684, 17.223, 0.678)
pt3dadd(11.214, 139.777, 17.185, 0.686)
pt3dadd(11.275, 139.872, 17.149, 0.698)
pt3dadd(11.337, 139.966, 17.113, 0.71)
pt3dadd(11.398, 140.059, 17.077, 0.722)
pt3dadd(11.46, 140.153, 17.042, 0.734)
pt3dadd(11.521, 140.246, 17.006, 0.746)
pt3dadd(11.583, 140.34, 16.97, 0.758)
pt3dadd(11.644, 140.434, 16.934, 0.768)
pt3dadd(11.706, 140.527, 16.898, 0.78)
pt3dadd(11.767, 140.621, 16.862, 0.792)
pt3dadd(11.83, 140.71, 16.82, 0.81)
pt3dadd(11.893, 140.797, 16.777, 0.828)
pt3dadd(11.956, 140.885, 16.733, 0.848)
pt3dadd(12.019, 140.972, 16.689, 0.866)
pt3dadd(12.082, 141.06, 16.646, 0.884)
pt3dadd(12.146, 141.148, 16.602, 0.904)
pt3dadd(12.209, 141.235, 16.559, 0.922)
pt3dadd(12.272, 141.323, 16.515, 0.942)
pt3dadd(12.335, 141.41, 16.471, 0.96)
pt3dadd(12.398, 141.498, 16.428, 0.98)
pt3dadd(12.462, 141.578, 16.377, 0.994)
pt3dadd(12.527, 141.658, 16.324, 1.01)
pt3dadd(12.591, 141.738, 16.272, 1.024)
pt3dadd(12.656, 141.817, 16.22, 1.04)
pt3dadd(12.72, 141.896, 16.168, 1.054)
pt3dadd(12.785, 141.976, 16.116, 1.07)
}
}
proc shape3d_62() {
apic[17] { pt3dadd(12.849, 142.056, 16.064, 1.084)
pt3dadd(12.914, 142.135, 16.011, 1.1)
pt3dadd(12.978, 142.214, 15.959, 1.114)
pt3dadd(13.043, 142.294, 15.907, 1.13)
pt3dadd(13.119, 142.379, 15.876, 1.13)
pt3dadd(13.196, 142.463, 15.845, 1.13)
pt3dadd(13.272, 142.548, 15.814, 1.13)
pt3dadd(13.349, 142.632, 15.783, 1.13)
pt3dadd(13.426, 142.717, 15.752, 1.13)
pt3dadd(13.503, 142.801, 15.722, 1.13)
pt3dadd(13.579, 142.885, 15.691, 1.13)
pt3dadd(13.656, 142.97, 15.66, 1.13)
pt3dadd(13.733, 143.054, 15.629, 1.13)
pt3dadd(13.81, 143.14, 15.599, 1.13)
pt3dadd(13.885, 143.23, 15.576, 1.13)
pt3dadd(13.96, 143.318, 15.554, 1.13)
pt3dadd(14.035, 143.408, 15.532, 1.13)
pt3dadd(14.11, 143.498, 15.51, 1.13)
pt3dadd(14.185, 143.588, 15.488, 1.13)
pt3dadd(14.26, 143.678, 15.466, 1.13)
pt3dadd(14.336, 143.767, 15.444, 1.13)
pt3dadd(14.411, 143.857, 15.422, 1.13)
pt3dadd(14.486, 143.947, 15.4, 1.13)
pt3dadd(14.561, 144.037, 15.378, 1.13)
pt3dadd(14.616, 144.126, 15.331, 1.064)
pt3dadd(14.671, 144.216, 15.282, 0.996)
pt3dadd(14.725, 144.306, 15.234, 0.928)
pt3dadd(14.78, 144.396, 15.185, 0.86)
pt3dadd(14.835, 144.485, 15.137, 0.792)
pt3dadd(14.889, 144.575, 15.089, 0.724)
pt3dadd(14.944, 144.665, 15.04, 0.656)
pt3dadd(14.999, 144.755, 14.992, 0.588)
pt3dadd(15.053, 144.844, 14.943, 0.52)
pt3dadd(15.108, 144.934, 14.895, 0.452)
}
apic[18] {pt3dclear()
pt3dadd(15.108, 144.934, 14.895, 0.452)
pt3dadd(15.123, 145.038, 14.866, 0.452)
pt3dadd(15.14, 145.151, 14.836, 0.452)
pt3dadd(15.154, 145.266, 14.808, 0.448)
pt3dadd(15.165, 145.381, 14.782, 0.442)
pt3dadd(15.177, 145.496, 14.757, 0.436)
pt3dadd(15.188, 145.612, 14.731, 0.43)
pt3dadd(15.2, 145.727, 14.705, 0.424)
pt3dadd(15.212, 145.842, 14.68, 0.416)
pt3dadd(15.223, 145.958, 14.654, 0.41)
pt3dadd(15.235, 146.074, 14.628, 0.404)
pt3dadd(15.246, 146.189, 14.603, 0.398)
pt3dadd(15.258, 146.304, 14.577, 0.392)
pt3dadd(15.261, 146.423, 14.563, 0.378)
pt3dadd(15.261, 146.542, 14.553, 0.362)
pt3dadd(15.26, 146.662, 14.544, 0.346)
pt3dadd(15.26, 146.78, 14.534, 0.33)
pt3dadd(15.259, 146.9, 14.525, 0.314)
pt3dadd(15.259, 147.019, 14.515, 0.296)
pt3dadd(15.258, 147.139, 14.506, 0.28)
pt3dadd(15.258, 147.258, 14.496, 0.264)
pt3dadd(15.257, 147.378, 14.487, 0.248)
pt3dadd(15.257, 147.498, 14.477, 0.23)
pt3dadd(15.256, 147.617, 14.474, 0.226)
pt3dadd(15.255, 147.737, 14.474, 0.226)
pt3dadd(15.255, 147.857, 14.474, 0.226)
pt3dadd(15.254, 147.977, 14.474, 0.226)
pt3dadd(15.253, 148.097, 14.474, 0.226)
pt3dadd(15.252, 148.217, 14.474, 0.226)
pt3dadd(15.251, 148.337, 14.474, 0.226)
pt3dadd(15.25, 148.457, 14.474, 0.226)
pt3dadd(15.249, 148.577, 14.474, 0.226)
pt3dadd(15.249, 148.697, 14.474, 0.226)
pt3dadd(15.247, 148.817, 14.474, 0.226)
pt3dadd(15.245, 148.937, 14.474, 0.226)
pt3dadd(15.244, 149.057, 14.474, 0.226)
pt3dadd(15.242, 149.177, 14.474, 0.226)
pt3dadd(15.24, 149.297, 14.474, 0.226)
pt3dadd(15.238, 149.417, 14.474, 0.226)
pt3dadd(15.236, 149.537, 14.474, 0.226)
pt3dadd(15.235, 149.657, 14.474, 0.226)
pt3dadd(15.233, 149.777, 14.474, 0.226)
pt3dadd(15.231, 149.897, 14.474, 0.226)
pt3dadd(15.228, 150.017, 14.474, 0.25)
pt3dadd(15.225, 150.137, 14.474, 0.284)
pt3dadd(15.221, 150.257, 14.474, 0.318)
pt3dadd(15.218, 150.377, 14.474, 0.352)
pt3dadd(15.214, 150.497, 14.474, 0.388)
pt3dadd(15.211, 150.617, 14.474, 0.422)
pt3dadd(15.207, 150.737, 14.474, 0.456)
pt3dadd(15.204, 150.857, 14.474, 0.49)
pt3dadd(15.2, 150.977, 14.474, 0.524)
pt3dadd(15.197, 151.097, 14.473, 0.558)
pt3dadd(15.19, 151.217, 14.473, 0.558)
pt3dadd(15.183, 151.337, 14.473, 0.54)
pt3dadd(15.176, 151.456, 14.473, 0.524)
pt3dadd(15.168, 151.576, 14.473, 0.508)
pt3dadd(15.161, 151.696, 14.473, 0.49)
pt3dadd(15.154, 151.816, 14.473, 0.474)
pt3dadd(15.147, 151.936, 14.473, 0.458)
pt3dadd(15.139, 152.054, 14.473, 0.44)
pt3dadd(15.132, 152.174, 14.472, 0.424)
pt3dadd(15.125, 152.294, 14.472, 0.408)
pt3dadd(15.114, 152.414, 14.472, 0.404)
pt3dadd(15.102, 152.533, 14.472, 0.408)
pt3dadd(15.09, 152.653, 14.472, 0.41)
pt3dadd(15.078, 152.772, 14.471, 0.414)
pt3dadd(15.065, 152.892, 14.471, 0.416)
pt3dadd(15.053, 153.011, 14.471, 0.42)
pt3dadd(15.041, 153.131, 14.471, 0.424)
pt3dadd(15.029, 153.25, 14.47, 0.426)
pt3dadd(15.017, 153.37, 14.47, 0.43)
pt3dadd(15.005, 153.488, 14.47, 0.432)
pt3dadd(14.983, 153.606, 14.47, 0.45)
pt3dadd(14.956, 153.724, 14.469, 0.476)
pt3dadd(14.93, 153.84, 14.469, 0.5)
pt3dadd(14.903, 153.958, 14.469, 0.524)
pt3dadd(14.877, 154.074, 14.468, 0.55)
pt3dadd(14.85, 154.192, 14.468, 0.574)
pt3dadd(14.824, 154.308, 14.467, 0.598)
pt3dadd(14.797, 154.426, 14.467, 0.624)
pt3dadd(14.771, 154.542, 14.466, 0.648)
pt3dadd(14.744, 154.66, 14.466, 0.672)
pt3dadd(14.703, 154.772, 14.465, 0.676)
pt3dadd(14.658, 154.883, 14.465, 0.674)
pt3dadd(14.612, 154.994, 14.464, 0.674)
pt3dadd(14.567, 155.105, 14.463, 0.672)
pt3dadd(14.522, 155.216, 14.463, 0.67)
pt3dadd(14.476, 155.328, 14.462, 0.668)
pt3dadd(14.431, 155.438, 14.462, 0.666)
pt3dadd(14.386, 155.55, 14.461, 0.664)
pt3dadd(14.341, 155.66, 14.46, 0.662)
pt3dadd(14.295, 155.772, 14.459, 0.66)
pt3dadd(14.26, 155.886, 14.458, 0.646)
pt3dadd(14.227, 156.002, 14.457, 0.626)
pt3dadd(14.194, 156.118, 14.455, 0.608)
pt3dadd(14.161, 156.233, 14.454, 0.588)
pt3dadd(14.128, 156.348, 14.453, 0.57)
pt3dadd(14.095, 156.463, 14.451, 0.552)
pt3dadd(14.062, 156.578, 14.45, 0.532)
pt3dadd(14.029, 156.694, 14.448, 0.514)
pt3dadd(13.996, 156.809, 14.447, 0.494)
pt3dadd(13.963, 156.925, 14.446, 0.476)
pt3dadd(13.936, 157.042, 14.443, 0.484)
pt3dadd(13.911, 157.159, 14.44, 0.5)
pt3dadd(13.887, 157.277, 14.438, 0.516)
pt3dadd(13.862, 157.393, 14.435, 0.53)
pt3dadd(13.837, 157.511, 14.432, 0.546)
pt3dadd(13.812, 157.628, 14.429, 0.56)
pt3dadd(13.787, 157.746, 14.427, 0.576)
pt3dadd(13.762, 157.864, 14.424, 0.592)
pt3dadd(13.737, 157.98, 14.421, 0.606)
pt3dadd(13.713, 158.098, 14.418, 0.622)
pt3dadd(13.692, 158.216, 14.413, 0.618)
pt3dadd(13.672, 158.334, 14.406, 0.608)
pt3dadd(13.652, 158.452, 14.4, 0.598)
pt3dadd(13.632, 158.57, 14.394, 0.588)
pt3dadd(13.611, 158.688, 14.388, 0.58)
pt3dadd(13.591, 158.807, 14.381, 0.57)
pt3dadd(13.571, 158.924, 14.375, 0.56)
pt3dadd(13.551, 159.042, 14.369, 0.55)
pt3dadd(13.531, 159.161, 14.363, 0.542)
pt3dadd(13.511, 159.278, 14.356, 0.532)
pt3dadd(13.473, 159.391, 14.347, 0.514)
pt3dadd(13.431, 159.503, 14.337, 0.494)
pt3dadd(13.388, 159.614, 14.326, 0.474)
pt3dadd(13.346, 159.726, 14.316, 0.454)
pt3dadd(13.303, 159.838, 14.306, 0.434)
pt3dadd(13.26, 159.949, 14.296, 0.414)
pt3dadd(13.218, 160.061, 14.285, 0.394)
pt3dadd(13.175, 160.172, 14.275, 0.374)
pt3dadd(13.133, 160.284, 14.265, 0.354)
pt3dadd(13.09, 160.396, 14.255, 0.334)
pt3dadd(13.034, 160.495, 14.227, 0.324)
pt3dadd(12.977, 160.596, 14.198, 0.312)
pt3dadd(12.921, 160.696, 14.169, 0.302)
pt3dadd(12.864, 160.795, 14.14, 0.29)
pt3dadd(12.807, 160.895, 14.111, 0.28)
pt3dadd(12.75, 160.994, 14.082, 0.268)
pt3dadd(12.693, 161.094, 14.053, 0.258)
pt3dadd(12.636, 161.194, 14.024, 0.246)
pt3dadd(12.579, 161.294, 13.996, 0.236)
pt3dadd(12.522, 161.393, 13.965, 0.226)
pt3dadd(12.461, 161.485, 13.926, 0.226)
pt3dadd(12.4, 161.576, 13.887, 0.226)
pt3dadd(12.339, 161.669, 13.848, 0.226)
pt3dadd(12.277, 161.761, 13.809, 0.226)
pt3dadd(12.216, 161.854, 13.771, 0.226)
pt3dadd(12.155, 161.946, 13.732, 0.226)
pt3dadd(12.094, 162.037, 13.693, 0.226)
pt3dadd(12.033, 162.13, 13.654, 0.226)
pt3dadd(11.972, 162.222, 13.615, 0.226)
pt3dadd(11.912, 162.317, 13.58, 0.226)
pt3dadd(11.856, 162.419, 13.558, 0.226)
pt3dadd(11.801, 162.522, 13.535, 0.226)
pt3dadd(11.745, 162.625, 13.513, 0.226)
pt3dadd(11.689, 162.728, 13.491, 0.226)
pt3dadd(11.633, 162.83, 13.469, 0.226)
pt3dadd(11.577, 162.934, 13.447, 0.226)
pt3dadd(11.522, 163.037, 13.425, 0.226)
pt3dadd(11.466, 163.139, 13.403, 0.226)
pt3dadd(11.41, 163.242, 13.381, 0.226)
pt3dadd(11.362, 163.349, 13.363, 0.228)
pt3dadd(11.33, 163.464, 13.352, 0.234)
pt3dadd(11.298, 163.579, 13.342, 0.24)
pt3dadd(11.266, 163.694, 13.331, 0.244)
}
}
proc shape3d_63() {
apic[18] { pt3dadd(11.234, 163.81, 13.321, 0.25)
pt3dadd(11.202, 163.924, 13.31, 0.256)
pt3dadd(11.17, 164.039, 13.3, 0.262)
pt3dadd(11.137, 164.154, 13.289, 0.266)
pt3dadd(11.105, 164.269, 13.279, 0.272)
pt3dadd(11.073, 164.383, 13.268, 0.278)
pt3dadd(11.045, 164.5, 13.26, 0.288)
pt3dadd(11.024, 164.617, 13.257, 0.302)
pt3dadd(11.002, 164.736, 13.253, 0.316)
pt3dadd(10.981, 164.854, 13.25, 0.33)
pt3dadd(10.96, 164.972, 13.246, 0.346)
pt3dadd(10.938, 165.09, 13.243, 0.36)
pt3dadd(10.917, 165.208, 13.24, 0.374)
pt3dadd(10.896, 165.326, 13.236, 0.388)
pt3dadd(10.874, 165.444, 13.233, 0.404)
pt3dadd(10.853, 165.562, 13.229, 0.418)
pt3dadd(10.833, 165.68, 13.224, 0.42)
pt3dadd(10.817, 165.799, 13.216, 0.398)
pt3dadd(10.801, 165.917, 13.209, 0.378)
pt3dadd(10.785, 166.036, 13.201, 0.358)
pt3dadd(10.769, 166.154, 13.194, 0.338)
pt3dadd(10.753, 166.273, 13.186, 0.318)
pt3dadd(10.737, 166.392, 13.179, 0.298)
pt3dadd(10.721, 166.51, 13.171, 0.278)
pt3dadd(10.705, 166.628, 13.163, 0.258)
pt3dadd(10.689, 166.747, 13.156, 0.238)
pt3dadd(10.66, 166.862, 13.147, 0.226)
pt3dadd(10.61, 166.97, 13.135, 0.226)
pt3dadd(10.56, 167.078, 13.123, 0.226)
pt3dadd(10.51, 167.186, 13.111, 0.226)
pt3dadd(10.46, 167.294, 13.099, 0.226)
pt3dadd(10.41, 167.402, 13.087, 0.226)
pt3dadd(10.36, 167.51, 13.075, 0.226)
pt3dadd(10.31, 167.62, 13.063, 0.226)
pt3dadd(10.26, 167.728, 13.052, 0.226)
pt3dadd(10.21, 167.836, 13.04, 0.226)
pt3dadd(10.163, 167.939, 13.014, 0.244)
pt3dadd(10.12, 168.036, 12.966, 0.288)
pt3dadd(10.077, 168.132, 12.919, 0.332)
pt3dadd(10.034, 168.229, 12.872, 0.376)
pt3dadd(9.991, 168.325, 12.824, 0.42)
pt3dadd(9.948, 168.422, 12.777, 0.464)
pt3dadd(9.905, 168.518, 12.73, 0.508)
pt3dadd(9.862, 168.614, 12.682, 0.552)
pt3dadd(9.819, 168.712, 12.635, 0.596)
pt3dadd(9.777, 168.808, 12.587, 0.64)
pt3dadd(9.744, 168.912, 12.548, 0.652)
pt3dadd(9.722, 169.024, 12.517, 0.63)
pt3dadd(9.699, 169.136, 12.486, 0.61)
pt3dadd(9.677, 169.248, 12.455, 0.588)
pt3dadd(9.655, 169.36, 12.424, 0.568)
pt3dadd(9.633, 169.471, 12.393, 0.546)
pt3dadd(9.61, 169.584, 12.362, 0.526)
pt3dadd(9.588, 169.696, 12.331, 0.504)
pt3dadd(9.566, 169.807, 12.3, 0.484)
pt3dadd(9.544, 169.919, 12.269, 0.462)
pt3dadd(9.527, 170.034, 12.247, 0.452)
pt3dadd(9.515, 170.153, 12.235, 0.452)
pt3dadd(9.504, 170.272, 12.223, 0.452)
pt3dadd(9.492, 170.39, 12.21, 0.452)
pt3dadd(9.481, 170.508, 12.198, 0.452)
pt3dadd(9.469, 170.627, 12.186, 0.452)
pt3dadd(9.458, 170.746, 12.173, 0.452)
pt3dadd(9.446, 170.864, 12.161, 0.452)
pt3dadd(9.435, 170.982, 12.148, 0.452)
pt3dadd(9.423, 171.101, 12.136, 0.452)
pt3dadd(9.409, 171.22, 12.13, 0.452)
pt3dadd(9.392, 171.338, 12.129, 0.452)
pt3dadd(9.374, 171.457, 12.129, 0.452)
pt3dadd(9.357, 171.576, 12.128, 0.452)
pt3dadd(9.34, 171.695, 12.128, 0.452)
pt3dadd(9.322, 171.814, 12.127, 0.452)
pt3dadd(9.305, 171.932, 12.127, 0.452)
pt3dadd(9.288, 172.051, 12.126, 0.452)
pt3dadd(9.27, 172.17, 12.126, 0.452)
pt3dadd(9.253, 172.289, 12.125, 0.452)
pt3dadd(9.222, 172.404, 12.125, 0.46)
pt3dadd(9.177, 172.514, 12.125, 0.472)
pt3dadd(9.133, 172.626, 12.125, 0.486)
pt3dadd(9.088, 172.738, 12.125, 0.5)
pt3dadd(9.044, 172.849, 12.124, 0.514)
pt3dadd(8.999, 172.961, 12.124, 0.528)
pt3dadd(8.955, 173.072, 12.124, 0.54)
pt3dadd(8.91, 173.184, 12.124, 0.554)
pt3dadd(8.866, 173.294, 12.124, 0.568)
pt3dadd(8.821, 173.406, 12.124, 0.582)
pt3dadd(8.775, 173.518, 12.124, 0.592)
pt3dadd(8.728, 173.628, 12.123, 0.602)
pt3dadd(8.68, 173.737, 12.123, 0.61)
pt3dadd(8.633, 173.848, 12.123, 0.62)
pt3dadd(8.586, 173.958, 12.123, 0.628)
pt3dadd(8.538, 174.068, 12.122, 0.638)
pt3dadd(8.491, 174.179, 12.122, 0.648)
pt3dadd(8.444, 174.289, 12.122, 0.656)
pt3dadd(8.396, 174.4, 12.122, 0.666)
pt3dadd(8.349, 174.51, 12.122, 0.674)
pt3dadd(8.303, 174.62, 12.121, 0.678)
pt3dadd(8.257, 174.731, 12.121, 0.678)
pt3dadd(8.211, 174.842, 12.121, 0.678)
pt3dadd(8.165, 174.953, 12.12, 0.678)
pt3dadd(8.12, 175.064, 12.12, 0.678)
pt3dadd(8.074, 175.175, 12.12, 0.678)
pt3dadd(8.028, 175.285, 12.119, 0.678)
pt3dadd(7.982, 175.397, 12.119, 0.678)
pt3dadd(7.936, 175.507, 12.118, 0.678)
pt3dadd(7.891, 175.619, 12.118, 0.678)
pt3dadd(7.838, 175.726, 12.118, 0.678)
pt3dadd(7.781, 175.831, 12.117, 0.678)
pt3dadd(7.723, 175.937, 12.116, 0.678)
pt3dadd(7.666, 176.042, 12.116, 0.678)
pt3dadd(7.609, 176.148, 12.115, 0.678)
pt3dadd(7.552, 176.254, 12.115, 0.678)
pt3dadd(7.494, 176.359, 12.114, 0.678)
pt3dadd(7.437, 176.465, 12.113, 0.678)
pt3dadd(7.38, 176.57, 12.113, 0.678)
pt3dadd(7.323, 176.675, 12.112, 0.678)
pt3dadd(7.277, 176.785, 12.111, 0.678)
pt3dadd(7.237, 176.899, 12.11, 0.678)
pt3dadd(7.198, 177.012, 12.108, 0.678)
pt3dadd(7.159, 177.126, 12.107, 0.678)
pt3dadd(7.12, 177.239, 12.106, 0.678)
pt3dadd(7.081, 177.353, 12.104, 0.678)
pt3dadd(7.042, 177.466, 12.103, 0.678)
pt3dadd(7.002, 177.58, 12.102, 0.678)
pt3dadd(6.963, 177.694, 12.1, 0.678)
pt3dadd(6.924, 177.806, 12.099, 0.678)
pt3dadd(6.89, 177.922, 12.097, 0.662)
pt3dadd(6.859, 178.037, 12.094, 0.638)
pt3dadd(6.828, 178.153, 12.092, 0.614)
pt3dadd(6.798, 178.27, 12.09, 0.59)
pt3dadd(6.767, 178.385, 12.087, 0.564)
pt3dadd(6.736, 178.501, 12.085, 0.54)
pt3dadd(6.705, 178.616, 12.082, 0.516)
pt3dadd(6.674, 178.733, 12.08, 0.492)
pt3dadd(6.643, 178.849, 12.077, 0.468)
pt3dadd(6.612, 178.964, 12.075, 0.444)
pt3dadd(6.578, 179.08, 12.071, 0.43)
pt3dadd(6.542, 179.194, 12.066, 0.426)
pt3dadd(6.506, 179.308, 12.061, 0.42)
pt3dadd(6.47, 179.423, 12.057, 0.416)
pt3dadd(6.434, 179.537, 12.052, 0.41)
pt3dadd(6.397, 179.651, 12.047, 0.406)
pt3dadd(6.361, 179.765, 12.043, 0.4)
pt3dadd(6.325, 179.88, 12.038, 0.396)
pt3dadd(6.289, 179.994, 12.033, 0.39)
pt3dadd(6.253, 180.108, 12.028, 0.384)
pt3dadd(6.211, 180.221, 12.021, 0.398)
pt3dadd(6.167, 180.331, 12.014, 0.422)
pt3dadd(6.123, 180.443, 12.006, 0.446)
pt3dadd(6.079, 180.554, 11.998, 0.47)
pt3dadd(6.034, 180.665, 11.99, 0.492)
pt3dadd(5.99, 180.776, 11.983, 0.516)
pt3dadd(5.946, 180.887, 11.975, 0.54)
pt3dadd(5.902, 180.998, 11.967, 0.562)
pt3dadd(5.857, 181.11, 11.959, 0.586)
pt3dadd(5.813, 181.22, 11.952, 0.61)
pt3dadd(5.777, 181.334, 11.941, 0.592)
pt3dadd(5.744, 181.448, 11.929, 0.554)
pt3dadd(5.711, 181.564, 11.917, 0.518)
pt3dadd(5.677, 181.678, 11.905, 0.482)
pt3dadd(5.644, 181.792, 11.893, 0.444)
pt3dadd(5.611, 181.907, 11.881, 0.408)
pt3dadd(5.578, 182.021, 11.868, 0.372)
pt3dadd(5.545, 182.135, 11.857, 0.334)
pt3dadd(5.512, 182.25, 11.844, 0.298)
pt3dadd(5.479, 182.364, 11.832, 0.262)
pt3dadd(5.452, 182.474, 11.804, 0.258)
pt3dadd(5.429, 182.584, 11.767, 0.274)
pt3dadd(5.405, 182.693, 11.73, 0.288)
pt3dadd(5.382, 182.802, 11.694, 0.302)
pt3dadd(5.358, 182.911, 11.657, 0.316)
pt3dadd(5.335, 183.02, 11.621, 0.33)
pt3dadd(5.312, 183.13, 11.584, 0.342)
pt3dadd(5.288, 183.239, 11.547, 0.356)
pt3dadd(5.265, 183.348, 11.511, 0.37)
pt3dadd(5.241, 183.457, 11.474, 0.384)
pt3dadd(5.219, 183.569, 11.441, 0.394)
pt3dadd(5.197, 183.68, 11.41, 0.4)
pt3dadd(5.175, 183.792, 11.378, 0.406)
pt3dadd(5.154, 183.904, 11.347, 0.412)
pt3dadd(5.132, 184.016, 11.315, 0.418)
pt3dadd(5.11, 184.128, 11.284, 0.426)
pt3dadd(5.088, 184.24, 11.252, 0.432)
pt3dadd(5.067, 184.351, 11.22, 0.438)
pt3dadd(5.045, 184.463, 11.189, 0.444)
pt3dadd(5.023, 184.574, 11.157, 0.45)
pt3dadd(4.992, 184.686, 11.131, 0.456)
pt3dadd(4.958, 184.798, 11.107, 0.464)
pt3dadd(4.923, 184.908, 11.082, 0.47)
pt3dadd(4.889, 185.02, 11.058, 0.476)
pt3dadd(4.854, 185.131, 11.033, 0.484)
pt3dadd(4.82, 185.242, 11.009, 0.49)
pt3dadd(4.785, 185.353, 10.984, 0.496)
pt3dadd(4.751, 185.464, 10.96, 0.504)
pt3dadd(4.717, 185.575, 10.935, 0.51)
pt3dadd(4.682, 185.687, 10.911, 0.518)
pt3dadd(4.631, 185.792, 10.891, 0.53)
pt3dadd(4.577, 185.897, 10.872, 0.544)
pt3dadd(4.522, 186.001, 10.854, 0.56)
pt3dadd(4.467, 186.106, 10.835, 0.574)
}
}
proc shape3d_64() {
apic[18] { pt3dadd(4.413, 186.21, 10.816, 0.588)
pt3dadd(4.359, 186.314, 10.797, 0.602)
pt3dadd(4.304, 186.419, 10.779, 0.616)
pt3dadd(4.25, 186.523, 10.76, 0.63)
pt3dadd(4.195, 186.628, 10.741, 0.646)
pt3dadd(4.141, 186.733, 10.722, 0.66)
pt3dadd(4.078, 186.833, 10.705, 0.636)
pt3dadd(4.014, 186.932, 10.688, 0.604)
pt3dadd(3.95, 187.032, 10.672, 0.572)
pt3dadd(3.886, 187.132, 10.655, 0.54)
pt3dadd(3.822, 187.231, 10.638, 0.508)
pt3dadd(3.758, 187.331, 10.622, 0.476)
pt3dadd(3.694, 187.429, 10.605, 0.444)
pt3dadd(3.63, 187.529, 10.588, 0.412)
pt3dadd(3.566, 187.628, 10.572, 0.38)
pt3dadd(3.501, 187.728, 10.555, 0.348)
pt3dadd(3.452, 187.83, 10.523, 0.334)
pt3dadd(3.406, 187.932, 10.487, 0.322)
pt3dadd(3.359, 188.034, 10.451, 0.31)
pt3dadd(3.313, 188.136, 10.415, 0.298)
pt3dadd(3.266, 188.238, 10.38, 0.286)
pt3dadd(3.22, 188.34, 10.344, 0.274)
pt3dadd(3.173, 188.442, 10.308, 0.262)
pt3dadd(3.127, 188.544, 10.273, 0.25)
pt3dadd(3.08, 188.646, 10.237, 0.238)
pt3dadd(3.034, 188.748, 10.201, 0.226)
pt3dadd(3.005, 188.848, 10.152, 0.226)
pt3dadd(2.976, 188.948, 10.103, 0.226)
pt3dadd(2.946, 189.049, 10.054, 0.226)
pt3dadd(2.917, 189.15, 10.005, 0.226)
pt3dadd(2.888, 189.25, 9.956, 0.226)
pt3dadd(2.859, 189.35, 9.907, 0.226)
pt3dadd(2.83, 189.451, 9.858, 0.226)
pt3dadd(2.801, 189.552, 9.809, 0.226)
pt3dadd(2.772, 189.652, 9.76, 0.226)
pt3dadd(2.744, 189.752, 9.711, 0.226)
pt3dadd(2.735, 189.85, 9.652, 0.226)
pt3dadd(2.726, 189.947, 9.594, 0.226)
pt3dadd(2.717, 190.044, 9.536, 0.226)
pt3dadd(2.708, 190.141, 9.478, 0.226)
pt3dadd(2.699, 190.238, 9.42, 0.226)
pt3dadd(2.69, 190.336, 9.362, 0.226)
pt3dadd(2.681, 190.433, 9.304, 0.226)
pt3dadd(2.672, 190.53, 9.246, 0.226)
pt3dadd(2.663, 190.627, 9.188, 0.226)
pt3dadd(2.655, 190.726, 9.13, 0.226)
pt3dadd(2.656, 190.831, 9.084, 0.226)
pt3dadd(2.657, 190.938, 9.038, 0.226)
pt3dadd(2.658, 191.045, 8.991, 0.226)
pt3dadd(2.66, 191.15, 8.945, 0.226)
pt3dadd(2.661, 191.257, 8.899, 0.226)
pt3dadd(2.662, 191.363, 8.852, 0.226)
pt3dadd(2.664, 191.47, 8.806, 0.226)
pt3dadd(2.665, 191.576, 8.76, 0.226)
pt3dadd(2.666, 191.682, 8.714, 0.226)
pt3dadd(2.668, 191.789, 8.667, 0.226)
pt3dadd(2.675, 191.897, 8.623, 0.226)
pt3dadd(2.682, 192.004, 8.579, 0.226)
pt3dadd(2.689, 192.112, 8.535, 0.226)
pt3dadd(2.696, 192.218, 8.491, 0.226)
pt3dadd(2.703, 192.326, 8.447, 0.226)
pt3dadd(2.71, 192.433, 8.403, 0.226)
pt3dadd(2.717, 192.541, 8.359, 0.226)
pt3dadd(2.724, 192.649, 8.314, 0.226)
pt3dadd(2.731, 192.756, 8.27, 0.226)
pt3dadd(2.738, 192.864, 8.226, 0.226)
pt3dadd(2.75, 192.972, 8.184, 0.232)
pt3dadd(2.761, 193.08, 8.142, 0.238)
pt3dadd(2.773, 193.188, 8.1, 0.244)
pt3dadd(2.784, 193.297, 8.058, 0.25)
pt3dadd(2.796, 193.405, 8.016, 0.256)
pt3dadd(2.807, 193.513, 7.974, 0.262)
pt3dadd(2.818, 193.621, 7.932, 0.268)
pt3dadd(2.83, 193.729, 7.89, 0.274)
pt3dadd(2.841, 193.838, 7.848, 0.28)
pt3dadd(2.854, 193.948, 7.808, 0.29)
pt3dadd(2.873, 194.062, 7.784, 0.328)
pt3dadd(2.892, 194.177, 7.761, 0.364)
pt3dadd(2.911, 194.292, 7.737, 0.402)
pt3dadd(2.93, 194.407, 7.713, 0.438)
pt3dadd(2.949, 194.522, 7.69, 0.476)
pt3dadd(2.968, 194.638, 7.666, 0.512)
pt3dadd(2.987, 194.753, 7.642, 0.55)
pt3dadd(3.006, 194.867, 7.618, 0.586)
pt3dadd(3.024, 194.982, 7.595, 0.624)
pt3dadd(3.048, 195.096, 7.573, 0.65)
pt3dadd(3.1, 195.204, 7.562, 0.622)
pt3dadd(3.153, 195.311, 7.551, 0.592)
pt3dadd(3.205, 195.418, 7.541, 0.562)
pt3dadd(3.258, 195.526, 7.53, 0.532)
pt3dadd(3.31, 195.632, 7.519, 0.502)
pt3dadd(3.362, 195.739, 7.508, 0.472)
pt3dadd(3.415, 195.846, 7.498, 0.442)
pt3dadd(3.467, 195.954, 7.487, 0.412)
pt3dadd(3.519, 196.061, 7.476, 0.382)
pt3dadd(3.572, 196.169, 7.467, 0.36)
pt3dadd(3.624, 196.277, 7.463, 0.368)
pt3dadd(3.676, 196.385, 7.459, 0.376)
pt3dadd(3.728, 196.493, 7.455, 0.384)
pt3dadd(3.78, 196.601, 7.451, 0.392)
pt3dadd(3.832, 196.709, 7.447, 0.4)
pt3dadd(3.884, 196.817, 7.443, 0.41)
pt3dadd(3.936, 196.925, 7.44, 0.418)
pt3dadd(3.988, 197.033, 7.436, 0.426)
pt3dadd(4.04, 197.141, 7.432, 0.434)
pt3dadd(4.092, 197.249, 7.429, 0.444)
pt3dadd(4.149, 197.354, 7.429, 0.456)
pt3dadd(4.205, 197.461, 7.429, 0.47)
pt3dadd(4.261, 197.567, 7.429, 0.484)
pt3dadd(4.317, 197.672, 7.429, 0.496)
pt3dadd(4.373, 197.779, 7.429, 0.51)
pt3dadd(4.429, 197.885, 7.429, 0.524)
pt3dadd(4.485, 197.992, 7.429, 0.538)
pt3dadd(4.541, 198.097, 7.429, 0.55)
pt3dadd(4.597, 198.203, 7.429, 0.564)
pt3dadd(4.656, 198.307, 7.429, 0.568)
pt3dadd(4.724, 198.407, 7.428, 0.536)
pt3dadd(4.792, 198.505, 7.428, 0.504)
pt3dadd(4.86, 198.605, 7.428, 0.472)
pt3dadd(4.927, 198.703, 7.428, 0.44)
pt3dadd(4.995, 198.803, 7.428, 0.408)
pt3dadd(5.063, 198.901, 7.428, 0.376)
pt3dadd(5.131, 199.001, 7.428, 0.344)
pt3dadd(5.199, 199.099, 7.428, 0.312)
pt3dadd(5.267, 199.199, 7.428, 0.28)
pt3dadd(5.336, 199.296, 7.428, 0.264)
pt3dadd(5.409, 199.392, 7.428, 0.302)
pt3dadd(5.483, 199.487, 7.428, 0.342)
pt3dadd(5.556, 199.582, 7.428, 0.38)
pt3dadd(5.629, 199.676, 7.428, 0.42)
pt3dadd(5.703, 199.771, 7.427, 0.458)
pt3dadd(5.776, 199.866, 7.427, 0.496)
pt3dadd(5.849, 199.961, 7.427, 0.536)
pt3dadd(5.923, 200.056, 7.427, 0.574)
pt3dadd(5.996, 200.152, 7.427, 0.614)
pt3dadd(6.069, 200.246, 7.427, 0.646)
pt3dadd(6.138, 200.345, 7.427, 0.658)
pt3dadd(6.207, 200.443, 7.426, 0.668)
pt3dadd(6.276, 200.54, 7.426, 0.68)
pt3dadd(6.346, 200.639, 7.426, 0.692)
pt3dadd(6.415, 200.737, 7.426, 0.704)
pt3dadd(6.484, 200.834, 7.426, 0.714)
pt3dadd(6.553, 200.933, 7.426, 0.726)
pt3dadd(6.623, 201.031, 7.425, 0.738)
pt3dadd(6.692, 201.128, 7.425, 0.748)
pt3dadd(6.76, 201.228, 7.425, 0.75)
pt3dadd(6.824, 201.329, 7.425, 0.718)
pt3dadd(6.888, 201.431, 7.424, 0.686)
pt3dadd(6.952, 201.532, 7.424, 0.654)
pt3dadd(7.016, 201.634, 7.424, 0.622)
pt3dadd(7.08, 201.736, 7.424, 0.59)
pt3dadd(7.144, 201.836, 7.423, 0.558)
pt3dadd(7.208, 201.938, 7.423, 0.526)
pt3dadd(7.272, 202.039, 7.423, 0.494)
pt3dadd(7.336, 202.141, 7.422, 0.462)
pt3dadd(7.402, 202.241, 7.422, 0.434)
pt3dadd(7.477, 202.334, 7.421, 0.418)
pt3dadd(7.552, 202.429, 7.421, 0.402)
pt3dadd(7.626, 202.523, 7.421, 0.386)
pt3dadd(7.701, 202.616, 7.42, 0.37)
pt3dadd(7.776, 202.71, 7.419, 0.354)
pt3dadd(7.851, 202.804, 7.419, 0.338)
pt3dadd(7.926, 202.898, 7.418, 0.322)
pt3dadd(8, 202.992, 7.418, 0.306)
pt3dadd(8.075, 203.086, 7.417, 0.29)
pt3dadd(8.152, 203.178, 7.417, 0.278)
pt3dadd(8.234, 203.266, 7.416, 0.272)
pt3dadd(8.316, 203.353, 7.415, 0.266)
pt3dadd(8.398, 203.441, 7.414, 0.262)
pt3dadd(8.48, 203.528, 7.413, 0.256)
pt3dadd(8.562, 203.616, 7.412, 0.25)
pt3dadd(8.644, 203.704, 7.411, 0.246)
pt3dadd(8.726, 203.791, 7.41, 0.24)
pt3dadd(8.808, 203.878, 7.409, 0.236)
pt3dadd(8.891, 203.965, 7.408, 0.23)
pt3dadd(8.974, 204.052, 7.407, 0.228)
pt3dadd(9.062, 204.133, 7.406, 0.234)
pt3dadd(9.15, 204.216, 7.404, 0.24)
pt3dadd(9.237, 204.298, 7.403, 0.246)
pt3dadd(9.325, 204.379, 7.402, 0.254)
pt3dadd(9.413, 204.461, 7.4, 0.26)
pt3dadd(9.501, 204.542, 7.399, 0.266)
pt3dadd(9.588, 204.625, 7.397, 0.272)
pt3dadd(9.676, 204.707, 7.396, 0.278)
pt3dadd(9.764, 204.788, 7.395, 0.284)
pt3dadd(9.854, 204.868, 7.393, 0.298)
pt3dadd(9.949, 204.941, 7.391, 0.328)
pt3dadd(10.044, 205.013, 7.388, 0.358)
pt3dadd(10.14, 205.086, 7.386, 0.39)
pt3dadd(10.236, 205.158, 7.384, 0.42)
pt3dadd(10.331, 205.231, 7.382, 0.45)
pt3dadd(10.427, 205.303, 7.379, 0.482)
pt3dadd(10.522, 205.376, 7.377, 0.512)
pt3dadd(10.618, 205.448, 7.375, 0.542)
pt3dadd(10.713, 205.522, 7.372, 0.574)
pt3dadd(10.812, 205.588, 7.369, 0.594)
pt3dadd(10.921, 205.637, 7.364, 0.59)
pt3dadd(11.03, 205.687, 7.358, 0.584)
pt3dadd(11.14, 205.736, 7.352, 0.58)
pt3dadd(11.249, 205.786, 7.347, 0.574)
}
}
proc shape3d_65() {
apic[18] { pt3dadd(11.358, 205.835, 7.341, 0.57)
pt3dadd(11.467, 205.885, 7.336, 0.564)
pt3dadd(11.576, 205.934, 7.33, 0.558)
pt3dadd(11.685, 205.984, 7.325, 0.554)
pt3dadd(11.794, 206.033, 7.319, 0.548)
pt3dadd(11.906, 206.075, 7.312, 0.54)
pt3dadd(12.022, 206.102, 7.303, 0.52)
pt3dadd(12.138, 206.131, 7.294, 0.502)
pt3dadd(12.254, 206.159, 7.285, 0.482)
pt3dadd(12.371, 206.186, 7.276, 0.464)
pt3dadd(12.487, 206.214, 7.267, 0.446)
pt3dadd(12.603, 206.242, 7.257, 0.426)
pt3dadd(12.719, 206.27, 7.248, 0.408)
pt3dadd(12.836, 206.298, 7.239, 0.39)
pt3dadd(12.952, 206.326, 7.23, 0.37)
pt3dadd(13.068, 206.346, 7.216, 0.356)
pt3dadd(13.186, 206.356, 7.197, 0.348)
pt3dadd(13.303, 206.365, 7.178, 0.34)
pt3dadd(13.42, 206.376, 7.158, 0.332)
pt3dadd(13.538, 206.386, 7.139, 0.324)
pt3dadd(13.655, 206.395, 7.119, 0.316)
pt3dadd(13.772, 206.406, 7.1, 0.308)
pt3dadd(13.889, 206.416, 7.08, 0.298)
pt3dadd(14.007, 206.426, 7.061, 0.29)
pt3dadd(14.124, 206.436, 7.041, 0.282)
pt3dadd(14.238, 206.441, 7.013, 0.288)
pt3dadd(14.35, 206.442, 6.976, 0.304)
pt3dadd(14.461, 206.443, 6.939, 0.32)
pt3dadd(14.572, 206.444, 6.901, 0.338)
pt3dadd(14.684, 206.446, 6.864, 0.354)
pt3dadd(14.795, 206.446, 6.827, 0.372)
pt3dadd(14.907, 206.447, 6.79, 0.388)
pt3dadd(15.018, 206.448, 6.753, 0.404)
pt3dadd(15.13, 206.449, 6.716, 0.422)
pt3dadd(15.241, 206.45, 6.679, 0.438)
pt3dadd(15.355, 206.452, 6.648, 0.436)
pt3dadd(15.471, 206.454, 6.623, 0.418)
pt3dadd(15.587, 206.456, 6.599, 0.398)
pt3dadd(15.704, 206.458, 6.574, 0.38)
pt3dadd(15.82, 206.46, 6.549, 0.362)
pt3dadd(15.936, 206.462, 6.524, 0.342)
pt3dadd(16.052, 206.465, 6.499, 0.324)
pt3dadd(16.169, 206.467, 6.475, 0.304)
pt3dadd(16.285, 206.468, 6.45, 0.286)
pt3dadd(16.401, 206.471, 6.425, 0.268)
pt3dadd(16.519, 206.474, 6.405, 0.256)
pt3dadd(16.637, 206.478, 6.391, 0.254)
pt3dadd(16.756, 206.483, 6.376, 0.25)
pt3dadd(16.874, 206.486, 6.361, 0.246)
pt3dadd(16.993, 206.49, 6.346, 0.244)
pt3dadd(17.112, 206.495, 6.332, 0.24)
pt3dadd(17.23, 206.498, 6.317, 0.238)
pt3dadd(17.349, 206.503, 6.302, 0.234)
pt3dadd(17.467, 206.507, 6.287, 0.23)
pt3dadd(17.586, 206.51, 6.272, 0.228)
pt3dadd(17.705, 206.518, 6.262, 0.226)
pt3dadd(17.825, 206.526, 6.256, 0.226)
pt3dadd(17.944, 206.536, 6.249, 0.226)
pt3dadd(18.063, 206.544, 6.243, 0.226)
pt3dadd(18.183, 206.554, 6.237, 0.226)
pt3dadd(18.302, 206.563, 6.23, 0.226)
pt3dadd(18.422, 206.572, 6.224, 0.226)
pt3dadd(18.541, 206.581, 6.217, 0.226)
pt3dadd(18.66, 206.59, 6.211, 0.226)
pt3dadd(18.78, 206.599, 6.205, 0.226)
pt3dadd(18.899, 206.611, 6.199, 0.226)
pt3dadd(19.018, 206.628, 6.193, 0.226)
pt3dadd(19.136, 206.644, 6.188, 0.226)
pt3dadd(19.255, 206.659, 6.182, 0.226)
pt3dadd(19.374, 206.675, 6.176, 0.226)
pt3dadd(19.493, 206.692, 6.171, 0.226)
pt3dadd(19.611, 206.707, 6.165, 0.226)
pt3dadd(19.73, 206.723, 6.159, 0.226)
pt3dadd(19.849, 206.74, 6.154, 0.226)
pt3dadd(19.968, 206.755, 6.148, 0.226)
pt3dadd(20.083, 206.783, 6.14, 0.24)
pt3dadd(20.196, 206.821, 6.13, 0.264)
pt3dadd(20.31, 206.86, 6.12, 0.29)
pt3dadd(20.423, 206.898, 6.11, 0.314)
pt3dadd(20.536, 206.935, 6.1, 0.34)
pt3dadd(20.649, 206.974, 6.089, 0.364)
pt3dadd(20.762, 207.012, 6.079, 0.39)
pt3dadd(20.875, 207.049, 6.069, 0.414)
pt3dadd(20.988, 207.088, 6.059, 0.44)
pt3dadd(21.102, 207.126, 6.049, 0.464)
pt3dadd(21.205, 207.181, 6.03, 0.494)
pt3dadd(21.304, 207.242, 6.007, 0.526)
pt3dadd(21.403, 207.305, 5.984, 0.558)
pt3dadd(21.502, 207.367, 5.961, 0.588)
pt3dadd(21.601, 207.428, 5.938, 0.62)
pt3dadd(21.7, 207.491, 5.915, 0.652)
pt3dadd(21.799, 207.552, 5.892, 0.684)
pt3dadd(21.898, 207.614, 5.869, 0.714)
pt3dadd(21.997, 207.677, 5.846, 0.746)
pt3dadd(22.096, 207.738, 5.823, 0.778)
pt3dadd(22.179, 207.808, 5.78, 0.746)
pt3dadd(22.26, 207.877, 5.734, 0.706)
pt3dadd(22.341, 207.947, 5.689, 0.668)
pt3dadd(22.422, 208.016, 5.643, 0.628)
pt3dadd(22.503, 208.086, 5.598, 0.59)
pt3dadd(22.584, 208.156, 5.553, 0.55)
pt3dadd(22.665, 208.225, 5.507, 0.51)
pt3dadd(22.747, 208.295, 5.462, 0.472)
pt3dadd(22.828, 208.364, 5.416, 0.432)
pt3dadd(22.909, 208.434, 5.371, 0.394)
pt3dadd(22.99, 208.514, 5.342, 0.376)
pt3dadd(23.071, 208.596, 5.313, 0.36)
pt3dadd(23.153, 208.678, 5.284, 0.344)
pt3dadd(23.234, 208.758, 5.255, 0.326)
pt3dadd(23.315, 208.84, 5.226, 0.31)
pt3dadd(23.397, 208.921, 5.197, 0.292)
pt3dadd(23.478, 209.002, 5.168, 0.276)
pt3dadd(23.559, 209.083, 5.139, 0.26)
pt3dadd(23.64, 209.164, 5.11, 0.242)
pt3dadd(23.722, 209.245, 5.081, 0.226)
}
apic[19] {pt3dclear()
pt3dadd(15.108, 144.934, 14.895, 0.452)
pt3dadd(15.193, 144.906, 14.872, 0.44)
pt3dadd(15.302, 144.871, 14.843, 0.424)
pt3dadd(15.411, 144.836, 14.814, 0.408)
pt3dadd(15.521, 144.8, 14.784, 0.392)
pt3dadd(15.63, 144.766, 14.755, 0.376)
pt3dadd(15.739, 144.73, 14.726, 0.36)
pt3dadd(15.848, 144.695, 14.696, 0.346)
pt3dadd(15.957, 144.66, 14.667, 0.33)
pt3dadd(16.066, 144.624, 14.638, 0.314)
pt3dadd(16.176, 144.589, 14.609, 0.298)
pt3dadd(16.285, 144.553, 14.579, 0.282)
pt3dadd(16.394, 144.518, 14.55, 0.266)
pt3dadd(16.502, 144.504, 14.522, 0.256)
pt3dadd(16.608, 144.556, 14.5, 0.266)
pt3dadd(16.713, 144.606, 14.478, 0.276)
pt3dadd(16.819, 144.656, 14.456, 0.284)
pt3dadd(16.924, 144.707, 14.434, 0.294)
pt3dadd(17.03, 144.757, 14.412, 0.304)
pt3dadd(17.135, 144.808, 14.389, 0.314)
pt3dadd(17.241, 144.859, 14.367, 0.322)
pt3dadd(17.346, 144.91, 14.345, 0.332)
pt3dadd(17.452, 144.96, 14.323, 0.34)
pt3dadd(17.552, 145.019, 14.299, 0.352)
pt3dadd(17.651, 145.081, 14.275, 0.362)
pt3dadd(17.75, 145.142, 14.251, 0.374)
pt3dadd(17.849, 145.204, 14.226, 0.384)
pt3dadd(17.948, 145.265, 14.202, 0.396)
pt3dadd(18.047, 145.326, 14.178, 0.406)
pt3dadd(18.146, 145.387, 14.154, 0.418)
pt3dadd(18.245, 145.448, 14.13, 0.428)
pt3dadd(18.344, 145.511, 14.105, 0.44)
pt3dadd(18.443, 145.572, 14.081, 0.45)
pt3dadd(18.543, 145.616, 14.043, 0.452)
pt3dadd(18.644, 145.66, 14.002, 0.452)
pt3dadd(18.745, 145.703, 13.962, 0.452)
pt3dadd(18.846, 145.746, 13.922, 0.454)
pt3dadd(18.947, 145.789, 13.881, 0.454)
pt3dadd(19.048, 145.832, 13.841, 0.454)
pt3dadd(19.149, 145.874, 13.801, 0.454)
pt3dadd(19.251, 145.918, 13.76, 0.454)
pt3dadd(19.352, 145.961, 13.72, 0.454)
pt3dadd(19.452, 146.004, 13.68, 0.456)
pt3dadd(19.56, 146.044, 13.651, 0.472)
pt3dadd(19.669, 146.083, 13.624, 0.49)
pt3dadd(19.777, 146.124, 13.598, 0.508)
pt3dadd(19.886, 146.164, 13.571, 0.526)
pt3dadd(19.995, 146.203, 13.544, 0.544)
pt3dadd(20.103, 146.243, 13.517, 0.562)
pt3dadd(20.212, 146.282, 13.49, 0.58)
pt3dadd(20.32, 146.322, 13.463, 0.598)
pt3dadd(20.429, 146.362, 13.436, 0.616)
pt3dadd(20.537, 146.401, 13.41, 0.634)
pt3dadd(20.638, 146.461, 13.389, 0.664)
pt3dadd(20.738, 146.522, 13.368, 0.694)
pt3dadd(20.838, 146.585, 13.348, 0.724)
pt3dadd(20.938, 146.646, 13.328, 0.756)
pt3dadd(21.038, 146.708, 13.308, 0.786)
pt3dadd(21.138, 146.771, 13.288, 0.816)
pt3dadd(21.237, 146.832, 13.267, 0.848)
pt3dadd(21.337, 146.894, 13.247, 0.878)
pt3dadd(21.437, 146.957, 13.227, 0.908)
pt3dadd(21.537, 147.018, 13.207, 0.94)
pt3dadd(21.628, 147.094, 13.191, 0.932)
pt3dadd(21.718, 147.17, 13.174, 0.924)
pt3dadd(21.808, 147.247, 13.159, 0.914)
pt3dadd(21.899, 147.324, 13.142, 0.906)
pt3dadd(21.989, 147.401, 13.126, 0.896)
pt3dadd(22.079, 147.478, 13.11, 0.888)
pt3dadd(22.17, 147.554, 13.094, 0.878)
pt3dadd(22.26, 147.631, 13.078, 0.87)
pt3dadd(22.35, 147.707, 13.062, 0.86)
pt3dadd(22.44, 147.784, 13.046, 0.852)
pt3dadd(22.522, 147.87, 13.033, 0.788)
pt3dadd(22.604, 147.958, 13.02, 0.726)
pt3dadd(22.686, 148.044, 13.007, 0.664)
pt3dadd(22.767, 148.13, 12.993, 0.602)
pt3dadd(22.849, 148.217, 12.98, 0.538)
pt3dadd(22.931, 148.303, 12.967, 0.476)
pt3dadd(23.012, 148.39, 12.954, 0.414)
pt3dadd(23.094, 148.476, 12.941, 0.35)
pt3dadd(23.175, 148.562, 12.927, 0.288)
pt3dadd(23.257, 148.649, 12.914, 0.226)
}
apic[20] {pt3dclear()
pt3dadd(23.257, 148.649, 12.914, 0.226)
pt3dadd(23.26, 148.654, 12.912, 0.228)
}
}
proc shape3d_66() {
apic[20] { pt3dadd(23.309, 148.752, 12.87, 0.276)
pt3dadd(23.357, 148.849, 12.829, 0.324)
pt3dadd(23.405, 148.946, 12.787, 0.37)
pt3dadd(23.454, 149.045, 12.745, 0.418)
pt3dadd(23.502, 149.142, 12.704, 0.466)
pt3dadd(23.551, 149.24, 12.662, 0.512)
pt3dadd(23.599, 149.338, 12.621, 0.56)
pt3dadd(23.648, 149.436, 12.579, 0.608)
pt3dadd(23.696, 149.533, 12.537, 0.654)
pt3dadd(23.745, 149.632, 12.496, 0.702)
pt3dadd(23.793, 149.729, 12.454, 0.75)
pt3dadd(23.845, 149.827, 12.415, 0.756)
pt3dadd(23.898, 149.924, 12.377, 0.76)
pt3dadd(23.95, 150.022, 12.338, 0.764)
pt3dadd(24.002, 150.119, 12.299, 0.77)
pt3dadd(24.054, 150.217, 12.261, 0.774)
pt3dadd(24.107, 150.314, 12.222, 0.778)
pt3dadd(24.159, 150.412, 12.184, 0.784)
pt3dadd(24.211, 150.51, 12.145, 0.788)
pt3dadd(24.263, 150.607, 12.106, 0.792)
pt3dadd(24.316, 150.704, 12.068, 0.796)
pt3dadd(24.365, 150.802, 12.026, 0.794)
pt3dadd(24.414, 150.899, 11.984, 0.788)
pt3dadd(24.463, 150.997, 11.943, 0.784)
pt3dadd(24.513, 151.094, 11.901, 0.78)
pt3dadd(24.562, 151.192, 11.859, 0.776)
pt3dadd(24.611, 151.289, 11.818, 0.772)
pt3dadd(24.66, 151.386, 11.776, 0.768)
pt3dadd(24.709, 151.483, 11.734, 0.764)
pt3dadd(24.759, 151.58, 11.693, 0.76)
pt3dadd(24.807, 151.678, 11.651, 0.758)
pt3dadd(24.84, 151.774, 11.596, 0.788)
pt3dadd(24.873, 151.868, 11.542, 0.82)
pt3dadd(24.906, 151.964, 11.488, 0.852)
pt3dadd(24.939, 152.059, 11.433, 0.884)
pt3dadd(24.972, 152.154, 11.379, 0.914)
pt3dadd(25.005, 152.25, 11.325, 0.946)
pt3dadd(25.038, 152.345, 11.271, 0.978)
pt3dadd(25.07, 152.441, 11.216, 1.01)
pt3dadd(25.103, 152.536, 11.162, 1.04)
pt3dadd(25.136, 152.63, 11.108, 1.07)
pt3dadd(25.163, 152.723, 11.048, 1.038)
pt3dadd(25.191, 152.816, 10.989, 1.004)
pt3dadd(25.218, 152.909, 10.929, 0.972)
pt3dadd(25.245, 153.001, 10.87, 0.94)
pt3dadd(25.273, 153.094, 10.811, 0.906)
pt3dadd(25.3, 153.186, 10.751, 0.874)
pt3dadd(25.328, 153.278, 10.692, 0.84)
pt3dadd(25.355, 153.371, 10.632, 0.808)
pt3dadd(25.382, 153.464, 10.573, 0.774)
pt3dadd(25.41, 153.557, 10.514, 0.742)
pt3dadd(25.447, 153.65, 10.459, 0.72)
pt3dadd(25.483, 153.743, 10.404, 0.696)
pt3dadd(25.52, 153.836, 10.349, 0.674)
pt3dadd(25.556, 153.93, 10.294, 0.652)
pt3dadd(25.593, 154.024, 10.239, 0.628)
pt3dadd(25.629, 154.116, 10.184, 0.606)
pt3dadd(25.666, 154.21, 10.129, 0.584)
pt3dadd(25.703, 154.303, 10.074, 0.56)
pt3dadd(25.739, 154.397, 10.019, 0.538)
pt3dadd(25.777, 154.489, 9.965, 0.52)
pt3dadd(25.829, 154.583, 9.919, 0.536)
pt3dadd(25.881, 154.675, 9.872, 0.552)
pt3dadd(25.933, 154.769, 9.826, 0.568)
pt3dadd(25.985, 154.861, 9.78, 0.584)
pt3dadd(26.037, 154.954, 9.734, 0.6)
pt3dadd(26.089, 155.047, 9.688, 0.616)
pt3dadd(26.141, 155.14, 9.641, 0.632)
pt3dadd(26.193, 155.233, 9.595, 0.648)
pt3dadd(26.245, 155.326, 9.549, 0.664)
pt3dadd(26.297, 155.417, 9.5, 0.678)
pt3dadd(26.348, 155.494, 9.437, 0.678)
pt3dadd(26.4, 155.57, 9.373, 0.678)
pt3dadd(26.451, 155.647, 9.309, 0.678)
pt3dadd(26.503, 155.724, 9.246, 0.678)
pt3dadd(26.555, 155.801, 9.182, 0.678)
pt3dadd(26.606, 155.878, 9.118, 0.678)
pt3dadd(26.658, 155.954, 9.054, 0.678)
pt3dadd(26.709, 156.031, 8.991, 0.678)
pt3dadd(26.761, 156.108, 8.927, 0.678)
pt3dadd(26.815, 156.186, 8.867, 0.678)
pt3dadd(26.884, 156.272, 8.828, 0.678)
pt3dadd(26.953, 156.359, 8.789, 0.678)
pt3dadd(27.022, 156.445, 8.75, 0.678)
pt3dadd(27.091, 156.532, 8.712, 0.678)
pt3dadd(27.16, 156.618, 8.673, 0.678)
pt3dadd(27.229, 156.704, 8.634, 0.678)
pt3dadd(27.298, 156.791, 8.595, 0.678)
pt3dadd(27.367, 156.877, 8.557, 0.678)
pt3dadd(27.436, 156.964, 8.518, 0.678)
pt3dadd(27.502, 157.051, 8.478, 0.68)
pt3dadd(27.553, 157.144, 8.43, 0.692)
pt3dadd(27.603, 157.236, 8.382, 0.706)
pt3dadd(27.654, 157.328, 8.334, 0.718)
pt3dadd(27.704, 157.421, 8.286, 0.73)
pt3dadd(27.755, 157.513, 8.238, 0.742)
pt3dadd(27.805, 157.604, 8.19, 0.756)
pt3dadd(27.856, 157.697, 8.142, 0.768)
pt3dadd(27.906, 157.789, 8.094, 0.78)
pt3dadd(27.957, 157.882, 8.045, 0.794)
pt3dadd(28.007, 157.975, 7.999, 0.802)
pt3dadd(28.058, 158.071, 7.956, 0.8)
pt3dadd(28.108, 158.167, 7.913, 0.798)
pt3dadd(28.159, 158.263, 7.87, 0.794)
pt3dadd(28.21, 158.359, 7.827, 0.792)
pt3dadd(28.26, 158.455, 7.784, 0.79)
pt3dadd(28.311, 158.551, 7.741, 0.786)
pt3dadd(28.361, 158.646, 7.699, 0.784)
pt3dadd(28.412, 158.742, 7.656, 0.782)
pt3dadd(28.462, 158.838, 7.613, 0.778)
pt3dadd(28.516, 158.935, 7.574, 0.768)
pt3dadd(28.576, 159.032, 7.544, 0.736)
pt3dadd(28.637, 159.13, 7.515, 0.704)
pt3dadd(28.697, 159.227, 7.485, 0.674)
pt3dadd(28.758, 159.324, 7.455, 0.642)
pt3dadd(28.818, 159.421, 7.426, 0.61)
pt3dadd(28.879, 159.518, 7.396, 0.58)
pt3dadd(28.939, 159.616, 7.366, 0.548)
pt3dadd(29, 159.713, 7.337, 0.516)
pt3dadd(29.06, 159.811, 7.307, 0.484)
pt3dadd(29.116, 159.908, 7.274, 0.458)
pt3dadd(29.162, 160.007, 7.231, 0.442)
pt3dadd(29.207, 160.106, 7.189, 0.424)
pt3dadd(29.253, 160.205, 7.147, 0.408)
pt3dadd(29.298, 160.303, 7.104, 0.392)
pt3dadd(29.344, 160.403, 7.062, 0.374)
pt3dadd(29.389, 160.501, 7.02, 0.358)
pt3dadd(29.435, 160.6, 6.978, 0.342)
pt3dadd(29.48, 160.699, 6.935, 0.324)
pt3dadd(29.526, 160.798, 6.893, 0.308)
pt3dadd(29.575, 160.896, 6.854, 0.294)
pt3dadd(29.632, 160.996, 6.824, 0.288)
pt3dadd(29.689, 161.094, 6.793, 0.28)
pt3dadd(29.746, 161.192, 6.762, 0.274)
pt3dadd(29.804, 161.292, 6.732, 0.266)
pt3dadd(29.861, 161.39, 6.701, 0.258)
pt3dadd(29.918, 161.489, 6.67, 0.252)
pt3dadd(29.975, 161.588, 6.639, 0.244)
pt3dadd(30.033, 161.687, 6.609, 0.238)
pt3dadd(30.09, 161.785, 6.578, 0.23)
pt3dadd(30.151, 161.884, 6.552, 0.228)
pt3dadd(30.218, 161.981, 6.533, 0.23)
pt3dadd(30.285, 162.078, 6.514, 0.232)
pt3dadd(30.352, 162.174, 6.496, 0.234)
pt3dadd(30.419, 162.271, 6.477, 0.238)
pt3dadd(30.486, 162.368, 6.458, 0.24)
pt3dadd(30.553, 162.466, 6.439, 0.242)
pt3dadd(30.62, 162.563, 6.42, 0.244)
pt3dadd(30.687, 162.659, 6.401, 0.248)
pt3dadd(30.754, 162.756, 6.382, 0.25)
pt3dadd(30.824, 162.852, 6.367, 0.258)
pt3dadd(30.897, 162.947, 6.358, 0.274)
pt3dadd(30.97, 163.04, 6.348, 0.29)
pt3dadd(31.043, 163.135, 6.339, 0.306)
pt3dadd(31.117, 163.23, 6.329, 0.322)
pt3dadd(31.19, 163.324, 6.32, 0.34)
pt3dadd(31.263, 163.418, 6.311, 0.356)
pt3dadd(31.336, 163.513, 6.301, 0.372)
pt3dadd(31.409, 163.607, 6.292, 0.388)
pt3dadd(31.483, 163.702, 6.283, 0.404)
pt3dadd(31.551, 163.8, 6.276, 0.428)
pt3dadd(31.612, 163.903, 6.274, 0.462)
pt3dadd(31.673, 164.006, 6.272, 0.494)
pt3dadd(31.735, 164.11, 6.269, 0.528)
pt3dadd(31.796, 164.213, 6.267, 0.56)
pt3dadd(31.857, 164.316, 6.265, 0.594)
pt3dadd(31.919, 164.418, 6.263, 0.628)
pt3dadd(31.98, 164.521, 6.26, 0.66)
pt3dadd(32.041, 164.624, 6.258, 0.694)
pt3dadd(32.103, 164.728, 6.256, 0.728)
pt3dadd(32.168, 164.828, 6.255, 0.746)
pt3dadd(32.239, 164.926, 6.255, 0.748)
pt3dadd(32.309, 165.023, 6.255, 0.75)
pt3dadd(32.38, 165.119, 6.255, 0.75)
pt3dadd(32.451, 165.216, 6.255, 0.752)
pt3dadd(32.521, 165.313, 6.255, 0.754)
pt3dadd(32.592, 165.41, 6.255, 0.756)
pt3dadd(32.662, 165.508, 6.255, 0.758)
pt3dadd(32.733, 165.605, 6.254, 0.76)
pt3dadd(32.804, 165.702, 6.254, 0.76)
pt3dadd(32.866, 165.804, 6.254, 0.74)
pt3dadd(32.921, 165.91, 6.254, 0.7)
pt3dadd(32.977, 166.016, 6.254, 0.658)
pt3dadd(33.032, 166.123, 6.254, 0.618)
pt3dadd(33.087, 166.23, 6.254, 0.578)
pt3dadd(33.142, 166.337, 6.254, 0.536)
pt3dadd(33.197, 166.442, 6.254, 0.496)
pt3dadd(33.252, 166.549, 6.254, 0.454)
pt3dadd(33.308, 166.656, 6.254, 0.414)
pt3dadd(33.363, 166.763, 6.254, 0.374)
pt3dadd(33.4, 166.876, 6.254, 0.372)
pt3dadd(33.427, 166.993, 6.254, 0.39)
pt3dadd(33.455, 167.11, 6.253, 0.408)
pt3dadd(33.483, 167.226, 6.253, 0.426)
pt3dadd(33.51, 167.342, 6.253, 0.444)
pt3dadd(33.538, 167.46, 6.253, 0.462)
pt3dadd(33.565, 167.576, 6.253, 0.482)
pt3dadd(33.593, 167.693, 6.253, 0.5)
pt3dadd(33.62, 167.81, 6.253, 0.518)
pt3dadd(33.648, 167.927, 6.253, 0.536)
}
}
proc shape3d_67() {
apic[20] { pt3dadd(33.668, 168.046, 6.252, 0.532)
pt3dadd(33.686, 168.164, 6.252, 0.518)
pt3dadd(33.703, 168.282, 6.252, 0.504)
pt3dadd(33.72, 168.401, 6.252, 0.492)
pt3dadd(33.738, 168.52, 6.251, 0.478)
pt3dadd(33.755, 168.638, 6.251, 0.464)
pt3dadd(33.772, 168.757, 6.251, 0.45)
pt3dadd(33.789, 168.876, 6.251, 0.436)
pt3dadd(33.807, 168.995, 6.25, 0.424)
pt3dadd(33.824, 169.114, 6.25, 0.41)
pt3dadd(33.845, 169.232, 6.249, 0.394)
pt3dadd(33.869, 169.35, 6.249, 0.376)
pt3dadd(33.892, 169.468, 6.248, 0.358)
pt3dadd(33.915, 169.585, 6.248, 0.338)
pt3dadd(33.939, 169.703, 6.247, 0.322)
pt3dadd(33.962, 169.82, 6.247, 0.304)
pt3dadd(33.985, 169.938, 6.247, 0.284)
pt3dadd(34.009, 170.056, 6.246, 0.268)
pt3dadd(34.032, 170.173, 6.246, 0.25)
pt3dadd(34.055, 170.291, 6.245, 0.23)
pt3dadd(34.098, 170.402, 6.244, 0.238)
pt3dadd(34.148, 170.512, 6.243, 0.254)
pt3dadd(34.197, 170.621, 6.242, 0.272)
pt3dadd(34.247, 170.73, 6.241, 0.288)
pt3dadd(34.297, 170.839, 6.24, 0.306)
pt3dadd(34.347, 170.948, 6.239, 0.322)
pt3dadd(34.397, 171.058, 6.238, 0.338)
pt3dadd(34.447, 171.167, 6.237, 0.356)
pt3dadd(34.497, 171.276, 6.236, 0.372)
pt3dadd(34.547, 171.385, 6.235, 0.39)
pt3dadd(34.624, 171.476, 6.233, 0.41)
pt3dadd(34.704, 171.565, 6.232, 0.43)
pt3dadd(34.784, 171.655, 6.23, 0.45)
pt3dadd(34.864, 171.744, 6.228, 0.47)
pt3dadd(34.944, 171.834, 6.226, 0.492)
pt3dadd(35.024, 171.923, 6.225, 0.512)
pt3dadd(35.104, 172.013, 6.223, 0.532)
pt3dadd(35.184, 172.102, 6.221, 0.552)
pt3dadd(35.264, 172.192, 6.22, 0.574)
pt3dadd(35.345, 172.279, 6.218, 0.592)
pt3dadd(35.45, 172.339, 6.215, 0.554)
pt3dadd(35.554, 172.398, 6.212, 0.518)
pt3dadd(35.658, 172.458, 6.208, 0.482)
pt3dadd(35.762, 172.517, 6.205, 0.444)
pt3dadd(35.866, 172.577, 6.202, 0.408)
pt3dadd(35.97, 172.637, 6.199, 0.372)
pt3dadd(36.074, 172.696, 6.196, 0.334)
pt3dadd(36.179, 172.756, 6.193, 0.298)
pt3dadd(36.283, 172.814, 6.19, 0.262)
pt3dadd(36.387, 172.874, 6.186, 0.226)
pt3dadd(36.49, 172.936, 6.18, 0.226)
pt3dadd(36.593, 172.996, 6.173, 0.226)
pt3dadd(36.696, 173.057, 6.167, 0.226)
pt3dadd(36.8, 173.117, 6.16, 0.226)
pt3dadd(36.903, 173.178, 6.154, 0.226)
pt3dadd(37.006, 173.239, 6.147, 0.226)
pt3dadd(37.109, 173.299, 6.14, 0.226)
pt3dadd(37.212, 173.36, 6.134, 0.226)
pt3dadd(37.316, 173.42, 6.127, 0.226)
pt3dadd(37.419, 173.48, 6.121, 0.228)
pt3dadd(37.529, 173.527, 6.109, 0.26)
pt3dadd(37.639, 173.573, 6.098, 0.292)
pt3dadd(37.749, 173.62, 6.087, 0.324)
pt3dadd(37.859, 173.665, 6.076, 0.356)
pt3dadd(37.969, 173.712, 6.065, 0.386)
pt3dadd(38.079, 173.758, 6.053, 0.42)
pt3dadd(38.189, 173.803, 6.042, 0.45)
pt3dadd(38.299, 173.85, 6.031, 0.482)
pt3dadd(38.409, 173.896, 6.02, 0.514)
pt3dadd(38.518, 173.941, 6.007, 0.546)
pt3dadd(38.62, 173.983, 5.966, 0.56)
pt3dadd(38.721, 174.025, 5.926, 0.572)
pt3dadd(38.823, 174.067, 5.886, 0.586)
pt3dadd(38.924, 174.109, 5.845, 0.6)
pt3dadd(39.026, 174.151, 5.805, 0.614)
pt3dadd(39.127, 174.192, 5.765, 0.628)
pt3dadd(39.229, 174.234, 5.724, 0.64)
pt3dadd(39.33, 174.276, 5.684, 0.654)
pt3dadd(39.432, 174.318, 5.644, 0.668)
pt3dadd(39.532, 174.364, 5.605, 0.668)
pt3dadd(39.63, 174.421, 5.572, 0.636)
pt3dadd(39.727, 174.479, 5.538, 0.604)
pt3dadd(39.825, 174.536, 5.505, 0.572)
pt3dadd(39.922, 174.594, 5.471, 0.538)
pt3dadd(40.019, 174.652, 5.438, 0.506)
pt3dadd(40.117, 174.709, 5.404, 0.474)
pt3dadd(40.214, 174.767, 5.371, 0.44)
pt3dadd(40.311, 174.823, 5.337, 0.408)
pt3dadd(40.409, 174.881, 5.303, 0.376)
pt3dadd(40.509, 174.936, 5.276, 0.35)
pt3dadd(40.616, 174.988, 5.258, 0.336)
pt3dadd(40.722, 175.039, 5.24, 0.324)
pt3dadd(40.829, 175.091, 5.223, 0.31)
pt3dadd(40.935, 175.141, 5.205, 0.298)
pt3dadd(41.041, 175.193, 5.188, 0.286)
pt3dadd(41.148, 175.244, 5.17, 0.272)
pt3dadd(41.254, 175.295, 5.152, 0.26)
pt3dadd(41.361, 175.346, 5.135, 0.246)
pt3dadd(41.467, 175.398, 5.117, 0.234)
pt3dadd(41.574, 175.45, 5.104, 0.226)
pt3dadd(41.681, 175.502, 5.097, 0.226)
pt3dadd(41.789, 175.555, 5.089, 0.226)
pt3dadd(41.896, 175.608, 5.082, 0.226)
pt3dadd(42.004, 175.661, 5.075, 0.226)
pt3dadd(42.111, 175.714, 5.068, 0.226)
pt3dadd(42.219, 175.765, 5.061, 0.226)
pt3dadd(42.326, 175.818, 5.054, 0.226)
pt3dadd(42.434, 175.871, 5.047, 0.226)
pt3dadd(42.541, 175.924, 5.04, 0.226)
pt3dadd(42.649, 175.975, 5.034, 0.23)
pt3dadd(42.758, 176.027, 5.03, 0.242)
pt3dadd(42.866, 176.078, 5.026, 0.252)
pt3dadd(42.975, 176.129, 5.022, 0.262)
pt3dadd(43.083, 176.18, 5.019, 0.274)
pt3dadd(43.192, 176.231, 5.015, 0.284)
pt3dadd(43.3, 176.282, 5.011, 0.296)
pt3dadd(43.409, 176.333, 5.007, 0.306)
pt3dadd(43.517, 176.384, 5.003, 0.316)
pt3dadd(43.626, 176.436, 4.999, 0.328)
pt3dadd(43.737, 176.478, 4.993, 0.346)
pt3dadd(43.852, 176.51, 4.985, 0.376)
pt3dadd(43.967, 176.543, 4.977, 0.404)
pt3dadd(44.082, 176.576, 4.969, 0.434)
pt3dadd(44.197, 176.609, 4.961, 0.464)
pt3dadd(44.312, 176.641, 4.953, 0.492)
pt3dadd(44.427, 176.674, 4.946, 0.522)
pt3dadd(44.543, 176.707, 4.938, 0.55)
pt3dadd(44.658, 176.74, 4.93, 0.58)
pt3dadd(44.773, 176.772, 4.922, 0.608)
pt3dadd(44.888, 176.801, 4.91, 0.604)
pt3dadd(45.004, 176.825, 4.894, 0.564)
pt3dadd(45.121, 176.848, 4.879, 0.524)
pt3dadd(45.237, 176.872, 4.864, 0.484)
pt3dadd(45.353, 176.896, 4.848, 0.444)
pt3dadd(45.469, 176.92, 4.833, 0.404)
pt3dadd(45.585, 176.944, 4.817, 0.364)
pt3dadd(45.701, 176.968, 4.802, 0.324)
pt3dadd(45.817, 176.992, 4.786, 0.284)
pt3dadd(45.933, 177.016, 4.771, 0.244)
pt3dadd(46.041, 177.041, 4.737, 0.228)
pt3dadd(46.141, 177.067, 4.687, 0.234)
pt3dadd(46.242, 177.094, 4.637, 0.238)
pt3dadd(46.342, 177.121, 4.587, 0.242)
pt3dadd(46.443, 177.148, 4.536, 0.246)
pt3dadd(46.543, 177.174, 4.487, 0.25)
pt3dadd(46.644, 177.2, 4.437, 0.256)
pt3dadd(46.744, 177.227, 4.387, 0.26)
pt3dadd(46.845, 177.254, 4.337, 0.264)
pt3dadd(46.945, 177.281, 4.286, 0.268)
pt3dadd(47.048, 177.324, 4.253, 0.28)
pt3dadd(47.152, 177.374, 4.228, 0.296)
pt3dadd(47.257, 177.425, 4.202, 0.31)
pt3dadd(47.361, 177.476, 4.177, 0.326)
pt3dadd(47.465, 177.527, 4.151, 0.34)
pt3dadd(47.57, 177.578, 4.126, 0.356)
pt3dadd(47.674, 177.629, 4.101, 0.37)
pt3dadd(47.778, 177.68, 4.075, 0.384)
pt3dadd(47.883, 177.731, 4.05, 0.4)
pt3dadd(47.987, 177.781, 4.025, 0.414)
pt3dadd(48.099, 177.818, 4.01, 0.404)
pt3dadd(48.214, 177.848, 3.998, 0.386)
pt3dadd(48.329, 177.88, 3.987, 0.366)
pt3dadd(48.445, 177.911, 3.976, 0.346)
pt3dadd(48.56, 177.942, 3.965, 0.328)
pt3dadd(48.675, 177.972, 3.954, 0.308)
pt3dadd(48.79, 178.003, 3.942, 0.29)
pt3dadd(48.905, 178.034, 3.931, 0.27)
pt3dadd(49.021, 178.064, 3.92, 0.25)
pt3dadd(49.136, 178.096, 3.909, 0.232)
pt3dadd(49.254, 178.114, 3.906, 0.226)
pt3dadd(49.373, 178.128, 3.906, 0.226)
pt3dadd(49.492, 178.141, 3.906, 0.226)
pt3dadd(49.612, 178.154, 3.906, 0.226)
pt3dadd(49.731, 178.168, 3.906, 0.226)
pt3dadd(49.85, 178.182, 3.906, 0.226)
pt3dadd(49.969, 178.195, 3.905, 0.226)
pt3dadd(50.088, 178.208, 3.905, 0.226)
pt3dadd(50.208, 178.223, 3.905, 0.226)
pt3dadd(50.327, 178.236, 3.905, 0.226)
pt3dadd(50.447, 178.241, 3.905, 0.226)
pt3dadd(50.567, 178.243, 3.905, 0.226)
pt3dadd(50.687, 178.246, 3.905, 0.226)
pt3dadd(50.807, 178.248, 3.905, 0.226)
pt3dadd(50.927, 178.25, 3.905, 0.226)
pt3dadd(51.047, 178.253, 3.905, 0.226)
pt3dadd(51.167, 178.255, 3.904, 0.226)
pt3dadd(51.287, 178.258, 3.904, 0.226)
pt3dadd(51.407, 178.26, 3.904, 0.226)
pt3dadd(51.527, 178.262, 3.904, 0.226)
pt3dadd(51.647, 178.264, 3.904, 0.236)
pt3dadd(51.767, 178.265, 3.904, 0.25)
pt3dadd(51.887, 178.267, 3.903, 0.264)
pt3dadd(52.007, 178.268, 3.903, 0.278)
pt3dadd(52.127, 178.271, 3.903, 0.292)
pt3dadd(52.246, 178.272, 3.903, 0.304)
pt3dadd(52.366, 178.273, 3.902, 0.318)
pt3dadd(52.486, 178.276, 3.902, 0.332)
pt3dadd(52.606, 178.277, 3.902, 0.346)
pt3dadd(52.726, 178.279, 3.902, 0.36)
pt3dadd(52.846, 178.282, 3.901, 0.362)
}
}
proc shape3d_68() {
apic[20] { pt3dadd(52.966, 178.284, 3.901, 0.36)
pt3dadd(53.086, 178.288, 3.9, 0.36)
pt3dadd(53.206, 178.29, 3.9, 0.358)
pt3dadd(53.326, 178.292, 3.899, 0.356)
pt3dadd(53.446, 178.296, 3.899, 0.354)
pt3dadd(53.566, 178.298, 3.898, 0.354)
pt3dadd(53.686, 178.302, 3.898, 0.352)
pt3dadd(53.806, 178.304, 3.897, 0.35)
pt3dadd(53.926, 178.307, 3.897, 0.348)
pt3dadd(54.046, 178.313, 3.896, 0.34)
pt3dadd(54.166, 178.318, 3.895, 0.328)
pt3dadd(54.286, 178.324, 3.894, 0.314)
pt3dadd(54.406, 178.33, 3.893, 0.302)
pt3dadd(54.525, 178.336, 3.892, 0.29)
pt3dadd(54.645, 178.342, 3.891, 0.278)
pt3dadd(54.765, 178.346, 3.891, 0.266)
pt3dadd(54.885, 178.352, 3.89, 0.254)
pt3dadd(55.005, 178.358, 3.889, 0.242)
pt3dadd(55.125, 178.364, 3.888, 0.23)
pt3dadd(55.244, 178.374, 3.886, 0.226)
pt3dadd(55.364, 178.384, 3.885, 0.226)
pt3dadd(55.483, 178.394, 3.883, 0.226)
pt3dadd(55.603, 178.405, 3.881, 0.226)
pt3dadd(55.722, 178.416, 3.88, 0.226)
pt3dadd(55.842, 178.427, 3.878, 0.226)
pt3dadd(55.961, 178.436, 3.876, 0.226)
pt3dadd(56.081, 178.447, 3.875, 0.226)
pt3dadd(56.2, 178.458, 3.873, 0.226)
pt3dadd(56.32, 178.469, 3.871, 0.226)
pt3dadd(56.439, 178.483, 3.869, 0.226)
pt3dadd(56.558, 178.499, 3.866, 0.226)
pt3dadd(56.677, 178.514, 3.863, 0.226)
pt3dadd(56.796, 178.53, 3.86, 0.226)
pt3dadd(56.915, 178.547, 3.857, 0.226)
pt3dadd(57.033, 178.562, 3.854, 0.226)
pt3dadd(57.152, 178.578, 3.852, 0.226)
pt3dadd(57.271, 178.594, 3.849, 0.226)
pt3dadd(57.39, 178.609, 3.846, 0.226)
pt3dadd(57.509, 178.626, 3.843, 0.226)
pt3dadd(57.621, 178.664, 3.838, 0.226)
pt3dadd(57.731, 178.712, 3.831, 0.226)
pt3dadd(57.841, 178.76, 3.825, 0.226)
pt3dadd(57.951, 178.808, 3.818, 0.226)
pt3dadd(58.061, 178.855, 3.812, 0.226)
pt3dadd(58.171, 178.903, 3.805, 0.226)
pt3dadd(58.28, 178.951, 3.799, 0.226)
pt3dadd(58.39, 178.998, 3.792, 0.226)
pt3dadd(58.5, 179.046, 3.786, 0.226)
pt3dadd(58.61, 179.094, 3.779, 0.226)
pt3dadd(58.722, 179.136, 3.771, 0.226)
pt3dadd(58.834, 179.176, 3.761, 0.226)
pt3dadd(58.947, 179.215, 3.751, 0.226)
pt3dadd(59.059, 179.256, 3.741, 0.226)
pt3dadd(59.172, 179.296, 3.732, 0.226)
pt3dadd(59.285, 179.335, 3.722, 0.226)
pt3dadd(59.397, 179.376, 3.712, 0.226)
pt3dadd(59.51, 179.416, 3.702, 0.226)
pt3dadd(59.622, 179.455, 3.693, 0.226)
pt3dadd(59.735, 179.496, 3.683, 0.226)
pt3dadd(59.847, 179.53, 3.663, 0.232)
pt3dadd(59.959, 179.563, 3.64, 0.24)
pt3dadd(60.071, 179.596, 3.616, 0.25)
pt3dadd(60.183, 179.628, 3.593, 0.258)
pt3dadd(60.295, 179.66, 3.569, 0.266)
pt3dadd(60.407, 179.693, 3.546, 0.274)
pt3dadd(60.519, 179.725, 3.523, 0.282)
pt3dadd(60.631, 179.759, 3.499, 0.292)
pt3dadd(60.743, 179.791, 3.476, 0.3)
pt3dadd(60.855, 179.824, 3.453, 0.308)
pt3dadd(60.964, 179.855, 3.42, 0.32)
pt3dadd(61.073, 179.886, 3.387, 0.33)
pt3dadd(61.181, 179.916, 3.353, 0.342)
pt3dadd(61.29, 179.947, 3.319, 0.352)
pt3dadd(61.399, 179.978, 3.285, 0.364)
pt3dadd(61.507, 180.01, 3.251, 0.374)
pt3dadd(61.616, 180.041, 3.217, 0.386)
pt3dadd(61.724, 180.071, 3.183, 0.396)
pt3dadd(61.833, 180.102, 3.149, 0.408)
pt3dadd(61.941, 180.133, 3.116, 0.42)
pt3dadd(62.049, 180.179, 3.092, 0.404)
pt3dadd(62.155, 180.227, 3.07, 0.388)
pt3dadd(62.262, 180.275, 3.048, 0.37)
pt3dadd(62.369, 180.323, 3.025, 0.352)
pt3dadd(62.476, 180.37, 3.003, 0.336)
pt3dadd(62.583, 180.418, 2.981, 0.318)
pt3dadd(62.689, 180.466, 2.959, 0.3)
pt3dadd(62.796, 180.514, 2.937, 0.284)
pt3dadd(62.903, 180.56, 2.914, 0.266)
pt3dadd(63.01, 180.608, 2.892, 0.248)
pt3dadd(63.121, 180.65, 2.879, 0.274)
pt3dadd(63.233, 180.691, 2.867, 0.304)
pt3dadd(63.345, 180.732, 2.855, 0.334)
pt3dadd(63.457, 180.773, 2.843, 0.362)
pt3dadd(63.569, 180.815, 2.831, 0.394)
pt3dadd(63.681, 180.856, 2.819, 0.422)
pt3dadd(63.792, 180.896, 2.808, 0.452)
pt3dadd(63.904, 180.937, 2.796, 0.482)
pt3dadd(64.016, 180.978, 2.784, 0.512)
pt3dadd(64.128, 181.019, 2.772, 0.542)
pt3dadd(64.242, 181.055, 2.767, 0.558)
pt3dadd(64.357, 181.091, 2.763, 0.57)
pt3dadd(64.472, 181.127, 2.76, 0.584)
pt3dadd(64.586, 181.162, 2.756, 0.598)
pt3dadd(64.701, 181.198, 2.752, 0.61)
pt3dadd(64.815, 181.232, 2.748, 0.624)
pt3dadd(64.93, 181.268, 2.744, 0.638)
pt3dadd(65.044, 181.303, 2.74, 0.65)
pt3dadd(65.159, 181.339, 2.737, 0.664)
pt3dadd(65.273, 181.374, 2.733, 0.676)
pt3dadd(65.384, 181.422, 2.732, 0.678)
pt3dadd(65.493, 181.47, 2.732, 0.678)
pt3dadd(65.603, 181.518, 2.732, 0.678)
pt3dadd(65.713, 181.566, 2.732, 0.678)
pt3dadd(65.823, 181.615, 2.732, 0.678)
pt3dadd(65.933, 181.663, 2.732, 0.678)
pt3dadd(66.043, 181.711, 2.732, 0.678)
pt3dadd(66.153, 181.76, 2.732, 0.678)
pt3dadd(66.262, 181.808, 2.732, 0.678)
pt3dadd(66.372, 181.856, 2.732, 0.678)
pt3dadd(66.475, 181.918, 2.732, 0.678)
pt3dadd(66.578, 181.98, 2.732, 0.678)
pt3dadd(66.681, 182.041, 2.732, 0.678)
pt3dadd(66.784, 182.104, 2.732, 0.678)
pt3dadd(66.887, 182.165, 2.732, 0.678)
pt3dadd(66.99, 182.226, 2.732, 0.678)
pt3dadd(67.093, 182.288, 2.732, 0.678)
pt3dadd(67.196, 182.35, 2.732, 0.678)
pt3dadd(67.299, 182.412, 2.732, 0.678)
pt3dadd(67.402, 182.473, 2.732, 0.678)
}
apic[21] {pt3dclear()
pt3dadd(23.257, 148.649, 12.914, 0.226)
pt3dadd(23.32, 148.649, 12.927, 0.226)
pt3dadd(23.437, 148.65, 12.951, 0.226)
pt3dadd(23.553, 148.65, 12.975, 0.226)
pt3dadd(23.67, 148.65, 12.999, 0.226)
pt3dadd(23.786, 148.651, 13.023, 0.226)
pt3dadd(23.903, 148.651, 13.047, 0.226)
pt3dadd(24.019, 148.652, 13.071, 0.226)
pt3dadd(24.136, 148.652, 13.095, 0.226)
pt3dadd(24.253, 148.644, 13.117, 0.23)
pt3dadd(24.37, 148.636, 13.138, 0.236)
pt3dadd(24.487, 148.626, 13.159, 0.24)
pt3dadd(24.604, 148.618, 13.18, 0.244)
pt3dadd(24.72, 148.609, 13.201, 0.248)
pt3dadd(24.837, 148.601, 13.223, 0.252)
pt3dadd(24.954, 148.591, 13.244, 0.258)
pt3dadd(25.071, 148.583, 13.265, 0.262)
pt3dadd(25.188, 148.574, 13.286, 0.266)
pt3dadd(25.303, 148.555, 13.304, 0.276)
pt3dadd(25.406, 148.495, 13.305, 0.306)
pt3dadd(25.51, 148.435, 13.307, 0.336)
pt3dadd(25.614, 148.374, 13.309, 0.366)
pt3dadd(25.717, 148.314, 13.311, 0.396)
pt3dadd(25.821, 148.254, 13.313, 0.426)
pt3dadd(25.925, 148.194, 13.314, 0.456)
pt3dadd(26.029, 148.133, 13.316, 0.486)
pt3dadd(26.132, 148.073, 13.318, 0.516)
pt3dadd(26.236, 148.013, 13.32, 0.546)
pt3dadd(26.341, 147.955, 13.322, 0.572)
pt3dadd(26.453, 147.912, 13.324, 0.582)
pt3dadd(26.565, 147.869, 13.327, 0.594)
pt3dadd(26.677, 147.827, 13.329, 0.604)
pt3dadd(26.789, 147.784, 13.332, 0.616)
pt3dadd(26.901, 147.74, 13.334, 0.626)
pt3dadd(27.013, 147.697, 13.337, 0.638)
pt3dadd(27.125, 147.654, 13.339, 0.648)
pt3dadd(27.237, 147.611, 13.341, 0.66)
pt3dadd(27.349, 147.569, 13.344, 0.67)
pt3dadd(27.463, 147.53, 13.347, 0.678)
pt3dadd(27.58, 147.508, 13.352, 0.678)
pt3dadd(27.698, 147.485, 13.356, 0.678)
pt3dadd(27.816, 147.462, 13.361, 0.678)
pt3dadd(27.933, 147.439, 13.366, 0.678)
pt3dadd(28.051, 147.416, 13.371, 0.678)
pt3dadd(28.169, 147.394, 13.375, 0.678)
pt3dadd(28.286, 147.371, 13.38, 0.678)
pt3dadd(28.404, 147.348, 13.385, 0.678)
pt3dadd(28.522, 147.325, 13.39, 0.678)
pt3dadd(28.64, 147.307, 13.395, 0.678)
pt3dadd(28.759, 147.296, 13.403, 0.678)
pt3dadd(28.878, 147.287, 13.411, 0.678)
pt3dadd(28.998, 147.276, 13.419, 0.678)
pt3dadd(29.117, 147.266, 13.426, 0.678)
pt3dadd(29.236, 147.257, 13.434, 0.678)
pt3dadd(29.355, 147.246, 13.442, 0.678)
pt3dadd(29.474, 147.236, 13.45, 0.678)
pt3dadd(29.594, 147.226, 13.457, 0.678)
pt3dadd(29.713, 147.216, 13.465, 0.678)
pt3dadd(29.832, 147.208, 13.475, 0.678)
pt3dadd(29.95, 147.204, 13.49, 0.678)
pt3dadd(30.069, 147.202, 13.505, 0.678)
pt3dadd(30.188, 147.198, 13.52, 0.678)
pt3dadd(30.306, 147.194, 13.535, 0.678)
pt3dadd(30.425, 147.191, 13.549, 0.678)
pt3dadd(30.544, 147.187, 13.564, 0.678)
pt3dadd(30.662, 147.184, 13.579, 0.678)
pt3dadd(30.781, 147.181, 13.594, 0.678)
pt3dadd(30.899, 147.178, 13.609, 0.678)
pt3dadd(31.016, 147.173, 13.631, 0.678)
pt3dadd(31.128, 147.167, 13.665, 0.678)
pt3dadd(31.24, 147.161, 13.7, 0.678)
}
}
proc shape3d_69() {
apic[21] { pt3dadd(31.353, 147.155, 13.735, 0.678)
pt3dadd(31.465, 147.148, 13.77, 0.678)
pt3dadd(31.577, 147.142, 13.805, 0.678)
pt3dadd(31.69, 147.136, 13.84, 0.678)
pt3dadd(31.802, 147.13, 13.874, 0.678)
pt3dadd(31.914, 147.124, 13.909, 0.678)
pt3dadd(32.027, 147.116, 13.944, 0.678)
pt3dadd(32.141, 147.109, 13.973, 0.666)
pt3dadd(32.258, 147.1, 13.992, 0.63)
pt3dadd(32.376, 147.089, 14.01, 0.594)
pt3dadd(32.493, 147.079, 14.029, 0.56)
pt3dadd(32.611, 147.068, 14.047, 0.524)
pt3dadd(32.728, 147.059, 14.066, 0.49)
pt3dadd(32.846, 147.049, 14.084, 0.454)
pt3dadd(32.963, 147.038, 14.103, 0.418)
pt3dadd(33.081, 147.029, 14.121, 0.384)
pt3dadd(33.198, 147.018, 14.14, 0.348)
pt3dadd(33.315, 147.001, 14.153, 0.332)
pt3dadd(33.431, 146.97, 14.157, 0.35)
pt3dadd(33.547, 146.94, 14.162, 0.366)
pt3dadd(33.663, 146.909, 14.166, 0.384)
pt3dadd(33.779, 146.879, 14.17, 0.4)
pt3dadd(33.895, 146.848, 14.174, 0.418)
pt3dadd(34.011, 146.818, 14.179, 0.434)
pt3dadd(34.127, 146.786, 14.183, 0.452)
pt3dadd(34.242, 146.756, 14.187, 0.468)
pt3dadd(34.358, 146.725, 14.191, 0.486)
pt3dadd(34.474, 146.696, 14.185, 0.504)
pt3dadd(34.589, 146.67, 14.166, 0.522)
pt3dadd(34.703, 146.644, 14.147, 0.54)
pt3dadd(34.818, 146.617, 14.128, 0.56)
pt3dadd(34.933, 146.591, 14.109, 0.578)
pt3dadd(35.048, 146.564, 14.09, 0.596)
pt3dadd(35.162, 146.538, 14.071, 0.616)
pt3dadd(35.277, 146.512, 14.052, 0.634)
pt3dadd(35.392, 146.484, 14.032, 0.654)
pt3dadd(35.507, 146.458, 14.013, 0.672)
pt3dadd(35.62, 146.447, 13.984, 0.676)
pt3dadd(35.733, 146.443, 13.95, 0.672)
pt3dadd(35.845, 146.44, 13.915, 0.668)
pt3dadd(35.958, 146.435, 13.881, 0.662)
pt3dadd(36.071, 146.431, 13.847, 0.658)
pt3dadd(36.183, 146.428, 13.813, 0.654)
pt3dadd(36.296, 146.424, 13.778, 0.65)
pt3dadd(36.409, 146.42, 13.744, 0.646)
pt3dadd(36.521, 146.417, 13.71, 0.642)
pt3dadd(36.634, 146.413, 13.675, 0.638)
pt3dadd(36.746, 146.438, 13.65, 0.622)
pt3dadd(36.858, 146.472, 13.627, 0.606)
pt3dadd(36.97, 146.504, 13.604, 0.586)
pt3dadd(37.082, 146.537, 13.581, 0.57)
pt3dadd(37.194, 146.57, 13.558, 0.552)
pt3dadd(37.306, 146.603, 13.535, 0.534)
pt3dadd(37.419, 146.636, 13.512, 0.516)
pt3dadd(37.531, 146.669, 13.489, 0.498)
pt3dadd(37.643, 146.701, 13.466, 0.48)
pt3dadd(37.755, 146.735, 13.443, 0.462)
pt3dadd(37.869, 146.765, 13.429, 0.458)
pt3dadd(37.985, 146.795, 13.418, 0.456)
pt3dadd(38.1, 146.824, 13.407, 0.456)
pt3dadd(38.216, 146.854, 13.396, 0.456)
pt3dadd(38.332, 146.884, 13.385, 0.454)
pt3dadd(38.447, 146.914, 13.374, 0.454)
pt3dadd(38.563, 146.942, 13.363, 0.454)
pt3dadd(38.678, 146.972, 13.352, 0.454)
pt3dadd(38.794, 147.002, 13.34, 0.452)
pt3dadd(38.909, 147.031, 13.329, 0.452)
pt3dadd(39.027, 147.053, 13.325, 0.44)
pt3dadd(39.145, 147.071, 13.322, 0.426)
pt3dadd(39.264, 147.09, 13.32, 0.412)
pt3dadd(39.382, 147.109, 13.317, 0.398)
pt3dadd(39.501, 147.127, 13.314, 0.382)
pt3dadd(39.619, 147.146, 13.312, 0.368)
pt3dadd(39.738, 147.166, 13.309, 0.354)
pt3dadd(39.856, 147.184, 13.306, 0.34)
pt3dadd(39.975, 147.203, 13.304, 0.326)
pt3dadd(40.093, 147.221, 13.301, 0.312)
pt3dadd(40.213, 147.233, 13.3, 0.302)
pt3dadd(40.332, 147.241, 13.3, 0.294)
pt3dadd(40.452, 147.251, 13.3, 0.286)
pt3dadd(40.572, 147.26, 13.3, 0.278)
pt3dadd(40.691, 147.27, 13.3, 0.268)
pt3dadd(40.811, 147.28, 13.3, 0.26)
pt3dadd(40.931, 147.288, 13.3, 0.252)
pt3dadd(41.05, 147.298, 13.3, 0.244)
pt3dadd(41.17, 147.307, 13.3, 0.236)
pt3dadd(41.289, 147.317, 13.3, 0.228)
pt3dadd(41.409, 147.323, 13.3, 0.232)
pt3dadd(41.529, 147.328, 13.3, 0.24)
pt3dadd(41.649, 147.334, 13.3, 0.248)
pt3dadd(41.769, 147.338, 13.3, 0.254)
pt3dadd(41.889, 147.344, 13.3, 0.262)
pt3dadd(42.009, 147.349, 13.3, 0.27)
pt3dadd(42.129, 147.355, 13.3, 0.278)
pt3dadd(42.249, 147.36, 13.3, 0.284)
pt3dadd(42.368, 147.366, 13.3, 0.292)
pt3dadd(42.488, 147.371, 13.3, 0.3)
pt3dadd(42.608, 147.382, 13.3, 0.31)
pt3dadd(42.727, 147.394, 13.3, 0.322)
pt3dadd(42.846, 147.406, 13.3, 0.332)
pt3dadd(42.966, 147.418, 13.3, 0.344)
pt3dadd(43.085, 147.43, 13.3, 0.356)
pt3dadd(43.205, 147.442, 13.3, 0.366)
pt3dadd(43.324, 147.454, 13.3, 0.378)
pt3dadd(43.444, 147.466, 13.3, 0.388)
pt3dadd(43.563, 147.478, 13.3, 0.4)
pt3dadd(43.682, 147.49, 13.3, 0.412)
pt3dadd(43.798, 147.521, 13.3, 0.396)
pt3dadd(43.913, 147.554, 13.3, 0.378)
pt3dadd(44.028, 147.588, 13.3, 0.358)
pt3dadd(44.144, 147.622, 13.3, 0.34)
pt3dadd(44.259, 147.655, 13.3, 0.322)
pt3dadd(44.374, 147.688, 13.3, 0.304)
pt3dadd(44.49, 147.721, 13.3, 0.284)
pt3dadd(44.605, 147.755, 13.3, 0.266)
pt3dadd(44.72, 147.788, 13.3, 0.248)
pt3dadd(44.835, 147.822, 13.3, 0.23)
pt3dadd(44.954, 147.811, 13.3, 0.228)
pt3dadd(45.073, 147.794, 13.3, 0.228)
pt3dadd(45.191, 147.779, 13.3, 0.228)
pt3dadd(45.31, 147.762, 13.3, 0.226)
pt3dadd(45.429, 147.745, 13.3, 0.226)
pt3dadd(45.548, 147.73, 13.3, 0.226)
pt3dadd(45.667, 147.713, 13.3, 0.226)
pt3dadd(45.786, 147.697, 13.3, 0.226)
pt3dadd(45.905, 147.68, 13.3, 0.226)
pt3dadd(46.024, 147.664, 13.3, 0.226)
pt3dadd(46.143, 147.65, 13.3, 0.226)
pt3dadd(46.262, 147.636, 13.3, 0.226)
pt3dadd(46.381, 147.623, 13.3, 0.226)
pt3dadd(46.5, 147.61, 13.3, 0.226)
pt3dadd(46.62, 147.595, 13.3, 0.226)
pt3dadd(46.739, 147.582, 13.3, 0.226)
pt3dadd(46.858, 147.568, 13.3, 0.226)
pt3dadd(46.977, 147.554, 13.3, 0.226)
pt3dadd(47.097, 147.541, 13.3, 0.226)
pt3dadd(47.216, 147.527, 13.3, 0.226)
pt3dadd(47.335, 147.518, 13.3, 0.248)
pt3dadd(47.455, 147.51, 13.3, 0.272)
pt3dadd(47.575, 147.503, 13.3, 0.296)
pt3dadd(47.695, 147.494, 13.3, 0.32)
pt3dadd(47.814, 147.486, 13.3, 0.344)
pt3dadd(47.934, 147.478, 13.3, 0.368)
pt3dadd(48.054, 147.47, 13.3, 0.392)
pt3dadd(48.174, 147.462, 13.3, 0.416)
pt3dadd(48.293, 147.454, 13.3, 0.44)
pt3dadd(48.413, 147.446, 13.3, 0.464)
pt3dadd(48.533, 147.448, 13.3, 0.47)
pt3dadd(48.653, 147.451, 13.3, 0.474)
pt3dadd(48.773, 147.455, 13.3, 0.478)
pt3dadd(48.893, 147.458, 13.3, 0.482)
pt3dadd(49.013, 147.461, 13.3, 0.486)
pt3dadd(49.133, 147.464, 13.3, 0.49)
pt3dadd(49.253, 147.468, 13.3, 0.492)
pt3dadd(49.373, 147.47, 13.3, 0.496)
pt3dadd(49.493, 147.474, 13.3, 0.5)
pt3dadd(49.613, 147.478, 13.3, 0.504)
pt3dadd(49.731, 147.498, 13.3, 0.478)
pt3dadd(49.849, 147.521, 13.3, 0.45)
pt3dadd(49.967, 147.542, 13.3, 0.422)
pt3dadd(50.085, 147.564, 13.3, 0.394)
pt3dadd(50.202, 147.587, 13.3, 0.366)
pt3dadd(50.32, 147.608, 13.3, 0.338)
pt3dadd(50.438, 147.63, 13.3, 0.31)
pt3dadd(50.556, 147.653, 13.3, 0.282)
pt3dadd(50.674, 147.674, 13.3, 0.254)
pt3dadd(50.792, 147.696, 13.3, 0.226)
pt3dadd(50.904, 147.74, 13.3, 0.226)
pt3dadd(51.016, 147.784, 13.3, 0.226)
pt3dadd(51.128, 147.828, 13.3, 0.226)
pt3dadd(51.239, 147.871, 13.3, 0.226)
pt3dadd(51.351, 147.914, 13.3, 0.226)
pt3dadd(51.463, 147.959, 13.3, 0.226)
pt3dadd(51.575, 148.002, 13.3, 0.226)
pt3dadd(51.686, 148.046, 13.3, 0.226)
pt3dadd(51.798, 148.09, 13.3, 0.226)
pt3dadd(51.91, 148.133, 13.3, 0.226)
pt3dadd(52.027, 148.159, 13.3, 0.226)
pt3dadd(52.144, 148.186, 13.3, 0.226)
pt3dadd(52.261, 148.211, 13.3, 0.226)
pt3dadd(52.379, 148.237, 13.3, 0.226)
pt3dadd(52.496, 148.264, 13.3, 0.226)
pt3dadd(52.613, 148.289, 13.3, 0.226)
pt3dadd(52.73, 148.315, 13.3, 0.226)
pt3dadd(52.847, 148.342, 13.3, 0.226)
pt3dadd(52.964, 148.367, 13.3, 0.226)
pt3dadd(53.081, 148.393, 13.3, 0.226)
pt3dadd(53.201, 148.408, 13.3, 0.226)
pt3dadd(53.32, 148.421, 13.3, 0.226)
pt3dadd(53.439, 148.435, 13.3, 0.226)
pt3dadd(53.558, 148.45, 13.3, 0.226)
pt3dadd(53.677, 148.463, 13.3, 0.226)
pt3dadd(53.797, 148.477, 13.3, 0.226)
pt3dadd(53.916, 148.49, 13.3, 0.226)
pt3dadd(54.035, 148.505, 13.3, 0.226)
pt3dadd(54.154, 148.519, 13.3, 0.226)
pt3dadd(54.273, 148.532, 13.3, 0.226)
pt3dadd(54.392, 148.517, 13.3, 0.226)
pt3dadd(54.511, 148.502, 13.3, 0.226)
pt3dadd(54.63, 148.487, 13.3, 0.226)
}
}
proc shape3d_70() {
apic[21] { pt3dadd(54.75, 148.472, 13.3, 0.226)
pt3dadd(54.869, 148.457, 13.3, 0.226)
pt3dadd(54.988, 148.442, 13.3, 0.226)
pt3dadd(55.107, 148.427, 13.3, 0.226)
pt3dadd(55.226, 148.411, 13.3, 0.226)
pt3dadd(55.345, 148.397, 13.3, 0.226)
pt3dadd(55.464, 148.385, 13.3, 0.226)
pt3dadd(55.584, 148.393, 13.3, 0.226)
pt3dadd(55.703, 148.402, 13.3, 0.226)
pt3dadd(55.823, 148.41, 13.3, 0.226)
pt3dadd(55.943, 148.418, 13.3, 0.226)
pt3dadd(56.062, 148.428, 13.3, 0.226)
pt3dadd(56.182, 148.436, 13.3, 0.226)
pt3dadd(56.302, 148.445, 13.3, 0.226)
pt3dadd(56.421, 148.453, 13.3, 0.226)
pt3dadd(56.541, 148.462, 13.3, 0.226)
pt3dadd(56.654, 148.493, 13.3, 0.232)
pt3dadd(56.759, 148.552, 13.3, 0.244)
pt3dadd(56.864, 148.609, 13.3, 0.256)
pt3dadd(56.969, 148.667, 13.3, 0.268)
pt3dadd(57.074, 148.726, 13.3, 0.28)
pt3dadd(57.179, 148.783, 13.3, 0.29)
pt3dadd(57.284, 148.841, 13.3, 0.302)
pt3dadd(57.389, 148.9, 13.3, 0.314)
pt3dadd(57.495, 148.957, 13.3, 0.326)
pt3dadd(57.6, 149.015, 13.3, 0.338)
pt3dadd(57.702, 149.078, 13.3, 0.34)
pt3dadd(57.803, 149.143, 13.3, 0.34)
pt3dadd(57.903, 149.208, 13.3, 0.338)
pt3dadd(58.004, 149.273, 13.3, 0.336)
pt3dadd(58.105, 149.338, 13.3, 0.334)
pt3dadd(58.206, 149.404, 13.3, 0.334)
pt3dadd(58.307, 149.468, 13.3, 0.332)
pt3dadd(58.408, 149.533, 13.3, 0.33)
pt3dadd(58.509, 149.598, 13.3, 0.33)
pt3dadd(58.61, 149.663, 13.3, 0.328)
pt3dadd(58.723, 149.701, 13.3, 0.32)
pt3dadd(58.839, 149.731, 13.3, 0.308)
pt3dadd(58.955, 149.762, 13.3, 0.298)
pt3dadd(59.071, 149.792, 13.3, 0.288)
pt3dadd(59.187, 149.824, 13.3, 0.278)
pt3dadd(59.303, 149.855, 13.3, 0.268)
pt3dadd(59.418, 149.885, 13.3, 0.258)
pt3dadd(59.535, 149.916, 13.3, 0.248)
pt3dadd(59.651, 149.947, 13.3, 0.236)
pt3dadd(59.766, 149.977, 13.3, 0.226)
pt3dadd(59.886, 149.986, 13.3, 0.236)
pt3dadd(60.006, 149.99, 13.3, 0.244)
pt3dadd(60.126, 149.996, 13.3, 0.254)
pt3dadd(60.246, 150.002, 13.3, 0.264)
pt3dadd(60.366, 150.008, 13.3, 0.274)
pt3dadd(60.485, 150.014, 13.3, 0.284)
pt3dadd(60.605, 150.02, 13.3, 0.294)
pt3dadd(60.725, 150.026, 13.3, 0.304)
pt3dadd(60.845, 150.032, 13.3, 0.314)
pt3dadd(60.965, 150.038, 13.3, 0.324)
pt3dadd(61.085, 150.036, 13.3, 0.342)
pt3dadd(61.205, 150.034, 13.3, 0.362)
pt3dadd(61.325, 150.031, 13.3, 0.382)
pt3dadd(61.445, 150.029, 13.3, 0.4)
pt3dadd(61.565, 150.026, 13.3, 0.42)
pt3dadd(61.685, 150.024, 13.3, 0.438)
pt3dadd(61.805, 150.022, 13.3, 0.458)
pt3dadd(61.925, 150.019, 13.3, 0.478)
pt3dadd(62.045, 150.017, 13.3, 0.496)
pt3dadd(62.165, 150.014, 13.3, 0.516)
pt3dadd(62.284, 150.01, 13.3, 0.53)
pt3dadd(62.404, 150.006, 13.3, 0.542)
pt3dadd(62.524, 150.001, 13.3, 0.556)
pt3dadd(62.644, 149.996, 13.3, 0.568)
pt3dadd(62.764, 149.993, 13.3, 0.582)
pt3dadd(62.884, 149.988, 13.3, 0.594)
pt3dadd(63.004, 149.983, 13.3, 0.608)
pt3dadd(63.124, 149.98, 13.3, 0.62)
pt3dadd(63.244, 149.975, 13.3, 0.634)
pt3dadd(63.364, 149.97, 13.3, 0.646)
pt3dadd(63.483, 149.962, 13.3, 0.628)
pt3dadd(63.603, 149.953, 13.3, 0.61)
pt3dadd(63.723, 149.944, 13.3, 0.59)
pt3dadd(63.842, 149.935, 13.3, 0.57)
pt3dadd(63.962, 149.927, 13.3, 0.552)
pt3dadd(64.082, 149.918, 13.299, 0.532)
pt3dadd(64.201, 149.909, 13.299, 0.514)
pt3dadd(64.321, 149.9, 13.299, 0.494)
pt3dadd(64.441, 149.892, 13.299, 0.476)
pt3dadd(64.56, 149.882, 13.299, 0.456)
pt3dadd(64.68, 149.868, 13.299, 0.436)
pt3dadd(64.799, 149.854, 13.299, 0.418)
pt3dadd(64.918, 149.839, 13.299, 0.398)
pt3dadd(65.037, 149.825, 13.299, 0.38)
pt3dadd(65.156, 149.81, 13.299, 0.36)
pt3dadd(65.275, 149.796, 13.299, 0.342)
pt3dadd(65.394, 149.782, 13.299, 0.322)
pt3dadd(65.514, 149.767, 13.298, 0.302)
pt3dadd(65.633, 149.753, 13.298, 0.284)
pt3dadd(65.752, 149.738, 13.298, 0.264)
pt3dadd(65.865, 149.699, 13.298, 0.274)
pt3dadd(65.978, 149.659, 13.298, 0.284)
pt3dadd(66.091, 149.618, 13.298, 0.294)
pt3dadd(66.204, 149.579, 13.297, 0.306)
pt3dadd(66.318, 149.539, 13.297, 0.316)
pt3dadd(66.431, 149.498, 13.297, 0.326)
pt3dadd(66.544, 149.459, 13.297, 0.338)
pt3dadd(66.657, 149.418, 13.297, 0.348)
pt3dadd(66.77, 149.378, 13.296, 0.358)
pt3dadd(66.883, 149.339, 13.296, 0.368)
pt3dadd(66.997, 149.3, 13.296, 0.368)
pt3dadd(67.11, 149.261, 13.296, 0.366)
pt3dadd(67.224, 149.222, 13.295, 0.364)
pt3dadd(67.338, 149.184, 13.295, 0.362)
pt3dadd(67.451, 149.146, 13.295, 0.36)
pt3dadd(67.565, 149.107, 13.294, 0.36)
pt3dadd(67.678, 149.069, 13.294, 0.358)
pt3dadd(67.792, 149.029, 13.293, 0.356)
pt3dadd(67.906, 148.991, 13.293, 0.354)
pt3dadd(68.019, 148.952, 13.293, 0.354)
pt3dadd(68.136, 148.924, 13.292, 0.352)
pt3dadd(68.253, 148.896, 13.291, 0.352)
pt3dadd(68.369, 148.867, 13.291, 0.35)
pt3dadd(68.486, 148.838, 13.29, 0.35)
pt3dadd(68.602, 148.81, 13.289, 0.35)
pt3dadd(68.719, 148.781, 13.289, 0.348)
pt3dadd(68.835, 148.752, 13.288, 0.348)
pt3dadd(68.952, 148.724, 13.287, 0.348)
pt3dadd(69.068, 148.696, 13.287, 0.346)
pt3dadd(69.185, 148.667, 13.286, 0.348)
pt3dadd(69.303, 148.646, 13.285, 0.38)
pt3dadd(69.421, 148.626, 13.283, 0.414)
pt3dadd(69.54, 148.606, 13.282, 0.446)
pt3dadd(69.658, 148.584, 13.281, 0.48)
pt3dadd(69.776, 148.564, 13.28, 0.514)
pt3dadd(69.894, 148.543, 13.278, 0.546)
pt3dadd(70.012, 148.523, 13.277, 0.58)
pt3dadd(70.131, 148.502, 13.276, 0.612)
pt3dadd(70.249, 148.481, 13.275, 0.646)
pt3dadd(70.367, 148.462, 13.273, 0.678)
pt3dadd(70.486, 148.447, 13.271, 0.678)
pt3dadd(70.605, 148.434, 13.269, 0.678)
pt3dadd(70.725, 148.42, 13.267, 0.678)
pt3dadd(70.844, 148.406, 13.265, 0.678)
pt3dadd(70.963, 148.392, 13.262, 0.678)
pt3dadd(71.082, 148.379, 13.26, 0.678)
pt3dadd(71.201, 148.364, 13.258, 0.678)
pt3dadd(71.32, 148.351, 13.256, 0.678)
pt3dadd(71.44, 148.337, 13.253, 0.678)
pt3dadd(71.558, 148.321, 13.251, 0.676)
pt3dadd(71.67, 148.278, 13.246, 0.642)
pt3dadd(71.782, 148.235, 13.241, 0.608)
pt3dadd(71.893, 148.19, 13.236, 0.574)
pt3dadd(72.005, 148.147, 13.23, 0.54)
pt3dadd(72.117, 148.104, 13.225, 0.504)
pt3dadd(72.228, 148.06, 13.22, 0.47)
pt3dadd(72.34, 148.016, 13.215, 0.436)
pt3dadd(72.451, 147.973, 13.21, 0.402)
pt3dadd(72.563, 147.929, 13.205, 0.368)
pt3dadd(72.675, 147.886, 13.2, 0.334)
pt3dadd(72.789, 147.852, 13.192, 0.338)
pt3dadd(72.904, 147.817, 13.184, 0.34)
pt3dadd(73.019, 147.784, 13.176, 0.342)
pt3dadd(73.133, 147.749, 13.169, 0.344)
pt3dadd(73.248, 147.715, 13.161, 0.348)
pt3dadd(73.363, 147.68, 13.153, 0.35)
pt3dadd(73.477, 147.646, 13.146, 0.352)
pt3dadd(73.592, 147.612, 13.138, 0.356)
pt3dadd(73.706, 147.577, 13.13, 0.358)
pt3dadd(73.821, 147.545, 13.121, 0.36)
pt3dadd(73.936, 147.523, 13.099, 0.358)
pt3dadd(74.052, 147.502, 13.078, 0.358)
pt3dadd(74.167, 147.481, 13.056, 0.358)
pt3dadd(74.282, 147.46, 13.034, 0.356)
pt3dadd(74.397, 147.438, 13.013, 0.356)
pt3dadd(74.512, 147.416, 12.991, 0.354)
pt3dadd(74.628, 147.396, 12.969, 0.354)
pt3dadd(74.743, 147.374, 12.948, 0.354)
pt3dadd(74.858, 147.353, 12.926, 0.352)
pt3dadd(74.973, 147.335, 12.903, 0.352)
pt3dadd(75.088, 147.326, 12.876, 0.354)
pt3dadd(75.204, 147.317, 12.85, 0.358)
pt3dadd(75.319, 147.308, 12.823, 0.36)
pt3dadd(75.434, 147.3, 12.796, 0.362)
pt3dadd(75.549, 147.292, 12.769, 0.366)
pt3dadd(75.665, 147.283, 12.742, 0.368)
pt3dadd(75.78, 147.275, 12.715, 0.37)
pt3dadd(75.895, 147.266, 12.688, 0.374)
pt3dadd(76.011, 147.257, 12.661, 0.376)
pt3dadd(76.127, 147.251, 12.642, 0.38)
pt3dadd(76.247, 147.251, 12.645, 0.394)
pt3dadd(76.367, 147.252, 12.648, 0.406)
pt3dadd(76.487, 147.252, 12.651, 0.42)
pt3dadd(76.607, 147.252, 12.654, 0.432)
pt3dadd(76.727, 147.253, 12.657, 0.446)
pt3dadd(76.847, 147.253, 12.66, 0.458)
pt3dadd(76.967, 147.253, 12.663, 0.472)
pt3dadd(77.087, 147.254, 12.666, 0.484)
pt3dadd(77.206, 147.254, 12.669, 0.498)
pt3dadd(77.321, 147.256, 12.693, 0.486)
pt3dadd(77.433, 147.256, 12.73, 0.458)
pt3dadd(77.544, 147.257, 12.766, 0.43)
pt3dadd(77.656, 147.258, 12.803, 0.402)
pt3dadd(77.767, 147.259, 12.84, 0.374)
}
}
proc shape3d_71() {
apic[21] { pt3dadd(77.879, 147.26, 12.877, 0.346)
pt3dadd(77.991, 147.262, 12.914, 0.32)
pt3dadd(78.102, 147.263, 12.951, 0.292)
pt3dadd(78.214, 147.264, 12.988, 0.264)
pt3dadd(78.325, 147.265, 13.025, 0.236)
pt3dadd(78.441, 147.266, 13.051, 0.226)
pt3dadd(78.558, 147.269, 13.07, 0.226)
pt3dadd(78.676, 147.27, 13.09, 0.226)
pt3dadd(78.794, 147.272, 13.109, 0.226)
pt3dadd(78.911, 147.274, 13.129, 0.226)
pt3dadd(79.029, 147.276, 13.148, 0.226)
pt3dadd(79.146, 147.278, 13.168, 0.226)
pt3dadd(79.264, 147.28, 13.188, 0.226)
pt3dadd(79.382, 147.282, 13.207, 0.226)
pt3dadd(79.5, 147.283, 13.227, 0.226)
pt3dadd(79.619, 147.287, 13.236, 0.234)
pt3dadd(79.738, 147.292, 13.241, 0.244)
pt3dadd(79.858, 147.295, 13.245, 0.254)
pt3dadd(79.978, 147.3, 13.25, 0.264)
pt3dadd(80.098, 147.304, 13.254, 0.276)
pt3dadd(80.218, 147.308, 13.259, 0.286)
pt3dadd(80.337, 147.312, 13.264, 0.296)
pt3dadd(80.457, 147.317, 13.268, 0.306)
pt3dadd(80.577, 147.32, 13.273, 0.316)
pt3dadd(80.697, 147.325, 13.277, 0.328)
pt3dadd(80.817, 147.331, 13.277, 0.338)
pt3dadd(80.936, 147.337, 13.276, 0.352)
pt3dadd(81.056, 147.344, 13.274, 0.364)
pt3dadd(81.176, 147.35, 13.272, 0.376)
pt3dadd(81.296, 147.356, 13.27, 0.388)
pt3dadd(81.416, 147.364, 13.268, 0.4)
pt3dadd(81.535, 147.37, 13.266, 0.412)
pt3dadd(81.655, 147.377, 13.264, 0.424)
pt3dadd(81.775, 147.383, 13.262, 0.436)
pt3dadd(81.895, 147.389, 13.26, 0.448)
pt3dadd(82.014, 147.4, 13.257, 0.45)
pt3dadd(82.133, 147.413, 13.253, 0.446)
pt3dadd(82.253, 147.426, 13.249, 0.442)
pt3dadd(82.372, 147.439, 13.246, 0.438)
pt3dadd(82.491, 147.451, 13.242, 0.436)
pt3dadd(82.61, 147.464, 13.239, 0.432)
pt3dadd(82.73, 147.478, 13.235, 0.428)
pt3dadd(82.849, 147.491, 13.232, 0.424)
pt3dadd(82.968, 147.503, 13.228, 0.422)
pt3dadd(83.087, 147.516, 13.224, 0.418)
pt3dadd(83.203, 147.546, 13.218, 0.402)
pt3dadd(83.317, 147.582, 13.212, 0.384)
pt3dadd(83.431, 147.618, 13.205, 0.366)
pt3dadd(83.545, 147.654, 13.198, 0.348)
pt3dadd(83.659, 147.69, 13.191, 0.33)
pt3dadd(83.774, 147.726, 13.185, 0.31)
pt3dadd(83.888, 147.762, 13.178, 0.292)
pt3dadd(84.002, 147.798, 13.171, 0.274)
pt3dadd(84.116, 147.834, 13.165, 0.256)
pt3dadd(84.23, 147.87, 13.158, 0.238)
pt3dadd(84.348, 147.874, 13.148, 0.246)
pt3dadd(84.467, 147.865, 13.136, 0.264)
pt3dadd(84.586, 147.858, 13.124, 0.282)
pt3dadd(84.705, 147.85, 13.113, 0.3)
pt3dadd(84.824, 147.842, 13.101, 0.318)
pt3dadd(84.943, 147.834, 13.09, 0.336)
pt3dadd(85.062, 147.826, 13.079, 0.354)
pt3dadd(85.181, 147.818, 13.067, 0.372)
pt3dadd(85.3, 147.81, 13.055, 0.39)
pt3dadd(85.419, 147.803, 13.044, 0.408)
pt3dadd(85.533, 147.798, 13.016, 0.414)
pt3dadd(85.647, 147.796, 12.984, 0.418)
pt3dadd(85.761, 147.793, 12.952, 0.422)
pt3dadd(85.874, 147.79, 12.92, 0.426)
pt3dadd(85.988, 147.787, 12.888, 0.43)
pt3dadd(86.101, 147.785, 12.855, 0.436)
pt3dadd(86.215, 147.781, 12.823, 0.44)
pt3dadd(86.328, 147.779, 12.791, 0.444)
pt3dadd(86.442, 147.776, 12.759, 0.448)
pt3dadd(86.555, 147.773, 12.726, 0.452)
pt3dadd(86.668, 147.788, 12.695, 0.452)
pt3dadd(86.781, 147.808, 12.664, 0.452)
pt3dadd(86.893, 147.827, 12.633, 0.452)
pt3dadd(87.005, 147.846, 12.602, 0.452)
pt3dadd(87.118, 147.865, 12.57, 0.452)
pt3dadd(87.23, 147.883, 12.539, 0.452)
pt3dadd(87.343, 147.902, 12.508, 0.452)
pt3dadd(87.455, 147.922, 12.477, 0.452)
pt3dadd(87.567, 147.941, 12.446, 0.452)
pt3dadd(87.68, 147.96, 12.415, 0.452)
pt3dadd(87.792, 147.995, 12.395, 0.446)
pt3dadd(87.905, 148.03, 12.376, 0.44)
pt3dadd(88.017, 148.066, 12.356, 0.434)
pt3dadd(88.129, 148.1, 12.337, 0.428)
pt3dadd(88.241, 148.136, 12.318, 0.422)
pt3dadd(88.354, 148.171, 12.299, 0.416)
pt3dadd(88.466, 148.207, 12.279, 0.41)
pt3dadd(88.578, 148.242, 12.26, 0.404)
pt3dadd(88.691, 148.278, 12.241, 0.398)
pt3dadd(88.803, 148.313, 12.221, 0.392)
pt3dadd(88.917, 148.348, 12.212, 0.374)
pt3dadd(89.032, 148.381, 12.202, 0.358)
pt3dadd(89.146, 148.416, 12.193, 0.342)
pt3dadd(89.261, 148.45, 12.183, 0.324)
pt3dadd(89.375, 148.484, 12.174, 0.308)
pt3dadd(89.49, 148.519, 12.164, 0.292)
pt3dadd(89.604, 148.553, 12.155, 0.276)
pt3dadd(89.718, 148.588, 12.145, 0.258)
pt3dadd(89.833, 148.621, 12.136, 0.242)
pt3dadd(89.947, 148.656, 12.126, 0.226)
}
apic[22] {pt3dclear()
pt3dadd(7.992, 134.713, 18.72, 1.582)
pt3dadd(7.993, 134.714, 18.72, 1.582)
pt3dadd(8.085, 134.785, 18.745, 1.544)
pt3dadd(8.177, 134.856, 18.771, 1.506)
pt3dadd(8.269, 134.927, 18.796, 1.468)
pt3dadd(8.361, 134.998, 18.822, 1.43)
pt3dadd(8.453, 135.068, 18.847, 1.392)
pt3dadd(8.545, 135.139, 18.872, 1.354)
pt3dadd(8.637, 135.21, 18.898, 1.316)
pt3dadd(8.729, 135.281, 18.923, 1.276)
pt3dadd(8.82, 135.35, 18.951, 1.24)
pt3dadd(8.911, 135.421, 18.979, 1.204)
pt3dadd(9.002, 135.492, 19.007, 1.168)
pt3dadd(9.093, 135.563, 19.035, 1.13)
pt3dadd(9.184, 135.632, 19.063, 1.094)
pt3dadd(9.275, 135.703, 19.092, 1.058)
pt3dadd(9.366, 135.774, 19.12, 1.022)
pt3dadd(9.457, 135.844, 19.148, 0.984)
pt3dadd(9.549, 135.914, 19.176, 0.948)
pt3dadd(9.64, 135.985, 19.204, 0.912)
pt3dadd(9.667, 136.016, 19.298, 0.934)
pt3dadd(9.694, 136.048, 19.392, 0.956)
pt3dadd(9.722, 136.078, 19.486, 0.978)
pt3dadd(9.749, 136.109, 19.58, 0.998)
pt3dadd(9.776, 136.14, 19.674, 1.02)
pt3dadd(9.804, 136.171, 19.767, 1.042)
pt3dadd(9.831, 136.202, 19.861, 1.064)
pt3dadd(9.858, 136.232, 19.955, 1.086)
pt3dadd(9.886, 136.264, 20.049, 1.108)
pt3dadd(9.913, 136.295, 20.143, 1.13)
}
apic[23] {pt3dclear()
pt3dadd(9.913, 136.295, 20.143, 1.13)
pt3dadd(9.972, 136.342, 20.208, 1.124)
pt3dadd(10.037, 136.392, 20.281, 1.118)
pt3dadd(10.101, 136.444, 20.353, 1.112)
pt3dadd(10.166, 136.495, 20.426, 1.106)
pt3dadd(10.231, 136.547, 20.498, 1.1)
pt3dadd(10.296, 136.598, 20.571, 1.092)
pt3dadd(10.361, 136.649, 20.643, 1.086)
pt3dadd(10.426, 136.7, 20.716, 1.08)
pt3dadd(10.444, 136.784, 20.786, 1.018)
pt3dadd(10.462, 136.868, 20.856, 0.954)
pt3dadd(10.481, 136.951, 20.926, 0.892)
pt3dadd(10.499, 137.035, 20.996, 0.828)
pt3dadd(10.517, 137.119, 21.066, 0.766)
pt3dadd(10.536, 137.203, 21.135, 0.704)
pt3dadd(10.554, 137.287, 21.205, 0.64)
pt3dadd(10.572, 137.37, 21.275, 0.578)
pt3dadd(10.591, 137.454, 21.345, 0.514)
pt3dadd(10.609, 137.538, 21.415, 0.452)
}
apic[24] {pt3dclear()
pt3dadd(10.609, 137.538, 21.415, 0.452)
pt3dadd(10.606, 137.566, 21.433, 0.462)
pt3dadd(10.596, 137.66, 21.493, 0.496)
pt3dadd(10.586, 137.756, 21.554, 0.53)
pt3dadd(10.576, 137.851, 21.614, 0.566)
pt3dadd(10.566, 137.946, 21.675, 0.6)
pt3dadd(10.553, 138.042, 21.734, 0.632)
pt3dadd(10.535, 138.139, 21.791, 0.66)
pt3dadd(10.517, 138.235, 21.848, 0.69)
pt3dadd(10.498, 138.332, 21.905, 0.718)
pt3dadd(10.48, 138.43, 21.962, 0.746)
pt3dadd(10.462, 138.527, 22.018, 0.776)
pt3dadd(10.444, 138.624, 22.075, 0.804)
pt3dadd(10.426, 138.721, 22.132, 0.834)
pt3dadd(10.408, 138.817, 22.189, 0.862)
pt3dadd(10.39, 138.914, 22.246, 0.89)
pt3dadd(10.352, 139.013, 22.292, 0.904)
pt3dadd(10.298, 139.11, 22.327, 0.904)
pt3dadd(10.243, 139.208, 22.362, 0.904)
pt3dadd(10.189, 139.307, 22.398, 0.904)
pt3dadd(10.134, 139.405, 22.433, 0.904)
pt3dadd(10.08, 139.502, 22.469, 0.904)
pt3dadd(10.025, 139.601, 22.504, 0.904)
pt3dadd(9.971, 139.699, 22.54, 0.904)
pt3dadd(9.916, 139.796, 22.575, 0.904)
pt3dadd(9.862, 139.895, 22.611, 0.904)
pt3dadd(9.801, 139.992, 22.639, 0.904)
pt3dadd(9.734, 140.088, 22.663, 0.904)
pt3dadd(9.668, 140.184, 22.686, 0.904)
pt3dadd(9.602, 140.28, 22.709, 0.904)
pt3dadd(9.535, 140.376, 22.732, 0.904)
pt3dadd(9.469, 140.472, 22.755, 0.904)
pt3dadd(9.402, 140.568, 22.778, 0.904)
pt3dadd(9.336, 140.664, 22.801, 0.904)
pt3dadd(9.27, 140.76, 22.824, 0.904)
pt3dadd(9.203, 140.856, 22.847, 0.904)
pt3dadd(9.137, 140.953, 22.871, 0.904)
pt3dadd(9.072, 141.049, 22.894, 0.904)
pt3dadd(9.006, 141.145, 22.917, 0.904)
pt3dadd(8.94, 141.242, 22.94, 0.904)
pt3dadd(8.875, 141.338, 22.963, 0.904)
pt3dadd(8.809, 141.436, 22.986, 0.904)
pt3dadd(8.743, 141.532, 23.01, 0.904)
pt3dadd(8.678, 141.629, 23.033, 0.904)
pt3dadd(8.612, 141.725, 23.056, 0.904)
pt3dadd(8.547, 141.821, 23.079, 0.904)
}
}
proc shape3d_72() {
apic[24] { pt3dadd(8.49, 141.92, 23.11, 0.904)
pt3dadd(8.438, 142.02, 23.145, 0.904)
pt3dadd(8.386, 142.12, 23.181, 0.904)
pt3dadd(8.334, 142.219, 23.216, 0.904)
pt3dadd(8.283, 142.319, 23.251, 0.904)
pt3dadd(8.231, 142.418, 23.286, 0.904)
pt3dadd(8.179, 142.518, 23.321, 0.904)
pt3dadd(8.128, 142.618, 23.357, 0.904)
pt3dadd(8.076, 142.717, 23.392, 0.904)
pt3dadd(8.024, 142.817, 23.427, 0.904)
pt3dadd(7.967, 142.916, 23.456, 0.904)
pt3dadd(7.907, 143.016, 23.482, 0.904)
pt3dadd(7.847, 143.116, 23.507, 0.904)
pt3dadd(7.787, 143.214, 23.532, 0.904)
pt3dadd(7.727, 143.314, 23.558, 0.904)
pt3dadd(7.666, 143.413, 23.583, 0.904)
pt3dadd(7.606, 143.512, 23.609, 0.904)
pt3dadd(7.546, 143.611, 23.635, 0.904)
pt3dadd(7.486, 143.711, 23.66, 0.904)
pt3dadd(7.426, 143.809, 23.685, 0.904)
pt3dadd(7.369, 143.911, 23.708, 0.892)
pt3dadd(7.315, 144.016, 23.73, 0.874)
pt3dadd(7.261, 144.119, 23.752, 0.856)
pt3dadd(7.206, 144.223, 23.773, 0.838)
pt3dadd(7.152, 144.328, 23.795, 0.82)
pt3dadd(7.098, 144.431, 23.817, 0.8)
pt3dadd(7.044, 144.535, 23.838, 0.782)
pt3dadd(6.989, 144.638, 23.86, 0.764)
pt3dadd(6.935, 144.743, 23.882, 0.746)
pt3dadd(6.881, 144.846, 23.903, 0.728)
pt3dadd(6.828, 144.952, 23.922, 0.704)
pt3dadd(6.775, 145.057, 23.94, 0.676)
pt3dadd(6.722, 145.163, 23.958, 0.65)
pt3dadd(6.67, 145.268, 23.975, 0.622)
pt3dadd(6.617, 145.374, 23.993, 0.596)
pt3dadd(6.564, 145.48, 24.011, 0.568)
pt3dadd(6.512, 145.585, 24.028, 0.542)
pt3dadd(6.459, 145.691, 24.046, 0.514)
pt3dadd(6.406, 145.796, 24.064, 0.486)
pt3dadd(6.354, 145.903, 24.082, 0.46)
pt3dadd(6.291, 146.003, 24.097, 0.452)
pt3dadd(6.223, 146.101, 24.111, 0.452)
pt3dadd(6.156, 146.198, 24.125, 0.452)
pt3dadd(6.089, 146.297, 24.139, 0.454)
pt3dadd(6.022, 146.395, 24.153, 0.454)
pt3dadd(5.954, 146.492, 24.167, 0.454)
pt3dadd(5.887, 146.591, 24.181, 0.454)
pt3dadd(5.82, 146.689, 24.195, 0.454)
pt3dadd(5.753, 146.786, 24.209, 0.454)
pt3dadd(5.685, 146.885, 24.223, 0.456)
pt3dadd(5.626, 146.971, 24.266, 0.488)
pt3dadd(5.569, 147.054, 24.321, 0.532)
pt3dadd(5.512, 147.137, 24.376, 0.576)
pt3dadd(5.456, 147.22, 24.431, 0.62)
pt3dadd(5.399, 147.302, 24.486, 0.664)
pt3dadd(5.342, 147.385, 24.54, 0.708)
pt3dadd(5.285, 147.468, 24.595, 0.752)
pt3dadd(5.229, 147.551, 24.65, 0.796)
pt3dadd(5.172, 147.634, 24.705, 0.84)
pt3dadd(5.115, 147.716, 24.76, 0.886)
pt3dadd(5.048, 147.802, 24.801, 0.872)
pt3dadd(4.977, 147.888, 24.838, 0.836)
pt3dadd(4.906, 147.974, 24.874, 0.802)
pt3dadd(4.835, 148.061, 24.911, 0.766)
pt3dadd(4.764, 148.147, 24.947, 0.73)
pt3dadd(4.693, 148.232, 24.983, 0.694)
pt3dadd(4.622, 148.319, 25.02, 0.658)
pt3dadd(4.551, 148.405, 25.056, 0.622)
pt3dadd(4.479, 148.492, 25.093, 0.586)
pt3dadd(4.408, 148.578, 25.129, 0.552)
pt3dadd(4.349, 148.668, 25.171, 0.526)
pt3dadd(4.295, 148.76, 25.216, 0.504)
pt3dadd(4.241, 148.854, 25.262, 0.482)
pt3dadd(4.187, 148.946, 25.306, 0.46)
pt3dadd(4.132, 149.039, 25.351, 0.438)
pt3dadd(4.078, 149.131, 25.396, 0.416)
pt3dadd(4.024, 149.224, 25.441, 0.394)
pt3dadd(3.97, 149.316, 25.486, 0.372)
pt3dadd(3.915, 149.408, 25.531, 0.35)
pt3dadd(3.861, 149.501, 25.576, 0.33)
pt3dadd(3.806, 149.596, 25.617, 0.316)
pt3dadd(3.75, 149.69, 25.655, 0.306)
pt3dadd(3.693, 149.786, 25.694, 0.296)
pt3dadd(3.637, 149.881, 25.732, 0.286)
pt3dadd(3.581, 149.977, 25.771, 0.276)
pt3dadd(3.525, 150.072, 25.809, 0.266)
pt3dadd(3.469, 150.168, 25.848, 0.256)
pt3dadd(3.413, 150.263, 25.887, 0.248)
pt3dadd(3.357, 150.359, 25.925, 0.238)
pt3dadd(3.301, 150.454, 25.964, 0.228)
pt3dadd(3.237, 150.55, 25.991, 0.226)
pt3dadd(3.171, 150.646, 26.017, 0.226)
pt3dadd(3.106, 150.742, 26.042, 0.226)
pt3dadd(3.041, 150.838, 26.068, 0.226)
pt3dadd(2.975, 150.934, 26.093, 0.226)
pt3dadd(2.91, 151.03, 26.119, 0.226)
pt3dadd(2.845, 151.126, 26.144, 0.226)
pt3dadd(2.779, 151.22, 26.17, 0.226)
pt3dadd(2.714, 151.316, 26.195, 0.226)
pt3dadd(2.648, 151.412, 26.221, 0.226)
pt3dadd(2.577, 151.506, 26.24, 0.262)
pt3dadd(2.506, 151.6, 26.259, 0.306)
pt3dadd(2.434, 151.693, 26.277, 0.348)
pt3dadd(2.362, 151.787, 26.295, 0.392)
pt3dadd(2.29, 151.88, 26.314, 0.434)
pt3dadd(2.218, 151.974, 26.332, 0.478)
pt3dadd(2.146, 152.068, 26.35, 0.52)
pt3dadd(2.074, 152.161, 26.369, 0.564)
pt3dadd(2.002, 152.255, 26.387, 0.608)
pt3dadd(1.93, 152.348, 26.405, 0.65)
pt3dadd(1.863, 152.443, 26.429, 0.672)
pt3dadd(1.797, 152.539, 26.454, 0.69)
pt3dadd(1.731, 152.635, 26.479, 0.708)
pt3dadd(1.665, 152.73, 26.504, 0.724)
pt3dadd(1.599, 152.826, 26.529, 0.742)
pt3dadd(1.533, 152.922, 26.554, 0.76)
pt3dadd(1.467, 153.017, 26.579, 0.778)
pt3dadd(1.401, 153.113, 26.604, 0.796)
pt3dadd(1.335, 153.209, 26.629, 0.814)
pt3dadd(1.269, 153.304, 26.654, 0.832)
pt3dadd(1.21, 153.401, 26.686, 0.82)
pt3dadd(1.152, 153.498, 26.719, 0.804)
pt3dadd(1.094, 153.595, 26.752, 0.788)
pt3dadd(1.035, 153.692, 26.785, 0.772)
pt3dadd(0.977, 153.79, 26.818, 0.758)
pt3dadd(0.919, 153.887, 26.851, 0.742)
pt3dadd(0.861, 153.984, 26.884, 0.726)
pt3dadd(0.803, 154.081, 26.917, 0.71)
pt3dadd(0.744, 154.178, 26.951, 0.696)
pt3dadd(0.686, 154.276, 26.984, 0.68)
pt3dadd(0.617, 154.369, 27.006, 0.678)
pt3dadd(0.547, 154.464, 27.026, 0.678)
pt3dadd(0.476, 154.558, 27.047, 0.678)
pt3dadd(0.406, 154.651, 27.068, 0.678)
pt3dadd(0.335, 154.745, 27.089, 0.678)
pt3dadd(0.265, 154.84, 27.109, 0.678)
pt3dadd(0.194, 154.933, 27.13, 0.678)
pt3dadd(0.124, 155.027, 27.151, 0.678)
pt3dadd(0.053, 155.12, 27.172, 0.678)
pt3dadd(-0.017, 155.214, 27.192, 0.678)
pt3dadd(-0.092, 155.306, 27.208, 0.67)
pt3dadd(-0.167, 155.398, 27.224, 0.664)
pt3dadd(-0.242, 155.49, 27.239, 0.656)
pt3dadd(-0.318, 155.581, 27.255, 0.648)
pt3dadd(-0.393, 155.674, 27.27, 0.64)
pt3dadd(-0.468, 155.765, 27.285, 0.632)
pt3dadd(-0.543, 155.856, 27.301, 0.624)
pt3dadd(-0.618, 155.948, 27.316, 0.616)
pt3dadd(-0.693, 156.04, 27.332, 0.608)
pt3dadd(-0.769, 156.132, 27.347, 0.6)
pt3dadd(-0.848, 156.221, 27.358, 0.586)
pt3dadd(-0.927, 156.31, 27.369, 0.57)
pt3dadd(-1.006, 156.4, 27.38, 0.556)
pt3dadd(-1.085, 156.488, 27.39, 0.542)
pt3dadd(-1.164, 156.578, 27.401, 0.526)
pt3dadd(-1.243, 156.667, 27.412, 0.512)
pt3dadd(-1.323, 156.756, 27.423, 0.498)
pt3dadd(-1.402, 156.846, 27.433, 0.482)
pt3dadd(-1.481, 156.935, 27.444, 0.468)
pt3dadd(-1.56, 157.024, 27.455, 0.454)
pt3dadd(-1.645, 157.109, 27.461, 0.466)
pt3dadd(-1.729, 157.194, 27.466, 0.48)
pt3dadd(-1.814, 157.278, 27.471, 0.496)
pt3dadd(-1.899, 157.363, 27.477, 0.51)
pt3dadd(-1.984, 157.447, 27.482, 0.524)
pt3dadd(-2.069, 157.532, 27.487, 0.54)
pt3dadd(-2.154, 157.616, 27.493, 0.554)
pt3dadd(-2.238, 157.702, 27.498, 0.568)
pt3dadd(-2.323, 157.786, 27.503, 0.582)
pt3dadd(-2.408, 157.871, 27.509, 0.598)
pt3dadd(-2.493, 157.955, 27.516, 0.612)
pt3dadd(-2.578, 158.04, 27.523, 0.628)
pt3dadd(-2.663, 158.124, 27.53, 0.642)
pt3dadd(-2.747, 158.208, 27.538, 0.658)
pt3dadd(-2.832, 158.293, 27.545, 0.672)
pt3dadd(-2.917, 158.377, 27.552, 0.688)
pt3dadd(-3.002, 158.461, 27.559, 0.702)
pt3dadd(-3.087, 158.546, 27.566, 0.718)
pt3dadd(-3.171, 158.63, 27.574, 0.732)
pt3dadd(-3.256, 158.716, 27.581, 0.748)
pt3dadd(-3.341, 158.8, 27.59, 0.762)
pt3dadd(-3.426, 158.884, 27.599, 0.778)
pt3dadd(-3.511, 158.968, 27.609, 0.794)
pt3dadd(-3.596, 159.052, 27.618, 0.81)
pt3dadd(-3.681, 159.136, 27.628, 0.824)
pt3dadd(-3.765, 159.22, 27.637, 0.84)
pt3dadd(-3.85, 159.304, 27.646, 0.856)
pt3dadd(-3.935, 159.388, 27.656, 0.87)
pt3dadd(-4.02, 159.473, 27.665, 0.886)
pt3dadd(-4.105, 159.557, 27.674, 0.902)
pt3dadd(-4.183, 159.632, 27.715, 0.922)
pt3dadd(-4.26, 159.708, 27.758, 0.942)
pt3dadd(-4.338, 159.784, 27.801, 0.964)
pt3dadd(-4.415, 159.859, 27.844, 0.984)
pt3dadd(-4.493, 159.935, 27.887, 1.004)
pt3dadd(-4.57, 160.012, 27.93, 1.026)
pt3dadd(-4.648, 160.087, 27.973, 1.046)
pt3dadd(-4.725, 160.163, 28.017, 1.066)
pt3dadd(-4.803, 160.238, 28.06, 1.088)
pt3dadd(-4.88, 160.314, 28.103, 1.108)
}
}
proc shape3d_73() {
apic[24] { pt3dadd(-4.963, 160.394, 28.129, 1.066)
pt3dadd(-5.047, 160.475, 28.155, 1.02)
pt3dadd(-5.13, 160.555, 28.18, 0.972)
pt3dadd(-5.214, 160.636, 28.205, 0.926)
pt3dadd(-5.297, 160.716, 28.231, 0.88)
pt3dadd(-5.381, 160.796, 28.256, 0.832)
pt3dadd(-5.465, 160.877, 28.281, 0.786)
pt3dadd(-5.548, 160.958, 28.307, 0.738)
pt3dadd(-5.632, 161.039, 28.332, 0.692)
pt3dadd(-5.715, 161.119, 28.358, 0.646)
pt3dadd(-5.802, 161.2, 28.373, 0.624)
pt3dadd(-5.888, 161.281, 28.387, 0.606)
pt3dadd(-5.975, 161.363, 28.402, 0.586)
pt3dadd(-6.062, 161.443, 28.417, 0.568)
pt3dadd(-6.148, 161.525, 28.431, 0.548)
pt3dadd(-6.235, 161.605, 28.446, 0.53)
pt3dadd(-6.322, 161.687, 28.461, 0.51)
pt3dadd(-6.408, 161.768, 28.475, 0.49)
pt3dadd(-6.495, 161.849, 28.49, 0.472)
pt3dadd(-6.582, 161.93, 28.504, 0.452)
pt3dadd(-6.67, 162.011, 28.512, 0.458)
pt3dadd(-6.758, 162.091, 28.52, 0.466)
pt3dadd(-6.847, 162.172, 28.528, 0.472)
pt3dadd(-6.935, 162.253, 28.536, 0.48)
pt3dadd(-7.024, 162.334, 28.543, 0.486)
pt3dadd(-7.112, 162.414, 28.551, 0.492)
pt3dadd(-7.2, 162.494, 28.559, 0.5)
pt3dadd(-7.289, 162.575, 28.567, 0.506)
pt3dadd(-7.377, 162.655, 28.575, 0.514)
pt3dadd(-7.466, 162.737, 28.582, 0.52)
pt3dadd(-7.556, 162.816, 28.584, 0.548)
pt3dadd(-7.645, 162.895, 28.585, 0.578)
pt3dadd(-7.735, 162.974, 28.586, 0.608)
pt3dadd(-7.825, 163.054, 28.587, 0.638)
pt3dadd(-7.915, 163.134, 28.588, 0.666)
pt3dadd(-8.005, 163.213, 28.589, 0.696)
pt3dadd(-8.095, 163.292, 28.59, 0.726)
pt3dadd(-8.185, 163.372, 28.592, 0.754)
pt3dadd(-8.275, 163.452, 28.593, 0.784)
pt3dadd(-8.365, 163.531, 28.594, 0.814)
pt3dadd(-8.464, 163.598, 28.596, 0.81)
pt3dadd(-8.564, 163.666, 28.598, 0.808)
pt3dadd(-8.663, 163.732, 28.6, 0.806)
pt3dadd(-8.763, 163.799, 28.603, 0.802)
pt3dadd(-8.862, 163.866, 28.605, 0.8)
pt3dadd(-8.962, 163.933, 28.607, 0.796)
pt3dadd(-9.061, 164, 28.609, 0.794)
pt3dadd(-9.161, 164.068, 28.611, 0.79)
pt3dadd(-9.26, 164.134, 28.614, 0.788)
pt3dadd(-9.36, 164.201, 28.616, 0.784)
pt3dadd(-9.461, 164.266, 28.62, 0.774)
pt3dadd(-9.561, 164.33, 28.624, 0.764)
pt3dadd(-9.662, 164.396, 28.628, 0.752)
pt3dadd(-9.763, 164.461, 28.632, 0.742)
pt3dadd(-9.864, 164.526, 28.637, 0.732)
pt3dadd(-9.964, 164.591, 28.641, 0.72)
pt3dadd(-10.065, 164.656, 28.645, 0.71)
pt3dadd(-10.166, 164.72, 28.649, 0.7)
pt3dadd(-10.267, 164.786, 28.653, 0.688)
pt3dadd(-10.367, 164.851, 28.657, 0.678)
pt3dadd(-10.463, 164.923, 28.664, 0.678)
pt3dadd(-10.559, 164.994, 28.67, 0.676)
pt3dadd(-10.655, 165.066, 28.677, 0.676)
pt3dadd(-10.751, 165.138, 28.684, 0.676)
pt3dadd(-10.847, 165.209, 28.69, 0.676)
pt3dadd(-10.943, 165.281, 28.697, 0.674)
pt3dadd(-11.039, 165.353, 28.703, 0.674)
pt3dadd(-11.135, 165.425, 28.71, 0.674)
pt3dadd(-11.231, 165.496, 28.717, 0.672)
pt3dadd(-11.326, 165.568, 28.723, 0.672)
pt3dadd(-11.415, 165.648, 28.734, 0.654)
pt3dadd(-11.504, 165.727, 28.745, 0.638)
pt3dadd(-11.593, 165.808, 28.755, 0.622)
pt3dadd(-11.682, 165.887, 28.766, 0.606)
pt3dadd(-11.77, 165.966, 28.777, 0.588)
pt3dadd(-11.859, 166.046, 28.788, 0.572)
pt3dadd(-11.948, 166.126, 28.798, 0.554)
pt3dadd(-12.037, 166.206, 28.809, 0.538)
pt3dadd(-12.126, 166.285, 28.82, 0.522)
pt3dadd(-12.214, 166.364, 28.831, 0.506)
pt3dadd(-12.292, 166.445, 28.867, 0.516)
pt3dadd(-12.37, 166.525, 28.903, 0.524)
pt3dadd(-12.448, 166.606, 28.939, 0.534)
pt3dadd(-12.526, 166.687, 28.974, 0.544)
pt3dadd(-12.604, 166.768, 29.01, 0.554)
pt3dadd(-12.682, 166.848, 29.046, 0.562)
pt3dadd(-12.76, 166.928, 29.082, 0.572)
pt3dadd(-12.838, 167.009, 29.117, 0.582)
pt3dadd(-12.916, 167.089, 29.153, 0.592)
pt3dadd(-12.993, 167.17, 29.189, 0.596)
pt3dadd(-13.068, 167.255, 29.224, 0.58)
pt3dadd(-13.142, 167.339, 29.259, 0.562)
pt3dadd(-13.217, 167.423, 29.294, 0.546)
pt3dadd(-13.291, 167.507, 29.329, 0.53)
pt3dadd(-13.366, 167.591, 29.363, 0.514)
pt3dadd(-13.44, 167.676, 29.398, 0.496)
pt3dadd(-13.515, 167.76, 29.433, 0.48)
pt3dadd(-13.589, 167.844, 29.468, 0.464)
pt3dadd(-13.664, 167.928, 29.503, 0.448)
pt3dadd(-13.737, 168.014, 29.535, 0.43)
pt3dadd(-13.805, 168.109, 29.559, 0.408)
pt3dadd(-13.874, 168.203, 29.583, 0.388)
pt3dadd(-13.943, 168.296, 29.608, 0.366)
pt3dadd(-14.012, 168.391, 29.632, 0.346)
pt3dadd(-14.081, 168.485, 29.656, 0.324)
pt3dadd(-14.149, 168.578, 29.68, 0.304)
pt3dadd(-14.218, 168.673, 29.704, 0.282)
pt3dadd(-14.287, 168.767, 29.728, 0.262)
pt3dadd(-14.356, 168.86, 29.752, 0.24)
pt3dadd(-14.423, 168.956, 29.774, 0.23)
pt3dadd(-14.489, 169.055, 29.791, 0.24)
pt3dadd(-14.554, 169.153, 29.808, 0.25)
pt3dadd(-14.619, 169.252, 29.825, 0.262)
pt3dadd(-14.684, 169.351, 29.842, 0.272)
pt3dadd(-14.75, 169.45, 29.859, 0.282)
pt3dadd(-14.815, 169.548, 29.876, 0.294)
pt3dadd(-14.88, 169.646, 29.893, 0.304)
pt3dadd(-14.945, 169.745, 29.91, 0.314)
pt3dadd(-15.011, 169.843, 29.927, 0.326)
pt3dadd(-15.08, 169.94, 29.942, 0.344)
pt3dadd(-15.156, 170.032, 29.953, 0.376)
pt3dadd(-15.233, 170.123, 29.965, 0.41)
pt3dadd(-15.309, 170.214, 29.976, 0.444)
pt3dadd(-15.385, 170.306, 29.987, 0.476)
pt3dadd(-15.462, 170.398, 29.999, 0.51)
pt3dadd(-15.538, 170.489, 30.01, 0.542)
pt3dadd(-15.615, 170.581, 30.022, 0.576)
pt3dadd(-15.691, 170.672, 30.033, 0.61)
pt3dadd(-15.767, 170.764, 30.045, 0.642)
pt3dadd(-15.849, 170.846, 30.064, 0.666)
pt3dadd(-15.939, 170.911, 30.102, 0.666)
pt3dadd(-16.03, 170.976, 30.139, 0.668)
pt3dadd(-16.12, 171.041, 30.176, 0.67)
pt3dadd(-16.211, 171.106, 30.214, 0.67)
pt3dadd(-16.301, 171.17, 30.251, 0.672)
pt3dadd(-16.392, 171.235, 30.288, 0.674)
pt3dadd(-16.482, 171.3, 30.325, 0.674)
pt3dadd(-16.573, 171.365, 30.362, 0.676)
pt3dadd(-16.664, 171.43, 30.4, 0.678)
pt3dadd(-16.754, 171.496, 30.434, 0.678)
pt3dadd(-16.844, 171.566, 30.465, 0.678)
pt3dadd(-16.935, 171.636, 30.496, 0.678)
pt3dadd(-17.025, 171.706, 30.527, 0.678)
pt3dadd(-17.115, 171.775, 30.557, 0.678)
pt3dadd(-17.206, 171.846, 30.588, 0.678)
pt3dadd(-17.296, 171.916, 30.619, 0.678)
pt3dadd(-17.386, 171.985, 30.65, 0.678)
pt3dadd(-17.477, 172.055, 30.68, 0.678)
pt3dadd(-17.567, 172.126, 30.711, 0.678)
pt3dadd(-17.657, 172.198, 30.74, 0.68)
pt3dadd(-17.745, 172.272, 30.764, 0.682)
pt3dadd(-17.834, 172.348, 30.789, 0.684)
pt3dadd(-17.922, 172.423, 30.814, 0.688)
pt3dadd(-18.011, 172.499, 30.839, 0.69)
pt3dadd(-18.099, 172.573, 30.864, 0.692)
pt3dadd(-18.188, 172.649, 30.889, 0.696)
pt3dadd(-18.276, 172.724, 30.914, 0.698)
pt3dadd(-18.365, 172.799, 30.939, 0.702)
pt3dadd(-18.453, 172.874, 30.964, 0.704)
pt3dadd(-18.539, 172.954, 30.987, 0.712)
pt3dadd(-18.622, 173.038, 31.006, 0.726)
pt3dadd(-18.704, 173.122, 31.025, 0.742)
pt3dadd(-18.786, 173.206, 31.044, 0.758)
pt3dadd(-18.869, 173.291, 31.064, 0.772)
pt3dadd(-18.951, 173.375, 31.083, 0.788)
pt3dadd(-19.033, 173.459, 31.102, 0.802)
pt3dadd(-19.116, 173.543, 31.121, 0.818)
pt3dadd(-19.198, 173.627, 31.14, 0.834)
pt3dadd(-19.281, 173.711, 31.159, 0.848)
pt3dadd(-19.356, 173.8, 31.183, 0.85)
pt3dadd(-19.42, 173.894, 31.214, 0.834)
pt3dadd(-19.484, 173.988, 31.244, 0.816)
pt3dadd(-19.549, 174.083, 31.275, 0.798)
pt3dadd(-19.613, 174.178, 31.305, 0.782)
pt3dadd(-19.678, 174.271, 31.336, 0.764)
pt3dadd(-19.742, 174.366, 31.366, 0.746)
pt3dadd(-19.806, 174.461, 31.397, 0.73)
pt3dadd(-19.871, 174.554, 31.427, 0.712)
pt3dadd(-19.935, 174.649, 31.458, 0.694)
pt3dadd(-19.997, 174.745, 31.489, 0.674)
pt3dadd(-20.055, 174.842, 31.522, 0.65)
pt3dadd(-20.113, 174.94, 31.555, 0.628)
pt3dadd(-20.171, 175.037, 31.587, 0.604)
pt3dadd(-20.229, 175.134, 31.62, 0.58)
pt3dadd(-20.287, 175.231, 31.653, 0.558)
pt3dadd(-20.346, 175.33, 31.686, 0.534)
pt3dadd(-20.404, 175.427, 31.718, 0.51)
pt3dadd(-20.462, 175.524, 31.751, 0.488)
pt3dadd(-20.52, 175.621, 31.784, 0.464)
pt3dadd(-20.582, 175.717, 31.813, 0.452)
pt3dadd(-20.647, 175.813, 31.839, 0.452)
pt3dadd(-20.712, 175.909, 31.864, 0.452)
pt3dadd(-20.777, 176.005, 31.89, 0.452)
pt3dadd(-20.842, 176.101, 31.916, 0.452)
pt3dadd(-20.908, 176.197, 31.941, 0.452)
pt3dadd(-20.973, 176.293, 31.967, 0.452)
pt3dadd(-21.038, 176.389, 31.993, 0.452)
pt3dadd(-21.103, 176.485, 32.018, 0.452)
pt3dadd(-21.168, 176.581, 32.044, 0.452)
pt3dadd(-21.236, 176.676, 32.067, 0.446)
}
}
proc shape3d_74() {
apic[24] { pt3dadd(-21.307, 176.77, 32.087, 0.434)
pt3dadd(-21.377, 176.864, 32.107, 0.422)
pt3dadd(-21.448, 176.958, 32.127, 0.41)
pt3dadd(-21.518, 177.053, 32.146, 0.398)
pt3dadd(-21.589, 177.146, 32.166, 0.386)
pt3dadd(-21.659, 177.241, 32.186, 0.374)
pt3dadd(-21.73, 177.335, 32.206, 0.362)
pt3dadd(-21.8, 177.43, 32.226, 0.35)
pt3dadd(-21.871, 177.523, 32.246, 0.338)
pt3dadd(-21.94, 177.618, 32.267, 0.328)
pt3dadd(-22.008, 177.713, 32.291, 0.316)
pt3dadd(-22.075, 177.808, 32.314, 0.306)
pt3dadd(-22.143, 177.904, 32.337, 0.294)
pt3dadd(-22.211, 177.998, 32.36, 0.284)
pt3dadd(-22.278, 178.093, 32.383, 0.274)
pt3dadd(-22.346, 178.188, 32.406, 0.262)
pt3dadd(-22.414, 178.284, 32.429, 0.252)
pt3dadd(-22.482, 178.379, 32.452, 0.242)
pt3dadd(-22.549, 178.474, 32.475, 0.23)
pt3dadd(-22.611, 178.57, 32.504, 0.226)
pt3dadd(-22.668, 178.667, 32.539, 0.226)
pt3dadd(-22.725, 178.765, 32.573, 0.226)
pt3dadd(-22.782, 178.862, 32.607, 0.226)
pt3dadd(-22.84, 178.96, 32.641, 0.226)
pt3dadd(-22.897, 179.057, 32.675, 0.226)
pt3dadd(-22.954, 179.154, 32.709, 0.226)
pt3dadd(-23.011, 179.251, 32.743, 0.226)
pt3dadd(-23.068, 179.348, 32.777, 0.226)
pt3dadd(-23.125, 179.446, 32.812, 0.226)
pt3dadd(-23.188, 179.542, 32.84, 0.226)
pt3dadd(-23.255, 179.636, 32.864, 0.226)
pt3dadd(-23.322, 179.732, 32.888, 0.226)
pt3dadd(-23.39, 179.827, 32.912, 0.226)
pt3dadd(-23.457, 179.922, 32.936, 0.226)
pt3dadd(-23.524, 180.017, 32.96, 0.226)
pt3dadd(-23.592, 180.113, 32.984, 0.226)
pt3dadd(-23.659, 180.208, 33.007, 0.226)
pt3dadd(-23.726, 180.302, 33.032, 0.226)
pt3dadd(-23.794, 180.397, 33.055, 0.226)
pt3dadd(-23.864, 180.491, 33.077, 0.226)
pt3dadd(-23.936, 180.584, 33.096, 0.226)
pt3dadd(-24.008, 180.678, 33.115, 0.226)
pt3dadd(-24.081, 180.77, 33.134, 0.226)
pt3dadd(-24.153, 180.864, 33.153, 0.226)
pt3dadd(-24.225, 180.956, 33.173, 0.226)
pt3dadd(-24.297, 181.05, 33.192, 0.226)
pt3dadd(-24.369, 181.142, 33.211, 0.226)
pt3dadd(-24.442, 181.236, 33.23, 0.226)
pt3dadd(-24.514, 181.328, 33.249, 0.226)
pt3dadd(-24.589, 181.421, 33.266, 0.226)
pt3dadd(-24.665, 181.511, 33.281, 0.226)
pt3dadd(-24.742, 181.602, 33.295, 0.226)
pt3dadd(-24.818, 181.692, 33.31, 0.226)
pt3dadd(-24.895, 181.783, 33.325, 0.226)
pt3dadd(-24.971, 181.873, 33.34, 0.226)
pt3dadd(-25.048, 181.964, 33.354, 0.226)
pt3dadd(-25.125, 182.056, 33.369, 0.226)
pt3dadd(-25.201, 182.146, 33.384, 0.226)
pt3dadd(-25.278, 182.237, 33.398, 0.226)
pt3dadd(-25.356, 182.326, 33.41, 0.236)
pt3dadd(-25.436, 182.414, 33.42, 0.25)
pt3dadd(-25.517, 182.503, 33.43, 0.266)
pt3dadd(-25.597, 182.592, 33.44, 0.282)
pt3dadd(-25.677, 182.68, 33.45, 0.298)
pt3dadd(-25.757, 182.768, 33.459, 0.314)
pt3dadd(-25.837, 182.857, 33.469, 0.33)
pt3dadd(-25.917, 182.946, 33.479, 0.344)
pt3dadd(-25.997, 183.035, 33.489, 0.36)
pt3dadd(-26.078, 183.122, 33.498, 0.376)
pt3dadd(-26.153, 183.211, 33.521, 0.402)
pt3dadd(-26.226, 183.299, 33.552, 0.436)
pt3dadd(-26.298, 183.386, 33.584, 0.468)
pt3dadd(-26.371, 183.474, 33.615, 0.502)
pt3dadd(-26.444, 183.562, 33.646, 0.534)
pt3dadd(-26.516, 183.65, 33.678, 0.568)
pt3dadd(-26.589, 183.738, 33.709, 0.602)
pt3dadd(-26.662, 183.826, 33.741, 0.634)
pt3dadd(-26.734, 183.913, 33.772, 0.668)
pt3dadd(-26.807, 184.001, 33.803, 0.702)
pt3dadd(-26.864, 184.097, 33.839, 0.714)
pt3dadd(-26.916, 184.195, 33.876, 0.72)
pt3dadd(-26.969, 184.294, 33.914, 0.728)
pt3dadd(-27.021, 184.392, 33.951, 0.734)
pt3dadd(-27.074, 184.49, 33.988, 0.74)
pt3dadd(-27.127, 184.589, 34.025, 0.748)
pt3dadd(-27.179, 184.687, 34.062, 0.754)
pt3dadd(-27.232, 184.784, 34.099, 0.76)
pt3dadd(-27.284, 184.883, 34.136, 0.768)
pt3dadd(-27.337, 184.981, 34.173, 0.774)
pt3dadd(-27.39, 185.086, 34.194, 0.766)
pt3dadd(-27.443, 185.191, 34.212, 0.756)
pt3dadd(-27.496, 185.297, 34.23, 0.746)
pt3dadd(-27.549, 185.402, 34.248, 0.736)
pt3dadd(-27.601, 185.508, 34.267, 0.728)
pt3dadd(-27.654, 185.614, 34.285, 0.718)
pt3dadd(-27.707, 185.719, 34.304, 0.708)
pt3dadd(-27.76, 185.824, 34.322, 0.698)
pt3dadd(-27.813, 185.929, 34.34, 0.688)
pt3dadd(-27.866, 186.035, 34.358, 0.678)
pt3dadd(-27.928, 186.138, 34.365, 0.672)
pt3dadd(-27.99, 186.24, 34.371, 0.666)
pt3dadd(-28.052, 186.342, 34.377, 0.66)
pt3dadd(-28.114, 186.445, 34.383, 0.654)
pt3dadd(-28.176, 186.547, 34.39, 0.65)
pt3dadd(-28.239, 186.649, 34.396, 0.644)
pt3dadd(-28.301, 186.752, 34.402, 0.638)
pt3dadd(-28.363, 186.854, 34.408, 0.632)
pt3dadd(-28.425, 186.956, 34.414, 0.626)
pt3dadd(-28.487, 187.06, 34.421, 0.62)
pt3dadd(-28.553, 187.159, 34.42, 0.604)
pt3dadd(-28.618, 187.26, 34.419, 0.588)
pt3dadd(-28.683, 187.361, 34.418, 0.572)
pt3dadd(-28.749, 187.462, 34.417, 0.556)
pt3dadd(-28.814, 187.562, 34.416, 0.54)
pt3dadd(-28.88, 187.662, 34.415, 0.522)
pt3dadd(-28.945, 187.763, 34.414, 0.506)
pt3dadd(-29.011, 187.864, 34.412, 0.49)
pt3dadd(-29.076, 187.964, 34.411, 0.474)
pt3dadd(-29.142, 188.064, 34.41, 0.458)
pt3dadd(-29.184, 188.177, 34.408, 0.458)
pt3dadd(-29.226, 188.29, 34.406, 0.456)
pt3dadd(-29.268, 188.401, 34.404, 0.456)
pt3dadd(-29.31, 188.514, 34.402, 0.456)
pt3dadd(-29.352, 188.627, 34.399, 0.456)
pt3dadd(-29.394, 188.738, 34.397, 0.454)
pt3dadd(-29.436, 188.851, 34.395, 0.454)
pt3dadd(-29.478, 188.963, 34.393, 0.454)
pt3dadd(-29.52, 189.076, 34.39, 0.452)
pt3dadd(-29.562, 189.188, 34.388, 0.452)
pt3dadd(-29.584, 189.306, 34.383, 0.452)
pt3dadd(-29.607, 189.424, 34.378, 0.452)
pt3dadd(-29.629, 189.541, 34.373, 0.452)
pt3dadd(-29.651, 189.659, 34.368, 0.452)
pt3dadd(-29.673, 189.778, 34.363, 0.452)
pt3dadd(-29.695, 189.895, 34.358, 0.452)
pt3dadd(-29.717, 190.013, 34.353, 0.452)
pt3dadd(-29.739, 190.13, 34.347, 0.452)
pt3dadd(-29.761, 190.248, 34.342, 0.452)
pt3dadd(-29.782, 190.366, 34.337, 0.452)
pt3dadd(-29.79, 190.486, 34.329, 0.44)
pt3dadd(-29.798, 190.604, 34.321, 0.43)
pt3dadd(-29.806, 190.724, 34.313, 0.42)
pt3dadd(-29.814, 190.843, 34.305, 0.408)
pt3dadd(-29.822, 190.963, 34.296, 0.398)
pt3dadd(-29.83, 191.082, 34.288, 0.388)
pt3dadd(-29.838, 191.202, 34.28, 0.376)
pt3dadd(-29.846, 191.321, 34.272, 0.366)
pt3dadd(-29.854, 191.441, 34.264, 0.354)
pt3dadd(-29.862, 191.56, 34.255, 0.344)
pt3dadd(-29.865, 191.677, 34.235, 0.332)
pt3dadd(-29.868, 191.795, 34.215, 0.32)
pt3dadd(-29.872, 191.912, 34.195, 0.308)
pt3dadd(-29.875, 192.03, 34.175, 0.296)
pt3dadd(-29.879, 192.146, 34.155, 0.284)
pt3dadd(-29.882, 192.264, 34.135, 0.272)
pt3dadd(-29.886, 192.382, 34.114, 0.26)
pt3dadd(-29.889, 192.499, 34.094, 0.248)
pt3dadd(-29.893, 192.617, 34.074, 0.236)
pt3dadd(-29.897, 192.734, 34.052, 0.226)
pt3dadd(-29.903, 192.847, 34.021, 0.226)
pt3dadd(-29.91, 192.961, 33.989, 0.226)
pt3dadd(-29.917, 193.075, 33.958, 0.226)
pt3dadd(-29.923, 193.188, 33.926, 0.226)
pt3dadd(-29.93, 193.302, 33.895, 0.226)
pt3dadd(-29.937, 193.416, 33.863, 0.226)
pt3dadd(-29.943, 193.53, 33.832, 0.226)
pt3dadd(-29.95, 193.643, 33.8, 0.226)
pt3dadd(-29.957, 193.757, 33.768, 0.226)
pt3dadd(-29.965, 193.871, 33.741, 0.226)
pt3dadd(-29.981, 193.99, 33.728, 0.226)
pt3dadd(-29.996, 194.107, 33.715, 0.226)
pt3dadd(-30.012, 194.226, 33.702, 0.226)
pt3dadd(-30.027, 194.344, 33.69, 0.226)
pt3dadd(-30.042, 194.461, 33.677, 0.226)
pt3dadd(-30.058, 194.58, 33.664, 0.226)
pt3dadd(-30.073, 194.698, 33.652, 0.226)
pt3dadd(-30.089, 194.815, 33.639, 0.226)
pt3dadd(-30.104, 194.934, 33.627, 0.226)
pt3dadd(-30.125, 195.05, 33.621, 0.226)
pt3dadd(-30.162, 195.162, 33.641, 0.226)
pt3dadd(-30.2, 195.274, 33.66, 0.226)
pt3dadd(-30.238, 195.384, 33.68, 0.226)
pt3dadd(-30.276, 195.496, 33.699, 0.226)
pt3dadd(-30.314, 195.607, 33.719, 0.226)
pt3dadd(-30.351, 195.719, 33.738, 0.226)
pt3dadd(-30.389, 195.83, 33.758, 0.226)
pt3dadd(-30.427, 195.942, 33.777, 0.226)
pt3dadd(-30.465, 196.054, 33.797, 0.226)
pt3dadd(-30.541, 196.105, 33.861, 0.226)
pt3dadd(-30.618, 196.156, 33.925, 0.226)
pt3dadd(-30.695, 196.207, 33.989, 0.226)
pt3dadd(-30.772, 196.258, 34.052, 0.226)
pt3dadd(-30.849, 196.309, 34.117, 0.226)
pt3dadd(-30.925, 196.361, 34.18, 0.226)
pt3dadd(-31.002, 196.411, 34.244, 0.226)
pt3dadd(-31.079, 196.463, 34.308, 0.226)
pt3dadd(-31.156, 196.513, 34.372, 0.226)
pt3dadd(-31.232, 196.565, 34.436, 0.226)
}
apic[25] {pt3dclear()
pt3dadd(10.609, 137.538, 21.415, 0.452)
pt3dadd(10.674, 137.532, 21.419, 0.452)
}
}
proc shape3d_75() {
apic[25] { pt3dadd(10.794, 137.522, 21.426, 0.452)
pt3dadd(10.913, 137.513, 21.433, 0.452)
pt3dadd(11.032, 137.502, 21.439, 0.452)
pt3dadd(11.151, 137.492, 21.446, 0.452)
pt3dadd(11.271, 137.482, 21.453, 0.452)
pt3dadd(11.39, 137.472, 21.46, 0.452)
pt3dadd(11.509, 137.462, 21.466, 0.452)
pt3dadd(11.628, 137.453, 21.475, 0.45)
pt3dadd(11.747, 137.446, 21.486, 0.446)
pt3dadd(11.866, 137.437, 21.498, 0.44)
pt3dadd(11.985, 137.43, 21.509, 0.436)
pt3dadd(12.104, 137.423, 21.521, 0.432)
pt3dadd(12.223, 137.416, 21.532, 0.426)
pt3dadd(12.342, 137.408, 21.544, 0.422)
pt3dadd(12.461, 137.4, 21.556, 0.418)
pt3dadd(12.58, 137.393, 21.567, 0.412)
pt3dadd(12.699, 137.386, 21.579, 0.408)
pt3dadd(12.817, 137.381, 21.595, 0.398)
pt3dadd(12.934, 137.38, 21.618, 0.382)
pt3dadd(13.05, 137.38, 21.642, 0.366)
pt3dadd(13.167, 137.378, 21.666, 0.348)
pt3dadd(13.284, 137.377, 21.689, 0.332)
pt3dadd(13.4, 137.377, 21.713, 0.314)
pt3dadd(13.517, 137.376, 21.737, 0.298)
pt3dadd(13.633, 137.376, 21.76, 0.282)
pt3dadd(13.75, 137.375, 21.784, 0.264)
pt3dadd(13.867, 137.374, 21.808, 0.248)
pt3dadd(13.98, 137.374, 21.838, 0.236)
pt3dadd(14.089, 137.372, 21.881, 0.236)
pt3dadd(14.197, 137.371, 21.924, 0.234)
pt3dadd(14.306, 137.371, 21.966, 0.234)
pt3dadd(14.415, 137.37, 22.009, 0.232)
pt3dadd(14.523, 137.369, 22.051, 0.23)
pt3dadd(14.632, 137.369, 22.094, 0.23)
pt3dadd(14.74, 137.368, 22.136, 0.228)
pt3dadd(14.849, 137.366, 22.179, 0.228)
pt3dadd(14.957, 137.365, 22.221, 0.226)
pt3dadd(15.068, 137.364, 22.261, 0.232)
pt3dadd(15.181, 137.363, 22.295, 0.246)
pt3dadd(15.293, 137.36, 22.328, 0.26)
pt3dadd(15.406, 137.359, 22.362, 0.274)
pt3dadd(15.519, 137.357, 22.396, 0.288)
pt3dadd(15.632, 137.356, 22.43, 0.302)
pt3dadd(15.745, 137.353, 22.464, 0.316)
pt3dadd(15.858, 137.352, 22.498, 0.332)
pt3dadd(15.971, 137.35, 22.532, 0.346)
pt3dadd(16.084, 137.348, 22.566, 0.36)
pt3dadd(16.198, 137.346, 22.597, 0.368)
pt3dadd(16.313, 137.342, 22.624, 0.366)
pt3dadd(16.428, 137.34, 22.651, 0.364)
pt3dadd(16.544, 137.336, 22.678, 0.362)
pt3dadd(16.659, 137.334, 22.705, 0.36)
pt3dadd(16.775, 137.33, 22.732, 0.358)
pt3dadd(16.89, 137.328, 22.76, 0.358)
pt3dadd(17.006, 137.324, 22.787, 0.356)
pt3dadd(17.121, 137.322, 22.814, 0.354)
pt3dadd(17.237, 137.318, 22.841, 0.352)
pt3dadd(17.352, 137.315, 22.869, 0.348)
pt3dadd(17.466, 137.309, 22.898, 0.342)
pt3dadd(17.581, 137.303, 22.927, 0.334)
pt3dadd(17.696, 137.298, 22.957, 0.328)
pt3dadd(17.81, 137.292, 22.986, 0.322)
pt3dadd(17.925, 137.286, 23.015, 0.314)
pt3dadd(18.04, 137.28, 23.044, 0.308)
pt3dadd(18.154, 137.274, 23.073, 0.302)
pt3dadd(18.269, 137.268, 23.103, 0.294)
pt3dadd(18.383, 137.263, 23.132, 0.288)
pt3dadd(18.496, 137.255, 23.166, 0.292)
pt3dadd(18.606, 137.245, 23.205, 0.308)
pt3dadd(18.715, 137.236, 23.245, 0.324)
pt3dadd(18.825, 137.226, 23.284, 0.34)
pt3dadd(18.935, 137.216, 23.324, 0.356)
pt3dadd(19.045, 137.207, 23.363, 0.372)
pt3dadd(19.155, 137.197, 23.403, 0.388)
pt3dadd(19.264, 137.188, 23.443, 0.404)
pt3dadd(19.374, 137.178, 23.482, 0.42)
pt3dadd(19.484, 137.168, 23.522, 0.436)
pt3dadd(19.595, 137.156, 23.558, 0.436)
pt3dadd(19.708, 137.14, 23.589, 0.418)
pt3dadd(19.821, 137.124, 23.621, 0.4)
pt3dadd(19.933, 137.107, 23.652, 0.382)
pt3dadd(20.046, 137.09, 23.683, 0.364)
pt3dadd(20.159, 137.075, 23.715, 0.346)
pt3dadd(20.271, 137.058, 23.746, 0.328)
pt3dadd(20.384, 137.042, 23.778, 0.31)
pt3dadd(20.497, 137.026, 23.809, 0.292)
pt3dadd(20.61, 137.009, 23.841, 0.274)
pt3dadd(20.72, 136.981, 23.869, 0.274)
pt3dadd(20.828, 136.938, 23.894, 0.296)
pt3dadd(20.936, 136.895, 23.919, 0.32)
pt3dadd(21.044, 136.852, 23.944, 0.344)
pt3dadd(21.152, 136.808, 23.969, 0.368)
pt3dadd(21.259, 136.764, 23.994, 0.39)
pt3dadd(21.367, 136.721, 24.019, 0.414)
pt3dadd(21.475, 136.678, 24.044, 0.438)
pt3dadd(21.583, 136.634, 24.069, 0.46)
pt3dadd(21.691, 136.591, 24.094, 0.484)
pt3dadd(21.797, 136.548, 24.123, 0.502)
pt3dadd(21.902, 136.504, 24.155, 0.512)
pt3dadd(22.007, 136.459, 24.187, 0.522)
pt3dadd(22.112, 136.415, 24.219, 0.534)
pt3dadd(22.216, 136.372, 24.25, 0.544)
pt3dadd(22.321, 136.327, 24.282, 0.554)
pt3dadd(22.426, 136.283, 24.314, 0.566)
pt3dadd(22.531, 136.238, 24.346, 0.576)
pt3dadd(22.636, 136.194, 24.378, 0.586)
pt3dadd(22.74, 136.15, 24.41, 0.598)
pt3dadd(22.844, 136.109, 24.447, 0.594)
pt3dadd(22.947, 136.07, 24.487, 0.58)
pt3dadd(23.049, 136.032, 24.528, 0.568)
pt3dadd(23.152, 135.994, 24.569, 0.554)
pt3dadd(23.254, 135.955, 24.61, 0.54)
pt3dadd(23.357, 135.917, 24.651, 0.526)
pt3dadd(23.459, 135.878, 24.692, 0.512)
pt3dadd(23.562, 135.84, 24.733, 0.498)
pt3dadd(23.664, 135.802, 24.774, 0.486)
pt3dadd(23.767, 135.763, 24.815, 0.472)
pt3dadd(23.868, 135.718, 24.851, 0.476)
pt3dadd(23.969, 135.666, 24.884, 0.492)
pt3dadd(24.07, 135.614, 24.917, 0.508)
pt3dadd(24.171, 135.563, 24.95, 0.524)
pt3dadd(24.272, 135.511, 24.984, 0.54)
pt3dadd(24.372, 135.46, 25.017, 0.556)
pt3dadd(24.473, 135.408, 25.05, 0.572)
pt3dadd(24.574, 135.356, 25.083, 0.588)
pt3dadd(24.675, 135.305, 25.116, 0.606)
pt3dadd(24.775, 135.253, 25.149, 0.622)
pt3dadd(24.877, 135.212, 25.189, 0.63)
pt3dadd(24.979, 135.179, 25.234, 0.636)
pt3dadd(25.081, 135.145, 25.279, 0.64)
pt3dadd(25.182, 135.112, 25.324, 0.646)
pt3dadd(25.284, 135.078, 25.369, 0.652)
pt3dadd(25.386, 135.046, 25.414, 0.656)
pt3dadd(25.488, 135.012, 25.459, 0.662)
pt3dadd(25.59, 134.978, 25.504, 0.666)
pt3dadd(25.692, 134.945, 25.549, 0.672)
pt3dadd(25.794, 134.911, 25.593, 0.676)
pt3dadd(25.898, 134.886, 25.639, 0.678)
pt3dadd(26.002, 134.866, 25.684, 0.678)
pt3dadd(26.107, 134.844, 25.73, 0.678)
pt3dadd(26.212, 134.822, 25.775, 0.678)
pt3dadd(26.316, 134.801, 25.821, 0.678)
pt3dadd(26.421, 134.78, 25.866, 0.678)
pt3dadd(26.526, 134.759, 25.912, 0.678)
pt3dadd(26.631, 134.737, 25.957, 0.678)
pt3dadd(26.735, 134.717, 26.003, 0.678)
pt3dadd(26.84, 134.695, 26.048, 0.678)
pt3dadd(26.95, 134.681, 26.087, 0.678)
pt3dadd(27.061, 134.669, 26.122, 0.678)
pt3dadd(27.173, 134.658, 26.158, 0.676)
pt3dadd(27.284, 134.646, 26.194, 0.676)
pt3dadd(27.396, 134.634, 26.229, 0.676)
pt3dadd(27.507, 134.623, 26.265, 0.674)
pt3dadd(27.619, 134.611, 26.301, 0.674)
pt3dadd(27.73, 134.599, 26.336, 0.674)
pt3dadd(27.842, 134.587, 26.372, 0.672)
pt3dadd(27.953, 134.576, 26.407, 0.672)
pt3dadd(28.061, 134.573, 26.452, 0.66)
pt3dadd(28.166, 134.574, 26.499, 0.642)
pt3dadd(28.272, 134.575, 26.547, 0.626)
pt3dadd(28.377, 134.575, 26.594, 0.61)
pt3dadd(28.483, 134.576, 26.642, 0.592)
pt3dadd(28.589, 134.576, 26.689, 0.576)
pt3dadd(28.694, 134.578, 26.737, 0.558)
pt3dadd(28.8, 134.579, 26.784, 0.542)
pt3dadd(28.905, 134.579, 26.832, 0.524)
pt3dadd(29.011, 134.58, 26.879, 0.508)
pt3dadd(29.121, 134.581, 26.918, 0.49)
pt3dadd(29.233, 134.582, 26.954, 0.472)
pt3dadd(29.345, 134.584, 26.99, 0.454)
pt3dadd(29.457, 134.585, 27.025, 0.436)
pt3dadd(29.57, 134.587, 27.061, 0.418)
pt3dadd(29.682, 134.588, 27.096, 0.4)
pt3dadd(29.794, 134.59, 27.132, 0.382)
pt3dadd(29.906, 134.591, 27.167, 0.364)
pt3dadd(30.018, 134.592, 27.203, 0.346)
pt3dadd(30.13, 134.594, 27.239, 0.328)
pt3dadd(30.245, 134.597, 27.267, 0.316)
pt3dadd(30.361, 134.599, 27.294, 0.306)
pt3dadd(30.476, 134.602, 27.321, 0.296)
pt3dadd(30.592, 134.604, 27.347, 0.288)
pt3dadd(30.708, 134.606, 27.374, 0.278)
pt3dadd(30.823, 134.609, 27.4, 0.268)
pt3dadd(30.939, 134.611, 27.427, 0.258)
pt3dadd(31.055, 134.614, 27.454, 0.248)
pt3dadd(31.17, 134.616, 27.48, 0.238)
pt3dadd(31.286, 134.618, 27.507, 0.228)
pt3dadd(31.402, 134.622, 27.533, 0.244)
pt3dadd(31.517, 134.627, 27.559, 0.268)
pt3dadd(31.633, 134.63, 27.586, 0.29)
pt3dadd(31.749, 134.635, 27.612, 0.314)
pt3dadd(31.864, 134.64, 27.639, 0.338)
pt3dadd(31.98, 134.644, 27.665, 0.362)
pt3dadd(32.096, 134.648, 27.691, 0.384)
pt3dadd(32.211, 134.653, 27.718, 0.408)
pt3dadd(32.327, 134.658, 27.744, 0.432)
pt3dadd(32.443, 134.662, 27.77, 0.456)
pt3dadd(32.555, 134.669, 27.805, 0.53)
pt3dadd(32.666, 134.677, 27.843, 0.62)
pt3dadd(32.777, 134.684, 27.88, 0.708)
}
}
proc shape3d_76() {
apic[25] { pt3dadd(32.888, 134.693, 27.917, 0.798)
pt3dadd(32.999, 134.701, 27.955, 0.886)
pt3dadd(33.11, 134.708, 27.992, 0.976)
pt3dadd(33.221, 134.717, 28.03, 1.064)
pt3dadd(33.332, 134.724, 28.067, 1.154)
pt3dadd(33.443, 134.732, 28.104, 1.244)
pt3dadd(33.554, 134.741, 28.142, 1.332)
pt3dadd(33.669, 134.753, 28.169, 1.292)
pt3dadd(33.784, 134.766, 28.193, 1.22)
pt3dadd(33.9, 134.78, 28.218, 1.146)
pt3dadd(34.015, 134.794, 28.242, 1.074)
pt3dadd(34.131, 134.807, 28.267, 1)
pt3dadd(34.246, 134.82, 28.291, 0.928)
pt3dadd(34.362, 134.834, 28.316, 0.854)
pt3dadd(34.477, 134.848, 28.34, 0.78)
pt3dadd(34.593, 134.861, 28.365, 0.708)
pt3dadd(34.708, 134.875, 28.389, 0.634)
pt3dadd(34.822, 134.908, 28.406, 0.616)
pt3dadd(34.934, 134.945, 28.421, 0.614)
pt3dadd(35.047, 134.983, 28.435, 0.61)
pt3dadd(35.159, 135.02, 28.45, 0.608)
pt3dadd(35.272, 135.059, 28.464, 0.604)
pt3dadd(35.384, 135.097, 28.479, 0.602)
pt3dadd(35.497, 135.134, 28.494, 0.598)
pt3dadd(35.609, 135.173, 28.508, 0.596)
pt3dadd(35.722, 135.21, 28.523, 0.594)
pt3dadd(35.834, 135.248, 28.538, 0.59)
pt3dadd(35.948, 135.286, 28.546, 0.598)
pt3dadd(36.062, 135.322, 28.553, 0.606)
pt3dadd(36.176, 135.359, 28.56, 0.614)
pt3dadd(36.289, 135.396, 28.568, 0.624)
pt3dadd(36.403, 135.433, 28.575, 0.632)
pt3dadd(36.517, 135.47, 28.582, 0.642)
pt3dadd(36.631, 135.506, 28.59, 0.65)
pt3dadd(36.745, 135.544, 28.597, 0.66)
pt3dadd(36.859, 135.581, 28.604, 0.668)
pt3dadd(36.972, 135.618, 28.611, 0.678)
pt3dadd(37.089, 135.644, 28.616, 0.668)
pt3dadd(37.207, 135.668, 28.62, 0.656)
pt3dadd(37.324, 135.694, 28.625, 0.646)
pt3dadd(37.441, 135.719, 28.629, 0.634)
pt3dadd(37.558, 135.744, 28.633, 0.624)
pt3dadd(37.676, 135.768, 28.637, 0.612)
pt3dadd(37.793, 135.793, 28.641, 0.6)
pt3dadd(37.91, 135.818, 28.646, 0.59)
pt3dadd(38.028, 135.842, 28.65, 0.578)
pt3dadd(38.145, 135.868, 28.654, 0.568)
pt3dadd(38.264, 135.882, 28.662, 0.54)
pt3dadd(38.383, 135.894, 28.67, 0.51)
pt3dadd(38.502, 135.907, 28.678, 0.48)
pt3dadd(38.62, 135.92, 28.686, 0.45)
pt3dadd(38.739, 135.934, 28.693, 0.42)
pt3dadd(38.858, 135.946, 28.701, 0.39)
pt3dadd(38.977, 135.959, 28.709, 0.36)
pt3dadd(39.096, 135.972, 28.717, 0.33)
pt3dadd(39.215, 135.984, 28.725, 0.3)
pt3dadd(39.334, 135.997, 28.733, 0.27)
pt3dadd(39.453, 136.001, 28.745, 0.304)
pt3dadd(39.572, 136.002, 28.757, 0.342)
pt3dadd(39.691, 136.004, 28.77, 0.38)
pt3dadd(39.81, 136.007, 28.782, 0.42)
pt3dadd(39.929, 136.009, 28.795, 0.458)
pt3dadd(40.048, 136.012, 28.807, 0.496)
pt3dadd(40.167, 136.013, 28.819, 0.534)
pt3dadd(40.287, 136.015, 28.832, 0.572)
pt3dadd(40.406, 136.018, 28.844, 0.612)
pt3dadd(40.525, 136.02, 28.857, 0.65)
pt3dadd(40.637, 136.024, 28.892, 0.64)
pt3dadd(40.748, 136.027, 28.929, 0.626)
pt3dadd(40.859, 136.032, 28.967, 0.612)
pt3dadd(40.97, 136.036, 29.004, 0.596)
pt3dadd(41.082, 136.039, 29.041, 0.582)
pt3dadd(41.193, 136.044, 29.079, 0.568)
pt3dadd(41.304, 136.048, 29.116, 0.554)
pt3dadd(41.415, 136.051, 29.153, 0.54)
pt3dadd(41.526, 136.056, 29.191, 0.526)
pt3dadd(41.638, 136.06, 29.228, 0.51)
pt3dadd(41.751, 136.068, 29.26, 0.516)
pt3dadd(41.865, 136.075, 29.291, 0.524)
pt3dadd(41.978, 136.084, 29.323, 0.53)
pt3dadd(42.092, 136.092, 29.354, 0.538)
pt3dadd(42.206, 136.1, 29.386, 0.544)
pt3dadd(42.319, 136.109, 29.417, 0.552)
pt3dadd(42.433, 136.117, 29.449, 0.558)
pt3dadd(42.546, 136.126, 29.48, 0.566)
pt3dadd(42.66, 136.134, 29.512, 0.572)
pt3dadd(42.774, 136.142, 29.543, 0.58)
pt3dadd(42.889, 136.157, 29.568, 0.57)
pt3dadd(43.005, 136.171, 29.592, 0.562)
pt3dadd(43.12, 136.186, 29.616, 0.552)
pt3dadd(43.236, 136.2, 29.64, 0.542)
pt3dadd(43.351, 136.216, 29.664, 0.532)
pt3dadd(43.466, 136.23, 29.689, 0.524)
pt3dadd(43.582, 136.244, 29.713, 0.514)
pt3dadd(43.697, 136.259, 29.737, 0.504)
pt3dadd(43.813, 136.273, 29.761, 0.494)
pt3dadd(43.928, 136.289, 29.786, 0.484)
pt3dadd(44.042, 136.321, 29.804, 0.472)
pt3dadd(44.155, 136.354, 29.823, 0.46)
pt3dadd(44.268, 136.387, 29.841, 0.448)
pt3dadd(44.381, 136.42, 29.86, 0.434)
pt3dadd(44.494, 136.453, 29.878, 0.422)
pt3dadd(44.608, 136.487, 29.897, 0.408)
pt3dadd(44.721, 136.519, 29.916, 0.396)
pt3dadd(44.834, 136.553, 29.934, 0.384)
pt3dadd(44.947, 136.585, 29.953, 0.37)
pt3dadd(45.059, 136.621, 29.972, 0.362)
pt3dadd(45.161, 136.679, 29.992, 0.392)
pt3dadd(45.263, 136.738, 30.013, 0.42)
pt3dadd(45.365, 136.795, 30.034, 0.448)
pt3dadd(45.467, 136.853, 30.055, 0.478)
pt3dadd(45.57, 136.91, 30.076, 0.506)
pt3dadd(45.672, 136.968, 30.097, 0.534)
pt3dadd(45.774, 137.027, 30.118, 0.564)
pt3dadd(45.876, 137.084, 30.139, 0.592)
pt3dadd(45.978, 137.142, 30.16, 0.622)
pt3dadd(46.076, 137.2, 30.189, 0.64)
pt3dadd(46.16, 137.257, 30.241, 0.622)
pt3dadd(46.244, 137.315, 30.294, 0.606)
pt3dadd(46.329, 137.372, 30.346, 0.59)
pt3dadd(46.413, 137.431, 30.399, 0.574)
pt3dadd(46.497, 137.489, 30.451, 0.556)
pt3dadd(46.581, 137.546, 30.504, 0.54)
pt3dadd(46.666, 137.604, 30.556, 0.524)
pt3dadd(46.75, 137.662, 30.609, 0.508)
pt3dadd(46.834, 137.719, 30.661, 0.49)
pt3dadd(46.92, 137.78, 30.709, 0.484)
pt3dadd(47.007, 137.849, 30.745, 0.502)
pt3dadd(47.095, 137.918, 30.781, 0.522)
pt3dadd(47.183, 137.988, 30.817, 0.54)
pt3dadd(47.271, 138.058, 30.853, 0.558)
pt3dadd(47.358, 138.127, 30.889, 0.578)
pt3dadd(47.446, 138.197, 30.925, 0.596)
pt3dadd(47.534, 138.266, 30.961, 0.614)
pt3dadd(47.622, 138.336, 30.997, 0.634)
pt3dadd(47.71, 138.404, 31.033, 0.652)
pt3dadd(47.8, 138.468, 31.072, 0.666)
pt3dadd(47.896, 138.512, 31.12, 0.668)
pt3dadd(47.992, 138.557, 31.167, 0.668)
pt3dadd(48.088, 138.601, 31.214, 0.67)
pt3dadd(48.184, 138.646, 31.261, 0.67)
pt3dadd(48.28, 138.69, 31.308, 0.672)
pt3dadd(48.376, 138.734, 31.355, 0.674)
pt3dadd(48.472, 138.779, 31.402, 0.674)
pt3dadd(48.568, 138.823, 31.45, 0.676)
pt3dadd(48.664, 138.868, 31.497, 0.678)
pt3dadd(48.761, 138.914, 31.54, 0.676)
pt3dadd(48.861, 138.968, 31.573, 0.664)
pt3dadd(48.961, 139.021, 31.605, 0.654)
pt3dadd(49.061, 139.075, 31.638, 0.644)
pt3dadd(49.161, 139.128, 31.671, 0.634)
pt3dadd(49.261, 139.182, 31.704, 0.624)
pt3dadd(49.361, 139.235, 31.736, 0.612)
pt3dadd(49.461, 139.289, 31.769, 0.602)
pt3dadd(49.561, 139.342, 31.802, 0.592)
pt3dadd(49.661, 139.396, 31.835, 0.582)
pt3dadd(49.763, 139.448, 31.863, 0.57)
pt3dadd(49.866, 139.504, 31.886, 0.552)
pt3dadd(49.969, 139.559, 31.908, 0.536)
pt3dadd(50.073, 139.613, 31.931, 0.52)
pt3dadd(50.176, 139.668, 31.953, 0.502)
pt3dadd(50.28, 139.723, 31.975, 0.486)
pt3dadd(50.383, 139.777, 31.998, 0.47)
pt3dadd(50.486, 139.832, 32.02, 0.454)
pt3dadd(50.589, 139.886, 32.043, 0.436)
pt3dadd(50.693, 139.942, 32.065, 0.42)
pt3dadd(50.799, 139.991, 32.086, 0.402)
pt3dadd(50.91, 140.032, 32.104, 0.386)
pt3dadd(51.021, 140.072, 32.122, 0.368)
pt3dadd(51.132, 140.113, 32.14, 0.35)
pt3dadd(51.242, 140.153, 32.158, 0.332)
pt3dadd(51.353, 140.194, 32.176, 0.314)
pt3dadd(51.464, 140.234, 32.194, 0.296)
pt3dadd(51.575, 140.275, 32.212, 0.278)
pt3dadd(51.686, 140.316, 32.23, 0.26)
pt3dadd(51.796, 140.357, 32.248, 0.242)
pt3dadd(51.905, 140.404, 32.264, 0.238)
pt3dadd(52.011, 140.458, 32.278, 0.254)
pt3dadd(52.117, 140.512, 32.291, 0.27)
pt3dadd(52.223, 140.566, 32.304, 0.286)
pt3dadd(52.328, 140.621, 32.317, 0.302)
pt3dadd(52.434, 140.675, 32.33, 0.318)
pt3dadd(52.54, 140.729, 32.343, 0.332)
pt3dadd(52.646, 140.784, 32.356, 0.348)
pt3dadd(52.752, 140.838, 32.369, 0.364)
pt3dadd(52.858, 140.892, 32.382, 0.38)
pt3dadd(52.964, 140.94, 32.402, 0.388)
pt3dadd(53.071, 140.978, 32.434, 0.382)
pt3dadd(53.178, 141.017, 32.465, 0.378)
pt3dadd(53.286, 141.055, 32.496, 0.374)
pt3dadd(53.393, 141.094, 32.528, 0.37)
pt3dadd(53.5, 141.132, 32.559, 0.364)
pt3dadd(53.608, 141.17, 32.591, 0.36)
pt3dadd(53.715, 141.209, 32.622, 0.356)
pt3dadd(53.822, 141.247, 32.653, 0.352)
pt3dadd(53.929, 141.286, 32.685, 0.348)
pt3dadd(54.037, 141.317, 32.721, 0.338)
pt3dadd(54.144, 141.341, 32.76, 0.326)
pt3dadd(54.252, 141.365, 32.8, 0.314)
pt3dadd(54.359, 141.39, 32.839, 0.302)
}
}
proc shape3d_77() {
apic[25] { pt3dadd(54.467, 141.414, 32.879, 0.29)
pt3dadd(54.574, 141.439, 32.918, 0.278)
pt3dadd(54.682, 141.463, 32.957, 0.266)
pt3dadd(54.789, 141.488, 32.997, 0.254)
pt3dadd(54.897, 141.512, 33.036, 0.242)
pt3dadd(55.004, 141.538, 33.076, 0.23)
pt3dadd(55.114, 141.557, 33.112, 0.226)
pt3dadd(55.226, 141.572, 33.147, 0.226)
pt3dadd(55.337, 141.589, 33.181, 0.228)
pt3dadd(55.449, 141.605, 33.215, 0.228)
pt3dadd(55.56, 141.62, 33.25, 0.228)
pt3dadd(55.672, 141.637, 33.284, 0.228)
pt3dadd(55.783, 141.653, 33.319, 0.23)
pt3dadd(55.895, 141.67, 33.353, 0.23)
pt3dadd(56.006, 141.685, 33.388, 0.23)
pt3dadd(56.118, 141.702, 33.422, 0.232)
pt3dadd(56.226, 141.714, 33.463, 0.242)
pt3dadd(56.333, 141.722, 33.509, 0.258)
pt3dadd(56.439, 141.732, 33.555, 0.276)
pt3dadd(56.545, 141.742, 33.601, 0.292)
pt3dadd(56.651, 141.75, 33.647, 0.31)
pt3dadd(56.757, 141.76, 33.693, 0.326)
pt3dadd(56.864, 141.769, 33.739, 0.344)
pt3dadd(56.97, 141.778, 33.784, 0.36)
pt3dadd(57.076, 141.787, 33.83, 0.378)
pt3dadd(57.182, 141.797, 33.876, 0.394)
pt3dadd(57.293, 141.809, 33.913, 0.412)
pt3dadd(57.406, 141.824, 33.945, 0.43)
pt3dadd(57.519, 141.839, 33.976, 0.448)
pt3dadd(57.632, 141.853, 34.007, 0.466)
pt3dadd(57.745, 141.868, 34.039, 0.484)
pt3dadd(57.858, 141.883, 34.07, 0.504)
pt3dadd(57.971, 141.898, 34.101, 0.522)
pt3dadd(58.084, 141.912, 34.132, 0.54)
pt3dadd(58.197, 141.926, 34.164, 0.558)
pt3dadd(58.31, 141.942, 34.195, 0.576)
pt3dadd(58.422, 141.968, 34.219, 0.578)
pt3dadd(58.535, 142.002, 34.238, 0.57)
pt3dadd(58.648, 142.037, 34.257, 0.564)
pt3dadd(58.761, 142.07, 34.276, 0.556)
pt3dadd(58.874, 142.104, 34.296, 0.55)
pt3dadd(58.986, 142.138, 34.315, 0.542)
pt3dadd(59.099, 142.172, 34.334, 0.536)
pt3dadd(59.212, 142.206, 34.353, 0.528)
pt3dadd(59.325, 142.24, 34.373, 0.522)
pt3dadd(59.437, 142.273, 34.392, 0.514)
pt3dadd(59.547, 142.32, 34.405, 0.49)
pt3dadd(59.655, 142.369, 34.417, 0.462)
pt3dadd(59.763, 142.42, 34.428, 0.434)
pt3dadd(59.872, 142.469, 34.44, 0.404)
pt3dadd(59.98, 142.519, 34.451, 0.376)
pt3dadd(60.088, 142.568, 34.463, 0.348)
pt3dadd(60.197, 142.619, 34.474, 0.318)
pt3dadd(60.305, 142.669, 34.486, 0.29)
pt3dadd(60.413, 142.718, 34.497, 0.262)
pt3dadd(60.521, 142.769, 34.509, 0.232)
pt3dadd(60.633, 142.812, 34.517, 0.226)
pt3dadd(60.744, 142.855, 34.523, 0.226)
pt3dadd(60.857, 142.897, 34.53, 0.226)
pt3dadd(60.969, 142.939, 34.536, 0.226)
pt3dadd(61.08, 142.982, 34.543, 0.226)
pt3dadd(61.192, 143.024, 34.549, 0.226)
pt3dadd(61.305, 143.066, 34.556, 0.226)
pt3dadd(61.416, 143.108, 34.563, 0.226)
pt3dadd(61.528, 143.152, 34.569, 0.226)
pt3dadd(61.64, 143.194, 34.576, 0.226)
pt3dadd(61.748, 143.246, 34.585, 0.238)
pt3dadd(61.853, 143.302, 34.595, 0.254)
pt3dadd(61.959, 143.357, 34.605, 0.268)
pt3dadd(62.065, 143.413, 34.614, 0.284)
pt3dadd(62.171, 143.468, 34.624, 0.3)
pt3dadd(62.276, 143.524, 34.634, 0.314)
pt3dadd(62.382, 143.579, 34.644, 0.33)
pt3dadd(62.488, 143.635, 34.654, 0.346)
pt3dadd(62.593, 143.69, 34.664, 0.36)
pt3dadd(62.699, 143.746, 34.674, 0.376)
pt3dadd(62.806, 143.792, 34.696, 0.378)
pt3dadd(62.914, 143.837, 34.721, 0.374)
pt3dadd(63.021, 143.881, 34.746, 0.372)
pt3dadd(63.129, 143.926, 34.771, 0.37)
pt3dadd(63.236, 143.969, 34.796, 0.368)
pt3dadd(63.343, 144.013, 34.821, 0.364)
pt3dadd(63.451, 144.058, 34.846, 0.362)
pt3dadd(63.558, 144.102, 34.871, 0.36)
pt3dadd(63.666, 144.146, 34.896, 0.358)
pt3dadd(63.773, 144.191, 34.921, 0.354)
pt3dadd(63.882, 144.223, 34.953, 0.35)
pt3dadd(63.991, 144.256, 34.986, 0.348)
pt3dadd(64.099, 144.288, 35.018, 0.344)
pt3dadd(64.208, 144.319, 35.051, 0.34)
pt3dadd(64.317, 144.352, 35.084, 0.336)
pt3dadd(64.426, 144.384, 35.116, 0.332)
pt3dadd(64.535, 144.415, 35.149, 0.33)
pt3dadd(64.643, 144.448, 35.182, 0.326)
pt3dadd(64.752, 144.48, 35.214, 0.322)
pt3dadd(64.861, 144.511, 35.247, 0.318)
pt3dadd(64.974, 144.538, 35.271, 0.352)
pt3dadd(65.088, 144.564, 35.294, 0.386)
pt3dadd(65.202, 144.59, 35.317, 0.422)
pt3dadd(65.316, 144.617, 35.341, 0.458)
pt3dadd(65.429, 144.643, 35.364, 0.492)
pt3dadd(65.543, 144.67, 35.387, 0.528)
pt3dadd(65.657, 144.696, 35.41, 0.564)
pt3dadd(65.77, 144.722, 35.434, 0.6)
pt3dadd(65.884, 144.749, 35.457, 0.634)
pt3dadd(65.998, 144.775, 35.48, 0.67)
pt3dadd(66.109, 144.818, 35.491, 0.638)
pt3dadd(66.219, 144.863, 35.502, 0.604)
pt3dadd(66.33, 144.907, 35.512, 0.568)
pt3dadd(66.441, 144.952, 35.522, 0.532)
pt3dadd(66.552, 144.996, 35.533, 0.496)
pt3dadd(66.663, 145.04, 35.543, 0.46)
pt3dadd(66.773, 145.085, 35.553, 0.426)
pt3dadd(66.884, 145.129, 35.563, 0.39)
pt3dadd(66.995, 145.175, 35.574, 0.354)
pt3dadd(67.105, 145.219, 35.584, 0.318)
pt3dadd(67.221, 145.253, 35.587, 0.334)
pt3dadd(67.336, 145.285, 35.59, 0.354)
pt3dadd(67.451, 145.319, 35.592, 0.372)
pt3dadd(67.567, 145.351, 35.595, 0.392)
pt3dadd(67.682, 145.385, 35.597, 0.412)
pt3dadd(67.797, 145.417, 35.6, 0.43)
pt3dadd(67.913, 145.451, 35.603, 0.45)
pt3dadd(68.028, 145.483, 35.605, 0.468)
pt3dadd(68.143, 145.516, 35.608, 0.488)
pt3dadd(68.259, 145.549, 35.61, 0.508)
pt3dadd(68.377, 145.57, 35.611, 0.534)
pt3dadd(68.495, 145.59, 35.611, 0.562)
pt3dadd(68.613, 145.61, 35.611, 0.59)
pt3dadd(68.732, 145.631, 35.611, 0.618)
pt3dadd(68.85, 145.652, 35.611, 0.646)
pt3dadd(68.968, 145.673, 35.611, 0.674)
pt3dadd(69.086, 145.693, 35.611, 0.7)
pt3dadd(69.204, 145.714, 35.611, 0.728)
pt3dadd(69.323, 145.734, 35.611, 0.756)
pt3dadd(69.441, 145.754, 35.611, 0.784)
pt3dadd(69.561, 145.763, 35.611, 0.78)
pt3dadd(69.68, 145.771, 35.611, 0.776)
pt3dadd(69.8, 145.78, 35.611, 0.772)
pt3dadd(69.92, 145.788, 35.611, 0.768)
pt3dadd(70.039, 145.796, 35.611, 0.764)
pt3dadd(70.159, 145.805, 35.611, 0.76)
pt3dadd(70.279, 145.813, 35.611, 0.756)
pt3dadd(70.399, 145.822, 35.611, 0.752)
pt3dadd(70.518, 145.83, 35.611, 0.748)
pt3dadd(70.638, 145.838, 35.611, 0.746)
pt3dadd(70.758, 145.838, 35.611, 0.71)
pt3dadd(70.878, 145.838, 35.611, 0.676)
pt3dadd(70.998, 145.838, 35.611, 0.642)
pt3dadd(71.118, 145.838, 35.611, 0.606)
pt3dadd(71.238, 145.838, 35.611, 0.572)
pt3dadd(71.358, 145.838, 35.611, 0.538)
pt3dadd(71.478, 145.838, 35.611, 0.504)
pt3dadd(71.598, 145.838, 35.611, 0.468)
pt3dadd(71.718, 145.838, 35.611, 0.434)
pt3dadd(71.838, 145.838, 35.611, 0.4)
pt3dadd(71.958, 145.838, 35.611, 0.382)
pt3dadd(72.078, 145.838, 35.611, 0.364)
pt3dadd(72.198, 145.838, 35.611, 0.348)
pt3dadd(72.318, 145.838, 35.611, 0.33)
pt3dadd(72.438, 145.838, 35.611, 0.312)
pt3dadd(72.558, 145.838, 35.611, 0.296)
pt3dadd(72.678, 145.838, 35.611, 0.278)
pt3dadd(72.798, 145.838, 35.611, 0.26)
pt3dadd(72.918, 145.838, 35.611, 0.244)
pt3dadd(73.038, 145.838, 35.611, 0.226)
}
apic[26] {pt3dclear()
pt3dadd(9.913, 136.295, 20.143, 1.13)
pt3dadd(9.942, 136.322, 20.148, 1.118)
pt3dadd(10.027, 136.404, 20.163, 1.084)
pt3dadd(10.113, 136.487, 20.179, 1.05)
pt3dadd(10.198, 136.57, 20.194, 1.016)
pt3dadd(10.283, 136.651, 20.209, 0.982)
pt3dadd(10.368, 136.734, 20.225, 0.948)
pt3dadd(10.454, 136.817, 20.24, 0.914)
pt3dadd(10.539, 136.898, 20.255, 0.88)
pt3dadd(10.624, 136.981, 20.271, 0.846)
pt3dadd(10.709, 137.064, 20.286, 0.81)
pt3dadd(10.795, 137.146, 20.302, 0.776)
pt3dadd(10.88, 137.228, 20.317, 0.742)
pt3dadd(10.915, 137.341, 20.323, 0.706)
pt3dadd(10.943, 137.458, 20.328, 0.67)
pt3dadd(10.972, 137.574, 20.333, 0.636)
pt3dadd(11, 137.69, 20.337, 0.6)
pt3dadd(11.028, 137.807, 20.342, 0.564)
pt3dadd(11.057, 137.923, 20.347, 0.528)
pt3dadd(11.085, 138.04, 20.352, 0.492)
pt3dadd(11.113, 138.156, 20.357, 0.456)
pt3dadd(11.141, 138.272, 20.361, 0.42)
pt3dadd(11.167, 138.39, 20.366, 0.39)
pt3dadd(11.184, 138.509, 20.369, 0.386)
pt3dadd(11.201, 138.628, 20.372, 0.38)
pt3dadd(11.217, 138.746, 20.374, 0.376)
pt3dadd(11.234, 138.865, 20.377, 0.37)
pt3dadd(11.251, 138.984, 20.38, 0.364)
pt3dadd(11.267, 139.103, 20.383, 0.36)
pt3dadd(11.284, 139.22, 20.386, 0.354)
pt3dadd(11.301, 139.339, 20.389, 0.348)
pt3dadd(11.317, 139.458, 20.391, 0.344)
pt3dadd(11.338, 139.577, 20.395, 0.344)
pt3dadd(11.371, 139.692, 20.4, 0.364)
}
}
proc shape3d_78() {
apic[26] { pt3dadd(11.404, 139.807, 20.405, 0.384)
pt3dadd(11.438, 139.922, 20.41, 0.404)
pt3dadd(11.471, 140.038, 20.415, 0.424)
pt3dadd(11.504, 140.152, 20.42, 0.444)
pt3dadd(11.538, 140.267, 20.424, 0.464)
pt3dadd(11.571, 140.382, 20.43, 0.484)
pt3dadd(11.604, 140.497, 20.434, 0.506)
pt3dadd(11.638, 140.612, 20.439, 0.526)
pt3dadd(11.675, 140.726, 20.445, 0.54)
pt3dadd(11.722, 140.837, 20.453, 0.546)
pt3dadd(11.769, 140.946, 20.461, 0.55)
pt3dadd(11.816, 141.056, 20.469, 0.556)
pt3dadd(11.863, 141.167, 20.477, 0.56)
pt3dadd(11.91, 141.276, 20.485, 0.566)
pt3dadd(11.957, 141.386, 20.493, 0.57)
pt3dadd(12.004, 141.497, 20.5, 0.576)
pt3dadd(12.051, 141.606, 20.508, 0.58)
pt3dadd(12.097, 141.716, 20.516, 0.586)
pt3dadd(12.142, 141.827, 20.526, 0.58)
pt3dadd(12.182, 141.94, 20.54, 0.548)
pt3dadd(12.221, 142.051, 20.553, 0.516)
pt3dadd(12.261, 142.164, 20.567, 0.484)
pt3dadd(12.3, 142.276, 20.581, 0.452)
pt3dadd(12.339, 142.388, 20.595, 0.422)
pt3dadd(12.379, 142.5, 20.608, 0.39)
pt3dadd(12.419, 142.612, 20.622, 0.358)
pt3dadd(12.458, 142.724, 20.636, 0.326)
pt3dadd(12.498, 142.836, 20.649, 0.294)
pt3dadd(12.534, 142.946, 20.672, 0.302)
pt3dadd(12.564, 143.052, 20.713, 0.378)
pt3dadd(12.595, 143.158, 20.753, 0.454)
pt3dadd(12.625, 143.263, 20.793, 0.53)
pt3dadd(12.656, 143.369, 20.833, 0.608)
pt3dadd(12.686, 143.474, 20.874, 0.684)
pt3dadd(12.717, 143.579, 20.914, 0.76)
pt3dadd(12.747, 143.684, 20.954, 0.838)
pt3dadd(12.778, 143.79, 20.994, 0.914)
pt3dadd(12.808, 143.896, 21.034, 0.99)
pt3dadd(12.851, 143.996, 21.072, 1.014)
pt3dadd(12.917, 144.089, 21.105, 0.938)
pt3dadd(12.983, 144.181, 21.138, 0.862)
pt3dadd(13.049, 144.272, 21.171, 0.786)
pt3dadd(13.115, 144.365, 21.204, 0.708)
pt3dadd(13.181, 144.457, 21.237, 0.632)
pt3dadd(13.247, 144.548, 21.271, 0.556)
pt3dadd(13.314, 144.641, 21.304, 0.48)
pt3dadd(13.38, 144.733, 21.337, 0.404)
pt3dadd(13.446, 144.824, 21.37, 0.326)
pt3dadd(13.506, 144.923, 21.396, 0.28)
pt3dadd(13.558, 145.028, 21.412, 0.274)
pt3dadd(13.611, 145.135, 21.428, 0.268)
pt3dadd(13.663, 145.241, 21.444, 0.262)
pt3dadd(13.715, 145.348, 21.46, 0.258)
pt3dadd(13.768, 145.454, 21.476, 0.252)
pt3dadd(13.82, 145.56, 21.492, 0.246)
pt3dadd(13.872, 145.667, 21.508, 0.24)
pt3dadd(13.924, 145.772, 21.524, 0.234)
pt3dadd(13.977, 145.879, 21.54, 0.23)
pt3dadd(14.032, 145.985, 21.551, 0.242)
pt3dadd(14.091, 146.089, 21.556, 0.278)
pt3dadd(14.15, 146.194, 21.561, 0.314)
pt3dadd(14.209, 146.298, 21.566, 0.35)
pt3dadd(14.268, 146.402, 21.571, 0.386)
pt3dadd(14.327, 146.506, 21.576, 0.422)
pt3dadd(14.386, 146.61, 21.581, 0.458)
pt3dadd(14.445, 146.714, 21.586, 0.494)
pt3dadd(14.504, 146.819, 21.591, 0.53)
pt3dadd(14.563, 146.923, 21.596, 0.564)
pt3dadd(14.611, 147.032, 21.601, 0.576)
pt3dadd(14.646, 147.146, 21.605, 0.558)
pt3dadd(14.682, 147.262, 21.611, 0.538)
pt3dadd(14.717, 147.376, 21.615, 0.518)
pt3dadd(14.752, 147.491, 21.621, 0.5)
pt3dadd(14.787, 147.605, 21.625, 0.48)
pt3dadd(14.822, 147.72, 21.63, 0.462)
pt3dadd(14.858, 147.834, 21.635, 0.442)
pt3dadd(14.893, 147.949, 21.64, 0.422)
pt3dadd(14.928, 148.063, 21.645, 0.404)
pt3dadd(14.954, 148.18, 21.657, 0.402)
pt3dadd(14.971, 148.296, 21.676, 0.416)
pt3dadd(14.988, 148.412, 21.694, 0.43)
pt3dadd(15.005, 148.529, 21.713, 0.444)
pt3dadd(15.022, 148.646, 21.731, 0.458)
pt3dadd(15.039, 148.763, 21.75, 0.474)
pt3dadd(15.056, 148.879, 21.768, 0.488)
pt3dadd(15.073, 148.996, 21.787, 0.502)
pt3dadd(15.09, 149.113, 21.805, 0.516)
pt3dadd(15.108, 149.23, 21.824, 0.53)
pt3dadd(15.115, 149.347, 21.84, 0.56)
pt3dadd(15.118, 149.466, 21.855, 0.596)
pt3dadd(15.12, 149.585, 21.87, 0.634)
pt3dadd(15.122, 149.704, 21.885, 0.672)
pt3dadd(15.124, 149.821, 21.9, 0.71)
pt3dadd(15.126, 149.94, 21.915, 0.748)
pt3dadd(15.129, 150.059, 21.93, 0.786)
pt3dadd(15.131, 150.178, 21.945, 0.822)
pt3dadd(15.133, 150.296, 21.96, 0.86)
pt3dadd(15.135, 150.415, 21.975, 0.898)
pt3dadd(15.125, 150.534, 21.968, 0.904)
pt3dadd(15.113, 150.652, 21.956, 0.904)
pt3dadd(15.101, 150.77, 21.944, 0.904)
pt3dadd(15.089, 150.889, 21.933, 0.904)
pt3dadd(15.077, 151.008, 21.921, 0.904)
pt3dadd(15.065, 151.127, 21.909, 0.904)
pt3dadd(15.053, 151.244, 21.898, 0.904)
pt3dadd(15.041, 151.363, 21.886, 0.904)
pt3dadd(15.028, 151.482, 21.874, 0.904)
pt3dadd(15.016, 151.601, 21.863, 0.904)
pt3dadd(14.996, 151.718, 21.856, 0.902)
pt3dadd(14.974, 151.836, 21.849, 0.902)
pt3dadd(14.952, 151.954, 21.843, 0.9)
pt3dadd(14.93, 152.071, 21.837, 0.898)
pt3dadd(14.908, 152.189, 21.83, 0.896)
pt3dadd(14.886, 152.306, 21.824, 0.896)
pt3dadd(14.863, 152.425, 21.817, 0.894)
pt3dadd(14.841, 152.543, 21.811, 0.892)
pt3dadd(14.819, 152.66, 21.805, 0.89)
pt3dadd(14.797, 152.778, 21.798, 0.89)
pt3dadd(14.744, 152.885, 21.798, 0.872)
pt3dadd(14.687, 152.99, 21.799, 0.852)
pt3dadd(14.629, 153.096, 21.799, 0.834)
pt3dadd(14.572, 153.2, 21.8, 0.814)
pt3dadd(14.515, 153.306, 21.8, 0.796)
pt3dadd(14.458, 153.412, 21.801, 0.776)
pt3dadd(14.4, 153.517, 21.801, 0.756)
pt3dadd(14.343, 153.623, 21.802, 0.738)
pt3dadd(14.286, 153.728, 21.802, 0.718)
pt3dadd(14.229, 153.834, 21.803, 0.7)
pt3dadd(14.172, 153.926, 21.843, 0.696)
pt3dadd(14.115, 154.018, 21.888, 0.694)
pt3dadd(14.058, 154.109, 21.932, 0.692)
pt3dadd(14.001, 154.199, 21.977, 0.69)
pt3dadd(13.944, 154.29, 22.022, 0.688)
pt3dadd(13.888, 154.381, 22.066, 0.686)
pt3dadd(13.831, 154.472, 22.111, 0.684)
pt3dadd(13.774, 154.564, 22.156, 0.682)
pt3dadd(13.717, 154.655, 22.201, 0.68)
pt3dadd(13.66, 154.746, 22.245, 0.678)
pt3dadd(13.593, 154.84, 22.272, 0.678)
pt3dadd(13.525, 154.933, 22.299, 0.678)
pt3dadd(13.457, 155.027, 22.326, 0.678)
pt3dadd(13.389, 155.12, 22.353, 0.678)
pt3dadd(13.322, 155.214, 22.38, 0.678)
pt3dadd(13.254, 155.308, 22.407, 0.678)
pt3dadd(13.186, 155.401, 22.434, 0.678)
pt3dadd(13.119, 155.495, 22.462, 0.678)
pt3dadd(13.051, 155.588, 22.489, 0.678)
pt3dadd(12.984, 155.682, 22.515, 0.678)
pt3dadd(12.937, 155.791, 22.53, 0.662)
pt3dadd(12.89, 155.9, 22.544, 0.644)
pt3dadd(12.842, 156.01, 22.559, 0.628)
pt3dadd(12.795, 156.119, 22.573, 0.612)
pt3dadd(12.748, 156.227, 22.587, 0.596)
pt3dadd(12.701, 156.336, 22.602, 0.58)
pt3dadd(12.653, 156.445, 22.616, 0.562)
pt3dadd(12.606, 156.554, 22.63, 0.546)
pt3dadd(12.559, 156.664, 22.645, 0.53)
pt3dadd(12.513, 156.773, 22.658, 0.516)
pt3dadd(12.479, 156.888, 22.662, 0.522)
pt3dadd(12.445, 157.002, 22.666, 0.528)
pt3dadd(12.411, 157.117, 22.669, 0.536)
pt3dadd(12.377, 157.232, 22.673, 0.542)
pt3dadd(12.342, 157.348, 22.677, 0.548)
pt3dadd(12.308, 157.463, 22.68, 0.554)
pt3dadd(12.274, 157.577, 22.684, 0.562)
pt3dadd(12.24, 157.692, 22.687, 0.568)
pt3dadd(12.206, 157.807, 22.691, 0.574)
pt3dadd(12.171, 157.922, 22.694, 0.58)
pt3dadd(12.13, 158.035, 22.694, 0.572)
pt3dadd(12.089, 158.148, 22.694, 0.566)
pt3dadd(12.048, 158.261, 22.694, 0.56)
pt3dadd(12.007, 158.374, 22.694, 0.552)
pt3dadd(11.966, 158.486, 22.694, 0.546)
pt3dadd(11.925, 158.599, 22.694, 0.54)
pt3dadd(11.885, 158.712, 22.694, 0.532)
pt3dadd(11.844, 158.825, 22.694, 0.526)
pt3dadd(11.803, 158.938, 22.694, 0.52)
pt3dadd(11.76, 159.049, 22.694, 0.51)
pt3dadd(11.709, 159.158, 22.694, 0.484)
pt3dadd(11.658, 159.266, 22.694, 0.458)
pt3dadd(11.607, 159.376, 22.694, 0.432)
pt3dadd(11.556, 159.484, 22.694, 0.406)
pt3dadd(11.505, 159.593, 22.694, 0.38)
pt3dadd(11.454, 159.701, 22.694, 0.354)
pt3dadd(11.404, 159.81, 22.694, 0.33)
pt3dadd(11.353, 159.918, 22.694, 0.304)
pt3dadd(11.302, 160.027, 22.694, 0.278)
pt3dadd(11.252, 160.136, 22.694, 0.26)
pt3dadd(11.208, 160.248, 22.694, 0.278)
pt3dadd(11.165, 160.36, 22.695, 0.296)
pt3dadd(11.121, 160.471, 22.695, 0.314)
pt3dadd(11.077, 160.584, 22.695, 0.33)
pt3dadd(11.034, 160.696, 22.695, 0.348)
pt3dadd(10.99, 160.807, 22.695, 0.366)
pt3dadd(10.946, 160.919, 22.695, 0.384)
pt3dadd(10.902, 161.03, 22.695, 0.402)
pt3dadd(10.859, 161.142, 22.695, 0.42)
pt3dadd(10.812, 161.252, 22.695, 0.434)
pt3dadd(10.754, 161.358, 22.695, 0.42)
pt3dadd(10.695, 161.462, 22.695, 0.406)
}
}
proc shape3d_79() {
apic[26] { pt3dadd(10.637, 161.567, 22.695, 0.392)
pt3dadd(10.578, 161.671, 22.695, 0.38)
pt3dadd(10.519, 161.777, 22.695, 0.366)
pt3dadd(10.461, 161.881, 22.695, 0.352)
pt3dadd(10.402, 161.986, 22.695, 0.338)
pt3dadd(10.344, 162.09, 22.695, 0.326)
pt3dadd(10.285, 162.196, 22.695, 0.312)
pt3dadd(10.228, 162.301, 22.695, 0.3)
pt3dadd(10.179, 162.41, 22.695, 0.292)
pt3dadd(10.129, 162.52, 22.696, 0.284)
pt3dadd(10.08, 162.629, 22.696, 0.276)
pt3dadd(10.03, 162.738, 22.696, 0.27)
pt3dadd(9.981, 162.847, 22.696, 0.262)
pt3dadd(9.932, 162.956, 22.696, 0.254)
pt3dadd(9.882, 163.067, 22.696, 0.246)
pt3dadd(9.833, 163.176, 22.696, 0.24)
pt3dadd(9.783, 163.285, 22.696, 0.232)
pt3dadd(9.735, 163.394, 22.696, 0.226)
pt3dadd(9.691, 163.506, 22.697, 0.226)
pt3dadd(9.646, 163.618, 22.697, 0.226)
pt3dadd(9.602, 163.729, 22.697, 0.226)
pt3dadd(9.557, 163.841, 22.697, 0.226)
pt3dadd(9.513, 163.952, 22.697, 0.226)
pt3dadd(9.468, 164.064, 22.698, 0.226)
pt3dadd(9.424, 164.176, 22.698, 0.226)
pt3dadd(9.379, 164.286, 22.698, 0.226)
pt3dadd(9.335, 164.398, 22.698, 0.226)
pt3dadd(9.288, 164.508, 22.698, 0.226)
pt3dadd(9.235, 164.616, 22.699, 0.226)
pt3dadd(9.182, 164.723, 22.699, 0.226)
pt3dadd(9.128, 164.831, 22.699, 0.226)
pt3dadd(9.075, 164.939, 22.7, 0.226)
pt3dadd(9.021, 165.046, 22.7, 0.226)
pt3dadd(8.968, 165.154, 22.7, 0.226)
pt3dadd(8.914, 165.26, 22.701, 0.226)
pt3dadd(8.861, 165.368, 22.701, 0.226)
pt3dadd(8.808, 165.475, 22.701, 0.226)
pt3dadd(8.761, 165.586, 22.701, 0.226)
pt3dadd(8.735, 165.702, 22.702, 0.226)
pt3dadd(8.71, 165.82, 22.703, 0.226)
pt3dadd(8.684, 165.937, 22.704, 0.226)
pt3dadd(8.658, 166.055, 22.704, 0.226)
pt3dadd(8.633, 166.171, 22.705, 0.226)
pt3dadd(8.607, 166.289, 22.705, 0.226)
pt3dadd(8.581, 166.406, 22.706, 0.226)
pt3dadd(8.556, 166.523, 22.707, 0.226)
pt3dadd(8.53, 166.64, 22.708, 0.226)
pt3dadd(8.508, 166.758, 22.708, 0.23)
pt3dadd(8.499, 166.878, 22.71, 0.244)
pt3dadd(8.49, 166.998, 22.711, 0.26)
pt3dadd(8.481, 167.117, 22.712, 0.276)
pt3dadd(8.472, 167.237, 22.714, 0.292)
pt3dadd(8.463, 167.357, 22.715, 0.306)
pt3dadd(8.454, 167.476, 22.717, 0.322)
pt3dadd(8.445, 167.596, 22.718, 0.336)
pt3dadd(8.436, 167.716, 22.719, 0.352)
pt3dadd(8.427, 167.834, 22.721, 0.368)
pt3dadd(8.422, 167.954, 22.722, 0.384)
pt3dadd(8.43, 168.074, 22.725, 0.404)
pt3dadd(8.437, 168.194, 22.728, 0.422)
pt3dadd(8.444, 168.314, 22.73, 0.442)
pt3dadd(8.451, 168.433, 22.733, 0.462)
pt3dadd(8.458, 168.553, 22.735, 0.48)
pt3dadd(8.466, 168.673, 22.738, 0.5)
pt3dadd(8.473, 168.793, 22.74, 0.518)
pt3dadd(8.48, 168.912, 22.743, 0.538)
pt3dadd(8.487, 169.032, 22.745, 0.558)
pt3dadd(8.501, 169.151, 22.749, 0.572)
pt3dadd(8.529, 169.267, 22.753, 0.574)
pt3dadd(8.558, 169.384, 22.758, 0.578)
pt3dadd(8.586, 169.5, 22.763, 0.58)
pt3dadd(8.615, 169.616, 22.768, 0.584)
pt3dadd(8.643, 169.733, 22.773, 0.586)
pt3dadd(8.672, 169.849, 22.778, 0.588)
pt3dadd(8.7, 169.966, 22.783, 0.592)
pt3dadd(8.729, 170.082, 22.788, 0.594)
pt3dadd(8.757, 170.198, 22.793, 0.598)
pt3dadd(8.791, 170.314, 22.799, 0.594)
pt3dadd(8.834, 170.425, 22.807, 0.584)
pt3dadd(8.877, 170.537, 22.815, 0.572)
pt3dadd(8.921, 170.648, 22.823, 0.56)
pt3dadd(8.964, 170.76, 22.832, 0.548)
pt3dadd(9.007, 170.872, 22.84, 0.538)
pt3dadd(9.05, 170.983, 22.848, 0.526)
pt3dadd(9.093, 171.095, 22.856, 0.514)
pt3dadd(9.136, 171.206, 22.864, 0.502)
pt3dadd(9.179, 171.318, 22.872, 0.492)
pt3dadd(9.218, 171.431, 22.882, 0.492)
pt3dadd(9.249, 171.545, 22.895, 0.51)
pt3dadd(9.28, 171.66, 22.907, 0.53)
pt3dadd(9.311, 171.775, 22.92, 0.548)
pt3dadd(9.343, 171.889, 22.933, 0.568)
pt3dadd(9.374, 172.004, 22.945, 0.586)
pt3dadd(9.405, 172.12, 22.958, 0.604)
pt3dadd(9.436, 172.235, 22.971, 0.624)
pt3dadd(9.467, 172.349, 22.984, 0.642)
pt3dadd(9.499, 172.464, 22.996, 0.66)
pt3dadd(9.524, 172.577, 23.02, 0.678)
pt3dadd(9.542, 172.686, 23.059, 0.696)
pt3dadd(9.56, 172.794, 23.098, 0.716)
pt3dadd(9.578, 172.903, 23.137, 0.732)
pt3dadd(9.596, 173.012, 23.176, 0.75)
pt3dadd(9.614, 173.122, 23.216, 0.77)
pt3dadd(9.632, 173.231, 23.255, 0.786)
pt3dadd(9.65, 173.339, 23.294, 0.806)
pt3dadd(9.668, 173.448, 23.333, 0.824)
pt3dadd(9.686, 173.557, 23.372, 0.84)
pt3dadd(9.702, 173.668, 23.41, 0.842)
pt3dadd(9.715, 173.779, 23.444, 0.82)
pt3dadd(9.729, 173.891, 23.479, 0.798)
pt3dadd(9.743, 174.002, 23.513, 0.774)
pt3dadd(9.756, 174.114, 23.548, 0.752)
pt3dadd(9.77, 174.226, 23.582, 0.73)
pt3dadd(9.784, 174.338, 23.617, 0.708)
pt3dadd(9.798, 174.45, 23.651, 0.686)
pt3dadd(9.811, 174.562, 23.686, 0.662)
pt3dadd(9.825, 174.673, 23.72, 0.64)
pt3dadd(9.841, 174.786, 23.752, 0.614)
pt3dadd(9.86, 174.899, 23.78, 0.586)
pt3dadd(9.88, 175.013, 23.809, 0.556)
pt3dadd(9.899, 175.127, 23.837, 0.528)
pt3dadd(9.918, 175.24, 23.865, 0.498)
pt3dadd(9.937, 175.354, 23.893, 0.47)
pt3dadd(9.957, 175.466, 23.921, 0.44)
pt3dadd(9.976, 175.58, 23.949, 0.41)
pt3dadd(9.995, 175.694, 23.977, 0.382)
pt3dadd(10.014, 175.807, 24.005, 0.352)
pt3dadd(10.047, 175.915, 24.037, 0.332)
pt3dadd(10.095, 176.017, 24.073, 0.32)
pt3dadd(10.143, 176.118, 24.108, 0.308)
pt3dadd(10.192, 176.219, 24.143, 0.298)
pt3dadd(10.24, 176.321, 24.179, 0.286)
pt3dadd(10.288, 176.422, 24.214, 0.274)
pt3dadd(10.337, 176.524, 24.25, 0.262)
pt3dadd(10.385, 176.624, 24.285, 0.252)
pt3dadd(10.433, 176.725, 24.321, 0.24)
pt3dadd(10.482, 176.827, 24.356, 0.228)
pt3dadd(10.552, 176.912, 24.393, 0.24)
pt3dadd(10.628, 176.994, 24.43, 0.256)
pt3dadd(10.704, 177.076, 24.467, 0.274)
pt3dadd(10.78, 177.157, 24.504, 0.29)
pt3dadd(10.856, 177.239, 24.541, 0.308)
pt3dadd(10.931, 177.32, 24.578, 0.324)
pt3dadd(11.007, 177.403, 24.615, 0.342)
pt3dadd(11.083, 177.485, 24.652, 0.36)
pt3dadd(11.159, 177.566, 24.688, 0.376)
pt3dadd(11.235, 177.648, 24.725, 0.394)
pt3dadd(11.308, 177.738, 24.749, 0.416)
pt3dadd(11.381, 177.83, 24.771, 0.44)
pt3dadd(11.454, 177.922, 24.792, 0.462)
pt3dadd(11.527, 178.014, 24.813, 0.486)
pt3dadd(11.6, 178.105, 24.835, 0.51)
pt3dadd(11.673, 178.198, 24.856, 0.532)
pt3dadd(11.745, 178.289, 24.877, 0.556)
pt3dadd(11.818, 178.381, 24.899, 0.58)
pt3dadd(11.891, 178.472, 24.92, 0.604)
pt3dadd(11.964, 178.565, 24.941, 0.626)
pt3dadd(12.012, 178.674, 24.952, 0.61)
pt3dadd(12.061, 178.783, 24.962, 0.592)
pt3dadd(12.109, 178.892, 24.972, 0.574)
pt3dadd(12.158, 179.002, 24.982, 0.556)
pt3dadd(12.206, 179.11, 24.992, 0.54)
pt3dadd(12.255, 179.219, 25.002, 0.522)
pt3dadd(12.303, 179.328, 25.012, 0.504)
pt3dadd(12.352, 179.437, 25.022, 0.488)
pt3dadd(12.4, 179.546, 25.032, 0.47)
pt3dadd(12.449, 179.656, 25.043, 0.452)
}
dend_0[3] {pt3dclear()
pt3dadd(18.085, 102.157, 21.52, 11.526)
pt3dadd(18.017, 102.089, 21.52, 11.406)
pt3dadd(17.932, 102.004, 21.52, 11.256)
pt3dadd(17.847, 101.919, 21.52, 11.106)
pt3dadd(17.762, 101.834, 21.52, 10.956)
pt3dadd(17.677, 101.75, 21.52, 10.808)
pt3dadd(17.592, 101.665, 21.52, 10.658)
pt3dadd(17.507, 101.58, 21.52, 10.508)
pt3dadd(17.422, 101.495, 21.52, 10.358)
pt3dadd(17.338, 101.41, 21.52, 10.208)
pt3dadd(17.253, 101.325, 21.52, 10.058)
pt3dadd(17.168, 101.241, 21.52, 9.908)
pt3dadd(17.099, 101.152, 21.551, 9.742)
pt3dadd(17.034, 101.063, 21.591, 9.572)
pt3dadd(16.969, 100.974, 21.631, 9.4)
pt3dadd(16.904, 100.885, 21.67, 9.23)
pt3dadd(16.839, 100.797, 21.71, 9.058)
pt3dadd(16.774, 100.707, 21.75, 8.888)
pt3dadd(16.709, 100.619, 21.789, 8.716)
pt3dadd(16.644, 100.53, 21.829, 8.546)
pt3dadd(16.579, 100.441, 21.868, 8.374)
pt3dadd(16.557, 100.371, 21.948, 8.222)
pt3dadd(16.535, 100.301, 22.027, 8.072)
pt3dadd(16.513, 100.231, 22.106, 7.92)
pt3dadd(16.491, 100.161, 22.185, 7.768)
pt3dadd(16.469, 100.091, 22.265, 7.618)
pt3dadd(16.447, 100.021, 22.344, 7.466)
pt3dadd(16.425, 99.952, 22.423, 7.314)
pt3dadd(16.404, 99.882, 22.502, 7.164)
pt3dadd(16.382, 99.812, 22.582, 7.012)
pt3dadd(16.36, 99.742, 22.661, 6.86)
}
dend_0[4] {pt3dclear()
pt3dadd(16.36, 99.742, 22.661, 6.86)
pt3dadd(16.403, 99.798, 22.615, 7.078)
}
}
proc shape3d_80() {
dend_0[4] { pt3dadd(16.461, 99.874, 22.554, 7.37)
pt3dadd(16.519, 99.949, 22.493, 7.66)
}
dend_0[5] {pt3dclear()
pt3dadd(16.519, 99.949, 22.493, 7.66)
pt3dadd(16.443, 99.886, 22.523, 7.454)
pt3dadd(16.356, 99.814, 22.558, 7.22)
pt3dadd(16.269, 99.743, 22.592, 6.984)
pt3dadd(16.182, 99.671, 22.626, 6.75)
pt3dadd(16.095, 99.599, 22.661, 6.514)
pt3dadd(16.008, 99.528, 22.695, 6.28)
pt3dadd(15.921, 99.456, 22.729, 6.046)
pt3dadd(15.834, 99.384, 22.764, 5.81)
pt3dadd(15.747, 99.313, 22.798, 5.576)
pt3dadd(15.66, 99.241, 22.833, 5.34)
pt3dadd(15.594, 99.155, 22.875, 5.194)
pt3dadd(15.532, 99.067, 22.918, 5.058)
pt3dadd(15.47, 98.978, 22.962, 4.922)
pt3dadd(15.408, 98.89, 23.005, 4.786)
pt3dadd(15.345, 98.802, 23.049, 4.65)
pt3dadd(15.283, 98.713, 23.092, 4.516)
pt3dadd(15.221, 98.625, 23.136, 4.38)
pt3dadd(15.159, 98.537, 23.179, 4.244)
pt3dadd(15.096, 98.448, 23.223, 4.108)
pt3dadd(15.034, 98.36, 23.266, 3.972)
pt3dadd(14.967, 98.268, 23.299, 3.86)
pt3dadd(14.899, 98.177, 23.33, 3.75)
pt3dadd(14.832, 98.085, 23.361, 3.642)
pt3dadd(14.764, 97.993, 23.392, 3.532)
pt3dadd(14.697, 97.901, 23.423, 3.422)
pt3dadd(14.629, 97.809, 23.454, 3.312)
}
dend_7 {pt3dclear()
pt3dadd(14.629, 97.809, 23.454, 3.312)
pt3dadd(14.561, 97.717, 23.485, 3.204)
pt3dadd(14.494, 97.625, 23.516, 3.094)
pt3dadd(14.426, 97.533, 23.547, 2.984)
pt3dadd(14.358, 97.442, 23.578, 2.874)
pt3dadd(14.286, 97.349, 23.598, 2.786)
pt3dadd(14.213, 97.257, 23.618, 2.696)
pt3dadd(14.14, 97.164, 23.638, 2.608)
pt3dadd(14.068, 97.072, 23.658, 2.518)
pt3dadd(13.995, 96.98, 23.678, 2.43)
pt3dadd(13.922, 96.887, 23.698, 2.34)
pt3dadd(13.849, 96.795, 23.718, 2.25)
pt3dadd(13.776, 96.703, 23.738, 2.162)
pt3dadd(13.704, 96.61, 23.758, 2.072)
pt3dadd(13.631, 96.518, 23.777, 1.984)
pt3dadd(13.549, 96.431, 23.788, 1.924)
pt3dadd(13.467, 96.344, 23.799, 1.866)
pt3dadd(13.386, 96.257, 23.81, 1.806)
pt3dadd(13.304, 96.171, 23.82, 1.746)
pt3dadd(13.222, 96.084, 23.831, 1.688)
pt3dadd(13.14, 95.997, 23.842, 1.628)
pt3dadd(13.058, 95.91, 23.853, 1.57)
pt3dadd(12.976, 95.823, 23.863, 1.51)
pt3dadd(12.894, 95.737, 23.874, 1.452)
pt3dadd(12.812, 95.65, 23.885, 1.392)
pt3dadd(12.726, 95.567, 23.893, 1.39)
pt3dadd(12.639, 95.485, 23.9, 1.388)
pt3dadd(12.552, 95.403, 23.908, 1.386)
pt3dadd(12.465, 95.32, 23.916, 1.384)
pt3dadd(12.379, 95.238, 23.924, 1.382)
pt3dadd(12.292, 95.156, 23.931, 1.38)
pt3dadd(12.205, 95.073, 23.939, 1.378)
pt3dadd(12.118, 94.991, 23.947, 1.376)
pt3dadd(12.031, 94.909, 23.954, 1.374)
pt3dadd(11.945, 94.826, 23.962, 1.372)
pt3dadd(11.854, 94.748, 23.967, 1.416)
pt3dadd(11.764, 94.669, 23.973, 1.46)
pt3dadd(11.673, 94.59, 23.978, 1.504)
pt3dadd(11.583, 94.512, 23.983, 1.546)
pt3dadd(11.492, 94.433, 23.989, 1.59)
pt3dadd(11.402, 94.355, 23.994, 1.634)
pt3dadd(11.311, 94.276, 23.999, 1.678)
pt3dadd(11.221, 94.198, 24.004, 1.72)
pt3dadd(11.13, 94.119, 24.01, 1.764)
pt3dadd(11.04, 94.04, 24.015, 1.808)
}
dend_7[1] {pt3dclear()
pt3dadd(11.04, 94.04, 24.015, 1.808)
pt3dadd(11.021, 94.027, 24.017, 1.794)
pt3dadd(10.926, 93.955, 24.026, 1.716)
pt3dadd(10.83, 93.884, 24.035, 1.64)
pt3dadd(10.734, 93.813, 24.045, 1.562)
pt3dadd(10.638, 93.741, 24.054, 1.486)
pt3dadd(10.542, 93.67, 24.063, 1.408)
pt3dadd(10.446, 93.599, 24.073, 1.332)
pt3dadd(10.35, 93.527, 24.082, 1.254)
pt3dadd(10.255, 93.456, 24.091, 1.178)
pt3dadd(10.159, 93.385, 24.101, 1.102)
pt3dadd(10.063, 93.313, 24.11, 1.024)
pt3dadd(9.967, 93.242, 24.119, 0.948)
pt3dadd(9.871, 93.171, 24.128, 0.87)
pt3dadd(9.775, 93.099, 24.138, 0.794)
pt3dadd(9.679, 93.028, 24.147, 0.718)
pt3dadd(9.574, 92.988, 24.179, 0.722)
pt3dadd(9.468, 92.951, 24.214, 0.734)
pt3dadd(9.361, 92.915, 24.248, 0.748)
pt3dadd(9.255, 92.878, 24.283, 0.762)
pt3dadd(9.148, 92.841, 24.318, 0.774)
pt3dadd(9.042, 92.805, 24.352, 0.788)
pt3dadd(8.935, 92.768, 24.387, 0.802)
pt3dadd(8.829, 92.731, 24.421, 0.814)
pt3dadd(8.722, 92.695, 24.456, 0.828)
pt3dadd(8.616, 92.658, 24.491, 0.84)
pt3dadd(8.502, 92.641, 24.519, 0.848)
pt3dadd(8.389, 92.625, 24.548, 0.854)
pt3dadd(8.275, 92.609, 24.576, 0.86)
pt3dadd(8.161, 92.593, 24.605, 0.866)
pt3dadd(8.047, 92.577, 24.633, 0.872)
pt3dadd(7.933, 92.561, 24.662, 0.88)
pt3dadd(7.819, 92.546, 24.69, 0.886)
pt3dadd(7.705, 92.53, 24.719, 0.892)
pt3dadd(7.591, 92.514, 24.747, 0.898)
pt3dadd(7.477, 92.499, 24.775, 0.904)
pt3dadd(7.359, 92.502, 24.794, 0.896)
pt3dadd(7.241, 92.505, 24.812, 0.888)
pt3dadd(7.123, 92.508, 24.831, 0.88)
pt3dadd(7.005, 92.512, 24.849, 0.872)
pt3dadd(6.888, 92.515, 24.868, 0.864)
pt3dadd(6.77, 92.518, 24.886, 0.854)
pt3dadd(6.652, 92.522, 24.905, 0.846)
pt3dadd(6.534, 92.525, 24.923, 0.838)
pt3dadd(6.416, 92.528, 24.942, 0.83)
pt3dadd(6.298, 92.533, 24.96, 0.822)
pt3dadd(6.18, 92.555, 24.968, 0.812)
pt3dadd(6.063, 92.576, 24.976, 0.802)
pt3dadd(5.945, 92.598, 24.985, 0.792)
pt3dadd(5.828, 92.619, 24.993, 0.78)
pt3dadd(5.71, 92.64, 25.002, 0.77)
pt3dadd(5.592, 92.662, 25.01, 0.76)
pt3dadd(5.475, 92.684, 25.019, 0.75)
pt3dadd(5.357, 92.705, 25.027, 0.74)
pt3dadd(5.239, 92.727, 25.035, 0.73)
pt3dadd(5.123, 92.751, 25.043, 0.722)
pt3dadd(5.012, 92.796, 25.043, 0.74)
pt3dadd(4.9, 92.841, 25.043, 0.758)
pt3dadd(4.789, 92.886, 25.043, 0.776)
pt3dadd(4.678, 92.931, 25.043, 0.794)
pt3dadd(4.567, 92.976, 25.043, 0.812)
pt3dadd(4.455, 93.021, 25.043, 0.83)
pt3dadd(4.344, 93.066, 25.043, 0.848)
pt3dadd(4.233, 93.111, 25.043, 0.866)
pt3dadd(4.122, 93.156, 25.043, 0.884)
pt3dadd(4.01, 93.199, 25.043, 0.896)
pt3dadd(3.893, 93.229, 25.043, 0.878)
pt3dadd(3.777, 93.259, 25.043, 0.862)
pt3dadd(3.661, 93.289, 25.043, 0.844)
pt3dadd(3.545, 93.319, 25.043, 0.826)
pt3dadd(3.429, 93.349, 25.043, 0.808)
pt3dadd(3.312, 93.379, 25.043, 0.79)
pt3dadd(3.196, 93.409, 25.043, 0.774)
pt3dadd(3.08, 93.439, 25.043, 0.756)
pt3dadd(2.964, 93.469, 25.043, 0.738)
pt3dadd(2.847, 93.498, 25.043, 0.722)
pt3dadd(2.729, 93.516, 25.043, 0.718)
pt3dadd(2.61, 93.535, 25.043, 0.714)
pt3dadd(2.492, 93.554, 25.043, 0.708)
pt3dadd(2.373, 93.573, 25.043, 0.704)
pt3dadd(2.255, 93.592, 25.043, 0.7)
pt3dadd(2.136, 93.61, 25.043, 0.696)
pt3dadd(2.018, 93.629, 25.043, 0.69)
pt3dadd(1.899, 93.648, 25.043, 0.686)
pt3dadd(1.781, 93.667, 25.043, 0.682)
pt3dadd(1.662, 93.684, 25.043, 0.676)
pt3dadd(1.542, 93.693, 25.043, 0.666)
pt3dadd(1.423, 93.702, 25.043, 0.654)
pt3dadd(1.303, 93.711, 25.043, 0.642)
pt3dadd(1.183, 93.719, 25.043, 0.632)
pt3dadd(1.064, 93.728, 25.043, 0.62)
pt3dadd(0.944, 93.737, 25.043, 0.61)
pt3dadd(0.824, 93.746, 25.043, 0.598)
pt3dadd(0.705, 93.755, 25.043, 0.588)
pt3dadd(0.585, 93.764, 25.043, 0.576)
pt3dadd(0.465, 93.772, 25.043, 0.568)
pt3dadd(0.345, 93.779, 25.043, 0.572)
pt3dadd(0.226, 93.786, 25.043, 0.576)
pt3dadd(0.106, 93.792, 25.043, 0.58)
pt3dadd(-0.014, 93.799, 25.043, 0.584)
pt3dadd(-0.134, 93.805, 25.043, 0.588)
pt3dadd(-0.254, 93.812, 25.043, 0.59)
pt3dadd(-0.373, 93.818, 25.043, 0.594)
pt3dadd(-0.493, 93.825, 25.043, 0.598)
pt3dadd(-0.613, 93.831, 25.043, 0.602)
pt3dadd(-0.733, 93.839, 25.043, 0.612)
pt3dadd(-0.852, 93.851, 25.044, 0.646)
pt3dadd(-0.972, 93.862, 25.044, 0.68)
pt3dadd(-1.091, 93.874, 25.044, 0.714)
pt3dadd(-1.211, 93.886, 25.044, 0.748)
pt3dadd(-1.33, 93.897, 25.044, 0.782)
pt3dadd(-1.449, 93.909, 25.044, 0.816)
pt3dadd(-1.569, 93.921, 25.044, 0.85)
pt3dadd(-1.688, 93.932, 25.044, 0.884)
pt3dadd(-1.808, 93.944, 25.044, 0.918)
pt3dadd(-1.927, 93.957, 25.044, 0.95)
pt3dadd(-2.046, 93.975, 25.045, 0.966)
pt3dadd(-2.164, 93.994, 25.045, 0.982)
pt3dadd(-2.283, 94.012, 25.045, 0.998)
pt3dadd(-2.401, 94.031, 25.045, 1.014)
pt3dadd(-2.52, 94.049, 25.045, 1.03)
pt3dadd(-2.638, 94.067, 25.045, 1.046)
pt3dadd(-2.757, 94.086, 25.045, 1.062)
pt3dadd(-2.876, 94.104, 25.045, 1.078)
pt3dadd(-2.994, 94.123, 25.046, 1.094)
pt3dadd(-3.111, 94.148, 25.046, 1.092)
}
}
proc shape3d_81() {
dend_7[1] { pt3dadd(-3.219, 94.199, 25.046, 1.022)
pt3dadd(-3.328, 94.25, 25.046, 0.952)
pt3dadd(-3.436, 94.301, 25.047, 0.882)
pt3dadd(-3.545, 94.352, 25.047, 0.814)
pt3dadd(-3.654, 94.403, 25.047, 0.744)
pt3dadd(-3.762, 94.454, 25.047, 0.674)
pt3dadd(-3.871, 94.506, 25.048, 0.604)
pt3dadd(-3.979, 94.557, 25.048, 0.534)
pt3dadd(-4.088, 94.608, 25.048, 0.466)
pt3dadd(-4.197, 94.657, 25.049, 0.41)
pt3dadd(-4.309, 94.701, 25.049, 0.42)
pt3dadd(-4.421, 94.745, 25.049, 0.428)
pt3dadd(-4.532, 94.788, 25.05, 0.436)
pt3dadd(-4.644, 94.832, 25.051, 0.444)
pt3dadd(-4.756, 94.876, 25.051, 0.452)
pt3dadd(-4.868, 94.919, 25.052, 0.462)
pt3dadd(-4.979, 94.963, 25.052, 0.47)
pt3dadd(-5.091, 95.007, 25.053, 0.478)
pt3dadd(-5.203, 95.05, 25.053, 0.486)
pt3dadd(-5.314, 95.095, 25.054, 0.5)
pt3dadd(-5.424, 95.143, 25.055, 0.536)
pt3dadd(-5.535, 95.19, 25.056, 0.57)
pt3dadd(-5.645, 95.238, 25.056, 0.606)
pt3dadd(-5.755, 95.286, 25.057, 0.642)
pt3dadd(-5.865, 95.334, 25.058, 0.676)
pt3dadd(-5.975, 95.382, 25.059, 0.712)
pt3dadd(-6.085, 95.429, 25.06, 0.748)
pt3dadd(-6.195, 95.477, 25.061, 0.782)
pt3dadd(-6.305, 95.525, 25.062, 0.818)
pt3dadd(-6.415, 95.573, 25.063, 0.852)
pt3dadd(-6.524, 95.624, 25.065, 0.876)
pt3dadd(-6.633, 95.674, 25.066, 0.902)
pt3dadd(-6.741, 95.725, 25.068, 0.928)
pt3dadd(-6.85, 95.775, 25.069, 0.952)
pt3dadd(-6.959, 95.826, 25.071, 0.978)
pt3dadd(-7.068, 95.876, 25.072, 1.004)
pt3dadd(-7.177, 95.926, 25.074, 1.028)
pt3dadd(-7.286, 95.977, 25.075, 1.054)
pt3dadd(-7.395, 96.027, 25.077, 1.08)
pt3dadd(-7.506, 96.072, 25.079, 1.094)
pt3dadd(-7.622, 96.101, 25.082, 1.074)
pt3dadd(-7.738, 96.129, 25.084, 1.056)
pt3dadd(-7.855, 96.158, 25.087, 1.038)
pt3dadd(-7.971, 96.187, 25.09, 1.018)
pt3dadd(-8.088, 96.216, 25.093, 1)
pt3dadd(-8.204, 96.244, 25.096, 0.982)
pt3dadd(-8.321, 96.273, 25.098, 0.962)
pt3dadd(-8.437, 96.302, 25.101, 0.944)
pt3dadd(-8.554, 96.331, 25.104, 0.926)
pt3dadd(-8.671, 96.355, 25.108, 0.912)
pt3dadd(-8.79, 96.369, 25.115, 0.91)
pt3dadd(-8.909, 96.383, 25.121, 0.91)
pt3dadd(-9.028, 96.397, 25.128, 0.91)
pt3dadd(-9.147, 96.411, 25.135, 0.908)
pt3dadd(-9.265, 96.424, 25.142, 0.908)
pt3dadd(-9.384, 96.438, 25.149, 0.906)
pt3dadd(-9.503, 96.452, 25.156, 0.906)
pt3dadd(-9.622, 96.466, 25.162, 0.906)
pt3dadd(-9.741, 96.479, 25.169, 0.904)
pt3dadd(-9.86, 96.49, 25.177, 0.9)
pt3dadd(-9.979, 96.493, 25.188, 0.886)
pt3dadd(-10.099, 96.496, 25.198, 0.87)
pt3dadd(-10.218, 96.499, 25.209, 0.856)
pt3dadd(-10.337, 96.501, 25.22, 0.84)
pt3dadd(-10.457, 96.504, 25.23, 0.826)
pt3dadd(-10.576, 96.507, 25.241, 0.81)
pt3dadd(-10.695, 96.51, 25.251, 0.796)
pt3dadd(-10.815, 96.513, 25.262, 0.782)
pt3dadd(-10.934, 96.516, 25.273, 0.766)
pt3dadd(-11.052, 96.517, 25.288, 0.75)
pt3dadd(-11.167, 96.517, 25.315, 0.732)
pt3dadd(-11.283, 96.517, 25.342, 0.714)
pt3dadd(-11.398, 96.517, 25.369, 0.694)
pt3dadd(-11.514, 96.516, 25.396, 0.676)
pt3dadd(-11.629, 96.516, 25.424, 0.658)
pt3dadd(-11.745, 96.516, 25.451, 0.64)
pt3dadd(-11.86, 96.515, 25.478, 0.62)
pt3dadd(-11.976, 96.515, 25.505, 0.602)
pt3dadd(-12.091, 96.515, 25.532, 0.584)
pt3dadd(-12.206, 96.514, 25.561, 0.57)
pt3dadd(-12.319, 96.514, 25.595, 0.564)
pt3dadd(-12.433, 96.513, 25.628, 0.558)
pt3dadd(-12.546, 96.513, 25.661, 0.552)
pt3dadd(-12.659, 96.513, 25.694, 0.546)
pt3dadd(-12.772, 96.512, 25.727, 0.54)
pt3dadd(-12.885, 96.511, 25.76, 0.534)
pt3dadd(-12.999, 96.511, 25.793, 0.53)
pt3dadd(-13.112, 96.51, 25.826, 0.524)
pt3dadd(-13.225, 96.51, 25.86, 0.518)
pt3dadd(-13.34, 96.509, 25.889, 0.52)
pt3dadd(-13.457, 96.508, 25.911, 0.536)
pt3dadd(-13.573, 96.507, 25.934, 0.554)
pt3dadd(-13.69, 96.506, 25.957, 0.57)
pt3dadd(-13.807, 96.505, 25.98, 0.586)
pt3dadd(-13.924, 96.504, 26.003, 0.602)
pt3dadd(-14.041, 96.504, 26.026, 0.618)
pt3dadd(-14.157, 96.503, 26.048, 0.636)
pt3dadd(-14.274, 96.502, 26.071, 0.652)
pt3dadd(-14.391, 96.501, 26.094, 0.668)
pt3dadd(-14.509, 96.499, 26.113, 0.678)
pt3dadd(-14.628, 96.498, 26.124, 0.678)
pt3dadd(-14.747, 96.496, 26.136, 0.678)
pt3dadd(-14.866, 96.494, 26.148, 0.678)
pt3dadd(-14.985, 96.492, 26.16, 0.678)
pt3dadd(-15.105, 96.49, 26.172, 0.678)
pt3dadd(-15.224, 96.488, 26.183, 0.678)
pt3dadd(-15.343, 96.486, 26.195, 0.678)
pt3dadd(-15.462, 96.485, 26.207, 0.678)
pt3dadd(-15.581, 96.483, 26.219, 0.678)
pt3dadd(-15.701, 96.48, 26.227, 0.678)
pt3dadd(-15.821, 96.476, 26.229, 0.678)
pt3dadd(-15.941, 96.473, 26.231, 0.678)
pt3dadd(-16.06, 96.469, 26.233, 0.678)
pt3dadd(-16.18, 96.465, 26.235, 0.678)
pt3dadd(-16.3, 96.461, 26.237, 0.678)
pt3dadd(-16.42, 96.458, 26.24, 0.678)
pt3dadd(-16.54, 96.454, 26.242, 0.678)
pt3dadd(-16.66, 96.45, 26.244, 0.678)
pt3dadd(-16.78, 96.447, 26.246, 0.678)
pt3dadd(-16.9, 96.441, 26.248, 0.684)
pt3dadd(-17.019, 96.433, 26.251, 0.7)
pt3dadd(-17.139, 96.424, 26.254, 0.716)
pt3dadd(-17.259, 96.416, 26.257, 0.73)
pt3dadd(-17.378, 96.408, 26.26, 0.746)
pt3dadd(-17.498, 96.4, 26.263, 0.762)
pt3dadd(-17.618, 96.391, 26.266, 0.778)
pt3dadd(-17.737, 96.383, 26.269, 0.794)
pt3dadd(-17.857, 96.375, 26.272, 0.808)
pt3dadd(-17.977, 96.367, 26.275, 0.824)
pt3dadd(-18.096, 96.356, 26.279, 0.832)
pt3dadd(-18.215, 96.342, 26.286, 0.826)
pt3dadd(-18.334, 96.328, 26.292, 0.82)
pt3dadd(-18.453, 96.314, 26.298, 0.812)
pt3dadd(-18.572, 96.3, 26.305, 0.806)
pt3dadd(-18.691, 96.286, 26.311, 0.8)
pt3dadd(-18.81, 96.272, 26.318, 0.794)
pt3dadd(-18.929, 96.258, 26.324, 0.788)
pt3dadd(-19.047, 96.243, 26.331, 0.782)
pt3dadd(-19.166, 96.229, 26.337, 0.776)
pt3dadd(-19.283, 96.206, 26.345, 0.79)
pt3dadd(-19.397, 96.17, 26.357, 0.834)
pt3dadd(-19.51, 96.134, 26.368, 0.876)
pt3dadd(-19.624, 96.098, 26.379, 0.92)
pt3dadd(-19.738, 96.062, 26.39, 0.964)
pt3dadd(-19.851, 96.026, 26.401, 1.006)
pt3dadd(-19.965, 95.99, 26.412, 1.05)
pt3dadd(-20.079, 95.954, 26.423, 1.094)
pt3dadd(-20.192, 95.918, 26.434, 1.138)
pt3dadd(-20.306, 95.882, 26.445, 1.18)
pt3dadd(-20.414, 95.837, 26.466, 1.214)
pt3dadd(-20.517, 95.786, 26.495, 1.24)
pt3dadd(-20.619, 95.735, 26.524, 1.266)
pt3dadd(-20.722, 95.683, 26.554, 1.29)
pt3dadd(-20.825, 95.632, 26.583, 1.316)
pt3dadd(-20.928, 95.581, 26.612, 1.342)
pt3dadd(-21.03, 95.53, 26.641, 1.366)
pt3dadd(-21.133, 95.478, 26.67, 1.392)
pt3dadd(-21.236, 95.427, 26.699, 1.418)
pt3dadd(-21.338, 95.376, 26.728, 1.444)
pt3dadd(-21.437, 95.332, 26.771, 1.408)
pt3dadd(-21.534, 95.291, 26.818, 1.354)
pt3dadd(-21.632, 95.25, 26.866, 1.298)
pt3dadd(-21.729, 95.209, 26.913, 1.244)
pt3dadd(-21.827, 95.168, 26.961, 1.188)
pt3dadd(-21.924, 95.127, 27.008, 1.134)
pt3dadd(-22.022, 95.086, 27.055, 1.078)
pt3dadd(-22.119, 95.046, 27.103, 1.024)
pt3dadd(-22.216, 95.004, 27.15, 0.968)
pt3dadd(-22.314, 94.964, 27.197, 0.914)
pt3dadd(-22.419, 94.924, 27.232, 0.91)
pt3dadd(-22.526, 94.886, 27.264, 0.92)
pt3dadd(-22.633, 94.847, 27.296, 0.928)
pt3dadd(-22.739, 94.808, 27.329, 0.936)
pt3dadd(-22.846, 94.769, 27.361, 0.944)
pt3dadd(-22.953, 94.73, 27.393, 0.952)
pt3dadd(-23.06, 94.691, 27.425, 0.96)
pt3dadd(-23.166, 94.653, 27.458, 0.97)
pt3dadd(-23.273, 94.614, 27.49, 0.978)
pt3dadd(-23.38, 94.575, 27.522, 0.986)
pt3dadd(-23.487, 94.533, 27.551, 0.996)
pt3dadd(-23.594, 94.491, 27.579, 1.006)
pt3dadd(-23.701, 94.449, 27.606, 1.016)
pt3dadd(-23.809, 94.406, 27.634, 1.026)
pt3dadd(-23.916, 94.364, 27.662, 1.036)
pt3dadd(-24.023, 94.322, 27.69, 1.046)
pt3dadd(-24.13, 94.279, 27.718, 1.056)
pt3dadd(-24.237, 94.237, 27.746, 1.066)
pt3dadd(-24.344, 94.195, 27.774, 1.076)
pt3dadd(-24.452, 94.152, 27.802, 1.086)
pt3dadd(-24.559, 94.125, 27.84, 1.07)
pt3dadd(-24.667, 94.1, 27.879, 1.052)
pt3dadd(-24.774, 94.074, 27.917, 1.036)
pt3dadd(-24.882, 94.048, 27.956, 1.018)
pt3dadd(-24.99, 94.022, 27.995, 1.002)
pt3dadd(-25.097, 93.996, 28.033, 0.984)
pt3dadd(-25.205, 93.97, 28.072, 0.966)
pt3dadd(-25.313, 93.944, 28.11, 0.95)
pt3dadd(-25.42, 93.918, 28.149, 0.932)
pt3dadd(-25.528, 93.892, 28.188, 0.914)
pt3dadd(-25.641, 93.88, 28.219, 0.88)
}
}
proc shape3d_82() {
dend_7[1] { pt3dadd(-25.754, 93.868, 28.25, 0.846)
pt3dadd(-25.868, 93.856, 28.281, 0.81)
pt3dadd(-25.982, 93.844, 28.311, 0.774)
pt3dadd(-26.095, 93.832, 28.342, 0.74)
pt3dadd(-26.209, 93.82, 28.373, 0.704)
pt3dadd(-26.322, 93.809, 28.404, 0.668)
pt3dadd(-26.436, 93.797, 28.435, 0.632)
pt3dadd(-26.549, 93.785, 28.466, 0.598)
pt3dadd(-26.663, 93.773, 28.497, 0.562)
pt3dadd(-26.779, 93.771, 28.522, 0.562)
pt3dadd(-26.895, 93.77, 28.547, 0.564)
pt3dadd(-27.011, 93.77, 28.572, 0.566)
pt3dadd(-27.127, 93.769, 28.597, 0.57)
pt3dadd(-27.243, 93.768, 28.622, 0.572)
pt3dadd(-27.36, 93.767, 28.647, 0.574)
pt3dadd(-27.476, 93.766, 28.672, 0.576)
pt3dadd(-27.592, 93.765, 28.697, 0.58)
pt3dadd(-27.708, 93.764, 28.722, 0.582)
pt3dadd(-27.824, 93.763, 28.748, 0.584)
pt3dadd(-27.938, 93.769, 28.778, 0.602)
pt3dadd(-28.053, 93.774, 28.808, 0.62)
pt3dadd(-28.167, 93.78, 28.839, 0.638)
pt3dadd(-28.281, 93.786, 28.87, 0.656)
pt3dadd(-28.395, 93.791, 28.9, 0.674)
pt3dadd(-28.509, 93.797, 28.931, 0.694)
pt3dadd(-28.623, 93.803, 28.961, 0.712)
pt3dadd(-28.737, 93.808, 28.992, 0.73)
pt3dadd(-28.851, 93.814, 29.023, 0.748)
pt3dadd(-28.965, 93.82, 29.053, 0.766)
pt3dadd(-29.077, 93.829, 29.089, 0.768)
pt3dadd(-29.189, 93.838, 29.125, 0.77)
pt3dadd(-29.301, 93.847, 29.16, 0.77)
pt3dadd(-29.412, 93.856, 29.196, 0.772)
pt3dadd(-29.524, 93.865, 29.231, 0.772)
pt3dadd(-29.636, 93.875, 29.267, 0.774)
pt3dadd(-29.748, 93.884, 29.303, 0.776)
pt3dadd(-29.859, 93.893, 29.338, 0.776)
pt3dadd(-29.971, 93.902, 29.374, 0.778)
pt3dadd(-30.083, 93.911, 29.409, 0.78)
pt3dadd(-30.198, 93.925, 29.436, 0.724)
pt3dadd(-30.313, 93.938, 29.462, 0.668)
pt3dadd(-30.428, 93.952, 29.489, 0.614)
pt3dadd(-30.543, 93.965, 29.515, 0.558)
pt3dadd(-30.658, 93.979, 29.541, 0.502)
pt3dadd(-30.773, 93.992, 29.568, 0.448)
pt3dadd(-30.888, 94.006, 29.594, 0.392)
pt3dadd(-31.002, 94.02, 29.621, 0.336)
pt3dadd(-31.117, 94.033, 29.647, 0.282)
pt3dadd(-31.232, 94.047, 29.673, 0.226)
}
dend_7[2] {pt3dclear()
pt3dadd(-31.232, 94.047, 29.673, 0.226)
pt3dadd(-31.332, 94.087, 29.688, 0.274)
pt3dadd(-31.441, 94.131, 29.705, 0.326)
pt3dadd(-31.551, 94.175, 29.722, 0.38)
pt3dadd(-31.661, 94.22, 29.738, 0.432)
pt3dadd(-31.771, 94.264, 29.755, 0.484)
pt3dadd(-31.88, 94.308, 29.771, 0.538)
pt3dadd(-31.992, 94.348, 29.787, 0.574)
pt3dadd(-32.104, 94.388, 29.802, 0.612)
pt3dadd(-32.216, 94.428, 29.817, 0.648)
pt3dadd(-32.327, 94.467, 29.832, 0.684)
pt3dadd(-32.439, 94.507, 29.847, 0.722)
pt3dadd(-32.551, 94.547, 29.862, 0.758)
pt3dadd(-32.663, 94.587, 29.877, 0.794)
pt3dadd(-32.774, 94.627, 29.892, 0.832)
pt3dadd(-32.886, 94.666, 29.907, 0.868)
pt3dadd(-32.998, 94.706, 29.922, 0.904)
pt3dadd(-33.114, 94.734, 29.935, 0.904)
pt3dadd(-33.229, 94.762, 29.949, 0.904)
pt3dadd(-33.345, 94.79, 29.962, 0.904)
pt3dadd(-33.46, 94.818, 29.976, 0.904)
pt3dadd(-33.576, 94.846, 29.989, 0.904)
pt3dadd(-33.691, 94.874, 30.003, 0.904)
pt3dadd(-33.807, 94.902, 30.017, 0.904)
pt3dadd(-33.922, 94.93, 30.03, 0.904)
pt3dadd(-34.038, 94.958, 30.044, 0.904)
pt3dadd(-34.153, 94.986, 30.059, 0.904)
pt3dadd(-34.264, 95, 30.096, 0.904)
pt3dadd(-34.374, 95.013, 30.133, 0.904)
pt3dadd(-34.485, 95.027, 30.17, 0.904)
pt3dadd(-34.596, 95.041, 30.207, 0.904)
pt3dadd(-34.706, 95.055, 30.244, 0.904)
pt3dadd(-34.817, 95.069, 30.281, 0.904)
pt3dadd(-34.927, 95.083, 30.318, 0.904)
pt3dadd(-35.038, 95.097, 30.355, 0.904)
pt3dadd(-35.148, 95.111, 30.392, 0.904)
pt3dadd(-35.259, 95.124, 30.429, 0.904)
pt3dadd(-35.375, 95.13, 30.455, 0.888)
pt3dadd(-35.49, 95.135, 30.482, 0.872)
pt3dadd(-35.606, 95.141, 30.509, 0.858)
pt3dadd(-35.721, 95.146, 30.535, 0.842)
pt3dadd(-35.837, 95.152, 30.562, 0.828)
pt3dadd(-35.952, 95.157, 30.589, 0.812)
pt3dadd(-36.068, 95.162, 30.615, 0.796)
pt3dadd(-36.183, 95.168, 30.642, 0.782)
pt3dadd(-36.299, 95.173, 30.669, 0.766)
pt3dadd(-36.415, 95.179, 30.695, 0.75)
pt3dadd(-36.533, 95.186, 30.711, 0.732)
pt3dadd(-36.651, 95.192, 30.728, 0.714)
pt3dadd(-36.769, 95.199, 30.745, 0.694)
pt3dadd(-36.887, 95.205, 30.761, 0.676)
pt3dadd(-37.005, 95.212, 30.778, 0.656)
pt3dadd(-37.123, 95.219, 30.795, 0.638)
pt3dadd(-37.242, 95.226, 30.811, 0.618)
pt3dadd(-37.36, 95.232, 30.828, 0.6)
pt3dadd(-37.478, 95.239, 30.845, 0.58)
pt3dadd(-37.596, 95.246, 30.861, 0.562)
pt3dadd(-37.715, 95.257, 30.868, 0.55)
pt3dadd(-37.834, 95.268, 30.875, 0.54)
pt3dadd(-37.953, 95.28, 30.883, 0.528)
pt3dadd(-38.073, 95.291, 30.89, 0.518)
pt3dadd(-38.192, 95.302, 30.898, 0.506)
pt3dadd(-38.311, 95.313, 30.905, 0.496)
pt3dadd(-38.43, 95.324, 30.912, 0.484)
pt3dadd(-38.549, 95.336, 30.92, 0.474)
pt3dadd(-38.668, 95.347, 30.927, 0.462)
pt3dadd(-38.787, 95.359, 30.934, 0.452)
pt3dadd(-38.905, 95.381, 30.936, 0.456)
pt3dadd(-39.023, 95.403, 30.937, 0.46)
pt3dadd(-39.141, 95.426, 30.939, 0.466)
pt3dadd(-39.259, 95.448, 30.941, 0.47)
pt3dadd(-39.377, 95.47, 30.942, 0.474)
pt3dadd(-39.495, 95.492, 30.944, 0.478)
pt3dadd(-39.613, 95.514, 30.946, 0.482)
pt3dadd(-39.731, 95.536, 30.948, 0.486)
pt3dadd(-39.849, 95.558, 30.949, 0.49)
pt3dadd(-39.965, 95.584, 30.951, 0.496)
pt3dadd(-40.076, 95.631, 30.954, 0.514)
pt3dadd(-40.187, 95.676, 30.957, 0.532)
pt3dadd(-40.298, 95.722, 30.959, 0.55)
pt3dadd(-40.409, 95.768, 30.962, 0.568)
pt3dadd(-40.519, 95.814, 30.965, 0.586)
pt3dadd(-40.63, 95.86, 30.967, 0.604)
pt3dadd(-40.741, 95.906, 30.97, 0.622)
pt3dadd(-40.852, 95.952, 30.973, 0.638)
pt3dadd(-40.963, 95.998, 30.975, 0.656)
pt3dadd(-41.074, 96.042, 30.979, 0.674)
pt3dadd(-41.19, 96.074, 30.985, 0.694)
pt3dadd(-41.305, 96.107, 30.992, 0.712)
pt3dadd(-41.42, 96.139, 30.999, 0.73)
pt3dadd(-41.535, 96.171, 31.005, 0.748)
pt3dadd(-41.651, 96.204, 31.012, 0.768)
pt3dadd(-41.766, 96.236, 31.019, 0.786)
pt3dadd(-41.881, 96.268, 31.025, 0.804)
pt3dadd(-41.996, 96.301, 31.032, 0.822)
pt3dadd(-42.112, 96.333, 31.039, 0.84)
pt3dadd(-42.227, 96.364, 31.046, 0.856)
pt3dadd(-42.344, 96.388, 31.056, 0.862)
pt3dadd(-42.461, 96.412, 31.067, 0.866)
pt3dadd(-42.578, 96.436, 31.077, 0.872)
pt3dadd(-42.695, 96.46, 31.087, 0.876)
pt3dadd(-42.812, 96.485, 31.098, 0.88)
pt3dadd(-42.929, 96.509, 31.108, 0.886)
pt3dadd(-43.046, 96.533, 31.118, 0.89)
pt3dadd(-43.162, 96.557, 31.129, 0.896)
pt3dadd(-43.279, 96.581, 31.139, 0.9)
pt3dadd(-43.396, 96.604, 31.152, 0.898)
pt3dadd(-43.511, 96.621, 31.178, 0.87)
pt3dadd(-43.625, 96.638, 31.204, 0.84)
pt3dadd(-43.74, 96.655, 31.229, 0.812)
pt3dadd(-43.855, 96.672, 31.255, 0.782)
pt3dadd(-43.969, 96.689, 31.281, 0.754)
pt3dadd(-44.084, 96.706, 31.306, 0.724)
pt3dadd(-44.199, 96.723, 31.332, 0.694)
pt3dadd(-44.314, 96.74, 31.358, 0.666)
pt3dadd(-44.428, 96.757, 31.383, 0.636)
pt3dadd(-44.542, 96.775, 31.411, 0.606)
pt3dadd(-44.653, 96.797, 31.445, 0.572)
pt3dadd(-44.764, 96.818, 31.479, 0.536)
pt3dadd(-44.875, 96.84, 31.513, 0.502)
pt3dadd(-44.986, 96.861, 31.546, 0.468)
pt3dadd(-45.096, 96.883, 31.58, 0.434)
pt3dadd(-45.207, 96.904, 31.614, 0.398)
pt3dadd(-45.318, 96.926, 31.647, 0.364)
pt3dadd(-45.429, 96.947, 31.681, 0.33)
pt3dadd(-45.54, 96.969, 31.715, 0.294)
pt3dadd(-45.65, 96.999, 31.744, 0.28)
pt3dadd(-45.758, 97.042, 31.767, 0.296)
pt3dadd(-45.867, 97.086, 31.79, 0.314)
pt3dadd(-45.975, 97.13, 31.813, 0.332)
pt3dadd(-46.083, 97.174, 31.836, 0.348)
pt3dadd(-46.191, 97.218, 31.859, 0.366)
pt3dadd(-46.3, 97.261, 31.882, 0.384)
pt3dadd(-46.408, 97.305, 31.905, 0.402)
pt3dadd(-46.516, 97.349, 31.928, 0.418)
pt3dadd(-46.625, 97.393, 31.951, 0.436)
pt3dadd(-46.735, 97.431, 31.97, 0.46)
pt3dadd(-46.851, 97.461, 31.983, 0.498)
pt3dadd(-46.966, 97.491, 31.995, 0.534)
pt3dadd(-47.081, 97.521, 32.008, 0.57)
pt3dadd(-47.196, 97.551, 32.02, 0.608)
pt3dadd(-47.312, 97.581, 32.033, 0.644)
pt3dadd(-47.427, 97.611, 32.045, 0.68)
pt3dadd(-47.542, 97.64, 32.058, 0.718)
pt3dadd(-47.657, 97.67, 32.07, 0.754)
pt3dadd(-47.773, 97.7, 32.083, 0.79)
pt3dadd(-47.889, 97.726, 32.092, 0.816)
pt3dadd(-48.007, 97.744, 32.098, 0.826)
pt3dadd(-48.126, 97.763, 32.103, 0.836)
pt3dadd(-48.244, 97.782, 32.108, 0.844)
pt3dadd(-48.363, 97.8, 32.114, 0.854)
}
}
proc shape3d_83() {
dend_7[2] { pt3dadd(-48.481, 97.819, 32.119, 0.862)
pt3dadd(-48.599, 97.838, 32.124, 0.872)
pt3dadd(-48.718, 97.856, 32.129, 0.88)
pt3dadd(-48.836, 97.875, 32.135, 0.89)
pt3dadd(-48.954, 97.893, 32.14, 0.898)
pt3dadd(-49.073, 97.908, 32.145, 0.9)
pt3dadd(-49.193, 97.916, 32.151, 0.888)
pt3dadd(-49.312, 97.925, 32.157, 0.876)
pt3dadd(-49.432, 97.933, 32.163, 0.864)
pt3dadd(-49.551, 97.941, 32.168, 0.852)
pt3dadd(-49.671, 97.949, 32.174, 0.84)
pt3dadd(-49.79, 97.958, 32.18, 0.83)
pt3dadd(-49.91, 97.966, 32.186, 0.818)
pt3dadd(-50.029, 97.974, 32.191, 0.806)
pt3dadd(-50.149, 97.983, 32.197, 0.794)
pt3dadd(-50.268, 97.99, 32.205, 0.786)
pt3dadd(-50.388, 97.996, 32.215, 0.784)
pt3dadd(-50.507, 98.002, 32.225, 0.784)
pt3dadd(-50.626, 98.008, 32.235, 0.782)
pt3dadd(-50.745, 98.014, 32.245, 0.78)
pt3dadd(-50.865, 98.02, 32.255, 0.778)
pt3dadd(-50.984, 98.026, 32.265, 0.776)
pt3dadd(-51.103, 98.032, 32.275, 0.774)
pt3dadd(-51.222, 98.038, 32.285, 0.772)
pt3dadd(-51.341, 98.044, 32.295, 0.77)
pt3dadd(-51.459, 98.052, 32.311, 0.766)
pt3dadd(-51.576, 98.063, 32.334, 0.76)
pt3dadd(-51.692, 98.074, 32.358, 0.754)
pt3dadd(-51.808, 98.085, 32.381, 0.746)
pt3dadd(-51.924, 98.096, 32.405, 0.74)
pt3dadd(-52.04, 98.107, 32.428, 0.734)
pt3dadd(-52.156, 98.118, 32.452, 0.726)
pt3dadd(-52.272, 98.129, 32.475, 0.72)
pt3dadd(-52.389, 98.14, 32.499, 0.714)
pt3dadd(-52.505, 98.151, 32.522, 0.706)
pt3dadd(-52.616, 98.168, 32.555, 0.688)
pt3dadd(-52.722, 98.192, 32.597, 0.658)
pt3dadd(-52.828, 98.215, 32.639, 0.628)
pt3dadd(-52.935, 98.239, 32.681, 0.598)
pt3dadd(-53.041, 98.262, 32.723, 0.57)
pt3dadd(-53.148, 98.286, 32.765, 0.54)
pt3dadd(-53.254, 98.309, 32.807, 0.51)
pt3dadd(-53.36, 98.333, 32.848, 0.48)
pt3dadd(-53.467, 98.356, 32.89, 0.45)
pt3dadd(-53.573, 98.38, 32.932, 0.42)
pt3dadd(-53.674, 98.425, 32.968, 0.442)
pt3dadd(-53.773, 98.48, 33.002, 0.488)
pt3dadd(-53.871, 98.536, 33.035, 0.534)
pt3dadd(-53.97, 98.592, 33.068, 0.58)
pt3dadd(-54.068, 98.648, 33.101, 0.626)
pt3dadd(-54.167, 98.703, 33.135, 0.674)
pt3dadd(-54.265, 98.759, 33.168, 0.72)
pt3dadd(-54.364, 98.815, 33.201, 0.766)
pt3dadd(-54.462, 98.871, 33.234, 0.812)
pt3dadd(-54.561, 98.926, 33.268, 0.858)
pt3dadd(-54.67, 98.963, 33.292, 0.832)
pt3dadd(-54.783, 98.993, 33.314, 0.78)
pt3dadd(-54.897, 99.024, 33.335, 0.73)
pt3dadd(-55.01, 99.054, 33.357, 0.678)
pt3dadd(-55.123, 99.084, 33.378, 0.628)
pt3dadd(-55.236, 99.115, 33.4, 0.576)
pt3dadd(-55.35, 99.145, 33.422, 0.524)
pt3dadd(-55.463, 99.175, 33.443, 0.474)
pt3dadd(-55.576, 99.205, 33.465, 0.422)
pt3dadd(-55.689, 99.236, 33.486, 0.37)
pt3dadd(-55.805, 99.252, 33.509, 0.378)
pt3dadd(-55.921, 99.264, 33.532, 0.402)
pt3dadd(-56.037, 99.277, 33.555, 0.424)
pt3dadd(-56.153, 99.289, 33.578, 0.448)
pt3dadd(-56.269, 99.302, 33.601, 0.472)
pt3dadd(-56.385, 99.314, 33.623, 0.494)
pt3dadd(-56.501, 99.327, 33.646, 0.518)
pt3dadd(-56.618, 99.339, 33.669, 0.542)
pt3dadd(-56.734, 99.351, 33.692, 0.564)
pt3dadd(-56.85, 99.364, 33.715, 0.588)
pt3dadd(-56.959, 99.367, 33.755, 0.56)
pt3dadd(-57.068, 99.369, 33.798, 0.526)
pt3dadd(-57.176, 99.371, 33.841, 0.49)
pt3dadd(-57.285, 99.373, 33.884, 0.456)
pt3dadd(-57.393, 99.375, 33.926, 0.422)
pt3dadd(-57.502, 99.377, 33.969, 0.386)
pt3dadd(-57.61, 99.379, 34.012, 0.352)
pt3dadd(-57.718, 99.381, 34.055, 0.316)
pt3dadd(-57.827, 99.383, 34.097, 0.282)
pt3dadd(-57.935, 99.385, 34.14, 0.248)
pt3dadd(-58.047, 99.389, 34.176, 0.272)
pt3dadd(-58.16, 99.393, 34.211, 0.304)
pt3dadd(-58.272, 99.397, 34.246, 0.336)
pt3dadd(-58.384, 99.401, 34.281, 0.37)
pt3dadd(-58.497, 99.405, 34.316, 0.402)
pt3dadd(-58.609, 99.409, 34.351, 0.436)
pt3dadd(-58.722, 99.414, 34.386, 0.468)
pt3dadd(-58.834, 99.418, 34.42, 0.502)
pt3dadd(-58.946, 99.422, 34.455, 0.534)
pt3dadd(-59.059, 99.426, 34.49, 0.568)
pt3dadd(-59.167, 99.433, 34.532, 0.57)
pt3dadd(-59.276, 99.441, 34.575, 0.568)
pt3dadd(-59.384, 99.449, 34.618, 0.568)
pt3dadd(-59.492, 99.457, 34.66, 0.566)
pt3dadd(-59.6, 99.465, 34.703, 0.564)
pt3dadd(-59.708, 99.473, 34.746, 0.562)
pt3dadd(-59.816, 99.481, 34.789, 0.562)
pt3dadd(-59.925, 99.489, 34.832, 0.56)
pt3dadd(-60.033, 99.497, 34.874, 0.558)
pt3dadd(-60.141, 99.505, 34.917, 0.558)
pt3dadd(-60.251, 99.518, 34.956, 0.554)
pt3dadd(-60.361, 99.531, 34.994, 0.55)
pt3dadd(-60.471, 99.544, 35.033, 0.548)
pt3dadd(-60.581, 99.557, 35.071, 0.544)
pt3dadd(-60.691, 99.57, 35.11, 0.54)
pt3dadd(-60.801, 99.583, 35.148, 0.538)
pt3dadd(-60.911, 99.596, 35.187, 0.534)
pt3dadd(-61.021, 99.609, 35.225, 0.53)
pt3dadd(-61.131, 99.622, 35.263, 0.528)
pt3dadd(-61.241, 99.635, 35.302, 0.524)
pt3dadd(-61.355, 99.659, 35.326, 0.532)
pt3dadd(-61.469, 99.683, 35.349, 0.542)
pt3dadd(-61.583, 99.708, 35.373, 0.552)
pt3dadd(-61.697, 99.733, 35.396, 0.56)
pt3dadd(-61.811, 99.757, 35.42, 0.57)
pt3dadd(-61.925, 99.782, 35.443, 0.58)
pt3dadd(-62.039, 99.807, 35.467, 0.588)
pt3dadd(-62.153, 99.831, 35.49, 0.598)
pt3dadd(-62.267, 99.856, 35.514, 0.608)
pt3dadd(-62.381, 99.882, 35.537, 0.616)
pt3dadd(-62.486, 99.936, 35.55, 0.58)
pt3dadd(-62.592, 99.99, 35.563, 0.546)
pt3dadd(-62.698, 100.044, 35.576, 0.51)
pt3dadd(-62.804, 100.098, 35.589, 0.476)
pt3dadd(-62.91, 100.153, 35.602, 0.44)
pt3dadd(-63.016, 100.207, 35.615, 0.404)
pt3dadd(-63.122, 100.261, 35.628, 0.37)
pt3dadd(-63.228, 100.315, 35.641, 0.334)
pt3dadd(-63.334, 100.369, 35.654, 0.3)
pt3dadd(-63.44, 100.423, 35.667, 0.268)
pt3dadd(-63.549, 100.473, 35.675, 0.314)
pt3dadd(-63.658, 100.523, 35.683, 0.36)
pt3dadd(-63.766, 100.572, 35.691, 0.408)
pt3dadd(-63.875, 100.622, 35.7, 0.454)
pt3dadd(-63.984, 100.671, 35.708, 0.5)
pt3dadd(-64.093, 100.721, 35.716, 0.546)
pt3dadd(-64.202, 100.77, 35.724, 0.592)
pt3dadd(-64.311, 100.82, 35.732, 0.64)
pt3dadd(-64.419, 100.87, 35.741, 0.686)
pt3dadd(-64.528, 100.92, 35.749, 0.732)
pt3dadd(-64.629, 100.984, 35.76, 0.748)
pt3dadd(-64.73, 101.047, 35.77, 0.766)
pt3dadd(-64.83, 101.111, 35.781, 0.784)
pt3dadd(-64.931, 101.175, 35.792, 0.8)
pt3dadd(-65.032, 101.239, 35.803, 0.818)
pt3dadd(-65.133, 101.302, 35.813, 0.836)
pt3dadd(-65.234, 101.366, 35.824, 0.854)
pt3dadd(-65.335, 101.43, 35.835, 0.87)
pt3dadd(-65.435, 101.494, 35.846, 0.888)
pt3dadd(-65.535, 101.558, 35.858, 0.902)
pt3dadd(-65.627, 101.628, 35.887, 0.872)
pt3dadd(-65.718, 101.697, 35.916, 0.842)
pt3dadd(-65.809, 101.767, 35.945, 0.814)
pt3dadd(-65.901, 101.836, 35.974, 0.784)
pt3dadd(-65.992, 101.906, 36.003, 0.754)
pt3dadd(-66.084, 101.976, 36.032, 0.726)
pt3dadd(-66.175, 102.045, 36.061, 0.696)
pt3dadd(-66.266, 102.115, 36.09, 0.666)
pt3dadd(-66.357, 102.185, 36.119, 0.638)
pt3dadd(-66.446, 102.255, 36.152, 0.608)
pt3dadd(-66.526, 102.329, 36.194, 0.576)
pt3dadd(-66.606, 102.403, 36.236, 0.544)
pt3dadd(-66.686, 102.476, 36.279, 0.512)
pt3dadd(-66.766, 102.55, 36.321, 0.482)
pt3dadd(-66.846, 102.624, 36.363, 0.45)
pt3dadd(-66.926, 102.697, 36.405, 0.418)
pt3dadd(-67.006, 102.771, 36.448, 0.388)
pt3dadd(-67.086, 102.844, 36.49, 0.356)
pt3dadd(-67.166, 102.918, 36.532, 0.324)
pt3dadd(-67.245, 102.995, 36.57, 0.314)
pt3dadd(-67.325, 103.078, 36.598, 0.344)
pt3dadd(-67.404, 103.162, 36.627, 0.372)
pt3dadd(-67.483, 103.245, 36.655, 0.4)
pt3dadd(-67.563, 103.328, 36.684, 0.428)
pt3dadd(-67.642, 103.412, 36.713, 0.456)
pt3dadd(-67.721, 103.495, 36.741, 0.486)
pt3dadd(-67.801, 103.578, 36.77, 0.514)
pt3dadd(-67.88, 103.661, 36.799, 0.542)
pt3dadd(-67.959, 103.745, 36.827, 0.572)
pt3dadd(-68.039, 103.828, 36.853, 0.614)
pt3dadd(-68.121, 103.913, 36.873, 0.682)
pt3dadd(-68.202, 103.998, 36.893, 0.75)
pt3dadd(-68.283, 104.083, 36.914, 0.818)
pt3dadd(-68.365, 104.168, 36.934, 0.886)
pt3dadd(-68.446, 104.252, 36.954, 0.954)
pt3dadd(-68.527, 104.337, 36.975, 1.022)
pt3dadd(-68.609, 104.422, 36.995, 1.088)
pt3dadd(-68.69, 104.507, 37.015, 1.156)
pt3dadd(-68.772, 104.591, 37.035, 1.224)
pt3dadd(-68.847, 104.678, 37.061, 1.254)
pt3dadd(-68.914, 104.769, 37.096, 1.218)
pt3dadd(-68.98, 104.86, 37.13, 1.182)
pt3dadd(-69.047, 104.951, 37.165, 1.144)
pt3dadd(-69.113, 105.042, 37.199, 1.108)
pt3dadd(-69.179, 105.133, 37.234, 1.072)
}
}
proc shape3d_84() {
dend_7[2] { pt3dadd(-69.246, 105.224, 37.268, 1.036)
pt3dadd(-69.312, 105.315, 37.303, 1)
pt3dadd(-69.378, 105.406, 37.337, 0.964)
pt3dadd(-69.445, 105.497, 37.372, 0.926)
pt3dadd(-69.518, 105.583, 37.405, 0.892)
pt3dadd(-69.6, 105.661, 37.438, 0.856)
pt3dadd(-69.682, 105.74, 37.47, 0.822)
pt3dadd(-69.765, 105.818, 37.502, 0.786)
pt3dadd(-69.847, 105.897, 37.534, 0.752)
pt3dadd(-69.929, 105.975, 37.566, 0.718)
pt3dadd(-70.011, 106.053, 37.598, 0.682)
pt3dadd(-70.094, 106.132, 37.63, 0.648)
pt3dadd(-70.176, 106.21, 37.662, 0.614)
pt3dadd(-70.258, 106.289, 37.695, 0.578)
pt3dadd(-70.348, 106.361, 37.721, 0.562)
pt3dadd(-70.444, 106.429, 37.742, 0.558)
pt3dadd(-70.54, 106.496, 37.763, 0.556)
pt3dadd(-70.635, 106.564, 37.784, 0.554)
pt3dadd(-70.731, 106.631, 37.805, 0.55)
pt3dadd(-70.827, 106.699, 37.827, 0.548)
pt3dadd(-70.923, 106.766, 37.848, 0.544)
pt3dadd(-71.019, 106.834, 37.869, 0.542)
pt3dadd(-71.115, 106.901, 37.89, 0.54)
pt3dadd(-71.211, 106.969, 37.911, 0.536)
pt3dadd(-71.309, 107.035, 37.927, 0.544)
pt3dadd(-71.408, 107.1, 37.939, 0.558)
pt3dadd(-71.508, 107.166, 37.951, 0.572)
pt3dadd(-71.608, 107.231, 37.963, 0.586)
pt3dadd(-71.708, 107.296, 37.975, 0.6)
pt3dadd(-71.807, 107.361, 37.987, 0.614)
pt3dadd(-71.907, 107.427, 37.999, 0.63)
pt3dadd(-72.007, 107.492, 38.011, 0.644)
pt3dadd(-72.106, 107.557, 38.022, 0.658)
pt3dadd(-72.206, 107.622, 38.034, 0.672)
pt3dadd(-72.311, 107.679, 38.043, 0.678)
pt3dadd(-72.42, 107.729, 38.05, 0.678)
pt3dadd(-72.528, 107.78, 38.057, 0.678)
pt3dadd(-72.636, 107.831, 38.064, 0.678)
pt3dadd(-72.745, 107.881, 38.071, 0.678)
pt3dadd(-72.853, 107.932, 38.078, 0.678)
pt3dadd(-72.962, 107.983, 38.085, 0.678)
pt3dadd(-73.07, 108.033, 38.092, 0.678)
pt3dadd(-73.179, 108.084, 38.099, 0.678)
pt3dadd(-73.287, 108.135, 38.106, 0.678)
pt3dadd(-73.389, 108.196, 38.116, 0.678)
pt3dadd(-73.486, 108.266, 38.127, 0.678)
pt3dadd(-73.583, 108.335, 38.138, 0.678)
pt3dadd(-73.68, 108.404, 38.148, 0.678)
pt3dadd(-73.778, 108.473, 38.16, 0.678)
pt3dadd(-73.875, 108.542, 38.17, 0.678)
pt3dadd(-73.972, 108.611, 38.181, 0.678)
pt3dadd(-74.069, 108.68, 38.192, 0.678)
pt3dadd(-74.166, 108.75, 38.203, 0.678)
pt3dadd(-74.264, 108.819, 38.214, 0.678)
pt3dadd(-74.351, 108.893, 38.239, 0.686)
pt3dadd(-74.433, 108.971, 38.273, 0.702)
pt3dadd(-74.515, 109.049, 38.306, 0.716)
pt3dadd(-74.596, 109.128, 38.34, 0.73)
pt3dadd(-74.678, 109.206, 38.374, 0.744)
pt3dadd(-74.76, 109.284, 38.408, 0.76)
pt3dadd(-74.841, 109.362, 38.441, 0.774)
pt3dadd(-74.923, 109.44, 38.475, 0.788)
pt3dadd(-75.004, 109.518, 38.509, 0.802)
pt3dadd(-75.086, 109.596, 38.542, 0.818)
pt3dadd(-75.176, 109.663, 38.578, 0.798)
pt3dadd(-75.268, 109.726, 38.613, 0.768)
pt3dadd(-75.361, 109.79, 38.649, 0.738)
pt3dadd(-75.454, 109.853, 38.684, 0.706)
pt3dadd(-75.546, 109.916, 38.72, 0.676)
pt3dadd(-75.639, 109.98, 38.755, 0.646)
pt3dadd(-75.732, 110.043, 38.791, 0.616)
pt3dadd(-75.824, 110.106, 38.826, 0.584)
pt3dadd(-75.917, 110.169, 38.862, 0.554)
pt3dadd(-76.009, 110.233, 38.897, 0.524)
pt3dadd(-76.12, 110.266, 38.921, 0.504)
pt3dadd(-76.233, 110.297, 38.943, 0.486)
pt3dadd(-76.346, 110.328, 38.965, 0.468)
pt3dadd(-76.459, 110.359, 38.987, 0.45)
pt3dadd(-76.572, 110.39, 39.01, 0.432)
pt3dadd(-76.685, 110.421, 39.032, 0.414)
pt3dadd(-76.798, 110.451, 39.054, 0.396)
pt3dadd(-76.911, 110.482, 39.076, 0.378)
pt3dadd(-77.023, 110.513, 39.099, 0.36)
pt3dadd(-77.137, 110.542, 39.12, 0.344)
pt3dadd(-77.256, 110.551, 39.132, 0.364)
pt3dadd(-77.374, 110.559, 39.143, 0.386)
pt3dadd(-77.493, 110.567, 39.155, 0.406)
pt3dadd(-77.612, 110.575, 39.166, 0.426)
pt3dadd(-77.731, 110.583, 39.177, 0.446)
pt3dadd(-77.85, 110.591, 39.189, 0.466)
pt3dadd(-77.969, 110.599, 39.2, 0.486)
pt3dadd(-78.088, 110.607, 39.212, 0.506)
pt3dadd(-78.207, 110.616, 39.223, 0.528)
pt3dadd(-78.326, 110.623, 39.234, 0.546)
pt3dadd(-78.446, 110.624, 39.243, 0.554)
pt3dadd(-78.565, 110.625, 39.252, 0.56)
pt3dadd(-78.685, 110.626, 39.26, 0.568)
pt3dadd(-78.804, 110.627, 39.269, 0.576)
pt3dadd(-78.924, 110.628, 39.278, 0.582)
pt3dadd(-79.043, 110.629, 39.286, 0.59)
pt3dadd(-79.163, 110.63, 39.295, 0.598)
pt3dadd(-79.282, 110.631, 39.303, 0.604)
pt3dadd(-79.402, 110.633, 39.312, 0.612)
pt3dadd(-79.521, 110.634, 39.321, 0.616)
pt3dadd(-79.64, 110.636, 39.336, 0.6)
pt3dadd(-79.759, 110.637, 39.352, 0.584)
pt3dadd(-79.877, 110.639, 39.367, 0.566)
pt3dadd(-79.996, 110.641, 39.382, 0.55)
pt3dadd(-80.114, 110.643, 39.397, 0.534)
pt3dadd(-80.233, 110.645, 39.413, 0.516)
pt3dadd(-80.352, 110.647, 39.428, 0.5)
pt3dadd(-80.47, 110.649, 39.443, 0.484)
pt3dadd(-80.589, 110.651, 39.458, 0.466)
pt3dadd(-80.706, 110.653, 39.477, 0.452)
pt3dadd(-80.817, 110.656, 39.514, 0.452)
pt3dadd(-80.928, 110.659, 39.552, 0.452)
pt3dadd(-81.04, 110.663, 39.59, 0.452)
pt3dadd(-81.151, 110.666, 39.627, 0.452)
pt3dadd(-81.262, 110.669, 39.665, 0.452)
pt3dadd(-81.373, 110.672, 39.703, 0.452)
pt3dadd(-81.484, 110.675, 39.74, 0.452)
pt3dadd(-81.595, 110.679, 39.778, 0.452)
pt3dadd(-81.706, 110.682, 39.816, 0.452)
pt3dadd(-81.818, 110.685, 39.852, 0.454)
pt3dadd(-81.933, 110.693, 39.879, 0.47)
pt3dadd(-82.048, 110.7, 39.906, 0.486)
pt3dadd(-82.164, 110.708, 39.933, 0.502)
pt3dadd(-82.279, 110.716, 39.96, 0.518)
pt3dadd(-82.394, 110.723, 39.987, 0.534)
pt3dadd(-82.51, 110.731, 40.014, 0.55)
pt3dadd(-82.625, 110.738, 40.041, 0.566)
pt3dadd(-82.74, 110.746, 40.068, 0.582)
pt3dadd(-82.856, 110.753, 40.095, 0.598)
pt3dadd(-82.971, 110.761, 40.121, 0.61)
pt3dadd(-83.089, 110.773, 40.139, 0.592)
pt3dadd(-83.206, 110.785, 40.157, 0.574)
pt3dadd(-83.323, 110.797, 40.174, 0.556)
pt3dadd(-83.441, 110.809, 40.192, 0.538)
pt3dadd(-83.558, 110.821, 40.21, 0.52)
pt3dadd(-83.676, 110.833, 40.228, 0.502)
pt3dadd(-83.793, 110.844, 40.246, 0.484)
pt3dadd(-83.911, 110.856, 40.264, 0.466)
pt3dadd(-84.028, 110.868, 40.282, 0.45)
pt3dadd(-84.145, 110.883, 40.299, 0.434)
pt3dadd(-84.261, 110.911, 40.309, 0.438)
pt3dadd(-84.377, 110.939, 40.32, 0.442)
pt3dadd(-84.493, 110.967, 40.331, 0.444)
pt3dadd(-84.609, 110.995, 40.341, 0.448)
pt3dadd(-84.725, 111.023, 40.352, 0.452)
pt3dadd(-84.841, 111.051, 40.363, 0.454)
pt3dadd(-84.957, 111.079, 40.373, 0.458)
pt3dadd(-85.073, 111.107, 40.384, 0.462)
pt3dadd(-85.189, 111.135, 40.395, 0.464)
pt3dadd(-85.304, 111.167, 40.405, 0.476)
pt3dadd(-85.416, 111.209, 40.412, 0.51)
pt3dadd(-85.528, 111.251, 40.42, 0.542)
pt3dadd(-85.64, 111.293, 40.427, 0.576)
pt3dadd(-85.752, 111.335, 40.435, 0.61)
pt3dadd(-85.864, 111.377, 40.443, 0.644)
pt3dadd(-85.976, 111.419, 40.45, 0.676)
pt3dadd(-86.088, 111.461, 40.458, 0.71)
pt3dadd(-86.2, 111.503, 40.465, 0.744)
pt3dadd(-86.313, 111.545, 40.473, 0.778)
pt3dadd(-86.425, 111.584, 40.481, 0.786)
pt3dadd(-86.541, 111.613, 40.493, 0.73)
pt3dadd(-86.657, 111.642, 40.505, 0.676)
pt3dadd(-86.772, 111.671, 40.516, 0.62)
pt3dadd(-86.888, 111.7, 40.528, 0.564)
pt3dadd(-87.003, 111.73, 40.539, 0.508)
pt3dadd(-87.119, 111.759, 40.551, 0.452)
pt3dadd(-87.234, 111.788, 40.562, 0.396)
pt3dadd(-87.35, 111.817, 40.574, 0.34)
pt3dadd(-87.466, 111.846, 40.585, 0.284)
pt3dadd(-87.58, 111.872, 40.604, 0.244)
pt3dadd(-87.69, 111.886, 40.64, 0.242)
pt3dadd(-87.801, 111.9, 40.677, 0.24)
pt3dadd(-87.912, 111.914, 40.714, 0.238)
pt3dadd(-88.022, 111.928, 40.751, 0.236)
pt3dadd(-88.133, 111.942, 40.788, 0.234)
pt3dadd(-88.244, 111.956, 40.825, 0.232)
pt3dadd(-88.354, 111.97, 40.862, 0.23)
pt3dadd(-88.465, 111.984, 40.899, 0.23)
pt3dadd(-88.576, 111.998, 40.936, 0.228)
pt3dadd(-88.687, 112.01, 40.97, 0.226)
pt3dadd(-88.802, 112.016, 41, 0.226)
pt3dadd(-88.917, 112.022, 41.029, 0.226)
pt3dadd(-89.031, 112.028, 41.058, 0.226)
pt3dadd(-89.146, 112.034, 41.088, 0.226)
pt3dadd(-89.26, 112.04, 41.117, 0.226)
pt3dadd(-89.375, 112.046, 41.146, 0.226)
pt3dadd(-89.49, 112.052, 41.175, 0.226)
pt3dadd(-89.604, 112.058, 41.205, 0.226)
pt3dadd(-89.719, 112.064, 41.234, 0.226)
pt3dadd(-89.834, 112.069, 41.26, 0.226)
pt3dadd(-89.952, 112.074, 41.28, 0.226)
pt3dadd(-90.069, 112.079, 41.3, 0.226)
pt3dadd(-90.187, 112.083, 41.32, 0.226)
pt3dadd(-90.304, 112.088, 41.34, 0.226)
pt3dadd(-90.422, 112.093, 41.36, 0.226)
pt3dadd(-90.539, 112.098, 41.38, 0.226)
}
}
proc shape3d_85() {
dend_7[2] { pt3dadd(-90.657, 112.102, 41.4, 0.226)
pt3dadd(-90.774, 112.107, 41.42, 0.226)
pt3dadd(-90.892, 112.112, 41.44, 0.226)
pt3dadd(-91.01, 112.118, 41.457, 0.228)
pt3dadd(-91.128, 112.126, 41.469, 0.236)
pt3dadd(-91.247, 112.135, 41.481, 0.242)
pt3dadd(-91.366, 112.143, 41.493, 0.25)
pt3dadd(-91.485, 112.152, 41.505, 0.258)
pt3dadd(-91.604, 112.16, 41.517, 0.264)
pt3dadd(-91.723, 112.168, 41.528, 0.272)
pt3dadd(-91.842, 112.177, 41.54, 0.278)
pt3dadd(-91.96, 112.185, 41.552, 0.286)
pt3dadd(-92.079, 112.194, 41.564, 0.294)
pt3dadd(-92.198, 112.206, 41.575, 0.304)
pt3dadd(-92.316, 112.225, 41.584, 0.326)
pt3dadd(-92.434, 112.244, 41.592, 0.346)
pt3dadd(-92.552, 112.263, 41.601, 0.366)
pt3dadd(-92.67, 112.282, 41.61, 0.388)
pt3dadd(-92.788, 112.301, 41.619, 0.408)
pt3dadd(-92.906, 112.32, 41.628, 0.428)
pt3dadd(-93.024, 112.339, 41.636, 0.45)
pt3dadd(-93.142, 112.358, 41.645, 0.47)
pt3dadd(-93.26, 112.377, 41.654, 0.49)
pt3dadd(-93.375, 112.405, 41.667, 0.512)
pt3dadd(-93.486, 112.444, 41.685, 0.534)
pt3dadd(-93.597, 112.484, 41.704, 0.554)
pt3dadd(-93.708, 112.523, 41.722, 0.576)
pt3dadd(-93.819, 112.563, 41.741, 0.598)
pt3dadd(-93.93, 112.603, 41.759, 0.62)
pt3dadd(-94.041, 112.642, 41.778, 0.64)
pt3dadd(-94.153, 112.682, 41.796, 0.662)
pt3dadd(-94.264, 112.721, 41.815, 0.684)
pt3dadd(-94.375, 112.761, 41.833, 0.706)
pt3dadd(-94.482, 112.781, 41.869, 0.722)
pt3dadd(-94.586, 112.785, 41.918, 0.734)
pt3dadd(-94.69, 112.788, 41.968, 0.748)
pt3dadd(-94.794, 112.791, 42.018, 0.76)
pt3dadd(-94.898, 112.795, 42.067, 0.772)
pt3dadd(-95.002, 112.799, 42.117, 0.786)
pt3dadd(-95.107, 112.802, 42.167, 0.798)
pt3dadd(-95.211, 112.806, 42.217, 0.81)
pt3dadd(-95.315, 112.809, 42.266, 0.824)
pt3dadd(-95.419, 112.812, 42.316, 0.836)
pt3dadd(-95.528, 112.777, 42.343, 0.81)
pt3dadd(-95.637, 112.737, 42.368, 0.78)
pt3dadd(-95.746, 112.698, 42.392, 0.75)
pt3dadd(-95.856, 112.658, 42.417, 0.72)
pt3dadd(-95.965, 112.619, 42.441, 0.69)
pt3dadd(-96.075, 112.579, 42.466, 0.66)
pt3dadd(-96.184, 112.539, 42.49, 0.63)
pt3dadd(-96.293, 112.5, 42.515, 0.6)
pt3dadd(-96.403, 112.46, 42.539, 0.57)
pt3dadd(-96.512, 112.42, 42.564, 0.54)
pt3dadd(-96.628, 112.392, 42.574, 0.514)
pt3dadd(-96.744, 112.364, 42.583, 0.488)
pt3dadd(-96.86, 112.336, 42.592, 0.462)
pt3dadd(-96.976, 112.308, 42.601, 0.436)
pt3dadd(-97.092, 112.28, 42.61, 0.41)
pt3dadd(-97.209, 112.252, 42.619, 0.384)
pt3dadd(-97.325, 112.224, 42.629, 0.358)
pt3dadd(-97.441, 112.196, 42.638, 0.332)
pt3dadd(-97.557, 112.168, 42.647, 0.306)
pt3dadd(-97.673, 112.14, 42.656, 0.28)
pt3dadd(-97.793, 112.128, 42.656, 0.296)
pt3dadd(-97.912, 112.116, 42.656, 0.314)
pt3dadd(-98.032, 112.104, 42.656, 0.332)
pt3dadd(-98.151, 112.092, 42.656, 0.348)
pt3dadd(-98.27, 112.08, 42.656, 0.366)
pt3dadd(-98.39, 112.068, 42.656, 0.384)
pt3dadd(-98.509, 112.056, 42.656, 0.4)
pt3dadd(-98.629, 112.044, 42.656, 0.418)
pt3dadd(-98.748, 112.032, 42.656, 0.434)
pt3dadd(-98.867, 112.02, 42.656, 0.452)
}
dend_7[3] {pt3dclear()
pt3dadd(-31.232, 94.047, 29.673, 0.226)
pt3dadd(-31.272, 94.037, 29.708, 0.232)
pt3dadd(-31.354, 94.017, 29.78, 0.246)
pt3dadd(-31.435, 93.997, 29.852, 0.258)
pt3dadd(-31.516, 93.977, 29.923, 0.272)
pt3dadd(-31.598, 93.957, 29.995, 0.284)
pt3dadd(-31.679, 93.938, 30.067, 0.298)
pt3dadd(-31.76, 93.918, 30.138, 0.31)
pt3dadd(-31.842, 93.898, 30.21, 0.324)
pt3dadd(-31.923, 93.878, 30.281, 0.336)
pt3dadd(-32.004, 93.858, 30.353, 0.35)
pt3dadd(-32.086, 93.838, 30.425, 0.362)
pt3dadd(-32.167, 93.818, 30.496, 0.376)
pt3dadd(-32.249, 93.798, 30.568, 0.388)
pt3dadd(-32.317, 93.752, 30.64, 0.404)
pt3dadd(-32.385, 93.704, 30.711, 0.422)
pt3dadd(-32.454, 93.655, 30.783, 0.438)
pt3dadd(-32.522, 93.607, 30.855, 0.454)
pt3dadd(-32.59, 93.559, 30.927, 0.47)
pt3dadd(-32.658, 93.51, 30.999, 0.486)
pt3dadd(-32.726, 93.462, 31.071, 0.502)
pt3dadd(-32.794, 93.414, 31.143, 0.52)
pt3dadd(-32.862, 93.366, 31.214, 0.536)
pt3dadd(-32.93, 93.313, 31.284, 0.55)
pt3dadd(-32.998, 93.25, 31.347, 0.564)
pt3dadd(-33.066, 93.187, 31.411, 0.578)
pt3dadd(-33.134, 93.124, 31.474, 0.592)
pt3dadd(-33.202, 93.06, 31.537, 0.606)
pt3dadd(-33.27, 92.997, 31.6, 0.618)
pt3dadd(-33.339, 92.934, 31.664, 0.632)
pt3dadd(-33.407, 92.87, 31.727, 0.646)
pt3dadd(-33.475, 92.807, 31.79, 0.658)
pt3dadd(-33.543, 92.744, 31.853, 0.672)
pt3dadd(-33.633, 92.702, 31.903, 0.678)
pt3dadd(-33.741, 92.676, 31.942, 0.678)
pt3dadd(-33.848, 92.651, 31.981, 0.678)
pt3dadd(-33.956, 92.625, 32.02, 0.678)
pt3dadd(-34.063, 92.6, 32.059, 0.678)
pt3dadd(-34.17, 92.574, 32.099, 0.678)
pt3dadd(-34.278, 92.549, 32.138, 0.678)
pt3dadd(-34.385, 92.523, 32.177, 0.678)
pt3dadd(-34.493, 92.497, 32.216, 0.678)
pt3dadd(-34.6, 92.472, 32.255, 0.678)
pt3dadd(-34.71, 92.462, 32.292, 0.688)
pt3dadd(-34.822, 92.46, 32.329, 0.7)
pt3dadd(-34.934, 92.458, 32.365, 0.714)
pt3dadd(-35.046, 92.456, 32.402, 0.728)
pt3dadd(-35.157, 92.454, 32.438, 0.74)
pt3dadd(-35.269, 92.452, 32.474, 0.754)
pt3dadd(-35.381, 92.451, 32.51, 0.768)
pt3dadd(-35.493, 92.449, 32.547, 0.782)
pt3dadd(-35.605, 92.447, 32.583, 0.794)
pt3dadd(-35.716, 92.445, 32.619, 0.808)
pt3dadd(-35.823, 92.454, 32.664, 0.834)
pt3dadd(-35.929, 92.466, 32.71, 0.862)
pt3dadd(-36.034, 92.479, 32.757, 0.892)
pt3dadd(-36.14, 92.492, 32.803, 0.92)
pt3dadd(-36.245, 92.504, 32.85, 0.95)
pt3dadd(-36.35, 92.517, 32.897, 0.98)
pt3dadd(-36.456, 92.53, 32.943, 1.008)
pt3dadd(-36.561, 92.542, 32.99, 1.038)
pt3dadd(-36.666, 92.555, 33.037, 1.066)
pt3dadd(-36.772, 92.568, 33.083, 1.096)
pt3dadd(-36.878, 92.588, 33.127, 1.088)
pt3dadd(-36.984, 92.611, 33.17, 1.068)
pt3dadd(-37.09, 92.634, 33.212, 1.048)
pt3dadd(-37.196, 92.656, 33.255, 1.028)
pt3dadd(-37.302, 92.679, 33.298, 1.008)
pt3dadd(-37.408, 92.702, 33.34, 0.988)
pt3dadd(-37.515, 92.725, 33.383, 0.968)
pt3dadd(-37.621, 92.747, 33.426, 0.948)
pt3dadd(-37.727, 92.77, 33.468, 0.928)
pt3dadd(-37.833, 92.793, 33.511, 0.908)
pt3dadd(-37.908, 92.847, 33.57, 0.888)
pt3dadd(-37.974, 92.91, 33.635, 0.868)
pt3dadd(-38.04, 92.973, 33.7, 0.848)
pt3dadd(-38.106, 93.037, 33.765, 0.828)
pt3dadd(-38.172, 93.1, 33.83, 0.808)
pt3dadd(-38.238, 93.164, 33.894, 0.788)
pt3dadd(-38.303, 93.227, 33.959, 0.768)
pt3dadd(-38.369, 93.29, 34.024, 0.746)
pt3dadd(-38.435, 93.354, 34.089, 0.726)
pt3dadd(-38.501, 93.417, 34.154, 0.706)
pt3dadd(-38.574, 93.489, 34.205, 0.726)
pt3dadd(-38.648, 93.563, 34.254, 0.758)
pt3dadd(-38.723, 93.637, 34.302, 0.79)
pt3dadd(-38.798, 93.711, 34.35, 0.822)
pt3dadd(-38.873, 93.785, 34.398, 0.854)
pt3dadd(-38.948, 93.859, 34.446, 0.886)
pt3dadd(-39.022, 93.933, 34.494, 0.916)
pt3dadd(-39.097, 94.007, 34.542, 0.948)
pt3dadd(-39.172, 94.081, 34.59, 0.98)
pt3dadd(-39.247, 94.155, 34.638, 1.012)
pt3dadd(-39.317, 94.212, 34.702, 1.028)
pt3dadd(-39.386, 94.264, 34.772, 1.04)
pt3dadd(-39.455, 94.316, 34.841, 1.05)
pt3dadd(-39.525, 94.368, 34.91, 1.062)
pt3dadd(-39.594, 94.42, 34.979, 1.074)
pt3dadd(-39.663, 94.472, 35.049, 1.084)
pt3dadd(-39.732, 94.524, 35.118, 1.096)
pt3dadd(-39.801, 94.576, 35.187, 1.108)
pt3dadd(-39.871, 94.628, 35.256, 1.118)
pt3dadd(-39.94, 94.68, 35.326, 1.13)
pt3dadd(-40.018, 94.695, 35.4, 1.13)
pt3dadd(-40.097, 94.71, 35.475, 1.13)
pt3dadd(-40.175, 94.724, 35.55, 1.13)
pt3dadd(-40.254, 94.738, 35.624, 1.13)
pt3dadd(-40.332, 94.752, 35.699, 1.13)
pt3dadd(-40.411, 94.767, 35.774, 1.13)
pt3dadd(-40.489, 94.781, 35.848, 1.13)
pt3dadd(-40.568, 94.795, 35.923, 1.13)
pt3dadd(-40.646, 94.81, 35.998, 1.13)
pt3dadd(-40.726, 94.82, 36.071, 1.128)
pt3dadd(-40.816, 94.801, 36.135, 1.12)
pt3dadd(-40.907, 94.782, 36.199, 1.11)
pt3dadd(-40.997, 94.763, 36.263, 1.1)
pt3dadd(-41.087, 94.744, 36.327, 1.092)
pt3dadd(-41.178, 94.725, 36.391, 1.082)
pt3dadd(-41.268, 94.706, 36.455, 1.072)
pt3dadd(-41.358, 94.686, 36.519, 1.064)
pt3dadd(-41.448, 94.668, 36.583, 1.054)
pt3dadd(-41.539, 94.648, 36.647, 1.044)
pt3dadd(-41.63, 94.624, 36.707, 1.036)
pt3dadd(-41.725, 94.59, 36.762, 1.028)
pt3dadd(-41.819, 94.556, 36.817, 1.02)
pt3dadd(-41.914, 94.522, 36.872, 1.012)
pt3dadd(-42.008, 94.487, 36.926, 1.002)
}
}
proc shape3d_86() {
dend_7[3] { pt3dadd(-42.102, 94.453, 36.981, 0.994)
pt3dadd(-42.197, 94.419, 37.036, 0.986)
pt3dadd(-42.291, 94.385, 37.091, 0.978)
pt3dadd(-42.386, 94.351, 37.145, 0.97)
pt3dadd(-42.48, 94.317, 37.2, 0.962)
pt3dadd(-42.574, 94.29, 37.257, 0.964)
pt3dadd(-42.668, 94.275, 37.318, 0.98)
pt3dadd(-42.762, 94.26, 37.379, 0.996)
pt3dadd(-42.856, 94.245, 37.44, 1.012)
pt3dadd(-42.95, 94.23, 37.501, 1.028)
pt3dadd(-43.044, 94.215, 37.562, 1.044)
pt3dadd(-43.138, 94.2, 37.623, 1.06)
pt3dadd(-43.232, 94.185, 37.684, 1.076)
pt3dadd(-43.326, 94.17, 37.744, 1.09)
pt3dadd(-43.42, 94.155, 37.805, 1.106)
pt3dadd(-43.507, 94.161, 37.871, 1.106)
pt3dadd(-43.584, 94.195, 37.942, 1.084)
pt3dadd(-43.662, 94.228, 38.013, 1.064)
pt3dadd(-43.739, 94.261, 38.084, 1.042)
pt3dadd(-43.816, 94.295, 38.156, 1.02)
pt3dadd(-43.894, 94.328, 38.227, 1)
pt3dadd(-43.971, 94.362, 38.298, 0.978)
pt3dadd(-44.049, 94.395, 38.369, 0.958)
pt3dadd(-44.126, 94.428, 38.44, 0.936)
pt3dadd(-44.203, 94.461, 38.512, 0.914)
pt3dadd(-44.274, 94.484, 38.59, 0.9)
pt3dadd(-44.337, 94.494, 38.674, 0.89)
pt3dadd(-44.4, 94.505, 38.758, 0.882)
pt3dadd(-44.463, 94.516, 38.843, 0.874)
pt3dadd(-44.526, 94.526, 38.928, 0.864)
pt3dadd(-44.59, 94.537, 39.012, 0.856)
pt3dadd(-44.653, 94.548, 39.097, 0.846)
pt3dadd(-44.716, 94.559, 39.181, 0.838)
pt3dadd(-44.779, 94.569, 39.266, 0.83)
pt3dadd(-44.842, 94.58, 39.35, 0.82)
pt3dadd(-44.884, 94.56, 39.44, 0.778)
pt3dadd(-44.914, 94.526, 39.532, 0.718)
pt3dadd(-44.945, 94.491, 39.625, 0.66)
pt3dadd(-44.976, 94.456, 39.717, 0.6)
pt3dadd(-45.007, 94.422, 39.809, 0.54)
pt3dadd(-45.038, 94.387, 39.901, 0.482)
pt3dadd(-45.068, 94.353, 39.994, 0.422)
pt3dadd(-45.099, 94.318, 40.086, 0.364)
pt3dadd(-45.13, 94.284, 40.178, 0.304)
pt3dadd(-45.161, 94.249, 40.271, 0.244)
pt3dadd(-45.18, 94.22, 40.366, 0.226)
pt3dadd(-45.193, 94.194, 40.463, 0.226)
pt3dadd(-45.206, 94.168, 40.56, 0.226)
pt3dadd(-45.22, 94.142, 40.657, 0.226)
pt3dadd(-45.233, 94.116, 40.754, 0.226)
pt3dadd(-45.246, 94.09, 40.851, 0.226)
pt3dadd(-45.26, 94.064, 40.948, 0.226)
pt3dadd(-45.273, 94.038, 41.045, 0.226)
pt3dadd(-45.286, 94.012, 41.142, 0.226)
pt3dadd(-45.3, 93.986, 41.239, 0.226)
pt3dadd(-45.305, 93.972, 41.338, 0.238)
pt3dadd(-45.307, 93.964, 41.437, 0.256)
pt3dadd(-45.309, 93.956, 41.537, 0.274)
pt3dadd(-45.311, 93.948, 41.637, 0.292)
pt3dadd(-45.313, 93.941, 41.737, 0.31)
pt3dadd(-45.315, 93.933, 41.836, 0.328)
pt3dadd(-45.317, 93.925, 41.936, 0.348)
pt3dadd(-45.319, 93.917, 42.036, 0.366)
pt3dadd(-45.321, 93.909, 42.136, 0.384)
pt3dadd(-45.322, 93.901, 42.236, 0.402)
pt3dadd(-45.323, 93.908, 42.335, 0.41)
pt3dadd(-45.323, 93.921, 42.435, 0.414)
pt3dadd(-45.323, 93.933, 42.534, 0.42)
pt3dadd(-45.323, 93.946, 42.633, 0.424)
pt3dadd(-45.323, 93.959, 42.733, 0.428)
pt3dadd(-45.323, 93.971, 42.832, 0.432)
pt3dadd(-45.323, 93.984, 42.932, 0.438)
pt3dadd(-45.323, 93.997, 43.031, 0.442)
pt3dadd(-45.323, 94.009, 43.131, 0.446)
pt3dadd(-45.323, 94.022, 43.23, 0.45)
pt3dadd(-45.323, 94.072, 43.319, 0.436)
pt3dadd(-45.323, 94.135, 43.404, 0.412)
pt3dadd(-45.323, 94.197, 43.489, 0.388)
pt3dadd(-45.323, 94.26, 43.575, 0.366)
pt3dadd(-45.323, 94.323, 43.66, 0.342)
pt3dadd(-45.323, 94.386, 43.745, 0.32)
pt3dadd(-45.323, 94.449, 43.83, 0.296)
pt3dadd(-45.323, 94.512, 43.915, 0.274)
pt3dadd(-45.323, 94.574, 44.001, 0.25)
pt3dadd(-45.323, 94.637, 44.086, 0.228)
pt3dadd(-45.323, 94.685, 44.178, 0.228)
pt3dadd(-45.323, 94.732, 44.27, 0.228)
pt3dadd(-45.323, 94.78, 44.361, 0.228)
pt3dadd(-45.323, 94.827, 44.453, 0.228)
pt3dadd(-45.323, 94.875, 44.545, 0.226)
pt3dadd(-45.323, 94.922, 44.637, 0.226)
pt3dadd(-45.323, 94.969, 44.729, 0.226)
pt3dadd(-45.323, 95.017, 44.821, 0.226)
pt3dadd(-45.323, 95.064, 44.912, 0.226)
pt3dadd(-45.323, 95.112, 45.004, 0.226)
}
dend_7[4] {pt3dclear()
pt3dadd(11.04, 94.04, 24.015, 1.808)
pt3dadd(11.04, 93.962, 24.009, 1.758)
pt3dadd(11.04, 93.842, 23.998, 1.68)
pt3dadd(11.04, 93.723, 23.988, 1.602)
pt3dadd(11.04, 93.603, 23.978, 1.526)
pt3dadd(11.04, 93.484, 23.968, 1.448)
pt3dadd(11.04, 93.365, 23.958, 1.37)
pt3dadd(11.04, 93.245, 23.948, 1.294)
pt3dadd(11.04, 93.126, 23.938, 1.216)
pt3dadd(11.04, 93.006, 23.928, 1.14)
pt3dadd(11.04, 92.887, 23.918, 1.062)
pt3dadd(11.019, 92.77, 23.912, 1.022)
pt3dadd(10.986, 92.655, 23.908, 1.002)
pt3dadd(10.953, 92.54, 23.903, 0.982)
pt3dadd(10.921, 92.424, 23.899, 0.962)
pt3dadd(10.888, 92.309, 23.895, 0.942)
pt3dadd(10.855, 92.194, 23.891, 0.922)
pt3dadd(10.822, 92.078, 23.886, 0.902)
pt3dadd(10.789, 91.963, 23.882, 0.882)
pt3dadd(10.757, 91.848, 23.878, 0.862)
pt3dadd(10.724, 91.732, 23.874, 0.842)
pt3dadd(10.668, 91.627, 23.875, 0.87)
pt3dadd(10.61, 91.521, 23.875, 0.896)
pt3dadd(10.553, 91.415, 23.876, 0.924)
pt3dadd(10.496, 91.31, 23.877, 0.952)
pt3dadd(10.439, 91.204, 23.878, 0.98)
pt3dadd(10.382, 91.099, 23.879, 1.008)
pt3dadd(10.325, 90.993, 23.88, 1.034)
pt3dadd(10.268, 90.887, 23.881, 1.062)
pt3dadd(10.211, 90.782, 23.882, 1.09)
pt3dadd(10.154, 90.676, 23.883, 1.118)
pt3dadd(10.125, 90.56, 23.885, 1.096)
pt3dadd(10.096, 90.443, 23.886, 1.074)
pt3dadd(10.067, 90.327, 23.888, 1.054)
pt3dadd(10.038, 90.211, 23.889, 1.032)
pt3dadd(10.009, 90.094, 23.891, 1.01)
pt3dadd(9.98, 89.978, 23.893, 0.99)
pt3dadd(9.951, 89.861, 23.894, 0.968)
pt3dadd(9.922, 89.745, 23.896, 0.946)
pt3dadd(9.893, 89.628, 23.897, 0.926)
pt3dadd(9.864, 89.512, 23.899, 0.904)
}
dend_7[5] {pt3dclear()
pt3dadd(9.864, 89.512, 23.899, 0.904)
pt3dadd(9.862, 89.459, 23.9, 0.886)
pt3dadd(9.857, 89.34, 23.903, 0.848)
pt3dadd(9.852, 89.22, 23.906, 0.808)
pt3dadd(9.849, 89.1, 23.91, 0.77)
pt3dadd(9.846, 88.98, 23.913, 0.732)
pt3dadd(9.843, 88.86, 23.916, 0.694)
pt3dadd(9.84, 88.74, 23.92, 0.656)
pt3dadd(9.837, 88.62, 23.923, 0.62)
pt3dadd(9.834, 88.5, 23.927, 0.582)
pt3dadd(9.831, 88.38, 23.93, 0.544)
pt3dadd(9.828, 88.261, 23.934, 0.506)
pt3dadd(9.825, 88.141, 23.937, 0.468)
pt3dadd(9.822, 88.021, 23.94, 0.43)
pt3dadd(9.837, 87.902, 23.948, 0.41)
pt3dadd(9.852, 87.783, 23.955, 0.39)
pt3dadd(9.867, 87.665, 23.963, 0.37)
pt3dadd(9.882, 87.546, 23.97, 0.348)
pt3dadd(9.896, 87.427, 23.978, 0.328)
pt3dadd(9.911, 87.308, 23.985, 0.308)
pt3dadd(9.926, 87.19, 23.993, 0.288)
pt3dadd(9.941, 87.071, 24, 0.266)
pt3dadd(9.956, 86.952, 24.008, 0.246)
pt3dadd(9.971, 86.833, 24.015, 0.226)
}
dend_7[6] {pt3dclear()
pt3dadd(9.971, 86.833, 24.015, 0.226)
pt3dadd(9.989, 86.794, 24.02, 0.262)
pt3dadd(10.038, 86.685, 24.032, 0.36)
pt3dadd(10.087, 86.577, 24.044, 0.46)
pt3dadd(10.136, 86.468, 24.056, 0.558)
pt3dadd(10.185, 86.36, 24.068, 0.656)
pt3dadd(10.235, 86.251, 24.08, 0.754)
pt3dadd(10.284, 86.143, 24.091, 0.852)
pt3dadd(10.333, 86.034, 24.103, 0.952)
pt3dadd(10.38, 85.928, 24.124, 1.024)
pt3dadd(10.423, 85.827, 24.163, 1.042)
pt3dadd(10.467, 85.725, 24.203, 1.06)
pt3dadd(10.51, 85.624, 24.243, 1.078)
pt3dadd(10.553, 85.522, 24.282, 1.094)
pt3dadd(10.597, 85.421, 24.322, 1.112)
pt3dadd(10.64, 85.32, 24.361, 1.13)
pt3dadd(10.683, 85.218, 24.401, 1.146)
pt3dadd(10.726, 85.117, 24.44, 1.164)
pt3dadd(10.77, 85.016, 24.48, 1.182)
pt3dadd(10.802, 84.91, 24.518, 1.148)
pt3dadd(10.824, 84.801, 24.555, 1.068)
pt3dadd(10.846, 84.691, 24.591, 0.988)
pt3dadd(10.868, 84.582, 24.627, 0.908)
pt3dadd(10.89, 84.472, 24.664, 0.828)
pt3dadd(10.912, 84.362, 24.7, 0.748)
pt3dadd(10.934, 84.253, 24.737, 0.668)
pt3dadd(10.956, 84.143, 24.773, 0.588)
pt3dadd(10.978, 84.034, 24.81, 0.508)
pt3dadd(11, 83.924, 24.846, 0.426)
pt3dadd(11.011, 83.809, 24.87, 0.386)
pt3dadd(11.014, 83.691, 24.886, 0.368)
pt3dadd(11.017, 83.573, 24.902, 0.352)
pt3dadd(11.02, 83.454, 24.918, 0.334)
pt3dadd(11.023, 83.336, 24.934, 0.318)
pt3dadd(11.026, 83.217, 24.95, 0.3)
pt3dadd(11.029, 83.099, 24.966, 0.284)
pt3dadd(11.032, 82.98, 24.983, 0.266)
pt3dadd(11.035, 82.862, 24.999, 0.25)
pt3dadd(11.038, 82.744, 25.015, 0.232)
pt3dadd(11.039, 82.624, 25.022, 0.226)
}
}
proc shape3d_87() {
dend_7[6] { pt3dadd(11.039, 82.504, 25.026, 0.226)
pt3dadd(11.038, 82.384, 25.029, 0.226)
pt3dadd(11.038, 82.264, 25.033, 0.226)
pt3dadd(11.038, 82.145, 25.036, 0.226)
pt3dadd(11.038, 82.025, 25.04, 0.226)
pt3dadd(11.038, 81.905, 25.043, 0.226)
pt3dadd(11.038, 81.785, 25.046, 0.226)
pt3dadd(11.038, 81.665, 25.05, 0.226)
pt3dadd(11.038, 81.545, 25.053, 0.226)
pt3dadd(11.037, 81.425, 25.055, 0.226)
pt3dadd(11.037, 81.305, 25.056, 0.226)
pt3dadd(11.037, 81.185, 25.057, 0.226)
pt3dadd(11.037, 81.065, 25.059, 0.226)
pt3dadd(11.037, 80.945, 25.06, 0.226)
pt3dadd(11.037, 80.825, 25.061, 0.226)
pt3dadd(11.037, 80.705, 25.062, 0.226)
pt3dadd(11.037, 80.585, 25.063, 0.226)
pt3dadd(11.037, 80.465, 25.064, 0.226)
pt3dadd(11.036, 80.345, 25.066, 0.226)
pt3dadd(11.036, 80.225, 25.067, 0.236)
pt3dadd(11.036, 80.105, 25.069, 0.254)
pt3dadd(11.035, 79.985, 25.072, 0.27)
pt3dadd(11.035, 79.865, 25.074, 0.286)
pt3dadd(11.035, 79.745, 25.076, 0.302)
pt3dadd(11.034, 79.625, 25.078, 0.318)
pt3dadd(11.034, 79.505, 25.08, 0.334)
pt3dadd(11.034, 79.385, 25.082, 0.35)
pt3dadd(11.033, 79.265, 25.084, 0.366)
pt3dadd(11.033, 79.145, 25.086, 0.382)
pt3dadd(11.032, 79.025, 25.09, 0.402)
pt3dadd(11.032, 78.905, 25.094, 0.42)
pt3dadd(11.031, 78.786, 25.098, 0.44)
pt3dadd(11.031, 78.666, 25.102, 0.46)
pt3dadd(11.03, 78.546, 25.106, 0.48)
pt3dadd(11.029, 78.426, 25.11, 0.498)
pt3dadd(11.029, 78.306, 25.114, 0.518)
pt3dadd(11.028, 78.186, 25.118, 0.538)
pt3dadd(11.028, 78.066, 25.122, 0.558)
pt3dadd(11.027, 77.946, 25.126, 0.576)
pt3dadd(11.026, 77.826, 25.133, 0.56)
pt3dadd(11.025, 77.707, 25.141, 0.524)
pt3dadd(11.024, 77.587, 25.148, 0.488)
pt3dadd(11.023, 77.468, 25.156, 0.452)
pt3dadd(11.022, 77.348, 25.164, 0.416)
pt3dadd(11.021, 77.228, 25.171, 0.38)
pt3dadd(11.02, 77.109, 25.179, 0.344)
pt3dadd(11.019, 76.989, 25.187, 0.308)
pt3dadd(11.017, 76.869, 25.194, 0.274)
pt3dadd(11.016, 76.75, 25.202, 0.238)
pt3dadd(11.014, 76.63, 25.213, 0.226)
pt3dadd(11.012, 76.511, 25.225, 0.226)
pt3dadd(11.01, 76.392, 25.237, 0.226)
pt3dadd(11.008, 76.273, 25.249, 0.226)
pt3dadd(11.005, 76.154, 25.262, 0.226)
pt3dadd(11.003, 76.035, 25.274, 0.226)
pt3dadd(11.001, 75.916, 25.286, 0.226)
pt3dadd(10.998, 75.797, 25.298, 0.226)
pt3dadd(10.996, 75.678, 25.31, 0.226)
pt3dadd(10.994, 75.559, 25.323, 0.226)
pt3dadd(10.99, 75.444, 25.35, 0.226)
pt3dadd(10.986, 75.332, 25.386, 0.226)
pt3dadd(10.982, 75.22, 25.421, 0.226)
pt3dadd(10.978, 75.108, 25.457, 0.226)
pt3dadd(10.974, 74.996, 25.492, 0.226)
pt3dadd(10.97, 74.884, 25.528, 0.226)
pt3dadd(10.966, 74.772, 25.563, 0.226)
pt3dadd(10.962, 74.659, 25.599, 0.226)
pt3dadd(10.958, 74.547, 25.634, 0.226)
pt3dadd(10.954, 74.435, 25.67, 0.226)
pt3dadd(10.947, 74.322, 25.702, 0.242)
pt3dadd(10.938, 74.208, 25.733, 0.264)
pt3dadd(10.93, 74.094, 25.764, 0.288)
pt3dadd(10.922, 73.981, 25.795, 0.31)
pt3dadd(10.914, 73.867, 25.827, 0.334)
pt3dadd(10.906, 73.753, 25.858, 0.356)
pt3dadd(10.898, 73.64, 25.889, 0.378)
pt3dadd(10.889, 73.526, 25.92, 0.402)
pt3dadd(10.881, 73.412, 25.951, 0.424)
pt3dadd(10.873, 73.298, 25.982, 0.448)
pt3dadd(10.861, 73.183, 26.007, 0.476)
pt3dadd(10.847, 73.067, 26.031, 0.504)
pt3dadd(10.833, 72.951, 26.054, 0.534)
pt3dadd(10.819, 72.835, 26.077, 0.564)
pt3dadd(10.805, 72.719, 26.1, 0.594)
pt3dadd(10.791, 72.603, 26.123, 0.624)
pt3dadd(10.777, 72.487, 26.146, 0.654)
pt3dadd(10.763, 72.372, 26.169, 0.684)
pt3dadd(10.749, 72.256, 26.192, 0.714)
pt3dadd(10.735, 72.14, 26.215, 0.744)
pt3dadd(10.713, 72.024, 26.234, 0.762)
pt3dadd(10.687, 71.908, 26.25, 0.778)
pt3dadd(10.662, 71.793, 26.267, 0.794)
pt3dadd(10.636, 71.677, 26.283, 0.808)
pt3dadd(10.611, 71.562, 26.3, 0.824)
pt3dadd(10.585, 71.446, 26.317, 0.84)
pt3dadd(10.56, 71.331, 26.333, 0.856)
pt3dadd(10.534, 71.215, 26.35, 0.87)
pt3dadd(10.508, 71.1, 26.366, 0.886)
pt3dadd(10.483, 70.984, 26.383, 0.902)
pt3dadd(10.434, 70.876, 26.395, 0.904)
pt3dadd(10.38, 70.77, 26.405, 0.904)
pt3dadd(10.326, 70.663, 26.416, 0.904)
pt3dadd(10.272, 70.557, 26.426, 0.904)
pt3dadd(10.218, 70.45, 26.437, 0.904)
pt3dadd(10.164, 70.344, 26.448, 0.904)
pt3dadd(10.11, 70.238, 26.458, 0.904)
pt3dadd(10.056, 70.131, 26.469, 0.904)
pt3dadd(10.002, 70.025, 26.479, 0.904)
pt3dadd(9.948, 69.918, 26.49, 0.904)
pt3dadd(9.899, 69.814, 26.518, 0.904)
pt3dadd(9.852, 69.711, 26.549, 0.904)
pt3dadd(9.804, 69.607, 26.581, 0.904)
pt3dadd(9.757, 69.504, 26.612, 0.904)
pt3dadd(9.709, 69.4, 26.643, 0.904)
pt3dadd(9.661, 69.297, 26.675, 0.904)
pt3dadd(9.614, 69.193, 26.706, 0.904)
pt3dadd(9.566, 69.09, 26.738, 0.904)
pt3dadd(9.519, 68.986, 26.769, 0.904)
pt3dadd(9.471, 68.883, 26.801, 0.904)
pt3dadd(9.417, 68.782, 26.83, 0.91)
pt3dadd(9.361, 68.681, 26.858, 0.918)
pt3dadd(9.306, 68.58, 26.886, 0.926)
pt3dadd(9.25, 68.479, 26.915, 0.934)
pt3dadd(9.195, 68.379, 26.943, 0.942)
pt3dadd(9.139, 68.278, 26.972, 0.948)
pt3dadd(9.084, 68.177, 27, 0.956)
pt3dadd(9.028, 68.076, 27.028, 0.964)
pt3dadd(8.973, 67.975, 27.057, 0.972)
pt3dadd(8.917, 67.875, 27.085, 0.98)
pt3dadd(8.853, 67.777, 27.107, 0.994)
pt3dadd(8.788, 67.679, 27.127, 1.008)
pt3dadd(8.723, 67.581, 27.148, 1.022)
pt3dadd(8.658, 67.484, 27.169, 1.036)
pt3dadd(8.593, 67.386, 27.19, 1.05)
pt3dadd(8.528, 67.288, 27.211, 1.064)
pt3dadd(8.463, 67.191, 27.232, 1.08)
pt3dadd(8.397, 67.093, 27.252, 1.094)
pt3dadd(8.332, 66.995, 27.273, 1.108)
pt3dadd(8.267, 66.898, 27.294, 1.122)
pt3dadd(8.197, 66.801, 27.306, 1.11)
pt3dadd(8.127, 66.705, 27.317, 1.094)
pt3dadd(8.056, 66.609, 27.329, 1.078)
pt3dadd(7.986, 66.513, 27.34, 1.062)
pt3dadd(7.916, 66.416, 27.351, 1.048)
pt3dadd(7.845, 66.32, 27.362, 1.032)
pt3dadd(7.775, 66.224, 27.373, 1.016)
pt3dadd(7.704, 66.128, 27.385, 1.002)
pt3dadd(7.634, 66.032, 27.396, 0.986)
pt3dadd(7.563, 65.935, 27.407, 0.97)
pt3dadd(7.501, 65.833, 27.416, 0.962)
pt3dadd(7.44, 65.73, 27.424, 0.956)
pt3dadd(7.379, 65.627, 27.432, 0.95)
pt3dadd(7.318, 65.525, 27.441, 0.944)
pt3dadd(7.257, 65.422, 27.449, 0.936)
pt3dadd(7.196, 65.319, 27.458, 0.93)
pt3dadd(7.135, 65.216, 27.466, 0.924)
pt3dadd(7.074, 65.113, 27.474, 0.918)
pt3dadd(7.013, 65.01, 27.483, 0.91)
pt3dadd(6.952, 64.908, 27.491, 0.904)
pt3dadd(6.896, 64.802, 27.498, 0.9)
pt3dadd(6.841, 64.696, 27.506, 0.896)
pt3dadd(6.785, 64.59, 27.513, 0.892)
pt3dadd(6.73, 64.484, 27.52, 0.886)
pt3dadd(6.674, 64.378, 27.528, 0.882)
pt3dadd(6.619, 64.272, 27.535, 0.878)
pt3dadd(6.564, 64.165, 27.542, 0.874)
pt3dadd(6.508, 64.059, 27.549, 0.87)
pt3dadd(6.453, 63.953, 27.556, 0.866)
pt3dadd(6.397, 63.847, 27.564, 0.862)
pt3dadd(6.337, 63.744, 27.574, 0.846)
pt3dadd(6.277, 63.641, 27.584, 0.828)
pt3dadd(6.217, 63.538, 27.594, 0.812)
pt3dadd(6.157, 63.435, 27.604, 0.796)
pt3dadd(6.097, 63.331, 27.614, 0.778)
pt3dadd(6.037, 63.228, 27.624, 0.762)
pt3dadd(5.976, 63.125, 27.634, 0.746)
pt3dadd(5.916, 63.022, 27.644, 0.73)
pt3dadd(5.856, 62.919, 27.654, 0.712)
pt3dadd(5.796, 62.816, 27.664, 0.696)
pt3dadd(5.755, 62.71, 27.696, 0.68)
pt3dadd(5.714, 62.604, 27.729, 0.662)
pt3dadd(5.673, 62.498, 27.761, 0.646)
pt3dadd(5.632, 62.393, 27.794, 0.628)
pt3dadd(5.592, 62.287, 27.827, 0.612)
pt3dadd(5.551, 62.181, 27.86, 0.594)
pt3dadd(5.51, 62.075, 27.892, 0.578)
pt3dadd(5.469, 61.969, 27.925, 0.56)
pt3dadd(5.429, 61.863, 27.958, 0.544)
pt3dadd(5.388, 61.758, 27.991, 0.526)
pt3dadd(5.341, 61.652, 28.018, 0.518)
pt3dadd(5.294, 61.547, 28.046, 0.512)
pt3dadd(5.247, 61.442, 28.074, 0.504)
pt3dadd(5.2, 61.337, 28.101, 0.496)
pt3dadd(5.153, 61.231, 28.129, 0.49)
pt3dadd(5.106, 61.126, 28.157, 0.482)
pt3dadd(5.059, 61.021, 28.184, 0.474)
pt3dadd(5.012, 60.915, 28.212, 0.466)
pt3dadd(4.965, 60.81, 28.24, 0.46)
pt3dadd(4.918, 60.705, 28.267, 0.452)
pt3dadd(4.869, 60.597, 28.286, 0.456)
}
}
proc shape3d_88() {
dend_7[6] { pt3dadd(4.821, 60.49, 28.306, 0.46)
pt3dadd(4.772, 60.383, 28.325, 0.464)
pt3dadd(4.724, 60.276, 28.345, 0.468)
pt3dadd(4.675, 60.168, 28.364, 0.472)
pt3dadd(4.627, 60.061, 28.383, 0.476)
pt3dadd(4.578, 59.954, 28.403, 0.48)
pt3dadd(4.53, 59.847, 28.422, 0.484)
pt3dadd(4.481, 59.739, 28.442, 0.488)
pt3dadd(4.435, 59.631, 28.46, 0.492)
pt3dadd(4.406, 59.515, 28.471, 0.512)
pt3dadd(4.377, 59.4, 28.482, 0.53)
pt3dadd(4.349, 59.284, 28.493, 0.548)
pt3dadd(4.32, 59.168, 28.503, 0.568)
pt3dadd(4.291, 59.052, 28.514, 0.586)
pt3dadd(4.263, 58.936, 28.525, 0.604)
pt3dadd(4.234, 58.821, 28.536, 0.622)
pt3dadd(4.205, 58.705, 28.547, 0.642)
pt3dadd(4.177, 58.589, 28.558, 0.66)
pt3dadd(4.149, 58.473, 28.567, 0.676)
pt3dadd(4.136, 58.354, 28.568, 0.676)
pt3dadd(4.122, 58.234, 28.568, 0.676)
pt3dadd(4.109, 58.115, 28.569, 0.678)
pt3dadd(4.095, 57.996, 28.569, 0.678)
pt3dadd(4.082, 57.877, 28.569, 0.678)
pt3dadd(4.068, 57.757, 28.57, 0.678)
pt3dadd(4.055, 57.638, 28.57, 0.678)
pt3dadd(4.041, 57.519, 28.57, 0.678)
pt3dadd(4.027, 57.4, 28.571, 0.678)
pt3dadd(4.015, 57.28, 28.571, 0.676)
pt3dadd(4.012, 57.16, 28.572, 0.66)
pt3dadd(4.009, 57.041, 28.572, 0.646)
pt3dadd(4.006, 56.921, 28.573, 0.63)
pt3dadd(4.003, 56.801, 28.574, 0.614)
pt3dadd(4.001, 56.681, 28.574, 0.598)
pt3dadd(3.998, 56.561, 28.575, 0.582)
pt3dadd(3.995, 56.441, 28.575, 0.568)
pt3dadd(3.992, 56.321, 28.576, 0.552)
pt3dadd(3.989, 56.201, 28.577, 0.536)
pt3dadd(3.986, 56.081, 28.577, 0.522)
pt3dadd(3.986, 55.961, 28.578, 0.514)
pt3dadd(3.985, 55.841, 28.579, 0.508)
pt3dadd(3.984, 55.721, 28.581, 0.5)
pt3dadd(3.984, 55.601, 28.582, 0.494)
pt3dadd(3.983, 55.481, 28.583, 0.486)
pt3dadd(3.983, 55.361, 28.584, 0.48)
pt3dadd(3.982, 55.241, 28.585, 0.472)
pt3dadd(3.981, 55.121, 28.586, 0.466)
pt3dadd(3.981, 55.001, 28.587, 0.458)
pt3dadd(3.98, 54.881, 28.589, 0.454)
pt3dadd(3.979, 54.761, 28.591, 0.482)
pt3dadd(3.978, 54.641, 28.593, 0.508)
pt3dadd(3.976, 54.521, 28.595, 0.534)
pt3dadd(3.975, 54.401, 28.597, 0.562)
pt3dadd(3.974, 54.281, 28.599, 0.588)
pt3dadd(3.972, 54.161, 28.601, 0.614)
pt3dadd(3.971, 54.041, 28.603, 0.642)
pt3dadd(3.97, 53.921, 28.605, 0.668)
pt3dadd(3.968, 53.801, 28.608, 0.694)
pt3dadd(3.967, 53.681, 28.61, 0.722)
pt3dadd(3.965, 53.561, 28.614, 0.758)
pt3dadd(3.962, 53.442, 28.618, 0.794)
pt3dadd(3.96, 53.322, 28.622, 0.83)
pt3dadd(3.957, 53.202, 28.626, 0.866)
pt3dadd(3.955, 53.082, 28.63, 0.9)
pt3dadd(3.953, 52.962, 28.635, 0.936)
pt3dadd(3.95, 52.842, 28.639, 0.972)
pt3dadd(3.948, 52.722, 28.643, 1.008)
pt3dadd(3.945, 52.602, 28.647, 1.044)
pt3dadd(3.943, 52.483, 28.651, 1.072)
pt3dadd(3.938, 52.363, 28.659, 1.048)
pt3dadd(3.934, 52.243, 28.667, 1.026)
pt3dadd(3.93, 52.124, 28.674, 1.002)
pt3dadd(3.925, 52.004, 28.682, 0.978)
pt3dadd(3.921, 51.885, 28.689, 0.956)
pt3dadd(3.917, 51.765, 28.697, 0.932)
pt3dadd(3.912, 51.645, 28.705, 0.908)
pt3dadd(3.908, 51.526, 28.712, 0.886)
pt3dadd(3.904, 51.406, 28.72, 0.862)
pt3dadd(3.899, 51.287, 28.728, 0.834)
pt3dadd(3.89, 51.168, 28.739, 0.778)
pt3dadd(3.881, 51.049, 28.751, 0.72)
pt3dadd(3.872, 50.93, 28.763, 0.664)
pt3dadd(3.862, 50.812, 28.775, 0.606)
pt3dadd(3.853, 50.693, 28.786, 0.548)
pt3dadd(3.844, 50.574, 28.798, 0.492)
pt3dadd(3.835, 50.455, 28.81, 0.434)
pt3dadd(3.826, 50.336, 28.821, 0.378)
pt3dadd(3.817, 50.217, 28.833, 0.32)
pt3dadd(3.807, 50.1, 28.847, 0.272)
pt3dadd(3.793, 49.988, 28.883, 0.302)
pt3dadd(3.779, 49.877, 28.918, 0.33)
pt3dadd(3.765, 49.765, 28.954, 0.358)
pt3dadd(3.751, 49.654, 28.989, 0.386)
pt3dadd(3.737, 49.543, 29.024, 0.414)
pt3dadd(3.723, 49.431, 29.06, 0.444)
pt3dadd(3.709, 49.32, 29.095, 0.472)
pt3dadd(3.695, 49.209, 29.13, 0.5)
pt3dadd(3.681, 49.097, 29.166, 0.528)
pt3dadd(3.663, 48.986, 29.2, 0.558)
pt3dadd(3.628, 48.876, 29.228, 0.594)
pt3dadd(3.593, 48.767, 29.256, 0.628)
pt3dadd(3.558, 48.657, 29.285, 0.664)
pt3dadd(3.522, 48.548, 29.313, 0.7)
pt3dadd(3.487, 48.438, 29.341, 0.734)
pt3dadd(3.452, 48.328, 29.369, 0.77)
pt3dadd(3.417, 48.219, 29.397, 0.804)
pt3dadd(3.381, 48.109, 29.425, 0.84)
pt3dadd(3.346, 48, 29.454, 0.874)
pt3dadd(3.309, 47.89, 29.48, 0.904)
pt3dadd(3.266, 47.78, 29.499, 0.914)
pt3dadd(3.223, 47.671, 29.518, 0.926)
pt3dadd(3.18, 47.561, 29.537, 0.936)
pt3dadd(3.138, 47.451, 29.557, 0.946)
pt3dadd(3.095, 47.342, 29.576, 0.958)
pt3dadd(3.052, 47.232, 29.595, 0.968)
pt3dadd(3.009, 47.122, 29.614, 0.978)
pt3dadd(2.966, 47.013, 29.634, 0.988)
pt3dadd(2.923, 46.903, 29.653, 1)
pt3dadd(2.883, 46.792, 29.67, 0.998)
pt3dadd(2.848, 46.678, 29.681, 0.966)
pt3dadd(2.813, 46.564, 29.693, 0.932)
pt3dadd(2.777, 46.45, 29.704, 0.9)
pt3dadd(2.742, 46.336, 29.715, 0.866)
pt3dadd(2.707, 46.222, 29.727, 0.834)
pt3dadd(2.672, 46.108, 29.738, 0.8)
pt3dadd(2.637, 45.994, 29.75, 0.768)
pt3dadd(2.602, 45.88, 29.761, 0.734)
pt3dadd(2.567, 45.766, 29.772, 0.702)
pt3dadd(2.534, 45.652, 29.781, 0.678)
pt3dadd(2.508, 45.535, 29.785, 0.678)
pt3dadd(2.482, 45.418, 29.788, 0.678)
pt3dadd(2.455, 45.301, 29.792, 0.678)
pt3dadd(2.429, 45.184, 29.795, 0.678)
pt3dadd(2.402, 45.067, 29.799, 0.678)
pt3dadd(2.376, 44.95, 29.802, 0.678)
pt3dadd(2.35, 44.833, 29.806, 0.678)
pt3dadd(2.323, 44.716, 29.809, 0.678)
pt3dadd(2.297, 44.599, 29.813, 0.678)
pt3dadd(2.266, 44.483, 29.817, 0.686)
pt3dadd(2.223, 44.371, 29.825, 0.718)
pt3dadd(2.181, 44.259, 29.832, 0.75)
pt3dadd(2.138, 44.148, 29.84, 0.782)
pt3dadd(2.096, 44.036, 29.847, 0.814)
pt3dadd(2.053, 43.924, 29.855, 0.846)
pt3dadd(2.011, 43.812, 29.862, 0.878)
pt3dadd(1.968, 43.7, 29.87, 0.91)
pt3dadd(1.926, 43.588, 29.877, 0.942)
pt3dadd(1.883, 43.477, 29.885, 0.974)
pt3dadd(1.843, 43.364, 29.894, 0.994)
pt3dadd(1.809, 43.25, 29.906, 0.984)
pt3dadd(1.775, 43.136, 29.918, 0.974)
pt3dadd(1.741, 43.022, 29.93, 0.964)
pt3dadd(1.707, 42.907, 29.942, 0.954)
pt3dadd(1.673, 42.793, 29.954, 0.944)
pt3dadd(1.639, 42.679, 29.966, 0.934)
pt3dadd(1.605, 42.565, 29.978, 0.922)
pt3dadd(1.571, 42.451, 29.99, 0.912)
pt3dadd(1.537, 42.337, 30.002, 0.902)
pt3dadd(1.507, 42.223, 30.018, 0.884)
pt3dadd(1.486, 42.109, 30.045, 0.848)
pt3dadd(1.465, 41.995, 30.072, 0.81)
pt3dadd(1.444, 41.881, 30.099, 0.774)
pt3dadd(1.423, 41.768, 30.125, 0.736)
pt3dadd(1.402, 41.654, 30.152, 0.7)
pt3dadd(1.381, 41.54, 30.179, 0.664)
pt3dadd(1.36, 41.427, 30.206, 0.626)
pt3dadd(1.339, 41.313, 30.233, 0.59)
pt3dadd(1.318, 41.199, 30.259, 0.552)
pt3dadd(1.303, 41.088, 30.293, 0.518)
pt3dadd(1.294, 40.98, 30.336, 0.488)
pt3dadd(1.285, 40.872, 30.378, 0.458)
pt3dadd(1.277, 40.763, 30.421, 0.426)
pt3dadd(1.268, 40.655, 30.463, 0.396)
pt3dadd(1.259, 40.547, 30.506, 0.366)
pt3dadd(1.25, 40.439, 30.549, 0.334)
pt3dadd(1.242, 40.33, 30.591, 0.304)
pt3dadd(1.233, 40.222, 30.634, 0.274)
pt3dadd(1.224, 40.114, 30.676, 0.242)
pt3dadd(1.221, 40.004, 30.716, 0.226)
pt3dadd(1.224, 39.892, 30.752, 0.226)
pt3dadd(1.227, 39.78, 30.788, 0.226)
pt3dadd(1.231, 39.669, 30.824, 0.226)
pt3dadd(1.234, 39.557, 30.861, 0.226)
pt3dadd(1.238, 39.445, 30.897, 0.226)
pt3dadd(1.241, 39.333, 30.933, 0.226)
pt3dadd(1.244, 39.221, 30.969, 0.226)
pt3dadd(1.248, 39.11, 31.006, 0.226)
pt3dadd(1.251, 38.998, 31.042, 0.226)
pt3dadd(1.256, 38.889, 31.084, 0.226)
pt3dadd(1.264, 38.785, 31.133, 0.226)
pt3dadd(1.272, 38.68, 31.181, 0.226)
pt3dadd(1.28, 38.576, 31.23, 0.226)
pt3dadd(1.288, 38.472, 31.279, 0.226)
pt3dadd(1.295, 38.367, 31.328, 0.226)
pt3dadd(1.303, 38.263, 31.377, 0.226)
pt3dadd(1.311, 38.158, 31.426, 0.226)
pt3dadd(1.319, 38.054, 31.474, 0.226)
pt3dadd(1.327, 37.949, 31.523, 0.226)
pt3dadd(1.337, 37.843, 31.568, 0.244)
pt3dadd(1.35, 37.733, 31.607, 0.284)
}
}
proc shape3d_89() {
dend_7[6] { pt3dadd(1.363, 37.624, 31.647, 0.322)
pt3dadd(1.376, 37.515, 31.687, 0.36)
pt3dadd(1.389, 37.405, 31.727, 0.4)
pt3dadd(1.402, 37.296, 31.767, 0.438)
pt3dadd(1.415, 37.187, 31.806, 0.478)
pt3dadd(1.428, 37.077, 31.846, 0.516)
pt3dadd(1.441, 36.968, 31.886, 0.556)
pt3dadd(1.454, 36.859, 31.926, 0.594)
pt3dadd(1.482, 36.751, 31.961, 0.622)
pt3dadd(1.525, 36.646, 31.994, 0.638)
pt3dadd(1.568, 36.541, 32.026, 0.654)
pt3dadd(1.61, 36.436, 32.059, 0.67)
pt3dadd(1.653, 36.331, 32.091, 0.686)
pt3dadd(1.696, 36.225, 32.123, 0.704)
pt3dadd(1.739, 36.12, 32.156, 0.72)
pt3dadd(1.781, 36.015, 32.188, 0.736)
pt3dadd(1.824, 35.91, 32.221, 0.752)
pt3dadd(1.867, 35.805, 32.253, 0.768)
pt3dadd(1.914, 35.704, 32.291, 0.754)
pt3dadd(1.962, 35.605, 32.33, 0.732)
pt3dadd(2.01, 35.506, 32.37, 0.708)
pt3dadd(2.058, 35.407, 32.41, 0.686)
pt3dadd(2.106, 35.308, 32.449, 0.662)
pt3dadd(2.155, 35.208, 32.489, 0.64)
pt3dadd(2.203, 35.109, 32.528, 0.616)
pt3dadd(2.251, 35.01, 32.568, 0.594)
pt3dadd(2.299, 34.911, 32.607, 0.57)
pt3dadd(2.347, 34.812, 32.647, 0.548)
pt3dadd(2.38, 34.705, 32.682, 0.546)
pt3dadd(2.41, 34.596, 32.717, 0.548)
pt3dadd(2.44, 34.488, 32.751, 0.55)
pt3dadd(2.469, 34.379, 32.786, 0.554)
pt3dadd(2.499, 34.271, 32.821, 0.556)
pt3dadd(2.529, 34.162, 32.855, 0.558)
pt3dadd(2.559, 34.053, 32.89, 0.56)
pt3dadd(2.589, 33.945, 32.924, 0.564)
pt3dadd(2.619, 33.836, 32.959, 0.566)
pt3dadd(2.649, 33.728, 32.994, 0.568)
pt3dadd(2.669, 33.612, 33.014, 0.57)
pt3dadd(2.69, 33.497, 33.034, 0.572)
pt3dadd(2.71, 33.381, 33.054, 0.574)
pt3dadd(2.73, 33.265, 33.073, 0.576)
pt3dadd(2.75, 33.149, 33.093, 0.58)
pt3dadd(2.77, 33.033, 33.113, 0.582)
pt3dadd(2.79, 32.917, 33.132, 0.584)
pt3dadd(2.81, 32.801, 33.152, 0.586)
pt3dadd(2.83, 32.685, 33.172, 0.588)
pt3dadd(2.85, 32.569, 33.192, 0.59)
pt3dadd(2.875, 32.452, 33.201, 0.576)
pt3dadd(2.899, 32.335, 33.21, 0.562)
pt3dadd(2.924, 32.218, 33.219, 0.548)
pt3dadd(2.948, 32.101, 33.228, 0.534)
pt3dadd(2.973, 31.984, 33.236, 0.52)
pt3dadd(2.997, 31.867, 33.245, 0.506)
pt3dadd(3.021, 31.75, 33.254, 0.494)
pt3dadd(3.046, 31.633, 33.263, 0.48)
pt3dadd(3.07, 31.516, 33.272, 0.466)
pt3dadd(3.096, 31.4, 33.28, 0.452)
pt3dadd(3.143, 31.289, 33.282, 0.452)
pt3dadd(3.191, 31.179, 33.283, 0.452)
pt3dadd(3.238, 31.069, 33.285, 0.452)
pt3dadd(3.286, 30.959, 33.286, 0.452)
pt3dadd(3.333, 30.849, 33.287, 0.452)
pt3dadd(3.381, 30.738, 33.289, 0.452)
pt3dadd(3.428, 30.628, 33.29, 0.452)
pt3dadd(3.476, 30.518, 33.291, 0.452)
pt3dadd(3.523, 30.408, 33.293, 0.452)
pt3dadd(3.57, 30.298, 33.294, 0.452)
pt3dadd(3.607, 30.183, 33.297, 0.434)
pt3dadd(3.644, 30.069, 33.3, 0.414)
pt3dadd(3.681, 29.955, 33.303, 0.396)
pt3dadd(3.717, 29.841, 33.306, 0.378)
pt3dadd(3.754, 29.727, 33.308, 0.36)
pt3dadd(3.791, 29.612, 33.311, 0.342)
pt3dadd(3.828, 29.498, 33.314, 0.324)
pt3dadd(3.864, 29.384, 33.317, 0.306)
pt3dadd(3.901, 29.27, 33.32, 0.288)
pt3dadd(3.937, 29.156, 33.323, 0.27)
pt3dadd(3.967, 29.04, 33.329, 0.266)
pt3dadd(3.997, 28.923, 33.335, 0.26)
pt3dadd(4.026, 28.807, 33.341, 0.256)
pt3dadd(4.056, 28.691, 33.347, 0.252)
pt3dadd(4.086, 28.575, 33.353, 0.248)
pt3dadd(4.115, 28.459, 33.36, 0.244)
pt3dadd(4.145, 28.343, 33.366, 0.238)
pt3dadd(4.175, 28.227, 33.372, 0.234)
pt3dadd(4.204, 28.111, 33.378, 0.23)
pt3dadd(4.235, 27.995, 33.384, 0.228)
pt3dadd(4.273, 27.882, 33.394, 0.258)
pt3dadd(4.311, 27.769, 33.403, 0.288)
pt3dadd(4.349, 27.656, 33.413, 0.316)
pt3dadd(4.387, 27.542, 33.422, 0.346)
pt3dadd(4.425, 27.429, 33.432, 0.376)
pt3dadd(4.463, 27.316, 33.441, 0.406)
pt3dadd(4.501, 27.203, 33.451, 0.436)
pt3dadd(4.539, 27.089, 33.46, 0.466)
pt3dadd(4.577, 26.976, 33.47, 0.494)
pt3dadd(4.615, 26.863, 33.48, 0.524)
pt3dadd(4.658, 26.753, 33.499, 0.554)
pt3dadd(4.7, 26.643, 33.518, 0.582)
pt3dadd(4.742, 26.533, 33.537, 0.61)
pt3dadd(4.784, 26.423, 33.556, 0.64)
pt3dadd(4.827, 26.313, 33.575, 0.668)
pt3dadd(4.869, 26.203, 33.593, 0.696)
pt3dadd(4.911, 26.093, 33.612, 0.726)
pt3dadd(4.953, 25.983, 33.631, 0.754)
pt3dadd(4.996, 25.873, 33.65, 0.782)
pt3dadd(5.036, 25.764, 33.672, 0.8)
pt3dadd(5.066, 25.657, 33.71, 0.764)
pt3dadd(5.097, 25.55, 33.747, 0.73)
pt3dadd(5.128, 25.443, 33.785, 0.696)
pt3dadd(5.158, 25.336, 33.822, 0.66)
pt3dadd(5.189, 25.229, 33.86, 0.626)
pt3dadd(5.219, 25.122, 33.897, 0.59)
pt3dadd(5.25, 25.015, 33.935, 0.556)
pt3dadd(5.281, 24.908, 33.972, 0.522)
pt3dadd(5.311, 24.801, 34.01, 0.486)
pt3dadd(5.34, 24.693, 34.045, 0.454)
pt3dadd(5.363, 24.58, 34.072, 0.436)
pt3dadd(5.386, 24.467, 34.099, 0.416)
pt3dadd(5.409, 24.353, 34.126, 0.398)
pt3dadd(5.432, 24.24, 34.153, 0.378)
pt3dadd(5.455, 24.127, 34.18, 0.36)
pt3dadd(5.478, 24.014, 34.207, 0.34)
pt3dadd(5.501, 23.9, 34.234, 0.322)
pt3dadd(5.524, 23.787, 34.261, 0.302)
pt3dadd(5.547, 23.674, 34.289, 0.284)
pt3dadd(5.569, 23.56, 34.314, 0.278)
pt3dadd(5.588, 23.444, 34.335, 0.336)
pt3dadd(5.608, 23.329, 34.356, 0.394)
pt3dadd(5.627, 23.213, 34.377, 0.454)
pt3dadd(5.646, 23.097, 34.397, 0.512)
pt3dadd(5.666, 22.981, 34.418, 0.57)
pt3dadd(5.685, 22.866, 34.439, 0.628)
pt3dadd(5.704, 22.75, 34.46, 0.686)
pt3dadd(5.724, 22.634, 34.48, 0.744)
pt3dadd(5.743, 22.518, 34.501, 0.802)
pt3dadd(5.767, 22.403, 34.521, 0.856)
pt3dadd(5.811, 22.293, 34.535, 0.884)
pt3dadd(5.854, 22.183, 34.55, 0.912)
pt3dadd(5.898, 22.072, 34.564, 0.94)
pt3dadd(5.942, 21.962, 34.579, 0.968)
pt3dadd(5.985, 21.851, 34.593, 0.998)
pt3dadd(6.029, 21.741, 34.608, 1.026)
pt3dadd(6.072, 21.63, 34.622, 1.054)
pt3dadd(6.116, 21.52, 34.636, 1.082)
pt3dadd(6.16, 21.41, 34.651, 1.11)
pt3dadd(6.207, 21.303, 34.67, 1.12)
pt3dadd(6.264, 21.203, 34.701, 1.086)
pt3dadd(6.321, 21.104, 34.731, 1.05)
pt3dadd(6.377, 21.005, 34.761, 1.016)
pt3dadd(6.434, 20.905, 34.791, 0.982)
pt3dadd(6.491, 20.806, 34.821, 0.948)
pt3dadd(6.547, 20.706, 34.852, 0.914)
pt3dadd(6.604, 20.607, 34.882, 0.88)
pt3dadd(6.66, 20.508, 34.912, 0.846)
pt3dadd(6.717, 20.408, 34.943, 0.812)
pt3dadd(6.776, 20.312, 34.977, 0.772)
pt3dadd(6.837, 20.22, 35.015, 0.726)
pt3dadd(6.898, 20.127, 35.054, 0.68)
pt3dadd(6.959, 20.035, 35.092, 0.636)
pt3dadd(7.02, 19.942, 35.13, 0.59)
pt3dadd(7.081, 19.85, 35.168, 0.544)
pt3dadd(7.142, 19.757, 35.207, 0.5)
pt3dadd(7.203, 19.664, 35.245, 0.454)
pt3dadd(7.264, 19.572, 35.283, 0.408)
pt3dadd(7.325, 19.479, 35.321, 0.364)
pt3dadd(7.382, 19.38, 35.349, 0.338)
pt3dadd(7.435, 19.276, 35.371, 0.326)
pt3dadd(7.489, 19.171, 35.393, 0.314)
pt3dadd(7.543, 19.067, 35.415, 0.302)
pt3dadd(7.597, 18.963, 35.436, 0.29)
pt3dadd(7.65, 18.859, 35.458, 0.278)
pt3dadd(7.704, 18.755, 35.48, 0.266)
pt3dadd(7.758, 18.651, 35.501, 0.254)
pt3dadd(7.812, 18.547, 35.523, 0.242)
pt3dadd(7.866, 18.443, 35.545, 0.23)
pt3dadd(7.901, 18.33, 35.558, 0.226)
pt3dadd(7.93, 18.214, 35.568, 0.226)
pt3dadd(7.959, 18.099, 35.578, 0.226)
pt3dadd(7.988, 17.983, 35.588, 0.226)
pt3dadd(8.018, 17.867, 35.598, 0.226)
pt3dadd(8.047, 17.751, 35.608, 0.226)
pt3dadd(8.076, 17.636, 35.618, 0.226)
pt3dadd(8.105, 17.52, 35.629, 0.226)
pt3dadd(8.134, 17.404, 35.639, 0.226)
pt3dadd(8.163, 17.288, 35.649, 0.226)
pt3dadd(8.183, 17.17, 35.654, 0.226)
pt3dadd(8.199, 17.051, 35.658, 0.226)
pt3dadd(8.216, 16.933, 35.662, 0.226)
pt3dadd(8.233, 16.814, 35.665, 0.226)
pt3dadd(8.249, 16.695, 35.669, 0.226)
pt3dadd(8.266, 16.576, 35.673, 0.226)
pt3dadd(8.283, 16.458, 35.677, 0.226)
pt3dadd(8.299, 16.339, 35.681, 0.226)
pt3dadd(8.316, 16.22, 35.684, 0.226)
pt3dadd(8.333, 16.101, 35.688, 0.226)
pt3dadd(8.346, 15.982, 35.695, 0.232)
pt3dadd(8.358, 15.864, 35.704, 0.238)
pt3dadd(8.37, 15.744, 35.712, 0.244)
}
}
proc shape3d_90() {
dend_7[6] { pt3dadd(8.382, 15.626, 35.72, 0.252)
pt3dadd(8.394, 15.507, 35.729, 0.258)
pt3dadd(8.406, 15.387, 35.737, 0.266)
pt3dadd(8.418, 15.269, 35.745, 0.272)
pt3dadd(8.43, 15.15, 35.753, 0.28)
pt3dadd(8.442, 15.031, 35.761, 0.286)
pt3dadd(8.454, 14.912, 35.77, 0.292)
pt3dadd(8.476, 14.795, 35.784, 0.338)
pt3dadd(8.5, 14.679, 35.8, 0.396)
pt3dadd(8.524, 14.563, 35.817, 0.452)
pt3dadd(8.548, 14.447, 35.833, 0.508)
pt3dadd(8.572, 14.331, 35.849, 0.564)
pt3dadd(8.597, 14.216, 35.866, 0.62)
pt3dadd(8.621, 14.1, 35.882, 0.678)
pt3dadd(8.645, 13.984, 35.898, 0.734)
pt3dadd(8.669, 13.868, 35.914, 0.79)
pt3dadd(8.694, 13.752, 35.931, 0.846)
pt3dadd(8.759, 13.669, 35.976, 0.798)
pt3dadd(8.828, 13.589, 36.023, 0.74)
pt3dadd(8.896, 13.508, 36.071, 0.684)
pt3dadd(8.965, 13.428, 36.118, 0.626)
pt3dadd(9.033, 13.347, 36.165, 0.57)
pt3dadd(9.102, 13.267, 36.213, 0.514)
pt3dadd(9.17, 13.186, 36.26, 0.456)
pt3dadd(9.239, 13.106, 36.307, 0.4)
pt3dadd(9.307, 13.025, 36.355, 0.342)
pt3dadd(9.376, 12.945, 36.402, 0.286)
pt3dadd(9.44, 12.85, 36.431, 0.328)
pt3dadd(9.504, 12.754, 36.46, 0.374)
pt3dadd(9.568, 12.658, 36.489, 0.418)
pt3dadd(9.631, 12.563, 36.518, 0.464)
pt3dadd(9.695, 12.467, 36.547, 0.51)
pt3dadd(9.759, 12.372, 36.576, 0.554)
pt3dadd(9.823, 12.276, 36.604, 0.6)
pt3dadd(9.887, 12.181, 36.633, 0.644)
pt3dadd(9.951, 12.085, 36.662, 0.69)
pt3dadd(10.015, 11.99, 36.69, 0.734)
pt3dadd(10.088, 11.895, 36.701, 0.752)
pt3dadd(10.161, 11.801, 36.711, 0.768)
pt3dadd(10.234, 11.707, 36.722, 0.786)
pt3dadd(10.307, 11.612, 36.733, 0.804)
pt3dadd(10.38, 11.518, 36.743, 0.822)
pt3dadd(10.453, 11.424, 36.754, 0.84)
pt3dadd(10.526, 11.329, 36.765, 0.856)
pt3dadd(10.599, 11.235, 36.776, 0.874)
pt3dadd(10.672, 11.141, 36.786, 0.892)
pt3dadd(10.732, 11.04, 36.794, 0.898)
pt3dadd(10.767, 10.925, 36.795, 0.88)
pt3dadd(10.802, 10.81, 36.796, 0.864)
pt3dadd(10.837, 10.695, 36.797, 0.846)
pt3dadd(10.872, 10.58, 36.798, 0.828)
pt3dadd(10.906, 10.465, 36.799, 0.81)
pt3dadd(10.941, 10.35, 36.8, 0.794)
pt3dadd(10.976, 10.236, 36.801, 0.776)
pt3dadd(11.011, 10.121, 36.802, 0.758)
pt3dadd(11.045, 10.006, 36.803, 0.74)
pt3dadd(11.075, 9.89, 36.805, 0.718)
pt3dadd(11.097, 9.772, 36.806, 0.682)
pt3dadd(11.118, 9.654, 36.808, 0.648)
pt3dadd(11.139, 9.536, 36.81, 0.614)
pt3dadd(11.161, 9.418, 36.812, 0.58)
pt3dadd(11.182, 9.3, 36.814, 0.544)
pt3dadd(11.204, 9.182, 36.816, 0.51)
pt3dadd(11.225, 9.063, 36.818, 0.476)
pt3dadd(11.246, 8.945, 36.819, 0.442)
pt3dadd(11.268, 8.827, 36.821, 0.408)
pt3dadd(11.289, 8.709, 36.824, 0.382)
pt3dadd(11.31, 8.591, 36.827, 0.372)
pt3dadd(11.33, 8.473, 36.83, 0.362)
pt3dadd(11.351, 8.355, 36.833, 0.352)
pt3dadd(11.372, 8.237, 36.837, 0.342)
pt3dadd(11.393, 8.119, 36.84, 0.332)
pt3dadd(11.413, 8.001, 36.843, 0.322)
pt3dadd(11.434, 7.882, 36.847, 0.312)
pt3dadd(11.455, 7.764, 36.85, 0.302)
pt3dadd(11.476, 7.646, 36.853, 0.292)
pt3dadd(11.508, 7.531, 36.858, 0.302)
pt3dadd(11.555, 7.421, 36.864, 0.338)
pt3dadd(11.602, 7.311, 36.87, 0.374)
pt3dadd(11.649, 7.201, 36.876, 0.408)
pt3dadd(11.696, 7.091, 36.882, 0.444)
pt3dadd(11.743, 6.981, 36.888, 0.48)
pt3dadd(11.79, 6.871, 36.894, 0.516)
pt3dadd(11.838, 6.761, 36.901, 0.552)
pt3dadd(11.885, 6.651, 36.907, 0.588)
pt3dadd(11.932, 6.54, 36.913, 0.624)
pt3dadd(11.975, 6.429, 36.92, 0.652)
pt3dadd(12.011, 6.315, 36.931, 0.674)
pt3dadd(12.048, 6.201, 36.941, 0.694)
pt3dadd(12.084, 6.088, 36.951, 0.714)
pt3dadd(12.12, 5.974, 36.961, 0.734)
pt3dadd(12.157, 5.86, 36.971, 0.754)
pt3dadd(12.194, 5.747, 36.981, 0.774)
pt3dadd(12.23, 5.633, 36.991, 0.796)
pt3dadd(12.267, 5.519, 37.001, 0.816)
pt3dadd(12.303, 5.406, 37.011, 0.836)
pt3dadd(12.335, 5.293, 37.029, 0.856)
pt3dadd(12.362, 5.181, 37.058, 0.874)
pt3dadd(12.389, 5.07, 37.087, 0.894)
pt3dadd(12.416, 4.958, 37.116, 0.912)
pt3dadd(12.442, 4.846, 37.145, 0.93)
pt3dadd(12.469, 4.735, 37.174, 0.95)
pt3dadd(12.496, 4.623, 37.203, 0.968)
pt3dadd(12.523, 4.511, 37.232, 0.988)
pt3dadd(12.549, 4.4, 37.261, 1.006)
pt3dadd(12.576, 4.288, 37.29, 1.024)
pt3dadd(12.605, 4.177, 37.32, 1.028)
pt3dadd(12.637, 4.067, 37.349, 1.02)
pt3dadd(12.669, 3.957, 37.379, 1.01)
pt3dadd(12.701, 3.846, 37.408, 1)
pt3dadd(12.732, 3.736, 37.438, 0.99)
pt3dadd(12.764, 3.626, 37.467, 0.98)
pt3dadd(12.796, 3.516, 37.497, 0.97)
pt3dadd(12.828, 3.406, 37.526, 0.96)
pt3dadd(12.859, 3.296, 37.556, 0.95)
pt3dadd(12.891, 3.186, 37.586, 0.94)
pt3dadd(12.924, 3.073, 37.606, 0.932)
pt3dadd(12.957, 2.959, 37.62, 0.924)
pt3dadd(12.99, 2.845, 37.635, 0.916)
pt3dadd(13.024, 2.731, 37.649, 0.908)
pt3dadd(13.057, 2.617, 37.663, 0.9)
pt3dadd(13.09, 2.503, 37.677, 0.892)
pt3dadd(13.124, 2.389, 37.691, 0.884)
pt3dadd(13.157, 2.275, 37.705, 0.876)
pt3dadd(13.19, 2.161, 37.72, 0.868)
pt3dadd(13.224, 2.047, 37.734, 0.86)
pt3dadd(13.218, 1.932, 37.729, 0.852)
pt3dadd(13.192, 1.816, 37.714, 0.842)
pt3dadd(13.166, 1.7, 37.698, 0.832)
pt3dadd(13.14, 1.584, 37.683, 0.822)
pt3dadd(13.115, 1.469, 37.668, 0.812)
pt3dadd(13.089, 1.353, 37.653, 0.802)
pt3dadd(13.063, 1.237, 37.638, 0.792)
pt3dadd(13.037, 1.121, 37.623, 0.782)
pt3dadd(13.011, 1.005, 37.608, 0.772)
pt3dadd(12.966, 0.946, 37.549, 0.734)
pt3dadd(12.908, 0.919, 37.464, 0.678)
pt3dadd(12.851, 0.892, 37.379, 0.62)
pt3dadd(12.793, 0.865, 37.294, 0.564)
pt3dadd(12.736, 0.839, 37.209, 0.508)
pt3dadd(12.679, 0.812, 37.124, 0.452)
pt3dadd(12.621, 0.785, 37.039, 0.396)
pt3dadd(12.564, 0.758, 36.955, 0.338)
pt3dadd(12.506, 0.731, 36.87, 0.282)
pt3dadd(12.449, 0.705, 36.785, 0.226)
}
dend_7[7] {pt3dclear()
pt3dadd(9.971, 86.833, 24.015, 0.226)
pt3dadd(9.969, 86.826, 24.015, 0.226)
pt3dadd(9.944, 86.709, 24.004, 0.226)
pt3dadd(9.919, 86.592, 23.993, 0.226)
pt3dadd(9.894, 86.476, 23.982, 0.226)
pt3dadd(9.869, 86.359, 23.972, 0.226)
pt3dadd(9.842, 86.244, 23.959, 0.228)
pt3dadd(9.81, 86.13, 23.941, 0.238)
pt3dadd(9.777, 86.016, 23.922, 0.246)
pt3dadd(9.745, 85.903, 23.904, 0.256)
pt3dadd(9.713, 85.789, 23.886, 0.264)
pt3dadd(9.681, 85.676, 23.868, 0.274)
pt3dadd(9.649, 85.562, 23.85, 0.282)
pt3dadd(9.617, 85.449, 23.832, 0.292)
pt3dadd(9.585, 85.335, 23.814, 0.3)
pt3dadd(9.552, 85.221, 23.796, 0.308)
pt3dadd(9.492, 85.15, 23.745, 0.36)
pt3dadd(9.418, 85.097, 23.679, 0.432)
pt3dadd(9.345, 85.044, 23.614, 0.504)
pt3dadd(9.271, 84.992, 23.548, 0.576)
pt3dadd(9.198, 84.939, 23.482, 0.648)
pt3dadd(9.124, 84.887, 23.417, 0.72)
pt3dadd(9.051, 84.834, 23.351, 0.792)
pt3dadd(8.977, 84.782, 23.285, 0.864)
pt3dadd(8.904, 84.729, 23.219, 0.936)
pt3dadd(8.83, 84.676, 23.153, 1.008)
pt3dadd(8.775, 84.594, 23.101, 0.992)
pt3dadd(8.728, 84.499, 23.055, 0.936)
pt3dadd(8.682, 84.403, 23.008, 0.88)
pt3dadd(8.635, 84.308, 22.962, 0.824)
pt3dadd(8.588, 84.212, 22.915, 0.768)
pt3dadd(8.542, 84.117, 22.869, 0.712)
pt3dadd(8.495, 84.021, 22.823, 0.656)
pt3dadd(8.448, 83.926, 22.776, 0.6)
pt3dadd(8.402, 83.83, 22.73, 0.544)
pt3dadd(8.355, 83.735, 22.683, 0.488)
pt3dadd(8.331, 83.623, 22.654, 0.512)
pt3dadd(8.312, 83.51, 22.627, 0.548)
pt3dadd(8.292, 83.396, 22.6, 0.586)
pt3dadd(8.272, 83.282, 22.573, 0.622)
pt3dadd(8.252, 83.168, 22.546, 0.66)
pt3dadd(8.232, 83.054, 22.519, 0.696)
pt3dadd(8.212, 82.94, 22.492, 0.734)
pt3dadd(8.193, 82.826, 22.465, 0.77)
pt3dadd(8.173, 82.713, 22.438, 0.808)
pt3dadd(8.153, 82.599, 22.412, 0.844)
pt3dadd(8.141, 82.488, 22.375, 0.84)
pt3dadd(8.13, 82.377, 22.337, 0.83)
pt3dadd(8.12, 82.267, 22.299, 0.82)
pt3dadd(8.109, 82.156, 22.261, 0.812)
pt3dadd(8.098, 82.046, 22.223, 0.802)
pt3dadd(8.088, 81.936, 22.184, 0.792)
pt3dadd(8.077, 81.825, 22.146, 0.782)
pt3dadd(8.066, 81.715, 22.108, 0.772)
pt3dadd(8.056, 81.604, 22.07, 0.762)
}
}
proc shape3d_91() {
dend_7[7] { pt3dadd(8.045, 81.494, 22.032, 0.752)
pt3dadd(8.031, 81.382, 21.997, 0.782)
pt3dadd(8.018, 81.271, 21.962, 0.818)
pt3dadd(8.004, 81.159, 21.927, 0.852)
pt3dadd(7.99, 81.048, 21.892, 0.888)
pt3dadd(7.977, 80.936, 21.857, 0.922)
pt3dadd(7.963, 80.824, 21.822, 0.956)
pt3dadd(7.949, 80.713, 21.787, 0.992)
pt3dadd(7.936, 80.601, 21.752, 1.026)
pt3dadd(7.922, 80.49, 21.717, 1.062)
pt3dadd(7.908, 80.378, 21.682, 1.096)
pt3dadd(7.881, 80.267, 21.653, 1.132)
pt3dadd(7.853, 80.155, 21.624, 1.17)
pt3dadd(7.825, 80.044, 21.595, 1.208)
pt3dadd(7.796, 79.932, 21.566, 1.244)
pt3dadd(7.768, 79.821, 21.538, 1.282)
pt3dadd(7.74, 79.71, 21.509, 1.32)
pt3dadd(7.711, 79.598, 21.48, 1.356)
pt3dadd(7.683, 79.487, 21.451, 1.394)
pt3dadd(7.654, 79.376, 21.423, 1.432)
pt3dadd(7.626, 79.264, 21.394, 1.468)
pt3dadd(7.576, 79.159, 21.371, 1.434)
pt3dadd(7.525, 79.054, 21.348, 1.4)
pt3dadd(7.475, 78.948, 21.326, 1.368)
pt3dadd(7.424, 78.843, 21.303, 1.334)
pt3dadd(7.373, 78.738, 21.28, 1.3)
pt3dadd(7.323, 78.632, 21.257, 1.266)
pt3dadd(7.272, 78.527, 21.234, 1.232)
pt3dadd(7.222, 78.422, 21.211, 1.198)
pt3dadd(7.171, 78.316, 21.189, 1.164)
pt3dadd(7.121, 78.211, 21.166, 1.13)
}
dend_7[8] {pt3dclear()
pt3dadd(7.121, 78.211, 21.166, 1.13)
pt3dadd(7.116, 78.198, 21.16, 1.128)
pt3dadd(7.077, 78.095, 21.12, 1.112)
pt3dadd(7.038, 77.993, 21.079, 1.094)
pt3dadd(6.999, 77.891, 21.038, 1.078)
pt3dadd(6.96, 77.788, 20.997, 1.062)
pt3dadd(6.919, 77.686, 20.956, 1.046)
pt3dadd(6.879, 77.584, 20.916, 1.028)
pt3dadd(6.839, 77.482, 20.876, 1.012)
pt3dadd(6.798, 77.38, 20.835, 0.996)
pt3dadd(6.758, 77.278, 20.795, 0.98)
pt3dadd(6.717, 77.176, 20.755, 0.962)
pt3dadd(6.677, 77.074, 20.715, 0.946)
pt3dadd(6.636, 76.971, 20.674, 0.93)
pt3dadd(6.596, 76.869, 20.634, 0.914)
pt3dadd(6.555, 76.767, 20.594, 0.896)
pt3dadd(6.505, 76.667, 20.559, 0.88)
pt3dadd(6.449, 76.567, 20.528, 0.864)
pt3dadd(6.394, 76.468, 20.496, 0.848)
pt3dadd(6.339, 76.369, 20.464, 0.832)
pt3dadd(6.283, 76.269, 20.432, 0.816)
pt3dadd(6.228, 76.17, 20.401, 0.8)
pt3dadd(6.173, 76.07, 20.369, 0.784)
pt3dadd(6.117, 75.971, 20.337, 0.768)
pt3dadd(6.062, 75.871, 20.306, 0.75)
pt3dadd(6.007, 75.772, 20.274, 0.734)
pt3dadd(5.961, 75.672, 20.235, 0.726)
pt3dadd(5.92, 75.571, 20.193, 0.72)
pt3dadd(5.879, 75.47, 20.151, 0.716)
pt3dadd(5.837, 75.369, 20.109, 0.71)
pt3dadd(5.796, 75.269, 20.067, 0.706)
pt3dadd(5.755, 75.168, 20.025, 0.7)
pt3dadd(5.713, 75.067, 19.983, 0.694)
pt3dadd(5.672, 74.967, 19.94, 0.69)
pt3dadd(5.631, 74.866, 19.898, 0.684)
pt3dadd(5.59, 74.765, 19.856, 0.68)
pt3dadd(5.554, 74.662, 19.814, 0.686)
pt3dadd(5.521, 74.558, 19.772, 0.7)
pt3dadd(5.488, 74.454, 19.731, 0.71)
pt3dadd(5.455, 74.351, 19.689, 0.724)
pt3dadd(5.421, 74.247, 19.647, 0.736)
pt3dadd(5.388, 74.143, 19.605, 0.748)
pt3dadd(5.355, 74.039, 19.563, 0.76)
pt3dadd(5.322, 73.935, 19.521, 0.772)
pt3dadd(5.288, 73.832, 19.479, 0.784)
pt3dadd(5.255, 73.728, 19.438, 0.796)
pt3dadd(5.222, 73.62, 19.405, 0.818)
pt3dadd(5.188, 73.51, 19.374, 0.844)
pt3dadd(5.154, 73.401, 19.344, 0.872)
pt3dadd(5.121, 73.292, 19.314, 0.898)
pt3dadd(5.087, 73.182, 19.284, 0.924)
pt3dadd(5.054, 73.073, 19.253, 0.95)
pt3dadd(5.02, 72.964, 19.223, 0.976)
pt3dadd(4.987, 72.855, 19.193, 1.002)
pt3dadd(4.953, 72.745, 19.163, 1.028)
pt3dadd(4.919, 72.636, 19.132, 1.054)
pt3dadd(4.868, 72.531, 19.109, 1.014)
pt3dadd(4.813, 72.429, 19.086, 0.958)
pt3dadd(4.758, 72.325, 19.064, 0.902)
pt3dadd(4.702, 72.222, 19.042, 0.846)
pt3dadd(4.647, 72.119, 19.02, 0.79)
pt3dadd(4.591, 72.016, 18.998, 0.734)
pt3dadd(4.536, 71.913, 18.975, 0.678)
pt3dadd(4.48, 71.81, 18.953, 0.622)
pt3dadd(4.425, 71.707, 18.931, 0.564)
pt3dadd(4.369, 71.604, 18.909, 0.508)
pt3dadd(4.314, 71.512, 18.866, 0.494)
pt3dadd(4.259, 71.421, 18.819, 0.49)
pt3dadd(4.204, 71.331, 18.771, 0.484)
pt3dadd(4.149, 71.241, 18.723, 0.48)
pt3dadd(4.094, 71.151, 18.676, 0.476)
pt3dadd(4.039, 71.061, 18.628, 0.47)
pt3dadd(3.984, 70.971, 18.58, 0.466)
pt3dadd(3.929, 70.881, 18.533, 0.462)
pt3dadd(3.874, 70.791, 18.485, 0.458)
pt3dadd(3.819, 70.701, 18.438, 0.452)
pt3dadd(3.754, 70.608, 18.407, 0.518)
pt3dadd(3.688, 70.513, 18.38, 0.596)
pt3dadd(3.622, 70.419, 18.353, 0.674)
pt3dadd(3.555, 70.324, 18.326, 0.754)
pt3dadd(3.489, 70.23, 18.299, 0.832)
pt3dadd(3.422, 70.135, 18.271, 0.91)
pt3dadd(3.356, 70.041, 18.244, 0.988)
pt3dadd(3.289, 69.946, 18.217, 1.068)
pt3dadd(3.223, 69.852, 18.19, 1.146)
pt3dadd(3.157, 69.757, 18.163, 1.224)
pt3dadd(3.112, 69.648, 18.146, 1.202)
pt3dadd(3.071, 69.537, 18.131, 1.16)
pt3dadd(3.03, 69.426, 18.116, 1.12)
pt3dadd(2.989, 69.314, 18.101, 1.078)
pt3dadd(2.949, 69.203, 18.086, 1.036)
pt3dadd(2.908, 69.091, 18.071, 0.996)
pt3dadd(2.867, 68.98, 18.056, 0.954)
pt3dadd(2.826, 68.868, 18.042, 0.914)
pt3dadd(2.785, 68.757, 18.027, 0.872)
pt3dadd(2.744, 68.646, 18.012, 0.832)
pt3dadd(2.717, 68.529, 18.006, 0.828)
pt3dadd(2.691, 68.412, 18.002, 0.826)
pt3dadd(2.665, 68.295, 17.997, 0.826)
pt3dadd(2.639, 68.178, 17.993, 0.826)
pt3dadd(2.613, 68.061, 17.988, 0.826)
pt3dadd(2.587, 67.944, 17.984, 0.826)
pt3dadd(2.561, 67.827, 17.98, 0.826)
pt3dadd(2.535, 67.71, 17.975, 0.824)
pt3dadd(2.509, 67.593, 17.971, 0.824)
pt3dadd(2.483, 67.476, 17.966, 0.824)
pt3dadd(2.464, 67.358, 17.963, 0.81)
pt3dadd(2.444, 67.239, 17.96, 0.794)
pt3dadd(2.425, 67.121, 17.957, 0.78)
pt3dadd(2.406, 67.002, 17.954, 0.764)
pt3dadd(2.387, 66.884, 17.951, 0.748)
pt3dadd(2.368, 66.765, 17.948, 0.734)
pt3dadd(2.348, 66.647, 17.945, 0.718)
pt3dadd(2.329, 66.529, 17.942, 0.704)
pt3dadd(2.31, 66.41, 17.939, 0.688)
pt3dadd(2.291, 66.292, 17.937, 0.672)
pt3dadd(2.259, 66.177, 17.931, 0.658)
pt3dadd(2.226, 66.061, 17.924, 0.646)
pt3dadd(2.193, 65.946, 17.918, 0.632)
pt3dadd(2.16, 65.831, 17.912, 0.618)
pt3dadd(2.127, 65.716, 17.906, 0.604)
pt3dadd(2.094, 65.601, 17.9, 0.59)
pt3dadd(2.061, 65.486, 17.894, 0.578)
pt3dadd(2.028, 65.37, 17.888, 0.564)
pt3dadd(1.995, 65.255, 17.882, 0.55)
pt3dadd(1.961, 65.14, 17.876, 0.538)
pt3dadd(1.911, 65.032, 17.865, 0.552)
pt3dadd(1.861, 64.924, 17.854, 0.566)
pt3dadd(1.811, 64.816, 17.843, 0.58)
pt3dadd(1.761, 64.707, 17.832, 0.594)
pt3dadd(1.711, 64.599, 17.821, 0.608)
pt3dadd(1.661, 64.491, 17.81, 0.622)
pt3dadd(1.611, 64.383, 17.8, 0.636)
pt3dadd(1.56, 64.274, 17.789, 0.65)
pt3dadd(1.51, 64.166, 17.778, 0.664)
pt3dadd(1.461, 64.058, 17.766, 0.678)
pt3dadd(1.415, 63.952, 17.739, 0.678)
pt3dadd(1.37, 63.846, 17.712, 0.678)
pt3dadd(1.324, 63.739, 17.685, 0.678)
pt3dadd(1.279, 63.633, 17.658, 0.678)
pt3dadd(1.234, 63.527, 17.631, 0.678)
pt3dadd(1.188, 63.421, 17.604, 0.678)
pt3dadd(1.143, 63.314, 17.577, 0.678)
pt3dadd(1.098, 63.208, 17.55, 0.678)
pt3dadd(1.052, 63.102, 17.523, 0.678)
pt3dadd(1.004, 63.004, 17.485, 0.674)
pt3dadd(0.951, 62.926, 17.424, 0.658)
pt3dadd(0.897, 62.847, 17.363, 0.642)
pt3dadd(0.844, 62.769, 17.302, 0.626)
pt3dadd(0.79, 62.69, 17.24, 0.612)
pt3dadd(0.737, 62.612, 17.179, 0.596)
pt3dadd(0.683, 62.533, 17.118, 0.58)
pt3dadd(0.63, 62.455, 17.057, 0.566)
pt3dadd(0.577, 62.376, 16.996, 0.55)
pt3dadd(0.523, 62.298, 16.935, 0.534)
pt3dadd(0.462, 62.225, 16.875, 0.52)
pt3dadd(0.392, 62.159, 16.815, 0.508)
pt3dadd(0.321, 62.093, 16.755, 0.494)
pt3dadd(0.251, 62.028, 16.695, 0.482)
pt3dadd(0.18, 61.962, 16.636, 0.47)
pt3dadd(0.11, 61.897, 16.576, 0.458)
pt3dadd(0.039, 61.831, 16.517, 0.444)
pt3dadd(-0.032, 61.766, 16.457, 0.432)
pt3dadd(-0.102, 61.7, 16.397, 0.42)
pt3dadd(-0.173, 61.635, 16.338, 0.406)
pt3dadd(-0.25, 61.586, 16.274, 0.426)
pt3dadd(-0.33, 61.549, 16.206, 0.466)
pt3dadd(-0.411, 61.512, 16.139, 0.504)
pt3dadd(-0.492, 61.475, 16.072, 0.544)
}
}
proc shape3d_92() {
dend_7[8] { pt3dadd(-0.573, 61.438, 16.005, 0.584)
pt3dadd(-0.654, 61.401, 15.938, 0.622)
pt3dadd(-0.735, 61.364, 15.871, 0.662)
pt3dadd(-0.815, 61.326, 15.804, 0.702)
pt3dadd(-0.896, 61.289, 15.737, 0.74)
pt3dadd(-0.977, 61.252, 15.67, 0.78)
pt3dadd(-1.063, 61.226, 15.603, 0.796)
pt3dadd(-1.15, 61.202, 15.537, 0.808)
pt3dadd(-1.237, 61.179, 15.471, 0.82)
pt3dadd(-1.324, 61.155, 15.406, 0.832)
pt3dadd(-1.411, 61.131, 15.34, 0.844)
pt3dadd(-1.498, 61.108, 15.274, 0.856)
pt3dadd(-1.586, 61.084, 15.208, 0.868)
pt3dadd(-1.673, 61.06, 15.142, 0.88)
pt3dadd(-1.76, 61.037, 15.076, 0.892)
pt3dadd(-1.847, 61.013, 15.01, 0.904)
pt3dadd(-1.936, 60.973, 14.952, 0.892)
pt3dadd(-2.026, 60.933, 14.895, 0.878)
pt3dadd(-2.116, 60.892, 14.838, 0.866)
pt3dadd(-2.205, 60.851, 14.781, 0.852)
pt3dadd(-2.295, 60.811, 14.724, 0.84)
pt3dadd(-2.385, 60.77, 14.667, 0.828)
pt3dadd(-2.475, 60.729, 14.61, 0.814)
pt3dadd(-2.564, 60.689, 14.553, 0.802)
pt3dadd(-2.654, 60.648, 14.496, 0.788)
pt3dadd(-2.745, 60.607, 14.44, 0.774)
pt3dadd(-2.841, 60.566, 14.391, 0.754)
pt3dadd(-2.938, 60.525, 14.343, 0.736)
pt3dadd(-3.034, 60.483, 14.294, 0.716)
pt3dadd(-3.13, 60.442, 14.245, 0.698)
pt3dadd(-3.226, 60.401, 14.196, 0.678)
pt3dadd(-3.322, 60.359, 14.147, 0.66)
pt3dadd(-3.419, 60.318, 14.098, 0.64)
pt3dadd(-3.515, 60.277, 14.049, 0.622)
pt3dadd(-3.611, 60.235, 14.001, 0.602)
pt3dadd(-3.708, 60.198, 13.951, 0.588)
pt3dadd(-3.808, 60.17, 13.9, 0.586)
pt3dadd(-3.907, 60.143, 13.849, 0.586)
pt3dadd(-4.007, 60.115, 13.799, 0.584)
pt3dadd(-4.107, 60.088, 13.748, 0.582)
pt3dadd(-4.206, 60.06, 13.697, 0.582)
pt3dadd(-4.306, 60.033, 13.646, 0.58)
pt3dadd(-4.406, 60.005, 13.595, 0.58)
pt3dadd(-4.505, 59.977, 13.545, 0.578)
pt3dadd(-4.605, 59.95, 13.494, 0.576)
pt3dadd(-4.708, 59.925, 13.448, 0.594)
pt3dadd(-4.818, 59.906, 13.41, 0.648)
pt3dadd(-4.928, 59.888, 13.373, 0.702)
pt3dadd(-5.037, 59.869, 13.337, 0.756)
pt3dadd(-5.147, 59.85, 13.3, 0.812)
pt3dadd(-5.257, 59.831, 13.263, 0.866)
pt3dadd(-5.367, 59.813, 13.226, 0.92)
pt3dadd(-5.477, 59.794, 13.189, 0.974)
pt3dadd(-5.587, 59.775, 13.152, 1.03)
pt3dadd(-5.697, 59.756, 13.115, 1.084)
pt3dadd(-5.804, 59.739, 13.073, 1.116)
pt3dadd(-5.905, 59.726, 13.02, 1.098)
pt3dadd(-6.006, 59.712, 12.968, 1.082)
pt3dadd(-6.107, 59.698, 12.915, 1.066)
pt3dadd(-6.209, 59.685, 12.863, 1.05)
pt3dadd(-6.31, 59.671, 12.81, 1.034)
pt3dadd(-6.411, 59.657, 12.757, 1.018)
pt3dadd(-6.512, 59.643, 12.705, 1.002)
pt3dadd(-6.613, 59.63, 12.652, 0.986)
pt3dadd(-6.714, 59.616, 12.6, 0.97)
pt3dadd(-6.817, 59.599, 12.551, 0.952)
pt3dadd(-6.923, 59.574, 12.508, 0.934)
pt3dadd(-7.029, 59.549, 12.466, 0.914)
pt3dadd(-7.135, 59.524, 12.424, 0.894)
pt3dadd(-7.241, 59.5, 12.382, 0.876)
pt3dadd(-7.347, 59.475, 12.34, 0.856)
pt3dadd(-7.453, 59.45, 12.297, 0.838)
pt3dadd(-7.559, 59.426, 12.255, 0.818)
pt3dadd(-7.665, 59.401, 12.213, 0.8)
pt3dadd(-7.771, 59.376, 12.171, 0.78)
pt3dadd(-7.871, 59.339, 12.127, 0.77)
pt3dadd(-7.961, 59.283, 12.081, 0.77)
pt3dadd(-8.052, 59.226, 12.035, 0.772)
pt3dadd(-8.142, 59.17, 11.989, 0.772)
pt3dadd(-8.232, 59.113, 11.943, 0.774)
pt3dadd(-8.323, 59.057, 11.898, 0.776)
pt3dadd(-8.413, 59, 11.852, 0.776)
pt3dadd(-8.504, 58.944, 11.806, 0.778)
pt3dadd(-8.594, 58.887, 11.76, 0.778)
pt3dadd(-8.684, 58.831, 11.714, 0.78)
pt3dadd(-8.762, 58.755, 11.672, 0.79)
pt3dadd(-8.834, 58.673, 11.631, 0.802)
pt3dadd(-8.907, 58.591, 11.59, 0.814)
pt3dadd(-8.979, 58.509, 11.55, 0.826)
pt3dadd(-9.051, 58.426, 11.509, 0.84)
pt3dadd(-9.124, 58.344, 11.468, 0.852)
pt3dadd(-9.196, 58.262, 11.427, 0.864)
pt3dadd(-9.268, 58.18, 11.387, 0.876)
pt3dadd(-9.341, 58.097, 11.346, 0.89)
pt3dadd(-9.413, 58.015, 11.305, 0.902)
pt3dadd(-9.487, 57.926, 11.281, 0.904)
pt3dadd(-9.562, 57.835, 11.26, 0.904)
pt3dadd(-9.636, 57.744, 11.239, 0.904)
pt3dadd(-9.711, 57.654, 11.218, 0.904)
pt3dadd(-9.785, 57.563, 11.197, 0.904)
pt3dadd(-9.86, 57.473, 11.176, 0.904)
pt3dadd(-9.934, 57.382, 11.155, 0.904)
pt3dadd(-10.009, 57.291, 11.134, 0.904)
pt3dadd(-10.083, 57.201, 11.113, 0.904)
pt3dadd(-10.158, 57.11, 11.092, 0.904)
pt3dadd(-10.234, 57.019, 11.081, 0.88)
pt3dadd(-10.311, 56.927, 11.072, 0.852)
pt3dadd(-10.388, 56.835, 11.063, 0.824)
pt3dadd(-10.465, 56.744, 11.054, 0.794)
pt3dadd(-10.542, 56.652, 11.046, 0.766)
pt3dadd(-10.619, 56.561, 11.037, 0.738)
pt3dadd(-10.695, 56.469, 11.028, 0.71)
pt3dadd(-10.772, 56.378, 11.019, 0.68)
pt3dadd(-10.849, 56.286, 11.01, 0.652)
pt3dadd(-10.926, 56.195, 11.001, 0.624)
pt3dadd(-11.004, 56.104, 10.996, 0.616)
pt3dadd(-11.082, 56.013, 10.991, 0.612)
pt3dadd(-11.16, 55.922, 10.986, 0.608)
pt3dadd(-11.238, 55.831, 10.981, 0.602)
pt3dadd(-11.317, 55.74, 10.976, 0.598)
pt3dadd(-11.395, 55.65, 10.971, 0.594)
pt3dadd(-11.473, 55.559, 10.966, 0.59)
pt3dadd(-11.551, 55.468, 10.962, 0.586)
pt3dadd(-11.629, 55.377, 10.957, 0.58)
pt3dadd(-11.708, 55.286, 10.952, 0.576)
pt3dadd(-11.787, 55.196, 10.951, 0.6)
pt3dadd(-11.867, 55.107, 10.951, 0.628)
pt3dadd(-11.947, 55.017, 10.951, 0.658)
pt3dadd(-12.027, 54.927, 10.951, 0.686)
pt3dadd(-12.106, 54.838, 10.951, 0.716)
pt3dadd(-12.186, 54.748, 10.951, 0.744)
pt3dadd(-12.266, 54.658, 10.951, 0.772)
pt3dadd(-12.346, 54.569, 10.95, 0.802)
pt3dadd(-12.425, 54.479, 10.95, 0.83)
pt3dadd(-12.505, 54.39, 10.95, 0.86)
pt3dadd(-12.581, 54.297, 10.95, 0.844)
pt3dadd(-12.656, 54.203, 10.95, 0.822)
pt3dadd(-12.731, 54.109, 10.95, 0.8)
pt3dadd(-12.806, 54.015, 10.95, 0.78)
pt3dadd(-12.881, 53.922, 10.95, 0.758)
pt3dadd(-12.956, 53.828, 10.95, 0.736)
pt3dadd(-13.031, 53.735, 10.95, 0.714)
pt3dadd(-13.106, 53.641, 10.95, 0.692)
pt3dadd(-13.181, 53.547, 10.949, 0.67)
pt3dadd(-13.256, 53.454, 10.949, 0.648)
pt3dadd(-13.323, 53.354, 10.949, 0.628)
pt3dadd(-13.388, 53.253, 10.949, 0.608)
pt3dadd(-13.452, 53.152, 10.949, 0.59)
pt3dadd(-13.518, 53.051, 10.948, 0.57)
pt3dadd(-13.582, 52.95, 10.948, 0.55)
pt3dadd(-13.647, 52.849, 10.948, 0.53)
pt3dadd(-13.712, 52.748, 10.948, 0.512)
pt3dadd(-13.777, 52.647, 10.948, 0.492)
pt3dadd(-13.842, 52.547, 10.947, 0.472)
pt3dadd(-13.907, 52.446, 10.947, 0.454)
pt3dadd(-13.954, 52.335, 10.947, 0.452)
pt3dadd(-14, 52.224, 10.946, 0.452)
pt3dadd(-14.045, 52.113, 10.946, 0.452)
pt3dadd(-14.091, 52.002, 10.946, 0.452)
pt3dadd(-14.136, 51.891, 10.945, 0.452)
pt3dadd(-14.182, 51.78, 10.945, 0.452)
pt3dadd(-14.227, 51.669, 10.944, 0.452)
pt3dadd(-14.273, 51.558, 10.944, 0.452)
pt3dadd(-14.318, 51.447, 10.944, 0.452)
pt3dadd(-14.364, 51.336, 10.943, 0.452)
pt3dadd(-14.392, 51.219, 10.943, 0.452)
pt3dadd(-14.418, 51.102, 10.942, 0.452)
pt3dadd(-14.445, 50.985, 10.941, 0.452)
pt3dadd(-14.472, 50.868, 10.94, 0.452)
pt3dadd(-14.498, 50.751, 10.94, 0.452)
pt3dadd(-14.525, 50.634, 10.939, 0.452)
pt3dadd(-14.551, 50.517, 10.938, 0.452)
pt3dadd(-14.578, 50.4, 10.937, 0.452)
pt3dadd(-14.605, 50.283, 10.937, 0.452)
pt3dadd(-14.631, 50.166, 10.936, 0.452)
pt3dadd(-14.673, 50.054, 10.934, 0.466)
pt3dadd(-14.716, 49.942, 10.933, 0.482)
pt3dadd(-14.758, 49.83, 10.932, 0.498)
pt3dadd(-14.801, 49.717, 10.93, 0.514)
pt3dadd(-14.843, 49.605, 10.929, 0.53)
pt3dadd(-14.886, 49.493, 10.927, 0.546)
pt3dadd(-14.928, 49.381, 10.925, 0.562)
pt3dadd(-14.971, 49.269, 10.924, 0.578)
pt3dadd(-15.013, 49.156, 10.922, 0.594)
pt3dadd(-15.056, 49.044, 10.921, 0.608)
pt3dadd(-15.091, 48.93, 10.918, 0.606)
pt3dadd(-15.126, 48.815, 10.916, 0.6)
pt3dadd(-15.161, 48.7, 10.913, 0.596)
pt3dadd(-15.196, 48.585, 10.91, 0.59)
pt3dadd(-15.231, 48.471, 10.907, 0.586)
pt3dadd(-15.266, 48.356, 10.905, 0.582)
pt3dadd(-15.301, 48.241, 10.902, 0.576)
pt3dadd(-15.336, 48.126, 10.899, 0.572)
pt3dadd(-15.371, 48.012, 10.897, 0.568)
pt3dadd(-15.406, 47.897, 10.894, 0.562)
pt3dadd(-15.429, 47.779, 10.889, 0.56)
pt3dadd(-15.452, 47.662, 10.883, 0.556)
pt3dadd(-15.474, 47.544, 10.878, 0.552)
pt3dadd(-15.497, 47.426, 10.872, 0.55)
pt3dadd(-15.519, 47.309, 10.867, 0.546)
}
}
proc shape3d_93() {
dend_7[8] { pt3dadd(-15.542, 47.191, 10.861, 0.542)
pt3dadd(-15.565, 47.073, 10.856, 0.54)
pt3dadd(-15.587, 46.956, 10.85, 0.536)
pt3dadd(-15.61, 46.838, 10.845, 0.532)
pt3dadd(-15.632, 46.72, 10.839, 0.53)
pt3dadd(-15.643, 46.601, 10.83, 0.54)
pt3dadd(-15.654, 46.482, 10.82, 0.55)
pt3dadd(-15.664, 46.364, 10.81, 0.562)
pt3dadd(-15.675, 46.245, 10.8, 0.572)
pt3dadd(-15.685, 46.126, 10.791, 0.582)
pt3dadd(-15.696, 46.007, 10.781, 0.594)
pt3dadd(-15.706, 45.888, 10.771, 0.604)
pt3dadd(-15.717, 45.769, 10.761, 0.614)
pt3dadd(-15.728, 45.65, 10.752, 0.626)
pt3dadd(-15.738, 45.531, 10.742, 0.636)
pt3dadd(-15.738, 45.412, 10.726, 0.616)
pt3dadd(-15.739, 45.294, 10.711, 0.598)
pt3dadd(-15.739, 45.175, 10.696, 0.578)
pt3dadd(-15.739, 45.057, 10.68, 0.56)
pt3dadd(-15.74, 44.938, 10.665, 0.54)
pt3dadd(-15.74, 44.819, 10.65, 0.522)
pt3dadd(-15.741, 44.701, 10.634, 0.502)
pt3dadd(-15.741, 44.582, 10.619, 0.484)
pt3dadd(-15.741, 44.464, 10.603, 0.464)
pt3dadd(-15.742, 44.345, 10.587, 0.446)
pt3dadd(-15.742, 44.237, 10.544, 0.428)
pt3dadd(-15.743, 44.128, 10.502, 0.41)
pt3dadd(-15.744, 44.02, 10.459, 0.394)
pt3dadd(-15.744, 43.911, 10.416, 0.376)
pt3dadd(-15.745, 43.803, 10.373, 0.358)
pt3dadd(-15.746, 43.694, 10.331, 0.342)
pt3dadd(-15.747, 43.586, 10.288, 0.324)
pt3dadd(-15.747, 43.477, 10.245, 0.306)
pt3dadd(-15.748, 43.369, 10.203, 0.288)
pt3dadd(-15.749, 43.26, 10.16, 0.272)
pt3dadd(-15.75, 43.149, 10.124, 0.294)
pt3dadd(-15.752, 43.037, 10.087, 0.316)
pt3dadd(-15.753, 42.925, 10.05, 0.338)
pt3dadd(-15.755, 42.814, 10.014, 0.36)
pt3dadd(-15.757, 42.702, 9.977, 0.382)
pt3dadd(-15.758, 42.59, 9.94, 0.404)
pt3dadd(-15.76, 42.479, 9.904, 0.426)
pt3dadd(-15.761, 42.367, 9.867, 0.448)
pt3dadd(-15.763, 42.255, 9.83, 0.47)
pt3dadd(-15.765, 42.144, 9.794, 0.492)
pt3dadd(-15.767, 42.034, 9.753, 0.52)
pt3dadd(-15.77, 41.924, 9.713, 0.546)
pt3dadd(-15.772, 41.814, 9.673, 0.574)
pt3dadd(-15.775, 41.704, 9.633, 0.6)
pt3dadd(-15.778, 41.595, 9.593, 0.628)
pt3dadd(-15.78, 41.485, 9.553, 0.654)
pt3dadd(-15.783, 41.375, 9.513, 0.682)
pt3dadd(-15.786, 41.265, 9.473, 0.708)
pt3dadd(-15.788, 41.155, 9.433, 0.736)
pt3dadd(-15.791, 41.045, 9.392, 0.762)
pt3dadd(-15.795, 40.937, 9.35, 0.77)
pt3dadd(-15.8, 40.828, 9.307, 0.778)
pt3dadd(-15.804, 40.72, 9.264, 0.786)
pt3dadd(-15.808, 40.612, 9.221, 0.794)
pt3dadd(-15.813, 40.503, 9.178, 0.802)
pt3dadd(-15.817, 40.395, 9.136, 0.812)
pt3dadd(-15.821, 40.287, 9.093, 0.82)
pt3dadd(-15.826, 40.178, 9.05, 0.828)
pt3dadd(-15.83, 40.07, 9.007, 0.836)
pt3dadd(-15.835, 39.961, 8.966, 0.84)
pt3dadd(-15.844, 39.845, 8.941, 0.804)
pt3dadd(-15.853, 39.729, 8.915, 0.766)
pt3dadd(-15.862, 39.613, 8.89, 0.728)
pt3dadd(-15.871, 39.498, 8.865, 0.692)
pt3dadd(-15.88, 39.382, 8.84, 0.654)
pt3dadd(-15.89, 39.266, 8.814, 0.618)
pt3dadd(-15.899, 39.15, 8.789, 0.58)
pt3dadd(-15.908, 39.035, 8.764, 0.544)
pt3dadd(-15.917, 38.919, 8.739, 0.506)
pt3dadd(-15.927, 38.803, 8.714, 0.476)
pt3dadd(-15.942, 38.685, 8.7, 0.51)
pt3dadd(-15.958, 38.568, 8.685, 0.544)
pt3dadd(-15.974, 38.45, 8.671, 0.576)
pt3dadd(-15.989, 38.332, 8.656, 0.61)
pt3dadd(-16.005, 38.215, 8.642, 0.644)
pt3dadd(-16.02, 38.097, 8.628, 0.678)
pt3dadd(-16.036, 37.979, 8.613, 0.712)
pt3dadd(-16.052, 37.861, 8.599, 0.746)
pt3dadd(-16.067, 37.744, 8.584, 0.78)
pt3dadd(-16.085, 37.627, 8.57, 0.81)
pt3dadd(-16.126, 37.514, 8.562, 0.82)
pt3dadd(-16.166, 37.401, 8.553, 0.83)
pt3dadd(-16.206, 37.289, 8.545, 0.84)
pt3dadd(-16.247, 37.176, 8.536, 0.848)
pt3dadd(-16.287, 37.064, 8.527, 0.858)
pt3dadd(-16.328, 36.951, 8.519, 0.868)
pt3dadd(-16.368, 36.839, 8.51, 0.878)
pt3dadd(-16.408, 36.726, 8.502, 0.886)
pt3dadd(-16.449, 36.614, 8.493, 0.896)
pt3dadd(-16.49, 36.501, 8.484, 0.902)
pt3dadd(-16.533, 36.39, 8.475, 0.884)
pt3dadd(-16.577, 36.279, 8.466, 0.866)
pt3dadd(-16.62, 36.168, 8.457, 0.85)
pt3dadd(-16.664, 36.056, 8.448, 0.832)
pt3dadd(-16.707, 35.945, 8.439, 0.816)
pt3dadd(-16.751, 35.834, 8.43, 0.798)
pt3dadd(-16.794, 35.722, 8.421, 0.782)
pt3dadd(-16.838, 35.611, 8.412, 0.764)
pt3dadd(-16.881, 35.5, 8.403, 0.746)
pt3dadd(-16.923, 35.388, 8.392, 0.73)
pt3dadd(-16.96, 35.276, 8.375, 0.714)
pt3dadd(-16.996, 35.163, 8.357, 0.698)
pt3dadd(-17.033, 35.051, 8.339, 0.682)
pt3dadd(-17.069, 34.939, 8.322, 0.666)
pt3dadd(-17.106, 34.827, 8.304, 0.648)
pt3dadd(-17.142, 34.714, 8.286, 0.632)
pt3dadd(-17.179, 34.602, 8.269, 0.616)
pt3dadd(-17.215, 34.489, 8.251, 0.6)
pt3dadd(-17.252, 34.377, 8.233, 0.584)
pt3dadd(-17.286, 34.266, 8.21, 0.586)
pt3dadd(-17.315, 34.159, 8.173, 0.638)
pt3dadd(-17.345, 34.052, 8.135, 0.69)
pt3dadd(-17.374, 33.944, 8.097, 0.742)
pt3dadd(-17.403, 33.837, 8.06, 0.794)
pt3dadd(-17.432, 33.73, 8.022, 0.848)
pt3dadd(-17.461, 33.622, 7.985, 0.9)
pt3dadd(-17.49, 33.515, 7.947, 0.952)
pt3dadd(-17.52, 33.408, 7.909, 1.004)
pt3dadd(-17.549, 33.3, 7.872, 1.056)
pt3dadd(-17.584, 33.194, 7.837, 1.088)
pt3dadd(-17.635, 33.09, 7.812, 1.06)
pt3dadd(-17.686, 32.986, 7.786, 1.032)
pt3dadd(-17.738, 32.882, 7.761, 1.002)
pt3dadd(-17.789, 32.778, 7.736, 0.974)
pt3dadd(-17.841, 32.674, 7.71, 0.946)
pt3dadd(-17.892, 32.57, 7.685, 0.916)
pt3dadd(-17.944, 32.466, 7.66, 0.888)
pt3dadd(-17.995, 32.362, 7.634, 0.86)
pt3dadd(-18.047, 32.258, 7.609, 0.832)
pt3dadd(-18.098, 32.153, 7.585, 0.8)
pt3dadd(-18.148, 32.047, 7.565, 0.764)
pt3dadd(-18.198, 31.941, 7.544, 0.728)
pt3dadd(-18.248, 31.834, 7.524, 0.692)
pt3dadd(-18.299, 31.728, 7.504, 0.656)
pt3dadd(-18.349, 31.622, 7.484, 0.62)
pt3dadd(-18.399, 31.516, 7.463, 0.584)
pt3dadd(-18.449, 31.409, 7.443, 0.548)
pt3dadd(-18.5, 31.303, 7.423, 0.512)
pt3dadd(-18.55, 31.197, 7.403, 0.476)
pt3dadd(-18.602, 31.091, 7.384, 0.446)
pt3dadd(-18.659, 30.987, 7.369, 0.43)
pt3dadd(-18.717, 30.883, 7.354, 0.414)
pt3dadd(-18.774, 30.78, 7.339, 0.4)
pt3dadd(-18.831, 30.676, 7.324, 0.384)
pt3dadd(-18.888, 30.572, 7.309, 0.368)
pt3dadd(-18.946, 30.468, 7.294, 0.352)
pt3dadd(-19.003, 30.364, 7.28, 0.338)
pt3dadd(-19.06, 30.26, 7.265, 0.322)
pt3dadd(-19.117, 30.156, 7.25, 0.306)
pt3dadd(-19.179, 30.055, 7.235, 0.304)
pt3dadd(-19.249, 29.959, 7.22, 0.324)
pt3dadd(-19.319, 29.863, 7.205, 0.346)
pt3dadd(-19.389, 29.767, 7.19, 0.366)
pt3dadd(-19.458, 29.671, 7.175, 0.386)
pt3dadd(-19.528, 29.575, 7.161, 0.408)
pt3dadd(-19.598, 29.479, 7.146, 0.428)
pt3dadd(-19.668, 29.383, 7.131, 0.45)
pt3dadd(-19.738, 29.288, 7.116, 0.47)
pt3dadd(-19.808, 29.192, 7.101, 0.492)
pt3dadd(-19.877, 29.101, 7.074, 0.52)
pt3dadd(-19.946, 29.018, 7.03, 0.558)
pt3dadd(-20.015, 28.936, 6.986, 0.596)
pt3dadd(-20.084, 28.853, 6.942, 0.634)
pt3dadd(-20.153, 28.77, 6.898, 0.672)
pt3dadd(-20.222, 28.687, 6.854, 0.712)
pt3dadd(-20.291, 28.604, 6.81, 0.75)
pt3dadd(-20.36, 28.522, 6.766, 0.788)
pt3dadd(-20.429, 28.439, 6.722, 0.826)
pt3dadd(-20.498, 28.356, 6.678, 0.864)
pt3dadd(-20.573, 28.273, 6.643, 0.878)
pt3dadd(-20.656, 28.191, 6.62, 0.86)
pt3dadd(-20.738, 28.108, 6.597, 0.842)
pt3dadd(-20.821, 28.026, 6.574, 0.824)
pt3dadd(-20.903, 27.943, 6.551, 0.808)
pt3dadd(-20.986, 27.86, 6.528, 0.79)
pt3dadd(-21.068, 27.778, 6.505, 0.772)
pt3dadd(-21.151, 27.695, 6.483, 0.754)
pt3dadd(-21.234, 27.612, 6.46, 0.736)
pt3dadd(-21.316, 27.53, 6.437, 0.718)
pt3dadd(-21.399, 27.447, 6.419, 0.696)
pt3dadd(-21.484, 27.362, 6.408, 0.666)
pt3dadd(-21.568, 27.278, 6.397, 0.638)
pt3dadd(-21.652, 27.193, 6.385, 0.61)
pt3dadd(-21.737, 27.109, 6.374, 0.58)
pt3dadd(-21.821, 27.025, 6.363, 0.552)
pt3dadd(-21.905, 26.94, 6.352, 0.524)
pt3dadd(-21.989, 26.856, 6.34, 0.494)
pt3dadd(-22.074, 26.772, 6.329, 0.466)
pt3dadd(-22.158, 26.687, 6.318, 0.438)
pt3dadd(-22.242, 26.603, 6.309, 0.414)
pt3dadd(-22.327, 26.518, 6.303, 0.394)
pt3dadd(-22.412, 26.433, 6.298, 0.374)
pt3dadd(-22.497, 26.349, 6.292, 0.354)
pt3dadd(-22.581, 26.264, 6.286, 0.334)
pt3dadd(-22.666, 26.179, 6.281, 0.316)
}
}
proc shape3d_94() {
dend_7[8] { pt3dadd(-22.751, 26.095, 6.275, 0.296)
pt3dadd(-22.836, 26.01, 6.269, 0.276)
pt3dadd(-22.92, 25.925, 6.264, 0.256)
pt3dadd(-23.005, 25.841, 6.258, 0.236)
pt3dadd(-23.09, 25.756, 6.255, 0.226)
pt3dadd(-23.175, 25.671, 6.255, 0.226)
pt3dadd(-23.26, 25.586, 6.255, 0.226)
pt3dadd(-23.345, 25.501, 6.255, 0.226)
pt3dadd(-23.429, 25.416, 6.255, 0.226)
pt3dadd(-23.514, 25.332, 6.255, 0.226)
pt3dadd(-23.599, 25.247, 6.255, 0.226)
pt3dadd(-23.684, 25.162, 6.255, 0.226)
pt3dadd(-23.769, 25.077, 6.255, 0.226)
pt3dadd(-23.854, 24.992, 6.255, 0.226)
pt3dadd(-23.938, 24.907, 6.255, 0.236)
pt3dadd(-24.023, 24.822, 6.255, 0.256)
pt3dadd(-24.108, 24.738, 6.255, 0.278)
pt3dadd(-24.193, 24.653, 6.255, 0.298)
pt3dadd(-24.278, 24.568, 6.255, 0.318)
pt3dadd(-24.363, 24.483, 6.255, 0.338)
pt3dadd(-24.447, 24.398, 6.255, 0.36)
pt3dadd(-24.532, 24.313, 6.255, 0.38)
pt3dadd(-24.617, 24.228, 6.255, 0.402)
pt3dadd(-24.702, 24.144, 6.255, 0.422)
pt3dadd(-24.787, 24.059, 6.255, 0.444)
pt3dadd(-24.872, 23.974, 6.255, 0.468)
pt3dadd(-24.957, 23.889, 6.255, 0.494)
pt3dadd(-25.041, 23.804, 6.255, 0.518)
pt3dadd(-25.126, 23.719, 6.255, 0.542)
pt3dadd(-25.211, 23.634, 6.255, 0.566)
pt3dadd(-25.296, 23.55, 6.255, 0.592)
pt3dadd(-25.381, 23.465, 6.255, 0.616)
pt3dadd(-25.466, 23.38, 6.255, 0.64)
pt3dadd(-25.551, 23.295, 6.255, 0.664)
pt3dadd(-25.626, 23.206, 6.241, 0.666)
pt3dadd(-25.692, 23.112, 6.212, 0.64)
pt3dadd(-25.757, 23.018, 6.182, 0.614)
pt3dadd(-25.823, 22.924, 6.152, 0.588)
pt3dadd(-25.888, 22.83, 6.123, 0.56)
pt3dadd(-25.954, 22.736, 6.093, 0.534)
pt3dadd(-26.019, 22.642, 6.063, 0.508)
pt3dadd(-26.085, 22.548, 6.034, 0.482)
pt3dadd(-26.151, 22.454, 6.004, 0.456)
pt3dadd(-26.219, 22.374, 5.956, 0.452)
pt3dadd(-26.281, 22.293, 5.914, 0.452)
pt3dadd(-26.287, 22.177, 5.939, 0.452)
pt3dadd(-26.293, 22.061, 5.965, 0.452)
pt3dadd(-26.392, 22.004, 5.982, 0.452)
pt3dadd(-26.498, 21.951, 5.999, 0.452)
pt3dadd(-26.61, 21.91, 6, 0.452)
pt3dadd(-26.724, 21.871, 6, 0.452)
pt3dadd(-26.83, 21.818, 5.997, 0.452)
pt3dadd(-26.932, 21.754, 5.992, 0.452)
pt3dadd(-26.995, 21.668, 5.974, 0.452)
pt3dadd(-27, 21.56, 5.933, 0.452)
pt3dadd(-27, 21.444, 5.909, 0.452)
pt3dadd(-27.004, 21.324, 5.9, 0.452)
pt3dadd(-27.026, 21.207, 5.9, 0.452)
pt3dadd(-27.078, 21.103, 5.883, 0.452)
pt3dadd(-27.143, 21.008, 5.855, 0.452)
pt3dadd(-27.207, 20.913, 5.827, 0.452)
pt3dadd(-27.272, 20.818, 5.799, 0.452)
pt3dadd(-27.335, 20.73, 5.76, 0.452)
pt3dadd(-27.394, 20.665, 5.692, 0.452)
pt3dadd(-27.453, 20.599, 5.624, 0.452)
pt3dadd(-27.512, 20.534, 5.556, 0.452)
pt3dadd(-27.569, 20.461, 5.5, 0.452)
pt3dadd(-27.623, 20.354, 5.5, 0.452)
pt3dadd(-27.677, 20.247, 5.5, 0.452)
pt3dadd(-27.732, 20.14, 5.497, 0.452)
pt3dadd(-27.797, 20.056, 5.458, 0.452)
pt3dadd(-27.831, 20.036, 5.365, 0.452)
pt3dadd(-27.84, 20.012, 5.267, 0.452)
pt3dadd(-27.84, 19.965, 5.176, 0.452)
pt3dadd(-27.84, 19.932, 5.08, 0.452)
pt3dadd(-27.843, 19.92, 4.981, 0.452)
pt3dadd(-27.863, 19.92, 4.882, 0.452)
pt3dadd(-27.899, 19.907, 4.788, 0.452)
pt3dadd(-27.938, 19.881, 4.696, 0.452)
pt3dadd(-27.971, 19.816, 4.636, 0.452)
pt3dadd(-27.995, 19.701, 4.615, 0.452)
pt3dadd(-28.037, 19.599, 4.599, 0.452)
pt3dadd(-28.141, 19.538, 4.595, 0.452)
pt3dadd(-28.244, 19.477, 4.591, 0.452)
pt3dadd(-28.339, 19.413, 4.571, 0.452)
pt3dadd(-28.423, 19.345, 4.527, 0.452)
pt3dadd(-28.526, 19.32, 4.494, 0.452)
pt3dadd(-28.625, 19.278, 4.454, 0.452)
pt3dadd(-28.721, 19.226, 4.411, 0.452)
pt3dadd(-28.805, 19.141, 4.406, 0.452)
pt3dadd(-28.89, 19.057, 4.4, 0.452)
pt3dadd(-29.002, 19.015, 4.4, 0.452)
pt3dadd(-29.116, 18.976, 4.4, 0.452)
pt3dadd(-29.233, 18.96, 4.4, 0.452)
pt3dadd(-29.353, 18.96, 4.4, 0.452)
pt3dadd(-29.473, 18.96, 4.4, 0.452)
pt3dadd(-29.59, 18.96, 4.383, 0.452)
pt3dadd(-29.706, 18.96, 4.356, 0.452)
pt3dadd(-29.821, 18.96, 4.328, 0.452)
pt3dadd(-29.936, 18.96, 4.301, 0.452)
pt3dadd(-30.052, 18.96, 4.273, 0.452)
pt3dadd(-30.167, 18.96, 4.246, 0.452)
pt3dadd(-30.282, 18.96, 4.219, 0.452)
pt3dadd(-30.397, 18.95, 4.193, 0.452)
pt3dadd(-30.51, 18.921, 4.17, 0.452)
pt3dadd(-30.623, 18.891, 4.148, 0.452)
pt3dadd(-30.736, 18.861, 4.125, 0.452)
pt3dadd(-30.85, 18.832, 4.103, 0.452)
pt3dadd(-30.961, 18.806, 4.074, 0.452)
pt3dadd(-31.069, 18.786, 4.035, 0.452)
pt3dadd(-31.178, 18.767, 3.995, 0.452)
pt3dadd(-31.287, 18.748, 3.956, 0.452)
pt3dadd(-31.395, 18.728, 3.916, 0.452)
pt3dadd(-31.51, 18.717, 3.9, 0.452)
pt3dadd(-31.63, 18.711, 3.9, 0.452)
pt3dadd(-31.75, 18.705, 3.9, 0.452)
pt3dadd(-31.87, 18.699, 3.9, 0.452)
pt3dadd(-31.99, 18.693, 3.9, 0.452)
pt3dadd(-32.109, 18.687, 3.9, 0.452)
pt3dadd(-32.229, 18.681, 3.9, 0.452)
pt3dadd(-32.344, 18.647, 3.9, 0.452)
pt3dadd(-32.459, 18.612, 3.9, 0.452)
pt3dadd(-32.574, 18.576, 3.9, 0.452)
pt3dadd(-32.688, 18.54, 3.9, 0.452)
pt3dadd(-32.802, 18.504, 3.9, 0.452)
pt3dadd(-32.919, 18.48, 3.9, 0.452)
pt3dadd(-33.039, 18.48, 3.9, 0.452)
pt3dadd(-33.159, 18.48, 3.9, 0.452)
pt3dadd(-33.279, 18.48, 3.9, 0.452)
pt3dadd(-33.399, 18.48, 3.9, 0.452)
pt3dadd(-33.519, 18.48, 3.9, 0.452)
pt3dadd(-33.639, 18.48, 3.9, 0.452)
pt3dadd(-33.759, 18.48, 3.898, 0.452)
pt3dadd(-33.879, 18.48, 3.893, 0.452)
pt3dadd(-33.999, 18.48, 3.888, 0.452)
pt3dadd(-34.118, 18.48, 3.883, 0.452)
pt3dadd(-34.238, 18.48, 3.878, 0.452)
pt3dadd(-34.358, 18.48, 3.873, 0.452)
pt3dadd(-34.478, 18.48, 3.869, 0.452)
pt3dadd(-34.596, 18.463, 3.87, 0.452)
pt3dadd(-34.713, 18.437, 3.875, 0.452)
pt3dadd(-34.83, 18.41, 3.88, 0.452)
pt3dadd(-34.947, 18.384, 3.885, 0.452)
pt3dadd(-35.064, 18.36, 3.887, 0.452)
pt3dadd(-35.18, 18.36, 3.862, 0.452)
pt3dadd(-35.296, 18.36, 3.838, 0.452)
pt3dadd(-35.415, 18.36, 3.823, 0.452)
pt3dadd(-35.534, 18.36, 3.811, 0.452)
pt3dadd(-35.653, 18.36, 3.798, 0.452)
pt3dadd(-35.771, 18.36, 3.781, 0.452)
pt3dadd(-35.889, 18.36, 3.764, 0.452)
pt3dadd(-35.978, 18.36, 3.711, 0.452)
pt3dadd(-36.039, 18.36, 3.625, 0.452)
pt3dadd(-36.088, 18.36, 3.535, 0.452)
pt3dadd(-36.111, 18.36, 3.437, 0.452)
pt3dadd(-36.189, 18.36, 3.375, 0.452)
pt3dadd(-36.299, 18.36, 3.336, 0.452)
pt3dadd(-36.409, 18.36, 3.296, 0.452)
pt3dadd(-36.519, 18.36, 3.256, 0.452)
pt3dadd(-36.629, 18.36, 3.217, 0.452)
pt3dadd(-36.742, 18.36, 3.185, 0.452)
pt3dadd(-36.861, 18.36, 3.17, 0.452)
pt3dadd(-36.98, 18.36, 3.156, 0.452)
pt3dadd(-37.098, 18.36, 3.141, 0.452)
pt3dadd(-37.217, 18.36, 3.127, 0.452)
pt3dadd(-37.336, 18.36, 3.113, 0.452)
pt3dadd(-37.453, 18.357, 3.096, 0.452)
pt3dadd(-37.563, 18.332, 3.061, 0.452)
pt3dadd(-37.672, 18.306, 3.025, 0.452)
pt3dadd(-37.782, 18.281, 2.99, 0.452)
pt3dadd(-37.891, 18.256, 2.955, 0.452)
pt3dadd(-38.003, 18.232, 2.923, 0.452)
pt3dadd(-38.116, 18.211, 2.897, 0.452)
pt3dadd(-38.23, 18.19, 2.871, 0.452)
pt3dadd(-38.344, 18.169, 2.844, 0.452)
pt3dadd(-38.458, 18.147, 2.818, 0.452)
pt3dadd(-38.572, 18.127, 2.806, 0.452)
pt3dadd(-38.689, 18.11, 2.823, 0.452)
pt3dadd(-38.806, 18.092, 2.84, 0.452)
pt3dadd(-38.923, 18.074, 2.857, 0.452)
pt3dadd(-39.04, 18.056, 2.874, 0.452)
pt3dadd(-39.156, 18.038, 2.886, 0.452)
pt3dadd(-39.266, 18.019, 2.848, 0.452)
pt3dadd(-39.376, 18, 2.811, 0.452)
pt3dadd(-39.495, 18, 2.807, 0.452)
pt3dadd(-39.615, 18, 2.803, 0.452)
pt3dadd(-39.734, 18, 2.794, 0.452)
pt3dadd(-39.841, 18, 2.75, 0.452)
pt3dadd(-39.948, 18, 2.705, 0.452)
pt3dadd(-40.027, 18, 2.63, 0.452)
pt3dadd(-40.102, 18, 2.552, 0.452)
pt3dadd(-40.205, 18, 2.507, 0.452)
pt3dadd(-40.318, 18, 2.473, 0.452)
pt3dadd(-40.431, 18, 2.439, 0.452)
pt3dadd(-40.544, 18, 2.405, 0.452)
pt3dadd(-40.663, 18.004, 2.4, 0.452)
pt3dadd(-40.782, 18.009, 2.4, 0.452)
pt3dadd(-40.902, 18.013, 2.4, 0.452)
pt3dadd(-41.017, 18.042, 2.395, 0.452)
pt3dadd(-41.129, 18.058, 2.362, 0.452)
}
}
proc shape3d_95() {
dend_7[8] { pt3dadd(-41.241, 18.075, 2.328, 0.452)
pt3dadd(-41.353, 18.09, 2.295, 0.452)
pt3dadd(-41.465, 18.106, 2.261, 0.452)
pt3dadd(-41.578, 18.12, 2.23, 0.452)
pt3dadd(-41.695, 18.12, 2.207, 0.452)
pt3dadd(-41.812, 18.12, 2.184, 0.452)
pt3dadd(-41.929, 18.12, 2.161, 0.452)
pt3dadd(-42.045, 18.12, 2.138, 0.452)
pt3dadd(-42.162, 18.12, 2.115, 0.452)
pt3dadd(-42.279, 18.121, 2.094, 0.452)
pt3dadd(-42.398, 18.123, 2.078, 0.452)
pt3dadd(-42.516, 18.125, 2.061, 0.452)
pt3dadd(-42.634, 18.127, 2.044, 0.452)
pt3dadd(-42.753, 18.13, 2.027, 0.452)
pt3dadd(-42.871, 18.132, 2.011, 0.452)
pt3dadd(-42.977, 18.152, 1.98, 0.452)
pt3dadd(-43.06, 18.205, 1.923, 0.452)
pt3dadd(-43.165, 18.229, 1.9, 0.452)
pt3dadd(-43.285, 18.234, 1.9, 0.452)
pt3dadd(-43.405, 18.239, 1.9, 0.452)
pt3dadd(-43.52, 18.268, 1.9, 0.452)
pt3dadd(-43.634, 18.308, 1.9, 0.452)
pt3dadd(-43.721, 18.373, 1.9, 0.452)
pt3dadd(-43.76, 18.487, 1.9, 0.452)
pt3dadd(-43.8, 18.6, 1.9, 0.452)
}
dend_7[9] {pt3dclear()
pt3dadd(7.121, 78.211, 21.166, 1.13)
pt3dadd(7.137, 78.189, 21.171, 1.12)
pt3dadd(7.209, 78.097, 21.194, 1.076)
pt3dadd(7.281, 78.005, 21.217, 1.032)
pt3dadd(7.353, 77.913, 21.24, 0.988)
pt3dadd(7.424, 77.82, 21.263, 0.944)
pt3dadd(7.496, 77.728, 21.286, 0.9)
pt3dadd(7.567, 77.636, 21.309, 0.854)
pt3dadd(7.639, 77.544, 21.332, 0.81)
pt3dadd(7.711, 77.452, 21.355, 0.766)
pt3dadd(7.777, 77.358, 21.381, 0.726)
pt3dadd(7.83, 77.258, 21.416, 0.698)
pt3dadd(7.882, 77.158, 21.45, 0.668)
pt3dadd(7.934, 77.058, 21.484, 0.638)
pt3dadd(7.986, 76.958, 21.518, 0.61)
pt3dadd(8.038, 76.858, 21.553, 0.58)
pt3dadd(8.091, 76.758, 21.587, 0.55)
pt3dadd(8.143, 76.658, 21.621, 0.522)
pt3dadd(8.195, 76.558, 21.655, 0.492)
pt3dadd(8.247, 76.458, 21.69, 0.462)
pt3dadd(8.274, 76.356, 21.735, 0.452)
pt3dadd(8.286, 76.253, 21.785, 0.452)
pt3dadd(8.298, 76.151, 21.835, 0.452)
pt3dadd(8.311, 76.048, 21.886, 0.452)
pt3dadd(8.323, 75.945, 21.936, 0.452)
pt3dadd(8.335, 75.842, 21.987, 0.452)
pt3dadd(8.348, 75.739, 22.037, 0.452)
pt3dadd(8.36, 75.636, 22.088, 0.452)
pt3dadd(8.372, 75.533, 22.138, 0.452)
pt3dadd(8.385, 75.43, 22.189, 0.452)
pt3dadd(8.399, 75.321, 22.227, 0.464)
pt3dadd(8.415, 75.208, 22.259, 0.48)
pt3dadd(8.43, 75.096, 22.29, 0.498)
pt3dadd(8.446, 74.983, 22.322, 0.516)
pt3dadd(8.461, 74.87, 22.354, 0.532)
pt3dadd(8.477, 74.757, 22.385, 0.55)
pt3dadd(8.493, 74.645, 22.417, 0.568)
pt3dadd(8.508, 74.532, 22.449, 0.584)
pt3dadd(8.524, 74.419, 22.48, 0.602)
pt3dadd(8.539, 74.307, 22.512, 0.62)
pt3dadd(8.571, 74.194, 22.534, 0.628)
pt3dadd(8.609, 74.083, 22.551, 0.634)
pt3dadd(8.648, 73.971, 22.567, 0.64)
pt3dadd(8.687, 73.859, 22.584, 0.644)
pt3dadd(8.726, 73.748, 22.601, 0.65)
pt3dadd(8.765, 73.636, 22.618, 0.656)
pt3dadd(8.804, 73.524, 22.635, 0.66)
pt3dadd(8.842, 73.412, 22.652, 0.666)
pt3dadd(8.881, 73.301, 22.668, 0.672)
pt3dadd(8.92, 73.189, 22.685, 0.676)
pt3dadd(8.96, 73.077, 22.697, 0.672)
pt3dadd(9.001, 72.964, 22.707, 0.664)
pt3dadd(9.041, 72.852, 22.717, 0.654)
pt3dadd(9.081, 72.74, 22.727, 0.646)
pt3dadd(9.122, 72.627, 22.737, 0.638)
pt3dadd(9.162, 72.515, 22.747, 0.63)
pt3dadd(9.203, 72.403, 22.757, 0.622)
pt3dadd(9.243, 72.29, 22.767, 0.612)
pt3dadd(9.284, 72.178, 22.777, 0.604)
pt3dadd(9.324, 72.066, 22.787, 0.596)
pt3dadd(9.357, 71.951, 22.796, 0.582)
pt3dadd(9.389, 71.835, 22.803, 0.568)
pt3dadd(9.42, 71.72, 22.811, 0.554)
pt3dadd(9.451, 71.604, 22.819, 0.54)
pt3dadd(9.483, 71.489, 22.827, 0.526)
pt3dadd(9.514, 71.373, 22.835, 0.512)
pt3dadd(9.545, 71.258, 22.843, 0.498)
pt3dadd(9.577, 71.143, 22.851, 0.484)
pt3dadd(9.608, 71.027, 22.858, 0.47)
pt3dadd(9.639, 70.912, 22.866, 0.454)
pt3dadd(9.665, 70.795, 22.877, 0.452)
pt3dadd(9.69, 70.679, 22.889, 0.452)
pt3dadd(9.714, 70.562, 22.901, 0.454)
pt3dadd(9.739, 70.446, 22.913, 0.454)
pt3dadd(9.764, 70.329, 22.925, 0.454)
pt3dadd(9.788, 70.213, 22.937, 0.454)
pt3dadd(9.813, 70.096, 22.949, 0.454)
pt3dadd(9.838, 69.979, 22.961, 0.456)
pt3dadd(9.862, 69.863, 22.973, 0.456)
pt3dadd(9.887, 69.746, 22.985, 0.456)
pt3dadd(9.908, 69.635, 23.017, 0.47)
pt3dadd(9.929, 69.526, 23.054, 0.488)
pt3dadd(9.95, 69.416, 23.09, 0.506)
pt3dadd(9.971, 69.306, 23.127, 0.522)
pt3dadd(9.992, 69.197, 23.164, 0.54)
pt3dadd(10.013, 69.087, 23.201, 0.558)
pt3dadd(10.034, 68.977, 23.237, 0.576)
pt3dadd(10.055, 68.868, 23.274, 0.594)
pt3dadd(10.075, 68.758, 23.311, 0.61)
pt3dadd(10.096, 68.648, 23.347, 0.628)
pt3dadd(10.137, 68.541, 23.375, 0.616)
pt3dadd(10.183, 68.435, 23.401, 0.596)
pt3dadd(10.229, 68.329, 23.427, 0.576)
pt3dadd(10.275, 68.222, 23.453, 0.556)
pt3dadd(10.321, 68.116, 23.479, 0.534)
pt3dadd(10.367, 68.009, 23.505, 0.514)
pt3dadd(10.413, 67.903, 23.53, 0.494)
pt3dadd(10.459, 67.796, 23.556, 0.474)
pt3dadd(10.505, 67.69, 23.582, 0.454)
pt3dadd(10.551, 67.584, 23.608, 0.434)
pt3dadd(10.609, 67.481, 23.626, 0.42)
pt3dadd(10.668, 67.378, 23.643, 0.404)
pt3dadd(10.727, 67.276, 23.66, 0.39)
pt3dadd(10.786, 67.173, 23.677, 0.376)
pt3dadd(10.845, 67.071, 23.694, 0.36)
pt3dadd(10.904, 66.968, 23.712, 0.346)
pt3dadd(10.962, 66.866, 23.729, 0.332)
pt3dadd(11.021, 66.763, 23.746, 0.316)
pt3dadd(11.08, 66.661, 23.763, 0.302)
pt3dadd(11.139, 66.558, 23.78, 0.288)
pt3dadd(11.205, 66.459, 23.79, 0.302)
pt3dadd(11.271, 66.359, 23.8, 0.318)
pt3dadd(11.337, 66.26, 23.81, 0.334)
pt3dadd(11.403, 66.16, 23.82, 0.35)
pt3dadd(11.469, 66.061, 23.829, 0.366)
pt3dadd(11.535, 65.961, 23.839, 0.382)
pt3dadd(11.601, 65.862, 23.849, 0.398)
pt3dadd(11.667, 65.762, 23.859, 0.414)
pt3dadd(11.733, 65.662, 23.868, 0.43)
pt3dadd(11.799, 65.563, 23.878, 0.446)
pt3dadd(11.844, 65.452, 23.88, 0.43)
pt3dadd(11.889, 65.341, 23.882, 0.414)
pt3dadd(11.933, 65.229, 23.883, 0.398)
pt3dadd(11.977, 65.118, 23.885, 0.38)
pt3dadd(12.021, 65.006, 23.887, 0.364)
pt3dadd(12.066, 64.894, 23.888, 0.346)
pt3dadd(12.11, 64.783, 23.89, 0.33)
pt3dadd(12.154, 64.671, 23.891, 0.314)
pt3dadd(12.198, 64.56, 23.893, 0.296)
pt3dadd(12.242, 64.448, 23.895, 0.28)
pt3dadd(12.272, 64.332, 23.897, 0.274)
pt3dadd(12.3, 64.215, 23.899, 0.268)
pt3dadd(12.328, 64.099, 23.902, 0.264)
pt3dadd(12.357, 63.982, 23.904, 0.258)
pt3dadd(12.385, 63.866, 23.906, 0.252)
pt3dadd(12.414, 63.749, 23.909, 0.248)
pt3dadd(12.442, 63.633, 23.911, 0.242)
pt3dadd(12.471, 63.516, 23.913, 0.236)
pt3dadd(12.499, 63.4, 23.916, 0.232)
pt3dadd(12.527, 63.283, 23.918, 0.226)
pt3dadd(12.546, 63.165, 23.923, 0.244)
pt3dadd(12.564, 63.046, 23.928, 0.264)
pt3dadd(12.582, 62.928, 23.933, 0.284)
pt3dadd(12.601, 62.809, 23.938, 0.304)
pt3dadd(12.619, 62.691, 23.943, 0.322)
pt3dadd(12.637, 62.572, 23.947, 0.342)
pt3dadd(12.655, 62.454, 23.952, 0.362)
pt3dadd(12.674, 62.335, 23.957, 0.382)
pt3dadd(12.692, 62.217, 23.962, 0.4)
pt3dadd(12.71, 62.098, 23.967, 0.42)
pt3dadd(12.735, 61.982, 23.975, 0.44)
pt3dadd(12.76, 61.865, 23.983, 0.46)
pt3dadd(12.785, 61.748, 23.991, 0.48)
pt3dadd(12.81, 61.631, 24, 0.502)
pt3dadd(12.835, 61.514, 24.008, 0.522)
pt3dadd(12.86, 61.397, 24.016, 0.542)
pt3dadd(12.885, 61.28, 24.024, 0.562)
pt3dadd(12.91, 61.163, 24.032, 0.582)
pt3dadd(12.936, 61.046, 24.04, 0.602)
pt3dadd(12.962, 60.929, 24.049, 0.62)
pt3dadd(13.007, 60.819, 24.06, 0.604)
pt3dadd(13.053, 60.709, 24.072, 0.588)
pt3dadd(13.098, 60.599, 24.084, 0.574)
pt3dadd(13.144, 60.489, 24.096, 0.558)
pt3dadd(13.189, 60.379, 24.107, 0.542)
pt3dadd(13.235, 60.268, 24.119, 0.528)
pt3dadd(13.28, 60.158, 24.131, 0.512)
pt3dadd(13.325, 60.048, 24.142, 0.496)
pt3dadd(13.371, 59.938, 24.154, 0.482)
pt3dadd(13.415, 59.828, 24.168, 0.47)
pt3dadd(13.446, 59.72, 24.204, 0.504)
pt3dadd(13.476, 59.612, 24.239, 0.54)
pt3dadd(13.507, 59.504, 24.275, 0.574)
pt3dadd(13.537, 59.397, 24.311, 0.608)
pt3dadd(13.568, 59.289, 24.347, 0.644)
}
}
proc shape3d_96() {
dend_7[9] { pt3dadd(13.599, 59.181, 24.382, 0.678)
pt3dadd(13.629, 59.073, 24.418, 0.712)
pt3dadd(13.66, 58.965, 24.454, 0.748)
pt3dadd(13.69, 58.857, 24.489, 0.782)
pt3dadd(13.721, 58.749, 24.524, 0.812)
pt3dadd(13.746, 58.636, 24.551, 0.794)
pt3dadd(13.771, 58.523, 24.577, 0.776)
pt3dadd(13.796, 58.41, 24.604, 0.758)
pt3dadd(13.821, 58.297, 24.63, 0.74)
pt3dadd(13.846, 58.184, 24.656, 0.722)
pt3dadd(13.871, 58.071, 24.683, 0.704)
pt3dadd(13.896, 57.958, 24.709, 0.686)
pt3dadd(13.921, 57.845, 24.735, 0.668)
pt3dadd(13.946, 57.732, 24.762, 0.65)
pt3dadd(13.97, 57.619, 24.787, 0.634)
pt3dadd(13.991, 57.502, 24.803, 0.634)
pt3dadd(14.011, 57.385, 24.819, 0.636)
pt3dadd(14.032, 57.269, 24.835, 0.636)
pt3dadd(14.052, 57.152, 24.852, 0.638)
pt3dadd(14.073, 57.036, 24.868, 0.638)
pt3dadd(14.093, 56.919, 24.884, 0.64)
pt3dadd(14.113, 56.802, 24.9, 0.642)
pt3dadd(14.134, 56.686, 24.917, 0.642)
pt3dadd(14.154, 56.569, 24.933, 0.644)
pt3dadd(14.176, 56.452, 24.948, 0.648)
pt3dadd(14.205, 56.336, 24.953, 0.668)
pt3dadd(14.234, 56.22, 24.959, 0.688)
pt3dadd(14.264, 56.104, 24.965, 0.71)
pt3dadd(14.293, 55.988, 24.971, 0.73)
pt3dadd(14.322, 55.872, 24.977, 0.75)
pt3dadd(14.351, 55.755, 24.983, 0.772)
pt3dadd(14.381, 55.639, 24.988, 0.792)
pt3dadd(14.41, 55.523, 24.994, 0.814)
pt3dadd(14.439, 55.407, 25, 0.834)
pt3dadd(14.474, 55.293, 25.004, 0.846)
pt3dadd(14.527, 55.185, 25.001, 0.828)
pt3dadd(14.58, 55.077, 24.999, 0.812)
pt3dadd(14.632, 54.969, 24.996, 0.794)
pt3dadd(14.685, 54.862, 24.993, 0.778)
pt3dadd(14.738, 54.754, 24.991, 0.762)
pt3dadd(14.79, 54.646, 24.988, 0.744)
pt3dadd(14.843, 54.538, 24.986, 0.728)
pt3dadd(14.896, 54.431, 24.983, 0.71)
pt3dadd(14.948, 54.323, 24.98, 0.694)
pt3dadd(14.999, 54.214, 24.977, 0.69)
pt3dadd(15.044, 54.103, 24.971, 0.726)
pt3dadd(15.088, 53.992, 24.964, 0.76)
pt3dadd(15.133, 53.881, 24.958, 0.796)
pt3dadd(15.177, 53.769, 24.951, 0.832)
pt3dadd(15.222, 53.658, 24.945, 0.868)
pt3dadd(15.266, 53.547, 24.938, 0.904)
pt3dadd(15.311, 53.436, 24.932, 0.94)
pt3dadd(15.355, 53.325, 24.925, 0.974)
pt3dadd(15.4, 53.214, 24.919, 1.01)
pt3dadd(15.447, 53.104, 24.912, 1.03)
pt3dadd(15.504, 52.999, 24.903, 1.004)
pt3dadd(15.562, 52.894, 24.894, 0.976)
pt3dadd(15.619, 52.789, 24.885, 0.948)
pt3dadd(15.676, 52.684, 24.876, 0.922)
pt3dadd(15.733, 52.579, 24.867, 0.894)
pt3dadd(15.79, 52.474, 24.858, 0.866)
pt3dadd(15.847, 52.369, 24.849, 0.84)
pt3dadd(15.905, 52.264, 24.84, 0.812)
pt3dadd(15.962, 52.159, 24.831, 0.784)
pt3dadd(16.018, 52.055, 24.819, 0.758)
pt3dadd(16.073, 51.951, 24.8, 0.732)
pt3dadd(16.128, 51.846, 24.781, 0.706)
pt3dadd(16.183, 51.742, 24.762, 0.682)
pt3dadd(16.238, 51.638, 24.743, 0.656)
pt3dadd(16.293, 51.534, 24.723, 0.63)
pt3dadd(16.348, 51.429, 24.704, 0.606)
pt3dadd(16.403, 51.325, 24.685, 0.58)
pt3dadd(16.458, 51.221, 24.666, 0.554)
pt3dadd(16.513, 51.117, 24.647, 0.53)
pt3dadd(16.563, 51.013, 24.622, 0.52)
pt3dadd(16.605, 50.908, 24.588, 0.536)
pt3dadd(16.647, 50.804, 24.553, 0.552)
pt3dadd(16.69, 50.699, 24.519, 0.568)
pt3dadd(16.732, 50.595, 24.484, 0.584)
pt3dadd(16.775, 50.491, 24.45, 0.6)
pt3dadd(16.817, 50.386, 24.416, 0.616)
pt3dadd(16.859, 50.282, 24.381, 0.632)
pt3dadd(16.902, 50.177, 24.347, 0.648)
pt3dadd(16.944, 50.073, 24.312, 0.664)
pt3dadd(16.994, 49.97, 24.283, 0.668)
pt3dadd(17.054, 49.869, 24.263, 0.652)
pt3dadd(17.115, 49.769, 24.243, 0.636)
pt3dadd(17.176, 49.668, 24.222, 0.62)
pt3dadd(17.236, 49.568, 24.202, 0.604)
pt3dadd(17.297, 49.467, 24.182, 0.588)
pt3dadd(17.358, 49.366, 24.162, 0.57)
pt3dadd(17.419, 49.266, 24.141, 0.554)
pt3dadd(17.479, 49.165, 24.121, 0.538)
pt3dadd(17.54, 49.065, 24.101, 0.522)
pt3dadd(17.597, 48.961, 24.083, 0.506)
pt3dadd(17.648, 48.854, 24.07, 0.488)
pt3dadd(17.699, 48.746, 24.057, 0.47)
pt3dadd(17.75, 48.639, 24.043, 0.454)
pt3dadd(17.8, 48.531, 24.03, 0.436)
pt3dadd(17.851, 48.424, 24.017, 0.418)
pt3dadd(17.902, 48.316, 24.003, 0.4)
pt3dadd(17.953, 48.209, 23.99, 0.384)
pt3dadd(18.004, 48.101, 23.977, 0.366)
pt3dadd(18.055, 47.994, 23.964, 0.348)
pt3dadd(18.106, 47.886, 23.954, 0.342)
pt3dadd(18.158, 47.778, 23.949, 0.35)
pt3dadd(18.21, 47.67, 23.945, 0.358)
pt3dadd(18.262, 47.562, 23.94, 0.366)
pt3dadd(18.314, 47.454, 23.935, 0.374)
pt3dadd(18.365, 47.346, 23.931, 0.382)
pt3dadd(18.417, 47.238, 23.926, 0.388)
pt3dadd(18.469, 47.13, 23.921, 0.396)
pt3dadd(18.521, 47.022, 23.916, 0.404)
pt3dadd(18.573, 46.914, 23.912, 0.412)
pt3dadd(18.63, 46.808, 23.91, 0.44)
pt3dadd(18.692, 46.706, 23.913, 0.488)
pt3dadd(18.755, 46.603, 23.916, 0.536)
pt3dadd(18.817, 46.501, 23.919, 0.584)
pt3dadd(18.879, 46.398, 23.921, 0.632)
pt3dadd(18.942, 46.296, 23.924, 0.68)
pt3dadd(19.004, 46.194, 23.927, 0.728)
pt3dadd(19.067, 46.091, 23.93, 0.776)
pt3dadd(19.129, 45.989, 23.932, 0.824)
pt3dadd(19.191, 45.886, 23.935, 0.872)
pt3dadd(19.247, 45.78, 23.94, 0.888)
pt3dadd(19.293, 45.67, 23.947, 0.868)
pt3dadd(19.34, 45.56, 23.954, 0.85)
pt3dadd(19.387, 45.45, 23.961, 0.83)
pt3dadd(19.434, 45.34, 23.968, 0.812)
pt3dadd(19.481, 45.229, 23.975, 0.792)
pt3dadd(19.528, 45.119, 23.982, 0.774)
pt3dadd(19.575, 45.009, 23.99, 0.754)
pt3dadd(19.622, 44.899, 23.997, 0.736)
pt3dadd(19.669, 44.789, 24.004, 0.716)
pt3dadd(19.724, 44.683, 24.013, 0.698)
pt3dadd(19.787, 44.582, 24.023, 0.68)
pt3dadd(19.851, 44.481, 24.034, 0.662)
pt3dadd(19.914, 44.38, 24.044, 0.644)
pt3dadd(19.978, 44.279, 24.055, 0.626)
pt3dadd(20.042, 44.178, 24.065, 0.606)
pt3dadd(20.105, 44.078, 24.076, 0.588)
pt3dadd(20.169, 43.977, 24.087, 0.57)
pt3dadd(20.233, 43.876, 24.097, 0.552)
pt3dadd(20.296, 43.775, 24.108, 0.534)
pt3dadd(20.359, 43.677, 24.131, 0.514)
pt3dadd(20.42, 43.583, 24.166, 0.492)
pt3dadd(20.482, 43.489, 24.201, 0.47)
pt3dadd(20.543, 43.395, 24.236, 0.448)
pt3dadd(20.605, 43.301, 24.271, 0.426)
pt3dadd(20.666, 43.207, 24.306, 0.404)
pt3dadd(20.728, 43.113, 24.341, 0.382)
pt3dadd(20.789, 43.019, 24.376, 0.362)
pt3dadd(20.851, 42.925, 24.411, 0.34)
pt3dadd(20.912, 42.831, 24.446, 0.318)
pt3dadd(20.976, 42.738, 24.482, 0.304)
pt3dadd(21.041, 42.647, 24.517, 0.296)
pt3dadd(21.105, 42.555, 24.553, 0.288)
pt3dadd(21.17, 42.464, 24.589, 0.28)
pt3dadd(21.235, 42.372, 24.625, 0.27)
pt3dadd(21.3, 42.281, 24.66, 0.262)
pt3dadd(21.364, 42.189, 24.696, 0.254)
pt3dadd(21.429, 42.098, 24.732, 0.244)
pt3dadd(21.494, 42.006, 24.768, 0.236)
pt3dadd(21.558, 41.915, 24.803, 0.228)
pt3dadd(21.616, 41.814, 24.828, 0.242)
pt3dadd(21.672, 41.711, 24.849, 0.264)
pt3dadd(21.728, 41.608, 24.87, 0.286)
pt3dadd(21.784, 41.505, 24.891, 0.308)
pt3dadd(21.84, 41.402, 24.912, 0.33)
pt3dadd(21.896, 41.299, 24.933, 0.35)
pt3dadd(21.952, 41.196, 24.954, 0.372)
pt3dadd(22.008, 41.093, 24.976, 0.394)
pt3dadd(22.064, 40.99, 24.997, 0.416)
pt3dadd(22.12, 40.887, 25.018, 0.438)
pt3dadd(22.161, 40.775, 25.031, 0.468)
pt3dadd(22.2, 40.662, 25.042, 0.5)
pt3dadd(22.238, 40.55, 25.054, 0.534)
pt3dadd(22.277, 40.437, 25.066, 0.566)
pt3dadd(22.315, 40.324, 25.077, 0.598)
pt3dadd(22.354, 40.211, 25.089, 0.63)
pt3dadd(22.393, 40.099, 25.101, 0.662)
pt3dadd(22.431, 39.986, 25.113, 0.694)
pt3dadd(22.47, 39.873, 25.124, 0.728)
pt3dadd(22.508, 39.76, 25.136, 0.76)
pt3dadd(22.548, 39.648, 25.145, 0.78)
pt3dadd(22.588, 39.535, 25.153, 0.8)
pt3dadd(22.628, 39.422, 25.162, 0.82)
pt3dadd(22.668, 39.309, 25.17, 0.84)
pt3dadd(22.707, 39.197, 25.179, 0.86)
pt3dadd(22.747, 39.084, 25.188, 0.878)
pt3dadd(22.787, 38.971, 25.196, 0.898)
pt3dadd(22.827, 38.858, 25.205, 0.918)
pt3dadd(22.866, 38.746, 25.213, 0.938)
pt3dadd(22.906, 38.633, 25.222, 0.958)
pt3dadd(22.963, 38.529, 25.237, 0.97)
pt3dadd(23.021, 38.425, 25.252, 0.984)
pt3dadd(23.079, 38.322, 25.268, 0.996)
pt3dadd(23.136, 38.218, 25.283, 1.008)
pt3dadd(23.194, 38.115, 25.298, 1.02)
pt3dadd(23.252, 38.011, 25.314, 1.032)
}
}
proc shape3d_97() {
dend_7[9] { pt3dadd(23.309, 37.907, 25.329, 1.046)
pt3dadd(23.367, 37.804, 25.345, 1.058)
pt3dadd(23.425, 37.7, 25.36, 1.07)
pt3dadd(23.482, 37.597, 25.376, 1.08)
pt3dadd(23.542, 37.509, 25.422, 1.034)
pt3dadd(23.601, 37.42, 25.468, 0.988)
pt3dadd(23.661, 37.331, 25.514, 0.942)
pt3dadd(23.72, 37.243, 25.56, 0.894)
pt3dadd(23.779, 37.154, 25.606, 0.848)
pt3dadd(23.839, 37.066, 25.652, 0.802)
pt3dadd(23.898, 36.977, 25.698, 0.756)
pt3dadd(23.958, 36.889, 25.743, 0.71)
pt3dadd(24.017, 36.8, 25.789, 0.662)
pt3dadd(24.077, 36.711, 25.834, 0.616)
pt3dadd(24.147, 36.619, 25.859, 0.578)
pt3dadd(24.218, 36.526, 25.884, 0.538)
pt3dadd(24.288, 36.434, 25.91, 0.498)
pt3dadd(24.358, 36.341, 25.935, 0.46)
pt3dadd(24.428, 36.249, 25.96, 0.42)
pt3dadd(24.498, 36.156, 25.985, 0.38)
pt3dadd(24.568, 36.064, 26.011, 0.342)
pt3dadd(24.638, 35.971, 26.036, 0.302)
pt3dadd(24.708, 35.879, 26.061, 0.262)
pt3dadd(24.777, 35.785, 26.085, 0.226)
pt3dadd(24.824, 35.675, 26.097, 0.226)
pt3dadd(24.871, 35.566, 26.108, 0.226)
pt3dadd(24.918, 35.456, 26.12, 0.226)
pt3dadd(24.965, 35.347, 26.131, 0.226)
pt3dadd(25.012, 35.237, 26.142, 0.226)
pt3dadd(25.059, 35.127, 26.154, 0.226)
pt3dadd(25.106, 35.018, 26.165, 0.226)
pt3dadd(25.153, 34.908, 26.177, 0.226)
pt3dadd(25.2, 34.799, 26.188, 0.226)
pt3dadd(25.247, 34.689, 26.199, 0.228)
pt3dadd(25.289, 34.577, 26.199, 0.264)
pt3dadd(25.331, 34.464, 26.199, 0.3)
pt3dadd(25.373, 34.352, 26.2, 0.334)
pt3dadd(25.416, 34.24, 26.2, 0.37)
pt3dadd(25.458, 34.128, 26.2, 0.406)
pt3dadd(25.5, 34.015, 26.201, 0.442)
pt3dadd(25.542, 33.903, 26.201, 0.476)
pt3dadd(25.585, 33.791, 26.201, 0.512)
pt3dadd(25.627, 33.678, 26.202, 0.548)
pt3dadd(25.671, 33.567, 26.202, 0.58)
pt3dadd(25.734, 33.465, 26.2, 0.576)
pt3dadd(25.796, 33.362, 26.199, 0.572)
pt3dadd(25.859, 33.26, 26.198, 0.568)
pt3dadd(25.922, 33.158, 26.196, 0.566)
pt3dadd(25.984, 33.055, 26.195, 0.562)
pt3dadd(26.047, 32.953, 26.193, 0.558)
pt3dadd(26.11, 32.851, 26.192, 0.556)
pt3dadd(26.172, 32.748, 26.191, 0.552)
pt3dadd(26.235, 32.646, 26.189, 0.548)
pt3dadd(26.301, 32.546, 26.188, 0.544)
pt3dadd(26.385, 32.461, 26.185, 0.534)
pt3dadd(26.47, 32.376, 26.183, 0.524)
pt3dadd(26.554, 32.29, 26.18, 0.516)
pt3dadd(26.638, 32.205, 26.178, 0.506)
pt3dadd(26.723, 32.119, 26.175, 0.496)
pt3dadd(26.807, 32.034, 26.173, 0.488)
pt3dadd(26.891, 31.949, 26.17, 0.478)
pt3dadd(26.976, 31.863, 26.168, 0.468)
pt3dadd(27.06, 31.778, 26.166, 0.458)
pt3dadd(27.148, 31.697, 26.163, 0.452)
pt3dadd(27.245, 31.626, 26.158, 0.452)
pt3dadd(27.342, 31.556, 26.154, 0.452)
pt3dadd(27.439, 31.485, 26.15, 0.452)
pt3dadd(27.535, 31.415, 26.145, 0.452)
pt3dadd(27.632, 31.344, 26.141, 0.452)
pt3dadd(27.729, 31.274, 26.137, 0.452)
pt3dadd(27.826, 31.203, 26.132, 0.452)
pt3dadd(27.923, 31.132, 26.128, 0.452)
pt3dadd(28.02, 31.062, 26.124, 0.452)
pt3dadd(28.116, 30.99, 26.119, 0.452)
pt3dadd(28.208, 30.914, 26.111, 0.452)
pt3dadd(28.301, 30.838, 26.104, 0.452)
pt3dadd(28.393, 30.762, 26.097, 0.452)
pt3dadd(28.486, 30.686, 26.09, 0.452)
pt3dadd(28.578, 30.61, 26.083, 0.452)
pt3dadd(28.671, 30.534, 26.076, 0.452)
pt3dadd(28.764, 30.458, 26.069, 0.452)
pt3dadd(28.856, 30.382, 26.062, 0.452)
pt3dadd(28.949, 30.307, 26.054, 0.452)
pt3dadd(29.039, 30.228, 26.046, 0.464)
pt3dadd(29.123, 30.144, 26.035, 0.504)
pt3dadd(29.207, 30.06, 26.024, 0.544)
pt3dadd(29.292, 29.975, 26.013, 0.584)
pt3dadd(29.376, 29.891, 26.002, 0.624)
pt3dadd(29.461, 29.807, 25.991, 0.664)
pt3dadd(29.545, 29.723, 25.98, 0.704)
pt3dadd(29.63, 29.638, 25.969, 0.744)
pt3dadd(29.714, 29.554, 25.957, 0.786)
pt3dadd(29.798, 29.47, 25.946, 0.826)
pt3dadd(29.879, 29.383, 25.931, 0.858)
pt3dadd(29.951, 29.291, 25.908, 0.872)
pt3dadd(30.022, 29.199, 25.885, 0.888)
pt3dadd(30.094, 29.107, 25.862, 0.902)
pt3dadd(30.166, 29.015, 25.839, 0.918)
pt3dadd(30.238, 28.923, 25.816, 0.934)
pt3dadd(30.31, 28.831, 25.793, 0.948)
pt3dadd(30.382, 28.739, 25.77, 0.964)
pt3dadd(30.454, 28.647, 25.746, 0.978)
pt3dadd(30.525, 28.555, 25.723, 0.994)
pt3dadd(30.588, 28.46, 25.692, 0.986)
pt3dadd(30.64, 28.363, 25.653, 0.954)
pt3dadd(30.692, 28.266, 25.615, 0.922)
pt3dadd(30.744, 28.168, 25.576, 0.89)
pt3dadd(30.797, 28.071, 25.537, 0.858)
pt3dadd(30.849, 27.973, 25.498, 0.826)
pt3dadd(30.901, 27.876, 25.459, 0.796)
pt3dadd(30.954, 27.778, 25.42, 0.764)
pt3dadd(31.006, 27.681, 25.382, 0.732)
pt3dadd(31.058, 27.584, 25.343, 0.7)
pt3dadd(31.116, 27.487, 25.308, 0.668)
pt3dadd(31.178, 27.391, 25.278, 0.636)
pt3dadd(31.241, 27.295, 25.248, 0.606)
pt3dadd(31.303, 27.199, 25.218, 0.574)
pt3dadd(31.366, 27.104, 25.188, 0.542)
pt3dadd(31.429, 27.008, 25.158, 0.51)
pt3dadd(31.491, 26.912, 25.128, 0.478)
pt3dadd(31.554, 26.816, 25.097, 0.446)
pt3dadd(31.616, 26.72, 25.067, 0.414)
pt3dadd(31.679, 26.625, 25.037, 0.384)
pt3dadd(31.738, 26.529, 25.003, 0.378)
pt3dadd(31.794, 26.433, 24.965, 0.402)
pt3dadd(31.85, 26.337, 24.928, 0.424)
pt3dadd(31.906, 26.241, 24.89, 0.446)
pt3dadd(31.963, 26.145, 24.852, 0.468)
pt3dadd(32.019, 26.049, 24.814, 0.492)
pt3dadd(32.075, 25.954, 24.776, 0.514)
pt3dadd(32.131, 25.858, 24.738, 0.536)
pt3dadd(32.187, 25.762, 24.7, 0.558)
pt3dadd(32.243, 25.666, 24.663, 0.582)
pt3dadd(32.299, 25.571, 24.624, 0.616)
pt3dadd(32.354, 25.476, 24.583, 0.662)
pt3dadd(32.41, 25.381, 24.543, 0.706)
pt3dadd(32.465, 25.286, 24.503, 0.752)
pt3dadd(32.52, 25.191, 24.463, 0.796)
pt3dadd(32.576, 25.096, 24.423, 0.842)
pt3dadd(32.631, 25.001, 24.383, 0.886)
pt3dadd(32.687, 24.906, 24.343, 0.932)
pt3dadd(32.742, 24.811, 24.303, 0.976)
pt3dadd(32.798, 24.716, 24.263, 1.022)
pt3dadd(32.866, 24.625, 24.235, 1.008)
pt3dadd(32.942, 24.536, 24.213, 0.96)
pt3dadd(33.019, 24.447, 24.192, 0.91)
pt3dadd(33.095, 24.358, 24.171, 0.862)
pt3dadd(33.171, 24.269, 24.15, 0.812)
pt3dadd(33.248, 24.18, 24.129, 0.764)
pt3dadd(33.324, 24.091, 24.108, 0.716)
pt3dadd(33.401, 24.002, 24.087, 0.666)
pt3dadd(33.477, 23.913, 24.066, 0.618)
pt3dadd(33.554, 23.824, 24.045, 0.568)
pt3dadd(33.642, 23.746, 24.028, 0.544)
pt3dadd(33.738, 23.675, 24.015, 0.534)
pt3dadd(33.833, 23.605, 24.002, 0.524)
pt3dadd(33.929, 23.534, 23.99, 0.514)
pt3dadd(34.025, 23.463, 23.976, 0.504)
pt3dadd(34.12, 23.393, 23.963, 0.494)
pt3dadd(34.216, 23.322, 23.951, 0.484)
pt3dadd(34.312, 23.251, 23.938, 0.474)
pt3dadd(34.407, 23.181, 23.925, 0.464)
pt3dadd(34.503, 23.11, 23.912, 0.456)
pt3dadd(34.601, 23.041, 23.904, 0.446)
pt3dadd(34.699, 22.973, 23.899, 0.438)
pt3dadd(34.798, 22.905, 23.893, 0.428)
pt3dadd(34.897, 22.836, 23.888, 0.42)
pt3dadd(34.995, 22.768, 23.883, 0.412)
pt3dadd(35.094, 22.7, 23.877, 0.402)
pt3dadd(35.192, 22.632, 23.872, 0.394)
pt3dadd(35.291, 22.564, 23.867, 0.384)
pt3dadd(35.389, 22.495, 23.862, 0.376)
pt3dadd(35.488, 22.427, 23.856, 0.368)
pt3dadd(35.585, 22.357, 23.854, 0.356)
pt3dadd(35.682, 22.286, 23.853, 0.342)
pt3dadd(35.779, 22.215, 23.852, 0.328)
pt3dadd(35.876, 22.145, 23.852, 0.314)
pt3dadd(35.973, 22.074, 23.851, 0.3)
pt3dadd(36.069, 22.003, 23.85, 0.286)
pt3dadd(36.166, 21.932, 23.849, 0.272)
pt3dadd(36.263, 21.861, 23.848, 0.258)
pt3dadd(36.36, 21.79, 23.847, 0.244)
pt3dadd(36.457, 21.719, 23.847, 0.23)
pt3dadd(36.551, 21.645, 23.845, 0.226)
pt3dadd(36.643, 21.568, 23.844, 0.226)
pt3dadd(36.736, 21.492, 23.842, 0.226)
pt3dadd(36.828, 21.416, 23.84, 0.226)
pt3dadd(36.921, 21.339, 23.838, 0.226)
pt3dadd(37.014, 21.263, 23.837, 0.226)
pt3dadd(37.106, 21.187, 23.835, 0.226)
pt3dadd(37.199, 21.111, 23.834, 0.226)
pt3dadd(37.291, 21.034, 23.832, 0.226)
pt3dadd(37.384, 20.958, 23.83, 0.226)
pt3dadd(37.476, 20.881, 23.828, 0.226)
pt3dadd(37.568, 20.804, 23.825, 0.226)
pt3dadd(37.66, 20.727, 23.823, 0.226)
pt3dadd(37.752, 20.65, 23.82, 0.226)
pt3dadd(37.844, 20.573, 23.817, 0.226)
pt3dadd(37.936, 20.496, 23.815, 0.226)
pt3dadd(38.028, 20.419, 23.812, 0.226)
}
}
proc shape3d_98() {
dend_7[9] { pt3dadd(38.12, 20.342, 23.809, 0.226)
pt3dadd(38.212, 20.265, 23.807, 0.226)
pt3dadd(38.304, 20.188, 23.804, 0.226)
pt3dadd(38.397, 20.112, 23.8, 0.226)
pt3dadd(38.489, 20.036, 23.796, 0.226)
pt3dadd(38.582, 19.96, 23.791, 0.226)
pt3dadd(38.675, 19.884, 23.787, 0.226)
pt3dadd(38.767, 19.808, 23.782, 0.226)
pt3dadd(38.86, 19.732, 23.778, 0.226)
pt3dadd(38.953, 19.656, 23.774, 0.226)
pt3dadd(39.046, 19.58, 23.769, 0.226)
pt3dadd(39.138, 19.504, 23.765, 0.226)
pt3dadd(39.231, 19.428, 23.76, 0.226)
pt3dadd(39.327, 19.357, 23.752, 0.226)
pt3dadd(39.424, 19.288, 23.742, 0.226)
pt3dadd(39.522, 19.218, 23.733, 0.226)
pt3dadd(39.619, 19.149, 23.723, 0.226)
pt3dadd(39.716, 19.08, 23.713, 0.226)
pt3dadd(39.813, 19.011, 23.703, 0.226)
pt3dadd(39.911, 18.941, 23.694, 0.226)
pt3dadd(40.008, 18.872, 23.684, 0.226)
pt3dadd(40.105, 18.803, 23.674, 0.226)
pt3dadd(40.203, 18.734, 23.664, 0.226)
pt3dadd(40.315, 18.713, 23.648, 0.226)
pt3dadd(40.433, 18.712, 23.63, 0.226)
pt3dadd(40.551, 18.712, 23.611, 0.226)
pt3dadd(40.668, 18.711, 23.593, 0.226)
pt3dadd(40.786, 18.711, 23.575, 0.226)
pt3dadd(40.904, 18.71, 23.556, 0.226)
pt3dadd(41.022, 18.709, 23.538, 0.226)
pt3dadd(41.14, 18.709, 23.52, 0.226)
pt3dadd(41.258, 18.708, 23.501, 0.226)
pt3dadd(41.376, 18.707, 23.483, 0.226)
pt3dadd(41.446, 18.737, 23.408, 0.226)
pt3dadd(41.511, 18.769, 23.329, 0.226)
pt3dadd(41.577, 18.8, 23.249, 0.226)
pt3dadd(41.643, 18.832, 23.17, 0.226)
pt3dadd(41.709, 18.864, 23.091, 0.226)
pt3dadd(41.775, 18.896, 23.011, 0.226)
pt3dadd(41.841, 18.927, 22.932, 0.226)
pt3dadd(41.907, 18.959, 22.853, 0.226)
pt3dadd(41.973, 18.991, 22.773, 0.226)
pt3dadd(42.038, 19.022, 22.694, 0.226)
}
dend_7[10] {pt3dclear()
pt3dadd(9.864, 89.512, 23.899, 0.904)
pt3dadd(9.844, 89.512, 23.899, 0.896)
pt3dadd(9.724, 89.509, 23.896, 0.846)
pt3dadd(9.605, 89.506, 23.894, 0.796)
pt3dadd(9.485, 89.504, 23.892, 0.748)
pt3dadd(9.365, 89.501, 23.89, 0.698)
pt3dadd(9.245, 89.498, 23.887, 0.648)
pt3dadd(9.125, 89.496, 23.885, 0.598)
pt3dadd(9.005, 89.493, 23.883, 0.558)
pt3dadd(8.885, 89.491, 23.882, 0.522)
pt3dadd(8.765, 89.489, 23.88, 0.488)
pt3dadd(8.645, 89.486, 23.879, 0.452)
pt3dadd(8.525, 89.484, 23.877, 0.416)
pt3dadd(8.405, 89.481, 23.875, 0.38)
pt3dadd(8.285, 89.479, 23.874, 0.346)
pt3dadd(8.165, 89.477, 23.872, 0.31)
pt3dadd(8.045, 89.475, 23.871, 0.274)
pt3dadd(7.925, 89.472, 23.869, 0.238)
pt3dadd(7.805, 89.47, 23.868, 0.226)
pt3dadd(7.685, 89.469, 23.868, 0.226)
pt3dadd(7.565, 89.468, 23.868, 0.226)
pt3dadd(7.445, 89.466, 23.868, 0.226)
pt3dadd(7.325, 89.465, 23.868, 0.226)
pt3dadd(7.205, 89.463, 23.868, 0.226)
pt3dadd(7.085, 89.462, 23.868, 0.226)
pt3dadd(6.965, 89.46, 23.868, 0.226)
pt3dadd(6.845, 89.459, 23.868, 0.226)
pt3dadd(6.725, 89.458, 23.868, 0.226)
pt3dadd(6.605, 89.456, 23.868, 0.226)
pt3dadd(6.485, 89.454, 23.868, 0.226)
pt3dadd(6.365, 89.452, 23.868, 0.226)
pt3dadd(6.245, 89.451, 23.868, 0.226)
pt3dadd(6.125, 89.449, 23.868, 0.226)
pt3dadd(6.005, 89.447, 23.868, 0.226)
pt3dadd(5.885, 89.445, 23.868, 0.226)
pt3dadd(5.765, 89.443, 23.868, 0.226)
pt3dadd(5.645, 89.442, 23.868, 0.226)
pt3dadd(5.525, 89.44, 23.868, 0.226)
pt3dadd(5.406, 89.436, 23.868, 0.238)
pt3dadd(5.286, 89.432, 23.868, 0.256)
pt3dadd(5.166, 89.427, 23.868, 0.274)
pt3dadd(5.046, 89.423, 23.868, 0.292)
pt3dadd(4.926, 89.418, 23.868, 0.31)
pt3dadd(4.806, 89.414, 23.868, 0.328)
pt3dadd(4.686, 89.409, 23.868, 0.346)
pt3dadd(4.566, 89.404, 23.868, 0.364)
pt3dadd(4.446, 89.4, 23.868, 0.382)
pt3dadd(4.326, 89.395, 23.868, 0.4)
pt3dadd(4.206, 89.391, 23.868, 0.4)
pt3dadd(4.086, 89.386, 23.868, 0.39)
pt3dadd(3.966, 89.381, 23.868, 0.38)
pt3dadd(3.847, 89.376, 23.868, 0.37)
pt3dadd(3.727, 89.371, 23.868, 0.36)
pt3dadd(3.607, 89.366, 23.868, 0.35)
pt3dadd(3.487, 89.361, 23.868, 0.34)
pt3dadd(3.367, 89.356, 23.868, 0.33)
pt3dadd(3.247, 89.352, 23.868, 0.32)
pt3dadd(3.127, 89.347, 23.868, 0.31)
pt3dadd(3.008, 89.332, 23.868, 0.302)
pt3dadd(2.89, 89.311, 23.868, 0.292)
pt3dadd(2.772, 89.29, 23.868, 0.284)
pt3dadd(2.654, 89.27, 23.868, 0.276)
pt3dadd(2.535, 89.249, 23.868, 0.268)
pt3dadd(2.417, 89.229, 23.868, 0.26)
pt3dadd(2.299, 89.208, 23.868, 0.252)
pt3dadd(2.181, 89.187, 23.868, 0.244)
pt3dadd(2.063, 89.167, 23.868, 0.236)
pt3dadd(1.944, 89.146, 23.868, 0.228)
pt3dadd(1.825, 89.131, 23.868, 0.23)
pt3dadd(1.706, 89.119, 23.868, 0.238)
pt3dadd(1.587, 89.106, 23.868, 0.246)
pt3dadd(1.467, 89.093, 23.868, 0.252)
pt3dadd(1.348, 89.08, 23.868, 0.26)
pt3dadd(1.229, 89.068, 23.868, 0.266)
pt3dadd(1.11, 89.055, 23.868, 0.274)
pt3dadd(0.99, 89.042, 23.868, 0.28)
pt3dadd(0.871, 89.03, 23.868, 0.288)
pt3dadd(0.752, 89.017, 23.868, 0.294)
pt3dadd(0.633, 89.036, 23.868, 0.314)
pt3dadd(0.515, 89.057, 23.868, 0.332)
pt3dadd(0.397, 89.078, 23.868, 0.35)
pt3dadd(0.279, 89.099, 23.868, 0.37)
pt3dadd(0.161, 89.12, 23.868, 0.388)
pt3dadd(0.043, 89.141, 23.868, 0.408)
pt3dadd(-0.075, 89.162, 23.868, 0.426)
pt3dadd(-0.194, 89.184, 23.868, 0.446)
pt3dadd(-0.312, 89.205, 23.868, 0.464)
pt3dadd(-0.43, 89.226, 23.868, 0.484)
pt3dadd(-0.548, 89.248, 23.868, 0.502)
pt3dadd(-0.666, 89.271, 23.868, 0.522)
pt3dadd(-0.783, 89.294, 23.868, 0.54)
pt3dadd(-0.901, 89.316, 23.868, 0.56)
pt3dadd(-1.019, 89.339, 23.868, 0.578)
pt3dadd(-1.137, 89.361, 23.868, 0.596)
pt3dadd(-1.255, 89.384, 23.868, 0.616)
pt3dadd(-1.373, 89.407, 23.868, 0.634)
pt3dadd(-1.491, 89.429, 23.868, 0.654)
pt3dadd(-1.608, 89.452, 23.868, 0.672)
pt3dadd(-1.726, 89.475, 23.868, 0.64)
pt3dadd(-1.844, 89.499, 23.868, 0.604)
pt3dadd(-1.961, 89.522, 23.868, 0.568)
pt3dadd(-2.079, 89.545, 23.868, 0.53)
pt3dadd(-2.197, 89.569, 23.868, 0.494)
pt3dadd(-2.315, 89.592, 23.868, 0.458)
pt3dadd(-2.432, 89.616, 23.868, 0.422)
pt3dadd(-2.55, 89.639, 23.868, 0.384)
pt3dadd(-2.668, 89.662, 23.868, 0.348)
pt3dadd(-2.785, 89.686, 23.868, 0.312)
pt3dadd(-2.9, 89.72, 23.868, 0.314)
pt3dadd(-3.015, 89.754, 23.868, 0.32)
pt3dadd(-3.13, 89.789, 23.868, 0.326)
pt3dadd(-3.245, 89.823, 23.868, 0.332)
pt3dadd(-3.36, 89.858, 23.868, 0.338)
pt3dadd(-3.475, 89.892, 23.868, 0.344)
pt3dadd(-3.59, 89.927, 23.868, 0.35)
pt3dadd(-3.705, 89.961, 23.868, 0.356)
pt3dadd(-3.82, 89.996, 23.868, 0.362)
pt3dadd(-3.935, 90.031, 23.868, 0.368)
pt3dadd(-4.052, 90.057, 23.868, 0.386)
pt3dadd(-4.169, 90.082, 23.868, 0.406)
pt3dadd(-4.286, 90.108, 23.868, 0.424)
pt3dadd(-4.403, 90.134, 23.868, 0.442)
pt3dadd(-4.521, 90.16, 23.868, 0.462)
pt3dadd(-4.638, 90.185, 23.868, 0.48)
pt3dadd(-4.755, 90.211, 23.868, 0.5)
pt3dadd(-4.872, 90.237, 23.868, 0.518)
pt3dadd(-4.989, 90.262, 23.868, 0.536)
pt3dadd(-5.107, 90.288, 23.868, 0.556)
pt3dadd(-5.227, 90.286, 23.868, 0.554)
pt3dadd(-5.347, 90.284, 23.868, 0.554)
pt3dadd(-5.467, 90.282, 23.868, 0.552)
pt3dadd(-5.587, 90.28, 23.868, 0.552)
pt3dadd(-5.707, 90.278, 23.868, 0.55)
pt3dadd(-5.827, 90.276, 23.868, 0.55)
pt3dadd(-5.946, 90.274, 23.868, 0.548)
pt3dadd(-6.066, 90.271, 23.868, 0.546)
pt3dadd(-6.186, 90.269, 23.868, 0.546)
pt3dadd(-6.306, 90.262, 23.868, 0.54)
pt3dadd(-6.421, 90.229, 23.868, 0.508)
pt3dadd(-6.537, 90.196, 23.868, 0.476)
pt3dadd(-6.652, 90.163, 23.868, 0.444)
pt3dadd(-6.767, 90.131, 23.868, 0.412)
pt3dadd(-6.883, 90.098, 23.868, 0.38)
pt3dadd(-6.998, 90.065, 23.868, 0.348)
pt3dadd(-7.114, 90.032, 23.868, 0.316)
pt3dadd(-7.229, 90, 23.868, 0.284)
pt3dadd(-7.345, 89.967, 23.868, 0.252)
pt3dadd(-7.46, 89.935, 23.868, 0.226)
pt3dadd(-7.577, 89.906, 23.868, 0.226)
pt3dadd(-7.693, 89.877, 23.868, 0.226)
pt3dadd(-7.81, 89.849, 23.869, 0.226)
pt3dadd(-7.926, 89.82, 23.869, 0.226)
pt3dadd(-8.043, 89.791, 23.869, 0.226)
pt3dadd(-8.159, 89.762, 23.869, 0.226)
pt3dadd(-8.276, 89.733, 23.869, 0.226)
pt3dadd(-8.392, 89.705, 23.869, 0.226)
pt3dadd(-8.509, 89.676, 23.869, 0.226)
}
}
proc shape3d_99() {
dend_7[10] { pt3dadd(-8.626, 89.65, 23.869, 0.226)
pt3dadd(-8.745, 89.636, 23.869, 0.226)
pt3dadd(-8.864, 89.621, 23.869, 0.226)
pt3dadd(-8.983, 89.607, 23.869, 0.226)
pt3dadd(-9.102, 89.592, 23.869, 0.226)
pt3dadd(-9.222, 89.578, 23.869, 0.226)
pt3dadd(-9.341, 89.564, 23.869, 0.226)
pt3dadd(-9.46, 89.549, 23.869, 0.226)
pt3dadd(-9.579, 89.535, 23.869, 0.226)
pt3dadd(-9.698, 89.521, 23.869, 0.226)
pt3dadd(-9.817, 89.508, 23.869, 0.226)
pt3dadd(-9.937, 89.505, 23.869, 0.226)
pt3dadd(-10.057, 89.502, 23.869, 0.226)
pt3dadd(-10.177, 89.498, 23.869, 0.226)
pt3dadd(-10.297, 89.495, 23.869, 0.226)
pt3dadd(-10.417, 89.492, 23.869, 0.226)
pt3dadd(-10.537, 89.488, 23.869, 0.226)
pt3dadd(-10.657, 89.485, 23.869, 0.226)
pt3dadd(-10.777, 89.481, 23.869, 0.226)
pt3dadd(-10.897, 89.478, 23.869, 0.226)
pt3dadd(-11.017, 89.475, 23.869, 0.226)
pt3dadd(-11.137, 89.475, 23.87, 0.226)
pt3dadd(-11.257, 89.475, 23.87, 0.226)
pt3dadd(-11.377, 89.475, 23.87, 0.226)
pt3dadd(-11.497, 89.475, 23.87, 0.226)
pt3dadd(-11.617, 89.475, 23.87, 0.226)
pt3dadd(-11.737, 89.475, 23.87, 0.226)
pt3dadd(-11.857, 89.475, 23.87, 0.226)
pt3dadd(-11.977, 89.475, 23.87, 0.226)
pt3dadd(-12.097, 89.475, 23.87, 0.226)
pt3dadd(-12.217, 89.475, 23.871, 0.226)
pt3dadd(-12.337, 89.475, 23.871, 0.226)
pt3dadd(-12.457, 89.475, 23.871, 0.226)
pt3dadd(-12.577, 89.475, 23.871, 0.226)
pt3dadd(-12.697, 89.475, 23.871, 0.226)
pt3dadd(-12.817, 89.475, 23.872, 0.226)
pt3dadd(-12.937, 89.475, 23.872, 0.226)
pt3dadd(-13.057, 89.475, 23.872, 0.226)
pt3dadd(-13.177, 89.475, 23.872, 0.226)
pt3dadd(-13.297, 89.475, 23.872, 0.226)
pt3dadd(-13.417, 89.475, 23.873, 0.226)
pt3dadd(-13.537, 89.475, 23.873, 0.226)
pt3dadd(-13.657, 89.475, 23.873, 0.226)
pt3dadd(-13.777, 89.475, 23.874, 0.226)
pt3dadd(-13.897, 89.475, 23.874, 0.226)
pt3dadd(-14.017, 89.475, 23.875, 0.226)
pt3dadd(-14.137, 89.475, 23.875, 0.226)
pt3dadd(-14.257, 89.475, 23.875, 0.226)
pt3dadd(-14.377, 89.475, 23.876, 0.226)
pt3dadd(-14.497, 89.475, 23.876, 0.226)
pt3dadd(-14.617, 89.475, 23.876, 0.226)
pt3dadd(-14.737, 89.475, 23.877, 0.226)
pt3dadd(-14.857, 89.475, 23.878, 0.226)
pt3dadd(-14.977, 89.475, 23.878, 0.226)
pt3dadd(-15.097, 89.475, 23.879, 0.226)
pt3dadd(-15.217, 89.475, 23.88, 0.226)
pt3dadd(-15.337, 89.475, 23.88, 0.226)
pt3dadd(-15.457, 89.475, 23.881, 0.226)
pt3dadd(-15.577, 89.475, 23.882, 0.226)
pt3dadd(-15.697, 89.475, 23.882, 0.226)
pt3dadd(-15.817, 89.475, 23.883, 0.226)
pt3dadd(-15.937, 89.475, 23.885, 0.226)
pt3dadd(-16.057, 89.474, 23.886, 0.226)
pt3dadd(-16.177, 89.474, 23.888, 0.226)
pt3dadd(-16.297, 89.474, 23.889, 0.226)
pt3dadd(-16.417, 89.474, 23.89, 0.226)
pt3dadd(-16.537, 89.474, 23.892, 0.226)
pt3dadd(-16.657, 89.474, 23.893, 0.226)
pt3dadd(-16.777, 89.474, 23.895, 0.226)
pt3dadd(-16.897, 89.474, 23.896, 0.226)
pt3dadd(-17.017, 89.474, 23.898, 0.226)
pt3dadd(-17.137, 89.473, 23.9, 0.226)
pt3dadd(-17.257, 89.473, 23.903, 0.226)
pt3dadd(-17.377, 89.473, 23.906, 0.226)
pt3dadd(-17.496, 89.473, 23.908, 0.226)
pt3dadd(-17.616, 89.473, 23.911, 0.226)
pt3dadd(-17.736, 89.473, 23.914, 0.226)
pt3dadd(-17.856, 89.472, 23.916, 0.226)
pt3dadd(-17.976, 89.472, 23.919, 0.226)
pt3dadd(-18.096, 89.472, 23.922, 0.226)
pt3dadd(-18.216, 89.472, 23.925, 0.226)
pt3dadd(-18.336, 89.472, 23.931, 0.226)
pt3dadd(-18.456, 89.471, 23.937, 0.226)
pt3dadd(-18.576, 89.471, 23.942, 0.226)
pt3dadd(-18.695, 89.471, 23.948, 0.226)
pt3dadd(-18.815, 89.47, 23.954, 0.226)
pt3dadd(-18.935, 89.47, 23.96, 0.226)
pt3dadd(-19.055, 89.47, 23.966, 0.226)
pt3dadd(-19.175, 89.469, 23.971, 0.226)
pt3dadd(-19.294, 89.469, 23.977, 0.226)
pt3dadd(-19.414, 89.469, 23.984, 0.23)
pt3dadd(-19.534, 89.468, 23.993, 0.25)
pt3dadd(-19.653, 89.467, 24.003, 0.27)
pt3dadd(-19.773, 89.467, 24.012, 0.29)
pt3dadd(-19.892, 89.466, 24.021, 0.31)
pt3dadd(-20.011, 89.465, 24.031, 0.33)
pt3dadd(-20.131, 89.465, 24.04, 0.35)
pt3dadd(-20.25, 89.464, 24.05, 0.37)
pt3dadd(-20.37, 89.463, 24.059, 0.39)
pt3dadd(-20.489, 89.463, 24.069, 0.41)
pt3dadd(-20.608, 89.462, 24.08, 0.434)
pt3dadd(-20.726, 89.461, 24.101, 0.464)
pt3dadd(-20.843, 89.46, 24.121, 0.496)
pt3dadd(-20.961, 89.459, 24.142, 0.528)
pt3dadd(-21.078, 89.457, 24.162, 0.56)
pt3dadd(-21.196, 89.456, 24.183, 0.59)
pt3dadd(-21.313, 89.455, 24.203, 0.622)
pt3dadd(-21.43, 89.454, 24.224, 0.654)
pt3dadd(-21.548, 89.453, 24.244, 0.686)
pt3dadd(-21.665, 89.452, 24.265, 0.716)
pt3dadd(-21.781, 89.45, 24.29, 0.742)
pt3dadd(-21.893, 89.448, 24.326, 0.754)
pt3dadd(-22.005, 89.446, 24.362, 0.766)
pt3dadd(-22.117, 89.445, 24.398, 0.78)
pt3dadd(-22.229, 89.443, 24.435, 0.792)
pt3dadd(-22.34, 89.441, 24.471, 0.804)
pt3dadd(-22.452, 89.439, 24.507, 0.816)
pt3dadd(-22.564, 89.437, 24.543, 0.828)
pt3dadd(-22.676, 89.435, 24.579, 0.84)
pt3dadd(-22.788, 89.433, 24.616, 0.852)
pt3dadd(-22.901, 89.431, 24.648, 0.844)
pt3dadd(-23.017, 89.427, 24.672, 0.788)
pt3dadd(-23.134, 89.423, 24.696, 0.732)
pt3dadd(-23.25, 89.419, 24.72, 0.676)
pt3dadd(-23.367, 89.416, 24.745, 0.62)
pt3dadd(-23.483, 89.412, 24.768, 0.564)
pt3dadd(-23.599, 89.408, 24.792, 0.508)
pt3dadd(-23.716, 89.404, 24.817, 0.452)
pt3dadd(-23.832, 89.401, 24.841, 0.396)
pt3dadd(-23.949, 89.397, 24.865, 0.34)
pt3dadd(-24.066, 89.392, 24.885, 0.308)
pt3dadd(-24.185, 89.383, 24.898, 0.334)
pt3dadd(-24.303, 89.375, 24.911, 0.36)
pt3dadd(-24.422, 89.366, 24.924, 0.384)
pt3dadd(-24.541, 89.358, 24.937, 0.41)
pt3dadd(-24.659, 89.349, 24.95, 0.436)
pt3dadd(-24.778, 89.34, 24.963, 0.462)
pt3dadd(-24.897, 89.332, 24.976, 0.488)
pt3dadd(-25.015, 89.323, 24.988, 0.514)
pt3dadd(-25.134, 89.315, 25.001, 0.54)
pt3dadd(-25.253, 89.305, 25.012, 0.57)
pt3dadd(-25.372, 89.291, 25.015, 0.608)
pt3dadd(-25.491, 89.277, 25.019, 0.646)
pt3dadd(-25.61, 89.263, 25.023, 0.684)
pt3dadd(-25.729, 89.249, 25.026, 0.722)
pt3dadd(-25.848, 89.235, 25.03, 0.76)
pt3dadd(-25.968, 89.222, 25.034, 0.8)
pt3dadd(-26.087, 89.208, 25.038, 0.838)
pt3dadd(-26.206, 89.194, 25.041, 0.876)
pt3dadd(-26.325, 89.18, 25.045, 0.914)
pt3dadd(-26.443, 89.16, 25.048, 0.934)
pt3dadd(-26.558, 89.128, 25.048, 0.918)
pt3dadd(-26.674, 89.095, 25.049, 0.9)
pt3dadd(-26.79, 89.063, 25.049, 0.884)
pt3dadd(-26.905, 89.031, 25.049, 0.866)
pt3dadd(-27.021, 88.998, 25.05, 0.85)
pt3dadd(-27.136, 88.966, 25.05, 0.832)
pt3dadd(-27.252, 88.933, 25.051, 0.816)
pt3dadd(-27.367, 88.901, 25.051, 0.798)
pt3dadd(-27.483, 88.868, 25.052, 0.782)
pt3dadd(-27.596, 88.83, 25.052, 0.752)
pt3dadd(-27.707, 88.784, 25.053, 0.706)
pt3dadd(-27.818, 88.739, 25.054, 0.66)
pt3dadd(-27.929, 88.693, 25.055, 0.614)
pt3dadd(-28.04, 88.647, 25.055, 0.568)
pt3dadd(-28.151, 88.601, 25.056, 0.522)
pt3dadd(-28.262, 88.555, 25.057, 0.476)
pt3dadd(-28.373, 88.509, 25.058, 0.43)
pt3dadd(-28.483, 88.464, 25.058, 0.384)
pt3dadd(-28.594, 88.418, 25.059, 0.338)
pt3dadd(-28.707, 88.375, 25.06, 0.328)
pt3dadd(-28.82, 88.337, 25.062, 0.364)
pt3dadd(-28.934, 88.299, 25.063, 0.4)
pt3dadd(-29.048, 88.261, 25.064, 0.436)
pt3dadd(-29.162, 88.223, 25.066, 0.472)
pt3dadd(-29.276, 88.185, 25.067, 0.508)
pt3dadd(-29.389, 88.147, 25.069, 0.544)
pt3dadd(-29.503, 88.11, 25.07, 0.58)
pt3dadd(-29.617, 88.071, 25.071, 0.616)
pt3dadd(-29.731, 88.034, 25.073, 0.652)
pt3dadd(-29.846, 87.999, 25.075, 0.656)
pt3dadd(-29.962, 87.968, 25.077, 0.618)
pt3dadd(-30.078, 87.938, 25.08, 0.578)
pt3dadd(-30.194, 87.907, 25.083, 0.54)
pt3dadd(-30.31, 87.877, 25.086, 0.502)
pt3dadd(-30.426, 87.847, 25.089, 0.462)
pt3dadd(-30.542, 87.816, 25.092, 0.424)
pt3dadd(-30.658, 87.786, 25.095, 0.386)
pt3dadd(-30.774, 87.755, 25.097, 0.348)
pt3dadd(-30.89, 87.725, 25.1, 0.308)
pt3dadd(-31.003, 87.686, 25.105, 0.298)
pt3dadd(-31.112, 87.636, 25.111, 0.324)
pt3dadd(-31.221, 87.587, 25.117, 0.348)
pt3dadd(-31.33, 87.537, 25.123, 0.374)
pt3dadd(-31.439, 87.487, 25.129, 0.4)
pt3dadd(-31.548, 87.437, 25.136, 0.426)
pt3dadd(-31.656, 87.388, 25.142, 0.452)
pt3dadd(-31.765, 87.338, 25.148, 0.478)
pt3dadd(-31.874, 87.288, 25.154, 0.504)
pt3dadd(-31.983, 87.238, 25.161, 0.528)
}
}
proc shape3d_100() {
dend_7[10] { pt3dadd(-32.092, 87.189, 25.169, 0.548)
pt3dadd(-32.201, 87.139, 25.179, 0.562)
pt3dadd(-32.309, 87.09, 25.19, 0.576)
pt3dadd(-32.418, 87.04, 25.2, 0.59)
pt3dadd(-32.527, 86.991, 25.21, 0.604)
pt3dadd(-32.635, 86.941, 25.221, 0.616)
pt3dadd(-32.744, 86.892, 25.231, 0.63)
pt3dadd(-32.853, 86.842, 25.241, 0.644)
pt3dadd(-32.961, 86.793, 25.252, 0.658)
pt3dadd(-33.07, 86.744, 25.262, 0.67)
pt3dadd(-33.174, 86.692, 25.284, 0.684)
pt3dadd(-33.273, 86.639, 25.319, 0.698)
pt3dadd(-33.371, 86.586, 25.355, 0.714)
pt3dadd(-33.47, 86.532, 25.39, 0.728)
pt3dadd(-33.569, 86.479, 25.425, 0.742)
pt3dadd(-33.668, 86.426, 25.461, 0.756)
pt3dadd(-33.767, 86.373, 25.496, 0.77)
pt3dadd(-33.865, 86.319, 25.531, 0.784)
pt3dadd(-33.964, 86.266, 25.567, 0.798)
pt3dadd(-34.063, 86.213, 25.602, 0.812)
pt3dadd(-34.151, 86.144, 25.638, 0.812)
pt3dadd(-34.235, 86.071, 25.674, 0.808)
pt3dadd(-34.32, 85.997, 25.71, 0.802)
pt3dadd(-34.404, 85.923, 25.746, 0.798)
pt3dadd(-34.488, 85.849, 25.782, 0.792)
pt3dadd(-34.572, 85.776, 25.818, 0.788)
pt3dadd(-34.656, 85.702, 25.854, 0.784)
pt3dadd(-34.741, 85.628, 25.89, 0.778)
pt3dadd(-34.825, 85.554, 25.926, 0.774)
pt3dadd(-34.909, 85.48, 25.961, 0.768)
pt3dadd(-34.981, 85.388, 25.982, 0.76)
pt3dadd(-35.05, 85.292, 25.999, 0.75)
pt3dadd(-35.12, 85.197, 26.017, 0.742)
pt3dadd(-35.19, 85.101, 26.034, 0.732)
pt3dadd(-35.259, 85.006, 26.052, 0.724)
pt3dadd(-35.329, 84.91, 26.069, 0.714)
pt3dadd(-35.398, 84.815, 26.086, 0.706)
pt3dadd(-35.468, 84.72, 26.104, 0.696)
pt3dadd(-35.538, 84.624, 26.122, 0.688)
pt3dadd(-35.607, 84.529, 26.139, 0.678)
pt3dadd(-35.672, 84.428, 26.145, 0.672)
pt3dadd(-35.737, 84.327, 26.151, 0.666)
pt3dadd(-35.802, 84.227, 26.157, 0.66)
pt3dadd(-35.867, 84.126, 26.163, 0.654)
pt3dadd(-35.932, 84.026, 26.169, 0.648)
pt3dadd(-35.997, 83.925, 26.175, 0.64)
pt3dadd(-36.062, 83.824, 26.181, 0.634)
pt3dadd(-36.127, 83.724, 26.186, 0.628)
pt3dadd(-36.192, 83.623, 26.192, 0.622)
pt3dadd(-36.258, 83.523, 26.198, 0.616)
pt3dadd(-36.332, 83.428, 26.197, 0.6)
pt3dadd(-36.406, 83.334, 26.196, 0.584)
pt3dadd(-36.48, 83.24, 26.195, 0.568)
pt3dadd(-36.555, 83.146, 26.194, 0.552)
pt3dadd(-36.629, 83.052, 26.192, 0.536)
pt3dadd(-36.703, 82.957, 26.191, 0.52)
pt3dadd(-36.778, 82.863, 26.19, 0.504)
pt3dadd(-36.852, 82.769, 26.189, 0.49)
pt3dadd(-36.926, 82.675, 26.188, 0.474)
pt3dadd(-37.001, 82.581, 26.186, 0.458)
pt3dadd(-37.085, 82.495, 26.184, 0.472)
pt3dadd(-37.169, 82.41, 26.182, 0.486)
pt3dadd(-37.253, 82.324, 26.18, 0.5)
pt3dadd(-37.337, 82.239, 26.177, 0.514)
pt3dadd(-37.422, 82.153, 26.175, 0.528)
pt3dadd(-37.506, 82.068, 26.173, 0.544)
pt3dadd(-37.59, 81.982, 26.171, 0.558)
pt3dadd(-37.674, 81.896, 26.169, 0.572)
pt3dadd(-37.758, 81.811, 26.166, 0.586)
pt3dadd(-37.842, 81.726, 26.164, 0.6)
pt3dadd(-37.931, 81.645, 26.16, 0.608)
pt3dadd(-38.02, 81.565, 26.156, 0.614)
pt3dadd(-38.109, 81.484, 26.153, 0.622)
pt3dadd(-38.198, 81.404, 26.149, 0.63)
pt3dadd(-38.287, 81.323, 26.145, 0.638)
pt3dadd(-38.376, 81.243, 26.141, 0.646)
pt3dadd(-38.465, 81.162, 26.137, 0.654)
pt3dadd(-38.554, 81.082, 26.133, 0.662)
pt3dadd(-38.643, 81.002, 26.13, 0.67)
pt3dadd(-38.732, 80.921, 26.126, 0.678)
pt3dadd(-38.825, 80.846, 26.12, 0.678)
pt3dadd(-38.919, 80.771, 26.115, 0.678)
pt3dadd(-39.012, 80.696, 26.109, 0.678)
pt3dadd(-39.105, 80.621, 26.104, 0.678)
pt3dadd(-39.199, 80.546, 26.098, 0.678)
pt3dadd(-39.292, 80.471, 26.093, 0.678)
pt3dadd(-39.386, 80.396, 26.087, 0.678)
pt3dadd(-39.479, 80.321, 26.082, 0.678)
pt3dadd(-39.572, 80.246, 26.076, 0.678)
pt3dadd(-39.667, 80.172, 26.07, 0.678)
pt3dadd(-39.775, 80.122, 26.06, 0.66)
pt3dadd(-39.883, 80.071, 26.049, 0.644)
pt3dadd(-39.991, 80.02, 26.039, 0.626)
pt3dadd(-40.099, 79.969, 26.029, 0.61)
pt3dadd(-40.207, 79.919, 26.018, 0.592)
pt3dadd(-40.315, 79.868, 26.008, 0.576)
pt3dadd(-40.423, 79.817, 25.997, 0.558)
pt3dadd(-40.531, 79.767, 25.987, 0.542)
pt3dadd(-40.639, 79.716, 25.976, 0.524)
pt3dadd(-40.747, 79.666, 25.965, 0.51)
pt3dadd(-40.855, 79.627, 25.937, 0.528)
pt3dadd(-40.964, 79.588, 25.909, 0.546)
pt3dadd(-41.073, 79.549, 25.881, 0.562)
pt3dadd(-41.181, 79.51, 25.854, 0.58)
pt3dadd(-41.289, 79.471, 25.826, 0.598)
pt3dadd(-41.398, 79.433, 25.798, 0.616)
pt3dadd(-41.507, 79.394, 25.77, 0.632)
pt3dadd(-41.615, 79.355, 25.742, 0.65)
pt3dadd(-41.724, 79.316, 25.714, 0.668)
pt3dadd(-41.832, 79.277, 25.686, 0.684)
pt3dadd(-41.938, 79.236, 25.655, 0.694)
pt3dadd(-42.045, 79.194, 25.624, 0.706)
pt3dadd(-42.151, 79.153, 25.593, 0.716)
pt3dadd(-42.257, 79.112, 25.562, 0.726)
pt3dadd(-42.364, 79.071, 25.531, 0.736)
pt3dadd(-42.47, 79.029, 25.5, 0.746)
pt3dadd(-42.577, 78.988, 25.47, 0.758)
pt3dadd(-42.683, 78.947, 25.439, 0.768)
pt3dadd(-42.789, 78.906, 25.408, 0.778)
pt3dadd(-42.895, 78.861, 25.379, 0.778)
pt3dadd(-42.998, 78.806, 25.357, 0.746)
pt3dadd(-43.101, 78.75, 25.336, 0.712)
pt3dadd(-43.205, 78.695, 25.314, 0.68)
pt3dadd(-43.308, 78.639, 25.293, 0.646)
pt3dadd(-43.411, 78.584, 25.271, 0.614)
pt3dadd(-43.514, 78.528, 25.25, 0.58)
pt3dadd(-43.618, 78.473, 25.228, 0.546)
pt3dadd(-43.721, 78.418, 25.207, 0.514)
pt3dadd(-43.824, 78.362, 25.185, 0.48)
pt3dadd(-43.926, 78.304, 25.166, 0.454)
pt3dadd(-44.025, 78.236, 25.157, 0.454)
pt3dadd(-44.123, 78.168, 25.147, 0.454)
pt3dadd(-44.221, 78.101, 25.137, 0.454)
pt3dadd(-44.32, 78.033, 25.127, 0.454)
pt3dadd(-44.418, 77.965, 25.118, 0.454)
pt3dadd(-44.516, 77.897, 25.108, 0.454)
pt3dadd(-44.615, 77.83, 25.098, 0.452)
pt3dadd(-44.713, 77.762, 25.089, 0.452)
pt3dadd(-44.811, 77.694, 25.079, 0.452)
pt3dadd(-44.911, 77.629, 25.07, 0.452)
pt3dadd(-45.016, 77.57, 25.065, 0.452)
pt3dadd(-45.121, 77.512, 25.06, 0.452)
pt3dadd(-45.226, 77.454, 25.055, 0.452)
pt3dadd(-45.331, 77.396, 25.05, 0.452)
pt3dadd(-45.435, 77.338, 25.045, 0.452)
pt3dadd(-45.54, 77.28, 25.04, 0.452)
pt3dadd(-45.645, 77.222, 25.035, 0.452)
pt3dadd(-45.75, 77.164, 25.03, 0.452)
pt3dadd(-45.855, 77.106, 25.025, 0.452)
pt3dadd(-45.961, 77.051, 25.021, 0.45)
pt3dadd(-46.072, 77.005, 25.019, 0.446)
pt3dadd(-46.183, 76.959, 25.018, 0.44)
pt3dadd(-46.294, 76.913, 25.016, 0.436)
pt3dadd(-46.405, 76.868, 25.014, 0.43)
pt3dadd(-46.516, 76.822, 25.013, 0.426)
pt3dadd(-46.626, 76.776, 25.011, 0.422)
pt3dadd(-46.737, 76.73, 25.009, 0.416)
pt3dadd(-46.848, 76.684, 25.008, 0.412)
pt3dadd(-46.959, 76.639, 25.006, 0.406)
pt3dadd(-47.071, 76.596, 25.004, 0.398)
pt3dadd(-47.186, 76.561, 25.001, 0.382)
pt3dadd(-47.301, 76.526, 24.998, 0.366)
pt3dadd(-47.415, 76.49, 24.995, 0.35)
pt3dadd(-47.53, 76.455, 24.992, 0.332)
pt3dadd(-47.645, 76.42, 24.99, 0.316)
pt3dadd(-47.759, 76.385, 24.987, 0.3)
pt3dadd(-47.874, 76.35, 24.984, 0.284)
pt3dadd(-47.989, 76.315, 24.981, 0.268)
pt3dadd(-48.103, 76.28, 24.978, 0.252)
pt3dadd(-48.216, 76.239, 24.974, 0.25)
pt3dadd(-48.322, 76.184, 24.968, 0.284)
pt3dadd(-48.428, 76.129, 24.962, 0.318)
pt3dadd(-48.535, 76.074, 24.955, 0.352)
pt3dadd(-48.641, 76.018, 24.949, 0.386)
pt3dadd(-48.747, 75.963, 24.943, 0.42)
pt3dadd(-48.854, 75.908, 24.937, 0.454)
pt3dadd(-48.96, 75.853, 24.93, 0.488)
pt3dadd(-49.067, 75.798, 24.924, 0.522)
pt3dadd(-49.173, 75.743, 24.918, 0.556)
pt3dadd(-49.278, 75.686, 24.911, 0.58)
pt3dadd(-49.38, 75.624, 24.902, 0.578)
pt3dadd(-49.482, 75.562, 24.893, 0.576)
pt3dadd(-49.584, 75.499, 24.885, 0.576)
pt3dadd(-49.686, 75.437, 24.876, 0.574)
pt3dadd(-49.788, 75.375, 24.867, 0.572)
pt3dadd(-49.89, 75.313, 24.859, 0.57)
pt3dadd(-49.993, 75.251, 24.85, 0.568)
pt3dadd(-50.095, 75.188, 24.841, 0.566)
pt3dadd(-50.197, 75.126, 24.832, 0.564)
pt3dadd(-50.299, 75.065, 24.821, 0.558)
pt3dadd(-50.402, 75.008, 24.803, 0.542)
pt3dadd(-50.506, 74.951, 24.785, 0.524)
pt3dadd(-50.609, 74.893, 24.767, 0.508)
pt3dadd(-50.712, 74.836, 24.749, 0.492)
pt3dadd(-50.815, 74.779, 24.731, 0.476)
pt3dadd(-50.918, 74.721, 24.714, 0.458)
pt3dadd(-51.022, 74.664, 24.696, 0.442)
pt3dadd(-51.125, 74.607, 24.678, 0.426)
pt3dadd(-51.228, 74.549, 24.66, 0.41)
pt3dadd(-51.332, 74.5, 24.635, 0.392)
}
}
proc shape3d_101() {
dend_7[10] { pt3dadd(-51.438, 74.462, 24.599, 0.376)
pt3dadd(-51.544, 74.424, 24.564, 0.358)
pt3dadd(-51.649, 74.386, 24.529, 0.342)
pt3dadd(-51.755, 74.348, 24.493, 0.324)
pt3dadd(-51.861, 74.31, 24.458, 0.308)
pt3dadd(-51.966, 74.272, 24.423, 0.29)
pt3dadd(-52.072, 74.234, 24.388, 0.274)
pt3dadd(-52.178, 74.196, 24.352, 0.256)
pt3dadd(-52.283, 74.158, 24.317, 0.24)
pt3dadd(-52.393, 74.13, 24.287, 0.23)
pt3dadd(-52.509, 74.117, 24.263, 0.23)
pt3dadd(-52.624, 74.103, 24.238, 0.23)
pt3dadd(-52.74, 74.089, 24.214, 0.228)
pt3dadd(-52.856, 74.075, 24.19, 0.228)
pt3dadd(-52.971, 74.061, 24.166, 0.228)
pt3dadd(-53.087, 74.047, 24.142, 0.228)
pt3dadd(-53.202, 74.033, 24.118, 0.228)
pt3dadd(-53.318, 74.019, 24.094, 0.226)
pt3dadd(-53.434, 74.005, 24.07, 0.226)
pt3dadd(-53.551, 73.996, 24.05, 0.226)
pt3dadd(-53.67, 73.992, 24.036, 0.226)
pt3dadd(-53.788, 73.988, 24.022, 0.226)
pt3dadd(-53.907, 73.984, 24.007, 0.226)
pt3dadd(-54.026, 73.98, 23.993, 0.226)
pt3dadd(-54.144, 73.976, 23.979, 0.226)
pt3dadd(-54.263, 73.972, 23.965, 0.226)
pt3dadd(-54.382, 73.968, 23.951, 0.226)
pt3dadd(-54.501, 73.964, 23.937, 0.226)
pt3dadd(-54.619, 73.96, 23.923, 0.226)
pt3dadd(-54.738, 73.957, 23.913, 0.226)
pt3dadd(-54.858, 73.955, 23.908, 0.226)
pt3dadd(-54.978, 73.953, 23.903, 0.226)
pt3dadd(-55.098, 73.952, 23.899, 0.226)
pt3dadd(-55.218, 73.95, 23.894, 0.226)
pt3dadd(-55.338, 73.948, 23.889, 0.226)
pt3dadd(-55.458, 73.946, 23.885, 0.226)
pt3dadd(-55.578, 73.945, 23.88, 0.226)
pt3dadd(-55.697, 73.943, 23.875, 0.226)
pt3dadd(-55.817, 73.941, 23.871, 0.226)
pt3dadd(-55.937, 73.939, 23.868, 0.226)
pt3dadd(-56.057, 73.935, 23.868, 0.226)
pt3dadd(-56.177, 73.932, 23.868, 0.226)
pt3dadd(-56.297, 73.929, 23.868, 0.226)
pt3dadd(-56.417, 73.926, 23.868, 0.226)
pt3dadd(-56.537, 73.922, 23.868, 0.226)
pt3dadd(-56.657, 73.919, 23.868, 0.226)
pt3dadd(-56.777, 73.916, 23.868, 0.226)
pt3dadd(-56.897, 73.912, 23.868, 0.226)
pt3dadd(-57.017, 73.909, 23.868, 0.226)
pt3dadd(-57.137, 73.905, 23.868, 0.226)
pt3dadd(-57.256, 73.898, 23.868, 0.226)
pt3dadd(-57.376, 73.892, 23.868, 0.226)
pt3dadd(-57.496, 73.886, 23.868, 0.226)
pt3dadd(-57.616, 73.88, 23.868, 0.226)
pt3dadd(-57.736, 73.874, 23.868, 0.226)
pt3dadd(-57.856, 73.868, 23.868, 0.226)
pt3dadd(-57.975, 73.862, 23.868, 0.226)
pt3dadd(-58.095, 73.856, 23.868, 0.226)
pt3dadd(-58.215, 73.849, 23.868, 0.226)
pt3dadd(-58.335, 73.841, 23.868, 0.226)
pt3dadd(-58.454, 73.83, 23.868, 0.226)
pt3dadd(-58.574, 73.818, 23.868, 0.226)
pt3dadd(-58.693, 73.807, 23.868, 0.226)
pt3dadd(-58.813, 73.795, 23.868, 0.226)
pt3dadd(-58.932, 73.784, 23.868, 0.226)
pt3dadd(-59.052, 73.773, 23.868, 0.226)
pt3dadd(-59.171, 73.761, 23.868, 0.226)
pt3dadd(-59.291, 73.75, 23.868, 0.226)
pt3dadd(-59.41, 73.739, 23.868, 0.226)
pt3dadd(-59.529, 73.723, 23.868, 0.226)
pt3dadd(-59.647, 73.702, 23.868, 0.226)
pt3dadd(-59.765, 73.682, 23.869, 0.226)
pt3dadd(-59.884, 73.662, 23.869, 0.226)
pt3dadd(-60.002, 73.641, 23.869, 0.226)
pt3dadd(-60.12, 73.621, 23.869, 0.226)
pt3dadd(-60.238, 73.601, 23.869, 0.226)
pt3dadd(-60.357, 73.58, 23.869, 0.226)
pt3dadd(-60.475, 73.56, 23.869, 0.226)
pt3dadd(-60.593, 73.539, 23.869, 0.226)
pt3dadd(-60.708, 73.506, 23.869, 0.234)
pt3dadd(-60.818, 73.459, 23.869, 0.248)
pt3dadd(-60.928, 73.411, 23.869, 0.264)
pt3dadd(-61.038, 73.364, 23.869, 0.278)
pt3dadd(-61.149, 73.317, 23.869, 0.294)
pt3dadd(-61.259, 73.27, 23.869, 0.308)
pt3dadd(-61.369, 73.222, 23.869, 0.324)
pt3dadd(-61.48, 73.175, 23.869, 0.338)
pt3dadd(-61.59, 73.128, 23.869, 0.354)
pt3dadd(-61.7, 73.08, 23.869, 0.368)
pt3dadd(-61.808, 73.028, 23.869, 0.374)
pt3dadd(-61.913, 72.971, 23.869, 0.372)
pt3dadd(-62.019, 72.913, 23.869, 0.372)
pt3dadd(-62.124, 72.856, 23.869, 0.37)
pt3dadd(-62.23, 72.799, 23.869, 0.368)
pt3dadd(-62.335, 72.741, 23.869, 0.366)
pt3dadd(-62.44, 72.684, 23.869, 0.366)
pt3dadd(-62.546, 72.627, 23.869, 0.364)
pt3dadd(-62.651, 72.569, 23.869, 0.362)
pt3dadd(-62.757, 72.512, 23.869, 0.36)
pt3dadd(-62.863, 72.457, 23.869, 0.358)
pt3dadd(-62.971, 72.404, 23.869, 0.356)
pt3dadd(-63.079, 72.352, 23.87, 0.354)
pt3dadd(-63.187, 72.299, 23.87, 0.35)
pt3dadd(-63.295, 72.246, 23.87, 0.348)
pt3dadd(-63.402, 72.193, 23.87, 0.346)
pt3dadd(-63.51, 72.141, 23.87, 0.342)
pt3dadd(-63.618, 72.088, 23.87, 0.34)
pt3dadd(-63.726, 72.035, 23.87, 0.338)
pt3dadd(-63.834, 71.982, 23.87, 0.334)
pt3dadd(-63.95, 71.961, 23.87, 0.374)
pt3dadd(-64.069, 71.952, 23.87, 0.43)
pt3dadd(-64.189, 71.942, 23.87, 0.488)
pt3dadd(-64.309, 71.933, 23.871, 0.544)
pt3dadd(-64.428, 71.924, 23.871, 0.6)
pt3dadd(-64.548, 71.915, 23.871, 0.658)
pt3dadd(-64.668, 71.906, 23.871, 0.714)
pt3dadd(-64.787, 71.897, 23.871, 0.77)
pt3dadd(-64.907, 71.888, 23.871, 0.826)
pt3dadd(-65.027, 71.879, 23.871, 0.884)
pt3dadd(-65.144, 71.855, 23.872, 0.874)
pt3dadd(-65.26, 71.824, 23.872, 0.836)
pt3dadd(-65.376, 71.794, 23.872, 0.8)
pt3dadd(-65.492, 71.763, 23.872, 0.762)
pt3dadd(-65.608, 71.733, 23.873, 0.726)
pt3dadd(-65.724, 71.702, 23.873, 0.688)
pt3dadd(-65.84, 71.671, 23.873, 0.65)
pt3dadd(-65.956, 71.641, 23.874, 0.614)
pt3dadd(-66.072, 71.61, 23.874, 0.576)
pt3dadd(-66.188, 71.579, 23.874, 0.538)
pt3dadd(-66.306, 71.557, 23.875, 0.534)
pt3dadd(-66.424, 71.538, 23.875, 0.54)
pt3dadd(-66.543, 71.519, 23.876, 0.548)
pt3dadd(-66.661, 71.5, 23.876, 0.556)
pt3dadd(-66.78, 71.481, 23.877, 0.564)
pt3dadd(-66.898, 71.462, 23.877, 0.572)
pt3dadd(-67.017, 71.443, 23.878, 0.58)
pt3dadd(-67.135, 71.424, 23.878, 0.586)
pt3dadd(-67.254, 71.405, 23.879, 0.594)
pt3dadd(-67.372, 71.386, 23.88, 0.602)
pt3dadd(-67.491, 71.371, 23.881, 0.6)
pt3dadd(-67.61, 71.357, 23.882, 0.596)
pt3dadd(-67.73, 71.343, 23.883, 0.592)
pt3dadd(-67.849, 71.329, 23.884, 0.588)
pt3dadd(-67.968, 71.315, 23.885, 0.584)
pt3dadd(-68.087, 71.301, 23.886, 0.58)
pt3dadd(-68.206, 71.287, 23.887, 0.574)
pt3dadd(-68.325, 71.273, 23.888, 0.57)
pt3dadd(-68.445, 71.259, 23.889, 0.566)
pt3dadd(-68.564, 71.245, 23.891, 0.562)
pt3dadd(-68.683, 71.236, 23.892, 0.548)
pt3dadd(-68.803, 71.23, 23.894, 0.528)
pt3dadd(-68.923, 71.223, 23.896, 0.508)
pt3dadd(-69.043, 71.216, 23.899, 0.49)
pt3dadd(-69.162, 71.209, 23.901, 0.47)
pt3dadd(-69.282, 71.203, 23.903, 0.45)
pt3dadd(-69.402, 71.196, 23.905, 0.432)
pt3dadd(-69.522, 71.189, 23.907, 0.412)
pt3dadd(-69.642, 71.182, 23.909, 0.394)
pt3dadd(-69.761, 71.175, 23.911, 0.374)
pt3dadd(-69.881, 71.175, 23.914, 0.358)
pt3dadd(-70.001, 71.176, 23.918, 0.344)
pt3dadd(-70.121, 71.178, 23.922, 0.33)
pt3dadd(-70.241, 71.179, 23.926, 0.316)
pt3dadd(-70.361, 71.181, 23.93, 0.302)
pt3dadd(-70.481, 71.182, 23.934, 0.286)
pt3dadd(-70.601, 71.184, 23.938, 0.272)
pt3dadd(-70.721, 71.185, 23.942, 0.258)
pt3dadd(-70.84, 71.187, 23.946, 0.244)
pt3dadd(-70.96, 71.188, 23.95, 0.23)
pt3dadd(-71.08, 71.19, 23.956, 0.228)
pt3dadd(-71.2, 71.193, 23.964, 0.232)
pt3dadd(-71.319, 71.196, 23.971, 0.236)
pt3dadd(-71.439, 71.198, 23.979, 0.238)
pt3dadd(-71.559, 71.201, 23.986, 0.242)
pt3dadd(-71.678, 71.204, 23.993, 0.244)
pt3dadd(-71.798, 71.207, 24.001, 0.248)
pt3dadd(-71.918, 71.209, 24.008, 0.252)
pt3dadd(-72.037, 71.212, 24.016, 0.254)
pt3dadd(-72.157, 71.215, 24.023, 0.258)
pt3dadd(-72.276, 71.219, 24.034, 0.288)
pt3dadd(-72.395, 71.224, 24.045, 0.326)
pt3dadd(-72.514, 71.229, 24.057, 0.364)
pt3dadd(-72.633, 71.233, 24.069, 0.404)
pt3dadd(-72.752, 71.238, 24.08, 0.442)
pt3dadd(-72.871, 71.243, 24.092, 0.48)
pt3dadd(-72.99, 71.248, 24.104, 0.52)
pt3dadd(-73.11, 71.253, 24.115, 0.558)
pt3dadd(-73.229, 71.258, 24.127, 0.596)
pt3dadd(-73.348, 71.263, 24.139, 0.636)
pt3dadd(-73.461, 71.272, 24.168, 0.636)
pt3dadd(-73.573, 71.284, 24.203, 0.622)
pt3dadd(-73.685, 71.295, 24.238, 0.61)
pt3dadd(-73.797, 71.306, 24.274, 0.596)
pt3dadd(-73.908, 71.318, 24.309, 0.584)
pt3dadd(-74.02, 71.329, 24.344, 0.57)
pt3dadd(-74.132, 71.34, 24.379, 0.556)
pt3dadd(-74.244, 71.352, 24.414, 0.544)
pt3dadd(-74.355, 71.363, 24.449, 0.53)
pt3dadd(-74.467, 71.374, 24.485, 0.518)
pt3dadd(-74.58, 71.39, 24.515, 0.51)
}
}
proc shape3d_102() {
dend_7[10] { pt3dadd(-74.694, 71.406, 24.545, 0.504)
pt3dadd(-74.807, 71.422, 24.575, 0.496)
pt3dadd(-74.92, 71.439, 24.605, 0.49)
pt3dadd(-75.034, 71.455, 24.635, 0.484)
pt3dadd(-75.147, 71.471, 24.665, 0.478)
pt3dadd(-75.261, 71.487, 24.694, 0.472)
pt3dadd(-75.374, 71.504, 24.724, 0.466)
pt3dadd(-75.487, 71.52, 24.754, 0.46)
pt3dadd(-75.601, 71.536, 24.784, 0.454)
pt3dadd(-75.712, 71.573, 24.804, 0.446)
pt3dadd(-75.822, 71.615, 24.821, 0.438)
pt3dadd(-75.933, 71.657, 24.838, 0.43)
pt3dadd(-76.043, 71.699, 24.855, 0.422)
pt3dadd(-76.154, 71.741, 24.872, 0.414)
pt3dadd(-76.264, 71.783, 24.889, 0.406)
pt3dadd(-76.375, 71.825, 24.906, 0.398)
pt3dadd(-76.485, 71.868, 24.923, 0.39)
pt3dadd(-76.596, 71.91, 24.94, 0.382)
pt3dadd(-76.706, 71.952, 24.957, 0.374)
pt3dadd(-76.809, 72.013, 24.966, 0.36)
pt3dadd(-76.911, 72.075, 24.974, 0.344)
pt3dadd(-77.014, 72.136, 24.983, 0.33)
pt3dadd(-77.116, 72.198, 24.991, 0.314)
pt3dadd(-77.219, 72.259, 25, 0.3)
pt3dadd(-77.321, 72.321, 25.008, 0.286)
pt3dadd(-77.424, 72.382, 25.017, 0.27)
pt3dadd(-77.526, 72.444, 25.026, 0.256)
pt3dadd(-77.629, 72.505, 25.034, 0.24)
pt3dadd(-77.731, 72.567, 25.043, 0.226)
}
dend_0[6] {pt3dclear()
pt3dadd(16.519, 99.949, 22.493, 7.66)
pt3dadd(16.579, 99.981, 22.457, 7.786)
pt3dadd(16.668, 100.03, 22.404, 7.974)
pt3dadd(16.758, 100.078, 22.35, 8.162)
pt3dadd(16.847, 100.126, 22.297, 8.348)
pt3dadd(16.936, 100.174, 22.243, 8.536)
pt3dadd(17.025, 100.223, 22.19, 8.724)
pt3dadd(17.115, 100.271, 22.137, 8.91)
pt3dadd(17.204, 100.319, 22.083, 9.098)
pt3dadd(17.293, 100.367, 22.03, 9.284)
pt3dadd(17.382, 100.416, 21.976, 9.472)
pt3dadd(17.463, 100.479, 21.925, 9.644)
pt3dadd(17.541, 100.547, 21.874, 9.812)
pt3dadd(17.619, 100.615, 21.824, 9.978)
pt3dadd(17.696, 100.684, 21.773, 10.146)
pt3dadd(17.774, 100.752, 21.722, 10.312)
pt3dadd(17.852, 100.82, 21.672, 10.48)
pt3dadd(17.93, 100.888, 21.621, 10.648)
pt3dadd(18.007, 100.957, 21.57, 10.814)
pt3dadd(18.085, 101.025, 21.52, 10.982)
}
dend_0[7] {pt3dclear()
pt3dadd(16.36, 99.742, 22.661, 6.86)
pt3dadd(16.324, 99.698, 22.73, 6.774)
pt3dadd(16.282, 99.645, 22.813, 6.672)
pt3dadd(16.24, 99.593, 22.896, 6.568)
pt3dadd(16.198, 99.54, 22.978, 6.464)
pt3dadd(16.156, 99.487, 23.061, 6.362)
pt3dadd(16.113, 99.435, 23.144, 6.258)
pt3dadd(16.071, 99.382, 23.226, 6.156)
pt3dadd(16.029, 99.33, 23.309, 6.052)
pt3dadd(15.987, 99.277, 23.392, 5.948)
pt3dadd(15.945, 99.224, 23.475, 5.846)
pt3dadd(15.907, 99.169, 23.558, 5.72)
pt3dadd(15.87, 99.114, 23.641, 5.59)
pt3dadd(15.833, 99.059, 23.724, 5.462)
pt3dadd(15.796, 99.003, 23.807, 5.332)
pt3dadd(15.759, 98.948, 23.891, 5.204)
pt3dadd(15.722, 98.893, 23.974, 5.074)
pt3dadd(15.685, 98.838, 24.057, 4.946)
pt3dadd(15.648, 98.782, 24.14, 4.816)
pt3dadd(15.611, 98.727, 24.224, 4.688)
pt3dadd(15.574, 98.672, 24.307, 4.56)
pt3dadd(15.547, 98.611, 24.39, 4.398)
pt3dadd(15.52, 98.55, 24.473, 4.234)
pt3dadd(15.492, 98.489, 24.556, 4.072)
pt3dadd(15.465, 98.427, 24.639, 3.908)
pt3dadd(15.438, 98.366, 24.722, 3.746)
pt3dadd(15.411, 98.305, 24.805, 3.582)
pt3dadd(15.384, 98.244, 24.888, 3.418)
pt3dadd(15.357, 98.182, 24.971, 3.256)
pt3dadd(15.33, 98.121, 25.054, 3.092)
pt3dadd(15.303, 98.06, 25.137, 2.93)
pt3dadd(15.282, 97.998, 25.221, 2.75)
pt3dadd(15.262, 97.935, 25.304, 2.57)
pt3dadd(15.242, 97.873, 25.388, 2.39)
pt3dadd(15.222, 97.811, 25.472, 2.21)
}
dend_7[11] {pt3dclear()
pt3dadd(15.222, 97.811, 25.472, 2.21)
pt3dadd(15.202, 97.749, 25.556, 2.03)
pt3dadd(15.182, 97.686, 25.64, 1.85)
pt3dadd(15.162, 97.624, 25.723, 1.67)
pt3dadd(15.142, 97.562, 25.807, 1.49)
pt3dadd(15.122, 97.499, 25.891, 1.308)
pt3dadd(15.102, 97.437, 25.975, 1.128)
pt3dadd(15.084, 97.396, 26.068, 1.05)
pt3dadd(15.065, 97.357, 26.161, 0.976)
pt3dadd(15.047, 97.317, 26.254, 0.904)
pt3dadd(15.029, 97.278, 26.347, 0.83)
pt3dadd(15.011, 97.238, 26.44, 0.758)
pt3dadd(14.993, 97.199, 26.534, 0.684)
pt3dadd(14.975, 97.159, 26.627, 0.61)
pt3dadd(14.957, 97.119, 26.72, 0.538)
pt3dadd(14.939, 97.08, 26.813, 0.464)
pt3dadd(14.92, 97.041, 26.906, 0.392)
pt3dadd(14.881, 97.03, 27, 0.374)
pt3dadd(14.842, 97.018, 27.095, 0.358)
pt3dadd(14.803, 97.007, 27.189, 0.34)
pt3dadd(14.763, 96.995, 27.283, 0.324)
pt3dadd(14.724, 96.984, 27.377, 0.306)
pt3dadd(14.685, 96.972, 27.471, 0.29)
pt3dadd(14.646, 96.961, 27.565, 0.272)
pt3dadd(14.607, 96.95, 27.659, 0.256)
pt3dadd(14.568, 96.938, 27.753, 0.238)
pt3dadd(14.525, 96.936, 27.845, 0.23)
pt3dadd(14.474, 96.958, 27.934, 0.25)
pt3dadd(14.423, 96.981, 28.022, 0.268)
pt3dadd(14.371, 97.003, 28.111, 0.286)
pt3dadd(14.32, 97.026, 28.199, 0.306)
pt3dadd(14.269, 97.048, 28.288, 0.324)
pt3dadd(14.217, 97.07, 28.376, 0.342)
pt3dadd(14.166, 97.093, 28.464, 0.362)
pt3dadd(14.114, 97.115, 28.553, 0.38)
pt3dadd(14.063, 97.137, 28.641, 0.398)
pt3dadd(14.015, 97.176, 28.726, 0.432)
pt3dadd(13.971, 97.231, 28.807, 0.482)
pt3dadd(13.927, 97.286, 28.888, 0.532)
pt3dadd(13.883, 97.342, 28.969, 0.582)
pt3dadd(13.839, 97.397, 29.049, 0.63)
pt3dadd(13.795, 97.452, 29.13, 0.68)
pt3dadd(13.752, 97.508, 29.211, 0.73)
pt3dadd(13.707, 97.563, 29.292, 0.78)
pt3dadd(13.664, 97.618, 29.373, 0.83)
pt3dadd(13.62, 97.674, 29.454, 0.88)
pt3dadd(13.562, 97.729, 29.527, 0.904)
pt3dadd(13.492, 97.785, 29.593, 0.902)
pt3dadd(13.421, 97.841, 29.659, 0.9)
pt3dadd(13.351, 97.897, 29.725, 0.898)
pt3dadd(13.281, 97.953, 29.792, 0.898)
pt3dadd(13.21, 98.009, 29.858, 0.896)
pt3dadd(13.14, 98.065, 29.924, 0.894)
pt3dadd(13.07, 98.121, 29.99, 0.892)
pt3dadd(12.999, 98.177, 30.056, 0.892)
pt3dadd(12.929, 98.233, 30.123, 0.89)
pt3dadd(12.878, 98.299, 30.193, 0.868)
pt3dadd(12.844, 98.374, 30.266, 0.83)
pt3dadd(12.81, 98.449, 30.339, 0.79)
pt3dadd(12.775, 98.523, 30.411, 0.75)
pt3dadd(12.741, 98.598, 30.485, 0.712)
pt3dadd(12.707, 98.672, 30.557, 0.674)
pt3dadd(12.673, 98.747, 30.63, 0.634)
pt3dadd(12.639, 98.821, 30.703, 0.596)
pt3dadd(12.604, 98.896, 30.776, 0.556)
pt3dadd(12.57, 98.971, 30.849, 0.518)
pt3dadd(12.54, 99.037, 30.929, 0.506)
pt3dadd(12.515, 99.095, 31.013, 0.52)
pt3dadd(12.489, 99.153, 31.098, 0.532)
pt3dadd(12.463, 99.212, 31.183, 0.546)
pt3dadd(12.437, 99.27, 31.267, 0.56)
pt3dadd(12.411, 99.329, 31.352, 0.572)
pt3dadd(12.385, 99.387, 31.436, 0.586)
pt3dadd(12.36, 99.446, 31.521, 0.6)
pt3dadd(12.334, 99.504, 31.606, 0.612)
pt3dadd(12.308, 99.563, 31.69, 0.626)
pt3dadd(12.286, 99.626, 31.773, 0.634)
pt3dadd(12.269, 99.694, 31.854, 0.638)
pt3dadd(12.251, 99.762, 31.935, 0.644)
pt3dadd(12.233, 99.829, 32.017, 0.648)
pt3dadd(12.216, 99.897, 32.098, 0.652)
pt3dadd(12.198, 99.965, 32.179, 0.658)
pt3dadd(12.18, 100.033, 32.26, 0.662)
pt3dadd(12.163, 100.1, 32.342, 0.666)
pt3dadd(12.145, 100.168, 32.423, 0.672)
pt3dadd(12.127, 100.236, 32.504, 0.676)
pt3dadd(12.099, 100.31, 32.578, 0.672)
pt3dadd(12.063, 100.388, 32.648, 0.662)
pt3dadd(12.027, 100.466, 32.718, 0.652)
pt3dadd(11.99, 100.544, 32.787, 0.642)
pt3dadd(11.954, 100.622, 32.857, 0.632)
pt3dadd(11.918, 100.701, 32.927, 0.622)
pt3dadd(11.882, 100.779, 32.996, 0.612)
pt3dadd(11.846, 100.857, 33.066, 0.602)
pt3dadd(11.809, 100.935, 33.136, 0.594)
pt3dadd(11.773, 101.013, 33.205, 0.584)
pt3dadd(11.723, 101.089, 33.27, 0.582)
pt3dadd(11.668, 101.164, 33.334, 0.584)
pt3dadd(11.614, 101.238, 33.397, 0.586)
pt3dadd(11.56, 101.313, 33.461, 0.588)
pt3dadd(11.505, 101.388, 33.525, 0.592)
pt3dadd(11.451, 101.463, 33.588, 0.594)
pt3dadd(11.397, 101.538, 33.652, 0.596)
pt3dadd(11.342, 101.613, 33.716, 0.598)
pt3dadd(11.288, 101.688, 33.779, 0.6)
pt3dadd(11.234, 101.763, 33.843, 0.602)
pt3dadd(11.182, 101.817, 33.921, 0.628)
pt3dadd(11.13, 101.868, 34.001, 0.66)
pt3dadd(11.079, 101.919, 34.08, 0.69)
pt3dadd(11.027, 101.97, 34.16, 0.72)
pt3dadd(10.976, 102.02, 34.24, 0.75)
pt3dadd(10.924, 102.071, 34.32, 0.78)
pt3dadd(10.873, 102.122, 34.399, 0.812)
pt3dadd(10.822, 102.173, 34.479, 0.842)
pt3dadd(10.77, 102.224, 34.559, 0.872)
pt3dadd(10.719, 102.275, 34.639, 0.902)
}
}
proc shape3d_103() {
dend_7[11] { pt3dadd(10.655, 102.316, 34.716, 0.89)
pt3dadd(10.591, 102.357, 34.794, 0.874)
pt3dadd(10.527, 102.397, 34.871, 0.86)
pt3dadd(10.463, 102.438, 34.948, 0.846)
pt3dadd(10.399, 102.479, 35.026, 0.83)
pt3dadd(10.335, 102.519, 35.103, 0.814)
pt3dadd(10.27, 102.56, 35.181, 0.8)
pt3dadd(10.206, 102.6, 35.258, 0.786)
pt3dadd(10.142, 102.641, 35.336, 0.77)
pt3dadd(10.073, 102.682, 35.408, 0.752)
pt3dadd(9.982, 102.728, 35.462, 0.722)
pt3dadd(9.891, 102.774, 35.515, 0.69)
pt3dadd(9.801, 102.82, 35.568, 0.66)
pt3dadd(9.71, 102.867, 35.621, 0.628)
pt3dadd(9.62, 102.912, 35.674, 0.598)
pt3dadd(9.529, 102.959, 35.728, 0.568)
pt3dadd(9.438, 103.005, 35.781, 0.536)
pt3dadd(9.348, 103.051, 35.834, 0.506)
pt3dadd(9.257, 103.097, 35.887, 0.474)
pt3dadd(9.164, 103.137, 35.939, 0.452)
pt3dadd(9.063, 103.164, 35.988, 0.454)
pt3dadd(8.961, 103.19, 36.037, 0.454)
pt3dadd(8.86, 103.216, 36.086, 0.454)
pt3dadd(8.759, 103.243, 36.136, 0.456)
pt3dadd(8.658, 103.269, 36.185, 0.456)
pt3dadd(8.557, 103.296, 36.234, 0.458)
pt3dadd(8.456, 103.322, 36.283, 0.458)
pt3dadd(8.354, 103.348, 36.332, 0.46)
pt3dadd(8.253, 103.375, 36.381, 0.46)
pt3dadd(8.148, 103.397, 36.424, 0.466)
pt3dadd(8.033, 103.408, 36.451, 0.484)
pt3dadd(7.918, 103.419, 36.479, 0.504)
pt3dadd(7.804, 103.429, 36.506, 0.522)
pt3dadd(7.689, 103.44, 36.534, 0.54)
pt3dadd(7.574, 103.451, 36.561, 0.558)
pt3dadd(7.459, 103.462, 36.589, 0.578)
pt3dadd(7.344, 103.473, 36.616, 0.596)
pt3dadd(7.229, 103.484, 36.644, 0.614)
pt3dadd(7.114, 103.495, 36.671, 0.634)
pt3dadd(6.999, 103.502, 36.697, 0.648)
pt3dadd(6.882, 103.5, 36.718, 0.65)
pt3dadd(6.764, 103.499, 36.74, 0.654)
pt3dadd(6.647, 103.497, 36.761, 0.656)
pt3dadd(6.53, 103.495, 36.782, 0.66)
pt3dadd(6.413, 103.493, 36.804, 0.664)
pt3dadd(6.296, 103.492, 36.825, 0.666)
pt3dadd(6.178, 103.49, 36.846, 0.67)
pt3dadd(6.061, 103.488, 36.868, 0.672)
pt3dadd(5.944, 103.486, 36.889, 0.676)
pt3dadd(5.826, 103.483, 36.909, 0.67)
pt3dadd(5.709, 103.474, 36.927, 0.644)
pt3dadd(5.591, 103.466, 36.944, 0.618)
pt3dadd(5.473, 103.457, 36.961, 0.592)
pt3dadd(5.355, 103.449, 36.979, 0.566)
pt3dadd(5.237, 103.44, 36.996, 0.54)
pt3dadd(5.119, 103.432, 37.014, 0.514)
pt3dadd(5.001, 103.423, 37.031, 0.488)
pt3dadd(4.884, 103.415, 37.048, 0.462)
pt3dadd(4.766, 103.406, 37.066, 0.436)
pt3dadd(4.65, 103.396, 37.088, 0.42)
pt3dadd(4.537, 103.382, 37.121, 0.43)
pt3dadd(4.425, 103.368, 37.154, 0.44)
pt3dadd(4.312, 103.353, 37.187, 0.45)
pt3dadd(4.2, 103.339, 37.22, 0.46)
pt3dadd(4.088, 103.325, 37.253, 0.47)
pt3dadd(3.975, 103.31, 37.286, 0.48)
pt3dadd(3.863, 103.296, 37.319, 0.49)
pt3dadd(3.75, 103.282, 37.352, 0.5)
pt3dadd(3.638, 103.268, 37.385, 0.51)
pt3dadd(3.53, 103.246, 37.424, 0.532)
pt3dadd(3.428, 103.217, 37.47, 0.564)
pt3dadd(3.326, 103.187, 37.516, 0.598)
pt3dadd(3.223, 103.157, 37.562, 0.632)
pt3dadd(3.121, 103.128, 37.608, 0.664)
pt3dadd(3.019, 103.098, 37.654, 0.698)
pt3dadd(2.917, 103.068, 37.7, 0.732)
pt3dadd(2.814, 103.038, 37.746, 0.766)
pt3dadd(2.712, 103.009, 37.793, 0.798)
pt3dadd(2.61, 102.979, 37.839, 0.832)
pt3dadd(2.514, 102.934, 37.884, 0.838)
pt3dadd(2.423, 102.877, 37.928, 0.824)
pt3dadd(2.331, 102.821, 37.973, 0.808)
pt3dadd(2.24, 102.764, 38.017, 0.794)
pt3dadd(2.148, 102.708, 38.062, 0.78)
pt3dadd(2.057, 102.651, 38.106, 0.766)
pt3dadd(1.966, 102.594, 38.151, 0.752)
pt3dadd(1.874, 102.538, 38.195, 0.736)
pt3dadd(1.783, 102.481, 38.239, 0.722)
pt3dadd(1.692, 102.424, 38.284, 0.708)
pt3dadd(1.62, 102.368, 38.346, 0.714)
pt3dadd(1.558, 102.31, 38.418, 0.728)
pt3dadd(1.497, 102.253, 38.489, 0.742)
pt3dadd(1.435, 102.196, 38.561, 0.758)
pt3dadd(1.374, 102.139, 38.632, 0.772)
pt3dadd(1.312, 102.082, 38.703, 0.786)
pt3dadd(1.251, 102.025, 38.775, 0.8)
pt3dadd(1.189, 101.968, 38.846, 0.816)
pt3dadd(1.128, 101.911, 38.918, 0.83)
pt3dadd(1.066, 101.854, 38.989, 0.844)
pt3dadd(1.013, 101.781, 39.055, 0.824)
pt3dadd(0.964, 101.703, 39.119, 0.788)
pt3dadd(0.914, 101.625, 39.183, 0.752)
pt3dadd(0.865, 101.548, 39.247, 0.716)
pt3dadd(0.815, 101.47, 39.311, 0.68)
pt3dadd(0.766, 101.392, 39.374, 0.644)
pt3dadd(0.716, 101.314, 39.438, 0.61)
pt3dadd(0.666, 101.236, 39.502, 0.574)
pt3dadd(0.617, 101.158, 39.566, 0.538)
pt3dadd(0.567, 101.08, 39.63, 0.502)
pt3dadd(0.503, 101.034, 39.704, 0.52)
pt3dadd(0.436, 100.992, 39.779, 0.544)
pt3dadd(0.369, 100.95, 39.855, 0.568)
pt3dadd(0.302, 100.908, 39.93, 0.594)
pt3dadd(0.236, 100.867, 40.006, 0.618)
pt3dadd(0.169, 100.825, 40.081, 0.642)
pt3dadd(0.102, 100.783, 40.156, 0.666)
pt3dadd(0.035, 100.741, 40.232, 0.692)
pt3dadd(-0.032, 100.7, 40.307, 0.716)
pt3dadd(-0.098, 100.658, 40.383, 0.74)
pt3dadd(-0.162, 100.622, 40.462, 0.776)
pt3dadd(-0.224, 100.588, 40.543, 0.814)
pt3dadd(-0.287, 100.553, 40.623, 0.85)
pt3dadd(-0.35, 100.518, 40.703, 0.888)
pt3dadd(-0.413, 100.483, 40.783, 0.926)
pt3dadd(-0.475, 100.449, 40.863, 0.962)
pt3dadd(-0.538, 100.414, 40.943, 1)
pt3dadd(-0.601, 100.379, 41.024, 1.038)
pt3dadd(-0.664, 100.344, 41.104, 1.074)
pt3dadd(-0.726, 100.31, 41.184, 1.112)
pt3dadd(-0.809, 100.257, 41.241, 1.094)
pt3dadd(-0.893, 100.202, 41.296, 1.076)
pt3dadd(-0.977, 100.148, 41.351, 1.056)
pt3dadd(-1.061, 100.094, 41.407, 1.036)
pt3dadd(-1.145, 100.04, 41.462, 1.016)
pt3dadd(-1.229, 99.986, 41.517, 0.998)
pt3dadd(-1.313, 99.932, 41.573, 0.978)
pt3dadd(-1.397, 99.878, 41.628, 0.958)
pt3dadd(-1.481, 99.823, 41.683, 0.938)
pt3dadd(-1.565, 99.769, 41.739, 0.92)
pt3dadd(-1.651, 99.727, 41.799, 0.868)
pt3dadd(-1.737, 99.686, 41.859, 0.814)
pt3dadd(-1.824, 99.644, 41.92, 0.76)
pt3dadd(-1.91, 99.603, 41.98, 0.708)
pt3dadd(-1.996, 99.562, 42.041, 0.654)
pt3dadd(-2.082, 99.52, 42.101, 0.6)
pt3dadd(-2.169, 99.479, 42.161, 0.548)
pt3dadd(-2.255, 99.437, 42.222, 0.494)
pt3dadd(-2.341, 99.396, 42.282, 0.442)
pt3dadd(-2.427, 99.355, 42.343, 0.388)
pt3dadd(-2.513, 99.317, 42.406, 0.37)
pt3dadd(-2.598, 99.28, 42.469, 0.354)
pt3dadd(-2.684, 99.243, 42.532, 0.338)
pt3dadd(-2.769, 99.206, 42.595, 0.322)
pt3dadd(-2.854, 99.169, 42.658, 0.306)
pt3dadd(-2.94, 99.132, 42.721, 0.29)
pt3dadd(-3.025, 99.095, 42.784, 0.274)
pt3dadd(-3.111, 99.058, 42.847, 0.258)
pt3dadd(-3.196, 99.021, 42.91, 0.242)
pt3dadd(-3.282, 98.984, 42.973, 0.226)
pt3dadd(-3.349, 98.917, 43.034, 0.226)
pt3dadd(-3.416, 98.848, 43.094, 0.226)
pt3dadd(-3.482, 98.78, 43.155, 0.226)
pt3dadd(-3.549, 98.711, 43.215, 0.226)
pt3dadd(-3.615, 98.642, 43.276, 0.226)
pt3dadd(-3.681, 98.574, 43.336, 0.226)
pt3dadd(-3.748, 98.505, 43.397, 0.226)
pt3dadd(-3.814, 98.437, 43.457, 0.226)
pt3dadd(-3.881, 98.368, 43.518, 0.226)
pt3dadd(-3.924, 98.28, 43.565, 0.226)
pt3dadd(-3.931, 98.165, 43.593, 0.226)
pt3dadd(-3.939, 98.05, 43.62, 0.226)
pt3dadd(-3.946, 97.935, 43.648, 0.226)
pt3dadd(-3.954, 97.82, 43.675, 0.226)
pt3dadd(-3.961, 97.705, 43.703, 0.226)
pt3dadd(-3.969, 97.59, 43.731, 0.226)
pt3dadd(-3.977, 97.475, 43.758, 0.226)
pt3dadd(-3.984, 97.36, 43.786, 0.226)
pt3dadd(-3.992, 97.245, 43.814, 0.226)
pt3dadd(-3.92, 97.163, 43.821, 0.226)
pt3dadd(-3.823, 97.092, 43.822, 0.226)
pt3dadd(-3.727, 97.02, 43.823, 0.226)
pt3dadd(-3.63, 96.949, 43.824, 0.226)
pt3dadd(-3.534, 96.878, 43.825, 0.226)
pt3dadd(-3.437, 96.806, 43.826, 0.226)
pt3dadd(-3.341, 96.735, 43.827, 0.226)
pt3dadd(-3.245, 96.664, 43.828, 0.226)
pt3dadd(-3.148, 96.592, 43.829, 0.226)
pt3dadd(-3.052, 96.521, 43.83, 0.226)
}
dend_0[8] {pt3dclear()
pt3dadd(18.204, 102.039, 21.52, 11.412)
pt3dadd(18.206, 102.039, 21.522, 11.408)
pt3dadd(18.279, 102.059, 21.599, 11.264)
pt3dadd(18.352, 102.079, 21.677, 11.118)
pt3dadd(18.426, 102.098, 21.754, 10.972)
pt3dadd(18.499, 102.118, 21.832, 10.828)
pt3dadd(18.572, 102.138, 21.909, 10.682)
pt3dadd(18.646, 102.157, 21.987, 10.538)
pt3dadd(18.73, 102.157, 22.058, 10.388)
pt3dadd(18.815, 102.157, 22.128, 10.238)
pt3dadd(18.9, 102.157, 22.199, 10.088)
pt3dadd(18.985, 102.157, 22.27, 9.938)
}
}
proc shape3d_104() {
dend_0[8] { pt3dadd(19.07, 102.157, 22.34, 9.788)
pt3dadd(19.155, 102.157, 22.411, 9.638)
pt3dadd(19.239, 102.157, 22.482, 9.49)
pt3dadd(19.324, 102.157, 22.553, 9.34)
pt3dadd(19.409, 102.157, 22.623, 9.19)
pt3dadd(19.494, 102.157, 22.694, 9.04)
}
dend_0[9] {pt3dclear()
pt3dadd(19.494, 102.157, 22.694, 9.04)
pt3dadd(19.524, 102.187, 22.694, 8.974)
pt3dadd(19.61, 102.271, 22.695, 8.79)
pt3dadd(19.695, 102.355, 22.696, 8.604)
pt3dadd(19.781, 102.44, 22.697, 8.42)
pt3dadd(19.866, 102.524, 22.698, 8.236)
pt3dadd(19.952, 102.608, 22.698, 8.05)
pt3dadd(20.037, 102.692, 22.699, 7.866)
pt3dadd(20.122, 102.777, 22.7, 7.68)
pt3dadd(20.208, 102.861, 22.701, 7.496)
pt3dadd(20.293, 102.945, 22.701, 7.31)
pt3dadd(20.379, 103.029, 22.702, 7.126)
pt3dadd(20.464, 103.114, 22.703, 6.94)
pt3dadd(20.55, 103.198, 22.704, 6.756)
pt3dadd(20.635, 103.282, 22.704, 6.57)
pt3dadd(20.721, 103.366, 22.705, 6.386)
pt3dadd(20.806, 103.451, 22.706, 6.2)
pt3dadd(20.892, 103.535, 22.707, 6.014)
pt3dadd(20.977, 103.619, 22.708, 5.83)
pt3dadd(21.063, 103.703, 22.709, 5.644)
pt3dadd(21.148, 103.787, 22.71, 5.46)
pt3dadd(21.233, 103.872, 22.711, 5.274)
pt3dadd(21.319, 103.956, 22.712, 5.088)
pt3dadd(21.404, 104.04, 22.713, 4.904)
pt3dadd(21.49, 104.124, 22.714, 4.718)
pt3dadd(21.576, 104.208, 22.715, 4.532)
pt3dadd(21.661, 104.292, 22.716, 4.346)
pt3dadd(21.747, 104.376, 22.717, 4.162)
pt3dadd(21.833, 104.46, 22.718, 3.976)
pt3dadd(21.918, 104.544, 22.72, 3.79)
pt3dadd(22.004, 104.628, 22.721, 3.604)
pt3dadd(22.09, 104.712, 22.722, 3.418)
pt3dadd(22.175, 104.796, 22.723, 3.234)
pt3dadd(22.261, 104.88, 22.724, 3.048)
pt3dadd(22.347, 104.964, 22.726, 2.93)
pt3dadd(22.434, 105.047, 22.728, 2.828)
pt3dadd(22.52, 105.13, 22.73, 2.728)
pt3dadd(22.606, 105.214, 22.732, 2.628)
}
dend_7[12] {pt3dclear()
pt3dadd(22.606, 105.214, 22.732, 2.628)
pt3dadd(22.692, 105.297, 22.734, 2.528)
pt3dadd(22.779, 105.381, 22.736, 2.428)
pt3dadd(22.865, 105.464, 22.738, 2.328)
pt3dadd(22.951, 105.547, 22.74, 2.226)
pt3dadd(23.038, 105.63, 22.742, 2.126)
pt3dadd(23.124, 105.714, 22.744, 2.026)
pt3dadd(23.211, 105.796, 22.747, 1.958)
pt3dadd(23.298, 105.879, 22.75, 1.898)
pt3dadd(23.385, 105.961, 22.753, 1.838)
pt3dadd(23.472, 106.044, 22.756, 1.776)
pt3dadd(23.559, 106.126, 22.759, 1.716)
pt3dadd(23.646, 106.209, 22.762, 1.656)
pt3dadd(23.733, 106.291, 22.765, 1.596)
pt3dadd(23.82, 106.374, 22.769, 1.536)
pt3dadd(23.908, 106.456, 22.772, 1.476)
pt3dadd(23.995, 106.539, 22.775, 1.416)
pt3dadd(24.083, 106.62, 22.78, 1.414)
pt3dadd(24.171, 106.701, 22.785, 1.428)
pt3dadd(24.26, 106.782, 22.79, 1.442)
pt3dadd(24.348, 106.862, 22.795, 1.456)
pt3dadd(24.437, 106.943, 22.8, 1.47)
pt3dadd(24.525, 107.024, 22.806, 1.486)
pt3dadd(24.614, 107.105, 22.811, 1.5)
pt3dadd(24.702, 107.186, 22.816, 1.514)
pt3dadd(24.79, 107.267, 22.821, 1.528)
pt3dadd(24.879, 107.348, 22.826, 1.542)
pt3dadd(24.969, 107.427, 22.834, 1.556)
pt3dadd(25.059, 107.505, 22.841, 1.57)
pt3dadd(25.15, 107.583, 22.849, 1.586)
pt3dadd(25.24, 107.662, 22.857, 1.6)
pt3dadd(25.33, 107.74, 22.865, 1.614)
pt3dadd(25.421, 107.819, 22.873, 1.628)
pt3dadd(25.511, 107.897, 22.881, 1.644)
pt3dadd(25.601, 107.975, 22.889, 1.658)
pt3dadd(25.692, 108.054, 22.897, 1.672)
pt3dadd(25.782, 108.132, 22.904, 1.686)
pt3dadd(25.875, 108.207, 22.917, 1.692)
pt3dadd(25.968, 108.28, 22.931, 1.694)
pt3dadd(26.062, 108.353, 22.944, 1.698)
pt3dadd(26.155, 108.427, 22.958, 1.7)
pt3dadd(26.249, 108.5, 22.972, 1.702)
pt3dadd(26.342, 108.574, 22.985, 1.706)
pt3dadd(26.436, 108.647, 22.999, 1.708)
pt3dadd(26.529, 108.72, 23.012, 1.71)
pt3dadd(26.623, 108.794, 23.026, 1.714)
pt3dadd(26.716, 108.867, 23.04, 1.716)
pt3dadd(26.816, 108.922, 23.071, 1.674)
pt3dadd(26.916, 108.975, 23.104, 1.626)
pt3dadd(27.016, 109.027, 23.138, 1.578)
pt3dadd(27.117, 109.079, 23.171, 1.53)
pt3dadd(27.217, 109.131, 23.205, 1.482)
pt3dadd(27.317, 109.184, 23.238, 1.434)
pt3dadd(27.417, 109.236, 23.271, 1.384)
pt3dadd(27.518, 109.288, 23.305, 1.336)
pt3dadd(27.618, 109.341, 23.338, 1.288)
pt3dadd(27.718, 109.393, 23.372, 1.24)
pt3dadd(27.818, 109.452, 23.396, 1.182)
pt3dadd(27.918, 109.512, 23.42, 1.12)
pt3dadd(28.018, 109.572, 23.443, 1.06)
pt3dadd(28.118, 109.633, 23.467, 0.998)
pt3dadd(28.218, 109.693, 23.49, 0.938)
pt3dadd(28.318, 109.753, 23.514, 0.876)
pt3dadd(28.418, 109.813, 23.537, 0.816)
pt3dadd(28.518, 109.873, 23.56, 0.756)
pt3dadd(28.618, 109.933, 23.584, 0.694)
pt3dadd(28.718, 109.993, 23.607, 0.634)
pt3dadd(28.821, 110.051, 23.625, 0.614)
pt3dadd(28.924, 110.109, 23.641, 0.6)
pt3dadd(29.028, 110.166, 23.658, 0.586)
pt3dadd(29.131, 110.224, 23.675, 0.572)
pt3dadd(29.234, 110.282, 23.692, 0.558)
pt3dadd(29.337, 110.34, 23.708, 0.544)
pt3dadd(29.441, 110.397, 23.725, 0.53)
pt3dadd(29.544, 110.455, 23.742, 0.516)
pt3dadd(29.647, 110.512, 23.759, 0.502)
pt3dadd(29.751, 110.57, 23.776, 0.488)
pt3dadd(29.858, 110.622, 23.785, 0.544)
pt3dadd(29.966, 110.673, 23.795, 0.606)
pt3dadd(30.074, 110.724, 23.804, 0.668)
pt3dadd(30.182, 110.775, 23.813, 0.73)
pt3dadd(30.29, 110.827, 23.823, 0.792)
pt3dadd(30.398, 110.878, 23.832, 0.854)
pt3dadd(30.506, 110.929, 23.841, 0.916)
pt3dadd(30.614, 110.98, 23.851, 0.978)
pt3dadd(30.722, 111.031, 23.86, 1.04)
pt3dadd(30.83, 111.083, 23.87, 1.102)
pt3dadd(30.929, 111.149, 23.87, 1.074)
pt3dadd(31.029, 111.217, 23.871, 1.042)
pt3dadd(31.128, 111.284, 23.871, 1.01)
pt3dadd(31.227, 111.352, 23.871, 0.978)
pt3dadd(31.326, 111.42, 23.871, 0.946)
pt3dadd(31.425, 111.487, 23.871, 0.914)
pt3dadd(31.524, 111.555, 23.871, 0.882)
pt3dadd(31.623, 111.623, 23.871, 0.85)
pt3dadd(31.722, 111.69, 23.872, 0.818)
pt3dadd(31.822, 111.758, 23.872, 0.786)
pt3dadd(31.918, 111.829, 23.872, 0.774)
pt3dadd(32.015, 111.901, 23.872, 0.764)
pt3dadd(32.111, 111.972, 23.872, 0.754)
pt3dadd(32.207, 112.044, 23.873, 0.742)
pt3dadd(32.304, 112.115, 23.873, 0.732)
pt3dadd(32.4, 112.187, 23.873, 0.722)
pt3dadd(32.496, 112.258, 23.873, 0.71)
pt3dadd(32.593, 112.329, 23.874, 0.7)
pt3dadd(32.689, 112.401, 23.874, 0.69)
pt3dadd(32.786, 112.472, 23.874, 0.678)
pt3dadd(32.882, 112.543, 23.875, 0.684)
pt3dadd(32.979, 112.614, 23.875, 0.692)
pt3dadd(33.076, 112.685, 23.875, 0.698)
pt3dadd(33.173, 112.756, 23.876, 0.706)
pt3dadd(33.269, 112.827, 23.876, 0.712)
pt3dadd(33.366, 112.898, 23.876, 0.72)
pt3dadd(33.463, 112.969, 23.877, 0.726)
pt3dadd(33.56, 113.04, 23.877, 0.734)
pt3dadd(33.656, 113.111, 23.878, 0.74)
pt3dadd(33.753, 113.182, 23.878, 0.748)
pt3dadd(33.856, 113.244, 23.879, 0.78)
pt3dadd(33.959, 113.305, 23.879, 0.814)
pt3dadd(34.062, 113.366, 23.88, 0.848)
pt3dadd(34.166, 113.428, 23.881, 0.882)
pt3dadd(34.269, 113.489, 23.882, 0.918)
pt3dadd(34.372, 113.55, 23.882, 0.952)
pt3dadd(34.475, 113.611, 23.883, 0.986)
pt3dadd(34.578, 113.673, 23.884, 1.02)
pt3dadd(34.682, 113.734, 23.885, 1.054)
pt3dadd(34.785, 113.795, 23.885, 1.088)
pt3dadd(34.882, 113.866, 23.887, 1.078)
pt3dadd(34.978, 113.937, 23.888, 1.068)
pt3dadd(35.075, 114.008, 23.889, 1.058)
pt3dadd(35.171, 114.079, 23.891, 1.048)
pt3dadd(35.268, 114.151, 23.892, 1.038)
pt3dadd(35.364, 114.222, 23.894, 1.026)
pt3dadd(35.461, 114.293, 23.895, 1.016)
pt3dadd(35.558, 114.364, 23.897, 1.006)
pt3dadd(35.654, 114.436, 23.898, 0.996)
pt3dadd(35.751, 114.507, 23.899, 0.984)
pt3dadd(35.844, 114.583, 23.902, 0.984)
pt3dadd(35.937, 114.659, 23.904, 0.986)
pt3dadd(36.029, 114.735, 23.906, 0.986)
pt3dadd(36.122, 114.811, 23.909, 0.986)
pt3dadd(36.215, 114.887, 23.911, 0.986)
pt3dadd(36.308, 114.963, 23.913, 0.988)
pt3dadd(36.4, 115.039, 23.916, 0.988)
pt3dadd(36.493, 115.115, 23.918, 0.988)
pt3dadd(36.586, 115.191, 23.921, 0.988)
pt3dadd(36.679, 115.267, 23.923, 0.988)
pt3dadd(36.766, 115.349, 23.927, 1)
pt3dadd(36.854, 115.431, 23.931, 1.012)
pt3dadd(36.942, 115.513, 23.935, 1.022)
pt3dadd(37.029, 115.595, 23.939, 1.034)
pt3dadd(37.117, 115.677, 23.943, 1.046)
pt3dadd(37.204, 115.759, 23.947, 1.056)
pt3dadd(37.292, 115.841, 23.951, 1.068)
pt3dadd(37.379, 115.923, 23.955, 1.078)
pt3dadd(37.467, 116.004, 23.959, 1.09)
}
}
proc shape3d_105() {
dend_7[12] { pt3dadd(37.554, 116.086, 23.963, 1.102)
pt3dadd(37.626, 116.182, 23.972, 1.082)
pt3dadd(37.698, 116.278, 23.981, 1.062)
pt3dadd(37.769, 116.373, 23.99, 1.042)
pt3dadd(37.841, 116.469, 23.999, 1.022)
pt3dadd(37.913, 116.564, 24.008, 1.002)
pt3dadd(37.985, 116.66, 24.017, 0.984)
pt3dadd(38.056, 116.755, 24.026, 0.964)
pt3dadd(38.128, 116.851, 24.035, 0.944)
pt3dadd(38.2, 116.947, 24.044, 0.924)
pt3dadd(38.272, 117.042, 24.053, 0.904)
}
dend_7[13] {pt3dclear()
pt3dadd(38.272, 117.042, 24.053, 0.904)
pt3dadd(38.282, 117.048, 24.055, 0.9)
pt3dadd(38.386, 117.105, 24.073, 0.854)
pt3dadd(38.489, 117.162, 24.091, 0.806)
pt3dadd(38.593, 117.213, 24.116, 0.782)
pt3dadd(38.698, 117.262, 24.143, 0.762)
pt3dadd(38.802, 117.312, 24.17, 0.742)
pt3dadd(38.907, 117.362, 24.197, 0.722)
pt3dadd(39.011, 117.411, 24.223, 0.702)
pt3dadd(39.115, 117.461, 24.25, 0.682)
pt3dadd(39.22, 117.511, 24.277, 0.662)
pt3dadd(39.324, 117.561, 24.304, 0.642)
pt3dadd(39.429, 117.61, 24.33, 0.622)
pt3dadd(39.533, 117.66, 24.357, 0.602)
pt3dadd(39.634, 117.684, 24.406, 0.65)
pt3dadd(39.736, 117.709, 24.456, 0.698)
pt3dadd(39.837, 117.733, 24.505, 0.746)
pt3dadd(39.939, 117.757, 24.555, 0.794)
pt3dadd(40.04, 117.781, 24.605, 0.842)
pt3dadd(40.141, 117.806, 24.654, 0.89)
pt3dadd(40.243, 117.83, 24.704, 0.938)
pt3dadd(40.344, 117.854, 24.753, 0.986)
pt3dadd(40.445, 117.878, 24.803, 1.034)
pt3dadd(40.547, 117.903, 24.852, 1.082)
pt3dadd(40.654, 117.922, 24.894, 1.042)
pt3dadd(40.762, 117.941, 24.935, 1)
pt3dadd(40.869, 117.96, 24.976, 0.96)
pt3dadd(40.977, 117.98, 25.018, 0.92)
pt3dadd(41.084, 117.999, 25.059, 0.88)
pt3dadd(41.192, 118.018, 25.101, 0.84)
pt3dadd(41.299, 118.038, 25.142, 0.8)
pt3dadd(41.407, 118.057, 25.183, 0.758)
pt3dadd(41.514, 118.076, 25.225, 0.718)
pt3dadd(41.622, 118.095, 25.266, 0.678)
}
dend_7[14] {pt3dclear()
pt3dadd(41.622, 118.095, 25.266, 0.678)
pt3dadd(41.673, 118.143, 25.313, 0.648)
pt3dadd(41.741, 118.206, 25.377, 0.606)
pt3dadd(41.809, 118.269, 25.44, 0.564)
pt3dadd(41.877, 118.332, 25.503, 0.522)
pt3dadd(41.945, 118.395, 25.567, 0.482)
pt3dadd(42.017, 118.458, 25.628, 0.452)
pt3dadd(42.096, 118.519, 25.683, 0.45)
pt3dadd(42.175, 118.579, 25.739, 0.448)
pt3dadd(42.254, 118.64, 25.794, 0.446)
pt3dadd(42.333, 118.701, 25.849, 0.444)
pt3dadd(42.413, 118.762, 25.905, 0.442)
pt3dadd(42.492, 118.823, 25.96, 0.44)
pt3dadd(42.571, 118.884, 26.016, 0.438)
pt3dadd(42.65, 118.945, 26.071, 0.436)
pt3dadd(42.729, 119.006, 26.127, 0.434)
pt3dadd(42.808, 119.069, 26.18, 0.442)
pt3dadd(42.886, 119.136, 26.232, 0.468)
pt3dadd(42.965, 119.203, 26.283, 0.492)
pt3dadd(43.043, 119.27, 26.334, 0.518)
pt3dadd(43.121, 119.337, 26.386, 0.542)
pt3dadd(43.199, 119.404, 26.437, 0.566)
pt3dadd(43.278, 119.471, 26.488, 0.592)
pt3dadd(43.356, 119.538, 26.539, 0.616)
pt3dadd(43.434, 119.605, 26.591, 0.642)
pt3dadd(43.512, 119.672, 26.642, 0.666)
pt3dadd(43.59, 119.74, 26.693, 0.678)
pt3dadd(43.667, 119.81, 26.743, 0.678)
pt3dadd(43.744, 119.879, 26.793, 0.678)
pt3dadd(43.821, 119.949, 26.844, 0.678)
pt3dadd(43.898, 120.018, 26.894, 0.678)
pt3dadd(43.974, 120.088, 26.945, 0.678)
pt3dadd(44.051, 120.157, 26.995, 0.678)
pt3dadd(44.128, 120.227, 27.045, 0.678)
pt3dadd(44.205, 120.296, 27.096, 0.678)
pt3dadd(44.282, 120.366, 27.146, 0.678)
pt3dadd(44.375, 120.427, 27.182, 0.678)
pt3dadd(44.473, 120.484, 27.213, 0.678)
pt3dadd(44.572, 120.541, 27.244, 0.678)
pt3dadd(44.671, 120.599, 27.275, 0.678)
pt3dadd(44.77, 120.655, 27.306, 0.678)
pt3dadd(44.868, 120.713, 27.337, 0.678)
pt3dadd(44.967, 120.77, 27.368, 0.678)
pt3dadd(45.066, 120.827, 27.399, 0.678)
pt3dadd(45.165, 120.884, 27.43, 0.678)
pt3dadd(45.263, 120.942, 27.461, 0.678)
pt3dadd(45.36, 121.006, 27.484, 0.678)
pt3dadd(45.457, 121.072, 27.505, 0.678)
pt3dadd(45.554, 121.138, 27.526, 0.678)
pt3dadd(45.651, 121.205, 27.547, 0.678)
pt3dadd(45.748, 121.271, 27.568, 0.676)
pt3dadd(45.845, 121.337, 27.589, 0.676)
pt3dadd(45.942, 121.403, 27.61, 0.676)
pt3dadd(46.038, 121.469, 27.631, 0.676)
pt3dadd(46.135, 121.536, 27.652, 0.676)
pt3dadd(46.232, 121.602, 27.673, 0.676)
pt3dadd(46.334, 121.65, 27.705, 0.65)
pt3dadd(46.438, 121.693, 27.74, 0.616)
pt3dadd(46.542, 121.736, 27.775, 0.582)
pt3dadd(46.645, 121.78, 27.81, 0.548)
pt3dadd(46.749, 121.823, 27.845, 0.514)
pt3dadd(46.853, 121.866, 27.88, 0.482)
pt3dadd(46.956, 121.909, 27.916, 0.448)
pt3dadd(47.06, 121.952, 27.951, 0.414)
pt3dadd(47.164, 121.996, 27.986, 0.38)
pt3dadd(47.267, 122.039, 28.021, 0.346)
pt3dadd(47.369, 122.093, 28.049, 0.346)
pt3dadd(47.47, 122.149, 28.075, 0.356)
pt3dadd(47.571, 122.207, 28.101, 0.368)
pt3dadd(47.672, 122.263, 28.127, 0.378)
pt3dadd(47.773, 122.321, 28.153, 0.39)
pt3dadd(47.874, 122.377, 28.179, 0.4)
pt3dadd(47.975, 122.434, 28.205, 0.41)
pt3dadd(48.076, 122.491, 28.231, 0.422)
pt3dadd(48.177, 122.548, 28.257, 0.432)
pt3dadd(48.278, 122.604, 28.283, 0.442)
pt3dadd(48.38, 122.664, 28.302, 0.46)
pt3dadd(48.481, 122.724, 28.32, 0.478)
pt3dadd(48.582, 122.784, 28.339, 0.496)
pt3dadd(48.684, 122.844, 28.357, 0.514)
pt3dadd(48.786, 122.904, 28.375, 0.532)
pt3dadd(48.887, 122.965, 28.394, 0.55)
pt3dadd(48.989, 123.025, 28.412, 0.568)
pt3dadd(49.09, 123.085, 28.43, 0.586)
pt3dadd(49.192, 123.145, 28.448, 0.604)
pt3dadd(49.293, 123.205, 28.467, 0.622)
pt3dadd(49.399, 123.26, 28.478, 0.61)
pt3dadd(49.505, 123.314, 28.489, 0.594)
pt3dadd(49.612, 123.368, 28.499, 0.576)
pt3dadd(49.718, 123.422, 28.509, 0.558)
pt3dadd(49.825, 123.476, 28.519, 0.542)
pt3dadd(49.931, 123.53, 28.53, 0.524)
pt3dadd(50.038, 123.584, 28.54, 0.506)
pt3dadd(50.144, 123.638, 28.55, 0.49)
pt3dadd(50.25, 123.692, 28.561, 0.472)
pt3dadd(50.357, 123.745, 28.571, 0.454)
pt3dadd(50.454, 123.816, 28.573, 0.452)
pt3dadd(50.549, 123.889, 28.573, 0.452)
pt3dadd(50.644, 123.962, 28.574, 0.452)
pt3dadd(50.74, 124.034, 28.575, 0.452)
pt3dadd(50.835, 124.108, 28.575, 0.452)
pt3dadd(50.93, 124.181, 28.576, 0.452)
pt3dadd(51.026, 124.254, 28.577, 0.452)
pt3dadd(51.121, 124.327, 28.577, 0.452)
pt3dadd(51.216, 124.399, 28.578, 0.452)
pt3dadd(51.311, 124.472, 28.578, 0.452)
pt3dadd(51.393, 124.56, 28.58, 0.52)
pt3dadd(51.472, 124.651, 28.581, 0.6)
pt3dadd(51.551, 124.741, 28.582, 0.68)
pt3dadd(51.63, 124.831, 28.584, 0.76)
pt3dadd(51.709, 124.921, 28.585, 0.84)
pt3dadd(51.788, 125.011, 28.586, 0.92)
pt3dadd(51.867, 125.102, 28.588, 1)
pt3dadd(51.946, 125.192, 28.589, 1.08)
pt3dadd(52.025, 125.282, 28.591, 1.16)
pt3dadd(52.104, 125.372, 28.592, 1.24)
pt3dadd(52.193, 125.454, 28.595, 1.264)
pt3dadd(52.283, 125.533, 28.597, 1.282)
pt3dadd(52.372, 125.612, 28.6, 1.302)
pt3dadd(52.462, 125.693, 28.603, 1.32)
pt3dadd(52.551, 125.772, 28.606, 1.34)
pt3dadd(52.641, 125.852, 28.609, 1.36)
pt3dadd(52.731, 125.932, 28.611, 1.378)
pt3dadd(52.82, 126.012, 28.614, 1.398)
pt3dadd(52.91, 126.091, 28.617, 1.416)
pt3dadd(53, 126.17, 28.62, 1.436)
pt3dadd(53.094, 126.245, 28.626, 1.392)
pt3dadd(53.188, 126.318, 28.632, 1.348)
pt3dadd(53.283, 126.392, 28.637, 1.304)
pt3dadd(53.377, 126.466, 28.643, 1.26)
pt3dadd(53.472, 126.539, 28.649, 1.216)
pt3dadd(53.566, 126.613, 28.655, 1.172)
pt3dadd(53.661, 126.686, 28.661, 1.128)
pt3dadd(53.755, 126.761, 28.667, 1.084)
pt3dadd(53.85, 126.834, 28.672, 1.04)
pt3dadd(53.944, 126.907, 28.678, 0.996)
pt3dadd(54.042, 126.977, 28.688, 0.946)
pt3dadd(54.139, 127.045, 28.698, 0.898)
pt3dadd(54.237, 127.114, 28.708, 0.848)
pt3dadd(54.335, 127.183, 28.717, 0.798)
pt3dadd(54.432, 127.252, 28.727, 0.748)
pt3dadd(54.53, 127.32, 28.737, 0.698)
pt3dadd(54.628, 127.39, 28.747, 0.648)
pt3dadd(54.725, 127.458, 28.756, 0.598)
pt3dadd(54.823, 127.526, 28.766, 0.548)
pt3dadd(54.92, 127.596, 28.776, 0.5)
pt3dadd(55.012, 127.668, 28.799, 0.472)
pt3dadd(55.103, 127.74, 28.823, 0.442)
pt3dadd(55.195, 127.813, 28.846, 0.414)
pt3dadd(55.286, 127.885, 28.869, 0.386)
pt3dadd(55.378, 127.957, 28.892, 0.358)
pt3dadd(55.469, 128.03, 28.916, 0.33)
pt3dadd(55.561, 128.102, 28.939, 0.302)
pt3dadd(55.652, 128.174, 28.962, 0.274)
pt3dadd(55.744, 128.248, 28.985, 0.244)
}
}
proc shape3d_106() {
dend_7[14] { pt3dadd(55.824, 128.327, 29.014, 0.226)
pt3dadd(55.881, 128.42, 29.055, 0.226)
pt3dadd(55.938, 128.515, 29.095, 0.226)
pt3dadd(55.995, 128.609, 29.136, 0.226)
pt3dadd(56.052, 128.702, 29.176, 0.226)
pt3dadd(56.109, 128.796, 29.216, 0.226)
pt3dadd(56.166, 128.89, 29.257, 0.226)
pt3dadd(56.223, 128.984, 29.297, 0.226)
pt3dadd(56.28, 129.078, 29.337, 0.226)
pt3dadd(56.337, 129.172, 29.378, 0.226)
pt3dadd(56.389, 129.27, 29.414, 0.226)
pt3dadd(56.434, 129.376, 29.442, 0.226)
pt3dadd(56.48, 129.481, 29.47, 0.226)
pt3dadd(56.525, 129.588, 29.498, 0.226)
pt3dadd(56.57, 129.694, 29.526, 0.226)
pt3dadd(56.615, 129.799, 29.555, 0.226)
pt3dadd(56.66, 129.905, 29.583, 0.226)
pt3dadd(56.706, 130.012, 29.611, 0.226)
pt3dadd(56.751, 130.117, 29.639, 0.226)
pt3dadd(56.796, 130.223, 29.668, 0.226)
pt3dadd(56.85, 130.325, 29.691, 0.226)
pt3dadd(56.918, 130.422, 29.708, 0.226)
pt3dadd(56.986, 130.519, 29.724, 0.226)
pt3dadd(57.054, 130.616, 29.74, 0.226)
pt3dadd(57.122, 130.712, 29.757, 0.226)
pt3dadd(57.19, 130.81, 29.773, 0.226)
pt3dadd(57.258, 130.907, 29.789, 0.226)
pt3dadd(57.327, 131.003, 29.806, 0.226)
pt3dadd(57.395, 131.1, 29.822, 0.226)
pt3dadd(57.463, 131.197, 29.839, 0.226)
pt3dadd(57.536, 131.29, 29.853, 0.234)
pt3dadd(57.618, 131.377, 29.865, 0.258)
pt3dadd(57.699, 131.464, 29.877, 0.28)
pt3dadd(57.781, 131.55, 29.889, 0.302)
pt3dadd(57.863, 131.636, 29.901, 0.326)
pt3dadd(57.944, 131.724, 29.913, 0.348)
pt3dadd(58.026, 131.81, 29.925, 0.37)
pt3dadd(58.108, 131.897, 29.936, 0.394)
pt3dadd(58.189, 131.984, 29.948, 0.416)
pt3dadd(58.271, 132.071, 29.96, 0.438)
pt3dadd(58.357, 132.152, 29.974, 0.462)
pt3dadd(58.448, 132.227, 29.992, 0.484)
pt3dadd(58.54, 132.302, 30.009, 0.508)
pt3dadd(58.631, 132.377, 30.026, 0.53)
pt3dadd(58.723, 132.452, 30.043, 0.554)
pt3dadd(58.814, 132.527, 30.06, 0.576)
pt3dadd(58.905, 132.602, 30.077, 0.6)
pt3dadd(58.997, 132.677, 30.094, 0.622)
pt3dadd(59.088, 132.752, 30.111, 0.646)
pt3dadd(59.18, 132.827, 30.129, 0.668)
pt3dadd(59.276, 132.888, 30.156, 0.678)
pt3dadd(59.376, 132.94, 30.191, 0.678)
pt3dadd(59.476, 132.991, 30.226, 0.678)
pt3dadd(59.576, 133.043, 30.261, 0.678)
pt3dadd(59.676, 133.093, 30.296, 0.678)
pt3dadd(59.776, 133.145, 30.331, 0.678)
pt3dadd(59.876, 133.196, 30.366, 0.678)
pt3dadd(59.976, 133.248, 30.401, 0.678)
pt3dadd(60.076, 133.298, 30.436, 0.678)
pt3dadd(60.176, 133.35, 30.471, 0.678)
pt3dadd(60.276, 133.406, 30.5, 0.686)
pt3dadd(60.376, 133.465, 30.525, 0.7)
pt3dadd(60.476, 133.524, 30.55, 0.714)
pt3dadd(60.576, 133.584, 30.575, 0.728)
pt3dadd(60.676, 133.643, 30.601, 0.742)
pt3dadd(60.776, 133.702, 30.626, 0.756)
pt3dadd(60.876, 133.762, 30.651, 0.77)
pt3dadd(60.976, 133.82, 30.676, 0.784)
pt3dadd(61.076, 133.879, 30.701, 0.798)
pt3dadd(61.176, 133.939, 30.726, 0.812)
pt3dadd(61.278, 133.994, 30.749, 0.824)
pt3dadd(61.383, 134.047, 30.77, 0.832)
pt3dadd(61.487, 134.101, 30.791, 0.84)
pt3dadd(61.592, 134.154, 30.813, 0.85)
pt3dadd(61.696, 134.207, 30.834, 0.858)
pt3dadd(61.801, 134.261, 30.855, 0.866)
pt3dadd(61.905, 134.314, 30.876, 0.874)
pt3dadd(62.01, 134.368, 30.897, 0.884)
pt3dadd(62.114, 134.42, 30.918, 0.892)
pt3dadd(62.219, 134.473, 30.939, 0.9)
pt3dadd(62.325, 134.524, 30.958, 0.902)
pt3dadd(62.433, 134.572, 30.975, 0.898)
pt3dadd(62.541, 134.62, 30.993, 0.896)
pt3dadd(62.649, 134.669, 31.01, 0.892)
pt3dadd(62.757, 134.717, 31.027, 0.888)
pt3dadd(62.865, 134.765, 31.044, 0.886)
pt3dadd(62.973, 134.813, 31.061, 0.882)
pt3dadd(63.081, 134.861, 31.079, 0.88)
pt3dadd(63.189, 134.91, 31.096, 0.876)
pt3dadd(63.297, 134.958, 31.113, 0.872)
pt3dadd(63.4, 135.016, 31.127, 0.86)
pt3dadd(63.501, 135.078, 31.14, 0.844)
pt3dadd(63.602, 135.142, 31.153, 0.828)
pt3dadd(63.703, 135.204, 31.166, 0.81)
pt3dadd(63.804, 135.268, 31.179, 0.794)
pt3dadd(63.905, 135.33, 31.192, 0.778)
pt3dadd(64.006, 135.392, 31.204, 0.76)
pt3dadd(64.107, 135.456, 31.217, 0.744)
pt3dadd(64.209, 135.518, 31.23, 0.728)
pt3dadd(64.31, 135.582, 31.243, 0.71)
pt3dadd(64.41, 135.635, 31.272, 0.722)
pt3dadd(64.511, 135.682, 31.31, 0.748)
pt3dadd(64.611, 135.728, 31.348, 0.774)
pt3dadd(64.711, 135.776, 31.386, 0.8)
pt3dadd(64.812, 135.823, 31.424, 0.826)
pt3dadd(64.912, 135.87, 31.462, 0.854)
pt3dadd(65.013, 135.918, 31.5, 0.88)
pt3dadd(65.113, 135.965, 31.539, 0.906)
pt3dadd(65.214, 136.012, 31.577, 0.932)
pt3dadd(65.314, 136.06, 31.615, 0.958)
pt3dadd(65.412, 136.112, 31.653, 0.952)
pt3dadd(65.508, 136.168, 31.69, 0.934)
pt3dadd(65.604, 136.223, 31.728, 0.914)
pt3dadd(65.701, 136.278, 31.766, 0.896)
pt3dadd(65.797, 136.333, 31.804, 0.876)
pt3dadd(65.894, 136.388, 31.842, 0.858)
pt3dadd(65.99, 136.444, 31.879, 0.838)
pt3dadd(66.087, 136.499, 31.917, 0.82)
pt3dadd(66.183, 136.554, 31.955, 0.8)
pt3dadd(66.279, 136.609, 31.993, 0.782)
pt3dadd(66.371, 136.67, 32.031, 0.744)
pt3dadd(66.462, 136.735, 32.069, 0.7)
pt3dadd(66.552, 136.799, 32.107, 0.656)
pt3dadd(66.643, 136.864, 32.145, 0.612)
pt3dadd(66.734, 136.928, 32.182, 0.568)
pt3dadd(66.824, 136.992, 32.22, 0.522)
pt3dadd(66.915, 137.057, 32.258, 0.478)
pt3dadd(67.005, 137.12, 32.296, 0.434)
pt3dadd(67.096, 137.185, 32.334, 0.39)
pt3dadd(67.186, 137.249, 32.372, 0.346)
pt3dadd(67.267, 137.31, 32.425, 0.382)
pt3dadd(67.346, 137.37, 32.481, 0.434)
pt3dadd(67.425, 137.431, 32.537, 0.486)
pt3dadd(67.504, 137.491, 32.593, 0.536)
pt3dadd(67.583, 137.551, 32.649, 0.588)
pt3dadd(67.662, 137.612, 32.705, 0.64)
pt3dadd(67.74, 137.672, 32.762, 0.692)
pt3dadd(67.819, 137.734, 32.818, 0.742)
pt3dadd(67.898, 137.794, 32.874, 0.794)
pt3dadd(67.977, 137.854, 32.93, 0.846)
pt3dadd(68.062, 137.928, 32.963, 0.802)
pt3dadd(68.148, 138.004, 32.993, 0.748)
pt3dadd(68.233, 138.079, 33.024, 0.694)
pt3dadd(68.319, 138.155, 33.054, 0.638)
pt3dadd(68.405, 138.23, 33.084, 0.584)
pt3dadd(68.491, 138.306, 33.114, 0.528)
pt3dadd(68.577, 138.382, 33.145, 0.474)
pt3dadd(68.662, 138.457, 33.175, 0.418)
pt3dadd(68.748, 138.533, 33.205, 0.364)
pt3dadd(68.834, 138.608, 33.236, 0.31)
pt3dadd(68.923, 138.684, 33.258, 0.358)
pt3dadd(69.013, 138.76, 33.279, 0.422)
pt3dadd(69.103, 138.835, 33.3, 0.484)
pt3dadd(69.193, 138.91, 33.321, 0.546)
pt3dadd(69.283, 138.985, 33.342, 0.61)
pt3dadd(69.373, 139.061, 33.364, 0.672)
pt3dadd(69.463, 139.135, 33.385, 0.736)
pt3dadd(69.553, 139.211, 33.406, 0.798)
pt3dadd(69.643, 139.286, 33.427, 0.862)
pt3dadd(69.733, 139.361, 33.448, 0.924)
pt3dadd(69.829, 139.427, 33.474, 0.942)
pt3dadd(69.925, 139.49, 33.501, 0.952)
pt3dadd(70.021, 139.555, 33.528, 0.964)
pt3dadd(70.117, 139.619, 33.555, 0.976)
pt3dadd(70.213, 139.682, 33.582, 0.986)
pt3dadd(70.309, 139.747, 33.609, 0.998)
pt3dadd(70.406, 139.811, 33.636, 1.008)
pt3dadd(70.502, 139.876, 33.663, 1.02)
pt3dadd(70.598, 139.939, 33.69, 1.032)
pt3dadd(70.694, 140.003, 33.717, 1.042)
pt3dadd(70.794, 140.056, 33.75, 0.984)
pt3dadd(70.895, 140.107, 33.783, 0.924)
pt3dadd(70.996, 140.16, 33.816, 0.862)
pt3dadd(71.096, 140.212, 33.85, 0.802)
pt3dadd(71.197, 140.263, 33.883, 0.742)
pt3dadd(71.297, 140.315, 33.916, 0.68)
pt3dadd(71.398, 140.368, 33.95, 0.62)
pt3dadd(71.498, 140.419, 33.983, 0.56)
pt3dadd(71.599, 140.471, 34.016, 0.5)
pt3dadd(71.7, 140.522, 34.049, 0.438)
pt3dadd(71.8, 140.582, 34.072, 0.422)
pt3dadd(71.9, 140.642, 34.094, 0.406)
pt3dadd(72.001, 140.702, 34.116, 0.388)
pt3dadd(72.101, 140.762, 34.138, 0.372)
pt3dadd(72.202, 140.822, 34.16, 0.356)
pt3dadd(72.302, 140.882, 34.183, 0.34)
pt3dadd(72.403, 140.942, 34.205, 0.324)
pt3dadd(72.503, 141.002, 34.227, 0.308)
pt3dadd(72.604, 141.062, 34.249, 0.29)
pt3dadd(72.704, 141.122, 34.271, 0.274)
pt3dadd(72.812, 141.172, 34.287, 0.294)
pt3dadd(72.92, 141.22, 34.303, 0.316)
pt3dadd(73.028, 141.269, 34.319, 0.336)
pt3dadd(73.136, 141.317, 34.335, 0.358)
pt3dadd(73.244, 141.365, 34.351, 0.38)
pt3dadd(73.352, 141.414, 34.367, 0.4)
pt3dadd(73.46, 141.462, 34.383, 0.422)
pt3dadd(73.569, 141.511, 34.399, 0.442)
pt3dadd(73.677, 141.559, 34.415, 0.464)
pt3dadd(73.785, 141.608, 34.431, 0.484)
}
}
proc shape3d_107() {
dend_7[14] { pt3dadd(73.892, 141.66, 34.442, 0.486)
pt3dadd(74, 141.71, 34.452, 0.49)
pt3dadd(74.108, 141.762, 34.462, 0.492)
pt3dadd(74.215, 141.814, 34.472, 0.494)
pt3dadd(74.323, 141.865, 34.482, 0.498)
pt3dadd(74.431, 141.917, 34.493, 0.5)
pt3dadd(74.538, 141.968, 34.503, 0.502)
pt3dadd(74.646, 142.02, 34.513, 0.506)
pt3dadd(74.754, 142.072, 34.523, 0.508)
pt3dadd(74.861, 142.123, 34.533, 0.51)
pt3dadd(74.967, 142.181, 34.541, 0.48)
pt3dadd(75.072, 142.237, 34.549, 0.452)
pt3dadd(75.177, 142.294, 34.557, 0.424)
pt3dadd(75.283, 142.35, 34.565, 0.396)
pt3dadd(75.388, 142.408, 34.573, 0.366)
pt3dadd(75.493, 142.464, 34.581, 0.338)
pt3dadd(75.599, 142.52, 34.589, 0.31)
pt3dadd(75.704, 142.577, 34.596, 0.28)
pt3dadd(75.809, 142.634, 34.604, 0.252)
pt3dadd(75.915, 142.69, 34.613, 0.226)
pt3dadd(76.026, 142.73, 34.629, 0.23)
pt3dadd(76.137, 142.772, 34.645, 0.236)
pt3dadd(76.248, 142.813, 34.662, 0.24)
pt3dadd(76.359, 142.855, 34.678, 0.244)
pt3dadd(76.47, 142.896, 34.694, 0.248)
pt3dadd(76.581, 142.937, 34.71, 0.252)
pt3dadd(76.692, 142.979, 34.727, 0.258)
pt3dadd(76.803, 143.02, 34.743, 0.262)
pt3dadd(76.914, 143.062, 34.759, 0.266)
pt3dadd(77.022, 143.102, 34.78, 0.276)
pt3dadd(77.118, 143.146, 34.829, 0.318)
pt3dadd(77.213, 143.189, 34.878, 0.358)
pt3dadd(77.309, 143.231, 34.927, 0.4)
pt3dadd(77.405, 143.274, 34.976, 0.44)
pt3dadd(77.5, 143.316, 35.025, 0.482)
pt3dadd(77.596, 143.359, 35.074, 0.522)
pt3dadd(77.691, 143.401, 35.123, 0.564)
pt3dadd(77.787, 143.444, 35.171, 0.606)
pt3dadd(77.883, 143.486, 35.22, 0.646)
pt3dadd(77.979, 143.532, 35.264, 0.678)
pt3dadd(78.08, 143.588, 35.291, 0.678)
pt3dadd(78.181, 143.645, 35.318, 0.678)
pt3dadd(78.282, 143.701, 35.345, 0.678)
pt3dadd(78.383, 143.758, 35.372, 0.678)
pt3dadd(78.484, 143.814, 35.399, 0.678)
pt3dadd(78.585, 143.87, 35.426, 0.678)
pt3dadd(78.686, 143.927, 35.453, 0.678)
pt3dadd(78.787, 143.983, 35.48, 0.678)
pt3dadd(78.888, 144.04, 35.507, 0.678)
pt3dadd(78.991, 144.092, 35.532, 0.678)
pt3dadd(79.102, 144.134, 35.546, 0.678)
pt3dadd(79.212, 144.178, 35.561, 0.678)
pt3dadd(79.323, 144.22, 35.575, 0.678)
pt3dadd(79.434, 144.263, 35.59, 0.678)
pt3dadd(79.545, 144.305, 35.604, 0.678)
pt3dadd(79.656, 144.348, 35.619, 0.678)
pt3dadd(79.767, 144.39, 35.633, 0.678)
pt3dadd(79.877, 144.433, 35.648, 0.678)
pt3dadd(79.988, 144.475, 35.662, 0.678)
pt3dadd(80.1, 144.516, 35.675, 0.674)
pt3dadd(80.215, 144.548, 35.682, 0.656)
pt3dadd(80.331, 144.581, 35.689, 0.636)
pt3dadd(80.446, 144.613, 35.695, 0.618)
pt3dadd(80.561, 144.646, 35.702, 0.6)
pt3dadd(80.676, 144.678, 35.709, 0.582)
pt3dadd(80.792, 144.71, 35.716, 0.564)
pt3dadd(80.907, 144.743, 35.723, 0.546)
pt3dadd(81.022, 144.775, 35.73, 0.528)
pt3dadd(81.137, 144.808, 35.736, 0.508)
pt3dadd(81.251, 144.844, 35.744, 0.494)
pt3dadd(81.36, 144.894, 35.753, 0.49)
pt3dadd(81.468, 144.943, 35.763, 0.486)
pt3dadd(81.577, 144.994, 35.772, 0.48)
pt3dadd(81.685, 145.043, 35.782, 0.476)
pt3dadd(81.794, 145.093, 35.791, 0.472)
pt3dadd(81.902, 145.144, 35.801, 0.468)
pt3dadd(82.011, 145.193, 35.81, 0.464)
pt3dadd(82.119, 145.243, 35.82, 0.46)
pt3dadd(82.228, 145.292, 35.829, 0.456)
pt3dadd(82.335, 145.343, 35.842, 0.456)
pt3dadd(82.44, 145.396, 35.863, 0.47)
pt3dadd(82.545, 145.448, 35.884, 0.484)
pt3dadd(82.65, 145.501, 35.905, 0.5)
pt3dadd(82.755, 145.553, 35.925, 0.514)
pt3dadd(82.86, 145.606, 35.946, 0.528)
pt3dadd(82.965, 145.658, 35.967, 0.542)
pt3dadd(83.07, 145.711, 35.988, 0.556)
pt3dadd(83.175, 145.763, 36.009, 0.572)
pt3dadd(83.28, 145.816, 36.029, 0.586)
pt3dadd(83.384, 145.867, 36.055, 0.606)
pt3dadd(83.486, 145.916, 36.088, 0.634)
pt3dadd(83.588, 145.966, 36.121, 0.664)
pt3dadd(83.689, 146.016, 36.155, 0.694)
pt3dadd(83.791, 146.065, 36.188, 0.722)
pt3dadd(83.893, 146.114, 36.221, 0.752)
pt3dadd(83.995, 146.164, 36.255, 0.782)
pt3dadd(84.096, 146.214, 36.288, 0.81)
pt3dadd(84.198, 146.263, 36.321, 0.84)
pt3dadd(84.3, 146.312, 36.354, 0.868)
pt3dadd(84.399, 146.37, 36.382, 0.876)
pt3dadd(84.494, 146.438, 36.402, 0.846)
pt3dadd(84.59, 146.508, 36.422, 0.814)
pt3dadd(84.685, 146.576, 36.441, 0.784)
pt3dadd(84.78, 146.646, 36.461, 0.754)
pt3dadd(84.875, 146.714, 36.481, 0.722)
pt3dadd(84.971, 146.784, 36.5, 0.692)
pt3dadd(85.066, 146.854, 36.52, 0.662)
pt3dadd(85.161, 146.922, 36.539, 0.63)
pt3dadd(85.256, 146.992, 36.559, 0.6)
pt3dadd(85.351, 147.062, 36.576, 0.576)
pt3dadd(85.445, 147.134, 36.59, 0.564)
pt3dadd(85.539, 147.208, 36.603, 0.55)
pt3dadd(85.632, 147.281, 36.616, 0.538)
pt3dadd(85.726, 147.354, 36.629, 0.524)
pt3dadd(85.82, 147.427, 36.643, 0.512)
pt3dadd(85.914, 147.5, 36.656, 0.498)
pt3dadd(86.008, 147.574, 36.669, 0.486)
pt3dadd(86.102, 147.647, 36.683, 0.472)
pt3dadd(86.195, 147.72, 36.696, 0.46)
pt3dadd(86.289, 147.794, 36.707, 0.452)
pt3dadd(86.381, 147.87, 36.715, 0.452)
pt3dadd(86.473, 147.947, 36.723, 0.452)
pt3dadd(86.566, 148.022, 36.731, 0.452)
pt3dadd(86.658, 148.098, 36.739, 0.452)
pt3dadd(86.75, 148.175, 36.748, 0.452)
pt3dadd(86.843, 148.25, 36.756, 0.452)
pt3dadd(86.935, 148.326, 36.764, 0.452)
pt3dadd(87.027, 148.403, 36.772, 0.452)
pt3dadd(87.12, 148.478, 36.78, 0.452)
pt3dadd(87.211, 148.555, 36.785, 0.452)
pt3dadd(87.301, 148.636, 36.785, 0.452)
pt3dadd(87.391, 148.715, 36.785, 0.452)
pt3dadd(87.481, 148.794, 36.785, 0.452)
pt3dadd(87.57, 148.874, 36.785, 0.452)
pt3dadd(87.66, 148.954, 36.785, 0.452)
pt3dadd(87.75, 149.033, 36.785, 0.452)
pt3dadd(87.84, 149.112, 36.785, 0.452)
pt3dadd(87.93, 149.192, 36.785, 0.452)
pt3dadd(88.02, 149.272, 36.785, 0.452)
pt3dadd(88.112, 149.348, 36.785, 0.448)
pt3dadd(88.209, 149.419, 36.785, 0.44)
pt3dadd(88.305, 149.49, 36.785, 0.432)
pt3dadd(88.402, 149.561, 36.785, 0.424)
pt3dadd(88.499, 149.633, 36.785, 0.416)
pt3dadd(88.595, 149.704, 36.785, 0.408)
pt3dadd(88.692, 149.774, 36.785, 0.4)
pt3dadd(88.788, 149.846, 36.785, 0.392)
pt3dadd(88.885, 149.917, 36.785, 0.384)
pt3dadd(88.982, 149.988, 36.785, 0.376)
pt3dadd(89.081, 150.056, 36.785, 0.368)
pt3dadd(89.183, 150.12, 36.785, 0.358)
pt3dadd(89.285, 150.182, 36.785, 0.35)
pt3dadd(89.387, 150.246, 36.785, 0.342)
pt3dadd(89.488, 150.31, 36.785, 0.332)
pt3dadd(89.59, 150.373, 36.785, 0.324)
pt3dadd(89.692, 150.436, 36.785, 0.316)
pt3dadd(89.794, 150.499, 36.785, 0.306)
pt3dadd(89.896, 150.563, 36.785, 0.298)
pt3dadd(89.998, 150.626, 36.785, 0.288)
pt3dadd(90.097, 150.694, 36.785, 0.304)
pt3dadd(90.193, 150.766, 36.785, 0.35)
pt3dadd(90.288, 150.839, 36.785, 0.398)
pt3dadd(90.384, 150.911, 36.785, 0.444)
pt3dadd(90.48, 150.984, 36.785, 0.49)
pt3dadd(90.575, 151.056, 36.785, 0.536)
pt3dadd(90.671, 151.129, 36.785, 0.584)
pt3dadd(90.766, 151.201, 36.785, 0.63)
pt3dadd(90.862, 151.274, 36.785, 0.676)
pt3dadd(90.957, 151.346, 36.785, 0.722)
pt3dadd(91.051, 151.422, 36.785, 0.756)
pt3dadd(91.142, 151.5, 36.785, 0.77)
pt3dadd(91.233, 151.578, 36.785, 0.786)
pt3dadd(91.324, 151.656, 36.785, 0.802)
pt3dadd(91.415, 151.734, 36.785, 0.818)
pt3dadd(91.506, 151.812, 36.785, 0.834)
pt3dadd(91.598, 151.89, 36.785, 0.848)
pt3dadd(91.689, 151.968, 36.785, 0.864)
pt3dadd(91.78, 152.046, 36.785, 0.88)
pt3dadd(91.871, 152.124, 36.785, 0.896)
pt3dadd(91.961, 152.204, 36.785, 0.904)
pt3dadd(92.049, 152.285, 36.785, 0.902)
pt3dadd(92.137, 152.366, 36.785, 0.9)
pt3dadd(92.225, 152.448, 36.785, 0.898)
pt3dadd(92.313, 152.53, 36.785, 0.896)
pt3dadd(92.402, 152.611, 36.785, 0.896)
pt3dadd(92.49, 152.693, 36.785, 0.894)
pt3dadd(92.578, 152.774, 36.785, 0.892)
pt3dadd(92.666, 152.855, 36.785, 0.89)
pt3dadd(92.754, 152.936, 36.785, 0.89)
pt3dadd(92.84, 153.02, 36.785, 0.882)
pt3dadd(92.923, 153.107, 36.785, 0.868)
pt3dadd(93.006, 153.193, 36.785, 0.854)
pt3dadd(93.089, 153.281, 36.785, 0.84)
pt3dadd(93.172, 153.367, 36.785, 0.826)
pt3dadd(93.255, 153.454, 36.785, 0.812)
pt3dadd(93.338, 153.54, 36.785, 0.798)
pt3dadd(93.421, 153.626, 36.785, 0.784)
pt3dadd(93.504, 153.714, 36.785, 0.77)
pt3dadd(93.587, 153.8, 36.785, 0.756)
pt3dadd(93.67, 153.888, 36.785, 0.742)
}
}
proc shape3d_108() {
dend_7[14] { pt3dadd(93.751, 153.976, 36.785, 0.728)
pt3dadd(93.833, 154.063, 36.785, 0.714)
pt3dadd(93.914, 154.152, 36.785, 0.7)
pt3dadd(93.996, 154.24, 36.785, 0.686)
pt3dadd(94.077, 154.328, 36.785, 0.672)
pt3dadd(94.159, 154.416, 36.785, 0.658)
pt3dadd(94.24, 154.504, 36.785, 0.644)
pt3dadd(94.322, 154.592, 36.785, 0.63)
pt3dadd(94.403, 154.68, 36.785, 0.616)
pt3dadd(94.484, 154.769, 36.785, 0.602)
pt3dadd(94.564, 154.858, 36.785, 0.588)
pt3dadd(94.644, 154.948, 36.785, 0.572)
pt3dadd(94.725, 155.036, 36.785, 0.558)
pt3dadd(94.805, 155.126, 36.785, 0.544)
pt3dadd(94.885, 155.215, 36.785, 0.53)
pt3dadd(94.965, 155.304, 36.785, 0.516)
pt3dadd(95.046, 155.394, 36.785, 0.502)
pt3dadd(95.126, 155.483, 36.785, 0.488)
pt3dadd(95.206, 155.572, 36.785, 0.472)
pt3dadd(95.284, 155.663, 36.785, 0.47)
pt3dadd(95.36, 155.756, 36.785, 0.482)
pt3dadd(95.436, 155.849, 36.785, 0.496)
pt3dadd(95.512, 155.942, 36.785, 0.508)
pt3dadd(95.587, 156.035, 36.785, 0.52)
pt3dadd(95.663, 156.128, 36.785, 0.532)
pt3dadd(95.739, 156.221, 36.785, 0.544)
pt3dadd(95.815, 156.314, 36.785, 0.556)
pt3dadd(95.89, 156.407, 36.785, 0.57)
pt3dadd(95.966, 156.5, 36.785, 0.582)
pt3dadd(96.037, 156.596, 36.785, 0.592)
pt3dadd(96.103, 156.697, 36.785, 0.602)
pt3dadd(96.169, 156.797, 36.785, 0.61)
pt3dadd(96.236, 156.898, 36.785, 0.62)
pt3dadd(96.302, 156.997, 36.785, 0.628)
pt3dadd(96.368, 157.098, 36.785, 0.638)
pt3dadd(96.434, 157.198, 36.785, 0.646)
pt3dadd(96.5, 157.298, 36.785, 0.656)
pt3dadd(96.566, 157.398, 36.785, 0.664)
pt3dadd(96.632, 157.499, 36.785, 0.674)
pt3dadd(96.689, 157.603, 36.785, 0.678)
pt3dadd(96.738, 157.714, 36.785, 0.678)
pt3dadd(96.788, 157.823, 36.785, 0.678)
pt3dadd(96.837, 157.932, 36.785, 0.678)
pt3dadd(96.887, 158.041, 36.785, 0.678)
pt3dadd(96.936, 158.15, 36.785, 0.678)
pt3dadd(96.985, 158.26, 36.785, 0.678)
pt3dadd(97.035, 158.369, 36.785, 0.678)
pt3dadd(97.084, 158.478, 36.785, 0.678)
pt3dadd(97.134, 158.588, 36.785, 0.678)
pt3dadd(97.176, 158.7, 36.785, 0.678)
pt3dadd(97.213, 158.814, 36.785, 0.678)
pt3dadd(97.25, 158.928, 36.785, 0.678)
pt3dadd(97.287, 159.042, 36.785, 0.678)
pt3dadd(97.323, 159.157, 36.785, 0.678)
pt3dadd(97.36, 159.271, 36.785, 0.678)
pt3dadd(97.397, 159.385, 36.785, 0.678)
pt3dadd(97.433, 159.499, 36.785, 0.678)
pt3dadd(97.47, 159.613, 36.785, 0.678)
pt3dadd(97.507, 159.728, 36.785, 0.678)
pt3dadd(97.554, 159.838, 36.785, 0.686)
pt3dadd(97.611, 159.943, 36.785, 0.7)
pt3dadd(97.667, 160.05, 36.785, 0.716)
pt3dadd(97.724, 160.156, 36.785, 0.73)
pt3dadd(97.78, 160.261, 36.785, 0.744)
pt3dadd(97.837, 160.367, 36.785, 0.758)
pt3dadd(97.893, 160.472, 36.785, 0.774)
pt3dadd(97.95, 160.579, 36.785, 0.788)
pt3dadd(98.007, 160.685, 36.785, 0.802)
pt3dadd(98.063, 160.79, 36.785, 0.818)
pt3dadd(98.125, 160.892, 36.785, 0.824)
pt3dadd(98.192, 160.993, 36.785, 0.824)
pt3dadd(98.258, 161.093, 36.785, 0.824)
pt3dadd(98.325, 161.192, 36.785, 0.824)
pt3dadd(98.391, 161.292, 36.785, 0.824)
pt3dadd(98.458, 161.393, 36.785, 0.824)
pt3dadd(98.524, 161.492, 36.785, 0.824)
pt3dadd(98.591, 161.592, 36.785, 0.824)
pt3dadd(98.657, 161.692, 36.785, 0.824)
pt3dadd(98.724, 161.791, 36.785, 0.824)
pt3dadd(98.794, 161.89, 36.785, 0.816)
pt3dadd(98.866, 161.984, 36.785, 0.8)
pt3dadd(98.939, 162.08, 36.785, 0.784)
pt3dadd(99.011, 162.176, 36.785, 0.77)
pt3dadd(99.083, 162.272, 36.785, 0.754)
pt3dadd(99.156, 162.368, 36.784, 0.738)
pt3dadd(99.228, 162.463, 36.784, 0.724)
pt3dadd(99.3, 162.559, 36.784, 0.708)
pt3dadd(99.373, 162.655, 36.784, 0.692)
pt3dadd(99.445, 162.751, 36.784, 0.678)
pt3dadd(99.51, 162.851, 36.784, 0.662)
pt3dadd(99.571, 162.955, 36.784, 0.644)
pt3dadd(99.631, 163.058, 36.784, 0.628)
pt3dadd(99.691, 163.163, 36.784, 0.612)
pt3dadd(99.751, 163.266, 36.784, 0.594)
pt3dadd(99.812, 163.37, 36.784, 0.578)
pt3dadd(99.872, 163.474, 36.784, 0.562)
pt3dadd(99.932, 163.578, 36.784, 0.544)
pt3dadd(99.993, 163.681, 36.784, 0.528)
pt3dadd(100.053, 163.786, 36.784, 0.512)
pt3dadd(100.117, 163.886, 36.784, 0.494)
pt3dadd(100.184, 163.986, 36.784, 0.48)
pt3dadd(100.251, 164.086, 36.784, 0.464)
pt3dadd(100.318, 164.185, 36.784, 0.448)
pt3dadd(100.385, 164.285, 36.784, 0.432)
pt3dadd(100.451, 164.384, 36.784, 0.416)
pt3dadd(100.518, 164.484, 36.784, 0.4)
pt3dadd(100.585, 164.584, 36.784, 0.384)
pt3dadd(100.652, 164.683, 36.784, 0.368)
pt3dadd(100.719, 164.783, 36.784, 0.352)
pt3dadd(100.788, 164.881, 36.784, 0.34)
pt3dadd(100.859, 164.977, 36.784, 0.332)
pt3dadd(100.93, 165.074, 36.783, 0.324)
pt3dadd(101.001, 165.172, 36.783, 0.316)
pt3dadd(101.073, 165.268, 36.783, 0.306)
pt3dadd(101.144, 165.365, 36.783, 0.298)
pt3dadd(101.215, 165.461, 36.783, 0.29)
pt3dadd(101.286, 165.558, 36.783, 0.282)
pt3dadd(101.357, 165.654, 36.783, 0.274)
pt3dadd(101.428, 165.751, 36.783, 0.266)
pt3dadd(101.502, 165.846, 36.783, 0.272)
pt3dadd(101.577, 165.94, 36.783, 0.286)
pt3dadd(101.651, 166.033, 36.783, 0.302)
pt3dadd(101.726, 166.127, 36.782, 0.316)
pt3dadd(101.801, 166.22, 36.782, 0.332)
pt3dadd(101.876, 166.314, 36.782, 0.346)
pt3dadd(101.951, 166.408, 36.782, 0.362)
pt3dadd(102.026, 166.502, 36.782, 0.376)
pt3dadd(102.101, 166.596, 36.782, 0.392)
pt3dadd(102.176, 166.69, 36.782, 0.406)
pt3dadd(102.252, 166.782, 36.782, 0.414)
pt3dadd(102.329, 166.874, 36.781, 0.418)
pt3dadd(102.406, 166.967, 36.781, 0.422)
pt3dadd(102.483, 167.058, 36.781, 0.426)
pt3dadd(102.56, 167.15, 36.781, 0.43)
pt3dadd(102.636, 167.243, 36.78, 0.434)
pt3dadd(102.713, 167.335, 36.78, 0.438)
pt3dadd(102.79, 167.428, 36.78, 0.442)
pt3dadd(102.867, 167.52, 36.78, 0.446)
pt3dadd(102.944, 167.611, 36.78, 0.45)
pt3dadd(103.018, 167.706, 36.779, 0.45)
pt3dadd(103.092, 167.801, 36.779, 0.446)
pt3dadd(103.165, 167.896, 36.778, 0.444)
pt3dadd(103.238, 167.992, 36.778, 0.44)
pt3dadd(103.311, 168.086, 36.778, 0.436)
pt3dadd(103.384, 168.181, 36.778, 0.432)
pt3dadd(103.457, 168.276, 36.777, 0.43)
pt3dadd(103.53, 168.372, 36.777, 0.426)
pt3dadd(103.603, 168.467, 36.777, 0.422)
pt3dadd(103.676, 168.562, 36.776, 0.42)
pt3dadd(103.737, 168.665, 36.776, 0.406)
pt3dadd(103.792, 168.772, 36.775, 0.39)
pt3dadd(103.846, 168.878, 36.774, 0.372)
pt3dadd(103.901, 168.985, 36.774, 0.356)
pt3dadd(103.955, 169.092, 36.773, 0.338)
pt3dadd(104.009, 169.2, 36.772, 0.32)
pt3dadd(104.064, 169.307, 36.772, 0.304)
pt3dadd(104.118, 169.414, 36.771, 0.286)
pt3dadd(104.173, 169.52, 36.771, 0.27)
pt3dadd(104.227, 169.627, 36.77, 0.252)
pt3dadd(104.285, 169.733, 36.769, 0.244)
pt3dadd(104.345, 169.836, 36.767, 0.242)
pt3dadd(104.406, 169.94, 36.766, 0.24)
pt3dadd(104.466, 170.044, 36.765, 0.238)
pt3dadd(104.526, 170.148, 36.764, 0.236)
pt3dadd(104.586, 170.251, 36.762, 0.234)
pt3dadd(104.646, 170.356, 36.761, 0.232)
pt3dadd(104.707, 170.459, 36.76, 0.23)
pt3dadd(104.767, 170.562, 36.758, 0.228)
pt3dadd(104.827, 170.666, 36.757, 0.226)
pt3dadd(104.882, 170.773, 36.755, 0.226)
pt3dadd(104.934, 170.881, 36.753, 0.226)
pt3dadd(104.986, 170.989, 36.751, 0.226)
pt3dadd(105.038, 171.097, 36.748, 0.226)
pt3dadd(105.09, 171.205, 36.746, 0.226)
pt3dadd(105.142, 171.313, 36.744, 0.226)
pt3dadd(105.194, 171.422, 36.742, 0.226)
pt3dadd(105.245, 171.53, 36.739, 0.226)
pt3dadd(105.297, 171.638, 36.737, 0.226)
pt3dadd(105.349, 171.746, 36.735, 0.226)
pt3dadd(105.398, 171.856, 36.731, 0.228)
pt3dadd(105.445, 171.966, 36.727, 0.234)
pt3dadd(105.492, 172.076, 36.723, 0.238)
pt3dadd(105.54, 172.187, 36.719, 0.242)
pt3dadd(105.587, 172.297, 36.715, 0.246)
pt3dadd(105.634, 172.406, 36.711, 0.25)
pt3dadd(105.681, 172.517, 36.707, 0.256)
pt3dadd(105.729, 172.627, 36.702, 0.26)
pt3dadd(105.776, 172.738, 36.698, 0.264)
pt3dadd(105.823, 172.848, 36.694, 0.268)
pt3dadd(105.878, 172.954, 36.688, 0.282)
pt3dadd(105.936, 173.059, 36.681, 0.298)
pt3dadd(105.994, 173.164, 36.674, 0.316)
pt3dadd(106.053, 173.268, 36.667, 0.332)
pt3dadd(106.111, 173.372, 36.66, 0.348)
pt3dadd(106.169, 173.477, 36.654, 0.366)
pt3dadd(106.227, 173.581, 36.647, 0.382)
pt3dadd(106.286, 173.686, 36.64, 0.4)
pt3dadd(106.344, 173.791, 36.633, 0.416)
pt3dadd(106.402, 173.896, 36.626, 0.434)
pt3dadd(106.448, 174.005, 36.615, 0.428)
}
}
proc shape3d_109() {
dend_7[14] { pt3dadd(106.489, 174.116, 36.603, 0.412)
pt3dadd(106.53, 174.229, 36.59, 0.396)
pt3dadd(106.57, 174.341, 36.578, 0.382)
pt3dadd(106.611, 174.452, 36.565, 0.366)
pt3dadd(106.652, 174.564, 36.553, 0.352)
pt3dadd(106.692, 174.677, 36.541, 0.336)
pt3dadd(106.733, 174.788, 36.528, 0.32)
pt3dadd(106.774, 174.9, 36.516, 0.306)
pt3dadd(106.815, 175.012, 36.503, 0.29)
pt3dadd(106.851, 175.122, 36.478, 0.282)
pt3dadd(106.886, 175.23, 36.447, 0.276)
pt3dadd(106.921, 175.339, 36.416, 0.27)
pt3dadd(106.956, 175.448, 36.386, 0.264)
pt3dadd(106.991, 175.556, 36.355, 0.258)
pt3dadd(107.025, 175.666, 36.324, 0.252)
pt3dadd(107.06, 175.775, 36.294, 0.246)
pt3dadd(107.095, 175.883, 36.263, 0.24)
pt3dadd(107.13, 175.992, 36.232, 0.234)
pt3dadd(107.165, 176.1, 36.201, 0.228)
pt3dadd(107.204, 176.206, 36.166, 0.23)
pt3dadd(107.243, 176.31, 36.13, 0.236)
pt3dadd(107.283, 176.416, 36.094, 0.242)
pt3dadd(107.323, 176.52, 36.058, 0.248)
pt3dadd(107.363, 176.624, 36.022, 0.254)
pt3dadd(107.403, 176.729, 35.986, 0.258)
pt3dadd(107.442, 176.833, 35.949, 0.264)
pt3dadd(107.482, 176.938, 35.913, 0.27)
pt3dadd(107.522, 177.042, 35.877, 0.276)
pt3dadd(107.562, 177.146, 35.841, 0.282)
pt3dadd(107.613, 177.248, 35.81, 0.296)
pt3dadd(107.667, 177.349, 35.78, 0.312)
pt3dadd(107.721, 177.45, 35.75, 0.33)
pt3dadd(107.775, 177.552, 35.72, 0.346)
pt3dadd(107.828, 177.653, 35.69, 0.362)
pt3dadd(107.882, 177.754, 35.66, 0.378)
pt3dadd(107.936, 177.854, 35.63, 0.394)
pt3dadd(107.99, 177.956, 35.6, 0.41)
pt3dadd(108.043, 178.057, 35.57, 0.426)
pt3dadd(108.097, 178.158, 35.54, 0.444)
pt3dadd(108.163, 178.254, 35.516, 0.432)
pt3dadd(108.23, 178.35, 35.493, 0.418)
pt3dadd(108.298, 178.445, 35.47, 0.402)
pt3dadd(108.365, 178.54, 35.447, 0.386)
pt3dadd(108.433, 178.636, 35.424, 0.37)
pt3dadd(108.501, 178.73, 35.402, 0.356)
pt3dadd(108.568, 178.826, 35.379, 0.34)
pt3dadd(108.636, 178.921, 35.356, 0.324)
pt3dadd(108.703, 179.017, 35.333, 0.31)
pt3dadd(108.771, 179.112, 35.311, 0.294)
pt3dadd(108.825, 179.209, 35.274, 0.286)
pt3dadd(108.876, 179.308, 35.235, 0.28)
pt3dadd(108.927, 179.405, 35.196, 0.272)
pt3dadd(108.978, 179.503, 35.157, 0.266)
pt3dadd(109.029, 179.602, 35.118, 0.26)
pt3dadd(109.08, 179.699, 35.079, 0.252)
pt3dadd(109.132, 179.797, 35.04, 0.246)
pt3dadd(109.183, 179.896, 35.001, 0.24)
pt3dadd(109.234, 179.993, 34.962, 0.232)
pt3dadd(109.285, 180.091, 34.923, 0.226)
pt3dadd(109.324, 180.188, 34.874, 0.226)
pt3dadd(109.363, 180.286, 34.826, 0.226)
pt3dadd(109.402, 180.383, 34.777, 0.226)
pt3dadd(109.441, 180.48, 34.728, 0.226)
pt3dadd(109.48, 180.577, 34.68, 0.226)
pt3dadd(109.518, 180.676, 34.631, 0.226)
pt3dadd(109.557, 180.773, 34.582, 0.226)
pt3dadd(109.596, 180.87, 34.534, 0.226)
pt3dadd(109.635, 180.967, 34.485, 0.226)
pt3dadd(109.674, 181.064, 34.436, 0.226)
}
dend_7[15] {pt3dclear()
pt3dadd(41.622, 118.095, 25.266, 0.678)
pt3dadd(41.708, 118.075, 25.256, 0.688)
pt3dadd(41.824, 118.047, 25.241, 0.704)
pt3dadd(41.939, 118.019, 25.227, 0.718)
pt3dadd(42.055, 117.991, 25.213, 0.732)
pt3dadd(42.17, 117.964, 25.199, 0.746)
pt3dadd(42.286, 117.936, 25.185, 0.76)
pt3dadd(42.401, 117.908, 25.171, 0.774)
pt3dadd(42.517, 117.88, 25.157, 0.788)
pt3dadd(42.632, 117.853, 25.142, 0.802)
pt3dadd(42.748, 117.825, 25.128, 0.818)
pt3dadd(42.866, 117.806, 25.118, 0.816)
pt3dadd(42.984, 117.789, 25.11, 0.81)
pt3dadd(43.103, 117.773, 25.102, 0.804)
pt3dadd(43.221, 117.756, 25.094, 0.798)
pt3dadd(43.34, 117.74, 25.085, 0.792)
pt3dadd(43.458, 117.724, 25.077, 0.784)
pt3dadd(43.576, 117.707, 25.069, 0.778)
pt3dadd(43.695, 117.691, 25.061, 0.772)
pt3dadd(43.813, 117.675, 25.052, 0.766)
pt3dadd(43.932, 117.658, 25.044, 0.76)
pt3dadd(44.052, 117.655, 25.043, 0.734)
pt3dadd(44.172, 117.655, 25.043, 0.702)
pt3dadd(44.292, 117.655, 25.043, 0.672)
pt3dadd(44.412, 117.654, 25.043, 0.642)
pt3dadd(44.532, 117.654, 25.043, 0.61)
pt3dadd(44.652, 117.654, 25.043, 0.58)
pt3dadd(44.772, 117.653, 25.043, 0.55)
pt3dadd(44.892, 117.653, 25.043, 0.518)
pt3dadd(45.012, 117.653, 25.043, 0.488)
pt3dadd(45.132, 117.652, 25.043, 0.458)
pt3dadd(45.252, 117.652, 25.043, 0.45)
pt3dadd(45.372, 117.652, 25.043, 0.45)
pt3dadd(45.492, 117.651, 25.043, 0.448)
pt3dadd(45.612, 117.651, 25.043, 0.446)
pt3dadd(45.732, 117.65, 25.043, 0.446)
pt3dadd(45.852, 117.65, 25.043, 0.444)
pt3dadd(45.972, 117.649, 25.043, 0.442)
pt3dadd(46.092, 117.649, 25.043, 0.442)
pt3dadd(46.212, 117.648, 25.043, 0.44)
pt3dadd(46.332, 117.648, 25.043, 0.438)
pt3dadd(46.452, 117.647, 25.043, 0.422)
pt3dadd(46.572, 117.646, 25.043, 0.402)
pt3dadd(46.692, 117.646, 25.043, 0.384)
pt3dadd(46.812, 117.645, 25.043, 0.364)
pt3dadd(46.932, 117.644, 25.043, 0.346)
pt3dadd(47.052, 117.643, 25.043, 0.326)
pt3dadd(47.172, 117.642, 25.043, 0.306)
pt3dadd(47.292, 117.642, 25.043, 0.288)
pt3dadd(47.412, 117.641, 25.043, 0.268)
pt3dadd(47.532, 117.64, 25.043, 0.25)
pt3dadd(47.652, 117.639, 25.043, 0.258)
pt3dadd(47.772, 117.637, 25.043, 0.274)
pt3dadd(47.892, 117.635, 25.043, 0.288)
pt3dadd(48.012, 117.633, 25.043, 0.304)
pt3dadd(48.132, 117.632, 25.043, 0.32)
pt3dadd(48.251, 117.63, 25.043, 0.334)
pt3dadd(48.371, 117.628, 25.043, 0.35)
pt3dadd(48.491, 117.627, 25.043, 0.366)
pt3dadd(48.611, 117.625, 25.043, 0.38)
pt3dadd(48.731, 117.623, 25.043, 0.396)
pt3dadd(48.851, 117.62, 25.043, 0.426)
pt3dadd(48.971, 117.617, 25.043, 0.46)
pt3dadd(49.091, 117.614, 25.043, 0.492)
pt3dadd(49.211, 117.611, 25.043, 0.526)
pt3dadd(49.331, 117.608, 25.043, 0.558)
pt3dadd(49.451, 117.605, 25.043, 0.592)
pt3dadd(49.571, 117.602, 25.043, 0.624)
pt3dadd(49.691, 117.599, 25.044, 0.658)
pt3dadd(49.811, 117.595, 25.044, 0.692)
pt3dadd(49.931, 117.592, 25.044, 0.724)
pt3dadd(50.051, 117.586, 25.044, 0.744)
pt3dadd(50.171, 117.58, 25.044, 0.762)
pt3dadd(50.291, 117.573, 25.044, 0.78)
pt3dadd(50.41, 117.567, 25.044, 0.796)
pt3dadd(50.53, 117.56, 25.044, 0.814)
pt3dadd(50.65, 117.554, 25.044, 0.832)
pt3dadd(50.77, 117.547, 25.044, 0.848)
pt3dadd(50.89, 117.541, 25.045, 0.866)
pt3dadd(51.009, 117.534, 25.045, 0.884)
pt3dadd(51.129, 117.528, 25.045, 0.902)
pt3dadd(51.249, 117.518, 25.045, 0.898)
pt3dadd(51.368, 117.507, 25.045, 0.892)
pt3dadd(51.488, 117.495, 25.045, 0.884)
pt3dadd(51.607, 117.484, 25.045, 0.876)
pt3dadd(51.727, 117.473, 25.046, 0.87)
pt3dadd(51.846, 117.462, 25.046, 0.862)
pt3dadd(51.966, 117.451, 25.046, 0.856)
pt3dadd(52.085, 117.44, 25.046, 0.848)
pt3dadd(52.205, 117.429, 25.046, 0.842)
pt3dadd(52.324, 117.418, 25.047, 0.834)
pt3dadd(52.443, 117.399, 25.047, 0.82)
pt3dadd(52.561, 117.378, 25.047, 0.804)
pt3dadd(52.679, 117.357, 25.048, 0.788)
pt3dadd(52.797, 117.336, 25.048, 0.774)
pt3dadd(52.915, 117.315, 25.048, 0.758)
pt3dadd(53.034, 117.294, 25.049, 0.742)
pt3dadd(53.152, 117.274, 25.049, 0.726)
pt3dadd(53.27, 117.253, 25.049, 0.71)
pt3dadd(53.388, 117.232, 25.05, 0.696)
pt3dadd(53.506, 117.211, 25.05, 0.68)
pt3dadd(53.618, 117.168, 25.051, 0.678)
pt3dadd(53.728, 117.122, 25.051, 0.678)
pt3dadd(53.839, 117.075, 25.052, 0.678)
pt3dadd(53.95, 117.029, 25.053, 0.678)
pt3dadd(54.061, 116.983, 25.053, 0.678)
pt3dadd(54.171, 116.936, 25.054, 0.678)
pt3dadd(54.282, 116.89, 25.055, 0.678)
pt3dadd(54.393, 116.844, 25.055, 0.678)
pt3dadd(54.503, 116.797, 25.056, 0.678)
pt3dadd(54.614, 116.751, 25.056, 0.678)
pt3dadd(54.729, 116.716, 25.058, 0.678)
pt3dadd(54.844, 116.682, 25.059, 0.678)
pt3dadd(54.959, 116.648, 25.06, 0.678)
pt3dadd(55.074, 116.614, 25.062, 0.678)
pt3dadd(55.189, 116.581, 25.063, 0.678)
pt3dadd(55.304, 116.547, 25.064, 0.678)
pt3dadd(55.419, 116.513, 25.066, 0.678)
pt3dadd(55.535, 116.479, 25.067, 0.678)
pt3dadd(55.65, 116.446, 25.068, 0.678)
pt3dadd(55.765, 116.412, 25.07, 0.678)
pt3dadd(55.882, 116.385, 25.072, 0.678)
pt3dadd(55.999, 116.359, 25.074, 0.678)
pt3dadd(56.116, 116.333, 25.077, 0.678)
pt3dadd(56.233, 116.307, 25.079, 0.678)
pt3dadd(56.35, 116.281, 25.082, 0.678)
pt3dadd(56.467, 116.255, 25.084, 0.678)
pt3dadd(56.584, 116.228, 25.086, 0.678)
pt3dadd(56.701, 116.202, 25.089, 0.678)
pt3dadd(56.819, 116.176, 25.091, 0.678)
pt3dadd(56.936, 116.15, 25.094, 0.678)
}
}
proc shape3d_110() {
dend_7[15] { pt3dadd(57.054, 116.129, 25.098, 0.704)
pt3dadd(57.172, 116.109, 25.103, 0.732)
pt3dadd(57.29, 116.088, 25.108, 0.76)
pt3dadd(57.408, 116.068, 25.113, 0.788)
pt3dadd(57.526, 116.048, 25.118, 0.816)
pt3dadd(57.644, 116.027, 25.123, 0.846)
pt3dadd(57.762, 116.007, 25.128, 0.874)
pt3dadd(57.88, 115.986, 25.133, 0.902)
pt3dadd(57.999, 115.966, 25.138, 0.93)
pt3dadd(58.117, 115.946, 25.143, 0.958)
pt3dadd(58.233, 115.918, 25.151, 0.984)
pt3dadd(58.349, 115.89, 25.16, 1.006)
pt3dadd(58.465, 115.862, 25.168, 1.03)
pt3dadd(58.582, 115.833, 25.176, 1.054)
pt3dadd(58.698, 115.805, 25.185, 1.078)
pt3dadd(58.814, 115.777, 25.193, 1.102)
pt3dadd(58.93, 115.749, 25.201, 1.126)
pt3dadd(59.046, 115.72, 25.21, 1.148)
pt3dadd(59.163, 115.692, 25.218, 1.172)
pt3dadd(59.279, 115.664, 25.226, 1.196)
pt3dadd(59.386, 115.612, 25.237, 1.144)
pt3dadd(59.494, 115.561, 25.248, 1.092)
pt3dadd(59.602, 115.509, 25.259, 1.04)
pt3dadd(59.709, 115.458, 25.269, 0.988)
pt3dadd(59.817, 115.407, 25.28, 0.936)
pt3dadd(59.925, 115.355, 25.291, 0.886)
pt3dadd(60.032, 115.304, 25.302, 0.834)
pt3dadd(60.14, 115.252, 25.312, 0.782)
pt3dadd(60.248, 115.201, 25.323, 0.73)
pt3dadd(60.355, 115.149, 25.334, 0.678)
}
dend_7[16] {pt3dclear()
pt3dadd(60.355, 115.149, 25.334, 0.678)
pt3dadd(60.367, 115.145, 25.338, 0.678)
pt3dadd(60.472, 115.105, 25.374, 0.678)
pt3dadd(60.577, 115.065, 25.41, 0.678)
pt3dadd(60.682, 115.026, 25.445, 0.678)
pt3dadd(60.787, 114.986, 25.481, 0.678)
pt3dadd(60.892, 114.945, 25.516, 0.678)
pt3dadd(60.996, 114.904, 25.55, 0.678)
pt3dadd(61.101, 114.863, 25.585, 0.678)
pt3dadd(61.206, 114.822, 25.62, 0.678)
pt3dadd(61.311, 114.78, 25.654, 0.678)
pt3dadd(61.415, 114.739, 25.689, 0.678)
pt3dadd(61.52, 114.698, 25.723, 0.678)
pt3dadd(61.625, 114.657, 25.758, 0.678)
pt3dadd(61.73, 114.616, 25.793, 0.678)
pt3dadd(61.835, 114.575, 25.827, 0.678)
pt3dadd(61.938, 114.521, 25.852, 0.678)
pt3dadd(62.04, 114.465, 25.875, 0.678)
pt3dadd(62.143, 114.41, 25.897, 0.678)
pt3dadd(62.246, 114.354, 25.92, 0.678)
pt3dadd(62.348, 114.298, 25.943, 0.678)
pt3dadd(62.451, 114.242, 25.965, 0.678)
pt3dadd(62.554, 114.186, 25.988, 0.678)
pt3dadd(62.656, 114.13, 26.011, 0.678)
pt3dadd(62.759, 114.075, 26.033, 0.678)
pt3dadd(62.862, 114.019, 26.056, 0.678)
pt3dadd(62.971, 113.974, 26.074, 0.678)
pt3dadd(63.082, 113.932, 26.09, 0.678)
pt3dadd(63.192, 113.89, 26.106, 0.678)
pt3dadd(63.303, 113.848, 26.123, 0.678)
pt3dadd(63.414, 113.806, 26.139, 0.678)
pt3dadd(63.524, 113.764, 26.155, 0.678)
pt3dadd(63.635, 113.722, 26.172, 0.678)
pt3dadd(63.746, 113.68, 26.188, 0.678)
pt3dadd(63.856, 113.638, 26.205, 0.678)
pt3dadd(63.967, 113.596, 26.221, 0.678)
pt3dadd(64.081, 113.563, 26.233, 0.678)
pt3dadd(64.196, 113.531, 26.244, 0.678)
pt3dadd(64.311, 113.498, 26.255, 0.678)
pt3dadd(64.426, 113.466, 26.266, 0.678)
pt3dadd(64.541, 113.434, 26.278, 0.678)
pt3dadd(64.655, 113.402, 26.289, 0.678)
pt3dadd(64.77, 113.369, 26.3, 0.678)
pt3dadd(64.885, 113.337, 26.311, 0.678)
pt3dadd(65, 113.305, 26.322, 0.678)
pt3dadd(65.115, 113.273, 26.334, 0.678)
pt3dadd(65.229, 113.24, 26.344, 0.688)
pt3dadd(65.344, 113.206, 26.354, 0.698)
pt3dadd(65.459, 113.173, 26.363, 0.708)
pt3dadd(65.573, 113.14, 26.373, 0.718)
pt3dadd(65.688, 113.107, 26.383, 0.728)
pt3dadd(65.803, 113.073, 26.393, 0.74)
pt3dadd(65.917, 113.04, 26.403, 0.75)
pt3dadd(66.032, 113.007, 26.413, 0.76)
pt3dadd(66.147, 112.974, 26.423, 0.77)
pt3dadd(66.262, 112.941, 26.433, 0.782)
pt3dadd(66.371, 112.895, 26.447, 0.812)
pt3dadd(66.481, 112.849, 26.461, 0.846)
pt3dadd(66.59, 112.803, 26.476, 0.878)
pt3dadd(66.699, 112.757, 26.491, 0.912)
pt3dadd(66.809, 112.71, 26.506, 0.944)
pt3dadd(66.918, 112.664, 26.52, 0.976)
pt3dadd(67.027, 112.618, 26.535, 1.01)
pt3dadd(67.137, 112.572, 26.55, 1.042)
pt3dadd(67.246, 112.525, 26.565, 1.076)
pt3dadd(67.355, 112.479, 26.58, 1.108)
pt3dadd(67.459, 112.448, 26.621, 1.06)
pt3dadd(67.563, 112.417, 26.665, 1.006)
pt3dadd(67.666, 112.386, 26.709, 0.954)
pt3dadd(67.77, 112.356, 26.752, 0.9)
pt3dadd(67.873, 112.325, 26.796, 0.846)
pt3dadd(67.977, 112.294, 26.84, 0.792)
pt3dadd(68.08, 112.263, 26.883, 0.74)
pt3dadd(68.184, 112.233, 26.927, 0.686)
pt3dadd(68.287, 112.202, 26.97, 0.632)
pt3dadd(68.391, 112.171, 27.014, 0.578)
pt3dadd(68.498, 112.146, 27.053, 0.592)
pt3dadd(68.606, 112.122, 27.092, 0.61)
pt3dadd(68.714, 112.097, 27.131, 0.628)
pt3dadd(68.822, 112.073, 27.17, 0.646)
pt3dadd(68.929, 112.048, 27.209, 0.664)
pt3dadd(69.037, 112.024, 27.248, 0.684)
pt3dadd(69.145, 111.999, 27.287, 0.702)
pt3dadd(69.253, 111.975, 27.326, 0.72)
pt3dadd(69.361, 111.951, 27.364, 0.738)
pt3dadd(69.468, 111.926, 27.403, 0.756)
pt3dadd(69.567, 111.906, 27.457, 0.728)
pt3dadd(69.666, 111.886, 27.512, 0.696)
pt3dadd(69.764, 111.866, 27.567, 0.666)
pt3dadd(69.862, 111.846, 27.622, 0.634)
pt3dadd(69.961, 111.826, 27.677, 0.602)
pt3dadd(70.059, 111.806, 27.732, 0.572)
pt3dadd(70.157, 111.786, 27.787, 0.54)
pt3dadd(70.256, 111.766, 27.841, 0.51)
pt3dadd(70.354, 111.747, 27.896, 0.478)
pt3dadd(70.452, 111.725, 27.95, 0.448)
pt3dadd(70.553, 111.681, 27.99, 0.442)
pt3dadd(70.653, 111.636, 28.03, 0.434)
pt3dadd(70.754, 111.591, 28.07, 0.426)
pt3dadd(70.854, 111.547, 28.11, 0.418)
pt3dadd(70.955, 111.502, 28.15, 0.41)
pt3dadd(71.056, 111.458, 28.19, 0.404)
pt3dadd(71.156, 111.413, 28.23, 0.396)
pt3dadd(71.257, 111.369, 28.27, 0.388)
pt3dadd(71.357, 111.324, 28.31, 0.38)
pt3dadd(71.461, 111.28, 28.343, 0.378)
pt3dadd(71.572, 111.239, 28.361, 0.386)
pt3dadd(71.682, 111.198, 28.379, 0.394)
pt3dadd(71.793, 111.156, 28.396, 0.402)
pt3dadd(71.903, 111.115, 28.414, 0.408)
pt3dadd(72.014, 111.073, 28.432, 0.416)
pt3dadd(72.125, 111.032, 28.45, 0.424)
pt3dadd(72.235, 110.991, 28.467, 0.432)
pt3dadd(72.346, 110.949, 28.485, 0.44)
pt3dadd(72.456, 110.908, 28.503, 0.448)
pt3dadd(72.57, 110.873, 28.516, 0.448)
pt3dadd(72.687, 110.849, 28.522, 0.438)
pt3dadd(72.804, 110.824, 28.527, 0.426)
pt3dadd(72.921, 110.8, 28.533, 0.416)
pt3dadd(73.039, 110.776, 28.538, 0.406)
pt3dadd(73.156, 110.751, 28.544, 0.396)
pt3dadd(73.273, 110.727, 28.549, 0.384)
pt3dadd(73.391, 110.703, 28.555, 0.374)
pt3dadd(73.508, 110.679, 28.561, 0.364)
pt3dadd(73.625, 110.654, 28.566, 0.354)
pt3dadd(73.744, 110.635, 28.57, 0.348)
pt3dadd(73.863, 110.621, 28.57, 0.35)
pt3dadd(73.982, 110.607, 28.57, 0.352)
pt3dadd(74.101, 110.594, 28.571, 0.354)
pt3dadd(74.22, 110.58, 28.571, 0.356)
pt3dadd(74.34, 110.567, 28.571, 0.358)
pt3dadd(74.459, 110.553, 28.572, 0.36)
pt3dadd(74.578, 110.54, 28.572, 0.362)
pt3dadd(74.697, 110.526, 28.573, 0.364)
pt3dadd(74.817, 110.512, 28.573, 0.364)
pt3dadd(74.936, 110.501, 28.573, 0.38)
pt3dadd(75.056, 110.491, 28.574, 0.412)
pt3dadd(75.175, 110.482, 28.575, 0.442)
pt3dadd(75.295, 110.473, 28.576, 0.474)
pt3dadd(75.415, 110.463, 28.576, 0.504)
pt3dadd(75.534, 110.454, 28.577, 0.536)
pt3dadd(75.654, 110.445, 28.578, 0.566)
pt3dadd(75.774, 110.435, 28.578, 0.598)
pt3dadd(75.893, 110.426, 28.579, 0.63)
pt3dadd(76.013, 110.416, 28.58, 0.66)
pt3dadd(76.132, 110.405, 28.581, 0.678)
pt3dadd(76.251, 110.391, 28.582, 0.678)
pt3dadd(76.371, 110.377, 28.583, 0.678)
pt3dadd(76.49, 110.363, 28.585, 0.678)
pt3dadd(76.609, 110.349, 28.586, 0.68)
pt3dadd(76.728, 110.335, 28.587, 0.68)
pt3dadd(76.847, 110.321, 28.589, 0.68)
pt3dadd(76.966, 110.307, 28.59, 0.68)
pt3dadd(77.086, 110.293, 28.591, 0.68)
pt3dadd(77.205, 110.279, 28.592, 0.68)
pt3dadd(77.32, 110.252, 28.594, 0.696)
pt3dadd(77.432, 110.207, 28.597, 0.732)
pt3dadd(77.543, 110.163, 28.599, 0.768)
pt3dadd(77.655, 110.118, 28.601, 0.804)
pt3dadd(77.766, 110.074, 28.604, 0.84)
pt3dadd(77.878, 110.029, 28.606, 0.876)
pt3dadd(77.989, 109.985, 28.608, 0.912)
pt3dadd(78.1, 109.941, 28.611, 0.948)
pt3dadd(78.212, 109.896, 28.613, 0.984)
pt3dadd(78.323, 109.852, 28.616, 1.02)
pt3dadd(78.437, 109.813, 28.619, 1.032)
pt3dadd(78.552, 109.78, 28.625, 1.012)
pt3dadd(78.667, 109.748, 28.63, 0.992)
pt3dadd(78.783, 109.716, 28.635, 0.974)
pt3dadd(78.898, 109.683, 28.641, 0.954)
}
}
proc shape3d_111() {
dend_7[16] { pt3dadd(79.014, 109.651, 28.646, 0.936)
pt3dadd(79.129, 109.619, 28.651, 0.916)
pt3dadd(79.244, 109.587, 28.656, 0.898)
pt3dadd(79.36, 109.554, 28.662, 0.878)
pt3dadd(79.475, 109.522, 28.667, 0.86)
pt3dadd(79.592, 109.496, 28.674, 0.84)
pt3dadd(79.71, 109.477, 28.682, 0.824)
pt3dadd(79.828, 109.458, 28.691, 0.806)
pt3dadd(79.946, 109.438, 28.699, 0.79)
pt3dadd(80.064, 109.419, 28.708, 0.772)
pt3dadd(80.182, 109.4, 28.716, 0.756)
pt3dadd(80.3, 109.381, 28.725, 0.738)
pt3dadd(80.418, 109.362, 28.733, 0.72)
pt3dadd(80.536, 109.343, 28.742, 0.704)
pt3dadd(80.654, 109.323, 28.75, 0.686)
pt3dadd(80.772, 109.311, 28.764, 0.678)
pt3dadd(80.889, 109.305, 28.785, 0.678)
pt3dadd(81.006, 109.299, 28.805, 0.678)
pt3dadd(81.124, 109.293, 28.825, 0.678)
pt3dadd(81.241, 109.287, 28.845, 0.678)
pt3dadd(81.359, 109.281, 28.865, 0.678)
pt3dadd(81.476, 109.275, 28.885, 0.678)
pt3dadd(81.593, 109.269, 28.905, 0.678)
pt3dadd(81.711, 109.263, 28.925, 0.678)
pt3dadd(81.828, 109.257, 28.945, 0.678)
pt3dadd(81.943, 109.257, 28.973, 0.674)
pt3dadd(82.056, 109.262, 29.007, 0.668)
pt3dadd(82.169, 109.266, 29.04, 0.662)
pt3dadd(82.282, 109.27, 29.073, 0.656)
pt3dadd(82.395, 109.275, 29.106, 0.65)
pt3dadd(82.508, 109.279, 29.14, 0.642)
pt3dadd(82.622, 109.284, 29.173, 0.636)
pt3dadd(82.735, 109.288, 29.206, 0.63)
pt3dadd(82.848, 109.293, 29.239, 0.624)
pt3dadd(82.961, 109.297, 29.273, 0.618)
pt3dadd(83.077, 109.305, 29.296, 0.592)
pt3dadd(83.194, 109.315, 29.314, 0.552)
pt3dadd(83.312, 109.324, 29.333, 0.514)
pt3dadd(83.43, 109.334, 29.35, 0.474)
pt3dadd(83.547, 109.344, 29.368, 0.436)
pt3dadd(83.665, 109.354, 29.386, 0.396)
pt3dadd(83.783, 109.363, 29.404, 0.358)
pt3dadd(83.9, 109.373, 29.422, 0.318)
pt3dadd(84.018, 109.383, 29.44, 0.28)
pt3dadd(84.135, 109.393, 29.458, 0.24)
pt3dadd(84.254, 109.407, 29.465, 0.226)
pt3dadd(84.373, 109.424, 29.465, 0.226)
pt3dadd(84.491, 109.441, 29.464, 0.226)
pt3dadd(84.61, 109.458, 29.464, 0.226)
pt3dadd(84.729, 109.475, 29.464, 0.226)
pt3dadd(84.848, 109.492, 29.464, 0.226)
pt3dadd(84.967, 109.509, 29.463, 0.226)
pt3dadd(85.085, 109.525, 29.463, 0.226)
pt3dadd(85.204, 109.542, 29.463, 0.226)
pt3dadd(85.323, 109.559, 29.463, 0.226)
pt3dadd(85.42, 109.513, 29.471, 0.252)
pt3dadd(85.504, 109.429, 29.484, 0.296)
pt3dadd(85.588, 109.344, 29.497, 0.338)
pt3dadd(85.671, 109.26, 29.51, 0.382)
pt3dadd(85.755, 109.176, 29.523, 0.426)
pt3dadd(85.839, 109.091, 29.537, 0.468)
pt3dadd(85.923, 109.007, 29.55, 0.512)
pt3dadd(86.007, 108.922, 29.563, 0.554)
pt3dadd(86.091, 108.838, 29.576, 0.598)
pt3dadd(86.174, 108.754, 29.589, 0.64)
pt3dadd(86.258, 108.669, 29.603, 0.684)
pt3dadd(86.342, 108.585, 29.616, 0.726)
pt3dadd(86.426, 108.501, 29.629, 0.77)
pt3dadd(86.51, 108.416, 29.642, 0.812)
pt3dadd(86.594, 108.332, 29.655, 0.856)
pt3dadd(86.69, 108.262, 29.665, 0.866)
pt3dadd(86.789, 108.195, 29.673, 0.866)
pt3dadd(86.889, 108.129, 29.682, 0.868)
pt3dadd(86.988, 108.063, 29.69, 0.868)
pt3dadd(87.088, 107.997, 29.698, 0.868)
pt3dadd(87.188, 107.931, 29.707, 0.87)
pt3dadd(87.287, 107.864, 29.715, 0.872)
pt3dadd(87.387, 107.798, 29.724, 0.872)
pt3dadd(87.486, 107.732, 29.732, 0.872)
pt3dadd(87.588, 107.67, 29.739, 0.866)
pt3dadd(87.704, 107.638, 29.739, 0.8)
pt3dadd(87.819, 107.607, 29.739, 0.736)
pt3dadd(87.935, 107.575, 29.739, 0.672)
pt3dadd(88.051, 107.543, 29.739, 0.608)
pt3dadd(88.167, 107.511, 29.739, 0.544)
pt3dadd(88.282, 107.479, 29.739, 0.48)
pt3dadd(88.398, 107.447, 29.739, 0.416)
pt3dadd(88.514, 107.416, 29.739, 0.352)
pt3dadd(88.629, 107.384, 29.739, 0.286)
pt3dadd(88.744, 107.348, 29.739, 0.234)
pt3dadd(88.85, 107.292, 29.739, 0.254)
pt3dadd(88.956, 107.236, 29.739, 0.274)
pt3dadd(89.061, 107.179, 29.739, 0.292)
pt3dadd(89.167, 107.123, 29.739, 0.312)
pt3dadd(89.273, 107.067, 29.739, 0.33)
pt3dadd(89.379, 107.01, 29.738, 0.35)
pt3dadd(89.485, 106.954, 29.738, 0.368)
pt3dadd(89.591, 106.898, 29.738, 0.388)
pt3dadd(89.697, 106.842, 29.738, 0.408)
pt3dadd(89.804, 106.787, 29.738, 0.43)
pt3dadd(89.916, 106.743, 29.738, 0.48)
pt3dadd(90.028, 106.7, 29.738, 0.528)
pt3dadd(90.14, 106.656, 29.738, 0.578)
pt3dadd(90.251, 106.613, 29.738, 0.626)
pt3dadd(90.363, 106.569, 29.738, 0.676)
pt3dadd(90.475, 106.526, 29.737, 0.724)
pt3dadd(90.587, 106.482, 29.737, 0.774)
pt3dadd(90.699, 106.438, 29.737, 0.822)
pt3dadd(90.81, 106.395, 29.737, 0.872)
pt3dadd(90.922, 106.35, 29.737, 0.914)
pt3dadd(91.031, 106.301, 29.737, 0.926)
pt3dadd(91.14, 106.251, 29.736, 0.938)
pt3dadd(91.249, 106.201, 29.736, 0.95)
pt3dadd(91.359, 106.151, 29.736, 0.96)
pt3dadd(91.468, 106.102, 29.736, 0.972)
pt3dadd(91.577, 106.052, 29.736, 0.984)
pt3dadd(91.686, 106.002, 29.736, 0.996)
pt3dadd(91.795, 105.952, 29.735, 1.006)
pt3dadd(91.905, 105.903, 29.735, 1.018)
pt3dadd(92.014, 105.853, 29.735, 1.024)
pt3dadd(92.124, 105.805, 29.735, 1.006)
pt3dadd(92.233, 105.756, 29.734, 0.99)
pt3dadd(92.343, 105.708, 29.734, 0.972)
pt3dadd(92.453, 105.659, 29.733, 0.954)
pt3dadd(92.563, 105.611, 29.733, 0.936)
pt3dadd(92.673, 105.562, 29.733, 0.918)
pt3dadd(92.782, 105.513, 29.732, 0.902)
pt3dadd(92.892, 105.465, 29.732, 0.884)
pt3dadd(93.002, 105.416, 29.732, 0.866)
pt3dadd(93.113, 105.372, 29.731, 0.848)
pt3dadd(93.229, 105.343, 29.73, 0.828)
pt3dadd(93.346, 105.313, 29.73, 0.808)
pt3dadd(93.462, 105.284, 29.729, 0.788)
pt3dadd(93.578, 105.254, 29.729, 0.768)
pt3dadd(93.695, 105.225, 29.728, 0.748)
pt3dadd(93.811, 105.196, 29.727, 0.728)
pt3dadd(93.927, 105.166, 29.727, 0.708)
pt3dadd(94.044, 105.137, 29.726, 0.69)
pt3dadd(94.16, 105.107, 29.725, 0.67)
pt3dadd(94.277, 105.081, 29.724, 0.646)
pt3dadd(94.396, 105.064, 29.723, 0.608)
pt3dadd(94.515, 105.048, 29.722, 0.57)
pt3dadd(94.633, 105.031, 29.72, 0.53)
pt3dadd(94.752, 105.014, 29.719, 0.492)
pt3dadd(94.871, 104.998, 29.717, 0.454)
pt3dadd(94.99, 104.981, 29.716, 0.416)
pt3dadd(95.109, 104.965, 29.714, 0.378)
pt3dadd(95.228, 104.948, 29.713, 0.34)
pt3dadd(95.346, 104.931, 29.712, 0.302)
pt3dadd(95.465, 104.916, 29.71, 0.28)
pt3dadd(95.585, 104.907, 29.707, 0.308)
pt3dadd(95.705, 104.898, 29.705, 0.338)
pt3dadd(95.824, 104.888, 29.702, 0.366)
pt3dadd(95.944, 104.879, 29.699, 0.396)
pt3dadd(96.063, 104.869, 29.697, 0.424)
pt3dadd(96.183, 104.86, 29.694, 0.454)
pt3dadd(96.302, 104.85, 29.691, 0.482)
pt3dadd(96.422, 104.841, 29.689, 0.512)
pt3dadd(96.542, 104.832, 29.686, 0.54)
pt3dadd(96.661, 104.822, 29.683, 0.56)
pt3dadd(96.78, 104.809, 29.677, 0.544)
pt3dadd(96.9, 104.797, 29.671, 0.53)
pt3dadd(97.019, 104.785, 29.665, 0.514)
pt3dadd(97.138, 104.773, 29.66, 0.498)
pt3dadd(97.257, 104.76, 29.654, 0.484)
pt3dadd(97.376, 104.748, 29.648, 0.468)
pt3dadd(97.495, 104.736, 29.642, 0.452)
pt3dadd(97.615, 104.724, 29.637, 0.438)
pt3dadd(97.734, 104.712, 29.631, 0.422)
pt3dadd(97.852, 104.695, 29.625, 0.406)
pt3dadd(97.968, 104.665, 29.615, 0.388)
pt3dadd(98.084, 104.636, 29.607, 0.37)
pt3dadd(98.199, 104.606, 29.597, 0.35)
pt3dadd(98.315, 104.576, 29.589, 0.332)
pt3dadd(98.431, 104.546, 29.58, 0.314)
pt3dadd(98.547, 104.516, 29.571, 0.294)
pt3dadd(98.662, 104.486, 29.562, 0.276)
pt3dadd(98.778, 104.457, 29.553, 0.258)
pt3dadd(98.894, 104.427, 29.544, 0.238)
pt3dadd(99.008, 104.394, 29.532, 0.23)
pt3dadd(99.119, 104.353, 29.515, 0.242)
pt3dadd(99.23, 104.313, 29.498, 0.256)
pt3dadd(99.341, 104.272, 29.481, 0.268)
pt3dadd(99.452, 104.232, 29.464, 0.282)
pt3dadd(99.564, 104.191, 29.447, 0.294)
pt3dadd(99.675, 104.151, 29.43, 0.306)
pt3dadd(99.786, 104.11, 29.413, 0.32)
pt3dadd(99.897, 104.07, 29.395, 0.332)
pt3dadd(100.008, 104.03, 29.378, 0.346)
pt3dadd(100.118, 103.995, 29.354, 0.374)
pt3dadd(100.227, 103.968, 29.317, 0.426)
pt3dadd(100.335, 103.941, 29.281, 0.478)
pt3dadd(100.444, 103.914, 29.245, 0.53)
pt3dadd(100.552, 103.888, 29.209, 0.584)
pt3dadd(100.661, 103.861, 29.173, 0.636)
pt3dadd(100.77, 103.834, 29.136, 0.688)
pt3dadd(100.878, 103.807, 29.1, 0.74)
pt3dadd(100.987, 103.78, 29.064, 0.792)
pt3dadd(101.095, 103.754, 29.028, 0.844)
pt3dadd(101.207, 103.732, 28.996, 0.854)
}
}
proc shape3d_112() {
dend_7[16] { pt3dadd(101.322, 103.719, 28.972, 0.806)
pt3dadd(101.438, 103.705, 28.947, 0.756)
pt3dadd(101.553, 103.691, 28.923, 0.706)
pt3dadd(101.669, 103.678, 28.898, 0.656)
pt3dadd(101.785, 103.664, 28.874, 0.606)
pt3dadd(101.9, 103.65, 28.849, 0.556)
pt3dadd(102.016, 103.637, 28.825, 0.506)
pt3dadd(102.131, 103.623, 28.8, 0.456)
pt3dadd(102.247, 103.61, 28.776, 0.406)
pt3dadd(102.364, 103.6, 28.756, 0.37)
pt3dadd(102.482, 103.597, 28.741, 0.356)
pt3dadd(102.601, 103.593, 28.727, 0.34)
pt3dadd(102.72, 103.59, 28.712, 0.326)
pt3dadd(102.838, 103.586, 28.698, 0.31)
pt3dadd(102.957, 103.583, 28.683, 0.296)
pt3dadd(103.076, 103.58, 28.669, 0.28)
pt3dadd(103.194, 103.576, 28.655, 0.264)
pt3dadd(103.313, 103.573, 28.64, 0.25)
pt3dadd(103.432, 103.569, 28.626, 0.234)
pt3dadd(103.551, 103.567, 28.615, 0.226)
pt3dadd(103.671, 103.567, 28.611, 0.226)
pt3dadd(103.791, 103.568, 28.606, 0.226)
pt3dadd(103.911, 103.568, 28.601, 0.226)
pt3dadd(104.031, 103.568, 28.596, 0.226)
pt3dadd(104.15, 103.568, 28.592, 0.226)
pt3dadd(104.27, 103.568, 28.587, 0.226)
pt3dadd(104.39, 103.568, 28.582, 0.226)
pt3dadd(104.51, 103.568, 28.577, 0.226)
pt3dadd(104.63, 103.568, 28.573, 0.226)
pt3dadd(104.75, 103.569, 28.57, 0.226)
pt3dadd(104.87, 103.569, 28.57, 0.226)
pt3dadd(104.99, 103.569, 28.571, 0.226)
pt3dadd(105.11, 103.569, 28.571, 0.226)
pt3dadd(105.23, 103.57, 28.572, 0.226)
pt3dadd(105.35, 103.57, 28.572, 0.226)
pt3dadd(105.47, 103.57, 28.573, 0.226)
pt3dadd(105.59, 103.57, 28.573, 0.226)
pt3dadd(105.71, 103.571, 28.573, 0.226)
pt3dadd(105.83, 103.571, 28.574, 0.226)
pt3dadd(105.95, 103.571, 28.575, 0.226)
pt3dadd(106.07, 103.572, 28.575, 0.226)
pt3dadd(106.19, 103.572, 28.576, 0.226)
pt3dadd(106.31, 103.572, 28.577, 0.226)
pt3dadd(106.43, 103.573, 28.578, 0.226)
pt3dadd(106.55, 103.573, 28.579, 0.226)
pt3dadd(106.67, 103.574, 28.579, 0.226)
pt3dadd(106.79, 103.574, 28.58, 0.226)
pt3dadd(106.91, 103.574, 28.581, 0.226)
pt3dadd(107.03, 103.575, 28.582, 0.226)
pt3dadd(107.15, 103.575, 28.583, 0.226)
pt3dadd(107.27, 103.576, 28.584, 0.226)
pt3dadd(107.39, 103.577, 28.586, 0.226)
pt3dadd(107.51, 103.578, 28.587, 0.226)
pt3dadd(107.63, 103.578, 28.589, 0.226)
pt3dadd(107.75, 103.579, 28.59, 0.226)
pt3dadd(107.87, 103.58, 28.592, 0.226)
pt3dadd(107.99, 103.581, 28.593, 0.226)
pt3dadd(108.11, 103.581, 28.595, 0.226)
pt3dadd(108.23, 103.582, 28.596, 0.226)
pt3dadd(108.35, 103.583, 28.598, 0.226)
pt3dadd(108.47, 103.585, 28.601, 0.226)
pt3dadd(108.589, 103.587, 28.604, 0.226)
pt3dadd(108.709, 103.588, 28.607, 0.226)
pt3dadd(108.829, 103.59, 28.61, 0.226)
pt3dadd(108.949, 103.592, 28.613, 0.226)
pt3dadd(109.069, 103.593, 28.615, 0.226)
pt3dadd(109.189, 103.595, 28.618, 0.226)
pt3dadd(109.309, 103.596, 28.621, 0.226)
pt3dadd(109.429, 103.598, 28.624, 0.226)
pt3dadd(109.549, 103.6, 28.629, 0.226)
pt3dadd(109.669, 103.603, 28.635, 0.226)
pt3dadd(109.788, 103.606, 28.642, 0.226)
pt3dadd(109.908, 103.609, 28.648, 0.226)
pt3dadd(110.028, 103.613, 28.654, 0.226)
pt3dadd(110.147, 103.616, 28.661, 0.226)
pt3dadd(110.267, 103.619, 28.667, 0.226)
pt3dadd(110.387, 103.622, 28.674, 0.226)
pt3dadd(110.507, 103.625, 28.68, 0.226)
pt3dadd(110.626, 103.628, 28.687, 0.226)
pt3dadd(110.746, 103.632, 28.695, 0.226)
pt3dadd(110.865, 103.639, 28.705, 0.226)
pt3dadd(110.984, 103.645, 28.715, 0.226)
pt3dadd(111.103, 103.652, 28.725, 0.226)
pt3dadd(111.222, 103.658, 28.736, 0.226)
pt3dadd(111.342, 103.665, 28.746, 0.226)
pt3dadd(111.461, 103.671, 28.756, 0.226)
pt3dadd(111.58, 103.678, 28.766, 0.226)
pt3dadd(111.699, 103.685, 28.776, 0.226)
pt3dadd(111.819, 103.691, 28.786, 0.226)
pt3dadd(111.936, 103.699, 28.803, 0.238)
pt3dadd(112.052, 103.71, 28.827, 0.264)
pt3dadd(112.168, 103.72, 28.852, 0.29)
pt3dadd(112.284, 103.73, 28.876, 0.316)
pt3dadd(112.4, 103.74, 28.901, 0.342)
pt3dadd(112.516, 103.751, 28.925, 0.37)
pt3dadd(112.632, 103.761, 28.949, 0.396)
pt3dadd(112.748, 103.771, 28.974, 0.422)
pt3dadd(112.864, 103.781, 28.998, 0.448)
pt3dadd(112.98, 103.792, 29.022, 0.474)
pt3dadd(113.093, 103.807, 29.052, 0.504)
pt3dadd(113.204, 103.826, 29.087, 0.54)
pt3dadd(113.315, 103.845, 29.121, 0.574)
pt3dadd(113.426, 103.863, 29.155, 0.608)
pt3dadd(113.537, 103.882, 29.19, 0.644)
pt3dadd(113.648, 103.901, 29.224, 0.678)
pt3dadd(113.759, 103.92, 29.259, 0.712)
pt3dadd(113.87, 103.939, 29.293, 0.746)
pt3dadd(113.981, 103.958, 29.327, 0.782)
pt3dadd(114.093, 103.977, 29.362, 0.816)
pt3dadd(114.202, 104.011, 29.389, 0.808)
pt3dadd(114.311, 104.053, 29.412, 0.772)
pt3dadd(114.42, 104.095, 29.435, 0.738)
pt3dadd(114.529, 104.138, 29.458, 0.702)
pt3dadd(114.638, 104.18, 29.481, 0.668)
pt3dadd(114.746, 104.222, 29.504, 0.632)
pt3dadd(114.855, 104.265, 29.527, 0.598)
pt3dadd(114.964, 104.307, 29.55, 0.562)
pt3dadd(115.073, 104.349, 29.573, 0.528)
pt3dadd(115.182, 104.392, 29.596, 0.494)
pt3dadd(115.295, 104.425, 29.613, 0.468)
pt3dadd(115.411, 104.452, 29.626, 0.448)
pt3dadd(115.527, 104.48, 29.639, 0.428)
pt3dadd(115.642, 104.507, 29.652, 0.408)
pt3dadd(115.758, 104.535, 29.665, 0.388)
pt3dadd(115.874, 104.562, 29.678, 0.368)
pt3dadd(115.99, 104.589, 29.691, 0.348)
pt3dadd(116.105, 104.617, 29.704, 0.328)
pt3dadd(116.221, 104.644, 29.717, 0.308)
pt3dadd(116.337, 104.672, 29.73, 0.288)
pt3dadd(116.455, 104.69, 29.738, 0.278)
pt3dadd(116.574, 104.702, 29.744, 0.272)
pt3dadd(116.693, 104.714, 29.749, 0.266)
pt3dadd(116.812, 104.727, 29.755, 0.26)
pt3dadd(116.931, 104.739, 29.76, 0.256)
pt3dadd(117.051, 104.751, 29.766, 0.25)
pt3dadd(117.17, 104.764, 29.772, 0.244)
pt3dadd(117.289, 104.776, 29.777, 0.238)
pt3dadd(117.408, 104.788, 29.783, 0.234)
pt3dadd(117.527, 104.801, 29.788, 0.228)
pt3dadd(117.647, 104.803, 29.794, 0.226)
pt3dadd(117.767, 104.801, 29.799, 0.226)
pt3dadd(117.887, 104.798, 29.804, 0.226)
pt3dadd(118.006, 104.796, 29.809, 0.226)
pt3dadd(118.126, 104.793, 29.814, 0.226)
pt3dadd(118.246, 104.791, 29.819, 0.226)
pt3dadd(118.366, 104.788, 29.824, 0.226)
pt3dadd(118.486, 104.786, 29.829, 0.226)
pt3dadd(118.605, 104.783, 29.834, 0.226)
pt3dadd(118.725, 104.781, 29.839, 0.226)
pt3dadd(118.844, 104.766, 29.847, 0.236)
pt3dadd(118.962, 104.746, 29.855, 0.248)
pt3dadd(119.08, 104.726, 29.864, 0.26)
pt3dadd(119.197, 104.706, 29.872, 0.274)
pt3dadd(119.315, 104.686, 29.88, 0.286)
pt3dadd(119.433, 104.666, 29.889, 0.3)
pt3dadd(119.551, 104.646, 29.897, 0.312)
pt3dadd(119.669, 104.625, 29.906, 0.324)
pt3dadd(119.787, 104.605, 29.914, 0.338)
pt3dadd(119.905, 104.585, 29.923, 0.35)
pt3dadd(120.019, 104.554, 29.935, 0.376)
pt3dadd(120.133, 104.519, 29.949, 0.408)
pt3dadd(120.246, 104.483, 29.963, 0.438)
pt3dadd(120.36, 104.448, 29.977, 0.468)
pt3dadd(120.473, 104.413, 29.991, 0.5)
pt3dadd(120.587, 104.378, 30.005, 0.53)
pt3dadd(120.701, 104.343, 30.019, 0.56)
pt3dadd(120.814, 104.308, 30.033, 0.592)
pt3dadd(120.928, 104.273, 30.047, 0.622)
pt3dadd(121.04, 104.237, 30.061, 0.652)
pt3dadd(121.152, 104.219, 30.093, 0.644)
pt3dadd(121.262, 104.205, 30.13, 0.626)
pt3dadd(121.373, 104.19, 30.167, 0.608)
pt3dadd(121.483, 104.176, 30.204, 0.59)
pt3dadd(121.594, 104.161, 30.242, 0.572)
pt3dadd(121.705, 104.147, 30.278, 0.556)
pt3dadd(121.816, 104.132, 30.316, 0.538)
pt3dadd(121.926, 104.118, 30.353, 0.52)
pt3dadd(122.036, 104.103, 30.39, 0.502)
pt3dadd(122.147, 104.089, 30.427, 0.484)
pt3dadd(122.26, 104.107, 30.455, 0.466)
pt3dadd(122.372, 104.132, 30.48, 0.448)
pt3dadd(122.485, 104.158, 30.506, 0.43)
pt3dadd(122.599, 104.183, 30.532, 0.41)
pt3dadd(122.712, 104.209, 30.558, 0.392)
pt3dadd(122.825, 104.234, 30.584, 0.374)
pt3dadd(122.938, 104.26, 30.609, 0.356)
pt3dadd(123.052, 104.285, 30.635, 0.338)
pt3dadd(123.164, 104.31, 30.661, 0.32)
pt3dadd(123.277, 104.336, 30.687, 0.302)
pt3dadd(123.391, 104.366, 30.703, 0.292)
pt3dadd(123.506, 104.396, 30.719, 0.286)
pt3dadd(123.62, 104.427, 30.735, 0.278)
pt3dadd(123.736, 104.457, 30.751, 0.27)
pt3dadd(123.85, 104.488, 30.767, 0.264)
pt3dadd(123.964, 104.518, 30.783, 0.256)
pt3dadd(124.079, 104.549, 30.799, 0.248)
pt3dadd(124.193, 104.579, 30.815, 0.242)
pt3dadd(124.308, 104.61, 30.831, 0.234)
pt3dadd(124.422, 104.64, 30.847, 0.226)
pt3dadd(124.54, 104.664, 30.854, 0.226)
}
}
proc shape3d_113() {
dend_7[16] { pt3dadd(124.657, 104.687, 30.86, 0.226)
pt3dadd(124.775, 104.711, 30.867, 0.226)
pt3dadd(124.891, 104.734, 30.874, 0.226)
pt3dadd(125.009, 104.757, 30.88, 0.226)
pt3dadd(125.126, 104.781, 30.887, 0.226)
pt3dadd(125.244, 104.804, 30.894, 0.226)
pt3dadd(125.362, 104.827, 30.9, 0.226)
pt3dadd(125.479, 104.851, 30.907, 0.226)
pt3dadd(125.597, 104.874, 30.914, 0.226)
pt3dadd(125.716, 104.884, 30.914, 0.226)
pt3dadd(125.836, 104.895, 30.914, 0.226)
pt3dadd(125.954, 104.905, 30.914, 0.226)
pt3dadd(126.074, 104.915, 30.914, 0.226)
pt3dadd(126.194, 104.925, 30.914, 0.226)
pt3dadd(126.313, 104.935, 30.914, 0.226)
pt3dadd(126.433, 104.945, 30.914, 0.226)
pt3dadd(126.553, 104.955, 30.914, 0.226)
pt3dadd(126.672, 104.965, 30.914, 0.226)
pt3dadd(126.792, 104.975, 30.914, 0.226)
pt3dadd(126.912, 104.975, 30.914, 0.226)
pt3dadd(127.032, 104.975, 30.914, 0.226)
pt3dadd(127.152, 104.975, 30.914, 0.226)
pt3dadd(127.272, 104.975, 30.914, 0.226)
pt3dadd(127.392, 104.975, 30.914, 0.226)
pt3dadd(127.512, 104.975, 30.914, 0.226)
pt3dadd(127.632, 104.975, 30.914, 0.226)
pt3dadd(127.752, 104.975, 30.914, 0.226)
pt3dadd(127.872, 104.975, 30.914, 0.226)
pt3dadd(127.992, 104.975, 30.914, 0.226)
}
dend_7[17] {pt3dclear()
pt3dadd(60.355, 115.149, 25.334, 0.678)
pt3dadd(60.355, 115.084, 25.278, 0.696)
pt3dadd(60.355, 115, 25.206, 0.718)
pt3dadd(60.355, 114.916, 25.135, 0.74)
pt3dadd(60.355, 114.832, 25.063, 0.762)
pt3dadd(60.355, 114.748, 24.992, 0.784)
pt3dadd(60.355, 114.664, 24.92, 0.806)
pt3dadd(60.355, 114.58, 24.849, 0.828)
pt3dadd(60.355, 114.496, 24.777, 0.85)
pt3dadd(60.356, 114.412, 24.706, 0.872)
pt3dadd(60.356, 114.329, 24.634, 0.894)
pt3dadd(60.356, 114.245, 24.563, 0.916)
pt3dadd(60.356, 114.161, 24.491, 0.938)
pt3dadd(60.356, 114.077, 24.42, 0.96)
pt3dadd(60.356, 113.993, 24.348, 0.982)
pt3dadd(60.356, 113.909, 24.277, 1.004)
pt3dadd(60.373, 113.823, 24.213, 1.016)
pt3dadd(60.43, 113.732, 24.169, 1.004)
pt3dadd(60.488, 113.641, 24.124, 0.992)
pt3dadd(60.545, 113.55, 24.08, 0.98)
pt3dadd(60.602, 113.46, 24.035, 0.97)
pt3dadd(60.66, 113.369, 23.99, 0.958)
pt3dadd(60.717, 113.278, 23.946, 0.946)
pt3dadd(60.774, 113.187, 23.901, 0.934)
pt3dadd(60.832, 113.096, 23.857, 0.922)
pt3dadd(60.921, 113.022, 23.845, 0.886)
pt3dadd(61.019, 112.952, 23.841, 0.844)
pt3dadd(61.116, 112.882, 23.837, 0.802)
pt3dadd(61.213, 112.812, 23.833, 0.758)
pt3dadd(61.311, 112.742, 23.829, 0.716)
pt3dadd(61.408, 112.671, 23.825, 0.674)
pt3dadd(61.505, 112.601, 23.821, 0.632)
pt3dadd(61.602, 112.531, 23.817, 0.59)
pt3dadd(61.699, 112.461, 23.813, 0.548)
pt3dadd(61.797, 112.391, 23.809, 0.506)
pt3dadd(61.903, 112.336, 23.803, 0.48)
pt3dadd(62.011, 112.284, 23.796, 0.458)
pt3dadd(62.119, 112.233, 23.789, 0.436)
pt3dadd(62.227, 112.181, 23.782, 0.414)
pt3dadd(62.335, 112.129, 23.776, 0.392)
pt3dadd(62.443, 112.078, 23.769, 0.37)
pt3dadd(62.551, 112.026, 23.762, 0.348)
pt3dadd(62.659, 111.975, 23.755, 0.324)
pt3dadd(62.767, 111.923, 23.748, 0.302)
pt3dadd(62.875, 111.871, 23.741, 0.28)
pt3dadd(62.98, 111.814, 23.733, 0.304)
pt3dadd(63.084, 111.755, 23.723, 0.334)
pt3dadd(63.188, 111.697, 23.714, 0.366)
pt3dadd(63.292, 111.638, 23.705, 0.398)
pt3dadd(63.396, 111.58, 23.696, 0.428)
pt3dadd(63.501, 111.521, 23.686, 0.46)
pt3dadd(63.605, 111.463, 23.677, 0.492)
pt3dadd(63.709, 111.404, 23.668, 0.522)
pt3dadd(63.813, 111.346, 23.659, 0.554)
pt3dadd(63.917, 111.287, 23.649, 0.586)
pt3dadd(64.021, 111.232, 23.632, 0.608)
pt3dadd(64.125, 111.176, 23.613, 0.626)
pt3dadd(64.229, 111.121, 23.594, 0.646)
pt3dadd(64.333, 111.066, 23.574, 0.666)
pt3dadd(64.437, 111.011, 23.555, 0.684)
pt3dadd(64.542, 110.955, 23.536, 0.704)
pt3dadd(64.646, 110.9, 23.517, 0.724)
pt3dadd(64.75, 110.845, 23.498, 0.742)
pt3dadd(64.854, 110.79, 23.479, 0.762)
pt3dadd(64.958, 110.735, 23.459, 0.782)
pt3dadd(65.062, 110.691, 23.426, 0.752)
pt3dadd(65.166, 110.649, 23.391, 0.718)
pt3dadd(65.27, 110.606, 23.356, 0.686)
pt3dadd(65.374, 110.563, 23.322, 0.652)
pt3dadd(65.479, 110.521, 23.287, 0.62)
pt3dadd(65.583, 110.478, 23.252, 0.586)
pt3dadd(65.687, 110.436, 23.218, 0.554)
pt3dadd(65.791, 110.393, 23.183, 0.522)
pt3dadd(65.895, 110.35, 23.149, 0.488)
pt3dadd(66, 110.308, 23.114, 0.456)
pt3dadd(66.1, 110.247, 23.093, 0.47)
pt3dadd(66.2, 110.186, 23.072, 0.486)
pt3dadd(66.3, 110.125, 23.051, 0.502)
pt3dadd(66.4, 110.063, 23.031, 0.518)
pt3dadd(66.5, 110.002, 23.01, 0.534)
pt3dadd(66.6, 109.941, 22.989, 0.55)
pt3dadd(66.701, 109.879, 22.969, 0.566)
pt3dadd(66.801, 109.818, 22.948, 0.582)
pt3dadd(66.901, 109.757, 22.928, 0.598)
pt3dadd(67.001, 109.695, 22.907, 0.614)
pt3dadd(67.107, 109.642, 22.892, 0.62)
pt3dadd(67.213, 109.588, 22.878, 0.626)
pt3dadd(67.319, 109.535, 22.864, 0.634)
pt3dadd(67.425, 109.482, 22.849, 0.64)
pt3dadd(67.532, 109.429, 22.835, 0.646)
pt3dadd(67.638, 109.375, 22.821, 0.652)
pt3dadd(67.744, 109.322, 22.806, 0.658)
pt3dadd(67.85, 109.269, 22.792, 0.666)
pt3dadd(67.956, 109.216, 22.778, 0.672)
pt3dadd(68.062, 109.162, 22.764, 0.678)
pt3dadd(68.17, 109.109, 22.757, 0.678)
pt3dadd(68.277, 109.056, 22.75, 0.678)
pt3dadd(68.384, 109.003, 22.743, 0.678)
pt3dadd(68.491, 108.95, 22.736, 0.678)
pt3dadd(68.598, 108.897, 22.729, 0.678)
pt3dadd(68.706, 108.843, 22.722, 0.678)
pt3dadd(68.813, 108.79, 22.715, 0.678)
pt3dadd(68.92, 108.737, 22.708, 0.678)
pt3dadd(69.027, 108.684, 22.701, 0.678)
pt3dadd(69.135, 108.63, 22.694, 0.678)
pt3dadd(69.236, 108.566, 22.694, 0.678)
pt3dadd(69.337, 108.502, 22.694, 0.678)
pt3dadd(69.439, 108.438, 22.694, 0.678)
pt3dadd(69.54, 108.373, 22.694, 0.678)
pt3dadd(69.641, 108.309, 22.694, 0.678)
pt3dadd(69.743, 108.245, 22.694, 0.678)
pt3dadd(69.844, 108.181, 22.694, 0.678)
pt3dadd(69.945, 108.116, 22.694, 0.678)
pt3dadd(70.047, 108.052, 22.694, 0.678)
pt3dadd(70.148, 107.988, 22.694, 0.678)
pt3dadd(70.248, 107.922, 22.694, 0.648)
pt3dadd(70.348, 107.856, 22.694, 0.618)
pt3dadd(70.449, 107.79, 22.694, 0.588)
pt3dadd(70.549, 107.723, 22.694, 0.558)
pt3dadd(70.649, 107.657, 22.694, 0.528)
pt3dadd(70.749, 107.591, 22.694, 0.498)
pt3dadd(70.849, 107.525, 22.694, 0.468)
pt3dadd(70.949, 107.459, 22.694, 0.44)
pt3dadd(71.05, 107.393, 22.694, 0.41)
pt3dadd(71.15, 107.327, 22.694, 0.38)
pt3dadd(71.257, 107.273, 22.694, 0.384)
pt3dadd(71.364, 107.218, 22.694, 0.388)
pt3dadd(71.471, 107.164, 22.694, 0.39)
pt3dadd(71.577, 107.109, 22.694, 0.394)
pt3dadd(71.684, 107.055, 22.694, 0.396)
pt3dadd(71.791, 107, 22.694, 0.4)
pt3dadd(71.898, 106.946, 22.694, 0.402)
pt3dadd(72.005, 106.891, 22.694, 0.406)
pt3dadd(72.112, 106.836, 22.694, 0.41)
pt3dadd(72.219, 106.783, 22.694, 0.414)
pt3dadd(72.333, 106.746, 22.694, 0.43)
pt3dadd(72.447, 106.708, 22.694, 0.448)
pt3dadd(72.561, 106.671, 22.694, 0.464)
pt3dadd(72.675, 106.633, 22.694, 0.48)
pt3dadd(72.789, 106.596, 22.694, 0.498)
pt3dadd(72.903, 106.558, 22.694, 0.514)
pt3dadd(73.017, 106.52, 22.694, 0.532)
pt3dadd(73.131, 106.483, 22.694, 0.548)
pt3dadd(73.245, 106.445, 22.694, 0.564)
pt3dadd(73.36, 106.41, 22.694, 0.576)
pt3dadd(73.478, 106.389, 22.694, 0.542)
pt3dadd(73.596, 106.369, 22.694, 0.51)
pt3dadd(73.714, 106.348, 22.694, 0.478)
pt3dadd(73.833, 106.328, 22.694, 0.444)
pt3dadd(73.951, 106.307, 22.694, 0.412)
pt3dadd(74.069, 106.287, 22.694, 0.38)
pt3dadd(74.187, 106.266, 22.694, 0.346)
pt3dadd(74.306, 106.246, 22.694, 0.314)
pt3dadd(74.424, 106.225, 22.694, 0.28)
pt3dadd(74.542, 106.205, 22.694, 0.256)
pt3dadd(74.661, 106.192, 22.693, 0.294)
pt3dadd(74.781, 106.179, 22.693, 0.332)
pt3dadd(74.9, 106.166, 22.693, 0.372)
pt3dadd(75.019, 106.153, 22.693, 0.41)
pt3dadd(75.138, 106.14, 22.693, 0.448)
pt3dadd(75.258, 106.127, 22.693, 0.486)
pt3dadd(75.377, 106.114, 22.693, 0.524)
pt3dadd(75.496, 106.1, 22.693, 0.562)
pt3dadd(75.616, 106.087, 22.693, 0.6)
pt3dadd(75.734, 106.071, 22.693, 0.634)
pt3dadd(75.847, 106.031, 22.693, 0.64)
pt3dadd(75.96, 105.991, 22.693, 0.644)
pt3dadd(76.074, 105.951, 22.692, 0.648)
pt3dadd(76.187, 105.911, 22.692, 0.652)
pt3dadd(76.3, 105.871, 22.692, 0.656)
pt3dadd(76.413, 105.831, 22.692, 0.662)
}
}
proc shape3d_114() {
dend_7[17] { pt3dadd(76.526, 105.791, 22.692, 0.666)
pt3dadd(76.639, 105.751, 22.692, 0.67)
pt3dadd(76.752, 105.711, 22.692, 0.674)
pt3dadd(76.866, 105.672, 22.692, 0.678)
pt3dadd(76.982, 105.64, 22.691, 0.678)
pt3dadd(77.097, 105.608, 22.691, 0.678)
pt3dadd(77.213, 105.576, 22.691, 0.678)
pt3dadd(77.328, 105.543, 22.691, 0.678)
pt3dadd(77.444, 105.511, 22.69, 0.678)
pt3dadd(77.559, 105.479, 22.69, 0.678)
pt3dadd(77.675, 105.447, 22.69, 0.678)
pt3dadd(77.791, 105.414, 22.69, 0.678)
pt3dadd(77.906, 105.382, 22.69, 0.678)
pt3dadd(78.022, 105.352, 22.689, 0.678)
pt3dadd(78.141, 105.336, 22.689, 0.678)
pt3dadd(78.26, 105.319, 22.688, 0.678)
pt3dadd(78.379, 105.302, 22.688, 0.678)
pt3dadd(78.498, 105.285, 22.688, 0.678)
pt3dadd(78.616, 105.268, 22.687, 0.678)
pt3dadd(78.735, 105.251, 22.687, 0.678)
pt3dadd(78.854, 105.234, 22.686, 0.678)
pt3dadd(78.973, 105.217, 22.686, 0.678)
pt3dadd(79.092, 105.2, 22.685, 0.678)
pt3dadd(79.211, 105.187, 22.685, 0.676)
pt3dadd(79.331, 105.187, 22.684, 0.672)
pt3dadd(79.451, 105.187, 22.683, 0.668)
pt3dadd(79.571, 105.186, 22.682, 0.662)
pt3dadd(79.691, 105.186, 22.681, 0.658)
pt3dadd(79.811, 105.186, 22.681, 0.652)
pt3dadd(79.931, 105.186, 22.68, 0.648)
pt3dadd(80.051, 105.186, 22.679, 0.644)
pt3dadd(80.171, 105.185, 22.678, 0.638)
pt3dadd(80.291, 105.185, 22.677, 0.634)
pt3dadd(80.41, 105.189, 22.676, 0.626)
pt3dadd(80.529, 105.205, 22.675, 0.608)
pt3dadd(80.648, 105.22, 22.673, 0.59)
pt3dadd(80.767, 105.236, 22.672, 0.572)
pt3dadd(80.886, 105.252, 22.67, 0.554)
pt3dadd(81.005, 105.268, 22.669, 0.536)
pt3dadd(81.124, 105.284, 22.667, 0.518)
pt3dadd(81.243, 105.3, 22.666, 0.5)
pt3dadd(81.362, 105.316, 22.664, 0.482)
pt3dadd(81.481, 105.332, 22.663, 0.466)
pt3dadd(81.598, 105.355, 22.661, 0.452)
pt3dadd(81.709, 105.399, 22.658, 0.452)
pt3dadd(81.821, 105.444, 22.655, 0.452)
pt3dadd(81.932, 105.488, 22.653, 0.452)
pt3dadd(82.043, 105.533, 22.65, 0.452)
pt3dadd(82.155, 105.577, 22.647, 0.452)
pt3dadd(82.266, 105.622, 22.645, 0.452)
pt3dadd(82.377, 105.666, 22.642, 0.452)
pt3dadd(82.489, 105.711, 22.639, 0.452)
pt3dadd(82.6, 105.755, 22.637, 0.452)
pt3dadd(82.713, 105.796, 22.633, 0.448)
pt3dadd(82.828, 105.828, 22.627, 0.434)
pt3dadd(82.944, 105.86, 22.621, 0.418)
pt3dadd(83.059, 105.891, 22.615, 0.402)
pt3dadd(83.175, 105.923, 22.609, 0.388)
pt3dadd(83.291, 105.954, 22.603, 0.372)
pt3dadd(83.406, 105.986, 22.597, 0.358)
pt3dadd(83.522, 106.018, 22.591, 0.344)
pt3dadd(83.637, 106.049, 22.584, 0.328)
pt3dadd(83.753, 106.081, 22.579, 0.314)
pt3dadd(83.869, 106.109, 22.571, 0.3)
pt3dadd(83.987, 106.128, 22.562, 0.292)
pt3dadd(84.105, 106.146, 22.552, 0.284)
pt3dadd(84.223, 106.165, 22.542, 0.278)
pt3dadd(84.341, 106.184, 22.532, 0.27)
pt3dadd(84.459, 106.203, 22.523, 0.262)
pt3dadd(84.576, 106.222, 22.513, 0.254)
pt3dadd(84.694, 106.241, 22.503, 0.246)
pt3dadd(84.812, 106.26, 22.494, 0.238)
pt3dadd(84.93, 106.279, 22.484, 0.232)
pt3dadd(85.048, 106.294, 22.47, 0.23)
pt3dadd(85.165, 106.301, 22.448, 0.244)
pt3dadd(85.281, 106.308, 22.426, 0.26)
pt3dadd(85.398, 106.314, 22.404, 0.274)
pt3dadd(85.515, 106.321, 22.381, 0.288)
pt3dadd(85.632, 106.328, 22.359, 0.304)
pt3dadd(85.749, 106.334, 22.337, 0.318)
pt3dadd(85.865, 106.341, 22.315, 0.332)
pt3dadd(85.982, 106.348, 22.292, 0.346)
pt3dadd(86.099, 106.355, 22.27, 0.362)
pt3dadd(86.214, 106.358, 22.242, 0.382)
pt3dadd(86.326, 106.356, 22.207, 0.41)
pt3dadd(86.438, 106.354, 22.171, 0.438)
pt3dadd(86.55, 106.352, 22.135, 0.466)
pt3dadd(86.662, 106.35, 22.099, 0.494)
pt3dadd(86.774, 106.348, 22.064, 0.522)
pt3dadd(86.886, 106.346, 22.028, 0.552)
pt3dadd(86.998, 106.344, 21.992, 0.58)
pt3dadd(87.111, 106.342, 21.957, 0.608)
pt3dadd(87.223, 106.34, 21.921, 0.636)
pt3dadd(87.336, 106.337, 21.89, 0.644)
pt3dadd(87.453, 106.333, 21.865, 0.626)
pt3dadd(87.569, 106.33, 21.841, 0.608)
pt3dadd(87.685, 106.326, 21.816, 0.588)
pt3dadd(87.801, 106.322, 21.792, 0.57)
pt3dadd(87.918, 106.318, 21.767, 0.552)
pt3dadd(88.034, 106.315, 21.743, 0.532)
pt3dadd(88.15, 106.311, 21.718, 0.514)
pt3dadd(88.267, 106.307, 21.694, 0.496)
pt3dadd(88.383, 106.304, 21.669, 0.476)
pt3dadd(88.5, 106.298, 21.649, 0.466)
pt3dadd(88.619, 106.289, 21.636, 0.464)
pt3dadd(88.737, 106.28, 21.623, 0.462)
pt3dadd(88.856, 106.272, 21.61, 0.462)
pt3dadd(88.975, 106.263, 21.596, 0.46)
pt3dadd(89.093, 106.254, 21.583, 0.458)
pt3dadd(89.212, 106.245, 21.57, 0.456)
pt3dadd(89.33, 106.236, 21.556, 0.456)
pt3dadd(89.449, 106.228, 21.543, 0.454)
pt3dadd(89.568, 106.219, 21.53, 0.452)
pt3dadd(89.686, 106.208, 21.52, 0.458)
pt3dadd(89.805, 106.194, 21.514, 0.472)
pt3dadd(89.924, 106.18, 21.509, 0.486)
pt3dadd(90.043, 106.166, 21.504, 0.5)
pt3dadd(90.162, 106.152, 21.498, 0.514)
pt3dadd(90.281, 106.138, 21.493, 0.528)
pt3dadd(90.4, 106.124, 21.488, 0.542)
pt3dadd(90.519, 106.11, 21.482, 0.556)
pt3dadd(90.638, 106.096, 21.477, 0.57)
pt3dadd(90.757, 106.082, 21.472, 0.584)
pt3dadd(90.875, 106.059, 21.466, 0.588)
pt3dadd(90.99, 106.025, 21.462, 0.576)
pt3dadd(91.105, 105.992, 21.457, 0.566)
pt3dadd(91.22, 105.958, 21.452, 0.554)
pt3dadd(91.335, 105.925, 21.447, 0.544)
pt3dadd(91.45, 105.891, 21.442, 0.532)
pt3dadd(91.565, 105.857, 21.437, 0.522)
pt3dadd(91.68, 105.824, 21.432, 0.51)
pt3dadd(91.795, 105.79, 21.427, 0.5)
pt3dadd(91.91, 105.756, 21.422, 0.488)
pt3dadd(92.023, 105.717, 21.416, 0.472)
pt3dadd(92.134, 105.672, 21.408, 0.452)
pt3dadd(92.245, 105.628, 21.401, 0.43)
pt3dadd(92.356, 105.583, 21.393, 0.41)
pt3dadd(92.467, 105.538, 21.385, 0.388)
pt3dadd(92.578, 105.494, 21.377, 0.368)
pt3dadd(92.689, 105.449, 21.37, 0.348)
pt3dadd(92.8, 105.404, 21.362, 0.326)
pt3dadd(92.911, 105.36, 21.354, 0.306)
pt3dadd(93.022, 105.315, 21.347, 0.284)
pt3dadd(93.134, 105.275, 21.337, 0.286)
pt3dadd(93.248, 105.238, 21.325, 0.304)
pt3dadd(93.361, 105.202, 21.313, 0.322)
pt3dadd(93.475, 105.165, 21.302, 0.34)
pt3dadd(93.588, 105.129, 21.29, 0.358)
pt3dadd(93.701, 105.092, 21.278, 0.376)
pt3dadd(93.815, 105.056, 21.266, 0.394)
pt3dadd(93.928, 105.019, 21.254, 0.412)
pt3dadd(94.042, 104.983, 21.243, 0.43)
pt3dadd(94.155, 104.946, 21.231, 0.45)
pt3dadd(94.266, 104.915, 21.205, 0.466)
pt3dadd(94.375, 104.889, 21.169, 0.484)
pt3dadd(94.483, 104.862, 21.133, 0.502)
pt3dadd(94.592, 104.836, 21.097, 0.52)
pt3dadd(94.701, 104.81, 21.06, 0.536)
pt3dadd(94.809, 104.783, 21.024, 0.554)
pt3dadd(94.918, 104.757, 20.988, 0.572)
pt3dadd(95.027, 104.731, 20.952, 0.588)
pt3dadd(95.135, 104.704, 20.916, 0.606)
pt3dadd(95.244, 104.678, 20.879, 0.624)
pt3dadd(95.353, 104.643, 20.849, 0.62)
pt3dadd(95.461, 104.602, 20.823, 0.6)
pt3dadd(95.569, 104.561, 20.796, 0.578)
pt3dadd(95.677, 104.52, 20.771, 0.558)
pt3dadd(95.786, 104.479, 20.745, 0.538)
pt3dadd(95.894, 104.437, 20.718, 0.516)
pt3dadd(96.002, 104.396, 20.692, 0.496)
pt3dadd(96.111, 104.355, 20.666, 0.476)
pt3dadd(96.219, 104.314, 20.64, 0.454)
pt3dadd(96.327, 104.273, 20.614, 0.434)
pt3dadd(96.437, 104.231, 20.594, 0.414)
pt3dadd(96.547, 104.188, 20.576, 0.394)
pt3dadd(96.657, 104.146, 20.559, 0.374)
pt3dadd(96.768, 104.103, 20.542, 0.354)
pt3dadd(96.878, 104.061, 20.524, 0.334)
pt3dadd(96.988, 104.019, 20.507, 0.314)
pt3dadd(97.099, 103.976, 20.49, 0.294)
pt3dadd(97.209, 103.934, 20.472, 0.274)
pt3dadd(97.319, 103.892, 20.455, 0.254)
pt3dadd(97.43, 103.849, 20.438, 0.234)
pt3dadd(97.542, 103.812, 20.426, 0.23)
pt3dadd(97.657, 103.776, 20.417, 0.238)
pt3dadd(97.771, 103.741, 20.408, 0.244)
pt3dadd(97.885, 103.706, 20.4, 0.25)
pt3dadd(98, 103.671, 20.391, 0.258)
pt3dadd(98.114, 103.636, 20.382, 0.264)
pt3dadd(98.228, 103.601, 20.374, 0.27)
pt3dadd(98.343, 103.566, 20.365, 0.278)
pt3dadd(98.457, 103.531, 20.356, 0.284)
pt3dadd(98.571, 103.496, 20.348, 0.292)
pt3dadd(98.687, 103.465, 20.345, 0.318)
pt3dadd(98.804, 103.437, 20.345, 0.356)
pt3dadd(98.92, 103.41, 20.344, 0.392)
pt3dadd(99.037, 103.382, 20.344, 0.43)
pt3dadd(99.154, 103.354, 20.344, 0.468)
pt3dadd(99.27, 103.326, 20.344, 0.504)
pt3dadd(99.387, 103.298, 20.344, 0.542)
}
}
proc shape3d_115() {
dend_7[17] { pt3dadd(99.504, 103.27, 20.344, 0.58)
pt3dadd(99.621, 103.242, 20.344, 0.618)
pt3dadd(99.737, 103.215, 20.344, 0.654)
pt3dadd(99.85, 103.175, 20.344, 0.648)
pt3dadd(99.961, 103.129, 20.343, 0.614)
pt3dadd(100.072, 103.082, 20.343, 0.58)
pt3dadd(100.182, 103.036, 20.343, 0.546)
pt3dadd(100.293, 102.99, 20.343, 0.512)
pt3dadd(100.404, 102.944, 20.343, 0.48)
pt3dadd(100.515, 102.897, 20.343, 0.446)
pt3dadd(100.625, 102.851, 20.342, 0.412)
pt3dadd(100.736, 102.805, 20.342, 0.378)
pt3dadd(100.847, 102.758, 20.342, 0.344)
pt3dadd(100.959, 102.717, 20.342, 0.334)
pt3dadd(101.073, 102.679, 20.341, 0.336)
pt3dadd(101.187, 102.64, 20.341, 0.338)
pt3dadd(101.3, 102.602, 20.341, 0.34)
pt3dadd(101.414, 102.563, 20.34, 0.344)
pt3dadd(101.528, 102.525, 20.34, 0.346)
pt3dadd(101.641, 102.486, 20.34, 0.348)
pt3dadd(101.755, 102.448, 20.339, 0.35)
pt3dadd(101.869, 102.409, 20.339, 0.352)
pt3dadd(101.982, 102.371, 20.339, 0.354)
pt3dadd(102.098, 102.338, 20.338, 0.372)
pt3dadd(102.214, 102.309, 20.337, 0.4)
pt3dadd(102.33, 102.279, 20.337, 0.428)
pt3dadd(102.447, 102.25, 20.336, 0.456)
pt3dadd(102.563, 102.22, 20.335, 0.484)
pt3dadd(102.679, 102.191, 20.335, 0.512)
pt3dadd(102.796, 102.161, 20.334, 0.538)
pt3dadd(102.912, 102.132, 20.334, 0.566)
pt3dadd(103.028, 102.102, 20.333, 0.594)
pt3dadd(103.145, 102.073, 20.332, 0.622)
pt3dadd(103.261, 102.045, 20.331, 0.646)
pt3dadd(103.378, 102.017, 20.33, 0.668)
pt3dadd(103.495, 101.99, 20.329, 0.69)
pt3dadd(103.612, 101.962, 20.328, 0.712)
pt3dadd(103.728, 101.935, 20.326, 0.734)
pt3dadd(103.845, 101.907, 20.325, 0.756)
pt3dadd(103.962, 101.88, 20.324, 0.78)
pt3dadd(104.079, 101.853, 20.323, 0.802)
pt3dadd(104.196, 101.825, 20.322, 0.824)
pt3dadd(104.312, 101.798, 20.32, 0.846)
pt3dadd(104.427, 101.764, 20.319, 0.84)
pt3dadd(104.542, 101.727, 20.317, 0.82)
pt3dadd(104.656, 101.69, 20.315, 0.802)
pt3dadd(104.77, 101.653, 20.312, 0.782)
pt3dadd(104.884, 101.617, 20.31, 0.762)
pt3dadd(104.998, 101.58, 20.308, 0.744)
pt3dadd(105.113, 101.543, 20.306, 0.724)
pt3dadd(105.227, 101.506, 20.304, 0.706)
pt3dadd(105.341, 101.47, 20.302, 0.686)
pt3dadd(105.455, 101.433, 20.3, 0.666)
pt3dadd(105.573, 101.411, 20.296, 0.634)
pt3dadd(105.692, 101.395, 20.292, 0.596)
pt3dadd(105.81, 101.379, 20.288, 0.558)
pt3dadd(105.929, 101.364, 20.284, 0.518)
pt3dadd(106.048, 101.348, 20.28, 0.48)
pt3dadd(106.167, 101.332, 20.276, 0.442)
pt3dadd(106.286, 101.317, 20.272, 0.402)
pt3dadd(106.405, 101.301, 20.268, 0.364)
pt3dadd(106.524, 101.285, 20.264, 0.326)
pt3dadd(106.643, 101.27, 20.26, 0.288)
pt3dadd(106.76, 101.284, 20.252, 0.272)
pt3dadd(106.876, 101.311, 20.243, 0.266)
pt3dadd(106.992, 101.338, 20.233, 0.262)
pt3dadd(107.109, 101.366, 20.224, 0.256)
pt3dadd(107.225, 101.393, 20.214, 0.252)
pt3dadd(107.341, 101.421, 20.205, 0.248)
pt3dadd(107.457, 101.448, 20.195, 0.242)
pt3dadd(107.574, 101.475, 20.185, 0.238)
pt3dadd(107.69, 101.503, 20.176, 0.232)
pt3dadd(107.806, 101.53, 20.166, 0.228)
pt3dadd(107.921, 101.561, 20.153, 0.226)
pt3dadd(108.035, 101.593, 20.14, 0.226)
pt3dadd(108.15, 101.625, 20.126, 0.226)
pt3dadd(108.264, 101.657, 20.112, 0.226)
pt3dadd(108.379, 101.688, 20.099, 0.226)
pt3dadd(108.494, 101.72, 20.085, 0.226)
pt3dadd(108.608, 101.752, 20.071, 0.226)
pt3dadd(108.723, 101.784, 20.058, 0.226)
pt3dadd(108.837, 101.816, 20.044, 0.226)
pt3dadd(108.952, 101.848, 20.03, 0.226)
pt3dadd(109.063, 101.87, 20, 0.244)
pt3dadd(109.174, 101.891, 19.965, 0.268)
pt3dadd(109.284, 101.911, 19.93, 0.292)
pt3dadd(109.395, 101.932, 19.895, 0.316)
pt3dadd(109.505, 101.952, 19.86, 0.34)
pt3dadd(109.616, 101.973, 19.824, 0.364)
pt3dadd(109.726, 101.993, 19.789, 0.388)
pt3dadd(109.837, 102.014, 19.754, 0.412)
pt3dadd(109.947, 102.034, 19.719, 0.436)
pt3dadd(110.058, 102.054, 19.684, 0.46)
pt3dadd(110.16, 102.065, 19.633, 0.504)
pt3dadd(110.263, 102.075, 19.582, 0.548)
pt3dadd(110.365, 102.085, 19.53, 0.594)
pt3dadd(110.468, 102.096, 19.479, 0.638)
pt3dadd(110.57, 102.106, 19.428, 0.682)
pt3dadd(110.673, 102.116, 19.377, 0.726)
pt3dadd(110.775, 102.126, 19.325, 0.77)
pt3dadd(110.878, 102.137, 19.274, 0.816)
pt3dadd(110.98, 102.147, 19.223, 0.86)
pt3dadd(111.083, 102.157, 19.171, 0.904)
}
dend_7[18] {pt3dclear()
pt3dadd(38.272, 117.042, 24.053, 0.904)
pt3dadd(38.265, 117.074, 24.05, 0.896)
pt3dadd(38.238, 117.19, 24.039, 0.872)
pt3dadd(38.212, 117.306, 24.029, 0.846)
pt3dadd(38.185, 117.423, 24.018, 0.82)
pt3dadd(38.159, 117.539, 24.007, 0.794)
pt3dadd(38.132, 117.655, 23.997, 0.768)
pt3dadd(38.106, 117.772, 23.986, 0.742)
pt3dadd(38.08, 117.888, 23.976, 0.716)
pt3dadd(38.053, 118.005, 23.965, 0.69)
pt3dadd(38.027, 118.121, 23.955, 0.664)
pt3dadd(38, 118.237, 23.944, 0.638)
pt3dadd(37.974, 118.354, 23.933, 0.612)
pt3dadd(37.948, 118.47, 23.923, 0.586)
pt3dadd(37.921, 118.586, 23.912, 0.56)
pt3dadd(37.895, 118.703, 23.902, 0.534)
pt3dadd(37.868, 118.819, 23.891, 0.508)
pt3dadd(37.858, 118.938, 23.884, 0.496)
pt3dadd(37.854, 119.058, 23.878, 0.492)
pt3dadd(37.849, 119.177, 23.872, 0.488)
pt3dadd(37.845, 119.297, 23.866, 0.482)
pt3dadd(37.84, 119.417, 23.86, 0.478)
pt3dadd(37.836, 119.536, 23.854, 0.472)
pt3dadd(37.831, 119.656, 23.848, 0.468)
pt3dadd(37.827, 119.776, 23.842, 0.462)
pt3dadd(37.822, 119.895, 23.836, 0.458)
pt3dadd(37.818, 120.016, 23.83, 0.454)
pt3dadd(37.817, 120.134, 23.823, 0.452)
pt3dadd(37.818, 120.254, 23.817, 0.452)
pt3dadd(37.819, 120.374, 23.81, 0.452)
pt3dadd(37.82, 120.494, 23.804, 0.452)
pt3dadd(37.82, 120.614, 23.798, 0.452)
pt3dadd(37.821, 120.733, 23.791, 0.452)
pt3dadd(37.822, 120.853, 23.785, 0.452)
pt3dadd(37.822, 120.973, 23.778, 0.452)
pt3dadd(37.823, 121.093, 23.772, 0.452)
pt3dadd(37.824, 121.213, 23.765, 0.452)
pt3dadd(37.825, 121.332, 23.757, 0.48)
pt3dadd(37.826, 121.452, 23.747, 0.514)
pt3dadd(37.827, 121.571, 23.737, 0.55)
pt3dadd(37.829, 121.691, 23.728, 0.586)
pt3dadd(37.83, 121.81, 23.718, 0.62)
pt3dadd(37.831, 121.93, 23.709, 0.656)
pt3dadd(37.832, 122.048, 23.699, 0.692)
pt3dadd(37.833, 122.168, 23.69, 0.726)
pt3dadd(37.835, 122.287, 23.68, 0.762)
pt3dadd(37.836, 122.407, 23.67, 0.796)
pt3dadd(37.838, 122.525, 23.654, 0.844)
pt3dadd(37.84, 122.644, 23.635, 0.894)
pt3dadd(37.842, 122.761, 23.616, 0.944)
pt3dadd(37.844, 122.879, 23.597, 0.996)
pt3dadd(37.846, 122.996, 23.578, 1.046)
pt3dadd(37.849, 123.114, 23.559, 1.096)
pt3dadd(37.851, 123.233, 23.54, 1.146)
pt3dadd(37.853, 123.35, 23.521, 1.198)
pt3dadd(37.855, 123.468, 23.503, 1.248)
pt3dadd(37.857, 123.586, 23.484, 1.298)
pt3dadd(37.86, 123.698, 23.449, 1.29)
pt3dadd(37.864, 123.81, 23.413, 1.272)
pt3dadd(37.867, 123.922, 23.376, 1.254)
pt3dadd(37.87, 124.032, 23.339, 1.236)
pt3dadd(37.873, 124.144, 23.302, 1.218)
pt3dadd(37.877, 124.255, 23.265, 1.2)
pt3dadd(37.88, 124.367, 23.228, 1.182)
pt3dadd(37.883, 124.478, 23.191, 1.164)
pt3dadd(37.886, 124.59, 23.154, 1.146)
pt3dadd(37.89, 124.702, 23.117, 1.128)
pt3dadd(37.897, 124.817, 23.091, 1.094)
pt3dadd(37.905, 124.933, 23.067, 1.056)
pt3dadd(37.913, 125.05, 23.043, 1.018)
pt3dadd(37.921, 125.166, 23.019, 0.982)
pt3dadd(37.929, 125.281, 22.995, 0.944)
pt3dadd(37.938, 125.398, 22.971, 0.906)
pt3dadd(37.946, 125.514, 22.948, 0.87)
pt3dadd(37.954, 125.63, 22.924, 0.832)
pt3dadd(37.962, 125.747, 22.9, 0.796)
pt3dadd(37.97, 125.863, 22.876, 0.758)
pt3dadd(37.982, 125.981, 22.861, 0.758)
pt3dadd(37.995, 126.098, 22.847, 0.766)
pt3dadd(38.008, 126.217, 22.833, 0.774)
pt3dadd(38.021, 126.335, 22.82, 0.782)
pt3dadd(38.033, 126.454, 22.806, 0.79)
pt3dadd(38.046, 126.572, 22.793, 0.798)
pt3dadd(38.059, 126.69, 22.779, 0.806)
pt3dadd(38.072, 126.809, 22.766, 0.814)
pt3dadd(38.084, 126.926, 22.752, 0.822)
pt3dadd(38.097, 127.045, 22.739, 0.83)
pt3dadd(38.127, 127.16, 22.733, 0.828)
pt3dadd(38.16, 127.276, 22.729, 0.824)
pt3dadd(38.193, 127.391, 22.724, 0.82)
pt3dadd(38.226, 127.506, 22.72, 0.816)
pt3dadd(38.259, 127.621, 22.716, 0.812)
pt3dadd(38.292, 127.736, 22.712, 0.81)
pt3dadd(38.325, 127.852, 22.707, 0.806)
pt3dadd(38.358, 127.967, 22.703, 0.802)
pt3dadd(38.391, 128.082, 22.699, 0.798)
pt3dadd(38.424, 128.197, 22.694, 0.794)
}
}
proc shape3d_116() {
dend_7[18] { pt3dadd(38.463, 128.311, 22.694, 0.77)
pt3dadd(38.502, 128.424, 22.694, 0.746)
pt3dadd(38.541, 128.538, 22.694, 0.722)
pt3dadd(38.581, 128.652, 22.694, 0.696)
pt3dadd(38.62, 128.765, 22.694, 0.672)
pt3dadd(38.659, 128.879, 22.694, 0.648)
pt3dadd(38.698, 128.992, 22.694, 0.622)
pt3dadd(38.737, 129.106, 22.694, 0.598)
pt3dadd(38.777, 129.218, 22.694, 0.574)
pt3dadd(38.816, 129.332, 22.694, 0.548)
pt3dadd(38.843, 129.449, 22.694, 0.516)
pt3dadd(38.869, 129.566, 22.694, 0.484)
pt3dadd(38.896, 129.683, 22.694, 0.452)
pt3dadd(38.923, 129.8, 22.694, 0.42)
pt3dadd(38.949, 129.917, 22.694, 0.388)
pt3dadd(38.976, 130.034, 22.694, 0.356)
pt3dadd(39.003, 130.151, 22.694, 0.322)
pt3dadd(39.029, 130.268, 22.694, 0.29)
pt3dadd(39.056, 130.385, 22.694, 0.258)
pt3dadd(39.083, 130.502, 22.694, 0.226)
pt3dadd(39.096, 130.621, 22.694, 0.226)
pt3dadd(39.11, 130.74, 22.694, 0.226)
pt3dadd(39.123, 130.86, 22.694, 0.226)
pt3dadd(39.136, 130.979, 22.694, 0.226)
pt3dadd(39.15, 131.098, 22.694, 0.226)
pt3dadd(39.163, 131.218, 22.694, 0.226)
pt3dadd(39.177, 131.336, 22.694, 0.226)
pt3dadd(39.19, 131.455, 22.694, 0.226)
pt3dadd(39.204, 131.575, 22.694, 0.226)
pt3dadd(39.217, 131.694, 22.694, 0.226)
pt3dadd(39.218, 131.814, 22.693, 0.226)
pt3dadd(39.219, 131.934, 22.693, 0.226)
pt3dadd(39.219, 132.054, 22.693, 0.226)
pt3dadd(39.22, 132.174, 22.693, 0.226)
pt3dadd(39.221, 132.294, 22.693, 0.226)
pt3dadd(39.222, 132.414, 22.693, 0.226)
pt3dadd(39.222, 132.534, 22.693, 0.226)
pt3dadd(39.223, 132.654, 22.693, 0.226)
pt3dadd(39.224, 132.774, 22.693, 0.226)
pt3dadd(39.224, 132.894, 22.693, 0.226)
pt3dadd(39.225, 133.014, 22.693, 0.272)
pt3dadd(39.225, 133.134, 22.693, 0.316)
pt3dadd(39.225, 133.254, 22.693, 0.362)
pt3dadd(39.226, 133.374, 22.692, 0.408)
pt3dadd(39.226, 133.494, 22.692, 0.452)
pt3dadd(39.227, 133.614, 22.692, 0.498)
pt3dadd(39.227, 133.734, 22.692, 0.544)
pt3dadd(39.227, 133.854, 22.692, 0.59)
pt3dadd(39.228, 133.974, 22.692, 0.634)
pt3dadd(39.228, 134.094, 22.692, 0.68)
pt3dadd(39.229, 134.214, 22.691, 0.68)
pt3dadd(39.229, 134.334, 22.691, 0.678)
pt3dadd(39.23, 134.454, 22.691, 0.676)
pt3dadd(39.231, 134.574, 22.691, 0.674)
pt3dadd(39.232, 134.694, 22.691, 0.674)
pt3dadd(39.232, 134.814, 22.69, 0.672)
pt3dadd(39.233, 134.934, 22.69, 0.67)
pt3dadd(39.234, 135.054, 22.69, 0.668)
pt3dadd(39.234, 135.174, 22.69, 0.668)
pt3dadd(39.235, 135.294, 22.689, 0.666)
pt3dadd(39.237, 135.414, 22.689, 0.644)
pt3dadd(39.238, 135.534, 22.688, 0.624)
pt3dadd(39.239, 135.654, 22.688, 0.602)
pt3dadd(39.24, 135.774, 22.688, 0.58)
pt3dadd(39.242, 135.894, 22.687, 0.56)
pt3dadd(39.243, 136.014, 22.687, 0.538)
pt3dadd(39.244, 136.134, 22.686, 0.516)
pt3dadd(39.246, 136.254, 22.686, 0.494)
pt3dadd(39.247, 136.374, 22.685, 0.474)
pt3dadd(39.248, 136.494, 22.685, 0.452)
pt3dadd(39.251, 136.614, 22.684, 0.452)
pt3dadd(39.253, 136.734, 22.683, 0.452)
pt3dadd(39.256, 136.854, 22.682, 0.452)
pt3dadd(39.258, 136.974, 22.681, 0.452)
pt3dadd(39.261, 137.094, 22.68, 0.452)
pt3dadd(39.264, 137.214, 22.68, 0.452)
pt3dadd(39.266, 137.334, 22.679, 0.452)
pt3dadd(39.269, 137.454, 22.678, 0.452)
pt3dadd(39.271, 137.574, 22.677, 0.452)
pt3dadd(39.274, 137.694, 22.676, 0.452)
pt3dadd(39.279, 137.814, 22.674, 0.452)
pt3dadd(39.283, 137.934, 22.673, 0.452)
pt3dadd(39.288, 138.054, 22.671, 0.452)
pt3dadd(39.293, 138.173, 22.669, 0.452)
pt3dadd(39.298, 138.293, 22.667, 0.452)
pt3dadd(39.303, 138.413, 22.666, 0.452)
pt3dadd(39.308, 138.533, 22.664, 0.452)
pt3dadd(39.313, 138.653, 22.662, 0.452)
pt3dadd(39.318, 138.773, 22.661, 0.452)
pt3dadd(39.323, 138.893, 22.659, 0.452)
pt3dadd(39.333, 139.012, 22.656, 0.456)
pt3dadd(39.344, 139.132, 22.652, 0.458)
pt3dadd(39.354, 139.252, 22.649, 0.462)
pt3dadd(39.365, 139.37, 22.646, 0.466)
pt3dadd(39.376, 139.49, 22.642, 0.468)
pt3dadd(39.386, 139.609, 22.639, 0.472)
pt3dadd(39.397, 139.729, 22.636, 0.476)
pt3dadd(39.407, 139.848, 22.632, 0.478)
pt3dadd(39.418, 139.968, 22.629, 0.482)
pt3dadd(39.429, 140.087, 22.626, 0.486)
pt3dadd(39.447, 140.206, 22.618, 0.55)
pt3dadd(39.465, 140.324, 22.61, 0.614)
pt3dadd(39.482, 140.442, 22.602, 0.68)
pt3dadd(39.5, 140.561, 22.594, 0.744)
pt3dadd(39.518, 140.678, 22.586, 0.808)
pt3dadd(39.536, 140.797, 22.579, 0.872)
pt3dadd(39.554, 140.915, 22.571, 0.936)
pt3dadd(39.572, 141.034, 22.563, 1.002)
pt3dadd(39.59, 141.151, 22.555, 1.066)
pt3dadd(39.608, 141.27, 22.547, 1.13)
}
dend_7[19] {pt3dclear()
pt3dadd(39.608, 141.27, 22.547, 1.13)
pt3dadd(39.678, 141.366, 22.532, 1.13)
pt3dadd(39.748, 141.461, 22.516, 1.13)
pt3dadd(39.818, 141.557, 22.5, 1.13)
pt3dadd(39.881, 141.654, 22.477, 1.118)
pt3dadd(39.94, 141.754, 22.448, 1.098)
pt3dadd(39.999, 141.852, 22.419, 1.08)
pt3dadd(40.058, 141.95, 22.39, 1.06)
pt3dadd(40.117, 142.049, 22.361, 1.04)
pt3dadd(40.176, 142.147, 22.332, 1.02)
pt3dadd(40.235, 142.247, 22.303, 1)
pt3dadd(40.294, 142.345, 22.274, 0.982)
pt3dadd(40.353, 142.444, 22.245, 0.962)
pt3dadd(40.411, 142.542, 22.216, 0.942)
pt3dadd(40.456, 142.645, 22.181, 0.918)
pt3dadd(40.496, 142.748, 22.144, 0.892)
pt3dadd(40.537, 142.853, 22.107, 0.866)
pt3dadd(40.577, 142.956, 22.07, 0.84)
pt3dadd(40.617, 143.06, 22.032, 0.814)
pt3dadd(40.657, 143.164, 21.995, 0.788)
pt3dadd(40.697, 143.268, 21.958, 0.76)
pt3dadd(40.738, 143.372, 21.921, 0.734)
pt3dadd(40.778, 143.476, 21.884, 0.708)
pt3dadd(40.818, 143.58, 21.847, 0.682)
pt3dadd(40.857, 143.689, 21.822, 0.686)
pt3dadd(40.895, 143.8, 21.8, 0.694)
pt3dadd(40.934, 143.91, 21.778, 0.704)
pt3dadd(40.972, 144.02, 21.756, 0.712)
pt3dadd(41.011, 144.131, 21.734, 0.72)
pt3dadd(41.049, 144.242, 21.712, 0.73)
pt3dadd(41.088, 144.353, 21.69, 0.738)
pt3dadd(41.126, 144.463, 21.668, 0.748)
pt3dadd(41.165, 144.574, 21.646, 0.756)
pt3dadd(41.203, 144.684, 21.624, 0.766)
pt3dadd(41.254, 144.792, 21.612, 0.796)
pt3dadd(41.307, 144.899, 21.602, 0.83)
pt3dadd(41.36, 145.006, 21.592, 0.864)
pt3dadd(41.412, 145.112, 21.582, 0.9)
pt3dadd(41.465, 145.22, 21.572, 0.934)
pt3dadd(41.518, 145.327, 21.561, 0.968)
pt3dadd(41.571, 145.434, 21.551, 1.002)
pt3dadd(41.624, 145.541, 21.541, 1.038)
pt3dadd(41.676, 145.648, 21.531, 1.072)
pt3dadd(41.729, 145.756, 21.521, 1.106)
pt3dadd(41.776, 145.866, 21.518, 1.082)
pt3dadd(41.822, 145.976, 21.517, 1.05)
pt3dadd(41.868, 146.087, 21.516, 1.018)
pt3dadd(41.914, 146.198, 21.515, 0.986)
pt3dadd(41.96, 146.309, 21.514, 0.956)
pt3dadd(42.006, 146.419, 21.513, 0.924)
pt3dadd(42.052, 146.531, 21.511, 0.892)
pt3dadd(42.098, 146.641, 21.51, 0.86)
pt3dadd(42.144, 146.752, 21.509, 0.828)
pt3dadd(42.19, 146.863, 21.508, 0.796)
pt3dadd(42.247, 146.969, 21.507, 0.782)
pt3dadd(42.305, 147.074, 21.506, 0.77)
pt3dadd(42.363, 147.179, 21.505, 0.758)
pt3dadd(42.421, 147.284, 21.504, 0.748)
pt3dadd(42.479, 147.389, 21.503, 0.736)
pt3dadd(42.537, 147.494, 21.502, 0.724)
pt3dadd(42.595, 147.599, 21.501, 0.714)
pt3dadd(42.653, 147.704, 21.5, 0.702)
pt3dadd(42.711, 147.809, 21.499, 0.69)
pt3dadd(42.769, 147.914, 21.498, 0.68)
pt3dadd(42.828, 148.019, 21.496, 0.688)
pt3dadd(42.887, 148.123, 21.495, 0.7)
pt3dadd(42.946, 148.228, 21.493, 0.712)
pt3dadd(43.005, 148.332, 21.491, 0.722)
pt3dadd(43.065, 148.436, 21.489, 0.734)
pt3dadd(43.124, 148.541, 21.488, 0.746)
pt3dadd(43.183, 148.644, 21.486, 0.758)
pt3dadd(43.242, 148.748, 21.484, 0.77)
pt3dadd(43.302, 148.853, 21.483, 0.78)
pt3dadd(43.361, 148.957, 21.481, 0.792)
pt3dadd(43.413, 149.065, 21.478, 0.82)
pt3dadd(43.464, 149.174, 21.475, 0.85)
pt3dadd(43.515, 149.282, 21.472, 0.878)
pt3dadd(43.566, 149.392, 21.469, 0.908)
pt3dadd(43.617, 149.5, 21.466, 0.936)
pt3dadd(43.668, 149.609, 21.464, 0.966)
pt3dadd(43.719, 149.717, 21.461, 0.996)
pt3dadd(43.77, 149.826, 21.458, 1.024)
pt3dadd(43.821, 149.934, 21.455, 1.054)
pt3dadd(43.872, 150.042, 21.452, 1.082)
pt3dadd(43.94, 150.142, 21.446, 1.022)
pt3dadd(44.008, 150.24, 21.44, 0.954)
pt3dadd(44.077, 150.338, 21.433, 0.886)
pt3dadd(44.145, 150.436, 21.427, 0.816)
pt3dadd(44.214, 150.534, 21.421, 0.748)
pt3dadd(44.282, 150.632, 21.415, 0.68)
}
}
proc shape3d_117() {
dend_7[19] { pt3dadd(44.351, 150.731, 21.409, 0.612)
pt3dadd(44.419, 150.829, 21.402, 0.544)
pt3dadd(44.488, 150.928, 21.396, 0.476)
pt3dadd(44.556, 151.026, 21.39, 0.41)
pt3dadd(44.628, 151.121, 21.381, 0.388)
pt3dadd(44.701, 151.216, 21.371, 0.37)
pt3dadd(44.773, 151.312, 21.362, 0.352)
pt3dadd(44.845, 151.406, 21.353, 0.334)
pt3dadd(44.917, 151.501, 21.344, 0.316)
pt3dadd(44.99, 151.597, 21.334, 0.298)
pt3dadd(45.062, 151.692, 21.325, 0.28)
pt3dadd(45.134, 151.787, 21.316, 0.262)
pt3dadd(45.206, 151.883, 21.306, 0.244)
pt3dadd(45.279, 151.978, 21.297, 0.228)
pt3dadd(45.349, 152.069, 21.271, 0.244)
pt3dadd(45.42, 152.16, 21.245, 0.264)
pt3dadd(45.491, 152.252, 21.218, 0.284)
pt3dadd(45.562, 152.344, 21.191, 0.304)
pt3dadd(45.633, 152.435, 21.165, 0.324)
pt3dadd(45.704, 152.526, 21.138, 0.344)
pt3dadd(45.774, 152.617, 21.111, 0.364)
pt3dadd(45.845, 152.708, 21.084, 0.382)
pt3dadd(45.916, 152.801, 21.058, 0.402)
pt3dadd(45.985, 152.892, 21.029, 0.422)
pt3dadd(46.039, 152.987, 20.989, 0.438)
pt3dadd(46.094, 153.083, 20.948, 0.454)
pt3dadd(46.148, 153.178, 20.907, 0.468)
pt3dadd(46.203, 153.272, 20.866, 0.484)
pt3dadd(46.257, 153.368, 20.826, 0.5)
pt3dadd(46.311, 153.463, 20.785, 0.516)
pt3dadd(46.366, 153.558, 20.744, 0.532)
pt3dadd(46.42, 153.653, 20.703, 0.548)
pt3dadd(46.474, 153.749, 20.663, 0.562)
pt3dadd(46.528, 153.846, 20.627, 0.576)
pt3dadd(46.579, 153.952, 20.606, 0.584)
pt3dadd(46.63, 154.057, 20.584, 0.59)
pt3dadd(46.682, 154.163, 20.563, 0.598)
pt3dadd(46.733, 154.268, 20.541, 0.604)
pt3dadd(46.784, 154.374, 20.52, 0.612)
pt3dadd(46.835, 154.478, 20.498, 0.618)
pt3dadd(46.886, 154.584, 20.477, 0.626)
pt3dadd(46.938, 154.69, 20.455, 0.634)
pt3dadd(46.989, 154.795, 20.434, 0.64)
pt3dadd(47.043, 154.9, 20.417, 0.656)
pt3dadd(47.102, 155.004, 20.41, 0.69)
pt3dadd(47.161, 155.108, 20.402, 0.722)
pt3dadd(47.22, 155.213, 20.395, 0.754)
pt3dadd(47.279, 155.316, 20.387, 0.788)
pt3dadd(47.339, 155.42, 20.38, 0.82)
pt3dadd(47.398, 155.525, 20.372, 0.854)
pt3dadd(47.457, 155.628, 20.365, 0.886)
pt3dadd(47.516, 155.732, 20.357, 0.918)
pt3dadd(47.575, 155.837, 20.349, 0.952)
pt3dadd(47.635, 155.94, 20.345, 0.976)
pt3dadd(47.695, 156.044, 20.344, 0.982)
pt3dadd(47.755, 156.148, 20.344, 0.99)
pt3dadd(47.816, 156.252, 20.344, 0.996)
pt3dadd(47.876, 156.355, 20.344, 1.004)
pt3dadd(47.936, 156.46, 20.344, 1.012)
pt3dadd(47.996, 156.563, 20.344, 1.018)
pt3dadd(48.057, 156.667, 20.344, 1.026)
pt3dadd(48.117, 156.77, 20.344, 1.032)
pt3dadd(48.177, 156.874, 20.344, 1.04)
pt3dadd(48.249, 156.968, 20.343, 1.026)
pt3dadd(48.335, 157.052, 20.343, 0.99)
pt3dadd(48.421, 157.136, 20.343, 0.954)
pt3dadd(48.507, 157.22, 20.343, 0.916)
pt3dadd(48.592, 157.304, 20.343, 0.88)
pt3dadd(48.678, 157.388, 20.342, 0.844)
pt3dadd(48.764, 157.472, 20.342, 0.806)
pt3dadd(48.85, 157.556, 20.342, 0.77)
pt3dadd(48.935, 157.64, 20.342, 0.734)
pt3dadd(49.021, 157.724, 20.341, 0.696)
pt3dadd(49.104, 157.811, 20.341, 0.678)
pt3dadd(49.183, 157.902, 20.341, 0.678)
pt3dadd(49.262, 157.992, 20.34, 0.678)
pt3dadd(49.341, 158.082, 20.34, 0.678)
pt3dadd(49.419, 158.172, 20.34, 0.678)
pt3dadd(49.498, 158.263, 20.339, 0.678)
pt3dadd(49.577, 158.353, 20.339, 0.678)
pt3dadd(49.656, 158.443, 20.338, 0.678)
pt3dadd(49.735, 158.534, 20.338, 0.678)
pt3dadd(49.814, 158.624, 20.338, 0.678)
pt3dadd(49.878, 158.724, 20.337, 0.668)
pt3dadd(49.925, 158.834, 20.336, 0.648)
pt3dadd(49.972, 158.945, 20.335, 0.628)
pt3dadd(50.019, 159.055, 20.334, 0.608)
pt3dadd(50.066, 159.166, 20.334, 0.588)
pt3dadd(50.113, 159.276, 20.333, 0.568)
pt3dadd(50.16, 159.386, 20.332, 0.548)
pt3dadd(50.207, 159.497, 20.331, 0.528)
pt3dadd(50.254, 159.607, 20.33, 0.508)
pt3dadd(50.301, 159.718, 20.329, 0.488)
pt3dadd(50.336, 159.832, 20.328, 0.476)
pt3dadd(50.357, 159.95, 20.326, 0.474)
pt3dadd(50.379, 160.068, 20.325, 0.47)
pt3dadd(50.4, 160.186, 20.323, 0.468)
pt3dadd(50.422, 160.304, 20.321, 0.466)
pt3dadd(50.443, 160.422, 20.32, 0.464)
pt3dadd(50.465, 160.541, 20.318, 0.46)
pt3dadd(50.486, 160.658, 20.316, 0.458)
pt3dadd(50.507, 160.776, 20.315, 0.456)
pt3dadd(50.529, 160.895, 20.313, 0.454)
pt3dadd(50.546, 161.014, 20.311, 0.452)
pt3dadd(50.559, 161.132, 20.307, 0.452)
pt3dadd(50.572, 161.251, 20.304, 0.452)
pt3dadd(50.585, 161.371, 20.301, 0.452)
pt3dadd(50.598, 161.49, 20.298, 0.452)
pt3dadd(50.611, 161.609, 20.295, 0.452)
pt3dadd(50.624, 161.729, 20.292, 0.452)
pt3dadd(50.637, 161.848, 20.288, 0.452)
pt3dadd(50.65, 161.966, 20.285, 0.452)
pt3dadd(50.663, 162.086, 20.282, 0.452)
pt3dadd(50.677, 162.205, 20.277, 0.458)
pt3dadd(50.693, 162.324, 20.27, 0.47)
pt3dadd(50.709, 162.443, 20.263, 0.482)
pt3dadd(50.724, 162.562, 20.256, 0.492)
pt3dadd(50.74, 162.68, 20.249, 0.504)
pt3dadd(50.756, 162.798, 20.242, 0.516)
pt3dadd(50.772, 162.917, 20.235, 0.528)
pt3dadd(50.787, 163.036, 20.228, 0.538)
pt3dadd(50.803, 163.154, 20.221, 0.55)
pt3dadd(50.819, 163.273, 20.215, 0.562)
pt3dadd(50.846, 163.388, 20.205, 0.574)
pt3dadd(50.884, 163.502, 20.193, 0.584)
pt3dadd(50.921, 163.615, 20.181, 0.596)
pt3dadd(50.959, 163.728, 20.168, 0.606)
pt3dadd(50.996, 163.841, 20.156, 0.618)
pt3dadd(51.034, 163.954, 20.144, 0.63)
pt3dadd(51.071, 164.068, 20.132, 0.64)
pt3dadd(51.109, 164.18, 20.12, 0.652)
pt3dadd(51.146, 164.293, 20.108, 0.664)
pt3dadd(51.184, 164.406, 20.096, 0.674)
pt3dadd(51.236, 164.51, 20.073, 0.67)
pt3dadd(51.294, 164.61, 20.047, 0.658)
pt3dadd(51.353, 164.71, 20.02, 0.646)
pt3dadd(51.411, 164.809, 19.993, 0.634)
pt3dadd(51.47, 164.909, 19.967, 0.622)
pt3dadd(51.528, 165.008, 19.94, 0.61)
pt3dadd(51.587, 165.109, 19.913, 0.598)
pt3dadd(51.646, 165.209, 19.887, 0.586)
pt3dadd(51.704, 165.308, 19.86, 0.572)
pt3dadd(51.763, 165.408, 19.833, 0.56)
pt3dadd(51.823, 165.492, 19.784, 0.538)
pt3dadd(51.883, 165.575, 19.731, 0.514)
pt3dadd(51.943, 165.658, 19.679, 0.49)
pt3dadd(52.003, 165.74, 19.626, 0.468)
pt3dadd(52.063, 165.822, 19.573, 0.444)
pt3dadd(52.123, 165.905, 19.521, 0.42)
pt3dadd(52.183, 165.988, 19.468, 0.396)
pt3dadd(52.243, 166.07, 19.416, 0.372)
pt3dadd(52.303, 166.153, 19.363, 0.348)
pt3dadd(52.363, 166.235, 19.31, 0.324)
pt3dadd(52.432, 166.32, 19.269, 0.356)
pt3dadd(52.501, 166.405, 19.229, 0.392)
pt3dadd(52.571, 166.49, 19.189, 0.428)
pt3dadd(52.64, 166.576, 19.149, 0.462)
pt3dadd(52.71, 166.661, 19.108, 0.498)
pt3dadd(52.779, 166.745, 19.068, 0.534)
pt3dadd(52.849, 166.83, 19.028, 0.57)
pt3dadd(52.918, 166.915, 18.987, 0.606)
pt3dadd(52.988, 167, 18.947, 0.64)
pt3dadd(53.057, 167.086, 18.907, 0.676)
pt3dadd(53.103, 167.174, 18.852, 0.678)
pt3dadd(53.148, 167.264, 18.797, 0.678)
pt3dadd(53.192, 167.353, 18.741, 0.678)
pt3dadd(53.237, 167.443, 18.686, 0.678)
pt3dadd(53.282, 167.532, 18.631, 0.678)
pt3dadd(53.326, 167.622, 18.575, 0.678)
pt3dadd(53.371, 167.711, 18.52, 0.678)
pt3dadd(53.416, 167.801, 18.465, 0.678)
pt3dadd(53.46, 167.89, 18.409, 0.678)
pt3dadd(53.505, 167.98, 18.354, 0.678)
pt3dadd(53.565, 168.071, 18.313, 0.678)
pt3dadd(53.626, 168.162, 18.274, 0.678)
pt3dadd(53.688, 168.254, 18.234, 0.678)
pt3dadd(53.749, 168.346, 18.194, 0.678)
pt3dadd(53.81, 168.437, 18.154, 0.678)
pt3dadd(53.871, 168.529, 18.115, 0.678)
pt3dadd(53.932, 168.62, 18.075, 0.678)
pt3dadd(53.994, 168.712, 18.035, 0.678)
pt3dadd(54.055, 168.803, 17.996, 0.678)
pt3dadd(54.116, 168.895, 17.956, 0.678)
pt3dadd(54.177, 168.978, 17.905, 0.688)
pt3dadd(54.239, 169.061, 17.854, 0.7)
pt3dadd(54.3, 169.144, 17.802, 0.71)
pt3dadd(54.362, 169.226, 17.751, 0.72)
pt3dadd(54.423, 169.309, 17.7, 0.732)
pt3dadd(54.485, 169.391, 17.649, 0.742)
pt3dadd(54.546, 169.474, 17.598, 0.752)
pt3dadd(54.608, 169.556, 17.547, 0.764)
pt3dadd(54.669, 169.639, 17.496, 0.774)
pt3dadd(54.732, 169.721, 17.444, 0.782)
pt3dadd(54.798, 169.796, 17.388, 0.776)
pt3dadd(54.864, 169.871, 17.333, 0.77)
pt3dadd(54.931, 169.946, 17.278, 0.764)
pt3dadd(54.997, 170.021, 17.223, 0.758)
pt3dadd(55.063, 170.095, 17.168, 0.754)
pt3dadd(55.13, 170.171, 17.112, 0.748)
pt3dadd(55.196, 170.245, 17.057, 0.742)
}
}
proc shape3d_118() {
dend_7[19] { pt3dadd(55.262, 170.321, 17.002, 0.736)
pt3dadd(55.329, 170.395, 16.947, 0.73)
pt3dadd(55.397, 170.471, 16.894, 0.718)
pt3dadd(55.472, 170.545, 16.846, 0.69)
pt3dadd(55.546, 170.62, 16.799, 0.662)
pt3dadd(55.62, 170.694, 16.751, 0.634)
pt3dadd(55.695, 170.77, 16.703, 0.608)
pt3dadd(55.769, 170.844, 16.655, 0.58)
pt3dadd(55.844, 170.918, 16.608, 0.552)
pt3dadd(55.918, 170.994, 16.56, 0.524)
pt3dadd(55.992, 171.068, 16.512, 0.496)
pt3dadd(56.067, 171.143, 16.464, 0.468)
pt3dadd(56.14, 171.216, 16.414, 0.45)
pt3dadd(56.211, 171.288, 16.36, 0.444)
pt3dadd(56.282, 171.36, 16.306, 0.436)
pt3dadd(56.353, 171.431, 16.251, 0.43)
pt3dadd(56.424, 171.503, 16.197, 0.424)
pt3dadd(56.495, 171.574, 16.143, 0.418)
pt3dadd(56.566, 171.646, 16.088, 0.412)
pt3dadd(56.637, 171.718, 16.034, 0.406)
pt3dadd(56.708, 171.788, 15.98, 0.398)
pt3dadd(56.779, 171.86, 15.926, 0.392)
pt3dadd(56.856, 171.937, 15.885, 0.38)
pt3dadd(56.936, 172.019, 15.855, 0.364)
pt3dadd(57.016, 172.1, 15.825, 0.348)
pt3dadd(57.097, 172.182, 15.795, 0.332)
pt3dadd(57.177, 172.262, 15.765, 0.316)
pt3dadd(57.258, 172.344, 15.735, 0.298)
pt3dadd(57.338, 172.426, 15.705, 0.282)
pt3dadd(57.419, 172.507, 15.675, 0.266)
pt3dadd(57.499, 172.589, 15.645, 0.25)
pt3dadd(57.58, 172.67, 15.615, 0.234)
pt3dadd(57.661, 172.753, 15.59, 0.226)
pt3dadd(57.743, 172.837, 15.57, 0.226)
pt3dadd(57.826, 172.92, 15.549, 0.226)
pt3dadd(57.908, 173.004, 15.528, 0.226)
pt3dadd(57.99, 173.088, 15.507, 0.226)
pt3dadd(58.072, 173.172, 15.487, 0.226)
pt3dadd(58.155, 173.256, 15.466, 0.226)
pt3dadd(58.237, 173.339, 15.445, 0.226)
pt3dadd(58.319, 173.423, 15.424, 0.226)
pt3dadd(58.401, 173.507, 15.404, 0.226)
pt3dadd(58.48, 173.588, 15.372, 0.226)
pt3dadd(58.556, 173.668, 15.331, 0.226)
pt3dadd(58.632, 173.747, 15.291, 0.226)
pt3dadd(58.707, 173.826, 15.25, 0.226)
pt3dadd(58.783, 173.905, 15.21, 0.226)
pt3dadd(58.859, 173.984, 15.17, 0.226)
pt3dadd(58.935, 174.064, 15.129, 0.226)
pt3dadd(59.011, 174.143, 15.088, 0.226)
pt3dadd(59.087, 174.222, 15.048, 0.226)
pt3dadd(59.163, 174.301, 15.008, 0.226)
pt3dadd(59.24, 174.384, 14.974, 0.226)
pt3dadd(59.317, 174.469, 14.945, 0.226)
pt3dadd(59.395, 174.553, 14.916, 0.226)
pt3dadd(59.472, 174.638, 14.887, 0.226)
pt3dadd(59.55, 174.722, 14.857, 0.226)
pt3dadd(59.627, 174.808, 14.828, 0.226)
pt3dadd(59.704, 174.893, 14.799, 0.226)
pt3dadd(59.782, 174.977, 14.77, 0.226)
pt3dadd(59.859, 175.062, 14.741, 0.226)
pt3dadd(59.937, 175.146, 14.711, 0.226)
pt3dadd(60.015, 175.234, 14.69, 0.232)
pt3dadd(60.093, 175.322, 14.673, 0.24)
pt3dadd(60.171, 175.411, 14.656, 0.25)
pt3dadd(60.249, 175.5, 14.639, 0.258)
pt3dadd(60.328, 175.589, 14.622, 0.268)
pt3dadd(60.406, 175.676, 14.605, 0.276)
pt3dadd(60.484, 175.765, 14.587, 0.286)
pt3dadd(60.562, 175.854, 14.57, 0.294)
pt3dadd(60.64, 175.943, 14.553, 0.304)
pt3dadd(60.719, 176.032, 14.536, 0.312)
pt3dadd(60.795, 176.123, 14.524, 0.33)
pt3dadd(60.87, 176.216, 14.515, 0.348)
pt3dadd(60.945, 176.309, 14.505, 0.368)
pt3dadd(61.02, 176.401, 14.496, 0.388)
pt3dadd(61.096, 176.495, 14.486, 0.408)
pt3dadd(61.171, 176.587, 14.477, 0.428)
pt3dadd(61.246, 176.68, 14.467, 0.446)
pt3dadd(61.321, 176.773, 14.458, 0.466)
pt3dadd(61.397, 176.866, 14.448, 0.486)
pt3dadd(61.472, 176.958, 14.439, 0.506)
pt3dadd(61.537, 177.059, 14.434, 0.536)
pt3dadd(61.597, 177.162, 14.431, 0.57)
pt3dadd(61.658, 177.265, 14.429, 0.604)
pt3dadd(61.719, 177.37, 14.426, 0.638)
pt3dadd(61.779, 177.473, 14.423, 0.672)
pt3dadd(61.84, 177.576, 14.42, 0.706)
pt3dadd(61.901, 177.679, 14.417, 0.74)
pt3dadd(61.962, 177.782, 14.415, 0.774)
pt3dadd(62.022, 177.887, 14.412, 0.808)
pt3dadd(62.083, 177.99, 14.409, 0.842)
pt3dadd(62.149, 178.09, 14.404, 0.856)
pt3dadd(62.218, 178.188, 14.398, 0.862)
pt3dadd(62.287, 178.285, 14.392, 0.866)
pt3dadd(62.356, 178.384, 14.386, 0.872)
pt3dadd(62.425, 178.482, 14.38, 0.876)
pt3dadd(62.493, 178.579, 14.374, 0.882)
pt3dadd(62.562, 178.678, 14.368, 0.888)
pt3dadd(62.631, 178.776, 14.362, 0.892)
pt3dadd(62.7, 178.873, 14.356, 0.898)
pt3dadd(62.769, 178.972, 14.35, 0.902)
pt3dadd(62.842, 179.066, 14.342, 0.888)
pt3dadd(62.916, 179.16, 14.333, 0.864)
pt3dadd(62.991, 179.254, 14.324, 0.84)
pt3dadd(63.065, 179.347, 14.315, 0.816)
pt3dadd(63.14, 179.441, 14.306, 0.792)
pt3dadd(63.214, 179.534, 14.298, 0.768)
pt3dadd(63.289, 179.628, 14.289, 0.746)
pt3dadd(63.363, 179.72, 14.28, 0.722)
pt3dadd(63.438, 179.814, 14.271, 0.698)
pt3dadd(63.512, 179.908, 14.262, 0.674)
pt3dadd(63.589, 179.999, 14.249, 0.636)
pt3dadd(63.667, 180.088, 14.235, 0.59)
pt3dadd(63.746, 180.178, 14.221, 0.546)
pt3dadd(63.824, 180.266, 14.206, 0.502)
pt3dadd(63.902, 180.355, 14.192, 0.458)
pt3dadd(63.98, 180.445, 14.178, 0.414)
pt3dadd(64.059, 180.534, 14.163, 0.37)
pt3dadd(64.137, 180.624, 14.149, 0.324)
pt3dadd(64.215, 180.713, 14.135, 0.28)
pt3dadd(64.293, 180.803, 14.12, 0.236)
pt3dadd(64.364, 180.889, 14.085, 0.226)
pt3dadd(64.432, 180.974, 14.044, 0.226)
pt3dadd(64.501, 181.06, 14.003, 0.226)
pt3dadd(64.569, 181.146, 13.962, 0.226)
pt3dadd(64.637, 181.231, 13.921, 0.226)
pt3dadd(64.705, 181.316, 13.881, 0.226)
pt3dadd(64.774, 181.403, 13.84, 0.226)
pt3dadd(64.842, 181.488, 13.799, 0.226)
pt3dadd(64.91, 181.573, 13.758, 0.226)
pt3dadd(64.979, 181.66, 13.717, 0.226)
pt3dadd(65.07, 181.718, 13.679, 0.226)
pt3dadd(65.169, 181.77, 13.641, 0.226)
pt3dadd(65.267, 181.823, 13.604, 0.226)
pt3dadd(65.366, 181.874, 13.567, 0.226)
pt3dadd(65.464, 181.926, 13.53, 0.226)
pt3dadd(65.563, 181.978, 13.493, 0.226)
pt3dadd(65.662, 182.03, 13.456, 0.226)
pt3dadd(65.76, 182.082, 13.418, 0.226)
pt3dadd(65.859, 182.134, 13.381, 0.226)
pt3dadd(65.957, 182.185, 13.344, 0.226)
pt3dadd(66.07, 182.206, 13.315, 0.258)
pt3dadd(66.184, 182.22, 13.288, 0.292)
pt3dadd(66.298, 182.234, 13.26, 0.328)
pt3dadd(66.413, 182.25, 13.233, 0.364)
pt3dadd(66.527, 182.264, 13.205, 0.4)
pt3dadd(66.642, 182.279, 13.178, 0.436)
pt3dadd(66.756, 182.294, 13.15, 0.472)
pt3dadd(66.871, 182.309, 13.123, 0.506)
pt3dadd(66.985, 182.323, 13.095, 0.542)
pt3dadd(67.099, 182.339, 13.068, 0.578)
pt3dadd(67.212, 182.335, 13.032, 0.562)
pt3dadd(67.324, 182.33, 12.997, 0.544)
pt3dadd(67.436, 182.327, 12.961, 0.526)
pt3dadd(67.548, 182.322, 12.925, 0.508)
pt3dadd(67.66, 182.318, 12.89, 0.49)
pt3dadd(67.772, 182.315, 12.854, 0.472)
pt3dadd(67.884, 182.31, 12.818, 0.454)
pt3dadd(67.996, 182.306, 12.783, 0.436)
pt3dadd(68.108, 182.302, 12.747, 0.418)
pt3dadd(68.22, 182.298, 12.711, 0.4)
pt3dadd(68.331, 182.276, 12.679, 0.382)
pt3dadd(68.443, 182.255, 12.647, 0.364)
pt3dadd(68.554, 182.233, 12.614, 0.348)
pt3dadd(68.666, 182.212, 12.582, 0.33)
pt3dadd(68.777, 182.19, 12.55, 0.312)
pt3dadd(68.889, 182.168, 12.517, 0.294)
pt3dadd(69, 182.148, 12.485, 0.278)
pt3dadd(69.112, 182.126, 12.453, 0.26)
pt3dadd(69.223, 182.105, 12.42, 0.242)
pt3dadd(69.335, 182.082, 12.389, 0.226)
pt3dadd(69.449, 182.058, 12.365, 0.226)
pt3dadd(69.563, 182.033, 12.342, 0.226)
pt3dadd(69.677, 182.008, 12.319, 0.226)
pt3dadd(69.791, 181.984, 12.295, 0.226)
pt3dadd(69.905, 181.958, 12.272, 0.226)
pt3dadd(70.019, 181.934, 12.248, 0.226)
pt3dadd(70.133, 181.909, 12.225, 0.226)
pt3dadd(70.247, 181.884, 12.202, 0.226)
pt3dadd(70.361, 181.86, 12.178, 0.226)
pt3dadd(70.476, 181.841, 12.156, 0.226)
pt3dadd(70.593, 181.853, 12.14, 0.226)
pt3dadd(70.711, 181.866, 12.124, 0.226)
pt3dadd(70.829, 181.878, 12.108, 0.226)
pt3dadd(70.947, 181.891, 12.092, 0.226)
pt3dadd(71.065, 181.903, 12.076, 0.226)
pt3dadd(71.182, 181.916, 12.06, 0.226)
pt3dadd(71.3, 181.928, 12.044, 0.226)
pt3dadd(71.418, 181.942, 12.028, 0.226)
pt3dadd(71.536, 181.954, 12.012, 0.226)
pt3dadd(71.643, 181.993, 11.997, 0.23)
pt3dadd(71.739, 182.064, 11.984, 0.238)
pt3dadd(71.835, 182.135, 11.971, 0.246)
pt3dadd(71.931, 182.204, 11.958, 0.256)
pt3dadd(72.027, 182.275, 11.945, 0.264)
pt3dadd(72.122, 182.346, 11.932, 0.272)
pt3dadd(72.218, 182.417, 11.919, 0.28)
pt3dadd(72.314, 182.486, 11.906, 0.288)
pt3dadd(72.41, 182.557, 11.892, 0.298)
}
}
proc shape3d_119() {
dend_7[19] { pt3dadd(72.506, 182.628, 11.879, 0.306)
pt3dadd(72.571, 182.722, 11.856, 0.33)
pt3dadd(72.622, 182.824, 11.829, 0.36)
pt3dadd(72.674, 182.927, 11.801, 0.39)
pt3dadd(72.725, 183.03, 11.773, 0.422)
pt3dadd(72.777, 183.133, 11.746, 0.452)
pt3dadd(72.828, 183.236, 11.718, 0.482)
pt3dadd(72.88, 183.34, 11.691, 0.512)
pt3dadd(72.932, 183.443, 11.663, 0.544)
pt3dadd(72.983, 183.546, 11.635, 0.574)
pt3dadd(73.035, 183.649, 11.608, 0.604)
pt3dadd(73.068, 183.74, 11.55, 0.58)
pt3dadd(73.097, 183.828, 11.486, 0.546)
pt3dadd(73.127, 183.916, 11.423, 0.51)
pt3dadd(73.156, 184.003, 11.359, 0.476)
pt3dadd(73.186, 184.091, 11.295, 0.44)
pt3dadd(73.215, 184.178, 11.232, 0.406)
pt3dadd(73.245, 184.267, 11.168, 0.372)
pt3dadd(73.275, 184.355, 11.105, 0.336)
pt3dadd(73.304, 184.442, 11.041, 0.302)
pt3dadd(73.334, 184.53, 10.978, 0.268)
pt3dadd(73.358, 184.619, 10.913, 0.278)
pt3dadd(73.381, 184.708, 10.849, 0.296)
pt3dadd(73.404, 184.796, 10.785, 0.316)
pt3dadd(73.427, 184.885, 10.721, 0.334)
pt3dadd(73.45, 184.974, 10.656, 0.354)
pt3dadd(73.473, 185.064, 10.592, 0.372)
pt3dadd(73.497, 185.153, 10.528, 0.39)
pt3dadd(73.52, 185.242, 10.463, 0.41)
pt3dadd(73.543, 185.33, 10.399, 0.428)
pt3dadd(73.566, 185.419, 10.335, 0.448)
pt3dadd(73.619, 185.515, 10.297, 0.436)
pt3dadd(73.677, 185.612, 10.264, 0.418)
pt3dadd(73.736, 185.71, 10.232, 0.4)
pt3dadd(73.794, 185.807, 10.199, 0.382)
pt3dadd(73.852, 185.904, 10.166, 0.364)
pt3dadd(73.91, 186.001, 10.133, 0.346)
pt3dadd(73.969, 186.098, 10.1, 0.33)
pt3dadd(74.027, 186.196, 10.067, 0.312)
pt3dadd(74.085, 186.293, 10.034, 0.294)
pt3dadd(74.143, 186.39, 10.001, 0.276)
pt3dadd(74.209, 186.488, 9.983, 0.27)
pt3dadd(74.276, 186.586, 9.967, 0.264)
pt3dadd(74.343, 186.684, 9.95, 0.26)
pt3dadd(74.41, 186.781, 9.934, 0.254)
pt3dadd(74.477, 186.878, 9.918, 0.25)
pt3dadd(74.543, 186.977, 9.902, 0.246)
pt3dadd(74.61, 187.074, 9.886, 0.24)
pt3dadd(74.677, 187.172, 9.87, 0.236)
pt3dadd(74.744, 187.27, 9.854, 0.232)
pt3dadd(74.811, 187.368, 9.838, 0.226)
pt3dadd(74.871, 187.471, 9.831, 0.226)
pt3dadd(74.931, 187.574, 9.825, 0.226)
pt3dadd(74.991, 187.679, 9.819, 0.226)
pt3dadd(75.051, 187.782, 9.813, 0.226)
pt3dadd(75.111, 187.885, 9.807, 0.226)
pt3dadd(75.171, 187.99, 9.801, 0.226)
pt3dadd(75.231, 188.093, 9.795, 0.226)
pt3dadd(75.291, 188.197, 9.789, 0.226)
pt3dadd(75.35, 188.3, 9.784, 0.226)
pt3dadd(75.41, 188.405, 9.778, 0.226)
pt3dadd(75.455, 188.516, 9.778, 0.226)
pt3dadd(75.5, 188.627, 9.778, 0.226)
pt3dadd(75.544, 188.738, 9.778, 0.226)
pt3dadd(75.589, 188.85, 9.778, 0.226)
pt3dadd(75.634, 188.962, 9.778, 0.226)
pt3dadd(75.678, 189.073, 9.778, 0.226)
pt3dadd(75.723, 189.185, 9.778, 0.226)
pt3dadd(75.768, 189.295, 9.778, 0.226)
pt3dadd(75.812, 189.407, 9.778, 0.226)
pt3dadd(75.857, 189.518, 9.778, 0.226)
}
dend_7[20] {pt3dclear()
pt3dadd(39.608, 141.27, 22.547, 1.13)
pt3dadd(39.592, 141.346, 22.554, 1.09)
pt3dadd(39.566, 141.462, 22.563, 1.03)
pt3dadd(39.54, 141.578, 22.573, 0.97)
pt3dadd(39.514, 141.696, 22.583, 0.91)
pt3dadd(39.489, 141.812, 22.593, 0.85)
pt3dadd(39.463, 141.929, 22.602, 0.79)
pt3dadd(39.437, 142.045, 22.612, 0.73)
pt3dadd(39.411, 142.162, 22.622, 0.67)
pt3dadd(39.385, 142.278, 22.632, 0.608)
pt3dadd(39.359, 142.394, 22.642, 0.548)
pt3dadd(39.333, 142.512, 22.651, 0.488)
pt3dadd(39.307, 142.628, 22.661, 0.428)
pt3dadd(39.281, 142.745, 22.669, 0.378)
pt3dadd(39.256, 142.862, 22.672, 0.362)
pt3dadd(39.23, 142.979, 22.674, 0.346)
pt3dadd(39.205, 143.096, 22.677, 0.332)
pt3dadd(39.179, 143.214, 22.679, 0.316)
pt3dadd(39.153, 143.33, 22.681, 0.3)
pt3dadd(39.128, 143.448, 22.684, 0.284)
pt3dadd(39.102, 143.566, 22.686, 0.27)
pt3dadd(39.077, 143.682, 22.688, 0.254)
pt3dadd(39.051, 143.8, 22.691, 0.238)
pt3dadd(39.023, 143.916, 22.692, 0.23)
pt3dadd(38.988, 144.031, 22.692, 0.246)
pt3dadd(38.952, 144.145, 22.692, 0.262)
pt3dadd(38.917, 144.26, 22.692, 0.278)
pt3dadd(38.881, 144.374, 22.691, 0.294)
pt3dadd(38.846, 144.49, 22.691, 0.31)
pt3dadd(38.81, 144.604, 22.691, 0.326)
pt3dadd(38.775, 144.719, 22.691, 0.342)
pt3dadd(38.739, 144.833, 22.69, 0.358)
pt3dadd(38.704, 144.948, 22.69, 0.374)
pt3dadd(38.666, 145.062, 22.69, 0.392)
pt3dadd(38.622, 145.174, 22.69, 0.412)
pt3dadd(38.578, 145.285, 22.689, 0.43)
pt3dadd(38.534, 145.397, 22.689, 0.45)
pt3dadd(38.489, 145.508, 22.688, 0.47)
pt3dadd(38.445, 145.62, 22.688, 0.49)
pt3dadd(38.401, 145.732, 22.688, 0.508)
pt3dadd(38.357, 145.843, 22.687, 0.528)
pt3dadd(38.313, 145.955, 22.687, 0.548)
pt3dadd(38.269, 146.066, 22.686, 0.566)
pt3dadd(38.229, 146.179, 22.686, 0.57)
pt3dadd(38.201, 146.296, 22.685, 0.536)
pt3dadd(38.173, 146.412, 22.685, 0.504)
pt3dadd(38.145, 146.528, 22.684, 0.47)
pt3dadd(38.116, 146.646, 22.683, 0.436)
pt3dadd(38.088, 146.762, 22.683, 0.402)
pt3dadd(38.06, 146.879, 22.682, 0.37)
pt3dadd(38.032, 146.995, 22.681, 0.336)
pt3dadd(38.004, 147.112, 22.681, 0.302)
pt3dadd(37.975, 147.229, 22.68, 0.268)
pt3dadd(37.952, 147.346, 22.679, 0.258)
pt3dadd(37.938, 147.466, 22.678, 0.296)
pt3dadd(37.924, 147.584, 22.676, 0.334)
pt3dadd(37.91, 147.703, 22.675, 0.372)
pt3dadd(37.896, 147.823, 22.673, 0.41)
pt3dadd(37.883, 147.942, 22.672, 0.45)
pt3dadd(37.869, 148.061, 22.671, 0.488)
pt3dadd(37.855, 148.181, 22.669, 0.526)
pt3dadd(37.841, 148.3, 22.668, 0.564)
pt3dadd(37.827, 148.418, 22.666, 0.602)
pt3dadd(37.817, 148.538, 22.665, 0.62)
pt3dadd(37.814, 148.658, 22.662, 0.59)
pt3dadd(37.812, 148.778, 22.659, 0.562)
pt3dadd(37.809, 148.898, 22.657, 0.534)
pt3dadd(37.806, 149.018, 22.654, 0.506)
pt3dadd(37.803, 149.138, 22.651, 0.476)
pt3dadd(37.801, 149.258, 22.649, 0.448)
pt3dadd(37.798, 149.378, 22.646, 0.42)
pt3dadd(37.795, 149.497, 22.643, 0.392)
pt3dadd(37.792, 149.617, 22.64, 0.362)
pt3dadd(37.79, 149.737, 22.637, 0.348)
pt3dadd(37.788, 149.857, 22.631, 0.364)
pt3dadd(37.786, 149.977, 22.625, 0.378)
pt3dadd(37.784, 150.097, 22.62, 0.394)
pt3dadd(37.782, 150.217, 22.614, 0.408)
pt3dadd(37.779, 150.336, 22.608, 0.422)
pt3dadd(37.777, 150.456, 22.602, 0.438)
pt3dadd(37.775, 150.576, 22.597, 0.452)
pt3dadd(37.773, 150.696, 22.591, 0.468)
pt3dadd(37.771, 150.816, 22.585, 0.482)
pt3dadd(37.769, 150.935, 22.578, 0.496)
pt3dadd(37.765, 151.055, 22.569, 0.504)
pt3dadd(37.761, 151.174, 22.559, 0.512)
pt3dadd(37.757, 151.294, 22.55, 0.522)
pt3dadd(37.753, 151.412, 22.541, 0.53)
pt3dadd(37.75, 151.532, 22.531, 0.538)
pt3dadd(37.746, 151.651, 22.522, 0.548)
pt3dadd(37.742, 151.771, 22.513, 0.556)
pt3dadd(37.738, 151.89, 22.503, 0.564)
pt3dadd(37.734, 152.01, 22.494, 0.574)
pt3dadd(37.729, 152.129, 22.481, 0.574)
pt3dadd(37.722, 152.246, 22.461, 0.562)
pt3dadd(37.715, 152.363, 22.441, 0.55)
pt3dadd(37.708, 152.48, 22.42, 0.536)
pt3dadd(37.701, 152.598, 22.4, 0.524)
pt3dadd(37.694, 152.716, 22.38, 0.51)
pt3dadd(37.686, 152.832, 22.36, 0.498)
pt3dadd(37.679, 152.95, 22.34, 0.486)
pt3dadd(37.672, 153.067, 22.319, 0.472)
pt3dadd(37.665, 153.185, 22.299, 0.46)
pt3dadd(37.656, 153.299, 22.272, 0.452)
pt3dadd(37.645, 153.41, 22.236, 0.454)
pt3dadd(37.633, 153.522, 22.2, 0.454)
pt3dadd(37.622, 153.634, 22.164, 0.456)
pt3dadd(37.61, 153.744, 22.127, 0.458)
pt3dadd(37.599, 153.856, 22.091, 0.458)
pt3dadd(37.587, 153.967, 22.055, 0.46)
pt3dadd(37.575, 154.078, 22.019, 0.46)
pt3dadd(37.564, 154.189, 21.983, 0.462)
pt3dadd(37.552, 154.301, 21.946, 0.464)
pt3dadd(37.537, 154.414, 21.915, 0.472)
pt3dadd(37.515, 154.528, 21.892, 0.49)
pt3dadd(37.494, 154.643, 21.868, 0.508)
pt3dadd(37.473, 154.757, 21.845, 0.526)
pt3dadd(37.451, 154.872, 21.821, 0.544)
pt3dadd(37.43, 154.986, 21.798, 0.564)
pt3dadd(37.409, 155.101, 21.774, 0.582)
pt3dadd(37.387, 155.215, 21.75, 0.6)
pt3dadd(37.366, 155.33, 21.727, 0.618)
pt3dadd(37.345, 155.446, 21.703, 0.636)
pt3dadd(37.312, 155.557, 21.684, 0.638)
pt3dadd(37.262, 155.665, 21.672, 0.612)
pt3dadd(37.213, 155.773, 21.66, 0.586)
pt3dadd(37.163, 155.882, 21.648, 0.56)
pt3dadd(37.113, 155.99, 21.636, 0.534)
pt3dadd(37.064, 156.098, 21.623, 0.51)
}
}
proc shape3d_120() {
dend_7[20] { pt3dadd(37.014, 156.206, 21.611, 0.484)
pt3dadd(36.965, 156.316, 21.599, 0.458)
pt3dadd(36.915, 156.424, 21.587, 0.432)
pt3dadd(36.866, 156.532, 21.575, 0.408)
pt3dadd(36.811, 156.638, 21.566, 0.394)
pt3dadd(36.751, 156.742, 21.561, 0.394)
pt3dadd(36.691, 156.845, 21.556, 0.392)
pt3dadd(36.631, 156.949, 21.551, 0.392)
pt3dadd(36.57, 157.052, 21.547, 0.392)
pt3dadd(36.51, 157.157, 21.542, 0.392)
pt3dadd(36.45, 157.26, 21.537, 0.392)
pt3dadd(36.39, 157.363, 21.532, 0.39)
pt3dadd(36.33, 157.468, 21.527, 0.39)
pt3dadd(36.27, 157.571, 21.522, 0.39)
pt3dadd(36.208, 157.674, 21.52, 0.406)
pt3dadd(36.146, 157.776, 21.52, 0.436)
pt3dadd(36.084, 157.879, 21.52, 0.468)
pt3dadd(36.021, 157.981, 21.52, 0.498)
pt3dadd(35.958, 158.084, 21.52, 0.53)
pt3dadd(35.896, 158.186, 21.52, 0.56)
pt3dadd(35.834, 158.288, 21.52, 0.59)
pt3dadd(35.771, 158.392, 21.52, 0.622)
pt3dadd(35.709, 158.494, 21.52, 0.652)
pt3dadd(35.646, 158.596, 21.52, 0.684)
pt3dadd(35.596, 158.705, 21.52, 0.708)
pt3dadd(35.556, 158.818, 21.52, 0.726)
pt3dadd(35.516, 158.93, 21.52, 0.744)
pt3dadd(35.476, 159.044, 21.52, 0.762)
pt3dadd(35.436, 159.157, 21.52, 0.78)
pt3dadd(35.396, 159.27, 21.52, 0.798)
pt3dadd(35.356, 159.383, 21.52, 0.816)
pt3dadd(35.316, 159.497, 21.52, 0.834)
pt3dadd(35.276, 159.61, 21.52, 0.852)
pt3dadd(35.236, 159.722, 21.52, 0.872)
pt3dadd(35.209, 159.839, 21.52, 0.872)
pt3dadd(35.193, 159.958, 21.52, 0.858)
pt3dadd(35.178, 160.076, 21.52, 0.844)
pt3dadd(35.162, 160.196, 21.52, 0.83)
pt3dadd(35.146, 160.315, 21.52, 0.816)
pt3dadd(35.13, 160.434, 21.52, 0.8)
pt3dadd(35.115, 160.553, 21.52, 0.786)
pt3dadd(35.099, 160.672, 21.52, 0.772)
pt3dadd(35.083, 160.79, 21.52, 0.758)
pt3dadd(35.067, 160.909, 21.52, 0.744)
pt3dadd(35.059, 161.029, 21.52, 0.75)
pt3dadd(35.057, 161.149, 21.52, 0.77)
pt3dadd(35.055, 161.269, 21.52, 0.79)
pt3dadd(35.054, 161.389, 21.52, 0.812)
pt3dadd(35.052, 161.509, 21.52, 0.832)
pt3dadd(35.05, 161.629, 21.52, 0.852)
pt3dadd(35.048, 161.749, 21.52, 0.872)
pt3dadd(35.046, 161.869, 21.52, 0.892)
pt3dadd(35.044, 161.989, 21.52, 0.912)
pt3dadd(35.042, 162.109, 21.52, 0.934)
pt3dadd(35.044, 162.229, 21.52, 0.946)
pt3dadd(35.048, 162.349, 21.52, 0.956)
pt3dadd(35.052, 162.469, 21.52, 0.964)
pt3dadd(35.057, 162.589, 21.52, 0.974)
pt3dadd(35.061, 162.709, 21.52, 0.982)
pt3dadd(35.065, 162.829, 21.52, 0.992)
pt3dadd(35.07, 162.948, 21.52, 1)
pt3dadd(35.074, 163.068, 21.52, 1.01)
pt3dadd(35.078, 163.188, 21.52, 1.02)
pt3dadd(35.083, 163.308, 21.52, 1.028)
pt3dadd(35.089, 163.428, 21.52, 1.016)
pt3dadd(35.098, 163.548, 21.52, 0.992)
pt3dadd(35.106, 163.668, 21.52, 0.966)
pt3dadd(35.115, 163.787, 21.52, 0.94)
pt3dadd(35.123, 163.907, 21.52, 0.914)
pt3dadd(35.131, 164.027, 21.52, 0.888)
pt3dadd(35.14, 164.147, 21.52, 0.864)
pt3dadd(35.148, 164.266, 21.52, 0.838)
pt3dadd(35.157, 164.386, 21.52, 0.812)
pt3dadd(35.165, 164.506, 21.52, 0.786)
pt3dadd(35.177, 164.624, 21.52, 0.756)
pt3dadd(35.193, 164.743, 21.52, 0.724)
pt3dadd(35.208, 164.863, 21.519, 0.692)
pt3dadd(35.223, 164.982, 21.519, 0.66)
pt3dadd(35.238, 165.101, 21.519, 0.628)
pt3dadd(35.254, 165.22, 21.519, 0.594)
pt3dadd(35.269, 165.338, 21.519, 0.562)
pt3dadd(35.284, 165.458, 21.519, 0.53)
pt3dadd(35.299, 165.577, 21.519, 0.498)
pt3dadd(35.315, 165.696, 21.519, 0.466)
pt3dadd(35.336, 165.814, 21.519, 0.452)
pt3dadd(35.361, 165.931, 21.519, 0.452)
pt3dadd(35.387, 166.049, 21.519, 0.452)
pt3dadd(35.412, 166.166, 21.519, 0.452)
pt3dadd(35.437, 166.283, 21.519, 0.452)
pt3dadd(35.462, 166.4, 21.519, 0.452)
pt3dadd(35.488, 166.518, 21.519, 0.452)
pt3dadd(35.513, 166.636, 21.519, 0.452)
pt3dadd(35.538, 166.752, 21.519, 0.452)
pt3dadd(35.564, 166.87, 21.518, 0.452)
pt3dadd(35.609, 166.979, 21.518, 0.442)
pt3dadd(35.668, 167.083, 21.518, 0.426)
pt3dadd(35.727, 167.188, 21.518, 0.41)
pt3dadd(35.787, 167.292, 21.518, 0.396)
pt3dadd(35.846, 167.396, 21.518, 0.38)
pt3dadd(35.905, 167.501, 21.518, 0.364)
pt3dadd(35.964, 167.605, 21.518, 0.348)
pt3dadd(36.023, 167.71, 21.518, 0.332)
pt3dadd(36.082, 167.814, 21.518, 0.316)
pt3dadd(36.142, 167.918, 21.517, 0.3)
pt3dadd(36.206, 168.02, 21.517, 0.306)
pt3dadd(36.274, 168.119, 21.517, 0.326)
pt3dadd(36.342, 168.218, 21.517, 0.348)
pt3dadd(36.41, 168.317, 21.517, 0.368)
pt3dadd(36.478, 168.415, 21.516, 0.388)
pt3dadd(36.546, 168.515, 21.516, 0.408)
pt3dadd(36.614, 168.613, 21.516, 0.43)
pt3dadd(36.681, 168.713, 21.516, 0.45)
pt3dadd(36.749, 168.811, 21.516, 0.47)
pt3dadd(36.817, 168.911, 21.516, 0.49)
pt3dadd(36.888, 169.007, 21.515, 0.522)
pt3dadd(36.961, 169.103, 21.515, 0.558)
pt3dadd(37.034, 169.198, 21.515, 0.596)
pt3dadd(37.107, 169.294, 21.514, 0.632)
pt3dadd(37.179, 169.388, 21.514, 0.67)
pt3dadd(37.252, 169.484, 21.514, 0.706)
pt3dadd(37.325, 169.579, 21.514, 0.744)
pt3dadd(37.398, 169.675, 21.513, 0.78)
pt3dadd(37.47, 169.77, 21.513, 0.818)
pt3dadd(37.543, 169.866, 21.513, 0.854)
pt3dadd(37.616, 169.962, 21.513, 0.848)
pt3dadd(37.688, 170.057, 21.512, 0.818)
pt3dadd(37.76, 170.153, 21.512, 0.786)
pt3dadd(37.833, 170.249, 21.511, 0.756)
pt3dadd(37.905, 170.345, 21.51, 0.726)
pt3dadd(37.977, 170.441, 21.51, 0.694)
pt3dadd(38.05, 170.536, 21.51, 0.664)
pt3dadd(38.122, 170.632, 21.509, 0.632)
pt3dadd(38.194, 170.728, 21.509, 0.602)
pt3dadd(38.267, 170.824, 21.508, 0.572)
pt3dadd(38.326, 170.927, 21.507, 0.552)
pt3dadd(38.378, 171.035, 21.506, 0.542)
pt3dadd(38.429, 171.144, 21.505, 0.532)
pt3dadd(38.481, 171.252, 21.504, 0.52)
pt3dadd(38.533, 171.36, 21.503, 0.51)
pt3dadd(38.584, 171.468, 21.502, 0.498)
pt3dadd(38.636, 171.576, 21.501, 0.488)
pt3dadd(38.688, 171.685, 21.5, 0.476)
pt3dadd(38.74, 171.793, 21.499, 0.466)
pt3dadd(38.791, 171.901, 21.498, 0.454)
pt3dadd(38.825, 172.016, 21.496, 0.458)
pt3dadd(38.853, 172.133, 21.494, 0.466)
pt3dadd(38.881, 172.249, 21.492, 0.474)
pt3dadd(38.909, 172.366, 21.49, 0.482)
pt3dadd(38.937, 172.483, 21.488, 0.49)
pt3dadd(38.965, 172.6, 21.486, 0.498)
pt3dadd(38.993, 172.716, 21.484, 0.506)
pt3dadd(39.021, 172.832, 21.482, 0.514)
pt3dadd(39.049, 172.95, 21.48, 0.522)
pt3dadd(39.077, 173.066, 21.478, 0.532)
pt3dadd(39.087, 173.185, 21.474, 0.536)
pt3dadd(39.093, 173.305, 21.47, 0.54)
pt3dadd(39.1, 173.425, 21.466, 0.546)
pt3dadd(39.106, 173.544, 21.462, 0.55)
pt3dadd(39.112, 173.664, 21.458, 0.554)
pt3dadd(39.119, 173.784, 21.454, 0.56)
pt3dadd(39.125, 173.904, 21.45, 0.564)
pt3dadd(39.131, 174.024, 21.446, 0.568)
pt3dadd(39.138, 174.143, 21.442, 0.574)
pt3dadd(39.144, 174.263, 21.438, 0.578)
pt3dadd(39.14, 174.383, 21.431, 0.55)
pt3dadd(39.133, 174.502, 21.424, 0.514)
pt3dadd(39.126, 174.622, 21.416, 0.478)
pt3dadd(39.119, 174.74, 21.408, 0.444)
pt3dadd(39.113, 174.86, 21.4, 0.408)
pt3dadd(39.106, 174.979, 21.392, 0.372)
pt3dadd(39.099, 175.099, 21.385, 0.338)
pt3dadd(39.093, 175.218, 21.377, 0.302)
pt3dadd(39.086, 175.338, 21.369, 0.266)
pt3dadd(39.079, 175.458, 21.361, 0.232)
pt3dadd(39.066, 175.576, 21.35, 0.226)
pt3dadd(39.052, 175.694, 21.337, 0.226)
pt3dadd(39.038, 175.812, 21.325, 0.226)
pt3dadd(39.024, 175.931, 21.313, 0.226)
pt3dadd(39.01, 176.048, 21.301, 0.226)
pt3dadd(38.996, 176.167, 21.288, 0.226)
pt3dadd(38.982, 176.286, 21.276, 0.226)
pt3dadd(38.968, 176.404, 21.264, 0.226)
pt3dadd(38.954, 176.522, 21.251, 0.226)
pt3dadd(38.94, 176.64, 21.239, 0.226)
pt3dadd(38.916, 176.749, 21.203, 0.258)
pt3dadd(38.89, 176.856, 21.163, 0.298)
pt3dadd(38.865, 176.963, 21.123, 0.336)
pt3dadd(38.839, 177.07, 21.082, 0.374)
pt3dadd(38.813, 177.176, 21.042, 0.414)
pt3dadd(38.788, 177.283, 21.002, 0.452)
pt3dadd(38.762, 177.39, 20.962, 0.49)
pt3dadd(38.736, 177.497, 20.921, 0.53)
pt3dadd(38.711, 177.604, 20.881, 0.568)
pt3dadd(38.685, 177.71, 20.841, 0.606)
pt3dadd(38.621, 177.802, 20.808, 0.618)
pt3dadd(38.549, 177.89, 20.777, 0.626)
pt3dadd(38.477, 177.979, 20.746, 0.632)
pt3dadd(38.406, 178.068, 20.715, 0.638)
pt3dadd(38.334, 178.157, 20.684, 0.646)
pt3dadd(38.262, 178.246, 20.653, 0.652)
}
}
proc shape3d_121() {
dend_7[20] { pt3dadd(38.191, 178.334, 20.622, 0.658)
pt3dadd(38.119, 178.423, 20.59, 0.664)
pt3dadd(38.048, 178.512, 20.559, 0.672)
pt3dadd(37.976, 178.601, 20.529, 0.678)
pt3dadd(37.891, 178.684, 20.515, 0.664)
pt3dadd(37.807, 178.768, 20.502, 0.648)
pt3dadd(37.722, 178.852, 20.488, 0.634)
pt3dadd(37.638, 178.934, 20.475, 0.62)
pt3dadd(37.553, 179.018, 20.461, 0.604)
pt3dadd(37.468, 179.102, 20.448, 0.59)
pt3dadd(37.384, 179.185, 20.434, 0.576)
pt3dadd(37.299, 179.269, 20.42, 0.56)
pt3dadd(37.215, 179.352, 20.407, 0.546)
pt3dadd(37.131, 179.437, 20.394, 0.532)
pt3dadd(37.055, 179.53, 20.389, 0.514)
pt3dadd(36.979, 179.622, 20.385, 0.496)
pt3dadd(36.903, 179.716, 20.38, 0.478)
pt3dadd(36.827, 179.808, 20.376, 0.46)
pt3dadd(36.751, 179.9, 20.371, 0.442)
pt3dadd(36.675, 179.994, 20.367, 0.424)
pt3dadd(36.599, 180.086, 20.362, 0.406)
pt3dadd(36.523, 180.179, 20.358, 0.388)
pt3dadd(36.448, 180.272, 20.353, 0.37)
pt3dadd(36.373, 180.365, 20.349, 0.352)
pt3dadd(36.304, 180.464, 20.349, 0.338)
pt3dadd(36.236, 180.563, 20.35, 0.326)
pt3dadd(36.167, 180.661, 20.35, 0.314)
pt3dadd(36.099, 180.76, 20.35, 0.3)
pt3dadd(36.03, 180.858, 20.351, 0.288)
pt3dadd(35.962, 180.956, 20.351, 0.276)
pt3dadd(35.894, 181.055, 20.351, 0.262)
pt3dadd(35.825, 181.154, 20.351, 0.25)
pt3dadd(35.757, 181.253, 20.352, 0.238)
pt3dadd(35.688, 181.351, 20.352, 0.226)
pt3dadd(35.616, 181.447, 20.352, 0.226)
pt3dadd(35.544, 181.542, 20.353, 0.226)
pt3dadd(35.472, 181.638, 20.353, 0.226)
pt3dadd(35.4, 181.734, 20.354, 0.226)
pt3dadd(35.327, 181.83, 20.354, 0.226)
pt3dadd(35.255, 181.926, 20.354, 0.226)
pt3dadd(35.183, 182.022, 20.355, 0.226)
pt3dadd(35.111, 182.118, 20.355, 0.226)
pt3dadd(35.039, 182.214, 20.356, 0.226)
pt3dadd(34.966, 182.31, 20.356, 0.226)
pt3dadd(34.888, 182.4, 20.357, 0.226)
pt3dadd(34.81, 182.491, 20.358, 0.226)
pt3dadd(34.732, 182.582, 20.358, 0.226)
pt3dadd(34.653, 182.674, 20.359, 0.226)
pt3dadd(34.575, 182.765, 20.36, 0.226)
pt3dadd(34.497, 182.855, 20.361, 0.226)
pt3dadd(34.419, 182.946, 20.361, 0.226)
pt3dadd(34.34, 183.037, 20.362, 0.226)
pt3dadd(34.262, 183.128, 20.363, 0.226)
pt3dadd(34.183, 183.218, 20.364, 0.226)
pt3dadd(34.103, 183.307, 20.365, 0.23)
pt3dadd(34.022, 183.396, 20.366, 0.234)
pt3dadd(33.941, 183.485, 20.367, 0.238)
pt3dadd(33.86, 183.574, 20.368, 0.242)
pt3dadd(33.779, 183.661, 20.369, 0.248)
pt3dadd(33.698, 183.75, 20.37, 0.252)
pt3dadd(33.617, 183.839, 20.371, 0.256)
pt3dadd(33.536, 183.928, 20.372, 0.26)
pt3dadd(33.455, 184.016, 20.374, 0.264)
pt3dadd(33.373, 184.104, 20.375, 0.268)
pt3dadd(33.289, 184.189, 20.376, 0.282)
pt3dadd(33.204, 184.274, 20.378, 0.296)
pt3dadd(33.12, 184.36, 20.379, 0.31)
pt3dadd(33.035, 184.445, 20.381, 0.324)
pt3dadd(32.951, 184.53, 20.383, 0.338)
pt3dadd(32.866, 184.615, 20.384, 0.354)
pt3dadd(32.781, 184.7, 20.386, 0.368)
pt3dadd(32.697, 184.786, 20.388, 0.382)
pt3dadd(32.612, 184.871, 20.389, 0.396)
pt3dadd(32.528, 184.956, 20.391, 0.41)
pt3dadd(32.444, 185.041, 20.395, 0.424)
pt3dadd(32.359, 185.126, 20.398, 0.438)
pt3dadd(32.275, 185.212, 20.402, 0.452)
pt3dadd(32.191, 185.297, 20.405, 0.468)
pt3dadd(32.107, 185.382, 20.408, 0.482)
pt3dadd(32.022, 185.467, 20.412, 0.496)
pt3dadd(31.938, 185.552, 20.415, 0.51)
pt3dadd(31.854, 185.638, 20.419, 0.526)
pt3dadd(31.77, 185.724, 20.422, 0.54)
pt3dadd(31.685, 185.809, 20.426, 0.554)
pt3dadd(31.601, 185.894, 20.431, 0.562)
pt3dadd(31.518, 185.98, 20.435, 0.57)
pt3dadd(31.434, 186.066, 20.44, 0.578)
pt3dadd(31.35, 186.151, 20.445, 0.586)
pt3dadd(31.266, 186.236, 20.449, 0.592)
pt3dadd(31.182, 186.323, 20.454, 0.6)
pt3dadd(31.098, 186.408, 20.459, 0.608)
pt3dadd(31.014, 186.493, 20.464, 0.616)
pt3dadd(30.93, 186.58, 20.468, 0.624)
pt3dadd(30.846, 186.665, 20.473, 0.626)
pt3dadd(30.763, 186.751, 20.48, 0.596)
pt3dadd(30.68, 186.838, 20.487, 0.564)
pt3dadd(30.597, 186.923, 20.495, 0.534)
pt3dadd(30.513, 187.009, 20.502, 0.502)
pt3dadd(30.43, 187.096, 20.509, 0.47)
pt3dadd(30.347, 187.181, 20.516, 0.44)
pt3dadd(30.264, 187.267, 20.523, 0.408)
pt3dadd(30.181, 187.354, 20.53, 0.376)
pt3dadd(30.098, 187.44, 20.537, 0.346)
pt3dadd(30.015, 187.525, 20.547, 0.318)
pt3dadd(29.938, 187.61, 20.577, 0.308)
pt3dadd(29.861, 187.696, 20.606, 0.298)
pt3dadd(29.785, 187.781, 20.635, 0.29)
pt3dadd(29.708, 187.866, 20.665, 0.28)
pt3dadd(29.631, 187.951, 20.694, 0.27)
pt3dadd(29.554, 188.036, 20.723, 0.262)
pt3dadd(29.477, 188.122, 20.753, 0.252)
pt3dadd(29.4, 188.207, 20.782, 0.242)
pt3dadd(29.323, 188.292, 20.812, 0.234)
pt3dadd(29.247, 188.378, 20.839, 0.23)
pt3dadd(29.171, 188.467, 20.86, 0.242)
pt3dadd(29.095, 188.557, 20.881, 0.256)
pt3dadd(29.019, 188.646, 20.902, 0.27)
pt3dadd(28.943, 188.736, 20.923, 0.284)
pt3dadd(28.867, 188.825, 20.944, 0.296)
pt3dadd(28.791, 188.915, 20.965, 0.31)
pt3dadd(28.715, 189.004, 20.986, 0.324)
pt3dadd(28.639, 189.094, 21.007, 0.338)
pt3dadd(28.563, 189.182, 21.028, 0.352)
pt3dadd(28.49, 189.276, 21.04, 0.364)
pt3dadd(28.424, 189.376, 21.031, 0.372)
pt3dadd(28.358, 189.475, 21.022, 0.382)
pt3dadd(28.292, 189.575, 21.013, 0.392)
pt3dadd(28.226, 189.674, 21.004, 0.402)
pt3dadd(28.16, 189.774, 20.995, 0.41)
pt3dadd(28.094, 189.874, 20.986, 0.42)
pt3dadd(28.028, 189.973, 20.978, 0.43)
pt3dadd(27.962, 190.073, 20.969, 0.438)
pt3dadd(27.896, 190.172, 20.96, 0.448)
pt3dadd(27.834, 190.272, 20.941, 0.45)
pt3dadd(27.775, 190.372, 20.916, 0.444)
pt3dadd(27.717, 190.472, 20.89, 0.44)
pt3dadd(27.658, 190.572, 20.865, 0.436)
pt3dadd(27.6, 190.673, 20.839, 0.43)
pt3dadd(27.541, 190.772, 20.814, 0.426)
pt3dadd(27.483, 190.873, 20.788, 0.422)
pt3dadd(27.424, 190.973, 20.763, 0.416)
pt3dadd(27.366, 191.074, 20.737, 0.412)
pt3dadd(27.307, 191.173, 20.711, 0.408)
pt3dadd(27.243, 191.27, 20.689, 0.396)
pt3dadd(27.174, 191.366, 20.669, 0.382)
pt3dadd(27.106, 191.462, 20.649, 0.366)
pt3dadd(27.037, 191.557, 20.629, 0.35)
pt3dadd(26.969, 191.653, 20.609, 0.334)
pt3dadd(26.9, 191.748, 20.589, 0.32)
pt3dadd(26.832, 191.844, 20.569, 0.304)
pt3dadd(26.763, 191.94, 20.549, 0.288)
pt3dadd(26.695, 192.035, 20.529, 0.274)
pt3dadd(26.627, 192.131, 20.509, 0.258)
pt3dadd(26.555, 192.226, 20.494, 0.25)
pt3dadd(26.481, 192.319, 20.483, 0.248)
pt3dadd(26.407, 192.413, 20.471, 0.246)
pt3dadd(26.333, 192.506, 20.46, 0.242)
pt3dadd(26.259, 192.6, 20.449, 0.24)
pt3dadd(26.185, 192.694, 20.438, 0.238)
pt3dadd(26.112, 192.787, 20.426, 0.234)
pt3dadd(26.038, 192.881, 20.415, 0.232)
pt3dadd(25.964, 192.974, 20.404, 0.23)
pt3dadd(25.89, 193.068, 20.393, 0.226)
pt3dadd(25.815, 193.16, 20.384, 0.226)
pt3dadd(25.739, 193.253, 20.377, 0.226)
pt3dadd(25.663, 193.345, 20.37, 0.226)
pt3dadd(25.587, 193.439, 20.363, 0.226)
pt3dadd(25.511, 193.531, 20.357, 0.226)
pt3dadd(25.435, 193.624, 20.35, 0.226)
pt3dadd(25.359, 193.716, 20.343, 0.226)
pt3dadd(25.284, 193.808, 20.336, 0.226)
pt3dadd(25.208, 193.901, 20.329, 0.226)
pt3dadd(25.132, 193.994, 20.322, 0.226)
pt3dadd(25.055, 194.086, 20.319, 0.226)
pt3dadd(24.977, 194.177, 20.317, 0.226)
pt3dadd(24.899, 194.268, 20.316, 0.226)
pt3dadd(24.821, 194.359, 20.314, 0.226)
pt3dadd(24.743, 194.45, 20.313, 0.226)
pt3dadd(24.665, 194.542, 20.311, 0.226)
pt3dadd(24.588, 194.634, 20.31, 0.226)
pt3dadd(24.51, 194.725, 20.308, 0.226)
pt3dadd(24.432, 194.816, 20.307, 0.226)
pt3dadd(24.354, 194.908, 20.305, 0.226)
pt3dadd(24.287, 195.006, 20.302, 0.226)
pt3dadd(24.227, 195.11, 20.298, 0.226)
pt3dadd(24.167, 195.214, 20.295, 0.226)
pt3dadd(24.107, 195.318, 20.291, 0.226)
pt3dadd(24.047, 195.421, 20.287, 0.226)
pt3dadd(23.987, 195.526, 20.283, 0.226)
pt3dadd(23.927, 195.629, 20.279, 0.226)
pt3dadd(23.867, 195.733, 20.275, 0.226)
pt3dadd(23.807, 195.836, 20.271, 0.226)
pt3dadd(23.747, 195.941, 20.267, 0.226)
pt3dadd(23.688, 196.045, 20.262, 0.232)
pt3dadd(23.629, 196.15, 20.256, 0.24)
pt3dadd(23.57, 196.253, 20.251, 0.25)
pt3dadd(23.511, 196.357, 20.245, 0.258)
pt3dadd(23.452, 196.462, 20.239, 0.266)
pt3dadd(23.393, 196.566, 20.234, 0.276)
pt3dadd(23.334, 196.67, 20.228, 0.284)
}
}
proc shape3d_122() {
dend_7[20] { pt3dadd(23.275, 196.775, 20.222, 0.292)
pt3dadd(23.216, 196.879, 20.216, 0.302)
pt3dadd(23.157, 196.984, 20.211, 0.31)
pt3dadd(23.097, 197.087, 20.201, 0.32)
pt3dadd(23.037, 197.19, 20.19, 0.33)
pt3dadd(22.978, 197.293, 20.179, 0.34)
pt3dadd(22.918, 197.396, 20.168, 0.35)
pt3dadd(22.858, 197.5, 20.156, 0.36)
pt3dadd(22.799, 197.603, 20.145, 0.372)
pt3dadd(22.739, 197.706, 20.134, 0.382)
pt3dadd(22.679, 197.809, 20.123, 0.392)
pt3dadd(22.62, 197.912, 20.111, 0.402)
pt3dadd(22.56, 198.016, 20.1, 0.412)
pt3dadd(22.511, 198.121, 20.076, 0.402)
pt3dadd(22.466, 198.227, 20.047, 0.382)
pt3dadd(22.421, 198.332, 20.018, 0.364)
pt3dadd(22.376, 198.438, 19.989, 0.344)
pt3dadd(22.331, 198.544, 19.96, 0.326)
pt3dadd(22.286, 198.649, 19.931, 0.306)
pt3dadd(22.241, 198.755, 19.903, 0.288)
pt3dadd(22.195, 198.86, 19.874, 0.268)
pt3dadd(22.15, 198.966, 19.845, 0.25)
pt3dadd(22.105, 199.072, 19.816, 0.232)
pt3dadd(22.044, 199.172, 19.8, 0.226)
pt3dadd(21.978, 199.271, 19.79, 0.226)
pt3dadd(21.911, 199.37, 19.779, 0.226)
pt3dadd(21.844, 199.469, 19.768, 0.226)
pt3dadd(21.777, 199.567, 19.758, 0.226)
pt3dadd(21.71, 199.667, 19.747, 0.226)
pt3dadd(21.643, 199.765, 19.736, 0.226)
pt3dadd(21.576, 199.864, 19.726, 0.226)
pt3dadd(21.51, 199.963, 19.715, 0.226)
pt3dadd(21.443, 200.062, 19.704, 0.226)
pt3dadd(21.385, 200.141, 19.75, 0.226)
pt3dadd(21.332, 200.213, 19.816, 0.226)
pt3dadd(21.278, 200.286, 19.882, 0.226)
pt3dadd(21.225, 200.358, 19.949, 0.226)
pt3dadd(21.171, 200.43, 20.015, 0.226)
pt3dadd(21.117, 200.502, 20.081, 0.226)
pt3dadd(21.064, 200.574, 20.147, 0.226)
pt3dadd(21.01, 200.647, 20.213, 0.226)
pt3dadd(20.956, 200.719, 20.279, 0.226)
pt3dadd(20.903, 200.791, 20.346, 0.226)
}
dend_0[10] {pt3dclear()
pt3dadd(19.494, 102.157, 22.694, 9.04)
pt3dadd(19.521, 102.157, 22.717, 8.984)
pt3dadd(19.606, 102.157, 22.787, 8.806)
pt3dadd(19.691, 102.157, 22.858, 8.63)
pt3dadd(19.776, 102.157, 22.929, 8.454)
pt3dadd(19.86, 102.157, 22.999, 8.276)
pt3dadd(19.945, 102.157, 23.07, 8.1)
pt3dadd(20.03, 102.157, 23.141, 7.922)
pt3dadd(20.115, 102.157, 23.212, 7.746)
pt3dadd(20.201, 102.153, 23.281, 7.572)
pt3dadd(20.289, 102.145, 23.349, 7.402)
pt3dadd(20.376, 102.137, 23.417, 7.23)
pt3dadd(20.464, 102.129, 23.485, 7.06)
pt3dadd(20.552, 102.121, 23.553, 6.89)
pt3dadd(20.639, 102.113, 23.621, 6.72)
pt3dadd(20.727, 102.105, 23.689, 6.55)
pt3dadd(20.815, 102.097, 23.757, 6.38)
pt3dadd(20.902, 102.09, 23.825, 6.208)
pt3dadd(20.99, 102.081, 23.893, 6.038)
pt3dadd(21.081, 102.034, 23.938, 5.924)
pt3dadd(21.173, 101.971, 23.974, 5.83)
pt3dadd(21.265, 101.907, 24.01, 5.738)
pt3dadd(21.358, 101.844, 24.046, 5.646)
pt3dadd(21.45, 101.781, 24.082, 5.554)
pt3dadd(21.542, 101.717, 24.118, 5.462)
pt3dadd(21.634, 101.654, 24.154, 5.37)
pt3dadd(21.727, 101.59, 24.19, 5.276)
pt3dadd(21.819, 101.527, 24.226, 5.184)
pt3dadd(21.911, 101.463, 24.262, 5.092)
}
dend_7[21] {pt3dclear()
pt3dadd(21.911, 101.463, 24.262, 5.092)
pt3dadd(22.003, 101.414, 24.31, 4.988)
pt3dadd(22.094, 101.37, 24.364, 4.88)
pt3dadd(22.186, 101.327, 24.418, 4.77)
pt3dadd(22.277, 101.283, 24.472, 4.662)
pt3dadd(22.368, 101.24, 24.525, 4.552)
pt3dadd(22.46, 101.196, 24.579, 4.444)
pt3dadd(22.551, 101.152, 24.632, 4.334)
pt3dadd(22.643, 101.109, 24.686, 4.226)
pt3dadd(22.734, 101.065, 24.74, 4.118)
pt3dadd(22.825, 101.021, 24.793, 4.008)
pt3dadd(22.905, 100.993, 24.864, 3.908)
pt3dadd(22.983, 100.967, 24.937, 3.812)
pt3dadd(23.06, 100.94, 25.01, 3.712)
pt3dadd(23.138, 100.914, 25.083, 3.616)
pt3dadd(23.215, 100.888, 25.156, 3.518)
pt3dadd(23.293, 100.862, 25.229, 3.42)
pt3dadd(23.37, 100.836, 25.302, 3.322)
pt3dadd(23.448, 100.81, 25.375, 3.224)
pt3dadd(23.526, 100.784, 25.448, 3.126)
pt3dadd(23.603, 100.757, 25.522, 3.028)
pt3dadd(23.668, 100.741, 25.604, 2.958)
pt3dadd(23.733, 100.724, 25.687, 2.888)
pt3dadd(23.798, 100.707, 25.77, 2.818)
pt3dadd(23.863, 100.69, 25.853, 2.75)
pt3dadd(23.928, 100.674, 25.936, 2.68)
pt3dadd(23.993, 100.657, 26.019, 2.61)
pt3dadd(24.058, 100.64, 26.102, 2.54)
pt3dadd(24.123, 100.624, 26.185, 2.472)
pt3dadd(24.188, 100.607, 26.268, 2.402)
pt3dadd(24.253, 100.59, 26.351, 2.332)
pt3dadd(24.322, 100.578, 26.432, 2.28)
pt3dadd(24.392, 100.567, 26.513, 2.228)
pt3dadd(24.461, 100.555, 26.594, 2.176)
pt3dadd(24.531, 100.543, 26.675, 2.122)
pt3dadd(24.6, 100.532, 26.756, 2.07)
pt3dadd(24.669, 100.52, 26.837, 2.018)
pt3dadd(24.739, 100.509, 26.918, 1.966)
pt3dadd(24.808, 100.497, 26.999, 1.912)
pt3dadd(24.877, 100.485, 27.08, 1.86)
pt3dadd(24.947, 100.473, 27.161, 1.808)
}
dend_7[22] {pt3dclear()
pt3dadd(24.947, 100.473, 27.161, 1.808)
pt3dadd(24.953, 100.471, 27.17, 1.804)
pt3dadd(25.015, 100.445, 27.253, 1.764)
pt3dadd(25.076, 100.419, 27.336, 1.724)
pt3dadd(25.138, 100.393, 27.419, 1.682)
pt3dadd(25.199, 100.368, 27.502, 1.642)
pt3dadd(25.26, 100.342, 27.586, 1.602)
pt3dadd(25.322, 100.316, 27.669, 1.562)
pt3dadd(25.383, 100.29, 27.752, 1.522)
pt3dadd(25.445, 100.264, 27.835, 1.48)
pt3dadd(25.506, 100.239, 27.918, 1.44)
pt3dadd(25.577, 100.199, 27.988, 1.4)
pt3dadd(25.662, 100.139, 28.038, 1.362)
pt3dadd(25.748, 100.079, 28.088, 1.324)
pt3dadd(25.833, 100.02, 28.138, 1.286)
pt3dadd(25.918, 99.96, 28.188, 1.248)
pt3dadd(26.003, 99.9, 28.237, 1.208)
pt3dadd(26.088, 99.841, 28.287, 1.17)
pt3dadd(26.173, 99.781, 28.337, 1.132)
pt3dadd(26.258, 99.721, 28.387, 1.094)
pt3dadd(26.343, 99.662, 28.437, 1.054)
pt3dadd(26.431, 99.595, 28.475, 1.038)
pt3dadd(26.521, 99.523, 28.504, 1.034)
pt3dadd(26.611, 99.452, 28.534, 1.032)
pt3dadd(26.701, 99.381, 28.563, 1.028)
pt3dadd(26.79, 99.309, 28.593, 1.024)
pt3dadd(26.88, 99.238, 28.623, 1.022)
pt3dadd(26.97, 99.167, 28.652, 1.018)
pt3dadd(27.059, 99.095, 28.682, 1.014)
pt3dadd(27.149, 99.024, 28.711, 1.012)
pt3dadd(27.239, 98.953, 28.741, 1.008)
pt3dadd(27.331, 98.883, 28.768, 1.012)
pt3dadd(27.423, 98.813, 28.794, 1.022)
pt3dadd(27.516, 98.744, 28.82, 1.03)
pt3dadd(27.609, 98.675, 28.847, 1.038)
pt3dadd(27.702, 98.606, 28.873, 1.046)
pt3dadd(27.795, 98.536, 28.899, 1.056)
pt3dadd(27.888, 98.467, 28.925, 1.064)
pt3dadd(27.981, 98.398, 28.951, 1.072)
pt3dadd(28.073, 98.328, 28.977, 1.08)
pt3dadd(28.166, 98.259, 29.003, 1.09)
pt3dadd(28.263, 98.204, 29.039, 1.08)
pt3dadd(28.362, 98.154, 29.077, 1.064)
pt3dadd(28.46, 98.103, 29.116, 1.048)
pt3dadd(28.559, 98.053, 29.155, 1.032)
pt3dadd(28.657, 98.002, 29.194, 1.016)
pt3dadd(28.755, 97.952, 29.232, 1)
pt3dadd(28.854, 97.901, 29.271, 0.984)
pt3dadd(28.952, 97.851, 29.31, 0.968)
pt3dadd(29.051, 97.8, 29.349, 0.954)
pt3dadd(29.149, 97.75, 29.387, 0.938)
pt3dadd(29.248, 97.694, 29.421, 0.932)
pt3dadd(29.346, 97.636, 29.452, 0.928)
pt3dadd(29.444, 97.579, 29.484, 0.926)
pt3dadd(29.542, 97.521, 29.516, 0.922)
pt3dadd(29.64, 97.464, 29.547, 0.92)
pt3dadd(29.739, 97.406, 29.579, 0.916)
pt3dadd(29.837, 97.348, 29.611, 0.914)
pt3dadd(29.935, 97.291, 29.642, 0.91)
pt3dadd(30.033, 97.233, 29.674, 0.908)
pt3dadd(30.131, 97.175, 29.705, 0.904)
pt3dadd(30.23, 97.122, 29.74, 0.908)
pt3dadd(30.33, 97.069, 29.775, 0.914)
pt3dadd(30.429, 97.017, 29.81, 0.92)
pt3dadd(30.528, 96.964, 29.845, 0.926)
pt3dadd(30.627, 96.911, 29.88, 0.932)
pt3dadd(30.727, 96.859, 29.915, 0.938)
pt3dadd(30.826, 96.806, 29.95, 0.944)
pt3dadd(30.925, 96.754, 29.985, 0.952)
pt3dadd(31.025, 96.701, 30.02, 0.958)
pt3dadd(31.124, 96.649, 30.056, 0.964)
pt3dadd(31.224, 96.605, 30.097, 0.978)
pt3dadd(31.324, 96.564, 30.14, 0.994)
pt3dadd(31.424, 96.523, 30.184, 1.01)
pt3dadd(31.524, 96.482, 30.227, 1.026)
pt3dadd(31.624, 96.441, 30.27, 1.042)
pt3dadd(31.725, 96.4, 30.314, 1.058)
pt3dadd(31.825, 96.36, 30.357, 1.074)
pt3dadd(31.925, 96.318, 30.4, 1.09)
pt3dadd(32.025, 96.278, 30.444, 1.106)
pt3dadd(32.125, 96.237, 30.487, 1.122)
pt3dadd(32.225, 96.18, 30.514, 1.126)
pt3dadd(32.325, 96.119, 30.536, 1.126)
pt3dadd(32.424, 96.058, 30.559, 1.126)
pt3dadd(32.524, 95.997, 30.581, 1.126)
pt3dadd(32.624, 95.936, 30.604, 1.128)
pt3dadd(32.724, 95.875, 30.626, 1.128)
}
}
proc shape3d_123() {
dend_7[22] { pt3dadd(32.824, 95.814, 30.649, 1.128)
pt3dadd(32.923, 95.753, 30.671, 1.128)
pt3dadd(33.023, 95.692, 30.694, 1.13)
pt3dadd(33.123, 95.631, 30.716, 1.13)
pt3dadd(33.227, 95.576, 30.734, 1.13)
pt3dadd(33.332, 95.521, 30.751, 1.13)
pt3dadd(33.437, 95.466, 30.768, 1.13)
pt3dadd(33.542, 95.412, 30.785, 1.13)
pt3dadd(33.647, 95.357, 30.802, 1.13)
pt3dadd(33.752, 95.303, 30.819, 1.13)
pt3dadd(33.856, 95.248, 30.836, 1.13)
pt3dadd(33.961, 95.194, 30.853, 1.13)
pt3dadd(34.066, 95.139, 30.87, 1.13)
pt3dadd(34.171, 95.085, 30.887, 1.13)
pt3dadd(34.278, 95.031, 30.899, 1.13)
pt3dadd(34.384, 94.978, 30.911, 1.13)
pt3dadd(34.491, 94.925, 30.922, 1.13)
pt3dadd(34.598, 94.872, 30.933, 1.13)
pt3dadd(34.704, 94.818, 30.944, 1.13)
pt3dadd(34.811, 94.765, 30.956, 1.13)
pt3dadd(34.918, 94.712, 30.967, 1.13)
pt3dadd(35.025, 94.659, 30.979, 1.13)
pt3dadd(35.131, 94.606, 30.99, 1.13)
pt3dadd(35.238, 94.553, 31.001, 1.13)
pt3dadd(35.339, 94.488, 31.008, 1.13)
pt3dadd(35.439, 94.423, 31.015, 1.13)
pt3dadd(35.539, 94.357, 31.021, 1.13)
pt3dadd(35.639, 94.291, 31.028, 1.13)
pt3dadd(35.739, 94.225, 31.034, 1.13)
pt3dadd(35.839, 94.16, 31.041, 1.13)
pt3dadd(35.939, 94.094, 31.047, 1.13)
pt3dadd(36.04, 94.028, 31.054, 1.13)
pt3dadd(36.14, 93.962, 31.061, 1.13)
pt3dadd(36.24, 93.897, 31.067, 1.13)
pt3dadd(36.337, 93.828, 31.077, 1.164)
pt3dadd(36.435, 93.759, 31.087, 1.204)
pt3dadd(36.532, 93.69, 31.097, 1.244)
pt3dadd(36.63, 93.621, 31.107, 1.284)
pt3dadd(36.727, 93.552, 31.117, 1.324)
pt3dadd(36.825, 93.483, 31.128, 1.364)
pt3dadd(36.922, 93.414, 31.138, 1.402)
pt3dadd(37.02, 93.345, 31.148, 1.442)
pt3dadd(37.117, 93.276, 31.158, 1.482)
pt3dadd(37.214, 93.207, 31.168, 1.522)
pt3dadd(37.314, 93.145, 31.188, 1.534)
pt3dadd(37.413, 93.083, 31.21, 1.544)
pt3dadd(37.513, 93.021, 31.231, 1.552)
pt3dadd(37.613, 92.959, 31.252, 1.562)
pt3dadd(37.712, 92.898, 31.274, 1.57)
pt3dadd(37.812, 92.836, 31.295, 1.58)
pt3dadd(37.912, 92.774, 31.316, 1.588)
pt3dadd(38.011, 92.712, 31.338, 1.598)
pt3dadd(38.111, 92.651, 31.359, 1.606)
pt3dadd(38.211, 92.589, 31.38, 1.616)
pt3dadd(38.312, 92.541, 31.417, 1.566)
pt3dadd(38.412, 92.493, 31.454, 1.518)
pt3dadd(38.513, 92.446, 31.49, 1.47)
pt3dadd(38.614, 92.398, 31.527, 1.422)
pt3dadd(38.715, 92.35, 31.564, 1.372)
pt3dadd(38.816, 92.302, 31.6, 1.324)
pt3dadd(38.917, 92.254, 31.637, 1.276)
pt3dadd(39.018, 92.206, 31.674, 1.226)
pt3dadd(39.119, 92.159, 31.71, 1.178)
pt3dadd(39.22, 92.111, 31.747, 1.13)
}
dend_7[23] {pt3dclear()
pt3dadd(39.22, 92.111, 31.747, 1.13)
pt3dadd(39.249, 92.096, 31.755, 1.12)
pt3dadd(39.351, 92.043, 31.783, 1.088)
pt3dadd(39.453, 91.991, 31.812, 1.054)
pt3dadd(39.556, 91.939, 31.84, 1.022)
pt3dadd(39.658, 91.886, 31.869, 0.988)
pt3dadd(39.761, 91.834, 31.897, 0.956)
pt3dadd(39.863, 91.781, 31.926, 0.924)
pt3dadd(39.965, 91.729, 31.954, 0.89)
pt3dadd(40.068, 91.677, 31.983, 0.858)
pt3dadd(40.172, 91.628, 32.011, 0.826)
pt3dadd(40.281, 91.588, 32.037, 0.802)
pt3dadd(40.389, 91.549, 32.064, 0.776)
pt3dadd(40.498, 91.509, 32.09, 0.75)
pt3dadd(40.607, 91.469, 32.117, 0.726)
pt3dadd(40.715, 91.429, 32.143, 0.7)
pt3dadd(40.824, 91.389, 32.17, 0.674)
pt3dadd(40.933, 91.35, 32.196, 0.65)
pt3dadd(41.041, 91.31, 32.223, 0.624)
pt3dadd(41.15, 91.27, 32.249, 0.598)
pt3dadd(41.26, 91.237, 32.277, 0.578)
pt3dadd(41.372, 91.213, 32.307, 0.564)
pt3dadd(41.484, 91.19, 32.337, 0.552)
pt3dadd(41.596, 91.166, 32.367, 0.538)
pt3dadd(41.708, 91.143, 32.396, 0.526)
pt3dadd(41.821, 91.119, 32.426, 0.512)
pt3dadd(41.933, 91.096, 32.456, 0.498)
pt3dadd(42.045, 91.072, 32.486, 0.486)
pt3dadd(42.157, 91.049, 32.516, 0.472)
pt3dadd(42.269, 91.026, 32.546, 0.46)
pt3dadd(42.379, 91.007, 32.581, 0.452)
pt3dadd(42.487, 90.996, 32.625, 0.452)
pt3dadd(42.594, 90.984, 32.668, 0.452)
pt3dadd(42.702, 90.972, 32.711, 0.452)
pt3dadd(42.81, 90.961, 32.754, 0.452)
pt3dadd(42.917, 90.949, 32.797, 0.452)
pt3dadd(43.025, 90.937, 32.84, 0.452)
pt3dadd(43.133, 90.926, 32.883, 0.452)
pt3dadd(43.24, 90.914, 32.926, 0.452)
pt3dadd(43.348, 90.902, 32.97, 0.452)
pt3dadd(43.457, 90.896, 33.009, 0.468)
pt3dadd(43.569, 90.897, 33.045, 0.504)
pt3dadd(43.681, 90.897, 33.081, 0.54)
pt3dadd(43.793, 90.898, 33.117, 0.574)
pt3dadd(43.905, 90.898, 33.153, 0.61)
pt3dadd(44.017, 90.899, 33.189, 0.646)
pt3dadd(44.129, 90.899, 33.225, 0.682)
pt3dadd(44.241, 90.9, 33.261, 0.718)
pt3dadd(44.353, 90.9, 33.297, 0.754)
pt3dadd(44.465, 90.901, 33.333, 0.788)
pt3dadd(44.575, 90.902, 33.373, 0.802)
pt3dadd(44.682, 90.903, 33.418, 0.786)
pt3dadd(44.789, 90.905, 33.464, 0.77)
pt3dadd(44.896, 90.906, 33.509, 0.754)
pt3dadd(45.003, 90.908, 33.555, 0.738)
pt3dadd(45.11, 90.909, 33.6, 0.72)
pt3dadd(45.216, 90.911, 33.645, 0.704)
pt3dadd(45.323, 90.912, 33.691, 0.688)
pt3dadd(45.43, 90.914, 33.736, 0.672)
pt3dadd(45.537, 90.915, 33.782, 0.656)
pt3dadd(45.645, 90.917, 33.825, 0.634)
pt3dadd(45.754, 90.92, 33.867, 0.606)
pt3dadd(45.863, 90.922, 33.909, 0.578)
pt3dadd(45.972, 90.925, 33.951, 0.55)
pt3dadd(46.081, 90.928, 33.992, 0.522)
pt3dadd(46.19, 90.93, 34.034, 0.494)
pt3dadd(46.299, 90.933, 34.076, 0.466)
pt3dadd(46.408, 90.936, 34.118, 0.438)
pt3dadd(46.517, 90.939, 34.16, 0.41)
pt3dadd(46.626, 90.941, 34.201, 0.382)
pt3dadd(46.738, 90.945, 34.237, 0.372)
pt3dadd(46.852, 90.951, 34.268, 0.382)
pt3dadd(46.966, 90.957, 34.298, 0.39)
pt3dadd(47.08, 90.963, 34.329, 0.4)
pt3dadd(47.194, 90.968, 34.359, 0.41)
pt3dadd(47.308, 90.974, 34.39, 0.42)
pt3dadd(47.422, 90.98, 34.42, 0.428)
pt3dadd(47.537, 90.985, 34.451, 0.438)
pt3dadd(47.651, 90.991, 34.481, 0.448)
pt3dadd(47.765, 90.997, 34.512, 0.458)
pt3dadd(47.878, 91.006, 34.543, 0.488)
pt3dadd(47.991, 91.019, 34.575, 0.54)
pt3dadd(48.105, 91.032, 34.607, 0.59)
pt3dadd(48.217, 91.044, 34.639, 0.642)
pt3dadd(48.33, 91.057, 34.671, 0.692)
pt3dadd(48.444, 91.07, 34.702, 0.744)
pt3dadd(48.557, 91.083, 34.734, 0.794)
pt3dadd(48.669, 91.096, 34.766, 0.846)
pt3dadd(48.783, 91.108, 34.798, 0.896)
pt3dadd(48.896, 91.121, 34.83, 0.946)
pt3dadd(49, 91.148, 34.871, 0.938)
pt3dadd(49.1, 91.183, 34.919, 0.894)
pt3dadd(49.2, 91.218, 34.966, 0.848)
pt3dadd(49.299, 91.254, 35.013, 0.804)
pt3dadd(49.399, 91.289, 35.061, 0.76)
pt3dadd(49.499, 91.324, 35.108, 0.714)
pt3dadd(49.598, 91.359, 35.155, 0.67)
pt3dadd(49.698, 91.395, 35.203, 0.624)
pt3dadd(49.798, 91.43, 35.25, 0.58)
pt3dadd(49.897, 91.465, 35.297, 0.536)
pt3dadd(50, 91.515, 35.327, 0.554)
pt3dadd(50.103, 91.569, 35.352, 0.588)
pt3dadd(50.205, 91.623, 35.377, 0.622)
pt3dadd(50.308, 91.677, 35.402, 0.654)
pt3dadd(50.411, 91.73, 35.427, 0.688)
pt3dadd(50.514, 91.784, 35.452, 0.722)
pt3dadd(50.617, 91.838, 35.478, 0.756)
pt3dadd(50.72, 91.892, 35.503, 0.788)
pt3dadd(50.823, 91.946, 35.528, 0.822)
pt3dadd(50.926, 92, 35.553, 0.856)
pt3dadd(51.036, 92.042, 35.568, 0.894)
pt3dadd(51.148, 92.082, 35.582, 0.93)
pt3dadd(51.26, 92.123, 35.596, 0.968)
pt3dadd(51.372, 92.163, 35.609, 1.006)
pt3dadd(51.484, 92.204, 35.623, 1.044)
pt3dadd(51.595, 92.244, 35.637, 1.08)
pt3dadd(51.707, 92.284, 35.65, 1.118)
pt3dadd(51.819, 92.325, 35.664, 1.156)
pt3dadd(51.931, 92.365, 35.678, 1.194)
pt3dadd(52.043, 92.406, 35.691, 1.23)
pt3dadd(52.157, 92.44, 35.7, 1.188)
pt3dadd(52.272, 92.473, 35.708, 1.134)
pt3dadd(52.387, 92.506, 35.716, 1.08)
pt3dadd(52.502, 92.54, 35.724, 1.024)
pt3dadd(52.617, 92.573, 35.731, 0.97)
pt3dadd(52.732, 92.606, 35.739, 0.916)
pt3dadd(52.847, 92.64, 35.747, 0.86)
pt3dadd(52.961, 92.673, 35.755, 0.806)
pt3dadd(53.076, 92.706, 35.763, 0.752)
pt3dadd(53.191, 92.739, 35.771, 0.696)
pt3dadd(53.298, 92.792, 35.783, 0.708)
pt3dadd(53.403, 92.848, 35.795, 0.726)
pt3dadd(53.508, 92.904, 35.807, 0.746)
pt3dadd(53.614, 92.959, 35.819, 0.766)
pt3dadd(53.719, 93.015, 35.832, 0.784)
pt3dadd(53.824, 93.07, 35.844, 0.804)
}
}
proc shape3d_124() {
dend_7[23] { pt3dadd(53.93, 93.126, 35.856, 0.822)
pt3dadd(54.035, 93.182, 35.868, 0.842)
pt3dadd(54.14, 93.237, 35.881, 0.86)
pt3dadd(54.246, 93.293, 35.893, 0.88)
pt3dadd(54.339, 93.346, 35.936, 0.866)
pt3dadd(54.43, 93.4, 35.983, 0.846)
pt3dadd(54.522, 93.453, 36.03, 0.828)
pt3dadd(54.613, 93.507, 36.077, 0.808)
pt3dadd(54.704, 93.56, 36.124, 0.79)
pt3dadd(54.796, 93.613, 36.171, 0.77)
pt3dadd(54.887, 93.667, 36.218, 0.752)
pt3dadd(54.978, 93.72, 36.265, 0.732)
pt3dadd(55.07, 93.774, 36.312, 0.714)
pt3dadd(55.161, 93.827, 36.36, 0.694)
pt3dadd(55.257, 93.889, 36.391, 0.692)
pt3dadd(55.353, 93.951, 36.422, 0.69)
pt3dadd(55.448, 94.013, 36.453, 0.69)
pt3dadd(55.544, 94.076, 36.483, 0.688)
pt3dadd(55.64, 94.138, 36.514, 0.686)
pt3dadd(55.735, 94.2, 36.545, 0.684)
pt3dadd(55.831, 94.262, 36.576, 0.682)
pt3dadd(55.927, 94.325, 36.607, 0.682)
pt3dadd(56.022, 94.387, 36.638, 0.68)
pt3dadd(56.118, 94.449, 36.669, 0.678)
pt3dadd(56.23, 94.483, 36.69, 0.678)
pt3dadd(56.342, 94.516, 36.712, 0.678)
pt3dadd(56.455, 94.55, 36.733, 0.678)
pt3dadd(56.567, 94.583, 36.755, 0.678)
pt3dadd(56.679, 94.617, 36.777, 0.678)
pt3dadd(56.792, 94.65, 36.798, 0.678)
pt3dadd(56.904, 94.684, 36.82, 0.678)
pt3dadd(57.016, 94.717, 36.841, 0.678)
pt3dadd(57.129, 94.75, 36.863, 0.678)
pt3dadd(57.241, 94.782, 36.884, 0.68)
pt3dadd(57.36, 94.791, 36.898, 0.708)
pt3dadd(57.478, 94.8, 36.912, 0.736)
pt3dadd(57.597, 94.809, 36.926, 0.766)
pt3dadd(57.715, 94.817, 36.94, 0.794)
pt3dadd(57.834, 94.826, 36.954, 0.822)
pt3dadd(57.952, 94.835, 36.968, 0.85)
pt3dadd(58.071, 94.844, 36.982, 0.878)
pt3dadd(58.189, 94.853, 36.996, 0.906)
pt3dadd(58.308, 94.862, 37.01, 0.936)
pt3dadd(58.426, 94.868, 37.026, 0.962)
pt3dadd(58.541, 94.859, 37.052, 0.98)
pt3dadd(58.656, 94.85, 37.078, 0.996)
pt3dadd(58.772, 94.841, 37.105, 1.014)
pt3dadd(58.887, 94.832, 37.132, 1.032)
pt3dadd(59.003, 94.823, 37.158, 1.048)
pt3dadd(59.118, 94.814, 37.185, 1.066)
pt3dadd(59.233, 94.805, 37.211, 1.082)
pt3dadd(59.349, 94.796, 37.237, 1.1)
pt3dadd(59.464, 94.787, 37.264, 1.118)
pt3dadd(59.578, 94.773, 37.292, 1.128)
pt3dadd(59.687, 94.745, 37.326, 1.124)
pt3dadd(59.797, 94.717, 37.36, 1.12)
pt3dadd(59.906, 94.689, 37.394, 1.114)
pt3dadd(60.015, 94.661, 37.427, 1.11)
pt3dadd(60.125, 94.633, 37.461, 1.104)
pt3dadd(60.234, 94.605, 37.495, 1.1)
pt3dadd(60.344, 94.576, 37.529, 1.094)
pt3dadd(60.453, 94.548, 37.563, 1.09)
pt3dadd(60.562, 94.52, 37.596, 1.086)
pt3dadd(60.67, 94.483, 37.626, 1.076)
pt3dadd(60.774, 94.43, 37.649, 1.06)
pt3dadd(60.878, 94.377, 37.672, 1.042)
pt3dadd(60.982, 94.323, 37.695, 1.026)
pt3dadd(61.086, 94.27, 37.718, 1.008)
pt3dadd(61.189, 94.217, 37.741, 0.992)
pt3dadd(61.293, 94.164, 37.764, 0.974)
pt3dadd(61.397, 94.11, 37.787, 0.958)
pt3dadd(61.501, 94.057, 37.811, 0.94)
pt3dadd(61.605, 94.004, 37.833, 0.924)
pt3dadd(61.71, 93.952, 37.853, 0.918)
pt3dadd(61.818, 93.902, 37.867, 0.934)
pt3dadd(61.926, 93.852, 37.88, 0.95)
pt3dadd(62.034, 93.802, 37.894, 0.966)
pt3dadd(62.142, 93.753, 37.908, 0.982)
pt3dadd(62.25, 93.703, 37.921, 0.998)
pt3dadd(62.358, 93.653, 37.935, 1.014)
pt3dadd(62.466, 93.603, 37.949, 1.032)
pt3dadd(62.574, 93.554, 37.962, 1.048)
pt3dadd(62.682, 93.504, 37.976, 1.064)
pt3dadd(62.788, 93.449, 37.988, 1.058)
pt3dadd(62.889, 93.386, 37.996, 1.018)
pt3dadd(62.991, 93.323, 38.005, 0.976)
pt3dadd(63.093, 93.26, 38.014, 0.936)
pt3dadd(63.194, 93.197, 38.022, 0.894)
pt3dadd(63.296, 93.134, 38.031, 0.854)
pt3dadd(63.397, 93.071, 38.039, 0.814)
pt3dadd(63.499, 93.008, 38.048, 0.772)
pt3dadd(63.6, 92.945, 38.057, 0.732)
pt3dadd(63.702, 92.882, 38.065, 0.69)
pt3dadd(63.802, 92.816, 38.074, 0.658)
pt3dadd(63.898, 92.745, 38.082, 0.638)
pt3dadd(63.994, 92.674, 38.09, 0.618)
pt3dadd(64.091, 92.603, 38.098, 0.598)
pt3dadd(64.187, 92.533, 38.106, 0.578)
pt3dadd(64.284, 92.462, 38.114, 0.558)
pt3dadd(64.38, 92.391, 38.122, 0.538)
pt3dadd(64.476, 92.32, 38.13, 0.518)
pt3dadd(64.573, 92.25, 38.138, 0.498)
pt3dadd(64.669, 92.179, 38.146, 0.478)
pt3dadd(64.764, 92.106, 38.156, 0.494)
pt3dadd(64.858, 92.032, 38.168, 0.56)
pt3dadd(64.951, 91.958, 38.18, 0.626)
pt3dadd(65.044, 91.884, 38.192, 0.692)
pt3dadd(65.138, 91.81, 38.204, 0.756)
pt3dadd(65.231, 91.736, 38.216, 0.822)
pt3dadd(65.324, 91.662, 38.228, 0.888)
pt3dadd(65.417, 91.588, 38.24, 0.954)
pt3dadd(65.511, 91.514, 38.252, 1.02)
pt3dadd(65.604, 91.44, 38.265, 1.086)
pt3dadd(65.692, 91.369, 38.292, 1.114)
pt3dadd(65.775, 91.304, 38.34, 1.09)
pt3dadd(65.857, 91.239, 38.389, 1.068)
pt3dadd(65.94, 91.173, 38.437, 1.046)
pt3dadd(66.022, 91.108, 38.485, 1.024)
pt3dadd(66.105, 91.043, 38.533, 1)
pt3dadd(66.187, 90.978, 38.581, 0.978)
pt3dadd(66.269, 90.912, 38.63, 0.956)
pt3dadd(66.352, 90.847, 38.678, 0.932)
pt3dadd(66.434, 90.781, 38.726, 0.91)
pt3dadd(66.526, 90.724, 38.767, 0.888)
pt3dadd(66.629, 90.676, 38.799, 0.864)
pt3dadd(66.732, 90.629, 38.832, 0.84)
pt3dadd(66.835, 90.581, 38.864, 0.816)
pt3dadd(66.938, 90.533, 38.897, 0.792)
pt3dadd(67.041, 90.486, 38.929, 0.768)
pt3dadd(67.144, 90.438, 38.962, 0.744)
pt3dadd(67.247, 90.39, 38.994, 0.72)
pt3dadd(67.35, 90.343, 39.027, 0.696)
pt3dadd(67.453, 90.295, 39.059, 0.672)
pt3dadd(67.552, 90.238, 39.085, 0.642)
pt3dadd(67.649, 90.169, 39.104, 0.604)
pt3dadd(67.745, 90.101, 39.122, 0.566)
pt3dadd(67.841, 90.033, 39.14, 0.528)
pt3dadd(67.937, 89.964, 39.158, 0.488)
pt3dadd(68.033, 89.896, 39.177, 0.45)
pt3dadd(68.129, 89.828, 39.195, 0.412)
pt3dadd(68.226, 89.759, 39.213, 0.374)
pt3dadd(68.322, 89.691, 39.231, 0.334)
pt3dadd(68.418, 89.622, 39.25, 0.296)
pt3dadd(68.511, 89.549, 39.265, 0.286)
pt3dadd(68.601, 89.471, 39.276, 0.31)
pt3dadd(68.69, 89.392, 39.287, 0.334)
pt3dadd(68.78, 89.313, 39.299, 0.358)
pt3dadd(68.869, 89.235, 39.31, 0.384)
pt3dadd(68.959, 89.156, 39.321, 0.408)
pt3dadd(69.049, 89.078, 39.333, 0.432)
pt3dadd(69.138, 88.999, 39.344, 0.456)
pt3dadd(69.228, 88.92, 39.356, 0.48)
pt3dadd(69.318, 88.842, 39.367, 0.504)
pt3dadd(69.403, 88.762, 39.387, 0.54)
pt3dadd(69.484, 88.68, 39.416, 0.59)
pt3dadd(69.564, 88.598, 39.445, 0.64)
pt3dadd(69.645, 88.517, 39.474, 0.692)
pt3dadd(69.726, 88.435, 39.503, 0.742)
pt3dadd(69.807, 88.353, 39.532, 0.792)
pt3dadd(69.887, 88.272, 39.561, 0.842)
pt3dadd(69.968, 88.19, 39.59, 0.892)
pt3dadd(70.049, 88.108, 39.619, 0.944)
pt3dadd(70.129, 88.027, 39.648, 0.994)
pt3dadd(70.205, 87.943, 39.682, 1.004)
pt3dadd(70.277, 87.858, 39.719, 0.994)
pt3dadd(70.35, 87.773, 39.756, 0.984)
pt3dadd(70.423, 87.689, 39.792, 0.974)
pt3dadd(70.495, 87.604, 39.829, 0.962)
pt3dadd(70.568, 87.519, 39.866, 0.952)
pt3dadd(70.641, 87.434, 39.902, 0.942)
pt3dadd(70.713, 87.349, 39.939, 0.932)
pt3dadd(70.786, 87.265, 39.976, 0.922)
pt3dadd(70.858, 87.18, 40.012, 0.91)
pt3dadd(70.929, 87.088, 40.039, 0.858)
pt3dadd(70.998, 86.994, 40.062, 0.79)
pt3dadd(71.067, 86.9, 40.085, 0.722)
pt3dadd(71.136, 86.806, 40.107, 0.654)
pt3dadd(71.206, 86.712, 40.13, 0.584)
pt3dadd(71.275, 86.618, 40.153, 0.516)
pt3dadd(71.344, 86.524, 40.175, 0.448)
pt3dadd(71.414, 86.43, 40.198, 0.378)
pt3dadd(71.483, 86.336, 40.221, 0.31)
pt3dadd(71.552, 86.241, 40.244, 0.242)
pt3dadd(71.612, 86.139, 40.259, 0.226)
pt3dadd(71.669, 86.035, 40.272, 0.226)
pt3dadd(71.726, 85.931, 40.285, 0.226)
pt3dadd(71.783, 85.826, 40.298, 0.226)
pt3dadd(71.84, 85.722, 40.312, 0.226)
pt3dadd(71.898, 85.618, 40.325, 0.226)
pt3dadd(71.955, 85.513, 40.338, 0.226)
pt3dadd(72.012, 85.409, 40.351, 0.226)
pt3dadd(72.069, 85.305, 40.364, 0.226)
pt3dadd(72.126, 85.2, 40.377, 0.226)
pt3dadd(72.192, 85.101, 40.385, 0.226)
pt3dadd(72.262, 85.003, 40.391, 0.226)
pt3dadd(72.331, 84.906, 40.397, 0.226)
pt3dadd(72.4, 84.808, 40.403, 0.226)
pt3dadd(72.469, 84.71, 40.409, 0.226)
pt3dadd(72.539, 84.612, 40.415, 0.226)
pt3dadd(72.608, 84.514, 40.421, 0.226)
}
}
proc shape3d_125() {
dend_7[23] { pt3dadd(72.677, 84.417, 40.427, 0.226)
pt3dadd(72.746, 84.319, 40.433, 0.226)
pt3dadd(72.815, 84.221, 40.44, 0.226)
pt3dadd(72.889, 84.127, 40.448, 0.236)
pt3dadd(72.964, 84.034, 40.457, 0.248)
pt3dadd(73.039, 83.941, 40.466, 0.258)
pt3dadd(73.114, 83.848, 40.475, 0.27)
pt3dadd(73.189, 83.755, 40.484, 0.282)
pt3dadd(73.264, 83.662, 40.493, 0.294)
pt3dadd(73.339, 83.569, 40.502, 0.306)
pt3dadd(73.414, 83.475, 40.511, 0.318)
pt3dadd(73.489, 83.382, 40.52, 0.33)
pt3dadd(73.564, 83.289, 40.528, 0.342)
pt3dadd(73.638, 83.197, 40.545, 0.358)
pt3dadd(73.711, 83.105, 40.564, 0.374)
pt3dadd(73.785, 83.013, 40.583, 0.39)
pt3dadd(73.858, 82.921, 40.602, 0.406)
pt3dadd(73.932, 82.829, 40.621, 0.424)
pt3dadd(74.005, 82.737, 40.639, 0.44)
pt3dadd(74.079, 82.644, 40.658, 0.456)
pt3dadd(74.152, 82.552, 40.677, 0.474)
pt3dadd(74.226, 82.46, 40.696, 0.49)
pt3dadd(74.299, 82.368, 40.715, 0.506)
pt3dadd(74.365, 82.277, 40.749, 0.524)
pt3dadd(74.43, 82.186, 40.786, 0.54)
pt3dadd(74.495, 82.095, 40.822, 0.558)
pt3dadd(74.56, 82.005, 40.859, 0.574)
pt3dadd(74.625, 81.914, 40.895, 0.592)
pt3dadd(74.69, 81.823, 40.932, 0.608)
pt3dadd(74.755, 81.732, 40.968, 0.626)
pt3dadd(74.82, 81.641, 41.005, 0.642)
pt3dadd(74.885, 81.55, 41.042, 0.66)
pt3dadd(74.95, 81.459, 41.078, 0.676)
pt3dadd(75.042, 81.392, 41.107, 0.678)
pt3dadd(75.137, 81.326, 41.135, 0.678)
pt3dadd(75.232, 81.261, 41.163, 0.678)
pt3dadd(75.327, 81.196, 41.191, 0.678)
pt3dadd(75.422, 81.131, 41.219, 0.678)
pt3dadd(75.517, 81.066, 41.247, 0.678)
pt3dadd(75.612, 81.001, 41.275, 0.678)
pt3dadd(75.707, 80.935, 41.303, 0.678)
pt3dadd(75.802, 80.87, 41.331, 0.678)
pt3dadd(75.897, 80.805, 41.359, 0.678)
pt3dadd(75.995, 80.738, 41.375, 0.648)
pt3dadd(76.093, 80.671, 41.389, 0.614)
pt3dadd(76.191, 80.604, 41.403, 0.58)
pt3dadd(76.289, 80.537, 41.418, 0.546)
pt3dadd(76.387, 80.469, 41.432, 0.512)
pt3dadd(76.484, 80.402, 41.446, 0.478)
pt3dadd(76.582, 80.335, 41.461, 0.444)
pt3dadd(76.68, 80.268, 41.475, 0.41)
pt3dadd(76.778, 80.201, 41.49, 0.376)
pt3dadd(76.876, 80.133, 41.504, 0.342)
pt3dadd(76.983, 80.08, 41.514, 0.328)
pt3dadd(77.09, 80.027, 41.523, 0.318)
pt3dadd(77.198, 79.975, 41.532, 0.306)
pt3dadd(77.305, 79.923, 41.541, 0.294)
pt3dadd(77.412, 79.87, 41.55, 0.284)
pt3dadd(77.52, 79.818, 41.559, 0.272)
pt3dadd(77.627, 79.765, 41.568, 0.26)
pt3dadd(77.735, 79.713, 41.577, 0.25)
pt3dadd(77.842, 79.661, 41.586, 0.238)
pt3dadd(77.949, 79.608, 41.595, 0.226)
pt3dadd(78.056, 79.554, 41.604, 0.252)
pt3dadd(78.162, 79.499, 41.613, 0.282)
pt3dadd(78.268, 79.445, 41.623, 0.31)
pt3dadd(78.375, 79.39, 41.632, 0.338)
pt3dadd(78.481, 79.336, 41.641, 0.366)
pt3dadd(78.587, 79.281, 41.65, 0.394)
pt3dadd(78.694, 79.227, 41.66, 0.422)
pt3dadd(78.8, 79.172, 41.669, 0.452)
pt3dadd(78.906, 79.118, 41.678, 0.48)
pt3dadd(79.013, 79.063, 41.687, 0.508)
pt3dadd(79.113, 79.003, 41.71, 0.548)
pt3dadd(79.213, 78.942, 41.733, 0.588)
pt3dadd(79.313, 78.882, 41.756, 0.628)
pt3dadd(79.413, 78.822, 41.779, 0.668)
pt3dadd(79.513, 78.761, 41.802, 0.71)
pt3dadd(79.613, 78.701, 41.825, 0.75)
pt3dadd(79.713, 78.641, 41.847, 0.79)
pt3dadd(79.813, 78.58, 41.87, 0.83)
pt3dadd(79.913, 78.52, 41.893, 0.87)
pt3dadd(80.012, 78.462, 41.92, 0.902)
pt3dadd(80.11, 78.416, 41.964, 0.884)
pt3dadd(80.207, 78.37, 42.008, 0.868)
pt3dadd(80.304, 78.324, 42.052, 0.852)
pt3dadd(80.402, 78.277, 42.096, 0.836)
pt3dadd(80.499, 78.231, 42.14, 0.818)
pt3dadd(80.596, 78.185, 42.184, 0.802)
pt3dadd(80.694, 78.139, 42.228, 0.786)
pt3dadd(80.791, 78.093, 42.272, 0.77)
pt3dadd(80.888, 78.047, 42.317, 0.754)
pt3dadd(80.988, 78.001, 42.355, 0.736)
pt3dadd(81.096, 77.955, 42.379, 0.714)
pt3dadd(81.203, 77.91, 42.403, 0.692)
pt3dadd(81.31, 77.865, 42.427, 0.67)
pt3dadd(81.418, 77.82, 42.451, 0.648)
pt3dadd(81.525, 77.775, 42.475, 0.626)
pt3dadd(81.633, 77.73, 42.499, 0.604)
pt3dadd(81.74, 77.685, 42.523, 0.582)
pt3dadd(81.848, 77.64, 42.547, 0.56)
pt3dadd(81.955, 77.595, 42.57, 0.54)
pt3dadd(82.062, 77.547, 42.59, 0.528)
pt3dadd(82.168, 77.492, 42.601, 0.54)
pt3dadd(82.275, 77.438, 42.611, 0.552)
pt3dadd(82.381, 77.384, 42.622, 0.564)
pt3dadd(82.487, 77.329, 42.632, 0.576)
pt3dadd(82.593, 77.275, 42.643, 0.586)
pt3dadd(82.7, 77.221, 42.653, 0.598)
pt3dadd(82.806, 77.166, 42.664, 0.61)
pt3dadd(82.912, 77.112, 42.675, 0.622)
pt3dadd(83.018, 77.058, 42.685, 0.634)
pt3dadd(83.127, 77.007, 42.693, 0.634)
pt3dadd(83.238, 76.964, 42.696, 0.616)
pt3dadd(83.35, 76.921, 42.698, 0.598)
pt3dadd(83.462, 76.878, 42.701, 0.58)
pt3dadd(83.574, 76.835, 42.704, 0.56)
pt3dadd(83.686, 76.791, 42.707, 0.542)
pt3dadd(83.798, 76.748, 42.709, 0.524)
pt3dadd(83.91, 76.705, 42.712, 0.506)
pt3dadd(84.022, 76.662, 42.715, 0.488)
pt3dadd(84.134, 76.619, 42.718, 0.468)
pt3dadd(84.243, 76.57, 42.722, 0.45)
pt3dadd(84.347, 76.51, 42.728, 0.432)
pt3dadd(84.451, 76.451, 42.735, 0.414)
pt3dadd(84.555, 76.391, 42.741, 0.396)
pt3dadd(84.659, 76.332, 42.748, 0.378)
pt3dadd(84.763, 76.272, 42.754, 0.36)
pt3dadd(84.867, 76.213, 42.76, 0.342)
pt3dadd(84.97, 76.153, 42.767, 0.324)
pt3dadd(85.074, 76.094, 42.773, 0.308)
pt3dadd(85.178, 76.034, 42.78, 0.29)
pt3dadd(85.285, 75.98, 42.788, 0.286)
pt3dadd(85.395, 75.935, 42.799, 0.31)
pt3dadd(85.506, 75.891, 42.809, 0.334)
pt3dadd(85.616, 75.846, 42.82, 0.358)
pt3dadd(85.727, 75.801, 42.831, 0.382)
pt3dadd(85.838, 75.757, 42.842, 0.406)
pt3dadd(85.948, 75.712, 42.853, 0.43)
pt3dadd(86.059, 75.667, 42.863, 0.454)
pt3dadd(86.169, 75.623, 42.874, 0.48)
pt3dadd(86.28, 75.578, 42.885, 0.504)
pt3dadd(86.388, 75.536, 42.907, 0.536)
pt3dadd(86.492, 75.498, 42.944, 0.584)
pt3dadd(86.597, 75.459, 42.982, 0.632)
pt3dadd(86.701, 75.421, 43.02, 0.68)
pt3dadd(86.805, 75.383, 43.058, 0.728)
pt3dadd(86.909, 75.345, 43.096, 0.776)
pt3dadd(87.014, 75.306, 43.134, 0.824)
pt3dadd(87.118, 75.268, 43.172, 0.872)
pt3dadd(87.222, 75.23, 43.21, 0.92)
pt3dadd(87.327, 75.192, 43.248, 0.968)
pt3dadd(87.432, 75.156, 43.285, 0.986)
pt3dadd(87.538, 75.12, 43.321, 0.982)
pt3dadd(87.644, 75.086, 43.358, 0.98)
pt3dadd(87.75, 75.051, 43.395, 0.978)
pt3dadd(87.856, 75.015, 43.432, 0.976)
pt3dadd(87.962, 74.981, 43.468, 0.974)
pt3dadd(88.068, 74.946, 43.505, 0.97)
pt3dadd(88.174, 74.911, 43.542, 0.968)
pt3dadd(88.28, 74.876, 43.579, 0.966)
pt3dadd(88.386, 74.841, 43.616, 0.964)
pt3dadd(88.489, 74.788, 43.638, 0.93)
pt3dadd(88.59, 74.727, 43.653, 0.884)
pt3dadd(88.692, 74.666, 43.669, 0.838)
pt3dadd(88.794, 74.606, 43.684, 0.792)
pt3dadd(88.896, 74.545, 43.7, 0.746)
pt3dadd(88.998, 74.484, 43.715, 0.7)
pt3dadd(89.1, 74.424, 43.731, 0.654)
pt3dadd(89.201, 74.363, 43.746, 0.608)
pt3dadd(89.303, 74.302, 43.762, 0.562)
pt3dadd(89.405, 74.241, 43.777, 0.516)
pt3dadd(89.501, 74.17, 43.785, 0.49)
pt3dadd(89.596, 74.097, 43.791, 0.468)
pt3dadd(89.691, 74.024, 43.796, 0.448)
pt3dadd(89.786, 73.951, 43.802, 0.426)
pt3dadd(89.88, 73.878, 43.808, 0.404)
pt3dadd(89.975, 73.804, 43.814, 0.384)
pt3dadd(90.07, 73.731, 43.819, 0.362)
pt3dadd(90.165, 73.658, 43.825, 0.34)
pt3dadd(90.26, 73.585, 43.831, 0.32)
pt3dadd(90.354, 73.511, 43.837, 0.298)
pt3dadd(90.446, 73.434, 43.838, 0.308)
pt3dadd(90.537, 73.356, 43.838, 0.322)
pt3dadd(90.629, 73.278, 43.839, 0.336)
pt3dadd(90.72, 73.2, 43.839, 0.35)
pt3dadd(90.811, 73.122, 43.84, 0.366)
pt3dadd(90.902, 73.044, 43.84, 0.38)
pt3dadd(90.993, 72.966, 43.84, 0.396)
pt3dadd(91.085, 72.888, 43.841, 0.41)
pt3dadd(91.176, 72.81, 43.841, 0.424)
pt3dadd(91.267, 72.732, 43.842, 0.44)
pt3dadd(91.356, 72.652, 43.842, 0.432)
pt3dadd(91.444, 72.571, 43.843, 0.42)
pt3dadd(91.533, 72.489, 43.844, 0.406)
pt3dadd(91.621, 72.408, 43.845, 0.394)
pt3dadd(91.71, 72.327, 43.846, 0.382)
pt3dadd(91.798, 72.246, 43.847, 0.37)
pt3dadd(91.887, 72.165, 43.848, 0.358)
pt3dadd(91.975, 72.084, 43.848, 0.346)
}
}
proc shape3d_126() {
dend_7[23] { pt3dadd(92.064, 72.003, 43.849, 0.334)
pt3dadd(92.152, 71.922, 43.85, 0.322)
pt3dadd(92.241, 71.842, 43.851, 0.312)
pt3dadd(92.331, 71.761, 43.853, 0.302)
pt3dadd(92.42, 71.681, 43.854, 0.292)
pt3dadd(92.509, 71.601, 43.855, 0.284)
pt3dadd(92.598, 71.521, 43.856, 0.274)
pt3dadd(92.687, 71.44, 43.858, 0.264)
pt3dadd(92.776, 71.36, 43.859, 0.256)
pt3dadd(92.865, 71.28, 43.86, 0.246)
pt3dadd(92.955, 71.199, 43.861, 0.236)
pt3dadd(93.044, 71.119, 43.862, 0.228)
pt3dadd(93.134, 71.04, 43.864, 0.226)
pt3dadd(93.225, 70.962, 43.866, 0.226)
pt3dadd(93.316, 70.884, 43.868, 0.226)
pt3dadd(93.407, 70.805, 43.87, 0.226)
pt3dadd(93.498, 70.727, 43.872, 0.226)
pt3dadd(93.588, 70.648, 43.874, 0.226)
pt3dadd(93.679, 70.57, 43.875, 0.226)
pt3dadd(93.77, 70.491, 43.877, 0.226)
pt3dadd(93.861, 70.413, 43.879, 0.226)
pt3dadd(93.952, 70.335, 43.881, 0.226)
pt3dadd(94.053, 70.271, 43.886, 0.25)
pt3dadd(94.156, 70.21, 43.89, 0.28)
pt3dadd(94.259, 70.149, 43.895, 0.308)
pt3dadd(94.363, 70.088, 43.9, 0.336)
pt3dadd(94.466, 70.028, 43.905, 0.366)
pt3dadd(94.569, 69.967, 43.91, 0.394)
pt3dadd(94.672, 69.906, 43.915, 0.424)
pt3dadd(94.776, 69.845, 43.92, 0.452)
pt3dadd(94.879, 69.784, 43.925, 0.48)
pt3dadd(94.982, 69.723, 43.93, 0.51)
pt3dadd(95.085, 69.662, 43.937, 0.528)
pt3dadd(95.187, 69.6, 43.944, 0.544)
pt3dadd(95.29, 69.538, 43.951, 0.56)
pt3dadd(95.393, 69.477, 43.958, 0.576)
pt3dadd(95.495, 69.415, 43.965, 0.594)
pt3dadd(95.598, 69.353, 43.973, 0.61)
pt3dadd(95.7, 69.291, 43.98, 0.626)
pt3dadd(95.803, 69.23, 43.987, 0.644)
pt3dadd(95.905, 69.168, 43.994, 0.66)
pt3dadd(96.008, 69.106, 44.001, 0.676)
pt3dadd(96.109, 69.043, 44.015, 0.678)
pt3dadd(96.209, 68.98, 44.03, 0.678)
pt3dadd(96.309, 68.916, 44.045, 0.678)
pt3dadd(96.41, 68.853, 44.06, 0.678)
pt3dadd(96.51, 68.79, 44.074, 0.678)
pt3dadd(96.61, 68.726, 44.089, 0.678)
pt3dadd(96.711, 68.663, 44.104, 0.678)
pt3dadd(96.811, 68.6, 44.118, 0.678)
pt3dadd(96.911, 68.536, 44.133, 0.678)
pt3dadd(97.012, 68.473, 44.148, 0.678)
pt3dadd(97.111, 68.419, 44.182, 0.678)
pt3dadd(97.21, 68.366, 44.217, 0.678)
pt3dadd(97.309, 68.313, 44.252, 0.678)
pt3dadd(97.408, 68.259, 44.287, 0.678)
pt3dadd(97.507, 68.206, 44.322, 0.678)
pt3dadd(97.606, 68.153, 44.357, 0.678)
pt3dadd(97.705, 68.1, 44.392, 0.678)
pt3dadd(97.804, 68.046, 44.427, 0.678)
pt3dadd(97.903, 67.993, 44.462, 0.678)
pt3dadd(98.001, 67.94, 44.497, 0.678)
pt3dadd(98.086, 67.857, 44.513, 0.678)
pt3dadd(98.171, 67.774, 44.528, 0.678)
pt3dadd(98.256, 67.691, 44.543, 0.678)
pt3dadd(98.34, 67.608, 44.558, 0.678)
pt3dadd(98.425, 67.525, 44.573, 0.678)
pt3dadd(98.509, 67.442, 44.589, 0.678)
pt3dadd(98.594, 67.358, 44.604, 0.678)
pt3dadd(98.679, 67.275, 44.619, 0.678)
pt3dadd(98.763, 67.192, 44.634, 0.678)
pt3dadd(98.848, 67.109, 44.649, 0.678)
pt3dadd(98.875, 66.994, 44.634, 0.634)
pt3dadd(98.901, 66.878, 44.619, 0.59)
pt3dadd(98.927, 66.762, 44.604, 0.546)
pt3dadd(98.954, 66.647, 44.589, 0.502)
pt3dadd(98.98, 66.531, 44.574, 0.46)
pt3dadd(99.006, 66.415, 44.559, 0.416)
pt3dadd(99.033, 66.3, 44.544, 0.372)
pt3dadd(99.059, 66.184, 44.529, 0.328)
pt3dadd(99.085, 66.068, 44.514, 0.284)
pt3dadd(99.017, 66.014, 44.445, 0.322)
pt3dadd(98.948, 65.959, 44.377, 0.362)
pt3dadd(98.88, 65.904, 44.309, 0.402)
pt3dadd(98.812, 65.85, 44.24, 0.442)
pt3dadd(98.743, 65.795, 44.172, 0.48)
pt3dadd(98.675, 65.74, 44.104, 0.52)
pt3dadd(98.606, 65.685, 44.035, 0.56)
pt3dadd(98.538, 65.631, 43.967, 0.6)
pt3dadd(98.47, 65.576, 43.898, 0.638)
pt3dadd(98.401, 65.521, 43.83, 0.678)
}
dend_7[24] {pt3dclear()
pt3dadd(39.22, 92.111, 31.747, 1.13)
pt3dadd(39.22, 92.071, 31.758, 1.116)
pt3dadd(39.22, 91.957, 31.79, 1.074)
pt3dadd(39.22, 91.843, 31.821, 1.032)
pt3dadd(39.22, 91.729, 31.853, 0.99)
pt3dadd(39.224, 91.617, 31.889, 0.956)
pt3dadd(39.232, 91.508, 31.928, 0.93)
pt3dadd(39.24, 91.398, 31.968, 0.906)
pt3dadd(39.248, 91.288, 32.007, 0.88)
pt3dadd(39.256, 91.178, 32.047, 0.856)
pt3dadd(39.264, 91.068, 32.086, 0.83)
pt3dadd(39.273, 90.958, 32.126, 0.806)
pt3dadd(39.281, 90.848, 32.165, 0.78)
pt3dadd(39.289, 90.738, 32.205, 0.754)
pt3dadd(39.297, 90.628, 32.244, 0.73)
pt3dadd(39.316, 90.527, 32.294, 0.73)
pt3dadd(39.342, 90.431, 32.35, 0.744)
pt3dadd(39.368, 90.334, 32.405, 0.758)
pt3dadd(39.393, 90.238, 32.461, 0.772)
pt3dadd(39.419, 90.141, 32.517, 0.786)
pt3dadd(39.445, 90.045, 32.572, 0.8)
pt3dadd(39.471, 89.949, 32.628, 0.814)
pt3dadd(39.496, 89.852, 32.684, 0.828)
pt3dadd(39.522, 89.756, 32.739, 0.84)
pt3dadd(39.548, 89.66, 32.795, 0.854)
pt3dadd(39.585, 89.561, 32.841, 0.846)
pt3dadd(39.63, 89.462, 32.883, 0.826)
pt3dadd(39.675, 89.362, 32.924, 0.806)
pt3dadd(39.719, 89.262, 32.966, 0.786)
pt3dadd(39.764, 89.163, 33.007, 0.766)
pt3dadd(39.808, 89.063, 33.049, 0.746)
pt3dadd(39.853, 88.963, 33.09, 0.724)
pt3dadd(39.898, 88.864, 33.132, 0.704)
pt3dadd(39.942, 88.764, 33.173, 0.684)
pt3dadd(39.987, 88.664, 33.215, 0.664)
pt3dadd(40.033, 88.564, 33.254, 0.648)
pt3dadd(40.079, 88.463, 33.292, 0.634)
pt3dadd(40.125, 88.362, 33.331, 0.62)
pt3dadd(40.171, 88.262, 33.369, 0.606)
pt3dadd(40.217, 88.161, 33.408, 0.594)
pt3dadd(40.263, 88.06, 33.446, 0.58)
pt3dadd(40.309, 87.959, 33.484, 0.566)
pt3dadd(40.356, 87.859, 33.523, 0.552)
pt3dadd(40.402, 87.758, 33.561, 0.538)
pt3dadd(40.448, 87.657, 33.6, 0.524)
pt3dadd(40.487, 87.556, 33.642, 0.532)
pt3dadd(40.525, 87.454, 33.685, 0.546)
pt3dadd(40.562, 87.353, 33.728, 0.562)
pt3dadd(40.6, 87.251, 33.771, 0.576)
pt3dadd(40.637, 87.149, 33.814, 0.59)
pt3dadd(40.675, 87.048, 33.857, 0.606)
pt3dadd(40.712, 86.946, 33.9, 0.62)
pt3dadd(40.75, 86.845, 33.943, 0.634)
pt3dadd(40.787, 86.743, 33.986, 0.648)
pt3dadd(40.824, 86.641, 34.029, 0.662)
pt3dadd(40.874, 86.538, 34.056, 0.64)
pt3dadd(40.928, 86.434, 34.079, 0.606)
pt3dadd(40.981, 86.33, 34.102, 0.572)
pt3dadd(41.034, 86.226, 34.124, 0.54)
pt3dadd(41.088, 86.122, 34.147, 0.506)
pt3dadd(41.141, 86.018, 34.17, 0.472)
pt3dadd(41.194, 85.914, 34.192, 0.44)
pt3dadd(41.247, 85.81, 34.215, 0.406)
pt3dadd(41.301, 85.706, 34.237, 0.372)
pt3dadd(41.354, 85.602, 34.26, 0.34)
pt3dadd(41.394, 85.491, 34.278, 0.324)
pt3dadd(41.431, 85.378, 34.295, 0.314)
pt3dadd(41.467, 85.266, 34.311, 0.302)
pt3dadd(41.504, 85.153, 34.328, 0.292)
pt3dadd(41.541, 85.041, 34.344, 0.28)
pt3dadd(41.577, 84.928, 34.361, 0.27)
pt3dadd(41.614, 84.816, 34.377, 0.26)
pt3dadd(41.65, 84.703, 34.394, 0.25)
pt3dadd(41.687, 84.59, 34.41, 0.238)
pt3dadd(41.724, 84.478, 34.427, 0.228)
pt3dadd(41.747, 84.361, 34.438, 0.226)
pt3dadd(41.769, 84.244, 34.449, 0.226)
pt3dadd(41.79, 84.126, 34.459, 0.226)
pt3dadd(41.812, 84.009, 34.47, 0.226)
pt3dadd(41.833, 83.892, 34.481, 0.226)
pt3dadd(41.855, 83.774, 34.491, 0.226)
pt3dadd(41.876, 83.657, 34.502, 0.226)
pt3dadd(41.898, 83.54, 34.512, 0.226)
pt3dadd(41.919, 83.422, 34.523, 0.226)
pt3dadd(41.941, 83.305, 34.534, 0.226)
pt3dadd(41.952, 83.186, 34.542, 0.23)
pt3dadd(41.961, 83.067, 34.551, 0.236)
pt3dadd(41.971, 82.948, 34.559, 0.242)
pt3dadd(41.98, 82.828, 34.568, 0.246)
pt3dadd(41.99, 82.709, 34.576, 0.252)
pt3dadd(41.999, 82.59, 34.585, 0.258)
pt3dadd(42.009, 82.471, 34.593, 0.262)
pt3dadd(42.018, 82.352, 34.602, 0.268)
pt3dadd(42.028, 82.232, 34.61, 0.274)
pt3dadd(42.037, 82.113, 34.618, 0.278)
pt3dadd(42.038, 81.994, 34.632, 0.292)
pt3dadd(42.038, 81.876, 34.646, 0.308)
pt3dadd(42.038, 81.757, 34.661, 0.324)
pt3dadd(42.038, 81.638, 34.675, 0.34)
pt3dadd(42.038, 81.519, 34.69, 0.356)
pt3dadd(42.038, 81.401, 34.704, 0.372)
pt3dadd(42.038, 81.282, 34.718, 0.388)
pt3dadd(42.038, 81.163, 34.733, 0.402)
pt3dadd(42.038, 81.044, 34.747, 0.418)
pt3dadd(42.038, 80.926, 34.761, 0.434)
pt3dadd(42.038, 80.814, 34.797, 0.418)
pt3dadd(42.038, 80.703, 34.835, 0.4)
pt3dadd(42.038, 80.592, 34.873, 0.384)
pt3dadd(42.038, 80.481, 34.911, 0.366)
}
}
proc shape3d_127() {
dend_7[24] { pt3dadd(42.038, 80.37, 34.948, 0.348)
pt3dadd(42.038, 80.258, 34.986, 0.33)
pt3dadd(42.038, 80.147, 35.024, 0.312)
pt3dadd(42.038, 80.036, 35.062, 0.294)
pt3dadd(42.038, 79.925, 35.099, 0.276)
pt3dadd(42.038, 79.814, 35.137, 0.258)
pt3dadd(42.038, 79.699, 35.166, 0.31)
pt3dadd(42.038, 79.584, 35.193, 0.37)
pt3dadd(42.038, 79.468, 35.221, 0.428)
pt3dadd(42.038, 79.353, 35.248, 0.486)
pt3dadd(42.038, 79.237, 35.276, 0.544)
pt3dadd(42.038, 79.122, 35.303, 0.604)
pt3dadd(42.038, 79.007, 35.331, 0.662)
pt3dadd(42.038, 78.891, 35.359, 0.72)
pt3dadd(42.038, 78.776, 35.386, 0.778)
pt3dadd(42.038, 78.661, 35.414, 0.838)
pt3dadd(42.038, 78.543, 35.433, 0.824)
pt3dadd(42.038, 78.425, 35.451, 0.806)
pt3dadd(42.038, 78.307, 35.47, 0.788)
pt3dadd(42.038, 78.189, 35.489, 0.772)
pt3dadd(42.038, 78.071, 35.507, 0.754)
pt3dadd(42.038, 77.953, 35.526, 0.736)
pt3dadd(42.038, 77.835, 35.544, 0.718)
pt3dadd(42.038, 77.718, 35.563, 0.7)
pt3dadd(42.038, 77.6, 35.581, 0.682)
pt3dadd(42.038, 77.482, 35.6, 0.664)
pt3dadd(42.038, 77.363, 35.612, 0.622)
pt3dadd(42.038, 77.243, 35.623, 0.578)
pt3dadd(42.038, 77.124, 35.635, 0.534)
pt3dadd(42.038, 77.005, 35.646, 0.49)
pt3dadd(42.038, 76.886, 35.658, 0.446)
pt3dadd(42.038, 76.767, 35.669, 0.402)
pt3dadd(42.038, 76.647, 35.68, 0.36)
pt3dadd(42.038, 76.528, 35.692, 0.316)
pt3dadd(42.038, 76.409, 35.703, 0.272)
pt3dadd(42.038, 76.29, 35.715, 0.228)
pt3dadd(42.038, 76.17, 35.724, 0.23)
pt3dadd(42.038, 76.051, 35.733, 0.236)
pt3dadd(42.038, 75.931, 35.742, 0.24)
pt3dadd(42.038, 75.812, 35.751, 0.244)
pt3dadd(42.038, 75.692, 35.76, 0.25)
pt3dadd(42.038, 75.573, 35.769, 0.254)
pt3dadd(42.038, 75.453, 35.778, 0.258)
pt3dadd(42.038, 75.334, 35.787, 0.264)
pt3dadd(42.038, 75.214, 35.797, 0.268)
pt3dadd(42.038, 75.095, 35.806, 0.274)
pt3dadd(42.039, 74.976, 35.82, 0.294)
pt3dadd(42.039, 74.857, 35.835, 0.318)
pt3dadd(42.039, 74.739, 35.85, 0.34)
pt3dadd(42.039, 74.62, 35.865, 0.362)
pt3dadd(42.039, 74.501, 35.88, 0.384)
pt3dadd(42.039, 74.383, 35.895, 0.406)
pt3dadd(42.039, 74.264, 35.91, 0.43)
pt3dadd(42.039, 74.145, 35.925, 0.452)
pt3dadd(42.039, 74.027, 35.939, 0.474)
pt3dadd(42.04, 73.908, 35.954, 0.496)
pt3dadd(42.04, 73.798, 35.994, 0.566)
pt3dadd(42.04, 73.688, 36.034, 0.638)
pt3dadd(42.04, 73.578, 36.073, 0.708)
pt3dadd(42.04, 73.468, 36.113, 0.778)
pt3dadd(42.04, 73.357, 36.153, 0.85)
pt3dadd(42.04, 73.247, 36.193, 0.92)
pt3dadd(42.04, 73.137, 36.233, 0.99)
pt3dadd(42.04, 73.027, 36.272, 1.062)
pt3dadd(42.04, 72.917, 36.312, 1.132)
pt3dadd(42.04, 72.807, 36.352, 1.202)
pt3dadd(42.04, 72.694, 36.385, 1.148)
pt3dadd(42.04, 72.581, 36.418, 1.092)
pt3dadd(42.04, 72.467, 36.451, 1.034)
pt3dadd(42.04, 72.354, 36.484, 0.978)
pt3dadd(42.04, 72.241, 36.517, 0.922)
pt3dadd(42.04, 72.128, 36.55, 0.866)
pt3dadd(42.04, 72.014, 36.583, 0.808)
pt3dadd(42.04, 71.901, 36.617, 0.752)
pt3dadd(42.04, 71.788, 36.65, 0.696)
pt3dadd(42.04, 71.675, 36.683, 0.638)
pt3dadd(42.04, 71.559, 36.71, 0.598)
pt3dadd(42.04, 71.444, 36.737, 0.556)
pt3dadd(42.04, 71.328, 36.765, 0.516)
pt3dadd(42.04, 71.213, 36.792, 0.474)
pt3dadd(42.04, 71.097, 36.819, 0.432)
pt3dadd(42.04, 70.982, 36.847, 0.392)
pt3dadd(42.04, 70.867, 36.874, 0.35)
pt3dadd(42.04, 70.751, 36.902, 0.308)
pt3dadd(42.04, 70.636, 36.929, 0.268)
pt3dadd(42.04, 70.52, 36.956, 0.226)
pt3dadd(42.04, 70.406, 36.986, 0.226)
pt3dadd(42.04, 70.291, 37.017, 0.226)
pt3dadd(42.04, 70.177, 37.047, 0.226)
pt3dadd(42.04, 70.063, 37.076, 0.226)
pt3dadd(42.04, 69.948, 37.107, 0.226)
pt3dadd(42.04, 69.834, 37.137, 0.226)
pt3dadd(42.04, 69.719, 37.167, 0.226)
pt3dadd(42.041, 69.605, 37.197, 0.226)
pt3dadd(42.041, 69.49, 37.227, 0.226)
pt3dadd(42.041, 69.376, 37.257, 0.226)
pt3dadd(42.041, 69.266, 37.298, 0.228)
pt3dadd(42.041, 69.156, 37.338, 0.23)
pt3dadd(42.041, 69.047, 37.379, 0.232)
pt3dadd(42.041, 68.937, 37.419, 0.234)
pt3dadd(42.041, 68.827, 37.46, 0.236)
pt3dadd(42.042, 68.718, 37.5, 0.238)
pt3dadd(42.042, 68.608, 37.541, 0.24)
pt3dadd(42.042, 68.498, 37.581, 0.242)
pt3dadd(42.042, 68.388, 37.622, 0.244)
pt3dadd(42.042, 68.279, 37.662, 0.248)
pt3dadd(42.042, 68.166, 37.695, 0.284)
pt3dadd(42.043, 68.053, 37.729, 0.322)
pt3dadd(42.043, 67.94, 37.763, 0.358)
pt3dadd(42.043, 67.827, 37.796, 0.394)
pt3dadd(42.044, 67.713, 37.83, 0.43)
pt3dadd(42.044, 67.6, 37.863, 0.468)
pt3dadd(42.045, 67.487, 37.897, 0.504)
pt3dadd(42.045, 67.374, 37.93, 0.54)
pt3dadd(42.045, 67.261, 37.964, 0.576)
pt3dadd(42.046, 67.148, 37.997, 0.612)
pt3dadd(42.046, 67.034, 38.028, 0.634)
pt3dadd(42.047, 66.92, 38.06, 0.656)
pt3dadd(42.048, 66.806, 38.091, 0.678)
pt3dadd(42.048, 66.692, 38.122, 0.7)
pt3dadd(42.049, 66.578, 38.153, 0.722)
pt3dadd(42.05, 66.464, 38.184, 0.744)
pt3dadd(42.051, 66.35, 38.215, 0.766)
pt3dadd(42.051, 66.236, 38.246, 0.788)
pt3dadd(42.052, 66.122, 38.277, 0.81)
pt3dadd(42.053, 66.008, 38.309, 0.832)
pt3dadd(42.054, 65.899, 38.351, 0.848)
pt3dadd(42.055, 65.79, 38.393, 0.866)
pt3dadd(42.056, 65.682, 38.435, 0.884)
pt3dadd(42.057, 65.573, 38.478, 0.902)
pt3dadd(42.058, 65.464, 38.52, 0.92)
pt3dadd(42.059, 65.355, 38.562, 0.938)
pt3dadd(42.06, 65.247, 38.604, 0.956)
pt3dadd(42.062, 65.138, 38.646, 0.974)
pt3dadd(42.063, 65.029, 38.689, 0.992)
pt3dadd(42.064, 64.921, 38.732, 1.008)
pt3dadd(42.066, 64.819, 38.785, 1)
pt3dadd(42.068, 64.718, 38.839, 0.994)
pt3dadd(42.069, 64.616, 38.892, 0.988)
pt3dadd(42.072, 64.515, 38.945, 0.98)
pt3dadd(42.073, 64.413, 38.998, 0.974)
pt3dadd(42.075, 64.312, 39.052, 0.968)
pt3dadd(42.077, 64.21, 39.105, 0.96)
pt3dadd(42.079, 64.109, 39.159, 0.954)
pt3dadd(42.081, 64.007, 39.212, 0.946)
pt3dadd(42.083, 63.907, 39.266, 0.934)
pt3dadd(42.086, 63.813, 39.328, 0.868)
pt3dadd(42.089, 63.719, 39.39, 0.804)
pt3dadd(42.091, 63.625, 39.452, 0.738)
pt3dadd(42.094, 63.531, 39.514, 0.674)
pt3dadd(42.097, 63.437, 39.577, 0.608)
pt3dadd(42.1, 63.343, 39.639, 0.544)
pt3dadd(42.102, 63.249, 39.701, 0.478)
pt3dadd(42.105, 63.155, 39.763, 0.414)
pt3dadd(42.108, 63.061, 39.825, 0.35)
pt3dadd(42.111, 62.966, 39.886, 0.296)
pt3dadd(42.119, 62.863, 39.937, 0.34)
pt3dadd(42.126, 62.76, 39.989, 0.386)
pt3dadd(42.134, 62.658, 40.04, 0.43)
pt3dadd(42.141, 62.555, 40.091, 0.474)
pt3dadd(42.148, 62.452, 40.143, 0.518)
pt3dadd(42.156, 62.349, 40.194, 0.562)
pt3dadd(42.163, 62.247, 40.246, 0.608)
pt3dadd(42.171, 62.144, 40.297, 0.652)
pt3dadd(42.178, 62.041, 40.348, 0.696)
pt3dadd(42.186, 61.94, 40.401, 0.734)
pt3dadd(42.2, 61.85, 40.466, 0.736)
pt3dadd(42.213, 61.76, 40.531, 0.736)
pt3dadd(42.227, 61.669, 40.596, 0.738)
pt3dadd(42.241, 61.579, 40.661, 0.74)
pt3dadd(42.254, 61.489, 40.726, 0.74)
pt3dadd(42.268, 61.399, 40.791, 0.742)
pt3dadd(42.281, 61.308, 40.856, 0.742)
pt3dadd(42.295, 61.218, 40.921, 0.744)
pt3dadd(42.308, 61.128, 40.986, 0.744)
pt3dadd(42.327, 61.037, 41.048, 0.744)
pt3dadd(42.368, 60.943, 41.101, 0.738)
pt3dadd(42.408, 60.849, 41.153, 0.73)
pt3dadd(42.449, 60.756, 41.205, 0.724)
pt3dadd(42.489, 60.662, 41.258, 0.716)
pt3dadd(42.53, 60.568, 41.311, 0.71)
pt3dadd(42.571, 60.474, 41.363, 0.704)
pt3dadd(42.611, 60.381, 41.415, 0.696)
pt3dadd(42.652, 60.287, 41.468, 0.69)
pt3dadd(42.692, 60.193, 41.52, 0.682)
pt3dadd(42.731, 60.098, 41.573, 0.67)
pt3dadd(42.766, 60.002, 41.624, 0.648)
pt3dadd(42.801, 59.905, 41.676, 0.626)
pt3dadd(42.836, 59.808, 41.727, 0.604)
pt3dadd(42.871, 59.712, 41.779, 0.582)
pt3dadd(42.906, 59.615, 41.83, 0.56)
pt3dadd(42.941, 59.518, 41.882, 0.538)
pt3dadd(42.976, 59.422, 41.933, 0.516)
pt3dadd(43.011, 59.325, 41.985, 0.494)
pt3dadd(43.046, 59.229, 42.037, 0.472)
pt3dadd(43.074, 59.13, 42.088, 0.45)
pt3dadd(43.093, 59.028, 42.139, 0.426)
pt3dadd(43.112, 58.927, 42.19, 0.402)
pt3dadd(43.131, 58.825, 42.241, 0.38)
pt3dadd(43.149, 58.724, 42.292, 0.356)
}
}
proc shape3d_128() {
dend_7[24] { pt3dadd(43.168, 58.623, 42.343, 0.332)
pt3dadd(43.187, 58.521, 42.394, 0.308)
pt3dadd(43.206, 58.42, 42.445, 0.284)
pt3dadd(43.225, 58.318, 42.496, 0.262)
pt3dadd(43.244, 58.217, 42.548, 0.238)
pt3dadd(43.255, 58.112, 42.594, 0.226)
pt3dadd(43.259, 58.003, 42.637, 0.226)
pt3dadd(43.264, 57.895, 42.679, 0.226)
pt3dadd(43.268, 57.786, 42.722, 0.226)
pt3dadd(43.272, 57.678, 42.764, 0.226)
pt3dadd(43.277, 57.569, 42.807, 0.226)
pt3dadd(43.281, 57.461, 42.849, 0.226)
pt3dadd(43.285, 57.352, 42.892, 0.226)
pt3dadd(43.29, 57.244, 42.935, 0.226)
pt3dadd(43.294, 57.135, 42.977, 0.226)
pt3dadd(43.289, 57.033, 43.028, 0.226)
pt3dadd(43.276, 56.936, 43.086, 0.226)
pt3dadd(43.264, 56.839, 43.144, 0.226)
pt3dadd(43.251, 56.742, 43.202, 0.226)
pt3dadd(43.239, 56.645, 43.259, 0.226)
pt3dadd(43.226, 56.547, 43.317, 0.226)
pt3dadd(43.213, 56.45, 43.375, 0.226)
pt3dadd(43.201, 56.353, 43.433, 0.226)
pt3dadd(43.188, 56.256, 43.491, 0.226)
pt3dadd(43.176, 56.159, 43.549, 0.226)
pt3dadd(43.155, 56.062, 43.604, 0.226)
pt3dadd(43.127, 55.964, 43.657, 0.226)
pt3dadd(43.099, 55.866, 43.709, 0.226)
pt3dadd(43.071, 55.767, 43.762, 0.226)
pt3dadd(43.043, 55.669, 43.815, 0.226)
pt3dadd(43.015, 55.571, 43.868, 0.226)
pt3dadd(42.987, 55.473, 43.92, 0.226)
pt3dadd(42.959, 55.375, 43.973, 0.226)
pt3dadd(42.931, 55.277, 44.026, 0.226)
pt3dadd(42.904, 55.179, 44.079, 0.226)
pt3dadd(42.855, 55.103, 44.14, 0.264)
pt3dadd(42.792, 55.043, 44.209, 0.328)
pt3dadd(42.728, 54.984, 44.278, 0.394)
pt3dadd(42.665, 54.924, 44.347, 0.458)
pt3dadd(42.601, 54.864, 44.415, 0.524)
pt3dadd(42.538, 54.804, 44.484, 0.588)
pt3dadd(42.474, 54.745, 44.553, 0.654)
pt3dadd(42.411, 54.685, 44.621, 0.718)
pt3dadd(42.347, 54.625, 44.69, 0.784)
pt3dadd(42.283, 54.566, 44.759, 0.848)
pt3dadd(42.204, 54.539, 44.83, 0.88)
pt3dadd(42.123, 54.517, 44.902, 0.908)
pt3dadd(42.042, 54.496, 44.973, 0.936)
pt3dadd(41.961, 54.474, 45.045, 0.964)
pt3dadd(41.88, 54.452, 45.116, 0.992)
pt3dadd(41.799, 54.43, 45.188, 1.02)
pt3dadd(41.718, 54.408, 45.259, 1.046)
pt3dadd(41.637, 54.387, 45.331, 1.074)
pt3dadd(41.556, 54.365, 45.402, 1.102)
pt3dadd(41.475, 54.343, 45.474, 1.13)
pt3dadd(41.391, 54.334, 45.544, 1.13)
pt3dadd(41.306, 54.324, 45.615, 1.13)
pt3dadd(41.222, 54.315, 45.685, 1.13)
pt3dadd(41.137, 54.305, 45.756, 1.13)
pt3dadd(41.053, 54.296, 45.826, 1.13)
pt3dadd(40.968, 54.287, 45.896, 1.13)
pt3dadd(40.883, 54.277, 45.967, 1.13)
pt3dadd(40.799, 54.268, 46.037, 1.13)
pt3dadd(40.714, 54.258, 46.108, 1.13)
pt3dadd(40.63, 54.249, 46.179, 1.13)
}
dend_7[25] {pt3dclear()
pt3dadd(24.947, 100.473, 27.161, 1.808)
pt3dadd(24.95, 100.506, 27.188, 1.79)
pt3dadd(24.96, 100.591, 27.259, 1.744)
pt3dadd(24.969, 100.675, 27.329, 1.7)
pt3dadd(24.978, 100.76, 27.4, 1.654)
pt3dadd(24.987, 100.845, 27.47, 1.608)
pt3dadd(24.996, 100.929, 27.541, 1.564)
pt3dadd(25.006, 101.014, 27.611, 1.518)
pt3dadd(25.015, 101.098, 27.682, 1.472)
pt3dadd(25.024, 101.183, 27.752, 1.426)
pt3dadd(25.033, 101.267, 27.823, 1.382)
pt3dadd(25.043, 101.352, 27.894, 1.336)
pt3dadd(25.052, 101.436, 27.964, 1.29)
pt3dadd(25.061, 101.521, 28.035, 1.246)
pt3dadd(25.07, 101.606, 28.105, 1.2)
pt3dadd(25.08, 101.69, 28.176, 1.154)
pt3dadd(25.089, 101.775, 28.246, 1.11)
pt3dadd(25.098, 101.859, 28.317, 1.064)
pt3dadd(25.107, 101.944, 28.387, 1.018)
pt3dadd(25.116, 102.028, 28.458, 0.972)
pt3dadd(25.126, 102.113, 28.528, 0.928)
pt3dadd(25.101, 102.205, 28.578, 0.904)
pt3dadd(25.042, 102.303, 28.606, 0.904)
pt3dadd(24.983, 102.402, 28.635, 0.904)
pt3dadd(24.924, 102.501, 28.663, 0.904)
pt3dadd(24.866, 102.6, 28.691, 0.904)
pt3dadd(24.807, 102.699, 28.72, 0.904)
pt3dadd(24.748, 102.798, 28.748, 0.904)
pt3dadd(24.689, 102.897, 28.776, 0.904)
pt3dadd(24.63, 102.995, 28.805, 0.904)
pt3dadd(24.571, 103.094, 28.833, 0.904)
pt3dadd(24.517, 103.194, 28.866, 0.904)
pt3dadd(24.47, 103.294, 28.904, 0.904)
pt3dadd(24.422, 103.395, 28.941, 0.904)
pt3dadd(24.375, 103.495, 28.979, 0.904)
pt3dadd(24.327, 103.596, 29.017, 0.904)
pt3dadd(24.279, 103.696, 29.054, 0.904)
pt3dadd(24.232, 103.796, 29.092, 0.904)
pt3dadd(24.184, 103.897, 29.13, 0.904)
pt3dadd(24.136, 103.997, 29.167, 0.904)
pt3dadd(24.089, 104.098, 29.205, 0.904)
pt3dadd(24.053, 104.197, 29.251, 0.902)
pt3dadd(24.025, 104.297, 29.302, 0.9)
pt3dadd(23.997, 104.396, 29.353, 0.898)
pt3dadd(23.968, 104.496, 29.404, 0.894)
pt3dadd(23.94, 104.595, 29.454, 0.892)
pt3dadd(23.912, 104.694, 29.505, 0.89)
pt3dadd(23.884, 104.794, 29.556, 0.888)
pt3dadd(23.856, 104.893, 29.607, 0.886)
pt3dadd(23.827, 104.993, 29.658, 0.882)
pt3dadd(23.799, 105.092, 29.709, 0.88)
pt3dadd(23.778, 105.191, 29.763, 0.87)
pt3dadd(23.762, 105.289, 29.818, 0.854)
pt3dadd(23.745, 105.387, 29.874, 0.838)
pt3dadd(23.729, 105.485, 29.93, 0.822)
pt3dadd(23.713, 105.583, 29.986, 0.806)
pt3dadd(23.696, 105.682, 30.042, 0.79)
pt3dadd(23.68, 105.78, 30.098, 0.774)
pt3dadd(23.663, 105.878, 30.153, 0.76)
pt3dadd(23.647, 105.976, 30.209, 0.744)
pt3dadd(23.63, 106.074, 30.265, 0.728)
pt3dadd(23.617, 106.178, 30.314, 0.704)
pt3dadd(23.605, 106.284, 30.359, 0.674)
pt3dadd(23.593, 106.391, 30.404, 0.644)
pt3dadd(23.581, 106.498, 30.449, 0.614)
pt3dadd(23.569, 106.604, 30.493, 0.584)
pt3dadd(23.557, 106.711, 30.538, 0.554)
pt3dadd(23.545, 106.817, 30.583, 0.524)
pt3dadd(23.533, 106.924, 30.628, 0.494)
pt3dadd(23.521, 107.031, 30.673, 0.464)
pt3dadd(23.51, 107.137, 30.718, 0.436)
pt3dadd(23.491, 107.247, 30.755, 0.422)
pt3dadd(23.469, 107.358, 30.789, 0.418)
pt3dadd(23.447, 107.468, 30.822, 0.412)
pt3dadd(23.425, 107.579, 30.856, 0.408)
pt3dadd(23.403, 107.69, 30.889, 0.404)
pt3dadd(23.381, 107.801, 30.923, 0.398)
pt3dadd(23.359, 107.912, 30.956, 0.394)
pt3dadd(23.337, 108.023, 30.99, 0.39)
pt3dadd(23.315, 108.134, 31.023, 0.384)
pt3dadd(23.293, 108.245, 31.057, 0.38)
pt3dadd(23.262, 108.355, 31.085, 0.404)
pt3dadd(23.228, 108.466, 31.112, 0.436)
pt3dadd(23.194, 108.576, 31.139, 0.47)
pt3dadd(23.16, 108.687, 31.165, 0.502)
pt3dadd(23.126, 108.797, 31.192, 0.536)
pt3dadd(23.092, 108.908, 31.219, 0.568)
pt3dadd(23.057, 109.018, 31.246, 0.6)
pt3dadd(23.023, 109.129, 31.272, 0.634)
pt3dadd(22.989, 109.239, 31.299, 0.666)
pt3dadd(22.955, 109.35, 31.326, 0.698)
pt3dadd(22.936, 109.458, 31.365, 0.718)
pt3dadd(22.92, 109.565, 31.408, 0.736)
pt3dadd(22.904, 109.673, 31.45, 0.754)
pt3dadd(22.888, 109.78, 31.493, 0.77)
pt3dadd(22.872, 109.888, 31.535, 0.788)
pt3dadd(22.857, 109.995, 31.578, 0.806)
pt3dadd(22.841, 110.103, 31.62, 0.822)
pt3dadd(22.825, 110.21, 31.663, 0.84)
pt3dadd(22.809, 110.318, 31.705, 0.856)
pt3dadd(22.793, 110.425, 31.748, 0.874)
pt3dadd(22.808, 110.535, 31.784, 0.892)
pt3dadd(22.83, 110.645, 31.82, 0.91)
pt3dadd(22.851, 110.755, 31.855, 0.928)
pt3dadd(22.873, 110.865, 31.89, 0.944)
pt3dadd(22.894, 110.975, 31.926, 0.962)
pt3dadd(22.916, 111.085, 31.961, 0.98)
pt3dadd(22.937, 111.195, 31.997, 0.998)
pt3dadd(22.959, 111.306, 32.032, 1.016)
pt3dadd(22.98, 111.416, 32.068, 1.034)
pt3dadd(23.002, 111.526, 32.103, 1.05)
pt3dadd(23.024, 111.633, 32.143, 1.034)
pt3dadd(23.047, 111.741, 32.184, 1.014)
pt3dadd(23.069, 111.848, 32.225, 0.992)
pt3dadd(23.091, 111.955, 32.266, 0.972)
pt3dadd(23.114, 112.062, 32.306, 0.952)
pt3dadd(23.136, 112.17, 32.347, 0.932)
pt3dadd(23.159, 112.277, 32.388, 0.91)
pt3dadd(23.181, 112.384, 32.429, 0.89)
pt3dadd(23.203, 112.492, 32.469, 0.87)
pt3dadd(23.226, 112.599, 32.51, 0.85)
pt3dadd(23.24, 112.707, 32.552, 0.83)
pt3dadd(23.253, 112.815, 32.594, 0.81)
pt3dadd(23.266, 112.923, 32.636, 0.79)
pt3dadd(23.279, 113.031, 32.679, 0.77)
pt3dadd(23.292, 113.139, 32.721, 0.752)
pt3dadd(23.305, 113.247, 32.763, 0.732)
pt3dadd(23.319, 113.355, 32.805, 0.712)
pt3dadd(23.332, 113.463, 32.847, 0.692)
pt3dadd(23.345, 113.571, 32.889, 0.674)
pt3dadd(23.358, 113.679, 32.932, 0.654)
pt3dadd(23.355, 113.795, 32.958, 0.746)
pt3dadd(23.352, 113.91, 32.985, 0.84)
pt3dadd(23.349, 114.026, 33.012, 0.932)
pt3dadd(23.346, 114.141, 33.039, 1.024)
}
}
proc shape3d_129() {
dend_7[25] { pt3dadd(23.343, 114.257, 33.065, 1.118)
pt3dadd(23.34, 114.372, 33.092, 1.21)
pt3dadd(23.337, 114.488, 33.119, 1.304)
pt3dadd(23.334, 114.604, 33.145, 1.396)
pt3dadd(23.331, 114.719, 33.172, 1.49)
pt3dadd(23.328, 114.835, 33.199, 1.582)
}
dend_7[26] {pt3dclear()
pt3dadd(23.328, 114.835, 33.199, 1.582)
pt3dadd(23.303, 114.892, 33.208, 1.554)
pt3dadd(23.255, 115, 33.224, 1.502)
pt3dadd(23.206, 115.108, 33.241, 1.45)
pt3dadd(23.158, 115.216, 33.257, 1.398)
pt3dadd(23.11, 115.324, 33.274, 1.346)
pt3dadd(23.062, 115.433, 33.291, 1.294)
pt3dadd(23.014, 115.541, 33.308, 1.242)
pt3dadd(22.966, 115.649, 33.324, 1.19)
pt3dadd(22.92, 115.758, 33.34, 1.144)
pt3dadd(22.876, 115.868, 33.354, 1.108)
pt3dadd(22.832, 115.979, 33.368, 1.074)
pt3dadd(22.789, 116.089, 33.382, 1.04)
pt3dadd(22.745, 116.2, 33.396, 1.006)
pt3dadd(22.702, 116.31, 33.41, 0.97)
pt3dadd(22.658, 116.421, 33.424, 0.936)
pt3dadd(22.614, 116.531, 33.438, 0.902)
pt3dadd(22.571, 116.642, 33.452, 0.866)
pt3dadd(22.527, 116.752, 33.466, 0.832)
pt3dadd(22.486, 116.863, 33.482, 0.806)
pt3dadd(22.448, 116.975, 33.501, 0.792)
pt3dadd(22.411, 117.087, 33.52, 0.778)
pt3dadd(22.373, 117.199, 33.539, 0.766)
pt3dadd(22.336, 117.31, 33.557, 0.752)
pt3dadd(22.299, 117.422, 33.576, 0.738)
pt3dadd(22.261, 117.534, 33.595, 0.726)
pt3dadd(22.224, 117.646, 33.614, 0.712)
pt3dadd(22.186, 117.757, 33.632, 0.698)
pt3dadd(22.149, 117.869, 33.651, 0.686)
pt3dadd(22.113, 117.979, 33.678, 0.678)
pt3dadd(22.081, 118.085, 33.715, 0.678)
pt3dadd(22.049, 118.192, 33.753, 0.678)
pt3dadd(22.016, 118.298, 33.79, 0.678)
pt3dadd(21.984, 118.405, 33.828, 0.678)
pt3dadd(21.951, 118.511, 33.865, 0.678)
pt3dadd(21.919, 118.618, 33.902, 0.678)
pt3dadd(21.887, 118.724, 33.94, 0.678)
pt3dadd(21.854, 118.831, 33.977, 0.678)
pt3dadd(21.822, 118.937, 34.014, 0.678)
pt3dadd(21.78, 119.042, 34.046, 0.7)
pt3dadd(21.726, 119.145, 34.071, 0.75)
pt3dadd(21.672, 119.248, 34.095, 0.798)
pt3dadd(21.618, 119.351, 34.12, 0.848)
pt3dadd(21.564, 119.454, 34.145, 0.898)
pt3dadd(21.51, 119.557, 34.17, 0.946)
pt3dadd(21.456, 119.66, 34.194, 0.996)
pt3dadd(21.402, 119.763, 34.219, 1.046)
pt3dadd(21.348, 119.866, 34.244, 1.094)
pt3dadd(21.294, 119.969, 34.268, 1.144)
pt3dadd(21.236, 120.071, 34.291, 1.17)
pt3dadd(21.173, 120.17, 34.309, 1.166)
pt3dadd(21.11, 120.269, 34.328, 1.164)
pt3dadd(21.046, 120.368, 34.347, 1.162)
pt3dadd(20.983, 120.468, 34.366, 1.158)
pt3dadd(20.92, 120.568, 34.385, 1.156)
pt3dadd(20.857, 120.667, 34.404, 1.152)
pt3dadd(20.793, 120.767, 34.423, 1.15)
pt3dadd(20.73, 120.865, 34.442, 1.146)
pt3dadd(20.667, 120.965, 34.461, 1.144)
pt3dadd(20.604, 121.066, 34.478, 1.136)
pt3dadd(20.543, 121.166, 34.493, 1.124)
pt3dadd(20.481, 121.268, 34.508, 1.112)
pt3dadd(20.42, 121.37, 34.522, 1.1)
pt3dadd(20.358, 121.471, 34.537, 1.088)
pt3dadd(20.297, 121.573, 34.552, 1.074)
pt3dadd(20.235, 121.674, 34.567, 1.062)
pt3dadd(20.174, 121.776, 34.582, 1.05)
pt3dadd(20.112, 121.877, 34.597, 1.038)
pt3dadd(20.05, 121.979, 34.611, 1.026)
pt3dadd(20, 122.084, 34.629, 1.034)
pt3dadd(19.958, 122.195, 34.648, 1.06)
pt3dadd(19.916, 122.305, 34.667, 1.084)
pt3dadd(19.874, 122.416, 34.687, 1.11)
pt3dadd(19.833, 122.525, 34.706, 1.136)
pt3dadd(19.791, 122.635, 34.725, 1.162)
pt3dadd(19.749, 122.746, 34.744, 1.188)
pt3dadd(19.708, 122.856, 34.764, 1.214)
pt3dadd(19.666, 122.966, 34.783, 1.238)
pt3dadd(19.624, 123.076, 34.802, 1.264)
pt3dadd(19.602, 123.182, 34.841, 1.232)
pt3dadd(19.587, 123.286, 34.89, 1.172)
pt3dadd(19.573, 123.39, 34.938, 1.112)
pt3dadd(19.559, 123.494, 34.986, 1.052)
pt3dadd(19.545, 123.599, 35.035, 0.994)
pt3dadd(19.531, 123.702, 35.083, 0.934)
pt3dadd(19.517, 123.806, 35.131, 0.876)
pt3dadd(19.502, 123.911, 35.18, 0.816)
pt3dadd(19.488, 124.015, 35.228, 0.756)
pt3dadd(19.474, 124.118, 35.276, 0.696)
pt3dadd(19.469, 124.232, 35.306, 0.662)
pt3dadd(19.466, 124.349, 35.33, 0.63)
pt3dadd(19.463, 124.465, 35.355, 0.6)
pt3dadd(19.46, 124.582, 35.379, 0.57)
pt3dadd(19.457, 124.698, 35.404, 0.54)
pt3dadd(19.454, 124.814, 35.428, 0.51)
pt3dadd(19.452, 124.931, 35.453, 0.48)
pt3dadd(19.449, 125.047, 35.477, 0.45)
pt3dadd(19.446, 125.164, 35.502, 0.42)
pt3dadd(19.443, 125.279, 35.527, 0.39)
pt3dadd(19.438, 125.399, 35.538, 0.4)
pt3dadd(19.433, 125.518, 35.547, 0.416)
pt3dadd(19.428, 125.638, 35.556, 0.434)
pt3dadd(19.423, 125.756, 35.565, 0.45)
pt3dadd(19.417, 125.876, 35.574, 0.468)
pt3dadd(19.412, 125.995, 35.583, 0.484)
pt3dadd(19.407, 126.115, 35.592, 0.502)
pt3dadd(19.402, 126.234, 35.601, 0.52)
pt3dadd(19.397, 126.354, 35.61, 0.536)
pt3dadd(19.392, 126.473, 35.619, 0.554)
pt3dadd(19.383, 126.593, 35.621, 0.536)
pt3dadd(19.374, 126.712, 35.621, 0.51)
pt3dadd(19.365, 126.832, 35.622, 0.484)
pt3dadd(19.355, 126.952, 35.623, 0.46)
pt3dadd(19.346, 127.072, 35.624, 0.436)
pt3dadd(19.337, 127.19, 35.625, 0.41)
pt3dadd(19.328, 127.31, 35.625, 0.384)
pt3dadd(19.318, 127.43, 35.626, 0.36)
pt3dadd(19.309, 127.549, 35.627, 0.334)
pt3dadd(19.3, 127.669, 35.628, 0.31)
pt3dadd(19.287, 127.788, 35.629, 0.354)
pt3dadd(19.273, 127.908, 35.631, 0.412)
pt3dadd(19.259, 128.027, 35.632, 0.47)
pt3dadd(19.245, 128.146, 35.634, 0.526)
pt3dadd(19.231, 128.266, 35.636, 0.584)
pt3dadd(19.217, 128.384, 35.637, 0.642)
pt3dadd(19.203, 128.503, 35.639, 0.7)
pt3dadd(19.189, 128.623, 35.64, 0.756)
pt3dadd(19.175, 128.742, 35.642, 0.814)
pt3dadd(19.161, 128.861, 35.643, 0.872)
pt3dadd(19.122, 128.974, 35.646, 0.852)
pt3dadd(19.079, 129.086, 35.649, 0.82)
pt3dadd(19.035, 129.198, 35.652, 0.788)
pt3dadd(18.992, 129.31, 35.655, 0.756)
pt3dadd(18.949, 129.421, 35.657, 0.726)
pt3dadd(18.905, 129.533, 35.66, 0.694)
pt3dadd(18.862, 129.644, 35.663, 0.662)
pt3dadd(18.818, 129.757, 35.666, 0.63)
pt3dadd(18.775, 129.869, 35.669, 0.598)
pt3dadd(18.732, 129.98, 35.672, 0.566)
pt3dadd(18.697, 130.094, 35.677, 0.542)
pt3dadd(18.663, 130.21, 35.683, 0.518)
pt3dadd(18.629, 130.325, 35.69, 0.494)
pt3dadd(18.596, 130.44, 35.696, 0.47)
pt3dadd(18.562, 130.555, 35.702, 0.446)
pt3dadd(18.528, 130.669, 35.708, 0.422)
pt3dadd(18.495, 130.784, 35.714, 0.398)
pt3dadd(18.461, 130.9, 35.72, 0.374)
pt3dadd(18.427, 131.015, 35.726, 0.35)
pt3dadd(18.394, 131.13, 35.732, 0.326)
pt3dadd(18.371, 131.246, 35.742, 0.33)
pt3dadd(18.35, 131.364, 35.752, 0.338)
pt3dadd(18.328, 131.482, 35.762, 0.348)
pt3dadd(18.307, 131.599, 35.772, 0.356)
pt3dadd(18.286, 131.717, 35.782, 0.364)
pt3dadd(18.265, 131.834, 35.792, 0.374)
pt3dadd(18.243, 131.952, 35.802, 0.382)
pt3dadd(18.222, 132.07, 35.812, 0.39)
pt3dadd(18.201, 132.186, 35.822, 0.398)
pt3dadd(18.18, 132.304, 35.832, 0.408)
pt3dadd(18.169, 132.421, 35.852, 0.442)
pt3dadd(18.159, 132.538, 35.873, 0.48)
pt3dadd(18.15, 132.655, 35.894, 0.518)
pt3dadd(18.14, 132.772, 35.914, 0.554)
pt3dadd(18.131, 132.889, 35.935, 0.592)
pt3dadd(18.121, 133.006, 35.956, 0.63)
pt3dadd(18.111, 133.123, 35.977, 0.668)
pt3dadd(18.102, 133.24, 35.997, 0.704)
pt3dadd(18.092, 133.357, 36.018, 0.742)
pt3dadd(18.083, 133.474, 36.039, 0.78)
pt3dadd(18.083, 133.584, 36.078, 0.814)
pt3dadd(18.083, 133.694, 36.118, 0.85)
pt3dadd(18.082, 133.805, 36.157, 0.884)
pt3dadd(18.082, 133.915, 36.196, 0.92)
pt3dadd(18.082, 134.026, 36.236, 0.954)
pt3dadd(18.082, 134.136, 36.275, 0.988)
pt3dadd(18.082, 134.246, 36.315, 1.024)
pt3dadd(18.082, 134.357, 36.354, 1.058)
pt3dadd(18.082, 134.467, 36.393, 1.094)
pt3dadd(18.082, 134.578, 36.433, 1.128)
pt3dadd(18.081, 134.692, 36.463, 1.11)
pt3dadd(18.081, 134.806, 36.493, 1.092)
pt3dadd(18.081, 134.92, 36.524, 1.072)
pt3dadd(18.08, 135.035, 36.554, 1.054)
pt3dadd(18.08, 135.149, 36.584, 1.036)
pt3dadd(18.079, 135.263, 36.615, 1.018)
pt3dadd(18.079, 135.378, 36.645, 1)
pt3dadd(18.079, 135.492, 36.675, 0.982)
pt3dadd(18.078, 135.606, 36.705, 0.962)
pt3dadd(18.078, 135.72, 36.736, 0.944)
pt3dadd(18.077, 135.838, 36.76, 0.926)
pt3dadd(18.077, 135.954, 36.784, 0.908)
pt3dadd(18.076, 136.07, 36.808, 0.888)
pt3dadd(18.075, 136.187, 36.832, 0.87)
pt3dadd(18.074, 136.303, 36.857, 0.852)
}
}
proc shape3d_130() {
dend_7[26] { pt3dadd(18.074, 136.42, 36.881, 0.832)
pt3dadd(18.073, 136.536, 36.905, 0.814)
pt3dadd(18.072, 136.652, 36.929, 0.796)
pt3dadd(18.072, 136.769, 36.953, 0.776)
pt3dadd(18.071, 136.885, 36.977, 0.758)
pt3dadd(18.069, 136.999, 37.009, 0.74)
pt3dadd(18.068, 137.113, 37.04, 0.72)
pt3dadd(18.067, 137.227, 37.071, 0.702)
pt3dadd(18.066, 137.341, 37.102, 0.684)
pt3dadd(18.064, 137.455, 37.133, 0.666)
pt3dadd(18.063, 137.569, 37.165, 0.648)
pt3dadd(18.062, 137.683, 37.196, 0.63)
pt3dadd(18.06, 137.797, 37.227, 0.61)
pt3dadd(18.059, 137.911, 37.258, 0.592)
pt3dadd(18.057, 138.025, 37.29, 0.574)
pt3dadd(18.055, 138.138, 37.323, 0.562)
pt3dadd(18.053, 138.251, 37.357, 0.55)
pt3dadd(18.051, 138.364, 37.391, 0.538)
pt3dadd(18.049, 138.476, 37.424, 0.526)
pt3dadd(18.047, 138.589, 37.458, 0.512)
pt3dadd(18.045, 138.703, 37.492, 0.5)
pt3dadd(18.042, 138.816, 37.526, 0.488)
pt3dadd(18.04, 138.929, 37.559, 0.476)
pt3dadd(18.038, 139.042, 37.593, 0.464)
pt3dadd(18.036, 139.154, 37.626, 0.452)
pt3dadd(18.032, 139.271, 37.649, 0.45)
pt3dadd(18.028, 139.388, 37.673, 0.448)
pt3dadd(18.024, 139.505, 37.697, 0.446)
pt3dadd(18.02, 139.621, 37.72, 0.444)
pt3dadd(18.016, 139.738, 37.744, 0.442)
pt3dadd(18.012, 139.854, 37.767, 0.44)
pt3dadd(18.008, 139.97, 37.791, 0.438)
pt3dadd(18.004, 140.087, 37.814, 0.436)
pt3dadd(18, 140.203, 37.838, 0.434)
pt3dadd(17.996, 140.321, 37.861, 0.43)
pt3dadd(17.987, 140.44, 37.874, 0.41)
pt3dadd(17.979, 140.557, 37.887, 0.392)
pt3dadd(17.97, 140.676, 37.9, 0.372)
pt3dadd(17.961, 140.795, 37.913, 0.352)
pt3dadd(17.953, 140.914, 37.926, 0.334)
pt3dadd(17.944, 141.032, 37.939, 0.314)
pt3dadd(17.935, 141.151, 37.952, 0.294)
pt3dadd(17.927, 141.27, 37.965, 0.276)
pt3dadd(17.918, 141.389, 37.978, 0.256)
pt3dadd(17.909, 141.508, 37.99, 0.242)
pt3dadd(17.895, 141.626, 37.994, 0.296)
pt3dadd(17.88, 141.745, 37.998, 0.35)
pt3dadd(17.866, 141.864, 38.003, 0.404)
pt3dadd(17.851, 141.983, 38.007, 0.458)
pt3dadd(17.837, 142.103, 38.011, 0.512)
pt3dadd(17.823, 142.222, 38.016, 0.566)
pt3dadd(17.808, 142.34, 38.02, 0.62)
pt3dadd(17.794, 142.459, 38.024, 0.674)
pt3dadd(17.779, 142.578, 38.029, 0.728)
pt3dadd(17.763, 142.697, 38.033, 0.778)
pt3dadd(17.721, 142.81, 38.041, 0.76)
pt3dadd(17.68, 142.921, 38.049, 0.742)
pt3dadd(17.639, 143.034, 38.056, 0.726)
pt3dadd(17.598, 143.146, 38.064, 0.708)
pt3dadd(17.556, 143.258, 38.072, 0.69)
pt3dadd(17.515, 143.37, 38.079, 0.674)
pt3dadd(17.474, 143.483, 38.087, 0.656)
pt3dadd(17.432, 143.596, 38.095, 0.638)
pt3dadd(17.391, 143.707, 38.102, 0.622)
pt3dadd(17.35, 143.82, 38.111, 0.614)
pt3dadd(17.31, 143.932, 38.124, 0.658)
pt3dadd(17.27, 144.043, 38.137, 0.704)
pt3dadd(17.23, 144.156, 38.151, 0.75)
pt3dadd(17.19, 144.268, 38.164, 0.796)
pt3dadd(17.15, 144.38, 38.177, 0.842)
pt3dadd(17.11, 144.492, 38.19, 0.888)
pt3dadd(17.07, 144.604, 38.204, 0.932)
pt3dadd(17.03, 144.716, 38.217, 0.978)
pt3dadd(16.99, 144.828, 38.23, 1.024)
pt3dadd(16.952, 144.938, 38.248, 1.06)
pt3dadd(16.923, 145.045, 38.289, 1.052)
pt3dadd(16.893, 145.151, 38.329, 1.042)
pt3dadd(16.864, 145.256, 38.369, 1.034)
pt3dadd(16.834, 145.362, 38.41, 1.024)
pt3dadd(16.805, 145.468, 38.45, 1.016)
pt3dadd(16.775, 145.573, 38.491, 1.006)
pt3dadd(16.746, 145.679, 38.531, 0.998)
pt3dadd(16.716, 145.784, 38.571, 0.988)
pt3dadd(16.686, 145.89, 38.612, 0.98)
pt3dadd(16.663, 145.993, 38.659, 0.942)
pt3dadd(16.646, 146.093, 38.712, 0.876)
pt3dadd(16.629, 146.192, 38.766, 0.81)
pt3dadd(16.613, 146.292, 38.82, 0.746)
pt3dadd(16.596, 146.393, 38.874, 0.68)
pt3dadd(16.579, 146.492, 38.927, 0.614)
pt3dadd(16.562, 146.592, 38.981, 0.548)
pt3dadd(16.545, 146.692, 39.035, 0.482)
pt3dadd(16.528, 146.791, 39.089, 0.418)
pt3dadd(16.511, 146.891, 39.142, 0.352)
pt3dadd(16.495, 146.992, 39.195, 0.328)
pt3dadd(16.479, 147.092, 39.248, 0.34)
pt3dadd(16.464, 147.194, 39.3, 0.35)
pt3dadd(16.448, 147.295, 39.352, 0.362)
pt3dadd(16.433, 147.396, 39.405, 0.372)
pt3dadd(16.417, 147.497, 39.457, 0.384)
pt3dadd(16.401, 147.599, 39.509, 0.396)
pt3dadd(16.386, 147.7, 39.561, 0.406)
pt3dadd(16.37, 147.8, 39.614, 0.418)
pt3dadd(16.354, 147.901, 39.666, 0.428)
pt3dadd(16.331, 148.002, 39.717, 0.448)
pt3dadd(16.302, 148.102, 39.766, 0.472)
pt3dadd(16.273, 148.202, 39.816, 0.498)
pt3dadd(16.244, 148.302, 39.866, 0.522)
pt3dadd(16.215, 148.403, 39.915, 0.546)
pt3dadd(16.186, 148.502, 39.965, 0.572)
pt3dadd(16.157, 148.602, 40.015, 0.596)
pt3dadd(16.128, 148.703, 40.064, 0.622)
pt3dadd(16.1, 148.802, 40.114, 0.646)
pt3dadd(16.071, 148.902, 40.164, 0.67)
pt3dadd(16.026, 149.003, 40.202, 0.678)
pt3dadd(15.974, 149.102, 40.237, 0.678)
pt3dadd(15.922, 149.203, 40.271, 0.678)
pt3dadd(15.87, 149.303, 40.305, 0.678)
pt3dadd(15.819, 149.404, 40.34, 0.678)
pt3dadd(15.767, 149.503, 40.374, 0.678)
pt3dadd(15.715, 149.604, 40.408, 0.678)
pt3dadd(15.664, 149.704, 40.442, 0.678)
pt3dadd(15.612, 149.804, 40.477, 0.678)
pt3dadd(15.56, 149.904, 40.511, 0.678)
pt3dadd(15.514, 150, 40.556, 0.7)
pt3dadd(15.471, 150.095, 40.607, 0.732)
pt3dadd(15.428, 150.188, 40.657, 0.766)
pt3dadd(15.384, 150.283, 40.707, 0.798)
pt3dadd(15.341, 150.377, 40.757, 0.83)
pt3dadd(15.298, 150.472, 40.808, 0.862)
pt3dadd(15.254, 150.565, 40.858, 0.894)
pt3dadd(15.211, 150.66, 40.908, 0.926)
pt3dadd(15.168, 150.754, 40.959, 0.958)
pt3dadd(15.124, 150.848, 41.009, 0.99)
pt3dadd(15.07, 150.942, 41.052, 1.01)
pt3dadd(15.012, 151.034, 41.093, 1.022)
pt3dadd(14.953, 151.127, 41.134, 1.036)
pt3dadd(14.894, 151.219, 41.175, 1.048)
pt3dadd(14.836, 151.312, 41.216, 1.062)
pt3dadd(14.777, 151.404, 41.257, 1.074)
pt3dadd(14.718, 151.496, 41.297, 1.088)
pt3dadd(14.66, 151.589, 41.338, 1.102)
pt3dadd(14.601, 151.681, 41.379, 1.114)
pt3dadd(14.543, 151.775, 41.42, 1.128)
pt3dadd(14.476, 151.86, 41.462, 1.13)
pt3dadd(14.408, 151.945, 41.505, 1.13)
pt3dadd(14.34, 152.03, 41.547, 1.13)
pt3dadd(14.272, 152.114, 41.59, 1.13)
pt3dadd(14.205, 152.2, 41.632, 1.13)
pt3dadd(14.136, 152.285, 41.674, 1.13)
pt3dadd(14.069, 152.369, 41.717, 1.13)
pt3dadd(14.001, 152.454, 41.759, 1.13)
pt3dadd(13.933, 152.538, 41.802, 1.13)
pt3dadd(13.865, 152.623, 41.845, 1.13)
pt3dadd(13.792, 152.694, 41.898, 1.116)
pt3dadd(13.72, 152.764, 41.953, 1.1)
pt3dadd(13.647, 152.833, 42.007, 1.084)
pt3dadd(13.575, 152.903, 42.062, 1.068)
pt3dadd(13.502, 152.971, 42.117, 1.054)
pt3dadd(13.429, 153.041, 42.171, 1.038)
pt3dadd(13.357, 153.11, 42.226, 1.022)
pt3dadd(13.284, 153.18, 42.281, 1.006)
pt3dadd(13.212, 153.25, 42.335, 0.99)
pt3dadd(13.138, 153.319, 42.389, 0.974)
pt3dadd(13.046, 153.386, 42.421, 0.924)
pt3dadd(12.954, 153.452, 42.453, 0.874)
pt3dadd(12.863, 153.52, 42.485, 0.822)
pt3dadd(12.771, 153.587, 42.517, 0.772)
pt3dadd(12.679, 153.654, 42.549, 0.722)
pt3dadd(12.587, 153.721, 42.581, 0.672)
pt3dadd(12.495, 153.788, 42.613, 0.622)
pt3dadd(12.403, 153.854, 42.645, 0.572)
pt3dadd(12.311, 153.922, 42.676, 0.522)
pt3dadd(12.218, 153.988, 42.708, 0.476)
pt3dadd(12.111, 154.034, 42.732, 0.496)
pt3dadd(12.005, 154.081, 42.757, 0.516)
pt3dadd(11.898, 154.127, 42.781, 0.536)
pt3dadd(11.792, 154.174, 42.806, 0.556)
pt3dadd(11.685, 154.22, 42.83, 0.576)
pt3dadd(11.579, 154.267, 42.855, 0.596)
pt3dadd(11.472, 154.314, 42.879, 0.616)
pt3dadd(11.365, 154.361, 42.904, 0.638)
pt3dadd(11.259, 154.408, 42.928, 0.658)
pt3dadd(11.153, 154.453, 42.954, 0.676)
pt3dadd(11.05, 154.494, 42.993, 0.676)
pt3dadd(10.947, 154.534, 43.032, 0.676)
pt3dadd(10.844, 154.574, 43.071, 0.676)
pt3dadd(10.741, 154.614, 43.111, 0.676)
pt3dadd(10.638, 154.655, 43.15, 0.678)
pt3dadd(10.536, 154.694, 43.189, 0.678)
pt3dadd(10.433, 154.735, 43.228, 0.678)
pt3dadd(10.33, 154.775, 43.267, 0.678)
pt3dadd(10.227, 154.816, 43.306, 0.678)
pt3dadd(10.125, 154.858, 43.345, 0.68)
pt3dadd(10.03, 154.921, 43.374, 0.706)
pt3dadd(9.934, 154.985, 43.403, 0.734)
pt3dadd(9.839, 155.05, 43.432, 0.76)
pt3dadd(9.744, 155.113, 43.462, 0.788)
pt3dadd(9.649, 155.178, 43.491, 0.814)
pt3dadd(9.553, 155.242, 43.52, 0.842)
}
}
proc shape3d_131() {
dend_7[26] { pt3dadd(9.458, 155.305, 43.549, 0.868)
pt3dadd(9.363, 155.37, 43.578, 0.896)
pt3dadd(9.267, 155.434, 43.607, 0.922)
pt3dadd(9.175, 155.502, 43.635, 0.942)
pt3dadd(9.1, 155.591, 43.658, 0.924)
pt3dadd(9.024, 155.68, 43.68, 0.906)
pt3dadd(8.948, 155.77, 43.702, 0.888)
pt3dadd(8.873, 155.858, 43.724, 0.87)
pt3dadd(8.797, 155.947, 43.747, 0.85)
pt3dadd(8.721, 156.037, 43.769, 0.832)
pt3dadd(8.645, 156.126, 43.791, 0.814)
pt3dadd(8.57, 156.215, 43.813, 0.796)
pt3dadd(8.494, 156.305, 43.836, 0.776)
pt3dadd(8.426, 156.4, 43.855, 0.752)
pt3dadd(8.371, 156.504, 43.871, 0.718)
pt3dadd(8.316, 156.61, 43.887, 0.684)
pt3dadd(8.262, 156.715, 43.903, 0.65)
pt3dadd(8.207, 156.82, 43.918, 0.616)
pt3dadd(8.152, 156.925, 43.934, 0.58)
pt3dadd(8.097, 157.03, 43.95, 0.546)
pt3dadd(8.042, 157.135, 43.965, 0.512)
pt3dadd(7.987, 157.24, 43.981, 0.478)
pt3dadd(7.932, 157.345, 43.997, 0.444)
pt3dadd(7.878, 157.451, 44.011, 0.448)
pt3dadd(7.824, 157.558, 44.021, 0.516)
pt3dadd(7.771, 157.663, 44.031, 0.586)
pt3dadd(7.717, 157.77, 44.042, 0.654)
pt3dadd(7.663, 157.877, 44.052, 0.722)
pt3dadd(7.61, 157.984, 44.062, 0.792)
pt3dadd(7.556, 158.09, 44.073, 0.86)
pt3dadd(7.502, 158.197, 44.083, 0.928)
pt3dadd(7.449, 158.304, 44.093, 0.998)
pt3dadd(7.395, 158.41, 44.104, 1.066)
pt3dadd(7.353, 158.518, 44.124, 1.096)
pt3dadd(7.328, 158.627, 44.16, 1.064)
pt3dadd(7.304, 158.736, 44.196, 1.032)
pt3dadd(7.279, 158.845, 44.232, 1)
pt3dadd(7.254, 158.954, 44.268, 0.968)
pt3dadd(7.23, 159.064, 44.304, 0.936)
pt3dadd(7.206, 159.173, 44.34, 0.904)
pt3dadd(7.181, 159.282, 44.376, 0.872)
pt3dadd(7.156, 159.391, 44.412, 0.838)
pt3dadd(7.132, 159.5, 44.448, 0.806)
pt3dadd(7.111, 159.612, 44.481, 0.778)
pt3dadd(7.097, 159.726, 44.509, 0.754)
pt3dadd(7.082, 159.84, 44.537, 0.73)
pt3dadd(7.067, 159.955, 44.565, 0.706)
pt3dadd(7.053, 160.069, 44.593, 0.682)
pt3dadd(7.038, 160.183, 44.622, 0.658)
pt3dadd(7.023, 160.297, 44.65, 0.634)
pt3dadd(7.008, 160.411, 44.678, 0.61)
pt3dadd(6.994, 160.525, 44.706, 0.586)
pt3dadd(6.979, 160.64, 44.734, 0.562)
pt3dadd(6.975, 160.756, 44.758, 0.548)
pt3dadd(6.986, 160.873, 44.776, 0.548)
pt3dadd(6.996, 160.991, 44.795, 0.548)
pt3dadd(7.007, 161.108, 44.813, 0.548)
pt3dadd(7.017, 161.226, 44.831, 0.548)
pt3dadd(7.028, 161.344, 44.85, 0.55)
pt3dadd(7.038, 161.46, 44.868, 0.55)
pt3dadd(7.049, 161.578, 44.886, 0.55)
pt3dadd(7.059, 161.695, 44.905, 0.55)
pt3dadd(7.07, 161.813, 44.923, 0.55)
pt3dadd(7.079, 161.932, 44.935, 0.558)
pt3dadd(7.088, 162.052, 44.943, 0.572)
pt3dadd(7.097, 162.17, 44.95, 0.584)
pt3dadd(7.105, 162.289, 44.958, 0.598)
pt3dadd(7.114, 162.409, 44.966, 0.612)
pt3dadd(7.122, 162.528, 44.973, 0.624)
pt3dadd(7.131, 162.648, 44.981, 0.638)
pt3dadd(7.14, 162.767, 44.989, 0.652)
pt3dadd(7.148, 162.887, 44.997, 0.664)
pt3dadd(7.157, 163.006, 45.004, 0.678)
pt3dadd(7.122, 163.121, 45.004, 0.678)
pt3dadd(7.088, 163.236, 45.004, 0.678)
pt3dadd(7.053, 163.35, 45.004, 0.678)
pt3dadd(7.019, 163.465, 45.004, 0.678)
pt3dadd(6.985, 163.58, 45.004, 0.678)
pt3dadd(6.95, 163.696, 45.004, 0.678)
pt3dadd(6.916, 163.811, 45.004, 0.678)
pt3dadd(6.881, 163.925, 45.004, 0.678)
pt3dadd(6.847, 164.04, 45.004, 0.678)
pt3dadd(6.812, 164.155, 45.004, 0.678)
}
dend_7[27] {pt3dclear()
pt3dadd(23.328, 114.835, 33.199, 1.582)
pt3dadd(23.33, 114.842, 33.199, 1.576)
pt3dadd(23.362, 114.957, 33.204, 1.464)
pt3dadd(23.394, 115.073, 33.209, 1.354)
pt3dadd(23.426, 115.188, 33.215, 1.242)
pt3dadd(23.459, 115.304, 33.22, 1.132)
pt3dadd(23.494, 115.417, 33.23, 1.024)
pt3dadd(23.542, 115.521, 33.259, 0.928)
pt3dadd(23.591, 115.625, 33.289, 0.834)
pt3dadd(23.639, 115.729, 33.318, 0.738)
pt3dadd(23.688, 115.833, 33.348, 0.642)
pt3dadd(23.736, 115.937, 33.377, 0.546)
pt3dadd(23.784, 116.041, 33.407, 0.45)
pt3dadd(23.833, 116.145, 33.436, 0.356)
pt3dadd(23.881, 116.249, 33.466, 0.26)
pt3dadd(23.942, 116.295, 33.529, 0.226)
pt3dadd(24.009, 116.309, 33.611, 0.226)
pt3dadd(24.076, 116.324, 33.693, 0.226)
pt3dadd(24.144, 116.338, 33.775, 0.226)
pt3dadd(24.211, 116.353, 33.857, 0.226)
pt3dadd(24.278, 116.367, 33.939, 0.226)
pt3dadd(24.345, 116.382, 34.02, 0.226)
pt3dadd(24.413, 116.396, 34.102, 0.226)
pt3dadd(24.48, 116.411, 34.184, 0.226)
pt3dadd(24.548, 116.425, 34.266, 0.226)
pt3dadd(24.604, 116.442, 34.353, 0.236)
pt3dadd(24.656, 116.461, 34.442, 0.254)
pt3dadd(24.707, 116.48, 34.531, 0.27)
pt3dadd(24.758, 116.499, 34.62, 0.288)
pt3dadd(24.81, 116.518, 34.709, 0.304)
pt3dadd(24.861, 116.537, 34.798, 0.32)
pt3dadd(24.912, 116.556, 34.887, 0.338)
pt3dadd(24.963, 116.575, 34.976, 0.354)
pt3dadd(25.015, 116.594, 35.065, 0.372)
pt3dadd(25.066, 116.612, 35.154, 0.388)
pt3dadd(25.107, 116.651, 35.241, 0.416)
pt3dadd(25.144, 116.698, 35.328, 0.45)
pt3dadd(25.18, 116.745, 35.415, 0.484)
pt3dadd(25.216, 116.793, 35.502, 0.518)
pt3dadd(25.253, 116.84, 35.588, 0.552)
pt3dadd(25.289, 116.887, 35.675, 0.586)
pt3dadd(25.326, 116.935, 35.762, 0.622)
pt3dadd(25.362, 116.982, 35.848, 0.656)
pt3dadd(25.398, 117.03, 35.935, 0.69)
pt3dadd(25.435, 117.077, 36.022, 0.724)
pt3dadd(25.487, 117.132, 36.099, 0.734)
pt3dadd(25.544, 117.189, 36.173, 0.738)
pt3dadd(25.6, 117.247, 36.247, 0.744)
pt3dadd(25.657, 117.304, 36.321, 0.748)
pt3dadd(25.713, 117.361, 36.395, 0.752)
pt3dadd(25.77, 117.419, 36.47, 0.756)
pt3dadd(25.826, 117.476, 36.544, 0.762)
pt3dadd(25.883, 117.533, 36.618, 0.766)
pt3dadd(25.939, 117.591, 36.692, 0.77)
pt3dadd(25.996, 117.648, 36.766, 0.776)
pt3dadd(26.061, 117.712, 36.831, 0.766)
pt3dadd(26.125, 117.777, 36.896, 0.756)
pt3dadd(26.19, 117.841, 36.961, 0.746)
pt3dadd(26.255, 117.906, 37.026, 0.736)
pt3dadd(26.32, 117.97, 37.09, 0.726)
pt3dadd(26.385, 118.034, 37.155, 0.716)
pt3dadd(26.45, 118.099, 37.22, 0.706)
pt3dadd(26.514, 118.163, 37.285, 0.696)
pt3dadd(26.579, 118.227, 37.35, 0.688)
pt3dadd(26.645, 118.292, 37.414, 0.676)
pt3dadd(26.722, 118.35, 37.473, 0.654)
pt3dadd(26.799, 118.409, 37.531, 0.63)
pt3dadd(26.877, 118.468, 37.59, 0.606)
pt3dadd(26.954, 118.527, 37.649, 0.582)
pt3dadd(27.032, 118.586, 37.707, 0.56)
pt3dadd(27.109, 118.645, 37.766, 0.536)
pt3dadd(27.186, 118.704, 37.824, 0.512)
pt3dadd(27.264, 118.763, 37.883, 0.488)
pt3dadd(27.341, 118.821, 37.942, 0.466)
pt3dadd(27.422, 118.875, 38, 0.446)
pt3dadd(27.513, 118.912, 38.058, 0.446)
pt3dadd(27.603, 118.948, 38.116, 0.444)
pt3dadd(27.694, 118.985, 38.174, 0.442)
pt3dadd(27.785, 119.022, 38.231, 0.44)
pt3dadd(27.876, 119.058, 38.289, 0.44)
pt3dadd(27.966, 119.095, 38.347, 0.438)
pt3dadd(28.057, 119.132, 38.405, 0.436)
pt3dadd(28.148, 119.168, 38.463, 0.434)
pt3dadd(28.239, 119.205, 38.52, 0.434)
pt3dadd(28.327, 119.243, 38.58, 0.442)
pt3dadd(28.41, 119.284, 38.644, 0.478)
pt3dadd(28.493, 119.325, 38.707, 0.512)
pt3dadd(28.576, 119.367, 38.771, 0.546)
pt3dadd(28.659, 119.408, 38.835, 0.58)
pt3dadd(28.741, 119.449, 38.898, 0.614)
pt3dadd(28.824, 119.49, 38.962, 0.648)
pt3dadd(28.907, 119.532, 39.026, 0.684)
pt3dadd(28.99, 119.573, 39.089, 0.718)
pt3dadd(29.073, 119.614, 39.153, 0.752)
pt3dadd(29.148, 119.659, 39.221, 0.774)
pt3dadd(29.212, 119.709, 39.294, 0.776)
pt3dadd(29.276, 119.759, 39.368, 0.778)
pt3dadd(29.341, 119.809, 39.441, 0.78)
pt3dadd(29.405, 119.859, 39.514, 0.784)
pt3dadd(29.469, 119.909, 39.588, 0.786)
pt3dadd(29.533, 119.959, 39.661, 0.788)
pt3dadd(29.598, 120.01, 39.735, 0.79)
pt3dadd(29.662, 120.06, 39.808, 0.794)
pt3dadd(29.726, 120.109, 39.882, 0.796)
pt3dadd(29.79, 120.144, 39.961, 0.796)
pt3dadd(29.852, 120.169, 40.043, 0.792)
pt3dadd(29.915, 120.193, 40.126, 0.79)
pt3dadd(29.978, 120.217, 40.209, 0.786)
pt3dadd(30.041, 120.242, 40.292, 0.784)
pt3dadd(30.104, 120.266, 40.374, 0.782)
pt3dadd(30.166, 120.29, 40.457, 0.778)
pt3dadd(30.229, 120.314, 40.54, 0.776)
pt3dadd(30.292, 120.34, 40.623, 0.774)
pt3dadd(30.355, 120.364, 40.705, 0.77)
pt3dadd(30.429, 120.377, 40.783, 0.78)
pt3dadd(30.507, 120.385, 40.858, 0.792)
pt3dadd(30.585, 120.394, 40.934, 0.806)
}
}
proc shape3d_132() {
dend_7[27] { pt3dadd(30.663, 120.402, 41.009, 0.82)
pt3dadd(30.741, 120.41, 41.085, 0.834)
pt3dadd(30.82, 120.419, 41.16, 0.846)
pt3dadd(30.898, 120.427, 41.236, 0.86)
pt3dadd(30.976, 120.436, 41.311, 0.874)
pt3dadd(31.054, 120.444, 41.387, 0.888)
pt3dadd(31.133, 120.452, 41.462, 0.9)
pt3dadd(31.217, 120.454, 41.533, 0.904)
pt3dadd(31.304, 120.452, 41.602, 0.904)
pt3dadd(31.391, 120.451, 41.671, 0.904)
pt3dadd(31.477, 120.45, 41.74, 0.904)
pt3dadd(31.564, 120.448, 41.81, 0.904)
pt3dadd(31.651, 120.446, 41.879, 0.904)
pt3dadd(31.738, 120.445, 41.948, 0.904)
pt3dadd(31.824, 120.444, 42.017, 0.904)
pt3dadd(31.911, 120.443, 42.086, 0.904)
pt3dadd(31.998, 120.44, 42.155, 0.904)
pt3dadd(32.098, 120.438, 42.209, 0.926)
pt3dadd(32.203, 120.436, 42.257, 0.958)
pt3dadd(32.308, 120.432, 42.306, 0.988)
pt3dadd(32.413, 120.43, 42.354, 1.02)
pt3dadd(32.518, 120.427, 42.403, 1.05)
pt3dadd(32.623, 120.424, 42.451, 1.08)
pt3dadd(32.728, 120.421, 42.499, 1.112)
pt3dadd(32.833, 120.418, 42.548, 1.142)
pt3dadd(32.938, 120.415, 42.596, 1.174)
pt3dadd(33.043, 120.413, 42.645, 1.204)
pt3dadd(33.148, 120.407, 42.693, 1.248)
pt3dadd(33.253, 120.401, 42.741, 1.294)
pt3dadd(33.358, 120.395, 42.789, 1.34)
pt3dadd(33.463, 120.389, 42.837, 1.386)
pt3dadd(33.568, 120.383, 42.885, 1.432)
pt3dadd(33.673, 120.377, 42.933, 1.478)
pt3dadd(33.778, 120.371, 42.981, 1.524)
pt3dadd(33.883, 120.365, 43.029, 1.57)
pt3dadd(33.988, 120.359, 43.077, 1.616)
pt3dadd(34.093, 120.353, 43.125, 1.662)
pt3dadd(34.2, 120.343, 43.171, 1.674)
pt3dadd(34.306, 120.334, 43.216, 1.678)
pt3dadd(34.413, 120.323, 43.261, 1.68)
pt3dadd(34.52, 120.313, 43.306, 1.684)
pt3dadd(34.626, 120.304, 43.351, 1.686)
pt3dadd(34.733, 120.293, 43.396, 1.69)
pt3dadd(34.84, 120.283, 43.441, 1.692)
pt3dadd(34.946, 120.272, 43.486, 1.694)
pt3dadd(35.053, 120.263, 43.531, 1.698)
pt3dadd(35.16, 120.252, 43.576, 1.7)
pt3dadd(35.269, 120.229, 43.611, 1.62)
pt3dadd(35.379, 120.203, 43.645, 1.522)
pt3dadd(35.489, 120.176, 43.678, 1.422)
pt3dadd(35.599, 120.151, 43.712, 1.324)
pt3dadd(35.709, 120.125, 43.745, 1.226)
pt3dadd(35.819, 120.098, 43.779, 1.128)
pt3dadd(35.929, 120.072, 43.813, 1.03)
pt3dadd(36.039, 120.046, 43.846, 0.932)
pt3dadd(36.149, 120.02, 43.88, 0.834)
pt3dadd(36.259, 119.994, 43.913, 0.734)
}
dend_7[28] {pt3dclear()
pt3dadd(36.259, 119.994, 43.913, 0.734)
pt3dadd(36.335, 119.952, 43.941, 0.706)
pt3dadd(36.433, 119.897, 43.977, 0.67)
pt3dadd(36.531, 119.843, 44.013, 0.634)
pt3dadd(36.629, 119.789, 44.049, 0.598)
pt3dadd(36.727, 119.734, 44.084, 0.562)
pt3dadd(36.825, 119.68, 44.12, 0.524)
pt3dadd(36.923, 119.626, 44.156, 0.488)
pt3dadd(37.021, 119.571, 44.192, 0.452)
pt3dadd(37.119, 119.517, 44.228, 0.416)
pt3dadd(37.216, 119.463, 44.264, 0.38)
pt3dadd(37.321, 119.431, 44.304, 0.396)
pt3dadd(37.427, 119.403, 44.345, 0.42)
pt3dadd(37.533, 119.374, 44.386, 0.442)
pt3dadd(37.639, 119.346, 44.426, 0.466)
pt3dadd(37.745, 119.318, 44.467, 0.49)
pt3dadd(37.851, 119.289, 44.508, 0.514)
pt3dadd(37.957, 119.261, 44.548, 0.536)
pt3dadd(38.063, 119.233, 44.589, 0.56)
pt3dadd(38.169, 119.204, 44.63, 0.584)
pt3dadd(38.274, 119.176, 44.67, 0.608)
pt3dadd(38.39, 119.164, 44.695, 0.588)
pt3dadd(38.506, 119.153, 44.718, 0.568)
pt3dadd(38.622, 119.142, 44.741, 0.546)
pt3dadd(38.739, 119.131, 44.765, 0.526)
pt3dadd(38.855, 119.12, 44.788, 0.504)
pt3dadd(38.971, 119.109, 44.811, 0.482)
pt3dadd(39.087, 119.099, 44.835, 0.462)
pt3dadd(39.203, 119.088, 44.858, 0.44)
pt3dadd(39.319, 119.077, 44.881, 0.42)
pt3dadd(39.436, 119.066, 44.905, 0.398)
pt3dadd(39.555, 119.066, 44.915, 0.382)
pt3dadd(39.674, 119.066, 44.925, 0.364)
pt3dadd(39.794, 119.066, 44.935, 0.346)
pt3dadd(39.913, 119.066, 44.944, 0.33)
pt3dadd(40.033, 119.066, 44.955, 0.312)
pt3dadd(40.152, 119.066, 44.965, 0.294)
pt3dadd(40.271, 119.066, 44.974, 0.278)
pt3dadd(40.391, 119.066, 44.984, 0.26)
pt3dadd(40.51, 119.066, 44.994, 0.244)
pt3dadd(40.63, 119.066, 45.004, 0.226)
}
dend_7[29] {pt3dclear()
pt3dadd(36.259, 119.994, 43.913, 0.734)
pt3dadd(36.291, 120.088, 43.923, 0.73)
pt3dadd(36.329, 120.2, 43.934, 0.722)
pt3dadd(36.368, 120.313, 43.945, 0.716)
pt3dadd(36.406, 120.426, 43.957, 0.71)
pt3dadd(36.444, 120.539, 43.968, 0.702)
pt3dadd(36.482, 120.652, 43.98, 0.696)
pt3dadd(36.521, 120.766, 43.991, 0.69)
pt3dadd(36.559, 120.878, 44.003, 0.682)
pt3dadd(36.617, 120.965, 44.021, 0.678)
pt3dadd(36.728, 120.98, 44.057, 0.678)
pt3dadd(36.839, 120.997, 44.093, 0.678)
pt3dadd(36.949, 121.013, 44.129, 0.678)
pt3dadd(37.06, 121.03, 44.165, 0.678)
pt3dadd(37.168, 121.058, 44.197, 0.678)
pt3dadd(37.272, 121.112, 44.222, 0.678)
pt3dadd(37.375, 121.165, 44.247, 0.678)
pt3dadd(37.479, 121.218, 44.271, 0.678)
pt3dadd(37.582, 121.271, 44.296, 0.678)
pt3dadd(37.685, 121.33, 44.312, 0.678)
pt3dadd(37.787, 121.39, 44.326, 0.678)
pt3dadd(37.89, 121.45, 44.34, 0.678)
pt3dadd(37.993, 121.51, 44.355, 0.678)
pt3dadd(38.086, 121.577, 44.37, 0.678)
pt3dadd(38.125, 121.687, 44.392, 0.678)
pt3dadd(38.168, 121.794, 44.416, 0.678)
pt3dadd(38.244, 121.871, 44.46, 0.678)
pt3dadd(38.335, 121.92, 44.49, 0.678)
pt3dadd(38.455, 121.92, 44.494, 0.678)
pt3dadd(38.575, 121.92, 44.498, 0.678)
pt3dadd(38.695, 121.92, 44.5, 0.678)
pt3dadd(38.815, 121.92, 44.5, 0.678)
pt3dadd(38.935, 121.92, 44.5, 0.678)
pt3dadd(39.047, 121.943, 44.513, 0.678)
pt3dadd(39.151, 121.992, 44.54, 0.678)
pt3dadd(39.255, 122.042, 44.568, 0.678)
pt3dadd(39.36, 122.094, 44.59, 0.678)
pt3dadd(39.466, 122.149, 44.595, 0.678)
pt3dadd(39.571, 122.207, 44.602, 0.678)
pt3dadd(39.667, 122.257, 44.637, 0.678)
pt3dadd(39.758, 122.294, 44.694, 0.678)
pt3dadd(39.849, 122.333, 44.752, 0.678)
pt3dadd(39.94, 122.37, 44.809, 0.678)
pt3dadd(40.035, 122.4, 44.862, 0.678)
pt3dadd(40.148, 122.4, 44.895, 0.678)
pt3dadd(40.261, 122.4, 44.928, 0.678)
pt3dadd(40.367, 122.4, 44.976, 0.678)
pt3dadd(40.47, 122.4, 45.026, 0.678)
pt3dadd(40.532, 122.4, 45.105, 0.678)
pt3dadd(40.572, 122.4, 45.199, 0.678)
pt3dadd(40.621, 122.4, 45.289, 0.678)
pt3dadd(40.696, 122.4, 45.367, 0.678)
pt3dadd(40.768, 122.4, 45.447, 0.678)
pt3dadd(40.822, 122.4, 45.536, 0.678)
pt3dadd(40.875, 122.4, 45.626, 0.678)
pt3dadd(40.929, 122.4, 45.715, 0.678)
pt3dadd(41.002, 122.4, 45.791, 0.678)
pt3dadd(41.101, 122.4, 45.847, 0.678)
pt3dadd(41.199, 122.4, 45.904, 0.678)
pt3dadd(41.298, 122.4, 45.961, 0.678)
pt3dadd(41.387, 122.4, 46.022, 0.678)
pt3dadd(41.392, 122.4, 46.122, 0.678)
pt3dadd(41.396, 122.4, 46.222, 0.678)
pt3dadd(41.412, 122.4, 46.319, 0.678)
pt3dadd(41.465, 122.4, 46.409, 0.678)
pt3dadd(41.519, 122.4, 46.498, 0.678)
pt3dadd(41.573, 122.4, 46.588, 0.678)
pt3dadd(41.653, 122.4, 46.655, 0.678)
pt3dadd(41.76, 122.4, 46.7, 0.678)
}
dend_0[11] {pt3dclear()
pt3dadd(18.204, 102.039, 21.52, 11.412)
pt3dadd(18.208, 102.035, 21.52, 11.408)
pt3dadd(18.293, 101.95, 21.52, 11.326)
pt3dadd(18.378, 101.865, 21.52, 11.244)
pt3dadd(18.463, 101.78, 21.52, 11.164)
pt3dadd(18.548, 101.695, 21.52, 11.082)
pt3dadd(18.632, 101.61, 21.52, 11)
pt3dadd(18.717, 101.526, 21.52, 10.918)
pt3dadd(18.802, 101.441, 21.52, 10.836)
pt3dadd(18.887, 101.356, 21.52, 10.754)
pt3dadd(18.972, 101.271, 21.52, 10.674)
pt3dadd(19.057, 101.186, 21.52, 10.592)
pt3dadd(19.145, 101.105, 21.524, 10.498)
pt3dadd(19.232, 101.023, 21.528, 10.406)
pt3dadd(19.32, 100.941, 21.532, 10.312)
pt3dadd(19.408, 100.86, 21.537, 10.22)
pt3dadd(19.496, 100.778, 21.541, 10.126)
pt3dadd(19.584, 100.696, 21.545, 10.034)
pt3dadd(19.671, 100.615, 21.549, 9.94)
pt3dadd(19.759, 100.533, 21.553, 9.848)
pt3dadd(19.847, 100.451, 21.557, 9.754)
pt3dadd(19.935, 100.37, 21.561, 9.66)
pt3dadd(20.026, 100.292, 21.57, 9.556)
pt3dadd(20.117, 100.215, 21.579, 9.45)
pt3dadd(20.208, 100.137, 21.587, 9.346)
pt3dadd(20.298, 100.059, 21.596, 9.24)
pt3dadd(20.389, 99.981, 21.604, 9.136)
pt3dadd(20.48, 99.904, 21.613, 9.032)
pt3dadd(20.571, 99.826, 21.621, 8.926)
pt3dadd(20.662, 99.748, 21.63, 8.822)
pt3dadd(20.752, 99.67, 21.638, 8.716)
pt3dadd(20.843, 99.593, 21.647, 8.612)
pt3dadd(20.935, 99.516, 21.657, 8.51)
}
}
proc shape3d_133() {
dend_0[11] { pt3dadd(21.027, 99.44, 21.667, 8.41)
pt3dadd(21.119, 99.363, 21.676, 8.31)
pt3dadd(21.21, 99.287, 21.686, 8.208)
pt3dadd(21.302, 99.211, 21.696, 8.108)
pt3dadd(21.394, 99.134, 21.705, 8.006)
pt3dadd(21.486, 99.058, 21.715, 7.906)
pt3dadd(21.578, 98.981, 21.725, 7.804)
pt3dadd(21.669, 98.905, 21.735, 7.704)
pt3dadd(21.761, 98.829, 21.745, 7.602)
pt3dadd(21.858, 98.762, 21.765, 7.482)
pt3dadd(21.955, 98.695, 21.784, 7.362)
pt3dadd(22.052, 98.628, 21.804, 7.244)
pt3dadd(22.148, 98.561, 21.824, 7.124)
pt3dadd(22.245, 98.494, 21.843, 7.004)
pt3dadd(22.342, 98.427, 21.863, 6.886)
pt3dadd(22.438, 98.36, 21.883, 6.766)
pt3dadd(22.535, 98.293, 21.902, 6.648)
pt3dadd(22.632, 98.226, 21.922, 6.528)
pt3dadd(22.729, 98.162, 21.944, 6.404)
pt3dadd(22.83, 98.111, 21.978, 6.258)
pt3dadd(22.931, 98.06, 22.012, 6.114)
pt3dadd(23.032, 98.009, 22.046, 5.968)
pt3dadd(23.133, 97.958, 22.079, 5.822)
pt3dadd(23.233, 97.907, 22.113, 5.676)
pt3dadd(23.334, 97.856, 22.147, 5.532)
pt3dadd(23.435, 97.805, 22.181, 5.386)
pt3dadd(23.536, 97.754, 22.214, 5.24)
pt3dadd(23.637, 97.703, 22.248, 5.096)
pt3dadd(23.737, 97.65, 22.279, 4.962)
pt3dadd(23.838, 97.591, 22.301, 4.88)
pt3dadd(23.939, 97.531, 22.322, 4.8)
pt3dadd(24.041, 97.472, 22.343, 4.718)
}
dend_7[30] {pt3dclear()
pt3dadd(24.041, 97.472, 22.343, 4.718)
pt3dadd(24.142, 97.412, 22.364, 4.638)
pt3dadd(24.243, 97.353, 22.385, 4.556)
pt3dadd(24.344, 97.293, 22.406, 4.474)
pt3dadd(24.445, 97.233, 22.427, 4.392)
pt3dadd(24.546, 97.174, 22.448, 4.312)
pt3dadd(24.647, 97.114, 22.469, 4.23)
pt3dadd(24.749, 97.057, 22.489, 4.148)
pt3dadd(24.857, 97.007, 22.504, 4.062)
pt3dadd(24.965, 96.958, 22.519, 3.976)
pt3dadd(25.073, 96.908, 22.534, 3.888)
pt3dadd(25.18, 96.859, 22.549, 3.802)
pt3dadd(25.288, 96.809, 22.564, 3.716)
pt3dadd(25.396, 96.76, 22.579, 3.63)
pt3dadd(25.504, 96.71, 22.594, 3.542)
pt3dadd(25.612, 96.661, 22.609, 3.456)
pt3dadd(25.719, 96.611, 22.624, 3.37)
pt3dadd(25.828, 96.562, 22.638, 3.286)
pt3dadd(25.938, 96.514, 22.645, 3.216)
pt3dadd(26.047, 96.467, 22.653, 3.146)
pt3dadd(26.157, 96.419, 22.66, 3.074)
pt3dadd(26.267, 96.371, 22.668, 3.004)
pt3dadd(26.376, 96.324, 22.676, 2.932)
pt3dadd(26.486, 96.276, 22.684, 2.862)
pt3dadd(26.596, 96.228, 22.691, 2.792)
pt3dadd(26.706, 96.181, 22.699, 2.72)
pt3dadd(26.815, 96.133, 22.707, 2.65)
pt3dadd(26.924, 96.083, 22.712, 2.588)
pt3dadd(27.029, 96.025, 22.714, 2.554)
pt3dadd(27.135, 95.967, 22.715, 2.522)
pt3dadd(27.24, 95.91, 22.716, 2.488)
pt3dadd(27.345, 95.852, 22.717, 2.454)
pt3dadd(27.45, 95.795, 22.719, 2.42)
pt3dadd(27.556, 95.737, 22.72, 2.386)
pt3dadd(27.661, 95.68, 22.721, 2.352)
pt3dadd(27.766, 95.622, 22.722, 2.318)
pt3dadd(27.871, 95.564, 22.723, 2.284)
pt3dadd(27.979, 95.512, 22.725, 2.26)
pt3dadd(28.093, 95.474, 22.728, 2.26)
pt3dadd(28.207, 95.437, 22.73, 2.26)
pt3dadd(28.321, 95.399, 22.733, 2.26)
pt3dadd(28.434, 95.361, 22.736, 2.26)
pt3dadd(28.549, 95.325, 22.739, 2.254)
pt3dadd(28.663, 95.289, 22.743, 2.246)
pt3dadd(28.777, 95.253, 22.746, 2.238)
pt3dadd(28.892, 95.216, 22.75, 2.23)
pt3dadd(29.006, 95.18, 22.753, 2.224)
pt3dadd(29.121, 95.144, 22.757, 2.216)
pt3dadd(29.235, 95.108, 22.76, 2.208)
pt3dadd(29.349, 95.072, 22.764, 2.2)
pt3dadd(29.464, 95.036, 22.767, 2.194)
pt3dadd(29.578, 95, 22.771, 2.186)
pt3dadd(29.694, 94.969, 22.777, 2.152)
pt3dadd(29.81, 94.94, 22.784, 2.114)
pt3dadd(29.926, 94.91, 22.791, 2.078)
pt3dadd(30.042, 94.88, 22.797, 2.04)
pt3dadd(30.158, 94.851, 22.804, 2.004)
pt3dadd(30.274, 94.821, 22.811, 1.966)
pt3dadd(30.39, 94.791, 22.818, 1.928)
pt3dadd(30.506, 94.761, 22.824, 1.892)
pt3dadd(30.622, 94.732, 22.831, 1.854)
pt3dadd(30.738, 94.702, 22.838, 1.818)
pt3dadd(30.847, 94.654, 22.848, 1.858)
pt3dadd(30.955, 94.603, 22.858, 1.908)
pt3dadd(31.063, 94.553, 22.868, 1.96)
pt3dadd(31.171, 94.502, 22.879, 2.01)
pt3dadd(31.279, 94.452, 22.889, 2.06)
pt3dadd(31.387, 94.401, 22.899, 2.112)
pt3dadd(31.495, 94.35, 22.91, 2.162)
pt3dadd(31.603, 94.3, 22.92, 2.214)
pt3dadd(31.712, 94.249, 22.93, 2.264)
pt3dadd(31.82, 94.199, 22.941, 2.314)
pt3dadd(31.927, 94.155, 22.966, 2.326)
pt3dadd(32.034, 94.112, 22.993, 2.33)
pt3dadd(32.142, 94.07, 23.021, 2.336)
pt3dadd(32.249, 94.027, 23.048, 2.34)
pt3dadd(32.356, 93.984, 23.075, 2.346)
pt3dadd(32.463, 93.942, 23.103, 2.35)
pt3dadd(32.57, 93.899, 23.13, 2.356)
pt3dadd(32.678, 93.856, 23.158, 2.36)
pt3dadd(32.785, 93.814, 23.185, 2.366)
pt3dadd(32.892, 93.771, 23.212, 2.37)
pt3dadd(32.998, 93.727, 23.242, 2.338)
pt3dadd(33.104, 93.683, 23.273, 2.302)
pt3dadd(33.209, 93.639, 23.303, 2.268)
pt3dadd(33.315, 93.596, 23.333, 2.234)
pt3dadd(33.42, 93.552, 23.363, 2.2)
pt3dadd(33.526, 93.508, 23.394, 2.164)
pt3dadd(33.632, 93.464, 23.424, 2.13)
pt3dadd(33.738, 93.42, 23.454, 2.096)
pt3dadd(33.843, 93.377, 23.484, 2.06)
pt3dadd(33.949, 93.333, 23.514, 2.026)
pt3dadd(34.053, 93.279, 23.535, 1.96)
pt3dadd(34.158, 93.226, 23.556, 1.892)
pt3dadd(34.262, 93.172, 23.577, 1.826)
pt3dadd(34.367, 93.119, 23.598, 1.758)
pt3dadd(34.471, 93.065, 23.619, 1.692)
pt3dadd(34.575, 93.012, 23.64, 1.624)
pt3dadd(34.68, 92.958, 23.661, 1.558)
pt3dadd(34.784, 92.905, 23.682, 1.49)
pt3dadd(34.889, 92.852, 23.703, 1.424)
pt3dadd(34.993, 92.798, 23.724, 1.356)
}
dend_7[31] {pt3dclear()
pt3dadd(34.993, 92.798, 23.724, 1.356)
pt3dadd(35.015, 92.793, 23.726, 1.352)
pt3dadd(35.131, 92.764, 23.735, 1.334)
pt3dadd(35.247, 92.735, 23.745, 1.316)
pt3dadd(35.363, 92.707, 23.754, 1.296)
pt3dadd(35.479, 92.678, 23.763, 1.278)
pt3dadd(35.595, 92.65, 23.773, 1.26)
pt3dadd(35.711, 92.621, 23.782, 1.24)
pt3dadd(35.827, 92.592, 23.792, 1.222)
pt3dadd(35.943, 92.564, 23.801, 1.204)
pt3dadd(36.061, 92.543, 23.804, 1.154)
pt3dadd(36.18, 92.524, 23.806, 1.1)
pt3dadd(36.298, 92.505, 23.808, 1.046)
pt3dadd(36.416, 92.486, 23.809, 0.99)
pt3dadd(36.535, 92.466, 23.811, 0.936)
pt3dadd(36.653, 92.447, 23.813, 0.882)
pt3dadd(36.772, 92.428, 23.815, 0.828)
pt3dadd(36.89, 92.409, 23.817, 0.772)
pt3dadd(37.008, 92.389, 23.819, 0.718)
pt3dadd(37.127, 92.37, 23.82, 0.664)
pt3dadd(37.246, 92.361, 23.817, 0.62)
pt3dadd(37.366, 92.354, 23.812, 0.576)
pt3dadd(37.486, 92.346, 23.807, 0.532)
pt3dadd(37.605, 92.339, 23.803, 0.49)
pt3dadd(37.725, 92.331, 23.798, 0.446)
pt3dadd(37.845, 92.324, 23.793, 0.402)
pt3dadd(37.964, 92.316, 23.789, 0.36)
pt3dadd(38.084, 92.309, 23.784, 0.316)
pt3dadd(38.204, 92.301, 23.78, 0.274)
pt3dadd(38.323, 92.294, 23.775, 0.23)
pt3dadd(38.443, 92.293, 23.767, 0.226)
pt3dadd(38.562, 92.293, 23.759, 0.226)
pt3dadd(38.682, 92.293, 23.751, 0.226)
pt3dadd(38.802, 92.293, 23.743, 0.226)
pt3dadd(38.921, 92.293, 23.735, 0.226)
pt3dadd(39.041, 92.293, 23.727, 0.226)
pt3dadd(39.16, 92.293, 23.719, 0.226)
pt3dadd(39.28, 92.293, 23.71, 0.226)
pt3dadd(39.4, 92.293, 23.702, 0.226)
pt3dadd(39.519, 92.293, 23.694, 0.226)
pt3dadd(39.638, 92.293, 23.681, 0.226)
pt3dadd(39.757, 92.293, 23.668, 0.226)
pt3dadd(39.876, 92.293, 23.654, 0.226)
pt3dadd(39.995, 92.293, 23.641, 0.226)
pt3dadd(40.114, 92.293, 23.627, 0.226)
pt3dadd(40.233, 92.293, 23.614, 0.226)
pt3dadd(40.352, 92.293, 23.601, 0.226)
pt3dadd(40.47, 92.293, 23.587, 0.226)
pt3dadd(40.589, 92.292, 23.574, 0.226)
pt3dadd(40.708, 92.292, 23.56, 0.226)
pt3dadd(40.82, 92.292, 23.525, 0.226)
pt3dadd(40.932, 92.292, 23.488, 0.226)
pt3dadd(41.043, 92.292, 23.451, 0.226)
pt3dadd(41.155, 92.292, 23.414, 0.226)
pt3dadd(41.266, 92.292, 23.377, 0.226)
pt3dadd(41.378, 92.292, 23.34, 0.226)
pt3dadd(41.489, 92.292, 23.303, 0.226)
pt3dadd(41.601, 92.292, 23.266, 0.226)
pt3dadd(41.712, 92.292, 23.229, 0.226)
pt3dadd(41.824, 92.292, 23.192, 0.226)
pt3dadd(41.939, 92.291, 23.165, 0.226)
pt3dadd(42.055, 92.291, 23.139, 0.226)
pt3dadd(42.171, 92.291, 23.113, 0.226)
pt3dadd(42.287, 92.291, 23.087, 0.226)
pt3dadd(42.403, 92.291, 23.062, 0.226)
pt3dadd(42.519, 92.29, 23.036, 0.226)
}
}
proc shape3d_134() {
dend_7[31] { pt3dadd(42.635, 92.29, 23.01, 0.226)
pt3dadd(42.751, 92.29, 22.984, 0.226)
pt3dadd(42.867, 92.29, 22.958, 0.226)
pt3dadd(42.982, 92.29, 22.932, 0.226)
pt3dadd(43.101, 92.289, 22.916, 0.26)
pt3dadd(43.22, 92.289, 22.901, 0.294)
pt3dadd(43.338, 92.289, 22.886, 0.33)
pt3dadd(43.457, 92.288, 22.871, 0.364)
pt3dadd(43.575, 92.288, 22.856, 0.398)
pt3dadd(43.694, 92.287, 22.841, 0.434)
pt3dadd(43.813, 92.287, 22.826, 0.468)
pt3dadd(43.931, 92.287, 22.811, 0.504)
pt3dadd(44.05, 92.286, 22.796, 0.538)
pt3dadd(44.169, 92.286, 22.78, 0.574)
pt3dadd(44.288, 92.285, 22.776, 0.606)
pt3dadd(44.408, 92.284, 22.772, 0.64)
pt3dadd(44.528, 92.284, 22.767, 0.672)
pt3dadd(44.648, 92.283, 22.763, 0.706)
pt3dadd(44.768, 92.282, 22.759, 0.738)
pt3dadd(44.888, 92.282, 22.754, 0.772)
pt3dadd(45.008, 92.281, 22.75, 0.804)
pt3dadd(45.128, 92.28, 22.746, 0.838)
pt3dadd(45.248, 92.28, 22.741, 0.87)
pt3dadd(45.367, 92.279, 22.737, 0.904)
pt3dadd(45.487, 92.277, 22.741, 0.89)
pt3dadd(45.607, 92.276, 22.745, 0.876)
pt3dadd(45.727, 92.275, 22.749, 0.86)
pt3dadd(45.847, 92.274, 22.752, 0.846)
pt3dadd(45.967, 92.272, 22.756, 0.832)
pt3dadd(46.087, 92.271, 22.76, 0.818)
pt3dadd(46.207, 92.27, 22.764, 0.802)
pt3dadd(46.327, 92.268, 22.768, 0.788)
pt3dadd(46.446, 92.267, 22.772, 0.774)
pt3dadd(46.566, 92.266, 22.776, 0.76)
pt3dadd(46.686, 92.263, 22.783, 0.71)
pt3dadd(46.806, 92.261, 22.791, 0.662)
pt3dadd(46.925, 92.258, 22.798, 0.612)
pt3dadd(47.045, 92.256, 22.805, 0.564)
pt3dadd(47.165, 92.253, 22.813, 0.514)
pt3dadd(47.284, 92.251, 22.82, 0.466)
pt3dadd(47.404, 92.249, 22.827, 0.416)
pt3dadd(47.524, 92.246, 22.835, 0.366)
pt3dadd(47.643, 92.244, 22.842, 0.318)
pt3dadd(47.763, 92.241, 22.849, 0.268)
pt3dadd(47.882, 92.237, 22.861, 0.326)
pt3dadd(48.001, 92.232, 22.873, 0.382)
pt3dadd(48.12, 92.227, 22.884, 0.44)
pt3dadd(48.239, 92.223, 22.896, 0.498)
pt3dadd(48.358, 92.218, 22.907, 0.554)
pt3dadd(48.478, 92.214, 22.919, 0.612)
pt3dadd(48.597, 92.209, 22.93, 0.67)
pt3dadd(48.716, 92.204, 22.942, 0.726)
pt3dadd(48.835, 92.2, 22.953, 0.784)
pt3dadd(48.954, 92.195, 22.965, 0.842)
}
dend_7[32] {pt3dclear()
pt3dadd(48.954, 92.195, 22.965, 0.842)
pt3dadd(49.044, 92.187, 22.993, 0.846)
pt3dadd(49.157, 92.178, 23.027, 0.852)
pt3dadd(49.269, 92.168, 23.061, 0.86)
pt3dadd(49.381, 92.158, 23.096, 0.866)
pt3dadd(49.494, 92.149, 23.13, 0.872)
pt3dadd(49.606, 92.139, 23.165, 0.878)
pt3dadd(49.718, 92.129, 23.199, 0.884)
pt3dadd(49.83, 92.12, 23.233, 0.89)
pt3dadd(49.943, 92.11, 23.268, 0.896)
pt3dadd(50.055, 92.1, 23.302, 0.902)
pt3dadd(50.169, 92.086, 23.332, 0.894)
pt3dadd(50.283, 92.07, 23.361, 0.882)
pt3dadd(50.396, 92.054, 23.389, 0.872)
pt3dadd(50.51, 92.039, 23.418, 0.86)
pt3dadd(50.624, 92.023, 23.447, 0.848)
pt3dadd(50.738, 92.008, 23.476, 0.836)
pt3dadd(50.852, 91.992, 23.505, 0.826)
pt3dadd(50.966, 91.976, 23.534, 0.814)
pt3dadd(51.079, 91.961, 23.562, 0.802)
pt3dadd(51.193, 91.945, 23.591, 0.792)
pt3dadd(51.306, 91.914, 23.611, 0.786)
pt3dadd(51.42, 91.881, 23.629, 0.782)
pt3dadd(51.533, 91.848, 23.648, 0.776)
pt3dadd(51.646, 91.815, 23.666, 0.772)
pt3dadd(51.759, 91.782, 23.685, 0.768)
pt3dadd(51.872, 91.748, 23.703, 0.764)
pt3dadd(51.985, 91.715, 23.722, 0.76)
pt3dadd(52.099, 91.682, 23.74, 0.754)
pt3dadd(52.212, 91.649, 23.759, 0.75)
pt3dadd(52.325, 91.615, 23.777, 0.746)
pt3dadd(52.432, 91.562, 23.786, 0.76)
pt3dadd(52.538, 91.508, 23.795, 0.774)
pt3dadd(52.645, 91.454, 23.804, 0.79)
pt3dadd(52.752, 91.4, 23.814, 0.804)
pt3dadd(52.859, 91.347, 23.823, 0.818)
pt3dadd(52.965, 91.293, 23.832, 0.834)
pt3dadd(53.072, 91.239, 23.841, 0.848)
pt3dadd(53.179, 91.185, 23.85, 0.862)
pt3dadd(53.286, 91.132, 23.859, 0.876)
pt3dadd(53.392, 91.078, 23.868, 0.892)
pt3dadd(53.502, 91.029, 23.868, 0.874)
pt3dadd(53.611, 90.979, 23.868, 0.856)
pt3dadd(53.72, 90.93, 23.868, 0.838)
pt3dadd(53.83, 90.881, 23.868, 0.82)
pt3dadd(53.939, 90.831, 23.868, 0.804)
pt3dadd(54.048, 90.782, 23.868, 0.786)
pt3dadd(54.158, 90.732, 23.868, 0.768)
pt3dadd(54.267, 90.683, 23.868, 0.75)
pt3dadd(54.377, 90.634, 23.868, 0.734)
pt3dadd(54.486, 90.584, 23.868, 0.716)
}
dend_7[33] {pt3dclear()
pt3dadd(54.486, 90.584, 23.868, 0.716)
pt3dadd(54.528, 90.559, 23.868, 0.704)
pt3dadd(54.63, 90.496, 23.868, 0.674)
pt3dadd(54.732, 90.433, 23.868, 0.646)
pt3dadd(54.834, 90.37, 23.868, 0.616)
pt3dadd(54.936, 90.307, 23.868, 0.588)
pt3dadd(55.038, 90.244, 23.868, 0.558)
pt3dadd(55.141, 90.181, 23.868, 0.53)
pt3dadd(55.243, 90.118, 23.868, 0.5)
pt3dadd(55.345, 90.055, 23.868, 0.472)
pt3dadd(55.447, 89.992, 23.868, 0.442)
pt3dadd(55.548, 89.927, 23.868, 0.418)
pt3dadd(55.647, 89.859, 23.868, 0.398)
pt3dadd(55.745, 89.791, 23.868, 0.378)
pt3dadd(55.844, 89.723, 23.868, 0.358)
pt3dadd(55.943, 89.654, 23.868, 0.338)
pt3dadd(56.042, 89.586, 23.869, 0.318)
pt3dadd(56.14, 89.518, 23.869, 0.298)
pt3dadd(56.239, 89.45, 23.869, 0.278)
pt3dadd(56.338, 89.382, 23.869, 0.258)
pt3dadd(56.437, 89.313, 23.869, 0.238)
pt3dadd(56.535, 89.244, 23.869, 0.226)
pt3dadd(56.631, 89.173, 23.869, 0.226)
pt3dadd(56.728, 89.102, 23.869, 0.226)
pt3dadd(56.825, 89.031, 23.869, 0.226)
pt3dadd(56.921, 88.96, 23.869, 0.226)
pt3dadd(57.018, 88.889, 23.869, 0.226)
pt3dadd(57.115, 88.818, 23.869, 0.226)
pt3dadd(57.211, 88.746, 23.869, 0.226)
pt3dadd(57.308, 88.675, 23.869, 0.226)
pt3dadd(57.405, 88.604, 23.869, 0.226)
pt3dadd(57.505, 88.54, 23.869, 0.226)
pt3dadd(57.612, 88.484, 23.869, 0.226)
pt3dadd(57.718, 88.428, 23.869, 0.226)
pt3dadd(57.824, 88.372, 23.869, 0.226)
pt3dadd(57.93, 88.316, 23.869, 0.226)
pt3dadd(58.036, 88.26, 23.869, 0.226)
pt3dadd(58.142, 88.203, 23.869, 0.226)
pt3dadd(58.248, 88.147, 23.869, 0.226)
pt3dadd(58.354, 88.092, 23.869, 0.226)
pt3dadd(58.46, 88.035, 23.869, 0.226)
pt3dadd(58.566, 87.978, 23.869, 0.23)
pt3dadd(58.67, 87.919, 23.869, 0.24)
pt3dadd(58.775, 87.86, 23.869, 0.25)
pt3dadd(58.88, 87.801, 23.869, 0.26)
pt3dadd(58.984, 87.743, 23.869, 0.27)
pt3dadd(59.089, 87.684, 23.869, 0.28)
pt3dadd(59.193, 87.625, 23.869, 0.29)
pt3dadd(59.298, 87.566, 23.869, 0.3)
pt3dadd(59.402, 87.507, 23.869, 0.31)
pt3dadd(59.507, 87.448, 23.87, 0.32)
pt3dadd(59.612, 87.39, 23.87, 0.328)
pt3dadd(59.717, 87.332, 23.87, 0.338)
pt3dadd(59.822, 87.274, 23.87, 0.346)
pt3dadd(59.927, 87.216, 23.87, 0.354)
pt3dadd(60.032, 87.159, 23.87, 0.364)
pt3dadd(60.138, 87.101, 23.87, 0.372)
pt3dadd(60.243, 87.043, 23.87, 0.38)
pt3dadd(60.348, 86.985, 23.87, 0.39)
pt3dadd(60.453, 86.927, 23.87, 0.398)
pt3dadd(60.558, 86.869, 23.87, 0.406)
pt3dadd(60.666, 86.818, 23.871, 0.402)
pt3dadd(60.778, 86.773, 23.871, 0.384)
pt3dadd(60.889, 86.729, 23.871, 0.366)
pt3dadd(61.001, 86.685, 23.871, 0.348)
pt3dadd(61.112, 86.64, 23.871, 0.33)
pt3dadd(61.224, 86.596, 23.871, 0.312)
pt3dadd(61.335, 86.551, 23.871, 0.294)
pt3dadd(61.447, 86.507, 23.872, 0.278)
pt3dadd(61.558, 86.463, 23.872, 0.26)
pt3dadd(61.67, 86.418, 23.872, 0.242)
pt3dadd(61.777, 86.366, 23.872, 0.246)
pt3dadd(61.881, 86.305, 23.872, 0.278)
pt3dadd(61.984, 86.244, 23.873, 0.31)
pt3dadd(62.087, 86.183, 23.873, 0.34)
pt3dadd(62.191, 86.123, 23.873, 0.372)
pt3dadd(62.294, 86.062, 23.874, 0.404)
pt3dadd(62.398, 86.001, 23.874, 0.436)
pt3dadd(62.501, 85.94, 23.874, 0.466)
pt3dadd(62.605, 85.879, 23.875, 0.498)
pt3dadd(62.708, 85.818, 23.875, 0.53)
pt3dadd(62.814, 85.762, 23.875, 0.542)
pt3dadd(62.922, 85.711, 23.876, 0.534)
pt3dadd(63.031, 85.66, 23.876, 0.526)
pt3dadd(63.14, 85.609, 23.877, 0.516)
pt3dadd(63.248, 85.558, 23.877, 0.508)
pt3dadd(63.357, 85.507, 23.878, 0.5)
pt3dadd(63.465, 85.456, 23.879, 0.492)
pt3dadd(63.574, 85.405, 23.879, 0.484)
pt3dadd(63.683, 85.354, 23.88, 0.476)
pt3dadd(63.791, 85.303, 23.88, 0.468)
pt3dadd(63.9, 85.252, 23.881, 0.456)
pt3dadd(64.01, 85.203, 23.882, 0.444)
pt3dadd(64.119, 85.153, 23.883, 0.432)
pt3dadd(64.228, 85.104, 23.884, 0.42)
}
}
proc shape3d_135() {
dend_7[33] { pt3dadd(64.337, 85.054, 23.885, 0.406)
pt3dadd(64.447, 85.005, 23.886, 0.394)
pt3dadd(64.556, 84.955, 23.887, 0.382)
pt3dadd(64.665, 84.906, 23.888, 0.37)
pt3dadd(64.775, 84.856, 23.889, 0.356)
pt3dadd(64.884, 84.807, 23.89, 0.344)
pt3dadd(64.99, 84.751, 23.891, 0.356)
pt3dadd(65.094, 84.691, 23.893, 0.39)
pt3dadd(65.198, 84.63, 23.894, 0.424)
pt3dadd(65.301, 84.57, 23.896, 0.456)
pt3dadd(65.405, 84.51, 23.897, 0.49)
pt3dadd(65.509, 84.449, 23.899, 0.522)
pt3dadd(65.612, 84.389, 23.9, 0.556)
pt3dadd(65.716, 84.329, 23.902, 0.59)
pt3dadd(65.82, 84.268, 23.903, 0.622)
pt3dadd(65.923, 84.208, 23.905, 0.656)
pt3dadd(66.032, 84.158, 23.907, 0.662)
pt3dadd(66.144, 84.116, 23.91, 0.646)
pt3dadd(66.257, 84.075, 23.914, 0.628)
pt3dadd(66.37, 84.034, 23.917, 0.61)
pt3dadd(66.482, 83.992, 23.92, 0.594)
pt3dadd(66.595, 83.951, 23.923, 0.576)
pt3dadd(66.707, 83.91, 23.927, 0.56)
pt3dadd(66.82, 83.868, 23.93, 0.542)
pt3dadd(66.932, 83.827, 23.933, 0.526)
pt3dadd(67.045, 83.785, 23.937, 0.508)
pt3dadd(67.155, 83.739, 23.941, 0.512)
pt3dadd(67.264, 83.688, 23.948, 0.532)
pt3dadd(67.372, 83.637, 23.954, 0.552)
pt3dadd(67.48, 83.586, 23.961, 0.572)
pt3dadd(67.589, 83.535, 23.967, 0.592)
pt3dadd(67.697, 83.484, 23.973, 0.612)
pt3dadd(67.805, 83.433, 23.98, 0.632)
pt3dadd(67.914, 83.382, 23.986, 0.652)
pt3dadd(68.022, 83.331, 23.993, 0.672)
pt3dadd(68.13, 83.28, 23.999, 0.692)
pt3dadd(68.24, 83.233, 24.008, 0.704)
pt3dadd(68.351, 83.188, 24.018, 0.71)
pt3dadd(68.462, 83.144, 24.028, 0.714)
pt3dadd(68.573, 83.1, 24.039, 0.72)
pt3dadd(68.684, 83.056, 24.049, 0.726)
pt3dadd(68.795, 83.012, 24.059, 0.73)
pt3dadd(68.906, 82.967, 24.069, 0.736)
pt3dadd(69.016, 82.923, 24.08, 0.74)
pt3dadd(69.127, 82.879, 24.09, 0.746)
pt3dadd(69.238, 82.835, 24.1, 0.75)
pt3dadd(69.351, 82.802, 24.116, 0.732)
pt3dadd(69.466, 82.776, 24.136, 0.698)
pt3dadd(69.581, 82.751, 24.155, 0.664)
pt3dadd(69.696, 82.725, 24.175, 0.63)
pt3dadd(69.811, 82.7, 24.195, 0.598)
pt3dadd(69.926, 82.674, 24.214, 0.564)
pt3dadd(70.041, 82.648, 24.234, 0.53)
pt3dadd(70.155, 82.623, 24.253, 0.496)
pt3dadd(70.27, 82.597, 24.273, 0.462)
pt3dadd(70.385, 82.571, 24.292, 0.43)
pt3dadd(70.495, 82.555, 24.328, 0.408)
pt3dadd(70.603, 82.543, 24.371, 0.39)
pt3dadd(70.711, 82.531, 24.414, 0.372)
pt3dadd(70.819, 82.519, 24.456, 0.356)
pt3dadd(70.927, 82.507, 24.499, 0.338)
pt3dadd(71.035, 82.495, 24.541, 0.32)
pt3dadd(71.142, 82.483, 24.584, 0.304)
pt3dadd(71.25, 82.471, 24.626, 0.286)
pt3dadd(71.358, 82.459, 24.669, 0.268)
pt3dadd(71.466, 82.447, 24.712, 0.252)
pt3dadd(71.577, 82.443, 24.749, 0.278)
pt3dadd(71.689, 82.441, 24.785, 0.324)
pt3dadd(71.801, 82.44, 24.821, 0.37)
pt3dadd(71.913, 82.438, 24.857, 0.416)
pt3dadd(72.025, 82.437, 24.892, 0.464)
pt3dadd(72.138, 82.435, 24.928, 0.51)
pt3dadd(72.25, 82.434, 24.963, 0.556)
pt3dadd(72.362, 82.432, 24.999, 0.602)
pt3dadd(72.474, 82.431, 25.035, 0.648)
pt3dadd(72.586, 82.429, 25.071, 0.694)
pt3dadd(72.696, 82.429, 25.111, 0.714)
pt3dadd(72.804, 82.429, 25.154, 0.722)
pt3dadd(72.913, 82.429, 25.196, 0.73)
pt3dadd(73.021, 82.429, 25.238, 0.74)
pt3dadd(73.13, 82.429, 25.281, 0.748)
pt3dadd(73.239, 82.429, 25.323, 0.758)
pt3dadd(73.347, 82.428, 25.366, 0.766)
pt3dadd(73.456, 82.428, 25.408, 0.774)
pt3dadd(73.565, 82.428, 25.451, 0.784)
pt3dadd(73.673, 82.428, 25.493, 0.792)
pt3dadd(73.783, 82.428, 25.534, 0.776)
pt3dadd(73.893, 82.428, 25.574, 0.752)
pt3dadd(74.002, 82.428, 25.615, 0.728)
pt3dadd(74.112, 82.428, 25.655, 0.704)
pt3dadd(74.222, 82.428, 25.696, 0.68)
pt3dadd(74.332, 82.427, 25.736, 0.656)
pt3dadd(74.442, 82.427, 25.776, 0.632)
pt3dadd(74.551, 82.427, 25.817, 0.608)
pt3dadd(74.661, 82.427, 25.857, 0.584)
pt3dadd(74.771, 82.427, 25.897, 0.56)
pt3dadd(74.886, 82.426, 25.926, 0.528)
pt3dadd(75.002, 82.426, 25.951, 0.496)
pt3dadd(75.118, 82.426, 25.977, 0.464)
pt3dadd(75.234, 82.426, 26.002, 0.43)
pt3dadd(75.35, 82.425, 26.028, 0.398)
pt3dadd(75.466, 82.425, 26.053, 0.364)
pt3dadd(75.582, 82.425, 26.078, 0.332)
pt3dadd(75.698, 82.424, 26.104, 0.298)
pt3dadd(75.814, 82.424, 26.129, 0.266)
pt3dadd(75.93, 82.424, 26.154, 0.232)
pt3dadd(76.048, 82.423, 26.173, 0.226)
pt3dadd(76.167, 82.423, 26.189, 0.226)
pt3dadd(76.285, 82.422, 26.206, 0.226)
pt3dadd(76.403, 82.421, 26.222, 0.226)
pt3dadd(76.522, 82.421, 26.239, 0.226)
pt3dadd(76.64, 82.42, 26.255, 0.226)
pt3dadd(76.758, 82.42, 26.272, 0.226)
pt3dadd(76.877, 82.419, 26.289, 0.226)
pt3dadd(76.995, 82.419, 26.305, 0.226)
pt3dadd(77.113, 82.418, 26.322, 0.226)
pt3dadd(77.232, 82.417, 26.335, 0.244)
pt3dadd(77.351, 82.415, 26.348, 0.266)
pt3dadd(77.47, 82.414, 26.36, 0.286)
pt3dadd(77.589, 82.413, 26.373, 0.308)
pt3dadd(77.708, 82.411, 26.386, 0.33)
pt3dadd(77.827, 82.41, 26.398, 0.352)
pt3dadd(77.946, 82.409, 26.411, 0.372)
pt3dadd(78.065, 82.407, 26.423, 0.394)
pt3dadd(78.184, 82.406, 26.436, 0.416)
pt3dadd(78.303, 82.404, 26.449, 0.438)
pt3dadd(78.42, 82.402, 26.472, 0.46)
pt3dadd(78.536, 82.398, 26.497, 0.484)
pt3dadd(78.652, 82.395, 26.523, 0.508)
pt3dadd(78.768, 82.392, 26.549, 0.532)
pt3dadd(78.884, 82.389, 26.575, 0.556)
pt3dadd(79, 82.386, 26.6, 0.578)
pt3dadd(79.116, 82.383, 26.626, 0.602)
pt3dadd(79.231, 82.379, 26.652, 0.626)
pt3dadd(79.347, 82.376, 26.678, 0.65)
pt3dadd(79.463, 82.373, 26.703, 0.674)
pt3dadd(79.575, 82.375, 26.739, 0.658)
pt3dadd(79.686, 82.378, 26.776, 0.634)
pt3dadd(79.797, 82.381, 26.814, 0.608)
pt3dadd(79.909, 82.385, 26.852, 0.584)
pt3dadd(80.02, 82.388, 26.89, 0.558)
pt3dadd(80.131, 82.391, 26.927, 0.532)
pt3dadd(80.242, 82.394, 26.965, 0.508)
pt3dadd(80.353, 82.397, 27.003, 0.482)
pt3dadd(80.464, 82.401, 27.041, 0.458)
pt3dadd(80.575, 82.404, 27.079, 0.432)
pt3dadd(80.686, 82.407, 27.117, 0.408)
pt3dadd(80.797, 82.41, 27.154, 0.382)
pt3dadd(80.908, 82.413, 27.192, 0.358)
pt3dadd(81.019, 82.416, 27.23, 0.332)
pt3dadd(81.13, 82.438, 27.257, 0.316)
pt3dadd(81.242, 82.478, 27.272, 0.306)
pt3dadd(81.354, 82.518, 27.288, 0.296)
pt3dadd(81.465, 82.558, 27.303, 0.286)
pt3dadd(81.577, 82.598, 27.318, 0.276)
pt3dadd(81.688, 82.639, 27.334, 0.266)
pt3dadd(81.8, 82.679, 27.349, 0.256)
pt3dadd(81.911, 82.719, 27.365, 0.246)
pt3dadd(82.023, 82.759, 27.38, 0.236)
pt3dadd(82.134, 82.799, 27.396, 0.226)
pt3dadd(82.241, 82.854, 27.398, 0.226)
pt3dadd(82.347, 82.911, 27.399, 0.226)
pt3dadd(82.453, 82.967, 27.4, 0.226)
pt3dadd(82.559, 83.023, 27.401, 0.226)
pt3dadd(82.664, 83.08, 27.402, 0.226)
pt3dadd(82.77, 83.136, 27.403, 0.226)
pt3dadd(82.876, 83.193, 27.404, 0.226)
pt3dadd(82.982, 83.249, 27.405, 0.226)
pt3dadd(83.088, 83.305, 27.406, 0.226)
pt3dadd(83.194, 83.362, 27.407, 0.226)
pt3dadd(83.31, 83.393, 27.409, 0.226)
pt3dadd(83.426, 83.424, 27.41, 0.226)
pt3dadd(83.542, 83.454, 27.412, 0.226)
pt3dadd(83.658, 83.485, 27.414, 0.226)
pt3dadd(83.774, 83.515, 27.415, 0.226)
pt3dadd(83.89, 83.546, 27.417, 0.226)
pt3dadd(84.006, 83.576, 27.418, 0.226)
pt3dadd(84.122, 83.607, 27.42, 0.226)
pt3dadd(84.238, 83.637, 27.422, 0.226)
pt3dadd(84.354, 83.667, 27.423, 0.226)
pt3dadd(84.473, 83.68, 27.426, 0.226)
pt3dadd(84.593, 83.691, 27.429, 0.226)
pt3dadd(84.712, 83.702, 27.432, 0.226)
pt3dadd(84.832, 83.714, 27.435, 0.226)
pt3dadd(84.951, 83.725, 27.438, 0.226)
pt3dadd(85.07, 83.737, 27.441, 0.226)
pt3dadd(85.19, 83.748, 27.444, 0.226)
pt3dadd(85.309, 83.759, 27.446, 0.226)
pt3dadd(85.429, 83.771, 27.449, 0.226)
pt3dadd(85.548, 83.782, 27.452, 0.226)
pt3dadd(85.668, 83.781, 27.459, 0.226)
pt3dadd(85.788, 83.779, 27.465, 0.226)
pt3dadd(85.907, 83.778, 27.472, 0.226)
pt3dadd(86.027, 83.776, 27.478, 0.226)
pt3dadd(86.147, 83.774, 27.485, 0.226)
pt3dadd(86.266, 83.772, 27.491, 0.226)
pt3dadd(86.386, 83.771, 27.498, 0.226)
pt3dadd(86.506, 83.769, 27.505, 0.226)
pt3dadd(86.626, 83.767, 27.511, 0.226)
pt3dadd(86.745, 83.766, 27.518, 0.226)
}
}
proc shape3d_136() {
dend_7[33] { pt3dadd(86.865, 83.758, 27.528, 0.226)
pt3dadd(86.984, 83.751, 27.538, 0.226)
pt3dadd(87.103, 83.743, 27.548, 0.226)
pt3dadd(87.222, 83.736, 27.559, 0.226)
pt3dadd(87.341, 83.728, 27.569, 0.226)
pt3dadd(87.46, 83.721, 27.579, 0.226)
pt3dadd(87.579, 83.713, 27.59, 0.226)
pt3dadd(87.698, 83.706, 27.6, 0.226)
pt3dadd(87.817, 83.698, 27.61, 0.226)
pt3dadd(87.937, 83.691, 27.621, 0.226)
pt3dadd(88.052, 83.679, 27.645, 0.226)
pt3dadd(88.168, 83.667, 27.67, 0.226)
pt3dadd(88.284, 83.655, 27.694, 0.226)
pt3dadd(88.399, 83.643, 27.719, 0.226)
pt3dadd(88.515, 83.631, 27.744, 0.226)
pt3dadd(88.631, 83.619, 27.768, 0.226)
pt3dadd(88.746, 83.607, 27.793, 0.226)
pt3dadd(88.862, 83.595, 27.818, 0.226)
pt3dadd(88.978, 83.583, 27.843, 0.226)
pt3dadd(89.093, 83.57, 27.868, 0.226)
pt3dadd(89.203, 83.549, 27.902, 0.23)
pt3dadd(89.314, 83.527, 27.937, 0.234)
pt3dadd(89.424, 83.505, 27.971, 0.238)
pt3dadd(89.535, 83.483, 28.006, 0.242)
pt3dadd(89.646, 83.462, 28.04, 0.246)
pt3dadd(89.756, 83.44, 28.075, 0.25)
pt3dadd(89.867, 83.418, 28.11, 0.252)
pt3dadd(89.977, 83.396, 28.144, 0.256)
pt3dadd(90.088, 83.375, 28.179, 0.26)
pt3dadd(90.198, 83.349, 28.211, 0.266)
pt3dadd(90.305, 83.303, 28.235, 0.284)
pt3dadd(90.412, 83.257, 28.258, 0.3)
pt3dadd(90.519, 83.21, 28.281, 0.318)
pt3dadd(90.626, 83.164, 28.304, 0.334)
pt3dadd(90.733, 83.117, 28.327, 0.352)
pt3dadd(90.84, 83.071, 28.351, 0.37)
pt3dadd(90.947, 83.025, 28.374, 0.386)
pt3dadd(91.054, 82.978, 28.397, 0.404)
pt3dadd(91.161, 82.932, 28.42, 0.42)
pt3dadd(91.269, 82.887, 28.442, 0.438)
pt3dadd(91.382, 82.849, 28.456, 0.456)
pt3dadd(91.495, 82.811, 28.47, 0.474)
pt3dadd(91.607, 82.773, 28.484, 0.492)
pt3dadd(91.72, 82.735, 28.498, 0.51)
pt3dadd(91.833, 82.698, 28.511, 0.528)
pt3dadd(91.945, 82.66, 28.525, 0.546)
pt3dadd(92.058, 82.622, 28.539, 0.564)
pt3dadd(92.171, 82.584, 28.553, 0.582)
pt3dadd(92.283, 82.546, 28.567, 0.6)
pt3dadd(92.397, 82.509, 28.58, 0.616)
pt3dadd(92.512, 82.478, 28.589, 0.61)
pt3dadd(92.627, 82.447, 28.597, 0.602)
pt3dadd(92.743, 82.415, 28.605, 0.596)
pt3dadd(92.858, 82.384, 28.614, 0.59)
pt3dadd(92.973, 82.352, 28.622, 0.584)
pt3dadd(93.089, 82.321, 28.631, 0.578)
pt3dadd(93.204, 82.29, 28.639, 0.572)
pt3dadd(93.319, 82.258, 28.648, 0.566)
pt3dadd(93.435, 82.227, 28.656, 0.56)
pt3dadd(93.55, 82.194, 28.664, 0.554)
pt3dadd(93.663, 82.157, 28.672, 0.544)
pt3dadd(93.777, 82.119, 28.68, 0.532)
pt3dadd(93.891, 82.082, 28.687, 0.522)
pt3dadd(94.004, 82.045, 28.695, 0.512)
pt3dadd(94.118, 82.007, 28.702, 0.502)
pt3dadd(94.232, 81.97, 28.71, 0.492)
pt3dadd(94.345, 81.932, 28.718, 0.48)
pt3dadd(94.459, 81.895, 28.725, 0.47)
pt3dadd(94.573, 81.857, 28.733, 0.46)
pt3dadd(94.686, 81.818, 28.742, 0.452)
pt3dadd(94.795, 81.772, 28.755, 0.448)
pt3dadd(94.905, 81.726, 28.768, 0.446)
pt3dadd(95.014, 81.679, 28.781, 0.444)
pt3dadd(95.124, 81.633, 28.794, 0.44)
pt3dadd(95.233, 81.587, 28.807, 0.438)
pt3dadd(95.343, 81.54, 28.82, 0.436)
pt3dadd(95.453, 81.494, 28.833, 0.432)
pt3dadd(95.562, 81.448, 28.846, 0.43)
pt3dadd(95.672, 81.401, 28.86, 0.426)
pt3dadd(95.781, 81.357, 28.878, 0.42)
pt3dadd(95.888, 81.321, 28.911, 0.404)
pt3dadd(95.995, 81.285, 28.944, 0.386)
pt3dadd(96.102, 81.249, 28.977, 0.368)
pt3dadd(96.21, 81.213, 29.01, 0.352)
pt3dadd(96.317, 81.176, 29.043, 0.334)
pt3dadd(96.424, 81.14, 29.077, 0.318)
pt3dadd(96.532, 81.104, 29.11, 0.3)
pt3dadd(96.639, 81.068, 29.143, 0.282)
pt3dadd(96.746, 81.031, 29.176, 0.266)
pt3dadd(96.855, 80.996, 29.205, 0.252)
pt3dadd(96.968, 80.964, 29.225, 0.25)
pt3dadd(97.082, 80.933, 29.244, 0.246)
pt3dadd(97.195, 80.901, 29.263, 0.244)
pt3dadd(97.308, 80.869, 29.282, 0.242)
pt3dadd(97.422, 80.837, 29.301, 0.238)
pt3dadd(97.535, 80.805, 29.32, 0.236)
pt3dadd(97.649, 80.774, 29.339, 0.234)
pt3dadd(97.762, 80.742, 29.358, 0.23)
pt3dadd(97.876, 80.71, 29.378, 0.228)
pt3dadd(97.988, 80.675, 29.393, 0.226)
pt3dadd(98.099, 80.63, 29.399, 0.226)
pt3dadd(98.21, 80.584, 29.405, 0.226)
pt3dadd(98.321, 80.539, 29.411, 0.226)
pt3dadd(98.432, 80.494, 29.416, 0.226)
pt3dadd(98.543, 80.449, 29.422, 0.226)
pt3dadd(98.654, 80.404, 29.428, 0.226)
pt3dadd(98.765, 80.358, 29.434, 0.226)
pt3dadd(98.876, 80.313, 29.439, 0.226)
pt3dadd(98.987, 80.268, 29.445, 0.226)
pt3dadd(99.097, 80.221, 29.445, 0.226)
pt3dadd(99.204, 80.169, 29.433, 0.226)
pt3dadd(99.311, 80.117, 29.422, 0.226)
pt3dadd(99.419, 80.066, 29.41, 0.226)
pt3dadd(99.526, 80.014, 29.399, 0.226)
pt3dadd(99.634, 79.962, 29.387, 0.226)
pt3dadd(99.741, 79.911, 29.376, 0.226)
pt3dadd(99.849, 79.859, 29.364, 0.226)
pt3dadd(99.956, 79.807, 29.352, 0.226)
pt3dadd(100.063, 79.756, 29.341, 0.226)
pt3dadd(100.169, 79.708, 29.317, 0.226)
pt3dadd(100.272, 79.663, 29.282, 0.226)
pt3dadd(100.374, 79.618, 29.246, 0.226)
pt3dadd(100.477, 79.574, 29.211, 0.226)
pt3dadd(100.58, 79.529, 29.175, 0.226)
pt3dadd(100.683, 79.485, 29.14, 0.226)
pt3dadd(100.786, 79.44, 29.104, 0.226)
pt3dadd(100.889, 79.395, 29.069, 0.226)
pt3dadd(100.992, 79.351, 29.033, 0.226)
pt3dadd(101.095, 79.306, 28.998, 0.226)
pt3dadd(101.196, 79.254, 28.968, 0.226)
pt3dadd(101.295, 79.193, 28.944, 0.226)
pt3dadd(101.395, 79.132, 28.92, 0.226)
pt3dadd(101.494, 79.071, 28.897, 0.226)
pt3dadd(101.593, 79.01, 28.873, 0.226)
pt3dadd(101.693, 78.949, 28.849, 0.226)
pt3dadd(101.792, 78.888, 28.826, 0.226)
pt3dadd(101.892, 78.827, 28.802, 0.226)
pt3dadd(101.991, 78.766, 28.778, 0.226)
pt3dadd(102.09, 78.705, 28.755, 0.226)
pt3dadd(102.189, 78.642, 28.733, 0.238)
pt3dadd(102.289, 78.579, 28.714, 0.262)
pt3dadd(102.388, 78.516, 28.695, 0.286)
pt3dadd(102.487, 78.452, 28.676, 0.31)
pt3dadd(102.587, 78.389, 28.657, 0.336)
pt3dadd(102.686, 78.325, 28.638, 0.36)
pt3dadd(102.785, 78.262, 28.619, 0.384)
pt3dadd(102.884, 78.198, 28.6, 0.408)
pt3dadd(102.984, 78.135, 28.581, 0.432)
pt3dadd(103.083, 78.071, 28.562, 0.456)
pt3dadd(103.183, 78.008, 28.545, 0.488)
pt3dadd(103.284, 77.946, 28.531, 0.526)
pt3dadd(103.385, 77.883, 28.516, 0.566)
pt3dadd(103.486, 77.821, 28.501, 0.604)
pt3dadd(103.587, 77.759, 28.486, 0.644)
pt3dadd(103.688, 77.696, 28.471, 0.682)
pt3dadd(103.788, 77.634, 28.456, 0.72)
pt3dadd(103.889, 77.571, 28.442, 0.76)
pt3dadd(103.99, 77.509, 28.427, 0.798)
pt3dadd(104.091, 77.446, 28.412, 0.838)
pt3dadd(104.198, 77.395, 28.399, 0.826)
pt3dadd(104.31, 77.355, 28.388, 0.772)
pt3dadd(104.422, 77.315, 28.376, 0.718)
pt3dadd(104.535, 77.274, 28.365, 0.664)
pt3dadd(104.647, 77.234, 28.354, 0.61)
pt3dadd(104.759, 77.194, 28.343, 0.556)
pt3dadd(104.871, 77.153, 28.331, 0.502)
pt3dadd(104.983, 77.113, 28.32, 0.448)
pt3dadd(105.096, 77.073, 28.309, 0.394)
pt3dadd(105.208, 77.032, 28.298, 0.34)
pt3dadd(105.32, 77.004, 28.275, 0.334)
pt3dadd(105.432, 76.987, 28.241, 0.37)
pt3dadd(105.543, 76.97, 28.208, 0.406)
pt3dadd(105.655, 76.952, 28.174, 0.442)
pt3dadd(105.767, 76.935, 28.141, 0.478)
pt3dadd(105.879, 76.918, 28.107, 0.514)
pt3dadd(105.99, 76.9, 28.074, 0.548)
pt3dadd(106.102, 76.883, 28.04, 0.584)
pt3dadd(106.214, 76.866, 28.007, 0.62)
pt3dadd(106.325, 76.848, 27.973, 0.656)
pt3dadd(106.439, 76.838, 27.941, 0.666)
pt3dadd(106.552, 76.832, 27.91, 0.658)
pt3dadd(106.666, 76.826, 27.879, 0.65)
pt3dadd(106.78, 76.82, 27.848, 0.642)
pt3dadd(106.894, 76.814, 27.817, 0.634)
pt3dadd(107.008, 76.808, 27.786, 0.626)
pt3dadd(107.122, 76.802, 27.755, 0.618)
pt3dadd(107.236, 76.796, 27.725, 0.61)
pt3dadd(107.35, 76.79, 27.694, 0.602)
pt3dadd(107.464, 76.784, 27.663, 0.594)
pt3dadd(107.58, 76.781, 27.638, 0.576)
pt3dadd(107.697, 76.78, 27.616, 0.554)
pt3dadd(107.814, 76.779, 27.594, 0.53)
pt3dadd(107.931, 76.778, 27.573, 0.506)
pt3dadd(108.049, 76.777, 27.551, 0.482)
pt3dadd(108.166, 76.776, 27.529, 0.46)
pt3dadd(108.283, 76.775, 27.507, 0.436)
pt3dadd(108.4, 76.773, 27.486, 0.412)
pt3dadd(108.517, 76.772, 27.464, 0.388)
pt3dadd(108.634, 76.771, 27.442, 0.366)
pt3dadd(108.753, 76.77, 27.426, 0.374)
}
}
proc shape3d_137() {
dend_7[33] { pt3dadd(108.871, 76.768, 27.412, 0.4)
pt3dadd(108.99, 76.766, 27.399, 0.426)
pt3dadd(109.109, 76.764, 27.385, 0.452)
pt3dadd(109.228, 76.762, 27.372, 0.478)
pt3dadd(109.347, 76.76, 27.358, 0.504)
pt3dadd(109.466, 76.758, 27.345, 0.53)
pt3dadd(109.585, 76.756, 27.331, 0.556)
pt3dadd(109.704, 76.754, 27.318, 0.582)
pt3dadd(109.822, 76.752, 27.304, 0.608)
pt3dadd(109.942, 76.749, 27.294, 0.592)
pt3dadd(110.061, 76.745, 27.286, 0.554)
pt3dadd(110.181, 76.742, 27.277, 0.516)
pt3dadd(110.3, 76.738, 27.269, 0.478)
pt3dadd(110.42, 76.735, 27.26, 0.438)
pt3dadd(110.539, 76.731, 27.252, 0.4)
pt3dadd(110.659, 76.728, 27.244, 0.362)
pt3dadd(110.778, 76.724, 27.235, 0.324)
pt3dadd(110.898, 76.721, 27.227, 0.286)
pt3dadd(111.017, 76.717, 27.218, 0.248)
pt3dadd(111.136, 76.71, 27.206, 0.246)
pt3dadd(111.255, 76.702, 27.192, 0.264)
pt3dadd(111.373, 76.693, 27.178, 0.282)
pt3dadd(111.492, 76.685, 27.163, 0.3)
pt3dadd(111.61, 76.677, 27.149, 0.318)
pt3dadd(111.729, 76.668, 27.135, 0.334)
pt3dadd(111.847, 76.66, 27.121, 0.352)
pt3dadd(111.966, 76.651, 27.107, 0.37)
pt3dadd(112.084, 76.643, 27.092, 0.388)
pt3dadd(112.203, 76.635, 27.078, 0.406)
pt3dadd(112.316, 76.624, 27.049, 0.414)
pt3dadd(112.427, 76.612, 27.012, 0.418)
pt3dadd(112.538, 76.6, 26.976, 0.422)
pt3dadd(112.649, 76.588, 26.939, 0.426)
pt3dadd(112.76, 76.576, 26.902, 0.43)
pt3dadd(112.871, 76.563, 26.865, 0.434)
pt3dadd(112.982, 76.551, 26.829, 0.438)
pt3dadd(113.093, 76.539, 26.792, 0.442)
pt3dadd(113.204, 76.527, 26.755, 0.448)
pt3dadd(113.315, 76.515, 26.719, 0.45)
pt3dadd(113.423, 76.492, 26.681, 0.458)
pt3dadd(113.531, 76.464, 26.644, 0.466)
pt3dadd(113.639, 76.436, 26.606, 0.474)
pt3dadd(113.746, 76.409, 26.568, 0.482)
pt3dadd(113.854, 76.381, 26.531, 0.492)
pt3dadd(113.962, 76.353, 26.493, 0.5)
pt3dadd(114.07, 76.326, 26.456, 0.508)
pt3dadd(114.177, 76.298, 26.418, 0.516)
pt3dadd(114.285, 76.271, 26.38, 0.524)
pt3dadd(114.393, 76.243, 26.343, 0.532)
pt3dadd(114.498, 76.204, 26.308, 0.548)
pt3dadd(114.604, 76.164, 26.274, 0.564)
pt3dadd(114.709, 76.123, 26.241, 0.582)
pt3dadd(114.815, 76.082, 26.207, 0.598)
pt3dadd(114.92, 76.042, 26.173, 0.616)
pt3dadd(115.025, 76.001, 26.139, 0.632)
pt3dadd(115.131, 75.96, 26.106, 0.65)
pt3dadd(115.236, 75.92, 26.072, 0.666)
pt3dadd(115.341, 75.879, 26.038, 0.682)
pt3dadd(115.447, 75.838, 26.004, 0.7)
pt3dadd(115.551, 75.809, 25.961, 0.716)
pt3dadd(115.655, 75.782, 25.917, 0.734)
pt3dadd(115.759, 75.754, 25.873, 0.75)
pt3dadd(115.863, 75.727, 25.828, 0.766)
pt3dadd(115.967, 75.7, 25.784, 0.784)
pt3dadd(116.071, 75.672, 25.74, 0.8)
pt3dadd(116.175, 75.645, 25.695, 0.816)
pt3dadd(116.279, 75.618, 25.651, 0.834)
pt3dadd(116.383, 75.591, 25.607, 0.85)
pt3dadd(116.487, 75.564, 25.562, 0.866)
pt3dadd(116.599, 75.543, 25.532, 0.848)
pt3dadd(116.713, 75.525, 25.503, 0.822)
pt3dadd(116.827, 75.506, 25.475, 0.796)
pt3dadd(116.94, 75.487, 25.447, 0.77)
pt3dadd(117.054, 75.469, 25.419, 0.744)
pt3dadd(117.167, 75.45, 25.391, 0.718)
pt3dadd(117.281, 75.431, 25.362, 0.692)
pt3dadd(117.395, 75.413, 25.334, 0.666)
pt3dadd(117.508, 75.394, 25.306, 0.64)
pt3dadd(117.622, 75.375, 25.278, 0.614)
pt3dadd(117.739, 75.362, 25.26, 0.606)
pt3dadd(117.857, 75.35, 25.244, 0.602)
pt3dadd(117.975, 75.338, 25.227, 0.596)
pt3dadd(118.092, 75.326, 25.211, 0.592)
pt3dadd(118.21, 75.314, 25.194, 0.586)
pt3dadd(118.328, 75.302, 25.178, 0.582)
pt3dadd(118.446, 75.29, 25.161, 0.576)
pt3dadd(118.563, 75.278, 25.145, 0.572)
pt3dadd(118.681, 75.266, 25.128, 0.566)
pt3dadd(118.799, 75.254, 25.112, 0.562)
pt3dadd(118.918, 75.242, 25.104, 0.558)
pt3dadd(119.037, 75.231, 25.098, 0.556)
pt3dadd(119.156, 75.22, 25.091, 0.552)
pt3dadd(119.275, 75.209, 25.084, 0.548)
pt3dadd(119.395, 75.198, 25.077, 0.546)
pt3dadd(119.514, 75.186, 25.071, 0.542)
pt3dadd(119.633, 75.175, 25.064, 0.54)
pt3dadd(119.752, 75.164, 25.057, 0.536)
pt3dadd(119.871, 75.153, 25.051, 0.534)
pt3dadd(119.991, 75.142, 25.044, 0.53)
pt3dadd(120.109, 75.121, 25.044, 0.504)
pt3dadd(120.227, 75.099, 25.044, 0.478)
pt3dadd(120.344, 75.078, 25.044, 0.45)
pt3dadd(120.463, 75.057, 25.044, 0.424)
pt3dadd(120.581, 75.035, 25.044, 0.396)
pt3dadd(120.7, 75.014, 25.044, 0.37)
pt3dadd(120.817, 74.992, 25.044, 0.344)
pt3dadd(120.935, 74.971, 25.044, 0.316)
pt3dadd(121.054, 74.949, 25.044, 0.29)
pt3dadd(121.171, 74.928, 25.044, 0.262)
pt3dadd(121.282, 74.881, 25.044, 0.28)
pt3dadd(121.393, 74.835, 25.045, 0.298)
pt3dadd(121.504, 74.788, 25.045, 0.316)
pt3dadd(121.614, 74.742, 25.045, 0.334)
pt3dadd(121.724, 74.696, 25.045, 0.352)
pt3dadd(121.835, 74.649, 25.045, 0.37)
pt3dadd(121.946, 74.603, 25.045, 0.386)
pt3dadd(122.057, 74.556, 25.045, 0.404)
pt3dadd(122.167, 74.51, 25.045, 0.422)
pt3dadd(122.278, 74.463, 25.045, 0.44)
pt3dadd(122.393, 74.43, 25.046, 0.458)
pt3dadd(122.508, 74.396, 25.046, 0.478)
pt3dadd(122.623, 74.362, 25.046, 0.496)
pt3dadd(122.738, 74.328, 25.047, 0.514)
pt3dadd(122.854, 74.294, 25.047, 0.532)
pt3dadd(122.969, 74.26, 25.047, 0.552)
pt3dadd(123.084, 74.227, 25.048, 0.57)
pt3dadd(123.199, 74.193, 25.048, 0.588)
pt3dadd(123.314, 74.159, 25.048, 0.608)
pt3dadd(123.43, 74.125, 25.048, 0.626)
pt3dadd(123.546, 74.099, 25.049, 0.644)
pt3dadd(123.664, 74.072, 25.049, 0.664)
pt3dadd(123.78, 74.046, 25.05, 0.682)
pt3dadd(123.898, 74.02, 25.05, 0.702)
pt3dadd(124.014, 73.993, 25.051, 0.72)
pt3dadd(124.132, 73.967, 25.052, 0.738)
pt3dadd(124.249, 73.94, 25.052, 0.758)
pt3dadd(124.366, 73.914, 25.052, 0.776)
pt3dadd(124.483, 73.887, 25.053, 0.796)
pt3dadd(124.6, 73.861, 25.054, 0.814)
pt3dadd(124.718, 73.84, 25.055, 0.792)
pt3dadd(124.836, 73.819, 25.056, 0.77)
pt3dadd(124.954, 73.797, 25.057, 0.748)
pt3dadd(125.072, 73.776, 25.058, 0.728)
pt3dadd(125.19, 73.755, 25.059, 0.706)
pt3dadd(125.309, 73.734, 25.06, 0.684)
pt3dadd(125.426, 73.712, 25.061, 0.662)
pt3dadd(125.545, 73.691, 25.062, 0.642)
pt3dadd(125.663, 73.67, 25.063, 0.62)
pt3dadd(125.78, 73.648, 25.064, 0.598)
pt3dadd(125.897, 73.616, 25.066, 0.566)
pt3dadd(126.012, 73.584, 25.068, 0.536)
pt3dadd(126.127, 73.552, 25.07, 0.504)
pt3dadd(126.244, 73.52, 25.071, 0.472)
pt3dadd(126.359, 73.488, 25.073, 0.442)
pt3dadd(126.474, 73.456, 25.075, 0.41)
pt3dadd(126.59, 73.424, 25.077, 0.38)
pt3dadd(126.706, 73.392, 25.079, 0.348)
pt3dadd(126.821, 73.359, 25.081, 0.316)
pt3dadd(126.936, 73.324, 25.083, 0.292)
pt3dadd(127.043, 73.27, 25.086, 0.308)
pt3dadd(127.15, 73.216, 25.089, 0.324)
pt3dadd(127.256, 73.161, 25.092, 0.34)
pt3dadd(127.363, 73.107, 25.095, 0.356)
pt3dadd(127.47, 73.053, 25.098, 0.372)
pt3dadd(127.577, 72.998, 25.101, 0.39)
pt3dadd(127.684, 72.944, 25.104, 0.406)
pt3dadd(127.79, 72.889, 25.107, 0.422)
pt3dadd(127.898, 72.835, 25.11, 0.438)
pt3dadd(128.005, 72.781, 25.113, 0.452)
pt3dadd(128.113, 72.731, 25.12, 0.452)
pt3dadd(128.222, 72.681, 25.127, 0.452)
pt3dadd(128.332, 72.631, 25.134, 0.452)
pt3dadd(128.44, 72.58, 25.141, 0.452)
pt3dadd(128.549, 72.53, 25.148, 0.452)
pt3dadd(128.657, 72.48, 25.155, 0.452)
pt3dadd(128.766, 72.43, 25.162, 0.452)
pt3dadd(128.874, 72.38, 25.169, 0.452)
pt3dadd(128.983, 72.33, 25.176, 0.452)
pt3dadd(129.09, 72.277, 25.183, 0.45)
pt3dadd(129.19, 72.21, 25.194, 0.434)
pt3dadd(129.288, 72.143, 25.204, 0.418)
pt3dadd(129.386, 72.076, 25.215, 0.402)
pt3dadd(129.486, 72.009, 25.226, 0.384)
pt3dadd(129.584, 71.942, 25.236, 0.368)
pt3dadd(129.683, 71.875, 25.247, 0.352)
pt3dadd(129.782, 71.808, 25.257, 0.336)
pt3dadd(129.881, 71.741, 25.268, 0.32)
pt3dadd(129.979, 71.674, 25.278, 0.304)
pt3dadd(130.075, 71.606, 25.292, 0.29)
pt3dadd(130.158, 71.528, 25.325, 0.282)
pt3dadd(130.241, 71.451, 25.358, 0.276)
pt3dadd(130.324, 71.373, 25.391, 0.27)
pt3dadd(130.406, 71.296, 25.424, 0.262)
pt3dadd(130.489, 71.218, 25.457, 0.256)
pt3dadd(130.572, 71.141, 25.49, 0.25)
pt3dadd(130.654, 71.063, 25.523, 0.244)
pt3dadd(130.736, 70.986, 25.556, 0.236)
pt3dadd(130.819, 70.908, 25.589, 0.23)
pt3dadd(130.906, 70.837, 25.624, 0.226)
pt3dadd(130.999, 70.778, 25.663, 0.226)
}
}
proc shape3d_138() {
dend_7[33] { pt3dadd(131.093, 70.719, 25.702, 0.226)
pt3dadd(131.186, 70.66, 25.741, 0.226)
pt3dadd(131.28, 70.601, 25.78, 0.226)
pt3dadd(131.374, 70.542, 25.819, 0.226)
pt3dadd(131.466, 70.483, 25.858, 0.226)
pt3dadd(131.56, 70.425, 25.897, 0.226)
pt3dadd(131.653, 70.365, 25.936, 0.226)
pt3dadd(131.747, 70.307, 25.975, 0.226)
pt3dadd(131.854, 70.277, 26.005, 0.226)
pt3dadd(131.97, 70.27, 26.027, 0.226)
pt3dadd(132.088, 70.263, 26.048, 0.226)
pt3dadd(132.204, 70.257, 26.07, 0.226)
pt3dadd(132.322, 70.25, 26.092, 0.226)
pt3dadd(132.438, 70.243, 26.114, 0.226)
pt3dadd(132.554, 70.236, 26.136, 0.226)
pt3dadd(132.672, 70.229, 26.158, 0.226)
pt3dadd(132.788, 70.223, 26.18, 0.226)
pt3dadd(132.906, 70.216, 26.202, 0.226)
pt3dadd(132.988, 70.289, 26.208, 0.226)
pt3dadd(133.058, 70.385, 26.209, 0.226)
pt3dadd(133.129, 70.482, 26.21, 0.226)
pt3dadd(133.201, 70.578, 26.211, 0.226)
pt3dadd(133.272, 70.675, 26.212, 0.226)
pt3dadd(133.344, 70.771, 26.213, 0.226)
pt3dadd(133.415, 70.868, 26.214, 0.226)
pt3dadd(133.486, 70.965, 26.215, 0.226)
pt3dadd(133.558, 71.061, 26.216, 0.226)
pt3dadd(133.628, 71.158, 26.217, 0.226)
}
dend_7[34] {pt3dclear()
pt3dadd(54.486, 90.584, 23.868, 0.716)
pt3dadd(54.516, 90.579, 23.956, 0.718)
pt3dadd(54.548, 90.572, 24.052, 0.722)
pt3dadd(54.581, 90.566, 24.148, 0.726)
pt3dadd(54.613, 90.56, 24.244, 0.728)
}
dend_7[35] {pt3dclear()
pt3dadd(54.613, 90.56, 24.244, 0.728)
pt3dadd(54.61, 90.569, 24.302, 0.716)
pt3dadd(54.605, 90.585, 24.401, 0.698)
pt3dadd(54.6, 90.6, 24.5, 0.678)
}
dend_7[36] {pt3dclear()
pt3dadd(54.613, 90.56, 24.244, 0.728)
pt3dadd(54.619, 90.558, 24.243, 0.726)
pt3dadd(54.73, 90.519, 24.222, 0.702)
pt3dadd(54.84, 90.48, 24.2, 0.678)
pt3dadd(54.96, 90.48, 24.2, 0.67)
pt3dadd(55.08, 90.48, 24.2, 0.662)
pt3dadd(55.2, 90.48, 24.2, 0.652)
pt3dadd(55.32, 90.475, 24.2, 0.67)
pt3dadd(55.44, 90.471, 24.2, 0.688)
pt3dadd(55.559, 90.462, 24.2, 0.708)
pt3dadd(55.671, 90.419, 24.2, 0.758)
pt3dadd(55.781, 90.371, 24.2, 0.778)
pt3dadd(55.89, 90.321, 24.2, 0.778)
pt3dadd(55.999, 90.27, 24.2, 0.778)
pt3dadd(56.108, 90.219, 24.2, 0.778)
pt3dadd(56.217, 90.169, 24.2, 0.778)
pt3dadd(56.325, 90.118, 24.202, 0.774)
pt3dadd(56.434, 90.068, 24.209, 0.758)
pt3dadd(56.543, 90.018, 24.215, 0.744)
pt3dadd(56.651, 89.967, 24.222, 0.73)
pt3dadd(56.76, 89.917, 24.228, 0.714)
pt3dadd(56.865, 89.862, 24.237, 0.698)
pt3dadd(56.961, 89.792, 24.252, 0.682)
pt3dadd(57.057, 89.722, 24.266, 0.666)
pt3dadd(57.153, 89.652, 24.281, 0.65)
pt3dadd(57.249, 89.582, 24.295, 0.634)
pt3dadd(57.36, 89.547, 24.3, 0.628)
pt3dadd(57.479, 89.527, 24.3, 0.628)
pt3dadd(57.597, 89.507, 24.3, 0.628)
pt3dadd(57.716, 89.487, 24.3, 0.628)
pt3dadd(57.834, 89.468, 24.3, 0.628)
pt3dadd(57.952, 89.448, 24.3, 0.628)
pt3dadd(58.07, 89.425, 24.3, 0.634)
pt3dadd(58.188, 89.4, 24.3, 0.642)
pt3dadd(58.305, 89.375, 24.3, 0.65)
pt3dadd(58.422, 89.351, 24.3, 0.658)
pt3dadd(58.54, 89.326, 24.3, 0.666)
pt3dadd(58.657, 89.301, 24.3, 0.676)
pt3dadd(58.775, 89.292, 24.31, 0.684)
pt3dadd(58.894, 89.29, 24.325, 0.692)
pt3dadd(59.013, 89.287, 24.34, 0.7)
pt3dadd(59.132, 89.285, 24.354, 0.708)
pt3dadd(59.25, 89.283, 24.369, 0.716)
pt3dadd(59.369, 89.281, 24.383, 0.726)
pt3dadd(59.487, 89.276, 24.401, 0.734)
pt3dadd(59.604, 89.269, 24.421, 0.742)
pt3dadd(59.722, 89.262, 24.44, 0.752)
pt3dadd(59.839, 89.254, 24.46, 0.76)
pt3dadd(59.957, 89.247, 24.479, 0.77)
pt3dadd(60.074, 89.24, 24.499, 0.778)
pt3dadd(60.188, 89.21, 24.517, 0.792)
pt3dadd(60.302, 89.178, 24.534, 0.808)
pt3dadd(60.416, 89.146, 24.552, 0.822)
pt3dadd(60.529, 89.115, 24.57, 0.838)
pt3dadd(60.643, 89.083, 24.587, 0.852)
pt3dadd(60.762, 89.074, 24.59, 0.868)
pt3dadd(60.882, 89.068, 24.592, 0.882)
pt3dadd(61.002, 89.062, 24.594, 0.898)
pt3dadd(61.122, 89.056, 24.596, 0.914)
pt3dadd(61.242, 89.05, 24.597, 0.928)
pt3dadd(61.362, 89.044, 24.599, 0.944)
pt3dadd(61.481, 89.04, 24.604, 0.956)
pt3dadd(61.601, 89.04, 24.614, 0.964)
pt3dadd(61.72, 89.04, 24.625, 0.972)
pt3dadd(61.839, 89.04, 24.635, 0.98)
pt3dadd(61.959, 89.04, 24.646, 0.988)
pt3dadd(62.078, 89.04, 24.656, 0.996)
pt3dadd(62.197, 89.04, 24.667, 1.004)
pt3dadd(62.31, 89.016, 24.693, 0.994)
pt3dadd(62.423, 88.992, 24.72, 0.984)
pt3dadd(62.536, 88.968, 24.747, 0.974)
pt3dadd(62.649, 88.944, 24.774, 0.964)
pt3dadd(62.763, 88.92, 24.801, 0.954)
pt3dadd(62.877, 88.917, 24.831, 0.94)
pt3dadd(62.991, 88.915, 24.861, 0.926)
pt3dadd(63.105, 88.913, 24.892, 0.912)
pt3dadd(63.22, 88.91, 24.922, 0.9)
pt3dadd(63.334, 88.908, 24.953, 0.886)
pt3dadd(63.45, 88.897, 24.97, 0.876)
pt3dadd(63.569, 88.879, 24.976, 0.872)
pt3dadd(63.687, 88.86, 24.981, 0.868)
pt3dadd(63.806, 88.842, 24.987, 0.864)
pt3dadd(63.924, 88.824, 24.993, 0.86)
pt3dadd(64.043, 88.806, 24.998, 0.856)
pt3dadd(64.151, 88.798, 25.035, 0.854)
pt3dadd(64.254, 88.796, 25.086, 0.854)
pt3dadd(64.357, 88.793, 25.136, 0.854)
pt3dadd(64.461, 88.79, 25.187, 0.854)
pt3dadd(64.564, 88.788, 25.238, 0.854)
pt3dadd(64.659, 88.771, 25.297, 0.854)
pt3dadd(64.749, 88.747, 25.359, 0.854)
pt3dadd(64.839, 88.723, 25.422, 0.854)
pt3dadd(64.93, 88.699, 25.485, 0.854)
pt3dadd(65.025, 88.68, 25.542, 0.854)
pt3dadd(65.136, 88.68, 25.579, 0.854)
pt3dadd(65.248, 88.68, 25.616, 0.854)
pt3dadd(65.359, 88.68, 25.653, 0.854)
pt3dadd(65.471, 88.68, 25.69, 0.854)
pt3dadd(65.582, 88.68, 25.727, 0.854)
pt3dadd(65.695, 88.68, 25.76, 0.862)
pt3dadd(65.809, 88.68, 25.792, 0.87)
pt3dadd(65.922, 88.68, 25.825, 0.88)
pt3dadd(66.036, 88.68, 25.857, 0.888)
pt3dadd(66.15, 88.68, 25.889, 0.898)
pt3dadd(66.263, 88.68, 25.922, 0.91)
pt3dadd(66.376, 88.68, 25.955, 0.932)
pt3dadd(66.49, 88.68, 25.988, 0.954)
pt3dadd(66.589, 88.68, 26.044, 0.954)
pt3dadd(66.688, 88.68, 26.1, 0.954)
pt3dadd(66.75, 88.664, 26.183, 0.944)
pt3dadd(66.803, 88.644, 26.271, 0.932)
pt3dadd(66.874, 88.598, 26.339, 0.918)
pt3dadd(66.95, 88.545, 26.403, 0.904)
pt3dadd(67.022, 88.495, 26.471, 0.896)
pt3dadd(67.095, 88.445, 26.539, 0.886)
pt3dadd(67.171, 88.395, 26.6, 0.876)
pt3dadd(67.278, 88.341, 26.6, 0.854)
pt3dadd(67.386, 88.287, 26.6, 0.832)
pt3dadd(67.494, 88.237, 26.6, 0.752)
pt3dadd(67.611, 88.209, 26.6, 0.748)
pt3dadd(67.728, 88.182, 26.6, 0.744)
pt3dadd(67.844, 88.154, 26.6, 0.74)
pt3dadd(67.961, 88.127, 26.6, 0.736)
pt3dadd(68.078, 88.099, 26.6, 0.732)
pt3dadd(68.193, 88.067, 26.6, 0.73)
pt3dadd(68.305, 88.022, 26.6, 0.734)
pt3dadd(68.416, 87.978, 26.6, 0.738)
pt3dadd(68.527, 87.933, 26.6, 0.744)
pt3dadd(68.639, 87.888, 26.6, 0.748)
pt3dadd(68.75, 87.844, 26.6, 0.752)
pt3dadd(68.85, 87.777, 26.6, 0.762)
pt3dadd(68.948, 87.708, 26.6, 0.772)
pt3dadd(69.046, 87.639, 26.6, 0.782)
pt3dadd(69.144, 87.57, 26.6, 0.792)
pt3dadd(69.242, 87.501, 26.6, 0.802)
pt3dadd(69.358, 87.474, 26.6, 0.808)
pt3dadd(69.476, 87.451, 26.6, 0.812)
pt3dadd(69.594, 87.429, 26.6, 0.816)
pt3dadd(69.712, 87.407, 26.6, 0.82)
pt3dadd(69.83, 87.385, 26.6, 0.824)
pt3dadd(69.948, 87.362, 26.6, 0.828)
pt3dadd(70.055, 87.339, 26.638, 0.828)
pt3dadd(70.161, 87.317, 26.681, 0.828)
pt3dadd(70.267, 87.294, 26.724, 0.828)
pt3dadd(70.373, 87.271, 26.767, 0.828)
pt3dadd(70.482, 87.252, 26.8, 0.828)
pt3dadd(70.602, 87.248, 26.8, 0.828)
pt3dadd(70.722, 87.243, 26.8, 0.828)
pt3dadd(70.841, 87.24, 26.804, 0.826)
pt3dadd(70.96, 87.24, 26.817, 0.816)
pt3dadd(71.079, 87.24, 26.829, 0.806)
pt3dadd(71.175, 87.195, 26.862, 0.784)
pt3dadd(71.258, 87.127, 26.906, 0.756)
pt3dadd(71.341, 87.059, 26.951, 0.714)
pt3dadd(71.429, 86.997, 26.99, 0.672)
pt3dadd(71.546, 86.972, 26.997, 0.624)
pt3dadd(71.645, 86.931, 27.031, 0.588)
pt3dadd(71.728, 86.878, 27.087, 0.558)
pt3dadd(71.775, 86.793, 27.142, 0.552)
pt3dadd(71.811, 86.699, 27.197, 0.552)
pt3dadd(71.923, 86.673, 27.204, 0.572)
pt3dadd(72.041, 86.652, 27.209, 0.592)
pt3dadd(72.151, 86.621, 27.23, 0.626)
}
}
proc shape3d_139() {
dend_7[36] { pt3dadd(72.252, 86.578, 27.272, 0.68)
pt3dadd(72.362, 86.545, 27.293, 0.75)
pt3dadd(72.479, 86.52, 27.3, 0.828)
pt3dadd(72.597, 86.498, 27.3, 0.854)
pt3dadd(72.714, 86.476, 27.3, 0.878)
pt3dadd(72.832, 86.454, 27.3, 0.904)
pt3dadd(72.95, 86.431, 27.3, 0.928)
pt3dadd(73.068, 86.409, 27.3, 0.954)
pt3dadd(73.186, 86.387, 27.3, 0.98)
pt3dadd(73.296, 86.34, 27.314, 0.99)
pt3dadd(73.405, 86.294, 27.327, 1)
pt3dadd(73.514, 86.247, 27.341, 1.01)
pt3dadd(73.624, 86.201, 27.355, 1.02)
pt3dadd(73.732, 86.155, 27.372, 1.028)
pt3dadd(73.832, 86.119, 27.418, 1.024)
pt3dadd(73.933, 86.083, 27.464, 1.018)
pt3dadd(74.033, 86.046, 27.509, 1.012)
pt3dadd(74.134, 86.01, 27.555, 1.006)
pt3dadd(74.248, 85.99, 27.572, 0.988)
pt3dadd(74.367, 85.977, 27.58, 0.968)
pt3dadd(74.485, 85.963, 27.587, 0.946)
pt3dadd(74.604, 85.95, 27.595, 0.926)
pt3dadd(74.723, 85.936, 27.602, 0.904)
pt3dadd(74.842, 85.923, 27.61, 0.884)
pt3dadd(74.952, 85.902, 27.643, 0.866)
pt3dadd(75.06, 85.879, 27.683, 0.85)
pt3dadd(75.167, 85.857, 27.723, 0.834)
pt3dadd(75.275, 85.834, 27.763, 0.818)
pt3dadd(75.383, 85.811, 27.802, 0.802)
pt3dadd(75.497, 85.782, 27.821, 0.792)
pt3dadd(75.611, 85.753, 27.841, 0.782)
pt3dadd(75.725, 85.723, 27.861, 0.772)
pt3dadd(75.839, 85.694, 27.881, 0.762)
pt3dadd(75.952, 85.664, 27.9, 0.754)
pt3dadd(76.055, 85.603, 27.902, 0.764)
pt3dadd(76.159, 85.542, 27.905, 0.774)
pt3dadd(76.262, 85.481, 27.907, 0.784)
pt3dadd(76.365, 85.42, 27.909, 0.794)
pt3dadd(76.468, 85.358, 27.912, 0.804)
pt3dadd(76.544, 85.27, 27.934, 0.828)
pt3dadd(76.621, 85.181, 27.957, 0.85)
pt3dadd(76.697, 85.093, 27.98, 0.874)
pt3dadd(76.773, 85.004, 28.003, 0.896)
pt3dadd(76.855, 84.92, 28.024, 0.918)
pt3dadd(76.94, 84.839, 28.044, 0.942)
pt3dadd(77.024, 84.757, 28.064, 0.964)
pt3dadd(77.109, 84.675, 28.085, 0.986)
pt3dadd(77.197, 84.599, 28.105, 1.004)
pt3dadd(77.298, 84.54, 28.127, 1.004)
pt3dadd(77.399, 84.481, 28.15, 1.004)
pt3dadd(77.5, 84.421, 28.172, 1.004)
pt3dadd(77.601, 84.362, 28.194, 1.004)
pt3dadd(77.695, 84.291, 28.205, 0.988)
pt3dadd(77.788, 84.215, 28.212, 0.968)
pt3dadd(77.881, 84.139, 28.219, 0.946)
pt3dadd(77.973, 84.063, 28.226, 0.926)
pt3dadd(78.066, 83.988, 28.233, 0.904)
pt3dadd(78.169, 83.928, 28.247, 0.878)
pt3dadd(78.271, 83.868, 28.262, 0.85)
pt3dadd(78.374, 83.808, 28.276, 0.824)
pt3dadd(78.476, 83.748, 28.29, 0.796)
pt3dadd(78.565, 83.676, 28.309, 0.772)
pt3dadd(78.624, 83.578, 28.34, 0.756)
pt3dadd(78.682, 83.48, 28.371, 0.738)
pt3dadd(78.74, 83.382, 28.402, 0.72)
pt3dadd(78.798, 83.283, 28.432, 0.704)
pt3dadd(78.869, 83.199, 28.472, 0.704)
pt3dadd(78.94, 83.115, 28.513, 0.704)
pt3dadd(79.011, 83.031, 28.553, 0.704)
pt3dadd(79.081, 82.947, 28.593, 0.704)
pt3dadd(79.176, 82.877, 28.602, 0.716)
pt3dadd(79.275, 82.81, 28.604, 0.73)
pt3dadd(79.375, 82.743, 28.606, 0.746)
pt3dadd(79.474, 82.676, 28.609, 0.762)
pt3dadd(79.574, 82.609, 28.611, 0.776)
pt3dadd(79.679, 82.555, 28.628, 0.802)
pt3dadd(79.785, 82.503, 28.647, 0.828)
pt3dadd(79.89, 82.452, 28.666, 0.856)
pt3dadd(79.996, 82.4, 28.685, 0.882)
pt3dadd(80.1, 82.344, 28.7, 0.91)
pt3dadd(80.193, 82.269, 28.7, 0.934)
pt3dadd(80.287, 82.194, 28.7, 0.96)
pt3dadd(80.381, 82.119, 28.7, 0.986)
pt3dadd(80.475, 82.044, 28.7, 1.01)
pt3dadd(80.571, 81.972, 28.7, 1.038)
pt3dadd(80.674, 81.912, 28.7, 1.072)
pt3dadd(80.778, 81.853, 28.701, 1.104)
pt3dadd(80.897, 81.842, 28.714, 1.094)
pt3dadd(81.015, 81.831, 28.727, 1.084)
pt3dadd(81.083, 81.783, 28.773, 1.058)
pt3dadd(81.111, 81.704, 28.845, 1.016)
pt3dadd(81.152, 81.604, 28.878, 0.962)
pt3dadd(81.197, 81.494, 28.894, 0.902)
pt3dadd(81.281, 81.42, 28.9, 0.858)
pt3dadd(81.382, 81.362, 28.906, 0.828)
pt3dadd(81.447, 81.277, 28.952, 0.822)
pt3dadd(81.512, 81.193, 28.998, 0.816)
pt3dadd(81.577, 81.108, 29.045, 0.81)
pt3dadd(81.643, 81.024, 29.089, 0.804)
pt3dadd(81.738, 80.951, 29.091, 0.808)
pt3dadd(81.833, 80.878, 29.094, 0.814)
pt3dadd(81.928, 80.804, 29.096, 0.82)
pt3dadd(82.023, 80.731, 29.098, 0.824)
pt3dadd(82.116, 80.655, 29.1, 0.828)
pt3dadd(82.19, 80.562, 29.1, 0.828)
pt3dadd(82.265, 80.468, 29.1, 0.828)
pt3dadd(82.34, 80.374, 29.1, 0.828)
pt3dadd(82.415, 80.28, 29.1, 0.828)
pt3dadd(82.493, 80.189, 29.1, 0.828)
pt3dadd(82.587, 80.114, 29.1, 0.818)
pt3dadd(82.68, 80.04, 29.1, 0.808)
pt3dadd(82.774, 79.965, 29.1, 0.796)
pt3dadd(82.868, 79.89, 29.1, 0.786)
pt3dadd(82.964, 79.818, 29.1, 0.776)
pt3dadd(83.071, 79.764, 29.1, 0.768)
pt3dadd(83.178, 79.711, 29.1, 0.758)
pt3dadd(83.286, 79.657, 29.1, 0.748)
pt3dadd(83.393, 79.604, 29.1, 0.738)
pt3dadd(83.5, 79.55, 29.1, 0.728)
pt3dadd(83.572, 79.454, 29.1, 0.71)
pt3dadd(83.641, 79.356, 29.1, 0.69)
pt3dadd(83.71, 79.258, 29.1, 0.67)
pt3dadd(83.779, 79.16, 29.1, 0.65)
pt3dadd(83.848, 79.062, 29.1, 0.63)
pt3dadd(83.952, 79.004, 29.1, 0.624)
pt3dadd(84.059, 78.95, 29.1, 0.618)
pt3dadd(84.166, 78.897, 29.1, 0.614)
pt3dadd(84.274, 78.843, 29.1, 0.61)
pt3dadd(84.381, 78.789, 29.1, 0.604)
pt3dadd(84.469, 78.713, 29.084, 0.598)
pt3dadd(84.548, 78.627, 29.061, 0.594)
pt3dadd(84.628, 78.542, 29.038, 0.588)
pt3dadd(84.707, 78.456, 29.015, 0.582)
pt3dadd(84.795, 78.381, 28.998, 0.582)
pt3dadd(84.901, 78.324, 28.991, 0.592)
pt3dadd(85.006, 78.267, 28.984, 0.602)
pt3dadd(85.112, 78.211, 28.977, 0.612)
pt3dadd(85.217, 78.154, 28.971, 0.622)
pt3dadd(85.324, 78.11, 28.953, 0.632)
pt3dadd(85.434, 78.085, 28.917, 0.642)
pt3dadd(85.543, 78.059, 28.882, 0.654)
pt3dadd(85.653, 78.034, 28.847, 0.664)
pt3dadd(85.762, 78.009, 28.812, 0.674)
pt3dadd(85.875, 77.976, 28.8, 0.686)
pt3dadd(85.99, 77.941, 28.8, 0.7)
pt3dadd(86.104, 77.905, 28.8, 0.714)
pt3dadd(86.219, 77.869, 28.8, 0.728)
pt3dadd(86.333, 77.833, 28.8, 0.74)
pt3dadd(86.447, 77.796, 28.8, 0.754)
pt3dadd(86.556, 77.746, 28.8, 0.768)
pt3dadd(86.665, 77.695, 28.8, 0.782)
pt3dadd(86.774, 77.645, 28.8, 0.798)
pt3dadd(86.883, 77.594, 28.8, 0.812)
pt3dadd(86.991, 77.543, 28.8, 0.826)
pt3dadd(87.089, 77.475, 28.802, 0.836)
pt3dadd(87.184, 77.401, 28.804, 0.848)
pt3dadd(87.279, 77.328, 28.806, 0.858)
pt3dadd(87.374, 77.255, 28.809, 0.868)
pt3dadd(87.469, 77.182, 28.811, 0.878)
pt3dadd(87.557, 77.119, 28.852, 0.884)
pt3dadd(87.645, 77.058, 28.898, 0.89)
pt3dadd(87.732, 76.996, 28.943, 0.896)
pt3dadd(87.819, 76.935, 28.989, 0.902)
pt3dadd(87.926, 76.902, 29.02, 0.908)
pt3dadd(88.039, 76.877, 29.047, 0.912)
pt3dadd(88.152, 76.853, 29.074, 0.918)
pt3dadd(88.265, 76.829, 29.101, 0.922)
pt3dadd(88.378, 76.805, 29.128, 0.928)
pt3dadd(88.494, 76.782, 29.145, 0.936)
pt3dadd(88.611, 76.76, 29.159, 0.946)
pt3dadd(88.727, 76.737, 29.174, 0.956)
pt3dadd(88.844, 76.715, 29.188, 0.964)
pt3dadd(88.96, 76.693, 29.203, 0.974)
pt3dadd(89.075, 76.68, 29.226, 0.986)
pt3dadd(89.188, 76.68, 29.261, 1)
pt3dadd(89.3, 76.68, 29.295, 1.012)
pt3dadd(89.413, 76.68, 29.33, 1.026)
pt3dadd(89.525, 76.68, 29.365, 1.04)
pt3dadd(89.638, 76.68, 29.399, 1.054)
pt3dadd(89.757, 76.68, 29.412, 1.074)
pt3dadd(89.876, 76.68, 29.424, 1.092)
pt3dadd(89.993, 76.68, 29.443, 1.108)
pt3dadd(90.107, 76.68, 29.476, 1.118)
pt3dadd(90.22, 76.68, 29.509, 1.13)
pt3dadd(90.324, 76.68, 29.559, 1.108)
pt3dadd(90.427, 76.68, 29.609, 1.086)
pt3dadd(90.499, 76.68, 29.687, 1.054)
pt3dadd(90.56, 76.68, 29.773, 1.02)
pt3dadd(90.644, 76.68, 29.84, 0.986)
pt3dadd(90.746, 76.68, 29.892, 0.95)
pt3dadd(90.849, 76.68, 29.944, 0.916)
pt3dadd(90.951, 76.68, 29.996, 0.882)
pt3dadd(91.068, 76.68, 30.016, 0.852)
pt3dadd(91.187, 76.68, 30.033, 0.824)
pt3dadd(91.281, 76.68, 30.074, 0.794)
pt3dadd(91.324, 76.68, 30.167, 0.76)
pt3dadd(91.367, 76.68, 30.261, 0.728)
pt3dadd(91.414, 76.68, 30.353, 0.696)
pt3dadd(91.475, 76.68, 30.439, 0.662)
pt3dadd(91.537, 76.68, 30.523, 0.628)
}
}
proc shape3d_140() {
dend_7[36] { pt3dadd(91.654, 76.68, 30.546, 0.604)
pt3dadd(91.771, 76.68, 30.57, 0.582)
pt3dadd(91.887, 76.68, 30.593, 0.558)
pt3dadd(92.002, 76.68, 30.624, 0.552)
pt3dadd(92.115, 76.68, 30.657, 0.552)
pt3dadd(92.199, 76.68, 30.713, 0.558)
pt3dadd(92.232, 76.68, 30.809, 0.574)
pt3dadd(92.265, 76.68, 30.905, 0.59)
pt3dadd(92.305, 76.68, 30.998, 0.606)
pt3dadd(92.393, 76.68, 31.066, 0.63)
pt3dadd(92.481, 76.68, 31.133, 0.654)
pt3dadd(92.593, 76.68, 31.17, 0.686)
pt3dadd(92.708, 76.688, 31.195, 0.718)
pt3dadd(92.818, 76.729, 31.2, 0.772)
pt3dadd(92.869, 76.834, 31.2, 0.778)
pt3dadd(92.88, 76.953, 31.2, 0.764)
pt3dadd(92.88, 77.073, 31.204, 0.72)
pt3dadd(92.88, 77.188, 31.228, 0.69)
pt3dadd(92.88, 77.274, 31.294, 0.678)
pt3dadd(92.88, 77.33, 31.383, 0.684)
pt3dadd(92.88, 77.374, 31.475, 0.73)
pt3dadd(92.88, 77.396, 31.573, 0.788)
pt3dadd(92.88, 77.4, 31.673, 0.804)
pt3dadd(92.88, 77.4, 31.773, 0.792)
pt3dadd(92.88, 77.4, 31.873, 0.774)
pt3dadd(92.88, 77.4, 31.973, 0.758)
pt3dadd(92.909, 77.4, 32.069, 0.738)
pt3dadd(92.949, 77.4, 32.163, 0.716)
pt3dadd(93.012, 77.4, 32.241, 0.704)
pt3dadd(93.116, 77.4, 32.292, 0.704)
pt3dadd(93.214, 77.4, 32.348, 0.708)
pt3dadd(93.289, 77.4, 32.426, 0.73)
pt3dadd(93.365, 77.4, 32.503, 0.756)
pt3dadd(93.458, 77.4, 32.566, 0.828)
pt3dadd(93.556, 77.4, 32.623, 0.866)
pt3dadd(93.656, 77.4, 32.678, 0.886)
pt3dadd(93.757, 77.4, 32.733, 0.906)
pt3dadd(93.857, 77.4, 32.788, 0.926)
pt3dadd(93.957, 77.4, 32.843, 0.946)
pt3dadd(94.059, 77.43, 32.884, 0.964)
pt3dadd(94.161, 77.481, 32.914, 0.982)
pt3dadd(94.263, 77.532, 32.944, 0.998)
pt3dadd(94.366, 77.583, 32.974, 1.016)
pt3dadd(94.464, 77.636, 33.008, 1.03)
pt3dadd(94.54, 77.702, 33.063, 1.03)
pt3dadd(94.616, 77.768, 33.118, 1.03)
pt3dadd(94.692, 77.834, 33.172, 1.03)
pt3dadd(94.766, 77.901, 33.227, 1.028)
pt3dadd(94.828, 77.983, 33.279, 1.016)
pt3dadd(94.89, 78.064, 33.33, 1.004)
pt3dadd(94.952, 78.146, 33.382, 0.992)
pt3dadd(95.015, 78.228, 33.434, 0.98)
pt3dadd(95.09, 78.31, 33.471, 0.966)
pt3dadd(95.158, 78.399, 33.5, 0.954)
pt3dadd(95.204, 78.51, 33.5, 0.954)
pt3dadd(95.251, 78.62, 33.5, 0.954)
pt3dadd(95.357, 78.669, 33.515, 0.976)
pt3dadd(95.466, 78.714, 33.531, 1.002)
pt3dadd(95.549, 78.745, 33.596, 1.004)
pt3dadd(95.627, 78.774, 33.667, 1.004)
pt3dadd(95.63, 78.887, 33.702, 1.004)
pt3dadd(95.634, 78.999, 33.737, 1.004)
pt3dadd(95.637, 79.111, 33.772, 1.004)
pt3dadd(95.648, 79.224, 33.803, 1.002)
pt3dadd(95.686, 79.336, 33.819, 0.99)
pt3dadd(95.724, 79.447, 33.838, 0.976)
pt3dadd(95.772, 79.545, 33.87, 0.952)
pt3dadd(95.826, 79.652, 33.877, 0.946)
pt3dadd(95.879, 79.759, 33.883, 0.942)
pt3dadd(95.933, 79.866, 33.89, 0.936)
pt3dadd(95.986, 79.973, 33.897, 0.932)
pt3dadd(96.034, 80.083, 33.903, 0.918)
pt3dadd(96.075, 80.195, 33.907, 0.896)
pt3dadd(96.115, 80.306, 33.921, 0.878)
pt3dadd(96.15, 80.41, 33.962, 0.878)
pt3dadd(96.207, 80.499, 33.992, 0.882)
pt3dadd(96.311, 80.558, 34.003, 0.896)
pt3dadd(96.414, 80.612, 34.022, 0.916)
pt3dadd(96.514, 80.655, 34.064, 0.956)
pt3dadd(96.608, 80.714, 34.096, 1.004)
pt3dadd(96.69, 80.794, 34.119, 1.056)
pt3dadd(96.765, 80.849, 34.182, 1.068)
pt3dadd(96.84, 80.905, 34.245, 1.08)
pt3dadd(96.915, 80.961, 34.307, 1.094)
pt3dadd(96.992, 81.016, 34.369, 1.104)
pt3dadd(97.087, 81.075, 34.405, 1.104)
pt3dadd(97.165, 81.145, 34.442, 1.096)
pt3dadd(97.184, 81.254, 34.479, 1.06)
pt3dadd(97.211, 81.359, 34.519, 1.018)
pt3dadd(97.28, 81.435, 34.57, 0.946)
pt3dadd(97.365, 81.48, 34.619, 0.88)
pt3dadd(97.472, 81.48, 34.663, 0.824)
pt3dadd(97.578, 81.48, 34.71, 0.766)
pt3dadd(97.68, 81.48, 34.764, 0.696)
pt3dadd(97.779, 81.502, 34.815, 0.67)
pt3dadd(97.879, 81.532, 34.865, 0.658)
pt3dadd(97.978, 81.562, 34.915, 0.648)
pt3dadd(98.078, 81.592, 34.965, 0.636)
pt3dadd(98.172, 81.629, 35.017, 0.624)
pt3dadd(98.255, 81.683, 35.074, 0.61)
pt3dadd(98.353, 81.731, 35.109, 0.602)
pt3dadd(98.462, 81.776, 35.125, 0.602)
pt3dadd(98.572, 81.809, 35.151, 0.602)
pt3dadd(98.681, 81.828, 35.189, 0.602)
pt3dadd(98.771, 81.84, 35.246, 0.608)
pt3dadd(98.832, 81.84, 35.332, 0.618)
pt3dadd(98.88, 81.847, 35.42, 0.634)
pt3dadd(98.88, 81.88, 35.517, 0.666)
pt3dadd(98.919, 81.949, 35.573, 0.686)
pt3dadd(98.984, 82.043, 35.604, 0.7)
pt3dadd(99.075, 82.077, 35.653, 0.694)
pt3dadd(99.174, 82.09, 35.708, 0.682)
pt3dadd(99.22, 82.172, 35.751, 0.65)
pt3dadd(99.246, 82.279, 35.79, 0.612)
pt3dadd(99.3, 82.382, 35.804, 0.594)
pt3dadd(99.364, 82.484, 35.809, 0.582)
pt3dadd(99.438, 82.564, 35.842, 0.578)
pt3dadd(99.514, 82.637, 35.889, 0.58)
pt3dadd(99.586, 82.716, 35.935, 0.586)
pt3dadd(99.658, 82.794, 35.981, 0.592)
pt3dadd(99.73, 82.873, 36.028, 0.6)
pt3dadd(99.816, 82.932, 36.071, 0.602)
pt3dadd(99.922, 82.96, 36.109, 0.602)
pt3dadd(100.029, 82.989, 36.148, 0.602)
pt3dadd(100.136, 83.018, 36.186, 0.602)
pt3dadd(100.243, 83.047, 36.225, 0.602)
pt3dadd(100.348, 83.097, 36.244, 0.602)
pt3dadd(100.453, 83.154, 36.258, 0.602)
pt3dadd(100.557, 83.21, 36.272, 0.602)
pt3dadd(100.662, 83.267, 36.287, 0.602)
pt3dadd(100.767, 83.322, 36.3, 0.604)
pt3dadd(100.881, 83.361, 36.3, 0.612)
pt3dadd(100.994, 83.4, 36.3, 0.622)
pt3dadd(101.108, 83.438, 36.3, 0.63)
pt3dadd(101.221, 83.477, 36.3, 0.64)
pt3dadd(101.335, 83.516, 36.3, 0.648)
pt3dadd(101.445, 83.56, 36.308, 0.664)
pt3dadd(101.553, 83.61, 36.321, 0.686)
pt3dadd(101.661, 83.66, 36.335, 0.706)
pt3dadd(101.769, 83.71, 36.349, 0.726)
pt3dadd(101.877, 83.76, 36.363, 0.748)
pt3dadd(101.99, 83.788, 36.384, 0.774)
pt3dadd(102.104, 83.809, 36.408, 0.804)
pt3dadd(102.219, 83.83, 36.432, 0.834)
pt3dadd(102.334, 83.851, 36.456, 0.864)
pt3dadd(102.448, 83.872, 36.48, 0.892)
pt3dadd(102.566, 83.88, 36.491, 0.93)
pt3dadd(102.686, 83.88, 36.495, 0.974)
pt3dadd(102.806, 83.88, 36.499, 1.018)
pt3dadd(102.921, 83.907, 36.511, 1.046)
pt3dadd(103.033, 83.944, 36.527, 1.07)
pt3dadd(103.119, 84.012, 36.555, 1.072)
pt3dadd(103.186, 84.101, 36.592, 1.058)
pt3dadd(103.266, 84.174, 36.635, 1.01)
pt3dadd(103.348, 84.241, 36.68, 0.952)
pt3dadd(103.413, 84.273, 36.76, 0.872)
pt3dadd(103.505, 84.301, 36.816, 0.836)
pt3dadd(103.606, 84.327, 36.866, 0.814)
pt3dadd(103.707, 84.354, 36.915, 0.792)
pt3dadd(103.808, 84.381, 36.965, 0.77)
pt3dadd(103.911, 84.415, 37, 0.746)
pt3dadd(104.018, 84.469, 37, 0.724)
pt3dadd(104.125, 84.522, 37.002, 0.704)
pt3dadd(104.229, 84.564, 37.036, 0.704)
pt3dadd(104.336, 84.6, 37.069, 0.704)
pt3dadd(104.454, 84.6, 37.086, 0.714)
pt3dadd(104.572, 84.6, 37.103, 0.724)
pt3dadd(104.66, 84.6, 37.158, 0.734)
pt3dadd(104.72, 84.6, 37.244, 0.746)
pt3dadd(104.762, 84.6, 37.335, 0.744)
pt3dadd(104.769, 84.6, 37.435, 0.718)
pt3dadd(104.823, 84.6, 37.507, 0.698)
pt3dadd(104.934, 84.6, 37.547, 0.69)
pt3dadd(105.044, 84.6, 37.586, 0.68)
pt3dadd(105.154, 84.6, 37.626, 0.67)
pt3dadd(105.264, 84.6, 37.666, 0.662)
pt3dadd(105.37, 84.606, 37.709, 0.648)
pt3dadd(105.444, 84.651, 37.778, 0.606)
pt3dadd(105.531, 84.687, 37.835, 0.574)
pt3dadd(105.641, 84.706, 37.873, 0.562)
pt3dadd(105.753, 84.719, 37.9, 0.55)
pt3dadd(105.873, 84.714, 37.9, 0.542)
pt3dadd(105.993, 84.71, 37.9, 0.532)
pt3dadd(106.101, 84.675, 37.9, 0.532)
pt3dadd(106.188, 84.593, 37.9, 0.544)
pt3dadd(106.281, 84.528, 37.912, 0.554)
pt3dadd(106.385, 84.508, 37.959, 0.562)
pt3dadd(106.489, 84.488, 38.006, 0.57)
pt3dadd(106.593, 84.468, 38.053, 0.578)
pt3dadd(106.659, 84.375, 38.077, 0.578)
pt3dadd(106.722, 84.277, 38.1, 0.578)
pt3dadd(106.8, 84.187, 38.107, 0.58)
pt3dadd(106.883, 84.104, 38.13, 0.586)
pt3dadd(106.965, 84.022, 38.153, 0.59)
pt3dadd(107.048, 83.939, 38.176, 0.596)
pt3dadd(107.13, 83.856, 38.199, 0.602)
pt3dadd(107.243, 83.815, 38.2, 0.634)
pt3dadd(107.356, 83.775, 38.2, 0.666)
pt3dadd(107.463, 83.723, 38.2, 0.686)
pt3dadd(107.567, 83.662, 38.2, 0.696)
}
}
proc shape3d_141() {
dend_7[36] { pt3dadd(107.631, 83.577, 38.2, 0.704)
pt3dadd(107.64, 83.457, 38.2, 0.704)
pt3dadd(107.65, 83.337, 38.2, 0.704)
pt3dadd(107.691, 83.228, 38.2, 0.688)
pt3dadd(107.752, 83.125, 38.2, 0.666)
pt3dadd(107.823, 83.033, 38.215, 0.646)
pt3dadd(107.908, 82.958, 38.248, 0.628)
pt3dadd(107.992, 82.883, 38.281, 0.612)
pt3dadd(108.083, 82.821, 38.318, 0.59)
pt3dadd(108.184, 82.778, 38.36, 0.564)
pt3dadd(108.252, 82.722, 38.42, 0.528)
pt3dadd(108.36, 82.704, 38.46, 0.528)
pt3dadd(108.469, 82.688, 38.499, 0.528)
pt3dadd(108.579, 82.671, 38.537, 0.528)
pt3dadd(108.688, 82.655, 38.576, 0.528)
pt3dadd(108.792, 82.632, 38.616, 0.528)
pt3dadd(108.844, 82.542, 38.666, 0.528)
pt3dadd(108.909, 82.466, 38.715, 0.532)
pt3dadd(109.005, 82.422, 38.764, 0.546)
pt3dadd(109.107, 82.381, 38.799, 0.558)
pt3dadd(109.218, 82.342, 38.821, 0.57)
pt3dadd(109.331, 82.32, 38.845, 0.586)
pt3dadd(109.446, 82.32, 38.873, 0.608)
pt3dadd(109.561, 82.32, 38.9, 0.628)
pt3dadd(109.681, 82.32, 38.906, 0.642)
pt3dadd(109.8, 82.317, 38.913, 0.654)
pt3dadd(109.915, 82.288, 38.931, 0.658)
pt3dadd(110.03, 82.259, 38.948, 0.664)
pt3dadd(110.144, 82.231, 38.965, 0.668)
pt3dadd(110.259, 82.202, 38.983, 0.674)
pt3dadd(110.374, 82.173, 39, 0.678)
pt3dadd(110.484, 82.129, 39.016, 0.668)
pt3dadd(110.593, 82.085, 39.032, 0.658)
pt3dadd(110.703, 82.041, 39.048, 0.648)
pt3dadd(110.813, 81.997, 39.064, 0.636)
pt3dadd(110.921, 81.95, 39.082, 0.626)
pt3dadd(111.016, 81.886, 39.11, 0.608)
pt3dadd(111.112, 81.821, 39.138, 0.59)
pt3dadd(111.207, 81.757, 39.167, 0.572)
pt3dadd(111.303, 81.692, 39.195, 0.556)
pt3dadd(111.389, 81.611, 39.207, 0.536)
pt3dadd(111.474, 81.527, 39.216, 0.516)
pt3dadd(111.558, 81.442, 39.225, 0.496)
pt3dadd(111.641, 81.357, 39.233, 0.478)
pt3dadd(111.686, 81.247, 39.217, 0.478)
pt3dadd(111.732, 81.138, 39.201, 0.478)
pt3dadd(111.798, 81.038, 39.2, 0.488)
pt3dadd(111.866, 80.939, 39.2, 0.5)
pt3dadd(111.97, 80.905, 39.225, 0.512)
pt3dadd(112.083, 80.886, 39.256, 0.524)
pt3dadd(112.2, 80.88, 39.275, 0.528)
pt3dadd(112.319, 80.88, 39.287, 0.528)
pt3dadd(112.438, 80.88, 39.3, 0.528)
pt3dadd(112.538, 80.88, 39.354, 0.534)
pt3dadd(112.638, 80.88, 39.41, 0.542)
pt3dadd(112.738, 80.88, 39.465, 0.548)
pt3dadd(112.82, 80.873, 39.533, 0.562)
pt3dadd(112.873, 80.853, 39.621, 0.586)
pt3dadd(112.914, 80.81, 39.703, 0.63)
pt3dadd(112.966, 80.762, 39.78, 0.662)
pt3dadd(113.031, 80.728, 39.859, 0.672)
pt3dadd(113.095, 80.695, 39.938, 0.684)
pt3dadd(113.16, 80.661, 40.018, 0.696)
pt3dadd(113.238, 80.64, 40.089, 0.706)
pt3dadd(113.336, 80.64, 40.146, 0.716)
pt3dadd(113.434, 80.64, 40.204, 0.726)
pt3dadd(113.532, 80.64, 40.261, 0.736)
pt3dadd(113.63, 80.64, 40.319, 0.746)
pt3dadd(113.718, 80.639, 40.385, 0.758)
pt3dadd(113.788, 80.636, 40.466, 0.774)
pt3dadd(113.859, 80.634, 40.547, 0.79)
pt3dadd(113.929, 80.631, 40.628, 0.804)
pt3dadd(113.999, 80.628, 40.709, 0.82)
pt3dadd(114.08, 80.605, 40.774, 0.834)
pt3dadd(114.176, 80.553, 40.817, 0.848)
pt3dadd(114.265, 80.529, 40.876, 0.832)
pt3dadd(114.349, 80.523, 40.947, 0.794)
pt3dadd(114.415, 80.544, 41.025, 0.726)
pt3dadd(114.465, 80.587, 41.108, 0.63)
pt3dadd(114.48, 80.616, 41.202, 0.448)
pt3dadd(114.48, 80.64, 41.3, 0.226)
}
dend_7[37] {pt3dclear()
pt3dadd(48.954, 92.195, 22.965, 0.842)
pt3dadd(48.954, 92.196, 22.965, 0.842)
pt3dadd(49.03, 92.279, 23.001, 0.882)
pt3dadd(49.105, 92.362, 23.036, 0.922)
pt3dadd(49.18, 92.445, 23.072, 0.96)
pt3dadd(49.256, 92.528, 23.107, 1)
pt3dadd(49.331, 92.612, 23.142, 1.04)
pt3dadd(49.406, 92.695, 23.178, 1.08)
pt3dadd(49.48, 92.783, 23.2, 1.096)
pt3dadd(49.552, 92.879, 23.2, 1.07)
pt3dadd(49.624, 92.975, 23.2, 1.046)
pt3dadd(49.696, 93.071, 23.2, 1.02)
pt3dadd(49.768, 93.167, 23.2, 0.994)
pt3dadd(49.841, 93.262, 23.2, 0.968)
pt3dadd(49.916, 93.356, 23.2, 0.938)
pt3dadd(49.991, 93.449, 23.2, 0.908)
pt3dadd(50.066, 93.543, 23.2, 0.878)
pt3dadd(50.141, 93.637, 23.2, 0.848)
pt3dadd(50.202, 93.738, 23.2, 0.812)
pt3dadd(50.242, 93.852, 23.2, 0.77)
pt3dadd(50.283, 93.964, 23.2, 0.728)
pt3dadd(50.343, 94.068, 23.2, 0.728)
pt3dadd(50.404, 94.171, 23.2, 0.728)
pt3dadd(50.515, 94.195, 23.2, 0.736)
pt3dadd(50.635, 94.204, 23.2, 0.744)
pt3dadd(50.753, 94.217, 23.2, 0.752)
pt3dadd(50.857, 94.278, 23.2, 0.742)
pt3dadd(50.96, 94.339, 23.2, 0.73)
pt3dadd(51.043, 94.424, 23.207, 0.712)
pt3dadd(51.137, 94.492, 23.221, 0.7)
pt3dadd(51.245, 94.54, 23.24, 0.694)
pt3dadd(51.352, 94.588, 23.259, 0.69)
pt3dadd(51.46, 94.636, 23.278, 0.684)
pt3dadd(51.567, 94.685, 23.297, 0.678)
pt3dadd(51.657, 94.762, 23.3, 0.678)
pt3dadd(51.743, 94.845, 23.3, 0.678)
pt3dadd(51.83, 94.929, 23.3, 0.678)
pt3dadd(51.916, 95.012, 23.3, 0.678)
pt3dadd(52.002, 95.096, 23.3, 0.678)
pt3dadd(52.108, 95.139, 23.325, 0.678)
pt3dadd(52.217, 95.176, 23.354, 0.678)
pt3dadd(52.325, 95.213, 23.382, 0.678)
pt3dadd(52.434, 95.251, 23.411, 0.678)
pt3dadd(52.54, 95.291, 23.442, 0.678)
pt3dadd(52.635, 95.345, 23.484, 0.678)
pt3dadd(52.729, 95.399, 23.526, 0.678)
pt3dadd(52.824, 95.452, 23.568, 0.678)
pt3dadd(52.919, 95.506, 23.611, 0.678)
pt3dadd(53.019, 95.546, 23.654, 0.678)
pt3dadd(53.12, 95.585, 23.697, 0.678)
pt3dadd(53.221, 95.625, 23.74, 0.678)
pt3dadd(53.322, 95.665, 23.783, 0.678)
pt3dadd(53.422, 95.708, 23.823, 0.678)
pt3dadd(53.523, 95.754, 23.862, 0.678)
pt3dadd(53.624, 95.8, 23.9, 0.678)
pt3dadd(53.725, 95.846, 23.938, 0.678)
pt3dadd(53.826, 95.894, 23.973, 0.678)
pt3dadd(53.93, 95.947, 23.998, 0.678)
pt3dadd(54.033, 96, 24.022, 0.678)
pt3dadd(54.137, 96.053, 24.047, 0.678)
pt3dadd(54.24, 96.107, 24.072, 0.678)
pt3dadd(54.346, 96.153, 24.098, 0.678)
pt3dadd(54.454, 96.196, 24.124, 0.678)
pt3dadd(54.561, 96.239, 24.151, 0.678)
pt3dadd(54.668, 96.283, 24.177, 0.678)
pt3dadd(54.775, 96.329, 24.2, 0.678)
pt3dadd(54.879, 96.389, 24.2, 0.684)
pt3dadd(54.983, 96.448, 24.2, 0.688)
pt3dadd(55.087, 96.508, 24.2, 0.694)
pt3dadd(55.191, 96.568, 24.2, 0.698)
pt3dadd(55.295, 96.627, 24.2, 0.704)
pt3dadd(55.407, 96.672, 24.2, 0.708)
pt3dadd(55.518, 96.716, 24.2, 0.712)
pt3dadd(55.63, 96.761, 24.2, 0.718)
pt3dadd(55.741, 96.806, 24.2, 0.722)
pt3dadd(55.852, 96.85, 24.2, 0.726)
pt3dadd(55.964, 96.894, 24.204, 0.734)
pt3dadd(56.075, 96.938, 24.21, 0.744)
pt3dadd(56.187, 96.982, 24.217, 0.754)
pt3dadd(56.298, 97.026, 24.223, 0.764)
pt3dadd(56.409, 97.07, 24.23, 0.774)
pt3dadd(56.516, 97.122, 24.24, 0.78)
pt3dadd(56.619, 97.182, 24.254, 0.786)
pt3dadd(56.722, 97.242, 24.269, 0.792)
pt3dadd(56.824, 97.302, 24.283, 0.798)
pt3dadd(56.927, 97.361, 24.297, 0.802)
pt3dadd(56.994, 97.45, 24.329, 0.826)
pt3dadd(57.052, 97.545, 24.366, 0.854)
pt3dadd(57.151, 97.596, 24.402, 0.866)
pt3dadd(57.253, 97.642, 24.437, 0.88)
pt3dadd(57.366, 97.661, 24.468, 0.892)
pt3dadd(57.478, 97.68, 24.499, 0.904)
pt3dadd(57.598, 97.68, 24.5, 0.904)
pt3dadd(57.718, 97.68, 24.5, 0.904)
pt3dadd(57.838, 97.68, 24.5, 0.904)
pt3dadd(57.958, 97.68, 24.5, 0.892)
pt3dadd(58.078, 97.68, 24.5, 0.88)
pt3dadd(58.183, 97.706, 24.543, 0.868)
pt3dadd(58.288, 97.732, 24.587, 0.858)
pt3dadd(58.392, 97.758, 24.63, 0.846)
pt3dadd(58.497, 97.784, 24.674, 0.836)
pt3dadd(58.606, 97.809, 24.708, 0.822)
pt3dadd(58.722, 97.832, 24.727, 0.808)
pt3dadd(58.837, 97.855, 24.746, 0.794)
pt3dadd(58.953, 97.878, 24.765, 0.78)
pt3dadd(59.068, 97.902, 24.785, 0.764)
pt3dadd(59.184, 97.92, 24.804, 0.752)
pt3dadd(59.302, 97.92, 24.822, 0.744)
pt3dadd(59.42, 97.92, 24.841, 0.734)
pt3dadd(59.538, 97.92, 24.859, 0.726)
pt3dadd(59.656, 97.92, 24.878, 0.718)
pt3dadd(59.774, 97.92, 24.896, 0.71)
pt3dadd(59.889, 97.925, 24.92, 0.702)
pt3dadd(59.996, 97.951, 24.96, 0.696)
pt3dadd(60.102, 97.977, 25.001, 0.692)
pt3dadd(60.208, 98.003, 25.042, 0.686)
pt3dadd(60.315, 98.029, 25.083, 0.68)
pt3dadd(60.427, 98.04, 25.113, 0.678)
pt3dadd(60.544, 98.04, 25.136, 0.678)
}
}
proc shape3d_142() {
dend_7[37] { pt3dadd(60.661, 98.04, 25.159, 0.678)
pt3dadd(60.778, 98.04, 25.182, 0.678)
pt3dadd(60.895, 98.04, 25.205, 0.678)
pt3dadd(61.011, 98.04, 25.228, 0.678)
pt3dadd(61.125, 98.068, 25.243, 0.678)
pt3dadd(61.239, 98.105, 25.256, 0.678)
pt3dadd(61.352, 98.142, 25.27, 0.678)
pt3dadd(61.465, 98.178, 25.283, 0.678)
pt3dadd(61.578, 98.215, 25.296, 0.678)
pt3dadd(61.694, 98.233, 25.312, 0.674)
pt3dadd(61.812, 98.243, 25.33, 0.67)
pt3dadd(61.93, 98.252, 25.347, 0.666)
pt3dadd(62.047, 98.261, 25.365, 0.662)
pt3dadd(62.165, 98.271, 25.383, 0.658)
pt3dadd(62.283, 98.281, 25.4, 0.652)
pt3dadd(62.39, 98.335, 25.4, 0.648)
pt3dadd(62.497, 98.389, 25.4, 0.644)
pt3dadd(62.605, 98.442, 25.4, 0.638)
pt3dadd(62.712, 98.496, 25.4, 0.634)
pt3dadd(62.819, 98.549, 25.4, 0.628)
pt3dadd(62.934, 98.584, 25.4, 0.62)
pt3dadd(63.05, 98.614, 25.4, 0.612)
pt3dadd(63.166, 98.645, 25.4, 0.604)
pt3dadd(63.282, 98.675, 25.4, 0.594)
pt3dadd(63.398, 98.705, 25.4, 0.586)
pt3dadd(63.513, 98.738, 25.4, 0.578)
pt3dadd(63.611, 98.807, 25.4, 0.584)
pt3dadd(63.709, 98.876, 25.4, 0.588)
pt3dadd(63.808, 98.945, 25.4, 0.594)
pt3dadd(63.906, 99.014, 25.4, 0.598)
pt3dadd(64.004, 99.082, 25.401, 0.602)
pt3dadd(64.109, 99.135, 25.423, 0.608)
pt3dadd(64.214, 99.187, 25.445, 0.614)
pt3dadd(64.319, 99.24, 25.466, 0.62)
pt3dadd(64.423, 99.292, 25.488, 0.624)
pt3dadd(64.523, 99.355, 25.5, 0.64)
pt3dadd(64.617, 99.43, 25.5, 0.664)
pt3dadd(64.71, 99.505, 25.5, 0.69)
pt3dadd(64.804, 99.58, 25.5, 0.716)
pt3dadd(64.898, 99.654, 25.5, 0.74)
pt3dadd(64.983, 99.738, 25.5, 0.758)
pt3dadd(65.057, 99.832, 25.5, 0.768)
pt3dadd(65.132, 99.926, 25.5, 0.778)
pt3dadd(65.207, 100.02, 25.5, 0.788)
pt3dadd(65.282, 100.113, 25.5, 0.798)
pt3dadd(65.373, 100.187, 25.5, 0.808)
pt3dadd(65.481, 100.241, 25.5, 0.818)
pt3dadd(65.588, 100.294, 25.5, 0.828)
pt3dadd(65.696, 100.348, 25.5, 0.838)
pt3dadd(65.803, 100.401, 25.5, 0.846)
pt3dadd(65.913, 100.446, 25.5, 0.85)
pt3dadd(66.032, 100.465, 25.5, 0.838)
pt3dadd(66.15, 100.485, 25.5, 0.826)
pt3dadd(66.268, 100.505, 25.5, 0.814)
pt3dadd(66.387, 100.524, 25.5, 0.8)
pt3dadd(66.505, 100.544, 25.5, 0.788)
pt3dadd(66.622, 100.569, 25.5, 0.776)
pt3dadd(66.734, 100.613, 25.5, 0.768)
pt3dadd(66.845, 100.658, 25.5, 0.758)
pt3dadd(66.956, 100.703, 25.5, 0.748)
pt3dadd(67.068, 100.747, 25.5, 0.74)
pt3dadd(67.179, 100.792, 25.5, 0.73)
pt3dadd(67.28, 100.856, 25.5, 0.72)
pt3dadd(67.378, 100.925, 25.5, 0.71)
pt3dadd(67.476, 100.994, 25.5, 0.7)
pt3dadd(67.574, 101.063, 25.5, 0.69)
pt3dadd(67.673, 101.132, 25.5, 0.68)
pt3dadd(67.775, 101.194, 25.5, 0.678)
pt3dadd(67.879, 101.254, 25.5, 0.678)
pt3dadd(67.983, 101.313, 25.5, 0.678)
pt3dadd(68.088, 101.373, 25.5, 0.678)
pt3dadd(68.192, 101.433, 25.5, 0.678)
pt3dadd(68.268, 101.521, 25.5, 0.678)
pt3dadd(68.331, 101.623, 25.5, 0.678)
pt3dadd(68.394, 101.725, 25.5, 0.678)
pt3dadd(68.457, 101.827, 25.5, 0.678)
pt3dadd(68.52, 101.93, 25.5, 0.678)
pt3dadd(68.606, 102.008, 25.5, 0.678)
pt3dadd(68.709, 102.069, 25.5, 0.678)
pt3dadd(68.813, 102.13, 25.5, 0.678)
pt3dadd(68.916, 102.191, 25.5, 0.678)
pt3dadd(69.018, 102.252, 25.504, 0.678)
pt3dadd(69.117, 102.315, 25.528, 0.678)
pt3dadd(69.205, 102.362, 25.568, 0.678)
pt3dadd(69.269, 102.368, 25.653, 0.678)
pt3dadd(69.33, 102.388, 25.733, 0.68)
pt3dadd(69.385, 102.465, 25.794, 0.688)
pt3dadd(69.44, 102.543, 25.855, 0.696)
pt3dadd(69.499, 102.626, 25.901, 0.706)
pt3dadd(69.57, 102.723, 25.907, 0.718)
pt3dadd(69.644, 102.813, 25.918, 0.736)
pt3dadd(69.697, 102.873, 25.985, 0.746)
pt3dadd(69.724, 102.928, 26.071, 0.732)
pt3dadd(69.784, 102.987, 26.138, 0.728)
pt3dadd(69.86, 103.048, 26.195, 0.728)
pt3dadd(69.922, 103.149, 26.2, 0.75)
pt3dadd(69.983, 103.252, 26.2, 0.772)
pt3dadd(70.054, 103.348, 26.2, 0.796)
pt3dadd(70.13, 103.442, 26.2, 0.82)
pt3dadd(70.192, 103.543, 26.2, 0.818)
pt3dadd(70.248, 103.649, 26.2, 0.802)
pt3dadd(70.332, 103.735, 26.2, 0.776)
pt3dadd(70.415, 103.821, 26.2, 0.75)
pt3dadd(70.499, 103.907, 26.2, 0.726)
pt3dadd(70.582, 103.993, 26.2, 0.7)
pt3dadd(70.665, 104.081, 26.2, 0.676)
pt3dadd(70.74, 104.174, 26.2, 0.66)
pt3dadd(70.815, 104.268, 26.2, 0.646)
pt3dadd(70.89, 104.362, 26.2, 0.63)
pt3dadd(70.965, 104.455, 26.2, 0.616)
pt3dadd(71.041, 104.547, 26.2, 0.602)
pt3dadd(71.127, 104.631, 26.2, 0.602)
pt3dadd(71.214, 104.715, 26.2, 0.602)
pt3dadd(71.3, 104.798, 26.2, 0.602)
pt3dadd(71.386, 104.882, 26.2, 0.602)
pt3dadd(71.476, 104.96, 26.203, 0.606)
pt3dadd(71.578, 105.02, 26.217, 0.616)
pt3dadd(71.681, 105.08, 26.232, 0.626)
pt3dadd(71.783, 105.14, 26.246, 0.638)
pt3dadd(71.886, 105.199, 26.26, 0.648)
pt3dadd(71.995, 105.246, 26.27, 0.658)
pt3dadd(72.11, 105.28, 26.276, 0.668)
pt3dadd(72.224, 105.315, 26.283, 0.676)
pt3dadd(72.339, 105.35, 26.289, 0.686)
pt3dadd(72.453, 105.385, 26.295, 0.696)
pt3dadd(72.566, 105.424, 26.3, 0.706)
pt3dadd(72.67, 105.484, 26.3, 0.72)
pt3dadd(72.774, 105.544, 26.3, 0.736)
pt3dadd(72.878, 105.604, 26.3, 0.75)
pt3dadd(72.982, 105.664, 26.3, 0.764)
pt3dadd(73.086, 105.724, 26.3, 0.78)
pt3dadd(73.188, 105.787, 26.3, 0.804)
pt3dadd(73.29, 105.85, 26.3, 0.83)
pt3dadd(73.393, 105.912, 26.3, 0.854)
pt3dadd(73.495, 105.975, 26.3, 0.878)
pt3dadd(73.597, 106.038, 26.3, 0.904)
pt3dadd(73.691, 106.113, 26.3, 0.962)
pt3dadd(73.785, 106.188, 26.3, 1.02)
pt3dadd(73.876, 106.265, 26.305, 1.06)
pt3dadd(73.967, 106.343, 26.31, 1.098)
pt3dadd(74.046, 106.395, 26.365, 1.126)
pt3dadd(74.121, 106.44, 26.433, 1.156)
pt3dadd(74.17, 106.483, 26.517, 1.168)
pt3dadd(74.229, 106.524, 26.59, 1.18)
pt3dadd(74.346, 106.549, 26.597, 1.18)
pt3dadd(74.459, 106.56, 26.623, 1.174)
pt3dadd(74.568, 106.56, 26.665, 1.166)
pt3dadd(74.677, 106.56, 26.707, 1.156)
pt3dadd(74.786, 106.56, 26.749, 1.146)
pt3dadd(74.894, 106.56, 26.792, 1.138)
pt3dadd(75.003, 106.574, 26.827, 1.124)
pt3dadd(75.11, 106.624, 26.843, 1.104)
pt3dadd(75.217, 106.675, 26.86, 1.082)
pt3dadd(75.324, 106.726, 26.876, 1.06)
pt3dadd(75.43, 106.776, 26.892, 1.04)
pt3dadd(75.538, 106.829, 26.9, 1.022)
pt3dadd(75.645, 106.882, 26.9, 1.008)
pt3dadd(75.752, 106.936, 26.9, 0.994)
pt3dadd(75.86, 106.99, 26.9, 0.978)
pt3dadd(75.967, 107.043, 26.9, 0.964)
pt3dadd(76.064, 107.11, 26.9, 0.944)
pt3dadd(76.139, 107.203, 26.9, 0.908)
pt3dadd(76.22, 107.289, 26.9, 0.878)
pt3dadd(76.331, 107.335, 26.9, 0.878)
pt3dadd(76.442, 107.382, 26.9, 0.878)
pt3dadd(76.556, 107.392, 26.926, 0.878)
pt3dadd(76.671, 107.398, 26.955, 0.878)
pt3dadd(76.781, 107.4, 26.992, 0.892)
pt3dadd(76.889, 107.4, 27.037, 0.914)
pt3dadd(76.998, 107.409, 27.075, 0.942)
pt3dadd(77.111, 107.438, 27.098, 0.976)
pt3dadd(77.223, 107.481, 27.1, 0.992)
pt3dadd(77.334, 107.525, 27.1, 1.006)
pt3dadd(77.445, 107.57, 27.1, 1.02)
pt3dadd(77.557, 107.615, 27.1, 1.034)
pt3dadd(77.668, 107.659, 27.1, 1.048)
pt3dadd(77.772, 107.718, 27.1, 1.06)
pt3dadd(77.868, 107.79, 27.1, 1.07)
pt3dadd(77.964, 107.862, 27.1, 1.08)
pt3dadd(78.06, 107.934, 27.1, 1.09)
pt3dadd(78.156, 108.006, 27.1, 1.1)
pt3dadd(78.244, 108.087, 27.1, 1.104)
pt3dadd(78.325, 108.175, 27.1, 1.104)
pt3dadd(78.422, 108.235, 27.1, 1.092)
pt3dadd(78.54, 108.256, 27.1, 1.064)
pt3dadd(78.658, 108.276, 27.1, 1.036)
pt3dadd(78.747, 108.341, 27.13, 0.972)
pt3dadd(78.828, 108.417, 27.169, 0.902)
pt3dadd(78.864, 108.511, 27.223, 0.834)
pt3dadd(78.912, 108.589, 27.278, 0.768)
pt3dadd(79.01, 108.598, 27.334, 0.712)
pt3dadd(79.069, 108.642, 27.41, 0.692)
pt3dadd(79.12, 108.694, 27.49, 0.678)
pt3dadd(79.174, 108.77, 27.553, 0.678)
pt3dadd(79.235, 108.84, 27.615, 0.682)
pt3dadd(79.318, 108.894, 27.671, 0.696)
pt3dadd(79.419, 108.927, 27.7, 0.708)
pt3dadd(79.538, 108.942, 27.7, 0.718)
pt3dadd(79.657, 108.957, 27.7, 0.726)
pt3dadd(79.777, 108.96, 27.7, 0.748)
}
}
proc shape3d_143() {
dend_7[37] { pt3dadd(79.897, 108.96, 27.7, 0.774)
pt3dadd(80.014, 108.982, 27.7, 0.782)
pt3dadd(80.131, 109.01, 27.7, 0.786)
pt3dadd(80.248, 109.037, 27.7, 0.79)
pt3dadd(80.365, 109.065, 27.7, 0.794)
pt3dadd(80.482, 109.092, 27.7, 0.8)
pt3dadd(80.599, 109.119, 27.7, 0.804)
pt3dadd(80.713, 109.155, 27.7, 0.808)
pt3dadd(80.828, 109.191, 27.7, 0.812)
pt3dadd(80.942, 109.227, 27.7, 0.816)
pt3dadd(81.057, 109.263, 27.7, 0.822)
pt3dadd(81.171, 109.299, 27.7, 0.826)
pt3dadd(81.284, 109.337, 27.707, 0.826)
pt3dadd(81.395, 109.378, 27.726, 0.822)
pt3dadd(81.505, 109.419, 27.744, 0.816)
pt3dadd(81.615, 109.461, 27.763, 0.812)
pt3dadd(81.726, 109.502, 27.781, 0.806)
pt3dadd(81.84, 109.526, 27.8, 0.8)
pt3dadd(81.957, 109.535, 27.82, 0.796)
pt3dadd(82.075, 109.545, 27.84, 0.792)
pt3dadd(82.192, 109.554, 27.86, 0.788)
pt3dadd(82.309, 109.564, 27.88, 0.782)
pt3dadd(82.426, 109.573, 27.9, 0.778)
pt3dadd(82.545, 109.593, 27.9, 0.774)
pt3dadd(82.663, 109.613, 27.9, 0.77)
pt3dadd(82.781, 109.632, 27.9, 0.766)
pt3dadd(82.9, 109.652, 27.9, 0.762)
pt3dadd(83.018, 109.672, 27.9, 0.758)
pt3dadd(83.136, 109.692, 27.9, 0.754)
pt3dadd(83.243, 109.745, 27.9, 0.758)
pt3dadd(83.349, 109.802, 27.9, 0.762)
pt3dadd(83.455, 109.859, 27.9, 0.768)
pt3dadd(83.56, 109.916, 27.9, 0.772)
pt3dadd(83.666, 109.972, 27.9, 0.778)
pt3dadd(83.772, 110.028, 27.902, 0.782)
pt3dadd(83.879, 110.082, 27.904, 0.786)
pt3dadd(83.986, 110.137, 27.906, 0.792)
pt3dadd(84.093, 110.191, 27.908, 0.796)
pt3dadd(84.2, 110.246, 27.91, 0.802)
pt3dadd(84.309, 110.275, 27.935, 0.81)
pt3dadd(84.419, 110.288, 27.973, 0.82)
pt3dadd(84.529, 110.302, 28.011, 0.83)
pt3dadd(84.639, 110.315, 28.049, 0.84)
pt3dadd(84.749, 110.329, 28.087, 0.85)
pt3dadd(84.861, 110.361, 28.1, 0.86)
pt3dadd(84.974, 110.402, 28.1, 0.868)
pt3dadd(85.086, 110.444, 28.1, 0.878)
pt3dadd(85.199, 110.485, 28.1, 0.888)
pt3dadd(85.311, 110.527, 28.1, 0.896)
pt3dadd(85.423, 110.563, 28.109, 0.908)
pt3dadd(85.531, 110.58, 28.15, 0.922)
pt3dadd(85.639, 110.597, 28.192, 0.938)
pt3dadd(85.747, 110.613, 28.233, 0.954)
pt3dadd(85.854, 110.63, 28.275, 0.97)
pt3dadd(85.967, 110.64, 28.3, 0.982)
pt3dadd(86.087, 110.64, 28.3, 0.99)
pt3dadd(86.207, 110.64, 28.3, 0.996)
pt3dadd(86.327, 110.64, 28.3, 1.004)
pt3dadd(86.447, 110.64, 28.3, 1.01)
pt3dadd(86.567, 110.64, 28.3, 1.018)
pt3dadd(86.687, 110.64, 28.3, 1.026)
pt3dadd(86.804, 110.64, 28.314, 1.032)
pt3dadd(86.917, 110.64, 28.348, 1.036)
pt3dadd(87.029, 110.64, 28.383, 1.04)
pt3dadd(87.142, 110.64, 28.418, 1.046)
pt3dadd(87.254, 110.64, 28.452, 1.05)
pt3dadd(87.367, 110.64, 28.487, 1.054)
pt3dadd(87.486, 110.64, 28.49, 1.048)
pt3dadd(87.606, 110.64, 28.492, 1.04)
pt3dadd(87.726, 110.64, 28.494, 1.034)
pt3dadd(87.846, 110.64, 28.495, 1.026)
pt3dadd(87.966, 110.64, 28.497, 1.018)
pt3dadd(88.086, 110.64, 28.498, 1.012)
pt3dadd(88.206, 110.642, 28.502, 1.004)
pt3dadd(88.309, 110.671, 28.547, 0.986)
pt3dadd(88.412, 110.701, 28.591, 0.97)
pt3dadd(88.516, 110.73, 28.635, 0.954)
pt3dadd(88.619, 110.76, 28.68, 0.936)
pt3dadd(88.725, 110.795, 28.716, 0.918)
pt3dadd(88.832, 110.836, 28.745, 0.896)
pt3dadd(88.94, 110.877, 28.774, 0.874)
pt3dadd(89.047, 110.917, 28.803, 0.852)
pt3dadd(89.154, 110.958, 28.832, 0.83)
pt3dadd(89.267, 110.978, 28.863, 0.818)
pt3dadd(89.379, 110.997, 28.894, 0.806)
pt3dadd(89.498, 111.004, 28.9, 0.804)
pt3dadd(89.617, 111.008, 28.9, 0.804)
pt3dadd(89.737, 111.013, 28.9, 0.804)
pt3dadd(89.838, 111.076, 28.9, 0.804)
pt3dadd(89.937, 111.144, 28.9, 0.804)
pt3dadd(89.99, 111.246, 28.9, 0.78)
pt3dadd(90.03, 111.36, 28.9, 0.748)
pt3dadd(90.094, 111.453, 28.9, 0.7)
pt3dadd(90.196, 111.517, 28.9, 0.63)
pt3dadd(90.265, 111.615, 28.9, 0.606)
pt3dadd(90.333, 111.713, 28.9, 0.582)
pt3dadd(90.368, 111.827, 28.9, 0.61)
pt3dadd(90.394, 111.944, 28.9, 0.65)
pt3dadd(90.445, 112.04, 28.9, 0.706)
pt3dadd(90.556, 112.087, 28.9, 0.806)
pt3dadd(90.667, 112.133, 28.9, 0.904)
pt3dadd(90.754, 112.215, 28.9, 1.01)
pt3dadd(90.842, 112.296, 28.9, 1.116)
pt3dadd(90.958, 112.313, 28.9, 1.154)
pt3dadd(91.078, 112.32, 28.9, 1.18)
pt3dadd(91.184, 112.376, 28.9, 1.152)
pt3dadd(91.29, 112.432, 28.9, 1.122)
pt3dadd(91.395, 112.489, 28.9, 1.094)
pt3dadd(91.501, 112.546, 28.9, 1.064)
pt3dadd(91.607, 112.602, 28.9, 1.036)
pt3dadd(91.692, 112.685, 28.9, 0.988)
pt3dadd(91.773, 112.774, 28.9, 0.938)
pt3dadd(91.854, 112.863, 28.9, 0.888)
pt3dadd(91.934, 112.952, 28.9, 0.836)
pt3dadd(92.015, 113.04, 28.9, 0.786)
pt3dadd(92.105, 113.12, 28.9, 0.744)
pt3dadd(92.196, 113.198, 28.9, 0.704)
pt3dadd(92.288, 113.276, 28.9, 0.664)
pt3dadd(92.379, 113.353, 28.9, 0.622)
pt3dadd(92.47, 113.431, 28.9, 0.582)
pt3dadd(92.567, 113.502, 28.894, 0.56)
pt3dadd(92.664, 113.571, 28.887, 0.538)
pt3dadd(92.762, 113.641, 28.88, 0.518)
pt3dadd(92.859, 113.71, 28.873, 0.496)
pt3dadd(92.957, 113.78, 28.865, 0.476)
pt3dadd(93.054, 113.848, 28.849, 0.456)
pt3dadd(93.132, 113.887, 28.9, 0.442)
pt3dadd(93.203, 113.916, 28.977, 0.428)
pt3dadd(93.281, 113.988, 28.961, 0.402)
pt3dadd(93.359, 114.071, 28.93, 0.372)
pt3dadd(93.428, 114.167, 28.913, 0.346)
pt3dadd(93.487, 114.268, 28.9, 0.326)
pt3dadd(93.516, 114.384, 28.9, 0.326)
pt3dadd(93.545, 114.501, 28.9, 0.326)
pt3dadd(93.574, 114.617, 28.9, 0.326)
pt3dadd(93.6, 114.734, 28.9, 0.33)
pt3dadd(93.6, 114.854, 28.9, 0.354)
pt3dadd(93.6, 114.974, 28.9, 0.38)
pt3dadd(93.6, 115.094, 28.9, 0.414)
pt3dadd(93.6, 115.213, 28.905, 0.51)
pt3dadd(93.6, 115.32, 28.95, 0.578)
pt3dadd(93.6, 115.427, 28.995, 0.646)
pt3dadd(93.605, 115.533, 29.041, 0.694)
pt3dadd(93.612, 115.639, 29.088, 0.742)
pt3dadd(93.644, 115.75, 29.104, 0.778)
pt3dadd(93.686, 115.863, 29.109, 0.812)
pt3dadd(93.744, 115.957, 29.133, 0.814)
pt3dadd(93.82, 116.033, 29.177, 0.786)
pt3dadd(93.921, 116.087, 29.194, 0.752)
pt3dadd(94.03, 116.137, 29.2, 0.726)
pt3dadd(94.134, 116.197, 29.2, 0.716)
pt3dadd(94.238, 116.257, 29.2, 0.706)
pt3dadd(94.342, 116.317, 29.2, 0.696)
pt3dadd(94.446, 116.376, 29.2, 0.686)
pt3dadd(94.544, 116.442, 29.203, 0.678)
pt3dadd(94.612, 116.539, 29.22, 0.678)
pt3dadd(94.679, 116.636, 29.237, 0.678)
pt3dadd(94.747, 116.733, 29.254, 0.678)
pt3dadd(94.814, 116.83, 29.271, 0.678)
pt3dadd(94.905, 116.898, 29.295, 0.674)
pt3dadd(95.008, 116.949, 29.322, 0.668)
pt3dadd(95.112, 116.999, 29.349, 0.664)
pt3dadd(95.216, 117.05, 29.376, 0.658)
pt3dadd(95.319, 117.102, 29.4, 0.652)
pt3dadd(95.417, 117.171, 29.4, 0.642)
pt3dadd(95.516, 117.24, 29.4, 0.632)
pt3dadd(95.614, 117.309, 29.4, 0.622)
pt3dadd(95.712, 117.378, 29.4, 0.612)
pt3dadd(95.812, 117.445, 29.4, 0.602)
pt3dadd(95.923, 117.489, 29.4, 0.598)
pt3dadd(96.034, 117.534, 29.4, 0.594)
pt3dadd(96.146, 117.579, 29.4, 0.588)
pt3dadd(96.257, 117.623, 29.4, 0.584)
pt3dadd(96.369, 117.668, 29.4, 0.58)
pt3dadd(96.478, 117.717, 29.4, 0.582)
pt3dadd(96.587, 117.767, 29.4, 0.586)
pt3dadd(96.696, 117.818, 29.4, 0.59)
pt3dadd(96.805, 117.868, 29.4, 0.596)
pt3dadd(96.913, 117.919, 29.4, 0.6)
pt3dadd(97.02, 117.974, 29.4, 0.612)
pt3dadd(97.124, 118.033, 29.4, 0.632)
pt3dadd(97.228, 118.093, 29.4, 0.65)
pt3dadd(97.332, 118.153, 29.4, 0.67)
pt3dadd(97.436, 118.213, 29.4, 0.69)
pt3dadd(97.539, 118.272, 29.407, 0.706)
pt3dadd(97.64, 118.332, 29.429, 0.718)
pt3dadd(97.741, 118.391, 29.452, 0.73)
pt3dadd(97.842, 118.451, 29.474, 0.74)
pt3dadd(97.943, 118.51, 29.496, 0.752)
pt3dadd(98.049, 118.565, 29.5, 0.758)
pt3dadd(98.156, 118.618, 29.5, 0.762)
pt3dadd(98.263, 118.672, 29.5, 0.766)
pt3dadd(98.371, 118.725, 29.5, 0.772)
pt3dadd(98.478, 118.779, 29.5, 0.776)
pt3dadd(98.574, 118.849, 29.5, 0.776)
pt3dadd(98.663, 118.93, 29.5, 0.77)
pt3dadd(98.752, 119.011, 29.5, 0.766)
pt3dadd(98.841, 119.091, 29.5, 0.76)
pt3dadd(98.93, 119.172, 29.5, 0.756)
pt3dadd(99.033, 119.229, 29.5, 0.756)
}
}
proc shape3d_144() {
dend_7[37] { pt3dadd(99.144, 119.274, 29.5, 0.76)
pt3dadd(99.256, 119.318, 29.5, 0.766)
pt3dadd(99.367, 119.363, 29.5, 0.77)
pt3dadd(99.479, 119.407, 29.5, 0.774)
pt3dadd(99.59, 119.452, 29.5, 0.78)
pt3dadd(99.702, 119.496, 29.5, 0.784)
pt3dadd(99.813, 119.541, 29.5, 0.788)
pt3dadd(99.924, 119.586, 29.5, 0.794)
pt3dadd(100.036, 119.63, 29.5, 0.798)
pt3dadd(100.147, 119.675, 29.5, 0.804)
pt3dadd(100.261, 119.712, 29.5, 0.804)
pt3dadd(100.376, 119.747, 29.5, 0.804)
pt3dadd(100.491, 119.783, 29.5, 0.804)
pt3dadd(100.605, 119.819, 29.5, 0.804)
pt3dadd(100.719, 119.855, 29.5, 0.804)
pt3dadd(100.834, 119.892, 29.5, 0.8)
pt3dadd(100.947, 119.93, 29.5, 0.792)
pt3dadd(101.061, 119.969, 29.5, 0.782)
pt3dadd(101.175, 120.007, 29.5, 0.774)
pt3dadd(101.288, 120.047, 29.5, 0.764)
pt3dadd(101.402, 120.085, 29.5, 0.756)
pt3dadd(101.497, 120.155, 29.495, 0.744)
pt3dadd(101.587, 120.234, 29.487, 0.734)
pt3dadd(101.677, 120.313, 29.48, 0.724)
pt3dadd(101.767, 120.391, 29.473, 0.714)
pt3dadd(101.858, 120.469, 29.467, 0.702)
pt3dadd(101.956, 120.539, 29.467, 0.696)
pt3dadd(102.054, 120.607, 29.467, 0.69)
pt3dadd(102.153, 120.676, 29.467, 0.684)
pt3dadd(102.251, 120.745, 29.467, 0.678)
pt3dadd(102.33, 120.835, 29.474, 0.678)
pt3dadd(102.409, 120.925, 29.481, 0.678)
pt3dadd(102.488, 121.015, 29.488, 0.678)
pt3dadd(102.567, 121.105, 29.495, 0.678)
pt3dadd(102.65, 121.19, 29.5, 0.676)
pt3dadd(102.748, 121.259, 29.5, 0.672)
pt3dadd(102.846, 121.328, 29.5, 0.666)
pt3dadd(102.945, 121.397, 29.5, 0.662)
pt3dadd(103.043, 121.466, 29.5, 0.656)
pt3dadd(103.145, 121.526, 29.5, 0.652)
pt3dadd(103.262, 121.554, 29.5, 0.652)
pt3dadd(103.378, 121.582, 29.5, 0.652)
pt3dadd(103.495, 121.608, 29.5, 0.652)
pt3dadd(103.612, 121.636, 29.5, 0.652)
pt3dadd(103.729, 121.663, 29.5, 0.652)
pt3dadd(103.846, 121.687, 29.5, 0.654)
pt3dadd(103.965, 121.708, 29.5, 0.658)
pt3dadd(104.083, 121.727, 29.5, 0.662)
pt3dadd(104.202, 121.747, 29.5, 0.666)
pt3dadd(104.32, 121.766, 29.5, 0.67)
pt3dadd(104.438, 121.787, 29.5, 0.676)
pt3dadd(104.557, 121.806, 29.5, 0.684)
pt3dadd(104.675, 121.826, 29.5, 0.7)
pt3dadd(104.793, 121.846, 29.5, 0.716)
pt3dadd(104.912, 121.865, 29.5, 0.732)
pt3dadd(105.03, 121.885, 29.5, 0.75)
pt3dadd(105.148, 121.904, 29.5, 0.766)
pt3dadd(105.262, 121.937, 29.5, 0.78)
pt3dadd(105.358, 122.009, 29.5, 0.79)
pt3dadd(105.454, 122.081, 29.5, 0.8)
pt3dadd(105.55, 122.153, 29.5, 0.81)
pt3dadd(105.646, 122.225, 29.5, 0.822)
pt3dadd(105.73, 122.305, 29.496, 0.828)
pt3dadd(105.775, 122.414, 29.48, 0.828)
pt3dadd(105.825, 122.519, 29.46, 0.824)
pt3dadd(105.901, 122.594, 29.415, 0.796)
pt3dadd(105.98, 122.668, 29.371, 0.778)
pt3dadd(106.064, 122.736, 29.327, 0.778)
pt3dadd(106.169, 122.773, 29.308, 0.792)
pt3dadd(106.287, 122.795, 29.304, 0.812)
pt3dadd(106.398, 122.827, 29.3, 0.832)
pt3dadd(106.473, 122.922, 29.3, 0.85)
pt3dadd(106.578, 122.964, 29.289, 0.854)
pt3dadd(106.694, 122.987, 29.275, 0.854)
pt3dadd(106.805, 123.018, 29.252, 0.848)
pt3dadd(106.91, 123.06, 29.217, 0.836)
pt3dadd(107.021, 123.089, 29.193, 0.84)
pt3dadd(107.139, 123.106, 29.179, 0.86)
pt3dadd(107.251, 123.13, 29.162, 0.88)
pt3dadd(107.334, 123.205, 29.124, 0.894)
pt3dadd(107.389, 123.295, 29.1, 0.904)
pt3dadd(107.396, 123.415, 29.1, 0.904)
pt3dadd(107.434, 123.524, 29.099, 0.896)
pt3dadd(107.507, 123.619, 29.097, 0.882)
pt3dadd(107.58, 123.714, 29.094, 0.866)
pt3dadd(107.654, 123.809, 29.092, 0.85)
pt3dadd(107.727, 123.904, 29.09, 0.836)
pt3dadd(107.799, 123.997, 29.078, 0.822)
pt3dadd(107.872, 124.091, 29.058, 0.812)
pt3dadd(107.944, 124.183, 29.038, 0.8)
pt3dadd(108.016, 124.277, 29.018, 0.788)
pt3dadd(108.089, 124.368, 28.998, 0.778)
pt3dadd(108.168, 124.454, 28.975, 0.772)
pt3dadd(108.248, 124.54, 28.952, 0.766)
pt3dadd(108.327, 124.625, 28.929, 0.76)
pt3dadd(108.407, 124.711, 28.906, 0.754)
pt3dadd(108.498, 124.787, 28.9, 0.75)
pt3dadd(108.594, 124.859, 28.9, 0.744)
pt3dadd(108.69, 124.931, 28.9, 0.74)
pt3dadd(108.786, 125.003, 28.9, 0.734)
pt3dadd(108.882, 125.075, 28.9, 0.73)
pt3dadd(108.983, 125.14, 28.9, 0.72)
pt3dadd(109.085, 125.202, 28.9, 0.71)
pt3dadd(109.187, 125.266, 28.9, 0.702)
pt3dadd(109.289, 125.328, 28.9, 0.692)
pt3dadd(109.392, 125.392, 28.9, 0.682)
pt3dadd(109.47, 125.477, 28.885, 0.67)
pt3dadd(109.536, 125.573, 28.863, 0.66)
pt3dadd(109.602, 125.669, 28.84, 0.648)
pt3dadd(109.668, 125.766, 28.817, 0.636)
pt3dadd(109.733, 125.863, 28.799, 0.626)
pt3dadd(109.794, 125.966, 28.797, 0.622)
pt3dadd(109.855, 126.07, 28.795, 0.616)
pt3dadd(109.917, 126.174, 28.793, 0.612)
pt3dadd(109.977, 126.277, 28.791, 0.606)
pt3dadd(110.041, 126.374, 28.78, 0.606)
pt3dadd(110.118, 126.451, 28.736, 0.62)
pt3dadd(110.194, 126.534, 28.709, 0.628)
pt3dadd(110.272, 126.625, 28.703, 0.628)
pt3dadd(110.332, 126.725, 28.7, 0.624)
pt3dadd(110.366, 126.84, 28.7, 0.614)
pt3dadd(110.399, 126.956, 28.7, 0.604)
pt3dadd(110.4, 127.075, 28.7, 0.578)
pt3dadd(110.4, 127.195, 28.7, 0.554)
pt3dadd(110.4, 127.315, 28.7, 0.528)
pt3dadd(110.407, 127.435, 28.7, 0.528)
pt3dadd(110.415, 127.554, 28.697, 0.528)
pt3dadd(110.448, 127.658, 28.655, 0.54)
pt3dadd(110.481, 127.762, 28.613, 0.55)
pt3dadd(110.513, 127.866, 28.571, 0.562)
pt3dadd(110.546, 127.969, 28.529, 0.572)
pt3dadd(110.597, 128.072, 28.51, 0.59)
pt3dadd(110.661, 128.173, 28.508, 0.61)
pt3dadd(110.725, 128.275, 28.505, 0.63)
pt3dadd(110.789, 128.376, 28.503, 0.65)
pt3dadd(110.853, 128.478, 28.501, 0.67)
pt3dadd(110.906, 128.585, 28.5, 0.678)
pt3dadd(110.951, 128.696, 28.5, 0.678)
pt3dadd(110.995, 128.808, 28.5, 0.678)
pt3dadd(111.04, 128.92, 28.5, 0.678)
pt3dadd(111.084, 129.03, 28.5, 0.678)
pt3dadd(111.134, 129.139, 28.5, 0.678)
pt3dadd(111.203, 129.238, 28.5, 0.672)
pt3dadd(111.272, 129.336, 28.5, 0.666)
pt3dadd(111.341, 129.434, 28.5, 0.662)
pt3dadd(111.41, 129.532, 28.5, 0.656)
pt3dadd(111.469, 129.634, 28.5, 0.652)
pt3dadd(111.484, 129.752, 28.5, 0.644)
pt3dadd(111.499, 129.872, 28.5, 0.636)
pt3dadd(111.514, 129.991, 28.5, 0.628)
pt3dadd(111.529, 130.11, 28.5, 0.62)
pt3dadd(111.544, 130.229, 28.5, 0.612)
pt3dadd(111.559, 130.348, 28.5, 0.604)
pt3dadd(111.566, 130.468, 28.5, 0.606)
pt3dadd(111.572, 130.588, 28.5, 0.61)
pt3dadd(111.578, 130.708, 28.5, 0.614)
pt3dadd(111.584, 130.828, 28.5, 0.618)
pt3dadd(111.589, 130.948, 28.5, 0.622)
pt3dadd(111.595, 131.068, 28.5, 0.624)
pt3dadd(111.603, 131.186, 28.5, 0.63)
pt3dadd(111.615, 131.306, 28.5, 0.638)
pt3dadd(111.628, 131.425, 28.5, 0.646)
pt3dadd(111.641, 131.545, 28.5, 0.654)
pt3dadd(111.653, 131.664, 28.5, 0.662)
pt3dadd(111.666, 131.784, 28.5, 0.668)
pt3dadd(111.679, 131.903, 28.5, 0.676)
pt3dadd(111.693, 132.022, 28.5, 0.702)
pt3dadd(111.708, 132.142, 28.5, 0.73)
pt3dadd(111.72, 132.26, 28.5, 0.758)
pt3dadd(111.72, 132.38, 28.5, 0.792)
pt3dadd(111.72, 132.5, 28.5, 0.826)
pt3dadd(111.721, 132.62, 28.502, 0.858)
pt3dadd(111.726, 132.739, 28.515, 0.876)
pt3dadd(111.731, 132.858, 28.528, 0.896)
pt3dadd(111.779, 132.924, 28.575, 0.896)
pt3dadd(111.858, 132.953, 28.647, 0.882)
pt3dadd(111.947, 133.002, 28.696, 0.842)
pt3dadd(112.041, 133.06, 28.737, 0.792)
pt3dadd(112.134, 133.117, 28.778, 0.742)
pt3dadd(112.171, 133.218, 28.792, 0.694)
pt3dadd(112.187, 133.337, 28.796, 0.644)
pt3dadd(112.2, 133.457, 28.8, 0.596)
pt3dadd(112.203, 133.576, 28.804, 0.554)
pt3dadd(112.224, 133.69, 28.83, 0.57)
pt3dadd(112.245, 133.802, 28.857, 0.584)
pt3dadd(112.266, 133.916, 28.883, 0.6)
pt3dadd(112.288, 134.03, 28.909, 0.614)
pt3dadd(112.312, 134.143, 28.935, 0.63)
pt3dadd(112.365, 134.25, 28.949, 0.646)
pt3dadd(112.418, 134.356, 28.963, 0.66)
pt3dadd(112.471, 134.462, 28.977, 0.676)
pt3dadd(112.524, 134.569, 28.991, 0.692)
pt3dadd(112.573, 134.677, 29, 0.71)
pt3dadd(112.613, 134.79, 29, 0.732)
pt3dadd(112.653, 134.904, 29, 0.752)
pt3dadd(112.72, 135.002, 29, 0.742)
pt3dadd(112.788, 135.102, 29, 0.73)
pt3dadd(112.845, 135.204, 29.019, 0.708)
pt3dadd(112.9, 135.307, 29.042, 0.682)
pt3dadd(112.911, 135.338, 29.13, 0.652)
}
}
proc shape3d_145() {
dend_7[37] { pt3dadd(112.917, 135.36, 29.229, 0.622)
pt3dadd(112.92, 135.402, 29.319, 0.562)
pt3dadd(112.92, 135.478, 29.397, 0.456)
pt3dadd(113.009, 135.551, 29.415, 0.418)
pt3dadd(113.102, 135.625, 29.43, 0.384)
pt3dadd(113.194, 135.7, 29.446, 0.348)
pt3dadd(113.287, 135.774, 29.461, 0.314)
pt3dadd(113.38, 135.847, 29.477, 0.278)
pt3dadd(113.472, 135.922, 29.492, 0.244)
pt3dadd(113.576, 135.96, 29.488, 0.268)
pt3dadd(113.693, 135.96, 29.464, 0.352)
pt3dadd(113.809, 135.96, 29.44, 0.438)
pt3dadd(113.925, 135.96, 29.416, 0.522)
pt3dadd(114.043, 135.96, 29.4, 0.584)
pt3dadd(114.163, 135.96, 29.4, 0.602)
pt3dadd(114.283, 135.96, 29.4, 0.62)
pt3dadd(114.403, 135.96, 29.4, 0.638)
pt3dadd(114.523, 135.96, 29.4, 0.656)
pt3dadd(114.643, 135.96, 29.4, 0.674)
pt3dadd(114.763, 135.96, 29.4, 0.692)
pt3dadd(114.882, 135.968, 29.4, 0.708)
pt3dadd(115, 135.99, 29.4, 0.72)
pt3dadd(115.118, 136.013, 29.4, 0.732)
pt3dadd(115.236, 136.034, 29.4, 0.746)
pt3dadd(115.354, 136.057, 29.4, 0.758)
pt3dadd(115.472, 136.079, 29.4, 0.77)
pt3dadd(115.588, 136.109, 29.399, 0.774)
pt3dadd(115.7, 136.151, 29.397, 0.76)
pt3dadd(115.812, 136.194, 29.395, 0.746)
pt3dadd(115.925, 136.236, 29.393, 0.73)
pt3dadd(116.037, 136.278, 29.391, 0.716)
pt3dadd(116.149, 136.32, 29.389, 0.704)
pt3dadd(116.268, 136.32, 29.374, 0.7)
pt3dadd(116.387, 136.32, 29.36, 0.694)
pt3dadd(116.505, 136.32, 29.345, 0.69)
pt3dadd(116.624, 136.32, 29.331, 0.686)
pt3dadd(116.743, 136.32, 29.317, 0.682)
pt3dadd(116.862, 136.32, 29.302, 0.678)
pt3dadd(116.981, 136.308, 29.3, 0.662)
pt3dadd(117.1, 136.292, 29.3, 0.644)
pt3dadd(117.218, 136.276, 29.3, 0.626)
pt3dadd(117.334, 136.242, 29.3, 0.616)
pt3dadd(117.449, 136.208, 29.3, 0.606)
pt3dadd(117.568, 136.204, 29.3, 0.59)
pt3dadd(117.687, 136.208, 29.3, 0.572)
pt3dadd(117.807, 136.212, 29.3, 0.556)
pt3dadd(117.891, 136.258, 29.353, 0.54)
pt3dadd(117.963, 136.308, 29.419, 0.528)
pt3dadd(117.998, 136.316, 29.515, 0.546)
pt3dadd(118.074, 136.346, 29.568, 0.56)
pt3dadd(118.181, 136.393, 29.591, 0.572)
pt3dadd(118.279, 136.458, 29.61, 0.586)
pt3dadd(118.369, 136.534, 29.627, 0.598)
pt3dadd(118.458, 136.603, 29.658, 0.584)
pt3dadd(118.548, 136.67, 29.695, 0.556)
pt3dadd(118.626, 136.733, 29.651, 0.502)
pt3dadd(118.699, 136.788, 29.589, 0.442)
pt3dadd(118.745, 136.798, 29.497, 0.354)
pt3dadd(118.811, 136.835, 29.423, 0.318)
pt3dadd(118.885, 136.888, 29.358, 0.306)
pt3dadd(118.96, 136.939, 29.293, 0.294)
pt3dadd(119.035, 136.992, 29.228, 0.282)
pt3dadd(119.122, 137.052, 29.187, 0.28)
pt3dadd(119.218, 137.118, 29.164, 0.284)
pt3dadd(119.315, 137.184, 29.142, 0.29)
pt3dadd(119.411, 137.25, 29.119, 0.296)
pt3dadd(119.506, 137.318, 29.101, 0.306)
pt3dadd(119.59, 137.404, 29.106, 0.344)
pt3dadd(119.674, 137.488, 29.115, 0.378)
pt3dadd(119.756, 137.561, 29.156, 0.394)
pt3dadd(119.844, 137.622, 29.156, 0.396)
pt3dadd(119.939, 137.669, 29.11, 0.38)
pt3dadd(119.971, 137.761, 29.064, 0.366)
pt3dadd(119.985, 137.867, 29.017, 0.354)
pt3dadd(119.954, 137.98, 29.009, 0.362)
pt3dadd(119.916, 138.094, 29.006, 0.376)
pt3dadd(119.878, 138.206, 29.003, 0.388)
pt3dadd(119.84, 138.32, 29, 0.402)
pt3dadd(119.765, 138.414, 29, 0.46)
pt3dadd(119.689, 138.508, 29, 0.52)
pt3dadd(119.668, 138.617, 29.03, 0.558)
pt3dadd(119.654, 138.728, 29.065, 0.592)
pt3dadd(119.64, 138.84, 29.1, 0.628)
}
dend_7[38] {pt3dclear()
pt3dadd(34.993, 92.798, 23.724, 1.356)
pt3dadd(35.012, 92.791, 23.71, 1.354)
pt3dadd(35.099, 92.76, 23.647, 1.34)
pt3dadd(35.186, 92.729, 23.583, 1.326)
pt3dadd(35.273, 92.698, 23.519, 1.312)
pt3dadd(35.361, 92.667, 23.456, 1.298)
pt3dadd(35.448, 92.635, 23.392, 1.284)
pt3dadd(35.535, 92.604, 23.329, 1.27)
pt3dadd(35.623, 92.571, 23.266, 1.254)
pt3dadd(35.711, 92.538, 23.204, 1.24)
pt3dadd(35.799, 92.504, 23.142, 1.226)
pt3dadd(35.886, 92.47, 23.08, 1.212)
pt3dadd(35.974, 92.436, 23.018, 1.196)
pt3dadd(36.062, 92.403, 22.956, 1.182)
pt3dadd(36.15, 92.369, 22.894, 1.168)
pt3dadd(36.238, 92.335, 22.832, 1.152)
pt3dadd(36.326, 92.301, 22.77, 1.138)
pt3dadd(36.414, 92.268, 22.708, 1.124)
pt3dadd(36.498, 92.193, 22.694, 1.1)
pt3dadd(36.58, 92.105, 22.694, 1.076)
pt3dadd(36.662, 92.017, 22.694, 1.05)
pt3dadd(36.744, 91.93, 22.694, 1.024)
pt3dadd(36.826, 91.842, 22.694, 1)
pt3dadd(36.908, 91.755, 22.694, 0.974)
pt3dadd(36.99, 91.667, 22.694, 0.95)
pt3dadd(37.072, 91.58, 22.694, 0.924)
pt3dadd(37.154, 91.492, 22.694, 0.898)
pt3dadd(37.236, 91.404, 22.694, 0.874)
pt3dadd(37.318, 91.317, 22.694, 0.856)
pt3dadd(37.399, 91.229, 22.694, 0.842)
pt3dadd(37.481, 91.141, 22.694, 0.826)
pt3dadd(37.563, 91.053, 22.694, 0.812)
pt3dadd(37.644, 90.965, 22.694, 0.796)
pt3dadd(37.726, 90.877, 22.694, 0.782)
pt3dadd(37.807, 90.789, 22.694, 0.766)
pt3dadd(37.889, 90.701, 22.694, 0.752)
pt3dadd(37.971, 90.613, 22.694, 0.736)
pt3dadd(38.052, 90.525, 22.694, 0.722)
pt3dadd(38.133, 90.436, 22.694, 0.73)
pt3dadd(38.213, 90.347, 22.694, 0.746)
pt3dadd(38.293, 90.258, 22.694, 0.762)
pt3dadd(38.374, 90.168, 22.694, 0.78)
pt3dadd(38.454, 90.079, 22.694, 0.796)
pt3dadd(38.534, 89.99, 22.694, 0.812)
pt3dadd(38.614, 89.901, 22.694, 0.828)
pt3dadd(38.695, 89.812, 22.694, 0.844)
pt3dadd(38.775, 89.722, 22.694, 0.86)
pt3dadd(38.855, 89.633, 22.694, 0.876)
pt3dadd(38.934, 89.543, 22.694, 0.872)
pt3dadd(39.012, 89.451, 22.694, 0.862)
pt3dadd(39.09, 89.36, 22.694, 0.852)
pt3dadd(39.168, 89.269, 22.694, 0.842)
pt3dadd(39.246, 89.178, 22.694, 0.832)
pt3dadd(39.324, 89.087, 22.694, 0.822)
pt3dadd(39.402, 88.995, 22.694, 0.812)
pt3dadd(39.48, 88.904, 22.694, 0.802)
pt3dadd(39.558, 88.813, 22.694, 0.792)
pt3dadd(39.636, 88.722, 22.694, 0.782)
pt3dadd(39.708, 88.626, 22.694, 0.772)
pt3dadd(39.779, 88.53, 22.694, 0.762)
pt3dadd(39.85, 88.433, 22.694, 0.752)
pt3dadd(39.921, 88.336, 22.694, 0.742)
pt3dadd(39.992, 88.239, 22.694, 0.73)
pt3dadd(40.063, 88.142, 22.694, 0.72)
pt3dadd(40.134, 88.046, 22.694, 0.71)
pt3dadd(40.205, 87.949, 22.694, 0.7)
pt3dadd(40.276, 87.852, 22.694, 0.69)
pt3dadd(40.347, 87.755, 22.694, 0.68)
pt3dadd(40.404, 87.65, 22.694, 0.678)
pt3dadd(40.459, 87.543, 22.694, 0.678)
pt3dadd(40.514, 87.436, 22.694, 0.678)
pt3dadd(40.568, 87.33, 22.694, 0.678)
pt3dadd(40.623, 87.223, 22.694, 0.678)
pt3dadd(40.677, 87.116, 22.694, 0.678)
pt3dadd(40.732, 87.009, 22.694, 0.678)
pt3dadd(40.787, 86.902, 22.694, 0.678)
pt3dadd(40.841, 86.795, 22.694, 0.678)
pt3dadd(40.896, 86.688, 22.694, 0.678)
pt3dadd(40.956, 86.585, 22.694, 0.678)
pt3dadd(41.018, 86.482, 22.694, 0.678)
pt3dadd(41.08, 86.379, 22.694, 0.678)
pt3dadd(41.141, 86.276, 22.694, 0.678)
pt3dadd(41.203, 86.173, 22.694, 0.678)
pt3dadd(41.265, 86.07, 22.694, 0.678)
pt3dadd(41.326, 85.967, 22.694, 0.678)
pt3dadd(41.388, 85.864, 22.694, 0.678)
pt3dadd(41.45, 85.761, 22.694, 0.678)
pt3dadd(41.511, 85.658, 22.694, 0.678)
pt3dadd(41.565, 85.551, 22.694, 0.678)
pt3dadd(41.616, 85.442, 22.694, 0.678)
pt3dadd(41.667, 85.334, 22.694, 0.678)
pt3dadd(41.718, 85.225, 22.694, 0.678)
pt3dadd(41.77, 85.117, 22.694, 0.678)
pt3dadd(41.821, 85.008, 22.694, 0.678)
pt3dadd(41.872, 84.9, 22.694, 0.678)
pt3dadd(41.924, 84.792, 22.695, 0.678)
pt3dadd(41.975, 84.683, 22.695, 0.678)
pt3dadd(42.026, 84.575, 22.695, 0.678)
pt3dadd(42.077, 84.466, 22.695, 0.678)
pt3dadd(42.128, 84.357, 22.695, 0.678)
pt3dadd(42.179, 84.249, 22.695, 0.678)
pt3dadd(42.23, 84.14, 22.695, 0.678)
pt3dadd(42.281, 84.031, 22.695, 0.678)
pt3dadd(42.332, 83.922, 22.695, 0.678)
pt3dadd(42.382, 83.814, 22.695, 0.678)
pt3dadd(42.433, 83.705, 22.695, 0.678)
pt3dadd(42.484, 83.597, 22.695, 0.678)
pt3dadd(42.535, 83.488, 22.695, 0.678)
pt3dadd(42.596, 83.384, 22.695, 0.678)
pt3dadd(42.657, 83.281, 22.695, 0.678)
pt3dadd(42.719, 83.179, 22.695, 0.678)
pt3dadd(42.781, 83.076, 22.695, 0.678)
pt3dadd(42.843, 82.973, 22.695, 0.678)
pt3dadd(42.905, 82.87, 22.695, 0.678)
pt3dadd(42.966, 82.767, 22.695, 0.678)
pt3dadd(43.028, 82.664, 22.696, 0.678)
pt3dadd(43.09, 82.561, 22.696, 0.678)
}
}
proc shape3d_146() {
dend_7[38] { pt3dadd(43.152, 82.459, 22.696, 0.678)
pt3dadd(43.199, 82.348, 22.696, 0.678)
pt3dadd(43.244, 82.237, 22.696, 0.678)
pt3dadd(43.289, 82.126, 22.696, 0.678)
pt3dadd(43.334, 82.015, 22.696, 0.678)
pt3dadd(43.379, 81.903, 22.696, 0.678)
pt3dadd(43.424, 81.792, 22.696, 0.678)
pt3dadd(43.469, 81.681, 22.697, 0.678)
pt3dadd(43.514, 81.57, 22.697, 0.678)
pt3dadd(43.559, 81.458, 22.697, 0.678)
pt3dadd(43.604, 81.347, 22.697, 0.678)
pt3dadd(43.66, 81.241, 22.697, 0.668)
pt3dadd(43.717, 81.136, 22.698, 0.656)
pt3dadd(43.774, 81.03, 22.698, 0.644)
pt3dadd(43.832, 80.925, 22.698, 0.632)
pt3dadd(43.889, 80.819, 22.698, 0.62)
pt3dadd(43.946, 80.714, 22.698, 0.608)
pt3dadd(44.004, 80.608, 22.699, 0.596)
pt3dadd(44.061, 80.503, 22.699, 0.584)
pt3dadd(44.118, 80.397, 22.699, 0.572)
pt3dadd(44.175, 80.292, 22.699, 0.56)
pt3dadd(44.232, 80.186, 22.7, 0.556)
pt3dadd(44.288, 80.08, 22.7, 0.55)
pt3dadd(44.345, 79.974, 22.701, 0.546)
pt3dadd(44.401, 79.869, 22.701, 0.542)
pt3dadd(44.458, 79.763, 22.701, 0.536)
pt3dadd(44.514, 79.657, 22.702, 0.532)
pt3dadd(44.571, 79.551, 22.702, 0.528)
pt3dadd(44.627, 79.445, 22.703, 0.524)
pt3dadd(44.683, 79.339, 22.703, 0.518)
pt3dadd(44.74, 79.233, 22.704, 0.514)
pt3dadd(44.787, 79.123, 22.704, 0.53)
pt3dadd(44.834, 79.013, 22.705, 0.546)
pt3dadd(44.881, 78.902, 22.706, 0.562)
pt3dadd(44.928, 78.792, 22.706, 0.578)
pt3dadd(44.975, 78.681, 22.707, 0.594)
pt3dadd(45.022, 78.571, 22.708, 0.612)
pt3dadd(45.069, 78.46, 22.708, 0.628)
pt3dadd(45.116, 78.35, 22.709, 0.644)
pt3dadd(45.163, 78.24, 22.71, 0.66)
pt3dadd(45.21, 78.129, 22.71, 0.678)
pt3dadd(45.272, 78.027, 22.712, 0.678)
pt3dadd(45.335, 77.924, 22.713, 0.678)
pt3dadd(45.398, 77.822, 22.714, 0.678)
pt3dadd(45.461, 77.72, 22.716, 0.678)
pt3dadd(45.524, 77.618, 22.717, 0.678)
pt3dadd(45.587, 77.516, 22.718, 0.678)
pt3dadd(45.65, 77.414, 22.72, 0.678)
pt3dadd(45.713, 77.312, 22.721, 0.678)
pt3dadd(45.776, 77.21, 22.722, 0.678)
pt3dadd(45.839, 77.107, 22.724, 0.678)
pt3dadd(45.893, 77, 22.726, 0.654)
pt3dadd(45.947, 76.893, 22.728, 0.63)
pt3dadd(46, 76.786, 22.731, 0.606)
pt3dadd(46.054, 76.678, 22.733, 0.582)
pt3dadd(46.107, 76.571, 22.736, 0.556)
pt3dadd(46.161, 76.464, 22.738, 0.532)
pt3dadd(46.214, 76.356, 22.741, 0.508)
pt3dadd(46.268, 76.249, 22.743, 0.482)
pt3dadd(46.321, 76.141, 22.745, 0.458)
pt3dadd(46.375, 76.034, 22.748, 0.434)
pt3dadd(46.431, 75.928, 22.752, 0.426)
pt3dadd(46.487, 75.822, 22.756, 0.418)
pt3dadd(46.543, 75.716, 22.761, 0.41)
pt3dadd(46.599, 75.61, 22.765, 0.402)
pt3dadd(46.656, 75.504, 22.769, 0.396)
pt3dadd(46.712, 75.399, 22.774, 0.388)
pt3dadd(46.768, 75.293, 22.778, 0.38)
pt3dadd(46.824, 75.187, 22.782, 0.372)
pt3dadd(46.881, 75.081, 22.787, 0.364)
pt3dadd(46.937, 74.975, 22.791, 0.358)
pt3dadd(47.003, 74.875, 22.798, 0.39)
pt3dadd(47.069, 74.775, 22.804, 0.422)
pt3dadd(47.135, 74.675, 22.81, 0.454)
pt3dadd(47.201, 74.575, 22.817, 0.486)
pt3dadd(47.267, 74.475, 22.823, 0.518)
pt3dadd(47.333, 74.376, 22.83, 0.55)
pt3dadd(47.399, 74.276, 22.836, 0.582)
pt3dadd(47.465, 74.176, 22.842, 0.614)
pt3dadd(47.531, 74.076, 22.849, 0.646)
pt3dadd(47.597, 73.976, 22.855, 0.678)
}
dend_7[39] {pt3dclear()
pt3dadd(47.597, 73.976, 22.855, 0.678)
pt3dadd(47.636, 73.922, 22.861, 0.67)
pt3dadd(47.706, 73.825, 22.872, 0.654)
pt3dadd(47.776, 73.728, 22.882, 0.638)
pt3dadd(47.846, 73.632, 22.893, 0.622)
pt3dadd(47.916, 73.535, 22.903, 0.608)
pt3dadd(47.986, 73.438, 22.914, 0.592)
pt3dadd(48.056, 73.342, 22.924, 0.576)
pt3dadd(48.125, 73.245, 22.936, 0.56)
pt3dadd(48.19, 73.146, 22.954, 0.546)
pt3dadd(48.255, 73.048, 22.972, 0.53)
pt3dadd(48.32, 72.949, 22.99, 0.514)
pt3dadd(48.384, 72.85, 23.008, 0.498)
pt3dadd(48.449, 72.752, 23.026, 0.482)
pt3dadd(48.514, 72.653, 23.044, 0.466)
pt3dadd(48.579, 72.554, 23.062, 0.45)
pt3dadd(48.644, 72.456, 23.08, 0.434)
pt3dadd(48.708, 72.357, 23.098, 0.418)
pt3dadd(48.77, 72.258, 23.119, 0.402)
pt3dadd(48.819, 72.157, 23.155, 0.386)
pt3dadd(48.868, 72.057, 23.191, 0.37)
pt3dadd(48.918, 71.956, 23.227, 0.354)
pt3dadd(48.967, 71.856, 23.264, 0.338)
pt3dadd(49.016, 71.755, 23.299, 0.322)
pt3dadd(49.065, 71.655, 23.335, 0.306)
pt3dadd(49.115, 71.554, 23.372, 0.29)
pt3dadd(49.164, 71.454, 23.407, 0.274)
pt3dadd(49.213, 71.353, 23.444, 0.258)
pt3dadd(49.263, 71.252, 23.478, 0.248)
pt3dadd(49.318, 71.151, 23.506, 0.26)
pt3dadd(49.373, 71.049, 23.534, 0.272)
pt3dadd(49.427, 70.948, 23.562, 0.284)
pt3dadd(49.482, 70.847, 23.59, 0.298)
pt3dadd(49.536, 70.745, 23.618, 0.31)
pt3dadd(49.591, 70.644, 23.646, 0.322)
pt3dadd(49.646, 70.542, 23.674, 0.336)
pt3dadd(49.7, 70.441, 23.702, 0.348)
pt3dadd(49.755, 70.339, 23.73, 0.36)
pt3dadd(49.808, 70.237, 23.757, 0.374)
pt3dadd(49.854, 70.13, 23.781, 0.39)
pt3dadd(49.9, 70.023, 23.806, 0.408)
pt3dadd(49.946, 69.916, 23.83, 0.426)
pt3dadd(49.992, 69.809, 23.854, 0.442)
pt3dadd(50.038, 69.702, 23.879, 0.46)
pt3dadd(50.084, 69.595, 23.903, 0.476)
pt3dadd(50.13, 69.489, 23.927, 0.494)
pt3dadd(50.176, 69.382, 23.952, 0.51)
pt3dadd(50.222, 69.275, 23.976, 0.528)
pt3dadd(50.265, 69.167, 24, 0.544)
pt3dadd(50.299, 69.056, 24.026, 0.558)
pt3dadd(50.333, 68.945, 24.051, 0.572)
pt3dadd(50.367, 68.833, 24.076, 0.586)
pt3dadd(50.401, 68.722, 24.101, 0.6)
pt3dadd(50.435, 68.611, 24.126, 0.614)
pt3dadd(50.469, 68.5, 24.151, 0.626)
pt3dadd(50.503, 68.389, 24.176, 0.64)
pt3dadd(50.537, 68.278, 24.201, 0.654)
pt3dadd(50.571, 68.167, 24.226, 0.668)
pt3dadd(50.603, 68.057, 24.254, 0.678)
pt3dadd(50.63, 67.948, 24.291, 0.678)
pt3dadd(50.657, 67.84, 24.328, 0.678)
pt3dadd(50.683, 67.732, 24.365, 0.678)
pt3dadd(50.71, 67.623, 24.401, 0.678)
pt3dadd(50.737, 67.515, 24.438, 0.678)
pt3dadd(50.763, 67.407, 24.475, 0.678)
pt3dadd(50.79, 67.298, 24.512, 0.678)
pt3dadd(50.817, 67.19, 24.549, 0.678)
pt3dadd(50.843, 67.081, 24.585, 0.678)
pt3dadd(50.875, 66.973, 24.618, 0.668)
pt3dadd(50.921, 66.866, 24.643, 0.636)
pt3dadd(50.966, 66.759, 24.667, 0.604)
pt3dadd(51.012, 66.652, 24.691, 0.572)
pt3dadd(51.057, 66.545, 24.715, 0.54)
pt3dadd(51.102, 66.437, 24.74, 0.508)
pt3dadd(51.148, 66.33, 24.764, 0.476)
pt3dadd(51.193, 66.223, 24.788, 0.444)
pt3dadd(51.239, 66.116, 24.812, 0.412)
pt3dadd(51.284, 66.009, 24.837, 0.38)
pt3dadd(51.328, 65.9, 24.859, 0.358)
pt3dadd(51.37, 65.79, 24.876, 0.356)
pt3dadd(51.411, 65.679, 24.893, 0.354)
pt3dadd(51.453, 65.568, 24.91, 0.352)
pt3dadd(51.494, 65.458, 24.927, 0.35)
pt3dadd(51.536, 65.347, 24.944, 0.346)
pt3dadd(51.577, 65.236, 24.961, 0.344)
pt3dadd(51.619, 65.125, 24.979, 0.342)
pt3dadd(51.66, 65.015, 24.996, 0.34)
pt3dadd(51.702, 64.904, 25.013, 0.338)
pt3dadd(51.741, 64.792, 25.028, 0.342)
pt3dadd(51.777, 64.678, 25.039, 0.362)
pt3dadd(51.812, 64.564, 25.05, 0.38)
pt3dadd(51.847, 64.45, 25.06, 0.398)
pt3dadd(51.882, 64.337, 25.071, 0.416)
pt3dadd(51.918, 64.223, 25.082, 0.434)
pt3dadd(51.953, 64.109, 25.093, 0.452)
pt3dadd(51.988, 63.995, 25.104, 0.47)
pt3dadd(52.024, 63.881, 25.115, 0.49)
pt3dadd(52.059, 63.767, 25.126, 0.508)
pt3dadd(52.094, 63.653, 25.136, 0.524)
pt3dadd(52.128, 63.538, 25.143, 0.54)
pt3dadd(52.162, 63.423, 25.151, 0.556)
pt3dadd(52.196, 63.309, 25.158, 0.572)
pt3dadd(52.23, 63.194, 25.166, 0.588)
pt3dadd(52.264, 63.079, 25.173, 0.604)
pt3dadd(52.298, 62.964, 25.181, 0.62)
pt3dadd(52.332, 62.85, 25.188, 0.636)
pt3dadd(52.366, 62.735, 25.196, 0.652)
pt3dadd(52.4, 62.62, 25.203, 0.668)
pt3dadd(52.441, 62.508, 25.212, 0.678)
pt3dadd(52.494, 62.401, 25.222, 0.678)
pt3dadd(52.546, 62.294, 25.233, 0.678)
pt3dadd(52.599, 62.187, 25.244, 0.678)
pt3dadd(52.652, 62.08, 25.254, 0.678)
pt3dadd(52.704, 61.973, 25.265, 0.678)
pt3dadd(52.757, 61.866, 25.276, 0.678)
pt3dadd(52.81, 61.759, 25.287, 0.678)
pt3dadd(52.863, 61.652, 25.297, 0.678)
pt3dadd(52.915, 61.545, 25.308, 0.678)
pt3dadd(52.965, 61.438, 25.326, 0.688)
}
}
proc shape3d_147() {
dend_7[39] { pt3dadd(53.009, 61.334, 25.357, 0.716)
pt3dadd(53.054, 61.229, 25.389, 0.744)
pt3dadd(53.098, 61.124, 25.42, 0.772)
pt3dadd(53.143, 61.019, 25.451, 0.8)
pt3dadd(53.187, 60.914, 25.482, 0.828)
pt3dadd(53.232, 60.809, 25.513, 0.854)
pt3dadd(53.276, 60.704, 25.545, 0.882)
pt3dadd(53.321, 60.599, 25.576, 0.91)
pt3dadd(53.365, 60.494, 25.607, 0.938)
pt3dadd(53.413, 60.39, 25.638, 0.958)
pt3dadd(53.465, 60.287, 25.667, 0.968)
pt3dadd(53.516, 60.185, 25.695, 0.978)
pt3dadd(53.568, 60.082, 25.724, 0.988)
pt3dadd(53.62, 59.98, 25.754, 0.998)
pt3dadd(53.672, 59.877, 25.783, 1.008)
pt3dadd(53.723, 59.775, 25.812, 1.018)
pt3dadd(53.775, 59.672, 25.841, 1.028)
pt3dadd(53.827, 59.57, 25.87, 1.038)
pt3dadd(53.879, 59.467, 25.899, 1.048)
pt3dadd(53.934, 59.366, 25.924, 1.048)
pt3dadd(53.995, 59.265, 25.945, 1.032)
pt3dadd(54.056, 59.165, 25.967, 1.016)
pt3dadd(54.116, 59.064, 25.988, 1.002)
pt3dadd(54.177, 58.964, 26.009, 0.986)
pt3dadd(54.237, 58.864, 26.03, 0.972)
pt3dadd(54.298, 58.763, 26.051, 0.956)
pt3dadd(54.358, 58.663, 26.073, 0.942)
pt3dadd(54.419, 58.562, 26.094, 0.926)
pt3dadd(54.479, 58.462, 26.115, 0.912)
pt3dadd(54.534, 58.358, 26.132, 0.904)
pt3dadd(54.582, 58.249, 26.145, 0.904)
pt3dadd(54.631, 58.14, 26.158, 0.904)
pt3dadd(54.679, 58.031, 26.171, 0.904)
pt3dadd(54.728, 57.923, 26.183, 0.904)
pt3dadd(54.776, 57.814, 26.196, 0.904)
pt3dadd(54.824, 57.705, 26.209, 0.904)
pt3dadd(54.873, 57.596, 26.222, 0.904)
pt3dadd(54.921, 57.488, 26.235, 0.904)
pt3dadd(54.969, 57.379, 26.247, 0.904)
pt3dadd(55.024, 57.273, 26.258, 0.904)
pt3dadd(55.086, 57.171, 26.265, 0.904)
pt3dadd(55.147, 57.068, 26.273, 0.904)
pt3dadd(55.209, 56.966, 26.281, 0.904)
pt3dadd(55.271, 56.863, 26.288, 0.904)
pt3dadd(55.333, 56.76, 26.296, 0.904)
pt3dadd(55.394, 56.658, 26.304, 0.904)
pt3dadd(55.456, 56.556, 26.311, 0.904)
pt3dadd(55.518, 56.453, 26.319, 0.904)
pt3dadd(55.579, 56.35, 26.327, 0.904)
pt3dadd(55.644, 56.25, 26.334, 0.898)
pt3dadd(55.71, 56.15, 26.342, 0.886)
pt3dadd(55.777, 56.051, 26.349, 0.874)
pt3dadd(55.843, 55.951, 26.357, 0.864)
pt3dadd(55.91, 55.852, 26.364, 0.852)
pt3dadd(55.976, 55.752, 26.372, 0.84)
pt3dadd(56.043, 55.653, 26.38, 0.828)
pt3dadd(56.109, 55.553, 26.387, 0.816)
pt3dadd(56.176, 55.454, 26.395, 0.804)
pt3dadd(56.242, 55.354, 26.402, 0.794)
pt3dadd(56.31, 55.256, 26.411, 0.772)
pt3dadd(56.378, 55.158, 26.421, 0.74)
pt3dadd(56.447, 55.06, 26.431, 0.708)
pt3dadd(56.515, 54.962, 26.441, 0.676)
pt3dadd(56.583, 54.864, 26.451, 0.646)
pt3dadd(56.652, 54.766, 26.461, 0.614)
pt3dadd(56.72, 54.669, 26.471, 0.582)
pt3dadd(56.789, 54.571, 26.481, 0.55)
pt3dadd(56.857, 54.473, 26.491, 0.518)
pt3dadd(56.925, 54.375, 26.501, 0.486)
pt3dadd(56.984, 54.275, 26.523, 0.462)
pt3dadd(57.033, 54.174, 26.557, 0.444)
pt3dadd(57.082, 54.072, 26.591, 0.428)
pt3dadd(57.132, 53.97, 26.625, 0.41)
pt3dadd(57.181, 53.869, 26.659, 0.392)
pt3dadd(57.23, 53.767, 26.693, 0.374)
pt3dadd(57.279, 53.666, 26.727, 0.358)
pt3dadd(57.329, 53.564, 26.761, 0.34)
pt3dadd(57.378, 53.463, 26.795, 0.322)
pt3dadd(57.427, 53.361, 26.829, 0.304)
pt3dadd(57.472, 53.257, 26.861, 0.31)
pt3dadd(57.513, 53.15, 26.891, 0.334)
pt3dadd(57.554, 53.043, 26.921, 0.358)
pt3dadd(57.595, 52.936, 26.951, 0.382)
pt3dadd(57.636, 52.83, 26.981, 0.406)
pt3dadd(57.678, 52.723, 27.011, 0.432)
pt3dadd(57.719, 52.616, 27.041, 0.456)
pt3dadd(57.76, 52.509, 27.071, 0.48)
pt3dadd(57.801, 52.402, 27.101, 0.504)
pt3dadd(57.842, 52.295, 27.131, 0.528)
pt3dadd(57.885, 52.188, 27.157, 0.56)
pt3dadd(57.93, 52.08, 27.179, 0.596)
pt3dadd(57.975, 51.972, 27.202, 0.634)
pt3dadd(58.019, 51.864, 27.224, 0.67)
pt3dadd(58.064, 51.755, 27.247, 0.706)
pt3dadd(58.108, 51.647, 27.269, 0.744)
pt3dadd(58.153, 51.539, 27.292, 0.78)
pt3dadd(58.197, 51.431, 27.314, 0.816)
pt3dadd(58.242, 51.323, 27.337, 0.854)
pt3dadd(58.286, 51.215, 27.359, 0.89)
pt3dadd(58.342, 51.111, 27.377, 0.904)
pt3dadd(58.403, 51.01, 27.393, 0.904)
pt3dadd(58.465, 50.909, 27.408, 0.904)
pt3dadd(58.527, 50.807, 27.424, 0.904)
pt3dadd(58.588, 50.706, 27.439, 0.904)
pt3dadd(58.65, 50.605, 27.455, 0.904)
pt3dadd(58.711, 50.503, 27.47, 0.904)
pt3dadd(58.773, 50.402, 27.485, 0.904)
pt3dadd(58.835, 50.301, 27.501, 0.904)
pt3dadd(58.896, 50.199, 27.516, 0.904)
pt3dadd(58.967, 50.104, 27.527, 0.904)
pt3dadd(59.044, 50.013, 27.536, 0.904)
pt3dadd(59.121, 49.921, 27.544, 0.904)
pt3dadd(59.198, 49.829, 27.553, 0.904)
pt3dadd(59.275, 49.738, 27.561, 0.904)
pt3dadd(59.351, 49.646, 27.57, 0.904)
pt3dadd(59.428, 49.554, 27.579, 0.904)
pt3dadd(59.505, 49.463, 27.587, 0.904)
pt3dadd(59.582, 49.371, 27.595, 0.904)
pt3dadd(59.659, 49.28, 27.604, 0.904)
pt3dadd(59.734, 49.192, 27.628, 0.914)
pt3dadd(59.808, 49.106, 27.66, 0.93)
pt3dadd(59.882, 49.02, 27.692, 0.946)
pt3dadd(59.957, 48.934, 27.725, 0.964)
pt3dadd(60.031, 48.848, 27.757, 0.98)
pt3dadd(60.105, 48.762, 27.789, 0.996)
pt3dadd(60.179, 48.676, 27.822, 1.012)
pt3dadd(60.253, 48.59, 27.854, 1.028)
pt3dadd(60.328, 48.504, 27.886, 1.044)
pt3dadd(60.402, 48.418, 27.918, 1.06)
pt3dadd(60.477, 48.33, 27.946, 1.048)
pt3dadd(60.551, 48.241, 27.971, 1.024)
pt3dadd(60.626, 48.153, 27.997, 1.002)
pt3dadd(60.701, 48.064, 28.022, 0.98)
pt3dadd(60.775, 47.975, 28.048, 0.956)
pt3dadd(60.85, 47.886, 28.073, 0.934)
pt3dadd(60.925, 47.797, 28.099, 0.91)
pt3dadd(61, 47.709, 28.124, 0.888)
pt3dadd(61.074, 47.62, 28.15, 0.864)
pt3dadd(61.149, 47.531, 28.175, 0.842)
pt3dadd(61.213, 47.431, 28.176, 0.802)
pt3dadd(61.275, 47.328, 28.17, 0.76)
pt3dadd(61.337, 47.226, 28.165, 0.716)
pt3dadd(61.399, 47.123, 28.16, 0.672)
pt3dadd(61.461, 47.021, 28.154, 0.63)
pt3dadd(61.523, 46.918, 28.149, 0.586)
pt3dadd(61.585, 46.816, 28.144, 0.542)
pt3dadd(61.647, 46.713, 28.138, 0.5)
pt3dadd(61.709, 46.61, 28.133, 0.456)
pt3dadd(61.771, 46.508, 28.127, 0.414)
pt3dadd(61.831, 46.405, 28.116, 0.396)
pt3dadd(61.891, 46.302, 28.104, 0.376)
pt3dadd(61.951, 46.199, 28.092, 0.358)
pt3dadd(62.011, 46.096, 28.081, 0.338)
pt3dadd(62.071, 45.993, 28.069, 0.32)
pt3dadd(62.131, 45.89, 28.058, 0.3)
pt3dadd(62.191, 45.787, 28.046, 0.28)
pt3dadd(62.251, 45.684, 28.034, 0.262)
pt3dadd(62.311, 45.581, 28.023, 0.242)
pt3dadd(62.371, 45.479, 28.015, 0.226)
pt3dadd(62.436, 45.382, 28.039, 0.226)
pt3dadd(62.502, 45.285, 28.062, 0.226)
pt3dadd(62.567, 45.188, 28.085, 0.226)
pt3dadd(62.632, 45.091, 28.108, 0.226)
pt3dadd(62.697, 44.994, 28.131, 0.226)
pt3dadd(62.762, 44.898, 28.155, 0.226)
pt3dadd(62.827, 44.801, 28.178, 0.226)
pt3dadd(62.892, 44.704, 28.201, 0.226)
pt3dadd(62.957, 44.607, 28.224, 0.226)
pt3dadd(63.008, 44.533, 28.284, 0.252)
pt3dadd(63.052, 44.468, 28.36, 0.292)
pt3dadd(63.096, 44.404, 28.436, 0.33)
pt3dadd(63.141, 44.339, 28.511, 0.368)
pt3dadd(63.185, 44.275, 28.587, 0.408)
pt3dadd(63.229, 44.21, 28.663, 0.446)
pt3dadd(63.274, 44.146, 28.739, 0.484)
pt3dadd(63.318, 44.081, 28.815, 0.524)
pt3dadd(63.362, 44.017, 28.891, 0.562)
pt3dadd(63.406, 43.953, 28.967, 0.6)
pt3dadd(63.455, 43.882, 29.037, 0.6)
pt3dadd(63.504, 43.811, 29.106, 0.594)
pt3dadd(63.553, 43.74, 29.176, 0.588)
pt3dadd(63.602, 43.669, 29.245, 0.582)
pt3dadd(63.651, 43.598, 29.315, 0.576)
pt3dadd(63.7, 43.527, 29.385, 0.572)
pt3dadd(63.749, 43.456, 29.454, 0.566)
pt3dadd(63.798, 43.386, 29.524, 0.56)
pt3dadd(63.847, 43.314, 29.593, 0.554)
pt3dadd(63.896, 43.24, 29.66, 0.544)
pt3dadd(63.943, 43.15, 29.712, 0.512)
pt3dadd(63.991, 43.059, 29.764, 0.48)
pt3dadd(64.039, 42.968, 29.816, 0.446)
pt3dadd(64.087, 42.878, 29.867, 0.414)
pt3dadd(64.135, 42.787, 29.919, 0.382)
pt3dadd(64.183, 42.696, 29.971, 0.35)
pt3dadd(64.231, 42.605, 30.023, 0.316)
pt3dadd(64.279, 42.515, 30.075, 0.284)
pt3dadd(64.327, 42.424, 30.127, 0.252)
pt3dadd(64.372, 42.331, 30.177, 0.226)
pt3dadd(64.408, 42.231, 30.223, 0.226)
pt3dadd(64.444, 42.131, 30.269, 0.226)
}
}
proc shape3d_148() {
dend_7[39] { pt3dadd(64.48, 42.03, 30.315, 0.226)
pt3dadd(64.516, 41.93, 30.361, 0.226)
pt3dadd(64.552, 41.83, 30.407, 0.226)
pt3dadd(64.588, 41.729, 30.453, 0.226)
pt3dadd(64.624, 41.629, 30.499, 0.226)
pt3dadd(64.66, 41.529, 30.545, 0.226)
pt3dadd(64.696, 41.429, 30.591, 0.226)
pt3dadd(64.731, 41.326, 30.633, 0.226)
pt3dadd(64.762, 41.215, 30.663, 0.226)
pt3dadd(64.792, 41.105, 30.693, 0.226)
pt3dadd(64.823, 40.995, 30.723, 0.226)
pt3dadd(64.853, 40.884, 30.753, 0.226)
pt3dadd(64.884, 40.774, 30.783, 0.226)
pt3dadd(64.915, 40.664, 30.813, 0.226)
pt3dadd(64.945, 40.554, 30.843, 0.226)
pt3dadd(64.976, 40.443, 30.873, 0.226)
pt3dadd(65.006, 40.333, 30.903, 0.226)
pt3dadd(65.043, 40.224, 30.931, 0.23)
pt3dadd(65.095, 40.12, 30.953, 0.246)
pt3dadd(65.148, 40.015, 30.975, 0.262)
pt3dadd(65.201, 39.911, 30.998, 0.278)
pt3dadd(65.253, 39.806, 31.02, 0.294)
pt3dadd(65.306, 39.702, 31.042, 0.31)
pt3dadd(65.358, 39.597, 31.064, 0.326)
pt3dadd(65.411, 39.492, 31.086, 0.342)
pt3dadd(65.464, 39.388, 31.108, 0.358)
pt3dadd(65.516, 39.283, 31.13, 0.372)
pt3dadd(65.568, 39.179, 31.154, 0.386)
pt3dadd(65.618, 39.077, 31.186, 0.394)
pt3dadd(65.669, 38.975, 31.217, 0.4)
pt3dadd(65.719, 38.872, 31.248, 0.406)
pt3dadd(65.769, 38.77, 31.279, 0.414)
pt3dadd(65.819, 38.668, 31.311, 0.42)
pt3dadd(65.87, 38.565, 31.342, 0.426)
pt3dadd(65.92, 38.463, 31.373, 0.434)
pt3dadd(65.97, 38.361, 31.405, 0.44)
pt3dadd(66.02, 38.259, 31.436, 0.448)
pt3dadd(66.071, 38.157, 31.468, 0.45)
pt3dadd(66.124, 38.058, 31.504, 0.446)
pt3dadd(66.177, 37.959, 31.539, 0.442)
pt3dadd(66.23, 37.86, 31.574, 0.438)
pt3dadd(66.283, 37.761, 31.609, 0.434)
pt3dadd(66.336, 37.662, 31.644, 0.43)
pt3dadd(66.389, 37.563, 31.679, 0.426)
pt3dadd(66.442, 37.464, 31.714, 0.422)
pt3dadd(66.495, 37.365, 31.75, 0.418)
pt3dadd(66.549, 37.266, 31.785, 0.414)
pt3dadd(66.607, 37.169, 31.817, 0.406)
pt3dadd(66.675, 37.076, 31.845, 0.39)
pt3dadd(66.744, 36.983, 31.872, 0.372)
pt3dadd(66.813, 36.89, 31.9, 0.356)
pt3dadd(66.881, 36.798, 31.927, 0.34)
pt3dadd(66.95, 36.705, 31.955, 0.324)
pt3dadd(67.018, 36.612, 31.982, 0.308)
pt3dadd(67.087, 36.519, 32.009, 0.292)
pt3dadd(67.155, 36.426, 32.037, 0.276)
pt3dadd(67.224, 36.333, 32.064, 0.258)
pt3dadd(67.295, 36.242, 32.09, 0.258)
pt3dadd(67.372, 36.153, 32.111, 0.284)
pt3dadd(67.448, 36.065, 32.133, 0.31)
pt3dadd(67.525, 35.976, 32.155, 0.336)
pt3dadd(67.601, 35.888, 32.177, 0.362)
pt3dadd(67.678, 35.799, 32.198, 0.388)
pt3dadd(67.755, 35.71, 32.22, 0.416)
pt3dadd(67.831, 35.622, 32.242, 0.442)
pt3dadd(67.908, 35.533, 32.264, 0.468)
pt3dadd(67.984, 35.445, 32.286, 0.494)
pt3dadd(68.062, 35.359, 32.312, 0.518)
pt3dadd(68.14, 35.278, 32.347, 0.534)
pt3dadd(68.218, 35.197, 32.382, 0.55)
pt3dadd(68.296, 35.117, 32.418, 0.568)
pt3dadd(68.374, 35.036, 32.453, 0.584)
pt3dadd(68.452, 34.955, 32.488, 0.602)
pt3dadd(68.53, 34.875, 32.523, 0.618)
pt3dadd(68.608, 34.794, 32.558, 0.636)
pt3dadd(68.687, 34.713, 32.594, 0.652)
pt3dadd(68.765, 34.632, 32.629, 0.67)
pt3dadd(68.844, 34.555, 32.667, 0.67)
pt3dadd(68.923, 34.48, 32.709, 0.652)
pt3dadd(69.003, 34.406, 32.751, 0.634)
pt3dadd(69.082, 34.331, 32.793, 0.614)
pt3dadd(69.161, 34.257, 32.835, 0.596)
pt3dadd(69.241, 34.182, 32.877, 0.578)
pt3dadd(69.32, 34.108, 32.919, 0.56)
pt3dadd(69.4, 34.033, 32.961, 0.542)
pt3dadd(69.479, 33.959, 33.003, 0.524)
pt3dadd(69.559, 33.884, 33.045, 0.506)
pt3dadd(69.642, 33.811, 33.081, 0.486)
pt3dadd(69.73, 33.738, 33.112, 0.466)
pt3dadd(69.818, 33.665, 33.144, 0.446)
pt3dadd(69.905, 33.591, 33.175, 0.424)
pt3dadd(69.993, 33.519, 33.206, 0.404)
pt3dadd(70.08, 33.446, 33.238, 0.384)
pt3dadd(70.167, 33.372, 33.269, 0.364)
pt3dadd(70.255, 33.3, 33.3, 0.342)
pt3dadd(70.343, 33.226, 33.332, 0.322)
pt3dadd(70.43, 33.153, 33.363, 0.302)
pt3dadd(70.519, 33.083, 33.394, 0.298)
pt3dadd(70.61, 33.013, 33.425, 0.31)
pt3dadd(70.701, 32.944, 33.457, 0.322)
pt3dadd(70.791, 32.875, 33.488, 0.332)
pt3dadd(70.882, 32.806, 33.519, 0.344)
pt3dadd(70.973, 32.737, 33.55, 0.356)
pt3dadd(71.063, 32.668, 33.581, 0.368)
pt3dadd(71.154, 32.599, 33.612, 0.378)
pt3dadd(71.245, 32.529, 33.644, 0.39)
pt3dadd(71.335, 32.46, 33.675, 0.402)
pt3dadd(71.408, 32.378, 33.714, 0.394)
pt3dadd(71.472, 32.291, 33.756, 0.38)
pt3dadd(71.536, 32.203, 33.799, 0.364)
pt3dadd(71.601, 32.116, 33.841, 0.35)
pt3dadd(71.665, 32.028, 33.884, 0.334)
pt3dadd(71.729, 31.941, 33.926, 0.32)
pt3dadd(71.794, 31.853, 33.969, 0.304)
pt3dadd(71.858, 31.766, 34.011, 0.29)
pt3dadd(71.923, 31.678, 34.054, 0.274)
pt3dadd(71.987, 31.591, 34.096, 0.26)
pt3dadd(72.055, 31.501, 34.13, 0.28)
pt3dadd(72.126, 31.411, 34.16, 0.316)
pt3dadd(72.196, 31.32, 34.19, 0.354)
pt3dadd(72.266, 31.23, 34.22, 0.388)
pt3dadd(72.336, 31.14, 34.25, 0.426)
pt3dadd(72.407, 31.049, 34.28, 0.462)
pt3dadd(72.477, 30.959, 34.31, 0.498)
pt3dadd(72.547, 30.868, 34.34, 0.534)
pt3dadd(72.617, 30.778, 34.37, 0.57)
pt3dadd(72.687, 30.688, 34.4, 0.606)
pt3dadd(72.75, 30.59, 34.426, 0.62)
pt3dadd(72.809, 30.49, 34.451, 0.626)
pt3dadd(72.868, 30.39, 34.475, 0.632)
pt3dadd(72.928, 30.29, 34.5, 0.64)
pt3dadd(72.987, 30.19, 34.525, 0.646)
pt3dadd(73.046, 30.09, 34.549, 0.652)
pt3dadd(73.105, 29.99, 34.574, 0.658)
pt3dadd(73.165, 29.89, 34.598, 0.664)
pt3dadd(73.224, 29.79, 34.623, 0.67)
pt3dadd(73.283, 29.69, 34.648, 0.676)
pt3dadd(73.355, 29.604, 34.681, 0.658)
pt3dadd(73.432, 29.523, 34.718, 0.632)
pt3dadd(73.509, 29.442, 34.756, 0.606)
pt3dadd(73.586, 29.362, 34.793, 0.578)
pt3dadd(73.663, 29.281, 34.83, 0.552)
pt3dadd(73.74, 29.2, 34.867, 0.524)
pt3dadd(73.816, 29.12, 34.904, 0.498)
pt3dadd(73.893, 29.039, 34.941, 0.472)
pt3dadd(73.97, 28.958, 34.978, 0.444)
pt3dadd(74.047, 28.878, 35.015, 0.418)
pt3dadd(74.136, 28.808, 35.05, 0.398)
pt3dadd(74.225, 28.739, 35.084, 0.38)
pt3dadd(74.315, 28.671, 35.118, 0.36)
pt3dadd(74.404, 28.602, 35.152, 0.342)
pt3dadd(74.493, 28.533, 35.186, 0.322)
pt3dadd(74.583, 28.464, 35.22, 0.302)
pt3dadd(74.672, 28.395, 35.254, 0.284)
pt3dadd(74.762, 28.326, 35.288, 0.264)
pt3dadd(74.851, 28.258, 35.322, 0.246)
pt3dadd(74.94, 28.189, 35.356, 0.226)
pt3dadd(75.032, 28.118, 35.382, 0.226)
pt3dadd(75.124, 28.046, 35.407, 0.226)
pt3dadd(75.215, 27.975, 35.433, 0.226)
pt3dadd(75.307, 27.904, 35.458, 0.226)
pt3dadd(75.399, 27.833, 35.483, 0.226)
pt3dadd(75.49, 27.762, 35.509, 0.226)
pt3dadd(75.582, 27.69, 35.534, 0.226)
pt3dadd(75.673, 27.619, 35.56, 0.226)
pt3dadd(75.765, 27.548, 35.585, 0.226)
pt3dadd(75.857, 27.477, 35.611, 0.226)
}
dend_7[40] {pt3dclear()
pt3dadd(47.597, 73.976, 22.855, 0.678)
pt3dadd(47.602, 73.887, 22.845, 0.678)
pt3dadd(47.608, 73.769, 22.831, 0.678)
pt3dadd(47.615, 73.65, 22.818, 0.678)
pt3dadd(47.622, 73.531, 22.804, 0.678)
pt3dadd(47.628, 73.413, 22.791, 0.678)
pt3dadd(47.635, 73.294, 22.777, 0.678)
pt3dadd(47.642, 73.175, 22.764, 0.678)
pt3dadd(47.648, 73.057, 22.75, 0.678)
pt3dadd(47.655, 72.938, 22.736, 0.678)
pt3dadd(47.622, 72.846, 22.689, 0.658)
pt3dadd(47.573, 72.767, 22.626, 0.628)
pt3dadd(47.523, 72.687, 22.564, 0.6)
pt3dadd(47.473, 72.608, 22.502, 0.572)
pt3dadd(47.424, 72.528, 22.439, 0.542)
pt3dadd(47.374, 72.449, 22.377, 0.514)
pt3dadd(47.325, 72.369, 22.314, 0.484)
pt3dadd(47.275, 72.289, 22.252, 0.456)
pt3dadd(47.226, 72.21, 22.19, 0.426)
pt3dadd(47.177, 72.131, 22.126, 0.404)
pt3dadd(47.129, 72.053, 22.061, 0.384)
pt3dadd(47.081, 71.975, 21.997, 0.364)
pt3dadd(47.032, 71.896, 21.933, 0.344)
pt3dadd(46.984, 71.818, 21.868, 0.324)
pt3dadd(46.936, 71.74, 21.804, 0.304)
pt3dadd(46.888, 71.662, 21.74, 0.282)
pt3dadd(46.84, 71.583, 21.676, 0.262)
pt3dadd(46.791, 71.505, 21.611, 0.242)
pt3dadd(46.751, 71.422, 21.549, 0.23)
pt3dadd(46.743, 71.319, 21.499, 0.252)
pt3dadd(46.735, 71.216, 21.448, 0.274)
pt3dadd(46.727, 71.113, 21.397, 0.294)
pt3dadd(46.719, 71.01, 21.346, 0.316)
}
}
proc shape3d_149() {
dend_7[40] { pt3dadd(46.711, 70.907, 21.295, 0.338)
pt3dadd(46.703, 70.804, 21.244, 0.36)
pt3dadd(46.695, 70.701, 21.193, 0.382)
pt3dadd(46.687, 70.598, 21.143, 0.402)
pt3dadd(46.679, 70.495, 21.092, 0.424)
pt3dadd(46.679, 70.392, 21.043, 0.446)
pt3dadd(46.701, 70.285, 21, 0.472)
pt3dadd(46.724, 70.179, 20.957, 0.496)
pt3dadd(46.746, 70.073, 20.914, 0.52)
pt3dadd(46.769, 69.967, 20.871, 0.544)
pt3dadd(46.791, 69.861, 20.829, 0.568)
pt3dadd(46.814, 69.755, 20.786, 0.594)
pt3dadd(46.836, 69.649, 20.743, 0.618)
pt3dadd(46.859, 69.543, 20.7, 0.642)
pt3dadd(46.882, 69.437, 20.657, 0.666)
pt3dadd(46.919, 69.332, 20.624, 0.678)
pt3dadd(46.97, 69.228, 20.599, 0.678)
pt3dadd(47.022, 69.123, 20.574, 0.678)
pt3dadd(47.073, 69.019, 20.549, 0.678)
pt3dadd(47.125, 68.915, 20.524, 0.678)
pt3dadd(47.176, 68.811, 20.5, 0.678)
pt3dadd(47.227, 68.706, 20.475, 0.678)
pt3dadd(47.279, 68.602, 20.45, 0.678)
pt3dadd(47.33, 68.498, 20.425, 0.678)
pt3dadd(47.382, 68.394, 20.401, 0.678)
pt3dadd(47.43, 68.287, 20.379, 0.678)
pt3dadd(47.474, 68.178, 20.36, 0.678)
pt3dadd(47.519, 68.069, 20.342, 0.678)
pt3dadd(47.564, 67.96, 20.323, 0.678)
pt3dadd(47.609, 67.851, 20.304, 0.678)
pt3dadd(47.654, 67.742, 20.286, 0.678)
pt3dadd(47.699, 67.633, 20.267, 0.678)
pt3dadd(47.744, 67.524, 20.248, 0.678)
pt3dadd(47.788, 67.415, 20.23, 0.678)
pt3dadd(47.833, 67.306, 20.211, 0.678)
pt3dadd(47.886, 67.2, 20.194, 0.686)
pt3dadd(47.946, 67.098, 20.179, 0.698)
pt3dadd(48.007, 66.996, 20.165, 0.712)
pt3dadd(48.067, 66.893, 20.15, 0.726)
pt3dadd(48.127, 66.791, 20.135, 0.738)
pt3dadd(48.187, 66.689, 20.12, 0.752)
pt3dadd(48.247, 66.586, 20.105, 0.766)
pt3dadd(48.307, 66.484, 20.09, 0.78)
pt3dadd(48.368, 66.382, 20.075, 0.792)
pt3dadd(48.428, 66.28, 20.06, 0.806)
pt3dadd(48.486, 66.178, 20.038, 0.818)
pt3dadd(48.541, 66.078, 20.009, 0.826)
pt3dadd(48.597, 65.977, 19.98, 0.836)
pt3dadd(48.653, 65.877, 19.951, 0.846)
pt3dadd(48.708, 65.776, 19.922, 0.854)
pt3dadd(48.764, 65.676, 19.893, 0.864)
pt3dadd(48.82, 65.576, 19.865, 0.874)
pt3dadd(48.876, 65.475, 19.836, 0.882)
pt3dadd(48.931, 65.375, 19.807, 0.892)
pt3dadd(48.987, 65.274, 19.778, 0.902)
pt3dadd(49.039, 65.178, 19.737, 0.912)
pt3dadd(49.09, 65.084, 19.692, 0.926)
pt3dadd(49.141, 64.989, 19.647, 0.938)
pt3dadd(49.192, 64.895, 19.602, 0.95)
pt3dadd(49.243, 64.801, 19.557, 0.962)
pt3dadd(49.293, 64.707, 19.512, 0.974)
pt3dadd(49.344, 64.612, 19.467, 0.986)
pt3dadd(49.395, 64.518, 19.422, 0.998)
pt3dadd(49.446, 64.424, 19.377, 1.01)
pt3dadd(49.497, 64.33, 19.332, 1.024)
pt3dadd(49.566, 64.248, 19.287, 1.066)
pt3dadd(49.639, 64.17, 19.242, 1.118)
pt3dadd(49.713, 64.092, 19.197, 1.17)
pt3dadd(49.787, 64.014, 19.152, 1.222)
pt3dadd(49.86, 63.936, 19.107, 1.274)
pt3dadd(49.934, 63.858, 19.062, 1.326)
pt3dadd(50.008, 63.781, 19.018, 1.378)
pt3dadd(50.081, 63.703, 18.973, 1.43)
pt3dadd(50.155, 63.625, 18.928, 1.482)
pt3dadd(50.229, 63.547, 18.883, 1.534)
pt3dadd(50.278, 63.462, 18.827, 1.512)
pt3dadd(50.323, 63.375, 18.768, 1.474)
pt3dadd(50.368, 63.289, 18.71, 1.436)
pt3dadd(50.413, 63.202, 18.652, 1.398)
pt3dadd(50.458, 63.116, 18.593, 1.362)
pt3dadd(50.503, 63.03, 18.535, 1.324)
pt3dadd(50.548, 62.943, 18.476, 1.286)
pt3dadd(50.593, 62.857, 18.418, 1.248)
pt3dadd(50.638, 62.771, 18.36, 1.212)
pt3dadd(50.683, 62.684, 18.301, 1.174)
pt3dadd(50.741, 62.592, 18.259, 1.112)
pt3dadd(50.801, 62.499, 18.221, 1.046)
pt3dadd(50.861, 62.406, 18.182, 0.978)
pt3dadd(50.921, 62.313, 18.144, 0.912)
pt3dadd(50.981, 62.22, 18.105, 0.846)
pt3dadd(51.041, 62.127, 18.067, 0.778)
pt3dadd(51.101, 62.034, 18.028, 0.712)
pt3dadd(51.162, 61.941, 17.99, 0.646)
pt3dadd(51.222, 61.848, 17.951, 0.578)
pt3dadd(51.282, 61.755, 17.913, 0.512)
pt3dadd(51.329, 61.659, 17.868, 0.506)
pt3dadd(51.375, 61.563, 17.822, 0.508)
pt3dadd(51.42, 61.467, 17.776, 0.51)
pt3dadd(51.466, 61.37, 17.73, 0.512)
pt3dadd(51.512, 61.274, 17.684, 0.516)
pt3dadd(51.557, 61.178, 17.638, 0.518)
pt3dadd(51.603, 61.082, 17.592, 0.52)
pt3dadd(51.649, 60.985, 17.546, 0.522)
pt3dadd(51.694, 60.889, 17.5, 0.524)
pt3dadd(51.74, 60.793, 17.454, 0.528)
pt3dadd(51.778, 60.695, 17.405, 0.564)
pt3dadd(51.817, 60.597, 17.357, 0.602)
pt3dadd(51.855, 60.499, 17.308, 0.64)
pt3dadd(51.893, 60.402, 17.26, 0.678)
pt3dadd(51.931, 60.304, 17.211, 0.714)
pt3dadd(51.969, 60.206, 17.163, 0.752)
pt3dadd(52.008, 60.108, 17.115, 0.79)
pt3dadd(52.046, 60.01, 17.066, 0.828)
pt3dadd(52.084, 59.913, 17.018, 0.866)
pt3dadd(52.122, 59.815, 16.969, 0.904)
pt3dadd(52.171, 59.715, 16.932, 0.904)
pt3dadd(52.22, 59.615, 16.895, 0.904)
pt3dadd(52.27, 59.515, 16.857, 0.904)
pt3dadd(52.319, 59.415, 16.82, 0.904)
pt3dadd(52.368, 59.316, 16.782, 0.904)
pt3dadd(52.417, 59.216, 16.745, 0.904)
pt3dadd(52.466, 59.116, 16.708, 0.904)
pt3dadd(52.516, 59.016, 16.67, 0.904)
pt3dadd(52.565, 58.916, 16.633, 0.904)
pt3dadd(52.614, 58.816, 16.596, 0.904)
}
dend_7[41] {pt3dclear()
pt3dadd(52.614, 58.816, 16.596, 0.904)
pt3dadd(52.622, 58.775, 16.562, 0.926)
pt3dadd(52.638, 58.69, 16.492, 0.972)
pt3dadd(52.655, 58.606, 16.422, 1.016)
pt3dadd(52.671, 58.521, 16.353, 1.062)
pt3dadd(52.688, 58.437, 16.283, 1.108)
pt3dadd(52.704, 58.352, 16.213, 1.152)
pt3dadd(52.7, 58.26, 16.152, 1.146)
pt3dadd(52.681, 58.162, 16.096, 1.1)
pt3dadd(52.662, 58.065, 16.04, 1.052)
pt3dadd(52.643, 57.967, 15.984, 1.006)
pt3dadd(52.624, 57.869, 15.928, 0.958)
pt3dadd(52.605, 57.772, 15.872, 0.912)
pt3dadd(52.586, 57.674, 15.816, 0.866)
pt3dadd(52.566, 57.576, 15.761, 0.818)
pt3dadd(52.547, 57.479, 15.705, 0.772)
pt3dadd(52.528, 57.381, 15.649, 0.726)
pt3dadd(52.491, 57.282, 15.601, 0.702)
pt3dadd(52.452, 57.183, 15.554, 0.68)
pt3dadd(52.414, 57.085, 15.507, 0.66)
pt3dadd(52.376, 56.986, 15.46, 0.638)
pt3dadd(52.338, 56.887, 15.413, 0.616)
pt3dadd(52.299, 56.789, 15.366, 0.594)
pt3dadd(52.261, 56.69, 15.319, 0.572)
pt3dadd(52.223, 56.591, 15.272, 0.55)
pt3dadd(52.185, 56.493, 15.225, 0.528)
pt3dadd(52.147, 56.394, 15.177, 0.506)
pt3dadd(52.114, 56.293, 15.131, 0.55)
pt3dadd(52.081, 56.192, 15.084, 0.594)
pt3dadd(52.049, 56.091, 15.038, 0.638)
pt3dadd(52.016, 55.99, 14.991, 0.682)
pt3dadd(51.984, 55.889, 14.944, 0.728)
pt3dadd(51.951, 55.788, 14.898, 0.772)
pt3dadd(51.919, 55.687, 14.851, 0.816)
pt3dadd(51.886, 55.586, 14.804, 0.86)
pt3dadd(51.853, 55.485, 14.758, 0.904)
pt3dadd(51.821, 55.383, 14.712, 0.948)
pt3dadd(51.796, 55.273, 14.679, 0.966)
pt3dadd(51.771, 55.162, 14.646, 0.984)
pt3dadd(51.746, 55.051, 14.614, 1.002)
pt3dadd(51.721, 54.941, 14.581, 1.02)
pt3dadd(51.696, 54.83, 14.549, 1.036)
pt3dadd(51.671, 54.719, 14.516, 1.054)
pt3dadd(51.646, 54.609, 14.483, 1.072)
pt3dadd(51.621, 54.498, 14.451, 1.09)
pt3dadd(51.595, 54.387, 14.418, 1.108)
pt3dadd(51.57, 54.277, 14.386, 1.122)
pt3dadd(51.528, 54.17, 14.358, 1.056)
pt3dadd(51.485, 54.063, 14.329, 0.99)
pt3dadd(51.443, 53.956, 14.301, 0.924)
pt3dadd(51.401, 53.849, 14.273, 0.858)
pt3dadd(51.359, 53.742, 14.245, 0.792)
pt3dadd(51.316, 53.634, 14.216, 0.726)
pt3dadd(51.274, 53.527, 14.188, 0.66)
pt3dadd(51.232, 53.42, 14.16, 0.594)
pt3dadd(51.19, 53.313, 14.132, 0.528)
pt3dadd(51.148, 53.206, 14.103, 0.462)
pt3dadd(51.116, 53.101, 14.062, 0.438)
pt3dadd(51.085, 52.996, 14.021, 0.414)
pt3dadd(51.054, 52.891, 13.98, 0.39)
pt3dadd(51.023, 52.786, 13.939, 0.366)
pt3dadd(50.991, 52.682, 13.899, 0.344)
pt3dadd(50.96, 52.577, 13.858, 0.32)
pt3dadd(50.929, 52.472, 13.817, 0.296)
pt3dadd(50.897, 52.367, 13.776, 0.272)
pt3dadd(50.866, 52.262, 13.735, 0.248)
pt3dadd(50.836, 52.157, 13.693, 0.226)
pt3dadd(50.815, 52.056, 13.642, 0.226)
pt3dadd(50.794, 51.955, 13.591, 0.226)
pt3dadd(50.773, 51.853, 13.541, 0.226)
pt3dadd(50.752, 51.752, 13.49, 0.226)
pt3dadd(50.731, 51.651, 13.439, 0.226)
pt3dadd(50.71, 51.549, 13.389, 0.226)
pt3dadd(50.689, 51.448, 13.338, 0.226)
pt3dadd(50.668, 51.347, 13.287, 0.226)
}
}
proc shape3d_150() {
dend_7[41] { pt3dadd(50.647, 51.246, 13.237, 0.226)
pt3dadd(50.628, 51.145, 13.185, 0.226)
pt3dadd(50.618, 51.048, 13.126, 0.226)
pt3dadd(50.608, 50.952, 13.067, 0.226)
pt3dadd(50.598, 50.856, 13.008, 0.226)
pt3dadd(50.588, 50.759, 12.949, 0.226)
pt3dadd(50.578, 50.663, 12.89, 0.226)
pt3dadd(50.568, 50.566, 12.832, 0.226)
pt3dadd(50.558, 50.47, 12.773, 0.226)
pt3dadd(50.548, 50.373, 12.714, 0.226)
pt3dadd(50.538, 50.277, 12.655, 0.226)
pt3dadd(50.529, 50.179, 12.598, 0.226)
pt3dadd(50.529, 50.073, 12.55, 0.226)
pt3dadd(50.529, 49.968, 12.503, 0.226)
pt3dadd(50.528, 49.862, 12.455, 0.226)
pt3dadd(50.528, 49.757, 12.407, 0.226)
pt3dadd(50.527, 49.651, 12.36, 0.226)
pt3dadd(50.527, 49.545, 12.312, 0.226)
pt3dadd(50.526, 49.44, 12.265, 0.226)
pt3dadd(50.526, 49.334, 12.217, 0.226)
pt3dadd(50.525, 49.229, 12.17, 0.226)
pt3dadd(50.525, 49.123, 12.122, 0.226)
pt3dadd(50.527, 49.018, 12.074, 0.226)
pt3dadd(50.53, 48.912, 12.027, 0.226)
pt3dadd(50.532, 48.807, 11.979, 0.226)
pt3dadd(50.534, 48.702, 11.931, 0.226)
pt3dadd(50.537, 48.596, 11.884, 0.226)
pt3dadd(50.539, 48.491, 11.836, 0.226)
pt3dadd(50.541, 48.385, 11.788, 0.226)
pt3dadd(50.543, 48.28, 11.74, 0.226)
pt3dadd(50.546, 48.174, 11.693, 0.226)
pt3dadd(50.548, 48.069, 11.645, 0.226)
pt3dadd(50.552, 47.964, 11.597, 0.226)
pt3dadd(50.556, 47.859, 11.549, 0.226)
pt3dadd(50.56, 47.753, 11.501, 0.226)
pt3dadd(50.564, 47.648, 11.453, 0.226)
pt3dadd(50.568, 47.543, 11.405, 0.226)
pt3dadd(50.572, 47.438, 11.357, 0.226)
pt3dadd(50.576, 47.333, 11.309, 0.226)
pt3dadd(50.58, 47.228, 11.261, 0.226)
pt3dadd(50.584, 47.122, 11.213, 0.226)
pt3dadd(50.589, 47.016, 11.167, 0.226)
pt3dadd(50.597, 46.903, 11.133, 0.226)
pt3dadd(50.606, 46.791, 11.099, 0.226)
pt3dadd(50.614, 46.678, 11.065, 0.226)
pt3dadd(50.622, 46.566, 11.03, 0.226)
pt3dadd(50.631, 46.454, 10.996, 0.226)
pt3dadd(50.639, 46.341, 10.962, 0.226)
pt3dadd(50.648, 46.229, 10.928, 0.226)
pt3dadd(50.656, 46.116, 10.894, 0.226)
pt3dadd(50.664, 46.004, 10.859, 0.226)
pt3dadd(50.674, 45.892, 10.823, 0.232)
pt3dadd(50.686, 45.786, 10.779, 0.262)
pt3dadd(50.699, 45.679, 10.735, 0.292)
pt3dadd(50.712, 45.572, 10.69, 0.324)
pt3dadd(50.725, 45.465, 10.646, 0.354)
pt3dadd(50.738, 45.358, 10.602, 0.384)
pt3dadd(50.751, 45.252, 10.557, 0.414)
pt3dadd(50.764, 45.145, 10.513, 0.444)
pt3dadd(50.776, 45.038, 10.469, 0.476)
pt3dadd(50.789, 44.931, 10.424, 0.506)
pt3dadd(50.806, 44.824, 10.382, 0.53)
pt3dadd(50.838, 44.715, 10.349, 0.524)
pt3dadd(50.869, 44.607, 10.316, 0.52)
pt3dadd(50.901, 44.498, 10.283, 0.514)
pt3dadd(50.933, 44.389, 10.25, 0.51)
pt3dadd(50.965, 44.281, 10.217, 0.506)
pt3dadd(50.997, 44.172, 10.184, 0.5)
pt3dadd(51.029, 44.063, 10.151, 0.496)
pt3dadd(51.06, 43.955, 10.118, 0.49)
pt3dadd(51.092, 43.846, 10.084, 0.486)
pt3dadd(51.128, 43.737, 10.056, 0.476)
pt3dadd(51.17, 43.627, 10.036, 0.454)
pt3dadd(51.212, 43.517, 10.016, 0.434)
pt3dadd(51.254, 43.408, 9.996, 0.412)
pt3dadd(51.296, 43.298, 9.976, 0.392)
pt3dadd(51.339, 43.188, 9.956, 0.37)
pt3dadd(51.381, 43.078, 9.936, 0.35)
pt3dadd(51.423, 42.969, 9.916, 0.328)
pt3dadd(51.465, 42.859, 9.896, 0.308)
pt3dadd(51.507, 42.749, 9.876, 0.286)
pt3dadd(51.546, 42.638, 9.859, 0.28)
pt3dadd(51.579, 42.523, 9.847, 0.298)
pt3dadd(51.611, 42.408, 9.836, 0.314)
pt3dadd(51.644, 42.294, 9.824, 0.332)
pt3dadd(51.677, 42.179, 9.812, 0.35)
pt3dadd(51.709, 42.065, 9.8, 0.366)
pt3dadd(51.742, 41.95, 9.789, 0.384)
pt3dadd(51.775, 41.835, 9.777, 0.402)
pt3dadd(51.807, 41.721, 9.765, 0.418)
pt3dadd(51.84, 41.606, 9.754, 0.436)
pt3dadd(51.869, 41.49, 9.745, 0.44)
pt3dadd(51.894, 41.373, 9.743, 0.42)
pt3dadd(51.918, 41.256, 9.74, 0.402)
pt3dadd(51.942, 41.138, 9.737, 0.384)
pt3dadd(51.966, 41.021, 9.734, 0.364)
pt3dadd(51.991, 40.903, 9.731, 0.346)
pt3dadd(52.015, 40.786, 9.729, 0.326)
pt3dadd(52.039, 40.668, 9.726, 0.308)
pt3dadd(52.063, 40.551, 9.723, 0.29)
pt3dadd(52.088, 40.433, 9.72, 0.27)
pt3dadd(52.111, 40.315, 9.716, 0.258)
pt3dadd(52.131, 40.197, 9.71, 0.254)
pt3dadd(52.152, 40.08, 9.704, 0.25)
pt3dadd(52.173, 39.962, 9.697, 0.248)
pt3dadd(52.194, 39.844, 9.691, 0.244)
pt3dadd(52.214, 39.726, 9.685, 0.24)
pt3dadd(52.235, 39.608, 9.679, 0.238)
pt3dadd(52.256, 39.49, 9.672, 0.234)
pt3dadd(52.277, 39.372, 9.666, 0.232)
pt3dadd(52.297, 39.254, 9.66, 0.228)
pt3dadd(52.327, 39.138, 9.653, 0.226)
pt3dadd(52.37, 39.027, 9.644, 0.226)
pt3dadd(52.413, 38.915, 9.634, 0.226)
pt3dadd(52.455, 38.804, 9.625, 0.226)
pt3dadd(52.498, 38.692, 9.616, 0.226)
pt3dadd(52.541, 38.581, 9.607, 0.226)
pt3dadd(52.584, 38.469, 9.598, 0.226)
pt3dadd(52.627, 38.358, 9.589, 0.226)
pt3dadd(52.67, 38.246, 9.579, 0.226)
pt3dadd(52.713, 38.135, 9.57, 0.226)
pt3dadd(52.761, 38.026, 9.557, 0.226)
pt3dadd(52.815, 37.921, 9.539, 0.226)
pt3dadd(52.869, 37.816, 9.522, 0.226)
pt3dadd(52.923, 37.711, 9.504, 0.226)
pt3dadd(52.977, 37.606, 9.487, 0.226)
pt3dadd(53.03, 37.5, 9.469, 0.226)
pt3dadd(53.084, 37.395, 9.452, 0.226)
pt3dadd(53.138, 37.29, 9.434, 0.226)
pt3dadd(53.191, 37.185, 9.417, 0.226)
pt3dadd(53.245, 37.08, 9.399, 0.226)
pt3dadd(53.296, 36.976, 9.372, 0.226)
pt3dadd(53.345, 36.875, 9.338, 0.226)
pt3dadd(53.394, 36.773, 9.304, 0.226)
pt3dadd(53.443, 36.671, 9.27, 0.226)
pt3dadd(53.492, 36.57, 9.236, 0.226)
pt3dadd(53.541, 36.468, 9.203, 0.226)
pt3dadd(53.59, 36.366, 9.168, 0.226)
pt3dadd(53.639, 36.264, 9.135, 0.226)
pt3dadd(53.688, 36.163, 9.101, 0.226)
pt3dadd(53.737, 36.061, 9.067, 0.226)
pt3dadd(53.797, 35.963, 9.04, 0.226)
pt3dadd(53.865, 35.868, 9.019, 0.226)
pt3dadd(53.934, 35.772, 8.998, 0.226)
pt3dadd(54.002, 35.677, 8.978, 0.226)
pt3dadd(54.07, 35.581, 8.957, 0.226)
pt3dadd(54.139, 35.486, 8.936, 0.226)
pt3dadd(54.207, 35.391, 8.915, 0.226)
pt3dadd(54.276, 35.295, 8.895, 0.226)
pt3dadd(54.344, 35.2, 8.874, 0.226)
pt3dadd(54.412, 35.104, 8.853, 0.226)
pt3dadd(54.484, 35.01, 8.836, 0.226)
pt3dadd(54.557, 34.917, 8.821, 0.226)
pt3dadd(54.631, 34.824, 8.806, 0.226)
pt3dadd(54.705, 34.731, 8.791, 0.226)
pt3dadd(54.778, 34.638, 8.776, 0.226)
pt3dadd(54.852, 34.545, 8.762, 0.226)
pt3dadd(54.925, 34.452, 8.747, 0.226)
pt3dadd(54.999, 34.359, 8.732, 0.226)
pt3dadd(55.073, 34.266, 8.717, 0.226)
pt3dadd(55.146, 34.172, 8.702, 0.226)
pt3dadd(55.222, 34.081, 8.691, 0.226)
pt3dadd(55.3, 33.99, 8.683, 0.226)
pt3dadd(55.378, 33.9, 8.674, 0.226)
pt3dadd(55.456, 33.809, 8.666, 0.226)
pt3dadd(55.534, 33.718, 8.657, 0.226)
pt3dadd(55.612, 33.628, 8.649, 0.226)
pt3dadd(55.69, 33.537, 8.64, 0.226)
pt3dadd(55.768, 33.447, 8.632, 0.226)
pt3dadd(55.846, 33.356, 8.623, 0.226)
pt3dadd(55.924, 33.265, 8.615, 0.226)
pt3dadd(56.004, 33.176, 8.611, 0.234)
pt3dadd(56.086, 33.088, 8.61, 0.246)
pt3dadd(56.167, 33, 8.608, 0.258)
pt3dadd(56.249, 32.912, 8.607, 0.27)
pt3dadd(56.33, 32.823, 8.606, 0.282)
pt3dadd(56.412, 32.735, 8.605, 0.296)
pt3dadd(56.493, 32.647, 8.604, 0.308)
pt3dadd(56.574, 32.559, 8.602, 0.32)
pt3dadd(56.656, 32.471, 8.601, 0.332)
pt3dadd(56.737, 32.383, 8.6, 0.344)
pt3dadd(56.818, 32.295, 8.599, 0.356)
pt3dadd(56.9, 32.206, 8.599, 0.366)
pt3dadd(56.981, 32.118, 8.599, 0.376)
pt3dadd(57.062, 32.03, 8.599, 0.386)
pt3dadd(57.143, 31.941, 8.598, 0.396)
pt3dadd(57.225, 31.853, 8.598, 0.408)
pt3dadd(57.306, 31.765, 8.598, 0.418)
pt3dadd(57.387, 31.676, 8.597, 0.428)
pt3dadd(57.468, 31.588, 8.597, 0.438)
pt3dadd(57.55, 31.5, 8.597, 0.448)
pt3dadd(57.63, 31.411, 8.597, 0.452)
pt3dadd(57.71, 31.321, 8.596, 0.452)
pt3dadd(57.789, 31.231, 8.596, 0.452)
pt3dadd(57.869, 31.141, 8.595, 0.452)
pt3dadd(57.949, 31.052, 8.595, 0.452)
pt3dadd(58.029, 30.962, 8.595, 0.452)
pt3dadd(58.108, 30.872, 8.594, 0.452)
pt3dadd(58.188, 30.783, 8.594, 0.452)
pt3dadd(58.268, 30.693, 8.593, 0.452)
}
}
proc shape3d_151() {
dend_7[41] { pt3dadd(58.347, 30.603, 8.593, 0.452)
pt3dadd(58.42, 30.508, 8.592, 0.452)
pt3dadd(58.487, 30.408, 8.591, 0.452)
pt3dadd(58.554, 30.309, 8.59, 0.452)
pt3dadd(58.622, 30.21, 8.59, 0.452)
pt3dadd(58.689, 30.111, 8.589, 0.452)
pt3dadd(58.757, 30.011, 8.588, 0.452)
pt3dadd(58.824, 29.912, 8.587, 0.452)
pt3dadd(58.892, 29.813, 8.586, 0.452)
pt3dadd(58.959, 29.714, 8.585, 0.452)
pt3dadd(59.026, 29.614, 8.584, 0.452)
pt3dadd(59.093, 29.515, 8.583, 0.448)
pt3dadd(59.16, 29.415, 8.582, 0.442)
pt3dadd(59.226, 29.315, 8.58, 0.436)
pt3dadd(59.293, 29.215, 8.579, 0.43)
pt3dadd(59.359, 29.115, 8.578, 0.426)
pt3dadd(59.426, 29.015, 8.576, 0.42)
pt3dadd(59.492, 28.915, 8.575, 0.414)
pt3dadd(59.558, 28.815, 8.573, 0.408)
pt3dadd(59.625, 28.716, 8.572, 0.402)
pt3dadd(59.691, 28.616, 8.571, 0.396)
pt3dadd(59.763, 28.519, 8.569, 0.384)
pt3dadd(59.836, 28.424, 8.567, 0.368)
pt3dadd(59.91, 28.329, 8.565, 0.352)
pt3dadd(59.983, 28.235, 8.563, 0.336)
pt3dadd(60.057, 28.14, 8.561, 0.322)
pt3dadd(60.13, 28.045, 8.559, 0.306)
pt3dadd(60.204, 27.95, 8.557, 0.29)
pt3dadd(60.277, 27.855, 8.555, 0.274)
pt3dadd(60.351, 27.761, 8.553, 0.258)
pt3dadd(60.424, 27.666, 8.551, 0.242)
pt3dadd(60.503, 27.576, 8.547, 0.246)
pt3dadd(60.585, 27.489, 8.543, 0.258)
pt3dadd(60.668, 27.401, 8.538, 0.272)
pt3dadd(60.75, 27.314, 8.533, 0.284)
pt3dadd(60.832, 27.227, 8.529, 0.298)
pt3dadd(60.914, 27.139, 8.524, 0.31)
pt3dadd(60.996, 27.052, 8.519, 0.324)
pt3dadd(61.078, 26.965, 8.515, 0.336)
pt3dadd(61.16, 26.877, 8.51, 0.35)
pt3dadd(61.242, 26.79, 8.506, 0.362)
pt3dadd(61.327, 26.705, 8.5, 0.372)
pt3dadd(61.413, 26.622, 8.494, 0.382)
pt3dadd(61.499, 26.538, 8.488, 0.39)
pt3dadd(61.585, 26.455, 8.482, 0.398)
pt3dadd(61.671, 26.372, 8.476, 0.406)
pt3dadd(61.757, 26.288, 8.47, 0.416)
pt3dadd(61.843, 26.205, 8.465, 0.424)
pt3dadd(61.929, 26.121, 8.459, 0.432)
pt3dadd(62.015, 26.038, 8.453, 0.44)
pt3dadd(62.101, 25.955, 8.447, 0.45)
pt3dadd(62.19, 25.874, 8.44, 0.452)
pt3dadd(62.279, 25.795, 8.433, 0.452)
pt3dadd(62.369, 25.716, 8.425, 0.452)
pt3dadd(62.459, 25.637, 8.418, 0.452)
pt3dadd(62.549, 25.558, 8.411, 0.452)
pt3dadd(62.638, 25.478, 8.403, 0.452)
pt3dadd(62.728, 25.399, 8.396, 0.452)
pt3dadd(62.818, 25.32, 8.389, 0.452)
pt3dadd(62.908, 25.241, 8.381, 0.452)
pt3dadd(62.998, 25.162, 8.374, 0.452)
pt3dadd(63.093, 25.096, 8.352, 0.462)
pt3dadd(63.191, 25.037, 8.323, 0.478)
pt3dadd(63.29, 24.977, 8.294, 0.492)
pt3dadd(63.388, 24.918, 8.265, 0.508)
pt3dadd(63.486, 24.859, 8.236, 0.522)
pt3dadd(63.585, 24.799, 8.206, 0.538)
pt3dadd(63.683, 24.74, 8.177, 0.554)
pt3dadd(63.781, 24.681, 8.148, 0.568)
pt3dadd(63.879, 24.622, 8.119, 0.584)
pt3dadd(63.978, 24.562, 8.09, 0.598)
pt3dadd(64.076, 24.499, 8.066, 0.596)
pt3dadd(64.174, 24.435, 8.045, 0.584)
pt3dadd(64.272, 24.371, 8.024, 0.572)
pt3dadd(64.37, 24.306, 8.003, 0.56)
pt3dadd(64.468, 24.242, 7.982, 0.548)
pt3dadd(64.566, 24.177, 7.961, 0.536)
pt3dadd(64.664, 24.113, 7.94, 0.524)
pt3dadd(64.762, 24.049, 7.919, 0.512)
pt3dadd(64.86, 23.984, 7.898, 0.5)
pt3dadd(64.958, 23.92, 7.876, 0.488)
pt3dadd(65.054, 23.85, 7.865, 0.466)
pt3dadd(65.15, 23.778, 7.856, 0.44)
pt3dadd(65.245, 23.706, 7.848, 0.414)
pt3dadd(65.341, 23.634, 7.839, 0.388)
pt3dadd(65.436, 23.562, 7.831, 0.362)
pt3dadd(65.532, 23.49, 7.822, 0.336)
pt3dadd(65.627, 23.418, 7.814, 0.31)
pt3dadd(65.723, 23.346, 7.805, 0.284)
pt3dadd(65.818, 23.274, 7.797, 0.258)
pt3dadd(65.913, 23.202, 7.788, 0.232)
pt3dadd(66.005, 23.125, 7.794, 0.228)
pt3dadd(66.095, 23.047, 7.803, 0.228)
pt3dadd(66.186, 22.969, 7.812, 0.23)
pt3dadd(66.276, 22.891, 7.821, 0.232)
pt3dadd(66.367, 22.813, 7.83, 0.234)
pt3dadd(66.457, 22.735, 7.839, 0.236)
pt3dadd(66.548, 22.657, 7.849, 0.238)
pt3dadd(66.639, 22.579, 7.858, 0.238)
pt3dadd(66.729, 22.501, 7.867, 0.24)
pt3dadd(66.819, 22.423, 7.876, 0.242)
pt3dadd(66.878, 22.364, 7.949, 0.264)
pt3dadd(66.936, 22.306, 8.021, 0.284)
pt3dadd(66.994, 22.248, 8.094, 0.306)
pt3dadd(67.052, 22.19, 8.167, 0.326)
pt3dadd(67.111, 22.132, 8.24, 0.346)
pt3dadd(67.169, 22.073, 8.313, 0.368)
pt3dadd(67.227, 22.015, 8.385, 0.388)
pt3dadd(67.285, 21.957, 8.458, 0.41)
pt3dadd(67.343, 21.899, 8.531, 0.43)
pt3dadd(67.402, 21.84, 8.604, 0.452)
}
dend_7[42] {pt3dclear()
pt3dadd(52.614, 58.816, 16.596, 0.904)
pt3dadd(52.638, 58.812, 16.585, 0.906)
pt3dadd(52.743, 58.795, 16.538, 0.918)
pt3dadd(52.848, 58.779, 16.491, 0.93)
pt3dadd(52.952, 58.762, 16.444, 0.94)
pt3dadd(53.057, 58.745, 16.397, 0.952)
pt3dadd(53.161, 58.728, 16.35, 0.962)
pt3dadd(53.266, 58.711, 16.303, 0.974)
pt3dadd(53.37, 58.694, 16.256, 0.986)
pt3dadd(53.475, 58.677, 16.209, 0.996)
pt3dadd(53.58, 58.66, 16.162, 1.008)
pt3dadd(53.684, 58.643, 16.115, 1.018)
pt3dadd(53.789, 58.627, 16.068, 1.03)
pt3dadd(53.893, 58.61, 16.021, 1.042)
pt3dadd(53.998, 58.593, 15.974, 1.052)
pt3dadd(54.102, 58.576, 15.927, 1.064)
pt3dadd(54.207, 58.559, 15.879, 1.074)
pt3dadd(54.311, 58.542, 15.832, 1.086)
pt3dadd(54.416, 58.525, 15.785, 1.098)
pt3dadd(54.52, 58.508, 15.738, 1.108)
pt3dadd(54.617, 58.455, 15.71, 1.082)
pt3dadd(54.708, 58.38, 15.691, 1.034)
pt3dadd(54.8, 58.306, 15.673, 0.984)
pt3dadd(54.891, 58.231, 15.655, 0.936)
pt3dadd(54.983, 58.157, 15.637, 0.888)
pt3dadd(55.075, 58.083, 15.619, 0.84)
pt3dadd(55.166, 58.008, 15.6, 0.792)
pt3dadd(55.258, 57.934, 15.582, 0.744)
pt3dadd(55.35, 57.86, 15.564, 0.694)
pt3dadd(55.441, 57.785, 15.546, 0.646)
pt3dadd(55.528, 57.704, 15.532, 0.61)
pt3dadd(55.614, 57.622, 15.519, 0.572)
pt3dadd(55.701, 57.54, 15.506, 0.536)
pt3dadd(55.787, 57.459, 15.492, 0.5)
pt3dadd(55.873, 57.377, 15.479, 0.464)
pt3dadd(55.96, 57.295, 15.466, 0.426)
pt3dadd(56.046, 57.213, 15.452, 0.39)
pt3dadd(56.133, 57.132, 15.439, 0.354)
pt3dadd(56.219, 57.05, 15.426, 0.318)
pt3dadd(56.305, 56.968, 15.413, 0.28)
pt3dadd(56.392, 56.888, 15.394, 0.296)
pt3dadd(56.479, 56.809, 15.375, 0.316)
pt3dadd(56.565, 56.729, 15.355, 0.334)
pt3dadd(56.652, 56.649, 15.336, 0.354)
pt3dadd(56.739, 56.57, 15.317, 0.372)
pt3dadd(56.826, 56.49, 15.298, 0.392)
pt3dadd(56.912, 56.41, 15.279, 0.412)
pt3dadd(56.999, 56.331, 15.259, 0.43)
pt3dadd(57.086, 56.251, 15.24, 0.45)
pt3dadd(57.172, 56.172, 15.22, 0.47)
pt3dadd(57.248, 56.11, 15.162, 0.49)
pt3dadd(57.323, 56.049, 15.103, 0.51)
pt3dadd(57.398, 55.988, 15.044, 0.532)
pt3dadd(57.473, 55.927, 14.985, 0.554)
pt3dadd(57.549, 55.865, 14.926, 0.574)
pt3dadd(57.624, 55.804, 14.867, 0.594)
pt3dadd(57.699, 55.743, 14.809, 0.616)
pt3dadd(57.774, 55.682, 14.75, 0.636)
pt3dadd(57.85, 55.62, 14.691, 0.658)
pt3dadd(57.925, 55.56, 14.632, 0.678)
pt3dadd(58.015, 55.517, 14.575, 0.68)
pt3dadd(58.104, 55.475, 14.519, 0.682)
pt3dadd(58.193, 55.433, 14.462, 0.686)
pt3dadd(58.283, 55.39, 14.405, 0.688)
pt3dadd(58.372, 55.348, 14.349, 0.69)
pt3dadd(58.461, 55.306, 14.292, 0.692)
pt3dadd(58.551, 55.263, 14.235, 0.694)
pt3dadd(58.64, 55.221, 14.178, 0.698)
pt3dadd(58.729, 55.179, 14.122, 0.7)
pt3dadd(58.815, 55.134, 14.064, 0.704)
pt3dadd(58.875, 55.072, 13.994, 0.724)
pt3dadd(58.935, 55.009, 13.925, 0.744)
pt3dadd(58.995, 54.946, 13.856, 0.764)
pt3dadd(59.055, 54.884, 13.787, 0.784)
pt3dadd(59.114, 54.821, 13.718, 0.804)
pt3dadd(59.174, 54.758, 13.649, 0.824)
pt3dadd(59.234, 54.696, 13.579, 0.844)
pt3dadd(59.294, 54.633, 13.51, 0.864)
pt3dadd(59.354, 54.57, 13.441, 0.884)
pt3dadd(59.415, 54.509, 13.372, 0.9)
pt3dadd(59.494, 54.463, 13.307, 0.882)
pt3dadd(59.574, 54.418, 13.243, 0.864)
pt3dadd(59.653, 54.372, 13.178, 0.846)
pt3dadd(59.732, 54.326, 13.113, 0.828)
pt3dadd(59.811, 54.28, 13.048, 0.81)
pt3dadd(59.89, 54.234, 12.983, 0.794)
pt3dadd(59.969, 54.189, 12.919, 0.776)
pt3dadd(60.048, 54.143, 12.854, 0.758)
pt3dadd(60.127, 54.097, 12.789, 0.74)
}
}
proc shape3d_152() {
dend_7[42] { pt3dadd(60.207, 54.05, 12.726, 0.72)
pt3dadd(60.291, 53.988, 12.677, 0.69)
pt3dadd(60.376, 53.925, 12.629, 0.66)
pt3dadd(60.46, 53.863, 12.58, 0.628)
pt3dadd(60.545, 53.801, 12.531, 0.598)
pt3dadd(60.63, 53.739, 12.483, 0.568)
pt3dadd(60.714, 53.677, 12.434, 0.536)
pt3dadd(60.799, 53.615, 12.386, 0.506)
pt3dadd(60.883, 53.553, 12.337, 0.476)
pt3dadd(60.968, 53.491, 12.288, 0.444)
pt3dadd(61.053, 53.429, 12.242, 0.416)
pt3dadd(61.145, 53.367, 12.203, 0.396)
pt3dadd(61.237, 53.305, 12.164, 0.378)
pt3dadd(61.328, 53.243, 12.125, 0.358)
pt3dadd(61.42, 53.181, 12.087, 0.338)
pt3dadd(61.511, 53.118, 12.048, 0.318)
pt3dadd(61.603, 53.056, 12.009, 0.3)
pt3dadd(61.694, 52.994, 11.97, 0.28)
pt3dadd(61.786, 52.932, 11.932, 0.26)
pt3dadd(61.878, 52.87, 11.893, 0.242)
pt3dadd(61.968, 52.808, 11.854, 0.228)
pt3dadd(62.057, 52.744, 11.812, 0.232)
pt3dadd(62.146, 52.681, 11.771, 0.238)
pt3dadd(62.235, 52.618, 11.729, 0.244)
pt3dadd(62.324, 52.554, 11.688, 0.25)
pt3dadd(62.413, 52.491, 11.646, 0.254)
pt3dadd(62.502, 52.427, 11.605, 0.26)
pt3dadd(62.591, 52.364, 11.563, 0.266)
pt3dadd(62.68, 52.301, 11.522, 0.27)
pt3dadd(62.769, 52.237, 11.48, 0.276)
pt3dadd(62.842, 52.167, 11.431, 0.288)
pt3dadd(62.898, 52.088, 11.371, 0.306)
pt3dadd(62.953, 52.008, 11.312, 0.324)
pt3dadd(63.008, 51.929, 11.252, 0.344)
pt3dadd(63.063, 51.85, 11.193, 0.362)
pt3dadd(63.119, 51.771, 11.134, 0.382)
pt3dadd(63.174, 51.692, 11.074, 0.4)
pt3dadd(63.229, 51.613, 11.015, 0.418)
pt3dadd(63.285, 51.534, 10.955, 0.438)
pt3dadd(63.34, 51.455, 10.896, 0.456)
pt3dadd(63.387, 51.376, 10.832, 0.474)
pt3dadd(63.424, 51.297, 10.763, 0.49)
pt3dadd(63.461, 51.218, 10.695, 0.508)
pt3dadd(63.498, 51.139, 10.626, 0.524)
pt3dadd(63.535, 51.06, 10.557, 0.542)
pt3dadd(63.572, 50.981, 10.488, 0.558)
pt3dadd(63.609, 50.902, 10.419, 0.574)
pt3dadd(63.645, 50.824, 10.351, 0.592)
pt3dadd(63.682, 50.745, 10.282, 0.608)
pt3dadd(63.719, 50.666, 10.213, 0.626)
pt3dadd(63.767, 50.594, 10.144, 0.626)
pt3dadd(63.826, 50.531, 10.075, 0.604)
pt3dadd(63.885, 50.468, 10.005, 0.584)
pt3dadd(63.944, 50.405, 9.936, 0.564)
pt3dadd(64.003, 50.342, 9.866, 0.544)
pt3dadd(64.062, 50.279, 9.797, 0.524)
pt3dadd(64.121, 50.216, 9.727, 0.504)
pt3dadd(64.18, 50.153, 9.658, 0.482)
pt3dadd(64.239, 50.09, 9.589, 0.462)
pt3dadd(64.298, 50.027, 9.519, 0.442)
pt3dadd(64.366, 49.965, 9.456, 0.428)
pt3dadd(64.442, 49.905, 9.397, 0.42)
pt3dadd(64.518, 49.844, 9.339, 0.41)
pt3dadd(64.594, 49.783, 9.28, 0.402)
pt3dadd(64.67, 49.722, 9.222, 0.394)
pt3dadd(64.746, 49.661, 9.163, 0.384)
pt3dadd(64.822, 49.601, 9.105, 0.376)
pt3dadd(64.898, 49.54, 9.046, 0.368)
pt3dadd(64.974, 49.479, 8.988, 0.358)
pt3dadd(65.05, 49.418, 8.929, 0.35)
pt3dadd(65.136, 49.354, 8.885, 0.37)
pt3dadd(65.225, 49.289, 8.846, 0.402)
pt3dadd(65.315, 49.224, 8.807, 0.434)
pt3dadd(65.404, 49.159, 8.768, 0.466)
pt3dadd(65.494, 49.094, 8.73, 0.5)
pt3dadd(65.583, 49.029, 8.691, 0.532)
pt3dadd(65.673, 48.964, 8.652, 0.564)
pt3dadd(65.762, 48.899, 8.614, 0.596)
pt3dadd(65.852, 48.834, 8.575, 0.628)
pt3dadd(65.941, 48.769, 8.536, 0.662)
pt3dadd(66.035, 48.704, 8.507, 0.65)
pt3dadd(66.131, 48.638, 8.482, 0.62)
pt3dadd(66.227, 48.572, 8.457, 0.59)
pt3dadd(66.323, 48.507, 8.432, 0.562)
pt3dadd(66.419, 48.441, 8.408, 0.532)
pt3dadd(66.515, 48.375, 8.383, 0.502)
pt3dadd(66.611, 48.31, 8.358, 0.472)
pt3dadd(66.707, 48.244, 8.333, 0.444)
pt3dadd(66.803, 48.178, 8.308, 0.414)
pt3dadd(66.899, 48.113, 8.283, 0.384)
pt3dadd(66.996, 48.055, 8.251, 0.37)
pt3dadd(67.094, 48, 8.216, 0.364)
pt3dadd(67.193, 47.945, 8.181, 0.358)
pt3dadd(67.291, 47.891, 8.146, 0.35)
pt3dadd(67.389, 47.836, 8.111, 0.344)
pt3dadd(67.487, 47.781, 8.076, 0.336)
pt3dadd(67.585, 47.727, 8.041, 0.33)
pt3dadd(67.684, 47.672, 8.006, 0.324)
pt3dadd(67.782, 47.617, 7.971, 0.316)
pt3dadd(67.88, 47.562, 7.936, 0.31)
pt3dadd(67.978, 47.518, 7.893, 0.318)
pt3dadd(68.077, 47.476, 7.848, 0.332)
pt3dadd(68.175, 47.435, 7.802, 0.344)
pt3dadd(68.274, 47.393, 7.757, 0.358)
pt3dadd(68.372, 47.351, 7.712, 0.37)
pt3dadd(68.471, 47.31, 7.666, 0.382)
pt3dadd(68.569, 47.268, 7.621, 0.396)
pt3dadd(68.668, 47.226, 7.576, 0.408)
pt3dadd(68.766, 47.184, 7.53, 0.422)
pt3dadd(68.865, 47.143, 7.485, 0.434)
pt3dadd(68.961, 47.115, 7.431, 0.424)
pt3dadd(69.058, 47.091, 7.375, 0.408)
pt3dadd(69.155, 47.066, 7.319, 0.392)
pt3dadd(69.251, 47.042, 7.263, 0.376)
pt3dadd(69.348, 47.017, 7.208, 0.36)
pt3dadd(69.444, 46.993, 7.152, 0.344)
pt3dadd(69.541, 46.968, 7.096, 0.328)
pt3dadd(69.637, 46.944, 7.04, 0.314)
pt3dadd(69.734, 46.92, 6.984, 0.298)
pt3dadd(69.83, 46.895, 6.929, 0.282)
pt3dadd(69.93, 46.858, 6.882, 0.292)
pt3dadd(70.03, 46.819, 6.838, 0.31)
pt3dadd(70.13, 46.779, 6.793, 0.328)
pt3dadd(70.23, 46.74, 6.749, 0.344)
pt3dadd(70.33, 46.701, 6.705, 0.362)
pt3dadd(70.43, 46.661, 6.66, 0.38)
pt3dadd(70.53, 46.622, 6.616, 0.396)
pt3dadd(70.63, 46.582, 6.571, 0.414)
pt3dadd(70.73, 46.543, 6.527, 0.43)
pt3dadd(70.83, 46.503, 6.483, 0.448)
pt3dadd(70.933, 46.459, 6.448, 0.464)
pt3dadd(71.037, 46.414, 6.414, 0.482)
pt3dadd(71.14, 46.369, 6.38, 0.498)
pt3dadd(71.243, 46.324, 6.346, 0.514)
pt3dadd(71.347, 46.278, 6.312, 0.532)
pt3dadd(71.45, 46.233, 6.278, 0.548)
pt3dadd(71.554, 46.188, 6.244, 0.564)
pt3dadd(71.657, 46.143, 6.21, 0.582)
pt3dadd(71.761, 46.098, 6.176, 0.598)
pt3dadd(71.864, 46.053, 6.142, 0.614)
pt3dadd(71.972, 46.012, 6.113, 0.602)
pt3dadd(72.079, 45.971, 6.086, 0.584)
pt3dadd(72.187, 45.93, 6.058, 0.568)
pt3dadd(72.295, 45.888, 6.03, 0.552)
pt3dadd(72.402, 45.847, 6.002, 0.536)
pt3dadd(72.51, 45.806, 5.975, 0.518)
pt3dadd(72.618, 45.765, 5.947, 0.502)
pt3dadd(72.726, 45.724, 5.919, 0.486)
pt3dadd(72.833, 45.683, 5.891, 0.47)
pt3dadd(72.941, 45.642, 5.863, 0.452)
pt3dadd(73.042, 45.605, 5.82, 0.452)
pt3dadd(73.143, 45.569, 5.775, 0.452)
pt3dadd(73.244, 45.532, 5.731, 0.452)
pt3dadd(73.345, 45.495, 5.686, 0.452)
pt3dadd(73.446, 45.459, 5.641, 0.452)
pt3dadd(73.547, 45.422, 5.597, 0.452)
pt3dadd(73.648, 45.386, 5.552, 0.452)
pt3dadd(73.749, 45.349, 5.508, 0.452)
pt3dadd(73.85, 45.313, 5.463, 0.452)
pt3dadd(73.951, 45.276, 5.418, 0.452)
pt3dadd(74.026, 45.199, 5.374, 0.472)
pt3dadd(74.099, 45.12, 5.331, 0.492)
pt3dadd(74.172, 45.04, 5.287, 0.512)
pt3dadd(74.246, 44.961, 5.244, 0.534)
pt3dadd(74.319, 44.882, 5.2, 0.554)
pt3dadd(74.392, 44.803, 5.156, 0.574)
pt3dadd(74.466, 44.724, 5.113, 0.596)
pt3dadd(74.539, 44.644, 5.069, 0.616)
pt3dadd(74.613, 44.565, 5.025, 0.636)
pt3dadd(74.686, 44.486, 4.982, 0.658)
pt3dadd(74.757, 44.397, 4.951, 0.616)
pt3dadd(74.828, 44.307, 4.92, 0.572)
pt3dadd(74.899, 44.217, 4.889, 0.53)
pt3dadd(74.97, 44.128, 4.859, 0.486)
pt3dadd(75.04, 44.038, 4.828, 0.442)
pt3dadd(75.111, 43.949, 4.797, 0.4)
pt3dadd(75.182, 43.859, 4.767, 0.356)
pt3dadd(75.253, 43.77, 4.736, 0.312)
pt3dadd(75.324, 43.68, 4.705, 0.27)
pt3dadd(75.395, 43.591, 4.675, 0.226)
pt3dadd(75.441, 43.529, 4.598, 0.226)
pt3dadd(75.487, 43.468, 4.521, 0.226)
pt3dadd(75.533, 43.406, 4.444, 0.226)
pt3dadd(75.58, 43.345, 4.367, 0.226)
pt3dadd(75.626, 43.284, 4.291, 0.226)
pt3dadd(75.672, 43.222, 4.214, 0.226)
pt3dadd(75.718, 43.161, 4.137, 0.226)
pt3dadd(75.764, 43.099, 4.06, 0.226)
pt3dadd(75.811, 43.038, 3.983, 0.226)
pt3dadd(75.857, 42.976, 3.907, 0.226)
}
dend_0[12] {pt3dclear()
pt3dstyle(1, 18.126, 101.76, 21.223)
pt3dadd(18.106, 101.688, 21.146, 10.93)
pt3dadd(18.085, 101.615, 21.068, 10.83)
pt3dadd(18.085, 101.53, 20.997, 10.722)
pt3dadd(18.085, 101.445, 20.927, 10.612)
pt3dadd(18.085, 101.36, 20.856, 10.504)
pt3dadd(18.085, 101.275, 20.785, 10.394)
pt3dadd(18.085, 101.191, 20.715, 10.286)
pt3dadd(18.085, 101.106, 20.644, 10.178)
pt3dadd(18.085, 101.021, 20.573, 10.068)
}
}
proc shape3d_153() {
dend_0[12] { pt3dadd(18.085, 100.936, 20.502, 9.96)
pt3dadd(18.085, 100.851, 20.432, 9.85)
pt3dadd(18.085, 100.766, 20.361, 9.742)
pt3dadd(18.068, 100.684, 20.29, 9.528)
pt3dadd(18.05, 100.602, 20.218, 9.316)
pt3dadd(18.032, 100.52, 20.146, 9.102)
pt3dadd(18.014, 100.438, 20.075, 8.888)
pt3dadd(17.997, 100.356, 20.003, 8.674)
pt3dadd(17.979, 100.274, 19.932, 8.46)
pt3dadd(17.961, 100.192, 19.861, 8.248)
pt3dadd(17.943, 100.11, 19.789, 8.034)
pt3dadd(17.925, 100.028, 19.718, 7.82)
pt3dadd(17.908, 99.946, 19.646, 7.606)
pt3dadd(17.888, 99.864, 19.575, 7.392)
pt3dadd(17.868, 99.782, 19.504, 7.18)
pt3dadd(17.847, 99.7, 19.433, 6.966)
pt3dadd(17.827, 99.618, 19.362, 6.752)
pt3dadd(17.807, 99.536, 19.291, 6.538)
pt3dadd(17.787, 99.454, 19.22, 6.326)
pt3dadd(17.767, 99.372, 19.148, 6.112)
pt3dadd(17.747, 99.291, 19.077, 5.898)
pt3dadd(17.727, 99.208, 19.006, 5.684)
pt3dadd(17.707, 99.126, 18.935, 5.472)
pt3dadd(17.683, 99.045, 18.865, 5.264)
pt3dadd(17.658, 98.963, 18.795, 5.054)
pt3dadd(17.634, 98.881, 18.725, 4.846)
pt3dadd(17.609, 98.799, 18.655, 4.638)
pt3dadd(17.585, 98.717, 18.585, 4.43)
pt3dadd(17.56, 98.635, 18.514, 4.222)
pt3dadd(17.536, 98.553, 18.444, 4.014)
pt3dadd(17.511, 98.471, 18.374, 3.806)
pt3dadd(17.487, 98.389, 18.304, 3.598)
pt3dadd(17.462, 98.307, 18.234, 3.39)
}
dend_0[13] {pt3dclear()
pt3dadd(17.462, 98.307, 18.234, 3.39)
pt3dadd(17.457, 98.301, 18.228, 3.378)
pt3dadd(17.393, 98.242, 18.159, 3.244)
pt3dadd(17.329, 98.182, 18.091, 3.11)
pt3dadd(17.265, 98.122, 18.022, 2.976)
pt3dadd(17.201, 98.063, 17.954, 2.842)
pt3dadd(17.136, 98.002, 17.887, 2.71)
pt3dadd(17.07, 97.941, 17.821, 2.578)
pt3dadd(17.004, 97.88, 17.754, 2.446)
pt3dadd(16.938, 97.819, 17.688, 2.314)
pt3dadd(16.872, 97.759, 17.622, 2.182)
}
dend_7[43] {pt3dclear()
pt3dadd(16.872, 97.759, 17.622, 2.182)
pt3dadd(16.806, 97.698, 17.555, 2.05)
pt3dadd(16.74, 97.637, 17.489, 1.918)
pt3dadd(16.674, 97.576, 17.423, 1.786)
pt3dadd(16.608, 97.515, 17.356, 1.654)
pt3dadd(16.542, 97.454, 17.29, 1.522)
pt3dadd(16.46, 97.384, 17.248, 1.416)
pt3dadd(16.374, 97.313, 17.21, 1.314)
pt3dadd(16.289, 97.241, 17.173, 1.214)
pt3dadd(16.204, 97.17, 17.135, 1.114)
pt3dadd(16.119, 97.098, 17.098, 1.012)
pt3dadd(16.033, 97.027, 17.061, 0.912)
pt3dadd(15.948, 96.955, 17.023, 0.81)
pt3dadd(15.863, 96.883, 16.986, 0.71)
pt3dadd(15.778, 96.812, 16.948, 0.608)
pt3dadd(15.693, 96.74, 16.911, 0.508)
pt3dadd(15.605, 96.665, 16.885, 0.52)
pt3dadd(15.517, 96.588, 16.861, 0.554)
pt3dadd(15.429, 96.512, 16.837, 0.586)
pt3dadd(15.342, 96.435, 16.812, 0.62)
pt3dadd(15.254, 96.359, 16.788, 0.652)
pt3dadd(15.166, 96.282, 16.764, 0.686)
pt3dadd(15.078, 96.206, 16.74, 0.718)
pt3dadd(14.991, 96.129, 16.716, 0.752)
pt3dadd(14.903, 96.052, 16.692, 0.784)
pt3dadd(14.815, 95.976, 16.668, 0.818)
pt3dadd(14.73, 95.898, 16.641, 0.862)
pt3dadd(14.646, 95.819, 16.613, 0.91)
pt3dadd(14.561, 95.741, 16.585, 0.956)
pt3dadd(14.476, 95.662, 16.558, 1.002)
pt3dadd(14.392, 95.584, 16.53, 1.05)
pt3dadd(14.307, 95.505, 16.502, 1.096)
pt3dadd(14.223, 95.427, 16.475, 1.144)
pt3dadd(14.138, 95.349, 16.447, 1.19)
pt3dadd(14.054, 95.27, 16.42, 1.236)
pt3dadd(13.969, 95.192, 16.392, 1.284)
pt3dadd(13.892, 95.112, 16.354, 1.262)
pt3dadd(13.815, 95.032, 16.315, 1.238)
pt3dadd(13.739, 94.952, 16.277, 1.212)
pt3dadd(13.662, 94.872, 16.238, 1.188)
pt3dadd(13.585, 94.793, 16.2, 1.162)
pt3dadd(13.508, 94.713, 16.161, 1.138)
pt3dadd(13.432, 94.633, 16.123, 1.114)
pt3dadd(13.355, 94.553, 16.084, 1.088)
pt3dadd(13.278, 94.473, 16.046, 1.064)
pt3dadd(13.201, 94.393, 16.007, 1.038)
pt3dadd(13.121, 94.309, 15.984, 1.002)
pt3dadd(13.041, 94.224, 15.96, 0.966)
pt3dadd(12.961, 94.139, 15.937, 0.93)
pt3dadd(12.881, 94.055, 15.913, 0.894)
pt3dadd(12.801, 93.97, 15.89, 0.858)
pt3dadd(12.72, 93.885, 15.866, 0.822)
pt3dadd(12.64, 93.8, 15.843, 0.786)
pt3dadd(12.56, 93.716, 15.82, 0.75)
pt3dadd(12.48, 93.631, 15.796, 0.714)
pt3dadd(12.4, 93.546, 15.773, 0.678)
}
dend_7[44] {pt3dclear()
pt3dadd(12.4, 93.546, 15.773, 0.678)
pt3dadd(12.386, 93.531, 15.771, 0.676)
pt3dadd(12.307, 93.442, 15.761, 0.66)
pt3dadd(12.227, 93.353, 15.751, 0.644)
pt3dadd(12.148, 93.264, 15.742, 0.628)
pt3dadd(12.068, 93.175, 15.732, 0.612)
pt3dadd(11.989, 93.086, 15.722, 0.594)
pt3dadd(11.909, 92.997, 15.712, 0.578)
pt3dadd(11.83, 92.907, 15.704, 0.572)
pt3dadd(11.751, 92.817, 15.696, 0.566)
pt3dadd(11.672, 92.727, 15.688, 0.56)
pt3dadd(11.593, 92.637, 15.68, 0.554)
pt3dadd(11.515, 92.547, 15.673, 0.55)
pt3dadd(11.436, 92.457, 15.665, 0.544)
pt3dadd(11.357, 92.367, 15.657, 0.538)
pt3dadd(11.278, 92.277, 15.649, 0.532)
pt3dadd(11.199, 92.187, 15.641, 0.528)
pt3dadd(11.12, 92.097, 15.634, 0.522)
pt3dadd(11.043, 92.006, 15.631, 0.544)
pt3dadd(10.966, 91.913, 15.63, 0.574)
pt3dadd(10.89, 91.821, 15.629, 0.604)
pt3dadd(10.813, 91.728, 15.628, 0.634)
pt3dadd(10.737, 91.636, 15.627, 0.662)
pt3dadd(10.66, 91.544, 15.626, 0.692)
pt3dadd(10.584, 91.451, 15.624, 0.722)
pt3dadd(10.507, 91.359, 15.623, 0.752)
pt3dadd(10.43, 91.267, 15.622, 0.782)
pt3dadd(10.354, 91.174, 15.621, 0.812)
pt3dadd(10.291, 91.072, 15.619, 0.794)
pt3dadd(10.232, 90.968, 15.617, 0.766)
pt3dadd(10.173, 90.864, 15.615, 0.738)
pt3dadd(10.113, 90.759, 15.613, 0.71)
pt3dadd(10.054, 90.655, 15.61, 0.68)
pt3dadd(9.995, 90.551, 15.608, 0.652)
pt3dadd(9.935, 90.446, 15.606, 0.624)
pt3dadd(9.876, 90.342, 15.604, 0.596)
pt3dadd(9.817, 90.238, 15.601, 0.568)
pt3dadd(9.757, 90.134, 15.599, 0.54)
pt3dadd(9.704, 90.026, 15.595, 0.534)
pt3dadd(9.651, 89.919, 15.591, 0.53)
pt3dadd(9.598, 89.811, 15.587, 0.526)
pt3dadd(9.545, 89.704, 15.583, 0.524)
pt3dadd(9.492, 89.596, 15.579, 0.52)
pt3dadd(9.439, 89.489, 15.575, 0.516)
pt3dadd(9.386, 89.381, 15.571, 0.514)
pt3dadd(9.333, 89.273, 15.566, 0.51)
pt3dadd(9.28, 89.166, 15.562, 0.506)
pt3dadd(9.227, 89.058, 15.558, 0.502)
pt3dadd(9.174, 88.951, 15.552, 0.556)
pt3dadd(9.122, 88.843, 15.545, 0.618)
pt3dadd(9.069, 88.736, 15.538, 0.678)
pt3dadd(9.016, 88.629, 15.531, 0.74)
pt3dadd(8.963, 88.521, 15.524, 0.802)
pt3dadd(8.91, 88.414, 15.517, 0.864)
pt3dadd(8.857, 88.306, 15.511, 0.924)
pt3dadd(8.804, 88.199, 15.504, 0.986)
pt3dadd(8.751, 88.092, 15.497, 1.048)
pt3dadd(8.698, 87.984, 15.49, 1.108)
pt3dadd(8.667, 87.87, 15.479, 1.098)
pt3dadd(8.637, 87.754, 15.468, 1.08)
pt3dadd(8.608, 87.638, 15.456, 1.062)
pt3dadd(8.579, 87.523, 15.445, 1.042)
pt3dadd(8.549, 87.407, 15.433, 1.024)
pt3dadd(8.52, 87.292, 15.422, 1.006)
pt3dadd(8.491, 87.176, 15.41, 0.988)
pt3dadd(8.462, 87.061, 15.399, 0.968)
pt3dadd(8.432, 86.945, 15.387, 0.95)
pt3dadd(8.403, 86.829, 15.376, 0.932)
pt3dadd(8.385, 86.718, 15.344, 0.968)
pt3dadd(8.369, 86.606, 15.31, 1.012)
pt3dadd(8.353, 86.494, 15.276, 1.056)
pt3dadd(8.337, 86.382, 15.242, 1.098)
pt3dadd(8.32, 86.271, 15.208, 1.142)
pt3dadd(8.304, 86.159, 15.174, 1.186)
pt3dadd(8.288, 86.048, 15.14, 1.23)
pt3dadd(8.271, 85.936, 15.106, 1.272)
pt3dadd(8.255, 85.824, 15.072, 1.316)
pt3dadd(8.239, 85.713, 15.038, 1.36)
pt3dadd(8.23, 85.599, 15.007, 1.362)
pt3dadd(8.223, 85.485, 14.976, 1.362)
pt3dadd(8.215, 85.371, 14.946, 1.362)
pt3dadd(8.207, 85.257, 14.916, 1.362)
pt3dadd(8.199, 85.143, 14.885, 1.362)
pt3dadd(8.191, 85.029, 14.855, 1.364)
pt3dadd(8.183, 84.915, 14.824, 1.364)
pt3dadd(8.175, 84.801, 14.794, 1.364)
pt3dadd(8.167, 84.687, 14.763, 1.364)
pt3dadd(8.159, 84.573, 14.733, 1.364)
pt3dadd(8.153, 84.455, 14.712, 1.328)
pt3dadd(8.148, 84.338, 14.69, 1.29)
pt3dadd(8.142, 84.221, 14.669, 1.252)
pt3dadd(8.136, 84.104, 14.648, 1.214)
pt3dadd(8.131, 83.987, 14.627, 1.176)
pt3dadd(8.125, 83.87, 14.606, 1.14)
pt3dadd(8.119, 83.752, 14.585, 1.102)
pt3dadd(8.114, 83.635, 14.564, 1.064)
pt3dadd(8.108, 83.518, 14.543, 1.026)
pt3dadd(8.102, 83.401, 14.521, 0.988)
pt3dadd(8.092, 83.282, 14.509, 0.95)
pt3dadd(8.082, 83.164, 14.496, 0.912)
}
}
proc shape3d_154() {
dend_7[44] { pt3dadd(8.071, 83.045, 14.483, 0.874)
pt3dadd(8.061, 82.927, 14.47, 0.836)
pt3dadd(8.05, 82.808, 14.458, 0.798)
pt3dadd(8.04, 82.69, 14.445, 0.76)
pt3dadd(8.029, 82.571, 14.432, 0.722)
pt3dadd(8.019, 82.452, 14.42, 0.684)
pt3dadd(8.008, 82.334, 14.407, 0.646)
pt3dadd(7.998, 82.215, 14.394, 0.608)
pt3dadd(7.982, 82.097, 14.387, 0.57)
pt3dadd(7.967, 81.978, 14.379, 0.532)
pt3dadd(7.951, 81.859, 14.372, 0.494)
pt3dadd(7.935, 81.741, 14.365, 0.454)
pt3dadd(7.919, 81.622, 14.358, 0.416)
pt3dadd(7.904, 81.504, 14.35, 0.378)
pt3dadd(7.888, 81.385, 14.343, 0.34)
pt3dadd(7.872, 81.266, 14.336, 0.302)
pt3dadd(7.857, 81.148, 14.329, 0.264)
pt3dadd(7.841, 81.029, 14.321, 0.226)
}
dend_7[45] {pt3dclear()
pt3dadd(7.841, 81.029, 14.321, 0.226)
pt3dadd(7.824, 80.991, 14.318, 0.238)
pt3dadd(7.777, 80.882, 14.306, 0.274)
pt3dadd(7.729, 80.773, 14.295, 0.308)
pt3dadd(7.682, 80.664, 14.284, 0.344)
pt3dadd(7.634, 80.554, 14.272, 0.38)
pt3dadd(7.587, 80.445, 14.261, 0.414)
pt3dadd(7.539, 80.335, 14.25, 0.45)
pt3dadd(7.492, 80.226, 14.239, 0.486)
pt3dadd(7.444, 80.117, 14.227, 0.52)
pt3dadd(7.397, 80.007, 14.216, 0.556)
pt3dadd(7.349, 79.898, 14.205, 0.59)
pt3dadd(7.302, 79.789, 14.194, 0.626)
pt3dadd(7.261, 79.681, 14.168, 0.624)
pt3dadd(7.224, 79.574, 14.134, 0.596)
pt3dadd(7.188, 79.468, 14.099, 0.57)
pt3dadd(7.152, 79.361, 14.065, 0.542)
pt3dadd(7.116, 79.254, 14.03, 0.516)
pt3dadd(7.08, 79.148, 13.996, 0.488)
pt3dadd(7.043, 79.041, 13.961, 0.462)
pt3dadd(7.007, 78.934, 13.927, 0.434)
pt3dadd(6.971, 78.828, 13.892, 0.408)
pt3dadd(6.934, 78.721, 13.858, 0.38)
pt3dadd(6.902, 78.612, 13.826, 0.374)
pt3dadd(6.871, 78.503, 13.795, 0.382)
pt3dadd(6.84, 78.393, 13.764, 0.39)
pt3dadd(6.809, 78.283, 13.733, 0.396)
pt3dadd(6.779, 78.173, 13.701, 0.404)
pt3dadd(6.748, 78.063, 13.67, 0.41)
pt3dadd(6.717, 77.953, 13.639, 0.418)
pt3dadd(6.686, 77.844, 13.608, 0.424)
pt3dadd(6.655, 77.734, 13.577, 0.432)
pt3dadd(6.625, 77.624, 13.546, 0.44)
pt3dadd(6.59, 77.513, 13.52, 0.466)
pt3dadd(6.555, 77.402, 13.497, 0.504)
pt3dadd(6.519, 77.291, 13.474, 0.54)
pt3dadd(6.483, 77.18, 13.45, 0.578)
pt3dadd(6.447, 77.069, 13.427, 0.616)
pt3dadd(6.411, 76.958, 13.403, 0.652)
pt3dadd(6.375, 76.847, 13.38, 0.69)
pt3dadd(6.339, 76.736, 13.357, 0.726)
pt3dadd(6.303, 76.625, 13.333, 0.764)
pt3dadd(6.267, 76.514, 13.31, 0.802)
pt3dadd(6.222, 76.405, 13.291, 0.83)
pt3dadd(6.174, 76.297, 13.274, 0.856)
pt3dadd(6.126, 76.189, 13.258, 0.882)
pt3dadd(6.077, 76.081, 13.241, 0.908)
pt3dadd(6.029, 75.973, 13.224, 0.934)
pt3dadd(5.981, 75.865, 13.207, 0.962)
pt3dadd(5.933, 75.757, 13.191, 0.988)
pt3dadd(5.884, 75.649, 13.174, 1.014)
pt3dadd(5.836, 75.541, 13.157, 1.04)
pt3dadd(5.788, 75.433, 13.141, 1.066)
pt3dadd(5.745, 75.323, 13.126, 1.044)
pt3dadd(5.705, 75.211, 13.112, 1.006)
pt3dadd(5.665, 75.099, 13.099, 0.968)
pt3dadd(5.624, 74.987, 13.085, 0.928)
pt3dadd(5.584, 74.875, 13.072, 0.89)
pt3dadd(5.544, 74.763, 13.058, 0.85)
pt3dadd(5.503, 74.652, 13.045, 0.812)
pt3dadd(5.463, 74.54, 13.031, 0.772)
pt3dadd(5.423, 74.428, 13.017, 0.734)
pt3dadd(5.382, 74.316, 13.004, 0.696)
pt3dadd(5.343, 74.216, 12.963, 0.702)
pt3dadd(5.304, 74.119, 12.913, 0.724)
pt3dadd(5.266, 74.022, 12.863, 0.746)
pt3dadd(5.227, 73.926, 12.814, 0.768)
pt3dadd(5.188, 73.829, 12.764, 0.79)
pt3dadd(5.149, 73.733, 12.714, 0.812)
pt3dadd(5.11, 73.636, 12.664, 0.834)
pt3dadd(5.071, 73.54, 12.614, 0.856)
pt3dadd(5.033, 73.443, 12.565, 0.878)
pt3dadd(4.994, 73.347, 12.515, 0.9)
pt3dadd(4.944, 73.245, 12.484, 0.904)
pt3dadd(4.892, 73.141, 12.457, 0.904)
pt3dadd(4.84, 73.038, 12.431, 0.904)
pt3dadd(4.788, 72.935, 12.404, 0.904)
pt3dadd(4.736, 72.831, 12.377, 0.904)
pt3dadd(4.684, 72.728, 12.351, 0.904)
pt3dadd(4.632, 72.625, 12.324, 0.904)
pt3dadd(4.58, 72.521, 12.298, 0.904)
pt3dadd(4.528, 72.418, 12.271, 0.904)
pt3dadd(4.476, 72.315, 12.245, 0.904)
pt3dadd(4.441, 72.202, 12.23, 0.904)
pt3dadd(4.409, 72.087, 12.218, 0.904)
pt3dadd(4.377, 71.972, 12.205, 0.904)
pt3dadd(4.346, 71.858, 12.193, 0.904)
pt3dadd(4.314, 71.743, 12.18, 0.904)
pt3dadd(4.282, 71.628, 12.168, 0.904)
pt3dadd(4.25, 71.513, 12.156, 0.904)
pt3dadd(4.218, 71.399, 12.143, 0.904)
pt3dadd(4.187, 71.284, 12.131, 0.904)
pt3dadd(4.155, 71.169, 12.119, 0.904)
pt3dadd(4.139, 71.051, 12.116, 0.904)
pt3dadd(4.125, 70.931, 12.115, 0.904)
pt3dadd(4.112, 70.812, 12.114, 0.904)
pt3dadd(4.099, 70.693, 12.113, 0.904)
pt3dadd(4.086, 70.573, 12.112, 0.904)
pt3dadd(4.073, 70.454, 12.111, 0.904)
pt3dadd(4.059, 70.335, 12.11, 0.904)
pt3dadd(4.046, 70.216, 12.109, 0.904)
pt3dadd(4.033, 70.096, 12.108, 0.904)
pt3dadd(4.02, 69.977, 12.108, 0.904)
pt3dadd(4.016, 69.857, 12.106, 0.93)
pt3dadd(4.013, 69.737, 12.104, 0.962)
pt3dadd(4.011, 69.617, 12.102, 0.994)
pt3dadd(4.009, 69.497, 12.1, 1.026)
pt3dadd(4.007, 69.377, 12.098, 1.058)
pt3dadd(4.004, 69.258, 12.096, 1.09)
pt3dadd(4.002, 69.138, 12.095, 1.122)
pt3dadd(4, 69.018, 12.093, 1.154)
pt3dadd(3.997, 68.898, 12.091, 1.184)
pt3dadd(3.995, 68.778, 12.089, 1.216)
pt3dadd(3.995, 68.658, 12.086, 1.202)
pt3dadd(3.995, 68.538, 12.082, 1.178)
pt3dadd(3.995, 68.418, 12.079, 1.154)
pt3dadd(3.995, 68.298, 12.075, 1.128)
pt3dadd(3.995, 68.178, 12.072, 1.104)
pt3dadd(3.996, 68.058, 12.068, 1.08)
pt3dadd(3.996, 67.938, 12.065, 1.056)
pt3dadd(3.996, 67.818, 12.061, 1.032)
pt3dadd(3.996, 67.698, 12.058, 1.008)
pt3dadd(3.996, 67.578, 12.054, 0.984)
pt3dadd(3.996, 67.459, 12.048, 0.948)
pt3dadd(3.996, 67.339, 12.041, 0.908)
pt3dadd(3.997, 67.219, 12.034, 0.868)
pt3dadd(3.997, 67.1, 12.027, 0.828)
pt3dadd(3.997, 66.98, 12.02, 0.79)
pt3dadd(3.997, 66.86, 12.013, 0.75)
pt3dadd(3.998, 66.74, 12.006, 0.71)
pt3dadd(3.998, 66.621, 11.999, 0.672)
pt3dadd(3.998, 66.501, 11.992, 0.632)
pt3dadd(3.998, 66.381, 11.985, 0.592)
pt3dadd(3.999, 66.262, 11.974, 0.59)
pt3dadd(3.999, 66.143, 11.961, 0.594)
pt3dadd(3.999, 66.024, 11.949, 0.596)
pt3dadd(3.999, 65.905, 11.936, 0.6)
pt3dadd(4, 65.786, 11.924, 0.604)
pt3dadd(4, 65.667, 11.911, 0.606)
pt3dadd(4, 65.548, 11.899, 0.61)
pt3dadd(4, 65.429, 11.886, 0.614)
pt3dadd(4.001, 65.31, 11.874, 0.616)
pt3dadd(4.001, 65.19, 11.862, 0.62)
pt3dadd(4.001, 65.073, 11.842, 0.662)
pt3dadd(4.002, 64.956, 11.82, 0.708)
pt3dadd(4.002, 64.839, 11.799, 0.756)
pt3dadd(4.003, 64.721, 11.777, 0.804)
pt3dadd(4.004, 64.604, 11.756, 0.852)
pt3dadd(4.004, 64.487, 11.734, 0.9)
pt3dadd(4.005, 64.37, 11.713, 0.946)
pt3dadd(4.005, 64.252, 11.692, 0.994)
pt3dadd(4.006, 64.135, 11.67, 1.042)
pt3dadd(4.007, 64.018, 11.649, 1.09)
pt3dadd(4.008, 63.91, 11.605, 1.064)
pt3dadd(4.009, 63.804, 11.559, 1.03)
pt3dadd(4.01, 63.698, 11.513, 0.996)
pt3dadd(4.011, 63.591, 11.467, 0.96)
pt3dadd(4.012, 63.485, 11.421, 0.926)
pt3dadd(4.013, 63.378, 11.375, 0.892)
pt3dadd(4.014, 63.272, 11.328, 0.858)
pt3dadd(4.015, 63.165, 11.282, 0.824)
pt3dadd(4.016, 63.059, 11.236, 0.79)
pt3dadd(4.017, 62.952, 11.19, 0.756)
pt3dadd(4.019, 62.85, 11.138, 0.756)
pt3dadd(4.021, 62.748, 11.085, 0.762)
pt3dadd(4.023, 62.647, 11.032, 0.768)
pt3dadd(4.025, 62.545, 10.979, 0.772)
pt3dadd(4.027, 62.443, 10.926, 0.778)
pt3dadd(4.029, 62.341, 10.873, 0.784)
pt3dadd(4.031, 62.24, 10.82, 0.788)
pt3dadd(4.033, 62.138, 10.767, 0.794)
pt3dadd(4.035, 62.036, 10.714, 0.8)
pt3dadd(4.037, 61.934, 10.661, 0.804)
pt3dadd(4.04, 61.829, 10.613, 0.826)
pt3dadd(4.043, 61.723, 10.566, 0.852)
pt3dadd(4.047, 61.617, 10.519, 0.876)
pt3dadd(4.05, 61.512, 10.471, 0.9)
pt3dadd(4.053, 61.406, 10.424, 0.924)
pt3dadd(4.057, 61.3, 10.377, 0.948)
pt3dadd(4.06, 61.195, 10.33, 0.972)
pt3dadd(4.064, 61.089, 10.282, 0.998)
pt3dadd(4.067, 60.983, 10.235, 1.022)
}
}
proc shape3d_155() {
dend_7[45] { pt3dadd(4.07, 60.878, 10.188, 1.046)
pt3dadd(4.076, 60.764, 10.156, 1.068)
pt3dadd(4.083, 60.65, 10.124, 1.09)
pt3dadd(4.089, 60.537, 10.093, 1.112)
pt3dadd(4.095, 60.423, 10.061, 1.134)
pt3dadd(4.101, 60.309, 10.03, 1.156)
pt3dadd(4.108, 60.195, 9.999, 1.178)
pt3dadd(4.114, 60.082, 9.967, 1.2)
pt3dadd(4.12, 59.968, 9.936, 1.222)
pt3dadd(4.127, 59.854, 9.904, 1.244)
pt3dadd(4.133, 59.741, 9.873, 1.266)
pt3dadd(4.146, 59.622, 9.86, 1.206)
pt3dadd(4.158, 59.504, 9.847, 1.148)
pt3dadd(4.171, 59.386, 9.834, 1.09)
pt3dadd(4.184, 59.267, 9.821, 1.03)
pt3dadd(4.196, 59.149, 9.808, 0.972)
pt3dadd(4.209, 59.031, 9.795, 0.912)
pt3dadd(4.222, 58.912, 9.783, 0.854)
pt3dadd(4.235, 58.794, 9.77, 0.796)
pt3dadd(4.247, 58.676, 9.757, 0.736)
pt3dadd(4.26, 58.557, 9.744, 0.678)
}
dend_7[46] {pt3dclear()
pt3dadd(4.26, 58.557, 9.744, 0.678)
pt3dadd(4.274, 58.493, 9.742, 0.69)
pt3dadd(4.299, 58.375, 9.739, 0.71)
pt3dadd(4.326, 58.258, 9.735, 0.728)
pt3dadd(4.352, 58.141, 9.732, 0.744)
pt3dadd(4.378, 58.024, 9.728, 0.762)
pt3dadd(4.404, 57.907, 9.725, 0.78)
pt3dadd(4.431, 57.79, 9.721, 0.798)
pt3dadd(4.457, 57.673, 9.718, 0.816)
pt3dadd(4.483, 57.556, 9.714, 0.832)
pt3dadd(4.51, 57.439, 9.711, 0.85)
pt3dadd(4.536, 57.322, 9.707, 0.868)
pt3dadd(4.566, 57.207, 9.703, 0.878)
pt3dadd(4.629, 57.105, 9.696, 0.822)
pt3dadd(4.691, 57.003, 9.688, 0.766)
pt3dadd(4.754, 56.901, 9.681, 0.71)
pt3dadd(4.817, 56.799, 9.673, 0.654)
pt3dadd(4.879, 56.697, 9.666, 0.598)
pt3dadd(4.942, 56.595, 9.658, 0.542)
pt3dadd(5.004, 56.493, 9.651, 0.486)
pt3dadd(5.067, 56.391, 9.643, 0.43)
pt3dadd(5.13, 56.289, 9.636, 0.374)
pt3dadd(5.195, 56.189, 9.628, 0.328)
pt3dadd(5.282, 56.108, 9.614, 0.37)
pt3dadd(5.368, 56.026, 9.601, 0.414)
pt3dadd(5.455, 55.945, 9.588, 0.456)
pt3dadd(5.542, 55.864, 9.574, 0.498)
pt3dadd(5.628, 55.782, 9.561, 0.54)
pt3dadd(5.715, 55.701, 9.548, 0.584)
pt3dadd(5.802, 55.619, 9.534, 0.626)
pt3dadd(5.888, 55.538, 9.521, 0.668)
pt3dadd(5.975, 55.456, 9.508, 0.71)
pt3dadd(6.058, 55.374, 9.49, 0.746)
pt3dadd(6.126, 55.286, 9.452, 0.746)
pt3dadd(6.193, 55.198, 9.414, 0.748)
pt3dadd(6.261, 55.11, 9.376, 0.748)
pt3dadd(6.329, 55.022, 9.338, 0.75)
pt3dadd(6.396, 54.934, 9.3, 0.75)
pt3dadd(6.464, 54.846, 9.262, 0.75)
pt3dadd(6.531, 54.758, 9.224, 0.752)
pt3dadd(6.599, 54.669, 9.186, 0.752)
pt3dadd(6.666, 54.581, 9.148, 0.754)
pt3dadd(6.727, 54.489, 9.109, 0.746)
pt3dadd(6.775, 54.39, 9.07, 0.726)
pt3dadd(6.822, 54.29, 9.031, 0.704)
pt3dadd(6.87, 54.191, 8.992, 0.684)
pt3dadd(6.918, 54.091, 8.953, 0.664)
pt3dadd(6.966, 53.991, 8.914, 0.642)
pt3dadd(7.014, 53.892, 8.875, 0.622)
pt3dadd(7.061, 53.792, 8.836, 0.602)
pt3dadd(7.109, 53.692, 8.797, 0.582)
pt3dadd(7.157, 53.593, 8.758, 0.56)
pt3dadd(7.207, 53.492, 8.723, 0.54)
pt3dadd(7.26, 53.391, 8.694, 0.52)
pt3dadd(7.314, 53.289, 8.665, 0.5)
pt3dadd(7.367, 53.187, 8.636, 0.48)
pt3dadd(7.42, 53.085, 8.608, 0.462)
pt3dadd(7.474, 52.984, 8.579, 0.442)
pt3dadd(7.527, 52.882, 8.55, 0.422)
pt3dadd(7.581, 52.78, 8.521, 0.402)
pt3dadd(7.634, 52.678, 8.492, 0.382)
pt3dadd(7.687, 52.577, 8.464, 0.362)
pt3dadd(7.75, 52.481, 8.434, 0.354)
pt3dadd(7.822, 52.392, 8.405, 0.36)
pt3dadd(7.894, 52.303, 8.375, 0.366)
pt3dadd(7.967, 52.214, 8.345, 0.372)
pt3dadd(8.039, 52.126, 8.315, 0.376)
pt3dadd(8.111, 52.037, 8.285, 0.382)
pt3dadd(8.184, 51.948, 8.255, 0.388)
pt3dadd(8.256, 51.859, 8.226, 0.394)
pt3dadd(8.328, 51.77, 8.196, 0.4)
pt3dadd(8.4, 51.681, 8.166, 0.404)
pt3dadd(8.481, 51.607, 8.128, 0.438)
pt3dadd(8.567, 51.54, 8.086, 0.488)
pt3dadd(8.653, 51.473, 8.044, 0.538)
pt3dadd(8.739, 51.406, 8.002, 0.588)
pt3dadd(8.824, 51.339, 7.96, 0.638)
pt3dadd(8.91, 51.272, 7.917, 0.688)
pt3dadd(8.996, 51.205, 7.875, 0.738)
pt3dadd(9.082, 51.138, 7.833, 0.788)
pt3dadd(9.167, 51.071, 7.791, 0.838)
pt3dadd(9.253, 51.004, 7.749, 0.888)
pt3dadd(9.33, 50.924, 7.711, 0.9)
pt3dadd(9.401, 50.838, 7.675, 0.894)
pt3dadd(9.473, 50.752, 7.64, 0.89)
pt3dadd(9.545, 50.665, 7.604, 0.884)
pt3dadd(9.617, 50.579, 7.569, 0.878)
pt3dadd(9.688, 50.493, 7.533, 0.872)
pt3dadd(9.76, 50.407, 7.497, 0.868)
pt3dadd(9.832, 50.321, 7.462, 0.862)
pt3dadd(9.904, 50.235, 7.426, 0.856)
pt3dadd(9.976, 50.149, 7.391, 0.85)
pt3dadd(10.055, 50.068, 7.358, 0.818)
pt3dadd(10.137, 49.989, 7.326, 0.774)
pt3dadd(10.219, 49.911, 7.294, 0.73)
pt3dadd(10.302, 49.832, 7.263, 0.686)
pt3dadd(10.384, 49.753, 7.231, 0.642)
pt3dadd(10.466, 49.675, 7.2, 0.598)
pt3dadd(10.549, 49.596, 7.168, 0.554)
pt3dadd(10.631, 49.517, 7.136, 0.51)
pt3dadd(10.713, 49.439, 7.105, 0.466)
pt3dadd(10.796, 49.36, 7.073, 0.422)
pt3dadd(10.851, 49.266, 7.033, 0.404)
pt3dadd(10.9, 49.169, 6.991, 0.392)
pt3dadd(10.949, 49.071, 6.95, 0.378)
pt3dadd(10.998, 48.974, 6.908, 0.366)
pt3dadd(11.048, 48.876, 6.867, 0.354)
pt3dadd(11.097, 48.779, 6.825, 0.34)
pt3dadd(11.146, 48.682, 6.784, 0.328)
pt3dadd(11.196, 48.584, 6.742, 0.314)
pt3dadd(11.245, 48.487, 6.7, 0.302)
pt3dadd(11.294, 48.39, 6.659, 0.29)
pt3dadd(11.353, 48.29, 6.633, 0.348)
pt3dadd(11.413, 48.19, 6.609, 0.422)
pt3dadd(11.473, 48.09, 6.586, 0.494)
pt3dadd(11.534, 47.991, 6.562, 0.566)
pt3dadd(11.594, 47.891, 6.539, 0.638)
pt3dadd(11.654, 47.791, 6.515, 0.71)
pt3dadd(11.714, 47.691, 6.492, 0.782)
pt3dadd(11.775, 47.591, 6.468, 0.856)
pt3dadd(11.835, 47.491, 6.445, 0.928)
pt3dadd(11.895, 47.391, 6.421, 1)
pt3dadd(11.937, 47.28, 6.407, 0.982)
pt3dadd(11.975, 47.168, 6.393, 0.946)
pt3dadd(12.014, 47.056, 6.38, 0.912)
pt3dadd(12.053, 46.943, 6.366, 0.878)
pt3dadd(12.091, 46.831, 6.353, 0.844)
pt3dadd(12.13, 46.718, 6.34, 0.81)
pt3dadd(12.168, 46.606, 6.326, 0.774)
pt3dadd(12.207, 46.493, 6.313, 0.74)
pt3dadd(12.246, 46.381, 6.3, 0.706)
pt3dadd(12.284, 46.268, 6.286, 0.672)
pt3dadd(12.314, 46.152, 6.28, 0.658)
pt3dadd(12.344, 46.036, 6.275, 0.648)
pt3dadd(12.373, 45.92, 6.27, 0.638)
pt3dadd(12.402, 45.804, 6.265, 0.628)
pt3dadd(12.432, 45.688, 6.259, 0.618)
pt3dadd(12.461, 45.571, 6.254, 0.608)
pt3dadd(12.49, 45.455, 6.249, 0.598)
pt3dadd(12.52, 45.339, 6.244, 0.588)
pt3dadd(12.549, 45.223, 6.238, 0.58)
pt3dadd(12.578, 45.107, 6.233, 0.57)
pt3dadd(12.605, 44.99, 6.231, 0.57)
pt3dadd(12.63, 44.872, 6.229, 0.574)
pt3dadd(12.656, 44.755, 6.227, 0.576)
pt3dadd(12.682, 44.638, 6.225, 0.58)
pt3dadd(12.708, 44.521, 6.223, 0.582)
pt3dadd(12.734, 44.404, 6.221, 0.584)
pt3dadd(12.76, 44.287, 6.219, 0.588)
pt3dadd(12.786, 44.169, 6.217, 0.59)
pt3dadd(12.812, 44.052, 6.215, 0.594)
pt3dadd(12.838, 43.935, 6.213, 0.596)
pt3dadd(12.872, 43.82, 6.209, 0.578)
pt3dadd(12.908, 43.706, 6.205, 0.56)
pt3dadd(12.943, 43.591, 6.201, 0.54)
pt3dadd(12.978, 43.477, 6.197, 0.522)
pt3dadd(13.014, 43.362, 6.194, 0.502)
pt3dadd(13.049, 43.248, 6.19, 0.482)
pt3dadd(13.084, 43.133, 6.186, 0.464)
pt3dadd(13.12, 43.018, 6.182, 0.444)
pt3dadd(13.155, 42.904, 6.178, 0.426)
pt3dadd(13.191, 42.789, 6.174, 0.406)
pt3dadd(13.254, 42.687, 6.168, 0.388)
pt3dadd(13.316, 42.585, 6.162, 0.372)
pt3dadd(13.379, 42.483, 6.155, 0.354)
pt3dadd(13.441, 42.381, 6.149, 0.336)
pt3dadd(13.504, 42.279, 6.142, 0.318)
pt3dadd(13.567, 42.177, 6.136, 0.3)
pt3dadd(13.629, 42.075, 6.129, 0.284)
pt3dadd(13.692, 41.973, 6.123, 0.266)
pt3dadd(13.755, 41.871, 6.117, 0.248)
pt3dadd(13.818, 41.769, 6.11, 0.232)
pt3dadd(13.896, 41.679, 6.1, 0.246)
pt3dadd(13.973, 41.588, 6.091, 0.262)
pt3dadd(14.051, 41.498, 6.081, 0.278)
pt3dadd(14.129, 41.407, 6.071, 0.292)
pt3dadd(14.207, 41.316, 6.061, 0.308)
pt3dadd(14.285, 41.226, 6.051, 0.324)
pt3dadd(14.363, 41.136, 6.042, 0.34)
}
}
proc shape3d_156() {
dend_7[46] { pt3dadd(14.441, 41.045, 6.032, 0.354)
pt3dadd(14.519, 40.955, 6.022, 0.37)
pt3dadd(14.597, 40.864, 6.012, 0.384)
pt3dadd(14.675, 40.78, 5.982, 0.38)
pt3dadd(14.753, 40.697, 5.952, 0.374)
pt3dadd(14.831, 40.613, 5.922, 0.368)
pt3dadd(14.909, 40.529, 5.892, 0.362)
pt3dadd(14.987, 40.445, 5.862, 0.356)
pt3dadd(15.065, 40.362, 5.832, 0.352)
pt3dadd(15.143, 40.278, 5.803, 0.346)
pt3dadd(15.222, 40.194, 5.773, 0.34)
pt3dadd(15.3, 40.11, 5.743, 0.334)
pt3dadd(15.378, 40.027, 5.712, 0.328)
pt3dadd(15.457, 39.946, 5.679, 0.318)
pt3dadd(15.536, 39.865, 5.646, 0.306)
pt3dadd(15.615, 39.784, 5.613, 0.296)
pt3dadd(15.694, 39.703, 5.58, 0.286)
pt3dadd(15.774, 39.622, 5.547, 0.276)
pt3dadd(15.853, 39.541, 5.514, 0.266)
pt3dadd(15.932, 39.46, 5.481, 0.254)
pt3dadd(16.011, 39.379, 5.447, 0.244)
pt3dadd(16.09, 39.298, 5.415, 0.234)
pt3dadd(16.17, 39.216, 5.385, 0.228)
pt3dadd(16.252, 39.132, 5.365, 0.236)
pt3dadd(16.333, 39.047, 5.345, 0.242)
pt3dadd(16.415, 38.962, 5.326, 0.25)
pt3dadd(16.497, 38.878, 5.306, 0.256)
pt3dadd(16.579, 38.793, 5.287, 0.264)
pt3dadd(16.66, 38.708, 5.267, 0.272)
pt3dadd(16.742, 38.624, 5.248, 0.278)
pt3dadd(16.824, 38.539, 5.228, 0.286)
pt3dadd(16.905, 38.454, 5.208, 0.294)
pt3dadd(16.987, 38.369, 5.192, 0.306)
pt3dadd(17.07, 38.282, 5.183, 0.338)
pt3dadd(17.152, 38.196, 5.174, 0.37)
pt3dadd(17.234, 38.109, 5.165, 0.4)
pt3dadd(17.316, 38.022, 5.156, 0.432)
pt3dadd(17.399, 37.935, 5.148, 0.464)
pt3dadd(17.481, 37.849, 5.139, 0.494)
pt3dadd(17.563, 37.762, 5.13, 0.526)
pt3dadd(17.645, 37.675, 5.121, 0.558)
pt3dadd(17.727, 37.588, 5.113, 0.588)
pt3dadd(17.809, 37.501, 5.106, 0.608)
pt3dadd(17.89, 37.412, 5.104, 0.592)
pt3dadd(17.97, 37.323, 5.103, 0.576)
pt3dadd(18.051, 37.234, 5.101, 0.56)
pt3dadd(18.132, 37.145, 5.1, 0.544)
pt3dadd(18.212, 37.056, 5.098, 0.528)
pt3dadd(18.293, 36.968, 5.097, 0.512)
pt3dadd(18.373, 36.879, 5.095, 0.496)
pt3dadd(18.454, 36.79, 5.094, 0.48)
pt3dadd(18.534, 36.701, 5.092, 0.464)
pt3dadd(18.615, 36.612, 5.091, 0.446)
pt3dadd(18.693, 36.521, 5.092, 0.424)
pt3dadd(18.773, 36.431, 5.092, 0.4)
pt3dadd(18.852, 36.34, 5.093, 0.378)
pt3dadd(18.93, 36.25, 5.094, 0.356)
pt3dadd(19.009, 36.16, 5.094, 0.332)
pt3dadd(19.088, 36.069, 5.095, 0.31)
pt3dadd(19.167, 35.979, 5.095, 0.288)
pt3dadd(19.246, 35.889, 5.096, 0.266)
pt3dadd(19.325, 35.798, 5.097, 0.242)
pt3dadd(19.403, 35.707, 5.097, 0.226)
pt3dadd(19.478, 35.613, 5.099, 0.226)
pt3dadd(19.553, 35.52, 5.1, 0.226)
pt3dadd(19.628, 35.426, 5.101, 0.226)
pt3dadd(19.703, 35.332, 5.102, 0.226)
pt3dadd(19.778, 35.238, 5.103, 0.226)
pt3dadd(19.853, 35.145, 5.104, 0.226)
pt3dadd(19.927, 35.051, 5.105, 0.226)
pt3dadd(20.002, 34.957, 5.106, 0.226)
pt3dadd(20.077, 34.863, 5.107, 0.226)
pt3dadd(20.147, 34.767, 5.109, 0.226)
pt3dadd(20.205, 34.661, 5.111, 0.226)
pt3dadd(20.262, 34.556, 5.113, 0.226)
pt3dadd(20.319, 34.45, 5.115, 0.226)
pt3dadd(20.376, 34.345, 5.117, 0.226)
pt3dadd(20.434, 34.239, 5.12, 0.226)
pt3dadd(20.491, 34.134, 5.122, 0.226)
pt3dadd(20.548, 34.029, 5.124, 0.226)
pt3dadd(20.605, 33.923, 5.126, 0.226)
pt3dadd(20.663, 33.818, 5.128, 0.226)
pt3dadd(20.715, 33.71, 5.131, 0.232)
pt3dadd(20.758, 33.598, 5.136, 0.246)
pt3dadd(20.8, 33.486, 5.14, 0.262)
pt3dadd(20.843, 33.374, 5.144, 0.278)
pt3dadd(20.885, 33.262, 5.149, 0.294)
pt3dadd(20.928, 33.15, 5.153, 0.308)
pt3dadd(20.97, 33.037, 5.158, 0.324)
pt3dadd(21.013, 32.925, 5.162, 0.34)
pt3dadd(21.055, 32.813, 5.166, 0.356)
pt3dadd(21.098, 32.701, 5.171, 0.372)
pt3dadd(21.138, 32.588, 5.176, 0.39)
pt3dadd(21.175, 32.475, 5.183, 0.412)
pt3dadd(21.212, 32.361, 5.191, 0.436)
pt3dadd(21.249, 32.247, 5.199, 0.458)
pt3dadd(21.286, 32.133, 5.206, 0.482)
pt3dadd(21.324, 32.019, 5.213, 0.504)
pt3dadd(21.361, 31.906, 5.221, 0.528)
pt3dadd(21.398, 31.792, 5.228, 0.55)
pt3dadd(21.435, 31.678, 5.236, 0.574)
pt3dadd(21.472, 31.564, 5.243, 0.598)
pt3dadd(21.516, 31.454, 5.252, 0.598)
pt3dadd(21.572, 31.348, 5.262, 0.564)
pt3dadd(21.627, 31.242, 5.272, 0.53)
pt3dadd(21.682, 31.137, 5.283, 0.496)
pt3dadd(21.738, 31.031, 5.293, 0.462)
pt3dadd(21.793, 30.925, 5.303, 0.428)
pt3dadd(21.849, 30.819, 5.313, 0.394)
pt3dadd(21.904, 30.714, 5.324, 0.36)
pt3dadd(21.96, 30.608, 5.334, 0.326)
pt3dadd(22.015, 30.502, 5.344, 0.292)
pt3dadd(22.068, 30.398, 5.362, 0.276)
pt3dadd(22.119, 30.295, 5.393, 0.286)
pt3dadd(22.169, 30.193, 5.424, 0.294)
pt3dadd(22.219, 30.09, 5.455, 0.304)
pt3dadd(22.269, 29.988, 5.486, 0.314)
pt3dadd(22.32, 29.885, 5.516, 0.324)
pt3dadd(22.37, 29.783, 5.547, 0.332)
pt3dadd(22.42, 29.68, 5.578, 0.342)
pt3dadd(22.47, 29.578, 5.609, 0.352)
pt3dadd(22.52, 29.475, 5.64, 0.362)
pt3dadd(22.575, 29.374, 5.669, 0.368)
pt3dadd(22.634, 29.275, 5.696, 0.368)
pt3dadd(22.694, 29.177, 5.724, 0.37)
pt3dadd(22.754, 29.078, 5.751, 0.372)
pt3dadd(22.813, 28.979, 5.778, 0.372)
pt3dadd(22.873, 28.88, 5.805, 0.374)
pt3dadd(22.933, 28.781, 5.832, 0.376)
pt3dadd(22.993, 28.682, 5.859, 0.376)
pt3dadd(23.052, 28.583, 5.887, 0.378)
pt3dadd(23.112, 28.485, 5.914, 0.38)
pt3dadd(23.177, 28.388, 5.937, 0.372)
pt3dadd(23.247, 28.294, 5.957, 0.358)
pt3dadd(23.318, 28.199, 5.976, 0.342)
pt3dadd(23.388, 28.105, 5.995, 0.326)
pt3dadd(23.458, 28.01, 6.015, 0.312)
pt3dadd(23.529, 27.916, 6.034, 0.296)
pt3dadd(23.599, 27.822, 6.054, 0.282)
pt3dadd(23.669, 27.727, 6.073, 0.266)
pt3dadd(23.74, 27.633, 6.092, 0.252)
pt3dadd(23.81, 27.538, 6.112, 0.236)
pt3dadd(23.884, 27.446, 6.126, 0.25)
pt3dadd(23.963, 27.356, 6.134, 0.292)
pt3dadd(24.041, 27.265, 6.143, 0.334)
pt3dadd(24.119, 27.175, 6.151, 0.378)
pt3dadd(24.198, 27.085, 6.16, 0.42)
pt3dadd(24.276, 26.995, 6.168, 0.462)
pt3dadd(24.355, 26.904, 6.177, 0.504)
pt3dadd(24.433, 26.814, 6.185, 0.548)
pt3dadd(24.511, 26.724, 6.194, 0.59)
pt3dadd(24.59, 26.633, 6.202, 0.632)
pt3dadd(24.669, 26.544, 6.209, 0.66)
pt3dadd(24.75, 26.455, 6.214, 0.674)
pt3dadd(24.83, 26.367, 6.219, 0.686)
pt3dadd(24.911, 26.278, 6.223, 0.7)
pt3dadd(24.992, 26.189, 6.228, 0.714)
pt3dadd(25.072, 26.1, 6.233, 0.726)
pt3dadd(25.153, 26.012, 6.238, 0.74)
pt3dadd(25.233, 25.923, 6.243, 0.754)
pt3dadd(25.314, 25.834, 6.247, 0.766)
pt3dadd(25.395, 25.746, 6.252, 0.78)
pt3dadd(25.477, 25.658, 6.255, 0.772)
pt3dadd(25.56, 25.572, 6.255, 0.744)
pt3dadd(25.643, 25.485, 6.255, 0.718)
pt3dadd(25.726, 25.399, 6.254, 0.69)
pt3dadd(25.809, 25.312, 6.254, 0.662)
pt3dadd(25.893, 25.226, 6.254, 0.634)
pt3dadd(25.976, 25.139, 6.254, 0.606)
pt3dadd(26.059, 25.053, 6.254, 0.578)
pt3dadd(26.142, 24.966, 6.254, 0.55)
pt3dadd(26.226, 24.88, 6.254, 0.522)
pt3dadd(26.308, 24.793, 6.254, 0.5)
pt3dadd(26.389, 24.704, 6.254, 0.484)
pt3dadd(26.471, 24.616, 6.254, 0.466)
pt3dadd(26.552, 24.528, 6.254, 0.45)
pt3dadd(26.633, 24.44, 6.254, 0.432)
pt3dadd(26.714, 24.351, 6.254, 0.416)
pt3dadd(26.796, 24.263, 6.254, 0.398)
pt3dadd(26.877, 24.175, 6.254, 0.382)
pt3dadd(26.958, 24.086, 6.254, 0.364)
pt3dadd(27.039, 23.998, 6.254, 0.348)
pt3dadd(27.12, 23.909, 6.254, 0.334)
pt3dadd(27.2, 23.82, 6.254, 0.322)
pt3dadd(27.28, 23.73, 6.254, 0.31)
pt3dadd(27.36, 23.641, 6.254, 0.3)
pt3dadd(27.44, 23.552, 6.254, 0.288)
pt3dadd(27.52, 23.462, 6.254, 0.276)
pt3dadd(27.6, 23.373, 6.253, 0.266)
pt3dadd(27.681, 23.284, 6.253, 0.254)
pt3dadd(27.761, 23.194, 6.253, 0.242)
pt3dadd(27.841, 23.105, 6.253, 0.232)
pt3dadd(27.919, 23.014, 6.253, 0.226)
pt3dadd(27.997, 22.923, 6.253, 0.226)
pt3dadd(28.074, 22.831, 6.253, 0.226)
pt3dadd(28.152, 22.739, 6.253, 0.226)
pt3dadd(28.229, 22.647, 6.253, 0.226)
pt3dadd(28.306, 22.556, 6.253, 0.226)
pt3dadd(28.384, 22.464, 6.253, 0.226)
pt3dadd(28.461, 22.372, 6.252, 0.226)
}
}
proc shape3d_157() {
dend_7[46] { pt3dadd(28.538, 22.28, 6.252, 0.226)
pt3dadd(28.616, 22.189, 6.252, 0.226)
pt3dadd(28.685, 22.091, 6.252, 0.226)
pt3dadd(28.747, 21.989, 6.252, 0.226)
pt3dadd(28.809, 21.886, 6.252, 0.226)
pt3dadd(28.871, 21.783, 6.251, 0.226)
pt3dadd(28.933, 21.68, 6.251, 0.226)
pt3dadd(28.995, 21.577, 6.251, 0.226)
pt3dadd(29.057, 21.475, 6.251, 0.226)
pt3dadd(29.119, 21.372, 6.25, 0.226)
pt3dadd(29.181, 21.269, 6.25, 0.226)
pt3dadd(29.243, 21.166, 6.25, 0.226)
pt3dadd(29.301, 21.062, 6.249, 0.23)
pt3dadd(29.358, 20.956, 6.249, 0.236)
pt3dadd(29.414, 20.85, 6.249, 0.242)
pt3dadd(29.47, 20.744, 6.248, 0.248)
pt3dadd(29.527, 20.638, 6.248, 0.254)
pt3dadd(29.583, 20.532, 6.247, 0.26)
pt3dadd(29.639, 20.426, 6.247, 0.266)
pt3dadd(29.695, 20.32, 6.247, 0.27)
pt3dadd(29.752, 20.214, 6.246, 0.276)
pt3dadd(29.808, 20.108, 6.246, 0.282)
pt3dadd(29.867, 20.003, 6.245, 0.294)
pt3dadd(29.927, 19.899, 6.245, 0.312)
pt3dadd(29.987, 19.796, 6.244, 0.328)
pt3dadd(30.047, 19.692, 6.243, 0.344)
pt3dadd(30.108, 19.588, 6.243, 0.362)
pt3dadd(30.168, 19.484, 6.242, 0.378)
pt3dadd(30.228, 19.381, 6.241, 0.394)
pt3dadd(30.288, 19.277, 6.241, 0.412)
pt3dadd(30.349, 19.173, 6.24, 0.428)
pt3dadd(30.409, 19.069, 6.24, 0.444)
pt3dadd(30.458, 18.96, 6.238, 0.442)
pt3dadd(30.499, 18.847, 6.237, 0.424)
pt3dadd(30.54, 18.735, 6.235, 0.404)
pt3dadd(30.58, 18.622, 6.234, 0.386)
pt3dadd(30.621, 18.509, 6.233, 0.368)
pt3dadd(30.662, 18.396, 6.231, 0.35)
pt3dadd(30.703, 18.283, 6.229, 0.332)
pt3dadd(30.744, 18.171, 6.228, 0.314)
pt3dadd(30.784, 18.058, 6.226, 0.296)
pt3dadd(30.825, 17.945, 6.225, 0.278)
pt3dadd(30.872, 17.835, 6.223, 0.282)
pt3dadd(30.923, 17.726, 6.22, 0.304)
pt3dadd(30.974, 17.617, 6.218, 0.326)
pt3dadd(31.026, 17.509, 6.215, 0.348)
pt3dadd(31.077, 17.4, 6.213, 0.37)
pt3dadd(31.128, 17.292, 6.21, 0.392)
pt3dadd(31.179, 17.184, 6.207, 0.414)
pt3dadd(31.23, 17.075, 6.205, 0.436)
pt3dadd(31.282, 16.967, 6.202, 0.456)
pt3dadd(31.333, 16.858, 6.2, 0.478)
pt3dadd(31.379, 16.748, 6.196, 0.488)
pt3dadd(31.422, 16.636, 6.19, 0.49)
pt3dadd(31.464, 16.524, 6.185, 0.492)
pt3dadd(31.507, 16.412, 6.18, 0.494)
pt3dadd(31.55, 16.3, 6.175, 0.496)
pt3dadd(31.593, 16.188, 6.17, 0.5)
pt3dadd(31.636, 16.076, 6.165, 0.502)
pt3dadd(31.678, 15.964, 6.16, 0.504)
pt3dadd(31.721, 15.852, 6.155, 0.506)
pt3dadd(31.764, 15.74, 6.149, 0.508)
pt3dadd(31.794, 15.625, 6.141, 0.49)
pt3dadd(31.817, 15.507, 6.132, 0.462)
pt3dadd(31.84, 15.39, 6.123, 0.432)
pt3dadd(31.863, 15.273, 6.113, 0.404)
pt3dadd(31.886, 15.156, 6.104, 0.376)
pt3dadd(31.909, 15.039, 6.095, 0.348)
pt3dadd(31.932, 14.921, 6.085, 0.32)
pt3dadd(31.955, 14.804, 6.076, 0.292)
pt3dadd(31.978, 14.687, 6.067, 0.264)
pt3dadd(32.002, 14.57, 6.057, 0.234)
pt3dadd(32.014, 14.452, 6.043, 0.228)
pt3dadd(32.023, 14.334, 6.026, 0.23)
pt3dadd(32.031, 14.216, 6.009, 0.232)
pt3dadd(32.039, 14.098, 5.992, 0.234)
pt3dadd(32.047, 13.98, 5.975, 0.236)
pt3dadd(32.055, 13.862, 5.958, 0.238)
pt3dadd(32.064, 13.744, 5.941, 0.24)
pt3dadd(32.072, 13.626, 5.924, 0.242)
pt3dadd(32.08, 13.508, 5.907, 0.244)
pt3dadd(32.088, 13.39, 5.89, 0.246)
pt3dadd(32.084, 13.28, 5.853, 0.26)
pt3dadd(32.076, 13.172, 5.81, 0.28)
pt3dadd(32.067, 13.064, 5.767, 0.298)
pt3dadd(32.059, 12.955, 5.724, 0.318)
pt3dadd(32.051, 12.847, 5.681, 0.336)
pt3dadd(32.042, 12.739, 5.639, 0.354)
pt3dadd(32.034, 12.631, 5.596, 0.374)
pt3dadd(32.025, 12.523, 5.553, 0.392)
pt3dadd(32.017, 12.415, 5.51, 0.412)
pt3dadd(32.009, 12.307, 5.467, 0.43)
pt3dadd(31.996, 12.197, 5.428, 0.436)
pt3dadd(31.981, 12.087, 5.391, 0.438)
pt3dadd(31.967, 11.976, 5.354, 0.44)
pt3dadd(31.953, 11.866, 5.318, 0.442)
pt3dadd(31.938, 11.755, 5.28, 0.444)
pt3dadd(31.924, 11.644, 5.244, 0.444)
pt3dadd(31.909, 11.534, 5.207, 0.446)
pt3dadd(31.895, 11.423, 5.17, 0.448)
pt3dadd(31.881, 11.313, 5.133, 0.45)
pt3dadd(31.866, 11.202, 5.096, 0.452)
pt3dadd(31.82, 11.103, 5.059, 0.436)
pt3dadd(31.762, 11.007, 5.022, 0.414)
pt3dadd(31.705, 10.912, 4.984, 0.392)
pt3dadd(31.647, 10.817, 4.947, 0.37)
pt3dadd(31.59, 10.721, 4.91, 0.348)
pt3dadd(31.532, 10.626, 4.873, 0.326)
pt3dadd(31.475, 10.53, 4.835, 0.304)
pt3dadd(31.418, 10.435, 4.798, 0.282)
pt3dadd(31.36, 10.339, 4.761, 0.26)
pt3dadd(31.303, 10.244, 4.724, 0.238)
pt3dadd(31.265, 10.153, 4.667, 0.236)
pt3dadd(31.228, 10.063, 4.608, 0.234)
pt3dadd(31.192, 9.973, 4.55, 0.234)
pt3dadd(31.156, 9.883, 4.491, 0.232)
pt3dadd(31.12, 9.793, 4.432, 0.232)
pt3dadd(31.084, 9.702, 4.373, 0.23)
pt3dadd(31.048, 9.612, 4.315, 0.23)
pt3dadd(31.012, 9.522, 4.256, 0.228)
pt3dadd(30.976, 9.432, 4.197, 0.228)
pt3dadd(30.94, 9.342, 4.138, 0.226)
pt3dadd(30.921, 9.243, 4.084, 0.246)
pt3dadd(30.904, 9.143, 4.031, 0.268)
pt3dadd(30.887, 9.043, 3.977, 0.29)
pt3dadd(30.87, 8.944, 3.923, 0.31)
pt3dadd(30.853, 8.844, 3.869, 0.332)
pt3dadd(30.835, 8.744, 3.816, 0.354)
pt3dadd(30.818, 8.644, 3.762, 0.376)
pt3dadd(30.801, 8.545, 3.708, 0.398)
pt3dadd(30.784, 8.445, 3.654, 0.42)
pt3dadd(30.767, 8.345, 3.601, 0.44)
pt3dadd(30.767, 8.286, 3.514, 0.42)
pt3dadd(30.767, 8.226, 3.427, 0.398)
pt3dadd(30.767, 8.167, 3.34, 0.376)
pt3dadd(30.767, 8.107, 3.253, 0.356)
pt3dadd(30.767, 8.047, 3.167, 0.334)
pt3dadd(30.767, 7.988, 3.08, 0.312)
pt3dadd(30.767, 7.928, 2.993, 0.29)
pt3dadd(30.767, 7.869, 2.906, 0.268)
pt3dadd(30.767, 7.809, 2.819, 0.248)
pt3dadd(30.767, 7.75, 2.732, 0.226)
}
dend_7[47] {pt3dclear()
pt3dadd(4.26, 58.557, 9.744, 0.678)
pt3dadd(4.201, 58.567, 9.745, 0.66)
pt3dadd(4.085, 58.568, 9.748, 0.628)
pt3dadd(3.97, 58.568, 9.75, 0.594)
pt3dadd(3.854, 58.569, 9.753, 0.562)
pt3dadd(3.739, 58.57, 9.755, 0.53)
pt3dadd(3.624, 58.57, 9.758, 0.498)
pt3dadd(3.508, 58.571, 9.761, 0.466)
pt3dadd(3.393, 58.572, 9.763, 0.434)
pt3dadd(3.278, 58.572, 9.766, 0.4)
pt3dadd(3.162, 58.573, 9.768, 0.368)
pt3dadd(3.047, 58.574, 9.771, 0.336)
pt3dadd(2.932, 58.574, 9.773, 0.304)
pt3dadd(2.816, 58.575, 9.776, 0.272)
pt3dadd(2.707, 58.563, 9.773, 0.252)
pt3dadd(2.625, 58.492, 9.749, 0.298)
pt3dadd(2.543, 58.421, 9.724, 0.342)
pt3dadd(2.461, 58.35, 9.699, 0.388)
pt3dadd(2.379, 58.278, 9.674, 0.432)
pt3dadd(2.297, 58.207, 9.649, 0.478)
pt3dadd(2.215, 58.136, 9.625, 0.522)
pt3dadd(2.133, 58.065, 9.6, 0.568)
pt3dadd(2.051, 57.993, 9.575, 0.612)
pt3dadd(1.969, 57.922, 9.55, 0.656)
pt3dadd(1.89, 57.853, 9.518, 0.69)
pt3dadd(1.819, 57.787, 9.469, 0.698)
pt3dadd(1.748, 57.721, 9.42, 0.704)
pt3dadd(1.677, 57.655, 9.372, 0.712)
pt3dadd(1.681, 57.661, 9.372, 0.712)
pt3dadd(1.61, 57.595, 9.323, 0.72)
pt3dadd(1.539, 57.529, 9.275, 0.728)
pt3dadd(1.468, 57.463, 9.226, 0.736)
pt3dadd(1.396, 57.397, 9.178, 0.742)
pt3dadd(1.325, 57.331, 9.129, 0.75)
pt3dadd(1.254, 57.265, 9.08, 0.758)
pt3dadd(1.182, 57.2, 9.031, 0.756)
pt3dadd(1.187, 57.206, 9.032, 0.756)
pt3dadd(1.115, 57.142, 8.982, 0.748)
pt3dadd(1.043, 57.077, 8.933, 0.74)
pt3dadd(0.97, 57.013, 8.884, 0.732)
pt3dadd(0.899, 56.948, 8.834, 0.722)
pt3dadd(0.826, 56.884, 8.785, 0.714)
pt3dadd(0.754, 56.819, 8.736, 0.706)
pt3dadd(0.682, 56.755, 8.686, 0.698)
pt3dadd(0.687, 56.761, 8.687, 0.698)
pt3dadd(0.615, 56.697, 8.637, 0.69)
pt3dadd(0.543, 56.632, 8.588, 0.68)
pt3dadd(0.547, 56.639, 8.588, 0.68)
pt3dadd(0.476, 56.579, 8.534, 0.686)
pt3dadd(0.405, 56.523, 8.476, 0.7)
pt3dadd(0.335, 56.466, 8.418, 0.712)
pt3dadd(0.264, 56.41, 8.361, 0.724)
pt3dadd(0.193, 56.354, 8.303, 0.738)
pt3dadd(0.122, 56.297, 8.246, 0.75)
pt3dadd(0.051, 56.241, 8.188, 0.764)
pt3dadd(-0.019, 56.184, 8.131, 0.776)
pt3dadd(-0.09, 56.128, 8.073, 0.788)
pt3dadd(-0.161, 56.071, 8.016, 0.802)
}
}
proc shape3d_158() {
dend_7[47] { pt3dadd(-0.238, 56.017, 7.963, 0.804)
pt3dadd(-0.316, 55.963, 7.911, 0.802)
pt3dadd(-0.395, 55.91, 7.859, 0.802)
pt3dadd(-0.473, 55.856, 7.807, 0.8)
pt3dadd(-0.552, 55.802, 7.755, 0.8)
pt3dadd(-0.63, 55.749, 7.703, 0.798)
pt3dadd(-0.709, 55.695, 7.651, 0.798)
pt3dadd(-0.787, 55.641, 7.599, 0.796)
pt3dadd(-0.865, 55.587, 7.547, 0.796)
pt3dadd(-0.944, 55.534, 7.495, 0.794)
pt3dadd(-1.034, 55.488, 7.452, 0.77)
pt3dadd(-1.125, 55.443, 7.41, 0.744)
pt3dadd(-1.216, 55.397, 7.368, 0.716)
pt3dadd(-1.307, 55.352, 7.325, 0.69)
pt3dadd(-1.398, 55.306, 7.283, 0.664)
pt3dadd(-1.489, 55.261, 7.241, 0.638)
pt3dadd(-1.58, 55.215, 7.198, 0.612)
pt3dadd(-1.671, 55.17, 7.156, 0.586)
pt3dadd(-1.762, 55.124, 7.113, 0.56)
pt3dadd(-1.854, 55.08, 7.071, 0.532)
pt3dadd(-1.951, 55.056, 7.025, 0.502)
pt3dadd(-2.049, 55.032, 6.979, 0.47)
pt3dadd(-2.146, 55.007, 6.933, 0.44)
pt3dadd(-2.244, 54.983, 6.887, 0.408)
pt3dadd(-2.341, 54.959, 6.841, 0.378)
pt3dadd(-2.439, 54.934, 6.795, 0.346)
pt3dadd(-2.536, 54.91, 6.749, 0.316)
pt3dadd(-2.633, 54.886, 6.703, 0.284)
pt3dadd(-2.731, 54.861, 6.657, 0.254)
pt3dadd(-2.83, 54.838, 6.613, 0.226)
pt3dadd(-2.939, 54.821, 6.587, 0.226)
pt3dadd(-3.048, 54.805, 6.561, 0.226)
pt3dadd(-3.157, 54.788, 6.535, 0.226)
pt3dadd(-3.266, 54.772, 6.509, 0.226)
pt3dadd(-3.375, 54.755, 6.483, 0.226)
pt3dadd(-3.484, 54.739, 6.457, 0.226)
pt3dadd(-3.593, 54.722, 6.431, 0.226)
pt3dadd(-3.702, 54.705, 6.405, 0.226)
pt3dadd(-3.811, 54.689, 6.379, 0.226)
pt3dadd(-3.921, 54.673, 6.354, 0.23)
pt3dadd(-4.033, 54.66, 6.336, 0.264)
pt3dadd(-4.145, 54.647, 6.317, 0.298)
pt3dadd(-4.256, 54.635, 6.299, 0.33)
pt3dadd(-4.368, 54.622, 6.28, 0.364)
pt3dadd(-4.48, 54.609, 6.262, 0.398)
pt3dadd(-4.592, 54.596, 6.243, 0.432)
pt3dadd(-4.704, 54.584, 6.225, 0.466)
pt3dadd(-4.816, 54.571, 6.206, 0.5)
pt3dadd(-4.928, 54.558, 6.188, 0.532)
pt3dadd(-5.039, 54.542, 6.17, 0.56)
pt3dadd(-5.145, 54.506, 6.157, 0.548)
pt3dadd(-5.252, 54.469, 6.144, 0.536)
pt3dadd(-5.358, 54.432, 6.132, 0.524)
pt3dadd(-5.464, 54.395, 6.119, 0.512)
pt3dadd(-5.571, 54.358, 6.106, 0.5)
pt3dadd(-5.677, 54.321, 6.093, 0.488)
pt3dadd(-5.783, 54.285, 6.08, 0.476)
pt3dadd(-5.89, 54.248, 6.068, 0.464)
pt3dadd(-5.996, 54.211, 6.055, 0.452)
pt3dadd(-6.102, 54.172, 6.041, 0.438)
pt3dadd(-6.203, 54.128, 6.021, 0.422)
pt3dadd(-6.305, 54.083, 6.002, 0.408)
pt3dadd(-6.406, 54.039, 5.982, 0.392)
pt3dadd(-6.508, 53.994, 5.963, 0.376)
pt3dadd(-6.609, 53.95, 5.943, 0.36)
pt3dadd(-6.711, 53.905, 5.924, 0.344)
pt3dadd(-6.812, 53.86, 5.904, 0.33)
pt3dadd(-6.914, 53.816, 5.885, 0.314)
pt3dadd(-7.016, 53.771, 5.865, 0.298)
pt3dadd(-7.116, 53.729, 5.841, 0.292)
pt3dadd(-7.215, 53.689, 5.807, 0.308)
pt3dadd(-7.313, 53.65, 5.772, 0.324)
pt3dadd(-7.412, 53.611, 5.737, 0.342)
pt3dadd(-7.51, 53.572, 5.703, 0.358)
pt3dadd(-7.609, 53.533, 5.668, 0.374)
pt3dadd(-7.707, 53.494, 5.634, 0.39)
pt3dadd(-7.806, 53.455, 5.599, 0.408)
pt3dadd(-7.904, 53.416, 5.564, 0.424)
pt3dadd(-8.003, 53.377, 5.53, 0.44)
pt3dadd(-8.1, 53.333, 5.499, 0.448)
pt3dadd(-8.194, 53.275, 5.479, 0.432)
pt3dadd(-8.288, 53.218, 5.458, 0.416)
pt3dadd(-8.382, 53.161, 5.437, 0.4)
pt3dadd(-8.476, 53.104, 5.416, 0.384)
pt3dadd(-8.57, 53.046, 5.395, 0.368)
pt3dadd(-8.664, 52.989, 5.374, 0.352)
pt3dadd(-8.758, 52.932, 5.353, 0.336)
pt3dadd(-8.852, 52.875, 5.332, 0.32)
pt3dadd(-8.946, 52.817, 5.312, 0.304)
pt3dadd(-9.04, 52.76, 5.293, 0.292)
pt3dadd(-9.134, 52.7, 5.278, 0.284)
pt3dadd(-9.229, 52.641, 5.263, 0.278)
pt3dadd(-9.323, 52.581, 5.248, 0.272)
pt3dadd(-9.417, 52.522, 5.233, 0.264)
pt3dadd(-9.511, 52.462, 5.218, 0.258)
pt3dadd(-9.605, 52.403, 5.203, 0.252)
pt3dadd(-9.699, 52.343, 5.188, 0.244)
pt3dadd(-9.794, 52.284, 5.173, 0.238)
pt3dadd(-9.888, 52.224, 5.158, 0.23)
pt3dadd(-9.982, 52.165, 5.145, 0.226)
pt3dadd(-10.078, 52.107, 5.135, 0.226)
pt3dadd(-10.174, 52.048, 5.126, 0.226)
pt3dadd(-10.27, 51.99, 5.116, 0.226)
pt3dadd(-10.365, 51.931, 5.107, 0.226)
pt3dadd(-10.461, 51.872, 5.097, 0.226)
pt3dadd(-10.557, 51.814, 5.088, 0.226)
pt3dadd(-10.653, 51.755, 5.078, 0.226)
pt3dadd(-10.748, 51.697, 5.069, 0.226)
pt3dadd(-10.844, 51.638, 5.059, 0.226)
pt3dadd(-10.943, 51.585, 5.052, 0.226)
pt3dadd(-11.048, 51.543, 5.049, 0.226)
pt3dadd(-11.153, 51.5, 5.045, 0.226)
pt3dadd(-11.258, 51.457, 5.042, 0.226)
pt3dadd(-11.363, 51.415, 5.039, 0.226)
pt3dadd(-11.468, 51.372, 5.036, 0.226)
pt3dadd(-11.573, 51.33, 5.032, 0.226)
pt3dadd(-11.678, 51.287, 5.029, 0.226)
pt3dadd(-11.783, 51.244, 5.026, 0.226)
pt3dadd(-11.888, 51.202, 5.023, 0.226)
pt3dadd(-11.995, 51.165, 5.018, 0.226)
pt3dadd(-12.105, 51.138, 5.01, 0.226)
pt3dadd(-12.215, 51.111, 5.002, 0.226)
pt3dadd(-12.326, 51.084, 4.995, 0.226)
pt3dadd(-12.436, 51.057, 4.987, 0.226)
pt3dadd(-12.547, 51.03, 4.979, 0.226)
pt3dadd(-12.657, 51.004, 4.971, 0.226)
pt3dadd(-12.768, 50.977, 4.963, 0.226)
pt3dadd(-12.878, 50.95, 4.956, 0.226)
pt3dadd(-12.988, 50.923, 4.948, 0.226)
pt3dadd(-13.097, 50.892, 4.939, 0.23)
pt3dadd(-13.203, 50.853, 4.926, 0.242)
pt3dadd(-13.308, 50.813, 4.914, 0.254)
pt3dadd(-13.413, 50.774, 4.902, 0.266)
pt3dadd(-13.519, 50.735, 4.89, 0.276)
pt3dadd(-13.624, 50.695, 4.878, 0.288)
pt3dadd(-13.73, 50.656, 4.866, 0.3)
pt3dadd(-13.836, 50.617, 4.854, 0.312)
pt3dadd(-13.941, 50.577, 4.842, 0.324)
pt3dadd(-14.046, 50.538, 4.83, 0.336)
pt3dadd(-14.15, 50.497, 4.813, 0.344)
pt3dadd(-14.25, 50.454, 4.788, 0.348)
pt3dadd(-14.351, 50.411, 4.762, 0.354)
pt3dadd(-14.451, 50.368, 4.737, 0.358)
pt3dadd(-14.552, 50.325, 4.712, 0.362)
pt3dadd(-14.652, 50.282, 4.687, 0.366)
pt3dadd(-14.753, 50.238, 4.662, 0.372)
pt3dadd(-14.853, 50.195, 4.636, 0.376)
pt3dadd(-14.954, 50.152, 4.611, 0.38)
pt3dadd(-15.054, 50.109, 4.586, 0.386)
pt3dadd(-15.152, 50.069, 4.551, 0.378)
pt3dadd(-15.247, 50.032, 4.509, 0.362)
pt3dadd(-15.342, 49.995, 4.466, 0.346)
pt3dadd(-15.437, 49.959, 4.423, 0.33)
pt3dadd(-15.531, 49.922, 4.38, 0.314)
pt3dadd(-15.626, 49.885, 4.337, 0.298)
pt3dadd(-15.721, 49.848, 4.294, 0.282)
pt3dadd(-15.816, 49.811, 4.251, 0.266)
pt3dadd(-15.911, 49.774, 4.209, 0.25)
pt3dadd(-16.006, 49.737, 4.166, 0.234)
pt3dadd(-16.098, 49.69, 4.127, 0.226)
pt3dadd(-16.187, 49.635, 4.092, 0.226)
pt3dadd(-16.276, 49.579, 4.057, 0.226)
pt3dadd(-16.365, 49.524, 4.022, 0.226)
pt3dadd(-16.455, 49.468, 3.988, 0.226)
pt3dadd(-16.544, 49.413, 3.953, 0.226)
pt3dadd(-16.633, 49.357, 3.918, 0.226)
pt3dadd(-16.723, 49.302, 3.883, 0.226)
pt3dadd(-16.812, 49.246, 3.848, 0.226)
pt3dadd(-16.901, 49.19, 3.813, 0.226)
pt3dadd(-16.985, 49.14, 3.766, 0.244)
pt3dadd(-17.063, 49.094, 3.708, 0.276)
pt3dadd(-17.142, 49.048, 3.651, 0.306)
pt3dadd(-17.22, 49.003, 3.594, 0.338)
pt3dadd(-17.299, 48.957, 3.536, 0.37)
pt3dadd(-17.377, 48.911, 3.479, 0.402)
pt3dadd(-17.456, 48.865, 3.421, 0.434)
pt3dadd(-17.534, 48.819, 3.364, 0.466)
pt3dadd(-17.613, 48.773, 3.306, 0.498)
pt3dadd(-17.691, 48.727, 3.249, 0.53)
pt3dadd(-17.773, 48.678, 3.198, 0.55)
pt3dadd(-17.857, 48.625, 3.151, 0.564)
pt3dadd(-17.94, 48.573, 3.104, 0.578)
pt3dadd(-18.024, 48.521, 3.056, 0.592)
pt3dadd(-18.108, 48.469, 3.009, 0.606)
pt3dadd(-18.191, 48.417, 2.962, 0.62)
pt3dadd(-18.275, 48.365, 2.915, 0.634)
pt3dadd(-18.358, 48.312, 2.868, 0.648)
pt3dadd(-18.442, 48.26, 2.821, 0.66)
pt3dadd(-18.526, 48.208, 2.774, 0.674)
pt3dadd(-18.615, 48.166, 2.727, 0.678)
pt3dadd(-18.706, 48.126, 2.681, 0.678)
pt3dadd(-18.798, 48.087, 2.635, 0.678)
pt3dadd(-18.889, 48.047, 2.588, 0.678)
pt3dadd(-18.981, 48.007, 2.542, 0.678)
pt3dadd(-19.072, 47.968, 2.496, 0.678)
pt3dadd(-19.163, 47.928, 2.45, 0.678)
pt3dadd(-19.255, 47.889, 2.403, 0.678)
pt3dadd(-19.346, 47.849, 2.357, 0.678)
pt3dadd(-19.437, 47.81, 2.311, 0.678)
pt3dadd(-19.537, 47.79, 2.266, 0.668)
}
}
proc shape3d_159() {
dend_7[47] { pt3dadd(-19.638, 47.773, 2.222, 0.654)
pt3dadd(-19.738, 47.756, 2.178, 0.642)
pt3dadd(-19.839, 47.739, 2.134, 0.63)
pt3dadd(-19.939, 47.722, 2.09, 0.618)
pt3dadd(-20.04, 47.705, 2.046, 0.606)
pt3dadd(-20.14, 47.688, 2.002, 0.594)
pt3dadd(-20.241, 47.671, 1.957, 0.58)
pt3dadd(-20.341, 47.654, 1.913, 0.568)
pt3dadd(-20.442, 47.637, 1.869, 0.556)
pt3dadd(-20.552, 47.632, 1.84, 0.524)
pt3dadd(-20.662, 47.627, 1.812, 0.49)
pt3dadd(-20.772, 47.622, 1.783, 0.458)
pt3dadd(-20.882, 47.617, 1.755, 0.424)
pt3dadd(-20.992, 47.612, 1.726, 0.392)
pt3dadd(-21.102, 47.607, 1.698, 0.358)
pt3dadd(-21.212, 47.602, 1.669, 0.326)
pt3dadd(-21.322, 47.597, 1.641, 0.292)
pt3dadd(-21.432, 47.592, 1.612, 0.258)
pt3dadd(-21.541, 47.587, 1.584, 0.226)
pt3dadd(-21.537, 47.594, 1.584, 0.226)
pt3dadd(-21.533, 47.507, 1.521, 0.262)
pt3dadd(-21.528, 47.419, 1.459, 0.296)
pt3dadd(-21.524, 47.332, 1.397, 0.332)
pt3dadd(-21.519, 47.245, 1.334, 0.368)
pt3dadd(-21.515, 47.159, 1.271, 0.402)
pt3dadd(-21.51, 47.161, 1.171, 0.438)
pt3dadd(-21.506, 47.163, 1.072, 0.472)
pt3dadd(-21.501, 47.158, 0.974, 0.506)
pt3dadd(-21.497, 47.103, 0.887, 0.542)
pt3dadd(-21.492, 47.049, 0.801, 0.576)
pt3dadd(-21.493, 46.941, 0.779, 0.588)
pt3dadd(-21.494, 46.83, 0.762, 0.598)
pt3dadd(-21.515, 46.726, 0.736, 0.602)
pt3dadd(-21.561, 46.632, 0.7, 0.602)
pt3dadd(-21.582, 46.53, 0.668, 0.622)
pt3dadd(-21.586, 46.424, 0.636, 0.654)
pt3dadd(-21.581, 46.343, 0.568, 0.678)
pt3dadd(-21.577, 46.262, 0.5, 0.702)
pt3dadd(-21.577, 46.15, 0.493, 0.72)
pt3dadd(-21.577, 46.037, 0.489, 0.738)
pt3dadd(-21.587, 45.927, 0.486, 0.752)
pt3dadd(-21.651, 45.834, 0.486, 0.74)
pt3dadd(-21.715, 45.742, 0.486, 0.728)
pt3dadd(-21.804, 45.674, 0.486, 0.716)
pt3dadd(-21.893, 45.605, 0.486, 0.704)
pt3dadd(-21.936, 45.532, 0.428, 0.696)
pt3dadd(-21.971, 45.459, 0.362, 0.688)
pt3dadd(-22.007, 45.385, 0.295, 0.68)
pt3dadd(-22.012, 45.289, 0.246, 0.668)
pt3dadd(-22.015, 45.19, 0.199, 0.656)
pt3dadd(-22.036, 45.083, 0.187, 0.608)
pt3dadd(-22.048, 44.975, 0.161, 0.594)
pt3dadd(-22.059, 44.868, 0.133, 0.584)
pt3dadd(-22.07, 44.76, 0.105, 0.574)
pt3dadd(-22.081, 44.653, 0.077, 0.564)
pt3dadd(-22.093, 44.545, 0.049, 0.554)
pt3dadd(-22.11, 44.444, 0.009, 0.552)
pt3dadd(-22.128, 44.344, -0.033, 0.552)
pt3dadd(-22.146, 44.245, -0.076, 0.552)
pt3dadd(-22.165, 44.145, -0.119, 0.552)
pt3dadd(-22.182, 44.049, -0.166, 0.556)
pt3dadd(-22.192, 43.975, -0.239, 0.582)
pt3dadd(-22.205, 43.897, -0.305, 0.604)
pt3dadd(-22.25, 43.799, -0.334, 0.618)
pt3dadd(-22.285, 43.707, -0.373, 0.628)
pt3dadd(-22.295, 43.632, -0.446, 0.628)
pt3dadd(-22.314, 43.553, -0.493, 0.624)
pt3dadd(-22.363, 43.46, -0.461, 0.61)
pt3dadd(-22.405, 43.362, -0.432, 0.612)
pt3dadd(-22.44, 43.258, -0.411, 0.628)
pt3dadd(-22.482, 43.153, -0.411, 0.628)
pt3dadd(-22.522, 43.048, -0.411, 0.628)
pt3dadd(-22.562, 42.943, -0.411, 0.628)
pt3dadd(-22.601, 42.839, -0.411, 0.628)
pt3dadd(-22.641, 42.734, -0.411, 0.628)
pt3dadd(-22.684, 42.633, -0.432, 0.628)
pt3dadd(-22.726, 42.534, -0.459, 0.628)
pt3dadd(-22.768, 42.435, -0.486, 0.628)
pt3dadd(-22.811, 42.336, -0.512, 0.628)
pt3dadd(-22.847, 42.234, -0.536, 0.626)
pt3dadd(-22.865, 42.124, -0.551, 0.622)
pt3dadd(-22.884, 42.014, -0.565, 0.618)
pt3dadd(-22.901, 41.904, -0.579, 0.612)
pt3dadd(-22.919, 41.793, -0.594, 0.608)
pt3dadd(-22.938, 41.683, -0.608, 0.604)
pt3dadd(-22.95, 41.571, -0.61, 0.606)
pt3dadd(-22.963, 41.459, -0.61, 0.61)
pt3dadd(-22.976, 41.347, -0.61, 0.614)
pt3dadd(-22.971, 41.353, -0.61, 0.614)
pt3dadd(-22.985, 41.241, -0.61, 0.618)
pt3dadd(-22.997, 41.129, -0.61, 0.622)
pt3dadd(-23.011, 41.016, -0.609, 0.626)
pt3dadd(-23.024, 40.904, -0.609, 0.63)
pt3dadd(-23.04, 40.792, -0.609, 0.634)
pt3dadd(-23.055, 40.681, -0.609, 0.638)
pt3dadd(-23.071, 40.569, -0.609, 0.642)
pt3dadd(-23.086, 40.457, -0.609, 0.648)
pt3dadd(-23.101, 40.345, -0.609, 0.652)
pt3dadd(-23.132, 40.237, -0.609, 0.658)
pt3dadd(-23.172, 40.132, -0.609, 0.668)
pt3dadd(-23.212, 40.027, -0.609, 0.678)
pt3dadd(-23.252, 39.922, -0.609, 0.686)
pt3dadd(-23.292, 39.818, -0.608, 0.696)
pt3dadd(-23.337, 39.716, -0.608, 0.706)
pt3dadd(-23.405, 39.627, -0.608, 0.716)
pt3dadd(-23.473, 39.537, -0.608, 0.726)
pt3dadd(-23.54, 39.447, -0.608, 0.736)
pt3dadd(-23.608, 39.358, -0.608, 0.746)
pt3dadd(-23.667, 39.264, -0.608, 0.754)
pt3dadd(-23.696, 39.155, -0.608, 0.758)
pt3dadd(-23.724, 39.046, -0.608, 0.764)
pt3dadd(-23.753, 38.937, -0.608, 0.768)
pt3dadd(-23.781, 38.829, -0.607, 0.772)
pt3dadd(-23.81, 38.72, -0.607, 0.776)
pt3dadd(-23.83, 38.609, -0.607, 0.776)
pt3dadd(-23.842, 38.496, -0.607, 0.772)
pt3dadd(-23.854, 38.384, -0.607, 0.768)
pt3dadd(-23.868, 38.272, -0.607, 0.764)
pt3dadd(-23.88, 38.16, -0.607, 0.76)
pt3dadd(-23.892, 38.047, -0.607, 0.756)
pt3dadd(-23.913, 37.938, -0.6, 0.748)
pt3dadd(-23.947, 37.833, -0.581, 0.732)
pt3dadd(-23.981, 37.727, -0.563, 0.716)
pt3dadd(-24.015, 37.622, -0.545, 0.702)
pt3dadd(-24.049, 37.517, -0.527, 0.686)
pt3dadd(-24.073, 37.409, -0.516, 0.676)
pt3dadd(-24.089, 37.297, -0.514, 0.672)
pt3dadd(-24.105, 37.185, -0.513, 0.668)
pt3dadd(-24.12, 37.073, -0.511, 0.664)
pt3dadd(-24.136, 36.961, -0.509, 0.66)
pt3dadd(-24.152, 36.85, -0.507, 0.654)
pt3dadd(-24.171, 36.74, -0.493, 0.656)
pt3dadd(-24.193, 36.634, -0.468, 0.66)
pt3dadd(-24.215, 36.527, -0.443, 0.666)
pt3dadd(-24.238, 36.42, -0.419, 0.67)
pt3dadd(-24.26, 36.314, -0.394, 0.676)
pt3dadd(-24.292, 36.214, -0.36, 0.684)
pt3dadd(-24.33, 36.12, -0.319, 0.696)
pt3dadd(-24.369, 36.025, -0.278, 0.708)
pt3dadd(-24.407, 35.931, -0.237, 0.718)
pt3dadd(-24.448, 35.835, -0.205, 0.73)
pt3dadd(-24.497, 35.734, -0.205, 0.742)
pt3dadd(-24.546, 35.634, -0.205, 0.752)
pt3dadd(-24.541, 35.64, -0.205, 0.752)
pt3dadd(-24.554, 35.528, -0.205, 0.754)
pt3dadd(-24.564, 35.415, -0.204, 0.754)
pt3dadd(-24.571, 35.303, -0.201, 0.756)
pt3dadd(-24.571, 35.19, -0.188, 0.766)
pt3dadd(-24.573, 35.078, -0.175, 0.776)
pt3dadd(-24.603, 35.024, -0.11, 0.788)
pt3dadd(-24.648, 34.996, -0.023, 0.8)
pt3dadd(-24.67, 34.93, 0.05, 0.804)
pt3dadd(-24.705, 34.844, 0.098, 0.796)
pt3dadd(-24.757, 34.749, 0.123, 0.778)
pt3dadd(-24.809, 34.654, 0.147, 0.762)
pt3dadd(-24.861, 34.559, 0.172, 0.744)
pt3dadd(-24.914, 34.464, 0.197, 0.728)
pt3dadd(-24.982, 34.374, 0.197, 0.708)
pt3dadd(-25.049, 34.285, 0.197, 0.688)
pt3dadd(-25.117, 34.195, 0.197, 0.668)
pt3dadd(-25.184, 34.106, 0.197, 0.648)
pt3dadd(-25.252, 34.016, 0.197, 0.628)
pt3dadd(-25.305, 33.918, 0.195, 0.612)
pt3dadd(-25.358, 33.819, 0.193, 0.598)
pt3dadd(-25.411, 33.72, 0.191, 0.582)
pt3dadd(-25.465, 33.622, 0.189, 0.568)
pt3dadd(-25.519, 33.523, 0.187, 0.554)
pt3dadd(-25.581, 33.445, 0.144, 0.552)
pt3dadd(-25.648, 33.368, 0.107, 0.552)
pt3dadd(-25.725, 33.286, 0.095, 0.552)
pt3dadd(-25.798, 33.211, 0.073, 0.546)
pt3dadd(-25.862, 33.156, 0.009, 0.518)
pt3dadd(-25.894, 33.088, -0.057, 0.486)
pt3dadd(-25.889, 33.007, -0.125, 0.45)
pt3dadd(-25.885, 32.915, -0.175, 0.426)
pt3dadd(-25.88, 32.804, -0.195, 0.426)
pt3dadd(-25.876, 32.697, -0.228, 0.436)
pt3dadd(-25.871, 32.594, -0.267, 0.45)
pt3dadd(-25.867, 32.49, -0.307, 0.464)
pt3dadd(-25.863, 32.386, -0.346, 0.478)
pt3dadd(-25.858, 32.283, -0.386, 0.492)
pt3dadd(-25.856, 32.195, -0.44, 0.514)
pt3dadd(-25.857, 32.138, -0.525, 0.55)
pt3dadd(-25.87, 32.073, -0.6, 0.58)
pt3dadd(-25.917, 31.984, -0.643, 0.594)
pt3dadd(-25.945, 31.885, -0.673, 0.606)
pt3dadd(-25.945, 31.773, -0.686, 0.616)
pt3dadd(-25.946, 31.66, -0.698, 0.626)
pt3dadd(-25.93, 31.548, -0.7, 0.628)
pt3dadd(-25.91, 31.435, -0.7, 0.628)
pt3dadd(-25.887, 31.324, -0.7, 0.626)
pt3dadd(-25.835, 31.22, -0.7, 0.608)
pt3dadd(-25.808, 31.11, -0.7, 0.498)
}
dend_7[48] {pt3dclear()
pt3dadd(7.841, 81.029, 14.321, 0.226)
pt3dadd(7.897, 81.029, 14.363, 0.226)
pt3dadd(7.987, 81.028, 14.43, 0.226)
pt3dadd(8.077, 81.028, 14.496, 0.226)
pt3dadd(8.166, 81.027, 14.563, 0.226)
pt3dadd(8.256, 81.027, 14.629, 0.226)
pt3dadd(8.345, 81.027, 14.696, 0.226)
}
}
proc shape3d_160() {
dend_7[48] { pt3dadd(8.435, 81.026, 14.762, 0.226)
pt3dadd(8.525, 81.026, 14.829, 0.226)
pt3dadd(8.614, 81.026, 14.895, 0.226)
pt3dadd(8.704, 81.025, 14.962, 0.226)
pt3dadd(8.793, 81.025, 15.028, 0.226)
pt3dadd(8.883, 81.024, 15.095, 0.226)
pt3dadd(8.973, 81.024, 15.161, 0.226)
pt3dadd(9.062, 81.023, 15.228, 0.226)
pt3dadd(9.152, 81.022, 15.294, 0.226)
pt3dadd(9.242, 81.022, 15.361, 0.226)
pt3dadd(9.331, 81.021, 15.427, 0.226)
pt3dadd(9.421, 81.021, 15.494, 0.226)
pt3dadd(9.511, 81.02, 15.56, 0.226)
pt3dadd(9.6, 81.019, 15.627, 0.226)
pt3dadd(9.63, 80.939, 15.649, 0.25)
pt3dadd(9.63, 80.819, 15.649, 0.284)
pt3dadd(9.63, 80.699, 15.649, 0.318)
pt3dadd(9.63, 80.579, 15.649, 0.354)
pt3dadd(9.63, 80.459, 15.649, 0.388)
pt3dadd(9.63, 80.339, 15.649, 0.422)
pt3dadd(9.63, 80.219, 15.649, 0.458)
pt3dadd(9.63, 80.099, 15.649, 0.492)
pt3dadd(9.63, 79.979, 15.649, 0.526)
pt3dadd(9.63, 79.859, 15.649, 0.562)
pt3dadd(9.63, 79.739, 15.649, 0.56)
pt3dadd(9.63, 79.619, 15.649, 0.54)
pt3dadd(9.63, 79.499, 15.649, 0.52)
pt3dadd(9.63, 79.379, 15.649, 0.5)
pt3dadd(9.63, 79.259, 15.649, 0.482)
pt3dadd(9.63, 79.139, 15.649, 0.462)
pt3dadd(9.63, 79.019, 15.649, 0.442)
pt3dadd(9.63, 78.899, 15.649, 0.422)
pt3dadd(9.63, 78.779, 15.649, 0.402)
pt3dadd(9.63, 78.659, 15.649, 0.382)
pt3dadd(9.63, 78.539, 15.649, 0.384)
pt3dadd(9.63, 78.419, 15.649, 0.394)
pt3dadd(9.63, 78.299, 15.649, 0.404)
pt3dadd(9.63, 78.179, 15.65, 0.414)
pt3dadd(9.63, 78.059, 15.65, 0.424)
pt3dadd(9.63, 77.939, 15.65, 0.434)
pt3dadd(9.63, 77.819, 15.65, 0.444)
pt3dadd(9.63, 77.699, 15.65, 0.454)
pt3dadd(9.63, 77.579, 15.65, 0.464)
pt3dadd(9.63, 77.459, 15.65, 0.474)
pt3dadd(9.63, 77.339, 15.65, 0.478)
pt3dadd(9.63, 77.219, 15.65, 0.48)
pt3dadd(9.63, 77.099, 15.65, 0.482)
pt3dadd(9.63, 76.979, 15.65, 0.484)
pt3dadd(9.63, 76.859, 15.65, 0.484)
pt3dadd(9.63, 76.739, 15.651, 0.486)
pt3dadd(9.63, 76.619, 15.651, 0.488)
pt3dadd(9.63, 76.499, 15.651, 0.49)
pt3dadd(9.63, 76.379, 15.651, 0.492)
pt3dadd(9.63, 76.259, 15.651, 0.494)
pt3dadd(9.63, 76.139, 15.651, 0.476)
pt3dadd(9.63, 76.019, 15.651, 0.45)
pt3dadd(9.63, 75.899, 15.651, 0.422)
pt3dadd(9.63, 75.779, 15.652, 0.396)
pt3dadd(9.63, 75.659, 15.652, 0.368)
pt3dadd(9.63, 75.539, 15.652, 0.342)
pt3dadd(9.63, 75.419, 15.652, 0.316)
pt3dadd(9.63, 75.299, 15.652, 0.288)
pt3dadd(9.63, 75.179, 15.652, 0.262)
pt3dadd(9.63, 75.059, 15.653, 0.234)
pt3dadd(9.63, 74.939, 15.653, 0.226)
pt3dadd(9.63, 74.819, 15.653, 0.226)
pt3dadd(9.63, 74.699, 15.654, 0.226)
pt3dadd(9.63, 74.579, 15.654, 0.226)
pt3dadd(9.63, 74.459, 15.654, 0.226)
pt3dadd(9.63, 74.339, 15.655, 0.226)
pt3dadd(9.63, 74.219, 15.655, 0.226)
pt3dadd(9.63, 74.099, 15.655, 0.226)
pt3dadd(9.63, 73.979, 15.656, 0.226)
pt3dadd(9.63, 73.859, 15.656, 0.226)
pt3dadd(9.63, 73.739, 15.656, 0.226)
pt3dadd(9.63, 73.619, 15.657, 0.226)
pt3dadd(9.63, 73.499, 15.658, 0.226)
pt3dadd(9.63, 73.379, 15.658, 0.226)
pt3dadd(9.63, 73.259, 15.659, 0.226)
pt3dadd(9.63, 73.139, 15.66, 0.226)
pt3dadd(9.63, 73.019, 15.66, 0.226)
pt3dadd(9.63, 72.899, 15.661, 0.226)
pt3dadd(9.63, 72.779, 15.662, 0.226)
pt3dadd(9.63, 72.659, 15.662, 0.226)
pt3dadd(9.63, 72.539, 15.663, 0.226)
pt3dadd(9.63, 72.419, 15.665, 0.226)
pt3dadd(9.63, 72.299, 15.666, 0.226)
pt3dadd(9.63, 72.179, 15.668, 0.226)
pt3dadd(9.63, 72.059, 15.669, 0.226)
pt3dadd(9.63, 71.939, 15.67, 0.226)
pt3dadd(9.63, 71.819, 15.672, 0.226)
pt3dadd(9.63, 71.699, 15.673, 0.226)
pt3dadd(9.63, 71.579, 15.674, 0.226)
pt3dadd(9.63, 71.459, 15.676, 0.226)
pt3dadd(9.63, 71.339, 15.678, 0.246)
pt3dadd(9.63, 71.219, 15.68, 0.276)
pt3dadd(9.63, 71.099, 15.683, 0.306)
pt3dadd(9.63, 70.979, 15.686, 0.336)
pt3dadd(9.63, 70.859, 15.688, 0.366)
pt3dadd(9.63, 70.74, 15.691, 0.396)
pt3dadd(9.63, 70.62, 15.693, 0.426)
pt3dadd(9.63, 70.5, 15.696, 0.456)
pt3dadd(9.63, 70.38, 15.698, 0.486)
pt3dadd(9.63, 70.26, 15.701, 0.516)
pt3dadd(9.63, 70.14, 15.705, 0.53)
pt3dadd(9.63, 70.02, 15.711, 0.532)
pt3dadd(9.63, 69.9, 15.716, 0.536)
pt3dadd(9.63, 69.78, 15.721, 0.54)
pt3dadd(9.629, 69.66, 15.727, 0.542)
pt3dadd(9.629, 69.541, 15.732, 0.546)
pt3dadd(9.629, 69.421, 15.738, 0.55)
pt3dadd(9.629, 69.301, 15.743, 0.554)
pt3dadd(9.629, 69.181, 15.748, 0.556)
pt3dadd(9.629, 69.061, 15.754, 0.56)
pt3dadd(9.629, 68.942, 15.762, 0.548)
pt3dadd(9.629, 68.822, 15.771, 0.53)
pt3dadd(9.628, 68.703, 15.78, 0.51)
pt3dadd(9.628, 68.583, 15.788, 0.492)
pt3dadd(9.628, 68.464, 15.798, 0.472)
pt3dadd(9.628, 68.344, 15.807, 0.452)
pt3dadd(9.628, 68.225, 15.815, 0.434)
pt3dadd(9.628, 68.105, 15.824, 0.414)
pt3dadd(9.628, 67.986, 15.833, 0.396)
pt3dadd(9.628, 67.866, 15.842, 0.376)
pt3dadd(9.627, 67.748, 15.857, 0.366)
pt3dadd(9.627, 67.629, 15.876, 0.36)
pt3dadd(9.627, 67.512, 15.893, 0.354)
pt3dadd(9.627, 67.393, 15.912, 0.35)
pt3dadd(9.627, 67.275, 15.93, 0.344)
pt3dadd(9.626, 67.157, 15.948, 0.338)
pt3dadd(9.626, 67.039, 15.966, 0.332)
pt3dadd(9.626, 66.921, 15.984, 0.328)
pt3dadd(9.626, 66.803, 16.002, 0.322)
pt3dadd(9.625, 66.685, 16.02, 0.316)
pt3dadd(9.625, 66.572, 16.052, 0.342)
pt3dadd(9.625, 66.461, 16.089, 0.376)
pt3dadd(9.624, 66.349, 16.126, 0.412)
pt3dadd(9.624, 66.238, 16.163, 0.448)
pt3dadd(9.624, 66.127, 16.201, 0.484)
pt3dadd(9.623, 66.015, 16.238, 0.52)
pt3dadd(9.623, 65.904, 16.275, 0.556)
pt3dadd(9.622, 65.792, 16.312, 0.59)
pt3dadd(9.622, 65.681, 16.349, 0.626)
pt3dadd(9.622, 65.57, 16.387, 0.662)
pt3dadd(9.621, 65.454, 16.414, 0.658)
pt3dadd(9.62, 65.338, 16.438, 0.64)
pt3dadd(9.619, 65.222, 16.463, 0.624)
pt3dadd(9.618, 65.105, 16.487, 0.606)
pt3dadd(9.618, 64.989, 16.511, 0.588)
pt3dadd(9.617, 64.872, 16.535, 0.57)
pt3dadd(9.616, 64.756, 16.559, 0.552)
pt3dadd(9.615, 64.639, 16.584, 0.534)
pt3dadd(9.614, 64.523, 16.608, 0.516)
pt3dadd(9.613, 64.407, 16.632, 0.498)
pt3dadd(9.612, 64.288, 16.649, 0.48)
pt3dadd(9.61, 64.17, 16.663, 0.462)
pt3dadd(9.609, 64.051, 16.677, 0.442)
pt3dadd(9.607, 63.932, 16.691, 0.424)
pt3dadd(9.606, 63.813, 16.705, 0.404)
pt3dadd(9.604, 63.694, 16.719, 0.384)
pt3dadd(9.603, 63.576, 16.733, 0.366)
pt3dadd(9.601, 63.457, 16.747, 0.346)
pt3dadd(9.6, 63.338, 16.761, 0.328)
pt3dadd(9.598, 63.219, 16.775, 0.308)
pt3dadd(9.595, 63.1, 16.782, 0.316)
pt3dadd(9.592, 62.98, 16.786, 0.33)
pt3dadd(9.589, 62.86, 16.791, 0.346)
pt3dadd(9.586, 62.74, 16.795, 0.36)
pt3dadd(9.583, 62.62, 16.8, 0.376)
pt3dadd(9.58, 62.5, 16.804, 0.39)
pt3dadd(9.577, 62.381, 16.809, 0.406)
pt3dadd(9.574, 62.261, 16.813, 0.42)
pt3dadd(9.571, 62.141, 16.818, 0.436)
pt3dadd(9.568, 62.021, 16.823, 0.45)
pt3dadd(9.563, 61.901, 16.823, 0.464)
pt3dadd(9.557, 61.781, 16.824, 0.48)
pt3dadd(9.551, 61.662, 16.824, 0.494)
pt3dadd(9.545, 61.542, 16.824, 0.508)
pt3dadd(9.539, 61.422, 16.824, 0.522)
pt3dadd(9.533, 61.302, 16.824, 0.536)
pt3dadd(9.527, 61.182, 16.824, 0.552)
pt3dadd(9.521, 61.062, 16.824, 0.566)
pt3dadd(9.515, 60.942, 16.824, 0.58)
pt3dadd(9.509, 60.823, 16.824, 0.594)
pt3dadd(9.499, 60.703, 16.824, 0.584)
pt3dadd(9.489, 60.583, 16.824, 0.564)
pt3dadd(9.478, 60.464, 16.824, 0.544)
pt3dadd(9.467, 60.344, 16.824, 0.526)
pt3dadd(9.456, 60.225, 16.824, 0.506)
pt3dadd(9.445, 60.105, 16.824, 0.488)
pt3dadd(9.434, 59.986, 16.824, 0.468)
pt3dadd(9.424, 59.866, 16.824, 0.45)
pt3dadd(9.413, 59.747, 16.825, 0.43)
pt3dadd(9.402, 59.627, 16.825, 0.41)
pt3dadd(9.386, 59.508, 16.825, 0.394)
pt3dadd(9.369, 59.39, 16.825, 0.378)
pt3dadd(9.352, 59.271, 16.825, 0.362)
pt3dadd(9.334, 59.152, 16.825, 0.346)
pt3dadd(9.317, 59.033, 16.825, 0.33)
pt3dadd(9.3, 58.915, 16.826, 0.314)
}
}
proc shape3d_161() {
dend_7[48] { pt3dadd(9.282, 58.796, 16.826, 0.298)
pt3dadd(9.265, 58.677, 16.826, 0.28)
pt3dadd(9.248, 58.558, 16.826, 0.264)
pt3dadd(9.23, 58.44, 16.826, 0.248)
pt3dadd(9.189, 58.328, 16.826, 0.274)
pt3dadd(9.142, 58.218, 16.827, 0.308)
pt3dadd(9.094, 58.107, 16.827, 0.344)
pt3dadd(9.047, 57.997, 16.827, 0.38)
pt3dadd(9, 57.887, 16.827, 0.414)
pt3dadd(8.952, 57.777, 16.828, 0.45)
pt3dadd(8.905, 57.666, 16.828, 0.486)
pt3dadd(8.857, 57.556, 16.828, 0.522)
pt3dadd(8.81, 57.446, 16.829, 0.556)
pt3dadd(8.763, 57.336, 16.829, 0.592)
pt3dadd(8.722, 57.223, 16.829, 0.606)
pt3dadd(8.683, 57.109, 16.83, 0.614)
pt3dadd(8.644, 56.996, 16.83, 0.622)
pt3dadd(8.605, 56.882, 16.831, 0.63)
pt3dadd(8.566, 56.769, 16.831, 0.636)
pt3dadd(8.527, 56.655, 16.832, 0.644)
pt3dadd(8.488, 56.542, 16.833, 0.652)
pt3dadd(8.45, 56.428, 16.833, 0.66)
pt3dadd(8.411, 56.315, 16.834, 0.668)
pt3dadd(8.372, 56.201, 16.834, 0.676)
pt3dadd(8.339, 56.086, 16.835, 0.678)
pt3dadd(8.308, 55.97, 16.836, 0.678)
pt3dadd(8.277, 55.854, 16.837, 0.678)
pt3dadd(8.245, 55.738, 16.838, 0.678)
pt3dadd(8.214, 55.622, 16.839, 0.678)
pt3dadd(8.183, 55.506, 16.84, 0.678)
pt3dadd(8.152, 55.391, 16.841, 0.678)
pt3dadd(8.12, 55.275, 16.842, 0.678)
pt3dadd(8.089, 55.159, 16.843, 0.678)
pt3dadd(8.058, 55.043, 16.844, 0.678)
pt3dadd(8.025, 54.928, 16.846, 0.678)
pt3dadd(7.992, 54.812, 16.848, 0.678)
pt3dadd(7.959, 54.697, 16.85, 0.678)
pt3dadd(7.925, 54.582, 16.851, 0.678)
pt3dadd(7.892, 54.466, 16.853, 0.678)
pt3dadd(7.859, 54.351, 16.855, 0.678)
pt3dadd(7.826, 54.236, 16.857, 0.678)
pt3dadd(7.793, 54.12, 16.859, 0.678)
pt3dadd(7.759, 54.005, 16.861, 0.678)
pt3dadd(7.726, 53.89, 16.862, 0.678)
pt3dadd(7.684, 53.778, 16.865, 0.676)
pt3dadd(7.64, 53.666, 16.868, 0.674)
pt3dadd(7.596, 53.555, 16.871, 0.67)
pt3dadd(7.552, 53.443, 16.874, 0.668)
pt3dadd(7.508, 53.332, 16.877, 0.666)
pt3dadd(7.463, 53.22, 16.88, 0.662)
pt3dadd(7.419, 53.108, 16.883, 0.66)
pt3dadd(7.375, 52.997, 16.886, 0.656)
pt3dadd(7.331, 52.885, 16.889, 0.654)
pt3dadd(7.287, 52.774, 16.892, 0.652)
pt3dadd(7.255, 52.659, 16.898, 0.62)
pt3dadd(7.225, 52.543, 16.905, 0.582)
pt3dadd(7.195, 52.427, 16.912, 0.546)
pt3dadd(7.164, 52.311, 16.918, 0.508)
pt3dadd(7.134, 52.195, 16.925, 0.472)
pt3dadd(7.104, 52.079, 16.932, 0.434)
pt3dadd(7.074, 51.963, 16.939, 0.396)
pt3dadd(7.044, 51.847, 16.945, 0.36)
pt3dadd(7.014, 51.732, 16.952, 0.322)
pt3dadd(6.984, 51.616, 16.959, 0.286)
pt3dadd(6.964, 51.498, 16.969, 0.288)
pt3dadd(6.946, 51.38, 16.98, 0.3)
pt3dadd(6.928, 51.262, 16.991, 0.31)
pt3dadd(6.909, 51.144, 17.002, 0.322)
pt3dadd(6.891, 51.027, 17.012, 0.332)
pt3dadd(6.873, 50.909, 17.023, 0.344)
pt3dadd(6.855, 50.791, 17.034, 0.354)
pt3dadd(6.837, 50.673, 17.045, 0.364)
pt3dadd(6.819, 50.555, 17.056, 0.376)
pt3dadd(6.801, 50.437, 17.066, 0.386)
pt3dadd(6.789, 50.322, 17.093, 0.384)
pt3dadd(6.779, 50.207, 17.121, 0.378)
pt3dadd(6.769, 50.093, 17.15, 0.372)
pt3dadd(6.758, 49.978, 17.179, 0.368)
pt3dadd(6.748, 49.864, 17.208, 0.362)
pt3dadd(6.738, 49.749, 17.236, 0.356)
pt3dadd(6.727, 49.635, 17.265, 0.35)
pt3dadd(6.717, 49.521, 17.294, 0.346)
pt3dadd(6.707, 49.406, 17.322, 0.34)
pt3dadd(6.697, 49.292, 17.351, 0.334)
pt3dadd(6.687, 49.178, 17.383, 0.338)
pt3dadd(6.678, 49.065, 17.415, 0.342)
pt3dadd(6.669, 48.951, 17.447, 0.346)
pt3dadd(6.66, 48.838, 17.479, 0.35)
pt3dadd(6.651, 48.725, 17.511, 0.354)
pt3dadd(6.642, 48.611, 17.543, 0.358)
pt3dadd(6.633, 48.498, 17.575, 0.362)
pt3dadd(6.624, 48.385, 17.607, 0.366)
pt3dadd(6.615, 48.271, 17.639, 0.37)
pt3dadd(6.606, 48.158, 17.67, 0.372)
pt3dadd(6.589, 48.042, 17.692, 0.41)
pt3dadd(6.572, 47.926, 17.714, 0.446)
pt3dadd(6.554, 47.811, 17.736, 0.484)
pt3dadd(6.537, 47.695, 17.757, 0.52)
pt3dadd(6.52, 47.579, 17.779, 0.558)
pt3dadd(6.502, 47.463, 17.8, 0.594)
pt3dadd(6.485, 47.347, 17.822, 0.632)
pt3dadd(6.468, 47.231, 17.844, 0.67)
pt3dadd(6.45, 47.115, 17.865, 0.706)
pt3dadd(6.432, 46.999, 17.886, 0.744)
pt3dadd(6.391, 46.888, 17.897, 0.78)
pt3dadd(6.349, 46.776, 17.907, 0.816)
pt3dadd(6.308, 46.664, 17.918, 0.852)
pt3dadd(6.266, 46.552, 17.928, 0.888)
pt3dadd(6.225, 46.44, 17.938, 0.922)
pt3dadd(6.183, 46.328, 17.949, 0.958)
pt3dadd(6.141, 46.216, 17.959, 0.994)
pt3dadd(6.1, 46.104, 17.97, 1.03)
pt3dadd(6.058, 45.993, 17.98, 1.066)
pt3dadd(6.017, 45.88, 17.99, 1.1)
pt3dadd(5.995, 45.763, 17.991, 1.068)
pt3dadd(5.972, 45.645, 17.992, 1.036)
pt3dadd(5.95, 45.527, 17.993, 1.004)
pt3dadd(5.927, 45.409, 17.994, 0.972)
pt3dadd(5.904, 45.291, 17.995, 0.94)
pt3dadd(5.882, 45.173, 17.996, 0.908)
pt3dadd(5.859, 45.055, 17.997, 0.876)
pt3dadd(5.837, 44.938, 17.998, 0.844)
pt3dadd(5.814, 44.82, 17.999, 0.812)
pt3dadd(5.792, 44.702, 18, 0.782)
pt3dadd(5.787, 44.582, 18, 0.784)
pt3dadd(5.782, 44.462, 18, 0.788)
pt3dadd(5.777, 44.342, 18, 0.792)
pt3dadd(5.772, 44.222, 18, 0.796)
pt3dadd(5.766, 44.102, 18.001, 0.8)
pt3dadd(5.761, 43.983, 18.001, 0.804)
pt3dadd(5.756, 43.863, 18.001, 0.808)
pt3dadd(5.751, 43.743, 18.001, 0.812)
pt3dadd(5.746, 43.623, 18.001, 0.814)
pt3dadd(5.743, 43.503, 18.002, 0.818)
pt3dadd(5.768, 43.386, 18.002, 0.806)
pt3dadd(5.794, 43.269, 18.002, 0.794)
pt3dadd(5.819, 43.151, 18.003, 0.782)
pt3dadd(5.845, 43.034, 18.003, 0.772)
pt3dadd(5.87, 42.917, 18.004, 0.76)
pt3dadd(5.896, 42.8, 18.004, 0.748)
pt3dadd(5.921, 42.682, 18.004, 0.736)
pt3dadd(5.947, 42.565, 18.005, 0.726)
pt3dadd(5.973, 42.448, 18.005, 0.714)
pt3dadd(6.002, 42.332, 18.006, 0.698)
pt3dadd(6.042, 42.219, 18.006, 0.666)
pt3dadd(6.082, 42.105, 18.007, 0.636)
pt3dadd(6.122, 41.992, 18.008, 0.606)
pt3dadd(6.162, 41.879, 18.008, 0.574)
pt3dadd(6.202, 41.766, 18.009, 0.544)
pt3dadd(6.243, 41.653, 18.01, 0.512)
pt3dadd(6.283, 41.54, 18.01, 0.482)
pt3dadd(6.323, 41.427, 18.011, 0.45)
pt3dadd(6.363, 41.314, 18.012, 0.42)
pt3dadd(6.4, 41.2, 18.013, 0.392)
pt3dadd(6.427, 41.083, 18.014, 0.376)
pt3dadd(6.455, 40.966, 18.015, 0.358)
pt3dadd(6.482, 40.85, 18.016, 0.342)
pt3dadd(6.51, 40.733, 18.017, 0.324)
pt3dadd(6.537, 40.616, 18.019, 0.306)
pt3dadd(6.565, 40.499, 18.02, 0.29)
pt3dadd(6.592, 40.382, 18.021, 0.272)
pt3dadd(6.62, 40.266, 18.023, 0.256)
pt3dadd(6.647, 40.149, 18.024, 0.238)
pt3dadd(6.671, 40.031, 18.025, 0.226)
pt3dadd(6.684, 39.912, 18.028, 0.226)
pt3dadd(6.698, 39.793, 18.03, 0.226)
pt3dadd(6.711, 39.674, 18.032, 0.226)
pt3dadd(6.724, 39.554, 18.035, 0.226)
pt3dadd(6.738, 39.435, 18.037, 0.226)
pt3dadd(6.751, 39.316, 18.04, 0.226)
pt3dadd(6.764, 39.197, 18.042, 0.226)
pt3dadd(6.777, 39.077, 18.044, 0.226)
pt3dadd(6.791, 38.958, 18.047, 0.226)
pt3dadd(6.801, 38.839, 18.05, 0.236)
pt3dadd(6.802, 38.719, 18.056, 0.272)
pt3dadd(6.803, 38.599, 18.061, 0.306)
pt3dadd(6.804, 38.479, 18.067, 0.342)
pt3dadd(6.806, 38.36, 18.073, 0.378)
pt3dadd(6.807, 38.24, 18.078, 0.414)
pt3dadd(6.808, 38.12, 18.084, 0.45)
pt3dadd(6.809, 38, 18.09, 0.484)
pt3dadd(6.81, 37.88, 18.095, 0.52)
pt3dadd(6.812, 37.761, 18.101, 0.556)
pt3dadd(6.812, 37.641, 18.108, 0.58)
pt3dadd(6.812, 37.521, 18.116, 0.574)
pt3dadd(6.812, 37.402, 18.125, 0.57)
pt3dadd(6.812, 37.282, 18.134, 0.564)
pt3dadd(6.812, 37.163, 18.143, 0.56)
pt3dadd(6.812, 37.043, 18.151, 0.554)
pt3dadd(6.812, 36.924, 18.16, 0.548)
pt3dadd(6.812, 36.804, 18.169, 0.544)
pt3dadd(6.811, 36.685, 18.178, 0.538)
pt3dadd(6.811, 36.565, 18.186, 0.534)
pt3dadd(6.811, 36.447, 18.2, 0.524)
pt3dadd(6.811, 36.33, 18.225, 0.504)
pt3dadd(6.811, 36.214, 18.25, 0.484)
pt3dadd(6.811, 36.098, 18.275, 0.466)
pt3dadd(6.811, 35.982, 18.3, 0.446)
pt3dadd(6.811, 35.866, 18.325, 0.426)
pt3dadd(6.811, 35.749, 18.35, 0.406)
}
}
proc shape3d_162() {
dend_7[48] { pt3dadd(6.811, 35.633, 18.375, 0.386)
pt3dadd(6.811, 35.517, 18.4, 0.366)
pt3dadd(6.811, 35.401, 18.425, 0.346)
pt3dadd(6.811, 35.285, 18.451, 0.33)
pt3dadd(6.811, 35.17, 18.479, 0.32)
pt3dadd(6.811, 35.054, 18.506, 0.308)
pt3dadd(6.811, 34.939, 18.533, 0.298)
pt3dadd(6.811, 34.823, 18.561, 0.288)
pt3dadd(6.811, 34.708, 18.588, 0.276)
pt3dadd(6.81, 34.593, 18.615, 0.266)
pt3dadd(6.81, 34.477, 18.643, 0.254)
pt3dadd(6.81, 34.362, 18.67, 0.244)
pt3dadd(6.81, 34.246, 18.698, 0.232)
pt3dadd(6.81, 34.129, 18.713, 0.23)
pt3dadd(6.81, 34.009, 18.711, 0.242)
pt3dadd(6.809, 33.889, 18.708, 0.254)
pt3dadd(6.809, 33.769, 18.706, 0.268)
pt3dadd(6.808, 33.649, 18.704, 0.28)
pt3dadd(6.808, 33.529, 18.701, 0.292)
pt3dadd(6.808, 33.409, 18.699, 0.304)
pt3dadd(6.807, 33.289, 18.696, 0.316)
pt3dadd(6.807, 33.169, 18.694, 0.328)
pt3dadd(6.807, 33.049, 18.692, 0.34)
pt3dadd(6.806, 32.932, 18.674, 0.338)
pt3dadd(6.805, 32.815, 18.651, 0.334)
pt3dadd(6.805, 32.698, 18.628, 0.328)
pt3dadd(6.804, 32.581, 18.605, 0.324)
pt3dadd(6.804, 32.465, 18.582, 0.318)
pt3dadd(6.803, 32.348, 18.559, 0.314)
pt3dadd(6.802, 32.231, 18.536, 0.308)
pt3dadd(6.802, 32.115, 18.513, 0.302)
pt3dadd(6.801, 31.998, 18.489, 0.298)
pt3dadd(6.801, 31.881, 18.466, 0.292)
pt3dadd(6.799, 31.764, 18.476, 0.286)
pt3dadd(6.798, 31.646, 18.495, 0.28)
pt3dadd(6.796, 31.528, 18.515, 0.272)
pt3dadd(6.795, 31.41, 18.534, 0.266)
pt3dadd(6.793, 31.293, 18.554, 0.26)
pt3dadd(6.792, 31.175, 18.573, 0.252)
pt3dadd(6.79, 31.057, 18.593, 0.246)
pt3dadd(6.789, 30.94, 18.612, 0.24)
pt3dadd(6.787, 30.822, 18.632, 0.232)
pt3dadd(6.786, 30.704, 18.652, 0.226)
pt3dadd(6.783, 30.589, 18.679, 0.226)
pt3dadd(6.781, 30.474, 18.707, 0.226)
pt3dadd(6.778, 30.358, 18.734, 0.226)
pt3dadd(6.776, 30.243, 18.762, 0.226)
pt3dadd(6.773, 30.128, 18.789, 0.226)
pt3dadd(6.771, 30.012, 18.817, 0.226)
pt3dadd(6.768, 29.897, 18.844, 0.226)
pt3dadd(6.766, 29.782, 18.872, 0.226)
pt3dadd(6.763, 29.666, 18.899, 0.226)
pt3dadd(6.761, 29.551, 18.927, 0.226)
pt3dadd(6.756, 29.434, 18.947, 0.226)
pt3dadd(6.751, 29.316, 18.968, 0.226)
pt3dadd(6.746, 29.199, 18.988, 0.226)
pt3dadd(6.741, 29.082, 19.009, 0.226)
pt3dadd(6.736, 28.964, 19.029, 0.226)
pt3dadd(6.731, 28.847, 19.049, 0.226)
pt3dadd(6.726, 28.729, 19.07, 0.226)
pt3dadd(6.721, 28.612, 19.09, 0.226)
pt3dadd(6.716, 28.495, 19.111, 0.226)
pt3dadd(6.711, 28.377, 19.131, 0.226)
pt3dadd(6.703, 28.258, 19.143, 0.226)
pt3dadd(6.694, 28.14, 19.155, 0.226)
pt3dadd(6.686, 28.021, 19.167, 0.226)
pt3dadd(6.677, 27.902, 19.18, 0.226)
pt3dadd(6.669, 27.783, 19.192, 0.226)
pt3dadd(6.66, 27.664, 19.204, 0.226)
pt3dadd(6.652, 27.546, 19.216, 0.226)
pt3dadd(6.643, 27.427, 19.228, 0.226)
pt3dadd(6.635, 27.308, 19.24, 0.226)
pt3dadd(6.626, 27.189, 19.252, 0.226)
pt3dadd(6.612, 27.07, 19.26, 0.226)
pt3dadd(6.599, 26.951, 19.267, 0.226)
pt3dadd(6.585, 26.833, 19.274, 0.226)
pt3dadd(6.571, 26.714, 19.281, 0.226)
pt3dadd(6.558, 26.595, 19.289, 0.226)
pt3dadd(6.544, 26.476, 19.296, 0.226)
pt3dadd(6.53, 26.357, 19.303, 0.226)
pt3dadd(6.516, 26.238, 19.31, 0.226)
pt3dadd(6.503, 26.119, 19.318, 0.226)
pt3dadd(6.488, 26.001, 19.325, 0.226)
pt3dadd(6.447, 25.889, 19.336, 0.226)
pt3dadd(6.405, 25.777, 19.347, 0.226)
pt3dadd(6.364, 25.665, 19.357, 0.226)
pt3dadd(6.323, 25.553, 19.368, 0.226)
pt3dadd(6.282, 25.441, 19.379, 0.226)
pt3dadd(6.24, 25.329, 19.39, 0.226)
pt3dadd(6.199, 25.217, 19.401, 0.226)
pt3dadd(6.158, 25.105, 19.412, 0.226)
pt3dadd(6.117, 24.993, 19.423, 0.226)
pt3dadd(6.076, 24.881, 19.434, 0.228)
pt3dadd(6.052, 24.77, 19.466, 0.256)
pt3dadd(6.029, 24.659, 19.498, 0.284)
pt3dadd(6.005, 24.547, 19.529, 0.312)
pt3dadd(5.982, 24.436, 19.561, 0.34)
pt3dadd(5.958, 24.325, 19.593, 0.37)
pt3dadd(5.935, 24.213, 19.625, 0.398)
pt3dadd(5.912, 24.102, 19.656, 0.426)
pt3dadd(5.888, 23.991, 19.688, 0.454)
pt3dadd(5.865, 23.879, 19.72, 0.482)
pt3dadd(5.843, 23.768, 19.751, 0.508)
pt3dadd(5.835, 23.654, 19.782, 0.504)
pt3dadd(5.827, 23.539, 19.812, 0.502)
pt3dadd(5.819, 23.425, 19.843, 0.5)
pt3dadd(5.811, 23.311, 19.873, 0.498)
pt3dadd(5.803, 23.197, 19.903, 0.496)
pt3dadd(5.795, 23.083, 19.934, 0.494)
pt3dadd(5.787, 22.969, 19.964, 0.492)
pt3dadd(5.779, 22.855, 19.994, 0.49)
pt3dadd(5.771, 22.741, 20.024, 0.486)
pt3dadd(5.768, 22.626, 20.053, 0.48)
pt3dadd(5.784, 22.51, 20.073, 0.454)
pt3dadd(5.801, 22.394, 20.093, 0.428)
pt3dadd(5.817, 22.277, 20.113, 0.4)
pt3dadd(5.833, 22.161, 20.133, 0.374)
pt3dadd(5.85, 22.044, 20.153, 0.348)
pt3dadd(5.866, 21.928, 20.174, 0.322)
pt3dadd(5.882, 21.812, 20.194, 0.296)
pt3dadd(5.899, 21.695, 20.214, 0.27)
pt3dadd(5.915, 21.579, 20.234, 0.242)
pt3dadd(5.943, 21.465, 20.25, 0.226)
pt3dadd(5.989, 21.355, 20.26, 0.226)
pt3dadd(6.036, 21.245, 20.27, 0.226)
pt3dadd(6.083, 21.135, 20.28, 0.228)
pt3dadd(6.13, 21.026, 20.29, 0.228)
pt3dadd(6.177, 20.916, 20.3, 0.228)
pt3dadd(6.224, 20.806, 20.31, 0.228)
pt3dadd(6.271, 20.696, 20.32, 0.228)
pt3dadd(6.318, 20.586, 20.33, 0.23)
pt3dadd(6.365, 20.477, 20.34, 0.23)
pt3dadd(6.408, 20.365, 20.346, 0.236)
pt3dadd(6.444, 20.251, 20.346, 0.254)
pt3dadd(6.481, 20.136, 20.346, 0.274)
pt3dadd(6.517, 20.022, 20.347, 0.292)
pt3dadd(6.553, 19.908, 20.347, 0.31)
pt3dadd(6.59, 19.793, 20.347, 0.328)
pt3dadd(6.626, 19.679, 20.347, 0.346)
pt3dadd(6.663, 19.565, 20.347, 0.364)
pt3dadd(6.699, 19.45, 20.347, 0.384)
pt3dadd(6.735, 19.336, 20.347, 0.402)
pt3dadd(6.769, 19.221, 20.347, 0.414)
pt3dadd(6.798, 19.104, 20.347, 0.418)
pt3dadd(6.827, 18.988, 20.347, 0.422)
pt3dadd(6.856, 18.872, 20.347, 0.426)
pt3dadd(6.885, 18.755, 20.347, 0.43)
pt3dadd(6.914, 18.639, 20.347, 0.434)
pt3dadd(6.943, 18.522, 20.348, 0.438)
pt3dadd(6.972, 18.406, 20.348, 0.442)
pt3dadd(7.001, 18.289, 20.348, 0.446)
pt3dadd(7.03, 18.173, 20.348, 0.45)
pt3dadd(7.063, 18.057, 20.348, 0.448)
pt3dadd(7.1, 17.943, 20.348, 0.438)
pt3dadd(7.138, 17.83, 20.348, 0.428)
pt3dadd(7.176, 17.716, 20.349, 0.416)
pt3dadd(7.213, 17.602, 20.349, 0.406)
pt3dadd(7.251, 17.488, 20.349, 0.396)
pt3dadd(7.289, 17.374, 20.349, 0.386)
pt3dadd(7.326, 17.26, 20.35, 0.374)
pt3dadd(7.364, 17.146, 20.35, 0.364)
pt3dadd(7.402, 17.032, 20.35, 0.354)
pt3dadd(7.441, 16.919, 20.35, 0.342)
pt3dadd(7.481, 16.806, 20.351, 0.33)
pt3dadd(7.522, 16.693, 20.351, 0.318)
pt3dadd(7.563, 16.58, 20.351, 0.306)
pt3dadd(7.603, 16.467, 20.352, 0.294)
pt3dadd(7.644, 16.354, 20.352, 0.282)
pt3dadd(7.684, 16.241, 20.352, 0.27)
pt3dadd(7.725, 16.128, 20.353, 0.258)
pt3dadd(7.766, 16.015, 20.353, 0.246)
pt3dadd(7.806, 15.902, 20.354, 0.234)
pt3dadd(7.842, 15.788, 20.354, 0.226)
pt3dadd(7.871, 15.672, 20.355, 0.226)
pt3dadd(7.9, 15.555, 20.355, 0.226)
pt3dadd(7.929, 15.438, 20.356, 0.226)
pt3dadd(7.957, 15.322, 20.357, 0.226)
pt3dadd(7.986, 15.206, 20.357, 0.226)
pt3dadd(8.015, 15.089, 20.358, 0.226)
pt3dadd(8.044, 14.973, 20.359, 0.226)
pt3dadd(8.073, 14.856, 20.359, 0.226)
pt3dadd(8.101, 14.74, 20.36, 0.226)
pt3dadd(8.125, 14.622, 20.361, 0.226)
pt3dadd(8.142, 14.503, 20.362, 0.226)
pt3dadd(8.158, 14.385, 20.363, 0.226)
pt3dadd(8.175, 14.266, 20.365, 0.226)
pt3dadd(8.192, 14.147, 20.366, 0.226)
pt3dadd(8.208, 14.028, 20.368, 0.226)
pt3dadd(8.225, 13.909, 20.369, 0.226)
pt3dadd(8.242, 13.79, 20.37, 0.226)
pt3dadd(8.259, 13.671, 20.372, 0.226)
pt3dadd(8.275, 13.553, 20.373, 0.226)
pt3dadd(8.289, 13.434, 20.375, 0.256)
pt3dadd(8.298, 13.314, 20.377, 0.326)
pt3dadd(8.307, 13.194, 20.38, 0.396)
pt3dadd(8.316, 13.075, 20.382, 0.468)
pt3dadd(8.325, 12.955, 20.385, 0.538)
pt3dadd(8.334, 12.835, 20.388, 0.608)
pt3dadd(8.343, 12.716, 20.39, 0.678)
pt3dadd(8.352, 12.596, 20.393, 0.748)
}
}
proc shape3d_163() {
dend_7[48] { pt3dadd(8.362, 12.477, 20.395, 0.82)
pt3dadd(8.371, 12.357, 20.398, 0.89)
pt3dadd(8.381, 12.238, 20.402, 0.92)
pt3dadd(8.394, 12.118, 20.407, 0.898)
pt3dadd(8.406, 11.999, 20.413, 0.876)
pt3dadd(8.419, 11.88, 20.419, 0.854)
pt3dadd(8.431, 11.761, 20.424, 0.832)
pt3dadd(8.444, 11.642, 20.43, 0.808)
pt3dadd(8.456, 11.523, 20.436, 0.786)
pt3dadd(8.469, 11.403, 20.441, 0.764)
pt3dadd(8.481, 11.284, 20.447, 0.742)
pt3dadd(8.494, 11.165, 20.453, 0.72)
pt3dadd(8.514, 11.048, 20.459, 0.704)
pt3dadd(8.545, 10.932, 20.468, 0.698)
pt3dadd(8.576, 10.817, 20.477, 0.692)
pt3dadd(8.607, 10.701, 20.485, 0.686)
pt3dadd(8.639, 10.586, 20.494, 0.68)
pt3dadd(8.67, 10.47, 20.503, 0.676)
pt3dadd(8.701, 10.355, 20.511, 0.67)
pt3dadd(8.732, 10.24, 20.52, 0.664)
pt3dadd(8.763, 10.124, 20.529, 0.658)
pt3dadd(8.794, 10.009, 20.537, 0.652)
pt3dadd(8.83, 9.895, 20.55, 0.66)
pt3dadd(8.869, 9.784, 20.568, 0.68)
pt3dadd(8.909, 9.673, 20.585, 0.702)
pt3dadd(8.949, 9.562, 20.603, 0.722)
pt3dadd(8.989, 9.45, 20.62, 0.742)
pt3dadd(9.028, 9.339, 20.637, 0.764)
pt3dadd(9.068, 9.228, 20.655, 0.784)
pt3dadd(9.108, 9.116, 20.672, 0.804)
pt3dadd(9.147, 9.005, 20.69, 0.826)
pt3dadd(9.187, 8.894, 20.707, 0.846)
pt3dadd(9.219, 8.784, 20.735, 0.844)
pt3dadd(9.246, 8.675, 20.77, 0.826)
pt3dadd(9.273, 8.566, 20.806, 0.808)
pt3dadd(9.3, 8.457, 20.841, 0.79)
pt3dadd(9.327, 8.348, 20.876, 0.774)
pt3dadd(9.354, 8.239, 20.911, 0.756)
pt3dadd(9.381, 8.13, 20.946, 0.738)
pt3dadd(9.408, 8.021, 20.982, 0.72)
pt3dadd(9.435, 7.912, 21.017, 0.704)
pt3dadd(9.462, 7.803, 21.052, 0.686)
pt3dadd(9.481, 7.689, 21.078, 0.668)
pt3dadd(9.494, 7.572, 21.099, 0.648)
pt3dadd(9.507, 7.455, 21.119, 0.63)
pt3dadd(9.52, 7.339, 21.139, 0.61)
pt3dadd(9.533, 7.222, 21.16, 0.592)
pt3dadd(9.546, 7.105, 21.18, 0.574)
pt3dadd(9.559, 6.988, 21.2, 0.554)
pt3dadd(9.572, 6.872, 21.22, 0.536)
pt3dadd(9.585, 6.755, 21.241, 0.518)
pt3dadd(9.598, 6.638, 21.261, 0.498)
pt3dadd(9.605, 6.52, 21.275, 0.48)
pt3dadd(9.608, 6.4, 21.285, 0.46)
pt3dadd(9.611, 6.281, 21.294, 0.44)
pt3dadd(9.613, 6.161, 21.304, 0.422)
pt3dadd(9.616, 6.042, 21.314, 0.402)
pt3dadd(9.618, 5.923, 21.323, 0.382)
pt3dadd(9.621, 5.803, 21.333, 0.364)
pt3dadd(9.624, 5.684, 21.343, 0.344)
pt3dadd(9.626, 5.564, 21.352, 0.324)
pt3dadd(9.629, 5.445, 21.362, 0.306)
pt3dadd(9.63, 5.326, 21.357, 0.294)
pt3dadd(9.63, 5.207, 21.342, 0.286)
pt3dadd(9.63, 5.088, 21.328, 0.278)
pt3dadd(9.63, 4.97, 21.314, 0.272)
pt3dadd(9.63, 4.851, 21.299, 0.264)
pt3dadd(9.63, 4.732, 21.285, 0.256)
pt3dadd(9.63, 4.613, 21.271, 0.25)
pt3dadd(9.63, 4.495, 21.256, 0.242)
pt3dadd(9.63, 4.376, 21.242, 0.236)
pt3dadd(9.63, 4.257, 21.228, 0.228)
pt3dadd(9.63, 4.138, 21.218, 0.226)
pt3dadd(9.63, 4.018, 21.21, 0.226)
pt3dadd(9.63, 3.899, 21.201, 0.226)
pt3dadd(9.63, 3.779, 21.193, 0.226)
pt3dadd(9.63, 3.659, 21.185, 0.226)
pt3dadd(9.63, 3.54, 21.176, 0.226)
pt3dadd(9.63, 3.42, 21.168, 0.226)
pt3dadd(9.63, 3.301, 21.16, 0.226)
pt3dadd(9.63, 3.181, 21.151, 0.226)
pt3dadd(9.63, 3.061, 21.143, 0.226)
pt3dadd(9.63, 2.943, 21.161, 0.232)
pt3dadd(9.63, 2.825, 21.179, 0.238)
pt3dadd(9.63, 2.707, 21.197, 0.242)
pt3dadd(9.63, 2.589, 21.215, 0.248)
pt3dadd(9.63, 2.471, 21.234, 0.254)
pt3dadd(9.63, 2.353, 21.251, 0.26)
pt3dadd(9.63, 2.235, 21.27, 0.266)
pt3dadd(9.63, 2.117, 21.288, 0.27)
pt3dadd(9.63, 1.999, 21.306, 0.276)
pt3dadd(9.63, 1.881, 21.324, 0.282)
pt3dadd(9.63, 1.764, 21.343, 0.298)
pt3dadd(9.63, 1.646, 21.363, 0.316)
pt3dadd(9.63, 1.528, 21.383, 0.334)
pt3dadd(9.63, 1.411, 21.402, 0.35)
pt3dadd(9.63, 1.293, 21.422, 0.368)
pt3dadd(9.63, 1.175, 21.441, 0.384)
pt3dadd(9.63, 1.058, 21.461, 0.4)
pt3dadd(9.63, 0.94, 21.481, 0.418)
pt3dadd(9.63, 0.822, 21.5, 0.436)
pt3dadd(9.63, 0.705, 21.52, 0.452)
}
dend_7[49] {pt3dclear()
pt3dadd(12.4, 93.546, 15.773, 0.678)
pt3dadd(12.378, 93.557, 15.766, 0.674)
pt3dadd(12.263, 93.574, 15.754, 0.654)
pt3dadd(12.148, 93.591, 15.741, 0.634)
pt3dadd(12.033, 93.608, 15.728, 0.614)
pt3dadd(11.918, 93.625, 15.716, 0.594)
pt3dadd(11.803, 93.642, 15.703, 0.574)
pt3dadd(11.688, 93.66, 15.691, 0.556)
pt3dadd(11.573, 93.677, 15.678, 0.536)
pt3dadd(11.458, 93.694, 15.665, 0.516)
pt3dadd(11.37, 93.72, 15.604, 0.524)
pt3dadd(11.285, 93.747, 15.537, 0.534)
pt3dadd(11.2, 93.774, 15.471, 0.546)
pt3dadd(11.114, 93.801, 15.404, 0.556)
pt3dadd(11.029, 93.828, 15.338, 0.566)
pt3dadd(10.944, 93.855, 15.272, 0.578)
pt3dadd(10.859, 93.882, 15.205, 0.588)
pt3dadd(10.774, 93.909, 15.139, 0.598)
pt3dadd(10.689, 93.936, 15.073, 0.61)
pt3dadd(10.601, 93.978, 15.016, 0.618)
pt3dadd(10.512, 94.026, 14.962, 0.624)
pt3dadd(10.423, 94.075, 14.909, 0.632)
pt3dadd(10.334, 94.123, 14.856, 0.638)
pt3dadd(10.244, 94.172, 14.803, 0.644)
pt3dadd(10.155, 94.221, 14.749, 0.652)
pt3dadd(10.066, 94.269, 14.696, 0.658)
pt3dadd(9.977, 94.318, 14.643, 0.664)
pt3dadd(9.888, 94.366, 14.59, 0.672)
pt3dadd(9.798, 94.414, 14.538, 0.68)
pt3dadd(9.687, 94.436, 14.511, 0.718)
pt3dadd(9.576, 94.459, 14.485, 0.758)
pt3dadd(9.465, 94.482, 14.458, 0.798)
pt3dadd(9.353, 94.504, 14.432, 0.836)
pt3dadd(9.242, 94.527, 14.406, 0.876)
pt3dadd(9.131, 94.549, 14.379, 0.916)
pt3dadd(9.02, 94.572, 14.353, 0.956)
pt3dadd(8.908, 94.594, 14.326, 0.994)
pt3dadd(8.797, 94.617, 14.3, 1.034)
pt3dadd(8.686, 94.632, 14.275, 1.06)
pt3dadd(8.578, 94.596, 14.259, 0.996)
pt3dadd(8.469, 94.56, 14.243, 0.932)
pt3dadd(8.361, 94.524, 14.226, 0.868)
pt3dadd(8.252, 94.488, 14.21, 0.804)
pt3dadd(8.144, 94.452, 14.194, 0.74)
pt3dadd(8.035, 94.416, 14.178, 0.676)
pt3dadd(7.927, 94.38, 14.161, 0.612)
pt3dadd(7.818, 94.344, 14.145, 0.548)
pt3dadd(7.71, 94.309, 14.129, 0.484)
pt3dadd(7.607, 94.268, 14.105, 0.442)
pt3dadd(7.517, 94.215, 14.062, 0.456)
pt3dadd(7.427, 94.162, 14.018, 0.468)
pt3dadd(7.337, 94.109, 13.975, 0.482)
pt3dadd(7.247, 94.056, 13.931, 0.496)
pt3dadd(7.157, 94.003, 13.888, 0.508)
pt3dadd(7.067, 93.95, 13.844, 0.522)
pt3dadd(6.978, 93.898, 13.801, 0.536)
pt3dadd(6.888, 93.845, 13.757, 0.548)
pt3dadd(6.798, 93.792, 13.714, 0.562)
pt3dadd(6.711, 93.732, 13.674, 0.574)
pt3dadd(6.626, 93.665, 13.638, 0.586)
pt3dadd(6.541, 93.599, 13.602, 0.596)
pt3dadd(6.457, 93.532, 13.566, 0.608)
pt3dadd(6.372, 93.465, 13.53, 0.618)
pt3dadd(6.288, 93.398, 13.493, 0.63)
pt3dadd(6.203, 93.331, 13.457, 0.64)
pt3dadd(6.118, 93.265, 13.421, 0.652)
pt3dadd(6.034, 93.198, 13.385, 0.662)
pt3dadd(5.949, 93.131, 13.349, 0.672)
pt3dadd(5.859, 93.07, 13.318, 0.678)
pt3dadd(5.763, 93.013, 13.292, 0.678)
pt3dadd(5.667, 92.956, 13.265, 0.678)
pt3dadd(5.571, 92.899, 13.239, 0.678)
pt3dadd(5.475, 92.842, 13.212, 0.678)
pt3dadd(5.38, 92.785, 13.186, 0.678)
pt3dadd(5.284, 92.728, 13.159, 0.678)
pt3dadd(5.188, 92.671, 13.133, 0.678)
pt3dadd(5.092, 92.614, 13.107, 0.678)
pt3dadd(4.996, 92.557, 13.08, 0.678)
pt3dadd(4.899, 92.5, 13.058, 0.684)
pt3dadd(4.801, 92.444, 13.038, 0.694)
pt3dadd(4.703, 92.387, 13.018, 0.702)
pt3dadd(4.605, 92.33, 12.998, 0.712)
pt3dadd(4.507, 92.274, 12.979, 0.722)
pt3dadd(4.409, 92.217, 12.959, 0.73)
pt3dadd(4.311, 92.161, 12.939, 0.74)
pt3dadd(4.213, 92.104, 12.919, 0.75)
pt3dadd(4.114, 92.048, 12.899, 0.76)
pt3dadd(4.016, 91.991, 12.88, 0.768)
pt3dadd(3.922, 91.931, 12.854, 0.774)
pt3dadd(3.831, 91.869, 12.826, 0.774)
pt3dadd(3.739, 91.806, 12.798, 0.776)
pt3dadd(3.647, 91.744, 12.77, 0.776)
pt3dadd(3.556, 91.682, 12.741, 0.778)
pt3dadd(3.464, 91.62, 12.713, 0.78)
pt3dadd(3.372, 91.558, 12.685, 0.78)
pt3dadd(3.28, 91.495, 12.656, 0.782)
pt3dadd(3.189, 91.433, 12.628, 0.784)
pt3dadd(3.097, 91.371, 12.6, 0.784)
}
}
proc shape3d_164() {
dend_7[49] { pt3dadd(3.017, 91.313, 12.549, 0.764)
pt3dadd(2.939, 91.256, 12.494, 0.742)
pt3dadd(2.861, 91.199, 12.439, 0.718)
pt3dadd(2.783, 91.142, 12.383, 0.694)
pt3dadd(2.705, 91.085, 12.328, 0.67)
pt3dadd(2.626, 91.028, 12.273, 0.646)
pt3dadd(2.549, 90.971, 12.218, 0.624)
pt3dadd(2.47, 90.915, 12.163, 0.6)
pt3dadd(2.392, 90.858, 12.108, 0.576)
pt3dadd(2.314, 90.801, 12.053, 0.552)
pt3dadd(2.234, 90.735, 12.008, 0.582)
pt3dadd(2.154, 90.668, 11.965, 0.618)
pt3dadd(2.074, 90.602, 11.921, 0.656)
pt3dadd(1.994, 90.535, 11.878, 0.692)
pt3dadd(1.914, 90.469, 11.835, 0.728)
pt3dadd(1.834, 90.402, 11.791, 0.766)
pt3dadd(1.754, 90.335, 11.748, 0.802)
pt3dadd(1.674, 90.269, 11.704, 0.838)
pt3dadd(1.594, 90.202, 11.661, 0.876)
pt3dadd(1.514, 90.135, 11.618, 0.912)
pt3dadd(1.431, 90.091, 11.56, 0.932)
pt3dadd(1.348, 90.048, 11.5, 0.95)
pt3dadd(1.264, 90.005, 11.441, 0.968)
pt3dadd(1.181, 89.963, 11.382, 0.984)
pt3dadd(1.098, 89.92, 11.323, 1.002)
pt3dadd(1.015, 89.877, 11.263, 1.02)
pt3dadd(1.019, 89.881, 11.261, 1.02)
pt3dadd(0.935, 89.838, 11.202, 1.038)
pt3dadd(0.852, 89.795, 11.143, 1.056)
pt3dadd(0.769, 89.753, 11.083, 1.074)
pt3dadd(0.686, 89.71, 11.024, 1.092)
pt3dadd(0.603, 89.651, 10.977, 1.084)
pt3dadd(0.521, 89.59, 10.93, 1.074)
pt3dadd(0.438, 89.53, 10.884, 1.064)
pt3dadd(0.355, 89.469, 10.837, 1.054)
pt3dadd(0.272, 89.409, 10.791, 1.044)
pt3dadd(0.19, 89.348, 10.745, 1.034)
pt3dadd(0.107, 89.288, 10.698, 1.024)
pt3dadd(0.024, 89.227, 10.652, 1.014)
pt3dadd(-0.058, 89.167, 10.605, 1.002)
pt3dadd(-0.141, 89.106, 10.559, 0.992)
pt3dadd(-0.211, 89.044, 10.5, 0.994)
pt3dadd(-0.28, 88.981, 10.441, 0.994)
pt3dadd(-0.349, 88.918, 10.382, 0.996)
pt3dadd(-0.418, 88.855, 10.323, 0.998)
pt3dadd(-0.488, 88.793, 10.264, 0.998)
pt3dadd(-0.557, 88.73, 10.205, 1)
pt3dadd(-0.626, 88.667, 10.146, 1.002)
pt3dadd(-0.695, 88.605, 10.086, 1.002)
pt3dadd(-0.692, 88.608, 10.085, 1.002)
pt3dadd(-0.761, 88.545, 10.025, 1.004)
pt3dadd(-0.826, 88.482, 9.964, 1.006)
pt3dadd(-0.868, 88.416, 9.89, 1.012)
pt3dadd(-0.91, 88.349, 9.817, 1.016)
pt3dadd(-0.952, 88.282, 9.743, 1.022)
pt3dadd(-0.948, 88.286, 9.742, 1.022)
pt3dadd(-0.99, 88.219, 9.668, 1.028)
pt3dadd(-1.033, 88.153, 9.594, 1.034)
pt3dadd(-1.075, 88.086, 9.521, 1.04)
pt3dadd(-1.117, 88.02, 9.447, 1.044)
pt3dadd(-1.159, 87.953, 9.374, 1.05)
pt3dadd(-1.201, 87.887, 9.3, 1.056)
pt3dadd(-1.239, 87.817, 9.227, 1.054)
pt3dadd(-1.266, 87.737, 9.158, 1.034)
pt3dadd(-1.293, 87.658, 9.089, 1.014)
pt3dadd(-1.32, 87.578, 9.02, 0.994)
pt3dadd(-1.347, 87.498, 8.95, 0.974)
pt3dadd(-1.375, 87.419, 8.881, 0.954)
pt3dadd(-1.402, 87.339, 8.812, 0.934)
pt3dadd(-1.429, 87.259, 8.743, 0.914)
pt3dadd(-1.456, 87.18, 8.673, 0.894)
pt3dadd(-1.483, 87.1, 8.604, 0.874)
pt3dadd(-1.515, 87.018, 8.54, 0.85)
pt3dadd(-1.56, 86.93, 8.488, 0.816)
pt3dadd(-1.606, 86.841, 8.436, 0.78)
pt3dadd(-1.651, 86.753, 8.385, 0.746)
pt3dadd(-1.696, 86.664, 8.333, 0.712)
pt3dadd(-1.741, 86.576, 8.281, 0.676)
pt3dadd(-1.786, 86.488, 8.229, 0.642)
pt3dadd(-1.831, 86.4, 8.177, 0.608)
pt3dadd(-1.876, 86.311, 8.126, 0.572)
pt3dadd(-1.921, 86.223, 8.074, 0.538)
pt3dadd(-1.963, 86.134, 8.021, 0.516)
pt3dadd(-1.998, 86.045, 7.964, 0.522)
pt3dadd(-2.034, 85.956, 7.908, 0.53)
pt3dadd(-2.069, 85.866, 7.851, 0.538)
pt3dadd(-2.104, 85.777, 7.795, 0.546)
pt3dadd(-2.14, 85.688, 7.739, 0.552)
pt3dadd(-2.175, 85.599, 7.682, 0.56)
pt3dadd(-2.21, 85.51, 7.626, 0.568)
pt3dadd(-2.245, 85.42, 7.569, 0.576)
pt3dadd(-2.281, 85.331, 7.513, 0.582)
pt3dadd(-2.315, 85.242, 7.455, 0.596)
pt3dadd(-2.347, 85.155, 7.396, 0.62)
pt3dadd(-2.379, 85.068, 7.336, 0.644)
pt3dadd(-2.411, 84.98, 7.276, 0.67)
pt3dadd(-2.444, 84.893, 7.216, 0.694)
pt3dadd(-2.476, 84.806, 7.156, 0.718)
pt3dadd(-2.508, 84.718, 7.096, 0.742)
pt3dadd(-2.54, 84.631, 7.036, 0.768)
pt3dadd(-2.572, 84.543, 6.976, 0.792)
pt3dadd(-2.604, 84.456, 6.916, 0.816)
pt3dadd(-2.638, 84.37, 6.855, 0.84)
pt3dadd(-2.675, 84.287, 6.793, 0.864)
pt3dadd(-2.713, 84.205, 6.73, 0.888)
pt3dadd(-2.75, 84.122, 6.668, 0.912)
pt3dadd(-2.787, 84.039, 6.605, 0.936)
pt3dadd(-2.784, 84.043, 6.604, 0.936)
pt3dadd(-2.821, 83.96, 6.541, 0.96)
pt3dadd(-2.859, 83.877, 6.479, 0.984)
pt3dadd(-2.896, 83.795, 6.416, 1.008)
pt3dadd(-2.933, 83.712, 6.354, 1.032)
pt3dadd(-2.971, 83.629, 6.291, 1.056)
pt3dadd(-3.025, 83.555, 6.234, 1.054)
pt3dadd(-3.103, 83.493, 6.182, 1.014)
pt3dadd(-3.18, 83.431, 6.131, 0.974)
pt3dadd(-3.258, 83.369, 6.079, 0.936)
pt3dadd(-3.335, 83.308, 6.028, 0.896)
pt3dadd(-3.413, 83.246, 5.976, 0.856)
pt3dadd(-3.49, 83.184, 5.925, 0.818)
pt3dadd(-3.568, 83.122, 5.873, 0.778)
pt3dadd(-3.645, 83.06, 5.822, 0.738)
pt3dadd(-3.723, 82.998, 5.77, 0.7)
pt3dadd(-3.807, 82.937, 5.728, 0.678)
pt3dadd(-3.899, 82.877, 5.698, 0.678)
pt3dadd(-3.992, 82.817, 5.667, 0.678)
pt3dadd(-4.084, 82.757, 5.636, 0.678)
pt3dadd(-4.08, 82.761, 5.634, 0.678)
pt3dadd(-4.077, 82.764, 5.632, 0.678)
pt3dadd(-4.169, 82.704, 5.602, 0.678)
pt3dadd(-4.261, 82.644, 5.571, 0.678)
pt3dadd(-4.353, 82.584, 5.54, 0.678)
pt3dadd(-4.446, 82.524, 5.509, 0.678)
pt3dadd(-4.538, 82.465, 5.479, 0.678)
pt3dadd(-4.63, 82.405, 5.448, 0.678)
pt3dadd(-4.718, 82.358, 5.402, 0.668)
pt3dadd(-4.801, 82.327, 5.337, 0.648)
pt3dadd(-4.885, 82.296, 5.272, 0.628)
pt3dadd(-4.968, 82.265, 5.208, 0.608)
pt3dadd(-5.051, 82.234, 5.143, 0.588)
pt3dadd(-5.135, 82.203, 5.078, 0.568)
pt3dadd(-5.218, 82.172, 5.014, 0.548)
pt3dadd(-5.301, 82.141, 4.949, 0.528)
pt3dadd(-5.384, 82.11, 4.885, 0.508)
pt3dadd(-5.468, 82.079, 4.82, 0.488)
pt3dadd(-5.557, 82.059, 4.759, 0.508)
pt3dadd(-5.654, 82.05, 4.703, 0.572)
pt3dadd(-5.75, 82.041, 4.647, 0.638)
pt3dadd(-5.847, 82.033, 4.591, 0.702)
pt3dadd(-5.943, 82.024, 4.535, 0.768)
pt3dadd(-6.04, 82.016, 4.479, 0.832)
pt3dadd(-6.136, 82.007, 4.423, 0.896)
pt3dadd(-6.233, 81.998, 4.366, 0.962)
pt3dadd(-6.329, 81.99, 4.31, 1.026)
pt3dadd(-6.426, 81.981, 4.254, 1.092)
pt3dadd(-6.518, 81.981, 4.193, 1.116)
pt3dadd(-6.605, 81.989, 4.125, 1.098)
pt3dadd(-6.691, 81.997, 4.057, 1.08)
pt3dadd(-6.778, 82.005, 3.99, 1.062)
pt3dadd(-6.865, 82.013, 3.922, 1.044)
pt3dadd(-6.952, 82.021, 3.855, 1.026)
pt3dadd(-7.039, 82.029, 3.787, 1.008)
pt3dadd(-7.126, 82.037, 3.72, 0.99)
pt3dadd(-7.212, 82.045, 3.652, 0.972)
pt3dadd(-7.299, 82.053, 3.584, 0.954)
pt3dadd(-7.386, 82.064, 3.517, 0.948)
pt3dadd(-7.471, 82.077, 3.449, 0.958)
pt3dadd(-7.557, 82.09, 3.38, 0.966)
pt3dadd(-7.554, 82.094, 3.378, 0.966)
pt3dadd(-7.639, 82.107, 3.31, 0.974)
pt3dadd(-7.725, 82.12, 3.242, 0.984)
pt3dadd(-7.722, 82.123, 3.24, 0.984)
pt3dadd(-7.808, 82.136, 3.172, 0.992)
pt3dadd(-7.893, 82.149, 3.104, 1)
pt3dadd(-7.979, 82.163, 3.036, 1.01)
pt3dadd(-8.065, 82.176, 2.968, 1.018)
pt3dadd(-8.151, 82.189, 2.899, 1.026)
pt3dadd(-8.232, 82.204, 2.828, 1.036)
pt3dadd(-8.309, 82.222, 2.753, 1.046)
pt3dadd(-8.386, 82.24, 2.677, 1.056)
pt3dadd(-8.462, 82.258, 2.602, 1.066)
pt3dadd(-8.539, 82.276, 2.527, 1.076)
pt3dadd(-8.615, 82.294, 2.452, 1.086)
pt3dadd(-8.692, 82.312, 2.376, 1.096)
pt3dadd(-8.769, 82.33, 2.301, 1.106)
pt3dadd(-8.846, 82.348, 2.226, 1.116)
pt3dadd(-8.922, 82.366, 2.15, 1.126)
pt3dadd(-8.996, 82.396, 2.076, 1.124)
pt3dadd(-9.066, 82.437, 2.002, 1.112)
pt3dadd(-9.137, 82.478, 1.928, 1.102)
pt3dadd(-9.208, 82.518, 1.854, 1.09)
pt3dadd(-9.278, 82.559, 1.78, 1.078)
pt3dadd(-9.349, 82.6, 1.705, 1.068)
pt3dadd(-9.42, 82.64, 1.631, 1.056)
pt3dadd(-9.491, 82.681, 1.557, 1.046)
pt3dadd(-9.561, 82.721, 1.483, 1.034)
pt3dadd(-9.632, 82.762, 1.409, 1.022)
pt3dadd(-9.712, 82.837, 1.367, 0.988)
pt3dadd(-9.792, 82.912, 1.326, 0.954)
pt3dadd(-9.872, 82.988, 1.284, 0.92)
}
}
proc shape3d_165() {
dend_7[49] { pt3dadd(-9.952, 83.063, 1.242, 0.886)
pt3dadd(-10.032, 83.138, 1.201, 0.85)
pt3dadd(-10.112, 83.213, 1.159, 0.816)
pt3dadd(-10.192, 83.289, 1.117, 0.782)
pt3dadd(-10.272, 83.364, 1.076, 0.746)
pt3dadd(-10.352, 83.439, 1.034, 0.712)
pt3dadd(-10.432, 83.514, 0.992, 0.678)
pt3dadd(-10.429, 83.518, 0.99, 0.678)
pt3dadd(-10.425, 83.521, 0.988, 1.13)
pt3dadd(-10.422, 83.525, 0.987, 1.13)
pt3dadd(-10.446, 83.528, 0.887, 1.152)
pt3dadd(-10.47, 83.532, 0.788, 1.174)
pt3dadd(-10.494, 83.536, 0.689, 1.194)
pt3dadd(-10.491, 83.539, 0.687, 1.194)
pt3dadd(-10.513, 83.543, 0.588, 1.216)
pt3dadd(-10.538, 83.546, 0.489, 1.238)
pt3dadd(-10.566, 83.55, 0.391, 1.26)
pt3dadd(-10.621, 83.553, 0.301, 1.278)
pt3dadd(-10.673, 83.557, 0.211, 1.298)
pt3dadd(-10.727, 83.56, 0.121, 1.318)
pt3dadd(-10.78, 83.564, 0.032, 1.336)
pt3dadd(-10.833, 83.568, -0.058, 1.356)
pt3dadd(-10.911, 83.571, -0.134, 1.428)
pt3dadd(-10.989, 83.575, -0.209, 1.498)
pt3dadd(-11.087, 83.578, -0.264, 1.538)
pt3dadd(-11.188, 83.582, -0.316, 1.572)
pt3dadd(-11.284, 83.585, -0.373, 1.574)
pt3dadd(-11.38, 83.589, -0.432, 1.562)
pt3dadd(-11.443, 83.592, -0.51, 1.522)
pt3dadd(-11.48, 83.596, -0.606, 1.458)
pt3dadd(-11.513, 83.6, -0.703, 1.384)
pt3dadd(-11.532, 83.603, -0.803, 1.266)
pt3dadd(-11.587, 83.607, -0.885, 1.186)
pt3dadd(-11.679, 83.61, -0.947, 1.146)
pt3dadd(-11.772, 83.614, -1.009, 1.106)
pt3dadd(-11.768, 83.617, -1.011, 1.106)
pt3dadd(-11.86, 83.621, -1.072, 1.066)
pt3dadd(-11.953, 83.624, -1.134, 1.026)
pt3dadd(-12.047, 83.628, -1.195, 0.992)
pt3dadd(-12.141, 83.631, -1.254, 0.968)
pt3dadd(-12.236, 83.635, -1.314, 0.942)
pt3dadd(-12.331, 83.639, -1.373, 0.918)
pt3dadd(-12.426, 83.642, -1.432, 0.892)
pt3dadd(-12.517, 83.646, -1.495, 0.874)
pt3dadd(-12.605, 83.649, -1.562, 0.864)
pt3dadd(-12.693, 83.653, -1.628, 0.854)
pt3dadd(-12.78, 83.656, -1.695, 0.844)
pt3dadd(-12.868, 83.66, -1.762, 0.834)
pt3dadd(-12.934, 83.664, -1.842, 0.818)
pt3dadd(-12.978, 83.667, -1.936, 0.796)
pt3dadd(-13.028, 83.684, -2.02, 0.77)
pt3dadd(-13.107, 83.756, -2.067, 0.728)
pt3dadd(-13.181, 83.841, -2.093, 0.692)
pt3dadd(-13.245, 83.944, -2.095, 0.67)
pt3dadd(-13.312, 84.042, -2.108, 0.656)
pt3dadd(-13.382, 84.127, -2.147, 0.67)
pt3dadd(-13.444, 84.221, -2.185, 0.698)
pt3dadd(-13.51, 84.307, -2.221, 0.726)
pt3dadd(-13.613, 84.354, -2.249, 0.722)
pt3dadd(-13.716, 84.402, -2.278, 0.716)
pt3dadd(-13.821, 84.449, -2.306, 0.71)
pt3dadd(-13.924, 84.496, -2.334, 0.704)
pt3dadd(-14.012, 84.527, -2.392, 0.686)
pt3dadd(-14.091, 84.552, -2.464, 0.66)
pt3dadd(-14.19, 84.56, -2.516, 0.628)
pt3dadd(-14.294, 84.564, -2.563, 0.594)
pt3dadd(-14.401, 84.57, -2.601, 0.584)
pt3dadd(-14.513, 84.58, -2.631, 0.594)
pt3dadd(-14.606, 84.597, -2.674, 0.608)
pt3dadd(-14.629, 84.648, -2.765, 0.632)
pt3dadd(-14.647, 84.69, -2.858, 0.666)
pt3dadd(-14.644, 84.7, -2.96, 0.732)
pt3dadd(-14.64, 84.709, -3.062, 0.81)
pt3dadd(-14.637, 84.712, -3.163, 0.902)
pt3dadd(-14.633, 84.721, -3.265, 0.972)
pt3dadd(-14.63, 84.747, -3.365, 1.03)
pt3dadd(-14.638, 84.8, -3.456, 1.148)
pt3dadd(-14.687, 84.871, -3.526, 1.262)
pt3dadd(-14.733, 84.959, -3.585, 1.288)
pt3dadd(-14.787, 85.052, -3.631, 1.354)
pt3dadd(-14.784, 85.056, -3.633, 1.354)
pt3dadd(-14.78, 85.059, -3.635, 1.354)
pt3dadd(-14.889, 85.095, -3.649, 1.406)
pt3dadd(-15.006, 85.108, -3.655, 1.354)
pt3dadd(-15.118, 85.12, -3.678, 1.164)
pt3dadd(-15.229, 85.144, -3.704, 1.08)
pt3dadd(-15.226, 85.147, -3.706, 1.08)
pt3dadd(-15.337, 85.171, -3.729, 1.046)
pt3dadd(-15.449, 85.196, -3.752, 1.012)
pt3dadd(-15.561, 85.22, -3.775, 0.978)
pt3dadd(-15.674, 85.244, -3.799, 0.944)
pt3dadd(-15.77, 85.256, -3.848, 0.922)
pt3dadd(-15.854, 85.26, -3.918, 0.91)
pt3dadd(-15.952, 85.266, -3.96, 0.912)
pt3dadd(-16.069, 85.274, -3.966, 0.93)
pt3dadd(-16.185, 85.282, -3.972, 0.948)
pt3dadd(-16.273, 85.328, -4.013, 0.982)
pt3dadd(-16.346, 85.392, -4.072, 1.026)
pt3dadd(-16.367, 85.45, -4.159, 1.018)
pt3dadd(-16.382, 85.506, -4.249, 1.006)
pt3dadd(-16.485, 85.518, -4.289, 0.982)
pt3dadd(-16.594, 85.525, -4.322, 0.956)
pt3dadd(-16.704, 85.532, -4.355, 0.93)
pt3dadd(-16.815, 85.539, -4.389, 0.902)
pt3dadd(-16.924, 85.543, -4.424, 0.86)
pt3dadd(-17.034, 85.546, -4.459, 0.818)
pt3dadd(-17.091, 85.577, -4.532, 0.784)
pt3dadd(-17.123, 85.622, -4.623, 0.756)
pt3dadd(-17.157, 85.664, -4.714, 0.726)
pt3dadd(-17.21, 85.674, -4.804, 0.704)
pt3dadd(-17.262, 85.683, -4.894, 0.68)
pt3dadd(-17.353, 85.687, -4.956, 0.654)
pt3dadd(-17.447, 85.691, -5.016, 0.628)
pt3dadd(-17.543, 85.695, -5.074, 0.602)
pt3dadd(-17.657, 85.698, -5.093, 0.602)
pt3dadd(-17.772, 85.702, -5.112, 0.602)
pt3dadd(-17.769, 85.705, -5.114, 0.602)
pt3dadd(-17.878, 85.709, -5.145, 0.65)
pt3dadd(-17.963, 85.712, -5.213, 0.7)
pt3dadd(-18.04, 85.716, -5.289, 0.73)
pt3dadd(-18.117, 85.719, -5.365, 0.76)
pt3dadd(-18.195, 85.723, -5.44, 0.792)
pt3dadd(-18.272, 85.727, -5.516, 0.822)
pt3dadd(-18.268, 85.73, -5.518, 0.822)
pt3dadd(-18.33, 85.734, -5.603, 0.864)
pt3dadd(-18.387, 85.737, -5.691, 0.91)
pt3dadd(-18.419, 85.741, -5.787, 0.944)
pt3dadd(-18.429, 85.744, -5.888, 0.972)
pt3dadd(-18.442, 85.748, -5.989, 1)
pt3dadd(-18.493, 85.751, -6.079, 1.024)
pt3dadd(-18.55, 85.755, -6.167, 1.048)
pt3dadd(-18.647, 85.758, -6.207, 1.082)
pt3dadd(-18.761, 85.762, -6.226, 1.12)
pt3dadd(-18.876, 85.766, -6.245, 1.162)
pt3dadd(-18.99, 85.769, -6.267, 1.236)
pt3dadd(-19.095, 85.773, -6.305, 1.3)
pt3dadd(-19.185, 85.776, -6.369, 1.346)
pt3dadd(-19.278, 85.793, -6.427, 1.388)
pt3dadd(-19.374, 85.846, -6.464, 1.414)
pt3dadd(-19.434, 85.92, -6.509, 1.426)
pt3dadd(-19.436, 86.025, -6.563, 1.414)
pt3dadd(-19.439, 86.107, -6.632, 1.406)
pt3dadd(-19.441, 86.132, -6.732, 1.406)
pt3dadd(-19.442, 86.157, -6.832, 1.406)
pt3dadd(-19.483, 86.181, -6.924, 1.416)
pt3dadd(-19.533, 86.204, -7.014, 1.428)
pt3dadd(-19.614, 86.259, -7.06, 1.482)
pt3dadd(-19.727, 86.289, -7.069, 1.454)
pt3dadd(-19.842, 86.299, -7.071, 1.388)
pt3dadd(-19.959, 86.303, -7.08, 1.29)
pt3dadd(-20.066, 86.306, -7.117, 1.14)
pt3dadd(-20.151, 86.332, -7.183, 1.108)
pt3dadd(-20.235, 86.36, -7.25, 1.086)
pt3dadd(-20.319, 86.388, -7.317, 1.064)
pt3dadd(-20.403, 86.415, -7.384, 1.04)
pt3dadd(-20.48, 86.447, -7.457, 1.026)
pt3dadd(-20.551, 86.481, -7.533, 1.02)
pt3dadd(-20.621, 86.515, -7.609, 1.014)
pt3dadd(-20.692, 86.55, -7.686, 1.01)
pt3dadd(-20.761, 86.591, -7.758, 1.006)
pt3dadd(-20.835, 86.66, -7.815, 1.02)
pt3dadd(-20.907, 86.73, -7.872, 1.032)
pt3dadd(-20.979, 86.799, -7.928, 1.044)
pt3dadd(-21.046, 86.87, -7.987, 1.054)
pt3dadd(-21.088, 86.948, -8.057, 1.054)
pt3dadd(-21.146, 87.015, -8.123, 1.04)
pt3dadd(-21.231, 87.064, -8.181, 0.998)
pt3dadd(-21.313, 87.087, -8.248, 0.938)
pt3dadd(-21.391, 87.09, -8.324, 0.868)
pt3dadd(-21.482, 87.094, -8.381, 0.814)
pt3dadd(-21.593, 87.097, -8.415, 0.782)
pt3dadd(-21.702, 87.101, -8.451, 0.754)
pt3dadd(-21.805, 87.104, -8.498, 0.754)
pt3dadd(-21.905, 87.124, -8.547, 0.756)
pt3dadd(-22.002, 87.154, -8.599, 0.762)
pt3dadd(-22.101, 87.184, -8.65, 0.768)
pt3dadd(-22.198, 87.214, -8.701, 0.774)
pt3dadd(-22.296, 87.242, -8.749, 0.778)
pt3dadd(-22.41, 87.246, -8.77, 0.774)
pt3dadd(-22.526, 87.249, -8.79, 0.77)
pt3dadd(-22.64, 87.253, -8.81, 0.766)
pt3dadd(-22.754, 87.256, -8.831, 0.762)
pt3dadd(-22.868, 87.26, -8.851, 0.756)
pt3dadd(-22.982, 87.265, -8.873, 0.752)
pt3dadd(-23.09, 87.288, -8.909, 0.736)
pt3dadd(-23.197, 87.311, -8.945, 0.72)
pt3dadd(-23.305, 87.333, -8.981, 0.706)
pt3dadd(-23.413, 87.356, -9.017, 0.69)
pt3dadd(-23.51, 87.39, -9.057, 0.672)
pt3dadd(-23.568, 87.47, -9.116, 0.644)
pt3dadd(-23.631, 87.518, -9.186, 0.616)
pt3dadd(-23.698, 87.528, -9.269, 0.592)
pt3dadd(-23.78, 87.535, -9.337, 0.574)
pt3dadd(-23.884, 87.539, -9.384, 0.562)
pt3dadd(-23.988, 87.542, -9.428, 0.552)
pt3dadd(-24.1, 87.546, -9.457, 0.552)
pt3dadd(-24.212, 87.55, -9.486, 0.552)
pt3dadd(-24.32, 87.567, -9.523, 0.578)
pt3dadd(-24.426, 87.59, -9.562, 0.616)
pt3dadd(-24.501, 87.658, -9.603, 0.734)
}
}
proc shape3d_166() {
dend_7[49] { pt3dadd(-24.51, 87.75, -9.672, 0.804)
pt3dadd(-24.506, 87.847, -9.736, 0.754)
pt3dadd(-24.503, 87.958, -9.783, 0.744)
pt3dadd(-24.528, 88.062, -9.827, 0.794)
pt3dadd(-24.581, 88.16, -9.868, 0.824)
pt3dadd(-24.634, 88.258, -9.909, 0.852)
pt3dadd(-24.688, 88.356, -9.95, 0.882)
pt3dadd(-24.753, 88.445, -9.985, 0.946)
pt3dadd(-24.83, 88.515, -10.03, 1.026)
pt3dadd(-24.838, 88.584, -10.114, 0.9)
pt3dadd(-24.835, 88.675, -10.184, 0.76)
pt3dadd(-24.865, 88.77, -10.239, 0.742)
pt3dadd(-24.962, 88.806, -10.279, 0.83)
pt3dadd(-25.077, 88.81, -10.292, 0.882)
pt3dadd(-25.194, 88.814, -10.294, 0.906)
pt3dadd(-25.31, 88.817, -10.296, 0.934)
pt3dadd(-25.427, 88.821, -10.297, 0.982)
pt3dadd(-25.543, 88.824, -10.301, 0.998)
pt3dadd(-25.657, 88.829, -10.32, 0.942)
pt3dadd(-25.767, 88.839, -10.356, 0.886)
pt3dadd(-25.876, 88.848, -10.393, 0.83)
pt3dadd(-25.949, 88.925, -10.439, 0.774)
pt3dadd(-26.02, 89.008, -10.483, 0.702)
pt3dadd(-26.109, 89.057, -10.523, 0.646)
pt3dadd(-26.215, 89.08, -10.562, 0.634)
pt3dadd(-26.325, 89.102, -10.591, 0.622)
pt3dadd(-26.438, 89.123, -10.613, 0.61)
pt3dadd(-26.53, 89.156, -10.648, 0.6)
pt3dadd(-26.563, 89.224, -10.729, 0.586)
pt3dadd(-26.611, 89.285, -10.805, 0.566)
pt3dadd(-26.683, 89.334, -10.875, 0.538)
pt3dadd(-26.776, 89.369, -10.926, 0.514)
pt3dadd(-26.881, 89.396, -10.963, 0.492)
pt3dadd(-26.988, 89.423, -11.001, 0.47)
pt3dadd(-27.094, 89.45, -11.038, 0.45)
pt3dadd(-27.201, 89.48, -11.072, 0.438)
pt3dadd(-27.306, 89.512, -11.107, 0.434)
pt3dadd(-27.408, 89.546, -11.149, 0.458)
pt3dadd(-27.51, 89.569, -11.196, 0.468)
pt3dadd(-27.611, 89.593, -11.243, 0.478)
pt3dadd(-27.714, 89.616, -11.29, 0.49)
pt3dadd(-27.816, 89.64, -11.337, 0.5)
pt3dadd(-27.918, 89.687, -11.364, 0.512)
pt3dadd(-28.021, 89.74, -11.387, 0.522)
pt3dadd(-28.124, 89.792, -11.411, 0.532)
pt3dadd(-28.226, 89.845, -11.434, 0.544)
pt3dadd(-28.331, 89.892, -11.459, 0.554)
pt3dadd(-28.439, 89.92, -11.491, 0.558)
pt3dadd(-28.548, 89.949, -11.522, 0.564)
pt3dadd(-28.656, 89.977, -11.554, 0.568)
pt3dadd(-28.764, 90.005, -11.585, 0.574)
pt3dadd(-28.869, 90.043, -11.618, 0.582)
pt3dadd(-28.961, 90.103, -11.657, 0.594)
pt3dadd(-29.055, 90.162, -11.695, 0.604)
pt3dadd(-29.147, 90.222, -11.733, 0.616)
pt3dadd(-29.241, 90.28, -11.771, 0.628)
pt3dadd(-29.355, 90.298, -11.791, 0.632)
pt3dadd(-29.468, 90.316, -11.811, 0.638)
pt3dadd(-29.582, 90.335, -11.831, 0.642)
pt3dadd(-29.696, 90.353, -11.851, 0.646)
pt3dadd(-29.809, 90.371, -11.872, 0.65)
pt3dadd(-29.924, 90.389, -11.881, 0.658)
pt3dadd(-30.04, 90.408, -11.883, 0.668)
pt3dadd(-30.155, 90.426, -11.885, 0.676)
pt3dadd(-30.27, 90.431, -11.898, 0.67)
pt3dadd(-30.387, 90.435, -11.912, 0.66)
pt3dadd(-30.496, 90.452, -11.931, 0.652)
pt3dadd(-30.581, 90.522, -11.97, 0.652)
pt3dadd(-30.661, 90.604, -11.994, 0.648)
pt3dadd(-30.733, 90.701, -11.996, 0.636)
pt3dadd(-30.814, 90.782, -11.998, 0.636)
pt3dadd(-30.927, 90.818, -12, 0.668)
pt3dadd(-31.032, 90.872, -12.001, 0.678)
pt3dadd(-31.131, 90.935, -12.003, 0.678)
pt3dadd(-31.232, 90.999, -12.005, 0.678)
pt3dadd(-31.333, 91.062, -12.007, 0.678)
pt3dadd(-31.433, 91.126, -12.009, 0.678)
pt3dadd(-31.531, 91.189, -12.024, 0.68)
pt3dadd(-31.627, 91.253, -12.051, 0.686)
pt3dadd(-31.722, 91.317, -12.078, 0.692)
pt3dadd(-31.818, 91.381, -12.105, 0.698)
pt3dadd(-31.916, 91.441, -12.133, 0.702)
pt3dadd(-32.016, 91.474, -12.177, 0.686)
pt3dadd(-32.119, 91.507, -12.22, 0.668)
pt3dadd(-32.221, 91.54, -12.263, 0.652)
pt3dadd(-32.322, 91.572, -12.306, 0.636)
pt3dadd(-32.431, 91.597, -12.327, 0.612)
pt3dadd(-32.546, 91.616, -12.329, 0.584)
pt3dadd(-32.663, 91.634, -12.331, 0.556)
pt3dadd(-32.751, 91.709, -12.333, 0.532)
pt3dadd(-32.836, 91.795, -12.335, 0.508)
pt3dadd(-32.9, 91.876, -12.378, 0.502)
pt3dadd(-32.958, 91.956, -12.438, 0.502)
pt3dadd(-32.955, 91.96, -12.44, 0.502)
pt3dadd(-33.034, 92.017, -12.498, 0.53)
pt3dadd(-33.12, 92.07, -12.551, 0.554)
pt3dadd(-33.225, 92.109, -12.583, 0.562)
pt3dadd(-33.33, 92.149, -12.615, 0.57)
pt3dadd(-33.435, 92.189, -12.647, 0.576)
pt3dadd(-33.549, 92.209, -12.651, 0.586)
pt3dadd(-33.666, 92.228, -12.653, 0.596)
pt3dadd(-33.781, 92.243, -12.655, 0.602)
pt3dadd(-33.897, 92.247, -12.66, 0.602)
pt3dadd(-34.013, 92.253, -12.672, 0.602)
pt3dadd(-34.129, 92.258, -12.684, 0.602)
pt3dadd(-34.244, 92.264, -12.697, 0.602)
pt3dadd(-34.361, 92.27, -12.71, 0.602)
pt3dadd(-34.476, 92.275, -12.722, 0.602)
pt3dadd(-34.591, 92.281, -12.734, 0.602)
pt3dadd(-34.698, 92.329, -12.75, 0.602)
pt3dadd(-34.804, 92.379, -12.766, 0.602)
pt3dadd(-34.91, 92.429, -12.781, 0.602)
pt3dadd(-35.015, 92.479, -12.796, 0.602)
pt3dadd(-35.122, 92.525, -12.813, 0.602)
pt3dadd(-35.234, 92.529, -12.843, 0.592)
pt3dadd(-35.346, 92.532, -12.872, 0.582)
pt3dadd(-35.461, 92.536, -12.891, 0.572)
pt3dadd(-35.576, 92.54, -12.905, 0.562)
pt3dadd(-35.691, 92.543, -12.92, 0.552)
pt3dadd(-35.792, 92.547, -12.971, 0.564)
pt3dadd(-35.892, 92.55, -13.024, 0.576)
pt3dadd(-35.927, 92.554, -13.113, 0.608)
pt3dadd(-35.944, 92.557, -13.214, 0.646)
pt3dadd(-35.971, 92.568, -13.308, 0.688)
pt3dadd(-36.048, 92.612, -13.377, 0.738)
pt3dadd(-36.125, 92.655, -13.445, 0.788)
pt3dadd(-36.207, 92.7, -13.505, 0.836)
pt3dadd(-36.313, 92.749, -13.523, 0.872)
pt3dadd(-36.409, 92.802, -13.547, 0.904)
pt3dadd(-36.459, 92.873, -13.609, 0.892)
pt3dadd(-36.544, 92.928, -13.662, 0.868)
pt3dadd(-36.631, 92.983, -13.714, 0.844)
pt3dadd(-36.717, 93.038, -13.767, 0.82)
pt3dadd(-36.81, 93.083, -13.815, 0.796)
pt3dadd(-36.806, 93.086, -13.817, 0.796)
pt3dadd(-36.912, 93.109, -13.857, 0.772)
pt3dadd(-37.017, 93.138, -13.897, 0.756)
pt3dadd(-37.113, 93.184, -13.941, 0.77)
pt3dadd(-37.194, 93.214, -14.001, 0.804)
pt3dadd(-37.252, 93.218, -14.089, 0.874)
pt3dadd(-37.31, 93.218, -14.177, 0.948)
pt3dadd(-37.366, 93.201, -14.263, 1.05)
pt3dadd(-37.418, 93.177, -14.35, 1.164)
pt3dadd(-37.444, 93.129, -14.438, 1.32)
pt3dadd(-37.443, 93.127, -14.539, 1.344)
pt3dadd(-37.44, 93.129, -14.641, 1.358)
pt3dadd(-37.436, 93.13, -14.743, 1.374)
pt3dadd(-37.433, 93.132, -14.845, 1.388)
pt3dadd(-37.429, 93.134, -14.947, 1.402)
pt3dadd(-37.426, 93.135, -15.049, 1.418)
pt3dadd(-37.422, 93.137, -15.15, 1.432)
pt3dadd(-37.419, 93.141, -15.252, 1.428)
pt3dadd(-37.415, 93.144, -15.354, 1.424)
pt3dadd(-37.411, 93.148, -15.456, 1.42)
pt3dadd(-37.408, 93.151, -15.558, 1.416)
pt3dadd(-37.404, 93.155, -15.66, 1.414)
pt3dadd(-37.401, 93.158, -15.761, 1.41)
pt3dadd(-37.397, 93.161, -15.863, 1.406)
pt3dadd(-37.394, 93.145, -15.964, 1.388)
pt3dadd(-37.39, 93.129, -16.064, 1.372)
pt3dadd(-37.387, 93.112, -16.165, 1.356)
pt3dadd(-37.383, 93.116, -16.167, 1.356)
pt3dadd(-37.38, 93.1, -16.267, 1.34)
pt3dadd(-37.376, 93.084, -16.368, 1.324)
pt3dadd(-37.373, 93.068, -16.468, 1.306)
pt3dadd(-37.369, 93.039, -16.566, 1.298)
pt3dadd(-37.366, 93.009, -16.664, 1.288)
pt3dadd(-37.362, 92.98, -16.762, 1.28)
pt3dadd(-37.359, 92.95, -16.86, 1.27)
pt3dadd(-37.355, 92.921, -16.958, 1.262)
pt3dadd(-37.352, 92.885, -17.054, 1.256)
pt3dadd(-37.348, 92.857, -17.151, 1.272)
pt3dadd(-37.345, 92.855, -17.252, 1.28)
pt3dadd(-37.341, 92.849, -17.354, 1.3)
pt3dadd(-37.338, 92.808, -17.447, 1.306)
pt3dadd(-37.334, 92.702, -17.486, 1.254)
pt3dadd(-37.331, 92.706, -17.487, 1.254)
pt3dadd(-37.327, 92.709, -17.489, 1.254)
pt3dadd(-37.323, 92.713, -17.491, 1.254)
}
dend_0[14] {pt3dclear()
pt3dadd(17.462, 98.307, 18.234, 3.39)
pt3dadd(17.474, 98.3, 18.209, 3.378)
pt3dadd(17.514, 98.275, 18.117, 3.334)
pt3dadd(17.555, 98.251, 18.025, 3.29)
pt3dadd(17.596, 98.226, 17.933, 3.246)
pt3dadd(17.636, 98.202, 17.841, 3.202)
pt3dadd(17.677, 98.177, 17.75, 3.158)
pt3dadd(17.717, 98.153, 17.658, 3.114)
pt3dadd(17.758, 98.128, 17.566, 3.068)
pt3dadd(17.798, 98.104, 17.474, 3.024)
pt3dadd(17.839, 98.079, 17.382, 2.98)
pt3dadd(17.88, 98.055, 17.29, 2.936)
pt3dadd(17.92, 98.03, 17.198, 2.892)
pt3dadd(17.973, 98.008, 17.111, 2.856)
pt3dadd(18.027, 97.986, 17.024, 2.82)
pt3dadd(18.081, 97.964, 16.936, 2.784)
pt3dadd(18.136, 97.942, 16.849, 2.748)
pt3dadd(18.19, 97.92, 16.761, 2.712)
pt3dadd(18.244, 97.898, 16.674, 2.676)
pt3dadd(18.298, 97.876, 16.587, 2.642)
pt3dadd(18.352, 97.854, 16.499, 2.606)
}
}
proc shape3d_167() {
dend_0[14] { pt3dadd(18.407, 97.833, 16.412, 2.57)
pt3dadd(18.461, 97.811, 16.325, 2.534)
}
dend_7[50] {pt3dclear()
pt3dadd(18.461, 97.811, 16.325, 2.534)
pt3dadd(18.522, 97.79, 16.24, 2.5)
pt3dadd(18.582, 97.769, 16.156, 2.464)
pt3dadd(18.643, 97.748, 16.071, 2.43)
pt3dadd(18.704, 97.727, 15.987, 2.396)
pt3dadd(18.765, 97.707, 15.903, 2.362)
pt3dadd(18.826, 97.686, 15.818, 2.326)
pt3dadd(18.887, 97.665, 15.734, 2.292)
pt3dadd(18.948, 97.644, 15.649, 2.258)
pt3dadd(19.008, 97.623, 15.565, 2.224)
pt3dadd(19.069, 97.602, 15.48, 2.188)
pt3dadd(19.106, 97.573, 15.389, 2.106)
pt3dadd(19.143, 97.544, 15.297, 2.022)
pt3dadd(19.18, 97.515, 15.205, 1.938)
pt3dadd(19.218, 97.485, 15.113, 1.856)
pt3dadd(19.255, 97.456, 15.021, 1.772)
pt3dadd(19.292, 97.427, 14.929, 1.688)
pt3dadd(19.329, 97.397, 14.837, 1.606)
pt3dadd(19.366, 97.368, 14.745, 1.522)
pt3dadd(19.403, 97.339, 14.653, 1.44)
pt3dadd(19.44, 97.309, 14.561, 1.356)
}
dend_7[51] {pt3dclear()
pt3dadd(19.44, 97.309, 14.561, 1.356)
pt3dadd(19.445, 97.295, 14.543, 1.344)
pt3dadd(19.467, 97.229, 14.461, 1.292)
pt3dadd(19.489, 97.163, 14.38, 1.24)
pt3dadd(19.511, 97.097, 14.298, 1.188)
pt3dadd(19.533, 97.031, 14.217, 1.136)
pt3dadd(19.554, 96.965, 14.135, 1.084)
pt3dadd(19.576, 96.9, 14.054, 1.032)
pt3dadd(19.598, 96.834, 13.972, 0.98)
pt3dadd(19.62, 96.768, 13.89, 0.928)
pt3dadd(19.642, 96.702, 13.809, 0.876)
pt3dadd(19.661, 96.626, 13.733, 0.846)
pt3dadd(19.679, 96.549, 13.658, 0.816)
pt3dadd(19.698, 96.472, 13.582, 0.786)
pt3dadd(19.716, 96.396, 13.507, 0.756)
pt3dadd(19.735, 96.319, 13.432, 0.726)
pt3dadd(19.753, 96.242, 13.356, 0.696)
pt3dadd(19.772, 96.166, 13.281, 0.666)
pt3dadd(19.791, 96.089, 13.206, 0.636)
pt3dadd(19.809, 96.012, 13.13, 0.606)
pt3dadd(19.828, 95.936, 13.055, 0.576)
pt3dadd(19.854, 95.849, 12.989, 0.58)
pt3dadd(19.879, 95.762, 12.924, 0.584)
pt3dadd(19.905, 95.675, 12.858, 0.588)
pt3dadd(19.931, 95.589, 12.792, 0.594)
pt3dadd(19.957, 95.502, 12.727, 0.598)
pt3dadd(19.983, 95.415, 12.661, 0.602)
pt3dadd(20.009, 95.328, 12.595, 0.606)
pt3dadd(20.035, 95.242, 12.53, 0.61)
pt3dadd(20.06, 95.155, 12.464, 0.614)
pt3dadd(20.091, 95.067, 12.402, 0.628)
pt3dadd(20.145, 94.974, 12.358, 0.698)
pt3dadd(20.199, 94.881, 12.314, 0.766)
pt3dadd(20.253, 94.787, 12.27, 0.836)
pt3dadd(20.307, 94.694, 12.226, 0.904)
pt3dadd(20.362, 94.601, 12.183, 0.974)
pt3dadd(20.416, 94.508, 12.139, 1.042)
pt3dadd(20.47, 94.414, 12.095, 1.112)
pt3dadd(20.524, 94.321, 12.051, 1.18)
pt3dadd(20.578, 94.228, 12.007, 1.248)
pt3dadd(20.633, 94.137, 11.961, 1.3)
pt3dadd(20.691, 94.06, 11.901, 1.266)
pt3dadd(20.75, 93.983, 11.842, 1.232)
pt3dadd(20.808, 93.906, 11.783, 1.196)
pt3dadd(20.867, 93.83, 11.724, 1.162)
pt3dadd(20.926, 93.753, 11.664, 1.128)
pt3dadd(20.984, 93.676, 11.605, 1.092)
pt3dadd(21.043, 93.599, 11.546, 1.058)
pt3dadd(21.101, 93.522, 11.487, 1.022)
pt3dadd(21.16, 93.445, 11.427, 0.988)
pt3dadd(21.222, 93.367, 11.372, 0.952)
pt3dadd(21.298, 93.285, 11.336, 0.914)
pt3dadd(21.374, 93.204, 11.299, 0.874)
pt3dadd(21.45, 93.122, 11.262, 0.834)
pt3dadd(21.526, 93.041, 11.226, 0.794)
pt3dadd(21.602, 92.959, 11.189, 0.754)
pt3dadd(21.678, 92.877, 11.152, 0.716)
pt3dadd(21.755, 92.796, 11.116, 0.676)
pt3dadd(21.831, 92.714, 11.079, 0.636)
pt3dadd(21.907, 92.632, 11.042, 0.596)
pt3dadd(21.984, 92.55, 11.008, 0.56)
pt3dadd(22.062, 92.465, 10.982, 0.536)
pt3dadd(22.14, 92.379, 10.956, 0.512)
pt3dadd(22.218, 92.294, 10.929, 0.488)
pt3dadd(22.297, 92.208, 10.903, 0.462)
pt3dadd(22.375, 92.123, 10.877, 0.438)
pt3dadd(22.453, 92.038, 10.851, 0.414)
pt3dadd(22.531, 91.952, 10.825, 0.39)
pt3dadd(22.61, 91.867, 10.799, 0.364)
pt3dadd(22.688, 91.781, 10.772, 0.34)
pt3dadd(22.764, 91.696, 10.743, 0.334)
pt3dadd(22.836, 91.611, 10.706, 0.378)
pt3dadd(22.908, 91.526, 10.669, 0.424)
pt3dadd(22.98, 91.441, 10.632, 0.468)
pt3dadd(23.052, 91.356, 10.594, 0.514)
pt3dadd(23.124, 91.271, 10.557, 0.558)
pt3dadd(23.196, 91.186, 10.52, 0.602)
pt3dadd(23.268, 91.101, 10.483, 0.648)
pt3dadd(23.341, 91.017, 10.446, 0.692)
pt3dadd(23.413, 90.932, 10.408, 0.736)
pt3dadd(23.477, 90.844, 10.367, 0.782)
pt3dadd(23.53, 90.752, 10.32, 0.832)
pt3dadd(23.582, 90.66, 10.273, 0.88)
pt3dadd(23.634, 90.568, 10.225, 0.928)
pt3dadd(23.687, 90.477, 10.178, 0.976)
pt3dadd(23.739, 90.385, 10.131, 1.024)
pt3dadd(23.791, 90.293, 10.083, 1.072)
pt3dadd(23.844, 90.201, 10.036, 1.12)
pt3dadd(23.896, 90.109, 9.989, 1.168)
pt3dadd(23.949, 90.018, 9.941, 1.216)
pt3dadd(24, 89.922, 9.9, 1.236)
pt3dadd(24.052, 89.822, 9.866, 1.224)
pt3dadd(24.104, 89.721, 9.831, 1.214)
pt3dadd(24.155, 89.621, 9.797, 1.202)
pt3dadd(24.207, 89.521, 9.762, 1.192)
pt3dadd(24.259, 89.421, 9.728, 1.18)
pt3dadd(24.31, 89.321, 9.693, 1.168)
pt3dadd(24.362, 89.221, 9.659, 1.158)
pt3dadd(24.413, 89.121, 9.624, 1.146)
pt3dadd(24.465, 89.021, 9.59, 1.134)
pt3dadd(24.521, 88.925, 9.552, 1.124)
pt3dadd(24.581, 88.833, 9.512, 1.116)
pt3dadd(24.641, 88.74, 9.472, 1.106)
pt3dadd(24.7, 88.648, 9.432, 1.096)
pt3dadd(24.76, 88.556, 9.392, 1.088)
pt3dadd(24.82, 88.464, 9.351, 1.078)
pt3dadd(24.88, 88.371, 9.311, 1.068)
pt3dadd(24.939, 88.279, 9.271, 1.058)
pt3dadd(24.999, 88.187, 9.231, 1.05)
pt3dadd(25.059, 88.095, 9.191, 1.04)
pt3dadd(25.119, 88.008, 9.144, 1.022)
pt3dadd(25.181, 87.923, 9.095, 1.002)
pt3dadd(25.242, 87.838, 9.045, 0.982)
pt3dadd(25.303, 87.754, 8.996, 0.96)
pt3dadd(25.364, 87.669, 8.947, 0.94)
pt3dadd(25.425, 87.585, 8.897, 0.918)
pt3dadd(25.486, 87.5, 8.848, 0.898)
pt3dadd(25.547, 87.416, 8.799, 0.876)
pt3dadd(25.608, 87.331, 8.749, 0.856)
pt3dadd(25.669, 87.246, 8.7, 0.836)
pt3dadd(25.733, 87.159, 8.656, 0.826)
pt3dadd(25.797, 87.071, 8.615, 0.82)
pt3dadd(25.862, 86.983, 8.573, 0.814)
pt3dadd(25.926, 86.894, 8.532, 0.808)
pt3dadd(25.99, 86.806, 8.491, 0.802)
pt3dadd(26.055, 86.718, 8.449, 0.796)
pt3dadd(26.119, 86.63, 8.408, 0.792)
pt3dadd(26.184, 86.542, 8.367, 0.786)
pt3dadd(26.248, 86.453, 8.325, 0.78)
pt3dadd(26.313, 86.365, 8.284, 0.774)
pt3dadd(26.36, 86.273, 8.234, 0.812)
pt3dadd(26.401, 86.18, 8.181, 0.864)
pt3dadd(26.443, 86.087, 8.128, 0.914)
pt3dadd(26.485, 85.994, 8.075, 0.966)
pt3dadd(26.527, 85.902, 8.023, 1.016)
pt3dadd(26.569, 85.809, 7.97, 1.068)
pt3dadd(26.611, 85.716, 7.917, 1.12)
pt3dadd(26.653, 85.623, 7.864, 1.17)
pt3dadd(26.694, 85.53, 7.811, 1.222)
pt3dadd(26.736, 85.437, 7.759, 1.272)
pt3dadd(26.79, 85.341, 7.719, 1.278)
pt3dadd(26.846, 85.244, 7.684, 1.272)
pt3dadd(26.902, 85.147, 7.648, 1.266)
pt3dadd(26.959, 85.05, 7.612, 1.258)
pt3dadd(27.015, 84.953, 7.577, 1.252)
pt3dadd(27.072, 84.856, 7.541, 1.246)
pt3dadd(27.128, 84.759, 7.505, 1.24)
pt3dadd(27.184, 84.662, 7.47, 1.232)
pt3dadd(27.241, 84.566, 7.434, 1.226)
pt3dadd(27.297, 84.469, 7.398, 1.22)
pt3dadd(27.348, 84.371, 7.359, 1.224)
pt3dadd(27.398, 84.274, 7.318, 1.23)
pt3dadd(27.448, 84.176, 7.277, 1.236)
pt3dadd(27.498, 84.079, 7.236, 1.242)
pt3dadd(27.548, 83.981, 7.195, 1.248)
pt3dadd(27.598, 83.884, 7.154, 1.254)
pt3dadd(27.648, 83.786, 7.113, 1.26)
pt3dadd(27.698, 83.689, 7.072, 1.266)
pt3dadd(27.747, 83.591, 7.032, 1.272)
pt3dadd(27.797, 83.494, 6.991, 1.278)
pt3dadd(27.839, 83.397, 6.943, 1.308)
pt3dadd(27.879, 83.301, 6.894, 1.34)
pt3dadd(27.919, 83.204, 6.845, 1.372)
pt3dadd(27.96, 83.107, 6.796, 1.404)
pt3dadd(28, 83.011, 6.747, 1.436)
pt3dadd(28.04, 82.914, 6.698, 1.468)
pt3dadd(28.081, 82.817, 6.65, 1.5)
pt3dadd(28.121, 82.721, 6.601, 1.532)
pt3dadd(28.161, 82.624, 6.552, 1.564)
pt3dadd(28.201, 82.527, 6.503, 1.596)
pt3dadd(28.258, 82.431, 6.468, 1.614)
pt3dadd(28.316, 82.333, 6.435, 1.632)
pt3dadd(28.374, 82.236, 6.402, 1.65)
pt3dadd(28.433, 82.139, 6.369, 1.666)
pt3dadd(28.491, 82.042, 6.335, 1.684)
pt3dadd(28.549, 81.945, 6.302, 1.702)
pt3dadd(28.607, 81.848, 6.269, 1.72)
}
}
proc shape3d_168() {
dend_7[51] { pt3dadd(28.665, 81.751, 6.236, 1.738)
pt3dadd(28.724, 81.654, 6.202, 1.754)
pt3dadd(28.782, 81.557, 6.169, 1.772)
pt3dadd(28.827, 81.468, 6.115, 1.76)
pt3dadd(28.872, 81.379, 6.059, 1.744)
pt3dadd(28.916, 81.29, 6.003, 1.73)
pt3dadd(28.961, 81.201, 5.946, 1.714)
pt3dadd(29.005, 81.112, 5.89, 1.698)
pt3dadd(29.05, 81.024, 5.834, 1.684)
pt3dadd(29.094, 80.935, 5.778, 1.668)
pt3dadd(29.138, 80.846, 5.722, 1.654)
pt3dadd(29.183, 80.757, 5.665, 1.638)
pt3dadd(29.227, 80.668, 5.609, 1.622)
}
dend_7[52] {pt3dclear()
pt3dadd(29.227, 80.668, 5.609, 1.622)
pt3dadd(29.233, 80.709, 5.604, 1.616)
pt3dadd(29.267, 80.624, 5.566, 1.494)
pt3dadd(29.301, 80.54, 5.528, 1.372)
pt3dadd(29.335, 80.456, 5.49, 1.25)
pt3dadd(29.369, 80.371, 5.453, 1.13)
pt3dadd(29.403, 80.287, 5.415, 1.008)
pt3dadd(29.436, 80.203, 5.377, 0.886)
pt3dadd(29.47, 80.118, 5.339, 0.764)
pt3dadd(29.504, 80.034, 5.301, 0.642)
pt3dadd(29.538, 79.95, 5.264, 0.52)
pt3dadd(29.57, 79.864, 5.229, 0.418)
pt3dadd(29.594, 79.77, 5.213, 0.418)
pt3dadd(29.618, 79.677, 5.196, 0.416)
pt3dadd(29.642, 79.583, 5.18, 0.416)
pt3dadd(29.665, 79.489, 5.163, 0.414)
pt3dadd(29.689, 79.396, 5.147, 0.414)
pt3dadd(29.691, 79.419, 5.145, 0.414)
pt3dadd(29.715, 79.325, 5.129, 0.412)
pt3dadd(29.739, 79.231, 5.112, 0.412)
pt3dadd(29.762, 79.138, 5.096, 0.41)
pt3dadd(29.786, 79.044, 5.079, 0.41)
pt3dadd(29.814, 78.951, 5.065, 0.412)
pt3dadd(29.863, 78.864, 5.061, 0.43)
pt3dadd(29.912, 78.776, 5.057, 0.448)
pt3dadd(29.96, 78.689, 5.052, 0.466)
pt3dadd(30.009, 78.601, 5.048, 0.486)
pt3dadd(30.058, 78.514, 5.044, 0.504)
pt3dadd(30.106, 78.426, 5.039, 0.522)
pt3dadd(30.155, 78.339, 5.035, 0.54)
pt3dadd(30.204, 78.251, 5.031, 0.558)
pt3dadd(30.252, 78.163, 5.027, 0.576)
pt3dadd(30.302, 78.076, 5.023, 0.588)
pt3dadd(30.353, 77.989, 5.021, 0.578)
pt3dadd(30.403, 77.903, 5.02, 0.57)
pt3dadd(30.454, 77.816, 5.018, 0.562)
pt3dadd(30.505, 77.73, 5.016, 0.552)
pt3dadd(30.556, 77.643, 5.014, 0.544)
pt3dadd(30.607, 77.556, 5.013, 0.536)
pt3dadd(30.658, 77.47, 5.011, 0.526)
pt3dadd(30.709, 77.383, 5.009, 0.518)
pt3dadd(30.76, 77.297, 5.007, 0.51)
pt3dadd(30.811, 77.21, 5.006, 0.496)
pt3dadd(30.862, 77.123, 5.004, 0.468)
pt3dadd(30.912, 77.037, 5.002, 0.44)
pt3dadd(30.963, 76.95, 5, 0.412)
pt3dadd(31.014, 76.863, 4.998, 0.384)
pt3dadd(31.064, 76.776, 4.997, 0.356)
pt3dadd(31.115, 76.69, 4.995, 0.328)
pt3dadd(31.166, 76.603, 4.993, 0.302)
pt3dadd(31.216, 76.516, 4.991, 0.274)
pt3dadd(31.267, 76.43, 4.99, 0.246)
pt3dadd(31.322, 76.345, 4.988, 0.226)
pt3dadd(31.386, 76.265, 4.986, 0.226)
pt3dadd(31.449, 76.185, 4.984, 0.226)
pt3dadd(31.513, 76.105, 4.983, 0.226)
pt3dadd(31.577, 76.025, 4.981, 0.226)
pt3dadd(31.641, 75.945, 4.979, 0.226)
pt3dadd(31.705, 75.865, 4.977, 0.226)
pt3dadd(31.769, 75.786, 4.975, 0.226)
pt3dadd(31.833, 75.706, 4.974, 0.226)
pt3dadd(31.897, 75.626, 4.972, 0.226)
pt3dadd(31.956, 75.544, 4.97, 0.226)
pt3dadd(32.006, 75.456, 4.968, 0.226)
pt3dadd(32.055, 75.369, 4.967, 0.226)
pt3dadd(32.104, 75.282, 4.965, 0.226)
pt3dadd(32.154, 75.195, 4.963, 0.226)
pt3dadd(32.203, 75.107, 4.961, 0.226)
pt3dadd(32.252, 75.02, 4.959, 0.226)
pt3dadd(32.302, 74.933, 4.957, 0.226)
pt3dadd(32.351, 74.845, 4.956, 0.226)
pt3dadd(32.4, 74.758, 4.954, 0.226)
pt3dadd(32.452, 74.672, 4.952, 0.228)
pt3dadd(32.509, 74.588, 4.95, 0.238)
pt3dadd(32.566, 74.504, 4.948, 0.248)
pt3dadd(32.623, 74.421, 4.946, 0.258)
pt3dadd(32.625, 74.444, 4.945, 0.258)
pt3dadd(32.682, 74.36, 4.943, 0.268)
pt3dadd(32.739, 74.276, 4.941, 0.278)
pt3dadd(32.796, 74.193, 4.939, 0.288)
pt3dadd(32.853, 74.109, 4.937, 0.298)
pt3dadd(32.91, 74.025, 4.935, 0.308)
pt3dadd(32.967, 73.941, 4.933, 0.318)
pt3dadd(33.025, 73.858, 4.932, 0.328)
pt3dadd(33.085, 73.776, 4.93, 0.342)
pt3dadd(33.145, 73.694, 4.928, 0.354)
pt3dadd(33.205, 73.612, 4.926, 0.366)
pt3dadd(33.265, 73.53, 4.924, 0.38)
pt3dadd(33.325, 73.448, 4.922, 0.392)
pt3dadd(33.385, 73.365, 4.92, 0.406)
pt3dadd(33.445, 73.283, 4.918, 0.418)
pt3dadd(33.505, 73.201, 4.916, 0.43)
pt3dadd(33.565, 73.119, 4.914, 0.444)
pt3dadd(33.62, 73.035, 4.912, 0.452)
pt3dadd(33.667, 72.946, 4.91, 0.452)
pt3dadd(33.714, 72.858, 4.908, 0.452)
pt3dadd(33.76, 72.769, 4.906, 0.452)
pt3dadd(33.806, 72.681, 4.904, 0.452)
pt3dadd(33.853, 72.592, 4.902, 0.452)
pt3dadd(33.899, 72.504, 4.9, 0.452)
pt3dadd(33.946, 72.416, 4.898, 0.452)
pt3dadd(33.992, 72.327, 4.896, 0.452)
pt3dadd(34.039, 72.239, 4.893, 0.452)
pt3dadd(34.091, 72.153, 4.891, 0.452)
pt3dadd(34.154, 72.072, 4.889, 0.452)
pt3dadd(34.217, 71.992, 4.886, 0.452)
pt3dadd(34.28, 71.911, 4.884, 0.452)
pt3dadd(34.343, 71.831, 4.882, 0.452)
pt3dadd(34.405, 71.751, 4.879, 0.452)
pt3dadd(34.468, 71.67, 4.877, 0.452)
pt3dadd(34.531, 71.589, 4.874, 0.452)
pt3dadd(34.594, 71.509, 4.872, 0.452)
pt3dadd(34.657, 71.428, 4.87, 0.452)
pt3dadd(34.716, 71.346, 4.867, 0.452)
pt3dadd(34.768, 71.26, 4.864, 0.452)
pt3dadd(34.821, 71.174, 4.861, 0.452)
pt3dadd(34.874, 71.088, 4.858, 0.452)
pt3dadd(34.926, 71.002, 4.855, 0.452)
pt3dadd(34.979, 70.917, 4.852, 0.452)
pt3dadd(35.031, 70.831, 4.849, 0.452)
pt3dadd(35.084, 70.745, 4.846, 0.452)
pt3dadd(35.136, 70.659, 4.843, 0.452)
pt3dadd(35.189, 70.573, 4.84, 0.452)
pt3dadd(35.241, 70.487, 4.837, 0.45)
pt3dadd(35.292, 70.401, 4.833, 0.442)
pt3dadd(35.343, 70.314, 4.829, 0.436)
pt3dadd(35.394, 70.228, 4.825, 0.43)
pt3dadd(35.446, 70.141, 4.821, 0.424)
pt3dadd(35.497, 70.055, 4.817, 0.418)
pt3dadd(35.548, 69.968, 4.813, 0.41)
pt3dadd(35.6, 69.882, 4.809, 0.404)
pt3dadd(35.651, 69.795, 4.805, 0.398)
pt3dadd(35.702, 69.709, 4.801, 0.392)
pt3dadd(35.757, 69.624, 4.797, 0.382)
pt3dadd(35.817, 69.542, 4.791, 0.364)
pt3dadd(35.877, 69.46, 4.786, 0.348)
pt3dadd(35.936, 69.378, 4.781, 0.332)
pt3dadd(35.996, 69.296, 4.776, 0.316)
pt3dadd(36.056, 69.214, 4.771, 0.3)
pt3dadd(36.116, 69.132, 4.765, 0.284)
pt3dadd(36.175, 69.049, 4.76, 0.268)
pt3dadd(36.235, 68.967, 4.755, 0.252)
pt3dadd(36.295, 68.885, 4.75, 0.236)
pt3dadd(36.347, 68.799, 4.742, 0.226)
pt3dadd(36.389, 68.71, 4.732, 0.226)
pt3dadd(36.431, 68.62, 4.721, 0.226)
pt3dadd(36.473, 68.53, 4.711, 0.226)
pt3dadd(36.515, 68.441, 4.701, 0.226)
pt3dadd(36.556, 68.351, 4.691, 0.226)
pt3dadd(36.598, 68.261, 4.68, 0.226)
pt3dadd(36.64, 68.171, 4.67, 0.226)
pt3dadd(36.682, 68.082, 4.66, 0.226)
pt3dadd(36.724, 67.992, 4.649, 0.226)
pt3dadd(36.763, 67.902, 4.636, 0.242)
pt3dadd(36.798, 67.811, 4.619, 0.28)
pt3dadd(36.834, 67.72, 4.603, 0.316)
pt3dadd(36.836, 67.743, 4.601, 0.316)
pt3dadd(36.871, 67.652, 4.584, 0.354)
pt3dadd(36.906, 67.561, 4.568, 0.392)
pt3dadd(36.941, 67.47, 4.551, 0.428)
pt3dadd(36.977, 67.379, 4.534, 0.466)
pt3dadd(37.012, 67.288, 4.517, 0.504)
pt3dadd(37.047, 67.197, 4.501, 0.54)
pt3dadd(37.082, 67.107, 4.484, 0.578)
pt3dadd(37.128, 67.026, 4.453, 0.586)
pt3dadd(37.186, 66.96, 4.404, 0.558)
pt3dadd(37.245, 66.893, 4.355, 0.53)
pt3dadd(37.304, 66.827, 4.306, 0.504)
pt3dadd(37.362, 66.761, 4.258, 0.476)
pt3dadd(37.421, 66.694, 4.209, 0.448)
pt3dadd(37.479, 66.628, 4.16, 0.42)
pt3dadd(37.538, 66.561, 4.111, 0.392)
pt3dadd(37.597, 66.495, 4.062, 0.364)
pt3dadd(37.655, 66.428, 4.013, 0.336)
pt3dadd(37.71, 66.358, 3.966, 0.32)
pt3dadd(37.762, 66.285, 3.921, 0.31)
pt3dadd(37.815, 66.212, 3.876, 0.3)
pt3dadd(37.867, 66.14, 3.83, 0.29)
pt3dadd(37.919, 66.067, 3.785, 0.28)
pt3dadd(37.972, 65.995, 3.74, 0.27)
pt3dadd(38.024, 65.922, 3.694, 0.26)
pt3dadd(38.077, 65.849, 3.649, 0.25)
pt3dadd(38.129, 65.777, 3.604, 0.24)
pt3dadd(38.181, 65.704, 3.559, 0.228)
pt3dadd(38.226, 65.629, 3.512, 0.226)
pt3dadd(38.228, 65.652, 3.51, 0.226)
pt3dadd(38.269, 65.576, 3.462, 0.226)
}
}
proc shape3d_169() {
dend_7[52] { pt3dadd(38.31, 65.5, 3.415, 0.226)
pt3dadd(38.351, 65.423, 3.367, 0.226)
pt3dadd(38.392, 65.347, 3.319, 0.226)
pt3dadd(38.433, 65.271, 3.272, 0.226)
pt3dadd(38.474, 65.195, 3.224, 0.226)
pt3dadd(38.515, 65.118, 3.176, 0.226)
pt3dadd(38.556, 65.042, 3.129, 0.226)
pt3dadd(38.597, 64.966, 3.081, 0.226)
pt3dadd(38.643, 64.888, 3.04, 0.232)
pt3dadd(38.69, 64.809, 3, 0.238)
pt3dadd(38.738, 64.731, 2.961, 0.246)
pt3dadd(38.785, 64.652, 2.922, 0.254)
pt3dadd(38.833, 64.573, 2.883, 0.26)
pt3dadd(38.88, 64.495, 2.844, 0.268)
pt3dadd(38.928, 64.416, 2.805, 0.276)
pt3dadd(38.975, 64.337, 2.766, 0.282)
pt3dadd(39.023, 64.259, 2.727, 0.29)
pt3dadd(39.07, 64.18, 2.688, 0.296)
pt3dadd(39.128, 64.101, 2.662, 0.31)
pt3dadd(39.188, 64.022, 2.639, 0.326)
pt3dadd(39.248, 63.943, 2.615, 0.342)
pt3dadd(39.308, 63.865, 2.592, 0.358)
pt3dadd(39.368, 63.786, 2.568, 0.372)
pt3dadd(39.428, 63.707, 2.545, 0.388)
pt3dadd(39.488, 63.628, 2.522, 0.404)
pt3dadd(39.548, 63.549, 2.498, 0.418)
pt3dadd(39.608, 63.47, 2.475, 0.434)
pt3dadd(39.668, 63.391, 2.451, 0.45)
pt3dadd(39.739, 63.318, 2.437, 0.452)
pt3dadd(39.812, 63.245, 2.424, 0.452)
pt3dadd(39.886, 63.172, 2.411, 0.452)
pt3dadd(39.959, 63.099, 2.397, 0.452)
pt3dadd(40.032, 63.027, 2.384, 0.452)
pt3dadd(40.105, 62.954, 2.371, 0.452)
pt3dadd(40.178, 62.881, 2.358, 0.452)
pt3dadd(40.251, 62.808, 2.345, 0.452)
pt3dadd(40.325, 62.736, 2.332, 0.452)
pt3dadd(40.398, 62.663, 2.319, 0.452)
pt3dadd(40.463, 62.585, 2.308, 0.452)
pt3dadd(40.527, 62.505, 2.298, 0.452)
pt3dadd(40.591, 62.426, 2.288, 0.452)
pt3dadd(40.655, 62.347, 2.277, 0.452)
pt3dadd(40.719, 62.268, 2.267, 0.452)
pt3dadd(40.783, 62.188, 2.257, 0.452)
pt3dadd(40.848, 62.109, 2.246, 0.452)
pt3dadd(40.912, 62.03, 2.236, 0.452)
pt3dadd(40.976, 61.95, 2.226, 0.452)
pt3dadd(41.04, 61.871, 2.216, 0.452)
pt3dadd(41.1, 61.79, 2.206, 0.448)
pt3dadd(41.16, 61.708, 2.196, 0.444)
pt3dadd(41.219, 61.626, 2.187, 0.438)
pt3dadd(41.279, 61.544, 2.177, 0.434)
pt3dadd(41.339, 61.462, 2.168, 0.43)
pt3dadd(41.399, 61.38, 2.158, 0.424)
pt3dadd(41.458, 61.299, 2.149, 0.42)
pt3dadd(41.518, 61.217, 2.139, 0.416)
pt3dadd(41.578, 61.135, 2.13, 0.41)
pt3dadd(41.638, 61.053, 2.12, 0.406)
pt3dadd(41.702, 60.974, 2.108, 0.39)
pt3dadd(41.767, 60.896, 2.095, 0.374)
pt3dadd(41.833, 60.818, 2.083, 0.358)
pt3dadd(41.898, 60.74, 2.07, 0.342)
pt3dadd(41.963, 60.661, 2.057, 0.326)
pt3dadd(42.028, 60.583, 2.045, 0.31)
pt3dadd(42.093, 60.505, 2.032, 0.292)
pt3dadd(42.159, 60.427, 2.02, 0.276)
pt3dadd(42.224, 60.348, 2.007, 0.26)
pt3dadd(42.289, 60.27, 1.994, 0.244)
pt3dadd(42.339, 60.191, 1.96, 0.24)
pt3dadd(42.388, 60.112, 1.923, 0.238)
pt3dadd(42.436, 60.033, 1.886, 0.238)
pt3dadd(42.484, 59.953, 1.849, 0.236)
pt3dadd(42.533, 59.874, 1.811, 0.234)
pt3dadd(42.581, 59.795, 1.774, 0.232)
pt3dadd(42.63, 59.716, 1.737, 0.23)
pt3dadd(42.678, 59.636, 1.7, 0.23)
pt3dadd(42.726, 59.557, 1.663, 0.228)
pt3dadd(42.775, 59.478, 1.626, 0.226)
pt3dadd(42.835, 59.402, 1.594, 0.226)
pt3dadd(42.896, 59.327, 1.563, 0.226)
pt3dadd(42.957, 59.251, 1.533, 0.226)
pt3dadd(43.019, 59.176, 1.502, 0.226)
pt3dadd(43.08, 59.101, 1.471, 0.226)
pt3dadd(43.141, 59.025, 1.44, 0.226)
pt3dadd(43.203, 58.95, 1.409, 0.226)
pt3dadd(43.264, 58.874, 1.378, 0.226)
pt3dadd(43.325, 58.799, 1.348, 0.226)
pt3dadd(43.387, 58.724, 1.317, 0.226)
pt3dadd(43.456, 58.651, 1.291, 0.226)
pt3dadd(43.525, 58.579, 1.265, 0.226)
pt3dadd(43.594, 58.506, 1.24, 0.226)
pt3dadd(43.663, 58.434, 1.214, 0.226)
pt3dadd(43.732, 58.362, 1.189, 0.226)
pt3dadd(43.801, 58.289, 1.163, 0.226)
pt3dadd(43.87, 58.217, 1.137, 0.226)
pt3dadd(43.939, 58.144, 1.112, 0.226)
pt3dadd(44.008, 58.072, 1.086, 0.226)
pt3dadd(44.077, 58, 1.061, 0.226)
pt3dadd(43.97, 57.973, 1.059, 0.32)
pt3dadd(43.867, 57.939, 1.057, 0.41)
pt3dadd(43.774, 57.891, 1.056, 0.48)
pt3dadd(43.732, 57.808, 1.077, 0.568)
pt3dadd(43.728, 57.722, 1.116, 0.672)
pt3dadd(43.752, 57.633, 1.143, 0.776)
pt3dadd(43.81, 57.553, 1.148, 0.846)
pt3dadd(43.904, 57.499, 1.147, 0.85)
pt3dadd(44.012, 57.466, 1.151, 0.828)
pt3dadd(44.091, 57.408, 1.178, 0.804)
pt3dadd(44.157, 57.331, 1.19, 0.798)
pt3dadd(44.222, 57.253, 1.203, 0.792)
pt3dadd(44.287, 57.176, 1.216, 0.786)
pt3dadd(44.353, 57.098, 1.228, 0.782)
pt3dadd(44.429, 57.03, 1.234, 0.778)
pt3dadd(44.52, 56.972, 1.233, 0.778)
pt3dadd(44.611, 56.914, 1.231, 0.778)
pt3dadd(44.702, 56.857, 1.229, 0.778)
pt3dadd(44.793, 56.799, 1.227, 0.778)
pt3dadd(44.87, 56.73, 1.226, 0.784)
pt3dadd(44.932, 56.649, 1.224, 0.794)
pt3dadd(44.994, 56.568, 1.222, 0.802)
pt3dadd(45.057, 56.487, 1.22, 0.812)
pt3dadd(45.119, 56.406, 1.219, 0.822)
pt3dadd(45.18, 56.325, 1.217, 0.83)
pt3dadd(45.238, 56.242, 1.215, 0.836)
pt3dadd(45.297, 56.159, 1.213, 0.84)
pt3dadd(45.357, 56.077, 1.212, 0.846)
pt3dadd(45.415, 55.994, 1.21, 0.85)
pt3dadd(45.476, 55.913, 1.208, 0.854)
pt3dadd(45.551, 55.84, 1.206, 0.854)
pt3dadd(45.625, 55.767, 1.205, 0.854)
pt3dadd(45.699, 55.694, 1.203, 0.854)
pt3dadd(45.773, 55.621, 1.201, 0.854)
pt3dadd(45.843, 55.545, 1.2, 0.852)
pt3dadd(45.886, 55.455, 1.198, 0.838)
pt3dadd(45.93, 55.366, 1.196, 0.824)
pt3dadd(45.974, 55.276, 1.194, 0.81)
pt3dadd(46.017, 55.187, 1.193, 0.796)
pt3dadd(46.061, 55.097, 1.191, 0.782)
pt3dadd(46.078, 55.003, 1.186, 0.758)
pt3dadd(46.085, 54.906, 1.18, 0.732)
pt3dadd(46.092, 54.809, 1.175, 0.704)
pt3dadd(46.135, 54.731, 1.133, 0.638)
pt3dadd(46.178, 54.653, 1.091, 0.576)
pt3dadd(46.198, 54.561, 1.064, 0.552)
pt3dadd(46.218, 54.469, 1.037, 0.53)
pt3dadd(46.223, 54.438, 0.951, 0.536)
pt3dadd(46.225, 54.414, 0.857, 0.548)
pt3dadd(46.227, 54.353, 0.795, 0.572)
pt3dadd(46.23, 54.264, 0.756, 0.604)
pt3dadd(46.232, 54.176, 0.717, 0.638)
pt3dadd(46.234, 54.088, 0.677, 0.67)
pt3dadd(46.236, 53.993, 0.666, 0.716)
pt3dadd(46.238, 53.896, 0.665, 0.766)
pt3dadd(46.241, 53.8, 0.663, 0.816)
pt3dadd(46.243, 53.703, 0.661, 0.886)
pt3dadd(46.245, 53.606, 0.659, 0.904)
pt3dadd(46.247, 53.509, 0.658, 0.904)
pt3dadd(46.249, 53.412, 0.656, 0.904)
pt3dadd(46.252, 53.315, 0.654, 0.904)
pt3dadd(46.254, 53.218, 0.652, 0.904)
pt3dadd(46.256, 53.121, 0.651, 0.904)
pt3dadd(46.258, 53.024, 0.649, 0.904)
pt3dadd(46.26, 52.927, 0.647, 0.872)
pt3dadd(46.263, 52.83, 0.645, 0.83)
pt3dadd(46.265, 52.733, 0.644, 0.788)
pt3dadd(46.292, 52.64, 0.642, 0.748)
pt3dadd(46.327, 52.547, 0.64, 0.706)
pt3dadd(46.358, 52.457, 0.626, 0.662)
pt3dadd(46.379, 52.371, 0.587, 0.614)
pt3dadd(46.396, 52.295, 0.536, 0.578)
pt3dadd(46.398, 52.25, 0.452, 0.578)
pt3dadd(46.403, 52.2, 0.375, 0.578)
pt3dadd(46.425, 52.105, 0.362, 0.578)
pt3dadd(46.447, 52.011, 0.349, 0.578)
pt3dadd(46.469, 51.916, 0.336, 0.578)
pt3dadd(46.492, 51.822, 0.324, 0.578)
pt3dadd(46.509, 51.726, 0.323, 0.588)
pt3dadd(46.525, 51.63, 0.321, 0.598)
pt3dadd(46.536, 51.533, 0.319, 0.592)
pt3dadd(46.538, 51.438, 0.305, 0.578)
pt3dadd(46.54, 51.346, 0.276, 0.578)
pt3dadd(46.542, 51.254, 0.247, 0.578)
pt3dadd(46.569, 51.16, 0.231, 0.588)
pt3dadd(46.594, 51.067, 0.214, 0.6)
pt3dadd(46.674, 51.009, 0.209, 0.628)
pt3dadd(46.774, 50.964, 0.207, 0.662)
pt3dadd(46.857, 50.9, 0.205, 0.678)
pt3dadd(46.859, 50.923, 0.203, 0.678)
pt3dadd(46.861, 50.946, 0.202, 0.678)
}
dend_7[53] {pt3dclear()
pt3dadd(29.227, 80.668, 5.609, 1.622)
pt3dadd(29.299, 80.694, 5.617, 1.568)
pt3dadd(29.415, 80.683, 5.629, 1.476)
pt3dadd(29.531, 80.671, 5.642, 1.384)
pt3dadd(29.646, 80.66, 5.654, 1.292)
pt3dadd(29.762, 80.649, 5.666, 1.2)
pt3dadd(29.878, 80.638, 5.678, 1.108)
pt3dadd(29.994, 80.626, 5.69, 1.016)
pt3dadd(30.11, 80.615, 5.702, 0.924)
pt3dadd(30.223, 80.631, 5.677, 0.904)
pt3dadd(30.336, 80.654, 5.64, 0.904)
}
}
proc shape3d_170() {
dend_7[53] { pt3dadd(30.449, 80.677, 5.603, 0.904)
pt3dadd(30.562, 80.7, 5.567, 0.904)
pt3dadd(30.675, 80.723, 5.53, 0.904)
pt3dadd(30.786, 80.746, 5.489, 0.904)
pt3dadd(30.891, 80.769, 5.439, 0.904)
pt3dadd(30.893, 80.792, 5.44, 0.904)
pt3dadd(30.999, 80.815, 5.39, 0.904)
pt3dadd(31, 80.838, 5.391, 0.904)
pt3dadd(31.106, 80.862, 5.342, 0.904)
pt3dadd(31.211, 80.885, 5.292, 0.904)
pt3dadd(31.318, 80.908, 5.244, 0.904)
pt3dadd(31.425, 80.931, 5.197, 0.904)
pt3dadd(31.533, 80.954, 5.15, 0.904)
pt3dadd(31.64, 80.977, 5.104, 0.904)
pt3dadd(31.641, 81, 5.104, 0.904)
pt3dadd(31.749, 81.023, 5.058, 0.904)
pt3dadd(31.856, 81.044, 5.011, 0.904)
pt3dadd(31.964, 81.041, 4.971, 0.904)
pt3dadd(32.073, 81.038, 4.931, 0.904)
pt3dadd(32.181, 81.035, 4.891, 0.904)
pt3dadd(32.289, 81.032, 4.851, 0.904)
pt3dadd(32.403, 81.042, 4.826, 0.904)
pt3dadd(32.524, 81.065, 4.818, 0.904)
pt3dadd(32.646, 81.088, 4.811, 0.904)
pt3dadd(32.76, 81.098, 4.783, 0.904)
pt3dadd(32.871, 81.102, 4.746, 0.904)
pt3dadd(32.974, 81.09, 4.702, 0.904)
pt3dadd(33.07, 81.069, 4.654, 0.904)
pt3dadd(33.146, 81.083, 4.579, 0.904)
pt3dadd(33.215, 81.106, 4.498, 0.904)
pt3dadd(33.281, 81.129, 4.414, 0.904)
pt3dadd(33.345, 81.152, 4.329, 0.904)
pt3dadd(33.409, 81.175, 4.244, 0.904)
pt3dadd(33.473, 81.198, 4.159, 0.904)
pt3dadd(33.508, 81.222, 4.064, 0.904)
pt3dadd(33.543, 81.245, 3.968, 0.904)
pt3dadd(33.559, 81.246, 3.873, 0.904)
pt3dadd(33.561, 81.231, 3.779, 0.904)
pt3dadd(33.562, 81.217, 3.684, 0.904)
pt3dadd(33.592, 81.189, 3.605, 0.904)
pt3dadd(33.663, 81.143, 3.548, 0.904)
pt3dadd(33.763, 81.143, 3.508, 0.904)
pt3dadd(33.879, 81.166, 3.477, 0.904)
pt3dadd(33.994, 81.189, 3.446, 0.904)
pt3dadd(34.107, 81.203, 3.412, 0.904)
pt3dadd(34.219, 81.206, 3.375, 0.904)
pt3dadd(34.299, 81.178, 3.33, 0.904)
pt3dadd(34.339, 81.108, 3.276, 0.904)
pt3dadd(34.379, 81.039, 3.222, 0.904)
pt3dadd(34.407, 81.015, 3.134, 0.904)
pt3dadd(34.436, 80.991, 3.045, 0.904)
pt3dadd(34.489, 81.007, 2.956, 0.904)
pt3dadd(34.54, 81.004, 2.868, 0.904)
pt3dadd(34.591, 81.001, 2.78, 0.904)
pt3dadd(34.641, 80.999, 2.691, 0.904)
pt3dadd(34.692, 80.996, 2.603, 0.904)
pt3dadd(34.759, 80.986, 2.526, 0.904)
pt3dadd(34.836, 80.971, 2.456, 0.904)
pt3dadd(34.914, 80.956, 2.386, 0.904)
pt3dadd(34.991, 80.941, 2.315, 0.904)
pt3dadd(34.993, 80.964, 2.316, 0.904)
pt3dadd(34.995, 80.988, 2.316, 0.904)
pt3dadd(35.063, 80.965, 2.244, 0.904)
pt3dadd(35.065, 80.988, 2.245, 0.904)
pt3dadd(35.121, 80.953, 2.171, 0.904)
pt3dadd(35.178, 80.919, 2.096, 0.904)
pt3dadd(35.234, 80.884, 2.022, 0.904)
pt3dadd(35.289, 80.859, 1.944, 0.904)
pt3dadd(35.34, 80.866, 1.855, 0.904)
pt3dadd(35.392, 80.872, 1.765, 0.904)
pt3dadd(35.443, 80.878, 1.676, 0.904)
pt3dadd(35.495, 80.885, 1.586, 0.904)
pt3dadd(35.565, 80.898, 1.509, 0.904)
pt3dadd(35.66, 80.922, 1.447, 0.904)
pt3dadd(35.662, 80.945, 1.447, 0.678)
pt3dadd(35.663, 80.968, 1.448, 0.678)
pt3dadd(35.665, 80.991, 1.348, 0.682)
pt3dadd(35.667, 81.014, 1.249, 0.686)
pt3dadd(35.668, 81.037, 1.149, 0.688)
pt3dadd(35.67, 81.06, 1.05, 0.692)
pt3dadd(35.672, 81.083, 0.951, 0.696)
pt3dadd(35.673, 81.106, 0.851, 0.7)
pt3dadd(35.675, 81.129, 0.752, 0.704)
pt3dadd(35.677, 81.152, 0.652, 0.712)
pt3dadd(35.678, 81.175, 0.553, 0.72)
pt3dadd(35.68, 81.198, 0.453, 0.728)
pt3dadd(35.702, 81.222, 0.355, 0.738)
pt3dadd(35.704, 81.245, 0.356, 0.738)
pt3dadd(35.726, 81.268, 0.258, 0.748)
pt3dadd(35.785, 81.293, 0.186, 0.748)
pt3dadd(35.899, 81.322, 0.152, 0.738)
pt3dadd(36.001, 81.366, 0.118, 0.726)
pt3dadd(36.029, 81.496, 0.079, 0.714)
pt3dadd(36.06, 81.619, 0.034, 0.702)
pt3dadd(36.105, 81.699, -0.046, 0.694)
pt3dadd(36.15, 81.778, -0.125, 0.686)
pt3dadd(36.203, 81.856, -0.199, 0.678)
pt3dadd(36.315, 81.919, -0.22, 0.678)
pt3dadd(36.426, 81.978, -0.243, 0.678)
pt3dadd(36.513, 82.002, -0.314, 0.688)
pt3dadd(36.599, 82.025, -0.384, 0.696)
pt3dadd(36.673, 82.048, -0.46, 0.708)
pt3dadd(36.709, 82.071, -0.555, 0.728)
pt3dadd(36.743, 82.094, -0.651, 0.75)
pt3dadd(36.796, 82.117, -0.74, 0.856)
pt3dadd(36.798, 82.14, -0.739, 0.856)
pt3dadd(36.893, 82.163, -0.801, 0.904)
pt3dadd(36.989, 82.186, -0.863, 0.95)
pt3dadd(37.067, 82.209, -0.939, 1.008)
pt3dadd(37.144, 82.232, -1.017, 1.068)
pt3dadd(37.24, 82.271, -1.073, 1.11)
pt3dadd(37.344, 82.315, -1.123, 1.148)
pt3dadd(37.432, 82.402, -1.162, 1.178)
pt3dadd(37.514, 82.5, -1.2, 1.206)
pt3dadd(37.546, 82.596, -1.275, 1.196)
pt3dadd(37.577, 82.692, -1.35, 1.188)
pt3dadd(37.609, 82.789, -1.424, 1.18)
pt3dadd(37.63, 82.852, -1.516, 1.17)
pt3dadd(37.651, 82.912, -1.609, 1.158)
pt3dadd(37.686, 82.943, -1.703, 1.142)
pt3dadd(37.726, 82.966, -1.798, 1.126)
pt3dadd(37.765, 82.989, -1.892, 1.11)
pt3dadd(37.767, 83.012, -1.891, 1.11)
pt3dadd(37.852, 83.035, -1.95, 1.098)
pt3dadd(37.964, 83.058, -1.989, 1.088)
pt3dadd(38.08, 83.082, -2.018, 1.06)
pt3dadd(38.18, 83.105, -2.06, 1.028)
pt3dadd(38.253, 83.128, -2.139, 1.022)
pt3dadd(38.327, 83.151, -2.219, 1.018)
pt3dadd(38.401, 83.174, -2.298, 1.012)
pt3dadd(38.475, 83.197, -2.378, 1.008)
pt3dadd(38.523, 83.222, -2.466, 0.992)
pt3dadd(38.539, 83.25, -2.564, 0.962)
pt3dadd(38.556, 83.279, -2.663, 0.932)
pt3dadd(38.605, 83.347, -2.744, 0.894)
pt3dadd(38.659, 83.422, -2.823, 0.852)
pt3dadd(38.72, 83.497, -2.897, 0.794)
pt3dadd(38.793, 83.57, -2.961, 0.75)
pt3dadd(38.899, 83.634, -2.995, 0.736)
pt3dadd(39.008, 83.701, -3.02, 0.74)
pt3dadd(39.12, 83.77, -3.027, 0.774)
pt3dadd(39.211, 83.8, -3.089, 0.802)
pt3dadd(39.301, 83.826, -3.157, 0.828)
pt3dadd(39.39, 83.852, -3.224, 0.854)
pt3dadd(39.479, 83.877, -3.292, 0.878)
pt3dadd(39.568, 83.903, -3.36, 0.906)
pt3dadd(39.658, 83.926, -3.428, 0.952)
pt3dadd(39.747, 83.949, -3.495, 1)
pt3dadd(39.86, 83.972, -3.531, 1.014)
pt3dadd(39.975, 83.995, -3.564, 1.024)
pt3dadd(40.076, 84.018, -3.615, 1.016)
pt3dadd(40.165, 84.042, -3.683, 0.992)
pt3dadd(40.234, 84.065, -3.761, 0.97)
pt3dadd(40.275, 84.088, -3.855, 0.948)
pt3dadd(40.315, 84.111, -3.949, 0.93)
pt3dadd(40.341, 84.134, -4.047, 0.93)
pt3dadd(40.363, 84.155, -4.145, 0.936)
pt3dadd(40.38, 84.173, -4.243, 0.956)
pt3dadd(40.396, 84.191, -4.342, 0.976)
pt3dadd(40.398, 84.214, -4.341, 0.976)
pt3dadd(40.4, 84.237, -4.341, 0.976)
pt3dadd(40.49, 84.222, -4.378, 1.01)
pt3dadd(40.598, 84.198, -4.4, 1.048)
pt3dadd(40.713, 84.18, -4.404, 1.072)
pt3dadd(40.827, 84.163, -4.403, 1.094)
pt3dadd(40.943, 84.149, -4.405, 1.1)
pt3dadd(41.06, 84.138, -4.409, 1.09)
pt3dadd(41.173, 84.124, -4.418, 1.07)
pt3dadd(41.265, 84.09, -4.465, 0.984)
pt3dadd(41.383, 84.105, -4.479, 0.934)
pt3dadd(41.503, 84.123, -4.492, 0.886)
pt3dadd(41.62, 84.124, -4.499, 0.846)
pt3dadd(41.728, 84.093, -4.499, 0.824)
pt3dadd(41.831, 84.056, -4.498, 0.806)
pt3dadd(41.887, 83.972, -4.498, 0.816)
pt3dadd(41.942, 83.888, -4.497, 0.828)
pt3dadd(41.998, 83.804, -4.497, 0.858)
pt3dadd(42.052, 83.719, -4.496, 0.892)
pt3dadd(42.131, 83.653, -4.501, 0.94)
pt3dadd(42.215, 83.596, -4.52, 0.992)
pt3dadd(42.285, 83.535, -4.563, 1.036)
pt3dadd(42.327, 83.456, -4.588, 1.066)
pt3dadd(42.345, 83.361, -4.596, 1.086)
pt3dadd(42.367, 83.269, -4.607, 1.106)
pt3dadd(42.459, 83.233, -4.65, 1.134)
pt3dadd(42.549, 83.189, -4.682, 1.158)
pt3dadd(42.635, 83.127, -4.687, 1.17)
pt3dadd(42.73, 83.082, -4.691, 1.184)
pt3dadd(42.85, 83.09, -4.69, 1.198)
pt3dadd(42.964, 83.078, -4.69, 1.196)
pt3dadd(43.07, 83.04, -4.689, 1.172)
pt3dadd(43.17, 82.996, -4.69, 1.148)
pt3dadd(43.255, 82.935, -4.695, 1.124)
pt3dadd(43.334, 82.885, -4.717, 1.1)
pt3dadd(43.382, 82.881, -4.806, 1.074)
pt3dadd(43.422, 82.861, -4.887, 1.054)
pt3dadd(43.43, 82.783, -4.939, 1.054)
pt3dadd(43.444, 82.704, -4.988, 1.05)
pt3dadd(43.498, 82.624, -5.014, 1.01)
pt3dadd(43.525, 82.545, -5.06, 0.952)
}
}
proc shape3d_171() {
dend_7[53] { pt3dadd(43.547, 82.467, -5.11, 0.888)
pt3dadd(43.551, 82.395, -5.17, 0.818)
pt3dadd(43.553, 82.324, -5.232, 0.748)
pt3dadd(43.587, 82.242, -5.26, 0.692)
pt3dadd(43.634, 82.156, -5.276, 0.644)
pt3dadd(43.717, 82.108, -5.304, 0.628)
pt3dadd(43.818, 82.081, -5.34, 0.628)
pt3dadd(43.926, 82.094, -5.382, 0.642)
pt3dadd(44.025, 82.115, -5.437, 0.656)
pt3dadd(44.097, 82.132, -5.517, 0.668)
pt3dadd(44.171, 82.136, -5.591, 0.682)
pt3dadd(44.172, 82.159, -5.591, 0.682)
pt3dadd(44.251, 82.12, -5.648, 0.696)
pt3dadd(44.344, 82.086, -5.676, 0.708)
pt3dadd(44.453, 82.055, -5.676, 0.72)
pt3dadd(44.547, 82.011, -5.675, 0.734)
pt3dadd(44.603, 81.927, -5.675, 0.756)
pt3dadd(44.659, 81.842, -5.675, 0.778)
pt3dadd(44.701, 81.759, -5.705, 0.778)
pt3dadd(44.744, 81.675, -5.735, 0.778)
pt3dadd(44.786, 81.592, -5.765, 0.778)
pt3dadd(44.889, 81.575, -5.772, 0.778)
pt3dadd(45.008, 81.577, -5.771, 0.778)
pt3dadd(45.123, 81.57, -5.771, 0.76)
pt3dadd(45.223, 81.527, -5.781, 0.696)
pt3dadd(45.327, 81.494, -5.802, 0.678)
pt3dadd(45.432, 81.461, -5.824, 0.662)
pt3dadd(45.537, 81.429, -5.845, 0.646)
pt3dadd(45.642, 81.396, -5.867, 0.628)
pt3dadd(45.761, 81.402, -5.868, 0.526)
pt3dadd(45.882, 81.425, -5.867, 0.502)
pt3dadd(46.004, 81.447, -5.866, 0.53)
pt3dadd(46.125, 81.453, -5.866, 0.606)
pt3dadd(46.239, 81.436, -5.865, 0.628)
pt3dadd(46.352, 81.418, -5.865, 0.61)
pt3dadd(46.47, 81.42, -5.875, 0.626)
pt3dadd(46.568, 81.443, -5.928, 0.7)
pt3dadd(46.604, 81.466, -6.022, 0.794)
pt3dadd(46.612, 81.489, -6.121, 0.858)
pt3dadd(46.614, 81.512, -6.221, 0.894)
pt3dadd(46.615, 81.535, -6.32, 0.89)
pt3dadd(46.637, 81.546, -6.416, 0.876)
pt3dadd(46.674, 81.547, -6.51, 0.872)
pt3dadd(46.71, 81.549, -6.603, 0.866)
pt3dadd(46.747, 81.551, -6.696, 0.86)
pt3dadd(46.783, 81.552, -6.79, 0.856)
pt3dadd(46.854, 81.563, -6.865, 0.854)
pt3dadd(46.947, 81.58, -6.93, 0.854)
pt3dadd(47.027, 81.575, -6.999, 0.862)
pt3dadd(47.095, 81.553, -7.073, 0.876)
pt3dadd(47.197, 81.546, -7.114, 0.888)
pt3dadd(47.309, 81.543, -7.146, 0.9)
pt3dadd(47.406, 81.5, -7.155, 0.896)
pt3dadd(47.495, 81.441, -7.154, 0.884)
pt3dadd(47.597, 81.408, -7.169, 0.89)
pt3dadd(47.707, 81.402, -7.198, 0.92)
pt3dadd(47.82, 81.425, -7.233, 1.018)
pt3dadd(47.939, 81.448, -7.25, 1.094)
pt3dadd(48.061, 81.471, -7.252, 1.126)
pt3dadd(48.183, 81.494, -7.261, 1.108)
pt3dadd(48.297, 81.517, -7.29, 1.044)
pt3dadd(48.299, 81.54, -7.289, 1.044)
pt3dadd(48.387, 81.563, -7.357, 0.938)
pt3dadd(48.388, 81.586, -7.357, 0.938)
pt3dadd(48.437, 81.609, -7.446, 0.842)
pt3dadd(48.457, 81.649, -7.543, 0.72)
pt3dadd(48.458, 81.739, -7.623, 0.63)
pt3dadd(48.46, 81.856, -7.685, 0.624)
pt3dadd(48.462, 81.93, -7.773, 0.658)
pt3dadd(48.463, 81.965, -7.872, 0.678)
pt3dadd(48.465, 81.988, -7.971, 0.678)
pt3dadd(48.466, 82.011, -8.071, 0.678)
pt3dadd(48.468, 82.03, -8.17, 0.678)
pt3dadd(48.477, 82.03, -8.267, 0.678)
pt3dadd(48.533, 81.995, -8.333, 0.678)
pt3dadd(48.637, 81.961, -8.342, 0.678)
pt3dadd(48.738, 81.916, -8.342, 0.702)
pt3dadd(48.805, 81.841, -8.341, 0.784)
pt3dadd(48.839, 81.748, -8.341, 0.894)
pt3dadd(48.886, 81.661, -8.34, 0.95)
pt3dadd(48.997, 81.651, -8.352, 0.926)
pt3dadd(49.115, 81.651, -8.366, 0.892)
pt3dadd(49.117, 81.674, -8.366, 0.892)
pt3dadd(49.206, 81.688, -8.42, 0.858)
pt3dadd(49.276, 81.711, -8.502, 0.824)
pt3dadd(49.331, 81.734, -8.589, 0.79)
pt3dadd(49.395, 81.757, -8.671, 0.8)
pt3dadd(49.479, 81.78, -8.743, 0.836)
pt3dadd(49.545, 81.803, -8.825, 0.876)
pt3dadd(49.593, 81.826, -8.917, 0.92)
pt3dadd(49.653, 81.841, -8.994, 0.964)
pt3dadd(49.765, 81.825, -9.015, 1.014)
pt3dadd(49.879, 81.81, -9.033, 1.058)
pt3dadd(49.995, 81.801, -9.032, 1.078)
pt3dadd(50.112, 81.791, -9.032, 1.1)
pt3dadd(50.203, 81.742, -9.049, 1.114)
pt3dadd(50.284, 81.68, -9.072, 1.128)
pt3dadd(50.332, 81.655, -9.15, 1.13)
pt3dadd(50.39, 81.635, -9.229, 1.13)
pt3dadd(50.427, 81.602, -9.31, 1.116)
pt3dadd(50.434, 81.591, -9.405, 1.064)
pt3dadd(50.454, 81.526, -9.467, 1.01)
pt3dadd(50.476, 81.453, -9.523, 0.958)
pt3dadd(50.511, 81.363, -9.531, 0.914)
pt3dadd(50.548, 81.271, -9.536, 0.872)
pt3dadd(50.562, 81.19, -9.572, 0.832)
pt3dadd(50.564, 81.115, -9.63, 0.798)
pt3dadd(50.566, 81.041, -9.687, 0.762)
pt3dadd(50.568, 80.988, -9.763, 0.736)
pt3dadd(50.569, 80.943, -9.844, 0.712)
pt3dadd(50.571, 80.875, -9.904, 0.684)
pt3dadd(50.572, 80.784, -9.934, 0.674)
pt3dadd(50.574, 80.692, -9.961, 0.67)
pt3dadd(50.576, 80.6, -9.988, 0.666)
pt3dadd(50.577, 80.508, -10.015, 0.662)
pt3dadd(50.579, 80.415, -10.042, 0.656)
pt3dadd(50.586, 80.324, -10.071, 0.652)
pt3dadd(50.612, 80.241, -10.111, 0.652)
pt3dadd(50.64, 80.158, -10.152, 0.652)
pt3dadd(50.667, 80.074, -10.192, 0.652)
pt3dadd(50.695, 79.991, -10.232, 0.652)
pt3dadd(50.745, 79.913, -10.26, 0.656)
pt3dadd(50.815, 79.839, -10.276, 0.662)
pt3dadd(50.884, 79.765, -10.293, 0.666)
pt3dadd(50.953, 79.691, -10.309, 0.672)
pt3dadd(51.023, 79.617, -10.326, 0.678)
pt3dadd(51.062, 79.531, -10.354, 0.688)
pt3dadd(51.1, 79.446, -10.382, 0.7)
pt3dadd(51.139, 79.36, -10.41, 0.71)
pt3dadd(51.178, 79.274, -10.438, 0.722)
pt3dadd(51.206, 79.197, -10.481, 0.728)
pt3dadd(51.214, 79.135, -10.551, 0.728)
pt3dadd(51.232, 79.065, -10.601, 0.724)
pt3dadd(51.276, 78.976, -10.606, 0.714)
pt3dadd(51.32, 78.887, -10.61, 0.704)
pt3dadd(51.39, 78.811, -10.609, 0.716)
pt3dadd(51.46, 78.735, -10.609, 0.726)
pt3dadd(51.572, 78.724, -10.608, 0.746)
pt3dadd(51.691, 78.72, -10.608, 0.766)
pt3dadd(51.773, 78.691, -10.629, 0.784)
pt3dadd(51.795, 78.619, -10.687, 0.8)
pt3dadd(51.817, 78.547, -10.745, 0.816)
pt3dadd(51.845, 78.478, -10.804, 0.826)
pt3dadd(51.9, 78.425, -10.866, 0.812)
pt3dadd(51.942, 78.378, -10.938, 0.788)
pt3dadd(51.948, 78.306, -10.992, 0.728)
pt3dadd(51.97, 78.213, -11.006, 0.704)
pt3dadd(52.025, 78.144, -11.042, 0.724)
pt3dadd(52.089, 78.153, -11.123, 0.734)
pt3dadd(52.155, 78.21, -11.201, 0.654)
pt3dadd(52.193, 78.324, -11.258, 0.56)
pt3dadd(52.198, 78.455, -11.3, 0.504)
}
dend_7[54] {pt3dclear()
pt3dadd(29.227, 80.668, 5.609, 1.622)
pt3dadd(29.171, 80.676, 5.592, 1.594)
pt3dadd(29.064, 80.648, 5.559, 1.534)
pt3dadd(28.957, 80.62, 5.525, 1.474)
pt3dadd(28.85, 80.592, 5.491, 1.414)
pt3dadd(28.743, 80.564, 5.457, 1.356)
pt3dadd(28.636, 80.536, 5.423, 1.296)
pt3dadd(28.529, 80.509, 5.389, 1.236)
pt3dadd(28.423, 80.481, 5.356, 1.178)
pt3dadd(28.316, 80.453, 5.322, 1.118)
pt3dadd(28.209, 80.425, 5.288, 1.058)
pt3dadd(28.207, 80.439, 5.288, 1.058)
pt3dadd(28.1, 80.411, 5.254, 0.998)
pt3dadd(27.993, 80.383, 5.22, 0.94)
pt3dadd(27.886, 80.348, 5.2, 0.904)
pt3dadd(27.781, 80.301, 5.2, 0.904)
pt3dadd(27.684, 80.245, 5.2, 0.904)
pt3dadd(27.682, 80.259, 5.2, 0.904)
pt3dadd(27.619, 80.17, 5.2, 0.904)
pt3dadd(27.558, 80.081, 5.199, 0.904)
pt3dadd(27.556, 79.992, 5.148, 0.904)
pt3dadd(27.554, 79.902, 5.097, 0.904)
pt3dadd(27.551, 79.848, 5.017, 0.904)
pt3dadd(27.549, 79.802, 4.931, 0.904)
pt3dadd(27.484, 79.758, 4.879, 0.904)
pt3dadd(27.383, 79.717, 4.847, 0.904)
pt3dadd(27.282, 79.675, 4.815, 0.904)
pt3dadd(27.206, 79.612, 4.777, 0.904)
pt3dadd(27.153, 79.53, 4.734, 0.904)
pt3dadd(27.075, 79.503, 4.674, 0.904)
pt3dadd(26.966, 79.501, 4.63, 0.904)
pt3dadd(26.858, 79.498, 4.586, 0.904)
pt3dadd(26.749, 79.495, 4.541, 0.904)
pt3dadd(26.641, 79.493, 4.497, 0.904)
pt3dadd(26.532, 79.489, 4.455, 0.904)
pt3dadd(26.42, 79.484, 4.417, 0.904)
pt3dadd(26.315, 79.484, 4.371, 0.904)
pt3dadd(26.232, 79.498, 4.298, 0.904)
pt3dadd(26.154, 79.512, 4.221, 0.904)
pt3dadd(26.119, 79.526, 4.125, 0.904)
pt3dadd(26.083, 79.54, 4.029, 0.904)
pt3dadd(26.058, 79.528, 3.935, 0.904)
pt3dadd(26.038, 79.505, 3.841, 0.904)
pt3dadd(26.036, 79.519, 3.841, 0.904)
pt3dadd(25.977, 79.499, 3.764, 0.904)
pt3dadd(25.901, 79.485, 3.692, 0.904)
pt3dadd(25.854, 79.48, 3.601, 0.904)
pt3dadd(25.817, 79.465, 3.51, 0.904)
}
}
proc shape3d_172() {
dend_7[54] { pt3dadd(25.809, 79.423, 3.422, 0.904)
pt3dadd(25.795, 79.378, 3.337, 0.904)
pt3dadd(25.739, 79.317, 3.273, 0.904)
pt3dadd(25.695, 79.24, 3.228, 0.904)
pt3dadd(25.67, 79.138, 3.213, 0.904)
pt3dadd(25.641, 79.037, 3.198, 0.904)
pt3dadd(25.575, 78.955, 3.171, 0.904)
pt3dadd(25.514, 78.878, 3.129, 0.904)
pt3dadd(25.454, 78.802, 3.083, 0.904)
pt3dadd(25.394, 78.727, 3.038, 0.904)
pt3dadd(25.334, 78.651, 2.992, 0.904)
pt3dadd(25.309, 78.567, 2.942, 0.904)
pt3dadd(25.307, 78.581, 2.942, 0.904)
pt3dadd(25.298, 78.494, 2.889, 0.904)
pt3dadd(25.263, 78.421, 2.83, 0.904)
pt3dadd(25.207, 78.359, 2.767, 0.904)
pt3dadd(25.171, 78.345, 2.677, 0.904)
pt3dadd(25.139, 78.341, 2.581, 0.904)
pt3dadd(25.066, 78.336, 2.509, 0.904)
pt3dadd(24.968, 78.329, 2.452, 0.904)
pt3dadd(24.905, 78.27, 2.404, 0.904)
pt3dadd(24.86, 78.185, 2.361, 0.904)
pt3dadd(24.815, 78.1, 2.318, 0.904)
pt3dadd(24.764, 78.028, 2.263, 0.904)
pt3dadd(24.708, 77.966, 2.2, 0.904)
pt3dadd(24.693, 77.899, 2.129, 0.904)
pt3dadd(24.686, 77.831, 2.056, 0.904)
pt3dadd(24.679, 77.766, 1.982, 0.904)
pt3dadd(24.677, 77.733, 1.89, 0.904)
pt3dadd(24.675, 77.701, 1.798, 0.904)
pt3dadd(24.673, 77.63, 1.731, 0.904)
pt3dadd(24.671, 77.548, 1.671, 0.904)
pt3dadd(24.669, 77.466, 1.611, 0.904)
pt3dadd(24.667, 77.361, 1.6, 0.904)
pt3dadd(24.665, 77.268, 1.555, 0.554)
pt3dadd(24.663, 77.174, 1.511, 0.654)
pt3dadd(24.66, 77.084, 1.461, 0.722)
pt3dadd(24.658, 76.995, 1.411, 0.78)
pt3dadd(24.656, 76.918, 1.347, 0.818)
pt3dadd(24.654, 76.851, 1.274, 0.84)
pt3dadd(24.652, 76.796, 1.193, 0.848)
pt3dadd(24.65, 76.756, 1.104, 0.838)
pt3dadd(24.648, 76.719, 1.013, 0.822)
pt3dadd(24.646, 76.69, 0.92, 0.79)
pt3dadd(24.644, 76.636, 0.84, 0.778)
pt3dadd(24.641, 76.569, 0.766, 0.778)
pt3dadd(24.639, 76.503, 0.692, 0.778)
pt3dadd(24.637, 76.436, 0.618, 0.778)
pt3dadd(24.635, 76.45, 0.618, 0.778)
pt3dadd(24.633, 76.465, 0.618, 0.778)
pt3dadd(24.631, 76.398, 0.544, 0.778)
pt3dadd(24.629, 76.331, 0.47, 0.796)
pt3dadd(24.627, 76.263, 0.397, 0.82)
pt3dadd(24.624, 76.212, 0.314, 0.836)
pt3dadd(24.622, 76.173, 0.225, 0.846)
pt3dadd(24.62, 76.123, 0.141, 0.85)
pt3dadd(24.618, 76.056, 0.068, 0.838)
pt3dadd(24.616, 75.98, 0.007, 0.822)
pt3dadd(24.614, 75.876, -0.01, 0.794)
pt3dadd(24.612, 75.772, -0.027, 0.764)
pt3dadd(24.61, 75.683, -0.073, 0.754)
pt3dadd(24.608, 75.603, -0.135, 0.756)
pt3dadd(24.609, 75.523, -0.196, 0.772)
pt3dadd(24.609, 75.442, -0.257, 0.788)
pt3dadd(24.61, 75.361, -0.318, 0.802)
pt3dadd(24.61, 75.28, -0.379, 0.818)
pt3dadd(24.617, 75.203, -0.443, 0.84)
pt3dadd(24.639, 75.136, -0.514, 0.88)
pt3dadd(24.661, 75.069, -0.584, 0.92)
pt3dadd(24.684, 75.001, -0.655, 0.96)
pt3dadd(24.706, 74.934, -0.725, 1)
pt3dadd(24.706, 74.872, -0.802, 1.066)
pt3dadd(24.704, 74.811, -0.881, 1.138)
pt3dadd(24.702, 74.724, -0.929, 1.188)
pt3dadd(24.7, 74.627, -0.968, 1.232)
pt3dadd(24.698, 74.527, -0.991, 1.252)
pt3dadd(24.696, 74.421, -0.995, 1.242)
pt3dadd(24.694, 74.315, -0.998, 1.234)
pt3dadd(24.692, 74.329, -0.998, 1.234)
pt3dadd(24.69, 74.223, -1, 1.212)
pt3dadd(24.687, 74.118, -1, 1.178)
pt3dadd(24.685, 74.012, -1, 1.144)
pt3dadd(24.683, 73.906, -1, 1.088)
pt3dadd(24.681, 73.8, -1, 1.012)
pt3dadd(24.679, 73.695, -1.009, 0.968)
pt3dadd(24.677, 73.591, -1.026, 0.946)
pt3dadd(24.675, 73.487, -1.042, 0.926)
pt3dadd(24.673, 73.382, -1.059, 0.906)
pt3dadd(24.671, 73.397, -1.059, 0.906)
pt3dadd(24.668, 73.292, -1.075, 0.886)
pt3dadd(24.666, 73.188, -1.092, 0.864)
pt3dadd(24.664, 73.09, -1.123, 0.844)
pt3dadd(24.662, 72.999, -1.17, 0.824)
pt3dadd(24.66, 72.907, -1.218, 0.806)
pt3dadd(24.658, 72.815, -1.265, 0.786)
pt3dadd(24.656, 72.724, -1.312, 0.766)
pt3dadd(24.654, 72.635, -1.363, 0.754)
pt3dadd(24.652, 72.553, -1.423, 0.754)
pt3dadd(24.649, 72.472, -1.484, 0.754)
pt3dadd(24.647, 72.39, -1.544, 0.754)
pt3dadd(24.645, 72.308, -1.604, 0.754)
pt3dadd(24.651, 72.229, -1.665, 0.76)
pt3dadd(24.677, 72.158, -1.732, 0.784)
pt3dadd(24.702, 72.087, -1.798, 0.806)
pt3dadd(24.7, 72.101, -1.798, 0.806)
pt3dadd(24.726, 72.029, -1.864, 0.83)
pt3dadd(24.751, 71.958, -1.93, 0.852)
pt3dadd(24.776, 71.874, -1.983, 0.892)
pt3dadd(24.801, 71.789, -2.036, 0.93)
pt3dadd(24.825, 71.705, -2.088, 0.97)
pt3dadd(24.851, 71.62, -2.14, 1.01)
pt3dadd(24.862, 71.541, -2.2, 1.042)
pt3dadd(24.86, 71.466, -2.267, 1.068)
pt3dadd(24.858, 71.391, -2.335, 1.092)
pt3dadd(24.856, 71.317, -2.402, 1.118)
pt3dadd(24.854, 71.242, -2.469, 1.144)
pt3dadd(24.851, 71.154, -2.516, 1.158)
pt3dadd(24.849, 71.053, -2.546, 1.162)
pt3dadd(24.847, 70.953, -2.576, 1.166)
pt3dadd(24.845, 70.852, -2.606, 1.17)
pt3dadd(24.843, 70.752, -2.635, 1.176)
pt3dadd(24.841, 70.652, -2.665, 1.18)
pt3dadd(24.839, 70.554, -2.702, 1.166)
pt3dadd(24.837, 70.457, -2.739, 1.152)
pt3dadd(24.834, 70.36, -2.776, 1.138)
pt3dadd(24.832, 70.263, -2.813, 1.126)
pt3dadd(24.83, 70.165, -2.851, 1.112)
pt3dadd(24.828, 70.063, -2.869, 1.096)
pt3dadd(24.826, 69.958, -2.875, 1.082)
pt3dadd(24.824, 69.852, -2.879, 1.066)
pt3dadd(24.822, 69.746, -2.885, 1.052)
pt3dadd(24.82, 69.64, -2.89, 1.036)
pt3dadd(24.818, 69.535, -2.895, 1.022)
pt3dadd(24.816, 69.429, -2.9, 1.006)
pt3dadd(24.836, 69.337, -2.939, 0.984)
pt3dadd(24.861, 69.246, -2.983, 0.962)
pt3dadd(24.885, 69.156, -3.026, 0.942)
pt3dadd(24.909, 69.065, -3.07, 0.92)
pt3dadd(24.926, 68.97, -3.105, 0.902)
pt3dadd(24.925, 68.866, -3.122, 0.898)
pt3dadd(24.926, 68.762, -3.139, 0.894)
pt3dadd(24.926, 68.658, -3.155, 0.89)
pt3dadd(24.926, 68.554, -3.172, 0.886)
pt3dadd(24.926, 68.45, -3.189, 0.882)
pt3dadd(24.941, 68.348, -3.205, 0.874)
pt3dadd(24.983, 68.253, -3.221, 0.862)
pt3dadd(25.016, 68.157, -3.242, 0.848)
pt3dadd(25.02, 68.059, -3.277, 0.826)
pt3dadd(25.024, 67.961, -3.312, 0.802)
pt3dadd(25.022, 67.871, -3.362, 0.758)
pt3dadd(25.02, 67.782, -3.413, 0.712)
pt3dadd(25.017, 67.722, -3.49, 0.684)
pt3dadd(25.015, 67.668, -3.572, 0.66)
pt3dadd(25.013, 67.591, -3.635, 0.662)
pt3dadd(25.011, 67.503, -3.686, 0.676)
pt3dadd(25.009, 67.414, -3.738, 0.69)
pt3dadd(25.007, 67.326, -3.789, 0.704)
pt3dadd(25.005, 67.22, -3.793, 0.748)
pt3dadd(25.003, 67.114, -3.797, 0.792)
pt3dadd(25.001, 67.008, -3.8, 0.846)
pt3dadd(24.998, 66.902, -3.801, 0.958)
pt3dadd(24.996, 66.917, -3.801, 0.958)
pt3dadd(24.994, 66.811, -3.804, 0.994)
pt3dadd(24.992, 66.705, -3.808, 1.028)
pt3dadd(24.99, 66.602, -3.821, 1.06)
pt3dadd(24.988, 66.505, -3.859, 1.082)
pt3dadd(24.986, 66.409, -3.898, 1.104)
pt3dadd(24.984, 66.323, -3.954, 1.094)
pt3dadd(24.982, 66.239, -4.01, 1.082)
pt3dadd(24.979, 66.178, -4.088, 1.042)
pt3dadd(24.977, 66.125, -4.17, 0.996)
pt3dadd(24.975, 66.139, -4.17, 0.996)
pt3dadd(24.973, 66.054, -4.215, 0.956)
pt3dadd(24.971, 65.952, -4.24, 0.92)
pt3dadd(24.969, 65.85, -4.264, 0.882)
pt3dadd(24.967, 65.747, -4.288, 0.846)
pt3dadd(24.962, 65.643, -4.3, 0.81)
pt3dadd(24.955, 65.537, -4.3, 0.776)
pt3dadd(24.948, 65.432, -4.3, 0.742)
pt3dadd(24.922, 65.331, -4.31, 0.684)
pt3dadd(24.882, 65.233, -4.328, 0.682)
pt3dadd(24.841, 65.136, -4.346, 0.688)
pt3dadd(24.801, 65.038, -4.364, 0.692)
pt3dadd(24.76, 64.941, -4.382, 0.698)
pt3dadd(24.72, 64.843, -4.4, 0.704)
pt3dadd(24.672, 64.749, -4.422, 0.704)
pt3dadd(24.624, 64.655, -4.443, 0.704)
pt3dadd(24.578, 64.561, -4.464, 0.704)
pt3dadd(24.576, 64.576, -4.464, 0.704)
pt3dadd(24.528, 64.482, -4.486, 0.704)
pt3dadd(24.492, 64.387, -4.512, 0.7)
pt3dadd(24.482, 64.29, -4.549, 0.69)
pt3dadd(24.472, 64.192, -4.585, 0.68)
pt3dadd(24.463, 64.095, -4.622, 0.67)
pt3dadd(24.453, 63.998, -4.659, 0.66)
pt3dadd(24.444, 63.903, -4.7, 0.65)
pt3dadd(24.442, 63.822, -4.76, 0.63)
pt3dadd(24.44, 63.74, -4.819, 0.61)
pt3dadd(24.438, 63.658, -4.879, 0.588)
pt3dadd(24.436, 63.576, -4.939, 0.568)
}
}
proc shape3d_173() {
dend_7[54] { pt3dadd(24.438, 63.493, -4.997, 0.552)
pt3dadd(24.452, 63.402, -5.044, 0.552)
pt3dadd(24.467, 63.312, -5.091, 0.552)
pt3dadd(24.482, 63.222, -5.138, 0.552)
pt3dadd(24.496, 63.131, -5.186, 0.552)
pt3dadd(24.507, 63.055, -5.247, 0.57)
pt3dadd(24.514, 62.997, -5.326, 0.606)
pt3dadd(24.52, 62.938, -5.406, 0.642)
pt3dadd(24.526, 62.88, -5.485, 0.68)
pt3dadd(24.533, 62.821, -5.564, 0.716)
pt3dadd(24.533, 62.755, -5.638, 0.764)
pt3dadd(24.531, 62.686, -5.71, 0.814)
pt3dadd(24.529, 62.617, -5.782, 0.864)
pt3dadd(24.526, 62.547, -5.854, 0.916)
pt3dadd(24.524, 62.478, -5.926, 0.966)
pt3dadd(24.522, 62.441, -6.014, 1.018)
pt3dadd(24.52, 62.415, -6.109, 1.072)
pt3dadd(24.518, 62.367, -6.188, 1.088)
pt3dadd(24.516, 62.283, -6.245, 1.04)
pt3dadd(24.514, 62.193, -6.29, 0.988)
pt3dadd(24.512, 62.087, -6.294, 0.92)
pt3dadd(24.51, 61.982, -6.297, 0.85)
pt3dadd(24.507, 61.876, -6.3, 0.786)
pt3dadd(24.505, 61.77, -6.3, 0.736)
pt3dadd(24.503, 61.664, -6.3, 0.686)
pt3dadd(24.501, 61.678, -6.3, 0.686)
pt3dadd(24.499, 61.573, -6.306, 0.65)
pt3dadd(24.497, 61.469, -6.324, 0.646)
pt3dadd(24.495, 61.365, -6.342, 0.64)
pt3dadd(24.493, 61.261, -6.36, 0.634)
pt3dadd(24.491, 61.159, -6.381, 0.628)
pt3dadd(24.488, 61.085, -6.449, 0.64)
pt3dadd(24.486, 61.011, -6.517, 0.652)
pt3dadd(24.484, 60.928, -6.572, 0.678)
pt3dadd(24.482, 60.825, -6.594, 0.666)
pt3dadd(24.48, 60.72, -6.6, 0.628)
pt3dadd(24.478, 60.614, -6.6, 0.578)
pt3dadd(24.476, 60.508, -6.6, 0.552)
pt3dadd(24.474, 60.402, -6.6, 0.578)
pt3dadd(24.464, 60.297, -6.6, 0.63)
pt3dadd(24.433, 60.196, -6.609, 0.674)
pt3dadd(24.344, 60.152, -6.648, 0.678)
pt3dadd(24.231, 60.159, -6.684, 0.698)
pt3dadd(24.114, 60.173, -6.712, 0.754)
pt3dadd(24.001, 60.187, -6.746, 0.796)
pt3dadd(23.926, 60.192, -6.822, 0.754)
pt3dadd(23.871, 60.186, -6.91, 0.704)
pt3dadd(23.819, 60.138, -6.966, 0.654)
pt3dadd(23.77, 60.045, -6.989, 0.604)
pt3dadd(23.735, 59.947, -7.007, 0.562)
pt3dadd(23.728, 59.871, -7.064, 0.56)
pt3dadd(23.726, 59.807, -7.14, 0.57)
pt3dadd(23.724, 59.744, -7.217, 0.58)
pt3dadd(23.722, 59.68, -7.293, 0.59)
pt3dadd(23.72, 59.616, -7.369, 0.6)
pt3dadd(23.718, 59.631, -7.369, 0.6)
pt3dadd(23.716, 59.551, -7.431, 0.628)
pt3dadd(23.714, 59.467, -7.487, 0.664)
pt3dadd(23.711, 59.374, -7.53, 0.708)
pt3dadd(23.709, 59.274, -7.563, 0.762)
pt3dadd(23.702, 59.174, -7.59, 0.816)
pt3dadd(23.679, 59.07, -7.594, 0.878)
pt3dadd(23.656, 58.967, -7.599, 0.938)
pt3dadd(23.654, 58.981, -7.599, 0.938)
pt3dadd(23.57, 58.919, -7.6, 1.004)
pt3dadd(23.464, 58.872, -7.6, 1.074)
pt3dadd(23.367, 58.815, -7.6, 1.118)
pt3dadd(23.277, 58.747, -7.6, 1.142)
pt3dadd(23.216, 58.665, -7.606, 1.168)
pt3dadd(23.208, 58.568, -7.639, 1.202)
pt3dadd(23.206, 58.527, -7.724, 1.284)
pt3dadd(23.204, 58.53, -7.824, 1.3)
pt3dadd(23.198, 58.544, -7.924, 1.254)
pt3dadd(23.178, 58.524, -8.007, 1.17)
pt3dadd(23.176, 58.539, -8.007, 1.17)
pt3dadd(23.15, 58.455, -8.062, 1.142)
pt3dadd(23.125, 58.371, -8.116, 1.114)
pt3dadd(23.099, 58.287, -8.17, 1.088)
pt3dadd(23.073, 58.204, -8.225, 1.06)
pt3dadd(23.037, 58.113, -8.264, 1.026)
pt3dadd(23, 58.022, -8.301, 0.994)
pt3dadd(22.963, 57.93, -8.338, 0.96)
pt3dadd(22.925, 57.838, -8.375, 0.926)
pt3dadd(22.876, 57.75, -8.401, 0.898)
pt3dadd(22.801, 57.669, -8.403, 0.878)
pt3dadd(22.726, 57.588, -8.405, 0.856)
pt3dadd(22.65, 57.507, -8.407, 0.836)
pt3dadd(22.575, 57.426, -8.41, 0.816)
pt3dadd(22.5, 57.346, -8.419, 0.804)
pt3dadd(22.425, 57.268, -8.439, 0.804)
pt3dadd(22.351, 57.189, -8.459, 0.804)
pt3dadd(22.277, 57.11, -8.479, 0.804)
pt3dadd(22.203, 57.031, -8.499, 0.804)
pt3dadd(22.123, 56.954, -8.5, 0.822)
pt3dadd(22.043, 56.877, -8.5, 0.844)
pt3dadd(21.964, 56.8, -8.5, 0.864)
pt3dadd(21.884, 56.722, -8.5, 0.884)
pt3dadd(21.804, 56.645, -8.5, 0.904)
pt3dadd(21.739, 56.575, -8.548, 0.922)
pt3dadd(21.676, 56.504, -8.597, 0.94)
pt3dadd(21.612, 56.434, -8.646, 0.958)
pt3dadd(21.548, 56.364, -8.695, 0.978)
pt3dadd(21.448, 56.344, -8.741, 0.968)
pt3dadd(21.342, 56.331, -8.786, 0.954)
pt3dadd(21.249, 56.287, -8.83, 0.9)
pt3dadd(21.165, 56.234, -8.874, 0.844)
pt3dadd(21.12, 56.148, -8.915, 0.79)
pt3dadd(21.085, 56.073, -8.97, 0.746)
pt3dadd(21.077, 56.024, -9.055, 0.722)
pt3dadd(21.049, 55.977, -9.127, 0.7)
pt3dadd(20.944, 55.937, -9.151, 0.684)
pt3dadd(20.838, 55.897, -9.175, 0.668)
pt3dadd(20.733, 55.858, -9.199, 0.654)
pt3dadd(20.722, 55.759, -9.228, 0.652)
pt3dadd(20.715, 55.658, -9.257, 0.652)
pt3dadd(20.699, 55.559, -9.287, 0.652)
pt3dadd(20.622, 55.485, -9.313, 0.658)
pt3dadd(20.544, 55.413, -9.339, 0.664)
pt3dadd(20.465, 55.341, -9.365, 0.67)
pt3dadd(20.385, 55.268, -9.39, 0.676)
pt3dadd(20.307, 55.191, -9.4, 0.678)
pt3dadd(20.23, 55.112, -9.4, 0.678)
pt3dadd(20.153, 55.032, -9.4, 0.678)
pt3dadd(20.076, 54.953, -9.4, 0.678)
pt3dadd(19.998, 54.873, -9.4, 0.678)
pt3dadd(19.996, 54.887, -9.4, 0.678)
pt3dadd(19.953, 54.794, -9.412, 0.678)
pt3dadd(19.927, 54.692, -9.432, 0.678)
pt3dadd(19.902, 54.591, -9.451, 0.678)
pt3dadd(19.877, 54.49, -9.47, 0.678)
pt3dadd(19.852, 54.388, -9.489, 0.678)
pt3dadd(19.83, 54.287, -9.509, 0.678)
pt3dadd(19.813, 54.184, -9.53, 0.678)
pt3dadd(19.797, 54.082, -9.551, 0.678)
pt3dadd(19.779, 53.98, -9.571, 0.678)
pt3dadd(19.763, 53.877, -9.592, 0.678)
pt3dadd(19.745, 53.776, -9.614, 0.678)
pt3dadd(19.724, 53.684, -9.658, 0.678)
pt3dadd(19.701, 53.594, -9.704, 0.678)
pt3dadd(19.679, 53.54, -9.784, 0.664)
pt3dadd(19.654, 53.482, -9.86, 0.652)
pt3dadd(19.608, 53.396, -9.902, 0.638)
pt3dadd(19.574, 53.306, -9.94, 0.622)
pt3dadd(19.572, 53.205, -9.968, 0.602)
pt3dadd(19.57, 53.103, -9.995, 0.582)
pt3dadd(19.568, 52.998, -10, 0.578)
pt3dadd(19.566, 52.893, -10, 0.578)
pt3dadd(19.563, 52.787, -10, 0.578)
pt3dadd(19.561, 52.681, -10, 0.578)
pt3dadd(19.559, 52.575, -10, 0.578)
pt3dadd(19.561, 52.469, -10, 0.592)
pt3dadd(19.563, 52.363, -10, 0.61)
pt3dadd(19.566, 52.258, -10, 0.626)
pt3dadd(19.621, 52.192, -10.054, 0.642)
pt3dadd(19.681, 52.131, -10.112, 0.664)
pt3dadd(19.74, 52.076, -10.176, 0.722)
pt3dadd(19.781, 52.015, -10.243, 0.788)
pt3dadd(19.805, 51.953, -10.315, 0.858)
pt3dadd(19.854, 51.928, -10.399, 0.888)
pt3dadd(19.904, 51.902, -10.483, 0.916)
pt3dadd(19.953, 51.877, -10.566, 0.944)
pt3dadd(20.004, 51.851, -10.65, 0.974)
pt3dadd(20.067, 51.828, -10.728, 0.984)
pt3dadd(20.133, 51.804, -10.803, 0.99)
pt3dadd(20.201, 51.781, -10.879, 0.996)
pt3dadd(20.267, 51.757, -10.955, 1.002)
pt3dadd(20.354, 51.735, -11.011, 1.004)
pt3dadd(20.455, 51.713, -11.05, 1.004)
pt3dadd(20.557, 51.692, -11.09, 1.004)
pt3dadd(20.659, 51.67, -11.13, 1.004)
pt3dadd(20.76, 51.651, -11.172, 1.004)
pt3dadd(20.841, 51.665, -11.243, 0.994)
pt3dadd(20.923, 51.679, -11.315, 0.984)
pt3dadd(21.005, 51.693, -11.387, 0.974)
pt3dadd(21.086, 51.708, -11.459, 0.964)
pt3dadd(21.17, 51.722, -11.528, 0.952)
pt3dadd(21.27, 51.736, -11.581, 0.938)
pt3dadd(21.37, 51.75, -11.633, 0.922)
pt3dadd(21.469, 51.764, -11.686, 0.908)
pt3dadd(21.569, 51.778, -11.738, 0.894)
pt3dadd(21.67, 51.792, -11.789, 0.876)
pt3dadd(21.787, 51.807, -11.802, 0.796)
pt3dadd(21.904, 51.821, -11.818, 0.754)
pt3dadd(22.013, 51.835, -11.852, 0.738)
pt3dadd(22.118, 51.849, -11.897, 0.706)
pt3dadd(22.202, 51.863, -11.964, 0.678)
pt3dadd(22.235, 51.877, -12.059, 0.664)
pt3dadd(22.239, 51.892, -12.158, 0.638)
pt3dadd(22.237, 51.906, -12.158, 0.638)
pt3dadd(22.235, 51.92, -12.258, 0.614)
pt3dadd(22.233, 51.934, -12.358, 0.632)
pt3dadd(22.23, 51.948, -12.458, 0.712)
pt3dadd(22.228, 51.962, -12.558, 0.856)
pt3dadd(22.226, 51.968, -12.658, 1.044)
pt3dadd(22.224, 51.949, -12.753, 1.12)
pt3dadd(22.222, 51.921, -12.847, 1.144)
pt3dadd(22.22, 51.894, -12.941, 1.166)
pt3dadd(22.218, 51.866, -13.035, 1.19)
pt3dadd(22.216, 51.839, -13.128, 1.212)
pt3dadd(22.214, 51.809, -13.221, 1.23)
}
}
proc shape3d_174() {
dend_7[54] { pt3dadd(22.211, 51.769, -13.311, 1.23)
pt3dadd(22.209, 51.73, -13.4, 1.23)
pt3dadd(22.207, 51.744, -13.4, 1.23)
pt3dadd(22.205, 51.758, -13.5, 1.196)
pt3dadd(22.203, 51.772, -13.6, 1.164)
pt3dadd(22.201, 51.786, -13.7, 1.13)
pt3dadd(22.165, 51.801, -13.796, 1.078)
pt3dadd(22.131, 51.815, -13.892, 1.026)
pt3dadd(22.079, 51.829, -13.983, 0.984)
pt3dadd(22.016, 51.843, -14.069, 0.95)
pt3dadd(21.938, 51.857, -14.143, 0.922)
pt3dadd(21.834, 51.871, -14.197, 0.906)
pt3dadd(21.756, 51.885, -14.273, 0.892)
pt3dadd(21.679, 51.9, -14.351, 0.882)
pt3dadd(21.596, 51.914, -14.426, 0.87)
pt3dadd(21.513, 51.928, -14.499, 0.858)
pt3dadd(21.407, 51.942, -14.545, 0.84)
pt3dadd(21.292, 51.956, -14.578, 0.818)
pt3dadd(21.179, 51.953, -14.6, 0.8)
pt3dadd(21.07, 51.913, -14.6, 0.788)
pt3dadd(20.962, 51.875, -14.606, 0.776)
pt3dadd(20.879, 51.849, -14.673, 0.76)
pt3dadd(20.798, 51.823, -14.739, 0.744)
pt3dadd(20.717, 51.799, -14.807, 0.726)
pt3dadd(20.655, 51.793, -14.892, 0.7)
pt3dadd(20.588, 51.786, -14.973, 0.676)
pt3dadd(20.488, 51.768, -15.026, 0.666)
pt3dadd(20.39, 51.75, -15.08, 0.656)
pt3dadd(20.278, 51.752, -15.102, 0.658)
pt3dadd(20.156, 51.766, -15.106, 0.666)
pt3dadd(20.034, 51.78, -15.11, 0.676)
pt3dadd(19.944, 51.794, -15.168, 0.69)
pt3dadd(19.867, 51.809, -15.246, 0.708)
pt3dadd(19.79, 51.823, -15.324, 0.726)
pt3dadd(19.742, 51.793, -15.407, 0.728)
pt3dadd(19.695, 51.756, -15.489, 0.728)
pt3dadd(19.612, 51.683, -15.493, 0.71)
pt3dadd(19.527, 51.61, -15.497, 0.692)
pt3dadd(19.447, 51.534, -15.5, 0.672)
pt3dadd(19.376, 51.449, -15.5, 0.648)
pt3dadd(19.302, 51.373, -15.503, 0.626)
pt3dadd(19.187, 51.368, -15.535, 0.618)
pt3dadd(19.072, 51.364, -15.566, 0.61)
pt3dadd(18.956, 51.364, -15.59, 0.602)
pt3dadd(18.834, 51.378, -15.594, 0.602)
pt3dadd(18.712, 51.393, -15.598, 0.602)
pt3dadd(18.593, 51.405, -15.615, 0.606)
pt3dadd(18.482, 51.415, -15.657, 0.614)
pt3dadd(18.372, 51.424, -15.699, 0.624)
pt3dadd(18.277, 51.4, -15.741, 0.634)
pt3dadd(18.208, 51.331, -15.785, 0.648)
pt3dadd(18.147, 51.245, -15.8, 0.676)
pt3dadd(18.065, 51.188, -15.841, 0.678)
pt3dadd(17.982, 51.145, -15.892, 0.678)
pt3dadd(17.916, 51.153, -15.977, 0.678)
pt3dadd(17.852, 51.154, -16.059, 0.678)
pt3dadd(17.807, 51.073, -16.108, 0.678)
pt3dadd(17.771, 51.001, -16.166, 0.684)
pt3dadd(17.769, 50.954, -16.252, 0.706)
pt3dadd(17.767, 50.909, -16.339, 0.732)
pt3dadd(17.765, 50.9, -16.437, 0.79)
pt3dadd(17.743, 50.89, -16.531, 0.84)
pt3dadd(17.69, 50.878, -16.618, 0.874)
pt3dadd(17.635, 50.866, -16.706, 0.906)
pt3dadd(17.581, 50.854, -16.793, 0.94)
pt3dadd(17.526, 50.842, -16.88, 0.972)
pt3dadd(17.462, 50.831, -16.963, 0.996)
pt3dadd(17.395, 50.822, -17.045, 1.02)
pt3dadd(17.327, 50.812, -17.126, 1.042)
pt3dadd(17.26, 50.803, -17.208, 1.064)
pt3dadd(17.19, 50.785, -17.285, 1.084)
pt3dadd(17.113, 50.747, -17.35, 1.096)
pt3dadd(17.036, 50.709, -17.415, 1.108)
pt3dadd(16.958, 50.672, -17.48, 1.12)
pt3dadd(16.885, 50.632, -17.546, 1.128)
pt3dadd(16.832, 50.581, -17.619, 1.122)
pt3dadd(16.778, 50.531, -17.691, 1.116)
pt3dadd(16.724, 50.481, -17.764, 1.11)
pt3dadd(16.671, 50.433, -17.837, 1.104)
pt3dadd(16.598, 50.44, -17.917, 1.08)
pt3dadd(16.525, 50.448, -17.998, 1.056)
pt3dadd(16.461, 50.442, -18.082, 1.018)
pt3dadd(16.398, 50.436, -18.167, 0.98)
pt3dadd(16.287, 50.405, -18.183, 0.942)
pt3dadd(16.174, 50.374, -18.199, 0.906)
pt3dadd(16.088, 50.316, -18.235, 0.878)
pt3dadd(16.007, 50.252, -18.271, 0.848)
pt3dadd(15.94, 50.17, -18.297, 0.808)
pt3dadd(15.83, 50.139, -18.3, 0.804)
pt3dadd(15.715, 50.113, -18.3, 0.804)
pt3dadd(15.603, 50.08, -18.3, 0.804)
pt3dadd(15.492, 50.04, -18.3, 0.804)
pt3dadd(15.387, 49.996, -18.305, 0.808)
pt3dadd(15.289, 49.942, -18.323, 0.82)
pt3dadd(15.216, 49.893, -18.365, 0.824)
pt3dadd(15.186, 49.852, -18.451, 0.812)
pt3dadd(15.136, 49.798, -18.514, 0.796)
pt3dadd(15.058, 49.728, -18.548, 0.78)
pt3dadd(14.981, 49.658, -18.581, 0.762)
pt3dadd(14.904, 49.589, -18.616, 0.748)
pt3dadd(14.826, 49.52, -18.653, 0.734)
pt3dadd(14.798, 49.428, -18.673, 0.732)
pt3dadd(14.796, 49.443, -18.673, 0.732)
pt3dadd(14.794, 49.337, -18.682, 0.74)
pt3dadd(14.792, 49.232, -18.691, 0.746)
pt3dadd(14.79, 49.126, -18.7, 0.754)
pt3dadd(14.787, 49.021, -18.704, 0.778)
pt3dadd(14.785, 48.915, -18.708, 0.804)
pt3dadd(14.783, 48.813, -18.717, 0.83)
pt3dadd(14.781, 48.763, -18.801, 0.856)
pt3dadd(14.779, 48.713, -18.886, 0.882)
pt3dadd(14.777, 48.659, -18.968, 0.908)
pt3dadd(14.775, 48.592, -19.042, 0.932)
pt3dadd(14.77, 48.526, -19.115, 0.954)
pt3dadd(14.732, 48.493, -19.202, 0.964)
pt3dadd(14.693, 48.461, -19.289, 0.974)
pt3dadd(14.616, 48.448, -19.347, 0.974)
pt3dadd(14.499, 48.456, -19.376, 0.964)
pt3dadd(14.497, 48.471, -19.376, 0.964)
}
dend_7[55] {pt3dclear()
pt3dadd(19.44, 97.309, 14.561, 1.356)
pt3dadd(19.461, 97.338, 14.56, 1.352)
pt3dadd(19.531, 97.435, 14.556, 1.342)
pt3dadd(19.601, 97.533, 14.552, 1.332)
pt3dadd(19.671, 97.63, 14.548, 1.32)
pt3dadd(19.741, 97.727, 14.543, 1.31)
pt3dadd(19.811, 97.824, 14.539, 1.298)
pt3dadd(19.881, 97.922, 14.535, 1.288)
pt3dadd(19.951, 98.019, 14.531, 1.276)
pt3dadd(20.021, 98.116, 14.527, 1.266)
pt3dadd(20.091, 98.214, 14.523, 1.256)
pt3dadd(20.162, 98.311, 14.518, 1.244)
pt3dadd(20.232, 98.408, 14.514, 1.234)
pt3dadd(20.302, 98.505, 14.51, 1.222)
pt3dadd(20.372, 98.603, 14.506, 1.212)
pt3dadd(20.442, 98.7, 14.502, 1.202)
pt3dadd(20.512, 98.797, 14.498, 1.19)
pt3dadd(20.582, 98.895, 14.494, 1.18)
pt3dadd(20.652, 98.992, 14.49, 1.168)
pt3dadd(20.692, 99.102, 14.471, 1.132)
pt3dadd(20.729, 99.214, 14.451, 1.092)
pt3dadd(20.767, 99.325, 14.431, 1.054)
pt3dadd(20.804, 99.437, 14.411, 1.014)
pt3dadd(20.842, 99.548, 14.391, 0.976)
pt3dadd(20.879, 99.66, 14.372, 0.938)
pt3dadd(20.917, 99.771, 14.352, 0.898)
pt3dadd(20.954, 99.883, 14.332, 0.86)
pt3dadd(20.992, 99.994, 14.312, 0.82)
pt3dadd(21.025, 100.105, 14.289, 0.786)
pt3dadd(21.044, 100.216, 14.253, 0.766)
pt3dadd(21.064, 100.326, 14.218, 0.746)
pt3dadd(21.083, 100.437, 14.182, 0.726)
pt3dadd(21.102, 100.548, 14.147, 0.706)
pt3dadd(21.122, 100.658, 14.111, 0.686)
pt3dadd(21.141, 100.769, 14.076, 0.666)
pt3dadd(21.16, 100.879, 14.04, 0.646)
pt3dadd(21.18, 100.99, 14.005, 0.626)
pt3dadd(21.199, 101.1, 13.969, 0.606)
pt3dadd(21.221, 101.208, 13.93, 0.606)
pt3dadd(21.25, 101.31, 13.883, 0.644)
pt3dadd(21.28, 101.412, 13.836, 0.684)
pt3dadd(21.309, 101.513, 13.789, 0.724)
pt3dadd(21.338, 101.615, 13.742, 0.764)
pt3dadd(21.367, 101.717, 13.695, 0.804)
pt3dadd(21.396, 101.819, 13.648, 0.842)
pt3dadd(21.426, 101.92, 13.601, 0.882)
pt3dadd(21.455, 102.022, 13.554, 0.922)
pt3dadd(21.484, 102.124, 13.507, 0.962)
pt3dadd(21.523, 102.224, 13.464, 1)
pt3dadd(21.578, 102.322, 13.429, 1.036)
pt3dadd(21.632, 102.42, 13.393, 1.072)
pt3dadd(21.687, 102.518, 13.357, 1.108)
pt3dadd(21.741, 102.616, 13.322, 1.144)
pt3dadd(21.796, 102.714, 13.286, 1.18)
pt3dadd(21.851, 102.812, 13.251, 1.216)
pt3dadd(21.905, 102.91, 13.215, 1.252)
pt3dadd(21.96, 103.008, 13.179, 1.29)
pt3dadd(22.014, 103.106, 13.144, 1.326)
pt3dadd(22.075, 103.193, 13.1, 1.356)
pt3dadd(22.145, 103.264, 13.045, 1.376)
pt3dadd(22.215, 103.336, 12.99, 1.396)
pt3dadd(22.285, 103.407, 12.934, 1.416)
pt3dadd(22.355, 103.478, 12.879, 1.436)
pt3dadd(22.425, 103.549, 12.823, 1.456)
pt3dadd(22.495, 103.62, 12.768, 1.476)
pt3dadd(22.565, 103.692, 12.712, 1.496)
pt3dadd(22.635, 103.763, 12.657, 1.516)
pt3dadd(22.705, 103.834, 12.601, 1.536)
pt3dadd(22.764, 103.917, 12.55, 1.526)
pt3dadd(22.804, 104.016, 12.506, 1.466)
pt3dadd(22.845, 104.116, 12.462, 1.408)
pt3dadd(22.885, 104.216, 12.418, 1.35)
pt3dadd(22.926, 104.315, 12.374, 1.292)
pt3dadd(22.967, 104.415, 12.33, 1.232)
pt3dadd(23.007, 104.515, 12.285, 1.174)
pt3dadd(23.048, 104.614, 12.241, 1.116)
pt3dadd(23.088, 104.714, 12.197, 1.058)
pt3dadd(23.129, 104.814, 12.153, 0.998)
pt3dadd(23.128, 104.918, 12.116, 0.968)
pt3dadd(23.089, 105.026, 12.087, 0.96)
pt3dadd(23.051, 105.134, 12.057, 0.954)
}
}
proc shape3d_175() {
dend_7[55] { pt3dadd(23.013, 105.242, 12.027, 0.948)
pt3dadd(22.975, 105.35, 11.998, 0.94)
pt3dadd(22.937, 105.458, 11.968, 0.934)
pt3dadd(22.899, 105.566, 11.938, 0.926)
pt3dadd(22.86, 105.674, 11.909, 0.92)
pt3dadd(22.822, 105.782, 11.879, 0.912)
pt3dadd(22.784, 105.891, 11.849, 0.906)
pt3dadd(22.738, 105.986, 11.805, 0.92)
pt3dadd(22.689, 106.078, 11.754, 0.94)
pt3dadd(22.641, 106.169, 11.703, 0.962)
pt3dadd(22.592, 106.26, 11.653, 0.982)
pt3dadd(22.543, 106.351, 11.602, 1.004)
pt3dadd(22.494, 106.443, 11.551, 1.024)
pt3dadd(22.445, 106.534, 11.501, 1.046)
pt3dadd(22.396, 106.625, 11.45, 1.066)
pt3dadd(22.348, 106.716, 11.4, 1.088)
pt3dadd(22.299, 106.807, 11.349, 1.11)
pt3dadd(22.259, 106.909, 11.307, 1.066)
pt3dadd(22.222, 107.013, 11.268, 1.006)
pt3dadd(22.185, 107.117, 11.23, 0.944)
pt3dadd(22.148, 107.221, 11.191, 0.884)
pt3dadd(22.111, 107.325, 11.152, 0.822)
pt3dadd(22.074, 107.43, 11.113, 0.762)
pt3dadd(22.037, 107.534, 11.074, 0.7)
pt3dadd(22, 107.638, 11.035, 0.64)
pt3dadd(21.963, 107.742, 10.997, 0.578)
pt3dadd(21.926, 107.846, 10.958, 0.516)
pt3dadd(21.876, 107.95, 10.93, 0.514)
pt3dadd(21.822, 108.053, 10.906, 0.526)
pt3dadd(21.769, 108.156, 10.881, 0.538)
pt3dadd(21.715, 108.26, 10.856, 0.55)
pt3dadd(21.661, 108.363, 10.832, 0.562)
pt3dadd(21.608, 108.466, 10.807, 0.574)
pt3dadd(21.554, 108.569, 10.782, 0.586)
pt3dadd(21.501, 108.672, 10.758, 0.598)
pt3dadd(21.447, 108.776, 10.733, 0.61)
pt3dadd(21.393, 108.879, 10.709, 0.622)
pt3dadd(21.348, 108.983, 10.677, 0.608)
pt3dadd(21.304, 109.087, 10.643, 0.59)
pt3dadd(21.26, 109.191, 10.61, 0.572)
pt3dadd(21.216, 109.296, 10.576, 0.554)
pt3dadd(21.173, 109.4, 10.543, 0.536)
pt3dadd(21.129, 109.504, 10.509, 0.518)
pt3dadd(21.085, 109.608, 10.476, 0.5)
pt3dadd(21.042, 109.713, 10.442, 0.482)
pt3dadd(20.998, 109.817, 10.409, 0.464)
pt3dadd(20.954, 109.921, 10.375, 0.444)
pt3dadd(20.91, 110.025, 10.341, 0.434)
pt3dadd(20.866, 110.129, 10.307, 0.424)
pt3dadd(20.821, 110.232, 10.273, 0.414)
pt3dadd(20.777, 110.336, 10.239, 0.404)
pt3dadd(20.733, 110.44, 10.205, 0.394)
pt3dadd(20.688, 110.544, 10.171, 0.384)
pt3dadd(20.644, 110.647, 10.136, 0.374)
pt3dadd(20.6, 110.751, 10.102, 0.362)
pt3dadd(20.555, 110.855, 10.068, 0.352)
pt3dadd(20.511, 110.959, 10.034, 0.342)
pt3dadd(20.458, 111.061, 10.006, 0.37)
pt3dadd(20.404, 111.163, 9.978, 0.402)
pt3dadd(20.35, 111.265, 9.951, 0.436)
pt3dadd(20.296, 111.366, 9.923, 0.468)
pt3dadd(20.242, 111.468, 9.896, 0.5)
pt3dadd(20.188, 111.57, 9.868, 0.534)
pt3dadd(20.134, 111.672, 9.841, 0.566)
pt3dadd(20.079, 111.774, 9.813, 0.598)
pt3dadd(20.025, 111.876, 9.786, 0.632)
pt3dadd(19.971, 111.978, 9.758, 0.664)
pt3dadd(19.936, 112.089, 9.735, 0.654)
pt3dadd(19.903, 112.201, 9.712, 0.638)
pt3dadd(19.87, 112.313, 9.689, 0.622)
pt3dadd(19.837, 112.425, 9.666, 0.604)
pt3dadd(19.804, 112.537, 9.643, 0.588)
pt3dadd(19.771, 112.649, 9.621, 0.572)
pt3dadd(19.738, 112.761, 9.598, 0.554)
pt3dadd(19.705, 112.873, 9.575, 0.538)
pt3dadd(19.672, 112.985, 9.552, 0.522)
pt3dadd(19.64, 113.097, 9.529, 0.506)
pt3dadd(19.614, 113.208, 9.496, 0.51)
pt3dadd(19.588, 113.317, 9.462, 0.516)
pt3dadd(19.563, 113.427, 9.427, 0.524)
pt3dadd(19.538, 113.537, 9.393, 0.532)
pt3dadd(19.513, 113.647, 9.358, 0.54)
pt3dadd(19.488, 113.757, 9.324, 0.546)
pt3dadd(19.462, 113.867, 9.289, 0.554)
pt3dadd(19.437, 113.976, 9.255, 0.562)
pt3dadd(19.412, 114.086, 9.221, 0.568)
pt3dadd(19.387, 114.196, 9.186, 0.576)
pt3dadd(19.366, 114.306, 9.151, 0.58)
pt3dadd(19.345, 114.417, 9.116, 0.582)
pt3dadd(19.324, 114.527, 9.08, 0.584)
pt3dadd(19.303, 114.637, 9.045, 0.586)
pt3dadd(19.282, 114.747, 9.01, 0.59)
pt3dadd(19.261, 114.858, 8.975, 0.592)
pt3dadd(19.24, 114.968, 8.939, 0.594)
pt3dadd(19.219, 115.078, 8.904, 0.598)
pt3dadd(19.198, 115.189, 8.868, 0.6)
pt3dadd(19.178, 115.299, 8.833, 0.602)
pt3dadd(19.153, 115.411, 8.804, 0.594)
pt3dadd(19.128, 115.523, 8.775, 0.584)
pt3dadd(19.103, 115.635, 8.746, 0.574)
pt3dadd(19.078, 115.748, 8.718, 0.566)
pt3dadd(19.053, 115.86, 8.689, 0.556)
pt3dadd(19.028, 115.972, 8.66, 0.546)
pt3dadd(19.003, 116.084, 8.631, 0.536)
pt3dadd(18.978, 116.196, 8.603, 0.528)
pt3dadd(18.953, 116.308, 8.574, 0.518)
pt3dadd(18.928, 116.421, 8.545, 0.508)
pt3dadd(18.874, 116.525, 8.524, 0.542)
pt3dadd(18.82, 116.629, 8.504, 0.576)
pt3dadd(18.766, 116.734, 8.484, 0.608)
pt3dadd(18.712, 116.838, 8.463, 0.642)
pt3dadd(18.658, 116.942, 8.443, 0.676)
pt3dadd(18.604, 117.047, 8.422, 0.71)
pt3dadd(18.551, 117.151, 8.402, 0.742)
pt3dadd(18.497, 117.255, 8.381, 0.776)
pt3dadd(18.443, 117.36, 8.361, 0.81)
pt3dadd(18.389, 117.464, 8.34, 0.844)
}
dend_7[56] {pt3dclear()
pt3dadd(18.389, 117.464, 8.34, 0.844)
pt3dadd(18.38, 117.487, 8.336, 0.842)
pt3dadd(18.329, 117.595, 8.302, 0.836)
pt3dadd(18.278, 117.702, 8.269, 0.828)
pt3dadd(18.227, 117.81, 8.236, 0.82)
pt3dadd(18.176, 117.918, 8.203, 0.814)
pt3dadd(18.125, 118.026, 8.169, 0.806)
pt3dadd(18.074, 118.134, 8.136, 0.798)
pt3dadd(18.023, 118.242, 8.103, 0.792)
pt3dadd(17.972, 118.349, 8.069, 0.784)
pt3dadd(17.921, 118.457, 8.036, 0.776)
pt3dadd(17.869, 118.565, 8.003, 0.77)
pt3dadd(17.81, 118.669, 7.973, 0.76)
pt3dadd(17.751, 118.774, 7.942, 0.75)
pt3dadd(17.692, 118.879, 7.912, 0.742)
pt3dadd(17.633, 118.984, 7.882, 0.732)
pt3dadd(17.574, 119.089, 7.851, 0.722)
pt3dadd(17.515, 119.194, 7.821, 0.714)
pt3dadd(17.456, 119.298, 7.79, 0.704)
pt3dadd(17.397, 119.403, 7.76, 0.694)
pt3dadd(17.338, 119.508, 7.729, 0.686)
pt3dadd(17.277, 119.612, 7.7, 0.678)
pt3dadd(17.207, 119.713, 7.677, 0.678)
pt3dadd(17.137, 119.813, 7.654, 0.678)
pt3dadd(17.067, 119.914, 7.631, 0.678)
pt3dadd(16.996, 120.014, 7.608, 0.678)
pt3dadd(16.926, 120.115, 7.585, 0.678)
pt3dadd(16.856, 120.216, 7.562, 0.678)
pt3dadd(16.786, 120.316, 7.54, 0.678)
pt3dadd(16.716, 120.416, 7.517, 0.678)
pt3dadd(16.645, 120.517, 7.494, 0.678)
pt3dadd(16.574, 120.618, 7.472, 0.686)
pt3dadd(16.498, 120.715, 7.456, 0.73)
pt3dadd(16.422, 120.814, 7.44, 0.772)
pt3dadd(16.345, 120.911, 7.424, 0.816)
pt3dadd(16.269, 121.008, 7.408, 0.858)
pt3dadd(16.193, 121.106, 7.392, 0.902)
pt3dadd(16.116, 121.205, 7.376, 0.944)
pt3dadd(16.04, 121.303, 7.36, 0.988)
pt3dadd(15.963, 121.4, 7.344, 1.03)
pt3dadd(15.887, 121.499, 7.328, 1.074)
pt3dadd(15.811, 121.596, 7.312, 1.11)
pt3dadd(15.732, 121.692, 7.298, 1.114)
pt3dadd(15.654, 121.789, 7.284, 1.12)
pt3dadd(15.576, 121.886, 7.27, 1.124)
pt3dadd(15.498, 121.982, 7.256, 1.128)
pt3dadd(15.42, 122.08, 7.242, 1.132)
pt3dadd(15.341, 122.177, 7.228, 1.138)
pt3dadd(15.263, 122.274, 7.214, 1.142)
pt3dadd(15.185, 122.37, 7.2, 1.146)
pt3dadd(15.107, 122.467, 7.187, 1.152)
pt3dadd(15.028, 122.564, 7.173, 1.146)
pt3dadd(14.948, 122.659, 7.161, 1.102)
pt3dadd(14.868, 122.754, 7.15, 1.058)
pt3dadd(14.788, 122.85, 7.138, 1.012)
pt3dadd(14.708, 122.946, 7.126, 0.968)
pt3dadd(14.628, 123.041, 7.114, 0.924)
pt3dadd(14.547, 123.137, 7.103, 0.88)
pt3dadd(14.467, 123.233, 7.091, 0.834)
pt3dadd(14.388, 123.328, 7.079, 0.79)
pt3dadd(14.307, 123.424, 7.067, 0.746)
pt3dadd(14.232, 123.521, 7.05, 0.706)
pt3dadd(14.176, 123.623, 7.011, 0.688)
pt3dadd(14.119, 123.725, 6.972, 0.668)
pt3dadd(14.063, 123.827, 6.932, 0.65)
pt3dadd(14.006, 123.929, 6.893, 0.632)
pt3dadd(13.95, 124.03, 6.853, 0.612)
pt3dadd(13.894, 124.132, 6.814, 0.594)
pt3dadd(13.837, 124.235, 6.775, 0.576)
pt3dadd(13.781, 124.336, 6.735, 0.556)
pt3dadd(13.725, 124.438, 6.696, 0.538)
pt3dadd(13.668, 124.54, 6.657, 0.528)
pt3dadd(13.607, 124.64, 6.621, 0.55)
pt3dadd(13.547, 124.741, 6.584, 0.574)
pt3dadd(13.487, 124.842, 6.547, 0.596)
pt3dadd(13.426, 124.944, 6.51, 0.618)
pt3dadd(13.366, 125.044, 6.474, 0.64)
pt3dadd(13.306, 125.146, 6.437, 0.662)
pt3dadd(13.245, 125.246, 6.4, 0.684)
pt3dadd(13.185, 125.347, 6.363, 0.706)
pt3dadd(13.125, 125.448, 6.327, 0.728)
pt3dadd(13.064, 125.549, 6.289, 0.754)
pt3dadd(13.002, 125.646, 6.249, 0.786)
}
}
proc shape3d_176() {
dend_7[56] { pt3dadd(12.939, 125.743, 6.209, 0.82)
pt3dadd(12.877, 125.842, 6.169, 0.854)
pt3dadd(12.814, 125.939, 6.129, 0.886)
pt3dadd(12.752, 126.036, 6.088, 0.92)
pt3dadd(12.689, 126.134, 6.048, 0.954)
pt3dadd(12.627, 126.232, 6.008, 0.986)
pt3dadd(12.564, 126.33, 5.968, 1.02)
pt3dadd(12.502, 126.427, 5.928, 1.054)
pt3dadd(12.441, 126.522, 5.883, 1.066)
pt3dadd(12.383, 126.613, 5.83, 1.04)
pt3dadd(12.326, 126.704, 5.777, 1.014)
pt3dadd(12.268, 126.796, 5.723, 0.988)
pt3dadd(12.21, 126.887, 5.67, 0.962)
pt3dadd(12.153, 126.977, 5.617, 0.936)
pt3dadd(12.095, 127.068, 5.564, 0.908)
pt3dadd(12.037, 127.159, 5.51, 0.882)
pt3dadd(11.98, 127.25, 5.457, 0.856)
pt3dadd(11.922, 127.34, 5.404, 0.83)
pt3dadd(11.86, 127.436, 5.362, 0.798)
pt3dadd(11.793, 127.538, 5.335, 0.76)
pt3dadd(11.726, 127.638, 5.309, 0.722)
pt3dadd(11.658, 127.74, 5.282, 0.684)
pt3dadd(11.591, 127.841, 5.255, 0.646)
pt3dadd(11.524, 127.943, 5.228, 0.606)
pt3dadd(11.457, 128.042, 5.201, 0.568)
pt3dadd(11.39, 128.144, 5.174, 0.53)
pt3dadd(11.322, 128.246, 5.147, 0.492)
pt3dadd(11.255, 128.346, 5.12, 0.454)
pt3dadd(11.2, 128.455, 5.098, 0.424)
pt3dadd(11.158, 128.573, 5.083, 0.404)
pt3dadd(11.115, 128.689, 5.067, 0.384)
pt3dadd(11.073, 128.807, 5.051, 0.364)
pt3dadd(11.03, 128.924, 5.035, 0.342)
pt3dadd(10.988, 129.041, 5.019, 0.322)
pt3dadd(10.946, 129.157, 5.003, 0.302)
pt3dadd(10.903, 129.275, 4.987, 0.282)
pt3dadd(10.861, 129.392, 4.972, 0.262)
pt3dadd(10.818, 129.509, 4.956, 0.242)
pt3dadd(10.782, 129.629, 4.943, 0.248)
pt3dadd(10.752, 129.75, 4.934, 0.286)
pt3dadd(10.722, 129.872, 4.925, 0.322)
pt3dadd(10.693, 129.994, 4.916, 0.358)
pt3dadd(10.663, 130.116, 4.907, 0.394)
pt3dadd(10.633, 130.238, 4.898, 0.43)
pt3dadd(10.603, 130.36, 4.889, 0.468)
pt3dadd(10.573, 130.482, 4.88, 0.504)
pt3dadd(10.543, 130.604, 4.871, 0.54)
pt3dadd(10.514, 130.724, 4.862, 0.576)
pt3dadd(10.477, 130.844, 4.851, 0.6)
pt3dadd(10.432, 130.962, 4.838, 0.608)
pt3dadd(10.387, 131.078, 4.825, 0.616)
pt3dadd(10.343, 131.195, 4.812, 0.624)
pt3dadd(10.298, 131.312, 4.799, 0.632)
pt3dadd(10.254, 131.429, 4.787, 0.64)
pt3dadd(10.209, 131.545, 4.774, 0.65)
pt3dadd(10.165, 131.663, 4.761, 0.658)
pt3dadd(10.12, 131.779, 4.748, 0.666)
pt3dadd(10.076, 131.897, 4.735, 0.674)
pt3dadd(10.033, 132.011, 4.713, 0.668)
pt3dadd(9.992, 132.125, 4.682, 0.648)
pt3dadd(9.951, 132.238, 4.651, 0.63)
pt3dadd(9.911, 132.35, 4.621, 0.61)
pt3dadd(9.87, 132.464, 4.59, 0.59)
pt3dadd(9.829, 132.577, 4.56, 0.572)
pt3dadd(9.827, 132.582, 4.559, 0.572)
pt3dadd(9.786, 132.696, 4.529, 0.552)
pt3dadd(9.746, 132.81, 4.498, 0.532)
pt3dadd(9.705, 132.923, 4.468, 0.514)
pt3dadd(9.664, 133.036, 4.437, 0.494)
pt3dadd(9.63, 133.147, 4.398, 0.478)
pt3dadd(9.599, 133.259, 4.356, 0.462)
pt3dadd(9.568, 133.368, 4.313, 0.446)
pt3dadd(9.538, 133.478, 4.27, 0.432)
pt3dadd(9.507, 133.59, 4.228, 0.416)
pt3dadd(9.476, 133.7, 4.185, 0.4)
pt3dadd(9.446, 133.811, 4.142, 0.384)
pt3dadd(9.415, 133.921, 4.1, 0.37)
pt3dadd(9.384, 134.032, 4.057, 0.354)
pt3dadd(9.354, 134.142, 4.014, 0.338)
pt3dadd(9.327, 134.254, 3.972, 0.358)
pt3dadd(9.303, 134.366, 3.93, 0.396)
pt3dadd(9.278, 134.478, 3.888, 0.434)
pt3dadd(9.254, 134.591, 3.845, 0.472)
pt3dadd(9.229, 134.704, 3.803, 0.51)
pt3dadd(9.205, 134.816, 3.761, 0.548)
pt3dadd(9.181, 134.928, 3.719, 0.586)
pt3dadd(9.156, 135.041, 3.677, 0.624)
pt3dadd(9.132, 135.154, 3.634, 0.664)
pt3dadd(9.107, 135.265, 3.592, 0.702)
pt3dadd(9.079, 135.367, 3.538, 0.722)
pt3dadd(9.049, 135.467, 3.479, 0.736)
pt3dadd(9.019, 135.564, 3.42, 0.752)
pt3dadd(8.989, 135.664, 3.361, 0.766)
pt3dadd(8.958, 135.763, 3.302, 0.78)
pt3dadd(8.928, 135.862, 3.243, 0.796)
pt3dadd(8.926, 135.866, 3.242, 0.796)
pt3dadd(8.896, 135.966, 3.183, 0.81)
pt3dadd(8.866, 136.064, 3.124, 0.824)
pt3dadd(8.836, 136.163, 3.065, 0.84)
pt3dadd(8.806, 136.262, 3.006, 0.854)
pt3dadd(8.752, 136.369, 2.978, 0.838)
pt3dadd(8.695, 136.478, 2.951, 0.822)
pt3dadd(8.639, 136.585, 2.925, 0.804)
pt3dadd(8.582, 136.693, 2.899, 0.786)
pt3dadd(8.526, 136.801, 2.873, 0.768)
pt3dadd(8.469, 136.909, 2.847, 0.75)
pt3dadd(8.413, 137.017, 2.821, 0.732)
pt3dadd(8.356, 137.125, 2.795, 0.714)
pt3dadd(8.299, 137.232, 2.769, 0.696)
pt3dadd(8.243, 137.341, 2.743, 0.678)
pt3dadd(8.203, 137.46, 2.732, 0.678)
pt3dadd(8.164, 137.579, 2.721, 0.678)
pt3dadd(8.124, 137.698, 2.71, 0.678)
pt3dadd(8.084, 137.816, 2.699, 0.678)
pt3dadd(8.045, 137.935, 2.688, 0.678)
pt3dadd(8.005, 138.054, 2.677, 0.678)
pt3dadd(7.965, 138.173, 2.667, 0.678)
pt3dadd(7.926, 138.292, 2.656, 0.678)
pt3dadd(7.886, 138.412, 2.645, 0.678)
pt3dadd(7.846, 138.529, 2.634, 0.678)
pt3dadd(7.844, 138.535, 2.633, 0.678)
pt3dadd(7.828, 138.66, 2.633, 0.69)
pt3dadd(7.811, 138.785, 2.632, 0.702)
pt3dadd(7.795, 138.91, 2.632, 0.714)
pt3dadd(7.777, 139.034, 2.631, 0.726)
pt3dadd(7.761, 139.159, 2.631, 0.738)
pt3dadd(7.743, 139.283, 2.63, 0.75)
pt3dadd(7.695, 139.397, 2.63, 0.764)
pt3dadd(7.633, 139.507, 2.629, 0.778)
pt3dadd(7.571, 139.616, 2.629, 0.794)
pt3dadd(7.509, 139.727, 2.628, 0.808)
pt3dadd(7.449, 139.836, 2.628, 0.822)
pt3dadd(7.386, 139.945, 2.627, 0.836)
pt3dadd(7.324, 140.054, 2.627, 0.848)
pt3dadd(7.249, 140.153, 2.619, 0.848)
pt3dadd(7.157, 140.234, 2.601, 0.836)
pt3dadd(7.106, 140.335, 2.578, 0.812)
pt3dadd(7.098, 140.455, 2.549, 0.78)
pt3dadd(7.091, 140.576, 2.522, 0.754)
pt3dadd(7.089, 140.701, 2.509, 0.754)
pt3dadd(7.088, 140.826, 2.497, 0.754)
pt3dadd(7.086, 140.947, 2.473, 0.776)
pt3dadd(7.084, 141.065, 2.436, 0.826)
pt3dadd(7.082, 141.19, 2.429, 0.878)
pt3dadd(7.08, 141.316, 2.425, 0.93)
pt3dadd(7.078, 141.442, 2.421, 0.98)
pt3dadd(7.076, 141.566, 2.416, 1.016)
pt3dadd(7.075, 141.692, 2.412, 1.05)
pt3dadd(7.069, 141.811, 2.397, 1.084)
pt3dadd(7.047, 141.893, 2.322, 1.11)
pt3dadd(7.006, 141.971, 2.258, 1.13)
pt3dadd(6.902, 142.031, 2.234, 1.13)
pt3dadd(6.809, 142.105, 2.215, 1.13)
pt3dadd(6.749, 142.216, 2.205, 1.13)
pt3dadd(6.689, 142.326, 2.195, 1.13)
pt3dadd(6.629, 142.435, 2.184, 1.13)
pt3dadd(6.601, 142.543, 2.14, 1.12)
pt3dadd(6.579, 142.65, 2.089, 1.106)
pt3dadd(6.558, 142.757, 2.038, 1.096)
pt3dadd(6.535, 142.865, 1.986, 1.088)
pt3dadd(6.491, 142.949, 1.939, 1.074)
pt3dadd(6.377, 142.961, 1.904, 1.052)
pt3dadd(6.263, 142.973, 1.869, 1.03)
pt3dadd(6.217, 142.991, 1.781, 1.002)
pt3dadd(6.209, 143.052, 1.692, 0.99)
pt3dadd(6.198, 143.117, 1.606, 0.978)
pt3dadd(6.15, 143.212, 1.55, 0.964)
pt3dadd(6.095, 143.3, 1.495, 0.954)
pt3dadd(6.016, 143.375, 1.444, 0.954)
pt3dadd(5.93, 143.455, 1.417, 0.954)
pt3dadd(5.837, 143.539, 1.411, 0.954)
pt3dadd(5.757, 143.63, 1.392, 0.966)
pt3dadd(5.689, 143.728, 1.358, 0.992)
pt3dadd(5.621, 143.825, 1.325, 1.016)
pt3dadd(5.582, 143.914, 1.269, 1.046)
pt3dadd(5.573, 143.989, 1.188, 1.082)
pt3dadd(5.55, 144.073, 1.117, 1.138)
pt3dadd(5.504, 144.161, 1.054, 1.156)
pt3dadd(5.456, 144.247, 0.989, 1.156)
pt3dadd(5.41, 144.332, 0.925, 1.156)
pt3dadd(5.363, 144.419, 0.86, 1.156)
pt3dadd(5.329, 144.497, 0.785, 1.148)
pt3dadd(5.304, 144.571, 0.705, 1.136)
pt3dadd(5.278, 144.646, 0.625, 1.126)
pt3dadd(5.252, 144.72, 0.545, 1.114)
pt3dadd(5.218, 144.787, 0.466, 1.104)
pt3dadd(5.145, 144.821, 0.388, 1.104)
pt3dadd(5.093, 144.881, 0.323, 1.104)
pt3dadd(5.085, 144.998, 0.289, 1.104)
pt3dadd(5.077, 145.115, 0.252, 1.106)
pt3dadd(5.075, 145.188, 0.169, 1.118)
pt3dadd(5.073, 145.262, 0.086, 1.128)
pt3dadd(5.09, 145.336, 0.005, 1.118)
pt3dadd(5.108, 145.41, -0.076, 1.106)
pt3dadd(5.159, 145.46, -0.158, 1.046)
pt3dadd(5.162, 145.528, -0.24, 1.014)
pt3dadd(5.146, 145.601, -0.321, 0.992)
pt3dadd(5.128, 145.675, -0.403, 0.97)
pt3dadd(5.112, 145.748, -0.485, 0.946)
pt3dadd(5.086, 145.823, -0.564, 0.926)
}
}
proc shape3d_177() {
dend_7[56] { pt3dadd(5.024, 145.897, -0.63, 0.906)
pt3dadd(4.964, 145.972, -0.696, 0.888)
pt3dadd(4.903, 146.046, -0.762, 0.87)
pt3dadd(4.839, 146.123, -0.822, 0.852)
pt3dadd(4.758, 146.214, -0.845, 0.848)
pt3dadd(4.677, 146.305, -0.869, 0.842)
pt3dadd(4.596, 146.396, -0.892, 0.836)
pt3dadd(4.513, 146.488, -0.915, 0.83)
pt3dadd(4.456, 146.59, -0.951, 0.824)
pt3dadd(4.405, 146.694, -0.99, 0.818)
pt3dadd(4.354, 146.798, -1.029, 0.812)
pt3dadd(4.303, 146.904, -1.069, 0.806)
pt3dadd(4.238, 146.988, -1.118, 0.798)
pt3dadd(4.158, 147.049, -1.178, 0.786)
pt3dadd(4.077, 147.11, -1.238, 0.774)
pt3dadd(3.997, 147.172, -1.299, 0.76)
pt3dadd(3.926, 147.241, -1.359, 0.75)
pt3dadd(3.869, 147.325, -1.42, 0.744)
pt3dadd(3.81, 147.409, -1.48, 0.738)
pt3dadd(3.753, 147.493, -1.54, 0.732)
pt3dadd(3.705, 147.587, -1.593, 0.73)
pt3dadd(3.674, 147.701, -1.629, 0.736)
pt3dadd(3.643, 147.815, -1.666, 0.74)
pt3dadd(3.613, 147.929, -1.702, 0.746)
pt3dadd(3.583, 148.043, -1.738, 0.752)
pt3dadd(3.538, 148.156, -1.762, 0.764)
pt3dadd(3.486, 148.268, -1.779, 0.78)
pt3dadd(3.434, 148.381, -1.796, 0.796)
pt3dadd(3.381, 148.494, -1.812, 0.812)
pt3dadd(3.328, 148.607, -1.829, 0.828)
pt3dadd(3.26, 148.698, -1.871, 0.854)
pt3dadd(3.197, 148.792, -1.91, 0.882)
pt3dadd(3.174, 148.915, -1.915, 0.902)
pt3dadd(3.15, 149.039, -1.92, 0.922)
pt3dadd(3.08, 149.11, -1.957, 0.946)
pt3dadd(2.985, 149.15, -2.012, 0.974)
pt3dadd(2.902, 149.213, -2.069, 1.014)
pt3dadd(2.822, 149.28, -2.126, 1.058)
pt3dadd(2.725, 149.35, -2.153, 1.098)
pt3dadd(2.616, 149.383, -2.189, 1.104)
pt3dadd(2.504, 149.408, -2.227, 1.104)
pt3dadd(2.39, 149.423, -2.263, 1.096)
pt3dadd(2.277, 149.435, -2.298, 1.086)
pt3dadd(2.179, 149.488, -2.318, 1.068)
pt3dadd(2.099, 149.585, -2.324, 1.044)
pt3dadd(2.037, 149.69, -2.335, 1.024)
pt3dadd(1.998, 149.809, -2.351, 1.012)
pt3dadd(1.968, 149.914, -2.386, 0.996)
pt3dadd(1.96, 149.99, -2.467, 0.972)
pt3dadd(1.945, 150.055, -2.552, 0.946)
pt3dadd(1.885, 150.07, -2.638, 0.93)
pt3dadd(1.791, 150.074, -2.7, 0.986)
pt3dadd(1.674, 150.08, -2.728, 1.02)
pt3dadd(1.557, 150.086, -2.756, 0.944)
pt3dadd(1.442, 150.109, -2.787, 0.864)
pt3dadd(1.33, 150.14, -2.82, 0.802)
pt3dadd(1.257, 150.224, -2.833, 0.758)
pt3dadd(1.21, 150.341, -2.834, 0.726)
pt3dadd(1.144, 150.44, -2.839, 0.69)
pt3dadd(1.038, 150.49, -2.872, 0.678)
pt3dadd(0.933, 150.529, -2.913, 0.678)
pt3dadd(0.862, 150.623, -2.928, 0.678)
pt3dadd(0.805, 150.734, -2.934, 0.678)
pt3dadd(0.772, 150.853, -2.936, 0.684)
pt3dadd(0.754, 150.978, -2.937, 0.692)
pt3dadd(0.738, 151.103, -2.937, 0.702)
pt3dadd(0.735, 151.217, -2.979, 0.724)
pt3dadd(0.733, 151.33, -3.024, 0.746)
pt3dadd(0.698, 151.416, -3.087, 0.77)
pt3dadd(0.647, 151.49, -3.159, 0.796)
pt3dadd(0.596, 151.564, -3.231, 0.822)
pt3dadd(0.504, 151.602, -3.283, 0.846)
pt3dadd(0.395, 151.627, -3.328, 0.872)
pt3dadd(0.324, 151.705, -3.37, 0.886)
pt3dadd(0.267, 151.805, -3.412, 0.896)
pt3dadd(0.207, 151.907, -3.442, 0.904)
pt3dadd(0.145, 152.016, -3.443, 0.904)
pt3dadd(0.081, 152.124, -3.443, 0.904)
pt3dadd(0.007, 152.221, -3.46, 0.902)
pt3dadd(-0.06, 152.314, -3.504, 0.896)
pt3dadd(-0.125, 152.406, -3.547, 0.89)
pt3dadd(-0.192, 152.498, -3.591, 0.884)
pt3dadd(-0.264, 152.581, -3.637, 0.878)
pt3dadd(-0.356, 152.635, -3.691, 0.872)
pt3dadd(-0.447, 152.689, -3.745, 0.866)
pt3dadd(-0.539, 152.743, -3.798, 0.86)
pt3dadd(-0.629, 152.798, -3.85, 0.854)
pt3dadd(-0.726, 152.874, -3.873, 0.848)
pt3dadd(-0.821, 152.95, -3.896, 0.842)
pt3dadd(-0.917, 153.025, -3.919, 0.836)
pt3dadd(-1.012, 153.1, -3.942, 0.83)
pt3dadd(-1.102, 153.185, -3.954, 0.846)
pt3dadd(-1.189, 153.276, -3.96, 0.87)
pt3dadd(-1.254, 153.372, -3.989, 0.906)
pt3dadd(-1.308, 153.473, -4.033, 0.946)
pt3dadd(-1.372, 153.574, -4.066, 0.988)
pt3dadd(-1.44, 153.673, -4.096, 1.028)
pt3dadd(-1.458, 153.691, -4.194, 1.05)
pt3dadd(-1.476, 153.708, -4.293, 1.07)
pt3dadd(-1.511, 153.768, -4.361, 1.084)
pt3dadd(-1.565, 153.874, -4.397, 1.092)
pt3dadd(-1.618, 153.978, -4.434, 1.1)
pt3dadd(-1.669, 154.079, -4.478, 1.116)
pt3dadd(-1.715, 154.174, -4.534, 1.144)
pt3dadd(-1.747, 154.252, -4.608, 1.132)
pt3dadd(-1.79, 154.36, -4.646, 1.12)
pt3dadd(-1.834, 154.469, -4.681, 1.108)
pt3dadd(-1.878, 154.579, -4.716, 1.096)
pt3dadd(-1.921, 154.69, -4.752, 1.086)
pt3dadd(-1.958, 154.796, -4.795, 1.072)
pt3dadd(-1.986, 154.901, -4.848, 1.054)
pt3dadd(-2.016, 155.005, -4.901, 1.038)
pt3dadd(-2.044, 155.11, -4.954, 1.02)
pt3dadd(-2.073, 155.214, -5.007, 1.004)
pt3dadd(-2.113, 155.308, -5.067, 0.998)
pt3dadd(-2.152, 155.401, -5.128, 0.992)
pt3dadd(-2.192, 155.495, -5.189, 0.986)
pt3dadd(-2.231, 155.588, -5.25, 0.98)
pt3dadd(-2.265, 155.683, -5.312, 0.98)
pt3dadd(-2.298, 155.778, -5.374, 0.98)
pt3dadd(-2.33, 155.873, -5.436, 0.98)
pt3dadd(-2.363, 155.968, -5.498, 0.98)
pt3dadd(-2.392, 156.074, -5.544, 0.98)
pt3dadd(-2.418, 156.193, -5.572, 0.98)
pt3dadd(-2.445, 156.311, -5.599, 0.98)
pt3dadd(-2.471, 156.43, -5.626, 0.98)
pt3dadd(-2.497, 156.548, -5.654, 0.98)
pt3dadd(-2.535, 156.665, -5.679, 0.98)
pt3dadd(-2.584, 156.778, -5.702, 0.98)
pt3dadd(-2.635, 156.862, -5.753, 0.986)
pt3dadd(-2.688, 156.918, -5.833, 1)
pt3dadd(-2.716, 157.021, -5.865, 1.004)
pt3dadd(-2.718, 157.027, -5.865, 1.004)
pt3dadd(-2.736, 157.151, -5.875, 1.004)
pt3dadd(-2.751, 157.264, -5.9, 1.006)
pt3dadd(-2.753, 157.33, -5.987, 1.018)
pt3dadd(-2.754, 157.394, -6.074, 1.03)
pt3dadd(-2.756, 157.408, -6.174, 1.016)
pt3dadd(-2.762, 157.433, -6.267, 1.004)
pt3dadd(-2.797, 157.542, -6.31, 0.998)
pt3dadd(-2.831, 157.651, -6.352, 0.992)
pt3dadd(-2.866, 157.762, -6.395, 0.986)
pt3dadd(-2.9, 157.871, -6.437, 0.982)
pt3dadd(-2.948, 157.973, -6.482, 0.964)
pt3dadd(-3.004, 158.071, -6.527, 0.94)
pt3dadd(-3.06, 158.168, -6.573, 0.916)
pt3dadd(-3.116, 158.267, -6.619, 0.892)
pt3dadd(-3.169, 158.371, -6.654, 0.856)
pt3dadd(-3.218, 158.484, -6.677, 0.806)
pt3dadd(-3.248, 158.592, -6.716, 0.768)
pt3dadd(-3.257, 158.695, -6.776, 0.744)
pt3dadd(-3.269, 158.783, -6.845, 0.728)
pt3dadd(-3.291, 158.85, -6.93, 0.728)
pt3dadd(-3.332, 158.903, -7.014, 0.74)
pt3dadd(-3.396, 158.936, -7.096, 0.766)
pt3dadd(-3.459, 159.008, -7.144, 0.782)
pt3dadd(-3.521, 159.116, -7.157, 0.79)
pt3dadd(-3.582, 159.226, -7.171, 0.798)
pt3dadd(-3.635, 159.334, -7.19, 0.806)
pt3dadd(-3.637, 159.443, -7.241, 0.816)
pt3dadd(-3.639, 159.552, -7.292, 0.828)
pt3dadd(-3.687, 159.616, -7.37, 0.798)
pt3dadd(-3.74, 159.677, -7.449, 0.768)
pt3dadd(-3.821, 159.74, -7.485, 0.722)
pt3dadd(-3.926, 159.806, -7.486, 0.664)
pt3dadd(-4.015, 159.887, -7.495, 0.61)
pt3dadd(-4.075, 159.992, -7.522, 0.56)
pt3dadd(-4.076, 159.998, -7.523, 0.56)
pt3dadd(-4.136, 160.104, -7.55, 0.51)
pt3dadd(-4.189, 160.21, -7.584, 0.502)
pt3dadd(-4.242, 160.316, -7.62, 0.502)
pt3dadd(-4.259, 160.428, -7.661, 0.556)
pt3dadd(-4.261, 160.552, -7.679, 0.564)
pt3dadd(-4.263, 160.676, -7.696, 0.574)
pt3dadd(-4.265, 160.774, -7.753, 0.578)
pt3dadd(-4.266, 160.861, -7.827, 0.578)
pt3dadd(-4.268, 160.92, -7.914, 0.59)
pt3dadd(-4.27, 160.958, -8.011, 0.61)
pt3dadd(-4.273, 160.992, -8.108, 0.634)
pt3dadd(-4.279, 160.998, -8.209, 0.678)
pt3dadd(-4.285, 161.003, -8.309, 0.722)
pt3dadd(-4.307, 161.028, -8.4, 0.772)
pt3dadd(-4.37, 161.102, -8.464, 0.844)
pt3dadd(-4.441, 161.19, -8.495, 0.934)
pt3dadd(-4.545, 161.255, -8.495, 0.974)
pt3dadd(-4.659, 161.298, -8.496, 0.912)
pt3dadd(-4.752, 161.378, -8.496, 0.86)
pt3dadd(-4.813, 161.486, -8.498, 0.93)
pt3dadd(-4.912, 161.558, -8.521, 0.942)
pt3dadd(-5.01, 161.63, -8.544, 0.952)
pt3dadd(-5.108, 161.702, -8.567, 0.964)
pt3dadd(-5.207, 161.773, -8.59, 0.974)
pt3dadd(-5.283, 161.858, -8.628, 0.98)
pt3dadd(-5.346, 161.952, -8.674, 0.98)
pt3dadd(-5.409, 162.044, -8.72, 0.98)
pt3dadd(-5.472, 162.137, -8.767, 0.98)
pt3dadd(-5.556, 162.216, -8.801, 0.97)
pt3dadd(-5.658, 162.281, -8.824, 0.954)
pt3dadd(-5.761, 162.346, -8.847, 0.938)
pt3dadd(-5.863, 162.41, -8.869, 0.92)
}
}
proc shape3d_178() {
dend_7[56] { pt3dadd(-5.966, 162.476, -8.892, 0.904)
pt3dadd(-6.036, 162.575, -8.921, 0.892)
pt3dadd(-6.105, 162.673, -8.95, 0.88)
pt3dadd(-6.176, 162.772, -8.979, 0.87)
pt3dadd(-6.245, 162.87, -9.007, 0.858)
pt3dadd(-6.311, 162.968, -9.042, 0.846)
pt3dadd(-6.377, 163.066, -9.08, 0.834)
pt3dadd(-6.442, 163.163, -9.117, 0.822)
pt3dadd(-6.507, 163.26, -9.154, 0.81)
pt3dadd(-6.508, 163.266, -9.155, 0.81)
pt3dadd(-6.568, 163.368, -9.189, 0.796)
pt3dadd(-6.621, 163.476, -9.22, 0.778)
pt3dadd(-6.675, 163.584, -9.25, 0.762)
pt3dadd(-6.727, 163.692, -9.281, 0.744)
pt3dadd(-6.782, 163.799, -9.312, 0.728)
pt3dadd(-6.859, 163.877, -9.362, 0.702)
pt3dadd(-6.936, 163.955, -9.412, 0.678)
pt3dadd(-7.014, 164.032, -9.461, 0.652)
pt3dadd(-7.091, 164.11, -9.511, 0.628)
pt3dadd(-7.169, 164.17, -9.575, 0.586)
pt3dadd(-7.245, 164.23, -9.639, 0.552)
pt3dadd(-7.317, 164.297, -9.703, 0.552)
pt3dadd(-7.363, 164.388, -9.754, 0.57)
pt3dadd(-7.384, 164.503, -9.793, 0.606)
pt3dadd(-7.414, 164.616, -9.83, 0.644)
pt3dadd(-7.458, 164.726, -9.865, 0.684)
pt3dadd(-7.496, 164.815, -9.924, 0.712)
pt3dadd(-7.527, 164.885, -10.005, 0.728)
pt3dadd(-7.559, 164.953, -10.087, 0.744)
pt3dadd(-7.613, 165.016, -10.157, 0.748)
pt3dadd(-7.711, 165.066, -10.206, 0.734)
pt3dadd(-7.813, 165.114, -10.248, 0.686)
pt3dadd(-7.92, 165.13, -10.294, 0.668)
pt3dadd(-8.027, 165.142, -10.341, 0.656)
pt3dadd(-8.141, 165.162, -10.377, 0.662)
pt3dadd(-8.256, 165.186, -10.408, 0.674)
pt3dadd(-8.344, 165.259, -10.424, 0.716)
pt3dadd(-8.416, 165.361, -10.43, 0.776)
pt3dadd(-8.453, 165.446, -10.479, 0.83)
pt3dadd(-8.461, 165.515, -10.565, 0.878)
pt3dadd(-8.5, 165.588, -10.634, 0.912)
pt3dadd(-8.575, 165.668, -10.684, 0.93)
pt3dadd(-8.65, 165.748, -10.734, 0.946)
pt3dadd(-8.748, 165.792, -10.774, 0.942)
pt3dadd(-8.864, 165.81, -10.804, 0.92)
pt3dadd(-8.958, 165.859, -10.825, 0.902)
pt3dadd(-9.008, 165.976, -10.825, 0.892)
pt3dadd(-9.01, 165.98, -10.826, 0.892)
pt3dadd(-9.06, 166.096, -10.826, 0.884)
pt3dadd(-9.108, 166.213, -10.827, 0.886)
pt3dadd(-9.15, 166.332, -10.828, 0.906)
pt3dadd(-9.191, 166.451, -10.828, 0.928)
pt3dadd(-9.199, 166.576, -10.831, 0.96)
pt3dadd(-9.204, 166.702, -10.835, 0.994)
pt3dadd(-9.21, 166.826, -10.838, 1.026)
pt3dadd(-9.212, 166.832, -10.839, 1.026)
pt3dadd(-9.216, 166.949, -10.855, 1.064)
pt3dadd(-9.218, 167.015, -10.941, 1.12)
pt3dadd(-9.22, 167.082, -11.028, 1.178)
pt3dadd(-9.253, 167.089, -11.125, 1.226)
pt3dadd(-9.311, 167.102, -11.205, 1.242)
pt3dadd(-9.422, 167.14, -11.232, 1.11)
pt3dadd(-9.533, 167.195, -11.233, 0.886)
pt3dadd(-9.652, 167.225, -11.234, 0.732)
pt3dadd(-9.773, 167.245, -11.234, 0.634)
pt3dadd(-9.882, 167.288, -11.257, 0.578)
pt3dadd(-9.984, 167.344, -11.294, 0.536)
pt3dadd(-10.093, 167.396, -11.315, 0.508)
pt3dadd(-10.204, 167.447, -11.331, 0.484)
pt3dadd(-10.307, 167.48, -11.376, 0.478)
pt3dadd(-10.405, 167.507, -11.434, 0.478)
pt3dadd(-10.476, 167.518, -11.514, 0.486)
pt3dadd(-10.539, 167.522, -11.6, 0.498)
pt3dadd(-10.624, 167.528, -11.669, 0.522)
pt3dadd(-10.726, 167.538, -11.723, 0.554)
pt3dadd(-10.824, 167.581, -11.775, 0.558)
pt3dadd(-10.922, 167.623, -11.827, 0.564)
pt3dadd(-11.02, 167.666, -11.879, 0.57)
pt3dadd(-11.118, 167.708, -11.931, 0.576)
pt3dadd(-11.201, 167.761, -11.993, 0.588)
pt3dadd(-11.28, 167.815, -12.059, 0.6)
pt3dadd(-11.36, 167.869, -12.124, 0.612)
pt3dadd(-11.438, 167.923, -12.189, 0.624)
pt3dadd(-11.44, 167.929, -12.189, 0.624)
pt3dadd(-11.526, 167.951, -12.258, 0.632)
pt3dadd(-11.614, 167.957, -12.328, 0.636)
pt3dadd(-11.703, 167.962, -12.398, 0.642)
pt3dadd(-11.79, 167.968, -12.468, 0.646)
pt3dadd(-11.878, 167.974, -12.538, 0.652)
pt3dadd(-11.985, 167.983, -12.583, 0.662)
pt3dadd(-12.1, 167.994, -12.618, 0.672)
pt3dadd(-12.21, 168.029, -12.647, 0.678)
pt3dadd(-12.212, 168.035, -12.648, 0.678)
pt3dadd(-12.317, 168.096, -12.671, 0.678)
pt3dadd(-12.382, 168.169, -12.72, 0.686)
pt3dadd(-12.412, 168.253, -12.792, 0.698)
pt3dadd(-12.459, 168.355, -12.828, 0.712)
pt3dadd(-12.514, 168.467, -12.845, 0.724)
pt3dadd(-12.576, 168.572, -12.868, 0.754)
pt3dadd(-12.634, 168.659, -12.917, 0.784)
pt3dadd(-12.679, 168.724, -12.997, 0.798)
pt3dadd(-12.75, 168.774, -13.066, 0.812)
pt3dadd(-12.84, 168.816, -13.127, 0.826)
pt3dadd(-12.884, 168.912, -13.172, 0.828)
pt3dadd(-12.912, 169.025, -13.211, 0.828)
pt3dadd(-12.954, 169.139, -13.233, 0.828)
pt3dadd(-13.001, 169.254, -13.25, 0.828)
pt3dadd(-13.04, 169.373, -13.263, 0.834)
pt3dadd(-13.073, 169.494, -13.276, 0.84)
pt3dadd(-13.107, 169.614, -13.288, 0.846)
pt3dadd(-13.141, 169.734, -13.301, 0.854)
pt3dadd(-13.149, 169.758, -13.398, 0.872)
pt3dadd(-13.156, 169.78, -13.497, 0.892)
pt3dadd(-13.161, 169.8, -13.597, 0.936)
pt3dadd(-13.185, 169.838, -13.689, 0.992)
pt3dadd(-13.23, 169.894, -13.773, 1.02)
pt3dadd(-13.27, 169.926, -13.864, 1.03)
pt3dadd(-13.307, 169.943, -13.959, 1.03)
pt3dadd(-13.358, 169.981, -14.042, 1.024)
pt3dadd(-13.429, 170.047, -14.107, 1.01)
pt3dadd(-13.51, 170.129, -14.14, 1.004)
pt3dadd(-13.595, 170.219, -14.158, 1.004)
pt3dadd(-13.658, 170.326, -14.163, 1.004)
pt3dadd(-13.712, 170.438, -14.163, 0.998)
pt3dadd(-13.768, 170.551, -14.163, 0.976)
pt3dadd(-13.824, 170.664, -14.165, 0.952)
pt3dadd(-13.876, 170.77, -14.201, 0.886)
pt3dadd(-13.929, 170.872, -14.242, 0.82)
pt3dadd(-13.984, 170.953, -14.306, 0.762)
pt3dadd(-14.038, 171.022, -14.378, 0.718)
pt3dadd(-14.09, 171.071, -14.462, 0.69)
pt3dadd(-14.146, 171.101, -14.548, 0.688)
pt3dadd(-14.203, 171.126, -14.633, 0.704)
pt3dadd(-14.205, 171.132, -14.633, 0.704)
pt3dadd(-14.255, 171.215, -14.698, 0.718)
pt3dadd(-14.306, 171.299, -14.763, 0.73)
pt3dadd(-14.356, 171.382, -14.828, 0.742)
pt3dadd(-14.406, 171.466, -14.893, 0.754)
pt3dadd(-14.407, 171.559, -14.962, 0.79)
pt3dadd(-14.409, 171.653, -15.031, 0.826)
pt3dadd(-14.417, 171.749, -15.097, 0.862)
pt3dadd(-14.425, 171.846, -15.162, 0.898)
pt3dadd(-14.469, 171.87, -15.25, 0.934)
pt3dadd(-14.52, 171.882, -15.341, 0.968)
pt3dadd(-14.577, 171.918, -15.425, 1.006)
pt3dadd(-14.637, 171.968, -15.505, 1.048)
pt3dadd(-14.656, 172.002, -15.6, 1.08)
pt3dadd(-14.669, 172.036, -15.697, 1.108)
pt3dadd(-14.689, 172.079, -15.791, 1.12)
pt3dadd(-14.712, 172.126, -15.883, 1.128)
pt3dadd(-14.758, 172.198, -15.958, 1.1)
pt3dadd(-14.807, 172.262, -16.036, 1.064)
pt3dadd(-14.859, 172.31, -16.12, 1.01)
pt3dadd(-14.929, 172.375, -16.169, 0.952)
pt3dadd(-15.021, 172.459, -16.175, 0.89)
pt3dadd(-15.118, 172.537, -16.179, 0.848)
pt3dadd(-15.222, 172.607, -16.179, 0.83)
pt3dadd(-15.302, 172.7, -16.196, 0.866)
pt3dadd(-15.379, 172.795, -16.215, 0.906)
pt3dadd(-15.381, 172.801, -16.215, 0.906)
pt3dadd(-15.383, 172.807, -16.216, 0.906)
pt3dadd(-15.455, 172.841, -16.293, 0.972)
pt3dadd(-15.52, 172.876, -16.374, 1.034)
pt3dadd(-15.526, 172.916, -16.47, 1.066)
pt3dadd(-15.534, 172.956, -16.566, 1.1)
pt3dadd(-15.566, 172.973, -16.662, 1.114)
pt3dadd(-15.603, 172.984, -16.758, 1.124)
pt3dadd(-15.641, 173.045, -16.826, 1.13)
pt3dadd(-15.68, 173.154, -16.864, 1.13)
pt3dadd(-15.719, 173.264, -16.903, 1.13)
pt3dadd(-15.753, 173.366, -16.953, 1.122)
pt3dadd(-15.775, 173.448, -17.029, 1.096)
pt3dadd(-15.79, 173.546, -17.08, 1.038)
pt3dadd(-15.792, 173.669, -17.099, 0.966)
pt3dadd(-15.794, 173.791, -17.125, 0.94)
pt3dadd(-15.796, 173.912, -17.151, 0.914)
pt3dadd(-15.798, 174.035, -17.176, 0.888)
pt3dadd(-15.799, 174.156, -17.202, 0.862)
pt3dadd(-15.801, 174.278, -17.228, 0.836)
pt3dadd(-15.803, 174.365, -17.296, 0.802)
pt3dadd(-15.805, 174.438, -17.379, 0.768)
pt3dadd(-15.807, 174.523, -17.453, 0.754)
pt3dadd(-15.809, 174.617, -17.522, 0.754)
pt3dadd(-15.818, 174.724, -17.565, 0.762)
pt3dadd(-15.836, 174.847, -17.58, 0.784)
pt3dadd(-15.857, 174.97, -17.596, 0.804)
pt3dadd(-15.901, 175.079, -17.631, 0.804)
pt3dadd(-15.938, 175.189, -17.67, 0.802)
pt3dadd(-15.94, 175.297, -17.722, 0.788)
pt3dadd(-15.942, 175.405, -17.774, 0.774)
pt3dadd(-15.943, 175.513, -17.827, 0.76)
pt3dadd(-15.945, 175.61, -17.89, 0.734)
pt3dadd(-15.947, 175.698, -17.964, 0.7)
pt3dadd(-15.949, 175.766, -18.047, 0.64)
pt3dadd(-15.951, 175.813, -18.141, 0.564)
pt3dadd(-15.953, 175.865, -18.234, 0.498)
pt3dadd(-15.954, 175.871, -18.234, 0.498)
pt3dadd(-15.956, 175.876, -18.235, 0.498)
pt3dadd(-15.958, 175.882, -18.235, 0.498)
}
dend_7[57] {pt3dclear()
pt3dadd(18.389, 117.464, 8.34, 0.844)
}
}
proc shape3d_179() {
dend_7[57] { pt3dadd(18.408, 117.547, 8.339, 0.844)
pt3dadd(18.516, 117.648, 8.336, 0.848)
pt3dadd(18.624, 117.749, 8.333, 0.852)
pt3dadd(18.732, 117.85, 8.329, 0.856)
pt3dadd(18.839, 117.951, 8.326, 0.862)
pt3dadd(18.947, 118.052, 8.323, 0.866)
pt3dadd(19.055, 118.153, 8.32, 0.87)
pt3dadd(19.162, 118.254, 8.316, 0.874)
pt3dadd(19.27, 118.354, 8.313, 0.878)
pt3dadd(19.378, 118.455, 8.31, 0.884)
pt3dadd(19.486, 118.556, 8.306, 0.888)
pt3dadd(19.593, 118.657, 8.303, 0.892)
pt3dadd(19.701, 118.758, 8.3, 0.896)
pt3dadd(19.706, 118.797, 8.3, 0.896)
pt3dadd(19.711, 118.836, 8.299, 0.896)
pt3dadd(19.819, 118.936, 8.296, 0.902)
pt3dadd(19.893, 119.008, 8.261, 0.904)
pt3dadd(19.898, 119.019, 8.164, 0.904)
pt3dadd(19.903, 119.03, 8.066, 0.904)
pt3dadd(19.908, 119.041, 7.968, 0.904)
pt3dadd(19.914, 119.053, 7.871, 0.904)
pt3dadd(19.919, 119.064, 7.773, 0.904)
pt3dadd(19.924, 119.062, 7.679, 0.904)
pt3dadd(19.929, 119.047, 7.589, 0.904)
pt3dadd(19.941, 119.036, 7.499, 0.904)
pt3dadd(19.972, 119.036, 7.406, 0.904)
pt3dadd(20.022, 119.044, 7.327, 0.904)
pt3dadd(20.028, 119.083, 7.327, 0.904)
pt3dadd(20.033, 119.121, 7.326, 0.904)
pt3dadd(20.151, 119.16, 7.293, 0.904)
pt3dadd(20.27, 119.199, 7.26, 0.904)
pt3dadd(20.371, 119.237, 7.201, 0.904)
pt3dadd(20.47, 119.276, 7.138, 0.904)
pt3dadd(20.566, 119.315, 7.073, 0.904)
pt3dadd(20.662, 119.354, 7.007, 0.904)
pt3dadd(20.757, 119.392, 6.94, 0.904)
pt3dadd(20.845, 119.431, 6.869, 0.904)
pt3dadd(20.896, 119.47, 6.777, 0.904)
pt3dadd(20.948, 119.508, 6.684, 0.904)
pt3dadd(20.972, 119.547, 6.586, 0.904)
pt3dadd(20.977, 119.586, 6.485, 0.904)
pt3dadd(20.982, 119.625, 6.385, 0.904)
pt3dadd(20.987, 119.663, 6.284, 0.904)
pt3dadd(21.053, 119.702, 6.198, 0.904)
pt3dadd(21.119, 119.741, 6.111, 0.904)
pt3dadd(21.233, 119.779, 6.091, 0.904)
pt3dadd(21.358, 119.818, 6.087, 0.904)
pt3dadd(21.483, 119.857, 6.083, 0.904)
pt3dadd(21.608, 119.895, 6.079, 0.904)
pt3dadd(21.733, 119.934, 6.074, 0.904)
pt3dadd(21.857, 119.973, 6.069, 0.904)
pt3dadd(21.863, 120.012, 6.069, 0.904)
pt3dadd(21.961, 120.05, 6.006, 0.904)
pt3dadd(22.049, 120.089, 5.933, 0.904)
pt3dadd(22.129, 120.127, 5.855, 0.904)
pt3dadd(22.224, 120.167, 5.792, 0.904)
pt3dadd(22.337, 120.205, 5.747, 0.904)
pt3dadd(22.452, 120.24, 5.709, 0.904)
pt3dadd(22.574, 120.262, 5.695, 0.904)
pt3dadd(22.697, 120.284, 5.68, 0.904)
pt3dadd(22.8, 120.257, 5.678, 0.904)
pt3dadd(22.898, 120.22, 5.677, 0.904)
pt3dadd(22.999, 120.223, 5.636, 0.904)
pt3dadd(23.1, 120.241, 5.579, 0.904)
pt3dadd(23.139, 120.275, 5.489, 0.904)
pt3dadd(23.146, 120.3, 5.389, 0.904)
pt3dadd(23.151, 120.3, 5.296, 0.904)
pt3dadd(23.156, 120.254, 5.224, 0.904)
pt3dadd(23.161, 120.184, 5.188, 0.904)
pt3dadd(23.203, 120.112, 5.165, 0.904)
pt3dadd(23.248, 120.04, 5.143, 0.904)
pt3dadd(23.318, 120.012, 5.084, 0.904)
pt3dadd(23.388, 119.992, 5.016, 0.904)
pt3dadd(23.463, 119.983, 4.953, 0.904)
pt3dadd(23.565, 119.968, 4.914, 0.904)
pt3dadd(23.667, 119.954, 4.874, 0.904)
pt3dadd(23.769, 119.939, 4.835, 0.904)
pt3dadd(23.874, 119.938, 4.794, 0.904)
pt3dadd(23.986, 119.977, 4.749, 0.904)
pt3dadd(24.099, 120.016, 4.704, 0.904)
pt3dadd(24.211, 120.054, 4.659, 0.904)
pt3dadd(24.324, 120.092, 4.614, 0.904)
pt3dadd(24.436, 120.132, 4.568, 0.904)
pt3dadd(24.535, 120.17, 4.506, 0.904)
pt3dadd(24.634, 120.209, 4.443, 0.904)
pt3dadd(24.755, 120.247, 4.421, 0.904)
pt3dadd(24.878, 120.287, 4.404, 0.904)
pt3dadd(24.996, 120.341, 4.428, 0.904)
pt3dadd(25.114, 120.398, 4.459, 0.904)
pt3dadd(25.228, 120.481, 4.467, 0.904)
pt3dadd(25.341, 120.574, 4.467, 0.904)
pt3dadd(25.446, 120.677, 4.467, 0.904)
pt3dadd(25.546, 120.79, 4.466, 0.904)
pt3dadd(25.654, 120.889, 4.466, 0.904)
pt3dadd(25.763, 120.989, 4.466, 0.904)
pt3dadd(25.872, 121.072, 4.435, 0.904)
pt3dadd(25.982, 121.152, 4.399, 0.904)
pt3dadd(26.093, 121.187, 4.353, 0.904)
pt3dadd(26.204, 121.219, 4.306, 0.904)
pt3dadd(26.316, 121.218, 4.279, 0.904)
pt3dadd(26.428, 121.21, 4.256, 0.904)
pt3dadd(26.539, 121.232, 4.212, 0.904)
pt3dadd(26.633, 121.266, 4.149, 0.904)
pt3dadd(26.706, 121.304, 4.066, 0.904)
pt3dadd(26.792, 121.343, 3.997, 0.904)
pt3dadd(26.91, 121.382, 3.964, 0.904)
pt3dadd(27.029, 121.421, 3.931, 0.904)
pt3dadd(27.105, 121.459, 3.852, 0.904)
pt3dadd(27.178, 121.498, 3.769, 0.904)
pt3dadd(27.204, 121.525, 3.673, 0.904)
pt3dadd(27.214, 121.548, 3.574, 0.904)
pt3dadd(27.223, 121.56, 3.478, 0.904)
pt3dadd(27.228, 121.524, 3.4, 0.904)
pt3dadd(27.252, 121.487, 3.326, 0.904)
pt3dadd(27.308, 121.494, 3.24, 0.904)
pt3dadd(27.351, 121.529, 3.145, 0.904)
pt3dadd(27.371, 121.567, 3.046, 0.904)
pt3dadd(27.396, 121.602, 2.947, 0.904)
pt3dadd(27.465, 121.609, 2.873, 0.904)
pt3dadd(27.574, 121.595, 2.857, 0.904)
pt3dadd(27.696, 121.609, 2.856, 0.904)
pt3dadd(27.82, 121.642, 2.849, 0.904)
pt3dadd(27.942, 121.68, 2.827, 0.904)
pt3dadd(28.056, 121.718, 2.784, 0.904)
pt3dadd(28.164, 121.758, 2.733, 0.904)
pt3dadd(28.237, 121.796, 2.653, 0.904)
pt3dadd(28.242, 121.835, 2.652, 0.904)
pt3dadd(28.266, 121.873, 2.554, 0.904)
pt3dadd(28.271, 121.913, 2.453, 0.904)
pt3dadd(28.276, 121.951, 2.353, 0.904)
pt3dadd(28.281, 121.99, 2.253, 0.904)
pt3dadd(28.286, 122.148, 2.252, 1.102)
pt3dadd(28.292, 122.308, 2.252, 1.072)
pt3dadd(28.297, 122.466, 2.252, 1.044)
pt3dadd(28.302, 122.624, 2.251, 1.016)
pt3dadd(28.307, 122.783, 2.251, 0.986)
pt3dadd(28.312, 122.942, 2.251, 0.958)
pt3dadd(28.317, 123.101, 2.25, 0.93)
pt3dadd(28.323, 123.139, 2.25, 0.93)
pt3dadd(28.388, 123.282, 2.249, 0.92)
pt3dadd(28.453, 123.425, 2.249, 0.91)
pt3dadd(28.518, 123.568, 2.249, 0.9)
pt3dadd(28.583, 123.71, 2.248, 0.89)
pt3dadd(28.648, 123.853, 2.248, 0.88)
pt3dadd(28.74, 123.973, 2.248, 0.878)
pt3dadd(28.836, 124.09, 2.247, 0.878)
pt3dadd(28.933, 124.206, 2.247, 0.878)
pt3dadd(29.029, 124.324, 2.247, 0.878)
pt3dadd(29.125, 124.44, 2.246, 0.878)
pt3dadd(29.18, 124.586, 2.246, 0.896)
pt3dadd(29.229, 124.738, 2.246, 0.914)
pt3dadd(29.279, 124.888, 2.245, 0.934)
pt3dadd(29.328, 125.038, 2.245, 0.952)
pt3dadd(29.378, 125.188, 2.244, 0.97)
pt3dadd(29.383, 125.226, 2.244, 0.97)
pt3dadd(29.43, 125.377, 2.244, 0.974)
pt3dadd(29.476, 125.53, 2.243, 0.962)
pt3dadd(29.521, 125.681, 2.243, 0.946)
pt3dadd(29.566, 125.833, 2.243, 0.904)
pt3dadd(29.611, 125.984, 2.242, 0.862)
pt3dadd(29.628, 126.137, 2.214, 0.818)
pt3dadd(29.639, 126.288, 2.179, 0.772)
pt3dadd(29.657, 126.404, 2.113, 0.76)
pt3dadd(29.683, 126.497, 2.025, 0.772)
pt3dadd(29.72, 126.614, 1.961, 0.8)
pt3dadd(29.769, 126.752, 1.918, 0.842)
pt3dadd(29.817, 126.89, 1.874, 0.882)
pt3dadd(29.822, 126.929, 1.874, 0.882)
pt3dadd(29.903, 127.037, 1.846, 0.924)
pt3dadd(30.022, 127.111, 1.835, 0.97)
pt3dadd(30.131, 127.194, 1.814, 1.004)
pt3dadd(30.203, 127.315, 1.769, 0.984)
pt3dadd(30.275, 127.442, 1.732, 0.954)
pt3dadd(30.346, 127.571, 1.694, 0.926)
pt3dadd(30.419, 127.699, 1.657, 0.894)
pt3dadd(30.492, 127.826, 1.621, 0.86)
pt3dadd(30.567, 127.954, 1.586, 0.818)
pt3dadd(30.642, 128.081, 1.551, 0.776)
pt3dadd(30.717, 128.208, 1.517, 0.734)
pt3dadd(30.784, 128.335, 1.476, 0.696)
pt3dadd(30.827, 128.462, 1.415, 0.666)
pt3dadd(30.87, 128.588, 1.354, 0.636)
pt3dadd(30.912, 128.716, 1.294, 0.608)
pt3dadd(30.955, 128.842, 1.233, 0.578)
pt3dadd(31.006, 128.947, 1.158, 0.564)
pt3dadd(31.065, 129.053, 1.092, 0.558)
pt3dadd(31.159, 129.158, 1.054, 0.586)
pt3dadd(31.255, 129.268, 1.032, 0.612)
pt3dadd(31.354, 129.382, 1.032, 0.636)
pt3dadd(31.442, 129.504, 1.032, 0.652)
pt3dadd(31.5, 129.65, 1.031, 0.652)
pt3dadd(31.558, 129.797, 1.031, 0.652)
pt3dadd(31.595, 129.95, 1.03, 0.636)
pt3dadd(31.636, 130.104, 1.03, 0.628)
pt3dadd(31.681, 130.255, 1.03, 0.628)
pt3dadd(31.724, 130.408, 1.029, 0.63)
pt3dadd(31.734, 130.567, 1.029, 0.666)
pt3dadd(31.743, 130.726, 1.029, 0.7)
pt3dadd(31.763, 130.882, 1.027, 0.742)
pt3dadd(31.823, 131.026, 1.022, 0.812)
}
}
proc shape3d_180() {
dend_7[57] { pt3dadd(31.885, 131.17, 1.014, 0.882)
pt3dadd(31.96, 131.285, 0.963, 0.954)
pt3dadd(32.025, 131.396, 0.904, 1.006)
pt3dadd(32.07, 131.502, 0.826, 1.016)
pt3dadd(32.114, 131.606, 0.749, 1.024)
pt3dadd(32.164, 131.699, 0.67, 1.026)
pt3dadd(32.23, 131.758, 0.585, 1.014)
pt3dadd(32.309, 131.816, 0.51, 0.982)
pt3dadd(32.363, 131.892, 0.434, 0.948)
pt3dadd(32.387, 131.978, 0.343, 0.936)
pt3dadd(32.412, 132.065, 0.253, 0.926)
pt3dadd(32.436, 132.15, 0.162, 0.916)
pt3dadd(32.46, 132.236, 0.071, 0.906)
pt3dadd(32.499, 132.282, -0.024, 0.888)
pt3dadd(32.54, 132.322, -0.12, 0.872)
pt3dadd(32.582, 132.36, -0.216, 0.852)
pt3dadd(32.623, 132.398, -0.312, 0.836)
pt3dadd(32.664, 132.438, -0.407, 0.816)
pt3dadd(32.697, 132.476, -0.504, 0.8)
pt3dadd(32.707, 132.515, -0.605, 0.782)
pt3dadd(32.717, 132.553, -0.705, 0.764)
pt3dadd(32.742, 132.608, -0.799, 0.748)
pt3dadd(32.798, 132.69, -0.883, 0.734)
pt3dadd(32.866, 132.761, -0.963, 0.734)
pt3dadd(32.947, 132.82, -1.038, 0.748)
pt3dadd(33.05, 132.87, -1.09, 0.746)
pt3dadd(33.168, 132.916, -1.125, 0.736)
pt3dadd(33.277, 132.984, -1.152, 0.726)
pt3dadd(33.371, 133.103, -1.162, 0.718)
pt3dadd(33.465, 133.222, -1.173, 0.71)
pt3dadd(33.558, 133.34, -1.183, 0.704)
pt3dadd(33.595, 133.495, -1.184, 0.682)
pt3dadd(33.633, 133.649, -1.184, 0.662)
pt3dadd(33.684, 133.799, -1.184, 0.614)
pt3dadd(33.726, 133.951, -1.185, 0.586)
pt3dadd(33.731, 133.99, -1.185, 0.586)
pt3dadd(33.769, 134.144, -1.185, 0.564)
pt3dadd(33.808, 134.298, -1.188, 0.548)
pt3dadd(33.846, 134.452, -1.193, 0.538)
pt3dadd(33.884, 134.602, -1.203, 0.528)
pt3dadd(33.889, 134.723, -1.277, 0.54)
pt3dadd(33.894, 134.843, -1.351, 0.552)
pt3dadd(33.899, 134.98, -1.408, 0.564)
pt3dadd(33.905, 135.118, -1.465, 0.576)
pt3dadd(33.946, 135.236, -1.531, 0.598)
pt3dadd(33.995, 135.352, -1.599, 0.624)
pt3dadd(34.046, 135.467, -1.666, 0.648)
pt3dadd(34.092, 135.518, -1.757, 0.67)
pt3dadd(34.137, 135.558, -1.851, 0.692)
pt3dadd(34.185, 135.602, -1.944, 0.708)
pt3dadd(34.237, 135.655, -2.036, 0.716)
pt3dadd(34.29, 135.708, -2.127, 0.726)
pt3dadd(34.387, 135.778, -2.168, 0.712)
pt3dadd(34.503, 135.853, -2.184, 0.688)
pt3dadd(34.626, 135.91, -2.192, 0.652)
pt3dadd(34.745, 135.972, -2.202, 0.628)
pt3dadd(34.86, 136.056, -2.221, 0.628)
pt3dadd(34.973, 136.14, -2.24, 0.628)
pt3dadd(35.087, 136.223, -2.259, 0.628)
pt3dadd(35.202, 136.307, -2.278, 0.628)
pt3dadd(35.281, 136.434, -2.287, 0.638)
pt3dadd(35.35, 136.574, -2.293, 0.65)
pt3dadd(35.435, 136.698, -2.306, 0.662)
pt3dadd(35.532, 136.812, -2.324, 0.674)
pt3dadd(35.616, 136.932, -2.357, 0.678)
pt3dadd(35.696, 137.053, -2.394, 0.678)
pt3dadd(35.77, 137.161, -2.452, 0.678)
pt3dadd(35.828, 137.266, -2.517, 0.674)
pt3dadd(35.834, 137.358, -2.607, 0.658)
pt3dadd(35.839, 137.422, -2.704, 0.64)
pt3dadd(35.844, 137.476, -2.804, 0.62)
pt3dadd(35.85, 137.53, -2.903, 0.6)
pt3dadd(35.882, 137.608, -2.995, 0.564)
pt3dadd(35.912, 137.686, -3.088, 0.528)
pt3dadd(36.01, 137.795, -3.112, 0.5)
pt3dadd(36.098, 137.909, -3.138, 0.474)
pt3dadd(36.112, 138.053, -3.187, 0.456)
}
}
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()
}
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, 14 dend_0[i] all.append()
for i=0, 26 apic[i] all.append()
for i=0, 17 dend_5[i] all.append()
for i=0, 57 dend_7[i] all.append()
dendritic_0 = new SectionList()
for i=0, 14 dend_0[i] dendritic_0.append()
somatic = new SectionList()
soma somatic.append()
apical = new SectionList()
for i=0, 26 apic[i] apical.append()
dendritic_5 = new SectionList()
for i=0, 17 dend_5[i] dendritic_5.append()
dendritic_7 = new SectionList()
for i=0, 57 dend_7[i] dendritic_7.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()