proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend_0[9], dend_7[35], apic[29], dend_5[20]
proc topol() { local i
connect dend_0(0), soma(0.5)
for i = 1, 5 connect dend_0[i](0), dend_0(1)
for i = 6, 7 connect dend_0[i](0), dend_0[5](1)
connect dend_0[8](0), soma(0.5)
connect dend_7(0), dend_0[1](1)
for i = 1, 3 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[4](0), dend_7[2](1)
connect dend_7[5](0), dend_7[1](1)
connect dend_7[6](0), dend_7(1)
connect dend_7[7](0), dend_0[2](1)
for i = 8, 9 connect dend_7[i](0), dend_7[7](1)
connect dend_7[10](0), dend_0[3](1)
for i = 11, 12 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[13](0), dend_7[11](1)
connect dend_7[14](0), dend_7[10](1)
for i = 15, 16 connect dend_7[i](0), dend_7[14](1)
connect dend_7[17](0), dend_7[10](1)
connect dend_7[18](0), dend_0[6](1)
for i = 19, 20 connect dend_7[i](0), dend_7[18](1)
for i = 21, 22 connect dend_7[i](0), dend_0[i-14](1)
for i = 23, 24 connect dend_7[i](0), dend_7[i-1](1)
connect dend_7[25](0), dend_7[23](1)
connect dend_7[26](0), dend_7[22](1)
for i = 27, 28 connect dend_7[i](0), dend_7[26](1)
for i = 29, 30 connect dend_7[i](0), dend_7[28](1)
for i = 31, 32 connect dend_7[i](0), dend_7[30](1)
for i = 33, 34 connect dend_7[i](0), dend_7[32](1)
connect apic(0), dend_0[4](1)
for i = 1, 2 connect apic[i](0), apic[i-1](1)
connect apic[3](0), apic[1](1)
connect apic[4](0), apic(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)
for i = 10, 11 connect apic[i](0), apic[9](1)
connect apic[12](0), apic[4](1)
for i = 13, 16 connect apic[i](0), apic[i-1](1)
connect apic[17](0), apic[15](1)
for i = 18, 19 connect apic[i](0), apic[i-1](1)
connect apic[20](0), apic[18](1)
connect apic[21](0), apic[17](1)
connect apic[22](0), apic[14](1)
connect apic[23](0), apic[13](1)
connect apic[24](0), apic[12](1)
for i = 25, 26 connect apic[i](0), apic[i-1](1)
connect apic[27](0), apic[25](1)
connect apic[28](0), apic[24](1)
connect dend_5(0), apic[20](1)
for i = 1, 3 connect dend_5[i](0), dend_5[i-1](1)
connect dend_5[4](0), dend_5[2](1)
connect dend_5[5](0), dend_5[1](1)
for i = 6, 7 connect dend_5[i](0), dend_5[5](1)
connect dend_5[8](0), dend_5(1)
for i = 9, 10 connect dend_5[i](0), dend_5[8](1)
for i = 11, 12 connect dend_5[i](0), dend_5[10](1)
connect dend_5[13](0), apic[21](1)
for i = 14, 15 connect dend_5[i](0), dend_5[i-1](1)
connect dend_5[16](0), dend_5[14](1)
connect dend_5[17](0), dend_5[13](1)
for i = 18, 19 connect dend_5[i](0), dend_5[17](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(99.058, 131.107, 13.601, 13.096)
pt3dadd(105.606, 131.107, 13.601, 13.096)
pt3dadd(112.154, 131.107, 13.601, 13.096)
}
dend_0 {pt3dclear()
pt3dstyle(1, 105.606, 131.107, 13.601)
pt3dadd(105.606, 131.226, 13.584, 13.15)
pt3dadd(105.606, 131.345, 13.568, 13.2)
pt3dadd(105.606, 131.462, 13.552, 13.252)
pt3dadd(105.606, 131.581, 13.536, 13.304)
pt3dadd(105.606, 131.652, 13.526, 13.334)
}
dend_0[1] {pt3dclear()
pt3dadd(105.606, 131.652, 13.526, 13.334)
pt3dadd(105.659, 131.652, 13.57, 13.248)
pt3dadd(105.744, 131.652, 13.641, 13.112)
pt3dadd(105.829, 131.652, 13.712, 12.976)
pt3dadd(105.914, 131.652, 13.783, 12.84)
pt3dadd(105.998, 131.652, 13.853, 12.704)
pt3dadd(106.083, 131.652, 13.924, 12.568)
pt3dadd(106.168, 131.652, 13.995, 12.434)
pt3dadd(106.253, 131.652, 14.066, 12.298)
pt3dadd(106.338, 131.652, 14.136, 12.162)
pt3dadd(106.423, 131.652, 14.207, 12.026)
pt3dadd(106.507, 131.652, 14.278, 11.89)
pt3dadd(106.592, 131.652, 14.348, 11.754)
pt3dadd(106.677, 131.652, 14.419, 11.618)
pt3dadd(106.762, 131.652, 14.49, 11.482)
pt3dadd(106.847, 131.652, 14.561, 11.346)
pt3dadd(106.932, 131.731, 14.584, 11.144)
pt3dadd(107.017, 131.81, 14.607, 10.942)
pt3dadd(107.102, 131.891, 14.63, 10.74)
pt3dadd(107.187, 131.971, 14.652, 10.536)
pt3dadd(107.272, 132.05, 14.675, 10.334)
pt3dadd(107.358, 132.131, 14.698, 10.132)
pt3dadd(107.443, 132.211, 14.721, 9.93)
pt3dadd(107.528, 132.292, 14.744, 9.726)
pt3dadd(107.613, 132.371, 14.766, 9.524)
pt3dadd(107.691, 132.461, 14.778, 9.326)
pt3dadd(107.767, 132.553, 14.787, 9.128)
pt3dadd(107.844, 132.644, 14.796, 8.93)
pt3dadd(107.92, 132.737, 14.804, 8.734)
pt3dadd(107.996, 132.829, 14.813, 8.536)
pt3dadd(108.072, 132.92, 14.822, 8.338)
pt3dadd(108.149, 133.013, 14.831, 8.142)
pt3dadd(108.225, 133.105, 14.839, 7.944)
pt3dadd(108.301, 133.196, 14.848, 7.746)
pt3dadd(108.378, 133.289, 14.857, 7.55)
pt3dadd(108.452, 133.382, 14.867, 7.36)
pt3dadd(108.525, 133.476, 14.877, 7.174)
pt3dadd(108.599, 133.571, 14.887, 6.988)
pt3dadd(108.672, 133.664, 14.898, 6.802)
pt3dadd(108.746, 133.759, 14.908, 6.616)
pt3dadd(108.819, 133.853, 14.918, 6.428)
pt3dadd(108.892, 133.948, 14.929, 6.242)
pt3dadd(108.966, 134.041, 14.939, 6.056)
pt3dadd(109.039, 134.135, 14.949, 5.87)
pt3dadd(109.113, 134.23, 14.959, 5.684)
pt3dadd(109.171, 134.329, 14.984, 5.52)
pt3dadd(109.226, 134.43, 15.013, 5.362)
pt3dadd(109.28, 134.532, 15.042, 5.202)
pt3dadd(109.335, 134.633, 15.07, 5.044)
pt3dadd(109.389, 134.734, 15.099, 4.886)
pt3dadd(109.444, 134.836, 15.128, 4.728)
pt3dadd(109.498, 134.936, 15.156, 4.57)
pt3dadd(109.553, 135.037, 15.185, 4.412)
pt3dadd(109.608, 135.139, 15.214, 4.254)
pt3dadd(109.662, 135.24, 15.242, 4.096)
pt3dadd(109.707, 135.346, 15.272, 3.99)
pt3dadd(109.75, 135.451, 15.302, 3.892)
pt3dadd(109.793, 135.557, 15.332, 3.794)
pt3dadd(109.837, 135.664, 15.362, 3.694)
pt3dadd(109.88, 135.769, 15.392, 3.596)
pt3dadd(109.923, 135.875, 15.422, 3.498)
pt3dadd(109.967, 135.982, 15.452, 3.4)
pt3dadd(110.01, 136.087, 15.482, 3.3)
pt3dadd(110.053, 136.193, 15.512, 3.202)
pt3dadd(110.097, 136.3, 15.542, 3.104)
pt3dadd(110.136, 136.409, 15.564, 3.074)
pt3dadd(110.174, 136.52, 15.585, 3.048)
pt3dadd(110.213, 136.631, 15.607, 3.024)
pt3dadd(110.251, 136.741, 15.628, 2.998)
pt3dadd(110.29, 136.852, 15.65, 2.974)
pt3dadd(110.328, 136.963, 15.671, 2.948)
pt3dadd(110.367, 137.074, 15.693, 2.922)
pt3dadd(110.405, 137.184, 15.714, 2.898)
pt3dadd(110.444, 137.294, 15.736, 2.872)
pt3dadd(110.482, 137.406, 15.757, 2.848)
pt3dadd(110.54, 137.51, 15.767, 2.768)
pt3dadd(110.599, 137.614, 15.777, 2.684)
pt3dadd(110.658, 137.718, 15.787, 2.6)
pt3dadd(110.716, 137.822, 15.796, 2.518)
pt3dadd(110.775, 137.926, 15.806, 2.434)
}
dend_7 {pt3dclear()
pt3dadd(110.775, 137.926, 15.806, 2.434)
pt3dadd(110.834, 138.03, 15.816, 2.352)
pt3dadd(110.893, 138.133, 15.825, 2.268)
pt3dadd(110.951, 138.238, 15.835, 2.184)
pt3dadd(111.01, 138.342, 15.844, 2.102)
pt3dadd(111.069, 138.445, 15.854, 2.018)
pt3dadd(111.138, 138.544, 15.857, 2.006)
pt3dadd(111.207, 138.642, 15.859, 1.996)
pt3dadd(111.276, 138.739, 15.862, 1.988)
pt3dadd(111.346, 138.838, 15.864, 1.978)
pt3dadd(111.415, 138.936, 15.866, 1.968)
pt3dadd(111.484, 139.033, 15.869, 1.96)
pt3dadd(111.554, 139.132, 15.871, 1.95)
pt3dadd(111.623, 139.229, 15.873, 1.942)
pt3dadd(111.693, 139.327, 15.876, 1.932)
pt3dadd(111.762, 139.424, 15.878, 1.924)
pt3dadd(111.831, 139.523, 15.878, 1.93)
pt3dadd(111.9, 139.621, 15.878, 1.936)
pt3dadd(111.97, 139.718, 15.878, 1.942)
pt3dadd(112.039, 139.817, 15.878, 1.95)
pt3dadd(112.108, 139.915, 15.878, 1.956)
pt3dadd(112.177, 140.012, 15.878, 1.962)
pt3dadd(112.247, 140.111, 15.878, 1.968)
pt3dadd(112.316, 140.209, 15.878, 1.976)
pt3dadd(112.385, 140.306, 15.878, 1.982)
pt3dadd(112.455, 140.405, 15.878, 1.988)
pt3dadd(112.514, 140.509, 15.878, 1.972)
pt3dadd(112.574, 140.612, 15.878, 1.956)
pt3dadd(112.634, 140.717, 15.878, 1.938)
pt3dadd(112.694, 140.821, 15.878, 1.922)
pt3dadd(112.754, 140.924, 15.878, 1.906)
pt3dadd(112.814, 141.029, 15.878, 1.888)
pt3dadd(112.873, 141.133, 15.878, 1.872)
pt3dadd(112.933, 141.236, 15.878, 1.856)
pt3dadd(112.993, 141.341, 15.878, 1.838)
pt3dadd(113.053, 141.445, 15.878, 1.822)
pt3dadd(113.121, 141.544, 15.878, 1.806)
pt3dadd(113.189, 141.643, 15.878, 1.79)
pt3dadd(113.257, 141.742, 15.878, 1.774)
pt3dadd(113.325, 141.84, 15.878, 1.758)
pt3dadd(113.393, 141.94, 15.878, 1.742)
pt3dadd(113.461, 142.038, 15.878, 1.726)
pt3dadd(113.529, 142.136, 15.878, 1.712)
pt3dadd(113.597, 142.236, 15.878, 1.696)
pt3dadd(113.665, 142.334, 15.878, 1.68)
pt3dadd(113.733, 142.434, 15.878, 1.664)
pt3dadd(113.804, 142.53, 15.878, 1.656)
pt3dadd(113.875, 142.627, 15.878, 1.648)
pt3dadd(113.946, 142.724, 15.878, 1.64)
pt3dadd(114.017, 142.822, 15.878, 1.632)
pt3dadd(114.087, 142.918, 15.878, 1.622)
pt3dadd(114.158, 143.015, 15.878, 1.614)
pt3dadd(114.229, 143.112, 15.878, 1.606)
pt3dadd(114.3, 143.208, 15.878, 1.598)
pt3dadd(114.371, 143.305, 15.878, 1.59)
pt3dadd(114.441, 143.402, 15.878, 1.582)
pt3dadd(114.515, 143.497, 15.878, 1.582)
pt3dadd(114.588, 143.593, 15.878, 1.582)
pt3dadd(114.661, 143.688, 15.878, 1.582)
pt3dadd(114.734, 143.783, 15.878, 1.582)
pt3dadd(114.807, 143.878, 15.878, 1.582)
pt3dadd(114.88, 143.974, 15.878, 1.582)
pt3dadd(114.953, 144.068, 15.878, 1.582)
pt3dadd(115.026, 144.163, 15.878, 1.582)
pt3dadd(115.099, 144.259, 15.878, 1.582)
pt3dadd(115.172, 144.354, 15.878, 1.582)
}
dend_7[1] {pt3dclear()
pt3dadd(115.172, 144.354, 15.878, 1.582)
pt3dadd(115.197, 144.386, 15.878, 1.604)
pt3dadd(115.27, 144.482, 15.878, 1.664)
pt3dadd(115.343, 144.577, 15.878, 1.726)
pt3dadd(115.416, 144.673, 15.878, 1.786)
pt3dadd(115.489, 144.768, 15.878, 1.848)
pt3dadd(115.561, 144.864, 15.878, 1.908)
pt3dadd(115.634, 144.959, 15.878, 1.97)
pt3dadd(115.703, 145.057, 15.878, 2.006)
pt3dadd(115.771, 145.156, 15.878, 2.038)
pt3dadd(115.839, 145.255, 15.878, 2.07)
pt3dadd(115.907, 145.354, 15.878, 2.102)
pt3dadd(115.975, 145.453, 15.878, 2.134)
pt3dadd(116.043, 145.552, 15.878, 2.166)
pt3dadd(116.111, 145.65, 15.878, 2.198)
pt3dadd(116.179, 145.75, 15.878, 2.23)
pt3dadd(116.247, 145.848, 15.878, 2.262)
pt3dadd(116.315, 145.948, 15.878, 2.294)
pt3dadd(116.361, 146.058, 15.878, 2.206)
pt3dadd(116.402, 146.17, 15.878, 2.098)
pt3dadd(116.444, 146.282, 15.878, 1.988)
pt3dadd(116.486, 146.395, 15.878, 1.88)
pt3dadd(116.528, 146.508, 15.878, 1.772)
pt3dadd(116.57, 146.62, 15.878, 1.664)
pt3dadd(116.612, 146.732, 15.878, 1.556)
pt3dadd(116.654, 146.845, 15.878, 1.448)
pt3dadd(116.696, 146.957, 15.878, 1.34)
pt3dadd(116.737, 147.07, 15.878, 1.232)
pt3dadd(116.759, 147.187, 15.878, 1.21)
pt3dadd(116.778, 147.306, 15.878, 1.202)
pt3dadd(116.797, 147.425, 15.878, 1.192)
pt3dadd(116.816, 147.544, 15.878, 1.184)
pt3dadd(116.834, 147.661, 15.878, 1.174)
pt3dadd(116.853, 147.78, 15.878, 1.166)
pt3dadd(116.872, 147.899, 15.878, 1.158)
pt3dadd(116.891, 148.018, 15.878, 1.148)
pt3dadd(116.909, 148.135, 15.878, 1.14)
pt3dadd(116.928, 148.254, 15.878, 1.132)
pt3dadd(116.94, 148.374, 15.878, 1.13)
pt3dadd(116.95, 148.493, 15.878, 1.13)
pt3dadd(116.961, 148.613, 15.878, 1.13)
pt3dadd(116.971, 148.733, 15.878, 1.13)
pt3dadd(116.982, 148.852, 15.878, 1.13)
pt3dadd(116.993, 148.972, 15.878, 1.13)
pt3dadd(117.003, 149.09, 15.878, 1.13)
pt3dadd(117.014, 149.21, 15.878, 1.13)
}
}
proc shape3d_2() {
dend_7[1] { pt3dadd(117.024, 149.33, 15.878, 1.13)
pt3dadd(117.035, 149.449, 15.878, 1.13)
pt3dadd(117.046, 149.569, 15.878, 1.12)
pt3dadd(117.057, 149.688, 15.878, 1.11)
pt3dadd(117.069, 149.808, 15.878, 1.1)
pt3dadd(117.08, 149.927, 15.878, 1.09)
pt3dadd(117.092, 150.047, 15.878, 1.078)
pt3dadd(117.103, 150.167, 15.878, 1.068)
pt3dadd(117.114, 150.286, 15.878, 1.058)
pt3dadd(117.126, 150.406, 15.878, 1.048)
pt3dadd(117.137, 150.524, 15.878, 1.036)
pt3dadd(117.149, 150.644, 15.878, 1.026)
pt3dadd(117.173, 150.762, 15.878, 1.032)
pt3dadd(117.198, 150.878, 15.878, 1.04)
pt3dadd(117.224, 150.996, 15.878, 1.046)
pt3dadd(117.249, 151.114, 15.878, 1.054)
pt3dadd(117.275, 151.23, 15.878, 1.062)
pt3dadd(117.3, 151.348, 15.878, 1.07)
pt3dadd(117.326, 151.465, 15.878, 1.078)
pt3dadd(117.351, 151.583, 15.878, 1.086)
pt3dadd(117.377, 151.699, 15.878, 1.092)
pt3dadd(117.402, 151.817, 15.878, 1.1)
pt3dadd(117.445, 151.93, 15.878, 1.146)
pt3dadd(117.488, 152.041, 15.878, 1.192)
pt3dadd(117.531, 152.153, 15.878, 1.238)
pt3dadd(117.574, 152.266, 15.878, 1.284)
pt3dadd(117.617, 152.377, 15.878, 1.33)
pt3dadd(117.66, 152.489, 15.878, 1.378)
pt3dadd(117.703, 152.602, 15.878, 1.424)
pt3dadd(117.746, 152.713, 15.878, 1.47)
pt3dadd(117.789, 152.825, 15.878, 1.516)
pt3dadd(117.832, 152.938, 15.878, 1.562)
pt3dadd(117.861, 153.054, 15.878, 1.544)
pt3dadd(117.89, 153.17, 15.878, 1.526)
pt3dadd(117.919, 153.287, 15.878, 1.508)
pt3dadd(117.947, 153.403, 15.878, 1.488)
pt3dadd(117.976, 153.52, 15.878, 1.47)
pt3dadd(118.005, 153.636, 15.878, 1.452)
pt3dadd(118.034, 153.752, 15.878, 1.432)
pt3dadd(118.063, 153.869, 15.878, 1.414)
pt3dadd(118.092, 153.985, 15.878, 1.396)
pt3dadd(118.12, 154.102, 15.878, 1.376)
pt3dadd(118.136, 154.222, 15.878, 1.358)
pt3dadd(118.151, 154.34, 15.878, 1.338)
pt3dadd(118.166, 154.459, 15.878, 1.32)
pt3dadd(118.182, 154.578, 15.878, 1.3)
pt3dadd(118.197, 154.697, 15.878, 1.282)
pt3dadd(118.212, 154.817, 15.878, 1.262)
pt3dadd(118.227, 154.936, 15.878, 1.244)
pt3dadd(118.242, 155.054, 15.878, 1.224)
pt3dadd(118.258, 155.173, 15.878, 1.206)
pt3dadd(118.273, 155.292, 15.878, 1.186)
pt3dadd(118.277, 155.412, 15.878, 1.22)
pt3dadd(118.282, 155.532, 15.878, 1.256)
pt3dadd(118.286, 155.652, 15.878, 1.29)
pt3dadd(118.29, 155.772, 15.878, 1.326)
pt3dadd(118.294, 155.892, 15.878, 1.36)
pt3dadd(118.298, 156.012, 15.878, 1.396)
pt3dadd(118.303, 156.132, 15.878, 1.432)
pt3dadd(118.307, 156.252, 15.878, 1.466)
pt3dadd(118.311, 156.372, 15.878, 1.502)
pt3dadd(118.315, 156.492, 15.878, 1.536)
pt3dadd(118.316, 156.612, 15.878, 1.524)
pt3dadd(118.316, 156.732, 15.878, 1.51)
pt3dadd(118.317, 156.852, 15.878, 1.496)
pt3dadd(118.318, 156.972, 15.878, 1.482)
pt3dadd(118.318, 157.092, 15.878, 1.47)
pt3dadd(118.319, 157.212, 15.878, 1.456)
pt3dadd(118.319, 157.332, 15.878, 1.442)
pt3dadd(118.32, 157.452, 15.878, 1.428)
pt3dadd(118.321, 157.572, 15.878, 1.416)
pt3dadd(118.321, 157.692, 15.878, 1.402)
pt3dadd(118.322, 157.812, 15.878, 1.338)
pt3dadd(118.323, 157.932, 15.878, 1.276)
pt3dadd(118.324, 158.052, 15.879, 1.212)
pt3dadd(118.326, 158.172, 15.879, 1.148)
pt3dadd(118.327, 158.292, 15.879, 1.086)
pt3dadd(118.328, 158.412, 15.879, 1.022)
pt3dadd(118.329, 158.532, 15.879, 0.958)
pt3dadd(118.33, 158.652, 15.879, 0.896)
pt3dadd(118.331, 158.772, 15.879, 0.832)
pt3dadd(118.332, 158.892, 15.879, 0.768)
pt3dadd(118.334, 159.012, 15.879, 0.75)
pt3dadd(118.336, 159.132, 15.879, 0.732)
pt3dadd(118.338, 159.252, 15.879, 0.714)
pt3dadd(118.341, 159.372, 15.879, 0.696)
pt3dadd(118.343, 159.492, 15.879, 0.678)
pt3dadd(118.345, 159.612, 15.879, 0.66)
pt3dadd(118.347, 159.731, 15.879, 0.642)
pt3dadd(118.349, 159.851, 15.879, 0.624)
pt3dadd(118.351, 159.971, 15.879, 0.606)
pt3dadd(118.354, 160.091, 15.879, 0.588)
pt3dadd(118.357, 160.211, 15.879, 0.664)
pt3dadd(118.361, 160.331, 15.879, 0.742)
pt3dadd(118.364, 160.451, 15.879, 0.818)
pt3dadd(118.368, 160.571, 15.879, 0.896)
pt3dadd(118.372, 160.691, 15.879, 0.972)
pt3dadd(118.375, 160.811, 15.879, 1.048)
pt3dadd(118.379, 160.931, 15.879, 1.126)
pt3dadd(118.382, 161.051, 15.88, 1.202)
pt3dadd(118.386, 161.171, 15.88, 1.28)
pt3dadd(118.39, 161.291, 15.88, 1.356)
}
dend_7[2] {pt3dclear()
pt3dadd(118.39, 161.291, 15.88, 1.356)
pt3dadd(118.396, 161.377, 15.88, 1.314)
pt3dadd(118.405, 161.497, 15.88, 1.258)
pt3dadd(118.414, 161.616, 15.88, 1.2)
pt3dadd(118.423, 161.736, 15.88, 1.142)
pt3dadd(118.432, 161.856, 15.88, 1.084)
pt3dadd(118.441, 161.975, 15.88, 1.026)
pt3dadd(118.451, 162.095, 15.881, 0.984)
pt3dadd(118.462, 162.215, 15.881, 0.97)
pt3dadd(118.474, 162.334, 15.881, 0.956)
pt3dadd(118.486, 162.454, 15.881, 0.944)
pt3dadd(118.497, 162.572, 15.882, 0.93)
pt3dadd(118.509, 162.692, 15.882, 0.916)
pt3dadd(118.521, 162.811, 15.882, 0.904)
pt3dadd(118.532, 162.931, 15.882, 0.89)
pt3dadd(118.544, 163.05, 15.882, 0.876)
pt3dadd(118.556, 163.17, 15.883, 0.864)
pt3dadd(118.571, 163.289, 15.883, 0.862)
pt3dadd(118.595, 163.406, 15.883, 0.89)
pt3dadd(118.618, 163.524, 15.884, 0.918)
pt3dadd(118.642, 163.642, 15.884, 0.946)
pt3dadd(118.666, 163.759, 15.884, 0.974)
pt3dadd(118.69, 163.877, 15.885, 1.002)
pt3dadd(118.713, 163.994, 15.885, 1.03)
pt3dadd(118.737, 164.112, 15.885, 1.058)
pt3dadd(118.761, 164.23, 15.886, 1.086)
pt3dadd(118.784, 164.347, 15.886, 1.114)
pt3dadd(118.817, 164.462, 15.887, 1.13)
pt3dadd(118.863, 164.573, 15.887, 1.13)
pt3dadd(118.909, 164.684, 15.888, 1.13)
pt3dadd(118.955, 164.795, 15.888, 1.13)
pt3dadd(119.002, 164.905, 15.889, 1.13)
pt3dadd(119.048, 165.016, 15.89, 1.13)
pt3dadd(119.094, 165.127, 15.89, 1.13)
pt3dadd(119.14, 165.238, 15.891, 1.13)
pt3dadd(119.186, 165.348, 15.891, 1.13)
pt3dadd(119.233, 165.46, 15.892, 1.13)
pt3dadd(119.274, 165.571, 15.893, 1.13)
pt3dadd(119.306, 165.688, 15.894, 1.13)
pt3dadd(119.339, 165.803, 15.896, 1.13)
pt3dadd(119.372, 165.918, 15.897, 1.13)
pt3dadd(119.405, 166.033, 15.898, 1.13)
pt3dadd(119.437, 166.148, 15.9, 1.13)
pt3dadd(119.47, 166.265, 15.901, 1.13)
pt3dadd(119.503, 166.38, 15.902, 1.13)
pt3dadd(119.536, 166.495, 15.904, 1.13)
pt3dadd(119.568, 166.61, 15.905, 1.13)
pt3dadd(119.598, 166.727, 15.907, 1.13)
pt3dadd(119.624, 166.844, 15.91, 1.13)
pt3dadd(119.649, 166.961, 15.912, 1.13)
pt3dadd(119.675, 167.078, 15.915, 1.13)
pt3dadd(119.7, 167.196, 15.917, 1.13)
pt3dadd(119.726, 167.312, 15.92, 1.13)
pt3dadd(119.751, 167.43, 15.922, 1.13)
pt3dadd(119.777, 167.548, 15.924, 1.13)
pt3dadd(119.802, 167.664, 15.927, 1.13)
pt3dadd(119.827, 167.782, 15.929, 1.13)
pt3dadd(119.851, 167.899, 15.933, 1.134)
pt3dadd(119.871, 168.018, 15.938, 1.146)
pt3dadd(119.891, 168.136, 15.943, 1.156)
pt3dadd(119.912, 168.253, 15.949, 1.168)
pt3dadd(119.932, 168.372, 15.954, 1.178)
pt3dadd(119.952, 168.49, 15.959, 1.19)
pt3dadd(119.973, 168.608, 15.964, 1.2)
pt3dadd(119.993, 168.726, 15.97, 1.212)
pt3dadd(120.013, 168.845, 15.975, 1.222)
pt3dadd(120.034, 168.962, 15.98, 1.234)
pt3dadd(120.059, 169.079, 15.987, 1.242)
pt3dadd(120.09, 169.195, 15.995, 1.246)
pt3dadd(120.121, 169.31, 16.003, 1.252)
pt3dadd(120.154, 169.426, 16.012, 1.258)
pt3dadd(120.185, 169.541, 16.02, 1.262)
pt3dadd(120.216, 169.656, 16.029, 1.266)
pt3dadd(120.248, 169.771, 16.037, 1.272)
pt3dadd(120.28, 169.886, 16.045, 1.276)
pt3dadd(120.312, 170.002, 16.054, 1.282)
pt3dadd(120.343, 170.117, 16.062, 1.288)
pt3dadd(120.385, 170.228, 16.073, 1.282)
pt3dadd(120.437, 170.335, 16.085, 1.268)
pt3dadd(120.488, 170.443, 16.097, 1.252)
pt3dadd(120.54, 170.55, 16.109, 1.238)
pt3dadd(120.592, 170.658, 16.122, 1.222)
pt3dadd(120.643, 170.765, 16.134, 1.208)
pt3dadd(120.695, 170.873, 16.146, 1.194)
pt3dadd(120.746, 170.98, 16.159, 1.178)
pt3dadd(120.798, 171.086, 16.171, 1.164)
pt3dadd(120.85, 171.194, 16.183, 1.148)
pt3dadd(120.895, 171.3, 16.207, 1.15)
pt3dadd(120.937, 171.404, 16.243, 1.168)
pt3dadd(120.978, 171.509, 16.278, 1.184)
pt3dadd(121.02, 171.613, 16.313, 1.202)
pt3dadd(121.061, 171.718, 16.347, 1.218)
pt3dadd(121.103, 171.823, 16.383, 1.234)
pt3dadd(121.144, 171.928, 16.418, 1.252)
pt3dadd(121.186, 172.032, 16.453, 1.268)
pt3dadd(121.226, 172.136, 16.488, 1.286)
pt3dadd(121.268, 172.241, 16.523, 1.302)
pt3dadd(121.316, 172.344, 16.552, 1.306)
}
}
proc shape3d_3() {
dend_7[2] { pt3dadd(121.372, 172.446, 16.577, 1.298)
pt3dadd(121.427, 172.549, 16.603, 1.292)
pt3dadd(121.481, 172.651, 16.628, 1.284)
pt3dadd(121.536, 172.753, 16.653, 1.278)
pt3dadd(121.591, 172.856, 16.678, 1.27)
pt3dadd(121.645, 172.958, 16.703, 1.264)
pt3dadd(121.7, 173.06, 16.728, 1.256)
pt3dadd(121.756, 173.164, 16.753, 1.248)
pt3dadd(121.811, 173.266, 16.778, 1.242)
pt3dadd(121.865, 173.369, 16.799, 1.24)
pt3dadd(121.919, 173.474, 16.817, 1.24)
pt3dadd(121.974, 173.579, 16.835, 1.242)
pt3dadd(122.028, 173.684, 16.853, 1.242)
pt3dadd(122.082, 173.789, 16.87, 1.244)
pt3dadd(122.136, 173.893, 16.888, 1.244)
pt3dadd(122.19, 173.999, 16.906, 1.246)
pt3dadd(122.245, 174.103, 16.924, 1.246)
pt3dadd(122.299, 174.209, 16.942, 1.248)
pt3dadd(122.353, 174.313, 16.96, 1.248)
pt3dadd(122.401, 174.422, 16.973, 1.268)
pt3dadd(122.444, 174.533, 16.983, 1.298)
pt3dadd(122.489, 174.644, 16.993, 1.33)
pt3dadd(122.532, 174.755, 17.003, 1.36)
pt3dadd(122.575, 174.866, 17.014, 1.392)
pt3dadd(122.62, 174.977, 17.024, 1.422)
pt3dadd(122.663, 175.088, 17.034, 1.454)
pt3dadd(122.707, 175.2, 17.045, 1.484)
pt3dadd(122.75, 175.31, 17.055, 1.516)
pt3dadd(122.795, 175.422, 17.065, 1.546)
pt3dadd(122.848, 175.529, 17.07, 1.536)
pt3dadd(122.905, 175.634, 17.071, 1.502)
pt3dadd(122.963, 175.739, 17.072, 1.468)
pt3dadd(123.022, 175.843, 17.073, 1.434)
pt3dadd(123.079, 175.949, 17.075, 1.4)
pt3dadd(123.138, 176.053, 17.076, 1.366)
pt3dadd(123.196, 176.159, 17.077, 1.332)
pt3dadd(123.254, 176.263, 17.079, 1.298)
pt3dadd(123.312, 176.369, 17.08, 1.264)
pt3dadd(123.371, 176.473, 17.081, 1.23)
pt3dadd(123.42, 176.582, 17.083, 1.22)
pt3dadd(123.463, 176.694, 17.085, 1.226)
pt3dadd(123.506, 176.806, 17.088, 1.23)
pt3dadd(123.551, 176.918, 17.09, 1.236)
pt3dadd(123.594, 177.03, 17.092, 1.242)
pt3dadd(123.637, 177.142, 17.095, 1.246)
pt3dadd(123.682, 177.253, 17.097, 1.252)
pt3dadd(123.725, 177.365, 17.099, 1.258)
pt3dadd(123.768, 177.476, 17.102, 1.262)
pt3dadd(123.812, 177.588, 17.104, 1.268)
pt3dadd(123.85, 177.702, 17.108, 1.262)
pt3dadd(123.884, 177.817, 17.113, 1.248)
pt3dadd(123.919, 177.931, 17.118, 1.236)
pt3dadd(123.953, 178.046, 17.124, 1.222)
pt3dadd(123.988, 178.162, 17.129, 1.21)
pt3dadd(124.022, 178.276, 17.134, 1.198)
pt3dadd(124.057, 178.391, 17.139, 1.184)
pt3dadd(124.092, 178.506, 17.144, 1.172)
pt3dadd(124.126, 178.62, 17.149, 1.158)
pt3dadd(124.16, 178.735, 17.154, 1.146)
pt3dadd(124.2, 178.848, 17.162, 1.136)
pt3dadd(124.241, 178.961, 17.171, 1.128)
pt3dadd(124.282, 179.072, 17.18, 1.12)
pt3dadd(124.322, 179.185, 17.188, 1.112)
pt3dadd(124.363, 179.298, 17.197, 1.102)
pt3dadd(124.403, 179.41, 17.206, 1.094)
pt3dadd(124.444, 179.522, 17.215, 1.086)
pt3dadd(124.484, 179.634, 17.224, 1.078)
pt3dadd(124.525, 179.747, 17.233, 1.07)
pt3dadd(124.566, 179.86, 17.242, 1.062)
pt3dadd(124.618, 179.965, 17.259, 1.084)
pt3dadd(124.673, 180.07, 17.279, 1.12)
pt3dadd(124.728, 180.173, 17.299, 1.156)
pt3dadd(124.783, 180.277, 17.319, 1.192)
pt3dadd(124.838, 180.38, 17.34, 1.228)
pt3dadd(124.894, 180.485, 17.36, 1.262)
pt3dadd(124.949, 180.588, 17.38, 1.298)
pt3dadd(125.004, 180.692, 17.4, 1.334)
pt3dadd(125.059, 180.796, 17.421, 1.37)
pt3dadd(125.113, 180.9, 17.441, 1.406)
pt3dadd(125.167, 180.996, 17.481, 1.42)
pt3dadd(125.22, 181.09, 17.524, 1.43)
pt3dadd(125.273, 181.184, 17.567, 1.442)
pt3dadd(125.326, 181.279, 17.61, 1.452)
pt3dadd(125.378, 181.374, 17.653, 1.464)
pt3dadd(125.431, 181.468, 17.696, 1.474)
pt3dadd(125.484, 181.562, 17.74, 1.486)
pt3dadd(125.537, 181.657, 17.783, 1.496)
pt3dadd(125.59, 181.752, 17.826, 1.508)
pt3dadd(125.642, 181.846, 17.869, 1.518)
pt3dadd(125.695, 181.95, 17.892, 1.504)
pt3dadd(125.749, 182.053, 17.915, 1.488)
pt3dadd(125.802, 182.158, 17.937, 1.47)
pt3dadd(125.855, 182.262, 17.959, 1.454)
pt3dadd(125.909, 182.366, 17.981, 1.438)
pt3dadd(125.962, 182.471, 18.003, 1.422)
pt3dadd(126.016, 182.575, 18.025, 1.406)
pt3dadd(126.068, 182.678, 18.047, 1.388)
pt3dadd(126.122, 182.783, 18.069, 1.372)
pt3dadd(126.175, 182.887, 18.091, 1.356)
pt3dadd(126.244, 182.986, 18.098, 1.356)
pt3dadd(126.311, 183.084, 18.106, 1.356)
pt3dadd(126.379, 183.182, 18.114, 1.356)
pt3dadd(126.446, 183.281, 18.121, 1.356)
pt3dadd(126.515, 183.38, 18.129, 1.356)
pt3dadd(126.583, 183.479, 18.137, 1.356)
pt3dadd(126.65, 183.577, 18.144, 1.356)
pt3dadd(126.719, 183.676, 18.152, 1.356)
pt3dadd(126.786, 183.774, 18.16, 1.356)
pt3dadd(126.854, 183.872, 18.167, 1.356)
}
dend_7[3] {pt3dclear()
pt3dadd(126.854, 183.872, 18.167, 1.356)
pt3dadd(126.886, 183.91, 18.165, 1.338)
pt3dadd(126.961, 184.003, 18.16, 1.294)
pt3dadd(127.037, 184.096, 18.154, 1.248)
pt3dadd(127.112, 184.188, 18.149, 1.204)
pt3dadd(127.188, 184.282, 18.143, 1.16)
pt3dadd(127.264, 184.374, 18.138, 1.114)
pt3dadd(127.34, 184.466, 18.133, 1.07)
pt3dadd(127.416, 184.559, 18.127, 1.034)
pt3dadd(127.493, 184.651, 18.121, 1)
pt3dadd(127.568, 184.744, 18.115, 0.964)
pt3dadd(127.645, 184.836, 18.11, 0.93)
pt3dadd(127.722, 184.928, 18.104, 0.894)
pt3dadd(127.798, 185.021, 18.098, 0.86)
pt3dadd(127.874, 185.113, 18.092, 0.824)
pt3dadd(127.95, 185.206, 18.086, 0.79)
pt3dadd(128.027, 185.298, 18.08, 0.754)
pt3dadd(128.102, 185.39, 18.075, 0.72)
pt3dadd(128.182, 185.48, 18.066, 0.742)
pt3dadd(128.261, 185.57, 18.058, 0.77)
pt3dadd(128.34, 185.66, 18.049, 0.798)
pt3dadd(128.418, 185.749, 18.041, 0.828)
pt3dadd(128.497, 185.839, 18.032, 0.856)
pt3dadd(128.576, 185.929, 18.023, 0.886)
pt3dadd(128.656, 186.019, 18.015, 0.914)
pt3dadd(128.735, 186.109, 18.006, 0.942)
pt3dadd(128.813, 186.198, 17.998, 0.972)
pt3dadd(128.892, 186.288, 17.989, 1)
pt3dadd(128.962, 186.383, 17.968, 0.99)
pt3dadd(129.029, 186.478, 17.946, 0.976)
pt3dadd(129.097, 186.574, 17.924, 0.964)
pt3dadd(129.166, 186.668, 17.902, 0.95)
pt3dadd(129.234, 186.764, 17.879, 0.936)
pt3dadd(129.301, 186.859, 17.857, 0.922)
pt3dadd(129.37, 186.954, 17.835, 0.908)
pt3dadd(129.438, 187.05, 17.813, 0.894)
pt3dadd(129.505, 187.145, 17.791, 0.88)
pt3dadd(129.574, 187.24, 17.768, 0.866)
pt3dadd(129.632, 187.337, 17.738, 0.826)
pt3dadd(129.692, 187.435, 17.707, 0.786)
pt3dadd(129.751, 187.532, 17.676, 0.746)
pt3dadd(129.811, 187.63, 17.645, 0.708)
pt3dadd(129.871, 187.727, 17.614, 0.668)
pt3dadd(129.93, 187.824, 17.583, 0.628)
pt3dadd(129.99, 187.922, 17.552, 0.588)
pt3dadd(130.049, 188.02, 17.522, 0.548)
pt3dadd(130.109, 188.117, 17.491, 0.508)
pt3dadd(130.169, 188.214, 17.46, 0.47)
pt3dadd(130.238, 188.309, 17.441, 0.486)
pt3dadd(130.308, 188.404, 17.422, 0.502)
pt3dadd(130.378, 188.498, 17.403, 0.516)
pt3dadd(130.448, 188.593, 17.384, 0.532)
pt3dadd(130.518, 188.688, 17.365, 0.548)
pt3dadd(130.588, 188.783, 17.346, 0.562)
pt3dadd(130.658, 188.878, 17.327, 0.578)
pt3dadd(130.728, 188.972, 17.308, 0.594)
pt3dadd(130.798, 189.067, 17.289, 0.608)
pt3dadd(130.868, 189.162, 17.27, 0.624)
pt3dadd(130.944, 189.254, 17.259, 0.638)
pt3dadd(131.02, 189.347, 17.247, 0.654)
pt3dadd(131.094, 189.439, 17.236, 0.668)
pt3dadd(131.17, 189.53, 17.224, 0.684)
pt3dadd(131.245, 189.623, 17.213, 0.698)
pt3dadd(131.321, 189.715, 17.201, 0.714)
pt3dadd(131.396, 189.808, 17.19, 0.728)
pt3dadd(131.472, 189.9, 17.178, 0.744)
pt3dadd(131.548, 189.992, 17.167, 0.758)
pt3dadd(131.623, 190.085, 17.156, 0.774)
pt3dadd(131.702, 190.175, 17.149, 0.788)
pt3dadd(131.78, 190.265, 17.143, 0.802)
pt3dadd(131.86, 190.355, 17.137, 0.818)
pt3dadd(131.939, 190.445, 17.131, 0.832)
pt3dadd(132.017, 190.535, 17.125, 0.846)
pt3dadd(132.096, 190.626, 17.119, 0.862)
pt3dadd(132.175, 190.716, 17.113, 0.876)
pt3dadd(132.253, 190.806, 17.106, 0.892)
pt3dadd(132.332, 190.896, 17.1, 0.906)
pt3dadd(132.412, 190.986, 17.095, 0.92)
pt3dadd(132.493, 191.074, 17.097, 0.936)
pt3dadd(132.576, 191.161, 17.1, 0.95)
pt3dadd(132.658, 191.249, 17.102, 0.964)
pt3dadd(132.739, 191.336, 17.105, 0.978)
pt3dadd(132.822, 191.424, 17.108, 0.994)
pt3dadd(132.904, 191.512, 17.11, 1.008)
pt3dadd(132.986, 191.598, 17.113, 1.022)
pt3dadd(133.068, 191.686, 17.116, 1.036)
pt3dadd(133.15, 191.773, 17.118, 1.052)
pt3dadd(133.232, 191.861, 17.121, 1.064)
pt3dadd(133.314, 191.95, 17.126, 1.062)
pt3dadd(133.394, 192.037, 17.131, 1.06)
pt3dadd(133.476, 192.125, 17.136, 1.058)
}
}
proc shape3d_4() {
dend_7[3] { pt3dadd(133.558, 192.214, 17.141, 1.056)
pt3dadd(133.639, 192.301, 17.146, 1.054)
pt3dadd(133.72, 192.389, 17.151, 1.052)
pt3dadd(133.801, 192.478, 17.156, 1.05)
pt3dadd(133.883, 192.565, 17.161, 1.048)
pt3dadd(133.964, 192.653, 17.166, 1.046)
pt3dadd(134.045, 192.742, 17.171, 1.044)
pt3dadd(134.124, 192.832, 17.178, 1.024)
pt3dadd(134.203, 192.922, 17.186, 1.006)
pt3dadd(134.282, 193.012, 17.193, 0.986)
pt3dadd(134.36, 193.102, 17.201, 0.966)
pt3dadd(134.44, 193.192, 17.208, 0.946)
pt3dadd(134.519, 193.282, 17.216, 0.928)
pt3dadd(134.597, 193.372, 17.223, 0.908)
pt3dadd(134.676, 193.462, 17.231, 0.888)
pt3dadd(134.755, 193.552, 17.238, 0.87)
pt3dadd(134.832, 193.643, 17.247, 0.846)
pt3dadd(134.891, 193.746, 17.261, 0.788)
pt3dadd(134.95, 193.849, 17.276, 0.73)
pt3dadd(135.008, 193.952, 17.29, 0.672)
pt3dadd(135.067, 194.056, 17.305, 0.614)
pt3dadd(135.125, 194.159, 17.319, 0.556)
pt3dadd(135.184, 194.262, 17.334, 0.498)
pt3dadd(135.242, 194.365, 17.349, 0.44)
pt3dadd(135.301, 194.468, 17.363, 0.382)
pt3dadd(135.36, 194.572, 17.378, 0.324)
pt3dadd(135.42, 194.672, 17.395, 0.27)
pt3dadd(135.492, 194.747, 17.446, 0.266)
pt3dadd(135.564, 194.821, 17.496, 0.262)
pt3dadd(135.636, 194.896, 17.547, 0.258)
pt3dadd(135.708, 194.97, 17.597, 0.252)
pt3dadd(135.78, 195.044, 17.647, 0.248)
pt3dadd(135.853, 195.119, 17.698, 0.244)
pt3dadd(135.925, 195.193, 17.748, 0.238)
pt3dadd(135.997, 195.268, 17.799, 0.234)
pt3dadd(136.069, 195.342, 17.849, 0.23)
pt3dadd(136.138, 195.42, 17.899, 0.236)
pt3dadd(136.187, 195.514, 17.946, 0.3)
pt3dadd(136.236, 195.607, 17.993, 0.364)
pt3dadd(136.285, 195.702, 18.04, 0.428)
pt3dadd(136.333, 195.796, 18.087, 0.492)
pt3dadd(136.382, 195.889, 18.134, 0.558)
pt3dadd(136.432, 195.983, 18.181, 0.622)
pt3dadd(136.481, 196.078, 18.228, 0.686)
pt3dadd(136.53, 196.171, 18.275, 0.75)
pt3dadd(136.579, 196.265, 18.322, 0.814)
pt3dadd(136.626, 196.356, 18.373, 0.86)
pt3dadd(136.664, 196.439, 18.438, 0.842)
pt3dadd(136.703, 196.52, 18.503, 0.826)
pt3dadd(136.741, 196.603, 18.569, 0.808)
pt3dadd(136.78, 196.686, 18.634, 0.792)
pt3dadd(136.817, 196.769, 18.699, 0.774)
pt3dadd(136.855, 196.85, 18.764, 0.756)
pt3dadd(136.894, 196.933, 18.83, 0.74)
pt3dadd(136.932, 197.016, 18.895, 0.722)
pt3dadd(136.97, 197.098, 18.96, 0.706)
pt3dadd(137.009, 197.189, 19.014, 0.7)
pt3dadd(137.047, 197.297, 19.042, 0.72)
pt3dadd(137.084, 197.406, 19.07, 0.738)
pt3dadd(137.123, 197.514, 19.099, 0.758)
pt3dadd(137.161, 197.623, 19.127, 0.778)
pt3dadd(137.2, 197.731, 19.155, 0.796)
pt3dadd(137.238, 197.84, 19.183, 0.816)
pt3dadd(137.276, 197.948, 19.211, 0.836)
pt3dadd(137.315, 198.058, 19.239, 0.856)
pt3dadd(137.352, 198.167, 19.267, 0.874)
pt3dadd(137.401, 198.271, 19.289, 0.882)
pt3dadd(137.471, 198.368, 19.299, 0.864)
pt3dadd(137.54, 198.466, 19.309, 0.846)
pt3dadd(137.61, 198.563, 19.319, 0.828)
pt3dadd(137.68, 198.659, 19.329, 0.812)
pt3dadd(137.749, 198.756, 19.34, 0.794)
pt3dadd(137.818, 198.853, 19.35, 0.776)
pt3dadd(137.887, 198.95, 19.36, 0.758)
pt3dadd(137.957, 199.048, 19.37, 0.742)
pt3dadd(138.026, 199.145, 19.38, 0.724)
pt3dadd(138.098, 199.241, 19.387, 0.702)
pt3dadd(138.175, 199.332, 19.389, 0.676)
pt3dadd(138.253, 199.424, 19.391, 0.65)
pt3dadd(138.33, 199.516, 19.393, 0.622)
pt3dadd(138.407, 199.608, 19.395, 0.596)
pt3dadd(138.485, 199.699, 19.397, 0.57)
pt3dadd(138.562, 199.792, 19.399, 0.542)
pt3dadd(138.638, 199.883, 19.401, 0.516)
pt3dadd(138.716, 199.975, 19.403, 0.49)
pt3dadd(138.793, 200.066, 19.405, 0.462)
pt3dadd(138.871, 200.158, 19.406, 0.44)
pt3dadd(138.952, 200.248, 19.406, 0.424)
pt3dadd(139.032, 200.336, 19.406, 0.41)
pt3dadd(139.112, 200.426, 19.406, 0.394)
pt3dadd(139.192, 200.515, 19.405, 0.378)
pt3dadd(139.272, 200.604, 19.405, 0.364)
pt3dadd(139.352, 200.694, 19.405, 0.348)
pt3dadd(139.433, 200.783, 19.405, 0.332)
pt3dadd(139.512, 200.873, 19.405, 0.318)
pt3dadd(139.592, 200.962, 19.405, 0.302)
pt3dadd(139.674, 201.05, 19.405, 0.302)
pt3dadd(139.758, 201.137, 19.405, 0.33)
pt3dadd(139.841, 201.222, 19.405, 0.358)
pt3dadd(139.925, 201.308, 19.405, 0.386)
pt3dadd(140.009, 201.395, 19.405, 0.414)
pt3dadd(140.092, 201.481, 19.405, 0.44)
pt3dadd(140.176, 201.566, 19.405, 0.468)
pt3dadd(140.26, 201.653, 19.404, 0.496)
pt3dadd(140.342, 201.739, 19.404, 0.524)
pt3dadd(140.426, 201.826, 19.404, 0.55)
pt3dadd(140.509, 201.912, 19.404, 0.576)
pt3dadd(140.592, 201.998, 19.404, 0.596)
pt3dadd(140.674, 202.086, 19.404, 0.614)
pt3dadd(140.756, 202.174, 19.404, 0.634)
pt3dadd(140.838, 202.261, 19.403, 0.654)
pt3dadd(140.921, 202.349, 19.403, 0.674)
pt3dadd(141.004, 202.435, 19.403, 0.692)
pt3dadd(141.085, 202.523, 19.403, 0.712)
pt3dadd(141.168, 202.61, 19.403, 0.732)
pt3dadd(141.25, 202.698, 19.403, 0.75)
pt3dadd(141.332, 202.786, 19.402, 0.768)
pt3dadd(141.414, 202.873, 19.402, 0.782)
pt3dadd(141.496, 202.961, 19.402, 0.796)
pt3dadd(141.577, 203.05, 19.402, 0.81)
pt3dadd(141.659, 203.137, 19.402, 0.824)
pt3dadd(141.74, 203.225, 19.401, 0.838)
pt3dadd(141.822, 203.314, 19.401, 0.852)
pt3dadd(141.904, 203.401, 19.401, 0.866)
pt3dadd(141.985, 203.489, 19.401, 0.882)
pt3dadd(142.067, 203.576, 19.4, 0.896)
pt3dadd(142.147, 203.665, 19.4, 0.904)
pt3dadd(142.226, 203.756, 19.4, 0.904)
pt3dadd(142.306, 203.846, 19.399, 0.904)
pt3dadd(142.385, 203.936, 19.399, 0.904)
pt3dadd(142.464, 204.026, 19.398, 0.904)
pt3dadd(142.543, 204.118, 19.398, 0.904)
pt3dadd(142.621, 204.208, 19.397, 0.904)
pt3dadd(142.7, 204.298, 19.397, 0.904)
pt3dadd(142.78, 204.388, 19.396, 0.904)
pt3dadd(142.859, 204.478, 19.396, 0.904)
pt3dadd(142.936, 204.571, 19.395, 0.906)
pt3dadd(143.006, 204.667, 19.394, 0.914)
pt3dadd(143.077, 204.763, 19.394, 0.922)
pt3dadd(143.149, 204.86, 19.393, 0.928)
pt3dadd(143.22, 204.956, 19.392, 0.936)
pt3dadd(143.292, 205.054, 19.391, 0.942)
pt3dadd(143.363, 205.15, 19.39, 0.95)
pt3dadd(143.435, 205.246, 19.389, 0.958)
pt3dadd(143.506, 205.343, 19.389, 0.964)
pt3dadd(143.576, 205.439, 19.388, 0.972)
pt3dadd(143.644, 205.538, 19.387, 0.982)
pt3dadd(143.705, 205.642, 19.385, 0.998)
pt3dadd(143.766, 205.745, 19.384, 1.014)
pt3dadd(143.828, 205.848, 19.383, 1.028)
pt3dadd(143.89, 205.951, 19.382, 1.044)
pt3dadd(143.951, 206.054, 19.38, 1.06)
pt3dadd(144.012, 206.158, 19.379, 1.076)
pt3dadd(144.073, 206.261, 19.378, 1.09)
pt3dadd(144.134, 206.364, 19.376, 1.106)
pt3dadd(144.196, 206.467, 19.375, 1.122)
pt3dadd(144.26, 206.568, 19.373, 1.13)
pt3dadd(144.331, 206.665, 19.371, 1.13)
pt3dadd(144.401, 206.762, 19.368, 1.13)
pt3dadd(144.472, 206.86, 19.366, 1.13)
pt3dadd(144.542, 206.957, 19.364, 1.13)
pt3dadd(144.612, 207.054, 19.362, 1.13)
pt3dadd(144.683, 207.151, 19.359, 1.13)
pt3dadd(144.752, 207.248, 19.357, 1.13)
pt3dadd(144.823, 207.346, 19.355, 1.13)
pt3dadd(144.894, 207.443, 19.352, 1.13)
pt3dadd(144.965, 207.539, 19.349, 1.126)
pt3dadd(145.039, 207.634, 19.345, 1.116)
pt3dadd(145.112, 207.727, 19.34, 1.108)
pt3dadd(145.187, 207.822, 19.336, 1.098)
pt3dadd(145.26, 207.917, 19.332, 1.09)
pt3dadd(145.333, 208.012, 19.328, 1.08)
pt3dadd(145.408, 208.106, 19.323, 1.07)
pt3dadd(145.481, 208.2, 19.319, 1.062)
pt3dadd(145.555, 208.295, 19.315, 1.052)
pt3dadd(145.628, 208.39, 19.31, 1.042)
pt3dadd(145.703, 208.483, 19.305, 1.032)
pt3dadd(145.78, 208.576, 19.299, 1.02)
pt3dadd(145.855, 208.668, 19.294, 1.008)
pt3dadd(145.931, 208.762, 19.288, 0.996)
pt3dadd(146.008, 208.854, 19.282, 0.984)
pt3dadd(146.083, 208.946, 19.276, 0.972)
pt3dadd(146.159, 209.039, 19.27, 0.96)
pt3dadd(146.236, 209.131, 19.264, 0.948)
pt3dadd(146.311, 209.224, 19.259, 0.938)
pt3dadd(146.387, 209.317, 19.253, 0.926)
pt3dadd(146.465, 209.408, 19.246, 0.924)
pt3dadd(146.543, 209.498, 19.237, 0.94)
pt3dadd(146.622, 209.588, 19.228, 0.954)
pt3dadd(146.7, 209.678, 19.219, 0.968)
pt3dadd(146.779, 209.768, 19.21, 0.982)
pt3dadd(146.858, 209.858, 19.202, 0.996)
pt3dadd(146.936, 209.948, 19.193, 1.012)
pt3dadd(147.016, 210.038, 19.184, 1.026)
pt3dadd(147.094, 210.128, 19.175, 1.04)
pt3dadd(147.173, 210.218, 19.166, 1.054)
pt3dadd(147.247, 210.31, 19.152, 1.062)
pt3dadd(147.314, 210.406, 19.13, 1.06)
pt3dadd(147.383, 210.5, 19.108, 1.058)
pt3dadd(147.451, 210.596, 19.086, 1.058)
}
}
proc shape3d_5() {
dend_7[3] { pt3dadd(147.518, 210.691, 19.064, 1.056)
pt3dadd(147.587, 210.787, 19.042, 1.054)
pt3dadd(147.655, 210.882, 19.02, 1.052)
pt3dadd(147.722, 210.977, 18.999, 1.05)
pt3dadd(147.791, 211.073, 18.977, 1.048)
pt3dadd(147.859, 211.168, 18.955, 1.048)
pt3dadd(147.922, 211.265, 18.927, 1.038)
pt3dadd(147.979, 211.362, 18.896, 1.022)
pt3dadd(148.038, 211.46, 18.864, 1.006)
pt3dadd(148.096, 211.558, 18.832, 0.992)
pt3dadd(148.154, 211.656, 18.8, 0.976)
pt3dadd(148.212, 211.753, 18.768, 0.96)
pt3dadd(148.27, 211.852, 18.736, 0.944)
pt3dadd(148.328, 211.949, 18.705, 0.928)
pt3dadd(148.386, 212.047, 18.673, 0.912)
pt3dadd(148.445, 212.144, 18.641, 0.896)
pt3dadd(148.508, 212.242, 18.616, 0.882)
pt3dadd(148.577, 212.336, 18.596, 0.866)
pt3dadd(148.645, 212.432, 18.575, 0.85)
pt3dadd(148.714, 212.528, 18.555, 0.836)
pt3dadd(148.782, 212.623, 18.535, 0.82)
pt3dadd(148.85, 212.719, 18.515, 0.806)
pt3dadd(148.919, 212.815, 18.495, 0.79)
pt3dadd(148.987, 212.91, 18.475, 0.774)
pt3dadd(149.056, 213.006, 18.454, 0.76)
pt3dadd(149.124, 213.101, 18.434, 0.744)
pt3dadd(149.195, 213.196, 18.418, 0.724)
pt3dadd(149.267, 213.29, 18.404, 0.7)
pt3dadd(149.34, 213.385, 18.39, 0.676)
pt3dadd(149.412, 213.479, 18.376, 0.65)
pt3dadd(149.484, 213.574, 18.363, 0.626)
pt3dadd(149.556, 213.667, 18.349, 0.602)
pt3dadd(149.629, 213.762, 18.335, 0.578)
pt3dadd(149.701, 213.857, 18.321, 0.554)
pt3dadd(149.773, 213.95, 18.307, 0.53)
pt3dadd(149.846, 214.045, 18.294, 0.506)
pt3dadd(149.92, 214.139, 18.283, 0.48)
pt3dadd(149.995, 214.231, 18.274, 0.454)
pt3dadd(150.07, 214.325, 18.265, 0.43)
pt3dadd(150.145, 214.417, 18.256, 0.404)
pt3dadd(150.22, 214.511, 18.247, 0.378)
pt3dadd(150.295, 214.603, 18.238, 0.354)
pt3dadd(150.37, 214.697, 18.229, 0.328)
pt3dadd(150.445, 214.79, 18.22, 0.302)
pt3dadd(150.52, 214.883, 18.211, 0.276)
pt3dadd(150.595, 214.976, 18.202, 0.252)
pt3dadd(150.672, 215.068, 18.197, 0.25)
pt3dadd(150.749, 215.16, 18.194, 0.264)
pt3dadd(150.827, 215.251, 18.192, 0.278)
pt3dadd(150.905, 215.342, 18.19, 0.292)
pt3dadd(150.982, 215.434, 18.188, 0.308)
pt3dadd(151.06, 215.525, 18.186, 0.322)
pt3dadd(151.138, 215.617, 18.184, 0.336)
pt3dadd(151.216, 215.708, 18.181, 0.352)
pt3dadd(151.292, 215.8, 18.179, 0.366)
pt3dadd(151.37, 215.891, 18.177, 0.38)
pt3dadd(151.441, 215.988, 18.174, 0.396)
pt3dadd(151.506, 216.089, 18.169, 0.412)
pt3dadd(151.572, 216.188, 18.165, 0.428)
pt3dadd(151.637, 216.289, 18.16, 0.444)
pt3dadd(151.703, 216.39, 18.156, 0.46)
pt3dadd(151.768, 216.491, 18.151, 0.476)
pt3dadd(151.832, 216.59, 18.147, 0.492)
pt3dadd(151.898, 216.691, 18.142, 0.508)
pt3dadd(151.963, 216.792, 18.138, 0.524)
pt3dadd(152.029, 216.893, 18.133, 0.542)
pt3dadd(152.089, 216.996, 18.127, 0.56)
pt3dadd(152.146, 217.102, 18.12, 0.58)
pt3dadd(152.202, 217.207, 18.113, 0.602)
pt3dadd(152.258, 217.313, 18.106, 0.622)
pt3dadd(152.315, 217.418, 18.099, 0.642)
pt3dadd(152.371, 217.524, 18.092, 0.664)
pt3dadd(152.428, 217.63, 18.085, 0.684)
pt3dadd(152.484, 217.734, 18.077, 0.704)
pt3dadd(152.54, 217.84, 18.07, 0.726)
pt3dadd(152.598, 217.945, 18.063, 0.746)
pt3dadd(152.658, 218.048, 18.055, 0.774)
pt3dadd(152.719, 218.15, 18.045, 0.808)
pt3dadd(152.782, 218.252, 18.035, 0.84)
pt3dadd(152.844, 218.354, 18.025, 0.872)
pt3dadd(152.906, 218.456, 18.015, 0.906)
pt3dadd(152.968, 218.558, 18.005, 0.938)
pt3dadd(153.03, 218.66, 17.995, 0.97)
pt3dadd(153.092, 218.762, 17.985, 1.004)
pt3dadd(153.154, 218.866, 17.975, 1.036)
pt3dadd(153.216, 218.968, 17.965, 1.068)
pt3dadd(153.268, 219.071, 17.942, 1.074)
pt3dadd(153.314, 219.175, 17.91, 1.064)
pt3dadd(153.361, 219.278, 17.879, 1.056)
pt3dadd(153.407, 219.383, 17.848, 1.046)
pt3dadd(153.454, 219.487, 17.817, 1.038)
pt3dadd(153.5, 219.592, 17.786, 1.028)
pt3dadd(153.547, 219.696, 17.755, 1.02)
pt3dadd(153.593, 219.799, 17.724, 1.01)
pt3dadd(153.64, 219.904, 17.693, 1)
pt3dadd(153.686, 220.008, 17.662, 0.992)
pt3dadd(153.738, 220.111, 17.633, 0.966)
pt3dadd(153.791, 220.213, 17.605, 0.934)
pt3dadd(153.844, 220.315, 17.577, 0.902)
pt3dadd(153.898, 220.417, 17.549, 0.87)
pt3dadd(153.95, 220.519, 17.521, 0.838)
pt3dadd(154.004, 220.621, 17.494, 0.806)
pt3dadd(154.057, 220.723, 17.466, 0.774)
pt3dadd(154.11, 220.826, 17.438, 0.742)
pt3dadd(154.164, 220.928, 17.41, 0.71)
pt3dadd(154.217, 221.03, 17.382, 0.678)
pt3dadd(154.277, 221.131, 17.361, 0.638)
pt3dadd(154.339, 221.231, 17.341, 0.596)
pt3dadd(154.402, 221.33, 17.321, 0.554)
pt3dadd(154.464, 221.43, 17.301, 0.512)
pt3dadd(154.526, 221.53, 17.281, 0.47)
pt3dadd(154.589, 221.629, 17.262, 0.426)
pt3dadd(154.651, 221.729, 17.242, 0.384)
pt3dadd(154.714, 221.83, 17.222, 0.342)
pt3dadd(154.776, 221.929, 17.202, 0.3)
pt3dadd(154.838, 222.029, 17.183, 0.258)
pt3dadd(154.892, 222.134, 17.171, 0.276)
pt3dadd(154.945, 222.241, 17.161, 0.31)
pt3dadd(154.997, 222.349, 17.151, 0.344)
pt3dadd(155.05, 222.456, 17.141, 0.378)
pt3dadd(155.101, 222.564, 17.131, 0.412)
pt3dadd(155.154, 222.671, 17.121, 0.448)
pt3dadd(155.207, 222.779, 17.111, 0.482)
pt3dadd(155.258, 222.886, 17.101, 0.516)
pt3dadd(155.311, 222.994, 17.091, 0.55)
pt3dadd(155.363, 223.1, 17.081, 0.584)
pt3dadd(155.428, 223.201, 17.077, 0.616)
pt3dadd(155.495, 223.301, 17.074, 0.648)
pt3dadd(155.562, 223.4, 17.072, 0.68)
pt3dadd(155.629, 223.5, 17.069, 0.712)
pt3dadd(155.696, 223.598, 17.067, 0.744)
pt3dadd(155.764, 223.698, 17.065, 0.776)
pt3dadd(155.831, 223.798, 17.062, 0.808)
pt3dadd(155.898, 223.897, 17.059, 0.84)
pt3dadd(155.965, 223.997, 17.057, 0.872)
pt3dadd(156.032, 224.095, 17.054, 0.904)
pt3dadd(156.106, 224.191, 17.054, 0.92)
pt3dadd(156.179, 224.286, 17.054, 0.934)
pt3dadd(156.253, 224.38, 17.054, 0.948)
pt3dadd(156.328, 224.474, 17.054, 0.962)
pt3dadd(156.401, 224.569, 17.054, 0.976)
pt3dadd(156.475, 224.663, 17.054, 0.99)
pt3dadd(156.55, 224.758, 17.054, 1.004)
pt3dadd(156.623, 224.852, 17.054, 1.018)
pt3dadd(156.697, 224.947, 17.054, 1.032)
pt3dadd(156.77, 225.041, 17.054, 1.046)
pt3dadd(156.85, 225.132, 17.054, 1.024)
pt3dadd(156.929, 225.222, 17.054, 0.996)
pt3dadd(157.008, 225.312, 17.054, 0.966)
pt3dadd(157.087, 225.403, 17.054, 0.938)
pt3dadd(157.166, 225.493, 17.054, 0.91)
pt3dadd(157.246, 225.583, 17.053, 0.88)
pt3dadd(157.325, 225.673, 17.053, 0.852)
pt3dadd(157.404, 225.763, 17.053, 0.822)
pt3dadd(157.483, 225.853, 17.053, 0.794)
pt3dadd(157.562, 225.943, 17.053, 0.764)
pt3dadd(157.644, 226.031, 17.053, 0.736)
pt3dadd(157.727, 226.118, 17.053, 0.708)
pt3dadd(157.81, 226.205, 17.053, 0.68)
pt3dadd(157.892, 226.292, 17.053, 0.652)
pt3dadd(157.974, 226.379, 17.053, 0.624)
pt3dadd(158.057, 226.466, 17.053, 0.598)
pt3dadd(158.14, 226.553, 17.053, 0.57)
pt3dadd(158.222, 226.64, 17.053, 0.542)
pt3dadd(158.305, 226.728, 17.052, 0.514)
pt3dadd(158.388, 226.814, 17.052, 0.486)
pt3dadd(158.471, 226.901, 17.052, 0.462)
pt3dadd(158.555, 226.986, 17.052, 0.438)
pt3dadd(158.639, 227.072, 17.052, 0.414)
pt3dadd(158.723, 227.158, 17.052, 0.39)
pt3dadd(158.807, 227.244, 17.052, 0.368)
pt3dadd(158.891, 227.33, 17.052, 0.344)
pt3dadd(158.974, 227.416, 17.052, 0.32)
pt3dadd(159.058, 227.502, 17.052, 0.298)
pt3dadd(159.142, 227.587, 17.051, 0.274)
pt3dadd(159.226, 227.674, 17.051, 0.25)
pt3dadd(159.308, 227.76, 17.051, 0.27)
pt3dadd(159.391, 227.846, 17.051, 0.298)
pt3dadd(159.474, 227.934, 17.051, 0.326)
pt3dadd(159.558, 228.02, 17.051, 0.354)
pt3dadd(159.641, 228.107, 17.05, 0.382)
pt3dadd(159.724, 228.193, 17.05, 0.41)
pt3dadd(159.806, 228.281, 17.05, 0.438)
pt3dadd(159.889, 228.367, 17.05, 0.464)
pt3dadd(159.972, 228.454, 17.049, 0.492)
pt3dadd(160.055, 228.541, 17.049, 0.52)
pt3dadd(160.136, 228.629, 17.049, 0.528)
pt3dadd(160.218, 228.716, 17.049, 0.53)
pt3dadd(160.3, 228.804, 17.048, 0.532)
pt3dadd(160.381, 228.893, 17.048, 0.534)
pt3dadd(160.463, 228.98, 17.048, 0.536)
pt3dadd(160.544, 229.068, 17.047, 0.538)
pt3dadd(160.626, 229.157, 17.047, 0.54)
pt3dadd(160.708, 229.244, 17.046, 0.542)
pt3dadd(160.789, 229.332, 17.046, 0.546)
pt3dadd(160.871, 229.42, 17.046, 0.548)
pt3dadd(160.951, 229.51, 17.045, 0.524)
pt3dadd(161.032, 229.598, 17.045, 0.494)
pt3dadd(161.112, 229.688, 17.045, 0.466)
pt3dadd(161.191, 229.777, 17.044, 0.438)
}
}
proc shape3d_6() {
dend_7[3] { pt3dadd(161.272, 229.867, 17.043, 0.408)
pt3dadd(161.352, 229.957, 17.043, 0.38)
pt3dadd(161.431, 230.046, 17.043, 0.35)
pt3dadd(161.512, 230.136, 17.042, 0.322)
pt3dadd(161.591, 230.225, 17.042, 0.292)
pt3dadd(161.671, 230.315, 17.041, 0.264)
pt3dadd(161.748, 230.407, 17.04, 0.28)
pt3dadd(161.824, 230.501, 17.039, 0.302)
pt3dadd(161.898, 230.593, 17.038, 0.326)
pt3dadd(161.974, 230.687, 17.037, 0.35)
pt3dadd(162.049, 230.78, 17.036, 0.374)
pt3dadd(162.125, 230.874, 17.035, 0.398)
pt3dadd(162.2, 230.966, 17.034, 0.42)
pt3dadd(162.276, 231.06, 17.033, 0.444)
pt3dadd(162.352, 231.154, 17.032, 0.468)
pt3dadd(162.427, 231.246, 17.031, 0.492)
pt3dadd(162.493, 231.347, 17.029, 0.51)
pt3dadd(162.558, 231.448, 17.027, 0.53)
pt3dadd(162.623, 231.548, 17.026, 0.548)
pt3dadd(162.688, 231.649, 17.024, 0.566)
pt3dadd(162.752, 231.75, 17.022, 0.584)
pt3dadd(162.817, 231.851, 17.02, 0.602)
pt3dadd(162.882, 231.952, 17.018, 0.622)
pt3dadd(162.947, 232.054, 17.017, 0.64)
pt3dadd(163.012, 232.154, 17.015, 0.658)
pt3dadd(163.076, 232.255, 17.013, 0.676)
pt3dadd(163.124, 232.366, 17.01, 0.672)
pt3dadd(163.17, 232.476, 17.007, 0.666)
pt3dadd(163.216, 232.588, 17.003, 0.66)
pt3dadd(163.261, 232.698, 17, 0.654)
pt3dadd(163.307, 232.808, 16.996, 0.648)
pt3dadd(163.352, 232.92, 16.993, 0.642)
pt3dadd(163.398, 233.03, 16.989, 0.636)
pt3dadd(163.442, 233.142, 16.986, 0.63)
pt3dadd(163.488, 233.252, 16.983, 0.624)
pt3dadd(163.534, 233.364, 16.979, 0.618)
pt3dadd(163.564, 233.479, 16.972, 0.582)
pt3dadd(163.594, 233.596, 16.965, 0.544)
pt3dadd(163.622, 233.712, 16.957, 0.506)
pt3dadd(163.651, 233.827, 16.949, 0.468)
pt3dadd(163.68, 233.944, 16.942, 0.43)
pt3dadd(163.709, 234.06, 16.935, 0.394)
pt3dadd(163.738, 234.176, 16.927, 0.356)
pt3dadd(163.766, 234.292, 16.92, 0.318)
pt3dadd(163.795, 234.408, 16.912, 0.28)
pt3dadd(163.824, 234.524, 16.905, 0.242)
pt3dadd(163.873, 234.634, 16.893, 0.294)
pt3dadd(163.922, 234.742, 16.881, 0.354)
pt3dadd(163.972, 234.85, 16.869, 0.412)
pt3dadd(164.021, 234.959, 16.857, 0.472)
pt3dadd(164.07, 235.067, 16.845, 0.53)
pt3dadd(164.12, 235.175, 16.833, 0.59)
pt3dadd(164.17, 235.284, 16.821, 0.648)
pt3dadd(164.219, 235.392, 16.809, 0.708)
pt3dadd(164.268, 235.5, 16.797, 0.766)
pt3dadd(164.318, 235.609, 16.785, 0.826)
pt3dadd(164.359, 235.706, 16.739, 0.856)
pt3dadd(164.4, 235.804, 16.691, 0.886)
pt3dadd(164.442, 235.9, 16.643, 0.916)
pt3dadd(164.483, 235.997, 16.595, 0.946)
pt3dadd(164.524, 236.094, 16.547, 0.976)
pt3dadd(164.566, 236.191, 16.499, 1.006)
pt3dadd(164.606, 236.287, 16.451, 1.036)
pt3dadd(164.647, 236.384, 16.403, 1.066)
pt3dadd(164.688, 236.482, 16.355, 1.096)
pt3dadd(164.729, 236.579, 16.308, 1.12)
pt3dadd(164.746, 236.692, 16.277, 1.03)
pt3dadd(164.764, 236.804, 16.245, 0.94)
pt3dadd(164.782, 236.917, 16.214, 0.85)
pt3dadd(164.8, 237.03, 16.183, 0.76)
pt3dadd(164.818, 237.142, 16.152, 0.67)
pt3dadd(164.836, 237.254, 16.121, 0.58)
pt3dadd(164.852, 237.367, 16.09, 0.49)
pt3dadd(164.87, 237.48, 16.058, 0.4)
pt3dadd(164.888, 237.593, 16.027, 0.31)
pt3dadd(164.905, 237.706, 15.997, 0.226)
pt3dadd(164.908, 237.824, 15.984, 0.226)
pt3dadd(164.909, 237.943, 15.971, 0.226)
pt3dadd(164.911, 238.062, 15.957, 0.226)
pt3dadd(164.914, 238.182, 15.944, 0.226)
pt3dadd(164.916, 238.301, 15.931, 0.226)
pt3dadd(164.917, 238.42, 15.918, 0.226)
pt3dadd(164.92, 238.538, 15.905, 0.226)
pt3dadd(164.922, 238.657, 15.892, 0.226)
pt3dadd(164.923, 238.776, 15.878, 0.226)
pt3dadd(164.926, 238.895, 15.866, 0.228)
pt3dadd(164.929, 239.015, 15.864, 0.266)
pt3dadd(164.934, 239.135, 15.863, 0.306)
pt3dadd(164.938, 239.255, 15.861, 0.344)
pt3dadd(164.941, 239.375, 15.86, 0.382)
pt3dadd(164.945, 239.495, 15.858, 0.42)
pt3dadd(164.948, 239.615, 15.856, 0.46)
pt3dadd(164.953, 239.735, 15.855, 0.498)
pt3dadd(164.957, 239.855, 15.853, 0.536)
pt3dadd(164.96, 239.975, 15.852, 0.574)
pt3dadd(164.964, 240.095, 15.85, 0.61)
pt3dadd(164.974, 240.214, 15.847, 0.6)
pt3dadd(164.982, 240.334, 15.845, 0.59)
pt3dadd(164.99, 240.454, 15.842, 0.582)
pt3dadd(164.999, 240.572, 15.839, 0.572)
pt3dadd(165.007, 240.692, 15.837, 0.562)
pt3dadd(165.016, 240.812, 15.834, 0.552)
pt3dadd(165.024, 240.932, 15.831, 0.544)
pt3dadd(165.032, 241.051, 15.829, 0.534)
pt3dadd(165.041, 241.171, 15.826, 0.524)
pt3dadd(165.05, 241.291, 15.823, 0.516)
pt3dadd(165.065, 241.41, 15.817, 0.522)
pt3dadd(165.079, 241.529, 15.811, 0.53)
pt3dadd(165.094, 241.648, 15.805, 0.538)
pt3dadd(165.108, 241.766, 15.799, 0.546)
pt3dadd(165.122, 241.885, 15.793, 0.554)
pt3dadd(165.137, 242.004, 15.787, 0.562)
pt3dadd(165.151, 242.123, 15.781, 0.568)
pt3dadd(165.166, 242.242, 15.775, 0.576)
pt3dadd(165.18, 242.362, 15.769, 0.584)
pt3dadd(165.196, 242.479, 15.762, 0.592)
pt3dadd(165.234, 242.593, 15.752, 0.612)
pt3dadd(165.271, 242.706, 15.742, 0.632)
pt3dadd(165.31, 242.819, 15.732, 0.652)
pt3dadd(165.347, 242.933, 15.722, 0.672)
pt3dadd(165.384, 243.046, 15.712, 0.692)
pt3dadd(165.422, 243.16, 15.702, 0.714)
pt3dadd(165.46, 243.272, 15.692, 0.734)
pt3dadd(165.497, 243.386, 15.682, 0.754)
pt3dadd(165.535, 243.499, 15.672, 0.774)
pt3dadd(165.575, 243.611, 15.658, 0.788)
pt3dadd(165.628, 243.713, 15.63, 0.78)
pt3dadd(165.679, 243.816, 15.602, 0.77)
pt3dadd(165.731, 243.918, 15.573, 0.762)
pt3dadd(165.784, 244.021, 15.545, 0.754)
pt3dadd(165.835, 244.124, 15.517, 0.744)
pt3dadd(165.887, 244.226, 15.488, 0.736)
pt3dadd(165.94, 244.33, 15.46, 0.728)
pt3dadd(165.991, 244.432, 15.432, 0.718)
pt3dadd(166.043, 244.535, 15.404, 0.71)
pt3dadd(166.091, 244.637, 15.37, 0.7)
pt3dadd(166.134, 244.738, 15.329, 0.684)
pt3dadd(166.176, 244.838, 15.288, 0.67)
pt3dadd(166.218, 244.939, 15.247, 0.656)
pt3dadd(166.261, 245.04, 15.206, 0.642)
pt3dadd(166.303, 245.141, 15.165, 0.628)
pt3dadd(166.345, 245.242, 15.123, 0.614)
pt3dadd(166.388, 245.342, 15.082, 0.6)
pt3dadd(166.43, 245.443, 15.041, 0.584)
pt3dadd(166.472, 245.544, 15, 0.57)
pt3dadd(166.516, 245.65, 14.969, 0.574)
pt3dadd(166.559, 245.759, 14.949, 0.596)
pt3dadd(166.602, 245.868, 14.928, 0.618)
pt3dadd(166.645, 245.977, 14.908, 0.638)
pt3dadd(166.688, 246.086, 14.887, 0.66)
pt3dadd(166.732, 246.196, 14.867, 0.682)
pt3dadd(166.775, 246.305, 14.846, 0.704)
pt3dadd(166.818, 246.414, 14.826, 0.724)
pt3dadd(166.861, 246.523, 14.805, 0.746)
pt3dadd(166.904, 246.632, 14.785, 0.768)
pt3dadd(166.949, 246.743, 14.772, 0.772)
pt3dadd(166.993, 246.853, 14.764, 0.766)
pt3dadd(167.039, 246.964, 14.757, 0.76)
pt3dadd(167.084, 247.075, 14.749, 0.754)
pt3dadd(167.13, 247.186, 14.742, 0.748)
pt3dadd(167.174, 247.296, 14.735, 0.742)
pt3dadd(167.22, 247.408, 14.727, 0.736)
pt3dadd(167.266, 247.518, 14.72, 0.73)
pt3dadd(167.311, 247.628, 14.712, 0.722)
pt3dadd(167.356, 247.739, 14.705, 0.716)
pt3dadd(167.394, 247.853, 14.702, 0.686)
pt3dadd(167.426, 247.968, 14.702, 0.64)
pt3dadd(167.459, 248.084, 14.702, 0.592)
pt3dadd(167.491, 248.2, 14.702, 0.546)
pt3dadd(167.525, 248.315, 14.702, 0.5)
pt3dadd(167.557, 248.43, 14.702, 0.452)
pt3dadd(167.59, 248.545, 14.702, 0.406)
pt3dadd(167.622, 248.662, 14.702, 0.36)
pt3dadd(167.654, 248.777, 14.702, 0.312)
pt3dadd(167.688, 248.892, 14.702, 0.266)
pt3dadd(167.716, 249.008, 14.702, 0.26)
pt3dadd(167.741, 249.126, 14.702, 0.278)
pt3dadd(167.766, 249.244, 14.702, 0.298)
pt3dadd(167.791, 249.361, 14.702, 0.316)
pt3dadd(167.815, 249.479, 14.702, 0.334)
pt3dadd(167.84, 249.595, 14.702, 0.354)
pt3dadd(167.866, 249.713, 14.702, 0.372)
pt3dadd(167.891, 249.83, 14.702, 0.392)
pt3dadd(167.916, 249.948, 14.702, 0.41)
pt3dadd(167.941, 250.066, 14.702, 0.428)
pt3dadd(167.965, 250.182, 14.702, 0.436)
pt3dadd(167.988, 250.301, 14.702, 0.438)
pt3dadd(168.012, 250.418, 14.702, 0.44)
pt3dadd(168.035, 250.536, 14.702, 0.442)
pt3dadd(168.059, 250.654, 14.702, 0.444)
pt3dadd(168.082, 250.771, 14.702, 0.444)
pt3dadd(168.104, 250.889, 14.702, 0.446)
pt3dadd(168.128, 251.006, 14.702, 0.448)
pt3dadd(168.151, 251.124, 14.702, 0.45)
pt3dadd(168.175, 251.242, 14.702, 0.452)
pt3dadd(168.214, 251.356, 14.702, 0.468)
pt3dadd(168.26, 251.465, 14.702, 0.492)
pt3dadd(168.308, 251.575, 14.702, 0.516)
pt3dadd(168.356, 251.686, 14.702, 0.54)
pt3dadd(168.404, 251.796, 14.702, 0.564)
}
}
proc shape3d_7() {
dend_7[3] { pt3dadd(168.451, 251.905, 14.702, 0.59)
pt3dadd(168.499, 252.016, 14.702, 0.614)
pt3dadd(168.547, 252.126, 14.702, 0.638)
pt3dadd(168.595, 252.236, 14.702, 0.662)
pt3dadd(168.642, 252.346, 14.702, 0.688)
pt3dadd(168.7, 252.451, 14.702, 0.7)
pt3dadd(168.761, 252.554, 14.702, 0.71)
pt3dadd(168.822, 252.658, 14.702, 0.718)
pt3dadd(168.883, 252.761, 14.702, 0.728)
pt3dadd(168.944, 252.864, 14.702, 0.736)
pt3dadd(169.006, 252.967, 14.702, 0.746)
pt3dadd(169.068, 253.07, 14.702, 0.754)
pt3dadd(169.129, 253.174, 14.702, 0.764)
pt3dadd(169.19, 253.277, 14.702, 0.772)
pt3dadd(169.252, 253.38, 14.702, 0.782)
pt3dadd(169.318, 253.48, 14.702, 0.76)
pt3dadd(169.386, 253.578, 14.702, 0.73)
pt3dadd(169.454, 253.678, 14.702, 0.698)
pt3dadd(169.523, 253.776, 14.702, 0.666)
pt3dadd(169.591, 253.874, 14.702, 0.634)
pt3dadd(169.66, 253.973, 14.702, 0.602)
pt3dadd(169.727, 254.071, 14.702, 0.572)
pt3dadd(169.795, 254.171, 14.702, 0.54)
pt3dadd(169.864, 254.269, 14.702, 0.508)
pt3dadd(169.932, 254.368, 14.702, 0.476)
pt3dadd(169.988, 254.473, 14.702, 0.466)
pt3dadd(170.039, 254.582, 14.702, 0.464)
pt3dadd(170.089, 254.692, 14.702, 0.464)
pt3dadd(170.141, 254.8, 14.702, 0.462)
pt3dadd(170.191, 254.909, 14.701, 0.46)
pt3dadd(170.242, 255.017, 14.701, 0.458)
pt3dadd(170.293, 255.126, 14.701, 0.456)
pt3dadd(170.344, 255.235, 14.701, 0.456)
pt3dadd(170.394, 255.343, 14.701, 0.454)
pt3dadd(170.446, 255.452, 14.701, 0.452)
pt3dadd(170.488, 255.564, 14.701, 0.444)
pt3dadd(170.528, 255.677, 14.701, 0.43)
pt3dadd(170.568, 255.791, 14.701, 0.418)
pt3dadd(170.608, 255.904, 14.701, 0.406)
pt3dadd(170.647, 256.016, 14.701, 0.394)
pt3dadd(170.688, 256.13, 14.701, 0.382)
pt3dadd(170.728, 256.243, 14.701, 0.37)
pt3dadd(170.767, 256.356, 14.701, 0.358)
pt3dadd(170.807, 256.47, 14.701, 0.346)
pt3dadd(170.848, 256.583, 14.701, 0.334)
pt3dadd(170.89, 256.694, 14.701, 0.334)
pt3dadd(170.934, 256.806, 14.7, 0.338)
pt3dadd(170.977, 256.919, 14.7, 0.342)
pt3dadd(171.022, 257.03, 14.7, 0.346)
pt3dadd(171.065, 257.142, 14.7, 0.352)
pt3dadd(171.109, 257.254, 14.7, 0.356)
pt3dadd(171.152, 257.365, 14.7, 0.36)
pt3dadd(171.197, 257.477, 14.7, 0.364)
pt3dadd(171.24, 257.588, 14.699, 0.368)
pt3dadd(171.284, 257.7, 14.699, 0.372)
pt3dadd(171.338, 257.807, 14.699, 0.4)
pt3dadd(171.395, 257.912, 14.699, 0.432)
pt3dadd(171.451, 258.019, 14.699, 0.464)
pt3dadd(171.509, 258.125, 14.699, 0.496)
pt3dadd(171.565, 258.23, 14.698, 0.528)
pt3dadd(171.622, 258.336, 14.698, 0.56)
pt3dadd(171.679, 258.442, 14.698, 0.592)
pt3dadd(171.736, 258.547, 14.698, 0.624)
pt3dadd(171.792, 258.653, 14.698, 0.656)
pt3dadd(171.848, 258.758, 14.697, 0.688)
pt3dadd(171.913, 258.86, 14.697, 0.708)
pt3dadd(171.979, 258.96, 14.697, 0.724)
pt3dadd(172.045, 259.061, 14.696, 0.74)
pt3dadd(172.111, 259.16, 14.696, 0.756)
pt3dadd(172.178, 259.26, 14.696, 0.772)
pt3dadd(172.244, 259.361, 14.695, 0.788)
pt3dadd(172.31, 259.46, 14.695, 0.806)
pt3dadd(172.376, 259.561, 14.695, 0.822)
pt3dadd(172.442, 259.661, 14.694, 0.838)
pt3dadd(172.508, 259.762, 14.694, 0.854)
pt3dadd(172.561, 259.868, 14.693, 0.85)
pt3dadd(172.612, 259.978, 14.693, 0.842)
pt3dadd(172.662, 260.087, 14.692, 0.834)
pt3dadd(172.712, 260.196, 14.691, 0.826)
pt3dadd(172.762, 260.305, 14.69, 0.818)
pt3dadd(172.812, 260.413, 14.69, 0.81)
pt3dadd(172.862, 260.522, 14.689, 0.802)
pt3dadd(172.912, 260.632, 14.688, 0.794)
pt3dadd(172.962, 260.741, 14.687, 0.786)
pt3dadd(173.012, 260.85, 14.687, 0.778)
pt3dadd(173.047, 260.965, 14.685, 0.768)
pt3dadd(173.078, 261.08, 14.684, 0.758)
pt3dadd(173.111, 261.196, 14.682, 0.748)
pt3dadd(173.143, 261.312, 14.681, 0.738)
pt3dadd(173.176, 261.427, 14.68, 0.728)
pt3dadd(173.207, 261.542, 14.678, 0.718)
pt3dadd(173.239, 261.659, 14.677, 0.708)
pt3dadd(173.272, 261.774, 14.675, 0.698)
pt3dadd(173.304, 261.889, 14.674, 0.688)
pt3dadd(173.335, 262.006, 14.672, 0.678)
pt3dadd(173.353, 262.123, 14.67, 0.668)
pt3dadd(173.37, 262.242, 14.667, 0.656)
pt3dadd(173.387, 262.361, 14.664, 0.644)
pt3dadd(173.404, 262.48, 14.662, 0.632)
pt3dadd(173.42, 262.598, 14.659, 0.62)
pt3dadd(173.436, 262.717, 14.656, 0.608)
pt3dadd(173.453, 262.836, 14.654, 0.596)
pt3dadd(173.47, 262.955, 14.651, 0.584)
pt3dadd(173.486, 263.074, 14.648, 0.572)
pt3dadd(173.503, 263.192, 14.645, 0.56)
pt3dadd(173.518, 263.312, 14.64, 0.528)
pt3dadd(173.532, 263.431, 14.635, 0.494)
pt3dadd(173.546, 263.55, 14.629, 0.462)
pt3dadd(173.561, 263.669, 14.623, 0.428)
pt3dadd(173.576, 263.788, 14.618, 0.394)
pt3dadd(173.591, 263.906, 14.612, 0.362)
pt3dadd(173.605, 264.025, 14.607, 0.328)
pt3dadd(173.62, 264.144, 14.601, 0.294)
pt3dadd(173.634, 264.263, 14.596, 0.26)
pt3dadd(173.648, 264.383, 14.59, 0.228)
pt3dadd(173.684, 264.496, 14.579, 0.226)
pt3dadd(173.72, 264.61, 14.567, 0.226)
pt3dadd(173.755, 264.724, 14.555, 0.226)
pt3dadd(173.791, 264.836, 14.543, 0.226)
pt3dadd(173.827, 264.95, 14.531, 0.226)
pt3dadd(173.863, 265.064, 14.519, 0.226)
pt3dadd(173.899, 265.177, 14.507, 0.226)
pt3dadd(173.935, 265.291, 14.495, 0.226)
pt3dadd(173.971, 265.405, 14.483, 0.226)
pt3dadd(174.007, 265.518, 14.471, 0.226)
pt3dadd(174.011, 265.633, 14.444, 0.226)
pt3dadd(174.014, 265.748, 14.416, 0.226)
pt3dadd(174.018, 265.864, 14.388, 0.226)
pt3dadd(174.02, 265.979, 14.36, 0.226)
pt3dadd(174.024, 266.094, 14.332, 0.226)
pt3dadd(174.026, 266.209, 14.304, 0.226)
pt3dadd(174.03, 266.324, 14.276, 0.226)
pt3dadd(174.032, 266.44, 14.248, 0.226)
pt3dadd(174.036, 266.555, 14.22, 0.226)
pt3dadd(173.995, 266.633, 14.167, 0.226)
pt3dadd(173.927, 266.688, 14.099, 0.226)
pt3dadd(173.858, 266.742, 14.031, 0.226)
pt3dadd(173.79, 266.797, 13.962, 0.226)
pt3dadd(173.722, 266.851, 13.894, 0.226)
pt3dadd(173.653, 266.906, 13.826, 0.226)
pt3dadd(173.585, 266.962, 13.757, 0.226)
pt3dadd(173.516, 267.016, 13.689, 0.226)
pt3dadd(173.448, 267.071, 13.621, 0.226)
pt3dadd(173.38, 267.125, 13.552, 0.226)
pt3dadd(173.395, 267.197, 13.497, 0.24)
pt3dadd(173.462, 267.278, 13.451, 0.262)
pt3dadd(173.531, 267.36, 13.404, 0.284)
pt3dadd(173.598, 267.442, 13.358, 0.306)
pt3dadd(173.666, 267.523, 13.311, 0.33)
pt3dadd(173.735, 267.606, 13.265, 0.352)
pt3dadd(173.802, 267.688, 13.218, 0.374)
pt3dadd(173.87, 267.769, 13.172, 0.396)
pt3dadd(173.938, 267.851, 13.125, 0.418)
pt3dadd(174.006, 267.932, 13.079, 0.44)
pt3dadd(174.074, 268.008, 13.084, 0.452)
pt3dadd(174.114, 268.117, 13.1, 0.452)
pt3dadd(174.146, 268.232, 13.1, 0.452)
pt3dadd(174.191, 268.343, 13.1, 0.452)
pt3dadd(174.245, 268.451, 13.1, 0.452)
pt3dadd(174.299, 268.558, 13.098, 0.452)
pt3dadd(174.355, 268.663, 13.093, 0.452)
pt3dadd(174.407, 268.754, 13.07, 0.452)
pt3dadd(174.442, 268.789, 12.979, 0.452)
pt3dadd(174.476, 268.824, 12.887, 0.452)
pt3dadd(174.533, 268.888, 12.834, 0.452)
pt3dadd(174.608, 268.979, 12.816, 0.452)
pt3dadd(174.658, 269.08, 12.837, 0.452)
pt3dadd(174.7, 269.184, 12.872, 0.452)
pt3dadd(174.743, 269.29, 12.9, 0.452)
pt3dadd(174.79, 269.4, 12.9, 0.452)
pt3dadd(174.836, 269.51, 12.9, 0.452)
pt3dadd(174.884, 269.61, 12.863, 0.452)
pt3dadd(174.934, 269.707, 12.822, 0.452)
pt3dadd(174.97, 269.808, 12.776, 0.452)
pt3dadd(174.99, 269.909, 12.726, 0.452)
pt3dadd(175.027, 270.013, 12.7, 0.452)
pt3dadd(175.068, 270.115, 12.666, 0.452)
pt3dadd(175.104, 270.215, 12.62, 0.452)
pt3dadd(175.14, 270.316, 12.575, 0.452)
pt3dadd(175.177, 270.416, 12.529, 0.452)
pt3dadd(175.2, 270.508, 12.471, 0.452)
pt3dadd(175.2, 270.582, 12.393, 0.452)
pt3dadd(175.2, 270.662, 12.32, 0.452)
pt3dadd(175.2, 270.762, 12.264, 0.452)
pt3dadd(175.2, 270.862, 12.212, 0.452)
pt3dadd(175.2, 270.982, 12.22, 0.452)
pt3dadd(175.2, 271.1, 12.229, 0.452)
pt3dadd(175.2, 271.207, 12.265, 0.452)
pt3dadd(175.2, 271.301, 12.328, 0.452)
pt3dadd(175.2, 271.404, 12.372, 0.452)
pt3dadd(175.2, 271.523, 12.386, 0.452)
pt3dadd(175.224, 271.639, 12.385, 0.452)
pt3dadd(175.254, 271.756, 12.38, 0.452)
pt3dadd(175.283, 271.872, 12.375, 0.452)
pt3dadd(175.313, 271.987, 12.37, 0.452)
pt3dadd(175.339, 272.105, 12.368, 0.452)
pt3dadd(175.357, 272.222, 12.374, 0.452)
pt3dadd(175.375, 272.341, 12.38, 0.452)
pt3dadd(175.393, 272.46, 12.386, 0.452)
pt3dadd(175.412, 272.579, 12.391, 0.452)
}
}
proc shape3d_8() {
dend_7[3] { pt3dadd(175.43, 272.696, 12.397, 0.452)
pt3dadd(175.45, 272.815, 12.4, 0.452)
pt3dadd(175.469, 272.933, 12.4, 0.452)
pt3dadd(175.489, 273.052, 12.4, 0.452)
pt3dadd(175.508, 273.17, 12.4, 0.452)
pt3dadd(175.528, 273.288, 12.4, 0.452)
pt3dadd(175.548, 273.407, 12.4, 0.452)
pt3dadd(175.568, 273.526, 12.398, 0.452)
pt3dadd(175.589, 273.643, 12.392, 0.452)
pt3dadd(175.609, 273.761, 12.386, 0.452)
pt3dadd(175.631, 273.878, 12.38, 0.452)
pt3dadd(175.651, 273.997, 12.375, 0.452)
pt3dadd(175.672, 274.115, 12.369, 0.452)
pt3dadd(175.696, 274.232, 12.359, 0.452)
pt3dadd(175.72, 274.349, 12.347, 0.452)
pt3dadd(175.745, 274.465, 12.334, 0.452)
pt3dadd(175.77, 274.582, 12.322, 0.452)
pt3dadd(175.794, 274.698, 12.309, 0.452)
pt3dadd(175.824, 274.812, 12.304, 0.452)
pt3dadd(175.873, 274.92, 12.323, 0.452)
pt3dadd(175.921, 275.027, 12.342, 0.452)
pt3dadd(175.969, 275.135, 12.361, 0.452)
pt3dadd(176.017, 275.243, 12.38, 0.452)
pt3dadd(176.065, 275.351, 12.379, 0.452)
pt3dadd(176.112, 275.459, 12.359, 0.452)
pt3dadd(176.159, 275.567, 12.34, 0.452)
pt3dadd(176.206, 275.675, 12.32, 0.452)
pt3dadd(176.252, 275.783, 12.301, 0.452)
pt3dadd(176.305, 275.89, 12.3, 0.452)
pt3dadd(176.359, 275.998, 12.3, 0.452)
pt3dadd(176.412, 276.104, 12.3, 0.452)
pt3dadd(176.466, 276.211, 12.3, 0.452)
pt3dadd(176.52, 276.319, 12.3, 0.452)
pt3dadd(176.588, 276.416, 12.3, 0.452)
pt3dadd(176.664, 276.51, 12.3, 0.452)
pt3dadd(176.738, 276.604, 12.3, 0.452)
pt3dadd(176.814, 276.697, 12.3, 0.452)
pt3dadd(176.888, 276.791, 12.3, 0.452)
pt3dadd(176.959, 276.888, 12.3, 0.452)
pt3dadd(177.028, 276.986, 12.3, 0.452)
pt3dadd(177.097, 277.085, 12.3, 0.452)
pt3dadd(177.166, 277.183, 12.3, 0.452)
pt3dadd(177.235, 277.282, 12.3, 0.452)
pt3dadd(177.286, 277.39, 12.3, 0.452)
pt3dadd(177.331, 277.5, 12.3, 0.452)
pt3dadd(177.376, 277.612, 12.3, 0.452)
pt3dadd(177.42, 277.723, 12.3, 0.452)
pt3dadd(177.464, 277.835, 12.3, 0.452)
pt3dadd(177.508, 277.946, 12.299, 0.452)
pt3dadd(177.546, 278.06, 12.297, 0.452)
pt3dadd(177.586, 278.173, 12.295, 0.452)
pt3dadd(177.625, 278.287, 12.293, 0.452)
pt3dadd(177.665, 278.4, 12.291, 0.452)
pt3dadd(177.704, 278.513, 12.289, 0.452)
pt3dadd(177.779, 278.604, 12.272, 0.452)
pt3dadd(177.857, 278.693, 12.254, 0.452)
pt3dadd(177.934, 278.783, 12.236, 0.452)
pt3dadd(178.01, 278.872, 12.218, 0.452)
pt3dadd(178.067, 278.976, 12.211, 0.452)
pt3dadd(178.11, 279.088, 12.211, 0.452)
pt3dadd(178.152, 279.199, 12.211, 0.452)
pt3dadd(178.195, 279.312, 12.211, 0.452)
pt3dadd(178.244, 279.421, 12.21, 0.452)
pt3dadd(178.298, 279.528, 12.208, 0.452)
pt3dadd(178.354, 279.635, 12.205, 0.452)
pt3dadd(178.408, 279.742, 12.203, 0.452)
pt3dadd(178.463, 279.848, 12.201, 0.452)
pt3dadd(178.51, 279.958, 12.192, 0.452)
pt3dadd(178.548, 280.069, 12.174, 0.452)
pt3dadd(178.586, 280.181, 12.156, 0.452)
pt3dadd(178.625, 280.292, 12.137, 0.452)
pt3dadd(178.663, 280.404, 12.119, 0.452)
pt3dadd(178.704, 280.513, 12.098, 0.452)
pt3dadd(178.747, 280.622, 12.074, 0.452)
pt3dadd(178.789, 280.73, 12.05, 0.452)
pt3dadd(178.832, 280.838, 12.026, 0.452)
pt3dadd(178.876, 280.948, 12.003, 0.452)
pt3dadd(178.912, 281.053, 11.968, 0.452)
pt3dadd(178.946, 281.159, 11.931, 0.452)
pt3dadd(178.982, 281.266, 11.894, 0.452)
pt3dadd(179.017, 281.371, 11.857, 0.452)
pt3dadd(179.059, 281.477, 11.831, 0.452)
pt3dadd(179.112, 281.585, 11.824, 0.452)
pt3dadd(179.166, 281.692, 11.818, 0.452)
pt3dadd(179.219, 281.798, 11.811, 0.452)
pt3dadd(179.273, 281.906, 11.804, 0.452)
pt3dadd(179.322, 282.014, 11.802, 0.452)
pt3dadd(179.366, 282.126, 11.809, 0.452)
pt3dadd(179.411, 282.238, 11.815, 0.452)
pt3dadd(179.455, 282.349, 11.822, 0.452)
pt3dadd(179.498, 282.46, 11.828, 0.452)
pt3dadd(179.54, 282.572, 11.832, 0.452)
pt3dadd(179.575, 282.686, 11.824, 0.452)
pt3dadd(179.609, 282.802, 11.816, 0.452)
pt3dadd(179.642, 282.916, 11.808, 0.452)
pt3dadd(179.677, 283.031, 11.801, 0.452)
pt3dadd(179.729, 283.139, 11.8, 0.452)
pt3dadd(179.783, 283.246, 11.8, 0.452)
pt3dadd(179.837, 283.354, 11.8, 0.452)
pt3dadd(179.891, 283.46, 11.8, 0.452)
pt3dadd(179.945, 283.567, 11.8, 0.452)
pt3dadd(180.017, 283.662, 11.8, 0.452)
pt3dadd(180.097, 283.751, 11.8, 0.452)
pt3dadd(180.179, 283.84, 11.8, 0.452)
pt3dadd(180.259, 283.928, 11.8, 0.452)
pt3dadd(180.34, 284.017, 11.8, 0.452)
pt3dadd(180.433, 284.092, 11.8, 0.452)
pt3dadd(180.532, 284.16, 11.8, 0.452)
pt3dadd(180.63, 284.23, 11.8, 0.452)
pt3dadd(180.727, 284.299, 11.8, 0.452)
pt3dadd(180.826, 284.368, 11.8, 0.452)
pt3dadd(180.925, 284.435, 11.8, 0.452)
pt3dadd(181.026, 284.501, 11.8, 0.452)
pt3dadd(181.126, 284.567, 11.8, 0.452)
pt3dadd(181.226, 284.633, 11.8, 0.452)
pt3dadd(181.326, 284.699, 11.8, 0.452)
pt3dadd(181.404, 284.788, 11.8, 0.452)
pt3dadd(181.47, 284.887, 11.8, 0.452)
pt3dadd(181.536, 284.988, 11.8, 0.452)
pt3dadd(181.602, 285.088, 11.8, 0.452)
pt3dadd(181.668, 285.188, 11.8, 0.452)
pt3dadd(181.724, 285.293, 11.809, 0.452)
pt3dadd(181.774, 285.401, 11.822, 0.452)
pt3dadd(181.824, 285.509, 11.836, 0.452)
pt3dadd(181.873, 285.617, 11.85, 0.452)
pt3dadd(181.924, 285.725, 11.864, 0.452)
pt3dadd(181.988, 285.823, 11.88, 0.452)
pt3dadd(182.057, 285.919, 11.898, 0.452)
pt3dadd(182.142, 286.003, 11.9, 0.452)
pt3dadd(182.23, 286.085, 11.9, 0.452)
pt3dadd(182.314, 286.171, 11.9, 0.452)
pt3dadd(182.395, 286.259, 11.9, 0.452)
pt3dadd(182.464, 286.34, 11.865, 0.452)
pt3dadd(182.525, 286.417, 11.807, 0.452)
pt3dadd(182.561, 286.458, 11.72, 0.452)
pt3dadd(182.592, 286.493, 11.628, 0.452)
pt3dadd(182.623, 286.529, 11.536, 0.452)
pt3dadd(182.644, 286.52, 11.446, 0.452)
pt3dadd(182.65, 286.468, 11.356, 0.452)
pt3dadd(182.684, 286.412, 11.276, 0.452)
pt3dadd(182.747, 286.355, 11.205, 0.452)
pt3dadd(182.814, 286.3, 11.138, 0.452)
pt3dadd(182.909, 286.248, 11.095, 0.452)
pt3dadd(183.007, 286.206, 11.05, 0.452)
pt3dadd(183.114, 286.174, 11.019, 0.452)
pt3dadd(183.224, 286.134, 10.997, 0.452)
pt3dadd(183.294, 286.108, 10.932, 0.452)
pt3dadd(183.34, 286.088, 10.841, 0.452)
pt3dadd(183.36, 286.08, 10.745, 0.452)
pt3dadd(183.36, 286.08, 10.645, 0.452)
pt3dadd(183.36, 286.08, 10.545, 0.452)
pt3dadd(183.364, 286.099, 10.447, 0.452)
pt3dadd(183.368, 286.134, 10.352, 0.452)
pt3dadd(183.392, 286.168, 10.263, 0.452)
pt3dadd(183.48, 286.2, 10.2, 0.452)
}
dend_7[4] {pt3dclear()
pt3dadd(126.854, 183.872, 18.167, 1.356)
pt3dadd(126.905, 183.872, 18.215, 1.356)
pt3dadd(126.985, 183.872, 18.289, 1.356)
pt3dadd(127.066, 183.872, 18.363, 1.356)
pt3dadd(127.146, 183.872, 18.438, 1.356)
pt3dadd(127.226, 183.872, 18.512, 1.356)
pt3dadd(127.306, 183.872, 18.587, 1.356)
pt3dadd(127.386, 183.874, 18.661, 1.356)
pt3dadd(127.466, 183.874, 18.736, 1.356)
pt3dadd(127.547, 183.874, 18.81, 1.356)
pt3dadd(127.627, 183.874, 18.884, 1.356)
pt3dadd(127.706, 183.874, 18.959, 1.356)
pt3dadd(127.792, 183.875, 19.029, 1.34)
pt3dadd(127.88, 183.877, 19.097, 1.316)
pt3dadd(127.969, 183.878, 19.164, 1.29)
pt3dadd(128.058, 183.881, 19.232, 1.266)
pt3dadd(128.146, 183.882, 19.299, 1.242)
pt3dadd(128.234, 183.884, 19.367, 1.216)
pt3dadd(128.323, 183.887, 19.434, 1.192)
pt3dadd(128.411, 183.888, 19.502, 1.166)
pt3dadd(128.5, 183.89, 19.57, 1.142)
pt3dadd(128.588, 183.893, 19.637, 1.118)
pt3dadd(128.683, 183.895, 19.698, 1.07)
pt3dadd(128.78, 183.9, 19.756, 1.014)
pt3dadd(128.879, 183.904, 19.813, 0.958)
pt3dadd(128.977, 183.908, 19.871, 0.9)
pt3dadd(129.074, 183.912, 19.929, 0.844)
pt3dadd(129.173, 183.917, 19.986, 0.788)
pt3dadd(129.271, 183.92, 20.044, 0.73)
pt3dadd(129.368, 183.925, 20.102, 0.674)
pt3dadd(129.467, 183.929, 20.159, 0.618)
pt3dadd(129.564, 183.934, 20.217, 0.562)
pt3dadd(129.67, 183.94, 20.264, 0.572)
pt3dadd(129.778, 183.947, 20.307, 0.614)
pt3dadd(129.887, 183.954, 20.349, 0.654)
pt3dadd(129.995, 183.961, 20.392, 0.694)
pt3dadd(130.103, 183.968, 20.435, 0.736)
pt3dadd(130.211, 183.976, 20.477, 0.776)
pt3dadd(130.32, 183.983, 20.52, 0.816)
pt3dadd(130.428, 183.99, 20.563, 0.858)
pt3dadd(130.536, 183.997, 20.605, 0.898)
pt3dadd(130.644, 184.004, 20.648, 0.94)
pt3dadd(130.751, 184.014, 20.693, 0.946)
pt3dadd(130.858, 184.024, 20.738, 0.94)
pt3dadd(130.963, 184.033, 20.784, 0.936)
}
}
proc shape3d_9() {
dend_7[4] { pt3dadd(131.07, 184.044, 20.83, 0.93)
pt3dadd(131.177, 184.054, 20.876, 0.924)
pt3dadd(131.282, 184.063, 20.921, 0.918)
pt3dadd(131.389, 184.073, 20.967, 0.914)
pt3dadd(131.495, 184.082, 21.013, 0.908)
pt3dadd(131.602, 184.093, 21.059, 0.902)
pt3dadd(131.707, 184.103, 21.104, 0.896)
pt3dadd(131.814, 184.121, 21.148, 0.884)
pt3dadd(131.921, 184.142, 21.19, 0.868)
pt3dadd(132.026, 184.163, 21.233, 0.852)
pt3dadd(132.133, 184.184, 21.276, 0.836)
pt3dadd(132.24, 184.206, 21.318, 0.82)
pt3dadd(132.347, 184.226, 21.361, 0.804)
pt3dadd(132.452, 184.248, 21.403, 0.79)
pt3dadd(132.559, 184.27, 21.446, 0.774)
pt3dadd(132.666, 184.29, 21.488, 0.758)
pt3dadd(132.773, 184.312, 21.531, 0.742)
pt3dadd(132.88, 184.348, 21.564, 0.75)
pt3dadd(132.986, 184.386, 21.594, 0.764)
pt3dadd(133.094, 184.426, 21.625, 0.778)
pt3dadd(133.201, 184.464, 21.656, 0.792)
pt3dadd(133.309, 184.502, 21.687, 0.806)
pt3dadd(133.416, 184.542, 21.718, 0.82)
pt3dadd(133.524, 184.58, 21.748, 0.832)
pt3dadd(133.631, 184.619, 21.779, 0.846)
pt3dadd(133.739, 184.658, 21.81, 0.86)
pt3dadd(133.846, 184.697, 21.84, 0.874)
pt3dadd(133.958, 184.72, 21.868, 0.828)
pt3dadd(134.072, 184.739, 21.896, 0.772)
pt3dadd(134.186, 184.759, 21.923, 0.716)
pt3dadd(134.3, 184.778, 21.95, 0.66)
pt3dadd(134.413, 184.799, 21.978, 0.604)
pt3dadd(134.527, 184.818, 22.005, 0.548)
pt3dadd(134.641, 184.838, 22.032, 0.492)
pt3dadd(134.755, 184.858, 22.06, 0.436)
pt3dadd(134.868, 184.878, 22.087, 0.38)
pt3dadd(134.982, 184.897, 22.114, 0.324)
pt3dadd(135.09, 184.902, 22.157, 0.308)
pt3dadd(135.197, 184.903, 22.202, 0.298)
pt3dadd(135.305, 184.904, 22.248, 0.29)
pt3dadd(135.412, 184.906, 22.293, 0.28)
pt3dadd(135.518, 184.907, 22.338, 0.272)
pt3dadd(135.625, 184.908, 22.383, 0.262)
pt3dadd(135.732, 184.909, 22.429, 0.254)
pt3dadd(135.839, 184.91, 22.474, 0.244)
pt3dadd(135.947, 184.912, 22.519, 0.236)
pt3dadd(136.054, 184.913, 22.564, 0.226)
pt3dadd(136.156, 184.886, 22.611, 0.244)
pt3dadd(136.258, 184.859, 22.658, 0.264)
pt3dadd(136.36, 184.83, 22.705, 0.284)
pt3dadd(136.463, 184.801, 22.752, 0.304)
pt3dadd(136.565, 184.774, 22.798, 0.324)
pt3dadd(136.667, 184.745, 22.845, 0.346)
pt3dadd(136.769, 184.716, 22.892, 0.366)
pt3dadd(136.871, 184.687, 22.939, 0.386)
pt3dadd(136.973, 184.66, 22.986, 0.406)
pt3dadd(137.075, 184.63, 23.033, 0.428)
pt3dadd(137.167, 184.585, 23.084, 0.462)
pt3dadd(137.261, 184.541, 23.135, 0.498)
pt3dadd(137.354, 184.496, 23.185, 0.532)
pt3dadd(137.448, 184.452, 23.236, 0.568)
pt3dadd(137.542, 184.408, 23.287, 0.602)
pt3dadd(137.634, 184.363, 23.338, 0.638)
pt3dadd(137.728, 184.319, 23.388, 0.672)
pt3dadd(137.821, 184.274, 23.439, 0.708)
pt3dadd(137.915, 184.23, 23.49, 0.744)
pt3dadd(138.006, 184.187, 23.543, 0.778)
pt3dadd(138.089, 184.152, 23.61, 0.812)
pt3dadd(138.172, 184.117, 23.676, 0.846)
pt3dadd(138.254, 184.082, 23.743, 0.88)
pt3dadd(138.336, 184.046, 23.809, 0.914)
pt3dadd(138.419, 184.012, 23.875, 0.95)
pt3dadd(138.502, 183.977, 23.942, 0.984)
pt3dadd(138.584, 183.942, 24.008, 1.018)
pt3dadd(138.667, 183.907, 24.075, 1.052)
pt3dadd(138.749, 183.871, 24.141, 1.086)
pt3dadd(138.827, 183.838, 24.211, 1.108)
pt3dadd(138.875, 183.806, 24.299, 1.074)
pt3dadd(138.924, 183.776, 24.386, 1.038)
pt3dadd(138.973, 183.745, 24.474, 1.002)
pt3dadd(139.022, 183.715, 24.562, 0.966)
pt3dadd(139.072, 183.684, 24.649, 0.93)
pt3dadd(139.121, 183.653, 24.737, 0.894)
pt3dadd(139.169, 183.623, 24.824, 0.858)
pt3dadd(139.218, 183.592, 24.912, 0.822)
pt3dadd(139.267, 183.562, 25, 0.788)
pt3dadd(139.312, 183.528, 25.088, 0.768)
pt3dadd(139.338, 183.481, 25.178, 0.816)
pt3dadd(139.364, 183.436, 25.267, 0.864)
pt3dadd(139.39, 183.39, 25.357, 0.914)
pt3dadd(139.416, 183.344, 25.447, 0.962)
pt3dadd(139.442, 183.299, 25.537, 1.01)
pt3dadd(139.469, 183.252, 25.627, 1.06)
pt3dadd(139.494, 183.206, 25.717, 1.108)
pt3dadd(139.52, 183.161, 25.806, 1.156)
pt3dadd(139.547, 183.115, 25.896, 1.206)
pt3dadd(139.571, 183.068, 25.986, 1.236)
pt3dadd(139.588, 183.023, 26.077, 1.208)
pt3dadd(139.606, 182.977, 26.169, 1.182)
pt3dadd(139.624, 182.93, 26.26, 1.156)
pt3dadd(139.642, 182.885, 26.351, 1.13)
pt3dadd(139.658, 182.839, 26.442, 1.104)
pt3dadd(139.676, 182.792, 26.533, 1.076)
pt3dadd(139.694, 182.747, 26.625, 1.05)
pt3dadd(139.711, 182.701, 26.716, 1.024)
pt3dadd(139.729, 182.654, 26.807, 0.998)
pt3dadd(139.75, 182.61, 26.898, 0.964)
pt3dadd(139.777, 182.569, 26.989, 0.908)
pt3dadd(139.805, 182.527, 27.08, 0.852)
pt3dadd(139.831, 182.486, 27.171, 0.796)
pt3dadd(139.859, 182.444, 27.262, 0.74)
pt3dadd(139.886, 182.404, 27.353, 0.684)
pt3dadd(139.914, 182.362, 27.444, 0.628)
pt3dadd(139.942, 182.321, 27.536, 0.574)
pt3dadd(139.969, 182.279, 27.627, 0.518)
pt3dadd(139.996, 182.238, 27.718, 0.462)
pt3dadd(140.032, 182.195, 27.806, 0.444)
pt3dadd(140.08, 182.15, 27.889, 0.492)
pt3dadd(140.128, 182.106, 27.973, 0.54)
pt3dadd(140.177, 182.06, 28.056, 0.588)
pt3dadd(140.225, 182.016, 28.14, 0.638)
pt3dadd(140.273, 181.972, 28.224, 0.686)
pt3dadd(140.322, 181.927, 28.307, 0.734)
pt3dadd(140.37, 181.882, 28.391, 0.782)
pt3dadd(140.419, 181.837, 28.474, 0.83)
pt3dadd(140.467, 181.793, 28.558, 0.878)
pt3dadd(140.51, 181.73, 28.633, 0.902)
pt3dadd(140.548, 181.649, 28.7, 0.9)
pt3dadd(140.584, 181.568, 28.767, 0.896)
pt3dadd(140.621, 181.487, 28.834, 0.892)
pt3dadd(140.658, 181.405, 28.901, 0.89)
pt3dadd(140.695, 181.325, 28.968, 0.886)
pt3dadd(140.732, 181.243, 29.035, 0.882)
pt3dadd(140.77, 181.163, 29.102, 0.878)
pt3dadd(140.806, 181.081, 29.169, 0.876)
pt3dadd(140.843, 181, 29.236, 0.872)
pt3dadd(140.873, 180.916, 29.302, 0.862)
pt3dadd(140.896, 180.828, 29.367, 0.842)
pt3dadd(140.918, 180.74, 29.433, 0.824)
pt3dadd(140.941, 180.653, 29.499, 0.804)
pt3dadd(140.964, 180.565, 29.564, 0.786)
pt3dadd(140.987, 180.478, 29.63, 0.766)
pt3dadd(141.01, 180.39, 29.696, 0.748)
pt3dadd(141.032, 180.302, 29.761, 0.728)
pt3dadd(141.055, 180.215, 29.827, 0.71)
pt3dadd(141.078, 180.127, 29.892, 0.69)
pt3dadd(141.098, 180.049, 29.965, 0.712)
pt3dadd(141.116, 179.98, 30.046, 0.774)
pt3dadd(141.134, 179.911, 30.127, 0.836)
pt3dadd(141.152, 179.843, 30.207, 0.898)
pt3dadd(141.17, 179.773, 30.288, 0.962)
pt3dadd(141.188, 179.705, 30.368, 1.024)
pt3dadd(141.206, 179.636, 30.449, 1.086)
pt3dadd(141.224, 179.567, 30.529, 1.148)
pt3dadd(141.242, 179.498, 30.61, 1.21)
pt3dadd(141.26, 179.43, 30.691, 1.274)
pt3dadd(141.298, 179.356, 30.76, 1.298)
pt3dadd(141.354, 179.275, 30.818, 1.284)
pt3dadd(141.41, 179.195, 30.875, 1.268)
pt3dadd(141.467, 179.114, 30.933, 1.254)
pt3dadd(141.523, 179.035, 30.991, 1.24)
pt3dadd(141.58, 178.955, 31.049, 1.226)
pt3dadd(141.636, 178.874, 31.106, 1.212)
pt3dadd(141.692, 178.794, 31.164, 1.198)
pt3dadd(141.749, 178.715, 31.222, 1.184)
pt3dadd(141.805, 178.634, 31.28, 1.168)
pt3dadd(141.858, 178.561, 31.345, 1.148)
pt3dadd(141.908, 178.493, 31.416, 1.126)
pt3dadd(141.959, 178.424, 31.486, 1.102)
pt3dadd(142.009, 178.356, 31.557, 1.078)
pt3dadd(142.06, 178.288, 31.628, 1.054)
pt3dadd(142.11, 178.219, 31.699, 1.03)
pt3dadd(142.16, 178.151, 31.769, 1.008)
pt3dadd(142.21, 178.082, 31.84, 0.984)
pt3dadd(142.26, 178.014, 31.911, 0.96)
pt3dadd(142.31, 177.947, 31.982, 0.936)
pt3dadd(142.366, 177.865, 32.038, 0.912)
pt3dadd(142.422, 177.776, 32.086, 0.89)
pt3dadd(142.48, 177.688, 32.133, 0.866)
pt3dadd(142.536, 177.599, 32.18, 0.844)
pt3dadd(142.594, 177.51, 32.228, 0.82)
pt3dadd(142.65, 177.42, 32.275, 0.798)
pt3dadd(142.708, 177.331, 32.322, 0.774)
pt3dadd(142.764, 177.242, 32.37, 0.752)
pt3dadd(142.822, 177.154, 32.417, 0.728)
pt3dadd(142.878, 177.065, 32.465, 0.706)
pt3dadd(142.909, 176.972, 32.521, 0.71)
pt3dadd(142.927, 176.879, 32.581, 0.73)
pt3dadd(142.945, 176.785, 32.642, 0.748)
pt3dadd(142.963, 176.692, 32.702, 0.768)
pt3dadd(142.981, 176.598, 32.763, 0.786)
pt3dadd(142.999, 176.503, 32.824, 0.806)
pt3dadd(143.017, 176.41, 32.884, 0.824)
pt3dadd(143.035, 176.316, 32.945, 0.844)
pt3dadd(143.053, 176.222, 33.006, 0.862)
pt3dadd(143.071, 176.129, 33.066, 0.882)
pt3dadd(143.017, 176.051, 33.115, 0.838)
pt3dadd(142.938, 175.979, 33.16, 0.77)
pt3dadd(142.859, 175.908, 33.205, 0.702)
pt3dadd(142.78, 175.836, 33.25, 0.634)
}
}
proc shape3d_10() {
dend_7[4] { pt3dadd(142.699, 175.764, 33.296, 0.566)
pt3dadd(142.62, 175.692, 33.341, 0.498)
pt3dadd(142.541, 175.62, 33.386, 0.43)
pt3dadd(142.462, 175.549, 33.431, 0.362)
pt3dadd(142.381, 175.477, 33.476, 0.294)
pt3dadd(142.302, 175.405, 33.521, 0.226)
}
dend_7[5] {pt3dclear()
pt3dadd(118.39, 161.291, 15.88, 1.356)
pt3dadd(118.389, 161.298, 15.874, 1.356)
pt3dadd(118.384, 161.383, 15.803, 1.356)
pt3dadd(118.38, 161.467, 15.732, 1.356)
pt3dadd(118.375, 161.552, 15.662, 1.356)
pt3dadd(118.37, 161.638, 15.591, 1.356)
pt3dadd(118.365, 161.722, 15.52, 1.356)
pt3dadd(118.36, 161.807, 15.449, 1.356)
pt3dadd(118.355, 161.891, 15.379, 1.356)
pt3dadd(118.35, 161.976, 15.308, 1.356)
pt3dadd(118.345, 162.061, 15.237, 1.356)
pt3dadd(118.341, 162.145, 15.167, 1.356)
pt3dadd(118.336, 162.23, 15.096, 1.356)
pt3dadd(118.331, 162.314, 15.025, 1.356)
pt3dadd(118.326, 162.4, 14.954, 1.356)
pt3dadd(118.321, 162.485, 14.884, 1.356)
pt3dadd(118.344, 162.551, 14.804, 1.33)
pt3dadd(118.373, 162.614, 14.723, 1.3)
pt3dadd(118.402, 162.678, 14.641, 1.268)
pt3dadd(118.43, 162.742, 14.56, 1.238)
pt3dadd(118.459, 162.805, 14.478, 1.206)
pt3dadd(118.488, 162.868, 14.397, 1.176)
pt3dadd(118.517, 162.931, 14.315, 1.146)
pt3dadd(118.545, 162.995, 14.234, 1.114)
pt3dadd(118.574, 163.058, 14.152, 1.084)
pt3dadd(118.604, 163.122, 14.071, 1.054)
pt3dadd(118.662, 163.198, 14.01, 1.038)
pt3dadd(118.72, 163.272, 13.949, 1.022)
pt3dadd(118.777, 163.348, 13.888, 1.006)
pt3dadd(118.835, 163.423, 13.827, 0.992)
pt3dadd(118.893, 163.498, 13.765, 0.976)
pt3dadd(118.951, 163.573, 13.704, 0.96)
pt3dadd(119.009, 163.648, 13.643, 0.946)
pt3dadd(119.067, 163.723, 13.582, 0.93)
pt3dadd(119.125, 163.799, 13.52, 0.914)
pt3dadd(119.181, 163.878, 13.462, 0.904)
pt3dadd(119.235, 163.966, 13.411, 0.904)
pt3dadd(119.289, 164.053, 13.36, 0.904)
pt3dadd(119.342, 164.142, 13.308, 0.904)
pt3dadd(119.396, 164.23, 13.257, 0.904)
pt3dadd(119.45, 164.317, 13.206, 0.904)
pt3dadd(119.503, 164.405, 13.154, 0.904)
pt3dadd(119.557, 164.492, 13.103, 0.904)
pt3dadd(119.611, 164.581, 13.052, 0.904)
pt3dadd(119.665, 164.669, 13.001, 0.904)
pt3dadd(119.717, 164.758, 12.95, 0.906)
pt3dadd(119.767, 164.85, 12.901, 0.912)
pt3dadd(119.818, 164.941, 12.852, 0.916)
pt3dadd(119.868, 165.032, 12.803, 0.922)
pt3dadd(119.919, 165.125, 12.754, 0.928)
pt3dadd(119.969, 165.216, 12.705, 0.932)
pt3dadd(120.019, 165.308, 12.656, 0.938)
pt3dadd(120.07, 165.4, 12.607, 0.944)
pt3dadd(120.12, 165.491, 12.558, 0.948)
pt3dadd(120.17, 165.583, 12.509, 0.954)
pt3dadd(120.227, 165.674, 12.466, 0.964)
pt3dadd(120.29, 165.768, 12.431, 0.982)
pt3dadd(120.354, 165.862, 12.397, 0.998)
pt3dadd(120.416, 165.954, 12.362, 1.016)
pt3dadd(120.48, 166.048, 12.327, 1.032)
pt3dadd(120.544, 166.14, 12.292, 1.05)
pt3dadd(120.606, 166.234, 12.257, 1.066)
pt3dadd(120.67, 166.326, 12.223, 1.082)
pt3dadd(120.733, 166.42, 12.188, 1.1)
pt3dadd(120.797, 166.512, 12.153, 1.116)
pt3dadd(120.854, 166.598, 12.105, 1.126)
pt3dadd(120.906, 166.675, 12.042, 1.126)
pt3dadd(120.959, 166.752, 11.979, 1.126)
pt3dadd(121.01, 166.83, 11.916, 1.128)
pt3dadd(121.062, 166.907, 11.853, 1.128)
pt3dadd(121.115, 166.984, 11.79, 1.128)
pt3dadd(121.166, 167.062, 11.727, 1.128)
pt3dadd(121.218, 167.138, 11.663, 1.128)
pt3dadd(121.271, 167.215, 11.6, 1.13)
pt3dadd(121.322, 167.293, 11.537, 1.13)
pt3dadd(121.382, 167.375, 11.485, 1.122)
pt3dadd(121.451, 167.46, 11.445, 1.106)
pt3dadd(121.519, 167.546, 11.404, 1.088)
pt3dadd(121.588, 167.632, 11.364, 1.072)
pt3dadd(121.656, 167.718, 11.324, 1.054)
pt3dadd(121.724, 167.804, 11.283, 1.038)
pt3dadd(121.793, 167.89, 11.243, 1.02)
pt3dadd(121.861, 167.976, 11.203, 1.004)
pt3dadd(121.93, 168.061, 11.163, 0.986)
pt3dadd(121.998, 168.148, 11.122, 0.97)
pt3dadd(122.058, 168.238, 11.079, 0.966)
pt3dadd(122.11, 168.33, 11.032, 0.972)
pt3dadd(122.161, 168.422, 10.986, 0.978)
pt3dadd(122.214, 168.515, 10.939, 0.986)
pt3dadd(122.266, 168.607, 10.893, 0.992)
pt3dadd(122.317, 168.701, 10.846, 0.998)
pt3dadd(122.37, 168.793, 10.8, 1.006)
pt3dadd(122.422, 168.886, 10.753, 1.012)
pt3dadd(122.473, 168.978, 10.707, 1.018)
pt3dadd(122.525, 169.072, 10.661, 1.024)
pt3dadd(122.576, 169.166, 10.617, 1.034)
pt3dadd(122.628, 169.262, 10.576, 1.044)
pt3dadd(122.68, 169.36, 10.535, 1.054)
pt3dadd(122.731, 169.456, 10.493, 1.064)
pt3dadd(122.783, 169.552, 10.452, 1.076)
pt3dadd(122.833, 169.649, 10.411, 1.086)
pt3dadd(122.885, 169.745, 10.369, 1.096)
pt3dadd(122.936, 169.842, 10.328, 1.106)
pt3dadd(122.988, 169.938, 10.287, 1.116)
pt3dadd(123.038, 170.034, 10.246, 1.126)
pt3dadd(123.096, 170.132, 10.213, 1.132)
pt3dadd(123.156, 170.231, 10.185, 1.134)
pt3dadd(123.215, 170.329, 10.157, 1.136)
pt3dadd(123.275, 170.428, 10.129, 1.138)
pt3dadd(123.335, 170.526, 10.101, 1.142)
pt3dadd(123.394, 170.626, 10.073, 1.144)
pt3dadd(123.454, 170.724, 10.045, 1.146)
pt3dadd(123.514, 170.822, 10.017, 1.148)
pt3dadd(123.572, 170.921, 9.988, 1.152)
pt3dadd(123.632, 171.019, 9.96, 1.154)
pt3dadd(123.684, 171.122, 9.934, 1.168)
pt3dadd(123.732, 171.229, 9.909, 1.188)
pt3dadd(123.78, 171.335, 9.884, 1.208)
pt3dadd(123.828, 171.44, 9.859, 1.228)
pt3dadd(123.876, 171.546, 9.835, 1.246)
pt3dadd(123.924, 171.652, 9.809, 1.266)
pt3dadd(123.972, 171.758, 9.785, 1.286)
pt3dadd(124.019, 171.864, 9.76, 1.306)
pt3dadd(124.067, 171.97, 9.735, 1.326)
pt3dadd(124.115, 172.075, 9.71, 1.346)
pt3dadd(124.176, 172.162, 9.665, 1.332)
pt3dadd(124.241, 172.241, 9.613, 1.306)
pt3dadd(124.307, 172.32, 9.561, 1.28)
pt3dadd(124.372, 172.398, 9.509, 1.254)
pt3dadd(124.438, 172.477, 9.457, 1.226)
pt3dadd(124.504, 172.556, 9.405, 1.2)
pt3dadd(124.568, 172.634, 9.353, 1.174)
pt3dadd(124.634, 172.714, 9.301, 1.148)
pt3dadd(124.699, 172.792, 9.249, 1.12)
pt3dadd(124.765, 172.871, 9.196, 1.094)
pt3dadd(124.855, 172.938, 9.165, 1.068)
pt3dadd(124.951, 173.003, 9.139, 1.042)
pt3dadd(125.047, 173.068, 9.112, 1.016)
pt3dadd(125.143, 173.132, 9.085, 0.99)
pt3dadd(125.238, 173.197, 9.058, 0.964)
pt3dadd(125.334, 173.262, 9.032, 0.938)
pt3dadd(125.43, 173.327, 9.005, 0.912)
pt3dadd(125.526, 173.392, 8.978, 0.886)
pt3dadd(125.622, 173.456, 8.951, 0.86)
pt3dadd(125.718, 173.521, 8.925, 0.834)
pt3dadd(125.832, 173.551, 8.912, 0.798)
pt3dadd(125.948, 173.58, 8.9, 0.76)
pt3dadd(126.064, 173.609, 8.889, 0.724)
pt3dadd(126.179, 173.638, 8.877, 0.688)
pt3dadd(126.295, 173.665, 8.865, 0.652)
pt3dadd(126.41, 173.694, 8.853, 0.616)
pt3dadd(126.527, 173.723, 8.842, 0.578)
pt3dadd(126.642, 173.752, 8.83, 0.542)
pt3dadd(126.757, 173.779, 8.818, 0.506)
pt3dadd(126.874, 173.808, 8.806, 0.47)
pt3dadd(126.992, 173.819, 8.804, 0.486)
pt3dadd(127.112, 173.828, 8.803, 0.506)
pt3dadd(127.232, 173.839, 8.802, 0.524)
pt3dadd(127.351, 173.849, 8.8, 0.544)
pt3dadd(127.471, 173.858, 8.799, 0.564)
pt3dadd(127.591, 173.869, 8.797, 0.582)
pt3dadd(127.71, 173.879, 8.796, 0.602)
pt3dadd(127.83, 173.888, 8.794, 0.62)
pt3dadd(127.95, 173.898, 8.793, 0.64)
pt3dadd(128.069, 173.909, 8.791, 0.658)
pt3dadd(128.189, 173.903, 8.789, 0.694)
pt3dadd(128.309, 173.896, 8.786, 0.732)
pt3dadd(128.429, 173.89, 8.783, 0.768)
pt3dadd(128.548, 173.884, 8.78, 0.804)
pt3dadd(128.668, 173.876, 8.778, 0.84)
pt3dadd(128.788, 173.87, 8.775, 0.878)
pt3dadd(128.908, 173.863, 8.772, 0.914)
pt3dadd(129.028, 173.857, 8.769, 0.95)
pt3dadd(129.148, 173.851, 8.767, 0.986)
pt3dadd(129.266, 173.844, 8.764, 1.024)
pt3dadd(129.386, 173.832, 8.758, 1.048)
pt3dadd(129.505, 173.82, 8.752, 1.072)
pt3dadd(129.624, 173.808, 8.746, 1.096)
pt3dadd(129.744, 173.796, 8.74, 1.12)
pt3dadd(129.863, 173.784, 8.734, 1.146)
pt3dadd(129.982, 173.772, 8.728, 1.17)
pt3dadd(130.102, 173.76, 8.722, 1.194)
pt3dadd(130.22, 173.747, 8.716, 1.218)
pt3dadd(130.339, 173.735, 8.71, 1.242)
pt3dadd(130.458, 173.723, 8.704, 1.268)
pt3dadd(130.574, 173.694, 8.695, 1.258)
pt3dadd(130.69, 173.664, 8.686, 1.248)
pt3dadd(130.806, 173.634, 8.677, 1.236)
pt3dadd(130.921, 173.604, 8.667, 1.226)
pt3dadd(131.036, 173.573, 8.658, 1.216)
pt3dadd(131.153, 173.543, 8.649, 1.206)
pt3dadd(131.268, 173.513, 8.639, 1.196)
pt3dadd(131.384, 173.483, 8.63, 1.186)
pt3dadd(131.5, 173.453, 8.621, 1.174)
}
}
proc shape3d_11() {
dend_7[5] { pt3dadd(131.615, 173.423, 8.611, 1.162)
pt3dadd(131.726, 173.383, 8.593, 1.128)
pt3dadd(131.838, 173.344, 8.575, 1.092)
pt3dadd(131.948, 173.305, 8.557, 1.056)
pt3dadd(132.06, 173.266, 8.538, 1.02)
pt3dadd(132.172, 173.226, 8.52, 0.984)
pt3dadd(132.283, 173.188, 8.502, 0.948)
pt3dadd(132.394, 173.148, 8.484, 0.914)
pt3dadd(132.505, 173.108, 8.466, 0.878)
pt3dadd(132.617, 173.07, 8.448, 0.842)
pt3dadd(132.727, 173.033, 8.427, 0.806)
pt3dadd(132.836, 173.006, 8.39, 0.772)
pt3dadd(132.944, 172.981, 8.354, 0.736)
pt3dadd(133.054, 172.956, 8.317, 0.702)
pt3dadd(133.162, 172.931, 8.28, 0.668)
pt3dadd(133.271, 172.906, 8.243, 0.632)
pt3dadd(133.379, 172.88, 8.206, 0.598)
pt3dadd(133.488, 172.854, 8.17, 0.562)
pt3dadd(133.597, 172.829, 8.133, 0.528)
pt3dadd(133.705, 172.804, 8.096, 0.494)
pt3dadd(133.814, 172.781, 8.061, 0.46)
pt3dadd(133.931, 172.77, 8.035, 0.442)
pt3dadd(134.046, 172.76, 8.01, 0.422)
pt3dadd(134.161, 172.75, 7.984, 0.404)
pt3dadd(134.278, 172.74, 7.958, 0.384)
pt3dadd(134.393, 172.729, 7.933, 0.366)
pt3dadd(134.508, 172.72, 7.907, 0.346)
pt3dadd(134.624, 172.709, 7.882, 0.328)
pt3dadd(134.74, 172.699, 7.856, 0.308)
pt3dadd(134.855, 172.688, 7.83, 0.288)
pt3dadd(134.971, 172.68, 7.806, 0.276)
pt3dadd(135.089, 172.684, 7.789, 0.3)
pt3dadd(135.208, 172.688, 7.773, 0.324)
pt3dadd(135.325, 172.692, 7.756, 0.348)
pt3dadd(135.444, 172.696, 7.739, 0.372)
pt3dadd(135.562, 172.699, 7.723, 0.396)
pt3dadd(135.68, 172.703, 7.706, 0.42)
pt3dadd(135.799, 172.706, 7.689, 0.442)
pt3dadd(135.917, 172.71, 7.672, 0.466)
pt3dadd(136.036, 172.714, 7.656, 0.49)
pt3dadd(136.153, 172.718, 7.64, 0.512)
pt3dadd(136.272, 172.729, 7.63, 0.53)
pt3dadd(136.391, 172.74, 7.62, 0.546)
pt3dadd(136.511, 172.751, 7.61, 0.564)
pt3dadd(136.63, 172.762, 7.6, 0.58)
pt3dadd(136.748, 172.772, 7.59, 0.598)
pt3dadd(136.867, 172.783, 7.58, 0.614)
pt3dadd(136.986, 172.794, 7.57, 0.63)
pt3dadd(137.105, 172.805, 7.56, 0.648)
pt3dadd(137.224, 172.816, 7.55, 0.664)
pt3dadd(137.342, 172.829, 7.54, 0.68)
pt3dadd(137.459, 172.853, 7.532, 0.694)
pt3dadd(137.576, 172.878, 7.523, 0.708)
pt3dadd(137.694, 172.902, 7.515, 0.72)
pt3dadd(137.81, 172.926, 7.507, 0.734)
pt3dadd(137.928, 172.95, 7.498, 0.748)
pt3dadd(138.044, 172.975, 7.49, 0.76)
pt3dadd(138.162, 172.999, 7.481, 0.774)
pt3dadd(138.278, 173.023, 7.473, 0.788)
pt3dadd(138.396, 173.047, 7.464, 0.8)
pt3dadd(138.511, 173.077, 7.454, 0.82)
pt3dadd(138.623, 173.118, 7.441, 0.852)
pt3dadd(138.734, 173.159, 7.428, 0.884)
pt3dadd(138.846, 173.201, 7.414, 0.916)
pt3dadd(138.958, 173.242, 7.4, 0.948)
pt3dadd(139.069, 173.282, 7.387, 0.98)
pt3dadd(139.181, 173.324, 7.374, 1.012)
pt3dadd(139.292, 173.365, 7.36, 1.044)
pt3dadd(139.404, 173.406, 7.347, 1.076)
pt3dadd(139.516, 173.448, 7.333, 1.108)
pt3dadd(139.626, 173.483, 7.312, 1.13)
pt3dadd(139.735, 173.507, 7.276, 1.13)
pt3dadd(139.844, 173.531, 7.239, 1.13)
pt3dadd(139.954, 173.555, 7.203, 1.13)
pt3dadd(140.063, 173.579, 7.166, 1.13)
pt3dadd(140.172, 173.603, 7.13, 1.13)
pt3dadd(140.281, 173.627, 7.093, 1.13)
pt3dadd(140.39, 173.651, 7.057, 1.13)
pt3dadd(140.5, 173.675, 7.021, 1.13)
pt3dadd(140.609, 173.699, 6.984, 1.13)
pt3dadd(140.719, 173.717, 6.951, 1.12)
pt3dadd(140.836, 173.725, 6.925, 1.09)
pt3dadd(140.951, 173.734, 6.898, 1.06)
pt3dadd(141.066, 173.742, 6.872, 1.03)
pt3dadd(141.181, 173.75, 6.845, 1)
pt3dadd(141.296, 173.759, 6.819, 0.968)
pt3dadd(141.413, 173.767, 6.792, 0.938)
pt3dadd(141.528, 173.776, 6.766, 0.908)
pt3dadd(141.643, 173.784, 6.74, 0.878)
pt3dadd(141.758, 173.792, 6.713, 0.848)
pt3dadd(141.875, 173.795, 6.69, 0.818)
pt3dadd(141.994, 173.789, 6.674, 0.792)
pt3dadd(142.111, 173.782, 6.658, 0.766)
pt3dadd(142.23, 173.776, 6.641, 0.74)
pt3dadd(142.348, 173.77, 6.625, 0.712)
pt3dadd(142.466, 173.762, 6.609, 0.686)
pt3dadd(142.584, 173.756, 6.593, 0.66)
pt3dadd(142.703, 173.75, 6.576, 0.634)
pt3dadd(142.82, 173.743, 6.56, 0.606)
pt3dadd(142.939, 173.737, 6.544, 0.58)
pt3dadd(143.057, 173.723, 6.532, 0.564)
pt3dadd(143.173, 173.696, 6.525, 0.558)
pt3dadd(143.29, 173.669, 6.518, 0.554)
pt3dadd(143.407, 173.642, 6.512, 0.55)
pt3dadd(143.524, 173.616, 6.505, 0.546)
pt3dadd(143.64, 173.59, 6.498, 0.542)
pt3dadd(143.758, 173.563, 6.492, 0.538)
pt3dadd(143.874, 173.536, 6.485, 0.534)
pt3dadd(143.99, 173.509, 6.479, 0.53)
pt3dadd(144.107, 173.483, 6.472, 0.526)
pt3dadd(144.222, 173.448, 6.469, 0.536)
pt3dadd(144.334, 173.406, 6.469, 0.562)
pt3dadd(144.446, 173.363, 6.469, 0.588)
pt3dadd(144.558, 173.321, 6.469, 0.614)
pt3dadd(144.671, 173.278, 6.469, 0.64)
pt3dadd(144.782, 173.236, 6.469, 0.666)
pt3dadd(144.895, 173.194, 6.469, 0.692)
pt3dadd(145.007, 173.15, 6.469, 0.716)
pt3dadd(145.12, 173.108, 6.469, 0.742)
pt3dadd(145.231, 173.065, 6.469, 0.768)
pt3dadd(145.346, 173.03, 6.469, 0.818)
pt3dadd(145.463, 173, 6.469, 0.894)
pt3dadd(145.579, 172.972, 6.469, 0.968)
pt3dadd(145.696, 172.943, 6.469, 1.042)
pt3dadd(145.812, 172.913, 6.469, 1.118)
pt3dadd(145.928, 172.884, 6.469, 1.192)
pt3dadd(146.045, 172.855, 6.469, 1.266)
pt3dadd(146.161, 172.825, 6.469, 1.34)
pt3dadd(146.278, 172.796, 6.469, 1.416)
pt3dadd(146.394, 172.768, 6.469, 1.49)
pt3dadd(146.512, 172.746, 6.469, 1.53)
pt3dadd(146.63, 172.73, 6.469, 1.534)
pt3dadd(146.749, 172.715, 6.469, 1.54)
pt3dadd(146.868, 172.7, 6.469, 1.546)
pt3dadd(146.988, 172.685, 6.469, 1.552)
pt3dadd(147.107, 172.669, 6.469, 1.558)
pt3dadd(147.226, 172.655, 6.469, 1.562)
pt3dadd(147.344, 172.639, 6.469, 1.568)
pt3dadd(147.463, 172.625, 6.469, 1.574)
pt3dadd(147.583, 172.609, 6.469, 1.58)
pt3dadd(147.702, 172.6, 6.469, 1.56)
pt3dadd(147.822, 172.595, 6.469, 1.516)
pt3dadd(147.942, 172.59, 6.469, 1.474)
pt3dadd(148.062, 172.585, 6.469, 1.432)
pt3dadd(148.182, 172.579, 6.469, 1.388)
pt3dadd(148.302, 172.574, 6.469, 1.346)
pt3dadd(148.422, 172.57, 6.469, 1.302)
pt3dadd(148.542, 172.565, 6.469, 1.26)
pt3dadd(148.662, 172.56, 6.469, 1.218)
pt3dadd(148.781, 172.555, 6.469, 1.174)
pt3dadd(148.901, 172.552, 6.469, 1.124)
pt3dadd(149.021, 172.549, 6.469, 1.066)
pt3dadd(149.141, 172.546, 6.469, 1.008)
pt3dadd(149.261, 172.543, 6.469, 0.952)
pt3dadd(149.381, 172.541, 6.469, 0.894)
pt3dadd(149.501, 172.538, 6.469, 0.836)
pt3dadd(149.621, 172.536, 6.469, 0.778)
pt3dadd(149.741, 172.532, 6.469, 0.72)
pt3dadd(149.861, 172.53, 6.469, 0.662)
pt3dadd(149.981, 172.528, 6.469, 0.606)
pt3dadd(150.101, 172.524, 6.469, 0.568)
pt3dadd(150.221, 172.518, 6.469, 0.548)
pt3dadd(150.341, 172.513, 6.469, 0.526)
pt3dadd(150.461, 172.507, 6.469, 0.506)
pt3dadd(150.581, 172.502, 6.469, 0.486)
pt3dadd(150.701, 172.498, 6.469, 0.466)
pt3dadd(150.821, 172.492, 6.469, 0.446)
pt3dadd(150.94, 172.487, 6.469, 0.426)
pt3dadd(151.06, 172.481, 6.469, 0.404)
pt3dadd(151.18, 172.476, 6.469, 0.384)
pt3dadd(151.3, 172.469, 6.469, 0.386)
pt3dadd(151.42, 172.459, 6.47, 0.41)
pt3dadd(151.538, 172.45, 6.47, 0.432)
pt3dadd(151.658, 172.44, 6.47, 0.454)
pt3dadd(151.778, 172.43, 6.47, 0.476)
pt3dadd(151.897, 172.421, 6.47, 0.498)
pt3dadd(152.017, 172.411, 6.47, 0.52)
pt3dadd(152.137, 172.403, 6.47, 0.544)
pt3dadd(152.257, 172.393, 6.47, 0.566)
pt3dadd(152.376, 172.384, 6.47, 0.588)
pt3dadd(152.496, 172.372, 6.47, 0.58)
pt3dadd(152.615, 172.357, 6.47, 0.542)
pt3dadd(152.734, 172.343, 6.47, 0.506)
pt3dadd(152.854, 172.328, 6.47, 0.47)
pt3dadd(152.972, 172.314, 6.47, 0.434)
pt3dadd(153.091, 172.3, 6.47, 0.398)
pt3dadd(153.21, 172.284, 6.47, 0.36)
pt3dadd(153.33, 172.27, 6.47, 0.324)
pt3dadd(153.449, 172.255, 6.47, 0.288)
pt3dadd(153.568, 172.241, 6.47, 0.252)
pt3dadd(153.683, 172.211, 6.47, 0.254)
pt3dadd(153.794, 172.166, 6.471, 0.29)
pt3dadd(153.906, 172.122, 6.471, 0.326)
pt3dadd(154.018, 172.078, 6.471, 0.362)
pt3dadd(154.129, 172.033, 6.471, 0.398)
pt3dadd(154.241, 171.989, 6.471, 0.434)
pt3dadd(154.352, 171.944, 6.471, 0.468)
pt3dadd(154.464, 171.901, 6.471, 0.504)
pt3dadd(154.576, 171.857, 6.471, 0.54)
pt3dadd(154.687, 171.812, 6.471, 0.576)
}
}
proc shape3d_12() {
dend_7[5] { pt3dadd(154.8, 171.775, 6.472, 0.598)
pt3dadd(154.916, 171.743, 6.472, 0.606)
pt3dadd(155.032, 171.71, 6.472, 0.614)
pt3dadd(155.148, 171.679, 6.472, 0.622)
pt3dadd(155.263, 171.647, 6.473, 0.632)
pt3dadd(155.378, 171.616, 6.473, 0.64)
pt3dadd(155.495, 171.583, 6.473, 0.648)
pt3dadd(155.61, 171.552, 6.474, 0.658)
pt3dadd(155.726, 171.52, 6.474, 0.666)
pt3dadd(155.842, 171.488, 6.474, 0.674)
pt3dadd(155.959, 171.463, 6.475, 0.69)
pt3dadd(156.078, 171.445, 6.475, 0.71)
pt3dadd(156.196, 171.426, 6.475, 0.732)
pt3dadd(156.314, 171.407, 6.476, 0.754)
pt3dadd(156.433, 171.389, 6.476, 0.774)
pt3dadd(156.552, 171.37, 6.477, 0.796)
pt3dadd(156.67, 171.35, 6.477, 0.816)
pt3dadd(156.788, 171.332, 6.478, 0.838)
pt3dadd(156.907, 171.313, 6.478, 0.86)
pt3dadd(157.026, 171.294, 6.479, 0.88)
pt3dadd(157.145, 171.283, 6.479, 0.9)
pt3dadd(157.265, 171.278, 6.48, 0.916)
pt3dadd(157.385, 171.272, 6.481, 0.934)
pt3dadd(157.505, 171.266, 6.482, 0.95)
pt3dadd(157.625, 171.262, 6.483, 0.968)
pt3dadd(157.745, 171.256, 6.484, 0.984)
pt3dadd(157.864, 171.251, 6.485, 1.002)
pt3dadd(157.984, 171.245, 6.486, 1.018)
pt3dadd(158.104, 171.239, 6.487, 1.036)
pt3dadd(158.224, 171.234, 6.488, 1.052)
pt3dadd(158.344, 171.235, 6.489, 1.048)
pt3dadd(158.464, 171.24, 6.491, 1.028)
pt3dadd(158.584, 171.246, 6.493, 1.008)
pt3dadd(158.704, 171.251, 6.494, 0.99)
pt3dadd(158.824, 171.257, 6.496, 0.97)
pt3dadd(158.942, 171.262, 6.498, 0.952)
pt3dadd(159.062, 171.268, 6.499, 0.932)
pt3dadd(159.182, 171.272, 6.501, 0.914)
pt3dadd(159.302, 171.278, 6.503, 0.894)
pt3dadd(159.422, 171.283, 6.504, 0.874)
pt3dadd(159.542, 171.292, 6.507, 0.856)
pt3dadd(159.661, 171.302, 6.51, 0.838)
pt3dadd(159.781, 171.313, 6.513, 0.818)
pt3dadd(159.9, 171.323, 6.516, 0.8)
pt3dadd(160.02, 171.334, 6.518, 0.78)
pt3dadd(160.14, 171.344, 6.521, 0.762)
pt3dadd(160.259, 171.354, 6.524, 0.744)
pt3dadd(160.379, 171.365, 6.527, 0.724)
pt3dadd(160.498, 171.376, 6.53, 0.706)
pt3dadd(160.618, 171.386, 6.533, 0.688)
pt3dadd(160.736, 171.401, 6.538, 0.692)
pt3dadd(160.855, 171.418, 6.545, 0.71)
pt3dadd(160.973, 171.436, 6.552, 0.73)
pt3dadd(161.092, 171.454, 6.559, 0.748)
pt3dadd(161.21, 171.47, 6.566, 0.768)
pt3dadd(161.328, 171.488, 6.573, 0.786)
pt3dadd(161.447, 171.505, 6.58, 0.806)
pt3dadd(161.566, 171.523, 6.587, 0.824)
pt3dadd(161.683, 171.541, 6.594, 0.844)
pt3dadd(161.802, 171.558, 6.601, 0.862)
pt3dadd(161.916, 171.593, 6.61, 0.864)
pt3dadd(162.026, 171.638, 6.62, 0.852)
pt3dadd(162.137, 171.684, 6.629, 0.842)
pt3dadd(162.247, 171.73, 6.639, 0.83)
pt3dadd(162.358, 171.775, 6.649, 0.82)
pt3dadd(162.468, 171.821, 6.659, 0.81)
pt3dadd(162.578, 171.866, 6.669, 0.798)
pt3dadd(162.689, 171.912, 6.679, 0.788)
pt3dadd(162.799, 171.958, 6.689, 0.776)
pt3dadd(162.908, 172.003, 6.699, 0.766)
pt3dadd(163.018, 172.049, 6.718, 0.768)
pt3dadd(163.124, 172.094, 6.741, 0.778)
pt3dadd(163.232, 172.14, 6.764, 0.786)
pt3dadd(163.339, 172.186, 6.788, 0.794)
pt3dadd(163.447, 172.231, 6.811, 0.804)
pt3dadd(163.554, 172.278, 6.834, 0.812)
pt3dadd(163.662, 172.324, 6.857, 0.822)
pt3dadd(163.769, 172.369, 6.881, 0.83)
pt3dadd(163.877, 172.415, 6.904, 0.838)
pt3dadd(163.984, 172.46, 6.927, 0.848)
pt3dadd(164.089, 172.504, 6.958, 0.868)
pt3dadd(164.195, 172.547, 6.991, 0.894)
pt3dadd(164.299, 172.589, 7.024, 0.92)
pt3dadd(164.405, 172.631, 7.057, 0.944)
pt3dadd(164.509, 172.674, 7.089, 0.97)
pt3dadd(164.615, 172.716, 7.122, 0.996)
pt3dadd(164.719, 172.758, 7.155, 1.022)
pt3dadd(164.825, 172.801, 7.188, 1.046)
pt3dadd(164.929, 172.843, 7.221, 1.072)
pt3dadd(165.035, 172.886, 7.254, 1.098)
pt3dadd(165.138, 172.939, 7.278, 1.09)
pt3dadd(165.241, 172.994, 7.299, 1.072)
pt3dadd(165.344, 173.051, 7.321, 1.056)
pt3dadd(165.448, 173.106, 7.342, 1.04)
pt3dadd(165.551, 173.162, 7.363, 1.024)
pt3dadd(165.654, 173.218, 7.385, 1.006)
pt3dadd(165.757, 173.274, 7.406, 0.99)
pt3dadd(165.86, 173.329, 7.427, 0.974)
pt3dadd(165.962, 173.386, 7.449, 0.958)
pt3dadd(166.066, 173.441, 7.47, 0.94)
pt3dadd(166.176, 173.485, 7.485, 0.934)
pt3dadd(166.288, 173.525, 7.498, 0.932)
pt3dadd(166.4, 173.566, 7.511, 0.928)
pt3dadd(166.512, 173.605, 7.524, 0.924)
pt3dadd(166.624, 173.646, 7.537, 0.922)
pt3dadd(166.736, 173.686, 7.55, 0.918)
pt3dadd(166.848, 173.726, 7.563, 0.914)
pt3dadd(166.96, 173.766, 7.575, 0.912)
pt3dadd(167.072, 173.807, 7.589, 0.908)
pt3dadd(167.184, 173.846, 7.602, 0.904)
pt3dadd(167.299, 173.879, 7.608, 0.912)
pt3dadd(167.414, 173.91, 7.613, 0.924)
pt3dadd(167.531, 173.941, 7.618, 0.934)
pt3dadd(167.646, 173.972, 7.623, 0.944)
pt3dadd(167.762, 174.002, 7.629, 0.954)
pt3dadd(167.878, 174.034, 7.634, 0.966)
pt3dadd(167.994, 174.065, 7.639, 0.976)
pt3dadd(168.109, 174.096, 7.644, 0.986)
pt3dadd(168.226, 174.126, 7.649, 0.996)
pt3dadd(168.341, 174.157, 7.654, 1.006)
pt3dadd(168.457, 174.19, 7.656, 1.014)
pt3dadd(168.572, 174.223, 7.657, 1.02)
pt3dadd(168.688, 174.257, 7.657, 1.026)
pt3dadd(168.803, 174.289, 7.658, 1.032)
pt3dadd(168.918, 174.323, 7.659, 1.038)
pt3dadd(169.033, 174.355, 7.66, 1.042)
pt3dadd(169.148, 174.389, 7.661, 1.048)
pt3dadd(169.264, 174.421, 7.662, 1.054)
pt3dadd(169.38, 174.455, 7.662, 1.06)
pt3dadd(169.495, 174.487, 7.663, 1.066)
pt3dadd(169.607, 174.53, 7.665, 1.052)
pt3dadd(169.718, 174.574, 7.666, 1.034)
pt3dadd(169.831, 174.617, 7.668, 1.016)
pt3dadd(169.943, 174.66, 7.669, 0.998)
pt3dadd(170.054, 174.703, 7.67, 0.98)
pt3dadd(170.166, 174.746, 7.672, 0.962)
pt3dadd(170.279, 174.79, 7.673, 0.944)
pt3dadd(170.39, 174.834, 7.675, 0.926)
pt3dadd(170.502, 174.877, 7.676, 0.908)
pt3dadd(170.614, 174.92, 7.678, 0.89)
pt3dadd(170.73, 174.95, 7.68, 0.872)
pt3dadd(170.846, 174.979, 7.683, 0.854)
pt3dadd(170.963, 175.008, 7.686, 0.834)
pt3dadd(171.079, 175.037, 7.688, 0.816)
pt3dadd(171.196, 175.066, 7.691, 0.798)
pt3dadd(171.312, 175.094, 7.694, 0.778)
pt3dadd(171.428, 175.123, 7.697, 0.76)
pt3dadd(171.545, 175.152, 7.699, 0.742)
pt3dadd(171.661, 175.181, 7.702, 0.722)
pt3dadd(171.778, 175.21, 7.705, 0.704)
pt3dadd(171.896, 175.226, 7.711, 0.67)
pt3dadd(172.015, 175.242, 7.717, 0.634)
pt3dadd(172.134, 175.258, 7.724, 0.598)
pt3dadd(172.253, 175.273, 7.73, 0.564)
pt3dadd(172.372, 175.289, 7.736, 0.528)
pt3dadd(172.49, 175.303, 7.743, 0.492)
pt3dadd(172.609, 175.319, 7.749, 0.456)
pt3dadd(172.728, 175.334, 7.756, 0.42)
pt3dadd(172.847, 175.35, 7.762, 0.386)
pt3dadd(172.966, 175.366, 7.768, 0.35)
pt3dadd(173.084, 175.37, 7.778, 0.346)
pt3dadd(173.204, 175.375, 7.788, 0.348)
pt3dadd(173.323, 175.38, 7.798, 0.348)
pt3dadd(173.442, 175.385, 7.808, 0.35)
pt3dadd(173.562, 175.39, 7.818, 0.352)
pt3dadd(173.681, 175.393, 7.828, 0.352)
pt3dadd(173.801, 175.398, 7.838, 0.354)
pt3dadd(173.92, 175.403, 7.848, 0.354)
pt3dadd(174.038, 175.408, 7.858, 0.356)
pt3dadd(174.158, 175.412, 7.868, 0.358)
pt3dadd(174.275, 175.412, 7.891, 0.374)
pt3dadd(174.391, 175.414, 7.916, 0.392)
pt3dadd(174.508, 175.414, 7.941, 0.412)
pt3dadd(174.624, 175.415, 7.965, 0.43)
pt3dadd(174.74, 175.415, 7.99, 0.448)
pt3dadd(174.857, 175.416, 8.014, 0.468)
pt3dadd(174.973, 175.416, 8.039, 0.486)
pt3dadd(175.09, 175.417, 8.063, 0.504)
pt3dadd(175.206, 175.417, 8.088, 0.524)
pt3dadd(175.322, 175.418, 8.113, 0.542)
pt3dadd(175.435, 175.42, 8.146, 0.556)
pt3dadd(175.548, 175.421, 8.18, 0.57)
pt3dadd(175.661, 175.422, 8.214, 0.582)
pt3dadd(175.774, 175.423, 8.248, 0.596)
pt3dadd(175.886, 175.423, 8.282, 0.61)
pt3dadd(175.999, 175.424, 8.316, 0.624)
pt3dadd(176.112, 175.426, 8.349, 0.638)
pt3dadd(176.225, 175.427, 8.383, 0.65)
pt3dadd(176.338, 175.428, 8.417, 0.664)
pt3dadd(176.452, 175.429, 8.451, 0.678)
pt3dadd(176.568, 175.432, 8.474, 0.678)
pt3dadd(176.684, 175.433, 8.497, 0.678)
pt3dadd(176.801, 175.435, 8.52, 0.678)
pt3dadd(176.918, 175.438, 8.543, 0.678)
pt3dadd(177.035, 175.44, 8.566, 0.678)
pt3dadd(177.151, 175.441, 8.589, 0.678)
pt3dadd(177.269, 175.444, 8.612, 0.678)
pt3dadd(177.385, 175.446, 8.635, 0.678)
pt3dadd(177.502, 175.447, 8.658, 0.678)
pt3dadd(177.619, 175.45, 8.681, 0.678)
}
}
proc shape3d_13() {
dend_7[5] { pt3dadd(177.738, 175.454, 8.69, 0.678)
pt3dadd(177.857, 175.458, 8.7, 0.678)
pt3dadd(177.977, 175.463, 8.71, 0.678)
pt3dadd(178.096, 175.466, 8.72, 0.678)
pt3dadd(178.216, 175.471, 8.729, 0.678)
pt3dadd(178.334, 175.475, 8.739, 0.678)
pt3dadd(178.454, 175.48, 8.749, 0.678)
pt3dadd(178.573, 175.483, 8.759, 0.678)
pt3dadd(178.693, 175.488, 8.769, 0.678)
pt3dadd(178.812, 175.492, 8.778, 0.678)
pt3dadd(178.932, 175.501, 8.777, 0.696)
pt3dadd(179.052, 175.511, 8.776, 0.712)
pt3dadd(179.171, 175.519, 8.774, 0.73)
pt3dadd(179.291, 175.529, 8.773, 0.748)
pt3dadd(179.411, 175.538, 8.772, 0.764)
pt3dadd(179.53, 175.547, 8.77, 0.782)
pt3dadd(179.65, 175.556, 8.769, 0.798)
pt3dadd(179.77, 175.566, 8.768, 0.816)
pt3dadd(179.888, 175.576, 8.766, 0.834)
pt3dadd(180.008, 175.584, 8.765, 0.85)
pt3dadd(180.127, 175.601, 8.759, 0.824)
pt3dadd(180.246, 175.616, 8.753, 0.8)
pt3dadd(180.365, 175.632, 8.746, 0.776)
pt3dadd(180.484, 175.648, 8.74, 0.752)
pt3dadd(180.602, 175.663, 8.734, 0.728)
pt3dadd(180.721, 175.68, 8.728, 0.704)
pt3dadd(180.84, 175.696, 8.721, 0.68)
pt3dadd(180.959, 175.711, 8.715, 0.656)
pt3dadd(181.076, 175.727, 8.709, 0.632)
pt3dadd(181.195, 175.744, 8.703, 0.608)
pt3dadd(181.308, 175.784, 8.692, 0.592)
pt3dadd(181.42, 175.826, 8.682, 0.576)
pt3dadd(181.531, 175.867, 8.672, 0.56)
pt3dadd(181.644, 175.908, 8.662, 0.544)
pt3dadd(181.756, 175.949, 8.652, 0.528)
pt3dadd(181.868, 175.991, 8.642, 0.512)
pt3dadd(181.98, 176.032, 8.631, 0.496)
pt3dadd(182.092, 176.072, 8.621, 0.482)
pt3dadd(182.204, 176.113, 8.611, 0.466)
pt3dadd(182.315, 176.158, 8.598, 0.454)
pt3dadd(182.414, 176.213, 8.569, 0.464)
pt3dadd(182.515, 176.268, 8.54, 0.476)
pt3dadd(182.616, 176.324, 8.511, 0.486)
pt3dadd(182.717, 176.38, 8.482, 0.496)
pt3dadd(182.818, 176.435, 8.453, 0.506)
pt3dadd(182.917, 176.491, 8.425, 0.518)
pt3dadd(183.018, 176.546, 8.396, 0.528)
pt3dadd(183.119, 176.602, 8.367, 0.54)
pt3dadd(183.22, 176.658, 8.338, 0.55)
pt3dadd(183.318, 176.712, 8.305, 0.554)
pt3dadd(183.416, 176.764, 8.266, 0.544)
pt3dadd(183.514, 176.815, 8.226, 0.534)
pt3dadd(183.611, 176.867, 8.186, 0.524)
pt3dadd(183.708, 176.918, 8.147, 0.514)
pt3dadd(183.805, 176.97, 8.107, 0.504)
pt3dadd(183.902, 177.023, 8.068, 0.496)
pt3dadd(184, 177.074, 8.028, 0.486)
pt3dadd(184.097, 177.126, 7.988, 0.476)
pt3dadd(184.194, 177.178, 7.949, 0.466)
pt3dadd(184.294, 177.233, 7.918, 0.458)
pt3dadd(184.396, 177.29, 7.898, 0.452)
pt3dadd(184.498, 177.349, 7.878, 0.444)
pt3dadd(184.6, 177.407, 7.857, 0.438)
pt3dadd(184.702, 177.466, 7.837, 0.43)
pt3dadd(184.804, 177.524, 7.817, 0.422)
pt3dadd(184.906, 177.582, 7.797, 0.416)
pt3dadd(185.008, 177.641, 7.777, 0.408)
pt3dadd(185.11, 177.7, 7.757, 0.402)
pt3dadd(185.212, 177.757, 7.737, 0.394)
pt3dadd(185.311, 177.822, 7.723, 0.404)
pt3dadd(185.407, 177.893, 7.715, 0.428)
pt3dadd(185.504, 177.964, 7.707, 0.45)
pt3dadd(185.6, 178.034, 7.698, 0.474)
pt3dadd(185.696, 178.105, 7.69, 0.496)
pt3dadd(185.794, 178.176, 7.682, 0.52)
pt3dadd(185.89, 178.247, 7.673, 0.544)
pt3dadd(185.987, 178.316, 7.665, 0.568)
pt3dadd(186.083, 178.387, 7.657, 0.59)
pt3dadd(186.179, 178.458, 7.648, 0.614)
pt3dadd(186.272, 178.534, 7.644, 0.608)
pt3dadd(186.364, 178.612, 7.644, 0.58)
pt3dadd(186.455, 178.69, 7.644, 0.55)
pt3dadd(186.546, 178.768, 7.644, 0.52)
pt3dadd(186.636, 178.847, 7.644, 0.492)
pt3dadd(186.727, 178.925, 7.644, 0.462)
pt3dadd(186.818, 179.003, 7.644, 0.434)
pt3dadd(186.91, 179.081, 7.644, 0.404)
pt3dadd(187, 179.16, 7.644, 0.376)
pt3dadd(187.091, 179.238, 7.644, 0.346)
pt3dadd(187.181, 179.317, 7.644, 0.336)
pt3dadd(187.27, 179.398, 7.644, 0.344)
pt3dadd(187.358, 179.478, 7.644, 0.35)
pt3dadd(187.448, 179.558, 7.644, 0.358)
pt3dadd(187.537, 179.639, 7.643, 0.366)
pt3dadd(187.626, 179.719, 7.643, 0.372)
pt3dadd(187.715, 179.8, 7.643, 0.38)
pt3dadd(187.805, 179.88, 7.643, 0.388)
pt3dadd(187.894, 179.96, 7.643, 0.394)
pt3dadd(187.982, 180.041, 7.643, 0.402)
pt3dadd(188.071, 180.122, 7.643, 0.42)
pt3dadd(188.159, 180.204, 7.643, 0.446)
pt3dadd(188.246, 180.286, 7.643, 0.474)
pt3dadd(188.335, 180.367, 7.643, 0.502)
pt3dadd(188.423, 180.449, 7.643, 0.528)
pt3dadd(188.51, 180.53, 7.643, 0.556)
pt3dadd(188.599, 180.612, 7.642, 0.584)
pt3dadd(188.687, 180.694, 7.642, 0.61)
pt3dadd(188.774, 180.775, 7.642, 0.638)
pt3dadd(188.863, 180.857, 7.642, 0.666)
pt3dadd(188.952, 180.937, 7.642, 0.678)
pt3dadd(189.042, 181.016, 7.642, 0.678)
pt3dadd(189.132, 181.096, 7.641, 0.678)
pt3dadd(189.222, 181.175, 7.641, 0.678)
pt3dadd(189.312, 181.254, 7.641, 0.678)
pt3dadd(189.402, 181.334, 7.641, 0.678)
pt3dadd(189.492, 181.414, 7.641, 0.678)
pt3dadd(189.582, 181.493, 7.64, 0.678)
pt3dadd(189.672, 181.572, 7.64, 0.678)
pt3dadd(189.762, 181.651, 7.64, 0.678)
pt3dadd(189.856, 181.726, 7.64, 0.678)
pt3dadd(189.953, 181.798, 7.639, 0.678)
pt3dadd(190.049, 181.868, 7.639, 0.678)
pt3dadd(190.146, 181.939, 7.639, 0.678)
pt3dadd(190.242, 182.011, 7.638, 0.678)
pt3dadd(190.339, 182.082, 7.638, 0.678)
pt3dadd(190.435, 182.153, 7.637, 0.678)
pt3dadd(190.532, 182.225, 7.637, 0.678)
pt3dadd(190.628, 182.296, 7.637, 0.678)
pt3dadd(190.726, 182.366, 7.636, 0.678)
pt3dadd(190.825, 182.432, 7.636, 0.678)
pt3dadd(190.927, 182.495, 7.635, 0.676)
pt3dadd(191.03, 182.557, 7.635, 0.674)
pt3dadd(191.132, 182.62, 7.634, 0.672)
pt3dadd(191.236, 182.682, 7.633, 0.67)
pt3dadd(191.338, 182.744, 7.633, 0.668)
pt3dadd(191.441, 182.807, 7.632, 0.666)
pt3dadd(191.543, 182.869, 7.632, 0.664)
pt3dadd(191.646, 182.932, 7.631, 0.664)
pt3dadd(191.748, 182.994, 7.63, 0.662)
pt3dadd(191.846, 183.061, 7.629, 0.652)
pt3dadd(191.944, 183.133, 7.628, 0.636)
pt3dadd(192.04, 183.204, 7.627, 0.62)
pt3dadd(192.136, 183.276, 7.626, 0.604)
pt3dadd(192.233, 183.348, 7.625, 0.588)
pt3dadd(192.329, 183.419, 7.624, 0.574)
pt3dadd(192.425, 183.491, 7.622, 0.558)
pt3dadd(192.521, 183.562, 7.621, 0.542)
pt3dadd(192.618, 183.634, 7.62, 0.526)
pt3dadd(192.714, 183.706, 7.619, 0.51)
pt3dadd(192.809, 183.779, 7.618, 0.496)
pt3dadd(192.901, 183.856, 7.616, 0.48)
pt3dadd(192.994, 183.932, 7.614, 0.466)
pt3dadd(193.086, 184.008, 7.612, 0.45)
pt3dadd(193.178, 184.085, 7.61, 0.434)
pt3dadd(193.271, 184.16, 7.608, 0.42)
pt3dadd(193.364, 184.237, 7.607, 0.404)
pt3dadd(193.457, 184.313, 7.605, 0.388)
pt3dadd(193.549, 184.39, 7.603, 0.374)
pt3dadd(193.642, 184.466, 7.601, 0.358)
pt3dadd(193.733, 184.544, 7.599, 0.346)
pt3dadd(193.823, 184.624, 7.596, 0.336)
pt3dadd(193.913, 184.703, 7.593, 0.326)
pt3dadd(194.003, 184.782, 7.59, 0.316)
pt3dadd(194.093, 184.861, 7.588, 0.304)
pt3dadd(194.183, 184.94, 7.585, 0.294)
pt3dadd(194.273, 185.021, 7.582, 0.284)
pt3dadd(194.363, 185.1, 7.58, 0.274)
pt3dadd(194.453, 185.179, 7.577, 0.264)
pt3dadd(194.543, 185.258, 7.574, 0.252)
pt3dadd(194.63, 185.34, 7.57, 0.258)
pt3dadd(194.716, 185.423, 7.565, 0.272)
pt3dadd(194.802, 185.507, 7.559, 0.288)
pt3dadd(194.888, 185.59, 7.554, 0.302)
pt3dadd(194.975, 185.672, 7.548, 0.318)
pt3dadd(195.061, 185.756, 7.543, 0.332)
pt3dadd(195.148, 185.839, 7.538, 0.346)
pt3dadd(195.234, 185.922, 7.532, 0.362)
pt3dadd(195.319, 186.006, 7.527, 0.376)
pt3dadd(195.406, 186.089, 7.521, 0.392)
pt3dadd(195.493, 186.172, 7.514, 0.412)
pt3dadd(195.581, 186.252, 7.506, 0.438)
pt3dadd(195.668, 186.334, 7.498, 0.464)
pt3dadd(195.756, 186.415, 7.49, 0.49)
pt3dadd(195.844, 186.496, 7.482, 0.516)
pt3dadd(195.931, 186.577, 7.474, 0.542)
pt3dadd(196.02, 186.659, 7.466, 0.568)
pt3dadd(196.108, 186.74, 7.458, 0.594)
pt3dadd(196.195, 186.821, 7.45, 0.62)
pt3dadd(196.283, 186.902, 7.442, 0.646)
pt3dadd(196.372, 186.982, 7.428, 0.668)
pt3dadd(196.459, 187.06, 7.41, 0.688)
pt3dadd(196.548, 187.138, 7.391, 0.708)
pt3dadd(196.637, 187.216, 7.373, 0.728)
pt3dadd(196.726, 187.294, 7.355, 0.748)
pt3dadd(196.814, 187.37, 7.337, 0.768)
pt3dadd(196.903, 187.448, 7.318, 0.788)
pt3dadd(196.992, 187.526, 7.3, 0.808)
pt3dadd(197.081, 187.604, 7.282, 0.828)
pt3dadd(197.17, 187.682, 7.264, 0.848)
pt3dadd(197.258, 187.747, 7.227, 0.844)
}
}
proc shape3d_14() {
dend_7[5] { pt3dadd(197.35, 187.807, 7.184, 0.832)
pt3dadd(197.44, 187.866, 7.141, 0.82)
pt3dadd(197.53, 187.926, 7.098, 0.806)
pt3dadd(197.62, 187.986, 7.055, 0.794)
pt3dadd(197.71, 188.046, 7.012, 0.782)
pt3dadd(197.801, 188.106, 6.968, 0.77)
pt3dadd(197.891, 188.166, 6.925, 0.756)
pt3dadd(197.981, 188.226, 6.882, 0.744)
pt3dadd(198.071, 188.286, 6.839, 0.732)
pt3dadd(198.175, 188.334, 6.812, 0.74)
pt3dadd(198.282, 188.381, 6.787, 0.754)
pt3dadd(198.388, 188.428, 6.763, 0.766)
pt3dadd(198.494, 188.474, 6.739, 0.78)
pt3dadd(198.601, 188.521, 6.715, 0.792)
pt3dadd(198.708, 188.568, 6.69, 0.806)
pt3dadd(198.815, 188.615, 6.666, 0.818)
pt3dadd(198.922, 188.662, 6.642, 0.832)
pt3dadd(199.028, 188.708, 6.618, 0.844)
pt3dadd(199.134, 188.755, 6.593, 0.858)
pt3dadd(199.238, 188.814, 6.583, 0.842)
pt3dadd(199.342, 188.874, 6.574, 0.824)
pt3dadd(199.444, 188.935, 6.565, 0.804)
pt3dadd(199.547, 188.995, 6.556, 0.786)
pt3dadd(199.65, 189.056, 6.547, 0.766)
pt3dadd(199.753, 189.116, 6.538, 0.748)
pt3dadd(199.856, 189.176, 6.529, 0.73)
pt3dadd(199.96, 189.238, 6.52, 0.71)
pt3dadd(200.063, 189.298, 6.511, 0.692)
pt3dadd(200.166, 189.359, 6.502, 0.672)
pt3dadd(200.267, 189.424, 6.503, 0.656)
pt3dadd(200.368, 189.488, 6.505, 0.64)
pt3dadd(200.468, 189.553, 6.508, 0.622)
pt3dadd(200.568, 189.619, 6.51, 0.606)
pt3dadd(200.669, 189.684, 6.513, 0.59)
pt3dadd(200.77, 189.749, 6.515, 0.574)
pt3dadd(200.87, 189.815, 6.518, 0.556)
pt3dadd(200.971, 189.88, 6.52, 0.54)
pt3dadd(201.072, 189.946, 6.523, 0.524)
pt3dadd(201.173, 190.01, 6.525, 0.506)
pt3dadd(201.281, 190.061, 6.53, 0.488)
pt3dadd(201.391, 190.109, 6.536, 0.47)
pt3dadd(201.5, 190.157, 6.542, 0.45)
pt3dadd(201.611, 190.205, 6.547, 0.432)
pt3dadd(201.72, 190.253, 6.553, 0.414)
pt3dadd(201.829, 190.302, 6.559, 0.396)
pt3dadd(201.94, 190.35, 6.564, 0.376)
pt3dadd(202.049, 190.398, 6.57, 0.358)
pt3dadd(202.159, 190.446, 6.576, 0.338)
pt3dadd(202.268, 190.494, 6.581, 0.32)
pt3dadd(202.386, 190.517, 6.592, 0.332)
pt3dadd(202.502, 190.538, 6.602, 0.346)
pt3dadd(202.62, 190.56, 6.612, 0.358)
pt3dadd(202.738, 190.582, 6.623, 0.372)
pt3dadd(202.855, 190.603, 6.633, 0.384)
pt3dadd(202.973, 190.625, 6.643, 0.398)
pt3dadd(203.09, 190.646, 6.654, 0.412)
pt3dadd(203.207, 190.667, 6.664, 0.424)
pt3dadd(203.324, 190.688, 6.674, 0.438)
pt3dadd(203.442, 190.708, 6.686, 0.452)
pt3dadd(203.555, 190.699, 6.72, 0.476)
pt3dadd(203.668, 190.691, 6.754, 0.498)
pt3dadd(203.779, 190.682, 6.787, 0.522)
pt3dadd(203.892, 190.674, 6.821, 0.546)
pt3dadd(204.005, 190.666, 6.855, 0.57)
pt3dadd(204.118, 190.657, 6.888, 0.592)
pt3dadd(204.23, 190.649, 6.922, 0.616)
pt3dadd(204.343, 190.64, 6.956, 0.64)
pt3dadd(204.456, 190.632, 6.989, 0.664)
pt3dadd(204.564, 190.609, 7.025, 0.678)
pt3dadd(204.665, 190.565, 7.064, 0.678)
pt3dadd(204.766, 190.519, 7.103, 0.678)
pt3dadd(204.868, 190.475, 7.141, 0.678)
pt3dadd(204.968, 190.429, 7.18, 0.678)
pt3dadd(205.069, 190.385, 7.219, 0.678)
pt3dadd(205.17, 190.339, 7.258, 0.678)
pt3dadd(205.271, 190.295, 7.296, 0.678)
pt3dadd(205.373, 190.249, 7.335, 0.678)
pt3dadd(205.474, 190.205, 7.374, 0.678)
pt3dadd(205.578, 190.157, 7.401, 0.672)
pt3dadd(205.685, 190.106, 7.42, 0.66)
pt3dadd(205.79, 190.056, 7.439, 0.65)
pt3dadd(205.897, 190.006, 7.458, 0.638)
pt3dadd(206.004, 189.956, 7.477, 0.628)
pt3dadd(206.111, 189.906, 7.496, 0.616)
pt3dadd(206.218, 189.856, 7.515, 0.606)
pt3dadd(206.324, 189.805, 7.534, 0.596)
pt3dadd(206.431, 189.756, 7.553, 0.584)
pt3dadd(206.538, 189.706, 7.571, 0.574)
pt3dadd(206.648, 189.662, 7.583, 0.566)
pt3dadd(206.761, 189.624, 7.59, 0.562)
pt3dadd(206.875, 189.586, 7.596, 0.558)
pt3dadd(206.988, 189.547, 7.603, 0.554)
pt3dadd(207.102, 189.509, 7.61, 0.55)
pt3dadd(207.215, 189.47, 7.617, 0.546)
pt3dadd(207.329, 189.432, 7.624, 0.542)
pt3dadd(207.442, 189.394, 7.631, 0.538)
pt3dadd(207.556, 189.355, 7.638, 0.534)
pt3dadd(207.668, 189.316, 7.645, 0.53)
pt3dadd(207.782, 189.278, 7.647, 0.534)
pt3dadd(207.896, 189.242, 7.648, 0.542)
pt3dadd(208.012, 189.205, 7.648, 0.55)
pt3dadd(208.126, 189.169, 7.648, 0.56)
pt3dadd(208.24, 189.132, 7.648, 0.568)
pt3dadd(208.354, 189.096, 7.648, 0.576)
pt3dadd(208.469, 189.059, 7.648, 0.584)
pt3dadd(208.583, 189.023, 7.648, 0.592)
pt3dadd(208.697, 188.986, 7.649, 0.6)
pt3dadd(208.811, 188.95, 7.649, 0.61)
pt3dadd(208.92, 188.9, 7.649, 0.588)
pt3dadd(209.027, 188.845, 7.649, 0.554)
pt3dadd(209.134, 188.79, 7.65, 0.52)
pt3dadd(209.24, 188.735, 7.65, 0.486)
pt3dadd(209.347, 188.68, 7.65, 0.452)
pt3dadd(209.453, 188.626, 7.65, 0.416)
pt3dadd(209.56, 188.57, 7.651, 0.382)
pt3dadd(209.666, 188.515, 7.651, 0.348)
pt3dadd(209.773, 188.46, 7.651, 0.314)
pt3dadd(209.88, 188.405, 7.652, 0.28)
pt3dadd(209.988, 188.353, 7.652, 0.278)
pt3dadd(210.096, 188.302, 7.653, 0.288)
pt3dadd(210.205, 188.25, 7.653, 0.3)
pt3dadd(210.313, 188.2, 7.654, 0.31)
pt3dadd(210.422, 188.148, 7.654, 0.32)
pt3dadd(210.53, 188.096, 7.655, 0.332)
pt3dadd(210.64, 188.046, 7.655, 0.342)
pt3dadd(210.748, 187.994, 7.656, 0.354)
pt3dadd(210.856, 187.943, 7.657, 0.364)
pt3dadd(210.965, 187.891, 7.657, 0.374)
pt3dadd(211.069, 187.834, 7.658, 0.376)
pt3dadd(211.172, 187.771, 7.659, 0.374)
pt3dadd(211.276, 187.71, 7.66, 0.374)
pt3dadd(211.378, 187.649, 7.661, 0.372)
pt3dadd(211.481, 187.586, 7.662, 0.37)
pt3dadd(211.584, 187.525, 7.663, 0.368)
pt3dadd(211.687, 187.464, 7.664, 0.368)
pt3dadd(211.79, 187.402, 7.665, 0.366)
pt3dadd(211.894, 187.34, 7.666, 0.364)
pt3dadd(211.996, 187.279, 7.667, 0.362)
pt3dadd(212.095, 187.211, 7.668, 0.354)
pt3dadd(212.192, 187.141, 7.669, 0.346)
pt3dadd(212.29, 187.072, 7.671, 0.336)
pt3dadd(212.387, 187.001, 7.672, 0.326)
pt3dadd(212.485, 186.931, 7.674, 0.316)
pt3dadd(212.582, 186.862, 7.675, 0.308)
pt3dadd(212.68, 186.791, 7.676, 0.298)
pt3dadd(212.777, 186.721, 7.678, 0.288)
pt3dadd(212.875, 186.652, 7.679, 0.278)
pt3dadd(212.972, 186.581, 7.681, 0.268)
pt3dadd(213.067, 186.509, 7.683, 0.29)
pt3dadd(213.162, 186.434, 7.685, 0.32)
pt3dadd(213.257, 186.36, 7.688, 0.35)
pt3dadd(213.35, 186.287, 7.69, 0.38)
pt3dadd(213.445, 186.212, 7.693, 0.41)
pt3dadd(213.54, 186.139, 7.695, 0.442)
pt3dadd(213.635, 186.065, 7.697, 0.472)
pt3dadd(213.728, 185.99, 7.7, 0.502)
pt3dadd(213.823, 185.917, 7.702, 0.532)
pt3dadd(213.918, 185.843, 7.704, 0.562)
pt3dadd(214.012, 185.768, 7.709, 0.564)
pt3dadd(214.105, 185.694, 7.713, 0.554)
pt3dadd(214.2, 185.62, 7.718, 0.546)
pt3dadd(214.294, 185.545, 7.722, 0.538)
pt3dadd(214.387, 185.471, 7.727, 0.53)
pt3dadd(214.482, 185.396, 7.732, 0.52)
pt3dadd(214.576, 185.322, 7.736, 0.512)
pt3dadd(214.669, 185.248, 7.741, 0.504)
pt3dadd(214.764, 185.173, 7.746, 0.494)
pt3dadd(214.858, 185.099, 7.75, 0.486)
pt3dadd(214.954, 185.027, 7.757, 0.468)
pt3dadd(215.05, 184.956, 7.763, 0.448)
pt3dadd(215.146, 184.884, 7.77, 0.426)
pt3dadd(215.242, 184.813, 7.777, 0.406)
pt3dadd(215.338, 184.741, 7.783, 0.386)
pt3dadd(215.434, 184.67, 7.79, 0.364)
pt3dadd(215.531, 184.6, 7.797, 0.344)
pt3dadd(215.627, 184.528, 7.803, 0.322)
pt3dadd(215.723, 184.457, 7.81, 0.302)
pt3dadd(215.819, 184.385, 7.817, 0.282)
pt3dadd(215.926, 184.332, 7.827, 0.304)
pt3dadd(216.034, 184.283, 7.839, 0.34)
pt3dadd(216.143, 184.235, 7.85, 0.376)
pt3dadd(216.252, 184.186, 7.862, 0.41)
pt3dadd(216.36, 184.136, 7.873, 0.446)
pt3dadd(216.469, 184.088, 7.885, 0.48)
pt3dadd(216.578, 184.039, 7.896, 0.516)
pt3dadd(216.686, 183.991, 7.908, 0.552)
pt3dadd(216.796, 183.942, 7.919, 0.586)
pt3dadd(216.904, 183.893, 7.931, 0.622)
pt3dadd(217.013, 183.858, 7.961, 0.62)
pt3dadd(217.121, 183.827, 7.996, 0.61)
pt3dadd(217.228, 183.796, 8.031, 0.6)
pt3dadd(217.336, 183.764, 8.066, 0.59)
pt3dadd(217.444, 183.733, 8.101, 0.58)
pt3dadd(217.552, 183.701, 8.136, 0.57)
pt3dadd(217.66, 183.67, 8.171, 0.56)
pt3dadd(217.768, 183.638, 8.206, 0.548)
pt3dadd(217.876, 183.607, 8.241, 0.538)
pt3dadd(217.984, 183.576, 8.276, 0.528)
pt3dadd(218.09, 183.535, 8.308, 0.52)
pt3dadd(218.196, 183.493, 8.34, 0.512)
}
}
proc shape3d_15() {
dend_7[5] { pt3dadd(218.302, 183.451, 8.371, 0.506)
pt3dadd(218.407, 183.409, 8.403, 0.498)
pt3dadd(218.513, 183.367, 8.434, 0.49)
pt3dadd(218.618, 183.325, 8.466, 0.482)
pt3dadd(218.725, 183.283, 8.498, 0.476)
pt3dadd(218.831, 183.241, 8.529, 0.468)
pt3dadd(218.936, 183.199, 8.561, 0.46)
pt3dadd(219.042, 183.157, 8.592, 0.452)
pt3dadd(219.148, 183.108, 8.618, 0.448)
pt3dadd(219.252, 183.058, 8.643, 0.442)
pt3dadd(219.356, 183.007, 8.668, 0.436)
pt3dadd(219.462, 182.957, 8.693, 0.43)
pt3dadd(219.566, 182.908, 8.718, 0.424)
pt3dadd(219.671, 182.857, 8.743, 0.42)
pt3dadd(219.776, 182.807, 8.768, 0.414)
pt3dadd(219.881, 182.756, 8.793, 0.408)
pt3dadd(219.985, 182.707, 8.818, 0.402)
pt3dadd(220.091, 182.657, 8.843, 0.398)
pt3dadd(220.198, 182.609, 8.865, 0.382)
pt3dadd(220.304, 182.561, 8.886, 0.364)
pt3dadd(220.411, 182.512, 8.907, 0.346)
pt3dadd(220.518, 182.464, 8.929, 0.33)
pt3dadd(220.625, 182.416, 8.95, 0.312)
pt3dadd(220.732, 182.368, 8.972, 0.296)
pt3dadd(220.838, 182.32, 8.993, 0.278)
pt3dadd(220.945, 182.272, 9.014, 0.262)
pt3dadd(221.052, 182.222, 9.036, 0.244)
pt3dadd(221.159, 182.174, 9.057, 0.226)
pt3dadd(221.257, 182.11, 9.075, 0.226)
pt3dadd(221.356, 182.042, 9.092, 0.226)
pt3dadd(221.453, 181.976, 9.109, 0.226)
pt3dadd(221.551, 181.91, 9.126, 0.226)
pt3dadd(221.648, 181.844, 9.143, 0.226)
pt3dadd(221.747, 181.777, 9.161, 0.226)
pt3dadd(221.844, 181.711, 9.178, 0.226)
pt3dadd(221.942, 181.645, 9.195, 0.226)
pt3dadd(222.04, 181.578, 9.212, 0.226)
pt3dadd(222.138, 181.512, 9.229, 0.226)
pt3dadd(222.199, 181.466, 9.306, 0.226)
pt3dadd(222.26, 181.42, 9.383, 0.226)
pt3dadd(222.323, 181.374, 9.46, 0.226)
pt3dadd(222.384, 181.327, 9.536, 0.226)
pt3dadd(222.445, 181.282, 9.613, 0.226)
pt3dadd(222.506, 181.236, 9.69, 0.226)
pt3dadd(222.568, 181.189, 9.767, 0.226)
pt3dadd(222.63, 181.144, 9.844, 0.226)
pt3dadd(222.691, 181.097, 9.921, 0.226)
pt3dadd(222.752, 181.051, 9.997, 0.226)
}
dend_7[6] {pt3dclear()
pt3dadd(115.172, 144.354, 15.878, 1.582)
pt3dadd(115.195, 144.354, 15.963, 1.582)
pt3dadd(115.221, 144.354, 16.06, 1.582)
pt3dadd(115.248, 144.354, 16.158, 1.582)
pt3dadd(115.275, 144.355, 16.255, 1.582)
pt3dadd(115.303, 144.355, 16.353, 1.58)
pt3dadd(115.33, 144.356, 16.45, 1.58)
pt3dadd(115.358, 144.356, 16.547, 1.58)
pt3dadd(115.385, 144.358, 16.645, 1.58)
pt3dadd(115.413, 144.358, 16.742, 1.578)
pt3dadd(115.44, 144.359, 16.839, 1.578)
pt3dadd(115.468, 144.359, 16.937, 1.578)
pt3dadd(115.495, 144.36, 17.034, 1.578)
pt3dadd(115.59, 144.394, 17.055, 1.552)
pt3dadd(115.702, 144.437, 17.055, 1.52)
pt3dadd(115.814, 144.479, 17.056, 1.486)
pt3dadd(115.926, 144.522, 17.056, 1.454)
pt3dadd(116.038, 144.564, 17.057, 1.422)
pt3dadd(116.15, 144.607, 17.057, 1.39)
pt3dadd(116.263, 144.649, 17.058, 1.356)
pt3dadd(116.375, 144.692, 17.058, 1.324)
pt3dadd(116.487, 144.734, 17.059, 1.292)
pt3dadd(116.599, 144.778, 17.059, 1.26)
pt3dadd(116.716, 144.799, 17.06, 1.21)
pt3dadd(116.835, 144.817, 17.06, 1.156)
pt3dadd(116.954, 144.834, 17.061, 1.102)
pt3dadd(117.073, 144.852, 17.062, 1.048)
pt3dadd(117.192, 144.869, 17.062, 0.996)
pt3dadd(117.31, 144.886, 17.063, 0.942)
pt3dadd(117.429, 144.904, 17.063, 0.888)
pt3dadd(117.548, 144.92, 17.064, 0.834)
pt3dadd(117.666, 144.938, 17.065, 0.78)
pt3dadd(117.785, 144.955, 17.065, 0.726)
pt3dadd(117.901, 144.926, 17.066, 0.688)
pt3dadd(118.016, 144.893, 17.068, 0.65)
pt3dadd(118.132, 144.86, 17.069, 0.61)
pt3dadd(118.247, 144.828, 17.07, 0.572)
pt3dadd(118.363, 144.794, 17.071, 0.534)
pt3dadd(118.478, 144.762, 17.072, 0.496)
pt3dadd(118.593, 144.73, 17.073, 0.458)
pt3dadd(118.709, 144.696, 17.074, 0.418)
pt3dadd(118.824, 144.664, 17.075, 0.38)
pt3dadd(118.937, 144.624, 17.076, 0.35)
pt3dadd(119.039, 144.562, 17.078, 0.346)
pt3dadd(119.142, 144.499, 17.079, 0.342)
pt3dadd(119.244, 144.436, 17.081, 0.336)
pt3dadd(119.346, 144.373, 17.082, 0.332)
pt3dadd(119.449, 144.311, 17.084, 0.328)
pt3dadd(119.551, 144.248, 17.085, 0.324)
pt3dadd(119.653, 144.186, 17.087, 0.32)
pt3dadd(119.756, 144.124, 17.089, 0.316)
pt3dadd(119.858, 144.061, 17.09, 0.31)
pt3dadd(119.957, 143.993, 17.092, 0.316)
pt3dadd(120.047, 143.914, 17.094, 0.346)
pt3dadd(120.137, 143.834, 17.096, 0.376)
pt3dadd(120.227, 143.755, 17.098, 0.404)
pt3dadd(120.317, 143.675, 17.101, 0.434)
pt3dadd(120.406, 143.596, 17.103, 0.464)
pt3dadd(120.496, 143.516, 17.105, 0.494)
pt3dadd(120.586, 143.437, 17.107, 0.524)
pt3dadd(120.676, 143.357, 17.109, 0.554)
pt3dadd(120.766, 143.278, 17.112, 0.582)
pt3dadd(120.854, 143.197, 17.115, 0.606)
pt3dadd(120.941, 143.113, 17.119, 0.614)
pt3dadd(121.026, 143.03, 17.124, 0.62)
pt3dadd(121.112, 142.946, 17.128, 0.628)
pt3dadd(121.199, 142.864, 17.133, 0.636)
pt3dadd(121.284, 142.78, 17.137, 0.642)
pt3dadd(121.37, 142.697, 17.142, 0.65)
pt3dadd(121.457, 142.613, 17.146, 0.658)
pt3dadd(121.543, 142.53, 17.151, 0.666)
pt3dadd(121.628, 142.446, 17.156, 0.672)
pt3dadd(121.715, 142.362, 17.161, 0.678)
pt3dadd(121.799, 142.278, 17.167, 0.682)
pt3dadd(121.884, 142.193, 17.173, 0.686)
pt3dadd(121.969, 142.109, 17.179, 0.688)
pt3dadd(122.053, 142.024, 17.185, 0.692)
pt3dadd(122.138, 141.94, 17.191, 0.694)
pt3dadd(122.224, 141.854, 17.198, 0.698)
pt3dadd(122.308, 141.77, 17.204, 0.7)
pt3dadd(122.393, 141.685, 17.21, 0.704)
pt3dadd(122.477, 141.601, 17.216, 0.706)
pt3dadd(122.562, 141.516, 17.223, 0.714)
pt3dadd(122.647, 141.432, 17.233, 0.728)
pt3dadd(122.731, 141.348, 17.242, 0.744)
pt3dadd(122.816, 141.263, 17.251, 0.76)
pt3dadd(122.9, 141.179, 17.26, 0.774)
pt3dadd(122.986, 141.095, 17.27, 0.79)
pt3dadd(123.071, 141.011, 17.279, 0.806)
pt3dadd(123.155, 140.927, 17.288, 0.822)
pt3dadd(123.24, 140.842, 17.298, 0.836)
pt3dadd(123.324, 140.758, 17.307, 0.852)
pt3dadd(123.408, 140.675, 17.324, 0.864)
pt3dadd(123.488, 140.596, 17.358, 0.868)
pt3dadd(123.568, 140.516, 17.392, 0.872)
pt3dadd(123.648, 140.437, 17.426, 0.876)
pt3dadd(123.728, 140.358, 17.461, 0.88)
pt3dadd(123.809, 140.279, 17.495, 0.884)
pt3dadd(123.889, 140.2, 17.529, 0.888)
pt3dadd(123.968, 140.12, 17.563, 0.894)
pt3dadd(124.049, 140.041, 17.598, 0.898)
pt3dadd(124.129, 139.962, 17.632, 0.902)
pt3dadd(124.21, 139.882, 17.665, 0.9)
pt3dadd(124.291, 139.802, 17.695, 0.888)
pt3dadd(124.373, 139.722, 17.726, 0.876)
pt3dadd(124.454, 139.642, 17.756, 0.866)
pt3dadd(124.536, 139.561, 17.786, 0.854)
pt3dadd(124.618, 139.482, 17.817, 0.842)
pt3dadd(124.699, 139.402, 17.847, 0.832)
pt3dadd(124.781, 139.321, 17.878, 0.82)
pt3dadd(124.862, 139.242, 17.908, 0.808)
pt3dadd(124.944, 139.162, 17.938, 0.798)
pt3dadd(125.028, 139.08, 17.963, 0.786)
pt3dadd(125.112, 138.998, 17.981, 0.774)
pt3dadd(125.197, 138.916, 17.999, 0.764)
pt3dadd(125.281, 138.834, 18.017, 0.752)
pt3dadd(125.366, 138.751, 18.035, 0.74)
pt3dadd(125.45, 138.67, 18.053, 0.73)
pt3dadd(125.536, 138.587, 18.07, 0.718)
pt3dadd(125.62, 138.505, 18.088, 0.706)
pt3dadd(125.705, 138.422, 18.106, 0.696)
pt3dadd(125.79, 138.34, 18.124, 0.684)
pt3dadd(125.875, 138.258, 18.138, 0.678)
pt3dadd(125.962, 138.175, 18.147, 0.678)
pt3dadd(126.048, 138.092, 18.156, 0.678)
pt3dadd(126.133, 138.01, 18.165, 0.678)
pt3dadd(126.22, 137.927, 18.174, 0.678)
pt3dadd(126.306, 137.844, 18.183, 0.678)
pt3dadd(126.392, 137.761, 18.192, 0.678)
pt3dadd(126.479, 137.678, 18.201, 0.678)
pt3dadd(126.565, 137.596, 18.21, 0.678)
pt3dadd(126.652, 137.513, 18.219, 0.678)
pt3dadd(126.738, 137.431, 18.224, 0.678)
pt3dadd(126.827, 137.35, 18.225, 0.678)
pt3dadd(126.914, 137.268, 18.226, 0.678)
pt3dadd(127.003, 137.188, 18.227, 0.678)
pt3dadd(127.092, 137.106, 18.228, 0.678)
pt3dadd(127.18, 137.024, 18.229, 0.678)
pt3dadd(127.268, 136.943, 18.23, 0.678)
pt3dadd(127.356, 136.862, 18.231, 0.678)
pt3dadd(127.445, 136.781, 18.232, 0.678)
pt3dadd(127.534, 136.699, 18.233, 0.678)
pt3dadd(127.622, 136.619, 18.233, 0.682)
pt3dadd(127.711, 136.538, 18.233, 0.692)
pt3dadd(127.801, 136.459, 18.233, 0.7)
pt3dadd(127.89, 136.379, 18.234, 0.71)
pt3dadd(127.979, 136.298, 18.234, 0.72)
pt3dadd(128.069, 136.218, 18.234, 0.728)
pt3dadd(128.158, 136.139, 18.234, 0.738)
pt3dadd(128.248, 136.058, 18.234, 0.746)
pt3dadd(128.336, 135.978, 18.234, 0.756)
pt3dadd(128.426, 135.898, 18.234, 0.766)
}
}
proc shape3d_16() {
dend_7[6] { pt3dadd(128.516, 135.82, 18.235, 0.784)
pt3dadd(128.608, 135.742, 18.235, 0.814)
pt3dadd(128.699, 135.664, 18.235, 0.844)
pt3dadd(128.79, 135.586, 18.235, 0.872)
pt3dadd(128.881, 135.508, 18.235, 0.902)
pt3dadd(128.972, 135.43, 18.236, 0.932)
pt3dadd(129.064, 135.352, 18.236, 0.96)
pt3dadd(129.155, 135.274, 18.236, 0.99)
pt3dadd(129.246, 135.196, 18.236, 1.02)
pt3dadd(129.337, 135.118, 18.237, 1.048)
pt3dadd(129.434, 135.048, 18.237, 1.054)
pt3dadd(129.538, 134.987, 18.237, 1.034)
pt3dadd(129.641, 134.926, 18.238, 1.014)
pt3dadd(129.744, 134.864, 18.238, 0.994)
pt3dadd(129.847, 134.803, 18.239, 0.974)
pt3dadd(129.95, 134.742, 18.239, 0.954)
pt3dadd(130.054, 134.681, 18.24, 0.934)
pt3dadd(130.157, 134.62, 18.24, 0.914)
pt3dadd(130.26, 134.558, 18.241, 0.894)
pt3dadd(130.364, 134.497, 18.241, 0.874)
pt3dadd(130.468, 134.437, 18.242, 0.864)
pt3dadd(130.572, 134.378, 18.243, 0.86)
pt3dadd(130.676, 134.318, 18.244, 0.856)
pt3dadd(130.781, 134.26, 18.245, 0.852)
pt3dadd(130.884, 134.2, 18.245, 0.848)
pt3dadd(130.988, 134.14, 18.246, 0.844)
pt3dadd(131.093, 134.081, 18.247, 0.84)
pt3dadd(131.197, 134.021, 18.248, 0.836)
pt3dadd(131.302, 133.962, 18.249, 0.832)
pt3dadd(131.406, 133.902, 18.25, 0.828)
pt3dadd(131.509, 133.841, 18.251, 0.844)
pt3dadd(131.611, 133.778, 18.252, 0.874)
pt3dadd(131.713, 133.715, 18.253, 0.904)
pt3dadd(131.815, 133.652, 18.255, 0.934)
pt3dadd(131.917, 133.589, 18.256, 0.964)
pt3dadd(132.019, 133.526, 18.257, 0.996)
pt3dadd(132.121, 133.463, 18.259, 1.026)
pt3dadd(132.223, 133.4, 18.26, 1.056)
pt3dadd(132.326, 133.337, 18.262, 1.086)
pt3dadd(132.428, 133.274, 18.263, 1.116)
pt3dadd(132.534, 133.218, 18.265, 1.13)
pt3dadd(132.642, 133.166, 18.268, 1.13)
pt3dadd(132.751, 133.116, 18.27, 1.13)
pt3dadd(132.859, 133.064, 18.273, 1.13)
pt3dadd(132.968, 133.014, 18.276, 1.13)
pt3dadd(133.076, 132.962, 18.278, 1.13)
pt3dadd(133.184, 132.911, 18.281, 1.13)
pt3dadd(133.294, 132.86, 18.284, 1.13)
pt3dadd(133.402, 132.809, 18.286, 1.13)
pt3dadd(133.511, 132.758, 18.289, 1.13)
pt3dadd(133.614, 132.698, 18.293, 1.114)
pt3dadd(133.714, 132.631, 18.299, 1.088)
pt3dadd(133.812, 132.564, 18.304, 1.06)
pt3dadd(133.912, 132.497, 18.31, 1.032)
pt3dadd(134.01, 132.43, 18.315, 1.006)
pt3dadd(134.11, 132.362, 18.321, 0.978)
pt3dadd(134.209, 132.294, 18.326, 0.95)
pt3dadd(134.308, 132.227, 18.332, 0.922)
pt3dadd(134.407, 132.16, 18.337, 0.896)
pt3dadd(134.507, 132.092, 18.343, 0.868)
pt3dadd(134.603, 132.022, 18.35, 0.85)
pt3dadd(134.696, 131.947, 18.358, 0.84)
pt3dadd(134.79, 131.874, 18.365, 0.83)
pt3dadd(134.885, 131.8, 18.373, 0.82)
pt3dadd(134.978, 131.725, 18.381, 0.81)
pt3dadd(135.072, 131.652, 18.389, 0.8)
pt3dadd(135.167, 131.578, 18.397, 0.79)
pt3dadd(135.26, 131.504, 18.405, 0.78)
pt3dadd(135.355, 131.43, 18.413, 0.768)
pt3dadd(135.449, 131.356, 18.421, 0.758)
pt3dadd(135.54, 131.28, 18.432, 0.762)
pt3dadd(135.63, 131.202, 18.445, 0.776)
pt3dadd(135.72, 131.124, 18.458, 0.788)
pt3dadd(135.81, 131.045, 18.471, 0.802)
pt3dadd(135.899, 130.967, 18.485, 0.814)
pt3dadd(135.989, 130.889, 18.498, 0.828)
pt3dadd(136.079, 130.811, 18.511, 0.84)
pt3dadd(136.169, 130.733, 18.524, 0.854)
pt3dadd(136.259, 130.655, 18.537, 0.866)
pt3dadd(136.348, 130.577, 18.55, 0.88)
pt3dadd(136.43, 130.501, 18.583, 0.872)
pt3dadd(136.508, 130.427, 18.627, 0.85)
pt3dadd(136.586, 130.351, 18.67, 0.83)
pt3dadd(136.664, 130.277, 18.713, 0.81)
pt3dadd(136.742, 130.201, 18.757, 0.788)
pt3dadd(136.82, 130.127, 18.801, 0.768)
pt3dadd(136.898, 130.052, 18.844, 0.748)
pt3dadd(136.976, 129.977, 18.888, 0.726)
pt3dadd(137.054, 129.902, 18.931, 0.706)
pt3dadd(137.131, 129.828, 18.974, 0.686)
pt3dadd(137.215, 129.75, 19.005, 0.678)
pt3dadd(137.3, 129.671, 19.029, 0.678)
pt3dadd(137.386, 129.592, 19.053, 0.678)
pt3dadd(137.472, 129.512, 19.077, 0.678)
pt3dadd(137.557, 129.434, 19.101, 0.678)
pt3dadd(137.642, 129.355, 19.124, 0.678)
pt3dadd(137.729, 129.276, 19.148, 0.678)
pt3dadd(137.814, 129.197, 19.172, 0.678)
pt3dadd(137.9, 129.118, 19.196, 0.678)
pt3dadd(137.986, 129.038, 19.22, 0.678)
pt3dadd(138.073, 128.959, 19.236, 0.696)
pt3dadd(138.162, 128.88, 19.249, 0.722)
pt3dadd(138.25, 128.8, 19.261, 0.748)
pt3dadd(138.338, 128.72, 19.274, 0.774)
pt3dadd(138.427, 128.641, 19.286, 0.802)
pt3dadd(138.516, 128.562, 19.299, 0.828)
pt3dadd(138.605, 128.482, 19.311, 0.854)
pt3dadd(138.694, 128.402, 19.324, 0.88)
pt3dadd(138.781, 128.323, 19.336, 0.908)
pt3dadd(138.87, 128.243, 19.349, 0.934)
pt3dadd(138.962, 128.167, 19.356, 0.956)
pt3dadd(139.057, 128.094, 19.362, 0.974)
pt3dadd(139.152, 128.021, 19.367, 0.994)
pt3dadd(139.247, 127.948, 19.373, 1.012)
pt3dadd(139.342, 127.874, 19.378, 1.03)
pt3dadd(139.436, 127.801, 19.384, 1.05)
pt3dadd(139.531, 127.728, 19.389, 1.068)
pt3dadd(139.626, 127.655, 19.395, 1.088)
pt3dadd(139.721, 127.582, 19.4, 1.106)
pt3dadd(139.816, 127.508, 19.405, 1.124)
pt3dadd(139.914, 127.44, 19.407, 1.128)
pt3dadd(140.015, 127.374, 19.407, 1.126)
pt3dadd(140.114, 127.307, 19.407, 1.124)
pt3dadd(140.215, 127.241, 19.407, 1.122)
pt3dadd(140.315, 127.175, 19.407, 1.118)
pt3dadd(140.414, 127.109, 19.407, 1.116)
pt3dadd(140.515, 127.043, 19.407, 1.114)
pt3dadd(140.615, 126.977, 19.407, 1.112)
pt3dadd(140.716, 126.91, 19.407, 1.11)
pt3dadd(140.815, 126.844, 19.407, 1.108)
pt3dadd(140.91, 126.77, 19.407, 1.094)
pt3dadd(141.002, 126.694, 19.407, 1.078)
pt3dadd(141.094, 126.617, 19.407, 1.062)
pt3dadd(141.186, 126.54, 19.407, 1.044)
pt3dadd(141.278, 126.463, 19.407, 1.028)
pt3dadd(141.371, 126.386, 19.407, 1.012)
pt3dadd(141.463, 126.31, 19.407, 0.994)
pt3dadd(141.556, 126.233, 19.407, 0.978)
pt3dadd(141.648, 126.156, 19.407, 0.96)
pt3dadd(141.739, 126.079, 19.407, 0.944)
pt3dadd(141.82, 125.99, 19.407, 0.936)
pt3dadd(141.893, 125.896, 19.407, 0.934)
pt3dadd(141.967, 125.801, 19.407, 0.93)
pt3dadd(142.042, 125.707, 19.407, 0.926)
pt3dadd(142.116, 125.612, 19.407, 0.922)
pt3dadd(142.19, 125.519, 19.407, 0.92)
pt3dadd(142.265, 125.424, 19.407, 0.916)
pt3dadd(142.339, 125.33, 19.407, 0.912)
pt3dadd(142.414, 125.236, 19.407, 0.908)
pt3dadd(142.488, 125.142, 19.407, 0.904)
pt3dadd(142.561, 125.047, 19.407, 0.896)
pt3dadd(142.634, 124.952, 19.407, 0.888)
pt3dadd(142.708, 124.856, 19.407, 0.878)
pt3dadd(142.781, 124.762, 19.407, 0.87)
pt3dadd(142.854, 124.667, 19.407, 0.86)
pt3dadd(142.927, 124.571, 19.407, 0.852)
pt3dadd(143, 124.476, 19.407, 0.842)
pt3dadd(143.074, 124.381, 19.407, 0.834)
pt3dadd(143.147, 124.286, 19.407, 0.824)
pt3dadd(143.22, 124.19, 19.407, 0.814)
pt3dadd(143.297, 124.099, 19.407, 0.806)
pt3dadd(143.375, 124.008, 19.407, 0.798)
pt3dadd(143.453, 123.917, 19.407, 0.79)
pt3dadd(143.531, 123.826, 19.407, 0.782)
pt3dadd(143.609, 123.734, 19.407, 0.774)
pt3dadd(143.687, 123.643, 19.407, 0.766)
pt3dadd(143.765, 123.552, 19.407, 0.756)
pt3dadd(143.843, 123.461, 19.407, 0.748)
pt3dadd(143.921, 123.37, 19.408, 0.74)
pt3dadd(143.999, 123.278, 19.408, 0.732)
pt3dadd(144.084, 123.193, 19.408, 0.754)
pt3dadd(144.17, 123.11, 19.408, 0.786)
pt3dadd(144.257, 123.028, 19.408, 0.818)
pt3dadd(144.343, 122.944, 19.408, 0.848)
pt3dadd(144.43, 122.861, 19.408, 0.88)
pt3dadd(144.516, 122.778, 19.408, 0.912)
pt3dadd(144.602, 122.695, 19.408, 0.942)
pt3dadd(144.69, 122.611, 19.408, 0.974)
pt3dadd(144.776, 122.528, 19.408, 1.004)
pt3dadd(144.863, 122.446, 19.408, 1.036)
pt3dadd(144.961, 122.377, 19.408, 1.04)
pt3dadd(145.062, 122.314, 19.408, 1.036)
pt3dadd(145.164, 122.249, 19.408, 1.032)
pt3dadd(145.266, 122.185, 19.409, 1.03)
pt3dadd(145.367, 122.122, 19.409, 1.026)
pt3dadd(145.469, 122.058, 19.409, 1.022)
pt3dadd(145.571, 121.993, 19.409, 1.018)
pt3dadd(145.672, 121.93, 19.409, 1.014)
pt3dadd(145.774, 121.866, 19.409, 1.012)
pt3dadd(145.874, 121.802, 19.409, 1.008)
pt3dadd(145.979, 121.742, 19.409, 1.004)
pt3dadd(146.083, 121.684, 19.41, 1)
pt3dadd(146.188, 121.625, 19.41, 0.996)
pt3dadd(146.293, 121.566, 19.41, 0.992)
pt3dadd(146.398, 121.507, 19.41, 0.988)
pt3dadd(146.502, 121.447, 19.41, 0.984)
pt3dadd(146.606, 121.388, 19.41, 0.98)
pt3dadd(146.711, 121.33, 19.41, 0.976)
pt3dadd(146.815, 121.271, 19.411, 0.972)
pt3dadd(146.92, 121.212, 19.411, 0.968)
}
}
proc shape3d_17() {
dend_7[6] { pt3dadd(147.022, 121.148, 19.411, 0.982)
pt3dadd(147.124, 121.085, 19.411, 0.998)
pt3dadd(147.226, 121.021, 19.412, 1.014)
pt3dadd(147.326, 120.958, 19.412, 1.03)
pt3dadd(147.428, 120.894, 19.412, 1.046)
pt3dadd(147.53, 120.83, 19.412, 1.062)
pt3dadd(147.632, 120.767, 19.413, 1.078)
pt3dadd(147.733, 120.703, 19.413, 1.094)
pt3dadd(147.835, 120.64, 19.413, 1.11)
pt3dadd(147.937, 120.575, 19.413, 1.126)
pt3dadd(148.045, 120.523, 19.414, 1.096)
pt3dadd(148.153, 120.472, 19.415, 1.062)
pt3dadd(148.262, 120.421, 19.415, 1.026)
pt3dadd(148.37, 120.37, 19.416, 0.992)
pt3dadd(148.48, 120.319, 19.416, 0.956)
pt3dadd(148.588, 120.269, 19.417, 0.922)
pt3dadd(148.697, 120.217, 19.418, 0.886)
pt3dadd(148.806, 120.167, 19.418, 0.852)
pt3dadd(148.914, 120.115, 19.419, 0.816)
pt3dadd(149.023, 120.065, 19.419, 0.782)
pt3dadd(149.125, 120.001, 19.42, 0.748)
pt3dadd(149.226, 119.937, 19.421, 0.716)
pt3dadd(149.327, 119.872, 19.422, 0.682)
pt3dadd(149.428, 119.808, 19.423, 0.65)
pt3dadd(149.53, 119.743, 19.424, 0.616)
pt3dadd(149.63, 119.678, 19.426, 0.584)
pt3dadd(149.731, 119.614, 19.427, 0.552)
pt3dadd(149.832, 119.549, 19.427, 0.518)
pt3dadd(149.934, 119.484, 19.429, 0.486)
pt3dadd(150.035, 119.42, 19.43, 0.454)
pt3dadd(150.132, 119.349, 19.431, 0.43)
pt3dadd(150.228, 119.278, 19.433, 0.408)
pt3dadd(150.324, 119.206, 19.434, 0.386)
pt3dadd(150.421, 119.135, 19.436, 0.362)
pt3dadd(150.517, 119.064, 19.437, 0.34)
pt3dadd(150.613, 118.992, 19.439, 0.318)
pt3dadd(150.71, 118.921, 19.44, 0.296)
pt3dadd(150.806, 118.849, 19.442, 0.272)
pt3dadd(150.904, 118.778, 19.443, 0.25)
pt3dadd(151, 118.707, 19.445, 0.228)
pt3dadd(151.093, 118.632, 19.447, 0.226)
pt3dadd(151.187, 118.557, 19.449, 0.226)
pt3dadd(151.28, 118.482, 19.452, 0.226)
pt3dadd(151.374, 118.407, 19.454, 0.226)
pt3dadd(151.468, 118.332, 19.457, 0.226)
pt3dadd(151.561, 118.257, 19.459, 0.226)
pt3dadd(151.655, 118.182, 19.461, 0.226)
pt3dadd(151.748, 118.106, 19.463, 0.226)
pt3dadd(151.842, 118.031, 19.466, 0.226)
pt3dadd(151.936, 117.956, 19.468, 0.226)
pt3dadd(152.028, 117.879, 19.473, 0.226)
pt3dadd(152.119, 117.802, 19.479, 0.226)
pt3dadd(152.21, 117.725, 19.484, 0.226)
pt3dadd(152.303, 117.648, 19.489, 0.226)
pt3dadd(152.394, 117.571, 19.494, 0.226)
pt3dadd(152.486, 117.494, 19.5, 0.226)
pt3dadd(152.578, 117.417, 19.505, 0.226)
pt3dadd(152.67, 117.34, 19.51, 0.226)
pt3dadd(152.761, 117.263, 19.515, 0.226)
pt3dadd(152.854, 117.186, 19.521, 0.226)
pt3dadd(152.951, 117.117, 19.529, 0.262)
pt3dadd(153.049, 117.049, 19.537, 0.3)
pt3dadd(153.148, 116.981, 19.545, 0.338)
pt3dadd(153.246, 116.913, 19.554, 0.376)
pt3dadd(153.344, 116.845, 19.562, 0.414)
pt3dadd(153.443, 116.777, 19.57, 0.452)
pt3dadd(153.541, 116.709, 19.579, 0.49)
pt3dadd(153.64, 116.641, 19.587, 0.528)
pt3dadd(153.738, 116.573, 19.596, 0.568)
pt3dadd(153.836, 116.505, 19.604, 0.606)
pt3dadd(153.942, 116.455, 19.626, 0.652)
pt3dadd(154.049, 116.405, 19.648, 0.7)
pt3dadd(154.154, 116.356, 19.669, 0.748)
pt3dadd(154.26, 116.306, 19.691, 0.794)
pt3dadd(154.367, 116.256, 19.713, 0.842)
pt3dadd(154.472, 116.207, 19.735, 0.89)
pt3dadd(154.579, 116.157, 19.757, 0.936)
pt3dadd(154.685, 116.108, 19.779, 0.984)
pt3dadd(154.79, 116.058, 19.8, 1.032)
pt3dadd(154.895, 116.01, 19.826, 1.06)
pt3dadd(154.993, 115.966, 19.872, 1.004)
pt3dadd(155.09, 115.923, 19.918, 0.946)
pt3dadd(155.188, 115.88, 19.964, 0.89)
pt3dadd(155.285, 115.837, 20.01, 0.834)
pt3dadd(155.383, 115.793, 20.056, 0.778)
pt3dadd(155.48, 115.75, 20.101, 0.72)
pt3dadd(155.578, 115.707, 20.147, 0.664)
pt3dadd(155.675, 115.664, 20.193, 0.608)
pt3dadd(155.773, 115.62, 20.239, 0.552)
pt3dadd(155.873, 115.575, 20.279, 0.522)
pt3dadd(155.977, 115.526, 20.305, 0.568)
pt3dadd(156.082, 115.476, 20.33, 0.612)
pt3dadd(156.187, 115.426, 20.355, 0.658)
pt3dadd(156.292, 115.376, 20.38, 0.704)
pt3dadd(156.397, 115.327, 20.406, 0.748)
pt3dadd(156.502, 115.277, 20.431, 0.794)
pt3dadd(156.607, 115.227, 20.457, 0.84)
pt3dadd(156.712, 115.178, 20.482, 0.884)
pt3dadd(156.816, 115.128, 20.507, 0.93)
pt3dadd(156.924, 115.084, 20.529, 0.942)
pt3dadd(157.039, 115.052, 20.542, 0.888)
pt3dadd(157.153, 115.02, 20.556, 0.834)
pt3dadd(157.268, 114.987, 20.569, 0.78)
pt3dadd(157.382, 114.955, 20.583, 0.726)
pt3dadd(157.496, 114.923, 20.596, 0.672)
pt3dadd(157.612, 114.891, 20.61, 0.618)
pt3dadd(157.726, 114.859, 20.623, 0.564)
pt3dadd(157.841, 114.827, 20.637, 0.51)
pt3dadd(157.955, 114.795, 20.651, 0.454)
pt3dadd(158.07, 114.767, 20.662, 0.414)
pt3dadd(158.189, 114.748, 20.669, 0.394)
pt3dadd(158.306, 114.729, 20.676, 0.376)
pt3dadd(158.425, 114.709, 20.682, 0.356)
pt3dadd(158.543, 114.69, 20.69, 0.338)
pt3dadd(158.662, 114.671, 20.696, 0.318)
pt3dadd(158.779, 114.651, 20.703, 0.3)
pt3dadd(158.898, 114.632, 20.71, 0.28)
pt3dadd(159.016, 114.613, 20.717, 0.262)
pt3dadd(159.133, 114.593, 20.724, 0.242)
pt3dadd(159.252, 114.576, 20.733, 0.23)
pt3dadd(159.371, 114.562, 20.744, 0.23)
pt3dadd(159.488, 114.547, 20.755, 0.23)
pt3dadd(159.607, 114.533, 20.767, 0.228)
pt3dadd(159.726, 114.519, 20.778, 0.228)
pt3dadd(159.844, 114.504, 20.79, 0.228)
pt3dadd(159.962, 114.49, 20.801, 0.228)
pt3dadd(160.08, 114.476, 20.813, 0.228)
pt3dadd(160.199, 114.462, 20.824, 0.226)
pt3dadd(160.318, 114.447, 20.835, 0.226)
pt3dadd(160.433, 114.43, 20.854, 0.24)
pt3dadd(160.544, 114.407, 20.885, 0.282)
pt3dadd(160.656, 114.384, 20.916, 0.322)
pt3dadd(160.769, 114.361, 20.947, 0.364)
pt3dadd(160.88, 114.338, 20.979, 0.406)
pt3dadd(160.992, 114.315, 21.01, 0.446)
pt3dadd(161.104, 114.292, 21.041, 0.488)
pt3dadd(161.215, 114.27, 21.072, 0.53)
pt3dadd(161.327, 114.247, 21.104, 0.57)
pt3dadd(161.438, 114.224, 21.135, 0.612)
pt3dadd(161.548, 114.192, 21.165, 0.65)
pt3dadd(161.653, 114.149, 21.194, 0.686)
pt3dadd(161.76, 114.105, 21.224, 0.722)
pt3dadd(161.866, 114.061, 21.253, 0.756)
pt3dadd(161.972, 114.018, 21.282, 0.792)
pt3dadd(162.078, 113.974, 21.311, 0.826)
pt3dadd(162.185, 113.93, 21.34, 0.862)
pt3dadd(162.29, 113.886, 21.37, 0.896)
pt3dadd(162.397, 113.843, 21.399, 0.932)
pt3dadd(162.503, 113.799, 21.428, 0.968)
pt3dadd(162.605, 113.745, 21.452, 0.988)
pt3dadd(162.704, 113.682, 21.472, 1)
pt3dadd(162.804, 113.619, 21.491, 1.012)
pt3dadd(162.904, 113.556, 21.511, 1.022)
pt3dadd(163.002, 113.493, 21.531, 1.034)
pt3dadd(163.102, 113.43, 21.551, 1.046)
pt3dadd(163.201, 113.367, 21.571, 1.058)
pt3dadd(163.301, 113.304, 21.59, 1.068)
pt3dadd(163.4, 113.241, 21.61, 1.08)
pt3dadd(163.499, 113.178, 21.63, 1.09)
pt3dadd(163.594, 113.107, 21.643, 1.07)
pt3dadd(163.686, 113.03, 21.652, 1.026)
pt3dadd(163.777, 112.953, 21.661, 0.982)
pt3dadd(163.87, 112.877, 21.67, 0.938)
pt3dadd(163.961, 112.8, 21.678, 0.894)
pt3dadd(164.052, 112.723, 21.687, 0.85)
pt3dadd(164.144, 112.646, 21.696, 0.806)
pt3dadd(164.236, 112.569, 21.705, 0.762)
pt3dadd(164.327, 112.493, 21.713, 0.718)
pt3dadd(164.419, 112.416, 21.722, 0.672)
pt3dadd(164.51, 112.338, 21.728, 0.648)
pt3dadd(164.6, 112.26, 21.732, 0.634)
pt3dadd(164.692, 112.182, 21.737, 0.622)
pt3dadd(164.783, 112.103, 21.741, 0.61)
pt3dadd(164.873, 112.025, 21.745, 0.598)
pt3dadd(164.964, 111.947, 21.75, 0.586)
pt3dadd(165.054, 111.868, 21.754, 0.572)
pt3dadd(165.145, 111.79, 21.758, 0.56)
pt3dadd(165.236, 111.711, 21.762, 0.548)
pt3dadd(165.326, 111.633, 21.767, 0.536)
pt3dadd(165.416, 111.554, 21.769, 0.54)
pt3dadd(165.506, 111.474, 21.769, 0.554)
pt3dadd(165.596, 111.395, 21.77, 0.568)
pt3dadd(165.686, 111.315, 21.77, 0.582)
pt3dadd(165.776, 111.236, 21.771, 0.596)
pt3dadd(165.866, 111.156, 21.771, 0.612)
pt3dadd(165.956, 111.077, 21.771, 0.626)
pt3dadd(166.046, 110.997, 21.772, 0.64)
pt3dadd(166.135, 110.918, 21.772, 0.654)
pt3dadd(166.225, 110.838, 21.773, 0.67)
pt3dadd(166.319, 110.762, 21.774, 0.676)
pt3dadd(166.412, 110.688, 21.775, 0.676)
pt3dadd(166.507, 110.615, 21.776, 0.676)
pt3dadd(166.602, 110.541, 21.777, 0.676)
pt3dadd(166.697, 110.467, 21.778, 0.676)
pt3dadd(166.792, 110.394, 21.779, 0.676)
pt3dadd(166.886, 110.32, 21.78, 0.678)
pt3dadd(166.981, 110.246, 21.782, 0.678)
pt3dadd(167.076, 110.173, 21.783, 0.678)
pt3dadd(167.171, 110.099, 21.784, 0.678)
pt3dadd(167.272, 110.034, 21.785, 0.69)
}
}
proc shape3d_18() {
dend_7[6] { pt3dadd(167.376, 109.975, 21.787, 0.708)
pt3dadd(167.48, 109.916, 21.789, 0.728)
pt3dadd(167.585, 109.857, 21.791, 0.746)
pt3dadd(167.689, 109.799, 21.793, 0.766)
pt3dadd(167.794, 109.74, 21.795, 0.784)
pt3dadd(167.898, 109.681, 21.797, 0.804)
pt3dadd(168.004, 109.622, 21.799, 0.822)
pt3dadd(168.108, 109.563, 21.801, 0.842)
pt3dadd(168.212, 109.504, 21.803, 0.862)
pt3dadd(168.324, 109.461, 21.807, 0.89)
pt3dadd(168.438, 109.425, 21.811, 0.922)
pt3dadd(168.552, 109.388, 21.815, 0.954)
pt3dadd(168.666, 109.351, 21.819, 0.986)
pt3dadd(168.78, 109.315, 21.823, 1.018)
pt3dadd(168.894, 109.278, 21.827, 1.05)
pt3dadd(169.008, 109.241, 21.831, 1.084)
pt3dadd(169.122, 109.205, 21.835, 1.116)
pt3dadd(169.237, 109.168, 21.84, 1.148)
pt3dadd(169.351, 109.131, 21.844, 1.18)
pt3dadd(169.468, 109.109, 21.851, 1.198)
pt3dadd(169.586, 109.091, 21.859, 1.212)
pt3dadd(169.704, 109.073, 21.868, 1.224)
pt3dadd(169.823, 109.055, 21.876, 1.238)
pt3dadd(169.94, 109.037, 21.885, 1.25)
pt3dadd(170.059, 109.019, 21.893, 1.264)
pt3dadd(170.178, 109.001, 21.902, 1.276)
pt3dadd(170.296, 108.984, 21.91, 1.29)
pt3dadd(170.414, 108.966, 21.918, 1.302)
pt3dadd(170.532, 108.948, 21.927, 1.316)
pt3dadd(170.65, 108.932, 21.943, 1.3)
pt3dadd(170.767, 108.918, 21.961, 1.274)
pt3dadd(170.884, 108.903, 21.979, 1.248)
pt3dadd(171.001, 108.889, 21.997, 1.224)
pt3dadd(171.118, 108.875, 22.015, 1.198)
pt3dadd(171.235, 108.86, 22.034, 1.172)
pt3dadd(171.352, 108.846, 22.052, 1.146)
pt3dadd(171.469, 108.831, 22.07, 1.122)
pt3dadd(171.587, 108.817, 22.088, 1.096)
pt3dadd(171.703, 108.802, 22.106, 1.07)
pt3dadd(171.804, 108.768, 22.151, 1.042)
pt3dadd(171.904, 108.731, 22.198, 1.012)
pt3dadd(172.002, 108.694, 22.246, 0.984)
pt3dadd(172.1, 108.657, 22.294, 0.954)
pt3dadd(172.199, 108.62, 22.342, 0.926)
pt3dadd(172.297, 108.583, 22.39, 0.896)
pt3dadd(172.396, 108.546, 22.438, 0.866)
pt3dadd(172.495, 108.509, 22.486, 0.838)
pt3dadd(172.594, 108.472, 22.534, 0.808)
pt3dadd(172.692, 108.435, 22.581, 0.782)
pt3dadd(172.789, 108.371, 22.605, 0.806)
pt3dadd(172.886, 108.307, 22.629, 0.83)
pt3dadd(172.985, 108.243, 22.653, 0.854)
pt3dadd(173.082, 108.179, 22.677, 0.878)
pt3dadd(173.179, 108.116, 22.701, 0.902)
pt3dadd(173.276, 108.052, 22.726, 0.926)
pt3dadd(173.374, 107.988, 22.75, 0.95)
pt3dadd(173.472, 107.924, 22.774, 0.974)
pt3dadd(173.569, 107.861, 22.798, 0.998)
pt3dadd(173.666, 107.797, 22.821, 1.016)
pt3dadd(173.773, 107.743, 22.832, 0.94)
pt3dadd(173.879, 107.688, 22.843, 0.864)
pt3dadd(173.984, 107.633, 22.854, 0.788)
pt3dadd(174.091, 107.578, 22.865, 0.71)
pt3dadd(174.197, 107.523, 22.876, 0.634)
pt3dadd(174.302, 107.469, 22.887, 0.558)
pt3dadd(174.408, 107.414, 22.898, 0.482)
pt3dadd(174.515, 107.359, 22.91, 0.406)
pt3dadd(174.62, 107.304, 22.92, 0.33)
pt3dadd(174.726, 107.248, 22.931, 0.256)
pt3dadd(174.826, 107.181, 22.931, 0.254)
pt3dadd(174.925, 107.114, 22.932, 0.25)
pt3dadd(175.024, 107.047, 22.932, 0.248)
pt3dadd(175.123, 106.98, 22.933, 0.244)
pt3dadd(175.223, 106.912, 22.933, 0.242)
pt3dadd(175.322, 106.845, 22.934, 0.238)
pt3dadd(175.422, 106.778, 22.934, 0.236)
pt3dadd(175.522, 106.711, 22.934, 0.232)
pt3dadd(175.62, 106.643, 22.935, 0.228)
pt3dadd(175.72, 106.576, 22.935, 0.228)
pt3dadd(175.817, 106.505, 22.935, 0.26)
pt3dadd(175.913, 106.434, 22.935, 0.294)
pt3dadd(176.01, 106.363, 22.935, 0.326)
pt3dadd(176.107, 106.292, 22.935, 0.358)
pt3dadd(176.203, 106.221, 22.935, 0.392)
pt3dadd(176.3, 106.15, 22.935, 0.424)
pt3dadd(176.398, 106.079, 22.935, 0.458)
pt3dadd(176.494, 106.008, 22.935, 0.49)
pt3dadd(176.591, 105.937, 22.935, 0.522)
pt3dadd(176.687, 105.866, 22.935, 0.556)
pt3dadd(176.783, 105.793, 22.935, 0.614)
pt3dadd(176.878, 105.72, 22.935, 0.67)
pt3dadd(176.974, 105.647, 22.935, 0.728)
pt3dadd(177.068, 105.574, 22.935, 0.784)
pt3dadd(177.163, 105.501, 22.935, 0.84)
pt3dadd(177.259, 105.429, 22.935, 0.898)
pt3dadd(177.354, 105.356, 22.935, 0.954)
pt3dadd(177.45, 105.283, 22.935, 1.012)
pt3dadd(177.545, 105.21, 22.935, 1.068)
pt3dadd(177.641, 105.137, 22.935, 1.12)
pt3dadd(177.743, 105.075, 22.935, 1.104)
pt3dadd(177.846, 105.014, 22.935, 1.086)
pt3dadd(177.949, 104.952, 22.935, 1.07)
pt3dadd(178.051, 104.89, 22.935, 1.054)
pt3dadd(178.154, 104.828, 22.935, 1.038)
pt3dadd(178.258, 104.766, 22.935, 1.02)
pt3dadd(178.36, 104.704, 22.935, 1.004)
pt3dadd(178.463, 104.642, 22.935, 0.988)
pt3dadd(178.566, 104.58, 22.935, 0.97)
pt3dadd(178.668, 104.517, 22.935, 0.952)
pt3dadd(178.765, 104.448, 22.935, 0.916)
pt3dadd(178.864, 104.378, 22.935, 0.878)
pt3dadd(178.961, 104.308, 22.935, 0.842)
pt3dadd(179.059, 104.239, 22.935, 0.804)
pt3dadd(179.156, 104.169, 22.935, 0.766)
pt3dadd(179.255, 104.1, 22.935, 0.73)
pt3dadd(179.352, 104.03, 22.935, 0.692)
pt3dadd(179.449, 103.96, 22.935, 0.654)
pt3dadd(179.548, 103.891, 22.935, 0.618)
pt3dadd(179.645, 103.821, 22.935, 0.582)
pt3dadd(179.738, 103.746, 22.935, 0.552)
pt3dadd(179.832, 103.671, 22.935, 0.524)
pt3dadd(179.927, 103.596, 22.935, 0.494)
pt3dadd(180.02, 103.521, 22.935, 0.466)
pt3dadd(180.114, 103.446, 22.935, 0.436)
pt3dadd(180.208, 103.372, 22.935, 0.408)
pt3dadd(180.301, 103.297, 22.935, 0.378)
pt3dadd(180.395, 103.222, 22.935, 0.35)
pt3dadd(180.49, 103.147, 22.935, 0.32)
pt3dadd(180.582, 103.072, 22.935, 0.296)
pt3dadd(180.671, 102.991, 22.935, 0.326)
pt3dadd(180.76, 102.909, 22.935, 0.354)
pt3dadd(180.847, 102.828, 22.935, 0.384)
pt3dadd(180.936, 102.747, 22.935, 0.414)
pt3dadd(181.025, 102.666, 22.936, 0.442)
pt3dadd(181.112, 102.585, 22.936, 0.472)
pt3dadd(181.201, 102.504, 22.936, 0.502)
pt3dadd(181.29, 102.422, 22.936, 0.53)
pt3dadd(181.378, 102.341, 22.936, 0.56)
pt3dadd(181.466, 102.26, 22.936, 0.586)
pt3dadd(181.549, 102.174, 22.936, 0.574)
pt3dadd(181.633, 102.088, 22.936, 0.564)
pt3dadd(181.717, 102.002, 22.936, 0.554)
pt3dadd(181.801, 101.916, 22.936, 0.544)
pt3dadd(181.884, 101.83, 22.936, 0.534)
pt3dadd(181.968, 101.744, 22.936, 0.524)
pt3dadd(182.052, 101.658, 22.936, 0.514)
pt3dadd(182.136, 101.572, 22.936, 0.504)
pt3dadd(182.219, 101.486, 22.936, 0.494)
pt3dadd(182.303, 101.399, 22.936, 0.482)
pt3dadd(182.384, 101.311, 22.936, 0.458)
pt3dadd(182.465, 101.223, 22.936, 0.436)
pt3dadd(182.546, 101.134, 22.936, 0.412)
pt3dadd(182.627, 101.046, 22.936, 0.388)
pt3dadd(182.708, 100.958, 22.936, 0.366)
pt3dadd(182.79, 100.869, 22.936, 0.342)
pt3dadd(182.87, 100.781, 22.936, 0.318)
pt3dadd(182.952, 100.692, 22.936, 0.296)
pt3dadd(183.034, 100.604, 22.936, 0.272)
pt3dadd(183.114, 100.515, 22.936, 0.254)
pt3dadd(183.193, 100.425, 22.936, 0.282)
pt3dadd(183.271, 100.334, 22.936, 0.312)
pt3dadd(183.35, 100.244, 22.936, 0.34)
pt3dadd(183.43, 100.153, 22.936, 0.37)
pt3dadd(183.508, 100.063, 22.936, 0.398)
pt3dadd(183.587, 99.972, 22.936, 0.428)
pt3dadd(183.666, 99.882, 22.936, 0.456)
pt3dadd(183.744, 99.791, 22.936, 0.486)
pt3dadd(183.823, 99.701, 22.937, 0.514)
pt3dadd(183.901, 99.609, 22.937, 0.542)
pt3dadd(183.97, 99.511, 22.937, 0.546)
pt3dadd(184.038, 99.413, 22.937, 0.552)
pt3dadd(184.108, 99.315, 22.937, 0.556)
pt3dadd(184.176, 99.216, 22.937, 0.56)
pt3dadd(184.246, 99.118, 22.937, 0.566)
pt3dadd(184.314, 99.02, 22.937, 0.57)
pt3dadd(184.382, 98.921, 22.937, 0.576)
pt3dadd(184.452, 98.823, 22.937, 0.58)
pt3dadd(184.52, 98.725, 22.937, 0.586)
pt3dadd(184.589, 98.626, 22.937, 0.588)
pt3dadd(184.649, 98.522, 22.938, 0.584)
pt3dadd(184.71, 98.419, 22.938, 0.578)
pt3dadd(184.771, 98.316, 22.938, 0.572)
pt3dadd(184.831, 98.212, 22.938, 0.568)
pt3dadd(184.892, 98.109, 22.938, 0.562)
pt3dadd(184.954, 98.005, 22.938, 0.556)
pt3dadd(185.014, 97.902, 22.938, 0.55)
pt3dadd(185.075, 97.798, 22.938, 0.546)
pt3dadd(185.136, 97.695, 22.939, 0.54)
pt3dadd(185.197, 97.592, 22.939, 0.542)
pt3dadd(185.266, 97.493, 22.939, 0.59)
pt3dadd(185.333, 97.394, 22.939, 0.638)
pt3dadd(185.401, 97.295, 22.94, 0.686)
pt3dadd(185.468, 97.196, 22.94, 0.734)
pt3dadd(185.536, 97.097, 22.94, 0.782)
pt3dadd(185.604, 96.998, 22.94, 0.83)
pt3dadd(185.671, 96.898, 22.941, 0.878)
pt3dadd(185.738, 96.799, 22.941, 0.926)
pt3dadd(185.807, 96.7, 22.941, 0.972)
pt3dadd(185.875, 96.602, 22.941, 1.008)
pt3dadd(185.947, 96.506, 22.942, 0.974)
}
}
proc shape3d_19() {
dend_7[6] { pt3dadd(186.019, 96.409, 22.942, 0.94)
pt3dadd(186.091, 96.313, 22.943, 0.904)
pt3dadd(186.162, 96.217, 22.943, 0.87)
pt3dadd(186.234, 96.121, 22.944, 0.836)
pt3dadd(186.306, 96.025, 22.944, 0.8)
pt3dadd(186.378, 95.929, 22.944, 0.766)
pt3dadd(186.45, 95.833, 22.945, 0.732)
pt3dadd(186.522, 95.737, 22.945, 0.696)
pt3dadd(186.594, 95.641, 22.946, 0.662)
pt3dadd(186.664, 95.543, 22.946, 0.632)
pt3dadd(186.733, 95.446, 22.947, 0.602)
pt3dadd(186.804, 95.348, 22.948, 0.572)
pt3dadd(186.874, 95.251, 22.949, 0.542)
pt3dadd(186.943, 95.153, 22.949, 0.512)
pt3dadd(187.014, 95.056, 22.95, 0.482)
pt3dadd(187.084, 94.958, 22.951, 0.452)
pt3dadd(187.153, 94.861, 22.951, 0.422)
pt3dadd(187.224, 94.763, 22.952, 0.392)
pt3dadd(187.292, 94.665, 22.953, 0.376)
pt3dadd(187.354, 94.562, 22.954, 0.426)
pt3dadd(187.415, 94.458, 22.955, 0.476)
pt3dadd(187.476, 94.355, 22.957, 0.526)
pt3dadd(187.537, 94.252, 22.958, 0.576)
pt3dadd(187.598, 94.149, 22.959, 0.626)
pt3dadd(187.66, 94.046, 22.96, 0.678)
pt3dadd(187.721, 93.942, 22.962, 0.728)
pt3dadd(187.782, 93.839, 22.963, 0.778)
pt3dadd(187.843, 93.736, 22.964, 0.828)
pt3dadd(187.906, 93.634, 22.966, 0.868)
pt3dadd(187.976, 93.537, 22.968, 0.856)
pt3dadd(188.048, 93.441, 22.97, 0.846)
pt3dadd(188.119, 93.344, 22.972, 0.834)
pt3dadd(188.19, 93.247, 22.975, 0.822)
pt3dadd(188.261, 93.151, 22.977, 0.812)
pt3dadd(188.332, 93.054, 22.979, 0.8)
pt3dadd(188.404, 92.957, 22.982, 0.788)
pt3dadd(188.474, 92.861, 22.984, 0.776)
pt3dadd(188.545, 92.764, 22.986, 0.766)
pt3dadd(188.617, 92.668, 22.989, 0.756)
pt3dadd(188.693, 92.575, 22.993, 0.756)
pt3dadd(188.768, 92.482, 22.997, 0.756)
pt3dadd(188.844, 92.389, 23.001, 0.756)
pt3dadd(188.92, 92.296, 23.005, 0.756)
pt3dadd(188.995, 92.203, 23.009, 0.756)
pt3dadd(189.071, 92.109, 23.013, 0.756)
pt3dadd(189.146, 92.016, 23.017, 0.756)
pt3dadd(189.222, 91.923, 23.021, 0.756)
pt3dadd(189.298, 91.83, 23.025, 0.756)
pt3dadd(189.373, 91.738, 23.029, 0.758)
pt3dadd(189.454, 91.648, 23.035, 0.772)
pt3dadd(189.533, 91.558, 23.041, 0.786)
pt3dadd(189.612, 91.469, 23.047, 0.798)
pt3dadd(189.691, 91.379, 23.053, 0.812)
pt3dadd(189.77, 91.29, 23.059, 0.826)
pt3dadd(189.851, 91.2, 23.065, 0.838)
pt3dadd(189.93, 91.11, 23.07, 0.852)
pt3dadd(190.009, 91.02, 23.076, 0.866)
pt3dadd(190.088, 90.931, 23.082, 0.878)
pt3dadd(190.169, 90.842, 23.088, 0.884)
pt3dadd(190.254, 90.758, 23.098, 0.854)
pt3dadd(190.338, 90.673, 23.107, 0.822)
pt3dadd(190.422, 90.588, 23.116, 0.792)
pt3dadd(190.507, 90.504, 23.126, 0.762)
pt3dadd(190.591, 90.419, 23.135, 0.73)
pt3dadd(190.675, 90.335, 23.144, 0.7)
pt3dadd(190.76, 90.25, 23.153, 0.67)
pt3dadd(190.844, 90.166, 23.163, 0.638)
pt3dadd(190.928, 90.081, 23.172, 0.608)
pt3dadd(191.012, 89.997, 23.185, 0.582)
pt3dadd(191.094, 89.916, 23.214, 0.582)
pt3dadd(191.176, 89.835, 23.243, 0.58)
pt3dadd(191.256, 89.753, 23.272, 0.578)
pt3dadd(191.338, 89.672, 23.301, 0.578)
pt3dadd(191.418, 89.591, 23.329, 0.576)
pt3dadd(191.5, 89.51, 23.358, 0.574)
pt3dadd(191.581, 89.428, 23.387, 0.574)
pt3dadd(191.662, 89.347, 23.416, 0.572)
pt3dadd(191.743, 89.266, 23.445, 0.57)
pt3dadd(191.824, 89.185, 23.475, 0.57)
pt3dadd(191.904, 89.105, 23.509, 0.572)
pt3dadd(191.983, 89.025, 23.542, 0.576)
pt3dadd(192.064, 88.944, 23.576, 0.578)
pt3dadd(192.143, 88.864, 23.609, 0.58)
pt3dadd(192.223, 88.784, 23.643, 0.584)
pt3dadd(192.304, 88.704, 23.676, 0.586)
pt3dadd(192.383, 88.624, 23.71, 0.588)
pt3dadd(192.463, 88.544, 23.743, 0.59)
pt3dadd(192.542, 88.464, 23.777, 0.594)
pt3dadd(192.624, 88.383, 23.805, 0.588)
pt3dadd(192.707, 88.299, 23.825, 0.572)
pt3dadd(192.79, 88.216, 23.845, 0.554)
pt3dadd(192.872, 88.133, 23.865, 0.536)
pt3dadd(192.955, 88.05, 23.885, 0.52)
pt3dadd(193.038, 87.966, 23.905, 0.502)
pt3dadd(193.121, 87.883, 23.926, 0.486)
pt3dadd(193.204, 87.8, 23.946, 0.468)
pt3dadd(193.288, 87.716, 23.966, 0.45)
pt3dadd(193.37, 87.633, 23.986, 0.434)
pt3dadd(193.453, 87.549, 24.001, 0.418)
pt3dadd(193.538, 87.464, 24.01, 0.402)
pt3dadd(193.622, 87.38, 24.019, 0.386)
pt3dadd(193.706, 87.295, 24.028, 0.372)
pt3dadd(193.79, 87.21, 24.037, 0.356)
pt3dadd(193.876, 87.126, 24.046, 0.34)
pt3dadd(193.96, 87.041, 24.055, 0.326)
pt3dadd(194.044, 86.956, 24.063, 0.31)
pt3dadd(194.129, 86.871, 24.072, 0.294)
pt3dadd(194.213, 86.787, 24.081, 0.28)
pt3dadd(194.297, 86.702, 24.087, 0.28)
pt3dadd(194.382, 86.617, 24.09, 0.306)
pt3dadd(194.466, 86.532, 24.093, 0.33)
pt3dadd(194.55, 86.446, 24.095, 0.354)
pt3dadd(194.635, 86.361, 24.098, 0.38)
pt3dadd(194.719, 86.276, 24.101, 0.404)
pt3dadd(194.803, 86.191, 24.103, 0.43)
pt3dadd(194.888, 86.106, 24.106, 0.454)
pt3dadd(194.972, 86.02, 24.108, 0.478)
pt3dadd(195.058, 85.935, 24.111, 0.504)
pt3dadd(195.142, 85.85, 24.112, 0.534)
pt3dadd(195.226, 85.765, 24.113, 0.572)
pt3dadd(195.31, 85.679, 24.113, 0.612)
pt3dadd(195.395, 85.594, 24.113, 0.65)
pt3dadd(195.479, 85.508, 24.113, 0.688)
pt3dadd(195.563, 85.423, 24.113, 0.726)
pt3dadd(195.648, 85.338, 24.113, 0.766)
pt3dadd(195.732, 85.252, 24.113, 0.804)
pt3dadd(195.816, 85.167, 24.113, 0.842)
pt3dadd(195.9, 85.082, 24.113, 0.882)
pt3dadd(195.984, 84.996, 24.113, 0.904)
pt3dadd(196.068, 84.91, 24.113, 0.904)
pt3dadd(196.152, 84.825, 24.113, 0.904)
pt3dadd(196.236, 84.739, 24.113, 0.904)
pt3dadd(196.32, 84.653, 24.113, 0.904)
pt3dadd(196.404, 84.567, 24.113, 0.904)
pt3dadd(196.488, 84.481, 24.114, 0.904)
pt3dadd(196.572, 84.396, 24.114, 0.904)
pt3dadd(196.656, 84.31, 24.114, 0.904)
pt3dadd(196.74, 84.224, 24.114, 0.904)
pt3dadd(196.824, 84.138, 24.114, 0.896)
pt3dadd(196.907, 84.052, 24.114, 0.878)
pt3dadd(196.991, 83.965, 24.114, 0.86)
pt3dadd(197.074, 83.879, 24.114, 0.842)
pt3dadd(197.156, 83.793, 24.115, 0.822)
pt3dadd(197.24, 83.706, 24.115, 0.804)
pt3dadd(197.323, 83.62, 24.115, 0.786)
pt3dadd(197.407, 83.533, 24.115, 0.768)
pt3dadd(197.49, 83.447, 24.115, 0.75)
pt3dadd(197.573, 83.361, 24.115, 0.73)
pt3dadd(197.656, 83.274, 24.115, 0.702)
pt3dadd(197.738, 83.187, 24.116, 0.66)
pt3dadd(197.821, 83.099, 24.116, 0.616)
pt3dadd(197.903, 83.012, 24.116, 0.574)
pt3dadd(197.986, 82.924, 24.116, 0.532)
pt3dadd(198.067, 82.837, 24.117, 0.49)
pt3dadd(198.15, 82.75, 24.117, 0.446)
pt3dadd(198.232, 82.662, 24.117, 0.404)
pt3dadd(198.314, 82.575, 24.117, 0.36)
pt3dadd(198.397, 82.488, 24.118, 0.318)
pt3dadd(198.479, 82.4, 24.118, 0.306)
pt3dadd(198.559, 82.312, 24.118, 0.336)
pt3dadd(198.641, 82.223, 24.119, 0.366)
pt3dadd(198.722, 82.135, 24.119, 0.398)
pt3dadd(198.803, 82.046, 24.12, 0.428)
pt3dadd(198.884, 81.958, 24.12, 0.458)
pt3dadd(198.965, 81.869, 24.121, 0.49)
pt3dadd(199.046, 81.781, 24.121, 0.52)
pt3dadd(199.128, 81.693, 24.121, 0.55)
pt3dadd(199.208, 81.604, 24.122, 0.582)
pt3dadd(199.288, 81.514, 24.122, 0.614)
pt3dadd(199.363, 81.421, 24.123, 0.65)
pt3dadd(199.44, 81.328, 24.124, 0.686)
pt3dadd(199.516, 81.236, 24.125, 0.722)
pt3dadd(199.592, 81.143, 24.125, 0.758)
pt3dadd(199.668, 81.05, 24.126, 0.794)
pt3dadd(199.744, 80.957, 24.127, 0.83)
pt3dadd(199.82, 80.864, 24.128, 0.866)
pt3dadd(199.896, 80.772, 24.128, 0.904)
pt3dadd(199.973, 80.679, 24.129, 0.94)
pt3dadd(200.044, 80.583, 24.13, 0.966)
pt3dadd(200.11, 80.482, 24.132, 0.984)
pt3dadd(200.174, 80.381, 24.133, 1)
pt3dadd(200.24, 80.281, 24.134, 1.018)
pt3dadd(200.305, 80.18, 24.136, 1.036)
pt3dadd(200.371, 80.079, 24.137, 1.052)
pt3dadd(200.436, 79.979, 24.138, 1.07)
pt3dadd(200.502, 79.878, 24.14, 1.086)
pt3dadd(200.567, 79.778, 24.141, 1.104)
pt3dadd(200.633, 79.677, 24.142, 1.12)
pt3dadd(200.704, 79.581, 24.144, 1.13)
pt3dadd(200.782, 79.49, 24.147, 1.13)
pt3dadd(200.86, 79.399, 24.149, 1.13)
pt3dadd(200.938, 79.308, 24.152, 1.13)
pt3dadd(201.016, 79.217, 24.154, 1.13)
pt3dadd(201.094, 79.126, 24.157, 1.13)
pt3dadd(201.172, 79.035, 24.16, 1.13)
pt3dadd(201.25, 78.943, 24.162, 1.13)
pt3dadd(201.329, 78.852, 24.165, 1.13)
pt3dadd(201.407, 78.761, 24.167, 1.13)
pt3dadd(201.492, 78.679, 24.171, 1.116)
pt3dadd(201.589, 78.608, 24.178, 1.088)
}
}
proc shape3d_20() {
dend_7[6] { pt3dadd(201.685, 78.537, 24.184, 1.058)
pt3dadd(201.782, 78.466, 24.19, 1.028)
pt3dadd(201.878, 78.395, 24.196, 0.998)
pt3dadd(201.976, 78.324, 24.202, 0.97)
pt3dadd(202.072, 78.254, 24.208, 0.94)
pt3dadd(202.168, 78.183, 24.214, 0.91)
pt3dadd(202.265, 78.112, 24.22, 0.88)
pt3dadd(202.361, 78.041, 24.226, 0.852)
pt3dadd(202.46, 77.973, 24.235, 0.834)
pt3dadd(202.56, 77.909, 24.244, 0.83)
pt3dadd(202.661, 77.844, 24.253, 0.824)
pt3dadd(202.762, 77.779, 24.263, 0.82)
pt3dadd(202.861, 77.715, 24.273, 0.814)
pt3dadd(202.962, 77.65, 24.282, 0.81)
pt3dadd(203.063, 77.585, 24.292, 0.804)
pt3dadd(203.162, 77.52, 24.301, 0.8)
pt3dadd(203.263, 77.456, 24.31, 0.794)
pt3dadd(203.364, 77.391, 24.32, 0.788)
pt3dadd(203.462, 77.327, 24.338, 0.784)
pt3dadd(203.56, 77.264, 24.363, 0.778)
pt3dadd(203.658, 77.201, 24.389, 0.774)
pt3dadd(203.755, 77.138, 24.414, 0.768)
pt3dadd(203.852, 77.075, 24.439, 0.762)
pt3dadd(203.95, 77.012, 24.465, 0.758)
pt3dadd(204.048, 76.949, 24.49, 0.752)
pt3dadd(204.145, 76.886, 24.515, 0.746)
pt3dadd(204.242, 76.823, 24.54, 0.742)
pt3dadd(204.34, 76.76, 24.566, 0.736)
pt3dadd(204.433, 76.699, 24.602, 0.726)
pt3dadd(204.526, 76.64, 24.643, 0.714)
pt3dadd(204.618, 76.58, 24.684, 0.704)
pt3dadd(204.709, 76.521, 24.724, 0.692)
pt3dadd(204.802, 76.461, 24.765, 0.68)
pt3dadd(204.894, 76.402, 24.806, 0.668)
pt3dadd(204.985, 76.342, 24.846, 0.658)
pt3dadd(205.078, 76.283, 24.887, 0.646)
pt3dadd(205.17, 76.223, 24.927, 0.634)
pt3dadd(205.262, 76.164, 24.968, 0.622)
pt3dadd(205.362, 76.106, 24.994, 0.644)
pt3dadd(205.465, 76.05, 25.016, 0.674)
pt3dadd(205.567, 75.993, 25.039, 0.702)
pt3dadd(205.669, 75.936, 25.061, 0.73)
pt3dadd(205.771, 75.88, 25.084, 0.758)
pt3dadd(205.874, 75.823, 25.106, 0.788)
pt3dadd(205.976, 75.766, 25.129, 0.816)
pt3dadd(206.078, 75.71, 25.151, 0.846)
pt3dadd(206.18, 75.653, 25.174, 0.874)
pt3dadd(206.284, 75.596, 25.196, 0.902)
pt3dadd(206.399, 75.567, 25.206, 0.888)
pt3dadd(206.514, 75.539, 25.215, 0.872)
pt3dadd(206.63, 75.511, 25.224, 0.856)
pt3dadd(206.747, 75.483, 25.233, 0.84)
pt3dadd(206.863, 75.455, 25.242, 0.824)
pt3dadd(206.98, 75.426, 25.251, 0.808)
pt3dadd(207.095, 75.399, 25.26, 0.792)
pt3dadd(207.211, 75.37, 25.27, 0.776)
pt3dadd(207.328, 75.342, 25.279, 0.758)
pt3dadd(207.444, 75.314, 25.288, 0.742)
pt3dadd(207.563, 75.303, 25.288, 0.692)
pt3dadd(207.683, 75.291, 25.288, 0.64)
pt3dadd(207.802, 75.279, 25.288, 0.588)
pt3dadd(207.922, 75.267, 25.288, 0.536)
pt3dadd(208.04, 75.255, 25.288, 0.484)
pt3dadd(208.16, 75.243, 25.288, 0.432)
pt3dadd(208.279, 75.231, 25.288, 0.382)
pt3dadd(208.399, 75.219, 25.288, 0.33)
pt3dadd(208.518, 75.207, 25.288, 0.278)
pt3dadd(208.638, 75.196, 25.288, 0.226)
}
dend_0[2] {pt3dclear()
pt3dadd(105.606, 131.652, 13.526, 13.334)
pt3dadd(105.667, 131.591, 13.526, 13.286)
pt3dadd(105.752, 131.506, 13.526, 13.218)
pt3dadd(105.837, 131.422, 13.526, 13.15)
pt3dadd(105.921, 131.336, 13.526, 13.082)
pt3dadd(106.006, 131.251, 13.526, 13.014)
pt3dadd(106.091, 131.167, 13.526, 12.946)
pt3dadd(106.176, 131.082, 13.526, 12.878)
pt3dadd(106.261, 130.997, 13.526, 12.81)
pt3dadd(106.346, 130.912, 13.526, 12.742)
pt3dadd(106.43, 130.828, 13.526, 12.674)
pt3dadd(106.515, 130.742, 13.526, 12.606)
pt3dadd(106.6, 130.657, 13.526, 12.538)
pt3dadd(106.685, 130.572, 13.526, 12.47)
pt3dadd(106.77, 130.488, 13.526, 12.402)
pt3dadd(106.854, 130.402, 13.527, 12.332)
pt3dadd(106.935, 130.314, 13.535, 12.234)
pt3dadd(107.017, 130.226, 13.543, 12.138)
pt3dadd(107.098, 130.139, 13.551, 12.04)
pt3dadd(107.179, 130.051, 13.56, 11.942)
pt3dadd(107.261, 129.964, 13.568, 11.846)
pt3dadd(107.342, 129.876, 13.576, 11.748)
pt3dadd(107.423, 129.788, 13.584, 11.652)
pt3dadd(107.505, 129.701, 13.592, 11.554)
pt3dadd(107.586, 129.613, 13.6, 11.458)
pt3dadd(107.667, 129.526, 13.609, 11.36)
pt3dadd(107.747, 129.437, 13.619, 11.254)
pt3dadd(107.828, 129.349, 13.63, 11.146)
pt3dadd(107.908, 129.26, 13.64, 11.04)
pt3dadd(107.988, 129.172, 13.65, 10.934)
pt3dadd(108.069, 129.084, 13.661, 10.828)
pt3dadd(108.149, 128.995, 13.671, 10.722)
pt3dadd(108.229, 128.908, 13.682, 10.616)
pt3dadd(108.31, 128.819, 13.692, 10.51)
pt3dadd(108.39, 128.731, 13.702, 10.404)
pt3dadd(108.47, 128.642, 13.713, 10.294)
pt3dadd(108.55, 128.554, 13.725, 10.162)
pt3dadd(108.63, 128.466, 13.738, 10.03)
pt3dadd(108.709, 128.377, 13.75, 9.898)
pt3dadd(108.789, 128.288, 13.763, 9.766)
pt3dadd(108.869, 128.2, 13.775, 9.634)
pt3dadd(108.948, 128.111, 13.788, 9.502)
pt3dadd(109.028, 128.023, 13.8, 9.37)
pt3dadd(109.107, 127.934, 13.812, 9.238)
pt3dadd(109.187, 127.846, 13.825, 9.106)
pt3dadd(109.265, 127.757, 13.84, 8.976)
pt3dadd(109.332, 127.664, 13.871, 8.856)
pt3dadd(109.398, 127.572, 13.902, 8.736)
pt3dadd(109.465, 127.48, 13.934, 8.616)
pt3dadd(109.531, 127.387, 13.965, 8.496)
pt3dadd(109.598, 127.295, 13.997, 8.378)
pt3dadd(109.665, 127.202, 14.028, 8.258)
pt3dadd(109.731, 127.11, 14.059, 8.138)
pt3dadd(109.798, 127.018, 14.091, 8.018)
pt3dadd(109.864, 126.925, 14.122, 7.898)
pt3dadd(109.93, 126.833, 14.155, 7.782)
pt3dadd(109.995, 126.742, 14.192, 7.67)
pt3dadd(110.059, 126.65, 14.228, 7.556)
pt3dadd(110.123, 126.559, 14.265, 7.444)
pt3dadd(110.187, 126.468, 14.302, 7.332)
pt3dadd(110.252, 126.377, 14.338, 7.22)
pt3dadd(110.316, 126.284, 14.375, 7.108)
pt3dadd(110.38, 126.193, 14.412, 6.996)
pt3dadd(110.444, 126.102, 14.448, 6.884)
pt3dadd(110.509, 126.011, 14.485, 6.772)
pt3dadd(110.576, 125.921, 14.52, 6.66)
pt3dadd(110.65, 125.834, 14.55, 6.548)
pt3dadd(110.725, 125.747, 14.58, 6.436)
pt3dadd(110.8, 125.66, 14.61, 6.326)
pt3dadd(110.874, 125.574, 14.64, 6.214)
pt3dadd(110.949, 125.486, 14.67, 6.102)
pt3dadd(111.024, 125.4, 14.7, 5.992)
pt3dadd(111.098, 125.314, 14.73, 5.88)
pt3dadd(111.173, 125.226, 14.76, 5.768)
pt3dadd(111.248, 125.14, 14.79, 5.658)
pt3dadd(111.326, 125.059, 14.823, 5.53)
pt3dadd(111.415, 124.996, 14.864, 5.36)
pt3dadd(111.504, 124.932, 14.906, 5.188)
}
dend_7[7] {pt3dclear()
pt3dadd(111.504, 124.932, 14.906, 5.188)
pt3dadd(111.592, 124.868, 14.948, 5.016)
pt3dadd(111.681, 124.806, 14.989, 4.846)
pt3dadd(111.77, 124.742, 15.031, 4.674)
pt3dadd(111.858, 124.679, 15.073, 4.502)
pt3dadd(111.947, 124.615, 15.114, 4.332)
pt3dadd(112.036, 124.552, 15.156, 4.16)
pt3dadd(112.125, 124.488, 15.198, 3.988)
pt3dadd(112.215, 124.424, 15.236, 3.822)
pt3dadd(112.309, 124.36, 15.268, 3.668)
pt3dadd(112.402, 124.296, 15.3, 3.516)
pt3dadd(112.496, 124.231, 15.332, 3.362)
pt3dadd(112.59, 124.166, 15.364, 3.208)
pt3dadd(112.683, 124.102, 15.396, 3.054)
pt3dadd(112.777, 124.038, 15.428, 2.9)
pt3dadd(112.871, 123.973, 15.46, 2.746)
pt3dadd(112.964, 123.908, 15.492, 2.592)
pt3dadd(113.058, 123.844, 15.524, 2.438)
pt3dadd(113.152, 123.778, 15.551, 2.298)
pt3dadd(113.248, 123.709, 15.57, 2.176)
pt3dadd(113.343, 123.64, 15.589, 2.054)
pt3dadd(113.439, 123.571, 15.608, 1.932)
pt3dadd(113.534, 123.503, 15.627, 1.812)
pt3dadd(113.63, 123.433, 15.647, 1.69)
pt3dadd(113.725, 123.365, 15.666, 1.568)
pt3dadd(113.821, 123.295, 15.685, 1.446)
pt3dadd(113.916, 123.227, 15.704, 1.324)
pt3dadd(114.012, 123.158, 15.723, 1.204)
pt3dadd(114.107, 123.086, 15.738, 1.13)
pt3dadd(114.199, 123.011, 15.745, 1.13)
pt3dadd(114.292, 122.935, 15.753, 1.13)
pt3dadd(114.385, 122.861, 15.76, 1.13)
pt3dadd(114.478, 122.785, 15.768, 1.13)
pt3dadd(114.571, 122.71, 15.776, 1.13)
pt3dadd(114.664, 122.634, 15.783, 1.13)
pt3dadd(114.757, 122.558, 15.791, 1.13)
pt3dadd(114.85, 122.483, 15.799, 1.13)
pt3dadd(114.943, 122.408, 15.806, 1.13)
pt3dadd(115.035, 122.332, 15.812, 1.14)
pt3dadd(115.127, 122.255, 15.814, 1.162)
pt3dadd(115.219, 122.177, 15.817, 1.186)
pt3dadd(115.311, 122.1, 15.819, 1.208)
pt3dadd(115.402, 122.023, 15.822, 1.232)
pt3dadd(115.494, 121.945, 15.824, 1.254)
pt3dadd(115.586, 121.868, 15.827, 1.278)
pt3dadd(115.678, 121.792, 15.83, 1.302)
pt3dadd(115.77, 121.714, 15.832, 1.324)
pt3dadd(115.861, 121.637, 15.835, 1.348)
pt3dadd(115.953, 121.559, 15.835, 1.38)
pt3dadd(116.043, 121.48, 15.833, 1.424)
pt3dadd(116.134, 121.402, 15.831, 1.468)
pt3dadd(116.224, 121.322, 15.829, 1.514)
pt3dadd(116.315, 121.244, 15.826, 1.558)
pt3dadd(116.405, 121.165, 15.824, 1.602)
}
}
proc shape3d_21() {
dend_7[7] { pt3dadd(116.496, 121.087, 15.822, 1.648)
pt3dadd(116.586, 121.008, 15.82, 1.692)
pt3dadd(116.677, 120.929, 15.817, 1.736)
pt3dadd(116.768, 120.851, 15.815, 1.782)
pt3dadd(116.864, 120.781, 15.811, 1.808)
pt3dadd(116.969, 120.724, 15.804, 1.808)
pt3dadd(117.074, 120.666, 15.798, 1.808)
pt3dadd(117.18, 120.608, 15.791, 1.808)
pt3dadd(117.285, 120.552, 15.784, 1.808)
pt3dadd(117.39, 120.494, 15.778, 1.808)
pt3dadd(117.495, 120.437, 15.771, 1.808)
pt3dadd(117.6, 120.38, 15.764, 1.808)
pt3dadd(117.705, 120.323, 15.758, 1.808)
pt3dadd(117.81, 120.265, 15.751, 1.808)
pt3dadd(117.914, 120.205, 15.743, 1.802)
pt3dadd(118.015, 120.142, 15.733, 1.788)
pt3dadd(118.116, 120.078, 15.723, 1.776)
pt3dadd(118.217, 120.013, 15.713, 1.762)
pt3dadd(118.317, 119.95, 15.703, 1.748)
pt3dadd(118.418, 119.886, 15.693, 1.734)
pt3dadd(118.519, 119.822, 15.683, 1.72)
pt3dadd(118.62, 119.758, 15.674, 1.708)
pt3dadd(118.721, 119.694, 15.664, 1.694)
pt3dadd(118.822, 119.63, 15.654, 1.68)
pt3dadd(118.92, 119.567, 15.635, 1.668)
pt3dadd(119.016, 119.505, 15.604, 1.66)
pt3dadd(119.112, 119.443, 15.574, 1.65)
pt3dadd(119.208, 119.38, 15.543, 1.64)
pt3dadd(119.303, 119.318, 15.512, 1.632)
pt3dadd(119.399, 119.256, 15.482, 1.622)
pt3dadd(119.495, 119.193, 15.451, 1.614)
pt3dadd(119.591, 119.131, 15.42, 1.604)
pt3dadd(119.686, 119.069, 15.389, 1.594)
pt3dadd(119.782, 119.007, 15.359, 1.586)
pt3dadd(119.876, 118.944, 15.324, 1.576)
pt3dadd(119.968, 118.881, 15.287, 1.564)
pt3dadd(120.06, 118.819, 15.25, 1.554)
pt3dadd(120.152, 118.756, 15.213, 1.542)
pt3dadd(120.245, 118.694, 15.176, 1.532)
pt3dadd(120.336, 118.631, 15.139, 1.52)
pt3dadd(120.428, 118.568, 15.101, 1.51)
pt3dadd(120.521, 118.506, 15.064, 1.498)
pt3dadd(120.613, 118.443, 15.027, 1.488)
pt3dadd(120.706, 118.38, 14.99, 1.478)
pt3dadd(120.805, 118.322, 14.965, 1.46)
pt3dadd(120.907, 118.265, 14.944, 1.44)
pt3dadd(121.01, 118.208, 14.923, 1.42)
pt3dadd(121.112, 118.151, 14.903, 1.398)
pt3dadd(121.216, 118.094, 14.882, 1.378)
pt3dadd(121.318, 118.037, 14.861, 1.358)
pt3dadd(121.421, 117.98, 14.841, 1.338)
pt3dadd(121.523, 117.922, 14.82, 1.318)
pt3dadd(121.626, 117.865, 14.799, 1.298)
pt3dadd(121.728, 117.808, 14.779, 1.276)
pt3dadd(121.84, 117.768, 14.767, 1.262)
pt3dadd(121.954, 117.732, 14.758, 1.248)
pt3dadd(122.068, 117.695, 14.749, 1.232)
pt3dadd(122.182, 117.658, 14.739, 1.218)
pt3dadd(122.296, 117.622, 14.73, 1.204)
pt3dadd(122.408, 117.585, 14.721, 1.19)
pt3dadd(122.522, 117.549, 14.712, 1.176)
pt3dadd(122.636, 117.512, 14.702, 1.16)
pt3dadd(122.75, 117.475, 14.693, 1.146)
pt3dadd(122.863, 117.439, 14.684, 1.132)
pt3dadd(122.98, 117.409, 14.681, 1.128)
pt3dadd(123.096, 117.38, 14.679, 1.124)
pt3dadd(123.212, 117.352, 14.678, 1.122)
pt3dadd(123.33, 117.323, 14.676, 1.118)
pt3dadd(123.446, 117.295, 14.674, 1.116)
pt3dadd(123.563, 117.266, 14.673, 1.112)
pt3dadd(123.679, 117.237, 14.671, 1.108)
pt3dadd(123.796, 117.209, 14.67, 1.106)
pt3dadd(123.912, 117.18, 14.668, 1.102)
pt3dadd(124.028, 117.152, 14.666, 1.1)
pt3dadd(124.14, 117.108, 14.664, 1.068)
pt3dadd(124.252, 117.063, 14.661, 1.034)
pt3dadd(124.362, 117.017, 14.658, 0.998)
pt3dadd(124.472, 116.971, 14.655, 0.962)
pt3dadd(124.584, 116.925, 14.652, 0.926)
pt3dadd(124.694, 116.88, 14.649, 0.89)
pt3dadd(124.806, 116.834, 14.646, 0.854)
pt3dadd(124.916, 116.788, 14.643, 0.82)
pt3dadd(125.028, 116.743, 14.64, 0.784)
pt3dadd(125.138, 116.697, 14.637, 0.748)
pt3dadd(125.252, 116.661, 14.631, 0.79)
pt3dadd(125.368, 116.628, 14.624, 0.844)
pt3dadd(125.483, 116.594, 14.618, 0.898)
pt3dadd(125.598, 116.561, 14.611, 0.954)
pt3dadd(125.712, 116.527, 14.605, 1.008)
pt3dadd(125.827, 116.493, 14.598, 1.062)
pt3dadd(125.942, 116.46, 14.591, 1.116)
pt3dadd(126.058, 116.426, 14.585, 1.172)
pt3dadd(126.172, 116.392, 14.578, 1.226)
pt3dadd(126.287, 116.359, 14.571, 1.28)
pt3dadd(126.403, 116.334, 14.561, 1.302)
pt3dadd(126.521, 116.311, 14.55, 1.32)
pt3dadd(126.637, 116.288, 14.54, 1.338)
pt3dadd(126.755, 116.265, 14.529, 1.356)
pt3dadd(126.871, 116.241, 14.518, 1.374)
pt3dadd(126.989, 116.218, 14.507, 1.392)
pt3dadd(127.105, 116.195, 14.496, 1.41)
pt3dadd(127.223, 116.172, 14.486, 1.428)
pt3dadd(127.34, 116.149, 14.475, 1.446)
pt3dadd(127.457, 116.125, 14.464, 1.464)
pt3dadd(127.572, 116.109, 14.441, 1.478)
pt3dadd(127.687, 116.094, 14.416, 1.488)
pt3dadd(127.802, 116.079, 14.391, 1.5)
pt3dadd(127.918, 116.064, 14.367, 1.512)
pt3dadd(128.033, 116.049, 14.342, 1.524)
pt3dadd(128.149, 116.034, 14.317, 1.536)
pt3dadd(128.264, 116.018, 14.292, 1.548)
pt3dadd(128.38, 116.003, 14.267, 1.56)
pt3dadd(128.495, 115.988, 14.243, 1.572)
pt3dadd(128.61, 115.973, 14.218, 1.584)
pt3dadd(128.719, 115.96, 14.179, 1.626)
pt3dadd(128.83, 115.948, 14.14, 1.668)
pt3dadd(128.939, 115.935, 14.101, 1.71)
pt3dadd(129.049, 115.923, 14.062, 1.75)
pt3dadd(129.158, 115.911, 14.024, 1.792)
pt3dadd(129.269, 115.898, 13.985, 1.834)
pt3dadd(129.378, 115.885, 13.946, 1.876)
pt3dadd(129.488, 115.873, 13.907, 1.918)
pt3dadd(129.598, 115.86, 13.868, 1.96)
pt3dadd(129.708, 115.848, 13.829, 2.002)
pt3dadd(129.82, 115.827, 13.797, 1.982)
pt3dadd(129.931, 115.807, 13.765, 1.962)
pt3dadd(130.044, 115.786, 13.733, 1.944)
pt3dadd(130.156, 115.765, 13.701, 1.924)
pt3dadd(130.267, 115.745, 13.669, 1.904)
pt3dadd(130.379, 115.724, 13.637, 1.886)
pt3dadd(130.49, 115.704, 13.605, 1.866)
pt3dadd(130.603, 115.683, 13.573, 1.846)
pt3dadd(130.715, 115.662, 13.542, 1.828)
pt3dadd(130.826, 115.642, 13.51, 1.808)
}
dend_7[8] {pt3dclear()
pt3dadd(130.826, 115.642, 13.51, 1.808)
pt3dadd(130.877, 115.611, 13.499, 1.808)
pt3dadd(130.978, 115.551, 13.477, 1.808)
pt3dadd(131.078, 115.491, 13.455, 1.808)
pt3dadd(131.179, 115.431, 13.433, 1.808)
pt3dadd(131.279, 115.371, 13.411, 1.806)
pt3dadd(131.38, 115.31, 13.388, 1.806)
pt3dadd(131.479, 115.25, 13.366, 1.806)
pt3dadd(131.58, 115.19, 13.344, 1.806)
pt3dadd(131.68, 115.129, 13.321, 1.804)
pt3dadd(131.78, 115.069, 13.299, 1.804)
pt3dadd(131.88, 115.009, 13.276, 1.804)
pt3dadd(131.981, 114.948, 13.254, 1.804)
pt3dadd(132.08, 114.888, 13.232, 1.802)
pt3dadd(132.163, 114.82, 13.186, 1.782)
pt3dadd(132.245, 114.752, 13.14, 1.758)
pt3dadd(132.326, 114.684, 13.093, 1.736)
pt3dadd(132.408, 114.616, 13.047, 1.714)
pt3dadd(132.49, 114.548, 13.001, 1.692)
pt3dadd(132.571, 114.48, 12.954, 1.67)
pt3dadd(132.653, 114.412, 12.908, 1.648)
pt3dadd(132.734, 114.344, 12.862, 1.624)
pt3dadd(132.816, 114.276, 12.815, 1.602)
pt3dadd(132.899, 114.208, 12.769, 1.58)
pt3dadd(132.979, 114.124, 12.746, 1.562)
pt3dadd(133.061, 114.04, 12.722, 1.544)
pt3dadd(133.141, 113.956, 12.699, 1.526)
pt3dadd(133.223, 113.873, 12.676, 1.508)
pt3dadd(133.304, 113.789, 12.653, 1.49)
pt3dadd(133.385, 113.705, 12.63, 1.472)
pt3dadd(133.466, 113.621, 12.607, 1.454)
pt3dadd(133.548, 113.537, 12.584, 1.436)
pt3dadd(133.628, 113.453, 12.56, 1.418)
pt3dadd(133.71, 113.369, 12.537, 1.4)
pt3dadd(133.792, 113.282, 12.524, 1.36)
pt3dadd(133.873, 113.196, 12.512, 1.318)
pt3dadd(133.955, 113.109, 12.499, 1.278)
pt3dadd(134.036, 113.022, 12.486, 1.238)
pt3dadd(134.118, 112.935, 12.474, 1.196)
pt3dadd(134.2, 112.849, 12.461, 1.156)
pt3dadd(134.281, 112.762, 12.449, 1.114)
pt3dadd(134.362, 112.675, 12.436, 1.074)
pt3dadd(134.443, 112.589, 12.423, 1.034)
pt3dadd(134.525, 112.502, 12.411, 0.992)
pt3dadd(134.606, 112.414, 12.405, 0.95)
pt3dadd(134.688, 112.326, 12.399, 0.91)
pt3dadd(134.768, 112.238, 12.392, 0.868)
pt3dadd(134.85, 112.149, 12.386, 0.826)
pt3dadd(134.932, 112.061, 12.38, 0.784)
pt3dadd(135.012, 111.973, 12.374, 0.742)
pt3dadd(135.094, 111.885, 12.368, 0.702)
pt3dadd(135.174, 111.797, 12.362, 0.66)
pt3dadd(135.256, 111.709, 12.356, 0.618)
pt3dadd(135.337, 111.621, 12.35, 0.576)
pt3dadd(135.418, 111.532, 12.35, 0.548)
pt3dadd(135.498, 111.443, 12.35, 0.518)
pt3dadd(135.578, 111.353, 12.35, 0.488)
pt3dadd(135.658, 111.264, 12.35, 0.46)
pt3dadd(135.738, 111.175, 12.35, 0.43)
pt3dadd(135.818, 111.086, 12.35, 0.4)
pt3dadd(135.899, 110.997, 12.35, 0.37)
pt3dadd(135.979, 110.908, 12.35, 0.342)
pt3dadd(136.06, 110.819, 12.35, 0.312)
pt3dadd(136.14, 110.73, 12.35, 0.284)
pt3dadd(136.207, 110.63, 12.351, 0.362)
pt3dadd(136.274, 110.531, 12.351, 0.442)
}
}
proc shape3d_22() {
dend_7[8] { pt3dadd(136.342, 110.431, 12.351, 0.522)
pt3dadd(136.409, 110.331, 12.351, 0.6)
pt3dadd(136.476, 110.232, 12.351, 0.68)
pt3dadd(136.542, 110.132, 12.351, 0.76)
pt3dadd(136.609, 110.033, 12.351, 0.838)
pt3dadd(136.676, 109.933, 12.351, 0.918)
pt3dadd(136.744, 109.834, 12.351, 0.998)
pt3dadd(136.811, 109.734, 12.351, 1.076)
pt3dadd(136.88, 109.637, 12.351, 1.108)
pt3dadd(136.951, 109.539, 12.351, 1.142)
pt3dadd(137.021, 109.442, 12.351, 1.176)
pt3dadd(137.09, 109.344, 12.351, 1.208)
pt3dadd(137.161, 109.247, 12.351, 1.242)
pt3dadd(137.231, 109.15, 12.351, 1.276)
pt3dadd(137.3, 109.052, 12.351, 1.308)
pt3dadd(137.371, 108.955, 12.352, 1.342)
pt3dadd(137.441, 108.857, 12.352, 1.376)
pt3dadd(137.512, 108.76, 12.352, 1.406)
pt3dadd(137.591, 108.671, 12.352, 1.382)
pt3dadd(137.671, 108.581, 12.352, 1.356)
pt3dadd(137.75, 108.491, 12.352, 1.332)
pt3dadd(137.831, 108.402, 12.352, 1.308)
pt3dadd(137.91, 108.312, 12.353, 1.284)
pt3dadd(137.99, 108.222, 12.353, 1.26)
pt3dadd(138.07, 108.133, 12.353, 1.236)
pt3dadd(138.15, 108.043, 12.353, 1.21)
pt3dadd(138.229, 107.953, 12.353, 1.186)
pt3dadd(138.311, 107.866, 12.353, 1.166)
pt3dadd(138.407, 107.794, 12.354, 1.186)
pt3dadd(138.503, 107.722, 12.354, 1.204)
pt3dadd(138.599, 107.65, 12.354, 1.224)
pt3dadd(138.695, 107.578, 12.354, 1.242)
pt3dadd(138.791, 107.506, 12.355, 1.262)
pt3dadd(138.888, 107.434, 12.355, 1.28)
pt3dadd(138.984, 107.363, 12.355, 1.298)
pt3dadd(139.08, 107.291, 12.356, 1.318)
pt3dadd(139.176, 107.219, 12.356, 1.336)
pt3dadd(139.271, 107.146, 12.356, 1.35)
pt3dadd(139.361, 107.067, 12.357, 1.316)
pt3dadd(139.451, 106.988, 12.358, 1.282)
pt3dadd(139.541, 106.908, 12.358, 1.248)
pt3dadd(139.631, 106.829, 12.359, 1.214)
pt3dadd(139.721, 106.749, 12.359, 1.18)
pt3dadd(139.812, 106.67, 12.36, 1.146)
pt3dadd(139.902, 106.591, 12.36, 1.112)
pt3dadd(139.992, 106.511, 12.361, 1.078)
pt3dadd(140.082, 106.432, 12.361, 1.044)
pt3dadd(140.17, 106.351, 12.362, 1.014)
pt3dadd(140.24, 106.254, 12.363, 1.016)
pt3dadd(140.311, 106.157, 12.364, 1.018)
pt3dadd(140.382, 106.061, 12.365, 1.02)
pt3dadd(140.453, 105.964, 12.367, 1.022)
pt3dadd(140.524, 105.867, 12.368, 1.024)
pt3dadd(140.594, 105.77, 12.369, 1.026)
pt3dadd(140.665, 105.673, 12.37, 1.028)
pt3dadd(140.736, 105.576, 12.371, 1.03)
pt3dadd(140.807, 105.48, 12.372, 1.032)
pt3dadd(140.876, 105.381, 12.374, 1.034)
pt3dadd(140.938, 105.279, 12.375, 1.044)
pt3dadd(141, 105.176, 12.377, 1.054)
pt3dadd(141.061, 105.073, 12.379, 1.064)
pt3dadd(141.124, 104.97, 12.381, 1.074)
pt3dadd(141.185, 104.867, 12.383, 1.084)
pt3dadd(141.247, 104.764, 12.385, 1.094)
pt3dadd(141.308, 104.662, 12.387, 1.102)
pt3dadd(141.371, 104.559, 12.389, 1.112)
pt3dadd(141.432, 104.456, 12.391, 1.122)
pt3dadd(141.494, 104.353, 12.393, 1.13)
pt3dadd(141.554, 104.25, 12.396, 1.13)
pt3dadd(141.616, 104.146, 12.399, 1.13)
pt3dadd(141.677, 104.043, 12.402, 1.13)
pt3dadd(141.737, 103.939, 12.406, 1.13)
pt3dadd(141.798, 103.836, 12.409, 1.13)
pt3dadd(141.859, 103.733, 12.412, 1.13)
pt3dadd(141.92, 103.629, 12.415, 1.13)
pt3dadd(141.98, 103.526, 12.418, 1.13)
pt3dadd(142.042, 103.422, 12.421, 1.13)
pt3dadd(142.099, 103.318, 12.425, 1.13)
pt3dadd(142.147, 103.208, 12.432, 1.13)
pt3dadd(142.194, 103.098, 12.439, 1.13)
pt3dadd(142.242, 102.988, 12.446, 1.13)
pt3dadd(142.289, 102.878, 12.453, 1.13)
pt3dadd(142.337, 102.768, 12.46, 1.13)
pt3dadd(142.384, 102.658, 12.467, 1.13)
pt3dadd(142.432, 102.548, 12.474, 1.13)
pt3dadd(142.478, 102.438, 12.481, 1.13)
pt3dadd(142.526, 102.328, 12.487, 1.13)
pt3dadd(142.578, 102.221, 12.495, 1.134)
pt3dadd(142.644, 102.122, 12.506, 1.152)
pt3dadd(142.71, 102.022, 12.516, 1.168)
pt3dadd(142.776, 101.923, 12.527, 1.184)
pt3dadd(142.842, 101.824, 12.538, 1.202)
pt3dadd(142.908, 101.724, 12.548, 1.218)
pt3dadd(142.974, 101.625, 12.559, 1.236)
pt3dadd(143.041, 101.526, 12.569, 1.252)
pt3dadd(143.107, 101.426, 12.58, 1.27)
pt3dadd(143.173, 101.327, 12.59, 1.286)
pt3dadd(143.238, 101.229, 12.607, 1.302)
pt3dadd(143.3, 101.137, 12.645, 1.306)
pt3dadd(143.363, 101.045, 12.682, 1.312)
pt3dadd(143.425, 100.952, 12.719, 1.318)
pt3dadd(143.488, 100.86, 12.756, 1.324)
pt3dadd(143.55, 100.768, 12.793, 1.33)
pt3dadd(143.611, 100.675, 12.831, 1.336)
pt3dadd(143.674, 100.583, 12.868, 1.342)
pt3dadd(143.736, 100.49, 12.905, 1.346)
pt3dadd(143.798, 100.398, 12.942, 1.352)
pt3dadd(143.863, 100.307, 12.977, 1.356)
pt3dadd(143.933, 100.216, 13.009, 1.356)
pt3dadd(144.002, 100.126, 13.04, 1.356)
pt3dadd(144.071, 100.035, 13.072, 1.356)
pt3dadd(144.14, 99.945, 13.103, 1.356)
pt3dadd(144.21, 99.854, 13.135, 1.356)
pt3dadd(144.278, 99.764, 13.166, 1.356)
pt3dadd(144.348, 99.674, 13.198, 1.356)
pt3dadd(144.418, 99.583, 13.229, 1.356)
pt3dadd(144.487, 99.493, 13.261, 1.356)
pt3dadd(144.552, 99.397, 13.285, 1.352)
pt3dadd(144.613, 99.296, 13.302, 1.34)
pt3dadd(144.674, 99.195, 13.32, 1.33)
pt3dadd(144.734, 99.093, 13.337, 1.318)
pt3dadd(144.796, 98.992, 13.354, 1.308)
pt3dadd(144.857, 98.891, 13.371, 1.298)
pt3dadd(144.918, 98.789, 13.388, 1.286)
pt3dadd(144.979, 98.688, 13.405, 1.276)
pt3dadd(145.039, 98.587, 13.422, 1.266)
pt3dadd(145.1, 98.485, 13.439, 1.254)
pt3dadd(145.158, 98.381, 13.45, 1.236)
pt3dadd(145.213, 98.275, 13.456, 1.21)
pt3dadd(145.268, 98.169, 13.462, 1.186)
pt3dadd(145.325, 98.063, 13.469, 1.162)
pt3dadd(145.38, 97.956, 13.475, 1.138)
pt3dadd(145.435, 97.85, 13.481, 1.112)
pt3dadd(145.49, 97.744, 13.487, 1.088)
pt3dadd(145.546, 97.638, 13.493, 1.062)
pt3dadd(145.601, 97.531, 13.499, 1.038)
pt3dadd(145.656, 97.425, 13.505, 1.014)
pt3dadd(145.716, 97.321, 13.507, 0.984)
pt3dadd(145.78, 97.219, 13.505, 0.952)
pt3dadd(145.842, 97.117, 13.504, 0.92)
pt3dadd(145.906, 97.015, 13.503, 0.886)
pt3dadd(145.968, 96.913, 13.502, 0.854)
pt3dadd(146.032, 96.811, 13.501, 0.822)
pt3dadd(146.094, 96.709, 13.499, 0.79)
pt3dadd(146.158, 96.607, 13.498, 0.756)
pt3dadd(146.221, 96.505, 13.497, 0.724)
pt3dadd(146.284, 96.403, 13.496, 0.692)
pt3dadd(146.339, 96.296, 13.494, 0.7)
pt3dadd(146.388, 96.187, 13.491, 0.736)
pt3dadd(146.437, 96.078, 13.488, 0.77)
pt3dadd(146.488, 95.968, 13.486, 0.806)
pt3dadd(146.537, 95.859, 13.483, 0.84)
pt3dadd(146.586, 95.75, 13.481, 0.876)
pt3dadd(146.635, 95.641, 13.478, 0.91)
pt3dadd(146.686, 95.531, 13.476, 0.946)
pt3dadd(146.735, 95.422, 13.473, 0.98)
pt3dadd(146.784, 95.313, 13.47, 1.016)
pt3dadd(146.84, 95.208, 13.466, 1.028)
pt3dadd(146.903, 95.105, 13.461, 1.026)
pt3dadd(146.964, 95.002, 13.456, 1.026)
pt3dadd(147.026, 94.899, 13.451, 1.024)
pt3dadd(147.088, 94.797, 13.447, 1.024)
pt3dadd(147.15, 94.694, 13.442, 1.022)
pt3dadd(147.211, 94.591, 13.437, 1.02)
pt3dadd(147.274, 94.488, 13.432, 1.02)
pt3dadd(147.335, 94.386, 13.427, 1.018)
pt3dadd(147.396, 94.283, 13.422, 1.016)
pt3dadd(147.462, 94.183, 13.416, 1.016)
pt3dadd(147.53, 94.084, 13.409, 1.012)
pt3dadd(147.598, 93.986, 13.402, 1.01)
pt3dadd(147.666, 93.887, 13.395, 1.008)
pt3dadd(147.734, 93.789, 13.388, 1.006)
pt3dadd(147.802, 93.69, 13.382, 1.004)
pt3dadd(147.87, 93.591, 13.375, 1.002)
pt3dadd(147.937, 93.493, 13.368, 1)
pt3dadd(148.006, 93.394, 13.361, 0.998)
pt3dadd(148.074, 93.296, 13.354, 0.996)
pt3dadd(148.144, 93.199, 13.345, 1.014)
pt3dadd(148.214, 93.103, 13.336, 1.046)
pt3dadd(148.286, 93.007, 13.327, 1.076)
pt3dadd(148.357, 92.911, 13.318, 1.106)
pt3dadd(148.428, 92.815, 13.308, 1.138)
pt3dadd(148.5, 92.719, 13.299, 1.168)
pt3dadd(148.571, 92.623, 13.29, 1.198)
pt3dadd(148.642, 92.527, 13.28, 1.23)
pt3dadd(148.712, 92.431, 13.271, 1.26)
pt3dadd(148.784, 92.335, 13.262, 1.292)
pt3dadd(148.846, 92.236, 13.24, 1.306)
pt3dadd(148.901, 92.136, 13.21, 1.312)
pt3dadd(148.957, 92.036, 13.181, 1.316)
pt3dadd(149.014, 91.936, 13.151, 1.322)
pt3dadd(149.069, 91.836, 13.122, 1.328)
pt3dadd(149.125, 91.736, 13.092, 1.332)
pt3dadd(149.18, 91.635, 13.063, 1.338)
pt3dadd(149.237, 91.535, 13.033, 1.344)
pt3dadd(149.293, 91.435, 13.004, 1.348)
pt3dadd(149.348, 91.335, 12.975, 1.354)
pt3dadd(149.405, 91.235, 12.946, 1.346)
pt3dadd(149.461, 91.135, 12.918, 1.334)
pt3dadd(149.518, 91.034, 12.89, 1.32)
}
}
proc shape3d_23() {
dend_7[8] { pt3dadd(149.575, 90.934, 12.862, 1.306)
pt3dadd(149.632, 90.834, 12.834, 1.294)
pt3dadd(149.688, 90.733, 12.805, 1.28)
pt3dadd(149.744, 90.633, 12.777, 1.266)
pt3dadd(149.801, 90.533, 12.749, 1.254)
pt3dadd(149.857, 90.432, 12.721, 1.24)
pt3dadd(149.914, 90.332, 12.693, 1.226)
pt3dadd(149.975, 90.232, 12.67, 1.2)
pt3dadd(150.036, 90.132, 12.65, 1.168)
pt3dadd(150.098, 90.033, 12.629, 1.136)
pt3dadd(150.161, 89.933, 12.609, 1.104)
pt3dadd(150.223, 89.833, 12.588, 1.072)
pt3dadd(150.284, 89.733, 12.568, 1.04)
pt3dadd(150.347, 89.634, 12.547, 1.008)
pt3dadd(150.409, 89.534, 12.527, 0.976)
pt3dadd(150.47, 89.434, 12.506, 0.944)
pt3dadd(150.533, 89.335, 12.486, 0.912)
pt3dadd(150.586, 89.228, 12.473, 0.916)
pt3dadd(150.636, 89.12, 12.463, 0.934)
pt3dadd(150.685, 89.011, 12.453, 0.952)
pt3dadd(150.734, 88.903, 12.443, 0.97)
pt3dadd(150.785, 88.794, 12.433, 0.986)
pt3dadd(150.834, 88.686, 12.423, 1.004)
pt3dadd(150.884, 88.577, 12.413, 1.022)
pt3dadd(150.934, 88.468, 12.403, 1.038)
pt3dadd(150.983, 88.36, 12.393, 1.056)
pt3dadd(151.033, 88.251, 12.382, 1.074)
pt3dadd(151.092, 88.147, 12.378, 1.082)
pt3dadd(151.154, 88.045, 12.375, 1.088)
pt3dadd(151.217, 87.942, 12.372, 1.092)
pt3dadd(151.279, 87.84, 12.369, 1.098)
pt3dadd(151.342, 87.737, 12.366, 1.102)
pt3dadd(151.404, 87.635, 12.363, 1.108)
pt3dadd(151.466, 87.533, 12.359, 1.114)
pt3dadd(151.529, 87.43, 12.357, 1.118)
pt3dadd(151.591, 87.328, 12.354, 1.124)
pt3dadd(151.654, 87.225, 12.351, 1.128)
pt3dadd(151.721, 87.126, 12.35, 1.134)
pt3dadd(151.79, 87.028, 12.35, 1.138)
pt3dadd(151.859, 86.93, 12.35, 1.142)
pt3dadd(151.928, 86.832, 12.35, 1.146)
pt3dadd(151.998, 86.734, 12.35, 1.15)
pt3dadd(152.066, 86.636, 12.35, 1.154)
pt3dadd(152.136, 86.538, 12.35, 1.158)
pt3dadd(152.204, 86.439, 12.35, 1.162)
pt3dadd(152.274, 86.341, 12.35, 1.168)
pt3dadd(152.342, 86.243, 12.35, 1.172)
pt3dadd(152.414, 86.147, 12.35, 1.184)
pt3dadd(152.488, 86.052, 12.35, 1.2)
pt3dadd(152.561, 85.956, 12.35, 1.214)
pt3dadd(152.634, 85.861, 12.35, 1.23)
pt3dadd(152.706, 85.766, 12.35, 1.246)
pt3dadd(152.779, 85.671, 12.35, 1.26)
pt3dadd(152.852, 85.575, 12.35, 1.276)
pt3dadd(152.926, 85.48, 12.35, 1.292)
pt3dadd(152.998, 85.384, 12.35, 1.306)
pt3dadd(153.071, 85.289, 12.35, 1.322)
pt3dadd(153.137, 85.189, 12.35, 1.338)
pt3dadd(153.199, 85.087, 12.35, 1.354)
pt3dadd(153.263, 84.985, 12.35, 1.37)
pt3dadd(153.326, 84.883, 12.35, 1.386)
pt3dadd(153.389, 84.781, 12.35, 1.404)
pt3dadd(153.452, 84.679, 12.35, 1.42)
pt3dadd(153.516, 84.577, 12.35, 1.436)
pt3dadd(153.578, 84.475, 12.35, 1.452)
pt3dadd(153.642, 84.373, 12.35, 1.468)
pt3dadd(153.706, 84.271, 12.35, 1.484)
pt3dadd(153.769, 84.169, 12.35, 1.496)
pt3dadd(153.835, 84.069, 12.35, 1.506)
pt3dadd(153.9, 83.968, 12.35, 1.514)
pt3dadd(153.965, 83.867, 12.35, 1.524)
pt3dadd(154.03, 83.766, 12.35, 1.534)
pt3dadd(154.094, 83.665, 12.35, 1.542)
pt3dadd(154.159, 83.564, 12.35, 1.552)
pt3dadd(154.224, 83.463, 12.35, 1.562)
pt3dadd(154.29, 83.362, 12.35, 1.57)
pt3dadd(154.355, 83.262, 12.35, 1.58)
pt3dadd(154.423, 83.163, 12.35, 1.582)
pt3dadd(154.494, 83.066, 12.35, 1.582)
pt3dadd(154.565, 82.969, 12.35, 1.582)
pt3dadd(154.634, 82.872, 12.35, 1.582)
pt3dadd(154.705, 82.775, 12.35, 1.582)
pt3dadd(154.775, 82.677, 12.35, 1.582)
pt3dadd(154.846, 82.58, 12.35, 1.582)
pt3dadd(154.916, 82.483, 12.35, 1.582)
pt3dadd(154.986, 82.386, 12.35, 1.582)
pt3dadd(155.057, 82.288, 12.35, 1.582)
pt3dadd(155.131, 82.195, 12.35, 1.57)
pt3dadd(155.207, 82.102, 12.35, 1.556)
pt3dadd(155.284, 82.009, 12.35, 1.542)
pt3dadd(155.359, 81.916, 12.35, 1.526)
pt3dadd(155.435, 81.823, 12.35, 1.512)
pt3dadd(155.51, 81.73, 12.35, 1.498)
pt3dadd(155.586, 81.637, 12.35, 1.482)
pt3dadd(155.663, 81.544, 12.35, 1.468)
pt3dadd(155.738, 81.451, 12.35, 1.454)
pt3dadd(155.814, 81.358, 12.35, 1.438)
pt3dadd(155.891, 81.266, 12.35, 1.424)
pt3dadd(155.969, 81.174, 12.35, 1.41)
pt3dadd(156.046, 81.082, 12.35, 1.394)
pt3dadd(156.124, 80.991, 12.35, 1.38)
pt3dadd(156.2, 80.899, 12.35, 1.366)
pt3dadd(156.278, 80.807, 12.35, 1.35)
pt3dadd(156.355, 80.715, 12.35, 1.336)
pt3dadd(156.433, 80.624, 12.35, 1.322)
pt3dadd(156.51, 80.532, 12.35, 1.306)
pt3dadd(156.588, 80.44, 12.35, 1.292)
pt3dadd(156.667, 80.35, 12.35, 1.278)
pt3dadd(156.746, 80.26, 12.35, 1.262)
pt3dadd(156.826, 80.17, 12.35, 1.248)
pt3dadd(156.905, 80.08, 12.35, 1.234)
pt3dadd(156.984, 79.99, 12.35, 1.22)
pt3dadd(157.063, 79.9, 12.35, 1.206)
pt3dadd(157.142, 79.81, 12.35, 1.19)
pt3dadd(157.222, 79.72, 12.35, 1.176)
pt3dadd(157.301, 79.63, 12.35, 1.162)
pt3dadd(157.381, 79.54, 12.35, 1.148)
pt3dadd(157.447, 79.44, 12.35, 1.144)
pt3dadd(157.51, 79.338, 12.35, 1.142)
pt3dadd(157.573, 79.236, 12.35, 1.14)
pt3dadd(157.636, 79.134, 12.35, 1.14)
pt3dadd(157.699, 79.032, 12.35, 1.138)
pt3dadd(157.762, 78.929, 12.35, 1.136)
pt3dadd(157.825, 78.827, 12.35, 1.134)
pt3dadd(157.888, 78.725, 12.35, 1.134)
pt3dadd(157.951, 78.623, 12.35, 1.132)
pt3dadd(158.014, 78.521, 12.35, 1.13)
pt3dadd(158.08, 78.42, 12.35, 1.136)
pt3dadd(158.147, 78.321, 12.35, 1.144)
pt3dadd(158.213, 78.221, 12.35, 1.154)
pt3dadd(158.279, 78.121, 12.35, 1.162)
pt3dadd(158.346, 78.021, 12.35, 1.17)
pt3dadd(158.412, 77.921, 12.35, 1.178)
pt3dadd(158.479, 77.821, 12.35, 1.186)
pt3dadd(158.545, 77.722, 12.35, 1.194)
pt3dadd(158.612, 77.622, 12.35, 1.202)
pt3dadd(158.678, 77.522, 12.35, 1.21)
pt3dadd(158.749, 77.425, 12.35, 1.222)
pt3dadd(158.821, 77.329, 12.35, 1.234)
pt3dadd(158.892, 77.232, 12.35, 1.246)
pt3dadd(158.964, 77.136, 12.35, 1.26)
pt3dadd(159.036, 77.04, 12.35, 1.272)
pt3dadd(159.107, 76.943, 12.35, 1.284)
pt3dadd(159.179, 76.847, 12.35, 1.296)
pt3dadd(159.25, 76.75, 12.35, 1.308)
pt3dadd(159.322, 76.654, 12.35, 1.32)
pt3dadd(159.394, 76.558, 12.35, 1.332)
pt3dadd(159.469, 76.465, 12.35, 1.31)
pt3dadd(159.547, 76.374, 12.35, 1.282)
pt3dadd(159.625, 76.283, 12.35, 1.252)
pt3dadd(159.703, 76.191, 12.35, 1.222)
pt3dadd(159.781, 76.1, 12.35, 1.194)
pt3dadd(159.859, 76.009, 12.35, 1.164)
pt3dadd(159.936, 75.917, 12.35, 1.134)
pt3dadd(160.014, 75.826, 12.35, 1.106)
pt3dadd(160.092, 75.735, 12.35, 1.076)
pt3dadd(160.17, 75.643, 12.35, 1.048)
pt3dadd(160.249, 75.553, 12.35, 1.03)
pt3dadd(160.328, 75.463, 12.35, 1.016)
pt3dadd(160.408, 75.373, 12.35, 1.004)
pt3dadd(160.487, 75.283, 12.35, 0.99)
pt3dadd(160.567, 75.193, 12.35, 0.976)
pt3dadd(160.646, 75.103, 12.35, 0.962)
pt3dadd(160.726, 75.013, 12.35, 0.948)
pt3dadd(160.805, 74.923, 12.35, 0.934)
pt3dadd(160.884, 74.833, 12.35, 0.92)
pt3dadd(160.963, 74.743, 12.35, 0.906)
pt3dadd(161.045, 74.654, 12.35, 0.904)
pt3dadd(161.125, 74.566, 12.35, 0.904)
pt3dadd(161.206, 74.477, 12.35, 0.904)
pt3dadd(161.287, 74.388, 12.35, 0.904)
pt3dadd(161.368, 74.3, 12.35, 0.904)
pt3dadd(161.449, 74.211, 12.35, 0.904)
pt3dadd(161.53, 74.122, 12.35, 0.904)
pt3dadd(161.61, 74.034, 12.35, 0.904)
pt3dadd(161.692, 73.945, 12.35, 0.904)
pt3dadd(161.772, 73.857, 12.35, 0.904)
pt3dadd(161.85, 73.766, 12.35, 0.892)
pt3dadd(161.928, 73.674, 12.35, 0.878)
pt3dadd(162.006, 73.583, 12.35, 0.866)
pt3dadd(162.084, 73.491, 12.35, 0.852)
pt3dadd(162.162, 73.4, 12.35, 0.838)
pt3dadd(162.239, 73.309, 12.35, 0.824)
pt3dadd(162.317, 73.217, 12.35, 0.81)
pt3dadd(162.395, 73.126, 12.35, 0.796)
pt3dadd(162.473, 73.034, 12.35, 0.782)
pt3dadd(162.551, 72.943, 12.35, 0.77)
pt3dadd(162.62, 72.846, 12.35, 0.766)
pt3dadd(162.69, 72.748, 12.35, 0.762)
pt3dadd(162.758, 72.649, 12.35, 0.76)
pt3dadd(162.827, 72.551, 12.35, 0.758)
pt3dadd(162.896, 72.453, 12.35, 0.756)
pt3dadd(162.965, 72.355, 12.35, 0.754)
pt3dadd(163.034, 72.256, 12.35, 0.752)
pt3dadd(163.103, 72.158, 12.35, 0.75)
pt3dadd(163.171, 72.06, 12.35, 0.748)
pt3dadd(163.241, 71.961, 12.35, 0.746)
pt3dadd(163.297, 71.856, 12.35, 0.76)
pt3dadd(163.352, 71.749, 12.35, 0.776)
pt3dadd(163.408, 71.643, 12.35, 0.792)
}
}
proc shape3d_24() {
dend_7[8] { pt3dadd(163.463, 71.536, 12.35, 0.808)
pt3dadd(163.518, 71.429, 12.35, 0.824)
pt3dadd(163.572, 71.323, 12.35, 0.838)
pt3dadd(163.627, 71.216, 12.35, 0.854)
pt3dadd(163.682, 71.109, 12.35, 0.87)
pt3dadd(163.738, 71.003, 12.35, 0.886)
pt3dadd(163.793, 70.896, 12.35, 0.902)
pt3dadd(163.854, 70.793, 12.35, 0.904)
pt3dadd(163.915, 70.69, 12.35, 0.904)
pt3dadd(163.976, 70.587, 12.349, 0.904)
pt3dadd(164.039, 70.484, 12.349, 0.904)
pt3dadd(164.1, 70.381, 12.349, 0.904)
pt3dadd(164.161, 70.278, 12.349, 0.904)
pt3dadd(164.224, 70.175, 12.349, 0.904)
pt3dadd(164.285, 70.072, 12.349, 0.904)
pt3dadd(164.346, 69.969, 12.349, 0.904)
pt3dadd(164.407, 69.866, 12.349, 0.904)
pt3dadd(164.459, 69.757, 12.349, 0.938)
pt3dadd(164.508, 69.648, 12.349, 0.976)
pt3dadd(164.557, 69.538, 12.349, 1.014)
pt3dadd(164.606, 69.429, 12.349, 1.052)
pt3dadd(164.657, 69.32, 12.349, 1.09)
pt3dadd(164.706, 69.21, 12.349, 1.126)
pt3dadd(164.755, 69.101, 12.349, 1.164)
pt3dadd(164.804, 68.992, 12.349, 1.202)
pt3dadd(164.854, 68.882, 12.349, 1.24)
pt3dadd(164.904, 68.773, 12.349, 1.278)
pt3dadd(164.956, 68.665, 12.349, 1.302)
pt3dadd(165.007, 68.556, 12.349, 1.326)
pt3dadd(165.059, 68.448, 12.349, 1.348)
pt3dadd(165.11, 68.34, 12.348, 1.37)
pt3dadd(165.162, 68.231, 12.348, 1.394)
pt3dadd(165.214, 68.123, 12.348, 1.416)
pt3dadd(165.265, 68.015, 12.348, 1.44)
pt3dadd(165.317, 67.906, 12.348, 1.462)
pt3dadd(165.368, 67.798, 12.348, 1.486)
pt3dadd(165.42, 67.69, 12.348, 1.508)
pt3dadd(165.479, 67.585, 12.348, 1.494)
pt3dadd(165.539, 67.481, 12.348, 1.476)
pt3dadd(165.598, 67.377, 12.347, 1.46)
pt3dadd(165.658, 67.273, 12.347, 1.444)
pt3dadd(165.718, 67.169, 12.347, 1.426)
pt3dadd(165.776, 67.065, 12.347, 1.41)
pt3dadd(165.836, 66.96, 12.347, 1.394)
pt3dadd(165.896, 66.856, 12.347, 1.376)
pt3dadd(165.955, 66.752, 12.347, 1.36)
pt3dadd(166.015, 66.648, 12.347, 1.344)
pt3dadd(166.058, 66.536, 12.346, 1.326)
pt3dadd(166.102, 66.424, 12.346, 1.308)
pt3dadd(166.144, 66.312, 12.346, 1.29)
pt3dadd(166.187, 66.2, 12.345, 1.272)
pt3dadd(166.229, 66.087, 12.345, 1.254)
pt3dadd(166.272, 65.975, 12.345, 1.236)
pt3dadd(166.314, 65.863, 12.345, 1.218)
pt3dadd(166.357, 65.751, 12.344, 1.2)
pt3dadd(166.399, 65.639, 12.344, 1.182)
pt3dadd(166.442, 65.526, 12.344, 1.164)
pt3dadd(166.496, 65.419, 12.343, 1.146)
pt3dadd(166.55, 65.313, 12.343, 1.13)
pt3dadd(166.606, 65.206, 12.342, 1.112)
pt3dadd(166.66, 65.099, 12.342, 1.096)
pt3dadd(166.715, 64.992, 12.341, 1.078)
pt3dadd(166.769, 64.885, 12.341, 1.062)
pt3dadd(166.824, 64.779, 12.34, 1.044)
pt3dadd(166.879, 64.672, 12.34, 1.026)
pt3dadd(166.933, 64.565, 12.339, 1.01)
pt3dadd(166.988, 64.458, 12.339, 0.992)
pt3dadd(167.036, 64.348, 12.338, 0.992)
pt3dadd(167.083, 64.238, 12.337, 0.992)
pt3dadd(167.131, 64.128, 12.336, 0.992)
pt3dadd(167.179, 64.018, 12.335, 0.992)
pt3dadd(167.227, 63.908, 12.334, 0.992)
pt3dadd(167.275, 63.798, 12.333, 0.992)
pt3dadd(167.322, 63.687, 12.332, 0.992)
pt3dadd(167.37, 63.577, 12.331, 0.992)
pt3dadd(167.418, 63.467, 12.33, 0.992)
pt3dadd(167.466, 63.357, 12.33, 0.992)
pt3dadd(167.501, 63.242, 12.328, 1.006)
pt3dadd(167.536, 63.128, 12.326, 1.02)
pt3dadd(167.57, 63.013, 12.324, 1.034)
pt3dadd(167.605, 62.898, 12.323, 1.048)
pt3dadd(167.641, 62.783, 12.321, 1.06)
pt3dadd(167.676, 62.669, 12.319, 1.074)
pt3dadd(167.711, 62.554, 12.318, 1.088)
pt3dadd(167.746, 62.439, 12.316, 1.102)
pt3dadd(167.78, 62.324, 12.314, 1.116)
pt3dadd(167.816, 62.21, 12.312, 1.13)
pt3dadd(167.845, 62.093, 12.31, 1.13)
pt3dadd(167.874, 61.977, 12.307, 1.13)
pt3dadd(167.903, 61.86, 12.304, 1.13)
pt3dadd(167.932, 61.744, 12.301, 1.13)
pt3dadd(167.962, 61.628, 12.298, 1.13)
pt3dadd(167.99, 61.511, 12.295, 1.13)
pt3dadd(168.019, 61.395, 12.292, 1.13)
pt3dadd(168.048, 61.279, 12.289, 1.13)
pt3dadd(168.077, 61.162, 12.286, 1.13)
pt3dadd(168.107, 61.046, 12.283, 1.13)
pt3dadd(168.155, 60.936, 12.277, 1.13)
pt3dadd(168.202, 60.826, 12.271, 1.13)
pt3dadd(168.25, 60.716, 12.264, 1.13)
pt3dadd(168.298, 60.606, 12.258, 1.13)
pt3dadd(168.346, 60.497, 12.251, 1.13)
pt3dadd(168.392, 60.387, 12.245, 1.13)
pt3dadd(168.44, 60.277, 12.238, 1.13)
pt3dadd(168.488, 60.167, 12.232, 1.13)
pt3dadd(168.535, 60.057, 12.226, 1.13)
pt3dadd(168.583, 59.947, 12.219, 1.13)
pt3dadd(168.623, 59.835, 12.209, 1.088)
pt3dadd(168.662, 59.722, 12.199, 1.048)
pt3dadd(168.702, 59.609, 12.189, 1.008)
pt3dadd(168.742, 59.497, 12.18, 0.966)
pt3dadd(168.782, 59.384, 12.17, 0.926)
pt3dadd(168.822, 59.272, 12.16, 0.886)
pt3dadd(168.862, 59.159, 12.15, 0.844)
pt3dadd(168.901, 59.046, 12.14, 0.804)
pt3dadd(168.941, 58.934, 12.13, 0.764)
pt3dadd(168.98, 58.821, 12.12, 0.724)
pt3dadd(169.013, 58.709, 12.096, 0.714)
pt3dadd(169.045, 58.597, 12.072, 0.704)
pt3dadd(169.078, 58.485, 12.049, 0.694)
pt3dadd(169.11, 58.373, 12.025, 0.684)
pt3dadd(169.142, 58.261, 12.001, 0.674)
pt3dadd(169.175, 58.149, 11.977, 0.664)
pt3dadd(169.207, 58.038, 11.953, 0.654)
pt3dadd(169.24, 57.926, 11.929, 0.644)
pt3dadd(169.271, 57.813, 11.906, 0.634)
pt3dadd(169.303, 57.702, 11.88, 0.628)
pt3dadd(169.334, 57.593, 11.847, 0.646)
pt3dadd(169.366, 57.485, 11.813, 0.664)
pt3dadd(169.397, 57.376, 11.78, 0.68)
pt3dadd(169.428, 57.267, 11.746, 0.698)
pt3dadd(169.459, 57.159, 11.713, 0.716)
pt3dadd(169.49, 57.05, 11.679, 0.734)
pt3dadd(169.522, 56.941, 11.646, 0.752)
pt3dadd(169.553, 56.833, 11.612, 0.77)
pt3dadd(169.584, 56.724, 11.579, 0.786)
pt3dadd(169.619, 56.616, 11.547, 0.792)
pt3dadd(169.666, 56.509, 11.525, 0.742)
pt3dadd(169.714, 56.402, 11.503, 0.69)
pt3dadd(169.76, 56.295, 11.481, 0.638)
pt3dadd(169.808, 56.188, 11.459, 0.588)
pt3dadd(169.856, 56.081, 11.437, 0.536)
pt3dadd(169.903, 55.974, 11.415, 0.484)
pt3dadd(169.951, 55.867, 11.393, 0.434)
pt3dadd(169.998, 55.76, 11.371, 0.382)
pt3dadd(170.046, 55.653, 11.349, 0.33)
pt3dadd(170.093, 55.545, 11.329, 0.29)
pt3dadd(170.132, 55.433, 11.317, 0.298)
pt3dadd(170.173, 55.321, 11.305, 0.308)
pt3dadd(170.214, 55.209, 11.293, 0.318)
pt3dadd(170.254, 55.097, 11.281, 0.328)
pt3dadd(170.294, 54.984, 11.269, 0.338)
pt3dadd(170.334, 54.872, 11.258, 0.348)
pt3dadd(170.375, 54.76, 11.246, 0.358)
pt3dadd(170.416, 54.648, 11.234, 0.368)
pt3dadd(170.455, 54.536, 11.222, 0.376)
pt3dadd(170.495, 54.423, 11.212, 0.386)
pt3dadd(170.532, 54.309, 11.208, 0.392)
pt3dadd(170.569, 54.195, 11.204, 0.4)
pt3dadd(170.605, 54.081, 11.2, 0.406)
pt3dadd(170.642, 53.967, 11.196, 0.412)
pt3dadd(170.678, 53.853, 11.192, 0.42)
pt3dadd(170.716, 53.739, 11.188, 0.426)
pt3dadd(170.752, 53.624, 11.184, 0.434)
pt3dadd(170.789, 53.51, 11.181, 0.44)
pt3dadd(170.825, 53.396, 11.177, 0.446)
pt3dadd(170.863, 53.282, 11.174, 0.456)
pt3dadd(170.906, 53.171, 11.174, 0.476)
pt3dadd(170.951, 53.059, 11.174, 0.496)
pt3dadd(170.994, 52.947, 11.174, 0.516)
pt3dadd(171.038, 52.835, 11.174, 0.538)
pt3dadd(171.082, 52.724, 11.173, 0.558)
pt3dadd(171.126, 52.612, 11.173, 0.578)
pt3dadd(171.169, 52.5, 11.173, 0.598)
pt3dadd(171.214, 52.388, 11.173, 0.618)
pt3dadd(171.257, 52.277, 11.173, 0.638)
pt3dadd(171.304, 52.166, 11.173, 0.666)
pt3dadd(171.361, 52.061, 11.173, 0.71)
pt3dadd(171.418, 51.955, 11.173, 0.756)
pt3dadd(171.475, 51.85, 11.173, 0.802)
pt3dadd(171.533, 51.744, 11.173, 0.848)
pt3dadd(171.589, 51.639, 11.173, 0.892)
pt3dadd(171.647, 51.533, 11.173, 0.938)
pt3dadd(171.704, 51.428, 11.173, 0.984)
pt3dadd(171.761, 51.322, 11.173, 1.03)
pt3dadd(171.818, 51.217, 11.173, 1.074)
pt3dadd(171.877, 51.113, 11.173, 1.102)
pt3dadd(171.946, 51.013, 11.173, 1.07)
pt3dadd(172.013, 50.914, 11.173, 1.038)
pt3dadd(172.08, 50.815, 11.173, 1.006)
pt3dadd(172.147, 50.716, 11.173, 0.974)
pt3dadd(172.214, 50.616, 11.173, 0.942)
pt3dadd(172.283, 50.517, 11.173, 0.91)
pt3dadd(172.35, 50.418, 11.173, 0.878)
pt3dadd(172.417, 50.319, 11.173, 0.848)
pt3dadd(172.484, 50.219, 11.173, 0.816)
pt3dadd(172.549, 50.118, 11.173, 0.788)
pt3dadd(172.604, 50.012, 11.173, 0.778)
pt3dadd(172.66, 49.905, 11.173, 0.766)
pt3dadd(172.714, 49.798, 11.173, 0.754)
}
}
proc shape3d_25() {
dend_7[8] { pt3dadd(172.769, 49.692, 11.173, 0.744)
pt3dadd(172.824, 49.585, 11.173, 0.732)
pt3dadd(172.879, 49.478, 11.173, 0.72)
pt3dadd(172.934, 49.372, 11.173, 0.708)
pt3dadd(172.988, 49.265, 11.173, 0.698)
pt3dadd(173.044, 49.158, 11.173, 0.686)
pt3dadd(173.095, 49.05, 11.173, 0.674)
pt3dadd(173.136, 48.937, 11.172, 0.66)
pt3dadd(173.177, 48.824, 11.172, 0.648)
pt3dadd(173.218, 48.711, 11.172, 0.634)
pt3dadd(173.258, 48.599, 11.172, 0.62)
pt3dadd(173.299, 48.486, 11.172, 0.606)
pt3dadd(173.34, 48.373, 11.172, 0.594)
pt3dadd(173.381, 48.26, 11.172, 0.58)
pt3dadd(173.423, 48.147, 11.172, 0.566)
pt3dadd(173.464, 48.035, 11.172, 0.552)
pt3dadd(173.501, 47.921, 11.172, 0.534)
pt3dadd(173.532, 47.805, 11.171, 0.502)
pt3dadd(173.563, 47.689, 11.171, 0.47)
pt3dadd(173.594, 47.573, 11.171, 0.438)
pt3dadd(173.626, 47.457, 11.171, 0.406)
pt3dadd(173.657, 47.341, 11.171, 0.374)
pt3dadd(173.688, 47.226, 11.171, 0.342)
pt3dadd(173.719, 47.11, 11.171, 0.31)
pt3dadd(173.75, 46.994, 11.17, 0.278)
pt3dadd(173.782, 46.878, 11.17, 0.248)
pt3dadd(173.818, 46.764, 11.17, 0.226)
pt3dadd(173.866, 46.653, 11.17, 0.226)
pt3dadd(173.912, 46.543, 11.17, 0.226)
pt3dadd(173.959, 46.433, 11.169, 0.226)
pt3dadd(174.007, 46.323, 11.169, 0.226)
pt3dadd(174.054, 46.212, 11.169, 0.226)
pt3dadd(174.102, 46.102, 11.168, 0.226)
pt3dadd(174.149, 45.992, 11.168, 0.226)
pt3dadd(174.196, 45.881, 11.168, 0.226)
pt3dadd(174.244, 45.771, 11.168, 0.226)
pt3dadd(174.287, 45.66, 11.167, 0.226)
pt3dadd(174.325, 45.546, 11.167, 0.226)
pt3dadd(174.364, 45.432, 11.166, 0.226)
pt3dadd(174.401, 45.318, 11.166, 0.226)
pt3dadd(174.439, 45.204, 11.165, 0.226)
pt3dadd(174.476, 45.09, 11.164, 0.226)
pt3dadd(174.515, 44.976, 11.164, 0.226)
pt3dadd(174.552, 44.862, 11.163, 0.226)
pt3dadd(174.59, 44.749, 11.163, 0.226)
pt3dadd(174.628, 44.635, 11.162, 0.226)
pt3dadd(174.662, 44.52, 11.161, 0.226)
pt3dadd(174.694, 44.404, 11.16, 0.226)
pt3dadd(174.724, 44.288, 11.159, 0.226)
pt3dadd(174.754, 44.172, 11.158, 0.226)
pt3dadd(174.784, 44.055, 11.157, 0.226)
pt3dadd(174.814, 43.939, 11.156, 0.226)
pt3dadd(174.844, 43.823, 11.155, 0.226)
pt3dadd(174.874, 43.707, 11.154, 0.226)
pt3dadd(174.904, 43.591, 11.153, 0.226)
pt3dadd(174.935, 43.475, 11.151, 0.226)
pt3dadd(174.966, 43.359, 11.15, 0.232)
pt3dadd(175.001, 43.244, 11.148, 0.246)
pt3dadd(175.034, 43.129, 11.146, 0.262)
pt3dadd(175.069, 43.014, 11.144, 0.278)
pt3dadd(175.104, 42.899, 11.142, 0.292)
pt3dadd(175.138, 42.784, 11.14, 0.308)
pt3dadd(175.172, 42.669, 11.138, 0.324)
pt3dadd(175.207, 42.555, 11.136, 0.34)
pt3dadd(175.241, 42.44, 11.134, 0.354)
pt3dadd(175.276, 42.325, 11.132, 0.37)
pt3dadd(175.313, 42.211, 11.13, 0.39)
pt3dadd(175.355, 42.098, 11.127, 0.416)
pt3dadd(175.397, 41.986, 11.123, 0.444)
pt3dadd(175.439, 41.874, 11.12, 0.47)
pt3dadd(175.481, 41.761, 11.116, 0.496)
pt3dadd(175.523, 41.649, 11.113, 0.524)
pt3dadd(175.566, 41.537, 11.11, 0.55)
pt3dadd(175.608, 41.424, 11.106, 0.578)
pt3dadd(175.65, 41.312, 11.103, 0.604)
pt3dadd(175.692, 41.2, 11.1, 0.632)
pt3dadd(175.728, 41.086, 11.095, 0.64)
pt3dadd(175.757, 40.97, 11.088, 0.622)
pt3dadd(175.786, 40.854, 11.081, 0.602)
pt3dadd(175.814, 40.737, 11.074, 0.584)
pt3dadd(175.843, 40.621, 11.067, 0.566)
pt3dadd(175.872, 40.505, 11.06, 0.548)
pt3dadd(175.901, 40.389, 11.054, 0.528)
pt3dadd(175.93, 40.273, 11.047, 0.51)
pt3dadd(175.958, 40.156, 11.04, 0.492)
pt3dadd(175.987, 40.04, 11.033, 0.472)
pt3dadd(176.011, 39.923, 11.024, 0.468)
pt3dadd(176.024, 39.805, 11.013, 0.486)
pt3dadd(176.039, 39.686, 11.002, 0.502)
pt3dadd(176.052, 39.568, 10.99, 0.52)
pt3dadd(176.066, 39.45, 10.979, 0.536)
pt3dadd(176.081, 39.331, 10.967, 0.554)
pt3dadd(176.094, 39.213, 10.956, 0.57)
pt3dadd(176.108, 39.094, 10.944, 0.588)
pt3dadd(176.122, 38.976, 10.933, 0.604)
pt3dadd(176.136, 38.858, 10.922, 0.622)
pt3dadd(176.146, 38.741, 10.903, 0.634)
pt3dadd(176.149, 38.627, 10.871, 0.638)
pt3dadd(176.153, 38.513, 10.84, 0.642)
pt3dadd(176.155, 38.399, 10.808, 0.648)
pt3dadd(176.159, 38.285, 10.777, 0.652)
pt3dadd(176.162, 38.172, 10.746, 0.656)
pt3dadd(176.165, 38.058, 10.714, 0.662)
pt3dadd(176.168, 37.944, 10.683, 0.666)
pt3dadd(176.172, 37.83, 10.651, 0.67)
pt3dadd(176.176, 37.716, 10.62, 0.676)
pt3dadd(176.177, 37.602, 10.589, 0.674)
pt3dadd(176.177, 37.488, 10.557, 0.664)
pt3dadd(176.177, 37.374, 10.526, 0.656)
pt3dadd(176.177, 37.26, 10.495, 0.646)
pt3dadd(176.177, 37.146, 10.464, 0.638)
pt3dadd(176.177, 37.032, 10.433, 0.628)
pt3dadd(176.177, 36.918, 10.401, 0.62)
pt3dadd(176.177, 36.804, 10.37, 0.61)
pt3dadd(176.177, 36.69, 10.339, 0.6)
pt3dadd(176.177, 36.576, 10.308, 0.592)
pt3dadd(176.177, 36.46, 10.281, 0.582)
pt3dadd(176.177, 36.343, 10.26, 0.574)
pt3dadd(176.177, 36.226, 10.239, 0.566)
pt3dadd(176.177, 36.108, 10.218, 0.558)
pt3dadd(176.177, 35.991, 10.196, 0.55)
pt3dadd(176.178, 35.874, 10.175, 0.542)
pt3dadd(176.178, 35.757, 10.154, 0.534)
pt3dadd(176.178, 35.64, 10.133, 0.526)
pt3dadd(176.178, 35.522, 10.112, 0.516)
pt3dadd(176.178, 35.405, 10.09, 0.508)
pt3dadd(176.178, 35.287, 10.074, 0.514)
pt3dadd(176.178, 35.168, 10.062, 0.534)
pt3dadd(176.179, 35.048, 10.051, 0.552)
pt3dadd(176.179, 34.929, 10.039, 0.572)
pt3dadd(176.179, 34.81, 10.028, 0.59)
pt3dadd(176.179, 34.691, 10.016, 0.61)
pt3dadd(176.179, 34.572, 10.005, 0.628)
pt3dadd(176.18, 34.452, 9.993, 0.648)
pt3dadd(176.18, 34.333, 9.982, 0.666)
pt3dadd(176.18, 34.214, 9.97, 0.686)
pt3dadd(176.18, 34.094, 9.963, 0.706)
pt3dadd(176.182, 33.974, 9.96, 0.724)
pt3dadd(176.182, 33.855, 9.957, 0.744)
pt3dadd(176.183, 33.735, 9.954, 0.762)
pt3dadd(176.183, 33.615, 9.951, 0.782)
pt3dadd(176.184, 33.495, 9.948, 0.802)
pt3dadd(176.184, 33.375, 9.946, 0.82)
pt3dadd(176.185, 33.255, 9.943, 0.84)
pt3dadd(176.185, 33.135, 9.94, 0.86)
pt3dadd(176.186, 33.015, 9.937, 0.878)
pt3dadd(176.186, 32.895, 9.932, 0.87)
pt3dadd(176.188, 32.775, 9.926, 0.836)
pt3dadd(176.189, 32.655, 9.919, 0.804)
pt3dadd(176.189, 32.536, 9.912, 0.77)
pt3dadd(176.19, 32.416, 9.906, 0.736)
pt3dadd(176.191, 32.296, 9.899, 0.704)
pt3dadd(176.192, 32.177, 9.892, 0.67)
pt3dadd(176.192, 32.057, 9.886, 0.636)
pt3dadd(176.194, 31.937, 9.879, 0.604)
pt3dadd(176.195, 31.817, 9.872, 0.57)
pt3dadd(176.196, 31.698, 9.864, 0.542)
pt3dadd(176.197, 31.579, 9.853, 0.518)
pt3dadd(176.2, 31.459, 9.843, 0.492)
pt3dadd(176.201, 31.34, 9.833, 0.468)
pt3dadd(176.203, 31.221, 9.822, 0.444)
pt3dadd(176.204, 31.101, 9.812, 0.42)
pt3dadd(176.207, 30.982, 9.802, 0.396)
pt3dadd(176.208, 30.863, 9.791, 0.372)
pt3dadd(176.21, 30.743, 9.781, 0.348)
pt3dadd(176.212, 30.624, 9.771, 0.324)
pt3dadd(176.214, 30.506, 9.752, 0.322)
pt3dadd(176.218, 30.39, 9.726, 0.344)
pt3dadd(176.221, 30.275, 9.7, 0.364)
pt3dadd(176.225, 30.159, 9.675, 0.386)
pt3dadd(176.227, 30.043, 9.649, 0.406)
pt3dadd(176.231, 29.927, 9.623, 0.428)
pt3dadd(176.234, 29.811, 9.597, 0.448)
pt3dadd(176.237, 29.695, 9.571, 0.47)
pt3dadd(176.24, 29.579, 9.545, 0.49)
pt3dadd(176.244, 29.463, 9.519, 0.512)
pt3dadd(176.249, 29.349, 9.489, 0.54)
pt3dadd(176.255, 29.236, 9.455, 0.574)
pt3dadd(176.261, 29.124, 9.422, 0.606)
pt3dadd(176.267, 29.011, 9.388, 0.64)
pt3dadd(176.273, 28.898, 9.355, 0.674)
pt3dadd(176.279, 28.785, 9.321, 0.706)
pt3dadd(176.284, 28.672, 9.288, 0.74)
pt3dadd(176.29, 28.559, 9.254, 0.772)
pt3dadd(176.296, 28.446, 9.221, 0.806)
pt3dadd(176.302, 28.333, 9.187, 0.84)
pt3dadd(176.311, 28.218, 9.161, 0.842)
pt3dadd(176.322, 28.102, 9.137, 0.826)
pt3dadd(176.333, 27.986, 9.114, 0.81)
pt3dadd(176.344, 27.869, 9.091, 0.794)
pt3dadd(176.354, 27.753, 9.068, 0.776)
pt3dadd(176.365, 27.637, 9.045, 0.76)
pt3dadd(176.376, 27.52, 9.022, 0.744)
pt3dadd(176.387, 27.404, 8.999, 0.728)
pt3dadd(176.398, 27.288, 8.976, 0.712)
pt3dadd(176.408, 27.172, 8.953, 0.696)
pt3dadd(176.423, 27.054, 8.938, 0.702)
pt3dadd(176.441, 26.936, 8.927, 0.722)
pt3dadd(176.459, 26.819, 8.916, 0.74)
pt3dadd(176.477, 26.701, 8.905, 0.76)
}
}
proc shape3d_26() {
dend_7[8] { pt3dadd(176.495, 26.583, 8.894, 0.778)
pt3dadd(176.513, 26.465, 8.883, 0.796)
pt3dadd(176.531, 26.347, 8.872, 0.816)
pt3dadd(176.549, 26.229, 8.861, 0.834)
pt3dadd(176.567, 26.111, 8.85, 0.854)
pt3dadd(176.585, 25.993, 8.839, 0.872)
pt3dadd(176.623, 25.88, 8.835, 0.872)
pt3dadd(176.671, 25.771, 8.833, 0.858)
pt3dadd(176.72, 25.661, 8.832, 0.846)
pt3dadd(176.768, 25.551, 8.83, 0.834)
pt3dadd(176.818, 25.442, 8.829, 0.82)
pt3dadd(176.866, 25.332, 8.828, 0.808)
pt3dadd(176.915, 25.222, 8.826, 0.796)
pt3dadd(176.963, 25.113, 8.825, 0.784)
pt3dadd(177.012, 25.003, 8.823, 0.77)
pt3dadd(177.06, 24.893, 8.822, 0.758)
pt3dadd(177.109, 24.783, 8.821, 0.742)
pt3dadd(177.157, 24.674, 8.821, 0.724)
pt3dadd(177.205, 24.564, 8.821, 0.706)
pt3dadd(177.254, 24.454, 8.821, 0.69)
pt3dadd(177.302, 24.344, 8.821, 0.672)
pt3dadd(177.35, 24.234, 8.821, 0.654)
pt3dadd(177.4, 24.125, 8.821, 0.636)
pt3dadd(177.448, 24.015, 8.821, 0.618)
pt3dadd(177.496, 23.905, 8.821, 0.602)
pt3dadd(177.545, 23.795, 8.821, 0.584)
pt3dadd(177.594, 23.686, 8.821, 0.566)
pt3dadd(177.644, 23.577, 8.821, 0.548)
pt3dadd(177.694, 23.468, 8.821, 0.532)
pt3dadd(177.744, 23.358, 8.821, 0.514)
pt3dadd(177.793, 23.249, 8.821, 0.496)
pt3dadd(177.844, 23.14, 8.821, 0.478)
pt3dadd(177.894, 23.031, 8.821, 0.462)
pt3dadd(177.943, 22.922, 8.821, 0.444)
pt3dadd(177.994, 22.813, 8.821, 0.426)
pt3dadd(178.043, 22.704, 8.821, 0.408)
pt3dadd(178.102, 22.599, 8.821, 0.392)
pt3dadd(178.164, 22.497, 8.821, 0.376)
pt3dadd(178.226, 22.394, 8.821, 0.36)
pt3dadd(178.288, 22.291, 8.821, 0.342)
pt3dadd(178.35, 22.188, 8.821, 0.326)
pt3dadd(178.412, 22.086, 8.821, 0.31)
pt3dadd(178.474, 21.983, 8.821, 0.294)
pt3dadd(178.536, 21.88, 8.821, 0.278)
pt3dadd(178.598, 21.777, 8.821, 0.26)
pt3dadd(178.661, 21.675, 8.821, 0.244)
pt3dadd(178.711, 21.566, 8.821, 0.25)
pt3dadd(178.758, 21.456, 8.821, 0.266)
pt3dadd(178.805, 21.346, 8.821, 0.28)
pt3dadd(178.853, 21.235, 8.821, 0.296)
pt3dadd(178.9, 21.125, 8.821, 0.31)
pt3dadd(178.946, 21.014, 8.821, 0.326)
pt3dadd(178.993, 20.904, 8.821, 0.34)
pt3dadd(179.04, 20.793, 8.821, 0.356)
pt3dadd(179.087, 20.683, 8.821, 0.37)
pt3dadd(179.134, 20.573, 8.821, 0.386)
pt3dadd(179.189, 20.466, 8.821, 0.402)
pt3dadd(179.245, 20.36, 8.821, 0.418)
pt3dadd(179.303, 20.255, 8.821, 0.436)
pt3dadd(179.36, 20.149, 8.821, 0.452)
pt3dadd(179.417, 20.044, 8.821, 0.468)
pt3dadd(179.474, 19.938, 8.821, 0.486)
pt3dadd(179.532, 19.833, 8.821, 0.502)
pt3dadd(179.588, 19.727, 8.821, 0.52)
pt3dadd(179.646, 19.622, 8.821, 0.536)
pt3dadd(179.704, 19.516, 8.821, 0.554)
pt3dadd(179.762, 19.412, 8.821, 0.57)
pt3dadd(179.822, 19.308, 8.821, 0.586)
pt3dadd(179.881, 19.203, 8.821, 0.604)
pt3dadd(179.941, 19.099, 8.821, 0.62)
pt3dadd(180.001, 18.995, 8.821, 0.638)
pt3dadd(180.06, 18.891, 8.821, 0.654)
pt3dadd(180.12, 18.787, 8.821, 0.67)
pt3dadd(180.18, 18.683, 8.821, 0.688)
pt3dadd(180.239, 18.579, 8.821, 0.704)
pt3dadd(180.299, 18.475, 8.821, 0.72)
pt3dadd(180.35, 18.366, 8.821, 0.738)
pt3dadd(180.401, 18.257, 8.821, 0.756)
pt3dadd(180.45, 18.148, 8.821, 0.772)
pt3dadd(180.499, 18.039, 8.821, 0.79)
pt3dadd(180.548, 17.929, 8.821, 0.808)
pt3dadd(180.599, 17.82, 8.821, 0.826)
pt3dadd(180.648, 17.711, 8.821, 0.842)
pt3dadd(180.697, 17.601, 8.821, 0.86)
pt3dadd(180.748, 17.492, 8.821, 0.878)
pt3dadd(180.797, 17.383, 8.821, 0.896)
pt3dadd(180.859, 17.281, 8.821, 0.888)
pt3dadd(180.925, 17.181, 8.821, 0.872)
pt3dadd(180.991, 17.081, 8.821, 0.858)
pt3dadd(181.058, 16.981, 8.821, 0.842)
pt3dadd(181.124, 16.881, 8.821, 0.828)
pt3dadd(181.19, 16.78, 8.821, 0.812)
pt3dadd(181.256, 16.68, 8.821, 0.798)
pt3dadd(181.324, 16.58, 8.821, 0.782)
pt3dadd(181.39, 16.48, 8.821, 0.768)
pt3dadd(181.456, 16.38, 8.821, 0.752)
pt3dadd(181.524, 16.282, 8.821, 0.736)
pt3dadd(181.594, 16.184, 8.821, 0.72)
pt3dadd(181.663, 16.086, 8.821, 0.706)
pt3dadd(181.733, 15.988, 8.821, 0.69)
pt3dadd(181.802, 15.89, 8.821, 0.674)
pt3dadd(181.871, 15.792, 8.822, 0.658)
pt3dadd(181.94, 15.695, 8.822, 0.642)
pt3dadd(182.01, 15.597, 8.822, 0.626)
pt3dadd(182.08, 15.499, 8.822, 0.612)
pt3dadd(182.149, 15.401, 8.822, 0.596)
pt3dadd(182.219, 15.304, 8.822, 0.582)
pt3dadd(182.29, 15.206, 8.822, 0.57)
pt3dadd(182.36, 15.109, 8.822, 0.558)
pt3dadd(182.43, 15.012, 8.822, 0.544)
pt3dadd(182.501, 14.915, 8.822, 0.532)
pt3dadd(182.57, 14.817, 8.822, 0.52)
pt3dadd(182.641, 14.72, 8.822, 0.508)
pt3dadd(182.712, 14.623, 8.822, 0.496)
pt3dadd(182.782, 14.526, 8.822, 0.482)
pt3dadd(182.852, 14.429, 8.822, 0.47)
pt3dadd(182.911, 14.324, 8.822, 0.482)
pt3dadd(182.968, 14.218, 8.822, 0.498)
pt3dadd(183.023, 14.112, 8.822, 0.516)
pt3dadd(183.079, 14.006, 8.822, 0.532)
pt3dadd(183.136, 13.9, 8.822, 0.548)
pt3dadd(183.192, 13.794, 8.822, 0.566)
pt3dadd(183.247, 13.688, 8.822, 0.584)
pt3dadd(183.304, 13.582, 8.822, 0.6)
pt3dadd(183.36, 13.476, 8.822, 0.616)
pt3dadd(183.415, 13.369, 8.822, 0.634)
pt3dadd(183.476, 13.266, 8.822, 0.622)
pt3dadd(183.539, 13.164, 8.822, 0.6)
pt3dadd(183.601, 13.061, 8.822, 0.58)
pt3dadd(183.664, 12.959, 8.822, 0.56)
pt3dadd(183.726, 12.856, 8.822, 0.538)
pt3dadd(183.79, 12.754, 8.823, 0.518)
pt3dadd(183.852, 12.651, 8.823, 0.496)
pt3dadd(183.914, 12.549, 8.823, 0.476)
pt3dadd(183.977, 12.446, 8.823, 0.456)
pt3dadd(184.039, 12.344, 8.823, 0.434)
pt3dadd(184.099, 12.24, 8.823, 0.424)
pt3dadd(184.159, 12.136, 8.823, 0.416)
pt3dadd(184.219, 12.033, 8.823, 0.41)
pt3dadd(184.279, 11.929, 8.823, 0.402)
pt3dadd(184.34, 11.825, 8.823, 0.394)
pt3dadd(184.4, 11.721, 8.823, 0.386)
pt3dadd(184.46, 11.617, 8.824, 0.378)
pt3dadd(184.52, 11.513, 8.824, 0.37)
pt3dadd(184.58, 11.409, 8.824, 0.362)
pt3dadd(184.64, 11.306, 8.824, 0.356)
pt3dadd(184.696, 11.199, 8.824, 0.38)
pt3dadd(184.75, 11.092, 8.824, 0.412)
pt3dadd(184.802, 10.984, 8.825, 0.442)
pt3dadd(184.856, 10.877, 8.825, 0.474)
pt3dadd(184.91, 10.77, 8.825, 0.506)
pt3dadd(184.964, 10.663, 8.825, 0.536)
pt3dadd(185.018, 10.555, 8.825, 0.568)
pt3dadd(185.072, 10.448, 8.825, 0.6)
pt3dadd(185.126, 10.341, 8.826, 0.632)
pt3dadd(185.179, 10.234, 8.826, 0.662)
pt3dadd(185.249, 10.136, 8.826, 0.656)
pt3dadd(185.321, 10.04, 8.826, 0.64)
pt3dadd(185.393, 9.944, 8.827, 0.624)
pt3dadd(185.465, 9.848, 8.827, 0.608)
pt3dadd(185.537, 9.752, 8.828, 0.594)
pt3dadd(185.609, 9.656, 8.828, 0.578)
pt3dadd(185.681, 9.56, 8.828, 0.562)
pt3dadd(185.754, 9.464, 8.829, 0.548)
pt3dadd(185.826, 9.369, 8.829, 0.532)
pt3dadd(185.898, 9.273, 8.829, 0.516)
pt3dadd(185.974, 9.18, 8.83, 0.502)
pt3dadd(186.05, 9.087, 8.83, 0.486)
pt3dadd(186.127, 8.995, 8.831, 0.472)
pt3dadd(186.204, 8.903, 8.831, 0.456)
pt3dadd(186.281, 8.811, 8.832, 0.442)
pt3dadd(186.358, 8.718, 8.833, 0.426)
pt3dadd(186.434, 8.626, 8.833, 0.412)
pt3dadd(186.511, 8.534, 8.834, 0.398)
pt3dadd(186.588, 8.442, 8.834, 0.382)
pt3dadd(186.665, 8.349, 8.835, 0.368)
pt3dadd(186.744, 8.259, 8.836, 0.354)
pt3dadd(186.823, 8.17, 8.836, 0.34)
pt3dadd(186.904, 8.08, 8.837, 0.326)
pt3dadd(186.984, 7.991, 8.838, 0.312)
pt3dadd(187.063, 7.901, 8.838, 0.298)
pt3dadd(187.144, 7.812, 8.839, 0.284)
pt3dadd(187.223, 7.722, 8.84, 0.27)
pt3dadd(187.303, 7.633, 8.84, 0.256)
pt3dadd(187.384, 7.543, 8.841, 0.242)
pt3dadd(187.463, 7.454, 8.842, 0.228)
pt3dadd(187.547, 7.368, 8.843, 0.226)
pt3dadd(187.632, 7.283, 8.845, 0.226)
pt3dadd(187.717, 7.199, 8.846, 0.226)
pt3dadd(187.801, 7.114, 8.848, 0.226)
pt3dadd(187.886, 7.029, 8.849, 0.226)
pt3dadd(187.972, 6.944, 8.851, 0.226)
pt3dadd(188.056, 6.859, 8.852, 0.226)
pt3dadd(188.141, 6.774, 8.854, 0.226)
pt3dadd(188.226, 6.689, 8.855, 0.226)
pt3dadd(188.31, 6.604, 8.857, 0.226)
pt3dadd(188.395, 6.52, 8.859, 0.236)
pt3dadd(188.48, 6.435, 8.861, 0.248)
pt3dadd(188.564, 6.35, 8.863, 0.26)
pt3dadd(188.65, 6.265, 8.865, 0.272)
}
}
proc shape3d_27() {
dend_7[8] { pt3dadd(188.735, 6.18, 8.868, 0.284)
pt3dadd(188.82, 6.096, 8.87, 0.296)
pt3dadd(188.904, 6.011, 8.872, 0.308)
pt3dadd(188.989, 5.926, 8.874, 0.32)
pt3dadd(189.074, 5.841, 8.876, 0.332)
pt3dadd(189.158, 5.756, 8.878, 0.344)
pt3dadd(189.244, 5.671, 8.881, 0.37)
pt3dadd(189.329, 5.587, 8.884, 0.4)
pt3dadd(189.413, 5.502, 8.887, 0.428)
pt3dadd(189.498, 5.417, 8.89, 0.456)
pt3dadd(189.583, 5.332, 8.893, 0.484)
pt3dadd(189.667, 5.247, 8.896, 0.514)
pt3dadd(189.752, 5.163, 8.899, 0.542)
pt3dadd(189.838, 5.078, 8.902, 0.57)
pt3dadd(189.923, 4.993, 8.905, 0.6)
pt3dadd(190.007, 4.908, 8.908, 0.628)
pt3dadd(190.092, 4.824, 8.915, 0.626)
pt3dadd(190.176, 4.739, 8.922, 0.618)
pt3dadd(190.261, 4.654, 8.93, 0.61)
pt3dadd(190.345, 4.57, 8.938, 0.6)
pt3dadd(190.43, 4.485, 8.945, 0.592)
pt3dadd(190.514, 4.401, 8.953, 0.584)
pt3dadd(190.6, 4.316, 8.961, 0.576)
pt3dadd(190.684, 4.231, 8.968, 0.568)
pt3dadd(190.769, 4.147, 8.976, 0.56)
pt3dadd(190.853, 4.062, 8.984, 0.55)
pt3dadd(190.938, 3.978, 8.994, 0.536)
pt3dadd(191.022, 3.893, 9.004, 0.52)
pt3dadd(191.106, 3.809, 9.014, 0.504)
pt3dadd(191.191, 3.725, 9.025, 0.488)
pt3dadd(191.275, 3.64, 9.035, 0.472)
pt3dadd(191.359, 3.556, 9.045, 0.456)
pt3dadd(191.444, 3.471, 9.056, 0.44)
pt3dadd(191.528, 3.387, 9.066, 0.424)
pt3dadd(191.612, 3.303, 9.076, 0.408)
pt3dadd(191.698, 3.218, 9.087, 0.39)
pt3dadd(191.78, 3.135, 9.104, 0.374)
pt3dadd(191.864, 3.051, 9.122, 0.358)
pt3dadd(191.947, 2.968, 9.141, 0.342)
pt3dadd(192.031, 2.885, 9.159, 0.324)
pt3dadd(192.114, 2.801, 9.178, 0.308)
pt3dadd(192.198, 2.718, 9.196, 0.292)
pt3dadd(192.281, 2.634, 9.214, 0.276)
pt3dadd(192.365, 2.551, 9.233, 0.258)
pt3dadd(192.448, 2.468, 9.251, 0.242)
pt3dadd(192.532, 2.384, 9.27, 0.226)
pt3dadd(192.589, 2.326, 9.343, 0.226)
pt3dadd(192.648, 2.268, 9.415, 0.226)
pt3dadd(192.706, 2.21, 9.488, 0.226)
pt3dadd(192.764, 2.151, 9.561, 0.226)
pt3dadd(192.822, 2.093, 9.634, 0.226)
pt3dadd(192.881, 2.035, 9.706, 0.226)
pt3dadd(192.938, 1.977, 9.779, 0.226)
pt3dadd(192.997, 1.919, 9.852, 0.226)
pt3dadd(193.056, 1.86, 9.925, 0.226)
pt3dadd(193.114, 1.802, 9.997, 0.226)
}
dend_7[9] {pt3dclear()
pt3dadd(130.826, 115.642, 13.51, 1.808)
pt3dadd(130.841, 115.646, 13.499, 1.798)
pt3dadd(130.928, 115.673, 13.435, 1.736)
pt3dadd(131.017, 115.7, 13.371, 1.674)
pt3dadd(131.105, 115.726, 13.307, 1.61)
pt3dadd(131.194, 115.753, 13.243, 1.548)
pt3dadd(131.281, 115.78, 13.179, 1.486)
pt3dadd(131.37, 115.807, 13.115, 1.424)
pt3dadd(131.458, 115.834, 13.051, 1.362)
pt3dadd(131.545, 115.86, 12.987, 1.298)
pt3dadd(131.634, 115.887, 12.923, 1.236)
pt3dadd(131.722, 115.914, 12.859, 1.174)
pt3dadd(131.81, 115.941, 12.795, 1.112)
pt3dadd(131.898, 115.967, 12.731, 1.048)
pt3dadd(131.987, 115.994, 12.667, 0.986)
pt3dadd(132.072, 116.022, 12.601, 0.93)
pt3dadd(132.132, 116.058, 12.52, 0.93)
pt3dadd(132.193, 116.095, 12.439, 0.93)
pt3dadd(132.253, 116.131, 12.358, 0.93)
pt3dadd(132.313, 116.167, 12.277, 0.932)
pt3dadd(132.374, 116.204, 12.196, 0.932)
pt3dadd(132.434, 116.24, 12.115, 0.932)
pt3dadd(132.494, 116.276, 12.035, 0.932)
pt3dadd(132.556, 116.313, 11.954, 0.932)
pt3dadd(132.616, 116.349, 11.873, 0.932)
pt3dadd(132.676, 116.395, 11.796, 0.946)
pt3dadd(132.733, 116.457, 11.725, 0.98)
pt3dadd(132.792, 116.519, 11.654, 1.016)
pt3dadd(132.85, 116.581, 11.584, 1.05)
pt3dadd(132.907, 116.643, 11.513, 1.084)
pt3dadd(132.966, 116.704, 11.442, 1.118)
pt3dadd(133.024, 116.766, 11.371, 1.152)
pt3dadd(133.082, 116.828, 11.301, 1.188)
pt3dadd(133.14, 116.89, 11.23, 1.222)
pt3dadd(133.198, 116.952, 11.159, 1.256)
pt3dadd(133.259, 117.016, 11.092, 1.26)
pt3dadd(133.321, 117.082, 11.027, 1.254)
pt3dadd(133.384, 117.148, 10.961, 1.248)
pt3dadd(133.446, 117.213, 10.895, 1.24)
pt3dadd(133.508, 117.279, 10.829, 1.234)
pt3dadd(133.571, 117.345, 10.764, 1.228)
pt3dadd(133.632, 117.411, 10.698, 1.222)
pt3dadd(133.694, 117.476, 10.632, 1.216)
pt3dadd(133.757, 117.542, 10.566, 1.21)
pt3dadd(133.819, 117.608, 10.501, 1.204)
pt3dadd(133.876, 117.687, 10.443, 1.166)
pt3dadd(133.932, 117.77, 10.387, 1.124)
pt3dadd(133.987, 117.852, 10.331, 1.08)
pt3dadd(134.044, 117.934, 10.275, 1.038)
pt3dadd(134.099, 118.016, 10.219, 0.996)
pt3dadd(134.155, 118.098, 10.163, 0.952)
pt3dadd(134.212, 118.18, 10.107, 0.91)
pt3dadd(134.267, 118.262, 10.05, 0.866)
pt3dadd(134.323, 118.344, 9.994, 0.824)
pt3dadd(134.378, 118.426, 9.938, 0.782)
pt3dadd(134.46, 118.484, 9.882, 0.736)
pt3dadd(134.54, 118.541, 9.825, 0.69)
pt3dadd(134.621, 118.599, 9.769, 0.646)
pt3dadd(134.701, 118.657, 9.712, 0.6)
pt3dadd(134.782, 118.715, 9.656, 0.556)
pt3dadd(134.862, 118.772, 9.6, 0.51)
pt3dadd(134.942, 118.83, 9.543, 0.464)
pt3dadd(135.023, 118.888, 9.487, 0.42)
pt3dadd(135.103, 118.945, 9.43, 0.374)
pt3dadd(135.187, 119.003, 9.378, 0.34)
pt3dadd(135.286, 119.058, 9.344, 0.356)
pt3dadd(135.384, 119.114, 9.311, 0.372)
pt3dadd(135.482, 119.169, 9.277, 0.39)
pt3dadd(135.581, 119.225, 9.244, 0.406)
pt3dadd(135.68, 119.281, 9.211, 0.422)
pt3dadd(135.779, 119.336, 9.177, 0.438)
pt3dadd(135.877, 119.392, 9.144, 0.454)
pt3dadd(135.976, 119.447, 9.11, 0.47)
pt3dadd(136.074, 119.503, 9.077, 0.488)
pt3dadd(136.176, 119.554, 9.048, 0.504)
pt3dadd(136.286, 119.596, 9.029, 0.522)
pt3dadd(136.397, 119.638, 9.011, 0.54)
pt3dadd(136.507, 119.68, 8.992, 0.558)
pt3dadd(136.616, 119.721, 8.974, 0.576)
pt3dadd(136.727, 119.763, 8.955, 0.596)
pt3dadd(136.837, 119.805, 8.936, 0.614)
pt3dadd(136.948, 119.847, 8.918, 0.632)
pt3dadd(137.058, 119.888, 8.899, 0.65)
pt3dadd(137.168, 119.93, 8.88, 0.668)
pt3dadd(137.281, 119.963, 8.866, 0.684)
pt3dadd(137.4, 119.982, 8.856, 0.696)
pt3dadd(137.518, 120.002, 8.846, 0.708)
pt3dadd(137.635, 120.022, 8.836, 0.722)
pt3dadd(137.753, 120.041, 8.826, 0.734)
pt3dadd(137.87, 120.061, 8.816, 0.748)
pt3dadd(137.988, 120.08, 8.806, 0.76)
pt3dadd(138.106, 120.101, 8.797, 0.772)
pt3dadd(138.224, 120.12, 8.787, 0.786)
pt3dadd(138.342, 120.139, 8.777, 0.798)
pt3dadd(138.461, 120.151, 8.769, 0.816)
pt3dadd(138.581, 120.154, 8.765, 0.842)
pt3dadd(138.7, 120.155, 8.76, 0.866)
pt3dadd(138.82, 120.157, 8.755, 0.892)
pt3dadd(138.94, 120.16, 8.75, 0.916)
pt3dadd(139.06, 120.162, 8.746, 0.942)
pt3dadd(139.18, 120.164, 8.741, 0.966)
pt3dadd(139.3, 120.166, 8.736, 0.992)
pt3dadd(139.42, 120.168, 8.732, 1.016)
pt3dadd(139.54, 120.17, 8.727, 1.042)
pt3dadd(139.658, 120.163, 8.72, 1.036)
pt3dadd(139.776, 120.146, 8.71, 1)
pt3dadd(139.895, 120.13, 8.7, 0.966)
pt3dadd(140.012, 120.112, 8.69, 0.93)
pt3dadd(140.131, 120.095, 8.68, 0.894)
pt3dadd(140.249, 120.078, 8.67, 0.858)
pt3dadd(140.368, 120.06, 8.66, 0.822)
pt3dadd(140.485, 120.043, 8.65, 0.786)
pt3dadd(140.604, 120.026, 8.64, 0.75)
pt3dadd(140.722, 120.01, 8.63, 0.714)
pt3dadd(140.834, 119.976, 8.616, 0.708)
pt3dadd(140.942, 119.927, 8.601, 0.728)
pt3dadd(141.052, 119.879, 8.585, 0.748)
pt3dadd(141.16, 119.831, 8.569, 0.77)
pt3dadd(141.268, 119.783, 8.554, 0.79)
pt3dadd(141.376, 119.735, 8.538, 0.81)
pt3dadd(141.484, 119.686, 8.522, 0.83)
pt3dadd(141.593, 119.638, 8.506, 0.85)
pt3dadd(141.701, 119.59, 8.491, 0.872)
pt3dadd(141.809, 119.542, 8.475, 0.892)
pt3dadd(141.906, 119.503, 8.434, 0.926)
pt3dadd(141.995, 119.474, 8.371, 0.972)
pt3dadd(142.082, 119.445, 8.307, 1.016)
pt3dadd(142.171, 119.416, 8.244, 1.062)
pt3dadd(142.259, 119.386, 8.181, 1.108)
pt3dadd(142.348, 119.357, 8.118, 1.154)
pt3dadd(142.435, 119.328, 8.054, 1.2)
pt3dadd(142.524, 119.299, 7.991, 1.246)
pt3dadd(142.612, 119.269, 7.928, 1.292)
pt3dadd(142.7, 119.24, 7.864, 1.338)
pt3dadd(142.793, 119.234, 7.804, 1.356)
pt3dadd(142.889, 119.242, 7.744, 1.356)
pt3dadd(142.986, 119.251, 7.685, 1.356)
pt3dadd(143.082, 119.26, 7.626, 1.356)
pt3dadd(143.178, 119.268, 7.567, 1.356)
pt3dadd(143.274, 119.277, 7.507, 1.356)
pt3dadd(143.371, 119.286, 7.448, 1.356)
pt3dadd(143.467, 119.294, 7.389, 1.356)
pt3dadd(143.563, 119.303, 7.33, 1.356)
pt3dadd(143.66, 119.312, 7.271, 1.356)
}
}
proc shape3d_28() {
dend_7[9] { pt3dadd(143.744, 119.353, 7.21, 1.35)
pt3dadd(143.826, 119.403, 7.15, 1.34)
pt3dadd(143.906, 119.453, 7.089, 1.332)
pt3dadd(143.988, 119.503, 7.028, 1.324)
pt3dadd(144.068, 119.553, 6.967, 1.316)
pt3dadd(144.15, 119.603, 6.907, 1.308)
pt3dadd(144.232, 119.653, 6.846, 1.298)
pt3dadd(144.312, 119.703, 6.785, 1.29)
pt3dadd(144.394, 119.753, 6.725, 1.282)
pt3dadd(144.475, 119.806, 6.667, 1.272)
pt3dadd(144.56, 119.881, 6.635, 1.258)
pt3dadd(144.646, 119.956, 6.602, 1.244)
pt3dadd(144.731, 120.03, 6.57, 1.23)
pt3dadd(144.817, 120.106, 6.538, 1.214)
pt3dadd(144.902, 120.18, 6.506, 1.2)
pt3dadd(144.988, 120.256, 6.474, 1.186)
pt3dadd(145.073, 120.33, 6.441, 1.172)
pt3dadd(145.158, 120.406, 6.409, 1.158)
pt3dadd(145.243, 120.48, 6.377, 1.142)
pt3dadd(145.328, 120.556, 6.346, 1.13)
pt3dadd(145.411, 120.637, 6.321, 1.13)
pt3dadd(145.494, 120.72, 6.296, 1.128)
pt3dadd(145.577, 120.802, 6.271, 1.128)
pt3dadd(145.658, 120.883, 6.246, 1.128)
pt3dadd(145.741, 120.965, 6.221, 1.126)
pt3dadd(145.824, 121.048, 6.196, 1.126)
pt3dadd(145.906, 121.129, 6.172, 1.126)
pt3dadd(145.988, 121.211, 6.147, 1.124)
pt3dadd(146.071, 121.292, 6.122, 1.124)
pt3dadd(146.153, 121.373, 6.093, 1.12)
pt3dadd(146.225, 121.444, 6.039, 1.098)
pt3dadd(146.297, 121.514, 5.985, 1.076)
pt3dadd(146.369, 121.585, 5.931, 1.054)
pt3dadd(146.441, 121.656, 5.877, 1.032)
pt3dadd(146.513, 121.727, 5.824, 1.01)
pt3dadd(146.586, 121.798, 5.77, 0.988)
pt3dadd(146.658, 121.868, 5.716, 0.968)
pt3dadd(146.73, 121.939, 5.662, 0.946)
pt3dadd(146.802, 122.01, 5.608, 0.924)
pt3dadd(146.875, 122.082, 5.556, 0.904)
pt3dadd(146.954, 122.159, 5.518, 0.904)
pt3dadd(147.035, 122.236, 5.479, 0.904)
pt3dadd(147.114, 122.312, 5.44, 0.904)
pt3dadd(147.194, 122.389, 5.402, 0.904)
pt3dadd(147.274, 122.466, 5.363, 0.904)
pt3dadd(147.354, 122.543, 5.325, 0.904)
pt3dadd(147.433, 122.62, 5.286, 0.904)
pt3dadd(147.512, 122.696, 5.247, 0.904)
pt3dadd(147.593, 122.773, 5.209, 0.904)
pt3dadd(147.671, 122.849, 5.167, 0.904)
pt3dadd(147.743, 122.914, 5.108, 0.904)
pt3dadd(147.814, 122.978, 5.048, 0.904)
pt3dadd(147.884, 123.043, 4.988, 0.904)
pt3dadd(147.955, 123.108, 4.929, 0.904)
pt3dadd(148.027, 123.173, 4.869, 0.904)
pt3dadd(148.098, 123.238, 4.809, 0.904)
pt3dadd(148.169, 123.302, 4.75, 0.904)
pt3dadd(148.241, 123.367, 4.69, 0.904)
pt3dadd(148.312, 123.432, 4.63, 0.904)
pt3dadd(148.386, 123.499, 4.576, 0.91)
pt3dadd(148.472, 123.574, 4.545, 0.944)
pt3dadd(148.559, 123.647, 4.513, 0.976)
pt3dadd(148.645, 123.721, 4.482, 1.01)
pt3dadd(148.732, 123.796, 4.451, 1.042)
pt3dadd(148.818, 123.87, 4.419, 1.076)
pt3dadd(148.904, 123.944, 4.388, 1.11)
pt3dadd(148.991, 124.018, 4.356, 1.142)
pt3dadd(149.077, 124.092, 4.325, 1.176)
pt3dadd(149.164, 124.166, 4.294, 1.21)
pt3dadd(149.252, 124.24, 4.266, 1.234)
pt3dadd(149.345, 124.313, 4.246, 1.234)
pt3dadd(149.437, 124.386, 4.226, 1.236)
pt3dadd(149.53, 124.459, 4.207, 1.236)
pt3dadd(149.622, 124.531, 4.187, 1.236)
pt3dadd(149.714, 124.604, 4.168, 1.238)
pt3dadd(149.807, 124.678, 4.148, 1.238)
pt3dadd(149.899, 124.75, 4.128, 1.24)
pt3dadd(149.992, 124.823, 4.109, 1.24)
pt3dadd(150.084, 124.896, 4.089, 1.242)
pt3dadd(150.179, 124.966, 4.071, 1.234)
pt3dadd(150.278, 125.029, 4.057, 1.204)
pt3dadd(150.379, 125.094, 4.043, 1.174)
pt3dadd(150.479, 125.158, 4.028, 1.146)
pt3dadd(150.58, 125.221, 4.014, 1.116)
pt3dadd(150.679, 125.285, 3.999, 1.086)
pt3dadd(150.78, 125.348, 3.985, 1.058)
pt3dadd(150.88, 125.412, 3.971, 1.028)
pt3dadd(150.98, 125.477, 3.957, 0.998)
pt3dadd(151.08, 125.54, 3.942, 0.97)
pt3dadd(151.184, 125.598, 3.929, 0.934)
pt3dadd(151.294, 125.644, 3.917, 0.888)
pt3dadd(151.404, 125.689, 3.905, 0.842)
pt3dadd(151.514, 125.735, 3.892, 0.796)
pt3dadd(151.624, 125.78, 3.88, 0.75)
pt3dadd(151.734, 125.826, 3.868, 0.704)
pt3dadd(151.844, 125.872, 3.856, 0.658)
pt3dadd(151.954, 125.917, 3.844, 0.612)
pt3dadd(152.064, 125.963, 3.832, 0.564)
pt3dadd(152.174, 126.01, 3.82, 0.518)
pt3dadd(152.284, 126.047, 3.798, 0.518)
pt3dadd(152.393, 126.072, 3.762, 0.588)
pt3dadd(152.502, 126.096, 3.726, 0.656)
pt3dadd(152.61, 126.121, 3.689, 0.726)
pt3dadd(152.719, 126.145, 3.653, 0.796)
pt3dadd(152.828, 126.17, 3.616, 0.866)
pt3dadd(152.938, 126.196, 3.58, 0.936)
pt3dadd(153.047, 126.22, 3.543, 1.006)
pt3dadd(153.155, 126.245, 3.507, 1.076)
pt3dadd(153.264, 126.269, 3.471, 1.146)
pt3dadd(153.373, 126.3, 3.438, 1.18)
pt3dadd(153.482, 126.338, 3.412, 1.156)
pt3dadd(153.592, 126.377, 3.386, 1.134)
pt3dadd(153.701, 126.416, 3.361, 1.11)
pt3dadd(153.81, 126.455, 3.335, 1.088)
pt3dadd(153.919, 126.494, 3.309, 1.064)
pt3dadd(154.028, 126.533, 3.283, 1.042)
pt3dadd(154.138, 126.571, 3.257, 1.018)
pt3dadd(154.247, 126.611, 3.231, 0.996)
pt3dadd(154.356, 126.649, 3.205, 0.972)
pt3dadd(154.466, 126.688, 3.183, 0.94)
pt3dadd(154.579, 126.724, 3.166, 0.894)
pt3dadd(154.692, 126.76, 3.149, 0.848)
pt3dadd(154.805, 126.796, 3.132, 0.804)
pt3dadd(154.918, 126.832, 3.115, 0.758)
pt3dadd(155.029, 126.868, 3.097, 0.712)
pt3dadd(155.142, 126.904, 3.08, 0.666)
pt3dadd(155.255, 126.941, 3.063, 0.622)
pt3dadd(155.368, 126.977, 3.046, 0.576)
pt3dadd(155.48, 127.013, 3.029, 0.53)
pt3dadd(155.594, 127.043, 3.016, 0.494)
pt3dadd(155.712, 127.067, 3.007, 0.472)
pt3dadd(155.828, 127.091, 2.999, 0.448)
pt3dadd(155.946, 127.115, 2.991, 0.426)
pt3dadd(156.064, 127.139, 2.983, 0.402)
pt3dadd(156.18, 127.163, 2.974, 0.378)
pt3dadd(156.298, 127.187, 2.966, 0.356)
pt3dadd(156.415, 127.211, 2.958, 0.332)
pt3dadd(156.532, 127.235, 2.95, 0.308)
pt3dadd(156.649, 127.259, 2.941, 0.286)
pt3dadd(156.767, 127.276, 2.937, 0.284)
pt3dadd(156.887, 127.286, 2.937, 0.302)
pt3dadd(157.007, 127.296, 2.936, 0.322)
pt3dadd(157.126, 127.307, 2.936, 0.342)
pt3dadd(157.246, 127.318, 2.936, 0.36)
pt3dadd(157.366, 127.327, 2.935, 0.38)
pt3dadd(157.484, 127.338, 2.935, 0.398)
pt3dadd(157.604, 127.348, 2.935, 0.418)
pt3dadd(157.723, 127.358, 2.935, 0.438)
pt3dadd(157.843, 127.369, 2.934, 0.456)
pt3dadd(157.963, 127.372, 2.934, 0.476)
pt3dadd(158.083, 127.368, 2.933, 0.496)
pt3dadd(158.203, 127.364, 2.933, 0.514)
pt3dadd(158.323, 127.361, 2.932, 0.534)
pt3dadd(158.443, 127.357, 2.932, 0.554)
pt3dadd(158.563, 127.352, 2.931, 0.572)
pt3dadd(158.683, 127.349, 2.93, 0.592)
pt3dadd(158.803, 127.345, 2.93, 0.612)
pt3dadd(158.922, 127.342, 2.929, 0.63)
pt3dadd(159.042, 127.338, 2.929, 0.65)
pt3dadd(159.162, 127.331, 2.928, 0.66)
pt3dadd(159.282, 127.322, 2.927, 0.662)
pt3dadd(159.402, 127.314, 2.925, 0.664)
pt3dadd(159.521, 127.304, 2.924, 0.666)
pt3dadd(159.641, 127.296, 2.923, 0.668)
pt3dadd(159.761, 127.286, 2.922, 0.67)
pt3dadd(159.881, 127.278, 2.92, 0.672)
pt3dadd(160, 127.27, 2.919, 0.674)
pt3dadd(160.12, 127.26, 2.918, 0.676)
pt3dadd(160.24, 127.252, 2.917, 0.678)
pt3dadd(160.358, 127.24, 2.915, 0.67)
pt3dadd(160.477, 127.225, 2.913, 0.656)
pt3dadd(160.597, 127.211, 2.91, 0.64)
pt3dadd(160.716, 127.195, 2.908, 0.626)
pt3dadd(160.835, 127.181, 2.906, 0.61)
pt3dadd(160.954, 127.166, 2.903, 0.596)
pt3dadd(161.074, 127.152, 2.901, 0.582)
pt3dadd(161.192, 127.138, 2.899, 0.566)
pt3dadd(161.311, 127.122, 2.896, 0.552)
pt3dadd(161.43, 127.108, 2.894, 0.536)
pt3dadd(161.546, 127.081, 2.89, 0.524)
pt3dadd(161.66, 127.043, 2.885, 0.518)
pt3dadd(161.773, 127.004, 2.88, 0.51)
pt3dadd(161.887, 126.966, 2.875, 0.502)
pt3dadd(162.001, 126.928, 2.87, 0.494)
pt3dadd(162.114, 126.889, 2.865, 0.486)
pt3dadd(162.228, 126.851, 2.86, 0.478)
pt3dadd(162.341, 126.812, 2.855, 0.47)
pt3dadd(162.455, 126.774, 2.85, 0.462)
pt3dadd(162.569, 126.736, 2.845, 0.454)
pt3dadd(162.679, 126.691, 2.838, 0.47)
pt3dadd(162.788, 126.643, 2.829, 0.498)
pt3dadd(162.898, 126.595, 2.821, 0.528)
pt3dadd(163.008, 126.546, 2.812, 0.556)
pt3dadd(163.117, 126.498, 2.803, 0.584)
pt3dadd(163.226, 126.45, 2.795, 0.612)
pt3dadd(163.336, 126.402, 2.786, 0.642)
pt3dadd(163.445, 126.353, 2.777, 0.67)
pt3dadd(163.554, 126.305, 2.768, 0.698)
pt3dadd(163.663, 126.257, 2.76, 0.728)
pt3dadd(163.77, 126.211, 2.737, 0.764)
}
}
proc shape3d_29() {
dend_7[9] { pt3dadd(163.876, 126.166, 2.707, 0.804)
pt3dadd(163.98, 126.121, 2.676, 0.844)
pt3dadd(164.086, 126.077, 2.645, 0.884)
pt3dadd(164.19, 126.031, 2.614, 0.926)
pt3dadd(164.296, 125.987, 2.584, 0.966)
pt3dadd(164.4, 125.942, 2.553, 1.006)
pt3dadd(164.506, 125.897, 2.522, 1.046)
pt3dadd(164.611, 125.852, 2.491, 1.086)
pt3dadd(164.716, 125.808, 2.461, 1.126)
pt3dadd(164.798, 125.737, 2.42, 1.13)
pt3dadd(164.88, 125.664, 2.379, 1.13)
pt3dadd(164.962, 125.592, 2.337, 1.13)
pt3dadd(165.043, 125.519, 2.296, 1.13)
pt3dadd(165.125, 125.446, 2.254, 1.13)
pt3dadd(165.206, 125.372, 2.213, 1.13)
pt3dadd(165.287, 125.3, 2.172, 1.13)
pt3dadd(165.368, 125.227, 2.13, 1.13)
pt3dadd(165.45, 125.154, 2.089, 1.13)
pt3dadd(165.536, 125.086, 2.056, 1.114)
pt3dadd(165.647, 125.039, 2.06, 1.022)
pt3dadd(165.757, 124.992, 2.065, 0.93)
pt3dadd(165.868, 124.945, 2.07, 0.838)
pt3dadd(165.977, 124.898, 2.075, 0.746)
pt3dadd(166.087, 124.85, 2.08, 0.654)
pt3dadd(166.198, 124.804, 2.085, 0.56)
pt3dadd(166.308, 124.757, 2.09, 0.468)
pt3dadd(166.418, 124.71, 2.095, 0.376)
pt3dadd(166.529, 124.663, 2.1, 0.284)
pt3dadd(166.638, 124.625, 2.117, 0.226)
pt3dadd(166.745, 124.602, 2.158, 0.226)
pt3dadd(166.853, 124.579, 2.198, 0.226)
pt3dadd(166.96, 124.555, 2.239, 0.226)
pt3dadd(167.068, 124.532, 2.279, 0.226)
pt3dadd(167.174, 124.51, 2.319, 0.226)
pt3dadd(167.282, 124.487, 2.359, 0.226)
pt3dadd(167.389, 124.464, 2.4, 0.226)
pt3dadd(167.497, 124.44, 2.44, 0.226)
pt3dadd(167.604, 124.417, 2.48, 0.226)
pt3dadd(167.714, 124.397, 2.515, 0.24)
pt3dadd(167.83, 124.381, 2.539, 0.274)
pt3dadd(167.945, 124.366, 2.563, 0.31)
pt3dadd(168.06, 124.35, 2.588, 0.346)
pt3dadd(168.175, 124.333, 2.612, 0.382)
pt3dadd(168.292, 124.318, 2.636, 0.418)
pt3dadd(168.407, 124.302, 2.661, 0.454)
pt3dadd(168.522, 124.286, 2.685, 0.49)
pt3dadd(168.637, 124.27, 2.709, 0.526)
pt3dadd(168.752, 124.254, 2.734, 0.562)
pt3dadd(168.866, 124.229, 2.754, 0.588)
pt3dadd(168.978, 124.189, 2.768, 0.598)
pt3dadd(169.091, 124.15, 2.781, 0.606)
pt3dadd(169.202, 124.109, 2.795, 0.616)
pt3dadd(169.314, 124.069, 2.808, 0.626)
pt3dadd(169.426, 124.03, 2.822, 0.634)
pt3dadd(169.538, 123.989, 2.836, 0.644)
pt3dadd(169.65, 123.949, 2.85, 0.654)
pt3dadd(169.762, 123.908, 2.863, 0.664)
pt3dadd(169.873, 123.869, 2.877, 0.672)
pt3dadd(169.986, 123.827, 2.887, 0.67)
pt3dadd(170.096, 123.784, 2.892, 0.654)
pt3dadd(170.208, 123.739, 2.898, 0.638)
pt3dadd(170.32, 123.696, 2.903, 0.62)
pt3dadd(170.431, 123.652, 2.908, 0.604)
pt3dadd(170.543, 123.608, 2.914, 0.588)
pt3dadd(170.654, 123.564, 2.919, 0.57)
pt3dadd(170.766, 123.521, 2.925, 0.554)
pt3dadd(170.878, 123.476, 2.93, 0.538)
pt3dadd(170.989, 123.433, 2.936, 0.52)
pt3dadd(171.102, 123.392, 2.938, 0.498)
pt3dadd(171.216, 123.355, 2.938, 0.47)
pt3dadd(171.33, 123.318, 2.938, 0.442)
pt3dadd(171.444, 123.282, 2.938, 0.412)
pt3dadd(171.559, 123.245, 2.938, 0.384)
pt3dadd(171.673, 123.208, 2.938, 0.356)
pt3dadd(171.787, 123.17, 2.937, 0.326)
pt3dadd(171.901, 123.133, 2.937, 0.298)
pt3dadd(172.015, 123.097, 2.937, 0.27)
pt3dadd(172.129, 123.06, 2.937, 0.24)
pt3dadd(172.244, 123.025, 2.937, 0.226)
pt3dadd(172.36, 122.994, 2.936, 0.226)
pt3dadd(172.476, 122.962, 2.936, 0.226)
pt3dadd(172.591, 122.93, 2.936, 0.226)
pt3dadd(172.708, 122.899, 2.935, 0.226)
pt3dadd(172.823, 122.867, 2.935, 0.226)
pt3dadd(172.939, 122.836, 2.935, 0.226)
pt3dadd(173.054, 122.803, 2.935, 0.226)
pt3dadd(173.171, 122.772, 2.934, 0.226)
pt3dadd(173.286, 122.741, 2.934, 0.226)
pt3dadd(173.398, 122.698, 2.934, 0.242)
pt3dadd(173.504, 122.644, 2.933, 0.276)
pt3dadd(173.612, 122.59, 2.933, 0.31)
pt3dadd(173.719, 122.537, 2.932, 0.346)
pt3dadd(173.826, 122.483, 2.931, 0.38)
pt3dadd(173.934, 122.429, 2.931, 0.414)
pt3dadd(174.041, 122.375, 2.93, 0.448)
pt3dadd(174.149, 122.321, 2.93, 0.482)
pt3dadd(174.256, 122.267, 2.929, 0.516)
pt3dadd(174.362, 122.213, 2.929, 0.55)
pt3dadd(174.47, 122.16, 2.928, 0.574)
pt3dadd(174.58, 122.11, 2.927, 0.584)
pt3dadd(174.689, 122.059, 2.926, 0.596)
pt3dadd(174.797, 122.009, 2.925, 0.606)
pt3dadd(174.906, 121.958, 2.924, 0.618)
pt3dadd(175.015, 121.908, 2.923, 0.628)
pt3dadd(175.123, 121.858, 2.921, 0.64)
pt3dadd(175.232, 121.807, 2.92, 0.65)
pt3dadd(175.342, 121.757, 2.919, 0.662)
pt3dadd(175.451, 121.706, 2.918, 0.672)
pt3dadd(175.558, 121.652, 2.917, 0.678)
pt3dadd(175.664, 121.597, 2.915, 0.678)
pt3dadd(175.77, 121.542, 2.913, 0.678)
pt3dadd(175.877, 121.486, 2.912, 0.678)
pt3dadd(175.984, 121.43, 2.91, 0.678)
pt3dadd(176.089, 121.375, 2.908, 0.678)
pt3dadd(176.196, 121.319, 2.906, 0.678)
pt3dadd(176.302, 121.264, 2.905, 0.678)
pt3dadd(176.408, 121.208, 2.903, 0.678)
pt3dadd(176.514, 121.152, 2.901, 0.678)
pt3dadd(176.618, 121.092, 2.899, 0.678)
pt3dadd(176.718, 121.026, 2.897, 0.678)
pt3dadd(176.819, 120.96, 2.894, 0.678)
pt3dadd(176.92, 120.894, 2.892, 0.678)
pt3dadd(177.019, 120.829, 2.89, 0.678)
pt3dadd(177.12, 120.763, 2.887, 0.678)
pt3dadd(177.221, 120.697, 2.885, 0.678)
pt3dadd(177.32, 120.632, 2.882, 0.678)
pt3dadd(177.421, 120.566, 2.88, 0.678)
pt3dadd(177.522, 120.5, 2.878, 0.678)
pt3dadd(177.62, 120.433, 2.873, 0.686)
pt3dadd(177.719, 120.365, 2.867, 0.702)
pt3dadd(177.817, 120.295, 2.862, 0.718)
pt3dadd(177.914, 120.227, 2.856, 0.734)
pt3dadd(178.013, 120.158, 2.85, 0.75)
pt3dadd(178.111, 120.089, 2.844, 0.766)
pt3dadd(178.208, 120.02, 2.838, 0.782)
pt3dadd(178.307, 119.951, 2.832, 0.798)
pt3dadd(178.405, 119.883, 2.827, 0.814)
pt3dadd(178.504, 119.814, 2.821, 0.83)
pt3dadd(178.604, 119.75, 2.813, 0.84)
pt3dadd(178.708, 119.691, 2.805, 0.848)
pt3dadd(178.812, 119.632, 2.796, 0.854)
pt3dadd(178.916, 119.573, 2.787, 0.86)
pt3dadd(179.02, 119.514, 2.779, 0.868)
pt3dadd(179.124, 119.455, 2.77, 0.874)
pt3dadd(179.228, 119.396, 2.761, 0.88)
pt3dadd(179.332, 119.337, 2.752, 0.888)
pt3dadd(179.436, 119.278, 2.744, 0.894)
pt3dadd(179.54, 119.22, 2.735, 0.902)
pt3dadd(179.646, 119.167, 2.72, 0.904)
pt3dadd(179.754, 119.121, 2.701, 0.904)
pt3dadd(179.863, 119.074, 2.682, 0.904)
pt3dadd(179.971, 119.027, 2.663, 0.904)
pt3dadd(180.079, 118.98, 2.643, 0.904)
pt3dadd(180.187, 118.934, 2.624, 0.904)
pt3dadd(180.295, 118.887, 2.605, 0.904)
pt3dadd(180.403, 118.84, 2.586, 0.904)
pt3dadd(180.511, 118.793, 2.566, 0.904)
pt3dadd(180.619, 118.746, 2.547, 0.904)
pt3dadd(180.725, 118.706, 2.516, 0.904)
pt3dadd(180.83, 118.67, 2.479, 0.904)
pt3dadd(180.936, 118.633, 2.442, 0.904)
pt3dadd(181.042, 118.596, 2.405, 0.904)
pt3dadd(181.146, 118.56, 2.368, 0.904)
pt3dadd(181.252, 118.523, 2.331, 0.904)
pt3dadd(181.357, 118.486, 2.294, 0.904)
pt3dadd(181.462, 118.449, 2.257, 0.904)
pt3dadd(181.567, 118.413, 2.22, 0.904)
pt3dadd(181.673, 118.376, 2.183, 0.904)
pt3dadd(181.774, 118.323, 2.155, 0.904)
pt3dadd(181.873, 118.262, 2.132, 0.904)
pt3dadd(181.973, 118.201, 2.109, 0.904)
pt3dadd(182.072, 118.14, 2.086, 0.904)
pt3dadd(182.172, 118.079, 2.063, 0.904)
pt3dadd(182.272, 118.017, 2.039, 0.904)
pt3dadd(182.371, 117.956, 2.016, 0.904)
pt3dadd(182.471, 117.895, 1.993, 0.904)
pt3dadd(182.57, 117.834, 1.97, 0.904)
pt3dadd(182.669, 117.773, 1.947, 0.904)
pt3dadd(182.758, 117.696, 1.93, 0.892)
pt3dadd(182.839, 117.61, 1.915, 0.876)
pt3dadd(182.922, 117.525, 1.901, 0.858)
pt3dadd(183.005, 117.439, 1.887, 0.842)
pt3dadd(183.088, 117.354, 1.873, 0.824)
pt3dadd(183.169, 117.268, 1.858, 0.808)
pt3dadd(183.252, 117.183, 1.844, 0.792)
pt3dadd(183.335, 117.097, 1.83, 0.774)
pt3dadd(183.416, 117.012, 1.816, 0.758)
pt3dadd(183.499, 116.926, 1.801, 0.74)
pt3dadd(183.592, 116.851, 1.795, 0.708)
pt3dadd(183.688, 116.778, 1.792, 0.67)
pt3dadd(183.784, 116.706, 1.789, 0.634)
pt3dadd(183.878, 116.634, 1.785, 0.596)
pt3dadd(183.974, 116.562, 1.782, 0.56)
pt3dadd(184.07, 116.489, 1.778, 0.522)
pt3dadd(184.166, 116.417, 1.775, 0.486)
pt3dadd(184.261, 116.345, 1.772, 0.448)
pt3dadd(184.357, 116.272, 1.768, 0.41)
pt3dadd(184.453, 116.2, 1.765, 0.374)
pt3dadd(184.56, 116.147, 1.764, 0.368)
pt3dadd(184.669, 116.097, 1.764, 0.368)
}
}
proc shape3d_30() {
dend_7[9] { pt3dadd(184.778, 116.047, 1.764, 0.366)
pt3dadd(184.888, 115.997, 1.764, 0.366)
pt3dadd(184.997, 115.947, 1.764, 0.364)
pt3dadd(185.106, 115.897, 1.764, 0.364)
pt3dadd(185.215, 115.848, 1.764, 0.364)
pt3dadd(185.324, 115.798, 1.764, 0.362)
pt3dadd(185.434, 115.748, 1.764, 0.362)
pt3dadd(185.543, 115.698, 1.764, 0.362)
pt3dadd(185.65, 115.644, 1.764, 0.362)
pt3dadd(185.756, 115.59, 1.764, 0.362)
pt3dadd(185.864, 115.536, 1.764, 0.362)
pt3dadd(185.971, 115.482, 1.764, 0.362)
pt3dadd(186.078, 115.428, 1.764, 0.362)
pt3dadd(186.186, 115.374, 1.764, 0.362)
pt3dadd(186.293, 115.32, 1.764, 0.362)
pt3dadd(186.4, 115.266, 1.764, 0.362)
pt3dadd(186.508, 115.212, 1.764, 0.362)
pt3dadd(186.614, 115.158, 1.764, 0.362)
pt3dadd(186.715, 115.093, 1.764, 0.348)
pt3dadd(186.816, 115.028, 1.764, 0.336)
pt3dadd(186.917, 114.963, 1.764, 0.322)
pt3dadd(187.018, 114.898, 1.764, 0.308)
pt3dadd(187.118, 114.833, 1.764, 0.294)
pt3dadd(187.219, 114.768, 1.764, 0.28)
pt3dadd(187.32, 114.703, 1.764, 0.268)
pt3dadd(187.421, 114.638, 1.764, 0.254)
pt3dadd(187.522, 114.573, 1.764, 0.24)
pt3dadd(187.622, 114.507, 1.764, 0.226)
pt3dadd(187.716, 114.432, 1.764, 0.226)
pt3dadd(187.808, 114.356, 1.764, 0.226)
pt3dadd(187.902, 114.28, 1.764, 0.226)
pt3dadd(187.994, 114.204, 1.764, 0.226)
pt3dadd(188.087, 114.128, 1.764, 0.226)
pt3dadd(188.18, 114.052, 1.764, 0.226)
pt3dadd(188.273, 113.976, 1.764, 0.226)
pt3dadd(188.366, 113.9, 1.764, 0.226)
pt3dadd(188.459, 113.824, 1.764, 0.226)
pt3dadd(188.551, 113.748, 1.764, 0.226)
pt3dadd(188.642, 113.67, 1.764, 0.226)
pt3dadd(188.734, 113.592, 1.764, 0.226)
pt3dadd(188.825, 113.513, 1.764, 0.226)
pt3dadd(188.916, 113.435, 1.764, 0.226)
pt3dadd(189.006, 113.357, 1.764, 0.226)
pt3dadd(189.097, 113.278, 1.764, 0.226)
pt3dadd(189.188, 113.2, 1.764, 0.226)
pt3dadd(189.28, 113.122, 1.764, 0.226)
pt3dadd(189.37, 113.043, 1.764, 0.226)
pt3dadd(189.461, 112.965, 1.764, 0.226)
pt3dadd(189.552, 112.887, 1.764, 0.228)
pt3dadd(189.643, 112.809, 1.764, 0.23)
pt3dadd(189.736, 112.732, 1.764, 0.23)
pt3dadd(189.827, 112.654, 1.764, 0.232)
pt3dadd(189.918, 112.576, 1.764, 0.234)
pt3dadd(190.009, 112.498, 1.764, 0.236)
pt3dadd(190.1, 112.42, 1.764, 0.236)
pt3dadd(190.192, 112.343, 1.764, 0.238)
pt3dadd(190.283, 112.265, 1.764, 0.24)
pt3dadd(190.375, 112.187, 1.764, 0.242)
pt3dadd(190.477, 112.125, 1.764, 0.258)
pt3dadd(190.58, 112.064, 1.764, 0.274)
pt3dadd(190.684, 112.002, 1.764, 0.292)
pt3dadd(190.787, 111.941, 1.764, 0.308)
pt3dadd(190.89, 111.88, 1.764, 0.324)
pt3dadd(190.993, 111.818, 1.764, 0.342)
pt3dadd(191.096, 111.757, 1.764, 0.358)
pt3dadd(191.2, 111.695, 1.764, 0.374)
pt3dadd(191.302, 111.634, 1.764, 0.392)
pt3dadd(191.405, 111.572, 1.764, 0.408)
pt3dadd(191.503, 111.503, 1.764, 0.412)
pt3dadd(191.602, 111.434, 1.764, 0.418)
pt3dadd(191.699, 111.365, 1.764, 0.422)
pt3dadd(191.797, 111.295, 1.764, 0.426)
pt3dadd(191.896, 111.226, 1.764, 0.43)
pt3dadd(191.993, 111.156, 1.764, 0.434)
pt3dadd(192.091, 111.087, 1.764, 0.438)
pt3dadd(192.188, 111.018, 1.764, 0.444)
pt3dadd(192.287, 110.949, 1.764, 0.448)
pt3dadd(192.385, 110.879, 1.764, 0.452)
pt3dadd(192.479, 110.805, 1.764, 0.452)
pt3dadd(192.574, 110.731, 1.764, 0.452)
pt3dadd(192.667, 110.657, 1.764, 0.452)
pt3dadd(192.762, 110.583, 1.764, 0.452)
pt3dadd(192.857, 110.508, 1.764, 0.452)
pt3dadd(192.95, 110.434, 1.764, 0.452)
pt3dadd(193.045, 110.36, 1.764, 0.452)
pt3dadd(193.139, 110.286, 1.764, 0.452)
pt3dadd(193.234, 110.212, 1.764, 0.452)
pt3dadd(193.328, 110.137, 1.764, 0.452)
pt3dadd(193.418, 110.058, 1.764, 0.452)
pt3dadd(193.508, 109.979, 1.764, 0.452)
pt3dadd(193.598, 109.9, 1.764, 0.452)
pt3dadd(193.69, 109.821, 1.764, 0.452)
pt3dadd(193.78, 109.742, 1.764, 0.452)
pt3dadd(193.87, 109.663, 1.764, 0.452)
pt3dadd(193.96, 109.584, 1.764, 0.452)
pt3dadd(194.05, 109.505, 1.764, 0.452)
pt3dadd(194.141, 109.426, 1.764, 0.452)
pt3dadd(194.231, 109.347, 1.764, 0.452)
pt3dadd(194.316, 109.263, 1.764, 0.442)
pt3dadd(194.402, 109.179, 1.764, 0.432)
pt3dadd(194.488, 109.095, 1.764, 0.42)
pt3dadd(194.573, 109.011, 1.764, 0.41)
pt3dadd(194.659, 108.927, 1.764, 0.4)
pt3dadd(194.744, 108.843, 1.764, 0.39)
pt3dadd(194.831, 108.759, 1.764, 0.38)
pt3dadd(194.916, 108.675, 1.764, 0.37)
pt3dadd(195.001, 108.591, 1.764, 0.358)
pt3dadd(195.088, 108.507, 1.764, 0.348)
pt3dadd(195.173, 108.422, 1.764, 0.336)
pt3dadd(195.257, 108.337, 1.764, 0.324)
pt3dadd(195.342, 108.252, 1.764, 0.312)
pt3dadd(195.427, 108.167, 1.764, 0.3)
pt3dadd(195.511, 108.082, 1.764, 0.288)
pt3dadd(195.596, 107.997, 1.764, 0.274)
pt3dadd(195.682, 107.913, 1.764, 0.262)
pt3dadd(195.767, 107.828, 1.764, 0.25)
pt3dadd(195.851, 107.743, 1.764, 0.238)
pt3dadd(195.936, 107.658, 1.764, 0.226)
}
dend_0[3] {pt3dclear()
pt3dadd(105.606, 131.652, 13.526, 13.334)
pt3dadd(105.606, 131.609, 13.562, 13.286)
pt3dadd(105.606, 131.524, 13.633, 13.19)
pt3dadd(105.606, 131.438, 13.704, 13.096)
pt3dadd(105.606, 131.354, 13.774, 13)
pt3dadd(105.606, 131.269, 13.845, 12.904)
pt3dadd(105.606, 131.184, 13.916, 12.81)
pt3dadd(105.606, 131.099, 13.986, 12.714)
pt3dadd(105.606, 131.015, 14.057, 12.62)
pt3dadd(105.606, 130.93, 14.128, 12.524)
pt3dadd(105.606, 130.844, 14.198, 12.43)
pt3dadd(105.606, 130.759, 14.269, 12.334)
pt3dadd(105.606, 130.675, 14.34, 12.24)
pt3dadd(105.606, 130.59, 14.41, 12.144)
pt3dadd(105.606, 130.505, 14.481, 12.05)
pt3dadd(105.608, 130.42, 14.551, 11.96)
pt3dadd(105.63, 130.326, 14.61, 11.916)
pt3dadd(105.652, 130.232, 14.67, 11.874)
pt3dadd(105.674, 130.139, 14.73, 11.83)
pt3dadd(105.696, 130.045, 14.79, 11.788)
pt3dadd(105.718, 129.952, 14.85, 11.746)
pt3dadd(105.74, 129.858, 14.91, 11.702)
pt3dadd(105.762, 129.764, 14.97, 11.66)
pt3dadd(105.784, 129.671, 15.03, 11.616)
pt3dadd(105.806, 129.577, 15.089, 11.574)
pt3dadd(105.83, 129.484, 15.148, 11.534)
pt3dadd(105.861, 129.386, 15.202, 11.502)
pt3dadd(105.893, 129.29, 15.256, 11.47)
pt3dadd(105.925, 129.194, 15.309, 11.44)
pt3dadd(105.957, 129.098, 15.363, 11.408)
pt3dadd(105.988, 129.002, 15.417, 11.378)
pt3dadd(106.02, 128.906, 15.471, 11.346)
pt3dadd(106.052, 128.81, 15.524, 11.316)
pt3dadd(106.084, 128.714, 15.578, 11.284)
pt3dadd(106.116, 128.618, 15.632, 11.254)
pt3dadd(106.153, 128.522, 15.681, 11.218)
pt3dadd(106.208, 128.424, 15.717, 11.164)
pt3dadd(106.264, 128.327, 15.752, 11.112)
pt3dadd(106.319, 128.23, 15.788, 11.06)
pt3dadd(106.375, 128.131, 15.823, 11.006)
pt3dadd(106.43, 128.034, 15.858, 10.954)
pt3dadd(106.486, 127.937, 15.894, 10.9)
pt3dadd(106.542, 127.84, 15.929, 10.848)
pt3dadd(106.597, 127.741, 15.964, 10.794)
pt3dadd(106.653, 127.644, 16, 10.742)
pt3dadd(106.706, 127.547, 16.037, 10.696)
pt3dadd(106.751, 127.448, 16.081, 10.676)
pt3dadd(106.797, 127.351, 16.125, 10.654)
pt3dadd(106.842, 127.253, 16.169, 10.632)
pt3dadd(106.887, 127.156, 16.213, 10.612)
pt3dadd(106.933, 127.058, 16.257, 10.59)
pt3dadd(106.978, 126.96, 16.301, 10.568)
pt3dadd(107.024, 126.863, 16.345, 10.548)
pt3dadd(107.069, 126.764, 16.389, 10.526)
pt3dadd(107.115, 126.667, 16.433, 10.504)
pt3dadd(107.162, 126.57, 16.476, 10.484)
pt3dadd(107.214, 126.472, 16.515, 10.462)
pt3dadd(107.265, 126.374, 16.554, 10.44)
pt3dadd(107.317, 126.277, 16.593, 10.418)
pt3dadd(107.369, 126.179, 16.632, 10.396)
pt3dadd(107.421, 126.082, 16.67, 10.372)
pt3dadd(107.473, 125.984, 16.709, 10.35)
pt3dadd(107.525, 125.886, 16.748, 10.328)
pt3dadd(107.577, 125.789, 16.787, 10.306)
pt3dadd(107.629, 125.692, 16.826, 10.284)
pt3dadd(107.684, 125.594, 16.862, 10.26)
pt3dadd(107.748, 125.497, 16.89, 10.228)
pt3dadd(107.811, 125.401, 16.919, 10.198)
pt3dadd(107.874, 125.305, 16.947, 10.166)
pt3dadd(107.937, 125.209, 16.976, 10.136)
pt3dadd(108, 125.113, 17.005, 10.104)
pt3dadd(108.063, 125.017, 17.033, 10.074)
pt3dadd(108.126, 124.921, 17.062, 10.042)
pt3dadd(108.189, 124.825, 17.09, 10.012)
pt3dadd(108.252, 124.729, 17.119, 9.98)
pt3dadd(108.317, 124.633, 17.146, 9.892)
pt3dadd(108.384, 124.538, 17.172, 9.67)
pt3dadd(108.451, 124.444, 17.198, 9.448)
pt3dadd(108.518, 124.349, 17.223, 9.226)
pt3dadd(108.585, 124.254, 17.248, 9.006)
pt3dadd(108.652, 124.159, 17.274, 8.784)
pt3dadd(108.719, 124.066, 17.299, 8.562)
}
}
proc shape3d_31() {
dend_0[3] { pt3dadd(108.786, 123.971, 17.325, 8.34)
pt3dadd(108.854, 123.876, 17.35, 8.12)
pt3dadd(108.921, 123.781, 17.376, 7.898)
pt3dadd(108.985, 123.686, 17.404, 7.674)
pt3dadd(109.043, 123.59, 17.44, 7.446)
pt3dadd(109.101, 123.494, 17.476, 7.216)
pt3dadd(109.159, 123.398, 17.511, 6.988)
pt3dadd(109.217, 123.302, 17.547, 6.758)
pt3dadd(109.275, 123.206, 17.582, 6.53)
pt3dadd(109.333, 123.11, 17.618, 6.3)
pt3dadd(109.391, 123.014, 17.653, 6.072)
pt3dadd(109.449, 122.918, 17.689, 5.842)
pt3dadd(109.507, 122.822, 17.724, 5.614)
pt3dadd(109.56, 122.726, 17.764, 5.388)
}
dend_7[10] {pt3dclear()
pt3dadd(109.56, 122.726, 17.764, 5.388)
pt3dadd(109.606, 122.63, 17.811, 5.17)
pt3dadd(109.653, 122.536, 17.858, 4.952)
pt3dadd(109.699, 122.44, 17.904, 4.732)
pt3dadd(109.745, 122.344, 17.951, 4.514)
pt3dadd(109.791, 122.249, 17.998, 4.296)
pt3dadd(109.838, 122.153, 18.045, 4.078)
pt3dadd(109.884, 122.058, 18.091, 3.858)
pt3dadd(109.93, 121.962, 18.138, 3.64)
pt3dadd(109.976, 121.866, 18.185, 3.422)
pt3dadd(110.017, 121.774, 18.237, 3.228)
pt3dadd(110.05, 121.684, 18.297, 3.07)
pt3dadd(110.083, 121.594, 18.357, 2.912)
pt3dadd(110.116, 121.504, 18.417, 2.756)
pt3dadd(110.149, 121.414, 18.478, 2.598)
pt3dadd(110.182, 121.324, 18.538, 2.44)
pt3dadd(110.214, 121.234, 18.598, 2.284)
pt3dadd(110.247, 121.144, 18.658, 2.126)
pt3dadd(110.28, 121.054, 18.719, 1.968)
pt3dadd(110.313, 120.964, 18.779, 1.812)
pt3dadd(110.354, 120.874, 18.835, 1.702)
pt3dadd(110.406, 120.784, 18.885, 1.664)
pt3dadd(110.457, 120.694, 18.936, 1.624)
pt3dadd(110.509, 120.605, 18.986, 1.586)
pt3dadd(110.561, 120.515, 19.037, 1.548)
pt3dadd(110.613, 120.425, 19.087, 1.51)
pt3dadd(110.665, 120.335, 19.137, 1.472)
pt3dadd(110.717, 120.246, 19.188, 1.432)
pt3dadd(110.769, 120.156, 19.238, 1.394)
pt3dadd(110.821, 120.066, 19.289, 1.356)
pt3dadd(110.881, 119.981, 19.337, 1.352)
pt3dadd(110.95, 119.9, 19.384, 1.38)
pt3dadd(111.019, 119.819, 19.43, 1.41)
pt3dadd(111.088, 119.738, 19.477, 1.44)
pt3dadd(111.157, 119.658, 19.523, 1.468)
pt3dadd(111.226, 119.577, 19.57, 1.498)
pt3dadd(111.295, 119.496, 19.617, 1.526)
pt3dadd(111.364, 119.415, 19.663, 1.556)
pt3dadd(111.432, 119.334, 19.71, 1.586)
pt3dadd(111.501, 119.254, 19.756, 1.614)
pt3dadd(111.58, 119.188, 19.807, 1.636)
pt3dadd(111.665, 119.132, 19.86, 1.652)
pt3dadd(111.75, 119.076, 19.912, 1.67)
pt3dadd(111.835, 119.019, 19.965, 1.688)
pt3dadd(111.92, 118.963, 20.018, 1.704)
pt3dadd(112.005, 118.907, 20.071, 1.72)
pt3dadd(112.09, 118.851, 20.124, 1.738)
pt3dadd(112.175, 118.795, 20.177, 1.756)
pt3dadd(112.26, 118.738, 20.229, 1.772)
pt3dadd(112.345, 118.682, 20.282, 1.79)
pt3dadd(112.433, 118.62, 20.325, 1.806)
pt3dadd(112.523, 118.553, 20.361, 1.824)
pt3dadd(112.612, 118.486, 20.397, 1.84)
pt3dadd(112.702, 118.419, 20.434, 1.858)
pt3dadd(112.792, 118.352, 20.47, 1.874)
pt3dadd(112.881, 118.285, 20.506, 1.892)
pt3dadd(112.971, 118.218, 20.542, 1.908)
pt3dadd(113.061, 118.152, 20.578, 1.926)
pt3dadd(113.15, 118.085, 20.615, 1.942)
pt3dadd(113.24, 118.018, 20.651, 1.96)
pt3dadd(113.322, 117.951, 20.698, 1.97)
pt3dadd(113.399, 117.885, 20.75, 1.976)
pt3dadd(113.476, 117.819, 20.803, 1.984)
pt3dadd(113.554, 117.752, 20.856, 1.99)
pt3dadd(113.631, 117.686, 20.909, 1.998)
pt3dadd(113.708, 117.62, 20.962, 2.004)
pt3dadd(113.786, 117.553, 21.015, 2.012)
pt3dadd(113.863, 117.487, 21.068, 2.018)
pt3dadd(113.94, 117.421, 21.121, 2.026)
pt3dadd(114.018, 117.354, 21.174, 2.032)
pt3dadd(114.089, 117.28, 21.224, 2.034)
pt3dadd(114.158, 117.202, 21.274, 2.034)
pt3dadd(114.227, 117.125, 21.325, 2.034)
pt3dadd(114.297, 117.048, 21.375, 2.034)
pt3dadd(114.366, 116.971, 21.425, 2.034)
pt3dadd(114.435, 116.893, 21.475, 2.034)
pt3dadd(114.505, 116.816, 21.525, 2.034)
pt3dadd(114.574, 116.739, 21.575, 2.034)
pt3dadd(114.643, 116.661, 21.625, 2.034)
pt3dadd(114.713, 116.584, 21.676, 2.034)
pt3dadd(114.775, 116.494, 21.716, 2.024)
pt3dadd(114.838, 116.404, 21.756, 2.014)
pt3dadd(114.9, 116.313, 21.796, 2.004)
pt3dadd(114.962, 116.222, 21.835, 1.992)
pt3dadd(115.024, 116.131, 21.875, 1.982)
pt3dadd(115.086, 116.04, 21.915, 1.972)
pt3dadd(115.149, 115.949, 21.955, 1.96)
pt3dadd(115.211, 115.859, 21.995, 1.95)
pt3dadd(115.273, 115.768, 22.035, 1.94)
pt3dadd(115.335, 115.677, 22.074, 1.928)
pt3dadd(115.379, 115.581, 22.122, 1.894)
pt3dadd(115.422, 115.485, 22.17, 1.86)
pt3dadd(115.465, 115.388, 22.218, 1.824)
pt3dadd(115.508, 115.292, 22.265, 1.79)
pt3dadd(115.551, 115.196, 22.313, 1.756)
pt3dadd(115.595, 115.1, 22.361, 1.72)
pt3dadd(115.638, 115.004, 22.409, 1.686)
pt3dadd(115.681, 114.908, 22.456, 1.652)
pt3dadd(115.724, 114.811, 22.504, 1.616)
pt3dadd(115.768, 114.715, 22.552, 1.582)
}
dend_7[11] {pt3dclear()
pt3dadd(115.768, 114.715, 22.552, 1.582)
pt3dadd(115.693, 114.715, 22.621, 1.562)
pt3dadd(115.613, 114.715, 22.695, 1.54)
pt3dadd(115.532, 114.715, 22.769, 1.518)
pt3dadd(115.452, 114.715, 22.843, 1.498)
pt3dadd(115.371, 114.715, 22.917, 1.476)
pt3dadd(115.29, 114.715, 22.992, 1.454)
pt3dadd(115.21, 114.715, 23.066, 1.434)
pt3dadd(115.129, 114.715, 23.14, 1.412)
pt3dadd(115.049, 114.715, 23.214, 1.39)
pt3dadd(114.968, 114.715, 23.288, 1.368)
pt3dadd(114.888, 114.715, 23.362, 1.348)
pt3dadd(114.807, 114.715, 23.436, 1.326)
pt3dadd(114.727, 114.714, 23.511, 1.304)
pt3dadd(114.646, 114.714, 23.585, 1.282)
pt3dadd(114.566, 114.713, 23.659, 1.262)
pt3dadd(114.485, 114.713, 23.733, 1.24)
pt3dadd(114.405, 114.712, 23.807, 1.218)
pt3dadd(114.324, 114.712, 23.881, 1.198)
pt3dadd(114.243, 114.711, 23.955, 1.176)
pt3dadd(114.163, 114.711, 24.029, 1.154)
pt3dadd(114.082, 114.71, 24.103, 1.132)
pt3dadd(114.021, 114.625, 24.139, 1.13)
pt3dadd(113.962, 114.526, 24.169, 1.13)
pt3dadd(113.903, 114.428, 24.198, 1.13)
pt3dadd(113.844, 114.33, 24.228, 1.13)
pt3dadd(113.785, 114.231, 24.258, 1.13)
pt3dadd(113.727, 114.133, 24.288, 1.13)
pt3dadd(113.668, 114.035, 24.318, 1.13)
pt3dadd(113.609, 113.937, 24.347, 1.13)
pt3dadd(113.55, 113.838, 24.377, 1.13)
pt3dadd(113.491, 113.74, 24.407, 1.13)
pt3dadd(113.443, 113.64, 24.445, 1.136)
pt3dadd(113.396, 113.541, 24.485, 1.144)
pt3dadd(113.349, 113.441, 24.525, 1.152)
pt3dadd(113.302, 113.342, 24.565, 1.16)
pt3dadd(113.255, 113.242, 24.604, 1.168)
pt3dadd(113.208, 113.143, 24.644, 1.176)
pt3dadd(113.161, 113.043, 24.684, 1.184)
pt3dadd(113.114, 112.944, 24.724, 1.192)
pt3dadd(113.067, 112.844, 24.763, 1.2)
pt3dadd(113.019, 112.744, 24.803, 1.206)
pt3dadd(112.992, 112.647, 24.857, 1.222)
pt3dadd(112.965, 112.549, 24.91, 1.236)
pt3dadd(112.938, 112.451, 24.963, 1.252)
pt3dadd(112.911, 112.353, 25.017, 1.266)
pt3dadd(112.884, 112.256, 25.07, 1.282)
pt3dadd(112.857, 112.158, 25.124, 1.296)
pt3dadd(112.829, 112.06, 25.177, 1.312)
pt3dadd(112.802, 111.963, 25.23, 1.326)
pt3dadd(112.775, 111.865, 25.284, 1.342)
pt3dadd(112.748, 111.767, 25.337, 1.356)
pt3dadd(112.734, 111.672, 25.398, 1.356)
pt3dadd(112.719, 111.577, 25.458, 1.356)
pt3dadd(112.705, 111.483, 25.518, 1.356)
pt3dadd(112.691, 111.388, 25.578, 1.356)
pt3dadd(112.677, 111.293, 25.638, 1.356)
pt3dadd(112.662, 111.198, 25.698, 1.356)
pt3dadd(112.648, 111.103, 25.758, 1.356)
pt3dadd(112.634, 111.008, 25.818, 1.356)
pt3dadd(112.62, 110.914, 25.878, 1.356)
pt3dadd(112.605, 110.819, 25.938, 1.356)
pt3dadd(112.594, 110.716, 25.99, 1.342)
pt3dadd(112.583, 110.614, 26.042, 1.328)
pt3dadd(112.572, 110.512, 26.093, 1.316)
pt3dadd(112.561, 110.41, 26.145, 1.302)
pt3dadd(112.55, 110.308, 26.196, 1.288)
pt3dadd(112.539, 110.205, 26.248, 1.276)
pt3dadd(112.528, 110.103, 26.299, 1.262)
pt3dadd(112.517, 110.001, 26.351, 1.248)
pt3dadd(112.506, 109.899, 26.403, 1.236)
pt3dadd(112.495, 109.797, 26.454, 1.222)
pt3dadd(112.481, 109.695, 26.506, 1.214)
pt3dadd(112.468, 109.594, 26.559, 1.204)
pt3dadd(112.455, 109.492, 26.611, 1.194)
pt3dadd(112.441, 109.391, 26.663, 1.186)
pt3dadd(112.428, 109.29, 26.716, 1.176)
pt3dadd(112.415, 109.188, 26.768, 1.166)
pt3dadd(112.401, 109.087, 26.82, 1.158)
pt3dadd(112.388, 108.985, 26.873, 1.148)
pt3dadd(112.375, 108.884, 26.925, 1.138)
pt3dadd(112.36, 108.783, 26.977, 1.13)
pt3dadd(112.331, 108.687, 27.033, 1.13)
pt3dadd(112.301, 108.592, 27.088, 1.13)
pt3dadd(112.271, 108.497, 27.143, 1.13)
pt3dadd(112.242, 108.401, 27.199, 1.13)
}
}
proc shape3d_32() {
dend_7[11] { pt3dadd(112.212, 108.306, 27.254, 1.13)
pt3dadd(112.183, 108.21, 27.309, 1.13)
pt3dadd(112.153, 108.115, 27.365, 1.13)
pt3dadd(112.123, 108.019, 27.42, 1.13)
pt3dadd(112.094, 107.924, 27.476, 1.13)
pt3dadd(112.056, 107.832, 27.53, 1.128)
pt3dadd(111.992, 107.751, 27.581, 1.124)
pt3dadd(111.928, 107.669, 27.632, 1.12)
pt3dadd(111.865, 107.588, 27.683, 1.114)
pt3dadd(111.801, 107.507, 27.734, 1.11)
pt3dadd(111.738, 107.426, 27.785, 1.104)
pt3dadd(111.674, 107.344, 27.836, 1.1)
pt3dadd(111.611, 107.263, 27.888, 1.094)
pt3dadd(111.547, 107.182, 27.939, 1.09)
pt3dadd(111.484, 107.101, 27.99, 1.086)
pt3dadd(111.424, 107.019, 28.043, 1.078)
pt3dadd(111.375, 106.936, 28.103, 1.066)
pt3dadd(111.326, 106.853, 28.162, 1.054)
pt3dadd(111.277, 106.77, 28.222, 1.042)
pt3dadd(111.228, 106.687, 28.281, 1.028)
pt3dadd(111.179, 106.604, 28.341, 1.016)
pt3dadd(111.13, 106.521, 28.4, 1.004)
pt3dadd(111.08, 106.438, 28.459, 0.992)
pt3dadd(111.031, 106.355, 28.519, 0.98)
pt3dadd(110.982, 106.272, 28.578, 0.968)
pt3dadd(110.927, 106.187, 28.631, 0.978)
pt3dadd(110.861, 106.098, 28.67, 1.036)
pt3dadd(110.795, 106.01, 28.71, 1.092)
pt3dadd(110.729, 105.922, 28.749, 1.15)
pt3dadd(110.663, 105.833, 28.789, 1.206)
pt3dadd(110.597, 105.745, 28.828, 1.264)
pt3dadd(110.531, 105.656, 28.867, 1.32)
pt3dadd(110.465, 105.568, 28.907, 1.378)
pt3dadd(110.4, 105.48, 28.946, 1.436)
pt3dadd(110.334, 105.391, 28.986, 1.492)
pt3dadd(110.273, 105.307, 29.034, 1.526)
pt3dadd(110.223, 105.233, 29.1, 1.51)
pt3dadd(110.173, 105.158, 29.167, 1.494)
pt3dadd(110.124, 105.083, 29.233, 1.48)
pt3dadd(110.074, 105.008, 29.299, 1.466)
pt3dadd(110.024, 104.934, 29.365, 1.45)
pt3dadd(109.974, 104.859, 29.432, 1.436)
pt3dadd(109.924, 104.784, 29.498, 1.42)
pt3dadd(109.874, 104.709, 29.564, 1.406)
pt3dadd(109.825, 104.634, 29.631, 1.39)
pt3dadd(109.776, 104.553, 29.691, 1.388)
pt3dadd(109.731, 104.46, 29.742, 1.406)
pt3dadd(109.686, 104.367, 29.793, 1.426)
pt3dadd(109.64, 104.275, 29.844, 1.444)
pt3dadd(109.595, 104.182, 29.896, 1.462)
pt3dadd(109.55, 104.09, 29.947, 1.482)
pt3dadd(109.504, 103.997, 29.998, 1.5)
pt3dadd(109.459, 103.905, 30.049, 1.518)
pt3dadd(109.413, 103.812, 30.1, 1.538)
pt3dadd(109.368, 103.719, 30.151, 1.556)
pt3dadd(109.314, 103.638, 30.207, 1.552)
pt3dadd(109.247, 103.572, 30.27, 1.514)
pt3dadd(109.18, 103.507, 30.332, 1.476)
pt3dadd(109.113, 103.441, 30.395, 1.438)
pt3dadd(109.046, 103.376, 30.457, 1.4)
pt3dadd(108.979, 103.31, 30.52, 1.364)
pt3dadd(108.912, 103.245, 30.582, 1.326)
pt3dadd(108.845, 103.179, 30.645, 1.288)
pt3dadd(108.778, 103.114, 30.707, 1.25)
pt3dadd(108.711, 103.048, 30.77, 1.212)
pt3dadd(108.641, 102.975, 30.821, 1.196)
pt3dadd(108.567, 102.893, 30.86, 1.206)
pt3dadd(108.493, 102.811, 30.899, 1.214)
pt3dadd(108.419, 102.729, 30.938, 1.224)
pt3dadd(108.345, 102.647, 30.977, 1.234)
pt3dadd(108.271, 102.564, 31.016, 1.242)
pt3dadd(108.197, 102.482, 31.055, 1.252)
pt3dadd(108.123, 102.4, 31.094, 1.26)
pt3dadd(108.049, 102.318, 31.132, 1.27)
pt3dadd(107.974, 102.236, 31.171, 1.278)
pt3dadd(107.91, 102.148, 31.212, 1.276)
pt3dadd(107.854, 102.055, 31.254, 1.262)
pt3dadd(107.798, 101.962, 31.297, 1.248)
pt3dadd(107.741, 101.869, 31.339, 1.234)
pt3dadd(107.685, 101.776, 31.382, 1.222)
pt3dadd(107.629, 101.683, 31.424, 1.208)
pt3dadd(107.573, 101.59, 31.466, 1.194)
pt3dadd(107.516, 101.497, 31.509, 1.18)
pt3dadd(107.46, 101.404, 31.551, 1.166)
pt3dadd(107.404, 101.311, 31.594, 1.154)
pt3dadd(107.36, 101.212, 31.635, 1.136)
pt3dadd(107.323, 101.108, 31.676, 1.116)
pt3dadd(107.287, 101.005, 31.717, 1.098)
pt3dadd(107.25, 100.902, 31.758, 1.078)
pt3dadd(107.213, 100.799, 31.798, 1.06)
pt3dadd(107.176, 100.696, 31.839, 1.04)
pt3dadd(107.139, 100.593, 31.88, 1.022)
pt3dadd(107.102, 100.49, 31.921, 1.002)
pt3dadd(107.065, 100.387, 31.962, 0.982)
pt3dadd(107.028, 100.283, 32.003, 0.964)
pt3dadd(107.003, 100.172, 32.031, 0.972)
pt3dadd(106.982, 100.057, 32.055, 0.986)
pt3dadd(106.96, 99.943, 32.079, 1.002)
pt3dadd(106.939, 99.828, 32.103, 1.018)
pt3dadd(106.917, 99.714, 32.127, 1.034)
pt3dadd(106.896, 99.599, 32.152, 1.05)
pt3dadd(106.874, 99.485, 32.176, 1.066)
pt3dadd(106.853, 99.371, 32.2, 1.082)
pt3dadd(106.831, 99.256, 32.224, 1.098)
pt3dadd(106.81, 99.142, 32.248, 1.114)
pt3dadd(106.793, 99.025, 32.265, 1.104)
pt3dadd(106.776, 98.907, 32.278, 1.084)
pt3dadd(106.76, 98.789, 32.292, 1.066)
pt3dadd(106.744, 98.671, 32.306, 1.048)
pt3dadd(106.728, 98.554, 32.32, 1.028)
pt3dadd(106.711, 98.436, 32.333, 1.01)
pt3dadd(106.695, 98.318, 32.347, 0.99)
pt3dadd(106.679, 98.201, 32.361, 0.972)
pt3dadd(106.663, 98.083, 32.375, 0.952)
pt3dadd(106.647, 97.965, 32.389, 0.934)
pt3dadd(106.609, 97.852, 32.398, 0.94)
pt3dadd(106.564, 97.741, 32.405, 0.952)
pt3dadd(106.52, 97.63, 32.413, 0.964)
pt3dadd(106.475, 97.519, 32.42, 0.978)
pt3dadd(106.431, 97.408, 32.428, 0.99)
pt3dadd(106.386, 97.297, 32.436, 1.002)
pt3dadd(106.342, 97.186, 32.443, 1.016)
pt3dadd(106.297, 97.075, 32.451, 1.028)
pt3dadd(106.253, 96.964, 32.458, 1.04)
pt3dadd(106.208, 96.853, 32.466, 1.054)
pt3dadd(106.165, 96.741, 32.475, 1.046)
pt3dadd(106.121, 96.63, 32.484, 1.032)
pt3dadd(106.078, 96.519, 32.493, 1.018)
pt3dadd(106.034, 96.408, 32.502, 1.004)
pt3dadd(105.991, 96.296, 32.512, 0.992)
pt3dadd(105.947, 96.185, 32.521, 0.978)
pt3dadd(105.904, 96.074, 32.53, 0.964)
pt3dadd(105.86, 95.962, 32.54, 0.95)
pt3dadd(105.817, 95.851, 32.549, 0.936)
pt3dadd(105.773, 95.74, 32.558, 0.924)
pt3dadd(105.735, 95.628, 32.576, 0.91)
pt3dadd(105.697, 95.517, 32.596, 0.898)
pt3dadd(105.66, 95.405, 32.615, 0.884)
pt3dadd(105.622, 95.294, 32.635, 0.872)
pt3dadd(105.585, 95.182, 32.655, 0.858)
pt3dadd(105.547, 95.071, 32.674, 0.844)
pt3dadd(105.51, 94.959, 32.694, 0.832)
pt3dadd(105.472, 94.848, 32.714, 0.818)
pt3dadd(105.435, 94.736, 32.733, 0.806)
pt3dadd(105.397, 94.625, 32.753, 0.792)
pt3dadd(105.364, 94.518, 32.788, 0.822)
pt3dadd(105.331, 94.411, 32.824, 0.856)
pt3dadd(105.297, 94.304, 32.86, 0.89)
pt3dadd(105.264, 94.197, 32.897, 0.924)
pt3dadd(105.231, 94.09, 32.933, 0.958)
pt3dadd(105.198, 93.984, 32.969, 0.992)
pt3dadd(105.165, 93.877, 33.006, 1.026)
pt3dadd(105.132, 93.77, 33.042, 1.06)
pt3dadd(105.099, 93.663, 33.078, 1.094)
pt3dadd(105.066, 93.556, 33.114, 1.13)
pt3dadd(105.012, 93.453, 33.139, 1.148)
pt3dadd(104.957, 93.35, 33.161, 1.164)
pt3dadd(104.901, 93.247, 33.184, 1.182)
pt3dadd(104.846, 93.144, 33.207, 1.198)
pt3dadd(104.79, 93.042, 33.23, 1.214)
pt3dadd(104.735, 92.939, 33.252, 1.232)
pt3dadd(104.68, 92.836, 33.275, 1.248)
pt3dadd(104.624, 92.733, 33.298, 1.264)
pt3dadd(104.569, 92.63, 33.321, 1.282)
pt3dadd(104.513, 92.527, 33.343, 1.298)
pt3dadd(104.45, 92.427, 33.36, 1.314)
pt3dadd(104.386, 92.328, 33.375, 1.33)
pt3dadd(104.322, 92.228, 33.391, 1.348)
pt3dadd(104.257, 92.128, 33.406, 1.364)
pt3dadd(104.193, 92.029, 33.422, 1.38)
pt3dadd(104.129, 91.929, 33.438, 1.396)
pt3dadd(104.065, 91.829, 33.453, 1.412)
pt3dadd(104.001, 91.73, 33.469, 1.43)
pt3dadd(103.937, 91.63, 33.484, 1.446)
pt3dadd(103.872, 91.53, 33.5, 1.462)
pt3dadd(103.809, 91.43, 33.511, 1.47)
pt3dadd(103.745, 91.329, 33.521, 1.476)
pt3dadd(103.681, 91.228, 33.532, 1.484)
pt3dadd(103.617, 91.127, 33.543, 1.49)
pt3dadd(103.553, 91.026, 33.553, 1.498)
pt3dadd(103.489, 90.926, 33.564, 1.504)
pt3dadd(103.425, 90.825, 33.575, 1.512)
pt3dadd(103.362, 90.724, 33.585, 1.518)
pt3dadd(103.298, 90.623, 33.596, 1.526)
pt3dadd(103.234, 90.522, 33.606, 1.532)
pt3dadd(103.184, 90.414, 33.614, 1.518)
pt3dadd(103.134, 90.305, 33.622, 1.5)
pt3dadd(103.085, 90.196, 33.629, 1.484)
pt3dadd(103.035, 90.087, 33.637, 1.468)
pt3dadd(102.986, 89.978, 33.644, 1.45)
pt3dadd(102.936, 89.869, 33.652, 1.434)
pt3dadd(102.887, 89.76, 33.659, 1.418)
pt3dadd(102.837, 89.651, 33.667, 1.402)
pt3dadd(102.788, 89.542, 33.674, 1.384)
pt3dadd(102.738, 89.433, 33.682, 1.368)
pt3dadd(102.707, 89.319, 33.695, 1.388)
pt3dadd(102.676, 89.204, 33.708, 1.408)
pt3dadd(102.645, 89.089, 33.722, 1.43)
pt3dadd(102.614, 88.974, 33.735, 1.45)
pt3dadd(102.584, 88.859, 33.749, 1.472)
}
}
proc shape3d_33() {
dend_7[11] { pt3dadd(102.553, 88.745, 33.762, 1.492)
pt3dadd(102.522, 88.63, 33.776, 1.514)
pt3dadd(102.491, 88.515, 33.789, 1.534)
pt3dadd(102.46, 88.4, 33.802, 1.556)
pt3dadd(102.429, 88.285, 33.816, 1.576)
pt3dadd(102.37, 88.199, 33.864, 1.534)
pt3dadd(102.31, 88.113, 33.913, 1.488)
pt3dadd(102.25, 88.028, 33.963, 1.444)
pt3dadd(102.19, 87.942, 34.012, 1.398)
pt3dadd(102.131, 87.857, 34.061, 1.354)
pt3dadd(102.071, 87.771, 34.111, 1.31)
pt3dadd(102.011, 87.686, 34.16, 1.264)
pt3dadd(101.951, 87.6, 34.209, 1.22)
pt3dadd(101.891, 87.515, 34.259, 1.174)
pt3dadd(101.831, 87.43, 34.308, 1.13)
}
dend_7[12] {pt3dclear()
pt3dadd(101.831, 87.43, 34.308, 1.13)
pt3dadd(101.807, 87.368, 34.327, 1.13)
pt3dadd(101.766, 87.263, 34.361, 1.13)
pt3dadd(101.725, 87.158, 34.395, 1.13)
pt3dadd(101.684, 87.052, 34.428, 1.13)
pt3dadd(101.648, 86.943, 34.458, 1.114)
pt3dadd(101.612, 86.834, 34.486, 1.096)
pt3dadd(101.576, 86.725, 34.515, 1.078)
pt3dadd(101.54, 86.616, 34.544, 1.06)
pt3dadd(101.505, 86.507, 34.573, 1.042)
pt3dadd(101.469, 86.397, 34.602, 1.024)
pt3dadd(101.433, 86.288, 34.63, 1.006)
pt3dadd(101.397, 86.179, 34.659, 0.988)
pt3dadd(101.361, 86.07, 34.688, 0.97)
pt3dadd(101.325, 85.961, 34.717, 0.954)
pt3dadd(101.3, 85.846, 34.736, 0.934)
pt3dadd(101.275, 85.731, 34.755, 0.914)
pt3dadd(101.25, 85.615, 34.773, 0.896)
pt3dadd(101.226, 85.5, 34.791, 0.876)
pt3dadd(101.201, 85.385, 34.81, 0.858)
pt3dadd(101.177, 85.269, 34.828, 0.838)
pt3dadd(101.152, 85.154, 34.847, 0.82)
pt3dadd(101.127, 85.038, 34.865, 0.8)
pt3dadd(101.103, 84.923, 34.883, 0.782)
pt3dadd(101.078, 84.808, 34.902, 0.762)
pt3dadd(101.043, 84.697, 34.927, 0.78)
pt3dadd(101.007, 84.587, 34.952, 0.802)
pt3dadd(100.971, 84.477, 34.978, 0.826)
pt3dadd(100.934, 84.366, 35.003, 0.848)
pt3dadd(100.898, 84.256, 35.029, 0.87)
pt3dadd(100.862, 84.146, 35.054, 0.892)
pt3dadd(100.826, 84.036, 35.08, 0.914)
pt3dadd(100.789, 83.925, 35.105, 0.938)
pt3dadd(100.753, 83.815, 35.131, 0.96)
pt3dadd(100.709, 83.712, 35.162, 0.976)
pt3dadd(100.647, 83.623, 35.205, 0.978)
pt3dadd(100.585, 83.534, 35.248, 0.982)
pt3dadd(100.522, 83.445, 35.29, 0.984)
pt3dadd(100.46, 83.357, 35.333, 0.986)
pt3dadd(100.398, 83.268, 35.376, 0.99)
pt3dadd(100.336, 83.179, 35.419, 0.992)
pt3dadd(100.273, 83.091, 35.462, 0.994)
pt3dadd(100.211, 83.002, 35.505, 0.998)
pt3dadd(100.149, 82.913, 35.548, 1)
pt3dadd(100.089, 82.819, 35.585, 0.988)
pt3dadd(100.035, 82.718, 35.613, 0.952)
pt3dadd(99.98, 82.616, 35.64, 0.914)
pt3dadd(99.925, 82.515, 35.668, 0.876)
pt3dadd(99.87, 82.413, 35.695, 0.84)
pt3dadd(99.816, 82.312, 35.723, 0.802)
pt3dadd(99.761, 82.21, 35.75, 0.766)
pt3dadd(99.706, 82.109, 35.778, 0.73)
pt3dadd(99.652, 82.007, 35.806, 0.692)
pt3dadd(99.597, 81.906, 35.833, 0.654)
pt3dadd(99.539, 81.805, 35.856, 0.626)
pt3dadd(99.476, 81.704, 35.874, 0.608)
pt3dadd(99.414, 81.604, 35.891, 0.59)
pt3dadd(99.351, 81.504, 35.908, 0.572)
pt3dadd(99.288, 81.403, 35.925, 0.554)
pt3dadd(99.226, 81.303, 35.942, 0.536)
pt3dadd(99.163, 81.203, 35.959, 0.518)
pt3dadd(99.101, 81.103, 35.976, 0.5)
pt3dadd(99.038, 81.002, 35.993, 0.482)
pt3dadd(98.975, 80.902, 36.01, 0.464)
pt3dadd(98.922, 80.797, 36.025, 0.444)
pt3dadd(98.883, 80.684, 36.036, 0.426)
pt3dadd(98.844, 80.571, 36.047, 0.408)
pt3dadd(98.805, 80.459, 36.058, 0.39)
pt3dadd(98.766, 80.346, 36.069, 0.372)
pt3dadd(98.726, 80.233, 36.08, 0.354)
pt3dadd(98.687, 80.121, 36.091, 0.336)
pt3dadd(98.648, 80.008, 36.102, 0.318)
pt3dadd(98.609, 79.895, 36.112, 0.3)
pt3dadd(98.57, 79.783, 36.123, 0.282)
pt3dadd(98.533, 79.671, 36.142, 0.296)
pt3dadd(98.498, 79.562, 36.172, 0.356)
pt3dadd(98.464, 79.453, 36.201, 0.416)
pt3dadd(98.43, 79.344, 36.231, 0.476)
pt3dadd(98.395, 79.234, 36.261, 0.536)
pt3dadd(98.361, 79.125, 36.291, 0.596)
pt3dadd(98.326, 79.016, 36.32, 0.654)
pt3dadd(98.292, 78.906, 36.35, 0.714)
pt3dadd(98.257, 78.797, 36.38, 0.774)
pt3dadd(98.223, 78.688, 36.41, 0.834)
pt3dadd(98.185, 78.58, 36.439, 0.88)
pt3dadd(98.143, 78.473, 36.469, 0.908)
pt3dadd(98.1, 78.367, 36.499, 0.934)
pt3dadd(98.058, 78.261, 36.529, 0.962)
pt3dadd(98.016, 78.154, 36.559, 0.99)
pt3dadd(97.974, 78.048, 36.589, 1.018)
pt3dadd(97.931, 77.941, 36.619, 1.046)
pt3dadd(97.889, 77.835, 36.648, 1.074)
pt3dadd(97.847, 77.728, 36.678, 1.1)
pt3dadd(97.804, 77.622, 36.708, 1.128)
pt3dadd(97.755, 77.517, 36.733, 1.118)
pt3dadd(97.7, 77.414, 36.754, 1.074)
pt3dadd(97.644, 77.31, 36.774, 1.03)
pt3dadd(97.589, 77.206, 36.795, 0.986)
pt3dadd(97.534, 77.103, 36.816, 0.942)
pt3dadd(97.478, 76.999, 36.836, 0.898)
pt3dadd(97.423, 76.896, 36.857, 0.854)
pt3dadd(97.368, 76.792, 36.878, 0.81)
pt3dadd(97.312, 76.689, 36.898, 0.764)
pt3dadd(97.257, 76.585, 36.919, 0.72)
pt3dadd(97.196, 76.484, 36.934, 0.718)
pt3dadd(97.129, 76.385, 36.943, 0.748)
pt3dadd(97.063, 76.285, 36.953, 0.78)
pt3dadd(96.997, 76.186, 36.962, 0.812)
pt3dadd(96.93, 76.087, 36.972, 0.844)
pt3dadd(96.864, 75.987, 36.981, 0.876)
pt3dadd(96.798, 75.888, 36.991, 0.908)
pt3dadd(96.731, 75.789, 37, 0.94)
pt3dadd(96.665, 75.689, 37.01, 0.972)
pt3dadd(96.599, 75.59, 37.019, 1.004)
pt3dadd(96.54, 75.486, 37.026, 1)
pt3dadd(96.487, 75.378, 37.029, 0.964)
pt3dadd(96.434, 75.271, 37.033, 0.928)
pt3dadd(96.382, 75.163, 37.037, 0.894)
pt3dadd(96.329, 75.055, 37.041, 0.858)
pt3dadd(96.276, 74.947, 37.044, 0.822)
pt3dadd(96.224, 74.84, 37.048, 0.788)
pt3dadd(96.171, 74.732, 37.052, 0.752)
pt3dadd(96.118, 74.624, 37.056, 0.716)
pt3dadd(96.066, 74.516, 37.06, 0.682)
pt3dadd(96.022, 74.405, 37.062, 0.654)
pt3dadd(95.985, 74.291, 37.063, 0.63)
pt3dadd(95.948, 74.177, 37.064, 0.608)
pt3dadd(95.911, 74.063, 37.065, 0.586)
pt3dadd(95.873, 73.949, 37.066, 0.562)
pt3dadd(95.836, 73.834, 37.067, 0.54)
pt3dadd(95.799, 73.72, 37.068, 0.518)
pt3dadd(95.762, 73.606, 37.069, 0.494)
pt3dadd(95.725, 73.492, 37.07, 0.472)
pt3dadd(95.687, 73.378, 37.071, 0.45)
pt3dadd(95.658, 73.262, 37.072, 0.47)
pt3dadd(95.634, 73.144, 37.074, 0.516)
pt3dadd(95.61, 73.027, 37.076, 0.562)
pt3dadd(95.586, 72.909, 37.078, 0.61)
pt3dadd(95.561, 72.792, 37.08, 0.656)
pt3dadd(95.537, 72.674, 37.082, 0.702)
pt3dadd(95.513, 72.557, 37.083, 0.748)
pt3dadd(95.489, 72.439, 37.085, 0.794)
pt3dadd(95.464, 72.322, 37.087, 0.84)
pt3dadd(95.44, 72.204, 37.089, 0.886)
pt3dadd(95.417, 72.087, 37.092, 0.904)
pt3dadd(95.395, 71.969, 37.095, 0.904)
pt3dadd(95.373, 71.851, 37.098, 0.904)
pt3dadd(95.35, 71.733, 37.101, 0.904)
pt3dadd(95.328, 71.615, 37.104, 0.904)
pt3dadd(95.306, 71.497, 37.108, 0.904)
pt3dadd(95.283, 71.38, 37.111, 0.904)
pt3dadd(95.261, 71.262, 37.114, 0.904)
pt3dadd(95.239, 71.144, 37.117, 0.904)
pt3dadd(95.216, 71.026, 37.12, 0.904)
pt3dadd(95.173, 70.915, 37.126, 0.894)
pt3dadd(95.119, 70.809, 37.133, 0.876)
pt3dadd(95.064, 70.702, 37.14, 0.86)
pt3dadd(95.009, 70.596, 37.147, 0.844)
pt3dadd(94.954, 70.49, 37.154, 0.826)
pt3dadd(94.9, 70.383, 37.161, 0.81)
pt3dadd(94.845, 70.277, 37.168, 0.794)
pt3dadd(94.79, 70.17, 37.174, 0.776)
pt3dadd(94.735, 70.064, 37.181, 0.76)
pt3dadd(94.681, 69.957, 37.188, 0.742)
pt3dadd(94.621, 69.854, 37.197, 0.74)
pt3dadd(94.559, 69.752, 37.207, 0.744)
pt3dadd(94.497, 69.65, 37.217, 0.748)
pt3dadd(94.435, 69.547, 37.227, 0.754)
pt3dadd(94.373, 69.445, 37.236, 0.758)
pt3dadd(94.311, 69.343, 37.246, 0.762)
pt3dadd(94.249, 69.241, 37.256, 0.768)
pt3dadd(94.187, 69.139, 37.266, 0.772)
pt3dadd(94.125, 69.037, 37.275, 0.776)
pt3dadd(94.063, 68.935, 37.285, 0.782)
pt3dadd(94.003, 68.833, 37.3, 0.79)
pt3dadd(93.943, 68.731, 37.318, 0.802)
pt3dadd(93.883, 68.629, 37.336, 0.816)
pt3dadd(93.823, 68.528, 37.354, 0.828)
pt3dadd(93.764, 68.426, 37.372, 0.84)
pt3dadd(93.704, 68.324, 37.39, 0.852)
pt3dadd(93.644, 68.222, 37.408, 0.864)
pt3dadd(93.585, 68.12, 37.426, 0.876)
pt3dadd(93.525, 68.019, 37.444, 0.888)
pt3dadd(93.465, 67.917, 37.461, 0.902)
pt3dadd(93.421, 67.813, 37.495, 0.904)
}
}
proc shape3d_34() {
dend_7[12] { pt3dadd(93.382, 67.71, 37.533, 0.904)
pt3dadd(93.343, 67.606, 37.571, 0.904)
pt3dadd(93.304, 67.502, 37.609, 0.904)
pt3dadd(93.265, 67.398, 37.647, 0.904)
pt3dadd(93.226, 67.294, 37.686, 0.904)
pt3dadd(93.186, 67.19, 37.724, 0.904)
pt3dadd(93.147, 67.087, 37.762, 0.904)
pt3dadd(93.108, 66.983, 37.8, 0.904)
pt3dadd(93.069, 66.879, 37.838, 0.904)
pt3dadd(93.045, 66.769, 37.872, 0.866)
pt3dadd(93.026, 66.657, 37.905, 0.818)
pt3dadd(93.007, 66.546, 37.938, 0.77)
pt3dadd(92.988, 66.434, 37.97, 0.722)
pt3dadd(92.969, 66.322, 38.003, 0.674)
pt3dadd(92.95, 66.21, 38.036, 0.626)
pt3dadd(92.931, 66.099, 38.069, 0.576)
pt3dadd(92.912, 65.987, 38.101, 0.528)
pt3dadd(92.892, 65.875, 38.134, 0.48)
pt3dadd(92.873, 65.763, 38.167, 0.432)
pt3dadd(92.86, 65.65, 38.196, 0.406)
pt3dadd(92.847, 65.535, 38.225, 0.386)
pt3dadd(92.835, 65.421, 38.254, 0.366)
pt3dadd(92.823, 65.307, 38.282, 0.348)
pt3dadd(92.811, 65.192, 38.311, 0.328)
pt3dadd(92.798, 65.078, 38.34, 0.308)
pt3dadd(92.786, 64.964, 38.368, 0.288)
pt3dadd(92.774, 64.849, 38.397, 0.27)
pt3dadd(92.762, 64.735, 38.425, 0.25)
pt3dadd(92.749, 64.62, 38.454, 0.23)
pt3dadd(92.737, 64.508, 38.488, 0.238)
pt3dadd(92.724, 64.397, 38.523, 0.254)
pt3dadd(92.712, 64.285, 38.558, 0.27)
pt3dadd(92.699, 64.174, 38.594, 0.284)
pt3dadd(92.687, 64.062, 38.629, 0.3)
pt3dadd(92.674, 63.951, 38.664, 0.316)
pt3dadd(92.661, 63.839, 38.7, 0.33)
pt3dadd(92.649, 63.727, 38.735, 0.346)
pt3dadd(92.636, 63.616, 38.77, 0.362)
pt3dadd(92.624, 63.504, 38.806, 0.378)
pt3dadd(92.604, 63.398, 38.849, 0.408)
pt3dadd(92.583, 63.294, 38.895, 0.44)
pt3dadd(92.562, 63.189, 38.94, 0.472)
pt3dadd(92.541, 63.084, 38.985, 0.504)
pt3dadd(92.52, 62.979, 39.031, 0.538)
pt3dadd(92.499, 62.874, 39.076, 0.57)
pt3dadd(92.478, 62.769, 39.121, 0.602)
pt3dadd(92.457, 62.664, 39.167, 0.636)
pt3dadd(92.436, 62.559, 39.212, 0.668)
pt3dadd(92.415, 62.454, 39.257, 0.7)
pt3dadd(92.367, 62.356, 39.297, 0.718)
pt3dadd(92.317, 62.258, 39.337, 0.736)
pt3dadd(92.267, 62.16, 39.377, 0.754)
pt3dadd(92.217, 62.062, 39.417, 0.77)
pt3dadd(92.166, 61.964, 39.456, 0.788)
pt3dadd(92.116, 61.866, 39.496, 0.804)
pt3dadd(92.066, 61.768, 39.536, 0.822)
pt3dadd(92.016, 61.67, 39.576, 0.84)
pt3dadd(91.965, 61.572, 39.616, 0.856)
pt3dadd(91.915, 61.474, 39.655, 0.874)
pt3dadd(91.874, 61.382, 39.709, 0.838)
pt3dadd(91.833, 61.29, 39.763, 0.8)
pt3dadd(91.793, 61.198, 39.818, 0.76)
pt3dadd(91.753, 61.106, 39.873, 0.72)
pt3dadd(91.712, 61.014, 39.928, 0.68)
pt3dadd(91.672, 60.922, 39.983, 0.64)
pt3dadd(91.632, 60.83, 40.037, 0.6)
pt3dadd(91.591, 60.738, 40.092, 0.56)
pt3dadd(91.551, 60.646, 40.147, 0.522)
pt3dadd(91.511, 60.554, 40.202, 0.482)
pt3dadd(91.461, 60.476, 40.266, 0.464)
pt3dadd(91.412, 60.399, 40.33, 0.448)
pt3dadd(91.362, 60.323, 40.395, 0.432)
pt3dadd(91.312, 60.246, 40.459, 0.416)
pt3dadd(91.262, 60.169, 40.524, 0.4)
pt3dadd(91.212, 60.092, 40.588, 0.384)
pt3dadd(91.162, 60.015, 40.653, 0.368)
pt3dadd(91.113, 59.938, 40.717, 0.354)
pt3dadd(91.063, 59.861, 40.782, 0.336)
pt3dadd(91.013, 59.785, 40.847, 0.324)
pt3dadd(90.96, 59.712, 40.913, 0.354)
pt3dadd(90.908, 59.639, 40.98, 0.382)
pt3dadd(90.855, 59.566, 41.046, 0.412)
pt3dadd(90.803, 59.493, 41.112, 0.44)
pt3dadd(90.75, 59.421, 41.179, 0.468)
pt3dadd(90.698, 59.348, 41.245, 0.498)
pt3dadd(90.645, 59.275, 41.312, 0.526)
pt3dadd(90.593, 59.202, 41.378, 0.556)
pt3dadd(90.54, 59.13, 41.444, 0.584)
pt3dadd(90.494, 59.053, 41.51, 0.608)
pt3dadd(90.467, 58.963, 41.572, 0.614)
pt3dadd(90.441, 58.873, 41.634, 0.62)
pt3dadd(90.415, 58.782, 41.696, 0.626)
pt3dadd(90.388, 58.692, 41.759, 0.63)
pt3dadd(90.362, 58.602, 41.821, 0.636)
pt3dadd(90.336, 58.512, 41.883, 0.642)
pt3dadd(90.309, 58.422, 41.945, 0.648)
pt3dadd(90.283, 58.331, 42.007, 0.654)
pt3dadd(90.257, 58.241, 42.069, 0.658)
pt3dadd(90.24, 58.145, 42.125, 0.65)
pt3dadd(90.249, 58.034, 42.162, 0.608)
pt3dadd(90.257, 57.923, 42.2, 0.566)
pt3dadd(90.266, 57.813, 42.238, 0.524)
pt3dadd(90.274, 57.702, 42.276, 0.482)
pt3dadd(90.283, 57.591, 42.314, 0.44)
pt3dadd(90.291, 57.48, 42.351, 0.396)
pt3dadd(90.3, 57.37, 42.389, 0.354)
pt3dadd(90.309, 57.259, 42.427, 0.312)
pt3dadd(90.317, 57.148, 42.465, 0.27)
pt3dadd(90.339, 57.038, 42.447, 0.274)
pt3dadd(90.365, 56.928, 42.413, 0.294)
pt3dadd(90.39, 56.819, 42.379, 0.314)
pt3dadd(90.416, 56.709, 42.344, 0.332)
pt3dadd(90.442, 56.599, 42.31, 0.352)
pt3dadd(90.467, 56.489, 42.276, 0.37)
pt3dadd(90.493, 56.379, 42.241, 0.39)
pt3dadd(90.519, 56.27, 42.207, 0.41)
pt3dadd(90.544, 56.16, 42.173, 0.428)
pt3dadd(90.57, 56.05, 42.138, 0.448)
pt3dadd(90.662, 55.989, 42.1, 0.426)
pt3dadd(90.754, 55.927, 42.062, 0.404)
pt3dadd(90.846, 55.866, 42.023, 0.382)
pt3dadd(90.939, 55.804, 41.985, 0.358)
pt3dadd(91.031, 55.743, 41.946, 0.336)
pt3dadd(91.123, 55.681, 41.908, 0.314)
pt3dadd(91.215, 55.62, 41.869, 0.292)
pt3dadd(91.307, 55.558, 41.831, 0.27)
pt3dadd(91.399, 55.497, 41.792, 0.248)
pt3dadd(91.492, 55.436, 41.754, 0.226)
}
dend_7[13] {pt3dclear()
pt3dadd(101.831, 87.43, 34.308, 1.13)
pt3dadd(101.781, 87.442, 34.318, 1.106)
pt3dadd(101.668, 87.47, 34.342, 1.052)
pt3dadd(101.555, 87.498, 34.365, 0.996)
pt3dadd(101.442, 87.527, 34.389, 0.942)
pt3dadd(101.329, 87.555, 34.412, 0.888)
pt3dadd(101.216, 87.583, 34.436, 0.832)
pt3dadd(101.103, 87.611, 34.46, 0.778)
pt3dadd(100.989, 87.64, 34.483, 0.724)
pt3dadd(100.876, 87.668, 34.507, 0.668)
pt3dadd(100.763, 87.696, 34.53, 0.614)
pt3dadd(100.65, 87.725, 34.554, 0.56)
pt3dadd(100.537, 87.753, 34.577, 0.504)
pt3dadd(100.424, 87.781, 34.601, 0.45)
pt3dadd(100.311, 87.81, 34.624, 0.396)
pt3dadd(100.197, 87.838, 34.648, 0.34)
pt3dadd(100.087, 87.831, 34.663, 0.332)
pt3dadd(99.982, 87.774, 34.667, 0.386)
pt3dadd(99.876, 87.717, 34.671, 0.44)
pt3dadd(99.771, 87.66, 34.675, 0.494)
pt3dadd(99.665, 87.603, 34.679, 0.55)
pt3dadd(99.559, 87.546, 34.683, 0.604)
pt3dadd(99.454, 87.49, 34.687, 0.658)
pt3dadd(99.348, 87.433, 34.691, 0.712)
pt3dadd(99.243, 87.376, 34.694, 0.768)
pt3dadd(99.137, 87.319, 34.698, 0.822)
pt3dadd(99.035, 87.257, 34.699, 0.866)
pt3dadd(98.933, 87.193, 34.699, 0.908)
pt3dadd(98.831, 87.13, 34.699, 0.952)
pt3dadd(98.729, 87.066, 34.7, 0.994)
pt3dadd(98.627, 87.003, 34.7, 1.038)
pt3dadd(98.525, 86.94, 34.7, 1.08)
pt3dadd(98.423, 86.876, 34.7, 1.122)
pt3dadd(98.322, 86.813, 34.701, 1.166)
pt3dadd(98.22, 86.75, 34.701, 1.208)
pt3dadd(98.118, 86.686, 34.701, 1.252)
pt3dadd(98.008, 86.637, 34.701, 1.222)
pt3dadd(97.898, 86.589, 34.702, 1.186)
pt3dadd(97.788, 86.541, 34.702, 1.152)
pt3dadd(97.678, 86.493, 34.702, 1.116)
pt3dadd(97.568, 86.446, 34.703, 1.082)
pt3dadd(97.458, 86.398, 34.703, 1.046)
pt3dadd(97.348, 86.35, 34.703, 1.012)
pt3dadd(97.238, 86.302, 34.704, 0.976)
pt3dadd(97.128, 86.254, 34.704, 0.942)
pt3dadd(97.018, 86.206, 34.705, 0.906)
pt3dadd(96.912, 86.15, 34.705, 0.904)
pt3dadd(96.806, 86.093, 34.706, 0.904)
pt3dadd(96.7, 86.037, 34.706, 0.904)
pt3dadd(96.595, 85.98, 34.707, 0.904)
pt3dadd(96.489, 85.923, 34.708, 0.904)
pt3dadd(96.383, 85.866, 34.708, 0.904)
pt3dadd(96.277, 85.81, 34.709, 0.904)
pt3dadd(96.172, 85.753, 34.709, 0.904)
pt3dadd(96.066, 85.696, 34.71, 0.904)
pt3dadd(95.96, 85.64, 34.71, 0.904)
pt3dadd(95.847, 85.599, 34.712, 0.862)
pt3dadd(95.734, 85.559, 34.713, 0.82)
pt3dadd(95.621, 85.519, 34.714, 0.776)
pt3dadd(95.508, 85.479, 34.715, 0.732)
pt3dadd(95.395, 85.439, 34.717, 0.688)
pt3dadd(95.282, 85.399, 34.718, 0.646)
pt3dadd(95.168, 85.359, 34.719, 0.602)
pt3dadd(95.055, 85.319, 34.72, 0.558)
pt3dadd(94.942, 85.279, 34.722, 0.514)
pt3dadd(94.829, 85.239, 34.723, 0.47)
pt3dadd(94.713, 85.21, 34.725, 0.456)
pt3dadd(94.596, 85.181, 34.727, 0.442)
pt3dadd(94.48, 85.152, 34.73, 0.428)
pt3dadd(94.364, 85.122, 34.732, 0.414)
pt3dadd(94.247, 85.093, 34.734, 0.4)
pt3dadd(94.131, 85.064, 34.736, 0.388)
}
}
proc shape3d_35() {
dend_7[13] { pt3dadd(94.015, 85.035, 34.739, 0.374)
pt3dadd(93.898, 85.006, 34.741, 0.36)
pt3dadd(93.782, 84.976, 34.743, 0.346)
pt3dadd(93.665, 84.947, 34.745, 0.332)
pt3dadd(93.549, 84.917, 34.75, 0.336)
pt3dadd(93.433, 84.887, 34.754, 0.342)
pt3dadd(93.317, 84.857, 34.759, 0.348)
pt3dadd(93.201, 84.827, 34.763, 0.354)
pt3dadd(93.085, 84.797, 34.767, 0.358)
pt3dadd(92.969, 84.767, 34.772, 0.364)
pt3dadd(92.853, 84.737, 34.776, 0.37)
pt3dadd(92.737, 84.707, 34.781, 0.376)
pt3dadd(92.621, 84.677, 34.785, 0.38)
pt3dadd(92.505, 84.647, 34.789, 0.386)
pt3dadd(92.391, 84.609, 34.797, 0.37)
pt3dadd(92.278, 84.571, 34.805, 0.354)
pt3dadd(92.164, 84.534, 34.813, 0.338)
pt3dadd(92.051, 84.496, 34.82, 0.322)
pt3dadd(91.937, 84.459, 34.828, 0.306)
pt3dadd(91.823, 84.421, 34.835, 0.29)
pt3dadd(91.71, 84.384, 34.843, 0.274)
pt3dadd(91.596, 84.346, 34.851, 0.258)
pt3dadd(91.482, 84.309, 34.858, 0.242)
pt3dadd(91.369, 84.272, 34.866, 0.226)
pt3dadd(91.251, 84.255, 34.878, 0.226)
pt3dadd(91.133, 84.238, 34.891, 0.226)
pt3dadd(91.015, 84.222, 34.903, 0.226)
pt3dadd(90.897, 84.205, 34.915, 0.226)
pt3dadd(90.779, 84.188, 34.928, 0.226)
pt3dadd(90.661, 84.172, 34.94, 0.226)
pt3dadd(90.543, 84.155, 34.952, 0.226)
pt3dadd(90.425, 84.138, 34.965, 0.226)
pt3dadd(90.307, 84.122, 34.977, 0.226)
pt3dadd(90.19, 84.106, 34.99, 0.226)
pt3dadd(90.079, 84.115, 35.028, 0.226)
pt3dadd(89.969, 84.125, 35.067, 0.226)
pt3dadd(89.859, 84.134, 35.105, 0.226)
pt3dadd(89.748, 84.143, 35.144, 0.226)
pt3dadd(89.638, 84.153, 35.182, 0.226)
pt3dadd(89.527, 84.162, 35.22, 0.226)
pt3dadd(89.417, 84.172, 35.259, 0.226)
pt3dadd(89.307, 84.181, 35.297, 0.226)
pt3dadd(89.196, 84.19, 35.335, 0.226)
pt3dadd(89.086, 84.202, 35.373, 0.226)
pt3dadd(88.982, 84.251, 35.403, 0.226)
pt3dadd(88.878, 84.299, 35.433, 0.226)
pt3dadd(88.775, 84.347, 35.463, 0.226)
pt3dadd(88.671, 84.396, 35.493, 0.226)
pt3dadd(88.567, 84.444, 35.522, 0.226)
pt3dadd(88.463, 84.492, 35.552, 0.226)
pt3dadd(88.359, 84.54, 35.582, 0.226)
pt3dadd(88.255, 84.589, 35.612, 0.226)
pt3dadd(88.152, 84.637, 35.642, 0.226)
pt3dadd(88.05, 84.691, 35.67, 0.226)
pt3dadd(87.956, 84.76, 35.691, 0.226)
pt3dadd(87.861, 84.829, 35.713, 0.226)
pt3dadd(87.766, 84.898, 35.734, 0.226)
pt3dadd(87.672, 84.967, 35.756, 0.226)
pt3dadd(87.577, 85.036, 35.777, 0.226)
pt3dadd(87.482, 85.105, 35.799, 0.226)
pt3dadd(87.387, 85.174, 35.82, 0.226)
pt3dadd(87.293, 85.243, 35.842, 0.226)
pt3dadd(87.198, 85.312, 35.863, 0.226)
pt3dadd(87.106, 85.385, 35.883, 0.228)
pt3dadd(87.02, 85.466, 35.9, 0.23)
pt3dadd(86.933, 85.547, 35.916, 0.234)
pt3dadd(86.847, 85.628, 35.932, 0.238)
pt3dadd(86.76, 85.709, 35.948, 0.24)
pt3dadd(86.674, 85.79, 35.965, 0.244)
pt3dadd(86.588, 85.871, 35.981, 0.248)
pt3dadd(86.501, 85.952, 35.998, 0.252)
pt3dadd(86.415, 86.033, 36.014, 0.254)
pt3dadd(86.328, 86.114, 36.03, 0.258)
pt3dadd(86.246, 86.197, 36.05, 0.264)
pt3dadd(86.17, 86.284, 36.078, 0.278)
pt3dadd(86.095, 86.372, 36.105, 0.29)
pt3dadd(86.02, 86.459, 36.132, 0.304)
pt3dadd(85.944, 86.546, 36.16, 0.316)
pt3dadd(85.869, 86.634, 36.187, 0.33)
pt3dadd(85.793, 86.721, 36.215, 0.344)
pt3dadd(85.718, 86.808, 36.242, 0.356)
pt3dadd(85.643, 86.896, 36.269, 0.37)
pt3dadd(85.567, 86.983, 36.297, 0.382)
pt3dadd(85.476, 86.966, 36.351, 0.368)
pt3dadd(85.382, 86.935, 36.408, 0.35)
pt3dadd(85.289, 86.905, 36.466, 0.332)
pt3dadd(85.195, 86.874, 36.523, 0.314)
pt3dadd(85.102, 86.844, 36.58, 0.296)
pt3dadd(85.009, 86.813, 36.638, 0.28)
pt3dadd(84.915, 86.783, 36.695, 0.262)
pt3dadd(84.822, 86.752, 36.753, 0.244)
pt3dadd(84.728, 86.722, 36.81, 0.226)
}
dend_7[14] {pt3dclear()
pt3dadd(115.768, 114.715, 22.552, 1.582)
pt3dadd(115.787, 114.715, 22.558, 1.558)
pt3dadd(115.898, 114.715, 22.596, 1.426)
pt3dadd(116.009, 114.715, 22.634, 1.292)
pt3dadd(116.121, 114.715, 22.672, 1.158)
pt3dadd(116.232, 114.715, 22.709, 1.024)
pt3dadd(116.343, 114.715, 22.747, 0.892)
pt3dadd(116.454, 114.715, 22.785, 0.758)
pt3dadd(116.565, 114.715, 22.823, 0.624)
pt3dadd(116.676, 114.715, 22.86, 0.492)
pt3dadd(116.76, 114.719, 22.927, 0.454)
pt3dadd(116.827, 114.724, 23.009, 0.474)
pt3dadd(116.894, 114.73, 23.092, 0.494)
pt3dadd(116.961, 114.735, 23.174, 0.514)
pt3dadd(117.029, 114.741, 23.257, 0.532)
pt3dadd(117.096, 114.746, 23.34, 0.552)
pt3dadd(117.163, 114.751, 23.422, 0.572)
pt3dadd(117.231, 114.757, 23.505, 0.592)
pt3dadd(117.298, 114.762, 23.588, 0.612)
pt3dadd(117.365, 114.768, 23.67, 0.63)
pt3dadd(117.408, 114.776, 23.764, 0.688)
pt3dadd(117.449, 114.785, 23.857, 0.746)
pt3dadd(117.49, 114.793, 23.951, 0.804)
pt3dadd(117.532, 114.802, 24.044, 0.862)
pt3dadd(117.573, 114.811, 24.138, 0.92)
pt3dadd(117.614, 114.819, 24.232, 0.98)
pt3dadd(117.656, 114.828, 24.325, 1.038)
pt3dadd(117.697, 114.837, 24.419, 1.096)
pt3dadd(117.738, 114.845, 24.512, 1.154)
pt3dadd(117.777, 114.854, 24.606, 1.212)
pt3dadd(117.783, 114.869, 24.705, 1.26)
pt3dadd(117.789, 114.884, 24.805, 1.308)
pt3dadd(117.795, 114.899, 24.904, 1.356)
pt3dadd(117.801, 114.914, 25.003, 1.404)
pt3dadd(117.807, 114.93, 25.102, 1.452)
pt3dadd(117.813, 114.945, 25.201, 1.5)
pt3dadd(117.818, 114.96, 25.3, 1.548)
pt3dadd(117.824, 114.975, 25.399, 1.596)
pt3dadd(117.83, 114.99, 25.498, 1.644)
pt3dadd(117.828, 115.009, 25.596, 1.684)
pt3dadd(117.789, 115.047, 25.684, 1.688)
pt3dadd(117.75, 115.085, 25.773, 1.69)
pt3dadd(117.71, 115.123, 25.862, 1.694)
pt3dadd(117.671, 115.162, 25.951, 1.698)
pt3dadd(117.631, 115.2, 26.04, 1.702)
pt3dadd(117.592, 115.238, 26.129, 1.706)
pt3dadd(117.553, 115.276, 26.218, 1.708)
pt3dadd(117.513, 115.315, 26.307, 1.712)
pt3dadd(117.474, 115.353, 26.396, 1.716)
pt3dadd(117.406, 115.402, 26.465, 1.69)
pt3dadd(117.331, 115.455, 26.53, 1.654)
pt3dadd(117.255, 115.507, 26.594, 1.62)
pt3dadd(117.18, 115.56, 26.658, 1.586)
pt3dadd(117.105, 115.612, 26.723, 1.552)
pt3dadd(117.029, 115.665, 26.787, 1.518)
pt3dadd(116.954, 115.717, 26.852, 1.482)
pt3dadd(116.878, 115.77, 26.916, 1.448)
pt3dadd(116.803, 115.822, 26.98, 1.414)
pt3dadd(116.728, 115.875, 27.045, 1.38)
pt3dadd(116.651, 115.917, 27.113, 1.326)
pt3dadd(116.574, 115.958, 27.181, 1.268)
pt3dadd(116.497, 115.998, 27.25, 1.21)
pt3dadd(116.42, 116.039, 27.319, 1.154)
pt3dadd(116.343, 116.079, 27.388, 1.096)
pt3dadd(116.266, 116.12, 27.457, 1.038)
pt3dadd(116.189, 116.16, 27.526, 0.98)
pt3dadd(116.112, 116.201, 27.594, 0.922)
pt3dadd(116.035, 116.241, 27.663, 0.866)
pt3dadd(115.957, 116.282, 27.732, 0.808)
pt3dadd(115.899, 116.324, 27.812, 0.752)
pt3dadd(115.844, 116.366, 27.893, 0.696)
pt3dadd(115.789, 116.409, 27.975, 0.64)
pt3dadd(115.733, 116.451, 28.056, 0.584)
pt3dadd(115.678, 116.493, 28.138, 0.53)
pt3dadd(115.623, 116.536, 28.219, 0.474)
pt3dadd(115.567, 116.578, 28.3, 0.418)
pt3dadd(115.512, 116.62, 28.382, 0.362)
pt3dadd(115.457, 116.663, 28.463, 0.306)
pt3dadd(115.401, 116.705, 28.545, 0.252)
pt3dadd(115.351, 116.777, 28.612, 0.268)
pt3dadd(115.3, 116.851, 28.679, 0.294)
pt3dadd(115.25, 116.925, 28.746, 0.318)
pt3dadd(115.2, 116.999, 28.812, 0.342)
pt3dadd(115.15, 117.073, 28.879, 0.366)
pt3dadd(115.1, 117.147, 28.946, 0.39)
pt3dadd(115.049, 117.221, 29.012, 0.414)
pt3dadd(114.999, 117.295, 29.079, 0.44)
pt3dadd(114.949, 117.369, 29.146, 0.464)
pt3dadd(114.899, 117.443, 29.212, 0.488)
pt3dadd(114.898, 117.527, 29.284, 0.53)
pt3dadd(114.897, 117.611, 29.355, 0.572)
pt3dadd(114.897, 117.694, 29.427, 0.612)
pt3dadd(114.896, 117.778, 29.498, 0.654)
pt3dadd(114.895, 117.862, 29.57, 0.696)
pt3dadd(114.894, 117.946, 29.641, 0.738)
pt3dadd(114.894, 118.03, 29.713, 0.78)
pt3dadd(114.893, 118.114, 29.785, 0.82)
pt3dadd(114.892, 118.198, 29.856, 0.862)
pt3dadd(114.892, 118.282, 29.927, 0.904)
}
dend_7[15] {pt3dclear()
pt3dadd(114.892, 118.282, 29.927, 0.904)
pt3dadd(114.957, 118.325, 30.002, 0.864)
pt3dadd(115.022, 118.369, 30.077, 0.824)
pt3dadd(115.088, 118.413, 30.152, 0.786)
pt3dadd(115.154, 118.458, 30.227, 0.746)
pt3dadd(115.22, 118.502, 30.302, 0.706)
pt3dadd(115.285, 118.546, 30.377, 0.666)
pt3dadd(115.351, 118.59, 30.452, 0.626)
pt3dadd(115.439, 118.618, 30.516, 0.646)
}
}
proc shape3d_36() {
dend_7[15] { pt3dadd(115.53, 118.645, 30.577, 0.674)
pt3dadd(115.62, 118.671, 30.639, 0.7)
pt3dadd(115.711, 118.697, 30.701, 0.728)
pt3dadd(115.802, 118.724, 30.762, 0.754)
pt3dadd(115.893, 118.75, 30.824, 0.782)
pt3dadd(115.983, 118.777, 30.886, 0.81)
pt3dadd(116.074, 118.803, 30.947, 0.836)
pt3dadd(116.165, 118.829, 31.009, 0.864)
pt3dadd(116.258, 118.852, 31.068, 0.896)
pt3dadd(116.363, 118.859, 31.116, 0.95)
pt3dadd(116.468, 118.866, 31.165, 1.002)
pt3dadd(116.573, 118.872, 31.213, 1.056)
pt3dadd(116.677, 118.879, 31.261, 1.11)
pt3dadd(116.782, 118.886, 31.31, 1.164)
pt3dadd(116.887, 118.893, 31.358, 1.218)
pt3dadd(116.992, 118.9, 31.407, 1.27)
pt3dadd(117.097, 118.907, 31.455, 1.324)
pt3dadd(117.201, 118.913, 31.503, 1.378)
pt3dadd(117.306, 118.918, 31.552, 1.422)
pt3dadd(117.412, 118.916, 31.599, 1.434)
pt3dadd(117.517, 118.914, 31.647, 1.448)
pt3dadd(117.623, 118.912, 31.694, 1.46)
pt3dadd(117.728, 118.91, 31.742, 1.472)
pt3dadd(117.834, 118.908, 31.789, 1.484)
pt3dadd(117.939, 118.905, 31.837, 1.496)
pt3dadd(118.045, 118.903, 31.885, 1.508)
pt3dadd(118.151, 118.901, 31.932, 1.52)
pt3dadd(118.256, 118.899, 31.98, 1.534)
pt3dadd(118.363, 118.896, 32.024, 1.522)
pt3dadd(118.477, 118.892, 32.056, 1.43)
pt3dadd(118.591, 118.887, 32.088, 1.338)
pt3dadd(118.704, 118.883, 32.12, 1.246)
pt3dadd(118.818, 118.878, 32.152, 1.152)
pt3dadd(118.931, 118.874, 32.184, 1.06)
pt3dadd(119.045, 118.87, 32.216, 0.968)
pt3dadd(119.159, 118.865, 32.248, 0.876)
pt3dadd(119.272, 118.861, 32.28, 0.784)
pt3dadd(119.386, 118.856, 32.312, 0.692)
pt3dadd(119.5, 118.851, 32.343, 0.612)
pt3dadd(119.615, 118.841, 32.37, 0.58)
pt3dadd(119.73, 118.831, 32.397, 0.548)
pt3dadd(119.845, 118.821, 32.424, 0.516)
pt3dadd(119.96, 118.811, 32.45, 0.482)
pt3dadd(120.076, 118.801, 32.477, 0.45)
pt3dadd(120.191, 118.791, 32.504, 0.418)
pt3dadd(120.306, 118.781, 32.531, 0.386)
pt3dadd(120.421, 118.771, 32.558, 0.354)
pt3dadd(120.536, 118.761, 32.585, 0.32)
pt3dadd(120.65, 118.75, 32.614, 0.3)
pt3dadd(120.76, 118.734, 32.653, 0.316)
pt3dadd(120.869, 118.717, 32.691, 0.332)
pt3dadd(120.979, 118.701, 32.73, 0.348)
pt3dadd(121.088, 118.685, 32.768, 0.364)
pt3dadd(121.198, 118.669, 32.807, 0.38)
pt3dadd(121.308, 118.653, 32.845, 0.398)
pt3dadd(121.417, 118.637, 32.884, 0.414)
pt3dadd(121.526, 118.621, 32.922, 0.43)
pt3dadd(121.637, 118.605, 32.961, 0.446)
pt3dadd(121.745, 118.584, 33, 0.468)
pt3dadd(121.848, 118.549, 33.042, 0.506)
pt3dadd(121.951, 118.515, 33.084, 0.542)
pt3dadd(122.054, 118.48, 33.126, 0.578)
pt3dadd(122.158, 118.446, 33.168, 0.616)
pt3dadd(122.261, 118.412, 33.209, 0.652)
pt3dadd(122.364, 118.377, 33.251, 0.688)
pt3dadd(122.467, 118.343, 33.293, 0.726)
pt3dadd(122.572, 118.308, 33.335, 0.762)
pt3dadd(122.675, 118.274, 33.377, 0.798)
pt3dadd(122.774, 118.229, 33.418, 0.83)
pt3dadd(122.868, 118.172, 33.456, 0.856)
pt3dadd(122.963, 118.114, 33.495, 0.882)
pt3dadd(123.058, 118.056, 33.533, 0.908)
pt3dadd(123.152, 117.999, 33.572, 0.934)
pt3dadd(123.246, 117.941, 33.611, 0.958)
pt3dadd(123.341, 117.883, 33.649, 0.984)
pt3dadd(123.436, 117.825, 33.688, 1.01)
pt3dadd(123.53, 117.768, 33.726, 1.036)
pt3dadd(123.624, 117.71, 33.765, 1.062)
pt3dadd(123.71, 117.65, 33.813, 1.056)
pt3dadd(123.786, 117.589, 33.871, 1.016)
pt3dadd(123.862, 117.527, 33.929, 0.978)
pt3dadd(123.937, 117.465, 33.987, 0.94)
pt3dadd(124.013, 117.403, 34.045, 0.902)
pt3dadd(124.088, 117.341, 34.103, 0.862)
pt3dadd(124.164, 117.279, 34.161, 0.824)
pt3dadd(124.24, 117.217, 34.219, 0.786)
pt3dadd(124.315, 117.156, 34.277, 0.746)
pt3dadd(124.391, 117.094, 34.335, 0.708)
pt3dadd(124.469, 117.022, 34.379, 0.7)
pt3dadd(124.55, 116.942, 34.411, 0.718)
pt3dadd(124.631, 116.861, 34.442, 0.738)
pt3dadd(124.711, 116.781, 34.474, 0.756)
pt3dadd(124.792, 116.7, 34.506, 0.776)
pt3dadd(124.872, 116.62, 34.537, 0.794)
pt3dadd(124.952, 116.539, 34.569, 0.814)
pt3dadd(125.033, 116.459, 34.601, 0.832)
pt3dadd(125.113, 116.378, 34.632, 0.852)
pt3dadd(125.194, 116.298, 34.664, 0.87)
pt3dadd(125.275, 116.216, 34.691, 0.888)
pt3dadd(125.358, 116.134, 34.714, 0.906)
pt3dadd(125.441, 116.051, 34.736, 0.924)
pt3dadd(125.524, 115.968, 34.759, 0.942)
pt3dadd(125.606, 115.886, 34.781, 0.958)
pt3dadd(125.689, 115.803, 34.804, 0.976)
pt3dadd(125.772, 115.721, 34.826, 0.994)
pt3dadd(125.855, 115.638, 34.849, 1.012)
pt3dadd(125.938, 115.555, 34.871, 1.028)
pt3dadd(126.02, 115.473, 34.894, 1.046)
pt3dadd(126.101, 115.392, 34.923, 1.078)
pt3dadd(126.181, 115.312, 34.958, 1.12)
pt3dadd(126.26, 115.233, 34.993, 1.164)
pt3dadd(126.34, 115.153, 35.028, 1.206)
pt3dadd(126.419, 115.074, 35.063, 1.25)
pt3dadd(126.499, 114.995, 35.097, 1.292)
pt3dadd(126.578, 114.915, 35.132, 1.336)
pt3dadd(126.658, 114.836, 35.167, 1.38)
pt3dadd(126.738, 114.756, 35.202, 1.422)
pt3dadd(126.817, 114.677, 35.237, 1.466)
pt3dadd(126.896, 114.598, 35.273, 1.486)
pt3dadd(126.976, 114.519, 35.309, 1.494)
pt3dadd(127.055, 114.44, 35.345, 1.5)
pt3dadd(127.134, 114.361, 35.382, 1.506)
pt3dadd(127.213, 114.282, 35.418, 1.514)
pt3dadd(127.292, 114.203, 35.454, 1.52)
pt3dadd(127.372, 114.124, 35.49, 1.526)
pt3dadd(127.452, 114.045, 35.527, 1.532)
pt3dadd(127.531, 113.966, 35.563, 1.54)
pt3dadd(127.61, 113.888, 35.599, 1.546)
pt3dadd(127.691, 113.806, 35.627, 1.516)
pt3dadd(127.774, 113.724, 35.651, 1.466)
pt3dadd(127.856, 113.642, 35.675, 1.418)
pt3dadd(127.939, 113.56, 35.699, 1.368)
pt3dadd(128.021, 113.477, 35.723, 1.318)
pt3dadd(128.104, 113.395, 35.747, 1.268)
pt3dadd(128.186, 113.313, 35.771, 1.22)
pt3dadd(128.269, 113.231, 35.795, 1.17)
pt3dadd(128.351, 113.148, 35.819, 1.12)
pt3dadd(128.434, 113.066, 35.843, 1.07)
pt3dadd(128.518, 112.983, 35.862, 1.032)
pt3dadd(128.602, 112.9, 35.878, 0.998)
pt3dadd(128.686, 112.817, 35.894, 0.966)
pt3dadd(128.77, 112.733, 35.91, 0.932)
pt3dadd(128.854, 112.65, 35.927, 0.9)
pt3dadd(128.938, 112.567, 35.943, 0.868)
pt3dadd(129.023, 112.483, 35.959, 0.834)
pt3dadd(129.107, 112.4, 35.975, 0.802)
pt3dadd(129.191, 112.317, 35.991, 0.768)
pt3dadd(129.275, 112.233, 36.007, 0.736)
pt3dadd(129.36, 112.15, 36.02, 0.722)
pt3dadd(129.444, 112.066, 36.032, 0.716)
pt3dadd(129.529, 111.982, 36.043, 0.712)
pt3dadd(129.614, 111.899, 36.055, 0.708)
pt3dadd(129.7, 111.815, 36.066, 0.702)
pt3dadd(129.784, 111.731, 36.077, 0.698)
pt3dadd(129.869, 111.648, 36.089, 0.694)
pt3dadd(129.954, 111.564, 36.1, 0.688)
pt3dadd(130.039, 111.48, 36.112, 0.684)
pt3dadd(130.123, 111.396, 36.123, 0.68)
pt3dadd(130.207, 111.315, 36.144, 0.684)
pt3dadd(130.29, 111.234, 36.169, 0.692)
pt3dadd(130.374, 111.153, 36.194, 0.7)
pt3dadd(130.457, 111.072, 36.219, 0.708)
pt3dadd(130.54, 110.991, 36.244, 0.716)
pt3dadd(130.624, 110.91, 36.27, 0.726)
pt3dadd(130.706, 110.829, 36.295, 0.734)
pt3dadd(130.789, 110.748, 36.32, 0.742)
pt3dadd(130.873, 110.667, 36.345, 0.75)
pt3dadd(130.956, 110.586, 36.37, 0.758)
pt3dadd(131.036, 110.51, 36.409, 0.772)
pt3dadd(131.116, 110.435, 36.451, 0.786)
pt3dadd(131.196, 110.361, 36.493, 0.8)
pt3dadd(131.275, 110.286, 36.535, 0.816)
pt3dadd(131.354, 110.212, 36.577, 0.83)
pt3dadd(131.434, 110.137, 36.618, 0.844)
pt3dadd(131.514, 110.063, 36.66, 0.858)
pt3dadd(131.593, 109.988, 36.702, 0.874)
pt3dadd(131.672, 109.914, 36.744, 0.888)
pt3dadd(131.753, 109.839, 36.786, 0.902)
pt3dadd(131.837, 109.763, 36.817, 0.906)
pt3dadd(131.922, 109.686, 36.847, 0.908)
pt3dadd(132.006, 109.609, 36.877, 0.91)
pt3dadd(132.091, 109.533, 36.907, 0.912)
pt3dadd(132.176, 109.456, 36.937, 0.912)
pt3dadd(132.262, 109.379, 36.967, 0.914)
pt3dadd(132.347, 109.303, 36.997, 0.916)
pt3dadd(132.432, 109.226, 37.027, 0.918)
pt3dadd(132.516, 109.149, 37.057, 0.92)
pt3dadd(132.601, 109.073, 37.087, 0.922)
pt3dadd(132.69, 108.996, 37.109, 0.95)
pt3dadd(132.779, 108.919, 37.13, 0.982)
pt3dadd(132.868, 108.842, 37.15, 1.016)
pt3dadd(132.956, 108.765, 37.171, 1.048)
pt3dadd(133.044, 108.688, 37.191, 1.08)
pt3dadd(133.133, 108.611, 37.212, 1.114)
pt3dadd(133.222, 108.534, 37.232, 1.146)
pt3dadd(133.31, 108.457, 37.253, 1.178)
pt3dadd(133.399, 108.38, 37.273, 1.21)
pt3dadd(133.488, 108.303, 37.294, 1.244)
pt3dadd(133.582, 108.237, 37.323, 1.258)
pt3dadd(133.676, 108.174, 37.354, 1.268)
}
}
proc shape3d_37() {
dend_7[15] { pt3dadd(133.771, 108.11, 37.384, 1.278)
pt3dadd(133.866, 108.046, 37.415, 1.29)
pt3dadd(133.961, 107.982, 37.446, 1.3)
pt3dadd(134.056, 107.918, 37.477, 1.312)
pt3dadd(134.15, 107.854, 37.508, 1.322)
pt3dadd(134.244, 107.79, 37.538, 1.334)
pt3dadd(134.339, 107.727, 37.569, 1.344)
pt3dadd(134.434, 107.663, 37.6, 1.356)
pt3dadd(134.53, 107.603, 37.633, 1.352)
pt3dadd(134.626, 107.543, 37.667, 1.348)
pt3dadd(134.722, 107.483, 37.7, 1.344)
pt3dadd(134.818, 107.423, 37.734, 1.34)
pt3dadd(134.914, 107.363, 37.767, 1.336)
pt3dadd(135.01, 107.303, 37.801, 1.332)
pt3dadd(135.106, 107.243, 37.834, 1.328)
pt3dadd(135.202, 107.184, 37.868, 1.324)
pt3dadd(135.298, 107.124, 37.901, 1.32)
pt3dadd(135.394, 107.064, 37.935, 1.316)
pt3dadd(135.486, 106.996, 37.962, 1.3)
pt3dadd(135.58, 106.927, 37.988, 1.284)
pt3dadd(135.673, 106.859, 38.015, 1.268)
pt3dadd(135.766, 106.791, 38.042, 1.252)
pt3dadd(135.859, 106.722, 38.069, 1.236)
pt3dadd(135.953, 106.654, 38.095, 1.22)
pt3dadd(136.046, 106.585, 38.122, 1.204)
pt3dadd(136.139, 106.517, 38.148, 1.188)
pt3dadd(136.232, 106.449, 38.175, 1.172)
pt3dadd(136.326, 106.38, 38.202, 1.156)
pt3dadd(136.415, 106.305, 38.223, 1.14)
pt3dadd(136.505, 106.228, 38.243, 1.124)
pt3dadd(136.594, 106.152, 38.264, 1.108)
pt3dadd(136.684, 106.076, 38.284, 1.092)
pt3dadd(136.774, 106, 38.305, 1.076)
pt3dadd(136.862, 105.924, 38.325, 1.06)
pt3dadd(136.952, 105.848, 38.346, 1.044)
pt3dadd(137.041, 105.772, 38.366, 1.026)
pt3dadd(137.131, 105.696, 38.387, 1.01)
pt3dadd(137.22, 105.619, 38.407, 0.994)
pt3dadd(137.304, 105.542, 38.437, 0.994)
pt3dadd(137.388, 105.464, 38.468, 0.994)
pt3dadd(137.472, 105.386, 38.498, 0.994)
pt3dadd(137.556, 105.309, 38.528, 0.994)
pt3dadd(137.64, 105.231, 38.559, 0.994)
pt3dadd(137.723, 105.153, 38.589, 0.994)
pt3dadd(137.807, 105.075, 38.62, 0.994)
pt3dadd(137.891, 104.997, 38.65, 0.996)
pt3dadd(137.975, 104.92, 38.681, 0.996)
pt3dadd(138.059, 104.842, 38.711, 0.996)
pt3dadd(138.137, 104.763, 38.748, 1.01)
pt3dadd(138.216, 104.684, 38.786, 1.022)
pt3dadd(138.294, 104.605, 38.823, 1.036)
pt3dadd(138.373, 104.527, 38.86, 1.05)
pt3dadd(138.452, 104.448, 38.897, 1.064)
pt3dadd(138.53, 104.369, 38.934, 1.078)
pt3dadd(138.61, 104.29, 38.971, 1.09)
pt3dadd(138.688, 104.211, 39.008, 1.104)
pt3dadd(138.767, 104.132, 39.046, 1.118)
pt3dadd(138.846, 104.053, 39.082, 1.13)
pt3dadd(138.929, 103.971, 39.105, 1.128)
pt3dadd(139.01, 103.888, 39.128, 1.128)
pt3dadd(139.093, 103.805, 39.151, 1.126)
pt3dadd(139.175, 103.722, 39.175, 1.124)
pt3dadd(139.258, 103.64, 39.198, 1.124)
pt3dadd(139.34, 103.557, 39.221, 1.122)
pt3dadd(139.422, 103.474, 39.244, 1.12)
pt3dadd(139.505, 103.392, 39.268, 1.12)
pt3dadd(139.586, 103.309, 39.291, 1.118)
pt3dadd(139.669, 103.226, 39.313, 1.116)
pt3dadd(139.753, 103.141, 39.325, 1.1)
pt3dadd(139.837, 103.057, 39.336, 1.084)
pt3dadd(139.921, 102.972, 39.348, 1.068)
pt3dadd(140.005, 102.888, 39.359, 1.052)
pt3dadd(140.089, 102.803, 39.371, 1.036)
pt3dadd(140.173, 102.718, 39.382, 1.02)
pt3dadd(140.257, 102.633, 39.394, 1.006)
pt3dadd(140.341, 102.549, 39.405, 0.99)
pt3dadd(140.425, 102.464, 39.417, 0.974)
pt3dadd(140.509, 102.38, 39.428, 0.96)
pt3dadd(140.593, 102.294, 39.436, 0.964)
pt3dadd(140.677, 102.209, 39.444, 0.968)
pt3dadd(140.761, 102.124, 39.451, 0.972)
pt3dadd(140.845, 102.039, 39.459, 0.976)
pt3dadd(140.929, 101.954, 39.466, 0.98)
pt3dadd(141.013, 101.869, 39.474, 0.984)
pt3dadd(141.097, 101.784, 39.482, 0.988)
pt3dadd(141.181, 101.699, 39.489, 0.992)
pt3dadd(141.266, 101.614, 39.497, 0.996)
pt3dadd(141.35, 101.529, 39.505, 1)
pt3dadd(141.434, 101.443, 39.511, 1.014)
pt3dadd(141.518, 101.358, 39.517, 1.026)
pt3dadd(141.602, 101.273, 39.522, 1.04)
pt3dadd(141.686, 101.187, 39.529, 1.052)
pt3dadd(141.77, 101.102, 39.535, 1.066)
pt3dadd(141.854, 101.017, 39.541, 1.08)
pt3dadd(141.938, 100.931, 39.547, 1.092)
pt3dadd(142.022, 100.846, 39.553, 1.106)
pt3dadd(142.106, 100.761, 39.559, 1.118)
pt3dadd(142.19, 100.675, 39.565, 1.13)
pt3dadd(142.273, 100.589, 39.575, 1.13)
pt3dadd(142.357, 100.504, 39.585, 1.13)
pt3dadd(142.44, 100.418, 39.594, 1.13)
pt3dadd(142.523, 100.332, 39.604, 1.13)
pt3dadd(142.606, 100.247, 39.614, 1.13)
pt3dadd(142.69, 100.161, 39.624, 1.13)
pt3dadd(142.772, 100.075, 39.634, 1.13)
pt3dadd(142.855, 99.99, 39.643, 1.13)
pt3dadd(142.939, 99.904, 39.653, 1.13)
pt3dadd(143.021, 99.818, 39.666, 1.128)
pt3dadd(143.098, 99.735, 39.7, 1.114)
pt3dadd(143.173, 99.652, 39.734, 1.1)
pt3dadd(143.25, 99.569, 39.769, 1.084)
pt3dadd(143.326, 99.486, 39.803, 1.07)
pt3dadd(143.402, 99.403, 39.838, 1.056)
pt3dadd(143.478, 99.32, 39.872, 1.04)
pt3dadd(143.555, 99.237, 39.907, 1.026)
pt3dadd(143.63, 99.154, 39.941, 1.012)
pt3dadd(143.707, 99.071, 39.976, 0.996)
pt3dadd(143.783, 98.988, 40.01, 0.98)
pt3dadd(143.856, 98.903, 40.044, 0.96)
pt3dadd(143.93, 98.817, 40.078, 0.94)
pt3dadd(144.004, 98.732, 40.112, 0.92)
pt3dadd(144.078, 98.647, 40.146, 0.9)
pt3dadd(144.152, 98.562, 40.181, 0.88)
pt3dadd(144.226, 98.477, 40.215, 0.86)
pt3dadd(144.3, 98.391, 40.249, 0.84)
pt3dadd(144.373, 98.306, 40.283, 0.82)
pt3dadd(144.448, 98.221, 40.317, 0.798)
pt3dadd(144.52, 98.132, 40.347, 0.782)
pt3dadd(144.587, 98.037, 40.369, 0.77)
pt3dadd(144.655, 97.941, 40.391, 0.76)
pt3dadd(144.722, 97.846, 40.413, 0.75)
pt3dadd(144.791, 97.75, 40.435, 0.738)
pt3dadd(144.858, 97.655, 40.456, 0.728)
pt3dadd(144.926, 97.559, 40.478, 0.718)
pt3dadd(144.994, 97.464, 40.5, 0.706)
pt3dadd(145.061, 97.368, 40.522, 0.696)
pt3dadd(145.129, 97.273, 40.543, 0.684)
pt3dadd(145.195, 97.175, 40.562, 0.678)
pt3dadd(145.258, 97.074, 40.575, 0.678)
pt3dadd(145.32, 96.972, 40.589, 0.678)
pt3dadd(145.382, 96.871, 40.602, 0.678)
pt3dadd(145.445, 96.77, 40.615, 0.678)
pt3dadd(145.507, 96.669, 40.629, 0.678)
pt3dadd(145.57, 96.568, 40.642, 0.678)
pt3dadd(145.632, 96.466, 40.655, 0.678)
pt3dadd(145.694, 96.365, 40.669, 0.678)
pt3dadd(145.757, 96.264, 40.682, 0.678)
pt3dadd(145.824, 96.166, 40.693, 0.678)
pt3dadd(145.898, 96.072, 40.701, 0.678)
pt3dadd(145.973, 95.978, 40.71, 0.678)
pt3dadd(146.047, 95.884, 40.718, 0.678)
pt3dadd(146.12, 95.79, 40.726, 0.678)
pt3dadd(146.195, 95.697, 40.734, 0.678)
pt3dadd(146.269, 95.603, 40.742, 0.678)
pt3dadd(146.344, 95.509, 40.75, 0.678)
pt3dadd(146.418, 95.415, 40.759, 0.678)
pt3dadd(146.491, 95.321, 40.767, 0.678)
pt3dadd(146.569, 95.231, 40.777, 0.678)
pt3dadd(146.651, 95.144, 40.791, 0.678)
pt3dadd(146.732, 95.058, 40.806, 0.678)
pt3dadd(146.814, 94.972, 40.819, 0.678)
pt3dadd(146.896, 94.885, 40.833, 0.678)
pt3dadd(146.977, 94.799, 40.847, 0.678)
pt3dadd(147.059, 94.713, 40.862, 0.678)
pt3dadd(147.14, 94.626, 40.876, 0.678)
pt3dadd(147.222, 94.54, 40.89, 0.678)
pt3dadd(147.304, 94.454, 40.904, 0.678)
pt3dadd(147.389, 94.375, 40.926, 0.69)
pt3dadd(147.479, 94.306, 40.96, 0.722)
pt3dadd(147.568, 94.238, 40.993, 0.752)
pt3dadd(147.658, 94.169, 41.027, 0.782)
pt3dadd(147.748, 94.101, 41.061, 0.814)
pt3dadd(147.838, 94.032, 41.095, 0.844)
pt3dadd(147.928, 93.964, 41.129, 0.874)
pt3dadd(148.016, 93.895, 41.163, 0.906)
pt3dadd(148.106, 93.827, 41.196, 0.936)
pt3dadd(148.196, 93.758, 41.23, 0.966)
pt3dadd(148.284, 93.696, 41.275, 0.99)
pt3dadd(148.369, 93.638, 41.325, 1.008)
pt3dadd(148.454, 93.579, 41.375, 1.026)
pt3dadd(148.541, 93.521, 41.426, 1.046)
pt3dadd(148.626, 93.462, 41.476, 1.064)
pt3dadd(148.712, 93.404, 41.526, 1.082)
pt3dadd(148.798, 93.345, 41.576, 1.102)
pt3dadd(148.883, 93.287, 41.627, 1.12)
pt3dadd(148.969, 93.228, 41.677, 1.14)
pt3dadd(149.054, 93.17, 41.727, 1.158)
pt3dadd(149.129, 93.109, 41.787, 1.132)
pt3dadd(149.198, 93.047, 41.849, 1.088)
pt3dadd(149.269, 92.985, 41.912, 1.046)
pt3dadd(149.339, 92.923, 41.975, 1.002)
pt3dadd(149.408, 92.861, 42.038, 0.96)
pt3dadd(149.478, 92.799, 42.1, 0.916)
pt3dadd(149.549, 92.737, 42.163, 0.874)
pt3dadd(149.618, 92.675, 42.226, 0.832)
pt3dadd(149.688, 92.613, 42.289, 0.788)
pt3dadd(149.758, 92.551, 42.351, 0.746)
pt3dadd(149.822, 92.518, 42.43, 0.742)
pt3dadd(149.886, 92.489, 42.512, 0.746)
pt3dadd(149.95, 92.46, 42.593, 0.748)
}
}
proc shape3d_38() {
dend_7[15] { pt3dadd(150.013, 92.431, 42.674, 0.752)
pt3dadd(150.077, 92.402, 42.756, 0.754)
pt3dadd(150.139, 92.373, 42.837, 0.758)
pt3dadd(150.203, 92.344, 42.919, 0.76)
pt3dadd(150.266, 92.315, 43, 0.764)
pt3dadd(150.33, 92.286, 43.081, 0.766)
pt3dadd(150.394, 92.257, 43.163, 0.77)
pt3dadd(150.431, 92.245, 43.257, 0.716)
pt3dadd(150.469, 92.232, 43.351, 0.662)
pt3dadd(150.506, 92.22, 43.446, 0.606)
pt3dadd(150.545, 92.207, 43.54, 0.552)
pt3dadd(150.582, 92.195, 43.635, 0.498)
pt3dadd(150.619, 92.182, 43.729, 0.444)
pt3dadd(150.658, 92.17, 43.823, 0.39)
pt3dadd(150.695, 92.157, 43.918, 0.334)
pt3dadd(150.733, 92.145, 44.012, 0.28)
pt3dadd(150.77, 92.132, 44.106, 0.226)
}
dend_7[16] {pt3dclear()
pt3dadd(114.892, 118.282, 29.927, 0.904)
pt3dadd(114.877, 118.318, 29.949, 0.904)
pt3dadd(114.841, 118.411, 30.005, 0.904)
pt3dadd(114.804, 118.504, 30.061, 0.904)
pt3dadd(114.768, 118.597, 30.116, 0.904)
pt3dadd(114.731, 118.69, 30.171, 0.904)
pt3dadd(114.695, 118.783, 30.227, 0.904)
pt3dadd(114.658, 118.876, 30.282, 0.904)
pt3dadd(114.622, 118.969, 30.338, 0.904)
pt3dadd(114.585, 119.062, 30.393, 0.904)
pt3dadd(114.549, 119.155, 30.449, 0.904)
pt3dadd(114.512, 119.248, 30.504, 0.904)
pt3dadd(114.475, 119.34, 30.56, 0.904)
pt3dadd(114.439, 119.433, 30.615, 0.904)
pt3dadd(114.402, 119.526, 30.671, 0.904)
pt3dadd(114.366, 119.619, 30.726, 0.904)
pt3dadd(114.329, 119.712, 30.782, 0.904)
pt3dadd(114.292, 119.805, 30.837, 0.904)
pt3dadd(114.256, 119.898, 30.893, 0.904)
pt3dadd(114.234, 119.992, 30.952, 0.89)
pt3dadd(114.213, 120.086, 31.011, 0.876)
pt3dadd(114.193, 120.181, 31.07, 0.862)
pt3dadd(114.172, 120.276, 31.129, 0.846)
pt3dadd(114.152, 120.371, 31.188, 0.832)
pt3dadd(114.131, 120.464, 31.247, 0.816)
pt3dadd(114.111, 120.559, 31.306, 0.802)
pt3dadd(114.09, 120.654, 31.366, 0.786)
pt3dadd(114.07, 120.749, 31.425, 0.772)
pt3dadd(114.05, 120.844, 31.484, 0.758)
pt3dadd(114.045, 120.937, 31.546, 0.73)
pt3dadd(114.04, 121.032, 31.607, 0.7)
pt3dadd(114.035, 121.126, 31.669, 0.672)
pt3dadd(114.03, 121.22, 31.731, 0.644)
pt3dadd(114.025, 121.315, 31.792, 0.614)
pt3dadd(114.021, 121.409, 31.854, 0.586)
pt3dadd(114.016, 121.504, 31.916, 0.558)
pt3dadd(114.011, 121.598, 31.977, 0.528)
pt3dadd(114.006, 121.692, 32.039, 0.5)
pt3dadd(114.001, 121.787, 32.101, 0.472)
pt3dadd(113.992, 121.891, 32.149, 0.526)
pt3dadd(113.984, 121.996, 32.198, 0.582)
pt3dadd(113.975, 122.1, 32.246, 0.638)
pt3dadd(113.966, 122.204, 32.295, 0.694)
pt3dadd(113.957, 122.31, 32.343, 0.75)
pt3dadd(113.948, 122.414, 32.391, 0.806)
pt3dadd(113.939, 122.519, 32.44, 0.86)
pt3dadd(113.93, 122.623, 32.488, 0.916)
pt3dadd(113.921, 122.728, 32.536, 0.972)
pt3dadd(113.912, 122.833, 32.585, 1.028)
pt3dadd(113.9, 122.93, 32.642, 1.054)
pt3dadd(113.888, 123.029, 32.699, 1.078)
pt3dadd(113.876, 123.126, 32.756, 1.102)
pt3dadd(113.864, 123.224, 32.813, 1.128)
pt3dadd(113.852, 123.323, 32.869, 1.152)
pt3dadd(113.84, 123.42, 32.926, 1.178)
pt3dadd(113.828, 123.518, 32.983, 1.202)
pt3dadd(113.816, 123.616, 33.04, 1.226)
pt3dadd(113.804, 123.714, 33.097, 1.252)
pt3dadd(113.792, 123.812, 33.154, 1.276)
pt3dadd(113.76, 123.896, 33.22, 1.284)
pt3dadd(113.727, 123.982, 33.285, 1.292)
pt3dadd(113.694, 124.066, 33.35, 1.3)
pt3dadd(113.662, 124.151, 33.416, 1.308)
pt3dadd(113.629, 124.236, 33.481, 1.316)
pt3dadd(113.596, 124.32, 33.546, 1.324)
pt3dadd(113.564, 124.405, 33.612, 1.334)
pt3dadd(113.531, 124.49, 33.677, 1.342)
pt3dadd(113.499, 124.574, 33.742, 1.35)
pt3dadd(113.464, 124.66, 33.807, 1.358)
pt3dadd(113.421, 124.742, 33.869, 1.366)
pt3dadd(113.378, 124.826, 33.932, 1.374)
pt3dadd(113.335, 124.909, 33.994, 1.382)
pt3dadd(113.292, 124.993, 34.056, 1.39)
pt3dadd(113.249, 125.076, 34.118, 1.398)
pt3dadd(113.205, 125.16, 34.181, 1.406)
pt3dadd(113.162, 125.243, 34.243, 1.414)
pt3dadd(113.119, 125.327, 34.305, 1.422)
pt3dadd(113.076, 125.41, 34.368, 1.428)
pt3dadd(113.038, 125.5, 34.424, 1.44)
pt3dadd(113.01, 125.605, 34.467, 1.454)
pt3dadd(112.983, 125.71, 34.511, 1.468)
pt3dadd(112.956, 125.814, 34.554, 1.484)
pt3dadd(112.928, 125.918, 34.597, 1.498)
pt3dadd(112.901, 126.023, 34.641, 1.514)
pt3dadd(112.874, 126.128, 34.684, 1.528)
pt3dadd(112.846, 126.233, 34.727, 1.544)
pt3dadd(112.819, 126.337, 34.771, 1.558)
pt3dadd(112.791, 126.442, 34.814, 1.572)
pt3dadd(112.77, 126.55, 34.853, 1.58)
pt3dadd(112.758, 126.662, 34.885, 1.578)
pt3dadd(112.747, 126.776, 34.916, 1.574)
pt3dadd(112.735, 126.889, 34.948, 1.57)
pt3dadd(112.723, 127.002, 34.98, 1.566)
pt3dadd(112.712, 127.116, 35.012, 1.564)
pt3dadd(112.7, 127.229, 35.044, 1.56)
pt3dadd(112.689, 127.342, 35.076, 1.556)
pt3dadd(112.677, 127.454, 35.107, 1.552)
pt3dadd(112.665, 127.568, 35.139, 1.548)
pt3dadd(112.658, 127.679, 35.176, 1.54)
pt3dadd(112.658, 127.787, 35.221, 1.522)
pt3dadd(112.658, 127.894, 35.265, 1.504)
pt3dadd(112.657, 128.002, 35.309, 1.488)
pt3dadd(112.657, 128.11, 35.354, 1.47)
pt3dadd(112.656, 128.216, 35.398, 1.452)
pt3dadd(112.656, 128.324, 35.442, 1.436)
pt3dadd(112.656, 128.432, 35.487, 1.418)
pt3dadd(112.655, 128.539, 35.531, 1.402)
pt3dadd(112.655, 128.647, 35.575, 1.384)
pt3dadd(112.655, 128.756, 35.617, 1.38)
pt3dadd(112.654, 128.867, 35.656, 1.394)
pt3dadd(112.653, 128.977, 35.695, 1.408)
pt3dadd(112.653, 129.088, 35.733, 1.422)
pt3dadd(112.652, 129.198, 35.772, 1.438)
pt3dadd(112.652, 129.31, 35.811, 1.452)
pt3dadd(112.651, 129.42, 35.85, 1.466)
pt3dadd(112.65, 129.53, 35.888, 1.48)
pt3dadd(112.65, 129.641, 35.927, 1.494)
pt3dadd(112.649, 129.751, 35.966, 1.508)
pt3dadd(112.648, 129.86, 36.008, 1.51)
pt3dadd(112.647, 129.966, 36.056, 1.496)
pt3dadd(112.646, 130.07, 36.104, 1.482)
pt3dadd(112.645, 130.176, 36.152, 1.466)
pt3dadd(112.644, 130.282, 36.199, 1.452)
pt3dadd(112.642, 130.387, 36.247, 1.438)
pt3dadd(112.641, 130.493, 36.295, 1.424)
pt3dadd(112.64, 130.598, 36.342, 1.41)
pt3dadd(112.639, 130.704, 36.39, 1.396)
pt3dadd(112.637, 130.81, 36.438, 1.38)
pt3dadd(112.636, 130.914, 36.486, 1.358)
pt3dadd(112.634, 131.017, 36.537, 1.324)
pt3dadd(112.632, 131.122, 36.587, 1.29)
pt3dadd(112.63, 131.225, 36.637, 1.256)
pt3dadd(112.628, 131.329, 36.687, 1.222)
pt3dadd(112.626, 131.432, 36.737, 1.188)
pt3dadd(112.624, 131.537, 36.787, 1.154)
pt3dadd(112.623, 131.64, 36.838, 1.12)
pt3dadd(112.62, 131.744, 36.888, 1.088)
pt3dadd(112.619, 131.848, 36.938, 1.054)
pt3dadd(112.616, 131.954, 36.984, 1.018)
pt3dadd(112.613, 132.064, 37.026, 0.982)
pt3dadd(112.61, 132.172, 37.068, 0.946)
pt3dadd(112.607, 132.281, 37.11, 0.91)
pt3dadd(112.604, 132.39, 37.152, 0.874)
pt3dadd(112.601, 132.498, 37.194, 0.838)
pt3dadd(112.597, 132.607, 37.236, 0.802)
pt3dadd(112.594, 132.716, 37.278, 0.766)
pt3dadd(112.591, 132.826, 37.32, 0.732)
pt3dadd(112.588, 132.934, 37.362, 0.696)
pt3dadd(112.583, 133.038, 37.412, 0.66)
pt3dadd(112.575, 133.135, 37.469, 0.626)
pt3dadd(112.568, 133.234, 37.527, 0.592)
pt3dadd(112.561, 133.331, 37.584, 0.56)
pt3dadd(112.553, 133.429, 37.642, 0.526)
pt3dadd(112.546, 133.526, 37.7, 0.492)
pt3dadd(112.538, 133.625, 37.757, 0.458)
pt3dadd(112.531, 133.722, 37.815, 0.424)
pt3dadd(112.523, 133.82, 37.872, 0.39)
pt3dadd(112.516, 133.918, 37.93, 0.356)
pt3dadd(112.507, 134.014, 37.989, 0.356)
pt3dadd(112.496, 134.108, 38.05, 0.388)
pt3dadd(112.486, 134.203, 38.111, 0.422)
pt3dadd(112.475, 134.297, 38.173, 0.454)
pt3dadd(112.465, 134.392, 38.234, 0.488)
pt3dadd(112.454, 134.486, 38.295, 0.522)
pt3dadd(112.444, 134.58, 38.356, 0.554)
pt3dadd(112.433, 134.675, 38.417, 0.588)
pt3dadd(112.422, 134.77, 38.478, 0.62)
pt3dadd(112.412, 134.863, 38.539, 0.654)
pt3dadd(112.394, 134.957, 38.601, 0.698)
pt3dadd(112.367, 135.047, 38.662, 0.75)
pt3dadd(112.341, 135.138, 38.723, 0.804)
pt3dadd(112.314, 135.229, 38.785, 0.858)
pt3dadd(112.288, 135.32, 38.846, 0.912)
pt3dadd(112.261, 135.412, 38.908, 0.966)
pt3dadd(112.235, 135.502, 38.969, 1.02)
pt3dadd(112.208, 135.593, 39.03, 1.074)
pt3dadd(112.182, 135.684, 39.092, 1.128)
pt3dadd(112.155, 135.775, 39.153, 1.182)
pt3dadd(112.115, 135.864, 39.211, 1.202)
pt3dadd(112.066, 135.95, 39.266, 1.206)
pt3dadd(112.018, 136.038, 39.321, 1.21)
pt3dadd(111.969, 136.126, 39.377, 1.212)
pt3dadd(111.921, 136.213, 39.432, 1.216)
}
}
proc shape3d_39() {
dend_7[16] { pt3dadd(111.872, 136.301, 39.488, 1.22)
pt3dadd(111.824, 136.387, 39.543, 1.224)
pt3dadd(111.775, 136.475, 39.598, 1.226)
pt3dadd(111.727, 136.562, 39.654, 1.23)
pt3dadd(111.678, 136.65, 39.709, 1.234)
pt3dadd(111.644, 136.746, 39.761, 1.214)
pt3dadd(111.616, 136.846, 39.811, 1.184)
pt3dadd(111.588, 136.945, 39.861, 1.156)
pt3dadd(111.559, 137.045, 39.912, 1.126)
pt3dadd(111.531, 137.146, 39.962, 1.096)
pt3dadd(111.503, 137.245, 40.012, 1.066)
pt3dadd(111.475, 137.345, 40.062, 1.038)
pt3dadd(111.447, 137.444, 40.113, 1.008)
pt3dadd(111.418, 137.544, 40.163, 0.978)
pt3dadd(111.39, 137.645, 40.213, 0.948)
pt3dadd(111.374, 137.756, 40.245, 0.956)
pt3dadd(111.361, 137.87, 40.272, 0.972)
pt3dadd(111.348, 137.986, 40.299, 0.99)
pt3dadd(111.335, 138.101, 40.326, 1.006)
pt3dadd(111.323, 138.215, 40.353, 1.024)
pt3dadd(111.31, 138.33, 40.38, 1.04)
pt3dadd(111.297, 138.445, 40.406, 1.058)
pt3dadd(111.284, 138.56, 40.433, 1.076)
pt3dadd(111.271, 138.674, 40.46, 1.092)
pt3dadd(111.258, 138.79, 40.487, 1.11)
pt3dadd(111.256, 138.907, 40.504, 1.098)
pt3dadd(111.256, 139.026, 40.518, 1.078)
pt3dadd(111.257, 139.145, 40.532, 1.06)
pt3dadd(111.257, 139.264, 40.546, 1.04)
pt3dadd(111.257, 139.382, 40.56, 1.022)
pt3dadd(111.258, 139.501, 40.574, 1.002)
pt3dadd(111.258, 139.62, 40.588, 0.984)
pt3dadd(111.258, 139.739, 40.602, 0.964)
pt3dadd(111.259, 139.858, 40.616, 0.946)
pt3dadd(111.259, 139.976, 40.63, 0.926)
pt3dadd(111.26, 140.096, 40.64, 0.906)
pt3dadd(111.261, 140.216, 40.648, 0.888)
pt3dadd(111.261, 140.335, 40.656, 0.868)
pt3dadd(111.262, 140.455, 40.664, 0.85)
pt3dadd(111.263, 140.575, 40.672, 0.83)
pt3dadd(111.263, 140.694, 40.68, 0.81)
pt3dadd(111.264, 140.814, 40.688, 0.792)
pt3dadd(111.265, 140.934, 40.696, 0.772)
pt3dadd(111.266, 141.053, 40.705, 0.752)
pt3dadd(111.266, 141.173, 40.713, 0.734)
pt3dadd(111.268, 141.292, 40.723, 0.736)
pt3dadd(111.269, 141.412, 40.735, 0.746)
pt3dadd(111.271, 141.53, 40.746, 0.754)
pt3dadd(111.272, 141.65, 40.757, 0.764)
pt3dadd(111.274, 141.769, 40.768, 0.772)
pt3dadd(111.275, 141.888, 40.779, 0.782)
pt3dadd(111.277, 142.008, 40.791, 0.79)
pt3dadd(111.279, 142.127, 40.802, 0.8)
pt3dadd(111.28, 142.246, 40.813, 0.808)
pt3dadd(111.282, 142.366, 40.824, 0.818)
pt3dadd(111.284, 142.481, 40.849, 0.826)
pt3dadd(111.287, 142.596, 40.877, 0.834)
pt3dadd(111.29, 142.711, 40.905, 0.842)
pt3dadd(111.293, 142.826, 40.933, 0.852)
pt3dadd(111.295, 142.942, 40.961, 0.86)
pt3dadd(111.298, 143.057, 40.989, 0.868)
pt3dadd(111.301, 143.172, 41.017, 0.878)
pt3dadd(111.304, 143.287, 41.045, 0.886)
pt3dadd(111.306, 143.402, 41.073, 0.894)
pt3dadd(111.309, 143.518, 41.101, 0.904)
pt3dadd(111.314, 143.63, 41.136, 0.91)
pt3dadd(111.319, 143.742, 41.173, 0.916)
pt3dadd(111.325, 143.854, 41.209, 0.922)
pt3dadd(111.33, 143.965, 41.245, 0.928)
pt3dadd(111.335, 144.077, 41.282, 0.934)
pt3dadd(111.34, 144.188, 41.318, 0.94)
pt3dadd(111.345, 144.3, 41.354, 0.946)
pt3dadd(111.35, 144.412, 41.391, 0.952)
pt3dadd(111.356, 144.523, 41.427, 0.958)
pt3dadd(111.361, 144.635, 41.464, 0.964)
pt3dadd(111.37, 144.749, 41.493, 0.976)
pt3dadd(111.38, 144.864, 41.521, 0.99)
pt3dadd(111.39, 144.979, 41.549, 1.004)
pt3dadd(111.4, 145.093, 41.577, 1.018)
pt3dadd(111.41, 145.208, 41.605, 1.032)
pt3dadd(111.419, 145.322, 41.633, 1.044)
pt3dadd(111.429, 145.438, 41.662, 1.058)
pt3dadd(111.439, 145.552, 41.69, 1.072)
pt3dadd(111.449, 145.667, 41.718, 1.086)
pt3dadd(111.459, 145.782, 41.746, 1.1)
pt3dadd(111.477, 145.897, 41.77, 1.084)
pt3dadd(111.496, 146.011, 41.793, 1.066)
pt3dadd(111.515, 146.126, 41.817, 1.046)
pt3dadd(111.534, 146.242, 41.84, 1.028)
pt3dadd(111.553, 146.357, 41.863, 1.01)
pt3dadd(111.572, 146.472, 41.887, 0.992)
pt3dadd(111.591, 146.587, 41.91, 0.972)
pt3dadd(111.61, 146.702, 41.933, 0.954)
pt3dadd(111.629, 146.818, 41.957, 0.936)
pt3dadd(111.648, 146.933, 41.98, 0.916)
pt3dadd(111.702, 147.037, 41.998, 0.934)
pt3dadd(111.757, 147.142, 42.017, 0.954)
pt3dadd(111.813, 147.246, 42.035, 0.974)
pt3dadd(111.869, 147.349, 42.053, 0.994)
pt3dadd(111.924, 147.454, 42.071, 1.014)
pt3dadd(111.98, 147.558, 42.089, 1.034)
pt3dadd(112.035, 147.662, 42.108, 1.052)
pt3dadd(112.091, 147.766, 42.126, 1.072)
pt3dadd(112.147, 147.87, 42.144, 1.092)
pt3dadd(112.202, 147.974, 42.162, 1.112)
pt3dadd(112.248, 148.036, 42.239, 1.024)
pt3dadd(112.294, 148.097, 42.316, 0.934)
pt3dadd(112.341, 148.159, 42.392, 0.846)
pt3dadd(112.387, 148.22, 42.469, 0.758)
pt3dadd(112.433, 148.282, 42.546, 0.668)
pt3dadd(112.479, 148.343, 42.623, 0.58)
pt3dadd(112.525, 148.404, 42.7, 0.492)
pt3dadd(112.571, 148.466, 42.777, 0.404)
pt3dadd(112.617, 148.528, 42.854, 0.314)
pt3dadd(112.663, 148.589, 42.93, 0.226)
}
dend_7[17] {pt3dclear()
pt3dadd(115.768, 114.715, 22.552, 1.582)
pt3dadd(115.787, 114.684, 22.559, 1.556)
pt3dadd(115.847, 114.584, 22.583, 1.476)
pt3dadd(115.907, 114.484, 22.606, 1.396)
pt3dadd(115.967, 114.384, 22.63, 1.316)
pt3dadd(116.027, 114.284, 22.653, 1.236)
pt3dadd(116.087, 114.184, 22.677, 1.156)
pt3dadd(116.147, 114.084, 22.7, 1.076)
pt3dadd(116.207, 113.983, 22.724, 0.996)
pt3dadd(116.267, 113.883, 22.747, 0.916)
pt3dadd(116.327, 113.783, 22.771, 0.836)
pt3dadd(116.387, 113.683, 22.794, 0.756)
pt3dadd(116.447, 113.583, 22.818, 0.676)
pt3dadd(116.507, 113.483, 22.841, 0.596)
pt3dadd(116.555, 113.376, 22.861, 0.614)
pt3dadd(116.601, 113.268, 22.879, 0.644)
pt3dadd(116.648, 113.16, 22.898, 0.674)
pt3dadd(116.695, 113.051, 22.917, 0.704)
pt3dadd(116.741, 112.943, 22.936, 0.734)
pt3dadd(116.788, 112.835, 22.955, 0.766)
pt3dadd(116.835, 112.727, 22.974, 0.796)
pt3dadd(116.881, 112.619, 22.993, 0.826)
pt3dadd(116.928, 112.51, 23.012, 0.856)
pt3dadd(116.975, 112.402, 23.031, 0.886)
pt3dadd(117.028, 112.296, 23.046, 0.912)
pt3dadd(117.081, 112.19, 23.061, 0.936)
pt3dadd(117.135, 112.084, 23.076, 0.96)
pt3dadd(117.188, 111.979, 23.091, 0.984)
pt3dadd(117.242, 111.873, 23.106, 1.008)
pt3dadd(117.295, 111.767, 23.121, 1.032)
pt3dadd(117.349, 111.661, 23.136, 1.056)
pt3dadd(117.403, 111.555, 23.151, 1.08)
pt3dadd(117.456, 111.449, 23.166, 1.104)
pt3dadd(117.51, 111.343, 23.181, 1.128)
pt3dadd(117.568, 111.24, 23.198, 1.128)
pt3dadd(117.626, 111.138, 23.215, 1.124)
pt3dadd(117.685, 111.035, 23.232, 1.122)
pt3dadd(117.743, 110.932, 23.249, 1.12)
pt3dadd(117.801, 110.829, 23.266, 1.116)
pt3dadd(117.86, 110.726, 23.284, 1.114)
pt3dadd(117.918, 110.623, 23.301, 1.112)
pt3dadd(117.976, 110.521, 23.318, 1.108)
pt3dadd(118.035, 110.418, 23.335, 1.106)
pt3dadd(118.093, 110.315, 23.352, 1.104)
pt3dadd(118.134, 110.213, 23.392, 1.088)
pt3dadd(118.175, 110.111, 23.432, 1.07)
pt3dadd(118.216, 110.009, 23.473, 1.054)
pt3dadd(118.256, 109.907, 23.513, 1.038)
pt3dadd(118.297, 109.805, 23.553, 1.022)
pt3dadd(118.338, 109.703, 23.594, 1.006)
pt3dadd(118.379, 109.601, 23.634, 0.99)
pt3dadd(118.42, 109.499, 23.674, 0.972)
pt3dadd(118.461, 109.397, 23.715, 0.956)
pt3dadd(118.501, 109.296, 23.755, 0.94)
pt3dadd(118.556, 109.196, 23.788, 0.948)
pt3dadd(118.611, 109.097, 23.82, 0.958)
pt3dadd(118.666, 108.998, 23.853, 0.966)
pt3dadd(118.721, 108.898, 23.885, 0.974)
pt3dadd(118.776, 108.799, 23.918, 0.984)
pt3dadd(118.831, 108.7, 23.95, 0.992)
pt3dadd(118.886, 108.601, 23.983, 1)
pt3dadd(118.941, 108.501, 24.015, 1.01)
pt3dadd(118.996, 108.402, 24.048, 1.018)
pt3dadd(119.051, 108.303, 24.08, 1.026)
pt3dadd(119.104, 108.204, 24.115, 1.042)
pt3dadd(119.157, 108.105, 24.151, 1.058)
pt3dadd(119.21, 108.005, 24.186, 1.074)
pt3dadd(119.263, 107.906, 24.221, 1.09)
pt3dadd(119.316, 107.807, 24.256, 1.106)
pt3dadd(119.368, 107.708, 24.291, 1.122)
pt3dadd(119.421, 107.609, 24.326, 1.138)
pt3dadd(119.474, 107.509, 24.361, 1.154)
pt3dadd(119.527, 107.41, 24.396, 1.17)
pt3dadd(119.579, 107.311, 24.432, 1.186)
pt3dadd(119.619, 107.211, 24.476, 1.202)
pt3dadd(119.659, 107.111, 24.52, 1.218)
pt3dadd(119.699, 107.011, 24.563, 1.234)
pt3dadd(119.739, 106.911, 24.607, 1.25)
pt3dadd(119.78, 106.811, 24.651, 1.266)
pt3dadd(119.82, 106.711, 24.695, 1.282)
pt3dadd(119.86, 106.611, 24.739, 1.298)
pt3dadd(119.9, 106.511, 24.783, 1.314)
pt3dadd(119.94, 106.41, 24.827, 1.33)
pt3dadd(119.982, 106.31, 24.869, 1.34)
pt3dadd(120.041, 106.21, 24.893, 1.298)
}
}
proc shape3d_40() {
dend_7[17] { pt3dadd(120.1, 106.11, 24.918, 1.254)
pt3dadd(120.16, 106.01, 24.943, 1.21)
pt3dadd(120.218, 105.909, 24.968, 1.166)
pt3dadd(120.277, 105.809, 24.992, 1.124)
pt3dadd(120.336, 105.709, 25.017, 1.08)
pt3dadd(120.395, 105.609, 25.041, 1.036)
pt3dadd(120.454, 105.508, 25.066, 0.992)
pt3dadd(120.512, 105.408, 25.091, 0.95)
pt3dadd(120.571, 105.307, 25.115, 0.908)
pt3dadd(120.624, 105.202, 25.135, 0.884)
pt3dadd(120.676, 105.097, 25.155, 0.862)
pt3dadd(120.728, 104.992, 25.175, 0.838)
pt3dadd(120.781, 104.886, 25.195, 0.814)
pt3dadd(120.834, 104.781, 25.215, 0.792)
pt3dadd(120.886, 104.676, 25.234, 0.768)
pt3dadd(120.938, 104.571, 25.254, 0.744)
pt3dadd(120.991, 104.466, 25.274, 0.722)
pt3dadd(121.044, 104.36, 25.294, 0.698)
pt3dadd(121.096, 104.255, 25.313, 0.68)
pt3dadd(121.145, 104.147, 25.329, 0.686)
pt3dadd(121.193, 104.039, 25.344, 0.694)
pt3dadd(121.242, 103.931, 25.36, 0.702)
pt3dadd(121.291, 103.823, 25.375, 0.708)
pt3dadd(121.339, 103.715, 25.391, 0.716)
pt3dadd(121.388, 103.607, 25.406, 0.724)
pt3dadd(121.438, 103.499, 25.421, 0.73)
pt3dadd(121.487, 103.39, 25.437, 0.738)
pt3dadd(121.535, 103.282, 25.452, 0.746)
pt3dadd(121.586, 103.176, 25.467, 0.758)
pt3dadd(121.649, 103.074, 25.477, 0.79)
pt3dadd(121.711, 102.972, 25.488, 0.822)
pt3dadd(121.774, 102.87, 25.498, 0.856)
pt3dadd(121.836, 102.768, 25.509, 0.888)
pt3dadd(121.898, 102.667, 25.519, 0.92)
pt3dadd(121.961, 102.565, 25.529, 0.952)
pt3dadd(122.023, 102.463, 25.54, 0.986)
pt3dadd(122.086, 102.362, 25.55, 1.018)
pt3dadd(122.148, 102.26, 25.561, 1.05)
pt3dadd(122.208, 102.158, 25.575, 1.08)
pt3dadd(122.256, 102.055, 25.607, 1.1)
pt3dadd(122.304, 101.952, 25.638, 1.12)
pt3dadd(122.353, 101.849, 25.67, 1.138)
pt3dadd(122.401, 101.746, 25.702, 1.158)
pt3dadd(122.449, 101.643, 25.733, 1.176)
pt3dadd(122.498, 101.54, 25.765, 1.196)
pt3dadd(122.546, 101.437, 25.796, 1.214)
pt3dadd(122.594, 101.334, 25.828, 1.234)
pt3dadd(122.644, 101.231, 25.86, 1.252)
pt3dadd(122.693, 101.128, 25.891, 1.268)
pt3dadd(122.747, 101.027, 25.921, 1.27)
pt3dadd(122.801, 100.926, 25.951, 1.272)
pt3dadd(122.855, 100.825, 25.98, 1.272)
pt3dadd(122.909, 100.724, 26.01, 1.274)
pt3dadd(122.963, 100.623, 26.04, 1.276)
pt3dadd(123.017, 100.521, 26.069, 1.278)
pt3dadd(123.071, 100.42, 26.099, 1.278)
pt3dadd(123.124, 100.319, 26.129, 1.28)
pt3dadd(123.178, 100.218, 26.158, 1.282)
pt3dadd(123.235, 100.118, 26.186, 1.278)
pt3dadd(123.299, 100.02, 26.209, 1.264)
pt3dadd(123.362, 99.922, 26.231, 1.25)
pt3dadd(123.426, 99.823, 26.254, 1.234)
pt3dadd(123.49, 99.725, 26.276, 1.22)
pt3dadd(123.552, 99.627, 26.298, 1.204)
pt3dadd(123.616, 99.529, 26.321, 1.19)
pt3dadd(123.679, 99.431, 26.343, 1.174)
pt3dadd(123.743, 99.333, 26.366, 1.16)
pt3dadd(123.806, 99.235, 26.388, 1.144)
pt3dadd(123.871, 99.137, 26.409, 1.138)
pt3dadd(123.938, 99.039, 26.424, 1.154)
pt3dadd(124.006, 98.941, 26.439, 1.17)
pt3dadd(124.072, 98.843, 26.454, 1.186)
pt3dadd(124.139, 98.745, 26.469, 1.202)
pt3dadd(124.206, 98.647, 26.484, 1.216)
pt3dadd(124.273, 98.549, 26.499, 1.232)
pt3dadd(124.339, 98.451, 26.514, 1.248)
pt3dadd(124.406, 98.353, 26.53, 1.264)
pt3dadd(124.474, 98.255, 26.545, 1.28)
pt3dadd(124.537, 98.155, 26.559, 1.29)
pt3dadd(124.594, 98.05, 26.572, 1.286)
pt3dadd(124.65, 97.945, 26.585, 1.282)
pt3dadd(124.706, 97.84, 26.598, 1.278)
pt3dadd(124.763, 97.735, 26.611, 1.276)
pt3dadd(124.819, 97.631, 26.623, 1.272)
pt3dadd(124.874, 97.526, 26.636, 1.268)
pt3dadd(124.931, 97.421, 26.649, 1.264)
pt3dadd(124.987, 97.316, 26.662, 1.26)
pt3dadd(125.044, 97.211, 26.675, 1.256)
pt3dadd(125.096, 97.105, 26.69, 1.252)
pt3dadd(125.138, 96.995, 26.709, 1.244)
pt3dadd(125.182, 96.885, 26.728, 1.236)
pt3dadd(125.225, 96.776, 26.747, 1.228)
pt3dadd(125.268, 96.666, 26.766, 1.222)
pt3dadd(125.311, 96.556, 26.785, 1.214)
pt3dadd(125.354, 96.447, 26.804, 1.206)
pt3dadd(125.396, 96.337, 26.823, 1.2)
pt3dadd(125.44, 96.227, 26.842, 1.192)
pt3dadd(125.483, 96.118, 26.861, 1.184)
pt3dadd(125.52, 96.009, 26.887, 1.188)
pt3dadd(125.548, 95.901, 26.925, 1.204)
pt3dadd(125.575, 95.793, 26.962, 1.222)
pt3dadd(125.603, 95.685, 26.999, 1.238)
pt3dadd(125.632, 95.578, 27.037, 1.256)
pt3dadd(125.659, 95.47, 27.074, 1.274)
pt3dadd(125.687, 95.362, 27.111, 1.29)
pt3dadd(125.714, 95.254, 27.149, 1.308)
pt3dadd(125.742, 95.147, 27.186, 1.326)
pt3dadd(125.771, 95.039, 27.224, 1.342)
pt3dadd(125.807, 94.932, 27.256, 1.346)
pt3dadd(125.857, 94.827, 27.28, 1.33)
pt3dadd(125.906, 94.722, 27.305, 1.314)
pt3dadd(125.957, 94.617, 27.33, 1.298)
pt3dadd(126.006, 94.512, 27.354, 1.282)
pt3dadd(126.056, 94.407, 27.379, 1.266)
pt3dadd(126.106, 94.302, 27.403, 1.25)
pt3dadd(126.156, 94.197, 27.428, 1.232)
pt3dadd(126.205, 94.091, 27.453, 1.216)
pt3dadd(126.256, 93.986, 27.477, 1.2)
pt3dadd(126.304, 93.88, 27.5, 1.188)
pt3dadd(126.348, 93.771, 27.52, 1.182)
pt3dadd(126.394, 93.662, 27.54, 1.176)
pt3dadd(126.438, 93.554, 27.56, 1.17)
pt3dadd(126.484, 93.445, 27.58, 1.164)
pt3dadd(126.528, 93.336, 27.599, 1.158)
pt3dadd(126.572, 93.228, 27.619, 1.152)
pt3dadd(126.618, 93.119, 27.639, 1.146)
pt3dadd(126.662, 93.01, 27.659, 1.14)
pt3dadd(126.708, 92.902, 27.679, 1.134)
pt3dadd(126.754, 92.793, 27.697, 1.132)
pt3dadd(126.802, 92.684, 27.712, 1.138)
pt3dadd(126.848, 92.576, 27.727, 1.144)
pt3dadd(126.896, 92.467, 27.743, 1.15)
pt3dadd(126.944, 92.358, 27.758, 1.156)
pt3dadd(126.991, 92.25, 27.773, 1.162)
pt3dadd(127.039, 92.141, 27.788, 1.168)
pt3dadd(127.086, 92.032, 27.804, 1.174)
pt3dadd(127.134, 91.924, 27.819, 1.182)
pt3dadd(127.181, 91.815, 27.834, 1.186)
pt3dadd(127.232, 91.708, 27.848, 1.198)
pt3dadd(127.29, 91.603, 27.86, 1.214)
pt3dadd(127.346, 91.498, 27.871, 1.23)
pt3dadd(127.403, 91.394, 27.883, 1.244)
pt3dadd(127.46, 91.289, 27.895, 1.26)
pt3dadd(127.517, 91.184, 27.906, 1.276)
pt3dadd(127.573, 91.079, 27.918, 1.292)
pt3dadd(127.63, 90.974, 27.93, 1.308)
pt3dadd(127.687, 90.87, 27.942, 1.324)
pt3dadd(127.744, 90.765, 27.954, 1.34)
pt3dadd(127.789, 90.66, 27.977, 1.316)
pt3dadd(127.824, 90.554, 28.015, 1.248)
pt3dadd(127.859, 90.448, 28.053, 1.182)
pt3dadd(127.894, 90.343, 28.091, 1.114)
pt3dadd(127.927, 90.237, 28.129, 1.046)
pt3dadd(127.962, 90.131, 28.166, 0.978)
pt3dadd(127.997, 90.026, 28.204, 0.912)
pt3dadd(128.03, 89.92, 28.242, 0.844)
pt3dadd(128.065, 89.814, 28.28, 0.776)
pt3dadd(128.1, 89.709, 28.317, 0.708)
pt3dadd(128.131, 89.601, 28.353, 0.672)
pt3dadd(128.161, 89.492, 28.385, 0.674)
pt3dadd(128.191, 89.382, 28.417, 0.676)
pt3dadd(128.221, 89.272, 28.45, 0.68)
pt3dadd(128.25, 89.163, 28.482, 0.682)
pt3dadd(128.28, 89.053, 28.514, 0.684)
pt3dadd(128.31, 88.944, 28.546, 0.686)
pt3dadd(128.34, 88.834, 28.579, 0.688)
pt3dadd(128.369, 88.724, 28.611, 0.69)
pt3dadd(128.399, 88.615, 28.643, 0.692)
pt3dadd(128.431, 88.505, 28.673, 0.702)
pt3dadd(128.467, 88.395, 28.699, 0.724)
pt3dadd(128.502, 88.284, 28.725, 0.746)
pt3dadd(128.538, 88.174, 28.751, 0.766)
pt3dadd(128.574, 88.064, 28.777, 0.788)
pt3dadd(128.609, 87.954, 28.803, 0.808)
pt3dadd(128.645, 87.843, 28.829, 0.83)
pt3dadd(128.681, 87.733, 28.855, 0.852)
pt3dadd(128.716, 87.623, 28.881, 0.872)
pt3dadd(128.752, 87.513, 28.907, 0.894)
pt3dadd(128.792, 87.404, 28.931, 0.904)
pt3dadd(128.838, 87.296, 28.954, 0.904)
pt3dadd(128.885, 87.188, 28.976, 0.904)
pt3dadd(128.93, 87.081, 28.998, 0.904)
pt3dadd(128.976, 86.973, 29.02, 0.904)
pt3dadd(129.023, 86.866, 29.042, 0.904)
pt3dadd(129.068, 86.758, 29.064, 0.904)
pt3dadd(129.115, 86.651, 29.086, 0.904)
pt3dadd(129.161, 86.543, 29.109, 0.904)
pt3dadd(129.206, 86.435, 29.131, 0.904)
pt3dadd(129.247, 86.329, 29.16, 0.904)
pt3dadd(129.283, 86.223, 29.196, 0.904)
pt3dadd(129.319, 86.116, 29.233, 0.904)
pt3dadd(129.354, 86.01, 29.268, 0.904)
pt3dadd(129.39, 85.904, 29.305, 0.904)
pt3dadd(129.426, 85.798, 29.34, 0.904)
pt3dadd(129.462, 85.692, 29.377, 0.904)
pt3dadd(129.498, 85.586, 29.413, 0.904)
pt3dadd(129.533, 85.48, 29.448, 0.904)
pt3dadd(129.569, 85.374, 29.485, 0.904)
pt3dadd(129.602, 85.265, 29.516, 0.912)
pt3dadd(129.634, 85.154, 29.543, 0.926)
}
}
proc shape3d_41() {
dend_7[17] { pt3dadd(129.665, 85.043, 29.57, 0.94)
pt3dadd(129.697, 84.932, 29.598, 0.952)
pt3dadd(129.728, 84.821, 29.625, 0.966)
pt3dadd(129.76, 84.71, 29.652, 0.98)
pt3dadd(129.791, 84.598, 29.68, 0.994)
pt3dadd(129.822, 84.487, 29.707, 1.008)
pt3dadd(129.853, 84.376, 29.734, 1.022)
pt3dadd(129.884, 84.265, 29.761, 1.036)
pt3dadd(129.922, 84.155, 29.784, 1.046)
pt3dadd(129.964, 84.044, 29.802, 1.056)
pt3dadd(130.006, 83.934, 29.821, 1.064)
pt3dadd(130.048, 83.824, 29.839, 1.074)
pt3dadd(130.09, 83.714, 29.858, 1.082)
pt3dadd(130.132, 83.603, 29.876, 1.092)
pt3dadd(130.174, 83.493, 29.895, 1.1)
pt3dadd(130.216, 83.383, 29.914, 1.108)
pt3dadd(130.258, 83.273, 29.932, 1.118)
pt3dadd(130.3, 83.163, 29.951, 1.126)
pt3dadd(130.348, 83.054, 29.965, 1.128)
pt3dadd(130.398, 82.946, 29.976, 1.124)
pt3dadd(130.45, 82.839, 29.988, 1.122)
pt3dadd(130.501, 82.731, 29.999, 1.118)
pt3dadd(130.553, 82.624, 30.011, 1.114)
pt3dadd(130.604, 82.516, 30.022, 1.112)
pt3dadd(130.656, 82.409, 30.033, 1.108)
pt3dadd(130.708, 82.302, 30.045, 1.104)
pt3dadd(130.759, 82.194, 30.056, 1.102)
pt3dadd(130.811, 82.086, 30.068, 1.098)
pt3dadd(130.859, 81.977, 30.076, 1.086)
pt3dadd(130.904, 81.866, 30.083, 1.068)
pt3dadd(130.95, 81.756, 30.09, 1.05)
pt3dadd(130.997, 81.645, 30.097, 1.032)
pt3dadd(131.042, 81.535, 30.104, 1.016)
pt3dadd(131.088, 81.424, 30.11, 0.998)
pt3dadd(131.134, 81.313, 30.117, 0.98)
pt3dadd(131.179, 81.203, 30.124, 0.962)
pt3dadd(131.225, 81.092, 30.13, 0.944)
pt3dadd(131.272, 80.982, 30.137, 0.926)
pt3dadd(131.327, 80.876, 30.146, 0.92)
pt3dadd(131.389, 80.774, 30.156, 0.918)
pt3dadd(131.452, 80.672, 30.166, 0.916)
pt3dadd(131.513, 80.57, 30.176, 0.914)
pt3dadd(131.575, 80.468, 30.186, 0.912)
pt3dadd(131.638, 80.366, 30.196, 0.912)
pt3dadd(131.699, 80.264, 30.206, 0.91)
pt3dadd(131.761, 80.162, 30.216, 0.908)
pt3dadd(131.824, 80.06, 30.226, 0.906)
pt3dadd(131.885, 79.958, 30.236, 0.904)
pt3dadd(131.944, 79.856, 30.255, 0.91)
pt3dadd(131.999, 79.753, 30.278, 0.918)
pt3dadd(132.055, 79.651, 30.302, 0.926)
pt3dadd(132.11, 79.548, 30.325, 0.934)
pt3dadd(132.167, 79.446, 30.348, 0.944)
pt3dadd(132.223, 79.344, 30.372, 0.952)
pt3dadd(132.278, 79.241, 30.395, 0.96)
pt3dadd(132.335, 79.139, 30.418, 0.968)
pt3dadd(132.39, 79.036, 30.441, 0.976)
pt3dadd(132.446, 78.934, 30.465, 0.986)
pt3dadd(132.498, 78.832, 30.496, 1)
pt3dadd(132.548, 78.731, 30.529, 1.016)
pt3dadd(132.599, 78.63, 30.563, 1.032)
pt3dadd(132.649, 78.529, 30.596, 1.048)
pt3dadd(132.7, 78.428, 30.63, 1.064)
pt3dadd(132.75, 78.326, 30.664, 1.08)
pt3dadd(132.8, 78.225, 30.697, 1.096)
pt3dadd(132.851, 78.124, 30.731, 1.114)
pt3dadd(132.901, 78.023, 30.764, 1.13)
pt3dadd(132.952, 77.922, 30.798, 1.146)
pt3dadd(133.015, 77.825, 30.822, 1.16)
pt3dadd(133.084, 77.73, 30.844, 1.176)
pt3dadd(133.152, 77.635, 30.866, 1.192)
pt3dadd(133.22, 77.539, 30.888, 1.206)
pt3dadd(133.289, 77.444, 30.91, 1.222)
pt3dadd(133.356, 77.349, 30.932, 1.238)
pt3dadd(133.424, 77.254, 30.954, 1.252)
pt3dadd(133.493, 77.158, 30.976, 1.268)
pt3dadd(133.561, 77.063, 30.997, 1.282)
pt3dadd(133.628, 76.968, 31.019, 1.298)
pt3dadd(133.7, 76.874, 31.037, 1.292)
pt3dadd(133.772, 76.78, 31.054, 1.278)
pt3dadd(133.844, 76.686, 31.071, 1.264)
pt3dadd(133.916, 76.592, 31.088, 1.25)
pt3dadd(133.988, 76.498, 31.105, 1.236)
pt3dadd(134.06, 76.404, 31.122, 1.222)
pt3dadd(134.132, 76.311, 31.139, 1.208)
pt3dadd(134.204, 76.217, 31.155, 1.194)
pt3dadd(134.276, 76.123, 31.172, 1.182)
pt3dadd(134.348, 76.029, 31.189, 1.168)
pt3dadd(134.422, 75.936, 31.203, 1.142)
pt3dadd(134.496, 75.843, 31.217, 1.114)
pt3dadd(134.57, 75.75, 31.23, 1.086)
pt3dadd(134.645, 75.657, 31.244, 1.06)
pt3dadd(134.719, 75.565, 31.257, 1.032)
pt3dadd(134.792, 75.472, 31.27, 1.004)
pt3dadd(134.867, 75.379, 31.284, 0.976)
pt3dadd(134.941, 75.286, 31.297, 0.948)
pt3dadd(135.016, 75.193, 31.311, 0.92)
pt3dadd(135.09, 75.1, 31.324, 0.892)
pt3dadd(135.166, 75.008, 31.334, 0.874)
pt3dadd(135.242, 74.917, 31.343, 0.86)
pt3dadd(135.319, 74.825, 31.352, 0.844)
pt3dadd(135.396, 74.733, 31.361, 0.83)
pt3dadd(135.473, 74.642, 31.37, 0.816)
pt3dadd(135.55, 74.55, 31.379, 0.8)
pt3dadd(135.626, 74.458, 31.388, 0.786)
pt3dadd(135.703, 74.366, 31.396, 0.772)
pt3dadd(135.78, 74.275, 31.405, 0.756)
pt3dadd(135.857, 74.183, 31.414, 0.742)
pt3dadd(135.922, 74.086, 31.435, 0.764)
pt3dadd(135.983, 73.987, 31.459, 0.796)
pt3dadd(136.044, 73.888, 31.483, 0.828)
pt3dadd(136.106, 73.789, 31.507, 0.862)
pt3dadd(136.168, 73.69, 31.531, 0.894)
pt3dadd(136.23, 73.592, 31.555, 0.926)
pt3dadd(136.291, 73.493, 31.579, 0.96)
pt3dadd(136.352, 73.394, 31.602, 0.992)
pt3dadd(136.415, 73.295, 31.626, 1.024)
pt3dadd(136.476, 73.196, 31.65, 1.056)
pt3dadd(136.528, 73.095, 31.681, 1.104)
pt3dadd(136.579, 72.993, 31.713, 1.154)
pt3dadd(136.63, 72.891, 31.744, 1.202)
pt3dadd(136.681, 72.789, 31.776, 1.252)
pt3dadd(136.732, 72.687, 31.807, 1.302)
pt3dadd(136.783, 72.585, 31.839, 1.35)
pt3dadd(136.835, 72.484, 31.87, 1.4)
pt3dadd(136.885, 72.382, 31.902, 1.448)
pt3dadd(136.937, 72.28, 31.933, 1.498)
pt3dadd(136.987, 72.178, 31.965, 1.546)
pt3dadd(137.044, 72.075, 31.987, 1.534)
pt3dadd(137.099, 71.972, 32.008, 1.518)
pt3dadd(137.155, 71.869, 32.029, 1.502)
pt3dadd(137.21, 71.766, 32.05, 1.486)
pt3dadd(137.267, 71.663, 32.072, 1.468)
pt3dadd(137.323, 71.56, 32.093, 1.452)
pt3dadd(137.378, 71.457, 32.114, 1.436)
pt3dadd(137.435, 71.354, 32.136, 1.42)
pt3dadd(137.49, 71.251, 32.157, 1.402)
pt3dadd(137.546, 71.148, 32.179, 1.386)
pt3dadd(137.588, 71.036, 32.192, 1.368)
pt3dadd(137.628, 70.924, 32.204, 1.35)
pt3dadd(137.669, 70.812, 32.217, 1.332)
pt3dadd(137.708, 70.7, 32.23, 1.314)
pt3dadd(137.749, 70.588, 32.242, 1.296)
pt3dadd(137.79, 70.476, 32.255, 1.278)
pt3dadd(137.83, 70.364, 32.268, 1.26)
pt3dadd(137.87, 70.252, 32.28, 1.242)
pt3dadd(137.91, 70.14, 32.293, 1.224)
pt3dadd(137.951, 70.029, 32.306, 1.206)
pt3dadd(137.983, 69.913, 32.311, 1.198)
pt3dadd(138.014, 69.798, 32.316, 1.192)
pt3dadd(138.047, 69.682, 32.321, 1.184)
pt3dadd(138.079, 69.567, 32.326, 1.176)
pt3dadd(138.11, 69.451, 32.33, 1.168)
pt3dadd(138.143, 69.336, 32.335, 1.16)
pt3dadd(138.175, 69.22, 32.34, 1.154)
pt3dadd(138.206, 69.105, 32.345, 1.146)
pt3dadd(138.239, 68.989, 32.35, 1.138)
pt3dadd(138.271, 68.874, 32.355, 1.13)
pt3dadd(138.306, 68.759, 32.356, 1.13)
pt3dadd(138.342, 68.644, 32.357, 1.13)
pt3dadd(138.378, 68.53, 32.358, 1.13)
pt3dadd(138.413, 68.415, 32.359, 1.13)
pt3dadd(138.449, 68.301, 32.36, 1.13)
pt3dadd(138.485, 68.186, 32.36, 1.13)
pt3dadd(138.521, 68.071, 32.361, 1.13)
pt3dadd(138.556, 67.957, 32.362, 1.13)
pt3dadd(138.592, 67.842, 32.363, 1.13)
pt3dadd(138.628, 67.728, 32.364, 1.13)
pt3dadd(138.674, 67.617, 32.365, 1.132)
pt3dadd(138.721, 67.507, 32.367, 1.134)
pt3dadd(138.768, 67.396, 32.368, 1.134)
pt3dadd(138.815, 67.286, 32.37, 1.136)
pt3dadd(138.86, 67.175, 32.371, 1.138)
pt3dadd(138.907, 67.065, 32.373, 1.14)
pt3dadd(138.954, 66.954, 32.374, 1.142)
pt3dadd(139.001, 66.844, 32.376, 1.144)
pt3dadd(139.048, 66.733, 32.377, 1.144)
pt3dadd(139.094, 66.622, 32.379, 1.146)
pt3dadd(139.132, 66.508, 32.381, 1.166)
pt3dadd(139.169, 66.394, 32.384, 1.184)
pt3dadd(139.206, 66.28, 32.387, 1.202)
pt3dadd(139.243, 66.166, 32.39, 1.22)
pt3dadd(139.28, 66.052, 32.392, 1.238)
pt3dadd(139.318, 65.938, 32.395, 1.256)
pt3dadd(139.355, 65.824, 32.398, 1.274)
pt3dadd(139.392, 65.71, 32.401, 1.292)
pt3dadd(139.429, 65.596, 32.404, 1.312)
pt3dadd(139.466, 65.482, 32.407, 1.328)
pt3dadd(139.496, 65.366, 32.413, 1.316)
pt3dadd(139.525, 65.25, 32.419, 1.302)
pt3dadd(139.555, 65.134, 32.425, 1.29)
pt3dadd(139.585, 65.018, 32.432, 1.276)
pt3dadd(139.615, 64.902, 32.438, 1.262)
pt3dadd(139.645, 64.786, 32.444, 1.25)
pt3dadd(139.675, 64.67, 32.451, 1.236)
pt3dadd(139.705, 64.554, 32.457, 1.224)
pt3dadd(139.735, 64.438, 32.464, 1.21)
pt3dadd(139.765, 64.322, 32.47, 1.198)
pt3dadd(139.806, 64.21, 32.479, 1.202)
pt3dadd(139.847, 64.098, 32.489, 1.206)
}
}
proc shape3d_42() {
dend_7[17] { pt3dadd(139.888, 63.986, 32.498, 1.21)
pt3dadd(139.928, 63.873, 32.508, 1.216)
pt3dadd(139.97, 63.761, 32.517, 1.22)
pt3dadd(140.011, 63.649, 32.527, 1.224)
pt3dadd(140.052, 63.537, 32.536, 1.228)
pt3dadd(140.093, 63.425, 32.546, 1.234)
pt3dadd(140.134, 63.312, 32.555, 1.238)
pt3dadd(140.174, 63.2, 32.565, 1.242)
pt3dadd(140.219, 63.091, 32.585, 1.254)
pt3dadd(140.262, 62.982, 32.605, 1.266)
pt3dadd(140.306, 62.873, 32.625, 1.276)
pt3dadd(140.35, 62.764, 32.645, 1.288)
pt3dadd(140.394, 62.655, 32.664, 1.3)
pt3dadd(140.437, 62.545, 32.684, 1.312)
pt3dadd(140.482, 62.436, 32.704, 1.324)
pt3dadd(140.525, 62.327, 32.723, 1.334)
pt3dadd(140.569, 62.218, 32.743, 1.346)
pt3dadd(140.611, 62.109, 32.765, 1.356)
pt3dadd(140.647, 62.003, 32.801, 1.356)
pt3dadd(140.682, 61.896, 32.837, 1.356)
pt3dadd(140.718, 61.79, 32.873, 1.356)
pt3dadd(140.753, 61.684, 32.909, 1.356)
pt3dadd(140.789, 61.578, 32.944, 1.356)
pt3dadd(140.824, 61.471, 32.98, 1.356)
pt3dadd(140.86, 61.365, 33.016, 1.356)
pt3dadd(140.894, 61.259, 33.052, 1.356)
pt3dadd(140.93, 61.152, 33.088, 1.356)
pt3dadd(140.965, 61.045, 33.122, 1.356)
pt3dadd(140.994, 60.933, 33.146, 1.356)
pt3dadd(141.024, 60.82, 33.171, 1.356)
pt3dadd(141.054, 60.708, 33.195, 1.356)
pt3dadd(141.084, 60.595, 33.22, 1.356)
pt3dadd(141.113, 60.483, 33.244, 1.356)
pt3dadd(141.143, 60.37, 33.269, 1.356)
pt3dadd(141.173, 60.258, 33.293, 1.356)
pt3dadd(141.202, 60.145, 33.318, 1.356)
pt3dadd(141.232, 60.033, 33.342, 1.356)
pt3dadd(141.264, 59.921, 33.366, 1.356)
pt3dadd(141.311, 59.812, 33.381, 1.356)
pt3dadd(141.359, 59.703, 33.396, 1.356)
pt3dadd(141.406, 59.594, 33.412, 1.356)
pt3dadd(141.452, 59.486, 33.427, 1.356)
pt3dadd(141.499, 59.377, 33.443, 1.356)
pt3dadd(141.547, 59.268, 33.458, 1.356)
pt3dadd(141.594, 59.159, 33.474, 1.356)
pt3dadd(141.641, 59.05, 33.489, 1.356)
pt3dadd(141.688, 58.942, 33.505, 1.356)
pt3dadd(141.736, 58.833, 33.519, 1.356)
pt3dadd(141.784, 58.724, 33.529, 1.356)
pt3dadd(141.833, 58.615, 33.539, 1.356)
pt3dadd(141.881, 58.506, 33.549, 1.356)
pt3dadd(141.93, 58.396, 33.559, 1.356)
pt3dadd(141.978, 58.287, 33.569, 1.356)
pt3dadd(142.027, 58.178, 33.578, 1.356)
pt3dadd(142.075, 58.069, 33.588, 1.356)
pt3dadd(142.124, 57.96, 33.598, 1.356)
pt3dadd(142.172, 57.851, 33.608, 1.356)
pt3dadd(142.22, 57.742, 33.618, 1.356)
pt3dadd(142.268, 57.632, 33.625, 1.352)
pt3dadd(142.315, 57.522, 33.632, 1.35)
pt3dadd(142.362, 57.412, 33.64, 1.346)
pt3dadd(142.41, 57.302, 33.647, 1.344)
pt3dadd(142.457, 57.192, 33.654, 1.34)
pt3dadd(142.504, 57.082, 33.662, 1.338)
pt3dadd(142.552, 56.972, 33.669, 1.334)
pt3dadd(142.598, 56.862, 33.676, 1.332)
pt3dadd(142.646, 56.752, 33.683, 1.328)
pt3dadd(142.696, 56.644, 33.692, 1.322)
pt3dadd(142.757, 56.541, 33.702, 1.306)
pt3dadd(142.818, 56.438, 33.712, 1.29)
pt3dadd(142.878, 56.335, 33.722, 1.274)
pt3dadd(142.939, 56.233, 33.733, 1.256)
pt3dadd(143, 56.13, 33.743, 1.24)
pt3dadd(143.06, 56.027, 33.753, 1.224)
pt3dadd(143.122, 55.924, 33.763, 1.208)
pt3dadd(143.182, 55.822, 33.774, 1.19)
pt3dadd(143.243, 55.719, 33.784, 1.174)
pt3dadd(143.3, 55.616, 33.799, 1.16)
pt3dadd(143.345, 55.511, 33.83, 1.158)
pt3dadd(143.389, 55.406, 33.861, 1.154)
pt3dadd(143.434, 55.301, 33.892, 1.152)
pt3dadd(143.478, 55.195, 33.923, 1.148)
pt3dadd(143.522, 55.09, 33.954, 1.144)
pt3dadd(143.567, 54.985, 33.985, 1.142)
pt3dadd(143.611, 54.88, 34.017, 1.138)
pt3dadd(143.656, 54.775, 34.048, 1.136)
pt3dadd(143.7, 54.67, 34.079, 1.132)
pt3dadd(143.746, 54.566, 34.109, 1.126)
pt3dadd(143.794, 54.462, 34.139, 1.11)
pt3dadd(143.843, 54.358, 34.169, 1.094)
pt3dadd(143.891, 54.254, 34.198, 1.078)
pt3dadd(143.939, 54.15, 34.228, 1.062)
pt3dadd(143.987, 54.046, 34.258, 1.048)
pt3dadd(144.035, 53.942, 34.287, 1.032)
pt3dadd(144.083, 53.838, 34.317, 1.016)
pt3dadd(144.132, 53.734, 34.347, 1)
pt3dadd(144.18, 53.63, 34.377, 0.984)
pt3dadd(144.23, 53.526, 34.403, 0.964)
pt3dadd(144.286, 53.423, 34.425, 0.936)
pt3dadd(144.341, 53.319, 34.447, 0.91)
pt3dadd(144.395, 53.216, 34.468, 0.882)
pt3dadd(144.45, 53.112, 34.49, 0.854)
pt3dadd(144.505, 53.009, 34.511, 0.826)
pt3dadd(144.56, 52.905, 34.533, 0.798)
pt3dadd(144.616, 52.802, 34.555, 0.77)
pt3dadd(144.67, 52.698, 34.576, 0.742)
pt3dadd(144.725, 52.595, 34.598, 0.716)
pt3dadd(144.774, 52.488, 34.617, 0.704)
pt3dadd(144.812, 52.376, 34.63, 0.722)
pt3dadd(144.852, 52.263, 34.644, 0.742)
pt3dadd(144.89, 52.151, 34.657, 0.76)
pt3dadd(144.929, 52.039, 34.671, 0.778)
pt3dadd(144.967, 51.926, 34.684, 0.798)
pt3dadd(145.007, 51.814, 34.698, 0.816)
pt3dadd(145.045, 51.701, 34.711, 0.834)
pt3dadd(145.084, 51.589, 34.725, 0.852)
pt3dadd(145.123, 51.477, 34.738, 0.872)
pt3dadd(145.159, 51.363, 34.75, 0.89)
pt3dadd(145.193, 51.249, 34.758, 0.91)
pt3dadd(145.226, 51.134, 34.766, 0.93)
pt3dadd(145.26, 51.019, 34.774, 0.95)
pt3dadd(145.294, 50.904, 34.782, 0.97)
pt3dadd(145.327, 50.789, 34.79, 0.988)
pt3dadd(145.361, 50.674, 34.798, 1.008)
pt3dadd(145.394, 50.559, 34.806, 1.028)
pt3dadd(145.428, 50.445, 34.814, 1.048)
pt3dadd(145.46, 50.33, 34.822, 1.068)
pt3dadd(145.501, 50.218, 34.831, 1.088)
pt3dadd(145.553, 50.11, 34.841, 1.106)
pt3dadd(145.604, 50.003, 34.852, 1.126)
pt3dadd(145.656, 49.895, 34.863, 1.144)
pt3dadd(145.708, 49.787, 34.873, 1.164)
pt3dadd(145.759, 49.68, 34.884, 1.184)
pt3dadd(145.811, 49.572, 34.894, 1.202)
pt3dadd(145.862, 49.465, 34.905, 1.222)
pt3dadd(145.914, 49.357, 34.915, 1.24)
pt3dadd(145.966, 49.25, 34.926, 1.26)
pt3dadd(146.021, 49.146, 34.946, 1.274)
pt3dadd(146.08, 49.05, 34.979, 1.284)
pt3dadd(146.138, 48.953, 35.012, 1.292)
pt3dadd(146.198, 48.856, 35.044, 1.3)
pt3dadd(146.257, 48.76, 35.077, 1.31)
pt3dadd(146.316, 48.663, 35.11, 1.318)
pt3dadd(146.375, 48.566, 35.143, 1.326)
pt3dadd(146.435, 48.469, 35.175, 1.336)
pt3dadd(146.494, 48.373, 35.208, 1.344)
pt3dadd(146.552, 48.276, 35.241, 1.352)
pt3dadd(146.616, 48.183, 35.276, 1.348)
pt3dadd(146.683, 48.093, 35.311, 1.338)
pt3dadd(146.75, 48.003, 35.347, 1.326)
pt3dadd(146.818, 47.913, 35.382, 1.316)
pt3dadd(146.884, 47.823, 35.418, 1.304)
pt3dadd(146.951, 47.733, 35.454, 1.292)
pt3dadd(147.018, 47.643, 35.489, 1.282)
pt3dadd(147.084, 47.553, 35.525, 1.27)
pt3dadd(147.151, 47.463, 35.561, 1.258)
pt3dadd(147.218, 47.373, 35.596, 1.248)
pt3dadd(147.282, 47.277, 35.621, 1.23)
pt3dadd(147.346, 47.178, 35.642, 1.21)
pt3dadd(147.409, 47.079, 35.662, 1.192)
pt3dadd(147.473, 46.98, 35.683, 1.172)
pt3dadd(147.536, 46.881, 35.703, 1.152)
pt3dadd(147.599, 46.782, 35.724, 1.132)
pt3dadd(147.662, 46.683, 35.744, 1.112)
pt3dadd(147.726, 46.584, 35.764, 1.094)
pt3dadd(147.79, 46.485, 35.785, 1.074)
pt3dadd(147.852, 46.387, 35.806, 1.054)
pt3dadd(147.907, 46.281, 35.818, 1.046)
pt3dadd(147.959, 46.174, 35.828, 1.038)
pt3dadd(148.012, 46.066, 35.838, 1.032)
pt3dadd(148.063, 45.959, 35.848, 1.026)
pt3dadd(148.116, 45.852, 35.859, 1.02)
pt3dadd(148.168, 45.744, 35.869, 1.014)
pt3dadd(148.22, 45.637, 35.879, 1.008)
pt3dadd(148.272, 45.529, 35.889, 1)
pt3dadd(148.325, 45.422, 35.9, 0.994)
pt3dadd(148.376, 45.315, 35.91, 0.988)
pt3dadd(148.436, 45.211, 35.914, 1.014)
pt3dadd(148.499, 45.108, 35.917, 1.048)
pt3dadd(148.56, 45.005, 35.919, 1.08)
pt3dadd(148.621, 44.902, 35.922, 1.114)
pt3dadd(148.684, 44.799, 35.924, 1.146)
pt3dadd(148.745, 44.697, 35.927, 1.18)
pt3dadd(148.807, 44.594, 35.929, 1.212)
pt3dadd(148.868, 44.491, 35.932, 1.246)
pt3dadd(148.93, 44.388, 35.935, 1.278)
pt3dadd(148.992, 44.285, 35.937, 1.312)
pt3dadd(149.041, 44.176, 35.943, 1.294)
pt3dadd(149.088, 44.066, 35.949, 1.266)
pt3dadd(149.134, 43.955, 35.955, 1.24)
pt3dadd(149.18, 43.845, 35.962, 1.212)
pt3dadd(149.227, 43.735, 35.968, 1.184)
pt3dadd(149.274, 43.624, 35.974, 1.156)
pt3dadd(149.32, 43.514, 35.981, 1.13)
pt3dadd(149.366, 43.404, 35.987, 1.102)
pt3dadd(149.413, 43.293, 35.993, 1.074)
pt3dadd(149.46, 43.183, 36, 1.046)
pt3dadd(149.513, 43.076, 36.008, 1.038)
pt3dadd(149.568, 42.97, 36.017, 1.036)
pt3dadd(149.623, 42.864, 36.027, 1.032)
}
}
proc shape3d_43() {
dend_7[17] { pt3dadd(149.677, 42.757, 36.036, 1.028)
pt3dadd(149.732, 42.651, 36.045, 1.024)
pt3dadd(149.788, 42.545, 36.054, 1.02)
pt3dadd(149.843, 42.439, 36.063, 1.016)
pt3dadd(149.897, 42.333, 36.072, 1.012)
pt3dadd(149.952, 42.227, 36.081, 1.008)
pt3dadd(150.007, 42.121, 36.09, 1.004)
pt3dadd(150.064, 42.017, 36.106, 1.012)
pt3dadd(150.121, 41.913, 36.123, 1.02)
pt3dadd(150.178, 41.809, 36.139, 1.03)
pt3dadd(150.235, 41.706, 36.156, 1.038)
pt3dadd(150.292, 41.602, 36.172, 1.046)
pt3dadd(150.349, 41.498, 36.189, 1.056)
pt3dadd(150.406, 41.394, 36.206, 1.064)
pt3dadd(150.463, 41.291, 36.222, 1.074)
pt3dadd(150.52, 41.187, 36.239, 1.082)
pt3dadd(150.577, 41.083, 36.256, 1.09)
pt3dadd(150.619, 40.979, 36.291, 1.076)
pt3dadd(150.66, 40.875, 36.327, 1.058)
pt3dadd(150.701, 40.771, 36.363, 1.042)
pt3dadd(150.743, 40.667, 36.399, 1.024)
pt3dadd(150.784, 40.563, 36.435, 1.008)
pt3dadd(150.824, 40.459, 36.471, 0.992)
pt3dadd(150.866, 40.355, 36.507, 0.974)
pt3dadd(150.907, 40.251, 36.543, 0.958)
pt3dadd(150.948, 40.147, 36.579, 0.942)
pt3dadd(150.989, 40.043, 36.615, 0.924)
pt3dadd(151.046, 39.941, 36.64, 0.922)
pt3dadd(151.103, 39.84, 36.665, 0.92)
pt3dadd(151.16, 39.739, 36.69, 0.918)
pt3dadd(151.218, 39.638, 36.715, 0.916)
pt3dadd(151.276, 39.537, 36.74, 0.914)
pt3dadd(151.333, 39.436, 36.765, 0.912)
pt3dadd(151.39, 39.335, 36.789, 0.91)
pt3dadd(151.447, 39.234, 36.814, 0.908)
pt3dadd(151.505, 39.132, 36.839, 0.906)
pt3dadd(151.562, 39.031, 36.864, 0.904)
pt3dadd(151.614, 38.926, 36.884, 0.896)
pt3dadd(151.664, 38.82, 36.905, 0.888)
pt3dadd(151.716, 38.714, 36.925, 0.878)
pt3dadd(151.768, 38.609, 36.946, 0.87)
pt3dadd(151.819, 38.503, 36.966, 0.862)
pt3dadd(151.871, 38.397, 36.986, 0.854)
pt3dadd(151.921, 38.292, 37.007, 0.844)
pt3dadd(151.973, 38.186, 37.027, 0.836)
pt3dadd(152.024, 38.08, 37.048, 0.828)
pt3dadd(152.076, 37.975, 37.068, 0.82)
pt3dadd(152.12, 37.865, 37.084, 0.82)
pt3dadd(152.166, 37.756, 37.099, 0.818)
pt3dadd(152.212, 37.646, 37.115, 0.818)
pt3dadd(152.257, 37.537, 37.131, 0.818)
pt3dadd(152.303, 37.428, 37.147, 0.816)
pt3dadd(152.348, 37.318, 37.163, 0.816)
pt3dadd(152.394, 37.209, 37.179, 0.816)
pt3dadd(152.44, 37.099, 37.194, 0.816)
pt3dadd(152.484, 36.99, 37.21, 0.814)
pt3dadd(152.531, 36.881, 37.226, 0.816)
pt3dadd(152.588, 36.776, 37.237, 0.884)
pt3dadd(152.646, 36.672, 37.248, 0.952)
pt3dadd(152.704, 36.567, 37.258, 1.018)
pt3dadd(152.761, 36.463, 37.269, 1.086)
pt3dadd(152.819, 36.358, 37.28, 1.154)
pt3dadd(152.876, 36.254, 37.291, 1.22)
pt3dadd(152.934, 36.15, 37.302, 1.288)
pt3dadd(152.992, 36.045, 37.313, 1.354)
pt3dadd(153.049, 35.941, 37.323, 1.422)
pt3dadd(153.107, 35.836, 37.335, 1.486)
pt3dadd(153.146, 35.73, 37.368, 1.436)
pt3dadd(153.185, 35.624, 37.402, 1.386)
pt3dadd(153.224, 35.518, 37.436, 1.336)
pt3dadd(153.263, 35.412, 37.47, 1.286)
pt3dadd(153.302, 35.306, 37.503, 1.236)
pt3dadd(153.342, 35.2, 37.537, 1.188)
pt3dadd(153.38, 35.094, 37.57, 1.138)
pt3dadd(153.42, 34.988, 37.604, 1.088)
pt3dadd(153.458, 34.882, 37.638, 1.038)
pt3dadd(153.498, 34.776, 37.671, 0.992)
pt3dadd(153.53, 34.667, 37.703, 0.99)
pt3dadd(153.563, 34.558, 37.734, 0.99)
pt3dadd(153.596, 34.449, 37.766, 0.988)
pt3dadd(153.629, 34.34, 37.798, 0.986)
pt3dadd(153.662, 34.231, 37.829, 0.984)
pt3dadd(153.695, 34.122, 37.861, 0.982)
pt3dadd(153.728, 34.013, 37.892, 0.982)
pt3dadd(153.761, 33.904, 37.924, 0.98)
pt3dadd(153.794, 33.795, 37.955, 0.978)
pt3dadd(153.828, 33.686, 37.986, 0.98)
pt3dadd(153.865, 33.576, 38.01, 1.006)
pt3dadd(153.904, 33.466, 38.034, 1.034)
pt3dadd(153.942, 33.356, 38.058, 1.06)
pt3dadd(153.98, 33.246, 38.083, 1.086)
pt3dadd(154.018, 33.136, 38.106, 1.114)
pt3dadd(154.056, 33.026, 38.131, 1.14)
pt3dadd(154.094, 32.916, 38.155, 1.168)
pt3dadd(154.133, 32.806, 38.179, 1.194)
pt3dadd(154.171, 32.696, 38.203, 1.22)
pt3dadd(154.212, 32.586, 38.226, 1.238)
pt3dadd(154.266, 32.482, 38.243, 1.204)
pt3dadd(154.321, 32.377, 38.261, 1.17)
pt3dadd(154.375, 32.272, 38.278, 1.136)
pt3dadd(154.429, 32.167, 38.296, 1.102)
pt3dadd(154.484, 32.062, 38.313, 1.068)
pt3dadd(154.538, 31.957, 38.331, 1.034)
pt3dadd(154.594, 31.853, 38.348, 1)
pt3dadd(154.648, 31.748, 38.366, 0.966)
pt3dadd(154.702, 31.643, 38.383, 0.932)
pt3dadd(154.756, 31.537, 38.4, 0.904)
pt3dadd(154.805, 31.429, 38.414, 0.904)
pt3dadd(154.853, 31.321, 38.428, 0.904)
pt3dadd(154.902, 31.212, 38.442, 0.904)
pt3dadd(154.95, 31.104, 38.455, 0.904)
pt3dadd(154.999, 30.995, 38.469, 0.904)
pt3dadd(155.048, 30.887, 38.483, 0.904)
pt3dadd(155.096, 30.779, 38.496, 0.904)
pt3dadd(155.146, 30.67, 38.51, 0.904)
pt3dadd(155.194, 30.562, 38.524, 0.904)
pt3dadd(155.248, 30.458, 38.543, 0.908)
pt3dadd(155.321, 30.379, 38.587, 0.926)
pt3dadd(155.394, 30.3, 38.63, 0.944)
pt3dadd(155.467, 30.222, 38.674, 0.964)
pt3dadd(155.542, 30.143, 38.718, 0.982)
pt3dadd(155.615, 30.064, 38.762, 1.002)
pt3dadd(155.688, 29.985, 38.806, 1.02)
pt3dadd(155.761, 29.906, 38.849, 1.038)
pt3dadd(155.836, 29.827, 38.893, 1.058)
pt3dadd(155.909, 29.748, 38.937, 1.076)
pt3dadd(155.977, 29.665, 38.98, 1.092)
pt3dadd(156.034, 29.57, 39.019, 1.096)
pt3dadd(156.09, 29.475, 39.058, 1.1)
pt3dadd(156.146, 29.38, 39.097, 1.104)
pt3dadd(156.203, 29.285, 39.136, 1.108)
pt3dadd(156.258, 29.19, 39.176, 1.112)
pt3dadd(156.314, 29.094, 39.215, 1.116)
pt3dadd(156.371, 28.999, 39.254, 1.12)
pt3dadd(156.427, 28.904, 39.293, 1.124)
pt3dadd(156.484, 28.809, 39.332, 1.128)
pt3dadd(156.54, 28.713, 39.368, 1.13)
pt3dadd(156.6, 28.615, 39.395, 1.13)
pt3dadd(156.66, 28.516, 39.423, 1.13)
pt3dadd(156.72, 28.418, 39.451, 1.13)
pt3dadd(156.78, 28.319, 39.479, 1.13)
pt3dadd(156.84, 28.221, 39.506, 1.13)
pt3dadd(156.9, 28.122, 39.534, 1.13)
pt3dadd(156.96, 28.023, 39.562, 1.13)
pt3dadd(157.02, 27.925, 39.589, 1.13)
pt3dadd(157.08, 27.826, 39.617, 1.13)
pt3dadd(157.136, 27.727, 39.647, 1.124)
pt3dadd(157.186, 27.626, 39.682, 1.104)
pt3dadd(157.236, 27.525, 39.716, 1.086)
pt3dadd(157.285, 27.424, 39.751, 1.068)
pt3dadd(157.336, 27.323, 39.786, 1.05)
pt3dadd(157.385, 27.222, 39.82, 1.032)
pt3dadd(157.435, 27.121, 39.855, 1.012)
pt3dadd(157.484, 27.021, 39.89, 0.994)
pt3dadd(157.535, 26.92, 39.924, 0.976)
pt3dadd(157.585, 26.819, 39.959, 0.958)
pt3dadd(157.628, 26.717, 39.997, 0.94)
pt3dadd(157.664, 26.614, 40.039, 0.922)
pt3dadd(157.7, 26.511, 40.081, 0.904)
pt3dadd(157.735, 26.409, 40.123, 0.886)
pt3dadd(157.771, 26.306, 40.165, 0.868)
pt3dadd(157.807, 26.203, 40.207, 0.85)
pt3dadd(157.843, 26.1, 40.249, 0.832)
pt3dadd(157.879, 25.997, 40.291, 0.814)
pt3dadd(157.915, 25.895, 40.333, 0.796)
pt3dadd(157.951, 25.792, 40.375, 0.778)
pt3dadd(157.986, 25.688, 40.416, 0.786)
pt3dadd(158.022, 25.583, 40.456, 0.824)
pt3dadd(158.057, 25.479, 40.495, 0.862)
pt3dadd(158.092, 25.374, 40.534, 0.9)
pt3dadd(158.126, 25.269, 40.573, 0.938)
pt3dadd(158.161, 25.165, 40.613, 0.976)
pt3dadd(158.196, 25.06, 40.652, 1.014)
pt3dadd(158.231, 24.955, 40.691, 1.052)
pt3dadd(158.266, 24.851, 40.731, 1.09)
pt3dadd(158.3, 24.746, 40.77, 1.128)
pt3dadd(158.351, 24.657, 40.819, 1.156)
pt3dadd(158.414, 24.582, 40.876, 1.178)
pt3dadd(158.478, 24.507, 40.933, 1.198)
pt3dadd(158.543, 24.432, 40.99, 1.22)
pt3dadd(158.606, 24.357, 41.047, 1.24)
pt3dadd(158.67, 24.282, 41.104, 1.262)
pt3dadd(158.734, 24.207, 41.161, 1.282)
pt3dadd(158.797, 24.132, 41.218, 1.302)
pt3dadd(158.861, 24.057, 41.275, 1.324)
pt3dadd(158.926, 23.981, 41.333, 1.344)
pt3dadd(158.986, 23.894, 41.377, 1.354)
pt3dadd(159.043, 23.796, 41.409, 1.354)
pt3dadd(159.1, 23.698, 41.441, 1.356)
pt3dadd(159.157, 23.6, 41.473, 1.356)
pt3dadd(159.215, 23.502, 41.505, 1.356)
pt3dadd(159.272, 23.404, 41.538, 1.356)
pt3dadd(159.329, 23.306, 41.57, 1.356)
pt3dadd(159.386, 23.208, 41.602, 1.356)
pt3dadd(159.444, 23.109, 41.634, 1.356)
pt3dadd(159.5, 23.011, 41.667, 1.356)
pt3dadd(159.565, 22.915, 41.692, 1.336)
pt3dadd(159.636, 22.821, 41.71, 1.298)
pt3dadd(159.706, 22.726, 41.729, 1.26)
pt3dadd(159.776, 22.631, 41.748, 1.22)
}
}
proc shape3d_44() {
dend_7[17] { pt3dadd(159.846, 22.537, 41.766, 1.182)
pt3dadd(159.917, 22.442, 41.785, 1.144)
pt3dadd(159.988, 22.347, 41.804, 1.106)
pt3dadd(160.057, 22.253, 41.822, 1.068)
pt3dadd(160.128, 22.158, 41.841, 1.03)
pt3dadd(160.198, 22.064, 41.86, 0.992)
pt3dadd(160.267, 21.967, 41.875, 0.986)
pt3dadd(160.334, 21.87, 41.889, 1.012)
pt3dadd(160.403, 21.772, 41.902, 1.04)
pt3dadd(160.47, 21.674, 41.915, 1.066)
pt3dadd(160.538, 21.576, 41.929, 1.092)
pt3dadd(160.606, 21.478, 41.942, 1.118)
pt3dadd(160.673, 21.381, 41.955, 1.144)
pt3dadd(160.741, 21.283, 41.969, 1.17)
pt3dadd(160.808, 21.185, 41.982, 1.196)
pt3dadd(160.877, 21.087, 41.995, 1.222)
pt3dadd(160.931, 20.992, 42.03, 1.228)
pt3dadd(160.973, 20.9, 42.083, 1.218)
pt3dadd(161.015, 20.808, 42.136, 1.206)
pt3dadd(161.057, 20.715, 42.19, 1.196)
pt3dadd(161.099, 20.623, 42.243, 1.184)
pt3dadd(161.141, 20.531, 42.297, 1.172)
pt3dadd(161.184, 20.438, 42.35, 1.162)
pt3dadd(161.226, 20.346, 42.403, 1.15)
pt3dadd(161.268, 20.254, 42.457, 1.14)
pt3dadd(161.31, 20.161, 42.51, 1.128)
}
dend_0[4] {pt3dclear()
pt3dadd(105.606, 131.652, 13.526, 13.334)
pt3dadd(105.606, 131.748, 13.526, 13.288)
pt3dadd(105.606, 131.868, 13.526, 13.23)
pt3dadd(105.606, 131.988, 13.526, 13.172)
pt3dadd(105.606, 132.108, 13.526, 13.114)
pt3dadd(105.606, 132.228, 13.526, 13.058)
pt3dadd(105.596, 132.347, 13.526, 12.972)
pt3dadd(105.582, 132.467, 13.526, 12.872)
pt3dadd(105.568, 132.586, 13.526, 12.772)
pt3dadd(105.554, 132.704, 13.526, 12.672)
pt3dadd(105.539, 132.824, 13.526, 12.572)
pt3dadd(105.525, 132.943, 13.526, 12.472)
pt3dadd(105.511, 133.062, 13.526, 12.374)
pt3dadd(105.497, 133.181, 13.526, 12.274)
pt3dadd(105.482, 133.301, 13.525, 12.174)
pt3dadd(105.468, 133.42, 13.525, 12.074)
pt3dadd(105.432, 133.534, 13.525, 11.91)
pt3dadd(105.39, 133.646, 13.525, 11.732)
pt3dadd(105.348, 133.758, 13.525, 11.554)
pt3dadd(105.307, 133.871, 13.524, 11.374)
pt3dadd(105.265, 133.984, 13.524, 11.196)
pt3dadd(105.223, 134.096, 13.524, 11.018)
pt3dadd(105.182, 134.209, 13.524, 10.84)
pt3dadd(105.14, 134.321, 13.524, 10.662)
pt3dadd(105.098, 134.434, 13.523, 10.484)
pt3dadd(105.057, 134.546, 13.523, 10.304)
pt3dadd(104.997, 134.65, 13.523, 10.138)
pt3dadd(104.934, 134.752, 13.523, 9.972)
pt3dadd(104.87, 134.854, 13.522, 9.808)
pt3dadd(104.807, 134.956, 13.522, 9.642)
pt3dadd(104.744, 135.058, 13.522, 9.478)
pt3dadd(104.68, 135.16, 13.521, 9.312)
pt3dadd(104.617, 135.262, 13.521, 9.148)
pt3dadd(104.553, 135.364, 13.521, 8.984)
pt3dadd(104.49, 135.466, 13.521, 8.818)
pt3dadd(104.427, 135.566, 13.52, 8.654)
pt3dadd(104.357, 135.665, 13.52, 8.514)
pt3dadd(104.286, 135.762, 13.52, 8.378)
pt3dadd(104.216, 135.859, 13.519, 8.244)
pt3dadd(104.145, 135.956, 13.519, 8.11)
}
apic {pt3dclear()
pt3dadd(104.145, 135.956, 13.519, 8.11)
pt3dadd(104.075, 136.052, 13.518, 7.974)
pt3dadd(104.004, 136.15, 13.518, 7.84)
pt3dadd(103.933, 136.247, 13.517, 7.706)
pt3dadd(103.863, 136.344, 13.517, 7.57)
pt3dadd(103.792, 136.441, 13.516, 7.436)
pt3dadd(103.722, 136.538, 13.516, 7.302)
pt3dadd(103.651, 136.636, 13.515, 7.18)
pt3dadd(103.581, 136.733, 13.515, 7.064)
pt3dadd(103.511, 136.83, 13.514, 6.946)
pt3dadd(103.441, 136.927, 13.513, 6.83)
pt3dadd(103.371, 137.024, 13.513, 6.712)
pt3dadd(103.3, 137.122, 13.512, 6.594)
pt3dadd(103.23, 137.219, 13.512, 6.478)
pt3dadd(103.16, 137.317, 13.511, 6.36)
pt3dadd(103.09, 137.414, 13.51, 6.242)
pt3dadd(103.02, 137.512, 13.51, 6.126)
pt3dadd(102.958, 137.614, 13.508, 6.024)
pt3dadd(102.897, 137.718, 13.507, 5.924)
pt3dadd(102.837, 137.821, 13.506, 5.824)
pt3dadd(102.776, 137.924, 13.505, 5.724)
pt3dadd(102.716, 138.029, 13.503, 5.626)
pt3dadd(102.656, 138.132, 13.502, 5.526)
pt3dadd(102.595, 138.236, 13.501, 5.426)
pt3dadd(102.535, 138.34, 13.5, 5.326)
pt3dadd(102.474, 138.443, 13.499, 5.226)
pt3dadd(102.414, 138.547, 13.497, 5.128)
pt3dadd(102.346, 138.646, 13.495, 5.066)
pt3dadd(102.277, 138.744, 13.493, 5.012)
pt3dadd(102.208, 138.842, 13.491, 4.958)
pt3dadd(102.14, 138.941, 13.489, 4.904)
pt3dadd(102.071, 139.039, 13.487, 4.85)
pt3dadd(102.002, 139.138, 13.485, 4.796)
pt3dadd(101.933, 139.236, 13.483, 4.74)
pt3dadd(101.864, 139.333, 13.48, 4.686)
pt3dadd(101.796, 139.432, 13.478, 4.632)
pt3dadd(101.727, 139.53, 13.476, 4.578)
pt3dadd(101.655, 139.626, 13.473, 4.536)
pt3dadd(101.582, 139.722, 13.469, 4.496)
pt3dadd(101.51, 139.818, 13.465, 4.456)
pt3dadd(101.438, 139.913, 13.462, 4.416)
pt3dadd(101.365, 140.009, 13.458, 4.376)
pt3dadd(101.293, 140.105, 13.455, 4.338)
pt3dadd(101.221, 140.2, 13.451, 4.298)
pt3dadd(101.148, 140.296, 13.448, 4.258)
pt3dadd(101.076, 140.392, 13.444, 4.218)
pt3dadd(101.004, 140.488, 13.44, 4.178)
pt3dadd(100.929, 140.58, 13.435, 4.146)
pt3dadd(100.853, 140.674, 13.43, 4.116)
pt3dadd(100.778, 140.767, 13.424, 4.086)
pt3dadd(100.703, 140.86, 13.419, 4.058)
pt3dadd(100.627, 140.953, 13.413, 4.028)
pt3dadd(100.552, 141.047, 13.408, 3.998)
pt3dadd(100.476, 141.139, 13.402, 3.968)
pt3dadd(100.401, 141.233, 13.397, 3.938)
pt3dadd(100.326, 141.325, 13.391, 3.908)
pt3dadd(100.25, 141.419, 13.386, 3.878)
pt3dadd(100.173, 141.51, 13.378, 3.894)
pt3dadd(100.095, 141.6, 13.37, 3.916)
pt3dadd(100.017, 141.691, 13.361, 3.938)
pt3dadd(99.939, 141.781, 13.353, 3.962)
pt3dadd(99.861, 141.872, 13.345, 3.984)
pt3dadd(99.783, 141.962, 13.336, 4.006)
pt3dadd(99.705, 142.054, 13.328, 4.03)
pt3dadd(99.627, 142.144, 13.319, 4.052)
pt3dadd(99.549, 142.235, 13.311, 4.074)
pt3dadd(99.471, 142.325, 13.303, 4.098)
pt3dadd(99.398, 142.42, 13.287, 4.1)
pt3dadd(99.327, 142.513, 13.27, 4.098)
pt3dadd(99.255, 142.608, 13.253, 4.096)
pt3dadd(99.184, 142.702, 13.236, 4.094)
pt3dadd(99.113, 142.796, 13.219, 4.092)
pt3dadd(99.041, 142.891, 13.202, 4.09)
pt3dadd(98.97, 142.985, 13.185, 4.09)
pt3dadd(98.899, 143.08, 13.168, 4.088)
pt3dadd(98.827, 143.173, 13.151, 4.086)
pt3dadd(98.756, 143.268, 13.134, 4.084)
pt3dadd(98.7, 143.366, 13.102, 4.022)
pt3dadd(98.644, 143.465, 13.069, 3.96)
pt3dadd(98.589, 143.564, 13.036, 3.896)
pt3dadd(98.533, 143.663, 13.003, 3.832)
pt3dadd(98.478, 143.761, 12.97, 3.77)
pt3dadd(98.422, 143.861, 12.937, 3.706)
pt3dadd(98.367, 143.959, 12.905, 3.642)
pt3dadd(98.311, 144.058, 12.872, 3.58)
pt3dadd(98.255, 144.157, 12.839, 3.516)
pt3dadd(98.2, 144.256, 12.806, 3.452)
pt3dadd(98.136, 144.354, 12.784, 3.432)
pt3dadd(98.072, 144.451, 12.763, 3.412)
pt3dadd(98.008, 144.55, 12.742, 3.39)
pt3dadd(97.944, 144.648, 12.72, 3.37)
pt3dadd(97.879, 144.746, 12.699, 3.35)
pt3dadd(97.815, 144.845, 12.678, 3.33)
pt3dadd(97.751, 144.942, 12.656, 3.31)
pt3dadd(97.687, 145.04, 12.635, 3.29)
pt3dadd(97.623, 145.139, 12.614, 3.268)
pt3dadd(97.559, 145.237, 12.593, 3.248)
pt3dadd(97.491, 145.334, 12.578, 3.246)
pt3dadd(97.423, 145.432, 12.563, 3.246)
pt3dadd(97.356, 145.53, 12.548, 3.244)
pt3dadd(97.288, 145.627, 12.534, 3.244)
pt3dadd(97.22, 145.724, 12.519, 3.242)
pt3dadd(97.152, 145.822, 12.504, 3.24)
pt3dadd(97.085, 145.92, 12.49, 3.24)
pt3dadd(97.017, 146.017, 12.475, 3.238)
pt3dadd(96.949, 146.114, 12.46, 3.236)
pt3dadd(96.882, 146.212, 12.445, 3.236)
pt3dadd(96.811, 146.309, 12.437, 3.252)
pt3dadd(96.74, 146.405, 12.428, 3.266)
pt3dadd(96.67, 146.501, 12.42, 3.282)
pt3dadd(96.599, 146.598, 12.411, 3.298)
pt3dadd(96.528, 146.694, 12.402, 3.312)
pt3dadd(96.458, 146.791, 12.394, 3.328)
pt3dadd(96.387, 146.887, 12.385, 3.344)
pt3dadd(96.317, 146.983, 12.377, 3.36)
pt3dadd(96.246, 147.08, 12.368, 3.374)
pt3dadd(96.175, 147.176, 12.36, 3.39)
}
apic[1] {pt3dclear()
pt3dadd(96.175, 147.176, 12.36, 3.39)
pt3dadd(96.125, 147.277, 12.36, 3.342)
pt3dadd(96.071, 147.384, 12.361, 3.29)
pt3dadd(96.017, 147.491, 12.362, 3.238)
pt3dadd(95.963, 147.599, 12.363, 3.188)
pt3dadd(95.909, 147.706, 12.364, 3.136)
pt3dadd(95.855, 147.812, 12.365, 3.086)
pt3dadd(95.799, 147.919, 12.366, 3.044)
pt3dadd(95.744, 148.025, 12.367, 3.002)
pt3dadd(95.688, 148.132, 12.368, 2.958)
pt3dadd(95.632, 148.237, 12.369, 2.916)
pt3dadd(95.576, 148.344, 12.37, 2.874)
pt3dadd(95.521, 148.451, 12.371, 2.832)
pt3dadd(95.465, 148.556, 12.372, 2.79)
pt3dadd(95.409, 148.663, 12.374, 2.748)
pt3dadd(95.354, 148.769, 12.375, 2.704)
pt3dadd(95.297, 148.874, 12.376, 2.666)
}
}
proc shape3d_45() {
apic[1] { pt3dadd(95.237, 148.979, 12.378, 2.65)
pt3dadd(95.176, 149.082, 12.38, 2.632)
pt3dadd(95.116, 149.186, 12.381, 2.616)
pt3dadd(95.055, 149.29, 12.383, 2.6)
pt3dadd(94.995, 149.393, 12.385, 2.582)
pt3dadd(94.934, 149.497, 12.387, 2.566)
pt3dadd(94.874, 149.6, 12.389, 2.55)
pt3dadd(94.814, 149.704, 12.391, 2.534)
pt3dadd(94.753, 149.808, 12.392, 2.516)
pt3dadd(94.695, 149.912, 12.394, 2.496)
pt3dadd(94.652, 150.024, 12.398, 2.446)
pt3dadd(94.609, 150.137, 12.402, 2.394)
pt3dadd(94.566, 150.248, 12.406, 2.344)
pt3dadd(94.523, 150.36, 12.41, 2.294)
pt3dadd(94.48, 150.472, 12.414, 2.242)
pt3dadd(94.437, 150.584, 12.418, 2.192)
pt3dadd(94.394, 150.696, 12.422, 2.142)
pt3dadd(94.351, 150.808, 12.426, 2.09)
pt3dadd(94.308, 150.919, 12.43, 2.04)
pt3dadd(94.263, 151.031, 12.434, 1.994)
pt3dadd(94.213, 151.14, 12.441, 1.976)
pt3dadd(94.163, 151.248, 12.449, 1.956)
pt3dadd(94.113, 151.357, 12.456, 1.938)
pt3dadd(94.063, 151.466, 12.464, 1.918)
pt3dadd(94.013, 151.574, 12.471, 1.9)
pt3dadd(93.963, 151.684, 12.478, 1.88)
pt3dadd(93.913, 151.792, 12.486, 1.862)
pt3dadd(93.863, 151.901, 12.493, 1.842)
pt3dadd(93.813, 152.01, 12.5, 1.824)
pt3dadd(93.764, 152.118, 12.509, 1.802)
pt3dadd(93.717, 152.228, 12.521, 1.766)
pt3dadd(93.67, 152.338, 12.533, 1.73)
pt3dadd(93.624, 152.447, 12.545, 1.694)
pt3dadd(93.577, 152.557, 12.557, 1.658)
pt3dadd(93.53, 152.666, 12.569, 1.622)
pt3dadd(93.483, 152.776, 12.582, 1.584)
pt3dadd(93.437, 152.885, 12.594, 1.548)
pt3dadd(93.39, 152.995, 12.606, 1.512)
pt3dadd(93.343, 153.104, 12.618, 1.476)
pt3dadd(93.301, 153.215, 12.633, 1.426)
pt3dadd(93.273, 153.329, 12.654, 1.328)
pt3dadd(93.246, 153.443, 12.675, 1.228)
pt3dadd(93.218, 153.557, 12.697, 1.13)
pt3dadd(93.19, 153.671, 12.718, 1.032)
pt3dadd(93.163, 153.785, 12.74, 0.934)
pt3dadd(93.135, 153.899, 12.761, 0.834)
pt3dadd(93.108, 154.013, 12.782, 0.736)
pt3dadd(93.08, 154.127, 12.804, 0.638)
pt3dadd(93.052, 154.241, 12.825, 0.54)
pt3dadd(93.029, 154.351, 12.854, 0.474)
pt3dadd(93.016, 154.457, 12.901, 0.49)
pt3dadd(93.003, 154.562, 12.948, 0.508)
pt3dadd(92.99, 154.667, 12.995, 0.524)
pt3dadd(92.976, 154.772, 13.042, 0.542)
pt3dadd(92.963, 154.877, 13.089, 0.558)
pt3dadd(92.95, 154.982, 13.136, 0.576)
pt3dadd(92.937, 155.087, 13.183, 0.592)
pt3dadd(92.924, 155.192, 13.23, 0.61)
pt3dadd(92.911, 155.298, 13.277, 0.626)
pt3dadd(92.9, 155.401, 13.326, 0.636)
pt3dadd(92.895, 155.502, 13.381, 0.628)
pt3dadd(92.89, 155.602, 13.436, 0.62)
pt3dadd(92.885, 155.702, 13.49, 0.61)
pt3dadd(92.88, 155.802, 13.545, 0.602)
pt3dadd(92.875, 155.903, 13.6, 0.594)
pt3dadd(92.87, 156.002, 13.655, 0.586)
pt3dadd(92.865, 156.103, 13.71, 0.576)
pt3dadd(92.86, 156.204, 13.764, 0.568)
pt3dadd(92.855, 156.304, 13.819, 0.56)
pt3dadd(92.85, 156.404, 13.873, 0.548)
pt3dadd(92.846, 156.508, 13.924, 0.532)
pt3dadd(92.842, 156.611, 13.975, 0.514)
pt3dadd(92.838, 156.714, 14.027, 0.498)
pt3dadd(92.835, 156.816, 14.078, 0.48)
pt3dadd(92.831, 156.919, 14.129, 0.462)
pt3dadd(92.827, 157.022, 14.18, 0.446)
pt3dadd(92.823, 157.126, 14.232, 0.428)
pt3dadd(92.819, 157.229, 14.283, 0.412)
pt3dadd(92.815, 157.331, 14.334, 0.394)
pt3dadd(92.81, 157.436, 14.381, 0.378)
pt3dadd(92.802, 157.547, 14.42, 0.362)
pt3dadd(92.795, 157.657, 14.459, 0.346)
pt3dadd(92.787, 157.768, 14.498, 0.33)
pt3dadd(92.779, 157.878, 14.537, 0.314)
pt3dadd(92.771, 157.988, 14.575, 0.3)
pt3dadd(92.763, 158.099, 14.614, 0.284)
pt3dadd(92.755, 158.209, 14.653, 0.268)
pt3dadd(92.748, 158.32, 14.692, 0.252)
pt3dadd(92.74, 158.43, 14.73, 0.236)
pt3dadd(92.729, 158.542, 14.765, 0.226)
pt3dadd(92.711, 158.656, 14.791, 0.226)
pt3dadd(92.694, 158.771, 14.817, 0.226)
pt3dadd(92.676, 158.885, 14.844, 0.226)
pt3dadd(92.659, 158.999, 14.87, 0.226)
pt3dadd(92.641, 159.114, 14.896, 0.226)
pt3dadd(92.624, 159.228, 14.922, 0.226)
pt3dadd(92.607, 159.343, 14.948, 0.226)
pt3dadd(92.589, 159.457, 14.975, 0.226)
pt3dadd(92.572, 159.571, 15.001, 0.226)
pt3dadd(92.549, 159.682, 15.034, 0.226)
pt3dadd(92.516, 159.784, 15.079, 0.226)
pt3dadd(92.483, 159.887, 15.123, 0.226)
pt3dadd(92.45, 159.989, 15.167, 0.228)
pt3dadd(92.418, 160.091, 15.212, 0.228)
pt3dadd(92.385, 160.194, 15.256, 0.228)
pt3dadd(92.352, 160.296, 15.301, 0.228)
pt3dadd(92.32, 160.398, 15.345, 0.228)
pt3dadd(92.287, 160.501, 15.39, 0.228)
pt3dadd(92.254, 160.603, 15.434, 0.23)
pt3dadd(92.195, 160.687, 15.473, 0.248)
pt3dadd(92.095, 160.744, 15.503, 0.298)
pt3dadd(91.995, 160.799, 15.533, 0.346)
pt3dadd(91.896, 160.855, 15.563, 0.394)
pt3dadd(91.796, 160.91, 15.594, 0.442)
pt3dadd(91.696, 160.966, 15.624, 0.492)
pt3dadd(91.596, 161.022, 15.654, 0.54)
pt3dadd(91.496, 161.077, 15.684, 0.588)
pt3dadd(91.396, 161.134, 15.714, 0.636)
pt3dadd(91.296, 161.189, 15.744, 0.686)
pt3dadd(91.189, 161.23, 15.767, 0.73)
pt3dadd(91.072, 161.254, 15.779, 0.772)
pt3dadd(90.955, 161.276, 15.792, 0.814)
pt3dadd(90.838, 161.299, 15.804, 0.856)
pt3dadd(90.721, 161.322, 15.816, 0.898)
pt3dadd(90.604, 161.345, 15.829, 0.94)
pt3dadd(90.487, 161.368, 15.841, 0.982)
pt3dadd(90.371, 161.39, 15.854, 1.024)
pt3dadd(90.254, 161.413, 15.866, 1.066)
pt3dadd(90.137, 161.436, 15.879, 1.108)
pt3dadd(90.019, 161.453, 15.886, 1.13)
pt3dadd(89.899, 161.465, 15.887, 1.13)
pt3dadd(89.78, 161.477, 15.887, 1.13)
pt3dadd(89.661, 161.489, 15.888, 1.13)
pt3dadd(89.541, 161.501, 15.889, 1.13)
pt3dadd(89.422, 161.512, 15.889, 1.13)
pt3dadd(89.302, 161.524, 15.89, 1.13)
pt3dadd(89.183, 161.536, 15.891, 1.13)
pt3dadd(89.063, 161.548, 15.891, 1.13)
pt3dadd(88.944, 161.56, 15.892, 1.13)
pt3dadd(88.827, 161.581, 15.893, 1.13)
pt3dadd(88.712, 161.618, 15.895, 1.13)
pt3dadd(88.598, 161.654, 15.896, 1.13)
pt3dadd(88.484, 161.69, 15.897, 1.13)
pt3dadd(88.369, 161.726, 15.899, 1.13)
pt3dadd(88.255, 161.762, 15.9, 1.13)
pt3dadd(88.14, 161.798, 15.901, 1.13)
pt3dadd(88.026, 161.834, 15.903, 1.13)
pt3dadd(87.912, 161.872, 15.904, 1.13)
pt3dadd(87.797, 161.908, 15.905, 1.13)
pt3dadd(87.682, 161.94, 15.907, 1.124)
pt3dadd(87.565, 161.969, 15.91, 1.114)
pt3dadd(87.449, 161.996, 15.912, 1.102)
pt3dadd(87.332, 162.025, 15.915, 1.092)
pt3dadd(87.216, 162.054, 15.917, 1.08)
pt3dadd(87.099, 162.083, 15.919, 1.07)
pt3dadd(86.983, 162.112, 15.922, 1.06)
pt3dadd(86.866, 162.139, 15.924, 1.048)
pt3dadd(86.75, 162.168, 15.927, 1.038)
pt3dadd(86.633, 162.197, 15.929, 1.026)
pt3dadd(86.515, 162.216, 15.933, 1.014)
pt3dadd(86.396, 162.226, 15.938, 1.004)
pt3dadd(86.276, 162.235, 15.943, 0.992)
pt3dadd(86.157, 162.246, 15.948, 0.98)
pt3dadd(86.037, 162.256, 15.953, 0.968)
pt3dadd(85.918, 162.266, 15.957, 0.956)
pt3dadd(85.798, 162.276, 15.962, 0.944)
pt3dadd(85.679, 162.287, 15.967, 0.932)
pt3dadd(85.56, 162.296, 15.972, 0.92)
pt3dadd(85.44, 162.307, 15.977, 0.908)
pt3dadd(85.321, 162.302, 15.984, 0.906)
pt3dadd(85.203, 162.288, 15.993, 0.91)
pt3dadd(85.084, 162.274, 16.002, 0.914)
pt3dadd(84.965, 162.259, 16.01, 0.916)
pt3dadd(84.846, 162.246, 16.019, 0.92)
pt3dadd(84.728, 162.232, 16.028, 0.924)
pt3dadd(84.609, 162.217, 16.036, 0.928)
pt3dadd(84.49, 162.203, 16.045, 0.93)
pt3dadd(84.372, 162.188, 16.054, 0.934)
pt3dadd(84.253, 162.174, 16.062, 0.938)
pt3dadd(84.142, 162.133, 16.073, 0.952)
pt3dadd(84.035, 162.082, 16.085, 0.968)
pt3dadd(83.927, 162.03, 16.097, 0.986)
pt3dadd(83.82, 161.978, 16.109, 1.002)
pt3dadd(83.712, 161.927, 16.121, 1.02)
pt3dadd(83.605, 161.876, 16.133, 1.038)
pt3dadd(83.498, 161.825, 16.145, 1.054)
pt3dadd(83.39, 161.773, 16.156, 1.072)
pt3dadd(83.283, 161.722, 16.168, 1.09)
pt3dadd(83.175, 161.67, 16.18, 1.106)
pt3dadd(83.07, 161.626, 16.208, 1.112)
pt3dadd(82.965, 161.585, 16.243, 1.114)
pt3dadd(82.86, 161.544, 16.278, 1.116)
pt3dadd(82.756, 161.503, 16.313, 1.118)
pt3dadd(82.651, 161.461, 16.348, 1.12)
pt3dadd(82.546, 161.42, 16.383, 1.122)
pt3dadd(82.442, 161.38, 16.418, 1.124)
pt3dadd(82.337, 161.339, 16.453, 1.126)
pt3dadd(82.232, 161.297, 16.488, 1.128)
pt3dadd(82.128, 161.256, 16.523, 1.13)
pt3dadd(82.024, 161.209, 16.555, 1.136)
}
}
proc shape3d_46() {
apic[1] { pt3dadd(81.922, 161.161, 16.588, 1.146)
pt3dadd(81.819, 161.113, 16.62, 1.154)
pt3dadd(81.716, 161.065, 16.652, 1.162)
pt3dadd(81.613, 161.016, 16.685, 1.172)
pt3dadd(81.51, 160.968, 16.717, 1.18)
pt3dadd(81.408, 160.92, 16.749, 1.19)
pt3dadd(81.305, 160.872, 16.781, 1.198)
pt3dadd(81.202, 160.824, 16.814, 1.206)
pt3dadd(81.099, 160.775, 16.846, 1.216)
pt3dadd(80.996, 160.723, 16.874, 1.226)
pt3dadd(80.894, 160.67, 16.901, 1.238)
pt3dadd(80.791, 160.618, 16.928, 1.248)
pt3dadd(80.688, 160.564, 16.955, 1.26)
pt3dadd(80.586, 160.511, 16.982, 1.272)
pt3dadd(80.483, 160.458, 17.009, 1.282)
pt3dadd(80.38, 160.405, 17.035, 1.294)
pt3dadd(80.278, 160.352, 17.062, 1.304)
pt3dadd(80.175, 160.298, 17.089, 1.316)
pt3dadd(80.072, 160.246, 17.116, 1.328)
pt3dadd(79.963, 160.206, 17.14, 1.314)
pt3dadd(79.852, 160.169, 17.163, 1.296)
pt3dadd(79.741, 160.132, 17.185, 1.278)
pt3dadd(79.631, 160.094, 17.208, 1.26)
pt3dadd(79.52, 160.057, 17.231, 1.242)
pt3dadd(79.409, 160.02, 17.254, 1.224)
pt3dadd(79.298, 159.983, 17.277, 1.206)
pt3dadd(79.188, 159.946, 17.3, 1.188)
pt3dadd(79.077, 159.908, 17.322, 1.17)
pt3dadd(78.966, 159.871, 17.345, 1.152)
pt3dadd(78.858, 159.84, 17.38, 1.186)
pt3dadd(78.751, 159.811, 17.418, 1.232)
pt3dadd(78.644, 159.782, 17.456, 1.276)
pt3dadd(78.537, 159.754, 17.494, 1.322)
pt3dadd(78.43, 159.724, 17.532, 1.366)
pt3dadd(78.323, 159.695, 17.57, 1.412)
pt3dadd(78.216, 159.666, 17.608, 1.458)
pt3dadd(78.108, 159.637, 17.646, 1.502)
pt3dadd(78.001, 159.607, 17.684, 1.548)
pt3dadd(77.894, 159.578, 17.722, 1.592)
pt3dadd(77.789, 159.538, 17.757, 1.59)
pt3dadd(77.685, 159.496, 17.791, 1.58)
pt3dadd(77.58, 159.452, 17.825, 1.568)
pt3dadd(77.476, 159.41, 17.859, 1.556)
pt3dadd(77.371, 159.367, 17.893, 1.546)
pt3dadd(77.267, 159.325, 17.927, 1.534)
pt3dadd(77.162, 159.282, 17.961, 1.524)
pt3dadd(77.058, 159.24, 17.995, 1.512)
pt3dadd(76.953, 159.197, 18.029, 1.5)
pt3dadd(76.849, 159.155, 18.063, 1.49)
pt3dadd(76.745, 159.107, 18.092, 1.45)
pt3dadd(76.641, 159.058, 18.121, 1.408)
pt3dadd(76.537, 159.008, 18.15, 1.366)
pt3dadd(76.433, 158.959, 18.178, 1.324)
pt3dadd(76.329, 158.91, 18.207, 1.282)
pt3dadd(76.225, 158.861, 18.236, 1.24)
pt3dadd(76.121, 158.812, 18.264, 1.198)
pt3dadd(76.017, 158.762, 18.293, 1.156)
pt3dadd(75.913, 158.713, 18.321, 1.114)
pt3dadd(75.809, 158.664, 18.35, 1.072)
pt3dadd(75.706, 158.616, 18.38, 1.058)
pt3dadd(75.602, 158.567, 18.41, 1.05)
pt3dadd(75.498, 158.519, 18.44, 1.04)
pt3dadd(75.394, 158.471, 18.47, 1.03)
pt3dadd(75.291, 158.422, 18.5, 1.022)
pt3dadd(75.187, 158.374, 18.53, 1.012)
pt3dadd(75.083, 158.326, 18.56, 1.002)
pt3dadd(74.979, 158.276, 18.59, 0.994)
pt3dadd(74.876, 158.228, 18.62, 0.984)
pt3dadd(74.772, 158.179, 18.65, 0.976)
pt3dadd(74.69, 158.116, 18.699, 1.012)
pt3dadd(74.607, 158.052, 18.749, 1.048)
pt3dadd(74.525, 157.987, 18.798, 1.084)
pt3dadd(74.443, 157.924, 18.847, 1.12)
pt3dadd(74.36, 157.86, 18.897, 1.154)
pt3dadd(74.278, 157.795, 18.946, 1.19)
pt3dadd(74.196, 157.732, 18.996, 1.226)
pt3dadd(74.113, 157.668, 19.045, 1.262)
pt3dadd(74.031, 157.603, 19.095, 1.298)
pt3dadd(73.947, 157.542, 19.144, 1.33)
pt3dadd(73.842, 157.512, 19.185, 1.306)
pt3dadd(73.737, 157.481, 19.227, 1.28)
pt3dadd(73.633, 157.451, 19.269, 1.256)
pt3dadd(73.528, 157.42, 19.31, 1.232)
pt3dadd(73.423, 157.39, 19.352, 1.208)
pt3dadd(73.318, 157.358, 19.393, 1.182)
pt3dadd(73.214, 157.328, 19.435, 1.158)
pt3dadd(73.109, 157.297, 19.477, 1.134)
pt3dadd(73.004, 157.267, 19.518, 1.11)
pt3dadd(72.899, 157.238, 19.559, 1.084)
pt3dadd(72.787, 157.229, 19.595, 1.042)
pt3dadd(72.676, 157.218, 19.631, 1.002)
pt3dadd(72.564, 157.207, 19.667, 0.962)
pt3dadd(72.452, 157.198, 19.702, 0.922)
pt3dadd(72.341, 157.187, 19.738, 0.882)
pt3dadd(72.229, 157.177, 19.774, 0.842)
pt3dadd(72.118, 157.166, 19.81, 0.8)
pt3dadd(72.006, 157.156, 19.845, 0.76)
pt3dadd(71.895, 157.146, 19.881, 0.72)
pt3dadd(71.784, 157.138, 19.919, 0.686)
pt3dadd(71.683, 157.145, 19.972, 0.722)
pt3dadd(71.582, 157.153, 20.026, 0.756)
pt3dadd(71.481, 157.16, 20.079, 0.792)
pt3dadd(71.38, 157.169, 20.133, 0.826)
pt3dadd(71.279, 157.176, 20.186, 0.86)
pt3dadd(71.178, 157.184, 20.24, 0.896)
pt3dadd(71.077, 157.192, 20.293, 0.93)
pt3dadd(70.975, 157.2, 20.347, 0.966)
pt3dadd(70.874, 157.207, 20.401, 1)
pt3dadd(70.774, 157.216, 20.455, 1.038)
pt3dadd(70.681, 157.226, 20.517, 1.094)
pt3dadd(70.587, 157.237, 20.579, 1.15)
pt3dadd(70.494, 157.248, 20.641, 1.208)
pt3dadd(70.401, 157.259, 20.704, 1.264)
pt3dadd(70.308, 157.27, 20.766, 1.322)
pt3dadd(70.214, 157.28, 20.828, 1.378)
pt3dadd(70.121, 157.291, 20.89, 1.434)
pt3dadd(70.028, 157.302, 20.953, 1.492)
pt3dadd(69.934, 157.313, 21.015, 1.548)
pt3dadd(69.842, 157.325, 21.078, 1.604)
pt3dadd(69.758, 157.349, 21.147, 1.648)
pt3dadd(69.675, 157.373, 21.216, 1.692)
pt3dadd(69.591, 157.396, 21.285, 1.736)
pt3dadd(69.507, 157.42, 21.354, 1.78)
pt3dadd(69.424, 157.444, 21.422, 1.824)
pt3dadd(69.34, 157.466, 21.491, 1.868)
pt3dadd(69.256, 157.49, 21.56, 1.912)
pt3dadd(69.173, 157.514, 21.629, 1.956)
pt3dadd(69.089, 157.537, 21.698, 2.002)
pt3dadd(69.008, 157.567, 21.768, 2.032)
pt3dadd(68.937, 157.612, 21.839, 2.024)
pt3dadd(68.866, 157.657, 21.91, 2.016)
pt3dadd(68.795, 157.702, 21.981, 2.01)
pt3dadd(68.723, 157.747, 22.052, 2.002)
pt3dadd(68.652, 157.793, 22.123, 1.994)
pt3dadd(68.581, 157.837, 22.194, 1.986)
pt3dadd(68.509, 157.883, 22.265, 1.978)
pt3dadd(68.438, 157.928, 22.336, 1.972)
pt3dadd(68.367, 157.973, 22.407, 1.964)
pt3dadd(68.285, 158.015, 22.469, 1.932)
pt3dadd(68.183, 158.048, 22.513, 1.848)
pt3dadd(68.08, 158.083, 22.556, 1.764)
pt3dadd(67.977, 158.117, 22.599, 1.68)
pt3dadd(67.874, 158.15, 22.642, 1.596)
pt3dadd(67.771, 158.184, 22.685, 1.512)
pt3dadd(67.668, 158.219, 22.728, 1.428)
pt3dadd(67.566, 158.252, 22.771, 1.344)
pt3dadd(67.463, 158.286, 22.814, 1.26)
pt3dadd(67.36, 158.32, 22.857, 1.174)
pt3dadd(67.253, 158.348, 22.893, 1.112)
pt3dadd(67.136, 158.365, 22.913, 1.092)
pt3dadd(67.02, 158.383, 22.934, 1.07)
pt3dadd(66.904, 158.4, 22.955, 1.05)
pt3dadd(66.788, 158.418, 22.975, 1.028)
pt3dadd(66.672, 158.435, 22.996, 1.008)
pt3dadd(66.556, 158.452, 23.017, 0.986)
pt3dadd(66.44, 158.47, 23.037, 0.966)
pt3dadd(66.323, 158.486, 23.058, 0.944)
pt3dadd(66.207, 158.504, 23.079, 0.922)
pt3dadd(66.09, 158.516, 23.097, 0.908)
pt3dadd(65.971, 158.522, 23.11, 0.908)
pt3dadd(65.853, 158.527, 23.124, 0.908)
pt3dadd(65.734, 158.532, 23.137, 0.908)
pt3dadd(65.615, 158.537, 23.15, 0.906)
pt3dadd(65.496, 158.542, 23.164, 0.906)
pt3dadd(65.377, 158.546, 23.177, 0.906)
pt3dadd(65.259, 158.551, 23.19, 0.906)
pt3dadd(65.14, 158.556, 23.204, 0.904)
pt3dadd(65.021, 158.561, 23.217, 0.904)
pt3dadd(64.904, 158.568, 23.238, 0.9)
pt3dadd(64.793, 158.578, 23.274, 0.884)
pt3dadd(64.681, 158.587, 23.309, 0.87)
pt3dadd(64.569, 158.597, 23.344, 0.854)
pt3dadd(64.457, 158.606, 23.38, 0.84)
pt3dadd(64.345, 158.616, 23.415, 0.826)
pt3dadd(64.233, 158.624, 23.451, 0.812)
pt3dadd(64.122, 158.634, 23.486, 0.796)
pt3dadd(64.01, 158.644, 23.521, 0.782)
pt3dadd(63.898, 158.653, 23.557, 0.768)
pt3dadd(63.787, 158.666, 23.592, 0.756)
pt3dadd(63.676, 158.682, 23.628, 0.748)
pt3dadd(63.565, 158.698, 23.664, 0.74)
pt3dadd(63.454, 158.713, 23.7, 0.73)
pt3dadd(63.343, 158.73, 23.736, 0.722)
pt3dadd(63.232, 158.746, 23.772, 0.714)
pt3dadd(63.122, 158.761, 23.808, 0.706)
pt3dadd(63.011, 158.778, 23.844, 0.698)
pt3dadd(62.9, 158.794, 23.88, 0.69)
pt3dadd(62.789, 158.809, 23.916, 0.682)
pt3dadd(62.679, 158.834, 23.949, 0.684)
pt3dadd(62.57, 158.869, 23.977, 0.698)
pt3dadd(62.46, 158.905, 24.006, 0.712)
pt3dadd(62.351, 158.941, 24.035, 0.728)
pt3dadd(62.242, 158.977, 24.064, 0.742)
pt3dadd(62.133, 159.012, 24.093, 0.756)
pt3dadd(62.024, 159.048, 24.122, 0.77)
pt3dadd(61.915, 159.084, 24.151, 0.784)
pt3dadd(61.805, 159.12, 24.18, 0.798)
pt3dadd(61.696, 159.155, 24.209, 0.812)
pt3dadd(61.593, 159.205, 24.236, 0.834)
pt3dadd(61.495, 159.266, 24.263, 0.858)
}
}
proc shape3d_47() {
apic[1] { pt3dadd(61.396, 159.326, 24.29, 0.882)
pt3dadd(61.298, 159.388, 24.316, 0.906)
pt3dadd(61.199, 159.448, 24.343, 0.93)
pt3dadd(61.101, 159.509, 24.37, 0.954)
pt3dadd(61.002, 159.569, 24.396, 0.98)
pt3dadd(60.904, 159.63, 24.423, 1.004)
pt3dadd(60.805, 159.691, 24.45, 1.028)
pt3dadd(60.707, 159.751, 24.476, 1.052)
pt3dadd(60.619, 159.817, 24.515, 1.032)
pt3dadd(60.536, 159.884, 24.561, 0.988)
pt3dadd(60.454, 159.953, 24.606, 0.944)
pt3dadd(60.372, 160.021, 24.652, 0.902)
pt3dadd(60.289, 160.088, 24.697, 0.858)
pt3dadd(60.207, 160.157, 24.743, 0.814)
pt3dadd(60.125, 160.225, 24.788, 0.77)
pt3dadd(60.042, 160.294, 24.834, 0.726)
pt3dadd(59.96, 160.361, 24.879, 0.682)
pt3dadd(59.877, 160.429, 24.925, 0.638)
pt3dadd(59.795, 160.506, 24.957, 0.6)
pt3dadd(59.712, 160.588, 24.984, 0.562)
pt3dadd(59.63, 160.668, 25.01, 0.526)
pt3dadd(59.547, 160.75, 25.036, 0.49)
pt3dadd(59.465, 160.831, 25.063, 0.454)
pt3dadd(59.382, 160.912, 25.089, 0.416)
pt3dadd(59.3, 160.993, 25.116, 0.38)
pt3dadd(59.217, 161.074, 25.142, 0.344)
pt3dadd(59.134, 161.155, 25.169, 0.308)
pt3dadd(59.052, 161.236, 25.195, 0.27)
pt3dadd(58.968, 161.318, 25.215, 0.268)
pt3dadd(58.883, 161.4, 25.233, 0.28)
pt3dadd(58.798, 161.483, 25.25, 0.292)
pt3dadd(58.713, 161.564, 25.267, 0.302)
pt3dadd(58.628, 161.646, 25.284, 0.314)
pt3dadd(58.543, 161.729, 25.301, 0.326)
pt3dadd(58.458, 161.81, 25.319, 0.338)
pt3dadd(58.373, 161.893, 25.336, 0.35)
pt3dadd(58.288, 161.975, 25.353, 0.362)
pt3dadd(58.203, 162.058, 25.37, 0.374)
pt3dadd(58.117, 162.139, 25.385, 0.394)
pt3dadd(58.03, 162.221, 25.398, 0.42)
pt3dadd(57.944, 162.302, 25.411, 0.444)
pt3dadd(57.857, 162.384, 25.425, 0.47)
pt3dadd(57.771, 162.466, 25.438, 0.494)
pt3dadd(57.684, 162.547, 25.451, 0.52)
pt3dadd(57.598, 162.629, 25.464, 0.544)
pt3dadd(57.512, 162.712, 25.477, 0.57)
pt3dadd(57.425, 162.793, 25.491, 0.594)
pt3dadd(57.339, 162.875, 25.504, 0.62)
pt3dadd(57.252, 162.955, 25.519, 0.648)
pt3dadd(57.164, 163.034, 25.535, 0.678)
pt3dadd(57.076, 163.115, 25.55, 0.71)
pt3dadd(56.989, 163.194, 25.566, 0.74)
pt3dadd(56.901, 163.274, 25.582, 0.772)
pt3dadd(56.814, 163.354, 25.597, 0.802)
pt3dadd(56.726, 163.434, 25.613, 0.832)
pt3dadd(56.639, 163.514, 25.629, 0.864)
pt3dadd(56.551, 163.594, 25.645, 0.894)
pt3dadd(56.463, 163.674, 25.66, 0.926)
pt3dadd(56.379, 163.74, 25.701, 0.952)
pt3dadd(56.294, 163.804, 25.749, 0.978)
pt3dadd(56.21, 163.867, 25.797, 1.004)
pt3dadd(56.126, 163.931, 25.845, 1.03)
pt3dadd(56.042, 163.994, 25.892, 1.056)
pt3dadd(55.958, 164.058, 25.94, 1.082)
pt3dadd(55.874, 164.122, 25.988, 1.108)
pt3dadd(55.79, 164.185, 26.036, 1.134)
pt3dadd(55.705, 164.249, 26.084, 1.16)
pt3dadd(55.621, 164.311, 26.132, 1.186)
pt3dadd(55.528, 164.374, 26.168, 1.24)
pt3dadd(55.433, 164.435, 26.201, 1.3)
pt3dadd(55.338, 164.496, 26.235, 1.362)
pt3dadd(55.243, 164.557, 26.268, 1.422)
pt3dadd(55.148, 164.618, 26.302, 1.484)
pt3dadd(55.053, 164.68, 26.335, 1.544)
pt3dadd(54.958, 164.741, 26.368, 1.604)
pt3dadd(54.863, 164.802, 26.402, 1.666)
pt3dadd(54.768, 164.863, 26.435, 1.726)
pt3dadd(54.672, 164.924, 26.469, 1.786)
pt3dadd(54.562, 164.956, 26.495, 1.734)
pt3dadd(54.448, 164.98, 26.52, 1.654)
pt3dadd(54.335, 165.002, 26.544, 1.574)
pt3dadd(54.221, 165.026, 26.569, 1.494)
pt3dadd(54.107, 165.05, 26.593, 1.414)
pt3dadd(53.993, 165.073, 26.618, 1.334)
pt3dadd(53.879, 165.097, 26.642, 1.254)
pt3dadd(53.765, 165.121, 26.667, 1.174)
pt3dadd(53.651, 165.145, 26.691, 1.094)
pt3dadd(53.537, 165.168, 26.716, 1.014)
pt3dadd(53.425, 165.175, 26.75, 0.99)
pt3dadd(53.313, 165.178, 26.786, 0.982)
pt3dadd(53.201, 165.18, 26.821, 0.972)
pt3dadd(53.089, 165.182, 26.857, 0.962)
pt3dadd(52.977, 165.186, 26.893, 0.952)
pt3dadd(52.865, 165.188, 26.929, 0.944)
pt3dadd(52.753, 165.191, 26.965, 0.934)
pt3dadd(52.641, 165.193, 27.001, 0.924)
pt3dadd(52.529, 165.196, 27.037, 0.916)
pt3dadd(52.417, 165.199, 27.073, 0.906)
pt3dadd(52.305, 165.176, 27.103, 0.914)
pt3dadd(52.194, 165.15, 27.131, 0.924)
pt3dadd(52.082, 165.124, 27.16, 0.936)
pt3dadd(51.97, 165.096, 27.189, 0.946)
pt3dadd(51.858, 165.07, 27.217, 0.958)
pt3dadd(51.746, 165.043, 27.246, 0.968)
pt3dadd(51.635, 165.017, 27.275, 0.98)
pt3dadd(51.523, 164.989, 27.303, 0.99)
pt3dadd(51.411, 164.963, 27.332, 1.002)
pt3dadd(51.299, 164.936, 27.361, 1.012)
pt3dadd(51.187, 164.899, 27.38, 1.006)
pt3dadd(51.076, 164.862, 27.399, 0.998)
pt3dadd(50.964, 164.824, 27.418, 0.992)
pt3dadd(50.852, 164.786, 27.436, 0.986)
pt3dadd(50.74, 164.749, 27.455, 0.98)
pt3dadd(50.628, 164.712, 27.474, 0.974)
pt3dadd(50.517, 164.675, 27.493, 0.966)
pt3dadd(50.405, 164.638, 27.512, 0.96)
pt3dadd(50.293, 164.6, 27.531, 0.954)
pt3dadd(50.181, 164.564, 27.55, 0.944)
pt3dadd(50.064, 164.54, 27.56, 0.892)
pt3dadd(49.947, 164.516, 27.57, 0.84)
pt3dadd(49.83, 164.494, 27.58, 0.788)
pt3dadd(49.713, 164.47, 27.59, 0.738)
pt3dadd(49.596, 164.446, 27.6, 0.686)
pt3dadd(49.479, 164.423, 27.61, 0.634)
pt3dadd(49.362, 164.399, 27.62, 0.582)
pt3dadd(49.245, 164.375, 27.63, 0.53)
pt3dadd(49.128, 164.351, 27.64, 0.478)
pt3dadd(49.011, 164.329, 27.649, 0.428)
pt3dadd(48.891, 164.322, 27.65, 0.408)
pt3dadd(48.771, 164.315, 27.651, 0.39)
pt3dadd(48.651, 164.308, 27.651, 0.37)
pt3dadd(48.531, 164.302, 27.652, 0.35)
pt3dadd(48.411, 164.294, 27.653, 0.332)
pt3dadd(48.292, 164.287, 27.654, 0.312)
pt3dadd(48.172, 164.281, 27.654, 0.292)
pt3dadd(48.052, 164.274, 27.655, 0.274)
pt3dadd(47.932, 164.267, 27.656, 0.254)
pt3dadd(47.813, 164.262, 27.657, 0.236)
pt3dadd(47.693, 164.275, 27.658, 0.234)
pt3dadd(47.574, 164.29, 27.66, 0.234)
pt3dadd(47.455, 164.303, 27.662, 0.232)
pt3dadd(47.336, 164.317, 27.664, 0.232)
pt3dadd(47.217, 164.33, 27.665, 0.23)
pt3dadd(47.097, 164.345, 27.667, 0.23)
pt3dadd(46.978, 164.358, 27.669, 0.228)
pt3dadd(46.859, 164.372, 27.67, 0.228)
pt3dadd(46.74, 164.386, 27.672, 0.226)
pt3dadd(46.621, 164.401, 27.674, 0.23)
pt3dadd(46.504, 164.426, 27.677, 0.292)
pt3dadd(46.387, 164.453, 27.68, 0.352)
pt3dadd(46.269, 164.478, 27.683, 0.414)
pt3dadd(46.152, 164.504, 27.686, 0.474)
pt3dadd(46.035, 164.53, 27.69, 0.534)
pt3dadd(45.918, 164.556, 27.693, 0.596)
pt3dadd(45.801, 164.581, 27.696, 0.656)
pt3dadd(45.684, 164.608, 27.699, 0.716)
pt3dadd(45.567, 164.633, 27.702, 0.778)
pt3dadd(45.45, 164.662, 27.706, 0.834)
pt3dadd(45.344, 164.716, 27.712, 0.842)
pt3dadd(45.237, 164.77, 27.718, 0.85)
pt3dadd(45.13, 164.824, 27.724, 0.86)
pt3dadd(45.023, 164.878, 27.73, 0.868)
pt3dadd(44.916, 164.932, 27.737, 0.876)
pt3dadd(44.809, 164.986, 27.743, 0.886)
pt3dadd(44.702, 165.04, 27.749, 0.894)
pt3dadd(44.595, 165.094, 27.755, 0.902)
pt3dadd(44.488, 165.148, 27.761, 0.912)
pt3dadd(44.385, 165.206, 27.768, 0.914)
pt3dadd(44.291, 165.281, 27.777, 0.9)
pt3dadd(44.197, 165.354, 27.786, 0.886)
pt3dadd(44.103, 165.428, 27.795, 0.87)
pt3dadd(44.009, 165.502, 27.804, 0.856)
pt3dadd(43.915, 165.576, 27.813, 0.842)
pt3dadd(43.821, 165.649, 27.822, 0.828)
pt3dadd(43.727, 165.724, 27.831, 0.812)
pt3dadd(43.632, 165.797, 27.84, 0.798)
pt3dadd(43.539, 165.871, 27.849, 0.784)
pt3dadd(43.448, 165.948, 27.859, 0.782)
pt3dadd(43.365, 166.033, 27.871, 0.814)
pt3dadd(43.282, 166.118, 27.883, 0.846)
pt3dadd(43.199, 166.205, 27.895, 0.876)
pt3dadd(43.116, 166.29, 27.907, 0.908)
pt3dadd(43.032, 166.375, 27.919, 0.94)
pt3dadd(42.949, 166.46, 27.931, 0.97)
pt3dadd(42.866, 166.546, 27.943, 1.002)
pt3dadd(42.783, 166.632, 27.955, 1.034)
pt3dadd(42.7, 166.717, 27.967, 1.064)
pt3dadd(42.625, 166.806, 27.986, 1.1)
pt3dadd(42.568, 166.902, 28.022, 1.146)
pt3dadd(42.512, 166.998, 28.058, 1.194)
pt3dadd(42.455, 167.095, 28.094, 1.24)
pt3dadd(42.399, 167.191, 28.13, 1.286)
pt3dadd(42.342, 167.288, 28.166, 1.332)
pt3dadd(42.286, 167.384, 28.203, 1.378)
pt3dadd(42.229, 167.482, 28.239, 1.424)
pt3dadd(42.173, 167.578, 28.275, 1.472)
pt3dadd(42.116, 167.675, 28.311, 1.518)
pt3dadd(42.059, 167.771, 28.347, 1.55)
pt3dadd(42.003, 167.867, 28.383, 1.562)
pt3dadd(41.946, 167.964, 28.42, 1.572)
}
}
proc shape3d_48() {
apic[1] { pt3dadd(41.889, 168.06, 28.456, 1.584)
pt3dadd(41.832, 168.156, 28.492, 1.594)
pt3dadd(41.775, 168.253, 28.528, 1.606)
pt3dadd(41.718, 168.349, 28.564, 1.618)
pt3dadd(41.662, 168.445, 28.6, 1.628)
pt3dadd(41.605, 168.542, 28.636, 1.64)
pt3dadd(41.548, 168.638, 28.673, 1.65)
pt3dadd(41.489, 168.734, 28.708, 1.644)
pt3dadd(41.428, 168.829, 28.741, 1.61)
pt3dadd(41.367, 168.924, 28.774, 1.578)
pt3dadd(41.305, 169.02, 28.807, 1.544)
pt3dadd(41.244, 169.115, 28.841, 1.51)
pt3dadd(41.183, 169.21, 28.874, 1.478)
pt3dadd(41.122, 169.304, 28.907, 1.444)
pt3dadd(41.06, 169.4, 28.941, 1.41)
pt3dadd(40.999, 169.495, 28.974, 1.378)
pt3dadd(40.938, 169.59, 29.007, 1.344)
pt3dadd(40.883, 169.685, 29.046, 1.31)
pt3dadd(40.837, 169.78, 29.095, 1.276)
pt3dadd(40.791, 169.874, 29.143, 1.24)
pt3dadd(40.746, 169.969, 29.191, 1.206)
pt3dadd(40.7, 170.064, 29.239, 1.17)
pt3dadd(40.654, 170.159, 29.287, 1.134)
pt3dadd(40.608, 170.254, 29.335, 1.1)
pt3dadd(40.563, 170.348, 29.383, 1.064)
pt3dadd(40.517, 170.443, 29.431, 1.03)
pt3dadd(40.471, 170.538, 29.479, 0.994)
pt3dadd(40.412, 170.627, 29.521, 0.972)
pt3dadd(40.333, 170.707, 29.556, 0.964)
pt3dadd(40.254, 170.788, 29.591, 0.958)
pt3dadd(40.176, 170.869, 29.626, 0.95)
pt3dadd(40.097, 170.95, 29.66, 0.942)
pt3dadd(40.019, 171.03, 29.695, 0.936)
pt3dadd(39.94, 171.11, 29.73, 0.928)
pt3dadd(39.862, 171.191, 29.765, 0.922)
pt3dadd(39.783, 171.271, 29.8, 0.914)
pt3dadd(39.705, 171.352, 29.834, 0.908)
pt3dadd(39.629, 171.438, 29.863, 0.922)
pt3dadd(39.555, 171.528, 29.888, 0.958)
pt3dadd(39.482, 171.618, 29.912, 0.992)
pt3dadd(39.408, 171.708, 29.936, 1.026)
pt3dadd(39.334, 171.798, 29.96, 1.06)
pt3dadd(39.261, 171.889, 29.984, 1.094)
pt3dadd(39.187, 171.979, 30.008, 1.128)
pt3dadd(39.113, 172.069, 30.032, 1.164)
pt3dadd(39.04, 172.159, 30.056, 1.198)
pt3dadd(38.966, 172.249, 30.081, 1.232)
pt3dadd(38.888, 172.338, 30.098, 1.252)
pt3dadd(38.806, 172.424, 30.112, 1.264)
pt3dadd(38.725, 172.511, 30.126, 1.274)
pt3dadd(38.643, 172.597, 30.14, 1.286)
pt3dadd(38.562, 172.684, 30.154, 1.296)
pt3dadd(38.48, 172.77, 30.168, 1.308)
pt3dadd(38.399, 172.856, 30.182, 1.318)
pt3dadd(38.317, 172.943, 30.196, 1.33)
pt3dadd(38.236, 173.029, 30.21, 1.34)
pt3dadd(38.154, 173.117, 30.224, 1.352)
pt3dadd(38.066, 173.192, 30.245, 1.35)
pt3dadd(37.974, 173.263, 30.27, 1.342)
pt3dadd(37.881, 173.333, 30.295, 1.332)
pt3dadd(37.789, 173.404, 30.32, 1.322)
pt3dadd(37.696, 173.474, 30.345, 1.314)
pt3dadd(37.604, 173.544, 30.37, 1.304)
pt3dadd(37.512, 173.615, 30.395, 1.296)
pt3dadd(37.419, 173.686, 30.42, 1.286)
pt3dadd(37.327, 173.755, 30.445, 1.278)
pt3dadd(37.234, 173.826, 30.47, 1.268)
pt3dadd(37.138, 173.886, 30.502, 1.256)
pt3dadd(37.04, 173.942, 30.536, 1.242)
pt3dadd(36.943, 174, 30.57, 1.228)
pt3dadd(36.846, 174.056, 30.604, 1.214)
pt3dadd(36.748, 174.114, 30.638, 1.2)
pt3dadd(36.651, 174.17, 30.672, 1.186)
pt3dadd(36.553, 174.228, 30.706, 1.174)
pt3dadd(36.456, 174.284, 30.74, 1.16)
pt3dadd(36.358, 174.342, 30.773, 1.146)
pt3dadd(36.261, 174.398, 30.808, 1.132)
pt3dadd(36.162, 174.46, 30.832, 1.13)
pt3dadd(36.062, 174.52, 30.854, 1.13)
pt3dadd(35.962, 174.581, 30.877, 1.13)
pt3dadd(35.862, 174.642, 30.899, 1.13)
pt3dadd(35.762, 174.702, 30.921, 1.13)
pt3dadd(35.662, 174.763, 30.943, 1.13)
pt3dadd(35.562, 174.824, 30.966, 1.13)
pt3dadd(35.462, 174.884, 30.988, 1.13)
pt3dadd(35.362, 174.946, 31.01, 1.13)
pt3dadd(35.262, 175.007, 31.033, 1.13)
pt3dadd(35.155, 175.057, 31.049, 1.118)
pt3dadd(35.047, 175.104, 31.064, 1.102)
pt3dadd(34.938, 175.152, 31.08, 1.088)
pt3dadd(34.83, 175.2, 31.095, 1.072)
pt3dadd(34.721, 175.248, 31.11, 1.056)
pt3dadd(34.612, 175.296, 31.125, 1.042)
pt3dadd(34.504, 175.343, 31.14, 1.026)
pt3dadd(34.395, 175.391, 31.155, 1.01)
pt3dadd(34.287, 175.439, 31.171, 0.996)
pt3dadd(34.178, 175.487, 31.186, 0.98)
pt3dadd(34.073, 175.542, 31.197, 0.99)
pt3dadd(33.968, 175.598, 31.207, 1.002)
pt3dadd(33.863, 175.656, 31.217, 1.016)
pt3dadd(33.758, 175.712, 31.227, 1.03)
pt3dadd(33.653, 175.77, 31.237, 1.044)
pt3dadd(33.548, 175.826, 31.247, 1.058)
pt3dadd(33.443, 175.884, 31.257, 1.07)
pt3dadd(33.338, 175.942, 31.267, 1.084)
pt3dadd(33.234, 175.998, 31.277, 1.098)
pt3dadd(33.129, 176.056, 31.287, 1.112)
pt3dadd(33.025, 176.114, 31.297, 1.134)
pt3dadd(32.922, 176.174, 31.307, 1.158)
pt3dadd(32.818, 176.234, 31.317, 1.184)
pt3dadd(32.715, 176.294, 31.326, 1.208)
pt3dadd(32.612, 176.354, 31.336, 1.232)
pt3dadd(32.508, 176.413, 31.346, 1.256)
pt3dadd(32.405, 176.473, 31.355, 1.28)
pt3dadd(32.301, 176.533, 31.365, 1.306)
pt3dadd(32.198, 176.593, 31.375, 1.33)
pt3dadd(32.095, 176.653, 31.385, 1.354)
pt3dadd(31.991, 176.707, 31.405, 1.348)
pt3dadd(31.887, 176.761, 31.427, 1.34)
pt3dadd(31.783, 176.816, 31.449, 1.332)
pt3dadd(31.68, 176.87, 31.471, 1.324)
pt3dadd(31.576, 176.924, 31.493, 1.316)
pt3dadd(31.472, 176.978, 31.515, 1.308)
pt3dadd(31.368, 177.032, 31.537, 1.3)
pt3dadd(31.264, 177.086, 31.559, 1.292)
pt3dadd(31.16, 177.14, 31.58, 1.284)
pt3dadd(31.06, 177.197, 31.606, 1.272)
pt3dadd(30.984, 177.268, 31.655, 1.234)
pt3dadd(30.908, 177.338, 31.705, 1.196)
pt3dadd(30.831, 177.409, 31.755, 1.16)
pt3dadd(30.755, 177.481, 31.805, 1.122)
pt3dadd(30.679, 177.552, 31.854, 1.084)
pt3dadd(30.603, 177.623, 31.904, 1.048)
pt3dadd(30.527, 177.694, 31.954, 1.01)
pt3dadd(30.451, 177.764, 32.003, 0.972)
pt3dadd(30.375, 177.836, 32.053, 0.936)
pt3dadd(30.295, 177.904, 32.102, 0.904)
pt3dadd(30.2, 177.953, 32.147, 0.9)
pt3dadd(30.104, 178.001, 32.191, 0.894)
pt3dadd(30.009, 178.05, 32.236, 0.89)
pt3dadd(29.913, 178.099, 32.281, 0.886)
pt3dadd(29.817, 178.147, 32.326, 0.882)
pt3dadd(29.722, 178.196, 32.37, 0.878)
pt3dadd(29.626, 178.246, 32.415, 0.874)
pt3dadd(29.531, 178.295, 32.459, 0.868)
pt3dadd(29.435, 178.343, 32.504, 0.864)
pt3dadd(29.34, 178.392, 32.55, 0.856)
pt3dadd(29.248, 178.44, 32.6, 0.832)
pt3dadd(29.156, 178.488, 32.651, 0.808)
pt3dadd(29.064, 178.536, 32.701, 0.784)
pt3dadd(28.972, 178.584, 32.751, 0.76)
pt3dadd(28.88, 178.632, 32.802, 0.734)
pt3dadd(28.788, 178.679, 32.852, 0.71)
pt3dadd(28.696, 178.727, 32.902, 0.686)
pt3dadd(28.604, 178.775, 32.952, 0.662)
pt3dadd(28.512, 178.823, 33.003, 0.638)
pt3dadd(28.441, 178.836, 33.073, 0.616)
pt3dadd(28.387, 178.817, 33.161, 0.598)
pt3dadd(28.334, 178.798, 33.249, 0.58)
pt3dadd(28.28, 178.78, 33.337, 0.562)
pt3dadd(28.227, 178.76, 33.425, 0.544)
pt3dadd(28.173, 178.742, 33.514, 0.524)
pt3dadd(28.119, 178.723, 33.602, 0.506)
pt3dadd(28.066, 178.704, 33.69, 0.488)
pt3dadd(28.012, 178.686, 33.778, 0.47)
pt3dadd(27.959, 178.667, 33.866, 0.452)
}
apic[2] {pt3dclear()
pt3dadd(27.959, 178.667, 33.866, 0.452)
pt3dadd(27.957, 178.661, 33.873, 0.452)
pt3dadd(27.934, 178.596, 33.955, 0.46)
pt3dadd(27.912, 178.531, 34.037, 0.466)
pt3dadd(27.89, 178.466, 34.119, 0.474)
pt3dadd(27.867, 178.402, 34.201, 0.48)
pt3dadd(27.845, 178.337, 34.283, 0.486)
pt3dadd(27.823, 178.271, 34.365, 0.494)
pt3dadd(27.8, 178.206, 34.447, 0.5)
pt3dadd(27.778, 178.141, 34.528, 0.506)
pt3dadd(27.756, 178.076, 34.611, 0.514)
pt3dadd(27.734, 178.009, 34.691, 0.524)
pt3dadd(27.719, 177.929, 34.765, 0.556)
pt3dadd(27.705, 177.848, 34.838, 0.588)
pt3dadd(27.69, 177.768, 34.911, 0.622)
pt3dadd(27.675, 177.688, 34.985, 0.654)
pt3dadd(27.661, 177.607, 35.058, 0.686)
pt3dadd(27.646, 177.528, 35.131, 0.718)
pt3dadd(27.631, 177.448, 35.204, 0.752)
pt3dadd(27.617, 177.367, 35.278, 0.784)
pt3dadd(27.602, 177.287, 35.351, 0.816)
pt3dadd(27.584, 177.205, 35.422, 0.85)
pt3dadd(27.538, 177.116, 35.478, 0.884)
pt3dadd(27.493, 177.028, 35.534, 0.92)
pt3dadd(27.447, 176.94, 35.59, 0.954)
pt3dadd(27.402, 176.851, 35.646, 0.99)
pt3dadd(27.357, 176.762, 35.701, 1.024)
pt3dadd(27.311, 176.674, 35.757, 1.06)
pt3dadd(27.266, 176.585, 35.813, 1.096)
pt3dadd(27.22, 176.497, 35.869, 1.13)
pt3dadd(27.175, 176.408, 35.925, 1.166)
pt3dadd(27.128, 176.322, 35.983, 1.186)
pt3dadd(27.078, 176.245, 36.047, 1.156)
pt3dadd(27.027, 176.168, 36.111, 1.126)
}
}
proc shape3d_49() {
apic[2] { pt3dadd(26.977, 176.092, 36.175, 1.094)
pt3dadd(26.926, 176.015, 36.239, 1.064)
pt3dadd(26.876, 175.937, 36.303, 1.034)
pt3dadd(26.825, 175.86, 36.367, 1.004)
pt3dadd(26.775, 175.783, 36.431, 0.974)
pt3dadd(26.724, 175.706, 36.496, 0.944)
pt3dadd(26.673, 175.63, 36.56, 0.914)
pt3dadd(26.621, 175.56, 36.628, 0.88)
pt3dadd(26.565, 175.505, 36.703, 0.834)
pt3dadd(26.508, 175.45, 36.779, 0.79)
pt3dadd(26.452, 175.394, 36.854, 0.746)
pt3dadd(26.396, 175.34, 36.93, 0.702)
pt3dadd(26.339, 175.285, 37.005, 0.656)
pt3dadd(26.283, 175.23, 37.081, 0.612)
pt3dadd(26.227, 175.175, 37.156, 0.568)
pt3dadd(26.17, 175.12, 37.231, 0.522)
pt3dadd(26.114, 175.064, 37.307, 0.478)
pt3dadd(26.059, 175.007, 37.381, 0.452)
pt3dadd(26.004, 174.943, 37.453, 0.452)
pt3dadd(25.95, 174.88, 37.524, 0.452)
pt3dadd(25.896, 174.816, 37.596, 0.452)
pt3dadd(25.842, 174.752, 37.668, 0.452)
pt3dadd(25.787, 174.689, 37.74, 0.452)
pt3dadd(25.733, 174.625, 37.811, 0.452)
pt3dadd(25.679, 174.562, 37.883, 0.452)
pt3dadd(25.624, 174.498, 37.955, 0.452)
pt3dadd(25.57, 174.434, 38.027, 0.452)
pt3dadd(25.537, 174.348, 38.088, 0.458)
pt3dadd(25.513, 174.251, 38.144, 0.464)
pt3dadd(25.49, 174.155, 38.2, 0.472)
pt3dadd(25.466, 174.059, 38.257, 0.48)
pt3dadd(25.442, 173.963, 38.313, 0.488)
pt3dadd(25.418, 173.867, 38.369, 0.496)
pt3dadd(25.394, 173.771, 38.426, 0.502)
pt3dadd(25.37, 173.674, 38.482, 0.51)
pt3dadd(25.346, 173.578, 38.538, 0.518)
pt3dadd(25.323, 173.482, 38.595, 0.526)
pt3dadd(25.313, 173.378, 38.645, 0.532)
pt3dadd(25.307, 173.273, 38.692, 0.54)
pt3dadd(25.301, 173.168, 38.74, 0.548)
pt3dadd(25.296, 173.063, 38.788, 0.554)
pt3dadd(25.29, 172.957, 38.836, 0.562)
pt3dadd(25.284, 172.853, 38.884, 0.57)
pt3dadd(25.279, 172.747, 38.932, 0.576)
pt3dadd(25.273, 172.643, 38.98, 0.584)
pt3dadd(25.267, 172.537, 39.028, 0.592)
pt3dadd(25.262, 172.432, 39.076, 0.598)
pt3dadd(25.266, 172.319, 39.108, 0.568)
pt3dadd(25.272, 172.204, 39.136, 0.532)
pt3dadd(25.278, 172.09, 39.165, 0.494)
pt3dadd(25.284, 171.974, 39.194, 0.456)
pt3dadd(25.29, 171.859, 39.223, 0.42)
pt3dadd(25.297, 171.745, 39.251, 0.382)
pt3dadd(25.303, 171.63, 39.28, 0.344)
pt3dadd(25.309, 171.515, 39.309, 0.306)
pt3dadd(25.315, 171.401, 39.338, 0.27)
pt3dadd(25.321, 171.286, 39.366, 0.232)
pt3dadd(25.351, 171.174, 39.39, 0.226)
pt3dadd(25.386, 171.062, 39.413, 0.226)
pt3dadd(25.42, 170.951, 39.436, 0.226)
pt3dadd(25.455, 170.839, 39.459, 0.226)
pt3dadd(25.489, 170.728, 39.482, 0.226)
pt3dadd(25.523, 170.616, 39.505, 0.226)
pt3dadd(25.558, 170.504, 39.528, 0.226)
pt3dadd(25.592, 170.392, 39.55, 0.226)
pt3dadd(25.627, 170.28, 39.573, 0.226)
pt3dadd(25.661, 170.168, 39.596, 0.226)
pt3dadd(25.65, 170.053, 39.616, 0.244)
pt3dadd(25.631, 169.937, 39.635, 0.268)
pt3dadd(25.611, 169.822, 39.654, 0.29)
pt3dadd(25.592, 169.705, 39.674, 0.312)
pt3dadd(25.573, 169.589, 39.693, 0.334)
pt3dadd(25.553, 169.472, 39.712, 0.356)
pt3dadd(25.534, 169.356, 39.731, 0.378)
pt3dadd(25.515, 169.241, 39.75, 0.4)
pt3dadd(25.495, 169.124, 39.769, 0.424)
pt3dadd(25.476, 169.008, 39.789, 0.446)
pt3dadd(25.445, 168.94, 39.864, 0.426)
pt3dadd(25.412, 168.874, 39.944, 0.404)
pt3dadd(25.38, 168.808, 40.023, 0.382)
pt3dadd(25.348, 168.742, 40.102, 0.36)
pt3dadd(25.316, 168.677, 40.181, 0.338)
pt3dadd(25.284, 168.611, 40.261, 0.314)
pt3dadd(25.252, 168.545, 40.34, 0.292)
pt3dadd(25.22, 168.479, 40.419, 0.27)
pt3dadd(25.188, 168.414, 40.499, 0.248)
pt3dadd(25.156, 168.348, 40.578, 0.226)
}
apic[3] {pt3dclear()
pt3dadd(27.959, 178.667, 33.866, 0.452)
pt3dadd(27.955, 178.675, 33.862, 0.454)
pt3dadd(27.908, 178.77, 33.815, 0.484)
pt3dadd(27.862, 178.865, 33.767, 0.514)
pt3dadd(27.815, 178.96, 33.72, 0.542)
pt3dadd(27.769, 179.054, 33.673, 0.572)
pt3dadd(27.723, 179.149, 33.625, 0.6)
pt3dadd(27.676, 179.244, 33.578, 0.63)
pt3dadd(27.63, 179.339, 33.53, 0.66)
pt3dadd(27.6, 179.443, 33.5, 0.678)
pt3dadd(27.6, 179.563, 33.5, 0.678)
pt3dadd(27.6, 179.683, 33.5, 0.678)
pt3dadd(27.6, 179.803, 33.501, 0.678)
pt3dadd(27.6, 179.923, 33.505, 0.678)
pt3dadd(27.6, 180.043, 33.509, 0.678)
pt3dadd(27.59, 180.143, 33.546, 0.678)
pt3dadd(27.569, 180.218, 33.622, 0.678)
pt3dadd(27.535, 180.299, 33.69, 0.678)
pt3dadd(27.49, 180.38, 33.752, 0.678)
pt3dadd(27.48, 180.472, 33.815, 0.678)
pt3dadd(27.48, 180.565, 33.877, 0.678)
pt3dadd(27.48, 180.659, 33.939, 0.678)
pt3dadd(27.48, 180.758, 33.99, 0.678)
pt3dadd(27.48, 180.878, 33.993, 0.678)
pt3dadd(27.48, 180.998, 33.997, 0.678)
pt3dadd(27.48, 181.118, 34, 0.678)
pt3dadd(27.48, 181.234, 34.016, 0.678)
pt3dadd(27.48, 181.337, 34.066, 0.678)
pt3dadd(27.48, 181.441, 34.116, 0.678)
pt3dadd(27.48, 181.546, 34.166, 0.678)
pt3dadd(27.48, 181.649, 34.215, 0.678)
pt3dadd(27.484, 181.756, 34.257, 0.678)
pt3dadd(27.502, 181.874, 34.265, 0.678)
pt3dadd(27.521, 181.992, 34.272, 0.678)
pt3dadd(27.539, 182.111, 34.28, 0.678)
pt3dadd(27.558, 182.228, 34.288, 0.678)
pt3dadd(27.576, 182.347, 34.296, 0.678)
pt3dadd(27.599, 182.462, 34.313, 0.678)
pt3dadd(27.627, 182.573, 34.343, 0.678)
pt3dadd(27.654, 182.684, 34.373, 0.678)
pt3dadd(27.682, 182.795, 34.403, 0.678)
pt3dadd(27.71, 182.906, 34.433, 0.678)
pt3dadd(27.72, 183.019, 34.462, 0.678)
pt3dadd(27.72, 183.136, 34.489, 0.678)
pt3dadd(27.72, 183.251, 34.517, 0.678)
pt3dadd(27.72, 183.366, 34.544, 0.678)
pt3dadd(27.72, 183.481, 34.572, 0.678)
pt3dadd(27.72, 183.596, 34.599, 0.678)
pt3dadd(27.72, 183.716, 34.6, 0.678)
pt3dadd(27.72, 183.836, 34.6, 0.678)
pt3dadd(27.72, 183.956, 34.6, 0.678)
pt3dadd(27.72, 184.076, 34.6, 0.678)
pt3dadd(27.72, 184.196, 34.6, 0.678)
pt3dadd(27.72, 184.316, 34.6, 0.678)
pt3dadd(27.72, 184.436, 34.6, 0.678)
pt3dadd(27.703, 184.555, 34.602, 0.678)
pt3dadd(27.685, 184.674, 34.604, 0.678)
pt3dadd(27.668, 184.793, 34.605, 0.678)
pt3dadd(27.65, 184.912, 34.607, 0.678)
pt3dadd(27.633, 185.03, 34.609, 0.678)
pt3dadd(27.615, 185.149, 34.611, 0.678)
pt3dadd(27.611, 185.267, 34.624, 0.678)
pt3dadd(27.609, 185.386, 34.639, 0.678)
pt3dadd(27.607, 185.504, 34.654, 0.678)
pt3dadd(27.605, 185.623, 34.668, 0.678)
pt3dadd(27.603, 185.742, 34.683, 0.678)
pt3dadd(27.6, 185.861, 34.698, 0.678)
pt3dadd(27.6, 185.977, 34.723, 0.678)
pt3dadd(27.6, 186.092, 34.751, 0.678)
pt3dadd(27.6, 186.208, 34.778, 0.678)
pt3dadd(27.6, 186.323, 34.805, 0.678)
pt3dadd(27.6, 186.438, 34.833, 0.678)
pt3dadd(27.6, 186.546, 34.877, 0.678)
pt3dadd(27.6, 186.653, 34.922, 0.678)
pt3dadd(27.585, 186.737, 34.989, 0.678)
pt3dadd(27.564, 186.814, 35.065, 0.678)
pt3dadd(27.495, 186.835, 35.139, 0.678)
pt3dadd(27.414, 186.876, 35.197, 0.678)
pt3dadd(27.334, 186.95, 35.238, 0.678)
pt3dadd(27.253, 187.025, 35.278, 0.678)
pt3dadd(27.172, 187.099, 35.318, 0.678)
pt3dadd(27.097, 187.16, 35.372, 0.678)
pt3dadd(27.032, 187.195, 35.451, 0.678)
pt3dadd(26.954, 187.244, 35.511, 0.678)
pt3dadd(26.864, 187.304, 35.555, 0.678)
pt3dadd(26.766, 187.364, 35.579, 0.678)
pt3dadd(26.664, 187.426, 35.596, 0.678)
pt3dadd(26.598, 187.52, 35.604, 0.678)
pt3dadd(26.541, 187.626, 35.609, 0.678)
pt3dadd(26.514, 187.722, 35.652, 0.678)
pt3dadd(26.492, 187.807, 35.717, 0.678)
pt3dadd(26.439, 187.884, 35.781, 0.678)
pt3dadd(26.386, 187.969, 35.833, 0.678)
pt3dadd(26.335, 188.065, 35.877, 0.678)
pt3dadd(26.28, 188.168, 35.893, 0.678)
pt3dadd(26.224, 188.274, 35.898, 0.678)
pt3dadd(26.192, 188.387, 35.9, 0.678)
pt3dadd(26.177, 188.507, 35.9, 0.678)
pt3dadd(26.162, 188.626, 35.9, 0.678)
pt3dadd(26.16, 188.746, 35.9, 0.678)
pt3dadd(26.16, 188.866, 35.9, 0.678)
pt3dadd(26.16, 188.986, 35.903, 0.678)
pt3dadd(26.16, 189.106, 35.907, 0.678)
pt3dadd(26.16, 189.226, 35.911, 0.678)
pt3dadd(26.16, 189.329, 35.961, 0.678)
pt3dadd(26.16, 189.432, 36.012, 0.678)
pt3dadd(26.16, 189.502, 36.091, 0.678)
pt3dadd(26.16, 189.563, 36.177, 0.678)
pt3dadd(26.16, 189.611, 36.268, 0.678)
pt3dadd(26.16, 189.65, 36.362, 0.678)
pt3dadd(26.16, 189.689, 36.457, 0.678)
pt3dadd(26.16, 189.721, 36.553, 0.678)
pt3dadd(26.16, 189.791, 36.63, 0.678)
}
}
proc shape3d_50() {
apic[3] { pt3dadd(26.16, 189.882, 36.695, 0.678)
pt3dadd(26.16, 189.973, 36.76, 0.678)
pt3dadd(26.16, 190.064, 36.824, 0.678)
pt3dadd(26.16, 190.156, 36.889, 0.678)
pt3dadd(26.16, 190.246, 36.956, 0.678)
pt3dadd(26.16, 190.333, 37.025, 0.678)
pt3dadd(26.16, 190.417, 37.095, 0.678)
pt3dadd(26.16, 190.499, 37.169, 0.678)
pt3dadd(26.133, 190.549, 37.247, 0.678)
pt3dadd(26.07, 190.555, 37.331, 0.678)
pt3dadd(25.99, 190.572, 37.392, 0.678)
pt3dadd(25.877, 190.608, 37.402, 0.678)
pt3dadd(25.767, 190.648, 37.416, 0.678)
pt3dadd(25.698, 190.721, 37.47, 0.678)
pt3dadd(25.628, 190.794, 37.524, 0.678)
pt3dadd(25.571, 190.877, 37.573, 0.678)
pt3dadd(25.559, 190.991, 37.603, 0.678)
pt3dadd(25.547, 191.104, 37.632, 0.678)
pt3dadd(25.514, 191.186, 37.694, 0.678)
pt3dadd(25.497, 191.293, 37.739, 0.678)
pt3dadd(25.48, 191.399, 37.783, 0.678)
pt3dadd(25.463, 191.506, 37.827, 0.678)
pt3dadd(25.446, 191.612, 37.872, 0.678)
pt3dadd(25.422, 191.718, 37.912, 0.678)
pt3dadd(25.393, 191.826, 37.951, 0.678)
pt3dadd(25.365, 191.933, 37.989, 0.678)
pt3dadd(25.336, 192.04, 38.028, 0.678)
pt3dadd(25.307, 192.146, 38.067, 0.678)
pt3dadd(25.263, 192.258, 38.067, 0.678)
pt3dadd(25.22, 192.37, 38.067, 0.678)
pt3dadd(25.176, 192.481, 38.067, 0.678)
pt3dadd(25.132, 192.593, 38.067, 0.678)
pt3dadd(25.088, 192.704, 38.063, 0.678)
pt3dadd(25.038, 192.804, 38.027, 0.678)
pt3dadd(24.99, 192.907, 38, 0.678)
pt3dadd(24.951, 193.021, 38, 0.678)
pt3dadd(24.911, 193.134, 38, 0.678)
pt3dadd(24.803, 193.17, 38, 0.678)
pt3dadd(24.686, 193.196, 38, 0.678)
pt3dadd(24.58, 193.244, 38, 0.678)
pt3dadd(24.492, 193.326, 38, 0.678)
pt3dadd(24.402, 193.404, 37.998, 0.678)
pt3dadd(24.304, 193.472, 37.99, 0.678)
pt3dadd(24.22, 193.546, 37.952, 0.678)
pt3dadd(24.148, 193.614, 37.943, 0.678)
pt3dadd(24.1, 193.669, 38.022, 0.678)
pt3dadd(24.054, 193.75, 38.081, 0.678)
pt3dadd(24.009, 193.848, 38.125, 0.678)
pt3dadd(24, 193.92, 38.2, 0.678)
}
apic[4] {pt3dclear()
pt3dadd(96.175, 147.176, 12.36, 3.39)
pt3dadd(96.089, 147.242, 12.359, 3.368)
pt3dadd(95.993, 147.314, 12.359, 3.346)
pt3dadd(95.897, 147.386, 12.358, 3.322)
pt3dadd(95.802, 147.46, 12.358, 3.3)
pt3dadd(95.706, 147.532, 12.357, 3.276)
pt3dadd(95.611, 147.605, 12.357, 3.252)
pt3dadd(95.515, 147.677, 12.356, 3.23)
pt3dadd(95.42, 147.75, 12.356, 3.206)
pt3dadd(95.324, 147.822, 12.355, 3.184)
pt3dadd(95.228, 147.895, 12.355, 3.16)
pt3dadd(95.133, 147.967, 12.354, 3.136)
pt3dadd(95.037, 148.04, 12.354, 3.114)
pt3dadd(94.942, 148.112, 12.353, 3.09)
pt3dadd(94.863, 148.2, 12.332, 3.088)
pt3dadd(94.784, 148.286, 12.311, 3.088)
pt3dadd(94.706, 148.374, 12.29, 3.086)
pt3dadd(94.628, 148.462, 12.269, 3.086)
pt3dadd(94.549, 148.548, 12.248, 3.086)
pt3dadd(94.471, 148.636, 12.226, 3.084)
pt3dadd(94.392, 148.722, 12.205, 3.084)
pt3dadd(94.314, 148.81, 12.184, 3.082)
pt3dadd(94.235, 148.897, 12.163, 3.082)
pt3dadd(94.193, 148.99, 12.116, 3.112)
pt3dadd(94.164, 149.086, 12.061, 3.154)
pt3dadd(94.134, 149.182, 12.006, 3.194)
pt3dadd(94.105, 149.276, 11.95, 3.236)
pt3dadd(94.076, 149.372, 11.895, 3.278)
pt3dadd(94.047, 149.467, 11.839, 3.318)
pt3dadd(94.017, 149.563, 11.784, 3.36)
pt3dadd(93.988, 149.658, 11.728, 3.402)
pt3dadd(93.959, 149.754, 11.673, 3.442)
pt3dadd(93.93, 149.85, 11.618, 3.484)
pt3dadd(93.885, 149.947, 11.573, 3.494)
pt3dadd(93.836, 150.044, 11.532, 3.494)
pt3dadd(93.787, 150.143, 11.492, 3.494)
pt3dadd(93.737, 150.24, 11.451, 3.494)
pt3dadd(93.688, 150.338, 11.41, 3.494)
pt3dadd(93.639, 150.436, 11.37, 3.494)
pt3dadd(93.589, 150.534, 11.329, 3.492)
pt3dadd(93.54, 150.632, 11.288, 3.492)
pt3dadd(93.491, 150.73, 11.248, 3.492)
pt3dadd(93.441, 150.828, 11.207, 3.492)
pt3dadd(93.389, 150.925, 11.169, 3.478)
pt3dadd(93.337, 151.024, 11.131, 3.46)
pt3dadd(93.284, 151.121, 11.093, 3.444)
pt3dadd(93.232, 151.219, 11.055, 3.428)
pt3dadd(93.179, 151.316, 11.017, 3.41)
pt3dadd(93.126, 151.415, 10.979, 3.394)
pt3dadd(93.074, 151.513, 10.941, 3.376)
pt3dadd(93.021, 151.61, 10.904, 3.36)
pt3dadd(92.969, 151.709, 10.866, 3.342)
pt3dadd(92.916, 151.806, 10.828, 3.326)
pt3dadd(92.869, 151.904, 10.786, 3.31)
pt3dadd(92.822, 152.002, 10.742, 3.294)
pt3dadd(92.776, 152.1, 10.699, 3.28)
pt3dadd(92.729, 152.197, 10.656, 3.264)
pt3dadd(92.683, 152.296, 10.613, 3.248)
pt3dadd(92.636, 152.393, 10.57, 3.232)
pt3dadd(92.59, 152.491, 10.527, 3.216)
pt3dadd(92.543, 152.588, 10.484, 3.2)
pt3dadd(92.497, 152.687, 10.441, 3.186)
pt3dadd(92.45, 152.784, 10.398, 3.17)
pt3dadd(92.385, 152.879, 10.372, 3.192)
pt3dadd(92.316, 152.974, 10.35, 3.222)
pt3dadd(92.247, 153.068, 10.327, 3.252)
pt3dadd(92.179, 153.163, 10.304, 3.282)
pt3dadd(92.11, 153.258, 10.282, 3.31)
pt3dadd(92.042, 153.353, 10.259, 3.34)
pt3dadd(91.973, 153.448, 10.236, 3.37)
pt3dadd(91.905, 153.541, 10.214, 3.4)
pt3dadd(91.836, 153.636, 10.191, 3.43)
pt3dadd(91.767, 153.731, 10.169, 3.458)
pt3dadd(91.696, 153.824, 10.15, 3.476)
pt3dadd(91.623, 153.918, 10.131, 3.492)
pt3dadd(91.551, 154.01, 10.113, 3.506)
pt3dadd(91.479, 154.104, 10.094, 3.522)
pt3dadd(91.406, 154.196, 10.076, 3.538)
pt3dadd(91.334, 154.29, 10.057, 3.552)
pt3dadd(91.262, 154.384, 10.039, 3.568)
pt3dadd(91.189, 154.476, 10.02, 3.584)
pt3dadd(91.117, 154.57, 10.002, 3.598)
pt3dadd(91.044, 154.662, 9.983, 3.614)
pt3dadd(90.969, 154.754, 9.968, 3.616)
pt3dadd(90.894, 154.846, 9.953, 3.616)
pt3dadd(90.818, 154.937, 9.938, 3.616)
pt3dadd(90.742, 155.028, 9.924, 3.616)
pt3dadd(90.666, 155.12, 9.909, 3.616)
pt3dadd(90.591, 155.212, 9.894, 3.616)
pt3dadd(90.515, 155.303, 9.879, 3.616)
pt3dadd(90.439, 155.394, 9.865, 3.616)
pt3dadd(90.364, 155.485, 9.85, 3.616)
pt3dadd(90.288, 155.576, 9.835, 3.616)
pt3dadd(90.208, 155.665, 9.824, 3.578)
pt3dadd(90.128, 155.754, 9.814, 3.536)
pt3dadd(90.048, 155.843, 9.803, 3.494)
pt3dadd(89.968, 155.932, 9.793, 3.452)
pt3dadd(89.888, 156.019, 9.782, 3.41)
pt3dadd(89.808, 156.108, 9.772, 3.366)
pt3dadd(89.728, 156.197, 9.761, 3.324)
pt3dadd(89.648, 156.286, 9.751, 3.282)
pt3dadd(89.568, 156.373, 9.74, 3.24)
pt3dadd(89.488, 156.462, 9.73, 3.198)
pt3dadd(89.414, 156.553, 9.709, 3.176)
pt3dadd(89.342, 156.646, 9.688, 3.156)
pt3dadd(89.269, 156.738, 9.666, 3.138)
pt3dadd(89.197, 156.829, 9.644, 3.118)
pt3dadd(89.124, 156.922, 9.622, 3.1)
pt3dadd(89.052, 157.014, 9.601, 3.08)
pt3dadd(88.979, 157.105, 9.579, 3.062)
pt3dadd(88.907, 157.198, 9.557, 3.042)
pt3dadd(88.834, 157.29, 9.535, 3.024)
pt3dadd(88.761, 157.381, 9.514, 3.004)
pt3dadd(88.702, 157.476, 9.477, 3.02)
pt3dadd(88.642, 157.57, 9.44, 3.036)
pt3dadd(88.582, 157.664, 9.403, 3.052)
pt3dadd(88.522, 157.758, 9.366, 3.068)
pt3dadd(88.463, 157.853, 9.329, 3.084)
pt3dadd(88.403, 157.946, 9.292, 3.1)
pt3dadd(88.343, 158.041, 9.255, 3.116)
pt3dadd(88.284, 158.135, 9.218, 3.132)
pt3dadd(88.224, 158.23, 9.182, 3.148)
pt3dadd(88.164, 158.323, 9.145, 3.164)
}
apic[5] {pt3dclear()
pt3dadd(88.164, 158.323, 9.145, 3.164)
pt3dadd(88.126, 158.366, 9.13, 3.14)
pt3dadd(88.051, 158.454, 9.101, 3.092)
pt3dadd(87.976, 158.542, 9.072, 3.044)
pt3dadd(87.901, 158.628, 9.043, 2.996)
pt3dadd(87.827, 158.716, 9.014, 2.95)
pt3dadd(87.752, 158.802, 8.986, 2.902)
pt3dadd(87.677, 158.89, 8.957, 2.854)
pt3dadd(87.602, 158.976, 8.928, 2.806)
pt3dadd(87.527, 159.064, 8.899, 2.758)
pt3dadd(87.447, 159.146, 8.871, 2.722)
pt3dadd(87.366, 159.228, 8.844, 2.688)
pt3dadd(87.284, 159.311, 8.816, 2.654)
pt3dadd(87.203, 159.392, 8.789, 2.62)
pt3dadd(87.122, 159.474, 8.762, 2.588)
pt3dadd(87.041, 159.557, 8.734, 2.554)
pt3dadd(86.959, 159.638, 8.707, 2.52)
pt3dadd(86.878, 159.72, 8.68, 2.488)
pt3dadd(86.797, 159.803, 8.653, 2.454)
pt3dadd(86.715, 159.884, 8.625, 2.42)
pt3dadd(86.628, 159.96, 8.599, 2.4)
pt3dadd(86.539, 160.034, 8.573, 2.382)
pt3dadd(86.45, 160.109, 8.547, 2.366)
pt3dadd(86.361, 160.182, 8.521, 2.348)
pt3dadd(86.272, 160.256, 8.495, 2.332)
pt3dadd(86.183, 160.331, 8.469, 2.314)
pt3dadd(86.094, 160.405, 8.443, 2.298)
pt3dadd(86.005, 160.48, 8.417, 2.28)
}
}
proc shape3d_51() {
apic[5] { pt3dadd(85.916, 160.553, 8.391, 2.264)
pt3dadd(85.826, 160.627, 8.365, 2.246)
pt3dadd(85.728, 160.67, 8.324, 2.204)
pt3dadd(85.626, 160.706, 8.279, 2.154)
pt3dadd(85.525, 160.742, 8.235, 2.106)
pt3dadd(85.424, 160.778, 8.19, 2.058)
pt3dadd(85.323, 160.816, 8.145, 2.01)
pt3dadd(85.222, 160.852, 8.1, 1.96)
pt3dadd(85.121, 160.888, 8.056, 1.912)
pt3dadd(85.02, 160.924, 8.011, 1.864)
pt3dadd(84.919, 160.96, 7.966, 1.816)
pt3dadd(84.818, 160.997, 7.921, 1.766)
pt3dadd(84.718, 161.02, 7.871, 1.726)
pt3dadd(84.617, 161.04, 7.819, 1.688)
pt3dadd(84.517, 161.059, 7.766, 1.65)
pt3dadd(84.417, 161.08, 7.714, 1.612)
pt3dadd(84.316, 161.1, 7.662, 1.574)
pt3dadd(84.216, 161.12, 7.61, 1.536)
pt3dadd(84.115, 161.141, 7.558, 1.498)
pt3dadd(84.015, 161.161, 7.506, 1.46)
pt3dadd(83.915, 161.18, 7.454, 1.422)
pt3dadd(83.814, 161.201, 7.401, 1.384)
pt3dadd(83.713, 161.21, 7.349, 1.358)
pt3dadd(83.611, 161.22, 7.297, 1.332)
pt3dadd(83.509, 161.228, 7.244, 1.308)
pt3dadd(83.407, 161.237, 7.192, 1.282)
pt3dadd(83.305, 161.245, 7.139, 1.258)
pt3dadd(83.204, 161.255, 7.087, 1.232)
pt3dadd(83.102, 161.263, 7.034, 1.208)
pt3dadd(83, 161.272, 6.982, 1.182)
pt3dadd(82.898, 161.28, 6.929, 1.156)
pt3dadd(82.797, 161.288, 6.877, 1.132)
pt3dadd(82.687, 161.29, 6.836, 1.13)
pt3dadd(82.577, 161.29, 6.797, 1.13)
pt3dadd(82.466, 161.288, 6.758, 1.13)
pt3dadd(82.356, 161.288, 6.718, 1.13)
pt3dadd(82.246, 161.288, 6.679, 1.13)
pt3dadd(82.135, 161.288, 6.639, 1.13)
pt3dadd(82.025, 161.288, 6.6, 1.13)
pt3dadd(81.915, 161.287, 6.561, 1.13)
pt3dadd(81.805, 161.287, 6.521, 1.13)
pt3dadd(81.694, 161.287, 6.482, 1.13)
pt3dadd(81.578, 161.287, 6.457, 1.178)
pt3dadd(81.461, 161.287, 6.434, 1.232)
pt3dadd(81.345, 161.286, 6.411, 1.284)
pt3dadd(81.228, 161.286, 6.387, 1.336)
pt3dadd(81.111, 161.286, 6.364, 1.388)
pt3dadd(80.995, 161.286, 6.341, 1.442)
pt3dadd(80.878, 161.286, 6.317, 1.494)
pt3dadd(80.761, 161.285, 6.294, 1.546)
pt3dadd(80.645, 161.285, 6.271, 1.598)
pt3dadd(80.528, 161.285, 6.247, 1.65)
pt3dadd(80.414, 161.284, 6.215, 1.632)
pt3dadd(80.301, 161.284, 6.181, 1.608)
pt3dadd(80.188, 161.282, 6.148, 1.586)
pt3dadd(80.075, 161.282, 6.115, 1.562)
pt3dadd(79.962, 161.281, 6.082, 1.538)
pt3dadd(79.848, 161.28, 6.049, 1.514)
pt3dadd(79.735, 161.28, 6.016, 1.49)
pt3dadd(79.622, 161.279, 5.983, 1.468)
pt3dadd(79.509, 161.279, 5.949, 1.444)
pt3dadd(79.396, 161.278, 5.916, 1.42)
pt3dadd(79.282, 161.276, 5.885, 1.416)
pt3dadd(79.168, 161.275, 5.854, 1.412)
pt3dadd(79.054, 161.274, 5.822, 1.41)
pt3dadd(78.94, 161.273, 5.791, 1.406)
pt3dadd(78.826, 161.273, 5.76, 1.404)
pt3dadd(78.712, 161.272, 5.729, 1.4)
pt3dadd(78.597, 161.27, 5.698, 1.396)
pt3dadd(78.483, 161.269, 5.667, 1.394)
pt3dadd(78.369, 161.268, 5.635, 1.39)
pt3dadd(78.255, 161.267, 5.604, 1.388)
pt3dadd(78.138, 161.264, 5.583, 1.414)
pt3dadd(78.021, 161.262, 5.563, 1.442)
pt3dadd(77.904, 161.261, 5.542, 1.47)
pt3dadd(77.786, 161.258, 5.521, 1.498)
pt3dadd(77.669, 161.256, 5.5, 1.526)
pt3dadd(77.551, 161.254, 5.479, 1.554)
pt3dadd(77.434, 161.251, 5.458, 1.582)
pt3dadd(77.317, 161.25, 5.438, 1.61)
pt3dadd(77.199, 161.248, 5.417, 1.638)
pt3dadd(77.082, 161.245, 5.396, 1.666)
}
apic[6] {pt3dclear()
pt3dadd(77.082, 161.245, 5.396, 1.666)
pt3dadd(77.062, 161.244, 5.394, 1.658)
pt3dadd(76.943, 161.24, 5.384, 1.606)
pt3dadd(76.824, 161.237, 5.374, 1.556)
pt3dadd(76.704, 161.233, 5.363, 1.504)
pt3dadd(76.585, 161.228, 5.353, 1.452)
pt3dadd(76.466, 161.225, 5.343, 1.402)
pt3dadd(76.346, 161.221, 5.332, 1.35)
pt3dadd(76.227, 161.216, 5.322, 1.3)
pt3dadd(76.108, 161.213, 5.312, 1.248)
pt3dadd(75.988, 161.209, 5.301, 1.196)
pt3dadd(75.869, 161.204, 5.293, 1.16)
pt3dadd(75.749, 161.196, 5.293, 1.2)
pt3dadd(75.63, 161.188, 5.293, 1.238)
pt3dadd(75.51, 161.179, 5.293, 1.276)
pt3dadd(75.39, 161.17, 5.293, 1.314)
pt3dadd(75.271, 161.161, 5.293, 1.352)
pt3dadd(75.151, 161.153, 5.293, 1.392)
pt3dadd(75.031, 161.144, 5.293, 1.43)
pt3dadd(74.912, 161.136, 5.293, 1.468)
pt3dadd(74.792, 161.128, 5.293, 1.506)
pt3dadd(74.672, 161.118, 5.293, 1.536)
pt3dadd(74.553, 161.105, 5.293, 1.524)
pt3dadd(74.434, 161.09, 5.293, 1.51)
pt3dadd(74.315, 161.077, 5.293, 1.498)
pt3dadd(74.195, 161.064, 5.293, 1.486)
pt3dadd(74.076, 161.051, 5.293, 1.474)
pt3dadd(73.957, 161.036, 5.293, 1.46)
pt3dadd(73.838, 161.023, 5.293, 1.448)
pt3dadd(73.718, 161.01, 5.293, 1.436)
pt3dadd(73.599, 160.996, 5.293, 1.424)
pt3dadd(73.481, 160.979, 5.293, 1.406)
pt3dadd(73.366, 160.943, 5.293, 1.362)
pt3dadd(73.252, 160.906, 5.293, 1.318)
pt3dadd(73.137, 160.87, 5.293, 1.276)
pt3dadd(73.023, 160.834, 5.293, 1.232)
pt3dadd(72.909, 160.798, 5.293, 1.188)
pt3dadd(72.794, 160.762, 5.293, 1.146)
pt3dadd(72.68, 160.724, 5.293, 1.102)
pt3dadd(72.566, 160.688, 5.293, 1.058)
pt3dadd(72.451, 160.652, 5.293, 1.014)
pt3dadd(72.337, 160.615, 5.293, 0.976)
pt3dadd(72.224, 160.577, 5.293, 0.954)
pt3dadd(72.11, 160.537, 5.293, 0.932)
pt3dadd(71.997, 160.499, 5.293, 0.91)
pt3dadd(71.883, 160.459, 5.293, 0.886)
pt3dadd(71.77, 160.421, 5.293, 0.864)
pt3dadd(71.656, 160.381, 5.293, 0.842)
pt3dadd(71.543, 160.343, 5.293, 0.82)
pt3dadd(71.429, 160.303, 5.293, 0.796)
pt3dadd(71.316, 160.265, 5.293, 0.774)
pt3dadd(71.201, 160.229, 5.293, 0.762)
pt3dadd(71.085, 160.201, 5.293, 0.776)
pt3dadd(70.968, 160.174, 5.293, 0.792)
pt3dadd(70.851, 160.146, 5.293, 0.806)
pt3dadd(70.734, 160.118, 5.293, 0.82)
pt3dadd(70.617, 160.091, 5.293, 0.836)
pt3dadd(70.501, 160.063, 5.293, 0.85)
pt3dadd(70.384, 160.036, 5.293, 0.864)
pt3dadd(70.267, 160.008, 5.293, 0.878)
pt3dadd(70.15, 159.98, 5.293, 0.894)
pt3dadd(70.033, 159.955, 5.293, 0.904)
pt3dadd(69.914, 159.938, 5.293, 0.902)
pt3dadd(69.795, 159.922, 5.293, 0.902)
pt3dadd(69.676, 159.905, 5.293, 0.9)
pt3dadd(69.558, 159.888, 5.293, 0.9)
pt3dadd(69.439, 159.871, 5.293, 0.898)
pt3dadd(69.32, 159.854, 5.293, 0.898)
pt3dadd(69.201, 159.838, 5.293, 0.896)
pt3dadd(69.082, 159.821, 5.293, 0.896)
pt3dadd(68.964, 159.804, 5.293, 0.894)
pt3dadd(68.844, 159.79, 5.293, 0.884)
pt3dadd(68.725, 159.78, 5.293, 0.846)
pt3dadd(68.605, 159.77, 5.293, 0.806)
pt3dadd(68.486, 159.762, 5.293, 0.768)
pt3dadd(68.366, 159.752, 5.293, 0.73)
pt3dadd(68.246, 159.743, 5.293, 0.692)
pt3dadd(68.127, 159.734, 5.293, 0.654)
pt3dadd(68.007, 159.725, 5.293, 0.616)
pt3dadd(67.887, 159.715, 5.293, 0.576)
pt3dadd(67.768, 159.707, 5.293, 0.538)
pt3dadd(67.648, 159.696, 5.293, 0.522)
pt3dadd(67.529, 159.68, 5.293, 0.566)
pt3dadd(67.41, 159.666, 5.292, 0.608)
pt3dadd(67.291, 159.652, 5.292, 0.65)
pt3dadd(67.172, 159.637, 5.292, 0.692)
pt3dadd(67.053, 159.623, 5.292, 0.736)
pt3dadd(66.934, 159.607, 5.292, 0.778)
pt3dadd(66.814, 159.593, 5.292, 0.82)
pt3dadd(66.695, 159.578, 5.292, 0.862)
pt3dadd(66.576, 159.564, 5.292, 0.906)
pt3dadd(66.459, 159.542, 5.292, 0.938)
pt3dadd(66.344, 159.506, 5.292, 0.946)
pt3dadd(66.23, 159.469, 5.292, 0.954)
pt3dadd(66.116, 159.432, 5.292, 0.962)
pt3dadd(66.002, 159.395, 5.292, 0.97)
pt3dadd(65.888, 159.358, 5.292, 0.978)
pt3dadd(65.774, 159.322, 5.292, 0.984)
pt3dadd(65.659, 159.284, 5.292, 0.992)
pt3dadd(65.545, 159.247, 5.292, 1)
pt3dadd(65.431, 159.21, 5.292, 1.008)
pt3dadd(65.318, 159.172, 5.292, 1.004)
pt3dadd(65.206, 159.127, 5.292, 0.98)
pt3dadd(65.094, 159.084, 5.292, 0.954)
pt3dadd(64.982, 159.041, 5.292, 0.93)
pt3dadd(64.87, 158.998, 5.292, 0.904)
pt3dadd(64.758, 158.953, 5.292, 0.88)
pt3dadd(64.647, 158.91, 5.292, 0.854)
pt3dadd(64.535, 158.867, 5.291, 0.83)
pt3dadd(64.423, 158.824, 5.291, 0.806)
pt3dadd(64.311, 158.779, 5.291, 0.78)
pt3dadd(64.198, 158.74, 5.291, 0.754)
pt3dadd(64.083, 158.704, 5.291, 0.726)
pt3dadd(63.969, 158.669, 5.291, 0.696)
pt3dadd(63.854, 158.633, 5.291, 0.668)
pt3dadd(63.74, 158.598, 5.291, 0.64)
pt3dadd(63.625, 158.562, 5.29, 0.61)
pt3dadd(63.51, 158.527, 5.29, 0.582)
}
}
proc shape3d_52() {
apic[6] { pt3dadd(63.396, 158.491, 5.29, 0.554)
pt3dadd(63.281, 158.456, 5.29, 0.524)
pt3dadd(63.166, 158.42, 5.29, 0.496)
pt3dadd(63.051, 158.388, 5.29, 0.486)
pt3dadd(62.934, 158.36, 5.29, 0.504)
pt3dadd(62.817, 158.333, 5.29, 0.524)
pt3dadd(62.7, 158.305, 5.289, 0.542)
pt3dadd(62.583, 158.279, 5.289, 0.56)
pt3dadd(62.467, 158.251, 5.289, 0.58)
pt3dadd(62.35, 158.224, 5.288, 0.598)
pt3dadd(62.233, 158.196, 5.288, 0.616)
pt3dadd(62.116, 158.168, 5.288, 0.636)
pt3dadd(61.999, 158.141, 5.288, 0.654)
pt3dadd(61.885, 158.107, 5.287, 0.666)
pt3dadd(61.774, 158.062, 5.287, 0.668)
pt3dadd(61.662, 158.016, 5.287, 0.668)
pt3dadd(61.551, 157.972, 5.286, 0.67)
pt3dadd(61.44, 157.926, 5.286, 0.672)
pt3dadd(61.329, 157.882, 5.285, 0.672)
pt3dadd(61.218, 157.836, 5.285, 0.674)
pt3dadd(61.107, 157.79, 5.284, 0.674)
pt3dadd(60.995, 157.746, 5.284, 0.676)
pt3dadd(60.884, 157.7, 5.283, 0.678)
pt3dadd(60.772, 157.658, 5.283, 0.692)
pt3dadd(60.658, 157.621, 5.282, 0.728)
pt3dadd(60.544, 157.584, 5.281, 0.766)
pt3dadd(60.43, 157.546, 5.28, 0.802)
pt3dadd(60.316, 157.508, 5.279, 0.84)
pt3dadd(60.202, 157.471, 5.278, 0.876)
pt3dadd(60.088, 157.434, 5.277, 0.912)
pt3dadd(59.974, 157.397, 5.276, 0.95)
pt3dadd(59.86, 157.36, 5.276, 0.986)
pt3dadd(59.746, 157.321, 5.275, 1.022)
pt3dadd(59.631, 157.288, 5.273, 1.05)
pt3dadd(59.514, 157.259, 5.272, 1.064)
pt3dadd(59.398, 157.231, 5.27, 1.08)
pt3dadd(59.281, 157.202, 5.269, 1.094)
pt3dadd(59.165, 157.174, 5.267, 1.108)
pt3dadd(59.048, 157.145, 5.266, 1.124)
pt3dadd(58.932, 157.116, 5.264, 1.138)
pt3dadd(58.815, 157.088, 5.262, 1.152)
pt3dadd(58.698, 157.06, 5.261, 1.168)
pt3dadd(58.582, 157.031, 5.259, 1.182)
pt3dadd(58.465, 157.004, 5.257, 1.18)
pt3dadd(58.347, 156.983, 5.254, 1.15)
pt3dadd(58.229, 156.96, 5.251, 1.122)
pt3dadd(58.111, 156.938, 5.248, 1.092)
pt3dadd(57.993, 156.916, 5.245, 1.064)
pt3dadd(57.875, 156.894, 5.242, 1.036)
pt3dadd(57.758, 156.871, 5.238, 1.006)
pt3dadd(57.64, 156.85, 5.235, 0.978)
pt3dadd(57.522, 156.827, 5.232, 0.95)
pt3dadd(57.404, 156.805, 5.229, 0.92)
pt3dadd(57.286, 156.784, 5.225, 0.904)
pt3dadd(57.168, 156.764, 5.219, 0.906)
pt3dadd(57.05, 156.745, 5.214, 0.906)
pt3dadd(56.931, 156.725, 5.208, 0.906)
pt3dadd(56.813, 156.706, 5.202, 0.908)
pt3dadd(56.695, 156.686, 5.196, 0.908)
pt3dadd(56.577, 156.666, 5.19, 0.91)
pt3dadd(56.459, 156.647, 5.184, 0.91)
pt3dadd(56.34, 156.628, 5.179, 0.91)
pt3dadd(56.222, 156.607, 5.173, 0.912)
pt3dadd(56.109, 156.574, 5.166, 0.92)
pt3dadd(56.001, 156.522, 5.158, 0.936)
pt3dadd(55.894, 156.469, 5.15, 0.954)
pt3dadd(55.786, 156.416, 5.142, 0.972)
pt3dadd(55.679, 156.365, 5.133, 0.988)
pt3dadd(55.571, 156.312, 5.125, 1.006)
pt3dadd(55.463, 156.259, 5.117, 1.022)
pt3dadd(55.356, 156.208, 5.109, 1.04)
pt3dadd(55.248, 156.155, 5.101, 1.058)
pt3dadd(55.141, 156.103, 5.093, 1.074)
pt3dadd(55.033, 156.054, 5.078, 1.08)
pt3dadd(54.926, 156.008, 5.053, 1.072)
pt3dadd(54.819, 155.964, 5.029, 1.064)
pt3dadd(54.711, 155.92, 5.005, 1.056)
pt3dadd(54.604, 155.874, 4.981, 1.048)
pt3dadd(54.496, 155.83, 4.956, 1.04)
pt3dadd(54.389, 155.784, 4.932, 1.032)
pt3dadd(54.282, 155.74, 4.908, 1.024)
pt3dadd(54.174, 155.694, 4.883, 1.016)
pt3dadd(54.067, 155.65, 4.859, 1.008)
pt3dadd(53.96, 155.603, 4.836, 1.002)
pt3dadd(53.854, 155.552, 4.813, 1)
pt3dadd(53.749, 155.503, 4.79, 0.996)
pt3dadd(53.643, 155.453, 4.767, 0.994)
pt3dadd(53.537, 155.404, 4.744, 0.99)
pt3dadd(53.432, 155.353, 4.721, 0.986)
pt3dadd(53.326, 155.304, 4.699, 0.984)
pt3dadd(53.22, 155.254, 4.676, 0.98)
pt3dadd(53.115, 155.204, 4.653, 0.976)
pt3dadd(53.009, 155.154, 4.63, 0.974)
pt3dadd(52.905, 155.099, 4.614, 0.98)
pt3dadd(52.801, 155.04, 4.602, 0.996)
pt3dadd(52.698, 154.98, 4.592, 1.012)
pt3dadd(52.595, 154.92, 4.58, 1.028)
pt3dadd(52.491, 154.861, 4.569, 1.044)
pt3dadd(52.388, 154.801, 4.558, 1.06)
pt3dadd(52.285, 154.741, 4.547, 1.076)
pt3dadd(52.181, 154.682, 4.536, 1.092)
pt3dadd(52.078, 154.622, 4.525, 1.108)
pt3dadd(51.975, 154.562, 4.514, 1.124)
pt3dadd(51.868, 154.514, 4.523, 1.13)
pt3dadd(51.759, 154.474, 4.547, 1.13)
pt3dadd(51.649, 154.433, 4.571, 1.13)
pt3dadd(51.54, 154.392, 4.595, 1.13)
pt3dadd(51.431, 154.351, 4.618, 1.13)
pt3dadd(51.322, 154.312, 4.642, 1.13)
pt3dadd(51.212, 154.271, 4.666, 1.13)
pt3dadd(51.103, 154.23, 4.689, 1.13)
pt3dadd(50.994, 154.189, 4.713, 1.13)
pt3dadd(50.885, 154.148, 4.737, 1.13)
pt3dadd(50.777, 154.102, 4.757, 1.138)
pt3dadd(50.671, 154.049, 4.774, 1.15)
pt3dadd(50.565, 153.997, 4.792, 1.162)
pt3dadd(50.459, 153.946, 4.81, 1.174)
pt3dadd(50.353, 153.894, 4.827, 1.188)
pt3dadd(50.247, 153.842, 4.845, 1.2)
pt3dadd(50.14, 153.79, 4.862, 1.212)
pt3dadd(50.034, 153.738, 4.88, 1.226)
pt3dadd(49.928, 153.686, 4.897, 1.238)
pt3dadd(49.822, 153.635, 4.915, 1.25)
pt3dadd(49.713, 153.586, 4.927, 1.252)
pt3dadd(49.604, 153.539, 4.937, 1.248)
pt3dadd(49.494, 153.492, 4.946, 1.244)
pt3dadd(49.384, 153.445, 4.955, 1.238)
pt3dadd(49.274, 153.398, 4.964, 1.234)
pt3dadd(49.164, 153.352, 4.973, 1.228)
pt3dadd(49.054, 153.304, 4.982, 1.224)
pt3dadd(48.944, 153.257, 4.991, 1.22)
pt3dadd(48.834, 153.21, 5, 1.216)
pt3dadd(48.724, 153.163, 5.009, 1.21)
pt3dadd(48.611, 153.127, 5.007, 1.188)
pt3dadd(48.495, 153.096, 5, 1.156)
pt3dadd(48.379, 153.065, 4.994, 1.126)
pt3dadd(48.264, 153.034, 4.987, 1.096)
pt3dadd(48.148, 153.002, 4.98, 1.064)
pt3dadd(48.033, 152.971, 4.973, 1.034)
pt3dadd(47.917, 152.94, 4.966, 1.002)
pt3dadd(47.802, 152.908, 4.959, 0.972)
pt3dadd(47.686, 152.876, 4.952, 0.942)
pt3dadd(47.571, 152.845, 4.945, 0.91)
pt3dadd(47.46, 152.821, 4.914, 0.904)
pt3dadd(47.351, 152.8, 4.878, 0.904)
pt3dadd(47.241, 152.778, 4.841, 0.904)
pt3dadd(47.132, 152.755, 4.804, 0.904)
pt3dadd(47.022, 152.734, 4.768, 0.904)
pt3dadd(46.913, 152.711, 4.731, 0.904)
pt3dadd(46.803, 152.689, 4.694, 0.904)
pt3dadd(46.694, 152.668, 4.658, 0.904)
pt3dadd(46.584, 152.645, 4.621, 0.904)
pt3dadd(46.475, 152.623, 4.584, 0.904)
pt3dadd(46.362, 152.604, 4.557, 0.93)
pt3dadd(46.247, 152.585, 4.531, 0.962)
pt3dadd(46.132, 152.566, 4.506, 0.996)
pt3dadd(46.018, 152.546, 4.48, 1.028)
pt3dadd(45.903, 152.528, 4.455, 1.06)
pt3dadd(45.789, 152.509, 4.429, 1.094)
pt3dadd(45.674, 152.49, 4.404, 1.126)
pt3dadd(45.56, 152.472, 4.378, 1.158)
pt3dadd(45.445, 152.453, 4.353, 1.192)
pt3dadd(45.331, 152.434, 4.328, 1.224)
pt3dadd(45.219, 152.396, 4.31, 1.232)
pt3dadd(45.108, 152.354, 4.295, 1.232)
pt3dadd(44.997, 152.312, 4.28, 1.234)
pt3dadd(44.886, 152.27, 4.265, 1.236)
pt3dadd(44.775, 152.228, 4.249, 1.236)
pt3dadd(44.665, 152.186, 4.234, 1.238)
pt3dadd(44.554, 152.144, 4.219, 1.24)
pt3dadd(44.443, 152.102, 4.204, 1.24)
pt3dadd(44.332, 152.06, 4.188, 1.242)
pt3dadd(44.221, 152.02, 4.173, 1.244)
pt3dadd(44.113, 151.968, 4.165, 1.232)
pt3dadd(44.005, 151.916, 4.158, 1.222)
pt3dadd(43.897, 151.865, 4.15, 1.21)
pt3dadd(43.789, 151.813, 4.143, 1.198)
pt3dadd(43.681, 151.762, 4.136, 1.188)
pt3dadd(43.573, 151.71, 4.128, 1.176)
pt3dadd(43.465, 151.658, 4.121, 1.164)
pt3dadd(43.357, 151.608, 4.113, 1.154)
pt3dadd(43.249, 151.556, 4.106, 1.142)
pt3dadd(43.141, 151.505, 4.099, 1.13)
pt3dadd(43.031, 151.456, 4.097, 1.13)
pt3dadd(42.921, 151.406, 4.096, 1.128)
pt3dadd(42.812, 151.358, 4.094, 1.128)
pt3dadd(42.702, 151.309, 4.093, 1.126)
pt3dadd(42.592, 151.261, 4.092, 1.126)
pt3dadd(42.483, 151.212, 4.09, 1.124)
pt3dadd(42.373, 151.164, 4.089, 1.124)
pt3dadd(42.263, 151.115, 4.087, 1.122)
pt3dadd(42.153, 151.067, 4.086, 1.122)
pt3dadd(42.044, 151.018, 4.085, 1.122)
pt3dadd(41.942, 150.955, 4.082, 1.106)
pt3dadd(41.84, 150.89, 4.08, 1.09)
pt3dadd(41.739, 150.827, 4.078, 1.074)
pt3dadd(41.637, 150.763, 4.075, 1.058)
pt3dadd(41.535, 150.7, 4.073, 1.04)
pt3dadd(41.434, 150.636, 4.07, 1.024)
pt3dadd(41.332, 150.571, 4.068, 1.008)
}
}
proc shape3d_53() {
apic[6] { pt3dadd(41.231, 150.508, 4.065, 0.992)
pt3dadd(41.129, 150.444, 4.063, 0.976)
pt3dadd(41.028, 150.38, 4.061, 0.96)
pt3dadd(40.927, 150.316, 4.056, 0.964)
pt3dadd(40.826, 150.251, 4.051, 0.968)
pt3dadd(40.725, 150.186, 4.047, 0.974)
pt3dadd(40.624, 150.121, 4.042, 0.98)
pt3dadd(40.524, 150.056, 4.037, 0.984)
pt3dadd(40.423, 149.992, 4.032, 0.99)
pt3dadd(40.322, 149.927, 4.028, 0.994)
pt3dadd(40.221, 149.862, 4.023, 1)
pt3dadd(40.12, 149.797, 4.018, 1.006)
pt3dadd(40.019, 149.732, 4.013, 1.01)
pt3dadd(39.916, 149.672, 4.006, 1.004)
pt3dadd(39.812, 149.614, 3.999, 0.998)
pt3dadd(39.708, 149.554, 3.992, 0.992)
pt3dadd(39.604, 149.495, 3.985, 0.984)
pt3dadd(39.5, 149.435, 3.977, 0.978)
pt3dadd(39.396, 149.376, 3.97, 0.97)
pt3dadd(39.292, 149.316, 3.963, 0.964)
pt3dadd(39.188, 149.257, 3.956, 0.958)
pt3dadd(39.084, 149.198, 3.948, 0.952)
pt3dadd(38.98, 149.138, 3.941, 0.944)
pt3dadd(38.868, 149.098, 3.93, 0.872)
pt3dadd(38.756, 149.057, 3.919, 0.8)
pt3dadd(38.643, 149.017, 3.908, 0.728)
pt3dadd(38.531, 148.976, 3.897, 0.656)
pt3dadd(38.419, 148.936, 3.887, 0.586)
pt3dadd(38.307, 148.895, 3.876, 0.514)
pt3dadd(38.195, 148.854, 3.865, 0.442)
pt3dadd(38.083, 148.814, 3.854, 0.37)
pt3dadd(37.971, 148.774, 3.843, 0.298)
pt3dadd(37.858, 148.733, 3.832, 0.226)
}
apic[7] {pt3dclear()
pt3dadd(37.858, 148.733, 3.832, 0.226)
pt3dadd(37.813, 148.727, 3.817, 0.226)
pt3dadd(37.702, 148.714, 3.78, 0.226)
pt3dadd(37.591, 148.699, 3.743, 0.226)
pt3dadd(37.481, 148.686, 3.706, 0.226)
pt3dadd(37.37, 148.673, 3.669, 0.226)
pt3dadd(37.259, 148.66, 3.633, 0.228)
pt3dadd(37.148, 148.646, 3.596, 0.228)
pt3dadd(37.037, 148.633, 3.56, 0.23)
pt3dadd(36.926, 148.621, 3.523, 0.23)
pt3dadd(36.815, 148.608, 3.487, 0.23)
pt3dadd(36.704, 148.595, 3.45, 0.232)
pt3dadd(36.593, 148.582, 3.414, 0.232)
pt3dadd(36.482, 148.568, 3.377, 0.232)
pt3dadd(36.37, 148.558, 3.344, 0.238)
pt3dadd(36.253, 148.555, 3.32, 0.256)
pt3dadd(36.137, 148.553, 3.296, 0.276)
pt3dadd(36.02, 148.55, 3.272, 0.294)
pt3dadd(35.904, 148.548, 3.248, 0.312)
pt3dadd(35.787, 148.546, 3.224, 0.332)
pt3dadd(35.671, 148.543, 3.2, 0.35)
pt3dadd(35.555, 148.541, 3.175, 0.368)
pt3dadd(35.438, 148.538, 3.151, 0.388)
pt3dadd(35.322, 148.536, 3.127, 0.406)
pt3dadd(35.205, 148.534, 3.106, 0.42)
pt3dadd(35.086, 148.528, 3.093, 0.424)
pt3dadd(34.967, 148.522, 3.079, 0.428)
pt3dadd(34.848, 148.516, 3.066, 0.43)
pt3dadd(34.73, 148.51, 3.052, 0.434)
pt3dadd(34.611, 148.504, 3.038, 0.436)
pt3dadd(34.492, 148.498, 3.025, 0.44)
pt3dadd(34.373, 148.492, 3.011, 0.444)
pt3dadd(34.255, 148.486, 2.998, 0.446)
pt3dadd(34.136, 148.481, 2.984, 0.45)
pt3dadd(34.017, 148.474, 2.973, 0.448)
pt3dadd(33.897, 148.465, 2.969, 0.436)
pt3dadd(33.778, 148.456, 2.964, 0.424)
pt3dadd(33.658, 148.447, 2.96, 0.412)
pt3dadd(33.539, 148.439, 2.955, 0.4)
pt3dadd(33.419, 148.429, 2.951, 0.386)
pt3dadd(33.3, 148.421, 2.946, 0.374)
pt3dadd(33.18, 148.412, 2.942, 0.362)
pt3dadd(33.06, 148.403, 2.938, 0.35)
pt3dadd(32.941, 148.394, 2.933, 0.338)
pt3dadd(32.822, 148.381, 2.93, 0.326)
pt3dadd(32.704, 148.358, 2.929, 0.316)
pt3dadd(32.586, 148.337, 2.928, 0.306)
pt3dadd(32.468, 148.314, 2.927, 0.294)
pt3dadd(32.351, 148.291, 2.926, 0.284)
pt3dadd(32.233, 148.268, 2.925, 0.274)
pt3dadd(32.115, 148.246, 2.924, 0.264)
pt3dadd(31.997, 148.223, 2.923, 0.254)
pt3dadd(31.879, 148.2, 2.922, 0.242)
pt3dadd(31.761, 148.177, 2.921, 0.232)
pt3dadd(31.644, 148.151, 2.92, 0.23)
pt3dadd(31.529, 148.12, 2.918, 0.244)
pt3dadd(31.413, 148.088, 2.916, 0.256)
pt3dadd(31.297, 148.056, 2.915, 0.27)
pt3dadd(31.181, 148.025, 2.913, 0.282)
pt3dadd(31.066, 147.992, 2.911, 0.296)
pt3dadd(30.95, 147.961, 2.909, 0.308)
pt3dadd(30.834, 147.93, 2.908, 0.322)
pt3dadd(30.718, 147.898, 2.906, 0.334)
pt3dadd(30.603, 147.866, 2.904, 0.348)
pt3dadd(30.486, 147.842, 2.902, 0.376)
pt3dadd(30.366, 147.832, 2.899, 0.434)
pt3dadd(30.247, 147.82, 2.896, 0.488)
pt3dadd(30.127, 147.808, 2.893, 0.544)
pt3dadd(30.008, 147.797, 2.89, 0.6)
pt3dadd(29.889, 147.785, 2.887, 0.656)
pt3dadd(29.769, 147.773, 2.884, 0.712)
pt3dadd(29.65, 147.762, 2.881, 0.768)
pt3dadd(29.53, 147.75, 2.878, 0.824)
pt3dadd(29.411, 147.738, 2.875, 0.88)
pt3dadd(29.294, 147.748, 2.871, 0.92)
pt3dadd(29.18, 147.785, 2.864, 0.938)
pt3dadd(29.066, 147.821, 2.857, 0.956)
pt3dadd(28.952, 147.858, 2.85, 0.974)
pt3dadd(28.838, 147.895, 2.844, 0.992)
pt3dadd(28.724, 147.931, 2.837, 1.01)
pt3dadd(28.61, 147.968, 2.831, 1.028)
pt3dadd(28.496, 148.004, 2.824, 1.048)
pt3dadd(28.382, 148.042, 2.817, 1.066)
pt3dadd(28.268, 148.079, 2.81, 1.084)
pt3dadd(28.155, 148.115, 2.802, 1.082)
pt3dadd(28.041, 148.152, 2.792, 1.058)
pt3dadd(27.928, 148.189, 2.782, 1.032)
pt3dadd(27.814, 148.225, 2.772, 1.006)
pt3dadd(27.7, 148.262, 2.761, 0.98)
pt3dadd(27.587, 148.3, 2.751, 0.956)
pt3dadd(27.473, 148.337, 2.741, 0.93)
pt3dadd(27.36, 148.373, 2.731, 0.904)
pt3dadd(27.246, 148.41, 2.721, 0.878)
pt3dadd(27.133, 148.447, 2.711, 0.852)
pt3dadd(27.02, 148.482, 2.694, 0.832)
pt3dadd(26.908, 148.513, 2.668, 0.814)
pt3dadd(26.797, 148.544, 2.643, 0.798)
pt3dadd(26.685, 148.577, 2.618, 0.782)
pt3dadd(26.573, 148.608, 2.592, 0.766)
pt3dadd(26.462, 148.639, 2.567, 0.75)
pt3dadd(26.35, 148.672, 2.542, 0.734)
pt3dadd(26.238, 148.703, 2.516, 0.718)
pt3dadd(26.126, 148.734, 2.491, 0.702)
pt3dadd(26.015, 148.766, 2.466, 0.686)
pt3dadd(25.905, 148.798, 2.436, 0.678)
pt3dadd(25.796, 148.83, 2.404, 0.678)
pt3dadd(25.687, 148.862, 2.371, 0.678)
pt3dadd(25.579, 148.895, 2.338, 0.678)
pt3dadd(25.47, 148.927, 2.305, 0.678)
pt3dadd(25.361, 148.96, 2.273, 0.678)
pt3dadd(25.253, 148.992, 2.24, 0.678)
pt3dadd(25.144, 149.024, 2.207, 0.678)
pt3dadd(25.035, 149.057, 2.174, 0.678)
pt3dadd(24.927, 149.089, 2.142, 0.678)
pt3dadd(24.819, 149.13, 2.115, 0.678)
pt3dadd(24.712, 149.177, 2.093, 0.678)
pt3dadd(24.604, 149.224, 2.071, 0.678)
pt3dadd(24.497, 149.27, 2.049, 0.678)
pt3dadd(24.39, 149.318, 2.027, 0.678)
pt3dadd(24.283, 149.365, 2.004, 0.678)
pt3dadd(24.176, 149.412, 1.982, 0.678)
pt3dadd(24.069, 149.46, 1.96, 0.678)
pt3dadd(23.962, 149.507, 1.938, 0.678)
pt3dadd(23.855, 149.554, 1.916, 0.678)
pt3dadd(23.745, 149.597, 1.9, 0.678)
pt3dadd(23.632, 149.635, 1.889, 0.678)
pt3dadd(23.519, 149.675, 1.878, 0.678)
pt3dadd(23.406, 149.714, 1.867, 0.678)
pt3dadd(23.294, 149.753, 1.856, 0.678)
pt3dadd(23.181, 149.792, 1.845, 0.678)
pt3dadd(23.069, 149.831, 1.833, 0.678)
pt3dadd(22.956, 149.87, 1.822, 0.678)
pt3dadd(22.843, 149.91, 1.811, 0.678)
pt3dadd(22.731, 149.948, 1.8, 0.678)
pt3dadd(22.617, 149.986, 1.793, 0.678)
pt3dadd(22.502, 150.019, 1.79, 0.678)
pt3dadd(22.387, 150.054, 1.787, 0.678)
pt3dadd(22.272, 150.088, 1.784, 0.678)
pt3dadd(22.157, 150.122, 1.781, 0.678)
pt3dadd(22.042, 150.156, 1.778, 0.678)
pt3dadd(21.927, 150.191, 1.775, 0.678)
pt3dadd(21.812, 150.224, 1.772, 0.678)
pt3dadd(21.697, 150.259, 1.769, 0.678)
pt3dadd(21.582, 150.293, 1.766, 0.678)
pt3dadd(21.469, 150.334, 1.764, 0.678)
pt3dadd(21.358, 150.378, 1.764, 0.678)
pt3dadd(21.246, 150.422, 1.764, 0.678)
pt3dadd(21.135, 150.467, 1.764, 0.678)
pt3dadd(21.023, 150.511, 1.764, 0.678)
pt3dadd(20.912, 150.556, 1.764, 0.678)
pt3dadd(20.8, 150.599, 1.764, 0.678)
pt3dadd(20.689, 150.643, 1.764, 0.678)
pt3dadd(20.577, 150.688, 1.764, 0.678)
pt3dadd(20.466, 150.732, 1.764, 0.678)
pt3dadd(20.357, 150.784, 1.764, 0.682)
pt3dadd(20.251, 150.839, 1.764, 0.69)
pt3dadd(20.144, 150.895, 1.764, 0.698)
pt3dadd(20.038, 150.95, 1.764, 0.706)
pt3dadd(19.932, 151.006, 1.764, 0.714)
pt3dadd(19.825, 151.061, 1.764, 0.722)
pt3dadd(19.719, 151.116, 1.764, 0.73)
pt3dadd(19.612, 151.171, 1.764, 0.738)
pt3dadd(19.506, 151.228, 1.764, 0.746)
pt3dadd(19.399, 151.283, 1.764, 0.752)
pt3dadd(19.292, 151.337, 1.764, 0.78)
pt3dadd(19.185, 151.39, 1.764, 0.816)
pt3dadd(19.077, 151.442, 1.764, 0.854)
}
}
proc shape3d_54() {
apic[7] { pt3dadd(18.969, 151.496, 1.764, 0.89)
pt3dadd(18.862, 151.549, 1.764, 0.928)
pt3dadd(18.754, 151.602, 1.764, 0.966)
pt3dadd(18.647, 151.656, 1.764, 1.002)
pt3dadd(18.539, 151.709, 1.764, 1.04)
pt3dadd(18.432, 151.762, 1.764, 1.076)
pt3dadd(18.324, 151.814, 1.764, 1.114)
pt3dadd(18.225, 151.882, 1.764, 1.126)
pt3dadd(18.129, 151.955, 1.763, 1.128)
pt3dadd(18.034, 152.027, 1.763, 1.128)
pt3dadd(17.939, 152.1, 1.763, 1.128)
pt3dadd(17.844, 152.173, 1.763, 1.128)
pt3dadd(17.749, 152.246, 1.763, 1.128)
pt3dadd(17.654, 152.32, 1.763, 1.128)
pt3dadd(17.558, 152.393, 1.763, 1.13)
pt3dadd(17.463, 152.466, 1.763, 1.13)
pt3dadd(17.368, 152.539, 1.763, 1.13)
pt3dadd(17.282, 152.622, 1.763, 1.094)
pt3dadd(17.201, 152.711, 1.763, 1.04)
pt3dadd(17.12, 152.8, 1.763, 0.986)
pt3dadd(17.039, 152.888, 1.763, 0.934)
pt3dadd(16.958, 152.977, 1.763, 0.88)
pt3dadd(16.877, 153.065, 1.762, 0.826)
pt3dadd(16.796, 153.154, 1.762, 0.772)
pt3dadd(16.715, 153.242, 1.762, 0.718)
pt3dadd(16.634, 153.331, 1.762, 0.664)
pt3dadd(16.553, 153.419, 1.762, 0.61)
pt3dadd(16.47, 153.505, 1.762, 0.568)
pt3dadd(16.384, 153.59, 1.762, 0.532)
pt3dadd(16.299, 153.674, 1.761, 0.494)
pt3dadd(16.215, 153.76, 1.761, 0.456)
pt3dadd(16.13, 153.844, 1.761, 0.42)
pt3dadd(16.044, 153.929, 1.761, 0.382)
pt3dadd(15.96, 154.014, 1.76, 0.346)
pt3dadd(15.875, 154.098, 1.76, 0.308)
pt3dadd(15.79, 154.183, 1.76, 0.27)
pt3dadd(15.705, 154.267, 1.76, 0.234)
pt3dadd(15.613, 154.345, 1.759, 0.226)
pt3dadd(15.52, 154.421, 1.759, 0.226)
pt3dadd(15.427, 154.496, 1.758, 0.226)
pt3dadd(15.334, 154.572, 1.758, 0.226)
pt3dadd(15.241, 154.649, 1.758, 0.226)
pt3dadd(15.148, 154.724, 1.757, 0.226)
pt3dadd(15.055, 154.8, 1.757, 0.226)
pt3dadd(14.962, 154.876, 1.756, 0.226)
pt3dadd(14.869, 154.951, 1.756, 0.226)
pt3dadd(14.776, 155.027, 1.756, 0.226)
pt3dadd(14.684, 155.104, 1.755, 0.228)
pt3dadd(14.592, 155.182, 1.755, 0.228)
pt3dadd(14.501, 155.26, 1.754, 0.23)
pt3dadd(14.409, 155.336, 1.753, 0.232)
pt3dadd(14.317, 155.414, 1.753, 0.232)
pt3dadd(14.226, 155.491, 1.752, 0.234)
pt3dadd(14.134, 155.569, 1.752, 0.236)
pt3dadd(14.043, 155.647, 1.751, 0.236)
pt3dadd(13.951, 155.724, 1.75, 0.238)
pt3dadd(13.859, 155.802, 1.75, 0.24)
pt3dadd(13.769, 155.881, 1.749, 0.264)
pt3dadd(13.679, 155.96, 1.748, 0.292)
pt3dadd(13.589, 156.04, 1.747, 0.322)
pt3dadd(13.5, 156.12, 1.746, 0.35)
pt3dadd(13.41, 156.199, 1.745, 0.38)
pt3dadd(13.32, 156.278, 1.743, 0.41)
pt3dadd(13.23, 156.359, 1.742, 0.438)
pt3dadd(13.14, 156.438, 1.741, 0.468)
pt3dadd(13.05, 156.517, 1.74, 0.496)
pt3dadd(12.96, 156.596, 1.739, 0.526)
pt3dadd(12.873, 156.678, 1.738, 0.532)
pt3dadd(12.785, 156.761, 1.736, 0.534)
pt3dadd(12.698, 156.842, 1.735, 0.534)
pt3dadd(12.61, 156.925, 1.733, 0.534)
pt3dadd(12.523, 157.007, 1.731, 0.534)
pt3dadd(12.435, 157.088, 1.73, 0.534)
pt3dadd(12.348, 157.171, 1.728, 0.536)
pt3dadd(12.26, 157.253, 1.727, 0.536)
pt3dadd(12.173, 157.336, 1.725, 0.536)
pt3dadd(12.085, 157.417, 1.724, 0.536)
pt3dadd(12, 157.501, 1.722, 0.514)
pt3dadd(11.914, 157.586, 1.719, 0.486)
pt3dadd(11.829, 157.67, 1.717, 0.458)
pt3dadd(11.744, 157.756, 1.715, 0.43)
pt3dadd(11.659, 157.84, 1.713, 0.402)
pt3dadd(11.574, 157.925, 1.711, 0.374)
pt3dadd(11.489, 158.009, 1.709, 0.346)
pt3dadd(11.404, 158.094, 1.707, 0.318)
pt3dadd(11.319, 158.178, 1.705, 0.29)
pt3dadd(11.234, 158.263, 1.703, 0.262)
pt3dadd(11.149, 158.347, 1.698, 0.254)
pt3dadd(11.064, 158.431, 1.693, 0.25)
pt3dadd(10.978, 158.515, 1.688, 0.248)
pt3dadd(10.893, 158.6, 1.683, 0.244)
pt3dadd(10.808, 158.684, 1.678, 0.242)
pt3dadd(10.722, 158.768, 1.673, 0.238)
pt3dadd(10.637, 158.852, 1.668, 0.236)
pt3dadd(10.552, 158.936, 1.663, 0.232)
pt3dadd(10.467, 159.022, 1.658, 0.23)
pt3dadd(10.381, 159.106, 1.652, 0.226)
pt3dadd(10.296, 159.19, 1.646, 0.236)
pt3dadd(10.211, 159.274, 1.639, 0.248)
pt3dadd(10.125, 159.358, 1.632, 0.258)
pt3dadd(10.04, 159.44, 1.625, 0.27)
pt3dadd(9.955, 159.524, 1.618, 0.282)
pt3dadd(9.869, 159.608, 1.611, 0.294)
pt3dadd(9.784, 159.692, 1.604, 0.306)
pt3dadd(9.698, 159.776, 1.597, 0.318)
pt3dadd(9.613, 159.86, 1.59, 0.328)
pt3dadd(9.528, 159.944, 1.583, 0.34)
pt3dadd(9.442, 160.027, 1.574, 0.368)
pt3dadd(9.357, 160.111, 1.565, 0.4)
pt3dadd(9.271, 160.194, 1.555, 0.432)
pt3dadd(9.185, 160.278, 1.546, 0.464)
pt3dadd(9.1, 160.361, 1.536, 0.494)
pt3dadd(9.014, 160.445, 1.526, 0.526)
pt3dadd(8.928, 160.528, 1.517, 0.558)
pt3dadd(8.843, 160.61, 1.507, 0.59)
pt3dadd(8.757, 160.694, 1.498, 0.622)
pt3dadd(8.672, 160.777, 1.488, 0.652)
pt3dadd(8.591, 160.852, 1.45, 0.644)
pt3dadd(8.511, 160.924, 1.406, 0.624)
pt3dadd(8.431, 160.996, 1.361, 0.606)
pt3dadd(8.351, 161.066, 1.316, 0.586)
pt3dadd(8.271, 161.138, 1.271, 0.566)
pt3dadd(8.191, 161.21, 1.227, 0.548)
pt3dadd(8.111, 161.282, 1.182, 0.528)
pt3dadd(8.031, 161.353, 1.138, 0.508)
pt3dadd(7.952, 161.425, 1.093, 0.49)
pt3dadd(7.872, 161.497, 1.048, 0.47)
pt3dadd(7.786, 161.573, 1.018, 0.466)
pt3dadd(7.7, 161.648, 0.989, 0.464)
pt3dadd(7.613, 161.724, 0.961, 0.464)
pt3dadd(7.527, 161.8, 0.933, 0.462)
pt3dadd(7.44, 161.876, 0.905, 0.46)
pt3dadd(7.353, 161.952, 0.877, 0.458)
pt3dadd(7.267, 162.028, 0.848, 0.456)
pt3dadd(7.18, 162.104, 0.82, 0.456)
pt3dadd(7.094, 162.18, 0.792, 0.454)
pt3dadd(7.007, 162.256, 0.764, 0.452)
pt3dadd(6.906, 162.316, 0.747, 0.468)
pt3dadd(6.801, 162.372, 0.731, 0.488)
pt3dadd(6.697, 162.428, 0.716, 0.506)
pt3dadd(6.593, 162.486, 0.701, 0.526)
pt3dadd(6.489, 162.542, 0.686, 0.546)
pt3dadd(6.385, 162.599, 0.67, 0.564)
pt3dadd(6.281, 162.656, 0.655, 0.584)
pt3dadd(6.177, 162.713, 0.64, 0.604)
pt3dadd(6.073, 162.769, 0.625, 0.622)
pt3dadd(5.969, 162.827, 0.609, 0.642)
pt3dadd(5.879, 162.906, 0.606, 0.646)
pt3dadd(5.791, 162.988, 0.604, 0.65)
pt3dadd(5.703, 163.069, 0.602, 0.654)
pt3dadd(5.615, 163.15, 0.6, 0.656)
pt3dadd(5.527, 163.231, 0.598, 0.66)
pt3dadd(5.439, 163.313, 0.596, 0.664)
pt3dadd(5.351, 163.394, 0.594, 0.668)
pt3dadd(5.262, 163.476, 0.592, 0.67)
pt3dadd(5.174, 163.558, 0.59, 0.674)
pt3dadd(5.086, 163.639, 0.588, 0.678)
pt3dadd(4.976, 163.686, 0.588, 0.634)
pt3dadd(4.866, 163.734, 0.588, 0.588)
pt3dadd(4.756, 163.782, 0.588, 0.542)
pt3dadd(4.646, 163.829, 0.588, 0.498)
pt3dadd(4.536, 163.877, 0.588, 0.452)
pt3dadd(4.425, 163.925, 0.588, 0.406)
pt3dadd(4.315, 163.972, 0.588, 0.362)
pt3dadd(4.205, 164.02, 0.588, 0.316)
pt3dadd(4.095, 164.066, 0.588, 0.272)
pt3dadd(3.985, 164.114, 0.588, 0.226)
}
apic[8] {pt3dclear()
pt3dadd(37.858, 148.733, 3.832, 0.226)
pt3dadd(37.858, 148.64, 3.779, 0.252)
pt3dadd(37.858, 148.541, 3.722, 0.282)
pt3dadd(37.858, 148.442, 3.666, 0.31)
pt3dadd(37.858, 148.343, 3.609, 0.34)
pt3dadd(37.858, 148.244, 3.552, 0.368)
pt3dadd(37.858, 148.145, 3.496, 0.396)
pt3dadd(37.856, 148.046, 3.44, 0.426)
pt3dadd(37.854, 147.947, 3.384, 0.456)
pt3dadd(37.852, 147.847, 3.328, 0.484)
pt3dadd(37.85, 147.748, 3.272, 0.514)
pt3dadd(37.847, 147.648, 3.216, 0.544)
pt3dadd(37.845, 147.548, 3.16, 0.572)
pt3dadd(37.843, 147.45, 3.104, 0.602)
pt3dadd(37.841, 147.35, 3.048, 0.632)
pt3dadd(37.838, 147.251, 2.992, 0.66)
pt3dadd(37.83, 147.152, 2.94, 0.69)
pt3dadd(37.738, 147.076, 2.938, 0.732)
pt3dadd(37.645, 146.999, 2.936, 0.772)
pt3dadd(37.553, 146.922, 2.934, 0.814)
pt3dadd(37.461, 146.845, 2.932, 0.854)
pt3dadd(37.369, 146.768, 2.93, 0.894)
pt3dadd(37.277, 146.692, 2.928, 0.936)
pt3dadd(37.185, 146.615, 2.926, 0.976)
pt3dadd(37.093, 146.538, 2.924, 1.018)
pt3dadd(37.001, 146.461, 2.923, 1.058)
pt3dadd(36.909, 146.384, 2.921, 1.096)
pt3dadd(36.816, 146.309, 2.918, 1.096)
pt3dadd(36.723, 146.232, 2.916, 1.096)
pt3dadd(36.63, 146.156, 2.914, 1.098)
pt3dadd(36.537, 146.081, 2.912, 1.098)
pt3dadd(36.444, 146.005, 2.909, 1.098)
pt3dadd(36.35, 145.93, 2.907, 1.098)
}
}
proc shape3d_55() {
apic[8] { pt3dadd(36.257, 145.854, 2.905, 1.098)
pt3dadd(36.164, 145.778, 2.903, 1.1)
pt3dadd(36.071, 145.703, 2.901, 1.1)
pt3dadd(35.978, 145.627, 2.898, 1.096)
pt3dadd(35.882, 145.555, 2.895, 1.034)
pt3dadd(35.786, 145.483, 2.892, 0.972)
pt3dadd(35.691, 145.41, 2.889, 0.91)
pt3dadd(35.595, 145.338, 2.886, 0.848)
pt3dadd(35.499, 145.266, 2.883, 0.786)
pt3dadd(35.403, 145.194, 2.88, 0.724)
pt3dadd(35.307, 145.122, 2.876, 0.662)
pt3dadd(35.211, 145.05, 2.873, 0.6)
pt3dadd(35.115, 144.978, 2.87, 0.538)
pt3dadd(35.018, 144.908, 2.867, 0.486)
pt3dadd(34.909, 144.86, 2.859, 0.524)
pt3dadd(34.799, 144.811, 2.852, 0.562)
pt3dadd(34.69, 144.763, 2.845, 0.6)
pt3dadd(34.58, 144.715, 2.838, 0.638)
pt3dadd(34.471, 144.666, 2.831, 0.676)
pt3dadd(34.361, 144.618, 2.823, 0.714)
pt3dadd(34.252, 144.569, 2.816, 0.75)
pt3dadd(34.143, 144.521, 2.809, 0.788)
pt3dadd(34.033, 144.473, 2.802, 0.826)
pt3dadd(33.923, 144.425, 2.794, 0.862)
pt3dadd(33.809, 144.394, 2.781, 0.866)
pt3dadd(33.694, 144.361, 2.768, 0.87)
pt3dadd(33.579, 144.329, 2.756, 0.874)
pt3dadd(33.465, 144.296, 2.743, 0.878)
pt3dadd(33.35, 144.264, 2.73, 0.882)
pt3dadd(33.236, 144.232, 2.717, 0.888)
pt3dadd(33.121, 144.2, 2.705, 0.892)
pt3dadd(33.006, 144.168, 2.692, 0.896)
pt3dadd(32.892, 144.136, 2.679, 0.9)
pt3dadd(32.779, 144.103, 2.663, 0.9)
pt3dadd(32.68, 144.067, 2.615, 0.858)
pt3dadd(32.581, 144.031, 2.567, 0.816)
pt3dadd(32.482, 143.995, 2.519, 0.772)
pt3dadd(32.383, 143.96, 2.471, 0.73)
pt3dadd(32.284, 143.924, 2.423, 0.688)
pt3dadd(32.185, 143.888, 2.375, 0.646)
pt3dadd(32.086, 143.852, 2.326, 0.604)
pt3dadd(31.987, 143.816, 2.279, 0.562)
pt3dadd(31.888, 143.782, 2.23, 0.52)
pt3dadd(31.792, 143.736, 2.187, 0.488)
pt3dadd(31.703, 143.663, 2.157, 0.484)
pt3dadd(31.614, 143.591, 2.127, 0.482)
pt3dadd(31.525, 143.519, 2.097, 0.478)
pt3dadd(31.437, 143.447, 2.067, 0.474)
pt3dadd(31.348, 143.375, 2.037, 0.47)
pt3dadd(31.259, 143.303, 2.007, 0.466)
pt3dadd(31.17, 143.23, 1.977, 0.462)
pt3dadd(31.082, 143.158, 1.947, 0.458)
pt3dadd(30.993, 143.086, 1.916, 0.454)
pt3dadd(30.905, 143.01, 1.89, 0.46)
pt3dadd(30.821, 142.928, 1.872, 0.486)
pt3dadd(30.736, 142.846, 1.853, 0.51)
pt3dadd(30.651, 142.764, 1.835, 0.536)
pt3dadd(30.566, 142.682, 1.816, 0.562)
pt3dadd(30.482, 142.6, 1.798, 0.586)
pt3dadd(30.397, 142.518, 1.779, 0.612)
pt3dadd(30.312, 142.436, 1.761, 0.638)
pt3dadd(30.227, 142.354, 1.742, 0.662)
pt3dadd(30.143, 142.272, 1.724, 0.688)
pt3dadd(30.058, 142.189, 1.707, 0.71)
pt3dadd(29.974, 142.105, 1.694, 0.73)
pt3dadd(29.891, 142.02, 1.681, 0.75)
pt3dadd(29.807, 141.936, 1.668, 0.77)
pt3dadd(29.723, 141.852, 1.655, 0.792)
pt3dadd(29.639, 141.767, 1.642, 0.812)
pt3dadd(29.555, 141.683, 1.628, 0.832)
pt3dadd(29.472, 141.599, 1.615, 0.852)
pt3dadd(29.388, 141.514, 1.602, 0.872)
pt3dadd(29.304, 141.43, 1.589, 0.892)
pt3dadd(29.22, 141.344, 1.577, 0.904)
pt3dadd(29.136, 141.26, 1.568, 0.904)
pt3dadd(29.052, 141.175, 1.559, 0.904)
pt3dadd(28.968, 141.09, 1.549, 0.904)
pt3dadd(28.884, 141.005, 1.54, 0.904)
pt3dadd(28.8, 140.92, 1.531, 0.904)
pt3dadd(28.716, 140.834, 1.521, 0.904)
pt3dadd(28.632, 140.75, 1.512, 0.904)
pt3dadd(28.548, 140.665, 1.503, 0.904)
pt3dadd(28.464, 140.58, 1.493, 0.904)
pt3dadd(28.383, 140.497, 1.473, 0.912)
pt3dadd(28.307, 140.418, 1.431, 0.93)
pt3dadd(28.231, 140.34, 1.39, 0.95)
pt3dadd(28.155, 140.261, 1.349, 0.97)
pt3dadd(28.079, 140.182, 1.309, 0.988)
pt3dadd(28.003, 140.104, 1.267, 1.008)
pt3dadd(27.927, 140.024, 1.226, 1.028)
pt3dadd(27.852, 139.945, 1.185, 1.046)
pt3dadd(27.776, 139.867, 1.144, 1.066)
pt3dadd(27.7, 139.788, 1.103, 1.086)
pt3dadd(27.622, 139.706, 1.068, 1.08)
pt3dadd(27.543, 139.622, 1.042, 1.036)
pt3dadd(27.464, 139.538, 1.015, 0.994)
pt3dadd(27.385, 139.454, 0.989, 0.952)
pt3dadd(27.306, 139.369, 0.962, 0.91)
pt3dadd(27.227, 139.285, 0.935, 0.868)
pt3dadd(27.147, 139.201, 0.909, 0.826)
pt3dadd(27.068, 139.116, 0.882, 0.782)
pt3dadd(26.989, 139.032, 0.855, 0.74)
pt3dadd(26.91, 138.948, 0.829, 0.698)
pt3dadd(26.831, 138.862, 0.807, 0.66)
pt3dadd(26.751, 138.774, 0.792, 0.628)
pt3dadd(26.672, 138.685, 0.777, 0.596)
pt3dadd(26.593, 138.598, 0.762, 0.564)
pt3dadd(26.514, 138.509, 0.747, 0.532)
pt3dadd(26.434, 138.421, 0.732, 0.5)
pt3dadd(26.355, 138.332, 0.717, 0.468)
pt3dadd(26.276, 138.245, 0.702, 0.438)
pt3dadd(26.196, 138.156, 0.686, 0.406)
pt3dadd(26.117, 138.067, 0.671, 0.374)
pt3dadd(26.038, 137.978, 0.66, 0.35)
pt3dadd(25.96, 137.887, 0.652, 0.338)
pt3dadd(25.883, 137.796, 0.645, 0.324)
pt3dadd(25.805, 137.706, 0.637, 0.31)
pt3dadd(25.727, 137.615, 0.63, 0.298)
pt3dadd(25.649, 137.524, 0.622, 0.284)
pt3dadd(25.571, 137.432, 0.615, 0.272)
pt3dadd(25.494, 137.342, 0.607, 0.258)
pt3dadd(25.416, 137.251, 0.6, 0.246)
pt3dadd(25.338, 137.16, 0.592, 0.234)
pt3dadd(25.262, 137.068, 0.588, 0.226)
pt3dadd(25.188, 136.973, 0.588, 0.226)
pt3dadd(25.114, 136.879, 0.588, 0.226)
pt3dadd(25.039, 136.784, 0.588, 0.226)
pt3dadd(24.965, 136.691, 0.588, 0.226)
pt3dadd(24.891, 136.596, 0.588, 0.226)
pt3dadd(24.817, 136.501, 0.588, 0.226)
pt3dadd(24.743, 136.408, 0.588, 0.226)
pt3dadd(24.669, 136.313, 0.588, 0.226)
pt3dadd(24.595, 136.218, 0.588, 0.226)
pt3dadd(24.529, 136.118, 0.588, 0.232)
pt3dadd(24.474, 136.012, 0.588, 0.244)
pt3dadd(24.419, 135.906, 0.588, 0.256)
pt3dadd(24.363, 135.799, 0.588, 0.27)
pt3dadd(24.308, 135.692, 0.588, 0.282)
pt3dadd(24.252, 135.586, 0.588, 0.294)
pt3dadd(24.197, 135.48, 0.588, 0.308)
pt3dadd(24.142, 135.373, 0.588, 0.32)
pt3dadd(24.086, 135.266, 0.588, 0.332)
pt3dadd(24.031, 135.161, 0.588, 0.344)
pt3dadd(23.985, 135.05, 0.588, 0.352)
pt3dadd(23.947, 134.936, 0.588, 0.354)
pt3dadd(23.909, 134.822, 0.588, 0.356)
pt3dadd(23.871, 134.708, 0.588, 0.358)
pt3dadd(23.833, 134.594, 0.588, 0.36)
pt3dadd(23.795, 134.48, 0.588, 0.362)
pt3dadd(23.757, 134.366, 0.588, 0.364)
pt3dadd(23.719, 134.254, 0.588, 0.366)
pt3dadd(23.681, 134.14, 0.588, 0.368)
pt3dadd(23.643, 134.026, 0.588, 0.372)
pt3dadd(23.61, 133.91, 0.588, 0.368)
pt3dadd(23.58, 133.794, 0.588, 0.362)
pt3dadd(23.55, 133.678, 0.588, 0.356)
pt3dadd(23.521, 133.561, 0.588, 0.348)
pt3dadd(23.492, 133.445, 0.588, 0.342)
pt3dadd(23.462, 133.328, 0.588, 0.336)
pt3dadd(23.433, 133.212, 0.588, 0.328)
pt3dadd(23.403, 133.096, 0.588, 0.322)
pt3dadd(23.373, 132.979, 0.588, 0.316)
pt3dadd(23.344, 132.864, 0.588, 0.31)
pt3dadd(23.307, 132.75, 0.588, 0.328)
pt3dadd(23.264, 132.637, 0.588, 0.364)
pt3dadd(23.221, 132.526, 0.588, 0.4)
pt3dadd(23.178, 132.413, 0.588, 0.436)
pt3dadd(23.136, 132.301, 0.588, 0.472)
pt3dadd(23.093, 132.188, 0.588, 0.508)
pt3dadd(23.05, 132.077, 0.588, 0.544)
pt3dadd(23.008, 131.965, 0.588, 0.58)
pt3dadd(22.965, 131.852, 0.588, 0.616)
pt3dadd(22.922, 131.741, 0.588, 0.652)
pt3dadd(22.89, 131.626, 0.588, 0.646)
pt3dadd(22.865, 131.508, 0.588, 0.61)
pt3dadd(22.84, 131.39, 0.588, 0.574)
pt3dadd(22.815, 131.273, 0.588, 0.538)
pt3dadd(22.79, 131.155, 0.588, 0.502)
pt3dadd(22.764, 131.039, 0.588, 0.466)
pt3dadd(22.739, 130.921, 0.588, 0.43)
pt3dadd(22.714, 130.804, 0.588, 0.396)
pt3dadd(22.689, 130.686, 0.588, 0.36)
pt3dadd(22.664, 130.568, 0.588, 0.324)
pt3dadd(22.651, 130.45, 0.588, 0.314)
pt3dadd(22.645, 130.331, 0.588, 0.32)
pt3dadd(22.639, 130.211, 0.588, 0.328)
pt3dadd(22.633, 130.091, 0.588, 0.334)
pt3dadd(22.627, 129.971, 0.588, 0.34)
pt3dadd(22.622, 129.851, 0.588, 0.348)
pt3dadd(22.616, 129.731, 0.588, 0.354)
pt3dadd(22.61, 129.611, 0.588, 0.362)
pt3dadd(22.604, 129.491, 0.588, 0.368)
pt3dadd(22.598, 129.371, 0.588, 0.374)
pt3dadd(22.604, 129.252, 0.588, 0.374)
pt3dadd(22.615, 129.132, 0.588, 0.368)
pt3dadd(22.627, 129.013, 0.588, 0.364)
pt3dadd(22.639, 128.893, 0.588, 0.358)
pt3dadd(22.65, 128.774, 0.588, 0.352)
pt3dadd(22.662, 128.654, 0.588, 0.348)
pt3dadd(22.673, 128.536, 0.588, 0.342)
}
}
proc shape3d_56() {
apic[8] { pt3dadd(22.685, 128.416, 0.588, 0.336)
pt3dadd(22.697, 128.297, 0.588, 0.332)
pt3dadd(22.708, 128.177, 0.588, 0.326)
pt3dadd(22.741, 128.063, 0.588, 0.334)
pt3dadd(22.783, 127.95, 0.588, 0.348)
pt3dadd(22.825, 127.837, 0.588, 0.362)
pt3dadd(22.867, 127.726, 0.588, 0.376)
pt3dadd(22.91, 127.613, 0.588, 0.388)
pt3dadd(22.952, 127.501, 0.588, 0.402)
pt3dadd(22.994, 127.388, 0.588, 0.416)
pt3dadd(23.037, 127.276, 0.588, 0.43)
pt3dadd(23.079, 127.164, 0.588, 0.444)
pt3dadd(23.121, 127.051, 0.588, 0.458)
pt3dadd(23.18, 126.947, 0.588, 0.498)
pt3dadd(23.242, 126.845, 0.588, 0.542)
pt3dadd(23.303, 126.742, 0.588, 0.586)
pt3dadd(23.365, 126.638, 0.588, 0.63)
pt3dadd(23.427, 126.535, 0.588, 0.676)
pt3dadd(23.488, 126.433, 0.588, 0.72)
pt3dadd(23.55, 126.33, 0.588, 0.764)
pt3dadd(23.612, 126.227, 0.588, 0.808)
pt3dadd(23.674, 126.124, 0.588, 0.854)
pt3dadd(23.735, 126.02, 0.588, 0.898)
pt3dadd(23.777, 125.909, 0.589, 0.88)
pt3dadd(23.816, 125.795, 0.589, 0.852)
pt3dadd(23.855, 125.682, 0.59, 0.822)
pt3dadd(23.894, 125.568, 0.591, 0.794)
pt3dadd(23.932, 125.455, 0.592, 0.766)
pt3dadd(23.971, 125.341, 0.592, 0.738)
pt3dadd(24.01, 125.227, 0.593, 0.71)
pt3dadd(24.048, 125.114, 0.594, 0.68)
pt3dadd(24.087, 125, 0.595, 0.652)
pt3dadd(24.126, 124.886, 0.596, 0.624)
pt3dadd(24.165, 124.774, 0.596, 0.596)
pt3dadd(24.203, 124.66, 0.597, 0.568)
pt3dadd(24.242, 124.546, 0.598, 0.538)
pt3dadd(24.281, 124.433, 0.598, 0.51)
pt3dadd(24.319, 124.319, 0.599, 0.482)
pt3dadd(24.358, 124.205, 0.6, 0.454)
pt3dadd(24.438, 124.116, 0.6, 0.452)
pt3dadd(24.519, 124.028, 0.6, 0.452)
pt3dadd(24.604, 123.943, 0.596, 0.452)
pt3dadd(24.688, 123.858, 0.59, 0.452)
pt3dadd(24.712, 123.761, 0.547, 0.452)
pt3dadd(24.718, 123.659, 0.495, 0.452)
pt3dadd(24.72, 123.548, 0.455, 0.452)
pt3dadd(24.72, 123.436, 0.422, 0.452)
pt3dadd(24.727, 123.32, 0.4, 0.452)
pt3dadd(24.749, 123.203, 0.4, 0.452)
pt3dadd(24.771, 123.085, 0.4, 0.452)
pt3dadd(24.792, 122.966, 0.4, 0.452)
pt3dadd(24.817, 122.851, 0.4, 0.452)
pt3dadd(24.916, 122.783, 0.4, 0.452)
pt3dadd(25.015, 122.716, 0.4, 0.452)
pt3dadd(25.069, 122.611, 0.4, 0.452)
pt3dadd(25.09, 122.492, 0.4, 0.452)
pt3dadd(25.11, 122.375, 0.4, 0.452)
pt3dadd(25.149, 122.262, 0.4, 0.452)
pt3dadd(25.203, 122.154, 0.4, 0.452)
pt3dadd(25.263, 122.052, 0.402, 0.452)
pt3dadd(25.342, 121.962, 0.407, 0.452)
pt3dadd(25.407, 121.876, 0.431, 0.452)
pt3dadd(25.436, 121.805, 0.508, 0.452)
pt3dadd(25.487, 121.739, 0.573, 0.452)
pt3dadd(25.571, 121.676, 0.62, 0.452)
pt3dadd(25.629, 121.586, 0.665, 0.452)
pt3dadd(25.687, 121.496, 0.711, 0.452)
pt3dadd(25.744, 121.406, 0.756, 0.452)
pt3dadd(25.802, 121.316, 0.802, 0.452)
pt3dadd(25.852, 121.222, 0.846, 0.452)
pt3dadd(25.903, 121.127, 0.891, 0.452)
pt3dadd(25.953, 121.032, 0.936, 0.452)
pt3dadd(26.004, 120.937, 0.981, 0.452)
pt3dadd(26.073, 120.842, 0.991, 0.452)
pt3dadd(26.146, 120.748, 0.993, 0.452)
pt3dadd(26.22, 120.653, 0.995, 0.452)
pt3dadd(26.293, 120.558, 0.998, 0.452)
pt3dadd(26.366, 120.463, 1, 0.452)
pt3dadd(26.447, 120.374, 1, 0.452)
pt3dadd(26.528, 120.286, 1, 0.452)
pt3dadd(26.605, 120.203, 1.029, 0.452)
pt3dadd(26.68, 120.12, 1.067, 0.452)
pt3dadd(26.723, 120.02, 1.108, 0.452)
pt3dadd(26.761, 119.93, 1.157, 0.452)
pt3dadd(26.766, 119.909, 1.256, 0.452)
pt3dadd(26.771, 119.888, 1.354, 0.452)
pt3dadd(26.808, 119.831, 1.43, 0.452)
pt3dadd(26.861, 119.755, 1.493, 0.452)
pt3dadd(26.88, 119.642, 1.486, 0.452)
pt3dadd(26.886, 119.531, 1.452, 0.452)
pt3dadd(26.92, 119.427, 1.411, 0.452)
pt3dadd(27.003, 119.344, 1.406, 0.452)
pt3dadd(27.061, 119.245, 1.432, 0.452)
pt3dadd(27.108, 119.141, 1.462, 0.452)
pt3dadd(27.156, 119.037, 1.492, 0.452)
pt3dadd(27.203, 118.933, 1.522, 0.452)
pt3dadd(27.25, 118.841, 1.564, 0.452)
pt3dadd(27.293, 118.792, 1.648, 0.452)
pt3dadd(27.336, 118.725, 1.718, 0.452)
pt3dadd(27.38, 118.63, 1.767, 0.452)
pt3dadd(27.42, 118.524, 1.794, 0.452)
pt3dadd(27.456, 118.41, 1.804, 0.452)
pt3dadd(27.48, 118.297, 1.822, 0.452)
pt3dadd(27.48, 118.183, 1.855, 0.452)
pt3dadd(27.48, 118.07, 1.888, 0.452)
pt3dadd(27.517, 117.956, 1.892, 0.452)
pt3dadd(27.555, 117.843, 1.895, 0.452)
pt3dadd(27.593, 117.729, 1.897, 0.452)
pt3dadd(27.636, 117.618, 1.9, 0.452)
pt3dadd(27.723, 117.537, 1.9, 0.452)
pt3dadd(27.812, 117.455, 1.9, 0.452)
pt3dadd(27.873, 117.355, 1.9, 0.452)
pt3dadd(27.895, 117.237, 1.9, 0.452)
pt3dadd(27.917, 117.119, 1.9, 0.452)
pt3dadd(27.939, 117.001, 1.9, 0.452)
pt3dadd(27.962, 116.883, 1.9, 0.452)
pt3dadd(27.984, 116.766, 1.9, 0.452)
pt3dadd(28.011, 116.65, 1.905, 0.452)
pt3dadd(28.053, 116.539, 1.923, 0.452)
pt3dadd(28.094, 116.429, 1.942, 0.452)
pt3dadd(28.136, 116.318, 1.96, 0.452)
pt3dadd(28.177, 116.208, 1.979, 0.452)
pt3dadd(28.2, 116.094, 1.998, 0.452)
pt3dadd(28.2, 115.977, 2.019, 0.452)
pt3dadd(28.2, 115.86, 2.039, 0.452)
pt3dadd(28.2, 115.742, 2.06, 0.452)
pt3dadd(28.2, 115.625, 2.081, 0.452)
pt3dadd(28.2, 115.507, 2.102, 0.452)
pt3dadd(28.208, 115.39, 2.12, 0.452)
pt3dadd(28.222, 115.272, 2.136, 0.452)
pt3dadd(28.237, 115.155, 2.152, 0.452)
pt3dadd(28.251, 115.037, 2.168, 0.452)
pt3dadd(28.265, 114.92, 2.184, 0.452)
pt3dadd(28.28, 114.802, 2.2, 0.452)
pt3dadd(28.307, 114.685, 2.2, 0.452)
pt3dadd(28.335, 114.568, 2.2, 0.452)
pt3dadd(28.362, 114.452, 2.2, 0.452)
pt3dadd(28.389, 114.335, 2.2, 0.452)
pt3dadd(28.417, 114.218, 2.2, 0.452)
pt3dadd(28.442, 114.101, 2.2, 0.452)
pt3dadd(28.457, 113.982, 2.2, 0.452)
pt3dadd(28.472, 113.863, 2.2, 0.452)
pt3dadd(28.487, 113.744, 2.2, 0.452)
pt3dadd(28.502, 113.625, 2.2, 0.452)
pt3dadd(28.517, 113.505, 2.2, 0.452)
pt3dadd(28.532, 113.386, 2.2, 0.452)
pt3dadd(28.561, 113.271, 2.187, 0.452)
pt3dadd(28.593, 113.157, 2.173, 0.452)
pt3dadd(28.624, 113.042, 2.159, 0.452)
pt3dadd(28.656, 112.928, 2.144, 0.452)
pt3dadd(28.68, 112.813, 2.14, 0.452)
pt3dadd(28.68, 112.698, 2.167, 0.452)
pt3dadd(28.68, 112.582, 2.195, 0.452)
pt3dadd(28.68, 112.467, 2.222, 0.452)
pt3dadd(28.68, 112.352, 2.25, 0.452)
pt3dadd(28.68, 112.236, 2.277, 0.452)
pt3dadd(28.689, 112.12, 2.279, 0.452)
pt3dadd(28.704, 112.002, 2.263, 0.452)
pt3dadd(28.719, 111.885, 2.246, 0.452)
pt3dadd(28.734, 111.768, 2.229, 0.452)
pt3dadd(28.749, 111.65, 2.213, 0.452)
pt3dadd(28.761, 111.532, 2.2, 0.452)
pt3dadd(28.767, 111.412, 2.2, 0.452)
pt3dadd(28.773, 111.292, 2.2, 0.452)
pt3dadd(28.779, 111.173, 2.2, 0.452)
pt3dadd(28.785, 111.053, 2.2, 0.452)
pt3dadd(28.791, 110.933, 2.2, 0.452)
pt3dadd(28.797, 110.813, 2.2, 0.452)
pt3dadd(28.777, 110.697, 2.2, 0.452)
pt3dadd(28.735, 110.585, 2.2, 0.452)
pt3dadd(28.694, 110.472, 2.2, 0.452)
pt3dadd(28.652, 110.36, 2.2, 0.452)
pt3dadd(28.61, 110.247, 2.2, 0.452)
pt3dadd(28.571, 110.134, 2.2, 0.452)
pt3dadd(28.551, 110.016, 2.2, 0.452)
pt3dadd(28.53, 109.897, 2.2, 0.452)
pt3dadd(28.502, 109.781, 2.198, 0.452)
pt3dadd(28.468, 109.666, 2.193, 0.452)
pt3dadd(28.436, 109.559, 2.175, 0.452)
pt3dadd(28.415, 109.482, 2.099, 0.452)
pt3dadd(28.383, 109.4, 2.038, 0.452)
pt3dadd(28.32, 109.302, 2.015, 0.452)
pt3dadd(28.257, 109.205, 1.99, 0.452)
pt3dadd(28.193, 109.115, 1.957, 0.452)
pt3dadd(28.134, 109.071, 1.878, 0.452)
pt3dadd(28.085, 109.013, 1.805, 0.452)
pt3dadd(28.057, 108.92, 1.746, 0.452)
pt3dadd(28.017, 108.822, 1.709, 0.452)
pt3dadd(27.961, 108.716, 1.704, 0.452)
pt3dadd(27.911, 108.608, 1.7, 0.452)
pt3dadd(27.878, 108.492, 1.7, 0.452)
pt3dadd(27.845, 108.377, 1.7, 0.452)
pt3dadd(27.852, 108.261, 1.68, 0.452)
pt3dadd(27.866, 108.145, 1.657, 0.452)
pt3dadd(27.88, 108.03, 1.633, 0.452)
pt3dadd(27.898, 107.916, 1.611, 0.452)
pt3dadd(27.989, 107.838, 1.605, 0.452)
pt3dadd(28.08, 107.76, 1.6, 0.452)
}
apic[9] {pt3dclear()
pt3dadd(77.082, 161.245, 5.396, 1.666)
pt3dadd(77.138, 161.153, 5.345, 1.658)
}
}
proc shape3d_57() {
apic[9] { pt3dadd(77.135, 161.21, 5.319, 1.612)
pt3dadd(77.131, 161.269, 5.294, 1.568)
pt3dadd(77.128, 161.328, 5.268, 1.522)
pt3dadd(77.125, 161.386, 5.243, 1.476)
pt3dadd(77.122, 161.444, 5.217, 1.43)
pt3dadd(77.119, 161.503, 5.192, 1.384)
pt3dadd(77.115, 161.561, 5.166, 1.34)
pt3dadd(77.112, 161.62, 5.141, 1.294)
pt3dadd(77.109, 161.678, 5.115, 1.248)
pt3dadd(77.106, 161.737, 5.09, 1.202)
pt3dadd(77.103, 161.795, 5.065, 1.158)
pt3dadd(77.072, 161.808, 5.018, 1.13)
pt3dadd(77.001, 161.75, 4.94, 1.13)
pt3dadd(76.93, 161.694, 4.862, 1.13)
pt3dadd(76.859, 161.638, 4.783, 1.13)
pt3dadd(76.788, 161.581, 4.705, 1.13)
pt3dadd(76.728, 161.533, 4.618, 1.13)
pt3dadd(76.697, 161.503, 4.51, 1.13)
pt3dadd(76.665, 161.473, 4.402, 1.13)
pt3dadd(76.633, 161.443, 4.294, 1.13)
pt3dadd(76.601, 161.414, 4.186, 1.13)
pt3dadd(76.603, 161.376, 4.065, 1.13)
pt3dadd(76.611, 161.338, 3.942, 1.13)
pt3dadd(76.598, 161.314, 3.829, 1.13)
pt3dadd(76.571, 161.299, 3.724, 1.13)
pt3dadd(76.542, 161.269, 3.616, 1.13)
pt3dadd(76.512, 161.233, 3.505, 1.13)
pt3dadd(76.444, 161.212, 3.443, 1.13)
pt3dadd(76.364, 161.195, 3.396, 1.13)
pt3dadd(76.303, 161.149, 3.313, 1.13)
pt3dadd(76.267, 161.104, 3.21, 1.13)
pt3dadd(76.272, 161.086, 3.093, 1.13)
pt3dadd(76.262, 161.066, 2.981, 1.13)
pt3dadd(76.207, 161.038, 2.89, 1.13)
pt3dadd(76.165, 161.035, 2.807, 1.13)
pt3dadd(76.145, 161.075, 2.739, 1.13)
pt3dadd(76.097, 161.095, 2.691, 1.13)
pt3dadd(76.026, 161.102, 2.66, 1.13)
pt3dadd(75.971, 161.086, 2.594, 1.13)
pt3dadd(76.002, 161.029, 2.568, 1.13)
pt3dadd(76.033, 160.973, 2.542, 1.13)
pt3dadd(75.997, 160.927, 2.434, 1.13)
pt3dadd(75.961, 160.882, 2.326, 1.13)
pt3dadd(75.92, 160.836, 2.223, 1.13)
pt3dadd(75.833, 160.78, 2.181, 1.13)
pt3dadd(75.745, 160.723, 2.138, 1.13)
pt3dadd(75.663, 160.667, 2.081, 1.13)
pt3dadd(75.579, 160.622, 2.034, 1.13)
pt3dadd(75.493, 160.582, 1.994, 1.13)
pt3dadd(75.419, 160.564, 1.946, 1.13)
pt3dadd(75.368, 160.582, 1.882, 1.13)
pt3dadd(75.36, 160.609, 1.803, 1.13)
pt3dadd(75.385, 160.644, 1.712, 1.13)
pt3dadd(75.385, 160.661, 1.616, 1.13)
pt3dadd(75.363, 160.664, 1.516, 1.13)
pt3dadd(75.309, 160.674, 1.456, 1.13)
pt3dadd(75.244, 160.685, 1.409, 1.13)
pt3dadd(75.179, 160.696, 1.362, 1.13)
pt3dadd(75.112, 160.706, 1.327, 1.13)
pt3dadd(75.044, 160.716, 1.301, 1.13)
pt3dadd(74.969, 160.714, 1.275, 1.13)
pt3dadd(74.894, 160.7, 1.228, 1.13)
pt3dadd(74.825, 160.694, 1.167, 1.13)
pt3dadd(74.756, 160.688, 1.105, 1.13)
pt3dadd(74.686, 160.682, 1.044, 1.13)
pt3dadd(74.658, 160.648, 0.936, 1.13)
pt3dadd(74.636, 160.612, 0.822, 1.13)
pt3dadd(74.619, 160.558, 0.705, 1.13)
pt3dadd(74.604, 160.501, 0.587, 1.13)
pt3dadd(74.57, 160.445, 0.479, 1.13)
pt3dadd(74.522, 160.388, 0.378, 1.13)
pt3dadd(74.474, 160.331, 0.277, 1.13)
pt3dadd(74.425, 160.274, 0.177, 1.13)
pt3dadd(74.339, 160.218, 0.129, 1.13)
pt3dadd(74.253, 160.162, 0.081, 1.13)
pt3dadd(74.179, 160.116, 0.013, 1.13)
pt3dadd(74.116, 160.08, -0.073, 1.13)
pt3dadd(74.054, 160.043, -0.159, 1.13)
pt3dadd(74.031, 160.078, -0.229, 1.13)
pt3dadd(74.01, 160.105, -0.302, 1.13)
pt3dadd(73.974, 160.054, -0.411, 1.13)
pt3dadd(73.938, 160.002, -0.52, 1.13)
pt3dadd(73.909, 159.955, -0.632, 1.13)
pt3dadd(73.895, 159.917, -0.749, 1.13)
pt3dadd(73.88, 159.899, -0.853, 1.13)
pt3dadd(73.862, 159.94, -0.92, 1.13)
pt3dadd(73.844, 159.982, -0.987, 1.13)
pt3dadd(73.851, 160.039, -1.032, 1.13)
pt3dadd(73.866, 160.1, -1.072, 1.13)
pt3dadd(73.887, 160.147, -1.134, 1.13)
pt3dadd(73.918, 160.176, -1.231, 1.13)
pt3dadd(73.949, 160.148, -1.353, 1.13)
pt3dadd(73.98, 160.103, -1.479, 1.13)
pt3dadd(74.006, 160.046, -1.604, 1.13)
pt3dadd(74.007, 159.99, -1.725, 1.13)
pt3dadd(73.954, 159.946, -1.815, 1.13)
pt3dadd(73.915, 159.95, -1.905, 1.13)
pt3dadd(73.894, 159.966, -1.99, 1.13)
pt3dadd(73.925, 159.91, -2.016, 1.13)
pt3dadd(73.956, 159.959, -2.089, 1.13)
pt3dadd(73.987, 160.01, -2.156, 1.13)
pt3dadd(74.018, 160.073, -2.182, 1.13)
pt3dadd(74.049, 160.016, -2.208, 1.13)
pt3dadd(74.08, 159.96, -2.233, 1.13)
pt3dadd(74.066, 159.836, -2.333, 0.536)
pt3dadd(74.049, 159.727, -2.436, 0.614)
pt3dadd(74.019, 159.67, -2.548, 0.672)
pt3dadd(73.989, 159.613, -2.659, 0.73)
pt3dadd(73.906, 159.557, -2.718, 0.804)
pt3dadd(73.824, 159.5, -2.777, 0.878)
pt3dadd(73.738, 159.444, -2.822, 0.954)
pt3dadd(73.65, 159.388, -2.86, 1.028)
pt3dadd(73.562, 159.33, -2.898, 1.102)
pt3dadd(73.48, 159.274, -2.959, 1.184)
pt3dadd(73.397, 159.217, -3.014, 1.236)
pt3dadd(73.31, 159.161, -3.058, 1.248)
pt3dadd(73.223, 159.104, -3.102, 1.26)
pt3dadd(73.136, 159.048, -3.147, 1.274)
pt3dadd(73.049, 158.99, -3.191, 1.286)
pt3dadd(72.962, 158.934, -3.235, 1.298)
pt3dadd(72.874, 158.878, -3.272, 1.312)
pt3dadd(72.785, 158.821, -3.3, 1.326)
pt3dadd(72.696, 158.765, -3.327, 1.342)
pt3dadd(72.727, 158.708, -3.353, 1.342)
pt3dadd(72.638, 158.651, -3.38, 1.356)
pt3dadd(72.549, 158.594, -3.408, 1.37)
pt3dadd(72.46, 158.538, -3.435, 1.384)
pt3dadd(72.371, 158.482, -3.463, 1.4)
pt3dadd(72.284, 158.425, -3.501, 1.422)
pt3dadd(72.198, 158.369, -3.55, 1.452)
pt3dadd(72.112, 158.311, -3.599, 1.482)
pt3dadd(72.026, 158.255, -3.648, 1.514)
pt3dadd(71.94, 158.198, -3.696, 1.544)
pt3dadd(71.854, 158.142, -3.745, 1.574)
pt3dadd(71.794, 158.086, -3.83, 1.642)
pt3dadd(71.743, 158.029, -3.929, 1.724)
pt3dadd(71.676, 157.975, -4.008, 1.786)
pt3dadd(71.597, 157.925, -4.075, 1.832)
pt3dadd(71.517, 157.889, -4.127, 1.858)
pt3dadd(71.436, 157.874, -4.157, 1.858)
pt3dadd(71.356, 157.862, -4.188, 1.852)
pt3dadd(71.285, 157.868, -4.219, 1.816)
pt3dadd(71.219, 157.877, -4.254, 1.776)
pt3dadd(71.229, 157.904, -4.349, 1.658)
pt3dadd(71.175, 157.876, -4.428, 1.546)
pt3dadd(71.102, 157.832, -4.503, 1.436)
pt3dadd(71.024, 157.813, -4.542, 1.326)
pt3dadd(70.944, 157.804, -4.568, 1.218)
pt3dadd(70.883, 157.808, -4.613, 1.1)
pt3dadd(70.846, 157.836, -4.683, 0.972)
pt3dadd(70.836, 157.838, -4.783, 0.896)
pt3dadd(70.841, 157.828, -4.898, 0.844)
pt3dadd(70.794, 157.813, -4.98, 0.834)
pt3dadd(70.722, 157.796, -5.047, 0.842)
pt3dadd(70.651, 157.781, -5.113, 0.852)
pt3dadd(70.68, 157.68, -5.178, 0.854)
}
apic[10] {pt3dclear()
pt3dadd(70.68, 157.68, -5.178, 0.854)
pt3dadd(70.58, 157.73, -5.143, 0.902)
pt3dadd(70.477, 157.781, -5.131, 0.95)
pt3dadd(70.36, 157.793, -5.144, 0.93)
pt3dadd(70.247, 157.805, -5.148, 0.904)
pt3dadd(70.189, 157.848, -5.068, 0.904)
pt3dadd(70.114, 157.885, -5.014, 0.91)
pt3dadd(69.996, 157.902, -5.024, 0.932)
pt3dadd(69.878, 157.921, -5.034, 0.956)
pt3dadd(69.796, 157.996, -5.071, 1.026)
pt3dadd(69.709, 158.068, -5.1, 1.086)
pt3dadd(69.606, 158.13, -5.1, 1.114)
pt3dadd(69.504, 158.192, -5.1, 1.142)
pt3dadd(69.401, 158.255, -5.1, 1.17)
pt3dadd(69.288, 158.28, -5.1, 1.21)
pt3dadd(69.168, 158.28, -5.1, 1.26)
pt3dadd(69.048, 158.28, -5.1, 1.31)
pt3dadd(68.936, 158.312, -5.1, 1.362)
pt3dadd(68.829, 158.365, -5.1, 1.412)
pt3dadd(68.721, 158.419, -5.1, 1.462)
pt3dadd(68.642, 158.503, -5.1, 1.524)
pt3dadd(68.582, 158.606, -5.1, 1.592)
pt3dadd(68.507, 158.699, -5.1, 1.648)
pt3dadd(68.432, 158.789, -5.112, 1.646)
pt3dadd(68.364, 158.886, -5.129, 1.628)
pt3dadd(68.297, 158.983, -5.147, 1.612)
pt3dadd(68.229, 159.08, -5.164, 1.596)
pt3dadd(68.158, 159.173, -5.183, 1.576)
pt3dadd(68.07, 159.248, -5.211, 1.54)
pt3dadd(67.983, 159.323, -5.24, 1.506)
pt3dadd(67.896, 159.397, -5.269, 1.47)
pt3dadd(67.809, 159.473, -5.297, 1.434)
pt3dadd(67.703, 159.528, -5.3, 1.41)
pt3dadd(67.596, 159.582, -5.3, 1.386)
pt3dadd(67.489, 159.636, -5.3, 1.362)
pt3dadd(67.381, 159.689, -5.3, 1.338)
pt3dadd(67.274, 159.743, -5.3, 1.314)
pt3dadd(67.158, 159.769, -5.304, 1.294)
pt3dadd(67.039, 159.782, -5.309, 1.278)
pt3dadd(66.92, 159.796, -5.315, 1.262)
pt3dadd(66.801, 159.809, -5.32, 1.244)
pt3dadd(66.682, 159.822, -5.326, 1.228)
pt3dadd(66.563, 159.835, -5.331, 1.212)
pt3dadd(66.445, 159.854, -5.341, 1.206)
}
}
proc shape3d_58() {
apic[10] { pt3dadd(66.328, 159.876, -5.353, 1.206)
pt3dadd(66.211, 159.898, -5.365, 1.206)
pt3dadd(66.094, 159.92, -5.378, 1.206)
pt3dadd(65.977, 159.942, -5.39, 1.206)
pt3dadd(65.86, 159.96, -5.404, 1.208)
pt3dadd(65.743, 159.96, -5.427, 1.23)
pt3dadd(65.626, 159.96, -5.45, 1.252)
pt3dadd(65.51, 159.96, -5.473, 1.274)
pt3dadd(65.393, 159.96, -5.495, 1.296)
pt3dadd(65.276, 159.96, -5.518, 1.316)
pt3dadd(65.173, 159.967, -5.559, 1.376)
pt3dadd(65.097, 159.988, -5.635, 1.506)
pt3dadd(65.018, 160.019, -5.704, 1.624)
pt3dadd(64.936, 160.064, -5.767, 1.722)
pt3dadd(64.829, 160.08, -5.791, 1.758)
pt3dadd(64.709, 160.08, -5.795, 1.758)
pt3dadd(64.59, 160.08, -5.799, 1.758)
pt3dadd(64.47, 160.08, -5.803, 1.706)
pt3dadd(64.35, 160.08, -5.807, 1.636)
pt3dadd(64.23, 160.08, -5.811, 1.566)
pt3dadd(64.117, 160.08, -5.842, 1.444)
pt3dadd(64.003, 160.087, -5.869, 1.344)
pt3dadd(63.885, 160.108, -5.877, 1.31)
pt3dadd(63.767, 160.129, -5.885, 1.274)
pt3dadd(63.65, 160.151, -5.893, 1.238)
pt3dadd(63.532, 160.171, -5.901, 1.202)
pt3dadd(63.414, 160.193, -5.908, 1.168)
pt3dadd(63.31, 160.218, -5.947, 1.136)
pt3dadd(63.214, 160.244, -6.002, 1.108)
pt3dadd(63.118, 160.272, -6.058, 1.08)
pt3dadd(63.022, 160.298, -6.113, 1.052)
pt3dadd(62.921, 160.325, -6.161, 1.026)
pt3dadd(62.806, 160.349, -6.182, 1.006)
pt3dadd(62.692, 160.373, -6.204, 0.986)
pt3dadd(62.577, 160.396, -6.226, 0.966)
pt3dadd(62.462, 160.42, -6.247, 0.946)
pt3dadd(62.347, 160.44, -6.267, 0.93)
pt3dadd(62.227, 160.44, -6.272, 0.934)
pt3dadd(62.107, 160.44, -6.277, 0.936)
pt3dadd(61.987, 160.44, -6.282, 0.94)
pt3dadd(61.867, 160.44, -6.287, 0.944)
pt3dadd(61.748, 160.44, -6.292, 0.948)
pt3dadd(61.628, 160.44, -6.297, 0.952)
pt3dadd(61.509, 160.448, -6.3, 0.96)
pt3dadd(61.39, 160.469, -6.3, 0.972)
pt3dadd(61.272, 160.488, -6.3, 0.984)
pt3dadd(61.153, 160.507, -6.3, 0.996)
pt3dadd(61.035, 160.528, -6.3, 1.01)
pt3dadd(60.917, 160.547, -6.3, 1.022)
pt3dadd(60.804, 160.566, -6.318, 1.036)
pt3dadd(60.701, 160.583, -6.367, 1.052)
pt3dadd(60.599, 160.6, -6.417, 1.068)
pt3dadd(60.496, 160.618, -6.467, 1.084)
pt3dadd(60.393, 160.634, -6.517, 1.1)
pt3dadd(60.289, 160.663, -6.558, 1.108)
pt3dadd(60.183, 160.699, -6.595, 1.114)
pt3dadd(60.077, 160.734, -6.632, 1.12)
pt3dadd(59.971, 160.77, -6.668, 1.126)
pt3dadd(59.863, 160.8, -6.7, 1.132)
pt3dadd(59.743, 160.8, -6.7, 1.142)
pt3dadd(59.623, 160.8, -6.7, 1.154)
pt3dadd(59.503, 160.8, -6.7, 1.164)
pt3dadd(59.383, 160.8, -6.7, 1.174)
pt3dadd(59.263, 160.8, -6.7, 1.186)
pt3dadd(59.143, 160.8, -6.7, 1.196)
pt3dadd(59.023, 160.8, -6.7, 1.208)
pt3dadd(58.903, 160.8, -6.7, 1.226)
pt3dadd(58.783, 160.8, -6.7, 1.244)
pt3dadd(58.663, 160.8, -6.7, 1.262)
pt3dadd(58.543, 160.8, -6.7, 1.28)
pt3dadd(58.423, 160.8, -6.7, 1.298)
pt3dadd(58.303, 160.8, -6.7, 1.316)
pt3dadd(58.183, 160.8, -6.7, 1.334)
pt3dadd(58.063, 160.8, -6.7, 1.356)
pt3dadd(57.943, 160.8, -6.7, 1.378)
pt3dadd(57.823, 160.8, -6.7, 1.398)
pt3dadd(57.703, 160.8, -6.7, 1.42)
pt3dadd(57.583, 160.8, -6.7, 1.442)
pt3dadd(57.463, 160.8, -6.7, 1.464)
pt3dadd(57.343, 160.8, -6.7, 1.482)
pt3dadd(57.223, 160.8, -6.7, 1.482)
pt3dadd(57.103, 160.8, -6.7, 1.482)
pt3dadd(56.983, 160.8, -6.7, 1.482)
pt3dadd(56.863, 160.8, -6.7, 1.482)
pt3dadd(56.743, 160.8, -6.7, 1.482)
pt3dadd(56.623, 160.8, -6.7, 1.482)
pt3dadd(56.503, 160.801, -6.7, 1.48)
pt3dadd(56.383, 160.807, -6.7, 1.474)
pt3dadd(56.264, 160.813, -6.7, 1.466)
pt3dadd(56.144, 160.819, -6.7, 1.458)
pt3dadd(56.024, 160.825, -6.7, 1.45)
pt3dadd(55.904, 160.831, -6.7, 1.442)
pt3dadd(55.784, 160.837, -6.7, 1.436)
pt3dadd(55.668, 160.86, -6.7, 1.426)
pt3dadd(55.557, 160.906, -6.7, 1.418)
pt3dadd(55.445, 160.95, -6.7, 1.408)
pt3dadd(55.334, 160.994, -6.7, 1.398)
pt3dadd(55.223, 161.039, -6.7, 1.39)
pt3dadd(55.112, 161.083, -6.704, 1.382)
pt3dadd(55.018, 161.131, -6.751, 1.406)
pt3dadd(54.923, 161.178, -6.798, 1.43)
pt3dadd(54.829, 161.226, -6.846, 1.454)
pt3dadd(54.734, 161.273, -6.893, 1.478)
pt3dadd(54.621, 161.297, -6.916, 1.494)
pt3dadd(54.505, 161.317, -6.935, 1.508)
pt3dadd(54.389, 161.338, -6.954, 1.522)
pt3dadd(54.273, 161.358, -6.973, 1.536)
pt3dadd(54.157, 161.378, -6.992, 1.55)
pt3dadd(54.043, 161.41, -7.003, 1.556)
pt3dadd(53.931, 161.452, -7.008, 1.556)
pt3dadd(53.835, 161.508, -7.025, 1.54)
pt3dadd(53.775, 161.598, -7.068, 1.482)
pt3dadd(53.69, 161.67, -7.092, 1.45)
pt3dadd(53.584, 161.726, -7.097, 1.438)
pt3dadd(53.473, 161.76, -7.1, 1.442)
pt3dadd(53.353, 161.76, -7.1, 1.466)
pt3dadd(53.233, 161.76, -7.1, 1.492)
pt3dadd(53.113, 161.762, -7.1, 1.522)
pt3dadd(52.993, 161.77, -7.1, 1.562)
pt3dadd(52.875, 161.785, -7.11, 1.58)
pt3dadd(52.76, 161.808, -7.129, 1.574)
pt3dadd(52.645, 161.831, -7.148, 1.57)
pt3dadd(52.529, 161.854, -7.167, 1.566)
pt3dadd(52.414, 161.878, -7.187, 1.56)
pt3dadd(52.298, 161.902, -7.2, 1.556)
pt3dadd(52.181, 161.929, -7.2, 1.552)
pt3dadd(52.064, 161.957, -7.2, 1.546)
pt3dadd(51.947, 161.984, -7.2, 1.542)
pt3dadd(51.831, 162.012, -7.2, 1.538)
pt3dadd(51.714, 162.038, -7.2, 1.534)
pt3dadd(51.6, 162.072, -7.21, 1.536)
pt3dadd(51.489, 162.11, -7.231, 1.548)
pt3dadd(51.378, 162.15, -7.252, 1.558)
pt3dadd(51.267, 162.188, -7.272, 1.568)
pt3dadd(51.157, 162.227, -7.293, 1.578)
pt3dadd(51.062, 162.283, -7.329, 1.598)
pt3dadd(50.975, 162.348, -7.372, 1.622)
pt3dadd(50.888, 162.412, -7.415, 1.646)
pt3dadd(50.801, 162.476, -7.458, 1.672)
pt3dadd(50.76, 162.506, -7.478, 1.682)
pt3dadd(50.745, 162.518, -7.494, 1.68)
pt3dadd(50.677, 162.57, -7.564, 1.674)
pt3dadd(50.609, 162.622, -7.634, 1.668)
pt3dadd(50.541, 162.674, -7.704, 1.662)
pt3dadd(50.471, 162.728, -7.771, 1.654)
pt3dadd(50.391, 162.803, -7.812, 1.63)
pt3dadd(50.31, 162.877, -7.852, 1.606)
pt3dadd(50.229, 162.952, -7.892, 1.582)
pt3dadd(50.148, 163.026, -7.933, 1.558)
pt3dadd(50.046, 163.066, -7.973, 1.534)
pt3dadd(49.943, 163.104, -8.013, 1.512)
pt3dadd(49.84, 163.144, -8.053, 1.49)
pt3dadd(49.738, 163.183, -8.094, 1.466)
pt3dadd(49.65, 163.212, -8.154, 1.456)
pt3dadd(49.574, 163.232, -8.229, 1.456)
pt3dadd(49.478, 163.27, -8.27, 1.448)
pt3dadd(49.371, 163.316, -8.292, 1.436)
pt3dadd(49.268, 163.366, -8.323, 1.404)
pt3dadd(49.168, 163.416, -8.359, 1.364)
pt3dadd(49.075, 163.487, -8.38, 1.294)
pt3dadd(48.985, 163.564, -8.398, 1.216)
pt3dadd(48.884, 163.627, -8.4, 1.182)
pt3dadd(48.782, 163.69, -8.4, 1.154)
pt3dadd(48.679, 163.752, -8.4, 1.126)
pt3dadd(48.572, 163.8, -8.401, 1.1)
pt3dadd(48.453, 163.8, -8.405, 1.084)
pt3dadd(48.333, 163.8, -8.409, 1.066)
pt3dadd(48.214, 163.8, -8.42, 1.044)
pt3dadd(48.096, 163.8, -8.433, 1.028)
pt3dadd(47.976, 163.8, -8.433, 1.022)
pt3dadd(47.856, 163.8, -8.433, 1.018)
pt3dadd(47.736, 163.8, -8.433, 1.014)
pt3dadd(47.616, 163.8, -8.433, 1.01)
pt3dadd(47.496, 163.8, -8.433, 1.006)
pt3dadd(47.382, 163.8, -8.405, 1.004)
pt3dadd(47.268, 163.8, -8.373, 1.004)
pt3dadd(47.155, 163.8, -8.341, 1.004)
pt3dadd(47.041, 163.8, -8.309, 1.004)
pt3dadd(46.927, 163.8, -8.277, 1.004)
pt3dadd(46.823, 163.8, -8.232, 1.008)
pt3dadd(46.735, 163.8, -8.164, 1.02)
pt3dadd(46.642, 163.808, -8.114, 1.03)
pt3dadd(46.529, 163.849, -8.125, 1.03)
pt3dadd(46.419, 163.889, -8.142, 1.018)
pt3dadd(46.319, 163.932, -8.184, 0.964)
pt3dadd(46.235, 163.978, -8.238, 0.91)
pt3dadd(46.184, 164.029, -8.318, 0.854)
pt3dadd(46.099, 164.069, -8.36, 0.818)
pt3dadd(45.983, 164.098, -8.369, 0.798)
pt3dadd(45.867, 164.126, -8.378, 0.776)
pt3dadd(45.751, 164.155, -8.387, 0.756)
pt3dadd(45.638, 164.16, -8.361, 0.772)
pt3dadd(45.524, 164.16, -8.328, 0.792)
pt3dadd(45.414, 164.184, -8.322, 0.818)
pt3dadd(45.308, 164.232, -8.344, 0.848)
pt3dadd(45.201, 164.28, -8.367, 0.878)
pt3dadd(45.124, 164.341, -8.424, 0.922)
pt3dadd(45.041, 164.388, -8.453, 0.956)
pt3dadd(44.939, 164.394, -8.401, 0.968)
pt3dadd(44.837, 164.4, -8.349, 0.978)
}
}
proc shape3d_59() {
apic[10] { pt3dadd(44.721, 164.416, -8.327, 0.98)
pt3dadd(44.605, 164.434, -8.307, 0.98)
pt3dadd(44.49, 164.458, -8.314, 0.974)
pt3dadd(44.377, 164.485, -8.338, 0.966)
pt3dadd(44.264, 164.514, -8.362, 0.956)
pt3dadd(44.161, 164.56, -8.395, 0.922)
pt3dadd(44.061, 164.61, -8.431, 0.882)
pt3dadd(43.989, 164.674, -8.464, 0.748)
pt3dadd(43.871, 164.693, -8.457, 0.732)
pt3dadd(43.752, 164.713, -8.45, 0.716)
pt3dadd(43.635, 164.734, -8.443, 0.7)
pt3dadd(43.517, 164.754, -8.436, 0.682)
pt3dadd(43.405, 164.784, -8.455, 0.682)
pt3dadd(43.296, 164.818, -8.486, 0.688)
pt3dadd(43.187, 164.852, -8.517, 0.692)
pt3dadd(43.079, 164.887, -8.548, 0.698)
pt3dadd(42.969, 164.921, -8.578, 0.704)
pt3dadd(42.851, 164.941, -8.575, 0.75)
pt3dadd(42.733, 164.963, -8.572, 0.796)
pt3dadd(42.615, 164.983, -8.569, 0.842)
pt3dadd(42.498, 165.007, -8.568, 0.89)
pt3dadd(42.384, 165.046, -8.576, 0.95)
pt3dadd(42.271, 165.083, -8.584, 1.01)
pt3dadd(42.157, 165.121, -8.592, 1.068)
pt3dadd(42.044, 165.158, -8.6, 1.128)
pt3dadd(41.931, 165.196, -8.613, 1.178)
pt3dadd(41.818, 165.233, -8.626, 1.228)
pt3dadd(41.705, 165.269, -8.639, 1.276)
pt3dadd(41.592, 165.306, -8.652, 1.326)
pt3dadd(41.478, 165.343, -8.665, 1.376)
pt3dadd(41.363, 165.376, -8.672, 1.406)
pt3dadd(41.248, 165.407, -8.678, 1.434)
pt3dadd(41.132, 165.439, -8.684, 1.462)
pt3dadd(41.017, 165.472, -8.691, 1.49)
pt3dadd(40.901, 165.503, -8.697, 1.516)
pt3dadd(40.792, 165.55, -8.7, 1.53)
pt3dadd(40.69, 165.612, -8.7, 1.524)
pt3dadd(40.588, 165.674, -8.7, 1.52)
pt3dadd(40.486, 165.738, -8.7, 1.514)
pt3dadd(40.383, 165.8, -8.7, 1.51)
pt3dadd(40.275, 165.847, -8.7, 1.5)
pt3dadd(40.157, 165.868, -8.7, 1.484)
pt3dadd(40.038, 165.887, -8.7, 1.468)
pt3dadd(39.92, 165.907, -8.7, 1.45)
pt3dadd(39.802, 165.926, -8.7, 1.434)
pt3dadd(39.683, 165.946, -8.7, 1.418)
pt3dadd(39.564, 165.96, -8.7, 1.402)
pt3dadd(39.444, 165.96, -8.7, 1.388)
pt3dadd(39.324, 165.96, -8.7, 1.374)
pt3dadd(39.204, 165.96, -8.7, 1.358)
pt3dadd(39.084, 165.96, -8.7, 1.344)
pt3dadd(38.964, 165.96, -8.7, 1.33)
pt3dadd(38.844, 165.96, -8.7, 1.316)
pt3dadd(38.728, 165.974, -8.704, 1.306)
pt3dadd(38.62, 166.025, -8.718, 1.306)
pt3dadd(38.512, 166.074, -8.732, 1.306)
pt3dadd(38.404, 166.124, -8.746, 1.306)
pt3dadd(38.296, 166.174, -8.76, 1.306)
pt3dadd(38.185, 166.216, -8.77, 1.308)
pt3dadd(38.07, 166.247, -8.776, 1.312)
pt3dadd(37.954, 166.279, -8.782, 1.318)
pt3dadd(37.839, 166.31, -8.788, 1.322)
pt3dadd(37.723, 166.343, -8.794, 1.326)
pt3dadd(37.608, 166.375, -8.8, 1.33)
pt3dadd(37.492, 166.408, -8.8, 1.318)
pt3dadd(37.377, 166.441, -8.8, 1.304)
pt3dadd(37.262, 166.474, -8.8, 1.29)
pt3dadd(37.146, 166.507, -8.8, 1.278)
pt3dadd(37.031, 166.54, -8.8, 1.264)
pt3dadd(36.914, 166.56, -8.802, 1.228)
pt3dadd(36.794, 166.56, -8.805, 1.16)
pt3dadd(36.674, 166.56, -8.809, 1.09)
pt3dadd(36.57, 166.56, -8.845, 0.996)
pt3dadd(36.482, 166.56, -8.913, 0.878)
pt3dadd(36.387, 166.578, -8.964, 0.784)
pt3dadd(36.28, 166.625, -8.986, 0.734)
pt3dadd(36.182, 166.687, -9, 0.716)
pt3dadd(36.1, 166.775, -9, 0.752)
pt3dadd(36.034, 166.87, -9, 0.802)
pt3dadd(36.01, 166.987, -9, 0.89)
pt3dadd(35.94, 167.068, -9.008, 0.944)
pt3dadd(35.832, 167.118, -9.022, 0.97)
pt3dadd(35.724, 167.167, -9.035, 0.996)
pt3dadd(35.616, 167.218, -9.049, 1.022)
pt3dadd(35.508, 167.267, -9.063, 1.048)
pt3dadd(35.395, 167.304, -9.071, 1.062)
pt3dadd(35.279, 167.335, -9.077, 1.07)
pt3dadd(35.164, 167.368, -9.083, 1.08)
pt3dadd(35.049, 167.399, -9.09, 1.09)
pt3dadd(34.933, 167.431, -9.096, 1.098)
pt3dadd(34.821, 167.472, -9.1, 1.106)
pt3dadd(34.717, 167.531, -9.1, 1.112)
pt3dadd(34.613, 167.591, -9.1, 1.116)
pt3dadd(34.509, 167.651, -9.1, 1.122)
pt3dadd(34.405, 167.711, -9.1, 1.126)
pt3dadd(34.3, 167.768, -9.1, 1.128)
pt3dadd(34.188, 167.813, -9.1, 1.114)
pt3dadd(34.077, 167.857, -9.1, 1.1)
pt3dadd(33.966, 167.902, -9.1, 1.086)
pt3dadd(33.854, 167.946, -9.1, 1.072)
pt3dadd(33.743, 167.99, -9.1, 1.058)
pt3dadd(33.628, 168.018, -9.115, 1.032)
pt3dadd(33.513, 168.042, -9.135, 1.002)
pt3dadd(33.397, 168.065, -9.154, 0.974)
pt3dadd(33.282, 168.088, -9.173, 0.944)
pt3dadd(33.166, 168.11, -9.192, 0.916)
pt3dadd(33.048, 168.12, -9.203, 0.89)
pt3dadd(32.928, 168.12, -9.208, 0.868)
pt3dadd(32.808, 168.12, -9.213, 0.846)
pt3dadd(32.688, 168.12, -9.218, 0.822)
pt3dadd(32.569, 168.12, -9.223, 0.8)
pt3dadd(32.449, 168.12, -9.228, 0.778)
pt3dadd(32.329, 168.12, -9.233, 0.756)
pt3dadd(32.219, 168.143, -9.266, 0.758)
pt3dadd(32.109, 168.169, -9.301, 0.764)
pt3dadd(32, 168.194, -9.336, 0.768)
pt3dadd(31.89, 168.22, -9.371, 0.774)
pt3dadd(31.779, 168.24, -9.4, 0.782)
pt3dadd(31.659, 168.24, -9.4, 0.808)
pt3dadd(31.539, 168.24, -9.4, 0.834)
pt3dadd(31.419, 168.24, -9.4, 0.858)
pt3dadd(31.299, 168.24, -9.4, 0.884)
pt3dadd(31.179, 168.24, -9.4, 0.908)
pt3dadd(31.059, 168.24, -9.4, 0.934)
pt3dadd(30.939, 168.24, -9.404, 0.96)
pt3dadd(30.823, 168.24, -9.427, 1)
pt3dadd(30.706, 168.24, -9.45, 1.038)
pt3dadd(30.589, 168.24, -9.473, 1.078)
pt3dadd(30.472, 168.24, -9.496, 1.116)
pt3dadd(30.355, 168.24, -9.518, 1.156)
pt3dadd(30.238, 168.24, -9.537, 1.182)
pt3dadd(30.118, 168.24, -9.547, 1.19)
pt3dadd(29.999, 168.24, -9.558, 1.198)
pt3dadd(29.88, 168.24, -9.568, 1.206)
pt3dadd(29.76, 168.24, -9.579, 1.214)
pt3dadd(29.641, 168.24, -9.589, 1.222)
pt3dadd(29.522, 168.24, -9.6, 1.23)
pt3dadd(29.407, 168.222, -9.626, 1.226)
pt3dadd(29.293, 168.204, -9.652, 1.22)
pt3dadd(29.178, 168.186, -9.678, 1.216)
pt3dadd(29.064, 168.168, -9.704, 1.21)
pt3dadd(28.949, 168.149, -9.73, 1.206)
pt3dadd(28.851, 168.086, -9.746, 1.186)
pt3dadd(28.755, 168.017, -9.76, 1.164)
pt3dadd(28.659, 167.947, -9.775, 1.142)
pt3dadd(28.563, 167.878, -9.789, 1.12)
pt3dadd(28.47, 167.803, -9.8, 1.104)
pt3dadd(28.387, 167.717, -9.8, 1.098)
pt3dadd(28.303, 167.63, -9.8, 1.094)
pt3dadd(28.22, 167.544, -9.8, 1.088)
pt3dadd(28.136, 167.458, -9.8, 1.084)
pt3dadd(28.045, 167.383, -9.806, 1.078)
pt3dadd(27.94, 167.332, -9.825, 1.072)
pt3dadd(27.834, 167.28, -9.844, 1.068)
pt3dadd(27.728, 167.228, -9.864, 1.062)
pt3dadd(27.622, 167.177, -9.883, 1.056)
pt3dadd(27.508, 167.16, -9.9, 1.054)
pt3dadd(27.389, 167.16, -9.917, 1.054)
pt3dadd(27.271, 167.16, -9.935, 1.054)
pt3dadd(27.157, 167.154, -9.964, 1.054)
pt3dadd(27.042, 167.148, -9.993, 1.054)
pt3dadd(26.952, 167.081, -10, 1.054)
pt3dadd(26.871, 166.992, -10, 1.054)
pt3dadd(26.789, 166.904, -10, 1.062)
pt3dadd(26.707, 166.817, -10, 1.074)
pt3dadd(26.616, 166.741, -10.007, 1.094)
pt3dadd(26.516, 166.676, -10.02, 1.126)
pt3dadd(26.415, 166.613, -10.033, 1.156)
pt3dadd(26.324, 166.553, -10.059, 1.184)
pt3dadd(26.274, 166.51, -10.143, 1.212)
pt3dadd(26.212, 166.466, -10.217, 1.218)
pt3dadd(26.109, 166.433, -10.259, 1.19)
pt3dadd(26.001, 166.404, -10.294, 1.168)
pt3dadd(25.892, 166.376, -10.33, 1.146)
pt3dadd(25.784, 166.348, -10.366, 1.126)
pt3dadd(25.675, 166.319, -10.401, 1.106)
pt3dadd(25.559, 166.296, -10.418, 1.11)
pt3dadd(25.443, 166.273, -10.434, 1.114)
pt3dadd(25.327, 166.25, -10.451, 1.12)
pt3dadd(25.211, 166.228, -10.468, 1.124)
pt3dadd(25.095, 166.206, -10.485, 1.128)
pt3dadd(24.982, 166.175, -10.506, 1.15)
pt3dadd(24.87, 166.142, -10.529, 1.176)
pt3dadd(24.757, 166.11, -10.552, 1.2)
pt3dadd(24.645, 166.076, -10.575, 1.226)
pt3dadd(24.533, 166.044, -10.597, 1.252)
pt3dadd(24.419, 166.008, -10.6, 1.272)
pt3dadd(24.304, 165.973, -10.6, 1.29)
pt3dadd(24.19, 165.937, -10.6, 1.308)
pt3dadd(24.075, 165.901, -10.6, 1.326)
pt3dadd(23.961, 165.865, -10.6, 1.344)
pt3dadd(23.845, 165.836, -10.6, 1.356)
pt3dadd(23.725, 165.823, -10.6, 1.356)
pt3dadd(23.606, 165.811, -10.6, 1.356)
pt3dadd(23.487, 165.799, -10.6, 1.356)
pt3dadd(23.367, 165.786, -10.6, 1.356)
pt3dadd(23.248, 165.774, -10.6, 1.356)
pt3dadd(23.129, 165.761, -10.6, 1.356)
pt3dadd(23.01, 165.746, -10.6, 1.338)
pt3dadd(22.891, 165.731, -10.6, 1.32)
}
}
proc shape3d_60() {
apic[10] { pt3dadd(22.771, 165.72, -10.6, 1.302)
pt3dadd(22.651, 165.72, -10.6, 1.286)
pt3dadd(22.531, 165.72, -10.6, 1.268)
pt3dadd(22.415, 165.706, -10.6, 1.252)
pt3dadd(22.312, 165.644, -10.6, 1.242)
pt3dadd(22.211, 165.581, -10.6, 1.23)
pt3dadd(22.164, 165.47, -10.6, 1.208)
pt3dadd(22.118, 165.36, -10.6, 1.186)
pt3dadd(22.03, 165.284, -10.6, 1.168)
pt3dadd(21.926, 165.227, -10.6, 1.154)
pt3dadd(21.814, 165.181, -10.6, 1.148)
pt3dadd(21.703, 165.137, -10.6, 1.144)
pt3dadd(21.591, 165.092, -10.6, 1.14)
pt3dadd(21.48, 165.048, -10.6, 1.134)
pt3dadd(21.368, 165.004, -10.6, 1.13)
pt3dadd(21.253, 164.978, -10.616, 1.13)
pt3dadd(21.137, 164.957, -10.632, 1.13)
pt3dadd(21.021, 164.934, -10.649, 1.13)
pt3dadd(20.904, 164.911, -10.666, 1.13)
pt3dadd(20.788, 164.888, -10.683, 1.13)
pt3dadd(20.688, 164.834, -10.705, 1.13)
pt3dadd(20.596, 164.764, -10.731, 1.13)
pt3dadd(20.504, 164.694, -10.757, 1.13)
pt3dadd(20.412, 164.623, -10.782, 1.13)
pt3dadd(20.313, 164.562, -10.8, 1.128)
pt3dadd(20.2, 164.524, -10.8, 1.124)
pt3dadd(20.086, 164.484, -10.8, 1.12)
pt3dadd(19.972, 164.446, -10.8, 1.116)
pt3dadd(19.859, 164.407, -10.8, 1.11)
pt3dadd(19.745, 164.369, -10.8, 1.106)
pt3dadd(19.636, 164.318, -10.8, 1.096)
pt3dadd(19.529, 164.264, -10.8, 1.086)
pt3dadd(19.417, 164.222, -10.8, 1.068)
pt3dadd(19.302, 164.189, -10.8, 1.048)
pt3dadd(19.186, 164.16, -10.8, 1.03)
pt3dadd(19.066, 164.155, -10.8, 1.03)
pt3dadd(18.946, 164.15, -10.8, 1.03)
pt3dadd(18.836, 164.132, -10.813, 1.03)
pt3dadd(18.759, 164.071, -10.87, 1.03)
pt3dadd(18.715, 163.984, -10.913, 1.036)
pt3dadd(18.705, 163.868, -10.939, 1.05)
pt3dadd(18.694, 163.753, -10.965, 1.062)
pt3dadd(18.684, 163.638, -10.991, 1.076)
pt3dadd(18.63, 163.537, -11, 1.072)
pt3dadd(18.555, 163.444, -11, 1.06)
pt3dadd(18.468, 163.363, -11, 1.046)
pt3dadd(18.37, 163.294, -11, 1.028)
pt3dadd(18.272, 163.223, -11, 1.01)
pt3dadd(18.16, 163.2, -11, 0.982)
pt3dadd(18.04, 163.2, -11, 0.948)
pt3dadd(17.92, 163.2, -11, 0.916)
pt3dadd(17.801, 163.19, -11, 0.886)
pt3dadd(17.698, 163.134, -11, 0.878)
pt3dadd(17.599, 163.064, -11, 0.878)
pt3dadd(17.501, 162.996, -11, 0.878)
pt3dadd(17.403, 162.926, -11, 0.878)
pt3dadd(17.305, 162.858, -11, 0.878)
pt3dadd(17.194, 162.814, -11, 0.882)
pt3dadd(17.08, 162.778, -11, 0.886)
pt3dadd(16.965, 162.742, -11, 0.892)
pt3dadd(16.851, 162.706, -11, 0.896)
pt3dadd(16.736, 162.67, -11, 0.9)
pt3dadd(16.623, 162.631, -11, 0.904)
pt3dadd(16.516, 162.577, -11, 0.904)
pt3dadd(16.408, 162.524, -11, 0.904)
pt3dadd(16.301, 162.47, -11, 0.904)
pt3dadd(16.194, 162.416, -11, 0.904)
pt3dadd(16.086, 162.364, -11, 0.904)
pt3dadd(15.975, 162.318, -11, 0.904)
pt3dadd(15.864, 162.274, -11, 0.904)
pt3dadd(15.752, 162.229, -11, 0.904)
pt3dadd(15.641, 162.185, -11, 0.904)
pt3dadd(15.529, 162.14, -11, 0.904)
pt3dadd(15.415, 162.108, -11.009, 0.904)
pt3dadd(15.299, 162.084, -11.026, 0.904)
pt3dadd(15.183, 162.062, -11.043, 0.904)
pt3dadd(15.067, 162.04, -11.06, 0.904)
pt3dadd(14.951, 162.017, -11.077, 0.904)
pt3dadd(14.835, 162, -11.095, 0.902)
pt3dadd(14.718, 162, -11.118, 0.898)
pt3dadd(14.601, 162, -11.141, 0.894)
pt3dadd(14.484, 162, -11.164, 0.89)
pt3dadd(14.367, 162, -11.187, 0.886)
pt3dadd(14.251, 162, -11.21, 0.882)
pt3dadd(14.133, 162, -11.229, 0.874)
pt3dadd(14.014, 162, -11.243, 0.862)
pt3dadd(13.896, 162, -11.257, 0.85)
pt3dadd(13.777, 162, -11.272, 0.836)
pt3dadd(13.658, 162, -11.286, 0.824)
pt3dadd(13.539, 162, -11.301, 0.812)
pt3dadd(13.421, 161.998, -11.315, 0.798)
pt3dadd(13.302, 161.992, -11.33, 0.782)
pt3dadd(13.184, 161.984, -11.346, 0.764)
pt3dadd(13.065, 161.977, -11.361, 0.748)
pt3dadd(12.947, 161.971, -11.376, 0.73)
pt3dadd(12.828, 161.964, -11.391, 0.714)
pt3dadd(12.713, 161.942, -11.408, 0.694)
pt3dadd(12.603, 161.902, -11.426, 0.674)
pt3dadd(12.493, 161.86, -11.444, 0.652)
pt3dadd(12.382, 161.819, -11.463, 0.632)
pt3dadd(12.272, 161.777, -11.481, 0.612)
pt3dadd(12.157, 161.755, -11.5, 0.602)
pt3dadd(12.04, 161.749, -11.52, 0.602)
pt3dadd(11.922, 161.742, -11.54, 0.602)
pt3dadd(11.805, 161.735, -11.559, 0.602)
pt3dadd(11.687, 161.728, -11.579, 0.602)
pt3dadd(11.57, 161.72, -11.598, 0.602)
pt3dadd(11.452, 161.707, -11.615, 0.612)
pt3dadd(11.335, 161.693, -11.631, 0.62)
pt3dadd(11.217, 161.678, -11.647, 0.628)
pt3dadd(11.1, 161.664, -11.663, 0.638)
pt3dadd(10.982, 161.65, -11.679, 0.648)
pt3dadd(10.864, 161.64, -11.695, 0.658)
pt3dadd(10.746, 161.64, -11.711, 0.676)
pt3dadd(10.627, 161.64, -11.728, 0.692)
pt3dadd(10.509, 161.64, -11.744, 0.708)
pt3dadd(10.391, 161.64, -11.761, 0.724)
pt3dadd(10.272, 161.64, -11.777, 0.742)
pt3dadd(10.153, 161.64, -11.789, 0.756)
pt3dadd(10.033, 161.64, -11.791, 0.768)
pt3dadd(9.913, 161.64, -11.793, 0.778)
pt3dadd(9.793, 161.64, -11.794, 0.79)
pt3dadd(9.674, 161.64, -11.796, 0.8)
pt3dadd(9.554, 161.64, -11.797, 0.812)
pt3dadd(9.434, 161.64, -11.799, 0.822)
pt3dadd(9.314, 161.64, -11.807, 0.832)
pt3dadd(9.196, 161.64, -11.826, 0.84)
pt3dadd(9.078, 161.64, -11.844, 0.848)
pt3dadd(8.961, 161.64, -11.863, 0.856)
pt3dadd(8.843, 161.64, -11.881, 0.866)
pt3dadd(8.725, 161.64, -11.9, 0.874)
pt3dadd(8.607, 161.64, -11.917, 0.882)
pt3dadd(8.488, 161.64, -11.931, 0.89)
pt3dadd(8.369, 161.64, -11.946, 0.898)
pt3dadd(8.25, 161.64, -11.96, 0.906)
pt3dadd(8.132, 161.64, -11.974, 0.914)
pt3dadd(8.013, 161.64, -11.989, 0.922)
pt3dadd(7.894, 161.64, -12.004, 0.93)
pt3dadd(7.776, 161.64, -12.02, 0.94)
pt3dadd(7.657, 161.64, -12.036, 0.948)
pt3dadd(7.539, 161.64, -12.053, 0.956)
pt3dadd(7.421, 161.64, -12.069, 0.964)
pt3dadd(7.302, 161.64, -12.086, 0.972)
pt3dadd(7.184, 161.64, -12.1, 0.982)
pt3dadd(7.064, 161.64, -12.1, 1.008)
pt3dadd(6.944, 161.64, -12.1, 1.034)
pt3dadd(6.824, 161.638, -12.1, 1.058)
pt3dadd(6.705, 161.623, -12.1, 1.086)
pt3dadd(6.586, 161.609, -12.1, 1.114)
pt3dadd(6.474, 161.573, -12.1, 1.124)
pt3dadd(6.37, 161.513, -12.1, 1.114)
pt3dadd(6.276, 161.442, -12.1, 1.09)
pt3dadd(6.208, 161.342, -12.1, 1.032)
pt3dadd(6.135, 161.251, -12.102, 0.974)
pt3dadd(6.022, 161.225, -12.128, 0.91)
pt3dadd(5.909, 161.198, -12.153, 0.846)
pt3dadd(5.796, 161.172, -12.178, 0.782)
pt3dadd(5.683, 161.16, -12.207, 0.724)
pt3dadd(5.57, 161.16, -12.241, 0.67)
pt3dadd(5.456, 161.16, -12.273, 0.64)
pt3dadd(5.34, 161.162, -12.297, 0.692)
pt3dadd(5.222, 161.17, -12.316, 0.728)
pt3dadd(5.105, 161.177, -12.336, 0.762)
pt3dadd(4.987, 161.184, -12.355, 0.798)
pt3dadd(4.87, 161.191, -12.375, 0.834)
pt3dadd(4.752, 161.198, -12.394, 0.868)
pt3dadd(4.641, 161.212, -12.428, 0.912)
pt3dadd(4.531, 161.228, -12.467, 0.958)
pt3dadd(4.422, 161.245, -12.505, 1.006)
pt3dadd(4.313, 161.261, -12.544, 1.052)
pt3dadd(4.203, 161.278, -12.583, 1.098)
pt3dadd(4.091, 161.314, -12.591, 1.124)
pt3dadd(3.977, 161.353, -12.593, 1.148)
pt3dadd(3.864, 161.393, -12.595, 1.17)
pt3dadd(3.751, 161.432, -12.597, 1.194)
pt3dadd(3.637, 161.471, -12.599, 1.218)
pt3dadd(3.522, 161.504, -12.6, 1.232)
pt3dadd(3.405, 161.528, -12.6, 1.236)
pt3dadd(3.287, 161.554, -12.6, 1.24)
pt3dadd(3.17, 161.579, -12.6, 1.246)
pt3dadd(3.053, 161.604, -12.6, 1.25)
pt3dadd(2.935, 161.628, -12.6, 1.254)
pt3dadd(2.816, 161.64, -12.6, 1.25)
pt3dadd(2.696, 161.64, -12.6, 1.24)
pt3dadd(2.576, 161.64, -12.6, 1.228)
pt3dadd(2.456, 161.64, -12.6, 1.218)
pt3dadd(2.336, 161.64, -12.6, 1.206)
pt3dadd(2.216, 161.64, -12.6, 1.196)
pt3dadd(2.096, 161.64, -12.6, 1.186)
pt3dadd(1.976, 161.64, -12.6, 1.17)
pt3dadd(1.856, 161.64, -12.6, 1.152)
pt3dadd(1.736, 161.64, -12.6, 1.134)
pt3dadd(1.616, 161.64, -12.6, 1.116)
pt3dadd(1.496, 161.64, -12.6, 1.1)
pt3dadd(1.376, 161.64, -12.6, 1.082)
pt3dadd(1.256, 161.64, -12.6, 1.064)
pt3dadd(1.136, 161.64, -12.601, 1.05)
pt3dadd(1.016, 161.64, -12.602, 1.044)
pt3dadd(0.896, 161.64, -12.604, 1.036)
pt3dadd(0.776, 161.64, -12.606, 1.028)
}
}
proc shape3d_61() {
apic[10] { pt3dadd(0.657, 161.64, -12.607, 1.022)
pt3dadd(0.537, 161.64, -12.609, 1.014)
pt3dadd(0.417, 161.64, -12.611, 1.008)
pt3dadd(0.298, 161.65, -12.621, 1.012)
pt3dadd(0.18, 161.664, -12.637, 1.026)
pt3dadd(0.063, 161.678, -12.653, 1.04)
pt3dadd(-0.055, 161.693, -12.669, 1.054)
pt3dadd(-0.172, 161.707, -12.685, 1.068)
pt3dadd(-0.288, 161.726, -12.7, 1.088)
pt3dadd(-0.381, 161.801, -12.7, 1.182)
pt3dadd(-0.475, 161.876, -12.7, 1.276)
pt3dadd(-0.581, 161.933, -12.705, 1.348)
pt3dadd(-0.687, 161.989, -12.71, 1.418)
pt3dadd(-0.798, 162, -12.738, 1.448)
pt3dadd(-0.912, 162, -12.771, 1.47)
pt3dadd(-1.024, 162, -12.807, 1.462)
pt3dadd(-1.134, 162, -12.845, 1.418)
pt3dadd(-1.242, 162, -12.888, 1.364)
pt3dadd(-1.336, 162, -12.951, 1.258)
pt3dadd(-1.448, 162, -12.976, 1.206)
pt3dadd(-1.567, 162, -12.988, 1.174)
pt3dadd(-1.686, 162, -13.001, 1.142)
pt3dadd(-1.806, 162, -13.013, 1.11)
pt3dadd(-1.925, 162, -13.025, 1.078)
pt3dadd(-2.044, 162, -13.038, 1.046)
pt3dadd(-2.159, 162.012, -13.059, 1.02)
pt3dadd(-2.27, 162.036, -13.092, 0.998)
pt3dadd(-2.38, 162.061, -13.124, 0.978)
pt3dadd(-2.491, 162.086, -13.156, 0.958)
pt3dadd(-2.602, 162.112, -13.189, 0.936)
pt3dadd(-2.715, 162.144, -13.2, 0.918)
pt3dadd(-2.83, 162.179, -13.2, 0.9)
pt3dadd(-2.944, 162.215, -13.2, 0.882)
pt3dadd(-3.059, 162.251, -13.2, 0.864)
pt3dadd(-3.173, 162.287, -13.2, 0.846)
pt3dadd(-3.288, 162.32, -13.2, 0.828)
pt3dadd(-3.408, 162.326, -13.206, 0.824)
pt3dadd(-3.528, 162.334, -13.211, 0.82)
pt3dadd(-3.647, 162.34, -13.216, 0.816)
pt3dadd(-3.767, 162.346, -13.221, 0.812)
pt3dadd(-3.887, 162.352, -13.227, 0.808)
pt3dadd(-4.006, 162.358, -13.232, 0.804)
pt3dadd(-4.126, 162.36, -13.23, 0.79)
pt3dadd(-4.246, 162.36, -13.226, 0.772)
pt3dadd(-4.366, 162.36, -13.222, 0.754)
pt3dadd(-4.486, 162.36, -13.218, 0.734)
pt3dadd(-4.606, 162.36, -13.214, 0.716)
pt3dadd(-4.725, 162.362, -13.206, 0.704)
pt3dadd(-4.843, 162.37, -13.188, 0.704)
pt3dadd(-4.961, 162.377, -13.17, 0.704)
pt3dadd(-5.078, 162.384, -13.152, 0.704)
pt3dadd(-5.196, 162.391, -13.134, 0.704)
pt3dadd(-5.314, 162.398, -13.116, 0.704)
pt3dadd(-5.427, 162.427, -13.124, 0.704)
pt3dadd(-5.539, 162.466, -13.142, 0.704)
pt3dadd(-5.651, 162.504, -13.16, 0.704)
pt3dadd(-5.762, 162.542, -13.179, 0.704)
pt3dadd(-5.874, 162.58, -13.197, 0.704)
pt3dadd(-5.986, 162.624, -13.2, 0.714)
pt3dadd(-6.097, 162.668, -13.2, 0.728)
pt3dadd(-6.208, 162.713, -13.2, 0.742)
pt3dadd(-6.32, 162.757, -13.2, 0.756)
pt3dadd(-6.431, 162.802, -13.2, 0.77)
pt3dadd(-6.544, 162.838, -13.208, 0.778)
pt3dadd(-6.66, 162.864, -13.225, 0.778)
pt3dadd(-6.775, 162.889, -13.242, 0.778)
pt3dadd(-6.891, 162.914, -13.259, 0.778)
pt3dadd(-7.006, 162.941, -13.276, 0.778)
pt3dadd(-7.121, 162.968, -13.289, 0.778)
pt3dadd(-7.237, 163.002, -13.291, 0.778)
pt3dadd(-7.352, 163.036, -13.293, 0.778)
pt3dadd(-7.467, 163.069, -13.295, 0.778)
pt3dadd(-7.582, 163.103, -13.297, 0.778)
pt3dadd(-7.697, 163.136, -13.299, 0.778)
pt3dadd(-7.815, 163.153, -13.309, 0.77)
pt3dadd(-7.933, 163.162, -13.323, 0.756)
pt3dadd(-8.052, 163.171, -13.336, 0.744)
pt3dadd(-8.171, 163.181, -13.349, 0.73)
pt3dadd(-8.289, 163.189, -13.362, 0.718)
pt3dadd(-8.408, 163.199, -13.376, 0.706)
pt3dadd(-8.513, 163.23, -13.414, 0.698)
pt3dadd(-8.615, 163.266, -13.456, 0.692)
pt3dadd(-8.717, 163.302, -13.499, 0.688)
pt3dadd(-8.82, 163.339, -13.542, 0.682)
pt3dadd(-8.929, 163.366, -13.569, 0.678)
pt3dadd(-9.048, 163.379, -13.574, 0.678)
pt3dadd(-9.167, 163.392, -13.58, 0.678)
pt3dadd(-9.286, 163.405, -13.585, 0.678)
pt3dadd(-9.405, 163.418, -13.591, 0.678)
pt3dadd(-9.524, 163.432, -13.596, 0.678)
pt3dadd(-9.643, 163.44, -13.606, 0.682)
pt3dadd(-9.762, 163.44, -13.622, 0.694)
pt3dadd(-9.88, 163.44, -13.639, 0.708)
pt3dadd(-9.998, 163.44, -13.655, 0.72)
pt3dadd(-10.117, 163.44, -13.672, 0.732)
pt3dadd(-10.235, 163.44, -13.688, 0.744)
pt3dadd(-10.353, 163.434, -13.7, 0.754)
pt3dadd(-10.472, 163.415, -13.7, 0.758)
pt3dadd(-10.59, 163.394, -13.7, 0.762)
pt3dadd(-10.709, 163.375, -13.7, 0.766)
pt3dadd(-10.827, 163.356, -13.7, 0.77)
pt3dadd(-10.945, 163.336, -13.7, 0.774)
pt3dadd(-11.064, 163.316, -13.7, 0.778)
pt3dadd(-11.182, 163.3, -13.7, 0.778)
pt3dadd(-11.301, 163.282, -13.7, 0.778)
pt3dadd(-11.42, 163.265, -13.7, 0.778)
pt3dadd(-11.539, 163.248, -13.7, 0.778)
pt3dadd(-11.658, 163.23, -13.7, 0.778)
pt3dadd(-11.776, 163.212, -13.7, 0.778)
pt3dadd(-11.89, 163.174, -13.7, 0.774)
pt3dadd(-12.003, 163.135, -13.7, 0.77)
pt3dadd(-12.117, 163.097, -13.7, 0.764)
pt3dadd(-12.231, 163.057, -13.7, 0.76)
pt3dadd(-12.344, 163.019, -13.7, 0.756)
pt3dadd(-12.459, 162.986, -13.7, 0.756)
pt3dadd(-12.576, 162.959, -13.7, 0.76)
pt3dadd(-12.693, 162.931, -13.7, 0.764)
pt3dadd(-12.81, 162.904, -13.7, 0.768)
pt3dadd(-12.927, 162.876, -13.7, 0.772)
pt3dadd(-13.043, 162.848, -13.7, 0.776)
pt3dadd(-13.146, 162.791, -13.7, 0.778)
pt3dadd(-13.242, 162.719, -13.7, 0.778)
pt3dadd(-13.338, 162.647, -13.7, 0.778)
pt3dadd(-13.434, 162.575, -13.7, 0.778)
pt3dadd(-13.53, 162.503, -13.7, 0.778)
pt3dadd(-13.636, 162.448, -13.7, 0.778)
pt3dadd(-13.746, 162.4, -13.7, 0.778)
pt3dadd(-13.856, 162.353, -13.7, 0.778)
pt3dadd(-13.966, 162.305, -13.7, 0.778)
pt3dadd(-14.076, 162.257, -13.7, 0.778)
pt3dadd(-14.19, 162.221, -13.7, 0.778)
pt3dadd(-14.308, 162.203, -13.7, 0.778)
pt3dadd(-14.427, 162.186, -13.7, 0.778)
pt3dadd(-14.546, 162.169, -13.7, 0.778)
pt3dadd(-14.665, 162.151, -13.7, 0.778)
pt3dadd(-14.783, 162.134, -13.7, 0.778)
pt3dadd(-14.902, 162.12, -13.7, 0.78)
pt3dadd(-15.022, 162.12, -13.7, 0.786)
pt3dadd(-15.142, 162.12, -13.7, 0.794)
pt3dadd(-15.262, 162.12, -13.7, 0.802)
pt3dadd(-15.382, 162.12, -13.7, 0.808)
pt3dadd(-15.502, 162.12, -13.7, 0.816)
pt3dadd(-15.622, 162.12, -13.7, 0.822)
pt3dadd(-15.742, 162.12, -13.703, 0.83)
pt3dadd(-15.86, 162.12, -13.72, 0.838)
pt3dadd(-15.979, 162.12, -13.736, 0.846)
pt3dadd(-16.097, 162.12, -13.752, 0.854)
pt3dadd(-16.215, 162.12, -13.769, 0.864)
pt3dadd(-16.334, 162.12, -13.785, 0.872)
pt3dadd(-16.451, 162.12, -13.805, 0.878)
pt3dadd(-16.558, 162.118, -13.85, 0.878)
pt3dadd(-16.665, 162.114, -13.896, 0.878)
pt3dadd(-16.771, 162.112, -13.941, 0.878)
pt3dadd(-16.878, 162.109, -13.987, 0.878)
pt3dadd(-16.985, 162.107, -14.032, 0.878)
pt3dadd(-17.094, 162.085, -14.07, 0.874)
pt3dadd(-17.203, 162.062, -14.107, 0.868)
pt3dadd(-17.312, 162.04, -14.145, 0.864)
pt3dadd(-17.421, 162.018, -14.182, 0.858)
pt3dadd(-17.531, 162, -14.218, 0.852)
pt3dadd(-17.644, 162, -14.251, 0.84)
pt3dadd(-17.758, 162, -14.284, 0.83)
pt3dadd(-17.868, 161.983, -14.321, 0.828)
pt3dadd(-17.977, 161.964, -14.359, 0.828)
pt3dadd(-18.08, 161.912, -14.38, 0.818)
pt3dadd(-18.182, 161.851, -14.397, 0.806)
pt3dadd(-18.258, 161.761, -14.404, 0.794)
pt3dadd(-18.329, 161.664, -14.41, 0.782)
pt3dadd(-18.354, 161.561, -14.447, 0.752)
pt3dadd(-18.39, 161.471, -14.494, 0.726)
pt3dadd(-18.474, 161.406, -14.54, 0.72)
pt3dadd(-18.559, 161.341, -14.586, 0.714)
pt3dadd(-18.643, 161.275, -14.632, 0.708)
pt3dadd(-18.708, 161.198, -14.674, 0.704)
pt3dadd(-18.714, 161.083, -14.702, 0.704)
pt3dadd(-18.72, 160.969, -14.731, 0.704)
pt3dadd(-18.782, 160.878, -14.768, 0.728)
pt3dadd(-18.854, 160.794, -14.8, 0.758)
pt3dadd(-18.965, 160.747, -14.8, 0.802)
pt3dadd(-19.075, 160.7, -14.8, 0.846)
pt3dadd(-19.194, 160.685, -14.8, 0.876)
pt3dadd(-19.313, 160.675, -14.8, 0.904)
pt3dadd(-19.432, 160.663, -14.8, 0.93)
pt3dadd(-19.532, 160.597, -14.8, 0.952)
pt3dadd(-19.631, 160.53, -14.8, 0.972)
pt3dadd(-19.731, 160.464, -14.8, 0.992)
pt3dadd(-19.789, 160.374, -14.8, 1)
pt3dadd(-19.793, 160.254, -14.8, 0.992)
pt3dadd(-19.798, 160.134, -14.8, 0.984)
pt3dadd(-19.808, 160.014, -14.8, 0.964)
pt3dadd(-19.864, 159.913, -14.8, 0.94)
pt3dadd(-19.942, 159.822, -14.8, 0.92)
pt3dadd(-20.02, 159.731, -14.8, 0.9)
pt3dadd(-20.098, 159.64, -14.8, 0.88)
pt3dadd(-20.176, 159.548, -14.8, 0.86)
pt3dadd(-20.237, 159.445, -14.8, 0.838)
pt3dadd(-20.29, 159.338, -14.8, 0.816)
pt3dadd(-20.335, 159.227, -14.8, 0.79)
pt3dadd(-20.368, 159.112, -14.8, 0.758)
pt3dadd(-20.4, 158.996, -14.801, 0.728)
}
}
proc shape3d_62() {
apic[10] { pt3dadd(-20.4, 158.89, -14.846, 0.716)
pt3dadd(-20.4, 158.783, -14.891, 0.706)
pt3dadd(-20.455, 158.705, -14.946, 0.704)
pt3dadd(-20.525, 158.634, -15.001, 0.704)
pt3dadd(-20.604, 158.545, -15.009, 0.722)
pt3dadd(-20.639, 158.436, -15.023, 0.734)
pt3dadd(-20.656, 158.318, -15.039, 0.744)
pt3dadd(-20.673, 158.202, -15.055, 0.754)
pt3dadd(-20.691, 158.084, -15.072, 0.762)
pt3dadd(-20.708, 157.967, -15.088, 0.772)
pt3dadd(-20.727, 157.853, -15.111, 0.78)
pt3dadd(-20.753, 157.748, -15.155, 0.786)
pt3dadd(-20.779, 157.644, -15.198, 0.79)
pt3dadd(-20.806, 157.538, -15.242, 0.796)
pt3dadd(-20.832, 157.434, -15.286, 0.802)
pt3dadd(-20.862, 157.324, -15.314, 0.81)
pt3dadd(-20.894, 157.211, -15.334, 0.82)
pt3dadd(-20.927, 157.098, -15.354, 0.83)
pt3dadd(-20.959, 156.985, -15.374, 0.84)
pt3dadd(-20.991, 156.872, -15.394, 0.85)
pt3dadd(-21.011, 156.756, -15.415, 0.858)
pt3dadd(-21.026, 156.64, -15.435, 0.862)
pt3dadd(-21.041, 156.523, -15.456, 0.866)
pt3dadd(-21.056, 156.407, -15.477, 0.872)
pt3dadd(-21.071, 156.29, -15.497, 0.876)
pt3dadd(-21.086, 156.176, -15.524, 0.88)
pt3dadd(-21.102, 156.067, -15.563, 0.886)
pt3dadd(-21.118, 155.958, -15.602, 0.89)
pt3dadd(-21.135, 155.848, -15.64, 0.896)
pt3dadd(-21.151, 155.738, -15.679, 0.902)
pt3dadd(-21.179, 155.632, -15.716, 0.904)
pt3dadd(-21.221, 155.527, -15.751, 0.904)
pt3dadd(-21.24, 155.414, -15.774, 0.904)
pt3dadd(-21.24, 155.296, -15.786, 0.904)
pt3dadd(-21.24, 155.177, -15.798, 0.904)
pt3dadd(-21.24, 155.06, -15.824, 0.904)
pt3dadd(-21.24, 154.945, -15.851, 0.904)
pt3dadd(-21.24, 154.842, -15.896, 0.904)
pt3dadd(-21.24, 154.754, -15.964, 0.904)
pt3dadd(-21.248, 154.664, -16.03, 0.904)
pt3dadd(-21.273, 154.572, -16.089, 0.904)
pt3dadd(-21.299, 154.478, -16.149, 0.904)
pt3dadd(-21.33, 154.385, -16.202, 0.902)
pt3dadd(-21.39, 154.284, -16.219, 0.89)
pt3dadd(-21.448, 154.184, -16.243, 0.864)
pt3dadd(-21.47, 154.078, -16.274, 0.794)
pt3dadd(-21.475, 153.959, -16.287, 0.736)
pt3dadd(-21.48, 153.84, -16.3, 0.678)
}
apic[11] {pt3dclear()
pt3dadd(70.68, 157.68, -5.178, 0.854)
pt3dadd(70.68, 157.678, -5.179, 0.856)
pt3dadd(70.689, 157.59, -5.247, 0.962)
pt3dadd(70.698, 157.502, -5.314, 1.07)
pt3dadd(70.707, 157.415, -5.382, 1.176)
pt3dadd(70.715, 157.326, -5.45, 1.284)
pt3dadd(70.724, 157.238, -5.517, 1.39)
pt3dadd(70.733, 157.151, -5.585, 1.496)
pt3dadd(70.742, 157.062, -5.653, 1.604)
pt3dadd(70.751, 156.974, -5.72, 1.71)
pt3dadd(70.759, 156.887, -5.788, 1.818)
pt3dadd(70.768, 156.798, -5.855, 1.924)
pt3dadd(70.777, 156.71, -5.923, 2.03)
pt3dadd(70.786, 156.623, -5.99, 2.138)
pt3dadd(70.795, 156.534, -6.058, 2.244)
pt3dadd(70.757, 156.48, -6.113, 2.326)
pt3dadd(70.644, 156.48, -6.146, 2.37)
pt3dadd(70.531, 156.48, -6.18, 2.41)
pt3dadd(70.443, 156.48, -6.248, 2.41)
pt3dadd(70.355, 156.48, -6.316, 2.41)
pt3dadd(70.273, 156.48, -6.388, 2.378)
pt3dadd(70.191, 156.48, -6.462, 2.342)
pt3dadd(70.1, 156.48, -6.527, 2.308)
pt3dadd(69.998, 156.48, -6.573, 2.278)
pt3dadd(69.88, 156.48, -6.59, 2.258)
pt3dadd(69.761, 156.48, -6.607, 2.24)
pt3dadd(69.681, 156.48, -6.674, 2.208)
pt3dadd(69.614, 156.48, -6.756, 2.174)
pt3dadd(69.563, 156.48, -6.846, 2.134)
pt3dadd(69.523, 156.48, -6.94, 2.092)
pt3dadd(69.491, 156.48, -7.036, 2.052)
pt3dadd(69.481, 156.48, -7.136, 2.026)
pt3dadd(69.472, 156.48, -7.236, 1.998)
pt3dadd(69.414, 156.48, -7.303, 1.98)
pt3dadd(69.3, 156.48, -7.334, 1.974)
pt3dadd(69.185, 156.48, -7.365, 1.968)
pt3dadd(69.071, 156.48, -7.396, 1.962)
pt3dadd(68.962, 156.48, -7.436, 1.948)
pt3dadd(68.859, 156.48, -7.487, 1.924)
pt3dadd(68.762, 156.47, -7.543, 1.892)
pt3dadd(68.681, 156.438, -7.611, 1.842)
pt3dadd(68.599, 156.404, -7.679, 1.79)
pt3dadd(68.51, 156.383, -7.743, 1.694)
pt3dadd(68.42, 156.361, -7.807, 1.59)
pt3dadd(68.39, 156.34, -7.898, 1.368)
pt3dadd(68.314, 156.287, -7.961, 1.268)
pt3dadd(68.223, 156.251, -8.011, 1.18)
pt3dadd(68.108, 156.246, -8.04, 1.116)
pt3dadd(67.994, 156.238, -8.068, 1.05)
pt3dadd(67.884, 156.192, -8.084, 0.978)
pt3dadd(67.775, 156.146, -8.1, 0.904)
pt3dadd(67.686, 156.066, -8.1, 0.858)
pt3dadd(67.598, 155.984, -8.1, 0.81)
pt3dadd(67.494, 155.927, -8.1, 0.832)
pt3dadd(67.384, 155.879, -8.1, 0.866)
pt3dadd(67.27, 155.84, -8.1, 0.898)
pt3dadd(67.157, 155.801, -8.1, 0.93)
pt3dadd(67.043, 155.762, -8.1, 0.962)
pt3dadd(66.93, 155.724, -8.1, 0.994)
pt3dadd(66.816, 155.686, -8.1, 1.026)
pt3dadd(66.698, 155.675, -8.109, 1.062)
pt3dadd(66.579, 155.668, -8.121, 1.1)
pt3dadd(66.459, 155.662, -8.132, 1.136)
pt3dadd(66.34, 155.654, -8.143, 1.174)
pt3dadd(66.221, 155.647, -8.154, 1.212)
pt3dadd(66.102, 155.641, -8.165, 1.248)
pt3dadd(65.985, 155.638, -8.184, 1.266)
pt3dadd(65.867, 155.635, -8.205, 1.28)
pt3dadd(65.75, 155.634, -8.226, 1.292)
pt3dadd(65.633, 155.632, -8.247, 1.306)
pt3dadd(65.515, 155.629, -8.268, 1.318)
pt3dadd(65.398, 155.626, -8.289, 1.33)
pt3dadd(65.293, 155.576, -8.314, 1.326)
pt3dadd(65.188, 155.526, -8.338, 1.32)
pt3dadd(65.083, 155.477, -8.362, 1.314)
pt3dadd(64.977, 155.428, -8.387, 1.308)
pt3dadd(64.889, 155.364, -8.422, 1.298)
pt3dadd(64.82, 155.286, -8.471, 1.278)
pt3dadd(64.751, 155.207, -8.521, 1.26)
pt3dadd(64.683, 155.128, -8.57, 1.242)
pt3dadd(64.614, 155.072, -8.631, 1.226)
pt3dadd(64.545, 155.051, -8.711, 1.212)
pt3dadd(64.456, 155.029, -8.765, 1.2)
pt3dadd(64.341, 155.005, -8.785, 1.188)
pt3dadd(64.247, 154.961, -8.808, 1.174)
pt3dadd(64.221, 154.85, -8.84, 1.15)
pt3dadd(64.196, 154.739, -8.869, 1.126)
pt3dadd(64.173, 154.622, -8.884, 1.104)
pt3dadd(64.15, 154.506, -8.899, 1.082)
pt3dadd(64.047, 154.454, -8.9, 1.08)
pt3dadd(63.955, 154.391, -8.907, 1.084)
pt3dadd(63.903, 154.286, -8.929, 1.094)
pt3dadd(63.851, 154.181, -8.951, 1.106)
pt3dadd(63.798, 154.076, -8.973, 1.116)
pt3dadd(63.746, 153.972, -8.995, 1.128)
pt3dadd(63.72, 153.858, -9.014, 1.138)
pt3dadd(63.703, 153.742, -9.033, 1.146)
pt3dadd(63.685, 153.625, -9.051, 1.156)
pt3dadd(63.668, 153.509, -9.07, 1.166)
pt3dadd(63.65, 153.391, -9.089, 1.174)
pt3dadd(63.621, 153.277, -9.102, 1.182)
pt3dadd(63.574, 153.168, -9.109, 1.186)
pt3dadd(63.527, 153.058, -9.116, 1.192)
pt3dadd(63.48, 152.947, -9.122, 1.196)
pt3dadd(63.433, 152.838, -9.129, 1.202)
pt3dadd(63.374, 152.736, -9.138, 1.204)
pt3dadd(63.289, 152.653, -9.152, 1.198)
pt3dadd(63.204, 152.57, -9.167, 1.192)
pt3dadd(63.118, 152.488, -9.182, 1.186)
pt3dadd(63.033, 152.406, -9.197, 1.182)
pt3dadd(62.977, 152.302, -9.2, 1.172)
pt3dadd(62.931, 152.191, -9.2, 1.16)
pt3dadd(62.867, 152.092, -9.2, 1.138)
pt3dadd(62.786, 152.003, -9.2, 1.102)
pt3dadd(62.719, 151.906, -9.2, 1.068)
pt3dadd(62.68, 151.793, -9.2, 1.036)
pt3dadd(62.64, 151.68, -9.2, 1.004)
pt3dadd(62.64, 151.576, -9.251, 0.958)
pt3dadd(62.64, 151.472, -9.302, 0.912)
pt3dadd(62.566, 151.447, -9.364, 0.892)
pt3dadd(62.476, 151.439, -9.43, 0.878)
pt3dadd(62.386, 151.432, -9.495, 0.862)
pt3dadd(62.311, 151.402, -9.564, 0.848)
pt3dadd(62.259, 151.342, -9.639, 0.834)
pt3dadd(62.22, 151.254, -9.694, 0.822)
pt3dadd(62.189, 151.151, -9.737, 0.812)
pt3dadd(62.16, 151.049, -9.783, 0.804)
pt3dadd(62.16, 150.982, -9.865, 0.804)
pt3dadd(62.16, 150.913, -9.948, 0.804)
pt3dadd(62.156, 150.81, -9.996, 0.86)
pt3dadd(62.13, 150.706, -10.04, 0.892)
pt3dadd(62.103, 150.6, -10.083, 0.924)
pt3dadd(62.077, 150.496, -10.127, 0.958)
pt3dadd(62.051, 150.391, -10.17, 0.99)
pt3dadd(62.04, 150.283, -10.212, 1.026)
pt3dadd(62.04, 150.173, -10.252, 1.064)
pt3dadd(62.04, 150.062, -10.291, 1.102)
pt3dadd(62.04, 149.952, -10.331, 1.14)
pt3dadd(62.04, 149.843, -10.37, 1.178)
pt3dadd(62.04, 149.742, -10.42, 1.212)
pt3dadd(62.04, 149.67, -10.5, 1.244)
pt3dadd(62.04, 149.598, -10.58, 1.274)
pt3dadd(62.04, 149.526, -10.66, 1.304)
pt3dadd(62.04, 149.454, -10.74, 1.334)
pt3dadd(62.04, 149.383, -10.821, 1.36)
pt3dadd(62.04, 149.317, -10.905, 1.38)
pt3dadd(62.04, 149.251, -10.988, 1.4)
pt3dadd(62.04, 149.185, -11.072, 1.42)
pt3dadd(62.04, 149.119, -11.155, 1.44)
pt3dadd(62.04, 149.05, -11.236, 1.458)
pt3dadd(62.04, 148.967, -11.308, 1.468)
pt3dadd(62.04, 148.883, -11.38, 1.478)
}
}
proc shape3d_63() {
apic[11] { pt3dadd(62.04, 148.8, -11.452, 1.488)
pt3dadd(62.04, 148.716, -11.524, 1.5)
pt3dadd(62.04, 148.631, -11.594, 1.512)
pt3dadd(62.04, 148.54, -11.659, 1.532)
pt3dadd(62.04, 148.448, -11.724, 1.552)
pt3dadd(62.04, 148.357, -11.789, 1.572)
pt3dadd(62.04, 148.266, -11.854, 1.592)
pt3dadd(62.04, 148.183, -11.925, 1.612)
pt3dadd(62.04, 148.123, -12.011, 1.626)
pt3dadd(62.04, 148.063, -12.098, 1.64)
pt3dadd(62.04, 148.003, -12.185, 1.656)
pt3dadd(62.04, 147.943, -12.271, 1.67)
pt3dadd(62.04, 147.882, -12.357, 1.684)
pt3dadd(62.04, 147.806, -12.435, 1.694)
pt3dadd(62.04, 147.732, -12.513, 1.704)
pt3dadd(62.04, 147.656, -12.591, 1.714)
pt3dadd(62.04, 147.582, -12.669, 1.724)
pt3dadd(62.04, 147.502, -12.742, 1.732)
pt3dadd(62.04, 147.398, -12.793, 1.732)
pt3dadd(62.04, 147.295, -12.844, 1.732)
pt3dadd(62.04, 147.227, -12.926, 1.744)
pt3dadd(62.04, 147.158, -13.008, 1.756)
pt3dadd(62.04, 147.096, -13.094, 1.768)
pt3dadd(62.04, 147.036, -13.18, 1.778)
pt3dadd(62.04, 147.011, -13.275, 1.782)
pt3dadd(62.04, 147.006, -13.375, 1.782)
pt3dadd(62.04, 147.001, -13.475, 1.782)
pt3dadd(62.04, 146.982, -13.573, 1.772)
pt3dadd(62.04, 146.958, -13.671, 1.758)
pt3dadd(62.04, 146.916, -13.765, 1.754)
pt3dadd(62.04, 146.875, -13.859, 1.748)
pt3dadd(62.04, 146.833, -13.952, 1.744)
pt3dadd(62.04, 146.791, -14.046, 1.74)
pt3dadd(62.04, 146.75, -14.14, 1.734)
pt3dadd(62.04, 146.701, -14.231, 1.736)
pt3dadd(62.04, 146.647, -14.321, 1.74)
pt3dadd(62.04, 146.594, -14.41, 1.746)
pt3dadd(62.04, 146.54, -14.499, 1.75)
pt3dadd(62.04, 146.486, -14.589, 1.754)
pt3dadd(62.031, 146.44, -14.68, 1.758)
pt3dadd(62.006, 146.405, -14.773, 1.758)
pt3dadd(61.982, 146.369, -14.866, 1.758)
pt3dadd(61.957, 146.334, -14.96, 1.758)
pt3dadd(61.932, 146.298, -15.053, 1.758)
pt3dadd(61.92, 146.262, -15.147, 1.754)
pt3dadd(61.92, 146.226, -15.243, 1.744)
pt3dadd(61.92, 146.191, -15.338, 1.736)
pt3dadd(61.92, 146.155, -15.434, 1.726)
pt3dadd(61.92, 146.119, -15.529, 1.718)
pt3dadd(61.92, 146.083, -15.625, 1.708)
pt3dadd(61.901, 146.074, -15.723, 1.696)
pt3dadd(61.88, 146.066, -15.821, 1.682)
pt3dadd(61.859, 146.06, -15.919, 1.67)
pt3dadd(61.839, 146.053, -16.018, 1.656)
pt3dadd(61.818, 146.046, -16.116, 1.644)
pt3dadd(61.797, 146.04, -16.214, 1.634)
pt3dadd(61.777, 146.04, -16.313, 1.642)
pt3dadd(61.758, 146.04, -16.412, 1.65)
pt3dadd(61.738, 146.04, -16.51, 1.658)
pt3dadd(61.718, 146.04, -16.609, 1.666)
pt3dadd(61.698, 146.04, -16.708, 1.674)
pt3dadd(61.679, 146.04, -16.806, 1.684)
pt3dadd(61.667, 146.04, -16.906, 1.72)
pt3dadd(61.654, 146.04, -17.005, 1.756)
pt3dadd(61.641, 146.04, -17.104, 1.792)
pt3dadd(61.629, 146.04, -17.204, 1.826)
pt3dadd(61.616, 146.04, -17.303, 1.862)
pt3dadd(61.603, 146.04, -17.403, 1.898)
pt3dadd(61.596, 146.04, -17.503, 1.938)
pt3dadd(61.59, 146.04, -17.602, 1.978)
pt3dadd(61.584, 146.04, -17.702, 2.02)
pt3dadd(61.578, 146.04, -17.802, 2.062)
pt3dadd(61.572, 146.04, -17.902, 2.102)
pt3dadd(61.566, 146.04, -18.002, 2.144)
pt3dadd(61.56, 146.04, -18.102, 2.184)
pt3dadd(61.56, 146.04, -18.202, 2.204)
pt3dadd(61.56, 146.04, -18.302, 2.22)
pt3dadd(61.56, 146.04, -18.402, 2.238)
pt3dadd(61.56, 146.04, -18.502, 2.256)
pt3dadd(61.56, 146.04, -18.602, 2.274)
pt3dadd(61.56, 146.04, -18.702, 2.292)
pt3dadd(61.56, 146.04, -18.802, 2.31)
pt3dadd(61.56, 146.04, -18.902, 2.294)
pt3dadd(61.56, 146.04, -19.002, 2.276)
pt3dadd(61.56, 146.04, -19.102, 2.258)
pt3dadd(61.545, 146.04, -19.201, 2.202)
pt3dadd(61.53, 146.04, -19.3, 2.146)
pt3dadd(61.507, 146.04, -19.398, 2.092)
pt3dadd(61.467, 146.04, -19.492, 2.038)
pt3dadd(61.428, 146.04, -19.587, 1.986)
pt3dadd(61.333, 146.06, -19.645, 1.92)
pt3dadd(61.236, 146.082, -19.701, 1.856)
pt3dadd(61.133, 146.134, -19.727, 1.758)
pt3dadd(61.021, 146.155, -19.756, 1.69)
pt3dadd(60.907, 146.167, -19.786, 1.634)
pt3dadd(60.803, 146.201, -19.823, 1.578)
pt3dadd(60.708, 146.252, -19.865, 1.522)
pt3dadd(60.641, 146.272, -19.941, 1.49)
pt3dadd(60.585, 146.278, -20.029, 1.466)
pt3dadd(60.541, 146.28, -20.122, 1.438)
pt3dadd(60.508, 146.28, -20.218, 1.408)
pt3dadd(60.48, 146.28, -20.314, 1.378)
pt3dadd(60.48, 146.28, -20.414, 1.352)
pt3dadd(60.472, 146.284, -20.513, 1.33)
pt3dadd(60.42, 146.31, -20.6, 1.318)
pt3dadd(60.368, 146.336, -20.687, 1.308)
pt3dadd(60.315, 146.363, -20.774, 1.296)
pt3dadd(60.263, 146.388, -20.862, 1.286)
pt3dadd(60.216, 146.414, -20.951, 1.28)
pt3dadd(60.174, 146.44, -21.042, 1.28)
pt3dadd(60.132, 146.465, -21.134, 1.28)
pt3dadd(60.09, 146.49, -21.225, 1.28)
pt3dadd(60.048, 146.515, -21.316, 1.28)
pt3dadd(60.017, 146.52, -21.412, 1.28)
pt3dadd(59.99, 146.52, -21.51, 1.28)
pt3dadd(59.963, 146.52, -21.607, 1.28)
pt3dadd(59.935, 146.52, -21.704, 1.28)
pt3dadd(59.908, 146.52, -21.802, 1.28)
pt3dadd(59.88, 146.52, -21.899, 1.28)
pt3dadd(59.854, 146.468, -21.986, 1.27)
pt3dadd(59.828, 146.416, -22.074, 1.258)
pt3dadd(59.802, 146.364, -22.161, 1.248)
pt3dadd(59.775, 146.311, -22.248, 1.236)
pt3dadd(59.76, 146.251, -22.333, 1.222)
pt3dadd(59.76, 146.179, -22.413, 1.202)
pt3dadd(59.76, 146.107, -22.493, 1.182)
pt3dadd(59.76, 146.035, -22.573, 1.162)
pt3dadd(59.76, 145.963, -22.653, 1.142)
pt3dadd(59.76, 145.882, -22.725, 1.102)
pt3dadd(59.76, 145.788, -22.788, 1.03)
pt3dadd(59.76, 145.711, -22.86, 0.966)
pt3dadd(59.76, 145.678, -22.956, 0.914)
pt3dadd(59.76, 145.645, -23.052, 0.862)
pt3dadd(59.782, 145.607, -23.145, 0.834)
pt3dadd(59.808, 145.568, -23.237, 0.808)
pt3dadd(59.898, 145.523, -23.273, 0.814)
pt3dadd(60.005, 145.476, -23.296, 0.826)
pt3dadd(60.085, 145.423, -23.352, 0.856)
pt3dadd(60.158, 145.368, -23.417, 0.89)
pt3dadd(60.231, 145.313, -23.481, 0.926)
pt3dadd(60.24, 145.272, -23.572, 0.958)
pt3dadd(60.24, 145.232, -23.667, 0.99)
pt3dadd(60.24, 145.184, -23.759, 1.004)
pt3dadd(60.24, 145.132, -23.848, 1.004)
pt3dadd(60.24, 145.078, -23.937, 1.004)
pt3dadd(60.24, 145, -24.009, 0.978)
pt3dadd(60.24, 144.9, -24.066, 0.932)
pt3dadd(60.24, 144.798, -24.118, 0.864)
pt3dadd(60.24, 144.694, -24.167, 0.828)
pt3dadd(60.24, 144.592, -24.22, 0.828)
pt3dadd(60.24, 144.49, -24.272, 0.828)
pt3dadd(60.24, 144.388, -24.324, 0.828)
pt3dadd(60.24, 144.286, -24.377, 0.828)
pt3dadd(60.24, 144.174, -24.409, 0.836)
pt3dadd(60.24, 144.055, -24.426, 0.848)
pt3dadd(60.24, 143.938, -24.442, 0.86)
pt3dadd(60.24, 143.819, -24.458, 0.872)
pt3dadd(60.24, 143.701, -24.475, 0.886)
pt3dadd(60.24, 143.582, -24.491, 0.898)
pt3dadd(60.24, 143.465, -24.51, 0.904)
pt3dadd(60.24, 143.347, -24.53, 0.904)
pt3dadd(60.24, 143.23, -24.551, 0.904)
pt3dadd(60.24, 143.112, -24.572, 0.904)
pt3dadd(60.24, 142.994, -24.593, 0.904)
pt3dadd(60.24, 142.877, -24.613, 0.904)
pt3dadd(60.24, 142.768, -24.651, 0.89)
pt3dadd(60.24, 142.664, -24.702, 0.868)
pt3dadd(60.238, 142.556, -24.744, 0.846)
pt3dadd(60.232, 142.442, -24.773, 0.824)
pt3dadd(60.224, 142.327, -24.8, 0.804)
pt3dadd(60.178, 142.217, -24.8, 0.816)
pt3dadd(60.131, 142.106, -24.8, 0.826)
pt3dadd(60.048, 142.022, -24.8, 0.846)
pt3dadd(59.955, 141.948, -24.8, 0.87)
pt3dadd(59.861, 141.874, -24.8, 0.868)
pt3dadd(59.772, 141.793, -24.8, 0.85)
pt3dadd(59.705, 141.695, -24.8, 0.826)
pt3dadd(59.635, 141.596, -24.801, 0.802)
pt3dadd(59.537, 141.534, -24.824, 0.79)
pt3dadd(59.45, 141.48, -24.859, 0.782)
pt3dadd(59.43, 141.48, -24.957, 0.8)
pt3dadd(59.409, 141.48, -25.056, 0.82)
pt3dadd(59.367, 141.48, -25.147, 0.842)
pt3dadd(59.306, 141.48, -25.234, 0.864)
pt3dadd(59.224, 141.48, -25.293, 0.888)
pt3dadd(59.105, 141.48, -25.306, 0.916)
pt3dadd(58.991, 141.48, -25.333, 0.948)
pt3dadd(58.88, 141.48, -25.372, 0.98)
pt3dadd(58.783, 141.48, -25.424, 1.02)
pt3dadd(58.722, 141.48, -25.51, 1.078)
pt3dadd(58.659, 141.48, -25.594, 1.134)
pt3dadd(58.56, 141.48, -25.65, 1.18)
pt3dadd(58.461, 141.48, -25.707, 1.226)
pt3dadd(58.376, 141.416, -25.752, 1.256)
pt3dadd(58.297, 141.342, -25.79, 1.284)
pt3dadd(58.24, 141.238, -25.798, 1.302)
pt3dadd(58.174, 141.174, -25.854, 1.316)
pt3dadd(58.106, 141.121, -25.924, 1.328)
pt3dadd(58.038, 141.07, -25.994, 1.34)
pt3dadd(57.97, 141.018, -26.064, 1.352)
}
}
proc shape3d_64() {
apic[11] { pt3dadd(57.89, 140.956, -26.115, 1.364)
pt3dadd(57.803, 140.888, -26.155, 1.376)
pt3dadd(57.717, 140.821, -26.195, 1.388)
pt3dadd(57.63, 140.754, -26.236, 1.4)
pt3dadd(57.534, 140.712, -26.279, 1.408)
pt3dadd(57.43, 140.694, -26.326, 1.414)
pt3dadd(57.325, 140.677, -26.373, 1.42)
pt3dadd(57.221, 140.66, -26.42, 1.424)
pt3dadd(57.116, 140.644, -26.468, 1.43)
pt3dadd(57.032, 140.621, -26.535, 1.436)
pt3dadd(56.954, 140.597, -26.608, 1.442)
pt3dadd(56.875, 140.573, -26.681, 1.448)
pt3dadd(56.797, 140.549, -26.754, 1.452)
pt3dadd(56.722, 140.532, -26.83, 1.458)
pt3dadd(56.655, 140.53, -26.913, 1.464)
pt3dadd(56.588, 140.527, -26.996, 1.468)
pt3dadd(56.521, 140.525, -27.079, 1.474)
pt3dadd(56.454, 140.521, -27.161, 1.478)
pt3dadd(56.374, 140.52, -27.234, 1.486)
pt3dadd(56.275, 140.52, -27.29, 1.498)
pt3dadd(56.196, 140.52, -27.357, 1.502)
pt3dadd(56.181, 140.52, -27.457, 1.484)
pt3dadd(56.167, 140.52, -27.556, 1.464)
pt3dadd(56.126, 140.52, -27.648, 1.432)
pt3dadd(56.066, 140.52, -27.734, 1.386)
pt3dadd(55.984, 140.52, -27.797, 1.33)
pt3dadd(55.867, 140.52, -27.819, 1.26)
pt3dadd(55.75, 140.52, -27.841, 1.19)
pt3dadd(55.667, 140.534, -27.908, 1.148)
pt3dadd(55.589, 140.55, -27.983, 1.108)
pt3dadd(55.511, 140.567, -28.058, 1.07)
pt3dadd(55.446, 140.636, -28.092, 1.034)
pt3dadd(55.39, 140.742, -28.097, 0.998)
pt3dadd(55.343, 140.851, -28.107, 0.98)
pt3dadd(55.307, 140.928, -28.169, 0.98)
pt3dadd(55.271, 140.994, -28.248, 0.98)
pt3dadd(55.181, 141.046, -28.294, 1.016)
pt3dadd(55.093, 141.102, -28.336, 1.06)
pt3dadd(55.087, 141.217, -28.364, 1.124)
pt3dadd(55.081, 141.332, -28.393, 1.19)
pt3dadd(55.092, 141.45, -28.403, 1.25)
pt3dadd(55.107, 141.569, -28.408, 1.308)
pt3dadd(55.13, 141.683, -28.419, 1.352)
pt3dadd(55.186, 141.773, -28.466, 1.332)
pt3dadd(55.192, 141.89, -28.48, 1.254)
pt3dadd(55.197, 142.009, -28.492, 1.176)
pt3dadd(55.206, 142.129, -28.5, 1.092)
pt3dadd(55.221, 142.248, -28.5, 0.998)
pt3dadd(55.236, 142.367, -28.5, 0.904)
pt3dadd(55.264, 142.482, -28.488, 0.834)
pt3dadd(55.297, 142.595, -28.471, 0.77)
pt3dadd(55.268, 142.687, -28.426, 0.732)
pt3dadd(55.215, 142.77, -28.369, 0.704)
pt3dadd(55.204, 142.85, -28.295, 0.668)
pt3dadd(55.202, 142.914, -28.212, 0.634)
pt3dadd(55.204, 142.969, -28.123, 0.606)
pt3dadd(55.207, 143.023, -28.034, 0.576)
pt3dadd(55.209, 143.078, -27.945, 0.546)
pt3dadd(55.212, 143.132, -27.856, 0.516)
pt3dadd(55.235, 143.184, -27.769, 0.448)
pt3dadd(55.277, 143.232, -27.684, 0.336)
pt3dadd(55.32, 143.28, -27.6, 0.226)
}
apic[12] {pt3dclear()
pt3dadd(88.164, 158.323, 9.145, 3.164)
pt3dadd(88.199, 158.431, 9.122, 3.148)
pt3dadd(88.235, 158.542, 9.099, 3.132)
pt3dadd(88.271, 158.653, 9.076, 3.116)
pt3dadd(88.307, 158.764, 9.053, 3.1)
pt3dadd(88.343, 158.875, 9.03, 3.084)
pt3dadd(88.379, 158.987, 9.007, 3.068)
pt3dadd(88.415, 159.097, 8.984, 3.052)
pt3dadd(88.451, 159.209, 8.961, 3.036)
pt3dadd(88.487, 159.319, 8.938, 3.02)
pt3dadd(88.523, 159.431, 8.915, 3.004)
pt3dadd(88.559, 159.541, 8.892, 2.988)
pt3dadd(88.596, 159.653, 8.868, 2.97)
pt3dadd(88.632, 159.763, 8.845, 2.954)
pt3dadd(88.601, 159.866, 8.825, 2.966)
pt3dadd(88.536, 159.965, 8.807, 2.99)
pt3dadd(88.47, 160.062, 8.789, 3.016)
pt3dadd(88.405, 160.16, 8.77, 3.04)
pt3dadd(88.34, 160.259, 8.752, 3.064)
pt3dadd(88.274, 160.357, 8.734, 3.09)
pt3dadd(88.209, 160.456, 8.715, 3.114)
pt3dadd(88.143, 160.554, 8.697, 3.14)
pt3dadd(88.078, 160.651, 8.679, 3.164)
pt3dadd(88.013, 160.75, 8.66, 3.188)
pt3dadd(87.947, 160.846, 8.637, 3.218)
pt3dadd(87.88, 160.943, 8.614, 3.248)
pt3dadd(87.814, 161.039, 8.591, 3.278)
pt3dadd(87.748, 161.135, 8.568, 3.308)
pt3dadd(87.682, 161.231, 8.545, 3.336)
pt3dadd(87.616, 161.327, 8.522, 3.366)
pt3dadd(87.55, 161.424, 8.499, 3.396)
pt3dadd(87.484, 161.52, 8.476, 3.426)
pt3dadd(87.417, 161.616, 8.453, 3.456)
pt3dadd(87.351, 161.712, 8.43, 3.486)
pt3dadd(87.301, 161.812, 8.392, 3.52)
pt3dadd(87.25, 161.91, 8.354, 3.556)
pt3dadd(87.2, 162.01, 8.317, 3.592)
pt3dadd(87.149, 162.108, 8.279, 3.628)
pt3dadd(87.099, 162.208, 8.241, 3.664)
pt3dadd(87.048, 162.306, 8.203, 3.7)
pt3dadd(86.998, 162.406, 8.165, 3.734)
pt3dadd(86.947, 162.504, 8.128, 3.77)
pt3dadd(86.897, 162.604, 8.09, 3.806)
pt3dadd(86.846, 162.702, 8.052, 3.842)
}
apic[13] {pt3dclear()
pt3dadd(86.846, 162.702, 8.052, 3.842)
pt3dadd(86.83, 162.726, 8.047, 3.838)
pt3dadd(86.765, 162.824, 8.026, 3.822)
pt3dadd(86.7, 162.922, 8.004, 3.806)
pt3dadd(86.635, 163.019, 7.983, 3.792)
pt3dadd(86.57, 163.117, 7.962, 3.776)
pt3dadd(86.504, 163.214, 7.941, 3.76)
pt3dadd(86.439, 163.312, 7.92, 3.744)
pt3dadd(86.374, 163.409, 7.898, 3.73)
pt3dadd(86.309, 163.507, 7.877, 3.714)
pt3dadd(86.244, 163.604, 7.856, 3.698)
pt3dadd(86.179, 163.702, 7.835, 3.682)
pt3dadd(86.114, 163.8, 7.814, 3.666)
pt3dadd(86.048, 163.897, 7.793, 3.652)
pt3dadd(85.983, 163.994, 7.771, 3.636)
pt3dadd(85.918, 164.092, 7.75, 3.62)
pt3dadd(85.849, 164.188, 7.736, 3.616)
pt3dadd(85.777, 164.284, 7.725, 3.616)
pt3dadd(85.706, 164.38, 7.714, 3.616)
pt3dadd(85.635, 164.476, 7.703, 3.616)
pt3dadd(85.564, 164.57, 7.692, 3.616)
pt3dadd(85.493, 164.666, 7.681, 3.616)
pt3dadd(85.422, 164.762, 7.67, 3.616)
pt3dadd(85.35, 164.858, 7.658, 3.616)
pt3dadd(85.279, 164.953, 7.647, 3.616)
pt3dadd(85.208, 165.049, 7.636, 3.616)
pt3dadd(85.142, 165.149, 7.627, 3.602)
pt3dadd(85.079, 165.251, 7.618, 3.584)
pt3dadd(85.016, 165.352, 7.61, 3.566)
pt3dadd(84.952, 165.454, 7.601, 3.548)
pt3dadd(84.889, 165.554, 7.593, 3.53)
pt3dadd(84.825, 165.656, 7.584, 3.512)
pt3dadd(84.762, 165.757, 7.575, 3.494)
pt3dadd(84.698, 165.858, 7.567, 3.478)
pt3dadd(84.635, 165.96, 7.558, 3.458)
pt3dadd(84.572, 166.061, 7.55, 3.442)
pt3dadd(84.513, 166.165, 7.542, 3.408)
pt3dadd(84.455, 166.271, 7.535, 3.372)
pt3dadd(84.398, 166.375, 7.528, 3.336)
pt3dadd(84.34, 166.481, 7.521, 3.298)
pt3dadd(84.282, 166.585, 7.514, 3.262)
pt3dadd(84.225, 166.691, 7.507, 3.224)
pt3dadd(84.168, 166.795, 7.501, 3.188)
pt3dadd(84.11, 166.9, 7.494, 3.152)
pt3dadd(84.052, 167.005, 7.487, 3.114)
pt3dadd(83.995, 167.11, 7.48, 3.078)
pt3dadd(83.932, 167.212, 7.471, 3.032)
pt3dadd(83.868, 167.312, 7.461, 2.984)
pt3dadd(83.804, 167.413, 7.451, 2.936)
pt3dadd(83.74, 167.514, 7.441, 2.886)
pt3dadd(83.676, 167.615, 7.431, 2.838)
pt3dadd(83.611, 167.716, 7.421, 2.79)
pt3dadd(83.547, 167.816, 7.412, 2.742)
pt3dadd(83.483, 167.917, 7.402, 2.694)
pt3dadd(83.419, 168.018, 7.392, 2.644)
pt3dadd(83.355, 168.119, 7.382, 2.596)
pt3dadd(83.3, 168.22, 7.357, 2.588)
pt3dadd(83.247, 168.322, 7.328, 2.59)
pt3dadd(83.194, 168.424, 7.299, 2.594)
pt3dadd(83.142, 168.526, 7.27, 2.596)
pt3dadd(83.089, 168.628, 7.24, 2.6)
pt3dadd(83.036, 168.73, 7.211, 2.602)
pt3dadd(82.983, 168.832, 7.182, 2.606)
pt3dadd(82.931, 168.934, 7.153, 2.608)
pt3dadd(82.878, 169.036, 7.123, 2.612)
pt3dadd(82.825, 169.138, 7.094, 2.614)
pt3dadd(82.768, 169.237, 7.066, 2.628)
pt3dadd(82.71, 169.337, 7.037, 2.644)
pt3dadd(82.651, 169.435, 7.009, 2.66)
pt3dadd(82.593, 169.535, 6.981, 2.676)
pt3dadd(82.534, 169.633, 6.952, 2.692)
pt3dadd(82.476, 169.733, 6.924, 2.708)
pt3dadd(82.417, 169.832, 6.896, 2.724)
pt3dadd(82.359, 169.931, 6.867, 2.74)
pt3dadd(82.3, 170.03, 6.839, 2.756)
pt3dadd(82.242, 170.129, 6.811, 2.772)
pt3dadd(82.173, 170.224, 6.79, 2.786)
pt3dadd(82.102, 170.318, 6.771, 2.802)
pt3dadd(82.032, 170.412, 6.751, 2.816)
pt3dadd(81.961, 170.507, 6.731, 2.832)
pt3dadd(81.891, 170.602, 6.712, 2.846)
pt3dadd(81.82, 170.695, 6.692, 2.862)
pt3dadd(81.75, 170.79, 6.672, 2.876)
pt3dadd(81.68, 170.884, 6.653, 2.892)
pt3dadd(81.609, 170.978, 6.633, 2.908)
pt3dadd(81.539, 171.072, 6.613, 2.922)
pt3dadd(81.461, 171.163, 6.603, 2.926)
pt3dadd(81.383, 171.253, 6.593, 2.926)
pt3dadd(81.304, 171.343, 6.583, 2.928)
pt3dadd(81.226, 171.433, 6.573, 2.93)
pt3dadd(81.148, 171.523, 6.564, 2.93)
pt3dadd(81.069, 171.613, 6.554, 2.932)
pt3dadd(80.991, 171.703, 6.544, 2.934)
pt3dadd(80.913, 171.793, 6.534, 2.936)
}
}
proc shape3d_65() {
apic[13] { pt3dadd(80.834, 171.883, 6.524, 2.936)
pt3dadd(80.756, 171.974, 6.514, 2.938)
pt3dadd(80.675, 172.062, 6.508, 2.934)
pt3dadd(80.594, 172.151, 6.502, 2.93)
pt3dadd(80.513, 172.238, 6.495, 2.924)
pt3dadd(80.433, 172.327, 6.489, 2.92)
pt3dadd(80.352, 172.416, 6.483, 2.916)
pt3dadd(80.271, 172.504, 6.477, 2.912)
pt3dadd(80.19, 172.592, 6.47, 2.906)
pt3dadd(80.109, 172.681, 6.464, 2.902)
pt3dadd(80.028, 172.769, 6.458, 2.898)
pt3dadd(79.947, 172.858, 6.452, 2.894)
pt3dadd(79.863, 172.943, 6.45, 2.88)
pt3dadd(79.779, 173.029, 6.449, 2.866)
pt3dadd(79.695, 173.114, 6.448, 2.852)
pt3dadd(79.611, 173.2, 6.447, 2.84)
pt3dadd(79.527, 173.285, 6.446, 2.826)
pt3dadd(79.443, 173.371, 6.445, 2.812)
pt3dadd(79.359, 173.456, 6.444, 2.798)
pt3dadd(79.275, 173.542, 6.443, 2.784)
pt3dadd(79.19, 173.628, 6.442, 2.77)
pt3dadd(79.106, 173.713, 6.441, 2.756)
pt3dadd(79.023, 173.8, 6.439, 2.744)
pt3dadd(78.939, 173.885, 6.438, 2.73)
pt3dadd(78.855, 173.971, 6.436, 2.716)
pt3dadd(78.772, 174.058, 6.434, 2.702)
pt3dadd(78.688, 174.143, 6.432, 2.688)
pt3dadd(78.604, 174.229, 6.431, 2.674)
pt3dadd(78.521, 174.316, 6.429, 2.66)
pt3dadd(78.437, 174.402, 6.427, 2.646)
pt3dadd(78.354, 174.487, 6.425, 2.632)
pt3dadd(78.27, 174.574, 6.424, 2.62)
pt3dadd(78.187, 174.66, 6.421, 2.606)
pt3dadd(78.103, 174.746, 6.419, 2.592)
pt3dadd(78.02, 174.833, 6.417, 2.578)
pt3dadd(77.937, 174.919, 6.415, 2.564)
pt3dadd(77.853, 175.006, 6.412, 2.55)
pt3dadd(77.77, 175.091, 6.41, 2.536)
pt3dadd(77.687, 175.177, 6.408, 2.522)
pt3dadd(77.603, 175.264, 6.406, 2.508)
pt3dadd(77.52, 175.35, 6.404, 2.494)
pt3dadd(77.437, 175.436, 6.401, 2.482)
pt3dadd(77.355, 175.524, 6.396, 2.468)
pt3dadd(77.274, 175.613, 6.391, 2.452)
pt3dadd(77.193, 175.7, 6.386, 2.438)
pt3dadd(77.112, 175.789, 6.38, 2.424)
pt3dadd(77.03, 175.877, 6.375, 2.41)
pt3dadd(76.949, 175.966, 6.37, 2.396)
pt3dadd(76.868, 176.053, 6.365, 2.382)
pt3dadd(76.787, 176.141, 6.359, 2.368)
pt3dadd(76.705, 176.23, 6.354, 2.354)
pt3dadd(76.624, 176.317, 6.349, 2.34)
pt3dadd(76.544, 176.406, 6.342, 2.344)
pt3dadd(76.464, 176.496, 6.335, 2.348)
pt3dadd(76.384, 176.585, 6.328, 2.354)
pt3dadd(76.304, 176.674, 6.321, 2.358)
pt3dadd(76.224, 176.762, 6.314, 2.364)
pt3dadd(76.145, 176.852, 6.307, 2.368)
pt3dadd(76.065, 176.941, 6.3, 2.372)
pt3dadd(75.985, 177.03, 6.294, 2.378)
pt3dadd(75.905, 177.12, 6.287, 2.382)
pt3dadd(75.825, 177.209, 6.28, 2.388)
pt3dadd(75.747, 177.299, 6.271, 2.414)
pt3dadd(75.668, 177.389, 6.262, 2.444)
pt3dadd(75.59, 177.48, 6.253, 2.472)
pt3dadd(75.512, 177.57, 6.244, 2.502)
pt3dadd(75.433, 177.66, 6.235, 2.53)
pt3dadd(75.355, 177.75, 6.226, 2.56)
pt3dadd(75.277, 177.841, 6.217, 2.588)
pt3dadd(75.198, 177.931, 6.208, 2.618)
pt3dadd(75.12, 178.021, 6.199, 2.646)
pt3dadd(75.042, 178.111, 6.19, 2.674)
pt3dadd(74.982, 178.21, 6.161, 2.694)
pt3dadd(74.923, 178.307, 6.13, 2.71)
pt3dadd(74.865, 178.405, 6.1, 2.728)
pt3dadd(74.806, 178.504, 6.069, 2.746)
pt3dadd(74.747, 178.601, 6.038, 2.764)
pt3dadd(74.689, 178.699, 6.008, 2.78)
pt3dadd(74.63, 178.798, 5.977, 2.798)
pt3dadd(74.571, 178.896, 5.947, 2.816)
pt3dadd(74.513, 178.993, 5.916, 2.832)
pt3dadd(74.454, 179.092, 5.885, 2.85)
pt3dadd(74.394, 179.19, 5.857, 2.846)
pt3dadd(74.334, 179.288, 5.829, 2.84)
pt3dadd(74.275, 179.387, 5.801, 2.836)
pt3dadd(74.215, 179.485, 5.773, 2.83)
pt3dadd(74.155, 179.584, 5.745, 2.824)
pt3dadd(74.095, 179.682, 5.717, 2.82)
pt3dadd(74.035, 179.78, 5.689, 2.814)
pt3dadd(73.975, 179.879, 5.661, 2.808)
pt3dadd(73.915, 179.977, 5.633, 2.804)
pt3dadd(73.855, 180.076, 5.605, 2.798)
pt3dadd(73.79, 180.173, 5.584, 2.768)
pt3dadd(73.725, 180.271, 5.563, 2.736)
pt3dadd(73.66, 180.368, 5.542, 2.704)
pt3dadd(73.595, 180.466, 5.52, 2.674)
pt3dadd(73.53, 180.563, 5.499, 2.642)
pt3dadd(73.465, 180.661, 5.478, 2.61)
pt3dadd(73.4, 180.758, 5.457, 2.58)
pt3dadd(73.335, 180.856, 5.435, 2.548)
pt3dadd(73.27, 180.954, 5.414, 2.518)
pt3dadd(73.205, 181.051, 5.393, 2.486)
}
apic[14] {pt3dclear()
pt3dadd(73.205, 181.051, 5.393, 2.486)
pt3dadd(73.212, 181.037, 5.332, 2.49)
pt3dadd(73.15, 181.118, 5.291, 2.522)
pt3dadd(73.088, 181.199, 5.25, 2.552)
pt3dadd(73.026, 181.279, 5.209, 2.582)
pt3dadd(72.964, 181.361, 5.168, 2.614)
pt3dadd(72.903, 181.441, 5.128, 2.644)
pt3dadd(72.841, 181.523, 5.087, 2.674)
pt3dadd(72.779, 181.604, 5.046, 2.706)
pt3dadd(72.717, 181.685, 5.005, 2.736)
pt3dadd(72.656, 181.766, 4.964, 2.768)
pt3dadd(72.594, 181.847, 4.923, 2.798)
pt3dadd(72.532, 181.927, 4.882, 2.828)
pt3dadd(72.471, 182.009, 4.842, 2.86)
pt3dadd(72.409, 182.09, 4.801, 2.89)
pt3dadd(72.354, 182.176, 4.762, 2.898)
pt3dadd(72.306, 182.267, 4.726, 2.886)
pt3dadd(72.258, 182.357, 4.689, 2.874)
pt3dadd(72.21, 182.447, 4.653, 2.864)
pt3dadd(72.163, 182.538, 4.616, 2.852)
pt3dadd(72.115, 182.627, 4.58, 2.84)
pt3dadd(72.067, 182.718, 4.544, 2.828)
pt3dadd(72.019, 182.809, 4.507, 2.816)
pt3dadd(71.971, 182.898, 4.471, 2.804)
pt3dadd(71.923, 182.989, 4.434, 2.792)
pt3dadd(71.874, 183.079, 4.397, 2.782)
pt3dadd(71.823, 183.167, 4.359, 2.776)
pt3dadd(71.773, 183.257, 4.321, 2.768)
pt3dadd(71.722, 183.346, 4.283, 2.76)
pt3dadd(71.672, 183.434, 4.245, 2.752)
pt3dadd(71.622, 183.523, 4.207, 2.746)
pt3dadd(71.571, 183.612, 4.169, 2.738)
pt3dadd(71.521, 183.701, 4.131, 2.73)
pt3dadd(71.47, 183.79, 4.093, 2.722)
pt3dadd(71.42, 183.878, 4.056, 2.716)
pt3dadd(71.369, 183.967, 4.014, 2.712)
pt3dadd(71.318, 184.055, 3.971, 2.712)
pt3dadd(71.267, 184.141, 3.927, 2.712)
pt3dadd(71.216, 184.229, 3.883, 2.712)
pt3dadd(71.165, 184.318, 3.839, 2.712)
pt3dadd(71.114, 184.404, 3.795, 2.712)
pt3dadd(71.063, 184.492, 3.751, 2.712)
pt3dadd(71.012, 184.58, 3.707, 2.712)
pt3dadd(70.961, 184.667, 3.664, 2.712)
pt3dadd(70.91, 184.754, 3.62, 2.712)
pt3dadd(70.867, 184.843, 3.564, 2.712)
pt3dadd(70.83, 184.93, 3.5, 2.712)
pt3dadd(70.793, 185.018, 3.436, 2.712)
pt3dadd(70.755, 185.106, 3.372, 2.712)
pt3dadd(70.718, 185.194, 3.309, 2.712)
pt3dadd(70.68, 185.282, 3.245, 2.712)
pt3dadd(70.643, 185.369, 3.181, 2.712)
pt3dadd(70.606, 185.458, 3.117, 2.712)
pt3dadd(70.568, 185.546, 3.053, 2.712)
pt3dadd(70.531, 185.633, 2.989, 2.712)
pt3dadd(70.485, 185.719, 2.932, 2.712)
pt3dadd(70.432, 185.804, 2.879, 2.712)
pt3dadd(70.38, 185.887, 2.827, 2.712)
pt3dadd(70.328, 185.972, 2.774, 2.712)
pt3dadd(70.275, 186.056, 2.721, 2.712)
pt3dadd(70.223, 186.142, 2.669, 2.712)
pt3dadd(70.171, 186.226, 2.616, 2.712)
pt3dadd(70.118, 186.31, 2.564, 2.712)
pt3dadd(70.066, 186.395, 2.511, 2.712)
pt3dadd(70.014, 186.48, 2.458, 2.712)
pt3dadd(69.958, 186.562, 2.41, 2.708)
pt3dadd(69.9, 186.646, 2.365, 2.702)
pt3dadd(69.841, 186.728, 2.319, 2.698)
pt3dadd(69.783, 186.81, 2.273, 2.692)
pt3dadd(69.725, 186.893, 2.228, 2.686)
pt3dadd(69.667, 186.977, 2.182, 2.68)
pt3dadd(69.609, 187.058, 2.137, 2.676)
pt3dadd(69.551, 187.141, 2.091, 2.67)
pt3dadd(69.493, 187.223, 2.046, 2.664)
pt3dadd(69.435, 187.307, 2, 2.658)
pt3dadd(69.374, 187.388, 1.959, 2.646)
pt3dadd(69.313, 187.469, 1.921, 2.632)
pt3dadd(69.251, 187.552, 1.883, 2.616)
pt3dadd(69.19, 187.633, 1.845, 2.6)
pt3dadd(69.128, 187.714, 1.806, 2.584)
pt3dadd(69.137, 187.699, 1.777, 2.584)
pt3dadd(69.076, 187.782, 1.738, 2.57)
pt3dadd(69.014, 187.862, 1.7, 2.554)
pt3dadd(68.952, 187.944, 1.662, 2.538)
pt3dadd(68.891, 188.027, 1.624, 2.524)
pt3dadd(68.829, 188.107, 1.586, 2.508)
pt3dadd(68.777, 188.195, 1.553, 2.492)
pt3dadd(68.73, 188.285, 1.523, 2.474)
pt3dadd(68.682, 188.377, 1.493, 2.458)
pt3dadd(68.635, 188.468, 1.464, 2.44)
pt3dadd(68.588, 188.558, 1.434, 2.424)
pt3dadd(68.541, 188.65, 1.404, 2.406)
pt3dadd(68.493, 188.742, 1.374, 2.39)
pt3dadd(68.446, 188.832, 1.345, 2.372)
pt3dadd(68.399, 188.923, 1.315, 2.356)
pt3dadd(68.351, 189.014, 1.285, 2.338)
pt3dadd(68.303, 189.104, 1.257, 2.334)
pt3dadd(68.253, 189.194, 1.228, 2.336)
}
}
proc shape3d_66() {
apic[14] { pt3dadd(68.203, 189.284, 1.2, 2.338)
pt3dadd(68.154, 189.373, 1.172, 2.34)
pt3dadd(68.104, 189.463, 1.144, 2.342)
pt3dadd(68.055, 189.553, 1.116, 2.346)
pt3dadd(68.005, 189.643, 1.087, 2.348)
pt3dadd(67.955, 189.733, 1.059, 2.35)
pt3dadd(67.906, 189.822, 1.031, 2.352)
pt3dadd(67.856, 189.912, 1.003, 2.354)
pt3dadd(67.807, 190.002, 0.975, 2.366)
pt3dadd(67.757, 190.092, 0.948, 2.382)
pt3dadd(67.708, 190.182, 0.921, 2.4)
pt3dadd(67.659, 190.272, 0.894, 2.416)
pt3dadd(67.61, 190.362, 0.867, 2.432)
pt3dadd(67.56, 190.452, 0.84, 2.45)
pt3dadd(67.511, 190.542, 0.812, 2.466)
pt3dadd(67.462, 190.631, 0.785, 2.484)
pt3dadd(67.413, 190.722, 0.758, 2.5)
pt3dadd(67.363, 190.811, 0.731, 2.516)
pt3dadd(67.324, 190.906, 0.705, 2.534)
pt3dadd(67.288, 191.003, 0.681, 2.552)
pt3dadd(67.253, 191.098, 0.656, 2.57)
pt3dadd(67.217, 191.195, 0.632, 2.588)
pt3dadd(67.182, 191.292, 0.607, 2.606)
pt3dadd(67.146, 191.387, 0.583, 2.624)
pt3dadd(67.11, 191.484, 0.558, 2.642)
pt3dadd(67.075, 191.581, 0.534, 2.66)
pt3dadd(67.04, 191.676, 0.509, 2.676)
pt3dadd(67.004, 191.773, 0.485, 2.694)
pt3dadd(66.957, 191.863, 0.461, 2.638)
pt3dadd(66.906, 191.952, 0.439, 2.546)
pt3dadd(66.854, 192.041, 0.416, 2.456)
pt3dadd(66.802, 192.128, 0.394, 2.364)
pt3dadd(66.751, 192.216, 0.372, 2.274)
pt3dadd(66.699, 192.305, 0.349, 2.182)
pt3dadd(66.647, 192.392, 0.327, 2.09)
pt3dadd(66.596, 192.481, 0.304, 2)
pt3dadd(66.544, 192.57, 0.282, 1.908)
pt3dadd(66.492, 192.658, 0.259, 1.818)
pt3dadd(66.447, 192.748, 0.245, 1.792)
pt3dadd(66.404, 192.839, 0.236, 1.798)
pt3dadd(66.362, 192.929, 0.226, 1.802)
pt3dadd(66.319, 193.02, 0.216, 1.808)
pt3dadd(66.276, 193.11, 0.206, 1.812)
pt3dadd(66.234, 193.201, 0.196, 1.818)
pt3dadd(66.191, 193.292, 0.186, 1.822)
pt3dadd(66.148, 193.382, 0.177, 1.828)
pt3dadd(66.106, 193.474, 0.167, 1.832)
pt3dadd(66.063, 193.565, 0.157, 1.838)
pt3dadd(66.023, 193.655, 0.151, 1.902)
pt3dadd(65.984, 193.746, 0.146, 1.984)
pt3dadd(65.944, 193.837, 0.141, 2.066)
pt3dadd(65.905, 193.927, 0.136, 2.148)
pt3dadd(65.865, 194.018, 0.131, 2.228)
pt3dadd(65.826, 194.11, 0.126, 2.31)
pt3dadd(65.787, 194.2, 0.121, 2.392)
pt3dadd(65.748, 194.291, 0.116, 2.472)
pt3dadd(65.708, 194.381, 0.111, 2.554)
pt3dadd(65.669, 194.472, 0.106, 2.636)
pt3dadd(65.617, 194.56, 0.088, 2.704)
pt3dadd(65.563, 194.646, 0.069, 2.768)
pt3dadd(65.509, 194.732, 0.049, 2.834)
pt3dadd(65.455, 194.82, 0.03, 2.9)
pt3dadd(65.402, 194.905, 0.01, 2.964)
pt3dadd(65.348, 194.993, -0.01, 3.03)
pt3dadd(65.294, 195.079, -0.029, 3.096)
pt3dadd(65.24, 195.164, -0.049, 3.16)
pt3dadd(65.186, 195.252, -0.068, 3.226)
pt3dadd(65.132, 195.338, -0.088, 3.292)
pt3dadd(65.091, 195.428, -0.136, 3.268)
pt3dadd(65.051, 195.52, -0.189, 3.228)
pt3dadd(65.012, 195.611, -0.242, 3.188)
pt3dadd(64.972, 195.702, -0.295, 3.148)
pt3dadd(64.933, 195.793, -0.349, 3.11)
pt3dadd(64.893, 195.884, -0.402, 3.07)
pt3dadd(64.854, 195.976, -0.455, 3.03)
pt3dadd(64.815, 196.068, -0.508, 2.992)
pt3dadd(64.775, 196.158, -0.562, 2.952)
pt3dadd(64.736, 196.249, -0.615, 2.912)
pt3dadd(64.686, 196.334, -0.67, 2.866)
pt3dadd(64.636, 196.418, -0.725, 2.82)
pt3dadd(64.585, 196.504, -0.781, 2.772)
pt3dadd(64.535, 196.588, -0.836, 2.726)
pt3dadd(64.485, 196.673, -0.891, 2.68)
pt3dadd(64.435, 196.758, -0.947, 2.634)
pt3dadd(64.385, 196.842, -1.002, 2.586)
pt3dadd(64.334, 196.927, -1.058, 2.54)
pt3dadd(64.284, 197.012, -1.113, 2.494)
pt3dadd(64.234, 197.096, -1.168, 2.446)
pt3dadd(64.176, 197.178, -1.222, 2.406)
pt3dadd(64.119, 197.258, -1.275, 2.364)
pt3dadd(64.061, 197.339, -1.329, 2.322)
pt3dadd(64.003, 197.42, -1.382, 2.282)
pt3dadd(63.946, 197.501, -1.436, 2.24)
pt3dadd(63.888, 197.581, -1.49, 2.198)
pt3dadd(63.831, 197.662, -1.543, 2.158)
pt3dadd(63.773, 197.742, -1.597, 2.116)
pt3dadd(63.715, 197.822, -1.65, 2.076)
pt3dadd(63.658, 197.904, -1.704, 2.034)
pt3dadd(63.667, 197.888, -1.733, 2.034)
pt3dadd(63.676, 197.874, -1.763, 2.034)
pt3dadd(63.685, 197.86, -1.793, 2.034)
pt3dadd(63.695, 197.844, -1.823, 2.034)
pt3dadd(63.704, 197.83, -1.852, 2.034)
pt3dadd(63.713, 197.815, -1.882, 1.388)
pt3dadd(63.722, 197.8, -1.912, 1.388)
pt3dadd(63.732, 197.905, -1.941, 1.456)
pt3dadd(63.741, 198.011, -1.971, 1.526)
pt3dadd(63.75, 198.115, -2.001, 1.594)
pt3dadd(63.759, 198.221, -2.03, 1.662)
pt3dadd(63.768, 198.325, -2.06, 1.73)
pt3dadd(63.777, 198.431, -2.09, 1.798)
pt3dadd(63.759, 198.529, -2.12, 1.852)
pt3dadd(63.712, 198.62, -2.149, 1.89)
pt3dadd(63.665, 198.712, -2.179, 1.93)
pt3dadd(63.617, 198.803, -2.209, 1.968)
pt3dadd(63.57, 198.893, -2.238, 2.008)
pt3dadd(63.504, 198.96, -2.268, 2.062)
pt3dadd(63.396, 198.971, -2.298, 2.152)
pt3dadd(63.288, 198.983, -2.327, 2.242)
pt3dadd(63.209, 199.043, -2.357, 2.344)
pt3dadd(63.137, 199.117, -2.387, 2.452)
pt3dadd(63.097, 199.208, -2.416, 2.57)
pt3dadd(63.073, 199.309, -2.446, 2.694)
pt3dadd(63.054, 199.41, -2.476, 2.806)
pt3dadd(63.048, 199.514, -2.506, 2.88)
pt3dadd(63.042, 199.619, -2.535, 2.956)
pt3dadd(63.015, 199.716, -2.565, 3.016)
pt3dadd(62.969, 199.808, -2.595, 3.062)
pt3dadd(62.909, 199.891, -2.624, 3.054)
pt3dadd(62.85, 199.975, -2.654, 3.042)
pt3dadd(62.79, 200.058, -2.684, 3.032)
pt3dadd(62.73, 200.142, -2.713, 3.022)
pt3dadd(62.67, 200.225, -2.743, 3.012)
pt3dadd(62.607, 200.306, -2.773, 3.002)
pt3dadd(62.544, 200.387, -2.803, 2.992)
pt3dadd(62.482, 200.468, -2.832, 2.982)
pt3dadd(62.419, 200.549, -2.862, 2.972)
pt3dadd(62.357, 200.632, -2.892, 2.962)
pt3dadd(62.366, 200.616, -2.921, 2.962)
pt3dadd(62.325, 200.711, -2.951, 2.958)
pt3dadd(62.283, 200.804, -2.981, 2.954)
pt3dadd(62.242, 200.898, -3.01, 2.948)
pt3dadd(62.201, 200.993, -3.04, 2.944)
pt3dadd(62.16, 201.086, -3.07, 2.94)
pt3dadd(62.104, 201.172, -3.099, 2.938)
pt3dadd(62.044, 201.256, -3.129, 2.938)
pt3dadd(61.984, 201.338, -3.159, 2.938)
pt3dadd(61.924, 201.422, -3.189, 2.938)
pt3dadd(61.865, 201.505, -3.218, 2.938)
pt3dadd(61.825, 201.6, -3.248, 2.942)
pt3dadd(61.835, 201.584, -3.278, 2.942)
pt3dadd(61.802, 201.683, -3.307, 2.946)
pt3dadd(61.77, 201.78, -3.337, 2.95)
pt3dadd(61.737, 201.878, -3.367, 2.956)
pt3dadd(61.705, 201.976, -3.396, 2.96)
pt3dadd(61.679, 202.075, -3.426, 2.972)
pt3dadd(61.668, 202.178, -3.456, 3)
pt3dadd(61.657, 202.282, -3.486, 3.03)
pt3dadd(61.617, 202.375, -3.515, 3.078)
pt3dadd(61.566, 202.464, -3.545, 3.136)
pt3dadd(61.484, 202.51, -3.575, 3.184)
pt3dadd(61.375, 202.514, -3.604, 3.222)
pt3dadd(61.266, 202.52, -3.634, 3.262)
pt3dadd(61.167, 202.556, -3.664, 3.274)
pt3dadd(61.069, 202.595, -3.693, 3.286)
pt3dadd(60.978, 202.646, -3.723, 3.28)
pt3dadd(60.89, 202.702, -3.753, 3.266)
pt3dadd(60.803, 202.758, -3.782, 3.252)
pt3dadd(60.723, 202.818, -3.812, 3.236)
pt3dadd(60.712, 202.922, -3.842, 3.196)
pt3dadd(60.701, 203.026, -3.872, 3.158)
pt3dadd(60.672, 203.123, -3.901, 3.088)
pt3dadd(60.645, 203.222, -3.931, 3.056)
pt3dadd(60.624, 203.323, -3.961, 3.048)
pt3dadd(60.603, 203.425, -3.99, 3.04)
pt3dadd(60.583, 203.526, -4.02, 3.03)
pt3dadd(60.562, 203.627, -4.05, 3.022)
pt3dadd(60.541, 203.729, -4.079, 3.014)
pt3dadd(60.511, 203.827, -4.109, 3.014)
pt3dadd(60.482, 203.926, -4.139, 3.014)
pt3dadd(60.452, 204.025, -4.169, 3.014)
pt3dadd(60.423, 204.124, -4.198, 3.014)
pt3dadd(60.393, 204.222, -4.228, 3.014)
pt3dadd(60.359, 204.319, -4.258, 3.008)
pt3dadd(60.321, 204.415, -4.287, 3)
pt3dadd(60.282, 204.51, -4.317, 2.99)
pt3dadd(60.244, 204.606, -4.347, 2.98)
pt3dadd(60.206, 204.701, -4.376, 2.97)
pt3dadd(60.16, 204.791, -4.406, 2.958)
pt3dadd(60.083, 204.86, -4.436, 2.934)
pt3dadd(60.006, 204.929, -4.465, 2.908)
pt3dadd(59.929, 204.997, -4.495, 2.882)
pt3dadd(59.852, 205.066, -4.525, 2.858)
pt3dadd(59.786, 205.141, -4.555, 2.826)
pt3dadd(59.756, 205.24, -4.584, 2.772)
pt3dadd(59.726, 205.338, -4.614, 2.72)
pt3dadd(59.664, 205.42, -4.644, 2.672)
pt3dadd(59.598, 205.498, -4.673, 2.624)
pt3dadd(59.575, 205.595, -4.713, 2.596)
pt3dadd(59.568, 205.697, -4.757, 2.576)
}
}
proc shape3d_67() {
apic[14] { pt3dadd(59.548, 205.788, -4.816, 2.532)
pt3dadd(59.504, 205.856, -4.902, 2.446)
pt3dadd(59.442, 205.888, -4.996, 2.318)
pt3dadd(59.367, 205.913, -5.082, 2.194)
pt3dadd(59.293, 205.978, -5.137, 2.142)
pt3dadd(59.219, 206.044, -5.193, 2.088)
pt3dadd(59.145, 206.11, -5.248, 2.036)
pt3dadd(59.08, 206.16, -5.333, 1.984)
}
apic[15] {pt3dclear()
pt3dadd(59.08, 206.16, -5.333, 1.984)
pt3dadd(59.039, 206.227, -5.361, 1.966)
pt3dadd(58.982, 206.322, -5.401, 1.944)
pt3dadd(58.926, 206.417, -5.44, 1.92)
pt3dadd(58.869, 206.512, -5.48, 1.896)
pt3dadd(58.807, 206.608, -5.5, 1.888)
pt3dadd(58.739, 206.707, -5.5, 1.9)
pt3dadd(58.692, 206.813, -5.501, 1.926)
pt3dadd(58.687, 206.933, -5.505, 1.98)
pt3dadd(58.682, 207.052, -5.509, 2.034)
pt3dadd(58.677, 207.152, -5.55, 2.106)
pt3dadd(58.67, 207.238, -5.62, 2.192)
pt3dadd(58.637, 207.325, -5.677, 2.278)
pt3dadd(58.577, 207.415, -5.721, 2.362)
pt3dadd(58.51, 207.49, -5.775, 2.416)
pt3dadd(58.451, 207.572, -5.825, 2.43)
pt3dadd(58.401, 207.667, -5.87, 2.418)
pt3dadd(58.351, 207.762, -5.915, 2.406)
pt3dadd(58.301, 207.858, -5.959, 2.394)
pt3dadd(58.253, 207.958, -5.99, 2.378)
pt3dadd(58.211, 208.07, -5.992, 2.354)
pt3dadd(58.168, 208.182, -5.994, 2.33)
pt3dadd(58.126, 208.295, -5.996, 2.308)
pt3dadd(58.083, 208.406, -5.998, 2.284)
pt3dadd(58.041, 208.519, -6, 2.26)
pt3dadd(57.966, 208.613, -6, 2.214)
pt3dadd(57.891, 208.706, -6, 2.166)
pt3dadd(57.856, 208.804, -6.045, 2.17)
pt3dadd(57.828, 208.902, -6.097, 2.184)
pt3dadd(57.778, 208.956, -6.176, 2.264)
pt3dadd(57.732, 209.008, -6.256, 2.346)
pt3dadd(57.719, 209.066, -6.343, 2.432)
pt3dadd(57.701, 209.125, -6.427, 2.514)
pt3dadd(57.627, 209.185, -6.489, 2.54)
pt3dadd(57.553, 209.244, -6.55, 2.566)
pt3dadd(57.485, 209.314, -6.6, 2.582)
pt3dadd(57.438, 209.424, -6.6, 2.56)
pt3dadd(57.391, 209.534, -6.6, 2.538)
pt3dadd(57.324, 209.633, -6.604, 2.458)
pt3dadd(57.268, 209.735, -6.626, 2.442)
pt3dadd(57.212, 209.838, -6.648, 2.424)
pt3dadd(57.156, 209.941, -6.67, 2.408)
pt3dadd(57.1, 210.043, -6.692, 2.392)
pt3dadd(57.035, 210.139, -6.717, 2.386)
pt3dadd(56.964, 210.232, -6.742, 2.386)
pt3dadd(56.893, 210.324, -6.768, 2.386)
pt3dadd(56.823, 210.415, -6.793, 2.386)
pt3dadd(56.757, 210.511, -6.817, 2.386)
pt3dadd(56.702, 210.616, -6.836, 2.386)
pt3dadd(56.647, 210.72, -6.856, 2.386)
pt3dadd(56.592, 210.823, -6.875, 2.386)
pt3dadd(56.537, 210.928, -6.894, 2.386)
pt3dadd(56.48, 211.02, -6.933, 2.382)
pt3dadd(56.422, 211.108, -6.982, 2.376)
pt3dadd(56.363, 211.195, -7.03, 2.37)
pt3dadd(56.305, 211.283, -7.079, 2.364)
pt3dadd(56.252, 211.38, -7.112, 2.342)
pt3dadd(56.203, 211.487, -7.134, 2.31)
pt3dadd(56.154, 211.594, -7.155, 2.276)
pt3dadd(56.105, 211.7, -7.177, 2.244)
pt3dadd(56.056, 211.806, -7.199, 2.212)
pt3dadd(55.98, 211.898, -7.2, 2.162)
pt3dadd(55.903, 211.99, -7.2, 2.112)
pt3dadd(55.825, 212.081, -7.2, 2.062)
pt3dadd(55.747, 212.172, -7.2, 2.01)
pt3dadd(55.669, 212.264, -7.2, 1.96)
pt3dadd(55.612, 212.369, -7.2, 1.922)
pt3dadd(55.555, 212.474, -7.2, 1.882)
pt3dadd(55.498, 212.58, -7.2, 1.844)
pt3dadd(55.441, 212.687, -7.2, 1.804)
pt3dadd(55.384, 212.792, -7.2, 1.766)
pt3dadd(55.318, 212.892, -7.2, 1.73)
pt3dadd(55.251, 212.992, -7.2, 1.694)
pt3dadd(55.187, 213.094, -7.2, 1.698)
pt3dadd(55.127, 213.197, -7.2, 1.72)
pt3dadd(55.084, 213.306, -7.202, 1.742)
pt3dadd(55.062, 213.425, -7.207, 1.762)
pt3dadd(55.041, 213.542, -7.211, 1.782)
pt3dadd(54.956, 213.582, -7.269, 1.796)
pt3dadd(54.874, 213.62, -7.333, 1.806)
pt3dadd(54.831, 213.676, -7.415, 1.784)
pt3dadd(54.784, 213.779, -7.437, 1.782)
pt3dadd(54.736, 213.887, -7.453, 1.782)
pt3dadd(54.689, 213.996, -7.469, 1.782)
pt3dadd(54.642, 214.104, -7.486, 1.782)
pt3dadd(54.594, 214.213, -7.5, 1.782)
pt3dadd(54.543, 214.322, -7.5, 1.778)
pt3dadd(54.493, 214.43, -7.5, 1.772)
pt3dadd(54.442, 214.54, -7.5, 1.768)
pt3dadd(54.392, 214.648, -7.5, 1.764)
pt3dadd(54.341, 214.757, -7.5, 1.758)
pt3dadd(54.288, 214.864, -7.512, 1.758)
pt3dadd(54.235, 214.97, -7.526, 1.758)
pt3dadd(54.182, 215.076, -7.54, 1.758)
pt3dadd(54.129, 215.183, -7.554, 1.758)
pt3dadd(54.075, 215.288, -7.569, 1.756)
pt3dadd(54.01, 215.383, -7.597, 1.74)
pt3dadd(53.946, 215.478, -7.625, 1.722)
pt3dadd(53.881, 215.574, -7.654, 1.704)
pt3dadd(53.816, 215.669, -7.682, 1.686)
pt3dadd(53.759, 215.768, -7.709, 1.678)
pt3dadd(53.705, 215.872, -7.737, 1.672)
pt3dadd(53.651, 215.974, -7.764, 1.666)
pt3dadd(53.597, 216.074, -7.792, 1.662)
pt3dadd(53.553, 216.167, -7.835, 1.654)
pt3dadd(53.533, 216.235, -7.915, 1.64)
pt3dadd(53.501, 216.304, -7.992, 1.632)
pt3dadd(53.448, 216.372, -8.061, 1.632)
pt3dadd(53.384, 216.457, -8.092, 1.604)
pt3dadd(53.313, 216.554, -8.097, 1.554)
pt3dadd(53.23, 216.64, -8.1, 1.494)
pt3dadd(53.137, 216.714, -8.1, 1.424)
pt3dadd(53.046, 216.793, -8.1, 1.354)
pt3dadd(52.961, 216.877, -8.1, 1.282)
pt3dadd(52.907, 216.985, -8.1, 1.272)
pt3dadd(52.854, 217.092, -8.1, 1.262)
pt3dadd(52.8, 217.199, -8.1, 1.252)
pt3dadd(52.746, 217.307, -8.1, 1.242)
pt3dadd(52.693, 217.414, -8.1, 1.232)
pt3dadd(52.637, 217.52, -8.1, 1.23)
pt3dadd(52.58, 217.626, -8.1, 1.23)
pt3dadd(52.524, 217.732, -8.1, 1.23)
pt3dadd(52.467, 217.837, -8.1, 1.23)
pt3dadd(52.411, 217.944, -8.1, 1.23)
pt3dadd(52.341, 218.041, -8.1, 1.224)
pt3dadd(52.263, 218.132, -8.1, 1.214)
pt3dadd(52.185, 218.224, -8.1, 1.204)
pt3dadd(52.107, 218.314, -8.1, 1.194)
pt3dadd(52.029, 218.405, -8.1, 1.184)
pt3dadd(51.979, 218.512, -8.1, 1.186)
pt3dadd(51.947, 218.627, -8.1, 1.196)
pt3dadd(51.909, 218.74, -8.1, 1.208)
pt3dadd(51.848, 218.844, -8.1, 1.218)
pt3dadd(51.787, 218.947, -8.1, 1.23)
}
apic[16] {pt3dclear()
pt3dadd(51.787, 218.947, -8.1, 1.23)
pt3dadd(51.727, 219.012, -8.077, 1.23)
pt3dadd(51.639, 219.097, -8.066, 1.23)
pt3dadd(51.543, 219.172, -8.054, 1.21)
pt3dadd(51.439, 219.236, -8.043, 1.176)
pt3dadd(51.335, 219.299, -8.031, 1.124)
pt3dadd(51.228, 219.358, -8.02, 1.04)
pt3dadd(51.117, 219.407, -8.008, 1.018)
pt3dadd(51.006, 219.456, -7.997, 1.004)
pt3dadd(50.895, 219.505, -7.985, 0.99)
pt3dadd(50.783, 219.553, -7.974, 0.976)
pt3dadd(50.672, 219.602, -7.962, 0.962)
pt3dadd(50.563, 219.656, -7.951, 0.95)
pt3dadd(50.456, 219.714, -7.939, 0.94)
pt3dadd(50.349, 219.772, -7.928, 0.93)
pt3dadd(50.242, 219.829, -7.917, 0.92)
pt3dadd(50.242, 219.834, -7.905, 0.92)
pt3dadd(50.135, 219.892, -7.894, 0.912)
pt3dadd(50.027, 219.949, -7.882, 0.906)
pt3dadd(49.919, 220.003, -7.871, 0.916)
pt3dadd(49.81, 220.058, -7.859, 0.926)
pt3dadd(49.701, 220.114, -7.848, 0.936)
pt3dadd(49.593, 220.168, -7.836, 0.944)
pt3dadd(49.484, 220.223, -7.825, 0.954)
pt3dadd(49.377, 220.28, -7.813, 1.01)
pt3dadd(49.27, 220.339, -7.802, 1.068)
pt3dadd(49.163, 220.397, -7.79, 1.132)
pt3dadd(49.056, 220.454, -7.779, 1.2)
pt3dadd(48.951, 220.517, -7.768, 1.262)
pt3dadd(48.848, 220.582, -7.756, 1.318)
pt3dadd(48.773, 220.667, -7.745, 1.36)
pt3dadd(48.753, 220.789, -7.733, 1.368)
pt3dadd(48.733, 220.912, -7.722, 1.378)
pt3dadd(48.653, 220.996, -7.71, 1.382)
pt3dadd(48.554, 221.066, -7.699, 1.382)
pt3dadd(48.454, 221.137, -7.687, 1.382)
pt3dadd(48.353, 221.206, -7.676, 1.38)
pt3dadd(48.246, 221.264, -7.664, 1.368)
pt3dadd(48.139, 221.322, -7.653, 1.358)
pt3dadd(48.054, 221.402, -7.641, 1.354)
pt3dadd(47.935, 221.426, -7.63, 1.344)
pt3dadd(47.817, 221.452, -7.618, 1.334)
pt3dadd(47.708, 221.5, -7.607, 1.318)
pt3dadd(47.605, 221.566, -7.596, 1.294)
pt3dadd(47.518, 221.647, -7.582, 1.276)
pt3dadd(47.455, 221.753, -7.565, 1.264)
pt3dadd(47.39, 221.854, -7.537, 1.268)
pt3dadd(47.322, 221.94, -7.481, 1.312)
pt3dadd(47.236, 222.018, -7.448, 1.354)
pt3dadd(47.135, 222.086, -7.433, 1.396)
pt3dadd(47.034, 222.154, -7.418, 1.44)
pt3dadd(46.932, 222.222, -7.404, 1.482)
pt3dadd(46.825, 222.281, -7.392, 1.526)
pt3dadd(46.718, 222.338, -7.381, 1.572)
pt3dadd(46.661, 222.44, -7.361, 1.568)
pt3dadd(46.619, 222.556, -7.338, 1.552)
pt3dadd(46.578, 222.672, -7.315, 1.534)
pt3dadd(46.526, 222.763, -7.251, 1.456)
}
}
proc shape3d_68() {
apic[16] { pt3dadd(46.467, 222.842, -7.184, 1.356)
pt3dadd(46.366, 222.883, -7.131, 1.256)
pt3dadd(46.266, 222.942, -7.089, 1.256)
pt3dadd(46.166, 223.001, -7.047, 1.256)
pt3dadd(46.066, 223.06, -7.005, 1.256)
pt3dadd(45.965, 223.118, -6.964, 1.258)
pt3dadd(45.863, 223.18, -6.931, 1.274)
pt3dadd(45.76, 223.24, -6.897, 1.29)
pt3dadd(45.657, 223.3, -6.864, 1.306)
pt3dadd(45.555, 223.36, -6.83, 1.324)
pt3dadd(45.45, 223.418, -6.809, 1.338)
pt3dadd(45.342, 223.476, -6.797, 1.354)
pt3dadd(45.235, 223.534, -6.786, 1.368)
pt3dadd(45.128, 223.591, -6.775, 1.382)
pt3dadd(45.021, 223.65, -6.763, 1.396)
pt3dadd(44.915, 223.71, -6.752, 1.406)
pt3dadd(44.811, 223.774, -6.74, 1.406)
pt3dadd(44.708, 223.838, -6.729, 1.406)
pt3dadd(44.604, 223.902, -6.717, 1.406)
pt3dadd(44.5, 223.967, -6.706, 1.406)
pt3dadd(44.395, 224.027, -6.694, 1.406)
pt3dadd(44.284, 224.076, -6.683, 1.4)
pt3dadd(44.284, 224.081, -6.671, 1.4)
pt3dadd(44.173, 224.129, -6.66, 1.396)
pt3dadd(44.061, 224.178, -6.648, 1.392)
pt3dadd(43.95, 224.227, -6.637, 1.386)
pt3dadd(43.839, 224.275, -6.626, 1.382)
pt3dadd(43.735, 224.338, -6.614, 1.382)
pt3dadd(43.631, 224.404, -6.603, 1.382)
pt3dadd(43.577, 224.503, -6.591, 1.394)
pt3dadd(43.551, 224.626, -6.58, 1.414)
pt3dadd(43.514, 224.735, -6.568, 1.434)
pt3dadd(43.395, 224.759, -6.557, 1.464)
pt3dadd(43.277, 224.784, -6.545, 1.492)
pt3dadd(43.159, 224.801, -6.527, 1.512)
pt3dadd(43.04, 224.81, -6.503, 1.522)
pt3dadd(42.922, 224.819, -6.478, 1.532)
pt3dadd(42.842, 224.905, -6.442, 1.516)
pt3dadd(42.764, 224.995, -6.406, 1.5)
pt3dadd(42.687, 225.086, -6.369, 1.484)
pt3dadd(42.632, 225.185, -6.317, 1.41)
pt3dadd(42.581, 225.284, -6.263, 1.318)
pt3dadd(42.509, 225.372, -6.213, 1.108)
pt3dadd(42.432, 225.455, -6.161, 1.06)
pt3dadd(42.355, 225.536, -6.109, 1.012)
pt3dadd(42.277, 225.618, -6.058, 0.962)
pt3dadd(42.194, 225.697, -6.014, 0.922)
pt3dadd(42.097, 225.77, -5.987, 0.902)
pt3dadd(42, 225.842, -5.961, 0.882)
pt3dadd(41.904, 225.916, -5.934, 0.862)
pt3dadd(41.812, 225.996, -5.921, 0.864)
pt3dadd(41.725, 226.082, -5.917, 0.88)
pt3dadd(41.638, 226.168, -5.912, 0.896)
pt3dadd(41.551, 226.254, -5.908, 0.912)
pt3dadd(41.463, 226.339, -5.904, 0.928)
pt3dadd(41.36, 226.404, -5.893, 0.968)
pt3dadd(41.255, 226.465, -5.882, 1.012)
pt3dadd(41.149, 226.526, -5.87, 1.054)
pt3dadd(41.044, 226.588, -5.859, 1.098)
pt3dadd(40.938, 226.649, -5.847, 1.142)
pt3dadd(40.861, 226.74, -5.836, 1.186)
pt3dadd(40.795, 226.844, -5.824, 1.232)
pt3dadd(40.73, 226.95, -5.813, 1.276)
pt3dadd(40.664, 227.054, -5.801, 1.32)
pt3dadd(40.598, 227.159, -5.79, 1.366)
pt3dadd(40.514, 227.246, -5.778, 1.392)
pt3dadd(40.421, 227.326, -5.767, 1.406)
pt3dadd(40.327, 227.405, -5.755, 1.422)
pt3dadd(40.234, 227.484, -5.744, 1.436)
pt3dadd(40.14, 227.563, -5.733, 1.452)
pt3dadd(40.048, 227.645, -5.721, 1.45)
pt3dadd(39.957, 227.726, -5.71, 1.44)
pt3dadd(39.866, 227.808, -5.698, 1.43)
pt3dadd(39.775, 227.891, -5.687, 1.42)
pt3dadd(39.684, 227.972, -5.675, 1.41)
pt3dadd(39.585, 228.044, -5.664, 1.378)
pt3dadd(39.483, 228.112, -5.652, 1.338)
pt3dadd(39.381, 228.179, -5.641, 1.3)
pt3dadd(39.381, 228.184, -5.629, 1.3)
pt3dadd(39.279, 228.251, -5.618, 1.26)
pt3dadd(39.178, 228.318, -5.606, 1.22)
pt3dadd(39.091, 228.402, -5.595, 1.196)
pt3dadd(39.013, 228.498, -5.584, 1.18)
pt3dadd(38.936, 228.594, -5.572, 1.166)
pt3dadd(38.858, 228.69, -5.561, 1.15)
pt3dadd(38.78, 228.785, -5.549, 1.136)
pt3dadd(38.688, 228.864, -5.538, 1.12)
pt3dadd(38.588, 228.934, -5.526, 1.106)
pt3dadd(38.488, 229.004, -5.515, 1.09)
pt3dadd(38.388, 229.074, -5.503, 1.076)
pt3dadd(38.287, 229.144, -5.492, 1.06)
pt3dadd(38.196, 229.225, -5.48, 1.054)
pt3dadd(38.11, 229.313, -5.469, 1.054)
pt3dadd(38.024, 229.4, -5.457, 1.054)
pt3dadd(37.938, 229.488, -5.446, 1.054)
pt3dadd(37.853, 229.577, -5.434, 1.054)
pt3dadd(37.762, 229.66, -5.423, 1.038)
pt3dadd(37.668, 229.738, -5.412, 1.014)
pt3dadd(37.575, 229.817, -5.4, 0.988)
pt3dadd(37.481, 229.896, -5.389, 0.962)
pt3dadd(37.388, 229.975, -5.377, 0.938)
pt3dadd(37.285, 230.04, -5.366, 0.884)
pt3dadd(37.178, 230.099, -5.354, 0.816)
pt3dadd(37.073, 230.159, -5.343, 0.764)
pt3dadd(36.969, 230.225, -5.331, 0.73)
pt3dadd(36.882, 230.303, -5.32, 0.71)
pt3dadd(36.842, 230.419, -5.308, 0.742)
pt3dadd(36.802, 230.537, -5.297, 0.774)
pt3dadd(36.785, 230.659, -5.285, 0.82)
pt3dadd(36.771, 230.783, -5.274, 0.866)
pt3dadd(36.739, 230.896, -5.263, 0.908)
pt3dadd(36.74, 230.9, -5.251, 0.908)
pt3dadd(36.64, 230.971, -5.24, 0.93)
pt3dadd(36.54, 231.042, -5.228, 0.95)
pt3dadd(36.441, 231.113, -5.217, 0.97)
pt3dadd(36.333, 231.168, -5.205, 0.972)
pt3dadd(36.22, 231.212, -5.194, 0.962)
pt3dadd(36.116, 231.269, -5.182, 0.956)
pt3dadd(36.042, 231.367, -5.171, 0.966)
pt3dadd(35.967, 231.466, -5.159, 0.974)
pt3dadd(35.895, 231.565, -5.148, 0.974)
pt3dadd(35.827, 231.668, -5.136, 0.962)
pt3dadd(35.757, 231.769, -5.125, 0.954)
pt3dadd(35.683, 231.869, -5.112, 0.948)
pt3dadd(35.61, 231.967, -5.099, 0.938)
pt3dadd(35.537, 232.067, -5.085, 0.928)
pt3dadd(35.464, 232.165, -5.071, 0.918)
pt3dadd(35.391, 232.265, -5.057, 0.908)
pt3dadd(35.308, 232.352, -5.033, 0.908)
pt3dadd(35.218, 232.432, -5.001, 0.914)
pt3dadd(35.128, 232.512, -4.97, 0.918)
pt3dadd(35.038, 232.591, -4.938, 0.924)
pt3dadd(34.949, 232.674, -4.91, 0.93)
pt3dadd(34.869, 232.766, -4.899, 0.936)
pt3dadd(34.788, 232.86, -4.887, 0.94)
pt3dadd(34.708, 232.954, -4.876, 0.946)
pt3dadd(34.628, 233.046, -4.864, 0.95)
pt3dadd(34.544, 233.136, -4.853, 0.956)
pt3dadd(34.451, 233.215, -4.842, 0.96)
pt3dadd(34.357, 233.294, -4.83, 0.966)
pt3dadd(34.264, 233.374, -4.819, 0.97)
pt3dadd(34.17, 233.453, -4.807, 0.976)
pt3dadd(34.076, 233.53, -4.796, 0.982)
pt3dadd(33.978, 233.604, -4.784, 0.998)
pt3dadd(33.88, 233.677, -4.773, 1.012)
pt3dadd(33.782, 233.75, -4.761, 1.028)
pt3dadd(33.684, 233.824, -4.75, 1.042)
pt3dadd(33.585, 233.896, -4.738, 1.064)
pt3dadd(33.483, 233.963, -4.727, 1.104)
pt3dadd(33.381, 234.029, -4.715, 1.142)
pt3dadd(33.279, 234.096, -4.704, 1.182)
pt3dadd(33.177, 234.164, -4.692, 1.222)
pt3dadd(33.076, 234.232, -4.681, 1.264)
pt3dadd(32.98, 234.308, -4.67, 1.318)
pt3dadd(32.884, 234.384, -4.658, 1.374)
pt3dadd(32.788, 234.461, -4.647, 1.428)
pt3dadd(32.692, 234.536, -4.635, 1.484)
pt3dadd(32.6, 234.617, -4.624, 1.536)
pt3dadd(32.601, 234.622, -4.612, 1.536)
pt3dadd(32.601, 234.625, -4.601, 1.536)
pt3dadd(32.532, 234.728, -4.589, 1.566)
pt3dadd(32.463, 234.83, -4.578, 1.596)
pt3dadd(32.394, 234.932, -4.566, 1.626)
pt3dadd(32.326, 235.034, -4.555, 1.656)
pt3dadd(32.256, 235.138, -4.543, 1.68)
pt3dadd(32.181, 235.235, -4.532, 1.666)
pt3dadd(32.107, 235.333, -4.521, 1.65)
pt3dadd(32.107, 235.338, -4.509, 1.65)
pt3dadd(32.032, 235.435, -4.498, 1.636)
pt3dadd(31.958, 235.534, -4.486, 1.62)
pt3dadd(31.881, 235.628, -4.475, 1.602)
pt3dadd(31.881, 235.633, -4.463, 1.602)
pt3dadd(31.79, 235.715, -4.452, 1.562)
pt3dadd(31.699, 235.798, -4.44, 1.52)
pt3dadd(31.608, 235.882, -4.429, 1.48)
pt3dadd(31.518, 235.963, -4.417, 1.44)
pt3dadd(31.423, 236.039, -4.406, 1.396)
pt3dadd(31.31, 236.082, -4.394, 1.332)
pt3dadd(31.197, 236.126, -4.383, 1.268)
pt3dadd(31.082, 236.164, -4.371, 1.238)
pt3dadd(30.967, 236.202, -4.36, 1.218)
pt3dadd(30.85, 236.233, -4.349, 1.206)
pt3dadd(30.732, 236.258, -4.337, 1.206)
pt3dadd(30.614, 236.284, -4.326, 1.206)
pt3dadd(30.615, 236.287, -4.314, 1.206)
pt3dadd(30.573, 236.389, -4.303, 1.22)
pt3dadd(30.553, 236.512, -4.291, 1.24)
pt3dadd(30.519, 236.626, -4.28, 1.26)
pt3dadd(30.422, 236.7, -4.268, 1.28)
pt3dadd(30.326, 236.776, -4.257, 1.302)
pt3dadd(30.229, 236.851, -4.245, 1.322)
pt3dadd(30.131, 236.923, -4.234, 1.352)
pt3dadd(30.032, 236.996, -4.222, 1.386)
pt3dadd(29.954, 237.085, -4.211, 1.392)
pt3dadd(29.874, 237.178, -4.2, 1.37)
pt3dadd(29.783, 237.258, -4.188, 1.356)
pt3dadd(29.692, 237.341, -4.177, 1.34)
pt3dadd(29.601, 237.424, -4.165, 1.326)
pt3dadd(29.51, 237.505, -4.154, 1.31)
pt3dadd(29.442, 237.607, -4.142, 1.288)
}
}
proc shape3d_69() {
apic[16] { pt3dadd(29.383, 237.715, -4.131, 1.264)
pt3dadd(29.323, 237.823, -4.119, 1.238)
pt3dadd(29.264, 237.931, -4.108, 1.214)
pt3dadd(29.204, 238.04, -4.096, 1.19)
pt3dadd(29.148, 238.15, -4.085, 1.168)
pt3dadd(29.095, 238.262, -4.073, 1.15)
pt3dadd(29.041, 238.374, -4.062, 1.13)
pt3dadd(28.988, 238.484, -4.05, 1.11)
pt3dadd(28.934, 238.597, -4.039, 1.092)
pt3dadd(28.934, 238.601, -4.028, 1.092)
pt3dadd(28.871, 238.706, -4.016, 1.074)
pt3dadd(28.794, 238.801, -4.005, 1.058)
pt3dadd(28.716, 238.897, -3.993, 1.044)
pt3dadd(28.638, 238.993, -3.982, 1.028)
pt3dadd(28.561, 239.088, -3.97, 1.012)
pt3dadd(28.485, 239.185, -3.959, 1.004)
pt3dadd(28.41, 239.284, -3.947, 1.004)
pt3dadd(28.335, 239.382, -3.936, 1.004)
pt3dadd(28.26, 239.479, -3.924, 1.004)
pt3dadd(28.186, 239.578, -3.913, 1.004)
pt3dadd(28.117, 239.681, -3.901, 1.02)
pt3dadd(28.057, 239.788, -3.89, 1.054)
pt3dadd(27.985, 239.885, -3.879, 1.088)
pt3dadd(27.882, 239.95, -3.867, 1.122)
pt3dadd(27.779, 240.014, -3.856, 1.156)
pt3dadd(27.676, 240.079, -3.844, 1.18)
pt3dadd(27.572, 240.145, -3.833, 1.202)
pt3dadd(27.555, 240.26, -3.821, 1.19)
pt3dadd(27.551, 240.385, -3.81, 1.172)
pt3dadd(27.547, 240.51, -3.798, 1.156)
pt3dadd(27.54, 240.634, -3.787, 1.13)
pt3dadd(27.529, 240.756, -3.775, 1.104)
pt3dadd(27.469, 240.864, -3.764, 1.1)
pt3dadd(27.409, 240.973, -3.752, 1.094)
pt3dadd(27.35, 241.08, -3.741, 1.09)
pt3dadd(27.29, 241.189, -3.729, 1.084)
pt3dadd(27.23, 241.298, -3.718, 1.08)
pt3dadd(27.23, 241.302, -3.707, 1.08)
pt3dadd(27.177, 241.414, -3.695, 1.098)
pt3dadd(27.123, 241.524, -3.684, 1.118)
pt3dadd(27.124, 241.529, -3.672, 1.118)
pt3dadd(27.07, 241.64, -3.661, 1.136)
pt3dadd(27.017, 241.752, -3.649, 1.156)
pt3dadd(26.964, 241.865, -3.638, 1.176)
pt3dadd(26.884, 241.945, -3.599, 1.232)
pt3dadd(26.795, 242.017, -3.55, 1.302)
pt3dadd(26.711, 242.104, -3.52, 1.356)
pt3dadd(26.63, 242.192, -3.492, 1.406)
pt3dadd(26.63, 242.196, -3.48, 1.406)
pt3dadd(26.63, 242.201, -3.469, 1.406)
pt3dadd(26.616, 242.323, -3.458, 1.396)
pt3dadd(26.601, 242.448, -3.446, 1.388)
pt3dadd(26.58, 242.57, -3.435, 1.37)
pt3dadd(26.548, 242.689, -3.423, 1.34)
pt3dadd(26.515, 242.809, -3.412, 1.308)
pt3dadd(26.462, 242.898, -3.348, 1.274)
pt3dadd(26.408, 242.984, -3.279, 1.24)
pt3dadd(26.353, 243.071, -3.211, 1.206)
pt3dadd(26.244, 243.12, -3.183, 1.182)
pt3dadd(26.135, 243.17, -3.156, 1.156)
pt3dadd(26.045, 243.239, -3.109, 1.136)
pt3dadd(25.956, 243.311, -3.06, 1.114)
pt3dadd(25.901, 243.407, -3.02, 1.098)
pt3dadd(25.878, 243.527, -2.989, 1.088)
pt3dadd(25.847, 243.637, -2.946, 1.066)
pt3dadd(25.77, 243.724, -2.914, 1.058)
pt3dadd(25.68, 243.805, -2.895, 1.064)
pt3dadd(25.59, 243.889, -2.877, 1.07)
pt3dadd(25.5, 243.972, -2.858, 1.074)
pt3dadd(25.41, 244.055, -2.84, 1.08)
pt3dadd(25.347, 244.162, -2.828, 1.08)
pt3dadd(25.285, 244.267, -2.817, 1.08)
pt3dadd(25.222, 244.374, -2.805, 1.08)
pt3dadd(25.16, 244.481, -2.794, 1.08)
pt3dadd(25.097, 244.588, -2.782, 1.08)
pt3dadd(25.034, 244.694, -2.771, 1.08)
pt3dadd(24.972, 244.8, -2.759, 1.08)
pt3dadd(24.909, 244.907, -2.748, 1.08)
pt3dadd(24.846, 245.012, -2.737, 1.08)
pt3dadd(24.784, 245.12, -2.725, 1.08)
pt3dadd(24.784, 245.124, -2.714, 1.08)
pt3dadd(24.718, 245.228, -2.7, 1.08)
pt3dadd(24.651, 245.333, -2.687, 1.08)
pt3dadd(24.584, 245.436, -2.673, 1.08)
pt3dadd(24.517, 245.539, -2.659, 1.08)
pt3dadd(24.45, 245.642, -2.645, 1.08)
pt3dadd(24.38, 245.687, -2.569, 1.08)
pt3dadd(24.309, 245.718, -2.48, 1.08)
pt3dadd(24.254, 245.824, -2.444, 1.104)
pt3dadd(24.199, 245.93, -2.41, 1.13)
pt3dadd(24.153, 246.047, -2.399, 1.164)
pt3dadd(24.106, 246.162, -2.387, 1.196)
pt3dadd(24.091, 246.283, -2.376, 1.218)
pt3dadd(24.087, 246.408, -2.365, 1.236)
pt3dadd(24.082, 246.53, -2.353, 1.252)
pt3dadd(24.026, 246.638, -2.342, 1.262)
pt3dadd(23.959, 246.742, -2.33, 1.268)
pt3dadd(23.893, 246.847, -2.319, 1.276)
pt3dadd(23.825, 246.95, -2.307, 1.278)
pt3dadd(23.75, 247.048, -2.296, 1.266)
pt3dadd(23.675, 247.144, -2.28, 1.254)
pt3dadd(23.591, 247.22, -2.232, 1.232)
pt3dadd(23.507, 247.297, -2.183, 1.212)
pt3dadd(23.469, 247.398, -2.129, 1.188)
pt3dadd(23.45, 247.508, -2.073, 1.162)
pt3dadd(23.387, 247.564, -2.002, 1.13)
pt3dadd(23.333, 247.662, -1.948, 1.13)
pt3dadd(23.28, 247.762, -1.895, 1.13)
pt3dadd(23.226, 247.86, -1.841, 1.13)
pt3dadd(23.173, 247.96, -1.788, 1.13)
pt3dadd(23.106, 248.042, -1.726, 1.118)
pt3dadd(23.043, 248.128, -1.667, 1.102)
pt3dadd(23.019, 248.246, -1.636, 1.068)
pt3dadd(22.995, 248.366, -1.604, 1.034)
pt3dadd(22.925, 248.452, -1.551, 0.966)
pt3dadd(22.844, 248.522, -1.496, 0.898)
pt3dadd(22.735, 248.546, -1.447, 0.862)
pt3dadd(22.627, 248.574, -1.4, 0.83)
pt3dadd(22.539, 248.659, -1.386, 0.836)
pt3dadd(22.45, 248.744, -1.371, 0.844)
pt3dadd(22.362, 248.83, -1.356, 0.852)
pt3dadd(22.318, 248.939, -1.344, 0.872)
pt3dadd(22.304, 249.061, -1.332, 0.9)
pt3dadd(22.29, 249.185, -1.321, 0.926)
pt3dadd(22.289, 249.308, -1.309, 0.93)
pt3dadd(22.25, 249.426, -1.298, 0.916)
pt3dadd(22.209, 249.542, -1.286, 0.902)
pt3dadd(22.168, 249.66, -1.275, 0.888)
pt3dadd(22.126, 249.778, -1.263, 0.874)
pt3dadd(22.085, 249.894, -1.252, 0.862)
pt3dadd(22.041, 250.01, -1.24, 0.848)
pt3dadd(21.995, 250.124, -1.229, 0.838)
pt3dadd(21.938, 250.23, -1.217, 0.838)
pt3dadd(21.835, 250.295, -1.206, 0.882)
pt3dadd(21.731, 250.361, -1.195, 0.928)
pt3dadd(21.616, 250.397, -1.183, 0.99)
pt3dadd(21.501, 250.435, -1.172, 1.052)
pt3dadd(21.386, 250.458, -1.144, 1.11)
pt3dadd(21.272, 250.466, -1.104, 1.164)
pt3dadd(21.163, 250.495, -1.066, 1.212)
pt3dadd(21.073, 250.574, -1.037, 1.238)
pt3dadd(21.002, 250.668, -1.014, 1.266)
pt3dadd(20.978, 250.789, -1.003, 1.252)
pt3dadd(20.973, 250.914, -0.991, 1.184)
pt3dadd(20.973, 251.039, -0.98, 1.108)
pt3dadd(20.964, 251.161, -0.968, 1.098)
pt3dadd(20.922, 251.276, -0.957, 1.154)
pt3dadd(20.835, 251.363, -0.945, 1.178)
pt3dadd(20.747, 251.449, -0.934, 1.202)
pt3dadd(20.659, 251.534, -0.923, 1.196)
pt3dadd(20.572, 251.62, -0.911, 1.184)
pt3dadd(20.509, 251.724, -0.9, 1.156)
pt3dadd(20.438, 251.825, -0.888, 1.15)
pt3dadd(20.366, 251.926, -0.877, 1.146)
pt3dadd(20.294, 252.025, -0.865, 1.14)
pt3dadd(20.223, 252.126, -0.854, 1.136)
pt3dadd(20.151, 252.226, -0.842, 1.13)
pt3dadd(20.085, 252.331, -0.831, 1.126)
pt3dadd(20.019, 252.434, -0.819, 1.12)
pt3dadd(19.953, 252.54, -0.808, 1.116)
pt3dadd(19.887, 252.644, -0.796, 1.11)
pt3dadd(19.822, 252.749, -0.785, 1.106)
pt3dadd(19.757, 252.852, -0.755, 1.1)
pt3dadd(19.692, 252.953, -0.724, 1.094)
pt3dadd(19.627, 253.056, -0.693, 1.088)
pt3dadd(19.562, 253.157, -0.662, 1.082)
pt3dadd(19.501, 253.262, -0.629, 1.068)
pt3dadd(19.447, 253.37, -0.595, 1.042)
pt3dadd(19.389, 253.46, -0.54, 1.016)
pt3dadd(19.328, 253.534, -0.465, 0.986)
pt3dadd(19.308, 253.586, -0.367, 0.946)
pt3dadd(19.302, 253.632, -0.262, 0.902)
pt3dadd(19.3, 253.697, -0.167, 0.856)
pt3dadd(19.3, 253.783, -0.082, 0.808)
pt3dadd(19.3, 253.854, 0.01, 0.76)
pt3dadd(19.3, 253.902, 0.115, 0.712)
pt3dadd(19.264, 253.992, 0.183, 0.704)
pt3dadd(19.221, 254.092, 0.243, 0.704)
pt3dadd(19.18, 254.102, 0.348, 0.736)
pt3dadd(19.139, 254.112, 0.453, 0.77)
pt3dadd(19.056, 254.165, 0.506, 0.828)
pt3dadd(18.958, 254.232, 0.541, 0.894)
pt3dadd(18.855, 254.298, 0.556, 0.942)
pt3dadd(18.752, 254.363, 0.567, 0.988)
pt3dadd(18.646, 254.423, 0.579, 1.016)
pt3dadd(18.542, 254.485, 0.587, 1.024)
pt3dadd(18.452, 254.564, 0.582, 0.984)
pt3dadd(18.367, 254.648, 0.571, 0.942)
pt3dadd(18.3, 254.742, 0.545, 0.886)
pt3dadd(18.257, 254.849, 0.536, 0.838)
pt3dadd(18.242, 254.971, 0.547, 0.8)
pt3dadd(18.228, 255.095, 0.559, 0.762)
pt3dadd(18.224, 255.22, 0.57, 0.74)
pt3dadd(18.225, 255.343, 0.582, 0.724)
pt3dadd(18.225, 255.468, 0.593, 0.708)
pt3dadd(18.225, 255.592, 0.605, 0.684)
pt3dadd(18.225, 255.716, 0.616, 0.66)
pt3dadd(18.225, 255.84, 0.637, 0.59)
pt3dadd(18.225, 255.96, 0.675, 0.444)
pt3dadd(18.197, 256.067, 0.731, 0.28)
}
}
proc shape3d_70() {
apic[16] { pt3dadd(18.143, 256.174, 0.762, 0.226)
pt3dadd(18.115, 256.295, 0.774, 0.226)
pt3dadd(18.101, 256.417, 0.785, 0.226)
pt3dadd(18.075, 256.538, 0.789, 0.244)
pt3dadd(18.019, 256.61, 0.745, 0.284)
pt3dadd(17.985, 256.625, 0.662, 0.286)
pt3dadd(17.949, 256.618, 0.579, 0.252)
pt3dadd(17.858, 256.571, 0.547, 0.226)
pt3dadd(17.747, 256.535, 0.554, 0.226)
pt3dadd(17.628, 256.522, 0.565, 0.226)
pt3dadd(17.508, 256.526, 0.577, 0.226)
pt3dadd(17.509, 256.53, 0.588, 0.226)
pt3dadd(17.509, 256.535, 0.6, 0.226)
pt3dadd(17.509, 256.538, 0.611, 0.226)
pt3dadd(17.509, 256.543, 0.623, 0.678)
pt3dadd(17.39, 256.535, 0.634, 0.678)
pt3dadd(17.304, 256.462, 0.646, 0.678)
pt3dadd(17.264, 256.354, 0.657, 0.678)
pt3dadd(17.213, 256.252, 0.668, 0.678)
pt3dadd(17.098, 256.24, 0.68, 0.678)
pt3dadd(16.989, 256.29, 0.692, 0.678)
pt3dadd(16.88, 256.326, 0.73, 0.678)
pt3dadd(16.805, 256.351, 0.814, 0.678)
pt3dadd(16.762, 256.414, 0.901, 0.678)
pt3dadd(16.69, 256.505, 0.937, 0.678)
pt3dadd(16.623, 256.607, 0.949, 0.678)
pt3dadd(16.555, 256.711, 0.96, 0.678)
pt3dadd(16.462, 256.79, 0.972, 0.678)
pt3dadd(16.369, 256.87, 0.983, 0.678)
pt3dadd(16.265, 256.931, 0.997, 0.678)
pt3dadd(16.16, 256.976, 1.044, 0.678)
pt3dadd(16.057, 257.027, 1.081, 0.678)
pt3dadd(15.959, 257.093, 1.07, 0.678)
pt3dadd(15.876, 257.179, 1.062, 0.678)
pt3dadd(15.8, 257.273, 1.056, 0.678)
pt3dadd(15.711, 257.322, 1.108, 0.678)
pt3dadd(15.619, 257.353, 1.179, 0.678)
pt3dadd(15.589, 257.366, 1.284, 0.678)
pt3dadd(15.568, 257.376, 1.393, 0.678)
pt3dadd(15.521, 257.406, 1.484, 0.678)
pt3dadd(15.48, 257.472, 1.432, 0.678)
pt3dadd(15.476, 257.496, 1.346, 0.678)
pt3dadd(15.476, 257.503, 1.257, 0.678)
pt3dadd(15.476, 257.52, 1.169, 0.678)
pt3dadd(15.448, 257.574, 1.099, 0.678)
pt3dadd(15.359, 257.629, 1.131, 0.678)
pt3dadd(15.276, 257.653, 1.212, 0.678)
pt3dadd(15.209, 257.713, 1.291, 0.678)
pt3dadd(15.14, 257.786, 1.36, 0.678)
pt3dadd(15.073, 257.856, 1.433, 0.678)
pt3dadd(15.028, 257.878, 1.536, 0.678)
pt3dadd(14.983, 257.903, 1.638, 0.678)
pt3dadd(14.924, 257.944, 1.73, 0.678)
pt3dadd(14.865, 257.987, 1.823, 0.678)
pt3dadd(14.812, 258.068, 1.883, 0.678)
pt3dadd(14.766, 258.179, 1.916, 0.678)
pt3dadd(14.706, 258.269, 1.97, 0.678)
pt3dadd(14.634, 258.361, 2.013, 0.678)
pt3dadd(14.562, 258.454, 2.056, 0.678)
pt3dadd(14.49, 258.545, 2.099, 0.678)
pt3dadd(14.418, 258.638, 2.142, 0.678)
pt3dadd(14.334, 258.725, 2.161, 0.678)
pt3dadd(14.245, 258.81, 2.173, 0.678)
pt3dadd(14.157, 258.895, 2.184, 0.678)
pt3dadd(14.068, 258.979, 2.196, 0.678)
pt3dadd(13.979, 259.064, 2.207, 0.678)
pt3dadd(13.879, 259.133, 2.221, 0.678)
pt3dadd(13.776, 259.199, 2.234, 0.678)
pt3dadd(13.673, 259.265, 2.248, 0.678)
pt3dadd(13.57, 259.33, 2.262, 0.678)
pt3dadd(13.57, 259.334, 2.273, 0.678)
pt3dadd(13.467, 259.399, 2.287, 0.678)
pt3dadd(13.36, 259.433, 2.329, 0.678)
pt3dadd(13.252, 259.457, 2.38, 0.678)
pt3dadd(13.143, 259.481, 2.431, 0.678)
pt3dadd(13.035, 259.504, 2.481, 0.678)
pt3dadd(12.927, 259.529, 2.532, 0.678)
pt3dadd(12.808, 259.548, 2.545, 0.678)
pt3dadd(12.69, 259.566, 2.556, 0.678)
pt3dadd(12.571, 259.582, 2.573, 0.678)
pt3dadd(12.453, 259.585, 2.601, 0.678)
pt3dadd(12.335, 259.59, 2.63, 0.678)
pt3dadd(12.266, 259.594, 2.71, 0.678)
pt3dadd(12.22, 259.598, 2.814, 0.678)
pt3dadd(12.155, 259.63, 2.893, 0.678)
pt3dadd(12.061, 259.698, 2.934, 0.678)
pt3dadd(11.963, 259.762, 2.975, 0.678)
pt3dadd(11.862, 259.82, 3.014, 0.678)
pt3dadd(11.761, 259.879, 3.054, 0.678)
pt3dadd(11.665, 259.949, 3.082, 0.678)
pt3dadd(11.578, 260.035, 3.094, 0.678)
pt3dadd(11.482, 260.104, 3.109, 0.678)
pt3dadd(11.38, 260.148, 3.15, 0.678)
pt3dadd(11.296, 260.218, 3.207, 0.678)
pt3dadd(11.212, 260.286, 3.265, 0.678)
pt3dadd(11.128, 260.356, 3.322, 0.678)
pt3dadd(11.035, 260.419, 3.369, 0.678)
pt3dadd(10.93, 260.478, 3.397, 0.678)
pt3dadd(10.841, 260.549, 3.432, 0.678)
pt3dadd(10.783, 260.65, 3.48, 0.678)
pt3dadd(10.707, 260.713, 3.54, 0.678)
pt3dadd(10.615, 260.746, 3.611, 0.678)
pt3dadd(10.576, 260.771, 3.707, 0.678)
pt3dadd(10.565, 260.79, 3.817, 0.678)
pt3dadd(10.543, 260.824, 3.907, 0.678)
pt3dadd(10.464, 260.916, 3.902, 0.678)
pt3dadd(10.392, 261.008, 3.885, 0.678)
pt3dadd(10.309, 261.097, 3.879, 0.678)
pt3dadd(10.211, 261.145, 3.85, 0.678)
pt3dadd(10.123, 261.212, 3.822, 0.678)
pt3dadd(10.045, 261.307, 3.828, 0.678)
pt3dadd(9.968, 261.403, 3.837, 0.678)
pt3dadd(9.893, 261.488, 3.886, 0.678)
pt3dadd(9.815, 261.564, 3.941, 0.678)
pt3dadd(9.727, 261.606, 4.012, 0.678)
pt3dadd(9.639, 261.649, 4.083, 0.678)
pt3dadd(9.603, 261.7, 4.179, 0.678)
pt3dadd(9.577, 261.751, 4.28, 0.678)
pt3dadd(9.507, 261.841, 4.307, 0.678)
pt3dadd(9.43, 261.936, 4.323, 0.678)
pt3dadd(9.35, 262.03, 4.338, 0.678)
pt3dadd(9.249, 262.097, 4.355, 0.678)
pt3dadd(9.148, 262.165, 4.372, 0.678)
pt3dadd(9.095, 262.271, 4.411, 0.678)
pt3dadd(9.022, 262.368, 4.437, 0.678)
pt3dadd(8.949, 262.466, 4.463, 0.678)
pt3dadd(8.876, 262.564, 4.489, 0.678)
pt3dadd(8.803, 262.662, 4.515, 0.678)
pt3dadd(8.738, 262.765, 4.53, 0.678)
pt3dadd(8.676, 262.873, 4.541, 0.678)
pt3dadd(8.613, 262.98, 4.553, 0.678)
pt3dadd(8.55, 263.086, 4.564, 0.678)
pt3dadd(8.488, 263.192, 4.575, 0.678)
pt3dadd(8.488, 263.196, 4.587, 0.678)
pt3dadd(8.402, 263.279, 4.613, 0.678)
pt3dadd(8.307, 263.351, 4.644, 0.678)
pt3dadd(8.211, 263.425, 4.675, 0.678)
pt3dadd(8.116, 263.497, 4.707, 0.678)
pt3dadd(8.017, 263.564, 4.734, 0.678)
pt3dadd(7.905, 263.61, 4.751, 0.678)
pt3dadd(7.792, 263.656, 4.767, 0.678)
pt3dadd(7.717, 263.742, 4.816, 0.678)
pt3dadd(7.64, 263.827, 4.86, 0.678)
pt3dadd(7.549, 263.908, 4.889, 0.678)
pt3dadd(7.468, 263.995, 4.913, 0.678)
pt3dadd(7.407, 264.104, 4.924, 0.678)
pt3dadd(7.352, 264.214, 4.936, 0.678)
pt3dadd(7.337, 264.336, 4.947, 0.678)
pt3dadd(7.296, 264.445, 4.959, 0.678)
pt3dadd(7.198, 264.516, 4.97, 0.678)
pt3dadd(7.102, 264.592, 4.982, 0.678)
pt3dadd(7.02, 264.684, 4.993, 0.678)
pt3dadd(6.94, 264.778, 5.005, 0.678)
pt3dadd(6.908, 264.896, 5.016, 0.678)
pt3dadd(6.875, 265.016, 5.028, 0.678)
pt3dadd(6.859, 265.139, 5.039, 0.678)
pt3dadd(6.855, 265.262, 5.051, 0.678)
pt3dadd(6.85, 265.387, 5.062, 0.678)
pt3dadd(6.819, 265.505, 5.074, 0.678)
pt3dadd(6.777, 265.621, 5.091, 0.678)
pt3dadd(6.742, 265.73, 5.139, 0.678)
pt3dadd(6.707, 265.841, 5.188, 0.678)
pt3dadd(6.672, 265.952, 5.236, 0.678)
pt3dadd(6.637, 266.062, 5.284, 0.678)
pt3dadd(6.586, 266.17, 5.32, 0.678)
pt3dadd(6.525, 266.274, 5.348, 0.678)
pt3dadd(6.455, 266.376, 5.365, 0.678)
pt3dadd(6.381, 266.473, 5.377, 0.678)
pt3dadd(6.293, 266.558, 5.388, 0.678)
pt3dadd(6.294, 266.563, 5.4, 0.678)
pt3dadd(6.195, 266.634, 5.411, 0.678)
pt3dadd(6.089, 266.684, 5.429, 0.678)
pt3dadd(5.971, 266.693, 5.458, 0.678)
pt3dadd(5.854, 266.702, 5.488, 0.678)
pt3dadd(5.758, 266.746, 5.547, 0.678)
pt3dadd(5.665, 266.795, 5.61, 0.678)
pt3dadd(5.573, 266.844, 5.673, 0.678)
pt3dadd(5.502, 266.939, 5.691, 0.678)
pt3dadd(5.434, 267.043, 5.703, 0.678)
pt3dadd(5.377, 267.151, 5.714, 0.678)
pt3dadd(5.337, 267.266, 5.746, 0.678)
pt3dadd(5.299, 267.382, 5.778, 0.678)
pt3dadd(5.26, 267.497, 5.81, 0.678)
pt3dadd(5.222, 267.611, 5.842, 0.678)
pt3dadd(5.177, 267.722, 5.875, 0.678)
pt3dadd(5.098, 267.814, 5.909, 0.678)
pt3dadd(5.018, 267.902, 5.944, 0.678)
pt3dadd(4.939, 267.992, 5.978, 0.678)
pt3dadd(4.86, 268.082, 6.013, 0.678)
pt3dadd(4.784, 268.178, 6.029, 0.678)
pt3dadd(4.71, 268.276, 6.04, 0.678)
pt3dadd(4.635, 268.375, 6.052, 0.678)
pt3dadd(4.56, 268.474, 6.063, 0.678)
pt3dadd(4.485, 268.571, 6.075, 0.678)
pt3dadd(4.432, 268.679, 6.104, 0.678)
pt3dadd(4.383, 268.789, 6.137, 0.678)
pt3dadd(4.334, 268.901, 6.17, 0.678)
pt3dadd(4.286, 269.011, 6.203, 0.678)
pt3dadd(4.242, 269.123, 6.237, 0.678)
pt3dadd(4.221, 269.24, 6.275, 0.678)
}
}
proc shape3d_71() {
apic[16] { pt3dadd(4.2, 269.359, 6.312, 0.678)
pt3dadd(4.179, 269.478, 6.35, 0.678)
pt3dadd(4.158, 269.596, 6.388, 0.678)
pt3dadd(4.131, 269.71, 6.429, 0.678)
pt3dadd(4.063, 269.795, 6.486, 0.678)
pt3dadd(3.994, 269.881, 6.544, 0.678)
pt3dadd(3.926, 269.966, 6.602, 0.678)
pt3dadd(3.859, 270.052, 6.66, 0.678)
pt3dadd(3.803, 270.125, 6.74, 0.678)
pt3dadd(3.748, 270.197, 6.819, 0.678)
pt3dadd(3.693, 270.27, 6.898, 0.678)
pt3dadd(3.638, 270.342, 6.978, 0.678)
pt3dadd(3.585, 270.43, 7.047, 0.678)
pt3dadd(3.529, 270.52, 7.104, 0.678)
pt3dadd(3.461, 270.623, 7.116, 0.678)
pt3dadd(3.393, 270.726, 7.127, 0.678)
pt3dadd(3.299, 270.804, 7.138, 0.678)
pt3dadd(3.206, 270.884, 7.15, 0.678)
pt3dadd(3.1, 270.943, 7.161, 0.678)
pt3dadd(2.993, 271.002, 7.173, 0.678)
pt3dadd(2.905, 271.084, 7.184, 0.678)
pt3dadd(2.826, 271.178, 7.196, 0.678)
pt3dadd(2.747, 271.273, 7.207, 0.678)
pt3dadd(2.678, 271.372, 7.221, 0.678)
pt3dadd(2.678, 271.494, 7.249, 0.678)
pt3dadd(2.678, 271.616, 7.278, 0.678)
pt3dadd(2.678, 271.694, 7.347, 0.678)
pt3dadd(2.679, 271.73, 7.455, 0.678)
pt3dadd(2.679, 271.769, 7.563, 0.678)
pt3dadd(2.679, 271.82, 7.662, 0.678)
pt3dadd(2.679, 271.913, 7.742, 0.678)
pt3dadd(2.68, 272.008, 7.82, 0.678)
pt3dadd(2.68, 272.108, 7.889, 0.678)
pt3dadd(2.68, 272.212, 7.959, 0.678)
pt3dadd(2.68, 272.318, 8.015, 0.678)
pt3dadd(2.68, 272.443, 8.039, 0.678)
pt3dadd(2.681, 272.566, 8.063, 0.678)
pt3dadd(2.681, 272.689, 8.079, 0.678)
pt3dadd(2.681, 272.814, 8.098, 0.678)
pt3dadd(2.681, 272.936, 8.122, 0.678)
pt3dadd(2.682, 273.06, 8.146, 0.678)
pt3dadd(2.682, 273.169, 8.205, 0.678)
pt3dadd(2.682, 273.277, 8.267, 0.678)
pt3dadd(2.72, 273.347, 8.35, 0.678)
pt3dadd(2.771, 273.402, 8.441, 0.678)
pt3dadd(2.873, 273.454, 8.48, 0.678)
pt3dadd(2.981, 273.505, 8.514, 0.678)
pt3dadd(3.067, 273.583, 8.558, 0.678)
pt3dadd(3.152, 273.662, 8.602, 0.678)
pt3dadd(3.236, 273.742, 8.647, 0.678)
pt3dadd(3.262, 273.845, 8.708, 0.678)
pt3dadd(3.283, 273.952, 8.77, 0.678)
pt3dadd(3.29, 274.062, 8.823, 0.678)
pt3dadd(3.317, 274.18, 8.862, 0.678)
pt3dadd(3.345, 274.296, 8.901, 0.678)
pt3dadd(3.372, 274.412, 8.94, 0.678)
pt3dadd(3.4, 274.529, 8.978, 0.678)
pt3dadd(3.439, 274.638, 9.021, 0.678)
pt3dadd(3.503, 274.732, 9.073, 0.678)
pt3dadd(3.568, 274.825, 9.124, 0.678)
pt3dadd(3.632, 274.92, 9.176, 0.678)
pt3dadd(3.696, 275.014, 9.225, 0.678)
pt3dadd(3.759, 275.117, 9.259, 0.678)
pt3dadd(3.832, 275.204, 9.298, 0.678)
pt3dadd(3.937, 275.243, 9.35, 0.678)
pt3dadd(4.029, 275.297, 9.403, 0.678)
pt3dadd(4.03, 275.3, 9.415, 0.678)
pt3dadd(4.098, 275.389, 9.471, 0.678)
pt3dadd(4.128, 275.488, 9.53, 0.678)
pt3dadd(4.128, 275.596, 9.592, 0.678)
pt3dadd(4.141, 275.694, 9.662, 0.678)
pt3dadd(4.175, 275.776, 9.743, 0.678)
pt3dadd(4.216, 275.874, 9.807, 0.678)
pt3dadd(4.257, 275.972, 9.871, 0.678)
pt3dadd(4.297, 276.071, 9.934, 0.678)
pt3dadd(4.339, 276.168, 9.998, 0.678)
pt3dadd(4.418, 276.259, 10.02, 0.678)
pt3dadd(4.503, 276.349, 10.037, 0.678)
pt3dadd(4.562, 276.43, 10.102, 0.678)
pt3dadd(4.615, 276.506, 10.179, 0.678)
pt3dadd(4.662, 276.536, 10.28, 0.678)
pt3dadd(4.715, 276.569, 10.373, 0.678)
pt3dadd(4.83, 276.607, 10.389, 0.678)
pt3dadd(4.945, 276.646, 10.406, 0.678)
pt3dadd(5.038, 276.7, 10.459, 0.678)
pt3dadd(5.125, 276.758, 10.523, 0.678)
pt3dadd(5.211, 276.817, 10.588, 0.678)
pt3dadd(5.291, 276.902, 10.628, 0.678)
pt3dadd(5.37, 276.992, 10.663, 0.678)
pt3dadd(5.445, 277.09, 10.675, 0.678)
pt3dadd(5.521, 277.188, 10.687, 0.678)
pt3dadd(5.592, 277.288, 10.698, 0.678)
pt3dadd(5.631, 277.406, 10.71, 0.678)
pt3dadd(5.671, 277.524, 10.721, 0.678)
pt3dadd(5.684, 277.639, 10.761, 0.678)
pt3dadd(5.689, 277.756, 10.81, 0.678)
pt3dadd(5.694, 277.871, 10.858, 0.678)
pt3dadd(5.74, 277.91, 10.945, 0.678)
pt3dadd(5.799, 277.927, 11.043, 0.678)
pt3dadd(5.843, 278.017, 11.082, 0.678)
pt3dadd(5.883, 278.134, 11.096, 0.678)
pt3dadd(5.922, 278.252, 11.112, 0.678)
pt3dadd(5.936, 278.364, 11.158, 0.678)
pt3dadd(5.936, 278.471, 11.22, 0.678)
pt3dadd(5.936, 278.546, 11.303, 0.678)
pt3dadd(5.963, 278.633, 11.363, 0.678)
pt3dadd(6.002, 278.748, 11.398, 0.678)
pt3dadd(6.042, 278.861, 11.433, 0.678)
pt3dadd(6.082, 278.976, 11.468, 0.678)
pt3dadd(6.121, 279.09, 11.503, 0.678)
pt3dadd(6.152, 279.21, 11.516, 0.678)
pt3dadd(6.183, 279.33, 11.528, 0.678)
pt3dadd(6.213, 279.45, 11.539, 0.678)
pt3dadd(6.244, 279.571, 11.55, 0.678)
pt3dadd(6.274, 279.691, 11.562, 0.678)
pt3dadd(6.299, 279.811, 11.579, 0.678)
pt3dadd(6.299, 279.931, 11.62, 0.678)
pt3dadd(6.299, 280.049, 11.661, 0.678)
pt3dadd(6.3, 280.169, 11.703, 0.678)
pt3dadd(6.3, 280.286, 11.744, 0.678)
pt3dadd(6.3, 280.406, 11.785, 0.678)
pt3dadd(6.304, 280.524, 11.826, 0.678)
pt3dadd(6.31, 280.644, 11.866, 0.678)
pt3dadd(6.328, 280.758, 11.908, 0.678)
pt3dadd(6.378, 280.864, 11.955, 0.678)
pt3dadd(6.413, 280.969, 12.008, 0.678)
pt3dadd(6.426, 281.077, 12.068, 0.678)
pt3dadd(6.468, 281.159, 12.132, 0.678)
pt3dadd(6.561, 281.191, 12.203, 0.678)
pt3dadd(6.653, 281.242, 12.261, 0.678)
pt3dadd(6.746, 281.311, 12.305, 0.678)
pt3dadd(6.838, 281.382, 12.35, 0.678)
pt3dadd(6.895, 281.473, 12.395, 0.678)
pt3dadd(6.908, 281.588, 12.443, 0.678)
pt3dadd(6.927, 281.705, 12.484, 0.678)
pt3dadd(6.959, 281.815, 12.529, 0.678)
pt3dadd(6.985, 281.923, 12.587, 0.678)
pt3dadd(7.012, 282.029, 12.645, 0.678)
pt3dadd(7.039, 282.137, 12.703, 0.678)
pt3dadd(7.067, 282.244, 12.761, 0.678)
pt3dadd(7.067, 282.247, 12.773, 0.678)
pt3dadd(7.143, 282.324, 12.834, 0.678)
pt3dadd(7.219, 282.4, 12.894, 0.678)
pt3dadd(7.294, 282.476, 12.955, 0.678)
pt3dadd(7.37, 282.552, 13.016, 0.678)
pt3dadd(7.482, 282.565, 13.062, 0.678)
pt3dadd(7.595, 282.575, 13.108, 0.678)
pt3dadd(7.698, 282.629, 13.137, 0.678)
pt3dadd(7.797, 282.7, 13.16, 0.678)
pt3dadd(7.857, 282.757, 13.233, 0.678)
pt3dadd(7.9, 282.812, 13.328, 0.678)
pt3dadd(7.954, 282.829, 13.427, 0.678)
pt3dadd(8.011, 282.84, 13.527, 0.678)
pt3dadd(8.1, 282.884, 13.581, 0.678)
pt3dadd(8.203, 282.944, 13.615, 0.678)
pt3dadd(8.203, 282.949, 13.627, 0.678)
pt3dadd(8.298, 283.025, 13.643, 0.678)
pt3dadd(8.345, 283.139, 13.655, 0.678)
pt3dadd(8.378, 283.258, 13.666, 0.678)
pt3dadd(8.426, 283.373, 13.678, 0.678)
pt3dadd(8.481, 283.48, 13.699, 0.678)
pt3dadd(8.539, 283.572, 13.759, 0.678)
pt3dadd(8.598, 283.663, 13.819, 0.678)
pt3dadd(8.656, 283.754, 13.879, 0.678)
pt3dadd(8.71, 283.848, 13.939, 0.678)
pt3dadd(8.711, 283.955, 14.001, 0.678)
pt3dadd(8.711, 284.063, 14.063, 0.678)
pt3dadd(8.716, 284.178, 14.111, 0.678)
pt3dadd(8.722, 284.296, 14.157, 0.678)
pt3dadd(8.722, 284.299, 14.168, 0.678)
pt3dadd(8.791, 284.381, 14.196, 0.678)
pt3dadd(8.897, 284.442, 14.213, 0.678)
pt3dadd(9.007, 284.494, 14.227, 0.678)
pt3dadd(9.12, 284.538, 14.238, 0.678)
pt3dadd(9.222, 284.592, 14.25, 0.678)
pt3dadd(9.222, 284.597, 14.261, 0.678)
pt3dadd(9.223, 284.6, 14.273, 0.678)
pt3dadd(9.245, 284.723, 14.284, 0.678)
pt3dadd(9.266, 284.846, 14.296, 0.678)
pt3dadd(9.289, 284.968, 14.307, 0.678)
pt3dadd(9.311, 285.09, 14.319, 0.678)
pt3dadd(9.327, 285.212, 14.33, 0.678)
pt3dadd(9.342, 285.337, 14.341, 0.678)
pt3dadd(9.369, 285.452, 14.353, 0.678)
pt3dadd(9.463, 285.533, 14.365, 0.678)
pt3dadd(9.557, 285.611, 14.376, 0.678)
pt3dadd(9.638, 285.696, 14.401, 0.678)
pt3dadd(9.689, 285.797, 14.455, 0.678)
pt3dadd(9.731, 285.872, 14.531, 0.678)
pt3dadd(9.761, 285.923, 14.632, 0.678)
pt3dadd(9.792, 285.972, 14.732, 0.678)
pt3dadd(9.797, 286.036, 14.83, 0.678)
pt3dadd(9.797, 286.099, 14.928, 0.678)
pt3dadd(9.797, 286.188, 15.009, 0.678)
pt3dadd(9.8, 286.29, 15.08, 0.678)
pt3dadd(9.803, 286.391, 15.15, 0.678)
pt3dadd(9.806, 286.493, 15.22, 0.678)
pt3dadd(9.809, 286.594, 15.29, 0.678)
pt3dadd(9.812, 286.696, 15.359, 0.678)
pt3dadd(9.834, 286.81, 15.405, 0.678)
}
}
proc shape3d_72() {
apic[16] { pt3dadd(9.857, 286.925, 15.451, 0.678)
pt3dadd(9.879, 287.04, 15.497, 0.678)
pt3dadd(9.901, 287.154, 15.543, 0.678)
pt3dadd(9.919, 287.27, 15.586, 0.678)
pt3dadd(9.92, 287.393, 15.614, 0.678)
pt3dadd(9.92, 287.515, 15.643, 0.678)
pt3dadd(9.92, 287.616, 15.705, 0.678)
pt3dadd(9.92, 287.702, 15.79, 0.678)
pt3dadd(9.911, 287.78, 15.878, 0.678)
pt3dadd(9.89, 287.855, 15.97, 0.678)
pt3dadd(9.846, 287.941, 16.034, 0.678)
pt3dadd(9.781, 288.04, 16.076, 0.678)
pt3dadd(9.714, 288.128, 16.13, 0.678)
pt3dadd(9.64, 288.217, 16.167, 0.678)
pt3dadd(9.561, 288.312, 16.186, 0.678)
pt3dadd(9.483, 288.406, 16.204, 0.678)
pt3dadd(9.404, 288.5, 16.223, 0.678)
pt3dadd(9.326, 288.595, 16.241, 0.678)
pt3dadd(9.235, 288.677, 16.254, 0.678)
pt3dadd(9.142, 288.757, 16.266, 0.678)
pt3dadd(9.048, 288.835, 16.277, 0.678)
pt3dadd(8.955, 288.916, 16.289, 0.678)
pt3dadd(8.861, 288.994, 16.3, 0.678)
pt3dadd(8.805, 289.103, 16.312, 0.678)
pt3dadd(8.758, 289.216, 16.323, 0.678)
pt3dadd(8.711, 289.331, 16.334, 0.678)
pt3dadd(8.663, 289.446, 16.346, 0.678)
pt3dadd(8.616, 289.56, 16.357, 0.678)
pt3dadd(8.561, 289.67, 16.372, 0.678)
pt3dadd(8.498, 289.776, 16.388, 0.678)
pt3dadd(8.436, 289.878, 16.42, 0.678)
pt3dadd(8.376, 289.972, 16.475, 0.678)
pt3dadd(8.323, 290.077, 16.507, 0.678)
pt3dadd(8.275, 290.192, 16.523, 0.678)
pt3dadd(8.221, 290.291, 16.514, 0.678)
pt3dadd(8.16, 290.372, 16.468, 0.678)
pt3dadd(8.126, 290.458, 16.414, 0.678)
pt3dadd(8.097, 290.557, 16.381, 0.678)
pt3dadd(8.056, 290.674, 16.388, 0.678)
pt3dadd(8.02, 290.792, 16.395, 0.678)
pt3dadd(8.01, 290.916, 16.406, 0.678)
pt3dadd(8.001, 291.04, 16.418, 0.678)
pt3dadd(7.976, 291.16, 16.424, 0.678)
pt3dadd(7.923, 291.269, 16.418, 0.678)
pt3dadd(7.862, 291.373, 16.413, 0.678)
pt3dadd(7.784, 291.466, 16.409, 0.678)
pt3dadd(7.774, 291.496, 16.516, 0.678)
pt3dadd(7.755, 291.553, 16.606, 0.678)
pt3dadd(7.719, 291.656, 16.666, 0.678)
pt3dadd(7.682, 291.76, 16.726, 0.678)
pt3dadd(7.645, 291.86, 16.786, 0.678)
pt3dadd(7.609, 291.965, 16.845, 0.678)
pt3dadd(7.564, 292.078, 16.875, 0.678)
pt3dadd(7.519, 292.192, 16.905, 0.678)
pt3dadd(7.475, 292.303, 16.935, 0.678)
pt3dadd(7.43, 292.417, 16.965, 0.678)
pt3dadd(7.389, 292.534, 16.99, 0.678)
pt3dadd(7.356, 292.652, 17.001, 0.678)
pt3dadd(7.324, 292.772, 17.013, 0.678)
pt3dadd(7.291, 292.891, 17.024, 0.678)
pt3dadd(7.258, 293.011, 17.036, 0.678)
pt3dadd(7.225, 293.13, 17.047, 0.678)
pt3dadd(7.193, 293.25, 17.059, 0.678)
pt3dadd(7.16, 293.371, 17.07, 0.678)
pt3dadd(7.127, 293.49, 17.082, 0.678)
pt3dadd(7.094, 293.61, 17.093, 0.678)
pt3dadd(7.062, 293.729, 17.104, 0.678)
pt3dadd(7.029, 293.849, 17.116, 0.678)
pt3dadd(6.985, 293.962, 17.11, 0.678)
pt3dadd(6.941, 294.076, 17.102, 0.678)
pt3dadd(6.896, 294.188, 17.095, 0.678)
pt3dadd(6.852, 294.302, 17.088, 0.678)
pt3dadd(6.812, 294.418, 17.084, 0.678)
pt3dadd(6.797, 294.541, 17.091, 0.678)
pt3dadd(6.782, 294.665, 17.098, 0.678)
pt3dadd(6.751, 294.778, 17.087, 0.678)
pt3dadd(6.709, 294.887, 17.063, 0.678)
pt3dadd(6.696, 295.003, 17.08, 0.678)
pt3dadd(6.697, 295.126, 17.114, 0.678)
pt3dadd(6.681, 295.231, 17.174, 0.678)
pt3dadd(6.661, 295.332, 17.243, 0.678)
pt3dadd(6.627, 295.442, 17.243, 0.678)
pt3dadd(6.589, 295.555, 17.226, 0.678)
pt3dadd(6.552, 295.669, 17.21, 0.678)
pt3dadd(6.491, 295.772, 17.211, 0.678)
pt3dadd(6.416, 295.871, 17.222, 0.678)
pt3dadd(6.362, 295.979, 17.234, 0.678)
pt3dadd(6.339, 296.1, 17.245, 0.678)
pt3dadd(6.319, 296.224, 17.257, 0.678)
pt3dadd(6.3, 296.346, 17.268, 0.678)
pt3dadd(6.28, 296.468, 17.28, 0.678)
pt3dadd(6.261, 296.591, 17.291, 0.678)
pt3dadd(6.241, 296.714, 17.303, 0.678)
pt3dadd(6.232, 296.836, 17.324, 0.678)
pt3dadd(6.23, 296.959, 17.352, 0.678)
pt3dadd(6.228, 297.082, 17.38, 0.678)
pt3dadd(6.226, 297.204, 17.409, 0.678)
pt3dadd(6.224, 297.326, 17.437, 0.678)
pt3dadd(6.222, 297.449, 17.465, 0.678)
pt3dadd(6.222, 297.572, 17.483, 0.678)
pt3dadd(6.222, 297.696, 17.494, 0.678)
pt3dadd(6.222, 297.821, 17.506, 0.678)
pt3dadd(6.222, 297.946, 17.517, 0.678)
pt3dadd(6.222, 298.069, 17.529, 0.678)
pt3dadd(6.223, 298.194, 17.54, 0.678)
pt3dadd(6.223, 298.318, 17.552, 0.678)
pt3dadd(6.223, 298.438, 17.586, 0.678)
pt3dadd(6.223, 298.553, 17.635, 0.678)
pt3dadd(6.224, 298.669, 17.684, 0.678)
pt3dadd(6.224, 298.786, 17.732, 0.678)
pt3dadd(6.224, 298.9, 17.781, 0.678)
pt3dadd(6.224, 299.018, 17.82, 0.678)
pt3dadd(6.225, 299.142, 17.832, 0.678)
pt3dadd(6.225, 299.267, 17.843, 0.678)
pt3dadd(6.225, 299.39, 17.855, 0.678)
pt3dadd(6.225, 299.515, 17.866, 0.678)
pt3dadd(6.225, 299.639, 17.878, 0.678)
pt3dadd(6.226, 299.764, 17.889, 0.678)
pt3dadd(6.215, 299.886, 17.904, 0.678)
pt3dadd(6.17, 299.999, 17.932, 0.678)
pt3dadd(6.12, 300.109, 17.963, 0.678)
pt3dadd(6.046, 300.194, 18.012, 0.678)
pt3dadd(5.998, 300.296, 18.046, 0.678)
pt3dadd(5.994, 300.42, 18.058, 0.678)
pt3dadd(5.99, 300.545, 18.069, 0.678)
pt3dadd(5.988, 300.67, 18.079, 0.678)
pt3dadd(5.988, 300.793, 18.087, 0.678)
pt3dadd(5.988, 300.917, 18.094, 0.678)
pt3dadd(5.988, 301.025, 18.066, 0.678)
pt3dadd(5.988, 301.12, 18.013, 0.678)
pt3dadd(5.989, 301.199, 17.946, 0.678)
pt3dadd(5.989, 301.28, 17.882, 0.678)
pt3dadd(5.989, 301.403, 17.882, 0.678)
pt3dadd(5.989, 301.526, 17.88, 0.678)
pt3dadd(5.99, 301.651, 17.889, 0.678)
pt3dadd(5.99, 301.774, 17.912, 0.678)
pt3dadd(5.99, 301.897, 17.936, 0.678)
pt3dadd(5.986, 302.011, 17.983, 0.678)
pt3dadd(5.98, 302.122, 18.041, 0.678)
pt3dadd(5.942, 302.198, 18.114, 0.678)
pt3dadd(5.874, 302.243, 18.201, 0.678)
pt3dadd(5.803, 302.275, 18.289, 0.678)
pt3dadd(5.762, 302.336, 18.372, 0.678)
pt3dadd(5.756, 302.432, 18.448, 0.678)
pt3dadd(5.755, 302.527, 18.525, 0.678)
pt3dadd(5.761, 302.622, 18.601, 0.678)
pt3dadd(5.798, 302.698, 18.674, 0.678)
pt3dadd(5.893, 302.738, 18.74, 0.678)
pt3dadd(5.948, 302.808, 18.809, 0.678)
pt3dadd(5.964, 302.906, 18.881, 0.678)
pt3dadd(5.981, 303.005, 18.954, 0.678)
pt3dadd(5.994, 303.101, 19.028, 0.678)
pt3dadd(5.994, 303.193, 19.108, 0.678)
pt3dadd(5.996, 303.283, 19.188, 0.678)
pt3dadd(6.017, 303.366, 19.273, 0.678)
pt3dadd(6.038, 303.448, 19.358, 0.678)
pt3dadd(6.096, 303.496, 19.44, 0.678)
pt3dadd(6.184, 303.514, 19.519, 0.678)
pt3dadd(6.25, 303.578, 19.582, 0.678)
pt3dadd(6.299, 303.682, 19.635, 0.678)
pt3dadd(6.343, 303.786, 19.682, 0.678)
pt3dadd(6.348, 303.911, 19.694, 0.678)
pt3dadd(6.352, 304.034, 19.705, 0.678)
pt3dadd(6.36, 304.159, 19.717, 0.678)
pt3dadd(6.384, 304.28, 19.73, 0.678)
pt3dadd(6.429, 304.396, 19.748, 0.678)
pt3dadd(6.473, 304.511, 19.766, 0.678)
pt3dadd(6.517, 304.626, 19.784, 0.678)
pt3dadd(6.561, 304.742, 19.802, 0.678)
pt3dadd(6.602, 304.859, 19.821, 0.678)
pt3dadd(6.624, 304.98, 19.845, 0.678)
pt3dadd(6.647, 305.1, 19.869, 0.678)
pt3dadd(6.67, 305.222, 19.893, 0.678)
pt3dadd(6.692, 305.344, 19.917, 0.678)
pt3dadd(6.715, 305.465, 19.941, 0.678)
pt3dadd(6.719, 305.588, 19.954, 0.678)
pt3dadd(6.719, 305.592, 19.966, 0.678)
pt3dadd(6.72, 305.597, 19.977, 0.678)
pt3dadd(6.72, 305.6, 19.988, 0.678)
}
apic[17] {pt3dclear()
pt3dadd(51.787, 218.947, -8.1, 1.23)
pt3dadd(51.791, 218.951, -8.111, 1.236)
pt3dadd(51.824, 218.978, -8.204, 1.278)
pt3dadd(51.856, 219.006, -8.297, 1.322)
pt3dadd(51.889, 219.034, -8.391, 1.366)
pt3dadd(51.922, 219.061, -8.484, 1.41)
pt3dadd(51.955, 219.089, -8.577, 1.454)
pt3dadd(51.988, 219.116, -8.671, 1.498)
pt3dadd(52.02, 219.144, -8.764, 1.542)
pt3dadd(52.053, 219.172, -8.858, 1.584)
pt3dadd(52.086, 219.199, -8.951, 1.628)
pt3dadd(52.119, 219.228, -9.044, 1.672)
pt3dadd(52.152, 219.256, -9.138, 1.716)
pt3dadd(52.185, 219.283, -9.231, 1.76)
pt3dadd(52.217, 219.311, -9.324, 1.804)
pt3dadd(52.25, 219.338, -9.418, 1.848)
pt3dadd(52.283, 219.366, -9.511, 1.89)
pt3dadd(52.316, 219.394, -9.604, 1.934)
pt3dadd(52.349, 219.421, -9.698, 1.978)
pt3dadd(52.381, 219.449, -9.791, 2.022)
pt3dadd(52.414, 219.476, -9.885, 2.066)
}
}
proc shape3d_73() {
apic[17] { pt3dadd(52.447, 219.504, -9.978, 2.11)
pt3dadd(52.48, 219.533, -10.071, 2.154)
pt3dadd(52.512, 219.56, -10.165, 2.196)
pt3dadd(52.545, 219.588, -10.258, 2.24)
pt3dadd(52.56, 219.666, -10.3, 2.288)
pt3dadd(52.56, 219.786, -10.3, 2.338)
pt3dadd(52.56, 219.906, -10.3, 2.388)
pt3dadd(52.56, 220.026, -10.3, 2.43)
pt3dadd(52.56, 220.146, -10.3, 2.462)
pt3dadd(52.56, 220.266, -10.3, 2.496)
pt3dadd(52.53, 220.379, -10.3, 2.512)
pt3dadd(52.477, 220.487, -10.3, 2.512)
pt3dadd(52.41, 220.584, -10.3, 2.5)
pt3dadd(52.316, 220.658, -10.3, 2.464)
pt3dadd(52.23, 220.739, -10.3, 2.42)
pt3dadd(52.177, 220.847, -10.3, 2.336)
pt3dadd(52.119, 220.952, -10.3, 2.31)
pt3dadd(52.059, 221.056, -10.3, 2.31)
pt3dadd(51.999, 221.16, -10.3, 2.31)
pt3dadd(51.939, 221.263, -10.3, 2.31)
pt3dadd(51.879, 221.368, -10.3, 2.31)
pt3dadd(51.809, 221.465, -10.3, 2.316)
pt3dadd(51.732, 221.556, -10.3, 2.326)
pt3dadd(51.654, 221.647, -10.3, 2.336)
pt3dadd(51.576, 221.738, -10.3, 2.346)
pt3dadd(51.498, 221.83, -10.3, 2.356)
pt3dadd(51.433, 221.93, -10.3, 2.378)
pt3dadd(51.376, 222.036, -10.3, 2.406)
pt3dadd(51.319, 222.142, -10.3, 2.436)
pt3dadd(51.262, 222.247, -10.3, 2.466)
pt3dadd(51.205, 222.353, -10.3, 2.494)
pt3dadd(51.152, 222.46, -10.3, 2.51)
pt3dadd(51.105, 222.57, -10.3, 2.504)
pt3dadd(51.057, 222.68, -10.3, 2.5)
pt3dadd(51.01, 222.791, -10.3, 2.496)
pt3dadd(50.962, 222.901, -10.3, 2.49)
pt3dadd(50.914, 223.01, -10.3, 2.484)
pt3dadd(50.864, 223.12, -10.3, 2.46)
pt3dadd(50.813, 223.229, -10.3, 2.436)
pt3dadd(50.763, 223.338, -10.3, 2.412)
pt3dadd(50.712, 223.446, -10.3, 2.388)
pt3dadd(50.662, 223.555, -10.3, 2.364)
pt3dadd(50.601, 223.658, -10.3, 2.324)
pt3dadd(50.538, 223.76, -10.3, 2.278)
pt3dadd(50.475, 223.862, -10.3, 2.234)
pt3dadd(50.412, 223.964, -10.3, 2.19)
pt3dadd(50.349, 224.066, -10.3, 2.146)
pt3dadd(50.291, 224.172, -10.3, 2.11)
pt3dadd(50.234, 224.278, -10.3, 2.076)
pt3dadd(50.177, 224.383, -10.3, 2.042)
pt3dadd(50.121, 224.489, -10.3, 2.008)
pt3dadd(50.064, 224.594, -10.3, 1.974)
pt3dadd(50.011, 224.702, -10.304, 1.942)
pt3dadd(49.961, 224.812, -10.31, 1.912)
pt3dadd(49.911, 224.92, -10.317, 1.882)
pt3dadd(49.86, 225.029, -10.324, 1.852)
pt3dadd(49.81, 225.137, -10.33, 1.822)
pt3dadd(49.742, 225.232, -10.346, 1.784)
pt3dadd(49.66, 225.314, -10.369, 1.738)
pt3dadd(49.577, 225.397, -10.392, 1.69)
pt3dadd(49.494, 225.48, -10.414, 1.644)
pt3dadd(49.414, 225.564, -10.436, 1.6)
pt3dadd(49.344, 225.66, -10.45, 1.562)
pt3dadd(49.274, 225.756, -10.465, 1.524)
pt3dadd(49.204, 225.852, -10.48, 1.486)
pt3dadd(49.134, 225.948, -10.494, 1.446)
pt3dadd(49.056, 226.038, -10.501, 1.412)
pt3dadd(48.971, 226.122, -10.504, 1.382)
pt3dadd(48.886, 226.207, -10.506, 1.352)
pt3dadd(48.801, 226.292, -10.508, 1.32)
pt3dadd(48.717, 226.378, -10.51, 1.29)
pt3dadd(48.639, 226.466, -10.526, 1.28)
pt3dadd(48.563, 226.556, -10.546, 1.28)
pt3dadd(48.488, 226.646, -10.566, 1.28)
pt3dadd(48.413, 226.736, -10.586, 1.28)
pt3dadd(48.353, 226.835, -10.606, 1.286)
pt3dadd(48.33, 226.95, -10.625, 1.3)
pt3dadd(48.307, 227.065, -10.644, 1.314)
pt3dadd(48.284, 227.182, -10.663, 1.328)
pt3dadd(48.261, 227.297, -10.683, 1.344)
pt3dadd(48.234, 227.41, -10.702, 1.358)
pt3dadd(48.171, 227.509, -10.725, 1.388)
pt3dadd(48.108, 227.608, -10.747, 1.416)
pt3dadd(48.045, 227.706, -10.77, 1.444)
pt3dadd(47.983, 227.806, -10.792, 1.472)
pt3dadd(47.939, 227.915, -10.8, 1.514)
pt3dadd(47.906, 228.03, -10.8, 1.566)
pt3dadd(47.87, 228.144, -10.804, 1.614)
pt3dadd(47.825, 228.253, -10.82, 1.652)
pt3dadd(47.771, 228.349, -10.84, 1.684)
pt3dadd(47.667, 228.361, -10.889, 1.696)
pt3dadd(47.564, 228.379, -10.937, 1.706)
pt3dadd(47.469, 228.437, -10.973, 1.678)
pt3dadd(47.373, 228.499, -11, 1.654)
pt3dadd(47.277, 228.57, -11, 1.64)
pt3dadd(47.18, 228.641, -11, 1.626)
pt3dadd(47.083, 228.712, -11, 1.612)
pt3dadd(47.05, 228.816, -11, 1.614)
pt3dadd(47.046, 228.936, -11, 1.622)
pt3dadd(47.041, 229.056, -11, 1.63)
pt3dadd(47.026, 229.172, -11.018, 1.646)
pt3dadd(47.008, 229.289, -11.04, 1.662)
pt3dadd(46.991, 229.404, -11.062, 1.68)
pt3dadd(46.892, 229.435, -11.078, 1.682)
pt3dadd(46.773, 229.446, -11.091, 1.682)
pt3dadd(46.659, 229.47, -11.1, 1.66)
pt3dadd(46.575, 229.549, -11.108, 1.63)
pt3dadd(46.508, 229.648, -11.123, 1.624)
pt3dadd(46.442, 229.746, -11.137, 1.618)
pt3dadd(46.375, 229.844, -11.152, 1.612)
pt3dadd(46.309, 229.943, -11.166, 1.608)
pt3dadd(46.246, 230.044, -11.181, 1.618)
pt3dadd(46.182, 230.144, -11.195, 1.628)
pt3dadd(46.119, 230.244, -11.209, 1.64)
pt3dadd(46.056, 230.345, -11.224, 1.65)
pt3dadd(45.991, 230.444, -11.238, 1.66)
pt3dadd(45.925, 230.543, -11.252, 1.672)
pt3dadd(45.859, 230.641, -11.267, 1.682)
pt3dadd(45.792, 230.741, -11.281, 1.694)
pt3dadd(45.726, 230.839, -11.296, 1.704)
pt3dadd(45.638, 230.918, -11.3, 1.712)
pt3dadd(45.542, 230.99, -11.3, 1.716)
pt3dadd(45.446, 231.062, -11.3, 1.722)
pt3dadd(45.35, 231.134, -11.3, 1.726)
pt3dadd(45.254, 231.206, -11.3, 1.732)
pt3dadd(45.177, 231.296, -11.3, 1.744)
pt3dadd(45.108, 231.395, -11.3, 1.758)
pt3dadd(45.039, 231.493, -11.3, 1.774)
pt3dadd(44.97, 231.592, -11.3, 1.788)
pt3dadd(44.901, 231.69, -11.3, 1.804)
pt3dadd(44.866, 231.802, -11.3, 1.822)
pt3dadd(44.847, 231.92, -11.3, 1.842)
pt3dadd(44.827, 232.038, -11.3, 1.864)
pt3dadd(44.807, 232.157, -11.3, 1.884)
pt3dadd(44.787, 232.276, -11.3, 1.904)
pt3dadd(44.768, 232.393, -11.3, 1.926)
pt3dadd(44.76, 232.507, -11.324, 1.954)
pt3dadd(44.76, 232.618, -11.364, 1.986)
pt3dadd(44.76, 232.727, -11.403, 2.02)
pt3dadd(44.76, 232.837, -11.443, 2.052)
pt3dadd(44.76, 232.948, -11.483, 2.086)
pt3dadd(44.752, 233.059, -11.517, 2.114)
pt3dadd(44.723, 233.173, -11.536, 2.128)
pt3dadd(44.694, 233.287, -11.556, 2.144)
pt3dadd(44.665, 233.401, -11.576, 2.158)
pt3dadd(44.636, 233.514, -11.596, 2.174)
pt3dadd(44.599, 233.626, -11.616, 2.184)
pt3dadd(44.541, 233.728, -11.635, 2.184)
pt3dadd(44.483, 233.83, -11.655, 2.184)
pt3dadd(44.424, 233.933, -11.674, 2.184)
pt3dadd(44.366, 234.035, -11.694, 2.184)
pt3dadd(44.288, 234.124, -11.7, 2.17)
pt3dadd(44.202, 234.208, -11.7, 2.15)
pt3dadd(44.116, 234.29, -11.7, 2.13)
pt3dadd(44.03, 234.374, -11.7, 2.11)
pt3dadd(43.943, 234.457, -11.7, 2.09)
pt3dadd(43.882, 234.557, -11.716, 2.068)
pt3dadd(43.829, 234.661, -11.738, 2.046)
pt3dadd(43.777, 234.766, -11.76, 2.024)
pt3dadd(43.725, 234.871, -11.781, 2.002)
pt3dadd(43.666, 234.971, -11.8, 1.978)
pt3dadd(43.572, 235.045, -11.8, 1.944)
pt3dadd(43.479, 235.121, -11.8, 1.908)
pt3dadd(43.459, 235.24, -11.8, 1.918)
pt3dadd(43.439, 235.357, -11.8, 1.928)
pt3dadd(43.405, 235.471, -11.807, 1.954)
pt3dadd(43.352, 235.577, -11.823, 2.004)
pt3dadd(43.287, 235.649, -11.861, 2.06)
pt3dadd(43.203, 235.669, -11.931, 2.126)
pt3dadd(43.108, 235.68, -11.988, 2.192)
pt3dadd(43.001, 235.68, -12.033, 2.26)
pt3dadd(42.907, 235.68, -12.095, 2.364)
pt3dadd(42.814, 235.68, -12.158, 2.45)
pt3dadd(42.701, 235.681, -12.19, 2.486)
pt3dadd(42.585, 235.703, -12.204, 2.486)
pt3dadd(42.497, 235.768, -12.231, 2.486)
pt3dadd(42.48, 235.872, -12.274, 2.444)
pt3dadd(42.472, 235.99, -12.295, 2.366)
pt3dadd(42.445, 236.105, -12.3, 2.294)
pt3dadd(42.396, 236.214, -12.3, 2.264)
pt3dadd(42.363, 236.329, -12.3, 2.304)
pt3dadd(42.308, 236.432, -12.307, 2.34)
pt3dadd(42.232, 236.524, -12.322, 2.352)
pt3dadd(42.156, 236.615, -12.337, 2.364)
pt3dadd(42.079, 236.705, -12.351, 2.374)
pt3dadd(42.003, 236.796, -12.366, 2.386)
pt3dadd(41.928, 236.884, -12.394, 2.392)
pt3dadd(41.853, 236.971, -12.423, 2.398)
pt3dadd(41.778, 237.058, -12.451, 2.404)
pt3dadd(41.703, 237.145, -12.48, 2.408)
pt3dadd(41.636, 237.242, -12.493, 2.402)
pt3dadd(41.573, 237.344, -12.498, 2.39)
pt3dadd(41.503, 237.434, -12.522, 2.386)
pt3dadd(41.428, 237.517, -12.559, 2.386)
pt3dadd(41.409, 237.629, -12.577, 2.386)
pt3dadd(41.404, 237.748, -12.59, 2.386)
pt3dadd(41.4, 237.866, -12.601, 2.39)
pt3dadd(41.4, 237.986, -12.605, 2.406)
pt3dadd(41.4, 238.106, -12.608, 2.424)
pt3dadd(41.396, 238.213, -12.635, 2.436)
}
}
proc shape3d_74() {
apic[17] { pt3dadd(41.384, 238.294, -12.709, 2.436)
pt3dadd(41.372, 238.374, -12.783, 2.436)
pt3dadd(41.359, 238.454, -12.856, 2.436)
pt3dadd(41.273, 238.532, -12.88, 2.422)
pt3dadd(41.198, 238.616, -12.901, 2.408)
pt3dadd(41.186, 238.735, -12.911, 2.386)
pt3dadd(41.174, 238.854, -12.921, 2.362)
pt3dadd(41.163, 238.973, -12.931, 2.34)
pt3dadd(41.16, 239.088, -12.959, 2.318)
pt3dadd(41.16, 239.201, -12.992, 2.298)
pt3dadd(41.152, 239.314, -13.024, 2.286)
pt3dadd(41.109, 239.416, -13.061, 2.286)
pt3dadd(41.056, 239.513, -13.1, 2.286)
pt3dadd(41.003, 239.609, -13.139, 2.286)
pt3dadd(40.95, 239.706, -13.178, 2.286)
pt3dadd(40.896, 239.806, -13.211, 2.288)
pt3dadd(40.843, 239.909, -13.235, 2.292)
pt3dadd(40.79, 240.012, -13.26, 2.298)
pt3dadd(40.737, 240.116, -13.285, 2.304)
pt3dadd(40.684, 240.22, -13.309, 2.31)
pt3dadd(40.616, 240.316, -13.33, 2.316)
pt3dadd(40.547, 240.41, -13.349, 2.322)
pt3dadd(40.479, 240.506, -13.369, 2.326)
pt3dadd(40.41, 240.601, -13.389, 2.332)
pt3dadd(40.359, 240.7, -13.422, 2.346)
pt3dadd(40.329, 240.802, -13.469, 2.368)
pt3dadd(40.299, 240.902, -13.516, 2.39)
pt3dadd(40.27, 241.004, -13.563, 2.414)
pt3dadd(40.24, 241.105, -13.611, 2.436)
pt3dadd(40.162, 241.178, -13.657, 2.454)
pt3dadd(40.084, 241.25, -13.703, 2.472)
pt3dadd(40.005, 241.322, -13.75, 2.49)
pt3dadd(39.927, 241.394, -13.796, 2.51)
pt3dadd(39.84, 241.475, -13.8, 2.532)
pt3dadd(39.752, 241.556, -13.8, 2.556)
pt3dadd(39.717, 241.667, -13.804, 2.578)
pt3dadd(39.695, 241.784, -13.808, 2.598)
pt3dadd(39.666, 241.876, -13.838, 2.626)
pt3dadd(39.619, 241.902, -13.927, 2.676)
pt3dadd(39.568, 241.942, -14.009, 2.73)
pt3dadd(39.507, 242.01, -14.072, 2.788)
pt3dadd(39.451, 242.098, -14.118, 2.816)
pt3dadd(39.4, 242.2, -14.15, 2.826)
pt3dadd(39.35, 242.302, -14.182, 2.832)
pt3dadd(39.306, 242.41, -14.2, 2.824)
pt3dadd(39.273, 242.525, -14.2, 2.794)
pt3dadd(39.24, 242.64, -14.2, 2.762)
pt3dadd(39.24, 242.76, -14.2, 2.662)
pt3dadd(39.179, 242.863, -14.202, 2.642)
pt3dadd(39.118, 242.966, -14.204, 2.622)
pt3dadd(39.057, 243.07, -14.207, 2.602)
pt3dadd(38.996, 243.173, -14.209, 2.582)
pt3dadd(38.935, 243.276, -14.211, 2.562)
pt3dadd(38.859, 243.353, -14.254, 2.534)
pt3dadd(38.796, 243.438, -14.293, 2.508)
pt3dadd(38.779, 243.554, -14.312, 2.498)
pt3dadd(38.761, 243.671, -14.332, 2.486)
pt3dadd(38.714, 243.772, -14.366, 2.462)
pt3dadd(38.66, 243.869, -14.4, 2.434)
pt3dadd(38.547, 243.908, -14.4, 2.402)
pt3dadd(38.433, 243.948, -14.4, 2.37)
pt3dadd(38.321, 243.989, -14.4, 2.342)
pt3dadd(38.208, 244.03, -14.4, 2.316)
pt3dadd(38.095, 244.07, -14.4, 2.29)
pt3dadd(37.982, 244.111, -14.4, 2.266)
pt3dadd(37.945, 244.21, -14.425, 2.26)
pt3dadd(37.926, 244.322, -14.456, 2.26)
pt3dadd(37.92, 244.436, -14.485, 2.28)
pt3dadd(37.92, 244.554, -14.503, 2.31)
pt3dadd(37.92, 244.673, -14.521, 2.338)
pt3dadd(37.92, 244.79, -14.54, 2.368)
pt3dadd(37.92, 244.906, -14.568, 2.4)
pt3dadd(37.92, 245.021, -14.595, 2.43)
pt3dadd(37.92, 245.126, -14.642, 2.484)
pt3dadd(37.92, 245.23, -14.693, 2.54)
pt3dadd(37.917, 245.28, -14.774, 2.594)
pt3dadd(37.911, 245.302, -14.873, 2.644)
pt3dadd(37.901, 245.336, -14.961, 2.69)
pt3dadd(37.864, 245.443, -14.995, 2.704)
pt3dadd(37.827, 245.549, -15.029, 2.72)
pt3dadd(37.79, 245.656, -15.063, 2.736)
pt3dadd(37.691, 245.714, -15.082, 2.76)
pt3dadd(37.586, 245.767, -15.098, 2.784)
pt3dadd(37.487, 245.825, -15.107, 2.866)
pt3dadd(37.443, 245.917, -15.16, 2.89)
pt3dadd(37.399, 246.01, -15.213, 2.914)
pt3dadd(37.354, 246.101, -15.265, 2.938)
pt3dadd(37.31, 246.193, -15.318, 2.962)
pt3dadd(37.244, 246.289, -15.338, 2.964)
pt3dadd(37.177, 246.386, -15.355, 2.964)
pt3dadd(37.109, 246.484, -15.372, 2.964)
pt3dadd(37.041, 246.58, -15.39, 2.964)
pt3dadd(36.966, 246.672, -15.4, 2.956)
pt3dadd(36.88, 246.756, -15.4, 2.936)
pt3dadd(36.794, 246.839, -15.4, 2.914)
pt3dadd(36.708, 246.923, -15.4, 2.894)
pt3dadd(36.622, 247.007, -15.4, 2.874)
pt3dadd(36.541, 247.09, -15.416, 2.844)
pt3dadd(36.466, 247.172, -15.454, 2.802)
pt3dadd(36.381, 247.25, -15.478, 2.788)
pt3dadd(36.291, 247.326, -15.495, 2.788)
pt3dadd(36.211, 247.406, -15.527, 2.798)
pt3dadd(36.137, 247.489, -15.565, 2.812)
pt3dadd(36.128, 247.602, -15.594, 2.812)
pt3dadd(36.122, 247.717, -15.623, 2.812)
pt3dadd(36.12, 247.83, -15.656, 2.802)
pt3dadd(36.118, 247.943, -15.691, 2.788)
pt3dadd(36.09, 248.054, -15.718, 2.792)
pt3dadd(36.063, 248.166, -15.746, 2.798)
pt3dadd(36.036, 248.279, -15.773, 2.804)
pt3dadd(36.009, 248.39, -15.8, 2.808)
pt3dadd(35.976, 248.5, -15.831, 2.812)
pt3dadd(35.922, 248.594, -15.873, 2.812)
pt3dadd(35.868, 248.689, -15.915, 2.812)
pt3dadd(35.815, 248.784, -15.957, 2.812)
pt3dadd(35.761, 248.878, -15.999, 2.812)
pt3dadd(35.689, 248.974, -16, 2.802)
pt3dadd(35.617, 249.07, -16, 2.792)
pt3dadd(35.545, 249.166, -16, 2.782)
pt3dadd(35.473, 249.262, -16, 2.772)
pt3dadd(35.401, 249.358, -16, 2.762)
pt3dadd(35.282, 249.365, -16, 2.72)
pt3dadd(35.163, 249.37, -16, 2.676)
pt3dadd(35.046, 249.38, -16, 2.632)
pt3dadd(34.965, 249.469, -16, 2.572)
pt3dadd(34.883, 249.557, -16, 2.514)
pt3dadd(34.829, 249.664, -16, 2.49)
pt3dadd(34.775, 249.772, -16, 2.468)
pt3dadd(34.724, 249.874, -16.026, 2.47)
pt3dadd(34.673, 249.973, -16.062, 2.484)
pt3dadd(34.583, 250.043, -16.09, 2.504)
pt3dadd(34.474, 250.084, -16.1, 2.492)
pt3dadd(34.357, 250.11, -16.1, 2.462)
pt3dadd(34.248, 250.145, -16.101, 2.428)
pt3dadd(34.207, 250.258, -16.105, 2.362)
pt3dadd(34.167, 250.37, -16.11, 2.296)
pt3dadd(34.083, 250.438, -16.148, 2.212)
pt3dadd(33.997, 250.5, -16.192, 2.13)
pt3dadd(33.953, 250.595, -16.241, 2.076)
pt3dadd(33.907, 250.678, -16.298, 2.014)
pt3dadd(33.853, 250.721, -16.379, 1.932)
pt3dadd(33.84, 250.82, -16.434, 1.87)
pt3dadd(33.827, 250.92, -16.489, 1.808)
}
apic[18] {pt3dclear()
pt3dadd(33.827, 250.92, -16.489, 1.808)
pt3dadd(33.801, 250.962, -16.491, 1.778)
pt3dadd(33.737, 251.064, -16.496, 1.706)
pt3dadd(33.661, 251.153, -16.5, 1.64)
pt3dadd(33.558, 251.213, -16.5, 1.582)
pt3dadd(33.453, 251.272, -16.5, 1.526)
pt3dadd(33.34, 251.311, -16.5, 1.472)
pt3dadd(33.227, 251.351, -16.5, 1.418)
pt3dadd(33.117, 251.399, -16.502, 1.386)
pt3dadd(33.008, 251.449, -16.505, 1.358)
pt3dadd(32.899, 251.5, -16.508, 1.33)
pt3dadd(32.798, 251.552, -16.517, 1.3)
pt3dadd(32.777, 251.629, -16.593, 1.234)
pt3dadd(32.757, 251.71, -16.664, 1.168)
pt3dadd(32.706, 251.802, -16.702, 1.128)
pt3dadd(32.626, 251.886, -16.728, 1.122)
pt3dadd(32.546, 251.969, -16.753, 1.116)
pt3dadd(32.465, 252.053, -16.779, 1.11)
pt3dadd(32.382, 252.133, -16.8, 1.108)
pt3dadd(32.286, 252.205, -16.8, 1.122)
pt3dadd(32.19, 252.277, -16.8, 1.138)
pt3dadd(32.094, 252.349, -16.8, 1.154)
pt3dadd(31.998, 252.421, -16.8, 1.168)
pt3dadd(31.903, 252.494, -16.8, 1.182)
pt3dadd(31.811, 252.572, -16.8, 1.186)
pt3dadd(31.72, 252.65, -16.8, 1.192)
pt3dadd(31.629, 252.728, -16.8, 1.196)
pt3dadd(31.537, 252.806, -16.8, 1.202)
pt3dadd(31.447, 252.884, -16.805, 1.208)
pt3dadd(31.359, 252.962, -16.825, 1.22)
pt3dadd(31.272, 253.042, -16.845, 1.23)
pt3dadd(31.184, 253.12, -16.865, 1.242)
pt3dadd(31.097, 253.198, -16.885, 1.254)
pt3dadd(31.037, 253.297, -16.909, 1.264)
pt3dadd(30.984, 253.4, -16.933, 1.276)
pt3dadd(30.931, 253.504, -16.958, 1.286)
pt3dadd(30.877, 253.607, -16.983, 1.298)
pt3dadd(30.816, 253.704, -17.007, 1.314)
pt3dadd(30.733, 253.787, -17.03, 1.344)
pt3dadd(30.65, 253.87, -17.053, 1.372)
pt3dadd(30.568, 253.952, -17.076, 1.4)
pt3dadd(30.485, 254.035, -17.098, 1.43)
pt3dadd(30.368, 254.045, -17.1, 1.464)
pt3dadd(30.248, 254.048, -17.1, 1.498)
pt3dadd(30.13, 254.058, -17.1, 1.532)
pt3dadd(30.062, 254.156, -17.1, 1.52)
pt3dadd(29.994, 254.256, -17.1, 1.508)
pt3dadd(29.933, 254.358, -17.1, 1.456)
pt3dadd(29.872, 254.462, -17.1, 1.398)
pt3dadd(29.819, 254.563, -17.125, 1.334)
pt3dadd(29.768, 254.663, -17.161, 1.266)
pt3dadd(29.683, 254.743, -17.175, 1.244)
pt3dadd(29.591, 254.819, -17.185, 1.228)
pt3dadd(29.499, 254.894, -17.195, 1.212)
pt3dadd(29.409, 254.974, -17.2, 1.212)
pt3dadd(29.321, 255.056, -17.2, 1.224)
pt3dadd(29.223, 255.119, -17.2, 1.242)
}
}
proc shape3d_75() {
apic[18] { pt3dadd(29.121, 255.178, -17.2, 1.262)
pt3dadd(29.03, 255.256, -17.2, 1.272)
pt3dadd(28.939, 255.334, -17.2, 1.282)
pt3dadd(28.847, 255.41, -17.2, 1.292)
pt3dadd(28.756, 255.488, -17.2, 1.302)
pt3dadd(28.674, 255.576, -17.2, 1.312)
pt3dadd(28.6, 255.67, -17.2, 1.324)
pt3dadd(28.535, 255.77, -17.2, 1.342)
pt3dadd(28.481, 255.877, -17.2, 1.364)
pt3dadd(28.436, 255.986, -17.207, 1.386)
pt3dadd(28.417, 256.098, -17.238, 1.41)
pt3dadd(28.393, 256.206, -17.272, 1.438)
pt3dadd(28.316, 256.267, -17.33, 1.51)
pt3dadd(28.225, 256.309, -17.374, 1.586)
pt3dadd(28.108, 256.318, -17.395, 1.664)
pt3dadd(28.002, 256.366, -17.411, 1.69)
pt3dadd(27.899, 256.426, -17.425, 1.702)
pt3dadd(27.797, 256.486, -17.439, 1.712)
pt3dadd(27.694, 256.544, -17.454, 1.722)
pt3dadd(27.593, 256.607, -17.467, 1.73)
pt3dadd(27.508, 256.691, -17.474, 1.704)
pt3dadd(27.424, 256.776, -17.481, 1.678)
pt3dadd(27.339, 256.861, -17.488, 1.65)
pt3dadd(27.255, 256.945, -17.496, 1.624)
pt3dadd(27.169, 257.029, -17.5, 1.59)
pt3dadd(27.08, 257.11, -17.5, 1.546)
pt3dadd(26.991, 257.19, -17.5, 1.5)
pt3dadd(26.902, 257.27, -17.5, 1.454)
pt3dadd(26.813, 257.352, -17.5, 1.408)
pt3dadd(26.731, 257.438, -17.5, 1.37)
pt3dadd(26.659, 257.534, -17.5, 1.338)
pt3dadd(26.587, 257.63, -17.5, 1.308)
pt3dadd(26.515, 257.726, -17.5, 1.278)
pt3dadd(26.443, 257.822, -17.5, 1.248)
pt3dadd(26.37, 257.915, -17.509, 1.228)
pt3dadd(26.293, 258.004, -17.532, 1.222)
pt3dadd(26.217, 258.092, -17.555, 1.216)
pt3dadd(26.141, 258.18, -17.578, 1.21)
pt3dadd(26.065, 258.27, -17.6, 1.206)
pt3dadd(26.021, 258.382, -17.6, 1.224)
pt3dadd(25.976, 258.492, -17.6, 1.244)
pt3dadd(25.931, 258.604, -17.6, 1.262)
pt3dadd(25.887, 258.715, -17.6, 1.28)
pt3dadd(25.842, 258.827, -17.6, 1.3)
pt3dadd(25.768, 258.917, -17.6, 1.322)
pt3dadd(25.676, 258.995, -17.6, 1.348)
pt3dadd(25.585, 259.072, -17.6, 1.372)
pt3dadd(25.494, 259.15, -17.6, 1.398)
pt3dadd(25.402, 259.228, -17.6, 1.424)
pt3dadd(25.313, 259.308, -17.6, 1.48)
pt3dadd(25.226, 259.391, -17.6, 1.55)
pt3dadd(25.122, 259.441, -17.6, 1.598)
pt3dadd(25.005, 259.468, -17.6, 1.628)
pt3dadd(24.89, 259.498, -17.6, 1.658)
pt3dadd(24.829, 259.601, -17.6, 1.67)
pt3dadd(24.768, 259.704, -17.6, 1.68)
pt3dadd(24.747, 259.822, -17.6, 1.682)
pt3dadd(24.732, 259.94, -17.6, 1.682)
pt3dadd(24.706, 260.053, -17.6, 1.686)
pt3dadd(24.619, 260.136, -17.6, 1.716)
pt3dadd(24.532, 260.219, -17.6, 1.744)
pt3dadd(24.445, 260.302, -17.6, 1.772)
pt3dadd(24.358, 260.384, -17.6, 1.812)
pt3dadd(24.27, 260.466, -17.6, 1.86)
pt3dadd(24.169, 260.524, -17.6, 1.898)
pt3dadd(24.059, 260.567, -17.615, 1.898)
pt3dadd(23.953, 260.616, -17.637, 1.88)
pt3dadd(23.847, 260.665, -17.658, 1.864)
pt3dadd(23.74, 260.714, -17.68, 1.848)
pt3dadd(23.635, 260.765, -17.701, 1.832)
pt3dadd(23.556, 260.851, -17.724, 1.808)
pt3dadd(23.476, 260.936, -17.747, 1.786)
pt3dadd(23.397, 261.022, -17.77, 1.762)
pt3dadd(23.317, 261.108, -17.793, 1.74)
pt3dadd(23.266, 261.206, -17.826, 1.724)
pt3dadd(23.228, 261.311, -17.863, 1.714)
pt3dadd(23.189, 261.415, -17.901, 1.702)
pt3dadd(23.15, 261.52, -17.938, 1.69)
pt3dadd(23.101, 261.619, -17.971, 1.674)
pt3dadd(23.017, 261.702, -17.988, 1.634)
pt3dadd(22.953, 261.797, -18, 1.598)
pt3dadd(22.933, 261.914, -18, 1.57)
pt3dadd(22.913, 262.033, -18, 1.54)
pt3dadd(22.858, 262.138, -18, 1.506)
pt3dadd(22.791, 262.236, -18, 1.472)
pt3dadd(22.694, 262.289, -18, 1.462)
pt3dadd(22.575, 262.303, -18, 1.472)
pt3dadd(22.456, 262.318, -18, 1.48)
pt3dadd(22.336, 262.32, -18, 1.526)
pt3dadd(22.216, 262.32, -18, 1.576)
pt3dadd(22.102, 262.355, -18, 1.628)
pt3dadd(21.989, 262.394, -18, 1.682)
pt3dadd(21.892, 262.458, -18, 1.72)
pt3dadd(21.81, 262.546, -18, 1.744)
pt3dadd(21.739, 262.642, -18, 1.75)
pt3dadd(21.685, 262.748, -18, 1.726)
pt3dadd(21.635, 262.858, -18, 1.702)
pt3dadd(21.602, 262.973, -18, 1.66)
pt3dadd(21.569, 263.088, -18, 1.618)
pt3dadd(21.521, 263.198, -18, 1.546)
pt3dadd(21.464, 263.303, -18, 1.474)
pt3dadd(21.396, 263.402, -18, 1.438)
pt3dadd(21.331, 263.502, -18, 1.404)
pt3dadd(21.291, 263.615, -18, 1.384)
pt3dadd(21.251, 263.729, -18, 1.362)
pt3dadd(21.196, 263.834, -18, 1.372)
pt3dadd(21.135, 263.938, -18, 1.396)
pt3dadd(21.043, 263.989, -18, 1.424)
pt3dadd(20.923, 263.994, -18, 1.46)
pt3dadd(20.803, 263.999, -18, 1.494)
pt3dadd(20.686, 264.02, -18, 1.566)
pt3dadd(20.571, 264.054, -18.001, 1.658)
pt3dadd(20.475, 264.097, -18.048, 1.694)
pt3dadd(20.378, 264.142, -18.094, 1.728)
pt3dadd(20.281, 264.185, -18.141, 1.764)
pt3dadd(20.185, 264.229, -18.188, 1.798)
pt3dadd(20.098, 264.293, -18.23, 1.83)
pt3dadd(20.014, 264.364, -18.27, 1.86)
pt3dadd(19.93, 264.434, -18.311, 1.892)
pt3dadd(19.846, 264.505, -18.351, 1.922)
pt3dadd(19.77, 264.589, -18.381, 1.958)
pt3dadd(19.699, 264.682, -18.405, 1.998)
pt3dadd(19.602, 264.726, -18.44, 2.018)
pt3dadd(19.494, 264.752, -18.479, 2.03)
pt3dadd(19.391, 264.806, -18.493, 2.008)
pt3dadd(19.29, 264.87, -18.498, 1.972)
pt3dadd(19.24, 264.968, -18.5, 1.916)
pt3dadd(19.22, 265.086, -18.5, 1.848)
pt3dadd(19.196, 265.204, -18.5, 1.78)
pt3dadd(19.106, 265.282, -18.5, 1.702)
pt3dadd(19.015, 265.361, -18.5, 1.624)
pt3dadd(18.925, 265.44, -18.5, 1.546)
pt3dadd(18.836, 265.52, -18.5, 1.448)
pt3dadd(18.748, 265.602, -18.5, 1.33)
pt3dadd(18.658, 265.681, -18.5, 1.15)
pt3dadd(18.571, 265.764, -18.5, 1.044)
pt3dadd(18.488, 265.85, -18.5, 1.03)
pt3dadd(18.404, 265.936, -18.5, 1.014)
pt3dadd(18.321, 266.022, -18.5, 0.998)
pt3dadd(18.238, 266.108, -18.5, 0.984)
pt3dadd(18.174, 266.207, -18.516, 0.988)
pt3dadd(18.118, 266.31, -18.538, 0.998)
pt3dadd(18.062, 266.413, -18.56, 1.01)
pt3dadd(18.006, 266.515, -18.582, 1.02)
pt3dadd(17.948, 266.614, -18.609, 1.04)
pt3dadd(17.875, 266.689, -18.658, 1.094)
pt3dadd(17.803, 266.765, -18.707, 1.15)
pt3dadd(17.731, 266.839, -18.756, 1.206)
pt3dadd(17.66, 266.917, -18.802, 1.262)
pt3dadd(17.601, 267.018, -18.825, 1.312)
pt3dadd(17.541, 267.12, -18.847, 1.362)
pt3dadd(17.482, 267.221, -18.869, 1.412)
pt3dadd(17.423, 267.322, -18.891, 1.462)
pt3dadd(17.4, 267.434, -18.902, 1.508)
pt3dadd(17.4, 267.553, -18.906, 1.552)
pt3dadd(17.4, 267.673, -18.91, 1.596)
pt3dadd(17.386, 267.786, -18.938, 1.572)
pt3dadd(17.367, 267.895, -18.976, 1.524)
pt3dadd(17.3, 267.98, -19.004, 1.436)
pt3dadd(17.207, 268.051, -19.028, 1.33)
pt3dadd(17.109, 268.105, -19.061, 1.202)
pt3dadd(17.009, 268.156, -19.097, 1.066)
pt3dadd(16.943, 268.183, -19.176, 1.004)
pt3dadd(16.881, 268.207, -19.259, 0.95)
pt3dadd(16.819, 268.232, -19.342, 0.896)
pt3dadd(16.796, 268.264, -19.434, 0.848)
pt3dadd(16.79, 268.298, -19.529, 0.806)
pt3dadd(16.754, 268.332, -19.613, 0.778)
pt3dadd(16.667, 268.366, -19.676, 0.778)
pt3dadd(16.58, 268.398, -19.739, 0.778)
pt3dadd(16.503, 268.42, -19.814, 0.802)
pt3dadd(16.427, 268.44, -19.889, 0.828)
}
apic[19] {pt3dclear()
pt3dadd(16.427, 268.44, -19.889, 0.828)
pt3dadd(16.396, 268.44, -19.885, 0.838)
pt3dadd(16.277, 268.44, -19.871, 0.868)
pt3dadd(16.17, 268.426, -19.832, 0.876)
pt3dadd(16.074, 268.368, -19.804, 0.782)
pt3dadd(15.997, 268.276, -19.8, 0.674)
pt3dadd(15.938, 268.172, -19.8, 0.572)
pt3dadd(15.853, 268.092, -19.814, 0.504)
pt3dadd(15.761, 268.021, -19.837, 0.464)
pt3dadd(15.698, 267.97, -19.903, 0.434)
pt3dadd(15.648, 267.928, -19.987, 0.406)
pt3dadd(15.592, 267.865, -20.055, 0.408)
pt3dadd(15.502, 267.808, -20.101, 0.432)
pt3dadd(15.412, 267.75, -20.146, 0.456)
pt3dadd(15.322, 267.692, -20.192, 0.48)
pt3dadd(15.23, 267.637, -20.234, 0.504)
pt3dadd(15.115, 267.606, -20.247, 0.534)
pt3dadd(15, 267.576, -20.26, 0.562)
pt3dadd(14.885, 267.545, -20.273, 0.592)
pt3dadd(14.77, 267.515, -20.286, 0.62)
pt3dadd(14.655, 267.484, -20.298, 0.65)
pt3dadd(14.537, 267.463, -20.3, 0.686)
pt3dadd(14.419, 267.443, -20.3, 0.722)
pt3dadd(14.3, 267.424, -20.3, 0.76)
pt3dadd(14.182, 267.403, -20.3, 0.796)
pt3dadd(14.063, 267.384, -20.3, 0.834)
pt3dadd(13.945, 267.364, -20.3, 0.872)
pt3dadd(13.826, 267.347, -20.3, 0.894)
}
}
proc shape3d_76() {
apic[19] { pt3dadd(13.708, 267.329, -20.3, 0.916)
pt3dadd(13.589, 267.312, -20.3, 0.936)
pt3dadd(13.47, 267.294, -20.3, 0.956)
pt3dadd(13.351, 267.277, -20.3, 0.976)
pt3dadd(13.233, 267.26, -20.3, 0.996)
pt3dadd(13.114, 267.24, -20.3, 1.012)
pt3dadd(12.996, 267.217, -20.3, 1.024)
pt3dadd(12.879, 267.196, -20.3, 1.038)
pt3dadd(12.761, 267.173, -20.3, 1.05)
pt3dadd(12.643, 267.151, -20.3, 1.062)
pt3dadd(12.525, 267.128, -20.3, 1.076)
pt3dadd(12.407, 267.108, -20.3, 1.066)
pt3dadd(12.288, 267.088, -20.3, 1.046)
pt3dadd(12.17, 267.068, -20.3, 1.026)
pt3dadd(12.051, 267.048, -20.3, 1.006)
pt3dadd(11.933, 267.029, -20.3, 0.984)
pt3dadd(11.815, 267.01, -20.3, 0.964)
pt3dadd(11.698, 266.981, -20.3, 0.944)
pt3dadd(11.584, 266.945, -20.3, 0.926)
pt3dadd(11.469, 266.909, -20.3, 0.908)
pt3dadd(11.355, 266.873, -20.3, 0.89)
pt3dadd(11.24, 266.837, -20.3, 0.872)
pt3dadd(11.126, 266.801, -20.3, 0.854)
pt3dadd(11.02, 266.766, -20.335, 0.838)
pt3dadd(10.914, 266.731, -20.372, 0.822)
pt3dadd(10.808, 266.695, -20.409, 0.804)
pt3dadd(10.702, 266.66, -20.445, 0.788)
pt3dadd(10.595, 266.64, -20.484, 0.78)
pt3dadd(10.486, 266.64, -20.527, 0.786)
pt3dadd(10.377, 266.64, -20.569, 0.79)
pt3dadd(10.268, 266.64, -20.611, 0.794)
pt3dadd(10.16, 266.64, -20.653, 0.8)
pt3dadd(10.053, 266.64, -20.698, 0.804)
pt3dadd(9.959, 266.64, -20.761, 0.804)
pt3dadd(9.866, 266.64, -20.823, 0.804)
pt3dadd(9.772, 266.64, -20.885, 0.804)
pt3dadd(9.678, 266.64, -20.948, 0.804)
pt3dadd(9.587, 266.64, -21.013, 0.8)
pt3dadd(9.508, 266.644, -21.088, 0.78)
pt3dadd(9.429, 266.646, -21.163, 0.76)
pt3dadd(9.349, 266.648, -21.238, 0.738)
pt3dadd(9.27, 266.651, -21.313, 0.718)
pt3dadd(9.187, 266.66, -21.384, 0.694)
pt3dadd(9.094, 266.684, -21.444, 0.666)
pt3dadd(9.001, 266.708, -21.504, 0.638)
pt3dadd(8.908, 266.732, -21.563, 0.61)
pt3dadd(8.815, 266.756, -21.623, 0.582)
pt3dadd(8.767, 266.76, -21.712, 0.534)
pt3dadd(8.727, 266.76, -21.807, 0.48)
pt3dadd(8.654, 266.779, -21.866, 0.44)
pt3dadd(8.544, 266.818, -21.888, 0.416)
pt3dadd(8.429, 266.846, -21.9, 0.394)
pt3dadd(8.31, 266.862, -21.9, 0.376)
pt3dadd(8.191, 266.876, -21.9, 0.356)
pt3dadd(8.072, 266.869, -21.9, 0.352)
pt3dadd(7.953, 266.855, -21.9, 0.352)
pt3dadd(7.835, 266.838, -21.901, 0.352)
pt3dadd(7.731, 266.785, -21.927, 0.352)
pt3dadd(7.634, 266.73, -21.963, 0.36)
pt3dadd(7.54, 266.674, -22.003, 0.372)
pt3dadd(7.445, 266.616, -22.042, 0.384)
pt3dadd(7.351, 266.56, -22.082, 0.396)
pt3dadd(7.275, 266.522, -22.145, 0.402)
pt3dadd(7.185, 266.52, -22.21, 0.366)
pt3dadd(7.099, 266.52, -22.28, 0.326)
pt3dadd(7.024, 266.52, -22.357, 0.406)
pt3dadd(6.914, 266.515, -22.393, 0.538)
pt3dadd(6.798, 266.489, -22.392, 0.654)
pt3dadd(6.725, 266.431, -22.339, 0.784)
pt3dadd(6.673, 266.402, -22.253, 0.94)
pt3dadd(6.575, 266.377, -22.203, 1.074)
pt3dadd(6.48, 266.32, -22.167, 1.08)
pt3dadd(6.368, 266.302, -22.135, 1.032)
pt3dadd(6.255, 266.282, -22.104, 0.986)
pt3dadd(6.136, 266.28, -22.097, 0.926)
pt3dadd(6.016, 266.28, -22.093, 0.866)
pt3dadd(5.896, 266.28, -22.089, 0.806)
pt3dadd(5.781, 266.28, -22.062, 0.674)
pt3dadd(5.665, 266.28, -22.035, 0.654)
pt3dadd(5.55, 266.28, -22.007, 0.634)
pt3dadd(5.432, 266.28, -22.009, 0.662)
pt3dadd(5.313, 266.28, -22.021, 0.708)
pt3dadd(5.195, 266.28, -22.036, 0.758)
pt3dadd(5.101, 266.28, -22.099, 0.852)
pt3dadd(5.008, 266.28, -22.162, 0.946)
pt3dadd(4.908, 266.24, -22.205, 1.066)
pt3dadd(4.812, 266.198, -22.249, 1.184)
pt3dadd(4.795, 266.172, -22.346, 1.25)
pt3dadd(4.729, 266.16, -22.417, 1.278)
pt3dadd(4.625, 266.16, -22.466, 1.274)
pt3dadd(4.521, 266.16, -22.516, 1.268)
pt3dadd(4.417, 266.16, -22.566, 1.264)
pt3dadd(4.313, 266.16, -22.616, 1.258)
pt3dadd(4.218, 266.16, -22.675, 1.226)
pt3dadd(4.137, 266.16, -22.749, 1.154)
pt3dadd(4.051, 266.173, -22.815, 1.076)
pt3dadd(3.956, 266.218, -22.864, 0.98)
pt3dadd(3.854, 266.25, -22.907, 0.894)
pt3dadd(3.745, 266.269, -22.945, 0.822)
pt3dadd(3.631, 266.28, -22.972, 0.766)
pt3dadd(3.512, 266.28, -22.984, 0.738)
pt3dadd(3.393, 266.28, -22.997, 0.71)
pt3dadd(3.273, 266.28, -23, 0.694)
pt3dadd(3.153, 266.28, -23, 0.682)
pt3dadd(3.033, 266.28, -23, 0.684)
pt3dadd(2.913, 266.28, -23, 0.692)
pt3dadd(2.793, 266.28, -23, 0.7)
pt3dadd(2.673, 266.28, -23, 0.716)
pt3dadd(2.553, 266.28, -23, 0.732)
pt3dadd(2.433, 266.28, -23, 0.748)
pt3dadd(2.319, 266.252, -23.011, 0.77)
pt3dadd(2.207, 266.215, -23.027, 0.794)
pt3dadd(2.121, 266.148, -23.055, 0.812)
pt3dadd(2.054, 266.058, -23.092, 0.826)
pt3dadd(1.969, 265.976, -23.107, 0.828)
pt3dadd(1.871, 265.913, -23.12, 0.832)
pt3dadd(1.762, 265.868, -23.138, 0.836)
pt3dadd(1.653, 265.823, -23.157, 0.842)
pt3dadd(1.544, 265.778, -23.176, 0.846)
pt3dadd(1.435, 265.734, -23.194, 0.852)
pt3dadd(1.32, 265.709, -23.21, 0.854)
pt3dadd(1.202, 265.692, -23.223, 0.854)
pt3dadd(1.093, 265.667, -23.25, 0.854)
pt3dadd(1.004, 265.622, -23.306, 0.854)
pt3dadd(0.932, 265.586, -23.377, 0.848)
pt3dadd(0.877, 265.559, -23.462, 0.834)
pt3dadd(0.823, 265.5, -23.532, 0.836)
pt3dadd(0.77, 265.417, -23.589, 0.852)
pt3dadd(0.717, 265.314, -23.6, 0.868)
pt3dadd(0.664, 265.206, -23.6, 0.882)
pt3dadd(0.61, 265.099, -23.6, 0.894)
pt3dadd(0.555, 264.994, -23.603, 0.902)
pt3dadd(0.487, 264.91, -23.648, 0.888)
pt3dadd(0.426, 264.827, -23.698, 0.87)
pt3dadd(0.381, 264.745, -23.76, 0.842)
pt3dadd(0.36, 264.643, -23.791, 0.824)
pt3dadd(0.36, 264.523, -23.795, 0.816)
pt3dadd(0.36, 264.403, -23.799, 0.806)
pt3dadd(0.36, 264.284, -23.813, 0.804)
pt3dadd(0.36, 264.167, -23.832, 0.804)
pt3dadd(0.336, 264.056, -23.866, 0.808)
pt3dadd(0.311, 263.947, -23.901, 0.814)
pt3dadd(0.286, 263.838, -23.937, 0.82)
pt3dadd(0.26, 263.729, -23.972, 0.824)
pt3dadd(0.233, 263.618, -24, 0.828)
pt3dadd(0.196, 263.503, -24.002, 0.824)
pt3dadd(0.16, 263.389, -24.004, 0.818)
pt3dadd(0.123, 263.275, -24.007, 0.814)
pt3dadd(0.087, 263.161, -24.009, 0.81)
pt3dadd(0.05, 263.046, -24.01, 0.806)
pt3dadd(0.032, 262.938, -24.043, 0.804)
pt3dadd(0.021, 262.831, -24.089, 0.804)
pt3dadd(0.01, 262.726, -24.134, 0.804)
pt3dadd(0, 262.619, -24.18, 0.804)
pt3dadd(-0.011, 262.512, -24.225, 0.804)
pt3dadd(-0.051, 262.404, -24.245, 0.808)
pt3dadd(-0.098, 262.294, -24.258, 0.812)
pt3dadd(-0.144, 262.184, -24.272, 0.818)
pt3dadd(-0.191, 262.075, -24.285, 0.824)
pt3dadd(-0.237, 261.966, -24.299, 0.828)
pt3dadd(-0.24, 261.847, -24.3, 0.836)
pt3dadd(-0.24, 261.727, -24.3, 0.842)
pt3dadd(-0.24, 261.607, -24.3, 0.85)
pt3dadd(-0.24, 261.487, -24.3, 0.856)
pt3dadd(-0.24, 261.367, -24.3, 0.864)
pt3dadd(-0.24, 261.247, -24.3, 0.872)
pt3dadd(-0.24, 261.127, -24.3, 0.878)
pt3dadd(-0.266, 261.01, -24.3, 0.882)
pt3dadd(-0.293, 260.893, -24.3, 0.888)
pt3dadd(-0.321, 260.776, -24.3, 0.892)
pt3dadd(-0.348, 260.659, -24.3, 0.896)
pt3dadd(-0.375, 260.543, -24.3, 0.9)
pt3dadd(-0.407, 260.428, -24.3, 0.904)
pt3dadd(-0.47, 260.326, -24.3, 0.904)
pt3dadd(-0.533, 260.224, -24.3, 0.904)
pt3dadd(-0.596, 260.12, -24.3, 0.904)
pt3dadd(-0.659, 260.018, -24.3, 0.904)
pt3dadd(-0.721, 259.916, -24.301, 0.904)
pt3dadd(-0.745, 259.804, -24.328, 0.898)
pt3dadd(-0.769, 259.69, -24.355, 0.894)
pt3dadd(-0.793, 259.577, -24.382, 0.888)
pt3dadd(-0.818, 259.464, -24.408, 0.884)
pt3dadd(-0.845, 259.354, -24.437, 0.876)
pt3dadd(-0.913, 259.27, -24.481, 0.848)
pt3dadd(-0.984, 259.189, -24.525, 0.816)
pt3dadd(-1.06, 259.114, -24.569, 0.772)
pt3dadd(-1.141, 259.032, -24.592, 0.746)
pt3dadd(-1.226, 258.948, -24.597, 0.734)
pt3dadd(-1.278, 258.846, -24.6, 0.734)
pt3dadd(-1.298, 258.727, -24.6, 0.742)
pt3dadd(-1.318, 258.61, -24.6, 0.752)
pt3dadd(-1.32, 258.492, -24.618, 0.794)
pt3dadd(-1.328, 258.377, -24.641, 0.83)
pt3dadd(-1.366, 258.27, -24.675, 0.836)
pt3dadd(-1.405, 258.164, -24.709, 0.84)
pt3dadd(-1.443, 258.059, -24.744, 0.846)
pt3dadd(-1.481, 257.952, -24.778, 0.852)
pt3dadd(-1.537, 257.85, -24.79, 0.854)
pt3dadd(-1.601, 257.748, -24.793, 0.854)
pt3dadd(-1.665, 257.647, -24.795, 0.854)
}
}
proc shape3d_77() {
apic[19] { pt3dadd(-1.729, 257.545, -24.797, 0.854)
pt3dadd(-1.794, 257.444, -24.799, 0.854)
pt3dadd(-1.857, 257.342, -24.8, 0.848)
pt3dadd(-1.92, 257.24, -24.8, 0.838)
pt3dadd(-1.983, 257.138, -24.8, 0.828)
pt3dadd(-2.046, 257.035, -24.8, 0.818)
pt3dadd(-2.109, 256.933, -24.8, 0.808)
pt3dadd(-2.177, 256.835, -24.8, 0.8)
pt3dadd(-2.249, 256.739, -24.8, 0.796)
pt3dadd(-2.321, 256.643, -24.8, 0.79)
pt3dadd(-2.393, 256.547, -24.8, 0.786)
pt3dadd(-2.465, 256.451, -24.8, 0.78)
pt3dadd(-2.519, 256.345, -24.8, 0.772)
pt3dadd(-2.561, 256.232, -24.8, 0.764)
pt3dadd(-2.602, 256.12, -24.8, 0.754)
pt3dadd(-2.644, 256.008, -24.8, 0.746)
pt3dadd(-2.685, 255.895, -24.8, 0.736)
pt3dadd(-2.726, 255.782, -24.802, 0.728)
pt3dadd(-2.759, 255.668, -24.815, 0.722)
pt3dadd(-2.793, 255.554, -24.828, 0.718)
pt3dadd(-2.827, 255.439, -24.841, 0.712)
pt3dadd(-2.86, 255.325, -24.854, 0.708)
pt3dadd(-2.894, 255.211, -24.867, 0.702)
pt3dadd(-2.947, 255.106, -24.884, 0.678)
pt3dadd(-3, 255, -24.9, 0.652)
pt3dadd(-3.047, 254.89, -24.9, 0.652)
pt3dadd(-3.093, 254.779, -24.9, 0.652)
pt3dadd(-3.111, 254.666, -24.925, 0.668)
pt3dadd(-3.117, 254.555, -24.959, 0.692)
pt3dadd(-3.141, 254.459, -25.009, 0.73)
pt3dadd(-3.186, 254.384, -25.078, 0.786)
pt3dadd(-3.23, 254.323, -25.155, 0.832)
pt3dadd(-3.264, 254.248, -25.223, 0.848)
pt3dadd(-3.287, 254.148, -25.275, 0.838)
pt3dadd(-3.311, 254.048, -25.326, 0.826)
pt3dadd(-3.335, 253.948, -25.378, 0.816)
pt3dadd(-3.358, 253.848, -25.429, 0.804)
pt3dadd(-3.407, 253.746, -25.461, 0.788)
pt3dadd(-3.458, 253.643, -25.491, 0.77)
pt3dadd(-3.51, 253.541, -25.521, 0.754)
pt3dadd(-3.561, 253.439, -25.552, 0.736)
pt3dadd(-3.602, 253.332, -25.58, 0.722)
pt3dadd(-3.632, 253.22, -25.608, 0.712)
pt3dadd(-3.663, 253.11, -25.636, 0.702)
pt3dadd(-3.693, 252.998, -25.664, 0.692)
pt3dadd(-3.724, 252.887, -25.692, 0.682)
pt3dadd(-3.745, 252.77, -25.7, 0.678)
pt3dadd(-3.762, 252.652, -25.7, 0.678)
pt3dadd(-3.78, 252.533, -25.7, 0.678)
pt3dadd(-3.797, 252.414, -25.7, 0.678)
pt3dadd(-3.814, 252.296, -25.7, 0.678)
pt3dadd(-3.832, 252.178, -25.7, 0.678)
pt3dadd(-3.84, 252.058, -25.703, 0.68)
pt3dadd(-3.84, 251.938, -25.708, 0.684)
pt3dadd(-3.84, 251.818, -25.713, 0.688)
pt3dadd(-3.84, 251.699, -25.717, 0.692)
pt3dadd(-3.84, 251.579, -25.722, 0.694)
pt3dadd(-3.84, 251.459, -25.727, 0.698)
pt3dadd(-3.84, 251.339, -25.733, 0.702)
pt3dadd(-3.858, 251.221, -25.744, 0.71)
pt3dadd(-3.88, 251.104, -25.756, 0.72)
pt3dadd(-3.902, 250.987, -25.768, 0.73)
pt3dadd(-3.924, 250.87, -25.78, 0.738)
pt3dadd(-3.946, 250.753, -25.792, 0.748)
pt3dadd(-3.96, 250.634, -25.8, 0.762)
pt3dadd(-3.96, 250.514, -25.8, 0.788)
pt3dadd(-3.96, 250.394, -25.8, 0.814)
pt3dadd(-3.94, 250.279, -25.8, 0.834)
pt3dadd(-3.886, 250.172, -25.8, 0.844)
pt3dadd(-3.832, 250.064, -25.8, 0.85)
pt3dadd(-3.779, 249.958, -25.8, 0.828)
pt3dadd(-3.725, 249.851, -25.8, 0.806)
pt3dadd(-3.72, 249.746, -25.846, 0.752)
pt3dadd(-3.72, 249.643, -25.896, 0.694)
pt3dadd(-3.696, 249.583, -25.974, 0.65)
pt3dadd(-3.661, 249.54, -26.064, 0.61)
pt3dadd(-3.627, 249.498, -26.153, 0.568)
pt3dadd(-3.609, 249.42, -26.158, 0.524)
pt3dadd(-3.603, 249.318, -26.105, 0.476)
pt3dadd(-3.6, 249.23, -26.039, 0.418)
pt3dadd(-3.6, 249.161, -25.958, 0.402)
pt3dadd(-3.6, 249.092, -25.875, 0.402)
pt3dadd(-3.6, 248.993, -25.852, 0.434)
pt3dadd(-3.6, 248.874, -25.863, 0.488)
pt3dadd(-3.6, 248.762, -25.899, 0.55)
pt3dadd(-3.6, 248.656, -25.944, 0.618)
pt3dadd(-3.6, 248.549, -25.988, 0.692)
pt3dadd(-3.6, 248.441, -26.033, 0.77)
pt3dadd(-3.6, 248.332, -26.072, 0.84)
pt3dadd(-3.6, 248.213, -26.091, 0.884)
pt3dadd(-3.6, 248.095, -26.109, 0.904)
pt3dadd(-3.6, 247.976, -26.125, 0.904)
pt3dadd(-3.6, 247.859, -26.142, 0.904)
pt3dadd(-3.6, 247.74, -26.158, 0.904)
pt3dadd(-3.6, 247.622, -26.175, 0.904)
pt3dadd(-3.6, 247.504, -26.191, 0.904)
pt3dadd(-3.6, 247.388, -26.217, 0.898)
pt3dadd(-3.6, 247.277, -26.254, 0.884)
pt3dadd(-3.6, 247.165, -26.292, 0.87)
pt3dadd(-3.6, 247.054, -26.329, 0.856)
pt3dadd(-3.6, 246.943, -26.366, 0.842)
pt3dadd(-3.6, 246.83, -26.4, 0.828)
pt3dadd(-3.6, 246.71, -26.405, 0.82)
pt3dadd(-3.6, 246.59, -26.41, 0.814)
pt3dadd(-3.6, 246.47, -26.415, 0.806)
pt3dadd(-3.6, 246.352, -26.42, 0.798)
pt3dadd(-3.6, 246.232, -26.425, 0.79)
pt3dadd(-3.6, 246.112, -26.43, 0.782)
pt3dadd(-3.6, 245.995, -26.448, 0.776)
pt3dadd(-3.6, 245.884, -26.485, 0.772)
pt3dadd(-3.6, 245.772, -26.523, 0.768)
pt3dadd(-3.6, 245.66, -26.56, 0.762)
pt3dadd(-3.6, 245.549, -26.597, 0.758)
pt3dadd(-3.6, 245.438, -26.634, 0.754)
pt3dadd(-3.6, 245.322, -26.661, 0.742)
pt3dadd(-3.6, 245.207, -26.689, 0.732)
pt3dadd(-3.6, 245.089, -26.7, 0.718)
pt3dadd(-3.6, 244.969, -26.7, 0.702)
pt3dadd(-3.6, 244.849, -26.7, 0.684)
pt3dadd(-3.6, 244.732, -26.716, 0.666)
pt3dadd(-3.6, 244.616, -26.744, 0.646)
pt3dadd(-3.6, 244.505, -26.777, 0.632)
pt3dadd(-3.6, 244.411, -26.84, 0.656)
pt3dadd(-3.599, 244.318, -26.903, 0.682)
pt3dadd(-3.567, 244.254, -26.983, 0.782)
pt3dadd(-3.549, 244.148, -27.014, 0.822)
pt3dadd(-3.534, 244.031, -27.033, 0.844)
pt3dadd(-3.519, 243.913, -27.051, 0.868)
pt3dadd(-3.505, 243.797, -27.069, 0.89)
pt3dadd(-3.49, 243.679, -27.087, 0.914)
pt3dadd(-3.48, 243.563, -27.106, 0.93)
pt3dadd(-3.48, 243.444, -27.125, 0.93)
pt3dadd(-3.48, 243.326, -27.143, 0.93)
pt3dadd(-3.48, 243.209, -27.161, 0.93)
pt3dadd(-3.48, 243.091, -27.18, 0.93)
pt3dadd(-3.48, 242.972, -27.199, 0.93)
pt3dadd(-3.492, 242.86, -27.225, 0.926)
pt3dadd(-3.528, 242.758, -27.268, 0.914)
pt3dadd(-3.564, 242.656, -27.31, 0.902)
pt3dadd(-3.6, 242.552, -27.353, 0.892)
pt3dadd(-3.636, 242.45, -27.395, 0.88)
pt3dadd(-3.698, 242.354, -27.425, 0.878)
pt3dadd(-3.762, 242.26, -27.453, 0.878)
pt3dadd(-3.827, 242.164, -27.482, 0.878)
pt3dadd(-3.892, 242.069, -27.51, 0.878)
pt3dadd(-3.959, 241.98, -27.547, 0.894)
pt3dadd(-4.027, 241.897, -27.591, 0.924)
pt3dadd(-4.08, 241.8, -27.629, 0.95)
pt3dadd(-4.13, 241.699, -27.664, 0.978)
pt3dadd(-4.242, 241.672, -27.68, 0.98)
pt3dadd(-4.358, 241.649, -27.695, 0.98)
pt3dadd(-4.467, 241.614, -27.722, 0.98)
pt3dadd(-4.571, 241.571, -27.757, 0.98)
pt3dadd(-4.676, 241.553, -27.801, 0.966)
pt3dadd(-4.772, 241.52, -27.845, 0.94)
pt3dadd(-4.846, 241.438, -27.883, 0.898)
pt3dadd(-4.925, 241.352, -27.9, 0.852)
pt3dadd(-5.006, 241.264, -27.9, 0.806)
pt3dadd(-5.095, 241.184, -27.9, 0.768)
pt3dadd(-5.194, 241.116, -27.9, 0.746)
pt3dadd(-5.268, 241.034, -27.9, 0.73)
pt3dadd(-5.273, 240.914, -27.9, 0.74)
pt3dadd(-5.277, 240.796, -27.9, 0.748)
pt3dadd(-5.308, 240.689, -27.913, 0.762)
pt3dadd(-5.384, 240.604, -27.946, 0.788)
pt3dadd(-5.459, 240.52, -27.979, 0.812)
pt3dadd(-5.535, 240.444, -28.021, 0.834)
pt3dadd(-5.612, 240.383, -28.079, 0.848)
pt3dadd(-5.64, 240.326, -28.156, 0.854)
pt3dadd(-5.683, 240.246, -28.219, 0.848)
pt3dadd(-5.731, 240.162, -28.278, 0.842)
pt3dadd(-5.78, 240.078, -28.337, 0.836)
pt3dadd(-5.828, 239.994, -28.396, 0.83)
pt3dadd(-5.885, 239.924, -28.462, 0.834)
pt3dadd(-5.943, 239.86, -28.53, 0.84)
pt3dadd(-6.002, 239.794, -28.598, 0.846)
pt3dadd(-6.061, 239.729, -28.666, 0.852)
pt3dadd(-6.134, 239.648, -28.696, 0.87)
pt3dadd(-6.215, 239.561, -28.708, 0.896)
pt3dadd(-6.312, 239.509, -28.739, 0.93)
pt3dadd(-6.416, 239.476, -28.78, 0.97)
pt3dadd(-6.452, 239.376, -28.792, 0.994)
pt3dadd(-6.468, 239.257, -28.796, 1.014)
pt3dadd(-6.481, 239.138, -28.8, 1.03)
pt3dadd(-6.485, 239.018, -28.8, 1.03)
pt3dadd(-6.49, 238.898, -28.8, 1.03)
pt3dadd(-6.508, 238.783, -28.808, 1.028)
pt3dadd(-6.558, 238.679, -28.836, 1.02)
pt3dadd(-6.607, 238.574, -28.864, 1.012)
pt3dadd(-6.66, 238.478, -28.894, 1.004)
pt3dadd(-6.751, 238.457, -28.958, 0.99)
pt3dadd(-6.828, 238.433, -29.026, 0.98)
pt3dadd(-6.832, 238.388, -29.119, 0.98)
pt3dadd(-6.836, 238.344, -29.211, 0.98)
pt3dadd(-6.846, 238.288, -29.29, 0.976)
pt3dadd(-6.88, 238.174, -29.295, 0.954)
pt3dadd(-6.915, 238.058, -29.299, 0.932)
pt3dadd(-6.965, 237.949, -29.302, 0.85)
pt3dadd(-7.018, 237.844, -29.318, 0.8)
pt3dadd(-7.071, 237.739, -29.336, 0.75)
}
}
proc shape3d_78() {
apic[19] { pt3dadd(-7.13, 237.644, -29.373, 0.724)
pt3dadd(-7.193, 237.55, -29.405, 0.7)
pt3dadd(-7.269, 237.46, -29.422, 0.686)
pt3dadd(-7.346, 237.39, -29.457, 0.682)
pt3dadd(-7.425, 237.361, -29.529, 0.696)
pt3dadd(-7.501, 237.32, -29.597, 0.716)
pt3dadd(-7.575, 237.266, -29.662, 0.742)
pt3dadd(-7.648, 237.211, -29.727, 0.768)
pt3dadd(-7.683, 237.125, -29.775, 0.81)
pt3dadd(-7.689, 237.012, -29.809, 0.864)
pt3dadd(-7.71, 236.903, -29.841, 0.912)
pt3dadd(-7.768, 236.803, -29.868, 0.942)
pt3dadd(-7.826, 236.702, -29.894, 0.972)
pt3dadd(-7.898, 236.608, -29.9, 0.962)
pt3dadd(-7.973, 236.514, -29.9, 0.938)
pt3dadd(-8.007, 236.404, -29.9, 0.902)
pt3dadd(-8.018, 236.285, -29.9, 0.862)
pt3dadd(-8.029, 236.165, -29.9, 0.822)
pt3dadd(-8.04, 236.046, -29.9, 0.78)
pt3dadd(-8.04, 235.932, -29.931, 0.728)
pt3dadd(-8.04, 235.819, -29.965, 0.674)
pt3dadd(-8.058, 235.753, -30.034, 0.648)
pt3dadd(-8.087, 235.72, -30.126, 0.638)
pt3dadd(-8.116, 235.685, -30.219, 0.63)
pt3dadd(-8.135, 235.661, -30.316, 0.638)
pt3dadd(-8.152, 235.638, -30.413, 0.648)
pt3dadd(-8.16, 235.567, -30.48, 0.69)
pt3dadd(-8.16, 235.466, -30.535, 0.722)
pt3dadd(-8.16, 235.368, -30.591, 0.746)
pt3dadd(-8.182, 235.33, -30.673, 0.768)
pt3dadd(-8.217, 235.324, -30.769, 0.788)
pt3dadd(-8.254, 235.303, -30.861, 0.812)
pt3dadd(-8.297, 235.253, -30.944, 0.84)
pt3dadd(-8.336, 235.174, -30.993, 0.86)
pt3dadd(-8.373, 235.06, -31.003, 0.87)
pt3dadd(-8.418, 234.953, -31.019, 0.882)
pt3dadd(-8.494, 234.869, -31.052, 0.9)
pt3dadd(-8.569, 234.785, -31.086, 0.916)
pt3dadd(-8.645, 234.708, -31.126, 0.926)
pt3dadd(-8.721, 234.654, -31.189, 0.912)
pt3dadd(-8.76, 234.57, -31.233, 0.9)
pt3dadd(-8.76, 234.454, -31.257, 0.892)
pt3dadd(-8.76, 234.337, -31.28, 0.886)
pt3dadd(-8.76, 234.22, -31.302, 0.876)
pt3dadd(-8.76, 234.101, -31.314, 0.858)
pt3dadd(-8.76, 233.982, -31.327, 0.838)
pt3dadd(-8.781, 233.873, -31.355, 0.848)
pt3dadd(-8.839, 233.789, -31.398, 0.908)
pt3dadd(-8.949, 233.762, -31.43, 1.018)
pt3dadd(-9.058, 233.76, -31.471, 1.02)
pt3dadd(-9.174, 233.76, -31.493, 0.95)
pt3dadd(-9.294, 233.753, -31.5, 0.866)
pt3dadd(-9.402, 233.71, -31.5, 0.802)
pt3dadd(-9.501, 233.641, -31.5, 0.756)
pt3dadd(-9.566, 233.554, -31.498, 0.712)
pt3dadd(-9.582, 233.435, -31.494, 0.674)
pt3dadd(-9.597, 233.316, -31.49, 0.636)
pt3dadd(-9.601, 233.208, -31.451, 0.526)
pt3dadd(-9.622, 233.131, -31.376, 0.5)
pt3dadd(-9.653, 233.056, -31.314, 0.476)
pt3dadd(-9.743, 232.98, -31.333, 0.46)
pt3dadd(-9.816, 232.914, -31.375, 0.448)
pt3dadd(-9.859, 232.865, -31.459, 0.434)
pt3dadd(-9.919, 232.805, -31.526, 0.42)
pt3dadd(-9.995, 232.735, -31.577, 0.406)
pt3dadd(-10.094, 232.688, -31.616, 0.386)
pt3dadd(-10.172, 232.645, -31.674, 0.38)
pt3dadd(-10.223, 232.6, -31.756, 0.386)
pt3dadd(-10.274, 232.555, -31.839, 0.392)
pt3dadd(-10.325, 232.511, -31.921, 0.398)
pt3dadd(-10.384, 232.462, -31.996, 0.402)
pt3dadd(-10.463, 232.405, -32.055, 0.402)
pt3dadd(-10.542, 232.348, -32.113, 0.402)
pt3dadd(-10.614, 232.292, -32.177, 0.398)
pt3dadd(-10.665, 232.241, -32.257, 0.384)
pt3dadd(-10.731, 232.189, -32.326, 0.358)
pt3dadd(-10.815, 232.135, -32.383, 0.314)
pt3dadd(-10.914, 232.082, -32.4, 0.294)
pt3dadd(-11.022, 232.028, -32.4, 0.282)
pt3dadd(-11.133, 231.984, -32.4, 0.286)
pt3dadd(-11.248, 231.952, -32.4, 0.306)
pt3dadd(-11.363, 231.919, -32.398, 0.328)
pt3dadd(-11.449, 231.889, -32.333, 0.368)
pt3dadd(-11.536, 231.859, -32.269, 0.41)
pt3dadd(-11.622, 231.828, -32.204, 0.45)
pt3dadd(-11.699, 231.769, -32.146, 0.548)
pt3dadd(-11.774, 231.7, -32.1, 0.638)
pt3dadd(-11.844, 231.602, -32.1, 0.692)
pt3dadd(-11.914, 231.505, -32.1, 0.744)
pt3dadd(-11.988, 231.41, -32.1, 0.794)
pt3dadd(-12.069, 231.323, -32.1, 0.842)
pt3dadd(-12.158, 231.246, -32.1, 0.872)
pt3dadd(-12.26, 231.192, -32.1, 0.848)
pt3dadd(-12.344, 231.106, -32.1, 0.832)
pt3dadd(-12.427, 231.019, -32.1, 0.818)
pt3dadd(-12.511, 230.933, -32.1, 0.802)
pt3dadd(-12.594, 230.846, -32.1, 0.786)
pt3dadd(-12.668, 230.755, -32.11, 0.77)
pt3dadd(-12.731, 230.657, -32.133, 0.754)
pt3dadd(-12.794, 230.558, -32.155, 0.736)
pt3dadd(-12.857, 230.46, -32.177, 0.72)
pt3dadd(-12.92, 230.36, -32.2, 0.704)
pt3dadd(-12.975, 230.255, -32.204, 0.678)
pt3dadd(-13.04, 230.161, -32.233, 0.678)
pt3dadd(-13.083, 230.065, -32.28, 0.678)
pt3dadd(-13.13, 229.962, -32.28, 0.646)
pt3dadd(-13.182, 229.922, -32.202, 0.608)
pt3dadd(-13.215, 229.92, -32.106, 0.63)
pt3dadd(-13.253, 229.92, -32.011, 0.662)
pt3dadd(-13.297, 229.92, -31.919, 0.662)
pt3dadd(-13.329, 229.92, -31.823, 0.61)
pt3dadd(-13.372, 229.895, -31.735, 0.512)
pt3dadd(-13.436, 229.807, -31.701, 0.432)
pt3dadd(-13.494, 229.703, -31.7, 0.388)
pt3dadd(-13.569, 229.609, -31.7, 0.352)
pt3dadd(-13.658, 229.53, -31.699, 0.356)
pt3dadd(-13.743, 229.462, -31.666, 0.42)
pt3dadd(-13.788, 229.44, -31.579, 0.452)
pt3dadd(-13.8, 229.44, -31.48, 0.452)
pt3dadd(-13.797, 229.44, -31.38, 0.452)
pt3dadd(-13.775, 229.434, -31.282, 0.442)
pt3dadd(-13.719, 229.386, -31.211, 0.374)
pt3dadd(-13.654, 229.286, -31.2, 0.276)
pt3dadd(-13.558, 229.219, -31.2, 0.23)
pt3dadd(-13.44, 229.2, -31.2, 0.226)
pt3dadd(-13.32, 229.2, -31.2, 0.226)
}
apic[20] {pt3dclear()
pt3dadd(16.427, 268.44, -19.889, 0.828)
pt3dadd(16.428, 268.441, -19.89, 0.83)
pt3dadd(16.482, 268.517, -19.953, 0.906)
pt3dadd(16.536, 268.592, -20.016, 0.984)
pt3dadd(16.59, 268.668, -20.079, 1.06)
pt3dadd(16.644, 268.744, -20.142, 1.138)
pt3dadd(16.698, 268.819, -20.205, 1.214)
pt3dadd(16.752, 268.896, -20.268, 1.29)
pt3dadd(16.806, 268.972, -20.332, 1.368)
pt3dadd(16.86, 269.047, -20.395, 1.444)
pt3dadd(16.914, 269.123, -20.458, 1.522)
pt3dadd(16.968, 269.198, -20.521, 1.598)
pt3dadd(17.022, 269.274, -20.584, 1.674)
pt3dadd(17.077, 269.35, -20.647, 1.752)
pt3dadd(17.131, 269.425, -20.71, 1.828)
pt3dadd(17.185, 269.501, -20.774, 1.906)
pt3dadd(17.239, 269.578, -20.837, 1.982)
pt3dadd(17.293, 269.653, -20.9, 2.058)
pt3dadd(17.233, 269.756, -20.9, 2.15)
pt3dadd(17.172, 269.86, -20.9, 2.242)
pt3dadd(17.16, 269.976, -20.9, 2.308)
pt3dadd(17.16, 270.096, -20.9, 2.366)
pt3dadd(17.16, 270.216, -20.9, 2.424)
pt3dadd(17.117, 270.326, -20.9, 2.482)
pt3dadd(17.063, 270.433, -20.9, 2.538)
pt3dadd(16.992, 270.528, -20.9, 2.592)
pt3dadd(16.914, 270.618, -20.9, 2.638)
pt3dadd(16.879, 270.732, -20.9, 2.652)
pt3dadd(16.843, 270.847, -20.9, 2.666)
pt3dadd(16.807, 270.961, -20.9, 2.68)
pt3dadd(16.771, 271.075, -20.9, 2.692)
pt3dadd(16.735, 271.19, -20.9, 2.706)
pt3dadd(16.703, 271.306, -20.9, 2.716)
pt3dadd(16.672, 271.422, -20.9, 2.726)
pt3dadd(16.642, 271.538, -20.9, 2.734)
pt3dadd(16.612, 271.654, -20.9, 2.744)
pt3dadd(16.582, 271.77, -20.9, 2.752)
pt3dadd(16.552, 271.886, -20.9, 2.76)
pt3dadd(16.487, 271.986, -20.9, 2.766)
pt3dadd(16.415, 272.082, -20.9, 2.772)
pt3dadd(16.343, 272.178, -20.9, 2.776)
pt3dadd(16.271, 272.274, -20.9, 2.782)
pt3dadd(16.199, 272.37, -20.9, 2.786)
pt3dadd(16.15, 272.479, -20.9, 2.792)
pt3dadd(16.105, 272.59, -20.9, 2.796)
pt3dadd(16.061, 272.701, -20.9, 2.8)
pt3dadd(16.016, 272.813, -20.9, 2.806)
pt3dadd(15.972, 272.924, -20.9, 2.81)
pt3dadd(15.925, 273.035, -20.9, 2.814)
pt3dadd(15.874, 273.144, -20.9, 2.82)
pt3dadd(15.823, 273.252, -20.9, 2.824)
pt3dadd(15.773, 273.361, -20.9, 2.828)
pt3dadd(15.722, 273.47, -20.9, 2.834)
pt3dadd(15.67, 273.577, -20.9, 2.836)
pt3dadd(15.607, 273.68, -20.9, 2.82)
pt3dadd(15.544, 273.782, -20.9, 2.806)
pt3dadd(15.481, 273.884, -20.9, 2.79)
pt3dadd(15.418, 273.986, -20.9, 2.776)
pt3dadd(15.355, 274.088, -20.9, 2.76)
pt3dadd(15.289, 274.188, -20.9, 2.724)
pt3dadd(15.223, 274.289, -20.9, 2.69)
pt3dadd(15.156, 274.388, -20.9, 2.656)
pt3dadd(15.09, 274.489, -20.9, 2.62)
pt3dadd(15.025, 274.59, -20.9, 2.586)
pt3dadd(14.974, 274.698, -20.9, 2.548)
pt3dadd(14.924, 274.807, -20.9, 2.51)
pt3dadd(14.873, 274.916, -20.9, 2.472)
pt3dadd(14.823, 275.024, -20.9, 2.432)
pt3dadd(14.772, 275.134, -20.9, 2.394)
pt3dadd(14.717, 275.24, -20.9, 2.386)
pt3dadd(14.66, 275.346, -20.9, 2.386)
pt3dadd(14.604, 275.452, -20.9, 2.386)
pt3dadd(14.547, 275.557, -20.9, 2.386)
pt3dadd(14.491, 275.664, -20.9, 2.386)
}
}
proc shape3d_79() {
apic[20] { pt3dadd(14.423, 275.762, -20.9, 2.4)
pt3dadd(14.348, 275.856, -20.9, 2.426)
pt3dadd(14.273, 275.95, -20.9, 2.45)
pt3dadd(14.197, 276.043, -20.9, 2.476)
pt3dadd(14.122, 276.136, -20.9, 2.502)
pt3dadd(14.03, 276.209, -20.9, 2.528)
pt3dadd(13.926, 276.269, -20.9, 2.558)
pt3dadd(13.822, 276.329, -20.9, 2.588)
pt3dadd(13.718, 276.389, -20.9, 2.618)
pt3dadd(13.614, 276.449, -20.9, 2.646)
pt3dadd(13.525, 276.527, -20.9, 2.662)
pt3dadd(13.453, 276.623, -20.9, 2.662)
pt3dadd(13.381, 276.719, -20.9, 2.662)
pt3dadd(13.309, 276.815, -20.9, 2.662)
pt3dadd(13.237, 276.911, -20.9, 2.662)
pt3dadd(13.2, 277.018, -20.9, 2.646)
pt3dadd(13.2, 277.138, -20.9, 2.612)
pt3dadd(13.2, 277.258, -20.9, 2.578)
pt3dadd(13.19, 277.378, -20.9, 2.528)
pt3dadd(13.17, 277.495, -20.9, 2.46)
pt3dadd(13.149, 277.614, -20.9, 2.394)
pt3dadd(13.047, 277.662, -20.9, 2.31)
pt3dadd(12.933, 277.702, -20.9, 2.226)
pt3dadd(12.825, 277.752, -20.9, 2.148)
pt3dadd(12.722, 277.812, -20.9, 2.08)
pt3dadd(12.642, 277.891, -20.9, 2.032)
pt3dadd(12.609, 278.006, -20.9, 2.026)
pt3dadd(12.576, 278.122, -20.9, 2.02)
pt3dadd(12.543, 278.238, -20.9, 2.014)
pt3dadd(12.515, 278.354, -20.9, 2.02)
pt3dadd(12.501, 278.473, -20.9, 2.058)
pt3dadd(12.486, 278.592, -20.9, 2.094)
pt3dadd(12.48, 278.712, -20.9, 2.184)
pt3dadd(12.439, 278.819, -20.9, 2.244)
pt3dadd(12.37, 278.917, -20.9, 2.258)
pt3dadd(12.301, 279.016, -20.9, 2.274)
pt3dadd(12.232, 279.113, -20.9, 2.288)
pt3dadd(12.163, 279.211, -20.9, 2.304)
pt3dadd(12.128, 279.322, -20.9, 2.316)
pt3dadd(12.118, 279.442, -20.9, 2.324)
pt3dadd(12.109, 279.562, -20.9, 2.334)
pt3dadd(12.026, 279.635, -20.9, 2.318)
pt3dadd(11.922, 279.695, -20.9, 2.294)
pt3dadd(11.812, 279.739, -20.9, 2.254)
pt3dadd(11.696, 279.773, -20.9, 2.202)
pt3dadd(11.58, 279.804, -20.9, 2.144)
pt3dadd(11.462, 279.824, -20.9, 2.058)
pt3dadd(11.344, 279.845, -20.9, 1.97)
pt3dadd(11.229, 279.878, -20.9, 1.85)
pt3dadd(11.117, 279.922, -20.9, 1.702)
pt3dadd(11.001, 279.95, -20.9, 1.508)
pt3dadd(10.882, 279.96, -20.9, 1.392)
pt3dadd(10.762, 279.965, -20.9, 1.262)
pt3dadd(10.648, 279.996, -20.9, 1.138)
pt3dadd(10.577, 280.086, -20.9, 1.15)
pt3dadd(10.56, 280.204, -20.9, 1.286)
pt3dadd(10.56, 280.324, -20.9, 1.436)
pt3dadd(10.56, 280.444, -20.9, 1.586)
pt3dadd(10.56, 280.564, -20.9, 1.71)
pt3dadd(10.56, 280.684, -20.9, 1.784)
pt3dadd(10.56, 280.804, -20.9, 1.808)
pt3dadd(10.56, 280.924, -20.9, 1.834)
pt3dadd(10.56, 281.044, -20.9, 1.832)
pt3dadd(10.56, 281.164, -20.9, 1.816)
pt3dadd(10.56, 281.284, -20.9, 1.8)
pt3dadd(10.56, 281.404, -20.9, 1.782)
pt3dadd(10.56, 281.524, -20.9, 1.722)
pt3dadd(10.56, 281.644, -20.9, 1.664)
pt3dadd(10.56, 281.764, -20.9, 1.604)
pt3dadd(10.555, 281.884, -20.9, 1.536)
pt3dadd(10.551, 282.004, -20.9, 1.466)
pt3dadd(10.533, 282.116, -20.9, 1.394)
pt3dadd(10.434, 282.184, -20.9, 1.3)
pt3dadd(10.335, 282.252, -20.9, 1.206)
pt3dadd(10.25, 282.336, -20.9, 1.118)
pt3dadd(10.211, 282.442, -20.9, 1.06)
pt3dadd(10.206, 282.562, -20.9, 1.026)
pt3dadd(10.201, 282.682, -20.9, 0.99)
pt3dadd(10.178, 282.798, -20.9, 0.98)
pt3dadd(10.144, 282.913, -20.9, 0.98)
pt3dadd(10.101, 283.024, -20.9, 0.992)
pt3dadd(10.026, 283.117, -20.9, 1.038)
pt3dadd(9.947, 283.206, -20.901, 1.092)
pt3dadd(9.838, 283.254, -20.906, 1.194)
pt3dadd(9.728, 283.303, -20.911, 1.298)
pt3dadd(9.63, 283.346, -20.953, 1.458)
pt3dadd(9.524, 283.391, -20.978, 1.54)
pt3dadd(9.414, 283.436, -20.994, 1.59)
pt3dadd(9.304, 283.482, -21, 1.6)
pt3dadd(9.193, 283.529, -21, 1.59)
pt3dadd(9.102, 283.596, -21, 1.578)
pt3dadd(9.048, 283.704, -21, 1.568)
pt3dadd(8.997, 283.812, -21, 1.56)
pt3dadd(8.962, 283.926, -21.005, 1.592)
pt3dadd(8.927, 284.041, -21.01, 1.624)
pt3dadd(8.888, 284.132, -21.06, 1.664)
pt3dadd(8.849, 284.216, -21.123, 1.706)
pt3dadd(8.809, 284.3, -21.186, 1.748)
pt3dadd(8.767, 284.359, -21.265, 1.81)
pt3dadd(8.724, 284.408, -21.348, 1.878)
pt3dadd(8.691, 284.518, -21.37, 1.892)
pt3dadd(8.659, 284.632, -21.385, 1.9)
pt3dadd(8.627, 284.746, -21.4, 1.908)
pt3dadd(8.582, 284.856, -21.416, 1.884)
pt3dadd(8.537, 284.965, -21.432, 1.86)
pt3dadd(8.508, 285.056, -21.488, 1.698)
pt3dadd(8.466, 285.161, -21.523, 1.664)
pt3dadd(8.424, 285.265, -21.557, 1.63)
pt3dadd(8.382, 285.37, -21.592, 1.596)
pt3dadd(8.34, 285.474, -21.627, 1.564)
pt3dadd(8.28, 285.575, -21.647, 1.548)
pt3dadd(8.216, 285.673, -21.664, 1.538)
pt3dadd(8.152, 285.773, -21.681, 1.526)
pt3dadd(8.088, 285.872, -21.698, 1.514)
pt3dadd(8.038, 285.972, -21.724, 1.516)
pt3dadd(8.032, 286.074, -21.777, 1.552)
pt3dadd(8.012, 286.166, -21.828, 1.592)
pt3dadd(7.911, 286.21, -21.87, 1.66)
pt3dadd(7.807, 286.249, -21.9, 1.716)
pt3dadd(7.691, 286.283, -21.9, 1.748)
pt3dadd(7.576, 286.315, -21.9, 1.778)
pt3dadd(7.471, 286.373, -21.9, 1.782)
pt3dadd(7.368, 286.433, -21.9, 1.782)
pt3dadd(7.311, 286.53, -21.9, 1.778)
pt3dadd(7.278, 286.645, -21.9, 1.772)
pt3dadd(7.245, 286.762, -21.9, 1.766)
pt3dadd(7.212, 286.877, -21.9, 1.76)
pt3dadd(7.2, 286.994, -21.9, 1.752)
pt3dadd(7.2, 287.114, -21.9, 1.744)
pt3dadd(7.2, 287.234, -21.9, 1.736)
pt3dadd(7.156, 287.34, -21.908, 1.738)
pt3dadd(7.085, 287.435, -21.92, 1.748)
pt3dadd(7.014, 287.531, -21.933, 1.758)
pt3dadd(6.977, 287.605, -22.005, 1.784)
pt3dadd(6.94, 287.681, -22.075, 1.814)
pt3dadd(6.865, 287.755, -22.112, 1.824)
pt3dadd(6.767, 287.818, -22.135, 1.806)
pt3dadd(6.668, 287.881, -22.157, 1.79)
pt3dadd(6.569, 287.944, -22.18, 1.774)
pt3dadd(6.471, 288.007, -22.2, 1.754)
pt3dadd(6.375, 288.079, -22.2, 1.72)
pt3dadd(6.279, 288.151, -22.2, 1.684)
pt3dadd(6.183, 288.223, -22.2, 1.648)
pt3dadd(6.087, 288.295, -22.2, 1.614)
pt3dadd(5.992, 288.368, -22.2, 1.578)
pt3dadd(5.912, 288.457, -22.2, 1.544)
pt3dadd(5.831, 288.546, -22.2, 1.508)
pt3dadd(5.75, 288.635, -22.2, 1.472)
pt3dadd(5.67, 288.724, -22.2, 1.436)
pt3dadd(5.592, 288.815, -22.2, 1.406)
pt3dadd(5.529, 288.917, -22.2, 1.4)
pt3dadd(5.466, 289.019, -22.2, 1.396)
pt3dadd(5.403, 289.121, -22.2, 1.39)
pt3dadd(5.34, 289.223, -22.2, 1.386)
pt3dadd(5.278, 289.326, -22.2, 1.382)
pt3dadd(5.233, 289.438, -22.2, 1.39)
pt3dadd(5.189, 289.549, -22.2, 1.4)
pt3dadd(5.144, 289.66, -22.2, 1.41)
pt3dadd(5.099, 289.771, -22.2, 1.418)
pt3dadd(5.055, 289.883, -22.2, 1.428)
pt3dadd(5.039, 290, -22.2, 1.438)
pt3dadd(5.037, 290.12, -22.2, 1.45)
pt3dadd(5.035, 290.24, -22.2, 1.46)
pt3dadd(5.033, 290.36, -22.2, 1.472)
pt3dadd(5.031, 290.48, -22.2, 1.482)
pt3dadd(5.029, 290.6, -22.2, 1.494)
pt3dadd(5.027, 290.72, -22.2, 1.504)
pt3dadd(4.995, 290.834, -22.2, 1.506)
pt3dadd(4.953, 290.947, -22.2, 1.506)
pt3dadd(4.911, 291.059, -22.2, 1.506)
pt3dadd(4.87, 291.172, -22.2, 1.506)
pt3dadd(4.828, 291.284, -22.2, 1.506)
pt3dadd(4.775, 291.39, -22.205, 1.51)
pt3dadd(4.699, 291.481, -22.22, 1.522)
pt3dadd(4.622, 291.571, -22.234, 1.532)
pt3dadd(4.546, 291.662, -22.249, 1.544)
pt3dadd(4.47, 291.754, -22.264, 1.554)
pt3dadd(4.393, 291.844, -22.28, 1.598)
pt3dadd(4.317, 291.935, -22.298, 1.65)
pt3dadd(4.214, 291.976, -22.329, 1.702)
pt3dadd(4.106, 292.009, -22.363, 1.752)
pt3dadd(4.088, 292.115, -22.392, 1.776)
pt3dadd(4.083, 292.229, -22.42, 1.798)
pt3dadd(4.068, 292.326, -22.472, 1.8)
pt3dadd(4.048, 292.41, -22.542, 1.788)
pt3dadd(3.985, 292.489, -22.584, 1.744)
pt3dadd(3.9, 292.57, -22.6, 1.678)
pt3dadd(3.818, 292.657, -22.6, 1.608)
pt3dadd(3.754, 292.753, -22.6, 1.542)
pt3dadd(3.733, 292.872, -22.6, 1.494)
pt3dadd(3.713, 292.991, -22.6, 1.446)
pt3dadd(3.638, 293.074, -22.6, 1.424)
pt3dadd(3.539, 293.142, -22.6, 1.412)
pt3dadd(3.439, 293.207, -22.603, 1.432)
pt3dadd(3.337, 293.27, -22.608, 1.48)
pt3dadd(3.25, 293.341, -22.632, 1.544)
pt3dadd(3.18, 293.423, -22.675, 1.608)
pt3dadd(3.104, 293.508, -22.707, 1.608)
pt3dadd(3.029, 293.593, -22.738, 1.608)
pt3dadd(2.953, 293.678, -22.77, 1.608)
}
}
proc shape3d_80() {
apic[20] { pt3dadd(2.88, 293.762, -22.803, 1.606)
pt3dadd(2.88, 293.838, -22.881, 1.582)
pt3dadd(2.88, 293.912, -22.959, 1.56)
pt3dadd(2.859, 294.025, -22.98, 1.546)
pt3dadd(2.836, 294.142, -22.994, 1.536)
pt3dadd(2.756, 294.203, -23, 1.55)
pt3dadd(2.639, 294.229, -23, 1.58)
pt3dadd(2.525, 294.262, -23, 1.612)
pt3dadd(2.444, 294.35, -23, 1.672)
pt3dadd(2.362, 294.438, -23, 1.732)
pt3dadd(2.278, 294.523, -23, 1.836)
pt3dadd(2.178, 294.586, -23, 1.898)
pt3dadd(2.067, 294.63, -23, 1.926)
pt3dadd(1.955, 294.674, -23, 1.954)
pt3dadd(1.844, 294.719, -23, 1.982)
pt3dadd(1.732, 294.763, -23, 2.01)
pt3dadd(1.624, 294.814, -23, 2.038)
pt3dadd(1.528, 294.886, -23, 2.058)
pt3dadd(1.432, 294.956, -23, 2.078)
pt3dadd(1.336, 295.03, -23, 2.098)
pt3dadd(1.24, 295.102, -23, 2.118)
pt3dadd(1.146, 295.175, -23.003, 2.134)
pt3dadd(1.065, 295.26, -23.024, 2.128)
pt3dadd(0.983, 295.344, -23.044, 2.122)
pt3dadd(0.901, 295.429, -23.064, 2.116)
pt3dadd(0.82, 295.513, -23.084, 2.11)
pt3dadd(0.741, 295.603, -23.093, 2.044)
pt3dadd(0.662, 295.693, -23.098, 1.958)
pt3dadd(0.629, 295.805, -23.1, 1.868)
pt3dadd(0.614, 295.924, -23.1, 1.774)
pt3dadd(0.6, 296.042, -23.1, 1.68)
pt3dadd(0.579, 296.161, -23.1, 1.604)
pt3dadd(0.559, 296.279, -23.1, 1.526)
pt3dadd(0.503, 296.372, -23.1, 1.462)
pt3dadd(0.4, 296.434, -23.1, 1.416)
pt3dadd(0.295, 296.492, -23.1, 1.382)
pt3dadd(0.188, 296.545, -23.1, 1.382)
pt3dadd(0.099, 296.624, -23.105, 1.382)
pt3dadd(0.018, 296.712, -23.112, 1.382)
pt3dadd(-0.064, 296.8, -23.119, 1.382)
pt3dadd(-0.146, 296.887, -23.126, 1.382)
pt3dadd(-0.228, 296.974, -23.134, 1.382)
pt3dadd(-0.322, 297.031, -23.173, 1.37)
pt3dadd(-0.417, 297.088, -23.212, 1.358)
pt3dadd(-0.511, 297.144, -23.252, 1.346)
pt3dadd(-0.606, 297.202, -23.291, 1.334)
pt3dadd(-0.663, 297.3, -23.3, 1.288)
pt3dadd(-0.709, 297.41, -23.3, 1.234)
pt3dadd(-0.784, 297.497, -23.3, 1.188)
pt3dadd(-0.887, 297.557, -23.3, 1.154)
pt3dadd(-0.993, 297.611, -23.305, 1.134)
pt3dadd(-1.106, 297.649, -23.32, 1.146)
pt3dadd(-1.21, 297.688, -23.346, 1.162)
pt3dadd(-1.268, 297.731, -23.426, 1.204)
pt3dadd(-1.318, 297.796, -23.491, 1.236)
pt3dadd(-1.351, 297.902, -23.528, 1.252)
pt3dadd(-1.383, 298.009, -23.566, 1.266)
pt3dadd(-1.419, 298.115, -23.6, 1.28)
pt3dadd(-1.487, 298.213, -23.6, 1.268)
pt3dadd(-1.555, 298.313, -23.6, 1.256)
pt3dadd(-1.634, 298.4, -23.6, 1.284)
pt3dadd(-1.737, 298.463, -23.6, 1.298)
pt3dadd(-1.839, 298.525, -23.6, 1.314)
pt3dadd(-1.941, 298.589, -23.6, 1.328)
pt3dadd(-2.044, 298.651, -23.6, 1.342)
pt3dadd(-2.147, 298.711, -23.6, 1.358)
pt3dadd(-2.258, 298.757, -23.6, 1.382)
pt3dadd(-2.37, 298.801, -23.6, 1.406)
pt3dadd(-2.481, 298.846, -23.6, 1.428)
pt3dadd(-2.593, 298.89, -23.6, 1.452)
pt3dadd(-2.704, 298.934, -23.6, 1.476)
pt3dadd(-2.81, 298.991, -23.6, 1.492)
pt3dadd(-2.914, 299.051, -23.6, 1.508)
pt3dadd(-3.018, 299.111, -23.6, 1.522)
pt3dadd(-3.122, 299.171, -23.6, 1.536)
pt3dadd(-3.226, 299.23, -23.6, 1.552)
pt3dadd(-3.326, 299.296, -23.6, 1.556)
pt3dadd(-3.424, 299.365, -23.6, 1.556)
pt3dadd(-3.523, 299.434, -23.6, 1.556)
pt3dadd(-3.621, 299.503, -23.6, 1.556)
pt3dadd(-3.719, 299.572, -23.6, 1.556)
pt3dadd(-3.812, 299.633, -23.628, 1.554)
pt3dadd(-3.902, 299.687, -23.676, 1.548)
pt3dadd(-3.992, 299.742, -23.724, 1.542)
pt3dadd(-4.082, 299.796, -23.773, 1.536)
pt3dadd(-4.167, 299.864, -23.81, 1.53)
pt3dadd(-4.247, 299.95, -23.833, 1.524)
pt3dadd(-4.326, 300.035, -23.856, 1.518)
pt3dadd(-4.406, 300.121, -23.879, 1.512)
pt3dadd(-4.484, 300.208, -23.9, 1.506)
pt3dadd(-4.545, 300.311, -23.9, 1.494)
pt3dadd(-4.605, 300.415, -23.9, 1.484)
pt3dadd(-4.716, 300.45, -23.9, 1.456)
pt3dadd(-4.833, 300.476, -23.9, 1.426)
pt3dadd(-4.932, 300.529, -23.906, 1.382)
pt3dadd(-5.001, 300.625, -23.923, 1.318)
pt3dadd(-5.048, 300.728, -23.947, 1.27)
pt3dadd(-5.066, 300.841, -23.978, 1.248)
pt3dadd(-5.112, 300.934, -24, 1.236)
pt3dadd(-5.223, 300.978, -24, 1.256)
pt3dadd(-5.334, 301.024, -24, 1.276)
pt3dadd(-5.446, 301.068, -24, 1.294)
pt3dadd(-5.558, 301.111, -24, 1.344)
pt3dadd(-5.671, 301.151, -24, 1.43)
pt3dadd(-5.785, 301.188, -24, 1.524)
pt3dadd(-5.901, 301.211, -24, 1.662)
pt3dadd(-6.007, 301.268, -24, 1.68)
pt3dadd(-6.113, 301.325, -24, 1.7)
pt3dadd(-6.219, 301.381, -24, 1.72)
pt3dadd(-6.324, 301.438, -24, 1.738)
pt3dadd(-6.429, 301.495, -24, 1.758)
pt3dadd(-6.51, 301.584, -24, 1.764)
pt3dadd(-6.591, 301.673, -24, 1.768)
pt3dadd(-6.671, 301.762, -24, 1.774)
pt3dadd(-6.752, 301.85, -24, 1.778)
pt3dadd(-6.834, 301.938, -24, 1.784)
pt3dadd(-6.933, 302.006, -24, 1.796)
pt3dadd(-7.032, 302.074, -24, 1.808)
pt3dadd(-7.07, 302.185, -24, 1.808)
pt3dadd(-7.103, 302.3, -24, 1.808)
pt3dadd(-7.167, 302.393, -24, 1.808)
pt3dadd(-7.266, 302.461, -24, 1.808)
pt3dadd(-7.37, 302.52, -24, 1.808)
pt3dadd(-7.483, 302.56, -24, 1.808)
pt3dadd(-7.597, 302.599, -24, 1.808)
pt3dadd(-7.712, 302.632, -24, 1.824)
pt3dadd(-7.818, 302.68, -24.008, 1.834)
pt3dadd(-7.906, 302.756, -24.031, 1.834)
pt3dadd(-7.995, 302.833, -24.054, 1.834)
pt3dadd(-8.083, 302.909, -24.077, 1.834)
pt3dadd(-8.172, 302.986, -24.1, 1.834)
pt3dadd(-8.273, 303.049, -24.105, 1.822)
pt3dadd(-8.375, 303.113, -24.111, 1.81)
pt3dadd(-8.392, 303.22, -24.142, 1.778)
pt3dadd(-8.398, 303.331, -24.176, 1.746)
pt3dadd(-8.44, 303.437, -24.192, 1.726)
pt3dadd(-8.503, 303.539, -24.198, 1.714)
pt3dadd(-8.597, 303.592, -24.2, 1.712)
pt3dadd(-8.716, 303.601, -24.2, 1.722)
pt3dadd(-8.836, 303.611, -24.2, 1.73)
pt3dadd(-8.897, 303.694, -24.22, 1.744)
pt3dadd(-8.937, 303.802, -24.247, 1.758)
pt3dadd(-8.977, 303.911, -24.273, 1.774)
pt3dadd(-9.015, 304.021, -24.293, 1.778)
pt3dadd(-9.051, 304.135, -24.303, 1.766)
pt3dadd(-9.093, 304.244, -24.318, 1.716)
pt3dadd(-9.166, 304.328, -24.356, 1.596)
pt3dadd(-9.243, 304.408, -24.393, 1.536)
pt3dadd(-9.32, 304.488, -24.431, 1.476)
pt3dadd(-9.398, 304.568, -24.468, 1.414)
pt3dadd(-9.468, 304.656, -24.499, 1.322)
pt3dadd(-9.531, 304.754, -24.523, 1.19)
pt3dadd(-9.612, 304.831, -24.553, 1.078)
pt3dadd(-9.707, 304.89, -24.59, 0.982)
pt3dadd(-9.811, 304.931, -24.624, 0.964)
pt3dadd(-9.919, 304.964, -24.658, 0.976)
pt3dadd(-9.951, 305.06, -24.676, 1.03)
pt3dadd(-9.956, 305.18, -24.689, 1.098)
pt3dadd(-9.971, 305.296, -24.7, 1.166)
pt3dadd(-10.042, 305.392, -24.7, 1.228)
pt3dadd(-10.113, 305.489, -24.7, 1.292)
}
dend_5 {pt3dclear()
pt3dadd(-10.113, 305.489, -24.7, 1.292)
pt3dadd(-10.183, 305.586, -24.7, 1.354)
pt3dadd(-10.281, 305.642, -24.7, 1.422)
pt3dadd(-10.398, 305.669, -24.7, 1.492)
pt3dadd(-10.51, 305.7, -24.7, 1.558)
pt3dadd(-10.553, 305.813, -24.7, 1.582)
pt3dadd(-10.596, 305.924, -24.7, 1.608)
pt3dadd(-10.639, 306.036, -24.7, 1.632)
pt3dadd(-10.699, 306.14, -24.7, 1.654)
pt3dadd(-10.76, 306.244, -24.7, 1.678)
pt3dadd(-10.848, 306.323, -24.697, 1.682)
pt3dadd(-10.944, 306.395, -24.693, 1.682)
pt3dadd(-11.04, 306.467, -24.689, 1.682)
}
dend_5[1] {pt3dclear()
pt3dadd(-11.04, 306.467, -24.689, 1.682)
pt3dadd(-11.052, 306.468, -24.673, 1.676)
pt3dadd(-11.115, 306.474, -24.589, 1.64)
pt3dadd(-11.18, 306.48, -24.505, 1.6)
pt3dadd(-11.265, 306.48, -24.434, 1.53)
pt3dadd(-11.35, 306.48, -24.364, 1.46)
pt3dadd(-11.444, 306.48, -24.31, 1.384)
pt3dadd(-11.564, 306.48, -24.306, 1.298)
pt3dadd(-11.684, 306.48, -24.302, 1.21)
pt3dadd(-11.803, 306.475, -24.3, 1.064)
pt3dadd(-11.921, 306.451, -24.3, 0.856)
pt3dadd(-12.021, 306.39, -24.3, 0.78)
pt3dadd(-12.115, 306.316, -24.3, 0.804)
pt3dadd(-12.22, 306.263, -24.3, 0.788)
pt3dadd(-12.338, 306.242, -24.3, 0.778)
pt3dadd(-12.457, 306.24, -24.31, 0.824)
pt3dadd(-12.571, 306.24, -24.34, 0.916)
pt3dadd(-12.657, 306.24, -24.409, 1.022)
pt3dadd(-12.703, 306.24, -24.499, 1.098)
pt3dadd(-12.72, 306.24, -24.598, 1.13)
pt3dadd(-12.72, 306.24, -24.698, 1.13)
pt3dadd(-12.72, 306.24, -24.798, 1.106)
pt3dadd(-12.754, 306.234, -24.894, 1.104)
pt3dadd(-12.789, 306.229, -24.99, 1.104)
pt3dadd(-12.814, 306.176, -25.072, 1.122)
pt3dadd(-12.835, 306.101, -25.147, 1.148)
}
}
proc shape3d_81() {
dend_5[1] { pt3dadd(-12.855, 306.005, -25.204, 1.22)
pt3dadd(-12.875, 305.904, -25.255, 1.31)
pt3dadd(-12.949, 305.821, -25.28, 1.41)
pt3dadd(-13.039, 305.746, -25.297, 1.516)
pt3dadd(-13.128, 305.696, -25.253, 1.588)
pt3dadd(-13.218, 305.652, -25.197, 1.656)
pt3dadd(-13.307, 305.608, -25.142, 1.722)
pt3dadd(-13.396, 305.562, -25.086, 1.792)
pt3dadd(-13.486, 305.518, -25.033, 1.86)
pt3dadd(-13.598, 305.476, -25.021, 1.896)
pt3dadd(-13.709, 305.434, -25.009, 1.93)
pt3dadd(-13.821, 305.392, -25, 1.964)
pt3dadd(-13.931, 305.345, -25, 1.998)
pt3dadd(-14.042, 305.298, -25, 2.03)
pt3dadd(-14.16, 305.28, -25, 2.11)
pt3dadd(-14.28, 305.28, -25, 2.116)
pt3dadd(-14.4, 305.28, -25, 2.124)
pt3dadd(-14.52, 305.28, -25, 2.13)
pt3dadd(-14.64, 305.28, -25, 2.138)
pt3dadd(-14.76, 305.28, -25, 2.146)
pt3dadd(-14.88, 305.28, -25, 2.152)
pt3dadd(-15, 305.28, -25, 2.16)
}
dend_5[2] {pt3dclear()
pt3dadd(-15, 305.28, -25, 2.16)
pt3dadd(-15.042, 305.28, -25, 2.16)
pt3dadd(-15.162, 305.28, -25, 2.15)
pt3dadd(-15.282, 305.28, -25, 2.134)
pt3dadd(-15.402, 305.275, -25, 2.154)
pt3dadd(-15.518, 305.25, -24.993, 2.232)
pt3dadd(-15.59, 305.174, -24.957, 2.31)
pt3dadd(-15.6, 305.095, -24.883, 2.258)
pt3dadd(-15.6, 305.054, -24.791, 2.138)
pt3dadd(-15.601, 305.04, -24.692, 2.026)
pt3dadd(-15.623, 305.04, -24.594, 1.94)
pt3dadd(-15.694, 305.04, -24.517, 1.852)
pt3dadd(-15.788, 305.04, -24.455, 1.758)
pt3dadd(-15.864, 305.012, -24.381, 1.722)
pt3dadd(-15.941, 304.985, -24.307, 1.688)
pt3dadd(-16.017, 304.957, -24.233, 1.654)
pt3dadd(-16.093, 304.93, -24.159, 1.62)
pt3dadd(-16.18, 304.92, -24.093, 1.578)
pt3dadd(-16.274, 304.92, -24.03, 1.532)
pt3dadd(-16.368, 304.92, -23.968, 1.486)
pt3dadd(-16.461, 304.92, -23.905, 1.442)
pt3dadd(-16.555, 304.92, -23.843, 1.396)
pt3dadd(-16.659, 304.92, -23.794, 1.358)
pt3dadd(-16.768, 304.92, -23.752, 1.326)
pt3dadd(-16.877, 304.92, -23.71, 1.292)
pt3dadd(-16.985, 304.92, -23.668, 1.258)
pt3dadd(-17.094, 304.92, -23.625, 1.226)
pt3dadd(-17.204, 304.92, -23.585, 1.206)
pt3dadd(-17.316, 304.92, -23.548, 1.206)
pt3dadd(-17.427, 304.92, -23.511, 1.206)
pt3dadd(-17.538, 304.92, -23.474, 1.206)
pt3dadd(-17.65, 304.92, -23.437, 1.206)
pt3dadd(-17.761, 304.92, -23.4, 1.206)
pt3dadd(-17.879, 304.92, -23.379, 1.218)
pt3dadd(-17.996, 304.92, -23.358, 1.232)
pt3dadd(-18.114, 304.92, -23.338, 1.244)
pt3dadd(-18.231, 304.92, -23.317, 1.256)
pt3dadd(-18.348, 304.92, -23.296, 1.27)
pt3dadd(-18.465, 304.92, -23.273, 1.282)
pt3dadd(-18.57, 304.92, -23.226, 1.292)
pt3dadd(-18.676, 304.92, -23.178, 1.302)
pt3dadd(-18.782, 304.92, -23.131, 1.31)
pt3dadd(-18.887, 304.92, -23.084, 1.32)
pt3dadd(-18.993, 304.92, -23.036, 1.33)
pt3dadd(-19.109, 304.927, -23.013, 1.318)
pt3dadd(-19.226, 304.933, -22.991, 1.304)
pt3dadd(-19.343, 304.94, -22.969, 1.292)
pt3dadd(-19.46, 304.948, -22.947, 1.278)
pt3dadd(-19.577, 304.955, -22.926, 1.264)
pt3dadd(-19.695, 304.964, -22.91, 1.25)
pt3dadd(-19.814, 304.976, -22.909, 1.234)
pt3dadd(-19.933, 304.99, -22.907, 1.218)
pt3dadd(-20.052, 305.003, -22.905, 1.202)
pt3dadd(-20.172, 305.016, -22.903, 1.186)
pt3dadd(-20.291, 305.028, -22.902, 1.17)
pt3dadd(-20.41, 305.042, -22.9, 1.154)
pt3dadd(-20.527, 305.07, -22.9, 1.136)
pt3dadd(-20.644, 305.098, -22.9, 1.12)
pt3dadd(-20.76, 305.124, -22.9, 1.102)
pt3dadd(-20.877, 305.152, -22.9, 1.084)
pt3dadd(-20.994, 305.179, -22.9, 1.068)
pt3dadd(-21.11, 305.209, -22.9, 1.052)
pt3dadd(-21.225, 305.245, -22.9, 1.044)
pt3dadd(-21.339, 305.281, -22.9, 1.034)
pt3dadd(-21.454, 305.317, -22.9, 1.026)
pt3dadd(-21.568, 305.352, -22.9, 1.016)
pt3dadd(-21.683, 305.388, -22.9, 1.008)
pt3dadd(-21.786, 305.448, -22.902, 1.004)
pt3dadd(-21.883, 305.518, -22.904, 1.004)
pt3dadd(-21.98, 305.588, -22.906, 1.004)
pt3dadd(-22.077, 305.658, -22.908, 1.004)
pt3dadd(-22.175, 305.729, -22.91, 1.004)
pt3dadd(-22.279, 305.766, -22.94, 1.014)
pt3dadd(-22.387, 305.792, -22.979, 1.026)
pt3dadd(-22.475, 305.843, -22.948, 1.03)
pt3dadd(-22.55, 305.9, -22.889, 1.026)
pt3dadd(-22.577, 305.956, -22.803, 1)
pt3dadd(-22.609, 306.016, -22.723, 0.982)
pt3dadd(-22.663, 306.098, -22.666, 0.996)
pt3dadd(-22.73, 306.179, -22.622, 1.022)
pt3dadd(-22.807, 306.254, -22.586, 1.06)
pt3dadd(-22.845, 306.331, -22.515, 1.084)
pt3dadd(-22.883, 306.407, -22.444, 1.106)
pt3dadd(-22.921, 306.482, -22.373, 1.13)
pt3dadd(-22.958, 306.558, -22.302, 1.154)
pt3dadd(-23.005, 306.652, -22.254, 1.15)
pt3dadd(-23.053, 306.746, -22.207, 1.144)
pt3dadd(-23.1, 306.841, -22.16, 1.138)
pt3dadd(-23.148, 306.935, -22.112, 1.132)
pt3dadd(-23.229, 307.012, -22.083, 1.134)
pt3dadd(-23.323, 307.081, -22.06, 1.14)
pt3dadd(-23.417, 307.151, -22.038, 1.146)
pt3dadd(-23.511, 307.22, -22.015, 1.152)
pt3dadd(-23.605, 307.29, -21.994, 1.156)
pt3dadd(-23.701, 307.358, -21.977, 1.156)
pt3dadd(-23.784, 307.43, -21.944, 1.166)
pt3dadd(-23.845, 307.507, -21.887, 1.196)
pt3dadd(-23.871, 307.589, -21.82, 1.198)
pt3dadd(-23.877, 307.673, -21.75, 1.184)
pt3dadd(-23.906, 307.738, -21.671, 1.156)
pt3dadd(-23.949, 307.787, -21.588, 1.116)
pt3dadd(-23.982, 307.829, -21.499, 1.036)
pt3dadd(-24.024, 307.883, -21.42, 0.964)
pt3dadd(-24.083, 307.958, -21.36, 0.928)
pt3dadd(-24.142, 308.034, -21.3, 0.89)
pt3dadd(-24.201, 308.11, -21.24, 0.854)
pt3dadd(-24.264, 308.184, -21.18, 0.81)
pt3dadd(-24.333, 308.252, -21.123, 0.75)
pt3dadd(-24.392, 308.33, -21.066, 0.71)
pt3dadd(-24.445, 308.413, -21.009, 0.682)
pt3dadd(-24.524, 308.472, -21.048, 0.69)
pt3dadd(-24.606, 308.526, -21.105, 0.706)
pt3dadd(-24.675, 308.596, -21.163, 0.734)
pt3dadd(-24.753, 308.668, -21.199, 0.758)
pt3dadd(-24.845, 308.744, -21.196, 0.772)
pt3dadd(-24.937, 308.821, -21.193, 0.788)
pt3dadd(-25.029, 308.897, -21.189, 0.802)
pt3dadd(-25.078, 308.995, -21.152, 0.828)
pt3dadd(-25.121, 309.095, -21.111, 0.856)
pt3dadd(-25.203, 309.181, -21.1, 0.92)
pt3dadd(-25.281, 309.272, -21.1, 0.96)
pt3dadd(-25.359, 309.364, -21.1, 1)
pt3dadd(-25.437, 309.455, -21.1, 1.04)
pt3dadd(-25.514, 309.546, -21.1, 1.082)
pt3dadd(-25.578, 309.646, -21.1, 1.126)
pt3dadd(-25.623, 309.757, -21.1, 1.178)
pt3dadd(-25.668, 309.869, -21.1, 1.228)
pt3dadd(-25.712, 309.98, -21.1, 1.28)
pt3dadd(-25.757, 310.092, -21.1, 1.332)
pt3dadd(-25.802, 310.202, -21.1, 1.384)
pt3dadd(-25.877, 310.296, -21.1, 1.454)
pt3dadd(-25.952, 310.39, -21.1, 1.524)
pt3dadd(-26.027, 310.483, -21.1, 1.594)
pt3dadd(-26.102, 310.578, -21.1, 1.666)
pt3dadd(-26.177, 310.67, -21.1, 1.736)
pt3dadd(-26.265, 310.752, -21.1, 1.82)
pt3dadd(-26.354, 310.834, -21.1, 1.902)
pt3dadd(-26.456, 310.896, -21.1, 1.918)
pt3dadd(-26.559, 310.956, -21.1, 1.93)
pt3dadd(-26.616, 311.056, -21.1, 1.886)
pt3dadd(-26.655, 311.17, -21.1, 1.822)
pt3dadd(-26.692, 311.284, -21.1, 1.764)
pt3dadd(-26.725, 311.399, -21.1, 1.712)
pt3dadd(-26.758, 311.514, -21.1, 1.66)
pt3dadd(-26.76, 311.634, -21.1, 1.622)
pt3dadd(-26.76, 311.754, -21.1, 1.584)
pt3dadd(-26.834, 311.846, -21.1, 1.592)
pt3dadd(-26.912, 311.938, -21.1, 1.602)
pt3dadd(-26.989, 312.029, -21.1, 1.612)
pt3dadd(-27.067, 312.121, -21.1, 1.622)
pt3dadd(-27.145, 312.212, -21.1, 1.632)
pt3dadd(-27.186, 312.325, -21.1, 1.664)
pt3dadd(-27.225, 312.438, -21.1, 1.696)
pt3dadd(-27.261, 312.553, -21.1, 1.74)
pt3dadd(-27.294, 312.668, -21.1, 1.792)
pt3dadd(-27.327, 312.784, -21.1, 1.842)
pt3dadd(-27.36, 312.899, -21.1, 1.884)
pt3dadd(-27.392, 313.014, -21.1, 1.924)
pt3dadd(-27.476, 313.093, -21.1, 1.952)
pt3dadd(-27.575, 313.16, -21.1, 1.976)
pt3dadd(-27.687, 313.196, -21.1, 1.966)
pt3dadd(-27.806, 313.211, -21.1, 1.938)
pt3dadd(-27.881, 313.292, -21.081, 1.906)
pt3dadd(-27.947, 313.388, -21.059, 1.872)
pt3dadd(-28.013, 313.486, -21.036, 1.838)
pt3dadd(-28.08, 313.582, -21.014, 1.804)
pt3dadd(-28.158, 313.651, -20.979, 1.742)
pt3dadd(-28.257, 313.679, -20.927, 1.636)
pt3dadd(-28.313, 313.744, -20.876, 1.534)
pt3dadd(-28.326, 313.848, -20.827, 1.436)
pt3dadd(-28.369, 313.945, -20.8, 1.35)
pt3dadd(-28.451, 314.033, -20.8, 1.28)
pt3dadd(-28.522, 314.128, -20.8, 1.224)
pt3dadd(-28.568, 314.238, -20.8, 1.202)
pt3dadd(-28.615, 314.347, -20.8, 1.18)
pt3dadd(-28.73, 314.381, -20.8, 1.228)
pt3dadd(-28.833, 314.432, -20.791, 1.272)
pt3dadd(-28.915, 314.515, -20.768, 1.312)
}
}
proc shape3d_82() {
dend_5[2] { pt3dadd(-28.998, 314.598, -20.745, 1.352)
pt3dadd(-29.08, 314.681, -20.722, 1.392)
pt3dadd(-29.163, 314.764, -20.7, 1.432)
pt3dadd(-29.235, 314.86, -20.7, 1.462)
pt3dadd(-29.307, 314.956, -20.7, 1.492)
pt3dadd(-29.379, 315.052, -20.7, 1.522)
pt3dadd(-29.451, 315.148, -20.7, 1.554)
pt3dadd(-29.523, 315.244, -20.7, 1.582)
pt3dadd(-29.601, 315.335, -20.7, 1.588)
pt3dadd(-29.679, 315.426, -20.7, 1.592)
pt3dadd(-29.756, 315.517, -20.7, 1.598)
pt3dadd(-29.834, 315.608, -20.7, 1.602)
pt3dadd(-29.914, 315.697, -20.699, 1.606)
pt3dadd(-30.021, 315.751, -20.693, 1.596)
pt3dadd(-30.128, 315.804, -20.686, 1.586)
pt3dadd(-30.235, 315.858, -20.68, 1.576)
pt3dadd(-30.343, 315.911, -20.673, 1.566)
pt3dadd(-30.45, 315.965, -20.666, 1.556)
pt3dadd(-30.556, 316.018, -20.652, 1.552)
pt3dadd(-30.662, 316.07, -20.638, 1.546)
pt3dadd(-30.768, 316.124, -20.624, 1.54)
pt3dadd(-30.875, 316.177, -20.61, 1.536)
pt3dadd(-30.976, 316.238, -20.594, 1.538)
pt3dadd(-31.065, 316.315, -20.577, 1.554)
pt3dadd(-31.154, 316.393, -20.56, 1.57)
pt3dadd(-31.243, 316.47, -20.542, 1.588)
pt3dadd(-31.333, 316.548, -20.525, 1.604)
pt3dadd(-31.428, 316.577, -20.474, 1.65)
pt3dadd(-31.524, 316.597, -20.417, 1.702)
pt3dadd(-31.625, 316.657, -20.406, 1.762)
pt3dadd(-31.727, 316.72, -20.401, 1.822)
pt3dadd(-31.766, 316.826, -20.388, 1.86)
pt3dadd(-31.789, 316.943, -20.374, 1.892)
pt3dadd(-31.821, 317.053, -20.349, 1.916)
pt3dadd(-31.863, 317.158, -20.314, 1.928)
pt3dadd(-31.905, 317.267, -20.3, 1.926)
pt3dadd(-31.946, 317.38, -20.3, 1.914)
pt3dadd(-31.986, 317.492, -20.3, 1.9)
pt3dadd(-32.027, 317.605, -20.3, 1.888)
pt3dadd(-32.114, 317.677, -20.3, 1.852)
pt3dadd(-32.221, 317.731, -20.3, 1.808)
pt3dadd(-32.329, 317.784, -20.3, 1.738)
pt3dadd(-32.407, 317.868, -20.284, 1.696)
pt3dadd(-32.473, 317.964, -20.262, 1.678)
pt3dadd(-32.539, 318.06, -20.239, 1.662)
pt3dadd(-32.605, 318.157, -20.216, 1.644)
pt3dadd(-32.676, 318.25, -20.194, 1.634)
pt3dadd(-32.759, 318.332, -20.171, 1.64)
pt3dadd(-32.841, 318.415, -20.148, 1.646)
pt3dadd(-32.924, 318.497, -20.125, 1.65)
pt3dadd(-33.006, 318.58, -20.102, 1.656)
pt3dadd(-33.089, 318.662, -20.079, 1.662)
pt3dadd(-33.172, 318.745, -20.056, 1.668)
pt3dadd(-33.254, 318.828, -20.033, 1.674)
pt3dadd(-33.337, 318.911, -20.01, 1.68)
pt3dadd(-33.421, 318.991, -19.987, 1.692)
pt3dadd(-33.507, 319.07, -19.964, 1.71)
pt3dadd(-33.592, 319.151, -19.941, 1.726)
pt3dadd(-33.678, 319.23, -19.918, 1.744)
pt3dadd(-33.757, 319.314, -19.896, 1.756)
pt3dadd(-33.813, 319.417, -19.874, 1.744)
pt3dadd(-33.869, 319.519, -19.852, 1.734)
pt3dadd(-33.925, 319.622, -19.83, 1.722)
pt3dadd(-33.981, 319.726, -19.807, 1.712)
pt3dadd(-34.051, 319.82, -19.8, 1.69)
pt3dadd(-34.129, 319.912, -19.8, 1.666)
pt3dadd(-34.207, 320.003, -19.8, 1.64)
pt3dadd(-34.285, 320.094, -19.8, 1.614)
pt3dadd(-34.363, 320.185, -19.8, 1.59)
pt3dadd(-34.427, 320.286, -19.8, 1.548)
pt3dadd(-34.483, 320.392, -19.8, 1.5)
pt3dadd(-34.54, 320.498, -19.8, 1.452)
pt3dadd(-34.596, 320.604, -19.8, 1.402)
pt3dadd(-34.653, 320.71, -19.8, 1.354)
pt3dadd(-34.682, 320.822, -19.8, 1.3)
pt3dadd(-34.687, 320.942, -19.8, 1.238)
pt3dadd(-34.692, 321.062, -19.8, 1.178)
pt3dadd(-34.718, 321.179, -19.8, 1.128)
pt3dadd(-34.758, 321.292, -19.8, 1.086)
pt3dadd(-34.794, 321.406, -19.8, 1.058)
pt3dadd(-34.82, 321.523, -19.8, 1.068)
pt3dadd(-34.847, 321.64, -19.8, 1.078)
pt3dadd(-34.929, 321.719, -19.8, 1.072)
pt3dadd(-35.028, 321.787, -19.8, 1.06)
pt3dadd(-35.118, 321.865, -19.8, 1.034)
pt3dadd(-35.198, 321.954, -19.8, 1)
pt3dadd(-35.254, 322.06, -19.8, 0.976)
pt3dadd(-35.311, 322.165, -19.8, 0.952)
pt3dadd(-35.368, 322.271, -19.8, 0.926)
pt3dadd(-35.425, 322.376, -19.8, 0.902)
pt3dadd(-35.482, 322.482, -19.8, 0.878)
pt3dadd(-35.545, 322.585, -19.8, 0.868)
pt3dadd(-35.608, 322.687, -19.8, 0.86)
pt3dadd(-35.67, 322.789, -19.8, 0.85)
pt3dadd(-35.733, 322.891, -19.8, 0.84)
pt3dadd(-35.796, 322.994, -19.8, 0.83)
pt3dadd(-35.841, 323.105, -19.8, 0.834)
pt3dadd(-35.886, 323.216, -19.8, 0.838)
pt3dadd(-35.931, 323.328, -19.8, 0.842)
pt3dadd(-35.975, 323.44, -19.8, 0.848)
pt3dadd(-36.02, 323.55, -19.8, 0.852)
pt3dadd(-36.087, 323.646, -19.8, 0.874)
pt3dadd(-36.174, 323.73, -19.8, 0.908)
pt3dadd(-36.26, 323.813, -19.8, 0.944)
pt3dadd(-36.346, 323.897, -19.8, 0.98)
pt3dadd(-36.432, 323.98, -19.8, 1.016)
pt3dadd(-36.514, 324.068, -19.8, 1.05)
pt3dadd(-36.591, 324.16, -19.8, 1.086)
pt3dadd(-36.669, 324.251, -19.8, 1.122)
pt3dadd(-36.747, 324.342, -19.8, 1.158)
pt3dadd(-36.825, 324.433, -19.8, 1.192)
pt3dadd(-36.922, 324.499, -19.8, 1.218)
pt3dadd(-37.031, 324.55, -19.8, 1.236)
pt3dadd(-37.14, 324.6, -19.8, 1.256)
pt3dadd(-37.249, 324.65, -19.8, 1.274)
pt3dadd(-37.358, 324.701, -19.8, 1.294)
pt3dadd(-37.453, 324.768, -19.8, 1.3)
pt3dadd(-37.525, 324.864, -19.8, 1.286)
pt3dadd(-37.597, 324.96, -19.8, 1.27)
pt3dadd(-37.669, 325.056, -19.8, 1.254)
pt3dadd(-37.741, 325.152, -19.8, 1.24)
pt3dadd(-37.801, 325.255, -19.8, 1.222)
pt3dadd(-37.84, 325.368, -19.8, 1.2)
pt3dadd(-37.878, 325.482, -19.8, 1.176)
pt3dadd(-37.917, 325.596, -19.8, 1.154)
pt3dadd(-37.956, 325.709, -19.8, 1.132)
pt3dadd(-37.995, 325.823, -19.8, 1.108)
pt3dadd(-38.033, 325.937, -19.8, 1.086)
pt3dadd(-38.072, 326.05, -19.8, 1.062)
pt3dadd(-38.11, 326.164, -19.8, 1.04)
pt3dadd(-38.148, 326.278, -19.8, 1.018)
pt3dadd(-38.187, 326.39, -19.8, 0.994)
pt3dadd(-38.234, 326.501, -19.8, 0.98)
pt3dadd(-38.297, 326.603, -19.8, 0.98)
pt3dadd(-38.359, 326.705, -19.8, 0.98)
pt3dadd(-38.422, 326.807, -19.8, 0.98)
pt3dadd(-38.485, 326.909, -19.8, 0.98)
pt3dadd(-38.555, 327.006, -19.8, 0.982)
pt3dadd(-38.644, 327.086, -19.8, 0.992)
pt3dadd(-38.733, 327.168, -19.8, 1.002)
pt3dadd(-38.821, 327.248, -19.8, 1.012)
pt3dadd(-38.91, 327.329, -19.8, 1.022)
pt3dadd(-38.997, 327.412, -19.8, 1.034)
pt3dadd(-39.077, 327.5, -19.8, 1.05)
pt3dadd(-39.158, 327.589, -19.8, 1.064)
pt3dadd(-39.239, 327.678, -19.8, 1.08)
pt3dadd(-39.319, 327.767, -19.8, 1.094)
pt3dadd(-39.39, 327.863, -19.8, 1.102)
pt3dadd(-39.441, 327.972, -19.8, 1.092)
pt3dadd(-39.491, 328.08, -19.8, 1.082)
pt3dadd(-39.542, 328.189, -19.8, 1.074)
pt3dadd(-39.592, 328.298, -19.8, 1.064)
pt3dadd(-39.645, 328.405, -19.8, 1.054)
pt3dadd(-39.729, 328.49, -19.792, 1.038)
pt3dadd(-39.814, 328.574, -19.785, 1.022)
pt3dadd(-39.899, 328.66, -19.778, 1.006)
pt3dadd(-39.984, 328.744, -19.771, 0.99)
pt3dadd(-40.059, 328.835, -19.762, 0.978)
pt3dadd(-40.116, 328.939, -19.748, 0.972)
pt3dadd(-40.172, 329.044, -19.734, 0.966)
pt3dadd(-40.229, 329.148, -19.72, 0.962)
pt3dadd(-40.285, 329.252, -19.705, 0.956)
pt3dadd(-40.351, 329.352, -19.7, 0.97)
pt3dadd(-40.423, 329.448, -19.7, 0.994)
pt3dadd(-40.495, 329.544, -19.7, 1.02)
pt3dadd(-40.567, 329.64, -19.7, 1.046)
pt3dadd(-40.639, 329.736, -19.7, 1.07)
pt3dadd(-40.707, 329.834, -19.7, 1.098)
pt3dadd(-40.773, 329.935, -19.7, 1.128)
pt3dadd(-40.839, 330.035, -19.7, 1.158)
pt3dadd(-40.905, 330.136, -19.7, 1.188)
pt3dadd(-40.971, 330.235, -19.7, 1.218)
pt3dadd(-41.036, 330.337, -19.7, 1.246)
pt3dadd(-41.098, 330.439, -19.7, 1.276)
pt3dadd(-41.161, 330.541, -19.7, 1.306)
pt3dadd(-41.224, 330.644, -19.7, 1.336)
pt3dadd(-41.286, 330.746, -19.7, 1.366)
pt3dadd(-41.369, 330.828, -19.7, 1.388)
pt3dadd(-41.473, 330.888, -19.7, 1.402)
pt3dadd(-41.577, 330.948, -19.7, 1.418)
pt3dadd(-41.681, 331.008, -19.7, 1.432)
pt3dadd(-41.785, 331.067, -19.7, 1.446)
pt3dadd(-41.891, 331.123, -19.699, 1.458)
pt3dadd(-42.001, 331.171, -19.697, 1.462)
pt3dadd(-42.111, 331.22, -19.695, 1.468)
pt3dadd(-42.22, 331.268, -19.693, 1.472)
pt3dadd(-42.33, 331.316, -19.691, 1.478)
pt3dadd(-42.438, 331.368, -19.687, 1.478)
pt3dadd(-42.531, 331.44, -19.667, 1.45)
pt3dadd(-42.624, 331.512, -19.647, 1.422)
pt3dadd(-42.717, 331.584, -19.627, 1.394)
pt3dadd(-42.809, 331.656, -19.607, 1.366)
pt3dadd(-42.876, 331.752, -19.6, 1.31)
pt3dadd(-42.93, 331.859, -19.6, 1.244)
pt3dadd(-42.983, 331.967, -19.6, 1.186)
pt3dadd(-43.037, 332.074, -19.6, 1.14)
pt3dadd(-43.099, 332.174, -19.6, 1.112)
pt3dadd(-43.193, 332.25, -19.6, 1.148)
pt3dadd(-43.287, 332.323, -19.6, 1.186)
pt3dadd(-43.395, 332.377, -19.6, 1.276)
}
}
proc shape3d_83() {
dend_5[2] { pt3dadd(-43.502, 332.43, -19.6, 1.366)
pt3dadd(-43.598, 332.502, -19.6, 1.512)
pt3dadd(-43.688, 332.58, -19.6, 1.622)
pt3dadd(-43.775, 332.664, -19.6, 1.658)
pt3dadd(-43.861, 332.748, -19.6, 1.692)
pt3dadd(-43.947, 332.831, -19.6, 1.728)
pt3dadd(-44.033, 332.915, -19.6, 1.764)
pt3dadd(-44.132, 332.975, -19.6, 1.792)
pt3dadd(-44.248, 333.007, -19.6, 1.812)
pt3dadd(-44.363, 333.041, -19.6, 1.834)
pt3dadd(-44.456, 333.116, -19.6, 1.834)
pt3dadd(-44.549, 333.192, -19.6, 1.834)
pt3dadd(-44.638, 333.272, -19.6, 1.822)
pt3dadd(-44.726, 333.354, -19.6, 1.81)
pt3dadd(-44.754, 333.464, -19.6, 1.808)
pt3dadd(-44.763, 333.584, -19.6, 1.808)
pt3dadd(-44.773, 333.704, -19.6, 1.808)
pt3dadd(-44.856, 333.79, -19.6, 1.79)
pt3dadd(-44.921, 333.887, -19.588, 1.776)
pt3dadd(-44.97, 333.994, -19.566, 1.766)
pt3dadd(-45.019, 334.099, -19.545, 1.756)
pt3dadd(-45.068, 334.206, -19.523, 1.744)
pt3dadd(-45.117, 334.313, -19.501, 1.734)
pt3dadd(-45.12, 334.432, -19.5, 1.71)
pt3dadd(-45.12, 334.552, -19.5, 1.684)
pt3dadd(-45.12, 334.672, -19.5, 1.66)
pt3dadd(-45.124, 334.792, -19.5, 1.65)
pt3dadd(-45.129, 334.912, -19.5, 1.64)
pt3dadd(-45.136, 335.03, -19.5, 1.632)
pt3dadd(-45.196, 335.135, -19.5, 1.644)
pt3dadd(-45.257, 335.238, -19.5, 1.656)
pt3dadd(-45.341, 335.322, -19.5, 1.688)
pt3dadd(-45.429, 335.404, -19.5, 1.724)
pt3dadd(-45.531, 335.466, -19.5, 1.732)
pt3dadd(-45.641, 335.508, -19.5, 1.726)
pt3dadd(-45.761, 335.513, -19.5, 1.7)
pt3dadd(-45.881, 335.516, -19.5, 1.674)
pt3dadd(-46.001, 335.527, -19.5, 1.638)
pt3dadd(-46.119, 335.548, -19.5, 1.58)
pt3dadd(-46.237, 335.568, -19.5, 1.522)
pt3dadd(-46.328, 335.639, -19.5, 1.472)
pt3dadd(-46.409, 335.726, -19.5, 1.424)
pt3dadd(-46.478, 335.825, -19.5, 1.398)
pt3dadd(-46.539, 335.928, -19.5, 1.388)
pt3dadd(-46.61, 336.023, -19.5, 1.388)
pt3dadd(-46.695, 336.108, -19.5, 1.406)
pt3dadd(-46.788, 336.182, -19.5, 1.406)
pt3dadd(-46.882, 336.258, -19.5, 1.406)
pt3dadd(-46.976, 336.332, -19.5, 1.406)
pt3dadd(-47.07, 336.408, -19.5, 1.406)
pt3dadd(-47.162, 336.484, -19.5, 1.404)
pt3dadd(-47.223, 336.587, -19.5, 1.358)
pt3dadd(-47.284, 336.691, -19.5, 1.314)
pt3dadd(-47.394, 336.715, -19.5, 1.26)
pt3dadd(-47.514, 336.725, -19.5, 1.206)
pt3dadd(-47.631, 336.738, -19.499, 1.152)
pt3dadd(-47.707, 336.829, -19.482, 1.086)
pt3dadd(-47.786, 336.914, -19.462, 1.03)
pt3dadd(-47.881, 336.973, -19.425, 1.03)
pt3dadd(-47.957, 337.049, -19.4, 1.044)
pt3dadd(-47.99, 337.164, -19.4, 1.09)
pt3dadd(-48.037, 337.274, -19.4, 1.114)
pt3dadd(-48.09, 337.381, -19.4, 1.13)
pt3dadd(-48.144, 337.489, -19.4, 1.144)
pt3dadd(-48.198, 337.596, -19.4, 1.158)
pt3dadd(-48.251, 337.703, -19.4, 1.172)
pt3dadd(-48.321, 337.799, -19.397, 1.18)
pt3dadd(-48.408, 337.88, -19.39, 1.18)
pt3dadd(-48.496, 337.962, -19.383, 1.18)
pt3dadd(-48.583, 338.044, -19.376, 1.18)
pt3dadd(-48.671, 338.125, -19.368, 1.18)
pt3dadd(-48.764, 338.19, -19.34, 1.17)
pt3dadd(-48.859, 338.249, -19.303, 1.156)
pt3dadd(-48.957, 338.316, -19.3, 1.166)
pt3dadd(-49.056, 338.383, -19.3, 1.178)
pt3dadd(-49.162, 338.441, -19.3, 1.222)
pt3dadd(-49.269, 338.495, -19.3, 1.28)
pt3dadd(-49.348, 338.576, -19.3, 1.352)
pt3dadd(-49.402, 338.683, -19.3, 1.442)
pt3dadd(-49.44, 338.795, -19.3, 1.528)
pt3dadd(-49.44, 338.915, -19.3, 1.604)
pt3dadd(-49.45, 339.034, -19.3, 1.66)
pt3dadd(-49.483, 339.149, -19.3, 1.67)
pt3dadd(-49.516, 339.264, -19.3, 1.68)
pt3dadd(-49.538, 339.382, -19.3, 1.658)
pt3dadd(-49.558, 339.5, -19.3, 1.628)
pt3dadd(-49.597, 339.608, -19.3, 1.592)
pt3dadd(-49.685, 339.69, -19.3, 1.532)
pt3dadd(-49.777, 339.764, -19.3, 1.474)
pt3dadd(-49.892, 339.798, -19.3, 1.422)
pt3dadd(-50.008, 339.83, -19.3, 1.37)
pt3dadd(-50.125, 339.857, -19.3, 1.302)
pt3dadd(-50.242, 339.881, -19.3, 1.23)
pt3dadd(-50.331, 339.962, -19.3, 1.21)
pt3dadd(-50.419, 340.043, -19.3, 1.19)
pt3dadd(-50.508, 340.123, -19.3, 1.17)
pt3dadd(-50.596, 340.205, -19.3, 1.148)
pt3dadd(-50.683, 340.286, -19.3, 1.13)
pt3dadd(-50.746, 340.388, -19.3, 1.12)
pt3dadd(-50.809, 340.49, -19.3, 1.11)
pt3dadd(-50.872, 340.594, -19.3, 1.1)
pt3dadd(-50.935, 340.696, -19.3, 1.09)
pt3dadd(-50.998, 340.798, -19.3, 1.08)
pt3dadd(-51.091, 340.873, -19.3, 1.066)
pt3dadd(-51.185, 340.948, -19.3, 1.05)
pt3dadd(-51.279, 341.023, -19.3, 1.034)
pt3dadd(-51.372, 341.098, -19.3, 1.02)
pt3dadd(-51.466, 341.173, -19.3, 1.004)
pt3dadd(-51.544, 341.264, -19.3, 1)
pt3dadd(-51.622, 341.356, -19.3, 0.994)
pt3dadd(-51.7, 341.447, -19.3, 0.99)
pt3dadd(-51.778, 341.538, -19.3, 0.984)
pt3dadd(-51.855, 341.629, -19.3, 0.98)
pt3dadd(-51.933, 341.72, -19.3, 0.974)
pt3dadd(-52.011, 341.812, -19.3, 0.97)
pt3dadd(-52.089, 341.904, -19.3, 0.964)
pt3dadd(-52.167, 341.995, -19.3, 0.958)
pt3dadd(-52.246, 342.084, -19.3, 0.954)
pt3dadd(-52.346, 342.15, -19.3, 0.948)
pt3dadd(-52.447, 342.216, -19.3, 0.944)
pt3dadd(-52.547, 342.282, -19.3, 0.94)
pt3dadd(-52.647, 342.348, -19.3, 0.934)
pt3dadd(-52.748, 342.414, -19.3, 0.93)
pt3dadd(-52.814, 342.51, -19.277, 0.958)
pt3dadd(-52.88, 342.606, -19.255, 0.986)
pt3dadd(-52.946, 342.703, -19.232, 1.014)
pt3dadd(-53.012, 342.799, -19.21, 1.042)
pt3dadd(-53.066, 342.905, -19.2, 1.076)
pt3dadd(-53.11, 343.015, -19.2, 1.114)
pt3dadd(-53.155, 343.127, -19.2, 1.15)
pt3dadd(-53.199, 343.238, -19.2, 1.188)
pt3dadd(-53.244, 343.35, -19.2, 1.226)
pt3dadd(-53.287, 343.462, -19.2, 1.264)
pt3dadd(-53.326, 343.576, -19.2, 1.31)
pt3dadd(-53.365, 343.688, -19.2, 1.356)
pt3dadd(-53.404, 343.802, -19.2, 1.4)
pt3dadd(-53.442, 343.916, -19.2, 1.446)
pt3dadd(-53.481, 344.029, -19.2, 1.492)
pt3dadd(-53.546, 344.128, -19.2, 1.52)
pt3dadd(-53.624, 344.22, -19.2, 1.54)
pt3dadd(-53.702, 344.311, -19.2, 1.56)
pt3dadd(-53.78, 344.402, -19.2, 1.582)
pt3dadd(-53.857, 344.494, -19.2, 1.602)
pt3dadd(-53.943, 344.573, -19.182, 1.608)
pt3dadd(-54.033, 344.647, -19.156, 1.608)
pt3dadd(-54.122, 344.72, -19.13, 1.608)
pt3dadd(-54.211, 344.795, -19.105, 1.608)
pt3dadd(-54.306, 344.862, -19.082, 1.596)
pt3dadd(-54.41, 344.916, -19.062, 1.57)
pt3dadd(-54.515, 344.971, -19.043, 1.542)
pt3dadd(-54.619, 345.026, -19.024, 1.516)
pt3dadd(-54.723, 345.082, -19.004, 1.488)
pt3dadd(-54.813, 345.158, -19, 1.478)
pt3dadd(-54.9, 345.241, -19, 1.472)
pt3dadd(-54.986, 345.325, -19, 1.468)
pt3dadd(-55.072, 345.408, -19, 1.462)
pt3dadd(-55.158, 345.492, -19, 1.458)
pt3dadd(-55.21, 345.598, -19, 1.46)
pt3dadd(-55.255, 345.709, -19, 1.464)
pt3dadd(-55.299, 345.821, -19, 1.47)
pt3dadd(-55.344, 345.932, -19, 1.474)
pt3dadd(-55.389, 346.044, -19, 1.478)
pt3dadd(-55.45, 346.145, -19, 1.49)
pt3dadd(-55.533, 346.23, -19, 1.51)
pt3dadd(-55.617, 346.316, -19, 1.532)
pt3dadd(-55.7, 346.403, -19, 1.552)
pt3dadd(-55.784, 346.489, -19, 1.572)
pt3dadd(-55.869, 346.573, -19, 1.588)
pt3dadd(-55.958, 346.655, -19, 1.6)
pt3dadd(-56.055, 346.721, -19, 1.608)
pt3dadd(-56.168, 346.76, -19, 1.608)
pt3dadd(-56.281, 346.8, -19, 1.606)
pt3dadd(-56.394, 346.841, -19, 1.596)
pt3dadd(-56.508, 346.88, -19, 1.586)
pt3dadd(-56.573, 346.968, -19, 1.568)
pt3dadd(-56.612, 347.081, -19, 1.546)
pt3dadd(-56.642, 347.196, -19, 1.524)
pt3dadd(-56.649, 347.316, -19, 1.498)
pt3dadd(-56.692, 347.418, -19, 1.478)
pt3dadd(-56.786, 347.492, -19, 1.468)
pt3dadd(-56.879, 347.568, -19, 1.458)
pt3dadd(-56.973, 347.642, -19, 1.448)
pt3dadd(-57.067, 347.718, -19, 1.436)
pt3dadd(-57.168, 347.779, -19, 1.438)
pt3dadd(-57.279, 347.824, -19, 1.452)
pt3dadd(-57.391, 347.868, -19, 1.466)
pt3dadd(-57.502, 347.912, -19, 1.48)
pt3dadd(-57.614, 347.958, -19, 1.494)
pt3dadd(-57.726, 348, -19, 1.508)
pt3dadd(-57.846, 348, -19, 1.532)
pt3dadd(-57.966, 348, -19, 1.558)
pt3dadd(-58.085, 348.001, -19, 1.582)
pt3dadd(-58.201, 348.035, -19, 1.604)
pt3dadd(-58.316, 348.068, -19, 1.624)
pt3dadd(-58.414, 348.131, -19, 1.618)
pt3dadd(-58.503, 348.212, -19, 1.594)
pt3dadd(-58.551, 348.313, -19, 1.572)
pt3dadd(-58.561, 348.432, -19, 1.556)
pt3dadd(-58.57, 348.552, -19, 1.538)
pt3dadd(-58.627, 348.647, -18.976, 1.538)
}
}
proc shape3d_84() {
dend_5[2] { pt3dadd(-58.702, 348.731, -18.943, 1.546)
pt3dadd(-58.778, 348.815, -18.91, 1.554)
pt3dadd(-58.849, 348.894, -18.864, 1.588)
pt3dadd(-58.918, 348.971, -18.813, 1.63)
pt3dadd(-59.011, 349.04, -18.8, 1.732)
pt3dadd(-59.089, 349.133, -18.8, 1.732)
pt3dadd(-59.167, 349.224, -18.8, 1.732)
pt3dadd(-59.245, 349.315, -18.8, 1.732)
pt3dadd(-59.322, 349.406, -18.8, 1.732)
pt3dadd(-59.409, 349.486, -18.792, 1.728)
pt3dadd(-59.512, 349.541, -18.77, 1.71)
pt3dadd(-59.615, 349.597, -18.748, 1.694)
pt3dadd(-59.718, 349.652, -18.726, 1.678)
pt3dadd(-59.82, 349.709, -18.704, 1.66)
pt3dadd(-59.909, 349.786, -18.684, 1.626)
pt3dadd(-59.993, 349.867, -18.664, 1.586)
pt3dadd(-60.078, 349.949, -18.643, 1.546)
pt3dadd(-60.162, 350.03, -18.623, 1.506)
pt3dadd(-60.24, 350.114, -18.595, 1.47)
pt3dadd(-60.308, 350.201, -18.555, 1.44)
pt3dadd(-60.375, 350.287, -18.515, 1.41)
pt3dadd(-60.442, 350.374, -18.475, 1.378)
pt3dadd(-60.516, 350.458, -18.439, 1.346)
pt3dadd(-60.609, 350.528, -18.415, 1.306)
pt3dadd(-60.684, 350.614, -18.4, 1.284)
pt3dadd(-60.73, 350.724, -18.4, 1.296)
pt3dadd(-60.78, 350.83, -18.398, 1.308)
pt3dadd(-60.888, 350.863, -18.364, 1.332)
pt3dadd(-60.996, 350.898, -18.331, 1.36)
pt3dadd(-61.104, 350.945, -18.309, 1.398)
pt3dadd(-61.21, 350.993, -18.286, 1.434)
pt3dadd(-61.308, 351.053, -18.258, 1.458)
pt3dadd(-61.407, 351.112, -18.229, 1.482)
pt3dadd(-61.505, 351.172, -18.201, 1.506)
pt3dadd(-61.574, 351.27, -18.2, 1.518)
pt3dadd(-61.641, 351.368, -18.2, 1.53)
pt3dadd(-61.713, 351.464, -18.2, 1.532)
pt3dadd(-61.773, 351.569, -18.2, 1.526)
pt3dadd(-61.833, 351.673, -18.2, 1.522)
pt3dadd(-61.893, 351.776, -18.2, 1.516)
pt3dadd(-61.953, 351.881, -18.2, 1.512)
pt3dadd(-62.013, 351.984, -18.2, 1.506)
pt3dadd(-62.093, 352.074, -18.2, 1.516)
pt3dadd(-62.173, 352.163, -18.2, 1.526)
pt3dadd(-62.254, 352.252, -18.2, 1.538)
pt3dadd(-62.335, 352.34, -18.2, 1.546)
pt3dadd(-62.416, 352.429, -18.2, 1.558)
pt3dadd(-62.507, 352.507, -18.2, 1.572)
pt3dadd(-62.598, 352.584, -18.2, 1.588)
pt3dadd(-62.69, 352.662, -18.2, 1.602)
pt3dadd(-62.781, 352.74, -18.2, 1.618)
pt3dadd(-62.872, 352.818, -18.199, 1.634)
pt3dadd(-62.964, 352.891, -18.176, 1.656)
pt3dadd(-63.055, 352.964, -18.153, 1.68)
pt3dadd(-63.146, 353.036, -18.13, 1.702)
pt3dadd(-63.237, 353.11, -18.107, 1.726)
pt3dadd(-63.325, 353.19, -18.1, 1.75)
pt3dadd(-63.411, 353.274, -18.1, 1.776)
pt3dadd(-63.497, 353.357, -18.1, 1.8)
pt3dadd(-63.584, 353.441, -18.1, 1.826)
pt3dadd(-63.67, 353.524, -18.1, 1.852)
pt3dadd(-63.73, 353.626, -18.1, 1.876)
pt3dadd(-63.781, 353.735, -18.1, 1.9)
pt3dadd(-63.831, 353.843, -18.1, 1.924)
pt3dadd(-63.882, 353.952, -18.1, 1.946)
pt3dadd(-63.933, 354.061, -18.1, 1.97)
pt3dadd(-64.002, 354.156, -18.1, 1.994)
pt3dadd(-64.093, 354.233, -18.1, 2.014)
pt3dadd(-64.184, 354.311, -18.1, 2.034)
pt3dadd(-64.276, 354.389, -18.1, 2.054)
pt3dadd(-64.367, 354.467, -18.1, 2.074)
pt3dadd(-64.452, 354.551, -18.1, 2.08)
pt3dadd(-64.53, 354.642, -18.1, 2.07)
pt3dadd(-64.607, 354.734, -18.1, 2.06)
pt3dadd(-64.685, 354.826, -18.1, 2.048)
pt3dadd(-64.763, 354.917, -18.1, 2.038)
pt3dadd(-64.828, 355.016, -18.1, 2.004)
pt3dadd(-64.882, 355.123, -18.1, 1.948)
pt3dadd(-64.921, 355.235, -18.1, 1.89)
pt3dadd(-64.926, 355.355, -18.1, 1.83)
pt3dadd(-64.93, 355.475, -18.1, 1.77)
pt3dadd(-64.972, 355.573, -18.1, 1.7)
pt3dadd(-65.071, 355.642, -18.1, 1.618)
pt3dadd(-65.17, 355.71, -18.1, 1.538)
pt3dadd(-65.269, 355.777, -18.1, 1.456)
pt3dadd(-65.365, 355.848, -18.1, 1.37)
pt3dadd(-65.418, 355.956, -18.1, 1.236)
pt3dadd(-65.477, 356.06, -18.1, 1.166)
pt3dadd(-65.54, 356.162, -18.1, 1.142)
pt3dadd(-65.603, 356.264, -18.1, 1.116)
pt3dadd(-65.666, 356.366, -18.1, 1.092)
pt3dadd(-65.729, 356.468, -18.1, 1.068)
pt3dadd(-65.79, 356.57, -18.089, 1.054)
pt3dadd(-65.849, 356.671, -18.067, 1.054)
pt3dadd(-65.908, 356.772, -18.044, 1.054)
pt3dadd(-65.967, 356.873, -18.022, 1.054)
pt3dadd(-66.027, 356.974, -18, 1.054)
pt3dadd(-66.044, 357.092, -18, 1.088)
pt3dadd(-66.061, 357.211, -18, 1.12)
pt3dadd(-66.078, 357.33, -18, 1.152)
pt3dadd(-66.096, 357.449, -18, 1.184)
pt3dadd(-66.113, 357.568, -18, 1.218)
pt3dadd(-66.13, 357.686, -18, 1.25)
pt3dadd(-66.188, 357.79, -18, 1.3)
pt3dadd(-66.254, 357.89, -18, 1.356)
pt3dadd(-66.32, 357.99, -18, 1.41)
pt3dadd(-66.386, 358.091, -18, 1.464)
pt3dadd(-66.452, 358.19, -18, 1.52)
pt3dadd(-66.478, 358.306, -18, 1.706)
pt3dadd(-66.48, 358.426, -18, 1.798)
pt3dadd(-66.48, 358.546, -18, 1.808)
pt3dadd(-66.48, 358.666, -18, 1.808)
pt3dadd(-66.48, 358.786, -18, 1.808)
pt3dadd(-66.493, 358.904, -18, 1.808)
pt3dadd(-66.558, 358.999, -18, 1.808)
pt3dadd(-66.672, 359.034, -18, 1.794)
pt3dadd(-66.791, 359.048, -18, 1.732)
pt3dadd(-66.907, 359.076, -18, 1.578)
pt3dadd(-67.016, 359.125, -18, 1.392)
pt3dadd(-67.132, 359.158, -18, 1.362)
pt3dadd(-67.219, 359.227, -18, 1.436)
pt3dadd(-67.279, 359.332, -18, 1.494)
pt3dadd(-67.333, 359.437, -18, 1.546)
pt3dadd(-67.373, 359.551, -18, 1.588)
pt3dadd(-67.413, 359.664, -18, 1.632)
pt3dadd(-67.498, 359.747, -18, 1.602)
pt3dadd(-67.567, 359.845, -18, 1.582)
pt3dadd(-67.636, 359.942, -18, 1.562)
pt3dadd(-67.705, 360.041, -18, 1.542)
pt3dadd(-67.774, 360.139, -18, 1.522)
pt3dadd(-67.849, 360.232, -18, 1.502)
pt3dadd(-67.942, 360.308, -17.997, 1.482)
pt3dadd(-68.034, 360.384, -17.995, 1.46)
pt3dadd(-68.127, 360.461, -17.993, 1.44)
pt3dadd(-68.22, 360.538, -17.99, 1.42)
pt3dadd(-68.298, 360.622, -17.976, 1.4)
pt3dadd(-68.351, 360.72, -17.94, 1.382)
pt3dadd(-68.403, 360.818, -17.904, 1.366)
pt3dadd(-68.456, 360.918, -17.868, 1.348)
pt3dadd(-68.508, 361.016, -17.833, 1.33)
pt3dadd(-68.559, 361.126, -17.826, 1.32)
pt3dadd(-68.609, 361.234, -17.82, 1.31)
pt3dadd(-68.659, 361.343, -17.813, 1.3)
pt3dadd(-68.71, 361.451, -17.807, 1.29)
pt3dadd(-68.76, 361.56, -17.8, 1.28)
pt3dadd(-68.856, 361.632, -17.8, 1.256)
pt3dadd(-68.952, 361.704, -17.8, 1.23)
pt3dadd(-69.048, 361.776, -17.8, 1.206)
pt3dadd(-69.144, 361.848, -17.8, 1.18)
pt3dadd(-69.24, 361.92, -17.8, 1.156)
}
dend_5[3] {pt3dclear()
pt3dadd(-69.24, 361.92, -17.8, 1.156)
pt3dadd(-69.259, 361.936, -17.795, 1.148)
pt3dadd(-69.348, 362.01, -17.769, 1.12)
pt3dadd(-69.437, 362.083, -17.743, 1.092)
pt3dadd(-69.527, 362.158, -17.718, 1.062)
pt3dadd(-69.616, 362.232, -17.692, 1.034)
pt3dadd(-69.693, 362.32, -17.671, 1.004)
pt3dadd(-69.768, 362.411, -17.651, 0.976)
pt3dadd(-69.844, 362.501, -17.631, 0.948)
pt3dadd(-69.919, 362.591, -17.611, 0.92)
pt3dadd(-70.003, 362.674, -17.604, 0.894)
pt3dadd(-70.096, 362.748, -17.614, 0.872)
pt3dadd(-70.19, 362.821, -17.623, 0.852)
pt3dadd(-70.284, 362.896, -17.633, 0.83)
pt3dadd(-70.378, 362.969, -17.642, 0.808)
pt3dadd(-70.46, 363.055, -17.634, 0.774)
pt3dadd(-70.539, 363.144, -17.621, 0.734)
pt3dadd(-70.622, 363.229, -17.614, 0.7)
pt3dadd(-70.719, 363.296, -17.626, 0.69)
pt3dadd(-70.817, 363.365, -17.639, 0.678)
pt3dadd(-70.915, 363.433, -17.651, 0.668)
pt3dadd(-71.013, 363.5, -17.663, 0.656)
pt3dadd(-71.116, 363.56, -17.661, 0.656)
pt3dadd(-71.221, 363.618, -17.654, 0.662)
pt3dadd(-71.326, 363.674, -17.646, 0.668)
pt3dadd(-71.431, 363.732, -17.639, 0.674)
pt3dadd(-71.535, 363.791, -17.63, 0.684)
pt3dadd(-71.635, 363.857, -17.617, 0.706)
pt3dadd(-71.734, 363.922, -17.604, 0.728)
pt3dadd(-71.834, 363.986, -17.591, 0.748)
pt3dadd(-71.913, 364.073, -17.572, 0.762)
pt3dadd(-71.988, 364.163, -17.551, 0.774)
pt3dadd(-72.063, 364.254, -17.531, 0.786)
pt3dadd(-72.138, 364.344, -17.51, 0.798)
pt3dadd(-72.23, 364.405, -17.518, 0.81)
pt3dadd(-72.338, 364.438, -17.551, 0.822)
pt3dadd(-72.424, 364.492, -17.535, 0.828)
pt3dadd(-72.48, 364.555, -17.47, 0.826)
pt3dadd(-72.48, 364.595, -17.376, 0.816)
pt3dadd(-72.48, 364.634, -17.282, 0.806)
pt3dadd(-72.497, 364.698, -17.199, 0.804)
pt3dadd(-72.518, 364.766, -17.119, 0.804)
pt3dadd(-72.585, 364.86, -17.108, 0.798)
pt3dadd(-72.658, 364.955, -17.105, 0.79)
pt3dadd(-72.73, 365.051, -17.102, 0.782)
pt3dadd(-72.821, 365.118, -17.1, 0.778)
pt3dadd(-72.938, 365.144, -17.1, 0.778)
pt3dadd(-73.055, 365.171, -17.1, 0.778)
pt3dadd(-73.168, 365.208, -17.102, 0.7)
pt3dadd(-73.251, 365.291, -17.119, 0.674)
}
}
proc shape3d_85() {
dend_5[3] { pt3dadd(-73.334, 365.365, -17.146, 0.648)
pt3dadd(-73.413, 365.394, -17.218, 0.622)
pt3dadd(-73.499, 365.432, -17.267, 0.608)
pt3dadd(-73.601, 365.496, -17.267, 0.622)
pt3dadd(-73.686, 365.57, -17.244, 0.636)
pt3dadd(-73.761, 365.653, -17.206, 0.65)
pt3dadd(-73.846, 365.73, -17.177, 0.67)
pt3dadd(-73.929, 365.814, -17.172, 0.678)
pt3dadd(-74.01, 365.902, -17.181, 0.678)
pt3dadd(-74.091, 365.989, -17.19, 0.678)
pt3dadd(-74.172, 366.078, -17.198, 0.678)
pt3dadd(-74.251, 366.161, -17.174, 0.682)
pt3dadd(-74.33, 366.242, -17.143, 0.688)
pt3dadd(-74.409, 366.325, -17.111, 0.694)
pt3dadd(-74.488, 366.407, -17.08, 0.7)
pt3dadd(-74.556, 366.481, -17.029, 0.728)
pt3dadd(-74.618, 366.551, -16.965, 0.772)
pt3dadd(-74.651, 366.622, -16.89, 0.836)
pt3dadd(-74.679, 366.692, -16.813, 0.902)
pt3dadd(-74.721, 366.804, -16.806, 0.948)
pt3dadd(-74.762, 366.916, -16.801, 0.992)
pt3dadd(-74.845, 366.996, -16.8, 1.03)
pt3dadd(-74.944, 367.064, -16.8, 1.064)
pt3dadd(-75.048, 367.124, -16.8, 1.1)
pt3dadd(-75.152, 367.182, -16.8, 1.132)
pt3dadd(-75.218, 367.282, -16.8, 1.156)
pt3dadd(-75.284, 367.382, -16.8, 1.182)
pt3dadd(-75.35, 367.482, -16.8, 1.206)
pt3dadd(-75.416, 367.583, -16.8, 1.232)
pt3dadd(-75.482, 367.682, -16.8, 1.256)
pt3dadd(-75.548, 367.783, -16.8, 1.276)
pt3dadd(-75.614, 367.883, -16.8, 1.296)
pt3dadd(-75.68, 367.984, -16.8, 1.316)
pt3dadd(-75.746, 368.083, -16.8, 1.336)
pt3dadd(-75.812, 368.184, -16.8, 1.356)
pt3dadd(-75.845, 368.299, -16.8, 1.374)
pt3dadd(-75.878, 368.414, -16.8, 1.392)
pt3dadd(-75.911, 368.53, -16.8, 1.408)
pt3dadd(-75.944, 368.645, -16.8, 1.426)
pt3dadd(-75.977, 368.76, -16.8, 1.444)
pt3dadd(-76.022, 368.87, -16.8, 1.458)
pt3dadd(-76.094, 368.966, -16.8, 1.462)
pt3dadd(-76.166, 369.062, -16.8, 1.468)
pt3dadd(-76.238, 369.158, -16.8, 1.474)
pt3dadd(-76.31, 369.254, -16.8, 1.478)
pt3dadd(-76.391, 369.34, -16.8, 1.484)
pt3dadd(-76.494, 369.402, -16.8, 1.488)
pt3dadd(-76.596, 369.466, -16.8, 1.492)
pt3dadd(-76.698, 369.528, -16.8, 1.498)
pt3dadd(-76.8, 369.59, -16.8, 1.502)
pt3dadd(-76.901, 369.655, -16.8, 1.506)
pt3dadd(-76.997, 369.727, -16.8, 1.506)
pt3dadd(-77.093, 369.799, -16.8, 1.506)
pt3dadd(-77.189, 369.871, -16.8, 1.506)
pt3dadd(-77.285, 369.943, -16.8, 1.506)
pt3dadd(-77.375, 370.021, -16.8, 1.504)
pt3dadd(-77.444, 370.12, -16.8, 1.488)
pt3dadd(-77.513, 370.218, -16.8, 1.474)
pt3dadd(-77.582, 370.316, -16.8, 1.458)
pt3dadd(-77.651, 370.414, -16.8, 1.444)
pt3dadd(-77.723, 370.511, -16.8, 1.426)
pt3dadd(-77.803, 370.6, -16.8, 1.394)
pt3dadd(-77.884, 370.688, -16.8, 1.364)
pt3dadd(-77.965, 370.777, -16.8, 1.334)
pt3dadd(-78.045, 370.866, -16.8, 1.304)
pt3dadd(-78.133, 370.945, -16.8, 1.27)
pt3dadd(-78.242, 370.996, -16.8, 1.222)
pt3dadd(-78.351, 371.046, -16.8, 1.174)
pt3dadd(-78.459, 371.098, -16.8, 1.126)
pt3dadd(-78.568, 371.148, -16.8, 1.078)
pt3dadd(-78.677, 371.198, -16.8, 1.032)
pt3dadd(-78.754, 371.286, -16.778, 0.984)
pt3dadd(-78.83, 371.375, -16.755, 0.94)
pt3dadd(-78.906, 371.462, -16.732, 0.894)
pt3dadd(-78.983, 371.551, -16.709, 0.848)
pt3dadd(-79.081, 371.611, -16.7, 0.796)
pt3dadd(-79.194, 371.65, -16.7, 0.744)
pt3dadd(-79.3, 371.698, -16.691, 0.696)
pt3dadd(-79.383, 371.773, -16.653, 0.668)
pt3dadd(-79.429, 371.868, -16.625, 0.644)
pt3dadd(-79.434, 371.986, -16.607, 0.624)
pt3dadd(-79.44, 372.103, -16.589, 0.604)
pt3dadd(-79.446, 372.216, -16.555, 0.602)
pt3dadd(-79.452, 372.329, -16.521, 0.602)
pt3dadd(-79.495, 372.436, -16.505, 0.654)
pt3dadd(-79.556, 372.539, -16.5, 0.714)
pt3dadd(-79.625, 372.636, -16.5, 0.75)
pt3dadd(-79.694, 372.734, -16.5, 0.784)
pt3dadd(-79.763, 372.833, -16.5, 0.82)
pt3dadd(-79.832, 372.931, -16.5, 0.854)
pt3dadd(-79.884, 373.036, -16.5, 0.888)
pt3dadd(-79.899, 373.154, -16.5, 0.916)
pt3dadd(-79.914, 373.273, -16.5, 0.944)
pt3dadd(-79.936, 373.387, -16.48, 0.932)
pt3dadd(-79.962, 373.498, -16.448, 0.896)
pt3dadd(-80.038, 373.56, -16.425, 0.836)
pt3dadd(-80.155, 373.583, -16.411, 0.76)
pt3dadd(-80.261, 373.622, -16.394, 0.678)
pt3dadd(-80.34, 373.709, -16.37, 0.584)
pt3dadd(-80.395, 373.784, -16.322, 0.496)
pt3dadd(-80.418, 373.848, -16.241, 0.426)
pt3dadd(-80.476, 373.94, -16.198, 0.414)
pt3dadd(-80.533, 374.033, -16.156, 0.402)
pt3dadd(-80.59, 374.125, -16.114, 0.39)
pt3dadd(-80.647, 374.218, -16.071, 0.378)
pt3dadd(-80.701, 374.312, -16.029, 0.382)
pt3dadd(-80.755, 374.406, -15.987, 0.388)
pt3dadd(-80.809, 374.501, -15.945, 0.394)
pt3dadd(-80.862, 374.596, -15.903, 0.4)
pt3dadd(-80.909, 374.646, -15.828, 0.402)
pt3dadd(-80.952, 374.675, -15.738, 0.402)
pt3dadd(-81.021, 374.741, -15.762, 0.388)
pt3dadd(-81.095, 374.814, -15.812, 0.368)
pt3dadd(-81.164, 374.884, -15.87, 0.324)
pt3dadd(-81.233, 374.957, -15.924, 0.288)
pt3dadd(-81.302, 375.032, -15.976, 0.258)
pt3dadd(-81.363, 375.13, -15.989, 0.242)
pt3dadd(-81.422, 375.235, -15.989, 0.23)
pt3dadd(-81.468, 375.324, -15.947, 0.258)
pt3dadd(-81.48, 375.359, -15.852, 0.338)
pt3dadd(-81.491, 375.395, -15.757, 0.418)
pt3dadd(-81.542, 375.475, -15.707, 0.416)
pt3dadd(-81.624, 375.562, -15.7, 0.402)
pt3dadd(-81.706, 375.649, -15.7, 0.402)
pt3dadd(-81.788, 375.738, -15.7, 0.432)
pt3dadd(-81.87, 375.826, -15.7, 0.49)
pt3dadd(-81.933, 375.924, -15.7, 0.61)
pt3dadd(-81.967, 376.039, -15.7, 0.718)
pt3dadd(-82.003, 376.153, -15.7, 0.746)
pt3dadd(-82.039, 376.267, -15.7, 0.772)
pt3dadd(-82.075, 376.382, -15.7, 0.8)
pt3dadd(-82.11, 376.496, -15.7, 0.826)
pt3dadd(-82.146, 376.612, -15.7, 0.854)
pt3dadd(-82.176, 376.728, -15.7, 0.862)
pt3dadd(-82.207, 376.843, -15.7, 0.872)
pt3dadd(-82.237, 376.96, -15.7, 0.88)
pt3dadd(-82.267, 377.076, -15.7, 0.888)
pt3dadd(-82.297, 377.192, -15.7, 0.898)
pt3dadd(-82.33, 377.308, -15.7, 0.904)
pt3dadd(-82.372, 377.42, -15.7, 0.904)
pt3dadd(-82.413, 377.532, -15.7, 0.904)
pt3dadd(-82.455, 377.645, -15.7, 0.904)
pt3dadd(-82.497, 377.758, -15.7, 0.904)
pt3dadd(-82.538, 377.87, -15.7, 0.904)
pt3dadd(-82.608, 377.965, -15.7, 0.904)
pt3dadd(-82.686, 378.058, -15.7, 0.904)
pt3dadd(-82.764, 378.149, -15.7, 0.904)
pt3dadd(-82.842, 378.24, -15.7, 0.904)
pt3dadd(-82.92, 378.331, -15.7, 0.904)
pt3dadd(-82.988, 378.43, -15.7, 0.896)
pt3dadd(-83.054, 378.53, -15.7, 0.886)
pt3dadd(-83.12, 378.63, -15.7, 0.876)
pt3dadd(-83.186, 378.731, -15.7, 0.866)
pt3dadd(-83.252, 378.83, -15.7, 0.856)
pt3dadd(-83.343, 378.907, -15.7, 0.842)
pt3dadd(-83.441, 378.976, -15.7, 0.828)
pt3dadd(-83.539, 379.045, -15.7, 0.812)
pt3dadd(-83.637, 379.114, -15.7, 0.798)
pt3dadd(-83.736, 379.183, -15.7, 0.782)
pt3dadd(-83.82, 379.267, -15.7, 0.774)
pt3dadd(-83.901, 379.356, -15.7, 0.77)
pt3dadd(-83.982, 379.445, -15.7, 0.764)
pt3dadd(-84.063, 379.534, -15.7, 0.76)
pt3dadd(-84.143, 379.622, -15.7, 0.754)
pt3dadd(-84.186, 379.732, -15.7, 0.76)
pt3dadd(-84.219, 379.847, -15.7, 0.77)
pt3dadd(-84.252, 379.962, -15.7, 0.778)
pt3dadd(-84.285, 380.078, -15.7, 0.786)
pt3dadd(-84.318, 380.194, -15.7, 0.796)
pt3dadd(-84.349, 380.309, -15.7, 0.812)
pt3dadd(-84.37, 380.428, -15.7, 0.87)
pt3dadd(-84.39, 380.545, -15.7, 0.928)
pt3dadd(-84.429, 380.658, -15.7, 0.99)
pt3dadd(-84.482, 380.765, -15.7, 1.058)
pt3dadd(-84.55, 380.861, -15.7, 1.132)
pt3dadd(-84.649, 380.929, -15.7, 1.226)
pt3dadd(-84.75, 380.993, -15.7, 1.314)
pt3dadd(-84.863, 381.032, -15.7, 1.366)
pt3dadd(-84.976, 381.072, -15.7, 1.42)
pt3dadd(-85.08, 381.131, -15.7, 1.432)
pt3dadd(-85.173, 381.205, -15.7, 1.422)
pt3dadd(-85.247, 381.299, -15.7, 1.398)
pt3dadd(-85.322, 381.392, -15.7, 1.372)
pt3dadd(-85.397, 381.486, -15.7, 1.346)
pt3dadd(-85.472, 381.58, -15.7, 1.322)
pt3dadd(-85.549, 381.672, -15.7, 1.292)
pt3dadd(-85.63, 381.761, -15.7, 1.25)
pt3dadd(-85.711, 381.85, -15.7, 1.21)
pt3dadd(-85.791, 381.938, -15.7, 1.17)
pt3dadd(-85.872, 382.027, -15.7, 1.13)
pt3dadd(-85.963, 382.102, -15.7, 1.094)
pt3dadd(-86.071, 382.156, -15.7, 1.064)
pt3dadd(-86.178, 382.208, -15.7, 1.036)
pt3dadd(-86.286, 382.262, -15.7, 1.006)
pt3dadd(-86.393, 382.316, -15.7, 0.978)
pt3dadd(-86.5, 382.369, -15.7, 0.95)
pt3dadd(-86.608, 382.423, -15.7, 0.926)
pt3dadd(-86.715, 382.477, -15.7, 0.902)
pt3dadd(-86.822, 382.531, -15.7, 0.878)
pt3dadd(-86.929, 382.585, -15.7, 0.854)
}
}
proc shape3d_86() {
dend_5[3] { pt3dadd(-87.037, 382.639, -15.7, 0.83)
pt3dadd(-87.139, 382.702, -15.7, 0.824)
pt3dadd(-87.241, 382.764, -15.7, 0.82)
pt3dadd(-87.344, 382.826, -15.7, 0.814)
pt3dadd(-87.446, 382.89, -15.7, 0.81)
pt3dadd(-87.548, 382.952, -15.7, 0.804)
pt3dadd(-87.638, 383.032, -15.7, 0.816)
pt3dadd(-87.727, 383.112, -15.7, 0.832)
pt3dadd(-87.816, 383.192, -15.7, 0.848)
pt3dadd(-87.905, 383.274, -15.7, 0.862)
pt3dadd(-87.993, 383.354, -15.7, 0.878)
pt3dadd(-88.061, 383.453, -15.7, 0.902)
pt3dadd(-88.127, 383.554, -15.7, 0.926)
pt3dadd(-88.193, 383.653, -15.7, 0.952)
pt3dadd(-88.259, 383.754, -15.7, 0.976)
pt3dadd(-88.325, 383.854, -15.7, 1.002)
pt3dadd(-88.399, 383.947, -15.694, 1.028)
pt3dadd(-88.475, 384.041, -15.687, 1.054)
pt3dadd(-88.551, 384.133, -15.68, 1.08)
pt3dadd(-88.627, 384.226, -15.673, 1.106)
pt3dadd(-88.704, 384.317, -15.665, 1.13)
pt3dadd(-88.789, 384.4, -15.65, 1.136)
pt3dadd(-88.874, 384.482, -15.635, 1.142)
pt3dadd(-88.96, 384.564, -15.621, 1.148)
pt3dadd(-89.045, 384.647, -15.606, 1.152)
pt3dadd(-89.136, 384.721, -15.587, 1.156)
pt3dadd(-89.23, 384.791, -15.564, 1.156)
pt3dadd(-89.323, 384.86, -15.541, 1.156)
pt3dadd(-89.417, 384.93, -15.518, 1.156)
pt3dadd(-89.513, 384.998, -15.5, 1.154)
pt3dadd(-89.615, 385.061, -15.5, 1.144)
pt3dadd(-89.717, 385.124, -15.5, 1.134)
pt3dadd(-89.819, 385.187, -15.5, 1.124)
pt3dadd(-89.922, 385.25, -15.5, 1.114)
pt3dadd(-90.025, 385.312, -15.5, 1.104)
pt3dadd(-90.136, 385.357, -15.498, 1.094)
pt3dadd(-90.247, 385.403, -15.496, 1.086)
pt3dadd(-90.358, 385.447, -15.493, 1.076)
pt3dadd(-90.469, 385.493, -15.491, 1.066)
pt3dadd(-90.58, 385.538, -15.489, 1.056)
pt3dadd(-90.667, 385.616, -15.472, 1.046)
pt3dadd(-90.748, 385.7, -15.452, 1.034)
pt3dadd(-90.83, 385.786, -15.432, 1.022)
pt3dadd(-90.912, 385.87, -15.412, 1.012)
pt3dadd(-90.986, 385.962, -15.4, 1)
pt3dadd(-91.049, 386.064, -15.4, 0.99)
pt3dadd(-91.111, 386.166, -15.4, 0.98)
pt3dadd(-91.174, 386.268, -15.4, 0.97)
pt3dadd(-91.237, 386.37, -15.4, 0.96)
pt3dadd(-91.301, 386.467, -15.386, 0.954)
pt3dadd(-91.365, 386.555, -15.343, 0.954)
pt3dadd(-91.43, 386.641, -15.3, 0.954)
pt3dadd(-91.494, 386.729, -15.257, 0.954)
pt3dadd(-91.563, 386.814, -15.217, 0.956)
pt3dadd(-91.65, 386.888, -15.188, 0.962)
pt3dadd(-91.737, 386.963, -15.16, 0.968)
pt3dadd(-91.825, 387.038, -15.131, 0.972)
pt3dadd(-91.912, 387.113, -15.103, 0.978)
pt3dadd(-91.996, 387.198, -15.1, 1.002)
pt3dadd(-92.079, 387.284, -15.1, 1.028)
pt3dadd(-92.163, 387.371, -15.1, 1.052)
pt3dadd(-92.246, 387.457, -15.1, 1.078)
pt3dadd(-92.33, 387.544, -15.1, 1.104)
pt3dadd(-92.39, 387.647, -15.1, 1.128)
pt3dadd(-92.45, 387.75, -15.1, 1.152)
pt3dadd(-92.51, 387.854, -15.1, 1.178)
pt3dadd(-92.57, 387.959, -15.1, 1.202)
pt3dadd(-92.63, 388.062, -15.1, 1.226)
pt3dadd(-92.695, 388.163, -15.1, 1.246)
pt3dadd(-92.761, 388.264, -15.1, 1.266)
pt3dadd(-92.827, 388.364, -15.1, 1.286)
pt3dadd(-92.893, 388.464, -15.1, 1.306)
pt3dadd(-92.959, 388.565, -15.1, 1.326)
pt3dadd(-93.038, 388.654, -15.1, 1.334)
pt3dadd(-93.122, 388.74, -15.1, 1.34)
pt3dadd(-93.205, 388.826, -15.1, 1.344)
pt3dadd(-93.289, 388.913, -15.1, 1.35)
pt3dadd(-93.372, 388.999, -15.1, 1.356)
pt3dadd(-93.441, 389.096, -15.1, 1.352)
pt3dadd(-93.507, 389.197, -15.1, 1.346)
pt3dadd(-93.573, 389.297, -15.1, 1.342)
pt3dadd(-93.639, 389.398, -15.1, 1.338)
pt3dadd(-93.705, 389.497, -15.1, 1.332)
pt3dadd(-93.748, 389.609, -15.1, 1.324)
pt3dadd(-93.784, 389.723, -15.1, 1.314)
pt3dadd(-93.819, 389.838, -15.1, 1.306)
pt3dadd(-93.855, 389.952, -15.1, 1.298)
pt3dadd(-93.891, 390.067, -15.1, 1.288)
pt3dadd(-93.935, 390.176, -15.1, 1.278)
pt3dadd(-94.016, 390.265, -15.1, 1.262)
pt3dadd(-94.097, 390.354, -15.1, 1.248)
pt3dadd(-94.177, 390.443, -15.1, 1.232)
pt3dadd(-94.258, 390.532, -15.1, 1.218)
pt3dadd(-94.321, 390.628, -15.1, 1.204)
pt3dadd(-94.326, 390.748, -15.1, 1.194)
pt3dadd(-94.33, 390.868, -15.1, 1.186)
pt3dadd(-94.368, 390.967, -15.1, 1.18)
pt3dadd(-94.472, 391.028, -15.1, 1.18)
pt3dadd(-94.578, 391.08, -15.1, 1.178)
pt3dadd(-94.698, 391.08, -15.1, 1.17)
pt3dadd(-94.818, 391.08, -15.1, 1.162)
pt3dadd(-94.938, 391.08, -15.1, 1.148)
pt3dadd(-95.058, 391.08, -15.1, 1.098)
pt3dadd(-95.178, 391.08, -15.1, 1.048)
pt3dadd(-95.298, 391.081, -15.1, 0.994)
pt3dadd(-95.418, 391.085, -15.1, 0.924)
pt3dadd(-95.538, 391.09, -15.1, 0.856)
pt3dadd(-95.654, 391.106, -15.1, 0.752)
pt3dadd(-95.734, 391.188, -15.1, 0.652)
pt3dadd(-95.758, 391.304, -15.1, 0.738)
pt3dadd(-95.76, 391.424, -15.1, 0.862)
pt3dadd(-95.76, 391.544, -15.1, 0.966)
pt3dadd(-95.773, 391.663, -15.1, 0.98)
pt3dadd(-95.874, 391.726, -15.1, 0.958)
pt3dadd(-95.977, 391.787, -15.1, 0.934)
pt3dadd(-96.09, 391.826, -15.1, 0.888)
pt3dadd(-96.205, 391.859, -15.1, 0.838)
pt3dadd(-96.318, 391.9, -15.1, 0.78)
pt3dadd(-96.414, 391.969, -15.1, 0.754)
pt3dadd(-96.503, 392.05, -15.1, 0.754)
pt3dadd(-96.592, 392.13, -15.1, 0.754)
pt3dadd(-96.681, 392.212, -15.1, 0.754)
pt3dadd(-96.769, 392.292, -15.1, 0.754)
pt3dadd(-96.866, 392.363, -15.1, 0.766)
pt3dadd(-96.966, 392.429, -15.1, 0.786)
pt3dadd(-97.066, 392.495, -15.1, 0.806)
pt3dadd(-97.166, 392.561, -15.1, 0.826)
pt3dadd(-97.267, 392.627, -15.1, 0.846)
pt3dadd(-97.356, 392.706, -15.1, 0.876)
pt3dadd(-97.437, 392.794, -15.1, 0.91)
pt3dadd(-97.516, 392.885, -15.1, 0.934)
pt3dadd(-97.591, 392.978, -15.1, 0.946)
pt3dadd(-97.645, 393.08, -15.1, 0.942)
pt3dadd(-97.66, 393.2, -15.1, 0.904)
pt3dadd(-97.675, 393.319, -15.1, 0.866)
pt3dadd(-97.68, 393.438, -15.1, 0.826)
pt3dadd(-97.68, 393.558, -15.1, 0.784)
pt3dadd(-97.68, 393.678, -15.1, 0.742)
pt3dadd(-97.68, 393.794, -15.078, 0.708)
pt3dadd(-97.68, 393.907, -15.043, 0.676)
pt3dadd(-97.68, 394.02, -15.009, 0.642)
pt3dadd(-97.68, 394.133, -14.975, 0.61)
pt3dadd(-97.68, 394.217, -14.908, 0.576)
pt3dadd(-97.68, 394.291, -14.83, 0.54)
pt3dadd(-97.71, 394.38, -14.775, 0.502)
pt3dadd(-97.759, 394.478, -14.734, 0.462)
pt3dadd(-97.813, 394.576, -14.7, 0.42)
pt3dadd(-97.887, 394.669, -14.7, 0.372)
pt3dadd(-97.963, 394.763, -14.7, 0.326)
pt3dadd(-98.047, 394.848, -14.7, 0.298)
pt3dadd(-98.132, 394.933, -14.7, 0.272)
pt3dadd(-98.224, 395.004, -14.7, 0.25)
pt3dadd(-98.342, 395.024, -14.7, 0.24)
pt3dadd(-98.46, 395.045, -14.7, 0.23)
pt3dadd(-98.577, 395.074, -14.7, 0.226)
pt3dadd(-98.688, 395.112, -14.717, 0.23)
pt3dadd(-98.798, 395.153, -14.739, 0.236)
pt3dadd(-98.908, 395.194, -14.761, 0.242)
pt3dadd(-99.018, 395.234, -14.782, 0.246)
pt3dadd(-99.129, 395.261, -14.8, 0.256)
pt3dadd(-99.241, 395.22, -14.8, 0.29)
pt3dadd(-99.353, 395.179, -14.8, 0.282)
pt3dadd(-99.472, 395.161, -14.8, 0.254)
pt3dadd(-99.59, 395.16, -14.813, 0.228)
pt3dadd(-99.682, 395.16, -14.87, 0.27)
pt3dadd(-99.716, 395.15, -14.964, 0.352)
pt3dadd(-99.72, 395.123, -15.061, 0.424)
pt3dadd(-99.72, 395.074, -15.152, 0.458)
pt3dadd(-99.72, 395.053, -15.25, 0.502)
pt3dadd(-99.731, 395.076, -15.346, 0.592)
pt3dadd(-99.785, 395.158, -15.394, 0.664)
pt3dadd(-99.862, 395.249, -15.4, 0.678)
pt3dadd(-99.928, 395.347, -15.4, 0.67)
pt3dadd(-99.961, 395.462, -15.4, 0.64)
pt3dadd(-100.006, 395.573, -15.4, 0.608)
pt3dadd(-100.108, 395.629, -15.398, 0.636)
pt3dadd(-100.222, 395.64, -15.374, 0.71)
pt3dadd(-100.293, 395.64, -15.302, 0.826)
pt3dadd(-100.261, 395.646, -15.207, 0.89)
pt3dadd(-100.23, 395.694, -15.127, 0.866)
pt3dadd(-100.285, 395.794, -15.114, 0.744)
pt3dadd(-100.362, 395.861, -15.16, 0.638)
pt3dadd(-100.461, 395.88, -15.214, 0.61)
pt3dadd(-100.538, 395.89, -15.287, 0.628)
pt3dadd(-100.586, 395.934, -15.369, 0.562)
pt3dadd(-100.648, 396.004, -15.433, 0.49)
pt3dadd(-100.705, 396.09, -15.474, 0.422)
pt3dadd(-100.758, 396.196, -15.491, 0.36)
pt3dadd(-100.826, 396.29, -15.498, 0.318)
pt3dadd(-100.914, 396.373, -15.494, 0.3)
pt3dadd(-101.001, 396.455, -15.49, 0.282)
pt3dadd(-101.075, 396.494, -15.433, 0.286)
pt3dadd(-101.144, 396.515, -15.352, 0.298)
pt3dadd(-101.163, 396.577, -15.277, 0.378)
pt3dadd(-101.237, 396.668, -15.252, 0.394)
pt3dadd(-101.31, 396.758, -15.226, 0.41)
pt3dadd(-101.383, 396.848, -15.201, 0.426)
pt3dadd(-101.413, 396.947, -15.15, 0.452)
pt3dadd(-101.444, 397.044, -15.1, 0.478)
pt3dadd(-101.538, 397.118, -15.1, 0.502)
}
}
proc shape3d_87() {
dend_5[3] { pt3dadd(-101.632, 397.193, -15.1, 0.526)
pt3dadd(-101.703, 397.256, -15.042, 0.566)
pt3dadd(-101.76, 397.315, -14.973, 0.606)
pt3dadd(-101.76, 397.361, -14.881, 0.628)
pt3dadd(-101.76, 397.408, -14.789, 0.65)
pt3dadd(-101.8, 397.486, -14.723, 0.666)
pt3dadd(-101.847, 397.567, -14.661, 0.678)
pt3dadd(-101.923, 397.643, -14.624, 0.678)
pt3dadd(-101.982, 397.678, -14.699, 0.678)
pt3dadd(-102.001, 397.696, -14.796, 0.708)
pt3dadd(-102.048, 397.744, -14.862, 0.764)
pt3dadd(-102.145, 397.811, -14.881, 0.792)
pt3dadd(-102.218, 397.895, -14.866, 0.812)
pt3dadd(-102.274, 397.99, -14.827, 0.828)
pt3dadd(-102.357, 398.071, -14.838, 0.816)
pt3dadd(-102.439, 398.148, -14.851, 0.802)
pt3dadd(-102.417, 398.162, -14.753, 0.79)
pt3dadd(-102.387, 398.195, -14.671, 0.774)
pt3dadd(-102.327, 398.292, -14.639, 0.754)
pt3dadd(-102.268, 398.389, -14.608, 0.734)
pt3dadd(-102.253, 398.503, -14.59, 0.72)
pt3dadd(-102.253, 398.622, -14.576, 0.71)
pt3dadd(-102.269, 398.719, -14.543, 0.704)
pt3dadd(-102.323, 398.76, -14.462, 0.706)
pt3dadd(-102.383, 398.76, -14.376, 0.786)
pt3dadd(-102.48, 398.76, -14.322, 0.878)
pt3dadd(-102.591, 398.76, -14.354, 0.856)
pt3dadd(-102.684, 398.76, -14.416, 0.764)
pt3dadd(-102.761, 398.76, -14.493, 0.696)
pt3dadd(-102.826, 398.76, -14.576, 0.678)
pt3dadd(-102.885, 398.777, -14.661, 0.682)
pt3dadd(-102.941, 398.832, -14.735, 0.744)
pt3dadd(-102.988, 398.885, -14.814, 0.864)
pt3dadd(-103.049, 398.962, -14.871, 0.908)
pt3dadd(-103.118, 399.047, -14.9, 0.94)
pt3dadd(-103.192, 399.14, -14.9, 0.964)
pt3dadd(-103.279, 399.22, -14.9, 0.968)
pt3dadd(-103.38, 399.283, -14.901, 0.948)
pt3dadd(-103.478, 399.354, -14.904, 0.938)
pt3dadd(-103.575, 399.424, -14.906, 0.928)
pt3dadd(-103.672, 399.494, -14.908, 0.918)
pt3dadd(-103.769, 399.565, -14.91, 0.908)
pt3dadd(-103.865, 399.625, -14.938, 0.874)
pt3dadd(-103.96, 399.68, -14.978, 0.828)
pt3dadd(-104.016, 399.775, -14.938, 0.784)
pt3dadd(-104.085, 399.862, -14.917, 0.744)
pt3dadd(-104.182, 399.929, -14.936, 0.716)
pt3dadd(-104.253, 399.983, -14.989, 0.704)
pt3dadd(-104.304, 400.026, -15.073, 0.704)
pt3dadd(-104.366, 400.078, -15.146, 0.714)
pt3dadd(-104.434, 400.132, -15.214, 0.732)
pt3dadd(-104.503, 400.187, -15.283, 0.748)
pt3dadd(-104.576, 400.27, -15.3, 0.788)
pt3dadd(-104.651, 400.364, -15.3, 0.836)
pt3dadd(-104.746, 400.433, -15.3, 0.936)
pt3dadd(-104.82, 400.525, -15.3, 0.968)
pt3dadd(-104.889, 400.624, -15.3, 0.982)
pt3dadd(-104.958, 400.722, -15.3, 0.998)
pt3dadd(-105.027, 400.819, -15.3, 1.012)
pt3dadd(-105.096, 400.918, -15.3, 1.028)
pt3dadd(-105.172, 401.01, -15.3, 1.034)
pt3dadd(-105.25, 401.101, -15.3, 1.038)
pt3dadd(-105.328, 401.192, -15.3, 1.044)
pt3dadd(-105.406, 401.284, -15.3, 1.05)
pt3dadd(-105.484, 401.376, -15.3, 1.054)
pt3dadd(-105.565, 401.464, -15.3, 1.054)
pt3dadd(-105.647, 401.551, -15.3, 1.054)
pt3dadd(-105.733, 401.635, -15.3, 1.064)
pt3dadd(-105.821, 401.717, -15.3, 1.076)
pt3dadd(-105.916, 401.79, -15.3, 1.094)
pt3dadd(-106.015, 401.857, -15.3, 1.118)
pt3dadd(-106.069, 401.95, -15.3, 1.134)
pt3dadd(-106.074, 402.07, -15.3, 1.142)
pt3dadd(-106.078, 402.19, -15.3, 1.152)
pt3dadd(-106.138, 402.278, -15.3, 1.152)
pt3dadd(-106.238, 402.346, -15.3, 1.144)
pt3dadd(-106.338, 402.412, -15.3, 1.138)
pt3dadd(-106.438, 402.479, -15.3, 1.13)
pt3dadd(-106.556, 402.5, -15.3, 1.092)
pt3dadd(-106.674, 402.521, -15.3, 1.054)
pt3dadd(-106.773, 402.565, -15.316, 1.014)
pt3dadd(-106.841, 402.65, -15.359, 0.97)
pt3dadd(-106.908, 402.736, -15.401, 0.928)
pt3dadd(-106.97, 402.811, -15.459, 0.856)
pt3dadd(-107.04, 402.888, -15.5, 0.764)
pt3dadd(-107.121, 402.976, -15.5, 0.694)
pt3dadd(-107.193, 403.072, -15.5, 0.68)
pt3dadd(-107.265, 403.168, -15.5, 0.664)
pt3dadd(-107.337, 403.264, -15.5, 0.65)
pt3dadd(-107.409, 403.36, -15.5, 0.634)
pt3dadd(-107.482, 403.45, -15.52, 0.628)
pt3dadd(-107.555, 403.535, -15.554, 0.628)
pt3dadd(-107.628, 403.621, -15.588, 0.628)
pt3dadd(-107.701, 403.706, -15.623, 0.628)
pt3dadd(-107.773, 403.771, -15.673, 0.632)
pt3dadd(-107.844, 403.799, -15.75, 0.646)
pt3dadd(-107.935, 403.837, -15.791, 0.664)
pt3dadd(-108.044, 403.886, -15.796, 0.688)
pt3dadd(-108.143, 403.949, -15.8, 0.706)
pt3dadd(-108.218, 404.042, -15.8, 0.718)
pt3dadd(-108.287, 404.137, -15.807, 0.73)
pt3dadd(-108.33, 404.238, -15.849, 0.744)
pt3dadd(-108.363, 404.334, -15.899, 0.76)
pt3dadd(-108.373, 404.424, -15.965, 0.778)
pt3dadd(-108.44, 404.514, -15.997, 0.796)
pt3dadd(-108.509, 404.605, -16.028, 0.814)
pt3dadd(-108.578, 404.696, -16.06, 0.832)
pt3dadd(-108.647, 404.786, -16.091, 0.848)
pt3dadd(-108.705, 404.89, -16.1, 0.868)
pt3dadd(-108.759, 404.996, -16.1, 0.886)
pt3dadd(-108.812, 405.104, -16.1, 0.906)
pt3dadd(-108.866, 405.211, -16.1, 0.926)
pt3dadd(-108.919, 405.319, -16.1, 0.944)
pt3dadd(-108.97, 405.427, -16.1, 0.958)
pt3dadd(-109.018, 405.538, -16.1, 0.968)
pt3dadd(-109.065, 405.648, -16.1, 0.978)
pt3dadd(-109.113, 405.758, -16.1, 0.988)
pt3dadd(-109.16, 405.868, -16.1, 0.996)
pt3dadd(-109.209, 405.978, -16.1, 1.002)
pt3dadd(-109.263, 406.085, -16.1, 0.992)
pt3dadd(-109.316, 406.193, -16.1, 0.98)
pt3dadd(-109.377, 406.296, -16.1, 0.948)
pt3dadd(-109.437, 406.399, -16.1, 0.914)
pt3dadd(-109.524, 406.477, -16.113, 0.876)
pt3dadd(-109.62, 406.546, -16.13, 0.836)
pt3dadd(-109.706, 406.602, -16.179, 0.784)
pt3dadd(-109.789, 406.657, -16.235, 0.726)
pt3dadd(-109.845, 406.747, -16.282, 0.662)
pt3dadd(-109.919, 406.834, -16.311, 0.642)
pt3dadd(-109.996, 406.92, -16.337, 0.632)
pt3dadd(-110.073, 407.006, -16.362, 0.62)
pt3dadd(-110.151, 407.093, -16.388, 0.608)
pt3dadd(-110.234, 407.177, -16.4, 0.602)
pt3dadd(-110.322, 407.258, -16.4, 0.602)
pt3dadd(-110.41, 407.34, -16.4, 0.602)
pt3dadd(-110.497, 407.422, -16.4, 0.602)
pt3dadd(-110.592, 407.491, -16.4, 0.602)
pt3dadd(-110.706, 407.531, -16.4, 0.602)
pt3dadd(-110.819, 407.57, -16.4, 0.602)
pt3dadd(-110.853, 407.659, -16.455, 0.59)
pt3dadd(-110.884, 407.749, -16.515, 0.576)
pt3dadd(-110.961, 407.794, -16.582, 0.56)
pt3dadd(-111.037, 407.839, -16.65, 0.542)
pt3dadd(-111.115, 407.884, -16.715, 0.524)
pt3dadd(-111.216, 407.927, -16.757, 0.498)
pt3dadd(-111.316, 407.974, -16.793, 0.478)
pt3dadd(-111.416, 408.036, -16.813, 0.478)
pt3dadd(-111.515, 408.098, -16.835, 0.478)
pt3dadd(-111.614, 408.161, -16.858, 0.478)
pt3dadd(-111.712, 408.224, -16.88, 0.478)
pt3dadd(-111.81, 408.288, -16.9, 0.476)
pt3dadd(-111.904, 408.362, -16.9, 0.472)
pt3dadd(-111.998, 408.438, -16.9, 0.466)
pt3dadd(-112.092, 408.512, -16.9, 0.462)
pt3dadd(-112.185, 408.588, -16.9, 0.456)
pt3dadd(-112.279, 408.662, -16.9, 0.45)
pt3dadd(-112.37, 408.74, -16.9, 0.44)
pt3dadd(-112.461, 408.818, -16.9, 0.43)
pt3dadd(-112.552, 408.896, -16.9, 0.42)
pt3dadd(-112.643, 408.974, -16.9, 0.41)
pt3dadd(-112.737, 409.049, -16.9, 0.402)
pt3dadd(-112.845, 409.102, -16.9, 0.402)
pt3dadd(-112.952, 409.157, -16.9, 0.402)
pt3dadd(-113.067, 409.19, -16.9, 0.38)
pt3dadd(-113.182, 409.223, -16.9, 0.422)
pt3dadd(-113.287, 409.277, -16.9, 0.522)
pt3dadd(-113.363, 409.368, -16.901, 0.694)
pt3dadd(-113.393, 409.481, -16.922, 0.892)
pt3dadd(-113.4, 409.58, -16.974, 1.046)
pt3dadd(-113.4, 409.652, -17.054, 1.146)
pt3dadd(-113.41, 409.709, -17.141, 1.198)
pt3dadd(-113.494, 409.771, -17.175, 1.206)
pt3dadd(-113.593, 409.835, -17.198, 1.206)
pt3dadd(-113.704, 409.874, -17.214, 1.206)
pt3dadd(-113.816, 409.912, -17.23, 1.206)
pt3dadd(-113.916, 409.946, -17.269, 1.204)
pt3dadd(-113.984, 410.042, -17.286, 1.19)
pt3dadd(-114.058, 410.134, -17.301, 1.178)
pt3dadd(-114.155, 410.204, -17.306, 1.166)
pt3dadd(-114.252, 410.268, -17.317, 1.15)
pt3dadd(-114.354, 410.274, -17.37, 1.114)
pt3dadd(-114.455, 410.28, -17.424, 1.08)
pt3dadd(-114.543, 410.28, -17.492, 1.044)
pt3dadd(-114.631, 410.28, -17.56, 1.008)
pt3dadd(-114.737, 410.305, -17.6, 0.978)
pt3dadd(-114.845, 410.333, -17.636, 0.948)
pt3dadd(-114.953, 410.362, -17.673, 0.918)
pt3dadd(-115.025, 410.428, -17.716, 0.888)
pt3dadd(-115.069, 410.522, -17.765, 0.86)
pt3dadd(-115.083, 410.615, -17.824, 0.778)
pt3dadd(-115.17, 410.648, -17.887, 0.76)
pt3dadd(-115.257, 410.683, -17.949, 0.742)
pt3dadd(-115.345, 410.718, -18.011, 0.726)
pt3dadd(-115.432, 410.752, -18.074, 0.708)
pt3dadd(-115.539, 410.788, -18.096, 0.668)
pt3dadd(-115.653, 410.824, -18.106, 0.624)
pt3dadd(-115.744, 410.855, -18.152, 0.596)
pt3dadd(-115.815, 410.884, -18.229, 0.582)
pt3dadd(-115.901, 410.94, -18.271, 0.568)
pt3dadd(-115.993, 411.011, -18.295, 0.556)
}
}
proc shape3d_88() {
dend_5[3] { pt3dadd(-116.066, 411.103, -18.3, 0.562)
pt3dadd(-116.134, 411.203, -18.3, 0.574)
pt3dadd(-116.21, 411.288, -18.323, 0.578)
pt3dadd(-116.291, 411.364, -18.361, 0.578)
pt3dadd(-116.372, 411.44, -18.398, 0.578)
pt3dadd(-116.446, 411.485, -18.461, 0.604)
pt3dadd(-116.517, 411.514, -18.538, 0.644)
pt3dadd(-116.612, 411.568, -18.569, 0.676)
pt3dadd(-116.713, 411.629, -18.586, 0.704)
pt3dadd(-116.813, 411.691, -18.601, 0.736)
pt3dadd(-116.904, 411.769, -18.606, 0.798)
pt3dadd(-116.991, 411.85, -18.614, 0.862)
pt3dadd(-117.061, 411.932, -18.64, 0.908)
pt3dadd(-117.165, 411.989, -18.654, 0.92)
pt3dadd(-117.27, 412.045, -18.668, 0.93)
pt3dadd(-117.374, 412.102, -18.682, 0.94)
pt3dadd(-117.479, 412.159, -18.696, 0.952)
pt3dadd(-117.571, 412.234, -18.7, 0.954)
pt3dadd(-117.659, 412.315, -18.7, 0.954)
pt3dadd(-117.745, 412.398, -18.703, 0.976)
pt3dadd(-117.83, 412.483, -18.709, 1.014)
pt3dadd(-117.9, 412.544, -18.756, 1.046)
pt3dadd(-117.958, 412.589, -18.835, 1.072)
pt3dadd(-118.048, 412.632, -18.887, 1.12)
pt3dadd(-118.148, 412.675, -18.928, 1.174)
pt3dadd(-118.245, 412.708, -18.98, 1.234)
pt3dadd(-118.335, 412.75, -19.036, 1.278)
pt3dadd(-118.422, 412.799, -19.092, 1.314)
pt3dadd(-118.508, 412.847, -19.148, 1.352)
pt3dadd(-118.595, 412.895, -19.204, 1.388)
pt3dadd(-118.675, 412.932, -19.271, 1.422)
pt3dadd(-118.747, 412.956, -19.348, 1.456)
pt3dadd(-118.819, 412.98, -19.426, 1.49)
pt3dadd(-118.891, 413.004, -19.503, 1.524)
pt3dadd(-118.963, 413.028, -19.58, 1.558)
pt3dadd(-119.053, 413.059, -19.642, 1.58)
pt3dadd(-119.142, 413.089, -19.703, 1.604)
pt3dadd(-119.231, 413.12, -19.765, 1.628)
pt3dadd(-119.321, 413.152, -19.826, 1.65)
pt3dadd(-119.397, 413.195, -19.894, 1.648)
pt3dadd(-119.468, 413.243, -19.964, 1.636)
pt3dadd(-119.539, 413.291, -20.034, 1.624)
pt3dadd(-119.61, 413.34, -20.104, 1.612)
pt3dadd(-119.698, 413.388, -20.154, 1.578)
pt3dadd(-119.799, 413.437, -20.19, 1.526)
pt3dadd(-119.9, 413.485, -20.225, 1.474)
pt3dadd(-120.001, 413.534, -20.261, 1.422)
pt3dadd(-120.098, 413.591, -20.29, 1.358)
pt3dadd(-120.182, 413.676, -20.295, 1.248)
pt3dadd(-120.272, 413.753, -20.3, 1.142)
pt3dadd(-120.385, 413.794, -20.3, 1.056)
pt3dadd(-120.498, 413.833, -20.3, 0.97)
pt3dadd(-120.598, 413.857, -20.346, 0.902)
pt3dadd(-120.694, 413.878, -20.404, 0.838)
pt3dadd(-120.762, 413.886, -20.485, 0.766)
pt3dadd(-120.826, 413.892, -20.569, 0.694)
pt3dadd(-120.925, 413.929, -20.595, 0.624)
pt3dadd(-121.032, 413.966, -20.616, 0.574)
pt3dadd(-121.134, 413.987, -20.667, 0.56)
pt3dadd(-121.219, 414, -20.731, 0.56)
pt3dadd(-121.272, 414, -20.821, 0.582)
pt3dadd(-121.327, 414.005, -20.908, 0.608)
pt3dadd(-121.394, 414.049, -20.983, 0.65)
pt3dadd(-121.472, 414.096, -21.045, 0.686)
pt3dadd(-121.572, 414.145, -21.08, 0.714)
pt3dadd(-121.675, 414.197, -21.104, 0.732)
pt3dadd(-121.782, 414.251, -21.114, 0.738)
pt3dadd(-121.889, 414.305, -21.123, 0.746)
pt3dadd(-121.996, 414.358, -21.133, 0.754)
pt3dadd(-122.1, 414.36, -21.182, 0.754)
pt3dadd(-122.203, 414.36, -21.233, 0.754)
pt3dadd(-122.286, 414.361, -21.303, 0.804)
pt3dadd(-122.384, 414.389, -21.355, 0.822)
pt3dadd(-122.483, 414.415, -21.408, 0.838)
pt3dadd(-122.581, 414.443, -21.46, 0.856)
pt3dadd(-122.681, 414.469, -21.512, 0.872)
pt3dadd(-122.761, 414.515, -21.573, 0.89)
pt3dadd(-122.83, 414.575, -21.638, 0.908)
pt3dadd(-122.899, 414.634, -21.704, 0.928)
pt3dadd(-122.968, 414.692, -21.769, 0.946)
pt3dadd(-123.043, 414.734, -21.836, 0.952)
pt3dadd(-123.126, 414.762, -21.905, 0.946)
pt3dadd(-123.209, 414.79, -21.974, 0.94)
pt3dadd(-123.292, 414.817, -22.043, 0.934)
pt3dadd(-123.378, 414.842, -22.107, 0.928)
pt3dadd(-123.486, 414.859, -22.149, 0.916)
pt3dadd(-123.594, 414.876, -22.19, 0.906)
pt3dadd(-123.702, 414.893, -22.232, 0.896)
pt3dadd(-123.81, 414.91, -22.273, 0.886)
pt3dadd(-123.917, 414.934, -22.313, 0.876)
pt3dadd(-124.021, 414.972, -22.35, 0.872)
pt3dadd(-124.126, 415.012, -22.388, 0.866)
pt3dadd(-124.23, 415.05, -22.425, 0.86)
pt3dadd(-124.334, 415.088, -22.462, 0.854)
pt3dadd(-124.441, 415.114, -22.502, 0.868)
pt3dadd(-124.549, 415.136, -22.542, 0.884)
pt3dadd(-124.656, 415.158, -22.582, 0.9)
pt3dadd(-124.764, 415.181, -22.622, 0.916)
pt3dadd(-124.867, 415.2, -22.668, 0.932)
pt3dadd(-124.946, 415.204, -22.743, 0.954)
pt3dadd(-125.026, 415.206, -22.819, 0.974)
pt3dadd(-125.105, 415.208, -22.894, 0.994)
pt3dadd(-125.184, 415.211, -22.969, 1.014)
pt3dadd(-125.27, 415.223, -23.034, 1.032)
pt3dadd(-125.376, 415.255, -23.073, 1.044)
pt3dadd(-125.482, 415.286, -23.112, 1.054)
pt3dadd(-125.587, 415.319, -23.151, 1.066)
pt3dadd(-125.693, 415.351, -23.19, 1.076)
pt3dadd(-125.796, 415.373, -23.237, 1.068)
pt3dadd(-125.899, 415.39, -23.287, 1.052)
pt3dadd(-126.001, 415.406, -23.337, 1.036)
pt3dadd(-126.104, 415.424, -23.387, 1.02)
pt3dadd(-126.208, 415.44, -23.436, 1.002)
pt3dadd(-126.319, 415.44, -23.473, 0.98)
pt3dadd(-126.43, 415.44, -23.51, 0.956)
pt3dadd(-126.541, 415.44, -23.547, 0.932)
pt3dadd(-126.653, 415.44, -23.584, 0.91)
pt3dadd(-126.764, 415.44, -23.621, 0.886)
pt3dadd(-126.872, 415.44, -23.664, 0.87)
pt3dadd(-126.98, 415.44, -23.708, 0.854)
pt3dadd(-127.087, 415.44, -23.753, 0.84)
pt3dadd(-127.195, 415.44, -23.798, 0.826)
pt3dadd(-127.302, 415.44, -23.843, 0.812)
pt3dadd(-127.408, 415.453, -23.887, 0.816)
pt3dadd(-127.511, 415.483, -23.931, 0.844)
pt3dadd(-127.615, 415.513, -23.976, 0.872)
pt3dadd(-127.718, 415.542, -24.02, 0.9)
pt3dadd(-127.822, 415.572, -24.065, 0.928)
pt3dadd(-127.907, 415.596, -24.131, 0.978)
pt3dadd(-127.992, 415.62, -24.199, 1.028)
pt3dadd(-128.076, 415.645, -24.267, 1.08)
pt3dadd(-128.161, 415.669, -24.335, 1.132)
pt3dadd(-128.232, 415.68, -24.413, 1.182)
pt3dadd(-128.292, 415.68, -24.5, 1.23)
pt3dadd(-128.352, 415.68, -24.587, 1.28)
pt3dadd(-128.412, 415.68, -24.673, 1.328)
pt3dadd(-128.472, 415.68, -24.76, 1.378)
pt3dadd(-128.531, 415.68, -24.847, 1.416)
pt3dadd(-128.591, 415.68, -24.934, 1.44)
pt3dadd(-128.651, 415.68, -25.02, 1.466)
pt3dadd(-128.711, 415.68, -25.107, 1.49)
pt3dadd(-128.771, 415.68, -25.194, 1.514)
pt3dadd(-128.842, 415.68, -25.272, 1.538)
pt3dadd(-128.94, 415.68, -25.328, 1.562)
pt3dadd(-129.038, 415.682, -25.386, 1.582)
pt3dadd(-129.128, 415.703, -25.449, 1.582)
pt3dadd(-129.22, 415.729, -25.51, 1.588)
pt3dadd(-129.314, 415.772, -25.559, 1.616)
pt3dadd(-129.419, 415.802, -25.59, 1.646)
pt3dadd(-129.539, 415.806, -25.594, 1.682)
pt3dadd(-129.659, 415.811, -25.598, 1.718)
pt3dadd(-129.773, 415.832, -25.618, 1.754)
pt3dadd(-129.883, 415.864, -25.647, 1.792)
pt3dadd(-129.994, 415.895, -25.677, 1.83)
pt3dadd(-130.094, 415.92, -25.718, 1.86)
pt3dadd(-130.163, 415.92, -25.8, 1.872)
pt3dadd(-130.232, 415.92, -25.881, 1.878)
pt3dadd(-130.324, 415.92, -25.946, 1.798)
pt3dadd(-130.409, 415.92, -26.016, 1.768)
pt3dadd(-130.495, 415.92, -26.085, 1.736)
pt3dadd(-130.582, 415.92, -26.155, 1.706)
pt3dadd(-130.668, 415.92, -26.225, 1.676)
pt3dadd(-130.758, 415.927, -26.29, 1.642)
pt3dadd(-130.854, 415.944, -26.348, 1.604)
pt3dadd(-130.95, 415.962, -26.406, 1.566)
pt3dadd(-131.046, 415.98, -26.464, 1.528)
pt3dadd(-131.142, 415.997, -26.522, 1.488)
pt3dadd(-131.257, 416.005, -26.542, 1.462)
pt3dadd(-131.376, 416.012, -26.553, 1.436)
pt3dadd(-131.495, 416.018, -26.564, 1.412)
pt3dadd(-131.614, 416.026, -26.575, 1.386)
pt3dadd(-131.732, 416.032, -26.586, 1.362)
pt3dadd(-131.852, 416.039, -26.597, 1.336)
pt3dadd(-131.971, 416.04, -26.611, 1.316)
pt3dadd(-132.09, 416.04, -26.625, 1.294)
pt3dadd(-132.209, 416.04, -26.64, 1.274)
pt3dadd(-132.328, 416.04, -26.654, 1.254)
pt3dadd(-132.446, 416.04, -26.669, 1.234)
pt3dadd(-132.565, 416.04, -26.683, 1.214)
pt3dadd(-132.677, 416.056, -26.711, 1.202)
pt3dadd(-132.785, 416.081, -26.749, 1.196)
pt3dadd(-132.893, 416.106, -26.787, 1.192)
pt3dadd(-133.001, 416.132, -26.825, 1.186)
pt3dadd(-133.109, 416.158, -26.863, 1.18)
pt3dadd(-133.198, 416.185, -26.926, 1.17)
pt3dadd(-133.283, 416.213, -26.993, 1.158)
pt3dadd(-133.368, 416.24, -27.059, 1.146)
pt3dadd(-133.454, 416.267, -27.125, 1.136)
pt3dadd(-133.549, 416.28, -27.183, 1.122)
pt3dadd(-133.654, 416.28, -27.232, 1.108)
pt3dadd(-133.758, 416.28, -27.282, 1.092)
pt3dadd(-133.861, 416.28, -27.332, 1.078)
pt3dadd(-133.966, 416.28, -27.382, 1.064)
pt3dadd(-134.069, 416.28, -27.433, 1.044)
pt3dadd(-134.171, 416.28, -27.485, 1.02)
pt3dadd(-134.273, 416.28, -27.538, 0.996)
pt3dadd(-134.375, 416.28, -27.59, 0.97)
pt3dadd(-134.478, 416.28, -27.642, 0.946)
pt3dadd(-134.58, 416.286, -27.693, 0.924)
pt3dadd(-134.686, 416.303, -27.74, 0.908)
}
}
proc shape3d_89() {
dend_5[3] { pt3dadd(-134.79, 416.32, -27.787, 0.892)
pt3dadd(-134.894, 416.336, -27.834, 0.876)
pt3dadd(-134.999, 416.353, -27.881, 0.86)
pt3dadd(-135.104, 416.393, -27.9, 0.854)
pt3dadd(-135.212, 416.446, -27.9, 0.882)
pt3dadd(-135.319, 416.5, -27.9, 0.904)
pt3dadd(-135.427, 416.554, -27.9, 0.904)
pt3dadd(-135.529, 416.61, -27.919, 0.862)
pt3dadd(-135.622, 416.639, -27.974, 0.76)
pt3dadd(-135.71, 416.64, -28.04, 0.736)
pt3dadd(-135.79, 416.629, -28.114, 0.794)
pt3dadd(-135.838, 416.584, -28.196, 0.784)
pt3dadd(-135.881, 416.533, -28.278, 0.678)
pt3dadd(-135.96, 416.531, -28.353, 0.668)
pt3dadd(-136.039, 416.527, -28.428, 0.658)
pt3dadd(-136.118, 416.525, -28.503, 0.648)
pt3dadd(-136.198, 416.522, -28.579, 0.636)
pt3dadd(-136.277, 416.52, -28.653, 0.628)
pt3dadd(-136.357, 416.52, -28.727, 0.628)
pt3dadd(-136.438, 416.52, -28.801, 0.628)
pt3dadd(-136.519, 416.52, -28.875, 0.628)
pt3dadd(-136.6, 416.52, -28.949, 0.628)
pt3dadd(-136.684, 416.52, -29.019, 0.63)
pt3dadd(-136.788, 416.52, -29.069, 0.65)
pt3dadd(-136.892, 416.52, -29.119, 0.67)
pt3dadd(-136.996, 416.52, -29.169, 0.69)
pt3dadd(-137.1, 416.52, -29.219, 0.71)
pt3dadd(-137.204, 416.521, -29.268, 0.73)
pt3dadd(-137.318, 416.542, -29.294, 0.748)
pt3dadd(-137.432, 416.563, -29.321, 0.768)
pt3dadd(-137.546, 416.585, -29.347, 0.788)
pt3dadd(-137.659, 416.605, -29.374, 0.808)
pt3dadd(-137.773, 416.627, -29.4, 0.828)
pt3dadd(-137.892, 416.629, -29.415, 0.832)
pt3dadd(-138.011, 416.632, -29.429, 0.838)
pt3dadd(-138.13, 416.633, -29.444, 0.842)
pt3dadd(-138.248, 416.635, -29.459, 0.846)
pt3dadd(-138.367, 416.638, -29.473, 0.85)
pt3dadd(-138.486, 416.64, -29.488, 0.854)
pt3dadd(-138.6, 416.64, -29.517, 0.832)
pt3dadd(-138.715, 416.64, -29.547, 0.81)
pt3dadd(-138.829, 416.64, -29.576, 0.788)
pt3dadd(-138.944, 416.64, -29.606, 0.766)
pt3dadd(-139.058, 416.64, -29.636, 0.742)
pt3dadd(-139.172, 416.646, -29.664, 0.704)
pt3dadd(-139.288, 416.664, -29.689, 0.636)
pt3dadd(-139.397, 416.686, -29.721, 0.57)
pt3dadd(-139.472, 416.731, -29.789, 0.514)
pt3dadd(-139.54, 416.76, -29.865, 0.474)
pt3dadd(-139.592, 416.76, -29.955, 0.462)
pt3dadd(-139.646, 416.76, -30.044, 0.452)
pt3dadd(-139.7, 416.76, -30.133, 0.452)
pt3dadd(-139.753, 416.76, -30.223, 0.452)
pt3dadd(-139.817, 416.821, -30.288, 0.452)
pt3dadd(-139.882, 416.891, -30.349, 0.452)
pt3dadd(-139.946, 416.959, -30.411, 0.452)
pt3dadd(-140.042, 416.981, -30.468, 0.464)
pt3dadd(-140.138, 417, -30.525, 0.482)
pt3dadd(-140.231, 417, -30.589, 0.562)
pt3dadd(-140.322, 417, -30.654, 0.594)
pt3dadd(-140.413, 417, -30.719, 0.624)
pt3dadd(-140.504, 417, -30.783, 0.654)
pt3dadd(-140.597, 417, -30.848, 0.684)
pt3dadd(-140.686, 417, -30.915, 0.716)
pt3dadd(-140.772, 417, -30.985, 0.752)
pt3dadd(-140.858, 417, -31.054, 0.788)
pt3dadd(-140.944, 417, -31.124, 0.822)
pt3dadd(-141.03, 417, -31.193, 0.858)
pt3dadd(-141.109, 417, -31.268, 0.914)
pt3dadd(-141.176, 417, -31.351, 0.994)
pt3dadd(-141.229, 417, -31.438, 1.066)
pt3dadd(-141.239, 417, -31.537, 1.112)
pt3dadd(-141.248, 417, -31.637, 1.156)
pt3dadd(-141.302, 417, -31.713, 1.202)
pt3dadd(-141.407, 417, -31.764, 1.248)
pt3dadd(-141.515, 417, -31.804, 1.284)
pt3dadd(-141.634, 417, -31.816, 1.292)
pt3dadd(-141.752, 417, -31.828, 1.302)
pt3dadd(-141.871, 416.998, -31.843, 1.302)
pt3dadd(-141.99, 416.995, -31.858, 1.296)
pt3dadd(-142.108, 416.992, -31.874, 1.29)
pt3dadd(-142.226, 416.989, -31.889, 1.284)
pt3dadd(-142.327, 416.954, -31.902, 1.266)
pt3dadd(-142.391, 416.852, -31.907, 1.218)
pt3dadd(-142.444, 416.748, -31.918, 1.142)
pt3dadd(-142.511, 416.676, -31.94, 1.038)
pt3dadd(-142.626, 416.642, -31.953, 1.004)
pt3dadd(-142.74, 416.609, -31.966, 0.968)
pt3dadd(-142.854, 416.575, -31.979, 0.934)
pt3dadd(-142.968, 416.542, -31.992, 0.9)
pt3dadd(-143.084, 416.52, -32, 0.86)
pt3dadd(-143.204, 416.52, -32, 0.81)
pt3dadd(-143.324, 416.52, -32, 0.76)
pt3dadd(-143.441, 416.503, -32.006, 0.714)
pt3dadd(-143.55, 416.458, -32.022, 0.678)
pt3dadd(-143.645, 416.404, -32.05, 0.658)
pt3dadd(-143.706, 416.327, -32.108, 0.672)
pt3dadd(-143.778, 416.278, -32.173, 0.708)
pt3dadd(-143.856, 416.249, -32.245, 0.762)
pt3dadd(-143.952, 416.204, -32.285, 0.86)
pt3dadd(-144.044, 416.156, -32.328, 0.948)
pt3dadd(-144.121, 416.116, -32.397, 0.996)
pt3dadd(-144.198, 416.074, -32.466, 1.044)
pt3dadd(-144.274, 416.033, -32.535, 1.092)
pt3dadd(-144.349, 415.988, -32.604, 1.14)
pt3dadd(-144.421, 415.937, -32.672, 1.182)
pt3dadd(-144.492, 415.885, -32.739, 1.226)
pt3dadd(-144.564, 415.832, -32.807, 1.268)
pt3dadd(-144.637, 415.78, -32.872, 1.308)
pt3dadd(-144.727, 415.722, -32.917, 1.326)
pt3dadd(-144.817, 415.664, -32.963, 1.344)
pt3dadd(-144.907, 415.607, -33.008, 1.362)
pt3dadd(-144.997, 415.549, -33.054, 1.38)
pt3dadd(-145.051, 415.474, -33.117, 1.394)
pt3dadd(-145.114, 415.399, -33.17, 1.404)
pt3dadd(-145.21, 415.331, -33.188, 1.39)
pt3dadd(-145.31, 415.27, -33.196, 1.378)
pt3dadd(-145.423, 415.232, -33.18, 1.366)
pt3dadd(-145.536, 415.199, -33.163, 1.348)
pt3dadd(-145.65, 415.194, -33.134, 1.294)
pt3dadd(-145.765, 415.188, -33.105, 1.24)
pt3dadd(-145.856, 415.146, -33.146, 1.196)
pt3dadd(-145.943, 415.097, -33.202, 1.154)
pt3dadd(-146.028, 415.048, -33.259, 1.11)
pt3dadd(-146.136, 415.008, -33.28, 1.064)
pt3dadd(-146.249, 414.971, -33.296, 1.018)
pt3dadd(-146.366, 414.949, -33.3, 0.984)
pt3dadd(-146.473, 414.898, -33.3, 0.972)
pt3dadd(-146.576, 414.838, -33.3, 0.962)
pt3dadd(-146.681, 414.778, -33.3, 0.952)
pt3dadd(-146.785, 414.718, -33.3, 0.942)
pt3dadd(-146.888, 414.658, -33.3, 0.932)
pt3dadd(-146.996, 414.605, -33.3, 0.908)
pt3dadd(-147.104, 414.553, -33.3, 0.88)
pt3dadd(-147.214, 414.503, -33.3, 0.852)
pt3dadd(-147.323, 414.452, -33.3, 0.824)
pt3dadd(-147.431, 414.402, -33.3, 0.794)
pt3dadd(-147.54, 414.352, -33.307, 0.766)
pt3dadd(-147.648, 414.302, -33.322, 0.736)
pt3dadd(-147.755, 414.253, -33.338, 0.708)
pt3dadd(-147.863, 414.204, -33.353, 0.678)
pt3dadd(-147.971, 414.154, -33.365, 0.652)
pt3dadd(-148.073, 414.094, -33.351, 0.652)
pt3dadd(-148.176, 414.034, -33.337, 0.652)
pt3dadd(-148.278, 413.974, -33.323, 0.652)
pt3dadd(-148.381, 413.915, -33.308, 0.652)
pt3dadd(-148.475, 413.844, -33.291, 0.672)
pt3dadd(-148.556, 413.76, -33.271, 0.718)
pt3dadd(-148.638, 413.675, -33.251, 0.764)
pt3dadd(-148.72, 413.591, -33.231, 0.808)
pt3dadd(-148.8, 413.506, -33.211, 0.854)
pt3dadd(-148.822, 413.387, -33.207, 0.926)
pt3dadd(-148.843, 413.269, -33.202, 0.996)
pt3dadd(-148.91, 413.2, -33.183, 1.048)
pt3dadd(-149.021, 413.173, -33.151, 1.086)
pt3dadd(-149.13, 413.135, -33.133, 1.078)
pt3dadd(-149.238, 413.081, -33.133, 1.02)
pt3dadd(-149.322, 413.011, -33.166, 0.942)
pt3dadd(-149.399, 412.934, -33.21, 0.856)
pt3dadd(-149.502, 412.924, -33.258, 0.73)
pt3dadd(-149.602, 412.92, -33.314, 0.596)
pt3dadd(-149.687, 412.891, -33.375, 0.536)
pt3dadd(-149.747, 412.801, -33.411, 0.602)
pt3dadd(-149.789, 412.702, -33.453, 0.668)
pt3dadd(-149.856, 412.616, -33.465, 0.678)
pt3dadd(-149.9, 412.57, -33.384, 0.678)
pt3dadd(-149.954, 412.56, -33.297, 0.678)
pt3dadd(-150.038, 412.542, -33.229, 0.678)
pt3dadd(-150.133, 412.481, -33.203, 0.678)
pt3dadd(-150.205, 412.386, -33.202, 0.678)
pt3dadd(-150.235, 412.278, -33.232, 0.678)
pt3dadd(-150.257, 412.21, -33.308, 0.678)
pt3dadd(-150.32, 412.166, -33.381, 0.696)
pt3dadd(-150.408, 412.093, -33.405, 0.756)
pt3dadd(-150.506, 412.03, -33.427, 0.768)
pt3dadd(-150.605, 411.967, -33.45, 0.778)
pt3dadd(-150.704, 411.905, -33.472, 0.79)
pt3dadd(-150.803, 411.842, -33.494, 0.8)
pt3dadd(-150.866, 411.746, -33.513, 0.794)
pt3dadd(-150.919, 411.641, -33.529, 0.782)
pt3dadd(-151.001, 411.608, -33.581, 0.742)
pt3dadd(-151.092, 411.602, -33.646, 0.694)
pt3dadd(-151.202, 411.6, -33.675, 0.62)
pt3dadd(-151.321, 411.6, -33.688, 0.536)
pt3dadd(-151.44, 411.6, -33.7, 0.452)
}
dend_5[4] {pt3dclear()
pt3dadd(-69.24, 361.92, -17.8, 1.156)
pt3dadd(-69.206, 361.943, -17.749, 1.154)
pt3dadd(-69.152, 361.979, -17.665, 1.152)
pt3dadd(-69.097, 362.016, -17.581, 1.15)
pt3dadd(-69.042, 362.052, -17.498, 1.148)
pt3dadd(-68.987, 362.088, -17.414, 1.146)
pt3dadd(-68.933, 362.125, -17.33, 1.144)
pt3dadd(-68.878, 362.161, -17.247, 1.142)
pt3dadd(-68.823, 362.198, -17.163, 1.14)
pt3dadd(-68.768, 362.234, -17.08, 1.138)
pt3dadd(-68.714, 362.27, -16.996, 1.136)
pt3dadd(-68.659, 362.308, -16.912, 1.134)
pt3dadd(-68.604, 362.344, -16.829, 1.132)
pt3dadd(-68.55, 362.381, -16.745, 1.132)
pt3dadd(-68.541, 362.452, -16.7, 1.126)
}
}
proc shape3d_90() {
dend_5[4] { pt3dadd(-68.585, 362.563, -16.7, 1.116)
pt3dadd(-68.63, 362.675, -16.7, 1.108)
pt3dadd(-68.674, 362.785, -16.7, 1.098)
pt3dadd(-68.719, 362.897, -16.7, 1.088)
pt3dadd(-68.764, 363.008, -16.7, 1.08)
pt3dadd(-68.811, 363.119, -16.7, 1.08)
pt3dadd(-68.859, 363.229, -16.7, 1.08)
pt3dadd(-68.906, 363.338, -16.7, 1.08)
pt3dadd(-68.954, 363.449, -16.7, 1.08)
pt3dadd(-69.001, 363.559, -16.7, 1.08)
pt3dadd(-69.072, 363.655, -16.7, 1.094)
pt3dadd(-69.15, 363.746, -16.7, 1.116)
pt3dadd(-69.227, 363.838, -16.7, 1.136)
pt3dadd(-69.305, 363.929, -16.7, 1.156)
pt3dadd(-69.383, 364.021, -16.7, 1.176)
pt3dadd(-69.433, 364.126, -16.684, 1.206)
pt3dadd(-69.475, 364.236, -16.662, 1.236)
pt3dadd(-69.517, 364.345, -16.641, 1.268)
pt3dadd(-69.559, 364.454, -16.62, 1.3)
pt3dadd(-69.6, 364.564, -16.598, 1.332)
pt3dadd(-69.592, 364.674, -16.559, 1.356)
pt3dadd(-69.584, 364.784, -16.52, 1.382)
pt3dadd(-69.576, 364.895, -16.481, 1.406)
pt3dadd(-69.568, 365.004, -16.441, 1.43)
pt3dadd(-69.561, 365.114, -16.402, 1.454)
pt3dadd(-69.548, 365.233, -16.4, 1.456)
pt3dadd(-69.536, 365.352, -16.4, 1.456)
pt3dadd(-69.523, 365.472, -16.4, 1.456)
pt3dadd(-69.51, 365.591, -16.4, 1.456)
pt3dadd(-69.498, 365.711, -16.4, 1.456)
pt3dadd(-69.485, 365.83, -16.4, 1.456)
pt3dadd(-69.469, 365.948, -16.4, 1.446)
pt3dadd(-69.449, 366.067, -16.4, 1.43)
pt3dadd(-69.429, 366.186, -16.4, 1.414)
pt3dadd(-69.409, 366.304, -16.4, 1.398)
pt3dadd(-69.39, 366.422, -16.4, 1.38)
pt3dadd(-69.37, 366.54, -16.4, 1.364)
pt3dadd(-69.36, 366.659, -16.394, 1.342)
pt3dadd(-69.36, 366.779, -16.381, 1.314)
pt3dadd(-69.36, 366.898, -16.369, 1.286)
pt3dadd(-69.36, 367.016, -16.357, 1.258)
pt3dadd(-69.36, 367.135, -16.344, 1.23)
pt3dadd(-69.36, 367.255, -16.332, 1.202)
pt3dadd(-69.36, 367.372, -16.312, 1.174)
pt3dadd(-69.36, 367.478, -16.267, 1.144)
pt3dadd(-69.36, 367.585, -16.223, 1.116)
pt3dadd(-69.36, 367.693, -16.178, 1.088)
pt3dadd(-69.36, 367.8, -16.133, 1.058)
pt3dadd(-69.36, 367.908, -16.088, 1.03)
pt3dadd(-69.36, 368.002, -16.026, 1.01)
pt3dadd(-69.36, 368.095, -15.963, 0.988)
pt3dadd(-69.36, 368.189, -15.901, 0.968)
pt3dadd(-69.36, 368.282, -15.838, 0.948)
pt3dadd(-69.36, 368.377, -15.777, 0.93)
pt3dadd(-69.36, 368.491, -15.747, 0.934)
pt3dadd(-69.36, 368.606, -15.717, 0.938)
pt3dadd(-69.36, 368.72, -15.687, 0.942)
pt3dadd(-69.36, 368.834, -15.658, 0.948)
pt3dadd(-69.36, 368.95, -15.628, 0.952)
pt3dadd(-69.36, 369.055, -15.585, 0.96)
pt3dadd(-69.36, 369.151, -15.524, 0.976)
pt3dadd(-69.36, 369.247, -15.465, 0.992)
pt3dadd(-69.36, 369.343, -15.405, 1.006)
pt3dadd(-69.36, 369.44, -15.345, 1.022)
pt3dadd(-69.36, 369.523, -15.274, 1.04)
pt3dadd(-69.36, 369.592, -15.192, 1.064)
pt3dadd(-69.36, 369.672, -15.124, 1.08)
pt3dadd(-69.36, 369.786, -15.091, 1.08)
pt3dadd(-69.36, 369.899, -15.058, 1.08)
pt3dadd(-69.341, 369.978, -14.986, 1.056)
pt3dadd(-69.32, 370.054, -14.911, 1.03)
pt3dadd(-69.232, 370.127, -14.88, 1.002)
pt3dadd(-69.158, 370.2, -14.841, 0.974)
pt3dadd(-69.146, 370.272, -14.761, 0.944)
pt3dadd(-69.134, 370.343, -14.682, 0.914)
pt3dadd(-69.122, 370.415, -14.602, 0.884)
pt3dadd(-69.104, 370.518, -14.558, 0.828)
pt3dadd(-69.085, 370.627, -14.52, 0.768)
pt3dadd(-69.018, 370.718, -14.496, 0.624)
pt3dadd(-68.953, 370.812, -14.465, 0.594)
pt3dadd(-68.888, 370.906, -14.434, 0.566)
pt3dadd(-68.822, 370.999, -14.403, 0.536)
pt3dadd(-68.757, 371.093, -14.372, 0.506)
pt3dadd(-68.682, 371.178, -14.342, 0.484)
pt3dadd(-68.604, 371.263, -14.313, 0.462)
pt3dadd(-68.527, 371.348, -14.284, 0.44)
pt3dadd(-68.459, 371.436, -14.248, 0.422)
pt3dadd(-68.406, 371.527, -14.201, 0.408)
pt3dadd(-68.353, 371.62, -14.154, 0.396)
pt3dadd(-68.301, 371.711, -14.107, 0.382)
pt3dadd(-68.277, 371.76, -14.029, 0.376)
pt3dadd(-68.271, 371.782, -13.93, 0.376)
pt3dadd(-68.26, 371.813, -13.841, 0.376)
pt3dadd(-68.205, 371.916, -13.819, 0.376)
pt3dadd(-68.148, 372.016, -13.807, 0.376)
pt3dadd(-68.081, 372.106, -13.844, 0.376)
pt3dadd(-68.016, 372.199, -13.867, 0.388)
pt3dadd(-67.953, 372.301, -13.867, 0.418)
pt3dadd(-67.926, 372.395, -13.821, 0.478)
pt3dadd(-67.897, 372.487, -13.772, 0.538)
pt3dadd(-67.829, 372.584, -13.755, 0.572)
pt3dadd(-67.761, 372.68, -13.738, 0.606)
pt3dadd(-67.694, 372.778, -13.72, 0.638)
pt3dadd(-67.626, 372.875, -13.703, 0.672)
pt3dadd(-67.582, 372.985, -13.7, 0.696)
pt3dadd(-67.543, 373.099, -13.7, 0.72)
pt3dadd(-67.505, 373.212, -13.7, 0.742)
pt3dadd(-67.466, 373.326, -13.7, 0.764)
pt3dadd(-67.427, 373.44, -13.7, 0.788)
pt3dadd(-67.396, 373.555, -13.7, 0.808)
pt3dadd(-67.384, 373.674, -13.7, 0.824)
pt3dadd(-67.371, 373.794, -13.7, 0.84)
pt3dadd(-67.359, 373.913, -13.7, 0.856)
pt3dadd(-67.346, 374.033, -13.7, 0.872)
pt3dadd(-67.334, 374.152, -13.7, 0.888)
pt3dadd(-67.321, 374.272, -13.7, 0.902)
pt3dadd(-67.32, 374.39, -13.687, 0.916)
pt3dadd(-67.32, 374.509, -13.672, 0.928)
pt3dadd(-67.32, 374.627, -13.658, 0.94)
pt3dadd(-67.32, 374.746, -13.643, 0.952)
pt3dadd(-67.32, 374.864, -13.629, 0.964)
pt3dadd(-67.32, 374.983, -13.615, 0.976)
pt3dadd(-67.32, 375.103, -13.61, 0.982)
pt3dadd(-67.32, 375.223, -13.608, 0.986)
pt3dadd(-67.32, 375.343, -13.607, 0.99)
pt3dadd(-67.32, 375.463, -13.605, 0.992)
pt3dadd(-67.32, 375.583, -13.603, 0.996)
pt3dadd(-67.32, 375.703, -13.602, 1)
pt3dadd(-67.32, 375.823, -13.6, 1.004)
pt3dadd(-67.32, 375.942, -13.614, 0.998)
pt3dadd(-67.32, 376.06, -13.631, 0.988)
pt3dadd(-67.32, 376.178, -13.647, 0.98)
pt3dadd(-67.32, 376.297, -13.663, 0.972)
pt3dadd(-67.32, 376.415, -13.68, 0.964)
pt3dadd(-67.32, 376.534, -13.696, 0.956)
pt3dadd(-67.32, 376.654, -13.7, 0.938)
pt3dadd(-67.32, 376.774, -13.7, 0.916)
pt3dadd(-67.32, 376.894, -13.7, 0.894)
pt3dadd(-67.32, 377.014, -13.7, 0.874)
pt3dadd(-67.32, 377.134, -13.7, 0.852)
pt3dadd(-67.32, 377.254, -13.7, 0.83)
pt3dadd(-67.32, 377.374, -13.7, 0.808)
pt3dadd(-67.33, 377.492, -13.7, 0.788)
pt3dadd(-67.342, 377.612, -13.7, 0.768)
pt3dadd(-67.355, 377.731, -13.7, 0.748)
pt3dadd(-67.368, 377.851, -13.7, 0.73)
pt3dadd(-67.38, 377.97, -13.7, 0.71)
pt3dadd(-67.393, 378.09, -13.7, 0.69)
pt3dadd(-67.403, 378.209, -13.693, 0.676)
pt3dadd(-67.41, 378.326, -13.676, 0.672)
pt3dadd(-67.417, 378.444, -13.658, 0.668)
pt3dadd(-67.424, 378.562, -13.641, 0.664)
pt3dadd(-67.431, 378.68, -13.623, 0.658)
pt3dadd(-67.437, 378.798, -13.606, 0.654)
pt3dadd(-67.44, 378.918, -13.601, 0.662)
pt3dadd(-67.44, 379.037, -13.603, 0.676)
pt3dadd(-67.44, 379.157, -13.604, 0.692)
pt3dadd(-67.44, 379.277, -13.606, 0.706)
pt3dadd(-67.44, 379.397, -13.608, 0.72)
pt3dadd(-67.44, 379.517, -13.609, 0.736)
pt3dadd(-67.44, 379.637, -13.611, 0.75)
pt3dadd(-67.44, 379.752, -13.635, 0.77)
pt3dadd(-67.44, 379.866, -13.668, 0.794)
pt3dadd(-67.44, 379.98, -13.7, 0.816)
pt3dadd(-67.44, 380.093, -13.732, 0.838)
pt3dadd(-67.44, 380.207, -13.764, 0.862)
pt3dadd(-67.44, 380.322, -13.789, 0.88)
pt3dadd(-67.44, 380.442, -13.791, 0.888)
pt3dadd(-67.44, 380.562, -13.793, 0.896)
pt3dadd(-67.44, 380.682, -13.794, 0.902)
pt3dadd(-67.44, 380.802, -13.796, 0.91)
pt3dadd(-67.44, 380.922, -13.797, 0.918)
pt3dadd(-67.44, 381.042, -13.799, 0.924)
pt3dadd(-67.441, 381.162, -13.8, 0.93)
pt3dadd(-67.443, 381.282, -13.8, 0.93)
pt3dadd(-67.445, 381.402, -13.8, 0.93)
pt3dadd(-67.446, 381.522, -13.8, 0.93)
pt3dadd(-67.448, 381.642, -13.8, 0.93)
pt3dadd(-67.45, 381.762, -13.8, 0.93)
pt3dadd(-67.452, 381.882, -13.8, 0.93)
pt3dadd(-67.462, 382.001, -13.8, 0.93)
pt3dadd(-67.482, 382.12, -13.8, 0.93)
pt3dadd(-67.502, 382.237, -13.8, 0.93)
pt3dadd(-67.521, 382.356, -13.8, 0.93)
pt3dadd(-67.541, 382.475, -13.8, 0.93)
pt3dadd(-67.561, 382.592, -13.8, 0.93)
pt3dadd(-67.581, 382.71, -13.793, 0.93)
pt3dadd(-67.601, 382.826, -13.774, 0.936)
pt3dadd(-67.621, 382.943, -13.755, 0.94)
pt3dadd(-67.641, 383.059, -13.736, 0.946)
pt3dadd(-67.662, 383.174, -13.717, 0.95)
pt3dadd(-67.68, 383.291, -13.7, 0.956)
pt3dadd(-67.68, 383.411, -13.7, 0.966)
pt3dadd(-67.68, 383.531, -13.7, 0.976)
pt3dadd(-67.68, 383.651, -13.7, 0.988)
pt3dadd(-67.68, 383.771, -13.7, 0.998)
pt3dadd(-67.68, 383.891, -13.7, 1.01)
pt3dadd(-67.68, 384.011, -13.7, 1.02)
pt3dadd(-67.68, 384.131, -13.7, 1.03)
pt3dadd(-67.68, 384.251, -13.7, 1.042)
}
}
proc shape3d_91() {
dend_5[4] { pt3dadd(-67.68, 384.371, -13.7, 1.052)
pt3dadd(-67.68, 384.491, -13.7, 1.062)
pt3dadd(-67.68, 384.611, -13.7, 1.074)
pt3dadd(-67.68, 384.731, -13.7, 1.084)
pt3dadd(-67.68, 384.851, -13.7, 1.096)
pt3dadd(-67.68, 384.971, -13.699, 1.106)
pt3dadd(-67.68, 385.091, -13.695, 1.13)
pt3dadd(-67.68, 385.211, -13.69, 1.152)
pt3dadd(-67.68, 385.331, -13.685, 1.174)
pt3dadd(-67.68, 385.451, -13.68, 1.198)
pt3dadd(-67.68, 385.571, -13.675, 1.22)
pt3dadd(-67.68, 385.691, -13.67, 1.242)
pt3dadd(-67.68, 385.81, -13.662, 1.26)
pt3dadd(-67.68, 385.93, -13.652, 1.272)
pt3dadd(-67.68, 386.048, -13.641, 1.284)
pt3dadd(-67.68, 386.168, -13.631, 1.296)
pt3dadd(-67.68, 386.287, -13.62, 1.308)
pt3dadd(-67.68, 386.406, -13.61, 1.32)
pt3dadd(-67.68, 386.526, -13.6, 1.332)
pt3dadd(-67.68, 386.646, -13.596, 1.34)
pt3dadd(-67.68, 386.766, -13.592, 1.348)
pt3dadd(-67.68, 386.884, -13.583, 1.348)
pt3dadd(-67.68, 386.995, -13.544, 1.306)
pt3dadd(-67.68, 387.106, -13.505, 1.262)
pt3dadd(-67.726, 387.179, -13.44, 1.218)
pt3dadd(-67.785, 387.242, -13.374, 1.178)
pt3dadd(-67.895, 387.262, -13.336, 1.154)
pt3dadd(-68.002, 387.284, -13.3, 1.13)
pt3dadd(-68.043, 387.397, -13.3, 1.124)
pt3dadd(-68.084, 387.51, -13.3, 1.116)
pt3dadd(-68.124, 387.623, -13.3, 1.11)
pt3dadd(-68.161, 387.736, -13.3, 1.102)
pt3dadd(-68.165, 387.856, -13.3, 1.086)
pt3dadd(-68.17, 387.976, -13.3, 1.068)
pt3dadd(-68.186, 388.093, -13.3, 1.03)
pt3dadd(-68.254, 388.19, -13.3, 0.962)
pt3dadd(-68.335, 388.278, -13.3, 0.926)
pt3dadd(-68.39, 388.378, -13.3, 0.898)
pt3dadd(-68.4, 388.498, -13.3, 0.88)
pt3dadd(-68.409, 388.618, -13.3, 0.862)
pt3dadd(-68.448, 388.722, -13.279, 0.846)
pt3dadd(-68.506, 388.818, -13.242, 0.832)
pt3dadd(-68.566, 388.88, -13.176, 0.828)
pt3dadd(-68.626, 388.932, -13.101, 0.828)
pt3dadd(-68.667, 389.038, -13.07, 0.814)
pt3dadd(-68.708, 389.144, -13.039, 0.798)
pt3dadd(-68.749, 389.251, -13.008, 0.782)
pt3dadd(-68.76, 389.368, -13, 0.766)
pt3dadd(-68.76, 389.488, -13, 0.75)
pt3dadd(-68.76, 389.608, -13, 0.732)
pt3dadd(-68.76, 389.728, -13, 0.71)
pt3dadd(-68.773, 389.846, -13, 0.716)
pt3dadd(-68.79, 389.965, -13, 0.732)
pt3dadd(-68.807, 390.084, -13, 0.748)
pt3dadd(-68.824, 390.203, -13, 0.764)
pt3dadd(-68.842, 390.322, -13, 0.78)
pt3dadd(-68.859, 390.44, -13, 0.796)
pt3dadd(-68.868, 390.56, -13, 0.81)
pt3dadd(-68.87, 390.68, -13, 0.82)
pt3dadd(-68.872, 390.8, -13, 0.832)
pt3dadd(-68.874, 390.92, -13, 0.842)
pt3dadd(-68.875, 391.04, -13, 0.854)
pt3dadd(-68.877, 391.16, -13, 0.864)
pt3dadd(-68.879, 391.28, -13, 0.876)
pt3dadd(-68.88, 391.4, -12.999, 0.884)
pt3dadd(-68.88, 391.52, -12.997, 0.892)
pt3dadd(-68.88, 391.64, -12.996, 0.898)
pt3dadd(-68.88, 391.759, -12.994, 0.906)
pt3dadd(-68.88, 391.879, -12.993, 0.912)
pt3dadd(-68.88, 391.999, -12.991, 0.92)
pt3dadd(-68.88, 392.119, -12.989, 0.928)
pt3dadd(-68.885, 392.238, -12.977, 0.92)
pt3dadd(-68.892, 392.357, -12.962, 0.906)
pt3dadd(-68.899, 392.476, -12.947, 0.894)
pt3dadd(-68.906, 392.593, -12.932, 0.88)
pt3dadd(-68.913, 392.712, -12.916, 0.868)
pt3dadd(-68.919, 392.831, -12.901, 0.854)
pt3dadd(-68.97, 392.938, -12.892, 0.844)
pt3dadd(-69.025, 393.044, -12.883, 0.834)
pt3dadd(-69.079, 393.15, -12.873, 0.824)
pt3dadd(-69.134, 393.257, -12.864, 0.814)
pt3dadd(-69.188, 393.364, -12.855, 0.804)
pt3dadd(-69.233, 393.466, -12.819, 0.792)
pt3dadd(-69.279, 393.569, -12.784, 0.78)
pt3dadd(-69.324, 393.671, -12.749, 0.77)
pt3dadd(-69.369, 393.774, -12.714, 0.758)
pt3dadd(-69.41, 393.883, -12.7, 0.754)
pt3dadd(-69.449, 393.997, -12.7, 0.754)
pt3dadd(-69.488, 394.111, -12.7, 0.754)
pt3dadd(-69.527, 394.224, -12.7, 0.754)
pt3dadd(-69.565, 394.338, -12.7, 0.754)
pt3dadd(-69.601, 394.452, -12.7, 0.754)
pt3dadd(-69.614, 394.571, -12.7, 0.754)
pt3dadd(-69.626, 394.691, -12.7, 0.754)
pt3dadd(-69.639, 394.81, -12.7, 0.754)
pt3dadd(-69.652, 394.93, -12.7, 0.754)
pt3dadd(-69.664, 395.048, -12.7, 0.754)
pt3dadd(-69.677, 395.168, -12.7, 0.754)
pt3dadd(-69.691, 395.287, -12.7, 0.76)
pt3dadd(-69.706, 395.406, -12.7, 0.77)
pt3dadd(-69.722, 395.525, -12.7, 0.78)
pt3dadd(-69.776, 395.632, -12.7, 0.814)
pt3dadd(-69.83, 395.74, -12.7, 0.848)
pt3dadd(-69.92, 395.815, -12.7, 0.9)
pt3dadd(-70.019, 395.882, -12.7, 0.96)
pt3dadd(-70.125, 395.936, -12.7, 1.008)
pt3dadd(-70.236, 395.983, -12.7, 1.052)
pt3dadd(-70.322, 396.049, -12.684, 1.086)
pt3dadd(-70.365, 396.149, -12.641, 1.102)
pt3dadd(-70.408, 396.247, -12.598, 1.118)
pt3dadd(-70.442, 396.341, -12.546, 1.13)
pt3dadd(-70.448, 396.419, -12.47, 1.13)
pt3dadd(-70.47, 396.5, -12.41, 1.13)
pt3dadd(-70.548, 396.592, -12.406, 1.13)
pt3dadd(-70.625, 396.684, -12.402, 1.13)
pt3dadd(-70.669, 396.788, -12.4, 1.126)
pt3dadd(-70.673, 396.908, -12.4, 1.118)
pt3dadd(-70.678, 397.028, -12.4, 1.108)
pt3dadd(-70.695, 397.146, -12.394, 1.1)
pt3dadd(-70.721, 397.262, -12.383, 1.092)
pt3dadd(-70.746, 397.379, -12.372, 1.084)
pt3dadd(-70.785, 397.469, -12.331, 1.066)
pt3dadd(-70.837, 397.529, -12.256, 1.038)
pt3dadd(-70.924, 397.578, -12.211, 1.002)
pt3dadd(-71.002, 397.669, -12.205, 0.966)
pt3dadd(-71.08, 397.76, -12.2, 0.93)
pt3dadd(-71.114, 397.876, -12.195, 0.896)
pt3dadd(-71.149, 397.99, -12.19, 0.864)
pt3dadd(-71.16, 398.068, -12.13, 0.822)
pt3dadd(-71.16, 398.129, -12.044, 0.776)
pt3dadd(-71.187, 398.164, -11.957, 0.742)
pt3dadd(-71.243, 398.17, -11.869, 0.718)
pt3dadd(-71.309, 398.202, -11.805, 0.71)
pt3dadd(-71.389, 398.286, -11.784, 0.73)
pt3dadd(-71.42, 398.372, -11.72, 0.74)
pt3dadd(-71.451, 398.459, -11.656, 0.752)
pt3dadd(-71.481, 398.545, -11.591, 0.764)
pt3dadd(-71.512, 398.632, -11.527, 0.776)
pt3dadd(-71.563, 398.73, -11.492, 0.786)
pt3dadd(-71.619, 398.831, -11.468, 0.798)
pt3dadd(-71.676, 398.933, -11.443, 0.81)
pt3dadd(-71.733, 399.035, -11.418, 0.82)
pt3dadd(-71.778, 399.14, -11.4, 0.828)
pt3dadd(-71.796, 399.259, -11.4, 0.828)
pt3dadd(-71.813, 399.378, -11.4, 0.828)
pt3dadd(-71.83, 399.497, -11.4, 0.828)
pt3dadd(-71.847, 399.616, -11.4, 0.828)
pt3dadd(-71.865, 399.734, -11.4, 0.828)
pt3dadd(-71.881, 399.853, -11.4, 0.83)
pt3dadd(-71.887, 399.973, -11.4, 0.832)
pt3dadd(-71.893, 400.093, -11.4, 0.836)
pt3dadd(-71.899, 400.213, -11.4, 0.84)
pt3dadd(-71.905, 400.333, -11.4, 0.844)
pt3dadd(-71.911, 400.452, -11.4, 0.848)
pt3dadd(-71.917, 400.572, -11.4, 0.852)
pt3dadd(-71.947, 400.685, -11.4, 0.858)
pt3dadd(-72.01, 400.787, -11.4, 0.868)
pt3dadd(-72.073, 400.889, -11.4, 0.878)
pt3dadd(-72.136, 400.991, -11.4, 0.888)
pt3dadd(-72.199, 401.093, -11.4, 0.898)
pt3dadd(-72.255, 401.198, -11.4, 0.908)
pt3dadd(-72.3, 401.31, -11.4, 0.916)
pt3dadd(-72.345, 401.422, -11.4, 0.926)
pt3dadd(-72.389, 401.533, -11.4, 0.936)
pt3dadd(-72.434, 401.645, -11.4, 0.944)
pt3dadd(-72.478, 401.755, -11.4, 0.954)
pt3dadd(-72.48, 401.874, -11.382, 0.958)
pt3dadd(-72.48, 401.992, -11.364, 0.962)
pt3dadd(-72.48, 402.109, -11.345, 0.966)
pt3dadd(-72.48, 402.227, -11.327, 0.97)
pt3dadd(-72.48, 402.346, -11.308, 0.974)
pt3dadd(-72.48, 402.463, -11.289, 0.98)
pt3dadd(-72.482, 402.582, -11.275, 0.984)
pt3dadd(-72.484, 402.701, -11.26, 0.988)
pt3dadd(-72.486, 402.82, -11.245, 0.992)
pt3dadd(-72.489, 402.937, -11.231, 0.996)
pt3dadd(-72.491, 403.056, -11.216, 1)
pt3dadd(-72.493, 403.175, -11.201, 1.004)
pt3dadd(-72.509, 403.294, -11.2, 1.008)
pt3dadd(-72.526, 403.412, -11.2, 1.012)
pt3dadd(-72.543, 403.531, -11.2, 1.016)
pt3dadd(-72.561, 403.65, -11.2, 1.02)
pt3dadd(-72.578, 403.769, -11.2, 1.024)
pt3dadd(-72.595, 403.888, -11.2, 1.028)
pt3dadd(-72.63, 404.002, -11.2, 1.04)
pt3dadd(-72.672, 404.114, -11.2, 1.054)
pt3dadd(-72.714, 404.227, -11.2, 1.068)
pt3dadd(-72.755, 404.34, -11.2, 1.082)
pt3dadd(-72.797, 404.452, -11.2, 1.094)
pt3dadd(-72.834, 404.566, -11.195, 1.108)
pt3dadd(-72.859, 404.681, -11.178, 1.124)
pt3dadd(-72.885, 404.796, -11.161, 1.138)
pt3dadd(-72.911, 404.911, -11.144, 1.152)
pt3dadd(-72.936, 405.028, -11.127, 1.166)
pt3dadd(-72.965, 405.14, -11.108, 1.182)
pt3dadd(-73.022, 405.233, -11.065, 1.194)
pt3dadd(-73.079, 405.325, -11.023, 1.206)
pt3dadd(-73.137, 405.418, -10.98, 1.218)
pt3dadd(-73.194, 405.51, -10.938, 1.228)
pt3dadd(-73.2, 405.574, -10.856, 1.21)
}
}
proc shape3d_92() {
dend_5[4] { pt3dadd(-73.2, 405.635, -10.77, 1.186)
pt3dadd(-73.2, 405.736, -10.732, 1.154)
pt3dadd(-73.2, 405.854, -10.715, 1.114)
pt3dadd(-73.202, 405.972, -10.7, 1.078)
pt3dadd(-73.223, 406.091, -10.7, 1.058)
pt3dadd(-73.243, 406.208, -10.7, 1.04)
pt3dadd(-73.295, 406.312, -10.7, 1.03)
pt3dadd(-73.377, 406.399, -10.7, 1.03)
pt3dadd(-73.43, 406.498, -10.689, 1.024)
pt3dadd(-73.439, 406.612, -10.66, 1.006)
pt3dadd(-73.44, 406.703, -10.596, 0.964)
pt3dadd(-73.44, 406.792, -10.528, 0.916)
pt3dadd(-73.44, 406.903, -10.505, 0.878)
pt3dadd(-73.44, 407.022, -10.497, 0.842)
pt3dadd(-73.44, 407.142, -10.489, 0.806)
pt3dadd(-73.44, 407.212, -10.41, 0.814)
pt3dadd(-73.44, 407.28, -10.327, 0.826)
pt3dadd(-73.445, 407.362, -10.255, 0.878)
pt3dadd(-73.452, 407.447, -10.184, 0.94)
pt3dadd(-73.536, 407.478, -10.138, 0.976)
pt3dadd(-73.646, 407.494, -10.1, 1.004)
pt3dadd(-73.756, 407.508, -10.062, 1.034)
pt3dadd(-73.863, 407.537, -10.029, 1.052)
pt3dadd(-73.959, 407.605, -10.012, 1.038)
pt3dadd(-74.033, 407.681, -9.982, 1.02)
pt3dadd(-74.054, 407.774, -9.921, 0.992)
pt3dadd(-74.074, 407.868, -9.861, 0.962)
pt3dadd(-74.135, 407.932, -9.798, 0.944)
pt3dadd(-74.211, 407.986, -9.735, 0.93)
pt3dadd(-74.297, 408.066, -9.721, 0.93)
pt3dadd(-74.384, 408.148, -9.708, 0.93)
pt3dadd(-74.467, 408.234, -9.7, 0.92)
pt3dadd(-74.542, 408.328, -9.7, 0.898)
pt3dadd(-74.613, 408.421, -9.693, 0.872)
pt3dadd(-74.673, 408.518, -9.661, 0.842)
pt3dadd(-74.732, 408.616, -9.63, 0.812)
pt3dadd(-74.756, 408.667, -9.551, 0.778)
pt3dadd(-74.768, 408.703, -9.456, 0.744)
pt3dadd(-74.819, 408.728, -9.375, 0.714)
pt3dadd(-74.906, 408.743, -9.307, 0.684)
pt3dadd(-74.993, 408.758, -9.239, 0.656)
pt3dadd(-75.056, 408.852, -9.218, 0.584)
pt3dadd(-75.116, 408.954, -9.201, 0.506)
pt3dadd(-75.179, 409.054, -9.183, 0.346)
pt3dadd(-75.249, 409.147, -9.16, 0.322)
pt3dadd(-75.319, 409.241, -9.137, 0.3)
pt3dadd(-75.388, 409.334, -9.114, 0.276)
pt3dadd(-75.458, 409.428, -9.092, 0.254)
pt3dadd(-75.522, 409.504, -9.036, 0.246)
pt3dadd(-75.584, 409.576, -8.976, 0.24)
pt3dadd(-75.647, 409.648, -8.915, 0.234)
pt3dadd(-75.709, 409.721, -8.855, 0.228)
pt3dadd(-75.773, 409.813, -8.823, 0.226)
pt3dadd(-75.837, 409.91, -8.798, 0.226)
pt3dadd(-75.9, 410.008, -8.773, 0.226)
pt3dadd(-75.964, 410.105, -8.748, 0.226)
pt3dadd(-76.038, 410.195, -8.73, 0.226)
pt3dadd(-76.125, 410.276, -8.723, 0.226)
pt3dadd(-76.213, 410.359, -8.716, 0.226)
pt3dadd(-76.3, 410.441, -8.709, 0.226)
pt3dadd(-76.387, 410.522, -8.702, 0.226)
pt3dadd(-76.467, 410.611, -8.695, 0.226)
pt3dadd(-76.542, 410.705, -8.688, 0.226)
pt3dadd(-76.618, 410.797, -8.681, 0.226)
pt3dadd(-76.694, 410.89, -8.674, 0.226)
pt3dadd(-76.77, 410.982, -8.667, 0.226)
pt3dadd(-76.845, 411.065, -8.631, 0.226)
pt3dadd(-76.908, 411.154, -8.6, 0.226)
pt3dadd(-76.918, 411.274, -8.6, 0.226)
pt3dadd(-76.927, 411.394, -8.6, 0.226)
pt3dadd(-76.959, 411.505, -8.6, 0.23)
pt3dadd(-77.027, 411.604, -8.6, 0.242)
pt3dadd(-77.102, 411.686, -8.612, 0.256)
pt3dadd(-77.2, 411.714, -8.664, 0.284)
pt3dadd(-77.286, 411.766, -8.71, 0.31)
pt3dadd(-77.344, 411.864, -8.74, 0.334)
pt3dadd(-77.402, 411.962, -8.769, 0.36)
pt3dadd(-77.464, 412.054, -8.771, 0.386)
pt3dadd(-77.533, 412.13, -8.72, 0.416)
pt3dadd(-77.601, 412.187, -8.655, 0.452)
pt3dadd(-77.67, 412.218, -8.578, 0.452)
pt3dadd(-77.733, 412.268, -8.533, 0.448)
pt3dadd(-77.779, 412.369, -8.572, 0.434)
pt3dadd(-77.85, 412.456, -8.579, 0.412)
pt3dadd(-77.941, 412.531, -8.56, 0.382)
pt3dadd(-77.981, 412.584, -8.485, 0.346)
pt3dadd(-78.008, 412.631, -8.396, 0.308)
pt3dadd(-78.088, 412.694, -8.358, 0.288)
pt3dadd(-78.182, 412.763, -8.333, 0.272)
pt3dadd(-78.276, 412.831, -8.308, 0.256)
pt3dadd(-78.353, 412.92, -8.3, 0.244)
pt3dadd(-78.421, 413.018, -8.3, 0.232)
pt3dadd(-78.502, 413.106, -8.3, 0.244)
pt3dadd(-78.563, 413.204, -8.316, 0.26)
pt3dadd(-78.617, 413.309, -8.336, 0.272)
pt3dadd(-78.671, 413.413, -8.356, 0.282)
pt3dadd(-78.725, 413.519, -8.376, 0.294)
pt3dadd(-78.782, 413.621, -8.396, 0.312)
pt3dadd(-78.845, 413.72, -8.415, 0.342)
pt3dadd(-78.909, 413.819, -8.435, 0.372)
pt3dadd(-78.972, 413.918, -8.455, 0.402)
pt3dadd(-79.034, 413.987, -8.518, 0.458)
pt3dadd(-79.094, 414.062, -8.576, 0.516)
pt3dadd(-79.153, 414.158, -8.612, 0.57)
pt3dadd(-79.209, 414.256, -8.647, 0.614)
pt3dadd(-79.263, 414.355, -8.679, 0.644)
pt3dadd(-79.31, 414.456, -8.66, 0.672)
pt3dadd(-79.352, 414.556, -8.618, 0.698)
pt3dadd(-79.398, 414.665, -8.605, 0.732)
pt3dadd(-79.445, 414.775, -8.6, 0.758)
pt3dadd(-79.492, 414.884, -8.6, 0.772)
pt3dadd(-79.54, 414.995, -8.6, 0.786)
pt3dadd(-79.587, 415.105, -8.6, 0.802)
pt3dadd(-79.635, 415.216, -8.6, 0.816)
pt3dadd(-79.684, 415.325, -8.6, 0.83)
pt3dadd(-79.768, 415.41, -8.6, 0.85)
pt3dadd(-79.851, 415.496, -8.6, 0.87)
pt3dadd(-79.935, 415.583, -8.6, 0.89)
pt3dadd(-80.018, 415.669, -8.6, 0.91)
pt3dadd(-80.103, 415.753, -8.6, 0.934)
pt3dadd(-80.207, 415.814, -8.6, 0.992)
pt3dadd(-80.31, 415.874, -8.6, 1.05)
pt3dadd(-80.4, 415.955, -8.6, 1.13)
pt3dadd(-80.488, 416.035, -8.6, 1.212)
pt3dadd(-80.51, 416.148, -8.6, 1.25)
pt3dadd(-80.515, 416.267, -8.6, 1.276)
pt3dadd(-80.52, 416.387, -8.6, 1.304)
pt3dadd(-80.533, 416.507, -8.6, 1.298)
pt3dadd(-80.548, 416.626, -8.6, 1.288)
pt3dadd(-80.575, 416.738, -8.596, 1.27)
pt3dadd(-80.652, 416.827, -8.575, 1.214)
pt3dadd(-80.728, 416.916, -8.553, 1.158)
pt3dadd(-80.807, 417.001, -8.532, 1.102)
pt3dadd(-80.923, 417.018, -8.513, 1.046)
pt3dadd(-81.04, 417.036, -8.493, 0.992)
pt3dadd(-81.137, 417.091, -8.464, 0.93)
pt3dadd(-81.237, 417.154, -8.45, 0.936)
pt3dadd(-81.338, 417.217, -8.436, 0.94)
pt3dadd(-81.439, 417.281, -8.421, 0.946)
pt3dadd(-81.539, 417.343, -8.407, 0.952)
pt3dadd(-81.604, 417.431, -8.382, 0.954)
pt3dadd(-81.638, 417.538, -8.349, 0.954)
pt3dadd(-81.717, 417.6, -8.325, 0.942)
pt3dadd(-81.834, 417.623, -8.311, 0.92)
pt3dadd(-81.94, 417.662, -8.295, 0.894)
pt3dadd(-82.016, 417.754, -8.278, 0.854)
pt3dadd(-82.069, 417.852, -8.257, 0.822)
pt3dadd(-82.074, 417.967, -8.228, 0.8)
pt3dadd(-82.08, 418.081, -8.2, 0.778)
pt3dadd(-82.08, 418.201, -8.2, 0.754)
pt3dadd(-82.08, 418.321, -8.2, 0.728)
pt3dadd(-82.08, 418.439, -8.184, 0.7)
pt3dadd(-82.08, 418.535, -8.127, 0.678)
pt3dadd(-82.08, 418.595, -8.041, 0.678)
pt3dadd(-82.084, 418.67, -7.964, 0.678)
pt3dadd(-82.117, 418.765, -7.914, 0.7)
pt3dadd(-82.2, 418.848, -7.9, 0.784)
pt3dadd(-82.306, 418.9, -7.9, 0.846)
pt3dadd(-82.422, 418.932, -7.9, 0.806)
pt3dadd(-82.534, 418.97, -7.9, 0.688)
pt3dadd(-82.627, 419.046, -7.9, 0.628)
pt3dadd(-82.697, 419.141, -7.9, 0.644)
pt3dadd(-82.758, 419.245, -7.9, 0.668)
pt3dadd(-82.789, 419.357, -7.898, 0.692)
pt3dadd(-82.794, 419.477, -7.894, 0.72)
pt3dadd(-82.799, 419.597, -7.89, 0.746)
pt3dadd(-82.815, 419.711, -7.866, 0.828)
pt3dadd(-82.865, 419.819, -7.852, 0.84)
pt3dadd(-82.915, 419.927, -7.839, 0.85)
pt3dadd(-82.964, 420.035, -7.825, 0.86)
pt3dadd(-83.014, 420.142, -7.811, 0.87)
pt3dadd(-83.072, 420.245, -7.8, 0.878)
pt3dadd(-83.158, 420.329, -7.8, 0.878)
pt3dadd(-83.244, 420.412, -7.8, 0.878)
pt3dadd(-83.331, 420.496, -7.8, 0.878)
pt3dadd(-83.417, 420.578, -7.8, 0.878)
pt3dadd(-83.491, 420.67, -7.796, 0.878)
pt3dadd(-83.531, 420.781, -7.783, 0.872)
pt3dadd(-83.571, 420.894, -7.77, 0.868)
pt3dadd(-83.611, 421.006, -7.756, 0.862)
pt3dadd(-83.651, 421.117, -7.743, 0.858)
pt3dadd(-83.692, 421.226, -7.722, 0.852)
pt3dadd(-83.739, 421.325, -7.681, 0.846)
pt3dadd(-83.785, 421.424, -7.64, 0.84)
pt3dadd(-83.831, 421.523, -7.599, 0.834)
pt3dadd(-83.878, 421.622, -7.558, 0.828)
pt3dadd(-83.916, 421.69, -7.482, 0.834)
pt3dadd(-83.953, 421.754, -7.404, 0.84)
pt3dadd(-83.99, 421.82, -7.326, 0.846)
pt3dadd(-84.028, 421.885, -7.248, 0.852)
pt3dadd(-84.068, 421.91, -7.159, 0.854)
pt3dadd(-84.109, 421.916, -7.066, 0.854)
pt3dadd(-84.16, 421.922, -6.976, 0.848)
pt3dadd(-84.223, 421.928, -6.891, 0.836)
pt3dadd(-84.297, 421.955, -6.828, 0.816)
pt3dadd(-84.394, 422.023, -6.811, 0.778)
pt3dadd(-84.485, 422.087, -6.779, 0.736)
pt3dadd(-84.568, 422.14, -6.722, 0.694)
pt3dadd(-84.633, 422.226, -6.692, 0.666)
pt3dadd(-84.686, 422.332, -6.679, 0.646)
}
}
proc shape3d_93() {
dend_5[4] { pt3dadd(-84.739, 422.438, -6.669, 0.626)
pt3dadd(-84.792, 422.544, -6.685, 0.6)
pt3dadd(-84.846, 422.648, -6.696, 0.576)
pt3dadd(-84.913, 422.737, -6.659, 0.566)
pt3dadd(-84.98, 422.827, -6.622, 0.556)
pt3dadd(-85.036, 422.921, -6.581, 0.532)
pt3dadd(-85.088, 423.016, -6.538, 0.506)
pt3dadd(-85.14, 423.1, -6.483, 0.452)
pt3dadd(-85.191, 423.185, -6.429, 0.364)
pt3dadd(-85.231, 423.293, -6.404, 0.268)
pt3dadd(-85.297, 423.391, -6.4, 0.226)
pt3dadd(-85.375, 423.481, -6.394, 0.226)
pt3dadd(-85.428, 423.564, -6.346, 0.226)
pt3dadd(-85.44, 423.593, -6.25, 0.226)
pt3dadd(-85.44, 423.6, -6.151, 0.226)
pt3dadd(-85.44, 423.6, -6.051, 0.226)
pt3dadd(-85.44, 423.6, -5.951, 0.226)
pt3dadd(-85.44, 423.6, -5.851, 0.226)
pt3dadd(-85.44, 423.6, -5.751, 0.226)
pt3dadd(-85.44, 423.6, -5.651, 0.226)
pt3dadd(-85.44, 423.6, -5.551, 0.226)
pt3dadd(-85.44, 423.6, -5.451, 0.226)
pt3dadd(-85.44, 423.6, -5.351, 0.226)
pt3dadd(-85.447, 423.6, -5.251, 0.226)
pt3dadd(-85.476, 423.611, -5.155, 0.226)
pt3dadd(-85.532, 423.688, -5.106, 0.226)
pt3dadd(-85.566, 423.802, -5.1, 0.226)
pt3dadd(-85.617, 423.91, -5.1, 0.226)
pt3dadd(-85.715, 423.977, -5.1, 0.226)
pt3dadd(-85.819, 424.036, -5.09, 0.226)
pt3dadd(-85.892, 424.073, -5.025, 0.226)
pt3dadd(-85.916, 424.08, -4.928, 0.226)
pt3dadd(-85.92, 424.08, -4.828, 0.226)
pt3dadd(-85.92, 424.08, -4.728, 0.226)
pt3dadd(-85.92, 424.08, -4.628, 0.226)
pt3dadd(-85.92, 424.08, -4.528, 0.226)
pt3dadd(-85.92, 424.08, -4.428, 0.226)
pt3dadd(-85.92, 424.08, -4.328, 0.226)
pt3dadd(-85.92, 424.08, -4.228, 0.226)
pt3dadd(-85.92, 424.08, -4.128, 0.226)
pt3dadd(-85.92, 424.08, -4.028, 0.226)
pt3dadd(-85.92, 424.08, -3.928, 0.226)
pt3dadd(-85.92, 424.08, -3.828, 0.226)
pt3dadd(-85.92, 424.08, -3.728, 0.226)
pt3dadd(-85.92, 424.08, -3.628, 0.226)
pt3dadd(-85.964, 424.08, -3.538, 0.226)
pt3dadd(-86.024, 424.08, -3.452, 0.226)
pt3dadd(-86.114, 424.08, -3.397, 0.234)
pt3dadd(-86.229, 424.08, -3.369, 0.25)
pt3dadd(-86.322, 424.086, -3.308, 0.274)
pt3dadd(-86.413, 424.092, -3.243, 0.298)
pt3dadd(-86.479, 424.159, -3.184, 0.338)
pt3dadd(-86.541, 424.237, -3.131, 0.382)
pt3dadd(-86.61, 424.334, -3.114, 0.42)
pt3dadd(-86.684, 424.426, -3.1, 0.458)
pt3dadd(-86.783, 424.493, -3.1, 0.492)
pt3dadd(-86.882, 424.561, -3.1, 0.528)
pt3dadd(-86.983, 424.626, -3.1, 0.58)
pt3dadd(-87.073, 424.696, -3.079, 0.61)
pt3dadd(-87.156, 424.771, -3.041, 0.624)
pt3dadd(-87.264, 424.806, -3.017, 0.618)
pt3dadd(-87.379, 424.83, -2.997, 0.608)
pt3dadd(-87.471, 424.871, -2.952, 0.57)
pt3dadd(-87.547, 424.924, -2.889, 0.512)
pt3dadd(-87.617, 425.003, -2.841, 0.454)
pt3dadd(-87.681, 425.088, -2.8, 0.4)
pt3dadd(-87.689, 425.208, -2.8, 0.378)
pt3dadd(-87.698, 425.328, -2.8, 0.358)
pt3dadd(-87.706, 425.447, -2.8, 0.336)
pt3dadd(-87.715, 425.567, -2.8, 0.314)
pt3dadd(-87.722, 425.687, -2.8, 0.294)
pt3dadd(-87.726, 425.807, -2.8, 0.278)
pt3dadd(-87.731, 425.927, -2.8, 0.26)
pt3dadd(-87.76, 426.04, -2.8, 0.242)
pt3dadd(-87.814, 426.148, -2.8, 0.226)
pt3dadd(-87.914, 426.21, -2.8, 0.226)
pt3dadd(-88.031, 426.234, -2.8, 0.226)
pt3dadd(-88.151, 426.24, -2.8, 0.226)
pt3dadd(-88.27, 426.248, -2.8, 0.242)
pt3dadd(-88.387, 426.276, -2.8, 0.316)
pt3dadd(-88.479, 426.346, -2.777, 0.352)
pt3dadd(-88.569, 426.419, -2.752, 0.382)
pt3dadd(-88.658, 426.493, -2.726, 0.41)
pt3dadd(-88.747, 426.568, -2.7, 0.44)
pt3dadd(-88.84, 426.624, -2.662, 0.49)
pt3dadd(-88.935, 426.668, -2.613, 0.56)
pt3dadd(-89.006, 426.701, -2.54, 0.606)
pt3dadd(-89.069, 426.728, -2.458, 0.646)
pt3dadd(-89.136, 426.814, -2.458, 0.668)
pt3dadd(-89.205, 426.902, -2.444, 0.678)
pt3dadd(-89.271, 426.98, -2.392, 0.674)
pt3dadd(-89.316, 427.048, -2.318, 0.632)
pt3dadd(-89.394, 427.133, -2.309, 0.614)
pt3dadd(-89.476, 427.22, -2.307, 0.598)
pt3dadd(-89.558, 427.308, -2.305, 0.582)
pt3dadd(-89.64, 427.394, -2.302, 0.568)
pt3dadd(-89.722, 427.483, -2.301, 0.552)
pt3dadd(-89.778, 427.585, -2.323, 0.53)
pt3dadd(-89.833, 427.688, -2.345, 0.508)
pt3dadd(-89.889, 427.792, -2.367, 0.486)
pt3dadd(-89.945, 427.895, -2.389, 0.464)
pt3dadd(-90.014, 427.99, -2.4, 0.446)
pt3dadd(-90.095, 428.078, -2.4, 0.434)
pt3dadd(-90.168, 428.168, -2.414, 0.422)
pt3dadd(-90.227, 428.263, -2.45, 0.408)
pt3dadd(-90.282, 428.359, -2.49, 0.402)
pt3dadd(-90.333, 428.454, -2.533, 0.402)
pt3dadd(-90.351, 428.527, -2.606, 0.384)
pt3dadd(-90.358, 428.59, -2.691, 0.36)
pt3dadd(-90.36, 428.66, -2.771, 0.352)
pt3dadd(-90.36, 428.728, -2.853, 0.346)
pt3dadd(-90.36, 428.76, -2.949, 0.326)
pt3dadd(-90.36, 428.804, -3.042, 0.286)
pt3dadd(-90.38, 428.9, -3.092, 0.29)
pt3dadd(-90.435, 429.005, -3.1, 0.41)
pt3dadd(-90.517, 429.085, -3.082, 0.592)
pt3dadd(-90.592, 429.118, -3.011, 0.672)
pt3dadd(-90.654, 429.148, -2.932, 0.634)
pt3dadd(-90.718, 429.238, -2.9, 0.53)
pt3dadd(-90.777, 429.341, -2.9, 0.526)
pt3dadd(-90.848, 429.438, -2.9, 0.608)
pt3dadd(-90.916, 429.536, -2.9, 0.666)
pt3dadd(-90.984, 429.635, -2.9, 0.72)
pt3dadd(-91.052, 429.734, -2.9, 0.766)
pt3dadd(-91.123, 429.83, -2.899, 0.802)
pt3dadd(-91.208, 429.914, -2.893, 0.788)
pt3dadd(-91.284, 429.994, -2.875, 0.778)
pt3dadd(-91.311, 430.04, -2.786, 0.778)
pt3dadd(-91.346, 430.081, -2.699, 0.784)
pt3dadd(-91.426, 430.092, -2.624, 0.822)
pt3dadd(-91.514, 430.136, -2.57, 0.876)
pt3dadd(-91.603, 430.188, -2.52, 0.928)
pt3dadd(-91.691, 430.224, -2.459, 0.914)
pt3dadd(-91.772, 430.276, -2.41, 0.888)
pt3dadd(-91.828, 430.381, -2.405, 0.818)
pt3dadd(-91.885, 430.488, -2.4, 0.748)
pt3dadd(-91.946, 430.591, -2.4, 0.68)
pt3dadd(-92.006, 430.694, -2.4, 0.61)
pt3dadd(-92.088, 430.782, -2.4, 0.588)
pt3dadd(-92.165, 430.867, -2.419, 0.586)
pt3dadd(-92.232, 430.954, -2.459, 0.604)
pt3dadd(-92.3, 431.041, -2.499, 0.622)
pt3dadd(-92.367, 431.128, -2.539, 0.64)
pt3dadd(-92.437, 431.216, -2.569, 0.658)
pt3dadd(-92.509, 431.312, -2.576, 0.674)
pt3dadd(-92.582, 431.407, -2.583, 0.69)
pt3dadd(-92.655, 431.502, -2.59, 0.706)
pt3dadd(-92.727, 431.597, -2.597, 0.722)
pt3dadd(-92.772, 431.705, -2.592, 0.728)
pt3dadd(-92.795, 431.821, -2.577, 0.728)
pt3dadd(-92.817, 431.938, -2.563, 0.728)
pt3dadd(-92.839, 432.054, -2.549, 0.728)
pt3dadd(-92.862, 432.17, -2.534, 0.728)
pt3dadd(-92.884, 432.282, -2.51, 0.722)
pt3dadd(-92.929, 432.344, -2.438, 0.658)
pt3dadd(-93.031, 432.391, -2.406, 0.568)
pt3dadd(-93.101, 432.482, -2.4, 0.462)
pt3dadd(-93.12, 432.6, -2.4, 0.362)
pt3dadd(-93.12, 432.72, -2.4, 0.226)
}
dend_5[5] {pt3dclear()
pt3dadd(-15, 305.28, -25, 2.16)
pt3dadd(-14.994, 305.304, -25.011, 2.12)
pt3dadd(-14.968, 305.406, -25.059, 1.952)
pt3dadd(-14.943, 305.508, -25.107, 1.782)
pt3dadd(-14.917, 305.611, -25.155, 1.614)
pt3dadd(-14.892, 305.713, -25.203, 1.446)
pt3dadd(-14.866, 305.815, -25.251, 1.278)
pt3dadd(-14.841, 305.917, -25.299, 1.108)
pt3dadd(-14.945, 305.972, -25.3, 1.072)
pt3dadd(-15.052, 306.026, -25.3, 1.072)
pt3dadd(-15.155, 306.084, -25.314, 1.108)
pt3dadd(-15.258, 306.115, -25.356, 1.114)
pt3dadd(-15.373, 306.133, -25.378, 1.088)
pt3dadd(-15.49, 306.15, -25.392, 1.068)
pt3dadd(-15.596, 306.187, -25.385, 1.044)
pt3dadd(-15.685, 306.253, -25.348, 1.016)
pt3dadd(-15.788, 306.307, -25.333, 0.996)
pt3dadd(-15.899, 306.352, -25.333, 0.982)
pt3dadd(-16.002, 306.395, -25.367, 1.002)
pt3dadd(-16.102, 306.438, -25.409, 1.028)
pt3dadd(-16.179, 306.472, -25.48, 1.108)
pt3dadd(-16.278, 306.514, -25.515, 1.154)
pt3dadd(-16.386, 306.558, -25.537, 1.186)
pt3dadd(-16.494, 306.604, -25.558, 1.218)
pt3dadd(-16.602, 306.649, -25.579, 1.25)
pt3dadd(-16.711, 306.695, -25.6, 1.282)
pt3dadd(-16.828, 306.719, -25.6, 1.298)
pt3dadd(-16.946, 306.744, -25.6, 1.316)
pt3dadd(-17.063, 306.769, -25.6, 1.332)
pt3dadd(-17.18, 306.793, -25.6, 1.35)
pt3dadd(-17.298, 306.818, -25.6, 1.366)
pt3dadd(-17.415, 306.845, -25.6, 1.382)
pt3dadd(-17.528, 306.883, -25.6, 1.396)
pt3dadd(-17.642, 306.923, -25.6, 1.41)
pt3dadd(-17.755, 306.961, -25.6, 1.424)
pt3dadd(-17.869, 307, -25.6, 1.438)
pt3dadd(-17.983, 307.039, -25.6, 1.452)
pt3dadd(-18.084, 307.099, -25.6, 1.462)
pt3dadd(-18.178, 307.175, -25.6, 1.472)
pt3dadd(-18.271, 307.249, -25.6, 1.482)
pt3dadd(-18.365, 307.325, -25.6, 1.492)
}
}
proc shape3d_94() {
dend_5[5] { pt3dadd(-18.459, 307.399, -25.6, 1.504)
pt3dadd(-18.561, 307.46, -25.6, 1.516)
pt3dadd(-18.669, 307.514, -25.6, 1.53)
pt3dadd(-18.776, 307.568, -25.6, 1.544)
pt3dadd(-18.883, 307.621, -25.6, 1.56)
pt3dadd(-18.991, 307.675, -25.6, 1.574)
pt3dadd(-19.087, 307.742, -25.6, 1.586)
pt3dadd(-19.169, 307.831, -25.6, 1.598)
pt3dadd(-19.255, 307.913, -25.6, 1.6)
pt3dadd(-19.354, 307.981, -25.6, 1.578)
pt3dadd(-19.447, 308.054, -25.6, 1.546)
pt3dadd(-19.501, 308.161, -25.6, 1.468)
pt3dadd(-19.554, 308.269, -25.6, 1.39)
pt3dadd(-19.56, 308.388, -25.6, 1.314)
pt3dadd(-19.56, 308.508, -25.6, 1.238)
pt3dadd(-19.56, 308.628, -25.6, 1.162)
pt3dadd(-19.56, 308.748, -25.6, 1.064)
pt3dadd(-19.56, 308.868, -25.6, 0.964)
pt3dadd(-19.597, 308.981, -25.6, 0.946)
pt3dadd(-19.639, 309.094, -25.6, 0.936)
pt3dadd(-19.681, 309.206, -25.6, 0.928)
pt3dadd(-19.722, 309.319, -25.6, 0.918)
pt3dadd(-19.764, 309.431, -25.6, 0.908)
pt3dadd(-19.808, 309.542, -25.6, 0.91)
pt3dadd(-19.856, 309.653, -25.6, 0.924)
pt3dadd(-19.903, 309.763, -25.6, 0.938)
pt3dadd(-19.951, 309.874, -25.6, 0.952)
pt3dadd(-19.998, 309.984, -25.6, 0.966)
pt3dadd(-20.042, 310.094, -25.6, 0.988)
pt3dadd(-20.057, 310.214, -25.6, 1.052)
pt3dadd(-20.071, 310.333, -25.6, 1.118)
pt3dadd(-20.095, 310.45, -25.602, 1.188)
pt3dadd(-20.129, 310.565, -25.607, 1.264)
pt3dadd(-20.161, 310.676, -25.619, 1.338)
pt3dadd(-20.167, 310.76, -25.69, 1.4)
pt3dadd(-20.177, 310.846, -25.758, 1.456)
pt3dadd(-20.228, 310.942, -25.801, 1.456)
pt3dadd(-20.269, 311.04, -25.845, 1.43)
pt3dadd(-20.279, 311.144, -25.893, 1.322)
pt3dadd(-20.297, 311.25, -25.938, 1.22)
pt3dadd(-20.316, 311.357, -25.982, 1.122)
pt3dadd(-20.349, 311.47, -25.993, 1.05)
pt3dadd(-20.383, 311.585, -25.998, 0.986)
pt3dadd(-20.403, 311.701, -26.007, 0.954)
pt3dadd(-20.408, 311.82, -26.02, 0.954)
pt3dadd(-20.413, 311.939, -26.032, 0.954)
pt3dadd(-20.507, 311.993, -26.067, 0.992)
pt3dadd(-20.606, 312.046, -26.1, 1.032)
pt3dadd(-20.685, 312.136, -26.1, 1.052)
pt3dadd(-20.764, 312.227, -26.1, 1.074)
pt3dadd(-20.842, 312.317, -26.1, 1.094)
pt3dadd(-20.88, 312.422, -26.107, 1.11)
pt3dadd(-20.88, 312.541, -26.119, 1.12)
pt3dadd(-20.88, 312.66, -26.131, 1.128)
pt3dadd(-20.88, 312.77, -26.168, 1.104)
pt3dadd(-20.88, 312.89, -26.178, 1.096)
pt3dadd(-20.88, 313.009, -26.189, 1.088)
pt3dadd(-20.88, 313.129, -26.199, 1.08)
pt3dadd(-20.88, 313.248, -26.209, 1.072)
pt3dadd(-20.88, 313.368, -26.22, 1.064)
pt3dadd(-20.88, 313.487, -26.23, 1.058)
pt3dadd(-20.886, 313.597, -26.265, 1.04)
pt3dadd(-20.894, 313.704, -26.31, 1.02)
pt3dadd(-20.902, 313.812, -26.355, 1)
pt3dadd(-20.91, 313.919, -26.399, 0.98)
pt3dadd(-20.918, 314.026, -26.444, 0.96)
pt3dadd(-20.953, 314.114, -26.502, 0.934)
pt3dadd(-20.998, 314.196, -26.564, 0.906)
pt3dadd(-21, 314.314, -26.579, 0.914)
pt3dadd(-21, 314.434, -26.591, 0.922)
pt3dadd(-21.012, 314.55, -26.604, 0.946)
pt3dadd(-21.057, 314.659, -26.62, 1.006)
pt3dadd(-21.113, 314.759, -26.641, 1.066)
pt3dadd(-21.207, 314.818, -26.677, 1.12)
pt3dadd(-21.276, 314.897, -26.71, 1.158)
pt3dadd(-21.303, 315.01, -26.735, 1.164)
pt3dadd(-21.329, 315.122, -26.76, 1.172)
pt3dadd(-21.356, 315.235, -26.785, 1.18)
pt3dadd(-21.36, 315.349, -26.817, 1.162)
pt3dadd(-21.36, 315.462, -26.85, 1.14)
pt3dadd(-21.36, 315.576, -26.88, 1.084)
pt3dadd(-21.364, 315.695, -26.89, 1.05)
pt3dadd(-21.37, 315.815, -26.892, 1.042)
pt3dadd(-21.376, 315.935, -26.893, 1.034)
pt3dadd(-21.382, 316.055, -26.895, 1.026)
pt3dadd(-21.388, 316.175, -26.897, 1.018)
pt3dadd(-21.394, 316.294, -26.898, 1.012)
pt3dadd(-21.406, 316.412, -26.9, 1.004)
pt3dadd(-21.46, 316.52, -26.9, 0.998)
pt3dadd(-21.513, 316.627, -26.9, 0.994)
pt3dadd(-21.567, 316.734, -26.9, 0.99)
pt3dadd(-21.621, 316.842, -26.9, 0.984)
pt3dadd(-21.675, 316.949, -26.9, 0.98)
pt3dadd(-21.704, 317.059, -26.929, 0.98)
pt3dadd(-21.729, 317.17, -26.962, 0.98)
pt3dadd(-21.773, 317.278, -26.986, 0.958)
pt3dadd(-21.82, 317.384, -27.008, 0.932)
pt3dadd(-21.838, 317.485, -27.058, 0.908)
pt3dadd(-21.851, 317.584, -27.113, 0.882)
pt3dadd(-21.895, 317.636, -27.192, 0.856)
pt3dadd(-21.945, 317.678, -27.276, 0.83)
pt3dadd(-21.99, 317.744, -27.35, 0.836)
pt3dadd(-22.035, 317.812, -27.424, 0.846)
pt3dadd(-22.079, 317.879, -27.499, 0.854)
pt3dadd(-22.133, 317.986, -27.5, 0.886)
pt3dadd(-22.186, 318.092, -27.5, 0.92)
pt3dadd(-22.2, 318.209, -27.5, 1.004)
pt3dadd(-22.24, 318.32, -27.5, 1.048)
pt3dadd(-22.293, 318.427, -27.5, 1.072)
pt3dadd(-22.347, 318.535, -27.5, 1.096)
pt3dadd(-22.401, 318.642, -27.5, 1.12)
pt3dadd(-22.454, 318.75, -27.5, 1.144)
pt3dadd(-22.521, 318.848, -27.5, 1.16)
pt3dadd(-22.599, 318.94, -27.5, 1.17)
pt3dadd(-22.677, 319.031, -27.5, 1.18)
pt3dadd(-22.755, 319.122, -27.5, 1.19)
pt3dadd(-22.833, 319.213, -27.5, 1.2)
pt3dadd(-22.886, 319.316, -27.507, 1.206)
pt3dadd(-22.92, 319.432, -27.52, 1.206)
pt3dadd(-22.953, 319.546, -27.533, 1.206)
pt3dadd(-22.987, 319.66, -27.546, 1.206)
pt3dadd(-23.021, 319.774, -27.559, 1.206)
pt3dadd(-23.04, 319.889, -27.575, 1.198)
pt3dadd(-23.04, 320.006, -27.596, 1.182)
pt3dadd(-23.04, 320.124, -27.617, 1.164)
pt3dadd(-23.04, 320.242, -27.638, 1.148)
pt3dadd(-23.04, 320.358, -27.658, 1.13)
pt3dadd(-23.04, 320.476, -27.679, 1.114)
pt3dadd(-23.04, 320.594, -27.693, 1.086)
pt3dadd(-23.04, 320.714, -27.701, 1.05)
pt3dadd(-23.04, 320.833, -27.709, 1.014)
pt3dadd(-23.044, 320.948, -27.736, 0.98)
pt3dadd(-23.05, 321.061, -27.771, 0.946)
pt3dadd(-23.083, 321.168, -27.791, 0.93)
pt3dadd(-23.147, 321.27, -27.797, 0.93)
pt3dadd(-23.212, 321.371, -27.8, 0.942)
pt3dadd(-23.279, 321.469, -27.8, 0.976)
pt3dadd(-23.345, 321.569, -27.804, 1.01)
pt3dadd(-23.403, 321.671, -27.825, 1.042)
pt3dadd(-23.46, 321.774, -27.845, 1.072)
pt3dadd(-23.518, 321.876, -27.866, 1.104)
pt3dadd(-23.526, 321.967, -27.929, 1.14)
pt3dadd(-23.533, 322.058, -27.994, 1.176)
pt3dadd(-23.571, 322.123, -28.063, 1.148)
pt3dadd(-23.611, 322.23, -28.091, 1.122)
pt3dadd(-23.64, 322.332, -28.131, 1.104)
pt3dadd(-23.64, 322.421, -28.199, 1.104)
pt3dadd(-23.648, 322.511, -28.26, 1.118)
pt3dadd(-23.695, 322.619, -28.282, 1.194)
pt3dadd(-23.751, 322.718, -28.3, 1.272)
pt3dadd(-23.85, 322.787, -28.3, 1.366)
pt3dadd(-23.948, 322.855, -28.3, 1.458)
pt3dadd(-23.991, 322.968, -28.3, 1.522)
pt3dadd(-24.04, 323.071, -28.319, 1.552)
pt3dadd(-24.097, 323.166, -28.358, 1.54)
pt3dadd(-24.153, 323.261, -28.397, 1.528)
pt3dadd(-24.21, 323.354, -28.437, 1.516)
pt3dadd(-24.272, 323.448, -28.47, 1.498)
pt3dadd(-24.348, 323.539, -28.485, 1.466)
pt3dadd(-24.424, 323.63, -28.5, 1.432)
pt3dadd(-24.501, 323.722, -28.514, 1.4)
pt3dadd(-24.577, 323.813, -28.529, 1.366)
pt3dadd(-24.639, 323.912, -28.543, 1.348)
pt3dadd(-24.696, 324.018, -28.557, 1.338)
pt3dadd(-24.752, 324.122, -28.571, 1.328)
pt3dadd(-24.809, 324.227, -28.586, 1.316)
pt3dadd(-24.865, 324.331, -28.6, 1.306)
pt3dadd(-24.935, 324.427, -28.614, 1.306)
pt3dadd(-25.005, 324.523, -28.629, 1.306)
pt3dadd(-25.075, 324.619, -28.643, 1.306)
pt3dadd(-25.145, 324.715, -28.658, 1.306)
pt3dadd(-25.207, 324.808, -28.688, 1.31)
pt3dadd(-25.259, 324.894, -28.742, 1.322)
pt3dadd(-25.311, 324.982, -28.795, 1.334)
pt3dadd(-25.362, 325.068, -28.849, 1.346)
pt3dadd(-25.405, 325.162, -28.899, 1.346)
pt3dadd(-25.425, 325.271, -28.936, 1.31)
pt3dadd(-25.443, 325.382, -28.969, 1.274)
pt3dadd(-25.46, 325.5, -28.983, 1.244)
pt3dadd(-25.476, 325.618, -28.997, 1.212)
pt3dadd(-25.545, 325.711, -29, 1.196)
pt3dadd(-25.627, 325.799, -29, 1.184)
pt3dadd(-25.722, 325.861, -29.024, 1.218)
pt3dadd(-25.822, 325.912, -29.06, 1.272)
pt3dadd(-25.93, 325.944, -29.094, 1.342)
pt3dadd(-26.015, 326.002, -29.133, 1.384)
pt3dadd(-26.072, 326.092, -29.178, 1.39)
pt3dadd(-26.13, 326.182, -29.224, 1.396)
pt3dadd(-26.188, 326.272, -29.269, 1.402)
pt3dadd(-26.239, 326.369, -29.307, 1.404)
pt3dadd(-26.275, 326.479, -29.33, 1.4)
pt3dadd(-26.311, 326.591, -29.354, 1.394)
pt3dadd(-26.347, 326.701, -29.377, 1.388)
pt3dadd(-26.382, 326.813, -29.4, 1.384)
pt3dadd(-26.4, 326.926, -29.428, 1.382)
pt3dadd(-26.4, 327.038, -29.461, 1.382)
pt3dadd(-26.407, 327.151, -29.49, 1.382)
pt3dadd(-26.448, 327.264, -29.495, 1.394)
pt3dadd(-26.49, 327.377, -29.5, 1.406)
pt3dadd(-26.588, 327.442, -29.5, 1.406)
}
}
proc shape3d_95() {
dend_5[5] { pt3dadd(-26.691, 327.503, -29.5, 1.406)
pt3dadd(-26.787, 327.574, -29.5, 1.39)
pt3dadd(-26.881, 327.649, -29.5, 1.366)
pt3dadd(-26.982, 327.712, -29.5, 1.346)
pt3dadd(-27.086, 327.769, -29.5, 1.332)
pt3dadd(-27.149, 327.871, -29.5, 1.342)
pt3dadd(-27.211, 327.973, -29.5, 1.352)
pt3dadd(-27.274, 328.075, -29.5, 1.362)
pt3dadd(-27.337, 328.178, -29.5, 1.372)
pt3dadd(-27.4, 328.28, -29.5, 1.382)
}
dend_5[6] {pt3dclear()
pt3dadd(-27.4, 328.28, -29.5, 1.382)
pt3dadd(-27.425, 328.306, -29.505, 1.396)
pt3dadd(-27.508, 328.388, -29.523, 1.45)
pt3dadd(-27.579, 328.478, -29.547, 1.486)
pt3dadd(-27.629, 328.579, -29.583, 1.5)
pt3dadd(-27.714, 328.638, -29.6, 1.486)
pt3dadd(-27.832, 328.658, -29.6, 1.448)
pt3dadd(-27.951, 328.679, -29.6, 1.41)
pt3dadd(-28.07, 328.68, -29.6, 1.344)
pt3dadd(-28.19, 328.68, -29.6, 1.278)
pt3dadd(-28.31, 328.68, -29.6, 1.21)
pt3dadd(-28.397, 328.753, -29.627, 1.152)
pt3dadd(-28.48, 328.831, -29.656, 1.094)
pt3dadd(-28.563, 328.91, -29.685, 1.036)
pt3dadd(-28.629, 329.01, -29.694, 0.988)
pt3dadd(-28.692, 329.111, -29.699, 0.94)
pt3dadd(-28.778, 329.192, -29.702, 0.878)
pt3dadd(-28.844, 329.29, -29.724, 0.866)
pt3dadd(-28.91, 329.386, -29.747, 0.856)
pt3dadd(-28.976, 329.482, -29.769, 0.844)
pt3dadd(-29.042, 329.579, -29.792, 0.832)
pt3dadd(-29.102, 329.662, -29.84, 0.81)
pt3dadd(-29.157, 329.736, -29.903, 0.778)
pt3dadd(-29.213, 329.812, -29.965, 0.748)
pt3dadd(-29.269, 329.887, -30.028, 0.716)
pt3dadd(-29.323, 329.97, -30.083, 0.656)
pt3dadd(-29.375, 330.06, -30.133, 0.572)
pt3dadd(-29.392, 330.146, -30.199, 0.486)
pt3dadd(-29.398, 330.23, -30.27, 0.4)
pt3dadd(-29.4, 330.341, -30.283, 0.348)
pt3dadd(-29.4, 330.461, -30.274, 0.308)
pt3dadd(-29.407, 330.577, -30.261, 0.272)
pt3dadd(-29.449, 330.682, -30.226, 0.246)
pt3dadd(-29.486, 330.79, -30.2, 0.226)
pt3dadd(-29.51, 330.907, -30.2, 0.226)
pt3dadd(-29.52, 331.026, -30.2, 0.226)
pt3dadd(-29.52, 331.146, -30.2, 0.226)
pt3dadd(-29.528, 331.266, -30.2, 0.226)
pt3dadd(-29.554, 331.382, -30.2, 0.226)
pt3dadd(-29.623, 331.478, -30.2, 0.226)
pt3dadd(-29.698, 331.572, -30.2, 0.226)
pt3dadd(-29.747, 331.68, -30.211, 0.226)
pt3dadd(-29.767, 331.768, -30.273, 0.276)
pt3dadd(-29.798, 331.799, -30.364, 0.35)
pt3dadd(-29.875, 331.795, -30.44, 0.342)
pt3dadd(-29.971, 331.762, -30.488, 0.302)
pt3dadd(-30.086, 331.727, -30.494, 0.302)
pt3dadd(-30.2, 331.692, -30.498, 0.302)
pt3dadd(-30.312, 331.668, -30.525, 0.302)
pt3dadd(-30.421, 331.649, -30.562, 0.302)
pt3dadd(-30.479, 331.582, -30.607, 0.306)
pt3dadd(-30.499, 331.48, -30.658, 0.316)
pt3dadd(-30.519, 331.378, -30.708, 0.326)
pt3dadd(-30.574, 331.366, -30.794, 0.356)
pt3dadd(-30.644, 331.37, -30.869, 0.38)
pt3dadd(-30.745, 331.409, -30.913, 0.39)
pt3dadd(-30.846, 331.446, -30.958, 0.4)
pt3dadd(-30.933, 331.495, -31.012, 0.39)
pt3dadd(-31.016, 331.548, -31.069, 0.376)
pt3dadd(-31.095, 331.6, -31.13, 0.344)
pt3dadd(-31.175, 331.651, -31.192, 0.312)
pt3dadd(-31.204, 331.696, -31.275, 0.286)
pt3dadd(-31.21, 331.736, -31.369, 0.264)
pt3dadd(-31.243, 331.788, -31.449, 0.246)
pt3dadd(-31.312, 331.852, -31.512, 0.236)
pt3dadd(-31.385, 331.908, -31.573, 0.226)
pt3dadd(-31.487, 331.914, -31.626, 0.226)
pt3dadd(-31.588, 331.921, -31.679, 0.226)
pt3dadd(-31.668, 331.984, -31.731, 0.226)
pt3dadd(-31.749, 332.047, -31.784, 0.226)
pt3dadd(-31.845, 332.108, -31.8, 0.226)
pt3dadd(-31.949, 332.17, -31.8, 0.226)
pt3dadd(-32.054, 332.227, -31.8, 0.226)
pt3dadd(-32.162, 332.279, -31.8, 0.226)
pt3dadd(-32.271, 332.329, -31.8, 0.226)
pt3dadd(-32.38, 332.38, -31.8, 0.226)
pt3dadd(-32.489, 332.43, -31.8, 0.226)
pt3dadd(-32.597, 332.48, -31.8, 0.226)
pt3dadd(-32.707, 332.53, -31.8, 0.226)
pt3dadd(-32.817, 332.578, -31.8, 0.226)
pt3dadd(-32.927, 332.626, -31.8, 0.226)
pt3dadd(-33.037, 332.672, -31.8, 0.226)
pt3dadd(-33.148, 332.72, -31.8, 0.226)
pt3dadd(-33.254, 332.77, -31.807, 0.226)
pt3dadd(-33.341, 332.831, -31.853, 0.226)
pt3dadd(-33.429, 332.893, -31.899, 0.226)
pt3dadd(-33.516, 332.954, -31.945, 0.226)
pt3dadd(-33.604, 333.014, -31.99, 0.226)
pt3dadd(-33.716, 333.038, -32.02, 0.226)
pt3dadd(-33.828, 333.064, -32.049, 0.226)
pt3dadd(-33.94, 333.088, -32.079, 0.226)
pt3dadd(-34.052, 333.113, -32.108, 0.226)
pt3dadd(-34.165, 333.136, -32.135, 0.226)
pt3dadd(-34.282, 333.155, -32.147, 0.226)
pt3dadd(-34.4, 333.174, -32.159, 0.226)
pt3dadd(-34.518, 333.193, -32.171, 0.226)
pt3dadd(-34.635, 333.214, -32.183, 0.226)
pt3dadd(-34.753, 333.233, -32.195, 0.226)
pt3dadd(-34.866, 333.269, -32.2, 0.226)
pt3dadd(-34.976, 333.316, -32.2, 0.226)
pt3dadd(-35.086, 333.364, -32.2, 0.226)
pt3dadd(-35.196, 333.412, -32.2, 0.226)
pt3dadd(-35.307, 333.458, -32.2, 0.226)
pt3dadd(-35.417, 333.504, -32.2, 0.226)
pt3dadd(-35.53, 333.546, -32.2, 0.226)
pt3dadd(-35.642, 333.588, -32.2, 0.226)
pt3dadd(-35.755, 333.629, -32.2, 0.226)
pt3dadd(-35.868, 333.671, -32.2, 0.226)
pt3dadd(-35.98, 333.713, -32.2, 0.226)
pt3dadd(-36.086, 333.763, -32.182, 0.226)
pt3dadd(-36.191, 333.816, -32.16, 0.226)
pt3dadd(-36.296, 333.868, -32.138, 0.226)
pt3dadd(-36.4, 333.92, -32.117, 0.226)
pt3dadd(-36.509, 333.96, -32.1, 0.228)
pt3dadd(-36.629, 333.96, -32.1, 0.236)
pt3dadd(-36.749, 333.96, -32.1, 0.244)
pt3dadd(-36.866, 333.973, -32.1, 0.256)
pt3dadd(-36.973, 334.026, -32.1, 0.278)
pt3dadd(-37.08, 334.08, -32.1, 0.302)
pt3dadd(-37.177, 334.148, -32.117, 0.354)
pt3dadd(-37.269, 334.219, -32.137, 0.406)
pt3dadd(-37.305, 334.313, -32.191, 0.46)
pt3dadd(-37.358, 334.394, -32.236, 0.52)
pt3dadd(-37.471, 334.429, -32.251, 0.602)
pt3dadd(-37.558, 334.44, -32.202, 0.748)
pt3dadd(-37.641, 334.44, -32.133, 0.914)
pt3dadd(-37.755, 334.44, -32.105, 1.022)
pt3dadd(-37.874, 334.45, -32.1, 1.142)
pt3dadd(-37.99, 334.477, -32.1, 1.314)
pt3dadd(-38.104, 334.516, -32.1, 1.39)
pt3dadd(-38.217, 334.555, -32.1, 1.454)
pt3dadd(-38.316, 334.619, -32.1, 1.488)
pt3dadd(-38.404, 334.702, -32.1, 1.5)
pt3dadd(-38.5, 334.77, -32.1, 1.462)
pt3dadd(-38.613, 334.807, -32.1, 1.414)
pt3dadd(-38.73, 334.837, -32.1, 1.386)
pt3dadd(-38.846, 334.867, -32.1, 1.36)
pt3dadd(-38.962, 334.898, -32.1, 1.334)
pt3dadd(-39.078, 334.928, -32.1, 1.308)
pt3dadd(-39.194, 334.958, -32.1, 1.282)
pt3dadd(-39.309, 334.993, -32.1, 1.268)
pt3dadd(-39.423, 335.029, -32.1, 1.254)
pt3dadd(-39.538, 335.065, -32.1, 1.24)
pt3dadd(-39.652, 335.101, -32.1, 1.228)
pt3dadd(-39.767, 335.137, -32.1, 1.214)
pt3dadd(-39.881, 335.173, -32.1, 1.206)
pt3dadd(-39.996, 335.209, -32.1, 1.206)
pt3dadd(-40.11, 335.245, -32.1, 1.206)
pt3dadd(-40.225, 335.281, -32.1, 1.206)
pt3dadd(-40.339, 335.316, -32.1, 1.206)
pt3dadd(-40.454, 335.352, -32.1, 1.206)
pt3dadd(-40.563, 335.402, -32.1, 1.22)
pt3dadd(-40.67, 335.455, -32.1, 1.24)
pt3dadd(-40.778, 335.509, -32.1, 1.258)
pt3dadd(-40.885, 335.563, -32.1, 1.278)
pt3dadd(-40.992, 335.616, -32.1, 1.298)
pt3dadd(-41.098, 335.674, -32.1, 1.318)
pt3dadd(-41.201, 335.735, -32.1, 1.342)
pt3dadd(-41.305, 335.796, -32.1, 1.36)
pt3dadd(-41.408, 335.856, -32.1, 1.372)
pt3dadd(-41.513, 335.914, -32.101, 1.374)
pt3dadd(-41.626, 335.956, -32.106, 1.328)
pt3dadd(-41.738, 335.996, -32.111, 1.284)
pt3dadd(-41.823, 336.042, -32.169, 1.228)
pt3dadd(-41.901, 336.086, -32.234, 1.16)
pt3dadd(-41.956, 336.13, -32.315, 1.016)
pt3dadd(-42.051, 336.173, -32.362, 0.978)
pt3dadd(-42.149, 336.216, -32.406, 0.948)
pt3dadd(-42.248, 336.259, -32.45, 0.92)
pt3dadd(-42.347, 336.304, -32.494, 0.89)
pt3dadd(-42.44, 336.36, -32.533, 0.754)
pt3dadd(-42.485, 336.427, -32.608, 0.686)
pt3dadd(-42.531, 336.474, -32.69, 0.678)
pt3dadd(-42.598, 336.518, -32.764, 0.678)
pt3dadd(-42.694, 336.574, -32.795, 0.69)
pt3dadd(-42.811, 336.596, -32.8, 0.74)
pt3dadd(-42.93, 336.6, -32.791, 0.816)
pt3dadd(-43.033, 336.6, -32.745, 0.878)
pt3dadd(-43.073, 336.606, -32.653, 0.844)
pt3dadd(-43.091, 336.635, -32.557, 0.682)
pt3dadd(-43.178, 336.694, -32.524, 0.584)
pt3dadd(-43.276, 336.757, -32.501, 0.506)
pt3dadd(-43.366, 336.803, -32.446, 0.436)
pt3dadd(-43.457, 336.844, -32.392, 0.374)
pt3dadd(-43.558, 336.863, -32.341, 0.362)
pt3dadd(-43.656, 336.889, -32.311, 0.348)
pt3dadd(-43.74, 336.943, -32.368, 0.334)
pt3dadd(-43.804, 336.988, -32.439, 0.326)
pt3dadd(-43.844, 337.019, -32.529, 0.326)
pt3dadd(-43.884, 337.051, -32.62, 0.326)
}
}
proc shape3d_96() {
dend_5[6] { pt3dadd(-43.922, 337.08, -32.711, 0.324)
pt3dadd(-43.936, 337.08, -32.81, 0.306)
pt3dadd(-43.951, 337.08, -32.91, 0.288)
pt3dadd(-43.998, 337.093, -32.992, 0.272)
pt3dadd(-44.09, 337.127, -33.05, 0.262)
pt3dadd(-44.182, 337.159, -33.108, 0.252)
pt3dadd(-44.266, 337.225, -33.153, 0.238)
pt3dadd(-44.355, 337.288, -33.192, 0.232)
pt3dadd(-44.466, 337.331, -33.2, 0.254)
pt3dadd(-44.574, 337.381, -33.2, 0.258)
pt3dadd(-44.683, 337.432, -33.2, 0.262)
pt3dadd(-44.792, 337.483, -33.2, 0.268)
pt3dadd(-44.901, 337.534, -33.2, 0.272)
pt3dadd(-45.009, 337.585, -33.2, 0.278)
pt3dadd(-45.113, 337.645, -33.2, 0.288)
pt3dadd(-45.216, 337.705, -33.2, 0.298)
pt3dadd(-45.321, 337.765, -33.2, 0.308)
pt3dadd(-45.424, 337.825, -33.2, 0.318)
pt3dadd(-45.529, 337.883, -33.2, 0.326)
pt3dadd(-45.645, 337.915, -33.2, 0.326)
pt3dadd(-45.76, 337.949, -33.2, 0.326)
pt3dadd(-45.859, 338.003, -33.176, 0.326)
pt3dadd(-45.948, 338.07, -33.139, 0.326)
pt3dadd(-46.031, 338.118, -33.08, 0.302)
pt3dadd(-46.111, 338.16, -33.015, 0.276)
pt3dadd(-46.175, 338.167, -32.931, 0.264)
pt3dadd(-46.238, 338.173, -32.846, 0.252)
pt3dadd(-46.332, 338.245, -32.831, 0.252)
pt3dadd(-46.425, 338.318, -32.818, 0.252)
pt3dadd(-46.519, 338.392, -32.804, 0.252)
pt3dadd(-46.599, 338.471, -32.826, 0.27)
pt3dadd(-46.674, 338.554, -32.864, 0.298)
pt3dadd(-46.699, 338.668, -32.855, 0.32)
pt3dadd(-46.719, 338.785, -32.842, 0.338)
pt3dadd(-46.762, 338.882, -32.82, 0.352)
pt3dadd(-46.857, 338.934, -32.778, 0.352)
pt3dadd(-46.92, 339.004, -32.726, 0.342)
pt3dadd(-46.946, 339.095, -32.664, 0.322)
pt3dadd(-46.972, 339.185, -32.602, 0.302)
pt3dadd(-47.088, 339.208, -32.6, 0.282)
pt3dadd(-47.206, 339.227, -32.6, 0.264)
pt3dadd(-47.325, 339.24, -32.6, 0.242)
pt3dadd(-47.445, 339.24, -32.6, 0.226)
pt3dadd(-47.565, 339.24, -32.6, 0.226)
pt3dadd(-47.685, 339.24, -32.6, 0.226)
pt3dadd(-47.805, 339.24, -32.6, 0.226)
pt3dadd(-47.925, 339.24, -32.6, 0.226)
pt3dadd(-48.045, 339.24, -32.6, 0.226)
pt3dadd(-48.165, 339.24, -32.6, 0.226)
pt3dadd(-48.285, 339.24, -32.6, 0.226)
pt3dadd(-48.405, 339.24, -32.6, 0.226)
pt3dadd(-48.525, 339.24, -32.6, 0.226)
pt3dadd(-48.645, 339.24, -32.6, 0.226)
pt3dadd(-48.765, 339.246, -32.6, 0.226)
pt3dadd(-48.878, 339.278, -32.6, 0.226)
pt3dadd(-48.946, 339.372, -32.6, 0.226)
pt3dadd(-48.96, 339.491, -32.6, 0.226)
pt3dadd(-48.96, 339.611, -32.6, 0.226)
pt3dadd(-48.96, 339.731, -32.6, 0.226)
pt3dadd(-48.961, 339.851, -32.6, 0.226)
pt3dadd(-48.98, 339.968, -32.597, 0.226)
pt3dadd(-49.043, 340.058, -32.571, 0.226)
pt3dadd(-49.146, 340.08, -32.527, 0.226)
pt3dadd(-49.263, 340.08, -32.506, 0.226)
pt3dadd(-49.382, 340.08, -32.5, 0.226)
pt3dadd(-49.502, 340.08, -32.5, 0.226)
pt3dadd(-49.622, 340.08, -32.5, 0.238)
pt3dadd(-49.742, 340.08, -32.5, 0.29)
pt3dadd(-49.854, 340.08, -32.526, 0.356)
pt3dadd(-49.957, 340.08, -32.577, 0.414)
pt3dadd(-50.044, 340.086, -32.64, 0.468)
pt3dadd(-50.097, 340.106, -32.728, 0.518)
pt3dadd(-50.151, 340.129, -32.815, 0.562)
pt3dadd(-50.209, 340.162, -32.898, 0.592)
pt3dadd(-50.267, 340.193, -32.982, 0.622)
pt3dadd(-50.28, 340.204, -33.078, 0.634)
pt3dadd(-50.28, 340.208, -33.178, 0.644)
pt3dadd(-50.28, 340.213, -33.278, 0.652)
pt3dadd(-50.318, 340.262, -33.361, 0.69)
pt3dadd(-50.4, 340.32, -33.4, 0.728)
pt3dadd(-50.508, 340.374, -33.4, 0.754)
pt3dadd(-50.615, 340.428, -33.4, 0.754)
pt3dadd(-50.723, 340.481, -33.4, 0.782)
pt3dadd(-50.829, 340.535, -33.4, 0.888)
pt3dadd(-50.937, 340.589, -33.4, 0.922)
pt3dadd(-51.044, 340.643, -33.4, 0.956)
pt3dadd(-51.152, 340.696, -33.4, 0.99)
pt3dadd(-51.259, 340.75, -33.4, 1.024)
pt3dadd(-51.366, 340.804, -33.402, 1.058)
pt3dadd(-51.46, 340.86, -33.442, 1.106)
pt3dadd(-51.555, 340.916, -33.481, 1.152)
pt3dadd(-51.649, 340.974, -33.521, 1.2)
pt3dadd(-51.744, 341.03, -33.56, 1.248)
pt3dadd(-51.85, 341.069, -33.592, 1.274)
pt3dadd(-51.959, 341.102, -33.623, 1.294)
pt3dadd(-52.068, 341.137, -33.654, 1.316)
pt3dadd(-52.177, 341.171, -33.685, 1.338)
pt3dadd(-52.283, 341.212, -33.714, 1.354)
pt3dadd(-52.379, 341.28, -33.734, 1.342)
pt3dadd(-52.474, 341.348, -33.754, 1.332)
pt3dadd(-52.569, 341.418, -33.774, 1.32)
pt3dadd(-52.665, 341.486, -33.794, 1.31)
pt3dadd(-52.759, 341.56, -33.8, 1.28)
pt3dadd(-52.853, 341.634, -33.8, 1.246)
pt3dadd(-52.946, 341.71, -33.8, 1.21)
pt3dadd(-53.04, 341.784, -33.8, 1.176)
pt3dadd(-53.134, 341.86, -33.8, 1.14)
pt3dadd(-53.224, 341.938, -33.8, 1.1)
pt3dadd(-53.313, 342.019, -33.8, 1.06)
pt3dadd(-53.402, 342.1, -33.8, 1.02)
pt3dadd(-53.491, 342.18, -33.8, 0.98)
pt3dadd(-53.58, 342.26, -33.8, 0.938)
pt3dadd(-53.662, 342.348, -33.8, 0.906)
pt3dadd(-53.743, 342.437, -33.8, 0.876)
pt3dadd(-53.823, 342.526, -33.8, 0.846)
pt3dadd(-53.904, 342.614, -33.8, 0.814)
pt3dadd(-53.985, 342.703, -33.8, 0.784)
pt3dadd(-54.067, 342.79, -33.812, 0.764)
pt3dadd(-54.149, 342.875, -33.827, 0.748)
pt3dadd(-54.232, 342.96, -33.841, 0.732)
pt3dadd(-54.314, 343.045, -33.856, 0.716)
pt3dadd(-54.391, 343.128, -33.883, 0.7)
pt3dadd(-54.452, 343.205, -33.94, 0.684)
pt3dadd(-54.516, 343.289, -33.987, 0.678)
pt3dadd(-54.583, 343.378, -34.024, 0.678)
pt3dadd(-54.65, 343.466, -34.061, 0.688)
pt3dadd(-54.717, 343.555, -34.098, 0.702)
pt3dadd(-54.778, 343.657, -34.084, 0.728)
pt3dadd(-54.839, 343.758, -34.067, 0.752)
pt3dadd(-54.922, 343.843, -34.055, 0.788)
pt3dadd(-55.007, 343.927, -34.043, 0.824)
pt3dadd(-55.088, 344.006, -34.044, 0.862)
pt3dadd(-55.146, 344.05, -34.123, 0.916)
pt3dadd(-55.2, 344.1, -34.201, 1.006)
pt3dadd(-55.272, 344.179, -34.235, 1.062)
pt3dadd(-55.356, 344.263, -34.252, 1.074)
pt3dadd(-55.44, 344.347, -34.269, 1.086)
pt3dadd(-55.523, 344.43, -34.287, 1.096)
pt3dadd(-55.606, 344.515, -34.301, 1.106)
pt3dadd(-55.688, 344.602, -34.303, 1.112)
pt3dadd(-55.771, 344.689, -34.305, 1.116)
pt3dadd(-55.853, 344.777, -34.307, 1.122)
pt3dadd(-55.935, 344.864, -34.31, 1.126)
pt3dadd(-56.018, 344.95, -34.319, 1.132)
pt3dadd(-56.103, 345.031, -34.339, 1.138)
pt3dadd(-56.187, 345.113, -34.359, 1.144)
pt3dadd(-56.272, 345.194, -34.379, 1.15)
pt3dadd(-56.357, 345.276, -34.399, 1.154)
pt3dadd(-56.435, 345.367, -34.4, 1.174)
pt3dadd(-56.512, 345.458, -34.4, 1.194)
pt3dadd(-56.59, 345.55, -34.4, 1.214)
pt3dadd(-56.668, 345.641, -34.4, 1.236)
pt3dadd(-56.746, 345.732, -34.4, 1.256)
pt3dadd(-56.839, 345.808, -34.4, 1.286)
pt3dadd(-56.933, 345.882, -34.4, 1.316)
pt3dadd(-57.027, 345.958, -34.4, 1.346)
pt3dadd(-57.121, 346.032, -34.4, 1.376)
pt3dadd(-57.214, 346.108, -34.4, 1.406)
pt3dadd(-57.302, 346.189, -34.4, 1.466)
pt3dadd(-57.39, 346.271, -34.4, 1.526)
pt3dadd(-57.478, 346.352, -34.4, 1.51)
pt3dadd(-57.566, 346.434, -34.4, 1.488)
pt3dadd(-57.59, 346.544, -34.4, 1.436)
pt3dadd(-57.595, 346.664, -34.4, 1.374)
pt3dadd(-57.599, 346.784, -34.4, 1.314)
pt3dadd(-57.613, 346.903, -34.4, 1.224)
pt3dadd(-57.627, 347.023, -34.4, 1.132)
pt3dadd(-57.653, 347.137, -34.4, 1.048)
pt3dadd(-57.728, 347.231, -34.4, 1.004)
pt3dadd(-57.804, 347.324, -34.4, 0.962)
pt3dadd(-57.879, 347.418, -34.4, 0.92)
pt3dadd(-57.95, 347.514, -34.4, 0.896)
pt3dadd(-58.017, 347.614, -34.4, 0.886)
pt3dadd(-58.108, 347.68, -34.4, 0.896)
pt3dadd(-58.225, 347.708, -34.4, 0.934)
pt3dadd(-58.341, 347.736, -34.4, 0.972)
pt3dadd(-58.458, 347.76, -34.402, 1.014)
pt3dadd(-58.577, 347.76, -34.414, 1.08)
pt3dadd(-58.696, 347.76, -34.427, 1.146)
pt3dadd(-58.806, 347.783, -34.452, 1.2)
pt3dadd(-58.904, 347.832, -34.493, 1.24)
pt3dadd(-59.001, 347.881, -34.534, 1.28)
pt3dadd(-59.053, 347.941, -34.609, 1.28)
pt3dadd(-59.117, 347.992, -34.679, 1.246)
pt3dadd(-59.215, 348.004, -34.734, 1.146)
pt3dadd(-59.312, 348.01, -34.793, 1.086)
pt3dadd(-59.37, 348.068, -34.841, 1.03)
pt3dadd(-59.389, 348.178, -34.879, 0.982)
pt3dadd(-59.417, 348.289, -34.9, 0.94)
pt3dadd(-59.457, 348.402, -34.9, 0.908)
pt3dadd(-59.502, 348.51, -34.9, 0.878)
pt3dadd(-59.613, 348.557, -34.9, 0.878)
pt3dadd(-59.723, 348.604, -34.9, 0.878)
pt3dadd(-59.831, 348.655, -34.9, 0.866)
pt3dadd(-59.926, 348.724, -34.9, 0.858)
pt3dadd(-59.992, 348.823, -34.9, 0.874)
pt3dadd(-60.058, 348.924, -34.9, 0.888)
pt3dadd(-60.124, 349.024, -34.9, 0.902)
pt3dadd(-60.19, 349.124, -34.9, 0.918)
pt3dadd(-60.259, 349.223, -34.9, 0.932)
}
}
proc shape3d_97() {
dend_5[6] { pt3dadd(-60.337, 349.314, -34.9, 0.948)
pt3dadd(-60.415, 349.405, -34.9, 0.964)
pt3dadd(-60.492, 349.496, -34.9, 0.978)
pt3dadd(-60.57, 349.588, -34.9, 0.994)
pt3dadd(-60.643, 349.682, -34.9, 1.012)
pt3dadd(-60.703, 349.787, -34.9, 1.036)
pt3dadd(-60.763, 349.89, -34.9, 1.06)
pt3dadd(-60.823, 349.994, -34.9, 1.084)
pt3dadd(-60.883, 350.099, -34.9, 1.11)
pt3dadd(-60.95, 350.196, -34.9, 1.134)
pt3dadd(-61.053, 350.256, -34.9, 1.156)
pt3dadd(-61.157, 350.317, -34.9, 1.18)
pt3dadd(-61.226, 350.414, -34.9, 1.202)
pt3dadd(-61.294, 350.514, -34.9, 1.226)
pt3dadd(-61.311, 350.629, -34.9, 1.238)
pt3dadd(-61.315, 350.749, -34.9, 1.246)
pt3dadd(-61.32, 350.869, -34.9, 1.254)
pt3dadd(-61.32, 350.975, -34.946, 1.256)
pt3dadd(-61.32, 351.078, -34.997, 1.256)
pt3dadd(-61.349, 351.168, -35.056, 1.244)
pt3dadd(-61.389, 351.252, -35.119, 1.226)
pt3dadd(-61.429, 351.336, -35.182, 1.21)
pt3dadd(-61.507, 351.414, -35.2, 1.18)
pt3dadd(-61.601, 351.488, -35.2, 1.144)
pt3dadd(-61.671, 351.582, -35.2, 1.072)
pt3dadd(-61.754, 351.664, -35.219, 1.05)
pt3dadd(-61.842, 351.74, -35.242, 1.044)
pt3dadd(-61.931, 351.816, -35.265, 1.038)
pt3dadd(-62.019, 351.893, -35.288, 1.032)
pt3dadd(-62.088, 351.985, -35.3, 1.034)
pt3dadd(-62.135, 352.096, -35.3, 1.046)
pt3dadd(-62.181, 352.206, -35.301, 1.06)
pt3dadd(-62.222, 352.319, -35.306, 1.094)
pt3dadd(-62.264, 352.432, -35.311, 1.128)
pt3dadd(-62.344, 352.502, -35.352, 1.144)
pt3dadd(-62.433, 352.564, -35.39, 1.156)
pt3dadd(-62.55, 352.585, -35.394, 1.166)
pt3dadd(-62.669, 352.606, -35.398, 1.176)
pt3dadd(-62.744, 352.666, -35.441, 1.186)
pt3dadd(-62.799, 352.742, -35.502, 1.194)
pt3dadd(-62.853, 352.82, -35.563, 1.204)
pt3dadd(-62.871, 352.871, -35.649, 1.23)
pt3dadd(-62.877, 352.913, -35.742, 1.264)
pt3dadd(-62.88, 352.96, -35.834, 1.314)
pt3dadd(-62.88, 353.032, -35.913, 1.334)
pt3dadd(-62.88, 353.11, -35.989, 1.34)
pt3dadd(-62.88, 353.188, -36.065, 1.344)
pt3dadd(-62.88, 353.266, -36.141, 1.35)
pt3dadd(-62.88, 353.344, -36.217, 1.354)
pt3dadd(-62.902, 353.411, -36.298, 1.346)
pt3dadd(-62.93, 353.473, -36.38, 1.332)
pt3dadd(-63.018, 353.526, -36.427, 1.27)
pt3dadd(-63.108, 353.581, -36.468, 1.198)
pt3dadd(-63.131, 353.698, -36.482, 1.1)
pt3dadd(-63.154, 353.814, -36.497, 1.002)
pt3dadd(-63.223, 353.909, -36.5, 0.888)
pt3dadd(-63.305, 353.996, -36.5, 0.77)
pt3dadd(-63.389, 354.082, -36.5, 0.658)
pt3dadd(-63.473, 354.167, -36.504, 0.558)
pt3dadd(-63.56, 354.24, -36.533, 0.528)
pt3dadd(-63.628, 354.318, -36.582, 0.51)
pt3dadd(-63.689, 354.418, -36.6, 0.44)
pt3dadd(-63.751, 354.52, -36.6, 0.402)
pt3dadd(-63.845, 354.588, -36.586, 0.428)
pt3dadd(-63.928, 354.6, -36.521, 0.452)
pt3dadd(-63.956, 354.6, -36.425, 0.434)
pt3dadd(-63.971, 354.6, -36.326, 0.386)
pt3dadd(-64.012, 354.619, -36.237, 0.302)
pt3dadd(-64.094, 354.664, -36.174, 0.316)
pt3dadd(-64.169, 354.709, -36.105, 0.344)
pt3dadd(-64.202, 354.72, -36.014, 0.382)
pt3dadd(-64.223, 354.72, -35.916, 0.42)
pt3dadd(-64.251, 354.728, -35.822, 0.454)
pt3dadd(-64.319, 354.782, -35.752, 0.468)
pt3dadd(-64.394, 354.847, -35.709, 0.478)
pt3dadd(-64.479, 354.932, -35.703, 0.478)
pt3dadd(-64.564, 355.016, -35.702, 0.472)
pt3dadd(-64.648, 355.102, -35.707, 0.46)
pt3dadd(-64.734, 355.181, -35.723, 0.452)
pt3dadd(-64.789, 355.247, -35.787, 0.452)
pt3dadd(-64.8, 355.295, -35.877, 0.438)
pt3dadd(-64.8, 355.328, -35.973, 0.386)
pt3dadd(-64.801, 355.362, -36.069, 0.3)
pt3dadd(-64.846, 355.428, -36.143, 0.286)
pt3dadd(-64.885, 355.488, -36.222, 0.278)
pt3dadd(-64.903, 355.526, -36.315, 0.29)
pt3dadd(-64.924, 355.562, -36.409, 0.304)
pt3dadd(-64.963, 355.589, -36.501, 0.342)
pt3dadd(-65.004, 355.616, -36.589, 0.378)
pt3dadd(-65.085, 355.705, -36.601, 0.404)
pt3dadd(-65.166, 355.789, -36.614, 0.428)
pt3dadd(-65.264, 355.832, -36.659, 0.448)
pt3dadd(-65.32, 355.927, -36.692, 0.452)
pt3dadd(-65.368, 356.032, -36.721, 0.452)
pt3dadd(-65.415, 356.135, -36.751, 0.452)
pt3dadd(-65.463, 356.239, -36.781, 0.452)
pt3dadd(-65.523, 356.336, -36.808, 0.452)
pt3dadd(-65.606, 356.418, -36.831, 0.452)
pt3dadd(-65.688, 356.501, -36.854, 0.452)
pt3dadd(-65.771, 356.584, -36.877, 0.452)
pt3dadd(-65.854, 356.666, -36.9, 0.452)
pt3dadd(-65.93, 356.742, -36.944, 0.466)
pt3dadd(-65.996, 356.821, -36.993, 0.484)
pt3dadd(-66.032, 356.91, -37.054, 0.512)
pt3dadd(-66.097, 356.986, -37.089, 0.542)
pt3dadd(-66.202, 357.044, -37.089, 0.58)
pt3dadd(-66.296, 357.109, -37.072, 0.62)
pt3dadd(-66.372, 357.185, -37.028, 0.662)
pt3dadd(-66.446, 357.256, -37.047, 0.7)
pt3dadd(-66.518, 357.324, -37.103, 0.738)
pt3dadd(-66.591, 357.391, -37.159, 0.774)
pt3dadd(-66.618, 357.479, -37.222, 0.836)
pt3dadd(-66.639, 357.569, -37.285, 0.9)
pt3dadd(-66.722, 357.652, -37.293, 0.948)
pt3dadd(-66.81, 357.734, -37.297, 0.992)
pt3dadd(-66.9, 357.812, -37.3, 1.036)
pt3dadd(-67.003, 357.872, -37.3, 1.07)
pt3dadd(-67.107, 357.934, -37.3, 1.104)
pt3dadd(-67.198, 358.012, -37.302, 1.094)
pt3dadd(-67.283, 358.096, -37.307, 1.058)
pt3dadd(-67.365, 358.178, -37.322, 1.012)
pt3dadd(-67.441, 358.255, -37.366, 0.94)
pt3dadd(-67.52, 358.337, -37.394, 0.872)
pt3dadd(-67.601, 358.424, -37.406, 0.81)
pt3dadd(-67.675, 358.494, -37.447, 0.756)
pt3dadd(-67.743, 358.547, -37.516, 0.714)
pt3dadd(-67.778, 358.56, -37.607, 0.692)
pt3dadd(-67.8, 358.56, -37.705, 0.678)
pt3dadd(-67.8, 358.561, -37.805, 0.68)
pt3dadd(-67.8, 358.578, -37.904, 0.708)
pt3dadd(-67.807, 358.621, -37.996, 0.742)
pt3dadd(-67.848, 358.686, -38.07, 0.72)
pt3dadd(-67.935, 358.762, -38.097, 0.64)
pt3dadd(-68.024, 358.84, -38.1, 0.572)
pt3dadd(-68.107, 358.926, -38.1, 0.506)
pt3dadd(-68.187, 359.014, -38.1, 0.4)
pt3dadd(-68.25, 359.114, -38.1, 0.282)
pt3dadd(-68.274, 359.231, -38.1, 0.238)
pt3dadd(-68.28, 359.351, -38.1, 0.23)
pt3dadd(-68.28, 359.471, -38.1, 0.24)
pt3dadd(-68.28, 359.591, -38.1, 0.248)
pt3dadd(-68.28, 359.711, -38.1, 0.262)
pt3dadd(-68.28, 359.831, -38.1, 0.278)
pt3dadd(-68.28, 359.951, -38.1, 0.294)
pt3dadd(-68.305, 360.066, -38.107, 0.312)
pt3dadd(-68.346, 360.178, -38.118, 0.33)
pt3dadd(-68.388, 360.289, -38.13, 0.346)
pt3dadd(-68.444, 360.37, -38.179, 0.352)
pt3dadd(-68.505, 360.439, -38.243, 0.352)
pt3dadd(-68.511, 360.484, -38.335, 0.336)
pt3dadd(-68.515, 360.528, -38.428, 0.318)
pt3dadd(-68.52, 360.574, -38.521, 0.302)
pt3dadd(-68.526, 360.636, -38.606, 0.29)
pt3dadd(-68.533, 360.7, -38.691, 0.278)
pt3dadd(-68.562, 360.724, -38.784, 0.33)
pt3dadd(-68.577, 360.743, -38.882, 0.348)
pt3dadd(-68.591, 360.762, -38.98, 0.366)
pt3dadd(-68.606, 360.781, -39.078, 0.384)
pt3dadd(-68.62, 360.8, -39.176, 0.402)
pt3dadd(-68.634, 360.82, -39.274, 0.42)
pt3dadd(-68.64, 360.836, -39.373, 0.48)
pt3dadd(-68.64, 360.84, -39.472, 0.502)
pt3dadd(-68.64, 360.829, -39.572, 0.502)
pt3dadd(-68.64, 360.799, -39.668, 0.528)
pt3dadd(-68.677, 360.744, -39.749, 0.578)
pt3dadd(-68.774, 360.702, -39.791, 0.552)
pt3dadd(-68.884, 360.658, -39.8, 0.58)
pt3dadd(-68.992, 360.604, -39.8, 0.648)
pt3dadd(-69.085, 360.541, -39.774, 0.63)
pt3dadd(-69.135, 360.492, -39.696, 0.524)
pt3dadd(-69.178, 360.48, -39.603, 0.474)
pt3dadd(-69.232, 360.48, -39.514, 0.462)
pt3dadd(-69.285, 360.48, -39.424, 0.454)
pt3dadd(-69.339, 360.48, -39.335, 0.464)
pt3dadd(-69.393, 360.48, -39.245, 0.476)
pt3dadd(-69.444, 360.48, -39.155, 0.538)
pt3dadd(-69.472, 360.475, -39.059, 0.612)
pt3dadd(-69.48, 360.45, -38.961, 0.612)
pt3dadd(-69.48, 360.402, -38.87, 0.556)
pt3dadd(-69.486, 360.392, -38.773, 0.564)
pt3dadd(-69.527, 360.448, -38.694, 0.574)
pt3dadd(-69.597, 360.516, -38.636, 0.552)
pt3dadd(-69.669, 360.602, -38.605, 0.67)
pt3dadd(-69.747, 360.694, -38.6, 0.778)
pt3dadd(-69.835, 360.774, -38.6, 0.86)
pt3dadd(-69.918, 360.86, -38.6, 0.91)
pt3dadd(-70.007, 360.941, -38.6, 0.92)
pt3dadd(-70.096, 361.021, -38.6, 0.93)
pt3dadd(-70.184, 361.102, -38.6, 0.94)
pt3dadd(-70.273, 361.183, -38.6, 0.95)
pt3dadd(-70.367, 361.258, -38.6, 0.954)
pt3dadd(-70.463, 361.33, -38.6, 0.954)
pt3dadd(-70.559, 361.402, -38.6, 0.954)
pt3dadd(-70.655, 361.474, -38.6, 0.954)
pt3dadd(-70.751, 361.546, -38.6, 0.954)
pt3dadd(-70.832, 361.633, -38.6, 0.948)
pt3dadd(-70.904, 361.729, -38.6, 0.938)
pt3dadd(-70.976, 361.825, -38.6, 0.928)
pt3dadd(-71.048, 361.921, -38.6, 0.918)
pt3dadd(-71.12, 362.017, -38.6, 0.908)
}
}
proc shape3d_98() {
dend_5[6] { pt3dadd(-71.207, 362.098, -38.6, 0.898)
pt3dadd(-71.303, 362.17, -38.6, 0.888)
pt3dadd(-71.399, 362.242, -38.6, 0.878)
pt3dadd(-71.495, 362.314, -38.6, 0.868)
pt3dadd(-71.591, 362.386, -38.6, 0.858)
pt3dadd(-71.669, 362.474, -38.6, 0.854)
pt3dadd(-71.737, 362.574, -38.6, 0.854)
pt3dadd(-71.805, 362.672, -38.6, 0.876)
pt3dadd(-71.873, 362.772, -38.6, 0.922)
pt3dadd(-71.947, 362.866, -38.6, 0.976)
pt3dadd(-72.035, 362.947, -38.6, 1.048)
pt3dadd(-72.108, 363.035, -38.602, 1.116)
pt3dadd(-72.113, 363.154, -38.615, 1.174)
pt3dadd(-72.118, 363.272, -38.628, 1.232)
pt3dadd(-72.147, 363.374, -38.667, 1.266)
pt3dadd(-72.191, 363.463, -38.723, 1.282)
pt3dadd(-72.236, 363.552, -38.778, 1.3)
pt3dadd(-72.318, 363.59, -38.829, 1.292)
pt3dadd(-72.424, 363.596, -38.875, 1.268)
pt3dadd(-72.509, 363.61, -38.94, 1.166)
pt3dadd(-72.598, 363.655, -38.99, 1.074)
pt3dadd(-72.693, 363.707, -39.033, 1.004)
pt3dadd(-72.759, 363.72, -39.116, 0.942)
pt3dadd(-72.825, 363.733, -39.198, 0.88)
pt3dadd(-72.862, 363.826, -39.253, 0.838)
pt3dadd(-72.907, 363.917, -39.3, 0.798)
pt3dadd(-73.006, 363.984, -39.3, 0.764)
pt3dadd(-73.104, 364.052, -39.3, 0.728)
pt3dadd(-73.163, 364.157, -39.308, 0.764)
pt3dadd(-73.205, 364.264, -39.331, 0.784)
pt3dadd(-73.236, 364.372, -39.364, 0.796)
pt3dadd(-73.268, 364.481, -39.397, 0.806)
pt3dadd(-73.299, 364.589, -39.431, 0.816)
pt3dadd(-73.331, 364.698, -39.464, 0.828)
pt3dadd(-73.375, 364.807, -39.481, 0.874)
pt3dadd(-73.42, 364.918, -39.498, 0.922)
pt3dadd(-73.485, 365.017, -39.5, 0.93)
pt3dadd(-73.552, 365.117, -39.5, 0.93)
pt3dadd(-73.652, 365.174, -39.5, 0.93)
pt3dadd(-73.765, 365.214, -39.5, 0.93)
pt3dadd(-73.876, 365.258, -39.5, 0.926)
pt3dadd(-73.984, 365.312, -39.5, 0.914)
pt3dadd(-74.092, 365.363, -39.5, 0.902)
pt3dadd(-74.21, 365.386, -39.5, 0.888)
pt3dadd(-74.317, 365.431, -39.5, 0.874)
pt3dadd(-74.408, 365.509, -39.5, 0.864)
pt3dadd(-74.499, 365.587, -39.5, 0.854)
pt3dadd(-74.591, 365.665, -39.5, 0.844)
pt3dadd(-74.682, 365.743, -39.5, 0.834)
pt3dadd(-74.768, 365.824, -39.51, 0.824)
pt3dadd(-74.848, 365.91, -39.533, 0.812)
pt3dadd(-74.927, 365.995, -39.556, 0.8)
pt3dadd(-75.007, 366.08, -39.579, 0.788)
pt3dadd(-75.086, 366.167, -39.599, 0.778)
pt3dadd(-75.162, 366.257, -39.581, 0.764)
pt3dadd(-75.236, 366.349, -39.563, 0.756)
pt3dadd(-75.299, 366.448, -39.541, 0.772)
pt3dadd(-75.334, 366.521, -39.59, 0.796)
pt3dadd(-75.354, 366.582, -39.674, 0.822)
pt3dadd(-75.36, 366.672, -39.735, 0.86)
pt3dadd(-75.36, 366.775, -39.786, 0.906)
pt3dadd(-75.36, 366.881, -39.834, 0.962)
pt3dadd(-75.36, 366.988, -39.879, 1.03)
pt3dadd(-75.36, 367.091, -39.929, 1.076)
pt3dadd(-75.36, 367.195, -39.98, 1.122)
pt3dadd(-75.394, 367.306, -39.993, 1.166)
pt3dadd(-75.436, 367.418, -39.998, 1.212)
pt3dadd(-75.512, 367.501, -40, 1.27)
pt3dadd(-75.616, 367.562, -40, 1.338)
pt3dadd(-75.719, 367.622, -40, 1.416)
pt3dadd(-75.823, 367.684, -40, 1.508)
pt3dadd(-75.913, 367.754, -40, 1.596)
pt3dadd(-75.946, 367.87, -40, 1.674)
pt3dadd(-76.004, 367.972, -40, 1.7)
pt3dadd(-76.082, 368.063, -40, 1.684)
pt3dadd(-76.16, 368.154, -40, 1.668)
pt3dadd(-76.238, 368.245, -40, 1.654)
pt3dadd(-76.316, 368.338, -40, 1.638)
pt3dadd(-76.409, 368.41, -40, 1.602)
pt3dadd(-76.513, 368.47, -40, 1.554)
pt3dadd(-76.617, 368.528, -40, 1.504)
pt3dadd(-76.721, 368.588, -40, 1.456)
pt3dadd(-76.825, 368.648, -40, 1.406)
pt3dadd(-76.921, 368.718, -40.008, 1.354)
pt3dadd(-77.008, 368.798, -40.026, 1.298)
pt3dadd(-77.094, 368.879, -40.043, 1.242)
pt3dadd(-77.181, 368.959, -40.061, 1.186)
pt3dadd(-77.267, 369.04, -40.078, 1.13)
pt3dadd(-77.322, 369.14, -40.108, 1.112)
pt3dadd(-77.376, 369.241, -40.139, 1.096)
pt3dadd(-77.431, 369.341, -40.169, 1.078)
pt3dadd(-77.486, 369.442, -40.2, 1.062)
pt3dadd(-77.542, 369.535, -40.239, 1.054)
pt3dadd(-77.6, 369.625, -40.285, 1.054)
pt3dadd(-77.658, 369.715, -40.33, 1.054)
pt3dadd(-77.716, 369.805, -40.376, 1.054)
pt3dadd(-77.749, 369.908, -40.406, 1.054)
pt3dadd(-77.754, 370.027, -40.419, 1.054)
pt3dadd(-77.759, 370.146, -40.432, 1.054)
pt3dadd(-77.777, 370.26, -40.461, 1.024)
pt3dadd(-77.795, 370.372, -40.492, 0.988)
pt3dadd(-77.874, 370.451, -40.5, 0.962)
pt3dadd(-77.973, 370.519, -40.5, 0.938)
pt3dadd(-78.083, 370.559, -40.503, 0.924)
pt3dadd(-78.201, 370.58, -40.507, 0.914)
pt3dadd(-78.315, 370.606, -40.517, 0.906)
pt3dadd(-78.395, 370.663, -40.574, 0.928)
pt3dadd(-78.476, 370.744, -40.605, 0.934)
pt3dadd(-78.557, 370.824, -40.633, 0.94)
pt3dadd(-78.639, 370.906, -40.662, 0.946)
pt3dadd(-78.72, 370.987, -40.691, 0.952)
pt3dadd(-78.802, 371.072, -40.7, 0.97)
pt3dadd(-78.883, 371.16, -40.7, 0.994)
pt3dadd(-78.931, 371.26, -40.721, 1.012)
pt3dadd(-78.95, 371.37, -40.758, 1.024)
pt3dadd(-78.973, 371.449, -40.821, 1.03)
pt3dadd(-79, 371.496, -40.91, 1.03)
pt3dadd(-79.071, 371.522, -40.964, 1.024)
pt3dadd(-79.189, 371.528, -40.982, 1.014)
pt3dadd(-79.307, 371.533, -41, 1.004)
pt3dadd(-79.386, 371.624, -41, 0.998)
pt3dadd(-79.465, 371.714, -41, 0.99)
pt3dadd(-79.544, 371.804, -41, 0.984)
pt3dadd(-79.608, 371.904, -41, 0.99)
pt3dadd(-79.655, 372.014, -41, 1.012)
pt3dadd(-79.7, 372.126, -41.003, 1.03)
pt3dadd(-79.741, 372.235, -41.023, 1.024)
pt3dadd(-79.788, 372.341, -41.05, 1.014)
pt3dadd(-79.835, 372.446, -41.077, 1.002)
pt3dadd(-79.882, 372.552, -41.104, 0.992)
pt3dadd(-79.929, 372.658, -41.131, 0.98)
pt3dadd(-80.017, 372.734, -41.149, 0.954)
pt3dadd(-80.109, 372.809, -41.166, 0.926)
pt3dadd(-80.201, 372.883, -41.184, 0.898)
pt3dadd(-80.293, 372.956, -41.201, 0.87)
pt3dadd(-80.366, 373.045, -41.219, 0.85)
pt3dadd(-80.41, 373.154, -41.238, 0.838)
pt3dadd(-80.455, 373.264, -41.256, 0.828)
pt3dadd(-80.499, 373.373, -41.275, 0.818)
pt3dadd(-80.544, 373.482, -41.293, 0.808)
pt3dadd(-80.585, 373.594, -41.3, 0.804)
pt3dadd(-80.624, 373.708, -41.3, 0.804)
pt3dadd(-80.662, 373.822, -41.3, 0.804)
pt3dadd(-80.701, 373.934, -41.3, 0.804)
pt3dadd(-80.74, 374.048, -41.3, 0.804)
pt3dadd(-80.779, 374.161, -41.303, 0.806)
pt3dadd(-80.825, 374.269, -41.324, 0.816)
pt3dadd(-80.87, 374.377, -41.345, 0.826)
pt3dadd(-80.916, 374.485, -41.367, 0.838)
pt3dadd(-80.961, 374.593, -41.388, 0.848)
pt3dadd(-80.989, 374.7, -41.421, 0.864)
pt3dadd(-80.996, 374.807, -41.467, 0.888)
pt3dadd(-81.023, 374.899, -41.517, 0.926)
pt3dadd(-81.1, 374.96, -41.575, 0.998)
pt3dadd(-81.196, 375.013, -41.6, 1.06)
pt3dadd(-81.306, 375.06, -41.6, 1.116)
pt3dadd(-81.405, 375.121, -41.6, 1.164)
pt3dadd(-81.473, 375.22, -41.6, 1.2)
pt3dadd(-81.546, 375.312, -41.603, 1.224)
pt3dadd(-81.655, 375.352, -41.628, 1.168)
pt3dadd(-81.767, 375.379, -41.656, 1.128)
pt3dadd(-81.879, 375.403, -41.686, 1.092)
pt3dadd(-81.99, 375.428, -41.715, 1.056)
pt3dadd(-82.102, 375.452, -41.745, 1.02)
pt3dadd(-82.214, 375.478, -41.775, 0.984)
pt3dadd(-82.302, 375.529, -41.826, 0.942)
pt3dadd(-82.386, 375.584, -41.88, 0.898)
pt3dadd(-82.471, 375.64, -41.934, 0.856)
pt3dadd(-82.555, 375.695, -41.988, 0.812)
pt3dadd(-82.646, 375.749, -42.035, 0.79)
pt3dadd(-82.738, 375.804, -42.081, 0.772)
pt3dadd(-82.831, 375.858, -42.126, 0.754)
pt3dadd(-82.923, 375.912, -42.171, 0.736)
pt3dadd(-83.012, 375.983, -42.19, 0.726)
pt3dadd(-83.1, 376.064, -42.192, 0.72)
pt3dadd(-83.188, 376.147, -42.195, 0.714)
pt3dadd(-83.275, 376.229, -42.197, 0.71)
pt3dadd(-83.363, 376.31, -42.199, 0.704)
pt3dadd(-83.449, 376.391, -42.217, 0.704)
pt3dadd(-83.534, 376.47, -42.24, 0.704)
pt3dadd(-83.62, 376.55, -42.263, 0.704)
pt3dadd(-83.706, 376.63, -42.285, 0.704)
pt3dadd(-83.799, 376.699, -42.3, 0.7)
pt3dadd(-83.906, 376.753, -42.3, 0.69)
pt3dadd(-84.014, 376.807, -42.3, 0.68)
pt3dadd(-84.121, 376.86, -42.3, 0.67)
pt3dadd(-84.228, 376.914, -42.3, 0.662)
pt3dadd(-84.335, 376.97, -42.3, 0.652)
pt3dadd(-84.433, 377.039, -42.3, 0.648)
pt3dadd(-84.531, 377.108, -42.3, 0.642)
pt3dadd(-84.629, 377.177, -42.3, 0.638)
pt3dadd(-84.727, 377.246, -42.3, 0.632)
pt3dadd(-84.827, 377.311, -42.3, 0.628)
pt3dadd(-84.94, 377.351, -42.3, 0.628)
pt3dadd(-85.054, 377.39, -42.3, 0.628)
pt3dadd(-85.165, 377.419, -42.325, 0.646)
pt3dadd(-85.275, 377.446, -42.358, 0.67)
pt3dadd(-85.311, 377.528, -42.4, 0.712)
pt3dadd(-85.317, 377.635, -42.447, 0.758)
pt3dadd(-85.346, 377.743, -42.476, 0.8)
}
}
proc shape3d_99() {
dend_5[6] { pt3dadd(-85.391, 377.852, -42.492, 0.836)
pt3dadd(-85.462, 377.939, -42.513, 0.874)
pt3dadd(-85.557, 378.006, -42.537, 0.904)
pt3dadd(-85.651, 378.079, -42.552, 0.904)
pt3dadd(-85.744, 378.151, -42.566, 0.904)
pt3dadd(-85.838, 378.224, -42.581, 0.904)
pt3dadd(-85.931, 378.298, -42.595, 0.904)
pt3dadd(-86.043, 378.331, -42.6, 0.916)
pt3dadd(-86.162, 378.346, -42.6, 0.936)
pt3dadd(-86.281, 378.36, -42.6, 0.954)
pt3dadd(-86.399, 378.38, -42.6, 0.994)
pt3dadd(-86.517, 378.401, -42.6, 1.032)
pt3dadd(-86.612, 378.456, -42.6, 1.082)
pt3dadd(-86.673, 378.559, -42.6, 1.152)
pt3dadd(-86.736, 378.66, -42.6, 1.212)
pt3dadd(-86.811, 378.754, -42.6, 1.248)
pt3dadd(-86.888, 378.846, -42.6, 1.28)
pt3dadd(-86.988, 378.912, -42.6, 1.28)
pt3dadd(-87.088, 378.979, -42.6, 1.28)
pt3dadd(-87.188, 379.045, -42.6, 1.28)
pt3dadd(-87.295, 379.096, -42.6, 1.27)
pt3dadd(-87.411, 379.129, -42.6, 1.25)
pt3dadd(-87.526, 379.162, -42.6, 1.228)
pt3dadd(-87.638, 379.202, -42.6, 1.206)
pt3dadd(-87.738, 379.268, -42.6, 1.206)
pt3dadd(-87.838, 379.334, -42.6, 1.206)
pt3dadd(-87.938, 379.4, -42.6, 1.206)
pt3dadd(-88.038, 379.466, -42.6, 1.206)
pt3dadd(-88.137, 379.536, -42.6, 1.204)
pt3dadd(-88.225, 379.616, -42.6, 1.2)
pt3dadd(-88.314, 379.697, -42.6, 1.194)
pt3dadd(-88.403, 379.777, -42.6, 1.19)
pt3dadd(-88.492, 379.858, -42.6, 1.184)
pt3dadd(-88.585, 379.932, -42.604, 1.178)
pt3dadd(-88.691, 379.984, -42.624, 1.174)
pt3dadd(-88.797, 380.035, -42.643, 1.168)
pt3dadd(-88.902, 380.087, -42.662, 1.162)
pt3dadd(-89.008, 380.138, -42.681, 1.158)
pt3dadd(-89.1, 380.194, -42.72, 1.148)
pt3dadd(-89.182, 380.252, -42.775, 1.136)
pt3dadd(-89.264, 380.311, -42.829, 1.124)
pt3dadd(-89.346, 380.37, -42.884, 1.112)
pt3dadd(-89.43, 380.429, -42.935, 1.096)
pt3dadd(-89.517, 380.488, -42.984, 1.078)
pt3dadd(-89.605, 380.545, -43.032, 1.06)
pt3dadd(-89.692, 380.604, -43.081, 1.042)
pt3dadd(-89.776, 380.67, -43.123, 1.016)
pt3dadd(-89.855, 380.753, -43.154, 0.98)
pt3dadd(-89.934, 380.834, -43.186, 0.944)
pt3dadd(-90.013, 380.917, -43.217, 0.91)
pt3dadd(-90.083, 380.996, -43.256, 0.864)
pt3dadd(-90.104, 381.066, -43.336, 0.76)
pt3dadd(-90.126, 381.142, -43.41, 0.656)
pt3dadd(-90.153, 381.245, -43.455, 0.554)
pt3dadd(-90.2, 381.331, -43.5, 0.46)
pt3dadd(-90.3, 381.374, -43.542, 0.392)
pt3dadd(-90.401, 381.424, -43.573, 0.346)
pt3dadd(-90.502, 381.485, -43.59, 0.334)
pt3dadd(-90.602, 381.544, -43.616, 0.344)
pt3dadd(-90.69, 381.598, -43.66, 0.382)
pt3dadd(-90.742, 381.649, -43.74, 0.41)
pt3dadd(-90.812, 381.697, -43.805, 0.426)
pt3dadd(-90.912, 381.739, -43.847, 0.426)
pt3dadd(-91.013, 381.792, -43.876, 0.42)
pt3dadd(-91.115, 381.852, -43.892, 0.408)
pt3dadd(-91.221, 381.905, -43.891, 0.388)
pt3dadd(-91.33, 381.95, -43.875, 0.364)
pt3dadd(-91.425, 382.007, -43.844, 0.342)
pt3dadd(-91.514, 382.064, -43.801, 0.322)
pt3dadd(-91.623, 382.099, -43.77, 0.312)
pt3dadd(-91.732, 382.133, -43.739, 0.302)
pt3dadd(-91.841, 382.168, -43.708, 0.29)
pt3dadd(-91.95, 382.201, -43.677, 0.28)
pt3dadd(-92.036, 382.267, -43.642, 0.266)
pt3dadd(-92.111, 382.35, -43.605, 0.252)
pt3dadd(-92.192, 382.436, -43.6, 0.252)
pt3dadd(-92.273, 382.525, -43.6, 0.252)
pt3dadd(-92.384, 382.55, -43.603, 0.264)
pt3dadd(-92.503, 382.555, -43.607, 0.282)
pt3dadd(-92.623, 382.56, -43.611, 0.3)
pt3dadd(-92.709, 382.566, -43.68, 0.326)
pt3dadd(-92.794, 382.573, -43.75, 0.35)
pt3dadd(-92.89, 382.624, -43.789, 0.37)
pt3dadd(-92.995, 382.676, -43.802, 0.374)
pt3dadd(-93.104, 382.728, -43.804, 0.368)
pt3dadd(-93.212, 382.78, -43.806, 0.364)
pt3dadd(-93.32, 382.831, -43.808, 0.358)
pt3dadd(-93.429, 382.883, -43.81, 0.354)
pt3dadd(-93.536, 382.921, -43.832, 0.352)
pt3dadd(-93.644, 382.948, -43.871, 0.352)
pt3dadd(-93.755, 382.978, -43.892, 0.352)
pt3dadd(-93.87, 383.012, -43.896, 0.352)
pt3dadd(-93.984, 383.048, -43.895, 0.36)
pt3dadd(-94.094, 383.088, -43.874, 0.396)
pt3dadd(-94.199, 383.124, -43.844, 0.438)
pt3dadd(-94.275, 383.144, -43.768, 0.502)
pt3dadd(-94.362, 383.16, -43.71, 0.578)
pt3dadd(-94.482, 383.16, -43.704, 0.684)
pt3dadd(-94.602, 383.16, -43.7, 0.764)
pt3dadd(-94.722, 383.16, -43.7, 0.796)
pt3dadd(-94.842, 383.16, -43.7, 0.828)
pt3dadd(-94.962, 383.16, -43.7, 0.862)
pt3dadd(-95.082, 383.16, -43.7, 0.894)
pt3dadd(-95.202, 383.16, -43.7, 0.926)
pt3dadd(-95.322, 383.16, -43.7, 0.958)
pt3dadd(-95.44, 383.171, -43.7, 0.99)
pt3dadd(-95.556, 383.201, -43.7, 1.02)
pt3dadd(-95.673, 383.231, -43.7, 1.052)
pt3dadd(-95.789, 383.261, -43.7, 1.082)
pt3dadd(-95.905, 383.291, -43.7, 1.112)
pt3dadd(-96.021, 383.321, -43.7, 1.144)
pt3dadd(-96.124, 383.371, -43.721, 1.172)
pt3dadd(-96.218, 383.434, -43.754, 1.202)
pt3dadd(-96.311, 383.496, -43.788, 1.232)
pt3dadd(-96.405, 383.56, -43.822, 1.262)
pt3dadd(-96.477, 383.606, -43.877, 1.288)
pt3dadd(-96.507, 383.624, -43.973, 1.312)
pt3dadd(-96.549, 383.642, -44.059, 1.33)
pt3dadd(-96.664, 383.66, -44.084, 1.318)
pt3dadd(-96.778, 383.678, -44.109, 1.306)
pt3dadd(-96.857, 383.75, -44.152, 1.24)
pt3dadd(-96.924, 383.833, -44.19, 1.164)
pt3dadd(-96.945, 383.952, -44.194, 1.074)
pt3dadd(-96.967, 384.07, -44.199, 0.982)
pt3dadd(-96.996, 384.138, -44.261, 0.906)
pt3dadd(-97.028, 384.182, -44.349, 0.838)
pt3dadd(-97.061, 384.227, -44.438, 0.768)
pt3dadd(-97.08, 384.284, -44.522, 0.646)
pt3dadd(-97.08, 384.36, -44.6, 0.452)
}
dend_5[7] {pt3dclear()
pt3dadd(-27.4, 328.28, -29.5, 1.382)
pt3dadd(-27.376, 328.288, -29.498, 1.366)
pt3dadd(-27.261, 328.321, -29.492, 1.29)
pt3dadd(-27.146, 328.354, -29.485, 1.214)
pt3dadd(-27.031, 328.387, -29.478, 1.14)
pt3dadd(-26.916, 328.421, -29.471, 1.064)
pt3dadd(-26.801, 328.454, -29.464, 0.988)
pt3dadd(-26.686, 328.487, -29.457, 0.914)
pt3dadd(-26.571, 328.52, -29.45, 0.838)
pt3dadd(-26.485, 328.564, -29.461, 0.79)
pt3dadd(-26.505, 328.639, -29.536, 0.842)
pt3dadd(-26.52, 328.728, -29.591, 0.882)
pt3dadd(-26.52, 328.848, -29.599, 0.89)
pt3dadd(-26.52, 328.968, -29.607, 0.9)
pt3dadd(-26.52, 329.084, -29.628, 0.888)
pt3dadd(-26.52, 329.197, -29.661, 0.856)
pt3dadd(-26.52, 329.31, -29.694, 0.826)
pt3dadd(-26.52, 329.423, -29.73, 0.81)
pt3dadd(-26.52, 329.537, -29.76, 0.804)
pt3dadd(-26.52, 329.653, -29.786, 0.804)
pt3dadd(-26.52, 329.768, -29.812, 0.804)
pt3dadd(-26.52, 329.885, -29.839, 0.804)
pt3dadd(-26.52, 330, -29.865, 0.804)
pt3dadd(-26.52, 330.116, -29.888, 0.804)
pt3dadd(-26.52, 330.235, -29.873, 0.804)
pt3dadd(-26.52, 330.354, -29.859, 0.804)
pt3dadd(-26.52, 330.473, -29.845, 0.804)
pt3dadd(-26.52, 330.592, -29.83, 0.804)
pt3dadd(-26.52, 330.71, -29.816, 0.804)
pt3dadd(-26.52, 330.829, -29.801, 0.804)
pt3dadd(-26.52, 330.947, -29.817, 0.8)
pt3dadd(-26.52, 331.064, -29.835, 0.796)
pt3dadd(-26.52, 331.182, -29.854, 0.792)
pt3dadd(-26.52, 331.301, -29.872, 0.788)
pt3dadd(-26.52, 331.418, -29.891, 0.782)
pt3dadd(-26.52, 331.536, -29.909, 0.778)
pt3dadd(-26.52, 331.642, -29.957, 0.774)
pt3dadd(-26.52, 331.746, -30.006, 0.77)
pt3dadd(-26.52, 331.849, -30.056, 0.764)
pt3dadd(-26.52, 331.954, -30.106, 0.76)
pt3dadd(-26.52, 332.058, -30.156, 0.754)
pt3dadd(-26.539, 332.17, -30.186, 0.758)
pt3dadd(-26.563, 332.284, -30.21, 0.762)
pt3dadd(-26.586, 332.398, -30.234, 0.768)
pt3dadd(-26.61, 332.512, -30.259, 0.772)
pt3dadd(-26.634, 332.626, -30.283, 0.778)
pt3dadd(-26.64, 332.743, -30.298, 0.784)
pt3dadd(-26.64, 332.862, -30.311, 0.792)
pt3dadd(-26.64, 332.981, -30.323, 0.8)
pt3dadd(-26.64, 333.1, -30.336, 0.808)
pt3dadd(-26.64, 333.22, -30.348, 0.816)
pt3dadd(-26.64, 333.338, -30.36, 0.824)
pt3dadd(-26.64, 333.456, -30.378, 0.836)
pt3dadd(-26.64, 333.574, -30.401, 0.848)
pt3dadd(-26.64, 333.69, -30.424, 0.86)
pt3dadd(-26.64, 333.806, -30.446, 0.874)
pt3dadd(-26.64, 333.924, -30.469, 0.886)
pt3dadd(-26.64, 334.04, -30.492, 0.9)
pt3dadd(-26.64, 334.145, -30.538, 0.908)
pt3dadd(-26.64, 334.243, -30.595, 0.912)
pt3dadd(-26.64, 334.342, -30.653, 0.918)
pt3dadd(-26.64, 334.439, -30.711, 0.922)
pt3dadd(-26.64, 334.537, -30.768, 0.928)
pt3dadd(-26.64, 334.645, -30.81, 0.916)
pt3dadd(-26.64, 334.758, -30.843, 0.894)
pt3dadd(-26.64, 334.87, -30.879, 0.87)
pt3dadd(-26.64, 334.978, -30.924, 0.836)
pt3dadd(-26.641, 335.086, -30.967, 0.804)
pt3dadd(-26.664, 335.202, -30.982, 0.792)
pt3dadd(-26.687, 335.318, -30.996, 0.782)
pt3dadd(-26.768, 335.384, -31.027, 0.798)
}
}
proc shape3d_100() {
dend_5[7] { pt3dadd(-26.869, 335.434, -31.063, 0.826)
pt3dadd(-26.948, 335.516, -31.091, 0.882)
pt3dadd(-27.016, 335.602, -31.13, 0.908)
pt3dadd(-27.081, 335.687, -31.176, 0.914)
pt3dadd(-27.146, 335.771, -31.222, 0.92)
pt3dadd(-27.211, 335.856, -31.268, 0.926)
pt3dadd(-27.243, 335.95, -31.318, 0.936)
pt3dadd(-27.25, 336.052, -31.371, 0.948)
pt3dadd(-27.281, 336.142, -31.426, 0.948)
pt3dadd(-27.342, 336.218, -31.483, 0.934)
pt3dadd(-27.423, 336.272, -31.54, 0.94)
pt3dadd(-27.512, 336.317, -31.595, 0.954)
pt3dadd(-27.606, 336.389, -31.6, 0.944)
pt3dadd(-27.7, 336.464, -31.6, 0.932)
pt3dadd(-27.762, 336.564, -31.6, 0.916)
pt3dadd(-27.814, 336.672, -31.6, 0.9)
pt3dadd(-27.858, 336.784, -31.6, 0.886)
pt3dadd(-27.903, 336.895, -31.6, 0.872)
pt3dadd(-27.947, 337.007, -31.6, 0.858)
pt3dadd(-27.992, 337.118, -31.6, 0.844)
pt3dadd(-28.036, 337.23, -31.6, 0.83)
pt3dadd(-28.089, 337.337, -31.6, 0.82)
pt3dadd(-28.143, 337.445, -31.6, 0.81)
pt3dadd(-28.196, 337.552, -31.6, 0.8)
pt3dadd(-28.25, 337.66, -31.6, 0.792)
pt3dadd(-28.303, 337.766, -31.6, 0.782)
pt3dadd(-28.343, 337.879, -31.6, 0.778)
pt3dadd(-28.376, 337.996, -31.6, 0.778)
pt3dadd(-28.417, 338.107, -31.605, 0.786)
pt3dadd(-28.477, 338.208, -31.621, 0.81)
pt3dadd(-28.536, 338.298, -31.655, 0.832)
pt3dadd(-28.587, 338.358, -31.73, 0.848)
pt3dadd(-28.673, 338.399, -31.774, 0.848)
pt3dadd(-28.789, 338.422, -31.789, 0.838)
pt3dadd(-28.897, 338.46, -31.8, 0.824)
pt3dadd(-28.971, 338.554, -31.8, 0.802)
pt3dadd(-29.046, 338.647, -31.8, 0.782)
pt3dadd(-29.121, 338.741, -31.8, 0.76)
pt3dadd(-29.15, 338.851, -31.808, 0.754)
pt3dadd(-29.155, 338.97, -31.821, 0.754)
pt3dadd(-29.161, 339.088, -31.837, 0.758)
pt3dadd(-29.188, 339.194, -31.869, 0.812)
pt3dadd(-29.223, 339.31, -31.875, 0.83)
pt3dadd(-29.258, 339.424, -31.882, 0.85)
pt3dadd(-29.293, 339.539, -31.888, 0.868)
pt3dadd(-29.328, 339.653, -31.894, 0.886)
pt3dadd(-29.361, 339.768, -31.9, 0.906)
pt3dadd(-29.376, 339.887, -31.9, 0.924)
pt3dadd(-29.391, 340.006, -31.9, 0.942)
pt3dadd(-29.412, 340.123, -31.9, 0.958)
pt3dadd(-29.446, 340.238, -31.9, 0.968)
pt3dadd(-29.479, 340.355, -31.9, 0.978)
pt3dadd(-29.555, 340.446, -31.905, 0.98)
pt3dadd(-29.632, 340.537, -31.911, 0.98)
pt3dadd(-29.704, 340.572, -31.98, 0.956)
pt3dadd(-29.775, 340.601, -32.057, 0.928)
pt3dadd(-29.844, 340.658, -32.124, 0.864)
pt3dadd(-29.944, 340.672, -32.173, 0.814)
pt3dadd(-30.05, 340.679, -32.22, 0.766)
pt3dadd(-30.139, 340.734, -32.26, 0.734)
pt3dadd(-30.222, 340.808, -32.298, 0.704)
pt3dadd(-30.251, 340.916, -32.33, 0.704)
pt3dadd(-30.277, 341.027, -32.363, 0.704)
pt3dadd(-30.333, 341.13, -32.382, 0.726)
pt3dadd(-30.394, 341.231, -32.398, 0.75)
pt3dadd(-30.442, 341.341, -32.407, 0.832)
pt3dadd(-30.492, 341.448, -32.42, 0.89)
pt3dadd(-30.547, 341.552, -32.439, 0.91)
pt3dadd(-30.602, 341.657, -32.459, 0.932)
pt3dadd(-30.657, 341.761, -32.478, 0.954)
pt3dadd(-30.712, 341.864, -32.497, 0.976)
pt3dadd(-30.72, 341.981, -32.514, 0.99)
pt3dadd(-30.72, 342.1, -32.53, 1.002)
pt3dadd(-30.72, 342.217, -32.547, 1.014)
pt3dadd(-30.72, 342.336, -32.563, 1.028)
pt3dadd(-30.72, 342.455, -32.58, 1.04)
pt3dadd(-30.72, 342.572, -32.596, 1.052)
pt3dadd(-30.761, 342.683, -32.6, 1.044)
pt3dadd(-30.815, 342.79, -32.6, 1.03)
pt3dadd(-30.868, 342.898, -32.6, 1.014)
pt3dadd(-30.922, 343.004, -32.6, 1)
pt3dadd(-30.976, 343.112, -32.6, 0.986)
pt3dadd(-31.008, 343.222, -32.618, 0.974)
pt3dadd(-31.025, 343.334, -32.652, 0.964)
pt3dadd(-31.041, 343.446, -32.685, 0.954)
pt3dadd(-31.057, 343.558, -32.719, 0.944)
pt3dadd(-31.073, 343.67, -32.752, 0.934)
pt3dadd(-31.08, 343.786, -32.774, 0.924)
pt3dadd(-31.08, 343.906, -32.786, 0.916)
pt3dadd(-31.08, 344.024, -32.798, 0.908)
pt3dadd(-31.08, 344.143, -32.811, 0.9)
pt3dadd(-31.08, 344.262, -32.823, 0.892)
pt3dadd(-31.08, 344.381, -32.836, 0.884)
pt3dadd(-31.08, 344.5, -32.852, 0.88)
pt3dadd(-31.08, 344.615, -32.88, 0.884)
pt3dadd(-31.08, 344.73, -32.907, 0.89)
pt3dadd(-31.08, 344.845, -32.935, 0.894)
pt3dadd(-31.08, 344.96, -32.962, 0.898)
pt3dadd(-31.08, 345.077, -32.99, 0.902)
pt3dadd(-31.102, 345.186, -33.023, 0.898)
pt3dadd(-31.137, 345.292, -33.06, 0.886)
pt3dadd(-31.172, 345.397, -33.096, 0.876)
pt3dadd(-31.208, 345.504, -33.133, 0.864)
pt3dadd(-31.241, 345.61, -33.169, 0.852)
pt3dadd(-31.256, 345.725, -33.194, 0.832)
pt3dadd(-31.272, 345.84, -33.22, 0.814)
pt3dadd(-31.287, 345.955, -33.246, 0.794)
pt3dadd(-31.303, 346.07, -33.271, 0.774)
pt3dadd(-31.318, 346.186, -33.297, 0.756)
pt3dadd(-31.34, 346.301, -33.317, 0.744)
pt3dadd(-31.363, 346.416, -33.336, 0.736)
pt3dadd(-31.386, 346.531, -33.355, 0.726)
pt3dadd(-31.409, 346.646, -33.375, 0.716)
pt3dadd(-31.432, 346.763, -33.394, 0.706)
pt3dadd(-31.44, 346.876, -33.425, 0.712)
pt3dadd(-31.44, 346.986, -33.462, 0.726)
pt3dadd(-31.44, 347.098, -33.499, 0.74)
pt3dadd(-31.44, 347.209, -33.536, 0.754)
pt3dadd(-31.44, 347.321, -33.574, 0.768)
pt3dadd(-31.44, 347.435, -33.6, 0.786)
pt3dadd(-31.44, 347.555, -33.6, 0.81)
pt3dadd(-31.44, 347.675, -33.6, 0.836)
pt3dadd(-31.44, 347.795, -33.6, 0.862)
pt3dadd(-31.44, 347.915, -33.6, 0.886)
pt3dadd(-31.44, 348.035, -33.6, 0.912)
pt3dadd(-31.44, 348.155, -33.6, 0.936)
pt3dadd(-31.44, 348.275, -33.605, 0.958)
pt3dadd(-31.44, 348.392, -33.621, 0.976)
pt3dadd(-31.44, 348.511, -33.638, 0.992)
pt3dadd(-31.44, 348.629, -33.654, 1.008)
pt3dadd(-31.44, 348.748, -33.67, 1.026)
pt3dadd(-31.44, 348.866, -33.687, 1.042)
pt3dadd(-31.44, 348.985, -33.7, 1.054)
pt3dadd(-31.44, 349.105, -33.7, 1.046)
pt3dadd(-31.44, 349.225, -33.7, 1.038)
pt3dadd(-31.44, 349.345, -33.7, 1.032)
pt3dadd(-31.44, 349.465, -33.7, 1.024)
pt3dadd(-31.44, 349.585, -33.7, 1.018)
pt3dadd(-31.44, 349.705, -33.7, 1.01)
pt3dadd(-31.446, 349.824, -33.7, 1)
pt3dadd(-31.473, 349.94, -33.7, 0.978)
pt3dadd(-31.5, 350.058, -33.7, 0.956)
pt3dadd(-31.528, 350.174, -33.7, 0.936)
pt3dadd(-31.555, 350.292, -33.7, 0.914)
pt3dadd(-31.583, 350.408, -33.7, 0.892)
pt3dadd(-31.616, 350.522, -33.708, 0.87)
pt3dadd(-31.658, 350.632, -33.729, 0.85)
pt3dadd(-31.7, 350.741, -33.75, 0.828)
pt3dadd(-31.742, 350.85, -33.771, 0.808)
pt3dadd(-31.785, 350.96, -33.792, 0.786)
pt3dadd(-31.8, 351.076, -33.799, 0.776)
pt3dadd(-31.8, 351.196, -33.797, 0.772)
pt3dadd(-31.8, 351.316, -33.796, 0.768)
pt3dadd(-31.8, 351.436, -33.794, 0.766)
pt3dadd(-31.8, 351.556, -33.792, 0.762)
pt3dadd(-31.8, 351.676, -33.791, 0.758)
pt3dadd(-31.8, 351.796, -33.789, 0.754)
pt3dadd(-31.821, 351.913, -33.789, 0.754)
pt3dadd(-31.848, 352.031, -33.789, 0.754)
pt3dadd(-31.876, 352.147, -33.789, 0.754)
pt3dadd(-31.904, 352.264, -33.789, 0.754)
pt3dadd(-31.92, 352.381, -33.797, 0.75)
pt3dadd(-31.92, 352.499, -33.815, 0.742)
pt3dadd(-31.92, 352.618, -33.833, 0.734)
pt3dadd(-31.92, 352.735, -33.852, 0.724)
pt3dadd(-31.92, 352.853, -33.871, 0.716)
pt3dadd(-31.92, 352.97, -33.889, 0.708)
pt3dadd(-31.928, 353.087, -33.887, 0.694)
pt3dadd(-31.946, 353.198, -33.856, 0.67)
pt3dadd(-31.97, 353.311, -33.829, 0.646)
pt3dadd(-32.008, 353.424, -33.813, 0.622)
pt3dadd(-32.04, 353.537, -33.802, 0.606)
pt3dadd(-32.04, 353.657, -33.814, 0.624)
pt3dadd(-32.04, 353.776, -33.826, 0.642)
pt3dadd(-32.04, 353.88, -33.864, 0.668)
pt3dadd(-32.04, 353.968, -33.932, 0.704)
pt3dadd(-32.04, 354.058, -33.999, 0.752)
pt3dadd(-32.04, 354.151, -34.061, 0.822)
pt3dadd(-32.021, 354.247, -34.119, 0.864)
pt3dadd(-32.001, 354.343, -34.176, 0.902)
pt3dadd(-31.958, 354.403, -34.255, 0.944)
pt3dadd(-31.92, 354.47, -34.327, 0.984)
pt3dadd(-31.92, 354.583, -34.36, 1.016)
pt3dadd(-31.92, 354.696, -34.393, 1.048)
pt3dadd(-31.92, 354.815, -34.4, 1.062)
pt3dadd(-31.92, 354.935, -34.4, 1.07)
pt3dadd(-31.92, 355.055, -34.4, 1.078)
pt3dadd(-31.92, 355.175, -34.4, 1.07)
pt3dadd(-31.92, 355.295, -34.4, 1.058)
pt3dadd(-31.92, 355.415, -34.4, 1.046)
pt3dadd(-31.92, 355.535, -34.4, 1.036)
pt3dadd(-31.92, 355.655, -34.4, 1.024)
pt3dadd(-31.92, 355.775, -34.4, 1.014)
pt3dadd(-31.92, 355.895, -34.4, 1.002)
pt3dadd(-31.92, 356.015, -34.4, 0.992)
pt3dadd(-31.92, 356.135, -34.4, 0.982)
pt3dadd(-31.92, 356.255, -34.4, 0.97)
pt3dadd(-31.92, 356.375, -34.4, 0.96)
pt3dadd(-31.92, 356.495, -34.4, 0.95)
pt3dadd(-31.92, 356.615, -34.4, 0.938)
}
}
proc shape3d_101() {
dend_5[7] { pt3dadd(-31.92, 356.735, -34.4, 0.928)
pt3dadd(-31.92, 356.855, -34.4, 0.916)
pt3dadd(-31.92, 356.975, -34.4, 0.906)
pt3dadd(-31.92, 357.095, -34.4, 0.898)
pt3dadd(-31.92, 357.215, -34.4, 0.892)
pt3dadd(-31.92, 357.335, -34.4, 0.884)
pt3dadd(-31.92, 357.455, -34.4, 0.876)
pt3dadd(-31.92, 357.575, -34.4, 0.87)
pt3dadd(-31.92, 357.695, -34.4, 0.862)
pt3dadd(-31.92, 357.815, -34.4, 0.856)
pt3dadd(-31.918, 357.934, -34.413, 0.85)
pt3dadd(-31.916, 358.052, -34.43, 0.846)
pt3dadd(-31.914, 358.17, -34.447, 0.842)
pt3dadd(-31.912, 358.289, -34.464, 0.838)
pt3dadd(-31.909, 358.406, -34.48, 0.834)
pt3dadd(-31.907, 358.525, -34.497, 0.83)
pt3dadd(-31.89, 358.642, -34.517, 0.836)
pt3dadd(-31.869, 358.757, -34.539, 0.846)
pt3dadd(-31.849, 358.872, -34.56, 0.856)
pt3dadd(-31.828, 358.987, -34.582, 0.866)
pt3dadd(-31.808, 359.102, -34.603, 0.876)
pt3dadd(-31.8, 359.216, -34.633, 0.884)
pt3dadd(-31.8, 359.329, -34.667, 0.894)
pt3dadd(-31.8, 359.442, -34.702, 0.904)
pt3dadd(-31.8, 359.554, -34.737, 0.912)
pt3dadd(-31.8, 359.666, -34.771, 0.922)
pt3dadd(-31.8, 359.78, -34.8, 0.93)
pt3dadd(-31.8, 359.9, -34.8, 0.938)
pt3dadd(-31.8, 360.02, -34.8, 0.944)
pt3dadd(-31.8, 360.14, -34.8, 0.952)
pt3dadd(-31.8, 360.26, -34.8, 0.958)
pt3dadd(-31.8, 360.38, -34.8, 0.966)
pt3dadd(-31.8, 360.5, -34.8, 0.974)
pt3dadd(-31.8, 360.619, -34.805, 0.978)
pt3dadd(-31.8, 360.736, -34.832, 0.968)
pt3dadd(-31.8, 360.851, -34.86, 0.96)
pt3dadd(-31.8, 360.966, -34.887, 0.952)
pt3dadd(-31.8, 361.081, -34.915, 0.942)
pt3dadd(-31.8, 361.196, -34.942, 0.934)
pt3dadd(-31.8, 361.313, -34.968, 0.924)
pt3dadd(-31.8, 361.428, -34.994, 0.916)
pt3dadd(-31.8, 361.544, -35.019, 0.908)
pt3dadd(-31.8, 361.661, -35.044, 0.898)
pt3dadd(-31.8, 361.777, -35.069, 0.89)
pt3dadd(-31.8, 361.894, -35.094, 0.88)
pt3dadd(-31.8, 362.006, -35.127, 0.864)
pt3dadd(-31.8, 362.119, -35.161, 0.846)
pt3dadd(-31.8, 362.232, -35.196, 0.828)
pt3dadd(-31.8, 362.344, -35.231, 0.81)
pt3dadd(-31.8, 362.456, -35.265, 0.792)
pt3dadd(-31.8, 362.572, -35.289, 0.774)
pt3dadd(-31.8, 362.692, -35.291, 0.764)
pt3dadd(-31.8, 362.812, -35.293, 0.754)
pt3dadd(-31.8, 362.932, -35.294, 0.742)
pt3dadd(-31.8, 363.052, -35.296, 0.732)
pt3dadd(-31.8, 363.172, -35.298, 0.72)
pt3dadd(-31.8, 363.292, -35.299, 0.71)
pt3dadd(-31.809, 363.41, -35.3, 0.696)
pt3dadd(-31.828, 363.529, -35.3, 0.68)
pt3dadd(-31.848, 363.648, -35.3, 0.664)
pt3dadd(-31.868, 363.766, -35.3, 0.646)
pt3dadd(-31.887, 363.884, -35.3, 0.63)
pt3dadd(-31.907, 364.003, -35.3, 0.614)
pt3dadd(-31.922, 364.122, -35.3, 0.602)
pt3dadd(-31.928, 364.241, -35.3, 0.598)
pt3dadd(-31.934, 364.361, -35.3, 0.594)
pt3dadd(-31.94, 364.481, -35.3, 0.59)
pt3dadd(-31.946, 364.601, -35.3, 0.586)
pt3dadd(-31.952, 364.721, -35.3, 0.582)
pt3dadd(-31.958, 364.841, -35.3, 0.58)
pt3dadd(-31.982, 364.957, -35.3, 0.584)
pt3dadd(-32.015, 365.072, -35.3, 0.594)
pt3dadd(-32.041, 365.189, -35.297, 0.61)
pt3dadd(-32.046, 365.308, -35.284, 0.638)
pt3dadd(-32.052, 365.426, -35.271, 0.668)
pt3dadd(-32.085, 365.49, -35.209, 0.686)
pt3dadd(-32.134, 365.525, -35.123, 0.7)
pt3dadd(-32.117, 365.592, -35.051, 0.704)
pt3dadd(-32.082, 365.675, -34.987, 0.702)
pt3dadd(-32.108, 365.785, -34.957, 0.686)
pt3dadd(-32.135, 365.897, -34.927, 0.668)
pt3dadd(-32.161, 366.008, -34.898, 0.652)
pt3dadd(-32.18, 366.121, -34.866, 0.652)
pt3dadd(-32.199, 366.234, -34.835, 0.652)
pt3dadd(-32.266, 366.332, -34.833, 0.652)
pt3dadd(-32.248, 366.425, -34.89, 0.678)
pt3dadd(-32.189, 366.497, -34.952, 0.678)
pt3dadd(-32.16, 366.56, -35.033, 0.678)
pt3dadd(-32.16, 366.613, -35.122, 0.686)
pt3dadd(-32.16, 366.678, -35.206, 0.738)
pt3dadd(-32.16, 366.768, -35.27, 0.832)
pt3dadd(-32.16, 366.876, -35.315, 0.842)
pt3dadd(-32.16, 366.983, -35.36, 0.788)
pt3dadd(-32.164, 367.099, -35.375, 0.754)
pt3dadd(-32.199, 367.199, -35.334, 0.754)
pt3dadd(-32.286, 367.273, -35.304, 0.754)
pt3dadd(-32.365, 367.358, -35.285, 0.686)
pt3dadd(-32.408, 367.456, -35.24, 0.482)
pt3dadd(-32.453, 367.562, -35.219, 0.398)
pt3dadd(-32.498, 367.672, -35.203, 0.338)
pt3dadd(-32.539, 367.784, -35.2, 0.3)
pt3dadd(-32.579, 367.897, -35.2, 0.268)
pt3dadd(-32.625, 368.009, -35.2, 0.246)
pt3dadd(-32.678, 368.116, -35.2, 0.234)
pt3dadd(-32.734, 368.221, -35.205, 0.226)
pt3dadd(-32.797, 368.32, -35.228, 0.226)
pt3dadd(-32.844, 368.411, -35.268, 0.226)
pt3dadd(-32.856, 368.486, -35.345, 0.226)
pt3dadd(-32.868, 368.562, -35.422, 0.226)
pt3dadd(-32.88, 368.639, -35.498, 0.226)
pt3dadd(-32.884, 368.758, -35.5, 0.226)
pt3dadd(-32.889, 368.878, -35.5, 0.226)
pt3dadd(-32.899, 368.995, -35.5, 0.226)
pt3dadd(-32.964, 369.097, -35.5, 0.226)
pt3dadd(-33.028, 369.198, -35.5, 0.226)
pt3dadd(-33.092, 369.299, -35.503, 0.228)
pt3dadd(-33.153, 369.401, -35.52, 0.242)
pt3dadd(-33.204, 369.5, -35.547, 0.254)
pt3dadd(-33.219, 369.592, -35.611, 0.262)
pt3dadd(-33.234, 369.683, -35.674, 0.272)
pt3dadd(-33.252, 369.778, -35.734, 0.284)
pt3dadd(-33.273, 369.874, -35.791, 0.296)
pt3dadd(-33.323, 369.965, -35.835, 0.276)
pt3dadd(-33.38, 370.06, -35.875, 0.276)
pt3dadd(-33.437, 370.154, -35.914, 0.276)
pt3dadd(-33.494, 370.248, -35.954, 0.276)
pt3dadd(-33.55, 370.343, -35.993, 0.276)
pt3dadd(-33.59, 370.442, -36.038, 0.286)
pt3dadd(-33.627, 370.543, -36.083, 0.296)
pt3dadd(-33.663, 370.643, -36.129, 0.308)
pt3dadd(-33.7, 370.744, -36.174, 0.32)
pt3dadd(-33.746, 370.83, -36.229, 0.34)
pt3dadd(-33.805, 370.898, -36.294, 0.37)
pt3dadd(-33.864, 370.968, -36.36, 0.402)
pt3dadd(-33.923, 371.036, -36.425, 0.432)
pt3dadd(-33.982, 371.114, -36.48, 0.482)
pt3dadd(-34.04, 371.21, -36.517, 0.564)
pt3dadd(-34.096, 371.294, -36.568, 0.642)
pt3dadd(-34.149, 371.371, -36.631, 0.714)
pt3dadd(-34.212, 371.416, -36.706, 0.772)
pt3dadd(-34.277, 371.45, -36.785, 0.826)
pt3dadd(-34.295, 371.566, -36.793, 0.856)
pt3dadd(-34.31, 371.684, -36.797, 0.886)
pt3dadd(-34.32, 371.804, -36.8, 0.922)
pt3dadd(-34.32, 371.924, -36.8, 0.972)
pt3dadd(-34.321, 372.043, -36.808, 1.014)
pt3dadd(-34.323, 372.16, -36.832, 1.04)
pt3dadd(-34.326, 372.276, -36.855, 1.066)
pt3dadd(-34.328, 372.392, -36.879, 1.094)
pt3dadd(-34.33, 372.509, -36.902, 1.12)
pt3dadd(-34.332, 372.626, -36.925, 1.146)
pt3dadd(-34.368, 372.73, -36.959, 1.178)
pt3dadd(-34.421, 372.827, -36.998, 1.214)
pt3dadd(-34.474, 372.924, -37.037, 1.248)
pt3dadd(-34.527, 373.02, -37.076, 1.284)
pt3dadd(-34.569, 373.124, -37.1, 1.31)
pt3dadd(-34.594, 373.242, -37.1, 1.324)
pt3dadd(-34.619, 373.36, -37.1, 1.336)
pt3dadd(-34.644, 373.477, -37.1, 1.348)
pt3dadd(-34.669, 373.595, -37.1, 1.362)
pt3dadd(-34.693, 373.712, -37.1, 1.374)
pt3dadd(-34.725, 373.828, -37.1, 1.374)
pt3dadd(-34.764, 373.942, -37.1, 1.36)
pt3dadd(-34.802, 374.054, -37.1, 1.348)
pt3dadd(-34.841, 374.168, -37.1, 1.334)
pt3dadd(-34.88, 374.282, -37.1, 1.32)
pt3dadd(-34.918, 374.395, -37.1, 1.306)
pt3dadd(-34.937, 374.512, -37.118, 1.274)
pt3dadd(-34.954, 374.628, -37.136, 1.242)
pt3dadd(-34.972, 374.746, -37.155, 1.208)
pt3dadd(-34.989, 374.862, -37.174, 1.176)
pt3dadd(-35.006, 374.978, -37.192, 1.144)
pt3dadd(-35.051, 375.08, -37.222, 1.102)
pt3dadd(-35.114, 375.172, -37.259, 1.054)
pt3dadd(-35.177, 375.264, -37.296, 1.006)
pt3dadd(-35.241, 375.355, -37.333, 0.958)
pt3dadd(-35.302, 375.442, -37.378, 0.918)
pt3dadd(-35.361, 375.517, -37.438, 0.886)
pt3dadd(-35.42, 375.593, -37.499, 0.856)
pt3dadd(-35.479, 375.668, -37.559, 0.824)
pt3dadd(-35.536, 375.748, -37.616, 0.804)
pt3dadd(-35.589, 375.838, -37.666, 0.804)
pt3dadd(-35.671, 375.901, -37.704, 0.824)
pt3dadd(-35.779, 375.942, -37.732, 0.862)
pt3dadd(-35.839, 375.962, -37.799, 0.896)
pt3dadd(-35.86, 375.968, -37.897, 0.926)
pt3dadd(-35.88, 375.977, -37.995, 0.954)
pt3dadd(-35.88, 376.038, -38.081, 0.942)
pt3dadd(-35.88, 376.099, -38.167, 0.93)
pt3dadd(-35.94, 376.16, -38.234, 0.878)
pt3dadd(-36.015, 376.218, -38.291, 0.8)
pt3dadd(-36.12, 376.272, -38.3, 0.618)
pt3dadd(-36.2, 376.36, -38.3, 0.528)
pt3dadd(-36.253, 376.468, -38.3, 0.528)
pt3dadd(-36.307, 376.574, -38.3, 0.562)
pt3dadd(-36.368, 376.678, -38.3, 0.596)
pt3dadd(-36.431, 376.78, -38.3, 0.622)
pt3dadd(-36.494, 376.883, -38.3, 0.646)
pt3dadd(-36.556, 376.985, -38.3, 0.67)
pt3dadd(-36.619, 377.087, -38.3, 0.694)
}
}
proc shape3d_102() {
dend_5[7] { pt3dadd(-36.69, 377.183, -38.3, 0.75)
pt3dadd(-36.766, 377.276, -38.3, 0.822)
pt3dadd(-36.844, 377.368, -38.3, 0.874)
pt3dadd(-36.926, 377.455, -38.3, 0.908)
pt3dadd(-37.02, 377.524, -38.3, 0.92)
pt3dadd(-37.134, 377.563, -38.3, 0.898)
pt3dadd(-37.247, 377.602, -38.302, 0.878)
pt3dadd(-37.356, 377.621, -38.34, 0.854)
pt3dadd(-37.466, 377.64, -38.378, 0.828)
pt3dadd(-37.501, 377.714, -38.45, 0.828)
pt3dadd(-37.536, 377.789, -38.523, 0.828)
pt3dadd(-37.571, 377.863, -38.596, 0.828)
pt3dadd(-37.616, 377.97, -38.615, 0.864)
pt3dadd(-37.661, 378.079, -38.631, 0.9)
pt3dadd(-37.724, 378.175, -38.661, 0.904)
pt3dadd(-37.789, 378.268, -38.693, 0.904)
pt3dadd(-37.873, 378.332, -38.728, 0.904)
pt3dadd(-37.98, 378.359, -38.767, 0.904)
pt3dadd(-38.076, 378.412, -38.791, 0.9)
pt3dadd(-38.159, 378.499, -38.795, 0.89)
pt3dadd(-38.241, 378.586, -38.799, 0.882)
pt3dadd(-38.281, 378.695, -38.8, 0.886)
pt3dadd(-38.301, 378.812, -38.8, 0.896)
pt3dadd(-38.329, 378.925, -38.8, 0.902)
pt3dadd(-38.437, 378.979, -38.8, 0.876)
pt3dadd(-38.544, 379.032, -38.8, 0.852)
pt3dadd(-38.653, 379.081, -38.799, 0.824)
pt3dadd(-38.772, 379.097, -38.795, 0.786)
pt3dadd(-38.891, 379.112, -38.791, 0.746)
pt3dadd(-38.998, 379.148, -38.77, 0.706)
pt3dadd(-39.096, 379.202, -38.734, 0.666)
pt3dadd(-39.192, 379.26, -38.7, 0.628)
pt3dadd(-39.255, 379.362, -38.706, 0.628)
pt3dadd(-39.318, 379.463, -38.711, 0.628)
pt3dadd(-39.335, 379.535, -38.789, 0.638)
pt3dadd(-39.35, 379.606, -38.868, 0.646)
pt3dadd(-39.374, 379.685, -38.938, 0.658)
pt3dadd(-39.418, 379.78, -38.987, 0.672)
pt3dadd(-39.462, 379.872, -39.039, 0.7)
pt3dadd(-39.472, 379.912, -39.131, 0.712)
pt3dadd(-39.478, 379.945, -39.227, 0.724)
pt3dadd(-39.496, 380.01, -39.305, 0.736)
pt3dadd(-39.525, 380.096, -39.37, 0.75)
pt3dadd(-39.615, 380.144, -39.392, 0.738)
pt3dadd(-39.73, 380.179, -39.397, 0.716)
pt3dadd(-39.829, 380.236, -39.4, 0.694)
pt3dadd(-39.904, 380.329, -39.4, 0.67)
pt3dadd(-39.974, 380.426, -39.4, 0.644)
pt3dadd(-40.028, 380.534, -39.4, 0.61)
pt3dadd(-40.084, 380.64, -39.405, 0.606)
pt3dadd(-40.14, 380.746, -39.412, 0.612)
pt3dadd(-40.197, 380.851, -39.419, 0.616)
pt3dadd(-40.254, 380.957, -39.425, 0.622)
pt3dadd(-40.31, 381.062, -39.432, 0.626)
pt3dadd(-40.374, 381.157, -39.459, 0.632)
pt3dadd(-40.439, 381.251, -39.49, 0.638)
pt3dadd(-40.505, 381.344, -39.521, 0.644)
pt3dadd(-40.57, 381.438, -39.553, 0.65)
pt3dadd(-40.641, 381.53, -39.57, 0.656)
pt3dadd(-40.717, 381.624, -39.578, 0.662)
pt3dadd(-40.793, 381.716, -39.585, 0.666)
pt3dadd(-40.868, 381.809, -39.592, 0.672)
pt3dadd(-40.944, 381.901, -39.599, 0.676)
pt3dadd(-41.045, 381.962, -39.6, 0.678)
pt3dadd(-41.151, 382.019, -39.605, 0.678)
pt3dadd(-41.254, 382.067, -39.634, 0.678)
pt3dadd(-41.343, 382.121, -39.682, 0.678)
pt3dadd(-41.411, 382.214, -39.7, 0.678)
pt3dadd(-41.497, 382.294, -39.693, 0.678)
pt3dadd(-41.593, 382.32, -39.645, 0.678)
pt3dadd(-41.639, 382.32, -39.553, 0.678)
pt3dadd(-41.672, 382.32, -39.457, 0.678)
pt3dadd(-41.728, 382.34, -39.373, 0.65)
pt3dadd(-41.804, 382.416, -39.329, 0.622)
pt3dadd(-41.883, 382.495, -39.298, 0.586)
pt3dadd(-41.967, 382.58, -39.293, 0.536)
pt3dadd(-42.058, 382.652, -39.279, 0.456)
pt3dadd(-42.158, 382.711, -39.27, 0.384)
pt3dadd(-42.257, 382.78, -39.276, 0.36)
pt3dadd(-42.356, 382.848, -39.282, 0.334)
pt3dadd(-42.454, 382.915, -39.287, 0.308)
pt3dadd(-42.534, 383.004, -39.291, 0.294)
pt3dadd(-42.607, 383.099, -39.293, 0.284)
pt3dadd(-42.681, 383.194, -39.295, 0.274)
pt3dadd(-42.754, 383.288, -39.297, 0.264)
pt3dadd(-42.827, 383.383, -39.3, 0.252)
pt3dadd(-42.907, 383.473, -39.3, 0.246)
pt3dadd(-42.987, 383.562, -39.3, 0.242)
pt3dadd(-43.068, 383.651, -39.3, 0.236)
pt3dadd(-43.149, 383.74, -39.3, 0.232)
pt3dadd(-43.229, 383.828, -39.3, 0.226)
pt3dadd(-43.321, 383.905, -39.3, 0.226)
pt3dadd(-43.415, 383.981, -39.3, 0.226)
pt3dadd(-43.5, 384.065, -39.3, 0.226)
pt3dadd(-43.581, 384.154, -39.3, 0.226)
pt3dadd(-43.682, 384.211, -39.3, 0.226)
pt3dadd(-43.796, 384.251, -39.3, 0.226)
pt3dadd(-43.901, 384.292, -39.316, 0.23)
pt3dadd(-43.983, 384.336, -39.378, 0.244)
pt3dadd(-44.03, 384.36, -39.458, 0.264)
pt3dadd(-44.037, 384.36, -39.558, 0.29)
pt3dadd(-44.064, 384.36, -39.654, 0.312)
pt3dadd(-44.106, 384.36, -39.748, 0.33)
pt3dadd(-44.147, 384.36, -39.842, 0.348)
pt3dadd(-44.189, 384.36, -39.936, 0.368)
pt3dadd(-44.231, 384.36, -40.03, 0.386)
pt3dadd(-44.269, 384.36, -40.124, 0.416)
pt3dadd(-44.28, 384.36, -40.223, 0.532)
pt3dadd(-44.283, 384.36, -40.323, 0.654)
pt3dadd(-44.304, 384.36, -40.422, 0.77)
pt3dadd(-44.349, 384.36, -40.514, 0.864)
pt3dadd(-44.386, 384.36, -40.609, 0.904)
pt3dadd(-44.422, 384.36, -40.704, 0.94)
pt3dadd(-44.498, 384.36, -40.774, 1.022)
pt3dadd(-44.612, 384.371, -40.798, 1.098)
pt3dadd(-44.727, 384.404, -40.8, 1.13)
pt3dadd(-44.814, 384.487, -40.8, 1.118)
pt3dadd(-44.875, 384.589, -40.8, 1.062)
pt3dadd(-44.961, 384.671, -40.802, 1.036)
pt3dadd(-45.051, 384.75, -40.804, 1.016)
pt3dadd(-45.141, 384.829, -40.807, 0.996)
pt3dadd(-45.232, 384.908, -40.809, 0.974)
pt3dadd(-45.321, 384.988, -40.812, 0.954)
pt3dadd(-45.389, 385.081, -40.84, 0.93)
pt3dadd(-45.457, 385.174, -40.868, 0.908)
pt3dadd(-45.525, 385.267, -40.896, 0.884)
pt3dadd(-45.593, 385.36, -40.925, 0.86)
pt3dadd(-45.684, 385.422, -40.958, 0.838)
pt3dadd(-45.785, 385.47, -40.994, 0.814)
pt3dadd(-45.886, 385.519, -41.03, 0.792)
pt3dadd(-45.987, 385.567, -41.065, 0.768)
pt3dadd(-46.081, 385.63, -41.093, 0.75)
pt3dadd(-46.162, 385.716, -41.105, 0.738)
pt3dadd(-46.244, 385.804, -41.117, 0.728)
pt3dadd(-46.325, 385.891, -41.129, 0.716)
pt3dadd(-46.406, 385.978, -41.141, 0.706)
pt3dadd(-46.466, 386.074, -41.171, 0.698)
pt3dadd(-46.518, 386.173, -41.207, 0.692)
pt3dadd(-46.571, 386.272, -41.243, 0.688)
pt3dadd(-46.624, 386.37, -41.28, 0.682)
pt3dadd(-46.692, 386.459, -41.31, 0.678)
pt3dadd(-46.78, 386.536, -41.333, 0.678)
pt3dadd(-46.869, 386.612, -41.356, 0.678)
pt3dadd(-46.957, 386.688, -41.379, 0.678)
pt3dadd(-47.046, 386.764, -41.401, 0.678)
pt3dadd(-47.151, 386.815, -41.423, 0.69)
pt3dadd(-47.256, 386.868, -41.445, 0.7)
pt3dadd(-47.361, 386.921, -41.467, 0.712)
pt3dadd(-47.465, 386.972, -41.489, 0.722)
pt3dadd(-47.57, 387.029, -41.5, 0.74)
pt3dadd(-47.674, 387.089, -41.5, 0.764)
pt3dadd(-47.778, 387.149, -41.5, 0.788)
pt3dadd(-47.882, 387.209, -41.5, 0.814)
pt3dadd(-47.986, 387.269, -41.5, 0.838)
pt3dadd(-48.077, 387.342, -41.5, 0.866)
pt3dadd(-48.146, 387.44, -41.5, 0.902)
pt3dadd(-48.215, 387.539, -41.5, 0.936)
pt3dadd(-48.284, 387.636, -41.5, 0.972)
pt3dadd(-48.353, 387.734, -41.5, 1.006)
pt3dadd(-48.417, 387.835, -41.5, 1.048)
pt3dadd(-48.471, 387.943, -41.5, 1.104)
pt3dadd(-48.525, 388.05, -41.5, 1.156)
pt3dadd(-48.586, 388.153, -41.5, 1.156)
pt3dadd(-48.647, 388.258, -41.5, 1.156)
pt3dadd(-48.759, 388.285, -41.5, 1.128)
pt3dadd(-48.878, 388.306, -41.5, 1.1)
pt3dadd(-48.993, 388.337, -41.5, 1.066)
pt3dadd(-49.1, 388.39, -41.5, 1.022)
pt3dadd(-49.206, 388.445, -41.5, 0.976)
pt3dadd(-49.3, 388.52, -41.5, 0.922)
pt3dadd(-49.41, 388.55, -41.503, 0.892)
pt3dadd(-49.53, 388.555, -41.507, 0.874)
pt3dadd(-49.65, 388.559, -41.511, 0.856)
pt3dadd(-49.758, 388.577, -41.549, 0.832)
pt3dadd(-49.864, 388.596, -41.593, 0.808)
pt3dadd(-49.922, 388.636, -41.671, 0.792)
pt3dadd(-49.972, 388.679, -41.754, 0.778)
pt3dadd(-50.064, 388.75, -41.779, 0.778)
pt3dadd(-50.148, 388.825, -41.8, 0.782)
pt3dadd(-50.163, 388.945, -41.8, 0.824)
pt3dadd(-50.205, 389.045, -41.807, 0.86)
pt3dadd(-50.305, 389.105, -41.829, 0.876)
pt3dadd(-50.406, 389.164, -41.851, 0.892)
pt3dadd(-50.507, 389.222, -41.874, 0.91)
pt3dadd(-50.608, 389.282, -41.896, 0.926)
pt3dadd(-50.688, 389.37, -41.9, 0.934)
pt3dadd(-50.763, 389.464, -41.9, 0.938)
pt3dadd(-50.838, 389.557, -41.9, 0.944)
pt3dadd(-50.913, 389.651, -41.9, 0.948)
pt3dadd(-50.988, 389.744, -41.9, 0.954)
pt3dadd(-51.074, 389.824, -41.919, 0.944)
pt3dadd(-51.162, 389.9, -41.942, 0.934)
pt3dadd(-51.251, 389.976, -41.965, 0.922)
pt3dadd(-51.339, 390.053, -41.988, 0.91)
pt3dadd(-51.434, 390.124, -42.002, 0.898)
pt3dadd(-51.535, 390.186, -42.008, 0.886)
pt3dadd(-51.623, 390.229, -42.042, 0.874)
pt3dadd(-51.687, 390.235, -42.127, 0.862)
pt3dadd(-51.761, 390.24, -42.202, 0.854)
pt3dadd(-51.864, 390.24, -42.253, 0.854)
}
}
proc shape3d_103() {
dend_5[7] { pt3dadd(-51.969, 390.24, -42.3, 0.852)
pt3dadd(-52.089, 390.24, -42.3, 0.836)
pt3dadd(-52.209, 390.24, -42.3, 0.82)
pt3dadd(-52.326, 390.246, -42.302, 0.802)
pt3dadd(-52.406, 390.325, -42.336, 0.794)
pt3dadd(-52.486, 390.406, -42.369, 0.786)
pt3dadd(-52.565, 390.485, -42.405, 0.776)
pt3dadd(-52.634, 390.546, -42.468, 0.748)
pt3dadd(-52.715, 390.6, -42.523, 0.702)
pt3dadd(-52.802, 390.67, -42.555, 0.67)
pt3dadd(-52.88, 390.752, -42.587, 0.658)
pt3dadd(-52.959, 390.834, -42.618, 0.646)
pt3dadd(-53.038, 390.917, -42.65, 0.634)
pt3dadd(-53.12, 390.998, -42.659, 0.624)
pt3dadd(-53.205, 391.081, -42.642, 0.618)
pt3dadd(-53.29, 391.163, -42.626, 0.612)
pt3dadd(-53.376, 391.244, -42.61, 0.606)
pt3dadd(-53.457, 391.33, -42.609, 0.606)
pt3dadd(-53.534, 391.418, -42.632, 0.61)
pt3dadd(-53.61, 391.506, -42.655, 0.616)
pt3dadd(-53.686, 391.595, -42.678, 0.622)
pt3dadd(-53.763, 391.684, -42.7, 0.628)
pt3dadd(-53.844, 391.772, -42.7, 0.634)
pt3dadd(-53.924, 391.861, -42.7, 0.638)
pt3dadd(-54.005, 391.95, -42.7, 0.644)
pt3dadd(-54.085, 392.039, -42.7, 0.648)
pt3dadd(-54.168, 392.125, -42.7, 0.654)
pt3dadd(-54.276, 392.178, -42.7, 0.666)
pt3dadd(-54.383, 392.232, -42.7, 0.676)
pt3dadd(-54.489, 392.287, -42.704, 0.678)
pt3dadd(-54.595, 392.344, -42.71, 0.678)
pt3dadd(-54.664, 392.414, -42.756, 0.678)
pt3dadd(-54.717, 392.49, -42.819, 0.678)
pt3dadd(-54.762, 392.584, -42.869, 0.678)
pt3dadd(-54.806, 392.68, -42.917, 0.676)
pt3dadd(-54.849, 392.777, -42.962, 0.654)
pt3dadd(-54.917, 392.87, -42.988, 0.628)
pt3dadd(-54.988, 392.962, -43.013, 0.602)
pt3dadd(-55.047, 393.005, -43.092, 0.56)
pt3dadd(-55.109, 393.058, -43.159, 0.522)
pt3dadd(-55.184, 393.149, -43.178, 0.494)
pt3dadd(-55.27, 393.218, -43.171, 0.478)
pt3dadd(-55.37, 393.262, -43.129, 0.478)
pt3dadd(-55.463, 393.322, -43.129, 0.488)
pt3dadd(-55.551, 393.395, -43.159, 0.504)
pt3dadd(-55.638, 393.469, -43.19, 0.522)
pt3dadd(-55.707, 393.528, -43.25, 0.564)
pt3dadd(-55.767, 393.581, -43.325, 0.622)
pt3dadd(-55.854, 393.63, -43.377, 0.744)
pt3dadd(-55.949, 393.689, -43.414, 0.8)
pt3dadd(-56.044, 393.749, -43.448, 0.836)
pt3dadd(-56.138, 393.812, -43.481, 0.85)
pt3dadd(-56.213, 393.89, -43.455, 0.842)
pt3dadd(-56.28, 393.974, -43.411, 0.828)
pt3dadd(-56.32, 394.087, -43.422, 0.792)
pt3dadd(-56.36, 394.199, -43.433, 0.754)
pt3dadd(-56.452, 394.266, -43.466, 0.736)
pt3dadd(-56.544, 394.332, -43.499, 0.72)
pt3dadd(-56.636, 394.398, -43.532, 0.704)
pt3dadd(-56.696, 394.442, -43.609, 0.69)
pt3dadd(-56.754, 394.484, -43.69, 0.676)
pt3dadd(-56.806, 394.516, -43.776, 0.656)
pt3dadd(-56.857, 394.547, -43.862, 0.636)
pt3dadd(-56.91, 394.56, -43.951, 0.602)
pt3dadd(-56.964, 394.56, -44.04, 0.558)
pt3dadd(-57.025, 394.56, -44.126, 0.51)
pt3dadd(-57.1, 394.56, -44.204, 0.456)
pt3dadd(-57.175, 394.56, -44.282, 0.404)
pt3dadd(-57.269, 394.56, -44.337, 0.354)
pt3dadd(-57.383, 394.56, -44.367, 0.31)
pt3dadd(-57.491, 394.562, -44.371, 0.272)
pt3dadd(-57.58, 394.572, -44.305, 0.252)
pt3dadd(-57.604, 394.613, -44.215, 0.326)
pt3dadd(-57.636, 394.663, -44.129, 0.442)
pt3dadd(-57.719, 394.68, -44.06, 0.566)
pt3dadd(-57.824, 394.691, -44.016, 0.708)
pt3dadd(-57.912, 394.751, -43.974, 0.748)
pt3dadd(-57.996, 394.819, -43.931, 0.774)
pt3dadd(-58.08, 394.888, -43.888, 0.798)
pt3dadd(-58.165, 394.955, -43.845, 0.822)
pt3dadd(-58.245, 395.039, -43.828, 0.836)
pt3dadd(-58.324, 395.13, -43.821, 0.848)
pt3dadd(-58.402, 395.22, -43.814, 0.858)
pt3dadd(-58.481, 395.31, -43.807, 0.868)
pt3dadd(-58.56, 395.4, -43.8, 0.878)
pt3dadd(-58.626, 395.496, -43.778, 0.878)
pt3dadd(-58.692, 395.593, -43.755, 0.878)
pt3dadd(-58.758, 395.689, -43.732, 0.878)
pt3dadd(-58.824, 395.785, -43.71, 0.878)
pt3dadd(-58.916, 395.842, -43.681, 0.864)
pt3dadd(-59.026, 395.868, -43.649, 0.84)
pt3dadd(-59.129, 395.916, -43.624, 0.816)
pt3dadd(-59.226, 395.984, -43.607, 0.79)
pt3dadd(-59.297, 396.074, -43.61, 0.772)
pt3dadd(-59.35, 396.18, -43.626, 0.758)
pt3dadd(-59.415, 396.272, -43.654, 0.762)
pt3dadd(-59.49, 396.355, -43.692, 0.776)
pt3dadd(-59.514, 396.462, -43.723, 0.778)
pt3dadd(-59.525, 396.566, -43.764, 0.782)
pt3dadd(-59.546, 396.643, -43.839, 0.794)
pt3dadd(-59.585, 396.719, -43.904, 0.794)
pt3dadd(-59.661, 396.796, -43.948, 0.766)
pt3dadd(-59.762, 396.833, -43.974, 0.748)
pt3dadd(-59.88, 396.844, -43.988, 0.738)
pt3dadd(-59.995, 396.862, -43.999, 0.724)
pt3dadd(-60.08, 396.947, -43.994, 0.688)
pt3dadd(-60.162, 397.033, -43.987, 0.652)
pt3dadd(-60.205, 397.133, -43.945, 0.652)
pt3dadd(-60.24, 397.236, -43.909, 0.652)
pt3dadd(-60.236, 397.356, -43.9, 0.67)
pt3dadd(-60.205, 397.47, -43.9, 0.716)
pt3dadd(-60.119, 397.547, -43.9, 0.752)
pt3dadd(-60, 397.56, -43.9, 0.678)
}
dend_5[8] {pt3dclear()
pt3dadd(-11.04, 306.467, -24.689, 1.682)
pt3dadd(-11.07, 306.529, -24.728, 1.698)
pt3dadd(-11.114, 306.618, -24.785, 1.72)
pt3dadd(-11.157, 306.708, -24.841, 1.744)
pt3dadd(-11.201, 306.797, -24.897, 1.766)
pt3dadd(-11.244, 306.886, -24.953, 1.79)
pt3dadd(-11.283, 306.98, -25, 1.802)
pt3dadd(-11.3, 307.099, -25, 1.77)
pt3dadd(-11.318, 307.218, -25, 1.738)
pt3dadd(-11.335, 307.337, -25, 1.704)
pt3dadd(-11.352, 307.456, -25, 1.672)
pt3dadd(-11.369, 307.574, -25, 1.64)
pt3dadd(-11.387, 307.693, -25, 1.608)
pt3dadd(-11.397, 307.812, -25, 1.58)
pt3dadd(-11.407, 307.932, -25, 1.552)
pt3dadd(-11.417, 308.052, -25, 1.526)
pt3dadd(-11.428, 308.171, -25, 1.498)
pt3dadd(-11.438, 308.291, -25, 1.472)
pt3dadd(-11.448, 308.41, -25, 1.444)
pt3dadd(-11.484, 308.521, -25, 1.426)
pt3dadd(-11.544, 308.626, -25, 1.416)
pt3dadd(-11.604, 308.73, -25, 1.406)
pt3dadd(-11.664, 308.833, -25, 1.396)
pt3dadd(-11.724, 308.938, -25, 1.386)
pt3dadd(-11.76, 309.048, -25, 1.384)
pt3dadd(-11.76, 309.168, -25, 1.392)
pt3dadd(-11.76, 309.288, -25, 1.402)
pt3dadd(-11.762, 309.408, -25, 1.424)
pt3dadd(-11.766, 309.528, -25, 1.466)
pt3dadd(-11.771, 309.648, -25, 1.51)
pt3dadd(-11.818, 309.748, -25, 1.538)
pt3dadd(-11.906, 309.829, -25, 1.55)
pt3dadd(-12, 309.902, -25, 1.54)
pt3dadd(-12.103, 309.964, -25, 1.494)
pt3dadd(-12.189, 310.036, -25, 1.446)
pt3dadd(-12.201, 310.156, -25, 1.398)
pt3dadd(-12.212, 310.274, -25, 1.348)
pt3dadd(-12.224, 310.394, -25, 1.3)
pt3dadd(-12.235, 310.513, -25, 1.25)
pt3dadd(-12.24, 310.633, -25, 1.204)
pt3dadd(-12.24, 310.753, -25, 1.162)
pt3dadd(-12.24, 310.873, -25, 1.122)
pt3dadd(-12.254, 310.992, -25, 1.128)
pt3dadd(-12.278, 311.11, -25, 1.164)
pt3dadd(-12.302, 311.227, -25, 1.202)
pt3dadd(-12.338, 311.339, -25, 1.26)
pt3dadd(-12.419, 311.426, -25, 1.402)
pt3dadd(-12.504, 311.507, -25, 1.538)
pt3dadd(-12.624, 311.51, -25, 1.61)
pt3dadd(-12.744, 311.514, -25, 1.68)
pt3dadd(-12.864, 311.518, -25, 1.752)
pt3dadd(-12.981, 311.531, -25, 1.81)
pt3dadd(-13.089, 311.585, -25, 1.822)
pt3dadd(-13.196, 311.638, -25, 1.832)
pt3dadd(-13.274, 311.729, -25, 1.644)
pt3dadd(-13.357, 311.815, -25, 1.588)
pt3dadd(-13.441, 311.9, -25, 1.532)
pt3dadd(-13.525, 311.987, -25, 1.476)
pt3dadd(-13.608, 312.073, -25, 1.42)
pt3dadd(-13.68, 312.167, -25, 1.374)
pt3dadd(-13.725, 312.278, -25, 1.35)
pt3dadd(-13.769, 312.39, -25, 1.328)
pt3dadd(-13.814, 312.5, -25, 1.304)
pt3dadd(-13.858, 312.612, -25, 1.28)
pt3dadd(-13.903, 312.724, -25, 1.258)
pt3dadd(-13.925, 312.841, -25, 1.248)
pt3dadd(-13.945, 312.96, -25, 1.24)
pt3dadd(-13.964, 313.078, -25, 1.232)
pt3dadd(-13.984, 313.196, -25, 1.224)
pt3dadd(-14.004, 313.315, -25, 1.214)
pt3dadd(-14.023, 313.433, -25, 1.206)
pt3dadd(-14.029, 313.553, -25.009, 1.206)
pt3dadd(-14.031, 313.672, -25.02, 1.206)
pt3dadd(-14.033, 313.792, -25.03, 1.206)
pt3dadd(-14.035, 313.91, -25.041, 1.206)
pt3dadd(-14.037, 314.029, -25.052, 1.206)
pt3dadd(-14.039, 314.149, -25.062, 1.206)
pt3dadd(-14.044, 314.268, -25.07, 1.194)
pt3dadd(-14.05, 314.388, -25.075, 1.174)
pt3dadd(-14.056, 314.508, -25.08, 1.154)
pt3dadd(-14.062, 314.628, -25.085, 1.134)
pt3dadd(-14.068, 314.747, -25.091, 1.116)
pt3dadd(-14.075, 314.867, -25.096, 1.096)
pt3dadd(-14.089, 314.98, -25.112, 1.064)
pt3dadd(-14.134, 315.068, -25.168, 0.994)
pt3dadd(-14.163, 315.164, -25.22, 0.944)
pt3dadd(-14.169, 315.271, -25.266, 0.92)
}
}
proc shape3d_104() {
dend_5[8] { pt3dadd(-14.188, 315.377, -25.305, 0.912)
pt3dadd(-14.241, 315.482, -25.321, 0.936)
pt3dadd(-14.302, 315.578, -25.345, 0.974)
pt3dadd(-14.385, 315.647, -25.389, 1.044)
pt3dadd(-14.462, 315.727, -25.426, 1.088)
pt3dadd(-14.531, 315.818, -25.455, 1.104)
pt3dadd(-14.601, 315.91, -25.484, 1.12)
pt3dadd(-14.648, 316.009, -25.514, 1.13)
pt3dadd(-14.667, 316.122, -25.545, 1.13)
pt3dadd(-14.701, 316.228, -25.578, 1.092)
pt3dadd(-14.744, 316.332, -25.605, 1.054)
pt3dadd(-14.776, 316.445, -25.628, 1.054)
pt3dadd(-14.809, 316.556, -25.651, 1.054)
pt3dadd(-14.842, 316.669, -25.673, 1.054)
pt3dadd(-14.874, 316.781, -25.696, 1.054)
pt3dadd(-14.88, 316.898, -25.686, 1.072)
pt3dadd(-14.88, 317.017, -25.67, 1.092)
pt3dadd(-14.88, 317.135, -25.653, 1.114)
pt3dadd(-14.88, 317.254, -25.637, 1.134)
pt3dadd(-14.88, 317.372, -25.621, 1.154)
pt3dadd(-14.88, 317.49, -25.604, 1.174)
pt3dadd(-14.88, 317.609, -25.611, 1.208)
pt3dadd(-14.88, 317.728, -25.625, 1.244)
pt3dadd(-14.88, 317.846, -25.64, 1.28)
pt3dadd(-14.88, 317.965, -25.654, 1.318)
pt3dadd(-14.88, 318.084, -25.668, 1.354)
pt3dadd(-14.88, 318.203, -25.683, 1.39)
pt3dadd(-14.892, 318.322, -25.69, 1.42)
pt3dadd(-14.912, 318.439, -25.692, 1.446)
pt3dadd(-14.932, 318.558, -25.694, 1.472)
pt3dadd(-14.952, 318.676, -25.695, 1.496)
pt3dadd(-14.972, 318.794, -25.697, 1.522)
pt3dadd(-14.992, 318.912, -25.699, 1.546)
pt3dadd(-15.012, 319.031, -25.7, 1.55)
pt3dadd(-15.032, 319.15, -25.7, 1.538)
pt3dadd(-15.051, 319.267, -25.7, 1.524)
pt3dadd(-15.071, 319.386, -25.7, 1.512)
pt3dadd(-15.091, 319.505, -25.7, 1.5)
pt3dadd(-15.11, 319.622, -25.7, 1.488)
pt3dadd(-15.12, 319.741, -25.692, 1.464)
pt3dadd(-15.12, 319.86, -25.675, 1.432)
pt3dadd(-15.12, 319.978, -25.659, 1.398)
pt3dadd(-15.12, 320.096, -25.642, 1.366)
pt3dadd(-15.12, 320.214, -25.626, 1.332)
pt3dadd(-15.12, 320.333, -25.609, 1.3)
pt3dadd(-15.112, 320.452, -25.6, 1.264)
pt3dadd(-15.094, 320.57, -25.6, 1.226)
pt3dadd(-15.076, 320.689, -25.6, 1.188)
pt3dadd(-15.058, 320.808, -25.6, 1.15)
pt3dadd(-15.041, 320.926, -25.6, 1.112)
pt3dadd(-15.023, 321.044, -25.6, 1.074)
pt3dadd(-15.033, 321.161, -25.6, 1.048)
pt3dadd(-15.075, 321.274, -25.6, 1.034)
pt3dadd(-15.116, 321.385, -25.6, 1.02)
pt3dadd(-15.158, 321.498, -25.6, 1.006)
pt3dadd(-15.2, 321.611, -25.6, 0.992)
pt3dadd(-15.24, 321.724, -25.601, 0.98)
pt3dadd(-15.24, 321.841, -25.617, 0.974)
pt3dadd(-15.24, 321.96, -25.633, 0.97)
pt3dadd(-15.24, 322.079, -25.65, 0.966)
pt3dadd(-15.24, 322.196, -25.666, 0.962)
pt3dadd(-15.24, 322.315, -25.683, 0.958)
pt3dadd(-15.24, 322.434, -25.699, 0.954)
pt3dadd(-15.24, 322.552, -25.715, 0.966)
pt3dadd(-15.24, 322.67, -25.732, 0.978)
pt3dadd(-15.24, 322.789, -25.748, 0.99)
pt3dadd(-15.24, 322.907, -25.765, 1.004)
pt3dadd(-15.24, 323.026, -25.781, 1.016)
pt3dadd(-15.24, 323.143, -25.798, 1.028)
pt3dadd(-15.245, 323.263, -25.8, 1.042)
pt3dadd(-15.251, 323.383, -25.8, 1.058)
pt3dadd(-15.257, 323.503, -25.8, 1.072)
pt3dadd(-15.263, 323.623, -25.8, 1.088)
pt3dadd(-15.269, 323.743, -25.8, 1.102)
pt3dadd(-15.275, 323.863, -25.8, 1.118)
pt3dadd(-15.282, 323.982, -25.8, 1.136)
pt3dadd(-15.295, 324.102, -25.802, 1.164)
pt3dadd(-15.308, 324.221, -25.804, 1.192)
pt3dadd(-15.321, 324.341, -25.806, 1.22)
pt3dadd(-15.333, 324.46, -25.807, 1.248)
pt3dadd(-15.346, 324.578, -25.809, 1.276)
pt3dadd(-15.359, 324.698, -25.811, 1.304)
pt3dadd(-15.36, 324.817, -25.826, 1.328)
pt3dadd(-15.36, 324.935, -25.843, 1.354)
pt3dadd(-15.36, 325.054, -25.859, 1.378)
pt3dadd(-15.36, 325.171, -25.876, 1.404)
pt3dadd(-15.36, 325.29, -25.892, 1.428)
pt3dadd(-15.36, 325.409, -25.909, 1.452)
pt3dadd(-15.379, 325.525, -25.925, 1.476)
pt3dadd(-15.402, 325.64, -25.942, 1.5)
pt3dadd(-15.425, 325.757, -25.959, 1.524)
pt3dadd(-15.447, 325.873, -25.976, 1.548)
pt3dadd(-15.47, 325.99, -25.993, 1.572)
pt3dadd(-15.491, 326.107, -26, 1.584)
pt3dadd(-15.511, 326.225, -26, 1.588)
pt3dadd(-15.531, 326.344, -26, 1.592)
pt3dadd(-15.55, 326.461, -26, 1.596)
pt3dadd(-15.57, 326.58, -26, 1.6)
pt3dadd(-15.59, 326.699, -26, 1.606)
pt3dadd(-15.6, 326.816, -26.007, 1.608)
pt3dadd(-15.6, 326.935, -26.021, 1.608)
pt3dadd(-15.6, 327.054, -26.036, 1.608)
pt3dadd(-15.6, 327.173, -26.05, 1.608)
pt3dadd(-15.6, 327.292, -26.064, 1.608)
pt3dadd(-15.6, 327.41, -26.079, 1.608)
pt3dadd(-15.6, 327.529, -26.095, 1.602)
pt3dadd(-15.6, 327.647, -26.113, 1.586)
pt3dadd(-15.6, 327.766, -26.132, 1.568)
pt3dadd(-15.6, 327.883, -26.15, 1.552)
pt3dadd(-15.6, 328.001, -26.169, 1.534)
pt3dadd(-15.6, 328.118, -26.187, 1.518)
pt3dadd(-15.6, 328.237, -26.205, 1.5)
pt3dadd(-15.6, 328.356, -26.219, 1.48)
pt3dadd(-15.6, 328.475, -26.233, 1.46)
pt3dadd(-15.6, 328.594, -26.248, 1.44)
pt3dadd(-15.6, 328.712, -26.262, 1.42)
pt3dadd(-15.6, 328.831, -26.277, 1.398)
pt3dadd(-15.6, 328.949, -26.291, 1.378)
pt3dadd(-15.6, 329.068, -26.31, 1.348)
pt3dadd(-15.6, 329.185, -26.329, 1.318)
pt3dadd(-15.6, 329.303, -26.347, 1.29)
pt3dadd(-15.6, 329.422, -26.366, 1.26)
pt3dadd(-15.6, 329.539, -26.384, 1.23)
pt3dadd(-15.6, 329.657, -26.402, 1.204)
pt3dadd(-15.6, 329.776, -26.419, 1.192)
pt3dadd(-15.6, 329.893, -26.435, 1.178)
pt3dadd(-15.6, 330.012, -26.452, 1.166)
pt3dadd(-15.6, 330.131, -26.468, 1.154)
pt3dadd(-15.6, 330.248, -26.485, 1.142)
pt3dadd(-15.6, 330.367, -26.5, 1.13)
pt3dadd(-15.606, 330.487, -26.5, 1.126)
pt3dadd(-15.612, 330.607, -26.5, 1.122)
pt3dadd(-15.618, 330.727, -26.5, 1.118)
pt3dadd(-15.624, 330.847, -26.5, 1.114)
pt3dadd(-15.63, 330.966, -26.5, 1.112)
pt3dadd(-15.636, 331.086, -26.5, 1.108)
pt3dadd(-15.644, 331.206, -26.5, 1.112)
pt3dadd(-15.657, 331.325, -26.5, 1.126)
pt3dadd(-15.67, 331.445, -26.5, 1.142)
pt3dadd(-15.682, 331.564, -26.5, 1.158)
pt3dadd(-15.695, 331.684, -26.5, 1.174)
pt3dadd(-15.708, 331.802, -26.5, 1.19)
pt3dadd(-15.72, 331.922, -26.5, 1.206)
pt3dadd(-15.72, 332.04, -26.517, 1.23)
pt3dadd(-15.72, 332.159, -26.533, 1.256)
pt3dadd(-15.72, 332.278, -26.55, 1.28)
pt3dadd(-15.72, 332.395, -26.566, 1.304)
pt3dadd(-15.72, 332.514, -26.583, 1.33)
pt3dadd(-15.72, 332.633, -26.599, 1.354)
pt3dadd(-15.759, 332.746, -26.6, 1.382)
pt3dadd(-15.801, 332.857, -26.6, 1.41)
pt3dadd(-15.842, 332.97, -26.6, 1.438)
pt3dadd(-15.884, 333.083, -26.6, 1.464)
pt3dadd(-15.925, 333.196, -26.6, 1.492)
pt3dadd(-15.948, 333.311, -26.608, 1.508)
pt3dadd(-15.95, 333.428, -26.625, 1.514)
pt3dadd(-15.952, 333.547, -26.642, 1.518)
pt3dadd(-15.954, 333.666, -26.658, 1.522)
pt3dadd(-15.957, 333.784, -26.675, 1.526)
pt3dadd(-15.959, 333.902, -26.692, 1.53)
pt3dadd(-15.96, 334.021, -26.7, 1.526)
pt3dadd(-15.96, 334.141, -26.7, 1.516)
pt3dadd(-15.96, 334.261, -26.7, 1.504)
pt3dadd(-15.96, 334.381, -26.7, 1.494)
pt3dadd(-15.96, 334.501, -26.7, 1.484)
pt3dadd(-15.96, 334.621, -26.7, 1.472)
pt3dadd(-15.96, 334.741, -26.7, 1.462)
pt3dadd(-15.973, 334.854, -26.722, 1.45)
pt3dadd(-16, 334.958, -26.766, 1.44)
pt3dadd(-16.026, 335.063, -26.81, 1.428)
pt3dadd(-16.052, 335.167, -26.853, 1.418)
pt3dadd(-16.078, 335.273, -26.897, 1.406)
pt3dadd(-16.067, 335.389, -26.915, 1.406)
pt3dadd(-16.052, 335.507, -26.931, 1.406)
pt3dadd(-16.038, 335.624, -26.947, 1.406)
pt3dadd(-16.023, 335.742, -26.963, 1.406)
pt3dadd(-16.009, 335.86, -26.979, 1.406)
pt3dadd(-15.997, 335.977, -26.996, 1.404)
pt3dadd(-15.99, 336.095, -27.016, 1.4)
pt3dadd(-15.983, 336.212, -27.035, 1.396)
pt3dadd(-15.976, 336.329, -27.055, 1.392)
pt3dadd(-15.969, 336.446, -27.074, 1.386)
pt3dadd(-15.962, 336.564, -27.094, 1.382)
pt3dadd(-15.948, 336.683, -27.1, 1.376)
pt3dadd(-15.931, 336.802, -27.1, 1.368)
pt3dadd(-15.913, 336.92, -27.1, 1.36)
pt3dadd(-15.896, 337.039, -27.1, 1.352)
pt3dadd(-15.879, 337.158, -27.1, 1.342)
pt3dadd(-15.861, 337.277, -27.1, 1.334)
pt3dadd(-15.852, 337.393, -27.115, 1.328)
pt3dadd(-15.85, 337.508, -27.143, 1.324)
pt3dadd(-15.847, 337.624, -27.171, 1.32)
pt3dadd(-15.845, 337.739, -27.199, 1.316)
pt3dadd(-15.842, 337.854, -27.227, 1.31)
pt3dadd(-15.84, 337.969, -27.255, 1.306)
pt3dadd(-15.84, 338.086, -27.28, 1.328)
pt3dadd(-15.84, 338.201, -27.305, 1.348)
pt3dadd(-15.84, 338.317, -27.33, 1.37)
pt3dadd(-15.84, 338.434, -27.355, 1.392)
pt3dadd(-15.84, 338.55, -27.38, 1.414)
}
}
proc shape3d_105() {
dend_5[8] { pt3dadd(-15.84, 338.666, -27.404, 1.44)
pt3dadd(-15.84, 338.785, -27.42, 1.476)
pt3dadd(-15.84, 338.903, -27.437, 1.514)
pt3dadd(-15.84, 339.022, -27.453, 1.552)
pt3dadd(-15.84, 339.14, -27.469, 1.588)
pt3dadd(-15.84, 339.258, -27.486, 1.626)
pt3dadd(-15.838, 339.377, -27.5, 1.664)
pt3dadd(-15.825, 339.496, -27.502, 1.708)
pt3dadd(-15.813, 339.616, -27.504, 1.752)
pt3dadd(-15.8, 339.734, -27.506, 1.796)
pt3dadd(-15.787, 339.854, -27.507, 1.84)
pt3dadd(-15.774, 339.973, -27.509, 1.884)
pt3dadd(-15.761, 340.092, -27.511, 1.928)
pt3dadd(-15.754, 340.211, -27.524, 1.96)
pt3dadd(-15.747, 340.33, -27.54, 1.99)
pt3dadd(-15.74, 340.448, -27.555, 2.02)
pt3dadd(-15.733, 340.566, -27.57, 2.05)
pt3dadd(-15.727, 340.685, -27.585, 2.08)
pt3dadd(-15.72, 340.804, -27.601, 2.11)
pt3dadd(-15.72, 340.921, -27.619, 2.118)
pt3dadd(-15.72, 341.039, -27.638, 2.126)
pt3dadd(-15.72, 341.156, -27.656, 2.134)
pt3dadd(-15.72, 341.275, -27.675, 2.144)
pt3dadd(-15.72, 341.393, -27.693, 2.152)
pt3dadd(-15.72, 341.51, -27.712, 2.158)
pt3dadd(-15.72, 341.623, -27.747, 2.14)
pt3dadd(-15.72, 341.736, -27.782, 2.122)
pt3dadd(-15.72, 341.848, -27.816, 2.104)
pt3dadd(-15.72, 341.96, -27.851, 2.086)
pt3dadd(-15.72, 342.073, -27.886, 2.066)
pt3dadd(-15.72, 342.19, -27.9, 2.044)
pt3dadd(-15.72, 342.31, -27.9, 2.02)
pt3dadd(-15.72, 342.43, -27.9, 1.994)
pt3dadd(-15.72, 342.55, -27.9, 1.97)
pt3dadd(-15.72, 342.67, -27.9, 1.944)
pt3dadd(-15.72, 342.79, -27.9, 1.918)
pt3dadd(-15.72, 342.91, -27.9, 1.894)
pt3dadd(-15.708, 343.03, -27.9, 1.866)
pt3dadd(-15.689, 343.147, -27.9, 1.838)
pt3dadd(-15.669, 343.266, -27.9, 1.808)
pt3dadd(-15.649, 343.385, -27.9, 1.78)
pt3dadd(-15.63, 343.502, -27.9, 1.75)
pt3dadd(-15.61, 343.621, -27.9, 1.722)
pt3dadd(-15.6, 343.74, -27.9, 1.702)
pt3dadd(-15.6, 343.86, -27.9, 1.692)
pt3dadd(-15.6, 343.98, -27.9, 1.68)
pt3dadd(-15.6, 344.1, -27.9, 1.67)
pt3dadd(-15.6, 344.22, -27.9, 1.66)
pt3dadd(-15.6, 344.34, -27.9, 1.648)
pt3dadd(-15.6, 344.46, -27.9, 1.638)
pt3dadd(-15.6, 344.58, -27.9, 1.628)
pt3dadd(-15.6, 344.7, -27.9, 1.622)
pt3dadd(-15.6, 344.82, -27.9, 1.614)
pt3dadd(-15.6, 344.94, -27.9, 1.608)
pt3dadd(-15.6, 345.06, -27.9, 1.6)
pt3dadd(-15.6, 345.18, -27.9, 1.592)
pt3dadd(-15.6, 345.3, -27.9, 1.586)
pt3dadd(-15.59, 345.42, -27.9, 1.572)
pt3dadd(-15.57, 345.538, -27.9, 1.552)
pt3dadd(-15.551, 345.656, -27.9, 1.53)
pt3dadd(-15.531, 345.774, -27.9, 1.51)
pt3dadd(-15.511, 345.893, -27.9, 1.49)
pt3dadd(-15.491, 346.012, -27.9, 1.468)
pt3dadd(-15.48, 346.13, -27.9, 1.442)
pt3dadd(-15.48, 346.25, -27.9, 1.406)
pt3dadd(-15.48, 346.37, -27.9, 1.37)
pt3dadd(-15.48, 346.49, -27.9, 1.334)
pt3dadd(-15.48, 346.61, -27.9, 1.298)
pt3dadd(-15.48, 346.73, -27.9, 1.262)
pt3dadd(-15.48, 346.85, -27.9, 1.226)
pt3dadd(-15.48, 346.97, -27.9, 1.194)
pt3dadd(-15.48, 347.09, -27.9, 1.164)
pt3dadd(-15.48, 347.21, -27.9, 1.136)
pt3dadd(-15.48, 347.33, -27.9, 1.108)
pt3dadd(-15.48, 347.45, -27.9, 1.078)
pt3dadd(-15.48, 347.57, -27.9, 1.05)
pt3dadd(-15.48, 347.69, -27.9, 1.022)
pt3dadd(-15.48, 347.807, -27.916, 0.996)
pt3dadd(-15.48, 347.918, -27.953, 0.978)
pt3dadd(-15.48, 348.03, -27.99, 0.96)
pt3dadd(-15.48, 348.14, -28.027, 0.94)
pt3dadd(-15.48, 348.252, -28.064, 0.922)
pt3dadd(-15.48, 348.364, -28.1, 0.904)
pt3dadd(-15.48, 348.484, -28.1, 0.904)
pt3dadd(-15.48, 348.604, -28.1, 0.904)
pt3dadd(-15.48, 348.724, -28.1, 0.904)
pt3dadd(-15.48, 348.844, -28.1, 0.904)
pt3dadd(-15.48, 348.964, -28.1, 0.904)
pt3dadd(-15.48, 349.084, -28.1, 0.904)
pt3dadd(-15.48, 349.204, -28.1, 0.904)
pt3dadd(-15.482, 349.324, -28.105, 0.908)
pt3dadd(-15.484, 349.444, -28.11, 0.912)
pt3dadd(-15.486, 349.564, -28.115, 0.916)
pt3dadd(-15.488, 349.684, -28.12, 0.92)
pt3dadd(-15.49, 349.804, -28.125, 0.924)
pt3dadd(-15.492, 349.924, -28.131, 0.928)
pt3dadd(-15.513, 350.039, -28.14, 0.934)
pt3dadd(-15.557, 350.149, -28.153, 0.944)
pt3dadd(-15.6, 350.26, -28.167, 0.954)
pt3dadd(-15.643, 350.371, -28.18, 0.964)
pt3dadd(-15.687, 350.482, -28.194, 0.974)
pt3dadd(-15.708, 350.592, -28.22, 0.992)
pt3dadd(-15.711, 350.704, -28.258, 1.016)
pt3dadd(-15.713, 350.814, -28.296, 1.04)
pt3dadd(-15.716, 350.926, -28.334, 1.064)
pt3dadd(-15.718, 351.037, -28.372, 1.088)
pt3dadd(-15.72, 351.148, -28.409, 1.11)
pt3dadd(-15.72, 351.259, -28.446, 1.128)
pt3dadd(-15.72, 351.371, -28.483, 1.146)
pt3dadd(-15.72, 351.482, -28.521, 1.166)
pt3dadd(-15.72, 351.594, -28.558, 1.184)
pt3dadd(-15.72, 351.704, -28.595, 1.202)
pt3dadd(-15.72, 351.823, -28.6, 1.22)
pt3dadd(-15.72, 351.943, -28.6, 1.238)
pt3dadd(-15.72, 352.063, -28.6, 1.256)
pt3dadd(-15.72, 352.183, -28.6, 1.274)
pt3dadd(-15.72, 352.303, -28.6, 1.292)
pt3dadd(-15.72, 352.423, -28.6, 1.31)
pt3dadd(-15.72, 352.543, -28.6, 1.328)
pt3dadd(-15.72, 352.663, -28.6, 1.34)
pt3dadd(-15.72, 352.783, -28.6, 1.352)
pt3dadd(-15.72, 352.903, -28.6, 1.362)
pt3dadd(-15.72, 353.023, -28.6, 1.372)
pt3dadd(-15.72, 353.143, -28.6, 1.384)
pt3dadd(-15.72, 353.263, -28.6, 1.394)
pt3dadd(-15.72, 353.383, -28.6, 1.404)
pt3dadd(-15.72, 353.503, -28.6, 1.424)
pt3dadd(-15.72, 353.623, -28.6, 1.446)
pt3dadd(-15.72, 353.743, -28.6, 1.468)
pt3dadd(-15.72, 353.863, -28.6, 1.49)
pt3dadd(-15.72, 353.983, -28.6, 1.51)
pt3dadd(-15.72, 354.103, -28.6, 1.532)
pt3dadd(-15.72, 354.223, -28.6, 1.554)
pt3dadd(-15.72, 354.343, -28.611, 1.574)
pt3dadd(-15.72, 354.462, -28.623, 1.594)
pt3dadd(-15.72, 354.581, -28.636, 1.614)
pt3dadd(-15.72, 354.7, -28.648, 1.634)
pt3dadd(-15.72, 354.82, -28.66, 1.654)
pt3dadd(-15.72, 354.938, -28.673, 1.674)
pt3dadd(-15.72, 355.056, -28.691, 1.692)
pt3dadd(-15.72, 355.172, -28.714, 1.71)
pt3dadd(-15.72, 355.29, -28.737, 1.728)
pt3dadd(-15.72, 355.406, -28.76, 1.744)
pt3dadd(-15.72, 355.523, -28.783, 1.762)
pt3dadd(-15.72, 355.64, -28.806, 1.78)
pt3dadd(-15.722, 355.758, -28.822, 1.776)
pt3dadd(-15.724, 355.877, -28.837, 1.768)
pt3dadd(-15.726, 355.996, -28.852, 1.76)
pt3dadd(-15.728, 356.114, -28.866, 1.752)
pt3dadd(-15.73, 356.233, -28.881, 1.744)
pt3dadd(-15.733, 356.352, -28.896, 1.736)
pt3dadd(-15.762, 356.466, -28.9, 1.714)
pt3dadd(-15.804, 356.579, -28.9, 1.686)
pt3dadd(-15.846, 356.692, -28.9, 1.658)
pt3dadd(-15.887, 356.803, -28.9, 1.63)
pt3dadd(-15.929, 356.916, -28.9, 1.602)
pt3dadd(-15.96, 357.03, -28.896, 1.57)
pt3dadd(-15.96, 357.149, -28.882, 1.526)
pt3dadd(-15.96, 357.268, -28.867, 1.48)
pt3dadd(-15.96, 357.386, -28.853, 1.436)
pt3dadd(-15.96, 357.505, -28.839, 1.392)
pt3dadd(-15.96, 357.624, -28.824, 1.346)
pt3dadd(-15.96, 357.743, -28.811, 1.304)
pt3dadd(-15.96, 357.863, -28.809, 1.27)
pt3dadd(-15.96, 357.983, -28.808, 1.238)
pt3dadd(-15.96, 358.103, -28.806, 1.204)
pt3dadd(-15.96, 358.223, -28.805, 1.172)
pt3dadd(-15.96, 358.343, -28.803, 1.14)
pt3dadd(-15.96, 358.463, -28.801, 1.106)
pt3dadd(-15.96, 358.583, -28.803, 1.078)
pt3dadd(-15.96, 358.7, -28.82, 1.07)
pt3dadd(-15.96, 358.819, -28.836, 1.062)
pt3dadd(-15.96, 358.938, -28.852, 1.054)
pt3dadd(-15.96, 359.056, -28.869, 1.046)
pt3dadd(-15.96, 359.174, -28.885, 1.038)
pt3dadd(-15.96, 359.293, -28.902, 1.034)
pt3dadd(-15.96, 359.411, -28.918, 1.07)
pt3dadd(-15.96, 359.53, -28.935, 1.108)
pt3dadd(-15.96, 359.648, -28.951, 1.146)
pt3dadd(-15.96, 359.766, -28.967, 1.182)
pt3dadd(-15.96, 359.885, -28.984, 1.22)
pt3dadd(-15.96, 360.002, -29, 1.258)
pt3dadd(-15.981, 360.119, -29.019, 1.328)
pt3dadd(-16.001, 360.235, -29.038, 1.4)
pt3dadd(-16.021, 360.352, -29.057, 1.472)
pt3dadd(-16.041, 360.467, -29.076, 1.542)
pt3dadd(-16.062, 360.583, -29.095, 1.614)
pt3dadd(-16.068, 360.702, -29.108, 1.66)
pt3dadd(-16.071, 360.821, -29.119, 1.696)
pt3dadd(-16.073, 360.941, -29.129, 1.732)
pt3dadd(-16.075, 361.06, -29.14, 1.768)
pt3dadd(-16.077, 361.18, -29.151, 1.804)
pt3dadd(-16.079, 361.298, -29.161, 1.84)
pt3dadd(-16.08, 361.418, -29.169, 1.856)
pt3dadd(-16.08, 361.537, -29.174, 1.852)
pt3dadd(-16.08, 361.657, -29.179, 1.848)
pt3dadd(-16.08, 361.777, -29.184, 1.846)
pt3dadd(-16.08, 361.897, -29.189, 1.842)
pt3dadd(-16.08, 362.017, -29.194, 1.838)
pt3dadd(-16.08, 362.137, -29.199, 1.834)
}
}
proc shape3d_106() {
dend_5[8] { pt3dadd(-16.114, 362.251, -29.2, 1.796)
pt3dadd(-16.155, 362.364, -29.2, 1.75)
pt3dadd(-16.197, 362.476, -29.2, 1.704)
pt3dadd(-16.239, 362.588, -29.2, 1.658)
pt3dadd(-16.28, 362.701, -29.2, 1.612)
pt3dadd(-16.308, 362.816, -29.2, 1.572)
pt3dadd(-16.309, 362.936, -29.2, 1.542)
pt3dadd(-16.311, 363.056, -29.2, 1.514)
pt3dadd(-16.313, 363.176, -29.2, 1.484)
pt3dadd(-16.315, 363.296, -29.2, 1.454)
pt3dadd(-16.317, 363.416, -29.2, 1.426)
pt3dadd(-16.319, 363.536, -29.2, 1.396)
pt3dadd(-16.32, 363.656, -29.2, 1.38)
pt3dadd(-16.32, 363.776, -29.2, 1.376)
pt3dadd(-16.32, 363.896, -29.2, 1.372)
pt3dadd(-16.32, 364.016, -29.2, 1.368)
pt3dadd(-16.32, 364.136, -29.2, 1.366)
pt3dadd(-16.32, 364.256, -29.2, 1.362)
pt3dadd(-16.32, 364.376, -29.2, 1.358)
pt3dadd(-16.32, 364.496, -29.2, 1.368)
pt3dadd(-16.32, 364.616, -29.2, 1.392)
pt3dadd(-16.32, 364.736, -29.2, 1.418)
pt3dadd(-16.32, 364.856, -29.2, 1.444)
pt3dadd(-16.32, 364.976, -29.2, 1.468)
pt3dadd(-16.32, 365.096, -29.2, 1.494)
pt3dadd(-16.32, 365.216, -29.2, 1.518)
pt3dadd(-16.32, 365.333, -29.217, 1.55)
pt3dadd(-16.32, 365.443, -29.255, 1.586)
pt3dadd(-16.32, 365.555, -29.292, 1.624)
pt3dadd(-16.32, 365.666, -29.329, 1.662)
pt3dadd(-16.32, 365.778, -29.366, 1.698)
pt3dadd(-16.321, 365.89, -29.402, 1.734)
pt3dadd(-16.327, 366.008, -29.419, 1.742)
pt3dadd(-16.334, 366.126, -29.436, 1.75)
pt3dadd(-16.341, 366.244, -29.454, 1.76)
pt3dadd(-16.348, 366.362, -29.471, 1.768)
pt3dadd(-16.355, 366.48, -29.488, 1.778)
pt3dadd(-16.364, 366.598, -29.5, 1.776)
pt3dadd(-16.376, 366.718, -29.5, 1.752)
pt3dadd(-16.389, 366.836, -29.5, 1.728)
pt3dadd(-16.401, 366.956, -29.5, 1.704)
pt3dadd(-16.414, 367.075, -29.5, 1.68)
pt3dadd(-16.427, 367.195, -29.5, 1.658)
pt3dadd(-16.439, 367.314, -29.5, 1.634)
pt3dadd(-16.44, 367.434, -29.5, 1.598)
pt3dadd(-16.44, 367.554, -29.5, 1.562)
pt3dadd(-16.44, 367.674, -29.5, 1.526)
pt3dadd(-16.44, 367.794, -29.5, 1.49)
pt3dadd(-16.44, 367.914, -29.5, 1.454)
pt3dadd(-16.44, 368.034, -29.5, 1.418)
pt3dadd(-16.44, 368.154, -29.5, 1.382)
pt3dadd(-16.44, 368.269, -29.528, 1.346)
pt3dadd(-16.44, 368.383, -29.558, 1.31)
pt3dadd(-16.44, 368.498, -29.588, 1.274)
pt3dadd(-16.44, 368.612, -29.618, 1.238)
pt3dadd(-16.44, 368.728, -29.648, 1.202)
pt3dadd(-16.44, 368.843, -29.671, 1.166)
pt3dadd(-16.44, 368.963, -29.684, 1.13)
pt3dadd(-16.44, 369.082, -29.696, 1.092)
pt3dadd(-16.44, 369.202, -29.7, 1.08)
pt3dadd(-16.44, 369.322, -29.7, 1.08)
pt3dadd(-16.44, 369.442, -29.7, 1.08)
pt3dadd(-16.467, 369.557, -29.7, 1.108)
pt3dadd(-16.507, 369.67, -29.7, 1.152)
pt3dadd(-16.57, 369.76, -29.702, 1.198)
pt3dadd(-16.682, 369.802, -29.707, 1.254)
pt3dadd(-16.792, 369.846, -29.713, 1.308)
pt3dadd(-16.871, 369.929, -29.742, 1.342)
pt3dadd(-16.95, 370.013, -29.772, 1.374)
pt3dadd(-17.027, 370.097, -29.8, 1.406)
pt3dadd(-17.032, 370.216, -29.787, 1.406)
pt3dadd(-17.037, 370.334, -29.774, 1.406)
pt3dadd(-17.04, 370.448, -29.747, 1.36)
pt3dadd(-17.04, 370.565, -29.73, 1.318)
pt3dadd(-17.04, 370.684, -29.725, 1.298)
pt3dadd(-17.04, 370.804, -29.72, 1.28)
pt3dadd(-17.04, 370.924, -29.715, 1.262)
pt3dadd(-17.04, 371.044, -29.71, 1.242)
pt3dadd(-17.04, 371.164, -29.705, 1.224)
pt3dadd(-17.04, 371.284, -29.7, 1.204)
pt3dadd(-17.04, 371.404, -29.7, 1.186)
pt3dadd(-17.04, 371.524, -29.7, 1.168)
pt3dadd(-17.04, 371.644, -29.7, 1.152)
pt3dadd(-17.04, 371.764, -29.7, 1.134)
pt3dadd(-17.04, 371.884, -29.7, 1.116)
pt3dadd(-17.04, 372.004, -29.7, 1.098)
pt3dadd(-17.04, 372.124, -29.7, 1.08)
pt3dadd(-17.048, 372.244, -29.7, 1.076)
pt3dadd(-17.056, 372.362, -29.7, 1.072)
pt3dadd(-17.064, 372.482, -29.7, 1.068)
pt3dadd(-17.072, 372.602, -29.7, 1.064)
pt3dadd(-17.08, 372.722, -29.7, 1.06)
pt3dadd(-17.088, 372.842, -29.7, 1.056)
pt3dadd(-17.108, 372.96, -29.701, 1.056)
pt3dadd(-17.142, 373.075, -29.703, 1.062)
pt3dadd(-17.175, 373.189, -29.705, 1.066)
pt3dadd(-17.209, 373.304, -29.707, 1.07)
pt3dadd(-17.243, 373.42, -29.709, 1.074)
pt3dadd(-17.277, 373.535, -29.711, 1.08)
pt3dadd(-17.28, 373.654, -29.724, 1.088)
pt3dadd(-17.28, 373.772, -29.738, 1.096)
pt3dadd(-17.28, 373.891, -29.753, 1.104)
pt3dadd(-17.28, 374.01, -29.767, 1.112)
pt3dadd(-17.28, 374.129, -29.782, 1.12)
pt3dadd(-17.28, 374.248, -29.796, 1.128)
pt3dadd(-17.28, 374.366, -29.812, 1.124)
pt3dadd(-17.28, 374.484, -29.828, 1.116)
pt3dadd(-17.28, 374.603, -29.845, 1.108)
pt3dadd(-17.28, 374.72, -29.861, 1.1)
pt3dadd(-17.28, 374.839, -29.878, 1.092)
pt3dadd(-17.28, 374.958, -29.894, 1.082)
pt3dadd(-17.294, 375.076, -29.9, 1.078)
pt3dadd(-17.316, 375.193, -29.9, 1.074)
pt3dadd(-17.339, 375.312, -29.9, 1.068)
pt3dadd(-17.361, 375.43, -29.9, 1.064)
pt3dadd(-17.383, 375.547, -29.9, 1.06)
pt3dadd(-17.405, 375.665, -29.9, 1.056)
pt3dadd(-17.441, 375.779, -29.891, 1.054)
pt3dadd(-17.485, 375.889, -29.878, 1.054)
pt3dadd(-17.528, 376, -29.864, 1.054)
pt3dadd(-17.571, 376.111, -29.851, 1.054)
pt3dadd(-17.615, 376.222, -29.837, 1.054)
pt3dadd(-17.63, 376.339, -29.83, 1.064)
pt3dadd(-17.634, 376.458, -29.824, 1.074)
pt3dadd(-17.638, 376.578, -29.819, 1.086)
pt3dadd(-17.642, 376.698, -29.814, 1.098)
pt3dadd(-17.646, 376.818, -29.809, 1.11)
pt3dadd(-17.65, 376.938, -29.804, 1.122)
pt3dadd(-17.658, 377.057, -29.8, 1.132)
pt3dadd(-17.675, 377.176, -29.8, 1.136)
pt3dadd(-17.692, 377.294, -29.8, 1.14)
pt3dadd(-17.709, 377.413, -29.8, 1.144)
pt3dadd(-17.727, 377.532, -29.8, 1.148)
pt3dadd(-17.744, 377.651, -29.8, 1.152)
pt3dadd(-17.76, 377.77, -29.799, 1.154)
pt3dadd(-17.76, 377.888, -29.784, 1.146)
pt3dadd(-17.76, 378.007, -29.77, 1.138)
pt3dadd(-17.76, 378.126, -29.756, 1.13)
pt3dadd(-17.76, 378.245, -29.741, 1.122)
pt3dadd(-17.76, 378.364, -29.727, 1.114)
pt3dadd(-17.76, 378.482, -29.712, 1.106)
pt3dadd(-17.76, 378.601, -29.719, 1.102)
pt3dadd(-17.76, 378.721, -29.728, 1.098)
pt3dadd(-17.76, 378.84, -29.737, 1.094)
pt3dadd(-17.76, 378.96, -29.746, 1.09)
pt3dadd(-17.76, 379.08, -29.755, 1.086)
pt3dadd(-17.76, 379.199, -29.764, 1.082)
pt3dadd(-17.76, 379.318, -29.78, 1.086)
pt3dadd(-17.76, 379.435, -29.801, 1.094)
pt3dadd(-17.76, 379.552, -29.822, 1.102)
pt3dadd(-17.76, 379.669, -29.842, 1.112)
pt3dadd(-17.76, 379.787, -29.863, 1.12)
pt3dadd(-17.76, 379.904, -29.884, 1.128)
pt3dadd(-17.765, 380.023, -29.89, 1.144)
pt3dadd(-17.771, 380.143, -29.892, 1.164)
pt3dadd(-17.777, 380.263, -29.894, 1.182)
pt3dadd(-17.783, 380.383, -29.895, 1.202)
pt3dadd(-17.789, 380.503, -29.897, 1.22)
pt3dadd(-17.795, 380.623, -29.899, 1.24)
pt3dadd(-17.802, 380.742, -29.901, 1.256)
pt3dadd(-17.815, 380.862, -29.906, 1.26)
pt3dadd(-17.829, 380.981, -29.912, 1.264)
pt3dadd(-17.842, 381.1, -29.917, 1.268)
pt3dadd(-17.855, 381.218, -29.923, 1.274)
pt3dadd(-17.868, 381.337, -29.929, 1.278)
pt3dadd(-17.88, 381.455, -29.939, 1.276)
pt3dadd(-17.88, 381.565, -29.978, 1.23)
pt3dadd(-17.89, 381.683, -29.997, 1.206)
pt3dadd(-17.919, 381.798, -30, 1.206)
pt3dadd(-17.996, 381.889, -30.005, 1.252)
pt3dadd(-18.081, 381.947, -30.047, 1.332)
pt3dadd(-18.117, 381.96, -30.142, 1.356)
pt3dadd(-18.15, 381.96, -30.238, 1.34)
pt3dadd(-18.213, 381.96, -30.321, 1.282)
pt3dadd(-18.29, 381.966, -30.397, 1.194)
pt3dadd(-18.347, 382, -30.478, 1.18)
}
dend_5[9] {pt3dclear()
pt3dadd(-18.347, 382, -30.478, 1.18)
pt3dadd(-18.371, 382.027, -30.531, 1.18)
pt3dadd(-18.409, 382.072, -30.618, 1.18)
pt3dadd(-18.448, 382.117, -30.705, 1.18)
pt3dadd(-18.486, 382.162, -30.792, 1.18)
pt3dadd(-18.531, 382.2, -30.878, 1.176)
pt3dadd(-18.606, 382.2, -30.956, 1.154)
pt3dadd(-18.681, 382.2, -31.034, 1.13)
pt3dadd(-18.744, 382.228, -31.116, 1.116)
pt3dadd(-18.802, 382.265, -31.191, 1.108)
pt3dadd(-18.819, 382.381, -31.21, 1.13)
pt3dadd(-18.837, 382.498, -31.23, 1.15)
pt3dadd(-18.84, 382.607, -31.269, 1.192)
pt3dadd(-18.84, 382.715, -31.314, 1.236)
pt3dadd(-18.84, 382.824, -31.354, 1.292)
pt3dadd(-18.84, 382.937, -31.39, 1.356)
pt3dadd(-18.84, 383.046, -31.43, 1.36)
pt3dadd(-18.84, 383.156, -31.469, 1.366)
pt3dadd(-18.84, 383.267, -31.509, 1.37)
pt3dadd(-18.84, 383.377, -31.548, 1.374)
pt3dadd(-18.84, 383.488, -31.588, 1.38)
pt3dadd(-18.84, 383.597, -31.628, 1.374)
pt3dadd(-18.84, 383.707, -31.667, 1.366)
pt3dadd(-18.84, 383.818, -31.707, 1.356)
}
}
proc shape3d_107() {
dend_5[9] { pt3dadd(-18.84, 383.928, -31.747, 1.346)
pt3dadd(-18.84, 384.038, -31.786, 1.336)
pt3dadd(-18.84, 384.151, -31.817, 1.322)
pt3dadd(-18.84, 384.27, -31.831, 1.298)
pt3dadd(-18.84, 384.389, -31.845, 1.272)
pt3dadd(-18.84, 384.508, -31.86, 1.248)
pt3dadd(-18.84, 384.626, -31.874, 1.224)
pt3dadd(-18.84, 384.745, -31.889, 1.2)
pt3dadd(-18.84, 384.864, -31.9, 1.176)
pt3dadd(-18.84, 384.984, -31.9, 1.154)
pt3dadd(-18.84, 385.104, -31.9, 1.132)
pt3dadd(-18.84, 385.224, -31.9, 1.112)
pt3dadd(-18.84, 385.344, -31.9, 1.09)
pt3dadd(-18.84, 385.464, -31.9, 1.068)
pt3dadd(-18.84, 385.584, -31.9, 1.046)
pt3dadd(-18.84, 385.704, -31.9, 1.024)
pt3dadd(-18.84, 385.824, -31.9, 1)
pt3dadd(-18.84, 385.944, -31.9, 0.974)
pt3dadd(-18.84, 386.064, -31.901, 0.956)
pt3dadd(-18.84, 386.184, -31.905, 0.964)
pt3dadd(-18.84, 386.304, -31.908, 0.974)
pt3dadd(-18.853, 386.418, -31.924, 0.996)
pt3dadd(-18.897, 386.518, -31.966, 1.05)
pt3dadd(-18.949, 386.618, -31.991, 1.096)
pt3dadd(-19.012, 386.72, -31.997, 1.132)
pt3dadd(-19.08, 386.819, -32, 1.162)
pt3dadd(-19.155, 386.912, -32, 1.178)
pt3dadd(-19.199, 387.022, -32.02, 1.166)
pt3dadd(-19.241, 387.131, -32.041, 1.15)
pt3dadd(-19.283, 387.24, -32.062, 1.134)
pt3dadd(-19.325, 387.35, -32.083, 1.118)
pt3dadd(-19.367, 387.457, -32.108, 1.102)
pt3dadd(-19.407, 387.556, -32.154, 1.084)
pt3dadd(-19.447, 387.654, -32.201, 1.068)
pt3dadd(-19.487, 387.754, -32.247, 1.05)
pt3dadd(-19.527, 387.852, -32.293, 1.032)
pt3dadd(-19.558, 387.964, -32.317, 1.016)
pt3dadd(-19.587, 388.078, -32.337, 1.002)
pt3dadd(-19.616, 388.192, -32.357, 0.986)
pt3dadd(-19.646, 388.306, -32.377, 0.972)
pt3dadd(-19.675, 388.418, -32.396, 0.956)
pt3dadd(-19.696, 388.536, -32.402, 0.95)
pt3dadd(-19.716, 388.655, -32.403, 0.946)
pt3dadd(-19.737, 388.774, -32.405, 0.942)
pt3dadd(-19.757, 388.891, -32.407, 0.938)
pt3dadd(-19.777, 389.01, -32.409, 0.934)
pt3dadd(-19.797, 389.128, -32.411, 0.93)
pt3dadd(-19.819, 389.237, -32.445, 0.92)
pt3dadd(-19.842, 389.345, -32.485, 0.91)
pt3dadd(-19.864, 389.453, -32.525, 0.898)
pt3dadd(-19.887, 389.56, -32.565, 0.888)
pt3dadd(-19.907, 389.669, -32.604, 0.88)
pt3dadd(-19.909, 389.784, -32.632, 0.89)
pt3dadd(-19.912, 389.899, -32.66, 0.898)
pt3dadd(-19.914, 390.014, -32.688, 0.908)
pt3dadd(-19.917, 390.13, -32.716, 0.916)
pt3dadd(-19.919, 390.244, -32.744, 0.926)
pt3dadd(-19.92, 390.362, -32.759, 0.94)
pt3dadd(-19.92, 390.481, -32.766, 0.96)
pt3dadd(-19.92, 390.601, -32.773, 0.978)
pt3dadd(-19.92, 390.721, -32.78, 0.998)
pt3dadd(-19.92, 390.841, -32.786, 1.016)
pt3dadd(-19.92, 390.961, -32.793, 1.036)
pt3dadd(-19.92, 391.08, -32.8, 1.054)
pt3dadd(-19.92, 391.199, -32.819, 1.084)
pt3dadd(-19.92, 391.316, -32.837, 1.114)
pt3dadd(-19.92, 391.434, -32.856, 1.142)
pt3dadd(-19.92, 391.552, -32.874, 1.172)
pt3dadd(-19.92, 391.67, -32.893, 1.202)
pt3dadd(-19.92, 391.788, -32.912, 1.23)
pt3dadd(-19.92, 391.888, -32.967, 1.25)
pt3dadd(-19.92, 391.988, -33.022, 1.27)
pt3dadd(-19.92, 392.088, -33.077, 1.29)
pt3dadd(-19.92, 392.189, -33.132, 1.31)
pt3dadd(-19.92, 392.288, -33.187, 1.33)
pt3dadd(-19.92, 392.406, -33.207, 1.326)
pt3dadd(-19.92, 392.524, -33.225, 1.322)
pt3dadd(-19.92, 392.642, -33.244, 1.318)
pt3dadd(-19.92, 392.76, -33.262, 1.314)
pt3dadd(-19.92, 392.878, -33.281, 1.31)
pt3dadd(-19.92, 392.995, -33.299, 1.306)
pt3dadd(-19.92, 393.114, -33.318, 1.306)
pt3dadd(-19.92, 393.232, -33.336, 1.306)
pt3dadd(-19.92, 393.349, -33.355, 1.306)
pt3dadd(-19.92, 393.467, -33.373, 1.306)
pt3dadd(-19.92, 393.586, -33.392, 1.306)
pt3dadd(-19.92, 393.703, -33.41, 1.306)
pt3dadd(-19.92, 393.822, -33.427, 1.302)
pt3dadd(-19.92, 393.94, -33.444, 1.298)
pt3dadd(-19.92, 394.058, -33.46, 1.294)
pt3dadd(-19.92, 394.177, -33.476, 1.29)
pt3dadd(-19.92, 394.295, -33.493, 1.286)
pt3dadd(-19.92, 394.414, -33.509, 1.282)
pt3dadd(-19.922, 394.532, -33.524, 1.284)
pt3dadd(-19.924, 394.651, -33.539, 1.288)
pt3dadd(-19.926, 394.769, -33.553, 1.292)
pt3dadd(-19.929, 394.888, -33.568, 1.296)
pt3dadd(-19.931, 395.006, -33.583, 1.3)
pt3dadd(-19.933, 395.125, -33.597, 1.306)
pt3dadd(-19.973, 395.234, -33.618, 1.288)
pt3dadd(-20.022, 395.34, -33.639, 1.266)
pt3dadd(-20.071, 395.447, -33.661, 1.244)
pt3dadd(-20.12, 395.554, -33.683, 1.222)
pt3dadd(-20.16, 395.663, -33.7, 1.202)
pt3dadd(-20.16, 395.783, -33.7, 1.188)
pt3dadd(-20.16, 395.903, -33.7, 1.174)
pt3dadd(-20.16, 396.023, -33.7, 1.16)
pt3dadd(-20.16, 396.143, -33.7, 1.146)
pt3dadd(-20.16, 396.263, -33.7, 1.13)
pt3dadd(-20.16, 396.383, -33.7, 1.116)
pt3dadd(-20.16, 396.503, -33.701, 1.1)
pt3dadd(-20.16, 396.623, -33.706, 1.078)
pt3dadd(-20.16, 396.742, -33.711, 1.056)
pt3dadd(-20.16, 396.862, -33.716, 1.034)
pt3dadd(-20.16, 396.982, -33.721, 1.01)
pt3dadd(-20.16, 397.102, -33.726, 0.988)
pt3dadd(-20.16, 397.222, -33.731, 0.966)
pt3dadd(-20.16, 397.342, -33.739, 0.948)
pt3dadd(-20.16, 397.46, -33.749, 0.936)
pt3dadd(-20.16, 397.579, -33.76, 0.924)
pt3dadd(-20.16, 397.699, -33.77, 0.912)
pt3dadd(-20.16, 397.818, -33.781, 0.9)
pt3dadd(-20.16, 397.938, -33.791, 0.89)
pt3dadd(-20.16, 398.057, -33.8, 0.876)
pt3dadd(-20.16, 398.177, -33.802, 0.862)
pt3dadd(-20.16, 398.297, -33.805, 0.848)
pt3dadd(-20.16, 398.417, -33.807, 0.832)
pt3dadd(-20.16, 398.537, -33.809, 0.818)
pt3dadd(-20.16, 398.657, -33.812, 0.804)
pt3dadd(-20.16, 398.776, -33.826, 0.804)
pt3dadd(-20.16, 398.894, -33.841, 0.804)
pt3dadd(-20.16, 399.013, -33.856, 0.804)
pt3dadd(-20.16, 399.132, -33.871, 0.804)
pt3dadd(-20.16, 399.251, -33.886, 0.804)
pt3dadd(-20.164, 399.368, -33.9, 0.804)
pt3dadd(-20.211, 399.479, -33.9, 0.804)
pt3dadd(-20.259, 399.589, -33.9, 0.804)
pt3dadd(-20.306, 399.698, -33.9, 0.804)
pt3dadd(-20.354, 399.809, -33.9, 0.804)
pt3dadd(-20.401, 399.919, -33.9, 0.804)
pt3dadd(-20.444, 400.031, -33.9, 0.814)
pt3dadd(-20.486, 400.144, -33.9, 0.828)
pt3dadd(-20.528, 400.256, -33.9, 0.842)
pt3dadd(-20.569, 400.369, -33.9, 0.856)
pt3dadd(-20.611, 400.481, -33.9, 0.87)
pt3dadd(-20.655, 400.592, -33.907, 0.882)
pt3dadd(-20.704, 400.698, -33.928, 0.892)
pt3dadd(-20.753, 400.805, -33.95, 0.904)
pt3dadd(-20.802, 400.912, -33.971, 0.914)
pt3dadd(-20.851, 401.018, -33.993, 0.926)
pt3dadd(-20.87, 401.134, -34, 0.934)
pt3dadd(-20.874, 401.254, -34, 0.944)
pt3dadd(-20.879, 401.374, -34, 0.952)
pt3dadd(-20.906, 401.49, -34, 0.93)
pt3dadd(-20.939, 401.605, -34, 0.9)
pt3dadd(-20.966, 401.722, -34.002, 0.868)
pt3dadd(-20.981, 401.84, -34.006, 0.84)
pt3dadd(-20.996, 401.959, -34.01, 0.81)
pt3dadd(-21.022, 402.041, -34.07, 0.784)
pt3dadd(-21.05, 402.113, -34.147, 0.756)
pt3dadd(-21.147, 402.157, -34.187, 0.736)
pt3dadd(-21.228, 402.232, -34.214, 0.722)
pt3dadd(-21.294, 402.328, -34.236, 0.71)
pt3dadd(-21.36, 402.425, -34.259, 0.698)
pt3dadd(-21.426, 402.521, -34.282, 0.688)
pt3dadd(-21.494, 402.612, -34.309, 0.678)
pt3dadd(-21.573, 402.682, -34.358, 0.678)
pt3dadd(-21.652, 402.75, -34.407, 0.678)
pt3dadd(-21.73, 402.818, -34.456, 0.678)
pt3dadd(-21.807, 402.89, -34.502, 0.68)
pt3dadd(-21.866, 402.991, -34.525, 0.702)
pt3dadd(-21.926, 403.093, -34.547, 0.726)
pt3dadd(-21.985, 403.194, -34.569, 0.748)
pt3dadd(-22.044, 403.295, -34.591, 0.77)
pt3dadd(-22.08, 403.406, -34.6, 0.796)
pt3dadd(-22.103, 403.524, -34.6, 0.826)
pt3dadd(-22.125, 403.642, -34.6, 0.856)
pt3dadd(-22.147, 403.759, -34.6, 0.884)
pt3dadd(-22.169, 403.878, -34.6, 0.914)
pt3dadd(-22.192, 403.996, -34.6, 0.944)
pt3dadd(-22.203, 404.114, -34.6, 0.976)
pt3dadd(-22.207, 404.234, -34.6, 1.01)
pt3dadd(-22.212, 404.354, -34.6, 1.046)
pt3dadd(-22.25, 404.46, -34.626, 1.054)
pt3dadd(-22.3, 404.56, -34.662, 1.054)
pt3dadd(-22.318, 404.664, -34.709, 1.034)
pt3dadd(-22.331, 404.767, -34.758, 1.008)
pt3dadd(-22.423, 404.824, -34.78, 0.994)
pt3dadd(-22.532, 404.868, -34.796, 0.982)
pt3dadd(-22.65, 404.88, -34.8, 0.98)
pt3dadd(-22.77, 404.88, -34.8, 0.98)
pt3dadd(-22.89, 404.88, -34.8, 0.972)
pt3dadd(-23.01, 404.88, -34.8, 0.964)
pt3dadd(-23.13, 404.88, -34.8, 0.956)
pt3dadd(-23.249, 404.892, -34.803, 0.962)
pt3dadd(-23.368, 404.906, -34.808, 0.972)
pt3dadd(-23.473, 404.93, -34.824, 0.986)
pt3dadd(-23.509, 404.995, -34.902, 1.026)
pt3dadd(-23.56, 405.054, -34.976, 1.078)
pt3dadd(-23.642, 405.1, -35.038, 1.148)
}
}
proc shape3d_108() {
dend_5[9] { pt3dadd(-23.729, 405.161, -35.072, 1.192)
pt3dadd(-23.822, 405.236, -35.082, 1.214)
pt3dadd(-23.914, 405.313, -35.092, 1.238)
pt3dadd(-23.991, 405.397, -35.1, 1.254)
pt3dadd(-24.011, 405.516, -35.1, 1.244)
pt3dadd(-24.032, 405.634, -35.1, 1.234)
pt3dadd(-24.084, 405.739, -35.102, 1.22)
pt3dadd(-24.156, 405.834, -35.106, 1.202)
pt3dadd(-24.228, 405.93, -35.11, 1.184)
pt3dadd(-24.331, 405.952, -35.145, 1.142)
pt3dadd(-24.44, 405.958, -35.185, 1.096)
pt3dadd(-24.548, 405.96, -35.228, 1.038)
pt3dadd(-24.654, 405.991, -35.266, 1.02)
pt3dadd(-24.76, 406.026, -35.303, 1.008)
pt3dadd(-24.866, 406.062, -35.34, 0.998)
pt3dadd(-24.972, 406.097, -35.376, 0.986)
pt3dadd(-25.072, 406.135, -35.42, 0.98)
pt3dadd(-25.161, 406.181, -35.476, 0.98)
pt3dadd(-25.26, 406.2, -35.525, 0.986)
pt3dadd(-25.368, 406.2, -35.57, 0.996)
pt3dadd(-25.477, 406.213, -35.6, 1.004)
pt3dadd(-25.59, 406.253, -35.6, 1.004)
pt3dadd(-25.703, 406.292, -35.6, 1.004)
pt3dadd(-25.803, 406.36, -35.6, 1.004)
pt3dadd(-25.902, 406.428, -35.6, 1.004)
pt3dadd(-26.007, 406.484, -35.6, 0.976)
pt3dadd(-26.102, 406.553, -35.6, 0.952)
pt3dadd(-26.171, 406.65, -35.6, 0.948)
pt3dadd(-26.24, 406.748, -35.6, 0.942)
pt3dadd(-26.309, 406.847, -35.6, 0.938)
pt3dadd(-26.378, 406.945, -35.6, 0.932)
pt3dadd(-26.444, 407.042, -35.611, 0.926)
pt3dadd(-26.503, 407.137, -35.648, 0.912)
pt3dadd(-26.555, 407.239, -35.674, 0.91)
pt3dadd(-26.6, 407.348, -35.69, 0.922)
pt3dadd(-26.635, 407.461, -35.702, 0.934)
pt3dadd(-26.657, 407.58, -35.706, 0.944)
pt3dadd(-26.678, 407.698, -35.711, 0.954)
pt3dadd(-26.778, 407.731, -35.747, 0.978)
pt3dadd(-26.885, 407.758, -35.786, 1.002)
pt3dadd(-27.002, 407.783, -35.795, 1.034)
pt3dadd(-27.101, 407.833, -35.8, 1.058)
pt3dadd(-27.164, 407.935, -35.8, 1.068)
pt3dadd(-27.226, 408.038, -35.8, 1.078)
pt3dadd(-27.289, 408.14, -35.8, 1.088)
pt3dadd(-27.352, 408.242, -35.8, 1.098)
pt3dadd(-27.409, 408.348, -35.802, 1.108)
pt3dadd(-27.447, 408.461, -35.808, 1.116)
pt3dadd(-27.485, 408.575, -35.814, 1.126)
pt3dadd(-27.522, 408.689, -35.82, 1.136)
pt3dadd(-27.56, 408.802, -35.827, 1.146)
pt3dadd(-27.598, 408.916, -35.833, 1.154)
pt3dadd(-27.676, 409.004, -35.847, 1.156)
pt3dadd(-27.755, 409.093, -35.862, 1.156)
pt3dadd(-27.835, 409.181, -35.877, 1.156)
pt3dadd(-27.914, 409.27, -35.892, 1.156)
pt3dadd(-27.998, 409.355, -35.9, 1.158)
pt3dadd(-28.087, 409.435, -35.9, 1.162)
pt3dadd(-28.176, 409.516, -35.9, 1.168)
pt3dadd(-28.264, 409.596, -35.9, 1.172)
pt3dadd(-28.353, 409.676, -35.9, 1.178)
pt3dadd(-28.42, 409.771, -35.89, 1.18)
pt3dadd(-28.462, 409.88, -35.869, 1.18)
pt3dadd(-28.504, 409.99, -35.848, 1.18)
pt3dadd(-28.546, 410.1, -35.827, 1.18)
pt3dadd(-28.588, 410.209, -35.806, 1.18)
pt3dadd(-28.647, 410.312, -35.8, 1.188)
pt3dadd(-28.713, 410.412, -35.8, 1.198)
pt3dadd(-28.779, 410.513, -35.8, 1.208)
pt3dadd(-28.845, 410.612, -35.8, 1.218)
pt3dadd(-28.911, 410.713, -35.8, 1.226)
pt3dadd(-29.003, 410.784, -35.8, 1.23)
pt3dadd(-29.109, 410.84, -35.8, 1.23)
pt3dadd(-29.215, 410.898, -35.8, 1.23)
pt3dadd(-29.321, 410.954, -35.8, 1.23)
pt3dadd(-29.427, 411.011, -35.8, 1.23)
pt3dadd(-29.537, 411.056, -35.8, 1.216)
pt3dadd(-29.652, 411.089, -35.8, 1.184)
pt3dadd(-29.768, 411.122, -35.8, 1.15)
pt3dadd(-29.883, 411.155, -35.8, 1.078)
pt3dadd(-29.998, 411.188, -35.8, 1.006)
pt3dadd(-30.112, 411.226, -35.8, 0.932)
pt3dadd(-30.226, 411.265, -35.8, 0.856)
pt3dadd(-30.318, 411.325, -35.8, 0.792)
pt3dadd(-30.357, 411.438, -35.8, 0.748)
pt3dadd(-30.397, 411.552, -35.8, 0.706)
pt3dadd(-30.478, 411.638, -35.8, 0.686)
pt3dadd(-30.56, 411.725, -35.808, 0.678)
pt3dadd(-30.639, 411.814, -35.822, 0.678)
pt3dadd(-30.719, 411.901, -35.837, 0.678)
pt3dadd(-30.798, 411.99, -35.852, 0.678)
pt3dadd(-30.878, 412.078, -35.866, 0.678)
pt3dadd(-30.939, 412.18, -35.883, 0.678)
pt3dadd(-31, 412.28, -35.9, 0.678)
pt3dadd(-31.04, 412.394, -35.9, 0.668)
pt3dadd(-31.079, 412.507, -35.9, 0.656)
pt3dadd(-31.156, 412.591, -35.911, 0.644)
pt3dadd(-31.252, 412.66, -35.928, 0.632)
pt3dadd(-31.351, 412.716, -35.959, 0.618)
pt3dadd(-31.451, 412.766, -35.994, 0.604)
pt3dadd(-31.529, 412.832, -36.046, 0.61)
pt3dadd(-31.603, 412.901, -36.099, 0.618)
pt3dadd(-31.677, 412.97, -36.153, 0.628)
pt3dadd(-31.697, 413.084, -36.174, 0.638)
pt3dadd(-31.714, 413.201, -36.194, 0.65)
pt3dadd(-31.761, 413.306, -36.211, 0.704)
pt3dadd(-31.804, 413.402, -36.26, 0.704)
pt3dadd(-31.857, 413.489, -36.309, 0.7)
pt3dadd(-31.952, 413.532, -36.358, 0.686)
pt3dadd(-32.049, 413.575, -36.404, 0.664)
pt3dadd(-32.149, 413.618, -36.446, 0.624)
pt3dadd(-32.258, 413.648, -36.474, 0.592)
pt3dadd(-32.376, 413.665, -36.488, 0.572)
pt3dadd(-32.489, 413.689, -36.5, 0.552)
pt3dadd(-32.568, 413.78, -36.5, 0.552)
pt3dadd(-32.647, 413.87, -36.5, 0.552)
pt3dadd(-32.726, 413.96, -36.5, 0.552)
pt3dadd(-32.799, 414.056, -36.5, 0.566)
pt3dadd(-32.866, 414.155, -36.5, 0.588)
pt3dadd(-32.937, 414.252, -36.5, 0.66)
pt3dadd(-32.976, 414.361, -36.51, 0.734)
pt3dadd(-32.999, 414.478, -36.525, 0.778)
pt3dadd(-33.046, 414.577, -36.548, 0.826)
pt3dadd(-33.129, 414.652, -36.586, 0.882)
pt3dadd(-33.234, 414.69, -36.603, 0.916)
pt3dadd(-33.353, 414.706, -36.607, 0.936)
pt3dadd(-33.471, 414.72, -36.612, 0.954)
pt3dadd(-33.584, 414.72, -36.646, 0.954)
pt3dadd(-33.698, 414.72, -36.679, 0.954)
pt3dadd(-33.812, 414.72, -36.708, 0.922)
pt3dadd(-33.927, 414.72, -36.736, 0.876)
pt3dadd(-34.033, 414.726, -36.783, 0.828)
pt3dadd(-34.139, 414.733, -36.83, 0.782)
pt3dadd(-34.218, 414.79, -36.886, 0.738)
pt3dadd(-34.288, 414.851, -36.948, 0.7)
pt3dadd(-34.332, 414.91, -37.027, 0.686)
pt3dadd(-34.376, 414.968, -37.107, 0.678)
pt3dadd(-34.42, 415.027, -37.186, 0.678)
pt3dadd(-34.446, 415.112, -37.244, 0.674)
pt3dadd(-34.457, 415.222, -37.285, 0.668)
pt3dadd(-34.468, 415.331, -37.326, 0.66)
pt3dadd(-34.479, 415.44, -37.367, 0.652)
pt3dadd(-34.563, 415.523, -37.384, 0.652)
pt3dadd(-34.643, 415.608, -37.399, 0.656)
pt3dadd(-34.695, 415.712, -37.396, 0.686)
pt3dadd(-34.772, 415.801, -37.417, 0.71)
pt3dadd(-34.848, 415.89, -37.437, 0.732)
pt3dadd(-34.927, 415.976, -37.456, 0.754)
pt3dadd(-35.032, 416.035, -37.465, 0.764)
pt3dadd(-35.136, 416.093, -37.475, 0.774)
pt3dadd(-35.241, 416.15, -37.484, 0.786)
pt3dadd(-35.345, 416.209, -37.493, 0.796)
pt3dadd(-35.443, 416.275, -37.5, 0.806)
pt3dadd(-35.515, 416.371, -37.5, 0.816)
pt3dadd(-35.587, 416.467, -37.5, 0.826)
pt3dadd(-35.659, 416.563, -37.5, 0.836)
pt3dadd(-35.731, 416.659, -37.5, 0.846)
pt3dadd(-35.795, 416.759, -37.5, 0.862)
pt3dadd(-35.835, 416.873, -37.5, 0.892)
pt3dadd(-35.875, 416.986, -37.5, 0.926)
pt3dadd(-35.88, 417.104, -37.5, 0.952)
pt3dadd(-35.88, 417.224, -37.5, 0.976)
pt3dadd(-35.88, 417.344, -37.5, 1.002)
pt3dadd(-35.898, 417.463, -37.5, 1.004)
pt3dadd(-35.918, 417.581, -37.5, 1.004)
pt3dadd(-35.962, 417.677, -37.509, 0.994)
pt3dadd(-36.07, 417.709, -37.543, 0.956)
pt3dadd(-36.175, 417.752, -37.575, 0.906)
pt3dadd(-36.27, 417.818, -37.601, 0.828)
pt3dadd(-36.339, 417.912, -37.624, 0.828)
pt3dadd(-36.409, 418.006, -37.646, 0.828)
pt3dadd(-36.479, 418.099, -37.669, 0.828)
pt3dadd(-36.549, 418.193, -37.692, 0.828)
pt3dadd(-36.602, 418.298, -37.7, 0.834)
pt3dadd(-36.647, 418.41, -37.7, 0.844)
pt3dadd(-36.691, 418.52, -37.7, 0.854)
pt3dadd(-36.736, 418.632, -37.7, 0.862)
pt3dadd(-36.78, 418.744, -37.7, 0.872)
pt3dadd(-36.827, 418.854, -37.702, 0.884)
pt3dadd(-36.877, 418.963, -37.708, 0.904)
pt3dadd(-36.927, 419.071, -37.715, 0.924)
pt3dadd(-36.977, 419.18, -37.722, 0.944)
pt3dadd(-37.028, 419.29, -37.728, 0.964)
pt3dadd(-37.087, 419.39, -37.737, 0.978)
pt3dadd(-37.178, 419.467, -37.751, 0.972)
pt3dadd(-37.269, 419.543, -37.766, 0.968)
pt3dadd(-37.36, 419.62, -37.781, 0.962)
pt3dadd(-37.451, 419.696, -37.795, 0.956)
pt3dadd(-37.56, 419.735, -37.8, 0.922)
pt3dadd(-37.678, 419.754, -37.8, 0.874)
pt3dadd(-37.795, 419.779, -37.8, 0.822)
pt3dadd(-37.894, 419.846, -37.8, 0.74)
pt3dadd(-37.993, 419.915, -37.8, 0.66)
pt3dadd(-38.016, 420.029, -37.813, 0.624)
pt3dadd(-38.032, 420.146, -37.827, 0.592)
pt3dadd(-38.067, 420.254, -37.853, 0.584)
pt3dadd(-38.117, 420.354, -37.889, 0.598)
pt3dadd(-38.185, 420.45, -37.9, 0.638)
pt3dadd(-38.242, 420.55, -37.903, 0.682)
pt3dadd(-38.249, 420.67, -37.914, 0.694)
}
}
proc shape3d_109() {
dend_5[9] { pt3dadd(-38.255, 420.788, -37.925, 0.706)
pt3dadd(-38.262, 420.907, -37.936, 0.718)
pt3dadd(-38.268, 421.026, -37.947, 0.73)
pt3dadd(-38.275, 421.146, -37.958, 0.744)
pt3dadd(-38.286, 421.264, -37.968, 0.754)
pt3dadd(-38.315, 421.38, -37.974, 0.758)
pt3dadd(-38.344, 421.496, -37.98, 0.764)
pt3dadd(-38.373, 421.613, -37.986, 0.768)
pt3dadd(-38.402, 421.729, -37.992, 0.772)
pt3dadd(-38.431, 421.846, -37.998, 0.776)
pt3dadd(-38.469, 421.957, -38.015, 0.77)
pt3dadd(-38.511, 422.066, -38.036, 0.76)
pt3dadd(-38.553, 422.176, -38.057, 0.75)
pt3dadd(-38.596, 422.285, -38.078, 0.74)
pt3dadd(-38.638, 422.394, -38.099, 0.728)
pt3dadd(-38.656, 422.501, -38.142, 0.704)
pt3dadd(-38.673, 422.608, -38.186, 0.676)
pt3dadd(-38.69, 422.713, -38.231, 0.65)
pt3dadd(-38.707, 422.82, -38.275, 0.624)
pt3dadd(-38.728, 422.917, -38.326, 0.596)
pt3dadd(-38.772, 422.976, -38.405, 0.554)
pt3dadd(-38.823, 423.049, -38.464, 0.536)
pt3dadd(-38.885, 423.148, -38.487, 0.564)
pt3dadd(-38.965, 423.232, -38.5, 0.614)
pt3dadd(-39.064, 423.299, -38.5, 0.696)
pt3dadd(-39.169, 423.348, -38.5, 0.768)
pt3dadd(-39.289, 423.353, -38.5, 0.822)
pt3dadd(-39.409, 423.358, -38.5, 0.874)
pt3dadd(-39.529, 423.36, -38.5, 0.91)
pt3dadd(-39.649, 423.36, -38.5, 0.922)
pt3dadd(-39.767, 423.374, -38.502, 0.912)
pt3dadd(-39.882, 423.409, -38.507, 0.868)
pt3dadd(-39.993, 423.446, -38.515, 0.824)
pt3dadd(-40.069, 423.523, -38.559, 0.766)
pt3dadd(-40.146, 423.604, -38.591, 0.72)
pt3dadd(-40.224, 423.695, -38.596, 0.696)
pt3dadd(-40.296, 423.79, -38.6, 0.682)
pt3dadd(-40.349, 423.898, -38.6, 0.692)
pt3dadd(-40.403, 424.004, -38.6, 0.704)
pt3dadd(-40.456, 424.112, -38.6, 0.738)
pt3dadd(-40.498, 424.224, -38.6, 0.758)
pt3dadd(-40.531, 424.339, -38.6, 0.77)
pt3dadd(-40.565, 424.454, -38.6, 0.776)
pt3dadd(-40.605, 424.567, -38.6, 0.754)
pt3dadd(-40.645, 424.681, -38.6, 0.732)
pt3dadd(-40.736, 424.747, -38.587, 0.67)
pt3dadd(-40.842, 424.8, -38.571, 0.596)
pt3dadd(-40.925, 424.86, -38.523, 0.512)
pt3dadd(-41.002, 424.921, -38.466, 0.424)
pt3dadd(-41.07, 425.002, -38.418, 0.316)
pt3dadd(-41.124, 425.095, -38.374, 0.278)
pt3dadd(-41.177, 425.189, -38.333, 0.25)
pt3dadd(-41.274, 425.258, -38.315, 0.238)
pt3dadd(-41.372, 425.323, -38.3, 0.228)
pt3dadd(-41.487, 425.356, -38.3, 0.238)
pt3dadd(-41.602, 425.389, -38.3, 0.248)
pt3dadd(-41.721, 425.4, -38.297, 0.262)
pt3dadd(-41.841, 425.4, -38.294, 0.28)
pt3dadd(-41.961, 425.4, -38.29, 0.298)
pt3dadd(-42.034, 425.4, -38.222, 0.328)
pt3dadd(-42.095, 425.4, -38.135, 0.362)
pt3dadd(-42.12, 425.4, -38.041, 0.406)
pt3dadd(-42.12, 425.4, -37.941, 0.442)
pt3dadd(-42.12, 425.4, -37.841, 0.452)
pt3dadd(-42.12, 425.4, -37.741, 0.452)
pt3dadd(-42.12, 425.4, -37.641, 0.438)
pt3dadd(-42.12, 425.4, -37.541, 0.398)
pt3dadd(-42.14, 425.4, -37.443, 0.358)
pt3dadd(-42.173, 425.4, -37.347, 0.328)
pt3dadd(-42.203, 425.4, -37.25, 0.302)
pt3dadd(-42.218, 425.4, -37.151, 0.302)
pt3dadd(-42.232, 425.4, -37.052, 0.302)
pt3dadd(-42.267, 425.402, -36.958, 0.318)
pt3dadd(-42.323, 425.41, -36.87, 0.354)
pt3dadd(-42.39, 425.434, -36.796, 0.41)
pt3dadd(-42.48, 425.494, -36.753, 0.508)
pt3dadd(-42.555, 425.574, -36.72, 0.58)
pt3dadd(-42.618, 425.671, -36.695, 0.626)
pt3dadd(-42.682, 425.77, -36.67, 0.674)
pt3dadd(-42.72, 425.855, -36.622, 0.722)
pt3dadd(-42.72, 425.922, -36.54, 0.768)
pt3dadd(-42.72, 425.996, -36.462, 0.804)
pt3dadd(-42.723, 426.097, -36.408, 0.798)
pt3dadd(-42.729, 426.203, -36.361, 0.786)
pt3dadd(-42.751, 426.31, -36.327, 0.778)
pt3dadd(-42.796, 426.42, -36.311, 0.778)
pt3dadd(-42.835, 426.532, -36.3, 0.782)
pt3dadd(-42.862, 426.648, -36.3, 0.792)
pt3dadd(-42.888, 426.766, -36.3, 0.802)
pt3dadd(-42.971, 426.834, -36.33, 0.792)
pt3dadd(-43.066, 426.893, -36.366, 0.778)
pt3dadd(-43.084, 427.008, -36.389, 0.728)
pt3dadd(-43.141, 427.097, -36.414, 0.692)
pt3dadd(-43.239, 427.158, -36.442, 0.668)
pt3dadd(-43.337, 427.218, -36.47, 0.646)
pt3dadd(-43.434, 427.279, -36.498, 0.622)
pt3dadd(-43.528, 427.344, -36.527, 0.602)
pt3dadd(-43.595, 427.43, -36.569, 0.596)
pt3dadd(-43.661, 427.517, -36.61, 0.59)
pt3dadd(-43.728, 427.603, -36.652, 0.584)
pt3dadd(-43.795, 427.691, -36.688, 0.578)
pt3dadd(-43.869, 427.784, -36.682, 0.578)
pt3dadd(-43.944, 427.878, -36.675, 0.578)
pt3dadd(-44.018, 427.973, -36.669, 0.578)
pt3dadd(-44.097, 428.062, -36.673, 0.586)
pt3dadd(-44.178, 428.149, -36.682, 0.6)
pt3dadd(-44.259, 428.238, -36.69, 0.614)
pt3dadd(-44.34, 428.326, -36.699, 0.626)
pt3dadd(-44.446, 428.38, -36.702, 0.636)
pt3dadd(-44.554, 428.432, -36.704, 0.646)
pt3dadd(-44.663, 428.484, -36.706, 0.656)
pt3dadd(-44.771, 428.536, -36.708, 0.666)
pt3dadd(-44.879, 428.587, -36.711, 0.676)
pt3dadd(-44.964, 428.66, -36.739, 0.696)
pt3dadd(-45.041, 428.741, -36.777, 0.72)
pt3dadd(-45.119, 428.82, -36.814, 0.744)
pt3dadd(-45.196, 428.9, -36.852, 0.768)
pt3dadd(-45.257, 428.998, -36.871, 0.794)
pt3dadd(-45.307, 429.107, -36.877, 0.818)
pt3dadd(-45.357, 429.215, -36.884, 0.844)
pt3dadd(-45.408, 429.324, -36.89, 0.868)
pt3dadd(-45.458, 429.432, -36.897, 0.894)
pt3dadd(-45.507, 429.542, -36.9, 0.922)
pt3dadd(-45.554, 429.652, -36.9, 0.956)
pt3dadd(-45.602, 429.762, -36.9, 0.988)
pt3dadd(-45.649, 429.872, -36.9, 1.022)
pt3dadd(-45.697, 429.983, -36.9, 1.054)
pt3dadd(-45.755, 430.085, -36.905, 1.088)
pt3dadd(-45.845, 430.16, -36.925, 1.122)
pt3dadd(-45.935, 430.235, -36.945, 1.156)
pt3dadd(-46.025, 430.31, -36.965, 1.19)
pt3dadd(-46.116, 430.386, -36.985, 1.224)
pt3dadd(-46.193, 430.472, -37.01, 1.25)
pt3dadd(-46.267, 430.562, -37.035, 1.272)
pt3dadd(-46.341, 430.651, -37.061, 1.296)
pt3dadd(-46.415, 430.74, -37.087, 1.318)
pt3dadd(-46.486, 430.835, -37.1, 1.32)
pt3dadd(-46.554, 430.933, -37.1, 1.296)
pt3dadd(-46.632, 431.02, -37.105, 1.256)
pt3dadd(-46.734, 431.081, -37.122, 1.18)
pt3dadd(-46.827, 431.13, -37.158, 1.092)
pt3dadd(-46.906, 431.159, -37.23, 0.984)
pt3dadd(-46.987, 431.2, -37.294, 0.894)
pt3dadd(-47.07, 431.252, -37.351, 0.824)
pt3dadd(-47.177, 431.28, -37.383, 0.78)
pt3dadd(-47.287, 431.306, -37.41, 0.754)
pt3dadd(-47.377, 431.368, -37.452, 0.76)
pt3dadd(-47.466, 431.429, -37.495, 0.766)
pt3dadd(-47.556, 431.49, -37.538, 0.772)
pt3dadd(-47.64, 431.55, -37.583, 0.78)
pt3dadd(-47.647, 431.614, -37.668, 0.804)
pt3dadd(-47.653, 431.677, -37.753, 0.828)
pt3dadd(-47.748, 431.741, -37.778, 0.88)
pt3dadd(-47.846, 431.804, -37.8, 0.932)
pt3dadd(-47.94, 431.88, -37.8, 0.966)
pt3dadd(-48.033, 431.954, -37.8, 1.002)
pt3dadd(-48.149, 431.98, -37.8, 1.004)
pt3dadd(-48.268, 432, -37.8, 1.004)
pt3dadd(-48.36, 432.048, -37.81, 0.996)
pt3dadd(-48.401, 432.155, -37.841, 0.974)
pt3dadd(-48.442, 432.262, -37.872, 0.95)
pt3dadd(-48.485, 432.365, -37.905, 0.926)
pt3dadd(-48.555, 432.434, -37.962, 0.882)
pt3dadd(-48.639, 432.494, -38, 0.854)
pt3dadd(-48.751, 432.538, -38, 0.854)
pt3dadd(-48.863, 432.581, -38, 0.854)
pt3dadd(-48.972, 432.625, -38.009, 0.858)
pt3dadd(-49.072, 432.676, -38.045, 0.87)
pt3dadd(-49.177, 432.714, -38.079, 0.878)
pt3dadd(-49.294, 432.72, -38.097, 0.842)
pt3dadd(-49.413, 432.72, -38.1, 0.75)
pt3dadd(-49.533, 432.732, -38.1, 0.64)
pt3dadd(-49.648, 432.763, -38.1, 0.55)
pt3dadd(-49.755, 432.818, -38.1, 0.528)
pt3dadd(-49.859, 432.875, -38.11, 0.528)
pt3dadd(-49.914, 432.941, -38.174, 0.528)
pt3dadd(-49.935, 433.002, -38.258, 0.502)
pt3dadd(-49.989, 433.06, -38.332, 0.502)
pt3dadd(-50.031, 433.08, -38.423, 0.52)
pt3dadd(-50.07, 433.104, -38.509, 0.464)
pt3dadd(-50.123, 433.18, -38.572, 0.42)
pt3dadd(-50.185, 433.268, -38.6, 0.396)
pt3dadd(-50.253, 433.368, -38.6, 0.384)
pt3dadd(-50.339, 433.44, -38.6, 0.414)
pt3dadd(-50.443, 433.495, -38.6, 0.472)
pt3dadd(-50.539, 433.567, -38.6, 0.508)
pt3dadd(-50.635, 433.639, -38.6, 0.544)
pt3dadd(-50.731, 433.711, -38.6, 0.578)
pt3dadd(-50.827, 433.783, -38.6, 0.614)
pt3dadd(-50.903, 433.874, -38.6, 0.662)
pt3dadd(-50.963, 433.978, -38.6, 0.718)
pt3dadd(-51.027, 434.078, -38.607, 0.768)
pt3dadd(-51.096, 434.174, -38.624, 0.808)
pt3dadd(-51.171, 434.261, -38.65, 0.822)
pt3dadd(-51.253, 434.336, -38.688, 0.808)
pt3dadd(-51.36, 434.374, -38.7, 0.798)
pt3dadd(-51.478, 434.394, -38.7, 0.788)
pt3dadd(-51.593, 434.42, -38.702, 0.778)
pt3dadd(-51.669, 434.509, -38.723, 0.778)
pt3dadd(-51.746, 434.598, -38.744, 0.778)
}
}
proc shape3d_110() {
dend_5[9] { pt3dadd(-51.822, 434.687, -38.765, 0.778)
pt3dadd(-51.849, 434.801, -38.785, 0.81)
pt3dadd(-51.873, 434.916, -38.806, 0.844)
pt3dadd(-51.929, 435.012, -38.835, 0.956)
pt3dadd(-51.995, 435.11, -38.85, 0.978)
pt3dadd(-52.062, 435.209, -38.864, 1)
pt3dadd(-52.128, 435.307, -38.879, 1.022)
pt3dadd(-52.194, 435.407, -38.893, 1.044)
pt3dadd(-52.25, 435.51, -38.911, 1.058)
pt3dadd(-52.296, 435.618, -38.932, 1.062)
pt3dadd(-52.341, 435.726, -38.954, 1.068)
pt3dadd(-52.387, 435.834, -38.975, 1.074)
pt3dadd(-52.432, 435.942, -38.996, 1.078)
pt3dadd(-52.44, 436.06, -39, 1.08)
pt3dadd(-52.44, 436.18, -39, 1.08)
pt3dadd(-52.44, 436.3, -39, 1.08)
pt3dadd(-52.44, 436.418, -39.014, 1.072)
pt3dadd(-52.44, 436.536, -39.031, 1.062)
pt3dadd(-52.441, 436.637, -39.066, 1.06)
pt3dadd(-52.447, 436.678, -39.16, 1.082)
pt3dadd(-52.453, 436.718, -39.254, 1.104)
pt3dadd(-52.512, 436.808, -39.298, 1.132)
pt3dadd(-52.577, 436.895, -39.337, 1.156)
pt3dadd(-52.666, 436.972, -39.359, 1.156)
pt3dadd(-52.755, 437.048, -39.38, 1.156)
pt3dadd(-52.846, 437.122, -39.4, 1.152)
pt3dadd(-52.964, 437.142, -39.4, 1.104)
pt3dadd(-53.082, 437.162, -39.4, 1.056)
pt3dadd(-53.192, 437.2, -39.412, 0.998)
pt3dadd(-53.293, 437.257, -39.438, 0.928)
pt3dadd(-53.393, 437.316, -39.465, 0.858)
pt3dadd(-53.449, 437.418, -39.482, 0.808)
pt3dadd(-53.502, 437.524, -39.498, 0.758)
pt3dadd(-53.52, 437.641, -39.5, 0.754)
pt3dadd(-53.539, 437.754, -39.532, 0.778)
pt3dadd(-53.557, 437.867, -39.563, 0.8)
pt3dadd(-53.599, 437.976, -39.581, 0.804)
pt3dadd(-53.645, 438.086, -39.597, 0.804)
pt3dadd(-53.708, 438.187, -39.6, 0.794)
pt3dadd(-53.776, 438.286, -39.6, 0.782)
pt3dadd(-53.869, 438.355, -39.6, 0.772)
pt3dadd(-53.977, 438.409, -39.6, 0.76)
pt3dadd(-54.087, 438.454, -39.6, 0.746)
pt3dadd(-54.203, 438.486, -39.6, 0.732)
pt3dadd(-54.311, 438.535, -39.587, 0.708)
pt3dadd(-54.417, 438.588, -39.57, 0.684)
pt3dadd(-54.496, 438.668, -39.541, 0.654)
pt3dadd(-54.567, 438.755, -39.516, 0.626)
pt3dadd(-54.637, 438.83, -39.567, 0.612)
pt3dadd(-54.696, 438.914, -39.618, 0.602)
pt3dadd(-54.74, 439.009, -39.667, 0.602)
pt3dadd(-54.798, 439.102, -39.707, 0.602)
pt3dadd(-54.869, 439.189, -39.74, 0.602)
pt3dadd(-54.939, 439.278, -39.773, 0.602)
pt3dadd(-55.036, 439.32, -39.791, 0.602)
pt3dadd(-55.156, 439.32, -39.795, 0.602)
pt3dadd(-55.276, 439.32, -39.799, 0.602)
pt3dadd(-55.392, 439.322, -39.821, 0.598)
pt3dadd(-55.505, 439.327, -39.853, 0.59)
pt3dadd(-55.618, 439.331, -39.886, 0.582)
pt3dadd(-55.674, 439.393, -39.928, 0.57)
pt3dadd(-55.687, 439.496, -39.977, 0.558)
pt3dadd(-55.71, 439.607, -40, 0.552)
pt3dadd(-55.758, 439.716, -40, 0.568)
pt3dadd(-55.811, 439.824, -40, 0.59)
pt3dadd(-55.878, 439.921, -40, 0.614)
pt3dadd(-55.96, 440.01, -40, 0.638)
pt3dadd(-56.051, 440.083, -40.008, 0.652)
pt3dadd(-56.158, 440.13, -40.03, 0.652)
pt3dadd(-56.253, 440.17, -40.072, 0.648)
pt3dadd(-56.324, 440.198, -40.149, 0.634)
pt3dadd(-56.393, 440.258, -40.176, 0.624)
pt3dadd(-56.46, 440.353, -40.15, 0.616)
pt3dadd(-56.527, 440.447, -40.124, 0.606)
pt3dadd(-56.584, 440.549, -40.117, 0.61)
pt3dadd(-56.632, 440.658, -40.128, 0.622)
pt3dadd(-56.678, 440.756, -40.164, 0.674)
pt3dadd(-56.743, 440.856, -40.173, 0.692)
pt3dadd(-56.81, 440.954, -40.18, 0.708)
pt3dadd(-56.876, 441.054, -40.187, 0.724)
pt3dadd(-56.943, 441.154, -40.194, 0.74)
pt3dadd(-57.002, 441.256, -40.202, 0.756)
pt3dadd(-57.017, 441.373, -40.221, 0.774)
pt3dadd(-57.031, 441.491, -40.239, 0.792)
pt3dadd(-57.046, 441.607, -40.257, 0.812)
pt3dadd(-57.061, 441.725, -40.276, 0.83)
pt3dadd(-57.076, 441.841, -40.294, 0.848)
pt3dadd(-57.11, 441.955, -40.3, 0.864)
pt3dadd(-57.155, 442.066, -40.3, 0.878)
pt3dadd(-57.2, 442.177, -40.3, 0.892)
pt3dadd(-57.244, 442.289, -40.3, 0.906)
pt3dadd(-57.289, 442.4, -40.3, 0.92)
pt3dadd(-57.328, 442.512, -40.309, 0.936)
pt3dadd(-57.354, 442.622, -40.342, 0.96)
pt3dadd(-57.391, 442.728, -40.371, 0.98)
pt3dadd(-57.467, 442.818, -40.388, 0.98)
pt3dadd(-57.555, 442.886, -40.41, 0.986)
pt3dadd(-57.667, 442.904, -40.441, 1.01)
pt3dadd(-57.776, 442.92, -40.478, 1.04)
pt3dadd(-57.87, 442.92, -40.54, 1.098)
pt3dadd(-57.963, 442.922, -40.602, 1.158)
pt3dadd(-58.032, 442.992, -40.66, 1.246)
pt3dadd(-58.096, 443.074, -40.7, 1.348)
pt3dadd(-58.151, 443.18, -40.7, 1.406)
pt3dadd(-58.187, 443.294, -40.7, 1.38)
pt3dadd(-58.22, 443.41, -40.7, 1.306)
pt3dadd(-58.261, 443.522, -40.7, 1.126)
pt3dadd(-58.299, 443.635, -40.696, 0.998)
pt3dadd(-58.328, 443.75, -40.69, 0.948)
pt3dadd(-58.357, 443.867, -40.684, 0.896)
pt3dadd(-58.386, 443.983, -40.678, 0.846)
pt3dadd(-58.415, 444.1, -40.672, 0.796)
pt3dadd(-58.443, 444.216, -40.666, 0.746)
pt3dadd(-58.467, 444.334, -40.659, 0.698)
pt3dadd(-58.49, 444.451, -40.653, 0.648)
pt3dadd(-58.514, 444.569, -40.646, 0.6)
pt3dadd(-58.537, 444.685, -40.64, 0.55)
pt3dadd(-58.561, 444.803, -40.634, 0.502)
pt3dadd(-58.601, 444.914, -40.647, 0.466)
pt3dadd(-58.641, 445.027, -40.66, 0.43)
pt3dadd(-58.681, 445.139, -40.674, 0.396)
pt3dadd(-58.721, 445.25, -40.687, 0.36)
pt3dadd(-58.761, 445.363, -40.7, 0.326)
pt3dadd(-58.776, 445.482, -40.7, 0.298)
pt3dadd(-58.79, 445.601, -40.7, 0.27)
pt3dadd(-58.802, 445.721, -40.7, 0.248)
pt3dadd(-58.806, 445.841, -40.7, 0.24)
pt3dadd(-58.811, 445.961, -40.7, 0.23)
pt3dadd(-58.843, 446.071, -40.7, 0.226)
pt3dadd(-58.911, 446.17, -40.7, 0.226)
pt3dadd(-58.987, 446.262, -40.7, 0.226)
pt3dadd(-59.081, 446.336, -40.7, 0.226)
pt3dadd(-59.174, 446.412, -40.7, 0.226)
pt3dadd(-59.268, 446.486, -40.7, 0.226)
pt3dadd(-59.332, 446.585, -40.7, 0.226)
pt3dadd(-59.386, 446.693, -40.7, 0.226)
pt3dadd(-59.439, 446.8, -40.7, 0.226)
pt3dadd(-59.493, 446.908, -40.7, 0.226)
pt3dadd(-59.547, 447.014, -40.7, 0.226)
pt3dadd(-59.622, 447.104, -40.7, 0.226)
pt3dadd(-59.718, 447.176, -40.7, 0.226)
pt3dadd(-59.814, 447.248, -40.7, 0.226)
pt3dadd(-59.91, 447.32, -40.7, 0.226)
pt3dadd(-60.006, 447.392, -40.7, 0.226)
pt3dadd(-60.093, 447.474, -40.7, 0.226)
pt3dadd(-60.171, 447.565, -40.7, 0.226)
pt3dadd(-60.249, 447.656, -40.7, 0.226)
pt3dadd(-60.327, 447.748, -40.7, 0.226)
pt3dadd(-60.405, 447.839, -40.7, 0.226)
pt3dadd(-60.481, 447.931, -40.7, 0.226)
pt3dadd(-60.556, 448.025, -40.7, 0.226)
pt3dadd(-60.631, 448.118, -40.7, 0.226)
pt3dadd(-60.706, 448.212, -40.7, 0.226)
pt3dadd(-60.781, 448.306, -40.7, 0.226)
pt3dadd(-60.858, 448.398, -40.7, 0.226)
pt3dadd(-60.936, 448.489, -40.7, 0.226)
pt3dadd(-61.013, 448.58, -40.7, 0.226)
pt3dadd(-61.091, 448.673, -40.7, 0.226)
pt3dadd(-61.169, 448.764, -40.7, 0.226)
pt3dadd(-61.244, 448.858, -40.696, 0.23)
pt3dadd(-61.316, 448.952, -40.689, 0.234)
pt3dadd(-61.389, 449.047, -40.682, 0.24)
pt3dadd(-61.462, 449.142, -40.675, 0.244)
pt3dadd(-61.535, 449.238, -40.668, 0.25)
pt3dadd(-61.606, 449.334, -40.667, 0.262)
pt3dadd(-61.676, 449.431, -40.667, 0.276)
pt3dadd(-61.747, 449.528, -40.667, 0.29)
pt3dadd(-61.82, 449.621, -40.658, 0.31)
pt3dadd(-61.9, 449.701, -40.625, 0.344)
pt3dadd(-61.98, 449.78, -40.592, 0.376)
pt3dadd(-62.055, 449.867, -40.563, 0.408)
pt3dadd(-62.115, 449.969, -40.549, 0.428)
pt3dadd(-62.175, 450.072, -40.535, 0.45)
pt3dadd(-62.235, 450.174, -40.52, 0.472)
pt3dadd(-62.294, 450.277, -40.506, 0.494)
pt3dadd(-62.333, 450.386, -40.511, 0.514)
pt3dadd(-62.356, 450.503, -40.53, 0.532)
pt3dadd(-62.379, 450.618, -40.55, 0.552)
pt3dadd(-62.402, 450.733, -40.569, 0.572)
pt3dadd(-62.425, 450.848, -40.588, 0.59)
pt3dadd(-62.466, 450.956, -40.609, 0.606)
pt3dadd(-62.536, 451.05, -40.631, 0.61)
pt3dadd(-62.606, 451.144, -40.654, 0.616)
pt3dadd(-62.675, 451.237, -40.677, 0.622)
pt3dadd(-62.745, 451.331, -40.7, 0.628)
pt3dadd(-62.787, 451.444, -40.705, 0.606)
pt3dadd(-62.829, 451.555, -40.71, 0.584)
pt3dadd(-62.871, 451.66, -40.741, 0.548)
pt3dadd(-62.914, 451.759, -40.783, 0.508)
pt3dadd(-62.949, 451.872, -40.793, 0.502)
pt3dadd(-62.984, 451.987, -40.798, 0.502)
pt3dadd(-63, 452.104, -40.791, 0.518)
pt3dadd(-63, 452.222, -40.774, 0.546)
pt3dadd(-63, 452.34, -40.757, 0.576)
pt3dadd(-63.028, 452.411, -40.682, 0.586)
pt3dadd(-63.058, 452.479, -40.603, 0.594)
pt3dadd(-63.088, 452.548, -40.525, 0.602)
pt3dadd(-63.177, 452.611, -40.507, 0.564)
pt3dadd(-63.279, 452.675, -40.502, 0.516)
pt3dadd(-63.351, 452.766, -40.486, 0.348)
}
}
proc shape3d_111() {
dend_5[9] { pt3dadd(-63.411, 452.855, -40.442, 0.292)
pt3dadd(-63.486, 452.932, -40.41, 0.248)
pt3dadd(-63.598, 452.972, -40.405, 0.236)
pt3dadd(-63.71, 453.016, -40.4, 0.226)
pt3dadd(-63.809, 453.083, -40.4, 0.25)
pt3dadd(-63.908, 453.151, -40.4, 0.274)
pt3dadd(-63.935, 453.263, -40.388, 0.322)
pt3dadd(-63.951, 453.38, -40.374, 0.374)
pt3dadd(-63.981, 453.466, -40.326, 0.438)
pt3dadd(-64.024, 453.517, -40.244, 0.51)
pt3dadd(-64.067, 453.569, -40.161, 0.584)
pt3dadd(-64.126, 453.618, -40.086, 0.672)
pt3dadd(-64.208, 453.664, -40.024, 0.786)
pt3dadd(-64.306, 453.714, -40, 0.85)
pt3dadd(-64.413, 453.767, -40, 0.884)
pt3dadd(-64.521, 453.821, -40, 0.916)
pt3dadd(-64.594, 453.908, -40, 0.914)
pt3dadd(-64.648, 454.015, -40, 0.892)
pt3dadd(-64.703, 454.122, -39.997, 0.85)
pt3dadd(-64.761, 454.226, -39.989, 0.778)
pt3dadd(-64.794, 454.295, -39.918, 0.688)
pt3dadd(-64.8, 454.316, -39.82, 0.678)
pt3dadd(-64.8, 454.32, -39.72, 0.678)
pt3dadd(-64.8, 454.32, -39.62, 0.658)
pt3dadd(-64.8, 454.308, -39.521, 0.586)
pt3dadd(-64.821, 454.29, -39.424, 0.556)
pt3dadd(-64.844, 454.272, -39.327, 0.532)
pt3dadd(-64.867, 454.254, -39.23, 0.508)
pt3dadd(-64.891, 454.236, -39.133, 0.482)
pt3dadd(-64.914, 454.218, -39.036, 0.458)
pt3dadd(-64.92, 454.213, -38.937, 0.438)
pt3dadd(-64.92, 454.213, -38.837, 0.418)
pt3dadd(-64.92, 454.213, -38.737, 0.4)
pt3dadd(-64.92, 454.213, -38.637, 0.38)
pt3dadd(-64.92, 454.213, -38.537, 0.36)
pt3dadd(-64.919, 454.222, -38.438, 0.352)
pt3dadd(-64.917, 454.237, -38.338, 0.352)
pt3dadd(-64.914, 454.253, -38.239, 0.352)
pt3dadd(-64.912, 454.268, -38.14, 0.352)
pt3dadd(-64.91, 454.284, -38.041, 0.352)
pt3dadd(-64.908, 454.3, -37.942, 0.352)
pt3dadd(-64.903, 454.322, -37.844, 0.368)
pt3dadd(-64.898, 454.349, -37.746, 0.396)
pt3dadd(-64.892, 454.375, -37.649, 0.422)
pt3dadd(-64.886, 454.4, -37.551, 0.45)
pt3dadd(-64.88, 454.427, -37.454, 0.478)
pt3dadd(-64.88, 454.433, -37.354, 0.558)
pt3dadd(-64.88, 454.439, -37.254, 0.636)
pt3dadd(-64.821, 454.44, -37.172, 0.7)
pt3dadd(-64.746, 454.44, -37.094, 0.758)
pt3dadd(-64.713, 454.44, -37.002, 0.792)
pt3dadd(-64.703, 454.44, -36.902, 0.81)
pt3dadd(-64.7, 454.444, -36.805, 0.828)
pt3dadd(-64.775, 454.489, -36.736, 0.828)
pt3dadd(-64.846, 454.53, -36.664, 0.834)
pt3dadd(-64.908, 454.56, -36.583, 0.854)
pt3dadd(-64.92, 454.56, -36.484, 0.85)
pt3dadd(-64.922, 454.56, -36.384, 0.816)
pt3dadd(-64.943, 454.565, -36.286, 0.734)
pt3dadd(-64.997, 454.597, -36.203, 0.68)
pt3dadd(-65.065, 454.657, -36.139, 0.678)
pt3dadd(-65.146, 454.68, -36.069, 0.648)
pt3dadd(-65.249, 454.68, -36.021, 0.602)
pt3dadd(-65.367, 454.68, -36.003, 0.56)
pt3dadd(-65.487, 454.68, -36, 0.516)
pt3dadd(-65.607, 454.68, -36, 0.502)
pt3dadd(-65.727, 454.68, -36, 0.52)
pt3dadd(-65.839, 454.692, -35.972, 0.546)
pt3dadd(-65.948, 454.709, -35.933, 0.572)
pt3dadd(-66.058, 454.724, -35.895, 0.598)
pt3dadd(-66.167, 454.741, -35.856, 0.624)
pt3dadd(-66.277, 454.758, -35.817, 0.65)
pt3dadd(-66.387, 454.766, -35.778, 0.674)
pt3dadd(-66.497, 454.775, -35.739, 0.698)
pt3dadd(-66.607, 454.782, -35.699, 0.724)
pt3dadd(-66.717, 454.79, -35.66, 0.748)
pt3dadd(-66.827, 454.798, -35.621, 0.772)
pt3dadd(-66.944, 454.799, -35.61, 0.786)
pt3dadd(-67.064, 454.796, -35.608, 0.798)
pt3dadd(-67.184, 454.795, -35.607, 0.81)
pt3dadd(-67.304, 454.793, -35.605, 0.82)
pt3dadd(-67.424, 454.79, -35.603, 0.832)
pt3dadd(-67.544, 454.789, -35.602, 0.842)
pt3dadd(-67.664, 454.787, -35.6, 0.854)
pt3dadd(-67.778, 454.748, -35.6, 0.846)
pt3dadd(-67.891, 454.71, -35.6, 0.836)
pt3dadd(-68.005, 454.672, -35.6, 0.826)
pt3dadd(-68.119, 454.633, -35.6, 0.818)
pt3dadd(-68.232, 454.594, -35.6, 0.808)
pt3dadd(-68.349, 454.572, -35.6, 0.796)
pt3dadd(-68.469, 454.571, -35.6, 0.776)
pt3dadd(-68.589, 454.568, -35.6, 0.758)
pt3dadd(-68.709, 454.566, -35.6, 0.74)
pt3dadd(-68.829, 454.565, -35.6, 0.722)
pt3dadd(-68.949, 454.562, -35.6, 0.704)
pt3dadd(-69.069, 454.561, -35.6, 0.686)
pt3dadd(-69.187, 454.552, -35.59, 0.67)
pt3dadd(-69.304, 454.537, -35.571, 0.656)
pt3dadd(-69.421, 454.522, -35.553, 0.642)
pt3dadd(-69.538, 454.507, -35.535, 0.628)
pt3dadd(-69.655, 454.493, -35.516, 0.614)
pt3dadd(-69.77, 454.477, -35.494, 0.602)
pt3dadd(-69.869, 454.448, -35.442, 0.588)
pt3dadd(-69.964, 454.416, -35.388, 0.586)
pt3dadd(-70.047, 454.363, -35.332, 0.63)
pt3dadd(-70.143, 454.315, -35.3, 0.658)
pt3dadd(-70.257, 454.276, -35.3, 0.668)
pt3dadd(-70.369, 454.235, -35.302, 0.676)
pt3dadd(-70.47, 454.174, -35.318, 0.664)
pt3dadd(-70.572, 454.114, -35.334, 0.648)
pt3dadd(-70.678, 454.058, -35.342, 0.614)
pt3dadd(-70.785, 454.003, -35.35, 0.58)
pt3dadd(-70.886, 453.959, -35.34, 0.544)
pt3dadd(-70.971, 453.952, -35.269, 0.508)
pt3dadd(-71.059, 453.936, -35.21, 0.478)
pt3dadd(-71.164, 453.878, -35.202, 0.478)
pt3dadd(-71.247, 453.8, -35.219, 0.47)
pt3dadd(-71.277, 453.739, -35.295, 0.414)
pt3dadd(-71.28, 453.706, -35.391, 0.378)
pt3dadd(-71.286, 453.638, -35.47, 0.424)
pt3dadd(-71.331, 453.545, -35.515, 0.464)
pt3dadd(-71.392, 453.455, -35.558, 0.482)
pt3dadd(-71.453, 453.365, -35.601, 0.5)
pt3dadd(-71.514, 453.275, -35.644, 0.518)
pt3dadd(-71.572, 453.181, -35.682, 0.536)
pt3dadd(-71.628, 453.083, -35.715, 0.552)
pt3dadd(-71.683, 452.984, -35.749, 0.57)
pt3dadd(-71.738, 452.885, -35.782, 0.588)
pt3dadd(-71.795, 452.786, -35.814, 0.604)
pt3dadd(-71.857, 452.687, -35.833, 0.616)
pt3dadd(-71.919, 452.586, -35.853, 0.626)
pt3dadd(-71.981, 452.486, -35.873, 0.638)
pt3dadd(-72.042, 452.387, -35.892, 0.648)
pt3dadd(-72.091, 452.282, -35.918, 0.656)
pt3dadd(-72.132, 452.174, -35.947, 0.662)
pt3dadd(-72.172, 452.066, -35.976, 0.668)
pt3dadd(-72.213, 451.96, -36.005, 0.672)
pt3dadd(-72.254, 451.853, -36.034, 0.678)
pt3dadd(-72.327, 451.817, -36.107, 0.664)
pt3dadd(-72.396, 451.769, -36.175, 0.65)
pt3dadd(-72.447, 451.673, -36.217, 0.636)
pt3dadd(-72.504, 451.6, -36.273, 0.622)
pt3dadd(-72.569, 451.564, -36.352, 0.61)
pt3dadd(-72.653, 451.513, -36.392, 0.61)
pt3dadd(-72.755, 451.45, -36.397, 0.622)
pt3dadd(-72.831, 451.366, -36.4, 0.63)
pt3dadd(-72.872, 451.253, -36.4, 0.638)
pt3dadd(-72.913, 451.14, -36.4, 0.644)
pt3dadd(-72.954, 451.027, -36.4, 0.65)
pt3dadd(-73.001, 450.934, -36.433, 0.66)
pt3dadd(-73.054, 450.858, -36.496, 0.674)
pt3dadd(-73.08, 450.827, -36.586, 0.678)
pt3dadd(-73.141, 450.756, -36.648, 0.678)
pt3dadd(-73.203, 450.684, -36.708, 0.678)
pt3dadd(-73.266, 450.611, -36.768, 0.678)
pt3dadd(-73.328, 450.539, -36.829, 0.678)
pt3dadd(-73.412, 450.457, -36.847, 0.684)
pt3dadd(-73.497, 450.374, -36.862, 0.688)
pt3dadd(-73.583, 450.292, -36.876, 0.694)
pt3dadd(-73.668, 450.21, -36.891, 0.7)
pt3dadd(-73.756, 450.131, -36.909, 0.706)
pt3dadd(-73.847, 450.058, -36.932, 0.71)
pt3dadd(-73.939, 449.986, -36.955, 0.716)
pt3dadd(-74.03, 449.912, -36.978, 0.722)
pt3dadd(-74.121, 449.839, -37, 0.728)
pt3dadd(-74.199, 449.748, -37.006, 0.752)
pt3dadd(-74.277, 449.657, -37.011, 0.778)
pt3dadd(-74.373, 449.647, -37.068, 0.778)
pt3dadd(-74.469, 449.641, -37.127, 0.778)
pt3dadd(-74.536, 449.615, -37.206, 0.778)
pt3dadd(-74.599, 449.587, -37.288, 0.778)
pt3dadd(-74.616, 449.471, -37.298, 0.748)
pt3dadd(-74.632, 449.352, -37.307, 0.718)
pt3dadd(-74.656, 449.245, -37.338, 0.682)
pt3dadd(-74.702, 449.153, -37.385, 0.65)
pt3dadd(-74.786, 449.075, -37.414, 0.638)
pt3dadd(-74.87, 448.997, -37.442, 0.626)
pt3dadd(-74.955, 448.919, -37.471, 0.614)
pt3dadd(-75.039, 448.841, -37.5, 0.602)
pt3dadd(-75.097, 448.751, -37.545, 0.608)
pt3dadd(-75.155, 448.661, -37.59, 0.614)
pt3dadd(-75.213, 448.571, -37.636, 0.62)
pt3dadd(-75.27, 448.481, -37.681, 0.626)
pt3dadd(-75.345, 448.391, -37.693, 0.638)
pt3dadd(-75.423, 448.3, -37.699, 0.65)
pt3dadd(-75.452, 448.187, -37.7, 0.668)
pt3dadd(-75.467, 448.068, -37.7, 0.686)
pt3dadd(-75.484, 447.949, -37.7, 0.706)
pt3dadd(-75.524, 447.835, -37.7, 0.738)
pt3dadd(-75.563, 447.722, -37.7, 0.77)
pt3dadd(-75.658, 447.664, -37.7, 0.802)
pt3dadd(-75.771, 447.624, -37.7, 0.834)
pt3dadd(-75.886, 447.59, -37.7, 0.86)
pt3dadd(-76.004, 447.568, -37.7, 0.874)
pt3dadd(-76.086, 447.491, -37.7, 0.868)
pt3dadd(-76.151, 447.391, -37.7, 0.854)
pt3dadd(-76.217, 447.29, -37.7, 0.838)
pt3dadd(-76.283, 447.19, -37.7, 0.824)
pt3dadd(-76.349, 447.09, -37.7, 0.81)
pt3dadd(-76.445, 447.028, -37.7, 0.784)
}
}
proc shape3d_112() {
dend_5[9] { pt3dadd(-76.558, 446.989, -37.7, 0.752)
pt3dadd(-76.66, 446.934, -37.701, 0.718)
pt3dadd(-76.731, 446.837, -37.707, 0.682)
pt3dadd(-76.798, 446.744, -37.724, 0.648)
pt3dadd(-76.851, 446.669, -37.788, 0.618)
pt3dadd(-76.893, 446.585, -37.849, 0.584)
pt3dadd(-76.921, 446.492, -37.908, 0.544)
pt3dadd(-76.966, 446.401, -37.96, 0.516)
pt3dadd(-77.004, 446.309, -38.012, 0.504)
pt3dadd(-77.016, 446.213, -38.071, 0.51)
pt3dadd(-77.027, 446.117, -38.13, 0.514)
pt3dadd(-77.038, 446.021, -38.189, 0.52)
pt3dadd(-77.05, 445.925, -38.248, 0.526)
pt3dadd(-77.106, 445.852, -38.306, 0.556)
pt3dadd(-77.182, 445.79, -38.363, 0.6)
pt3dadd(-77.237, 445.709, -38.42, 0.63)
pt3dadd(-77.292, 445.622, -38.471, 0.66)
pt3dadd(-77.355, 445.524, -38.494, 0.7)
pt3dadd(-77.431, 445.452, -38.521, 0.74)
pt3dadd(-77.544, 445.446, -38.555, 0.786)
pt3dadd(-77.655, 445.439, -38.591, 0.83)
pt3dadd(-77.731, 445.399, -38.661, 0.888)
pt3dadd(-77.806, 445.36, -38.731, 0.948)
pt3dadd(-77.881, 445.319, -38.802, 1.006)
pt3dadd(-77.934, 445.25, -38.871, 1.092)
pt3dadd(-77.995, 445.194, -38.94, 1.206)
pt3dadd(-78.059, 445.154, -39.016, 1.298)
pt3dadd(-78.11, 445.103, -39.096, 1.326)
pt3dadd(-78.125, 445.042, -39.179, 1.322)
pt3dadd(-78.132, 444.978, -39.264, 1.31)
pt3dadd(-78.208, 444.92, -39.293, 1.264)
pt3dadd(-78.314, 444.864, -39.298, 1.206)
pt3dadd(-78.427, 444.828, -39.3, 1.136)
pt3dadd(-78.545, 444.808, -39.3, 1.058)
pt3dadd(-78.664, 444.787, -39.3, 0.982)
pt3dadd(-78.708, 444.678, -39.3, 0.87)
pt3dadd(-78.756, 444.568, -39.3, 0.746)
pt3dadd(-78.846, 444.497, -39.3, 0.68)
pt3dadd(-78.96, 444.461, -39.3, 0.712)
pt3dadd(-79.047, 444.386, -39.3, 0.792)
pt3dadd(-79.077, 444.272, -39.291, 0.868)
pt3dadd(-79.08, 444.168, -39.248, 0.904)
pt3dadd(-79.08, 444.128, -39.155, 0.894)
pt3dadd(-79.08, 444.12, -39.056, 0.856)
pt3dadd(-79.08, 444.12, -38.956, 0.796)
pt3dadd(-79.08, 444.12, -38.856, 0.72)
pt3dadd(-79.08, 444.114, -38.756, 0.64)
pt3dadd(-79.08, 444.089, -38.658, 0.552)
pt3dadd(-79.08, 444.071, -38.56, 0.522)
pt3dadd(-79.08, 444.059, -38.46, 0.514)
pt3dadd(-79.08, 444.046, -38.361, 0.506)
pt3dadd(-79.08, 444.034, -38.261, 0.498)
pt3dadd(-79.08, 444.02, -38.162, 0.49)
pt3dadd(-79.08, 444.008, -38.063, 0.482)
pt3dadd(-79.1, 443.992, -37.968, 0.476)
pt3dadd(-79.154, 443.968, -37.881, 0.47)
pt3dadd(-79.208, 443.944, -37.793, 0.464)
pt3dadd(-79.261, 443.92, -37.706, 0.458)
pt3dadd(-79.315, 443.896, -37.619, 0.452)
pt3dadd(-79.32, 443.926, -37.524, 0.452)
pt3dadd(-79.32, 443.972, -37.433, 0.452)
pt3dadd(-79.32, 443.987, -37.334, 0.452)
pt3dadd(-79.32, 443.962, -37.237, 0.428)
pt3dadd(-79.324, 443.912, -37.147, 0.354)
pt3dadd(-79.364, 443.884, -37.058, 0.264)
pt3dadd(-79.465, 443.88, -37.01, 0.226)
pt3dadd(-79.584, 443.878, -37, 0.226)
pt3dadd(-79.702, 443.857, -37, 0.226)
pt3dadd(-79.811, 443.809, -37, 0.226)
pt3dadd(-79.92, 443.76, -37, 0.226)
}
dend_5[10] {pt3dclear()
pt3dadd(-18.347, 382, -30.478, 1.18)
pt3dadd(-18.393, 382.096, -30.435, 1.162)
pt3dadd(-18.44, 382.193, -30.392, 1.146)
pt3dadd(-18.487, 382.29, -30.348, 1.128)
pt3dadd(-18.534, 382.387, -30.305, 1.11)
pt3dadd(-18.581, 382.484, -30.261, 1.092)
pt3dadd(-18.628, 382.583, -30.218, 1.074)
pt3dadd(-18.675, 382.68, -30.175, 1.056)
pt3dadd(-18.722, 382.777, -30.131, 1.038)
pt3dadd(-18.769, 382.874, -30.088, 1.022)
pt3dadd(-18.816, 382.972, -30.044, 1.004)
pt3dadd(-18.863, 383.069, -30.001, 0.986)
pt3dadd(-18.909, 383.166, -29.958, 0.968)
pt3dadd(-18.957, 383.264, -29.914, 0.95)
pt3dadd(-19.003, 383.362, -29.871, 0.932)
pt3dadd(-19.05, 383.459, -29.827, 0.916)
pt3dadd(-19.08, 383.564, -29.8, 0.92)
pt3dadd(-19.08, 383.684, -29.8, 0.962)
pt3dadd(-19.08, 383.804, -29.8, 1.006)
pt3dadd(-19.08, 383.924, -29.8, 1.05)
pt3dadd(-19.08, 384.044, -29.8, 1.092)
pt3dadd(-19.08, 384.164, -29.8, 1.134)
pt3dadd(-19.08, 384.284, -29.8, 1.178)
pt3dadd(-19.08, 384.404, -29.8, 1.208)
pt3dadd(-19.08, 384.524, -29.8, 1.216)
pt3dadd(-19.08, 384.644, -29.8, 1.226)
pt3dadd(-19.095, 384.762, -29.8, 1.234)
pt3dadd(-19.134, 384.875, -29.8, 1.246)
pt3dadd(-19.175, 384.988, -29.8, 1.256)
pt3dadd(-19.286, 385.033, -29.8, 1.256)
pt3dadd(-19.397, 385.08, -29.8, 1.256)
pt3dadd(-19.509, 385.122, -29.8, 1.264)
pt3dadd(-19.622, 385.162, -29.8, 1.274)
pt3dadd(-19.735, 385.202, -29.8, 1.274)
pt3dadd(-19.847, 385.246, -29.8, 1.258)
pt3dadd(-19.923, 385.334, -29.8, 1.256)
pt3dadd(-19.991, 385.433, -29.8, 1.256)
pt3dadd(-20.072, 385.52, -29.8, 1.264)
pt3dadd(-20.159, 385.603, -29.8, 1.276)
pt3dadd(-20.247, 385.685, -29.8, 1.306)
pt3dadd(-20.336, 385.766, -29.8, 1.354)
pt3dadd(-20.389, 385.858, -29.82, 1.386)
pt3dadd(-20.396, 385.963, -29.866, 1.398)
pt3dadd(-20.409, 386.062, -29.92, 1.39)
pt3dadd(-20.44, 386.14, -29.989, 1.33)
pt3dadd(-20.453, 386.258, -29.991, 1.298)
pt3dadd(-20.466, 386.378, -29.992, 1.266)
pt3dadd(-20.479, 386.497, -29.994, 1.234)
pt3dadd(-20.492, 386.617, -29.996, 1.2)
pt3dadd(-20.505, 386.736, -29.998, 1.168)
pt3dadd(-20.517, 386.855, -30, 1.136)
pt3dadd(-20.524, 386.975, -30.01, 1.084)
pt3dadd(-20.529, 387.094, -30.023, 1.026)
pt3dadd(-20.544, 387.208, -30.04, 0.968)
pt3dadd(-20.599, 387.308, -30.072, 0.91)
pt3dadd(-20.633, 387.413, -30.072, 0.874)
pt3dadd(-20.645, 387.524, -30.036, 0.862)
pt3dadd(-20.67, 387.624, -29.991, 0.85)
pt3dadd(-20.724, 387.701, -29.927, 0.834)
pt3dadd(-20.752, 387.784, -29.862, 0.84)
pt3dadd(-20.769, 387.878, -29.81, 0.856)
pt3dadd(-20.811, 387.991, -29.805, 0.868)
pt3dadd(-20.853, 388.104, -29.8, 0.878)
pt3dadd(-20.928, 388.166, -29.744, 0.892)
pt3dadd(-21, 388.232, -29.687, 0.908)
pt3dadd(-21.058, 388.315, -29.632, 0.924)
pt3dadd(-21.097, 388.412, -29.635, 0.936)
pt3dadd(-21.123, 388.519, -29.674, 0.95)
pt3dadd(-21.167, 388.621, -29.711, 0.98)
pt3dadd(-21.226, 388.72, -29.733, 1.006)
pt3dadd(-21.291, 388.82, -29.733, 1.012)
pt3dadd(-21.356, 388.921, -29.733, 1.02)
pt3dadd(-21.421, 389.022, -29.733, 1.026)
pt3dadd(-21.484, 389.124, -29.738, 1.034)
pt3dadd(-21.54, 389.228, -29.754, 1.046)
pt3dadd(-21.597, 389.332, -29.77, 1.058)
pt3dadd(-21.654, 389.436, -29.785, 1.068)
pt3dadd(-21.709, 389.539, -29.803, 1.08)
pt3dadd(-21.736, 389.638, -29.856, 1.094)
pt3dadd(-21.771, 389.734, -29.893, 1.104)
pt3dadd(-21.839, 389.818, -29.849, 1.104)
pt3dadd(-21.911, 389.869, -29.792, 1.1)
pt3dadd(-21.989, 389.876, -29.716, 1.088)
pt3dadd(-22.046, 389.888, -29.633, 1.072)
pt3dadd(-22.064, 389.911, -29.536, 1.05)
pt3dadd(-22.082, 389.939, -29.443, 1.03)
pt3dadd(-22.121, 390.049, -29.422, 1.03)
pt3dadd(-22.161, 390.16, -29.4, 1.03)
pt3dadd(-22.214, 390.268, -29.4, 1.08)
pt3dadd(-22.268, 390.374, -29.4, 1.164)
pt3dadd(-22.305, 390.488, -29.4, 1.18)
pt3dadd(-22.32, 390.607, -29.4, 1.184)
pt3dadd(-22.323, 390.726, -29.4, 1.234)
pt3dadd(-22.377, 390.834, -29.4, 1.278)
pt3dadd(-22.431, 390.941, -29.4, 1.324)
pt3dadd(-22.484, 391.049, -29.4, 1.358)
pt3dadd(-22.538, 391.156, -29.4, 1.392)
pt3dadd(-22.58, 391.267, -29.397, 1.412)
pt3dadd(-22.615, 391.382, -29.392, 1.424)
pt3dadd(-22.646, 391.49, -29.372, 1.432)
pt3dadd(-22.666, 391.58, -29.308, 1.432)
pt3dadd(-22.683, 391.649, -29.233, 1.426)
pt3dadd(-22.691, 391.674, -29.136, 1.41)
pt3dadd(-22.71, 391.759, -29.079, 1.394)
pt3dadd(-22.733, 391.865, -29.036, 1.378)
pt3dadd(-22.756, 391.97, -28.993, 1.362)
pt3dadd(-22.779, 392.077, -28.95, 1.346)
pt3dadd(-22.8, 392.183, -28.908, 1.328)
pt3dadd(-22.8, 392.293, -28.869, 1.284)
pt3dadd(-22.8, 392.405, -28.83, 1.24)
pt3dadd(-22.816, 392.503, -28.777, 1.2)
pt3dadd(-22.837, 392.6, -28.719, 1.16)
pt3dadd(-22.925, 392.67, -28.702, 1.144)
pt3dadd(-23.024, 392.736, -28.691, 1.132)
pt3dadd(-23.089, 392.758, -28.616, 1.13)
pt3dadd(-23.148, 392.771, -28.53, 1.13)
pt3dadd(-23.16, 392.855, -28.471, 1.13)
pt3dadd(-23.16, 392.958, -28.42, 1.13)
pt3dadd(-23.16, 393.072, -28.4, 1.13)
pt3dadd(-23.16, 393.192, -28.4, 1.13)
pt3dadd(-23.16, 393.312, -28.4, 1.13)
pt3dadd(-23.16, 393.432, -28.4, 1.13)
pt3dadd(-23.16, 393.552, -28.4, 1.174)
pt3dadd(-23.16, 393.672, -28.4, 1.28)
pt3dadd(-23.17, 393.791, -28.4, 1.344)
pt3dadd(-23.188, 393.91, -28.4, 1.364)
pt3dadd(-23.205, 394.028, -28.4, 1.384)
pt3dadd(-23.222, 394.147, -28.4, 1.404)
pt3dadd(-23.239, 394.266, -28.4, 1.424)
pt3dadd(-23.257, 394.385, -28.4, 1.444)
}
}
proc shape3d_113() {
dend_5[10] { pt3dadd(-23.268, 394.502, -28.393, 1.456)
pt3dadd(-23.27, 394.621, -28.376, 1.456)
pt3dadd(-23.272, 394.74, -28.36, 1.456)
pt3dadd(-23.274, 394.858, -28.343, 1.456)
pt3dadd(-23.277, 394.976, -28.326, 1.456)
pt3dadd(-23.279, 395.094, -28.309, 1.456)
pt3dadd(-23.28, 395.214, -28.3, 1.45)
pt3dadd(-23.28, 395.334, -28.3, 1.436)
pt3dadd(-23.28, 395.454, -28.3, 1.422)
pt3dadd(-23.28, 395.574, -28.3, 1.406)
pt3dadd(-23.28, 395.694, -28.3, 1.392)
pt3dadd(-23.28, 395.814, -28.3, 1.378)
pt3dadd(-23.28, 395.934, -28.3, 1.364)
pt3dadd(-23.28, 396.054, -28.3, 1.35)
pt3dadd(-23.28, 396.174, -28.3, 1.336)
pt3dadd(-23.28, 396.294, -28.3, 1.32)
pt3dadd(-23.28, 396.414, -28.3, 1.306)
pt3dadd(-23.28, 396.534, -28.3, 1.292)
pt3dadd(-23.28, 396.654, -28.3, 1.278)
pt3dadd(-23.28, 396.774, -28.3, 1.264)
pt3dadd(-23.281, 396.894, -28.3, 1.252)
pt3dadd(-23.283, 397.014, -28.3, 1.246)
pt3dadd(-23.285, 397.134, -28.3, 1.238)
pt3dadd(-23.287, 397.254, -28.3, 1.23)
pt3dadd(-23.289, 397.374, -28.3, 1.224)
pt3dadd(-23.29, 397.493, -28.3, 1.216)
pt3dadd(-23.292, 397.613, -28.3, 1.208)
pt3dadd(-23.316, 397.729, -28.3, 1.212)
pt3dadd(-23.358, 397.842, -28.3, 1.226)
pt3dadd(-23.4, 397.955, -28.3, 1.24)
pt3dadd(-23.441, 398.066, -28.3, 1.254)
pt3dadd(-23.483, 398.179, -28.3, 1.268)
pt3dadd(-23.524, 398.292, -28.3, 1.286)
pt3dadd(-23.564, 398.405, -28.3, 1.34)
pt3dadd(-23.604, 398.519, -28.3, 1.394)
pt3dadd(-23.688, 398.598, -28.3, 1.442)
pt3dadd(-23.787, 398.665, -28.3, 1.488)
pt3dadd(-23.839, 398.764, -28.3, 1.496)
pt3dadd(-23.86, 398.881, -28.3, 1.476)
pt3dadd(-23.88, 399, -28.3, 1.456)
pt3dadd(-23.88, 399.12, -28.3, 1.398)
pt3dadd(-23.88, 399.24, -28.3, 1.34)
pt3dadd(-23.88, 399.36, -28.3, 1.28)
pt3dadd(-23.88, 399.478, -28.28, 1.178)
pt3dadd(-23.889, 399.592, -28.256, 1.096)
pt3dadd(-23.921, 399.7, -28.22, 1.07)
pt3dadd(-23.953, 399.806, -28.183, 1.042)
pt3dadd(-23.985, 399.913, -28.147, 1.014)
pt3dadd(-24.017, 400.021, -28.111, 0.988)
pt3dadd(-24.063, 400.106, -28.056, 0.96)
pt3dadd(-24.117, 400.182, -27.993, 0.93)
pt3dadd(-24.12, 400.25, -27.911, 0.93)
pt3dadd(-24.12, 400.319, -27.829, 0.93)
pt3dadd(-24.12, 400.427, -27.808, 0.942)
pt3dadd(-24.12, 400.547, -27.804, 0.96)
pt3dadd(-24.12, 400.667, -27.8, 0.978)
pt3dadd(-24.12, 400.787, -27.8, 1.002)
pt3dadd(-24.12, 400.907, -27.8, 1.026)
pt3dadd(-24.12, 401.027, -27.8, 1.052)
pt3dadd(-24.12, 401.147, -27.795, 1.066)
pt3dadd(-24.12, 401.267, -27.789, 1.08)
}
dend_5[11] {pt3dclear()
pt3dadd(-24.12, 401.267, -27.789, 1.08)
pt3dadd(-24.12, 401.33, -27.781, 1.078)
pt3dadd(-24.12, 401.449, -27.767, 1.074)
pt3dadd(-24.12, 401.568, -27.752, 1.07)
pt3dadd(-24.12, 401.687, -27.738, 1.066)
pt3dadd(-24.12, 401.806, -27.724, 1.062)
pt3dadd(-24.12, 401.924, -27.709, 1.058)
pt3dadd(-24.127, 402.043, -27.7, 1.048)
pt3dadd(-24.147, 402.161, -27.7, 1.032)
pt3dadd(-24.167, 402.28, -27.7, 1.016)
pt3dadd(-24.186, 402.398, -27.7, 1)
pt3dadd(-24.206, 402.516, -27.7, 0.982)
pt3dadd(-24.226, 402.635, -27.7, 0.966)
pt3dadd(-24.24, 402.754, -27.7, 0.944)
pt3dadd(-24.24, 402.874, -27.7, 0.912)
pt3dadd(-24.24, 402.994, -27.7, 0.878)
pt3dadd(-24.24, 403.112, -27.692, 0.842)
pt3dadd(-24.24, 403.228, -27.665, 0.8)
pt3dadd(-24.24, 403.343, -27.637, 0.76)
pt3dadd(-24.24, 403.457, -27.605, 0.736)
pt3dadd(-24.24, 403.57, -27.572, 0.714)
pt3dadd(-24.25, 403.661, -27.516, 0.696)
pt3dadd(-24.27, 403.73, -27.436, 0.684)
pt3dadd(-24.292, 403.823, -27.384, 0.678)
pt3dadd(-24.315, 403.936, -27.356, 0.678)
pt3dadd(-24.338, 404.048, -27.328, 0.678)
pt3dadd(-24.36, 404.161, -27.3, 0.678)
pt3dadd(-24.36, 404.281, -27.3, 0.686)
pt3dadd(-24.36, 404.401, -27.3, 0.694)
pt3dadd(-24.36, 404.521, -27.3, 0.704)
pt3dadd(-24.345, 404.641, -27.3, 0.756)
pt3dadd(-24.327, 404.76, -27.3, 0.772)
pt3dadd(-24.31, 404.879, -27.3, 0.788)
pt3dadd(-24.293, 404.996, -27.3, 0.804)
pt3dadd(-24.276, 405.115, -27.3, 0.82)
pt3dadd(-24.258, 405.234, -27.3, 0.836)
pt3dadd(-24.241, 405.353, -27.3, 0.852)
pt3dadd(-24.24, 405.473, -27.3, 0.868)
pt3dadd(-24.24, 405.593, -27.3, 0.882)
pt3dadd(-24.24, 405.713, -27.3, 0.896)
pt3dadd(-24.24, 405.833, -27.3, 0.91)
pt3dadd(-24.24, 405.953, -27.3, 0.924)
pt3dadd(-24.24, 406.073, -27.3, 0.94)
pt3dadd(-24.24, 406.193, -27.3, 0.954)
pt3dadd(-24.24, 406.313, -27.3, 0.964)
pt3dadd(-24.24, 406.433, -27.3, 0.976)
pt3dadd(-24.24, 406.553, -27.3, 0.986)
pt3dadd(-24.24, 406.673, -27.3, 0.996)
pt3dadd(-24.24, 406.793, -27.3, 1.008)
pt3dadd(-24.24, 406.913, -27.3, 1.018)
pt3dadd(-24.24, 407.033, -27.3, 1.028)
pt3dadd(-24.209, 407.149, -27.3, 1.026)
pt3dadd(-24.176, 407.264, -27.3, 1.022)
pt3dadd(-24.143, 407.38, -27.3, 1.016)
pt3dadd(-24.11, 407.495, -27.3, 1.012)
pt3dadd(-24.076, 407.61, -27.3, 1.008)
pt3dadd(-24.043, 407.725, -27.295, 0.998)
pt3dadd(-24.008, 407.838, -27.277, 0.978)
pt3dadd(-23.973, 407.951, -27.259, 0.958)
pt3dadd(-23.939, 408.064, -27.241, 0.938)
pt3dadd(-23.904, 408.176, -27.223, 0.918)
pt3dadd(-23.88, 408.292, -27.21, 0.892)
pt3dadd(-23.88, 408.412, -27.206, 0.858)
pt3dadd(-23.88, 408.53, -27.202, 0.824)
pt3dadd(-23.874, 408.65, -27.2, 0.804)
pt3dadd(-23.859, 408.769, -27.2, 0.804)
pt3dadd(-23.844, 408.889, -27.2, 0.804)
pt3dadd(-23.768, 408.97, -27.2, 0.838)
pt3dadd(-23.669, 409.038, -27.2, 0.884)
pt3dadd(-23.57, 409.106, -27.2, 0.93)
pt3dadd(-23.471, 409.174, -27.2, 0.978)
pt3dadd(-23.395, 409.26, -27.2, 1.004)
pt3dadd(-23.353, 409.373, -27.2, 1.004)
pt3dadd(-23.295, 409.477, -27.2, 0.988)
pt3dadd(-23.235, 409.582, -27.2, 0.968)
pt3dadd(-23.175, 409.685, -27.2, 0.948)
pt3dadd(-23.115, 409.789, -27.2, 0.928)
pt3dadd(-23.055, 409.894, -27.2, 0.908)
pt3dadd(-23.013, 410.005, -27.2, 0.888)
pt3dadd(-22.977, 410.119, -27.2, 0.864)
pt3dadd(-22.942, 410.234, -27.2, 0.842)
pt3dadd(-22.906, 410.348, -27.2, 0.82)
pt3dadd(-22.87, 410.464, -27.2, 0.798)
pt3dadd(-22.835, 410.578, -27.2, 0.776)
pt3dadd(-22.808, 410.695, -27.2, 0.764)
pt3dadd(-22.781, 410.812, -27.2, 0.75)
pt3dadd(-22.753, 410.928, -27.2, 0.738)
pt3dadd(-22.726, 411.046, -27.2, 0.724)
pt3dadd(-22.698, 411.162, -27.2, 0.712)
pt3dadd(-22.673, 411.28, -27.2, 0.704)
pt3dadd(-22.654, 411.397, -27.2, 0.704)
pt3dadd(-22.634, 411.516, -27.2, 0.704)
pt3dadd(-22.614, 411.635, -27.2, 0.704)
pt3dadd(-22.595, 411.752, -27.2, 0.704)
pt3dadd(-22.575, 411.871, -27.2, 0.704)
pt3dadd(-22.555, 411.99, -27.2, 0.706)
pt3dadd(-22.535, 412.108, -27.2, 0.718)
pt3dadd(-22.516, 412.226, -27.2, 0.73)
pt3dadd(-22.496, 412.345, -27.2, 0.744)
pt3dadd(-22.476, 412.463, -27.2, 0.756)
pt3dadd(-22.456, 412.582, -27.2, 0.768)
pt3dadd(-22.437, 412.7, -27.2, 0.782)
pt3dadd(-22.417, 412.818, -27.2, 0.802)
pt3dadd(-22.397, 412.937, -27.2, 0.824)
pt3dadd(-22.377, 413.054, -27.2, 0.844)
pt3dadd(-22.358, 413.173, -27.2, 0.864)
pt3dadd(-22.338, 413.292, -27.2, 0.886)
pt3dadd(-22.319, 413.41, -27.2, 0.906)
pt3dadd(-22.311, 413.53, -27.2, 0.928)
pt3dadd(-22.303, 413.65, -27.2, 0.952)
pt3dadd(-22.295, 413.77, -27.2, 0.974)
pt3dadd(-22.287, 413.89, -27.2, 0.998)
pt3dadd(-22.279, 414.008, -27.2, 1.02)
pt3dadd(-22.271, 414.128, -27.2, 1.044)
pt3dadd(-22.246, 414.245, -27.2, 1.062)
pt3dadd(-22.204, 414.358, -27.2, 1.076)
pt3dadd(-22.163, 414.469, -27.2, 1.09)
pt3dadd(-22.121, 414.582, -27.2, 1.104)
pt3dadd(-22.079, 414.695, -27.2, 1.118)
pt3dadd(-22.036, 414.806, -27.2, 1.13)
pt3dadd(-21.967, 414.905, -27.2, 1.136)
pt3dadd(-21.898, 415.003, -27.2, 1.14)
pt3dadd(-21.829, 415.1, -27.2, 1.146)
pt3dadd(-21.76, 415.199, -27.2, 1.15)
pt3dadd(-21.692, 415.298, -27.2, 1.154)
pt3dadd(-21.653, 415.411, -27.2, 1.15)
pt3dadd(-21.615, 415.525, -27.2, 1.146)
pt3dadd(-21.576, 415.638, -27.2, 1.142)
pt3dadd(-21.537, 415.752, -27.2, 1.136)
pt3dadd(-21.498, 415.866, -27.2, 1.132)
pt3dadd(-21.48, 415.982, -27.2, 1.128)
pt3dadd(-21.48, 416.102, -27.2, 1.124)
pt3dadd(-21.48, 416.222, -27.2, 1.12)
pt3dadd(-21.48, 416.342, -27.2, 1.118)
pt3dadd(-21.48, 416.462, -27.2, 1.114)
pt3dadd(-21.48, 416.582, -27.2, 1.11)
pt3dadd(-21.48, 416.702, -27.2, 1.106)
pt3dadd(-21.47, 416.821, -27.2, 1.094)
pt3dadd(-21.45, 416.94, -27.2, 1.074)
}
}
proc shape3d_114() {
dend_5[11] { pt3dadd(-21.43, 417.059, -27.2, 1.052)
pt3dadd(-21.411, 417.176, -27.2, 1.032)
pt3dadd(-21.391, 417.295, -27.2, 1.012)
pt3dadd(-21.371, 417.414, -27.2, 0.99)
pt3dadd(-21.351, 417.532, -27.2, 0.964)
pt3dadd(-21.332, 417.65, -27.2, 0.932)
pt3dadd(-21.312, 417.769, -27.2, 0.898)
pt3dadd(-21.292, 417.887, -27.2, 0.866)
pt3dadd(-21.272, 418.006, -27.2, 0.832)
pt3dadd(-21.253, 418.124, -27.2, 0.8)
pt3dadd(-21.24, 418.243, -27.2, 0.758)
pt3dadd(-21.24, 418.363, -27.2, 0.7)
pt3dadd(-21.24, 418.483, -27.2, 0.64)
pt3dadd(-21.24, 418.603, -27.199, 0.6)
pt3dadd(-21.24, 418.723, -27.195, 0.59)
pt3dadd(-21.24, 418.842, -27.191, 0.582)
pt3dadd(-21.24, 418.938, -27.151, 0.6)
pt3dadd(-21.24, 419.006, -27.068, 0.646)
pt3dadd(-21.234, 419.083, -26.993, 0.694)
pt3dadd(-21.213, 419.179, -26.936, 0.746)
pt3dadd(-21.185, 419.281, -26.9, 0.784)
pt3dadd(-21.144, 419.394, -26.9, 0.796)
pt3dadd(-21.103, 419.507, -26.9, 0.808)
pt3dadd(-21.062, 419.62, -26.9, 0.822)
pt3dadd(-21.033, 419.735, -26.9, 0.82)
pt3dadd(-21.018, 419.855, -26.9, 0.802)
pt3dadd(-21.003, 419.974, -26.9, 0.782)
pt3dadd(-21, 420.092, -26.89, 0.734)
pt3dadd(-21, 420.206, -26.858, 0.72)
pt3dadd(-21, 420.318, -26.824, 0.71)
pt3dadd(-21, 420.431, -26.789, 0.702)
pt3dadd(-21, 420.544, -26.754, 0.692)
pt3dadd(-21, 420.656, -26.72, 0.684)
pt3dadd(-21, 420.772, -26.7, 0.678)
pt3dadd(-21, 420.892, -26.7, 0.678)
pt3dadd(-21, 421.012, -26.7, 0.678)
pt3dadd(-21, 421.132, -26.7, 0.678)
pt3dadd(-21, 421.252, -26.7, 0.678)
pt3dadd(-21, 421.372, -26.7, 0.678)
pt3dadd(-21, 421.492, -26.7, 0.678)
pt3dadd(-21, 421.612, -26.7, 0.68)
pt3dadd(-21, 421.732, -26.7, 0.684)
pt3dadd(-21, 421.852, -26.7, 0.686)
pt3dadd(-21, 421.972, -26.7, 0.69)
pt3dadd(-21, 422.092, -26.7, 0.694)
pt3dadd(-21, 422.212, -26.7, 0.698)
pt3dadd(-21, 422.332, -26.7, 0.702)
pt3dadd(-20.99, 422.45, -26.7, 0.706)
pt3dadd(-20.968, 422.569, -26.7, 0.716)
pt3dadd(-20.946, 422.687, -26.7, 0.724)
pt3dadd(-20.924, 422.804, -26.7, 0.732)
pt3dadd(-20.901, 422.923, -26.7, 0.74)
pt3dadd(-20.879, 423.041, -26.7, 0.748)
pt3dadd(-20.828, 423.143, -26.7, 0.774)
pt3dadd(-20.74, 423.224, -26.7, 0.822)
pt3dadd(-20.658, 423.311, -26.7, 0.862)
pt3dadd(-20.59, 423.41, -26.7, 0.884)
pt3dadd(-20.532, 423.512, -26.698, 0.904)
pt3dadd(-20.527, 423.631, -26.685, 0.904)
pt3dadd(-20.522, 423.75, -26.672, 0.904)
pt3dadd(-20.52, 423.839, -26.619, 0.87)
pt3dadd(-20.52, 423.907, -26.537, 0.812)
pt3dadd(-20.52, 423.965, -26.45, 0.744)
pt3dadd(-20.52, 424.007, -26.357, 0.664)
pt3dadd(-20.52, 424.111, -26.316, 0.616)
pt3dadd(-20.52, 424.225, -26.283, 0.574)
pt3dadd(-20.517, 424.327, -26.233, 0.552)
pt3dadd(-20.51, 424.417, -26.168, 0.552)
pt3dadd(-20.465, 424.501, -26.125, 0.558)
pt3dadd(-20.375, 424.578, -26.108, 0.572)
pt3dadd(-20.312, 424.674, -26.1, 0.578)
pt3dadd(-20.273, 424.787, -26.1, 0.578)
pt3dadd(-20.236, 424.901, -26.094, 0.576)
pt3dadd(-20.213, 425.011, -26.062, 0.56)
pt3dadd(-20.19, 425.123, -26.03, 0.546)
pt3dadd(-20.167, 425.234, -25.998, 0.532)
pt3dadd(-20.16, 425.299, -25.924, 0.512)
pt3dadd(-20.16, 425.346, -25.832, 0.49)
pt3dadd(-20.147, 425.413, -25.755, 0.468)
pt3dadd(-20.108, 425.509, -25.711, 0.46)
pt3dadd(-20.053, 425.6, -25.745, 0.502)
pt3dadd(-20.04, 425.636, -25.84, 0.518)
pt3dadd(-20.04, 425.68, -25.933, 0.486)
pt3dadd(-20.022, 425.77, -25.989, 0.452)
pt3dadd(-19.974, 425.879, -25.994, 0.464)
pt3dadd(-19.925, 425.988, -26, 0.476)
pt3dadd(-19.873, 426.095, -25.985, 0.488)
pt3dadd(-19.82, 426.2, -25.969, 0.5)
pt3dadd(-19.805, 426.283, -25.901, 0.518)
pt3dadd(-19.8, 426.338, -25.815, 0.51)
pt3dadd(-19.8, 426.358, -25.717, 0.482)
pt3dadd(-19.788, 426.36, -25.618, 0.43)
pt3dadd(-19.754, 426.36, -25.522, 0.372)
pt3dadd(-19.707, 426.36, -25.43, 0.364)
pt3dadd(-19.678, 426.373, -25.334, 0.388)
pt3dadd(-19.652, 426.397, -25.239, 0.408)
pt3dadd(-19.626, 426.42, -25.143, 0.428)
pt3dadd(-19.6, 426.444, -25.048, 0.446)
pt3dadd(-19.574, 426.467, -24.952, 0.466)
pt3dadd(-19.56, 426.473, -24.855, 0.516)
pt3dadd(-19.56, 426.449, -24.757, 0.604)
pt3dadd(-19.56, 426.4, -24.666, 0.678)
pt3dadd(-19.56, 426.371, -24.569, 0.734)
pt3dadd(-19.56, 426.36, -24.47, 0.754)
pt3dadd(-19.56, 426.365, -24.37, 0.762)
pt3dadd(-19.56, 426.395, -24.275, 0.792)
pt3dadd(-19.547, 426.48, -24.211, 0.804)
pt3dadd(-19.505, 426.592, -24.2, 0.778)
pt3dadd(-19.451, 426.698, -24.2, 0.796)
pt3dadd(-19.398, 426.806, -24.2, 0.802)
pt3dadd(-19.347, 426.914, -24.2, 0.778)
pt3dadd(-19.305, 427.027, -24.2, 0.778)
pt3dadd(-19.263, 427.139, -24.2, 0.778)
pt3dadd(-19.222, 427.252, -24.2, 0.778)
pt3dadd(-19.18, 427.364, -24.2, 0.778)
pt3dadd(-19.139, 427.477, -24.2, 0.778)
pt3dadd(-19.107, 427.592, -24.2, 0.782)
pt3dadd(-19.077, 427.709, -24.2, 0.786)
pt3dadd(-19.047, 427.825, -24.2, 0.792)
pt3dadd(-19.017, 427.942, -24.2, 0.796)
pt3dadd(-18.987, 428.057, -24.2, 0.8)
pt3dadd(-18.955, 428.173, -24.2, 0.804)
pt3dadd(-18.914, 428.286, -24.2, 0.808)
pt3dadd(-18.872, 428.399, -24.2, 0.814)
pt3dadd(-18.83, 428.51, -24.2, 0.818)
pt3dadd(-18.789, 428.623, -24.2, 0.822)
pt3dadd(-18.747, 428.736, -24.2, 0.828)
pt3dadd(-18.711, 428.85, -24.2, 0.832)
pt3dadd(-18.678, 428.965, -24.2, 0.836)
pt3dadd(-18.646, 429.082, -24.2, 0.84)
pt3dadd(-18.613, 429.197, -24.2, 0.846)
pt3dadd(-18.58, 429.312, -24.2, 0.85)
pt3dadd(-18.547, 429.427, -24.2, 0.854)
pt3dadd(-18.487, 429.532, -24.2, 0.874)
pt3dadd(-18.427, 429.635, -24.2, 0.892)
pt3dadd(-18.367, 429.739, -24.2, 0.912)
pt3dadd(-18.307, 429.844, -24.2, 0.932)
pt3dadd(-18.247, 429.947, -24.2, 0.952)
pt3dadd(-18.211, 430.061, -24.2, 1)
pt3dadd(-18.178, 430.176, -24.2, 1.052)
pt3dadd(-18.142, 430.291, -24.2, 1.1)
pt3dadd(-18.103, 430.404, -24.2, 1.142)
pt3dadd(-18.058, 430.513, -24.2, 1.18)
pt3dadd(-17.959, 430.582, -24.2, 1.168)
pt3dadd(-17.86, 430.649, -24.2, 1.156)
pt3dadd(-17.761, 430.717, -24.2, 1.122)
pt3dadd(-17.662, 430.784, -24.2, 1.088)
pt3dadd(-17.557, 430.842, -24.2, 1.028)
pt3dadd(-17.462, 430.91, -24.2, 0.974)
pt3dadd(-17.399, 431.012, -24.2, 0.96)
pt3dadd(-17.336, 431.114, -24.2, 0.946)
pt3dadd(-17.273, 431.216, -24.2, 0.93)
pt3dadd(-17.21, 431.318, -24.2, 0.916)
pt3dadd(-17.146, 431.419, -24.2, 0.902)
pt3dadd(-17.077, 431.518, -24.2, 0.886)
pt3dadd(-17.008, 431.616, -24.2, 0.872)
pt3dadd(-16.939, 431.714, -24.2, 0.856)
pt3dadd(-16.87, 431.813, -24.2, 0.842)
pt3dadd(-16.804, 431.912, -24.2, 0.828)
pt3dadd(-16.754, 432.022, -24.2, 0.824)
pt3dadd(-16.703, 432.13, -24.2, 0.818)
pt3dadd(-16.653, 432.239, -24.2, 0.814)
pt3dadd(-16.602, 432.348, -24.2, 0.808)
pt3dadd(-16.551, 432.456, -24.2, 0.804)
pt3dadd(-16.511, 432.57, -24.2, 0.824)
pt3dadd(-16.471, 432.683, -24.2, 0.844)
pt3dadd(-16.451, 432.799, -24.2, 0.888)
pt3dadd(-16.446, 432.919, -24.2, 0.948)
pt3dadd(-16.442, 433.039, -24.2, 1.01)
pt3dadd(-16.437, 433.159, -24.2, 1.064)
pt3dadd(-16.432, 433.279, -24.2, 1.116)
pt3dadd(-16.428, 433.399, -24.2, 1.168)
pt3dadd(-16.347, 433.474, -24.2, 1.234)
pt3dadd(-16.244, 433.535, -24.2, 1.302)
pt3dadd(-16.142, 433.598, -24.2, 1.334)
pt3dadd(-16.043, 433.666, -24.2, 1.342)
pt3dadd(-15.943, 433.732, -24.2, 1.348)
pt3dadd(-15.843, 433.798, -24.2, 1.356)
pt3dadd(-15.84, 433.916, -24.2, 1.364)
pt3dadd(-15.84, 434.036, -24.2, 1.372)
pt3dadd(-15.84, 434.156, -24.2, 1.38)
pt3dadd(-15.84, 434.276, -24.2, 1.284)
pt3dadd(-15.769, 434.372, -24.198, 1.25)
pt3dadd(-15.696, 434.467, -24.195, 1.22)
pt3dadd(-15.622, 434.562, -24.193, 1.19)
pt3dadd(-15.549, 434.657, -24.191, 1.158)
pt3dadd(-15.479, 434.754, -24.188, 1.128)
pt3dadd(-15.456, 434.869, -24.171, 1.094)
pt3dadd(-15.433, 434.986, -24.154, 1.062)
pt3dadd(-15.411, 435.102, -24.137, 1.028)
pt3dadd(-15.388, 435.218, -24.121, 0.994)
pt3dadd(-15.365, 435.334, -24.104, 0.962)
pt3dadd(-15.345, 435.452, -24.1, 0.944)
pt3dadd(-15.325, 435.57, -24.1, 0.932)
pt3dadd(-15.305, 435.689, -24.1, 0.92)
pt3dadd(-15.285, 435.806, -24.1, 0.908)
pt3dadd(-15.266, 435.925, -24.1, 0.896)
pt3dadd(-15.246, 436.044, -24.1, 0.882)
pt3dadd(-15.24, 436.163, -24.1, 0.884)
pt3dadd(-15.24, 436.283, -24.1, 0.892)
}
}
proc shape3d_115() {
dend_5[11] { pt3dadd(-15.24, 436.403, -24.1, 0.898)
pt3dadd(-15.24, 436.523, -24.1, 0.906)
pt3dadd(-15.24, 436.643, -24.1, 0.912)
pt3dadd(-15.24, 436.763, -24.1, 0.92)
pt3dadd(-15.24, 436.883, -24.1, 0.926)
pt3dadd(-15.209, 436.997, -24.1, 0.946)
pt3dadd(-15.165, 437.108, -24.1, 0.968)
pt3dadd(-15.12, 437.22, -24.1, 0.992)
pt3dadd(-15.075, 437.332, -24.1, 1.016)
pt3dadd(-15.031, 437.443, -24.1, 1.038)
pt3dadd(-14.975, 437.548, -24.1, 1.06)
pt3dadd(-14.895, 437.636, -24.1, 1.074)
pt3dadd(-14.814, 437.725, -24.1, 1.09)
pt3dadd(-14.733, 437.814, -24.1, 1.104)
pt3dadd(-14.653, 437.903, -24.1, 1.12)
pt3dadd(-14.576, 437.995, -24.099, 1.13)
pt3dadd(-14.505, 438.092, -24.097, 1.13)
pt3dadd(-14.435, 438.19, -24.095, 1.13)
pt3dadd(-14.365, 438.287, -24.093, 1.13)
pt3dadd(-14.295, 438.384, -24.09, 1.13)
pt3dadd(-14.213, 438.468, -24.081, 1.118)
pt3dadd(-14.115, 438.533, -24.061, 1.09)
pt3dadd(-14.017, 438.598, -24.041, 1.062)
pt3dadd(-13.919, 438.662, -24.021, 1.034)
pt3dadd(-13.821, 438.728, -24.002, 1.006)
pt3dadd(-13.789, 438.841, -24, 0.958)
pt3dadd(-13.763, 438.958, -24, 0.908)
pt3dadd(-13.702, 439.038, -23.987, 0.854)
pt3dadd(-13.591, 439.063, -23.954, 0.792)
pt3dadd(-13.478, 439.08, -23.929, 0.75)
pt3dadd(-13.359, 439.08, -23.917, 0.74)
pt3dadd(-13.24, 439.08, -23.904, 0.732)
pt3dadd(-13.121, 439.09, -23.9, 0.728)
pt3dadd(-13.002, 439.104, -23.9, 0.728)
pt3dadd(-12.882, 439.12, -23.9, 0.728)
pt3dadd(-12.789, 439.18, -23.864, 0.736)
pt3dadd(-12.696, 439.242, -23.827, 0.744)
pt3dadd(-12.604, 439.304, -23.79, 0.754)
pt3dadd(-12.575, 439.352, -23.703, 0.742)
pt3dadd(-12.548, 439.399, -23.614, 0.728)
pt3dadd(-12.457, 439.464, -23.58, 0.718)
pt3dadd(-12.364, 439.529, -23.548, 0.708)
pt3dadd(-12.284, 439.612, -23.524, 0.696)
pt3dadd(-12.216, 439.708, -23.507, 0.684)
pt3dadd(-12.132, 439.79, -23.5, 0.698)
pt3dadd(-12.083, 439.896, -23.482, 0.712)
pt3dadd(-12.041, 440.005, -23.46, 0.722)
pt3dadd(-11.999, 440.114, -23.439, 0.734)
pt3dadd(-11.956, 440.224, -23.418, 0.744)
pt3dadd(-11.913, 440.333, -23.4, 0.756)
pt3dadd(-11.859, 440.441, -23.4, 0.774)
pt3dadd(-11.806, 440.548, -23.4, 0.794)
pt3dadd(-11.752, 440.656, -23.4, 0.814)
pt3dadd(-11.698, 440.762, -23.4, 0.832)
pt3dadd(-11.645, 440.87, -23.4, 0.852)
pt3dadd(-11.597, 440.98, -23.4, 0.862)
pt3dadd(-11.549, 441.09, -23.4, 0.872)
pt3dadd(-11.502, 441.2, -23.4, 0.882)
pt3dadd(-11.454, 441.311, -23.4, 0.89)
pt3dadd(-11.407, 441.421, -23.4, 0.9)
pt3dadd(-11.346, 441.524, -23.4, 0.904)
pt3dadd(-11.277, 441.623, -23.4, 0.904)
pt3dadd(-11.208, 441.72, -23.4, 0.904)
pt3dadd(-11.139, 441.818, -23.4, 0.904)
pt3dadd(-11.07, 441.917, -23.4, 0.904)
pt3dadd(-11.015, 442.022, -23.4, 0.894)
pt3dadd(-10.971, 442.134, -23.4, 0.874)
pt3dadd(-10.926, 442.246, -23.4, 0.856)
pt3dadd(-10.881, 442.356, -23.4, 0.838)
pt3dadd(-10.837, 442.468, -23.4, 0.82)
pt3dadd(-10.794, 442.58, -23.4, 0.802)
pt3dadd(-10.758, 442.694, -23.4, 0.798)
pt3dadd(-10.722, 442.808, -23.4, 0.794)
pt3dadd(-10.686, 442.924, -23.4, 0.79)
pt3dadd(-10.65, 443.038, -23.4, 0.784)
pt3dadd(-10.614, 443.153, -23.4, 0.78)
pt3dadd(-10.568, 443.263, -23.4, 0.784)
pt3dadd(-10.515, 443.37, -23.4, 0.794)
pt3dadd(-10.461, 443.478, -23.4, 0.804)
pt3dadd(-10.407, 443.585, -23.4, 0.812)
pt3dadd(-10.354, 443.693, -23.4, 0.822)
pt3dadd(-10.29, 443.792, -23.4, 0.84)
pt3dadd(-10.21, 443.881, -23.4, 0.87)
pt3dadd(-10.129, 443.97, -23.4, 0.9)
pt3dadd(-10.048, 444.06, -23.4, 0.932)
pt3dadd(-9.968, 444.149, -23.4, 0.962)
pt3dadd(-9.884, 444.234, -23.4, 0.998)
pt3dadd(-9.796, 444.316, -23.4, 1.046)
pt3dadd(-9.727, 444.408, -23.4, 1.082)
pt3dadd(-9.707, 444.526, -23.4, 1.092)
pt3dadd(-9.687, 444.644, -23.4, 1.102)
pt3dadd(-9.649, 444.756, -23.389, 1.088)
pt3dadd(-9.604, 444.865, -23.373, 1.064)
pt3dadd(-9.52, 444.924, -23.342, 1.032)
pt3dadd(-9.413, 444.95, -23.303, 0.994)
pt3dadd(-9.323, 444.985, -23.247, 0.964)
pt3dadd(-9.243, 445.025, -23.18, 0.938)
pt3dadd(-9.163, 445.066, -23.114, 0.914)
pt3dadd(-9.117, 445.11, -23.033, 0.864)
pt3dadd(-9.09, 445.157, -22.943, 0.802)
pt3dadd(-9.056, 445.223, -22.867, 0.738)
pt3dadd(-9.017, 445.301, -22.798, 0.676)
pt3dadd(-8.976, 445.385, -22.739, 0.614)
pt3dadd(-8.929, 445.492, -22.717, 0.55)
pt3dadd(-8.89, 445.602, -22.7, 0.508)
pt3dadd(-8.88, 445.721, -22.7, 0.536)
pt3dadd(-8.88, 445.841, -22.7, 0.56)
pt3dadd(-8.88, 445.961, -22.7, 0.586)
pt3dadd(-8.874, 446.078, -22.689, 0.614)
pt3dadd(-8.855, 446.191, -22.658, 0.65)
pt3dadd(-8.831, 446.303, -22.63, 0.676)
pt3dadd(-8.786, 446.412, -22.614, 0.664)
pt3dadd(-8.733, 446.515, -22.601, 0.652)
pt3dadd(-8.631, 446.579, -22.606, 0.64)
pt3dadd(-8.532, 446.642, -22.613, 0.628)
pt3dadd(-8.487, 446.724, -22.677, 0.61)
pt3dadd(-8.442, 446.804, -22.741, 0.594)
pt3dadd(-8.398, 446.887, -22.804, 0.576)
pt3dadd(-8.37, 446.986, -22.856, 0.564)
pt3dadd(-8.33, 447.071, -22.908, 0.554)
pt3dadd(-8.229, 447.09, -22.959, 0.564)
pt3dadd(-8.127, 447.11, -23.01, 0.574)
pt3dadd(-8.043, 447.131, -23.076, 0.598)
pt3dadd(-7.974, 447.151, -23.156, 0.638)
pt3dadd(-7.882, 447.19, -23.189, 0.686)
pt3dadd(-7.775, 447.232, -23.176, 0.738)
pt3dadd(-7.701, 447.24, -23.103, 0.774)
pt3dadd(-7.681, 447.24, -23.005, 0.802)
pt3dadd(-7.665, 447.241, -22.906, 0.8)
pt3dadd(-7.61, 447.268, -22.826, 0.724)
pt3dadd(-7.521, 447.326, -22.781, 0.672)
pt3dadd(-7.46, 447.356, -22.705, 0.614)
pt3dadd(-7.441, 447.36, -22.607, 0.556)
pt3dadd(-7.44, 447.376, -22.508, 0.554)
pt3dadd(-7.44, 447.444, -22.431, 0.578)
pt3dadd(-7.44, 447.558, -22.404, 0.548)
pt3dadd(-7.44, 447.678, -22.4, 0.494)
pt3dadd(-7.44, 447.798, -22.4, 0.478)
pt3dadd(-7.44, 447.918, -22.4, 0.51)
pt3dadd(-7.44, 448.038, -22.4, 0.576)
pt3dadd(-7.431, 448.157, -22.4, 0.658)
pt3dadd(-7.402, 448.273, -22.4, 0.794)
pt3dadd(-7.389, 448.393, -22.4, 0.83)
pt3dadd(-7.376, 448.512, -22.4, 0.858)
pt3dadd(-7.363, 448.631, -22.4, 0.884)
pt3dadd(-7.351, 448.751, -22.4, 0.912)
pt3dadd(-7.338, 448.87, -22.4, 0.94)
pt3dadd(-7.325, 448.99, -22.4, 0.968)
pt3dadd(-7.309, 449.108, -22.4, 0.992)
pt3dadd(-7.289, 449.226, -22.4, 1.012)
pt3dadd(-7.269, 449.345, -22.4, 1.032)
pt3dadd(-7.249, 449.464, -22.4, 1.054)
pt3dadd(-7.23, 449.581, -22.4, 1.074)
pt3dadd(-7.21, 449.7, -22.4, 1.094)
pt3dadd(-7.178, 449.815, -22.4, 1.104)
pt3dadd(-7.134, 449.927, -22.4, 1.104)
pt3dadd(-7.089, 450.037, -22.4, 1.104)
pt3dadd(-7.044, 450.149, -22.4, 1.104)
pt3dadd(-7, 450.26, -22.4, 1.104)
pt3dadd(-6.957, 450.372, -22.398, 1.102)
pt3dadd(-6.934, 450.488, -22.379, 1.078)
pt3dadd(-6.911, 450.604, -22.359, 1.054)
pt3dadd(-6.888, 450.719, -22.34, 1.03)
pt3dadd(-6.865, 450.834, -22.321, 1.006)
pt3dadd(-6.842, 450.949, -22.302, 0.982)
pt3dadd(-6.772, 451.045, -22.3, 0.958)
pt3dadd(-6.697, 451.139, -22.3, 0.934)
pt3dadd(-6.65, 451.248, -22.3, 0.93)
pt3dadd(-6.61, 451.362, -22.3, 0.93)
pt3dadd(-6.555, 451.462, -22.284, 0.93)
pt3dadd(-6.48, 451.544, -22.247, 0.93)
pt3dadd(-6.414, 451.622, -22.196, 0.882)
pt3dadd(-6.353, 451.699, -22.139, 0.81)
pt3dadd(-6.274, 451.787, -22.124, 0.762)
pt3dadd(-6.194, 451.874, -22.114, 0.718)
pt3dadd(-6.114, 451.963, -22.104, 0.672)
pt3dadd(-6.057, 452.066, -22.1, 0.634)
pt3dadd(-6.018, 452.179, -22.1, 0.602)
pt3dadd(-5.979, 452.293, -22.1, 0.584)
pt3dadd(-5.935, 452.404, -22.1, 0.606)
pt3dadd(-5.875, 452.508, -22.1, 0.616)
pt3dadd(-5.815, 452.612, -22.1, 0.626)
pt3dadd(-5.755, 452.716, -22.1, 0.636)
pt3dadd(-5.696, 452.82, -22.1, 0.646)
pt3dadd(-5.647, 452.928, -22.1, 0.654)
pt3dadd(-5.624, 453.046, -22.1, 0.658)
pt3dadd(-5.602, 453.163, -22.1, 0.662)
pt3dadd(-5.58, 453.282, -22.1, 0.666)
pt3dadd(-5.558, 453.4, -22.1, 0.67)
pt3dadd(-5.536, 453.517, -22.1, 0.676)
pt3dadd(-5.507, 453.634, -22.099, 0.678)
pt3dadd(-5.465, 453.746, -22.097, 0.678)
pt3dadd(-5.422, 453.858, -22.095, 0.678)
pt3dadd(-5.38, 453.971, -22.093, 0.678)
pt3dadd(-5.338, 454.082, -22.091, 0.678)
pt3dadd(-5.295, 454.195, -22.089, 0.678)
pt3dadd(-5.236, 454.285, -22.047, 0.678)
pt3dadd(-5.174, 454.375, -22.007, 0.68)
pt3dadd(-5.103, 454.469, -21.983, 0.694)
pt3dadd(-5.045, 454.556, -21.946, 0.71)
}
}
proc shape3d_116() {
dend_5[11] { pt3dadd(-5.016, 454.636, -21.874, 0.738)
pt3dadd(-4.981, 454.705, -21.799, 0.772)
pt3dadd(-4.937, 454.764, -21.72, 0.812)
pt3dadd(-4.92, 454.849, -21.657, 0.834)
pt3dadd(-4.92, 454.952, -21.605, 0.84)
pt3dadd(-4.92, 455.054, -21.553, 0.846)
pt3dadd(-4.92, 455.158, -21.501, 0.854)
pt3dadd(-4.92, 455.272, -21.473, 0.854)
pt3dadd(-4.92, 455.388, -21.446, 0.854)
pt3dadd(-4.92, 455.503, -21.418, 0.854)
pt3dadd(-4.92, 455.62, -21.397, 0.864)
pt3dadd(-4.92, 455.738, -21.379, 0.876)
pt3dadd(-4.92, 455.856, -21.36, 0.888)
pt3dadd(-4.92, 455.974, -21.342, 0.9)
pt3dadd(-4.92, 456.091, -21.323, 0.914)
pt3dadd(-4.92, 456.21, -21.305, 0.926)
pt3dadd(-4.92, 456.329, -21.3, 0.934)
pt3dadd(-4.92, 456.449, -21.3, 0.942)
pt3dadd(-4.92, 456.569, -21.3, 0.948)
pt3dadd(-4.92, 456.689, -21.3, 0.956)
pt3dadd(-4.92, 456.809, -21.3, 0.962)
pt3dadd(-4.92, 456.929, -21.3, 0.97)
pt3dadd(-4.92, 457.049, -21.3, 0.978)
pt3dadd(-4.911, 457.169, -21.3, 0.974)
pt3dadd(-4.898, 457.288, -21.3, 0.966)
pt3dadd(-4.885, 457.408, -21.3, 0.958)
pt3dadd(-4.873, 457.526, -21.3, 0.95)
pt3dadd(-4.86, 457.646, -21.3, 0.942)
pt3dadd(-4.848, 457.765, -21.3, 0.934)
pt3dadd(-4.833, 457.88, -21.285, 0.914)
pt3dadd(-4.817, 457.991, -21.247, 0.872)
pt3dadd(-4.801, 458.1, -21.208, 0.832)
pt3dadd(-4.785, 458.209, -21.169, 0.79)
pt3dadd(-4.769, 458.318, -21.13, 0.748)
pt3dadd(-4.752, 458.424, -21.085, 0.706)
pt3dadd(-4.734, 458.525, -21.032, 0.664)
pt3dadd(-4.717, 458.624, -20.98, 0.62)
pt3dadd(-4.7, 458.725, -20.927, 0.576)
pt3dadd(-4.683, 458.826, -20.874, 0.534)
pt3dadd(-4.695, 458.921, -20.815, 0.5)
pt3dadd(-4.713, 459.014, -20.754, 0.466)
pt3dadd(-4.73, 459.107, -20.693, 0.434)
pt3dadd(-4.748, 459.2, -20.632, 0.4)
pt3dadd(-4.762, 459.301, -20.584, 0.376)
pt3dadd(-4.769, 459.42, -20.569, 0.372)
pt3dadd(-4.776, 459.539, -20.554, 0.366)
pt3dadd(-4.783, 459.658, -20.539, 0.362)
pt3dadd(-4.789, 459.775, -20.524, 0.358)
pt3dadd(-4.796, 459.894, -20.509, 0.354)
pt3dadd(-4.803, 460.008, -20.483, 0.352)
pt3dadd(-4.811, 460.118, -20.443, 0.352)
pt3dadd(-4.819, 460.229, -20.404, 0.352)
pt3dadd(-4.827, 460.339, -20.365, 0.352)
pt3dadd(-4.835, 460.448, -20.326, 0.352)
pt3dadd(-4.84, 460.562, -20.3, 0.354)
pt3dadd(-4.84, 460.682, -20.3, 0.364)
pt3dadd(-4.84, 460.802, -20.3, 0.372)
pt3dadd(-4.84, 460.922, -20.3, 0.382)
pt3dadd(-4.84, 461.042, -20.3, 0.39)
pt3dadd(-4.84, 461.162, -20.3, 0.4)
pt3dadd(-4.829, 461.282, -20.3, 0.414)
pt3dadd(-4.815, 461.401, -20.3, 0.434)
pt3dadd(-4.8, 461.52, -20.3, 0.452)
}
dend_5[12] {pt3dclear()
pt3dadd(-24.12, 401.267, -27.789, 1.08)
pt3dadd(-24.203, 401.258, -27.774, 1.054)
pt3dadd(-24.32, 401.248, -27.754, 1.02)
pt3dadd(-24.436, 401.236, -27.734, 0.984)
pt3dadd(-24.553, 401.224, -27.713, 0.948)
pt3dadd(-24.67, 401.213, -27.693, 0.914)
pt3dadd(-24.787, 401.201, -27.672, 0.878)
pt3dadd(-24.904, 401.189, -27.652, 0.842)
pt3dadd(-25.021, 401.178, -27.631, 0.808)
pt3dadd(-25.138, 401.166, -27.611, 0.772)
pt3dadd(-25.202, 401.216, -27.6, 0.766)
pt3dadd(-25.207, 401.336, -27.6, 0.792)
pt3dadd(-25.211, 401.456, -27.6, 0.818)
pt3dadd(-25.264, 401.554, -27.6, 0.828)
pt3dadd(-25.352, 401.635, -27.6, 0.828)
pt3dadd(-25.443, 401.713, -27.6, 0.818)
pt3dadd(-25.536, 401.789, -27.6, 0.794)
pt3dadd(-25.632, 401.861, -27.6, 0.778)
pt3dadd(-25.734, 401.924, -27.6, 0.778)
pt3dadd(-25.812, 402.014, -27.6, 0.788)
pt3dadd(-25.887, 402.108, -27.6, 0.798)
pt3dadd(-25.962, 402.202, -27.6, 0.808)
pt3dadd(-26.037, 402.295, -27.6, 0.818)
pt3dadd(-26.112, 402.389, -27.6, 0.828)
pt3dadd(-26.151, 402.502, -27.604, 0.858)
pt3dadd(-26.185, 402.617, -27.609, 0.89)
pt3dadd(-26.229, 402.72, -27.635, 0.92)
pt3dadd(-26.28, 402.816, -27.678, 0.948)
pt3dadd(-26.372, 402.882, -27.693, 0.962)
pt3dadd(-26.478, 402.938, -27.698, 0.974)
pt3dadd(-26.59, 402.98, -27.7, 0.966)
pt3dadd(-26.705, 403.013, -27.7, 0.946)
pt3dadd(-26.821, 403.045, -27.7, 0.922)
pt3dadd(-26.939, 403.068, -27.7, 0.876)
pt3dadd(-27.042, 403.118, -27.7, 0.844)
pt3dadd(-27.131, 403.199, -27.7, 0.824)
pt3dadd(-27.22, 403.28, -27.7, 0.804)
pt3dadd(-27.309, 403.361, -27.7, 0.784)
pt3dadd(-27.398, 403.441, -27.7, 0.762)
pt3dadd(-27.468, 403.536, -27.7, 0.75)
pt3dadd(-27.522, 403.643, -27.7, 0.746)
pt3dadd(-27.576, 403.751, -27.7, 0.742)
pt3dadd(-27.629, 403.858, -27.7, 0.736)
pt3dadd(-27.683, 403.966, -27.7, 0.732)
pt3dadd(-27.738, 404.071, -27.7, 0.73)
pt3dadd(-27.798, 404.176, -27.7, 0.734)
pt3dadd(-27.858, 404.28, -27.7, 0.74)
pt3dadd(-27.918, 404.383, -27.7, 0.744)
pt3dadd(-27.978, 404.488, -27.7, 0.75)
pt3dadd(-28.033, 404.593, -27.7, 0.754)
pt3dadd(-28.063, 404.71, -27.7, 0.764)
pt3dadd(-28.093, 404.826, -27.7, 0.772)
pt3dadd(-28.123, 404.942, -27.7, 0.782)
pt3dadd(-28.153, 405.059, -27.7, 0.79)
pt3dadd(-28.183, 405.174, -27.7, 0.798)
pt3dadd(-28.219, 405.288, -27.7, 0.802)
pt3dadd(-28.264, 405.4, -27.7, 0.796)
pt3dadd(-28.309, 405.511, -27.7, 0.792)
pt3dadd(-28.353, 405.623, -27.7, 0.788)
pt3dadd(-28.398, 405.734, -27.7, 0.782)
pt3dadd(-28.444, 405.845, -27.7, 0.778)
pt3dadd(-28.525, 405.934, -27.7, 0.762)
pt3dadd(-28.605, 406.022, -27.7, 0.748)
pt3dadd(-28.686, 406.111, -27.7, 0.732)
pt3dadd(-28.767, 406.2, -27.7, 0.716)
pt3dadd(-28.846, 406.29, -27.7, 0.702)
pt3dadd(-28.918, 406.386, -27.7, 0.692)
pt3dadd(-28.99, 406.482, -27.7, 0.682)
pt3dadd(-29.062, 406.578, -27.7, 0.672)
pt3dadd(-29.134, 406.674, -27.7, 0.662)
pt3dadd(-29.204, 406.771, -27.7, 0.654)
pt3dadd(-29.248, 406.883, -27.7, 0.664)
pt3dadd(-29.293, 406.993, -27.7, 0.672)
pt3dadd(-29.337, 407.105, -27.7, 0.682)
pt3dadd(-29.382, 407.216, -27.7, 0.692)
pt3dadd(-29.427, 407.328, -27.7, 0.7)
pt3dadd(-29.493, 407.426, -27.7, 0.714)
pt3dadd(-29.568, 407.521, -27.7, 0.728)
pt3dadd(-29.643, 407.615, -27.7, 0.744)
pt3dadd(-29.718, 407.708, -27.7, 0.76)
pt3dadd(-29.793, 407.802, -27.7, 0.774)
pt3dadd(-29.879, 407.885, -27.705, 0.782)
pt3dadd(-29.969, 407.963, -27.712, 0.788)
pt3dadd(-30.059, 408.042, -27.719, 0.794)
pt3dadd(-30.149, 408.121, -27.726, 0.798)
pt3dadd(-30.239, 408.199, -27.733, 0.804)
pt3dadd(-30.316, 408.29, -27.748, 0.792)
pt3dadd(-30.392, 408.382, -27.763, 0.782)
pt3dadd(-30.468, 408.472, -27.777, 0.77)
pt3dadd(-30.545, 408.563, -27.792, 0.76)
pt3dadd(-30.611, 408.661, -27.8, 0.748)
pt3dadd(-30.664, 408.769, -27.8, 0.74)
pt3dadd(-30.718, 408.876, -27.8, 0.73)
pt3dadd(-30.771, 408.984, -27.8, 0.72)
pt3dadd(-30.825, 409.091, -27.8, 0.71)
pt3dadd(-30.882, 409.196, -27.8, 0.704)
pt3dadd(-30.95, 409.295, -27.8, 0.704)
pt3dadd(-31.021, 409.391, -27.8, 0.704)
pt3dadd(-31.132, 409.436, -27.8, 0.726)
pt3dadd(-31.242, 409.482, -27.8, 0.748)
pt3dadd(-31.289, 409.57, -27.841, 0.794)
pt3dadd(-31.316, 409.667, -27.893, 0.848)
pt3dadd(-31.32, 409.745, -27.968, 0.884)
pt3dadd(-31.32, 409.82, -28.046, 0.92)
pt3dadd(-31.36, 409.919, -28.074, 0.944)
pt3dadd(-31.413, 410.026, -28.083, 0.966)
pt3dadd(-31.467, 410.132, -28.093, 0.988)
pt3dadd(-31.513, 410.239, -28.108, 1.01)
pt3dadd(-31.539, 410.351, -28.14, 1.034)
pt3dadd(-31.575, 410.458, -28.169, 1.064)
pt3dadd(-31.651, 410.549, -28.182, 1.112)
pt3dadd(-31.727, 410.64, -28.194, 1.16)
pt3dadd(-31.824, 410.702, -28.2, 1.21)
pt3dadd(-31.938, 410.742, -28.2, 1.264)
pt3dadd(-32.051, 410.78, -28.2, 1.332)
pt3dadd(-32.163, 410.822, -28.202, 1.396)
pt3dadd(-32.269, 410.878, -28.207, 1.374)
pt3dadd(-32.372, 410.933, -28.222, 1.334)
pt3dadd(-32.467, 410.984, -28.265, 1.252)
pt3dadd(-32.558, 411.052, -28.291, 1.15)
pt3dadd(-32.642, 411.137, -28.297, 1.028)
pt3dadd(-32.726, 411.222, -28.3, 0.916)
pt3dadd(-32.808, 411.31, -28.3, 0.822)
pt3dadd(-32.876, 411.406, -28.3, 0.732)
pt3dadd(-32.908, 411.521, -28.3, 0.654)
pt3dadd(-32.945, 411.635, -28.304, 0.63)
pt3dadd(-32.982, 411.749, -28.31, 0.636)
pt3dadd(-33.02, 411.863, -28.317, 0.64)
pt3dadd(-33.058, 411.976, -28.323, 0.646)
pt3dadd(-33.096, 412.09, -28.329, 0.65)
pt3dadd(-33.12, 412.205, -28.342, 0.656)
pt3dadd(-33.12, 412.321, -28.365, 0.664)
pt3dadd(-33.12, 412.438, -28.388, 0.674)
pt3dadd(-33.12, 412.555, -28.411, 0.682)
pt3dadd(-33.12, 412.672, -28.434, 0.69)
pt3dadd(-33.12, 412.788, -28.457, 0.7)
pt3dadd(-33.12, 412.907, -28.47, 0.708)
}
}
proc shape3d_117() {
dend_5[12] { pt3dadd(-33.12, 413.027, -28.474, 0.714)
pt3dadd(-33.12, 413.147, -28.48, 0.722)
pt3dadd(-33.12, 413.267, -28.484, 0.73)
pt3dadd(-33.12, 413.386, -28.489, 0.738)
pt3dadd(-33.12, 413.506, -28.494, 0.744)
pt3dadd(-33.12, 413.626, -28.499, 0.752)
pt3dadd(-33.103, 413.744, -28.5, 0.756)
pt3dadd(-33.083, 413.863, -28.5, 0.76)
pt3dadd(-33.063, 413.981, -28.5, 0.766)
pt3dadd(-33.043, 414.1, -28.5, 0.77)
pt3dadd(-33.024, 414.218, -28.5, 0.774)
pt3dadd(-33.004, 414.336, -28.5, 0.778)
pt3dadd(-32.984, 414.455, -28.5, 0.782)
pt3dadd(-32.964, 414.572, -28.5, 0.786)
pt3dadd(-32.945, 414.691, -28.5, 0.79)
pt3dadd(-32.925, 414.81, -28.5, 0.794)
pt3dadd(-32.905, 414.928, -28.5, 0.798)
pt3dadd(-32.886, 415.046, -28.5, 0.802)
pt3dadd(-32.88, 415.166, -28.5, 0.806)
pt3dadd(-32.88, 415.286, -28.5, 0.81)
pt3dadd(-32.88, 415.406, -28.5, 0.814)
pt3dadd(-32.88, 415.526, -28.5, 0.816)
pt3dadd(-32.88, 415.646, -28.5, 0.82)
pt3dadd(-32.88, 415.766, -28.5, 0.824)
pt3dadd(-32.88, 415.886, -28.5, 0.828)
pt3dadd(-32.894, 416.005, -28.5, 0.822)
pt3dadd(-32.914, 416.123, -28.5, 0.814)
pt3dadd(-32.934, 416.242, -28.5, 0.806)
pt3dadd(-32.953, 416.36, -28.5, 0.798)
pt3dadd(-32.973, 416.478, -28.5, 0.79)
pt3dadd(-32.993, 416.597, -28.5, 0.782)
pt3dadd(-33, 416.716, -28.5, 0.778)
pt3dadd(-33, 416.836, -28.5, 0.778)
pt3dadd(-33, 416.956, -28.5, 0.778)
pt3dadd(-33, 417.076, -28.5, 0.778)
pt3dadd(-33, 417.196, -28.5, 0.778)
pt3dadd(-33, 417.316, -28.5, 0.778)
pt3dadd(-33, 417.436, -28.5, 0.778)
pt3dadd(-33.012, 417.554, -28.5, 0.782)
pt3dadd(-33.032, 417.673, -28.5, 0.786)
pt3dadd(-33.052, 417.792, -28.5, 0.79)
pt3dadd(-33.072, 417.91, -28.5, 0.794)
pt3dadd(-33.091, 418.028, -28.5, 0.798)
pt3dadd(-33.111, 418.147, -28.5, 0.802)
pt3dadd(-33.121, 418.266, -28.5, 0.812)
pt3dadd(-33.123, 418.386, -28.5, 0.826)
pt3dadd(-33.125, 418.506, -28.5, 0.84)
pt3dadd(-33.127, 418.626, -28.5, 0.856)
pt3dadd(-33.129, 418.746, -28.5, 0.87)
pt3dadd(-33.131, 418.866, -28.5, 0.884)
pt3dadd(-33.133, 418.986, -28.5, 0.9)
pt3dadd(-33.157, 419.102, -28.5, 0.91)
pt3dadd(-33.193, 419.216, -28.5, 0.918)
pt3dadd(-33.229, 419.332, -28.5, 0.928)
pt3dadd(-33.264, 419.446, -28.5, 0.936)
pt3dadd(-33.3, 419.561, -28.5, 0.946)
pt3dadd(-33.337, 419.675, -28.5, 0.954)
pt3dadd(-33.388, 419.783, -28.5, 0.96)
pt3dadd(-33.438, 419.892, -28.5, 0.964)
pt3dadd(-33.489, 420.001, -28.5, 0.968)
pt3dadd(-33.54, 420.11, -28.5, 0.974)
pt3dadd(-33.59, 420.218, -28.5, 0.978)
pt3dadd(-33.605, 420.336, -28.5, 0.98)
pt3dadd(-33.611, 420.456, -28.5, 0.98)
pt3dadd(-33.617, 420.576, -28.5, 0.98)
pt3dadd(-33.623, 420.696, -28.5, 0.98)
pt3dadd(-33.628, 420.816, -28.5, 0.98)
pt3dadd(-33.634, 420.936, -28.5, 0.98)
pt3dadd(-33.645, 421.055, -28.5, 0.978)
pt3dadd(-33.69, 421.166, -28.5, 0.968)
pt3dadd(-33.734, 421.277, -28.5, 0.96)
pt3dadd(-33.779, 421.388, -28.5, 0.95)
pt3dadd(-33.823, 421.5, -28.5, 0.94)
pt3dadd(-33.868, 421.612, -28.5, 0.932)
pt3dadd(-33.949, 421.696, -28.5, 0.902)
pt3dadd(-34.043, 421.77, -28.5, 0.868)
pt3dadd(-34.137, 421.846, -28.5, 0.832)
pt3dadd(-34.231, 421.92, -28.5, 0.798)
pt3dadd(-34.29, 422.005, -28.473, 0.784)
pt3dadd(-34.31, 422.101, -28.416, 0.798)
pt3dadd(-34.32, 422.183, -28.345, 0.822)
pt3dadd(-34.32, 422.25, -28.263, 0.856)
pt3dadd(-34.32, 422.336, -28.201, 0.896)
pt3dadd(-34.32, 422.452, -28.174, 0.942)
pt3dadd(-34.32, 422.567, -28.144, 0.958)
pt3dadd(-34.32, 422.681, -28.114, 0.962)
pt3dadd(-34.32, 422.795, -28.085, 0.966)
pt3dadd(-34.32, 422.91, -28.055, 0.972)
pt3dadd(-34.32, 423.024, -28.025, 0.976)
pt3dadd(-34.32, 423.139, -28, 0.98)
pt3dadd(-34.32, 423.259, -28, 0.98)
pt3dadd(-34.32, 423.379, -28, 0.98)
pt3dadd(-34.32, 423.499, -28, 0.98)
pt3dadd(-34.32, 423.619, -28, 0.98)
pt3dadd(-34.32, 423.739, -28, 0.98)
pt3dadd(-34.321, 423.859, -28, 0.978)
pt3dadd(-34.325, 423.979, -28, 0.97)
pt3dadd(-34.33, 424.099, -28, 0.96)
pt3dadd(-34.357, 424.208, -28, 0.952)
pt3dadd(-34.445, 424.29, -28, 0.94)
pt3dadd(-34.534, 424.372, -28.001, 0.924)
pt3dadd(-34.623, 424.451, -28.01, 0.886)
pt3dadd(-34.706, 424.535, -28.027, 0.866)
pt3dadd(-34.788, 424.619, -28.048, 0.848)
pt3dadd(-34.869, 424.704, -28.068, 0.832)
pt3dadd(-34.951, 424.788, -28.088, 0.814)
pt3dadd(-35.039, 424.866, -28.096, 0.794)
pt3dadd(-35.138, 424.934, -28.087, 0.766)
pt3dadd(-35.236, 425.002, -28.078, 0.74)
pt3dadd(-35.335, 425.069, -28.068, 0.714)
pt3dadd(-35.433, 425.137, -28.059, 0.688)
pt3dadd(-35.494, 425.164, -27.994, 0.642)
pt3dadd(-35.535, 425.17, -27.9, 0.586)
pt3dadd(-35.595, 425.206, -27.851, 0.544)
pt3dadd(-35.684, 425.284, -27.867, 0.53)
pt3dadd(-35.768, 425.368, -27.885, 0.568)
pt3dadd(-35.846, 425.454, -27.9, 0.612)
pt3dadd(-35.885, 425.568, -27.9, 0.674)
pt3dadd(-35.924, 425.681, -27.9, 0.738)
pt3dadd(-36.009, 425.729, -27.86, 0.774)
pt3dadd(-36.107, 425.756, -27.807, 0.8)
pt3dadd(-36.167, 425.758, -27.723, 0.726)
pt3dadd(-36.22, 425.728, -27.637, 0.53)
pt3dadd(-36.216, 425.669, -27.555, 0.452)
pt3dadd(-36.162, 425.641, -27.469, 0.428)
pt3dadd(-36.145, 425.64, -27.37, 0.408)
pt3dadd(-36.131, 425.64, -27.271, 0.39)
pt3dadd(-36.119, 425.64, -27.172, 0.372)
pt3dadd(-36.114, 425.64, -27.072, 0.354)
pt3dadd(-36.11, 425.64, -26.972, 0.336)
pt3dadd(-36.068, 425.64, -26.889, 0.33)
pt3dadd(-35.969, 425.64, -26.832, 0.342)
pt3dadd(-35.876, 425.629, -26.773, 0.364)
pt3dadd(-35.801, 425.585, -26.704, 0.422)
pt3dadd(-35.769, 425.528, -26.631, 0.488)
pt3dadd(-35.79, 425.46, -26.55, 0.564)
pt3dadd(-35.843, 425.384, -26.502, 0.704)
pt3dadd(-35.927, 425.31, -26.476, 0.814)
pt3dadd(-35.984, 425.281, -26.396, 0.852)
pt3dadd(-36.017, 425.278, -26.301, 0.936)
pt3dadd(-36.081, 425.248, -26.233, 0.974)
pt3dadd(-36.185, 425.198, -26.204, 0.96)
pt3dadd(-36.292, 425.179, -26.17, 0.918)
pt3dadd(-36.401, 425.194, -26.13, 0.84)
pt3dadd(-36.5, 425.242, -26.107, 0.746)
pt3dadd(-36.587, 425.323, -26.1, 0.628)
pt3dadd(-36.662, 425.417, -26.1, 0.536)
pt3dadd(-36.72, 425.521, -26.1, 0.528)
pt3dadd(-36.776, 425.627, -26.104, 0.502)
pt3dadd(-36.825, 425.73, -26.132, 0.526)
pt3dadd(-36.899, 425.813, -26.169, 0.568)
pt3dadd(-36.978, 425.892, -26.2, 0.608)
pt3dadd(-37.077, 425.96, -26.2, 0.63)
pt3dadd(-37.176, 426.029, -26.199, 0.654)
pt3dadd(-37.252, 426.119, -26.182, 0.666)
pt3dadd(-37.329, 426.208, -26.162, 0.678)
pt3dadd(-37.412, 426.276, -26.118, 0.678)
pt3dadd(-37.49, 426.348, -26.073, 0.686)
pt3dadd(-37.56, 426.43, -26.032, 0.704)
pt3dadd(-37.633, 426.526, -26.025, 0.716)
pt3dadd(-37.705, 426.62, -26.018, 0.726)
pt3dadd(-37.778, 426.715, -26.011, 0.736)
pt3dadd(-37.851, 426.81, -26.004, 0.748)
pt3dadd(-37.918, 426.908, -26.009, 0.76)
pt3dadd(-37.977, 427.009, -26.031, 0.776)
pt3dadd(-38.037, 427.11, -26.054, 0.794)
pt3dadd(-38.096, 427.211, -26.076, 0.81)
pt3dadd(-38.155, 427.312, -26.098, 0.828)
pt3dadd(-38.229, 427.403, -26.119, 0.84)
pt3dadd(-38.304, 427.493, -26.14, 0.852)
pt3dadd(-38.378, 427.584, -26.161, 0.862)
pt3dadd(-38.453, 427.674, -26.181, 0.874)
pt3dadd(-38.524, 427.759, -26.161, 0.888)
pt3dadd(-38.592, 427.843, -26.116, 0.902)
pt3dadd(-38.64, 427.945, -26.139, 0.892)
pt3dadd(-38.688, 428.046, -26.17, 0.878)
pt3dadd(-38.778, 428.113, -26.207, 0.878)
pt3dadd(-38.869, 428.178, -26.244, 0.882)
pt3dadd(-38.964, 428.236, -26.281, 0.896)
pt3dadd(-39.043, 428.316, -26.3, 0.91)
pt3dadd(-39.105, 428.418, -26.3, 0.924)
pt3dadd(-39.168, 428.521, -26.3, 0.938)
pt3dadd(-39.23, 428.623, -26.3, 0.952)
pt3dadd(-39.262, 428.732, -26.273, 0.964)
pt3dadd(-39.287, 428.843, -26.24, 0.976)
pt3dadd(-39.385, 428.884, -26.225, 0.98)
pt3dadd(-39.503, 428.904, -26.215, 0.98)
pt3dadd(-39.62, 428.924, -26.204, 0.98)
pt3dadd(-39.708, 428.993, -26.2, 0.986)
pt3dadd(-39.776, 429.091, -26.2, 0.998)
pt3dadd(-39.85, 429.184, -26.208, 0.986)
pt3dadd(-39.943, 429.241, -26.245, 0.946)
pt3dadd(-40.039, 429.292, -26.288, 0.904)
pt3dadd(-40.061, 429.409, -26.293, 0.844)
pt3dadd(-40.083, 429.527, -26.298, 0.784)
pt3dadd(-40.144, 429.618, -26.303, 0.724)
pt3dadd(-40.245, 429.682, -26.308, 0.664)
pt3dadd(-40.346, 429.737, -26.328, 0.606)
pt3dadd(-40.446, 429.78, -26.37, 0.552)
pt3dadd(-40.546, 429.836, -26.393, 0.508)
}
}
proc shape3d_118() {
dend_5[12] { pt3dadd(-40.639, 429.908, -26.404, 0.474)
pt3dadd(-40.71, 430.001, -26.428, 0.462)
pt3dadd(-40.781, 430.075, -26.467, 0.46)
pt3dadd(-40.852, 430.103, -26.544, 0.486)
pt3dadd(-40.936, 430.146, -26.591, 0.522)
pt3dadd(-41.038, 430.21, -26.596, 0.57)
pt3dadd(-41.122, 430.288, -26.6, 0.624)
pt3dadd(-41.168, 430.399, -26.6, 0.69)
pt3dadd(-41.215, 430.508, -26.6, 0.754)
pt3dadd(-41.309, 430.583, -26.6, 0.808)
pt3dadd(-41.381, 430.676, -26.6, 0.828)
pt3dadd(-41.438, 430.782, -26.6, 0.828)
pt3dadd(-41.494, 430.888, -26.6, 0.828)
pt3dadd(-41.551, 430.993, -26.6, 0.828)
pt3dadd(-41.607, 431.099, -26.6, 0.828)
pt3dadd(-41.649, 431.21, -26.603, 0.824)
pt3dadd(-41.67, 431.328, -26.611, 0.81)
pt3dadd(-41.691, 431.446, -26.619, 0.796)
pt3dadd(-41.713, 431.563, -26.627, 0.784)
pt3dadd(-41.734, 431.681, -26.635, 0.77)
pt3dadd(-41.755, 431.798, -26.642, 0.756)
pt3dadd(-41.795, 431.905, -26.671, 0.74)
pt3dadd(-41.84, 432.008, -26.707, 0.724)
pt3dadd(-41.886, 432.11, -26.742, 0.706)
pt3dadd(-41.931, 432.214, -26.777, 0.69)
pt3dadd(-41.964, 432.317, -26.816, 0.674)
pt3dadd(-41.975, 432.424, -26.861, 0.664)
pt3dadd(-41.986, 432.53, -26.907, 0.654)
pt3dadd(-41.997, 432.636, -26.952, 0.644)
pt3dadd(-42.007, 432.743, -26.998, 0.634)
pt3dadd(-42.031, 432.852, -27.028, 0.626)
pt3dadd(-42.069, 432.964, -27.042, 0.62)
pt3dadd(-42.108, 433.076, -27.056, 0.616)
pt3dadd(-42.147, 433.189, -27.07, 0.61)
pt3dadd(-42.185, 433.302, -27.083, 0.604)
pt3dadd(-42.212, 433.412, -27.066, 0.61)
pt3dadd(-42.231, 433.522, -27.029, 0.622)
pt3dadd(-42.243, 433.634, -27.025, 0.628)
pt3dadd(-42.249, 433.751, -27.05, 0.628)
pt3dadd(-42.287, 433.85, -27.073, 0.624)
pt3dadd(-42.383, 433.919, -27.09, 0.61)
pt3dadd(-42.477, 433.991, -27.102, 0.592)
pt3dadd(-42.567, 434.07, -27.108, 0.568)
pt3dadd(-42.661, 434.136, -27.127, 0.552)
pt3dadd(-42.757, 434.183, -27.168, 0.554)
pt3dadd(-42.845, 434.266, -27.175, 0.564)
pt3dadd(-42.932, 434.347, -27.182, 0.574)
pt3dadd(-43.02, 434.429, -27.189, 0.586)
pt3dadd(-43.107, 434.51, -27.196, 0.596)
pt3dadd(-43.182, 434.602, -27.2, 0.606)
pt3dadd(-43.235, 434.71, -27.2, 0.616)
pt3dadd(-43.289, 434.816, -27.2, 0.626)
pt3dadd(-43.342, 434.924, -27.2, 0.636)
pt3dadd(-43.396, 435.031, -27.2, 0.646)
pt3dadd(-43.441, 435.14, -27.2, 0.654)
pt3dadd(-43.447, 435.26, -27.2, 0.662)
pt3dadd(-43.453, 435.38, -27.2, 0.67)
pt3dadd(-43.459, 435.5, -27.2, 0.676)
pt3dadd(-43.465, 435.62, -27.2, 0.684)
pt3dadd(-43.471, 435.74, -27.2, 0.692)
pt3dadd(-43.477, 435.86, -27.2, 0.7)
pt3dadd(-43.511, 435.971, -27.201, 0.71)
pt3dadd(-43.576, 436.072, -27.203, 0.726)
pt3dadd(-43.64, 436.174, -27.205, 0.74)
pt3dadd(-43.704, 436.274, -27.208, 0.756)
pt3dadd(-43.768, 436.376, -27.21, 0.77)
pt3dadd(-43.827, 436.474, -27.234, 0.788)
pt3dadd(-43.881, 436.566, -27.279, 0.806)
pt3dadd(-43.936, 436.658, -27.324, 0.824)
pt3dadd(-43.99, 436.75, -27.369, 0.842)
pt3dadd(-44.041, 436.848, -27.405, 0.862)
pt3dadd(-44.086, 436.957, -27.421, 0.886)
pt3dadd(-44.144, 437.054, -27.442, 0.904)
pt3dadd(-44.239, 437.113, -27.479, 0.904)
pt3dadd(-44.335, 437.176, -27.5, 0.918)
pt3dadd(-44.434, 437.244, -27.5, 0.954)
pt3dadd(-44.508, 437.326, -27.5, 0.992)
pt3dadd(-44.513, 437.446, -27.5, 1.034)
pt3dadd(-44.517, 437.566, -27.5, 1.078)
pt3dadd(-44.52, 437.686, -27.5, 1.134)
pt3dadd(-44.52, 437.806, -27.5, 1.208)
pt3dadd(-44.546, 437.917, -27.5, 1.262)
pt3dadd(-44.615, 438.016, -27.5, 1.276)
pt3dadd(-44.684, 438.113, -27.5, 1.292)
pt3dadd(-44.753, 438.211, -27.5, 1.306)
pt3dadd(-44.822, 438.31, -27.5, 1.322)
pt3dadd(-44.877, 438.414, -27.506, 1.33)
pt3dadd(-44.905, 438.528, -27.523, 1.33)
pt3dadd(-44.934, 438.643, -27.541, 1.33)
pt3dadd(-44.963, 438.757, -27.558, 1.33)
pt3dadd(-44.991, 438.872, -27.576, 1.33)
pt3dadd(-45.025, 438.983, -27.599, 1.322)
pt3dadd(-45.077, 439.078, -27.642, 1.28)
pt3dadd(-45.109, 439.177, -27.686, 1.226)
pt3dadd(-45.116, 439.283, -27.733, 1.156)
pt3dadd(-45.139, 439.386, -27.771, 1.08)
pt3dadd(-45.208, 439.483, -27.789, 0.99)
pt3dadd(-45.288, 439.567, -27.8, 0.906)
pt3dadd(-45.392, 439.628, -27.8, 0.838)
pt3dadd(-45.489, 439.694, -27.8, 0.77)
pt3dadd(-45.554, 439.795, -27.8, 0.718)
pt3dadd(-45.627, 439.891, -27.802, 0.7)
pt3dadd(-45.703, 439.984, -27.804, 0.694)
pt3dadd(-45.779, 440.076, -27.806, 0.69)
pt3dadd(-45.855, 440.168, -27.808, 0.684)
pt3dadd(-45.932, 440.262, -27.811, 0.68)
pt3dadd(-46.008, 440.341, -27.847, 0.666)
pt3dadd(-46.085, 440.417, -27.889, 0.652)
pt3dadd(-46.187, 440.479, -27.894, 0.628)
pt3dadd(-46.288, 440.543, -27.9, 0.604)
pt3dadd(-46.351, 440.645, -27.9, 0.57)
pt3dadd(-46.412, 440.748, -27.9, 0.536)
pt3dadd(-46.434, 440.863, -27.9, 0.514)
pt3dadd(-46.443, 440.983, -27.9, 0.496)
pt3dadd(-46.453, 441.103, -27.9, 0.478)
pt3dadd(-46.504, 441.206, -27.875, 0.44)
pt3dadd(-46.549, 441.308, -27.838, 0.418)
pt3dadd(-46.592, 441.409, -27.797, 0.404)
pt3dadd(-46.659, 441.493, -27.756, 0.39)
pt3dadd(-46.728, 441.575, -27.733, 0.38)
pt3dadd(-46.778, 441.656, -27.794, 0.394)
pt3dadd(-46.81, 441.754, -27.843, 0.408)
pt3dadd(-46.83, 441.863, -27.88, 0.42)
pt3dadd(-46.863, 441.97, -27.887, 0.434)
pt3dadd(-46.914, 442.073, -27.859, 0.45)
pt3dadd(-46.964, 442.177, -27.831, 0.466)
pt3dadd(-47.016, 442.282, -27.81, 0.484)
pt3dadd(-47.072, 442.387, -27.805, 0.506)
pt3dadd(-47.125, 442.494, -27.8, 0.54)
pt3dadd(-47.159, 442.609, -27.8, 0.61)
pt3dadd(-47.199, 442.722, -27.8, 0.63)
pt3dadd(-47.239, 442.836, -27.8, 0.652)
pt3dadd(-47.256, 442.954, -27.814, 0.664)
pt3dadd(-47.273, 443.071, -27.827, 0.674)
pt3dadd(-47.319, 443.172, -27.855, 0.686)
pt3dadd(-47.386, 443.261, -27.892, 0.7)
pt3dadd(-47.487, 443.317, -27.9, 0.728)
pt3dadd(-47.597, 443.363, -27.9, 0.762)
pt3dadd(-47.701, 443.422, -27.9, 0.796)
pt3dadd(-47.798, 443.492, -27.9, 0.83)
pt3dadd(-47.895, 443.563, -27.9, 0.866)
pt3dadd(-47.992, 443.634, -27.9, 0.902)
pt3dadd(-48, 443.75, -27.9, 0.934)
pt3dadd(-48, 443.87, -27.9, 0.968)
pt3dadd(-48, 443.99, -27.9, 1.002)
pt3dadd(-48.012, 444.104, -27.928, 1.012)
pt3dadd(-48.026, 444.217, -27.958, 1.02)
pt3dadd(-48.039, 444.331, -27.988, 1.03)
pt3dadd(-48.13, 444.403, -28.012, 0.99)
pt3dadd(-48.225, 444.467, -28.035, 0.95)
pt3dadd(-48.343, 444.472, -28.056, 0.912)
pt3dadd(-48.46, 444.475, -28.076, 0.874)
pt3dadd(-48.578, 444.479, -28.096, 0.836)
pt3dadd(-48.686, 444.526, -28.104, 0.782)
pt3dadd(-48.792, 444.582, -28.109, 0.722)
pt3dadd(-48.856, 444.668, -28.134, 0.578)
pt3dadd(-48.957, 444.732, -28.148, 0.566)
pt3dadd(-49.057, 444.796, -28.162, 0.556)
pt3dadd(-49.158, 444.858, -28.177, 0.544)
pt3dadd(-49.258, 444.922, -28.191, 0.534)
pt3dadd(-49.363, 444.978, -28.2, 0.522)
pt3dadd(-49.473, 445.025, -28.2, 0.512)
pt3dadd(-49.584, 445.072, -28.2, 0.506)
pt3dadd(-49.695, 445.118, -28.2, 0.538)
pt3dadd(-49.805, 445.165, -28.2, 0.572)
pt3dadd(-49.876, 445.236, -28.153, 0.59)
pt3dadd(-49.94, 445.309, -28.096, 0.602)
pt3dadd(-50.032, 445.337, -28.037, 0.602)
pt3dadd(-50.123, 445.375, -27.983, 0.596)
pt3dadd(-50.206, 445.453, -27.954, 0.564)
pt3dadd(-50.29, 445.532, -27.925, 0.53)
pt3dadd(-50.376, 445.608, -27.9, 0.496)
pt3dadd(-50.484, 445.661, -27.9, 0.45)
pt3dadd(-50.591, 445.715, -27.9, 0.406)
pt3dadd(-50.686, 445.78, -27.923, 0.326)
pt3dadd(-50.762, 445.856, -27.967, 0.326)
pt3dadd(-50.847, 445.931, -27.983, 0.348)
pt3dadd(-50.942, 446.003, -27.971, 0.388)
pt3dadd(-51.021, 446.032, -27.913, 0.434)
pt3dadd(-51.092, 446.038, -27.832, 0.482)
pt3dadd(-51.161, 446.082, -27.765, 0.546)
pt3dadd(-51.231, 446.15, -27.708, 0.618)
pt3dadd(-51.287, 446.252, -27.7, 0.672)
pt3dadd(-51.343, 446.358, -27.692, 0.706)
pt3dadd(-51.402, 446.459, -27.669, 0.71)
pt3dadd(-51.461, 446.56, -27.647, 0.716)
pt3dadd(-51.52, 446.66, -27.625, 0.722)
pt3dadd(-51.58, 446.761, -27.603, 0.728)
pt3dadd(-51.666, 446.827, -27.562, 0.712)
pt3dadd(-51.756, 446.887, -27.52, 0.694)
pt3dadd(-51.845, 446.948, -27.477, 0.676)
pt3dadd(-51.935, 447.01, -27.434, 0.658)
pt3dadd(-52.025, 447.083, -27.417, 0.632)
pt3dadd(-52.116, 447.162, -27.411, 0.602)
pt3dadd(-52.206, 447.24, -27.404, 0.572)
pt3dadd(-52.279, 447.324, -27.382, 0.54)
pt3dadd(-52.315, 447.418, -27.328, 0.498)
pt3dadd(-52.373, 447.492, -27.273, 0.478)
pt3dadd(-52.456, 447.546, -27.216, 0.478)
pt3dadd(-52.561, 447.589, -27.2, 0.508)
}
}
proc shape3d_119() {
dend_5[12] { pt3dadd(-52.675, 447.628, -27.2, 0.55)
pt3dadd(-52.779, 447.683, -27.2, 0.604)
pt3dadd(-52.867, 447.764, -27.2, 0.674)
pt3dadd(-52.962, 447.828, -27.2, 0.75)
pt3dadd(-53.082, 447.835, -27.2, 0.844)
pt3dadd(-53.202, 447.84, -27.2, 0.93)
pt3dadd(-53.322, 447.84, -27.2, 0.98)
pt3dadd(-53.442, 447.84, -27.2, 0.944)
pt3dadd(-53.561, 447.845, -27.2, 0.83)
pt3dadd(-53.679, 447.868, -27.2, 0.684)
pt3dadd(-53.78, 447.929, -27.2, 0.56)
pt3dadd(-53.852, 448.024, -27.2, 0.568)
pt3dadd(-53.905, 448.13, -27.2, 0.65)
pt3dadd(-53.959, 448.237, -27.2, 0.776)
pt3dadd(-53.989, 448.354, -27.2, 0.958)
pt3dadd(-54, 448.474, -27.2, 1.114)
pt3dadd(-54.004, 448.592, -27.2, 1.212)
pt3dadd(-54.02, 448.711, -27.2, 1.228)
pt3dadd(-54.037, 448.83, -27.2, 1.224)
pt3dadd(-54.054, 448.949, -27.2, 1.22)
pt3dadd(-54.072, 449.068, -27.2, 1.216)
pt3dadd(-54.089, 449.186, -27.2, 1.212)
pt3dadd(-54.106, 449.305, -27.2, 1.208)
pt3dadd(-54.123, 449.424, -27.196, 1.202)
pt3dadd(-54.138, 449.54, -27.177, 1.182)
pt3dadd(-54.153, 449.658, -27.159, 1.164)
pt3dadd(-54.168, 449.774, -27.14, 1.146)
pt3dadd(-54.183, 449.892, -27.122, 1.126)
pt3dadd(-54.198, 450.008, -27.103, 1.108)
pt3dadd(-54.24, 450.12, -27.1, 0.904)
}
apic[21] {pt3dclear()
pt3dadd(33.827, 250.92, -16.489, 1.808)
pt3dadd(33.841, 250.928, -16.505, 1.814)
pt3dadd(33.909, 250.97, -16.58, 1.846)
pt3dadd(33.977, 251.012, -16.654, 1.878)
pt3dadd(34.045, 251.054, -16.729, 1.91)
pt3dadd(34.113, 251.095, -16.804, 1.942)
pt3dadd(34.181, 251.137, -16.879, 1.974)
pt3dadd(34.248, 251.179, -16.954, 2.006)
pt3dadd(34.316, 251.221, -17.028, 2.038)
pt3dadd(34.384, 251.263, -17.103, 2.07)
pt3dadd(34.452, 251.304, -17.178, 2.102)
pt3dadd(34.52, 251.346, -17.253, 2.134)
pt3dadd(34.588, 251.388, -17.327, 2.166)
pt3dadd(34.656, 251.43, -17.402, 2.198)
pt3dadd(34.723, 251.471, -17.477, 2.23)
pt3dadd(34.791, 251.513, -17.552, 2.262)
pt3dadd(34.859, 251.555, -17.627, 2.294)
pt3dadd(34.927, 251.597, -17.701, 2.326)
pt3dadd(34.995, 251.638, -17.776, 2.358)
pt3dadd(35.063, 251.68, -17.851, 2.39)
pt3dadd(35.096, 251.747, -17.9, 2.404)
pt3dadd(35.063, 251.862, -17.9, 2.38)
pt3dadd(35.03, 251.977, -17.9, 2.358)
pt3dadd(34.997, 252.094, -17.9, 2.336)
pt3dadd(34.963, 252.209, -17.9, 2.314)
pt3dadd(34.93, 252.324, -17.9, 2.292)
pt3dadd(34.906, 252.442, -17.9, 2.276)
pt3dadd(34.887, 252.559, -17.9, 2.264)
pt3dadd(34.867, 252.678, -17.9, 2.252)
pt3dadd(34.847, 252.797, -17.9, 2.24)
pt3dadd(34.828, 252.914, -17.9, 2.228)
pt3dadd(34.808, 253.033, -17.9, 2.214)
pt3dadd(34.8, 253.152, -17.9, 2.212)
pt3dadd(34.8, 253.272, -17.9, 2.216)
pt3dadd(34.8, 253.392, -17.9, 2.22)
pt3dadd(34.8, 253.512, -17.9, 2.222)
pt3dadd(34.8, 253.632, -17.9, 2.226)
pt3dadd(34.8, 253.752, -17.9, 2.23)
pt3dadd(34.8, 253.872, -17.9, 2.234)
pt3dadd(34.8, 253.992, -17.9, 2.234)
pt3dadd(34.8, 254.112, -17.9, 2.234)
pt3dadd(34.8, 254.232, -17.9, 2.234)
pt3dadd(34.8, 254.352, -17.9, 2.234)
pt3dadd(34.8, 254.472, -17.9, 2.234)
pt3dadd(34.8, 254.592, -17.9, 2.234)
pt3dadd(34.8, 254.712, -17.9, 2.234)
pt3dadd(34.8, 254.832, -17.9, 2.23)
pt3dadd(34.8, 254.952, -17.9, 2.224)
pt3dadd(34.8, 255.072, -17.9, 2.216)
pt3dadd(34.8, 255.192, -17.9, 2.21)
pt3dadd(34.8, 255.312, -17.9, 2.202)
pt3dadd(34.8, 255.432, -17.9, 2.194)
pt3dadd(34.8, 255.552, -17.9, 2.188)
pt3dadd(34.788, 255.671, -17.9, 2.17)
pt3dadd(34.768, 255.79, -17.9, 2.144)
pt3dadd(34.749, 255.908, -17.9, 2.12)
pt3dadd(34.729, 256.026, -17.9, 2.096)
pt3dadd(34.709, 256.145, -17.9, 2.07)
pt3dadd(34.689, 256.264, -17.9, 2.046)
pt3dadd(34.68, 256.382, -17.9, 2.03)
pt3dadd(34.68, 256.502, -17.9, 2.024)
pt3dadd(34.68, 256.622, -17.9, 2.016)
pt3dadd(34.68, 256.742, -17.9, 2.008)
pt3dadd(34.68, 256.862, -17.9, 2.002)
pt3dadd(34.68, 256.982, -17.9, 1.994)
pt3dadd(34.68, 257.102, -17.9, 1.988)
pt3dadd(34.68, 257.222, -17.9, 1.988)
pt3dadd(34.68, 257.342, -17.9, 1.994)
pt3dadd(34.68, 257.462, -17.9, 2.002)
pt3dadd(34.68, 257.582, -17.9, 2.01)
pt3dadd(34.68, 257.702, -17.9, 2.016)
pt3dadd(34.68, 257.822, -17.9, 2.024)
pt3dadd(34.68, 257.942, -17.9, 2.03)
pt3dadd(34.68, 258.062, -17.905, 2.042)
pt3dadd(34.68, 258.181, -17.916, 2.058)
pt3dadd(34.68, 258.301, -17.926, 2.074)
pt3dadd(34.68, 258.42, -17.937, 2.09)
pt3dadd(34.68, 258.539, -17.947, 2.106)
pt3dadd(34.68, 258.659, -17.958, 2.122)
pt3dadd(34.68, 258.776, -17.974, 2.136)
pt3dadd(34.68, 258.883, -18.018, 2.14)
pt3dadd(34.68, 258.991, -18.063, 2.144)
pt3dadd(34.68, 259.098, -18.108, 2.15)
pt3dadd(34.68, 259.206, -18.152, 2.154)
pt3dadd(34.68, 259.313, -18.197, 2.16)
pt3dadd(34.68, 259.432, -18.2, 2.15)
pt3dadd(34.68, 259.552, -18.2, 2.138)
pt3dadd(34.68, 259.672, -18.2, 2.128)
pt3dadd(34.68, 259.792, -18.2, 2.118)
pt3dadd(34.68, 259.912, -18.2, 2.106)
pt3dadd(34.68, 260.032, -18.2, 2.096)
pt3dadd(34.68, 260.152, -18.2, 2.084)
pt3dadd(34.672, 260.272, -18.2, 2.066)
pt3dadd(34.665, 260.392, -18.2, 2.048)
pt3dadd(34.656, 260.512, -18.2, 2.028)
pt3dadd(34.648, 260.632, -18.2, 2.01)
pt3dadd(34.64, 260.75, -18.2, 1.99)
pt3dadd(34.632, 260.87, -18.2, 1.97)
pt3dadd(34.607, 260.986, -18.2, 1.95)
pt3dadd(34.55, 261.091, -18.2, 1.926)
pt3dadd(34.493, 261.197, -18.2, 1.902)
pt3dadd(34.436, 261.302, -18.2, 1.878)
pt3dadd(34.379, 261.408, -18.2, 1.852)
pt3dadd(34.333, 261.516, -18.2, 1.83)
pt3dadd(34.331, 261.636, -18.2, 1.816)
pt3dadd(34.329, 261.756, -18.2, 1.802)
pt3dadd(34.327, 261.876, -18.2, 1.786)
pt3dadd(34.325, 261.996, -18.2, 1.772)
pt3dadd(34.323, 262.116, -18.2, 1.758)
pt3dadd(34.321, 262.236, -18.2, 1.742)
pt3dadd(34.32, 262.356, -18.205, 1.728)
pt3dadd(34.32, 262.474, -18.221, 1.716)
pt3dadd(34.32, 262.592, -18.238, 1.704)
pt3dadd(34.32, 262.711, -18.254, 1.692)
pt3dadd(34.32, 262.829, -18.271, 1.68)
pt3dadd(34.32, 262.948, -18.287, 1.666)
pt3dadd(34.314, 263.065, -18.3, 1.652)
pt3dadd(34.287, 263.183, -18.3, 1.626)
pt3dadd(34.259, 263.299, -18.3, 1.6)
pt3dadd(34.232, 263.416, -18.3, 1.574)
pt3dadd(34.204, 263.533, -18.3, 1.548)
pt3dadd(34.177, 263.65, -18.3, 1.522)
pt3dadd(34.14, 263.762, -18.307, 1.49)
pt3dadd(34.089, 263.868, -18.327, 1.446)
pt3dadd(34.037, 263.974, -18.346, 1.404)
pt3dadd(33.985, 264.08, -18.365, 1.36)
pt3dadd(33.934, 264.186, -18.384, 1.318)
pt3dadd(33.88, 264.293, -18.39, 1.28)
pt3dadd(33.825, 264.4, -18.393, 1.246)
pt3dadd(33.77, 264.505, -18.395, 1.212)
pt3dadd(33.715, 264.612, -18.397, 1.178)
pt3dadd(33.66, 264.719, -18.399, 1.144)
pt3dadd(33.635, 264.833, -18.412, 1.128)
pt3dadd(33.628, 264.95, -18.432, 1.122)
pt3dadd(33.621, 265.068, -18.451, 1.118)
pt3dadd(33.614, 265.184, -18.471, 1.114)
pt3dadd(33.607, 265.302, -18.49, 1.11)
pt3dadd(33.6, 265.42, -18.51, 1.106)
pt3dadd(33.6, 265.535, -18.537, 1.126)
pt3dadd(33.6, 265.651, -18.565, 1.148)
pt3dadd(33.6, 265.766, -18.592, 1.17)
pt3dadd(33.6, 265.882, -18.62, 1.192)
pt3dadd(33.6, 265.997, -18.647, 1.214)
pt3dadd(33.6, 266.112, -18.674, 1.236)
pt3dadd(33.6, 266.228, -18.699, 1.258)
pt3dadd(33.6, 266.345, -18.724, 1.28)
pt3dadd(33.6, 266.461, -18.749, 1.302)
pt3dadd(33.6, 266.578, -18.774, 1.324)
pt3dadd(33.6, 266.693, -18.799, 1.346)
pt3dadd(33.6, 266.81, -18.819, 1.362)
pt3dadd(33.6, 266.929, -18.833, 1.374)
pt3dadd(33.6, 267.048, -18.848, 1.386)
pt3dadd(33.6, 267.167, -18.862, 1.4)
pt3dadd(33.6, 267.286, -18.876, 1.412)
pt3dadd(33.6, 267.404, -18.891, 1.424)
pt3dadd(33.581, 267.517, -18.911, 1.434)
pt3dadd(33.53, 267.619, -18.941, 1.438)
pt3dadd(33.479, 267.722, -18.971, 1.444)
pt3dadd(33.428, 267.824, -19.001, 1.45)
pt3dadd(33.377, 267.926, -19.031, 1.456)
pt3dadd(33.35, 268.043, -19.045, 1.466)
pt3dadd(33.325, 268.159, -19.057, 1.474)
pt3dadd(33.301, 268.276, -19.07, 1.484)
pt3dadd(33.276, 268.392, -19.082, 1.494)
pt3dadd(33.251, 268.508, -19.095, 1.502)
pt3dadd(33.227, 268.624, -19.111, 1.518)
pt3dadd(33.204, 268.74, -19.13, 1.536)
pt3dadd(33.181, 268.855, -19.149, 1.556)
pt3dadd(33.158, 268.97, -19.168, 1.576)
pt3dadd(33.135, 269.086, -19.188, 1.594)
}
}
proc shape3d_120() {
apic[21] { pt3dadd(33.11, 269.194, -19.221, 1.616)
pt3dadd(33.083, 269.287, -19.279, 1.638)
pt3dadd(33.056, 269.381, -19.337, 1.66)
pt3dadd(33.028, 269.474, -19.395, 1.684)
pt3dadd(33.001, 269.569, -19.453, 1.706)
pt3dadd(32.98, 269.682, -19.479, 1.732)
pt3dadd(32.959, 269.797, -19.502, 1.756)
pt3dadd(32.938, 269.912, -19.526, 1.78)
pt3dadd(32.917, 270.026, -19.55, 1.804)
pt3dadd(32.897, 270.142, -19.574, 1.83)
pt3dadd(32.883, 270.257, -19.597, 1.844)
pt3dadd(32.871, 270.373, -19.619, 1.858)
pt3dadd(32.859, 270.49, -19.642, 1.872)
pt3dadd(32.846, 270.606, -19.665, 1.886)
pt3dadd(32.834, 270.722, -19.687, 1.9)
pt3dadd(32.81, 270.835, -19.71, 1.906)
pt3dadd(32.77, 270.946, -19.734, 1.9)
pt3dadd(32.731, 271.055, -19.757, 1.896)
pt3dadd(32.691, 271.165, -19.781, 1.89)
pt3dadd(32.652, 271.274, -19.804, 1.884)
pt3dadd(32.626, 271.39, -19.823, 1.864)
pt3dadd(32.606, 271.506, -19.839, 1.836)
pt3dadd(32.586, 271.622, -19.856, 1.808)
pt3dadd(32.566, 271.739, -19.872, 1.78)
pt3dadd(32.546, 271.855, -19.889, 1.752)
pt3dadd(32.533, 271.974, -19.9, 1.724)
pt3dadd(32.531, 272.094, -19.9, 1.694)
pt3dadd(32.529, 272.214, -19.9, 1.664)
pt3dadd(32.527, 272.334, -19.9, 1.636)
pt3dadd(32.525, 272.454, -19.9, 1.606)
pt3dadd(32.523, 272.574, -19.9, 1.578)
pt3dadd(32.521, 272.694, -19.9, 1.548)
pt3dadd(32.502, 272.81, -19.9, 1.522)
pt3dadd(32.46, 272.923, -19.9, 1.498)
pt3dadd(32.418, 273.035, -19.9, 1.476)
pt3dadd(32.377, 273.148, -19.9, 1.452)
pt3dadd(32.335, 273.26, -19.9, 1.43)
pt3dadd(32.293, 273.373, -19.9, 1.406)
pt3dadd(32.289, 273.493, -19.9, 1.388)
pt3dadd(32.284, 273.613, -19.9, 1.372)
pt3dadd(32.278, 273.732, -19.9, 1.356)
pt3dadd(32.264, 273.852, -19.9, 1.366)
pt3dadd(32.249, 273.971, -19.9, 1.376)
pt3dadd(32.224, 274.087, -19.9, 1.398)
pt3dadd(32.184, 274.2, -19.9, 1.442)
pt3dadd(32.141, 274.312, -19.901, 1.486)
pt3dadd(32.049, 274.382, -19.925, 1.566)
pt3dadd(31.96, 274.441, -19.959, 1.652)
pt3dadd(31.892, 274.452, -20.041, 1.764)
pt3dadd(31.827, 274.536, -20.063, 1.788)
pt3dadd(31.763, 274.637, -20.073, 1.792)
pt3dadd(31.698, 274.738, -20.082, 1.798)
pt3dadd(31.634, 274.838, -20.091, 1.804)
pt3dadd(31.572, 274.939, -20.101, 1.808)
pt3dadd(31.555, 275.057, -20.117, 1.798)
pt3dadd(31.538, 275.174, -20.134, 1.79)
pt3dadd(31.521, 275.291, -20.15, 1.78)
pt3dadd(31.504, 275.408, -20.166, 1.77)
pt3dadd(31.487, 275.526, -20.182, 1.762)
pt3dadd(31.463, 275.642, -20.19, 1.744)
pt3dadd(31.435, 275.759, -20.192, 1.722)
pt3dadd(31.407, 275.875, -20.194, 1.7)
pt3dadd(31.379, 275.993, -20.196, 1.678)
pt3dadd(31.351, 276.109, -20.198, 1.656)
pt3dadd(31.323, 276.226, -20.2, 1.634)
pt3dadd(31.32, 276.346, -20.2, 1.61)
pt3dadd(31.32, 276.466, -20.2, 1.584)
pt3dadd(31.32, 276.586, -20.2, 1.56)
pt3dadd(31.32, 276.706, -20.2, 1.534)
pt3dadd(31.32, 276.826, -20.2, 1.51)
pt3dadd(31.32, 276.946, -20.2, 1.484)
pt3dadd(31.32, 277.066, -20.2, 1.46)
pt3dadd(31.32, 277.183, -20.216, 1.42)
pt3dadd(31.32, 277.302, -20.235, 1.378)
pt3dadd(31.32, 277.42, -20.253, 1.336)
pt3dadd(31.32, 277.537, -20.272, 1.294)
pt3dadd(31.32, 277.655, -20.29, 1.252)
pt3dadd(31.32, 277.774, -20.309, 1.21)
pt3dadd(31.32, 277.891, -20.324, 1.17)
pt3dadd(31.32, 278.01, -20.338, 1.128)
pt3dadd(31.32, 278.129, -20.353, 1.088)
pt3dadd(31.32, 278.248, -20.367, 1.048)
pt3dadd(31.32, 278.366, -20.381, 1.006)
pt3dadd(31.32, 278.485, -20.396, 0.966)
pt3dadd(31.318, 278.599, -20.427, 0.938)
pt3dadd(31.316, 278.71, -20.465, 0.914)
pt3dadd(31.313, 278.821, -20.502, 0.89)
pt3dadd(31.311, 278.932, -20.54, 0.866)
pt3dadd(31.308, 279.043, -20.578, 0.842)
pt3dadd(31.286, 279.152, -20.609, 0.828)
pt3dadd(31.237, 279.258, -20.631, 0.828)
pt3dadd(31.188, 279.365, -20.652, 0.828)
pt3dadd(31.139, 279.472, -20.674, 0.828)
pt3dadd(31.09, 279.578, -20.695, 0.828)
pt3dadd(31.08, 279.695, -20.7, 0.84)
pt3dadd(31.08, 279.815, -20.7, 0.854)
pt3dadd(31.08, 279.935, -20.7, 0.868)
pt3dadd(31.08, 280.055, -20.7, 0.884)
pt3dadd(31.08, 280.175, -20.7, 0.898)
pt3dadd(31.08, 280.295, -20.7, 0.912)
pt3dadd(31.08, 280.415, -20.7, 0.926)
pt3dadd(31.08, 280.535, -20.7, 0.94)
pt3dadd(31.08, 280.655, -20.7, 0.954)
pt3dadd(31.08, 280.775, -20.7, 0.97)
pt3dadd(31.08, 280.895, -20.7, 0.984)
pt3dadd(31.08, 281.015, -20.7, 0.998)
pt3dadd(31.08, 281.135, -20.7, 1.012)
pt3dadd(31.08, 281.255, -20.7, 1.026)
pt3dadd(31.08, 281.375, -20.7, 1.044)
pt3dadd(31.08, 281.495, -20.7, 1.062)
pt3dadd(31.08, 281.615, -20.7, 1.08)
pt3dadd(31.08, 281.735, -20.7, 1.098)
pt3dadd(31.08, 281.855, -20.7, 1.116)
pt3dadd(31.08, 281.975, -20.7, 1.134)
pt3dadd(31.08, 282.095, -20.7, 1.152)
pt3dadd(31.064, 282.214, -20.7, 1.162)
pt3dadd(31.045, 282.332, -20.7, 1.17)
pt3dadd(31.025, 282.45, -20.7, 1.178)
pt3dadd(31.005, 282.569, -20.7, 1.186)
pt3dadd(30.985, 282.688, -20.7, 1.194)
pt3dadd(30.966, 282.805, -20.7, 1.202)
pt3dadd(30.96, 282.925, -20.7, 1.216)
pt3dadd(30.96, 283.045, -20.7, 1.23)
pt3dadd(30.96, 283.165, -20.7, 1.244)
pt3dadd(30.96, 283.285, -20.7, 1.258)
pt3dadd(30.96, 283.405, -20.7, 1.272)
pt3dadd(30.96, 283.525, -20.7, 1.288)
pt3dadd(30.96, 283.645, -20.7, 1.302)
pt3dadd(30.96, 283.765, -20.7, 1.31)
pt3dadd(30.96, 283.885, -20.7, 1.318)
pt3dadd(30.96, 284.005, -20.7, 1.326)
pt3dadd(30.96, 284.125, -20.7, 1.332)
pt3dadd(30.96, 284.245, -20.7, 1.34)
pt3dadd(30.96, 284.365, -20.7, 1.346)
pt3dadd(30.96, 284.485, -20.7, 1.354)
pt3dadd(30.946, 284.604, -20.7, 1.37)
pt3dadd(30.926, 284.723, -20.7, 1.392)
pt3dadd(30.907, 284.84, -20.7, 1.412)
pt3dadd(30.887, 284.959, -20.7, 1.432)
pt3dadd(30.867, 285.078, -20.7, 1.454)
pt3dadd(30.847, 285.196, -20.7, 1.474)
pt3dadd(30.84, 285.316, -20.703, 1.486)
pt3dadd(30.84, 285.434, -20.708, 1.494)
pt3dadd(30.84, 285.554, -20.713, 1.502)
pt3dadd(30.84, 285.674, -20.718, 1.51)
pt3dadd(30.84, 285.794, -20.723, 1.516)
pt3dadd(30.84, 285.914, -20.728, 1.524)
pt3dadd(30.84, 286.034, -20.733, 1.532)
pt3dadd(30.84, 286.15, -20.762, 1.548)
pt3dadd(30.84, 286.264, -20.792, 1.566)
pt3dadd(30.84, 286.378, -20.821, 1.584)
pt3dadd(30.84, 286.493, -20.851, 1.602)
pt3dadd(30.84, 286.607, -20.881, 1.62)
pt3dadd(30.825, 286.721, -20.9, 1.638)
pt3dadd(30.783, 286.834, -20.9, 1.658)
pt3dadd(30.742, 286.946, -20.9, 1.676)
pt3dadd(30.7, 287.058, -20.9, 1.694)
pt3dadd(30.658, 287.171, -20.9, 1.712)
pt3dadd(30.617, 287.284, -20.9, 1.732)
pt3dadd(30.611, 287.404, -20.9, 1.746)
pt3dadd(30.609, 287.524, -20.9, 1.76)
pt3dadd(30.608, 287.644, -20.9, 1.776)
pt3dadd(30.606, 287.762, -20.9, 1.79)
pt3dadd(30.604, 287.882, -20.9, 1.804)
pt3dadd(30.602, 288.002, -20.9, 1.818)
pt3dadd(30.6, 288.122, -20.9, 1.834)
pt3dadd(30.6, 288.242, -20.9, 1.84)
pt3dadd(30.6, 288.362, -20.9, 1.848)
pt3dadd(30.6, 288.482, -20.9, 1.854)
pt3dadd(30.6, 288.602, -20.9, 1.862)
pt3dadd(30.6, 288.722, -20.9, 1.87)
pt3dadd(30.6, 288.842, -20.9, 1.876)
pt3dadd(30.6, 288.962, -20.9, 1.884)
pt3dadd(30.6, 289.082, -20.9, 1.88)
pt3dadd(30.6, 289.202, -20.9, 1.876)
pt3dadd(30.6, 289.322, -20.9, 1.872)
pt3dadd(30.6, 289.442, -20.9, 1.868)
pt3dadd(30.6, 289.562, -20.9, 1.866)
pt3dadd(30.6, 289.682, -20.9, 1.862)
pt3dadd(30.6, 289.802, -20.9, 1.858)
pt3dadd(30.6, 289.922, -20.9, 1.848)
pt3dadd(30.6, 290.042, -20.9, 1.836)
pt3dadd(30.6, 290.162, -20.9, 1.826)
pt3dadd(30.6, 290.282, -20.9, 1.816)
pt3dadd(30.6, 290.402, -20.9, 1.804)
pt3dadd(30.6, 290.522, -20.9, 1.794)
pt3dadd(30.6, 290.642, -20.9, 1.782)
pt3dadd(30.6, 290.762, -20.9, 1.76)
pt3dadd(30.6, 290.882, -20.9, 1.74)
pt3dadd(30.6, 291.002, -20.9, 1.718)
pt3dadd(30.6, 291.122, -20.9, 1.696)
pt3dadd(30.6, 291.242, -20.9, 1.674)
pt3dadd(30.6, 291.362, -20.9, 1.654)
pt3dadd(30.6, 291.482, -20.9, 1.632)
pt3dadd(30.6, 291.601, -20.917, 1.598)
pt3dadd(30.6, 291.72, -20.933, 1.566)
pt3dadd(30.6, 291.838, -20.95, 1.532)
pt3dadd(30.6, 291.956, -20.966, 1.5)
pt3dadd(30.6, 292.075, -20.983, 1.466)
pt3dadd(30.6, 292.193, -20.999, 1.434)
}
}
proc shape3d_121() {
apic[21] { pt3dadd(30.6, 292.313, -21, 1.414)
pt3dadd(30.6, 292.433, -21, 1.396)
pt3dadd(30.6, 292.553, -21, 1.378)
pt3dadd(30.6, 292.673, -21, 1.36)
pt3dadd(30.6, 292.793, -21, 1.342)
pt3dadd(30.6, 292.913, -21, 1.324)
pt3dadd(30.6, 293.033, -21, 1.306)
pt3dadd(30.6, 293.153, -21, 1.302)
pt3dadd(30.6, 293.273, -21, 1.298)
pt3dadd(30.6, 293.393, -21, 1.296)
pt3dadd(30.6, 293.513, -21, 1.292)
pt3dadd(30.6, 293.633, -21, 1.288)
pt3dadd(30.6, 293.753, -21, 1.284)
pt3dadd(30.6, 293.873, -21, 1.28)
pt3dadd(30.552, 293.982, -21.002, 1.294)
pt3dadd(30.5, 294.09, -21.004, 1.308)
pt3dadd(30.448, 294.199, -21.006, 1.324)
pt3dadd(30.397, 294.307, -21.009, 1.338)
pt3dadd(30.345, 294.415, -21.011, 1.352)
pt3dadd(30.314, 294.529, -21.024, 1.352)
pt3dadd(30.288, 294.644, -21.041, 1.348)
pt3dadd(30.263, 294.76, -21.059, 1.342)
pt3dadd(30.237, 294.876, -21.076, 1.338)
pt3dadd(30.211, 294.991, -21.093, 1.332)
pt3dadd(30.178, 295.105, -21.1, 1.32)
pt3dadd(30.14, 295.219, -21.1, 1.302)
pt3dadd(30.101, 295.332, -21.1, 1.284)
pt3dadd(30.062, 295.446, -21.1, 1.266)
pt3dadd(30.023, 295.56, -21.1, 1.248)
pt3dadd(29.985, 295.673, -21.101, 1.228)
pt3dadd(29.962, 295.789, -21.12, 1.194)
pt3dadd(29.939, 295.904, -21.14, 1.16)
pt3dadd(29.916, 296.02, -21.159, 1.128)
pt3dadd(29.893, 296.135, -21.178, 1.094)
pt3dadd(29.87, 296.251, -21.197, 1.06)
pt3dadd(29.796, 296.342, -21.2, 1.014)
pt3dadd(29.714, 296.43, -21.2, 0.966)
pt3dadd(29.678, 296.54, -21.2, 0.94)
pt3dadd(29.658, 296.658, -21.2, 0.92)
pt3dadd(29.64, 296.776, -21.205, 0.904)
pt3dadd(29.64, 296.89, -21.238, 0.904)
pt3dadd(29.64, 297.002, -21.271, 0.904)
pt3dadd(29.64, 297.08, -21.343, 0.914)
pt3dadd(29.64, 297.148, -21.425, 0.924)
pt3dadd(29.64, 297.246, -21.473, 0.938)
pt3dadd(29.64, 297.361, -21.5, 0.954)
pt3dadd(29.64, 297.48, -21.514, 0.966)
pt3dadd(29.64, 297.599, -21.529, 0.978)
pt3dadd(29.64, 297.718, -21.543, 0.992)
pt3dadd(29.64, 297.836, -21.558, 1.004)
pt3dadd(29.64, 297.955, -21.572, 1.016)
pt3dadd(29.64, 298.074, -21.587, 1.028)
pt3dadd(29.64, 298.193, -21.59, 1.036)
pt3dadd(29.64, 298.313, -21.592, 1.042)
pt3dadd(29.64, 298.433, -21.594, 1.05)
pt3dadd(29.64, 298.553, -21.595, 1.058)
pt3dadd(29.64, 298.673, -21.597, 1.064)
pt3dadd(29.64, 298.793, -21.598, 1.072)
pt3dadd(29.64, 298.913, -21.6, 1.08)
pt3dadd(29.64, 299.032, -21.614, 1.088)
pt3dadd(29.64, 299.15, -21.628, 1.096)
pt3dadd(29.64, 299.269, -21.642, 1.104)
pt3dadd(29.64, 299.388, -21.657, 1.112)
pt3dadd(29.64, 299.507, -21.671, 1.12)
pt3dadd(29.64, 299.626, -21.686, 1.128)
pt3dadd(29.64, 299.746, -21.69, 1.128)
pt3dadd(29.64, 299.866, -21.692, 1.124)
pt3dadd(29.64, 299.986, -21.693, 1.12)
pt3dadd(29.64, 300.106, -21.695, 1.116)
pt3dadd(29.64, 300.226, -21.697, 1.112)
pt3dadd(29.64, 300.346, -21.698, 1.108)
pt3dadd(29.64, 300.466, -21.7, 1.106)
pt3dadd(29.64, 300.584, -21.715, 1.098)
pt3dadd(29.64, 300.702, -21.731, 1.09)
pt3dadd(29.64, 300.821, -21.747, 1.082)
pt3dadd(29.64, 300.94, -21.764, 1.072)
pt3dadd(29.64, 301.057, -21.78, 1.064)
pt3dadd(29.64, 301.176, -21.797, 1.056)
pt3dadd(29.64, 301.296, -21.8, 1.05)
pt3dadd(29.64, 301.416, -21.8, 1.042)
pt3dadd(29.64, 301.536, -21.8, 1.034)
pt3dadd(29.64, 301.656, -21.8, 1.028)
pt3dadd(29.64, 301.776, -21.8, 1.02)
pt3dadd(29.64, 301.896, -21.8, 1.012)
pt3dadd(29.64, 302.016, -21.8, 1.006)
pt3dadd(29.624, 302.135, -21.8, 0.994)
pt3dadd(29.605, 302.252, -21.8, 0.982)
pt3dadd(29.585, 302.371, -21.8, 0.97)
pt3dadd(29.565, 302.489, -21.8, 0.958)
pt3dadd(29.545, 302.608, -21.8, 0.944)
pt3dadd(29.526, 302.726, -21.8, 0.932)
pt3dadd(29.504, 302.843, -21.814, 0.922)
pt3dadd(29.48, 302.958, -21.833, 0.912)
pt3dadd(29.457, 303.073, -21.852, 0.902)
pt3dadd(29.434, 303.188, -21.872, 0.894)
pt3dadd(29.411, 303.305, -21.891, 0.884)
pt3dadd(29.4, 303.409, -21.931, 0.874)
pt3dadd(29.4, 303.505, -21.991, 0.864)
pt3dadd(29.4, 303.601, -22.051, 0.854)
pt3dadd(29.4, 303.697, -22.111, 0.844)
pt3dadd(29.4, 303.793, -22.171, 0.834)
pt3dadd(29.383, 303.892, -22.225, 0.828)
pt3dadd(29.35, 303.991, -22.273, 0.828)
pt3dadd(29.316, 304.092, -22.321, 0.828)
pt3dadd(29.283, 304.192, -22.368, 0.828)
pt3dadd(29.248, 304.291, -22.416, 0.828)
pt3dadd(29.196, 304.386, -22.459, 0.814)
pt3dadd(29.16, 304.489, -22.49, 0.798)
pt3dadd(29.16, 304.609, -22.494, 0.782)
pt3dadd(29.16, 304.729, -22.498, 0.764)
pt3dadd(29.16, 304.842, -22.521, 0.748)
pt3dadd(29.16, 304.945, -22.571, 0.738)
pt3dadd(29.16, 305.04, -22.629, 0.734)
pt3dadd(29.16, 305.1, -22.716, 0.756)
pt3dadd(29.159, 305.162, -22.802, 0.78)
pt3dadd(29.119, 305.242, -22.868, 0.804)
pt3dadd(29.079, 305.322, -22.935, 0.83)
pt3dadd(29.038, 305.401, -23.001, 0.854)
pt3dadd(28.969, 305.478, -23.052, 0.884)
pt3dadd(28.92, 305.567, -23.09, 0.902)
pt3dadd(28.92, 305.687, -23.093, 0.896)
pt3dadd(28.92, 305.807, -23.095, 0.89)
pt3dadd(28.92, 305.927, -23.098, 0.882)
pt3dadd(28.912, 306.047, -23.1, 0.878)
pt3dadd(28.892, 306.164, -23.1, 0.878)
pt3dadd(28.871, 306.283, -23.1, 0.878)
}
dend_5[13] {pt3dclear()
pt3dadd(28.871, 306.283, -23.1, 0.878)
pt3dadd(28.798, 306.37, -23.1, 0.956)
pt3dadd(28.779, 306.488, -23.1, 0.986)
pt3dadd(28.759, 306.606, -23.1, 1.014)
pt3dadd(28.739, 306.725, -23.1, 1.044)
pt3dadd(28.719, 306.844, -23.1, 1.072)
pt3dadd(28.7, 306.961, -23.1, 1.102)
pt3dadd(28.68, 307.08, -23.1, 1.13)
}
dend_5[14] {pt3dclear()
pt3dadd(28.68, 307.08, -23.1, 1.13)
pt3dadd(28.68, 307.147, -23.109, 1.144)
pt3dadd(28.68, 307.265, -23.126, 1.168)
pt3dadd(28.68, 307.384, -23.142, 1.194)
pt3dadd(28.68, 307.502, -23.159, 1.218)
pt3dadd(28.68, 307.62, -23.175, 1.244)
pt3dadd(28.68, 307.739, -23.191, 1.268)
pt3dadd(28.68, 307.858, -23.202, 1.282)
pt3dadd(28.68, 307.978, -23.207, 1.286)
pt3dadd(28.68, 308.098, -23.212, 1.29)
pt3dadd(28.68, 308.218, -23.217, 1.294)
pt3dadd(28.68, 308.338, -23.222, 1.298)
pt3dadd(28.68, 308.456, -23.227, 1.302)
pt3dadd(28.68, 308.576, -23.232, 1.306)
pt3dadd(28.68, 308.696, -23.242, 1.294)
pt3dadd(28.68, 308.815, -23.252, 1.278)
pt3dadd(28.68, 308.935, -23.263, 1.262)
pt3dadd(28.68, 309.054, -23.273, 1.246)
pt3dadd(28.68, 309.174, -23.284, 1.23)
pt3dadd(28.68, 309.293, -23.294, 1.214)
pt3dadd(28.68, 309.412, -23.306, 1.198)
pt3dadd(28.68, 309.53, -23.321, 1.182)
pt3dadd(28.68, 309.649, -23.335, 1.166)
pt3dadd(28.68, 309.768, -23.349, 1.15)
pt3dadd(28.68, 309.887, -23.364, 1.134)
pt3dadd(28.68, 310.006, -23.378, 1.116)
pt3dadd(28.68, 310.124, -23.394, 1.102)
pt3dadd(28.68, 310.242, -23.412, 1.09)
pt3dadd(28.68, 310.36, -23.431, 1.076)
pt3dadd(28.68, 310.478, -23.449, 1.064)
pt3dadd(28.68, 310.596, -23.468, 1.052)
pt3dadd(28.68, 310.714, -23.486, 1.038)
pt3dadd(28.68, 310.832, -23.5, 1.03)
pt3dadd(28.68, 310.952, -23.5, 1.03)
pt3dadd(28.68, 311.072, -23.5, 1.03)
pt3dadd(28.68, 311.192, -23.5, 1.03)
pt3dadd(28.68, 311.312, -23.5, 1.03)
pt3dadd(28.68, 311.432, -23.5, 1.03)
pt3dadd(28.68, 311.552, -23.5, 1.03)
pt3dadd(28.68, 311.672, -23.5, 1.03)
pt3dadd(28.68, 311.792, -23.5, 1.03)
pt3dadd(28.68, 311.912, -23.5, 1.03)
pt3dadd(28.68, 312.032, -23.5, 1.03)
pt3dadd(28.68, 312.152, -23.5, 1.03)
pt3dadd(28.68, 312.272, -23.5, 1.03)
pt3dadd(28.68, 312.392, -23.5, 1.03)
pt3dadd(28.68, 312.512, -23.504, 1.03)
pt3dadd(28.68, 312.63, -23.521, 1.03)
pt3dadd(28.68, 312.749, -23.537, 1.03)
pt3dadd(28.68, 312.866, -23.554, 1.03)
pt3dadd(28.68, 312.985, -23.57, 1.03)
pt3dadd(28.68, 313.104, -23.587, 1.03)
pt3dadd(28.68, 313.223, -23.6, 1.028)
pt3dadd(28.68, 313.343, -23.6, 1.016)
pt3dadd(28.68, 313.463, -23.6, 1.006)
pt3dadd(28.68, 313.583, -23.6, 0.996)
pt3dadd(28.68, 313.703, -23.6, 0.984)
pt3dadd(28.68, 313.823, -23.6, 0.974)
pt3dadd(28.68, 313.943, -23.6, 0.962)
pt3dadd(28.68, 314.063, -23.6, 0.952)
pt3dadd(28.68, 314.183, -23.6, 0.938)
pt3dadd(28.68, 314.303, -23.6, 0.922)
pt3dadd(28.68, 314.423, -23.6, 0.908)
pt3dadd(28.68, 314.543, -23.6, 0.894)
pt3dadd(28.68, 314.663, -23.6, 0.88)
pt3dadd(28.68, 314.783, -23.6, 0.866)
}
}
proc shape3d_122() {
dend_5[14] { pt3dadd(28.679, 314.903, -23.6, 0.852)
pt3dadd(28.671, 315.022, -23.6, 0.84)
pt3dadd(28.662, 315.142, -23.6, 0.828)
pt3dadd(28.654, 315.262, -23.6, 0.818)
pt3dadd(28.646, 315.382, -23.6, 0.806)
pt3dadd(28.638, 315.5, -23.6, 0.794)
pt3dadd(28.63, 315.62, -23.6, 0.782)
pt3dadd(28.607, 315.738, -23.6, 0.776)
pt3dadd(28.574, 315.853, -23.6, 0.772)
pt3dadd(28.541, 315.968, -23.6, 0.766)
pt3dadd(28.508, 316.084, -23.6, 0.762)
pt3dadd(28.475, 316.199, -23.6, 0.758)
pt3dadd(28.442, 316.314, -23.6, 0.754)
pt3dadd(28.398, 316.426, -23.6, 0.754)
pt3dadd(28.353, 316.537, -23.6, 0.754)
pt3dadd(28.308, 316.649, -23.6, 0.754)
pt3dadd(28.264, 316.76, -23.6, 0.754)
pt3dadd(28.219, 316.872, -23.6, 0.754)
pt3dadd(28.175, 316.984, -23.6, 0.754)
pt3dadd(28.13, 317.095, -23.6, 0.754)
pt3dadd(28.086, 317.206, -23.6, 0.754)
pt3dadd(28.041, 317.317, -23.6, 0.754)
pt3dadd(27.996, 317.429, -23.6, 0.754)
pt3dadd(27.96, 317.542, -23.6, 0.752)
pt3dadd(27.96, 317.662, -23.602, 0.748)
pt3dadd(27.96, 317.782, -23.604, 0.746)
pt3dadd(27.96, 317.902, -23.605, 0.742)
pt3dadd(27.96, 318.022, -23.607, 0.738)
pt3dadd(27.96, 318.142, -23.608, 0.734)
pt3dadd(27.96, 318.262, -23.61, 0.73)
pt3dadd(27.953, 318.38, -23.616, 0.726)
pt3dadd(27.931, 318.497, -23.633, 0.722)
pt3dadd(27.908, 318.613, -23.65, 0.718)
pt3dadd(27.885, 318.728, -23.667, 0.712)
pt3dadd(27.863, 318.845, -23.683, 0.708)
pt3dadd(27.84, 318.961, -23.7, 0.704)
pt3dadd(27.815, 319.072, -23.733, 0.698)
pt3dadd(27.79, 319.182, -23.765, 0.692)
pt3dadd(27.765, 319.294, -23.797, 0.688)
pt3dadd(27.74, 319.404, -23.83, 0.682)
pt3dadd(27.715, 319.512, -23.866, 0.678)
pt3dadd(27.692, 319.61, -23.921, 0.678)
pt3dadd(27.668, 319.708, -23.975, 0.678)
pt3dadd(27.644, 319.806, -24.029, 0.678)
pt3dadd(27.62, 319.904, -24.084, 0.678)
pt3dadd(27.597, 320.016, -24.104, 0.682)
pt3dadd(27.573, 320.134, -24.11, 0.686)
pt3dadd(27.55, 320.25, -24.116, 0.69)
pt3dadd(27.526, 320.368, -24.122, 0.694)
pt3dadd(27.503, 320.485, -24.128, 0.698)
pt3dadd(27.48, 320.603, -24.134, 0.704)
pt3dadd(27.48, 320.718, -24.161, 0.708)
pt3dadd(27.48, 320.833, -24.189, 0.712)
pt3dadd(27.48, 320.948, -24.216, 0.716)
pt3dadd(27.48, 321.065, -24.244, 0.72)
pt3dadd(27.48, 321.18, -24.271, 0.726)
pt3dadd(27.48, 321.295, -24.3, 0.734)
pt3dadd(27.48, 321.409, -24.33, 0.746)
pt3dadd(27.48, 321.524, -24.359, 0.76)
pt3dadd(27.48, 321.638, -24.389, 0.774)
pt3dadd(27.48, 321.752, -24.419, 0.788)
pt3dadd(27.48, 321.868, -24.449, 0.8)
pt3dadd(27.48, 321.983, -24.475, 0.808)
pt3dadd(27.48, 322.099, -24.5, 0.812)
pt3dadd(27.48, 322.216, -24.525, 0.816)
pt3dadd(27.48, 322.332, -24.551, 0.82)
pt3dadd(27.48, 322.448, -24.576, 0.824)
pt3dadd(27.48, 322.564, -24.6, 0.828)
pt3dadd(27.467, 322.684, -24.6, 0.832)
pt3dadd(27.454, 322.802, -24.6, 0.836)
pt3dadd(27.442, 322.922, -24.6, 0.84)
pt3dadd(27.429, 323.041, -24.6, 0.844)
pt3dadd(27.416, 323.161, -24.6, 0.848)
pt3dadd(27.404, 323.28, -24.6, 0.852)
pt3dadd(27.38, 323.396, -24.613, 0.84)
pt3dadd(27.351, 323.509, -24.633, 0.82)
pt3dadd(27.322, 323.623, -24.653, 0.8)
pt3dadd(27.293, 323.737, -24.673, 0.78)
pt3dadd(27.264, 323.851, -24.693, 0.76)
pt3dadd(27.234, 323.957, -24.732, 0.742)
pt3dadd(27.204, 324.055, -24.782, 0.726)
pt3dadd(27.174, 324.155, -24.832, 0.708)
pt3dadd(27.144, 324.254, -24.882, 0.692)
pt3dadd(27.12, 324.356, -24.928, 0.674)
pt3dadd(27.12, 324.472, -24.958, 0.656)
pt3dadd(27.12, 324.586, -24.988, 0.638)
pt3dadd(27.12, 324.701, -25.018, 0.62)
pt3dadd(27.12, 324.815, -25.048, 0.602)
pt3dadd(27.12, 324.93, -25.077, 0.584)
pt3dadd(27.12, 325.042, -25.113, 0.584)
pt3dadd(27.12, 325.152, -25.153, 0.592)
pt3dadd(27.12, 325.261, -25.193, 0.602)
pt3dadd(27.12, 325.372, -25.232, 0.612)
pt3dadd(27.12, 325.482, -25.272, 0.622)
pt3dadd(27.12, 325.595, -25.304, 0.638)
pt3dadd(27.12, 325.714, -25.319, 0.67)
pt3dadd(27.12, 325.832, -25.333, 0.702)
pt3dadd(27.12, 325.951, -25.347, 0.734)
pt3dadd(27.12, 326.07, -25.362, 0.768)
pt3dadd(27.12, 326.189, -25.376, 0.8)
pt3dadd(27.12, 326.308, -25.39, 0.836)
pt3dadd(27.12, 326.428, -25.396, 0.896)
pt3dadd(27.12, 326.546, -25.403, 0.958)
pt3dadd(27.12, 326.666, -25.41, 1.02)
pt3dadd(27.12, 326.786, -25.417, 1.08)
pt3dadd(27.12, 326.906, -25.424, 1.142)
pt3dadd(27.12, 327.025, -25.43, 1.202)
pt3dadd(27.12, 327.145, -25.439, 1.258)
pt3dadd(27.12, 327.265, -25.449, 1.31)
pt3dadd(27.12, 327.384, -25.46, 1.36)
pt3dadd(27.12, 327.503, -25.47, 1.412)
pt3dadd(27.12, 327.623, -25.481, 1.464)
pt3dadd(27.12, 327.742, -25.491, 1.514)
pt3dadd(27.12, 327.862, -25.5, 1.558)
pt3dadd(27.12, 327.982, -25.5, 1.57)
pt3dadd(27.12, 328.102, -25.5, 1.58)
pt3dadd(27.12, 328.222, -25.5, 1.592)
pt3dadd(27.12, 328.342, -25.5, 1.602)
pt3dadd(27.12, 328.462, -25.5, 1.612)
pt3dadd(27.12, 328.582, -25.5, 1.624)
pt3dadd(27.121, 328.702, -25.5, 1.626)
pt3dadd(27.127, 328.822, -25.5, 1.596)
pt3dadd(27.133, 328.942, -25.5, 1.566)
pt3dadd(27.139, 329.06, -25.5, 1.536)
pt3dadd(27.145, 329.18, -25.5, 1.506)
pt3dadd(27.151, 329.3, -25.5, 1.476)
pt3dadd(27.157, 329.42, -25.5, 1.446)
pt3dadd(27.188, 329.533, -25.5, 1.41)
pt3dadd(27.245, 329.639, -25.5, 1.366)
pt3dadd(27.302, 329.744, -25.5, 1.322)
pt3dadd(27.359, 329.85, -25.5, 1.278)
pt3dadd(27.416, 329.956, -25.5, 1.234)
pt3dadd(27.487, 330.049, -25.5, 1.178)
pt3dadd(27.585, 330.116, -25.5, 1.096)
pt3dadd(27.672, 330.193, -25.5, 1.024)
pt3dadd(27.698, 330.311, -25.5, 0.994)
pt3dadd(27.724, 330.427, -25.5, 0.964)
pt3dadd(27.792, 330.521, -25.5, 0.946)
pt3dadd(27.88, 330.602, -25.5, 0.934)
pt3dadd(27.983, 330.658, -25.5, 0.958)
pt3dadd(28.098, 330.691, -25.5, 1.008)
pt3dadd(28.214, 330.722, -25.5, 1.062)
pt3dadd(28.331, 330.746, -25.5, 1.12)
pt3dadd(28.448, 330.773, -25.5, 1.158)
pt3dadd(28.563, 330.806, -25.5, 1.168)
pt3dadd(28.679, 330.84, -25.5, 1.176)
pt3dadd(28.794, 330.872, -25.5, 1.186)
pt3dadd(28.91, 330.906, -25.5, 1.194)
pt3dadd(29.025, 330.938, -25.5, 1.202)
pt3dadd(29.122, 331.002, -25.517, 1.188)
pt3dadd(29.213, 331.075, -25.54, 1.166)
pt3dadd(29.304, 331.148, -25.563, 1.142)
pt3dadd(29.395, 331.222, -25.586, 1.12)
pt3dadd(29.497, 331.274, -25.6, 1.102)
pt3dadd(29.615, 331.295, -25.6, 1.092)
pt3dadd(29.733, 331.315, -25.6, 1.082)
pt3dadd(29.852, 331.331, -25.6, 1.088)
pt3dadd(29.971, 331.346, -25.6, 1.096)
pt3dadd(30.088, 331.366, -25.6, 1.106)
pt3dadd(30.179, 331.445, -25.606, 1.118)
pt3dadd(30.268, 331.523, -25.612, 1.128)
pt3dadd(30.32, 331.619, -25.655, 1.072)
pt3dadd(30.36, 331.71, -25.705, 1.018)
pt3dadd(30.36, 331.789, -25.781, 0.97)
pt3dadd(30.36, 331.868, -25.856, 0.92)
pt3dadd(30.36, 331.948, -25.931, 0.87)
pt3dadd(30.36, 332.028, -26.005, 0.822)
pt3dadd(30.36, 332.11, -26.078, 0.774)
pt3dadd(30.36, 332.155, -26.166, 0.754)
pt3dadd(30.36, 332.222, -26.239, 0.764)
pt3dadd(30.36, 332.318, -26.299, 0.778)
pt3dadd(30.36, 332.414, -26.359, 0.794)
pt3dadd(30.36, 332.51, -26.419, 0.808)
pt3dadd(30.36, 332.606, -26.479, 0.824)
pt3dadd(30.36, 332.718, -26.502, 0.84)
pt3dadd(30.36, 332.838, -26.506, 0.858)
pt3dadd(30.36, 332.958, -26.51, 0.874)
pt3dadd(30.36, 333.066, -26.55, 0.896)
pt3dadd(30.36, 333.169, -26.6, 0.92)
pt3dadd(30.36, 333.248, -26.671, 0.962)
pt3dadd(30.36, 333.31, -26.758, 1.02)
pt3dadd(30.36, 333.356, -26.848, 1.092)
pt3dadd(30.36, 333.383, -26.946, 1.192)
pt3dadd(30.36, 333.409, -27.043, 1.294)
pt3dadd(30.393, 333.504, -27.089, 1.402)
pt3dadd(30.43, 333.608, -27.127, 1.512)
pt3dadd(30.468, 333.713, -27.165, 1.622)
pt3dadd(30.531, 333.782, -27.221, 1.764)
pt3dadd(30.607, 333.836, -27.284, 1.922)
pt3dadd(30.689, 333.92, -27.293, 1.984)
pt3dadd(30.771, 334.008, -27.297, 2.038)
pt3dadd(30.84, 334.1, -27.3, 2.078)
pt3dadd(30.84, 334.22, -27.3, 2.046)
pt3dadd(30.84, 334.34, -27.3, 2.012)
pt3dadd(30.84, 334.46, -27.3, 1.938)
pt3dadd(30.84, 334.58, -27.3, 1.698)
pt3dadd(30.84, 334.7, -27.3, 1.644)
pt3dadd(30.84, 334.82, -27.3, 1.592)
pt3dadd(30.84, 334.94, -27.3, 1.538)
pt3dadd(30.84, 335.06, -27.3, 1.484)
}
}
proc shape3d_123() {
dend_5[14] { pt3dadd(30.84, 335.18, -27.3, 1.43)
pt3dadd(30.84, 335.3, -27.3, 1.376)
pt3dadd(30.84, 335.42, -27.3, 1.326)
pt3dadd(30.84, 335.54, -27.3, 1.294)
pt3dadd(30.84, 335.66, -27.3, 1.26)
pt3dadd(30.84, 335.78, -27.3, 1.228)
pt3dadd(30.84, 335.9, -27.3, 1.196)
pt3dadd(30.84, 336.02, -27.3, 1.164)
pt3dadd(30.84, 336.14, -27.3, 1.132)
pt3dadd(30.84, 336.26, -27.303, 1.106)
pt3dadd(30.84, 336.378, -27.319, 1.11)
pt3dadd(30.84, 336.497, -27.336, 1.114)
pt3dadd(30.84, 336.616, -27.352, 1.118)
pt3dadd(30.84, 336.733, -27.368, 1.122)
pt3dadd(30.84, 336.852, -27.385, 1.126)
pt3dadd(30.845, 336.968, -27.402, 1.134)
pt3dadd(30.901, 337.072, -27.424, 1.172)
pt3dadd(30.956, 337.175, -27.446, 1.21)
pt3dadd(31.012, 337.278, -27.468, 1.25)
pt3dadd(31.068, 337.38, -27.49, 1.288)
pt3dadd(31.127, 337.483, -27.5, 1.356)
pt3dadd(31.187, 337.588, -27.5, 1.448)
pt3dadd(31.241, 337.694, -27.5, 1.526)
pt3dadd(31.28, 337.807, -27.5, 1.58)
pt3dadd(31.32, 337.92, -27.5, 1.632)
pt3dadd(31.32, 338.024, -27.551, 1.69)
pt3dadd(31.32, 338.128, -27.602, 1.746)
pt3dadd(31.32, 338.185, -27.686, 1.766)
pt3dadd(31.32, 338.231, -27.778, 1.778)
pt3dadd(31.322, 338.315, -27.832, 1.776)
pt3dadd(31.325, 338.432, -27.851, 1.764)
pt3dadd(31.328, 338.551, -27.869, 1.752)
pt3dadd(31.331, 338.669, -27.888, 1.74)
pt3dadd(31.347, 338.785, -27.9, 1.704)
pt3dadd(31.386, 338.898, -27.9, 1.618)
pt3dadd(31.426, 339.011, -27.9, 1.534)
pt3dadd(31.44, 339.131, -27.901, 1.324)
pt3dadd(31.44, 339.25, -27.913, 1.25)
pt3dadd(31.44, 339.368, -27.926, 1.176)
pt3dadd(31.44, 339.486, -27.944, 1.11)
pt3dadd(31.44, 339.601, -27.972, 1.058)
pt3dadd(31.44, 339.716, -27.999, 1.006)
pt3dadd(31.44, 339.832, -28.027, 0.974)
pt3dadd(31.44, 339.948, -28.054, 0.944)
pt3dadd(31.44, 340.048, -28.104, 0.936)
pt3dadd(31.44, 340.136, -28.172, 0.948)
pt3dadd(31.44, 340.201, -28.252, 0.986)
pt3dadd(31.44, 340.234, -28.348, 1.064)
pt3dadd(31.462, 340.298, -28.428, 1.098)
pt3dadd(31.489, 340.372, -28.504, 1.122)
pt3dadd(31.517, 340.445, -28.58, 1.144)
pt3dadd(31.544, 340.518, -28.656, 1.166)
pt3dadd(31.571, 340.604, -28.717, 1.182)
pt3dadd(31.597, 340.711, -28.758, 1.188)
pt3dadd(31.623, 340.818, -28.799, 1.194)
pt3dadd(31.649, 340.924, -28.839, 1.198)
pt3dadd(31.674, 341.03, -28.88, 1.204)
pt3dadd(31.685, 341.148, -28.89, 1.194)
pt3dadd(31.691, 341.267, -28.892, 1.178)
pt3dadd(31.697, 341.387, -28.894, 1.162)
pt3dadd(31.703, 341.507, -28.895, 1.148)
pt3dadd(31.709, 341.627, -28.897, 1.132)
pt3dadd(31.715, 341.747, -28.899, 1.116)
pt3dadd(31.727, 341.866, -28.901, 1.108)
pt3dadd(31.762, 341.98, -28.906, 1.118)
pt3dadd(31.796, 342.095, -28.911, 1.128)
pt3dadd(31.805, 342.208, -28.942, 1.18)
pt3dadd(31.811, 342.32, -28.977, 1.236)
pt3dadd(31.877, 342.401, -29.004, 1.34)
pt3dadd(31.975, 342.463, -29.027, 1.472)
pt3dadd(32.059, 342.5, -29.086, 1.576)
pt3dadd(32.137, 342.529, -29.158, 1.67)
pt3dadd(32.192, 342.624, -29.189, 1.768)
pt3dadd(32.267, 342.709, -29.214, 1.824)
pt3dadd(32.36, 342.78, -29.237, 1.85)
pt3dadd(32.408, 342.814, -29.312, 1.858)
pt3dadd(32.438, 342.832, -29.408, 1.858)
pt3dadd(32.499, 342.854, -29.485, 1.844)
pt3dadd(32.592, 342.882, -29.544, 1.818)
pt3dadd(32.633, 342.966, -29.575, 1.802)
pt3dadd(32.644, 343.085, -29.589, 1.792)
pt3dadd(32.659, 343.202, -29.6, 1.788)
pt3dadd(32.703, 343.314, -29.6, 1.82)
pt3dadd(32.732, 343.43, -29.6, 1.838)
pt3dadd(32.752, 343.548, -29.6, 1.846)
pt3dadd(32.772, 343.667, -29.6, 1.854)
pt3dadd(32.791, 343.786, -29.6, 1.862)
pt3dadd(32.811, 343.903, -29.6, 1.872)
pt3dadd(32.831, 344.022, -29.6, 1.88)
pt3dadd(32.863, 344.136, -29.6, 1.878)
pt3dadd(32.908, 344.248, -29.6, 1.87)
pt3dadd(32.952, 344.359, -29.6, 1.86)
pt3dadd(32.997, 344.471, -29.6, 1.85)
pt3dadd(33.042, 344.582, -29.6, 1.842)
pt3dadd(33.084, 344.694, -29.6, 1.83)
pt3dadd(33.114, 344.81, -29.6, 1.798)
pt3dadd(33.144, 344.927, -29.6, 1.768)
pt3dadd(33.174, 345.043, -29.6, 1.738)
pt3dadd(33.205, 345.158, -29.6, 1.706)
pt3dadd(33.235, 345.275, -29.6, 1.676)
pt3dadd(33.268, 345.39, -29.6, 1.624)
pt3dadd(33.308, 345.503, -29.6, 1.54)
pt3dadd(33.347, 345.617, -29.601, 1.454)
pt3dadd(33.353, 345.732, -29.63, 1.39)
pt3dadd(33.358, 345.846, -29.658, 1.324)
pt3dadd(33.409, 345.948, -29.679, 1.26)
pt3dadd(33.477, 346.044, -29.696, 1.196)
pt3dadd(33.574, 346.108, -29.713, 1.142)
pt3dadd(33.68, 346.16, -29.729, 1.092)
pt3dadd(33.726, 346.26, -29.747, 1.06)
pt3dadd(33.751, 346.375, -29.765, 1.032)
pt3dadd(33.776, 346.49, -29.783, 1.006)
pt3dadd(33.801, 346.606, -29.8, 0.978)
pt3dadd(33.822, 346.724, -29.8, 0.958)
pt3dadd(33.842, 346.842, -29.8, 0.94)
pt3dadd(33.868, 346.96, -29.8, 0.9)
pt3dadd(33.89, 347.072, -29.823, 0.876)
pt3dadd(33.906, 347.183, -29.859, 0.87)
pt3dadd(33.923, 347.293, -29.895, 0.866)
pt3dadd(33.939, 347.404, -29.931, 0.86)
pt3dadd(33.955, 347.515, -29.967, 0.856)
pt3dadd(33.981, 347.617, -30.014, 0.85)
pt3dadd(34.011, 347.717, -30.064, 0.844)
pt3dadd(34.042, 347.816, -30.114, 0.838)
pt3dadd(34.072, 347.916, -30.164, 0.832)
pt3dadd(34.107, 348.014, -30.211, 0.834)
pt3dadd(34.157, 348.114, -30.25, 0.852)
pt3dadd(34.206, 348.212, -30.288, 0.868)
pt3dadd(34.256, 348.312, -30.327, 0.886)
pt3dadd(34.306, 348.41, -30.366, 0.904)
pt3dadd(34.278, 348.499, -30.428, 0.998)
pt3dadd(34.248, 348.587, -30.491, 1.096)
pt3dadd(34.218, 348.676, -30.554, 1.194)
pt3dadd(34.188, 348.763, -30.617, 1.29)
pt3dadd(34.158, 348.852, -30.68, 1.388)
pt3dadd(34.129, 348.941, -30.743, 1.484)
pt3dadd(34.099, 349.028, -30.806, 1.582)
pt3dadd(34.069, 349.117, -30.869, 1.678)
pt3dadd(34.039, 349.205, -30.932, 1.776)
pt3dadd(34.009, 349.294, -30.995, 1.872)
pt3dadd(33.98, 349.381, -31.058, 1.97)
pt3dadd(33.967, 349.48, -31.1, 2.034)
pt3dadd(33.986, 349.598, -31.1, 2.034)
pt3dadd(34.006, 349.717, -31.1, 2.034)
pt3dadd(34.026, 349.835, -31.1, 2.034)
pt3dadd(34.046, 349.954, -31.1, 2.034)
pt3dadd(34.065, 350.072, -31.1, 2.034)
pt3dadd(34.096, 350.186, -31.1, 2.034)
pt3dadd(34.159, 350.288, -31.1, 2.034)
pt3dadd(34.222, 350.39, -31.1, 2.034)
pt3dadd(34.285, 350.492, -31.1, 2.034)
pt3dadd(34.348, 350.594, -31.1, 2.034)
pt3dadd(34.405, 350.7, -31.1, 2.034)
pt3dadd(34.429, 350.816, -31.1, 2.03)
pt3dadd(34.454, 350.934, -31.1, 2.024)
pt3dadd(34.479, 351.052, -31.1, 2.02)
pt3dadd(34.504, 351.169, -31.1, 2.016)
pt3dadd(34.529, 351.287, -31.1, 2.012)
pt3dadd(34.547, 351.404, -31.1, 2.006)
pt3dadd(34.549, 351.524, -31.1, 1.99)
pt3dadd(34.551, 351.644, -31.1, 1.976)
pt3dadd(34.553, 351.764, -31.1, 1.962)
pt3dadd(34.555, 351.884, -31.1, 1.946)
pt3dadd(34.557, 352.004, -31.1, 1.932)
pt3dadd(34.559, 352.124, -31.1, 1.918)
pt3dadd(34.56, 352.244, -31.1, 1.89)
pt3dadd(34.56, 352.364, -31.1, 1.84)
pt3dadd(34.56, 352.484, -31.1, 1.79)
pt3dadd(34.56, 352.604, -31.1, 1.742)
pt3dadd(34.56, 352.724, -31.1, 1.7)
pt3dadd(34.56, 352.844, -31.1, 1.658)
pt3dadd(34.58, 352.96, -31.1, 1.632)
pt3dadd(34.634, 353.068, -31.1, 1.632)
pt3dadd(34.69, 353.173, -31.1, 1.634)
pt3dadd(34.765, 353.267, -31.1, 1.646)
pt3dadd(34.84, 353.36, -31.1, 1.658)
pt3dadd(34.883, 353.472, -31.1, 1.624)
pt3dadd(34.916, 353.587, -31.1, 1.592)
pt3dadd(34.935, 353.706, -31.1, 1.558)
pt3dadd(34.955, 353.824, -31.1, 1.526)
pt3dadd(34.975, 353.942, -31.1, 1.492)
pt3dadd(34.995, 354.06, -31.1, 1.46)
pt3dadd(35.014, 354.179, -31.1, 1.426)
pt3dadd(35.034, 354.298, -31.1, 1.378)
pt3dadd(35.055, 354.415, -31.1, 1.3)
pt3dadd(35.075, 354.534, -31.1, 1.222)
pt3dadd(35.11, 354.648, -31.1, 1.148)
pt3dadd(35.15, 354.761, -31.1, 1.072)
pt3dadd(35.191, 354.875, -31.102, 1.016)
pt3dadd(35.232, 354.986, -31.107, 0.982)
pt3dadd(35.268, 355.093, -31.124, 0.948)
pt3dadd(35.274, 355.171, -31.2, 0.912)
pt3dadd(35.284, 355.247, -31.276, 0.878)
pt3dadd(35.316, 355.312, -31.356, 0.878)
pt3dadd(35.355, 355.414, -31.392, 0.888)
pt3dadd(35.396, 355.52, -31.421, 0.9)
pt3dadd(35.437, 355.628, -31.45, 0.91)
pt3dadd(35.477, 355.735, -31.479, 0.922)
pt3dadd(35.518, 355.844, -31.5, 0.942)
pt3dadd(35.556, 355.958, -31.5, 0.988)
}
}
proc shape3d_124() {
dend_5[14] { pt3dadd(35.595, 356.072, -31.5, 1.032)
pt3dadd(35.634, 356.185, -31.5, 1.078)
pt3dadd(35.673, 356.299, -31.5, 1.124)
pt3dadd(35.711, 356.413, -31.5, 1.17)
pt3dadd(35.754, 356.525, -31.5, 1.238)
pt3dadd(35.799, 356.636, -31.5, 1.312)
pt3dadd(35.844, 356.748, -31.5, 1.386)
pt3dadd(35.888, 356.858, -31.5, 1.46)
pt3dadd(35.933, 356.97, -31.5, 1.536)
pt3dadd(35.972, 357.084, -31.5, 1.612)
pt3dadd(36.002, 357.199, -31.5, 1.69)
pt3dadd(36.032, 357.316, -31.5, 1.77)
pt3dadd(36.062, 357.432, -31.5, 1.848)
pt3dadd(36.092, 357.548, -31.5, 1.926)
pt3dadd(36.122, 357.665, -31.5, 2.006)
pt3dadd(36.177, 357.769, -31.5, 2.066)
pt3dadd(36.246, 357.868, -31.5, 2.116)
pt3dadd(36.315, 357.965, -31.5, 2.166)
pt3dadd(36.384, 358.063, -31.5, 2.216)
pt3dadd(36.453, 358.162, -31.5, 2.266)
pt3dadd(36.55, 358.22, -31.5, 2.298)
pt3dadd(36.666, 358.253, -31.5, 2.318)
pt3dadd(36.779, 358.291, -31.5, 2.328)
pt3dadd(36.882, 358.352, -31.5, 2.294)
pt3dadd(36.986, 358.414, -31.5, 2.26)
pt3dadd(37.047, 358.517, -31.5, 2.238)
pt3dadd(37.108, 358.62, -31.5, 2.214)
pt3dadd(37.163, 358.727, -31.5, 2.192)
pt3dadd(37.216, 358.834, -31.5, 2.17)
pt3dadd(37.264, 358.944, -31.5, 2.132)
pt3dadd(37.307, 359.056, -31.5, 2.084)
pt3dadd(37.309, 359.176, -31.5, 2.062)
pt3dadd(37.311, 359.296, -31.5, 2.04)
pt3dadd(37.313, 359.416, -31.5, 2.018)
pt3dadd(37.314, 359.536, -31.5, 1.996)
pt3dadd(37.316, 359.656, -31.5, 1.974)
pt3dadd(37.318, 359.776, -31.5, 1.952)
pt3dadd(37.32, 359.896, -31.5, 1.928)
pt3dadd(37.32, 360.016, -31.5, 1.876)
pt3dadd(37.32, 360.136, -31.5, 1.826)
pt3dadd(37.321, 360.256, -31.5, 1.782)
pt3dadd(37.325, 360.376, -31.5, 1.774)
pt3dadd(37.33, 360.496, -31.5, 1.764)
pt3dadd(37.349, 360.611, -31.5, 1.766)
pt3dadd(37.417, 360.709, -31.5, 1.8)
pt3dadd(37.488, 360.805, -31.5, 1.836)
pt3dadd(37.591, 360.866, -31.5, 1.87)
pt3dadd(37.695, 360.926, -31.5, 1.904)
pt3dadd(37.754, 361.028, -31.5, 1.884)
pt3dadd(37.808, 361.136, -31.5, 1.858)
pt3dadd(37.862, 361.243, -31.5, 1.83)
pt3dadd(37.91, 361.352, -31.5, 1.8)
pt3dadd(37.93, 361.471, -31.5, 1.752)
pt3dadd(37.951, 361.589, -31.5, 1.704)
pt3dadd(37.999, 361.696, -31.5, 1.662)
pt3dadd(38.069, 361.793, -31.5, 1.628)
pt3dadd(38.139, 361.89, -31.5, 1.592)
pt3dadd(38.237, 361.952, -31.5, 1.598)
pt3dadd(38.348, 361.999, -31.5, 1.62)
pt3dadd(38.46, 362.04, -31.5, 1.658)
pt3dadd(38.566, 362.094, -31.5, 1.69)
pt3dadd(38.665, 362.161, -31.5, 1.702)
pt3dadd(38.738, 362.25, -31.5, 1.684)
pt3dadd(38.777, 362.363, -31.5, 1.632)
pt3dadd(38.822, 362.47, -31.5, 1.574)
pt3dadd(38.939, 362.496, -31.5, 1.474)
pt3dadd(39.056, 362.522, -31.5, 1.374)
pt3dadd(39.171, 362.556, -31.5, 1.264)
pt3dadd(39.285, 362.596, -31.5, 1.146)
pt3dadd(39.395, 362.64, -31.5, 1.044)
pt3dadd(39.498, 362.702, -31.5, 0.996)
pt3dadd(39.6, 362.765, -31.5, 0.948)
pt3dadd(39.703, 362.827, -31.5, 0.9)
pt3dadd(39.769, 362.918, -31.5, 0.878)
pt3dadd(39.809, 363.032, -31.5, 0.878)
pt3dadd(39.84, 363.146, -31.5, 0.902)
pt3dadd(39.845, 363.266, -31.5, 0.988)
pt3dadd(39.865, 363.385, -31.502, 1.026)
pt3dadd(39.885, 363.503, -31.504, 1.064)
pt3dadd(39.905, 363.622, -31.506, 1.102)
pt3dadd(39.925, 363.739, -31.508, 1.14)
pt3dadd(39.945, 363.858, -31.51, 1.176)
pt3dadd(39.967, 363.972, -31.523, 1.22)
pt3dadd(39.993, 364.075, -31.569, 1.282)
pt3dadd(40.02, 364.178, -31.616, 1.342)
pt3dadd(40.046, 364.282, -31.662, 1.404)
pt3dadd(40.072, 364.384, -31.709, 1.464)
pt3dadd(40.109, 364.493, -31.733, 1.518)
pt3dadd(40.15, 364.604, -31.749, 1.57)
pt3dadd(40.191, 364.715, -31.765, 1.62)
pt3dadd(40.232, 364.826, -31.781, 1.672)
pt3dadd(40.272, 364.938, -31.797, 1.722)
pt3dadd(40.322, 365.044, -31.817, 1.746)
pt3dadd(40.375, 365.148, -31.839, 1.762)
pt3dadd(40.427, 365.254, -31.861, 1.778)
pt3dadd(40.48, 365.358, -31.883, 1.796)
pt3dadd(40.532, 365.464, -31.9, 1.802)
pt3dadd(40.586, 365.57, -31.9, 1.778)
pt3dadd(40.639, 365.678, -31.9, 1.754)
pt3dadd(40.693, 365.785, -31.9, 1.73)
pt3dadd(40.746, 365.893, -31.9, 1.706)
pt3dadd(40.8, 366, -31.9, 1.682)
pt3dadd(40.858, 366.09, -31.946, 1.646)
pt3dadd(40.916, 366.18, -31.991, 1.61)
pt3dadd(40.974, 366.27, -32.037, 1.574)
pt3dadd(41.031, 366.36, -32.082, 1.538)
pt3dadd(41.058, 366.47, -32.109, 1.506)
pt3dadd(41.079, 366.586, -32.133, 1.478)
pt3dadd(41.099, 366.7, -32.157, 1.448)
pt3dadd(41.12, 366.815, -32.181, 1.418)
pt3dadd(41.141, 366.929, -32.205, 1.388)
pt3dadd(41.202, 367.026, -32.226, 1.368)
pt3dadd(41.277, 367.116, -32.246, 1.352)
pt3dadd(41.352, 367.206, -32.266, 1.334)
pt3dadd(41.428, 367.297, -32.286, 1.318)
pt3dadd(41.497, 367.392, -32.3, 1.298)
pt3dadd(41.55, 367.5, -32.3, 1.274)
pt3dadd(41.604, 367.607, -32.3, 1.25)
pt3dadd(41.657, 367.715, -32.3, 1.226)
pt3dadd(41.711, 367.822, -32.3, 1.202)
pt3dadd(41.767, 367.927, -32.3, 1.178)
pt3dadd(41.853, 368.01, -32.3, 1.164)
pt3dadd(41.94, 368.094, -32.3, 1.148)
pt3dadd(42.026, 368.177, -32.3, 1.134)
pt3dadd(42.112, 368.261, -32.3, 1.118)
pt3dadd(42.195, 368.347, -32.3, 1.104)
pt3dadd(42.256, 368.45, -32.3, 1.104)
pt3dadd(42.317, 368.554, -32.3, 1.104)
pt3dadd(42.367, 368.654, -32.334, 1.142)
pt3dadd(42.422, 368.747, -32.368, 1.186)
pt3dadd(42.541, 368.753, -32.381, 1.254)
pt3dadd(42.66, 368.758, -32.394, 1.322)
pt3dadd(42.736, 368.81, -32.423, 1.324)
pt3dadd(42.768, 368.911, -32.469, 1.262)
pt3dadd(42.8, 369.013, -32.516, 1.2)
pt3dadd(42.832, 369.114, -32.562, 1.136)
pt3dadd(42.864, 369.216, -32.608, 1.074)
pt3dadd(42.897, 369.317, -32.655, 1.01)
pt3dadd(42.929, 369.419, -32.701, 0.948)
pt3dadd(42.961, 369.52, -32.747, 0.886)
pt3dadd(42.993, 369.62, -32.794, 0.822)
pt3dadd(43.025, 369.722, -32.84, 0.76)
pt3dadd(43.057, 369.823, -32.886, 0.696)
pt3dadd(43.074, 369.938, -32.9, 0.704)
pt3dadd(43.083, 370.057, -32.9, 0.74)
pt3dadd(43.092, 370.177, -32.9, 0.776)
pt3dadd(43.156, 370.278, -32.9, 0.854)
pt3dadd(43.223, 370.376, -32.9, 0.934)
pt3dadd(43.328, 370.426, -32.9, 1.032)
pt3dadd(43.443, 370.458, -32.9, 1.136)
pt3dadd(43.557, 370.494, -32.9, 1.264)
pt3dadd(43.669, 370.537, -32.9, 1.444)
pt3dadd(43.77, 370.601, -32.9, 1.51)
pt3dadd(43.868, 370.67, -32.9, 1.544)
pt3dadd(43.967, 370.739, -32.9, 1.58)
pt3dadd(44.065, 370.808, -32.9, 1.614)
pt3dadd(44.163, 370.877, -32.9, 1.648)
pt3dadd(44.262, 370.945, -32.9, 1.676)
pt3dadd(44.361, 371.014, -32.9, 1.698)
pt3dadd(44.465, 371.072, -32.9, 1.7)
pt3dadd(44.572, 371.126, -32.9, 1.69)
pt3dadd(44.667, 371.195, -32.9, 1.682)
pt3dadd(44.742, 371.288, -32.9, 1.682)
pt3dadd(44.807, 371.387, -32.9, 1.678)
pt3dadd(44.841, 371.502, -32.9, 1.656)
pt3dadd(44.874, 371.618, -32.9, 1.636)
pt3dadd(44.88, 371.737, -32.9, 1.572)
pt3dadd(44.88, 371.857, -32.9, 1.496)
pt3dadd(44.885, 371.977, -32.9, 1.448)
pt3dadd(44.891, 372.097, -32.9, 1.406)
pt3dadd(44.897, 372.216, -32.9, 1.366)
pt3dadd(44.903, 372.336, -32.9, 1.324)
pt3dadd(44.909, 372.456, -32.9, 1.282)
pt3dadd(44.914, 372.576, -32.9, 1.242)
pt3dadd(44.925, 372.695, -32.9, 1.2)
pt3dadd(44.963, 372.809, -32.9, 1.164)
pt3dadd(45.002, 372.923, -32.9, 1.128)
pt3dadd(45.041, 373.036, -32.9, 1.092)
pt3dadd(45.08, 373.15, -32.9, 1.054)
pt3dadd(45.118, 373.262, -32.9, 1.018)
pt3dadd(45.176, 373.367, -32.9, 0.998)
pt3dadd(45.245, 373.465, -32.9, 0.988)
pt3dadd(45.314, 373.564, -32.9, 0.978)
pt3dadd(45.383, 373.662, -32.9, 0.968)
pt3dadd(45.452, 373.759, -32.9, 0.958)
pt3dadd(45.506, 373.866, -32.9, 0.962)
pt3dadd(45.551, 373.978, -32.9, 0.976)
pt3dadd(45.595, 374.088, -32.9, 0.99)
pt3dadd(45.64, 374.2, -32.9, 1.004)
pt3dadd(45.685, 374.311, -32.9, 1.018)
pt3dadd(45.739, 374.416, -32.9, 1.036)
pt3dadd(45.83, 374.494, -32.9, 1.066)
pt3dadd(45.921, 374.572, -32.9, 1.096)
pt3dadd(46.013, 374.65, -32.9, 1.126)
pt3dadd(46.104, 374.728, -32.9, 1.158)
pt3dadd(46.19, 374.81, -32.9, 1.184)
pt3dadd(46.259, 374.908, -32.9, 1.206)
pt3dadd(46.328, 375.006, -32.9, 1.224)
pt3dadd(46.397, 375.104, -32.9, 1.246)
pt3dadd(46.466, 375.203, -32.9, 1.264)
}
}
proc shape3d_125() {
dend_5[14] { pt3dadd(46.534, 375.301, -32.9, 1.286)
pt3dadd(46.597, 375.404, -32.9, 1.304)
pt3dadd(46.659, 375.506, -32.9, 1.324)
pt3dadd(46.722, 375.608, -32.9, 1.344)
pt3dadd(46.785, 375.71, -32.9, 1.364)
pt3dadd(46.851, 375.81, -32.9, 1.382)
pt3dadd(46.939, 375.892, -32.9, 1.394)
pt3dadd(47.027, 375.973, -32.9, 1.406)
pt3dadd(47.036, 376.093, -32.9, 1.442)
pt3dadd(47.046, 376.213, -32.9, 1.478)
pt3dadd(47.075, 376.32, -32.9, 1.522)
pt3dadd(47.179, 376.38, -32.9, 1.59)
pt3dadd(47.282, 376.441, -32.9, 1.658)
pt3dadd(47.39, 376.495, -32.9, 1.726)
pt3dadd(47.497, 376.548, -32.9, 1.794)
pt3dadd(47.562, 376.644, -32.9, 1.834)
pt3dadd(47.627, 376.742, -32.906, 1.856)
pt3dadd(47.717, 376.817, -32.926, 1.85)
pt3dadd(47.808, 376.892, -32.946, 1.846)
pt3dadd(47.898, 376.968, -32.966, 1.84)
pt3dadd(47.988, 377.044, -32.986, 1.834)
pt3dadd(48.045, 377.147, -32.991, 1.834)
pt3dadd(48.096, 377.256, -32.993, 1.834)
pt3dadd(48.148, 377.364, -32.995, 1.834)
pt3dadd(48.199, 377.472, -32.997, 1.834)
pt3dadd(48.251, 377.581, -32.999, 1.834)
pt3dadd(48.306, 377.687, -33, 1.826)
pt3dadd(48.363, 377.792, -33, 1.816)
pt3dadd(48.42, 377.898, -33, 1.806)
pt3dadd(48.477, 378.004, -33, 1.798)
pt3dadd(48.534, 378.109, -33, 1.788)
pt3dadd(48.594, 378.214, -33, 1.762)
pt3dadd(48.656, 378.316, -33, 1.722)
pt3dadd(48.719, 378.419, -33, 1.684)
pt3dadd(48.782, 378.521, -33, 1.644)
pt3dadd(48.844, 378.623, -33, 1.604)
pt3dadd(48.907, 378.725, -33, 1.552)
pt3dadd(48.97, 378.827, -33, 1.482)
pt3dadd(49.033, 378.93, -33, 1.414)
pt3dadd(49.096, 379.032, -33, 1.344)
pt3dadd(49.159, 379.134, -33, 1.276)
pt3dadd(49.219, 379.237, -33, 1.212)
pt3dadd(49.272, 379.345, -33, 1.158)
pt3dadd(49.326, 379.452, -33, 1.106)
pt3dadd(49.38, 379.56, -33, 1.052)
pt3dadd(49.433, 379.667, -33, 1)
pt3dadd(49.484, 379.776, -33, 0.954)
pt3dadd(49.52, 379.89, -33, 0.944)
pt3dadd(49.556, 380.004, -33, 0.934)
pt3dadd(49.592, 380.119, -33, 0.926)
pt3dadd(49.628, 380.233, -33, 0.918)
pt3dadd(49.664, 380.348, -33, 0.908)
pt3dadd(49.695, 380.464, -33, 0.914)
pt3dadd(49.722, 380.581, -33, 0.93)
pt3dadd(49.75, 380.698, -33, 0.948)
pt3dadd(49.777, 380.814, -33, 0.966)
pt3dadd(49.805, 380.932, -33, 0.982)
pt3dadd(49.832, 381.048, -33, 1)
pt3dadd(49.892, 381.15, -33, 1.016)
pt3dadd(49.964, 381.246, -33, 1.03)
pt3dadd(50.036, 381.342, -33, 1.046)
pt3dadd(50.108, 381.438, -33, 1.06)
pt3dadd(50.18, 381.534, -33, 1.076)
pt3dadd(50.267, 381.614, -33, 1.068)
pt3dadd(50.361, 381.69, -33, 1.054)
pt3dadd(50.455, 381.764, -33, 1.038)
pt3dadd(50.548, 381.839, -33, 1.024)
pt3dadd(50.642, 381.914, -33, 1.008)
pt3dadd(50.718, 382.007, -33, 0.986)
pt3dadd(50.787, 382.105, -33, 0.96)
pt3dadd(50.856, 382.202, -33, 0.936)
pt3dadd(50.925, 382.301, -33, 0.912)
pt3dadd(50.994, 382.399, -33, 0.886)
pt3dadd(51.042, 382.508, -33, 0.848)
pt3dadd(51.081, 382.621, -33, 0.806)
pt3dadd(51.124, 382.734, -33, 0.778)
pt3dadd(51.17, 382.844, -33, 0.778)
pt3dadd(51.221, 382.951, -33, 0.784)
pt3dadd(51.325, 383.011, -33, 0.852)
pt3dadd(51.428, 383.072, -33, 0.92)
pt3dadd(51.54, 383.114, -33, 1.024)
pt3dadd(51.654, 383.154, -33, 1.13)
pt3dadd(51.733, 383.221, -33.028, 1.238)
pt3dadd(51.782, 383.31, -33.08, 1.348)
pt3dadd(51.831, 383.4, -33.132, 1.458)
pt3dadd(51.88, 383.497, -33.172, 1.558)
pt3dadd(51.929, 383.602, -33.201, 1.648)
pt3dadd(51.958, 383.711, -33.231, 1.726)
pt3dadd(52.006, 383.82, -33.246, 1.704)
pt3dadd(52.056, 383.927, -33.26, 1.672)
pt3dadd(52.105, 384.035, -33.274, 1.642)
pt3dadd(52.155, 384.143, -33.288, 1.61)
pt3dadd(52.2, 384.252, -33.302, 1.578)
pt3dadd(52.2, 384.371, -33.318, 1.542)
pt3dadd(52.2, 384.488, -33.335, 1.504)
pt3dadd(52.2, 384.607, -33.351, 1.466)
pt3dadd(52.2, 384.726, -33.367, 1.43)
pt3dadd(52.2, 384.844, -33.384, 1.392)
pt3dadd(52.2, 384.962, -33.4, 1.356)
pt3dadd(52.2, 385.082, -33.4, 1.316)
pt3dadd(52.2, 385.202, -33.4, 1.276)
pt3dadd(52.2, 385.322, -33.4, 1.236)
pt3dadd(52.2, 385.442, -33.4, 1.198)
pt3dadd(52.2, 385.562, -33.4, 1.158)
pt3dadd(52.2, 385.682, -33.4, 1.118)
pt3dadd(52.2, 385.802, -33.4, 1.078)
pt3dadd(52.2, 385.922, -33.404, 1.018)
pt3dadd(52.2, 386.042, -33.408, 0.958)
pt3dadd(52.2, 386.161, -33.415, 0.902)
pt3dadd(52.2, 386.274, -33.448, 0.88)
pt3dadd(52.2, 386.388, -33.481, 0.858)
pt3dadd(52.243, 386.495, -33.493, 0.872)
pt3dadd(52.299, 386.602, -33.498, 0.896)
pt3dadd(52.383, 386.683, -33.5, 0.912)
pt3dadd(52.482, 386.75, -33.5, 0.922)
pt3dadd(52.569, 386.831, -33.5, 0.92)
pt3dadd(52.643, 386.926, -33.5, 0.902)
pt3dadd(52.699, 387.031, -33.506, 0.88)
pt3dadd(52.755, 387.137, -33.511, 0.856)
pt3dadd(52.823, 387.222, -33.551, 0.88)
pt3dadd(52.893, 387.306, -33.59, 0.918)
pt3dadd(52.978, 387.391, -33.595, 1.018)
pt3dadd(53.066, 387.467, -33.6, 1.114)
pt3dadd(53.186, 387.472, -33.6, 1.192)
pt3dadd(53.306, 387.476, -33.6, 1.27)
pt3dadd(53.423, 387.488, -33.606, 1.344)
pt3dadd(53.532, 387.529, -33.632, 1.404)
pt3dadd(53.64, 387.569, -33.659, 1.464)
pt3dadd(53.748, 387.608, -33.686, 1.526)
pt3dadd(53.779, 387.719, -33.693, 1.568)
pt3dadd(53.8, 387.836, -33.697, 1.608)
pt3dadd(53.86, 387.914, -33.7, 1.652)
pt3dadd(53.979, 387.934, -33.7, 1.702)
pt3dadd(54.097, 387.953, -33.7, 1.754)
pt3dadd(54.216, 387.972, -33.7, 1.804)
pt3dadd(54.323, 388.021, -33.715, 1.876)
pt3dadd(54.429, 388.074, -33.731, 1.95)
pt3dadd(54.484, 388.168, -33.77, 1.996)
pt3dadd(54.533, 388.265, -33.811, 2.036)
pt3dadd(54.569, 388.369, -33.847, 2.034)
pt3dadd(54.587, 388.482, -33.878, 1.974)
pt3dadd(54.6, 388.597, -33.9, 1.856)
pt3dadd(54.604, 388.717, -33.9, 1.666)
pt3dadd(54.617, 388.836, -33.9, 1.61)
pt3dadd(54.629, 388.955, -33.9, 1.554)
pt3dadd(54.642, 389.075, -33.9, 1.5)
pt3dadd(54.654, 389.194, -33.9, 1.444)
pt3dadd(54.667, 389.314, -33.9, 1.39)
pt3dadd(54.68, 389.432, -33.9, 1.334)
pt3dadd(54.709, 389.549, -33.9, 1.286)
pt3dadd(54.739, 389.665, -33.9, 1.238)
pt3dadd(54.769, 389.782, -33.9, 1.19)
pt3dadd(54.799, 389.898, -33.9, 1.142)
pt3dadd(54.829, 390.013, -33.9, 1.094)
pt3dadd(54.865, 390.127, -33.9, 1.046)
pt3dadd(54.925, 390.232, -33.9, 1.002)
pt3dadd(54.985, 390.335, -33.9, 0.958)
pt3dadd(55.045, 390.439, -33.9, 0.914)
pt3dadd(55.105, 390.544, -33.9, 0.87)
pt3dadd(55.162, 390.648, -33.9, 0.828)
pt3dadd(55.182, 390.767, -33.9, 0.816)
pt3dadd(55.201, 390.886, -33.9, 0.802)
pt3dadd(55.221, 391.003, -33.9, 0.79)
pt3dadd(55.241, 391.122, -33.9, 0.778)
pt3dadd(55.26, 391.24, -33.9, 0.766)
pt3dadd(55.28, 391.358, -33.9, 0.754)
pt3dadd(55.325, 391.47, -33.9, 0.758)
pt3dadd(55.369, 391.582, -33.9, 0.762)
pt3dadd(55.414, 391.693, -33.9, 0.768)
pt3dadd(55.458, 391.805, -33.9, 0.772)
pt3dadd(55.503, 391.915, -33.9, 0.776)
pt3dadd(55.539, 392.03, -33.9, 0.788)
pt3dadd(55.569, 392.146, -33.9, 0.806)
pt3dadd(55.599, 392.262, -33.9, 0.824)
pt3dadd(55.629, 392.378, -33.9, 0.842)
pt3dadd(55.659, 392.495, -33.9, 0.86)
pt3dadd(55.689, 392.611, -33.9, 0.876)
pt3dadd(55.722, 392.726, -33.9, 0.894)
pt3dadd(55.755, 392.842, -33.9, 0.912)
pt3dadd(55.788, 392.957, -33.9, 0.93)
pt3dadd(55.821, 393.072, -33.9, 0.948)
pt3dadd(55.854, 393.187, -33.9, 0.966)
pt3dadd(55.886, 393.304, -33.901, 0.98)
pt3dadd(55.912, 393.42, -33.907, 0.98)
pt3dadd(55.938, 393.538, -33.913, 0.98)
pt3dadd(55.964, 393.654, -33.919, 0.98)
pt3dadd(55.99, 393.77, -33.925, 0.98)
pt3dadd(56.017, 393.888, -33.931, 0.98)
pt3dadd(56.031, 393.998, -33.962, 0.958)
pt3dadd(56.037, 394.104, -34.008, 0.922)
pt3dadd(56.04, 394.214, -34.046, 0.874)
pt3dadd(56.04, 394.33, -34.074, 0.812)
pt3dadd(56.04, 394.445, -34.101, 0.752)
pt3dadd(56.04, 394.558, -34.134, 0.708)
pt3dadd(56.04, 394.672, -34.168, 0.666)
pt3dadd(56.04, 394.739, -34.242, 0.646)
pt3dadd(56.04, 394.786, -34.334, 0.634)
pt3dadd(56.061, 394.853, -34.403, 0.63)
pt3dadd(56.112, 394.952, -34.439, 0.64)
pt3dadd(56.164, 395.052, -34.475, 0.648)
}
}
proc shape3d_126() {
dend_5[14] { pt3dadd(56.212, 395.155, -34.5, 0.656)
pt3dadd(56.252, 395.268, -34.5, 0.666)
pt3dadd(56.291, 395.382, -34.5, 0.678)
pt3dadd(56.325, 395.497, -34.5, 0.678)
pt3dadd(56.361, 395.611, -34.5, 0.678)
pt3dadd(56.397, 395.726, -34.5, 0.678)
pt3dadd(56.432, 395.84, -34.5, 0.678)
pt3dadd(56.468, 395.956, -34.5, 0.678)
pt3dadd(56.504, 396.07, -34.5, 0.678)
pt3dadd(56.52, 396.187, -34.5, 0.678)
pt3dadd(56.52, 396.307, -34.5, 0.678)
pt3dadd(56.52, 396.427, -34.5, 0.678)
pt3dadd(56.52, 396.547, -34.5, 0.678)
pt3dadd(56.52, 396.667, -34.5, 0.678)
pt3dadd(56.52, 396.787, -34.5, 0.678)
pt3dadd(56.52, 396.907, -34.5, 0.678)
pt3dadd(56.535, 397.026, -34.5, 0.678)
pt3dadd(56.563, 397.142, -34.5, 0.678)
pt3dadd(56.59, 397.259, -34.5, 0.678)
pt3dadd(56.618, 397.376, -34.5, 0.678)
pt3dadd(56.645, 397.493, -34.5, 0.678)
pt3dadd(56.672, 397.609, -34.5, 0.678)
pt3dadd(56.711, 397.721, -34.515, 0.678)
pt3dadd(56.753, 397.83, -34.537, 0.678)
pt3dadd(56.795, 397.94, -34.558, 0.678)
pt3dadd(56.837, 398.05, -34.579, 0.678)
pt3dadd(56.88, 398.159, -34.6, 0.678)
pt3dadd(56.9, 398.278, -34.6, 0.674)
pt3dadd(56.919, 398.395, -34.6, 0.67)
pt3dadd(56.939, 398.514, -34.6, 0.666)
pt3dadd(56.959, 398.632, -34.6, 0.662)
pt3dadd(56.978, 398.75, -34.6, 0.658)
pt3dadd(56.998, 398.869, -34.6, 0.654)
pt3dadd(57, 398.989, -34.6, 0.668)
pt3dadd(57, 399.109, -34.6, 0.684)
pt3dadd(57, 399.229, -34.6, 0.702)
pt3dadd(57.036, 399.342, -34.6, 0.77)
pt3dadd(57.076, 399.456, -34.6, 0.846)
pt3dadd(57.156, 399.528, -34.6, 0.962)
pt3dadd(57.269, 399.568, -34.6, 1.11)
pt3dadd(57.384, 399.604, -34.6, 1.254)
pt3dadd(57.502, 399.624, -34.6, 1.37)
pt3dadd(57.62, 399.644, -34.6, 1.486)
pt3dadd(57.675, 399.724, -34.61, 1.554)
pt3dadd(57.688, 399.841, -34.627, 1.592)
pt3dadd(57.702, 399.959, -34.644, 1.63)
pt3dadd(57.715, 400.076, -34.66, 1.668)
pt3dadd(57.73, 400.194, -34.675, 1.682)
pt3dadd(57.747, 400.312, -34.689, 1.682)
pt3dadd(57.773, 400.427, -34.7, 1.682)
pt3dadd(57.803, 400.54, -34.7, 1.682)
pt3dadd(57.809, 400.66, -34.7, 1.682)
pt3dadd(57.815, 400.78, -34.7, 1.682)
pt3dadd(57.821, 400.9, -34.7, 1.682)
pt3dadd(57.827, 401.02, -34.7, 1.682)
pt3dadd(57.833, 401.14, -34.7, 1.682)
pt3dadd(57.839, 401.258, -34.7, 1.682)
pt3dadd(57.863, 401.376, -34.7, 1.678)
pt3dadd(57.89, 401.494, -34.7, 1.674)
pt3dadd(57.917, 401.61, -34.7, 1.67)
pt3dadd(57.945, 401.726, -34.7, 1.666)
pt3dadd(57.972, 401.844, -34.7, 1.662)
pt3dadd(58, 401.96, -34.7, 1.658)
pt3dadd(58.06, 402.064, -34.7, 1.622)
pt3dadd(58.121, 402.167, -34.7, 1.588)
pt3dadd(58.204, 402.253, -34.7, 1.582)
pt3dadd(58.292, 402.335, -34.7, 1.582)
pt3dadd(58.352, 402.436, -34.7, 1.604)
pt3dadd(58.399, 402.546, -34.7, 1.638)
pt3dadd(58.429, 402.66, -34.702, 1.672)
pt3dadd(58.433, 402.78, -34.706, 1.708)
pt3dadd(58.438, 402.9, -34.71, 1.744)
pt3dadd(58.44, 403.015, -34.733, 1.768)
pt3dadd(58.443, 403.127, -34.769, 1.78)
pt3dadd(58.483, 403.234, -34.798, 1.742)
pt3dadd(58.524, 403.342, -34.827, 1.704)
pt3dadd(58.565, 403.448, -34.856, 1.666)
pt3dadd(58.606, 403.556, -34.885, 1.628)
pt3dadd(58.641, 403.668, -34.9, 1.588)
pt3dadd(58.671, 403.784, -34.9, 1.55)
pt3dadd(58.702, 403.9, -34.9, 1.51)
pt3dadd(58.732, 404.016, -34.9, 1.47)
pt3dadd(58.762, 404.132, -34.9, 1.432)
pt3dadd(58.792, 404.249, -34.9, 1.392)
pt3dadd(58.801, 404.368, -34.9, 1.362)
pt3dadd(58.803, 404.488, -34.9, 1.338)
pt3dadd(58.805, 404.608, -34.9, 1.312)
pt3dadd(58.807, 404.728, -34.9, 1.286)
pt3dadd(58.809, 404.848, -34.9, 1.26)
pt3dadd(58.811, 404.968, -34.9, 1.234)
pt3dadd(58.813, 405.088, -34.9, 1.21)
pt3dadd(58.848, 405.202, -34.9, 1.22)
pt3dadd(58.89, 405.313, -34.9, 1.24)
pt3dadd(58.931, 405.426, -34.9, 1.258)
pt3dadd(58.973, 405.539, -34.9, 1.276)
pt3dadd(59.015, 405.652, -34.9, 1.294)
pt3dadd(59.051, 405.766, -34.9, 1.318)
pt3dadd(59.078, 405.882, -34.9, 1.348)
pt3dadd(59.106, 406, -34.9, 1.378)
pt3dadd(59.133, 406.116, -34.9, 1.408)
pt3dadd(59.16, 406.232, -34.9, 1.438)
pt3dadd(59.188, 406.35, -34.9, 1.468)
pt3dadd(59.222, 406.465, -34.9, 1.494)
pt3dadd(59.26, 406.578, -34.9, 1.518)
pt3dadd(59.299, 406.692, -34.9, 1.54)
pt3dadd(59.338, 406.806, -34.9, 1.562)
pt3dadd(59.376, 406.919, -34.9, 1.586)
pt3dadd(59.415, 407.033, -34.9, 1.606)
pt3dadd(59.457, 407.146, -34.9, 1.592)
pt3dadd(59.499, 407.257, -34.9, 1.578)
pt3dadd(59.54, 407.37, -34.9, 1.564)
pt3dadd(59.582, 407.483, -34.9, 1.552)
pt3dadd(59.623, 407.596, -34.9, 1.538)
pt3dadd(59.64, 407.712, -34.91, 1.522)
pt3dadd(59.64, 407.83, -34.926, 1.506)
pt3dadd(59.64, 407.948, -34.943, 1.488)
pt3dadd(59.64, 408.066, -34.959, 1.472)
pt3dadd(59.64, 408.185, -34.976, 1.456)
pt3dadd(59.64, 408.304, -34.992, 1.44)
pt3dadd(59.64, 408.422, -35, 1.428)
pt3dadd(59.64, 408.542, -35, 1.42)
pt3dadd(59.64, 408.662, -35, 1.414)
pt3dadd(59.64, 408.782, -35, 1.406)
pt3dadd(59.64, 408.902, -35, 1.398)
pt3dadd(59.64, 409.022, -35, 1.392)
pt3dadd(59.64, 409.142, -35, 1.384)
pt3dadd(59.64, 409.262, -35, 1.386)
pt3dadd(59.64, 409.382, -35, 1.398)
pt3dadd(59.64, 409.502, -35, 1.408)
pt3dadd(59.64, 409.622, -35, 1.418)
pt3dadd(59.64, 409.742, -35, 1.43)
pt3dadd(59.64, 409.862, -35, 1.44)
pt3dadd(59.64, 409.982, -35, 1.452)
pt3dadd(59.652, 410.1, -35.01, 1.462)
pt3dadd(59.675, 410.215, -35.029, 1.472)
pt3dadd(59.698, 410.332, -35.049, 1.48)
pt3dadd(59.721, 410.447, -35.068, 1.49)
pt3dadd(59.744, 410.562, -35.087, 1.5)
pt3dadd(59.772, 410.677, -35.1, 1.506)
pt3dadd(59.808, 410.791, -35.1, 1.5)
pt3dadd(59.843, 410.906, -35.1, 1.496)
pt3dadd(59.879, 411.02, -35.1, 1.492)
pt3dadd(59.915, 411.136, -35.1, 1.488)
pt3dadd(59.951, 411.25, -35.1, 1.482)
pt3dadd(59.998, 411.36, -35.1, 1.464)
pt3dadd(60.048, 411.469, -35.1, 1.44)
pt3dadd(60.099, 411.577, -35.1, 1.416)
pt3dadd(60.149, 411.686, -35.1, 1.392)
pt3dadd(60.2, 411.796, -35.1, 1.368)
pt3dadd(60.239, 411.907, -35.11, 1.346)
pt3dadd(60.266, 412.021, -35.132, 1.326)
pt3dadd(60.292, 412.135, -35.155, 1.306)
pt3dadd(60.319, 412.249, -35.177, 1.286)
pt3dadd(60.345, 412.363, -35.199, 1.266)
pt3dadd(60.36, 412.478, -35.221, 1.25)
pt3dadd(60.36, 412.595, -35.244, 1.238)
pt3dadd(60.36, 412.711, -35.267, 1.224)
pt3dadd(60.36, 412.829, -35.29, 1.212)
pt3dadd(60.36, 412.945, -35.313, 1.198)
pt3dadd(60.36, 413.062, -35.336, 1.186)
pt3dadd(60.36, 413.177, -35.363, 1.18)
pt3dadd(60.36, 413.292, -35.392, 1.18)
pt3dadd(60.36, 413.406, -35.422, 1.18)
pt3dadd(60.36, 413.521, -35.452, 1.18)
pt3dadd(60.36, 413.635, -35.482, 1.18)
pt3dadd(60.36, 413.75, -35.511, 1.18)
pt3dadd(60.36, 413.869, -35.526, 1.18)
pt3dadd(60.36, 413.988, -35.54, 1.18)
pt3dadd(60.36, 414.107, -35.555, 1.18)
pt3dadd(60.36, 414.226, -35.569, 1.18)
pt3dadd(60.36, 414.344, -35.583, 1.18)
pt3dadd(60.36, 414.463, -35.598, 1.18)
pt3dadd(60.36, 414.577, -35.625, 1.192)
pt3dadd(60.36, 414.692, -35.655, 1.206)
pt3dadd(60.36, 414.806, -35.685, 1.218)
pt3dadd(60.36, 414.922, -35.715, 1.232)
pt3dadd(60.36, 415.036, -35.745, 1.246)
pt3dadd(60.36, 415.15, -35.777, 1.258)
pt3dadd(60.36, 415.261, -35.814, 1.268)
pt3dadd(60.36, 415.373, -35.851, 1.276)
pt3dadd(60.36, 415.484, -35.888, 1.286)
pt3dadd(60.36, 415.595, -35.925, 1.296)
pt3dadd(60.36, 415.706, -35.962, 1.304)
pt3dadd(60.36, 415.825, -35.971, 1.32)
pt3dadd(60.36, 415.945, -35.976, 1.334)
pt3dadd(60.36, 416.065, -35.981, 1.35)
pt3dadd(60.36, 416.185, -35.986, 1.364)
pt3dadd(60.36, 416.305, -35.991, 1.38)
pt3dadd(60.36, 416.425, -35.996, 1.394)
pt3dadd(60.36, 416.545, -36, 1.406)
pt3dadd(60.36, 416.665, -36, 1.41)
pt3dadd(60.36, 416.785, -36, 1.414)
pt3dadd(60.36, 416.905, -36, 1.418)
pt3dadd(60.36, 417.025, -36, 1.422)
pt3dadd(60.36, 417.145, -36, 1.424)
pt3dadd(60.36, 417.265, -36, 1.428)
pt3dadd(60.36, 417.385, -36, 1.432)
pt3dadd(60.36, 417.505, -36, 1.44)
pt3dadd(60.36, 417.625, -36, 1.448)
pt3dadd(60.36, 417.745, -36, 1.454)
}
}
proc shape3d_127() {
dend_5[14] { pt3dadd(60.36, 417.865, -36, 1.462)
pt3dadd(60.36, 417.985, -36, 1.468)
pt3dadd(60.36, 418.105, -36, 1.476)
pt3dadd(60.36, 418.225, -36, 1.482)
pt3dadd(60.36, 418.345, -36, 1.482)
pt3dadd(60.36, 418.465, -36, 1.482)
pt3dadd(60.36, 418.585, -36, 1.482)
pt3dadd(60.36, 418.705, -36, 1.482)
pt3dadd(60.36, 418.825, -36, 1.482)
pt3dadd(60.36, 418.945, -36, 1.482)
pt3dadd(60.36, 419.064, -36.003, 1.484)
pt3dadd(60.36, 419.183, -36.02, 1.492)
pt3dadd(60.36, 419.302, -36.036, 1.5)
pt3dadd(60.36, 419.419, -36.053, 1.508)
pt3dadd(60.36, 419.538, -36.069, 1.516)
pt3dadd(60.36, 419.656, -36.086, 1.524)
pt3dadd(60.358, 419.774, -36.1, 1.532)
pt3dadd(60.338, 419.893, -36.1, 1.532)
pt3dadd(60.318, 420.011, -36.1, 1.532)
pt3dadd(60.298, 420.13, -36.1, 1.532)
pt3dadd(60.279, 420.248, -36.1, 1.532)
pt3dadd(60.259, 420.366, -36.1, 1.532)
pt3dadd(60.239, 420.485, -36.101, 1.532)
pt3dadd(60.225, 420.601, -36.119, 1.536)
pt3dadd(60.21, 420.719, -36.137, 1.542)
pt3dadd(60.195, 420.836, -36.156, 1.546)
pt3dadd(60.181, 420.953, -36.174, 1.55)
pt3dadd(60.166, 421.07, -36.192, 1.554)
pt3dadd(60.156, 421.189, -36.2, 1.552)
pt3dadd(60.15, 421.308, -36.2, 1.546)
pt3dadd(60.144, 421.428, -36.2, 1.538)
pt3dadd(60.138, 421.548, -36.2, 1.53)
pt3dadd(60.132, 421.668, -36.2, 1.522)
pt3dadd(60.127, 421.788, -36.2, 1.516)
pt3dadd(60.121, 421.908, -36.2, 1.508)
pt3dadd(60.12, 422.027, -36.185, 1.492)
pt3dadd(60.12, 422.144, -36.169, 1.476)
pt3dadd(60.12, 422.263, -36.152, 1.458)
pt3dadd(60.12, 422.381, -36.136, 1.442)
pt3dadd(60.12, 422.5, -36.119, 1.426)
pt3dadd(60.12, 422.618, -36.103, 1.41)
pt3dadd(60.102, 422.735, -36.11, 1.368)
pt3dadd(60.08, 422.852, -36.122, 1.322)
pt3dadd(60.058, 422.97, -36.134, 1.276)
pt3dadd(60.036, 423.086, -36.147, 1.23)
pt3dadd(60.014, 423.204, -36.159, 1.184)
pt3dadd(59.998, 423.322, -36.171, 1.12)
pt3dadd(59.993, 423.44, -36.184, 1.024)
pt3dadd(59.988, 423.559, -36.197, 0.926)
pt3dadd(59.951, 423.672, -36.2, 0.862)
pt3dadd(59.904, 423.782, -36.2, 0.808)
pt3dadd(59.835, 423.876, -36.2, 0.79)
pt3dadd(59.741, 423.95, -36.2, 0.814)
pt3dadd(59.648, 424.025, -36.2, 0.852)
pt3dadd(59.554, 424.1, -36.2, 0.924)
pt3dadd(59.469, 424.183, -36.199, 0.984)
pt3dadd(59.414, 424.289, -36.196, 1.004)
pt3dadd(59.358, 424.396, -36.193, 1.026)
pt3dadd(59.303, 424.502, -36.19, 1.046)
pt3dadd(59.28, 424.613, -36.17, 1.06)
pt3dadd(59.28, 424.726, -36.137, 1.072)
pt3dadd(59.281, 424.841, -36.108, 1.078)
pt3dadd(59.285, 424.96, -36.095, 1.072)
pt3dadd(59.288, 425.078, -36.083, 1.064)
pt3dadd(59.292, 425.197, -36.07, 1.056)
pt3dadd(59.348, 425.255, -36.012, 1.076)
pt3dadd(59.421, 425.291, -35.939, 1.102)
pt3dadd(59.486, 425.371, -35.908, 1.25)
pt3dadd(59.502, 425.49, -35.899, 1.31)
pt3dadd(59.517, 425.609, -35.89, 1.372)
pt3dadd(59.52, 425.723, -35.861, 1.408)
pt3dadd(59.52, 425.836, -35.828, 1.44)
pt3dadd(59.51, 425.951, -35.809, 1.436)
pt3dadd(59.488, 426.07, -35.805, 1.396)
pt3dadd(59.467, 426.187, -35.8, 1.356)
}
dend_5[15] {pt3dclear()
pt3dadd(59.467, 426.187, -35.8, 1.356)
pt3dadd(59.56, 426.193, -35.776, 1.328)
pt3dadd(59.675, 426.202, -35.746, 1.296)
pt3dadd(59.789, 426.209, -35.717, 1.262)
pt3dadd(59.904, 426.217, -35.687, 1.228)
pt3dadd(60.018, 426.224, -35.658, 1.194)
pt3dadd(60.132, 426.233, -35.628, 1.162)
pt3dadd(60.245, 426.245, -35.6, 1.128)
pt3dadd(60.337, 426.323, -35.6, 1.108)
pt3dadd(60.428, 426.4, -35.6, 1.088)
pt3dadd(60.519, 426.478, -35.6, 1.068)
pt3dadd(60.611, 426.556, -35.6, 1.048)
pt3dadd(60.704, 426.63, -35.6, 1.03)
pt3dadd(60.817, 426.67, -35.6, 1.03)
pt3dadd(60.93, 426.709, -35.6, 1.03)
pt3dadd(61.047, 426.736, -35.6, 1.022)
pt3dadd(61.166, 426.755, -35.6, 1.012)
pt3dadd(61.273, 426.788, -35.6, 1.004)
pt3dadd(61.312, 426.902, -35.6, 1.004)
pt3dadd(61.351, 427.015, -35.6, 1.004)
pt3dadd(61.419, 427.114, -35.6, 0.996)
pt3dadd(61.494, 427.207, -35.6, 0.984)
pt3dadd(61.536, 427.316, -35.6, 0.988)
pt3dadd(61.559, 427.434, -35.6, 1.004)
pt3dadd(61.564, 427.554, -35.6, 1.02)
pt3dadd(61.569, 427.674, -35.6, 1.038)
pt3dadd(61.578, 427.792, -35.6, 1.056)
pt3dadd(61.666, 427.873, -35.6, 1.068)
pt3dadd(61.754, 427.954, -35.6, 1.078)
pt3dadd(61.868, 427.991, -35.6, 1.07)
pt3dadd(61.983, 428.023, -35.6, 1.06)
pt3dadd(62.098, 428.057, -35.6, 1.038)
pt3dadd(62.214, 428.09, -35.6, 1.008)
pt3dadd(62.329, 428.124, -35.6, 0.978)
pt3dadd(62.44, 428.17, -35.6, 0.966)
pt3dadd(62.551, 428.214, -35.6, 0.952)
pt3dadd(62.663, 428.26, -35.6, 0.94)
pt3dadd(62.762, 428.318, -35.6, 0.93)
pt3dadd(62.822, 428.422, -35.6, 0.93)
pt3dadd(62.885, 428.524, -35.6, 0.932)
pt3dadd(62.976, 428.602, -35.6, 0.986)
pt3dadd(63.062, 428.684, -35.6, 1.006)
pt3dadd(63.148, 428.768, -35.6, 1.026)
pt3dadd(63.234, 428.852, -35.6, 1.048)
pt3dadd(63.321, 428.935, -35.6, 1.068)
pt3dadd(63.419, 428.996, -35.6, 1.092)
pt3dadd(63.536, 429.023, -35.6, 1.122)
pt3dadd(63.653, 429.049, -35.6, 1.152)
pt3dadd(63.72, 429.144, -35.6, 1.166)
pt3dadd(63.781, 429.247, -35.6, 1.176)
pt3dadd(63.81, 429.361, -35.6, 1.168)
pt3dadd(63.825, 429.48, -35.6, 1.148)
pt3dadd(63.84, 429.599, -35.6, 1.13)
pt3dadd(63.846, 429.706, -35.646, 1.094)
pt3dadd(63.852, 429.811, -35.693, 1.06)
pt3dadd(63.925, 429.845, -35.759, 1.038)
pt3dadd(63.987, 429.917, -35.791, 1.03)
pt3dadd(64.033, 430.027, -35.796, 1.03)
pt3dadd(64.079, 430.139, -35.8, 1.03)
pt3dadd(64.125, 430.249, -35.804, 1.03)
pt3dadd(64.172, 430.36, -35.808, 1.03)
pt3dadd(64.221, 430.468, -35.82, 1.032)
pt3dadd(64.273, 430.572, -35.841, 1.038)
pt3dadd(64.325, 430.678, -35.863, 1.042)
pt3dadd(64.378, 430.782, -35.885, 1.048)
pt3dadd(64.43, 430.886, -35.907, 1.054)
pt3dadd(64.482, 430.992, -35.927, 1.05)
pt3dadd(64.533, 431.099, -35.946, 1.046)
pt3dadd(64.585, 431.204, -35.965, 1.04)
pt3dadd(64.636, 431.31, -35.984, 1.034)
pt3dadd(64.683, 431.418, -36, 1.03)
pt3dadd(64.703, 431.537, -36, 1.03)
pt3dadd(64.722, 431.654, -36, 1.03)
pt3dadd(64.742, 431.773, -36, 1.03)
pt3dadd(64.762, 431.892, -36, 1.03)
pt3dadd(64.782, 432.01, -36, 1.03)
pt3dadd(64.801, 432.128, -36, 1.03)
pt3dadd(64.822, 432.246, -36, 1.04)
pt3dadd(64.842, 432.365, -36, 1.05)
pt3dadd(64.905, 432.449, -36, 1.07)
pt3dadd(65.016, 432.494, -36, 1.102)
pt3dadd(65.111, 432.553, -36, 1.132)
pt3dadd(65.131, 432.672, -36, 1.142)
pt3dadd(65.151, 432.79, -36, 1.152)
pt3dadd(65.16, 432.907, -36.016, 1.15)
pt3dadd(65.16, 433.022, -36.043, 1.138)
pt3dadd(65.16, 433.138, -36.07, 1.12)
pt3dadd(65.16, 433.255, -36.089, 1.062)
pt3dadd(65.15, 433.372, -36.109, 1.02)
pt3dadd(65.127, 433.488, -36.128, 1.002)
pt3dadd(65.103, 433.603, -36.147, 0.982)
pt3dadd(65.08, 433.718, -36.166, 0.962)
pt3dadd(65.057, 433.834, -36.186, 0.944)
pt3dadd(65.029, 433.949, -36.2, 0.926)
pt3dadd(64.988, 434.062, -36.2, 0.912)
pt3dadd(64.946, 434.174, -36.2, 0.898)
pt3dadd(64.905, 434.286, -36.2, 0.884)
pt3dadd(64.863, 434.399, -36.2, 0.87)
pt3dadd(64.821, 434.512, -36.2, 0.856)
pt3dadd(64.798, 434.628, -36.191, 0.85)
pt3dadd(64.779, 434.746, -36.179, 0.844)
pt3dadd(64.759, 434.863, -36.168, 0.84)
pt3dadd(64.74, 434.981, -36.157, 0.834)
pt3dadd(64.721, 435.098, -36.145, 0.83)
pt3dadd(64.705, 435.212, -36.173, 0.824)
pt3dadd(64.689, 435.325, -36.204, 0.82)
pt3dadd(64.674, 435.438, -36.234, 0.814)
pt3dadd(64.658, 435.552, -36.265, 0.81)
pt3dadd(64.643, 435.665, -36.296, 0.804)
pt3dadd(64.606, 435.776, -36.312, 0.794)
pt3dadd(64.566, 435.889, -36.325, 0.784)
pt3dadd(64.526, 436.001, -36.338, 0.774)
pt3dadd(64.485, 436.112, -36.352, 0.764)
pt3dadd(64.445, 436.225, -36.365, 0.754)
pt3dadd(64.426, 436.342, -36.379, 0.744)
pt3dadd(64.409, 436.459, -36.393, 0.734)
pt3dadd(64.364, 436.565, -36.4, 0.74)
pt3dadd(64.289, 436.658, -36.4, 0.762)
pt3dadd(64.24, 436.762, -36.4, 0.79)
pt3dadd(64.24, 436.882, -36.4, 0.822)
pt3dadd(64.24, 437.002, -36.4, 0.854)
pt3dadd(64.294, 437.108, -36.4, 0.888)
pt3dadd(64.347, 437.216, -36.4, 0.922)
pt3dadd(64.374, 437.332, -36.4, 0.934)
pt3dadd(64.392, 437.45, -36.4, 0.94)
}
}
proc shape3d_128() {
dend_5[15] { pt3dadd(64.41, 437.569, -36.4, 0.944)
pt3dadd(64.429, 437.688, -36.4, 0.95)
pt3dadd(64.416, 437.801, -36.4, 0.958)
pt3dadd(64.356, 437.904, -36.4, 0.97)
pt3dadd(64.284, 437.993, -36.4, 0.98)
pt3dadd(64.205, 438.059, -36.4, 0.976)
pt3dadd(64.182, 438.176, -36.4, 0.968)
pt3dadd(64.16, 438.295, -36.4, 0.96)
pt3dadd(64.138, 438.413, -36.4, 0.952)
pt3dadd(64.116, 438.53, -36.4, 0.942)
pt3dadd(64.093, 438.648, -36.4, 0.934)
pt3dadd(64.08, 438.767, -36.4, 0.928)
pt3dadd(64.08, 438.887, -36.4, 0.924)
pt3dadd(64.08, 439.007, -36.4, 0.92)
pt3dadd(64.08, 439.127, -36.4, 0.916)
pt3dadd(64.08, 439.247, -36.4, 0.914)
pt3dadd(64.08, 439.367, -36.4, 0.91)
pt3dadd(64.08, 439.487, -36.4, 0.906)
pt3dadd(64.081, 439.607, -36.4, 0.902)
pt3dadd(64.083, 439.727, -36.4, 0.9)
pt3dadd(64.085, 439.847, -36.4, 0.896)
pt3dadd(64.086, 439.967, -36.4, 0.892)
pt3dadd(64.088, 440.087, -36.4, 0.888)
pt3dadd(64.09, 440.207, -36.4, 0.884)
pt3dadd(64.092, 440.327, -36.4, 0.88)
pt3dadd(64.103, 440.446, -36.41, 0.884)
pt3dadd(64.124, 440.561, -36.429, 0.894)
pt3dadd(64.144, 440.677, -36.447, 0.902)
pt3dadd(64.164, 440.794, -36.466, 0.912)
pt3dadd(64.184, 440.91, -36.485, 0.922)
pt3dadd(64.2, 441.026, -36.502, 0.93)
pt3dadd(64.2, 441.145, -36.513, 0.934)
pt3dadd(64.2, 441.265, -36.523, 0.938)
pt3dadd(64.2, 441.384, -36.534, 0.942)
pt3dadd(64.2, 441.504, -36.544, 0.946)
pt3dadd(64.2, 441.623, -36.555, 0.95)
pt3dadd(64.2, 441.743, -36.565, 0.954)
pt3dadd(64.2, 441.862, -36.571, 0.954)
pt3dadd(64.2, 441.982, -36.576, 0.954)
pt3dadd(64.2, 442.102, -36.581, 0.954)
pt3dadd(64.2, 442.222, -36.586, 0.954)
pt3dadd(64.2, 442.342, -36.591, 0.954)
pt3dadd(64.2, 442.462, -36.596, 0.954)
pt3dadd(64.2, 442.58, -36.595, 0.95)
pt3dadd(64.2, 442.696, -36.568, 0.93)
pt3dadd(64.2, 442.811, -36.54, 0.91)
pt3dadd(64.2, 442.93, -36.524, 0.882)
pt3dadd(64.2, 443.048, -36.512, 0.854)
pt3dadd(64.198, 443.167, -36.502, 0.826)
pt3dadd(64.173, 443.278, -36.535, 0.776)
pt3dadd(64.146, 443.388, -36.567, 0.728)
pt3dadd(64.056, 443.464, -36.584, 0.688)
pt3dadd(63.972, 443.544, -36.6, 0.65)
pt3dadd(63.957, 443.663, -36.6, 0.622)
pt3dadd(63.921, 443.766, -36.612, 0.606)
pt3dadd(63.831, 443.83, -36.652, 0.618)
pt3dadd(63.741, 443.893, -36.692, 0.63)
pt3dadd(63.652, 443.957, -36.732, 0.642)
pt3dadd(63.565, 444.025, -36.77, 0.66)
pt3dadd(63.494, 444.118, -36.793, 0.714)
pt3dadd(63.424, 444.196, -36.83, 0.776)
pt3dadd(63.359, 444.232, -36.909, 0.872)
pt3dadd(63.304, 444.296, -36.967, 0.97)
pt3dadd(63.263, 444.404, -36.995, 1.072)
pt3dadd(63.24, 444.515, -37.025, 1.166)
pt3dadd(63.24, 444.628, -37.058, 1.252)
pt3dadd(63.24, 444.742, -37.089, 1.338)
pt3dadd(63.24, 444.862, -37.095, 1.43)
pt3dadd(63.243, 444.98, -37.103, 1.508)
pt3dadd(63.257, 445.098, -37.119, 1.512)
pt3dadd(63.272, 445.216, -37.135, 1.516)
pt3dadd(63.286, 445.333, -37.151, 1.522)
pt3dadd(63.3, 445.451, -37.167, 1.526)
pt3dadd(63.315, 445.568, -37.183, 1.53)
pt3dadd(63.356, 445.676, -37.204, 1.514)
pt3dadd(63.412, 445.777, -37.229, 1.486)
pt3dadd(63.469, 445.879, -37.254, 1.458)
pt3dadd(63.526, 445.981, -37.279, 1.43)
pt3dadd(63.582, 446.083, -37.301, 1.398)
pt3dadd(63.635, 446.19, -37.308, 1.342)
pt3dadd(63.689, 446.297, -37.314, 1.286)
pt3dadd(63.742, 446.405, -37.321, 1.232)
pt3dadd(63.796, 446.512, -37.328, 1.176)
pt3dadd(63.84, 446.621, -37.335, 1.124)
pt3dadd(63.84, 446.74, -37.346, 1.092)
pt3dadd(63.84, 446.86, -37.356, 1.062)
pt3dadd(63.84, 446.978, -37.367, 1.03)
pt3dadd(63.84, 447.098, -37.377, 0.998)
pt3dadd(63.84, 447.217, -37.388, 0.966)
pt3dadd(63.84, 447.337, -37.398, 0.936)
pt3dadd(63.817, 447.452, -37.416, 0.918)
pt3dadd(63.787, 447.566, -37.436, 0.902)
pt3dadd(63.758, 447.679, -37.456, 0.888)
pt3dadd(63.729, 447.793, -37.476, 0.872)
pt3dadd(63.7, 447.907, -37.495, 0.858)
pt3dadd(63.67, 448.024, -37.5, 0.854)
pt3dadd(63.64, 448.14, -37.5, 0.854)
pt3dadd(63.609, 448.255, -37.5, 0.854)
pt3dadd(63.579, 448.372, -37.5, 0.854)
pt3dadd(63.549, 448.488, -37.5, 0.854)
pt3dadd(63.519, 448.604, -37.501, 0.854)
pt3dadd(63.512, 448.721, -37.52, 0.854)
pt3dadd(63.505, 448.838, -37.54, 0.854)
pt3dadd(63.498, 448.956, -37.559, 0.854)
pt3dadd(63.491, 449.074, -37.579, 0.854)
pt3dadd(63.484, 449.191, -37.598, 0.854)
pt3dadd(63.472, 449.309, -37.617, 0.858)
pt3dadd(63.449, 449.424, -37.634, 0.866)
pt3dadd(63.426, 449.54, -37.651, 0.876)
pt3dadd(63.404, 449.657, -37.668, 0.886)
pt3dadd(63.381, 449.772, -37.684, 0.896)
pt3dadd(63.362, 449.888, -37.7, 0.906)
pt3dadd(63.387, 450.006, -37.7, 0.926)
pt3dadd(63.411, 450.124, -37.7, 0.948)
pt3dadd(63.436, 450.241, -37.7, 0.97)
pt3dadd(63.461, 450.359, -37.7, 0.99)
pt3dadd(63.486, 450.476, -37.7, 1.012)
pt3dadd(63.513, 450.593, -37.7, 1.034)
pt3dadd(63.555, 450.704, -37.7, 1.056)
pt3dadd(63.597, 450.817, -37.7, 1.08)
pt3dadd(63.638, 450.93, -37.7, 1.102)
pt3dadd(63.68, 451.043, -37.7, 1.126)
pt3dadd(63.722, 451.156, -37.7, 1.148)
pt3dadd(63.778, 451.26, -37.7, 1.148)
pt3dadd(63.841, 451.362, -37.7, 1.138)
pt3dadd(63.904, 451.464, -37.7, 1.128)
pt3dadd(63.967, 451.567, -37.7, 1.118)
pt3dadd(64.03, 451.669, -37.7, 1.108)
pt3dadd(64.118, 451.746, -37.7, 1.09)
pt3dadd(64.22, 451.81, -37.7, 1.064)
pt3dadd(64.322, 451.872, -37.7, 1.04)
pt3dadd(64.425, 451.936, -37.7, 1.016)
pt3dadd(64.527, 451.998, -37.7, 0.99)
pt3dadd(64.633, 452.052, -37.7, 0.95)
pt3dadd(64.744, 452.099, -37.7, 0.894)
pt3dadd(64.842, 452.16, -37.7, 0.85)
pt3dadd(64.903, 452.263, -37.7, 0.84)
pt3dadd(64.962, 452.368, -37.7, 0.828)
pt3dadd(64.996, 452.483, -37.695, 0.818)
pt3dadd(65.031, 452.597, -37.69, 0.806)
pt3dadd(65.044, 452.71, -37.663, 0.804)
pt3dadd(65.05, 452.822, -37.629, 0.804)
pt3dadd(65.076, 452.934, -37.607, 0.796)
pt3dadd(65.123, 453.044, -37.6, 0.778)
pt3dadd(65.176, 453.151, -37.6, 0.788)
pt3dadd(65.23, 453.259, -37.6, 0.798)
pt3dadd(65.283, 453.366, -37.6, 0.808)
pt3dadd(65.337, 453.474, -37.6, 0.818)
pt3dadd(65.391, 453.581, -37.6, 0.826)
pt3dadd(65.414, 453.697, -37.6, 0.826)
pt3dadd(65.432, 453.816, -37.6, 0.822)
pt3dadd(65.449, 453.935, -37.6, 0.818)
pt3dadd(65.466, 454.054, -37.6, 0.814)
pt3dadd(65.483, 454.172, -37.6, 0.81)
pt3dadd(65.501, 454.291, -37.6, 0.806)
pt3dadd(65.538, 454.405, -37.6, 0.806)
pt3dadd(65.585, 454.514, -37.6, 0.812)
pt3dadd(65.633, 454.625, -37.6, 0.816)
pt3dadd(65.68, 454.735, -37.6, 0.82)
pt3dadd(65.728, 454.846, -37.6, 0.826)
pt3dadd(65.765, 454.958, -37.6, 0.82)
pt3dadd(65.779, 455.077, -37.6, 0.792)
pt3dadd(65.794, 455.197, -37.6, 0.764)
pt3dadd(65.834, 455.309, -37.6, 0.754)
pt3dadd(65.887, 455.416, -37.6, 0.754)
pt3dadd(65.959, 455.507, -37.6, 0.758)
pt3dadd(66.058, 455.575, -37.6, 0.77)
pt3dadd(66.158, 455.641, -37.6, 0.798)
pt3dadd(66.261, 455.702, -37.6, 0.878)
pt3dadd(66.363, 455.765, -37.6, 0.96)
pt3dadd(66.428, 455.866, -37.6, 1.082)
pt3dadd(66.489, 455.969, -37.6, 1.148)
pt3dadd(66.549, 456.073, -37.6, 1.178)
pt3dadd(66.609, 456.178, -37.6, 1.206)
pt3dadd(66.668, 456.281, -37.6, 1.236)
pt3dadd(66.728, 456.385, -37.6, 1.266)
pt3dadd(66.813, 456.458, -37.6, 1.28)
pt3dadd(66.926, 456.498, -37.6, 1.28)
pt3dadd(67.035, 456.544, -37.602, 1.276)
pt3dadd(67.103, 456.64, -37.619, 1.238)
pt3dadd(67.164, 456.739, -37.639, 1.194)
pt3dadd(67.182, 456.851, -37.67, 1.122)
pt3dadd(67.2, 456.964, -37.7, 1.054)
pt3dadd(67.205, 457.084, -37.7, 1.01)
pt3dadd(67.209, 457.204, -37.7, 0.966)
pt3dadd(67.227, 457.316, -37.7, 0.928)
pt3dadd(67.324, 457.387, -37.7, 0.914)
pt3dadd(67.421, 457.458, -37.7, 0.9)
pt3dadd(67.518, 457.529, -37.7, 0.886)
pt3dadd(67.618, 457.595, -37.7, 0.878)
pt3dadd(67.722, 457.655, -37.7, 0.878)
pt3dadd(67.788, 457.738, -37.7, 0.882)
pt3dadd(67.791, 457.858, -37.7, 0.888)
pt3dadd(67.795, 457.978, -37.7, 0.894)
pt3dadd(67.798, 458.098, -37.7, 0.9)
pt3dadd(67.8, 458.218, -37.7, 0.908)
pt3dadd(67.8, 458.338, -37.7, 0.916)
pt3dadd(67.8, 458.458, -37.7, 0.924)
pt3dadd(67.8, 458.578, -37.7, 0.954)
pt3dadd(67.803, 458.698, -37.7, 0.984)
}
}
proc shape3d_129() {
dend_5[15] { pt3dadd(67.809, 458.818, -37.7, 0.996)
pt3dadd(67.815, 458.938, -37.7, 1.008)
pt3dadd(67.821, 459.058, -37.7, 1.018)
pt3dadd(67.827, 459.176, -37.7, 1.03)
pt3dadd(67.833, 459.296, -37.7, 1.042)
pt3dadd(67.838, 459.416, -37.7, 1.052)
pt3dadd(67.89, 459.522, -37.7, 1.066)
pt3dadd(67.953, 459.624, -37.7, 1.082)
pt3dadd(68.016, 459.726, -37.7, 1.096)
pt3dadd(68.079, 459.829, -37.7, 1.112)
pt3dadd(68.142, 459.931, -37.7, 1.126)
pt3dadd(68.196, 460.038, -37.7, 1.134)
pt3dadd(68.247, 460.147, -37.7, 1.138)
pt3dadd(68.297, 460.255, -37.7, 1.142)
pt3dadd(68.348, 460.364, -37.7, 1.148)
pt3dadd(68.398, 460.474, -37.7, 1.152)
pt3dadd(68.464, 460.572, -37.7, 1.15)
pt3dadd(68.547, 460.658, -37.7, 1.14)
pt3dadd(68.631, 460.744, -37.7, 1.13)
pt3dadd(68.715, 460.83, -37.7, 1.12)
pt3dadd(68.798, 460.916, -37.7, 1.11)
pt3dadd(68.855, 461.017, -37.7, 1.1)
pt3dadd(68.885, 461.134, -37.7, 1.092)
pt3dadd(68.915, 461.249, -37.7, 1.084)
pt3dadd(68.946, 461.365, -37.7, 1.074)
pt3dadd(68.976, 461.482, -37.7, 1.066)
pt3dadd(69.006, 461.598, -37.7, 1.058)
pt3dadd(69.074, 461.694, -37.7, 1.054)
pt3dadd(69.154, 461.783, -37.7, 1.054)
pt3dadd(69.235, 461.872, -37.7, 1.054)
pt3dadd(69.316, 461.96, -37.7, 1.054)
pt3dadd(69.396, 462.049, -37.7, 1.054)
pt3dadd(69.5, 462.106, -37.7, 1.07)
pt3dadd(69.611, 462.152, -37.7, 1.088)
pt3dadd(69.721, 462.2, -37.7, 1.108)
pt3dadd(69.831, 462.247, -37.7, 1.126)
pt3dadd(69.941, 462.295, -37.7, 1.146)
pt3dadd(70.053, 462.337, -37.7, 1.154)
pt3dadd(70.168, 462.373, -37.7, 1.148)
pt3dadd(70.283, 462.408, -37.7, 1.144)
pt3dadd(70.397, 462.444, -37.7, 1.14)
pt3dadd(70.512, 462.48, -37.7, 1.134)
pt3dadd(70.626, 462.515, -37.7, 1.13)
pt3dadd(70.709, 462.6, -37.695, 1.088)
pt3dadd(70.786, 462.691, -37.69, 1.038)
pt3dadd(70.888, 462.728, -37.657, 0.936)
pt3dadd(70.996, 462.755, -37.618, 0.822)
pt3dadd(71.084, 462.83, -37.607, 0.742)
pt3dadd(71.168, 462.916, -37.601, 0.668)
pt3dadd(71.258, 462.994, -37.614, 0.612)
pt3dadd(71.348, 463.069, -37.631, 0.56)
pt3dadd(71.388, 463.163, -37.679, 0.57)
pt3dadd(71.42, 463.27, -37.712, 0.586)
pt3dadd(71.452, 463.382, -37.733, 0.602)
pt3dadd(71.484, 463.495, -37.753, 0.618)
pt3dadd(71.516, 463.609, -37.773, 0.632)
pt3dadd(71.549, 463.722, -37.793, 0.648)
pt3dadd(71.603, 463.826, -37.805, 0.664)
pt3dadd(71.67, 463.926, -37.812, 0.678)
pt3dadd(71.736, 464.026, -37.818, 0.694)
pt3dadd(71.803, 464.125, -37.825, 0.71)
pt3dadd(71.869, 464.225, -37.832, 0.726)
pt3dadd(71.944, 464.316, -37.846, 0.738)
pt3dadd(72.02, 464.407, -37.86, 0.748)
pt3dadd(72.097, 464.498, -37.875, 0.76)
pt3dadd(72.173, 464.59, -37.89, 0.77)
pt3dadd(72.246, 464.678, -37.914, 0.784)
pt3dadd(72.311, 464.762, -37.96, 0.802)
pt3dadd(72.376, 464.848, -38.006, 0.82)
pt3dadd(72.441, 464.932, -38.052, 0.838)
pt3dadd(72.502, 465.02, -38.089, 0.858)
pt3dadd(72.551, 465.131, -38.091, 0.882)
pt3dadd(72.599, 465.24, -38.094, 0.906)
pt3dadd(72.648, 465.35, -38.096, 0.93)
pt3dadd(72.696, 465.46, -38.098, 0.954)
pt3dadd(72.745, 465.57, -38.1, 0.978)
pt3dadd(72.744, 465.689, -38.1, 0.992)
pt3dadd(72.741, 465.809, -38.1, 1.008)
pt3dadd(72.739, 465.929, -38.1, 1.022)
pt3dadd(72.737, 466.049, -38.1, 1.036)
pt3dadd(72.734, 466.169, -38.1, 1.05)
pt3dadd(72.748, 466.288, -38.1, 1.058)
pt3dadd(72.771, 466.405, -38.1, 1.062)
pt3dadd(72.794, 466.523, -38.1, 1.066)
pt3dadd(72.817, 466.642, -38.1, 1.07)
pt3dadd(72.84, 466.759, -38.1, 1.074)
pt3dadd(72.863, 466.877, -38.1, 1.08)
pt3dadd(72.872, 466.996, -38.1, 1.072)
pt3dadd(72.879, 467.116, -38.1, 1.064)
pt3dadd(72.887, 467.236, -38.1, 1.056)
pt3dadd(72.894, 467.356, -38.1, 1.046)
pt3dadd(72.901, 467.476, -38.1, 1.038)
pt3dadd(72.901, 467.591, -38.102, 1.028)
pt3dadd(72.805, 467.648, -38.139, 1.014)
pt3dadd(72.732, 467.722, -38.17, 0.998)
pt3dadd(72.727, 467.84, -38.183, 0.968)
pt3dadd(72.722, 467.959, -38.196, 0.94)
pt3dadd(72.72, 468.071, -38.229, 0.892)
pt3dadd(72.72, 468.178, -38.274, 0.836)
pt3dadd(72.723, 468.27, -38.334, 0.762)
pt3dadd(72.729, 468.341, -38.415, 0.666)
pt3dadd(72.743, 468.427, -38.47, 0.584)
pt3dadd(72.77, 468.544, -38.478, 0.532)
pt3dadd(72.798, 468.66, -38.487, 0.482)
pt3dadd(72.825, 468.776, -38.495, 0.43)
pt3dadd(72.84, 468.895, -38.502, 0.386)
pt3dadd(72.84, 469.015, -38.506, 0.352)
pt3dadd(72.84, 469.134, -38.509, 0.316)
pt3dadd(72.84, 469.248, -38.536, 0.302)
pt3dadd(72.84, 469.339, -38.6, 0.34)
pt3dadd(72.84, 469.427, -38.668, 0.388)
pt3dadd(72.84, 469.535, -38.704, 0.436)
pt3dadd(72.84, 469.652, -38.726, 0.486)
pt3dadd(72.84, 469.764, -38.757, 0.544)
pt3dadd(72.84, 469.852, -38.825, 0.634)
pt3dadd(72.856, 469.938, -38.869, 0.73)
pt3dadd(72.93, 470.02, -38.828, 0.854)
pt3dadd(73.001, 470.108, -38.801, 0.94)
pt3dadd(73.071, 470.204, -38.784, 1.002)
pt3dadd(73.142, 470.299, -38.767, 1.064)
pt3dadd(73.189, 470.39, -38.73, 1.126)
pt3dadd(73.196, 470.476, -38.66, 1.188)
pt3dadd(73.2, 470.57, -38.607, 1.24)
pt3dadd(73.203, 470.689, -38.593, 1.248)
pt3dadd(73.21, 470.807, -38.575, 1.232)
pt3dadd(73.217, 470.926, -38.558, 1.214)
pt3dadd(73.223, 471.043, -38.541, 1.196)
pt3dadd(73.23, 471.161, -38.523, 1.178)
pt3dadd(73.237, 471.28, -38.506, 1.162)
pt3dadd(73.248, 471.398, -38.5, 1.138)
pt3dadd(73.26, 471.517, -38.5, 1.11)
pt3dadd(73.273, 471.636, -38.5, 1.082)
pt3dadd(73.286, 471.756, -38.5, 1.054)
pt3dadd(73.298, 471.875, -38.5, 1.026)
pt3dadd(73.311, 471.995, -38.5, 1)
pt3dadd(73.32, 472.114, -38.505, 0.972)
pt3dadd(73.32, 472.232, -38.521, 0.942)
pt3dadd(73.32, 472.35, -38.537, 0.914)
pt3dadd(73.32, 472.469, -38.554, 0.884)
pt3dadd(73.32, 472.588, -38.57, 0.856)
pt3dadd(73.32, 472.705, -38.587, 0.826)
pt3dadd(73.324, 472.824, -38.6, 0.802)
pt3dadd(73.344, 472.942, -38.6, 0.788)
pt3dadd(73.363, 473.06, -38.6, 0.776)
pt3dadd(73.383, 473.179, -38.6, 0.764)
pt3dadd(73.403, 473.297, -38.6, 0.752)
pt3dadd(73.423, 473.416, -38.6, 0.74)
pt3dadd(73.444, 473.533, -38.6, 0.728)
pt3dadd(73.477, 473.648, -38.6, 0.734)
pt3dadd(73.51, 473.765, -38.6, 0.738)
pt3dadd(73.543, 473.88, -38.6, 0.742)
pt3dadd(73.576, 473.995, -38.6, 0.746)
pt3dadd(73.609, 474.11, -38.6, 0.75)
pt3dadd(73.653, 474.221, -38.6, 0.756)
pt3dadd(73.71, 474.328, -38.6, 0.76)
pt3dadd(73.766, 474.433, -38.6, 0.766)
pt3dadd(73.823, 474.539, -38.6, 0.77)
pt3dadd(73.88, 474.644, -38.6, 0.774)
pt3dadd(73.932, 474.752, -38.6, 0.776)
pt3dadd(73.974, 474.865, -38.6, 0.772)
pt3dadd(74.015, 474.978, -38.6, 0.768)
pt3dadd(74.057, 475.09, -38.6, 0.764)
pt3dadd(74.098, 475.202, -38.6, 0.758)
pt3dadd(74.14, 475.315, -38.6, 0.754)
pt3dadd(74.169, 475.432, -38.606, 0.748)
pt3dadd(74.196, 475.548, -38.614, 0.742)
pt3dadd(74.223, 475.664, -38.621, 0.738)
pt3dadd(74.25, 475.781, -38.629, 0.732)
pt3dadd(74.268, 475.898, -38.638, 0.732)
pt3dadd(74.27, 476.017, -38.65, 0.74)
pt3dadd(74.272, 476.137, -38.662, 0.75)
pt3dadd(74.275, 476.256, -38.674, 0.758)
pt3dadd(74.277, 476.375, -38.686, 0.768)
pt3dadd(74.28, 476.494, -38.697, 0.776)
pt3dadd(74.285, 476.614, -38.7, 0.79)
pt3dadd(74.291, 476.734, -38.7, 0.806)
pt3dadd(74.296, 476.854, -38.7, 0.82)
pt3dadd(74.302, 476.974, -38.7, 0.836)
pt3dadd(74.308, 477.094, -38.7, 0.85)
pt3dadd(74.314, 477.212, -38.7, 0.866)
pt3dadd(74.321, 477.332, -38.7, 0.88)
pt3dadd(74.334, 477.452, -38.7, 0.888)
pt3dadd(74.346, 477.571, -38.7, 0.896)
pt3dadd(74.359, 477.691, -38.7, 0.904)
pt3dadd(74.371, 477.81, -38.7, 0.912)
pt3dadd(74.384, 477.93, -38.7, 0.92)
pt3dadd(74.397, 478.049, -38.7, 0.928)
pt3dadd(74.411, 478.168, -38.7, 0.924)
pt3dadd(74.426, 478.286, -38.7, 0.916)
pt3dadd(74.441, 478.406, -38.7, 0.908)
pt3dadd(74.456, 478.525, -38.7, 0.9)
pt3dadd(74.471, 478.644, -38.7, 0.892)
pt3dadd(74.486, 478.763, -38.7, 0.884)
pt3dadd(74.54, 478.859, -38.7, 0.856)
pt3dadd(74.639, 478.926, -38.7, 0.81)
pt3dadd(74.714, 479.01, -38.7, 0.77)
pt3dadd(74.734, 479.128, -38.7, 0.74)
pt3dadd(74.754, 479.246, -38.7, 0.712)
pt3dadd(74.76, 479.365, -38.709, 0.696)
pt3dadd(74.76, 479.484, -38.721, 0.688)
}
}
proc shape3d_130() {
dend_5[15] { pt3dadd(74.76, 479.603, -38.735, 0.678)
pt3dadd(74.76, 479.69, -38.803, 0.678)
pt3dadd(74.76, 479.778, -38.871, 0.678)
pt3dadd(74.783, 479.86, -38.942, 0.686)
pt3dadd(74.809, 479.94, -39.013, 0.694)
pt3dadd(74.834, 480.02, -39.083, 0.702)
pt3dadd(74.865, 480.128, -39.1, 0.726)
pt3dadd(74.898, 480.244, -39.1, 0.758)
pt3dadd(74.938, 480.356, -39.1, 0.812)
pt3dadd(74.976, 480.468, -39.112, 0.86)
pt3dadd(75.002, 480.582, -39.131, 0.87)
pt3dadd(75.028, 480.697, -39.151, 0.88)
pt3dadd(75.054, 480.812, -39.17, 0.89)
pt3dadd(75.08, 480.926, -39.19, 0.898)
pt3dadd(75.133, 481.022, -39.218, 0.89)
pt3dadd(75.215, 481.097, -39.256, 0.862)
pt3dadd(75.277, 481.194, -39.278, 0.846)
pt3dadd(75.33, 481.3, -39.295, 0.832)
pt3dadd(75.35, 481.415, -39.3, 0.828)
pt3dadd(75.354, 481.535, -39.3, 0.828)
pt3dadd(75.359, 481.655, -39.3, 0.828)
pt3dadd(75.334, 481.771, -39.3, 0.87)
pt3dadd(75.301, 481.886, -39.3, 0.922)
pt3dadd(75.26, 481.999, -39.3, 0.986)
pt3dadd(75.207, 482.107, -39.3, 1.07)
pt3dadd(75.127, 482.194, -39.315, 1.126)
pt3dadd(75.043, 482.276, -39.333, 1.178)
pt3dadd(75.022, 482.388, -39.363, 1.18)
pt3dadd(75.003, 482.5, -39.394, 1.18)
pt3dadd(75.004, 482.618, -39.4, 1.166)
pt3dadd(75.008, 482.738, -39.4, 1.148)
pt3dadd(75.013, 482.858, -39.4, 1.132)
pt3dadd(75.05, 482.972, -39.4, 1.1)
pt3dadd(75.09, 483.085, -39.4, 1.068)
pt3dadd(75.115, 483.202, -39.4, 1.022)
pt3dadd(75.13, 483.322, -39.4, 0.966)
pt3dadd(75.172, 483.431, -39.417, 0.938)
pt3dadd(75.221, 483.536, -39.438, 0.916)
pt3dadd(75.27, 483.643, -39.46, 0.894)
pt3dadd(75.318, 483.75, -39.482, 0.872)
pt3dadd(75.363, 483.858, -39.502, 0.852)
pt3dadd(75.38, 483.974, -39.519, 0.838)
pt3dadd(75.397, 484.092, -39.535, 0.824)
pt3dadd(75.414, 484.21, -39.551, 0.81)
pt3dadd(75.431, 484.326, -39.568, 0.796)
pt3dadd(75.448, 484.444, -39.584, 0.782)
pt3dadd(75.477, 484.559, -39.59, 0.776)
pt3dadd(75.51, 484.674, -39.592, 0.77)
pt3dadd(75.544, 484.789, -39.594, 0.766)
pt3dadd(75.577, 484.904, -39.596, 0.762)
pt3dadd(75.611, 485.02, -39.598, 0.758)
pt3dadd(75.645, 485.135, -39.603, 0.754)
pt3dadd(75.687, 485.244, -39.624, 0.754)
pt3dadd(75.729, 485.353, -39.645, 0.754)
pt3dadd(75.772, 485.462, -39.666, 0.754)
pt3dadd(75.814, 485.573, -39.687, 0.754)
pt3dadd(75.853, 485.684, -39.7, 0.752)
pt3dadd(75.886, 485.8, -39.7, 0.748)
pt3dadd(75.919, 485.915, -39.7, 0.742)
pt3dadd(75.952, 486.03, -39.7, 0.738)
pt3dadd(75.985, 486.145, -39.7, 0.734)
pt3dadd(76.018, 486.26, -39.7, 0.73)
pt3dadd(76.049, 486.377, -39.7, 0.722)
pt3dadd(76.079, 486.493, -39.7, 0.714)
pt3dadd(76.109, 486.61, -39.7, 0.704)
pt3dadd(76.139, 486.725, -39.7, 0.696)
pt3dadd(76.169, 486.841, -39.7, 0.686)
pt3dadd(76.199, 486.958, -39.7, 0.678)
pt3dadd(76.2, 487.078, -39.7, 0.67)
pt3dadd(76.2, 487.198, -39.7, 0.662)
pt3dadd(76.2, 487.318, -39.7, 0.654)
pt3dadd(76.233, 487.433, -39.7, 0.664)
pt3dadd(76.266, 487.548, -39.7, 0.674)
pt3dadd(76.326, 487.649, -39.7, 0.698)
pt3dadd(76.407, 487.736, -39.7, 0.734)
pt3dadd(76.504, 487.795, -39.7, 0.766)
pt3dadd(76.623, 487.816, -39.7, 0.794)
pt3dadd(76.741, 487.836, -39.7, 0.824)
pt3dadd(76.824, 487.916, -39.703, 0.84)
pt3dadd(76.901, 488.009, -39.706, 0.856)
pt3dadd(76.978, 488.101, -39.709, 0.87)
pt3dadd(77.046, 488.188, -39.734, 0.89)
pt3dadd(77.099, 488.263, -39.797, 0.918)
pt3dadd(77.128, 488.363, -39.838, 0.93)
pt3dadd(77.142, 488.478, -39.864, 0.93)
pt3dadd(77.155, 488.593, -39.89, 0.93)
pt3dadd(77.16, 488.712, -39.902, 0.924)
pt3dadd(77.16, 488.831, -39.906, 0.916)
pt3dadd(77.16, 488.951, -39.91, 0.906)
pt3dadd(77.16, 489.068, -39.93, 0.86)
pt3dadd(77.16, 489.184, -39.958, 0.846)
pt3dadd(77.16, 489.299, -39.985, 0.838)
pt3dadd(77.16, 489.414, -40.013, 0.828)
pt3dadd(77.16, 489.529, -40.04, 0.82)
pt3dadd(77.16, 489.644, -40.068, 0.81)
pt3dadd(77.171, 489.758, -40.089, 0.804)
pt3dadd(77.22, 489.869, -40.091, 0.804)
pt3dadd(77.268, 489.978, -40.094, 0.804)
pt3dadd(77.317, 490.088, -40.096, 0.804)
pt3dadd(77.365, 490.198, -40.098, 0.804)
pt3dadd(77.414, 490.307, -40.1, 0.804)
pt3dadd(77.532, 490.327, -40.1, 0.804)
pt3dadd(77.651, 490.348, -40.1, 0.804)
pt3dadd(77.748, 490.4, -40.1, 0.808)
pt3dadd(77.816, 490.499, -40.1, 0.82)
pt3dadd(77.869, 490.603, -40.1, 0.826)
pt3dadd(77.879, 490.723, -40.1, 0.818)
pt3dadd(77.888, 490.843, -40.1, 0.808)
pt3dadd(77.914, 490.957, -40.108, 0.814)
pt3dadd(77.959, 491.068, -40.124, 0.84)
pt3dadd(77.99, 491.177, -40.148, 0.882)
pt3dadd(78, 491.287, -40.187, 0.95)
pt3dadd(78.069, 491.383, -40.191, 0.998)
pt3dadd(78.143, 491.478, -40.193, 1.044)
pt3dadd(78.216, 491.573, -40.196, 1.09)
pt3dadd(78.289, 491.669, -40.198, 1.136)
pt3dadd(78.362, 491.764, -40.2, 1.182)
pt3dadd(78.434, 491.86, -40.2, 1.206)
pt3dadd(78.506, 491.956, -40.2, 1.232)
pt3dadd(78.578, 492.052, -40.2, 1.256)
pt3dadd(78.65, 492.148, -40.2, 1.282)
pt3dadd(78.722, 492.244, -40.2, 1.306)
pt3dadd(78.772, 492.353, -40.2, 1.326)
pt3dadd(78.823, 492.461, -40.2, 1.344)
pt3dadd(78.873, 492.57, -40.2, 1.364)
pt3dadd(78.924, 492.679, -40.2, 1.382)
pt3dadd(78.974, 492.788, -40.2, 1.402)
pt3dadd(79.038, 492.889, -40.2, 1.388)
pt3dadd(79.106, 492.988, -40.2, 1.366)
pt3dadd(79.184, 493.079, -40.197, 1.326)
pt3dadd(79.269, 493.163, -40.191, 1.278)
pt3dadd(79.31, 493.262, -40.17, 1.2)
pt3dadd(79.316, 493.375, -40.135, 1.1)
pt3dadd(79.32, 493.49, -40.111, 1.004)
pt3dadd(79.32, 493.61, -40.111, 0.924)
pt3dadd(79.32, 493.73, -40.111, 0.842)
pt3dadd(79.334, 493.843, -40.132, 0.764)
pt3dadd(79.36, 493.95, -40.171, 0.688)
pt3dadd(79.433, 494.02, -40.197, 0.634)
pt3dadd(79.55, 494.04, -40.188, 0.68)
pt3dadd(79.655, 494.068, -40.149, 0.78)
pt3dadd(79.745, 494.128, -40.109, 0.8)
pt3dadd(79.847, 494.188, -40.108, 0.778)
pt3dadd(79.934, 494.255, -40.145, 0.846)
pt3dadd(80.016, 494.322, -40.189, 0.876)
pt3dadd(80.103, 494.402, -40.2, 0.774)
pt3dadd(80.196, 494.478, -40.2, 0.61)
pt3dadd(80.306, 494.512, -40.176, 0.438)
pt3dadd(80.379, 494.52, -40.103, 0.356)
pt3dadd(80.399, 494.52, -40.005, 0.352)
pt3dadd(80.4, 494.52, -39.905, 0.376)
pt3dadd(80.415, 494.521, -39.806, 0.35)
pt3dadd(80.47, 494.549, -39.725, 0.312)
pt3dadd(80.556, 494.621, -39.7, 0.33)
pt3dadd(80.646, 494.7, -39.707, 0.368)
pt3dadd(80.727, 494.753, -39.757, 0.376)
pt3dadd(80.768, 494.795, -39.845, 0.418)
pt3dadd(80.837, 494.875, -39.886, 0.442)
pt3dadd(80.91, 494.96, -39.92, 0.46)
pt3dadd(80.984, 495.046, -39.955, 0.478)
pt3dadd(81.057, 495.132, -39.989, 0.496)
pt3dadd(81.117, 495.232, -40, 0.532)
pt3dadd(81.17, 495.34, -40, 0.578)
pt3dadd(81.209, 495.449, -40.014, 0.614)
pt3dadd(81.227, 495.562, -40.045, 0.636)
pt3dadd(81.235, 495.676, -40.071, 0.656)
pt3dadd(81.218, 495.793, -40.085, 0.666)
pt3dadd(81.202, 495.911, -40.099, 0.678)
pt3dadd(81.154, 496.013, -40.133, 0.666)
pt3dadd(81.105, 496.114, -40.169, 0.652)
pt3dadd(81.083, 496.224, -40.202, 0.644)
pt3dadd(81.061, 496.334, -40.235, 0.636)
pt3dadd(81.042, 496.446, -40.268, 0.628)
pt3dadd(81.087, 496.555, -40.284, 0.628)
pt3dadd(81.132, 496.664, -40.3, 0.628)
pt3dadd(81.17, 496.777, -40.304, 0.76)
pt3dadd(81.229, 496.878, -40.326, 0.8)
pt3dadd(81.289, 496.979, -40.348, 0.838)
pt3dadd(81.348, 497.08, -40.371, 0.878)
pt3dadd(81.408, 497.18, -40.393, 0.916)
pt3dadd(81.448, 497.292, -40.4, 0.95)
pt3dadd(81.478, 497.408, -40.4, 0.98)
pt3dadd(81.508, 497.524, -40.4, 1.012)
pt3dadd(81.538, 497.64, -40.4, 1.042)
pt3dadd(81.568, 497.756, -40.4, 1.072)
pt3dadd(81.598, 497.873, -40.4, 1.102)
pt3dadd(81.631, 497.988, -40.4, 1.114)
pt3dadd(81.664, 498.103, -40.4, 1.126)
pt3dadd(81.697, 498.218, -40.4, 1.12)
pt3dadd(81.73, 498.334, -40.4, 1.098)
pt3dadd(81.766, 498.448, -40.4, 1.076)
pt3dadd(81.848, 498.535, -40.4, 1.016)
pt3dadd(81.93, 498.623, -40.4, 0.956)
pt3dadd(82.017, 498.704, -40.4, 0.908)
pt3dadd(82.105, 498.787, -40.4, 0.862)
pt3dadd(82.209, 498.845, -40.4, 0.798)
pt3dadd(82.302, 498.914, -40.4, 0.748)
pt3dadd(82.365, 499.016, -40.4, 0.734)
pt3dadd(82.427, 499.12, -40.4, 0.718)
pt3dadd(82.49, 499.222, -40.4, 0.704)
}
}
proc shape3d_131() {
dend_5[15] { pt3dadd(82.553, 499.324, -40.4, 0.69)
pt3dadd(82.613, 499.427, -40.4, 0.67)
pt3dadd(82.667, 499.535, -40.4, 0.636)
pt3dadd(82.72, 499.642, -40.401, 0.602)
pt3dadd(82.762, 499.746, -40.435, 0.576)
pt3dadd(82.8, 499.852, -40.468, 0.552)
pt3dadd(82.8, 499.97, -40.486, 0.542)
pt3dadd(82.8, 500.088, -40.503, 0.532)
pt3dadd(82.787, 500.201, -40.531, 0.546)
pt3dadd(82.76, 500.309, -40.57, 0.584)
pt3dadd(82.697, 500.395, -40.593, 0.65)
pt3dadd(82.614, 500.471, -40.6, 0.732)
pt3dadd(82.624, 500.591, -40.6, 0.758)
pt3dadd(82.633, 500.71, -40.6, 0.786)
pt3dadd(82.643, 500.83, -40.6, 0.812)
pt3dadd(82.652, 500.95, -40.6, 0.838)
pt3dadd(82.662, 501.068, -40.6, 0.864)
pt3dadd(82.677, 501.187, -40.6, 0.882)
pt3dadd(82.699, 501.306, -40.6, 0.892)
pt3dadd(82.722, 501.424, -40.6, 0.9)
pt3dadd(82.744, 501.541, -40.6, 0.908)
pt3dadd(82.766, 501.66, -40.6, 0.916)
pt3dadd(82.788, 501.778, -40.6, 0.924)
pt3dadd(82.81, 501.895, -40.606, 0.934)
pt3dadd(82.832, 502.012, -40.618, 0.942)
pt3dadd(82.854, 502.129, -40.63, 0.952)
pt3dadd(82.876, 502.246, -40.642, 0.96)
pt3dadd(82.898, 502.363, -40.655, 0.97)
pt3dadd(82.92, 502.48, -40.667, 0.98)
pt3dadd(82.949, 502.596, -40.673, 0.988)
pt3dadd(82.978, 502.712, -40.679, 0.998)
pt3dadd(83.007, 502.829, -40.685, 1.006)
pt3dadd(83.036, 502.945, -40.691, 1.016)
pt3dadd(83.065, 503.062, -40.697, 1.024)
pt3dadd(83.106, 503.173, -40.7, 1.036)
pt3dadd(83.16, 503.28, -40.7, 1.052)
pt3dadd(83.214, 503.388, -40.7, 1.066)
pt3dadd(83.268, 503.495, -40.7, 1.08)
pt3dadd(83.322, 503.602, -40.7, 1.094)
pt3dadd(83.383, 503.705, -40.7, 1.1)
pt3dadd(83.463, 503.794, -40.7, 1.086)
pt3dadd(83.544, 503.882, -40.7, 1.07)
pt3dadd(83.625, 503.971, -40.7, 1.056)
pt3dadd(83.705, 504.06, -40.7, 1.04)
pt3dadd(83.777, 504.154, -40.707, 1.02)
pt3dadd(83.829, 504.258, -40.729, 0.994)
pt3dadd(83.882, 504.364, -40.751, 0.966)
pt3dadd(83.934, 504.468, -40.772, 0.938)
pt3dadd(83.986, 504.572, -40.794, 0.912)
pt3dadd(84.066, 504.66, -40.8, 0.882)
pt3dadd(84.155, 504.74, -40.8, 0.852)
pt3dadd(84.243, 504.821, -40.8, 0.82)
pt3dadd(84.332, 504.901, -40.8, 0.79)
pt3dadd(84.421, 504.982, -40.8, 0.76)
pt3dadd(84.497, 505.075, -40.8, 0.746)
pt3dadd(84.569, 505.171, -40.8, 0.736)
pt3dadd(84.641, 505.267, -40.8, 0.726)
pt3dadd(84.713, 505.363, -40.8, 0.716)
pt3dadd(84.785, 505.459, -40.8, 0.706)
pt3dadd(84.848, 505.561, -40.8, 0.694)
pt3dadd(84.909, 505.664, -40.8, 0.682)
pt3dadd(84.979, 505.76, -40.81, 0.678)
pt3dadd(85.055, 505.85, -40.827, 0.678)
pt3dadd(85.154, 505.897, -40.855, 0.678)
pt3dadd(85.264, 505.924, -40.888, 0.678)
pt3dadd(85.377, 505.957, -40.9, 0.684)
pt3dadd(85.49, 505.998, -40.9, 0.696)
pt3dadd(85.604, 506.022, -40.9, 0.712)
pt3dadd(85.723, 506.005, -40.9, 0.744)
pt3dadd(85.837, 506.023, -40.916, 0.762)
pt3dadd(85.949, 506.058, -40.938, 0.774)
pt3dadd(86.061, 506.092, -40.961, 0.788)
pt3dadd(86.173, 506.125, -40.983, 0.8)
pt3dadd(86.268, 506.194, -40.991, 0.796)
pt3dadd(86.358, 506.273, -40.993, 0.786)
pt3dadd(86.449, 506.352, -40.995, 0.776)
pt3dadd(86.539, 506.431, -40.998, 0.764)
pt3dadd(86.629, 506.51, -41, 0.754)
pt3dadd(86.726, 506.579, -41.008, 0.726)
pt3dadd(86.825, 506.647, -41.018, 0.694)
pt3dadd(86.923, 506.714, -41.027, 0.662)
pt3dadd(87.022, 506.782, -41.036, 0.63)
pt3dadd(87.122, 506.845, -41.049, 0.598)
pt3dadd(87.229, 506.88, -41.083, 0.56)
pt3dadd(87.336, 506.915, -41.117, 0.52)
pt3dadd(87.444, 506.95, -41.151, 0.482)
pt3dadd(87.551, 506.984, -41.185, 0.444)
pt3dadd(87.666, 507, -41.2, 0.428)
pt3dadd(87.786, 507, -41.2, 0.432)
pt3dadd(87.906, 507, -41.2, 0.436)
pt3dadd(88.026, 507, -41.2, 0.44)
pt3dadd(88.146, 507, -41.2, 0.444)
pt3dadd(88.266, 507, -41.2, 0.446)
pt3dadd(88.386, 507, -41.2, 0.45)
pt3dadd(88.503, 506.987, -41.189, 0.482)
pt3dadd(88.619, 506.964, -41.17, 0.534)
pt3dadd(88.734, 506.941, -41.151, 0.588)
pt3dadd(88.85, 506.918, -41.132, 0.64)
pt3dadd(88.965, 506.894, -41.112, 0.694)
pt3dadd(89.081, 506.88, -41.092, 0.75)
pt3dadd(89.198, 506.88, -41.069, 0.81)
pt3dadd(89.315, 506.88, -41.046, 0.87)
pt3dadd(89.431, 506.88, -41.023, 0.93)
pt3dadd(89.548, 506.88, -41, 0.99)
pt3dadd(89.665, 506.88, -40.978, 1.052)
pt3dadd(89.781, 506.88, -40.952, 1.096)
pt3dadd(89.896, 506.88, -40.925, 1.128)
pt3dadd(90.012, 506.88, -40.897, 1.158)
pt3dadd(90.127, 506.88, -40.87, 1.19)
pt3dadd(90.242, 506.88, -40.842, 1.22)
pt3dadd(90.358, 506.88, -40.815, 1.252)
pt3dadd(90.472, 506.911, -40.802, 1.238)
pt3dadd(90.586, 506.947, -40.791, 1.22)
pt3dadd(90.7, 506.984, -40.78, 1.2)
pt3dadd(90.812, 507.02, -40.77, 1.18)
pt3dadd(90.926, 507.056, -40.759, 1.16)
pt3dadd(91.025, 507.096, -40.717, 1.126)
pt3dadd(91.116, 507.137, -40.661, 1.084)
pt3dadd(91.207, 507.178, -40.606, 1.042)
pt3dadd(91.298, 507.218, -40.551, 1)
pt3dadd(91.386, 507.263, -40.494, 0.964)
pt3dadd(91.47, 507.312, -40.435, 0.934)
pt3dadd(91.554, 507.36, -40.376, 0.904)
pt3dadd(91.638, 507.408, -40.317, 0.874)
pt3dadd(91.714, 507.455, -40.251, 0.844)
pt3dadd(91.771, 507.499, -40.172, 0.816)
pt3dadd(91.832, 507.559, -40.104, 0.796)
pt3dadd(91.894, 507.636, -40.046, 0.782)
pt3dadd(91.926, 507.744, -40.025, 0.76)
pt3dadd(91.95, 507.86, -40.015, 0.738)
pt3dadd(91.991, 507.965, -40.037, 0.728)
pt3dadd(92.042, 508.06, -40.08, 0.728)
pt3dadd(92.124, 508.142, -40.095, 0.742)
pt3dadd(92.218, 508.214, -40.106, 0.758)
pt3dadd(92.318, 508.278, -40.121, 0.768)
pt3dadd(92.419, 508.342, -40.135, 0.78)
pt3dadd(92.52, 508.404, -40.149, 0.79)
pt3dadd(92.621, 508.468, -40.164, 0.802)
pt3dadd(92.708, 508.548, -40.172, 0.804)
pt3dadd(92.792, 508.633, -40.179, 0.804)
pt3dadd(92.878, 508.717, -40.187, 0.804)
pt3dadd(92.962, 508.802, -40.194, 0.804)
pt3dadd(93.047, 508.886, -40.2, 0.802)
pt3dadd(93.138, 508.964, -40.2, 0.792)
pt3dadd(93.229, 509.042, -40.2, 0.782)
pt3dadd(93.32, 509.12, -40.2, 0.772)
pt3dadd(93.412, 509.197, -40.2, 0.762)
pt3dadd(93.505, 509.272, -40.198, 0.75)
pt3dadd(93.614, 509.317, -40.182, 0.726)
pt3dadd(93.722, 509.362, -40.164, 0.702)
pt3dadd(93.79, 509.406, -40.089, 0.688)
pt3dadd(93.868, 509.45, -40.029, 0.676)
pt3dadd(93.977, 509.496, -40.013, 0.662)
pt3dadd(94.086, 509.542, -40.003, 0.65)
pt3dadd(94.195, 509.586, -40.019, 0.638)
pt3dadd(94.304, 509.629, -40.038, 0.622)
pt3dadd(94.412, 509.648, -40.078, 0.566)
pt3dadd(94.507, 509.712, -40.091, 0.544)
pt3dadd(94.597, 509.791, -40.093, 0.534)
pt3dadd(94.687, 509.87, -40.095, 0.524)
pt3dadd(94.777, 509.95, -40.097, 0.514)
pt3dadd(94.868, 510.029, -40.1, 0.504)
pt3dadd(94.933, 510.128, -40.1, 0.472)
pt3dadd(94.993, 510.233, -40.1, 0.438)
pt3dadd(95.077, 510.301, -40.071, 0.426)
pt3dadd(95.173, 510.353, -40.028, 0.426)
pt3dadd(95.236, 510.424, -39.969, 0.426)
pt3dadd(95.28, 510.508, -39.93, 0.432)
pt3dadd(95.28, 510.622, -39.96, 0.456)
pt3dadd(95.281, 510.737, -39.989, 0.478)
pt3dadd(95.305, 510.853, -39.996, 0.51)
pt3dadd(95.335, 510.97, -40, 0.534)
pt3dadd(95.371, 511.085, -40, 0.546)
pt3dadd(95.407, 511.199, -40, 0.56)
pt3dadd(95.443, 511.313, -40, 0.574)
pt3dadd(95.478, 511.428, -40, 0.588)
pt3dadd(95.514, 511.542, -40, 0.6)
pt3dadd(95.52, 511.662, -40, 0.616)
pt3dadd(95.52, 511.782, -40, 0.634)
pt3dadd(95.52, 511.902, -40, 0.65)
pt3dadd(95.524, 512.021, -40, 0.66)
pt3dadd(95.528, 512.141, -40, 0.668)
pt3dadd(95.533, 512.261, -40, 0.678)
pt3dadd(95.628, 512.332, -40, 0.678)
pt3dadd(95.726, 512.399, -40, 0.678)
pt3dadd(95.826, 512.467, -40, 0.688)
pt3dadd(95.924, 512.534, -40, 0.698)
pt3dadd(96, 512.623, -39.987, 0.722)
pt3dadd(96.062, 512.723, -39.966, 0.754)
pt3dadd(96.124, 512.822, -39.945, 0.786)
pt3dadd(96.175, 512.928, -39.927, 0.834)
pt3dadd(96.214, 513.04, -39.911, 0.904)
pt3dadd(96.26, 513.148, -39.9, 0.97)
pt3dadd(96.33, 513.246, -39.9, 1.022)
pt3dadd(96.4, 513.343, -39.9, 1.074)
pt3dadd(96.488, 513.414, -39.9, 1.11)
pt3dadd(96.605, 513.446, -39.9, 1.12)
pt3dadd(96.72, 513.48, -39.9, 1.13)
pt3dadd(96.835, 513.502, -39.9, 1.078)
pt3dadd(96.918, 513.588, -39.9, 1.058)
}
}
proc shape3d_132() {
dend_5[15] { pt3dadd(97.002, 513.674, -39.9, 1.038)
pt3dadd(97.085, 513.761, -39.9, 1.016)
pt3dadd(97.169, 513.847, -39.9, 0.996)
pt3dadd(97.244, 513.937, -39.9, 0.978)
pt3dadd(97.28, 514.052, -39.9, 0.964)
pt3dadd(97.316, 514.166, -39.9, 0.95)
pt3dadd(97.352, 514.282, -39.9, 0.936)
pt3dadd(97.388, 514.396, -39.9, 0.924)
pt3dadd(97.424, 514.51, -39.9, 0.91)
pt3dadd(97.469, 514.614, -39.875, 0.894)
pt3dadd(97.519, 514.708, -39.83, 0.876)
pt3dadd(97.57, 514.802, -39.785, 0.858)
pt3dadd(97.62, 514.897, -39.741, 0.84)
pt3dadd(97.675, 514.994, -39.709, 0.816)
pt3dadd(97.739, 515.096, -39.704, 0.78)
pt3dadd(97.789, 515.202, -39.7, 0.748)
pt3dadd(97.799, 515.322, -39.7, 0.73)
pt3dadd(97.808, 515.441, -39.7, 0.714)
pt3dadd(97.856, 515.538, -39.708, 0.698)
pt3dadd(97.954, 515.606, -39.725, 0.684)
pt3dadd(98.058, 515.65, -39.749, 0.678)
pt3dadd(98.17, 515.668, -39.78, 0.678)
pt3dadd(98.266, 515.717, -39.8, 0.678)
pt3dadd(98.332, 515.816, -39.8, 0.678)
pt3dadd(98.399, 515.917, -39.8, 0.678)
pt3dadd(98.465, 516.017, -39.8, 0.678)
pt3dadd(98.527, 516.119, -39.8, 0.678)
pt3dadd(98.588, 516.223, -39.8, 0.678)
pt3dadd(98.668, 516.311, -39.8, 0.678)
pt3dadd(98.77, 516.373, -39.8, 0.678)
pt3dadd(98.873, 516.434, -39.8, 0.678)
pt3dadd(98.95, 516.522, -39.804, 0.678)
pt3dadd(99.013, 516.624, -39.809, 0.678)
pt3dadd(99.065, 516.725, -39.835, 0.678)
pt3dadd(99.108, 516.824, -39.877, 0.678)
pt3dadd(99.133, 516.931, -39.916, 0.678)
pt3dadd(99.152, 517.042, -39.953, 0.678)
pt3dadd(99.193, 517.147, -39.983, 0.678)
pt3dadd(99.241, 517.254, -40.002, 0.678)
pt3dadd(99.282, 517.366, -40.009, 0.678)
pt3dadd(99.324, 517.478, -40.015, 0.678)
pt3dadd(99.365, 517.591, -40.021, 0.678)
pt3dadd(99.406, 517.704, -40.028, 0.678)
pt3dadd(99.451, 517.812, -40.038, 0.678)
pt3dadd(99.53, 517.894, -40.069, 0.684)
pt3dadd(99.61, 517.976, -40.101, 0.69)
pt3dadd(99.688, 518.058, -40.133, 0.696)
pt3dadd(99.767, 518.141, -40.164, 0.702)
pt3dadd(99.839, 518.23, -40.193, 0.704)
pt3dadd(99.911, 518.32, -40.222, 0.704)
pt3dadd(99.982, 518.41, -40.25, 0.704)
pt3dadd(100.054, 518.5, -40.278, 0.704)
pt3dadd(100.15, 518.564, -40.292, 0.696)
pt3dadd(100.259, 518.612, -40.297, 0.684)
pt3dadd(100.368, 518.662, -40.302, 0.662)
pt3dadd(100.478, 518.711, -40.307, 0.628)
pt3dadd(100.583, 518.761, -40.322, 0.6)
pt3dadd(100.672, 518.821, -40.366, 0.586)
pt3dadd(100.739, 518.904, -40.402, 0.584)
pt3dadd(100.78, 519.012, -40.43, 0.596)
pt3dadd(100.836, 519.094, -40.476, 0.608)
pt3dadd(100.909, 519.149, -40.541, 0.616)
pt3dadd(100.982, 519.203, -40.606, 0.624)
pt3dadd(101.05, 519.23, -40.682, 0.622)
pt3dadd(101.113, 519.236, -40.767, 0.61)
pt3dadd(101.149, 519.222, -40.856, 0.59)
pt3dadd(101.153, 519.182, -40.95, 0.566)
pt3dadd(101.158, 519.143, -41.045, 0.542)
pt3dadd(101.16, 519.085, -41.129, 0.506)
pt3dadd(101.16, 519, -41.2, 0.452)
}
dend_5[16] {pt3dclear()
pt3dadd(59.467, 426.187, -35.8, 1.356)
pt3dadd(59.388, 426.221, -35.8, 1.308)
pt3dadd(59.277, 426.266, -35.8, 1.244)
pt3dadd(59.199, 426.342, -35.8, 1.172)
pt3dadd(59.166, 426.457, -35.8, 1.096)
pt3dadd(59.144, 426.575, -35.8, 1.076)
pt3dadd(59.124, 426.694, -35.8, 1.072)
pt3dadd(59.105, 426.811, -35.8, 1.068)
pt3dadd(59.085, 426.93, -35.8, 1.064)
pt3dadd(59.065, 427.049, -35.8, 1.06)
pt3dadd(59.046, 427.166, -35.8, 1.056)
pt3dadd(59.04, 427.286, -35.8, 1.054)
pt3dadd(59.04, 427.406, -35.8, 1.054)
pt3dadd(59.04, 427.526, -35.8, 1.054)
pt3dadd(59.04, 427.646, -35.8, 1.054)
pt3dadd(59.04, 427.766, -35.8, 1.054)
pt3dadd(59.04, 427.886, -35.8, 1.054)
pt3dadd(59.04, 428.006, -35.8, 1.054)
pt3dadd(59.04, 428.126, -35.8, 1.048)
pt3dadd(59.04, 428.246, -35.8, 1.036)
pt3dadd(59.04, 428.366, -35.8, 1.026)
pt3dadd(59.04, 428.486, -35.8, 1.014)
pt3dadd(59.04, 428.606, -35.8, 1.004)
pt3dadd(59.04, 428.726, -35.8, 0.994)
pt3dadd(59.04, 428.846, -35.8, 0.982)
pt3dadd(59.04, 428.965, -35.788, 0.974)
pt3dadd(59.04, 429.084, -35.772, 0.966)
pt3dadd(59.04, 429.202, -35.755, 0.956)
pt3dadd(59.04, 429.32, -35.739, 0.948)
pt3dadd(59.04, 429.438, -35.722, 0.94)
pt3dadd(59.04, 429.557, -35.706, 0.932)
pt3dadd(59.026, 429.674, -35.7, 0.926)
pt3dadd(59.004, 429.793, -35.7, 0.922)
pt3dadd(58.981, 429.911, -35.7, 0.918)
pt3dadd(58.959, 430.028, -35.7, 0.914)
pt3dadd(58.937, 430.147, -35.7, 0.91)
pt3dadd(58.915, 430.265, -35.7, 0.906)
pt3dadd(58.896, 430.384, -35.7, 0.92)
pt3dadd(58.878, 430.501, -35.7, 0.944)
pt3dadd(58.861, 430.62, -35.7, 0.968)
pt3dadd(58.844, 430.739, -35.7, 0.992)
pt3dadd(58.827, 430.858, -35.7, 1.018)
pt3dadd(58.809, 430.976, -35.7, 1.042)
pt3dadd(58.791, 431.095, -35.7, 1.068)
pt3dadd(58.771, 431.214, -35.7, 1.098)
pt3dadd(58.751, 431.332, -35.7, 1.126)
pt3dadd(58.732, 431.45, -35.7, 1.154)
pt3dadd(58.712, 431.569, -35.7, 1.184)
pt3dadd(58.692, 431.687, -35.7, 1.212)
pt3dadd(58.68, 431.806, -35.7, 1.238)
pt3dadd(58.68, 431.926, -35.7, 1.256)
pt3dadd(58.68, 432.046, -35.7, 1.274)
pt3dadd(58.68, 432.166, -35.7, 1.292)
pt3dadd(58.68, 432.286, -35.7, 1.308)
pt3dadd(58.68, 432.406, -35.7, 1.328)
pt3dadd(58.68, 432.526, -35.7, 1.344)
pt3dadd(58.68, 432.646, -35.694, 1.356)
pt3dadd(58.68, 432.764, -35.68, 1.356)
pt3dadd(58.68, 432.883, -35.666, 1.356)
pt3dadd(58.68, 433.002, -35.651, 1.356)
pt3dadd(58.68, 433.121, -35.637, 1.356)
pt3dadd(58.68, 433.24, -35.623, 1.356)
pt3dadd(58.68, 433.356, -35.601, 1.35)
pt3dadd(58.68, 433.462, -35.554, 1.326)
pt3dadd(58.68, 433.567, -35.507, 1.302)
pt3dadd(58.68, 433.673, -35.459, 1.278)
pt3dadd(58.68, 433.778, -35.412, 1.254)
pt3dadd(58.679, 433.884, -35.365, 1.23)
pt3dadd(58.654, 433.994, -35.33, 1.202)
pt3dadd(58.629, 434.104, -35.295, 1.176)
pt3dadd(58.603, 434.213, -35.26, 1.15)
pt3dadd(58.578, 434.322, -35.225, 1.124)
pt3dadd(58.56, 434.435, -35.2, 1.098)
pt3dadd(58.56, 434.555, -35.2, 1.072)
pt3dadd(58.56, 434.675, -35.2, 1.048)
pt3dadd(58.56, 434.795, -35.2, 1.022)
pt3dadd(58.56, 434.915, -35.2, 0.998)
pt3dadd(58.56, 435.035, -35.2, 0.972)
pt3dadd(58.56, 435.155, -35.2, 0.946)
pt3dadd(58.548, 435.272, -35.2, 0.92)
pt3dadd(58.506, 435.385, -35.2, 0.894)
pt3dadd(58.465, 435.498, -35.2, 0.866)
pt3dadd(58.423, 435.611, -35.2, 0.838)
pt3dadd(58.381, 435.722, -35.2, 0.81)
pt3dadd(58.34, 435.835, -35.2, 0.782)
pt3dadd(58.331, 435.954, -35.191, 0.758)
pt3dadd(58.329, 436.073, -35.18, 0.734)
pt3dadd(58.327, 436.193, -35.17, 0.71)
pt3dadd(58.325, 436.312, -35.159, 0.686)
pt3dadd(58.323, 436.43, -35.148, 0.662)
pt3dadd(58.321, 436.55, -35.138, 0.638)
pt3dadd(58.32, 436.668, -35.12, 0.622)
pt3dadd(58.32, 436.784, -35.097, 0.614)
pt3dadd(58.32, 436.902, -35.074, 0.606)
pt3dadd(58.32, 437.018, -35.051, 0.596)
pt3dadd(58.32, 437.135, -35.028, 0.588)
pt3dadd(58.32, 437.252, -35.006, 0.58)
pt3dadd(58.32, 437.371, -35, 0.578)
pt3dadd(58.32, 437.491, -35, 0.578)
pt3dadd(58.32, 437.611, -35, 0.578)
pt3dadd(58.32, 437.731, -35, 0.584)
pt3dadd(58.32, 437.851, -35, 0.592)
pt3dadd(58.32, 437.971, -35, 0.6)
pt3dadd(58.32, 438.086, -35.025, 0.602)
pt3dadd(58.32, 438.199, -35.058, 0.602)
pt3dadd(58.302, 438.29, -35.11, 0.608)
pt3dadd(58.258, 438.349, -35.189, 0.622)
pt3dadd(58.232, 438.443, -35.22, 0.632)
pt3dadd(58.219, 438.562, -35.216, 0.64)
pt3dadd(58.206, 438.682, -35.213, 0.65)
pt3dadd(58.2, 438.8, -35.201, 0.658)
pt3dadd(58.2, 438.918, -35.184, 0.668)
pt3dadd(58.2, 439.037, -35.167, 0.678)
pt3dadd(58.2, 439.147, -35.131, 0.678)
pt3dadd(58.2, 439.266, -35.118, 0.678)
pt3dadd(58.2, 439.385, -35.106, 0.678)
pt3dadd(58.2, 439.505, -35.1, 0.682)
pt3dadd(58.2, 439.625, -35.1, 0.69)
pt3dadd(58.2, 439.745, -35.1, 0.7)
pt3dadd(58.2, 439.865, -35.102, 0.718)
pt3dadd(58.2, 439.985, -35.106, 0.744)
pt3dadd(58.2, 440.104, -35.11, 0.77)
pt3dadd(58.166, 440.196, -35.152, 0.816)
pt3dadd(58.112, 440.272, -35.215, 0.872)
pt3dadd(58.027, 440.32, -35.272, 0.934)
pt3dadd(57.996, 440.414, -35.303, 0.952)
pt3dadd(57.992, 440.532, -35.323, 0.946)
pt3dadd(57.987, 440.65, -35.343, 0.942)
pt3dadd(57.982, 440.767, -35.363, 0.938)
pt3dadd(57.977, 440.885, -35.383, 0.932)
}
}
proc shape3d_133() {
dend_5[16] { pt3dadd(57.976, 441.001, -35.398, 0.926)
pt3dadd(57.996, 441.118, -35.379, 0.902)
pt3dadd(58.016, 441.234, -35.36, 0.878)
pt3dadd(58.036, 441.35, -35.341, 0.854)
pt3dadd(58.057, 441.466, -35.322, 0.832)
pt3dadd(58.077, 441.582, -35.303, 0.808)
pt3dadd(58.063, 441.698, -35.316, 0.772)
pt3dadd(58.043, 441.815, -35.335, 0.734)
pt3dadd(58.023, 441.93, -35.354, 0.696)
pt3dadd(58.002, 442.046, -35.373, 0.658)
pt3dadd(57.982, 442.163, -35.392, 0.62)
pt3dadd(57.961, 442.277, -35.415, 0.584)
pt3dadd(57.94, 442.391, -35.441, 0.548)
pt3dadd(57.919, 442.505, -35.468, 0.514)
pt3dadd(57.898, 442.619, -35.494, 0.478)
pt3dadd(57.876, 442.733, -35.521, 0.444)
pt3dadd(57.841, 442.842, -35.545, 0.416)
pt3dadd(57.792, 442.949, -35.566, 0.394)
pt3dadd(57.743, 443.056, -35.588, 0.372)
pt3dadd(57.694, 443.161, -35.609, 0.35)
pt3dadd(57.645, 443.268, -35.631, 0.328)
pt3dadd(57.603, 443.38, -35.626, 0.332)
pt3dadd(57.561, 443.492, -35.618, 0.338)
pt3dadd(57.52, 443.604, -35.61, 0.344)
pt3dadd(57.478, 443.717, -35.602, 0.35)
pt3dadd(57.437, 443.828, -35.6, 0.362)
pt3dadd(57.395, 443.941, -35.6, 0.376)
pt3dadd(57.353, 444.054, -35.6, 0.39)
pt3dadd(57.312, 444.167, -35.6, 0.404)
pt3dadd(57.27, 444.278, -35.6, 0.416)
pt3dadd(57.234, 444.392, -35.6, 0.44)
pt3dadd(57.214, 444.511, -35.6, 0.488)
pt3dadd(57.194, 444.63, -35.6, 0.536)
pt3dadd(57.122, 444.704, -35.573, 0.572)
pt3dadd(57.027, 444.76, -35.533, 0.602)
pt3dadd(57.074, 444.815, -35.454, 0.588)
pt3dadd(57.109, 444.887, -35.385, 0.56)
pt3dadd(57.115, 444.992, -35.339, 0.5)
pt3dadd(57.12, 445.1, -35.301, 0.448)
pt3dadd(57.12, 445.22, -35.308, 0.426)
pt3dadd(57.12, 445.34, -35.315, 0.406)
pt3dadd(57.12, 445.46, -35.323, 0.384)
pt3dadd(57.12, 445.579, -35.33, 0.362)
pt3dadd(57.12, 445.698, -35.345, 0.346)
pt3dadd(57.12, 445.814, -35.369, 0.336)
pt3dadd(57.12, 445.931, -35.383, 0.346)
pt3dadd(57.11, 446.046, -35.373, 0.412)
pt3dadd(57.085, 446.161, -35.389, 0.434)
pt3dadd(57.06, 446.278, -35.404, 0.458)
pt3dadd(57.035, 446.393, -35.42, 0.482)
pt3dadd(57.008, 446.509, -35.432, 0.504)
pt3dadd(56.966, 446.621, -35.424, 0.522)
pt3dadd(56.925, 446.734, -35.416, 0.54)
pt3dadd(56.883, 446.845, -35.408, 0.56)
pt3dadd(56.841, 446.958, -35.4, 0.578)
pt3dadd(56.833, 447.076, -35.386, 0.586)
pt3dadd(56.825, 447.194, -35.371, 0.596)
pt3dadd(56.817, 447.312, -35.356, 0.606)
pt3dadd(56.81, 447.431, -35.342, 0.616)
pt3dadd(56.802, 447.55, -35.327, 0.624)
pt3dadd(56.812, 447.654, -35.284, 0.636)
pt3dadd(56.829, 447.752, -35.229, 0.646)
pt3dadd(56.846, 447.851, -35.174, 0.656)
pt3dadd(56.864, 447.949, -35.118, 0.668)
pt3dadd(56.88, 448.049, -35.066, 0.68)
pt3dadd(56.88, 448.169, -35.056, 0.694)
pt3dadd(56.88, 448.288, -35.045, 0.71)
pt3dadd(56.88, 448.408, -35.035, 0.726)
pt3dadd(56.88, 448.526, -35.024, 0.742)
pt3dadd(56.88, 448.646, -35.014, 0.758)
pt3dadd(56.88, 448.765, -35.003, 0.774)
pt3dadd(56.88, 448.885, -35, 0.788)
pt3dadd(56.88, 449.005, -35, 0.802)
pt3dadd(56.88, 449.125, -35, 0.818)
pt3dadd(56.88, 449.245, -35, 0.832)
pt3dadd(56.88, 449.365, -35, 0.846)
pt3dadd(56.88, 449.485, -35, 0.86)
pt3dadd(56.88, 449.605, -35, 0.874)
pt3dadd(56.88, 449.725, -35, 0.89)
pt3dadd(56.88, 449.845, -35, 0.904)
pt3dadd(56.88, 449.965, -35, 0.918)
pt3dadd(56.88, 450.085, -35, 0.932)
pt3dadd(56.88, 450.205, -35, 0.946)
pt3dadd(56.88, 450.325, -35, 0.96)
pt3dadd(56.88, 450.445, -35, 0.974)
pt3dadd(56.88, 450.565, -35, 0.982)
pt3dadd(56.88, 450.685, -35, 0.986)
pt3dadd(56.88, 450.805, -35, 0.988)
pt3dadd(56.88, 450.925, -35, 0.992)
pt3dadd(56.88, 451.045, -35, 0.996)
pt3dadd(56.88, 451.165, -35, 1)
pt3dadd(56.88, 451.285, -35, 1.004)
pt3dadd(56.88, 451.405, -34.999, 0.994)
pt3dadd(56.88, 451.525, -34.997, 0.98)
pt3dadd(56.88, 451.645, -34.996, 0.964)
pt3dadd(56.88, 451.765, -34.994, 0.95)
pt3dadd(56.88, 451.885, -34.992, 0.936)
pt3dadd(56.88, 452.005, -34.991, 0.922)
pt3dadd(56.88, 452.125, -34.989, 0.906)
pt3dadd(56.88, 452.239, -34.962, 0.842)
pt3dadd(56.88, 452.352, -34.929, 0.768)
pt3dadd(56.88, 452.467, -34.901, 0.7)
pt3dadd(56.88, 452.585, -34.879, 0.64)
pt3dadd(56.88, 452.701, -34.857, 0.58)
pt3dadd(56.874, 452.788, -34.788, 0.554)
pt3dadd(56.867, 452.873, -34.717, 0.53)
pt3dadd(56.806, 452.948, -34.761, 0.498)
pt3dadd(56.748, 453.024, -34.82, 0.466)
pt3dadd(56.708, 453.104, -34.887, 0.434)
pt3dadd(56.668, 453.185, -34.953, 0.4)
pt3dadd(56.64, 453.276, -35, 0.37)
pt3dadd(56.64, 453.396, -35, 0.344)
pt3dadd(56.64, 453.516, -35, 0.318)
pt3dadd(56.64, 453.636, -35, 0.302)
pt3dadd(56.634, 453.756, -35.004, 0.306)
pt3dadd(56.615, 453.874, -35.016, 0.318)
pt3dadd(56.596, 453.991, -35.028, 0.332)
pt3dadd(56.577, 454.109, -35.04, 0.346)
pt3dadd(56.557, 454.226, -35.052, 0.36)
pt3dadd(56.538, 454.344, -35.064, 0.374)
pt3dadd(56.52, 454.457, -35.09, 0.402)
pt3dadd(56.52, 454.573, -35.117, 0.394)
pt3dadd(56.52, 454.685, -35.152, 0.39)
pt3dadd(56.52, 454.8, -35.178, 0.426)
pt3dadd(56.52, 454.91, -35.147, 0.452)
pt3dadd(56.52, 454.992, -35.075, 0.452)
pt3dadd(56.52, 455.028, -34.98, 0.452)
pt3dadd(56.523, 455.04, -34.881, 0.452)
pt3dadd(56.544, 455.046, -34.784, 0.452)
pt3dadd(56.607, 455.09, -34.728, 0.414)
pt3dadd(56.64, 455.16, -34.8, 0.302)
pt3dadd(56.64, 455.244, -34.869, 0.252)
pt3dadd(56.64, 455.357, -34.904, 0.302)
pt3dadd(56.626, 455.47, -34.935, 0.456)
pt3dadd(56.571, 455.557, -34.983, 0.632)
pt3dadd(56.53, 455.665, -35.008, 0.658)
pt3dadd(56.494, 455.776, -35.031, 0.662)
pt3dadd(56.458, 455.887, -35.054, 0.668)
pt3dadd(56.422, 455.998, -35.077, 0.672)
pt3dadd(56.386, 456.109, -35.1, 0.678)
pt3dadd(56.347, 456.22, -35.079, 0.672)
pt3dadd(56.308, 456.33, -35.058, 0.668)
pt3dadd(56.269, 456.442, -35.037, 0.662)
pt3dadd(56.23, 456.552, -35.016, 0.656)
pt3dadd(56.188, 456.661, -35.004, 0.652)
pt3dadd(56.135, 456.766, -35.024, 0.646)
pt3dadd(56.081, 456.871, -35.044, 0.64)
pt3dadd(56.027, 456.976, -35.064, 0.634)
pt3dadd(55.973, 457.08, -35.084, 0.63)
pt3dadd(55.935, 457.189, -35.07, 0.628)
pt3dadd(55.902, 457.301, -35.045, 0.628)
pt3dadd(55.868, 457.411, -35.019, 0.628)
pt3dadd(55.835, 457.523, -34.994, 0.628)
pt3dadd(55.802, 457.634, -34.968, 0.628)
pt3dadd(55.759, 457.735, -34.927, 0.666)
pt3dadd(55.714, 457.834, -34.885, 0.706)
pt3dadd(55.646, 457.916, -34.841, 0.75)
pt3dadd(55.59, 458.005, -34.828, 0.778)
pt3dadd(55.56, 458.104, -34.878, 0.778)
pt3dadd(55.517, 458.194, -34.932, 0.738)
pt3dadd(55.463, 458.278, -34.989, 0.666)
pt3dadd(55.453, 458.389, -35.013, 0.618)
pt3dadd(55.453, 458.508, -35.029, 0.576)
pt3dadd(55.453, 458.626, -35.045, 0.534)
pt3dadd(55.453, 458.744, -35.061, 0.492)
pt3dadd(55.5, 458.845, -35.052, 0.41)
pt3dadd(55.572, 458.936, -35.027, 0.31)
pt3dadd(55.631, 459.036, -35.008, 0.28)
pt3dadd(55.685, 459.143, -35.002, 0.286)
pt3dadd(55.738, 459.25, -34.996, 0.294)
pt3dadd(55.792, 459.358, -34.99, 0.3)
pt3dadd(55.8, 459.475, -34.992, 0.324)
pt3dadd(55.8, 459.595, -34.996, 0.35)
pt3dadd(55.8, 459.715, -35, 0.376)
pt3dadd(55.8, 459.823, -34.957, 0.388)
pt3dadd(55.8, 459.93, -34.912, 0.398)
pt3dadd(55.762, 460.003, -34.846, 0.392)
pt3dadd(55.71, 460.063, -34.771, 0.378)
pt3dadd(55.629, 460.138, -34.731, 0.336)
pt3dadd(55.55, 460.217, -34.7, 0.298)
pt3dadd(55.488, 460.319, -34.7, 0.286)
pt3dadd(55.425, 460.422, -34.7, 0.272)
pt3dadd(55.363, 460.524, -34.7, 0.258)
pt3dadd(55.331, 460.636, -34.7, 0.246)
pt3dadd(55.326, 460.756, -34.7, 0.238)
pt3dadd(55.322, 460.876, -34.7, 0.23)
pt3dadd(55.3, 460.984, -34.67, 0.232)
pt3dadd(55.268, 461.083, -34.621, 0.242)
pt3dadd(55.235, 461.178, -34.569, 0.254)
pt3dadd(55.189, 461.225, -34.486, 0.284)
pt3dadd(55.129, 461.244, -34.408, 0.36)
pt3dadd(55.081, 461.188, -34.33, 0.438)
pt3dadd(55.043, 461.161, -34.239, 0.452)
pt3dadd(54.993, 461.164, -34.149, 0.452)
pt3dadd(54.964, 461.191, -34.055, 0.452)
pt3dadd(54.96, 461.258, -33.974, 0.452)
pt3dadd(54.96, 461.357, -33.918, 0.464)
pt3dadd(54.96, 461.465, -33.873, 0.478)
pt3dadd(54.958, 461.573, -33.83, 0.466)
pt3dadd(54.932, 461.684, -33.805, 0.388)
}
}
proc shape3d_134() {
dend_5[16] { pt3dadd(54.868, 461.784, -33.8, 0.352)
pt3dadd(54.807, 461.887, -33.8, 0.374)
pt3dadd(54.747, 461.99, -33.8, 0.396)
pt3dadd(54.701, 462.101, -33.804, 0.41)
pt3dadd(54.659, 462.214, -33.809, 0.422)
pt3dadd(54.616, 462.314, -33.84, 0.47)
pt3dadd(54.607, 462.398, -33.91, 0.5)
pt3dadd(54.601, 462.484, -33.981, 0.524)
pt3dadd(54.568, 462.594, -33.989, 0.548)
pt3dadd(54.532, 462.709, -33.989, 0.57)
pt3dadd(54.506, 462.798, -33.938, 0.578)
pt3dadd(54.485, 462.874, -33.863, 0.578)
pt3dadd(54.48, 462.982, -33.832, 0.564)
pt3dadd(54.48, 463.1, -33.814, 0.544)
pt3dadd(54.48, 463.218, -33.801, 0.526)
pt3dadd(54.48, 463.338, -33.808, 0.522)
pt3dadd(54.48, 463.458, -33.815, 0.516)
pt3dadd(54.48, 463.577, -33.822, 0.51)
pt3dadd(54.48, 463.697, -33.83, 0.506)
pt3dadd(54.48, 463.805, -33.863, 0.502)
pt3dadd(54.48, 463.898, -33.925, 0.502)
pt3dadd(54.48, 463.997, -33.982, 0.524)
pt3dadd(54.48, 464.111, -34.004, 0.556)
pt3dadd(54.48, 464.231, -34.01, 0.56)
pt3dadd(54.48, 464.351, -34.016, 0.564)
pt3dadd(54.48, 464.471, -34.022, 0.57)
pt3dadd(54.48, 464.59, -34.029, 0.574)
pt3dadd(54.48, 464.71, -34.03, 0.584)
pt3dadd(54.48, 464.828, -34.018, 0.612)
pt3dadd(54.48, 464.948, -34.005, 0.64)
pt3dadd(54.48, 465.067, -34, 0.672)
pt3dadd(54.48, 465.187, -34, 0.706)
pt3dadd(54.48, 465.307, -34, 0.738)
pt3dadd(54.471, 465.427, -33.998, 0.786)
pt3dadd(54.456, 465.546, -33.993, 0.844)
pt3dadd(54.441, 465.665, -33.989, 0.902)
pt3dadd(54.352, 465.725, -33.946, 0.986)
pt3dadd(54.274, 465.794, -33.905, 1.066)
pt3dadd(54.244, 465.904, -33.872, 1.122)
pt3dadd(54.24, 466.021, -33.853, 1.126)
pt3dadd(54.24, 466.139, -33.836, 1.122)
pt3dadd(54.24, 466.258, -33.82, 1.118)
pt3dadd(54.24, 466.376, -33.803, 1.114)
pt3dadd(54.24, 466.494, -33.787, 1.11)
pt3dadd(54.24, 466.613, -33.771, 1.106)
pt3dadd(54.24, 466.729, -33.746, 1.088)
pt3dadd(54.24, 466.844, -33.718, 1.066)
pt3dadd(54.24, 466.96, -33.691, 1.044)
pt3dadd(54.24, 467.075, -33.663, 1.022)
pt3dadd(54.24, 467.19, -33.636, 1)
pt3dadd(54.239, 467.305, -33.609, 0.978)
pt3dadd(54.232, 467.423, -33.59, 0.96)
pt3dadd(54.225, 467.54, -33.57, 0.942)
pt3dadd(54.218, 467.658, -33.55, 0.924)
pt3dadd(54.211, 467.776, -33.531, 0.906)
pt3dadd(54.204, 467.893, -33.511, 0.89)
pt3dadd(54.183, 468.008, -33.5, 0.878)
pt3dadd(54.144, 468.122, -33.5, 0.878)
pt3dadd(54.101, 468.233, -33.5, 0.88)
pt3dadd(54.019, 468.32, -33.5, 0.904)
pt3dadd(53.937, 468.408, -33.5, 0.928)
pt3dadd(53.91, 468.522, -33.519, 0.95)
pt3dadd(53.886, 468.637, -33.539, 0.974)
pt3dadd(53.848, 468.704, -33.606, 0.96)
pt3dadd(53.805, 468.754, -33.69, 0.932)
pt3dadd(53.761, 468.839, -33.749, 0.874)
pt3dadd(53.716, 468.941, -33.778, 0.804)
pt3dadd(53.671, 469.051, -33.794, 0.732)
pt3dadd(53.65, 469.166, -33.808, 0.668)
pt3dadd(53.645, 469.285, -33.821, 0.61)
pt3dadd(53.64, 469.404, -33.834, 0.55)
pt3dadd(53.64, 469.523, -33.845, 0.458)
pt3dadd(53.64, 469.638, -33.847, 0.372)
pt3dadd(53.64, 469.726, -33.779, 0.336)
pt3dadd(53.64, 469.814, -33.711, 0.302)
pt3dadd(53.64, 469.934, -33.705, 0.314)
pt3dadd(53.637, 470.052, -33.696, 0.33)
pt3dadd(53.611, 470.16, -33.658, 0.368)
pt3dadd(53.586, 470.268, -33.62, 0.406)
pt3dadd(53.56, 470.376, -33.582, 0.444)
pt3dadd(53.535, 470.484, -33.544, 0.48)
pt3dadd(53.52, 470.591, -33.501, 0.522)
pt3dadd(53.52, 470.695, -33.451, 0.572)
pt3dadd(53.52, 470.798, -33.401, 0.62)
pt3dadd(53.52, 470.903, -33.352, 0.67)
pt3dadd(53.52, 471.007, -33.302, 0.718)
pt3dadd(53.514, 471.115, -33.263, 0.766)
pt3dadd(53.492, 471.232, -33.251, 0.806)
pt3dadd(53.47, 471.349, -33.239, 0.848)
pt3dadd(53.448, 471.466, -33.227, 0.89)
pt3dadd(53.426, 471.583, -33.214, 0.93)
pt3dadd(53.404, 471.701, -33.202, 0.972)
pt3dadd(53.4, 471.82, -33.194, 0.992)
pt3dadd(53.4, 471.94, -33.188, 1.008)
pt3dadd(53.4, 472.058, -33.181, 1.022)
pt3dadd(53.4, 472.178, -33.174, 1.038)
pt3dadd(53.4, 472.298, -33.167, 1.054)
pt3dadd(53.4, 472.418, -33.161, 1.068)
pt3dadd(53.393, 472.536, -33.148, 1.076)
pt3dadd(53.366, 472.648, -33.121, 1.066)
pt3dadd(53.339, 472.76, -33.093, 1.054)
pt3dadd(53.311, 472.872, -33.065, 1.042)
pt3dadd(53.284, 472.984, -33.037, 1.032)
pt3dadd(53.23, 473.082, -33.065, 0.994)
pt3dadd(53.172, 473.177, -33.1, 0.954)
pt3dadd(53.152, 473.296, -33.1, 0.934)
pt3dadd(53.132, 473.413, -33.1, 0.914)
pt3dadd(53.104, 473.53, -33.093, 0.904)
pt3dadd(53.066, 473.642, -33.078, 0.904)
pt3dadd(53.04, 473.748, -33.048, 0.9)
pt3dadd(53.04, 473.842, -32.985, 0.888)
pt3dadd(53.039, 473.94, -32.93, 0.874)
pt3dadd(53.03, 474.056, -32.909, 0.842)
pt3dadd(53.004, 474.17, -32.888, 0.816)
pt3dadd(52.966, 474.281, -32.867, 0.796)
pt3dadd(52.927, 474.391, -32.847, 0.774)
pt3dadd(52.888, 474.503, -32.826, 0.754)
pt3dadd(52.849, 474.613, -32.805, 0.734)
pt3dadd(52.834, 474.73, -32.787, 0.718)
pt3dadd(52.827, 474.847, -32.77, 0.706)
pt3dadd(52.821, 474.965, -32.752, 0.692)
pt3dadd(52.814, 475.084, -32.735, 0.68)
pt3dadd(52.807, 475.201, -32.717, 0.666)
pt3dadd(52.8, 475.319, -32.7, 0.652)
pt3dadd(52.753, 475.429, -32.7, 0.644)
pt3dadd(52.705, 475.54, -32.7, 0.634)
pt3dadd(52.658, 475.65, -32.7, 0.624)
pt3dadd(52.61, 475.76, -32.7, 0.616)
pt3dadd(52.563, 475.871, -32.7, 0.606)
pt3dadd(52.533, 475.985, -32.687, 0.606)
pt3dadd(52.513, 476.1, -32.668, 0.61)
pt3dadd(52.493, 476.216, -32.649, 0.616)
pt3dadd(52.473, 476.333, -32.631, 0.62)
pt3dadd(52.452, 476.449, -32.612, 0.624)
pt3dadd(52.435, 476.566, -32.602, 0.63)
pt3dadd(52.422, 476.686, -32.608, 0.634)
pt3dadd(52.408, 476.804, -32.613, 0.638)
pt3dadd(52.395, 476.923, -32.619, 0.642)
pt3dadd(52.382, 477.042, -32.624, 0.646)
pt3dadd(52.368, 477.161, -32.63, 0.65)
pt3dadd(52.353, 477.278, -32.644, 0.656)
pt3dadd(52.335, 477.391, -32.675, 0.668)
pt3dadd(52.32, 477.505, -32.701, 0.678)
pt3dadd(52.32, 477.624, -32.705, 0.678)
pt3dadd(52.32, 477.744, -32.708, 0.678)
pt3dadd(52.318, 477.859, -32.728, 0.67)
pt3dadd(52.312, 477.96, -32.781, 0.646)
pt3dadd(52.296, 478.051, -32.839, 0.62)
pt3dadd(52.244, 478.102, -32.919, 0.578)
pt3dadd(52.225, 478.18, -32.97, 0.538)
pt3dadd(52.254, 478.295, -32.979, 0.504)
pt3dadd(52.283, 478.411, -32.988, 0.47)
pt3dadd(52.312, 478.526, -32.997, 0.436)
pt3dadd(52.32, 478.645, -33, 0.41)
pt3dadd(52.32, 478.765, -33, 0.384)
pt3dadd(52.32, 478.885, -33, 0.358)
pt3dadd(52.32, 479.005, -33, 0.316)
pt3dadd(52.322, 479.124, -33.012, 0.304)
pt3dadd(52.324, 479.243, -33.029, 0.308)
pt3dadd(52.326, 479.362, -33.045, 0.312)
pt3dadd(52.328, 479.479, -33.062, 0.316)
pt3dadd(52.33, 479.598, -33.079, 0.322)
pt3dadd(52.333, 479.716, -33.096, 0.326)
pt3dadd(52.363, 479.831, -33.1, 0.334)
pt3dadd(52.402, 479.944, -33.1, 0.346)
pt3dadd(52.411, 480.056, -33.107, 0.352)
pt3dadd(52.369, 480.167, -33.124, 0.352)
pt3dadd(52.295, 480.233, -33.147, 0.342)
pt3dadd(52.181, 480.244, -33.177, 0.318)
pt3dadd(52.074, 480.274, -33.2, 0.298)
pt3dadd(51.993, 480.361, -33.2, 0.286)
pt3dadd(51.916, 480.452, -33.2, 0.276)
pt3dadd(51.875, 480.565, -33.2, 0.284)
pt3dadd(51.833, 480.678, -33.2, 0.29)
pt3dadd(51.792, 480.791, -33.2, 0.296)
pt3dadd(51.753, 480.904, -33.2, 0.306)
pt3dadd(51.72, 481.02, -33.2, 0.326)
pt3dadd(51.688, 481.135, -33.2, 0.348)
pt3dadd(51.655, 481.224, -33.147, 0.368)
pt3dadd(51.622, 481.306, -33.079, 0.388)
pt3dadd(51.6, 481.387, -33.009, 0.406)
pt3dadd(51.6, 481.469, -32.936, 0.418)
pt3dadd(51.597, 481.558, -32.872, 0.43)
pt3dadd(51.584, 481.673, -32.847, 0.448)
pt3dadd(51.571, 481.788, -32.821, 0.464)
pt3dadd(51.556, 481.903, -32.8, 0.478)
pt3dadd(51.536, 482.022, -32.8, 0.478)
pt3dadd(51.529, 482.138, -32.8, 0.472)
pt3dadd(51.56, 482.246, -32.816, 0.446)
pt3dadd(51.56, 482.358, -32.853, 0.432)
pt3dadd(51.534, 482.466, -32.888, 0.418)
pt3dadd(51.492, 482.57, -32.923, 0.406)
pt3dadd(51.48, 482.683, -32.951, 0.402)
pt3dadd(51.48, 482.8, -32.975, 0.402)
pt3dadd(51.5, 482.909, -32.973, 0.384)
pt3dadd(51.546, 483.01, -32.934, 0.34)
pt3dadd(51.533, 483.115, -32.942, 0.314)
pt3dadd(51.494, 483.223, -32.971, 0.296)
pt3dadd(51.455, 483.331, -32.999, 0.276)
pt3dadd(51.415, 483.444, -33, 0.256)
}
}
proc shape3d_135() {
dend_5[16] { pt3dadd(51.375, 483.557, -33, 0.234)
pt3dadd(51.36, 483.655, -32.958, 0.226)
pt3dadd(51.36, 483.745, -32.892, 0.226)
pt3dadd(51.36, 483.834, -32.825, 0.226)
pt3dadd(51.36, 483.936, -32.772, 0.236)
pt3dadd(51.36, 484.04, -32.723, 0.248)
pt3dadd(51.36, 484.153, -32.732, 0.298)
pt3dadd(51.333, 484.268, -32.718, 0.324)
pt3dadd(51.304, 484.384, -32.702, 0.348)
pt3dadd(51.276, 484.498, -32.686, 0.372)
pt3dadd(51.247, 484.613, -32.67, 0.396)
pt3dadd(51.24, 484.703, -32.611, 0.438)
pt3dadd(51.24, 484.784, -32.537, 0.486)
pt3dadd(51.24, 484.89, -32.511, 0.52)
pt3dadd(51.24, 485.01, -32.511, 0.546)
pt3dadd(51.24, 485.13, -32.511, 0.574)
pt3dadd(51.222, 485.206, -32.58, 0.588)
pt3dadd(51.202, 485.275, -32.66, 0.602)
pt3dadd(51.159, 485.348, -32.73, 0.602)
pt3dadd(51.122, 485.428, -32.782, 0.604)
pt3dadd(51.134, 485.533, -32.735, 0.612)
pt3dadd(51.146, 485.639, -32.688, 0.62)
pt3dadd(51.158, 485.743, -32.641, 0.626)
pt3dadd(51.204, 485.848, -32.652, 0.656)
pt3dadd(51.228, 485.956, -32.67, 0.688)
pt3dadd(51.192, 486.07, -32.682, 0.722)
pt3dadd(51.156, 486.182, -32.693, 0.758)
pt3dadd(51.109, 486.292, -32.698, 0.8)
pt3dadd(51.046, 486.394, -32.693, 0.86)
pt3dadd(50.971, 486.479, -32.679, 0.97)
pt3dadd(50.915, 486.544, -32.621, 1.098)
pt3dadd(50.886, 486.622, -32.549, 1.166)
pt3dadd(50.88, 486.732, -32.524, 1.202)
pt3dadd(50.88, 486.851, -32.511, 1.23)
pt3dadd(50.879, 486.97, -32.5, 1.254)
pt3dadd(50.864, 487.09, -32.5, 1.236)
pt3dadd(50.849, 487.208, -32.5, 1.216)
pt3dadd(50.824, 487.321, -32.514, 1.164)
pt3dadd(50.782, 487.426, -32.549, 1.058)
pt3dadd(50.76, 487.536, -32.576, 0.926)
pt3dadd(50.76, 487.655, -32.596, 0.764)
pt3dadd(50.76, 487.774, -32.6, 0.662)
pt3dadd(50.76, 487.894, -32.6, 0.58)
pt3dadd(50.76, 488.014, -32.6, 0.496)
pt3dadd(50.76, 488.134, -32.597, 0.444)
pt3dadd(50.76, 488.254, -32.593, 0.4)
pt3dadd(50.76, 488.374, -32.589, 0.356)
pt3dadd(50.76, 488.459, -32.524, 0.342)
pt3dadd(50.76, 488.54, -32.45, 0.33)
pt3dadd(50.76, 488.632, -32.385, 0.344)
pt3dadd(50.76, 488.725, -32.323, 0.368)
pt3dadd(50.758, 488.824, -32.266, 0.39)
pt3dadd(50.754, 488.926, -32.213, 0.412)
pt3dadd(50.75, 489.028, -32.16, 0.432)
pt3dadd(50.741, 489.128, -32.114, 0.452)
pt3dadd(50.678, 489.222, -32.147, 0.452)
pt3dadd(50.62, 489.308, -32.193, 0.448)
pt3dadd(50.569, 489.383, -32.259, 0.438)
pt3dadd(50.52, 489.458, -32.324, 0.426)
pt3dadd(50.514, 489.571, -32.358, 0.392)
pt3dadd(50.508, 489.683, -32.393, 0.358)
pt3dadd(50.433, 489.755, -32.429, 0.344)
pt3dadd(50.339, 489.815, -32.466, 0.332)
pt3dadd(50.258, 489.892, -32.489, 0.318)
pt3dadd(50.199, 489.997, -32.489, 0.292)
pt3dadd(50.149, 490.092, -32.465, 0.272)
pt3dadd(50.116, 490.168, -32.392, 0.262)
pt3dadd(50.084, 490.243, -32.32, 0.252)
pt3dadd(50.064, 490.354, -32.289, 0.262)
pt3dadd(50.046, 490.469, -32.264, 0.272)
pt3dadd(50.04, 490.556, -32.204, 0.37)
pt3dadd(50.014, 490.62, -32.122, 0.414)
pt3dadd(49.987, 490.682, -32.039, 0.454)
pt3dadd(49.961, 490.745, -31.957, 0.494)
pt3dadd(49.934, 490.808, -31.875, 0.532)
pt3dadd(49.891, 490.861, -31.794, 0.594)
pt3dadd(49.833, 490.906, -31.715, 0.676)
pt3dadd(49.81, 490.934, -31.623, 0.744)
pt3dadd(49.804, 490.956, -31.525, 0.804)
pt3dadd(49.8, 490.992, -31.435, 0.862)
pt3dadd(49.8, 491.095, -31.384, 0.908)
pt3dadd(49.8, 491.198, -31.334, 0.954)
pt3dadd(49.8, 491.302, -31.283, 0.988)
pt3dadd(49.8, 491.406, -31.232, 1.022)
pt3dadd(49.8, 491.495, -31.166, 1.058)
pt3dadd(49.8, 491.584, -31.1, 1.082)
pt3dadd(49.8, 491.682, -31.043, 1.086)
pt3dadd(49.8, 491.78, -30.985, 1.092)
pt3dadd(49.8, 491.879, -30.927, 1.096)
pt3dadd(49.8, 491.977, -30.87, 1.102)
pt3dadd(49.8, 492.078, -30.817, 1.106)
pt3dadd(49.8, 492.186, -30.773, 1.112)
pt3dadd(49.8, 492.293, -30.728, 1.116)
pt3dadd(49.8, 492.401, -30.683, 1.12)
pt3dadd(49.8, 492.508, -30.638, 1.126)
pt3dadd(49.797, 492.617, -30.597, 1.128)
pt3dadd(49.774, 492.732, -30.578, 1.118)
pt3dadd(49.751, 492.847, -30.559, 1.11)
pt3dadd(49.728, 492.962, -30.54, 1.1)
pt3dadd(49.704, 493.078, -30.52, 1.09)
pt3dadd(49.681, 493.194, -30.501, 1.08)
pt3dadd(49.666, 493.31, -30.48, 1.072)
pt3dadd(49.651, 493.427, -30.46, 1.062)
pt3dadd(49.636, 493.543, -30.439, 1.052)
pt3dadd(49.621, 493.66, -30.418, 1.042)
pt3dadd(49.606, 493.776, -30.398, 1.034)
pt3dadd(49.595, 493.89, -30.368, 1.026)
pt3dadd(49.588, 494, -30.332, 1.022)
pt3dadd(49.58, 494.112, -30.295, 1.016)
pt3dadd(49.572, 494.224, -30.258, 1.012)
pt3dadd(49.564, 494.335, -30.221, 1.008)
pt3dadd(49.56, 494.45, -30.2, 1.014)
pt3dadd(49.56, 494.57, -30.2, 1.04)
pt3dadd(49.56, 494.69, -30.2, 1.066)
pt3dadd(49.56, 494.808, -30.189, 1.092)
pt3dadd(49.56, 494.923, -30.161, 1.124)
pt3dadd(49.56, 495.038, -30.133, 1.154)
pt3dadd(49.554, 495.13, -30.069, 1.18)
pt3dadd(49.547, 495.221, -30.004, 1.204)
pt3dadd(49.489, 495.299, -29.946, 1.206)
pt3dadd(49.423, 495.377, -29.9, 1.206)
pt3dadd(49.338, 495.462, -29.9, 1.206)
pt3dadd(49.272, 495.562, -29.9, 1.206)
pt3dadd(49.212, 495.665, -29.9, 1.206)
pt3dadd(49.133, 495.752, -29.89, 1.19)
pt3dadd(49.043, 495.828, -29.873, 1.164)
pt3dadd(48.994, 495.906, -29.819, 1.128)
pt3dadd(48.966, 495.984, -29.747, 1.088)
pt3dadd(48.96, 496.096, -29.72, 1.056)
pt3dadd(48.96, 496.213, -29.702, 1.028)
pt3dadd(48.96, 496.325, -29.674, 1)
pt3dadd(48.96, 496.41, -29.603, 0.982)
pt3dadd(48.922, 496.495, -29.544, 0.98)
pt3dadd(48.873, 496.583, -29.488, 0.98)
pt3dadd(48.825, 496.669, -29.432, 0.98)
pt3dadd(48.777, 496.756, -29.376, 0.98)
pt3dadd(48.722, 496.795, -29.3, 0.964)
pt3dadd(48.663, 496.808, -29.213, 0.94)
pt3dadd(48.599, 496.859, -29.148, 0.904)
pt3dadd(48.53, 496.936, -29.096, 0.86)
pt3dadd(48.483, 497.032, -29.053, 0.808)
pt3dadd(48.441, 497.132, -29.011, 0.754)
pt3dadd(48.385, 497.238, -29.006, 0.718)
pt3dadd(48.329, 497.345, -29.001, 0.684)
pt3dadd(48.275, 497.452, -29, 0.65)
pt3dadd(48.227, 497.557, -28.985, 0.626)
pt3dadd(48.191, 497.659, -28.942, 0.62)
pt3dadd(48.155, 497.761, -28.899, 0.614)
pt3dadd(48.119, 497.864, -28.857, 0.608)
pt3dadd(48.083, 497.966, -28.814, 0.604)
pt3dadd(48.039, 498.076, -28.796, 0.612)
pt3dadd(47.995, 498.186, -28.78, 0.622)
pt3dadd(47.951, 498.295, -28.764, 0.634)
pt3dadd(47.907, 498.406, -28.748, 0.644)
pt3dadd(47.861, 498.515, -28.733, 0.654)
pt3dadd(47.795, 498.614, -28.726, 0.676)
pt3dadd(47.728, 498.714, -28.719, 0.696)
pt3dadd(47.662, 498.814, -28.712, 0.718)
pt3dadd(47.595, 498.913, -28.705, 0.738)
pt3dadd(47.53, 499.014, -28.7, 0.774)
pt3dadd(47.47, 499.117, -28.7, 0.854)
pt3dadd(47.41, 499.222, -28.7, 0.936)
pt3dadd(47.371, 499.334, -28.7, 1.02)
pt3dadd(47.331, 499.447, -28.7, 1.106)
pt3dadd(47.276, 499.553, -28.688, 1.184)
pt3dadd(47.215, 499.654, -28.671, 1.262)
pt3dadd(47.178, 499.739, -28.613, 1.3)
pt3dadd(47.15, 499.817, -28.542, 1.328)
pt3dadd(47.099, 499.913, -28.501, 1.276)
pt3dadd(47.049, 500.011, -28.462, 1.248)
pt3dadd(47.003, 500.11, -28.421, 1.236)
pt3dadd(46.957, 500.209, -28.38, 1.224)
pt3dadd(46.911, 500.309, -28.338, 1.212)
pt3dadd(46.872, 500.411, -28.298, 1.204)
pt3dadd(46.846, 500.519, -28.26, 1.198)
pt3dadd(46.82, 500.627, -28.222, 1.192)
pt3dadd(46.795, 500.735, -28.184, 1.188)
pt3dadd(46.769, 500.843, -28.146, 1.182)
pt3dadd(46.723, 500.948, -28.129, 1.176)
pt3dadd(46.666, 501.054, -28.122, 1.172)
pt3dadd(46.609, 501.16, -28.115, 1.166)
pt3dadd(46.552, 501.265, -28.109, 1.162)
pt3dadd(46.495, 501.371, -28.102, 1.156)
pt3dadd(46.453, 501.472, -28.067, 1.134)
pt3dadd(46.417, 501.572, -28.021, 1.106)
pt3dadd(46.381, 501.673, -27.976, 1.078)
pt3dadd(46.344, 501.773, -27.93, 1.048)
pt3dadd(46.32, 501.88, -27.899, 1.01)
pt3dadd(46.32, 502, -27.895, 0.948)
pt3dadd(46.32, 502.12, -27.891, 0.888)
pt3dadd(46.32, 502.223, -27.856, 0.832)
pt3dadd(46.32, 502.304, -27.783, 0.786)
pt3dadd(46.32, 502.379, -27.705, 0.754)
pt3dadd(46.32, 502.44, -27.619, 0.754)
pt3dadd(46.32, 502.504, -27.535, 0.758)
pt3dadd(46.32, 502.585, -27.462, 0.794)
pt3dadd(46.32, 502.667, -27.388, 0.828)
pt3dadd(46.32, 502.699, -27.292, 0.86)
pt3dadd(46.32, 502.744, -27.2, 0.882)
pt3dadd(46.32, 502.807, -27.115, 0.892)
}
}
proc shape3d_136() {
dend_5[16] { pt3dadd(46.32, 502.87, -27.03, 0.902)
pt3dadd(46.32, 502.933, -26.945, 0.912)
pt3dadd(46.32, 502.996, -26.86, 0.922)
pt3dadd(46.32, 503.072, -26.787, 0.932)
pt3dadd(46.32, 503.179, -26.742, 0.944)
pt3dadd(46.32, 503.286, -26.696, 0.954)
pt3dadd(46.32, 503.38, -26.634, 0.966)
pt3dadd(46.32, 503.473, -26.571, 0.978)
pt3dadd(46.32, 503.562, -26.503, 0.958)
pt3dadd(46.32, 503.65, -26.435, 0.934)
pt3dadd(46.32, 503.699, -26.346, 0.912)
pt3dadd(46.32, 503.738, -26.252, 0.89)
pt3dadd(46.318, 503.783, -26.159, 0.872)
pt3dadd(46.315, 503.834, -26.069, 0.86)
pt3dadd(46.311, 503.885, -25.978, 0.846)
pt3dadd(46.308, 503.935, -25.888, 0.832)
pt3dadd(46.268, 504.024, -25.839, 0.84)
pt3dadd(46.218, 504.125, -25.803, 0.852)
pt3dadd(46.2, 504.241, -25.8, 0.88)
pt3dadd(46.2, 504.358, -25.772, 0.89)
pt3dadd(46.2, 504.473, -25.745, 0.9)
pt3dadd(46.2, 504.587, -25.714, 0.904)
pt3dadd(46.2, 504.7, -25.681, 0.904)
pt3dadd(46.2, 504.802, -25.636, 0.906)
pt3dadd(46.2, 504.862, -25.55, 0.918)
pt3dadd(46.2, 504.923, -25.464, 0.93)
pt3dadd(46.2, 504.998, -25.385, 0.942)
pt3dadd(46.2, 505.073, -25.307, 0.954)
pt3dadd(46.2, 505.148, -25.229, 0.97)
pt3dadd(46.2, 505.189, -25.141, 0.974)
pt3dadd(46.2, 505.194, -25.041, 0.966)
pt3dadd(46.2, 505.198, -24.941, 0.958)
pt3dadd(46.2, 505.231, -24.847, 0.94)
pt3dadd(46.2, 505.285, -24.758, 0.918)
pt3dadd(46.198, 505.358, -24.686, 0.892)
pt3dadd(46.192, 505.469, -24.645, 0.858)
pt3dadd(46.178, 505.572, -24.601, 0.822)
pt3dadd(46.125, 505.649, -24.537, 0.778)
pt3dadd(46.089, 505.73, -24.473, 0.746)
pt3dadd(46.08, 505.822, -24.41, 0.728)
pt3dadd(46.08, 505.939, -24.391, 0.738)
pt3dadd(46.08, 506.057, -24.373, 0.746)
pt3dadd(46.08, 506.174, -24.354, 0.754)
pt3dadd(46.08, 506.293, -24.336, 0.762)
pt3dadd(46.08, 506.411, -24.317, 0.77)
pt3dadd(46.08, 506.528, -24.3, 0.782)
pt3dadd(46.08, 506.648, -24.3, 0.832)
pt3dadd(46.08, 506.768, -24.3, 0.882)
pt3dadd(46.08, 506.888, -24.3, 0.934)
pt3dadd(46.08, 507.008, -24.3, 0.992)
pt3dadd(46.08, 507.128, -24.3, 1.05)
pt3dadd(46.08, 507.248, -24.297, 1.11)
pt3dadd(46.08, 507.355, -24.252, 1.178)
pt3dadd(46.08, 507.463, -24.207, 1.244)
pt3dadd(46.08, 507.566, -24.157, 1.266)
pt3dadd(46.08, 507.67, -24.107, 1.276)
pt3dadd(46.08, 507.767, -24.049, 1.236)
pt3dadd(46.08, 507.858, -23.983, 1.172)
pt3dadd(46.08, 507.938, -23.909, 1.13)
pt3dadd(46.08, 508.019, -23.835, 1.09)
pt3dadd(46.08, 508.1, -23.761, 1.05)
pt3dadd(46.08, 508.181, -23.687, 1.008)
pt3dadd(46.08, 508.272, -23.63, 0.96)
pt3dadd(46.08, 508.391, -23.618, 0.884)
pt3dadd(46.08, 508.51, -23.605, 0.81)
pt3dadd(46.08, 508.622, -23.574, 0.746)
pt3dadd(46.08, 508.729, -23.529, 0.69)
pt3dadd(46.08, 508.816, -23.468, 0.65)
pt3dadd(46.08, 508.862, -23.376, 0.638)
pt3dadd(46.08, 508.908, -23.284, 0.628)
pt3dadd(46.08, 508.928, -23.185, 0.648)
pt3dadd(46.08, 508.949, -23.087, 0.668)
pt3dadd(46.08, 509.008, -23.011, 0.684)
pt3dadd(46.08, 509.113, -22.963, 0.698)
pt3dadd(46.08, 509.218, -22.915, 0.712)
pt3dadd(46.08, 509.323, -22.867, 0.726)
pt3dadd(46.08, 509.416, -22.803, 0.728)
pt3dadd(46.08, 509.503, -22.735, 0.728)
pt3dadd(46.124, 509.598, -22.708, 0.722)
pt3dadd(46.19, 509.698, -22.705, 0.714)
pt3dadd(46.257, 509.797, -22.701, 0.704)
pt3dadd(46.309, 509.898, -22.67, 0.692)
pt3dadd(46.359, 509.999, -22.634, 0.678)
pt3dadd(46.416, 510.088, -22.59, 0.622)
pt3dadd(46.457, 510.18, -22.535, 0.604)
pt3dadd(46.498, 510.271, -22.48, 0.586)
pt3dadd(46.539, 510.362, -22.425, 0.568)
pt3dadd(46.581, 510.454, -22.37, 0.544)
pt3dadd(46.634, 510.544, -22.32, 0.488)
pt3dadd(46.669, 510.629, -22.261, 0.452)
pt3dadd(46.676, 510.707, -22.185, 0.452)
pt3dadd(46.68, 510.791, -22.115, 0.466)
pt3dadd(46.68, 510.89, -22.059, 0.514)
pt3dadd(46.68, 510.992, -22.01, 0.564)
pt3dadd(46.68, 511.112, -22.007, 0.634)
pt3dadd(46.68, 511.232, -22.003, 0.702)
pt3dadd(46.68, 511.352, -22, 0.776)
pt3dadd(46.68, 511.472, -22, 0.864)
pt3dadd(46.68, 511.592, -22, 0.938)
pt3dadd(46.68, 511.712, -22, 0.972)
pt3dadd(46.68, 511.832, -22, 1.006)
pt3dadd(46.68, 511.951, -21.995, 1.034)
pt3dadd(46.68, 512.07, -21.978, 1.054)
pt3dadd(46.68, 512.188, -21.961, 1.074)
pt3dadd(46.68, 512.254, -21.892, 1.094)
pt3dadd(46.68, 512.293, -21.798, 1.116)
pt3dadd(46.68, 512.339, -21.706, 1.13)
pt3dadd(46.68, 512.4, -21.62, 1.13)
pt3dadd(46.678, 512.464, -21.536, 1.126)
pt3dadd(46.662, 512.555, -21.472, 1.096)
pt3dadd(46.646, 512.645, -21.407, 1.064)
pt3dadd(46.629, 512.735, -21.342, 1.034)
pt3dadd(46.546, 512.809, -21.318, 0.948)
pt3dadd(46.453, 512.881, -21.3, 0.852)
pt3dadd(46.44, 513, -21.3, 0.678)
}
dend_5[17] {pt3dclear()
pt3dadd(28.68, 307.08, -23.1, 1.13)
pt3dadd(28.665, 307.094, -23.054, 1.13)
pt3dadd(28.635, 307.126, -22.961, 1.13)
pt3dadd(28.604, 307.156, -22.868, 1.13)
pt3dadd(28.573, 307.187, -22.774, 1.13)
pt3dadd(28.543, 307.217, -22.681, 1.13)
pt3dadd(28.512, 307.248, -22.588, 1.13)
pt3dadd(28.482, 307.278, -22.495, 1.13)
pt3dadd(28.451, 307.309, -22.401, 1.13)
pt3dadd(28.421, 307.339, -22.308, 1.13)
pt3dadd(28.39, 307.369, -22.215, 1.13)
pt3dadd(28.36, 307.4, -22.121, 1.13)
pt3dadd(28.329, 307.43, -22.028, 1.13)
pt3dadd(28.264, 307.502, -22, 1.254)
pt3dadd(28.183, 307.591, -22, 1.432)
pt3dadd(28.102, 307.68, -22, 1.608)
pt3dadd(28.022, 307.769, -22, 1.786)
pt3dadd(27.941, 307.858, -22, 1.964)
pt3dadd(27.876, 307.957, -22, 2.06)
pt3dadd(27.816, 308.062, -22, 2.128)
pt3dadd(27.756, 308.166, -22, 2.196)
pt3dadd(27.696, 308.269, -22, 2.266)
pt3dadd(27.636, 308.374, -22, 2.334)
pt3dadd(27.571, 308.474, -22, 2.396)
pt3dadd(27.503, 308.573, -22, 2.454)
pt3dadd(27.419, 308.654, -22, 2.48)
pt3dadd(27.316, 308.716, -22, 2.47)
pt3dadd(27.228, 308.79, -22, 2.45)
pt3dadd(27.181, 308.9, -22, 2.406)
pt3dadd(27.134, 309.011, -22, 2.362)
pt3dadd(27.129, 309.131, -22, 2.318)
pt3dadd(27.124, 309.251, -22, 2.274)
pt3dadd(27.116, 309.37, -22, 2.23)
pt3dadd(27.066, 309.479, -22, 2.17)
pt3dadd(27.017, 309.588, -22, 2.11)
pt3dadd(26.967, 309.697, -22, 2.05)
pt3dadd(26.908, 309.8, -22, 1.968)
pt3dadd(26.826, 309.888, -22, 1.838)
pt3dadd(26.742, 309.973, -22, 1.68)
pt3dadd(26.675, 310.067, -22, 1.524)
pt3dadd(26.636, 310.181, -22, 1.504)
pt3dadd(26.598, 310.294, -22, 1.486)
pt3dadd(26.559, 310.408, -22, 1.468)
pt3dadd(26.521, 310.522, -22, 1.45)
pt3dadd(26.482, 310.634, -22, 1.432)
pt3dadd(26.466, 310.752, -21.983, 1.44)
pt3dadd(26.452, 310.868, -21.964, 1.45)
pt3dadd(26.437, 310.986, -21.946, 1.458)
pt3dadd(26.422, 311.104, -21.928, 1.468)
pt3dadd(26.408, 311.22, -21.909, 1.476)
pt3dadd(26.397, 311.338, -21.891, 1.486)
pt3dadd(26.39, 311.455, -21.874, 1.494)
pt3dadd(26.383, 311.574, -21.857, 1.504)
pt3dadd(26.376, 311.692, -21.84, 1.512)
pt3dadd(26.369, 311.809, -21.822, 1.52)
pt3dadd(26.362, 311.928, -21.805, 1.53)
pt3dadd(26.339, 312.044, -21.8, 1.534)
pt3dadd(26.308, 312.16, -21.8, 1.54)
pt3dadd(26.278, 312.276, -21.8, 1.544)
pt3dadd(26.247, 312.392, -21.8, 1.548)
pt3dadd(26.217, 312.509, -21.8, 1.552)
pt3dadd(26.187, 312.625, -21.8, 1.556)
pt3dadd(26.12, 312.724, -21.8, 1.546)
pt3dadd(26.052, 312.823, -21.8, 1.534)
pt3dadd(25.984, 312.922, -21.8, 1.522)
pt3dadd(25.916, 313.021, -21.8, 1.51)
pt3dadd(25.867, 313.129, -21.8, 1.514)
pt3dadd(25.827, 313.242, -21.8, 1.524)
pt3dadd(25.8, 313.358, -21.8, 1.538)
pt3dadd(25.8, 313.478, -21.8, 1.554)
pt3dadd(25.8, 313.598, -21.8, 1.57)
pt3dadd(25.8, 313.718, -21.8, 1.586)
pt3dadd(25.8, 313.838, -21.8, 1.598)
pt3dadd(25.8, 313.958, -21.8, 1.604)
pt3dadd(25.8, 314.078, -21.8, 1.598)
pt3dadd(25.8, 314.198, -21.8, 1.59)
pt3dadd(25.8, 314.318, -21.8, 1.584)
pt3dadd(25.8, 314.438, -21.8, 1.576)
pt3dadd(25.8, 314.558, -21.8, 1.568)
pt3dadd(25.8, 314.678, -21.8, 1.562)
pt3dadd(25.8, 314.798, -21.8, 1.55)
pt3dadd(25.8, 314.918, -21.8, 1.524)
pt3dadd(25.8, 315.038, -21.8, 1.498)
pt3dadd(25.8, 315.158, -21.8, 1.474)
pt3dadd(25.8, 315.278, -21.8, 1.448)
}
}
proc shape3d_137() {
dend_5[17] { pt3dadd(25.8, 315.398, -21.8, 1.424)
pt3dadd(25.8, 315.518, -21.8, 1.398)
pt3dadd(25.799, 315.638, -21.8, 1.37)
pt3dadd(25.797, 315.758, -21.8, 1.338)
pt3dadd(25.796, 315.878, -21.8, 1.306)
pt3dadd(25.794, 315.998, -21.8, 1.272)
pt3dadd(25.792, 316.118, -21.8, 1.24)
pt3dadd(25.79, 316.237, -21.8, 1.206)
pt3dadd(25.788, 316.357, -21.8, 1.174)
pt3dadd(25.778, 316.477, -21.8, 1.14)
pt3dadd(25.759, 316.596, -21.8, 1.102)
pt3dadd(25.739, 316.714, -21.8, 1.064)
pt3dadd(25.719, 316.832, -21.8, 1.028)
pt3dadd(25.7, 316.95, -21.8, 0.99)
pt3dadd(25.68, 317.069, -21.8, 0.954)
pt3dadd(25.653, 317.185, -21.8, 0.92)
pt3dadd(25.611, 317.298, -21.8, 0.892)
pt3dadd(25.569, 317.411, -21.8, 0.864)
pt3dadd(25.528, 317.522, -21.8, 0.836)
pt3dadd(25.486, 317.635, -21.8, 0.808)
pt3dadd(25.444, 317.748, -21.8, 0.782)
pt3dadd(25.422, 317.866, -21.8, 0.77)
pt3dadd(25.403, 317.984, -21.8, 0.762)
pt3dadd(25.383, 318.102, -21.8, 0.754)
pt3dadd(25.363, 318.221, -21.8, 0.746)
pt3dadd(25.343, 318.34, -21.8, 0.738)
pt3dadd(25.324, 318.457, -21.8, 0.73)
pt3dadd(25.32, 318.577, -21.8, 0.728)
pt3dadd(25.32, 318.697, -21.8, 0.728)
pt3dadd(25.32, 318.817, -21.8, 0.728)
pt3dadd(25.32, 318.937, -21.8, 0.728)
pt3dadd(25.32, 319.057, -21.8, 0.728)
pt3dadd(25.32, 319.177, -21.8, 0.728)
pt3dadd(25.32, 319.297, -21.8, 0.728)
pt3dadd(25.32, 319.417, -21.8, 0.732)
pt3dadd(25.32, 319.537, -21.8, 0.734)
pt3dadd(25.32, 319.657, -21.8, 0.738)
pt3dadd(25.32, 319.777, -21.8, 0.742)
pt3dadd(25.32, 319.897, -21.8, 0.746)
pt3dadd(25.32, 320.017, -21.8, 0.748)
pt3dadd(25.32, 320.137, -21.8, 0.752)
pt3dadd(25.302, 320.256, -21.8, 0.76)
pt3dadd(25.28, 320.374, -21.8, 0.768)
pt3dadd(25.257, 320.491, -21.8, 0.776)
pt3dadd(25.235, 320.609, -21.8, 0.786)
pt3dadd(25.213, 320.728, -21.8, 0.794)
pt3dadd(25.191, 320.845, -21.8, 0.802)
pt3dadd(25.155, 320.959, -21.8, 0.818)
pt3dadd(25.116, 321.073, -21.8, 0.836)
pt3dadd(25.078, 321.187, -21.8, 0.854)
pt3dadd(25.039, 321.3, -21.8, 0.874)
pt3dadd(25, 321.414, -21.8, 0.892)
pt3dadd(24.956, 321.526, -21.8, 0.912)
pt3dadd(24.9, 321.631, -21.8, 0.936)
pt3dadd(24.843, 321.737, -21.8, 0.96)
pt3dadd(24.786, 321.842, -21.8, 0.984)
pt3dadd(24.73, 321.948, -21.8, 1.008)
pt3dadd(24.679, 322.056, -21.8, 1.03)
pt3dadd(24.666, 322.175, -21.8, 1.03)
pt3dadd(24.654, 322.295, -21.8, 1.03)
pt3dadd(24.641, 322.414, -21.8, 1.03)
pt3dadd(24.628, 322.534, -21.8, 1.03)
pt3dadd(24.616, 322.652, -21.8, 1.03)
pt3dadd(24.603, 322.772, -21.8, 1.03)
pt3dadd(24.595, 322.891, -21.8, 1.018)
pt3dadd(24.59, 323.011, -21.8, 1.002)
pt3dadd(24.584, 323.131, -21.8, 0.988)
pt3dadd(24.578, 323.251, -21.8, 0.972)
pt3dadd(24.572, 323.371, -21.8, 0.958)
pt3dadd(24.566, 323.491, -21.8, 0.942)
pt3dadd(24.557, 323.61, -21.8, 0.928)
pt3dadd(24.521, 323.725, -21.8, 0.904)
pt3dadd(24.486, 323.839, -21.8, 0.882)
pt3dadd(24.45, 323.954, -21.8, 0.86)
pt3dadd(24.414, 324.068, -21.8, 0.838)
pt3dadd(24.378, 324.182, -21.8, 0.814)
pt3dadd(24.342, 324.298, -21.8, 0.8)
pt3dadd(24.306, 324.412, -21.8, 0.79)
pt3dadd(24.27, 324.527, -21.8, 0.782)
pt3dadd(24.234, 324.641, -21.8, 0.772)
pt3dadd(24.198, 324.756, -21.8, 0.762)
pt3dadd(24.163, 324.87, -21.8, 0.754)
pt3dadd(24.121, 324.983, -21.8, 0.758)
pt3dadd(24.08, 325.096, -21.8, 0.762)
pt3dadd(24.038, 325.207, -21.8, 0.766)
pt3dadd(23.997, 325.32, -21.8, 0.772)
pt3dadd(23.955, 325.433, -21.8, 0.776)
pt3dadd(23.929, 325.549, -21.8, 0.78)
pt3dadd(23.921, 325.668, -21.8, 0.784)
pt3dadd(23.913, 325.788, -21.8, 0.788)
pt3dadd(23.905, 325.908, -21.8, 0.792)
pt3dadd(23.897, 326.028, -21.8, 0.796)
pt3dadd(23.889, 326.148, -21.8, 0.8)
pt3dadd(23.881, 326.267, -21.8, 0.804)
pt3dadd(23.84, 326.38, -21.8, 0.808)
pt3dadd(23.796, 326.491, -21.8, 0.812)
pt3dadd(23.751, 326.603, -21.8, 0.818)
pt3dadd(23.706, 326.713, -21.8, 0.822)
pt3dadd(23.662, 326.825, -21.8, 0.826)
pt3dadd(23.619, 326.938, -21.8, 0.828)
pt3dadd(23.577, 327.049, -21.8, 0.828)
pt3dadd(23.536, 327.162, -21.8, 0.828)
pt3dadd(23.494, 327.275, -21.8, 0.828)
pt3dadd(23.452, 327.388, -21.8, 0.828)
pt3dadd(23.412, 327.5, -21.8, 0.828)
pt3dadd(23.389, 327.618, -21.802, 0.834)
pt3dadd(23.367, 327.736, -21.804, 0.838)
pt3dadd(23.344, 327.853, -21.806, 0.842)
pt3dadd(23.321, 327.972, -21.808, 0.846)
pt3dadd(23.299, 328.09, -21.809, 0.85)
pt3dadd(23.272, 328.205, -21.814, 0.856)
pt3dadd(23.223, 328.313, -21.833, 0.866)
pt3dadd(23.175, 328.421, -21.852, 0.876)
pt3dadd(23.127, 328.528, -21.871, 0.888)
pt3dadd(23.079, 328.636, -21.89, 0.898)
pt3dadd(23.052, 328.748, -21.9, 0.906)
pt3dadd(23.05, 328.868, -21.9, 0.91)
pt3dadd(23.049, 328.988, -21.9, 0.914)
pt3dadd(23.047, 329.108, -21.9, 0.916)
pt3dadd(23.045, 329.228, -21.9, 0.92)
pt3dadd(23.043, 329.348, -21.9, 0.924)
pt3dadd(23.041, 329.468, -21.9, 0.928)
pt3dadd(23.033, 329.588, -21.9, 0.926)
pt3dadd(23.02, 329.707, -21.9, 0.922)
pt3dadd(23.007, 329.827, -21.9, 0.918)
pt3dadd(22.995, 329.946, -21.9, 0.916)
pt3dadd(22.982, 330.066, -21.9, 0.912)
pt3dadd(22.97, 330.185, -21.9, 0.908)
pt3dadd(22.957, 330.305, -21.9, 0.902)
pt3dadd(22.945, 330.424, -21.9, 0.894)
pt3dadd(22.932, 330.544, -21.9, 0.886)
pt3dadd(22.92, 330.662, -21.9, 0.878)
pt3dadd(22.907, 330.782, -21.9, 0.87)
pt3dadd(22.895, 330.901, -21.9, 0.864)
pt3dadd(22.882, 331.02, -21.9, 0.856)
pt3dadd(22.841, 331.133, -21.9, 0.854)
pt3dadd(22.793, 331.242, -21.9, 0.854)
pt3dadd(22.746, 331.352, -21.9, 0.854)
pt3dadd(22.698, 331.463, -21.9, 0.854)
pt3dadd(22.651, 331.573, -21.9, 0.854)
pt3dadd(22.6, 331.681, -21.9, 0.854)
pt3dadd(22.546, 331.789, -21.9, 0.854)
pt3dadd(22.492, 331.896, -21.9, 0.854)
pt3dadd(22.438, 332.003, -21.9, 0.854)
pt3dadd(22.384, 332.111, -21.9, 0.854)
pt3dadd(22.332, 332.219, -21.9, 0.852)
pt3dadd(22.281, 332.327, -21.9, 0.848)
pt3dadd(22.23, 332.436, -21.9, 0.842)
pt3dadd(22.18, 332.545, -21.9, 0.838)
pt3dadd(22.129, 332.653, -21.9, 0.834)
pt3dadd(22.08, 332.762, -21.9, 0.828)
pt3dadd(22.08, 332.882, -21.9, 0.828)
pt3dadd(22.08, 333.002, -21.9, 0.828)
pt3dadd(22.08, 333.122, -21.9, 0.83)
pt3dadd(22.08, 333.242, -21.9, 0.862)
pt3dadd(22.08, 333.362, -21.9, 0.896)
pt3dadd(22.08, 333.482, -21.9, 0.93)
pt3dadd(22.059, 333.601, -21.9, 1.008)
pt3dadd(22.039, 333.719, -21.9, 1.086)
pt3dadd(21.99, 333.822, -21.9, 1.15)
pt3dadd(21.902, 333.904, -21.9, 1.198)
pt3dadd(21.824, 333.992, -21.9, 1.23)
pt3dadd(21.77, 334.099, -21.9, 1.23)
pt3dadd(21.737, 334.214, -21.9, 1.22)
pt3dadd(21.71, 334.332, -21.9, 1.206)
pt3dadd(21.683, 334.448, -21.9, 1.194)
pt3dadd(21.655, 334.565, -21.9, 1.182)
pt3dadd(21.628, 334.682, -21.9, 1.168)
pt3dadd(21.6, 334.799, -21.9, 1.156)
pt3dadd(21.548, 334.903, -21.922, 1.15)
pt3dadd(21.496, 335.009, -21.943, 1.144)
pt3dadd(21.443, 335.113, -21.965, 1.138)
pt3dadd(21.391, 335.218, -21.987, 1.134)
pt3dadd(21.351, 335.323, -22.017, 1.126)
pt3dadd(21.328, 335.429, -22.06, 1.114)
pt3dadd(21.305, 335.534, -22.103, 1.104)
pt3dadd(21.282, 335.641, -22.146, 1.094)
pt3dadd(21.259, 335.747, -22.189, 1.082)
pt3dadd(21.237, 335.862, -22.2, 1.064)
pt3dadd(21.214, 335.98, -22.2, 1.044)
pt3dadd(21.192, 336.097, -22.2, 1.022)
pt3dadd(21.17, 336.216, -22.2, 1.002)
pt3dadd(21.148, 336.334, -22.2, 0.98)
pt3dadd(21.125, 336.451, -22.2, 0.96)
pt3dadd(21.12, 336.57, -22.209, 0.926)
pt3dadd(21.12, 336.689, -22.222, 0.888)
pt3dadd(21.117, 336.806, -22.236, 0.854)
pt3dadd(21.066, 336.907, -22.271, 0.868)
pt3dadd(21.009, 337.002, -22.308, 0.896)
pt3dadd(20.927, 337.076, -22.345, 0.982)
pt3dadd(20.837, 337.146, -22.374, 1.056)
pt3dadd(20.735, 337.206, -22.391, 1.12)
pt3dadd(20.637, 337.273, -22.4, 1.148)
pt3dadd(20.544, 337.349, -22.4, 1.13)
pt3dadd(20.469, 337.442, -22.4, 1.104)
pt3dadd(20.394, 337.537, -22.4, 1.078)
pt3dadd(20.319, 337.631, -22.4, 1.054)
pt3dadd(20.244, 337.724, -22.4, 1.028)
pt3dadd(20.172, 337.819, -22.4, 1.002)
pt3dadd(20.15, 337.937, -22.4, 0.974)
}
}
proc shape3d_138() {
dend_5[17] { pt3dadd(20.128, 338.054, -22.4, 0.944)
pt3dadd(20.105, 338.173, -22.4, 0.916)
pt3dadd(20.083, 338.291, -22.4, 0.886)
pt3dadd(20.061, 338.408, -22.4, 0.856)
pt3dadd(20.039, 338.526, -22.402, 0.828)
pt3dadd(20.013, 338.633, -22.443, 0.818)
pt3dadd(19.987, 338.738, -22.484, 0.806)
pt3dadd(19.961, 338.845, -22.525, 0.796)
pt3dadd(19.935, 338.952, -22.565, 0.784)
pt3dadd(19.897, 339.056, -22.599, 0.78)
pt3dadd(19.844, 339.161, -22.624, 0.786)
pt3dadd(19.791, 339.264, -22.649, 0.792)
pt3dadd(19.738, 339.367, -22.673, 0.798)
pt3dadd(19.685, 339.47, -22.698, 0.804)
pt3dadd(19.607, 339.56, -22.7, 0.818)
pt3dadd(19.526, 339.649, -22.7, 0.832)
pt3dadd(19.445, 339.739, -22.7, 0.848)
pt3dadd(19.365, 339.828, -22.7, 0.864)
pt3dadd(19.284, 339.917, -22.7, 0.878)
pt3dadd(19.217, 340.013, -22.722, 0.874)
pt3dadd(19.151, 340.109, -22.744, 0.868)
pt3dadd(19.084, 340.205, -22.767, 0.862)
pt3dadd(19.018, 340.301, -22.789, 0.856)
pt3dadd(18.968, 340.406, -22.8, 0.846)
pt3dadd(18.932, 340.522, -22.8, 0.834)
pt3dadd(18.896, 340.636, -22.8, 0.82)
pt3dadd(18.861, 340.751, -22.8, 0.806)
pt3dadd(18.825, 340.865, -22.8, 0.792)
pt3dadd(18.789, 340.98, -22.8, 0.78)
pt3dadd(18.731, 341.084, -22.8, 0.764)
pt3dadd(18.671, 341.189, -22.8, 0.75)
pt3dadd(18.611, 341.292, -22.8, 0.736)
pt3dadd(18.551, 341.396, -22.8, 0.72)
pt3dadd(18.491, 341.501, -22.8, 0.706)
pt3dadd(18.427, 341.602, -22.8, 0.7)
pt3dadd(18.36, 341.701, -22.8, 0.694)
pt3dadd(18.294, 341.802, -22.8, 0.69)
pt3dadd(18.228, 341.902, -22.8, 0.684)
pt3dadd(18.162, 342.002, -22.8, 0.68)
pt3dadd(18.1, 342.104, -22.8, 0.678)
pt3dadd(18.04, 342.208, -22.8, 0.678)
pt3dadd(17.987, 342.316, -22.8, 0.684)
pt3dadd(17.94, 342.426, -22.8, 0.696)
pt3dadd(17.888, 342.534, -22.8, 0.712)
pt3dadd(17.82, 342.632, -22.8, 0.748)
pt3dadd(17.748, 342.726, -22.8, 0.784)
pt3dadd(17.64, 342.78, -22.8, 0.828)
pt3dadd(17.533, 342.834, -22.8, 0.874)
pt3dadd(17.461, 342.928, -22.8, 0.904)
pt3dadd(17.395, 343.027, -22.8, 0.932)
pt3dadd(17.328, 343.128, -22.8, 0.96)
pt3dadd(17.28, 343.232, -22.8, 0.988)
pt3dadd(17.28, 343.352, -22.8, 1.022)
pt3dadd(17.28, 343.472, -22.8, 1.056)
pt3dadd(17.276, 343.592, -22.8, 1.126)
pt3dadd(17.25, 343.709, -22.8, 1.24)
pt3dadd(17.205, 343.82, -22.8, 1.262)
pt3dadd(17.161, 343.932, -22.8, 1.286)
pt3dadd(17.116, 344.044, -22.8, 1.31)
pt3dadd(17.072, 344.154, -22.8, 1.332)
pt3dadd(17.027, 344.266, -22.8, 1.356)
pt3dadd(16.988, 344.38, -22.8, 1.366)
pt3dadd(16.95, 344.494, -22.8, 1.374)
pt3dadd(16.911, 344.606, -22.8, 1.384)
pt3dadd(16.872, 344.72, -22.8, 1.392)
pt3dadd(16.833, 344.834, -22.8, 1.402)
pt3dadd(16.792, 344.946, -22.8, 1.404)
pt3dadd(16.747, 345.058, -22.8, 1.4)
pt3dadd(16.703, 345.169, -22.8, 1.394)
pt3dadd(16.658, 345.281, -22.8, 1.39)
pt3dadd(16.614, 345.392, -22.8, 1.386)
pt3dadd(16.572, 345.504, -22.8, 1.38)
pt3dadd(16.562, 345.624, -22.8, 1.376)
pt3dadd(16.552, 345.744, -22.8, 1.372)
pt3dadd(16.542, 345.863, -22.8, 1.37)
pt3dadd(16.531, 345.983, -22.8, 1.366)
pt3dadd(16.521, 346.102, -22.8, 1.362)
pt3dadd(16.511, 346.222, -22.8, 1.358)
pt3dadd(16.468, 346.331, -22.8, 1.36)
pt3dadd(16.405, 346.433, -22.8, 1.364)
pt3dadd(16.342, 346.535, -22.8, 1.368)
pt3dadd(16.279, 346.637, -22.8, 1.374)
pt3dadd(16.216, 346.739, -22.8, 1.378)
pt3dadd(16.165, 346.847, -22.8, 1.386)
pt3dadd(16.123, 346.96, -22.8, 1.396)
pt3dadd(16.081, 347.072, -22.8, 1.404)
pt3dadd(16.04, 347.184, -22.8, 1.414)
pt3dadd(15.998, 347.297, -22.8, 1.422)
pt3dadd(15.956, 347.41, -22.8, 1.434)
pt3dadd(15.912, 347.521, -22.8, 1.456)
pt3dadd(15.867, 347.632, -22.8, 1.48)
pt3dadd(15.823, 347.743, -22.8, 1.504)
pt3dadd(15.778, 347.855, -22.8, 1.526)
pt3dadd(15.733, 347.966, -22.8, 1.55)
pt3dadd(15.705, 348.083, -22.8, 1.572)
pt3dadd(15.682, 348.2, -22.8, 1.592)
pt3dadd(15.66, 348.318, -22.8, 1.614)
pt3dadd(15.638, 348.436, -22.8, 1.634)
pt3dadd(15.616, 348.554, -22.8, 1.656)
pt3dadd(15.593, 348.672, -22.8, 1.676)
pt3dadd(15.559, 348.787, -22.8, 1.692)
pt3dadd(15.521, 348.9, -22.8, 1.706)
pt3dadd(15.482, 349.014, -22.8, 1.72)
pt3dadd(15.443, 349.128, -22.8, 1.732)
pt3dadd(15.405, 349.241, -22.8, 1.746)
pt3dadd(15.361, 349.352, -22.8, 1.756)
pt3dadd(15.295, 349.452, -22.8, 1.752)
pt3dadd(15.229, 349.553, -22.8, 1.746)
pt3dadd(15.163, 349.652, -22.8, 1.742)
pt3dadd(15.097, 349.753, -22.8, 1.738)
pt3dadd(15.036, 349.855, -22.8, 1.73)
pt3dadd(15.005, 349.972, -22.8, 1.718)
pt3dadd(14.975, 350.088, -22.8, 1.704)
pt3dadd(14.945, 350.204, -22.8, 1.692)
pt3dadd(14.915, 350.32, -22.8, 1.678)
pt3dadd(14.885, 350.436, -22.8, 1.666)
pt3dadd(14.854, 350.552, -22.8, 1.62)
pt3dadd(14.808, 350.663, -22.8, 1.504)
pt3dadd(14.773, 350.777, -22.8, 1.352)
pt3dadd(14.76, 350.896, -22.8, 1.252)
pt3dadd(14.758, 351.016, -22.8, 1.238)
pt3dadd(14.734, 351.132, -22.8, 1.296)
pt3dadd(14.655, 351.214, -22.8, 1.348)
pt3dadd(14.538, 351.238, -22.8, 1.398)
pt3dadd(14.418, 351.24, -22.8, 1.512)
pt3dadd(14.298, 351.24, -22.8, 1.702)
pt3dadd(14.178, 351.24, -22.8, 1.882)
pt3dadd(14.058, 351.24, -22.8, 1.908)
pt3dadd(13.938, 351.24, -22.8, 1.76)
pt3dadd(13.819, 351.252, -22.8, 1.646)
pt3dadd(13.7, 351.268, -22.8, 1.544)
pt3dadd(13.589, 351.295, -22.8, 1.45)
pt3dadd(13.521, 351.394, -22.8, 1.402)
pt3dadd(13.453, 351.493, -22.8, 1.356)
pt3dadd(13.425, 351.61, -22.8, 1.364)
pt3dadd(13.397, 351.726, -22.8, 1.372)
pt3dadd(13.368, 351.842, -22.8, 1.378)
pt3dadd(13.35, 351.961, -22.8, 1.388)
pt3dadd(13.335, 352.08, -22.8, 1.396)
pt3dadd(13.32, 352.199, -22.8, 1.406)
pt3dadd(13.32, 352.319, -22.8, 1.306)
pt3dadd(13.3, 352.438, -22.8, 1.286)
pt3dadd(13.281, 352.556, -22.8, 1.264)
pt3dadd(13.261, 352.674, -22.8, 1.244)
pt3dadd(13.241, 352.793, -22.8, 1.224)
pt3dadd(13.221, 352.912, -22.8, 1.202)
pt3dadd(13.202, 353.029, -22.8, 1.182)
pt3dadd(13.132, 353.125, -22.8, 1.18)
pt3dadd(13.057, 353.219, -22.8, 1.18)
pt3dadd(12.982, 353.312, -22.8, 1.18)
pt3dadd(12.907, 353.406, -22.8, 1.18)
pt3dadd(12.832, 353.501, -22.8, 1.18)
pt3dadd(12.754, 353.592, -22.8, 1.19)
pt3dadd(12.677, 353.683, -22.8, 1.2)
pt3dadd(12.599, 353.774, -22.8, 1.21)
pt3dadd(12.521, 353.866, -22.8, 1.22)
pt3dadd(12.443, 353.957, -22.8, 1.23)
pt3dadd(12.341, 354.019, -22.8, 1.264)
pt3dadd(12.237, 354.08, -22.8, 1.298)
pt3dadd(12.145, 354.156, -22.8, 1.342)
pt3dadd(12.057, 354.238, -22.8, 1.39)
pt3dadd(11.987, 354.334, -22.8, 1.444)
pt3dadd(11.926, 354.437, -22.8, 1.5)
pt3dadd(11.875, 354.545, -22.8, 1.552)
pt3dadd(11.835, 354.659, -22.8, 1.594)
pt3dadd(11.797, 354.772, -22.8, 1.632)
pt3dadd(11.774, 354.889, -22.8, 1.632)
pt3dadd(11.731, 354.998, -22.8, 1.624)
pt3dadd(11.659, 355.094, -22.8, 1.604)
pt3dadd(11.587, 355.19, -22.8, 1.584)
pt3dadd(11.515, 355.286, -22.8, 1.564)
pt3dadd(11.443, 355.382, -22.8, 1.544)
pt3dadd(11.371, 355.478, -22.8, 1.52)
pt3dadd(11.299, 355.574, -22.8, 1.49)
pt3dadd(11.227, 355.67, -22.8, 1.46)
pt3dadd(11.155, 355.766, -22.8, 1.43)
pt3dadd(11.083, 355.862, -22.8, 1.4)
pt3dadd(11.032, 355.968, -22.8, 1.372)
pt3dadd(11.012, 356.086, -22.8, 1.346)
pt3dadd(10.993, 356.204, -22.8, 1.322)
pt3dadd(10.973, 356.323, -22.8, 1.296)
pt3dadd(10.953, 356.441, -22.8, 1.272)
pt3dadd(10.933, 356.56, -22.8, 1.248)
pt3dadd(10.896, 356.67, -22.8, 1.228)
pt3dadd(10.821, 356.764, -22.8, 1.218)
pt3dadd(10.746, 356.857, -22.8, 1.208)
pt3dadd(10.671, 356.951, -22.8, 1.196)
pt3dadd(10.596, 357.044, -22.8, 1.186)
pt3dadd(10.522, 357.139, -22.8, 1.18)
pt3dadd(10.45, 357.235, -22.8, 1.18)
pt3dadd(10.378, 357.331, -22.8, 1.18)
pt3dadd(10.306, 357.427, -22.8, 1.18)
pt3dadd(10.234, 357.523, -22.8, 1.18)
pt3dadd(10.167, 357.622, -22.793, 1.178)
pt3dadd(10.109, 357.724, -22.774, 1.172)
pt3dadd(10.05, 357.826, -22.754, 1.168)
pt3dadd(9.992, 357.929, -22.735, 1.162)
pt3dadd(9.934, 358.031, -22.715, 1.156)
pt3dadd(9.903, 358.145, -22.71, 1.142)
pt3dadd(9.88, 358.262, -22.708, 1.124)
}
}
proc shape3d_139() {
dend_5[17] { pt3dadd(9.858, 358.38, -22.706, 1.108)
pt3dadd(9.835, 358.499, -22.704, 1.09)
pt3dadd(9.812, 358.616, -22.702, 1.074)
pt3dadd(9.79, 358.734, -22.7, 1.056)
pt3dadd(9.734, 358.84, -22.7, 1.038)
pt3dadd(9.674, 358.943, -22.7, 1.018)
pt3dadd(9.614, 359.047, -22.7, 0.998)
pt3dadd(9.554, 359.152, -22.7, 0.978)
pt3dadd(9.494, 359.255, -22.7, 0.958)
pt3dadd(9.446, 359.365, -22.7, 0.95)
pt3dadd(9.402, 359.477, -22.7, 0.946)
pt3dadd(9.357, 359.587, -22.7, 0.942)
pt3dadd(9.312, 359.699, -22.7, 0.936)
pt3dadd(9.268, 359.81, -22.7, 0.932)
pt3dadd(9.212, 359.915, -22.7, 0.934)
pt3dadd(9.137, 360.01, -22.7, 0.95)
pt3dadd(9.062, 360.103, -22.7, 0.966)
pt3dadd(8.987, 360.197, -22.7, 0.98)
pt3dadd(8.912, 360.29, -22.7, 0.996)
pt3dadd(8.833, 360.38, -22.7, 1.016)
pt3dadd(8.746, 360.463, -22.7, 1.046)
pt3dadd(8.66, 360.547, -22.7, 1.078)
pt3dadd(8.574, 360.63, -22.7, 1.108)
pt3dadd(8.487, 360.714, -22.7, 1.138)
pt3dadd(8.409, 360.803, -22.7, 1.178)
pt3dadd(8.34, 360.901, -22.7, 1.228)
pt3dadd(8.271, 361, -22.7, 1.278)
pt3dadd(8.202, 361.098, -22.7, 1.328)
pt3dadd(8.133, 361.196, -22.7, 1.378)
pt3dadd(8.06, 361.291, -22.7, 1.432)
pt3dadd(7.982, 361.382, -22.7, 1.492)
pt3dadd(7.904, 361.474, -22.7, 1.554)
pt3dadd(7.827, 361.565, -22.7, 1.614)
pt3dadd(7.749, 361.657, -22.7, 1.674)
pt3dadd(7.679, 361.754, -22.7, 1.728)
pt3dadd(7.62, 361.858, -22.7, 1.772)
pt3dadd(7.56, 361.962, -22.7, 1.816)
pt3dadd(7.5, 362.066, -22.7, 1.86)
pt3dadd(7.441, 362.171, -22.7, 1.904)
pt3dadd(7.389, 362.278, -22.693, 1.938)
pt3dadd(7.353, 362.389, -22.673, 1.948)
pt3dadd(7.317, 362.501, -22.652, 1.958)
pt3dadd(7.282, 362.612, -22.632, 1.968)
pt3dadd(7.246, 362.725, -22.611, 1.978)
pt3dadd(7.199, 362.833, -22.6, 1.974)
pt3dadd(7.138, 362.936, -22.6, 1.95)
pt3dadd(7.086, 363.043, -22.6, 1.928)
pt3dadd(7.06, 363.161, -22.6, 1.908)
pt3dadd(7.034, 363.277, -22.6, 1.888)
pt3dadd(6.947, 363.332, -22.575, 1.864)
pt3dadd(6.839, 363.366, -22.541, 1.838)
pt3dadd(6.741, 363.418, -22.505, 1.78)
pt3dadd(6.645, 363.476, -22.469, 1.712)
pt3dadd(6.63, 363.59, -22.451, 1.672)
pt3dadd(6.621, 363.709, -22.435, 1.636)
pt3dadd(6.611, 363.827, -22.418, 1.598)
pt3dadd(6.601, 363.944, -22.402, 1.562)
pt3dadd(6.571, 364.061, -22.4, 1.53)
pt3dadd(6.538, 364.176, -22.4, 1.498)
pt3dadd(6.478, 364.273, -22.4, 1.49)
pt3dadd(6.384, 364.348, -22.4, 1.508)
pt3dadd(6.291, 364.423, -22.4, 1.524)
pt3dadd(6.194, 364.494, -22.4, 1.56)
pt3dadd(6.095, 364.562, -22.4, 1.606)
pt3dadd(6.027, 364.649, -22.388, 1.64)
pt3dadd(5.998, 364.76, -22.359, 1.658)
pt3dadd(5.969, 364.872, -22.331, 1.676)
pt3dadd(5.929, 364.963, -22.279, 1.662)
pt3dadd(5.884, 365.046, -22.217, 1.634)
pt3dadd(5.86, 365.159, -22.2, 1.556)
pt3dadd(5.8, 365.262, -22.2, 1.546)
pt3dadd(5.74, 365.366, -22.2, 1.536)
pt3dadd(5.68, 365.47, -22.2, 1.526)
pt3dadd(5.62, 365.574, -22.2, 1.516)
pt3dadd(5.56, 365.678, -22.2, 1.506)
pt3dadd(5.547, 365.797, -22.2, 1.506)
pt3dadd(5.535, 365.916, -22.2, 1.506)
pt3dadd(5.523, 366.036, -22.2, 1.506)
pt3dadd(5.51, 366.155, -22.2, 1.506)
pt3dadd(5.498, 366.275, -22.2, 1.506)
pt3dadd(5.485, 366.394, -22.2, 1.506)
pt3dadd(5.442, 366.503, -22.2, 1.498)
pt3dadd(5.379, 366.605, -22.2, 1.482)
pt3dadd(5.316, 366.707, -22.2, 1.468)
pt3dadd(5.253, 366.809, -22.2, 1.454)
pt3dadd(5.19, 366.911, -22.2, 1.438)
pt3dadd(5.141, 367.014, -22.178, 1.422)
pt3dadd(5.105, 367.116, -22.135, 1.406)
pt3dadd(5.069, 367.218, -22.092, 1.388)
pt3dadd(5.033, 367.321, -22.05, 1.372)
pt3dadd(4.997, 367.423, -22.008, 1.354)
pt3dadd(4.955, 367.53, -21.976, 1.326)
pt3dadd(4.914, 367.636, -21.944, 1.298)
pt3dadd(4.872, 367.741, -21.913, 1.27)
pt3dadd(4.831, 367.848, -21.881, 1.242)
pt3dadd(4.772, 367.946, -21.858, 1.222)
pt3dadd(4.699, 368.04, -21.844, 1.204)
pt3dadd(4.626, 368.134, -21.829, 1.188)
pt3dadd(4.552, 368.227, -21.815, 1.172)
pt3dadd(4.479, 368.321, -21.8, 1.156)
pt3dadd(4.426, 368.428, -21.8, 1.146)
pt3dadd(4.372, 368.536, -21.8, 1.136)
pt3dadd(4.319, 368.642, -21.8, 1.126)
pt3dadd(4.265, 368.75, -21.8, 1.116)
pt3dadd(4.211, 368.857, -21.8, 1.106)
pt3dadd(4.167, 368.969, -21.8, 1.116)
pt3dadd(4.126, 369.082, -21.8, 1.13)
pt3dadd(4.084, 369.193, -21.8, 1.144)
pt3dadd(4.042, 369.306, -21.8, 1.158)
pt3dadd(4.001, 369.419, -21.8, 1.172)
pt3dadd(3.942, 369.52, -21.8, 1.19)
pt3dadd(3.851, 369.598, -21.8, 1.22)
pt3dadd(3.759, 369.676, -21.8, 1.252)
pt3dadd(3.668, 369.754, -21.8, 1.282)
pt3dadd(3.577, 369.83, -21.8, 1.312)
pt3dadd(3.494, 369.917, -21.8, 1.352)
pt3dadd(3.426, 370.015, -21.8, 1.41)
pt3dadd(3.363, 370.117, -21.8, 1.462)
pt3dadd(3.317, 370.228, -21.8, 1.484)
pt3dadd(3.27, 370.338, -21.8, 1.506)
pt3dadd(3.188, 370.426, -21.795, 1.484)
pt3dadd(3.104, 370.51, -21.79, 1.46)
pt3dadd(3.052, 370.543, -21.71, 1.4)
pt3dadd(3.005, 370.571, -21.621, 1.338)
pt3dadd(3, 370.66, -21.559, 1.288)
pt3dadd(3, 370.756, -21.5, 1.238)
pt3dadd(3, 370.853, -21.441, 1.188)
pt3dadd(2.995, 370.957, -21.4, 1.146)
pt3dadd(2.981, 371.076, -21.4, 1.118)
pt3dadd(2.966, 371.195, -21.4, 1.09)
pt3dadd(2.911, 371.296, -21.4, 1.086)
pt3dadd(2.831, 371.386, -21.4, 1.094)
pt3dadd(2.751, 371.474, -21.4, 1.104)
pt3dadd(2.652, 371.542, -21.4, 1.132)
pt3dadd(2.549, 371.602, -21.4, 1.166)
pt3dadd(2.438, 371.646, -21.4, 1.218)
pt3dadd(2.368, 371.731, -21.378, 1.234)
pt3dadd(2.311, 371.832, -21.351, 1.24)
pt3dadd(2.253, 371.932, -21.323, 1.246)
pt3dadd(2.196, 372.031, -21.295, 1.252)
pt3dadd(2.13, 372.125, -21.268, 1.256)
pt3dadd(2.049, 372.209, -21.242, 1.256)
pt3dadd(1.969, 372.292, -21.216, 1.256)
pt3dadd(1.888, 372.376, -21.191, 1.256)
pt3dadd(1.809, 372.46, -21.165, 1.254)
pt3dadd(1.74, 372.551, -21.133, 1.23)
pt3dadd(1.671, 372.641, -21.102, 1.206)
pt3dadd(1.602, 372.732, -21.07, 1.184)
pt3dadd(1.533, 372.823, -21.039, 1.16)
pt3dadd(1.464, 372.919, -21.028, 1.134)
pt3dadd(1.394, 373.016, -21.021, 1.108)
pt3dadd(1.325, 373.114, -21.014, 1.082)
pt3dadd(1.255, 373.211, -21.007, 1.056)
pt3dadd(1.186, 373.309, -21, 1.028)
pt3dadd(1.146, 373.422, -21, 0.986)
pt3dadd(1.107, 373.536, -21, 0.944)
pt3dadd(1.087, 373.652, -21, 0.918)
pt3dadd(1.077, 373.772, -21, 0.9)
pt3dadd(1.068, 373.892, -21, 0.882)
pt3dadd(0.98, 373.967, -21, 0.858)
pt3dadd(0.881, 374.034, -21, 0.836)
pt3dadd(0.772, 374.082, -21, 0.814)
pt3dadd(0.659, 374.122, -21, 0.792)
pt3dadd(0.544, 374.159, -21, 0.79)
pt3dadd(0.429, 374.191, -21, 0.82)
pt3dadd(0.323, 374.246, -21, 0.84)
pt3dadd(0.221, 374.31, -21, 0.854)
pt3dadd(0.119, 374.372, -21, 0.87)
pt3dadd(0.017, 374.436, -21, 0.884)
pt3dadd(-0.085, 374.498, -21, 0.9)
pt3dadd(-0.18, 374.572, -21, 0.91)
pt3dadd(-0.272, 374.65, -21, 0.92)
pt3dadd(-0.363, 374.726, -21, 0.93)
pt3dadd(-0.454, 374.804, -21, 0.942)
pt3dadd(-0.546, 374.882, -21, 0.952)
pt3dadd(-0.646, 374.948, -21, 0.948)
pt3dadd(-0.75, 375.008, -21, 0.938)
pt3dadd(-0.854, 375.068, -21, 0.928)
pt3dadd(-0.957, 375.127, -21, 0.918)
pt3dadd(-1.062, 375.187, -21, 0.908)
pt3dadd(-1.146, 375.269, -21, 0.904)
pt3dadd(-1.215, 375.367, -21, 0.904)
pt3dadd(-1.284, 375.466, -21, 0.904)
pt3dadd(-1.353, 375.564, -21, 0.904)
pt3dadd(-1.422, 375.662, -21, 0.904)
pt3dadd(-1.496, 375.756, -21, 0.912)
pt3dadd(-1.573, 375.848, -21, 0.928)
pt3dadd(-1.651, 375.94, -21, 0.942)
pt3dadd(-1.729, 376.031, -21, 0.958)
pt3dadd(-1.807, 376.122, -21, 0.972)
pt3dadd(-1.88, 376.217, -21, 0.988)
pt3dadd(-1.949, 376.315, -21, 1.002)
pt3dadd(-2.018, 376.414, -21, 1.018)
pt3dadd(-2.087, 376.512, -21, 1.034)
pt3dadd(-2.156, 376.61, -21, 1.048)
pt3dadd(-2.236, 376.698, -21, 1.058)
pt3dadd(-2.325, 376.778, -21, 1.062)
pt3dadd(-2.413, 376.86, -21, 1.068)
pt3dadd(-2.502, 376.94, -21, 1.072)
pt3dadd(-2.591, 377.021, -21, 1.078)
}
}
proc shape3d_140() {
dend_5[17] { pt3dadd(-2.674, 377.106, -20.988, 1.074)
pt3dadd(-2.752, 377.194, -20.968, 1.062)
pt3dadd(-2.831, 377.28, -20.948, 1.05)
pt3dadd(-2.909, 377.368, -20.928, 1.038)
pt3dadd(-2.989, 377.455, -20.908, 1.022)
pt3dadd(-3.068, 377.544, -20.9, 0.966)
pt3dadd(-3.107, 377.656, -20.9, 0.902)
pt3dadd(-3.124, 377.772, -20.882, 0.796)
pt3dadd(-3.168, 377.862, -20.837, 0.662)
pt3dadd(-3.273, 377.904, -20.806, 0.614)
pt3dadd(-3.379, 377.956, -20.81, 0.628)
pt3dadd(-3.452, 377.993, -20.875, 0.58)
pt3dadd(-3.477, 378.011, -20.971, 0.552)
pt3dadd(-3.498, 378.049, -21.062, 0.612)
pt3dadd(-3.564, 378.134, -21.083, 0.66)
pt3dadd(-3.652, 378.215, -21.071, 0.674)
pt3dadd(-3.709, 378.311, -21.043, 0.668)
pt3dadd(-3.75, 378.416, -21.008, 0.656)
pt3dadd(-3.821, 378.493, -20.963, 0.644)
pt3dadd(-3.901, 378.562, -20.916, 0.634)
pt3dadd(-3.949, 378.61, -20.846, 0.624)
pt3dadd(-3.954, 378.63, -20.748, 0.614)
pt3dadd(-3.96, 378.652, -20.649, 0.604)
pt3dadd(-3.991, 378.757, -20.618, 0.602)
pt3dadd(-4.05, 378.83, -20.657, 0.64)
pt3dadd(-4.107, 378.84, -20.745, 0.762)
pt3dadd(-4.177, 378.841, -20.825, 0.936)
pt3dadd(-4.263, 378.88, -20.882, 1.012)
pt3dadd(-4.326, 378.978, -20.893, 0.958)
pt3dadd(-4.382, 379.084, -20.898, 0.898)
pt3dadd(-4.423, 379.196, -20.897, 0.844)
pt3dadd(-4.457, 379.31, -20.892, 0.79)
pt3dadd(-4.49, 379.42, -20.871, 0.744)
pt3dadd(-4.523, 379.516, -20.818, 0.714)
pt3dadd(-4.555, 379.612, -20.764, 0.682)
pt3dadd(-4.6, 379.674, -20.689, 0.704)
pt3dadd(-4.643, 379.734, -20.633, 0.73)
pt3dadd(-4.659, 379.82, -20.701, 0.74)
pt3dadd(-4.675, 379.907, -20.768, 0.75)
pt3dadd(-4.691, 380.016, -20.792, 0.766)
pt3dadd(-4.706, 380.135, -20.796, 0.786)
pt3dadd(-4.728, 380.251, -20.8, 0.8)
pt3dadd(-4.804, 380.345, -20.8, 0.778)
pt3dadd(-4.883, 380.432, -20.813, 0.726)
pt3dadd(-4.915, 380.536, -20.854, 0.688)
pt3dadd(-4.935, 380.645, -20.889, 0.65)
pt3dadd(-4.99, 380.747, -20.873, 0.566)
pt3dadd(-5.032, 380.815, -20.801, 0.562)
pt3dadd(-5.04, 380.86, -20.71, 0.578)
pt3dadd(-5.04, 380.892, -20.614, 0.53)
pt3dadd(-5.04, 380.928, -20.519, 0.466)
pt3dadd(-5.04, 380.982, -20.43, 0.412)
pt3dadd(-5.04, 381.07, -20.366, 0.394)
pt3dadd(-5.04, 381.173, -20.315, 0.382)
pt3dadd(-5.037, 381.268, -20.255, 0.376)
pt3dadd(-5.03, 381.352, -20.184, 0.376)
pt3dadd(-5.008, 381.443, -20.125, 0.382)
pt3dadd(-4.964, 381.54, -20.079, 0.392)
pt3dadd(-4.921, 381.637, -20.034, 0.402)
pt3dadd(-4.874, 381.748, -20.04, 0.416)
pt3dadd(-4.835, 381.85, -20.065, 0.432)
pt3dadd(-4.82, 381.931, -20.137, 0.452)
pt3dadd(-4.805, 382.013, -20.209, 0.47)
pt3dadd(-4.804, 382.116, -20.252, 0.478)
pt3dadd(-4.809, 382.231, -20.281, 0.478)
pt3dadd(-4.83, 382.326, -20.327, 0.474)
pt3dadd(-4.88, 382.381, -20.405, 0.464)
pt3dadd(-4.93, 382.436, -20.484, 0.452)
pt3dadd(-4.972, 382.446, -20.576, 0.42)
pt3dadd(-5.014, 382.451, -20.67, 0.388)
pt3dadd(-5.065, 382.492, -20.751, 0.334)
pt3dadd(-5.149, 382.538, -20.797, 0.266)
pt3dadd(-5.266, 382.559, -20.8, 0.23)
pt3dadd(-5.386, 382.56, -20.8, 0.226)
pt3dadd(-5.505, 382.573, -20.8, 0.25)
pt3dadd(-5.617, 382.613, -20.8, 0.294)
pt3dadd(-5.705, 382.694, -20.8, 0.368)
pt3dadd(-5.787, 382.782, -20.8, 0.404)
pt3dadd(-5.849, 382.878, -20.789, 0.448)
pt3dadd(-5.875, 382.988, -20.756, 0.51)
pt3dadd(-5.906, 383.084, -20.71, 0.564)
pt3dadd(-5.95, 383.144, -20.632, 0.606)
pt3dadd(-5.994, 383.206, -20.554, 0.648)
pt3dadd(-6, 383.303, -20.5, 0.692)
pt3dadd(-6, 383.407, -20.449, 0.738)
pt3dadd(-6, 383.519, -20.415, 0.838)
pt3dadd(-6.02, 383.633, -20.392, 0.866)
pt3dadd(-6.044, 383.748, -20.371, 0.882)
pt3dadd(-6.067, 383.863, -20.349, 0.896)
pt3dadd(-6.091, 383.977, -20.327, 0.91)
pt3dadd(-6.114, 384.092, -20.305, 0.926)
pt3dadd(-6.157, 384.2, -20.284, 0.942)
pt3dadd(-6.206, 384.307, -20.262, 0.958)
pt3dadd(-6.255, 384.414, -20.24, 0.974)
pt3dadd(-6.304, 384.52, -20.219, 0.99)
pt3dadd(-6.347, 384.628, -20.199, 1.004)
pt3dadd(-6.349, 384.748, -20.192, 1.004)
pt3dadd(-6.351, 384.868, -20.185, 1.004)
pt3dadd(-6.353, 384.988, -20.179, 1.004)
pt3dadd(-6.355, 385.106, -20.172, 1.004)
pt3dadd(-6.357, 385.226, -20.165, 1.004)
pt3dadd(-6.359, 385.346, -20.158, 1.004)
pt3dadd(-6.36, 385.463, -20.138, 1.008)
pt3dadd(-6.36, 385.578, -20.11, 1.012)
pt3dadd(-6.36, 385.694, -20.083, 1.016)
pt3dadd(-6.36, 385.81, -20.055, 1.02)
pt3dadd(-6.36, 385.925, -20.028, 1.026)
pt3dadd(-6.36, 386.04, -20, 1.03)
}
dend_5[18] {pt3dclear()
pt3dadd(-6.36, 386.04, -20, 1.03)
pt3dadd(-6.358, 386.051, -20, 1.03)
pt3dadd(-6.341, 386.17, -20, 1.03)
pt3dadd(-6.324, 386.288, -20, 1.03)
pt3dadd(-6.306, 386.407, -20, 1.03)
pt3dadd(-6.289, 386.526, -20, 1.03)
pt3dadd(-6.272, 386.645, -20, 1.03)
pt3dadd(-6.255, 386.764, -20, 1.03)
pt3dadd(-6.244, 386.882, -20, 1.036)
pt3dadd(-6.234, 387.002, -20, 1.044)
pt3dadd(-6.223, 387.122, -20, 1.052)
pt3dadd(-6.213, 387.241, -20, 1.06)
pt3dadd(-6.203, 387.361, -20, 1.068)
pt3dadd(-6.193, 387.481, -20, 1.076)
pt3dadd(-6.159, 387.593, -20, 1.082)
pt3dadd(-6.096, 387.695, -20, 1.088)
pt3dadd(-6.033, 387.797, -20, 1.092)
pt3dadd(-5.97, 387.899, -20, 1.096)
pt3dadd(-5.907, 388.001, -20, 1.102)
pt3dadd(-5.853, 388.108, -20, 1.108)
pt3dadd(-5.813, 388.22, -20, 1.12)
pt3dadd(-5.773, 388.333, -20, 1.13)
pt3dadd(-5.769, 388.453, -20, 1.138)
pt3dadd(-5.764, 388.573, -20, 1.148)
pt3dadd(-5.76, 388.693, -20, 1.158)
pt3dadd(-5.755, 388.813, -20, 1.184)
pt3dadd(-5.75, 388.933, -20, 1.21)
pt3dadd(-5.724, 389.04, -20, 1.24)
pt3dadd(-5.621, 389.101, -20, 1.286)
pt3dadd(-5.518, 389.162, -20, 1.332)
pt3dadd(-5.452, 389.263, -20, 1.346)
pt3dadd(-5.385, 389.363, -20, 1.36)
pt3dadd(-5.318, 389.462, -20, 1.372)
pt3dadd(-5.28, 389.57, -19.995, 1.37)
pt3dadd(-5.28, 389.689, -19.982, 1.342)
pt3dadd(-5.28, 389.808, -19.97, 1.314)
pt3dadd(-5.28, 389.918, -19.934, 1.132)
pt3dadd(-5.259, 390.037, -19.928, 1.1)
pt3dadd(-5.239, 390.155, -19.922, 1.07)
pt3dadd(-5.218, 390.272, -19.916, 1.038)
pt3dadd(-5.197, 390.39, -19.91, 1.008)
pt3dadd(-5.176, 390.509, -19.904, 0.978)
pt3dadd(-5.16, 390.626, -19.9, 0.95)
pt3dadd(-5.16, 390.746, -19.9, 0.932)
pt3dadd(-5.16, 390.866, -19.9, 0.914)
pt3dadd(-5.16, 390.986, -19.9, 0.896)
pt3dadd(-5.16, 391.106, -19.9, 0.878)
pt3dadd(-5.16, 391.226, -19.9, 0.86)
pt3dadd(-5.16, 391.346, -19.9, 0.842)
pt3dadd(-5.16, 391.466, -19.9, 0.828)
pt3dadd(-5.16, 391.586, -19.9, 0.82)
pt3dadd(-5.16, 391.706, -19.9, 0.812)
pt3dadd(-5.16, 391.826, -19.9, 0.806)
pt3dadd(-5.16, 391.946, -19.9, 0.798)
pt3dadd(-5.16, 392.066, -19.9, 0.792)
pt3dadd(-5.16, 392.186, -19.9, 0.784)
pt3dadd(-5.16, 392.306, -19.9, 0.776)
pt3dadd(-5.16, 392.426, -19.9, 0.766)
pt3dadd(-5.16, 392.546, -19.9, 0.754)
pt3dadd(-5.16, 392.666, -19.9, 0.744)
pt3dadd(-5.16, 392.786, -19.9, 0.732)
pt3dadd(-5.16, 392.906, -19.9, 0.722)
pt3dadd(-5.16, 393.026, -19.9, 0.712)
pt3dadd(-5.16, 393.146, -19.9, 0.7)
pt3dadd(-5.16, 393.266, -19.9, 0.69)
pt3dadd(-5.16, 393.386, -19.9, 0.68)
pt3dadd(-5.16, 393.506, -19.9, 0.668)
pt3dadd(-5.16, 393.626, -19.9, 0.658)
pt3dadd(-5.16, 393.746, -19.9, 0.646)
pt3dadd(-5.16, 393.866, -19.9, 0.636)
pt3dadd(-5.16, 393.986, -19.904, 0.626)
pt3dadd(-5.16, 394.105, -19.92, 0.618)
pt3dadd(-5.16, 394.223, -19.937, 0.61)
pt3dadd(-5.16, 394.342, -19.953, 0.602)
pt3dadd(-5.16, 394.46, -19.97, 0.594)
pt3dadd(-5.16, 394.578, -19.986, 0.584)
pt3dadd(-5.16, 394.697, -20, 0.58)
pt3dadd(-5.16, 394.817, -20, 0.59)
pt3dadd(-5.16, 394.937, -20, 0.6)
pt3dadd(-5.16, 395.057, -20, 0.612)
pt3dadd(-5.16, 395.177, -20, 0.622)
pt3dadd(-5.16, 395.297, -20, 0.634)
pt3dadd(-5.16, 395.417, -20, 0.644)
pt3dadd(-5.16, 395.537, -20, 0.656)
pt3dadd(-5.16, 395.657, -20, 0.682)
pt3dadd(-5.16, 395.777, -20, 0.706)
pt3dadd(-5.16, 395.897, -20, 0.732)
pt3dadd(-5.16, 396.017, -20, 0.756)
pt3dadd(-5.16, 396.137, -20, 0.782)
pt3dadd(-5.16, 396.257, -20, 0.808)
pt3dadd(-5.157, 396.377, -20, 0.832)
pt3dadd(-5.137, 396.496, -20, 0.862)
}
}
proc shape3d_141() {
dend_5[18] { pt3dadd(-5.118, 396.613, -20, 0.89)
pt3dadd(-5.098, 396.732, -20, 0.92)
pt3dadd(-5.078, 396.851, -20, 0.948)
pt3dadd(-5.059, 396.968, -20, 0.978)
pt3dadd(-5.037, 397.087, -20, 1.006)
pt3dadd(-4.993, 397.198, -20, 1.02)
pt3dadd(-4.948, 397.309, -20, 1.034)
pt3dadd(-4.904, 397.421, -20, 1.048)
pt3dadd(-4.859, 397.532, -20, 1.062)
pt3dadd(-4.815, 397.644, -20, 1.076)
pt3dadd(-4.787, 397.76, -20, 1.074)
pt3dadd(-4.767, 397.878, -20, 1.066)
pt3dadd(-4.747, 397.997, -20, 1.058)
pt3dadd(-4.728, 398.114, -20, 1.05)
pt3dadd(-4.708, 398.233, -20, 1.042)
pt3dadd(-4.688, 398.352, -20, 1.034)
pt3dadd(-4.677, 398.471, -20, 1.02)
pt3dadd(-4.671, 398.591, -20, 1.006)
pt3dadd(-4.665, 398.711, -20, 0.99)
pt3dadd(-4.659, 398.831, -20, 0.976)
pt3dadd(-4.653, 398.951, -20, 0.96)
pt3dadd(-4.647, 399.07, -20, 0.946)
pt3dadd(-4.641, 399.19, -20, 0.93)
pt3dadd(-4.602, 399.301, -20.017, 0.92)
pt3dadd(-4.561, 399.412, -20.035, 0.91)
pt3dadd(-4.519, 399.522, -20.054, 0.898)
pt3dadd(-4.478, 399.632, -20.072, 0.888)
pt3dadd(-4.434, 399.742, -20.089, 0.88)
pt3dadd(-4.37, 399.844, -20.091, 0.89)
pt3dadd(-4.306, 399.944, -20.094, 0.9)
pt3dadd(-4.242, 400.046, -20.096, 0.91)
pt3dadd(-4.178, 400.147, -20.098, 0.92)
pt3dadd(-4.119, 400.25, -20.1, 0.93)
pt3dadd(-4.113, 400.37, -20.1, 0.938)
pt3dadd(-4.107, 400.49, -20.1, 0.944)
pt3dadd(-4.101, 400.61, -20.1, 0.952)
pt3dadd(-4.095, 400.73, -20.1, 0.96)
pt3dadd(-4.089, 400.85, -20.1, 0.968)
pt3dadd(-4.083, 400.969, -20.1, 0.974)
pt3dadd(-4.077, 401.086, -20.115, 0.978)
pt3dadd(-4.069, 401.197, -20.152, 0.972)
pt3dadd(-4.061, 401.309, -20.188, 0.968)
pt3dadd(-4.054, 401.42, -20.225, 0.962)
pt3dadd(-4.046, 401.532, -20.262, 0.958)
pt3dadd(-4.037, 401.645, -20.289, 0.948)
pt3dadd(-4.024, 401.765, -20.291, 0.924)
pt3dadd(-4.011, 401.884, -20.293, 0.9)
pt3dadd(-3.999, 402.002, -20.295, 0.876)
pt3dadd(-3.986, 402.122, -20.296, 0.852)
pt3dadd(-3.973, 402.241, -20.298, 0.828)
pt3dadd(-3.96, 402.361, -20.3, 0.802)
pt3dadd(-3.96, 402.481, -20.3, 0.678)
pt3dadd(-3.96, 402.601, -20.3, 0.602)
pt3dadd(-3.96, 402.721, -20.3, 0.628)
pt3dadd(-3.96, 402.841, -20.3, 0.628)
pt3dadd(-3.96, 402.96, -20.314, 0.592)
pt3dadd(-3.96, 403.068, -20.352, 0.506)
pt3dadd(-3.948, 403.156, -20.419, 0.478)
pt3dadd(-3.871, 403.194, -20.485, 0.568)
pt3dadd(-3.775, 403.2, -20.543, 0.652)
pt3dadd(-3.73, 403.2, -20.634, 0.684)
pt3dadd(-3.72, 403.2, -20.734, 0.712)
pt3dadd(-3.72, 403.207, -20.833, 0.726)
pt3dadd(-3.72, 403.228, -20.932, 0.716)
pt3dadd(-3.72, 403.248, -21.03, 0.706)
pt3dadd(-3.72, 403.319, -21.106, 0.66)
pt3dadd(-3.72, 403.406, -21.174, 0.6)
pt3dadd(-3.7, 403.5, -21.233, 0.534)
pt3dadd(-3.668, 403.596, -21.287, 0.464)
pt3dadd(-3.637, 403.691, -21.342, 0.394)
pt3dadd(-3.616, 403.774, -21.412, 0.328)
pt3dadd(-3.596, 403.864, -21.473, 0.262)
pt3dadd(-3.568, 403.976, -21.497, 0.226)
pt3dadd(-3.514, 404.08, -21.515, 0.256)
pt3dadd(-3.483, 404.183, -21.558, 0.294)
pt3dadd(-3.48, 404.296, -21.589, 0.302)
pt3dadd(-3.48, 404.414, -21.582, 0.342)
pt3dadd(-3.471, 404.524, -21.545, 0.41)
pt3dadd(-3.428, 404.608, -21.487, 0.492)
pt3dadd(-3.365, 404.639, -21.407, 0.594)
pt3dadd(-3.309, 404.644, -21.319, 0.666)
pt3dadd(-3.257, 404.688, -21.239, 0.768)
pt3dadd(-3.249, 404.802, -21.221, 0.832)
pt3dadd(-3.243, 404.921, -21.209, 0.89)
pt3dadd(-3.24, 405.041, -21.199, 0.95)
pt3dadd(-3.24, 405.16, -21.195, 1.01)
pt3dadd(-3.24, 405.28, -21.191, 1.072)
pt3dadd(-3.24, 405.398, -21.177, 1.16)
pt3dadd(-3.24, 405.514, -21.149, 1.2)
pt3dadd(-3.24, 405.629, -21.122, 1.19)
pt3dadd(-3.24, 405.744, -21.094, 1.182)
pt3dadd(-3.24, 405.859, -21.067, 1.172)
pt3dadd(-3.24, 405.974, -21.039, 1.164)
pt3dadd(-3.24, 406.091, -21.012, 1.156)
pt3dadd(-3.211, 406.204, -20.989, 1.12)
pt3dadd(-3.182, 406.316, -20.967, 1.086)
pt3dadd(-3.152, 406.429, -20.944, 1.05)
pt3dadd(-3.123, 406.543, -20.922, 1.014)
pt3dadd(-3.093, 406.656, -20.9, 0.978)
pt3dadd(-3.078, 406.775, -20.9, 0.95)
pt3dadd(-3.063, 406.895, -20.9, 0.922)
pt3dadd(-3.048, 407.014, -20.9, 0.894)
pt3dadd(-3.034, 407.132, -20.9, 0.866)
pt3dadd(-3.019, 407.251, -20.9, 0.838)
pt3dadd(-3.004, 407.37, -20.9, 0.81)
pt3dadd(-3, 407.49, -20.9, 0.79)
pt3dadd(-3, 407.61, -20.9, 0.772)
pt3dadd(-3, 407.73, -20.9, 0.754)
pt3dadd(-3, 407.85, -20.9, 0.736)
pt3dadd(-3, 407.97, -20.9, 0.718)
pt3dadd(-3, 408.09, -20.9, 0.7)
pt3dadd(-3, 408.21, -20.9, 0.682)
pt3dadd(-3, 408.32, -20.934, 0.664)
pt3dadd(-3, 408.428, -20.978, 0.644)
pt3dadd(-3, 408.535, -21.023, 0.626)
pt3dadd(-3, 408.643, -21.068, 0.606)
pt3dadd(-3, 408.75, -21.112, 0.586)
pt3dadd(-2.999, 408.858, -21.156, 0.564)
pt3dadd(-2.996, 408.966, -21.199, 0.54)
pt3dadd(-2.994, 409.075, -21.242, 0.516)
pt3dadd(-2.991, 409.183, -21.285, 0.492)
pt3dadd(-2.988, 409.291, -21.328, 0.468)
pt3dadd(-2.978, 409.392, -21.38, 0.444)
pt3dadd(-2.954, 409.48, -21.445, 0.422)
pt3dadd(-2.93, 409.567, -21.51, 0.398)
pt3dadd(-2.905, 409.655, -21.576, 0.376)
pt3dadd(-2.881, 409.742, -21.641, 0.354)
pt3dadd(-2.88, 409.789, -21.731, 0.302)
pt3dadd(-2.88, 409.805, -21.83, 0.292)
pt3dadd(-2.872, 409.829, -21.927, 0.262)
pt3dadd(-2.834, 409.903, -21.99, 0.258)
pt3dadd(-2.776, 410.008, -22, 0.346)
pt3dadd(-2.718, 410.111, -21.988, 0.456)
pt3dadd(-2.649, 410.19, -21.941, 0.584)
pt3dadd(-2.583, 410.276, -21.901, 0.664)
pt3dadd(-2.533, 410.376, -21.866, 0.678)
pt3dadd(-2.518, 410.484, -21.833, 0.674)
pt3dadd(-2.512, 410.604, -21.833, 0.662)
pt3dadd(-2.5, 410.72, -21.838, 0.648)
pt3dadd(-2.45, 410.821, -21.874, 0.608)
pt3dadd(-2.409, 410.926, -21.896, 0.534)
pt3dadd(-2.386, 411.043, -21.891, 0.438)
pt3dadd(-2.357, 411.158, -21.897, 0.408)
pt3dadd(-2.328, 411.275, -21.902, 0.376)
pt3dadd(-2.299, 411.391, -21.908, 0.346)
pt3dadd(-2.271, 411.503, -21.929, 0.32)
pt3dadd(-2.244, 411.604, -21.978, 0.304)
pt3dadd(-2.217, 411.704, -22.027, 0.288)
pt3dadd(-2.191, 411.805, -22.077, 0.27)
pt3dadd(-2.164, 411.906, -22.126, 0.254)
pt3dadd(-2.124, 412.009, -22.163, 0.24)
pt3dadd(-2.082, 412.114, -22.198, 0.226)
pt3dadd(-2.065, 412.232, -22.204, 0.226)
pt3dadd(-2.05, 412.351, -22.208, 0.226)
pt3dadd(-2.04, 412.457, -22.238, 0.226)
pt3dadd(-2.04, 412.537, -22.311, 0.226)
pt3dadd(-2.039, 412.608, -22.39, 0.226)
pt3dadd(-2.033, 412.643, -22.485, 0.226)
pt3dadd(-2.027, 412.678, -22.581, 0.226)
pt3dadd(-1.997, 412.777, -22.623, 0.226)
pt3dadd(-1.964, 412.884, -22.661, 0.226)
pt3dadd(-1.931, 412.991, -22.698, 0.226)
pt3dadd(-1.92, 413.101, -22.733, 0.226)
pt3dadd(-1.92, 413.214, -22.766, 0.226)
pt3dadd(-1.92, 413.329, -22.793, 0.226)
pt3dadd(-1.92, 413.449, -22.8, 0.226)
pt3dadd(-1.92, 413.569, -22.8, 0.226)
pt3dadd(-1.92, 413.689, -22.8, 0.226)
pt3dadd(-1.92, 413.809, -22.8, 0.226)
pt3dadd(-1.92, 413.929, -22.8, 0.226)
pt3dadd(-1.92, 414.049, -22.8, 0.226)
pt3dadd(-1.92, 414.169, -22.8, 0.226)
pt3dadd(-1.92, 414.289, -22.8, 0.226)
pt3dadd(-1.92, 414.409, -22.8, 0.226)
pt3dadd(-1.92, 414.529, -22.8, 0.226)
pt3dadd(-1.92, 414.649, -22.8, 0.226)
pt3dadd(-1.92, 414.769, -22.8, 0.226)
pt3dadd(-1.92, 414.889, -22.8, 0.226)
pt3dadd(-1.92, 415.002, -22.821, 0.226)
pt3dadd(-1.92, 415.105, -22.871, 0.226)
pt3dadd(-1.919, 415.2, -22.929, 0.226)
pt3dadd(-1.912, 415.264, -23.014, 0.226)
pt3dadd(-1.904, 415.333, -23.089, 0.226)
pt3dadd(-1.878, 415.451, -23.092, 0.226)
pt3dadd(-1.852, 415.567, -23.095, 0.226)
pt3dadd(-1.826, 415.685, -23.097, 0.226)
pt3dadd(-1.8, 415.802, -23.1, 0.226)
pt3dadd(-1.8, 415.922, -23.1, 0.226)
pt3dadd(-1.8, 416.042, -23.1, 0.226)
pt3dadd(-1.8, 416.162, -23.1, 0.226)
pt3dadd(-1.8, 416.282, -23.1, 0.226)
pt3dadd(-1.8, 416.402, -23.1, 0.226)
pt3dadd(-1.8, 416.522, -23.1, 0.226)
pt3dadd(-1.8, 416.642, -23.1, 0.226)
pt3dadd(-1.8, 416.762, -23.1, 0.226)
pt3dadd(-1.8, 416.882, -23.1, 0.226)
pt3dadd(-1.8, 417.002, -23.1, 0.226)
pt3dadd(-1.8, 417.122, -23.1, 0.226)
pt3dadd(-1.8, 417.242, -23.1, 0.226)
pt3dadd(-1.8, 417.362, -23.1, 0.226)
}
}
proc shape3d_142() {
dend_5[18] { pt3dadd(-1.8, 417.482, -23.1, 0.226)
pt3dadd(-1.815, 417.601, -23.1, 0.226)
pt3dadd(-1.83, 417.72, -23.1, 0.226)
pt3dadd(-1.859, 417.834, -23.1, 0.226)
pt3dadd(-1.92, 417.937, -23.1, 0.226)
pt3dadd(-1.988, 418.033, -23.1, 0.226)
pt3dadd(-2.098, 418.079, -23.1, 0.226)
pt3dadd(-2.209, 418.126, -23.1, 0.226)
pt3dadd(-2.245, 418.232, -23.1, 0.226)
pt3dadd(-2.267, 418.35, -23.1, 0.226)
pt3dadd(-2.288, 418.468, -23.1, 0.226)
pt3dadd(-2.31, 418.586, -23.1, 0.226)
pt3dadd(-2.34, 418.7, -23.108, 0.232)
pt3dadd(-2.378, 418.813, -23.124, 0.244)
pt3dadd(-2.4, 418.924, -23.152, 0.292)
pt3dadd(-2.427, 419.034, -23.174, 0.368)
pt3dadd(-2.466, 419.147, -23.185, 0.43)
pt3dadd(-2.508, 419.251, -23.162, 0.496)
pt3dadd(-2.55, 419.352, -23.12, 0.562)
pt3dadd(-2.591, 419.436, -23.059, 0.602)
pt3dadd(-2.621, 419.516, -22.993, 0.626)
pt3dadd(-2.568, 419.599, -22.937, 0.612)
pt3dadd(-2.532, 419.695, -22.901, 0.594)
pt3dadd(-2.527, 419.815, -22.905, 0.566)
pt3dadd(-2.522, 419.935, -22.909, 0.538)
pt3dadd(-2.52, 420.048, -22.937, 0.49)
pt3dadd(-2.52, 420.108, -23.019, 0.48)
pt3dadd(-2.52, 420.12, -23.118, 0.506)
pt3dadd(-2.52, 420.12, -23.218, 0.518)
pt3dadd(-2.52, 420.12, -23.318, 0.464)
pt3dadd(-2.52, 420.126, -23.418, 0.394)
pt3dadd(-2.52, 420.16, -23.514, 0.352)
pt3dadd(-2.52, 420.192, -23.61, 0.312)
pt3dadd(-2.505, 420.246, -23.697, 0.282)
pt3dadd(-2.485, 420.307, -23.782, 0.256)
pt3dadd(-2.406, 420.354, -23.838, 0.24)
pt3dadd(-2.31, 420.398, -23.887, 0.226)
pt3dadd(-2.239, 420.492, -23.894, 0.226)
pt3dadd(-2.168, 420.589, -23.899, 0.226)
pt3dadd(-2.134, 420.703, -23.9, 0.226)
pt3dadd(-2.105, 420.82, -23.9, 0.226)
pt3dadd(-2.076, 420.936, -23.9, 0.226)
pt3dadd(-2.047, 421.052, -23.9, 0.226)
pt3dadd(-2.04, 421.172, -23.9, 0.226)
pt3dadd(-2.04, 421.292, -23.9, 0.226)
pt3dadd(-2.04, 421.412, -23.9, 0.226)
pt3dadd(-2.04, 421.532, -23.9, 0.246)
pt3dadd(-2.04, 421.649, -23.879, 0.266)
pt3dadd(-2.04, 421.764, -23.851, 0.288)
pt3dadd(-2.04, 421.878, -23.822, 0.316)
pt3dadd(-2.04, 421.992, -23.789, 0.358)
pt3dadd(-2.04, 422.105, -23.756, 0.4)
pt3dadd(-2.04, 422.146, -23.663, 0.454)
pt3dadd(-2.04, 422.185, -23.569, 0.508)
pt3dadd(-2.053, 422.252, -23.49, 0.576)
pt3dadd(-2.074, 422.336, -23.42, 0.656)
pt3dadd(-2.096, 422.441, -23.38, 0.704)
pt3dadd(-2.118, 422.554, -23.352, 0.738)
pt3dadd(-2.141, 422.666, -23.323, 0.774)
pt3dadd(-2.16, 422.78, -23.3, 0.81)
pt3dadd(-2.16, 422.9, -23.3, 0.842)
pt3dadd(-2.16, 423.02, -23.3, 0.876)
pt3dadd(-2.16, 423.14, -23.3, 0.916)
pt3dadd(-2.166, 423.259, -23.3, 0.98)
pt3dadd(-2.202, 423.373, -23.3, 0.99)
pt3dadd(-2.238, 423.488, -23.3, 0.998)
pt3dadd(-2.274, 423.602, -23.3, 1.008)
pt3dadd(-2.31, 423.718, -23.3, 1.016)
pt3dadd(-2.345, 423.832, -23.3, 1.026)
pt3dadd(-2.37, 423.948, -23.292, 1.03)
pt3dadd(-2.387, 424.066, -23.278, 1.03)
pt3dadd(-2.4, 424.183, -23.261, 1.024)
pt3dadd(-2.4, 424.298, -23.234, 0.992)
pt3dadd(-2.4, 424.414, -23.206, 0.962)
pt3dadd(-2.4, 424.532, -23.203, 0.928)
pt3dadd(-2.4, 424.652, -23.207, 0.892)
pt3dadd(-2.4, 424.772, -23.211, 0.858)
pt3dadd(-2.394, 424.861, -23.273, 0.8)
pt3dadd(-2.388, 424.946, -23.344, 0.738)
pt3dadd(-2.331, 425.034, -23.387, 0.658)
pt3dadd(-2.287, 425.137, -23.418, 0.614)
pt3dadd(-2.256, 425.249, -23.445, 0.594)
pt3dadd(-2.226, 425.359, -23.473, 0.572)
pt3dadd(-2.196, 425.471, -23.501, 0.552)
pt3dadd(-2.165, 425.582, -23.529, 0.53)
pt3dadd(-2.126, 425.694, -23.543, 0.518)
pt3dadd(-2.085, 425.806, -23.554, 0.508)
pt3dadd(-2.043, 425.917, -23.566, 0.498)
pt3dadd(-2.002, 426.03, -23.577, 0.488)
pt3dadd(-1.961, 426.142, -23.588, 0.478)
pt3dadd(-1.887, 426.22, -23.546, 0.478)
pt3dadd(-1.813, 426.3, -23.509, 0.48)
pt3dadd(-1.747, 426.4, -23.498, 0.492)
pt3dadd(-1.692, 426.494, -23.475, 0.504)
pt3dadd(-1.686, 426.572, -23.399, 0.516)
pt3dadd(-1.686, 426.649, -23.323, 0.526)
pt3dadd(-1.731, 426.715, -23.249, 0.512)
pt3dadd(-1.763, 426.767, -23.166, 0.5)
pt3dadd(-1.769, 426.787, -23.068, 0.494)
pt3dadd(-1.776, 426.808, -22.97, 0.488)
pt3dadd(-1.783, 426.828, -22.871, 0.48)
pt3dadd(-1.771, 426.84, -22.774, 0.474)
pt3dadd(-1.732, 426.84, -22.68, 0.462)
pt3dadd(-1.693, 426.84, -22.585, 0.452)
pt3dadd(-1.68, 426.84, -22.486, 0.424)
pt3dadd(-1.68, 426.84, -22.386, 0.398)
pt3dadd(-1.68, 426.84, -22.286, 0.384)
pt3dadd(-1.68, 426.84, -22.186, 0.438)
pt3dadd(-1.68, 426.84, -22.086, 0.516)
pt3dadd(-1.68, 426.842, -21.986, 0.61)
pt3dadd(-1.676, 426.863, -21.888, 0.67)
pt3dadd(-1.644, 426.928, -21.815, 0.77)
pt3dadd(-1.565, 427.014, -21.8, 0.956)
pt3dadd(-1.49, 427.108, -21.8, 1.112)
pt3dadd(-1.452, 427.22, -21.8, 1.182)
pt3dadd(-1.44, 427.339, -21.8, 1.198)
pt3dadd(-1.44, 427.459, -21.8, 1.154)
pt3dadd(-1.44, 427.579, -21.8, 1.142)
pt3dadd(-1.44, 427.699, -21.8, 1.132)
pt3dadd(-1.44, 427.819, -21.8, 1.122)
pt3dadd(-1.44, 427.939, -21.8, 1.11)
pt3dadd(-1.44, 428.059, -21.8, 1.1)
pt3dadd(-1.44, 428.179, -21.8, 1.088)
pt3dadd(-1.436, 428.299, -21.8, 1.078)
pt3dadd(-1.408, 428.416, -21.8, 1.06)
pt3dadd(-1.381, 428.532, -21.8, 1.042)
pt3dadd(-1.353, 428.65, -21.8, 1.026)
pt3dadd(-1.326, 428.766, -21.8, 1.008)
pt3dadd(-1.299, 428.882, -21.8, 0.99)
pt3dadd(-1.268, 428.999, -21.8, 0.976)
pt3dadd(-1.232, 429.114, -21.8, 0.968)
pt3dadd(-1.197, 429.228, -21.8, 0.958)
pt3dadd(-1.161, 429.342, -21.8, 0.95)
pt3dadd(-1.125, 429.457, -21.8, 0.94)
pt3dadd(-1.089, 429.571, -21.8, 0.932)
pt3dadd(-1.078, 429.689, -21.813, 0.93)
pt3dadd(-1.076, 429.808, -21.829, 0.93)
pt3dadd(-1.074, 429.925, -21.846, 0.93)
pt3dadd(-1.072, 430.044, -21.863, 0.93)
pt3dadd(-1.07, 430.162, -21.879, 0.93)
pt3dadd(-1.067, 430.28, -21.896, 0.93)
pt3dadd(-1.051, 430.399, -21.9, 0.936)
pt3dadd(-1.032, 430.517, -21.9, 0.944)
pt3dadd(-1.012, 430.636, -21.9, 0.952)
pt3dadd(-0.992, 430.753, -21.9, 0.96)
pt3dadd(-0.973, 430.872, -21.9, 0.968)
pt3dadd(-0.953, 430.991, -21.9, 0.976)
pt3dadd(-0.899, 431.095, -21.9, 0.982)
pt3dadd(-0.83, 431.194, -21.9, 0.988)
pt3dadd(-0.761, 431.291, -21.9, 0.992)
pt3dadd(-0.692, 431.389, -21.9, 0.998)
pt3dadd(-0.623, 431.488, -21.9, 1.002)
pt3dadd(-0.553, 431.585, -21.905, 0.994)
pt3dadd(-0.484, 431.682, -21.912, 0.978)
pt3dadd(-0.414, 431.78, -21.918, 0.962)
pt3dadd(-0.345, 431.878, -21.926, 0.946)
pt3dadd(-0.275, 431.975, -21.932, 0.932)
pt3dadd(-0.224, 432.08, -21.952, 0.9)
pt3dadd(-0.175, 432.186, -21.974, 0.868)
pt3dadd(-0.126, 432.293, -21.995, 0.836)
pt3dadd(-0.077, 432.4, -22.017, 0.802)
pt3dadd(-0.033, 432.506, -22.042, 0.772)
pt3dadd(-0.004, 432.614, -22.078, 0.744)
pt3dadd(0.024, 432.724, -22.113, 0.718)
pt3dadd(0.053, 432.832, -22.149, 0.692)
pt3dadd(0.081, 432.94, -22.185, 0.664)
pt3dadd(0.123, 433.049, -22.2, 0.648)
pt3dadd(0.173, 433.158, -22.2, 0.638)
pt3dadd(0.224, 433.266, -22.2, 0.628)
pt3dadd(0.274, 433.375, -22.2, 0.62)
pt3dadd(0.325, 433.484, -22.2, 0.61)
pt3dadd(0.36, 433.596, -22.2, 0.6)
pt3dadd(0.36, 433.716, -22.2, 0.592)
pt3dadd(0.36, 433.836, -22.2, 0.584)
pt3dadd(0.36, 433.956, -22.2, 0.576)
pt3dadd(0.36, 434.076, -22.2, 0.566)
pt3dadd(0.36, 434.196, -22.2, 0.558)
pt3dadd(0.366, 434.316, -22.2, 0.556)
pt3dadd(0.387, 434.434, -22.2, 0.564)
pt3dadd(0.407, 434.552, -22.2, 0.574)
pt3dadd(0.491, 434.62, -22.2, 0.608)
pt3dadd(0.602, 434.665, -22.2, 0.652)
pt3dadd(0.685, 434.738, -22.2, 0.718)
pt3dadd(0.727, 434.851, -22.2, 0.814)
pt3dadd(0.75, 434.969, -22.2, 0.854)
pt3dadd(0.77, 435.086, -22.2, 0.882)
pt3dadd(0.79, 435.205, -22.2, 0.912)
pt3dadd(0.809, 435.324, -22.2, 0.94)
pt3dadd(0.829, 435.442, -22.2, 0.97)
pt3dadd(0.849, 435.56, -22.2, 0.998)
pt3dadd(0.879, 435.677, -22.2, 1.032)
pt3dadd(0.912, 435.792, -22.2, 1.068)
pt3dadd(0.945, 435.907, -22.2, 1.102)
pt3dadd(0.978, 436.022, -22.2, 1.138)
pt3dadd(1.011, 436.138, -22.2, 1.174)
pt3dadd(1.041, 436.254, -22.2, 1.208)
pt3dadd(1.049, 436.373, -22.2, 1.236)
pt3dadd(1.057, 436.493, -22.2, 1.262)
pt3dadd(1.065, 436.613, -22.2, 1.288)
pt3dadd(1.073, 436.733, -22.2, 1.316)
}
}
proc shape3d_143() {
dend_5[18] { pt3dadd(1.081, 436.852, -22.2, 1.342)
pt3dadd(1.089, 436.972, -22.2, 1.368)
pt3dadd(1.116, 437.088, -22.2, 1.388)
pt3dadd(1.157, 437.201, -22.2, 1.402)
pt3dadd(1.199, 437.312, -22.2, 1.416)
pt3dadd(1.241, 437.425, -22.2, 1.43)
pt3dadd(1.282, 437.538, -22.2, 1.444)
pt3dadd(1.32, 437.651, -22.2, 1.454)
pt3dadd(1.32, 437.771, -22.2, 1.438)
pt3dadd(1.32, 437.891, -22.2, 1.422)
pt3dadd(1.32, 438.011, -22.2, 1.404)
pt3dadd(1.32, 438.131, -22.204, 1.368)
pt3dadd(1.32, 438.251, -22.208, 1.334)
pt3dadd(1.32, 438.364, -22.226, 1.298)
pt3dadd(1.32, 438.445, -22.299, 1.264)
pt3dadd(1.322, 438.523, -22.374, 1.23)
pt3dadd(1.341, 438.569, -22.465, 1.218)
pt3dadd(1.36, 438.614, -22.556, 1.206)
pt3dadd(1.39, 438.708, -22.613, 1.214)
pt3dadd(1.42, 438.803, -22.67, 1.222)
pt3dadd(1.45, 438.896, -22.727, 1.23)
pt3dadd(1.498, 438.996, -22.765, 1.23)
pt3dadd(1.548, 439.097, -22.8, 1.23)
pt3dadd(1.582, 439.211, -22.8, 1.222)
pt3dadd(1.622, 439.325, -22.8, 1.178)
pt3dadd(1.661, 439.438, -22.8, 1.136)
pt3dadd(1.701, 439.55, -22.8, 1.074)
pt3dadd(1.741, 439.664, -22.8, 1.01)
pt3dadd(1.777, 439.778, -22.8, 0.938)
pt3dadd(1.81, 439.894, -22.8, 0.854)
pt3dadd(1.843, 440.006, -22.795, 0.772)
pt3dadd(1.888, 440.089, -22.733, 0.702)
pt3dadd(1.927, 440.162, -22.663, 0.65)
pt3dadd(1.952, 440.215, -22.575, 0.642)
pt3dadd(1.976, 440.267, -22.488, 0.636)
pt3dadd(2, 440.32, -22.4, 0.628)
pt3dadd(2.015, 440.438, -22.4, 0.638)
pt3dadd(2.03, 440.558, -22.4, 0.646)
pt3dadd(2.04, 440.677, -22.4, 0.66)
pt3dadd(2.04, 440.797, -22.4, 0.676)
pt3dadd(2.04, 440.917, -22.4, 0.674)
pt3dadd(2.04, 441.037, -22.4, 0.67)
pt3dadd(2.04, 441.157, -22.4, 0.666)
pt3dadd(2.04, 441.277, -22.4, 0.662)
pt3dadd(2.04, 441.397, -22.4, 0.66)
pt3dadd(2.04, 441.517, -22.4, 0.656)
pt3dadd(2.033, 441.632, -22.413, 0.652)
pt3dadd(2.01, 441.739, -22.456, 0.646)
pt3dadd(1.987, 441.845, -22.499, 0.64)
pt3dadd(1.964, 441.95, -22.542, 0.636)
pt3dadd(1.941, 442.056, -22.585, 0.63)
pt3dadd(1.932, 442.17, -22.611, 0.626)
pt3dadd(1.93, 442.289, -22.628, 0.62)
pt3dadd(1.927, 442.408, -22.644, 0.616)
pt3dadd(1.925, 442.525, -22.661, 0.612)
pt3dadd(1.923, 442.644, -22.678, 0.608)
pt3dadd(1.921, 442.762, -22.695, 0.604)
pt3dadd(1.9, 442.879, -22.7, 0.606)
pt3dadd(1.869, 442.994, -22.7, 0.61)
pt3dadd(1.839, 443.111, -22.7, 0.614)
pt3dadd(1.809, 443.227, -22.7, 0.618)
pt3dadd(1.779, 443.344, -22.7, 0.624)
pt3dadd(1.749, 443.46, -22.7, 0.628)
pt3dadd(1.674, 443.552, -22.7, 0.642)
pt3dadd(1.596, 443.644, -22.7, 0.658)
pt3dadd(1.518, 443.735, -22.7, 0.672)
pt3dadd(1.44, 443.826, -22.7, 0.688)
pt3dadd(1.362, 443.917, -22.7, 0.702)
pt3dadd(1.322, 444.03, -22.7, 0.716)
pt3dadd(1.284, 444.144, -22.7, 0.73)
pt3dadd(1.245, 444.257, -22.7, 0.744)
pt3dadd(1.207, 444.371, -22.7, 0.758)
pt3dadd(1.168, 444.485, -22.7, 0.77)
pt3dadd(1.111, 444.587, -22.7, 0.782)
pt3dadd(1.03, 444.676, -22.7, 0.794)
pt3dadd(0.949, 444.764, -22.7, 0.804)
pt3dadd(0.868, 444.853, -22.7, 0.814)
pt3dadd(0.787, 444.942, -22.7, 0.824)
pt3dadd(0.721, 445.04, -22.7, 0.822)
pt3dadd(0.671, 445.15, -22.7, 0.808)
pt3dadd(0.62, 445.258, -22.7, 0.794)
pt3dadd(0.57, 445.367, -22.7, 0.778)
pt3dadd(0.519, 445.476, -22.7, 0.764)
pt3dadd(0.48, 445.586, -22.704, 0.75)
pt3dadd(0.48, 445.705, -22.72, 0.738)
pt3dadd(0.48, 445.823, -22.737, 0.726)
pt3dadd(0.48, 445.942, -22.753, 0.714)
pt3dadd(0.48, 446.06, -22.769, 0.702)
pt3dadd(0.48, 446.178, -22.786, 0.688)
pt3dadd(0.48, 446.297, -22.8, 0.678)
pt3dadd(0.48, 446.417, -22.8, 0.67)
pt3dadd(0.48, 446.537, -22.8, 0.662)
pt3dadd(0.48, 446.657, -22.8, 0.656)
pt3dadd(0.48, 446.777, -22.8, 0.648)
pt3dadd(0.48, 446.897, -22.8, 0.642)
pt3dadd(0.48, 447.017, -22.8, 0.634)
pt3dadd(0.48, 447.137, -22.802, 0.63)
pt3dadd(0.478, 447.256, -22.812, 0.646)
pt3dadd(0.475, 447.376, -22.823, 0.662)
pt3dadd(0.473, 447.494, -22.833, 0.678)
pt3dadd(0.471, 447.614, -22.844, 0.694)
pt3dadd(0.469, 447.733, -22.855, 0.71)
pt3dadd(0.467, 447.853, -22.865, 0.726)
pt3dadd(0.448, 447.966, -22.892, 0.75)
pt3dadd(0.426, 448.079, -22.921, 0.776)
pt3dadd(0.405, 448.192, -22.951, 0.802)
pt3dadd(0.383, 448.304, -22.98, 0.826)
pt3dadd(0.362, 448.417, -23.009, 0.852)
pt3dadd(0.36, 448.522, -23.057, 0.868)
pt3dadd(0.36, 448.626, -23.107, 0.882)
pt3dadd(0.36, 448.73, -23.157, 0.896)
pt3dadd(0.36, 448.834, -23.207, 0.912)
pt3dadd(0.36, 448.938, -23.256, 0.926)
pt3dadd(0.36, 449.054, -23.277, 0.906)
pt3dadd(0.36, 449.173, -23.289, 0.878)
pt3dadd(0.36, 449.292, -23.3, 0.848)
pt3dadd(0.36, 449.412, -23.3, 0.798)
pt3dadd(0.36, 449.532, -23.3, 0.748)
pt3dadd(0.36, 449.652, -23.298, 0.698)
pt3dadd(0.36, 449.771, -23.281, 0.64)
pt3dadd(0.36, 449.888, -23.264, 0.582)
pt3dadd(0.36, 449.982, -23.214, 0.534)
pt3dadd(0.36, 450.049, -23.132, 0.5)
pt3dadd(0.359, 450.134, -23.071, 0.476)
pt3dadd(0.356, 450.252, -23.053, 0.468)
pt3dadd(0.353, 450.371, -23.034, 0.464)
pt3dadd(0.349, 450.488, -23.016, 0.456)
pt3dadd(0.338, 450.6, -23.009, 0.454)
pt3dadd(0.285, 450.684, -23.066, 0.468)
pt3dadd(0.246, 450.748, -23.138, 0.534)
pt3dadd(0.24, 450.84, -23.182, 0.598)
pt3dadd(0.24, 450.958, -23.205, 0.628)
pt3dadd(0.24, 451.074, -23.228, 0.658)
pt3dadd(0.24, 451.19, -23.251, 0.69)
pt3dadd(0.24, 451.308, -23.274, 0.72)
pt3dadd(0.24, 451.424, -23.297, 0.75)
pt3dadd(0.24, 451.544, -23.3, 0.774)
pt3dadd(0.24, 451.664, -23.3, 0.8)
pt3dadd(0.24, 451.784, -23.3, 0.826)
pt3dadd(0.24, 451.904, -23.3, 0.85)
pt3dadd(0.24, 452.024, -23.3, 0.876)
pt3dadd(0.24, 452.144, -23.3, 0.9)
pt3dadd(0.24, 452.264, -23.3, 0.926)
pt3dadd(0.24, 452.384, -23.3, 0.932)
pt3dadd(0.24, 452.504, -23.3, 0.936)
pt3dadd(0.24, 452.624, -23.3, 0.94)
pt3dadd(0.24, 452.744, -23.3, 0.942)
pt3dadd(0.24, 452.864, -23.3, 0.946)
pt3dadd(0.24, 452.984, -23.3, 0.95)
pt3dadd(0.24, 453.104, -23.3, 0.954)
pt3dadd(0.253, 453.223, -23.304, 0.912)
pt3dadd(0.269, 453.342, -23.308, 0.864)
pt3dadd(0.292, 453.444, -23.334, 0.794)
pt3dadd(0.336, 453.502, -23.413, 0.67)
pt3dadd(0.36, 453.578, -23.482, 0.576)
pt3dadd(0.36, 453.678, -23.538, 0.518)
pt3dadd(0.36, 453.758, -23.607, 0.474)
pt3dadd(0.36, 453.798, -23.701, 0.464)
pt3dadd(0.36, 453.838, -23.795, 0.452)
pt3dadd(0.384, 453.924, -23.861, 0.474)
pt3dadd(0.41, 454.014, -23.924, 0.498)
pt3dadd(0.435, 454.103, -23.988, 0.522)
pt3dadd(0.454, 454.213, -24.016, 0.536)
pt3dadd(0.472, 454.33, -24.035, 0.546)
pt3dadd(0.48, 454.426, -24.084, 0.534)
pt3dadd(0.48, 454.484, -24.171, 0.448)
pt3dadd(0.48, 454.566, -24.244, 0.378)
pt3dadd(0.48, 454.673, -24.284, 0.332)
pt3dadd(0.48, 454.792, -24.299, 0.28)
pt3dadd(0.48, 454.912, -24.3, 0.252)
pt3dadd(0.48, 455.032, -24.3, 0.228)
pt3dadd(0.494, 455.15, -24.299, 0.226)
pt3dadd(0.542, 455.249, -24.271, 0.226)
pt3dadd(0.587, 455.28, -24.186, 0.226)
pt3dadd(0.6, 455.305, -24.09, 0.266)
pt3dadd(0.6, 455.386, -24.023, 0.334)
pt3dadd(0.6, 455.502, -24.011, 0.376)
pt3dadd(0.6, 455.603, -24.061, 0.384)
pt3dadd(0.59, 455.67, -24.143, 0.422)
pt3dadd(0.545, 455.759, -24.193, 0.442)
pt3dadd(0.498, 455.866, -24.209, 0.406)
pt3dadd(0.462, 455.974, -24.24, 0.396)
pt3dadd(0.426, 456.082, -24.273, 0.39)
pt3dadd(0.39, 456.19, -24.306, 0.382)
pt3dadd(0.357, 456.299, -24.333, 0.378)
pt3dadd(0.338, 456.416, -24.333, 0.382)
pt3dadd(0.318, 456.535, -24.333, 0.386)
pt3dadd(0.299, 456.654, -24.333, 0.392)
pt3dadd(0.28, 456.773, -24.333, 0.396)
pt3dadd(0.26, 456.89, -24.333, 0.4)
pt3dadd(0.221, 456.997, -24.356, 0.41)
pt3dadd(0.171, 457.098, -24.392, 0.424)
pt3dadd(0.127, 457.201, -24.373, 0.448)
pt3dadd(0.086, 457.306, -24.338, 0.474)
pt3dadd(0.003, 457.378, -24.301, 0.49)
pt3dadd(-0.082, 457.445, -24.262, 0.504)
pt3dadd(-0.102, 457.522, -24.187, 0.53)
pt3dadd(-0.12, 457.594, -24.109, 0.554)
pt3dadd(-0.12, 457.648, -24.02, 0.572)
pt3dadd(-0.12, 457.673, -23.924, 0.584)
}
}
proc shape3d_144() {
dend_5[18] { pt3dadd(-0.12, 457.682, -23.824, 0.592)
pt3dadd(-0.12, 457.692, -23.725, 0.602)
pt3dadd(-0.125, 457.781, -23.665, 0.602)
pt3dadd(-0.132, 457.883, -23.612, 0.602)
pt3dadd(-0.164, 457.993, -23.6, 0.602)
pt3dadd(-0.203, 458.106, -23.6, 0.602)
pt3dadd(-0.243, 458.22, -23.6, 0.608)
pt3dadd(-0.283, 458.333, -23.6, 0.618)
pt3dadd(-0.322, 458.447, -23.6, 0.63)
pt3dadd(-0.345, 458.564, -23.6, 0.674)
pt3dadd(-0.36, 458.683, -23.6, 0.706)
pt3dadd(-0.36, 458.803, -23.6, 0.712)
pt3dadd(-0.36, 458.923, -23.6, 0.72)
pt3dadd(-0.36, 459.043, -23.6, 0.728)
pt3dadd(-0.36, 459.163, -23.6, 0.734)
pt3dadd(-0.36, 459.283, -23.6, 0.742)
pt3dadd(-0.36, 459.403, -23.6, 0.748)
pt3dadd(-0.36, 459.522, -23.606, 0.758)
pt3dadd(-0.36, 459.641, -23.622, 0.77)
pt3dadd(-0.36, 459.758, -23.639, 0.782)
pt3dadd(-0.36, 459.877, -23.655, 0.794)
pt3dadd(-0.36, 459.996, -23.672, 0.808)
pt3dadd(-0.36, 460.114, -23.688, 0.82)
pt3dadd(-0.36, 460.232, -23.7, 0.828)
pt3dadd(-0.36, 460.352, -23.7, 0.824)
pt3dadd(-0.36, 460.472, -23.7, 0.82)
pt3dadd(-0.36, 460.592, -23.7, 0.816)
pt3dadd(-0.36, 460.712, -23.7, 0.814)
pt3dadd(-0.36, 460.832, -23.7, 0.81)
pt3dadd(-0.36, 460.952, -23.7, 0.806)
pt3dadd(-0.36, 461.072, -23.7, 0.806)
pt3dadd(-0.36, 461.192, -23.7, 0.818)
pt3dadd(-0.36, 461.312, -23.7, 0.828)
pt3dadd(-0.36, 461.432, -23.7, 0.838)
pt3dadd(-0.36, 461.552, -23.7, 0.85)
pt3dadd(-0.36, 461.672, -23.7, 0.86)
pt3dadd(-0.36, 461.792, -23.7, 0.872)
pt3dadd(-0.364, 461.912, -23.705, 0.878)
pt3dadd(-0.379, 462.029, -23.723, 0.874)
pt3dadd(-0.393, 462.146, -23.742, 0.868)
pt3dadd(-0.408, 462.263, -23.76, 0.864)
pt3dadd(-0.423, 462.38, -23.778, 0.86)
pt3dadd(-0.438, 462.497, -23.796, 0.854)
pt3dadd(-0.445, 462.617, -23.8, 0.856)
pt3dadd(-0.451, 462.737, -23.8, 0.86)
pt3dadd(-0.457, 462.856, -23.8, 0.864)
pt3dadd(-0.463, 462.976, -23.8, 0.868)
pt3dadd(-0.469, 463.096, -23.8, 0.872)
pt3dadd(-0.475, 463.216, -23.8, 0.876)
pt3dadd(-0.48, 463.336, -23.8, 0.878)
pt3dadd(-0.48, 463.456, -23.8, 0.862)
pt3dadd(-0.48, 463.576, -23.8, 0.848)
pt3dadd(-0.48, 463.696, -23.8, 0.834)
pt3dadd(-0.48, 463.816, -23.8, 0.82)
pt3dadd(-0.48, 463.936, -23.8, 0.806)
pt3dadd(-0.48, 464.056, -23.8, 0.79)
pt3dadd(-0.476, 464.176, -23.8, 0.778)
pt3dadd(-0.449, 464.292, -23.8, 0.768)
pt3dadd(-0.422, 464.408, -23.8, 0.76)
pt3dadd(-0.394, 464.526, -23.8, 0.752)
pt3dadd(-0.367, 464.642, -23.8, 0.742)
pt3dadd(-0.339, 464.759, -23.8, 0.734)
pt3dadd(-0.309, 464.875, -23.8, 0.726)
pt3dadd(-0.273, 464.99, -23.8, 0.716)
pt3dadd(-0.238, 465.104, -23.8, 0.708)
pt3dadd(-0.202, 465.218, -23.8, 0.698)
pt3dadd(-0.166, 465.334, -23.8, 0.69)
pt3dadd(-0.13, 465.448, -23.8, 0.68)
pt3dadd(-0.086, 465.559, -23.8, 0.682)
pt3dadd(-0.038, 465.67, -23.8, 0.686)
pt3dadd(0.009, 465.78, -23.8, 0.69)
pt3dadd(0.057, 465.89, -23.8, 0.696)
pt3dadd(0.104, 466, -23.8, 0.7)
pt3dadd(0.14, 466.114, -23.8, 0.704)
pt3dadd(0.157, 466.232, -23.8, 0.708)
pt3dadd(0.175, 466.351, -23.8, 0.712)
pt3dadd(0.192, 466.47, -23.8, 0.716)
pt3dadd(0.209, 466.589, -23.8, 0.72)
pt3dadd(0.227, 466.708, -23.8, 0.726)
pt3dadd(0.248, 466.825, -23.8, 0.73)
pt3dadd(0.284, 466.939, -23.8, 0.734)
pt3dadd(0.32, 467.054, -23.8, 0.738)
pt3dadd(0.356, 467.168, -23.8, 0.742)
pt3dadd(0.391, 467.284, -23.8, 0.748)
pt3dadd(0.427, 467.398, -23.8, 0.752)
pt3dadd(0.458, 467.514, -23.8, 0.75)
pt3dadd(0.485, 467.63, -23.8, 0.746)
pt3dadd(0.513, 467.748, -23.8, 0.742)
pt3dadd(0.54, 467.864, -23.8, 0.738)
pt3dadd(0.567, 467.981, -23.8, 0.734)
pt3dadd(0.595, 468.098, -23.8, 0.73)
pt3dadd(0.612, 468.216, -23.8, 0.718)
pt3dadd(0.627, 468.336, -23.8, 0.706)
pt3dadd(0.642, 468.455, -23.8, 0.694)
pt3dadd(0.657, 468.574, -23.8, 0.682)
pt3dadd(0.672, 468.692, -23.8, 0.67)
pt3dadd(0.687, 468.812, -23.8, 0.658)
pt3dadd(0.707, 468.93, -23.801, 0.642)
pt3dadd(0.732, 469.048, -23.803, 0.62)
pt3dadd(0.758, 469.164, -23.805, 0.598)
pt3dadd(0.783, 469.282, -23.807, 0.576)
pt3dadd(0.808, 469.399, -23.809, 0.554)
pt3dadd(0.834, 469.517, -23.811, 0.532)
pt3dadd(0.84, 469.631, -23.837, 0.51)
pt3dadd(0.84, 469.742, -23.872, 0.488)
pt3dadd(0.84, 469.855, -23.906, 0.464)
pt3dadd(0.84, 469.968, -23.941, 0.442)
pt3dadd(0.84, 470.081, -23.976, 0.418)
pt3dadd(0.84, 470.195, -24, 0.396)
pt3dadd(0.84, 470.315, -24, 0.38)
pt3dadd(0.84, 470.435, -24, 0.364)
pt3dadd(0.84, 470.555, -24.005, 0.354)
pt3dadd(0.84, 470.672, -24.022, 0.364)
pt3dadd(0.84, 470.791, -24.039, 0.374)
pt3dadd(0.84, 470.869, -24.104, 0.392)
pt3dadd(0.84, 470.93, -24.191, 0.416)
pt3dadd(0.837, 470.977, -24.282, 0.438)
pt3dadd(0.831, 471.012, -24.377, 0.46)
pt3dadd(0.817, 471.054, -24.467, 0.482)
pt3dadd(0.764, 471.13, -24.53, 0.51)
pt3dadd(0.723, 471.222, -24.575, 0.584)
pt3dadd(0.72, 471.338, -24.559, 0.658)
pt3dadd(0.712, 471.448, -24.52, 0.678)
pt3dadd(0.673, 471.557, -24.515, 0.674)
pt3dadd(0.626, 471.656, -24.55, 0.64)
pt3dadd(0.601, 471.767, -24.583, 0.616)
pt3dadd(0.562, 471.865, -24.626, 0.576)
pt3dadd(0.509, 471.948, -24.683, 0.52)
pt3dadd(0.478, 472.018, -24.757, 0.4)
pt3dadd(0.426, 472.118, -24.79, 0.378)
pt3dadd(0.374, 472.219, -24.823, 0.354)
pt3dadd(0.322, 472.32, -24.856, 0.332)
pt3dadd(0.27, 472.421, -24.889, 0.308)
pt3dadd(0.229, 472.517, -24.937, 0.282)
pt3dadd(0.193, 472.61, -24.991, 0.256)
pt3dadd(0.105, 472.684, -25, 0.242)
pt3dadd(0.006, 472.751, -25, 0.23)
pt3dadd(-0.054, 472.849, -24.997, 0.234)
pt3dadd(-0.096, 472.961, -24.992, 0.244)
pt3dadd(-0.138, 473.066, -24.969, 0.262)
pt3dadd(-0.183, 473.161, -24.92, 0.29)
pt3dadd(-0.219, 473.231, -24.848, 0.336)
pt3dadd(-0.243, 473.296, -24.769, 0.38)
pt3dadd(-0.251, 473.388, -24.706, 0.39)
pt3dadd(-0.259, 473.48, -24.643, 0.402)
pt3dadd(-0.268, 473.574, -24.58, 0.412)
pt3dadd(-0.276, 473.666, -24.517, 0.422)
pt3dadd(-0.319, 473.746, -24.457, 0.452)
pt3dadd(-0.354, 473.794, -24.371, 0.504)
pt3dadd(-0.374, 473.882, -24.311, 0.578)
pt3dadd(-0.419, 473.992, -24.305, 0.554)
pt3dadd(-0.45, 474.092, -24.343, 0.47)
pt3dadd(-0.396, 474.167, -24.404, 0.484)
pt3dadd(-0.373, 474.259, -24.462, 0.572)
pt3dadd(-0.419, 474.359, -24.5, 0.554)
pt3dadd(-0.467, 474.458, -24.535, 0.502)
pt3dadd(-0.473, 474.574, -24.563, 0.502)
pt3dadd(-0.478, 474.689, -24.592, 0.502)
pt3dadd(-0.493, 474.802, -24.577, 0.52)
pt3dadd(-0.512, 474.914, -24.546, 0.542)
pt3dadd(-0.539, 475.008, -24.493, 0.558)
pt3dadd(-0.572, 475.09, -24.425, 0.568)
pt3dadd(-0.601, 475.171, -24.356, 0.582)
pt3dadd(-0.607, 475.249, -24.28, 0.606)
pt3dadd(-0.616, 475.33, -24.21, 0.628)
pt3dadd(-0.655, 475.44, -24.187, 0.628)
pt3dadd(-0.697, 475.543, -24.152, 0.628)
pt3dadd(-0.72, 475.65, -24.112, 0.618)
pt3dadd(-0.72, 475.757, -24.068, 0.596)
pt3dadd(-0.716, 475.866, -24.03, 0.572)
pt3dadd(-0.7, 475.984, -24.016, 0.552)
pt3dadd(-0.683, 476.102, -24.002, 0.53)
pt3dadd(-0.617, 476.2, -24, 0.488)
pt3dadd(-0.542, 476.292, -24, 0.44)
pt3dadd(-0.497, 476.401, -24, 0.382)
pt3dadd(-0.464, 476.515, -24.004, 0.324)
pt3dadd(-0.431, 476.617, -24.049, 0.308)
pt3dadd(-0.398, 476.719, -24.094, 0.292)
pt3dadd(-0.365, 476.821, -24.139, 0.274)
pt3dadd(-0.332, 476.923, -24.184, 0.258)
pt3dadd(-0.293, 477.032, -24.2, 0.248)
pt3dadd(-0.25, 477.144, -24.2, 0.242)
pt3dadd(-0.206, 477.256, -24.2, 0.236)
pt3dadd(-0.163, 477.368, -24.2, 0.232)
pt3dadd(-0.12, 477.48, -24.2, 0.226)
}
dend_5[19] {pt3dclear()
pt3dadd(-6.36, 386.04, -20, 1.03)
pt3dadd(-6.426, 386.064, -19.97, 1.024)
pt3dadd(-6.526, 386.1, -19.924, 1.014)
pt3dadd(-6.627, 386.137, -19.879, 1.004)
pt3dadd(-6.727, 386.173, -19.833, 0.994)
pt3dadd(-6.827, 386.21, -19.788, 0.986)
pt3dadd(-6.928, 386.246, -19.742, 0.976)
pt3dadd(-7.028, 386.282, -19.696, 0.966)
pt3dadd(-7.128, 386.32, -19.651, 0.956)
pt3dadd(-7.229, 386.356, -19.605, 0.946)
pt3dadd(-7.329, 386.393, -19.559, 0.938)
pt3dadd(-7.429, 386.429, -19.514, 0.928)
pt3dadd(-7.53, 386.465, -19.468, 0.918)
pt3dadd(-7.63, 386.502, -19.423, 0.908)
pt3dadd(-7.724, 386.558, -19.412, 0.898)
}
}
proc shape3d_145() {
dend_5[19] { pt3dadd(-7.813, 386.635, -19.434, 0.886)
pt3dadd(-7.901, 386.711, -19.457, 0.876)
pt3dadd(-7.99, 386.788, -19.48, 0.864)
pt3dadd(-8.075, 386.867, -19.5, 0.854)
pt3dadd(-8.141, 386.968, -19.5, 0.854)
pt3dadd(-8.207, 387.067, -19.5, 0.854)
pt3dadd(-8.273, 387.168, -19.5, 0.854)
pt3dadd(-8.339, 387.268, -19.5, 0.854)
pt3dadd(-8.406, 387.367, -19.5, 0.854)
pt3dadd(-8.475, 387.466, -19.5, 0.864)
pt3dadd(-8.544, 387.564, -19.5, 0.874)
pt3dadd(-8.613, 387.662, -19.5, 0.884)
pt3dadd(-8.682, 387.761, -19.5, 0.894)
pt3dadd(-8.751, 387.858, -19.5, 0.904)
pt3dadd(-8.838, 387.942, -19.5, 0.914)
pt3dadd(-8.924, 388.025, -19.5, 0.924)
pt3dadd(-9.01, 388.109, -19.5, 0.934)
pt3dadd(-9.096, 388.193, -19.5, 0.946)
pt3dadd(-9.184, 388.273, -19.5, 0.954)
pt3dadd(-9.287, 388.334, -19.5, 0.942)
pt3dadd(-9.391, 388.396, -19.5, 0.93)
pt3dadd(-9.485, 388.469, -19.5, 0.918)
pt3dadd(-9.579, 388.543, -19.5, 0.906)
pt3dadd(-9.669, 388.624, -19.5, 0.914)
pt3dadd(-9.757, 388.705, -19.5, 0.926)
pt3dadd(-9.801, 388.811, -19.5, 0.974)
pt3dadd(-9.821, 388.928, -19.5, 1.042)
pt3dadd(-9.843, 389.046, -19.501, 1.108)
pt3dadd(-9.89, 389.154, -19.521, 1.152)
pt3dadd(-9.938, 389.261, -19.541, 1.198)
pt3dadd(-9.986, 389.369, -19.561, 1.242)
pt3dadd(-10.083, 389.412, -19.577, 1.27)
pt3dadd(-10.201, 389.429, -19.59, 1.292)
pt3dadd(-10.299, 389.473, -19.6, 1.29)
pt3dadd(-10.358, 389.578, -19.6, 1.238)
pt3dadd(-10.417, 389.682, -19.6, 1.186)
pt3dadd(-10.485, 389.78, -19.6, 1.114)
pt3dadd(-10.567, 389.868, -19.6, 1.008)
pt3dadd(-10.641, 389.962, -19.6, 0.858)
pt3dadd(-10.69, 390.07, -19.59, 0.714)
pt3dadd(-10.735, 390.179, -19.572, 0.688)
pt3dadd(-10.78, 390.288, -19.553, 0.662)
pt3dadd(-10.824, 390.396, -19.534, 0.636)
pt3dadd(-10.869, 390.505, -19.516, 0.61)
pt3dadd(-10.922, 390.612, -19.507, 0.594)
pt3dadd(-10.978, 390.718, -19.502, 0.582)
pt3dadd(-11.05, 390.814, -19.5, 0.584)
pt3dadd(-11.131, 390.901, -19.5, 0.596)
pt3dadd(-11.221, 390.979, -19.5, 0.62)
pt3dadd(-11.32, 391.048, -19.5, 0.654)
pt3dadd(-11.388, 391.133, -19.5, 0.686)
pt3dadd(-11.393, 391.253, -19.5, 0.712)
pt3dadd(-11.397, 391.373, -19.5, 0.738)
pt3dadd(-11.4, 391.493, -19.5, 0.758)
pt3dadd(-11.4, 391.613, -19.5, 0.772)
pt3dadd(-11.419, 391.728, -19.5, 0.782)
pt3dadd(-11.464, 391.84, -19.5, 0.792)
pt3dadd(-11.509, 391.951, -19.5, 0.802)
pt3dadd(-11.553, 392.063, -19.5, 0.81)
pt3dadd(-11.598, 392.174, -19.5, 0.82)
pt3dadd(-11.642, 392.286, -19.5, 0.828)
pt3dadd(-11.686, 392.398, -19.493, 0.834)
pt3dadd(-11.73, 392.508, -19.487, 0.838)
pt3dadd(-11.774, 392.62, -19.48, 0.844)
pt3dadd(-11.818, 392.731, -19.474, 0.848)
pt3dadd(-11.862, 392.843, -19.467, 0.854)
pt3dadd(-11.941, 392.93, -19.453, 0.868)
pt3dadd(-12.024, 393.016, -19.439, 0.886)
pt3dadd(-12.106, 393.101, -19.424, 0.902)
pt3dadd(-12.188, 393.186, -19.409, 0.918)
pt3dadd(-12.27, 393.274, -19.4, 0.928)
pt3dadd(-12.351, 393.362, -19.4, 0.922)
pt3dadd(-12.431, 393.451, -19.4, 0.918)
pt3dadd(-12.512, 393.54, -19.4, 0.912)
pt3dadd(-12.593, 393.629, -19.4, 0.906)
pt3dadd(-12.689, 393.689, -19.4, 0.908)
pt3dadd(-12.807, 393.709, -19.4, 0.918)
pt3dadd(-12.926, 393.73, -19.4, 0.928)
pt3dadd(-13.002, 393.815, -19.4, 0.948)
pt3dadd(-13.07, 393.913, -19.4, 0.972)
pt3dadd(-13.124, 394.02, -19.4, 1.03)
pt3dadd(-13.171, 394.13, -19.4, 1.106)
pt3dadd(-13.217, 394.241, -19.4, 1.172)
pt3dadd(-13.264, 394.352, -19.4, 1.216)
pt3dadd(-13.309, 394.463, -19.4, 1.256)
pt3dadd(-13.342, 394.578, -19.4, 1.256)
pt3dadd(-13.375, 394.693, -19.4, 1.236)
pt3dadd(-13.408, 394.81, -19.4, 1.196)
pt3dadd(-13.441, 394.925, -19.4, 1.154)
pt3dadd(-13.461, 395.042, -19.4, 1.126)
pt3dadd(-13.481, 395.161, -19.4, 1.096)
pt3dadd(-13.543, 395.244, -19.4, 1.076)
pt3dadd(-13.656, 395.284, -19.4, 1.064)
pt3dadd(-13.768, 395.326, -19.4, 1.054)
pt3dadd(-13.861, 395.401, -19.4, 1.042)
pt3dadd(-13.955, 395.477, -19.4, 1.03)
pt3dadd(-14.015, 395.58, -19.4, 1.01)
pt3dadd(-14.073, 395.684, -19.4, 0.99)
pt3dadd(-14.131, 395.79, -19.4, 0.97)
pt3dadd(-14.195, 395.891, -19.4, 0.942)
pt3dadd(-14.277, 395.978, -19.4, 0.894)
pt3dadd(-14.355, 396.068, -19.4, 0.834)
pt3dadd(-14.395, 396.18, -19.4, 0.748)
pt3dadd(-14.414, 396.299, -19.4, 0.736)
pt3dadd(-14.434, 396.418, -19.4, 0.724)
pt3dadd(-14.454, 396.535, -19.4, 0.712)
pt3dadd(-14.474, 396.654, -19.4, 0.698)
pt3dadd(-14.493, 396.773, -19.4, 0.686)
pt3dadd(-14.517, 396.889, -19.4, 0.678)
pt3dadd(-14.55, 397.006, -19.4, 0.678)
pt3dadd(-14.583, 397.121, -19.4, 0.678)
pt3dadd(-14.616, 397.236, -19.4, 0.678)
pt3dadd(-14.649, 397.351, -19.4, 0.678)
pt3dadd(-14.681, 397.466, -19.4, 0.678)
pt3dadd(-14.717, 397.58, -19.391, 0.69)
pt3dadd(-14.754, 397.693, -19.378, 0.71)
pt3dadd(-14.791, 397.807, -19.365, 0.73)
pt3dadd(-14.828, 397.92, -19.352, 0.75)
pt3dadd(-14.865, 398.033, -19.339, 0.77)
pt3dadd(-14.894, 398.149, -19.33, 0.8)
pt3dadd(-14.917, 398.266, -19.324, 0.834)
pt3dadd(-14.941, 398.383, -19.318, 0.87)
pt3dadd(-14.964, 398.501, -19.312, 0.906)
pt3dadd(-14.988, 398.618, -19.306, 0.94)
pt3dadd(-15.011, 398.736, -19.301, 0.976)
pt3dadd(-15.073, 398.838, -19.3, 0.992)
pt3dadd(-15.139, 398.938, -19.3, 1.008)
pt3dadd(-15.205, 399.038, -19.3, 1.022)
pt3dadd(-15.271, 399.138, -19.3, 1.038)
pt3dadd(-15.337, 399.239, -19.3, 1.052)
pt3dadd(-15.382, 399.349, -19.3, 1.038)
pt3dadd(-15.424, 399.462, -19.3, 1.02)
pt3dadd(-15.466, 399.575, -19.3, 1.002)
pt3dadd(-15.507, 399.688, -19.3, 0.984)
pt3dadd(-15.549, 399.799, -19.3, 0.966)
pt3dadd(-15.594, 399.911, -19.3, 0.936)
pt3dadd(-15.645, 400.02, -19.3, 0.894)
pt3dadd(-15.695, 400.128, -19.3, 0.85)
pt3dadd(-15.746, 400.237, -19.3, 0.808)
pt3dadd(-15.796, 400.346, -19.3, 0.766)
pt3dadd(-15.843, 400.456, -19.3, 0.726)
pt3dadd(-15.862, 400.574, -19.3, 0.71)
pt3dadd(-15.882, 400.693, -19.3, 0.692)
pt3dadd(-15.902, 400.811, -19.3, 0.676)
pt3dadd(-15.922, 400.93, -19.3, 0.66)
pt3dadd(-15.941, 401.048, -19.3, 0.644)
pt3dadd(-15.962, 401.166, -19.3, 0.628)
pt3dadd(-16.007, 401.278, -19.3, 0.642)
pt3dadd(-16.051, 401.389, -19.3, 0.656)
pt3dadd(-16.096, 401.5, -19.3, 0.67)
pt3dadd(-16.141, 401.611, -19.3, 0.684)
pt3dadd(-16.185, 401.723, -19.3, 0.698)
pt3dadd(-16.23, 401.834, -19.3, 0.718)
pt3dadd(-16.274, 401.946, -19.3, 0.742)
pt3dadd(-16.319, 402.058, -19.3, 0.766)
pt3dadd(-16.363, 402.169, -19.3, 0.788)
pt3dadd(-16.408, 402.28, -19.3, 0.812)
pt3dadd(-16.44, 402.394, -19.297, 0.832)
pt3dadd(-16.44, 402.514, -19.287, 0.838)
pt3dadd(-16.44, 402.632, -19.276, 0.846)
pt3dadd(-16.44, 402.751, -19.266, 0.854)
pt3dadd(-16.44, 402.871, -19.255, 0.862)
pt3dadd(-16.44, 402.99, -19.245, 0.87)
pt3dadd(-16.44, 403.11, -19.234, 0.878)
pt3dadd(-16.445, 403.229, -19.222, 0.862)
pt3dadd(-16.45, 403.348, -19.209, 0.842)
pt3dadd(-16.476, 403.46, -19.2, 0.836)
pt3dadd(-16.544, 403.559, -19.2, 0.86)
pt3dadd(-16.621, 403.643, -19.2, 0.892)
pt3dadd(-16.74, 403.657, -19.2, 0.966)
pt3dadd(-16.859, 403.673, -19.2, 1.042)
pt3dadd(-16.972, 403.706, -19.2, 1.146)
pt3dadd(-17.079, 403.759, -19.2, 1.28)
pt3dadd(-17.17, 403.828, -19.2, 1.39)
pt3dadd(-17.211, 403.94, -19.2, 1.43)
pt3dadd(-17.252, 404.053, -19.2, 1.468)
pt3dadd(-17.293, 404.166, -19.2, 1.506)
pt3dadd(-17.348, 404.27, -19.2, 1.52)
pt3dadd(-17.43, 404.358, -19.2, 1.484)
pt3dadd(-17.505, 404.45, -19.197, 1.434)
pt3dadd(-17.559, 404.557, -19.185, 1.334)
pt3dadd(-17.612, 404.664, -19.173, 1.234)
pt3dadd(-17.643, 404.754, -19.129, 1.112)
pt3dadd(-17.649, 404.824, -19.049, 0.966)
pt3dadd(-17.689, 404.891, -18.983, 0.842)
pt3dadd(-17.779, 404.953, -18.941, 0.746)
pt3dadd(-17.868, 405.016, -18.9, 0.652)
pt3dadd(-17.907, 405.128, -18.9, 0.61)
pt3dadd(-17.947, 405.242, -18.9, 0.566)
pt3dadd(-17.985, 405.355, -18.89, 0.552)
pt3dadd(-18.052, 405.438, -18.845, 0.558)
pt3dadd(-18.12, 405.52, -18.799, 0.564)
pt3dadd(-18.189, 405.601, -18.752, 0.57)
pt3dadd(-18.257, 405.683, -18.706, 0.576)
pt3dadd(-18.324, 405.776, -18.681, 0.592)
pt3dadd(-18.39, 405.872, -18.658, 0.61)
pt3dadd(-18.456, 405.97, -18.635, 0.626)
pt3dadd(-18.523, 406.066, -18.613, 0.644)
pt3dadd(-18.581, 406.168, -18.6, 0.656)
pt3dadd(-18.629, 406.278, -18.6, 0.666)
}
}
proc shape3d_146() {
dend_5[19] { pt3dadd(-18.676, 406.388, -18.6, 0.676)
pt3dadd(-18.724, 406.498, -18.6, 0.686)
pt3dadd(-18.771, 406.608, -18.6, 0.694)
pt3dadd(-18.821, 406.717, -18.598, 0.704)
pt3dadd(-18.887, 406.816, -18.584, 0.716)
pt3dadd(-18.954, 406.914, -18.569, 0.726)
pt3dadd(-19.02, 407.012, -18.555, 0.736)
pt3dadd(-19.086, 407.111, -18.541, 0.748)
pt3dadd(-19.15, 407.212, -18.53, 0.75)
pt3dadd(-19.21, 407.315, -18.523, 0.746)
pt3dadd(-19.27, 407.419, -18.516, 0.74)
pt3dadd(-19.33, 407.522, -18.51, 0.736)
pt3dadd(-19.39, 407.626, -18.503, 0.73)
pt3dadd(-19.45, 407.73, -18.5, 0.726)
pt3dadd(-19.51, 407.834, -18.5, 0.72)
pt3dadd(-19.569, 407.938, -18.5, 0.716)
pt3dadd(-19.629, 408.042, -18.5, 0.71)
pt3dadd(-19.689, 408.146, -18.5, 0.706)
pt3dadd(-19.76, 408.24, -18.492, 0.696)
pt3dadd(-19.844, 408.324, -18.474, 0.684)
pt3dadd(-19.923, 408.407, -18.446, 0.686)
pt3dadd(-19.998, 408.488, -18.408, 0.7)
pt3dadd(-20.067, 408.584, -18.4, 0.712)
pt3dadd(-20.135, 408.683, -18.4, 0.724)
pt3dadd(-20.191, 408.788, -18.403, 0.742)
pt3dadd(-20.239, 408.898, -18.408, 0.766)
pt3dadd(-20.271, 409.006, -18.432, 0.778)
pt3dadd(-20.28, 409.11, -18.48, 0.778)
pt3dadd(-20.28, 409.198, -18.549, 0.778)
pt3dadd(-20.28, 409.286, -18.616, 0.778)
pt3dadd(-20.34, 409.379, -18.651, 0.746)
pt3dadd(-20.42, 409.456, -18.649, 0.722)
pt3dadd(-20.515, 409.514, -18.612, 0.708)
pt3dadd(-20.605, 409.588, -18.6, 0.696)
pt3dadd(-20.693, 409.669, -18.6, 0.684)
pt3dadd(-20.78, 409.752, -18.6, 0.678)
pt3dadd(-20.867, 409.834, -18.597, 0.678)
pt3dadd(-20.972, 409.885, -18.575, 0.678)
pt3dadd(-21.077, 409.938, -18.554, 0.678)
pt3dadd(-21.181, 409.991, -18.532, 0.678)
pt3dadd(-21.286, 410.042, -18.51, 0.678)
pt3dadd(-21.386, 410.106, -18.501, 0.678)
pt3dadd(-21.481, 410.179, -18.503, 0.678)
pt3dadd(-21.576, 410.254, -18.506, 0.678)
pt3dadd(-21.671, 410.327, -18.508, 0.678)
pt3dadd(-21.766, 410.4, -18.51, 0.678)
pt3dadd(-21.857, 410.465, -18.539, 0.688)
pt3dadd(-21.947, 410.525, -18.583, 0.702)
pt3dadd(-22.047, 410.587, -18.593, 0.724)
pt3dadd(-22.149, 410.651, -18.599, 0.748)
pt3dadd(-22.256, 410.7, -18.588, 0.772)
pt3dadd(-22.366, 410.746, -18.572, 0.796)
pt3dadd(-22.464, 410.76, -18.524, 0.812)
pt3dadd(-22.558, 410.76, -18.461, 0.824)
pt3dadd(-22.663, 410.76, -18.418, 0.812)
pt3dadd(-22.779, 410.76, -18.391, 0.78)
pt3dadd(-22.89, 410.776, -18.355, 0.768)
pt3dadd(-23.001, 410.791, -18.319, 0.758)
pt3dadd(-23.111, 410.808, -18.283, 0.748)
pt3dadd(-23.222, 410.824, -18.247, 0.738)
pt3dadd(-23.333, 410.84, -18.211, 0.728)
pt3dadd(-23.439, 410.857, -18.167, 0.712)
pt3dadd(-23.545, 410.874, -18.123, 0.696)
pt3dadd(-23.652, 410.89, -18.078, 0.68)
pt3dadd(-23.758, 410.906, -18.034, 0.666)
pt3dadd(-23.865, 410.93, -18, 0.652)
pt3dadd(-23.976, 410.978, -18, 0.652)
pt3dadd(-24.086, 411.025, -18, 0.652)
pt3dadd(-24.196, 411.073, -18, 0.652)
pt3dadd(-24.306, 411.12, -18, 0.652)
pt3dadd(-24.416, 411.168, -18, 0.652)
pt3dadd(-24.479, 411.259, -18.033, 0.652)
pt3dadd(-24.542, 411.348, -18.068, 0.654)
pt3dadd(-24.66, 411.359, -18.081, 0.664)
pt3dadd(-24.779, 411.368, -18.095, 0.674)
pt3dadd(-24.876, 411.404, -18.134, 0.678)
pt3dadd(-24.96, 411.458, -18.191, 0.678)
pt3dadd(-25.044, 411.472, -18.259, 0.678)
pt3dadd(-25.129, 411.479, -18.329, 0.678)
pt3dadd(-25.205, 411.534, -18.387, 0.672)
pt3dadd(-25.279, 411.604, -18.441, 0.662)
pt3dadd(-25.352, 411.673, -18.495, 0.654)
pt3dadd(-25.463, 411.709, -18.5, 0.634)
pt3dadd(-25.579, 411.743, -18.5, 0.614)
pt3dadd(-25.69, 411.785, -18.5, 0.572)
pt3dadd(-25.795, 411.845, -18.5, 0.552)
pt3dadd(-25.898, 411.905, -18.5, 0.552)
pt3dadd(-25.996, 411.971, -18.487, 0.566)
pt3dadd(-26.088, 412.043, -18.464, 0.594)
pt3dadd(-26.166, 412.087, -18.405, 0.622)
pt3dadd(-26.235, 412.117, -18.328, 0.65)
pt3dadd(-26.261, 412.204, -18.38, 0.666)
pt3dadd(-26.284, 412.29, -18.446, 0.678)
pt3dadd(-26.312, 412.354, -18.528, 0.678)
pt3dadd(-26.359, 412.416, -18.593, 0.678)
pt3dadd(-26.461, 412.476, -18.59, 0.678)
pt3dadd(-26.522, 412.535, -18.524, 0.678)
pt3dadd(-26.58, 412.561, -18.441, 0.682)
pt3dadd(-26.681, 412.6, -18.41, 0.734)
pt3dadd(-26.782, 412.663, -18.408, 0.75)
pt3dadd(-26.884, 412.728, -18.406, 0.764)
pt3dadd(-26.985, 412.792, -18.403, 0.78)
pt3dadd(-27.087, 412.855, -18.401, 0.794)
pt3dadd(-27.188, 412.919, -18.4, 0.812)
pt3dadd(-27.291, 412.982, -18.4, 0.832)
pt3dadd(-27.393, 413.045, -18.4, 0.852)
pt3dadd(-27.495, 413.107, -18.4, 0.87)
pt3dadd(-27.598, 413.17, -18.4, 0.89)
pt3dadd(-27.692, 413.242, -18.395, 0.9)
pt3dadd(-27.768, 413.332, -18.377, 0.886)
pt3dadd(-27.858, 413.398, -18.355, 0.868)
pt3dadd(-27.969, 413.425, -18.326, 0.842)
pt3dadd(-28.064, 413.476, -18.332, 0.808)
pt3dadd(-28.14, 413.552, -18.377, 0.766)
pt3dadd(-28.172, 413.659, -18.392, 0.76)
pt3dadd(-28.187, 413.778, -18.396, 0.77)
pt3dadd(-28.202, 413.897, -18.4, 0.778)
pt3dadd(-28.213, 414.017, -18.4, 0.778)
pt3dadd(-28.225, 414.136, -18.4, 0.778)
pt3dadd(-28.236, 414.256, -18.4, 0.778)
pt3dadd(-28.248, 414.374, -18.4, 0.778)
pt3dadd(-28.317, 414.449, -18.4, 0.778)
pt3dadd(-28.43, 414.488, -18.4, 0.778)
pt3dadd(-28.542, 414.53, -18.4, 0.772)
pt3dadd(-28.651, 414.581, -18.4, 0.758)
pt3dadd(-28.762, 414.625, -18.4, 0.768)
pt3dadd(-28.874, 414.67, -18.4, 0.776)
pt3dadd(-28.985, 414.715, -18.4, 0.786)
pt3dadd(-29.097, 414.76, -18.4, 0.796)
pt3dadd(-29.208, 414.803, -18.4, 0.804)
pt3dadd(-29.323, 414.839, -18.4, 0.814)
pt3dadd(-29.437, 414.875, -18.4, 0.822)
pt3dadd(-29.552, 414.91, -18.4, 0.832)
pt3dadd(-29.667, 414.946, -18.4, 0.84)
pt3dadd(-29.781, 414.982, -18.4, 0.85)
pt3dadd(-29.89, 415.03, -18.4, 0.858)
pt3dadd(-29.992, 415.093, -18.4, 0.868)
pt3dadd(-30.094, 415.156, -18.4, 0.878)
pt3dadd(-30.196, 415.219, -18.4, 0.888)
pt3dadd(-30.298, 415.282, -18.4, 0.898)
pt3dadd(-30.391, 415.356, -18.4, 0.9)
pt3dadd(-30.469, 415.447, -18.4, 0.89)
pt3dadd(-30.546, 415.538, -18.4, 0.88)
pt3dadd(-30.624, 415.631, -18.4, 0.87)
pt3dadd(-30.702, 415.722, -18.4, 0.86)
pt3dadd(-30.787, 415.806, -18.4, 0.852)
pt3dadd(-30.881, 415.88, -18.4, 0.846)
pt3dadd(-30.974, 415.956, -18.4, 0.842)
pt3dadd(-31.068, 416.03, -18.4, 0.836)
pt3dadd(-31.162, 416.106, -18.4, 0.832)
pt3dadd(-31.263, 416.168, -18.4, 0.834)
pt3dadd(-31.374, 416.214, -18.4, 0.844)
pt3dadd(-31.476, 416.27, -18.4, 0.864)
pt3dadd(-31.537, 416.374, -18.4, 0.92)
pt3dadd(-31.598, 416.477, -18.4, 0.978)
pt3dadd(-31.643, 416.567, -18.346, 1.06)
pt3dadd(-31.688, 416.656, -18.29, 1.144)
pt3dadd(-31.733, 416.744, -18.235, 1.228)
pt3dadd(-31.801, 416.821, -18.199, 1.288)
pt3dadd(-31.908, 416.876, -18.196, 1.31)
pt3dadd(-32.014, 416.932, -18.193, 1.33)
pt3dadd(-32.12, 416.987, -18.19, 1.35)
pt3dadd(-32.225, 417, -18.151, 1.338)
pt3dadd(-32.328, 417, -18.1, 1.316)
pt3dadd(-32.42, 417.002, -18.037, 1.27)
pt3dadd(-32.502, 417.007, -17.965, 1.206)
pt3dadd(-32.584, 417.012, -17.892, 1.142)
pt3dadd(-32.635, 417.094, -17.844, 1.032)
pt3dadd(-32.677, 417.194, -17.802, 0.912)
pt3dadd(-32.734, 417.299, -17.795, 0.698)
pt3dadd(-32.8, 417.395, -17.773, 0.67)
pt3dadd(-32.866, 417.492, -17.75, 0.64)
pt3dadd(-32.932, 417.588, -17.728, 0.612)
pt3dadd(-32.998, 417.684, -17.705, 0.584)
pt3dadd(-33.045, 417.793, -17.7, 0.588)
pt3dadd(-33.087, 417.906, -17.7, 0.602)
pt3dadd(-33.129, 418.019, -17.7, 0.616)
pt3dadd(-33.17, 418.132, -17.7, 0.63)
pt3dadd(-33.212, 418.243, -17.7, 0.644)
pt3dadd(-33.249, 418.357, -17.7, 0.664)
pt3dadd(-33.276, 418.475, -17.7, 0.698)
pt3dadd(-33.304, 418.591, -17.7, 0.732)
pt3dadd(-33.331, 418.708, -17.7, 0.768)
pt3dadd(-33.358, 418.825, -17.7, 0.802)
pt3dadd(-33.386, 418.942, -17.7, 0.836)
pt3dadd(-33.435, 419.048, -17.7, 0.876)
pt3dadd(-33.507, 419.144, -17.7, 0.922)
pt3dadd(-33.579, 419.24, -17.7, 0.966)
pt3dadd(-33.651, 419.336, -17.7, 1.012)
pt3dadd(-33.723, 419.432, -17.7, 1.058)
pt3dadd(-33.81, 419.513, -17.7, 1.084)
pt3dadd(-33.91, 419.579, -17.7, 1.094)
pt3dadd(-34.01, 419.645, -17.7, 1.104)
pt3dadd(-34.111, 419.711, -17.7, 1.114)
pt3dadd(-34.211, 419.776, -17.7, 1.124)
pt3dadd(-34.292, 419.86, -17.7, 1.126)
pt3dadd(-34.349, 419.965, -17.7, 1.116)
pt3dadd(-34.405, 420.071, -17.7, 1.106)
pt3dadd(-34.462, 420.176, -17.7, 1.096)
pt3dadd(-34.519, 420.283, -17.7, 1.086)
}
}
proc shape3d_147() {
dend_5[19] { pt3dadd(-34.588, 420.377, -17.7, 1.07)
pt3dadd(-34.691, 420.437, -17.7, 1.036)
pt3dadd(-34.794, 420.498, -17.7, 1.004)
pt3dadd(-34.893, 420.566, -17.7, 1.004)
pt3dadd(-34.992, 420.634, -17.7, 1.004)
pt3dadd(-35.072, 420.724, -17.695, 1.016)
pt3dadd(-35.15, 420.815, -17.69, 1.028)
pt3dadd(-35.233, 420.833, -17.628, 1.03)
pt3dadd(-35.318, 420.839, -17.557, 1.03)
pt3dadd(-35.418, 420.865, -17.509, 0.998)
pt3dadd(-35.519, 420.905, -17.465, 0.976)
pt3dadd(-35.615, 420.952, -17.421, 0.97)
pt3dadd(-35.712, 420.998, -17.377, 0.964)
pt3dadd(-35.809, 421.045, -17.333, 0.958)
pt3dadd(-35.907, 421.087, -17.288, 0.954)
pt3dadd(-36.011, 421.115, -17.242, 0.954)
pt3dadd(-36.088, 421.17, -17.205, 0.954)
pt3dadd(-36.112, 421.285, -17.184, 0.954)
pt3dadd(-36.142, 421.397, -17.163, 0.95)
pt3dadd(-36.216, 421.478, -17.125, 0.908)
pt3dadd(-36.301, 421.554, -17.1, 0.868)
pt3dadd(-36.404, 421.615, -17.1, 0.834)
pt3dadd(-36.51, 421.669, -17.1, 0.8)
pt3dadd(-36.629, 421.684, -17.1, 0.772)
pt3dadd(-36.732, 421.727, -17.1, 0.754)
pt3dadd(-36.804, 421.823, -17.1, 0.754)
pt3dadd(-36.876, 421.919, -17.1, 0.754)
pt3dadd(-36.948, 422.015, -17.1, 0.754)
pt3dadd(-37.02, 422.111, -17.1, 0.754)
pt3dadd(-37.081, 422.213, -17.1, 0.75)
pt3dadd(-37.12, 422.326, -17.1, 0.738)
pt3dadd(-37.16, 422.44, -17.1, 0.728)
pt3dadd(-37.216, 422.545, -17.095, 0.728)
pt3dadd(-37.272, 422.651, -17.09, 0.728)
pt3dadd(-37.298, 422.725, -17.02, 0.74)
pt3dadd(-37.318, 422.794, -16.94, 0.752)
pt3dadd(-37.361, 422.861, -16.865, 0.792)
pt3dadd(-37.409, 422.928, -16.793, 0.836)
pt3dadd(-37.477, 422.998, -16.735, 0.902)
pt3dadd(-37.547, 423.067, -16.677, 0.96)
pt3dadd(-37.61, 423.14, -16.62, 1.02)
pt3dadd(-37.655, 423.229, -16.565, 1.09)
pt3dadd(-37.683, 423.33, -16.521, 1.144)
pt3dadd(-37.688, 423.445, -16.492, 1.176)
pt3dadd(-37.705, 423.55, -16.463, 1.204)
pt3dadd(-37.816, 423.576, -16.431, 1.192)
pt3dadd(-37.927, 423.602, -16.4, 1.176)
pt3dadd(-38.042, 423.635, -16.4, 1.098)
pt3dadd(-38.135, 423.697, -16.398, 1.034)
pt3dadd(-38.198, 423.799, -16.392, 0.986)
pt3dadd(-38.255, 423.886, -16.362, 0.94)
pt3dadd(-38.298, 423.944, -16.283, 0.9)
pt3dadd(-38.373, 424.002, -16.233, 0.866)
pt3dadd(-38.476, 424.056, -16.21, 0.84)
pt3dadd(-38.583, 424.106, -16.2, 0.81)
pt3dadd(-38.694, 424.153, -16.2, 0.776)
pt3dadd(-38.806, 424.188, -16.195, 0.744)
pt3dadd(-38.924, 424.194, -16.177, 0.714)
pt3dadd(-39.042, 424.199, -16.159, 0.684)
pt3dadd(-39.108, 424.2, -16.084, 0.626)
pt3dadd(-39.12, 424.2, -15.985, 0.606)
pt3dadd(-39.12, 424.2, -15.885, 0.632)
pt3dadd(-39.12, 424.2, -15.785, 0.656)
pt3dadd(-39.12, 424.2, -15.685, 0.678)
pt3dadd(-39.118, 424.2, -15.585, 0.682)
pt3dadd(-39.099, 424.2, -15.487, 0.718)
pt3dadd(-39.056, 424.2, -15.394, 0.798)
pt3dadd(-39.014, 424.213, -15.301, 0.878)
pt3dadd(-39.04, 424.267, -15.222, 0.846)
pt3dadd(-39.144, 424.31, -15.2, 0.748)
pt3dadd(-39.259, 424.344, -15.196, 0.694)
pt3dadd(-39.358, 424.398, -15.168, 0.678)
pt3dadd(-39.435, 424.466, -15.119, 0.62)
pt3dadd(-39.521, 424.546, -15.1, 0.51)
pt3dadd(-39.611, 424.61, -15.075, 0.44)
pt3dadd(-39.694, 424.663, -15.018, 0.41)
pt3dadd(-39.777, 424.716, -14.961, 0.402)
pt3dadd(-39.86, 424.77, -14.904, 0.402)
pt3dadd(-39.913, 424.866, -14.933, 0.44)
pt3dadd(-39.961, 424.968, -14.968, 0.48)
pt3dadd(-39.978, 425.086, -14.982, 0.522)
pt3dadd(-39.994, 425.203, -14.996, 0.564)
pt3dadd(-40.054, 425.302, -15, 0.596)
pt3dadd(-40.133, 425.392, -15, 0.626)
pt3dadd(-40.212, 425.482, -15, 0.654)
pt3dadd(-40.292, 425.572, -15, 0.686)
pt3dadd(-40.373, 425.66, -15, 0.746)
pt3dadd(-40.455, 425.747, -15, 0.804)
pt3dadd(-40.572, 425.776, -15, 0.866)
pt3dadd(-40.688, 425.803, -15, 0.926)
pt3dadd(-40.805, 425.832, -15, 0.986)
pt3dadd(-40.909, 425.86, -14.963, 1.078)
pt3dadd(-41.007, 425.887, -14.911, 1.184)
pt3dadd(-41.043, 425.956, -14.841, 1.236)
pt3dadd(-41.064, 426.034, -14.767, 1.276)
pt3dadd(-41.088, 426.121, -14.71, 1.3)
pt3dadd(-41.123, 426.236, -14.705, 1.28)
pt3dadd(-41.157, 426.35, -14.7, 1.258)
pt3dadd(-41.163, 426.469, -14.691, 1.262)
pt3dadd(-41.167, 426.589, -14.682, 1.268)
pt3dadd(-41.171, 426.708, -14.673, 1.276)
pt3dadd(-41.211, 426.796, -14.656, 1.306)
pt3dadd(-41.321, 426.822, -14.623, 1.38)
pt3dadd(-41.435, 426.84, -14.6, 1.448)
pt3dadd(-41.555, 426.84, -14.6, 1.504)
pt3dadd(-41.675, 426.84, -14.6, 1.56)
pt3dadd(-41.795, 426.84, -14.6, 1.618)
pt3dadd(-41.914, 426.845, -14.6, 1.66)
pt3dadd(-42.033, 426.859, -14.6, 1.67)
pt3dadd(-42.153, 426.874, -14.6, 1.678)
pt3dadd(-42.256, 426.924, -14.6, 1.608)
pt3dadd(-42.347, 427.003, -14.6, 1.444)
pt3dadd(-42.422, 427.097, -14.6, 1.158)
pt3dadd(-42.465, 427.206, -14.6, 1.058)
pt3dadd(-42.48, 427.326, -14.6, 1.056)
pt3dadd(-42.481, 427.446, -14.6, 1.082)
pt3dadd(-42.504, 427.561, -14.6, 1.106)
pt3dadd(-42.576, 427.657, -14.6, 1.116)
pt3dadd(-42.648, 427.753, -14.6, 1.126)
pt3dadd(-42.72, 427.849, -14.6, 1.136)
pt3dadd(-42.792, 427.945, -14.6, 1.146)
pt3dadd(-42.862, 428.042, -14.6, 1.154)
pt3dadd(-42.919, 428.148, -14.6, 1.15)
pt3dadd(-42.975, 428.254, -14.6, 1.144)
pt3dadd(-43.032, 428.359, -14.6, 1.14)
pt3dadd(-43.089, 428.465, -14.6, 1.134)
pt3dadd(-43.146, 428.57, -14.6, 1.13)
pt3dadd(-43.173, 428.688, -14.6, 1.1)
pt3dadd(-43.199, 428.804, -14.6, 1.07)
pt3dadd(-43.242, 428.916, -14.6, 1.028)
pt3dadd(-43.302, 429.019, -14.6, 0.97)
pt3dadd(-43.367, 429.116, -14.59, 0.914)
pt3dadd(-43.442, 429.199, -14.552, 0.856)
pt3dadd(-43.532, 429.266, -14.525, 0.816)
pt3dadd(-43.638, 429.319, -14.509, 0.792)
pt3dadd(-43.75, 429.35, -14.49, 0.764)
pt3dadd(-43.867, 429.359, -14.469, 0.732)
pt3dadd(-43.947, 429.436, -14.439, 0.728)
pt3dadd(-44.023, 429.521, -14.407, 0.728)
pt3dadd(-44.098, 429.606, -14.376, 0.728)
pt3dadd(-44.174, 429.691, -14.344, 0.728)
pt3dadd(-44.255, 429.761, -14.301, 0.728)
pt3dadd(-44.34, 429.822, -14.252, 0.728)
pt3dadd(-44.424, 429.884, -14.204, 0.728)
pt3dadd(-44.509, 429.946, -14.155, 0.728)
pt3dadd(-44.589, 430.003, -14.098, 0.736)
pt3dadd(-44.665, 430.056, -14.035, 0.75)
pt3dadd(-44.735, 430.116, -13.971, 0.742)
pt3dadd(-44.803, 430.181, -13.911, 0.728)
pt3dadd(-44.859, 430.286, -13.906, 0.716)
pt3dadd(-44.915, 430.392, -13.9, 0.704)
pt3dadd(-44.969, 430.5, -13.9, 0.704)
pt3dadd(-45.023, 430.607, -13.9, 0.704)
pt3dadd(-45.069, 430.717, -13.9, 0.726)
pt3dadd(-45.114, 430.829, -13.9, 0.756)
pt3dadd(-45.161, 430.939, -13.9, 0.77)
pt3dadd(-45.209, 431.05, -13.9, 0.784)
pt3dadd(-45.256, 431.159, -13.9, 0.798)
pt3dadd(-45.304, 431.269, -13.9, 0.812)
pt3dadd(-45.351, 431.38, -13.9, 0.826)
pt3dadd(-45.403, 431.485, -13.918, 0.834)
pt3dadd(-45.455, 431.591, -13.94, 0.838)
pt3dadd(-45.507, 431.695, -13.962, 0.844)
pt3dadd(-45.56, 431.8, -13.983, 0.85)
pt3dadd(-45.612, 431.905, -14, 0.852)
pt3dadd(-45.666, 432.012, -14, 0.842)
pt3dadd(-45.72, 432.12, -14, 0.832)
pt3dadd(-45.773, 432.227, -14, 0.822)
pt3dadd(-45.827, 432.335, -14, 0.814)
pt3dadd(-45.88, 432.442, -14, 0.804)
pt3dadd(-45.918, 432.556, -13.994, 0.784)
pt3dadd(-45.956, 432.67, -13.987, 0.766)
pt3dadd(-45.994, 432.782, -13.981, 0.746)
pt3dadd(-46.032, 432.896, -13.975, 0.728)
pt3dadd(-46.07, 433.01, -13.968, 0.708)
pt3dadd(-46.116, 433.12, -13.957, 0.692)
pt3dadd(-46.166, 433.228, -13.943, 0.676)
pt3dadd(-46.216, 433.336, -13.929, 0.66)
pt3dadd(-46.266, 433.444, -13.915, 0.644)
pt3dadd(-46.316, 433.552, -13.901, 0.63)
pt3dadd(-46.386, 433.648, -13.9, 0.628)
pt3dadd(-46.458, 433.744, -13.9, 0.628)
pt3dadd(-46.53, 433.84, -13.9, 0.628)
pt3dadd(-46.602, 433.936, -13.9, 0.628)
pt3dadd(-46.674, 434.032, -13.9, 0.628)
pt3dadd(-46.777, 434.088, -13.885, 0.64)
pt3dadd(-46.883, 434.142, -13.868, 0.652)
pt3dadd(-46.968, 434.214, -13.833, 0.666)
pt3dadd(-47.051, 434.29, -13.8, 0.68)
pt3dadd(-47.139, 434.371, -13.8, 0.692)
pt3dadd(-47.227, 434.453, -13.8, 0.704)
pt3dadd(-47.247, 434.57, -13.8, 0.722)
pt3dadd(-47.268, 434.689, -13.8, 0.742)
pt3dadd(-47.283, 434.808, -13.8, 0.774)
pt3dadd(-47.29, 434.928, -13.8, 0.828)
pt3dadd(-47.319, 435.042, -13.8, 0.864)
pt3dadd(-47.369, 435.151, -13.8, 0.882)
pt3dadd(-47.42, 435.259, -13.8, 0.902)
pt3dadd(-47.47, 435.368, -13.8, 0.92)
pt3dadd(-47.521, 435.478, -13.8, 0.94)
}
}
proc shape3d_148() {
dend_5[19] { pt3dadd(-47.572, 435.586, -13.8, 0.958)
pt3dadd(-47.622, 435.695, -13.8, 0.978)
pt3dadd(-47.673, 435.804, -13.8, 0.996)
pt3dadd(-47.724, 435.912, -13.8, 1.016)
pt3dadd(-47.775, 436.021, -13.8, 1.036)
pt3dadd(-47.826, 436.129, -13.8, 1.054)
pt3dadd(-47.856, 436.234, -13.843, 1.06)
pt3dadd(-47.885, 436.337, -13.887, 1.066)
pt3dadd(-47.915, 436.44, -13.932, 1.072)
pt3dadd(-47.944, 436.543, -13.976, 1.076)
pt3dadd(-47.983, 436.645, -14.016, 1.068)
pt3dadd(-48.033, 436.746, -14.052, 1.04)
pt3dadd(-48.11, 436.828, -14.077, 0.998)
pt3dadd(-48.206, 436.896, -14.094, 0.948)
pt3dadd(-48.31, 436.955, -14.1, 0.892)
pt3dadd(-48.417, 437.009, -14.1, 0.836)
pt3dadd(-48.53, 437.04, -14.1, 0.794)
pt3dadd(-48.65, 437.04, -14.1, 0.768)
pt3dadd(-48.77, 437.04, -14.1, 0.742)
pt3dadd(-48.885, 437.062, -14.101, 0.72)
pt3dadd(-48.994, 437.112, -14.104, 0.7)
pt3dadd(-49.102, 437.162, -14.107, 0.678)
pt3dadd(-49.211, 437.214, -14.11, 0.658)
pt3dadd(-49.29, 437.288, -14.144, 0.664)
pt3dadd(-49.358, 437.371, -14.188, 0.678)
pt3dadd(-49.417, 437.473, -14.208, 0.708)
pt3dadd(-49.471, 437.576, -14.233, 0.726)
pt3dadd(-49.524, 437.68, -14.257, 0.742)
pt3dadd(-49.577, 437.783, -14.282, 0.758)
pt3dadd(-49.63, 437.886, -14.306, 0.776)
pt3dadd(-49.666, 437.999, -14.325, 0.778)
pt3dadd(-49.698, 438.112, -14.343, 0.778)
pt3dadd(-49.729, 438.226, -14.361, 0.778)
pt3dadd(-49.761, 438.34, -14.378, 0.778)
pt3dadd(-49.793, 438.454, -14.396, 0.778)
pt3dadd(-49.827, 438.568, -14.404, 0.786)
pt3dadd(-49.861, 438.683, -14.409, 0.798)
pt3dadd(-49.892, 438.794, -14.429, 0.804)
pt3dadd(-49.919, 438.901, -14.468, 0.804)
pt3dadd(-49.968, 438.995, -14.509, 0.816)
pt3dadd(-50.044, 439.07, -14.554, 0.846)
pt3dadd(-50.141, 439.13, -14.578, 0.854)
pt3dadd(-50.247, 439.183, -14.595, 0.854)
pt3dadd(-50.35, 439.229, -14.573, 0.848)
pt3dadd(-50.452, 439.272, -14.534, 0.84)
pt3dadd(-50.554, 439.314, -14.496, 0.832)
pt3dadd(-50.649, 439.366, -14.454, 0.798)
pt3dadd(-50.739, 439.426, -14.41, 0.742)
pt3dadd(-50.823, 439.507, -14.403, 0.694)
pt3dadd(-50.905, 439.594, -14.407, 0.648)
pt3dadd(-50.987, 439.681, -14.412, 0.602)
pt3dadd(-51.014, 439.788, -14.451, 0.526)
pt3dadd(-51.041, 439.895, -14.489, 0.448)
pt3dadd(-51.123, 439.981, -14.5, 0.32)
pt3dadd(-51.201, 440.072, -14.5, 0.306)
pt3dadd(-51.279, 440.164, -14.5, 0.29)
pt3dadd(-51.357, 440.255, -14.5, 0.276)
pt3dadd(-51.435, 440.346, -14.5, 0.26)
pt3dadd(-51.488, 440.449, -14.5, 0.248)
pt3dadd(-51.509, 440.567, -14.5, 0.238)
pt3dadd(-51.529, 440.686, -14.5, 0.228)
pt3dadd(-51.621, 440.729, -14.468, 0.226)
pt3dadd(-51.728, 440.755, -14.429, 0.226)
pt3dadd(-51.819, 440.76, -14.366, 0.236)
pt3dadd(-51.907, 440.76, -14.298, 0.248)
pt3dadd(-52.012, 440.764, -14.254, 0.266)
pt3dadd(-52.125, 440.77, -14.219, 0.29)
pt3dadd(-52.222, 440.814, -14.2, 0.31)
pt3dadd(-52.301, 440.904, -14.2, 0.332)
pt3dadd(-52.38, 440.995, -14.2, 0.354)
pt3dadd(-52.459, 441.085, -14.2, 0.374)
pt3dadd(-52.535, 441.162, -14.16, 0.416)
pt3dadd(-52.612, 441.23, -14.112, 0.476)
pt3dadd(-52.692, 441.288, -14.084, 0.564)
pt3dadd(-52.766, 441.38, -14.096, 0.584)
pt3dadd(-52.84, 441.474, -14.109, 0.606)
pt3dadd(-52.914, 441.566, -14.121, 0.626)
pt3dadd(-52.943, 441.674, -14.155, 0.638)
pt3dadd(-52.969, 441.785, -14.19, 0.648)
pt3dadd(-52.994, 441.894, -14.225, 0.658)
pt3dadd(-53.019, 442.003, -14.26, 0.67)
pt3dadd(-53.049, 442.112, -14.29, 0.676)
pt3dadd(-53.1, 442.22, -14.299, 0.666)
pt3dadd(-53.152, 442.328, -14.309, 0.656)
pt3dadd(-53.203, 442.436, -14.317, 0.646)
pt3dadd(-53.254, 442.544, -14.326, 0.636)
pt3dadd(-53.307, 442.65, -14.342, 0.624)
pt3dadd(-53.366, 442.745, -14.379, 0.61)
pt3dadd(-53.431, 442.838, -14.4, 0.602)
pt3dadd(-53.506, 442.933, -14.4, 0.602)
pt3dadd(-53.589, 443.017, -14.4, 0.616)
pt3dadd(-53.692, 443.078, -14.4, 0.662)
pt3dadd(-53.795, 443.14, -14.399, 0.706)
pt3dadd(-53.891, 443.208, -14.381, 0.746)
pt3dadd(-53.987, 443.268, -14.357, 0.776)
pt3dadd(-54.076, 443.278, -14.291, 0.756)
pt3dadd(-54.16, 443.335, -14.242, 0.696)
pt3dadd(-54.243, 443.405, -14.2, 0.624)
pt3dadd(-54.311, 443.503, -14.2, 0.554)
pt3dadd(-54.379, 443.603, -14.2, 0.484)
pt3dadd(-54.432, 443.698, -14.238, 0.452)
pt3dadd(-54.481, 443.794, -14.282, 0.428)
pt3dadd(-54.502, 443.89, -14.339, 0.44)
pt3dadd(-54.53, 443.986, -14.39, 0.462)
pt3dadd(-54.609, 444.074, -14.398, 0.536)
pt3dadd(-54.666, 444.169, -14.433, 0.576)
pt3dadd(-54.716, 444.266, -14.474, 0.606)
pt3dadd(-54.766, 444.364, -14.516, 0.634)
pt3dadd(-54.816, 444.461, -14.558, 0.664)
pt3dadd(-54.843, 444.551, -14.615, 0.71)
pt3dadd(-54.85, 444.636, -14.685, 0.772)
pt3dadd(-54.889, 444.716, -14.743, 0.818)
pt3dadd(-54.965, 444.792, -14.788, 0.846)
pt3dadd(-55.015, 444.895, -14.8, 0.854)
pt3dadd(-55.055, 445.009, -14.8, 0.854)
pt3dadd(-55.082, 445.124, -14.8, 0.85)
pt3dadd(-55.086, 445.244, -14.8, 0.842)
pt3dadd(-55.091, 445.364, -14.8, 0.834)
pt3dadd(-55.137, 445.46, -14.811, 0.842)
pt3dadd(-55.23, 445.531, -14.835, 0.868)
pt3dadd(-55.312, 445.56, -14.891, 0.942)
pt3dadd(-55.381, 445.584, -14.969, 1.118)
pt3dadd(-55.477, 445.639, -15, 1.278)
pt3dadd(-55.587, 445.678, -15.02, 1.33)
pt3dadd(-55.645, 445.738, -15.081, 1.306)
pt3dadd(-55.673, 445.808, -15.158, 1.266)
pt3dadd(-55.695, 445.898, -15.22, 1.218)
pt3dadd(-55.716, 445.994, -15.278, 1.166)
pt3dadd(-55.77, 446.093, -15.304, 1.026)
pt3dadd(-55.838, 446.186, -15.332, 0.996)
pt3dadd(-55.906, 446.279, -15.361, 0.968)
pt3dadd(-55.974, 446.372, -15.389, 0.938)
pt3dadd(-56.042, 446.465, -15.418, 0.908)
pt3dadd(-56.098, 446.567, -15.443, 0.88)
pt3dadd(-56.151, 446.67, -15.467, 0.852)
pt3dadd(-56.204, 446.773, -15.492, 0.826)
pt3dadd(-56.257, 446.876, -15.517, 0.798)
pt3dadd(-56.322, 446.968, -15.546, 0.776)
pt3dadd(-56.412, 447.031, -15.586, 0.77)
pt3dadd(-56.501, 447.096, -15.626, 0.764)
pt3dadd(-56.591, 447.16, -15.666, 0.758)
pt3dadd(-56.679, 447.227, -15.7, 0.756)
pt3dadd(-56.76, 447.316, -15.7, 0.77)
pt3dadd(-56.841, 447.404, -15.7, 0.786)
pt3dadd(-56.921, 447.493, -15.7, 0.802)
pt3dadd(-57.002, 447.582, -15.7, 0.816)
pt3dadd(-57.086, 447.666, -15.704, 0.834)
pt3dadd(-57.181, 447.736, -15.724, 0.856)
pt3dadd(-57.277, 447.804, -15.744, 0.878)
pt3dadd(-57.372, 447.872, -15.764, 0.9)
pt3dadd(-57.468, 447.942, -15.784, 0.922)
pt3dadd(-57.581, 447.964, -15.792, 0.93)
pt3dadd(-57.701, 447.968, -15.796, 0.93)
pt3dadd(-57.82, 447.973, -15.8, 0.93)
pt3dadd(-57.925, 448.031, -15.8, 0.896)
pt3dadd(-58.028, 448.092, -15.8, 0.862)
pt3dadd(-58.134, 448.146, -15.813, 0.816)
pt3dadd(-58.239, 448.199, -15.829, 0.766)
pt3dadd(-58.322, 448.274, -15.861, 0.722)
pt3dadd(-58.397, 448.356, -15.898, 0.68)
pt3dadd(-58.424, 448.458, -15.946, 0.664)
pt3dadd(-58.448, 448.56, -15.994, 0.648)
pt3dadd(-58.472, 448.663, -16.042, 0.632)
pt3dadd(-58.516, 448.729, -16.112, 0.618)
pt3dadd(-58.567, 448.781, -16.191, 0.604)
pt3dadd(-58.633, 448.826, -16.266, 0.602)
pt3dadd(-58.724, 448.882, -16.3, 0.576)
pt3dadd(-58.84, 448.91, -16.297, 0.514)
pt3dadd(-58.956, 448.92, -16.277, 0.464)
pt3dadd(-59.067, 448.92, -16.239, 0.43)
pt3dadd(-59.181, 448.922, -16.211, 0.402)
pt3dadd(-59.295, 448.958, -16.211, 0.39)
pt3dadd(-59.41, 448.996, -16.211, 0.378)
pt3dadd(-59.521, 449.018, -16.241, 0.388)
pt3dadd(-59.632, 449.039, -16.275, 0.4)
pt3dadd(-59.733, 449.083, -16.242, 0.416)
pt3dadd(-59.835, 449.114, -16.205, 0.43)
pt3dadd(-59.946, 449.087, -16.174, 0.448)
pt3dadd(-59.988, 449.027, -16.107, 0.442)
pt3dadd(-60.007, 448.957, -16.027, 0.43)
pt3dadd(-60.09, 448.952, -16, 0.42)
pt3dadd(-60.206, 448.982, -16, 0.408)
pt3dadd(-60.321, 449.014, -16.006, 0.402)
pt3dadd(-60.436, 449.045, -16.019, 0.408)
pt3dadd(-60.552, 449.072, -16.03, 0.42)
pt3dadd(-60.668, 449.1, -16.042, 0.43)
pt3dadd(-60.784, 449.128, -16.053, 0.44)
pt3dadd(-60.9, 449.155, -16.065, 0.45)
pt3dadd(-61.016, 449.178, -16.055, 0.46)
pt3dadd(-61.133, 449.201, -16.04, 0.468)
pt3dadd(-61.249, 449.224, -16.026, 0.478)
pt3dadd(-61.366, 449.245, -16.011, 0.488)
pt3dadd(-61.483, 449.268, -15.997, 0.496)
pt3dadd(-61.598, 449.28, -15.974, 0.502)
pt3dadd(-61.711, 449.28, -15.941, 0.502)
pt3dadd(-61.825, 449.28, -15.911, 0.502)
pt3dadd(-61.945, 449.28, -15.907, 0.492)
pt3dadd(-62.065, 449.28, -15.903, 0.484)
pt3dadd(-62.184, 449.279, -15.897, 0.476)
pt3dadd(-62.303, 449.274, -15.885, 0.466)
}
}
proc shape3d_149() {
dend_5[19] { pt3dadd(-62.422, 449.269, -15.872, 0.456)
pt3dadd(-62.484, 449.238, -15.811, 0.444)
pt3dadd(-62.51, 449.19, -15.722, 0.432)
pt3dadd(-62.52, 449.196, -15.629, 0.412)
pt3dadd(-62.52, 449.232, -15.533, 0.39)
pt3dadd(-62.52, 449.292, -15.452, 0.332)
pt3dadd(-62.52, 449.401, -15.414, 0.258)
pt3dadd(-62.52, 449.52, -15.4, 0.226)
pt3dadd(-62.52, 449.64, -15.4, 0.226)
}
apic[22] {pt3dclear()
pt3dadd(59.08, 206.16, -5.333, 1.984)
pt3dadd(59.142, 206.278, -5.291, 2.022)
pt3dadd(59.217, 206.383, -5.268, 2.062)
pt3dadd(59.291, 206.489, -5.244, 2.102)
pt3dadd(59.365, 206.594, -5.22, 2.142)
pt3dadd(59.44, 206.7, -5.197, 2.184)
pt3dadd(59.514, 206.806, -5.173, 2.224)
pt3dadd(59.586, 206.912, -5.15, 2.252)
pt3dadd(59.629, 207.04, -5.131, 2.166)
pt3dadd(59.672, 207.166, -5.112, 2.08)
pt3dadd(59.716, 207.293, -5.093, 1.994)
pt3dadd(59.759, 207.419, -5.075, 1.91)
pt3dadd(59.802, 207.546, -5.056, 1.824)
pt3dadd(59.817, 207.68, -5.027, 1.756)
pt3dadd(59.827, 207.816, -4.997, 1.694)
pt3dadd(59.836, 207.952, -4.966, 1.632)
pt3dadd(59.845, 208.087, -4.936, 1.57)
pt3dadd(59.854, 208.223, -4.905, 1.508)
pt3dadd(59.861, 208.358, -4.872, 1.448)
pt3dadd(59.853, 208.376, -4.854, 1.448)
pt3dadd(59.846, 208.511, -4.812, 1.406)
pt3dadd(59.839, 208.646, -4.77, 1.362)
pt3dadd(59.831, 208.781, -4.729, 1.32)
pt3dadd(59.824, 208.915, -4.687, 1.276)
pt3dadd(59.817, 209.05, -4.645, 1.234)
pt3dadd(59.809, 209.185, -4.605, 1.196)
pt3dadd(59.802, 209.321, -4.568, 1.172)
pt3dadd(59.795, 209.456, -4.531, 1.146)
pt3dadd(59.787, 209.592, -4.493, 1.12)
pt3dadd(59.78, 209.728, -4.456, 1.096)
pt3dadd(59.773, 209.863, -4.419, 1.07)
pt3dadd(59.776, 209.995, -4.373, 1.044)
pt3dadd(59.798, 210.118, -4.313, 1.018)
pt3dadd(59.819, 210.241, -4.253, 0.99)
pt3dadd(59.841, 210.364, -4.193, 0.962)
pt3dadd(59.863, 210.487, -4.132, 0.934)
pt3dadd(59.877, 210.62, -4.099, 0.918)
pt3dadd(59.888, 210.756, -4.073, 0.906)
pt3dadd(59.899, 210.893, -4.046, 0.892)
pt3dadd(59.91, 211.028, -4.02, 0.88)
pt3dadd(59.903, 211.046, -4.001, 0.88)
pt3dadd(59.914, 211.182, -3.974, 0.866)
pt3dadd(59.924, 211.318, -3.947, 0.854)
pt3dadd(59.907, 211.45, -3.899, 0.854)
pt3dadd(59.889, 211.582, -3.85, 0.854)
pt3dadd(59.872, 211.714, -3.802, 0.854)
pt3dadd(59.855, 211.846, -3.753, 0.854)
pt3dadd(59.837, 211.978, -3.705, 0.854)
pt3dadd(59.793, 212.094, -3.641, 0.878)
pt3dadd(59.742, 212.207, -3.572, 0.906)
pt3dadd(59.69, 212.318, -3.504, 0.936)
pt3dadd(59.639, 212.43, -3.435, 0.966)
pt3dadd(59.582, 212.542, -3.369, 0.99)
pt3dadd(59.52, 212.652, -3.305, 1.008)
pt3dadd(59.459, 212.761, -3.241, 1.026)
pt3dadd(59.397, 212.872, -3.177, 1.044)
pt3dadd(59.345, 212.988, -3.117, 1.052)
pt3dadd(59.309, 213.114, -3.062, 1.048)
pt3dadd(59.273, 213.24, -3.008, 1.042)
pt3dadd(59.237, 213.367, -2.953, 1.036)
pt3dadd(59.201, 213.493, -2.899, 1.032)
pt3dadd(59.185, 213.626, -2.861, 0.998)
pt3dadd(59.178, 213.763, -2.829, 0.95)
pt3dadd(59.17, 213.9, -2.798, 0.904)
pt3dadd(59.163, 213.918, -2.779, 0.678)
pt3dadd(59.156, 213.936, -2.761, 0.678)
pt3dadd(59.148, 213.954, -2.742, 0.678)
pt3dadd(59.141, 213.972, -2.723, 0.678)
pt3dadd(59.187, 214.096, -2.704, 0.678)
pt3dadd(59.234, 214.222, -2.686, 0.678)
pt3dadd(59.28, 214.346, -2.667, 0.678)
pt3dadd(59.326, 214.472, -2.648, 0.678)
pt3dadd(59.372, 214.597, -2.629, 0.678)
pt3dadd(59.405, 214.729, -2.61, 0.678)
pt3dadd(59.433, 214.861, -2.592, 0.678)
pt3dadd(59.462, 214.992, -2.573, 0.678)
pt3dadd(59.49, 215.125, -2.554, 0.678)
pt3dadd(59.519, 215.257, -2.535, 0.678)
pt3dadd(59.544, 215.39, -2.517, 0.678)
pt3dadd(59.554, 215.527, -2.498, 0.678)
pt3dadd(59.564, 215.664, -2.479, 0.678)
pt3dadd(59.574, 215.8, -2.46, 0.678)
pt3dadd(59.584, 215.936, -2.441, 0.678)
pt3dadd(59.594, 216.073, -2.423, 0.678)
pt3dadd(59.603, 216.21, -2.404, 0.678)
pt3dadd(59.604, 216.348, -2.385, 0.678)
pt3dadd(59.605, 216.486, -2.366, 0.678)
pt3dadd(59.605, 216.623, -2.348, 0.678)
pt3dadd(59.606, 216.76, -2.329, 0.678)
pt3dadd(59.607, 216.898, -2.31, 0.678)
pt3dadd(59.608, 217.036, -2.291, 0.678)
pt3dadd(59.629, 217.168, -2.272, 0.678)
pt3dadd(59.675, 217.292, -2.254, 0.678)
pt3dadd(59.722, 217.418, -2.235, 0.678)
pt3dadd(59.768, 217.542, -2.216, 0.678)
pt3dadd(59.815, 217.667, -2.197, 0.678)
pt3dadd(59.854, 217.794, -2.183, 0.678)
pt3dadd(59.87, 217.928, -2.184, 0.678)
pt3dadd(59.886, 218.062, -2.184, 0.678)
pt3dadd(59.901, 218.195, -2.184, 0.678)
pt3dadd(59.917, 218.328, -2.185, 0.678)
pt3dadd(59.934, 218.46, -2.186, 0.678)
pt3dadd(59.97, 218.573, -2.216, 0.678)
pt3dadd(60.011, 218.684, -2.245, 0.678)
pt3dadd(60.072, 218.785, -2.271, 0.678)
pt3dadd(60.119, 218.899, -2.283, 0.678)
pt3dadd(60.149, 219.03, -2.28, 0.678)
pt3dadd(60.169, 219.162, -2.272, 0.678)
pt3dadd(60.166, 219.3, -2.253, 0.678)
pt3dadd(60.164, 219.438, -2.234, 0.678)
pt3dadd(60.177, 219.572, -2.216, 0.678)
pt3dadd(60.213, 219.702, -2.197, 0.678)
pt3dadd(60.241, 219.832, -2.201, 0.678)
pt3dadd(60.267, 219.96, -2.207, 0.678)
pt3dadd(60.292, 220.088, -2.214, 0.678)
pt3dadd(60.318, 220.218, -2.221, 0.678)
pt3dadd(60.344, 220.346, -2.228, 0.678)
pt3dadd(60.371, 220.474, -2.24, 0.678)
pt3dadd(60.398, 220.6, -2.252, 0.678)
pt3dadd(60.425, 220.727, -2.264, 0.678)
pt3dadd(60.452, 220.854, -2.277, 0.678)
pt3dadd(60.493, 220.975, -2.279, 0.678)
pt3dadd(60.552, 221.093, -2.267, 0.678)
pt3dadd(60.611, 221.21, -2.255, 0.678)
pt3dadd(60.67, 221.328, -2.243, 0.678)
pt3dadd(60.729, 221.446, -2.231, 0.678)
pt3dadd(60.805, 221.549, -2.215, 0.678)
pt3dadd(60.891, 221.64, -2.197, 0.678)
pt3dadd(60.975, 221.736, -2.178, 0.678)
pt3dadd(61.055, 221.836, -2.159, 0.678)
pt3dadd(61.119, 221.946, -2.14, 0.678)
pt3dadd(61.152, 222.078, -2.121, 0.678)
pt3dadd(61.184, 222.209, -2.103, 0.678)
pt3dadd(61.177, 222.346, -2.072, 0.678)
pt3dadd(61.17, 222.482, -2.04, 0.678)
pt3dadd(61.162, 222.617, -2.002, 0.678)
pt3dadd(61.155, 222.746, -1.947, 0.678)
pt3dadd(61.164, 222.881, -1.914, 0.678)
pt3dadd(61.177, 223.016, -1.887, 0.678)
pt3dadd(61.191, 223.153, -1.861, 0.678)
pt3dadd(61.205, 223.288, -1.834, 0.678)
pt3dadd(61.219, 223.423, -1.807, 0.678)
pt3dadd(61.236, 223.558, -1.78, 0.678)
pt3dadd(61.282, 223.682, -1.747, 0.678)
pt3dadd(61.327, 223.806, -1.715, 0.678)
pt3dadd(61.373, 223.931, -1.682, 0.678)
pt3dadd(61.419, 224.054, -1.649, 0.678)
pt3dadd(61.454, 224.182, -1.616, 0.678)
pt3dadd(61.467, 224.316, -1.58, 0.678)
pt3dadd(61.479, 224.45, -1.545, 0.678)
pt3dadd(61.492, 224.585, -1.51, 0.678)
pt3dadd(61.504, 224.72, -1.474, 0.678)
pt3dadd(61.517, 224.855, -1.439, 0.678)
pt3dadd(61.508, 224.989, -1.401, 0.678)
pt3dadd(61.498, 225.125, -1.364, 0.678)
pt3dadd(61.489, 225.26, -1.326, 0.678)
pt3dadd(61.479, 225.396, -1.288, 0.678)
pt3dadd(61.47, 225.533, -1.251, 0.678)
pt3dadd(61.459, 225.668, -1.214, 0.678)
pt3dadd(61.434, 225.805, -1.19, 0.678)
pt3dadd(61.408, 225.94, -1.165, 0.678)
pt3dadd(61.382, 226.076, -1.141, 0.678)
pt3dadd(61.357, 226.213, -1.116, 0.678)
pt3dadd(61.331, 226.349, -1.092, 0.678)
pt3dadd(61.31, 226.486, -1.066, 0.678)
pt3dadd(61.302, 226.624, -1.037, 0.678)
pt3dadd(61.295, 226.759, -1.008, 0.678)
pt3dadd(61.287, 226.896, -0.979, 0.678)
pt3dadd(61.28, 227.034, -0.949, 0.678)
pt3dadd(61.273, 227.171, -0.92, 0.678)
pt3dadd(61.266, 227.309, -0.891, 0.678)
pt3dadd(61.258, 227.446, -0.856, 0.678)
pt3dadd(61.251, 227.581, -0.821, 0.678)
pt3dadd(61.243, 227.717, -0.786, 0.678)
pt3dadd(61.236, 227.852, -0.751, 0.678)
pt3dadd(61.229, 227.989, -0.715, 0.678)
pt3dadd(61.221, 228.126, -0.68, 0.678)
pt3dadd(61.255, 228.251, -0.639, 0.678)
pt3dadd(61.301, 228.372, -0.595, 0.678)
pt3dadd(61.347, 228.492, -0.552, 0.678)
pt3dadd(61.392, 228.613, -0.509, 0.678)
pt3dadd(61.438, 228.736, -0.466, 0.678)
pt3dadd(61.483, 228.858, -0.425, 0.678)
pt3dadd(61.528, 228.98, -0.385, 0.678)
pt3dadd(61.573, 229.104, -0.344, 0.678)
pt3dadd(61.618, 229.226, -0.304, 0.678)
pt3dadd(61.628, 229.354, -0.256, 0.678)
pt3dadd(61.621, 229.486, -0.205, 0.678)
pt3dadd(61.613, 229.618, -0.154, 0.678)
pt3dadd(61.606, 229.748, -0.103, 0.678)
pt3dadd(61.599, 229.88, -0.052, 0.678)
}
}
proc shape3d_150() {
apic[22] { pt3dadd(61.596, 230.012, -0.006, 0.678)
pt3dadd(61.616, 230.147, 0.015, 0.678)
pt3dadd(61.637, 230.28, 0.036, 0.678)
pt3dadd(61.658, 230.416, 0.057, 0.678)
pt3dadd(61.678, 230.55, 0.077, 0.678)
pt3dadd(61.699, 230.684, 0.098, 0.678)
pt3dadd(61.731, 230.815, 0.118, 0.678)
pt3dadd(61.777, 230.94, 0.137, 0.678)
pt3dadd(61.824, 231.065, 0.155, 0.678)
pt3dadd(61.87, 231.19, 0.174, 0.678)
pt3dadd(61.917, 231.314, 0.193, 0.678)
pt3dadd(61.954, 231.443, 0.212, 0.678)
pt3dadd(61.962, 231.58, 0.231, 0.678)
pt3dadd(61.969, 231.716, 0.249, 0.678)
pt3dadd(61.977, 231.854, 0.268, 0.678)
pt3dadd(61.984, 231.99, 0.287, 0.678)
pt3dadd(61.991, 232.127, 0.306, 0.678)
pt3dadd(61.999, 232.264, 0.324, 0.678)
pt3dadd(62.055, 232.381, 0.357, 0.678)
pt3dadd(62.115, 232.498, 0.39, 0.678)
pt3dadd(62.174, 232.614, 0.423, 0.678)
pt3dadd(62.233, 232.729, 0.457, 0.678)
pt3dadd(62.279, 232.85, 0.494, 0.678)
pt3dadd(62.299, 232.98, 0.54, 0.678)
pt3dadd(62.319, 233.111, 0.586, 0.678)
pt3dadd(62.339, 233.24, 0.633, 0.678)
pt3dadd(62.359, 233.37, 0.679, 0.678)
pt3dadd(62.398, 233.495, 0.712, 0.678)
pt3dadd(62.46, 233.609, 0.731, 0.678)
pt3dadd(62.522, 233.725, 0.75, 0.678)
pt3dadd(62.583, 233.842, 0.769, 0.678)
pt3dadd(62.645, 233.958, 0.787, 0.678)
pt3dadd(62.697, 234.079, 0.806, 0.678)
pt3dadd(62.738, 234.208, 0.825, 0.678)
pt3dadd(62.778, 234.335, 0.844, 0.678)
pt3dadd(62.818, 234.462, 0.862, 0.678)
pt3dadd(62.858, 234.59, 0.881, 0.678)
pt3dadd(62.898, 234.719, 0.9, 0.678)
pt3dadd(62.93, 234.851, 0.919, 0.678)
pt3dadd(62.962, 234.982, 0.938, 0.678)
pt3dadd(62.985, 235.116, 0.956, 0.678)
pt3dadd(63.004, 235.249, 0.975, 0.678)
pt3dadd(63.045, 235.361, 0.994, 0.678)
pt3dadd(63.156, 235.399, 1.013, 0.678)
pt3dadd(63.267, 235.438, 1.031, 0.678)
pt3dadd(63.374, 235.487, 1.06, 0.678)
pt3dadd(63.479, 235.543, 1.095, 0.678)
pt3dadd(63.562, 235.619, 1.146, 0.678)
pt3dadd(63.634, 235.71, 1.205, 0.678)
pt3dadd(63.724, 235.789, 1.252, 0.678)
pt3dadd(63.814, 235.868, 1.299, 0.678)
pt3dadd(63.904, 235.948, 1.345, 0.678)
pt3dadd(63.995, 236.027, 1.392, 0.678)
pt3dadd(64.084, 236.095, 1.453, 0.678)
pt3dadd(64.174, 236.161, 1.513, 0.678)
pt3dadd(64.264, 236.23, 1.573, 0.678)
pt3dadd(64.354, 236.297, 1.634, 0.678)
pt3dadd(64.419, 236.402, 1.668, 0.678)
pt3dadd(64.475, 236.522, 1.692, 0.678)
pt3dadd(64.544, 236.611, 1.748, 0.678)
pt3dadd(64.619, 236.682, 1.824, 0.678)
pt3dadd(64.669, 236.724, 1.926, 0.678)
pt3dadd(64.715, 236.761, 2.033, 0.678)
pt3dadd(64.726, 236.813, 2.146, 0.678)
pt3dadd(64.731, 236.867, 2.259, 0.678)
pt3dadd(64.774, 236.899, 2.363, 0.678)
pt3dadd(64.839, 236.921, 2.461, 0.678)
pt3dadd(64.893, 236.958, 2.564, 0.678)
pt3dadd(64.937, 237.001, 2.669, 0.678)
pt3dadd(64.949, 237.065, 2.779, 0.678)
pt3dadd(64.973, 237.13, 2.879, 0.678)
pt3dadd(65.069, 237.203, 2.92, 0.678)
pt3dadd(65.163, 237.28, 2.957, 0.678)
pt3dadd(65.249, 237.371, 2.976, 0.678)
pt3dadd(65.333, 237.466, 2.995, 0.678)
pt3dadd(65.379, 237.592, 3.014, 0.678)
pt3dadd(65.437, 237.706, 3.049, 0.678)
pt3dadd(65.504, 237.811, 3.096, 0.678)
pt3dadd(65.572, 237.916, 3.144, 0.678)
pt3dadd(65.64, 238.021, 3.191, 0.678)
pt3dadd(65.694, 238.134, 3.234, 0.678)
pt3dadd(65.718, 238.266, 3.268, 0.678)
pt3dadd(65.742, 238.398, 3.302, 0.678)
pt3dadd(65.765, 238.531, 3.336, 0.678)
pt3dadd(65.789, 238.663, 3.37, 0.678)
pt3dadd(65.815, 238.795, 3.401, 0.678)
pt3dadd(65.852, 238.925, 3.42, 0.678)
pt3dadd(65.89, 239.053, 3.439, 0.678)
pt3dadd(65.927, 239.183, 3.458, 0.678)
pt3dadd(65.964, 239.312, 3.476, 0.678)
pt3dadd(66.001, 239.441, 3.495, 0.678)
pt3dadd(66.06, 239.556, 3.53, 0.678)
pt3dadd(66.125, 239.666, 3.569, 0.678)
pt3dadd(66.19, 239.777, 3.607, 0.678)
pt3dadd(66.255, 239.887, 3.646, 0.678)
pt3dadd(66.316, 240.001, 3.68, 0.678)
pt3dadd(66.372, 240.121, 3.704, 0.678)
pt3dadd(66.433, 240.238, 3.727, 0.678)
pt3dadd(66.508, 240.343, 3.745, 0.678)
pt3dadd(66.582, 240.449, 3.764, 0.678)
pt3dadd(66.656, 240.553, 3.783, 0.678)
pt3dadd(66.73, 240.66, 3.802, 0.678)
pt3dadd(66.792, 240.748, 3.878, 0.678)
pt3dadd(66.843, 240.84, 3.956, 0.678)
pt3dadd(66.861, 240.947, 4.039, 0.678)
pt3dadd(66.879, 241.054, 4.121, 0.678)
pt3dadd(66.897, 241.163, 4.196, 0.678)
pt3dadd(66.91, 241.3, 4.214, 0.678)
pt3dadd(66.923, 241.435, 4.233, 0.678)
pt3dadd(66.967, 241.556, 4.252, 0.678)
pt3dadd(67.04, 241.664, 4.271, 0.678)
pt3dadd(67.113, 241.771, 4.29, 0.678)
pt3dadd(67.195, 241.868, 4.308, 0.678)
pt3dadd(67.281, 241.96, 4.327, 0.678)
pt3dadd(67.329, 242.077, 4.346, 0.678)
pt3dadd(67.344, 242.213, 4.365, 0.678)
pt3dadd(67.36, 242.348, 4.383, 0.678)
pt3dadd(67.378, 242.484, 4.402, 0.678)
pt3dadd(67.404, 242.617, 4.421, 0.678)
pt3dadd(67.429, 242.749, 4.44, 0.678)
pt3dadd(67.431, 242.886, 4.459, 0.678)
pt3dadd(67.454, 243.017, 4.491, 0.678)
pt3dadd(67.447, 243.035, 4.509, 0.678)
pt3dadd(67.481, 243.163, 4.547, 0.678)
pt3dadd(67.515, 243.292, 4.584, 0.678)
pt3dadd(67.549, 243.42, 4.621, 0.678)
pt3dadd(67.583, 243.547, 4.658, 0.678)
pt3dadd(67.607, 243.678, 4.699, 0.678)
pt3dadd(67.629, 243.809, 4.74, 0.678)
pt3dadd(67.651, 243.941, 4.782, 0.678)
pt3dadd(67.673, 244.072, 4.823, 0.678)
pt3dadd(67.696, 244.202, 4.864, 0.678)
pt3dadd(67.688, 244.219, 4.883, 0.678)
pt3dadd(67.752, 244.333, 4.905, 0.678)
pt3dadd(67.818, 244.446, 4.926, 0.678)
pt3dadd(67.884, 244.56, 4.947, 0.678)
pt3dadd(67.95, 244.673, 4.968, 0.678)
pt3dadd(68.016, 244.786, 4.99, 0.678)
pt3dadd(68.073, 244.902, 5.028, 0.678)
pt3dadd(68.131, 245.016, 5.067, 0.678)
pt3dadd(68.189, 245.132, 5.105, 0.678)
pt3dadd(68.247, 245.248, 5.144, 0.678)
pt3dadd(68.318, 245.352, 5.182, 0.678)
pt3dadd(68.401, 245.444, 5.221, 0.678)
pt3dadd(68.484, 245.538, 5.26, 0.678)
pt3dadd(68.568, 245.629, 5.299, 0.678)
pt3dadd(68.648, 245.725, 5.333, 0.678)
pt3dadd(68.705, 245.842, 5.332, 0.678)
pt3dadd(68.762, 245.958, 5.33, 0.678)
pt3dadd(68.819, 246.074, 5.328, 0.678)
pt3dadd(68.876, 246.191, 5.327, 0.678)
pt3dadd(68.939, 246.305, 5.341, 0.678)
pt3dadd(69.003, 246.418, 5.359, 0.678)
pt3dadd(69.068, 246.532, 5.378, 0.678)
pt3dadd(69.133, 246.646, 5.397, 0.678)
pt3dadd(69.197, 246.76, 5.416, 0.678)
pt3dadd(69.275, 246.859, 5.417, 0.678)
pt3dadd(69.356, 246.953, 5.413, 0.678)
pt3dadd(69.437, 247.048, 5.409, 0.678)
pt3dadd(69.518, 247.14, 5.405, 0.678)
pt3dadd(69.593, 247.242, 5.407, 0.678)
pt3dadd(69.658, 247.356, 5.419, 0.678)
pt3dadd(69.723, 247.469, 5.43, 0.678)
pt3dadd(69.789, 247.582, 5.442, 0.678)
pt3dadd(69.854, 247.694, 5.454, 0.678)
pt3dadd(69.903, 247.802, 5.436, 0.678)
pt3dadd(69.978, 247.902, 5.459, 0.678)
pt3dadd(70.049, 247.988, 5.526, 0.678)
pt3dadd(70.143, 248.066, 5.56, 0.678)
pt3dadd(70.24, 248.141, 5.571, 0.678)
pt3dadd(70.319, 248.22, 5.548, 0.678)
pt3dadd(70.312, 248.238, 5.566, 0.678)
pt3dadd(70.373, 248.269, 5.507, 0.678)
pt3dadd(70.398, 248.237, 5.44, 0.678)
pt3dadd(70.414, 248.214, 5.37, 0.678)
pt3dadd(70.513, 248.226, 5.342, 0.678)
pt3dadd(70.611, 248.237, 5.314, 0.678)
pt3dadd(70.722, 248.268, 5.329, 0.678)
pt3dadd(70.834, 248.3, 5.348, 0.678)
pt3dadd(70.943, 248.341, 5.366, 0.678)
pt3dadd(71.043, 248.414, 5.385, 0.678)
pt3dadd(71.143, 248.485, 5.404, 0.678)
pt3dadd(71.243, 248.557, 5.423, 0.678)
pt3dadd(71.343, 248.629, 5.441, 0.678)
pt3dadd(71.443, 248.7, 5.46, 0.678)
pt3dadd(71.545, 248.758, 5.471, 0.678)
pt3dadd(71.652, 248.782, 5.461, 0.678)
pt3dadd(71.76, 248.806, 5.451, 0.678)
pt3dadd(71.817, 248.896, 5.414, 0.678)
pt3dadd(71.869, 248.996, 5.384, 0.678)
pt3dadd(71.915, 249.12, 5.386, 0.678)
pt3dadd(71.967, 249.239, 5.392, 0.678)
pt3dadd(72.048, 249.338, 5.41, 0.678)
pt3dadd(72.129, 249.436, 5.431, 0.678)
pt3dadd(72.217, 249.515, 5.483, 0.678)
pt3dadd(72.305, 249.594, 5.534, 0.678)
pt3dadd(72.298, 249.612, 5.553, 0.678)
pt3dadd(72.386, 249.691, 5.604, 0.678)
pt3dadd(72.488, 249.702, 5.664, 0.678)
pt3dadd(72.591, 249.714, 5.723, 0.678)
}
}
proc shape3d_151() {
apic[22] { pt3dadd(72.696, 249.701, 5.761, 0.678)
pt3dadd(72.803, 249.683, 5.779, 0.678)
pt3dadd(72.91, 249.665, 5.798, 0.678)
pt3dadd(73.017, 249.647, 5.817, 0.678)
pt3dadd(73.124, 249.629, 5.836, 0.678)
pt3dadd(73.231, 249.611, 5.855, 0.678)
pt3dadd(73.341, 249.604, 5.873, 0.678)
pt3dadd(73.453, 249.606, 5.892, 0.678)
pt3dadd(73.564, 249.61, 5.911, 0.678)
pt3dadd(73.643, 249.554, 5.91, 0.678)
pt3dadd(73.714, 249.486, 5.905, 0.678)
pt3dadd(73.716, 249.439, 5.842, 0.678)
pt3dadd(73.715, 249.394, 5.776, 0.678)
pt3dadd(73.733, 249.341, 5.717, 0.678)
pt3dadd(73.754, 249.288, 5.658, 0.678)
pt3dadd(73.841, 249.235, 5.666, 0.678)
pt3dadd(73.929, 249.181, 5.675, 0.678)
pt3dadd(74.017, 249.126, 5.684, 0.678)
pt3dadd(74.088, 249.055, 5.699, 0.678)
pt3dadd(74.148, 248.975, 5.717, 0.678)
pt3dadd(74.228, 248.915, 5.736, 0.678)
pt3dadd(74.318, 248.864, 5.755, 0.678)
pt3dadd(74.353, 248.772, 5.774, 0.678)
pt3dadd(74.355, 248.67, 5.793, 0.678)
pt3dadd(74.354, 248.568, 5.811, 0.678)
pt3dadd(74.369, 248.468, 5.83, 0.678)
pt3dadd(74.409, 248.376, 5.849, 0.678)
pt3dadd(74.437, 248.285, 5.889, 0.678)
pt3dadd(74.439, 248.227, 5.98, 0.678)
pt3dadd(74.431, 248.222, 6.096, 0.678)
pt3dadd(74.424, 248.239, 6.214, 0.678)
pt3dadd(74.43, 248.256, 6.332, 0.678)
pt3dadd(74.47, 248.233, 6.424, 0.678)
pt3dadd(74.534, 248.159, 6.467, 0.678)
pt3dadd(74.603, 248.088, 6.501, 0.678)
pt3dadd(74.681, 248.021, 6.526, 0.678)
pt3dadd(74.763, 247.968, 6.563, 0.678)
pt3dadd(74.854, 247.936, 6.623, 0.678)
pt3dadd(74.945, 247.904, 6.682, 0.678)
pt3dadd(75.001, 247.919, 6.784, 0.678)
pt3dadd(75.054, 247.937, 6.889, 0.678)
pt3dadd(75.063, 247.892, 6.982, 0.678)
pt3dadd(75.056, 247.826, 7.072, 0.678)
pt3dadd(75.049, 247.759, 7.161, 0.678)
pt3dadd(75.041, 247.674, 7.233, 0.678)
pt3dadd(75.034, 247.589, 7.302, 0.678)
pt3dadd(75.035, 247.571, 7.406, 0.678)
pt3dadd(75.039, 247.582, 7.524, 0.678)
pt3dadd(75.043, 247.592, 7.642, 0.678)
pt3dadd(75.055, 247.59, 7.755, 0.678)
pt3dadd(75.048, 247.607, 7.774, 0.678)
pt3dadd(75.084, 247.566, 7.872, 0.678)
pt3dadd(75.136, 247.529, 7.963, 0.678)
pt3dadd(75.208, 247.496, 8.043, 0.678)
pt3dadd(75.281, 247.466, 8.124, 0.678)
pt3dadd(75.362, 247.484, 8.211, 0.678)
pt3dadd(75.442, 247.502, 8.298, 0.678)
pt3dadd(75.55, 247.492, 8.323, 0.678)
pt3dadd(75.659, 247.481, 8.345, 0.678)
pt3dadd(75.768, 247.469, 8.368, 0.678)
pt3dadd(75.866, 247.433, 8.387, 0.678)
pt3dadd(75.96, 247.387, 8.406, 0.678)
pt3dadd(76.066, 247.374, 8.425, 0.678)
pt3dadd(76.059, 247.391, 8.444, 0.678)
pt3dadd(76.051, 247.409, 8.462, 0.678)
pt3dadd(76.044, 247.427, 8.481, 0.678)
}
apic[23] {pt3dclear()
pt3dadd(73.205, 181.051, 5.393, 2.486)
pt3dadd(73.206, 181.038, 5.375, 2.48)
pt3dadd(73.127, 181.032, 5.297, 2.416)
pt3dadd(73.048, 181.025, 5.219, 2.354)
pt3dadd(72.969, 181.019, 5.141, 2.29)
pt3dadd(72.89, 181.012, 5.063, 2.226)
pt3dadd(72.811, 181.006, 4.985, 2.162)
pt3dadd(72.732, 180.998, 4.907, 2.098)
pt3dadd(72.653, 180.992, 4.829, 2.034)
pt3dadd(72.574, 180.986, 4.751, 1.97)
pt3dadd(72.495, 180.979, 4.673, 1.906)
pt3dadd(72.416, 180.973, 4.595, 1.842)
pt3dadd(72.337, 180.966, 4.517, 1.778)
pt3dadd(72.258, 180.96, 4.439, 1.714)
pt3dadd(72.179, 180.953, 4.361, 1.65)
pt3dadd(72.1, 180.947, 4.283, 1.588)
pt3dadd(72.02, 180.937, 4.207, 1.524)
pt3dadd(71.933, 180.904, 4.14, 1.462)
pt3dadd(71.846, 180.871, 4.073, 1.398)
pt3dadd(71.758, 180.838, 4.006, 1.336)
pt3dadd(71.671, 180.805, 3.94, 1.274)
pt3dadd(71.584, 180.772, 3.873, 1.212)
pt3dadd(71.496, 180.739, 3.806, 1.148)
pt3dadd(71.409, 180.706, 3.739, 1.086)
pt3dadd(71.322, 180.672, 3.673, 1.024)
pt3dadd(71.234, 180.64, 3.606, 0.962)
pt3dadd(71.146, 180.602, 3.542, 0.904)
pt3dadd(71.057, 180.552, 3.485, 0.862)
pt3dadd(70.967, 180.502, 3.429, 0.82)
pt3dadd(70.877, 180.452, 3.372, 0.778)
pt3dadd(70.787, 180.402, 3.316, 0.736)
pt3dadd(70.698, 180.352, 3.259, 0.694)
pt3dadd(70.608, 180.301, 3.203, 0.652)
pt3dadd(70.518, 180.252, 3.146, 0.61)
pt3dadd(70.428, 180.203, 3.09, 0.568)
pt3dadd(70.338, 180.151, 3.033, 0.526)
pt3dadd(70.25, 180.094, 2.983, 0.504)
pt3dadd(70.162, 180.019, 2.945, 0.518)
pt3dadd(70.074, 179.947, 2.907, 0.534)
pt3dadd(69.987, 179.873, 2.869, 0.548)
pt3dadd(69.899, 179.8, 2.831, 0.562)
pt3dadd(69.811, 179.726, 2.792, 0.578)
pt3dadd(69.724, 179.653, 2.754, 0.592)
pt3dadd(69.636, 179.58, 2.716, 0.608)
pt3dadd(69.548, 179.506, 2.678, 0.622)
pt3dadd(69.461, 179.432, 2.64, 0.638)
pt3dadd(69.379, 179.351, 2.604, 0.63)
pt3dadd(69.308, 179.256, 2.572, 0.59)
pt3dadd(69.237, 179.161, 2.541, 0.548)
pt3dadd(69.166, 179.068, 2.509, 0.506)
pt3dadd(69.095, 178.973, 2.477, 0.464)
pt3dadd(69.099, 178.966, 2.471, 0.464)
pt3dadd(69.103, 178.96, 2.465, 0.464)
pt3dadd(69.032, 178.865, 2.434, 0.424)
pt3dadd(68.961, 178.77, 2.402, 0.382)
pt3dadd(68.889, 178.675, 2.37, 0.34)
pt3dadd(68.818, 178.582, 2.338, 0.3)
pt3dadd(68.747, 178.486, 2.307, 0.258)
pt3dadd(68.67, 178.404, 2.268, 0.24)
pt3dadd(68.583, 178.34, 2.217, 0.26)
pt3dadd(68.496, 178.277, 2.167, 0.278)
pt3dadd(68.409, 178.214, 2.116, 0.298)
pt3dadd(68.322, 178.151, 2.065, 0.318)
pt3dadd(68.235, 178.087, 2.015, 0.336)
pt3dadd(68.148, 178.024, 1.964, 0.356)
pt3dadd(68.061, 177.961, 1.914, 0.376)
pt3dadd(67.974, 177.896, 1.863, 0.394)
pt3dadd(67.887, 177.834, 1.813, 0.414)
pt3dadd(67.794, 177.779, 1.765, 0.448)
pt3dadd(67.693, 177.734, 1.724, 0.508)
pt3dadd(67.591, 177.691, 1.682, 0.566)
pt3dadd(67.49, 177.647, 1.641, 0.624)
pt3dadd(67.388, 177.604, 1.599, 0.684)
pt3dadd(67.286, 177.559, 1.557, 0.742)
pt3dadd(67.185, 177.516, 1.516, 0.8)
pt3dadd(67.083, 177.474, 1.474, 0.858)
pt3dadd(66.981, 177.43, 1.432, 0.918)
pt3dadd(66.88, 177.386, 1.391, 0.976)
pt3dadd(66.779, 177.335, 1.355, 1.014)
pt3dadd(66.679, 177.277, 1.325, 1.026)
pt3dadd(66.579, 177.217, 1.296, 1.038)
pt3dadd(66.479, 177.158, 1.267, 1.05)
pt3dadd(66.378, 177.1, 1.238, 1.064)
pt3dadd(66.383, 177.094, 1.232, 1.064)
pt3dadd(66.282, 177.035, 1.203, 1.076)
pt3dadd(66.182, 176.975, 1.174, 1.088)
pt3dadd(66.082, 176.917, 1.144, 1.1)
pt3dadd(65.982, 176.857, 1.115, 1.112)
pt3dadd(65.882, 176.798, 1.086, 1.124)
pt3dadd(65.787, 176.737, 1.05, 1.13)
pt3dadd(65.696, 176.672, 1.005, 1.13)
pt3dadd(65.606, 176.608, 0.961, 1.13)
pt3dadd(65.516, 176.543, 0.917, 1.13)
pt3dadd(65.426, 176.479, 0.872, 1.13)
pt3dadd(65.336, 176.413, 0.828, 1.13)
pt3dadd(65.246, 176.35, 0.783, 1.13)
pt3dadd(65.156, 176.284, 0.739, 1.13)
pt3dadd(65.065, 176.22, 0.695, 1.13)
pt3dadd(64.975, 176.155, 0.65, 1.13)
pt3dadd(64.887, 176.083, 0.614, 1.12)
pt3dadd(64.798, 176.006, 0.583, 1.102)
pt3dadd(64.71, 175.928, 0.552, 1.084)
pt3dadd(64.622, 175.852, 0.521, 1.068)
pt3dadd(64.534, 175.774, 0.491, 1.05)
pt3dadd(64.446, 175.697, 0.46, 1.032)
pt3dadd(64.358, 175.619, 0.429, 1.014)
pt3dadd(64.27, 175.542, 0.398, 0.996)
pt3dadd(64.182, 175.464, 0.368, 0.98)
pt3dadd(64.094, 175.387, 0.337, 0.962)
pt3dadd(63.994, 175.325, 0.323, 0.938)
pt3dadd(63.889, 175.268, 0.318, 0.91)
pt3dadd(63.785, 175.212, 0.312, 0.884)
pt3dadd(63.68, 175.154, 0.306, 0.858)
pt3dadd(63.575, 175.098, 0.301, 0.83)
pt3dadd(63.47, 175.042, 0.295, 0.804)
pt3dadd(63.365, 174.985, 0.29, 0.776)
pt3dadd(63.26, 174.928, 0.284, 0.75)
pt3dadd(63.155, 174.871, 0.278, 0.724)
pt3dadd(63.05, 174.816, 0.273, 0.696)
pt3dadd(62.978, 174.785, 0.332, 0.69)
pt3dadd(62.913, 174.761, 0.407, 0.688)
pt3dadd(62.847, 174.736, 0.481, 0.688)
pt3dadd(62.782, 174.71, 0.555, 0.686)
pt3dadd(62.786, 174.703, 0.549, 0.686)
pt3dadd(62.721, 174.679, 0.623, 0.684)
pt3dadd(62.656, 174.655, 0.698, 0.684)
pt3dadd(62.59, 174.63, 0.772, 0.682)
pt3dadd(62.525, 174.606, 0.846, 0.68)
pt3dadd(62.46, 174.581, 0.92, 0.68)
pt3dadd(62.394, 174.557, 0.994, 0.678)
pt3dadd(62.399, 174.55, 0.988, 0.678)
pt3dadd(62.403, 174.544, 0.983, 0.678)
pt3dadd(62.407, 174.536, 0.977, 0.678)
pt3dadd(62.411, 174.53, 0.971, 0.678)
}
}
proc shape3d_152() {
apic[23] { pt3dadd(62.295, 174.518, 0.965, 0.708)
pt3dadd(62.18, 174.505, 0.959, 0.738)
pt3dadd(62.064, 174.493, 0.953, 0.768)
pt3dadd(61.948, 174.48, 0.947, 0.798)
pt3dadd(61.833, 174.468, 0.941, 0.828)
pt3dadd(61.717, 174.455, 0.935, 0.858)
pt3dadd(61.602, 174.436, 0.929, 0.888)
pt3dadd(61.49, 174.402, 0.923, 0.914)
pt3dadd(61.377, 174.367, 0.917, 0.94)
pt3dadd(61.265, 174.334, 0.912, 0.966)
pt3dadd(61.152, 174.3, 0.906, 0.992)
pt3dadd(61.039, 174.265, 0.9, 1.016)
pt3dadd(60.936, 174.214, 0.882, 1.046)
pt3dadd(60.841, 174.144, 0.854, 1.08)
pt3dadd(60.747, 174.076, 0.826, 1.114)
pt3dadd(60.652, 174.006, 0.797, 1.148)
pt3dadd(60.557, 173.939, 0.77, 1.182)
pt3dadd(60.443, 173.91, 0.764, 1.202)
pt3dadd(60.329, 173.881, 0.758, 1.224)
pt3dadd(60.216, 173.852, 0.752, 1.244)
pt3dadd(60.102, 173.824, 0.746, 1.264)
pt3dadd(59.988, 173.795, 0.74, 1.286)
pt3dadd(59.875, 173.764, 0.735, 1.306)
pt3dadd(59.775, 173.698, 0.729, 1.332)
pt3dadd(59.675, 173.632, 0.723, 1.356)
pt3dadd(59.575, 173.564, 0.717, 1.38)
pt3dadd(59.476, 173.498, 0.711, 1.406)
pt3dadd(59.376, 173.432, 0.705, 1.43)
pt3dadd(59.261, 173.416, 0.697, 1.456)
pt3dadd(59.146, 173.402, 0.69, 1.482)
pt3dadd(59.03, 173.39, 0.682, 1.51)
pt3dadd(58.914, 173.377, 0.675, 1.536)
pt3dadd(58.799, 173.365, 0.667, 1.564)
pt3dadd(58.683, 173.352, 0.659, 1.59)
pt3dadd(58.574, 173.327, 0.637, 1.636)
pt3dadd(58.479, 173.276, 0.59, 1.718)
pt3dadd(58.374, 173.24, 0.553, 1.774)
pt3dadd(58.262, 173.216, 0.528, 1.806)
pt3dadd(58.152, 173.196, 0.496, 1.828)
pt3dadd(58.053, 173.189, 0.44, 1.806)
pt3dadd(57.955, 173.183, 0.383, 1.782)
pt3dadd(57.959, 173.176, 0.377, 1.782)
pt3dadd(57.939, 173.146, 0.275, 1.714)
pt3dadd(57.919, 173.114, 0.173, 1.646)
pt3dadd(57.834, 173.059, 0.138, 1.59)
pt3dadd(57.732, 172.998, 0.119, 1.54)
pt3dadd(57.631, 172.937, 0.1, 1.488)
pt3dadd(57.523, 172.897, 0.085, 1.436)
pt3dadd(57.408, 172.89, 0.075, 1.384)
pt3dadd(57.292, 172.884, 0.065, 1.332)
pt3dadd(57.187, 172.878, 0.028, 1.288)
pt3dadd(57.094, 172.871, -0.036, 1.252)
pt3dadd(57.001, 172.865, -0.1, 1.218)
pt3dadd(56.929, 172.854, -0.181, 1.19)
pt3dadd(56.87, 172.841, -0.272, 1.166)
pt3dadd(56.796, 172.807, -0.347, 1.11)
pt3dadd(56.695, 172.782, -0.397, 1.094)
pt3dadd(56.593, 172.759, -0.448, 1.084)
pt3dadd(56.491, 172.735, -0.498, 1.074)
pt3dadd(56.389, 172.712, -0.548, 1.064)
pt3dadd(56.296, 172.692, -0.606, 1.038)
pt3dadd(56.237, 172.686, -0.697, 0.948)
pt3dadd(56.167, 172.679, -0.781, 0.904)
pt3dadd(56.102, 172.673, -0.868, 0.85)
pt3dadd(56.041, 172.666, -0.957, 0.706)
pt3dadd(55.946, 172.639, -1.012, 0.528)
pt3dadd(55.847, 172.578, -1.026, 0.402)
pt3dadd(55.758, 172.496, -1.031, 0.3)
pt3dadd(55.67, 172.423, -1.013, 0.292)
pt3dadd(55.57, 172.393, -0.975, 0.352)
pt3dadd(55.464, 172.387, -0.996, 0.34)
pt3dadd(55.368, 172.38, -1.057, 0.316)
pt3dadd(55.289, 172.374, -1.132, 0.292)
pt3dadd(55.232, 172.367, -1.224, 0.268)
pt3dadd(55.166, 172.351, -1.304, 0.252)
pt3dadd(55.065, 172.303, -1.345, 0.252)
pt3dadd(54.965, 172.254, -1.385, 0.252)
pt3dadd(54.863, 172.217, -1.429, 0.26)
pt3dadd(54.76, 172.183, -1.474, 0.272)
pt3dadd(54.66, 172.127, -1.503, 0.328)
pt3dadd(54.549, 172.087, -1.509, 0.348)
pt3dadd(54.438, 172.048, -1.515, 0.368)
pt3dadd(54.327, 172.008, -1.524, 0.402)
pt3dadd(54.216, 171.967, -1.534, 0.446)
pt3dadd(54.11, 171.936, -1.56, 0.49)
pt3dadd(54.016, 171.929, -1.622, 0.536)
pt3dadd(53.928, 171.917, -1.688, 0.584)
pt3dadd(53.886, 171.864, -1.778, 0.626)
pt3dadd(53.825, 171.817, -1.811, 0.658)
pt3dadd(53.736, 171.78, -1.759, 0.674)
pt3dadd(53.683, 171.734, -1.687, 0.704)
pt3dadd(53.675, 171.677, -1.605, 0.752)
pt3dadd(53.679, 171.638, -1.514, 0.796)
pt3dadd(53.666, 171.593, -1.428, 0.884)
pt3dadd(53.586, 171.522, -1.395, 0.982)
pt3dadd(53.484, 171.46, -1.398, 1.062)
pt3dadd(53.379, 171.407, -1.404, 1.15)
pt3dadd(53.267, 171.367, -1.41, 1.18)
pt3dadd(53.156, 171.328, -1.416, 1.158)
pt3dadd(53.067, 171.248, -1.421, 1.162)
pt3dadd(52.989, 171.154, -1.427, 1.196)
pt3dadd(52.911, 171.06, -1.433, 1.236)
pt3dadd(52.834, 170.965, -1.439, 1.33)
pt3dadd(52.757, 170.87, -1.445, 1.426)
pt3dadd(52.761, 170.863, -1.451, 1.426)
pt3dadd(52.648, 170.843, -1.457, 1.532)
pt3dadd(52.532, 170.827, -1.463, 1.64)
pt3dadd(52.418, 170.806, -1.469, 1.754)
pt3dadd(52.309, 170.76, -1.475, 1.892)
pt3dadd(52.2, 170.713, -1.481, 2.03)
pt3dadd(52.085, 170.693, -1.487, 2.122)
pt3dadd(51.97, 170.68, -1.493, 2.202)
pt3dadd(51.874, 170.61, -1.498, 2.196)
pt3dadd(51.779, 170.534, -1.504, 2.182)
pt3dadd(51.685, 170.459, -1.51, 2.166)
pt3dadd(51.591, 170.383, -1.516, 2.152)
pt3dadd(51.497, 170.309, -1.522, 2.136)
pt3dadd(51.416, 170.218, -1.528, 2.09)
pt3dadd(51.337, 170.125, -1.534, 2.04)
pt3dadd(51.258, 170.033, -1.54, 1.988)
pt3dadd(51.178, 169.939, -1.546, 1.938)
pt3dadd(51.099, 169.847, -1.552, 1.888)
pt3dadd(51.008, 169.768, -1.558, 1.832)
pt3dadd(50.916, 169.688, -1.564, 1.778)
pt3dadd(50.824, 169.61, -1.57, 1.722)
pt3dadd(50.732, 169.532, -1.575, 1.666)
pt3dadd(50.64, 169.453, -1.581, 1.612)
pt3dadd(50.537, 169.394, -1.587, 1.568)
pt3dadd(50.432, 169.337, -1.593, 1.524)
pt3dadd(50.328, 169.28, -1.599, 1.482)
pt3dadd(50.223, 169.223, -1.605, 1.438)
pt3dadd(50.118, 169.165, -1.611, 1.396)
pt3dadd(50.015, 169.106, -1.617, 1.374)
pt3dadd(49.912, 169.046, -1.623, 1.362)
pt3dadd(49.808, 168.986, -1.629, 1.348)
pt3dadd(49.705, 168.926, -1.635, 1.338)
pt3dadd(49.602, 168.866, -1.641, 1.326)
pt3dadd(49.499, 168.805, -1.647, 1.314)
pt3dadd(49.396, 168.745, -1.652, 1.302)
pt3dadd(49.292, 168.685, -1.658, 1.29)
pt3dadd(49.189, 168.625, -1.664, 1.278)
pt3dadd(49.086, 168.565, -1.67, 1.264)
pt3dadd(48.981, 168.509, -1.677, 1.258)
pt3dadd(48.87, 168.469, -1.684, 1.266)
pt3dadd(48.759, 168.43, -1.692, 1.276)
pt3dadd(48.648, 168.389, -1.7, 1.284)
pt3dadd(48.537, 168.349, -1.708, 1.294)
pt3dadd(48.426, 168.308, -1.716, 1.302)
pt3dadd(48.318, 168.263, -1.735, 1.334)
pt3dadd(48.212, 168.215, -1.759, 1.376)
pt3dadd(48.106, 168.167, -1.784, 1.418)
pt3dadd(48, 168.119, -1.808, 1.458)
pt3dadd(47.893, 168.071, -1.832, 1.5)
pt3dadd(47.791, 168.011, -1.841, 1.544)
pt3dadd(47.689, 167.947, -1.847, 1.588)
pt3dadd(47.588, 167.884, -1.853, 1.63)
pt3dadd(47.486, 167.821, -1.859, 1.674)
pt3dadd(47.385, 167.758, -1.865, 1.718)
pt3dadd(47.28, 167.704, -1.885, 1.74)
pt3dadd(47.175, 167.656, -1.912, 1.75)
pt3dadd(47.07, 167.606, -1.939, 1.76)
pt3dadd(46.965, 167.558, -1.966, 1.772)
pt3dadd(46.859, 167.509, -1.993, 1.782)
pt3dadd(46.765, 167.44, -2.019, 1.758)
pt3dadd(46.671, 167.368, -2.044, 1.73)
pt3dadd(46.577, 167.296, -2.07, 1.702)
pt3dadd(46.483, 167.225, -2.096, 1.674)
pt3dadd(46.391, 167.17, -2.137, 1.644)
pt3dadd(46.299, 167.14, -2.2, 1.61)
pt3dadd(46.208, 167.11, -2.264, 1.576)
pt3dadd(46.117, 167.078, -2.327, 1.542)
pt3dadd(46.025, 167.048, -2.39, 1.508)
pt3dadd(45.976, 166.992, -2.474, 1.494)
pt3dadd(45.927, 166.93, -2.555, 1.488)
pt3dadd(45.863, 166.84, -2.605, 1.53)
pt3dadd(45.796, 166.758, -2.66, 1.574)
pt3dadd(45.723, 166.69, -2.724, 1.616)
pt3dadd(45.625, 166.646, -2.759, 1.632)
pt3dadd(45.513, 166.618, -2.78, 1.632)
pt3dadd(45.404, 166.588, -2.809, 1.63)
pt3dadd(45.301, 166.556, -2.855, 1.622)
pt3dadd(45.197, 166.526, -2.9, 1.614)
pt3dadd(45.094, 166.495, -2.946, 1.608)
pt3dadd(45.075, 166.471, -3.049, 1.596)
pt3dadd(45.056, 166.447, -3.152, 1.586)
pt3dadd(44.999, 166.378, -3.209, 1.582)
pt3dadd(44.925, 166.289, -3.247, 1.582)
pt3dadd(44.852, 166.199, -3.287, 1.578)
pt3dadd(44.782, 166.11, -3.33, 1.564)
pt3dadd(44.711, 166.015, -3.354, 1.556)
pt3dadd(44.618, 165.941, -3.36, 1.566)
pt3dadd(44.518, 165.874, -3.366, 1.578)
pt3dadd(44.42, 165.84, -3.405, 1.604)
pt3dadd(44.323, 165.827, -3.463, 1.64)
pt3dadd(44.25, 165.808, -3.54, 1.65)
pt3dadd(44.201, 165.781, -3.634, 1.638)
pt3dadd(44.141, 165.727, -3.707, 1.61)
pt3dadd(44.069, 165.644, -3.757, 1.568)
pt3dadd(43.993, 165.568, -3.808, 1.532)
pt3dadd(43.915, 165.492, -3.86, 1.498)
}
}
proc shape3d_153() {
apic[23] { pt3dadd(43.837, 165.418, -3.911, 1.462)
pt3dadd(43.841, 165.41, -3.917, 1.462)
pt3dadd(43.738, 165.359, -3.931, 1.456)
pt3dadd(43.742, 165.353, -3.937, 1.456)
pt3dadd(43.633, 165.307, -3.943, 1.456)
pt3dadd(43.637, 165.3, -3.949, 1.456)
pt3dadd(43.526, 165.265, -3.955, 1.456)
pt3dadd(43.412, 165.236, -3.961, 1.452)
pt3dadd(43.299, 165.203, -3.967, 1.442)
pt3dadd(43.187, 165.169, -3.973, 1.434)
pt3dadd(43.074, 165.134, -3.979, 1.426)
pt3dadd(42.961, 165.101, -3.985, 1.418)
pt3dadd(42.849, 165.067, -3.991, 1.408)
pt3dadd(42.741, 165.041, -4.025, 1.39)
pt3dadd(42.636, 165.018, -4.07, 1.37)
pt3dadd(42.531, 164.995, -4.115, 1.35)
pt3dadd(42.426, 164.972, -4.159, 1.33)
pt3dadd(42.321, 164.95, -4.204, 1.308)
pt3dadd(42.228, 164.903, -4.258, 1.28)
pt3dadd(42.233, 164.896, -4.264, 1.28)
pt3dadd(42.143, 164.845, -4.32, 1.25)
pt3dadd(42.053, 164.795, -4.376, 1.22)
pt3dadd(41.962, 164.744, -4.432, 1.192)
pt3dadd(41.857, 164.707, -4.459, 1.162)
pt3dadd(41.744, 164.68, -4.469, 1.13)
pt3dadd(41.633, 164.647, -4.485, 1.102)
pt3dadd(41.542, 164.59, -4.534, 1.074)
pt3dadd(41.468, 164.515, -4.582, 1.054)
pt3dadd(41.429, 164.41, -4.63, 1.054)
pt3dadd(41.39, 164.303, -4.677, 1.042)
pt3dadd(41.351, 164.196, -4.725, 1.016)
pt3dadd(41.308, 164.132, -4.801, 0.986)
pt3dadd(41.264, 164.096, -4.895, 0.956)
pt3dadd(41.219, 164.062, -4.989, 0.924)
pt3dadd(41.163, 164.029, -5.077, 0.886)
pt3dadd(41.084, 164.002, -5.153, 0.834)
pt3dadd(40.994, 163.984, -5.216, 0.796)
pt3dadd(40.888, 163.976, -5.262, 0.78)
pt3dadd(40.782, 163.97, -5.308, 0.764)
pt3dadd(40.674, 163.963, -5.346, 0.76)
pt3dadd(40.56, 163.957, -5.369, 0.78)
pt3dadd(40.446, 163.95, -5.392, 0.8)
pt3dadd(40.34, 163.943, -5.436, 0.88)
pt3dadd(40.231, 163.913, -5.469, 0.91)
pt3dadd(40.122, 163.882, -5.502, 0.94)
pt3dadd(40.013, 163.85, -5.535, 0.972)
pt3dadd(39.905, 163.82, -5.567, 1.002)
pt3dadd(39.795, 163.792, -5.598, 1.034)
pt3dadd(39.679, 163.784, -5.608, 1.076)
pt3dadd(39.564, 163.778, -5.618, 1.12)
pt3dadd(39.451, 163.771, -5.636, 1.166)
pt3dadd(39.352, 163.765, -5.693, 1.224)
pt3dadd(39.252, 163.759, -5.75, 1.28)
pt3dadd(39.155, 163.746, -5.808, 1.304)
pt3dadd(39.057, 163.733, -5.867, 1.328)
pt3dadd(38.982, 163.67, -5.93, 1.356)
pt3dadd(38.915, 163.602, -5.996, 1.384)
pt3dadd(38.919, 163.596, -6.002, 1.384)
pt3dadd(38.879, 163.522, -6.082, 1.406)
pt3dadd(38.801, 163.447, -6.133, 1.412)
pt3dadd(38.721, 163.373, -6.182, 1.418)
pt3dadd(38.64, 163.298, -6.231, 1.424)
pt3dadd(38.56, 163.224, -6.28, 1.43)
pt3dadd(38.477, 163.14, -6.305, 1.432)
pt3dadd(38.393, 163.054, -6.326, 1.432)
pt3dadd(38.309, 162.968, -6.346, 1.432)
pt3dadd(38.225, 162.882, -6.367, 1.432)
pt3dadd(38.14, 162.797, -6.389, 1.436)
pt3dadd(38.054, 162.714, -6.412, 1.448)
pt3dadd(37.974, 162.629, -6.443, 1.468)
pt3dadd(37.903, 162.54, -6.486, 1.496)
pt3dadd(37.875, 162.43, -6.515, 1.506)
pt3dadd(37.874, 162.304, -6.533, 1.506)
pt3dadd(37.873, 162.179, -6.552, 1.506)
pt3dadd(37.877, 162.052, -6.562, 1.472)
pt3dadd(37.881, 161.926, -6.572, 1.436)
pt3dadd(37.885, 161.802, -6.588, 1.398)
pt3dadd(37.885, 161.694, -6.647, 1.342)
pt3dadd(37.886, 161.586, -6.706, 1.286)
pt3dadd(37.886, 161.478, -6.765, 1.228)
pt3dadd(37.891, 161.471, -6.771, 1.228)
pt3dadd(37.895, 161.465, -6.777, 1.228)
pt3dadd(37.839, 161.376, -6.805, 1.15)
pt3dadd(37.843, 161.37, -6.811, 1.15)
pt3dadd(37.749, 161.296, -6.817, 1.058)
pt3dadd(37.665, 161.216, -6.841, 0.982)
pt3dadd(37.595, 161.13, -6.89, 0.928)
pt3dadd(37.528, 161.047, -6.942, 0.876)
pt3dadd(37.49, 160.998, -7.035, 0.85)
pt3dadd(37.456, 160.946, -7.128, 0.842)
pt3dadd(37.409, 160.874, -7.197, 0.888)
pt3dadd(37.332, 160.796, -7.246, 0.906)
pt3dadd(37.255, 160.718, -7.295, 0.926)
pt3dadd(37.178, 160.64, -7.345, 0.944)
pt3dadd(37.182, 160.633, -7.351, 0.944)
pt3dadd(37.114, 160.543, -7.388, 0.958)
pt3dadd(37.058, 160.434, -7.408, 0.97)
pt3dadd(37.002, 160.325, -7.428, 0.98)
pt3dadd(36.947, 160.216, -7.449, 0.99)
pt3dadd(36.891, 160.106, -7.469, 1.002)
pt3dadd(36.831, 160.006, -7.503, 1)
pt3dadd(36.769, 159.907, -7.543, 0.994)
pt3dadd(36.707, 159.81, -7.583, 0.988)
pt3dadd(36.645, 159.712, -7.623, 0.982)
pt3dadd(36.578, 159.62, -7.668, 0.968)
pt3dadd(36.508, 159.536, -7.717, 0.942)
pt3dadd(36.437, 159.451, -7.767, 0.918)
pt3dadd(36.367, 159.367, -7.816, 0.894)
pt3dadd(36.291, 159.282, -7.858, 0.874)
pt3dadd(36.209, 159.199, -7.89, 0.862)
pt3dadd(36.127, 159.115, -7.922, 0.852)
pt3dadd(36.045, 159.031, -7.953, 0.84)
pt3dadd(35.963, 158.947, -7.984, 0.828)
pt3dadd(35.884, 158.855, -8.005, 0.822)
pt3dadd(35.806, 158.762, -8.025, 0.818)
pt3dadd(35.728, 158.671, -8.046, 0.812)
pt3dadd(35.649, 158.579, -8.067, 0.806)
pt3dadd(35.571, 158.491, -8.097, 0.814)
pt3dadd(35.493, 158.405, -8.134, 0.832)
pt3dadd(35.416, 158.32, -8.172, 0.85)
pt3dadd(35.338, 158.234, -8.209, 0.866)
pt3dadd(35.256, 158.15, -8.236, 0.884)
pt3dadd(35.166, 158.069, -8.242, 0.9)
pt3dadd(35.077, 157.987, -8.248, 0.914)
pt3dadd(34.987, 157.906, -8.254, 0.93)
pt3dadd(34.898, 157.824, -8.26, 0.944)
pt3dadd(34.817, 157.735, -8.266, 0.962)
pt3dadd(34.752, 157.63, -8.272, 0.982)
pt3dadd(34.687, 157.525, -8.278, 1.002)
pt3dadd(34.622, 157.421, -8.284, 1.022)
pt3dadd(34.557, 157.316, -8.29, 1.042)
pt3dadd(34.482, 157.222, -8.295, 1.056)
pt3dadd(34.386, 157.15, -8.301, 1.062)
pt3dadd(34.29, 157.076, -8.307, 1.066)
pt3dadd(34.194, 157.004, -8.313, 1.072)
pt3dadd(34.098, 156.931, -8.319, 1.076)
pt3dadd(34.005, 156.856, -8.325, 1.078)
pt3dadd(34.009, 156.85, -8.331, 1.078)
pt3dadd(33.922, 156.764, -8.337, 1.066)
pt3dadd(33.834, 156.68, -8.343, 1.058)
pt3dadd(33.747, 156.596, -8.349, 1.046)
pt3dadd(33.66, 156.512, -8.355, 1.036)
pt3dadd(33.567, 156.437, -8.361, 1.02)
pt3dadd(33.461, 156.384, -8.366, 0.986)
pt3dadd(33.354, 156.331, -8.372, 0.954)
pt3dadd(33.248, 156.277, -8.378, 0.966)
pt3dadd(33.141, 156.224, -8.384, 0.976)
pt3dadd(33.086, 156.124, -8.39, 1.04)
pt3dadd(33.051, 156.004, -8.396, 1.126)
pt3dadd(33.028, 155.881, -8.402, 1.212)
pt3dadd(33.028, 155.755, -8.408, 1.3)
pt3dadd(33.027, 155.628, -8.414, 1.386)
pt3dadd(32.979, 155.532, -8.42, 1.448)
pt3dadd(32.878, 155.467, -8.426, 1.482)
pt3dadd(32.777, 155.402, -8.432, 1.516)
pt3dadd(32.676, 155.338, -8.438, 1.55)
pt3dadd(32.569, 155.288, -8.443, 1.522)
pt3dadd(32.46, 155.242, -8.449, 1.48)
pt3dadd(32.394, 155.161, -8.455, 1.432)
pt3dadd(32.398, 155.155, -8.461, 1.432)
pt3dadd(32.387, 155.029, -8.467, 1.376)
pt3dadd(32.377, 154.903, -8.473, 1.32)
pt3dadd(32.366, 154.778, -8.479, 1.264)
pt3dadd(32.334, 154.657, -8.485, 1.2)
pt3dadd(32.299, 154.537, -8.491, 1.138)
pt3dadd(32.246, 154.427, -8.497, 1.104)
pt3dadd(32.17, 154.331, -8.503, 1.112)
pt3dadd(32.094, 154.236, -8.509, 1.122)
pt3dadd(32.017, 154.14, -8.515, 1.134)
pt3dadd(31.94, 154.045, -8.52, 1.144)
pt3dadd(31.864, 153.95, -8.526, 1.154)
pt3dadd(31.761, 153.894, -8.532, 1.162)
pt3dadd(31.652, 153.846, -8.538, 1.172)
pt3dadd(31.544, 153.798, -8.544, 1.182)
pt3dadd(31.435, 153.75, -8.55, 1.19)
pt3dadd(31.327, 153.701, -8.556, 1.2)
pt3dadd(31.223, 153.646, -8.562, 1.202)
pt3dadd(31.125, 153.576, -8.568, 1.192)
pt3dadd(31.027, 153.506, -8.574, 1.182)
pt3dadd(30.929, 153.437, -8.58, 1.172)
pt3dadd(30.831, 153.367, -8.586, 1.162)
pt3dadd(30.743, 153.287, -8.592, 1.15)
pt3dadd(30.678, 153.182, -8.597, 1.13)
pt3dadd(30.613, 153.078, -8.603, 1.11)
pt3dadd(30.548, 152.974, -8.609, 1.09)
pt3dadd(30.483, 152.868, -8.615, 1.07)
pt3dadd(30.419, 152.764, -8.621, 1.036)
pt3dadd(30.355, 152.658, -8.627, 0.966)
pt3dadd(30.285, 152.563, -8.633, 0.9)
pt3dadd(30.17, 152.546, -8.639, 0.864)
pt3dadd(30.054, 152.531, -8.645, 0.828)
pt3dadd(29.956, 152.485, -8.651, 0.8)
pt3dadd(29.96, 152.479, -8.657, 0.8)
pt3dadd(29.964, 152.472, -8.663, 0.8)
pt3dadd(29.9, 152.366, -8.669, 0.788)
pt3dadd(29.834, 152.263, -8.674, 0.782)
pt3dadd(29.757, 152.17, -8.68, 0.806)
pt3dadd(29.681, 152.074, -8.686, 0.832)
pt3dadd(29.642, 151.955, -8.692, 0.88)
pt3dadd(29.59, 151.843, -8.698, 0.912)
}
}
proc shape3d_154() {
apic[23] { pt3dadd(29.526, 151.739, -8.704, 0.926)
pt3dadd(29.461, 151.634, -8.71, 0.942)
pt3dadd(29.396, 151.529, -8.716, 0.956)
pt3dadd(29.331, 151.424, -8.722, 0.972)
pt3dadd(29.251, 151.337, -8.728, 0.986)
pt3dadd(29.152, 151.267, -8.734, 1.002)
pt3dadd(29.055, 151.198, -8.74, 1.016)
pt3dadd(28.956, 151.128, -8.746, 1.03)
pt3dadd(28.859, 151.058, -8.751, 1.046)
pt3dadd(28.755, 151.002, -8.757, 1.058)
pt3dadd(28.643, 150.965, -8.763, 1.066)
pt3dadd(28.531, 150.929, -8.769, 1.076)
pt3dadd(28.419, 150.892, -8.775, 1.084)
pt3dadd(28.307, 150.856, -8.781, 1.094)
pt3dadd(28.195, 150.818, -8.787, 1.102)
pt3dadd(28.103, 150.748, -8.793, 1.102)
pt3dadd(28.02, 150.658, -8.799, 1.096)
pt3dadd(27.939, 150.568, -8.805, 1.092)
pt3dadd(27.857, 150.478, -8.811, 1.086)
pt3dadd(27.775, 150.388, -8.817, 1.082)
pt3dadd(27.671, 150.337, -8.823, 1.058)
pt3dadd(27.558, 150.304, -8.828, 1.028)
pt3dadd(27.455, 150.257, -8.834, 0.994)
pt3dadd(27.391, 150.151, -8.84, 0.936)
pt3dadd(27.328, 150.046, -8.846, 0.878)
pt3dadd(27.292, 149.926, -8.852, 0.856)
pt3dadd(27.257, 149.807, -8.858, 0.836)
pt3dadd(27.234, 149.683, -8.864, 0.828)
pt3dadd(27.218, 149.558, -8.87, 0.828)
pt3dadd(27.197, 149.436, -8.877, 0.83)
pt3dadd(27.116, 149.346, -8.893, 0.854)
pt3dadd(27.036, 149.255, -8.909, 0.876)
pt3dadd(26.956, 149.164, -8.924, 0.898)
pt3dadd(26.852, 149.132, -8.955, 0.928)
pt3dadd(26.742, 149.12, -8.989, 0.96)
pt3dadd(26.662, 149.062, -9.011, 0.986)
pt3dadd(26.667, 149.056, -9.017, 0.986)
pt3dadd(26.671, 149.048, -9.023, 0.986)
pt3dadd(26.632, 148.93, -9.029, 1.002)
pt3dadd(26.593, 148.811, -9.035, 1.02)
pt3dadd(26.548, 148.696, -9.041, 1.038)
pt3dadd(26.491, 148.586, -9.047, 1.06)
pt3dadd(26.426, 148.489, -9.053, 1.088)
pt3dadd(26.322, 148.448, -9.059, 1.132)
pt3dadd(26.248, 148.35, -9.065, 1.142)
pt3dadd(26.174, 148.253, -9.071, 1.152)
pt3dadd(26.1, 148.154, -9.076, 1.162)
pt3dadd(26.027, 148.057, -9.082, 1.172)
pt3dadd(25.957, 147.956, -9.088, 1.182)
pt3dadd(25.895, 147.85, -9.094, 1.186)
pt3dadd(25.833, 147.743, -9.1, 1.192)
pt3dadd(25.771, 147.636, -9.106, 1.196)
pt3dadd(25.709, 147.529, -9.112, 1.202)
pt3dadd(25.652, 147.42, -9.118, 1.202)
pt3dadd(25.656, 147.414, -9.124, 1.202)
pt3dadd(25.614, 147.296, -9.13, 1.192)
pt3dadd(25.571, 147.18, -9.136, 1.18)
pt3dadd(25.554, 147.055, -9.142, 1.172)
pt3dadd(25.538, 146.93, -9.148, 1.162)
pt3dadd(25.51, 146.809, -9.153, 1.148)
pt3dadd(25.46, 146.695, -9.159, 1.124)
pt3dadd(25.405, 146.586, -9.165, 1.102)
pt3dadd(25.311, 146.512, -9.171, 1.078)
pt3dadd(25.216, 146.437, -9.177, 1.056)
pt3dadd(25.108, 146.387, -9.183, 0.992)
pt3dadd(25.01, 146.322, -9.189, 0.94)
pt3dadd(24.927, 146.233, -9.195, 0.904)
pt3dadd(24.839, 146.15, -9.201, 0.876)
pt3dadd(24.739, 146.083, -9.207, 0.864)
pt3dadd(24.645, 146.012, -9.213, 0.856)
pt3dadd(24.595, 145.898, -9.219, 0.89)
pt3dadd(24.546, 145.784, -9.225, 0.924)
pt3dadd(24.502, 145.668, -9.23, 0.966)
pt3dadd(24.46, 145.55, -9.236, 1.01)
pt3dadd(24.436, 145.428, -9.242, 1.062)
pt3dadd(24.425, 145.303, -9.248, 1.118)
pt3dadd(24.372, 145.194, -9.254, 1.138)
pt3dadd(24.308, 145.088, -9.26, 1.148)
pt3dadd(24.243, 144.984, -9.266, 1.158)
pt3dadd(24.178, 144.88, -9.272, 1.168)
pt3dadd(24.113, 144.775, -9.278, 1.178)
pt3dadd(24.048, 144.67, -9.284, 1.184)
pt3dadd(23.983, 144.565, -9.29, 1.188)
pt3dadd(23.918, 144.461, -9.296, 1.194)
pt3dadd(23.854, 144.356, -9.302, 1.198)
pt3dadd(23.789, 144.251, -9.307, 1.204)
pt3dadd(23.73, 144.143, -9.313, 1.196)
pt3dadd(23.673, 144.032, -9.319, 1.186)
pt3dadd(23.649, 143.914, -9.325, 1.166)
pt3dadd(23.653, 143.788, -9.331, 1.142)
pt3dadd(23.657, 143.66, -9.337, 1.116)
pt3dadd(23.629, 143.543, -9.343, 1.086)
pt3dadd(23.572, 143.434, -9.349, 1.052)
pt3dadd(23.497, 143.35, -9.355, 1.022)
pt3dadd(23.384, 143.316, -9.361, 1.002)
pt3dadd(23.271, 143.284, -9.367, 0.982)
pt3dadd(23.196, 143.192, -9.373, 0.992)
pt3dadd(23.13, 143.088, -9.379, 1.006)
pt3dadd(23.063, 142.985, -9.384, 1.02)
pt3dadd(23.011, 142.876, -9.39, 1.034)
pt3dadd(23, 142.751, -9.396, 1.052)
pt3dadd(22.989, 142.625, -9.402, 1.072)
pt3dadd(22.979, 142.499, -9.408, 1.128)
pt3dadd(22.948, 142.379, -9.414, 1.164)
pt3dadd(22.908, 142.261, -9.42, 1.178)
pt3dadd(22.868, 142.142, -9.426, 1.192)
pt3dadd(22.827, 142.025, -9.432, 1.206)
pt3dadd(22.787, 141.907, -9.438, 1.22)
pt3dadd(22.74, 141.793, -9.444, 1.238)
pt3dadd(22.675, 141.688, -9.45, 1.262)
pt3dadd(22.61, 141.583, -9.455, 1.288)
pt3dadd(22.545, 141.479, -9.461, 1.312)
pt3dadd(22.48, 141.374, -9.467, 1.338)
pt3dadd(22.423, 141.265, -9.473, 1.368)
pt3dadd(22.387, 141.145, -9.479, 1.41)
pt3dadd(22.352, 141.026, -9.485, 1.452)
pt3dadd(22.259, 140.953, -9.491, 1.446)
pt3dadd(22.159, 140.886, -9.497, 1.434)
pt3dadd(22.067, 140.808, -9.503, 1.39)
pt3dadd(21.978, 140.726, -9.509, 1.33)
pt3dadd(21.873, 140.681, -9.515, 1.284)
pt3dadd(21.759, 140.659, -9.521, 1.246)
pt3dadd(21.644, 140.638, -9.527, 1.21)
pt3dadd(21.539, 140.581, -9.532, 1.212)
pt3dadd(21.436, 140.521, -9.538, 1.218)
pt3dadd(21.333, 140.461, -9.544, 1.224)
pt3dadd(21.239, 140.392, -9.55, 1.238)
pt3dadd(21.189, 140.278, -9.556, 1.282)
pt3dadd(21.14, 140.164, -9.562, 1.328)
pt3dadd(21.043, 140.095, -9.568, 1.346)
pt3dadd(20.943, 140.03, -9.574, 1.364)
pt3dadd(20.842, 139.964, -9.58, 1.38)
pt3dadd(20.733, 139.918, -9.586, 1.36)
pt3dadd(20.624, 139.872, -9.592, 1.338)
pt3dadd(20.511, 139.842, -9.598, 1.242)
pt3dadd(20.401, 139.8, -9.604, 1.188)
pt3dadd(20.293, 139.752, -9.609, 1.166)
pt3dadd(20.184, 139.704, -9.615, 1.142)
pt3dadd(20.076, 139.656, -9.621, 1.12)
pt3dadd(19.968, 139.608, -9.627, 1.096)
pt3dadd(19.858, 139.562, -9.633, 1.082)
pt3dadd(19.746, 139.526, -9.639, 1.086)
pt3dadd(19.634, 139.489, -9.645, 1.09)
pt3dadd(19.522, 139.453, -9.651, 1.094)
pt3dadd(19.41, 139.416, -9.657, 1.098)
pt3dadd(19.298, 139.38, -9.663, 1.102)
pt3dadd(19.188, 139.338, -9.669, 1.118)
pt3dadd(19.078, 139.292, -9.675, 1.14)
pt3dadd(18.969, 139.248, -9.681, 1.162)
pt3dadd(18.859, 139.202, -9.686, 1.186)
pt3dadd(18.75, 139.157, -9.692, 1.208)
pt3dadd(18.642, 139.11, -9.698, 1.232)
pt3dadd(18.565, 139.015, -9.704, 1.262)
pt3dadd(18.489, 138.919, -9.71, 1.292)
pt3dadd(18.412, 138.824, -9.716, 1.322)
pt3dadd(18.336, 138.728, -9.722, 1.354)
pt3dadd(18.258, 138.635, -9.728, 1.382)
pt3dadd(18.164, 138.559, -9.734, 1.382)
pt3dadd(18.07, 138.484, -9.74, 1.382)
pt3dadd(17.976, 138.408, -9.746, 1.382)
pt3dadd(17.882, 138.332, -9.752, 1.382)
pt3dadd(17.788, 138.257, -9.758, 1.38)
pt3dadd(17.698, 138.175, -9.763, 1.368)
pt3dadd(17.609, 138.094, -9.769, 1.356)
pt3dadd(17.55, 137.987, -9.775, 1.356)
pt3dadd(17.493, 137.876, -9.781, 1.356)
pt3dadd(17.431, 137.77, -9.787, 1.364)
pt3dadd(17.367, 137.664, -9.793, 1.376)
pt3dadd(17.275, 137.604, -9.799, 1.376)
pt3dadd(17.161, 137.576, -9.805, 1.366)
pt3dadd(17.047, 137.55, -9.811, 1.356)
pt3dadd(16.939, 137.501, -9.817, 1.308)
pt3dadd(16.841, 137.435, -9.823, 1.276)
pt3dadd(16.756, 137.347, -9.829, 1.266)
pt3dadd(16.672, 137.26, -9.835, 1.256)
pt3dadd(16.587, 137.173, -9.84, 1.246)
pt3dadd(16.502, 137.086, -9.846, 1.236)
pt3dadd(16.418, 136.998, -9.852, 1.226)
pt3dadd(16.422, 136.992, -9.858, 1.226)
pt3dadd(16.337, 136.904, -9.864, 1.216)
pt3dadd(16.252, 136.818, -9.87, 1.206)
pt3dadd(16.168, 136.73, -9.876, 1.196)
pt3dadd(16.083, 136.643, -9.882, 1.186)
pt3dadd(16.002, 136.552, -9.888, 1.174)
pt3dadd(15.925, 136.458, -9.894, 1.162)
pt3dadd(15.833, 136.387, -9.9, 1.144)
pt3dadd(15.721, 136.355, -9.906, 1.114)
pt3dadd(15.608, 136.321, -9.912, 1.084)
pt3dadd(15.58, 136.207, -9.917, 1.054)
pt3dadd(15.564, 136.082, -9.923, 1.024)
pt3dadd(15.548, 135.958, -9.929, 0.99)
pt3dadd(15.532, 135.833, -9.935, 0.942)
pt3dadd(15.516, 135.708, -9.941, 0.894)
pt3dadd(15.436, 135.635, -9.947, 0.87)
pt3dadd(15.329, 135.583, -9.953, 0.856)
pt3dadd(15.222, 135.53, -9.959, 0.844)
pt3dadd(15.115, 135.479, -9.965, 0.83)
pt3dadd(15.033, 135.391, -9.971, 0.828)
pt3dadd(14.956, 135.296, -9.977, 0.828)
pt3dadd(14.859, 135.227, -9.983, 0.928)
}
}
proc shape3d_155() {
apic[23] { pt3dadd(14.754, 135.173, -9.988, 0.944)
pt3dadd(14.648, 135.119, -9.994, 0.958)
pt3dadd(14.541, 135.065, -10, 0.972)
pt3dadd(14.436, 135.011, -10.006, 0.986)
pt3dadd(14.33, 134.957, -10.012, 1)
pt3dadd(14.217, 134.934, -10.018, 1.022)
pt3dadd(14.101, 134.928, -10.024, 0.996)
pt3dadd(13.986, 134.911, -10.03, 0.924)
pt3dadd(13.874, 134.876, -10.036, 0.856)
pt3dadd(13.788, 134.791, -10.042, 0.88)
pt3dadd(13.74, 134.68, -10.048, 0.996)
pt3dadd(13.724, 134.556, -10.054, 1.07)
pt3dadd(13.726, 134.429, -10.06, 1.06)
pt3dadd(13.73, 134.303, -10.066, 0.972)
pt3dadd(13.734, 134.176, -10.071, 0.912)
pt3dadd(13.738, 134.05, -10.077, 0.884)
pt3dadd(13.73, 133.924, -10.083, 0.948)
pt3dadd(13.674, 133.819, -10.089, 1.03)
pt3dadd(13.565, 133.776, -10.095, 1.142)
pt3dadd(13.45, 133.763, -10.101, 1.222)
pt3dadd(13.334, 133.748, -10.107, 1.24)
pt3dadd(13.222, 133.715, -10.113, 1.17)
pt3dadd(13.131, 133.638, -10.119, 1.08)
pt3dadd(13.136, 133.631, -10.125, 1.08)
pt3dadd(13.14, 133.625, -10.131, 1.08)
pt3dadd(13.086, 133.516, -10.136, 1.084)
pt3dadd(13.057, 133.394, -10.142, 1.094)
pt3dadd(13.029, 133.272, -10.148, 1.104)
pt3dadd(12.952, 133.177, -10.154, 1.116)
pt3dadd(12.874, 133.082, -10.16, 1.128)
pt3dadd(12.801, 132.985, -10.166, 1.128)
pt3dadd(12.717, 132.898, -10.172, 1.116)
pt3dadd(12.633, 132.809, -10.178, 1.104)
pt3dadd(12.556, 132.714, -10.184, 1.08)
pt3dadd(12.479, 132.619, -10.19, 1.058)
pt3dadd(12.483, 132.613, -10.196, 1.058)
pt3dadd(12.443, 132.496, -10.202, 1.016)
pt3dadd(12.408, 132.376, -10.208, 0.974)
pt3dadd(12.394, 132.252, -10.214, 0.936)
pt3dadd(12.398, 132.126, -10.219, 0.902)
pt3dadd(12.402, 131.999, -10.225, 0.868)
pt3dadd(12.379, 131.882, -10.249, 0.84)
pt3dadd(12.332, 131.774, -10.287, 0.816)
pt3dadd(12.285, 131.666, -10.324, 0.792)
pt3dadd(12.289, 131.659, -10.33, 0.792)
pt3dadd(12.217, 131.58, -10.355, 0.782)
pt3dadd(12.105, 131.54, -10.361, 0.794)
pt3dadd(11.994, 131.501, -10.367, 0.804)
pt3dadd(11.888, 131.448, -10.373, 0.856)
pt3dadd(11.774, 131.422, -10.379, 0.866)
pt3dadd(11.66, 131.394, -10.385, 0.876)
pt3dadd(11.549, 131.356, -10.391, 0.872)
pt3dadd(11.44, 131.309, -10.396, 0.862)
pt3dadd(11.334, 131.256, -10.404, 0.858)
pt3dadd(11.237, 131.186, -10.415, 0.87)
pt3dadd(11.241, 131.179, -10.421, 0.87)
pt3dadd(11.153, 131.104, -10.439, 0.89)
pt3dadd(11.105, 131.002, -10.488, 0.944)
pt3dadd(11.052, 130.901, -10.53, 0.988)
pt3dadd(10.988, 130.8, -10.561, 1.012)
pt3dadd(10.924, 130.699, -10.592, 1.036)
pt3dadd(10.847, 130.62, -10.62, 1.058)
pt3dadd(10.733, 130.609, -10.639, 1.066)
pt3dadd(10.618, 130.597, -10.657, 1.076)
pt3dadd(10.502, 130.589, -10.668, 1.064)
pt3dadd(10.387, 130.583, -10.673, 1.05)
pt3dadd(10.271, 130.576, -10.679, 1.04)
pt3dadd(10.155, 130.57, -10.685, 1.032)
pt3dadd(10.039, 130.56, -10.691, 1.018)
pt3dadd(9.923, 130.549, -10.697, 1)
pt3dadd(9.808, 130.537, -10.703, 0.984)
pt3dadd(9.703, 130.489, -10.722, 0.94)
pt3dadd(9.601, 130.429, -10.744, 0.892)
pt3dadd(9.542, 130.334, -10.781, 0.848)
pt3dadd(9.496, 130.228, -10.823, 0.808)
pt3dadd(9.388, 130.2, -10.833, 0.788)
pt3dadd(9.273, 130.182, -10.839, 0.772)
pt3dadd(9.158, 130.164, -10.844, 0.756)
pt3dadd(9.042, 130.146, -10.85, 0.74)
pt3dadd(8.927, 130.13, -10.856, 0.728)
pt3dadd(8.811, 130.124, -10.862, 0.728)
pt3dadd(8.695, 130.118, -10.868, 0.728)
pt3dadd(8.58, 130.111, -10.874, 0.736)
pt3dadd(8.464, 130.099, -10.88, 0.756)
pt3dadd(8.35, 130.073, -10.886, 0.764)
pt3dadd(8.236, 130.046, -10.892, 0.772)
pt3dadd(8.122, 130.02, -10.898, 0.78)
pt3dadd(8.007, 129.994, -10.904, 0.788)
pt3dadd(7.893, 129.967, -10.91, 0.798)
pt3dadd(7.785, 129.929, -10.918, 0.804)
pt3dadd(7.695, 129.848, -10.933, 0.804)
pt3dadd(7.605, 129.768, -10.948, 0.804)
pt3dadd(7.516, 129.688, -10.964, 0.804)
pt3dadd(7.426, 129.607, -10.979, 0.804)
pt3dadd(7.34, 129.528, -11.01, 0.8)
pt3dadd(7.258, 129.451, -11.053, 0.794)
pt3dadd(7.176, 129.374, -11.096, 0.788)
pt3dadd(7.094, 129.298, -11.139, 0.782)
pt3dadd(7.003, 129.232, -11.177, 0.778)
pt3dadd(6.898, 129.182, -11.204, 0.778)
pt3dadd(6.793, 129.134, -11.231, 0.778)
pt3dadd(6.687, 129.085, -11.258, 0.778)
pt3dadd(6.582, 129.037, -11.285, 0.778)
pt3dadd(6.478, 128.981, -11.299, 0.782)
pt3dadd(6.375, 128.921, -11.304, 0.786)
pt3dadd(6.272, 128.861, -11.31, 0.792)
pt3dadd(6.168, 128.801, -11.316, 0.796)
pt3dadd(6.065, 128.741, -11.322, 0.8)
pt3dadd(5.958, 128.695, -11.336, 0.804)
pt3dadd(5.846, 128.675, -11.363, 0.804)
pt3dadd(5.734, 128.653, -11.39, 0.804)
pt3dadd(5.621, 128.632, -11.416, 0.804)
pt3dadd(5.509, 128.61, -11.443, 0.804)
pt3dadd(5.397, 128.59, -11.469, 0.804)
pt3dadd(5.286, 128.582, -11.503, 0.8)
pt3dadd(5.174, 128.576, -11.536, 0.794)
pt3dadd(5.063, 128.569, -11.57, 0.79)
pt3dadd(4.952, 128.563, -11.603, 0.786)
pt3dadd(4.841, 128.556, -11.637, 0.782)
pt3dadd(4.728, 128.55, -11.662, 0.78)
pt3dadd(4.612, 128.543, -11.673, 0.784)
pt3dadd(4.497, 128.537, -11.684, 0.788)
pt3dadd(4.381, 128.531, -11.694, 0.792)
pt3dadd(4.265, 128.524, -11.705, 0.794)
pt3dadd(4.15, 128.518, -11.716, 0.798)
pt3dadd(4.034, 128.51, -11.727, 0.802)
pt3dadd(3.918, 128.504, -11.738, 0.806)
pt3dadd(3.802, 128.497, -11.749, 0.81)
pt3dadd(3.687, 128.491, -11.76, 0.814)
pt3dadd(3.571, 128.484, -11.771, 0.818)
pt3dadd(3.455, 128.478, -11.782, 0.822)
pt3dadd(3.34, 128.472, -11.793, 0.824)
pt3dadd(3.224, 128.465, -11.804, 0.828)
pt3dadd(3.114, 128.456, -11.84, 0.852)
pt3dadd(3.004, 128.447, -11.877, 0.874)
pt3dadd(2.894, 128.438, -11.913, 0.898)
pt3dadd(2.784, 128.429, -11.949, 0.92)
pt3dadd(2.674, 128.42, -11.986, 0.944)
pt3dadd(2.564, 128.398, -12.016, 0.968)
pt3dadd(2.454, 128.362, -12.042, 0.992)
pt3dadd(2.344, 128.326, -12.068, 1.018)
pt3dadd(2.234, 128.29, -12.094, 1.042)
pt3dadd(2.125, 128.255, -12.119, 1.068)
pt3dadd(2.02, 128.203, -12.135, 1.078)
pt3dadd(1.92, 128.137, -12.141, 1.072)
pt3dadd(1.82, 128.071, -12.147, 1.068)
pt3dadd(1.72, 128.004, -12.153, 1.062)
pt3dadd(1.62, 127.938, -12.159, 1.058)
pt3dadd(1.523, 127.867, -12.165, 1.046)
pt3dadd(1.432, 127.788, -12.171, 1.02)
pt3dadd(1.34, 127.71, -12.177, 0.996)
pt3dadd(1.248, 127.632, -12.183, 0.97)
pt3dadd(1.156, 127.553, -12.189, 0.944)
pt3dadd(1.063, 127.476, -12.195, 0.918)
pt3dadd(0.969, 127.4, -12.2, 0.888)
pt3dadd(0.875, 127.325, -12.206, 0.858)
pt3dadd(0.781, 127.249, -12.212, 0.828)
pt3dadd(0.687, 127.174, -12.218, 0.798)
pt3dadd(0.604, 127.087, -12.224, 0.77)
pt3dadd(0.54, 126.982, -12.23, 0.746)
pt3dadd(0.471, 126.882, -12.236, 0.73)
pt3dadd(0.376, 126.808, -12.242, 0.742)
pt3dadd(0.281, 126.733, -12.248, 0.754)
pt3dadd(0.184, 126.664, -12.259, 0.802)
pt3dadd(0.086, 126.594, -12.27, 0.85)
pt3dadd(-0.021, 126.577, -12.309, 0.906)
pt3dadd(-0.13, 126.565, -12.35, 0.962)
pt3dadd(-0.239, 126.533, -12.371, 1.012)
pt3dadd(-0.348, 126.487, -12.383, 1.054)
pt3dadd(-0.45, 126.425, -12.389, 1.05)
pt3dadd(-0.551, 126.361, -12.395, 1.044)
pt3dadd(-0.653, 126.298, -12.401, 1.04)
pt3dadd(-0.754, 126.234, -12.407, 1.034)
pt3dadd(-0.856, 126.17, -12.413, 1.03)
pt3dadd(-0.924, 126.068, -12.419, 1.01)
pt3dadd(-0.992, 125.966, -12.425, 0.99)
pt3dadd(-1.06, 125.863, -12.431, 0.97)
pt3dadd(-1.128, 125.761, -12.437, 0.95)
pt3dadd(-1.195, 125.658, -12.443, 0.93)
pt3dadd(-1.269, 125.561, -12.449, 0.914)
pt3dadd(-1.343, 125.462, -12.455, 0.898)
pt3dadd(-1.416, 125.365, -12.46, 0.884)
pt3dadd(-1.49, 125.267, -12.466, 0.868)
pt3dadd(-1.565, 125.171, -12.472, 0.854)
pt3dadd(-1.669, 125.113, -12.478, 0.848)
pt3dadd(-1.774, 125.057, -12.484, 0.844)
pt3dadd(-1.879, 124.999, -12.49, 0.84)
pt3dadd(-1.983, 124.942, -12.496, 0.834)
pt3dadd(-2.088, 124.885, -12.502, 0.83)
pt3dadd(-2.198, 124.841, -12.508, 0.826)
pt3dadd(-2.309, 124.801, -12.514, 0.822)
pt3dadd(-2.42, 124.763, -12.52, 0.816)
pt3dadd(-2.416, 124.756, -12.525, 0.816)
pt3dadd(-2.527, 124.716, -12.531, 0.812)
pt3dadd(-2.638, 124.676, -12.537, 0.808)
pt3dadd(-2.747, 124.633, -12.543, 0.804)
pt3dadd(-2.829, 124.543, -12.549, 0.798)
pt3dadd(-2.911, 124.452, -12.555, 0.794)
pt3dadd(-2.993, 124.362, -12.561, 0.788)
pt3dadd(-3.075, 124.272, -12.567, 0.782)
}
}
proc shape3d_156() {
apic[23] { pt3dadd(-3.155, 124.181, -12.573, 0.778)
pt3dadd(-3.226, 124.08, -12.579, 0.778)
pt3dadd(-3.297, 123.98, -12.585, 0.778)
pt3dadd(-3.367, 123.88, -12.591, 0.778)
pt3dadd(-3.438, 123.78, -12.597, 0.778)
pt3dadd(-3.514, 123.685, -12.602, 0.782)
pt3dadd(-3.613, 123.618, -12.608, 0.806)
pt3dadd(-3.712, 123.551, -12.614, 0.828)
pt3dadd(-3.825, 123.516, -12.62, 0.858)
pt3dadd(-3.937, 123.484, -12.626, 0.888)
pt3dadd(-4.006, 123.408, -12.632, 0.912)
pt3dadd(-4.022, 123.283, -12.638, 0.932)
pt3dadd(-4.038, 123.158, -12.644, 0.952)
pt3dadd(-4.089, 123.047, -12.65, 0.954)
pt3dadd(-4.146, 122.936, -12.656, 0.954)
pt3dadd(-4.237, 122.867, -12.662, 0.954)
pt3dadd(-4.34, 122.812, -12.67, 0.954)
pt3dadd(-4.402, 122.708, -12.699, 0.96)
pt3dadd(-4.464, 122.605, -12.727, 0.966)
pt3dadd(-4.526, 122.503, -12.756, 0.972)
pt3dadd(-4.521, 122.496, -12.762, 0.972)
pt3dadd(-4.583, 122.393, -12.79, 0.978)
pt3dadd(-4.657, 122.297, -12.803, 0.986)
pt3dadd(-4.737, 122.204, -12.809, 0.996)
pt3dadd(-4.816, 122.112, -12.815, 1.006)
pt3dadd(-4.895, 122.018, -12.821, 1.016)
pt3dadd(-4.974, 121.926, -12.827, 1.028)
pt3dadd(-5.052, 121.831, -12.833, 1.026)
pt3dadd(-5.128, 121.736, -12.839, 1.02)
pt3dadd(-5.205, 121.642, -12.845, 1.016)
pt3dadd(-5.282, 121.546, -12.851, 1.01)
pt3dadd(-5.358, 121.451, -12.857, 1.006)
pt3dadd(-5.413, 121.34, -12.862, 0.99)
pt3dadd(-5.463, 121.226, -12.868, 0.97)
pt3dadd(-5.512, 121.112, -12.874, 0.95)
pt3dadd(-5.562, 120.998, -12.88, 0.932)
pt3dadd(-5.611, 120.886, -12.886, 0.912)
pt3dadd(-5.654, 120.768, -12.892, 0.89)
pt3dadd(-5.691, 120.649, -12.898, 0.868)
pt3dadd(-5.729, 120.53, -12.904, 0.844)
pt3dadd(-5.766, 120.41, -12.91, 0.822)
pt3dadd(-5.804, 120.292, -12.916, 0.798)
pt3dadd(-5.836, 120.172, -12.922, 0.776)
pt3dadd(-5.832, 120.046, -12.928, 0.766)
pt3dadd(-5.828, 119.919, -12.934, 0.756)
pt3dadd(-5.823, 119.792, -12.939, 0.744)
pt3dadd(-5.819, 119.666, -12.945, 0.734)
pt3dadd(-5.815, 119.539, -12.951, 0.724)
pt3dadd(-5.811, 119.413, -12.957, 0.712)
pt3dadd(-5.807, 119.287, -12.968, 0.702)
pt3dadd(-5.803, 119.169, -13.011, 0.698)
pt3dadd(-5.798, 119.051, -13.054, 0.694)
pt3dadd(-5.794, 118.933, -13.097, 0.688)
pt3dadd(-5.79, 118.816, -13.14, 0.684)
pt3dadd(-5.786, 118.698, -13.183, 0.68)
pt3dadd(-5.801, 118.583, -13.229, 0.682)
pt3dadd(-5.823, 118.47, -13.276, 0.688)
pt3dadd(-5.844, 118.357, -13.322, 0.692)
pt3dadd(-5.866, 118.244, -13.369, 0.698)
pt3dadd(-5.885, 118.13, -13.413, 0.704)
pt3dadd(-5.881, 118.006, -13.438, 0.712)
pt3dadd(-5.877, 117.881, -13.462, 0.72)
pt3dadd(-5.873, 117.757, -13.487, 0.73)
pt3dadd(-5.868, 117.632, -13.511, 0.738)
pt3dadd(-5.864, 117.626, -13.517, 0.738)
pt3dadd(-5.86, 117.501, -13.541, 0.746)
pt3dadd(-5.856, 117.377, -13.564, 0.758)
pt3dadd(-5.852, 117.25, -13.57, 0.8)
pt3dadd(-5.848, 117.123, -13.576, 0.842)
pt3dadd(-5.843, 116.998, -13.585, 0.886)
pt3dadd(-5.839, 116.876, -13.618, 0.948)
pt3dadd(-5.835, 116.754, -13.651, 1.01)
pt3dadd(-5.858, 116.635, -13.681, 1.088)
pt3dadd(-5.893, 116.518, -13.708, 1.174)
pt3dadd(-5.921, 116.426, -13.771, 1.222)
pt3dadd(-5.945, 116.349, -13.854, 1.25)
pt3dadd(-5.941, 116.342, -13.86, 1.25)
pt3dadd(-5.995, 116.275, -13.935, 1.222)
pt3dadd(-6.04, 116.195, -14.007, 1.178)
pt3dadd(-6.07, 116.104, -14.078, 1.13)
pt3dadd(-6.1, 116.013, -14.149, 1.084)
pt3dadd(-6.13, 115.923, -14.22, 1.036)
pt3dadd(-6.149, 115.839, -14.298, 0.97)
pt3dadd(-6.145, 115.772, -14.39, 0.868)
pt3dadd(-6.141, 115.702, -14.48, 0.762)
pt3dadd(-6.137, 115.614, -14.559, 0.644)
pt3dadd(-6.133, 115.525, -14.638, 0.526)
pt3dadd(-6.128, 115.403, -14.671, 0.34)
pt3dadd(-6.124, 115.397, -14.677, 0.34)
}
apic[24] {pt3dclear()
pt3dadd(86.846, 162.702, 8.052, 3.842)
pt3dadd(86.877, 162.808, 8.022, 3.724)
pt3dadd(86.909, 162.918, 7.99, 3.6)
pt3dadd(86.941, 163.027, 7.959, 3.478)
pt3dadd(86.973, 163.136, 7.927, 3.356)
pt3dadd(87.005, 163.246, 7.897, 3.238)
pt3dadd(87.039, 163.356, 7.87, 3.13)
pt3dadd(87.073, 163.466, 7.842, 3.022)
pt3dadd(87.107, 163.577, 7.815, 2.914)
pt3dadd(87.141, 163.687, 7.788, 2.806)
pt3dadd(87.175, 163.798, 7.761, 2.698)
pt3dadd(87.209, 163.908, 7.733, 2.59)
pt3dadd(87.243, 164.018, 7.706, 2.484)
pt3dadd(87.277, 164.129, 7.679, 2.376)
pt3dadd(87.312, 164.239, 7.651, 2.268)
pt3dadd(87.349, 164.35, 7.632, 2.188)
pt3dadd(87.392, 164.461, 7.626, 2.154)
pt3dadd(87.435, 164.573, 7.62, 2.12)
pt3dadd(87.477, 164.686, 7.614, 2.084)
pt3dadd(87.52, 164.797, 7.608, 2.05)
pt3dadd(87.563, 164.909, 7.602, 2.016)
pt3dadd(87.606, 165.02, 7.596, 1.982)
pt3dadd(87.649, 165.132, 7.59, 1.948)
pt3dadd(87.692, 165.245, 7.584, 1.914)
pt3dadd(87.735, 165.356, 7.578, 1.878)
pt3dadd(87.786, 165.464, 7.571, 1.844)
pt3dadd(87.85, 165.564, 7.563, 1.804)
pt3dadd(87.915, 165.665, 7.554, 1.766)
pt3dadd(87.979, 165.766, 7.546, 1.728)
pt3dadd(88.044, 165.866, 7.537, 1.688)
pt3dadd(88.109, 165.967, 7.529, 1.65)
pt3dadd(88.173, 166.068, 7.521, 1.612)
pt3dadd(88.238, 166.169, 7.512, 1.572)
pt3dadd(88.302, 166.27, 7.504, 1.534)
pt3dadd(88.367, 166.37, 7.496, 1.496)
pt3dadd(88.436, 166.468, 7.486, 1.478)
pt3dadd(88.511, 166.56, 7.474, 1.49)
pt3dadd(88.586, 166.652, 7.462, 1.502)
pt3dadd(88.661, 166.745, 7.451, 1.514)
pt3dadd(88.736, 166.837, 7.439, 1.526)
pt3dadd(88.81, 166.931, 7.427, 1.538)
pt3dadd(88.885, 167.023, 7.415, 1.55)
pt3dadd(88.96, 167.116, 7.404, 1.562)
pt3dadd(89.035, 167.208, 7.392, 1.574)
pt3dadd(89.11, 167.3, 7.38, 1.586)
pt3dadd(89.186, 167.39, 7.361, 1.602)
pt3dadd(89.263, 167.476, 7.333, 1.624)
pt3dadd(89.34, 167.561, 7.304, 1.646)
pt3dadd(89.417, 167.647, 7.276, 1.668)
pt3dadd(89.494, 167.732, 7.248, 1.69)
pt3dadd(89.571, 167.818, 7.219, 1.712)
pt3dadd(89.648, 167.903, 7.191, 1.734)
pt3dadd(89.725, 167.989, 7.162, 1.756)
pt3dadd(89.802, 168.074, 7.134, 1.778)
pt3dadd(89.879, 168.16, 7.106, 1.8)
pt3dadd(89.954, 168.238, 7.063, 1.808)
pt3dadd(90.027, 168.312, 7.014, 1.808)
pt3dadd(90.1, 168.386, 6.964, 1.808)
pt3dadd(90.172, 168.462, 6.915, 1.808)
pt3dadd(90.245, 168.536, 6.865, 1.808)
pt3dadd(90.318, 168.611, 6.816, 1.808)
pt3dadd(90.391, 168.685, 6.766, 1.808)
pt3dadd(90.464, 168.76, 6.717, 1.808)
pt3dadd(90.537, 168.834, 6.667, 1.808)
pt3dadd(90.61, 168.908, 6.618, 1.808)
pt3dadd(90.684, 168.985, 6.572, 1.814)
pt3dadd(90.759, 169.063, 6.528, 1.822)
pt3dadd(90.834, 169.14, 6.484, 1.83)
pt3dadd(90.908, 169.218, 6.44, 1.84)
pt3dadd(90.983, 169.296, 6.396, 1.848)
pt3dadd(91.058, 169.374, 6.352, 1.856)
pt3dadd(91.132, 169.452, 6.308, 1.864)
pt3dadd(91.207, 169.529, 6.264, 1.872)
pt3dadd(91.282, 169.607, 6.22, 1.882)
pt3dadd(91.356, 169.685, 6.176, 1.89)
pt3dadd(91.425, 169.758, 6.122, 1.912)
pt3dadd(91.49, 169.83, 6.064, 1.94)
pt3dadd(91.556, 169.903, 6.006, 1.966)
pt3dadd(91.622, 169.975, 5.948, 1.994)
pt3dadd(91.688, 170.047, 5.89, 2.022)
pt3dadd(91.753, 170.119, 5.832, 2.048)
pt3dadd(91.819, 170.192, 5.774, 2.076)
pt3dadd(91.885, 170.264, 5.716, 2.102)
pt3dadd(91.951, 170.336, 5.658, 2.13)
pt3dadd(92.016, 170.41, 5.6, 2.158)
pt3dadd(92.09, 170.494, 5.565, 2.114)
pt3dadd(92.165, 170.579, 5.535, 2.06)
pt3dadd(92.241, 170.665, 5.504, 2.004)
pt3dadd(92.316, 170.752, 5.474, 1.95)
pt3dadd(92.391, 170.838, 5.444, 1.894)
pt3dadd(92.466, 170.923, 5.413, 1.84)
pt3dadd(92.541, 171.01, 5.383, 1.784)
pt3dadd(92.616, 171.096, 5.352, 1.73)
pt3dadd(92.692, 171.182, 5.322, 1.676)
pt3dadd(92.767, 171.268, 5.291, 1.62)
pt3dadd(92.841, 171.359, 5.269, 1.556)
pt3dadd(92.915, 171.449, 5.248, 1.492)
pt3dadd(92.989, 171.54, 5.228, 1.426)
pt3dadd(93.063, 171.631, 5.207, 1.36)
pt3dadd(93.138, 171.722, 5.187, 1.296)
pt3dadd(93.212, 171.814, 5.166, 1.23)
pt3dadd(93.286, 171.905, 5.145, 1.164)
pt3dadd(93.36, 171.996, 5.124, 1.1)
pt3dadd(93.434, 172.087, 5.104, 1.034)
pt3dadd(93.508, 172.178, 5.083, 0.968)
pt3dadd(93.57, 172.274, 5.056, 0.952)
pt3dadd(93.63, 172.373, 5.027, 0.942)
pt3dadd(93.69, 172.471, 4.998, 0.932)
pt3dadd(93.75, 172.568, 4.969, 0.922)
pt3dadd(93.81, 172.667, 4.94, 0.912)
pt3dadd(93.87, 172.764, 4.911, 0.902)
}
}
proc shape3d_157() {
apic[24] { pt3dadd(93.93, 172.862, 4.882, 0.894)
pt3dadd(93.99, 172.961, 4.853, 0.884)
pt3dadd(94.051, 173.058, 4.825, 0.874)
pt3dadd(94.111, 173.156, 4.796, 0.864)
pt3dadd(94.161, 173.258, 4.763, 0.894)
pt3dadd(94.211, 173.359, 4.73, 0.928)
pt3dadd(94.26, 173.461, 4.697, 0.96)
pt3dadd(94.31, 173.563, 4.664, 0.992)
pt3dadd(94.36, 173.665, 4.631, 1.024)
pt3dadd(94.41, 173.767, 4.598, 1.058)
pt3dadd(94.459, 173.868, 4.564, 1.09)
pt3dadd(94.509, 173.97, 4.531, 1.122)
pt3dadd(94.559, 174.072, 4.498, 1.156)
pt3dadd(94.608, 174.174, 4.465, 1.188)
pt3dadd(94.662, 174.277, 4.441, 1.222)
pt3dadd(94.716, 174.38, 4.418, 1.254)
pt3dadd(94.77, 174.484, 4.394, 1.288)
pt3dadd(94.824, 174.587, 4.37, 1.32)
pt3dadd(94.878, 174.69, 4.346, 1.354)
pt3dadd(94.932, 174.793, 4.322, 1.386)
pt3dadd(94.986, 174.896, 4.299, 1.42)
pt3dadd(95.04, 175, 4.275, 1.452)
pt3dadd(95.094, 175.103, 4.251, 1.486)
pt3dadd(95.148, 175.207, 4.227, 1.518)
pt3dadd(95.184, 175.319, 4.209, 1.468)
pt3dadd(95.22, 175.432, 4.19, 1.416)
pt3dadd(95.256, 175.543, 4.171, 1.362)
pt3dadd(95.291, 175.656, 4.153, 1.308)
pt3dadd(95.327, 175.769, 4.134, 1.254)
pt3dadd(95.362, 175.88, 4.115, 1.202)
pt3dadd(95.398, 175.993, 4.097, 1.148)
pt3dadd(95.433, 176.106, 4.078, 1.094)
pt3dadd(95.469, 176.218, 4.059, 1.04)
pt3dadd(95.504, 176.33, 4.041, 0.988)
}
apic[25] {pt3dclear()
pt3dadd(95.504, 176.33, 4.041, 0.988)
pt3dadd(95.52, 176.404, 4.032, 0.968)
pt3dadd(95.544, 176.52, 4.018, 0.936)
pt3dadd(95.569, 176.636, 4.004, 0.906)
pt3dadd(95.593, 176.753, 3.99, 0.874)
pt3dadd(95.617, 176.869, 3.976, 0.844)
pt3dadd(95.642, 176.984, 3.961, 0.812)
pt3dadd(95.666, 177.101, 3.947, 0.782)
pt3dadd(95.691, 177.217, 3.933, 0.75)
pt3dadd(95.715, 177.334, 3.919, 0.72)
pt3dadd(95.739, 177.45, 3.905, 0.688)
pt3dadd(95.759, 177.566, 3.886, 0.686)
pt3dadd(95.777, 177.682, 3.864, 0.7)
pt3dadd(95.794, 177.798, 3.843, 0.714)
pt3dadd(95.811, 177.913, 3.821, 0.728)
pt3dadd(95.828, 178.03, 3.799, 0.742)
pt3dadd(95.846, 178.145, 3.778, 0.754)
pt3dadd(95.863, 178.261, 3.756, 0.768)
pt3dadd(95.88, 178.378, 3.734, 0.782)
pt3dadd(95.898, 178.493, 3.713, 0.796)
pt3dadd(95.915, 178.609, 3.691, 0.81)
pt3dadd(95.931, 178.721, 3.659, 0.84)
pt3dadd(95.946, 178.832, 3.622, 0.878)
pt3dadd(95.961, 178.943, 3.586, 0.916)
pt3dadd(95.976, 179.053, 3.55, 0.954)
pt3dadd(95.992, 179.165, 3.514, 0.992)
pt3dadd(96.007, 179.275, 3.478, 1.03)
pt3dadd(96.022, 179.386, 3.442, 1.068)
pt3dadd(96.038, 179.497, 3.405, 1.106)
pt3dadd(96.053, 179.608, 3.369, 1.144)
pt3dadd(96.068, 179.718, 3.333, 1.18)
pt3dadd(96.092, 179.831, 3.305, 1.232)
pt3dadd(96.119, 179.944, 3.281, 1.286)
pt3dadd(96.146, 180.058, 3.256, 1.342)
pt3dadd(96.174, 180.17, 3.231, 1.396)
pt3dadd(96.201, 180.283, 3.207, 1.452)
pt3dadd(96.228, 180.396, 3.182, 1.508)
pt3dadd(96.255, 180.51, 3.158, 1.562)
pt3dadd(96.282, 180.623, 3.133, 1.618)
pt3dadd(96.309, 180.736, 3.108, 1.672)
pt3dadd(96.336, 180.848, 3.084, 1.728)
pt3dadd(96.389, 180.954, 3.068, 1.714)
pt3dadd(96.45, 181.056, 3.055, 1.676)
pt3dadd(96.51, 181.158, 3.042, 1.64)
pt3dadd(96.571, 181.26, 3.028, 1.602)
pt3dadd(96.632, 181.363, 3.015, 1.566)
pt3dadd(96.693, 181.465, 3.002, 1.528)
pt3dadd(96.753, 181.567, 2.989, 1.492)
pt3dadd(96.814, 181.669, 2.976, 1.454)
pt3dadd(96.875, 181.771, 2.963, 1.418)
pt3dadd(96.936, 181.874, 2.95, 1.38)
pt3dadd(97.007, 181.969, 2.941, 1.34)
pt3dadd(97.081, 182.064, 2.933, 1.3)
pt3dadd(97.155, 182.158, 2.925, 1.26)
pt3dadd(97.229, 182.252, 2.918, 1.222)
pt3dadd(97.303, 182.346, 2.91, 1.182)
pt3dadd(97.377, 182.44, 2.902, 1.142)
pt3dadd(97.451, 182.534, 2.894, 1.102)
pt3dadd(97.524, 182.628, 2.886, 1.062)
pt3dadd(97.598, 182.723, 2.878, 1.022)
pt3dadd(97.672, 182.816, 2.871, 0.982)
pt3dadd(97.753, 182.905, 2.866, 0.952)
pt3dadd(97.835, 182.993, 2.862, 0.922)
pt3dadd(97.917, 183.08, 2.857, 0.892)
pt3dadd(97.998, 183.168, 2.853, 0.862)
pt3dadd(98.08, 183.256, 2.849, 0.834)
pt3dadd(98.162, 183.343, 2.844, 0.804)
pt3dadd(98.244, 183.431, 2.84, 0.774)
pt3dadd(98.326, 183.518, 2.836, 0.744)
pt3dadd(98.408, 183.606, 2.831, 0.716)
pt3dadd(98.49, 183.694, 2.827, 0.686)
pt3dadd(98.576, 183.775, 2.821, 0.708)
pt3dadd(98.664, 183.857, 2.814, 0.736)
pt3dadd(98.752, 183.938, 2.808, 0.766)
pt3dadd(98.84, 184.02, 2.801, 0.796)
pt3dadd(98.928, 184.102, 2.794, 0.826)
pt3dadd(99.015, 184.183, 2.788, 0.854)
pt3dadd(99.103, 184.265, 2.782, 0.884)
pt3dadd(99.191, 184.346, 2.775, 0.914)
pt3dadd(99.279, 184.427, 2.768, 0.944)
pt3dadd(99.367, 184.508, 2.762, 0.972)
pt3dadd(99.458, 184.584, 2.746, 0.976)
pt3dadd(99.551, 184.657, 2.728, 0.974)
pt3dadd(99.643, 184.73, 2.711, 0.974)
pt3dadd(99.735, 184.805, 2.694, 0.972)
pt3dadd(99.828, 184.878, 2.676, 0.97)
pt3dadd(99.92, 184.952, 2.659, 0.97)
pt3dadd(100.012, 185.026, 2.641, 0.968)
pt3dadd(100.105, 185.099, 2.624, 0.968)
pt3dadd(100.197, 185.173, 2.606, 0.966)
pt3dadd(100.29, 185.246, 2.589, 0.964)
pt3dadd(100.384, 185.314, 2.563, 0.932)
pt3dadd(100.478, 185.381, 2.537, 0.896)
pt3dadd(100.573, 185.448, 2.511, 0.862)
pt3dadd(100.667, 185.515, 2.485, 0.828)
pt3dadd(100.762, 185.582, 2.459, 0.794)
pt3dadd(100.856, 185.65, 2.433, 0.758)
pt3dadd(100.951, 185.717, 2.407, 0.724)
pt3dadd(101.045, 185.784, 2.381, 0.69)
pt3dadd(101.139, 185.851, 2.355, 0.656)
pt3dadd(101.234, 185.918, 2.329, 0.62)
pt3dadd(101.321, 186, 2.318, 0.586)
pt3dadd(101.407, 186.082, 2.308, 0.55)
pt3dadd(101.494, 186.164, 2.297, 0.516)
pt3dadd(101.581, 186.246, 2.286, 0.48)
pt3dadd(101.667, 186.328, 2.276, 0.444)
pt3dadd(101.754, 186.41, 2.265, 0.41)
pt3dadd(101.841, 186.492, 2.254, 0.374)
pt3dadd(101.927, 186.574, 2.244, 0.34)
pt3dadd(102.014, 186.656, 2.233, 0.304)
pt3dadd(102.101, 186.738, 2.223, 0.27)
}
apic[26] {pt3dclear()
pt3dadd(102.101, 186.738, 2.223, 0.27)
pt3dadd(102.134, 186.798, 2.238, 0.266)
pt3dadd(102.19, 186.899, 2.264, 0.262)
pt3dadd(102.247, 187.001, 2.29, 0.258)
pt3dadd(102.303, 187.102, 2.316, 0.254)
pt3dadd(102.359, 187.202, 2.342, 0.25)
pt3dadd(102.416, 187.304, 2.369, 0.244)
pt3dadd(102.472, 187.405, 2.395, 0.24)
pt3dadd(102.528, 187.507, 2.421, 0.236)
pt3dadd(102.584, 187.608, 2.447, 0.232)
pt3dadd(102.641, 187.709, 2.473, 0.228)
pt3dadd(102.682, 187.816, 2.502, 0.27)
pt3dadd(102.718, 187.924, 2.533, 0.332)
pt3dadd(102.754, 188.033, 2.563, 0.392)
pt3dadd(102.79, 188.141, 2.594, 0.454)
pt3dadd(102.826, 188.25, 2.624, 0.514)
pt3dadd(102.862, 188.358, 2.655, 0.574)
pt3dadd(102.898, 188.466, 2.685, 0.636)
pt3dadd(102.934, 188.575, 2.716, 0.696)
pt3dadd(102.971, 188.683, 2.746, 0.756)
pt3dadd(103.007, 188.791, 2.777, 0.818)
pt3dadd(103.044, 188.902, 2.804, 0.866)
pt3dadd(103.081, 189.011, 2.83, 0.912)
pt3dadd(103.119, 189.12, 2.857, 0.956)
pt3dadd(103.156, 189.229, 2.883, 1.002)
pt3dadd(103.193, 189.34, 2.91, 1.046)
pt3dadd(103.231, 189.449, 2.936, 1.092)
pt3dadd(103.268, 189.558, 2.963, 1.138)
pt3dadd(103.305, 189.667, 2.989, 1.182)
pt3dadd(103.343, 189.778, 3.016, 1.228)
pt3dadd(103.38, 189.887, 3.042, 1.274)
pt3dadd(103.427, 189.994, 3.067, 1.27)
pt3dadd(103.475, 190.099, 3.091, 1.258)
pt3dadd(103.523, 190.205, 3.115, 1.246)
pt3dadd(103.571, 190.312, 3.139, 1.234)
pt3dadd(103.619, 190.417, 3.163, 1.222)
pt3dadd(103.667, 190.524, 3.187, 1.21)
pt3dadd(103.715, 190.63, 3.212, 1.198)
pt3dadd(103.763, 190.735, 3.236, 1.186)
pt3dadd(103.811, 190.842, 3.26, 1.174)
pt3dadd(103.86, 190.948, 3.284, 1.162)
pt3dadd(103.902, 191.051, 3.321, 1.176)
pt3dadd(103.943, 191.154, 3.359, 1.194)
pt3dadd(103.984, 191.256, 3.398, 1.214)
pt3dadd(104.025, 191.359, 3.437, 1.232)
pt3dadd(104.066, 191.462, 3.476, 1.25)
pt3dadd(104.107, 191.564, 3.514, 1.268)
pt3dadd(104.148, 191.668, 3.553, 1.288)
pt3dadd(104.189, 191.77, 3.592, 1.306)
pt3dadd(104.23, 191.873, 3.63, 1.324)
pt3dadd(104.271, 191.976, 3.669, 1.344)
pt3dadd(104.309, 192.083, 3.7, 1.272)
pt3dadd(104.346, 192.192, 3.73, 1.188)
pt3dadd(104.383, 192.3, 3.76, 1.102)
pt3dadd(104.42, 192.408, 3.789, 1.016)
}
}
proc shape3d_158() {
apic[26] { pt3dadd(104.457, 192.517, 3.819, 0.932)
pt3dadd(104.494, 192.625, 3.849, 0.848)
pt3dadd(104.531, 192.733, 3.879, 0.762)
pt3dadd(104.568, 192.842, 3.908, 0.678)
pt3dadd(104.605, 192.95, 3.938, 0.592)
pt3dadd(104.642, 193.058, 3.968, 0.508)
pt3dadd(104.732, 193.133, 3.984, 0.472)
pt3dadd(104.828, 193.201, 3.999, 0.444)
pt3dadd(104.925, 193.27, 4.014, 0.418)
pt3dadd(105.022, 193.339, 4.028, 0.39)
pt3dadd(105.119, 193.408, 4.043, 0.364)
pt3dadd(105.216, 193.476, 4.058, 0.336)
pt3dadd(105.312, 193.544, 4.072, 0.308)
pt3dadd(105.409, 193.614, 4.087, 0.282)
pt3dadd(105.506, 193.682, 4.102, 0.254)
pt3dadd(105.603, 193.751, 4.116, 0.226)
pt3dadd(105.61, 193.816, 4.198, 0.242)
pt3dadd(105.614, 193.882, 4.282, 0.258)
pt3dadd(105.618, 193.946, 4.366, 0.274)
pt3dadd(105.622, 194.011, 4.45, 0.29)
pt3dadd(105.626, 194.076, 4.534, 0.306)
pt3dadd(105.63, 194.141, 4.618, 0.32)
pt3dadd(105.634, 194.207, 4.701, 0.336)
pt3dadd(105.638, 194.272, 4.786, 0.352)
pt3dadd(105.642, 194.336, 4.87, 0.368)
pt3dadd(105.646, 194.401, 4.953, 0.384)
pt3dadd(105.65, 194.467, 5.037, 0.4)
pt3dadd(105.654, 194.532, 5.121, 0.416)
pt3dadd(105.658, 194.597, 5.205, 0.432)
pt3dadd(105.662, 194.662, 5.289, 0.448)
pt3dadd(105.666, 194.726, 5.373, 0.464)
pt3dadd(105.67, 194.792, 5.457, 0.48)
pt3dadd(105.674, 194.857, 5.541, 0.496)
pt3dadd(105.678, 194.922, 5.625, 0.512)
pt3dadd(105.682, 194.987, 5.709, 0.528)
pt3dadd(105.686, 195.053, 5.793, 0.544)
pt3dadd(105.69, 195.118, 5.877, 0.56)
pt3dadd(105.694, 195.182, 5.961, 0.576)
pt3dadd(105.698, 195.247, 6.045, 0.592)
pt3dadd(105.702, 195.312, 6.129, 0.608)
pt3dadd(105.706, 195.378, 6.213, 0.624)
pt3dadd(105.71, 195.443, 6.297, 0.64)
pt3dadd(105.714, 195.508, 6.381, 0.656)
pt3dadd(105.718, 195.572, 6.465, 0.672)
pt3dadd(105.762, 195.655, 6.5, 0.678)
pt3dadd(105.834, 195.751, 6.5, 0.678)
pt3dadd(105.906, 195.847, 6.5, 0.678)
pt3dadd(105.978, 195.943, 6.5, 0.678)
pt3dadd(106.05, 196.039, 6.5, 0.678)
pt3dadd(106.109, 196.144, 6.5, 0.678)
pt3dadd(106.16, 196.252, 6.5, 0.678)
pt3dadd(106.21, 196.361, 6.5, 0.678)
pt3dadd(106.261, 196.47, 6.5, 0.678)
pt3dadd(106.311, 196.578, 6.5, 0.678)
pt3dadd(106.352, 196.691, 6.5, 0.678)
pt3dadd(106.369, 196.81, 6.5, 0.678)
pt3dadd(106.386, 196.928, 6.5, 0.678)
pt3dadd(106.404, 197.047, 6.5, 0.678)
pt3dadd(106.421, 197.165, 6.5, 0.678)
pt3dadd(106.438, 197.284, 6.5, 0.678)
pt3dadd(106.459, 197.402, 6.5, 0.678)
pt3dadd(106.5, 197.514, 6.5, 0.678)
pt3dadd(106.542, 197.627, 6.5, 0.678)
pt3dadd(106.584, 197.74, 6.5, 0.678)
pt3dadd(106.625, 197.852, 6.5, 0.678)
pt3dadd(106.667, 197.965, 6.5, 0.678)
pt3dadd(106.717, 198.073, 6.5, 0.678)
pt3dadd(106.77, 198.181, 6.5, 0.678)
pt3dadd(106.824, 198.288, 6.5, 0.678)
pt3dadd(106.878, 198.396, 6.5, 0.678)
pt3dadd(106.931, 198.503, 6.5, 0.678)
pt3dadd(106.996, 198.604, 6.5, 0.678)
pt3dadd(107.074, 198.694, 6.5, 0.678)
pt3dadd(107.152, 198.785, 6.5, 0.678)
pt3dadd(107.23, 198.876, 6.5, 0.678)
pt3dadd(107.308, 198.967, 6.5, 0.678)
pt3dadd(107.376, 199.066, 6.5, 0.678)
pt3dadd(107.432, 199.172, 6.5, 0.678)
pt3dadd(107.489, 199.278, 6.5, 0.678)
pt3dadd(107.546, 199.384, 6.5, 0.678)
pt3dadd(107.602, 199.489, 6.5, 0.678)
pt3dadd(107.648, 199.598, 6.493, 0.678)
pt3dadd(107.671, 199.712, 6.471, 0.678)
pt3dadd(107.695, 199.828, 6.449, 0.678)
pt3dadd(107.718, 199.943, 6.428, 0.678)
pt3dadd(107.742, 200.057, 6.406, 0.678)
pt3dadd(107.76, 200.154, 6.368, 0.678)
pt3dadd(107.76, 200.186, 6.272, 0.678)
pt3dadd(107.76, 200.245, 6.187, 0.678)
pt3dadd(107.76, 200.341, 6.13, 0.678)
pt3dadd(107.76, 200.455, 6.141, 0.678)
pt3dadd(107.76, 200.53, 6.217, 0.678)
pt3dadd(107.76, 200.584, 6.306, 0.678)
pt3dadd(107.76, 200.638, 6.396, 0.678)
pt3dadd(107.786, 200.706, 6.472, 0.678)
pt3dadd(107.842, 200.804, 6.5, 0.678)
pt3dadd(107.876, 200.92, 6.5, 0.678)
pt3dadd(107.916, 201.032, 6.5, 0.678)
pt3dadd(107.955, 201.145, 6.5, 0.678)
pt3dadd(108.007, 201.253, 6.5, 0.678)
pt3dadd(108.061, 201.361, 6.5, 0.678)
pt3dadd(108.101, 201.474, 6.5, 0.678)
pt3dadd(108.129, 201.588, 6.515, 0.678)
pt3dadd(108.156, 201.703, 6.533, 0.678)
pt3dadd(108.182, 201.818, 6.55, 0.678)
pt3dadd(108.209, 201.934, 6.568, 0.678)
pt3dadd(108.236, 202.049, 6.586, 0.678)
pt3dadd(108.257, 202.132, 6.525, 0.678)
pt3dadd(108.278, 202.207, 6.45, 0.678)
pt3dadd(108.326, 202.314, 6.444, 0.678)
pt3dadd(108.36, 202.416, 6.467, 0.678)
pt3dadd(108.36, 202.504, 6.535, 0.678)
pt3dadd(108.36, 202.598, 6.59, 0.678)
pt3dadd(108.36, 202.718, 6.593, 0.678)
pt3dadd(108.36, 202.837, 6.597, 0.678)
pt3dadd(108.36, 202.957, 6.6, 0.678)
pt3dadd(108.36, 203.077, 6.6, 0.678)
pt3dadd(108.36, 203.197, 6.605, 0.678)
pt3dadd(108.36, 203.316, 6.622, 0.678)
pt3dadd(108.36, 203.434, 6.638, 0.678)
pt3dadd(108.36, 203.552, 6.655, 0.678)
pt3dadd(108.36, 203.671, 6.671, 0.678)
pt3dadd(108.36, 203.789, 6.687, 0.678)
pt3dadd(108.366, 203.908, 6.7, 0.678)
pt3dadd(108.39, 204.024, 6.7, 0.678)
pt3dadd(108.415, 204.142, 6.7, 0.678)
pt3dadd(108.44, 204.259, 6.7, 0.678)
pt3dadd(108.465, 204.377, 6.7, 0.678)
pt3dadd(108.49, 204.494, 6.7, 0.678)
pt3dadd(108.514, 204.612, 6.7, 0.678)
pt3dadd(108.536, 204.73, 6.7, 0.678)
pt3dadd(108.558, 204.847, 6.7, 0.678)
pt3dadd(108.58, 204.966, 6.7, 0.678)
pt3dadd(108.603, 205.084, 6.7, 0.678)
pt3dadd(108.625, 205.201, 6.7, 0.678)
pt3dadd(108.649, 205.319, 6.7, 0.678)
pt3dadd(108.676, 205.435, 6.7, 0.678)
pt3dadd(108.704, 205.553, 6.7, 0.678)
pt3dadd(108.732, 205.669, 6.7, 0.678)
pt3dadd(108.759, 205.786, 6.7, 0.678)
pt3dadd(108.787, 205.903, 6.7, 0.678)
pt3dadd(108.81, 206.021, 6.7, 0.678)
pt3dadd(108.83, 206.138, 6.7, 0.678)
pt3dadd(108.85, 206.257, 6.7, 0.678)
pt3dadd(108.87, 206.376, 6.7, 0.678)
pt3dadd(108.889, 206.494, 6.7, 0.678)
pt3dadd(108.909, 206.612, 6.7, 0.678)
pt3dadd(108.923, 206.731, 6.7, 0.678)
pt3dadd(108.929, 206.851, 6.7, 0.678)
pt3dadd(108.935, 206.971, 6.7, 0.678)
pt3dadd(108.941, 207.091, 6.7, 0.678)
pt3dadd(108.947, 207.211, 6.7, 0.678)
pt3dadd(108.953, 207.33, 6.7, 0.678)
pt3dadd(108.959, 207.45, 6.7, 0.678)
pt3dadd(108.975, 207.569, 6.7, 0.678)
pt3dadd(108.995, 207.688, 6.7, 0.678)
pt3dadd(109.014, 207.806, 6.7, 0.678)
pt3dadd(109.034, 207.924, 6.7, 0.678)
pt3dadd(109.054, 208.043, 6.7, 0.678)
pt3dadd(109.074, 208.16, 6.7, 0.678)
pt3dadd(109.095, 208.279, 6.7, 0.678)
pt3dadd(109.117, 208.397, 6.7, 0.678)
pt3dadd(109.139, 208.514, 6.7, 0.678)
pt3dadd(109.162, 208.633, 6.7, 0.678)
pt3dadd(109.184, 208.751, 6.7, 0.678)
pt3dadd(109.206, 208.868, 6.7, 0.678)
pt3dadd(109.225, 208.987, 6.7, 0.678)
pt3dadd(109.242, 209.106, 6.7, 0.678)
pt3dadd(109.26, 209.225, 6.7, 0.678)
pt3dadd(109.277, 209.344, 6.7, 0.678)
pt3dadd(109.294, 209.462, 6.7, 0.678)
pt3dadd(109.311, 209.581, 6.7, 0.678)
pt3dadd(109.321, 209.7, 6.7, 0.678)
pt3dadd(109.323, 209.82, 6.7, 0.678)
pt3dadd(109.325, 209.94, 6.7, 0.678)
pt3dadd(109.327, 210.06, 6.7, 0.678)
pt3dadd(109.329, 210.18, 6.7, 0.678)
pt3dadd(109.331, 210.3, 6.7, 0.678)
pt3dadd(109.332, 210.42, 6.7, 0.678)
pt3dadd(109.344, 210.539, 6.7, 0.678)
pt3dadd(109.361, 210.658, 6.7, 0.678)
pt3dadd(109.378, 210.776, 6.7, 0.678)
pt3dadd(109.396, 210.895, 6.7, 0.678)
pt3dadd(109.413, 211.014, 6.7, 0.678)
pt3dadd(109.43, 211.133, 6.7, 0.678)
pt3dadd(109.449, 211.252, 6.7, 0.678)
pt3dadd(109.468, 211.37, 6.7, 0.678)
pt3dadd(109.488, 211.488, 6.7, 0.678)
pt3dadd(109.508, 211.607, 6.7, 0.678)
pt3dadd(109.527, 211.726, 6.7, 0.678)
pt3dadd(109.547, 211.843, 6.7, 0.678)
pt3dadd(109.566, 211.962, 6.7, 0.678)
pt3dadd(109.583, 212.081, 6.7, 0.678)
pt3dadd(109.601, 212.2, 6.7, 0.678)
pt3dadd(109.618, 212.318, 6.7, 0.678)
pt3dadd(109.635, 212.437, 6.7, 0.678)
pt3dadd(109.653, 212.556, 6.7, 0.678)
pt3dadd(109.669, 212.675, 6.7, 0.678)
pt3dadd(109.684, 212.794, 6.7, 0.678)
pt3dadd(109.699, 212.912, 6.7, 0.678)
}
}
proc shape3d_159() {
apic[26] { pt3dadd(109.714, 213.031, 6.7, 0.678)
pt3dadd(109.729, 213.151, 6.7, 0.678)
pt3dadd(109.744, 213.27, 6.7, 0.678)
pt3dadd(109.759, 213.389, 6.7, 0.678)
pt3dadd(109.766, 213.509, 6.7, 0.678)
pt3dadd(109.772, 213.629, 6.7, 0.678)
pt3dadd(109.778, 213.749, 6.7, 0.678)
pt3dadd(109.784, 213.869, 6.7, 0.678)
pt3dadd(109.79, 213.988, 6.7, 0.678)
pt3dadd(109.795, 214.108, 6.7, 0.678)
pt3dadd(109.805, 214.228, 6.7, 0.678)
pt3dadd(109.824, 214.346, 6.7, 0.678)
pt3dadd(109.844, 214.464, 6.7, 0.678)
pt3dadd(109.864, 214.583, 6.7, 0.678)
pt3dadd(109.884, 214.7, 6.7, 0.678)
pt3dadd(109.903, 214.819, 6.7, 0.678)
pt3dadd(109.929, 214.936, 6.7, 0.678)
pt3dadd(109.992, 215.038, 6.7, 0.678)
pt3dadd(110.055, 215.14, 6.7, 0.678)
pt3dadd(110.118, 215.242, 6.7, 0.678)
pt3dadd(110.181, 215.344, 6.7, 0.678)
pt3dadd(110.241, 215.447, 6.7, 0.678)
pt3dadd(110.247, 215.567, 6.7, 0.678)
pt3dadd(110.253, 215.687, 6.7, 0.678)
pt3dadd(110.259, 215.807, 6.7, 0.678)
pt3dadd(110.265, 215.927, 6.7, 0.678)
pt3dadd(110.27, 216.047, 6.7, 0.678)
pt3dadd(110.276, 216.167, 6.7, 0.678)
pt3dadd(110.28, 216.286, 6.7, 0.678)
pt3dadd(110.28, 216.406, 6.7, 0.678)
pt3dadd(110.28, 216.526, 6.7, 0.678)
pt3dadd(110.28, 216.646, 6.7, 0.678)
pt3dadd(110.28, 216.766, 6.7, 0.678)
pt3dadd(110.28, 216.886, 6.7, 0.678)
pt3dadd(110.28, 217.006, 6.7, 0.678)
pt3dadd(110.28, 217.126, 6.7, 0.678)
pt3dadd(110.28, 217.246, 6.7, 0.678)
pt3dadd(110.28, 217.366, 6.7, 0.678)
pt3dadd(110.28, 217.486, 6.7, 0.678)
pt3dadd(110.28, 217.606, 6.7, 0.678)
pt3dadd(110.28, 217.726, 6.7, 0.678)
pt3dadd(110.28, 217.846, 6.7, 0.678)
pt3dadd(110.28, 217.966, 6.7, 0.678)
pt3dadd(110.28, 218.086, 6.7, 0.678)
pt3dadd(110.28, 218.206, 6.7, 0.678)
pt3dadd(110.28, 218.326, 6.7, 0.678)
pt3dadd(110.28, 218.446, 6.7, 0.678)
pt3dadd(110.28, 218.566, 6.7, 0.678)
pt3dadd(110.28, 218.686, 6.7, 0.678)
pt3dadd(110.285, 218.806, 6.7, 0.678)
pt3dadd(110.298, 218.926, 6.7, 0.678)
pt3dadd(110.31, 219.044, 6.7, 0.678)
pt3dadd(110.323, 219.164, 6.7, 0.678)
pt3dadd(110.335, 219.283, 6.7, 0.678)
pt3dadd(110.348, 219.402, 6.7, 0.678)
pt3dadd(110.361, 219.522, 6.7, 0.678)
pt3dadd(110.388, 219.638, 6.7, 0.678)
pt3dadd(110.416, 219.756, 6.7, 0.678)
pt3dadd(110.443, 219.872, 6.7, 0.678)
pt3dadd(110.471, 219.989, 6.7, 0.678)
pt3dadd(110.498, 220.106, 6.7, 0.678)
pt3dadd(110.526, 220.223, 6.7, 0.678)
pt3dadd(110.559, 220.338, 6.7, 0.678)
pt3dadd(110.593, 220.453, 6.7, 0.678)
pt3dadd(110.626, 220.568, 6.7, 0.678)
pt3dadd(110.659, 220.684, 6.7, 0.678)
pt3dadd(110.692, 220.799, 6.7, 0.678)
pt3dadd(110.719, 220.916, 6.7, 0.678)
pt3dadd(110.741, 221.034, 6.7, 0.678)
pt3dadd(110.764, 221.152, 6.7, 0.678)
pt3dadd(110.786, 221.269, 6.7, 0.678)
pt3dadd(110.808, 221.388, 6.7, 0.678)
pt3dadd(110.83, 221.506, 6.7, 0.678)
pt3dadd(110.844, 221.624, 6.7, 0.678)
pt3dadd(110.85, 221.744, 6.7, 0.678)
pt3dadd(110.856, 221.864, 6.7, 0.678)
pt3dadd(110.861, 221.984, 6.7, 0.678)
pt3dadd(110.867, 222.104, 6.7, 0.678)
pt3dadd(110.873, 222.224, 6.7, 0.678)
pt3dadd(110.879, 222.343, 6.7, 0.678)
pt3dadd(110.88, 222.463, 6.7, 0.678)
pt3dadd(110.88, 222.583, 6.7, 0.678)
pt3dadd(110.88, 222.703, 6.7, 0.678)
pt3dadd(110.88, 222.823, 6.7, 0.678)
pt3dadd(110.88, 222.943, 6.7, 0.678)
pt3dadd(110.88, 223.063, 6.7, 0.678)
pt3dadd(110.88, 223.183, 6.7, 0.678)
pt3dadd(110.88, 223.303, 6.7, 0.678)
pt3dadd(110.88, 223.423, 6.7, 0.678)
pt3dadd(110.88, 223.543, 6.7, 0.678)
pt3dadd(110.88, 223.663, 6.7, 0.678)
pt3dadd(110.88, 223.783, 6.7, 0.678)
pt3dadd(110.88, 223.903, 6.7, 0.678)
pt3dadd(110.88, 224.023, 6.7, 0.678)
pt3dadd(110.906, 224.141, 6.7, 0.678)
pt3dadd(110.936, 224.256, 6.7, 0.678)
pt3dadd(110.966, 224.372, 6.7, 0.678)
pt3dadd(110.996, 224.489, 6.7, 0.678)
pt3dadd(111.026, 224.605, 6.7, 0.678)
pt3dadd(111.057, 224.722, 6.7, 0.678)
pt3dadd(111.093, 224.836, 6.7, 0.678)
pt3dadd(111.129, 224.95, 6.7, 0.678)
pt3dadd(111.165, 225.065, 6.7, 0.678)
pt3dadd(111.201, 225.179, 6.7, 0.678)
pt3dadd(111.237, 225.294, 6.7, 0.678)
pt3dadd(111.271, 225.408, 6.7, 0.678)
pt3dadd(111.304, 225.524, 6.7, 0.678)
pt3dadd(111.337, 225.64, 6.7, 0.678)
pt3dadd(111.37, 225.755, 6.7, 0.678)
pt3dadd(111.403, 225.87, 6.7, 0.678)
pt3dadd(111.436, 225.985, 6.7, 0.678)
pt3dadd(111.49, 226.092, 6.7, 0.678)
pt3dadd(111.547, 226.198, 6.7, 0.678)
pt3dadd(111.603, 226.304, 6.7, 0.678)
pt3dadd(111.66, 226.41, 6.7, 0.678)
pt3dadd(111.716, 226.516, 6.7, 0.678)
pt3dadd(111.782, 226.615, 6.695, 0.678)
pt3dadd(111.852, 226.712, 6.688, 0.678)
pt3dadd(111.921, 226.81, 6.681, 0.678)
pt3dadd(111.991, 226.908, 6.674, 0.678)
pt3dadd(112.061, 227.005, 6.667, 0.678)
pt3dadd(112.073, 227.096, 6.607, 0.678)
pt3dadd(112.079, 227.188, 6.542, 0.678)
pt3dadd(112.094, 227.302, 6.521, 0.678)
pt3dadd(112.111, 227.419, 6.507, 0.678)
pt3dadd(112.149, 227.53, 6.5, 0.678)
pt3dadd(112.209, 227.633, 6.5, 0.678)
pt3dadd(112.281, 227.726, 6.5, 0.678)
pt3dadd(112.38, 227.795, 6.5, 0.678)
pt3dadd(112.473, 227.867, 6.5, 0.678)
pt3dadd(112.527, 227.975, 6.5, 0.678)
pt3dadd(112.566, 228.088, 6.5, 0.678)
pt3dadd(112.596, 228.204, 6.5, 0.678)
pt3dadd(112.626, 228.319, 6.5, 0.678)
pt3dadd(112.656, 228.436, 6.5, 0.678)
pt3dadd(112.686, 228.552, 6.5, 0.678)
pt3dadd(112.716, 228.668, 6.5, 0.678)
pt3dadd(112.776, 228.772, 6.5, 0.678)
pt3dadd(112.839, 228.874, 6.5, 0.678)
pt3dadd(112.902, 228.976, 6.5, 0.678)
pt3dadd(112.965, 229.078, 6.5, 0.678)
pt3dadd(113.028, 229.181, 6.5, 0.678)
pt3dadd(113.04, 229.297, 6.5, 0.678)
pt3dadd(113.04, 229.417, 6.5, 0.678)
pt3dadd(113.04, 229.537, 6.5, 0.678)
pt3dadd(113.089, 229.644, 6.5, 0.678)
pt3dadd(113.15, 229.747, 6.5, 0.678)
pt3dadd(113.243, 229.811, 6.5, 0.678)
pt3dadd(113.356, 229.852, 6.5, 0.678)
pt3dadd(113.467, 229.896, 6.5, 0.678)
pt3dadd(113.57, 229.957, 6.5, 0.678)
pt3dadd(113.67, 230.021, 6.5, 0.678)
pt3dadd(113.724, 230.129, 6.5, 0.678)
pt3dadd(113.785, 230.232, 6.5, 0.678)
pt3dadd(113.851, 230.332, 6.5, 0.678)
pt3dadd(113.917, 230.432, 6.5, 0.678)
pt3dadd(113.983, 230.532, 6.5, 0.678)
pt3dadd(114.049, 230.633, 6.5, 0.678)
pt3dadd(114.114, 230.734, 6.5, 0.678)
pt3dadd(114.176, 230.836, 6.5, 0.678)
pt3dadd(114.239, 230.939, 6.5, 0.678)
pt3dadd(114.302, 231.041, 6.5, 0.678)
pt3dadd(114.364, 231.143, 6.5, 0.678)
pt3dadd(114.405, 231.253, 6.5, 0.678)
pt3dadd(114.418, 231.372, 6.5, 0.678)
pt3dadd(114.43, 231.491, 6.5, 0.678)
pt3dadd(114.443, 231.611, 6.5, 0.678)
pt3dadd(114.456, 231.73, 6.5, 0.678)
pt3dadd(114.468, 231.85, 6.5, 0.678)
pt3dadd(114.481, 231.968, 6.5, 0.678)
pt3dadd(114.501, 232.087, 6.5, 0.678)
pt3dadd(114.521, 232.205, 6.5, 0.678)
pt3dadd(114.541, 232.324, 6.5, 0.678)
pt3dadd(114.56, 232.442, 6.5, 0.678)
pt3dadd(114.58, 232.56, 6.5, 0.678)
pt3dadd(114.6, 232.679, 6.5, 0.678)
pt3dadd(114.671, 232.775, 6.5, 0.678)
pt3dadd(114.743, 232.871, 6.5, 0.678)
pt3dadd(114.815, 232.967, 6.5, 0.678)
pt3dadd(114.887, 233.063, 6.5, 0.678)
pt3dadd(114.959, 233.159, 6.5, 0.678)
pt3dadd(115.013, 233.267, 6.5, 0.678)
pt3dadd(115.067, 233.374, 6.5, 0.678)
pt3dadd(115.12, 233.48, 6.5, 0.678)
pt3dadd(115.174, 233.588, 6.5, 0.678)
pt3dadd(115.227, 233.695, 6.5, 0.678)
pt3dadd(115.281, 233.803, 6.5, 0.678)
pt3dadd(115.335, 233.91, 6.5, 0.678)
pt3dadd(115.389, 234.018, 6.5, 0.678)
pt3dadd(115.443, 234.125, 6.5, 0.678)
pt3dadd(115.497, 234.232, 6.5, 0.678)
pt3dadd(115.55, 234.34, 6.5, 0.678)
pt3dadd(115.604, 234.446, 6.5, 0.678)
pt3dadd(115.657, 234.554, 6.5, 0.678)
pt3dadd(115.711, 234.661, 6.5, 0.678)
pt3dadd(115.764, 234.769, 6.5, 0.678)
pt3dadd(115.83, 234.868, 6.5, 0.678)
pt3dadd(115.919, 234.948, 6.5, 0.678)
pt3dadd(116.008, 235.028, 6.5, 0.678)
pt3dadd(116.097, 235.109, 6.5, 0.678)
}
}
proc shape3d_160() {
apic[26] { pt3dadd(116.185, 235.189, 6.5, 0.678)
pt3dadd(116.267, 235.277, 6.495, 0.678)
pt3dadd(116.337, 235.373, 6.48, 0.678)
pt3dadd(116.406, 235.469, 6.465, 0.678)
pt3dadd(116.476, 235.565, 6.451, 0.678)
pt3dadd(116.546, 235.661, 6.436, 0.678)
pt3dadd(116.592, 235.77, 6.428, 0.678)
pt3dadd(116.633, 235.883, 6.422, 0.678)
pt3dadd(116.674, 235.996, 6.415, 0.678)
pt3dadd(116.715, 236.107, 6.409, 0.678)
pt3dadd(116.756, 236.22, 6.403, 0.678)
pt3dadd(116.818, 236.32, 6.391, 0.678)
pt3dadd(116.894, 236.411, 6.377, 0.678)
pt3dadd(116.971, 236.502, 6.362, 0.678)
pt3dadd(117.047, 236.593, 6.347, 0.678)
pt3dadd(117.124, 236.683, 6.333, 0.678)
pt3dadd(117.208, 236.768, 6.326, 0.678)
pt3dadd(117.293, 236.852, 6.319, 0.678)
pt3dadd(117.377, 236.938, 6.312, 0.678)
pt3dadd(117.462, 237.023, 6.305, 0.678)
pt3dadd(117.543, 237.11, 6.299, 0.678)
pt3dadd(117.616, 237.205, 6.297, 0.678)
pt3dadd(117.689, 237.3, 6.295, 0.678)
pt3dadd(117.762, 237.395, 6.293, 0.678)
pt3dadd(117.836, 237.491, 6.29, 0.678)
pt3dadd(117.907, 237.586, 6.281, 0.678)
pt3dadd(117.976, 237.68, 6.261, 0.678)
pt3dadd(118.045, 237.776, 6.241, 0.678)
pt3dadd(118.114, 237.871, 6.221, 0.678)
pt3dadd(118.182, 237.967, 6.201, 0.678)
pt3dadd(118.217, 238.081, 6.2, 0.678)
pt3dadd(118.257, 238.194, 6.2, 0.678)
pt3dadd(118.299, 238.306, 6.2, 0.678)
pt3dadd(118.318, 238.424, 6.2, 0.678)
pt3dadd(118.32, 238.543, 6.2, 0.678)
pt3dadd(118.32, 238.663, 6.189, 0.678)
pt3dadd(118.324, 238.76, 6.137, 0.678)
pt3dadd(118.367, 238.798, 6.052, 0.678)
pt3dadd(118.472, 238.8, 6.007, 0.678)
pt3dadd(118.586, 238.806, 5.978, 0.678)
pt3dadd(118.684, 238.842, 5.933, 0.678)
pt3dadd(118.78, 238.91, 5.915, 0.678)
pt3dadd(118.873, 238.982, 5.9, 0.678)
pt3dadd(118.934, 239.087, 5.9, 0.678)
pt3dadd(118.995, 239.19, 5.9, 0.678)
pt3dadd(119.03, 239.304, 5.9, 0.678)
pt3dadd(119.063, 239.419, 5.9, 0.678)
pt3dadd(119.096, 239.534, 5.9, 0.678)
pt3dadd(119.128, 239.651, 5.9, 0.678)
pt3dadd(119.161, 239.766, 5.9, 0.678)
pt3dadd(119.194, 239.881, 5.9, 0.678)
pt3dadd(119.26, 239.966, 5.9, 0.678)
pt3dadd(119.371, 240.013, 5.9, 0.678)
pt3dadd(119.475, 240.066, 5.9, 0.678)
pt3dadd(119.536, 240.17, 5.9, 0.678)
pt3dadd(119.597, 240.274, 5.9, 0.678)
pt3dadd(119.614, 240.391, 5.9, 0.678)
pt3dadd(119.629, 240.511, 5.9, 0.678)
pt3dadd(119.64, 240.63, 5.9, 0.678)
pt3dadd(119.64, 240.75, 5.9, 0.678)
pt3dadd(119.64, 240.87, 5.9, 0.678)
pt3dadd(119.643, 240.989, 5.894, 0.678)
pt3dadd(119.653, 241.105, 5.872, 0.678)
pt3dadd(119.663, 241.222, 5.849, 0.678)
pt3dadd(119.673, 241.338, 5.826, 0.678)
pt3dadd(119.715, 241.436, 5.807, 0.678)
pt3dadd(119.814, 241.502, 5.796, 0.678)
pt3dadd(119.918, 241.553, 5.779, 0.678)
pt3dadd(120.017, 241.564, 5.726, 0.678)
pt3dadd(120.108, 241.571, 5.661, 0.678)
pt3dadd(120.186, 241.628, 5.623, 0.678)
pt3dadd(120.254, 241.724, 5.606, 0.678)
pt3dadd(120.328, 241.819, 5.6, 0.678)
pt3dadd(120.402, 241.913, 5.6, 0.678)
pt3dadd(120.45, 242.018, 5.6, 0.678)
pt3dadd(120.47, 242.137, 5.6, 0.678)
pt3dadd(120.491, 242.255, 5.6, 0.678)
pt3dadd(120.533, 242.368, 5.6, 0.678)
pt3dadd(120.569, 242.482, 5.6, 0.678)
pt3dadd(120.59, 242.599, 5.6, 0.678)
pt3dadd(120.613, 242.717, 5.6, 0.678)
pt3dadd(120.635, 242.836, 5.6, 0.678)
pt3dadd(120.658, 242.953, 5.6, 0.678)
pt3dadd(120.679, 243.071, 5.6, 0.678)
pt3dadd(120.709, 243.187, 5.6, 0.678)
pt3dadd(120.75, 243.3, 5.6, 0.678)
pt3dadd(120.792, 243.412, 5.6, 0.678)
pt3dadd(120.834, 243.524, 5.6, 0.678)
pt3dadd(120.875, 243.637, 5.6, 0.678)
pt3dadd(120.917, 243.75, 5.6, 0.678)
pt3dadd(120.954, 243.85, 5.556, 0.678)
pt3dadd(120.991, 243.948, 5.507, 0.678)
pt3dadd(121.027, 244.045, 5.459, 0.678)
pt3dadd(121.064, 244.144, 5.41, 0.678)
pt3dadd(121.11, 244.244, 5.373, 0.678)
pt3dadd(121.164, 244.346, 5.346, 0.678)
pt3dadd(121.218, 244.448, 5.318, 0.678)
pt3dadd(121.272, 244.55, 5.291, 0.678)
pt3dadd(121.321, 244.655, 5.265, 0.678)
pt3dadd(121.327, 244.774, 5.254, 0.678)
pt3dadd(121.334, 244.892, 5.243, 0.678)
pt3dadd(121.34, 245.011, 5.232, 0.678)
pt3dadd(121.346, 245.131, 5.221, 0.678)
pt3dadd(121.354, 245.25, 5.21, 0.678)
pt3dadd(121.362, 245.369, 5.2, 0.678)
pt3dadd(121.404, 245.48, 5.2, 0.678)
pt3dadd(121.446, 245.593, 5.2, 0.678)
pt3dadd(121.488, 245.706, 5.2, 0.678)
pt3dadd(121.529, 245.819, 5.2, 0.678)
pt3dadd(121.571, 245.932, 5.2, 0.678)
pt3dadd(121.619, 246.038, 5.186, 0.678)
pt3dadd(121.672, 246.144, 5.165, 0.678)
pt3dadd(121.723, 246.248, 5.143, 0.678)
pt3dadd(121.776, 246.353, 5.121, 0.678)
pt3dadd(121.828, 246.458, 5.1, 0.678)
pt3dadd(121.867, 246.571, 5.1, 0.678)
pt3dadd(121.906, 246.685, 5.1, 0.678)
pt3dadd(121.944, 246.799, 5.1, 0.678)
pt3dadd(121.982, 246.912, 5.1, 0.678)
pt3dadd(122.022, 247.026, 5.1, 0.678)
pt3dadd(122.065, 247.138, 5.1, 0.678)
pt3dadd(122.112, 247.248, 5.1, 0.678)
pt3dadd(122.16, 247.358, 5.1, 0.678)
pt3dadd(122.208, 247.469, 5.1, 0.678)
pt3dadd(122.255, 247.579, 5.1, 0.678)
pt3dadd(122.305, 247.687, 5.1, 0.678)
pt3dadd(122.365, 247.792, 5.1, 0.678)
pt3dadd(122.425, 247.896, 5.1, 0.678)
pt3dadd(122.485, 247.999, 5.1, 0.678)
pt3dadd(122.545, 248.104, 5.1, 0.678)
pt3dadd(122.603, 248.208, 5.1, 0.678)
pt3dadd(122.642, 248.322, 5.1, 0.678)
pt3dadd(122.682, 248.435, 5.1, 0.678)
pt3dadd(122.756, 248.526, 5.1, 0.678)
pt3dadd(122.844, 248.606, 5.1, 0.678)
pt3dadd(122.942, 248.674, 5.103, 0.678)
pt3dadd(123.049, 248.729, 5.108, 0.678)
pt3dadd(123.156, 248.768, 5.128, 0.678)
pt3dadd(123.265, 248.788, 5.166, 0.678)
pt3dadd(123.353, 248.84, 5.191, 0.678)
pt3dadd(123.406, 248.948, 5.197, 0.678)
pt3dadd(123.457, 249.056, 5.204, 0.678)
pt3dadd(123.509, 249.164, 5.21, 0.678)
pt3dadd(123.59, 249.234, 5.246, 0.678)
pt3dadd(123.68, 249.294, 5.289, 0.678)
pt3dadd(123.744, 249.395, 5.3, 0.678)
pt3dadd(123.814, 249.492, 5.3, 0.678)
pt3dadd(123.882, 249.59, 5.3, 0.678)
pt3dadd(123.952, 249.689, 5.3, 0.678)
pt3dadd(124.02, 249.787, 5.3, 0.678)
pt3dadd(124.092, 249.883, 5.3, 0.678)
pt3dadd(124.17, 249.974, 5.3, 0.678)
pt3dadd(124.248, 250.066, 5.3, 0.678)
pt3dadd(124.326, 250.157, 5.3, 0.678)
pt3dadd(124.403, 250.248, 5.3, 0.678)
pt3dadd(124.487, 250.334, 5.299, 0.678)
pt3dadd(124.579, 250.41, 5.297, 0.678)
pt3dadd(124.672, 250.487, 5.295, 0.678)
pt3dadd(124.764, 250.562, 5.292, 0.678)
pt3dadd(124.858, 250.639, 5.29, 0.678)
pt3dadd(124.945, 250.711, 5.267, 0.678)
pt3dadd(125.026, 250.78, 5.221, 0.678)
pt3dadd(125.107, 250.848, 5.175, 0.678)
pt3dadd(125.189, 250.916, 5.129, 0.678)
pt3dadd(125.281, 250.979, 5.095, 0.678)
pt3dadd(125.389, 251.028, 5.081, 0.678)
pt3dadd(125.496, 251.078, 5.067, 0.678)
pt3dadd(125.604, 251.128, 5.053, 0.678)
pt3dadd(125.712, 251.178, 5.039, 0.678)
pt3dadd(125.815, 251.237, 5.029, 0.678)
pt3dadd(125.915, 251.303, 5.023, 0.678)
pt3dadd(126.014, 251.37, 5.016, 0.678)
pt3dadd(126.114, 251.436, 5.009, 0.678)
pt3dadd(126.214, 251.502, 5.002, 0.678)
pt3dadd(126.325, 251.545, 4.998, 0.678)
pt3dadd(126.44, 251.579, 4.997, 0.678)
pt3dadd(126.556, 251.612, 4.995, 0.678)
pt3dadd(126.671, 251.646, 4.992, 0.678)
pt3dadd(126.786, 251.68, 4.99, 0.678)
pt3dadd(126.901, 251.708, 4.986, 0.678)
pt3dadd(127.019, 251.718, 4.971, 0.678)
pt3dadd(127.138, 251.728, 4.955, 0.678)
pt3dadd(127.255, 251.736, 4.94, 0.678)
pt3dadd(127.374, 251.746, 4.924, 0.678)
pt3dadd(127.492, 251.755, 4.909, 0.678)
pt3dadd(127.608, 251.779, 4.897, 0.678)
pt3dadd(127.718, 251.822, 4.891, 0.678)
pt3dadd(127.83, 251.867, 4.884, 0.678)
pt3dadd(127.942, 251.911, 4.878, 0.678)
pt3dadd(128.053, 251.954, 4.871, 0.678)
pt3dadd(128.162, 252.004, 4.869, 0.678)
pt3dadd(128.264, 252.065, 4.878, 0.678)
pt3dadd(128.366, 252.127, 4.886, 0.678)
pt3dadd(128.47, 252.188, 4.895, 0.678)
pt3dadd(128.578, 252.234, 4.9, 0.678)
pt3dadd(128.696, 252.254, 4.9, 0.678)
pt3dadd(128.814, 252.274, 4.9, 0.678)
pt3dadd(128.933, 252.294, 4.9, 0.678)
pt3dadd(129.052, 252.313, 4.9, 0.678)
pt3dadd(129.169, 252.332, 4.9, 0.678)
}
}
proc shape3d_161() {
apic[26] { pt3dadd(129.287, 252.348, 4.908, 0.678)
pt3dadd(129.402, 252.35, 4.936, 0.678)
pt3dadd(129.517, 252.353, 4.964, 0.678)
pt3dadd(129.632, 252.355, 4.992, 0.678)
pt3dadd(129.748, 252.358, 5.02, 0.678)
pt3dadd(129.863, 252.359, 5.048, 0.678)
pt3dadd(129.982, 252.361, 5.061, 0.678)
pt3dadd(130.102, 252.364, 5.068, 0.678)
pt3dadd(130.22, 252.366, 5.074, 0.678)
pt3dadd(130.34, 252.367, 5.081, 0.678)
pt3dadd(130.46, 252.37, 5.088, 0.678)
pt3dadd(130.58, 252.372, 5.095, 0.678)
pt3dadd(130.698, 252.384, 5.1, 0.678)
pt3dadd(130.811, 252.424, 5.1, 0.678)
pt3dadd(130.925, 252.463, 5.1, 0.678)
pt3dadd(131.041, 252.491, 5.1, 0.678)
pt3dadd(131.158, 252.517, 5.1, 0.678)
pt3dadd(131.258, 252.57, 5.093, 0.678)
pt3dadd(131.334, 252.66, 5.076, 0.678)
pt3dadd(131.411, 252.737, 5.039, 0.678)
pt3dadd(131.488, 252.798, 4.981, 0.678)
pt3dadd(131.588, 252.846, 4.952, 0.678)
pt3dadd(131.699, 252.889, 4.932, 0.678)
pt3dadd(131.808, 252.931, 4.913, 0.678)
pt3dadd(131.921, 252.96, 4.9, 0.678)
pt3dadd(132.041, 252.96, 4.9, 0.678)
pt3dadd(132.161, 252.96, 4.9, 0.678)
pt3dadd(132.281, 252.96, 4.9, 0.678)
pt3dadd(132.4, 252.953, 4.906, 0.678)
pt3dadd(132.516, 252.932, 4.925, 0.678)
pt3dadd(132.631, 252.913, 4.944, 0.678)
pt3dadd(132.748, 252.893, 4.963, 0.678)
pt3dadd(132.864, 252.872, 4.982, 0.678)
pt3dadd(132.98, 252.852, 5.001, 0.678)
pt3dadd(133.097, 252.835, 5.02, 0.678)
pt3dadd(133.213, 252.817, 5.038, 0.678)
pt3dadd(133.33, 252.8, 5.057, 0.678)
pt3dadd(133.446, 252.782, 5.076, 0.678)
pt3dadd(133.564, 252.766, 5.094, 0.678)
pt3dadd(133.682, 252.756, 5.099, 0.678)
pt3dadd(133.801, 252.75, 5.097, 0.678)
pt3dadd(133.921, 252.744, 5.095, 0.678)
pt3dadd(134.041, 252.737, 5.094, 0.678)
pt3dadd(134.161, 252.731, 5.092, 0.678)
pt3dadd(134.281, 252.725, 5.09, 0.678)
pt3dadd(134.4, 252.72, 5.086, 0.678)
pt3dadd(134.518, 252.72, 5.063, 0.678)
pt3dadd(134.634, 252.72, 5.04, 0.678)
pt3dadd(134.75, 252.72, 5.018, 0.678)
pt3dadd(134.868, 252.72, 4.995, 0.678)
pt3dadd(134.984, 252.72, 4.972, 0.678)
pt3dadd(135.089, 252.72, 4.933, 0.678)
pt3dadd(135.163, 252.72, 4.854, 0.678)
pt3dadd(135.268, 252.718, 4.809, 0.678)
pt3dadd(135.385, 252.696, 4.8, 0.678)
pt3dadd(135.496, 252.652, 4.8, 0.678)
pt3dadd(135.61, 252.614, 4.8, 0.678)
pt3dadd(135.725, 252.6, 4.819, 0.678)
pt3dadd(135.81, 252.6, 4.882, 0.678)
pt3dadd(135.836, 252.6, 4.978, 0.678)
pt3dadd(135.852, 252.6, 5.078, 0.678)
pt3dadd(135.908, 252.6, 5.162, 0.678)
pt3dadd(136.021, 252.6, 5.19, 0.678)
pt3dadd(136.14, 252.6, 5.194, 0.678)
pt3dadd(136.26, 252.6, 5.198, 0.678)
pt3dadd(136.378, 252.62, 5.2, 0.678)
pt3dadd(136.49, 252.66, 5.2, 0.678)
pt3dadd(136.6, 252.706, 5.201, 0.678)
pt3dadd(136.687, 252.788, 5.205, 0.678)
pt3dadd(136.774, 252.871, 5.209, 0.678)
pt3dadd(136.856, 252.929, 5.241, 0.678)
pt3dadd(136.933, 252.949, 5.316, 0.678)
pt3dadd(137.021, 252.97, 5.38, 0.678)
pt3dadd(137.122, 253.022, 5.409, 0.678)
pt3dadd(137.22, 253.082, 5.434, 0.678)
pt3dadd(137.32, 253.142, 5.46, 0.678)
pt3dadd(137.419, 253.202, 5.485, 0.678)
pt3dadd(137.525, 253.252, 5.5, 0.678)
pt3dadd(137.641, 253.282, 5.5, 0.678)
pt3dadd(137.758, 253.312, 5.5, 0.678)
pt3dadd(137.874, 253.343, 5.5, 0.678)
pt3dadd(137.989, 253.373, 5.5, 0.678)
pt3dadd(138.106, 253.403, 5.5, 0.678)
pt3dadd(138.209, 253.458, 5.513, 0.678)
pt3dadd(138.304, 253.526, 5.533, 0.678)
pt3dadd(138.4, 253.595, 5.553, 0.678)
pt3dadd(138.496, 253.663, 5.573, 0.678)
pt3dadd(138.593, 253.73, 5.589, 0.678)
pt3dadd(138.697, 253.788, 5.592, 0.678)
pt3dadd(138.803, 253.846, 5.594, 0.678)
pt3dadd(138.907, 253.904, 5.596, 0.678)
pt3dadd(139.013, 253.962, 5.598, 0.678)
pt3dadd(139.116, 254.022, 5.6, 0.678)
pt3dadd(139.207, 254.1, 5.6, 0.678)
pt3dadd(139.298, 254.178, 5.6, 0.678)
pt3dadd(139.391, 254.256, 5.6, 0.678)
pt3dadd(139.482, 254.333, 5.6, 0.678)
pt3dadd(139.573, 254.41, 5.606, 0.678)
pt3dadd(139.662, 254.473, 5.646, 0.678)
pt3dadd(139.752, 254.537, 5.686, 0.678)
pt3dadd(139.841, 254.6, 5.726, 0.678)
pt3dadd(139.931, 254.665, 5.766, 0.678)
pt3dadd(140.02, 254.738, 5.792, 0.678)
pt3dadd(140.11, 254.813, 5.817, 0.678)
pt3dadd(140.198, 254.886, 5.843, 0.678)
pt3dadd(140.288, 254.96, 5.869, 0.678)
pt3dadd(140.369, 255.022, 5.919, 0.678)
pt3dadd(140.444, 255.074, 5.982, 0.678)
pt3dadd(140.558, 255.1, 5.993, 0.678)
pt3dadd(140.676, 255.12, 5.997, 0.678)
pt3dadd(140.771, 255.175, 6, 0.678)
pt3dadd(140.832, 255.278, 6, 0.678)
pt3dadd(140.887, 255.384, 5.999, 0.678)
pt3dadd(140.922, 255.499, 5.994, 0.678)
pt3dadd(140.957, 255.613, 5.989, 0.678)
pt3dadd(141.006, 255.712, 5.951, 0.678)
pt3dadd(141.061, 255.803, 5.91, 0.678)
pt3dadd(141.175, 255.833, 5.895, 0.678)
pt3dadd(141.292, 255.84, 5.873, 0.678)
pt3dadd(141.401, 255.84, 5.833, 0.678)
pt3dadd(141.517, 255.84, 5.809, 0.678)
pt3dadd(141.634, 255.85, 5.807, 0.678)
pt3dadd(141.746, 255.883, 5.83, 0.678)
pt3dadd(141.858, 255.916, 5.852, 0.678)
pt3dadd(141.971, 255.948, 5.875, 0.678)
pt3dadd(142.082, 255.98, 5.898, 0.678)
pt3dadd(142.184, 256.028, 5.927, 0.678)
pt3dadd(142.279, 256.072, 5.974, 0.678)
pt3dadd(142.393, 256.08, 6.003, 0.678)
pt3dadd(142.502, 256.08, 6.043, 0.678)
pt3dadd(142.553, 256.111, 6.126, 0.678)
pt3dadd(142.56, 256.202, 6.184, 0.678)
pt3dadd(142.56, 256.32, 6.2, 0.678)
pt3dadd(142.56, 256.44, 6.2, 0.678)
}
apic[27] {pt3dclear()
pt3dadd(102.101, 186.738, 2.223, 0.27)
pt3dadd(102.192, 186.698, 2.203, 0.298)
pt3dadd(102.309, 186.656, 2.184, 0.334)
pt3dadd(102.427, 186.612, 2.166, 0.372)
pt3dadd(102.544, 186.57, 2.148, 0.408)
pt3dadd(102.661, 186.527, 2.13, 0.446)
pt3dadd(102.778, 186.485, 2.112, 0.482)
pt3dadd(102.895, 186.443, 2.093, 0.52)
pt3dadd(103.012, 186.4, 2.075, 0.556)
pt3dadd(103.129, 186.358, 2.057, 0.594)
pt3dadd(103.246, 186.314, 2.039, 0.63)
pt3dadd(103.364, 186.272, 2.02, 0.668)
pt3dadd(103.481, 186.23, 2.002, 0.706)
pt3dadd(103.598, 186.186, 1.984, 0.742)
pt3dadd(103.715, 186.144, 1.966, 0.78)
pt3dadd(103.832, 186.101, 1.948, 0.816)
pt3dadd(103.949, 186.059, 1.929, 0.854)
pt3dadd(104.066, 186.016, 1.911, 0.89)
pt3dadd(104.121, 185.996, 1.838, 0.904)
pt3dadd(104.139, 185.99, 1.734, 0.904)
pt3dadd(104.158, 185.983, 1.629, 0.904)
pt3dadd(104.2, 185.977, 1.529, 0.904)
pt3dadd(104.244, 185.97, 1.43, 0.904)
pt3dadd(104.304, 185.964, 1.337, 0.904)
pt3dadd(104.375, 185.958, 1.25, 0.904)
pt3dadd(104.467, 185.951, 1.184, 0.904)
pt3dadd(104.584, 185.945, 1.145, 0.904)
pt3dadd(104.694, 185.941, 1.103, 0.904)
pt3dadd(104.713, 185.99, 1.01, 0.904)
pt3dadd(104.732, 186.038, 0.917, 0.904)
pt3dadd(104.751, 186.088, 0.824, 0.904)
pt3dadd(104.764, 186.127, 0.727, 0.904)
pt3dadd(104.774, 186.161, 0.628, 0.904)
pt3dadd(104.806, 186.221, 0.56, 0.904)
pt3dadd(104.871, 186.316, 0.538, 0.904)
pt3dadd(104.935, 186.41, 0.516, 0.904)
pt3dadd(105.03, 186.464, 0.48, 0.904)
pt3dadd(105.135, 186.509, 0.439, 0.904)
pt3dadd(105.206, 186.577, 0.381, 0.904)
pt3dadd(105.268, 186.656, 0.327, 0.904)
pt3dadd(105.33, 186.738, 0.273, 0.904)
pt3dadd(105.392, 186.818, 0.22, 0.904)
pt3dadd(105.455, 186.901, 0.171, 0.904)
pt3dadd(105.523, 186.994, 0.143, 0.904)
pt3dadd(105.591, 187.084, 0.115, 0.904)
pt3dadd(105.659, 187.175, 0.087, 0.904)
pt3dadd(105.727, 187.266, 0.059, 0.904)
pt3dadd(105.781, 187.368, 0.05, 0.904)
pt3dadd(105.903, 187.344, 0.045, 1.3)
pt3dadd(106.026, 187.32, 0.04, 1.266)
pt3dadd(106.148, 187.296, 0.035, 1.234)
pt3dadd(106.271, 187.273, 0.029, 1.202)
pt3dadd(106.393, 187.249, 0.024, 1.17)
pt3dadd(106.517, 187.234, 0.019, 1.156)
pt3dadd(106.641, 187.225, 0.014, 1.156)
pt3dadd(106.765, 187.217, 0.009, 1.156)
pt3dadd(106.888, 187.208, 0.003, 1.156)
pt3dadd(106.892, 187.202, -0.002, 1.156)
pt3dadd(107.016, 187.194, -0.007, 1.156)
pt3dadd(107.14, 187.186, -0.012, 1.156)
pt3dadd(107.264, 187.177, -0.017, 1.156)
pt3dadd(107.386, 187.18, -0.023, 1.148)
pt3dadd(107.509, 187.188, -0.028, 1.14)
pt3dadd(107.632, 187.196, -0.033, 1.13)
pt3dadd(107.749, 187.229, -0.038, 1.108)
pt3dadd(107.866, 187.262, -0.043, 1.088)
}
}
proc shape3d_162() {
apic[27] { pt3dadd(107.974, 187.314, -0.049, 1.058)
pt3dadd(108.077, 187.375, -0.054, 1.022)
pt3dadd(108.168, 187.448, -0.059, 1.004)
pt3dadd(108.247, 187.536, -0.064, 1.004)
pt3dadd(108.328, 187.62, -0.069, 1.01)
pt3dadd(108.417, 187.698, -0.075, 1.028)
pt3dadd(108.494, 187.787, -0.08, 1.038)
pt3dadd(108.57, 187.877, -0.085, 1.05)
pt3dadd(108.646, 187.966, -0.09, 1.06)
pt3dadd(108.722, 188.056, -0.096, 1.068)
pt3dadd(108.797, 188.146, -0.101, 1.08)
pt3dadd(108.85, 188.248, -0.106, 1.088)
pt3dadd(108.901, 188.351, -0.111, 1.098)
pt3dadd(108.953, 188.455, -0.116, 1.108)
pt3dadd(109.004, 188.558, -0.122, 1.116)
pt3dadd(109.055, 188.663, -0.127, 1.126)
pt3dadd(109.114, 188.762, -0.132, 1.136)
pt3dadd(109.178, 188.86, -0.137, 1.146)
pt3dadd(109.241, 188.957, -0.142, 1.156)
pt3dadd(109.305, 189.055, -0.148, 1.166)
pt3dadd(109.369, 189.152, -0.153, 1.174)
pt3dadd(109.441, 189.244, -0.158, 1.182)
pt3dadd(109.523, 189.329, -0.163, 1.188)
pt3dadd(109.603, 189.413, -0.168, 1.192)
pt3dadd(109.685, 189.498, -0.174, 1.198)
pt3dadd(109.767, 189.583, -0.179, 1.202)
pt3dadd(109.83, 189.679, -0.184, 1.21)
pt3dadd(109.873, 189.786, -0.189, 1.222)
pt3dadd(109.922, 189.888, -0.194, 1.234)
pt3dadd(110.008, 189.97, -0.2, 1.258)
pt3dadd(110.094, 190.05, -0.205, 1.282)
pt3dadd(110.212, 190.084, -0.21, 1.314)
pt3dadd(110.328, 190.116, -0.215, 1.346)
pt3dadd(110.45, 190.133, -0.22, 1.368)
pt3dadd(110.572, 190.141, -0.226, 1.388)
pt3dadd(110.695, 190.15, -0.231, 1.406)
pt3dadd(110.816, 190.166, -0.236, 1.406)
pt3dadd(110.937, 190.188, -0.241, 1.404)
pt3dadd(111.054, 190.219, -0.246, 1.4)
pt3dadd(111.172, 190.252, -0.252, 1.396)
pt3dadd(111.289, 190.284, -0.257, 1.392)
pt3dadd(111.406, 190.316, -0.262, 1.386)
pt3dadd(111.524, 190.349, -0.267, 1.382)
pt3dadd(111.528, 190.342, -0.272, 1.382)
pt3dadd(111.628, 190.404, -0.278, 1.37)
pt3dadd(111.631, 190.398, -0.283, 1.37)
pt3dadd(111.726, 190.47, -0.288, 1.354)
pt3dadd(111.821, 190.541, -0.293, 1.34)
pt3dadd(111.916, 190.612, -0.298, 1.324)
pt3dadd(112.011, 190.684, -0.304, 1.308)
pt3dadd(112.103, 190.759, -0.309, 1.29)
pt3dadd(112.193, 190.836, -0.314, 1.268)
pt3dadd(112.282, 190.914, -0.319, 1.248)
pt3dadd(112.372, 190.991, -0.324, 1.228)
pt3dadd(112.462, 191.068, -0.33, 1.208)
pt3dadd(112.572, 191.117, -0.335, 1.176)
pt3dadd(112.684, 191.16, -0.34, 1.144)
pt3dadd(112.796, 191.204, -0.345, 1.11)
pt3dadd(112.909, 191.249, -0.351, 1.076)
pt3dadd(113.022, 191.293, -0.356, 1.044)
pt3dadd(113.115, 191.362, -0.357, 1.014)
pt3dadd(113.194, 191.448, -0.355, 0.988)
pt3dadd(113.273, 191.534, -0.353, 0.962)
pt3dadd(113.354, 191.62, -0.351, 0.934)
pt3dadd(113.433, 191.706, -0.35, 0.908)
pt3dadd(113.541, 191.736, -0.326, 0.894)
pt3dadd(113.656, 191.755, -0.299, 0.882)
pt3dadd(113.77, 191.791, -0.297, 0.914)
pt3dadd(113.884, 191.832, -0.303, 0.958)
pt3dadd(113.971, 191.902, -0.308, 1.008)
pt3dadd(114.028, 192.002, -0.313, 1.064)
pt3dadd(114.076, 192.106, -0.318, 1.112)
pt3dadd(114.101, 192.218, -0.323, 1.142)
pt3dadd(114.125, 192.33, -0.329, 1.17)
pt3dadd(114.21, 192.391, -0.334, 1.19)
pt3dadd(114.323, 192.432, -0.339, 1.206)
pt3dadd(114.407, 192.514, -0.344, 1.218)
pt3dadd(114.493, 192.595, -0.349, 1.23)
pt3dadd(114.537, 192.702, -0.355, 1.252)
pt3dadd(114.581, 192.809, -0.36, 1.272)
pt3dadd(114.665, 192.882, -0.365, 1.288)
pt3dadd(114.772, 192.936, -0.37, 1.3)
pt3dadd(114.88, 192.967, -0.355, 1.3)
pt3dadd(114.989, 192.966, -0.313, 1.288)
pt3dadd(115.081, 192.984, -0.263, 1.256)
pt3dadd(115.135, 193.044, -0.202, 1.176)
pt3dadd(115.241, 193.102, -0.202, 1.14)
pt3dadd(115.345, 193.158, -0.201, 1.104)
pt3dadd(115.468, 193.172, -0.207, 1.086)
pt3dadd(115.589, 193.186, -0.212, 1.066)
pt3dadd(115.707, 193.213, -0.217, 1.06)
pt3dadd(115.818, 193.26, -0.222, 1.07)
pt3dadd(115.923, 193.315, -0.227, 1.084)
pt3dadd(115.994, 193.408, -0.233, 1.106)
pt3dadd(116.065, 193.5, -0.238, 1.13)
pt3dadd(116.101, 193.609, -0.243, 1.178)
pt3dadd(116.157, 193.708, -0.248, 1.21)
pt3dadd(116.242, 193.79, -0.253, 1.22)
pt3dadd(116.326, 193.872, -0.259, 1.23)
pt3dadd(116.411, 193.955, -0.264, 1.24)
pt3dadd(116.496, 194.036, -0.269, 1.25)
pt3dadd(116.574, 194.124, -0.274, 1.258)
pt3dadd(116.643, 194.218, -0.279, 1.262)
pt3dadd(116.712, 194.311, -0.285, 1.268)
pt3dadd(116.782, 194.406, -0.29, 1.272)
pt3dadd(116.852, 194.5, -0.295, 1.278)
pt3dadd(116.929, 194.587, -0.3, 1.28)
pt3dadd(117.019, 194.664, -0.306, 1.28)
pt3dadd(117.109, 194.741, -0.311, 1.28)
pt3dadd(117.199, 194.818, -0.316, 1.28)
pt3dadd(117.289, 194.894, -0.321, 1.28)
pt3dadd(117.373, 194.976, -0.326, 1.284)
pt3dadd(117.449, 195.066, -0.332, 1.288)
pt3dadd(117.525, 195.156, -0.337, 1.292)
pt3dadd(117.601, 195.245, -0.342, 1.298)
pt3dadd(117.676, 195.335, -0.347, 1.302)
pt3dadd(117.68, 195.328, -0.352, 1.302)
pt3dadd(117.769, 195.402, -0.358, 1.306)
pt3dadd(117.877, 195.456, -0.363, 1.306)
pt3dadd(117.984, 195.509, -0.368, 1.306)
pt3dadd(118.092, 195.563, -0.373, 1.306)
pt3dadd(118.201, 195.616, -0.378, 1.306)
pt3dadd(118.312, 195.658, -0.384, 1.298)
pt3dadd(118.435, 195.671, -0.389, 1.268)
pt3dadd(118.556, 195.685, -0.394, 1.238)
pt3dadd(118.679, 195.698, -0.399, 1.19)
pt3dadd(118.8, 195.713, -0.404, 1.132)
pt3dadd(118.918, 195.733, -0.41, 1.072)
pt3dadd(119.003, 195.815, -0.415, 1)
pt3dadd(119.089, 195.898, -0.42, 0.93)
pt3dadd(119.167, 195.984, -0.425, 0.918)
pt3dadd(119.246, 196.072, -0.43, 0.906)
pt3dadd(119.357, 196.114, -0.436, 0.904)
pt3dadd(119.473, 196.148, -0.441, 0.904)
pt3dadd(119.59, 196.183, -0.446, 0.904)
pt3dadd(119.706, 196.217, -0.451, 0.904)
pt3dadd(119.83, 196.213, -0.456, 0.912)
pt3dadd(119.954, 196.206, -0.462, 0.92)
pt3dadd(120.078, 196.2, -0.467, 0.928)
pt3dadd(120.173, 196.27, -0.472, 0.92)
pt3dadd(120.265, 196.343, -0.477, 0.912)
pt3dadd(120.355, 196.418, -0.482, 0.91)
pt3dadd(120.359, 196.412, -0.488, 0.91)
pt3dadd(120.424, 196.51, -0.493, 0.956)
pt3dadd(120.488, 196.607, -0.498, 1)
pt3dadd(120.58, 196.681, -0.503, 1.212)
pt3dadd(120.655, 196.77, -0.508, 1.248)
pt3dadd(120.731, 196.86, -0.514, 1.284)
pt3dadd(120.806, 196.949, -0.519, 1.318)
pt3dadd(120.882, 197.039, -0.524, 1.354)
pt3dadd(120.959, 197.128, -0.529, 1.384)
pt3dadd(121.042, 197.213, -0.534, 1.394)
pt3dadd(121.122, 197.297, -0.54, 1.404)
pt3dadd(121.204, 197.382, -0.545, 1.414)
pt3dadd(121.285, 197.467, -0.55, 1.424)
pt3dadd(121.354, 197.557, -0.552, 1.426)
pt3dadd(121.382, 197.668, -0.545, 1.408)
pt3dadd(121.41, 197.778, -0.538, 1.39)
pt3dadd(121.44, 197.887, -0.531, 1.37)
pt3dadd(121.469, 197.998, -0.523, 1.352)
pt3dadd(121.496, 198.108, -0.516, 1.334)
pt3dadd(121.572, 198.194, -0.514, 1.336)
pt3dadd(121.655, 198.278, -0.512, 1.34)
pt3dadd(121.736, 198.362, -0.51, 1.346)
pt3dadd(121.819, 198.445, -0.508, 1.352)
pt3dadd(121.904, 198.526, -0.507, 1.358)
pt3dadd(122.012, 198.58, -0.513, 1.368)
pt3dadd(122.12, 198.634, -0.518, 1.38)
pt3dadd(122.239, 198.656, -0.523, 1.382)
pt3dadd(122.36, 198.676, -0.528, 1.382)
pt3dadd(122.44, 198.734, -0.533, 1.344)
pt3dadd(122.443, 198.728, -0.539, 1.344)
pt3dadd(122.447, 198.722, -0.544, 1.344)
pt3dadd(122.472, 198.834, -0.549, 1.258)
pt3dadd(122.496, 198.946, -0.554, 1.17)
pt3dadd(122.531, 199.055, -0.559, 1.06)
pt3dadd(122.568, 199.164, -0.565, 0.946)
pt3dadd(122.616, 199.267, -0.57, 0.824)
pt3dadd(122.683, 199.362, -0.575, 0.684)
pt3dadd(122.77, 199.442, -0.58, 0.664)
pt3dadd(122.858, 199.522, -0.585, 0.648)
pt3dadd(122.946, 199.601, -0.591, 0.634)
pt3dadd(123.032, 199.681, -0.596, 0.618)
pt3dadd(123.12, 199.76, -0.601, 0.602)
pt3dadd(123.174, 199.862, -0.606, 0.608)
pt3dadd(123.228, 199.966, -0.611, 0.612)
pt3dadd(123.282, 200.068, -0.617, 0.616)
pt3dadd(123.337, 200.17, -0.622, 0.622)
pt3dadd(123.392, 200.273, -0.627, 0.626)
pt3dadd(123.439, 200.377, -0.632, 0.634)
pt3dadd(123.485, 200.483, -0.637, 0.644)
pt3dadd(123.53, 200.59, -0.643, 0.652)
pt3dadd(123.575, 200.695, -0.648, 0.662)
pt3dadd(123.62, 200.802, -0.653, 0.672)
pt3dadd(123.672, 200.905, -0.658, 0.682)
pt3dadd(123.739, 201, -0.663, 0.696)
pt3dadd(123.806, 201.096, -0.669, 0.712)
pt3dadd(123.872, 201.192, -0.674, 0.726)
pt3dadd(123.94, 201.287, -0.679, 0.742)
pt3dadd(124.012, 201.378, -0.684, 0.758)
}
}
proc shape3d_163() {
apic[27] { pt3dadd(124.109, 201.445, -0.689, 0.778)
pt3dadd(124.207, 201.515, -0.695, 0.798)
pt3dadd(124.306, 201.583, -0.7, 0.818)
pt3dadd(124.403, 201.652, -0.705, 0.838)
pt3dadd(124.493, 201.726, -0.71, 0.862)
pt3dadd(124.558, 201.823, -0.716, 0.896)
pt3dadd(124.621, 201.92, -0.721, 0.93)
pt3dadd(124.663, 202.027, -0.726, 0.94)
pt3dadd(124.706, 202.134, -0.731, 0.95)
pt3dadd(124.71, 202.127, -0.736, 0.95)
pt3dadd(124.804, 202.184, -0.742, 0.932)
pt3dadd(124.92, 202.218, -0.747, 0.902)
pt3dadd(125.032, 202.261, -0.752, 0.876)
pt3dadd(125.129, 202.33, -0.757, 0.864)
pt3dadd(125.23, 202.392, -0.762, 0.862)
pt3dadd(125.348, 202.417, -0.768, 0.908)
pt3dadd(125.444, 202.477, -0.773, 0.948)
pt3dadd(125.525, 202.565, -0.778, 0.984)
pt3dadd(125.603, 202.652, -0.783, 1.02)
pt3dadd(125.682, 202.739, -0.788, 1.054)
pt3dadd(125.76, 202.826, -0.794, 1.09)
pt3dadd(125.804, 202.928, -0.799, 1.138)
pt3dadd(125.822, 203.041, -0.804, 1.194)
pt3dadd(125.842, 203.153, -0.809, 1.25)
pt3dadd(125.9, 203.252, -0.814, 1.296)
pt3dadd(125.965, 203.35, -0.82, 1.342)
pt3dadd(125.969, 203.342, -0.825, 1.342)
pt3dadd(126.072, 203.387, -0.83, 1.376)
pt3dadd(126.076, 203.38, -0.835, 1.376)
pt3dadd(126.197, 203.4, -0.84, 1.406)
pt3dadd(126.314, 203.426, -0.846, 1.428)
pt3dadd(126.416, 203.488, -0.851, 1.404)
pt3dadd(126.52, 203.55, -0.856, 1.378)
pt3dadd(126.587, 203.645, -0.861, 1.258)
pt3dadd(126.658, 203.738, -0.866, 1.172)
pt3dadd(126.73, 203.831, -0.872, 1.112)
pt3dadd(126.803, 203.922, -0.877, 1.052)
pt3dadd(126.875, 204.013, -0.882, 0.992)
pt3dadd(126.948, 204.106, -0.887, 0.932)
pt3dadd(127.03, 204.191, -0.892, 0.882)
pt3dadd(127.117, 204.27, -0.898, 0.842)
pt3dadd(127.204, 204.349, -0.903, 0.8)
pt3dadd(127.291, 204.428, -0.908, 0.76)
pt3dadd(127.379, 204.509, -0.913, 0.72)
pt3dadd(127.459, 204.594, -0.918, 0.692)
pt3dadd(127.535, 204.684, -0.924, 0.67)
pt3dadd(127.61, 204.773, -0.929, 0.652)
pt3dadd(127.687, 204.863, -0.934, 0.63)
pt3dadd(127.763, 204.952, -0.939, 0.61)
pt3dadd(127.842, 205.039, -0.944, 0.606)
pt3dadd(127.922, 205.123, -0.95, 0.61)
pt3dadd(128.004, 205.208, -0.955, 0.616)
pt3dadd(128.086, 205.294, -0.96, 0.62)
pt3dadd(128.167, 205.378, -0.965, 0.626)
pt3dadd(128.243, 205.469, -0.971, 0.634)
pt3dadd(128.312, 205.562, -0.976, 0.644)
pt3dadd(128.382, 205.656, -0.981, 0.654)
pt3dadd(128.452, 205.75, -0.986, 0.664)
pt3dadd(128.521, 205.843, -0.991, 0.674)
pt3dadd(128.588, 205.938, -0.997, 0.69)
pt3dadd(128.654, 206.034, -1.002, 0.708)
pt3dadd(128.723, 206.13, -1.007, 0.728)
pt3dadd(128.789, 206.226, -1.012, 0.748)
pt3dadd(128.855, 206.321, -1.017, 0.768)
pt3dadd(128.923, 206.416, -1.023, 0.79)
pt3dadd(128.993, 206.51, -1.028, 0.816)
pt3dadd(128.996, 206.503, -1.033, 0.816)
pt3dadd(129.066, 206.597, -1.038, 0.84)
pt3dadd(129.136, 206.69, -1.043, 0.864)
pt3dadd(129.206, 206.784, -1.049, 0.89)
pt3dadd(129.264, 206.884, -1.054, 0.916)
pt3dadd(129.306, 206.992, -1.059, 0.944)
pt3dadd(129.348, 207.098, -1.064, 0.97)
pt3dadd(129.391, 207.205, -1.069, 0.998)
pt3dadd(129.433, 207.312, -1.075, 1.026)
pt3dadd(129.475, 207.419, -1.08, 1.052)
pt3dadd(129.504, 207.53, -1.085, 1.07)
pt3dadd(129.529, 207.642, -1.09, 1.086)
pt3dadd(129.556, 207.754, -1.095, 1.104)
pt3dadd(129.582, 207.865, -1.101, 1.12)
pt3dadd(129.607, 207.976, -1.106, 1.138)
pt3dadd(129.634, 208.087, -1.111, 1.154)
pt3dadd(129.685, 208.19, -1.116, 1.156)
pt3dadd(129.74, 208.292, -1.121, 1.156)
pt3dadd(129.794, 208.396, -1.127, 1.156)
pt3dadd(129.848, 208.498, -1.132, 1.156)
pt3dadd(129.902, 208.6, -1.137, 1.156)
pt3dadd(129.964, 208.699, -1.144, 1.146)
pt3dadd(130.028, 208.795, -1.151, 1.13)
pt3dadd(130.093, 208.892, -1.159, 1.116)
pt3dadd(130.158, 208.988, -1.166, 1.1)
pt3dadd(130.224, 209.086, -1.173, 1.086)
pt3dadd(130.279, 209.178, -1.207, 1.066)
pt3dadd(130.33, 209.269, -1.256, 1.042)
pt3dadd(130.381, 209.359, -1.306, 1.018)
pt3dadd(130.432, 209.449, -1.355, 0.994)
pt3dadd(130.478, 209.545, -1.389, 0.98)
pt3dadd(130.52, 209.653, -1.394, 0.986)
pt3dadd(130.565, 209.76, -1.399, 0.99)
pt3dadd(130.568, 209.754, -1.405, 0.99)
pt3dadd(130.61, 209.861, -1.41, 0.994)
pt3dadd(130.652, 209.968, -1.415, 1)
pt3dadd(130.694, 210.074, -1.42, 1.004)
pt3dadd(130.739, 210.179, -1.443, 1.026)
pt3dadd(130.786, 210.282, -1.469, 1.052)
pt3dadd(130.831, 210.384, -1.496, 1.08)
pt3dadd(130.878, 210.487, -1.522, 1.106)
pt3dadd(130.925, 210.59, -1.546, 1.134)
pt3dadd(130.982, 210.691, -1.552, 1.178)
pt3dadd(131.039, 210.792, -1.557, 1.22)
pt3dadd(131.096, 210.893, -1.562, 1.264)
pt3dadd(131.153, 210.994, -1.567, 1.306)
pt3dadd(131.21, 211.094, -1.572, 1.35)
pt3dadd(131.275, 211.192, -1.578, 1.416)
pt3dadd(131.34, 211.289, -1.583, 1.484)
pt3dadd(131.437, 211.346, -1.588, 1.506)
pt3dadd(131.552, 211.386, -1.593, 1.506)
pt3dadd(131.647, 211.448, -1.598, 1.484)
pt3dadd(131.712, 211.544, -1.604, 1.428)
pt3dadd(131.767, 211.645, -1.609, 1.37)
pt3dadd(131.788, 211.758, -1.614, 1.314)
pt3dadd(131.806, 211.87, -1.619, 1.258)
pt3dadd(131.82, 211.982, -1.624, 1.21)
pt3dadd(131.831, 212.096, -1.63, 1.17)
pt3dadd(131.868, 212.203, -1.635, 1.156)
pt3dadd(131.922, 212.305, -1.64, 1.156)
pt3dadd(131.976, 212.407, -1.645, 1.156)
pt3dadd(132.03, 212.51, -1.65, 1.156)
pt3dadd(132.085, 212.612, -1.656, 1.156)
pt3dadd(132.151, 212.706, -1.661, 1.156)
pt3dadd(132.241, 212.783, -1.666, 1.156)
pt3dadd(132.331, 212.86, -1.671, 1.156)
pt3dadd(132.421, 212.936, -1.676, 1.156)
pt3dadd(132.511, 213.013, -1.682, 1.156)
pt3dadd(132.584, 213.101, -1.689, 1.154)
pt3dadd(132.634, 213.206, -1.701, 1.148)
pt3dadd(132.682, 213.311, -1.713, 1.144)
pt3dadd(132.728, 213.415, -1.724, 1.138)
pt3dadd(132.776, 213.521, -1.736, 1.134)
pt3dadd(132.827, 213.624, -1.749, 1.128)
pt3dadd(132.887, 213.722, -1.769, 1.116)
pt3dadd(132.947, 213.82, -1.788, 1.106)
pt3dadd(133.008, 213.918, -1.807, 1.096)
pt3dadd(133.068, 214.016, -1.827, 1.086)
pt3dadd(133.116, 214.12, -1.839, 1.08)
pt3dadd(133.153, 214.229, -1.844, 1.08)
pt3dadd(133.194, 214.334, -1.849, 1.082)
pt3dadd(133.279, 214.416, -1.854, 1.118)
pt3dadd(133.364, 214.498, -1.86, 1.154)
pt3dadd(133.48, 214.532, -1.865, 1.186)
pt3dadd(133.598, 214.566, -1.87, 1.218)
pt3dadd(133.718, 214.588, -1.875, 1.248)
pt3dadd(133.84, 214.601, -1.881, 1.278)
pt3dadd(133.961, 214.616, -1.886, 1.306)
pt3dadd(133.964, 214.61, -1.891, 1.306)
pt3dadd(134.017, 214.714, -1.896, 1.312)
pt3dadd(134.07, 214.816, -1.901, 1.32)
pt3dadd(134.124, 214.919, -1.907, 1.326)
pt3dadd(134.184, 215.017, -1.912, 1.33)
pt3dadd(134.269, 215.098, -1.917, 1.33)
pt3dadd(134.347, 215.183, -1.922, 1.322)
pt3dadd(134.363, 215.296, -1.927, 1.244)
pt3dadd(134.366, 215.41, -1.933, 1.194)
pt3dadd(134.37, 215.522, -1.938, 1.144)
pt3dadd(134.374, 215.635, -1.946, 1.094)
pt3dadd(134.378, 215.748, -1.963, 1.048)
pt3dadd(134.382, 215.861, -1.981, 1.002)
pt3dadd(134.407, 215.965, -2.01, 0.972)
pt3dadd(134.453, 216.064, -2.05, 0.96)
pt3dadd(134.524, 216.151, -2.069, 0.984)
pt3dadd(134.609, 216.233, -2.074, 1.03)
pt3dadd(134.708, 216.293, -2.079, 1.086)
pt3dadd(134.825, 216.329, -2.085, 1.152)
pt3dadd(134.878, 216.426, -2.11, 1.166)
pt3dadd(134.927, 216.528, -2.136, 1.176)
pt3dadd(134.976, 216.63, -2.163, 1.186)
pt3dadd(135.025, 216.731, -2.189, 1.198)
pt3dadd(135.079, 216.829, -2.214, 1.208)
pt3dadd(135.154, 216.919, -2.234, 1.22)
pt3dadd(135.228, 217.008, -2.254, 1.23)
pt3dadd(135.301, 217.098, -2.274, 1.24)
pt3dadd(135.376, 217.187, -2.293, 1.252)
pt3dadd(135.438, 217.279, -2.324, 1.26)
pt3dadd(135.497, 217.374, -2.359, 1.266)
pt3dadd(135.556, 217.468, -2.395, 1.272)
pt3dadd(135.613, 217.561, -2.43, 1.276)
pt3dadd(135.667, 217.66, -2.457, 1.28)
pt3dadd(135.71, 217.766, -2.463, 1.28)
pt3dadd(135.754, 217.873, -2.468, 1.28)
pt3dadd(135.757, 217.866, -2.473, 1.28)
pt3dadd(135.799, 217.974, -2.478, 1.28)
pt3dadd(135.841, 218.081, -2.483, 1.28)
pt3dadd(135.883, 218.188, -2.489, 1.28)
pt3dadd(135.916, 218.298, -2.494, 1.262)
pt3dadd(135.944, 218.408, -2.499, 1.236)
pt3dadd(135.973, 218.52, -2.504, 1.21)
pt3dadd(136.002, 218.63, -2.509, 1.184)
pt3dadd(136.03, 218.742, -2.515, 1.16)
pt3dadd(136.058, 218.852, -2.52, 1.134)
pt3dadd(136.111, 218.954, -2.525, 1.106)
}
}
proc shape3d_164() {
apic[27] { pt3dadd(136.169, 219.055, -2.53, 1.076)
pt3dadd(136.228, 219.156, -2.536, 1.048)
pt3dadd(136.284, 219.257, -2.541, 1.018)
pt3dadd(136.342, 219.359, -2.546, 0.99)
pt3dadd(136.374, 219.467, -2.551, 0.964)
pt3dadd(136.392, 219.58, -2.556, 0.94)
pt3dadd(136.411, 219.691, -2.562, 0.916)
pt3dadd(136.429, 219.804, -2.567, 0.892)
pt3dadd(136.448, 219.917, -2.572, 0.868)
pt3dadd(136.468, 220.03, -2.577, 0.844)
pt3dadd(136.504, 220.136, -2.582, 0.826)
pt3dadd(136.567, 220.234, -2.588, 0.822)
pt3dadd(136.63, 220.331, -2.593, 0.818)
pt3dadd(136.693, 220.429, -2.598, 0.812)
pt3dadd(136.757, 220.526, -2.603, 0.808)
pt3dadd(136.819, 220.625, -2.608, 0.804)
pt3dadd(136.878, 220.726, -2.614, 0.804)
pt3dadd(136.934, 220.826, -2.619, 0.804)
pt3dadd(136.938, 220.819, -2.624, 0.804)
pt3dadd(136.996, 220.921, -2.629, 0.804)
pt3dadd(137.053, 221.022, -2.634, 0.804)
pt3dadd(137.11, 221.123, -2.64, 0.804)
pt3dadd(137.158, 221.227, -2.645, 0.804)
pt3dadd(137.207, 221.333, -2.65, 0.804)
pt3dadd(137.255, 221.437, -2.655, 0.804)
pt3dadd(137.304, 221.542, -2.66, 0.804)
pt3dadd(137.352, 221.647, -2.666, 0.804)
pt3dadd(137.384, 221.756, -2.671, 0.8)
pt3dadd(137.407, 221.868, -2.676, 0.796)
pt3dadd(137.43, 221.98, -2.681, 0.792)
pt3dadd(137.454, 222.092, -2.686, 0.788)
pt3dadd(137.478, 222.204, -2.692, 0.784)
pt3dadd(137.502, 222.316, -2.697, 0.78)
pt3dadd(137.516, 222.428, -2.702, 0.788)
pt3dadd(137.525, 222.542, -2.707, 0.806)
pt3dadd(137.533, 222.655, -2.712, 0.822)
pt3dadd(137.584, 222.755, -2.718, 0.876)
pt3dadd(137.654, 222.847, -2.723, 0.946)
pt3dadd(137.754, 222.896, -2.728, 1.012)
pt3dadd(137.876, 222.905, -2.733, 1.078)
pt3dadd(137.999, 222.913, -2.738, 1.144)
pt3dadd(138.121, 222.922, -2.744, 1.178)
pt3dadd(138.245, 222.93, -2.749, 1.206)
pt3dadd(138.36, 222.949, -2.754, 1.228)
pt3dadd(138.432, 223.042, -2.759, 1.204)
pt3dadd(138.503, 223.134, -2.764, 1.18)
pt3dadd(138.523, 223.246, -2.77, 1.044)
pt3dadd(138.527, 223.36, -2.775, 0.894)
pt3dadd(138.532, 223.472, -2.78, 0.774)
pt3dadd(138.557, 223.583, -2.785, 0.734)
pt3dadd(138.631, 223.67, -2.791, 0.798)
pt3dadd(138.715, 223.752, -2.796, 0.846)
pt3dadd(138.793, 223.84, -2.801, 0.87)
pt3dadd(138.884, 223.915, -2.806, 0.878)
pt3dadd(138.982, 223.984, -2.811, 0.878)
pt3dadd(139.079, 224.052, -2.817, 0.848)
pt3dadd(139.156, 224.138, -2.822, 0.822)
pt3dadd(139.225, 224.232, -2.827, 0.812)
pt3dadd(139.295, 224.327, -2.832, 0.802)
pt3dadd(139.364, 224.42, -2.837, 0.792)
pt3dadd(139.434, 224.514, -2.843, 0.782)
pt3dadd(139.523, 224.591, -2.848, 0.778)
pt3dadd(139.62, 224.659, -2.853, 0.778)
pt3dadd(139.723, 224.719, -2.858, 0.784)
pt3dadd(139.83, 224.773, -2.863, 0.796)
pt3dadd(139.922, 224.843, -2.869, 0.804)
pt3dadd(139.987, 224.94, -2.874, 0.804)
pt3dadd(140.041, 225.04, -2.879, 0.8)
pt3dadd(140.046, 225.154, -2.884, 0.774)
pt3dadd(140.05, 225.266, -2.889, 0.75)
pt3dadd(140.057, 225.379, -2.895, 0.72)
pt3dadd(140.084, 225.491, -2.9, 0.676)
pt3dadd(140.129, 225.595, -2.905, 0.652)
pt3dadd(140.196, 225.691, -2.91, 0.652)
pt3dadd(140.262, 225.786, -2.915, 0.652)
pt3dadd(140.33, 225.882, -2.921, 0.652)
pt3dadd(140.396, 225.978, -2.926, 0.652)
pt3dadd(140.474, 226.063, -2.931, 0.674)
pt3dadd(140.572, 226.132, -2.936, 0.734)
pt3dadd(140.672, 226.194, -2.941, 0.796)
pt3dadd(140.784, 226.242, -2.947, 0.876)
pt3dadd(140.894, 226.289, -2.952, 0.954)
pt3dadd(140.987, 226.364, -2.957, 1.014)
pt3dadd(141.078, 226.44, -2.962, 1.072)
pt3dadd(141.127, 226.543, -2.967, 1.098)
pt3dadd(141.17, 226.65, -2.973, 1.12)
pt3dadd(141.193, 226.759, -2.978, 1.13)
pt3dadd(141.197, 226.873, -2.983, 1.13)
pt3dadd(141.227, 226.981, -2.988, 1.13)
pt3dadd(141.281, 227.083, -2.993, 1.13)
pt3dadd(141.336, 227.185, -2.999, 1.13)
pt3dadd(141.39, 227.288, -3.004, 1.13)
pt3dadd(141.445, 227.39, -3.009, 1.13)
pt3dadd(141.508, 227.486, -3.014, 1.13)
pt3dadd(141.594, 227.567, -3.019, 1.13)
pt3dadd(141.682, 227.646, -3.025, 1.13)
pt3dadd(141.769, 227.725, -3.03, 1.13)
pt3dadd(141.858, 227.804, -3.035, 1.13)
pt3dadd(141.941, 227.888, -3.04, 1.13)
pt3dadd(142.013, 227.98, -3.046, 1.13)
pt3dadd(142.086, 228.072, -3.051, 1.13)
pt3dadd(142.158, 228.163, -3.056, 1.13)
pt3dadd(142.231, 228.254, -3.061, 1.13)
pt3dadd(142.301, 228.348, -3.07, 1.128)
pt3dadd(142.364, 228.444, -3.09, 1.124)
pt3dadd(142.429, 228.54, -3.109, 1.118)
pt3dadd(142.492, 228.636, -3.129, 1.112)
pt3dadd(142.555, 228.732, -3.148, 1.106)
pt3dadd(142.631, 228.821, -3.163, 1.098)
pt3dadd(142.712, 228.905, -3.176, 1.088)
pt3dadd(142.795, 228.988, -3.188, 1.078)
pt3dadd(142.877, 229.072, -3.2, 1.066)
pt3dadd(142.961, 229.156, -3.212, 1.056)
pt3dadd(143.044, 229.235, -3.238, 1.034)
pt3dadd(143.128, 229.314, -3.266, 1.012)
pt3dadd(143.21, 229.393, -3.294, 0.988)
pt3dadd(143.293, 229.472, -3.323, 0.966)
pt3dadd(143.392, 229.534, -3.339, 0.944)
pt3dadd(143.503, 229.578, -3.344, 0.926)
pt3dadd(143.617, 229.622, -3.35, 0.906)
pt3dadd(143.73, 229.666, -3.355, 0.888)
pt3dadd(143.842, 229.71, -3.36, 0.868)
pt3dadd(143.951, 229.759, -3.365, 0.848)
pt3dadd(144.048, 229.829, -3.37, 0.824)
pt3dadd(144.145, 229.897, -3.376, 0.804)
pt3dadd(144.242, 229.966, -3.381, 0.816)
pt3dadd(144.34, 230.034, -3.386, 0.828)
pt3dadd(144.392, 230.137, -3.391, 0.85)
pt3dadd(144.443, 230.24, -3.396, 0.872)
pt3dadd(144.466, 230.351, -3.402, 0.874)
pt3dadd(144.473, 230.465, -3.407, 0.864)
pt3dadd(144.481, 230.578, -3.412, 0.856)
pt3dadd(144.492, 230.692, -3.417, 0.834)
pt3dadd(144.502, 230.804, -3.422, 0.806)
pt3dadd(144.581, 230.89, -3.428, 0.804)
pt3dadd(144.666, 230.97, -3.433, 0.804)
pt3dadd(144.724, 231.07, -3.438, 0.828)
pt3dadd(144.774, 231.174, -3.443, 0.862)
pt3dadd(144.857, 231.238, -3.448, 0.892)
pt3dadd(144.86, 231.232, -3.454, 0.892)
pt3dadd(144.982, 231.251, -3.459, 0.922)
pt3dadd(145.103, 231.271, -3.464, 0.954)
pt3dadd(145.22, 231.304, -3.469, 0.984)
pt3dadd(145.337, 231.337, -3.474, 1.016)
pt3dadd(145.458, 231.352, -3.48, 1.078)
pt3dadd(145.58, 231.35, -3.485, 1.158)
pt3dadd(145.584, 231.344, -3.49, 1.158)
pt3dadd(145.687, 231.395, -3.495, 1.206)
pt3dadd(145.782, 231.467, -3.501, 1.24)
pt3dadd(145.879, 231.539, -3.506, 1.276)
pt3dadd(145.974, 231.61, -3.511, 1.312)
pt3dadd(146.069, 231.682, -3.516, 1.348)
pt3dadd(146.17, 231.731, -3.55, 1.37)
pt3dadd(146.272, 231.774, -3.594, 1.386)
pt3dadd(146.375, 231.817, -3.638, 1.404)
pt3dadd(146.477, 231.86, -3.682, 1.422)
pt3dadd(146.584, 231.901, -3.722, 1.422)
pt3dadd(146.693, 231.938, -3.756, 1.4)
pt3dadd(146.802, 231.977, -3.791, 1.378)
pt3dadd(146.912, 232.014, -3.826, 1.356)
pt3dadd(147.022, 232.052, -3.86, 1.332)
pt3dadd(147.119, 232.093, -3.914, 1.31)
pt3dadd(147.215, 232.133, -3.969, 1.286)
pt3dadd(147.311, 232.175, -4.025, 1.262)
pt3dadd(147.407, 232.214, -4.08, 1.238)
pt3dadd(147.474, 232.259, -4.156, 1.21)
pt3dadd(147.528, 232.303, -4.241, 1.184)
pt3dadd(147.63, 232.352, -4.275, 1.192)
pt3dadd(147.737, 232.402, -4.303, 1.204)
pt3dadd(147.85, 232.441, -4.31, 1.194)
pt3dadd(147.965, 232.482, -4.315, 1.184)
pt3dadd(148.086, 232.494, -4.32, 1.174)
pt3dadd(148.21, 232.492, -4.325, 1.166)
pt3dadd(148.333, 232.489, -4.331, 1.158)
pt3dadd(148.457, 232.484, -4.336, 1.126)
pt3dadd(148.58, 232.478, -4.341, 1.088)
pt3dadd(148.703, 232.471, -4.359, 1.07)
pt3dadd(148.824, 232.465, -4.38, 1.058)
pt3dadd(148.948, 232.458, -4.402, 1.046)
pt3dadd(149.069, 232.452, -4.424, 1.034)
pt3dadd(149.191, 232.446, -4.445, 1.02)
pt3dadd(149.314, 232.439, -4.467, 1.008)
pt3dadd(149.434, 232.452, -4.486, 0.994)
pt3dadd(149.552, 232.472, -4.504, 0.98)
pt3dadd(149.672, 232.494, -4.522, 0.966)
pt3dadd(149.791, 232.514, -4.539, 0.952)
pt3dadd(149.912, 232.536, -4.557, 0.938)
pt3dadd(150.029, 232.566, -4.573, 0.93)
pt3dadd(150.142, 232.609, -4.585, 0.93)
pt3dadd(150.253, 232.654, -4.596, 0.93)
pt3dadd(150.366, 232.697, -4.608, 0.93)
pt3dadd(150.478, 232.741, -4.62, 0.93)
pt3dadd(150.594, 232.775, -4.629, 0.932)
pt3dadd(150.716, 232.787, -4.635, 0.94)
pt3dadd(150.839, 232.801, -4.64, 0.948)
pt3dadd(150.961, 232.813, -4.645, 0.956)
pt3dadd(151.082, 232.828, -4.65, 0.966)
pt3dadd(151.205, 232.84, -4.656, 0.974)
pt3dadd(151.325, 232.861, -4.661, 0.982)
pt3dadd(151.439, 232.902, -4.666, 0.992)
}
}
proc shape3d_165() {
apic[27] { pt3dadd(151.553, 232.943, -4.671, 1)
pt3dadd(151.667, 232.985, -4.676, 1.01)
pt3dadd(151.781, 233.024, -4.682, 1.02)
pt3dadd(151.895, 233.066, -4.687, 1.03)
pt3dadd(151.984, 233.143, -4.692, 1.044)
pt3dadd(152.07, 233.224, -4.697, 1.06)
pt3dadd(152.158, 233.304, -4.702, 1.074)
pt3dadd(152.244, 233.383, -4.708, 1.09)
pt3dadd(152.333, 233.462, -4.713, 1.104)
pt3dadd(152.381, 233.567, -4.718, 1.114)
pt3dadd(152.429, 233.672, -4.723, 1.124)
pt3dadd(152.477, 233.778, -4.728, 1.132)
pt3dadd(152.525, 233.882, -4.734, 1.142)
pt3dadd(152.573, 233.988, -4.739, 1.152)
pt3dadd(152.629, 234.089, -4.744, 1.16)
pt3dadd(152.69, 234.188, -4.749, 1.17)
pt3dadd(152.75, 234.287, -4.754, 1.18)
pt3dadd(152.81, 234.386, -4.76, 1.19)
pt3dadd(152.87, 234.486, -4.765, 1.2)
pt3dadd(152.95, 234.569, -4.77, 1.2)
pt3dadd(153.052, 234.631, -4.775, 1.192)
pt3dadd(153.154, 234.694, -4.78, 1.18)
pt3dadd(153.257, 234.756, -4.786, 1.17)
pt3dadd(153.359, 234.818, -4.791, 1.16)
pt3dadd(153.457, 234.882, -4.805, 1.148)
pt3dadd(153.552, 234.949, -4.833, 1.13)
pt3dadd(153.647, 235.015, -4.861, 1.114)
pt3dadd(153.742, 235.082, -4.889, 1.096)
pt3dadd(153.836, 235.147, -4.917, 1.08)
pt3dadd(153.94, 235.208, -4.924, 1.06)
pt3dadd(154.044, 235.27, -4.932, 1.038)
pt3dadd(154.147, 235.33, -4.939, 1.018)
pt3dadd(154.249, 235.391, -4.947, 0.998)
pt3dadd(154.352, 235.451, -4.955, 0.978)
pt3dadd(154.457, 235.507, -4.98, 0.974)
pt3dadd(154.56, 235.562, -5.005, 0.968)
pt3dadd(154.664, 235.618, -5.03, 0.962)
pt3dadd(154.769, 235.673, -5.054, 0.956)
pt3dadd(154.883, 235.703, -5.069, 0.954)
pt3dadd(155.005, 235.711, -5.074, 0.954)
pt3dadd(155.128, 235.72, -5.079, 0.954)
pt3dadd(155.251, 235.728, -5.084, 0.954)
pt3dadd(155.374, 235.736, -5.09, 0.954)
pt3dadd(155.496, 235.745, -5.095, 0.954)
pt3dadd(155.618, 235.754, -5.1, 0.956)
pt3dadd(155.742, 235.768, -5.105, 0.964)
pt3dadd(155.863, 235.781, -5.111, 0.972)
pt3dadd(155.986, 235.794, -5.116, 0.982)
pt3dadd(156.108, 235.807, -5.121, 0.99)
pt3dadd(156.229, 235.822, -5.126, 0.998)
pt3dadd(156.35, 235.83, -5.138, 1.004)
pt3dadd(156.467, 235.824, -5.178, 0.998)
pt3dadd(156.584, 235.817, -5.217, 0.994)
pt3dadd(156.7, 235.811, -5.257, 0.99)
pt3dadd(156.816, 235.805, -5.297, 0.986)
pt3dadd(156.932, 235.798, -5.337, 0.98)
pt3dadd(157.051, 235.781, -5.367, 0.976)
pt3dadd(157.171, 235.758, -5.392, 0.972)
pt3dadd(157.291, 235.738, -5.418, 0.966)
pt3dadd(157.412, 235.715, -5.444, 0.962)
pt3dadd(157.532, 235.694, -5.47, 0.958)
pt3dadd(157.651, 235.673, -5.477, 0.938)
pt3dadd(157.768, 235.646, -5.451, 0.89)
pt3dadd(157.885, 235.625, -5.429, 0.852)
pt3dadd(158.008, 235.613, -5.422, 0.842)
pt3dadd(158.13, 235.602, -5.414, 0.832)
pt3dadd(158.245, 235.564, -5.429, 0.812)
pt3dadd(158.357, 235.51, -5.456, 0.788)
pt3dadd(158.431, 235.453, -5.521, 0.788)
pt3dadd(158.486, 235.394, -5.606, 0.802)
pt3dadd(158.598, 235.373, -5.626, 0.8)
pt3dadd(158.722, 235.357, -5.634, 0.794)
pt3dadd(158.844, 235.343, -5.642, 0.788)
pt3dadd(158.968, 235.327, -5.649, 0.782)
pt3dadd(159.092, 235.313, -5.656, 0.776)
pt3dadd(159.216, 235.302, -5.661, 0.768)
pt3dadd(159.34, 235.29, -5.667, 0.758)
pt3dadd(159.442, 235.253, -5.691, 0.742)
pt3dadd(159.509, 235.164, -5.749, 0.71)
pt3dadd(159.576, 235.08, -5.807, 0.678)
pt3dadd(159.67, 235.054, -5.876, 0.65)
pt3dadd(159.762, 235.026, -5.947, 0.624)
pt3dadd(159.814, 234.986, -6.038, 0.59)
pt3dadd(159.852, 234.931, -6.13, 0.564)
pt3dadd(159.928, 234.899, -6.2, 0.528)
pt3dadd(160.038, 234.887, -6.252, 0.48)
pt3dadd(160.15, 234.862, -6.292, 0.428)
pt3dadd(160.266, 234.817, -6.312, 0.37)
pt3dadd(160.384, 234.779, -6.329, 0.32)
pt3dadd(160.507, 234.758, -6.334, 0.292)
pt3dadd(160.63, 234.736, -6.339, 0.264)
pt3dadd(160.753, 234.718, -6.345, 0.248)
pt3dadd(160.876, 234.7, -6.35, 0.242)
pt3dadd(160.999, 234.68, -6.355, 0.238)
pt3dadd(161.122, 234.664, -6.36, 0.232)
pt3dadd(161.245, 234.644, -6.366, 0.226)
pt3dadd(161.29, 234.527, -6.371, 0.226)
pt3dadd(161.333, 234.407, -6.376, 0.226)
pt3dadd(161.399, 234.299, -6.381, 0.226)
pt3dadd(161.48, 234.202, -6.386, 0.226)
pt3dadd(161.561, 234.103, -6.392, 0.226)
pt3dadd(161.642, 234.006, -6.397, 0.226)
pt3dadd(161.724, 233.908, -6.402, 0.226)
pt3dadd(161.807, 233.81, -6.407, 0.226)
pt3dadd(161.866, 233.698, -6.412, 0.226)
pt3dadd(161.922, 233.582, -6.418, 0.226)
pt3dadd(162, 233.492, -6.396, 0.226)
pt3dadd(162.086, 233.411, -6.364, 0.226)
pt3dadd(162.151, 233.351, -6.296, 0.226)
pt3dadd(162.212, 233.294, -6.225, 0.226)
pt3dadd(162.265, 233.254, -6.143, 0.226)
pt3dadd(162.317, 233.196, -6.076, 0.23)
pt3dadd(162.359, 233.078, -6.057, 0.25)
pt3dadd(162.419, 233.005, -5.997, 0.262)
pt3dadd(162.481, 232.937, -5.931, 0.274)
pt3dadd(162.544, 232.868, -5.866, 0.286)
pt3dadd(162.606, 232.801, -5.801, 0.298)
pt3dadd(162.688, 232.729, -5.755, 0.32)
pt3dadd(162.778, 232.658, -5.714, 0.346)
pt3dadd(162.865, 232.586, -5.673, 0.37)
pt3dadd(162.954, 232.516, -5.632, 0.394)
pt3dadd(163.016, 232.488, -5.56, 0.432)
pt3dadd(163.066, 232.482, -5.473, 0.476)
pt3dadd(163.127, 232.458, -5.395, 0.524)
pt3dadd(163.206, 232.406, -5.332, 0.58)
pt3dadd(163.285, 232.336, -5.283, 0.62)
pt3dadd(163.366, 232.253, -5.244, 0.648)
pt3dadd(163.447, 232.158, -5.239, 0.674)
pt3dadd(163.529, 232.062, -5.238, 0.698)
pt3dadd(163.591, 231.95, -5.242, 0.73)
pt3dadd(163.654, 231.84, -5.248, 0.758)
pt3dadd(163.729, 231.737, -5.253, 0.774)
pt3dadd(163.805, 231.635, -5.258, 0.788)
pt3dadd(163.882, 231.532, -5.263, 0.804)
pt3dadd(163.957, 231.43, -5.268, 0.818)
pt3dadd(164.022, 231.323, -5.274, 0.836)
pt3dadd(164.066, 231.202, -5.279, 0.856)
pt3dadd(164.11, 231.083, -5.284, 0.878)
pt3dadd(164.153, 230.962, -5.289, 0.89)
pt3dadd(164.196, 230.843, -5.294, 0.9)
pt3dadd(164.232, 230.722, -5.3, 0.898)
pt3dadd(164.262, 230.597, -5.305, 0.888)
pt3dadd(164.3, 230.483, -5.31, 0.876)
pt3dadd(164.423, 230.455, -5.31, 0.856)
pt3dadd(164.544, 230.428, -5.311, 0.836)
pt3dadd(164.651, 230.412, -5.277, 0.796)
pt3dadd(164.744, 230.389, -5.227, 0.752)
pt3dadd(164.821, 230.292, -5.209, 0.74)
pt3dadd(164.899, 230.194, -5.192, 0.728)
pt3dadd(164.976, 230.096, -5.174, 0.716)
pt3dadd(165.053, 229.998, -5.156, 0.706)
pt3dadd(165.109, 229.886, -5.157, 0.7)
pt3dadd(165.16, 229.769, -5.162, 0.694)
pt3dadd(165.211, 229.652, -5.167, 0.69)
pt3dadd(165.262, 229.536, -5.173, 0.686)
pt3dadd(165.314, 229.418, -5.178, 0.68)
pt3dadd(165.384, 229.315, -5.183, 0.68)
pt3dadd(165.474, 229.224, -5.188, 0.686)
pt3dadd(165.563, 229.135, -5.193, 0.69)
pt3dadd(165.653, 229.045, -5.199, 0.696)
pt3dadd(165.743, 228.954, -5.204, 0.7)
pt3dadd(165.836, 228.869, -5.209, 0.706)
pt3dadd(165.935, 228.787, -5.214, 0.71)
pt3dadd(166.032, 228.706, -5.219, 0.716)
pt3dadd(166.129, 228.625, -5.225, 0.72)
pt3dadd(166.226, 228.544, -5.23, 0.726)
pt3dadd(166.298, 228.443, -5.235, 0.734)
pt3dadd(166.349, 228.325, -5.24, 0.746)
pt3dadd(166.404, 228.211, -5.245, 0.75)
pt3dadd(166.476, 228.106, -5.251, 0.738)
pt3dadd(166.552, 228.005, -5.256, 0.728)
pt3dadd(166.663, 227.945, -5.261, 0.716)
pt3dadd(166.774, 227.884, -5.266, 0.704)
pt3dadd(166.88, 227.818, -5.286, 0.704)
pt3dadd(166.985, 227.75, -5.308, 0.704)
pt3dadd(167.062, 227.676, -5.366, 0.726)
pt3dadd(167.135, 227.6, -5.429, 0.752)
pt3dadd(167.209, 227.525, -5.492, 0.778)
pt3dadd(167.267, 227.411, -5.497, 0.834)
pt3dadd(167.323, 227.297, -5.503, 0.89)
pt3dadd(167.365, 227.177, -5.508, 0.998)
pt3dadd(167.441, 227.076, -5.513, 1.004)
pt3dadd(167.52, 226.975, -5.518, 1.004)
pt3dadd(167.598, 226.876, -5.523, 1.004)
pt3dadd(167.677, 226.775, -5.529, 1.004)
pt3dadd(167.756, 226.675, -5.534, 1.004)
pt3dadd(167.808, 226.559, -5.539, 0.986)
pt3dadd(167.86, 226.442, -5.544, 0.968)
pt3dadd(167.911, 226.326, -5.549, 0.948)
pt3dadd(167.962, 226.208, -5.555, 0.93)
pt3dadd(168.013, 226.092, -5.56, 0.91)
pt3dadd(168.049, 225.971, -5.565, 0.89)
pt3dadd(168.079, 225.847, -5.57, 0.868)
pt3dadd(168.108, 225.722, -5.576, 0.848)
pt3dadd(168.136, 225.599, -5.581, 0.826)
pt3dadd(168.164, 225.475, -5.586, 0.806)
pt3dadd(168.193, 225.352, -5.591, 0.784)
pt3dadd(168.229, 225.229, -5.596, 0.772)
pt3dadd(168.269, 225.108, -5.602, 0.762)
pt3dadd(168.31, 224.988, -5.607, 0.754)
}
}
proc shape3d_166() {
apic[27] { pt3dadd(168.349, 224.867, -5.612, 0.744)
pt3dadd(168.389, 224.746, -5.617, 0.736)
pt3dadd(168.434, 224.628, -5.622, 0.728)
pt3dadd(168.516, 224.53, -5.628, 0.728)
pt3dadd(168.598, 224.432, -5.633, 0.728)
pt3dadd(168.678, 224.334, -5.638, 0.728)
pt3dadd(168.76, 224.237, -5.643, 0.728)
pt3dadd(168.839, 224.136, -5.648, 0.73)
pt3dadd(168.899, 224.024, -5.654, 0.74)
pt3dadd(168.96, 223.912, -5.659, 0.75)
pt3dadd(169.02, 223.8, -5.664, 0.76)
pt3dadd(169.08, 223.687, -5.669, 0.768)
pt3dadd(169.141, 223.576, -5.674, 0.778)
pt3dadd(169.192, 223.458, -5.68, 0.784)
pt3dadd(169.244, 223.342, -5.685, 0.788)
pt3dadd(169.296, 223.225, -5.69, 0.792)
pt3dadd(169.346, 223.109, -5.695, 0.798)
pt3dadd(169.398, 222.991, -5.7, 0.802)
pt3dadd(169.472, 222.89, -5.706, 0.808)
pt3dadd(169.556, 222.794, -5.711, 0.812)
pt3dadd(169.64, 222.7, -5.716, 0.818)
pt3dadd(169.645, 222.692, -5.721, 0.818)
pt3dadd(169.729, 222.598, -5.726, 0.822)
pt3dadd(169.813, 222.502, -5.732, 0.828)
pt3dadd(169.882, 222.397, -5.72, 0.828)
pt3dadd(169.945, 222.29, -5.703, 0.828)
pt3dadd(170.008, 222.182, -5.686, 0.828)
pt3dadd(170.071, 222.076, -5.669, 0.828)
pt3dadd(170.136, 221.969, -5.656, 0.83)
pt3dadd(170.21, 221.866, -5.654, 0.836)
pt3dadd(170.284, 221.761, -5.652, 0.84)
pt3dadd(170.357, 221.657, -5.651, 0.846)
pt3dadd(170.43, 221.554, -5.649, 0.85)
pt3dadd(170.507, 221.459, -5.632, 0.86)
pt3dadd(170.588, 221.375, -5.597, 0.872)
pt3dadd(170.67, 221.291, -5.562, 0.884)
pt3dadd(170.752, 221.207, -5.526, 0.896)
pt3dadd(170.831, 221.116, -5.504, 0.906)
pt3dadd(170.903, 221.011, -5.51, 0.91)
pt3dadd(170.906, 221.004, -5.515, 0.91)
pt3dadd(170.98, 220.9, -5.52, 0.916)
pt3dadd(171.052, 220.795, -5.525, 0.92)
pt3dadd(171.125, 220.691, -5.531, 0.926)
pt3dadd(171.184, 220.58, -5.536, 0.926)
pt3dadd(171.208, 220.456, -5.541, 0.916)
pt3dadd(171.232, 220.33, -5.546, 0.906)
pt3dadd(171.289, 220.219, -5.551, 0.88)
pt3dadd(171.36, 220.114, -5.557, 0.844)
pt3dadd(171.46, 220.051, -5.562, 0.818)
pt3dadd(171.581, 220.025, -5.567, 0.798)
pt3dadd(171.703, 219.997, -5.572, 0.78)
pt3dadd(171.781, 219.902, -5.6, 0.754)
pt3dadd(171.852, 219.805, -5.633, 0.726)
pt3dadd(171.865, 219.73, -5.72, 0.708)
pt3dadd(171.91, 219.638, -5.781, 0.694)
pt3dadd(171.967, 219.539, -5.831, 0.682)
pt3dadd(172.025, 219.44, -5.881, 0.67)
pt3dadd(172.082, 219.341, -5.931, 0.658)
pt3dadd(172.124, 219.254, -6, 0.64)
pt3dadd(172.148, 219.18, -6.085, 0.614)
pt3dadd(172.2, 219.1, -6.154, 0.57)
pt3dadd(172.273, 219.017, -6.21, 0.512)
pt3dadd(172.337, 218.91, -6.223, 0.46)
pt3dadd(172.399, 218.798, -6.229, 0.412)
pt3dadd(172.45, 218.692, -6.2, 0.358)
pt3dadd(172.496, 218.585, -6.164, 0.304)
pt3dadd(172.556, 218.479, -6.136, 0.286)
pt3dadd(172.615, 218.374, -6.109, 0.27)
pt3dadd(172.675, 218.268, -6.082, 0.254)
pt3dadd(172.782, 218.212, -6.078, 0.26)
pt3dadd(172.898, 218.164, -6.078, 0.272)
pt3dadd(172.98, 218.077, -6.081, 0.354)
pt3dadd(173.036, 217.964, -6.075, 0.404)
pt3dadd(173.094, 217.852, -6.066, 0.434)
pt3dadd(173.152, 217.739, -6.057, 0.466)
pt3dadd(173.208, 217.626, -6.049, 0.498)
pt3dadd(173.266, 217.514, -6.04, 0.528)
pt3dadd(173.335, 217.408, -6.039, 0.55)
pt3dadd(173.406, 217.302, -6.037, 0.57)
pt3dadd(173.476, 217.196, -6.035, 0.592)
pt3dadd(173.546, 217.09, -6.033, 0.612)
pt3dadd(173.617, 216.984, -6.033, 0.632)
pt3dadd(173.621, 216.978, -6.039, 0.632)
pt3dadd(173.694, 216.872, -6.044, 0.646)
pt3dadd(173.766, 216.768, -6.049, 0.662)
pt3dadd(173.839, 216.664, -6.054, 0.676)
pt3dadd(173.911, 216.559, -6.059, 0.692)
pt3dadd(173.986, 216.455, -6.065, 0.704)
pt3dadd(174.065, 216.355, -6.07, 0.71)
pt3dadd(174.144, 216.254, -6.075, 0.714)
pt3dadd(174.222, 216.155, -6.08, 0.72)
pt3dadd(174.301, 216.054, -6.086, 0.724)
pt3dadd(174.38, 215.954, -6.091, 0.73)
pt3dadd(174.462, 215.857, -6.096, 0.734)
pt3dadd(174.544, 215.759, -6.101, 0.74)
pt3dadd(174.548, 215.753, -6.106, 0.74)
pt3dadd(174.629, 215.654, -6.112, 0.744)
pt3dadd(174.71, 215.557, -6.117, 0.75)
pt3dadd(174.776, 215.452, -6.122, 0.75)
pt3dadd(174.803, 215.327, -6.127, 0.742)
pt3dadd(174.828, 215.203, -6.132, 0.734)
pt3dadd(174.854, 215.078, -6.138, 0.726)
pt3dadd(174.881, 214.954, -6.143, 0.718)
pt3dadd(174.907, 214.829, -6.148, 0.708)
pt3dadd(174.926, 214.704, -6.153, 0.696)
pt3dadd(174.93, 214.578, -6.158, 0.67)
pt3dadd(174.934, 214.451, -6.164, 0.646)
pt3dadd(174.941, 214.325, -6.169, 0.614)
pt3dadd(174.96, 214.2, -6.174, 0.568)
pt3dadd(174.978, 214.074, -6.179, 0.522)
pt3dadd(175.04, 213.972, -6.195, 0.47)
pt3dadd(175.132, 213.886, -6.218, 0.416)
pt3dadd(175.196, 213.846, -6.295, 0.226)
}
apic[28] {pt3dclear()
pt3dadd(95.504, 176.33, 4.041, 0.988)
pt3dadd(95.564, 176.3, 3.96, 0.978)
pt3dadd(95.631, 176.281, 3.864, 0.964)
pt3dadd(95.699, 176.262, 3.769, 0.952)
pt3dadd(95.767, 176.242, 3.673, 0.938)
pt3dadd(95.835, 176.221, 3.577, 0.924)
pt3dadd(95.903, 176.203, 3.482, 0.912)
pt3dadd(95.941, 176.242, 3.426, 0.904)
pt3dadd(95.944, 176.35, 3.417, 0.904)
pt3dadd(95.947, 176.458, 3.408, 0.904)
pt3dadd(95.926, 176.558, 3.386, 0.904)
pt3dadd(95.887, 176.654, 3.354, 0.904)
pt3dadd(95.851, 176.712, 3.285, 0.904)
pt3dadd(95.813, 176.716, 3.186, 0.904)
pt3dadd(95.746, 176.704, 3.099, 0.904)
pt3dadd(95.682, 176.693, 3.01, 0.904)
pt3dadd(95.66, 176.681, 2.904, 0.904)
pt3dadd(95.646, 176.669, 2.797, 0.904)
pt3dadd(95.632, 176.657, 2.689, 0.904)
pt3dadd(95.617, 176.646, 2.582, 0.904)
pt3dadd(95.603, 176.634, 2.474, 0.904)
pt3dadd(95.589, 176.622, 2.367, 0.904)
pt3dadd(95.58, 176.61, 2.259, 0.904)
pt3dadd(95.588, 176.598, 2.149, 0.904)
pt3dadd(95.596, 176.587, 2.04, 0.904)
pt3dadd(95.6, 176.575, 1.931, 0.904)
pt3dadd(95.586, 176.563, 1.824, 0.904)
pt3dadd(95.544, 176.539, 1.726, 0.904)
pt3dadd(95.515, 176.45, 1.655, 0.904)
pt3dadd(95.515, 176.322, 1.626, 0.904)
pt3dadd(95.523, 176.19, 1.614, 0.904)
pt3dadd(95.521, 176.059, 1.604, 0.904)
pt3dadd(95.499, 175.931, 1.595, 0.904)
pt3dadd(95.431, 175.826, 1.586, 0.904)
pt3dadd(95.381, 175.714, 1.564, 0.904)
pt3dadd(95.342, 175.594, 1.532, 0.904)
pt3dadd(95.33, 175.526, 1.455, 0.904)
pt3dadd(95.338, 175.495, 1.348, 0.904)
pt3dadd(95.346, 175.463, 1.24, 0.904)
pt3dadd(95.354, 175.451, 1.131, 0.904)
pt3dadd(95.362, 175.439, 1.021, 0.904)
pt3dadd(95.37, 175.427, 0.912, 0.904)
pt3dadd(95.377, 175.416, 0.803, 0.904)
pt3dadd(95.385, 175.404, 0.694, 0.904)
pt3dadd(95.393, 175.392, 0.584, 0.904)
pt3dadd(95.401, 175.38, 0.575, 0.904)
pt3dadd(95.409, 175.369, 0.466, 0.904)
pt3dadd(95.417, 175.357, 0.357, 0.904)
pt3dadd(95.425, 175.345, 0.247, 0.904)
pt3dadd(95.432, 175.333, 0.138, 0.904)
pt3dadd(95.44, 175.322, 0.029, 0.904)
pt3dadd(95.448, 175.31, -0.08, 0.904)
pt3dadd(95.456, 175.298, -0.189, 0.904)
pt3dadd(95.464, 175.286, -0.199, 1.144)
pt3dadd(95.587, 175.252, -0.189, 1.158)
pt3dadd(95.71, 175.217, -0.179, 1.172)
pt3dadd(95.718, 175.205, -0.188, 1.172)
pt3dadd(95.841, 175.17, -0.178, 1.188)
pt3dadd(95.964, 175.135, -0.168, 1.202)
pt3dadd(96.089, 175.097, -0.173, 1.212)
pt3dadd(96.213, 175.058, -0.182, 1.22)
pt3dadd(96.338, 175.019, -0.191, 1.23)
pt3dadd(96.463, 174.98, -0.201, 1.238)
pt3dadd(96.588, 174.941, -0.21, 1.246)
pt3dadd(96.712, 174.901, -0.219, 1.256)
pt3dadd(96.72, 174.889, -0.228, 1.256)
pt3dadd(96.804, 174.787, -0.237, 1.3)
pt3dadd(96.888, 174.682, -0.247, 1.348)
pt3dadd(96.99, 174.598, -0.256, 1.414)
pt3dadd(97.097, 174.517, -0.265, 1.484)
pt3dadd(97.212, 174.457, -0.274, 1.528)
pt3dadd(97.334, 174.406, -0.284, 1.56)
pt3dadd(97.457, 174.365, -0.293, 1.59)
pt3dadd(97.585, 174.348, -0.302, 1.616)
pt3dadd(97.713, 174.332, -0.311, 1.642)
pt3dadd(97.83, 174.29, -0.333, 1.668)
pt3dadd(97.933, 174.214, -0.371, 1.692)
pt3dadd(98.035, 174.138, -0.409, 1.716)
pt3dadd(98.126, 174.048, -0.441, 1.744)
pt3dadd(98.193, 173.933, -0.461, 1.782)
pt3dadd(98.268, 173.827, -0.488, 1.784)
pt3dadd(98.367, 173.753, -0.536, 1.73)
pt3dadd(98.467, 173.681, -0.585, 1.688)
pt3dadd(98.566, 173.609, -0.634, 1.646)
pt3dadd(98.666, 173.537, -0.683, 1.604)
pt3dadd(98.758, 173.452, -0.727, 1.566)
pt3dadd(98.84, 173.353, -0.764, 1.53)
}
}
proc shape3d_167() {
apic[28] { pt3dadd(98.924, 173.254, -0.802, 1.494)
pt3dadd(99.006, 173.155, -0.84, 1.46)
pt3dadd(99.09, 173.059, -0.881, 1.428)
pt3dadd(99.175, 172.975, -0.937, 1.41)
pt3dadd(99.262, 172.891, -0.993, 1.39)
pt3dadd(99.348, 172.808, -1.048, 1.372)
pt3dadd(99.433, 172.723, -1.103, 1.356)
pt3dadd(99.509, 172.627, -1.157, 1.356)
pt3dadd(99.585, 172.535, -1.213, 1.356)
pt3dadd(99.662, 172.447, -1.273, 1.356)
pt3dadd(99.759, 172.403, -1.335, 1.356)
pt3dadd(99.869, 172.385, -1.397, 1.356)
pt3dadd(99.988, 172.369, -1.435, 1.356)
pt3dadd(100.115, 172.357, -1.452, 1.356)
pt3dadd(100.243, 172.346, -1.47, 1.356)
pt3dadd(100.357, 172.33, -1.52, 1.356)
pt3dadd(100.467, 172.312, -1.582, 1.356)
pt3dadd(100.539, 172.254, -1.656, 1.358)
pt3dadd(100.547, 172.242, -1.665, 1.358)
pt3dadd(100.567, 172.116, -1.7, 1.39)
pt3dadd(100.575, 171.984, -1.721, 1.418)
pt3dadd(100.583, 171.86, -1.76, 1.414)
pt3dadd(100.594, 171.766, -1.838, 1.38)
pt3dadd(100.657, 171.664, -1.896, 1.374)
pt3dadd(100.719, 171.562, -1.953, 1.368)
pt3dadd(100.782, 171.461, -2.01, 1.362)
pt3dadd(100.844, 171.359, -2.068, 1.356)
pt3dadd(100.863, 171.257, -2.141, 1.368)
pt3dadd(100.876, 171.154, -2.215, 1.38)
pt3dadd(100.921, 171.04, -2.263, 1.416)
pt3dadd(100.971, 170.923, -2.307, 1.454)
pt3dadd(101.054, 170.818, -2.318, 1.512)
pt3dadd(101.136, 170.712, -2.327, 1.572)
pt3dadd(101.241, 170.633, -2.35, 1.634)
pt3dadd(101.349, 170.561, -2.376, 1.698)
pt3dadd(101.44, 170.482, -2.429, 1.762)
pt3dadd(101.55, 170.423, -2.463, 1.808)
pt3dadd(101.678, 170.396, -2.473, 1.78)
pt3dadd(101.806, 170.384, -2.482, 1.726)
pt3dadd(101.934, 170.371, -2.492, 1.624)
pt3dadd(102.058, 170.338, -2.501, 1.502)
pt3dadd(102.15, 170.25, -2.51, 1.334)
pt3dadd(102.184, 170.123, -2.519, 1.166)
pt3dadd(102.195, 169.991, -2.529, 1.03)
pt3dadd(102.203, 169.859, -2.538, 0.944)
pt3dadd(102.223, 169.728, -2.547, 0.906)
pt3dadd(102.272, 169.612, -2.578, 0.904)
pt3dadd(102.33, 169.561, -2.666, 0.904)
pt3dadd(102.368, 169.454, -2.725, 0.9)
pt3dadd(102.406, 169.34, -2.779, 0.894)
pt3dadd(102.442, 169.225, -2.832, 0.888)
pt3dadd(102.48, 169.11, -2.886, 0.882)
pt3dadd(102.523, 168.997, -2.941, 0.868)
pt3dadd(102.575, 168.89, -2.999, 0.84)
pt3dadd(102.618, 168.79, -3.067, 0.806)
pt3dadd(102.654, 168.691, -3.142, 0.766)
pt3dadd(102.702, 168.64, -3.234, 0.744)
pt3dadd(102.755, 168.608, -3.335, 0.732)
pt3dadd(102.783, 168.581, -3.44, 0.734)
pt3dadd(102.796, 168.553, -3.548, 0.744)
pt3dadd(102.81, 168.522, -3.654, 0.754)
pt3dadd(102.851, 168.409, -3.709, 0.778)
pt3dadd(102.894, 168.296, -3.764, 0.802)
pt3dadd(102.935, 168.184, -3.819, 0.826)
pt3dadd(102.953, 168.085, -3.896, 0.85)
pt3dadd(102.967, 167.988, -3.976, 0.874)
pt3dadd(102.995, 167.878, -4.039, 0.878)
pt3dadd(103.036, 167.766, -4.096, 0.872)
pt3dadd(103.077, 167.654, -4.153, 0.866)
pt3dadd(103.118, 167.543, -4.21, 0.86)
pt3dadd(103.16, 167.431, -4.267, 0.856)
pt3dadd(103.229, 167.338, -4.327, 0.842)
pt3dadd(103.306, 167.249, -4.385, 0.83)
pt3dadd(103.398, 167.153, -4.4, 0.854)
pt3dadd(103.491, 167.057, -4.415, 0.878)
pt3dadd(103.576, 166.991, -4.487, 0.922)
pt3dadd(103.642, 166.934, -4.568, 0.964)
pt3dadd(103.655, 166.901, -4.675, 1.004)
pt3dadd(103.669, 166.867, -4.783, 1.044)
pt3dadd(103.684, 166.765, -4.839, 1.08)
pt3dadd(103.705, 166.642, -4.882, 1.106)
pt3dadd(103.736, 166.53, -4.943, 1.112)
pt3dadd(103.767, 166.418, -5.004, 1.118)
pt3dadd(103.799, 166.307, -5.064, 1.122)
pt3dadd(103.83, 166.195, -5.125, 1.128)
pt3dadd(103.845, 166.116, -5.213, 1.13)
pt3dadd(103.853, 166.05, -5.311, 1.138)
pt3dadd(103.861, 165.985, -5.41, 1.186)
pt3dadd(103.886, 165.913, -5.504, 1.286)
pt3dadd(103.981, 165.846, -5.559, 1.33)
pt3dadd(104.099, 165.815, -5.602, 1.302)
pt3dadd(104.216, 165.796, -5.651, 1.294)
pt3dadd(104.337, 165.752, -5.68, 1.306)
pt3dadd(104.454, 165.692, -5.69, 1.26)
pt3dadd(104.578, 165.655, -5.7, 1.206)
pt3dadd(104.706, 165.636, -5.709, 1.222)
pt3dadd(104.834, 165.624, -5.718, 1.256)
pt3dadd(104.961, 165.612, -5.727, 1.29)
pt3dadd(105.088, 165.601, -5.743, 1.344)
pt3dadd(105.216, 165.589, -5.765, 1.42)
pt3dadd(105.343, 165.577, -5.786, 1.494)
pt3dadd(105.351, 165.565, -5.795, 1.494)
pt3dadd(105.465, 165.588, -5.836, 1.54)
pt3dadd(105.577, 165.619, -5.88, 1.578)
pt3dadd(105.698, 165.647, -5.892, 1.544)
pt3dadd(105.819, 165.674, -5.901, 1.5)
pt3dadd(105.827, 165.662, -5.91, 1.5)
pt3dadd(105.905, 165.732, -5.926, 1.432)
pt3dadd(105.949, 165.833, -5.948, 1.342)
pt3dadd(105.994, 165.935, -5.969, 1.252)
pt3dadd(106.038, 166.037, -5.991, 1.164)
pt3dadd(106.108, 166.068, -6.072, 1.006)
pt3dadd(106.18, 166.097, -6.155, 0.848)
pt3dadd(106.227, 166.199, -6.168, 0.776)
pt3dadd(106.275, 166.301, -6.181, 0.702)
pt3dadd(106.321, 166.403, -6.193, 0.628)
pt3dadd(106.349, 166.508, -6.203, 0.608)
pt3dadd(106.377, 166.615, -6.212, 0.588)
pt3dadd(106.432, 166.708, -6.221, 0.584)
pt3dadd(106.525, 166.781, -6.23, 0.602)
pt3dadd(106.648, 166.783, -6.26, 0.66)
pt3dadd(106.739, 166.771, -6.334, 0.678)
pt3dadd(106.785, 166.759, -6.438, 0.7)
pt3dadd(106.853, 166.747, -6.53, 0.846)
pt3dadd(106.973, 166.736, -6.569, 1.038)
pt3dadd(107.101, 166.724, -6.586, 1.118)
pt3dadd(107.228, 166.712, -6.603, 1.2)
pt3dadd(107.347, 166.714, -6.643, 1.268)
pt3dadd(107.461, 166.721, -6.696, 1.332)
pt3dadd(107.551, 166.75, -6.765, 1.348)
pt3dadd(107.628, 166.79, -6.843, 1.334)
pt3dadd(107.705, 166.838, -6.917, 1.258)
pt3dadd(107.781, 166.89, -6.989, 1.164)
pt3dadd(107.789, 166.879, -6.998, 1.164)
pt3dadd(107.865, 166.948, -7.055, 1.014)
pt3dadd(107.967, 167.005, -7.085, 0.964)
pt3dadd(108.071, 167.063, -7.114, 0.92)
pt3dadd(108.173, 167.119, -7.142, 0.878)
pt3dadd(108.277, 167.177, -7.17, 0.834)
pt3dadd(108.381, 167.233, -7.168, 0.78)
pt3dadd(108.461, 167.284, -7.209, 0.76)
pt3dadd(108.516, 167.327, -7.298, 0.776)
pt3dadd(108.598, 167.39, -7.29, 0.834)
pt3dadd(108.673, 167.44, -7.303, 0.888)
pt3dadd(108.681, 167.428, -7.312, 0.888)
pt3dadd(108.731, 167.437, -7.413, 0.914)
pt3dadd(108.764, 167.447, -7.517, 0.918)
pt3dadd(108.771, 167.459, -7.624, 0.888)
pt3dadd(108.815, 167.501, -7.712, 0.84)
pt3dadd(108.876, 167.557, -7.791, 0.782)
pt3dadd(108.958, 167.621, -7.846, 0.766)
pt3dadd(109.033, 167.692, -7.895, 0.758)
pt3dadd(109.064, 167.797, -7.919, 0.792)
pt3dadd(109.096, 167.902, -7.943, 0.824)
pt3dadd(109.192, 167.964, -7.954, 0.88)
pt3dadd(109.3, 168.019, -7.963, 0.938)
pt3dadd(109.388, 168.092, -7.99, 0.966)
pt3dadd(109.469, 168.17, -8.024, 0.982)
pt3dadd(109.55, 168.25, -8.059, 0.998)
pt3dadd(109.598, 168.305, -8.132, 0.996)
pt3dadd(109.625, 168.346, -8.229, 0.984)
pt3dadd(109.683, 168.397, -8.308, 1.03)
pt3dadd(109.75, 168.469, -8.369, 1.06)
pt3dadd(109.816, 168.542, -8.43, 1.092)
pt3dadd(109.882, 168.616, -8.49, 1.122)
pt3dadd(109.948, 168.688, -8.551, 1.152)
pt3dadd(110.021, 168.718, -8.636, 1.21)
pt3dadd(110.095, 168.743, -8.723, 1.268)
pt3dadd(110.103, 168.732, -8.733, 1.268)
pt3dadd(110.175, 168.757, -8.82, 1.326)
pt3dadd(110.248, 168.782, -8.907, 1.386)
pt3dadd(110.339, 168.804, -8.982, 1.422)
pt3dadd(110.439, 168.823, -9.05, 1.444)
pt3dadd(110.539, 168.842, -9.118, 1.468)
pt3dadd(110.638, 168.862, -9.186, 1.49)
pt3dadd(110.728, 168.892, -9.257, 1.512)
pt3dadd(110.791, 168.948, -9.334, 1.53)
pt3dadd(110.854, 169.004, -9.411, 1.55)
pt3dadd(110.917, 169.062, -9.488, 1.568)
pt3dadd(110.98, 169.123, -9.562, 1.578)
pt3dadd(111.039, 169.201, -9.622, 1.552)
pt3dadd(111.097, 169.279, -9.682, 1.528)
pt3dadd(111.157, 169.357, -9.742, 1.504)
pt3dadd(111.215, 169.434, -9.803, 1.482)
pt3dadd(111.251, 169.495, -9.888, 1.47)
pt3dadd(111.286, 169.556, -9.973, 1.458)
pt3dadd(111.321, 169.618, -10.059, 1.446)
pt3dadd(111.356, 169.679, -10.144, 1.436)
pt3dadd(111.379, 169.758, -10.215, 1.414)
pt3dadd(111.394, 169.846, -10.28, 1.388)
pt3dadd(111.411, 169.934, -10.345, 1.362)
pt3dadd(111.427, 170.022, -10.409, 1.336)
pt3dadd(111.443, 170.11, -10.474, 1.31)
pt3dadd(111.493, 170.189, -10.537, 1.29)
pt3dadd(111.549, 170.267, -10.599, 1.272)
pt3dadd(111.605, 170.345, -10.662, 1.254)
pt3dadd(111.66, 170.422, -10.724, 1.236)
pt3dadd(111.684, 170.512, -10.781, 1.216)
pt3dadd(111.692, 170.608, -10.835, 1.192)
pt3dadd(111.706, 170.708, -10.869, 1.188)
}
}
proc shape3d_168() {
apic[28] { pt3dadd(111.729, 170.815, -10.878, 1.208)
pt3dadd(111.751, 170.923, -10.888, 1.226)
pt3dadd(111.792, 171.024, -10.913, 1.286)
pt3dadd(111.839, 171.122, -10.944, 1.358)
pt3dadd(111.859, 171.192, -11.017, 1.406)
pt3dadd(111.867, 171.18, -11.026, 1.406)
pt3dadd(111.874, 171.236, -11.118, 1.44)
pt3dadd(111.882, 171.301, -11.204, 1.446)
pt3dadd(111.893, 171.376, -11.282, 1.428)
pt3dadd(111.918, 171.457, -11.352, 1.394)
pt3dadd(111.943, 171.539, -11.422, 1.362)
pt3dadd(111.951, 171.528, -11.432, 1.362)
pt3dadd(111.977, 171.61, -11.502, 1.328)
pt3dadd(112.003, 171.691, -11.572, 1.296)
pt3dadd(112.041, 171.772, -11.639, 1.274)
pt3dadd(112.089, 171.852, -11.703, 1.262)
pt3dadd(112.138, 171.931, -11.768, 1.25)
pt3dadd(112.186, 172.01, -11.832, 1.238)
pt3dadd(112.234, 172.09, -11.898, 1.234)
pt3dadd(112.28, 172.165, -11.968, 1.246)
pt3dadd(112.325, 172.242, -12.037, 1.258)
pt3dadd(112.371, 172.319, -12.107, 1.27)
pt3dadd(112.422, 172.392, -12.171, 1.286)
pt3dadd(112.532, 172.444, -12.186, 1.332)
pt3dadd(112.641, 172.496, -12.2, 1.38)
pt3dadd(112.703, 172.567, -12.266, 1.368)
pt3dadd(112.751, 172.643, -12.33, 1.338)
pt3dadd(112.759, 172.735, -12.39, 1.258)
pt3dadd(112.767, 172.825, -12.452, 1.178)
pt3dadd(112.775, 172.874, -12.547, 1.096)
pt3dadd(112.783, 172.924, -12.642, 1.016)
pt3dadd(112.791, 172.927, -12.749, 0.97)
pt3dadd(112.799, 172.922, -12.858, 0.93)
pt3dadd(112.806, 172.95, -12.962, 0.952)
pt3dadd(112.814, 172.98, -13.065, 0.974)
pt3dadd(112.822, 173.01, -13.168, 0.998)
pt3dadd(112.83, 173.04, -13.271, 1.02)
pt3dadd(112.838, 173.07, -13.374, 1.044)
pt3dadd(112.846, 173.105, -13.475, 1.074)
pt3dadd(112.854, 173.143, -13.575, 1.112)
pt3dadd(112.861, 173.182, -13.675, 1.15)
pt3dadd(112.869, 173.221, -13.775, 1.188)
pt3dadd(112.877, 173.26, -13.875, 1.226)
pt3dadd(112.885, 173.309, -13.968, 1.268)
pt3dadd(112.893, 173.39, -14.04, 1.318)
pt3dadd(112.901, 173.473, -14.112, 1.368)
pt3dadd(112.908, 173.555, -14.183, 1.418)
pt3dadd(112.916, 173.636, -14.255, 1.47)
pt3dadd(112.924, 173.724, -14.318, 1.562)
pt3dadd(112.932, 173.828, -14.354, 1.738)
pt3dadd(112.94, 173.816, -14.364, 1.738)
pt3dadd(112.948, 173.906, -14.423, 1.806)
pt3dadd(112.956, 173.988, -14.494, 1.768)
pt3dadd(112.963, 174.077, -14.557, 1.682)
pt3dadd(112.972, 174.161, -14.626, 1.578)
pt3dadd(113.016, 174.194, -14.719, 1.516)
pt3dadd(113.119, 174.187, -14.784, 1.532)
pt3dadd(113.243, 174.196, -14.805, 1.526)
pt3dadd(113.361, 174.227, -14.821, 1.462)
pt3dadd(113.471, 174.265, -14.86, 1.352)
pt3dadd(113.561, 174.329, -14.906, 1.294)
pt3dadd(113.642, 174.401, -14.947, 1.24)
pt3dadd(113.65, 174.39, -14.956, 1.24)
pt3dadd(113.657, 174.378, -14.965, 1.24)
pt3dadd(113.719, 174.472, -14.991, 1.19)
pt3dadd(113.766, 174.559, -15.033, 1.158)
pt3dadd(113.778, 174.63, -15.115, 1.166)
pt3dadd(113.791, 174.701, -15.197, 1.176)
pt3dadd(113.801, 174.744, -15.291, 1.214)
pt3dadd(113.809, 174.766, -15.397, 1.276)
pt3dadd(113.817, 174.794, -15.497, 1.338)
pt3dadd(113.825, 174.887, -15.555, 1.406)
pt3dadd(113.832, 174.98, -15.614, 1.476)
pt3dadd(113.84, 175.073, -15.672, 1.528)
pt3dadd(113.848, 175.164, -15.732, 1.504)
pt3dadd(113.856, 175.256, -15.792, 1.482)
pt3dadd(113.866, 175.344, -15.854, 1.268)
pt3dadd(113.881, 175.448, -15.887, 1.222)
pt3dadd(113.896, 175.553, -15.92, 1.178)
pt3dadd(113.911, 175.657, -15.954, 1.132)
pt3dadd(113.926, 175.762, -15.987, 1.086)
pt3dadd(113.941, 175.867, -16.021, 1.04)
pt3dadd(113.966, 175.949, -16.087, 1.022)
pt3dadd(113.996, 176.023, -16.163, 1.01)
pt3dadd(114.024, 176.098, -16.24, 0.998)
pt3dadd(114.053, 176.173, -16.316, 0.988)
pt3dadd(114.095, 176.238, -16.394, 0.98)
pt3dadd(114.166, 176.278, -16.476, 0.98)
pt3dadd(114.239, 176.317, -16.557, 0.98)
pt3dadd(114.312, 176.357, -16.639, 0.98)
pt3dadd(114.384, 176.402, -16.715, 0.978)
pt3dadd(114.465, 176.479, -16.755, 0.966)
pt3dadd(114.545, 176.555, -16.796, 0.954)
pt3dadd(114.625, 176.632, -16.837, 0.942)
pt3dadd(114.706, 176.707, -16.877, 0.93)
pt3dadd(114.743, 176.81, -16.9, 0.9)
pt3dadd(114.774, 176.915, -16.922, 0.866)
pt3dadd(114.807, 177.019, -16.944, 0.834)
pt3dadd(114.84, 177.124, -16.965, 0.802)
pt3dadd(114.872, 177.229, -16.987, 0.768)
pt3dadd(114.895, 177.335, -17.002, 0.72)
pt3dadd(114.907, 177.444, -17.011, 0.66)
pt3dadd(114.92, 177.552, -17.021, 0.6)
pt3dadd(114.955, 177.655, -17.033, 0.556)
pt3dadd(115.005, 177.756, -17.047, 0.522)
pt3dadd(115.041, 177.856, -17.075, 0.51)
pt3dadd(115.054, 177.953, -17.125, 0.534)
pt3dadd(115.067, 178.045, -17.181, 0.568)
pt3dadd(115.075, 178.115, -17.264, 0.652)
pt3dadd(115.083, 178.188, -17.343, 0.738)
pt3dadd(115.091, 178.288, -17.389, 0.868)
pt3dadd(115.098, 178.38, -17.446, 0.944)
pt3dadd(115.106, 178.368, -17.455, 0.944)
pt3dadd(115.114, 178.452, -17.525, 0.976)
pt3dadd(115.122, 178.536, -17.594, 1.006)
pt3dadd(115.13, 178.621, -17.663, 1.036)
pt3dadd(115.138, 178.705, -17.733, 1.066)
pt3dadd(115.146, 178.778, -17.811, 1.078)
pt3dadd(115.153, 178.842, -17.899, 1.072)
pt3dadd(115.161, 178.904, -17.986, 1.068)
pt3dadd(115.169, 178.968, -18.073, 1.062)
pt3dadd(115.177, 179.032, -18.16, 1.058)
pt3dadd(115.185, 179.02, -18.17, 1.058)
pt3dadd(115.193, 179.008, -18.179, 1.058)
pt3dadd(115.201, 179.076, -18.263, 1.044)
pt3dadd(115.208, 179.147, -18.344, 1.024)
pt3dadd(115.216, 179.219, -18.425, 1.002)
pt3dadd(115.224, 179.291, -18.506, 0.982)
pt3dadd(115.232, 179.363, -18.587, 0.962)
pt3dadd(115.24, 179.41, -18.681, 0.948)
pt3dadd(115.248, 179.44, -18.784, 0.94)
pt3dadd(115.255, 179.47, -18.887, 0.93)
pt3dadd(115.263, 179.498, -18.99, 0.922)
pt3dadd(115.271, 179.528, -19.093, 0.912)
pt3dadd(115.279, 179.564, -19.193, 0.906)
pt3dadd(115.287, 179.636, -19.274, 0.928)
pt3dadd(115.295, 179.708, -19.355, 0.948)
pt3dadd(115.303, 179.78, -19.436, 0.968)
pt3dadd(115.31, 179.852, -19.517, 0.988)
pt3dadd(115.318, 179.924, -19.598, 1.012)
pt3dadd(115.326, 179.999, -19.677, 1.046)
pt3dadd(115.334, 180.073, -19.756, 1.082)
pt3dadd(115.342, 180.148, -19.834, 1.118)
pt3dadd(115.35, 180.222, -19.913, 1.154)
pt3dadd(115.358, 180.298, -19.992, 1.186)
pt3dadd(115.365, 180.374, -20.068, 1.212)
pt3dadd(115.373, 180.451, -20.145, 1.238)
pt3dadd(115.381, 180.528, -20.221, 1.262)
pt3dadd(115.389, 180.606, -20.298, 1.288)
pt3dadd(115.397, 180.691, -20.36, 1.312)
pt3dadd(115.405, 180.798, -20.386, 1.33)
pt3dadd(115.412, 180.904, -20.412, 1.35)
pt3dadd(115.44, 180.978, -20.48, 1.338)
pt3dadd(115.476, 181.037, -20.567, 1.31)
pt3dadd(115.563, 181.055, -20.642, 1.262)
pt3dadd(115.661, 181.064, -20.714, 1.21)
pt3dadd(115.683, 181.086, -20.816, 1.148)
pt3dadd(115.697, 181.109, -20.921, 1.082)
pt3dadd(115.707, 181.124, -21.027, 1.03)
pt3dadd(115.715, 181.136, -21.135, 0.984)
pt3dadd(115.761, 181.128, -21.237, 0.984)
pt3dadd(115.815, 181.116, -21.339, 0.988)
pt3dadd(115.867, 181.104, -21.441, 0.992)
pt3dadd(115.919, 181.092, -21.543, 0.998)
pt3dadd(115.972, 181.081, -21.646, 1.002)
pt3dadd(116.029, 181.087, -21.743, 1.018)
pt3dadd(116.092, 181.111, -21.836, 1.048)
pt3dadd(116.154, 181.136, -21.929, 1.076)
pt3dadd(116.217, 181.162, -22.022, 1.104)
pt3dadd(116.283, 181.187, -22.111, 1.134)
pt3dadd(116.38, 181.223, -22.174, 1.164)
pt3dadd(116.478, 181.26, -22.236, 1.194)
pt3dadd(116.574, 181.296, -22.299, 1.224)
pt3dadd(116.672, 181.332, -22.362, 1.254)
pt3dadd(116.68, 181.32, -22.371, 1.254)
pt3dadd(116.786, 181.312, -22.436, 1.288)
pt3dadd(116.893, 181.3, -22.502, 1.324)
pt3dadd(117.011, 181.289, -22.55, 1.34)
pt3dadd(117.132, 181.277, -22.592, 1.35)
pt3dadd(117.255, 181.256, -22.622, 1.356)
pt3dadd(117.381, 181.223, -22.636, 1.356)
pt3dadd(117.507, 181.189, -22.65, 1.356)
pt3dadd(117.547, 181.068, -22.659, 1.346)
pt3dadd(117.581, 180.938, -22.668, 1.336)
pt3dadd(117.641, 180.823, -22.678, 1.3)
pt3dadd(117.734, 180.727, -22.687, 1.23)
pt3dadd(117.835, 180.641, -22.696, 1.2)
pt3dadd(117.937, 180.554, -22.705, 1.17)
pt3dadd(118.038, 180.467, -22.715, 1.14)
pt3dadd(118.139, 180.38, -22.724, 1.11)
pt3dadd(118.241, 180.293, -22.733, 1.078)
pt3dadd(118.323, 180.188, -22.742, 1.048)
pt3dadd(118.407, 180.083, -22.752, 1.018)
pt3dadd(118.489, 179.977, -22.761, 0.988)
pt3dadd(118.572, 179.872, -22.77, 0.958)
pt3dadd(118.655, 179.766, -22.779, 0.928)
pt3dadd(118.739, 179.662, -22.791, 0.914)
pt3dadd(118.823, 179.557, -22.802, 0.898)
pt3dadd(118.907, 179.453, -22.814, 0.882)
pt3dadd(118.991, 179.348, -22.826, 0.866)
}
}
proc shape3d_169() {
apic[28] { pt3dadd(119.073, 179.245, -22.843, 0.85)
pt3dadd(119.141, 179.143, -22.896, 0.822)
pt3dadd(119.215, 179.047, -22.949, 0.798)
pt3dadd(119.298, 178.96, -23.003, 0.784)
pt3dadd(119.403, 178.89, -23.039, 0.778)
pt3dadd(119.52, 178.834, -23.064, 0.778)
pt3dadd(119.643, 178.796, -23.081, 0.794)
pt3dadd(119.77, 178.775, -23.09, 0.82)
pt3dadd(119.898, 178.753, -23.099, 0.848)
pt3dadd(119.991, 178.668, -23.109, 0.876)
pt3dadd(120.074, 178.564, -23.118, 0.904)
pt3dadd(120.156, 178.458, -23.127, 0.932)
pt3dadd(120.245, 178.358, -23.138, 0.964)
pt3dadd(120.355, 178.283, -23.152, 1.012)
pt3dadd(120.466, 178.212, -23.169, 1.062)
pt3dadd(120.58, 178.166, -23.212, 1.11)
pt3dadd(120.682, 178.096, -23.257, 1.124)
pt3dadd(120.793, 178.033, -23.282, 1.13)
pt3dadd(120.912, 177.974, -23.292, 1.13)
pt3dadd(121.031, 177.918, -23.302, 1.126)
pt3dadd(121.151, 177.864, -23.316, 1.116)
pt3dadd(121.271, 177.811, -23.333, 1.104)
pt3dadd(121.346, 177.78, -23.422, 1.066)
pt3dadd(121.424, 177.749, -23.512, 1.024)
pt3dadd(121.506, 177.737, -23.599, 0.952)
pt3dadd(121.606, 177.725, -23.672, 0.922)
pt3dadd(121.712, 177.714, -23.738, 0.91)
pt3dadd(121.804, 177.691, -23.815, 0.93)
pt3dadd(121.88, 177.659, -23.905, 0.982)
pt3dadd(121.888, 177.648, -23.914, 0.982)
pt3dadd(121.955, 177.572, -23.982, 1.052)
pt3dadd(122.014, 177.466, -24.034, 1.134)
pt3dadd(122.096, 177.374, -24.083, 1.166)
pt3dadd(122.186, 177.287, -24.129, 1.18)
pt3dadd(122.309, 177.241, -24.139, 1.15)
pt3dadd(122.431, 177.197, -24.149, 1.12)
pt3dadd(122.555, 177.152, -24.158, 1.088)
pt3dadd(122.678, 177.107, -24.167, 1.058)
pt3dadd(122.687, 177.096, -24.177, 1.058)
pt3dadd(122.814, 177.082, -24.186, 1)
pt3dadd(122.941, 177.07, -24.195, 0.942)
pt3dadd(123.07, 177.058, -24.204, 0.884)
pt3dadd(123.197, 177.046, -24.213, 0.81)
pt3dadd(123.325, 177.035, -24.224, 0.81)
pt3dadd(123.452, 177.023, -24.235, 0.818)
pt3dadd(123.581, 177.011, -24.246, 0.824)
pt3dadd(123.708, 176.999, -24.257, 0.832)
pt3dadd(123.836, 176.987, -24.267, 0.84)
pt3dadd(123.964, 176.976, -24.278, 0.846)
pt3dadd(124.092, 176.965, -24.29, 0.854)
pt3dadd(124.214, 176.982, -24.316, 0.868)
pt3dadd(124.337, 176.999, -24.343, 0.884)
pt3dadd(124.46, 177.016, -24.37, 0.898)
pt3dadd(124.582, 177.032, -24.396, 0.914)
pt3dadd(124.705, 177.049, -24.423, 0.928)
pt3dadd(124.817, 177.059, -24.477, 0.94)
pt3dadd(124.928, 177.067, -24.534, 0.95)
pt3dadd(125.039, 177.076, -24.591, 0.96)
pt3dadd(125.15, 177.084, -24.649, 0.972)
pt3dadd(125.263, 177.096, -24.701, 0.976)
pt3dadd(125.38, 177.119, -24.741, 0.966)
pt3dadd(125.496, 177.142, -24.782, 0.954)
pt3dadd(125.614, 177.164, -24.822, 0.944)
pt3dadd(125.73, 177.186, -24.862, 0.934)
pt3dadd(125.849, 177.211, -24.887, 0.924)
pt3dadd(125.971, 177.238, -24.903, 0.914)
pt3dadd(126.092, 177.264, -24.918, 0.904)
pt3dadd(126.214, 177.289, -24.934, 0.894)
pt3dadd(126.335, 177.316, -24.949, 0.886)
pt3dadd(126.454, 177.348, -24.972, 0.874)
pt3dadd(126.563, 177.39, -25.009, 0.856)
pt3dadd(126.673, 177.432, -25.045, 0.84)
pt3dadd(126.782, 177.474, -25.082, 0.822)
pt3dadd(126.893, 177.516, -25.119, 0.806)
pt3dadd(126.992, 177.574, -25.154, 0.798)
pt3dadd(127.093, 177.632, -25.189, 0.792)
pt3dadd(127.194, 177.691, -25.223, 0.786)
pt3dadd(127.292, 177.75, -25.258, 0.782)
pt3dadd(127.4, 177.802, -25.287, 0.772)
pt3dadd(127.512, 177.846, -25.31, 0.762)
pt3dadd(127.625, 177.89, -25.334, 0.752)
pt3dadd(127.736, 177.936, -25.357, 0.74)
pt3dadd(127.849, 177.98, -25.38, 0.73)
pt3dadd(127.954, 178.032, -25.415, 0.732)
pt3dadd(128.057, 178.085, -25.453, 0.738)
pt3dadd(128.16, 178.138, -25.49, 0.744)
pt3dadd(128.263, 178.19, -25.528, 0.75)
pt3dadd(128.359, 178.254, -25.56, 0.758)
pt3dadd(128.448, 178.328, -25.586, 0.77)
pt3dadd(128.537, 178.403, -25.613, 0.782)
pt3dadd(128.624, 178.478, -25.64, 0.792)
pt3dadd(128.713, 178.553, -25.666, 0.804)
pt3dadd(128.816, 178.61, -25.69, 0.82)
pt3dadd(128.921, 178.669, -25.714, 0.836)
pt3dadd(129.024, 178.727, -25.737, 0.854)
pt3dadd(129.128, 178.786, -25.761, 0.87)
pt3dadd(129.22, 178.853, -25.792, 0.876)
pt3dadd(129.298, 178.931, -25.833, 0.87)
pt3dadd(129.373, 179.01, -25.874, 0.864)
pt3dadd(129.451, 179.089, -25.914, 0.858)
pt3dadd(129.527, 179.17, -25.949, 0.848)
pt3dadd(129.604, 179.257, -25.958, 0.812)
pt3dadd(129.679, 179.344, -25.968, 0.778)
pt3dadd(129.769, 179.407, -26.015, 0.736)
pt3dadd(129.851, 179.478, -26.057, 0.698)
pt3dadd(129.904, 179.576, -26.082, 0.674)
pt3dadd(129.952, 179.676, -26.105, 0.652)
pt3dadd(129.973, 179.783, -26.114, 0.642)
pt3dadd(129.997, 179.891, -26.123, 0.632)
pt3dadd(130.032, 179.994, -26.132, 0.62)
pt3dadd(130.085, 180.095, -26.141, 0.604)
pt3dadd(130.144, 180.188, -26.171, 0.602)
pt3dadd(130.204, 180.281, -26.202, 0.602)
pt3dadd(130.265, 180.374, -26.233, 0.602)
pt3dadd(130.325, 180.467, -26.264, 0.602)
pt3dadd(130.394, 180.547, -26.305, 0.598)
pt3dadd(130.481, 180.605, -26.363, 0.586)
pt3dadd(130.567, 180.661, -26.422, 0.574)
pt3dadd(130.654, 180.719, -26.48, 0.562)
pt3dadd(130.748, 180.768, -26.533, 0.55)
pt3dadd(130.864, 180.797, -26.571, 0.538)
pt3dadd(130.979, 180.826, -26.609, 0.528)
pt3dadd(131.094, 180.854, -26.647, 0.516)
pt3dadd(131.209, 180.883, -26.686, 0.506)
pt3dadd(131.329, 180.888, -26.724, 0.494)
pt3dadd(131.452, 180.882, -26.762, 0.484)
pt3dadd(131.574, 180.892, -26.789, 0.49)
pt3dadd(131.692, 180.926, -26.798, 0.522)
pt3dadd(131.81, 180.961, -26.808, 0.554)
pt3dadd(131.924, 181.003, -26.817, 0.576)
pt3dadd(132.041, 181.045, -26.826, 0.6)
pt3dadd(132.048, 181.033, -26.835, 0.6)
pt3dadd(132.119, 181.121, -26.845, 0.602)
pt3dadd(132.179, 181.217, -26.854, 0.602)
pt3dadd(132.209, 181.308, -26.897, 0.578)
pt3dadd(132.216, 181.396, -26.961, 0.536)
pt3dadd(132.224, 181.483, -27.026, 0.494)
pt3dadd(132.232, 181.572, -27.091, 0.452)
}
dend_0[5] {pt3dclear()
pt3dadd(105.606, 131.652, 13.526, 13.334)
pt3dadd(105.606, 131.67, 13.541, 13.314)
pt3dadd(105.606, 131.755, 13.612, 13.218)
pt3dadd(105.606, 131.839, 13.682, 13.124)
pt3dadd(105.606, 131.924, 13.753, 13.028)
pt3dadd(105.606, 132.01, 13.824, 12.934)
pt3dadd(105.606, 132.095, 13.895, 12.838)
pt3dadd(105.606, 132.179, 13.965, 12.744)
pt3dadd(105.606, 132.264, 14.036, 12.648)
pt3dadd(105.606, 132.349, 14.107, 12.552)
pt3dadd(105.606, 132.433, 14.177, 12.458)
pt3dadd(105.606, 132.518, 14.248, 12.362)
pt3dadd(105.606, 132.604, 14.319, 12.268)
pt3dadd(105.606, 132.688, 14.39, 12.172)
pt3dadd(105.606, 132.773, 14.46, 12.076)
pt3dadd(105.606, 132.858, 14.531, 11.982)
pt3dadd(105.606, 132.94, 14.604, 11.832)
pt3dadd(105.606, 133.021, 14.678, 11.682)
pt3dadd(105.606, 133.103, 14.751, 11.532)
pt3dadd(105.606, 133.184, 14.825, 11.384)
pt3dadd(105.606, 133.265, 14.898, 11.234)
pt3dadd(105.606, 133.346, 14.971, 11.084)
pt3dadd(105.606, 133.428, 15.045, 10.934)
pt3dadd(105.606, 133.51, 15.118, 10.784)
pt3dadd(105.606, 133.591, 15.192, 10.634)
pt3dadd(105.606, 133.673, 15.265, 10.484)
pt3dadd(105.606, 133.753, 15.339, 10.318)
pt3dadd(105.606, 133.834, 15.414, 10.15)
pt3dadd(105.606, 133.914, 15.488, 9.984)
pt3dadd(105.606, 133.994, 15.562, 9.816)
pt3dadd(105.605, 134.075, 15.636, 9.65)
pt3dadd(105.605, 134.155, 15.71, 9.482)
pt3dadd(105.605, 134.236, 15.785, 9.316)
pt3dadd(105.605, 134.316, 15.859, 9.148)
pt3dadd(105.605, 134.396, 15.933, 8.982)
pt3dadd(105.605, 134.477, 16.007, 8.814)
}
dend_0[6] {pt3dclear()
pt3dadd(105.605, 134.477, 16.007, 8.814)
pt3dadd(105.605, 134.514, 16.043, 8.728)
pt3dadd(105.605, 134.591, 16.12, 8.546)
pt3dadd(105.604, 134.669, 16.196, 8.366)
pt3dadd(105.604, 134.747, 16.272, 8.184)
pt3dadd(105.604, 134.825, 16.348, 8.002)
pt3dadd(105.604, 134.903, 16.424, 7.822)
pt3dadd(105.604, 134.981, 16.5, 7.64)
pt3dadd(105.604, 135.058, 16.577, 7.458)
pt3dadd(105.603, 135.134, 16.654, 7.248)
}
dend_7[18] {pt3dclear()
pt3dadd(105.603, 135.134, 16.654, 7.248)
pt3dadd(105.603, 135.21, 16.732, 7.02)
pt3dadd(105.603, 135.284, 16.809, 6.792)
pt3dadd(105.603, 135.36, 16.887, 6.564)
pt3dadd(105.603, 135.436, 16.965, 6.336)
pt3dadd(105.602, 135.511, 17.043, 6.108)
pt3dadd(105.602, 135.587, 17.121, 5.88)
pt3dadd(105.602, 135.661, 17.199, 5.652)
pt3dadd(105.602, 135.737, 17.277, 5.426)
pt3dadd(105.601, 135.812, 17.354, 5.198)
pt3dadd(105.601, 135.886, 17.434, 4.928)
pt3dadd(105.601, 135.956, 17.514, 4.634)
pt3dadd(105.601, 136.028, 17.594, 4.34)
pt3dadd(105.6, 136.1, 17.674, 4.046)
pt3dadd(105.6, 136.171, 17.755, 3.752)
pt3dadd(105.6, 136.243, 17.835, 3.458)
}
}
proc shape3d_170() {
dend_7[18] { pt3dadd(105.6, 136.315, 17.915, 3.164)
pt3dadd(105.599, 136.386, 17.996, 2.87)
pt3dadd(105.599, 136.458, 18.076, 2.576)
pt3dadd(105.599, 136.529, 18.156, 2.282)
pt3dadd(105.598, 136.58, 18.246, 2.166)
pt3dadd(105.598, 136.619, 18.34, 2.152)
pt3dadd(105.597, 136.657, 18.435, 2.138)
pt3dadd(105.597, 136.697, 18.529, 2.124)
pt3dadd(105.596, 136.735, 18.624, 2.11)
pt3dadd(105.595, 136.775, 18.719, 2.096)
pt3dadd(105.595, 136.813, 18.813, 2.082)
pt3dadd(105.594, 136.852, 18.908, 2.068)
pt3dadd(105.594, 136.891, 19.002, 2.052)
pt3dadd(105.593, 136.93, 19.097, 2.038)
pt3dadd(105.592, 136.951, 19.195, 2.044)
pt3dadd(105.59, 136.963, 19.294, 2.058)
pt3dadd(105.589, 136.976, 19.394, 2.072)
pt3dadd(105.588, 136.988, 19.493, 2.086)
pt3dadd(105.586, 137, 19.593, 2.1)
pt3dadd(105.585, 137.014, 19.692, 2.114)
pt3dadd(105.583, 137.026, 19.792, 2.128)
pt3dadd(105.582, 137.039, 19.891, 2.142)
pt3dadd(105.58, 137.051, 19.991, 2.158)
pt3dadd(105.579, 137.063, 20.09, 2.172)
pt3dadd(105.576, 137.059, 20.19, 2.174)
pt3dadd(105.574, 137.051, 20.289, 2.17)
pt3dadd(105.571, 137.041, 20.389, 2.168)
pt3dadd(105.568, 137.033, 20.489, 2.166)
pt3dadd(105.566, 137.023, 20.588, 2.162)
pt3dadd(105.563, 137.015, 20.688, 2.16)
pt3dadd(105.561, 137.005, 20.788, 2.158)
pt3dadd(105.558, 136.997, 20.888, 2.156)
pt3dadd(105.555, 136.987, 20.987, 2.152)
pt3dadd(105.553, 136.979, 21.087, 2.15)
pt3dadd(105.548, 136.95, 21.184, 2.134)
pt3dadd(105.543, 136.916, 21.279, 2.114)
pt3dadd(105.538, 136.883, 21.375, 2.096)
pt3dadd(105.533, 136.849, 21.471, 2.076)
pt3dadd(105.528, 136.816, 21.567, 2.058)
pt3dadd(105.522, 136.782, 21.663, 2.038)
pt3dadd(105.517, 136.748, 21.759, 2.018)
pt3dadd(105.512, 136.715, 21.855, 1.998)
pt3dadd(105.507, 136.68, 21.951, 1.98)
pt3dadd(105.502, 136.646, 22.046, 1.96)
pt3dadd(105.494, 136.595, 22.136, 1.942)
pt3dadd(105.485, 136.541, 22.225, 1.922)
pt3dadd(105.476, 136.487, 22.314, 1.904)
pt3dadd(105.467, 136.434, 22.403, 1.886)
pt3dadd(105.459, 136.38, 22.493, 1.866)
pt3dadd(105.45, 136.326, 22.582, 1.848)
pt3dadd(105.441, 136.272, 22.671, 1.83)
pt3dadd(105.432, 136.218, 22.76, 1.81)
pt3dadd(105.423, 136.165, 22.849, 1.792)
pt3dadd(105.415, 136.111, 22.938, 1.774)
pt3dadd(105.4, 136.061, 23.028, 1.756)
pt3dadd(105.384, 136.013, 23.119, 1.738)
pt3dadd(105.369, 135.964, 23.209, 1.72)
pt3dadd(105.353, 135.914, 23.299, 1.702)
pt3dadd(105.337, 135.865, 23.39, 1.684)
pt3dadd(105.322, 135.816, 23.48, 1.666)
pt3dadd(105.306, 135.767, 23.57, 1.648)
pt3dadd(105.291, 135.718, 23.66, 1.63)
pt3dadd(105.275, 135.668, 23.751, 1.612)
pt3dadd(105.26, 135.619, 23.841, 1.594)
pt3dadd(105.209, 135.545, 23.907, 1.614)
pt3dadd(105.158, 135.47, 23.972, 1.636)
pt3dadd(105.106, 135.395, 24.038, 1.656)
pt3dadd(105.055, 135.32, 24.103, 1.678)
pt3dadd(105.003, 135.246, 24.168, 1.7)
pt3dadd(104.952, 135.17, 24.234, 1.72)
pt3dadd(104.9, 135.096, 24.299, 1.742)
pt3dadd(104.849, 135.022, 24.365, 1.764)
pt3dadd(104.797, 134.946, 24.43, 1.786)
pt3dadd(104.746, 134.872, 24.495, 1.806)
pt3dadd(104.716, 134.824, 24.583, 1.786)
pt3dadd(104.686, 134.778, 24.672, 1.766)
pt3dadd(104.656, 134.731, 24.761, 1.744)
pt3dadd(104.627, 134.686, 24.85, 1.722)
pt3dadd(104.597, 134.639, 24.939, 1.7)
pt3dadd(104.567, 134.592, 25.028, 1.68)
pt3dadd(104.538, 134.546, 25.116, 1.658)
pt3dadd(104.508, 134.5, 25.205, 1.636)
pt3dadd(104.478, 134.453, 25.294, 1.616)
pt3dadd(104.448, 134.407, 25.383, 1.594)
pt3dadd(104.445, 134.356, 25.473, 1.614)
pt3dadd(104.442, 134.303, 25.563, 1.636)
pt3dadd(104.439, 134.251, 25.654, 1.658)
pt3dadd(104.436, 134.2, 25.744, 1.678)
pt3dadd(104.433, 134.148, 25.834, 1.7)
pt3dadd(104.43, 134.096, 25.924, 1.72)
pt3dadd(104.427, 134.045, 26.014, 1.742)
pt3dadd(104.424, 133.993, 26.105, 1.764)
pt3dadd(104.421, 133.942, 26.195, 1.784)
pt3dadd(104.418, 133.89, 26.285, 1.806)
pt3dadd(104.439, 133.889, 26.384, 1.784)
pt3dadd(104.46, 133.889, 26.482, 1.762)
pt3dadd(104.481, 133.888, 26.58, 1.738)
pt3dadd(104.502, 133.886, 26.679, 1.716)
pt3dadd(104.524, 133.886, 26.777, 1.694)
pt3dadd(104.545, 133.885, 26.876, 1.672)
pt3dadd(104.566, 133.884, 26.974, 1.65)
pt3dadd(104.587, 133.883, 27.073, 1.626)
pt3dadd(104.608, 133.883, 27.171, 1.604)
pt3dadd(104.629, 133.882, 27.27, 1.582)
}
dend_7[19] {pt3dclear()
pt3dadd(104.629, 133.882, 27.27, 1.582)
pt3dadd(104.692, 133.951, 27.324, 1.562)
pt3dadd(104.758, 134.023, 27.382, 1.54)
pt3dadd(104.824, 134.095, 27.439, 1.518)
pt3dadd(104.89, 134.168, 27.497, 1.496)
pt3dadd(104.956, 134.24, 27.555, 1.474)
pt3dadd(105.023, 134.314, 27.612, 1.452)
pt3dadd(105.087, 134.387, 27.67, 1.432)
pt3dadd(105.138, 134.474, 27.724, 1.424)
pt3dadd(105.188, 134.561, 27.778, 1.416)
pt3dadd(105.239, 134.648, 27.833, 1.408)
pt3dadd(105.289, 134.736, 27.887, 1.4)
pt3dadd(105.339, 134.822, 27.942, 1.394)
pt3dadd(105.39, 134.91, 27.996, 1.386)
pt3dadd(105.44, 134.998, 28.05, 1.378)
pt3dadd(105.491, 135.084, 28.105, 1.37)
pt3dadd(105.541, 135.172, 28.159, 1.362)
pt3dadd(105.591, 135.26, 28.212, 1.356)
pt3dadd(105.638, 135.356, 28.258, 1.362)
pt3dadd(105.684, 135.452, 28.303, 1.366)
pt3dadd(105.731, 135.548, 28.349, 1.372)
pt3dadd(105.778, 135.644, 28.395, 1.378)
pt3dadd(105.825, 135.74, 28.44, 1.382)
pt3dadd(105.872, 135.835, 28.486, 1.386)
pt3dadd(105.919, 135.931, 28.532, 1.392)
pt3dadd(105.966, 136.027, 28.577, 1.398)
pt3dadd(106.013, 136.123, 28.623, 1.402)
pt3dadd(106.062, 136.22, 28.665, 1.41)
pt3dadd(106.119, 136.319, 28.697, 1.426)
pt3dadd(106.177, 136.417, 28.728, 1.44)
pt3dadd(106.234, 136.516, 28.759, 1.456)
pt3dadd(106.291, 136.614, 28.79, 1.472)
pt3dadd(106.349, 136.712, 28.822, 1.488)
pt3dadd(106.406, 136.811, 28.853, 1.504)
pt3dadd(106.463, 136.909, 28.884, 1.52)
pt3dadd(106.521, 137.008, 28.915, 1.536)
pt3dadd(106.578, 137.106, 28.947, 1.552)
pt3dadd(106.631, 137.206, 28.981, 1.554)
pt3dadd(106.67, 137.306, 29.025, 1.514)
pt3dadd(106.709, 137.406, 29.069, 1.472)
pt3dadd(106.748, 137.507, 29.113, 1.432)
pt3dadd(106.787, 137.606, 29.158, 1.392)
pt3dadd(106.826, 137.707, 29.202, 1.35)
pt3dadd(106.865, 137.808, 29.246, 1.31)
pt3dadd(106.904, 137.908, 29.29, 1.268)
pt3dadd(106.943, 138.008, 29.334, 1.228)
pt3dadd(106.982, 138.109, 29.378, 1.186)
pt3dadd(107.022, 138.21, 29.421, 1.154)
pt3dadd(107.067, 138.311, 29.458, 1.144)
pt3dadd(107.111, 138.413, 29.496, 1.134)
pt3dadd(107.155, 138.515, 29.534, 1.124)
pt3dadd(107.2, 138.617, 29.572, 1.116)
pt3dadd(107.244, 138.719, 29.609, 1.106)
pt3dadd(107.288, 138.821, 29.647, 1.096)
pt3dadd(107.333, 138.923, 29.685, 1.086)
pt3dadd(107.377, 139.025, 29.722, 1.076)
pt3dadd(107.421, 139.127, 29.76, 1.068)
pt3dadd(107.468, 139.229, 29.795, 1.068)
pt3dadd(107.518, 139.333, 29.823, 1.092)
pt3dadd(107.568, 139.436, 29.851, 1.116)
pt3dadd(107.618, 139.541, 29.879, 1.14)
pt3dadd(107.668, 139.644, 29.907, 1.166)
pt3dadd(107.718, 139.748, 29.935, 1.19)
pt3dadd(107.768, 139.852, 29.963, 1.214)
pt3dadd(107.818, 139.956, 29.991, 1.238)
pt3dadd(107.868, 140.059, 30.019, 1.262)
pt3dadd(107.919, 140.162, 30.047, 1.286)
pt3dadd(107.961, 140.269, 30.073, 1.284)
pt3dadd(107.989, 140.383, 30.098, 1.23)
pt3dadd(108.017, 140.496, 30.122, 1.176)
pt3dadd(108.045, 140.609, 30.146, 1.12)
pt3dadd(108.073, 140.722, 30.171, 1.066)
pt3dadd(108.101, 140.834, 30.195, 1.012)
pt3dadd(108.129, 140.947, 30.219, 0.958)
pt3dadd(108.157, 141.06, 30.244, 0.904)
pt3dadd(108.185, 141.174, 30.268, 0.85)
pt3dadd(108.213, 141.287, 30.292, 0.796)
pt3dadd(108.237, 141.398, 30.322, 0.746)
pt3dadd(108.251, 141.508, 30.362, 0.708)
pt3dadd(108.266, 141.616, 30.402, 0.67)
pt3dadd(108.28, 141.725, 30.442, 0.634)
pt3dadd(108.295, 141.834, 30.482, 0.596)
pt3dadd(108.309, 141.943, 30.522, 0.558)
pt3dadd(108.324, 142.052, 30.563, 0.52)
pt3dadd(108.339, 142.16, 30.603, 0.482)
pt3dadd(108.353, 142.27, 30.643, 0.446)
pt3dadd(108.368, 142.379, 30.683, 0.408)
pt3dadd(108.379, 142.488, 30.722, 0.396)
pt3dadd(108.385, 142.598, 30.761, 0.43)
pt3dadd(108.391, 142.71, 30.799, 0.462)
pt3dadd(108.397, 142.82, 30.838, 0.496)
pt3dadd(108.403, 142.931, 30.877, 0.53)
pt3dadd(108.408, 143.041, 30.915, 0.562)
pt3dadd(108.414, 143.152, 30.954, 0.596)
pt3dadd(108.42, 143.262, 30.992, 0.63)
pt3dadd(108.426, 143.372, 31.031, 0.662)
}
}
proc shape3d_171() {
dend_7[19] { pt3dadd(108.432, 143.484, 31.069, 0.696)
pt3dadd(108.436, 143.594, 31.108, 0.74)
pt3dadd(108.436, 143.705, 31.146, 0.798)
pt3dadd(108.437, 143.815, 31.185, 0.858)
pt3dadd(108.437, 143.927, 31.223, 0.916)
pt3dadd(108.438, 144.037, 31.262, 0.976)
pt3dadd(108.438, 144.148, 31.3, 1.034)
pt3dadd(108.439, 144.258, 31.339, 1.094)
pt3dadd(108.439, 144.37, 31.377, 1.154)
pt3dadd(108.44, 144.48, 31.416, 1.212)
pt3dadd(108.44, 144.59, 31.455, 1.272)
pt3dadd(108.441, 144.7, 31.497, 1.3)
pt3dadd(108.442, 144.805, 31.544, 1.282)
pt3dadd(108.442, 144.911, 31.591, 1.266)
pt3dadd(108.443, 145.018, 31.638, 1.248)
pt3dadd(108.444, 145.123, 31.685, 1.232)
pt3dadd(108.445, 145.229, 31.732, 1.214)
pt3dadd(108.446, 145.334, 31.779, 1.198)
pt3dadd(108.447, 145.441, 31.826, 1.18)
pt3dadd(108.447, 145.547, 31.873, 1.164)
pt3dadd(108.448, 145.652, 31.92, 1.146)
pt3dadd(108.45, 145.762, 31.959, 1.128)
pt3dadd(108.452, 145.877, 31.988, 1.11)
pt3dadd(108.454, 145.992, 32.016, 1.092)
pt3dadd(108.456, 146.107, 32.045, 1.072)
pt3dadd(108.458, 146.222, 32.073, 1.054)
pt3dadd(108.46, 146.338, 32.102, 1.036)
pt3dadd(108.462, 146.453, 32.13, 1.016)
pt3dadd(108.464, 146.567, 32.159, 0.998)
pt3dadd(108.466, 146.682, 32.187, 0.98)
pt3dadd(108.468, 146.797, 32.215, 0.962)
pt3dadd(108.471, 146.914, 32.241, 0.954)
pt3dadd(108.474, 147.03, 32.264, 0.964)
pt3dadd(108.478, 147.148, 32.286, 0.974)
pt3dadd(108.482, 147.264, 32.308, 0.984)
pt3dadd(108.485, 147.38, 32.33, 0.994)
pt3dadd(108.489, 147.498, 32.353, 1.004)
pt3dadd(108.492, 147.614, 32.375, 1.014)
pt3dadd(108.496, 147.732, 32.397, 1.024)
pt3dadd(108.5, 147.848, 32.419, 1.034)
pt3dadd(108.503, 147.966, 32.442, 1.042)
pt3dadd(108.509, 148.082, 32.462, 1.052)
pt3dadd(108.516, 148.2, 32.481, 1.06)
pt3dadd(108.524, 148.319, 32.499, 1.068)
pt3dadd(108.532, 148.436, 32.517, 1.076)
pt3dadd(108.54, 148.554, 32.536, 1.084)
pt3dadd(108.548, 148.672, 32.554, 1.092)
pt3dadd(108.556, 148.789, 32.573, 1.1)
pt3dadd(108.564, 148.907, 32.591, 1.108)
pt3dadd(108.572, 149.024, 32.609, 1.118)
pt3dadd(108.58, 149.142, 32.628, 1.126)
pt3dadd(108.59, 149.257, 32.652, 1.134)
pt3dadd(108.604, 149.371, 32.683, 1.142)
pt3dadd(108.618, 149.484, 32.714, 1.15)
pt3dadd(108.631, 149.597, 32.746, 1.158)
pt3dadd(108.645, 149.711, 32.777, 1.166)
pt3dadd(108.658, 149.824, 32.808, 1.174)
pt3dadd(108.672, 149.936, 32.84, 1.182)
pt3dadd(108.686, 150.049, 32.871, 1.19)
pt3dadd(108.699, 150.163, 32.903, 1.198)
pt3dadd(108.713, 150.276, 32.934, 1.208)
pt3dadd(108.733, 150.383, 32.975, 1.212)
pt3dadd(108.759, 150.485, 33.024, 1.214)
pt3dadd(108.784, 150.586, 33.072, 1.218)
pt3dadd(108.81, 150.688, 33.121, 1.22)
pt3dadd(108.835, 150.79, 33.169, 1.222)
pt3dadd(108.861, 150.892, 33.218, 1.224)
pt3dadd(108.886, 150.994, 33.266, 1.228)
pt3dadd(108.912, 151.096, 33.315, 1.23)
pt3dadd(108.937, 151.196, 33.363, 1.232)
pt3dadd(108.963, 151.298, 33.412, 1.234)
pt3dadd(109.008, 151.394, 33.457, 1.198)
pt3dadd(109.064, 151.487, 33.502, 1.142)
pt3dadd(109.119, 151.578, 33.546, 1.086)
pt3dadd(109.175, 151.67, 33.59, 1.03)
pt3dadd(109.23, 151.763, 33.634, 0.976)
pt3dadd(109.286, 151.855, 33.679, 0.92)
pt3dadd(109.341, 151.948, 33.723, 0.864)
pt3dadd(109.396, 152.04, 33.767, 0.808)
pt3dadd(109.452, 152.131, 33.811, 0.752)
pt3dadd(109.507, 152.224, 33.856, 0.696)
pt3dadd(109.56, 152.294, 33.921, 0.694)
pt3dadd(109.61, 152.353, 33.997, 0.716)
pt3dadd(109.661, 152.413, 34.073, 0.736)
pt3dadd(109.711, 152.472, 34.149, 0.758)
pt3dadd(109.762, 152.532, 34.225, 0.78)
pt3dadd(109.813, 152.592, 34.301, 0.802)
pt3dadd(109.863, 152.651, 34.377, 0.824)
pt3dadd(109.914, 152.711, 34.453, 0.846)
pt3dadd(109.965, 152.77, 34.528, 0.866)
pt3dadd(110.015, 152.83, 34.604, 0.888)
pt3dadd(110.077, 152.872, 34.682, 0.896)
pt3dadd(110.143, 152.904, 34.761, 0.896)
pt3dadd(110.209, 152.938, 34.839, 0.898)
pt3dadd(110.276, 152.97, 34.918, 0.898)
pt3dadd(110.342, 153.004, 34.997, 0.9)
pt3dadd(110.409, 153.036, 35.075, 0.9)
pt3dadd(110.475, 153.07, 35.154, 0.902)
pt3dadd(110.542, 153.102, 35.232, 0.902)
pt3dadd(110.608, 153.136, 35.311, 0.902)
pt3dadd(110.674, 153.168, 35.39, 0.904)
pt3dadd(110.73, 153.223, 35.465, 0.946)
pt3dadd(110.78, 153.288, 35.538, 1.01)
pt3dadd(110.83, 153.352, 35.611, 1.072)
pt3dadd(110.881, 153.416, 35.684, 1.134)
pt3dadd(110.931, 153.481, 35.757, 1.198)
pt3dadd(110.981, 153.546, 35.83, 1.26)
pt3dadd(111.031, 153.61, 35.904, 1.322)
pt3dadd(111.082, 153.674, 35.977, 1.384)
pt3dadd(111.132, 153.739, 36.05, 1.448)
pt3dadd(111.182, 153.803, 36.123, 1.51)
pt3dadd(111.218, 153.863, 36.204, 1.51)
pt3dadd(111.25, 153.922, 36.288, 1.494)
pt3dadd(111.282, 153.98, 36.371, 1.476)
pt3dadd(111.314, 154.038, 36.454, 1.46)
pt3dadd(111.346, 154.097, 36.537, 1.444)
pt3dadd(111.377, 154.156, 36.62, 1.426)
pt3dadd(111.409, 154.213, 36.704, 1.41)
pt3dadd(111.441, 154.272, 36.787, 1.392)
pt3dadd(111.473, 154.331, 36.87, 1.376)
pt3dadd(111.505, 154.388, 36.953, 1.36)
pt3dadd(111.548, 154.441, 37.036, 1.356)
pt3dadd(111.593, 154.493, 37.118, 1.354)
pt3dadd(111.638, 154.543, 37.2, 1.354)
pt3dadd(111.684, 154.595, 37.282, 1.354)
pt3dadd(111.729, 154.646, 37.364, 1.354)
pt3dadd(111.774, 154.697, 37.446, 1.352)
pt3dadd(111.82, 154.748, 37.529, 1.352)
pt3dadd(111.865, 154.8, 37.611, 1.352)
pt3dadd(111.911, 154.85, 37.693, 1.352)
pt3dadd(111.956, 154.902, 37.775, 1.35)
pt3dadd(111.974, 154.992, 37.836, 1.334)
pt3dadd(111.986, 155.09, 37.893, 1.312)
pt3dadd(111.998, 155.189, 37.949, 1.292)
pt3dadd(112.01, 155.287, 38.006, 1.272)
pt3dadd(112.022, 155.386, 38.063, 1.25)
pt3dadd(112.034, 155.483, 38.119, 1.23)
pt3dadd(112.046, 155.581, 38.176, 1.21)
pt3dadd(112.058, 155.68, 38.232, 1.19)
pt3dadd(112.07, 155.778, 38.289, 1.168)
pt3dadd(112.082, 155.876, 38.346, 1.148)
pt3dadd(112.044, 155.982, 38.378, 1.166)
pt3dadd(112.005, 156.089, 38.41, 1.186)
pt3dadd(111.965, 156.196, 38.442, 1.206)
pt3dadd(111.925, 156.302, 38.473, 1.224)
pt3dadd(111.885, 156.409, 38.505, 1.244)
pt3dadd(111.846, 156.515, 38.537, 1.264)
pt3dadd(111.806, 156.622, 38.569, 1.284)
pt3dadd(111.766, 156.728, 38.6, 1.302)
pt3dadd(111.726, 156.835, 38.632, 1.322)
pt3dadd(111.687, 156.942, 38.664, 1.342)
pt3dadd(111.651, 157.043, 38.709, 1.33)
pt3dadd(111.616, 157.144, 38.755, 1.316)
pt3dadd(111.581, 157.244, 38.801, 1.302)
pt3dadd(111.546, 157.345, 38.847, 1.286)
pt3dadd(111.511, 157.446, 38.892, 1.272)
pt3dadd(111.475, 157.547, 38.938, 1.258)
pt3dadd(111.44, 157.646, 38.984, 1.244)
pt3dadd(111.405, 157.747, 39.03, 1.23)
pt3dadd(111.37, 157.848, 39.076, 1.216)
pt3dadd(111.335, 157.949, 39.122, 1.202)
pt3dadd(111.304, 158.046, 39.175, 1.168)
pt3dadd(111.274, 158.142, 39.23, 1.134)
pt3dadd(111.244, 158.238, 39.284, 1.1)
pt3dadd(111.214, 158.334, 39.338, 1.066)
pt3dadd(111.183, 158.43, 39.392, 1.032)
pt3dadd(111.153, 158.526, 39.447, 0.998)
pt3dadd(111.123, 158.623, 39.501, 0.962)
pt3dadd(111.093, 158.719, 39.555, 0.928)
pt3dadd(111.063, 158.815, 39.609, 0.894)
pt3dadd(111.032, 158.911, 39.663, 0.86)
pt3dadd(111.002, 159.005, 39.721, 0.826)
pt3dadd(110.971, 159.098, 39.778, 0.794)
pt3dadd(110.94, 159.192, 39.835, 0.76)
pt3dadd(110.91, 159.286, 39.893, 0.726)
pt3dadd(110.879, 159.378, 39.95, 0.694)
pt3dadd(110.849, 159.472, 40.007, 0.66)
pt3dadd(110.818, 159.565, 40.064, 0.628)
pt3dadd(110.787, 159.659, 40.122, 0.594)
pt3dadd(110.757, 159.752, 40.179, 0.56)
pt3dadd(110.725, 159.846, 40.236, 0.532)
pt3dadd(110.672, 159.941, 40.278, 0.584)
pt3dadd(110.618, 160.036, 40.32, 0.636)
pt3dadd(110.565, 160.13, 40.363, 0.688)
pt3dadd(110.512, 160.225, 40.405, 0.738)
pt3dadd(110.459, 160.32, 40.447, 0.79)
pt3dadd(110.405, 160.415, 40.49, 0.842)
pt3dadd(110.352, 160.51, 40.532, 0.894)
pt3dadd(110.299, 160.604, 40.574, 0.946)
pt3dadd(110.246, 160.699, 40.617, 0.998)
pt3dadd(110.192, 160.793, 40.66, 1.046)
pt3dadd(110.136, 160.877, 40.715, 1.018)
pt3dadd(110.081, 160.96, 40.77, 0.988)
pt3dadd(110.025, 161.042, 40.825, 0.96)
pt3dadd(109.969, 161.126, 40.88, 0.932)
pt3dadd(109.914, 161.209, 40.935, 0.904)
pt3dadd(109.858, 161.292, 40.99, 0.876)
pt3dadd(109.802, 161.376, 41.045, 0.848)
pt3dadd(109.747, 161.459, 41.1, 0.82)
pt3dadd(109.691, 161.543, 41.155, 0.79)
}
}
proc shape3d_172() {
dend_7[19] { pt3dadd(109.634, 161.626, 41.208, 0.764)
pt3dadd(109.562, 161.714, 41.239, 0.756)
pt3dadd(109.49, 161.803, 41.27, 0.746)
pt3dadd(109.418, 161.892, 41.3, 0.738)
pt3dadd(109.345, 161.981, 41.331, 0.728)
pt3dadd(109.273, 162.068, 41.361, 0.72)
pt3dadd(109.201, 162.157, 41.392, 0.712)
pt3dadd(109.129, 162.246, 41.423, 0.702)
pt3dadd(109.057, 162.335, 41.453, 0.694)
pt3dadd(108.984, 162.424, 41.484, 0.686)
pt3dadd(108.914, 162.514, 41.511, 0.678)
pt3dadd(108.85, 162.614, 41.525, 0.678)
pt3dadd(108.787, 162.714, 41.539, 0.678)
pt3dadd(108.723, 162.815, 41.554, 0.678)
pt3dadd(108.659, 162.916, 41.568, 0.678)
pt3dadd(108.596, 163.015, 41.582, 0.678)
pt3dadd(108.532, 163.116, 41.596, 0.678)
pt3dadd(108.468, 163.216, 41.61, 0.678)
pt3dadd(108.405, 163.316, 41.624, 0.678)
pt3dadd(108.341, 163.416, 41.639, 0.678)
pt3dadd(108.277, 163.517, 41.649, 0.68)
pt3dadd(108.214, 163.619, 41.651, 0.688)
pt3dadd(108.15, 163.721, 41.653, 0.696)
pt3dadd(108.086, 163.823, 41.654, 0.704)
pt3dadd(108.022, 163.924, 41.656, 0.712)
pt3dadd(107.959, 164.026, 41.657, 0.72)
pt3dadd(107.895, 164.128, 41.659, 0.73)
pt3dadd(107.831, 164.228, 41.661, 0.738)
pt3dadd(107.768, 164.33, 41.662, 0.746)
pt3dadd(107.704, 164.432, 41.664, 0.754)
pt3dadd(107.638, 164.532, 41.663, 0.764)
pt3dadd(107.566, 164.628, 41.657, 0.782)
pt3dadd(107.494, 164.724, 41.65, 0.798)
pt3dadd(107.422, 164.82, 41.644, 0.814)
pt3dadd(107.351, 164.916, 41.638, 0.832)
pt3dadd(107.279, 165.011, 41.631, 0.848)
pt3dadd(107.207, 165.107, 41.625, 0.864)
pt3dadd(107.135, 165.203, 41.619, 0.882)
pt3dadd(107.063, 165.299, 41.612, 0.898)
pt3dadd(106.991, 165.395, 41.606, 0.914)
pt3dadd(106.917, 165.488, 41.599, 0.93)
pt3dadd(106.839, 165.578, 41.59, 0.948)
pt3dadd(106.76, 165.668, 41.58, 0.964)
pt3dadd(106.682, 165.758, 41.571, 0.98)
pt3dadd(106.603, 165.848, 41.561, 0.996)
pt3dadd(106.524, 165.938, 41.552, 1.012)
pt3dadd(106.446, 166.028, 41.543, 1.03)
pt3dadd(106.367, 166.118, 41.533, 1.046)
pt3dadd(106.289, 166.208, 41.524, 1.062)
pt3dadd(106.21, 166.298, 41.515, 1.078)
pt3dadd(106.132, 166.386, 41.497, 1.076)
pt3dadd(106.053, 166.466, 41.463, 1.032)
pt3dadd(105.975, 166.548, 41.428, 0.986)
pt3dadd(105.897, 166.628, 41.393, 0.942)
pt3dadd(105.819, 166.71, 41.359, 0.898)
pt3dadd(105.741, 166.79, 41.324, 0.854)
pt3dadd(105.663, 166.872, 41.29, 0.81)
pt3dadd(105.585, 166.954, 41.255, 0.766)
pt3dadd(105.507, 167.034, 41.22, 0.722)
pt3dadd(105.428, 167.116, 41.186, 0.678)
pt3dadd(105.349, 167.196, 41.154, 0.65)
pt3dadd(105.267, 167.278, 41.127, 0.642)
pt3dadd(105.186, 167.36, 41.099, 0.634)
pt3dadd(105.105, 167.442, 41.071, 0.626)
pt3dadd(105.023, 167.524, 41.044, 0.62)
pt3dadd(104.942, 167.605, 41.016, 0.612)
pt3dadd(104.86, 167.687, 40.989, 0.604)
pt3dadd(104.779, 167.768, 40.961, 0.596)
pt3dadd(104.697, 167.85, 40.933, 0.588)
pt3dadd(104.616, 167.932, 40.906, 0.582)
pt3dadd(104.533, 168.014, 40.886, 0.576)
pt3dadd(104.449, 168.1, 40.873, 0.57)
pt3dadd(104.366, 168.184, 40.86, 0.564)
pt3dadd(104.282, 168.268, 40.848, 0.56)
pt3dadd(104.198, 168.353, 40.835, 0.554)
pt3dadd(104.114, 168.437, 40.822, 0.55)
pt3dadd(104.03, 168.522, 40.81, 0.544)
pt3dadd(103.946, 168.606, 40.797, 0.54)
pt3dadd(103.862, 168.69, 40.784, 0.534)
pt3dadd(103.778, 168.775, 40.772, 0.53)
pt3dadd(103.694, 168.859, 40.765, 0.51)
pt3dadd(103.61, 168.944, 40.763, 0.48)
pt3dadd(103.525, 169.03, 40.761, 0.45)
pt3dadd(103.441, 169.115, 40.76, 0.42)
pt3dadd(103.356, 169.2, 40.758, 0.39)
pt3dadd(103.272, 169.285, 40.756, 0.36)
pt3dadd(103.187, 169.37, 40.755, 0.33)
pt3dadd(103.103, 169.456, 40.753, 0.3)
pt3dadd(103.018, 169.541, 40.751, 0.27)
pt3dadd(102.934, 169.626, 40.75, 0.24)
pt3dadd(102.85, 169.711, 40.755, 0.226)
pt3dadd(102.766, 169.796, 40.765, 0.226)
pt3dadd(102.682, 169.882, 40.776, 0.226)
pt3dadd(102.599, 169.967, 40.786, 0.226)
pt3dadd(102.515, 170.052, 40.796, 0.226)
pt3dadd(102.431, 170.137, 40.807, 0.226)
pt3dadd(102.348, 170.222, 40.817, 0.226)
pt3dadd(102.264, 170.306, 40.828, 0.226)
pt3dadd(102.18, 170.392, 40.838, 0.226)
pt3dadd(102.096, 170.477, 40.849, 0.226)
pt3dadd(102.015, 170.56, 40.872, 0.234)
pt3dadd(101.937, 170.641, 40.905, 0.246)
pt3dadd(101.858, 170.723, 40.938, 0.26)
pt3dadd(101.78, 170.804, 40.972, 0.272)
pt3dadd(101.701, 170.886, 41.006, 0.286)
pt3dadd(101.623, 170.966, 41.039, 0.3)
pt3dadd(101.544, 171.048, 41.073, 0.312)
pt3dadd(101.466, 171.13, 41.106, 0.326)
pt3dadd(101.387, 171.211, 41.139, 0.34)
pt3dadd(101.309, 171.293, 41.173, 0.352)
pt3dadd(101.232, 171.374, 41.209, 0.356)
pt3dadd(101.157, 171.456, 41.247, 0.356)
pt3dadd(101.081, 171.538, 41.284, 0.356)
pt3dadd(101.005, 171.619, 41.321, 0.356)
pt3dadd(100.93, 171.701, 41.359, 0.356)
pt3dadd(100.854, 171.782, 41.396, 0.356)
pt3dadd(100.779, 171.864, 41.434, 0.356)
pt3dadd(100.703, 171.946, 41.471, 0.356)
pt3dadd(100.628, 172.027, 41.509, 0.356)
pt3dadd(100.552, 172.109, 41.546, 0.356)
pt3dadd(100.475, 172.194, 41.576, 0.356)
pt3dadd(100.398, 172.28, 41.602, 0.356)
pt3dadd(100.321, 172.367, 41.629, 0.358)
pt3dadd(100.244, 172.452, 41.656, 0.358)
pt3dadd(100.167, 172.538, 41.682, 0.36)
pt3dadd(100.09, 172.625, 41.709, 0.36)
pt3dadd(100.013, 172.711, 41.736, 0.36)
pt3dadd(99.935, 172.798, 41.762, 0.362)
pt3dadd(99.858, 172.883, 41.789, 0.362)
pt3dadd(99.781, 172.969, 41.816, 0.364)
pt3dadd(99.704, 173.058, 41.836, 0.4)
pt3dadd(99.627, 173.147, 41.855, 0.448)
pt3dadd(99.549, 173.236, 41.874, 0.496)
pt3dadd(99.472, 173.324, 41.893, 0.544)
pt3dadd(99.395, 173.413, 41.912, 0.594)
pt3dadd(99.317, 173.502, 41.931, 0.642)
pt3dadd(99.24, 173.592, 41.95, 0.69)
pt3dadd(99.163, 173.681, 41.969, 0.738)
pt3dadd(99.085, 173.77, 41.987, 0.786)
pt3dadd(99.008, 173.858, 42.006, 0.834)
pt3dadd(98.943, 173.953, 42.034, 0.85)
pt3dadd(98.883, 174.049, 42.065, 0.856)
pt3dadd(98.822, 174.146, 42.096, 0.862)
pt3dadd(98.761, 174.244, 42.127, 0.868)
pt3dadd(98.7, 174.34, 42.157, 0.874)
pt3dadd(98.64, 174.437, 42.188, 0.88)
pt3dadd(98.579, 174.533, 42.219, 0.886)
pt3dadd(98.518, 174.63, 42.25, 0.892)
pt3dadd(98.457, 174.726, 42.28, 0.896)
pt3dadd(98.397, 174.823, 42.311, 0.902)
pt3dadd(98.334, 174.919, 42.339, 0.888)
pt3dadd(98.27, 175.016, 42.365, 0.868)
pt3dadd(98.206, 175.112, 42.392, 0.848)
pt3dadd(98.142, 175.208, 42.418, 0.828)
pt3dadd(98.078, 175.306, 42.445, 0.808)
pt3dadd(98.014, 175.402, 42.471, 0.788)
pt3dadd(97.95, 175.499, 42.498, 0.768)
pt3dadd(97.886, 175.595, 42.524, 0.748)
pt3dadd(97.822, 175.691, 42.551, 0.728)
pt3dadd(97.758, 175.788, 42.577, 0.706)
pt3dadd(97.689, 175.883, 42.598, 0.666)
pt3dadd(97.618, 175.976, 42.617, 0.62)
pt3dadd(97.547, 176.071, 42.636, 0.574)
pt3dadd(97.477, 176.165, 42.655, 0.528)
pt3dadd(97.406, 176.26, 42.673, 0.482)
pt3dadd(97.335, 176.353, 42.692, 0.436)
pt3dadd(97.264, 176.448, 42.711, 0.392)
pt3dadd(97.194, 176.542, 42.73, 0.346)
pt3dadd(97.123, 176.636, 42.749, 0.3)
pt3dadd(97.052, 176.73, 42.768, 0.254)
pt3dadd(96.975, 176.821, 42.777, 0.278)
pt3dadd(96.896, 176.911, 42.785, 0.318)
pt3dadd(96.816, 177.001, 42.792, 0.358)
pt3dadd(96.737, 177.09, 42.8, 0.4)
pt3dadd(96.658, 177.18, 42.807, 0.44)
pt3dadd(96.579, 177.27, 42.815, 0.48)
pt3dadd(96.5, 177.36, 42.822, 0.52)
pt3dadd(96.421, 177.45, 42.829, 0.56)
pt3dadd(96.342, 177.54, 42.837, 0.6)
pt3dadd(96.263, 177.629, 42.844, 0.642)
pt3dadd(96.181, 177.718, 42.848, 0.654)
pt3dadd(96.1, 177.805, 42.851, 0.662)
pt3dadd(96.018, 177.893, 42.853, 0.67)
pt3dadd(95.936, 177.98, 42.856, 0.678)
pt3dadd(95.854, 178.068, 42.859, 0.684)
pt3dadd(95.773, 178.157, 42.862, 0.692)
pt3dadd(95.691, 178.244, 42.864, 0.7)
pt3dadd(95.609, 178.332, 42.867, 0.708)
pt3dadd(95.527, 178.42, 42.87, 0.714)
pt3dadd(95.446, 178.507, 42.873, 0.722)
pt3dadd(95.361, 178.592, 42.87, 0.688)
pt3dadd(95.277, 178.678, 42.868, 0.644)
pt3dadd(95.192, 178.763, 42.864, 0.602)
pt3dadd(95.107, 178.847, 42.861, 0.558)
pt3dadd(95.022, 178.932, 42.858, 0.516)
pt3dadd(94.937, 179.017, 42.855, 0.472)
pt3dadd(94.852, 179.101, 42.853, 0.43)
pt3dadd(94.768, 179.186, 42.849, 0.386)
pt3dadd(94.683, 179.272, 42.847, 0.344)
pt3dadd(94.598, 179.356, 42.843, 0.3)
}
}
proc shape3d_173() {
dend_7[19] { pt3dadd(94.513, 179.441, 42.837, 0.288)
pt3dadd(94.429, 179.525, 42.829, 0.282)
pt3dadd(94.344, 179.61, 42.821, 0.274)
pt3dadd(94.26, 179.694, 42.814, 0.268)
pt3dadd(94.175, 179.779, 42.806, 0.262)
pt3dadd(94.09, 179.863, 42.799, 0.254)
pt3dadd(94.006, 179.948, 42.791, 0.248)
pt3dadd(93.921, 180.032, 42.783, 0.24)
pt3dadd(93.837, 180.118, 42.776, 0.234)
pt3dadd(93.752, 180.202, 42.768, 0.228)
pt3dadd(93.667, 180.287, 42.758, 0.236)
pt3dadd(93.583, 180.371, 42.748, 0.25)
pt3dadd(93.499, 180.455, 42.737, 0.262)
pt3dadd(93.414, 180.54, 42.727, 0.274)
pt3dadd(93.33, 180.624, 42.717, 0.288)
pt3dadd(93.245, 180.708, 42.706, 0.3)
pt3dadd(93.161, 180.793, 42.696, 0.314)
pt3dadd(93.077, 180.877, 42.686, 0.326)
pt3dadd(92.992, 180.961, 42.675, 0.338)
pt3dadd(92.908, 181.046, 42.665, 0.352)
pt3dadd(92.824, 181.129, 42.648, 0.382)
pt3dadd(92.741, 181.213, 42.629, 0.414)
pt3dadd(92.658, 181.296, 42.611, 0.448)
pt3dadd(92.574, 181.38, 42.592, 0.48)
pt3dadd(92.491, 181.463, 42.574, 0.514)
pt3dadd(92.407, 181.547, 42.555, 0.546)
pt3dadd(92.324, 181.63, 42.537, 0.58)
pt3dadd(92.241, 181.714, 42.519, 0.612)
pt3dadd(92.157, 181.796, 42.5, 0.646)
pt3dadd(92.074, 181.88, 42.481, 0.678)
pt3dadd(92.016, 181.938, 42.409, 0.678)
pt3dadd(91.957, 181.997, 42.336, 0.678)
pt3dadd(91.899, 182.054, 42.263, 0.678)
pt3dadd(91.841, 182.113, 42.191, 0.678)
pt3dadd(91.783, 182.171, 42.118, 0.678)
pt3dadd(91.724, 182.23, 42.045, 0.678)
pt3dadd(91.666, 182.287, 41.972, 0.678)
pt3dadd(91.608, 182.346, 41.9, 0.678)
pt3dadd(91.55, 182.404, 41.827, 0.678)
pt3dadd(91.492, 182.462, 41.754, 0.678)
}
dend_7[20] {pt3dclear()
pt3dadd(104.629, 133.882, 27.27, 1.582)
pt3dadd(104.606, 133.854, 27.274, 1.58)
pt3dadd(104.53, 133.763, 27.289, 1.57)
pt3dadd(104.455, 133.67, 27.304, 1.56)
pt3dadd(104.379, 133.579, 27.32, 1.552)
pt3dadd(104.304, 133.488, 27.335, 1.542)
pt3dadd(104.228, 133.397, 27.35, 1.532)
pt3dadd(104.152, 133.306, 27.365, 1.524)
pt3dadd(104.077, 133.214, 27.38, 1.514)
pt3dadd(104.001, 133.123, 27.396, 1.506)
pt3dadd(103.925, 133.031, 27.411, 1.496)
pt3dadd(103.85, 132.94, 27.426, 1.486)
pt3dadd(103.774, 132.848, 27.441, 1.478)
pt3dadd(103.698, 132.757, 27.456, 1.468)
pt3dadd(103.623, 132.666, 27.472, 1.458)
pt3dadd(103.547, 132.575, 27.487, 1.45)
pt3dadd(103.472, 132.484, 27.502, 1.44)
pt3dadd(103.396, 132.392, 27.517, 1.432)
pt3dadd(103.32, 132.3, 27.532, 1.422)
pt3dadd(103.245, 132.209, 27.548, 1.412)
pt3dadd(103.169, 132.118, 27.563, 1.404)
pt3dadd(103.093, 132.026, 27.578, 1.394)
pt3dadd(103.018, 131.935, 27.593, 1.384)
pt3dadd(102.942, 131.844, 27.608, 1.376)
pt3dadd(102.866, 131.753, 27.623, 1.366)
pt3dadd(102.788, 131.664, 27.641, 1.366)
pt3dadd(102.706, 131.581, 27.664, 1.38)
pt3dadd(102.624, 131.498, 27.687, 1.394)
pt3dadd(102.541, 131.416, 27.709, 1.408)
pt3dadd(102.459, 131.333, 27.732, 1.424)
pt3dadd(102.376, 131.25, 27.755, 1.438)
pt3dadd(102.294, 131.167, 27.778, 1.452)
pt3dadd(102.211, 131.084, 27.8, 1.468)
pt3dadd(102.129, 131.002, 27.823, 1.482)
pt3dadd(102.046, 130.919, 27.846, 1.496)
pt3dadd(101.966, 130.837, 27.875, 1.508)
pt3dadd(101.888, 130.76, 27.916, 1.516)
pt3dadd(101.811, 130.684, 27.957, 1.524)
pt3dadd(101.733, 130.607, 27.999, 1.532)
pt3dadd(101.655, 130.53, 28.04, 1.54)
pt3dadd(101.578, 130.452, 28.081, 1.548)
pt3dadd(101.5, 130.375, 28.122, 1.556)
pt3dadd(101.423, 130.298, 28.163, 1.562)
pt3dadd(101.345, 130.222, 28.205, 1.57)
pt3dadd(101.268, 130.144, 28.246, 1.578)
pt3dadd(101.19, 130.068, 28.289, 1.558)
pt3dadd(101.114, 129.992, 28.333, 1.514)
pt3dadd(101.037, 129.917, 28.377, 1.47)
pt3dadd(100.96, 129.841, 28.42, 1.426)
pt3dadd(100.883, 129.766, 28.464, 1.38)
pt3dadd(100.806, 129.69, 28.508, 1.336)
pt3dadd(100.73, 129.614, 28.552, 1.292)
pt3dadd(100.653, 129.539, 28.596, 1.248)
pt3dadd(100.576, 129.463, 28.64, 1.202)
pt3dadd(100.499, 129.388, 28.684, 1.158)
pt3dadd(100.42, 129.31, 28.721, 1.13)
pt3dadd(100.339, 129.229, 28.753, 1.108)
pt3dadd(100.259, 129.15, 28.786, 1.09)
pt3dadd(100.178, 129.07, 28.818, 1.07)
pt3dadd(100.097, 128.989, 28.85, 1.05)
pt3dadd(100.016, 128.91, 28.882, 1.03)
pt3dadd(99.936, 128.83, 28.915, 1.01)
pt3dadd(99.855, 128.75, 28.947, 0.99)
pt3dadd(99.774, 128.67, 28.979, 0.97)
pt3dadd(99.693, 128.59, 29.011, 0.95)
pt3dadd(99.612, 128.51, 29.042, 0.976)
pt3dadd(99.531, 128.429, 29.073, 1.032)
pt3dadd(99.45, 128.348, 29.103, 1.088)
pt3dadd(99.369, 128.268, 29.134, 1.144)
pt3dadd(99.288, 128.188, 29.164, 1.2)
pt3dadd(99.207, 128.107, 29.195, 1.254)
pt3dadd(99.126, 128.027, 29.225, 1.312)
pt3dadd(99.045, 127.946, 29.256, 1.368)
pt3dadd(98.963, 127.866, 29.286, 1.422)
pt3dadd(98.882, 127.786, 29.317, 1.478)
pt3dadd(98.801, 127.716, 29.361, 1.432)
pt3dadd(98.72, 127.652, 29.412, 1.324)
pt3dadd(98.64, 127.59, 29.464, 1.216)
pt3dadd(98.559, 127.526, 29.516, 1.108)
pt3dadd(98.478, 127.463, 29.568, 1.002)
pt3dadd(98.397, 127.4, 29.62, 0.894)
pt3dadd(98.316, 127.337, 29.672, 0.786)
pt3dadd(98.235, 127.274, 29.724, 0.678)
pt3dadd(98.154, 127.211, 29.775, 0.572)
pt3dadd(98.073, 127.147, 29.827, 0.464)
pt3dadd(98.017, 127.076, 29.89, 0.44)
pt3dadd(97.976, 127, 29.959, 0.466)
pt3dadd(97.934, 126.924, 30.028, 0.492)
pt3dadd(97.893, 126.847, 30.097, 0.518)
pt3dadd(97.851, 126.772, 30.167, 0.546)
pt3dadd(97.81, 126.696, 30.236, 0.572)
pt3dadd(97.768, 126.619, 30.305, 0.598)
pt3dadd(97.727, 126.544, 30.374, 0.624)
pt3dadd(97.685, 126.467, 30.443, 0.65)
pt3dadd(97.644, 126.391, 30.512, 0.676)
pt3dadd(97.628, 126.302, 30.577, 0.74)
pt3dadd(97.618, 126.211, 30.642, 0.816)
pt3dadd(97.608, 126.12, 30.706, 0.89)
pt3dadd(97.598, 126.029, 30.77, 0.964)
pt3dadd(97.588, 125.936, 30.834, 1.038)
pt3dadd(97.578, 125.845, 30.899, 1.114)
pt3dadd(97.568, 125.754, 30.963, 1.188)
pt3dadd(97.558, 125.663, 31.027, 1.262)
pt3dadd(97.549, 125.572, 31.091, 1.336)
pt3dadd(97.539, 125.479, 31.155, 1.412)
pt3dadd(97.573, 125.395, 31.22, 1.442)
pt3dadd(97.609, 125.31, 31.284, 1.472)
pt3dadd(97.645, 125.226, 31.349, 1.502)
pt3dadd(97.681, 125.142, 31.413, 1.53)
pt3dadd(97.717, 125.057, 31.477, 1.56)
pt3dadd(97.753, 124.973, 31.542, 1.59)
pt3dadd(97.789, 124.888, 31.606, 1.62)
pt3dadd(97.824, 124.804, 31.671, 1.65)
pt3dadd(97.86, 124.718, 31.735, 1.678)
pt3dadd(97.904, 124.637, 31.798, 1.698)
pt3dadd(97.961, 124.561, 31.859, 1.696)
pt3dadd(98.018, 124.486, 31.92, 1.694)
pt3dadd(98.076, 124.409, 31.98, 1.692)
pt3dadd(98.133, 124.333, 32.041, 1.69)
pt3dadd(98.19, 124.256, 32.102, 1.688)
pt3dadd(98.248, 124.181, 32.163, 1.686)
pt3dadd(98.305, 124.104, 32.223, 1.684)
pt3dadd(98.363, 124.028, 32.284, 1.682)
pt3dadd(98.42, 123.953, 32.345, 1.68)
pt3dadd(98.478, 123.876, 32.406, 1.684)
pt3dadd(98.537, 123.802, 32.466, 1.698)
pt3dadd(98.596, 123.726, 32.527, 1.71)
pt3dadd(98.654, 123.65, 32.587, 1.724)
pt3dadd(98.713, 123.575, 32.648, 1.736)
pt3dadd(98.772, 123.5, 32.708, 1.75)
pt3dadd(98.831, 123.425, 32.769, 1.762)
pt3dadd(98.889, 123.349, 32.829, 1.776)
pt3dadd(98.948, 123.274, 32.89, 1.788)
pt3dadd(99.007, 123.199, 32.95, 1.802)
pt3dadd(99.065, 123.13, 33.016, 1.808)
pt3dadd(99.122, 123.066, 33.086, 1.808)
pt3dadd(99.178, 123.002, 33.156, 1.808)
pt3dadd(99.235, 122.939, 33.227, 1.808)
pt3dadd(99.292, 122.874, 33.297, 1.808)
pt3dadd(99.349, 122.81, 33.367, 1.808)
pt3dadd(99.406, 122.747, 33.438, 1.808)
pt3dadd(99.462, 122.683, 33.508, 1.808)
pt3dadd(99.519, 122.62, 33.578, 1.808)
pt3dadd(99.576, 122.556, 33.648, 1.808)
pt3dadd(99.617, 122.482, 33.718, 1.808)
pt3dadd(99.649, 122.402, 33.788, 1.808)
pt3dadd(99.681, 122.322, 33.858, 1.808)
pt3dadd(99.713, 122.243, 33.928, 1.808)
pt3dadd(99.745, 122.164, 33.998, 1.808)
pt3dadd(99.777, 122.083, 34.067, 1.808)
pt3dadd(99.809, 122.004, 34.137, 1.808)
pt3dadd(99.841, 121.924, 34.207, 1.808)
pt3dadd(99.873, 121.844, 34.277, 1.808)
pt3dadd(99.905, 121.764, 34.347, 1.808)
pt3dadd(99.932, 121.673, 34.407, 1.808)
pt3dadd(99.957, 121.576, 34.461, 1.808)
pt3dadd(99.983, 121.478, 34.516, 1.808)
pt3dadd(100.008, 121.381, 34.57, 1.808)
pt3dadd(100.033, 121.284, 34.625, 1.808)
pt3dadd(100.058, 121.187, 34.68, 1.808)
}
}
proc shape3d_174() {
dend_7[20] { pt3dadd(100.083, 121.09, 34.734, 1.808)
pt3dadd(100.109, 120.992, 34.789, 1.808)
pt3dadd(100.134, 120.895, 34.844, 1.808)
pt3dadd(100.159, 120.797, 34.898, 1.808)
pt3dadd(100.182, 120.71, 34.964, 1.778)
pt3dadd(100.203, 120.628, 35.034, 1.734)
pt3dadd(100.224, 120.546, 35.105, 1.69)
pt3dadd(100.245, 120.464, 35.176, 1.646)
pt3dadd(100.266, 120.382, 35.247, 1.6)
pt3dadd(100.287, 120.3, 35.318, 1.556)
pt3dadd(100.308, 120.218, 35.389, 1.512)
pt3dadd(100.329, 120.136, 35.459, 1.468)
pt3dadd(100.351, 120.054, 35.53, 1.422)
pt3dadd(100.372, 119.972, 35.601, 1.378)
pt3dadd(100.42, 119.886, 35.654, 1.376)
pt3dadd(100.481, 119.797, 35.698, 1.396)
pt3dadd(100.542, 119.708, 35.742, 1.416)
pt3dadd(100.603, 119.619, 35.785, 1.436)
pt3dadd(100.664, 119.53, 35.829, 1.456)
pt3dadd(100.725, 119.441, 35.873, 1.476)
pt3dadd(100.787, 119.353, 35.917, 1.496)
pt3dadd(100.848, 119.264, 35.961, 1.516)
pt3dadd(100.909, 119.175, 36.005, 1.534)
pt3dadd(100.97, 119.086, 36.048, 1.554)
pt3dadd(101.02, 118.997, 36.101, 1.506)
pt3dadd(101.065, 118.908, 36.156, 1.424)
pt3dadd(101.109, 118.819, 36.212, 1.344)
pt3dadd(101.154, 118.731, 36.268, 1.264)
pt3dadd(101.199, 118.642, 36.324, 1.182)
pt3dadd(101.243, 118.553, 36.38, 1.102)
pt3dadd(101.288, 118.464, 36.436, 1.022)
pt3dadd(101.332, 118.375, 36.492, 0.94)
pt3dadd(101.377, 118.286, 36.548, 0.86)
pt3dadd(101.422, 118.197, 36.604, 0.78)
pt3dadd(101.479, 118.112, 36.655, 0.764)
pt3dadd(101.541, 118.028, 36.704, 0.778)
pt3dadd(101.603, 117.944, 36.753, 0.79)
pt3dadd(101.666, 117.86, 36.802, 0.804)
pt3dadd(101.728, 117.775, 36.851, 0.816)
pt3dadd(101.79, 117.691, 36.9, 0.83)
pt3dadd(101.853, 117.607, 36.949, 0.844)
pt3dadd(101.915, 117.523, 36.998, 0.856)
pt3dadd(101.977, 117.439, 37.047, 0.87)
pt3dadd(102.04, 117.355, 37.096, 0.882)
pt3dadd(102.091, 117.268, 37.149, 0.944)
pt3dadd(102.14, 117.18, 37.203, 1.016)
pt3dadd(102.188, 117.091, 37.257, 1.09)
pt3dadd(102.237, 117.003, 37.312, 1.164)
pt3dadd(102.286, 116.915, 37.366, 1.238)
pt3dadd(102.334, 116.827, 37.42, 1.312)
pt3dadd(102.383, 116.738, 37.475, 1.384)
pt3dadd(102.431, 116.65, 37.529, 1.458)
pt3dadd(102.48, 116.562, 37.584, 1.532)
pt3dadd(102.529, 116.474, 37.638, 1.606)
pt3dadd(102.559, 116.375, 37.688, 1.634)
pt3dadd(102.589, 116.275, 37.739, 1.658)
pt3dadd(102.618, 116.176, 37.789, 1.684)
pt3dadd(102.648, 116.077, 37.839, 1.708)
pt3dadd(102.677, 115.977, 37.889, 1.734)
pt3dadd(102.706, 115.878, 37.94, 1.758)
pt3dadd(102.736, 115.778, 37.99, 1.784)
pt3dadd(102.765, 115.679, 38.04, 1.808)
pt3dadd(102.795, 115.579, 38.091, 1.834)
pt3dadd(102.824, 115.479, 38.14, 1.856)
pt3dadd(102.845, 115.372, 38.182, 1.81)
pt3dadd(102.866, 115.265, 38.223, 1.762)
pt3dadd(102.887, 115.157, 38.264, 1.714)
pt3dadd(102.908, 115.05, 38.305, 1.668)
pt3dadd(102.929, 114.942, 38.346, 1.62)
pt3dadd(102.95, 114.835, 38.387, 1.572)
pt3dadd(102.971, 114.728, 38.428, 1.526)
pt3dadd(102.992, 114.62, 38.469, 1.478)
pt3dadd(103.013, 114.513, 38.51, 1.432)
pt3dadd(103.034, 114.406, 38.551, 1.382)
pt3dadd(103.049, 114.301, 38.599, 1.316)
pt3dadd(103.064, 114.196, 38.646, 1.248)
pt3dadd(103.079, 114.092, 38.693, 1.182)
pt3dadd(103.093, 113.987, 38.741, 1.114)
pt3dadd(103.108, 113.883, 38.788, 1.048)
pt3dadd(103.123, 113.778, 38.835, 0.98)
pt3dadd(103.138, 113.673, 38.883, 0.912)
pt3dadd(103.153, 113.568, 38.93, 0.846)
pt3dadd(103.168, 113.464, 38.977, 0.778)
pt3dadd(103.184, 113.359, 39.024, 0.714)
pt3dadd(103.23, 113.254, 39.053, 0.694)
pt3dadd(103.277, 113.149, 39.082, 0.674)
pt3dadd(103.323, 113.044, 39.111, 0.654)
pt3dadd(103.369, 112.939, 39.141, 0.634)
pt3dadd(103.415, 112.834, 39.17, 0.616)
pt3dadd(103.461, 112.729, 39.199, 0.596)
pt3dadd(103.508, 112.624, 39.228, 0.576)
pt3dadd(103.554, 112.519, 39.257, 0.556)
pt3dadd(103.6, 112.414, 39.286, 0.536)
pt3dadd(103.646, 112.308, 39.315, 0.52)
pt3dadd(103.69, 112.2, 39.34, 0.546)
pt3dadd(103.733, 112.092, 39.364, 0.572)
pt3dadd(103.777, 111.984, 39.388, 0.596)
pt3dadd(103.82, 111.876, 39.412, 0.622)
pt3dadd(103.864, 111.768, 39.436, 0.648)
pt3dadd(103.908, 111.661, 39.46, 0.672)
pt3dadd(103.951, 111.553, 39.485, 0.698)
pt3dadd(103.995, 111.445, 39.509, 0.724)
pt3dadd(104.038, 111.337, 39.533, 0.748)
pt3dadd(104.082, 111.229, 39.557, 0.776)
pt3dadd(104.121, 111.12, 39.584, 0.812)
pt3dadd(104.161, 111.012, 39.611, 0.848)
pt3dadd(104.201, 110.903, 39.637, 0.882)
pt3dadd(104.241, 110.794, 39.664, 0.918)
pt3dadd(104.281, 110.686, 39.691, 0.954)
pt3dadd(104.321, 110.577, 39.717, 0.99)
pt3dadd(104.361, 110.469, 39.744, 1.026)
pt3dadd(104.4, 110.36, 39.771, 1.062)
pt3dadd(104.44, 110.252, 39.798, 1.098)
pt3dadd(104.48, 110.143, 39.825, 1.13)
pt3dadd(104.517, 110.038, 39.862, 1.13)
pt3dadd(104.555, 109.933, 39.899, 1.13)
pt3dadd(104.592, 109.828, 39.936, 1.13)
pt3dadd(104.629, 109.723, 39.973, 1.13)
pt3dadd(104.667, 109.618, 40.01, 1.13)
pt3dadd(104.704, 109.513, 40.047, 1.13)
pt3dadd(104.741, 109.408, 40.084, 1.13)
pt3dadd(104.779, 109.303, 40.121, 1.13)
pt3dadd(104.816, 109.198, 40.158, 1.13)
pt3dadd(104.856, 109.093, 40.193, 1.13)
pt3dadd(104.92, 108.996, 40.216, 1.13)
pt3dadd(104.984, 108.898, 40.24, 1.13)
pt3dadd(105.048, 108.801, 40.263, 1.13)
pt3dadd(105.112, 108.703, 40.286, 1.13)
pt3dadd(105.176, 108.605, 40.309, 1.13)
pt3dadd(105.24, 108.508, 40.333, 1.13)
pt3dadd(105.304, 108.41, 40.356, 1.13)
pt3dadd(105.368, 108.312, 40.379, 1.13)
pt3dadd(105.432, 108.215, 40.403, 1.13)
pt3dadd(105.497, 108.118, 40.425, 1.132)
pt3dadd(105.572, 108.027, 40.443, 1.14)
pt3dadd(105.647, 107.935, 40.461, 1.15)
pt3dadd(105.722, 107.844, 40.479, 1.158)
pt3dadd(105.797, 107.753, 40.497, 1.168)
pt3dadd(105.871, 107.662, 40.515, 1.176)
pt3dadd(105.946, 107.57, 40.533, 1.186)
pt3dadd(106.021, 107.479, 40.551, 1.194)
pt3dadd(106.096, 107.388, 40.569, 1.204)
pt3dadd(106.171, 107.297, 40.588, 1.212)
pt3dadd(106.247, 107.206, 40.605, 1.222)
pt3dadd(106.329, 107.12, 40.619, 1.232)
pt3dadd(106.411, 107.034, 40.633, 1.244)
pt3dadd(106.493, 106.949, 40.647, 1.254)
pt3dadd(106.575, 106.863, 40.661, 1.266)
pt3dadd(106.658, 106.777, 40.675, 1.276)
pt3dadd(106.74, 106.691, 40.689, 1.286)
pt3dadd(106.822, 106.605, 40.703, 1.298)
pt3dadd(106.904, 106.519, 40.717, 1.308)
pt3dadd(106.986, 106.433, 40.731, 1.318)
pt3dadd(107.069, 106.349, 40.744, 1.324)
pt3dadd(107.158, 106.268, 40.754, 1.294)
pt3dadd(107.246, 106.188, 40.763, 1.264)
pt3dadd(107.335, 106.108, 40.773, 1.234)
pt3dadd(107.423, 106.028, 40.782, 1.206)
pt3dadd(107.512, 105.947, 40.792, 1.176)
pt3dadd(107.6, 105.867, 40.801, 1.146)
pt3dadd(107.689, 105.787, 40.811, 1.118)
pt3dadd(107.777, 105.707, 40.82, 1.088)
pt3dadd(107.866, 105.627, 40.83, 1.058)
pt3dadd(107.955, 105.548, 40.842, 1.032)
pt3dadd(108.048, 105.478, 40.867, 1.018)
pt3dadd(108.141, 105.409, 40.892, 1.006)
pt3dadd(108.234, 105.339, 40.917, 0.992)
pt3dadd(108.327, 105.27, 40.942, 0.978)
pt3dadd(108.421, 105.2, 40.966, 0.966)
pt3dadd(108.514, 105.131, 40.991, 0.952)
pt3dadd(108.607, 105.061, 41.016, 0.94)
pt3dadd(108.7, 104.992, 41.041, 0.926)
pt3dadd(108.793, 104.922, 41.066, 0.914)
pt3dadd(108.887, 104.855, 41.093, 0.904)
pt3dadd(108.98, 104.792, 41.127, 0.904)
pt3dadd(109.074, 104.729, 41.162, 0.904)
pt3dadd(109.168, 104.667, 41.196, 0.904)
pt3dadd(109.262, 104.604, 41.23, 0.904)
pt3dadd(109.356, 104.541, 41.264, 0.904)
pt3dadd(109.449, 104.479, 41.298, 0.904)
pt3dadd(109.543, 104.416, 41.332, 0.904)
pt3dadd(109.637, 104.353, 41.366, 0.904)
pt3dadd(109.731, 104.291, 41.4, 0.904)
pt3dadd(109.823, 104.224, 41.432, 0.904)
pt3dadd(109.913, 104.15, 41.457, 0.904)
pt3dadd(110.002, 104.076, 41.482, 0.904)
pt3dadd(110.091, 104.002, 41.507, 0.904)
pt3dadd(110.181, 103.928, 41.532, 0.904)
pt3dadd(110.27, 103.854, 41.558, 0.904)
pt3dadd(110.36, 103.78, 41.583, 0.904)
pt3dadd(110.449, 103.706, 41.608, 0.904)
pt3dadd(110.539, 103.632, 41.633, 0.904)
pt3dadd(110.628, 103.558, 41.658, 0.904)
pt3dadd(110.711, 103.477, 41.682, 0.898)
pt3dadd(110.779, 103.382, 41.705, 0.88)
pt3dadd(110.847, 103.287, 41.727, 0.862)
pt3dadd(110.915, 103.191, 41.749, 0.844)
pt3dadd(110.983, 103.096, 41.771, 0.826)
pt3dadd(111.051, 103.001, 41.793, 0.808)
pt3dadd(111.12, 102.906, 41.815, 0.79)
}
}
proc shape3d_175() {
dend_7[20] { pt3dadd(111.188, 102.811, 41.837, 0.772)
pt3dadd(111.256, 102.716, 41.86, 0.754)
pt3dadd(111.324, 102.621, 41.882, 0.736)
pt3dadd(111.393, 102.526, 41.902, 0.73)
pt3dadd(111.464, 102.431, 41.92, 0.74)
pt3dadd(111.534, 102.336, 41.937, 0.75)
pt3dadd(111.605, 102.242, 41.954, 0.76)
pt3dadd(111.676, 102.147, 41.972, 0.772)
pt3dadd(111.747, 102.052, 41.989, 0.782)
pt3dadd(111.817, 101.958, 42.007, 0.792)
pt3dadd(111.888, 101.863, 42.024, 0.802)
pt3dadd(111.959, 101.768, 42.041, 0.812)
pt3dadd(112.029, 101.673, 42.059, 0.824)
pt3dadd(112.099, 101.586, 42.089, 0.84)
pt3dadd(112.168, 101.51, 42.141, 0.864)
pt3dadd(112.237, 101.434, 42.193, 0.89)
pt3dadd(112.306, 101.359, 42.246, 0.914)
pt3dadd(112.375, 101.283, 42.298, 0.94)
pt3dadd(112.444, 101.207, 42.35, 0.966)
pt3dadd(112.513, 101.132, 42.402, 0.99)
pt3dadd(112.582, 101.056, 42.455, 1.016)
pt3dadd(112.65, 100.98, 42.507, 1.04)
pt3dadd(112.719, 100.905, 42.559, 1.066)
pt3dadd(112.804, 100.867, 42.62, 1.056)
pt3dadd(112.893, 100.838, 42.683, 1.04)
pt3dadd(112.981, 100.808, 42.746, 1.022)
pt3dadd(113.069, 100.779, 42.81, 1.006)
pt3dadd(113.157, 100.749, 42.873, 0.99)
pt3dadd(113.246, 100.72, 42.936, 0.972)
pt3dadd(113.334, 100.69, 42.999, 0.956)
pt3dadd(113.422, 100.661, 43.062, 0.94)
pt3dadd(113.51, 100.632, 43.125, 0.922)
pt3dadd(113.599, 100.602, 43.188, 0.906)
pt3dadd(113.646, 100.602, 43.28, 0.838)
pt3dadd(113.694, 100.602, 43.372, 0.77)
pt3dadd(113.742, 100.602, 43.464, 0.702)
pt3dadd(113.789, 100.602, 43.556, 0.634)
pt3dadd(113.837, 100.601, 43.647, 0.566)
pt3dadd(113.884, 100.601, 43.739, 0.498)
pt3dadd(113.932, 100.601, 43.831, 0.43)
pt3dadd(113.979, 100.601, 43.923, 0.362)
pt3dadd(114.027, 100.601, 44.015, 0.294)
pt3dadd(114.074, 100.601, 44.106, 0.226)
}
dend_0[7] {pt3dclear()
pt3dadd(105.605, 134.477, 16.007, 8.814)
pt3dadd(105.579, 134.502, 16.005, 8.782)
pt3dadd(105.494, 134.587, 15.997, 8.672)
pt3dadd(105.41, 134.671, 15.99, 8.564)
pt3dadd(105.325, 134.756, 15.982, 8.454)
pt3dadd(105.241, 134.84, 15.974, 8.346)
pt3dadd(105.156, 134.926, 15.966, 8.238)
pt3dadd(105.071, 135.01, 15.959, 8.13)
pt3dadd(104.987, 135.095, 15.951, 8.02)
pt3dadd(104.902, 135.179, 15.943, 7.912)
pt3dadd(104.817, 135.264, 15.935, 7.804)
pt3dadd(104.733, 135.348, 15.928, 7.696)
pt3dadd(104.648, 135.433, 15.92, 7.588)
}
dend_7[21] {pt3dclear()
pt3dadd(104.648, 135.433, 15.92, 7.588)
pt3dadd(104.563, 135.517, 15.912, 7.478)
pt3dadd(104.51, 135.612, 15.941, 7.342)
pt3dadd(104.47, 135.71, 15.988, 7.192)
pt3dadd(104.431, 135.809, 16.034, 7.044)
pt3dadd(104.392, 135.908, 16.08, 6.894)
pt3dadd(104.353, 136.007, 16.126, 6.744)
pt3dadd(104.313, 136.106, 16.172, 6.594)
pt3dadd(104.274, 136.205, 16.219, 6.444)
pt3dadd(104.235, 136.304, 16.265, 6.296)
pt3dadd(104.202, 136.4, 16.315, 6.148)
pt3dadd(104.203, 136.484, 16.387, 6.008)
pt3dadd(104.205, 136.568, 16.458, 5.866)
pt3dadd(104.206, 136.652, 16.529, 5.726)
pt3dadd(104.207, 136.736, 16.6, 5.586)
pt3dadd(104.208, 136.82, 16.672, 5.446)
pt3dadd(104.209, 136.906, 16.743, 5.306)
pt3dadd(104.211, 136.99, 16.814, 5.166)
pt3dadd(104.212, 137.074, 16.886, 5.026)
pt3dadd(104.213, 137.158, 16.957, 4.886)
pt3dadd(104.214, 137.242, 17.028, 4.736)
pt3dadd(104.216, 137.324, 17.1, 4.536)
pt3dadd(104.218, 137.408, 17.172, 4.338)
pt3dadd(104.219, 137.492, 17.244, 4.138)
pt3dadd(104.221, 137.575, 17.316, 3.938)
pt3dadd(104.223, 137.659, 17.388, 3.74)
pt3dadd(104.224, 137.742, 17.459, 3.54)
pt3dadd(104.226, 137.826, 17.531, 3.342)
pt3dadd(104.228, 137.909, 17.603, 3.142)
pt3dadd(104.229, 137.993, 17.675, 2.944)
pt3dadd(104.231, 138.076, 17.747, 2.756)
pt3dadd(104.234, 138.16, 17.818, 2.63)
pt3dadd(104.237, 138.244, 17.89, 2.504)
pt3dadd(104.24, 138.326, 17.962, 2.378)
pt3dadd(104.243, 138.41, 18.034, 2.252)
pt3dadd(104.246, 138.493, 18.106, 2.126)
pt3dadd(104.249, 138.577, 18.178, 2)
pt3dadd(104.251, 138.66, 18.249, 1.874)
pt3dadd(104.254, 138.744, 18.321, 1.746)
pt3dadd(104.257, 138.827, 18.393, 1.62)
pt3dadd(104.26, 138.911, 18.465, 1.514)
pt3dadd(104.265, 138.995, 18.536, 1.498)
pt3dadd(104.269, 139.079, 18.608, 1.482)
pt3dadd(104.273, 139.163, 18.679, 1.468)
pt3dadd(104.277, 139.246, 18.751, 1.452)
pt3dadd(104.281, 139.33, 18.822, 1.438)
pt3dadd(104.286, 139.414, 18.893, 1.422)
pt3dadd(104.29, 139.498, 18.965, 1.406)
pt3dadd(104.294, 139.582, 19.036, 1.392)
pt3dadd(104.298, 139.666, 19.108, 1.376)
pt3dadd(104.303, 139.747, 19.181, 1.364)
pt3dadd(104.31, 139.818, 19.261, 1.364)
pt3dadd(104.317, 139.889, 19.342, 1.362)
pt3dadd(104.324, 139.96, 19.422, 1.362)
pt3dadd(104.332, 140.03, 19.503, 1.36)
pt3dadd(104.339, 140.101, 19.583, 1.36)
pt3dadd(104.346, 140.172, 19.664, 1.358)
pt3dadd(104.353, 140.243, 19.744, 1.358)
pt3dadd(104.36, 140.314, 19.825, 1.358)
pt3dadd(104.368, 140.384, 19.905, 1.356)
pt3dadd(104.379, 140.459, 19.982, 1.348)
pt3dadd(104.408, 140.551, 20.042, 1.302)
pt3dadd(104.437, 140.642, 20.102, 1.254)
pt3dadd(104.466, 140.734, 20.162, 1.208)
pt3dadd(104.495, 140.826, 20.222, 1.162)
pt3dadd(104.524, 140.917, 20.282, 1.114)
pt3dadd(104.553, 141.008, 20.342, 1.068)
pt3dadd(104.582, 141.101, 20.402, 1.022)
pt3dadd(104.61, 141.192, 20.461, 0.974)
pt3dadd(104.64, 141.283, 20.521, 0.928)
pt3dadd(104.663, 141.379, 20.578, 0.894)
pt3dadd(104.677, 141.481, 20.629, 0.884)
pt3dadd(104.69, 141.583, 20.68, 0.874)
pt3dadd(104.704, 141.685, 20.731, 0.864)
pt3dadd(104.718, 141.788, 20.782, 0.854)
pt3dadd(104.731, 141.89, 20.833, 0.844)
pt3dadd(104.745, 141.992, 20.885, 0.834)
pt3dadd(104.759, 142.094, 20.936, 0.824)
pt3dadd(104.772, 142.196, 20.987, 0.814)
pt3dadd(104.786, 142.3, 21.038, 0.804)
pt3dadd(104.783, 142.404, 21.084, 0.8)
pt3dadd(104.759, 142.512, 21.123, 0.804)
pt3dadd(104.736, 142.619, 21.163, 0.806)
pt3dadd(104.712, 142.727, 21.203, 0.81)
pt3dadd(104.689, 142.835, 21.242, 0.814)
pt3dadd(104.665, 142.942, 21.282, 0.818)
pt3dadd(104.642, 143.05, 21.321, 0.82)
pt3dadd(104.618, 143.158, 21.361, 0.824)
pt3dadd(104.595, 143.264, 21.401, 0.828)
pt3dadd(104.571, 143.372, 21.441, 0.832)
pt3dadd(104.521, 143.477, 21.465, 0.818)
pt3dadd(104.465, 143.579, 21.487, 0.8)
pt3dadd(104.409, 143.682, 21.508, 0.782)
pt3dadd(104.353, 143.785, 21.53, 0.764)
pt3dadd(104.297, 143.888, 21.551, 0.746)
pt3dadd(104.241, 143.992, 21.573, 0.728)
pt3dadd(104.185, 144.094, 21.594, 0.712)
pt3dadd(104.129, 144.197, 21.616, 0.694)
pt3dadd(104.073, 144.3, 21.638, 0.676)
pt3dadd(104.017, 144.403, 21.659, 0.658)
pt3dadd(103.943, 144.496, 21.671, 0.63)
pt3dadd(103.865, 144.586, 21.681, 0.602)
pt3dadd(103.786, 144.676, 21.692, 0.574)
pt3dadd(103.708, 144.766, 21.702, 0.544)
pt3dadd(103.63, 144.857, 21.712, 0.516)
pt3dadd(103.552, 144.947, 21.723, 0.486)
pt3dadd(103.474, 145.037, 21.733, 0.458)
pt3dadd(103.396, 145.127, 21.743, 0.428)
pt3dadd(103.318, 145.217, 21.754, 0.4)
pt3dadd(103.239, 145.308, 21.764, 0.37)
pt3dadd(103.159, 145.396, 21.772, 0.378)
pt3dadd(103.079, 145.484, 21.779, 0.394)
pt3dadd(102.998, 145.573, 21.786, 0.408)
pt3dadd(102.917, 145.662, 21.793, 0.424)
pt3dadd(102.837, 145.75, 21.8, 0.438)
pt3dadd(102.756, 145.838, 21.807, 0.454)
pt3dadd(102.675, 145.927, 21.814, 0.468)
pt3dadd(102.595, 146.015, 21.821, 0.484)
pt3dadd(102.514, 146.104, 21.828, 0.5)
pt3dadd(102.433, 146.192, 21.835, 0.514)
pt3dadd(102.351, 146.279, 21.839, 0.564)
pt3dadd(102.268, 146.366, 21.843, 0.62)
pt3dadd(102.186, 146.453, 21.847, 0.676)
pt3dadd(102.103, 146.539, 21.851, 0.732)
pt3dadd(102.02, 146.627, 21.855, 0.788)
pt3dadd(101.937, 146.713, 21.859, 0.844)
pt3dadd(101.855, 146.8, 21.863, 0.9)
pt3dadd(101.772, 146.887, 21.867, 0.956)
pt3dadd(101.689, 146.974, 21.871, 1.012)
pt3dadd(101.607, 147.06, 21.875, 1.068)
pt3dadd(101.526, 147.149, 21.883, 1.08)
pt3dadd(101.446, 147.238, 21.892, 1.086)
pt3dadd(101.367, 147.328, 21.901, 1.092)
pt3dadd(101.287, 147.416, 21.91, 1.098)
pt3dadd(101.207, 147.505, 21.918, 1.102)
pt3dadd(101.127, 147.594, 21.927, 1.108)
pt3dadd(101.047, 147.683, 21.936, 1.114)
pt3dadd(100.967, 147.772, 21.945, 1.118)
pt3dadd(100.888, 147.86, 21.954, 1.124)
pt3dadd(100.808, 147.949, 21.963, 1.13)
pt3dadd(100.73, 148.04, 21.975, 1.134)
pt3dadd(100.653, 148.13, 21.988, 1.14)
pt3dadd(100.575, 148.22, 22.001, 1.146)
pt3dadd(100.498, 148.312, 22.014, 1.15)
}
}
proc shape3d_176() {
dend_7[21] { pt3dadd(100.421, 148.402, 22.027, 1.156)
pt3dadd(100.343, 148.492, 22.039, 1.162)
pt3dadd(100.266, 148.583, 22.052, 1.166)
pt3dadd(100.189, 148.673, 22.065, 1.172)
pt3dadd(100.111, 148.764, 22.078, 1.178)
pt3dadd(100.034, 148.854, 22.091, 1.184)
pt3dadd(99.96, 148.946, 22.109, 1.198)
pt3dadd(99.887, 149.039, 22.128, 1.212)
pt3dadd(99.814, 149.131, 22.147, 1.228)
pt3dadd(99.741, 149.224, 22.167, 1.244)
pt3dadd(99.668, 149.316, 22.186, 1.258)
pt3dadd(99.595, 149.408, 22.205, 1.274)
pt3dadd(99.522, 149.501, 22.224, 1.29)
pt3dadd(99.449, 149.593, 22.243, 1.304)
pt3dadd(99.376, 149.686, 22.263, 1.32)
pt3dadd(99.303, 149.778, 22.282, 1.336)
pt3dadd(99.258, 149.873, 22.328, 1.326)
pt3dadd(99.216, 149.966, 22.379, 1.314)
pt3dadd(99.174, 150.061, 22.43, 1.3)
pt3dadd(99.132, 150.156, 22.481, 1.288)
pt3dadd(99.09, 150.251, 22.532, 1.276)
pt3dadd(99.048, 150.344, 22.583, 1.262)
pt3dadd(99.006, 150.439, 22.633, 1.25)
pt3dadd(98.965, 150.534, 22.684, 1.238)
pt3dadd(98.923, 150.628, 22.735, 1.224)
pt3dadd(98.881, 150.722, 22.786, 1.212)
pt3dadd(98.856, 150.812, 22.849, 1.204)
pt3dadd(98.832, 150.901, 22.913, 1.196)
pt3dadd(98.807, 150.99, 22.977, 1.186)
pt3dadd(98.783, 151.079, 23.041, 1.178)
pt3dadd(98.758, 151.168, 23.105, 1.17)
pt3dadd(98.733, 151.258, 23.169, 1.162)
pt3dadd(98.709, 151.346, 23.232, 1.154)
pt3dadd(98.685, 151.435, 23.296, 1.146)
pt3dadd(98.66, 151.524, 23.36, 1.138)
pt3dadd(98.637, 151.613, 23.425, 1.13)
pt3dadd(98.626, 151.694, 23.498, 1.126)
pt3dadd(98.615, 151.776, 23.57, 1.124)
pt3dadd(98.603, 151.858, 23.643, 1.12)
pt3dadd(98.592, 151.939, 23.716, 1.118)
pt3dadd(98.581, 152.021, 23.789, 1.114)
pt3dadd(98.57, 152.101, 23.862, 1.112)
pt3dadd(98.559, 152.183, 23.934, 1.108)
pt3dadd(98.548, 152.264, 24.007, 1.106)
pt3dadd(98.537, 152.346, 24.08, 1.102)
pt3dadd(98.527, 152.425, 24.154, 1.094)
pt3dadd(98.525, 152.48, 24.243, 1.042)
pt3dadd(98.523, 152.537, 24.332, 0.99)
pt3dadd(98.521, 152.592, 24.42, 0.938)
pt3dadd(98.519, 152.647, 24.509, 0.886)
pt3dadd(98.517, 152.702, 24.597, 0.834)
pt3dadd(98.515, 152.759, 24.686, 0.782)
pt3dadd(98.514, 152.814, 24.775, 0.73)
pt3dadd(98.512, 152.869, 24.863, 0.678)
pt3dadd(98.51, 152.926, 24.952, 0.626)
pt3dadd(98.508, 152.982, 25.04, 0.584)
pt3dadd(98.504, 153.043, 25.126, 0.608)
pt3dadd(98.501, 153.106, 25.212, 0.634)
pt3dadd(98.498, 153.167, 25.297, 0.66)
pt3dadd(98.494, 153.229, 25.383, 0.684)
pt3dadd(98.491, 153.29, 25.469, 0.71)
pt3dadd(98.487, 153.353, 25.554, 0.734)
pt3dadd(98.484, 153.414, 25.64, 0.76)
pt3dadd(98.481, 153.476, 25.726, 0.786)
pt3dadd(98.477, 153.538, 25.811, 0.81)
pt3dadd(98.474, 153.6, 25.897, 0.836)
pt3dadd(98.467, 153.658, 25.984, 0.866)
pt3dadd(98.461, 153.715, 26.072, 0.896)
pt3dadd(98.454, 153.774, 26.159, 0.926)
pt3dadd(98.448, 153.832, 26.247, 0.956)
pt3dadd(98.441, 153.889, 26.334, 0.986)
pt3dadd(98.435, 153.948, 26.421, 1.014)
pt3dadd(98.428, 154.006, 26.509, 1.044)
pt3dadd(98.422, 154.063, 26.596, 1.074)
pt3dadd(98.415, 154.122, 26.683, 1.104)
pt3dadd(98.408, 154.178, 26.771, 1.132)
pt3dadd(98.396, 154.234, 26.86, 1.144)
pt3dadd(98.384, 154.288, 26.948, 1.156)
pt3dadd(98.372, 154.343, 27.037, 1.168)
pt3dadd(98.36, 154.397, 27.125, 1.182)
pt3dadd(98.348, 154.451, 27.214, 1.194)
pt3dadd(98.336, 154.506, 27.302, 1.206)
pt3dadd(98.324, 154.56, 27.391, 1.218)
pt3dadd(98.313, 154.614, 27.479, 1.23)
pt3dadd(98.301, 154.669, 27.568, 1.242)
pt3dadd(98.288, 154.727, 27.655, 1.262)
pt3dadd(98.271, 154.796, 27.735, 1.316)
pt3dadd(98.254, 154.867, 27.814, 1.37)
pt3dadd(98.237, 154.938, 27.894, 1.424)
pt3dadd(98.221, 155.009, 27.974, 1.478)
pt3dadd(98.204, 155.078, 28.053, 1.532)
pt3dadd(98.187, 155.149, 28.133, 1.586)
pt3dadd(98.17, 155.22, 28.213, 1.64)
pt3dadd(98.153, 155.291, 28.292, 1.694)
pt3dadd(98.137, 155.362, 28.372, 1.748)
pt3dadd(98.111, 155.431, 28.448, 1.796)
pt3dadd(98.044, 155.497, 28.511, 1.82)
pt3dadd(97.978, 155.564, 28.573, 1.844)
pt3dadd(97.911, 155.63, 28.635, 1.866)
pt3dadd(97.845, 155.696, 28.697, 1.89)
pt3dadd(97.778, 155.764, 28.759, 1.914)
pt3dadd(97.711, 155.83, 28.821, 1.938)
pt3dadd(97.645, 155.897, 28.883, 1.962)
pt3dadd(97.578, 155.963, 28.945, 1.984)
pt3dadd(97.512, 156.029, 29.007, 2.008)
pt3dadd(97.449, 156.1, 29.069, 2.02)
pt3dadd(97.403, 156.182, 29.13, 1.984)
pt3dadd(97.357, 156.266, 29.191, 1.948)
pt3dadd(97.311, 156.349, 29.252, 1.912)
pt3dadd(97.265, 156.433, 29.312, 1.876)
pt3dadd(97.219, 156.516, 29.373, 1.84)
pt3dadd(97.173, 156.599, 29.434, 1.806)
pt3dadd(97.127, 156.683, 29.495, 1.77)
pt3dadd(97.08, 156.766, 29.556, 1.734)
pt3dadd(97.034, 156.85, 29.616, 1.698)
pt3dadd(96.985, 156.934, 29.674, 1.666)
pt3dadd(96.927, 157.022, 29.721, 1.642)
pt3dadd(96.868, 157.11, 29.768, 1.62)
pt3dadd(96.809, 157.198, 29.815, 1.598)
pt3dadd(96.75, 157.286, 29.862, 1.574)
pt3dadd(96.691, 157.374, 29.909, 1.552)
pt3dadd(96.632, 157.462, 29.956, 1.53)
pt3dadd(96.573, 157.55, 30.003, 1.508)
pt3dadd(96.515, 157.638, 30.05, 1.484)
pt3dadd(96.456, 157.726, 30.097, 1.462)
pt3dadd(96.399, 157.814, 30.146, 1.448)
pt3dadd(96.348, 157.904, 30.197, 1.456)
pt3dadd(96.297, 157.993, 30.249, 1.464)
pt3dadd(96.246, 158.083, 30.3, 1.472)
pt3dadd(96.195, 158.172, 30.352, 1.48)
pt3dadd(96.145, 158.262, 30.403, 1.488)
pt3dadd(96.094, 158.351, 30.455, 1.494)
pt3dadd(96.043, 158.441, 30.506, 1.502)
pt3dadd(95.992, 158.53, 30.558, 1.51)
pt3dadd(95.941, 158.62, 30.609, 1.518)
pt3dadd(95.895, 158.707, 30.665, 1.53)
pt3dadd(95.856, 158.791, 30.728, 1.55)
pt3dadd(95.817, 158.876, 30.791, 1.568)
pt3dadd(95.778, 158.96, 30.854, 1.588)
pt3dadd(95.739, 159.046, 30.917, 1.608)
pt3dadd(95.7, 159.131, 30.98, 1.626)
pt3dadd(95.661, 159.215, 31.043, 1.646)
pt3dadd(95.623, 159.3, 31.106, 1.664)
pt3dadd(95.584, 159.384, 31.169, 1.684)
pt3dadd(95.545, 159.469, 31.232, 1.704)
pt3dadd(95.505, 159.545, 31.301, 1.69)
pt3dadd(95.463, 159.606, 31.38, 1.632)
pt3dadd(95.422, 159.667, 31.458, 1.574)
pt3dadd(95.38, 159.73, 31.537, 1.516)
pt3dadd(95.339, 159.791, 31.615, 1.458)
pt3dadd(95.297, 159.852, 31.694, 1.4)
pt3dadd(95.256, 159.914, 31.772, 1.342)
pt3dadd(95.214, 159.976, 31.851, 1.284)
pt3dadd(95.173, 160.037, 31.929, 1.224)
pt3dadd(95.131, 160.099, 32.008, 1.166)
pt3dadd(95.077, 160.163, 32.078, 1.142)
pt3dadd(95.005, 160.229, 32.136, 1.16)
pt3dadd(94.934, 160.296, 32.194, 1.18)
pt3dadd(94.862, 160.363, 32.252, 1.198)
pt3dadd(94.791, 160.429, 32.309, 1.218)
pt3dadd(94.719, 160.496, 32.367, 1.238)
pt3dadd(94.647, 160.562, 32.425, 1.256)
pt3dadd(94.576, 160.63, 32.483, 1.276)
pt3dadd(94.504, 160.697, 32.541, 1.294)
pt3dadd(94.433, 160.763, 32.599, 1.314)
pt3dadd(94.357, 160.819, 32.659, 1.332)
pt3dadd(94.274, 160.862, 32.722, 1.35)
pt3dadd(94.192, 160.906, 32.786, 1.368)
pt3dadd(94.109, 160.948, 32.849, 1.384)
pt3dadd(94.027, 160.991, 32.912, 1.402)
pt3dadd(93.944, 161.034, 32.976, 1.42)
pt3dadd(93.862, 161.076, 33.039, 1.438)
pt3dadd(93.779, 161.119, 33.102, 1.456)
pt3dadd(93.697, 161.162, 33.165, 1.472)
pt3dadd(93.614, 161.204, 33.228, 1.49)
pt3dadd(93.531, 161.244, 33.293, 1.508)
pt3dadd(93.448, 161.279, 33.359, 1.524)
pt3dadd(93.365, 161.314, 33.425, 1.54)
pt3dadd(93.282, 161.348, 33.491, 1.558)
pt3dadd(93.199, 161.383, 33.557, 1.574)
pt3dadd(93.116, 161.419, 33.623, 1.592)
pt3dadd(93.033, 161.454, 33.689, 1.608)
pt3dadd(92.95, 161.489, 33.755, 1.624)
pt3dadd(92.867, 161.524, 33.821, 1.642)
pt3dadd(92.784, 161.558, 33.887, 1.658)
pt3dadd(92.703, 161.594, 33.955, 1.67)
pt3dadd(92.624, 161.63, 34.024, 1.674)
pt3dadd(92.546, 161.666, 34.094, 1.68)
pt3dadd(92.468, 161.702, 34.163, 1.684)
pt3dadd(92.389, 161.74, 34.233, 1.69)
pt3dadd(92.311, 161.776, 34.302, 1.694)
pt3dadd(92.233, 161.812, 34.372, 1.7)
pt3dadd(92.154, 161.848, 34.441, 1.704)
pt3dadd(92.076, 161.884, 34.511, 1.71)
pt3dadd(91.998, 161.921, 34.58, 1.714)
pt3dadd(91.935, 161.97, 34.653, 1.678)
pt3dadd(91.885, 162.03, 34.729, 1.61)
pt3dadd(91.835, 162.09, 34.805, 1.54)
pt3dadd(91.785, 162.15, 34.881, 1.472)
pt3dadd(91.734, 162.209, 34.957, 1.402)
}
}
proc shape3d_177() {
dend_7[21] { pt3dadd(91.684, 162.269, 35.033, 1.334)
pt3dadd(91.634, 162.329, 35.108, 1.264)
pt3dadd(91.584, 162.389, 35.184, 1.196)
pt3dadd(91.534, 162.449, 35.26, 1.126)
pt3dadd(91.484, 162.509, 35.336, 1.058)
pt3dadd(91.438, 162.584, 35.402, 1.03)
pt3dadd(91.396, 162.672, 35.46, 1.034)
pt3dadd(91.354, 162.761, 35.518, 1.038)
pt3dadd(91.311, 162.848, 35.576, 1.042)
pt3dadd(91.269, 162.937, 35.634, 1.046)
pt3dadd(91.227, 163.025, 35.692, 1.052)
pt3dadd(91.185, 163.114, 35.751, 1.056)
pt3dadd(91.143, 163.201, 35.809, 1.06)
pt3dadd(91.101, 163.29, 35.867, 1.064)
pt3dadd(91.058, 163.378, 35.925, 1.068)
pt3dadd(91.004, 163.457, 35.984, 1.082)
pt3dadd(90.942, 163.53, 36.044, 1.104)
pt3dadd(90.881, 163.604, 36.104, 1.124)
pt3dadd(90.82, 163.679, 36.164, 1.144)
pt3dadd(90.759, 163.752, 36.224, 1.164)
pt3dadd(90.697, 163.826, 36.284, 1.184)
pt3dadd(90.636, 163.901, 36.343, 1.204)
pt3dadd(90.575, 163.974, 36.403, 1.224)
pt3dadd(90.513, 164.048, 36.463, 1.244)
pt3dadd(90.452, 164.123, 36.523, 1.264)
pt3dadd(90.377, 164.192, 36.574, 1.292)
pt3dadd(90.298, 164.262, 36.623, 1.322)
pt3dadd(90.219, 164.33, 36.671, 1.352)
pt3dadd(90.14, 164.4, 36.72, 1.382)
pt3dadd(90.061, 164.468, 36.768, 1.412)
pt3dadd(89.982, 164.538, 36.817, 1.44)
pt3dadd(89.903, 164.606, 36.865, 1.47)
pt3dadd(89.824, 164.676, 36.914, 1.5)
pt3dadd(89.745, 164.744, 36.963, 1.53)
pt3dadd(89.666, 164.814, 37.011, 1.56)
pt3dadd(89.585, 164.881, 37.058, 1.56)
pt3dadd(89.503, 164.95, 37.105, 1.556)
pt3dadd(89.422, 165.018, 37.152, 1.552)
pt3dadd(89.341, 165.086, 37.199, 1.548)
pt3dadd(89.26, 165.155, 37.246, 1.544)
pt3dadd(89.179, 165.222, 37.292, 1.54)
pt3dadd(89.097, 165.29, 37.339, 1.536)
pt3dadd(89.016, 165.359, 37.386, 1.532)
pt3dadd(88.935, 165.427, 37.433, 1.53)
pt3dadd(88.854, 165.494, 37.48, 1.526)
pt3dadd(88.781, 165.562, 37.537, 1.474)
pt3dadd(88.708, 165.628, 37.595, 1.422)
pt3dadd(88.636, 165.694, 37.652, 1.368)
pt3dadd(88.563, 165.76, 37.709, 1.316)
pt3dadd(88.491, 165.826, 37.767, 1.264)
pt3dadd(88.418, 165.892, 37.824, 1.212)
pt3dadd(88.345, 165.958, 37.882, 1.16)
pt3dadd(88.273, 166.025, 37.939, 1.106)
pt3dadd(88.2, 166.091, 37.997, 1.054)
pt3dadd(88.127, 166.158, 38.052, 1.012)
pt3dadd(88.052, 166.24, 38.09, 1.046)
pt3dadd(87.977, 166.321, 38.128, 1.08)
pt3dadd(87.901, 166.403, 38.166, 1.116)
pt3dadd(87.826, 166.484, 38.204, 1.152)
pt3dadd(87.751, 166.566, 38.242, 1.186)
pt3dadd(87.675, 166.648, 38.28, 1.22)
pt3dadd(87.6, 166.729, 38.318, 1.256)
pt3dadd(87.525, 166.811, 38.356, 1.29)
pt3dadd(87.45, 166.892, 38.394, 1.326)
pt3dadd(87.377, 166.974, 38.434, 1.356)
pt3dadd(87.319, 167.062, 38.483, 1.356)
pt3dadd(87.262, 167.148, 38.533, 1.356)
pt3dadd(87.205, 167.234, 38.583, 1.356)
pt3dadd(87.147, 167.322, 38.633, 1.356)
pt3dadd(87.09, 167.408, 38.683, 1.356)
pt3dadd(87.033, 167.495, 38.733, 1.356)
pt3dadd(86.975, 167.582, 38.783, 1.356)
pt3dadd(86.918, 167.669, 38.832, 1.356)
pt3dadd(86.861, 167.756, 38.882, 1.356)
pt3dadd(86.799, 167.84, 38.929, 1.354)
pt3dadd(86.707, 167.909, 38.958, 1.336)
pt3dadd(86.614, 167.977, 38.986, 1.316)
pt3dadd(86.522, 168.046, 39.014, 1.298)
pt3dadd(86.429, 168.114, 39.042, 1.28)
pt3dadd(86.337, 168.182, 39.071, 1.262)
pt3dadd(86.244, 168.252, 39.099, 1.244)
pt3dadd(86.152, 168.32, 39.127, 1.224)
pt3dadd(86.059, 168.389, 39.156, 1.206)
pt3dadd(85.967, 168.457, 39.184, 1.188)
pt3dadd(85.873, 168.526, 39.209, 1.176)
pt3dadd(85.775, 168.593, 39.222, 1.184)
pt3dadd(85.678, 168.661, 39.235, 1.194)
pt3dadd(85.58, 168.728, 39.247, 1.204)
pt3dadd(85.482, 168.797, 39.26, 1.214)
pt3dadd(85.384, 168.864, 39.273, 1.224)
pt3dadd(85.286, 168.932, 39.286, 1.232)
pt3dadd(85.189, 169.001, 39.299, 1.242)
pt3dadd(85.091, 169.068, 39.312, 1.252)
pt3dadd(84.993, 169.136, 39.324, 1.262)
pt3dadd(84.894, 169.201, 39.335, 1.266)
pt3dadd(84.789, 169.26, 39.339, 1.258)
pt3dadd(84.685, 169.319, 39.342, 1.248)
pt3dadd(84.58, 169.378, 39.346, 1.24)
pt3dadd(84.476, 169.436, 39.349, 1.23)
pt3dadd(84.371, 169.495, 39.353, 1.22)
pt3dadd(84.267, 169.554, 39.357, 1.212)
pt3dadd(84.162, 169.613, 39.36, 1.202)
pt3dadd(84.057, 169.672, 39.364, 1.194)
pt3dadd(83.953, 169.73, 39.368, 1.184)
pt3dadd(83.847, 169.788, 39.37, 1.17)
pt3dadd(83.74, 169.841, 39.367, 1.146)
pt3dadd(83.632, 169.894, 39.365, 1.122)
pt3dadd(83.524, 169.946, 39.362, 1.1)
pt3dadd(83.417, 169.999, 39.36, 1.076)
pt3dadd(83.309, 170.052, 39.358, 1.052)
pt3dadd(83.201, 170.105, 39.355, 1.028)
pt3dadd(83.093, 170.158, 39.353, 1.004)
pt3dadd(82.986, 170.21, 39.35, 0.98)
pt3dadd(82.878, 170.263, 39.348, 0.956)
pt3dadd(82.773, 170.32, 39.345, 0.944)
pt3dadd(82.672, 170.386, 39.341, 0.96)
pt3dadd(82.572, 170.452, 39.336, 0.976)
pt3dadd(82.472, 170.516, 39.332, 0.992)
pt3dadd(82.372, 170.582, 39.328, 1.008)
pt3dadd(82.271, 170.648, 39.323, 1.024)
pt3dadd(82.171, 170.714, 39.319, 1.04)
pt3dadd(82.071, 170.78, 39.315, 1.058)
pt3dadd(81.971, 170.846, 39.31, 1.074)
pt3dadd(81.87, 170.911, 39.306, 1.09)
pt3dadd(81.771, 170.978, 39.301, 1.086)
pt3dadd(81.673, 171.048, 39.295, 1.038)
pt3dadd(81.575, 171.116, 39.289, 0.988)
pt3dadd(81.477, 171.186, 39.283, 0.94)
pt3dadd(81.379, 171.254, 39.277, 0.892)
pt3dadd(81.282, 171.324, 39.271, 0.844)
pt3dadd(81.184, 171.392, 39.265, 0.796)
pt3dadd(81.086, 171.462, 39.259, 0.748)
pt3dadd(80.988, 171.53, 39.253, 0.7)
pt3dadd(80.89, 171.6, 39.247, 0.652)
pt3dadd(80.791, 171.667, 39.238, 0.616)
pt3dadd(80.69, 171.73, 39.224, 0.608)
pt3dadd(80.589, 171.792, 39.21, 0.6)
pt3dadd(80.489, 171.854, 39.195, 0.592)
pt3dadd(80.388, 171.918, 39.181, 0.584)
pt3dadd(80.287, 171.98, 39.167, 0.576)
pt3dadd(80.186, 172.043, 39.153, 0.568)
pt3dadd(80.085, 172.105, 39.138, 0.56)
pt3dadd(79.984, 172.169, 39.124, 0.552)
pt3dadd(79.883, 172.231, 39.11, 0.544)
pt3dadd(79.781, 172.289, 39.091, 0.572)
pt3dadd(79.676, 172.338, 39.064, 0.654)
pt3dadd(79.572, 172.387, 39.037, 0.736)
pt3dadd(79.467, 172.436, 39.011, 0.82)
pt3dadd(79.362, 172.486, 38.984, 0.902)
pt3dadd(79.258, 172.535, 38.958, 0.984)
pt3dadd(79.153, 172.584, 38.931, 1.066)
pt3dadd(79.048, 172.633, 38.905, 1.148)
pt3dadd(78.944, 172.684, 38.878, 1.23)
pt3dadd(78.839, 172.733, 38.851, 1.314)
pt3dadd(78.734, 172.783, 38.832, 1.368)
pt3dadd(78.627, 172.837, 38.824, 1.386)
pt3dadd(78.52, 172.891, 38.816, 1.404)
pt3dadd(78.413, 172.944, 38.808, 1.422)
pt3dadd(78.306, 172.998, 38.8, 1.438)
pt3dadd(78.199, 173.052, 38.792, 1.456)
pt3dadd(78.092, 173.106, 38.785, 1.474)
pt3dadd(77.985, 173.159, 38.777, 1.492)
pt3dadd(77.878, 173.213, 38.769, 1.508)
pt3dadd(77.771, 173.267, 38.761, 1.526)
pt3dadd(77.663, 173.311, 38.767, 1.538)
pt3dadd(77.551, 173.344, 38.792, 1.542)
pt3dadd(77.44, 173.376, 38.818, 1.548)
pt3dadd(77.329, 173.408, 38.844, 1.552)
pt3dadd(77.217, 173.441, 38.869, 1.556)
pt3dadd(77.106, 173.473, 38.895, 1.562)
pt3dadd(76.994, 173.504, 38.921, 1.566)
pt3dadd(76.883, 173.537, 38.947, 1.572)
pt3dadd(76.772, 173.569, 38.972, 1.576)
pt3dadd(76.66, 173.602, 38.998, 1.58)
pt3dadd(76.55, 173.621, 39.034, 1.544)
pt3dadd(76.441, 173.634, 39.074, 1.486)
pt3dadd(76.332, 173.647, 39.114, 1.428)
pt3dadd(76.223, 173.659, 39.154, 1.372)
pt3dadd(76.114, 173.672, 39.194, 1.314)
pt3dadd(76.005, 173.686, 39.235, 1.256)
pt3dadd(75.896, 173.699, 39.275, 1.2)
pt3dadd(75.787, 173.711, 39.315, 1.142)
pt3dadd(75.678, 173.724, 39.355, 1.084)
pt3dadd(75.568, 173.737, 39.395, 1.028)
pt3dadd(75.462, 173.737, 39.442, 0.966)
pt3dadd(75.358, 173.732, 39.491, 0.906)
pt3dadd(75.253, 173.728, 39.539, 0.844)
pt3dadd(75.149, 173.723, 39.588, 0.782)
pt3dadd(75.044, 173.718, 39.637, 0.72)
pt3dadd(74.94, 173.713, 39.686, 0.66)
pt3dadd(74.835, 173.708, 39.735, 0.598)
pt3dadd(74.73, 173.704, 39.784, 0.536)
pt3dadd(74.626, 173.699, 39.833, 0.474)
pt3dadd(74.521, 173.694, 39.882, 0.412)
pt3dadd(74.426, 173.675, 39.94, 0.44)
pt3dadd(74.334, 173.652, 40.001, 0.492)
pt3dadd(74.241, 173.629, 40.061, 0.542)
pt3dadd(74.149, 173.606, 40.122, 0.592)
pt3dadd(74.056, 173.584, 40.183, 0.644)
pt3dadd(73.964, 173.561, 40.244, 0.694)
}
}
proc shape3d_178() {
dend_7[21] { pt3dadd(73.871, 173.537, 40.305, 0.746)
pt3dadd(73.779, 173.514, 40.366, 0.796)
pt3dadd(73.686, 173.491, 40.426, 0.848)
pt3dadd(73.594, 173.468, 40.487, 0.898)
pt3dadd(73.53, 173.41, 40.554, 0.904)
pt3dadd(73.47, 173.345, 40.622, 0.904)
pt3dadd(73.411, 173.28, 40.69, 0.904)
pt3dadd(73.351, 173.215, 40.758, 0.904)
pt3dadd(73.291, 173.15, 40.826, 0.904)
pt3dadd(73.231, 173.086, 40.894, 0.904)
pt3dadd(73.172, 173.021, 40.962, 0.904)
pt3dadd(73.112, 172.956, 41.03, 0.904)
pt3dadd(73.052, 172.891, 41.097, 0.904)
pt3dadd(72.992, 172.826, 41.165, 0.904)
pt3dadd(72.918, 172.753, 41.214, 0.922)
pt3dadd(72.841, 172.679, 41.259, 0.94)
pt3dadd(72.765, 172.604, 41.305, 0.96)
pt3dadd(72.689, 172.53, 41.351, 0.98)
pt3dadd(72.612, 172.456, 41.397, 1)
pt3dadd(72.536, 172.381, 41.442, 1.02)
pt3dadd(72.459, 172.307, 41.488, 1.038)
pt3dadd(72.383, 172.232, 41.534, 1.058)
pt3dadd(72.306, 172.158, 41.58, 1.078)
pt3dadd(72.23, 172.084, 41.625, 1.098)
pt3dadd(72.191, 171.972, 41.64, 1.016)
pt3dadd(72.155, 171.859, 41.653, 0.928)
pt3dadd(72.119, 171.745, 41.665, 0.84)
pt3dadd(72.082, 171.632, 41.678, 0.752)
pt3dadd(72.046, 171.518, 41.691, 0.664)
pt3dadd(72.01, 171.406, 41.703, 0.576)
pt3dadd(71.973, 171.292, 41.716, 0.49)
pt3dadd(71.937, 171.179, 41.729, 0.402)
pt3dadd(71.901, 171.065, 41.741, 0.314)
pt3dadd(71.864, 170.952, 41.754, 0.226)
pt3dadd(71.851, 170.833, 41.754, 0.226)
pt3dadd(71.838, 170.713, 41.754, 0.226)
pt3dadd(71.825, 170.594, 41.754, 0.226)
pt3dadd(71.812, 170.474, 41.754, 0.226)
pt3dadd(71.798, 170.356, 41.754, 0.226)
pt3dadd(71.785, 170.237, 41.754, 0.226)
pt3dadd(71.772, 170.117, 41.754, 0.226)
pt3dadd(71.759, 169.998, 41.754, 0.226)
pt3dadd(71.746, 169.878, 41.754, 0.226)
pt3dadd(71.732, 169.759, 41.754, 0.226)
}
dend_0[8] {pt3dclear()
pt3dstyle(1, 105.606, 131.107, 13.601)
pt3dadd(105.606, 130.99, 13.617, 13.038)
pt3dadd(105.606, 130.871, 13.634, 12.982)
pt3dadd(105.606, 130.752, 13.65, 12.926)
pt3dadd(105.606, 130.634, 13.667, 12.87)
pt3dadd(105.606, 130.516, 13.683, 12.812)
pt3dadd(105.606, 130.397, 13.7, 12.756)
pt3dadd(105.606, 130.279, 13.716, 12.7)
pt3dadd(105.606, 130.16, 13.733, 12.644)
pt3dadd(105.606, 130.043, 13.749, 12.588)
pt3dadd(105.606, 129.924, 13.768, 12.484)
pt3dadd(105.606, 129.808, 13.789, 12.358)
pt3dadd(105.606, 129.69, 13.81, 12.23)
pt3dadd(105.606, 129.572, 13.831, 12.104)
pt3dadd(105.606, 129.455, 13.852, 11.978)
pt3dadd(105.606, 129.338, 13.873, 11.85)
pt3dadd(105.606, 129.221, 13.894, 11.724)
pt3dadd(105.606, 129.103, 13.915, 11.596)
pt3dadd(105.606, 128.986, 13.935, 11.47)
pt3dadd(105.606, 128.868, 13.956, 11.344)
pt3dadd(105.606, 128.759, 13.994, 11.222)
pt3dadd(105.606, 128.652, 14.04, 11.102)
pt3dadd(105.606, 128.545, 14.087, 10.984)
pt3dadd(105.606, 128.44, 14.133, 10.864)
pt3dadd(105.605, 128.333, 14.18, 10.744)
pt3dadd(105.605, 128.227, 14.226, 10.626)
pt3dadd(105.605, 128.12, 14.272, 10.506)
pt3dadd(105.605, 128.014, 14.319, 10.386)
pt3dadd(105.605, 127.908, 14.365, 10.268)
pt3dadd(105.605, 127.801, 14.412, 10.148)
pt3dadd(105.605, 127.699, 14.464, 10.024)
pt3dadd(105.605, 127.597, 14.516, 9.898)
pt3dadd(105.605, 127.494, 14.568, 9.774)
pt3dadd(105.605, 127.392, 14.62, 9.648)
pt3dadd(105.605, 127.289, 14.672, 9.524)
pt3dadd(105.605, 127.187, 14.724, 9.398)
pt3dadd(105.605, 127.085, 14.776, 9.274)
pt3dadd(105.605, 126.982, 14.828, 9.148)
pt3dadd(105.605, 126.88, 14.88, 9.024)
pt3dadd(105.605, 126.776, 14.932, 8.898)
pt3dadd(105.605, 126.673, 14.983, 8.766)
pt3dadd(105.605, 126.57, 15.034, 8.634)
pt3dadd(105.605, 126.468, 15.085, 8.502)
pt3dadd(105.605, 126.365, 15.137, 8.37)
pt3dadd(105.605, 126.262, 15.188, 8.238)
pt3dadd(105.605, 126.158, 15.239, 8.104)
pt3dadd(105.605, 126.055, 15.29, 7.972)
pt3dadd(105.605, 125.952, 15.341, 7.84)
pt3dadd(105.605, 125.849, 15.392, 7.708)
pt3dadd(105.605, 125.744, 15.442, 7.576)
pt3dadd(105.605, 125.633, 15.478, 7.432)
pt3dadd(105.605, 125.521, 15.514, 7.288)
pt3dadd(105.604, 125.408, 15.55, 7.146)
pt3dadd(105.604, 125.297, 15.586, 7.002)
pt3dadd(105.604, 125.185, 15.622, 6.858)
pt3dadd(105.604, 125.074, 15.658, 6.716)
pt3dadd(105.604, 124.961, 15.694, 6.572)
pt3dadd(105.604, 124.849, 15.73, 6.428)
pt3dadd(105.604, 124.738, 15.766, 6.286)
pt3dadd(105.604, 124.625, 15.801, 6.146)
pt3dadd(105.603, 124.507, 15.82, 6.05)
pt3dadd(105.603, 124.39, 15.838, 5.954)
pt3dadd(105.603, 124.271, 15.857, 5.856)
pt3dadd(105.603, 124.153, 15.876, 5.76)
pt3dadd(105.602, 124.036, 15.894, 5.664)
pt3dadd(105.602, 123.918, 15.913, 5.566)
pt3dadd(105.602, 123.799, 15.931, 5.47)
pt3dadd(105.602, 123.682, 15.95, 5.374)
pt3dadd(105.601, 123.564, 15.969, 5.278)
pt3dadd(105.601, 123.446, 15.987, 5.18)
pt3dadd(105.601, 123.326, 16, 5.07)
pt3dadd(105.6, 123.208, 16.013, 4.958)
pt3dadd(105.6, 123.089, 16.026, 4.848)
pt3dadd(105.6, 122.97, 16.04, 4.738)
pt3dadd(105.599, 122.851, 16.053, 4.628)
pt3dadd(105.599, 122.732, 16.066, 4.518)
pt3dadd(105.599, 122.614, 16.079, 4.408)
pt3dadd(105.598, 122.495, 16.092, 4.298)
pt3dadd(105.598, 122.375, 16.105, 4.188)
pt3dadd(105.597, 122.257, 16.12, 4.08)
pt3dadd(105.597, 122.141, 16.147, 3.99)
}
dend_7[22] {pt3dclear()
pt3dadd(105.597, 122.141, 16.147, 3.99)
pt3dadd(105.596, 122.026, 16.174, 3.9)
pt3dadd(105.595, 121.91, 16.201, 3.81)
pt3dadd(105.594, 121.795, 16.228, 3.72)
pt3dadd(105.593, 121.679, 16.255, 3.63)
pt3dadd(105.592, 121.564, 16.282, 3.54)
pt3dadd(105.592, 121.448, 16.309, 3.45)
pt3dadd(105.591, 121.333, 16.337, 3.36)
pt3dadd(105.59, 121.217, 16.364, 3.27)
pt3dadd(105.589, 121.102, 16.392, 3.188)
pt3dadd(105.588, 120.989, 16.426, 3.14)
pt3dadd(105.586, 120.876, 16.459, 3.09)
pt3dadd(105.585, 120.763, 16.493, 3.042)
pt3dadd(105.584, 120.65, 16.526, 2.994)
pt3dadd(105.582, 120.536, 16.559, 2.944)
pt3dadd(105.581, 120.424, 16.593, 2.896)
pt3dadd(105.58, 120.311, 16.627, 2.848)
pt3dadd(105.578, 120.198, 16.66, 2.8)
pt3dadd(105.577, 120.084, 16.694, 2.75)
pt3dadd(105.576, 119.971, 16.725, 2.712)
pt3dadd(105.573, 119.854, 16.748, 2.712)
pt3dadd(105.57, 119.737, 16.772, 2.712)
pt3dadd(105.568, 119.621, 16.795, 2.712)
pt3dadd(105.565, 119.504, 16.819, 2.712)
pt3dadd(105.563, 119.388, 16.842, 2.712)
pt3dadd(105.56, 119.271, 16.865, 2.712)
pt3dadd(105.558, 119.154, 16.889, 2.712)
pt3dadd(105.555, 119.038, 16.912, 2.712)
pt3dadd(105.553, 118.921, 16.936, 2.712)
pt3dadd(105.55, 118.804, 16.957, 2.712)
pt3dadd(105.545, 118.685, 16.97, 2.712)
pt3dadd(105.54, 118.566, 16.982, 2.712)
pt3dadd(105.536, 118.447, 16.995, 2.712)
pt3dadd(105.531, 118.328, 17.008, 2.712)
pt3dadd(105.526, 118.209, 17.021, 2.712)
pt3dadd(105.522, 118.09, 17.033, 2.712)
pt3dadd(105.517, 117.971, 17.046, 2.712)
pt3dadd(105.512, 117.852, 17.059, 2.712)
pt3dadd(105.508, 117.734, 17.072, 2.712)
pt3dadd(105.502, 117.615, 17.082, 2.704)
pt3dadd(105.49, 117.495, 17.086, 2.666)
pt3dadd(105.479, 117.376, 17.09, 2.628)
pt3dadd(105.468, 117.256, 17.094, 2.592)
pt3dadd(105.457, 117.137, 17.097, 2.554)
pt3dadd(105.446, 117.018, 17.101, 2.516)
pt3dadd(105.435, 116.898, 17.105, 2.48)
pt3dadd(105.423, 116.779, 17.109, 2.442)
pt3dadd(105.412, 116.659, 17.112, 2.404)
pt3dadd(105.401, 116.54, 17.116, 2.366)
pt3dadd(105.388, 116.421, 17.121, 2.336)
pt3dadd(105.369, 116.303, 17.128, 2.328)
pt3dadd(105.35, 116.185, 17.135, 2.32)
pt3dadd(105.331, 116.066, 17.142, 2.312)
pt3dadd(105.311, 115.948, 17.15, 2.304)
pt3dadd(105.292, 115.83, 17.157, 2.298)
pt3dadd(105.273, 115.712, 17.164, 2.29)
pt3dadd(105.254, 115.594, 17.171, 2.282)
pt3dadd(105.234, 115.476, 17.179, 2.274)
pt3dadd(105.215, 115.358, 17.186, 2.266)
pt3dadd(105.189, 115.242, 17.194, 2.26)
pt3dadd(105.14, 115.133, 17.206, 2.26)
pt3dadd(105.091, 115.024, 17.217, 2.26)
pt3dadd(105.042, 114.916, 17.229, 2.26)
pt3dadd(104.993, 114.807, 17.24, 2.26)
pt3dadd(104.944, 114.698, 17.252, 2.26)
pt3dadd(104.895, 114.59, 17.264, 2.26)
pt3dadd(104.846, 114.481, 17.275, 2.26)
pt3dadd(104.797, 114.372, 17.287, 2.26)
pt3dadd(104.748, 114.264, 17.299, 2.26)
pt3dadd(104.694, 114.161, 17.318, 2.252)
pt3dadd(104.63, 114.067, 17.35, 2.228)
pt3dadd(104.565, 113.973, 17.383, 2.206)
pt3dadd(104.501, 113.88, 17.416, 2.182)
pt3dadd(104.437, 113.786, 17.448, 2.158)
pt3dadd(104.373, 113.693, 17.481, 2.136)
}
}
proc shape3d_179() {
dend_7[22] { pt3dadd(104.309, 113.599, 17.513, 2.112)
pt3dadd(104.245, 113.505, 17.546, 2.09)
pt3dadd(104.181, 113.412, 17.579, 2.066)
pt3dadd(104.117, 113.318, 17.611, 2.044)
pt3dadd(104.047, 113.232, 17.649, 2.008)
pt3dadd(103.974, 113.151, 17.69, 1.966)
pt3dadd(103.9, 113.07, 17.732, 1.926)
pt3dadd(103.827, 112.989, 17.773, 1.884)
pt3dadd(103.754, 112.908, 17.815, 1.842)
pt3dadd(103.68, 112.827, 17.856, 1.8)
pt3dadd(103.607, 112.746, 17.897, 1.758)
pt3dadd(103.534, 112.666, 17.939, 1.716)
pt3dadd(103.46, 112.585, 17.98, 1.674)
pt3dadd(103.387, 112.504, 18.022, 1.632)
pt3dadd(103.308, 112.423, 18.054, 1.604)
pt3dadd(103.227, 112.341, 18.083, 1.584)
pt3dadd(103.145, 112.26, 18.111, 1.562)
pt3dadd(103.064, 112.179, 18.139, 1.542)
pt3dadd(102.982, 112.098, 18.168, 1.52)
pt3dadd(102.901, 112.017, 18.196, 1.5)
pt3dadd(102.819, 111.935, 18.225, 1.478)
pt3dadd(102.738, 111.854, 18.253, 1.458)
pt3dadd(102.656, 111.773, 18.281, 1.436)
pt3dadd(102.574, 111.692, 18.31, 1.416)
pt3dadd(102.492, 111.61, 18.333, 1.42)
pt3dadd(102.408, 111.527, 18.354, 1.438)
pt3dadd(102.325, 111.445, 18.376, 1.456)
pt3dadd(102.242, 111.362, 18.397, 1.472)
pt3dadd(102.159, 111.279, 18.418, 1.49)
pt3dadd(102.075, 111.197, 18.439, 1.508)
pt3dadd(101.992, 111.114, 18.46, 1.524)
pt3dadd(101.909, 111.032, 18.481, 1.542)
pt3dadd(101.825, 110.949, 18.502, 1.558)
pt3dadd(101.742, 110.867, 18.523, 1.576)
pt3dadd(101.663, 110.789, 18.56, 1.596)
pt3dadd(101.586, 110.714, 18.605, 1.616)
pt3dadd(101.51, 110.638, 18.649, 1.636)
pt3dadd(101.433, 110.563, 18.694, 1.658)
pt3dadd(101.357, 110.488, 18.739, 1.678)
pt3dadd(101.28, 110.413, 18.783, 1.698)
pt3dadd(101.2, 110.335, 18.821, 1.696)
pt3dadd(101.12, 110.257, 18.856, 1.69)
pt3dadd(101.039, 110.179, 18.892, 1.684)
pt3dadd(100.959, 110.101, 18.928, 1.676)
pt3dadd(100.879, 110.023, 18.963, 1.67)
pt3dadd(100.798, 109.945, 18.999, 1.662)
pt3dadd(100.718, 109.866, 19.035, 1.656)
pt3dadd(100.637, 109.788, 19.07, 1.648)
pt3dadd(100.557, 109.71, 19.106, 1.642)
pt3dadd(100.476, 109.632, 19.142, 1.636)
pt3dadd(100.393, 109.552, 19.167, 1.616)
pt3dadd(100.309, 109.471, 19.191, 1.596)
pt3dadd(100.224, 109.391, 19.214, 1.574)
pt3dadd(100.14, 109.31, 19.238, 1.554)
pt3dadd(100.056, 109.229, 19.262, 1.532)
pt3dadd(99.972, 109.149, 19.285, 1.512)
pt3dadd(99.888, 109.068, 19.309, 1.49)
pt3dadd(99.803, 108.988, 19.333, 1.47)
pt3dadd(99.719, 108.907, 19.357, 1.448)
pt3dadd(99.635, 108.826, 19.38, 1.428)
pt3dadd(99.548, 108.746, 19.397, 1.452)
pt3dadd(99.461, 108.665, 19.412, 1.484)
pt3dadd(99.375, 108.585, 19.428, 1.516)
pt3dadd(99.288, 108.504, 19.444, 1.548)
pt3dadd(99.201, 108.423, 19.459, 1.58)
pt3dadd(99.114, 108.343, 19.475, 1.612)
pt3dadd(99.027, 108.262, 19.491, 1.642)
pt3dadd(98.94, 108.181, 19.506, 1.674)
pt3dadd(98.853, 108.101, 19.522, 1.706)
pt3dadd(98.766, 108.02, 19.538, 1.738)
pt3dadd(98.678, 107.94, 19.549, 1.758)
pt3dadd(98.589, 107.86, 19.561, 1.776)
pt3dadd(98.501, 107.781, 19.572, 1.794)
pt3dadd(98.412, 107.701, 19.583, 1.812)
pt3dadd(98.324, 107.621, 19.595, 1.83)
pt3dadd(98.235, 107.541, 19.606, 1.848)
pt3dadd(98.147, 107.461, 19.618, 1.866)
pt3dadd(98.058, 107.381, 19.629, 1.884)
pt3dadd(97.97, 107.302, 19.64, 1.902)
pt3dadd(97.881, 107.222, 19.652, 1.92)
pt3dadd(97.79, 107.146, 19.667, 1.93)
pt3dadd(97.699, 107.071, 19.684, 1.936)
pt3dadd(97.607, 106.995, 19.701, 1.944)
pt3dadd(97.516, 106.92, 19.717, 1.952)
pt3dadd(97.425, 106.845, 19.734, 1.96)
pt3dadd(97.334, 106.769, 19.75, 1.966)
pt3dadd(97.242, 106.694, 19.767, 1.974)
pt3dadd(97.151, 106.619, 19.783, 1.982)
pt3dadd(97.06, 106.543, 19.8, 1.988)
pt3dadd(96.968, 106.468, 19.816, 1.996)
pt3dadd(96.873, 106.409, 19.852, 1.982)
pt3dadd(96.778, 106.351, 19.888, 1.966)
pt3dadd(96.682, 106.293, 19.925, 1.95)
pt3dadd(96.587, 106.235, 19.961, 1.934)
pt3dadd(96.491, 106.176, 19.998, 1.918)
pt3dadd(96.396, 106.118, 20.034, 1.902)
pt3dadd(96.301, 106.06, 20.07, 1.886)
pt3dadd(96.205, 106.002, 20.107, 1.87)
pt3dadd(96.11, 105.944, 20.143, 1.854)
pt3dadd(96.014, 105.885, 20.179, 1.838)
pt3dadd(95.923, 105.816, 20.209, 1.846)
pt3dadd(95.832, 105.746, 20.239, 1.858)
pt3dadd(95.741, 105.677, 20.269, 1.868)
pt3dadd(95.65, 105.607, 20.298, 1.878)
pt3dadd(95.56, 105.537, 20.328, 1.888)
pt3dadd(95.469, 105.467, 20.358, 1.898)
pt3dadd(95.378, 105.397, 20.387, 1.908)
pt3dadd(95.287, 105.328, 20.417, 1.918)
pt3dadd(95.196, 105.258, 20.446, 1.928)
pt3dadd(95.105, 105.188, 20.476, 1.938)
pt3dadd(95.018, 105.112, 20.502, 1.928)
pt3dadd(94.931, 105.035, 20.528, 1.918)
pt3dadd(94.844, 104.959, 20.554, 1.91)
pt3dadd(94.756, 104.883, 20.58, 1.9)
pt3dadd(94.669, 104.806, 20.606, 1.89)
pt3dadd(94.582, 104.73, 20.632, 1.88)
pt3dadd(94.495, 104.653, 20.658, 1.87)
pt3dadd(94.408, 104.577, 20.684, 1.86)
pt3dadd(94.321, 104.501, 20.71, 1.85)
pt3dadd(94.234, 104.424, 20.736, 1.84)
pt3dadd(94.151, 104.342, 20.759, 1.792)
pt3dadd(94.068, 104.259, 20.781, 1.744)
pt3dadd(93.985, 104.177, 20.804, 1.694)
pt3dadd(93.902, 104.094, 20.827, 1.646)
pt3dadd(93.82, 104.012, 20.849, 1.598)
pt3dadd(93.737, 103.929, 20.872, 1.55)
pt3dadd(93.654, 103.847, 20.895, 1.502)
pt3dadd(93.571, 103.764, 20.918, 1.452)
pt3dadd(93.488, 103.682, 20.941, 1.404)
pt3dadd(93.406, 103.6, 20.963, 1.356)
}
dend_7[23] {pt3dclear()
pt3dadd(93.406, 103.6, 20.963, 1.356)
pt3dadd(93.398, 103.585, 20.97, 1.362)
pt3dadd(93.348, 103.49, 21.015, 1.396)
pt3dadd(93.299, 103.395, 21.06, 1.43)
pt3dadd(93.249, 103.3, 21.105, 1.464)
pt3dadd(93.2, 103.205, 21.15, 1.5)
pt3dadd(93.15, 103.11, 21.195, 1.534)
pt3dadd(93.097, 103.017, 21.241, 1.558)
pt3dadd(93.044, 102.924, 21.287, 1.58)
pt3dadd(92.991, 102.832, 21.333, 1.602)
pt3dadd(92.938, 102.74, 21.379, 1.624)
pt3dadd(92.885, 102.648, 21.425, 1.646)
pt3dadd(92.831, 102.555, 21.471, 1.67)
pt3dadd(92.778, 102.463, 21.517, 1.692)
pt3dadd(92.725, 102.371, 21.563, 1.714)
pt3dadd(92.672, 102.278, 21.609, 1.736)
pt3dadd(92.619, 102.186, 21.655, 1.758)
pt3dadd(92.561, 102.101, 21.707, 1.744)
pt3dadd(92.502, 102.017, 21.759, 1.726)
pt3dadd(92.444, 101.934, 21.811, 1.708)
pt3dadd(92.386, 101.85, 21.864, 1.69)
pt3dadd(92.327, 101.766, 21.916, 1.672)
pt3dadd(92.269, 101.682, 21.969, 1.654)
pt3dadd(92.21, 101.598, 22.021, 1.636)
pt3dadd(92.152, 101.515, 22.074, 1.618)
pt3dadd(92.093, 101.431, 22.126, 1.6)
pt3dadd(92.035, 101.347, 22.179, 1.582)
pt3dadd(92.014, 101.257, 22.242, 1.582)
pt3dadd(91.992, 101.166, 22.305, 1.582)
pt3dadd(91.971, 101.076, 22.369, 1.582)
pt3dadd(91.95, 100.986, 22.432, 1.582)
pt3dadd(91.928, 100.895, 22.496, 1.582)
pt3dadd(91.907, 100.805, 22.559, 1.582)
pt3dadd(91.886, 100.715, 22.622, 1.582)
pt3dadd(91.864, 100.624, 22.686, 1.582)
pt3dadd(91.843, 100.534, 22.749, 1.582)
pt3dadd(91.822, 100.444, 22.812, 1.582)
}
dend_7[24] {pt3dclear()
pt3dadd(91.822, 100.444, 22.812, 1.582)
pt3dadd(91.822, 100.426, 22.823, 1.586)
pt3dadd(91.822, 100.33, 22.883, 1.602)
pt3dadd(91.822, 100.234, 22.943, 1.62)
pt3dadd(91.822, 100.137, 23.002, 1.638)
pt3dadd(91.822, 100.041, 23.062, 1.654)
pt3dadd(91.823, 99.945, 23.122, 1.672)
pt3dadd(91.825, 99.848, 23.18, 1.684)
pt3dadd(91.838, 99.747, 23.234, 1.67)
pt3dadd(91.85, 99.646, 23.287, 1.658)
pt3dadd(91.863, 99.545, 23.34, 1.644)
pt3dadd(91.876, 99.444, 23.393, 1.632)
pt3dadd(91.888, 99.344, 23.446, 1.618)
pt3dadd(91.901, 99.243, 23.499, 1.606)
pt3dadd(91.914, 99.142, 23.552, 1.592)
pt3dadd(91.926, 99.041, 23.606, 1.58)
pt3dadd(91.939, 98.94, 23.659, 1.568)
pt3dadd(91.963, 98.838, 23.705, 1.526)
pt3dadd(92.004, 98.733, 23.738, 1.442)
pt3dadd(92.045, 98.628, 23.772, 1.358)
pt3dadd(92.087, 98.523, 23.806, 1.274)
pt3dadd(92.128, 98.418, 23.84, 1.19)
pt3dadd(92.169, 98.313, 23.874, 1.106)
pt3dadd(92.211, 98.207, 23.908, 1.022)
pt3dadd(92.252, 98.102, 23.941, 0.938)
pt3dadd(92.294, 97.997, 23.975, 0.854)
pt3dadd(92.335, 97.892, 24.009, 0.77)
pt3dadd(92.371, 97.783, 24.037, 0.744)
pt3dadd(92.399, 97.669, 24.056, 0.81)
pt3dadd(92.426, 97.554, 24.074, 0.876)
pt3dadd(92.454, 97.439, 24.092, 0.942)
pt3dadd(92.481, 97.325, 24.111, 1.01)
pt3dadd(92.509, 97.21, 24.129, 1.076)
}
}
proc shape3d_180() {
dend_7[24] { pt3dadd(92.536, 97.095, 24.147, 1.142)
pt3dadd(92.564, 96.981, 24.166, 1.208)
pt3dadd(92.591, 96.866, 24.184, 1.274)
pt3dadd(92.619, 96.751, 24.202, 1.34)
pt3dadd(92.641, 96.635, 24.219, 1.382)
pt3dadd(92.655, 96.517, 24.232, 1.388)
pt3dadd(92.67, 96.399, 24.246, 1.396)
pt3dadd(92.684, 96.281, 24.259, 1.402)
pt3dadd(92.699, 96.163, 24.272, 1.408)
pt3dadd(92.713, 96.045, 24.286, 1.414)
pt3dadd(92.728, 95.927, 24.299, 1.42)
pt3dadd(92.742, 95.809, 24.313, 1.428)
pt3dadd(92.756, 95.691, 24.326, 1.434)
pt3dadd(92.771, 95.573, 24.339, 1.44)
pt3dadd(92.779, 95.456, 24.358, 1.436)
pt3dadd(92.78, 95.34, 24.384, 1.418)
pt3dadd(92.78, 95.224, 24.41, 1.4)
pt3dadd(92.78, 95.108, 24.436, 1.38)
pt3dadd(92.78, 94.992, 24.462, 1.362)
pt3dadd(92.781, 94.876, 24.488, 1.344)
pt3dadd(92.781, 94.76, 24.514, 1.324)
pt3dadd(92.781, 94.644, 24.54, 1.306)
pt3dadd(92.781, 94.529, 24.566, 1.288)
pt3dadd(92.781, 94.413, 24.592, 1.27)
pt3dadd(92.776, 94.299, 24.623, 1.248)
pt3dadd(92.767, 94.187, 24.657, 1.226)
pt3dadd(92.757, 94.074, 24.691, 1.202)
pt3dadd(92.748, 93.962, 24.726, 1.18)
pt3dadd(92.739, 93.85, 24.76, 1.156)
pt3dadd(92.729, 93.737, 24.795, 1.134)
pt3dadd(92.719, 93.625, 24.829, 1.112)
pt3dadd(92.71, 93.513, 24.863, 1.088)
pt3dadd(92.7, 93.401, 24.898, 1.066)
pt3dadd(92.691, 93.288, 24.932, 1.042)
pt3dadd(92.678, 93.174, 24.961, 1.012)
pt3dadd(92.663, 93.059, 24.986, 0.978)
pt3dadd(92.648, 92.944, 25.01, 0.944)
pt3dadd(92.633, 92.828, 25.035, 0.908)
pt3dadd(92.618, 92.713, 25.059, 0.874)
pt3dadd(92.603, 92.598, 25.084, 0.84)
pt3dadd(92.588, 92.482, 25.109, 0.804)
pt3dadd(92.573, 92.367, 25.133, 0.77)
pt3dadd(92.558, 92.252, 25.158, 0.734)
pt3dadd(92.543, 92.136, 25.183, 0.7)
pt3dadd(92.511, 92.024, 25.201, 0.696)
pt3dadd(92.466, 91.914, 25.213, 0.714)
pt3dadd(92.421, 91.803, 25.226, 0.73)
pt3dadd(92.376, 91.693, 25.239, 0.748)
pt3dadd(92.332, 91.583, 25.252, 0.766)
pt3dadd(92.287, 91.473, 25.265, 0.784)
pt3dadd(92.242, 91.363, 25.278, 0.802)
pt3dadd(92.197, 91.252, 25.291, 0.82)
pt3dadd(92.152, 91.142, 25.304, 0.836)
pt3dadd(92.107, 91.032, 25.316, 0.854)
pt3dadd(92.069, 90.919, 25.327, 0.872)
pt3dadd(92.035, 90.804, 25.335, 0.89)
pt3dadd(92.001, 90.69, 25.343, 0.908)
pt3dadd(91.967, 90.575, 25.351, 0.928)
pt3dadd(91.933, 90.46, 25.36, 0.946)
pt3dadd(91.9, 90.346, 25.368, 0.964)
pt3dadd(91.866, 90.231, 25.376, 0.982)
pt3dadd(91.832, 90.116, 25.385, 1)
pt3dadd(91.798, 90.002, 25.393, 1.02)
pt3dadd(91.764, 89.887, 25.401, 1.038)
pt3dadd(91.737, 89.771, 25.41, 1.05)
pt3dadd(91.714, 89.653, 25.42, 1.058)
pt3dadd(91.692, 89.536, 25.429, 1.068)
pt3dadd(91.669, 89.419, 25.439, 1.076)
pt3dadd(91.646, 89.302, 25.448, 1.084)
pt3dadd(91.623, 89.184, 25.458, 1.092)
pt3dadd(91.6, 89.067, 25.467, 1.102)
pt3dadd(91.577, 88.95, 25.476, 1.11)
pt3dadd(91.554, 88.833, 25.486, 1.118)
pt3dadd(91.532, 88.715, 25.495, 1.126)
pt3dadd(91.514, 88.598, 25.512, 1.13)
pt3dadd(91.501, 88.482, 25.532, 1.13)
pt3dadd(91.487, 88.365, 25.553, 1.13)
pt3dadd(91.473, 88.249, 25.574, 1.13)
pt3dadd(91.46, 88.132, 25.594, 1.13)
pt3dadd(91.446, 88.015, 25.615, 1.13)
pt3dadd(91.432, 87.899, 25.636, 1.13)
pt3dadd(91.419, 87.782, 25.656, 1.13)
pt3dadd(91.405, 87.666, 25.677, 1.13)
pt3dadd(91.391, 87.549, 25.698, 1.13)
pt3dadd(91.382, 87.436, 25.729, 1.128)
pt3dadd(91.373, 87.324, 25.766, 1.126)
pt3dadd(91.365, 87.213, 25.802, 1.122)
pt3dadd(91.357, 87.102, 25.839, 1.12)
pt3dadd(91.349, 86.99, 25.875, 1.116)
pt3dadd(91.341, 86.879, 25.911, 1.114)
pt3dadd(91.332, 86.767, 25.948, 1.112)
pt3dadd(91.324, 86.656, 25.984, 1.108)
pt3dadd(91.316, 86.544, 26.021, 1.106)
pt3dadd(91.308, 86.433, 26.057, 1.104)
pt3dadd(91.296, 86.318, 26.085, 1.076)
pt3dadd(91.282, 86.203, 26.109, 1.038)
pt3dadd(91.269, 86.087, 26.134, 1.002)
pt3dadd(91.255, 85.972, 26.158, 0.966)
pt3dadd(91.242, 85.856, 26.183, 0.928)
pt3dadd(91.228, 85.74, 26.207, 0.89)
pt3dadd(91.215, 85.625, 26.231, 0.854)
pt3dadd(91.201, 85.509, 26.256, 0.816)
pt3dadd(91.188, 85.394, 26.28, 0.78)
pt3dadd(91.174, 85.278, 26.305, 0.742)
pt3dadd(91.142, 85.165, 26.321, 0.728)
pt3dadd(91.102, 85.053, 26.335, 0.722)
pt3dadd(91.062, 84.941, 26.348, 0.718)
pt3dadd(91.022, 84.829, 26.362, 0.712)
pt3dadd(90.982, 84.717, 26.375, 0.706)
pt3dadd(90.942, 84.605, 26.389, 0.702)
pt3dadd(90.902, 84.493, 26.403, 0.696)
pt3dadd(90.862, 84.381, 26.416, 0.69)
pt3dadd(90.822, 84.269, 26.43, 0.684)
pt3dadd(90.782, 84.157, 26.443, 0.68)
pt3dadd(90.746, 84.043, 26.451, 0.694)
pt3dadd(90.71, 83.929, 26.458, 0.716)
pt3dadd(90.675, 83.815, 26.464, 0.738)
pt3dadd(90.639, 83.7, 26.471, 0.76)
pt3dadd(90.604, 83.586, 26.477, 0.782)
pt3dadd(90.568, 83.472, 26.484, 0.802)
pt3dadd(90.533, 83.357, 26.49, 0.824)
pt3dadd(90.497, 83.243, 26.497, 0.846)
pt3dadd(90.462, 83.129, 26.504, 0.868)
pt3dadd(90.426, 83.014, 26.51, 0.89)
pt3dadd(90.4, 82.897, 26.515, 0.924)
pt3dadd(90.377, 82.78, 26.519, 0.962)
pt3dadd(90.354, 82.662, 26.524, 1)
pt3dadd(90.331, 82.545, 26.528, 1.036)
pt3dadd(90.308, 82.427, 26.533, 1.074)
pt3dadd(90.284, 82.309, 26.537, 1.112)
pt3dadd(90.261, 82.192, 26.542, 1.15)
pt3dadd(90.238, 82.074, 26.546, 1.188)
pt3dadd(90.215, 81.956, 26.551, 1.226)
pt3dadd(90.192, 81.839, 26.555, 1.264)
pt3dadd(90.178, 81.72, 26.562, 1.292)
pt3dadd(90.167, 81.601, 26.57, 1.32)
pt3dadd(90.156, 81.482, 26.578, 1.348)
pt3dadd(90.145, 81.363, 26.586, 1.376)
pt3dadd(90.135, 81.243, 26.594, 1.404)
pt3dadd(90.124, 81.124, 26.602, 1.432)
pt3dadd(90.113, 81.005, 26.61, 1.46)
pt3dadd(90.102, 80.886, 26.618, 1.486)
pt3dadd(90.091, 80.767, 26.626, 1.514)
pt3dadd(90.08, 80.648, 26.634, 1.542)
pt3dadd(90.078, 80.529, 26.645, 1.532)
pt3dadd(90.078, 80.41, 26.658, 1.512)
pt3dadd(90.077, 80.291, 26.67, 1.494)
pt3dadd(90.077, 80.171, 26.681, 1.474)
pt3dadd(90.077, 80.052, 26.693, 1.454)
pt3dadd(90.077, 79.933, 26.705, 1.436)
pt3dadd(90.076, 79.814, 26.717, 1.416)
pt3dadd(90.076, 79.695, 26.729, 1.398)
pt3dadd(90.076, 79.576, 26.741, 1.378)
pt3dadd(90.076, 79.457, 26.753, 1.36)
pt3dadd(90.075, 79.344, 26.786, 1.342)
pt3dadd(90.075, 79.233, 26.824, 1.324)
pt3dadd(90.075, 79.122, 26.862, 1.306)
pt3dadd(90.074, 79.011, 26.9, 1.288)
pt3dadd(90.074, 78.9, 26.938, 1.27)
pt3dadd(90.074, 78.789, 26.976, 1.252)
pt3dadd(90.073, 78.678, 27.014, 1.234)
pt3dadd(90.073, 78.567, 27.052, 1.216)
pt3dadd(90.072, 78.456, 27.09, 1.198)
pt3dadd(90.072, 78.345, 27.128, 1.18)
pt3dadd(90.071, 78.231, 27.158, 1.184)
pt3dadd(90.07, 78.116, 27.187, 1.194)
pt3dadd(90.07, 78.001, 27.216, 1.202)
pt3dadd(90.069, 77.886, 27.245, 1.212)
pt3dadd(90.068, 77.771, 27.274, 1.222)
pt3dadd(90.067, 77.656, 27.303, 1.23)
pt3dadd(90.066, 77.541, 27.332, 1.24)
pt3dadd(90.065, 77.426, 27.361, 1.25)
pt3dadd(90.065, 77.312, 27.389, 1.258)
pt3dadd(90.064, 77.197, 27.418, 1.268)
pt3dadd(90.062, 77.079, 27.439, 1.286)
pt3dadd(90.06, 76.962, 27.459, 1.304)
pt3dadd(90.059, 76.844, 27.479, 1.324)
pt3dadd(90.057, 76.726, 27.498, 1.344)
pt3dadd(90.055, 76.609, 27.518, 1.362)
pt3dadd(90.054, 76.491, 27.538, 1.382)
pt3dadd(90.052, 76.374, 27.557, 1.4)
pt3dadd(90.05, 76.256, 27.577, 1.42)
pt3dadd(90.049, 76.138, 27.596, 1.44)
pt3dadd(90.047, 76.02, 27.616, 1.458)
pt3dadd(90.044, 75.902, 27.629, 1.466)
pt3dadd(90.041, 75.783, 27.641, 1.47)
pt3dadd(90.038, 75.663, 27.653, 1.474)
pt3dadd(90.035, 75.544, 27.665, 1.478)
pt3dadd(90.032, 75.425, 27.676, 1.482)
pt3dadd(90.029, 75.306, 27.688, 1.486)
pt3dadd(90.025, 75.187, 27.7, 1.49)
pt3dadd(90.022, 75.068, 27.712, 1.494)
pt3dadd(90.019, 74.949, 27.724, 1.498)
pt3dadd(90.016, 74.83, 27.736, 1.502)
pt3dadd(90.01, 74.71, 27.746, 1.486)
pt3dadd(90.003, 74.591, 27.755, 1.464)
pt3dadd(89.996, 74.472, 27.765, 1.444)
pt3dadd(89.989, 74.353, 27.774, 1.422)
pt3dadd(89.982, 74.233, 27.784, 1.402)
pt3dadd(89.975, 74.114, 27.793, 1.38)
}
}
proc shape3d_181() {
dend_7[24] { pt3dadd(89.968, 73.995, 27.803, 1.36)
pt3dadd(89.961, 73.876, 27.813, 1.34)
pt3dadd(89.954, 73.756, 27.822, 1.318)
pt3dadd(89.947, 73.637, 27.832, 1.298)
pt3dadd(89.933, 73.521, 27.854, 1.274)
pt3dadd(89.918, 73.406, 27.878, 1.252)
pt3dadd(89.902, 73.29, 27.902, 1.228)
pt3dadd(89.887, 73.175, 27.926, 1.206)
pt3dadd(89.872, 73.059, 27.95, 1.182)
pt3dadd(89.857, 72.944, 27.974, 1.16)
pt3dadd(89.842, 72.828, 27.998, 1.138)
pt3dadd(89.826, 72.713, 28.021, 1.114)
pt3dadd(89.811, 72.597, 28.045, 1.092)
pt3dadd(89.794, 72.483, 28.071, 1.068)
pt3dadd(89.755, 72.385, 28.118, 1.052)
pt3dadd(89.716, 72.286, 28.166, 1.036)
pt3dadd(89.676, 72.188, 28.213, 1.018)
pt3dadd(89.637, 72.09, 28.26, 1.002)
pt3dadd(89.597, 71.992, 28.307, 0.984)
pt3dadd(89.558, 71.894, 28.354, 0.968)
pt3dadd(89.519, 71.796, 28.402, 0.95)
pt3dadd(89.479, 71.697, 28.449, 0.934)
pt3dadd(89.44, 71.599, 28.496, 0.916)
pt3dadd(89.395, 71.501, 28.538, 0.904)
pt3dadd(89.335, 71.402, 28.565, 0.904)
pt3dadd(89.276, 71.303, 28.591, 0.904)
pt3dadd(89.216, 71.204, 28.618, 0.904)
pt3dadd(89.156, 71.105, 28.645, 0.904)
pt3dadd(89.097, 71.006, 28.671, 0.904)
pt3dadd(89.037, 70.907, 28.698, 0.904)
pt3dadd(88.977, 70.808, 28.725, 0.904)
pt3dadd(88.917, 70.709, 28.752, 0.904)
pt3dadd(88.858, 70.61, 28.778, 0.904)
pt3dadd(88.801, 70.508, 28.802, 0.906)
pt3dadd(88.75, 70.402, 28.82, 0.91)
pt3dadd(88.7, 70.295, 28.838, 0.916)
pt3dadd(88.649, 70.188, 28.856, 0.922)
pt3dadd(88.598, 70.081, 28.873, 0.926)
pt3dadd(88.548, 69.975, 28.891, 0.932)
pt3dadd(88.497, 69.868, 28.909, 0.936)
pt3dadd(88.447, 69.761, 28.927, 0.942)
pt3dadd(88.396, 69.655, 28.945, 0.948)
pt3dadd(88.346, 69.548, 28.962, 0.952)
pt3dadd(88.291, 69.443, 28.978, 0.976)
pt3dadd(88.228, 69.342, 28.988, 1.042)
pt3dadd(88.165, 69.24, 28.998, 1.106)
pt3dadd(88.102, 69.139, 29.008, 1.172)
pt3dadd(88.039, 69.038, 29.018, 1.238)
pt3dadd(87.976, 68.936, 29.028, 1.302)
pt3dadd(87.912, 68.835, 29.039, 1.368)
pt3dadd(87.849, 68.734, 29.049, 1.432)
pt3dadd(87.786, 68.632, 29.059, 1.498)
pt3dadd(87.723, 68.531, 29.069, 1.564)
pt3dadd(87.663, 68.429, 29.085, 1.612)
pt3dadd(87.611, 68.326, 29.112, 1.62)
pt3dadd(87.559, 68.224, 29.14, 1.628)
pt3dadd(87.506, 68.121, 29.168, 1.636)
pt3dadd(87.454, 68.018, 29.195, 1.646)
pt3dadd(87.402, 67.915, 29.223, 1.654)
pt3dadd(87.35, 67.812, 29.251, 1.662)
pt3dadd(87.297, 67.71, 29.278, 1.67)
pt3dadd(87.245, 67.607, 29.306, 1.68)
pt3dadd(87.193, 67.504, 29.334, 1.688)
pt3dadd(87.14, 67.402, 29.363, 1.678)
pt3dadd(87.087, 67.301, 29.393, 1.642)
pt3dadd(87.033, 67.2, 29.424, 1.604)
pt3dadd(86.98, 67.099, 29.455, 1.568)
pt3dadd(86.927, 66.998, 29.486, 1.53)
pt3dadd(86.874, 66.897, 29.517, 1.492)
pt3dadd(86.82, 66.796, 29.548, 1.456)
pt3dadd(86.767, 66.695, 29.578, 1.418)
pt3dadd(86.714, 66.594, 29.609, 1.382)
pt3dadd(86.66, 66.494, 29.64, 1.344)
pt3dadd(86.601, 66.394, 29.667, 1.288)
pt3dadd(86.535, 66.298, 29.689, 1.21)
pt3dadd(86.469, 66.201, 29.71, 1.13)
pt3dadd(86.403, 66.104, 29.732, 1.05)
pt3dadd(86.337, 66.007, 29.753, 0.972)
pt3dadd(86.271, 65.91, 29.775, 0.892)
pt3dadd(86.205, 65.814, 29.797, 0.814)
pt3dadd(86.139, 65.717, 29.818, 0.734)
pt3dadd(86.073, 65.62, 29.84, 0.654)
pt3dadd(86.007, 65.523, 29.862, 0.576)
pt3dadd(85.938, 65.428, 29.879, 0.528)
pt3dadd(85.866, 65.333, 29.892, 0.52)
pt3dadd(85.793, 65.239, 29.905, 0.512)
pt3dadd(85.721, 65.144, 29.918, 0.504)
pt3dadd(85.648, 65.05, 29.93, 0.496)
pt3dadd(85.576, 64.956, 29.943, 0.488)
pt3dadd(85.503, 64.861, 29.956, 0.48)
pt3dadd(85.431, 64.767, 29.969, 0.472)
pt3dadd(85.358, 64.673, 29.981, 0.464)
pt3dadd(85.286, 64.578, 29.994, 0.456)
pt3dadd(85.216, 64.482, 30.005, 0.472)
pt3dadd(85.148, 64.383, 30.015, 0.514)
pt3dadd(85.081, 64.285, 30.025, 0.558)
pt3dadd(85.013, 64.186, 30.035, 0.602)
pt3dadd(84.946, 64.087, 30.044, 0.644)
pt3dadd(84.879, 63.989, 30.054, 0.688)
pt3dadd(84.811, 63.89, 30.064, 0.732)
pt3dadd(84.744, 63.792, 30.073, 0.774)
pt3dadd(84.677, 63.693, 30.083, 0.818)
pt3dadd(84.609, 63.594, 30.093, 0.862)
pt3dadd(84.543, 63.495, 30.102, 0.914)
pt3dadd(84.479, 63.394, 30.111, 0.974)
pt3dadd(84.415, 63.293, 30.12, 1.034)
pt3dadd(84.352, 63.192, 30.128, 1.096)
pt3dadd(84.288, 63.091, 30.137, 1.156)
pt3dadd(84.224, 62.99, 30.146, 1.216)
pt3dadd(84.16, 62.889, 30.155, 1.278)
pt3dadd(84.096, 62.788, 30.163, 1.338)
pt3dadd(84.032, 62.687, 30.172, 1.398)
pt3dadd(83.968, 62.586, 30.181, 1.46)
pt3dadd(83.899, 62.489, 30.192, 1.472)
pt3dadd(83.825, 62.396, 30.207, 1.436)
pt3dadd(83.751, 62.303, 30.221, 1.4)
pt3dadd(83.677, 62.21, 30.236, 1.364)
pt3dadd(83.604, 62.117, 30.25, 1.328)
pt3dadd(83.53, 62.024, 30.265, 1.292)
pt3dadd(83.456, 61.931, 30.279, 1.256)
pt3dadd(83.382, 61.838, 30.294, 1.22)
pt3dadd(83.308, 61.745, 30.308, 1.184)
pt3dadd(83.234, 61.652, 30.323, 1.146)
pt3dadd(83.159, 61.573, 30.358, 1.132)
pt3dadd(83.082, 61.506, 30.411, 1.134)
pt3dadd(83.006, 61.44, 30.465, 1.136)
pt3dadd(82.929, 61.373, 30.518, 1.14)
pt3dadd(82.853, 61.306, 30.571, 1.142)
pt3dadd(82.776, 61.24, 30.625, 1.144)
pt3dadd(82.7, 61.173, 30.678, 1.148)
pt3dadd(82.623, 61.107, 30.732, 1.15)
pt3dadd(82.547, 61.04, 30.785, 1.152)
pt3dadd(82.47, 60.973, 30.838, 1.156)
pt3dadd(82.378, 60.921, 30.882, 1.172)
pt3dadd(82.275, 60.877, 30.918, 1.198)
pt3dadd(82.172, 60.833, 30.955, 1.222)
pt3dadd(82.069, 60.789, 30.991, 1.248)
pt3dadd(81.967, 60.746, 31.028, 1.272)
pt3dadd(81.864, 60.702, 31.064, 1.298)
pt3dadd(81.761, 60.658, 31.101, 1.322)
pt3dadd(81.658, 60.615, 31.137, 1.348)
pt3dadd(81.555, 60.571, 31.174, 1.372)
pt3dadd(81.453, 60.527, 31.211, 1.398)
pt3dadd(81.353, 60.471, 31.239, 1.432)
pt3dadd(81.255, 60.407, 31.262, 1.47)
pt3dadd(81.158, 60.344, 31.286, 1.51)
pt3dadd(81.06, 60.28, 31.31, 1.548)
pt3dadd(80.962, 60.217, 31.333, 1.586)
pt3dadd(80.864, 60.153, 31.357, 1.626)
pt3dadd(80.766, 60.09, 31.38, 1.664)
pt3dadd(80.669, 60.026, 31.404, 1.704)
pt3dadd(80.571, 59.963, 31.428, 1.742)
pt3dadd(80.473, 59.899, 31.451, 1.78)
pt3dadd(80.376, 59.841, 31.485, 1.772)
pt3dadd(80.28, 59.786, 31.523, 1.74)
pt3dadd(80.184, 59.731, 31.561, 1.706)
pt3dadd(80.087, 59.677, 31.599, 1.674)
pt3dadd(79.991, 59.622, 31.637, 1.64)
pt3dadd(79.894, 59.567, 31.676, 1.608)
pt3dadd(79.798, 59.512, 31.714, 1.574)
pt3dadd(79.702, 59.457, 31.752, 1.54)
pt3dadd(79.605, 59.402, 31.79, 1.508)
pt3dadd(79.509, 59.347, 31.829, 1.474)
pt3dadd(79.425, 59.275, 31.863, 1.446)
pt3dadd(79.347, 59.192, 31.895, 1.422)
pt3dadd(79.269, 59.109, 31.927, 1.396)
pt3dadd(79.191, 59.026, 31.96, 1.372)
pt3dadd(79.113, 58.944, 31.992, 1.346)
pt3dadd(79.035, 58.861, 32.024, 1.322)
pt3dadd(78.957, 58.778, 32.056, 1.298)
pt3dadd(78.88, 58.695, 32.089, 1.272)
pt3dadd(78.802, 58.613, 32.121, 1.248)
pt3dadd(78.724, 58.53, 32.153, 1.222)
pt3dadd(78.653, 58.438, 32.177, 1.218)
pt3dadd(78.584, 58.343, 32.199, 1.22)
pt3dadd(78.515, 58.249, 32.222, 1.22)
pt3dadd(78.446, 58.154, 32.244, 1.22)
pt3dadd(78.377, 58.06, 32.266, 1.222)
pt3dadd(78.308, 57.966, 32.288, 1.222)
pt3dadd(78.239, 57.871, 32.31, 1.224)
pt3dadd(78.17, 57.777, 32.333, 1.224)
pt3dadd(78.101, 57.682, 32.355, 1.224)
pt3dadd(78.031, 57.588, 32.377, 1.226)
pt3dadd(77.962, 57.492, 32.394, 1.234)
pt3dadd(77.893, 57.396, 32.409, 1.242)
pt3dadd(77.824, 57.299, 32.425, 1.252)
pt3dadd(77.755, 57.203, 32.44, 1.26)
pt3dadd(77.686, 57.107, 32.456, 1.27)
pt3dadd(77.617, 57.01, 32.471, 1.28)
pt3dadd(77.547, 56.914, 32.487, 1.288)
pt3dadd(77.478, 56.818, 32.502, 1.298)
pt3dadd(77.409, 56.722, 32.518, 1.306)
pt3dadd(77.34, 56.625, 32.534, 1.316)
pt3dadd(77.272, 56.527, 32.545, 1.304)
pt3dadd(77.205, 56.429, 32.556, 1.288)
pt3dadd(77.137, 56.331, 32.567, 1.272)
pt3dadd(77.07, 56.232, 32.578, 1.256)
pt3dadd(77.002, 56.134, 32.589, 1.24)
pt3dadd(76.935, 56.036, 32.6, 1.224)
pt3dadd(76.868, 55.937, 32.611, 1.21)
}
}
proc shape3d_182() {
dend_7[24] { pt3dadd(76.8, 55.839, 32.622, 1.194)
pt3dadd(76.733, 55.74, 32.633, 1.178)
pt3dadd(76.665, 55.642, 32.644, 1.162)
pt3dadd(76.612, 55.541, 32.674, 1.134)
pt3dadd(76.562, 55.439, 32.706, 1.104)
pt3dadd(76.512, 55.337, 32.739, 1.074)
pt3dadd(76.462, 55.236, 32.771, 1.044)
pt3dadd(76.412, 55.134, 32.804, 1.014)
pt3dadd(76.361, 55.032, 32.836, 0.986)
pt3dadd(76.311, 54.93, 32.869, 0.956)
pt3dadd(76.261, 54.828, 32.902, 0.926)
pt3dadd(76.211, 54.727, 32.934, 0.896)
pt3dadd(76.161, 54.625, 32.967, 0.866)
pt3dadd(76.121, 54.52, 33.001, 0.868)
pt3dadd(76.082, 54.414, 33.036, 0.872)
pt3dadd(76.043, 54.308, 33.07, 0.878)
pt3dadd(76.004, 54.203, 33.105, 0.882)
pt3dadd(75.965, 54.097, 33.14, 0.886)
pt3dadd(75.926, 53.991, 33.174, 0.892)
pt3dadd(75.888, 53.886, 33.209, 0.896)
pt3dadd(75.849, 53.78, 33.243, 0.902)
pt3dadd(75.81, 53.674, 33.278, 0.906)
pt3dadd(75.771, 53.569, 33.313, 0.91)
pt3dadd(75.737, 53.46, 33.343, 0.95)
pt3dadd(75.703, 53.35, 33.373, 0.992)
pt3dadd(75.669, 53.241, 33.402, 1.034)
pt3dadd(75.635, 53.131, 33.432, 1.076)
pt3dadd(75.601, 53.022, 33.462, 1.118)
pt3dadd(75.568, 52.912, 33.492, 1.16)
pt3dadd(75.534, 52.803, 33.522, 1.2)
pt3dadd(75.5, 52.694, 33.551, 1.242)
pt3dadd(75.466, 52.584, 33.581, 1.284)
pt3dadd(75.432, 52.475, 33.611, 1.326)
pt3dadd(75.38, 52.371, 33.634, 1.31)
pt3dadd(75.327, 52.266, 33.658, 1.292)
pt3dadd(75.274, 52.162, 33.681, 1.276)
pt3dadd(75.221, 52.058, 33.704, 1.258)
pt3dadd(75.169, 51.954, 33.727, 1.24)
pt3dadd(75.116, 51.85, 33.75, 1.224)
pt3dadd(75.063, 51.746, 33.774, 1.206)
pt3dadd(75.01, 51.642, 33.797, 1.19)
pt3dadd(74.957, 51.538, 33.82, 1.172)
pt3dadd(74.905, 51.434, 33.843, 1.156)
pt3dadd(74.859, 51.333, 33.883, 1.152)
pt3dadd(74.814, 51.233, 33.923, 1.15)
pt3dadd(74.769, 51.133, 33.963, 1.148)
pt3dadd(74.724, 51.033, 34.003, 1.144)
pt3dadd(74.678, 50.933, 34.043, 1.142)
pt3dadd(74.633, 50.832, 34.083, 1.14)
pt3dadd(74.588, 50.732, 34.123, 1.138)
pt3dadd(74.543, 50.632, 34.164, 1.134)
pt3dadd(74.497, 50.532, 34.204, 1.132)
pt3dadd(74.452, 50.431, 34.244, 1.13)
pt3dadd(74.396, 50.335, 34.282, 1.148)
pt3dadd(74.341, 50.239, 34.319, 1.166)
pt3dadd(74.285, 50.143, 34.358, 1.186)
pt3dadd(74.23, 50.047, 34.396, 1.204)
pt3dadd(74.174, 49.951, 34.433, 1.222)
pt3dadd(74.119, 49.855, 34.471, 1.24)
pt3dadd(74.063, 49.758, 34.509, 1.258)
pt3dadd(74.008, 49.662, 34.547, 1.276)
pt3dadd(73.952, 49.566, 34.585, 1.294)
pt3dadd(73.896, 49.471, 34.623, 1.314)
pt3dadd(73.832, 49.381, 34.662, 1.336)
pt3dadd(73.768, 49.291, 34.701, 1.36)
pt3dadd(73.703, 49.201, 34.74, 1.382)
pt3dadd(73.639, 49.111, 34.779, 1.406)
pt3dadd(73.575, 49.021, 34.818, 1.428)
pt3dadd(73.51, 48.931, 34.857, 1.452)
pt3dadd(73.446, 48.841, 34.896, 1.474)
pt3dadd(73.382, 48.751, 34.935, 1.498)
pt3dadd(73.318, 48.661, 34.974, 1.52)
pt3dadd(73.254, 48.573, 35.015, 1.538)
pt3dadd(73.193, 48.495, 35.072, 1.516)
pt3dadd(73.132, 48.418, 35.129, 1.496)
pt3dadd(73.071, 48.34, 35.186, 1.476)
pt3dadd(73.01, 48.262, 35.242, 1.454)
pt3dadd(72.949, 48.184, 35.299, 1.434)
pt3dadd(72.888, 48.106, 35.356, 1.412)
pt3dadd(72.827, 48.029, 35.413, 1.392)
pt3dadd(72.766, 47.951, 35.469, 1.372)
pt3dadd(72.705, 47.873, 35.526, 1.35)
pt3dadd(72.642, 47.794, 35.578, 1.33)
pt3dadd(72.565, 47.71, 35.61, 1.312)
pt3dadd(72.489, 47.626, 35.643, 1.294)
pt3dadd(72.413, 47.541, 35.675, 1.274)
pt3dadd(72.337, 47.457, 35.708, 1.256)
pt3dadd(72.261, 47.373, 35.74, 1.238)
pt3dadd(72.184, 47.289, 35.772, 1.218)
pt3dadd(72.108, 47.205, 35.805, 1.2)
pt3dadd(72.032, 47.121, 35.837, 1.182)
pt3dadd(71.956, 47.037, 35.87, 1.162)
pt3dadd(71.879, 46.952, 35.9, 1.156)
pt3dadd(71.802, 46.864, 35.925, 1.202)
pt3dadd(71.725, 46.777, 35.949, 1.246)
pt3dadd(71.649, 46.69, 35.973, 1.29)
pt3dadd(71.572, 46.602, 35.998, 1.336)
pt3dadd(71.495, 46.515, 36.022, 1.38)
pt3dadd(71.418, 46.428, 36.046, 1.424)
pt3dadd(71.341, 46.34, 36.071, 1.47)
pt3dadd(71.264, 46.253, 36.095, 1.514)
pt3dadd(71.187, 46.166, 36.119, 1.558)
pt3dadd(71.113, 46.077, 36.146, 1.59)
pt3dadd(71.05, 45.984, 36.181, 1.572)
pt3dadd(70.988, 45.891, 36.217, 1.552)
pt3dadd(70.925, 45.798, 36.253, 1.534)
pt3dadd(70.863, 45.705, 36.288, 1.514)
pt3dadd(70.8, 45.612, 36.324, 1.494)
pt3dadd(70.738, 45.519, 36.36, 1.476)
pt3dadd(70.675, 45.426, 36.395, 1.456)
pt3dadd(70.613, 45.333, 36.431, 1.436)
pt3dadd(70.55, 45.239, 36.466, 1.418)
pt3dadd(70.49, 45.147, 36.505, 1.388)
pt3dadd(70.433, 45.055, 36.549, 1.338)
pt3dadd(70.377, 44.963, 36.593, 1.288)
pt3dadd(70.321, 44.871, 36.637, 1.238)
pt3dadd(70.264, 44.78, 36.681, 1.188)
pt3dadd(70.208, 44.688, 36.725, 1.138)
pt3dadd(70.152, 44.596, 36.769, 1.088)
pt3dadd(70.095, 44.504, 36.813, 1.038)
pt3dadd(70.039, 44.412, 36.857, 0.986)
pt3dadd(69.982, 44.321, 36.901, 0.936)
pt3dadd(69.924, 44.231, 36.947, 0.908)
pt3dadd(69.863, 44.146, 36.996, 0.922)
pt3dadd(69.802, 44.061, 37.045, 0.938)
pt3dadd(69.741, 43.976, 37.093, 0.952)
pt3dadd(69.68, 43.89, 37.142, 0.966)
pt3dadd(69.619, 43.805, 37.191, 0.98)
pt3dadd(69.558, 43.72, 37.24, 0.994)
pt3dadd(69.497, 43.635, 37.289, 1.008)
pt3dadd(69.436, 43.55, 37.337, 1.022)
pt3dadd(69.375, 43.465, 37.386, 1.036)
pt3dadd(69.33, 43.376, 37.439, 1.066)
pt3dadd(69.301, 43.282, 37.497, 1.116)
pt3dadd(69.272, 43.189, 37.555, 1.166)
pt3dadd(69.243, 43.095, 37.613, 1.214)
pt3dadd(69.214, 43.002, 37.671, 1.264)
pt3dadd(69.185, 42.908, 37.729, 1.312)
pt3dadd(69.156, 42.815, 37.786, 1.362)
pt3dadd(69.127, 42.721, 37.844, 1.412)
pt3dadd(69.098, 42.627, 37.902, 1.46)
pt3dadd(69.07, 42.534, 37.96, 1.51)
pt3dadd(69.048, 42.432, 38.008, 1.504)
pt3dadd(69.034, 42.322, 38.046, 1.444)
pt3dadd(69.021, 42.212, 38.084, 1.386)
pt3dadd(69.007, 42.102, 38.122, 1.326)
pt3dadd(68.993, 41.992, 38.16, 1.266)
pt3dadd(68.979, 41.882, 38.199, 1.206)
pt3dadd(68.965, 41.772, 38.237, 1.148)
pt3dadd(68.952, 41.662, 38.275, 1.088)
pt3dadd(68.938, 41.552, 38.313, 1.028)
pt3dadd(68.924, 41.442, 38.351, 0.968)
pt3dadd(68.917, 41.333, 38.393, 0.938)
pt3dadd(68.916, 41.227, 38.439, 0.934)
pt3dadd(68.915, 41.12, 38.486, 0.93)
pt3dadd(68.914, 41.014, 38.532, 0.926)
pt3dadd(68.913, 40.907, 38.578, 0.924)
pt3dadd(68.913, 40.801, 38.624, 0.92)
pt3dadd(68.912, 40.694, 38.67, 0.916)
pt3dadd(68.911, 40.588, 38.716, 0.912)
pt3dadd(68.91, 40.481, 38.762, 0.91)
pt3dadd(68.909, 40.375, 38.808, 0.906)
pt3dadd(68.909, 40.265, 38.848, 0.904)
pt3dadd(68.909, 40.153, 38.883, 0.904)
pt3dadd(68.909, 40.04, 38.917, 0.904)
pt3dadd(68.909, 39.927, 38.952, 0.904)
pt3dadd(68.909, 39.815, 38.986, 0.904)
pt3dadd(68.909, 39.702, 39.021, 0.904)
pt3dadd(68.909, 39.589, 39.055, 0.904)
pt3dadd(68.909, 39.477, 39.09, 0.904)
pt3dadd(68.909, 39.364, 39.124, 0.904)
pt3dadd(68.909, 39.252, 39.159, 0.904)
pt3dadd(68.909, 39.137, 39.187, 0.912)
pt3dadd(68.909, 39.02, 39.21, 0.928)
pt3dadd(68.909, 38.903, 39.233, 0.942)
pt3dadd(68.909, 38.786, 39.257, 0.956)
pt3dadd(68.909, 38.67, 39.28, 0.972)
pt3dadd(68.909, 38.553, 39.303, 0.986)
pt3dadd(68.909, 38.436, 39.326, 1.002)
pt3dadd(68.909, 38.32, 39.349, 1.016)
pt3dadd(68.909, 38.203, 39.373, 1.03)
pt3dadd(68.909, 38.086, 39.396, 1.046)
pt3dadd(68.909, 37.968, 39.415, 1.058)
pt3dadd(68.909, 37.85, 39.432, 1.07)
pt3dadd(68.909, 37.732, 39.449, 1.082)
pt3dadd(68.909, 37.614, 39.465, 1.094)
pt3dadd(68.909, 37.495, 39.482, 1.106)
pt3dadd(68.909, 37.377, 39.499, 1.118)
pt3dadd(68.909, 37.259, 39.515, 1.128)
pt3dadd(68.909, 37.14, 39.532, 1.14)
pt3dadd(68.909, 37.022, 39.549, 1.152)
pt3dadd(68.909, 36.904, 39.565, 1.164)
pt3dadd(68.909, 36.785, 39.579, 1.114)
pt3dadd(68.909, 36.666, 39.591, 1.02)
pt3dadd(68.909, 36.546, 39.603, 0.926)
pt3dadd(68.909, 36.427, 39.615, 0.832)
pt3dadd(68.909, 36.308, 39.627, 0.738)
pt3dadd(68.909, 36.189, 39.639, 0.642)
pt3dadd(68.909, 36.07, 39.651, 0.548)
pt3dadd(68.909, 35.951, 39.663, 0.454)
}
}
proc shape3d_183() {
dend_7[24] { pt3dadd(68.909, 35.832, 39.675, 0.36)
pt3dadd(68.909, 35.712, 39.687, 0.266)
pt3dadd(68.909, 35.598, 39.714, 0.226)
pt3dadd(68.909, 35.487, 39.751, 0.226)
pt3dadd(68.909, 35.375, 39.788, 0.226)
pt3dadd(68.909, 35.264, 39.825, 0.226)
pt3dadd(68.909, 35.153, 39.863, 0.226)
pt3dadd(68.909, 35.041, 39.9, 0.226)
pt3dadd(68.909, 34.93, 39.937, 0.226)
pt3dadd(68.909, 34.818, 39.974, 0.226)
pt3dadd(68.909, 34.707, 40.012, 0.226)
pt3dadd(68.909, 34.596, 40.049, 0.226)
pt3dadd(68.909, 34.482, 40.081, 0.226)
pt3dadd(68.909, 34.367, 40.108, 0.226)
pt3dadd(68.909, 34.251, 40.136, 0.226)
pt3dadd(68.909, 34.136, 40.164, 0.226)
pt3dadd(68.909, 34.021, 40.191, 0.226)
pt3dadd(68.909, 33.906, 40.219, 0.226)
pt3dadd(68.909, 33.79, 40.247, 0.226)
pt3dadd(68.909, 33.675, 40.274, 0.226)
pt3dadd(68.909, 33.56, 40.302, 0.226)
pt3dadd(68.909, 33.444, 40.33, 0.226)
pt3dadd(68.909, 33.327, 40.351, 0.232)
pt3dadd(68.909, 33.209, 40.369, 0.242)
pt3dadd(68.909, 33.091, 40.387, 0.252)
pt3dadd(68.909, 32.973, 40.404, 0.262)
pt3dadd(68.909, 32.855, 40.422, 0.272)
pt3dadd(68.909, 32.737, 40.439, 0.282)
pt3dadd(68.909, 32.619, 40.457, 0.294)
pt3dadd(68.909, 32.5, 40.475, 0.304)
pt3dadd(68.909, 32.382, 40.493, 0.314)
pt3dadd(68.909, 32.264, 40.51, 0.324)
pt3dadd(68.909, 32.145, 40.522, 0.332)
pt3dadd(68.909, 32.026, 40.53, 0.336)
pt3dadd(68.909, 31.906, 40.538, 0.342)
pt3dadd(68.909, 31.786, 40.547, 0.348)
pt3dadd(68.909, 31.667, 40.555, 0.354)
pt3dadd(68.909, 31.547, 40.563, 0.36)
pt3dadd(68.909, 31.428, 40.571, 0.366)
pt3dadd(68.909, 31.308, 40.579, 0.372)
pt3dadd(68.909, 31.188, 40.588, 0.378)
pt3dadd(68.909, 31.069, 40.596, 0.384)
pt3dadd(68.909, 30.949, 40.6, 0.378)
pt3dadd(68.909, 30.829, 40.602, 0.364)
pt3dadd(68.909, 30.709, 40.604, 0.352)
pt3dadd(68.909, 30.589, 40.605, 0.34)
pt3dadd(68.909, 30.469, 40.607, 0.326)
pt3dadd(68.909, 30.349, 40.609, 0.314)
pt3dadd(68.909, 30.229, 40.611, 0.302)
pt3dadd(68.909, 30.109, 40.613, 0.288)
pt3dadd(68.909, 29.989, 40.615, 0.276)
pt3dadd(68.909, 29.869, 40.617, 0.264)
pt3dadd(68.909, 29.749, 40.619, 0.272)
pt3dadd(68.909, 29.629, 40.623, 0.29)
pt3dadd(68.908, 29.509, 40.626, 0.31)
pt3dadd(68.908, 29.389, 40.629, 0.328)
pt3dadd(68.908, 29.269, 40.632, 0.348)
pt3dadd(68.908, 29.15, 40.635, 0.368)
pt3dadd(68.908, 29.03, 40.638, 0.386)
pt3dadd(68.908, 28.91, 40.642, 0.406)
pt3dadd(68.908, 28.79, 40.645, 0.424)
pt3dadd(68.908, 28.67, 40.648, 0.444)
pt3dadd(68.907, 28.55, 40.654, 0.488)
pt3dadd(68.907, 28.43, 40.662, 0.544)
pt3dadd(68.907, 28.311, 40.669, 0.602)
pt3dadd(68.907, 28.191, 40.677, 0.658)
pt3dadd(68.907, 28.071, 40.685, 0.716)
pt3dadd(68.906, 27.952, 40.692, 0.774)
pt3dadd(68.906, 27.832, 40.7, 0.83)
pt3dadd(68.906, 27.713, 40.708, 0.888)
pt3dadd(68.906, 27.593, 40.715, 0.946)
pt3dadd(68.905, 27.473, 40.723, 1.002)
pt3dadd(68.905, 27.354, 40.734, 1.01)
pt3dadd(68.905, 27.235, 40.746, 0.99)
pt3dadd(68.904, 27.116, 40.758, 0.97)
pt3dadd(68.904, 26.997, 40.77, 0.95)
pt3dadd(68.904, 26.877, 40.782, 0.93)
pt3dadd(68.903, 26.758, 40.794, 0.908)
pt3dadd(68.903, 26.639, 40.806, 0.888)
pt3dadd(68.902, 26.52, 40.818, 0.868)
pt3dadd(68.902, 26.401, 40.83, 0.848)
pt3dadd(68.902, 26.282, 40.843, 0.826)
pt3dadd(68.901, 26.166, 40.866, 0.818)
pt3dadd(68.901, 26.051, 40.896, 0.814)
pt3dadd(68.9, 25.937, 40.926, 0.812)
pt3dadd(68.899, 25.822, 40.956, 0.808)
pt3dadd(68.899, 25.708, 40.986, 0.806)
pt3dadd(68.898, 25.594, 41.017, 0.802)
pt3dadd(68.898, 25.479, 41.047, 0.8)
pt3dadd(68.897, 25.365, 41.077, 0.796)
pt3dadd(68.896, 25.25, 41.107, 0.794)
pt3dadd(68.896, 25.136, 41.137, 0.79)
pt3dadd(68.895, 25.023, 41.172, 0.806)
pt3dadd(68.894, 24.912, 41.208, 0.832)
pt3dadd(68.892, 24.8, 41.245, 0.856)
pt3dadd(68.891, 24.688, 41.282, 0.88)
pt3dadd(68.89, 24.577, 41.319, 0.904)
pt3dadd(68.889, 24.465, 41.355, 0.928)
pt3dadd(68.888, 24.354, 41.392, 0.952)
pt3dadd(68.886, 24.242, 41.428, 0.976)
pt3dadd(68.885, 24.13, 41.465, 1.002)
pt3dadd(68.884, 24.019, 41.502, 1.026)
pt3dadd(68.882, 23.905, 41.534, 1.05)
pt3dadd(68.88, 23.79, 41.563, 1.076)
pt3dadd(68.878, 23.676, 41.594, 1.102)
pt3dadd(68.876, 23.562, 41.624, 1.128)
pt3dadd(68.873, 23.447, 41.654, 1.154)
pt3dadd(68.871, 23.333, 41.684, 1.18)
pt3dadd(68.869, 23.218, 41.714, 1.206)
pt3dadd(68.867, 23.104, 41.744, 1.232)
pt3dadd(68.865, 22.989, 41.774, 1.258)
pt3dadd(68.863, 22.875, 41.804, 1.284)
pt3dadd(68.859, 22.759, 41.829, 1.25)
pt3dadd(68.856, 22.642, 41.853, 1.194)
pt3dadd(68.852, 22.526, 41.876, 1.138)
pt3dadd(68.848, 22.409, 41.9, 1.08)
pt3dadd(68.844, 22.293, 41.924, 1.024)
pt3dadd(68.841, 22.176, 41.947, 0.968)
pt3dadd(68.837, 22.06, 41.971, 0.912)
pt3dadd(68.833, 21.943, 41.994, 0.856)
pt3dadd(68.829, 21.827, 42.018, 0.8)
pt3dadd(68.826, 21.71, 42.042, 0.744)
pt3dadd(68.819, 21.598, 42.076, 0.748)
pt3dadd(68.81, 21.487, 42.114, 0.776)
pt3dadd(68.802, 21.377, 42.153, 0.804)
pt3dadd(68.793, 21.266, 42.191, 0.83)
pt3dadd(68.785, 21.156, 42.229, 0.858)
pt3dadd(68.777, 21.045, 42.267, 0.886)
pt3dadd(68.768, 20.935, 42.306, 0.912)
pt3dadd(68.76, 20.824, 42.344, 0.94)
pt3dadd(68.751, 20.714, 42.382, 0.968)
pt3dadd(68.743, 20.603, 42.421, 0.996)
pt3dadd(68.731, 20.491, 42.456, 1.002)
pt3dadd(68.717, 20.379, 42.49, 1.004)
pt3dadd(68.704, 20.267, 42.523, 1.004)
pt3dadd(68.69, 20.155, 42.558, 1.006)
pt3dadd(68.677, 20.043, 42.591, 1.006)
pt3dadd(68.663, 19.931, 42.625, 1.008)
pt3dadd(68.65, 19.819, 42.659, 1.008)
pt3dadd(68.637, 19.707, 42.693, 1.01)
pt3dadd(68.623, 19.595, 42.727, 1.01)
pt3dadd(68.61, 19.483, 42.761, 1.012)
pt3dadd(68.583, 19.371, 42.79, 1.002)
pt3dadd(68.553, 19.26, 42.817, 0.992)
pt3dadd(68.523, 19.148, 42.844, 0.982)
pt3dadd(68.492, 19.037, 42.871, 0.97)
pt3dadd(68.462, 18.925, 42.898, 0.96)
pt3dadd(68.432, 18.814, 42.925, 0.948)
pt3dadd(68.401, 18.702, 42.952, 0.938)
pt3dadd(68.371, 18.591, 42.979, 0.928)
pt3dadd(68.341, 18.479, 43.006, 0.916)
pt3dadd(68.31, 18.368, 43.033, 0.906)
pt3dadd(68.264, 18.261, 43.057, 0.898)
pt3dadd(68.216, 18.155, 43.081, 0.892)
pt3dadd(68.168, 18.049, 43.106, 0.886)
pt3dadd(68.12, 17.943, 43.13, 0.88)
pt3dadd(68.072, 17.837, 43.154, 0.874)
pt3dadd(68.024, 17.731, 43.178, 0.868)
pt3dadd(67.976, 17.625, 43.202, 0.862)
pt3dadd(67.927, 17.519, 43.226, 0.856)
pt3dadd(67.879, 17.413, 43.25, 0.85)
pt3dadd(67.831, 17.307, 43.275, 0.844)
pt3dadd(67.789, 17.204, 43.312, 0.81)
pt3dadd(67.748, 17.101, 43.351, 0.774)
pt3dadd(67.707, 16.998, 43.389, 0.736)
pt3dadd(67.666, 16.895, 43.428, 0.698)
pt3dadd(67.625, 16.793, 43.467, 0.662)
pt3dadd(67.584, 16.69, 43.505, 0.624)
pt3dadd(67.543, 16.587, 43.544, 0.588)
pt3dadd(67.502, 16.484, 43.583, 0.55)
pt3dadd(67.461, 16.382, 43.621, 0.514)
pt3dadd(67.42, 16.279, 43.66, 0.476)
pt3dadd(67.383, 16.171, 43.691, 0.47)
pt3dadd(67.346, 16.063, 43.721, 0.468)
pt3dadd(67.308, 15.954, 43.75, 0.466)
pt3dadd(67.271, 15.846, 43.78, 0.464)
pt3dadd(67.234, 15.737, 43.81, 0.462)
pt3dadd(67.197, 15.629, 43.84, 0.46)
pt3dadd(67.16, 15.521, 43.869, 0.458)
pt3dadd(67.123, 15.412, 43.899, 0.456)
pt3dadd(67.086, 15.304, 43.929, 0.454)
pt3dadd(67.049, 15.195, 43.959, 0.452)
pt3dadd(66.958, 15.123, 43.975, 0.432)
pt3dadd(66.861, 15.054, 43.989, 0.408)
pt3dadd(66.764, 14.986, 44.004, 0.386)
pt3dadd(66.667, 14.917, 44.019, 0.362)
pt3dadd(66.57, 14.848, 44.033, 0.34)
pt3dadd(66.474, 14.779, 44.048, 0.318)
pt3dadd(66.377, 14.711, 44.063, 0.294)
pt3dadd(66.28, 14.642, 44.077, 0.272)
pt3dadd(66.183, 14.573, 44.092, 0.248)
pt3dadd(66.086, 14.505, 44.106, 0.226)
}
dend_7[25] {pt3dclear()
pt3dadd(91.822, 100.444, 22.812, 1.582)
pt3dadd(91.76, 100.449, 22.859, 1.566)
pt3dadd(91.671, 100.457, 22.925, 1.542)
pt3dadd(91.581, 100.466, 22.992, 1.52)
pt3dadd(91.492, 100.474, 23.058, 1.496)
pt3dadd(91.403, 100.482, 23.125, 1.474)
pt3dadd(91.314, 100.49, 23.191, 1.45)
pt3dadd(91.225, 100.498, 23.258, 1.426)
}
}
proc shape3d_184() {
dend_7[25] { pt3dadd(91.135, 100.506, 23.324, 1.404)
pt3dadd(91.046, 100.514, 23.391, 1.38)
pt3dadd(90.957, 100.522, 23.457, 1.358)
pt3dadd(90.868, 100.53, 23.524, 1.334)
pt3dadd(90.778, 100.538, 23.59, 1.312)
pt3dadd(90.689, 100.546, 23.657, 1.288)
pt3dadd(90.597, 100.55, 23.721, 1.268)
pt3dadd(90.505, 100.553, 23.785, 1.248)
pt3dadd(90.413, 100.557, 23.849, 1.226)
pt3dadd(90.321, 100.56, 23.913, 1.206)
pt3dadd(90.228, 100.563, 23.977, 1.186)
pt3dadd(90.136, 100.567, 24.041, 1.166)
pt3dadd(90.044, 100.57, 24.104, 1.146)
pt3dadd(89.952, 100.573, 24.168, 1.126)
pt3dadd(89.859, 100.577, 24.232, 1.106)
pt3dadd(89.767, 100.58, 24.296, 1.084)
pt3dadd(89.67, 100.575, 24.354, 1.07)
pt3dadd(89.572, 100.568, 24.412, 1.056)
pt3dadd(89.474, 100.562, 24.47, 1.042)
pt3dadd(89.376, 100.556, 24.528, 1.028)
pt3dadd(89.278, 100.55, 24.585, 1.014)
pt3dadd(89.181, 100.543, 24.643, 0.998)
pt3dadd(89.083, 100.537, 24.701, 0.984)
pt3dadd(88.985, 100.531, 24.758, 0.97)
pt3dadd(88.887, 100.525, 24.816, 0.956)
pt3dadd(88.79, 100.518, 24.874, 0.942)
pt3dadd(88.683, 100.509, 24.919, 0.924)
pt3dadd(88.576, 100.499, 24.964, 0.904)
pt3dadd(88.469, 100.489, 25.008, 0.886)
pt3dadd(88.362, 100.479, 25.052, 0.868)
pt3dadd(88.255, 100.469, 25.097, 0.85)
pt3dadd(88.148, 100.459, 25.141, 0.83)
pt3dadd(88.041, 100.449, 25.186, 0.812)
pt3dadd(87.934, 100.439, 25.23, 0.794)
pt3dadd(87.827, 100.429, 25.275, 0.774)
pt3dadd(87.72, 100.419, 25.319, 0.756)
pt3dadd(87.614, 100.404, 25.364, 0.758)
pt3dadd(87.507, 100.39, 25.409, 0.76)
pt3dadd(87.401, 100.375, 25.454, 0.764)
pt3dadd(87.295, 100.361, 25.499, 0.766)
pt3dadd(87.189, 100.346, 25.544, 0.77)
pt3dadd(87.082, 100.332, 25.589, 0.772)
pt3dadd(86.976, 100.317, 25.633, 0.774)
pt3dadd(86.87, 100.302, 25.679, 0.778)
pt3dadd(86.764, 100.288, 25.723, 0.78)
pt3dadd(86.658, 100.273, 25.768, 0.784)
pt3dadd(86.553, 100.245, 25.811, 0.796)
pt3dadd(86.448, 100.217, 25.855, 0.808)
pt3dadd(86.344, 100.189, 25.898, 0.82)
pt3dadd(86.239, 100.161, 25.941, 0.832)
pt3dadd(86.135, 100.133, 25.984, 0.844)
pt3dadd(86.03, 100.105, 26.027, 0.856)
pt3dadd(85.926, 100.077, 26.07, 0.868)
pt3dadd(85.821, 100.048, 26.114, 0.882)
pt3dadd(85.717, 100.02, 26.157, 0.894)
pt3dadd(85.613, 99.989, 26.198, 0.904)
pt3dadd(85.511, 99.935, 26.227, 0.904)
pt3dadd(85.41, 99.881, 26.256, 0.904)
pt3dadd(85.308, 99.827, 26.285, 0.904)
pt3dadd(85.207, 99.773, 26.314, 0.904)
pt3dadd(85.106, 99.719, 26.343, 0.904)
pt3dadd(85.004, 99.666, 26.372, 0.904)
pt3dadd(84.903, 99.612, 26.401, 0.904)
pt3dadd(84.801, 99.558, 26.43, 0.906)
pt3dadd(84.7, 99.504, 26.459, 0.906)
pt3dadd(84.598, 99.451, 26.487, 0.914)
pt3dadd(84.492, 99.401, 26.51, 0.97)
pt3dadd(84.386, 99.352, 26.533, 1.028)
pt3dadd(84.281, 99.302, 26.557, 1.086)
pt3dadd(84.175, 99.253, 26.58, 1.144)
pt3dadd(84.069, 99.203, 26.603, 1.202)
pt3dadd(83.963, 99.154, 26.626, 1.26)
pt3dadd(83.858, 99.104, 26.649, 1.318)
pt3dadd(83.752, 99.055, 26.672, 1.374)
pt3dadd(83.646, 99.006, 26.695, 1.432)
pt3dadd(83.544, 98.953, 26.721, 1.482)
pt3dadd(83.463, 98.878, 26.761, 1.474)
pt3dadd(83.382, 98.804, 26.801, 1.468)
pt3dadd(83.3, 98.73, 26.841, 1.462)
pt3dadd(83.219, 98.655, 26.881, 1.454)
pt3dadd(83.138, 98.581, 26.921, 1.448)
pt3dadd(83.057, 98.507, 26.961, 1.44)
pt3dadd(82.976, 98.432, 27, 1.434)
pt3dadd(82.895, 98.358, 27.04, 1.426)
pt3dadd(82.814, 98.284, 27.08, 1.42)
pt3dadd(82.73, 98.212, 27.119, 1.41)
pt3dadd(82.638, 98.145, 27.152, 1.388)
pt3dadd(82.546, 98.079, 27.185, 1.368)
pt3dadd(82.455, 98.013, 27.218, 1.346)
pt3dadd(82.363, 97.947, 27.252, 1.326)
pt3dadd(82.271, 97.88, 27.285, 1.304)
pt3dadd(82.179, 97.814, 27.318, 1.284)
pt3dadd(82.088, 97.748, 27.351, 1.262)
pt3dadd(81.996, 97.682, 27.385, 1.24)
pt3dadd(81.904, 97.615, 27.418, 1.22)
pt3dadd(81.811, 97.548, 27.446, 1.204)
pt3dadd(81.716, 97.479, 27.465, 1.196)
pt3dadd(81.62, 97.409, 27.484, 1.188)
pt3dadd(81.525, 97.34, 27.503, 1.18)
pt3dadd(81.43, 97.271, 27.521, 1.172)
pt3dadd(81.334, 97.202, 27.54, 1.166)
pt3dadd(81.239, 97.132, 27.559, 1.158)
pt3dadd(81.144, 97.063, 27.578, 1.15)
pt3dadd(81.048, 96.994, 27.597, 1.142)
pt3dadd(80.953, 96.924, 27.615, 1.134)
pt3dadd(80.859, 96.853, 27.631, 1.13)
pt3dadd(80.766, 96.778, 27.642, 1.13)
pt3dadd(80.672, 96.704, 27.653, 1.13)
pt3dadd(80.579, 96.629, 27.664, 1.13)
pt3dadd(80.486, 96.555, 27.674, 1.13)
pt3dadd(80.393, 96.48, 27.685, 1.13)
pt3dadd(80.3, 96.405, 27.696, 1.13)
pt3dadd(80.207, 96.331, 27.707, 1.13)
pt3dadd(80.114, 96.256, 27.717, 1.13)
pt3dadd(80.021, 96.182, 27.728, 1.13)
pt3dadd(79.928, 96.106, 27.737, 1.13)
pt3dadd(79.836, 96.03, 27.744, 1.13)
pt3dadd(79.743, 95.954, 27.75, 1.13)
pt3dadd(79.651, 95.878, 27.757, 1.13)
pt3dadd(79.559, 95.802, 27.764, 1.13)
pt3dadd(79.466, 95.725, 27.77, 1.13)
pt3dadd(79.374, 95.649, 27.777, 1.13)
pt3dadd(79.282, 95.573, 27.783, 1.13)
pt3dadd(79.189, 95.496, 27.79, 1.13)
pt3dadd(79.097, 95.42, 27.796, 1.13)
pt3dadd(79.002, 95.348, 27.805, 1.13)
pt3dadd(78.903, 95.281, 27.817, 1.13)
pt3dadd(78.804, 95.215, 27.829, 1.13)
pt3dadd(78.705, 95.148, 27.842, 1.13)
pt3dadd(78.607, 95.082, 27.854, 1.13)
pt3dadd(78.508, 95.016, 27.866, 1.13)
pt3dadd(78.409, 94.949, 27.878, 1.13)
pt3dadd(78.31, 94.883, 27.891, 1.13)
pt3dadd(78.211, 94.816, 27.903, 1.13)
pt3dadd(78.113, 94.75, 27.915, 1.13)
pt3dadd(78.021, 94.678, 27.936, 1.126)
pt3dadd(77.941, 94.599, 27.97, 1.112)
pt3dadd(77.861, 94.519, 28.003, 1.098)
pt3dadd(77.781, 94.44, 28.037, 1.086)
pt3dadd(77.701, 94.36, 28.071, 1.072)
pt3dadd(77.621, 94.28, 28.105, 1.06)
pt3dadd(77.541, 94.201, 28.139, 1.046)
pt3dadd(77.46, 94.121, 28.173, 1.034)
pt3dadd(77.38, 94.042, 28.207, 1.02)
pt3dadd(77.3, 93.962, 28.241, 1.008)
pt3dadd(77.224, 93.88, 28.276, 0.996)
pt3dadd(77.151, 93.795, 28.313, 0.986)
pt3dadd(77.078, 93.711, 28.35, 0.976)
pt3dadd(77.005, 93.626, 28.386, 0.966)
pt3dadd(76.932, 93.542, 28.423, 0.956)
pt3dadd(76.859, 93.457, 28.46, 0.946)
pt3dadd(76.786, 93.373, 28.497, 0.938)
pt3dadd(76.713, 93.288, 28.533, 0.928)
pt3dadd(76.64, 93.204, 28.57, 0.918)
pt3dadd(76.567, 93.12, 28.607, 0.908)
pt3dadd(76.491, 93.035, 28.638, 0.906)
pt3dadd(76.413, 92.951, 28.667, 0.908)
pt3dadd(76.335, 92.866, 28.696, 0.91)
pt3dadd(76.257, 92.782, 28.724, 0.914)
pt3dadd(76.179, 92.697, 28.753, 0.916)
pt3dadd(76.101, 92.613, 28.782, 0.918)
pt3dadd(76.023, 92.528, 28.81, 0.92)
pt3dadd(75.945, 92.444, 28.839, 0.924)
pt3dadd(75.867, 92.359, 28.867, 0.926)
pt3dadd(75.789, 92.275, 28.896, 0.928)
pt3dadd(75.709, 92.191, 28.921, 0.94)
pt3dadd(75.627, 92.107, 28.943, 0.956)
pt3dadd(75.545, 92.024, 28.965, 0.972)
pt3dadd(75.463, 91.94, 28.987, 0.988)
pt3dadd(75.381, 91.857, 29.009, 1.004)
pt3dadd(75.299, 91.773, 29.031, 1.02)
pt3dadd(75.217, 91.69, 29.054, 1.036)
pt3dadd(75.135, 91.606, 29.076, 1.052)
pt3dadd(75.053, 91.523, 29.098, 1.068)
pt3dadd(74.971, 91.439, 29.12, 1.084)
pt3dadd(74.883, 91.37, 29.153, 1.076)
pt3dadd(74.79, 91.31, 29.192, 1.054)
pt3dadd(74.697, 91.25, 29.231, 1.032)
pt3dadd(74.604, 91.19, 29.27, 1.01)
pt3dadd(74.512, 91.13, 29.309, 0.988)
pt3dadd(74.419, 91.07, 29.348, 0.966)
pt3dadd(74.327, 91.01, 29.387, 0.942)
pt3dadd(74.234, 90.949, 29.426, 0.92)
pt3dadd(74.141, 90.889, 29.465, 0.898)
pt3dadd(74.049, 90.829, 29.505, 0.876)
pt3dadd(73.959, 90.769, 29.548, 0.878)
pt3dadd(73.87, 90.709, 29.593, 0.888)
pt3dadd(73.782, 90.648, 29.638, 0.896)
pt3dadd(73.693, 90.588, 29.683, 0.906)
pt3dadd(73.604, 90.528, 29.728, 0.916)
pt3dadd(73.516, 90.468, 29.773, 0.926)
pt3dadd(73.427, 90.407, 29.817, 0.936)
pt3dadd(73.338, 90.347, 29.862, 0.946)
pt3dadd(73.25, 90.287, 29.907, 0.956)
pt3dadd(73.161, 90.226, 29.952, 0.966)
pt3dadd(73.075, 90.169, 30.003, 0.986)
pt3dadd(72.99, 90.113, 30.056, 1.01)
pt3dadd(72.905, 90.057, 30.109, 1.032)
pt3dadd(72.82, 90.001, 30.162, 1.056)
pt3dadd(72.735, 89.945, 30.215, 1.08)
}
}
proc shape3d_185() {
dend_7[25] { pt3dadd(72.65, 89.889, 30.268, 1.104)
pt3dadd(72.565, 89.833, 30.321, 1.126)
pt3dadd(72.48, 89.777, 30.373, 1.15)
pt3dadd(72.395, 89.72, 30.426, 1.174)
pt3dadd(72.31, 89.664, 30.479, 1.196)
pt3dadd(72.217, 89.634, 30.536, 1.18)
pt3dadd(72.123, 89.605, 30.594, 1.16)
pt3dadd(72.029, 89.575, 30.651, 1.14)
pt3dadd(71.935, 89.546, 30.708, 1.12)
pt3dadd(71.841, 89.517, 30.766, 1.102)
pt3dadd(71.748, 89.488, 30.823, 1.082)
pt3dadd(71.654, 89.458, 30.881, 1.062)
pt3dadd(71.56, 89.429, 30.938, 1.042)
pt3dadd(71.466, 89.4, 30.995, 1.024)
pt3dadd(71.372, 89.371, 31.053, 1.004)
pt3dadd(71.267, 89.353, 31.098, 1.04)
pt3dadd(71.161, 89.336, 31.143, 1.076)
pt3dadd(71.056, 89.318, 31.189, 1.11)
pt3dadd(70.95, 89.3, 31.234, 1.146)
pt3dadd(70.845, 89.283, 31.279, 1.18)
pt3dadd(70.739, 89.265, 31.325, 1.216)
pt3dadd(70.634, 89.247, 31.37, 1.252)
pt3dadd(70.528, 89.23, 31.415, 1.286)
pt3dadd(70.423, 89.212, 31.461, 1.322)
pt3dadd(70.317, 89.195, 31.506, 1.356)
pt3dadd(70.219, 89.185, 31.563, 1.356)
pt3dadd(70.122, 89.175, 31.621, 1.356)
pt3dadd(70.024, 89.165, 31.678, 1.356)
pt3dadd(69.926, 89.155, 31.735, 1.356)
pt3dadd(69.828, 89.145, 31.792, 1.356)
pt3dadd(69.73, 89.135, 31.849, 1.356)
pt3dadd(69.632, 89.125, 31.907, 1.356)
pt3dadd(69.534, 89.115, 31.964, 1.356)
pt3dadd(69.436, 89.105, 32.021, 1.356)
pt3dadd(69.338, 89.095, 32.078, 1.356)
pt3dadd(69.236, 89.076, 32.129, 1.374)
pt3dadd(69.135, 89.056, 32.18, 1.392)
pt3dadd(69.033, 89.037, 32.231, 1.41)
pt3dadd(68.932, 89.018, 32.282, 1.428)
pt3dadd(68.83, 88.999, 32.333, 1.446)
pt3dadd(68.729, 88.98, 32.383, 1.464)
pt3dadd(68.627, 88.961, 32.434, 1.482)
pt3dadd(68.526, 88.942, 32.485, 1.5)
pt3dadd(68.424, 88.923, 32.536, 1.516)
pt3dadd(68.324, 88.902, 32.588, 1.532)
pt3dadd(68.258, 88.847, 32.657, 1.506)
pt3dadd(68.191, 88.792, 32.726, 1.478)
pt3dadd(68.124, 88.736, 32.795, 1.45)
pt3dadd(68.057, 88.681, 32.864, 1.424)
pt3dadd(67.991, 88.626, 32.934, 1.396)
pt3dadd(67.924, 88.57, 33.003, 1.368)
pt3dadd(67.857, 88.515, 33.072, 1.342)
pt3dadd(67.791, 88.46, 33.141, 1.314)
pt3dadd(67.724, 88.404, 33.21, 1.286)
pt3dadd(67.667, 88.347, 33.284, 1.254)
pt3dadd(67.63, 88.288, 33.365, 1.212)
pt3dadd(67.593, 88.228, 33.446, 1.17)
pt3dadd(67.556, 88.169, 33.527, 1.128)
pt3dadd(67.519, 88.109, 33.608, 1.086)
pt3dadd(67.482, 88.05, 33.689, 1.042)
pt3dadd(67.445, 87.99, 33.77, 1)
pt3dadd(67.408, 87.93, 33.852, 0.958)
pt3dadd(67.371, 87.871, 33.933, 0.916)
pt3dadd(67.334, 87.811, 34.014, 0.874)
pt3dadd(67.296, 87.747, 34.092, 0.852)
pt3dadd(67.256, 87.675, 34.165, 0.86)
pt3dadd(67.216, 87.604, 34.238, 0.868)
pt3dadd(67.176, 87.532, 34.311, 0.876)
pt3dadd(67.136, 87.461, 34.384, 0.882)
pt3dadd(67.096, 87.389, 34.457, 0.89)
pt3dadd(67.056, 87.318, 34.53, 0.898)
pt3dadd(67.016, 87.246, 34.603, 0.904)
pt3dadd(66.976, 87.175, 34.676, 0.912)
pt3dadd(66.936, 87.103, 34.749, 0.92)
pt3dadd(66.899, 87.027, 34.82, 0.934)
pt3dadd(66.865, 86.948, 34.89, 0.956)
pt3dadd(66.831, 86.869, 34.96, 0.976)
pt3dadd(66.797, 86.79, 35.029, 0.998)
pt3dadd(66.763, 86.711, 35.099, 1.018)
pt3dadd(66.729, 86.632, 35.168, 1.038)
pt3dadd(66.695, 86.553, 35.238, 1.06)
pt3dadd(66.661, 86.474, 35.308, 1.08)
pt3dadd(66.627, 86.395, 35.377, 1.102)
pt3dadd(66.592, 86.316, 35.447, 1.122)
pt3dadd(66.572, 86.244, 35.525, 1.126)
pt3dadd(66.559, 86.178, 35.607, 1.118)
pt3dadd(66.547, 86.111, 35.69, 1.11)
pt3dadd(66.534, 86.045, 35.772, 1.104)
pt3dadd(66.522, 85.978, 35.855, 1.096)
pt3dadd(66.51, 85.911, 35.937, 1.088)
pt3dadd(66.497, 85.845, 36.02, 1.082)
pt3dadd(66.485, 85.778, 36.103, 1.074)
pt3dadd(66.472, 85.712, 36.185, 1.068)
pt3dadd(66.46, 85.645, 36.268, 1.06)
pt3dadd(66.471, 85.605, 36.36, 1.046)
pt3dadd(66.488, 85.572, 36.455, 1.03)
pt3dadd(66.505, 85.539, 36.55, 1.014)
pt3dadd(66.522, 85.506, 36.645, 0.998)
pt3dadd(66.539, 85.473, 36.74, 0.982)
pt3dadd(66.556, 85.439, 36.835, 0.966)
pt3dadd(66.573, 85.406, 36.93, 0.95)
pt3dadd(66.59, 85.373, 37.025, 0.934)
pt3dadd(66.607, 85.34, 37.12, 0.918)
pt3dadd(66.627, 85.309, 37.215, 0.904)
pt3dadd(66.68, 85.307, 37.305, 0.902)
pt3dadd(66.732, 85.304, 37.395, 0.902)
pt3dadd(66.785, 85.302, 37.485, 0.9)
pt3dadd(66.837, 85.299, 37.575, 0.898)
pt3dadd(66.89, 85.297, 37.665, 0.896)
pt3dadd(66.942, 85.295, 37.755, 0.896)
pt3dadd(66.995, 85.292, 37.844, 0.894)
pt3dadd(67.047, 85.29, 37.934, 0.892)
pt3dadd(67.1, 85.287, 38.024, 0.892)
pt3dadd(67.151, 85.287, 38.114, 0.888)
pt3dadd(67.193, 85.304, 38.207, 0.866)
pt3dadd(67.236, 85.322, 38.299, 0.846)
pt3dadd(67.278, 85.339, 38.392, 0.826)
pt3dadd(67.32, 85.357, 38.484, 0.804)
pt3dadd(67.362, 85.374, 38.577, 0.784)
pt3dadd(67.405, 85.392, 38.669, 0.762)
pt3dadd(67.447, 85.41, 38.761, 0.742)
pt3dadd(67.489, 85.427, 38.854, 0.72)
pt3dadd(67.531, 85.445, 38.946, 0.7)
pt3dadd(67.575, 85.467, 39.036, 0.682)
pt3dadd(67.636, 85.532, 39.104, 0.706)
pt3dadd(67.696, 85.597, 39.171, 0.73)
pt3dadd(67.756, 85.663, 39.238, 0.754)
pt3dadd(67.817, 85.728, 39.305, 0.778)
pt3dadd(67.877, 85.794, 39.372, 0.802)
pt3dadd(67.937, 85.859, 39.439, 0.826)
pt3dadd(67.998, 85.924, 39.506, 0.85)
pt3dadd(68.058, 85.99, 39.573, 0.874)
pt3dadd(68.118, 86.055, 39.64, 0.898)
pt3dadd(68.167, 86.119, 39.711, 0.92)
pt3dadd(68.16, 86.178, 39.798, 0.936)
pt3dadd(68.152, 86.237, 39.885, 0.952)
pt3dadd(68.144, 86.296, 39.972, 0.966)
pt3dadd(68.137, 86.354, 40.059, 0.982)
pt3dadd(68.129, 86.413, 40.146, 0.998)
pt3dadd(68.121, 86.472, 40.233, 1.012)
pt3dadd(68.114, 86.53, 40.32, 1.028)
pt3dadd(68.106, 86.589, 40.407, 1.042)
pt3dadd(68.099, 86.648, 40.494, 1.058)
pt3dadd(68.047, 86.704, 40.567, 1.046)
pt3dadd(67.978, 86.76, 40.633, 1.02)
pt3dadd(67.908, 86.815, 40.701, 0.994)
pt3dadd(67.838, 86.871, 40.767, 0.968)
pt3dadd(67.768, 86.926, 40.834, 0.944)
pt3dadd(67.699, 86.982, 40.901, 0.918)
pt3dadd(67.629, 87.037, 40.968, 0.892)
pt3dadd(67.559, 87.093, 41.035, 0.866)
pt3dadd(67.49, 87.148, 41.102, 0.842)
pt3dadd(67.42, 87.204, 41.169, 0.816)
pt3dadd(67.349, 87.261, 41.235, 0.81)
pt3dadd(67.279, 87.318, 41.3, 0.81)
pt3dadd(67.208, 87.375, 41.366, 0.81)
pt3dadd(67.138, 87.432, 41.431, 0.808)
pt3dadd(67.067, 87.489, 41.496, 0.808)
pt3dadd(66.997, 87.546, 41.562, 0.808)
pt3dadd(66.926, 87.603, 41.627, 0.808)
pt3dadd(66.856, 87.661, 41.693, 0.808)
pt3dadd(66.785, 87.718, 41.758, 0.808)
pt3dadd(66.714, 87.775, 41.823, 0.808)
pt3dadd(66.632, 87.825, 41.883, 0.832)
pt3dadd(66.547, 87.873, 41.941, 0.864)
pt3dadd(66.462, 87.921, 41.999, 0.894)
pt3dadd(66.376, 87.968, 42.057, 0.924)
pt3dadd(66.291, 88.016, 42.115, 0.954)
pt3dadd(66.206, 88.064, 42.173, 0.986)
pt3dadd(66.121, 88.112, 42.231, 1.016)
pt3dadd(66.036, 88.16, 42.289, 1.046)
pt3dadd(65.95, 88.208, 42.347, 1.076)
pt3dadd(65.865, 88.256, 42.405, 1.108)
pt3dadd(65.773, 88.319, 42.44, 1.098)
pt3dadd(65.68, 88.384, 42.472, 1.08)
pt3dadd(65.587, 88.45, 42.503, 1.064)
pt3dadd(65.493, 88.515, 42.535, 1.046)
pt3dadd(65.4, 88.58, 42.566, 1.03)
pt3dadd(65.307, 88.646, 42.598, 1.012)
pt3dadd(65.214, 88.711, 42.629, 0.996)
pt3dadd(65.121, 88.777, 42.661, 0.978)
pt3dadd(65.027, 88.842, 42.692, 0.962)
pt3dadd(64.934, 88.907, 42.724, 0.944)
pt3dadd(64.829, 88.961, 42.742, 0.914)
pt3dadd(64.723, 89.013, 42.758, 0.88)
pt3dadd(64.616, 89.065, 42.773, 0.846)
pt3dadd(64.51, 89.117, 42.789, 0.812)
pt3dadd(64.403, 89.169, 42.805, 0.778)
pt3dadd(64.297, 89.22, 42.821, 0.744)
pt3dadd(64.19, 89.272, 42.837, 0.71)
pt3dadd(64.084, 89.324, 42.853, 0.678)
pt3dadd(63.977, 89.376, 42.868, 0.644)
pt3dadd(63.871, 89.428, 42.884, 0.61)
pt3dadd(63.767, 89.488, 42.889, 0.584)
pt3dadd(63.663, 89.548, 42.894, 0.56)
pt3dadd(63.56, 89.609, 42.899, 0.536)
pt3dadd(63.456, 89.67, 42.903, 0.512)
pt3dadd(63.353, 89.73, 42.908, 0.488)
pt3dadd(63.249, 89.79, 42.912, 0.464)
pt3dadd(63.146, 89.851, 42.917, 0.44)
}
}
proc shape3d_186() {
dend_7[25] { pt3dadd(63.042, 89.911, 42.921, 0.416)
pt3dadd(62.939, 89.972, 42.926, 0.392)
pt3dadd(62.835, 90.033, 42.93, 0.368)
pt3dadd(62.737, 90.101, 42.93, 0.354)
pt3dadd(62.639, 90.17, 42.93, 0.34)
pt3dadd(62.541, 90.239, 42.93, 0.326)
pt3dadd(62.442, 90.308, 42.93, 0.31)
pt3dadd(62.344, 90.377, 42.93, 0.296)
pt3dadd(62.246, 90.446, 42.93, 0.282)
pt3dadd(62.148, 90.515, 42.93, 0.268)
pt3dadd(62.049, 90.583, 42.93, 0.254)
pt3dadd(61.951, 90.652, 42.93, 0.24)
pt3dadd(61.853, 90.721, 42.93, 0.226)
}
dend_7[26] {pt3dclear()
pt3dadd(93.406, 103.6, 20.963, 1.356)
pt3dadd(93.346, 103.594, 20.914, 1.348)
pt3dadd(93.26, 103.586, 20.845, 1.338)
pt3dadd(93.174, 103.578, 20.775, 1.328)
pt3dadd(93.089, 103.571, 20.705, 1.318)
pt3dadd(93.003, 103.563, 20.635, 1.308)
pt3dadd(92.917, 103.555, 20.566, 1.298)
pt3dadd(92.832, 103.547, 20.496, 1.288)
pt3dadd(92.746, 103.539, 20.426, 1.278)
pt3dadd(92.66, 103.531, 20.357, 1.268)
pt3dadd(92.575, 103.523, 20.287, 1.258)
pt3dadd(92.489, 103.515, 20.217, 1.248)
pt3dadd(92.403, 103.507, 20.148, 1.238)
pt3dadd(92.317, 103.499, 20.078, 1.228)
pt3dadd(92.232, 103.491, 20.008, 1.218)
pt3dadd(92.146, 103.483, 19.939, 1.208)
pt3dadd(92.06, 103.476, 19.869, 1.198)
pt3dadd(91.974, 103.468, 19.799, 1.186)
pt3dadd(91.889, 103.46, 19.73, 1.176)
pt3dadd(91.803, 103.452, 19.66, 1.166)
pt3dadd(91.717, 103.444, 19.59, 1.156)
pt3dadd(91.628, 103.414, 19.539, 1.154)
pt3dadd(91.534, 103.343, 19.521, 1.162)
pt3dadd(91.44, 103.272, 19.503, 1.172)
pt3dadd(91.345, 103.201, 19.485, 1.182)
pt3dadd(91.251, 103.13, 19.466, 1.192)
pt3dadd(91.157, 103.059, 19.448, 1.2)
pt3dadd(91.062, 102.989, 19.43, 1.21)
pt3dadd(90.968, 102.918, 19.412, 1.22)
pt3dadd(90.873, 102.847, 19.393, 1.228)
pt3dadd(90.779, 102.776, 19.375, 1.238)
pt3dadd(90.69, 102.695, 19.371, 1.246)
pt3dadd(90.602, 102.615, 19.367, 1.254)
pt3dadd(90.513, 102.534, 19.363, 1.26)
pt3dadd(90.424, 102.454, 19.359, 1.268)
pt3dadd(90.335, 102.373, 19.354, 1.276)
pt3dadd(90.246, 102.293, 19.35, 1.284)
pt3dadd(90.158, 102.212, 19.346, 1.29)
pt3dadd(90.069, 102.132, 19.342, 1.298)
pt3dadd(89.98, 102.051, 19.337, 1.306)
pt3dadd(89.891, 101.97, 19.333, 1.312)
pt3dadd(89.802, 101.89, 19.327, 1.278)
pt3dadd(89.714, 101.81, 19.32, 1.244)
pt3dadd(89.625, 101.729, 19.314, 1.208)
pt3dadd(89.536, 101.649, 19.307, 1.174)
pt3dadd(89.447, 101.569, 19.301, 1.14)
pt3dadd(89.358, 101.488, 19.294, 1.104)
pt3dadd(89.27, 101.408, 19.288, 1.07)
pt3dadd(89.181, 101.328, 19.281, 1.036)
pt3dadd(89.092, 101.247, 19.275, 1)
pt3dadd(89.003, 101.167, 19.268, 0.968)
pt3dadd(88.903, 101.103, 19.258, 0.992)
pt3dadd(88.803, 101.038, 19.247, 1.016)
pt3dadd(88.702, 100.973, 19.236, 1.04)
pt3dadd(88.602, 100.908, 19.226, 1.064)
pt3dadd(88.502, 100.844, 19.215, 1.088)
pt3dadd(88.401, 100.779, 19.204, 1.112)
pt3dadd(88.301, 100.715, 19.194, 1.138)
pt3dadd(88.201, 100.65, 19.183, 1.162)
pt3dadd(88.101, 100.585, 19.172, 1.186)
pt3dadd(88.001, 100.52, 19.16, 1.208)
pt3dadd(87.913, 100.447, 19.13, 1.212)
pt3dadd(87.826, 100.374, 19.099, 1.214)
pt3dadd(87.738, 100.301, 19.068, 1.216)
pt3dadd(87.65, 100.228, 19.037, 1.22)
pt3dadd(87.562, 100.155, 19.006, 1.222)
pt3dadd(87.475, 100.082, 18.976, 1.224)
pt3dadd(87.387, 100.009, 18.945, 1.228)
pt3dadd(87.299, 99.936, 18.914, 1.23)
pt3dadd(87.211, 99.863, 18.883, 1.234)
pt3dadd(87.124, 99.79, 18.851, 1.232)
pt3dadd(87.037, 99.72, 18.815, 1.222)
pt3dadd(86.951, 99.649, 18.779, 1.212)
pt3dadd(86.864, 99.578, 18.743, 1.2)
pt3dadd(86.777, 99.507, 18.707, 1.19)
pt3dadd(86.691, 99.436, 18.671, 1.18)
pt3dadd(86.604, 99.365, 18.635, 1.168)
pt3dadd(86.517, 99.294, 18.599, 1.158)
pt3dadd(86.431, 99.223, 18.563, 1.148)
pt3dadd(86.344, 99.152, 18.527, 1.136)
pt3dadd(86.254, 99.083, 18.496, 1.128)
pt3dadd(86.158, 99.017, 18.474, 1.122)
pt3dadd(86.061, 98.95, 18.451, 1.114)
pt3dadd(85.965, 98.884, 18.429, 1.108)
pt3dadd(85.869, 98.817, 18.407, 1.102)
pt3dadd(85.772, 98.751, 18.385, 1.096)
pt3dadd(85.676, 98.685, 18.363, 1.088)
pt3dadd(85.58, 98.618, 18.341, 1.082)
pt3dadd(85.483, 98.552, 18.319, 1.076)
pt3dadd(85.387, 98.485, 18.297, 1.068)
pt3dadd(85.292, 98.415, 18.279, 1.058)
pt3dadd(85.199, 98.341, 18.267, 1.042)
pt3dadd(85.106, 98.267, 18.255, 1.026)
pt3dadd(85.013, 98.192, 18.243, 1.01)
pt3dadd(84.92, 98.118, 18.231, 0.994)
pt3dadd(84.827, 98.043, 18.219, 0.978)
pt3dadd(84.734, 97.969, 18.207, 0.962)
pt3dadd(84.641, 97.895, 18.195, 0.946)
pt3dadd(84.548, 97.82, 18.183, 0.93)
pt3dadd(84.455, 97.746, 18.171, 0.914)
pt3dadd(84.361, 97.671, 18.162, 0.904)
pt3dadd(84.267, 97.597, 18.156, 0.904)
pt3dadd(84.173, 97.523, 18.151, 0.904)
pt3dadd(84.079, 97.448, 18.145, 0.904)
pt3dadd(83.986, 97.374, 18.14, 0.904)
pt3dadd(83.892, 97.299, 18.134, 0.904)
pt3dadd(83.798, 97.225, 18.129, 0.904)
pt3dadd(83.704, 97.151, 18.123, 0.904)
pt3dadd(83.61, 97.076, 18.118, 0.904)
pt3dadd(83.516, 97.002, 18.112, 0.904)
pt3dadd(83.422, 96.927, 18.106, 0.908)
pt3dadd(83.33, 96.852, 18.098, 0.916)
pt3dadd(83.237, 96.776, 18.091, 0.922)
pt3dadd(83.144, 96.701, 18.084, 0.93)
pt3dadd(83.051, 96.625, 18.076, 0.938)
pt3dadd(82.958, 96.55, 18.069, 0.946)
pt3dadd(82.865, 96.474, 18.061, 0.954)
pt3dadd(82.772, 96.399, 18.054, 0.962)
pt3dadd(82.679, 96.323, 18.047, 0.97)
pt3dadd(82.587, 96.248, 18.039, 0.978)
pt3dadd(82.494, 96.172, 18.031, 0.988)
pt3dadd(82.402, 96.096, 18.022, 1.004)
pt3dadd(82.31, 96.019, 18.013, 1.018)
pt3dadd(82.218, 95.943, 18.004, 1.032)
pt3dadd(82.126, 95.867, 17.995, 1.048)
pt3dadd(82.034, 95.79, 17.986, 1.062)
pt3dadd(81.942, 95.714, 17.977, 1.078)
pt3dadd(81.85, 95.637, 17.968, 1.092)
pt3dadd(81.758, 95.561, 17.959, 1.106)
pt3dadd(81.666, 95.485, 17.95, 1.122)
pt3dadd(81.57, 95.42, 17.931, 1.13)
pt3dadd(81.469, 95.371, 17.897, 1.13)
pt3dadd(81.367, 95.323, 17.863, 1.13)
pt3dadd(81.265, 95.275, 17.829, 1.13)
pt3dadd(81.163, 95.226, 17.795, 1.13)
pt3dadd(81.061, 95.178, 17.761, 1.13)
pt3dadd(80.959, 95.129, 17.726, 1.13)
pt3dadd(80.857, 95.081, 17.692, 1.13)
pt3dadd(80.756, 95.032, 17.658, 1.13)
pt3dadd(80.654, 94.984, 17.624, 1.13)
pt3dadd(80.55, 94.933, 17.596, 1.138)
pt3dadd(80.447, 94.882, 17.569, 1.148)
pt3dadd(80.344, 94.83, 17.541, 1.156)
pt3dadd(80.24, 94.779, 17.514, 1.166)
pt3dadd(80.137, 94.728, 17.487, 1.176)
pt3dadd(80.033, 94.676, 17.46, 1.186)
pt3dadd(79.93, 94.625, 17.433, 1.196)
pt3dadd(79.826, 94.574, 17.406, 1.206)
pt3dadd(79.723, 94.522, 17.379, 1.214)
pt3dadd(79.619, 94.471, 17.352, 1.224)
pt3dadd(79.513, 94.422, 17.331, 1.234)
pt3dadd(79.405, 94.374, 17.311, 1.242)
pt3dadd(79.298, 94.325, 17.292, 1.252)
pt3dadd(79.191, 94.277, 17.272, 1.26)
pt3dadd(79.083, 94.229, 17.253, 1.27)
pt3dadd(78.976, 94.181, 17.233, 1.278)
pt3dadd(78.869, 94.132, 17.213, 1.288)
pt3dadd(78.762, 94.084, 17.194, 1.296)
pt3dadd(78.654, 94.036, 17.174, 1.306)
pt3dadd(78.547, 93.987, 17.155, 1.314)
pt3dadd(78.432, 93.956, 17.142, 1.298)
pt3dadd(78.317, 93.927, 17.131, 1.28)
pt3dadd(78.201, 93.898, 17.119, 1.262)
pt3dadd(78.085, 93.869, 17.108, 1.244)
pt3dadd(77.97, 93.84, 17.097, 1.224)
pt3dadd(77.854, 93.811, 17.085, 1.206)
pt3dadd(77.739, 93.782, 17.074, 1.188)
pt3dadd(77.623, 93.753, 17.062, 1.17)
pt3dadd(77.507, 93.724, 17.051, 1.15)
pt3dadd(77.392, 93.695, 17.039, 1.132)
pt3dadd(77.377, 93.613, 16.979, 1.13)
pt3dadd(77.377, 93.523, 16.913, 1.13)
pt3dadd(77.377, 93.434, 16.846, 1.13)
pt3dadd(77.377, 93.344, 16.78, 1.13)
pt3dadd(77.377, 93.255, 16.713, 1.13)
pt3dadd(77.377, 93.165, 16.647, 1.13)
pt3dadd(77.377, 93.076, 16.58, 1.13)
}
dend_7[27] {pt3dclear()
pt3dadd(77.377, 93.076, 16.58, 1.13)
pt3dadd(77.377, 93.052, 16.562, 1.13)
pt3dadd(77.377, 92.962, 16.496, 1.13)
pt3dadd(77.377, 92.873, 16.429, 1.13)
pt3dadd(77.377, 92.783, 16.362, 1.13)
pt3dadd(77.377, 92.694, 16.296, 1.13)
pt3dadd(77.377, 92.604, 16.229, 1.13)
pt3dadd(77.377, 92.515, 16.163, 1.13)
pt3dadd(77.377, 92.425, 16.096, 1.13)
pt3dadd(77.377, 92.336, 16.03, 1.13)
}
}
proc shape3d_187() {
dend_7[27] { pt3dadd(77.377, 92.246, 15.963, 1.13)
pt3dadd(77.352, 92.161, 15.912, 1.13)
pt3dadd(77.257, 92.088, 15.904, 1.13)
pt3dadd(77.163, 92.014, 15.897, 1.13)
pt3dadd(77.068, 91.941, 15.889, 1.13)
pt3dadd(76.973, 91.868, 15.881, 1.13)
pt3dadd(76.879, 91.795, 15.873, 1.13)
pt3dadd(76.784, 91.722, 15.866, 1.13)
pt3dadd(76.689, 91.649, 15.858, 1.13)
pt3dadd(76.595, 91.575, 15.85, 1.13)
pt3dadd(76.5, 91.502, 15.842, 1.13)
pt3dadd(76.402, 91.434, 15.836, 1.13)
pt3dadd(76.3, 91.371, 15.831, 1.13)
pt3dadd(76.198, 91.308, 15.825, 1.13)
pt3dadd(76.097, 91.244, 15.82, 1.13)
pt3dadd(75.995, 91.181, 15.815, 1.13)
pt3dadd(75.893, 91.117, 15.809, 1.13)
pt3dadd(75.792, 91.054, 15.804, 1.13)
pt3dadd(75.69, 90.99, 15.799, 1.13)
pt3dadd(75.588, 90.927, 15.793, 1.13)
pt3dadd(75.487, 90.863, 15.788, 1.13)
pt3dadd(75.381, 90.807, 15.781, 1.13)
pt3dadd(75.273, 90.756, 15.773, 1.13)
pt3dadd(75.165, 90.704, 15.765, 1.13)
pt3dadd(75.057, 90.653, 15.757, 1.13)
pt3dadd(74.949, 90.601, 15.749, 1.13)
pt3dadd(74.841, 90.55, 15.741, 1.13)
pt3dadd(74.733, 90.499, 15.733, 1.13)
pt3dadd(74.625, 90.447, 15.725, 1.13)
pt3dadd(74.517, 90.396, 15.717, 1.13)
pt3dadd(74.409, 90.344, 15.709, 1.13)
pt3dadd(74.305, 90.287, 15.699, 1.13)
pt3dadd(74.202, 90.225, 15.689, 1.13)
pt3dadd(74.1, 90.164, 15.678, 1.13)
pt3dadd(73.998, 90.102, 15.668, 1.13)
pt3dadd(73.896, 90.041, 15.657, 1.13)
pt3dadd(73.794, 89.979, 15.647, 1.13)
pt3dadd(73.691, 89.917, 15.636, 1.13)
pt3dadd(73.589, 89.856, 15.626, 1.13)
pt3dadd(73.487, 89.794, 15.615, 1.13)
pt3dadd(73.385, 89.733, 15.605, 1.13)
pt3dadd(73.281, 89.681, 15.582, 1.13)
pt3dadd(73.177, 89.635, 15.551, 1.13)
pt3dadd(73.072, 89.589, 15.52, 1.13)
pt3dadd(72.968, 89.543, 15.488, 1.13)
pt3dadd(72.864, 89.497, 15.457, 1.13)
pt3dadd(72.759, 89.451, 15.426, 1.13)
pt3dadd(72.655, 89.405, 15.395, 1.13)
pt3dadd(72.551, 89.359, 15.364, 1.13)
pt3dadd(72.446, 89.313, 15.333, 1.13)
pt3dadd(72.342, 89.267, 15.301, 1.13)
pt3dadd(72.239, 89.218, 15.271, 1.134)
pt3dadd(72.136, 89.168, 15.24, 1.142)
pt3dadd(72.033, 89.117, 15.21, 1.15)
pt3dadd(71.931, 89.067, 15.18, 1.156)
pt3dadd(71.828, 89.016, 15.15, 1.164)
pt3dadd(71.726, 88.966, 15.119, 1.17)
pt3dadd(71.623, 88.916, 15.089, 1.178)
pt3dadd(71.52, 88.865, 15.059, 1.186)
pt3dadd(71.418, 88.815, 15.028, 1.192)
pt3dadd(71.315, 88.764, 14.998, 1.2)
pt3dadd(71.214, 88.707, 14.973, 1.212)
pt3dadd(71.114, 88.647, 14.95, 1.228)
pt3dadd(71.013, 88.587, 14.928, 1.244)
pt3dadd(70.913, 88.527, 14.905, 1.26)
pt3dadd(70.813, 88.468, 14.882, 1.274)
pt3dadd(70.712, 88.408, 14.859, 1.29)
pt3dadd(70.612, 88.348, 14.837, 1.306)
pt3dadd(70.512, 88.288, 14.814, 1.32)
pt3dadd(70.411, 88.228, 14.791, 1.336)
pt3dadd(70.311, 88.168, 14.768, 1.352)
pt3dadd(70.204, 88.119, 14.75, 1.356)
pt3dadd(70.095, 88.074, 14.733, 1.356)
pt3dadd(69.985, 88.029, 14.717, 1.356)
pt3dadd(69.876, 87.984, 14.7, 1.356)
pt3dadd(69.766, 87.939, 14.684, 1.356)
pt3dadd(69.657, 87.894, 14.667, 1.356)
pt3dadd(69.547, 87.849, 14.65, 1.356)
pt3dadd(69.438, 87.804, 14.634, 1.356)
pt3dadd(69.328, 87.759, 14.617, 1.356)
pt3dadd(69.219, 87.714, 14.6, 1.356)
pt3dadd(69.114, 87.659, 14.587, 1.348)
pt3dadd(69.01, 87.6, 14.576, 1.334)
pt3dadd(68.906, 87.542, 14.564, 1.322)
pt3dadd(68.802, 87.483, 14.552, 1.31)
pt3dadd(68.699, 87.425, 14.54, 1.298)
pt3dadd(68.595, 87.366, 14.529, 1.286)
pt3dadd(68.491, 87.307, 14.517, 1.274)
pt3dadd(68.387, 87.249, 14.505, 1.262)
pt3dadd(68.284, 87.19, 14.494, 1.25)
pt3dadd(68.18, 87.132, 14.482, 1.238)
pt3dadd(68.077, 87.074, 14.465, 1.226)
pt3dadd(67.974, 87.016, 14.446, 1.216)
pt3dadd(67.872, 86.958, 14.427, 1.206)
pt3dadd(67.769, 86.9, 14.408, 1.196)
pt3dadd(67.666, 86.842, 14.389, 1.184)
pt3dadd(67.564, 86.784, 14.37, 1.174)
pt3dadd(67.461, 86.726, 14.351, 1.164)
pt3dadd(67.358, 86.668, 14.333, 1.152)
pt3dadd(67.256, 86.611, 14.314, 1.142)
pt3dadd(67.153, 86.553, 14.295, 1.132)
pt3dadd(67.051, 86.504, 14.263, 1.13)
pt3dadd(66.948, 86.457, 14.228, 1.13)
pt3dadd(66.846, 86.41, 14.194, 1.13)
pt3dadd(66.744, 86.363, 14.159, 1.13)
pt3dadd(66.641, 86.316, 14.124, 1.13)
pt3dadd(66.539, 86.27, 14.09, 1.13)
pt3dadd(66.436, 86.223, 14.055, 1.13)
pt3dadd(66.334, 86.176, 14.021, 1.13)
pt3dadd(66.232, 86.129, 13.986, 1.13)
pt3dadd(66.129, 86.082, 13.952, 1.13)
pt3dadd(66.031, 86.019, 13.929, 1.13)
pt3dadd(65.934, 85.953, 13.908, 1.13)
pt3dadd(65.837, 85.888, 13.887, 1.13)
pt3dadd(65.74, 85.822, 13.866, 1.13)
pt3dadd(65.642, 85.756, 13.845, 1.13)
pt3dadd(65.545, 85.691, 13.824, 1.13)
pt3dadd(65.448, 85.625, 13.803, 1.13)
pt3dadd(65.351, 85.559, 13.782, 1.13)
pt3dadd(65.253, 85.494, 13.761, 1.13)
pt3dadd(65.156, 85.428, 13.74, 1.13)
pt3dadd(65.06, 85.359, 13.724, 1.144)
pt3dadd(64.964, 85.289, 13.709, 1.16)
pt3dadd(64.868, 85.219, 13.694, 1.178)
pt3dadd(64.772, 85.15, 13.679, 1.194)
pt3dadd(64.676, 85.08, 13.664, 1.21)
pt3dadd(64.58, 85.01, 13.649, 1.226)
pt3dadd(64.484, 84.94, 13.634, 1.244)
pt3dadd(64.388, 84.871, 13.619, 1.26)
pt3dadd(64.292, 84.801, 13.604, 1.276)
pt3dadd(64.196, 84.731, 13.589, 1.294)
pt3dadd(64.101, 84.659, 13.578, 1.318)
pt3dadd(64.006, 84.588, 13.569, 1.344)
pt3dadd(63.91, 84.516, 13.559, 1.372)
pt3dadd(63.815, 84.444, 13.549, 1.398)
pt3dadd(63.72, 84.372, 13.54, 1.424)
pt3dadd(63.624, 84.3, 13.53, 1.45)
pt3dadd(63.529, 84.228, 13.521, 1.476)
pt3dadd(63.433, 84.156, 13.511, 1.502)
pt3dadd(63.338, 84.084, 13.501, 1.528)
pt3dadd(63.243, 84.012, 13.492, 1.556)
pt3dadd(63.14, 83.95, 13.488, 1.528)
pt3dadd(63.037, 83.889, 13.485, 1.494)
pt3dadd(62.933, 83.829, 13.482, 1.46)
pt3dadd(62.83, 83.768, 13.48, 1.426)
pt3dadd(62.727, 83.707, 13.477, 1.392)
pt3dadd(62.623, 83.646, 13.474, 1.356)
pt3dadd(62.52, 83.586, 13.471, 1.322)
pt3dadd(62.416, 83.525, 13.468, 1.288)
pt3dadd(62.313, 83.464, 13.465, 1.254)
pt3dadd(62.209, 83.403, 13.463, 1.22)
pt3dadd(62.11, 83.336, 13.457, 1.198)
pt3dadd(62.012, 83.268, 13.452, 1.176)
pt3dadd(61.913, 83.2, 13.446, 1.156)
pt3dadd(61.815, 83.131, 13.44, 1.134)
pt3dadd(61.716, 83.063, 13.434, 1.112)
pt3dadd(61.618, 82.995, 13.429, 1.092)
pt3dadd(61.52, 82.926, 13.423, 1.07)
pt3dadd(61.421, 82.858, 13.417, 1.05)
pt3dadd(61.323, 82.79, 13.412, 1.028)
pt3dadd(61.224, 82.722, 13.406, 1.006)
pt3dadd(61.13, 82.648, 13.398, 0.996)
pt3dadd(61.036, 82.575, 13.389, 0.986)
pt3dadd(60.942, 82.501, 13.38, 0.976)
pt3dadd(60.848, 82.427, 13.372, 0.966)
pt3dadd(60.754, 82.353, 13.363, 0.956)
pt3dadd(60.66, 82.279, 13.355, 0.946)
pt3dadd(60.566, 82.205, 13.346, 0.936)
pt3dadd(60.472, 82.131, 13.338, 0.926)
pt3dadd(60.378, 82.058, 13.329, 0.916)
pt3dadd(60.284, 81.984, 13.321, 0.904)
pt3dadd(60.194, 81.906, 13.309, 0.904)
pt3dadd(60.104, 81.827, 13.296, 0.904)
pt3dadd(60.014, 81.749, 13.283, 0.904)
pt3dadd(59.925, 81.67, 13.271, 0.904)
pt3dadd(59.835, 81.592, 13.258, 0.904)
pt3dadd(59.746, 81.514, 13.246, 0.904)
pt3dadd(59.656, 81.435, 13.233, 0.904)
pt3dadd(59.566, 81.357, 13.22, 0.904)
pt3dadd(59.477, 81.279, 13.208, 0.904)
pt3dadd(59.387, 81.2, 13.195, 0.904)
pt3dadd(59.311, 81.125, 13.151, 0.904)
pt3dadd(59.236, 81.05, 13.104, 0.904)
pt3dadd(59.161, 80.976, 13.057, 0.904)
pt3dadd(59.086, 80.901, 13.009, 0.904)
pt3dadd(59.011, 80.826, 12.962, 0.904)
pt3dadd(58.936, 80.752, 12.915, 0.904)
pt3dadd(58.861, 80.677, 12.868, 0.904)
pt3dadd(58.786, 80.602, 12.821, 0.904)
pt3dadd(58.711, 80.528, 12.774, 0.904)
pt3dadd(58.636, 80.453, 12.727, 0.904)
pt3dadd(58.555, 80.373, 12.694, 0.922)
pt3dadd(58.475, 80.293, 12.662, 0.94)
pt3dadd(58.394, 80.213, 12.63, 0.958)
pt3dadd(58.313, 80.133, 12.598, 0.976)
pt3dadd(58.233, 80.053, 12.566, 0.994)
pt3dadd(58.152, 79.973, 12.534, 1.012)
pt3dadd(58.071, 79.893, 12.502, 1.032)
pt3dadd(57.991, 79.813, 12.47, 1.05)
pt3dadd(57.91, 79.732, 12.438, 1.068)
}
}
proc shape3d_188() {
dend_7[27] { pt3dadd(57.829, 79.652, 12.406, 1.086)
pt3dadd(57.746, 79.57, 12.382, 1.066)
pt3dadd(57.663, 79.488, 12.359, 1.044)
pt3dadd(57.58, 79.406, 12.336, 1.02)
pt3dadd(57.497, 79.324, 12.313, 0.998)
pt3dadd(57.414, 79.242, 12.29, 0.974)
pt3dadd(57.331, 79.16, 12.267, 0.952)
pt3dadd(57.248, 79.078, 12.244, 0.93)
pt3dadd(57.165, 78.996, 12.221, 0.906)
pt3dadd(57.081, 78.914, 12.198, 0.884)
pt3dadd(56.998, 78.832, 12.175, 0.862)
pt3dadd(56.917, 78.753, 12.143, 0.842)
pt3dadd(56.836, 78.673, 12.112, 0.824)
pt3dadd(56.754, 78.594, 12.08, 0.806)
pt3dadd(56.673, 78.514, 12.048, 0.788)
pt3dadd(56.592, 78.435, 12.016, 0.77)
pt3dadd(56.51, 78.355, 11.984, 0.75)
pt3dadd(56.429, 78.276, 11.952, 0.732)
pt3dadd(56.348, 78.196, 11.92, 0.714)
pt3dadd(56.266, 78.117, 11.888, 0.696)
pt3dadd(56.185, 78.037, 11.856, 0.678)
pt3dadd(56.104, 77.96, 11.82, 0.7)
pt3dadd(56.023, 77.883, 11.784, 0.724)
pt3dadd(55.941, 77.806, 11.748, 0.746)
pt3dadd(55.86, 77.729, 11.712, 0.768)
pt3dadd(55.779, 77.652, 11.676, 0.792)
pt3dadd(55.698, 77.575, 11.64, 0.814)
pt3dadd(55.616, 77.498, 11.604, 0.836)
pt3dadd(55.535, 77.421, 11.568, 0.858)
pt3dadd(55.454, 77.344, 11.532, 0.882)
pt3dadd(55.372, 77.267, 11.497, 0.906)
pt3dadd(55.286, 77.187, 11.476, 0.948)
pt3dadd(55.2, 77.108, 11.455, 0.99)
pt3dadd(55.113, 77.029, 11.433, 1.032)
pt3dadd(55.027, 76.949, 11.412, 1.074)
pt3dadd(54.941, 76.87, 11.391, 1.118)
pt3dadd(54.854, 76.791, 11.37, 1.16)
pt3dadd(54.768, 76.711, 11.348, 1.202)
pt3dadd(54.682, 76.632, 11.327, 1.244)
pt3dadd(54.595, 76.553, 11.306, 1.286)
pt3dadd(54.509, 76.473, 11.286, 1.324)
pt3dadd(54.42, 76.393, 11.276, 1.306)
pt3dadd(54.331, 76.313, 11.266, 1.29)
pt3dadd(54.243, 76.233, 11.257, 1.274)
pt3dadd(54.154, 76.153, 11.247, 1.258)
pt3dadd(54.066, 76.073, 11.237, 1.24)
pt3dadd(53.977, 75.993, 11.228, 1.224)
pt3dadd(53.888, 75.913, 11.218, 1.208)
pt3dadd(53.799, 75.833, 11.208, 1.19)
pt3dadd(53.711, 75.753, 11.199, 1.174)
pt3dadd(53.621, 75.674, 11.19, 1.16)
pt3dadd(53.522, 75.606, 11.188, 1.172)
pt3dadd(53.423, 75.538, 11.187, 1.184)
pt3dadd(53.325, 75.47, 11.185, 1.196)
pt3dadd(53.226, 75.402, 11.183, 1.206)
pt3dadd(53.127, 75.334, 11.182, 1.218)
pt3dadd(53.028, 75.266, 11.18, 1.23)
pt3dadd(52.929, 75.198, 11.178, 1.242)
pt3dadd(52.83, 75.13, 11.177, 1.254)
pt3dadd(52.731, 75.062, 11.175, 1.266)
pt3dadd(52.633, 74.994, 11.174, 1.274)
pt3dadd(52.537, 74.921, 11.174, 1.254)
pt3dadd(52.442, 74.848, 11.174, 1.234)
pt3dadd(52.347, 74.776, 11.174, 1.214)
pt3dadd(52.251, 74.703, 11.174, 1.194)
pt3dadd(52.156, 74.63, 11.174, 1.174)
pt3dadd(52.06, 74.557, 11.174, 1.154)
pt3dadd(51.965, 74.485, 11.174, 1.134)
pt3dadd(51.869, 74.412, 11.174, 1.116)
pt3dadd(51.774, 74.339, 11.174, 1.096)
pt3dadd(51.68, 74.265, 11.174, 1.074)
pt3dadd(51.594, 74.181, 11.174, 1.038)
pt3dadd(51.509, 74.096, 11.174, 1)
pt3dadd(51.424, 74.012, 11.174, 0.964)
pt3dadd(51.338, 73.928, 11.174, 0.928)
pt3dadd(51.253, 73.843, 11.174, 0.892)
pt3dadd(51.168, 73.759, 11.174, 0.856)
pt3dadd(51.082, 73.675, 11.174, 0.82)
pt3dadd(50.997, 73.59, 11.174, 0.784)
pt3dadd(50.911, 73.506, 11.174, 0.746)
pt3dadd(50.831, 73.418, 11.174, 0.722)
pt3dadd(50.768, 73.316, 11.174, 0.74)
pt3dadd(50.705, 73.213, 11.174, 0.758)
pt3dadd(50.642, 73.111, 11.174, 0.776)
pt3dadd(50.579, 73.009, 11.174, 0.794)
pt3dadd(50.517, 72.907, 11.174, 0.812)
pt3dadd(50.454, 72.804, 11.174, 0.828)
pt3dadd(50.391, 72.702, 11.174, 0.846)
pt3dadd(50.328, 72.6, 11.174, 0.864)
pt3dadd(50.265, 72.498, 11.174, 0.882)
pt3dadd(50.201, 72.396, 11.174, 0.888)
pt3dadd(50.134, 72.297, 11.174, 0.854)
pt3dadd(50.067, 72.197, 11.174, 0.822)
pt3dadd(50, 72.098, 11.174, 0.788)
pt3dadd(49.933, 71.998, 11.174, 0.754)
pt3dadd(49.866, 71.899, 11.174, 0.72)
pt3dadd(49.799, 71.799, 11.174, 0.686)
pt3dadd(49.732, 71.7, 11.174, 0.652)
pt3dadd(49.665, 71.6, 11.174, 0.618)
pt3dadd(49.598, 71.501, 11.174, 0.584)
pt3dadd(49.532, 71.4, 11.174, 0.558)
pt3dadd(49.47, 71.297, 11.174, 0.562)
pt3dadd(49.409, 71.194, 11.174, 0.564)
pt3dadd(49.348, 71.091, 11.174, 0.566)
pt3dadd(49.286, 70.988, 11.174, 0.57)
pt3dadd(49.225, 70.885, 11.174, 0.572)
pt3dadd(49.164, 70.782, 11.174, 0.574)
pt3dadd(49.102, 70.678, 11.174, 0.576)
pt3dadd(49.041, 70.575, 11.174, 0.58)
pt3dadd(48.98, 70.472, 11.174, 0.582)
pt3dadd(48.916, 70.371, 11.174, 0.582)
pt3dadd(48.843, 70.275, 11.174, 0.572)
pt3dadd(48.771, 70.18, 11.174, 0.564)
pt3dadd(48.698, 70.084, 11.174, 0.554)
pt3dadd(48.625, 69.989, 11.174, 0.546)
pt3dadd(48.553, 69.893, 11.174, 0.536)
pt3dadd(48.48, 69.798, 11.174, 0.528)
pt3dadd(48.407, 69.702, 11.174, 0.518)
pt3dadd(48.335, 69.607, 11.174, 0.51)
pt3dadd(48.262, 69.511, 11.174, 0.5)
pt3dadd(48.183, 69.422, 11.174, 0.486)
pt3dadd(48.089, 69.347, 11.174, 0.458)
pt3dadd(47.996, 69.271, 11.174, 0.432)
pt3dadd(47.903, 69.196, 11.174, 0.404)
pt3dadd(47.81, 69.12, 11.174, 0.376)
pt3dadd(47.716, 69.045, 11.174, 0.35)
pt3dadd(47.623, 68.969, 11.174, 0.322)
pt3dadd(47.53, 68.894, 11.174, 0.294)
pt3dadd(47.436, 68.818, 11.174, 0.268)
pt3dadd(47.343, 68.743, 11.174, 0.24)
pt3dadd(47.24, 68.685, 11.174, 0.23)
pt3dadd(47.127, 68.646, 11.174, 0.238)
pt3dadd(47.013, 68.606, 11.174, 0.246)
pt3dadd(46.9, 68.567, 11.174, 0.254)
pt3dadd(46.786, 68.528, 11.174, 0.26)
pt3dadd(46.673, 68.489, 11.174, 0.268)
pt3dadd(46.56, 68.45, 11.174, 0.276)
pt3dadd(46.446, 68.41, 11.174, 0.284)
pt3dadd(46.333, 68.371, 11.174, 0.292)
pt3dadd(46.219, 68.332, 11.174, 0.3)
pt3dadd(46.103, 68.308, 11.174, 0.334)
pt3dadd(45.983, 68.298, 11.174, 0.392)
pt3dadd(45.864, 68.288, 11.174, 0.448)
pt3dadd(45.744, 68.277, 11.174, 0.506)
pt3dadd(45.624, 68.267, 11.174, 0.564)
pt3dadd(45.505, 68.257, 11.174, 0.62)
pt3dadd(45.385, 68.247, 11.174, 0.678)
pt3dadd(45.266, 68.236, 11.174, 0.736)
pt3dadd(45.146, 68.226, 11.174, 0.794)
pt3dadd(45.027, 68.216, 11.174, 0.85)
pt3dadd(44.907, 68.214, 11.174, 0.85)
pt3dadd(44.787, 68.221, 11.174, 0.798)
pt3dadd(44.667, 68.228, 11.174, 0.746)
pt3dadd(44.547, 68.234, 11.174, 0.692)
pt3dadd(44.428, 68.241, 11.174, 0.64)
pt3dadd(44.308, 68.248, 11.174, 0.588)
pt3dadd(44.188, 68.255, 11.174, 0.536)
pt3dadd(44.068, 68.261, 11.174, 0.484)
pt3dadd(43.948, 68.268, 11.174, 0.432)
pt3dadd(43.829, 68.275, 11.174, 0.38)
pt3dadd(43.709, 68.284, 11.174, 0.364)
pt3dadd(43.59, 68.295, 11.174, 0.38)
pt3dadd(43.47, 68.306, 11.174, 0.398)
pt3dadd(43.35, 68.316, 11.174, 0.414)
pt3dadd(43.231, 68.327, 11.174, 0.432)
pt3dadd(43.111, 68.338, 11.174, 0.448)
pt3dadd(42.992, 68.349, 11.174, 0.464)
pt3dadd(42.873, 68.36, 11.174, 0.482)
pt3dadd(42.753, 68.371, 11.174, 0.498)
pt3dadd(42.633, 68.382, 11.174, 0.516)
pt3dadd(42.516, 68.403, 11.174, 0.542)
pt3dadd(42.399, 68.433, 11.174, 0.58)
pt3dadd(42.283, 68.462, 11.174, 0.618)
pt3dadd(42.167, 68.492, 11.174, 0.654)
pt3dadd(42.051, 68.522, 11.174, 0.692)
pt3dadd(41.934, 68.551, 11.174, 0.73)
pt3dadd(41.818, 68.581, 11.174, 0.766)
pt3dadd(41.702, 68.61, 11.174, 0.804)
pt3dadd(41.585, 68.64, 11.174, 0.84)
pt3dadd(41.469, 68.67, 11.174, 0.878)
pt3dadd(41.354, 68.702, 11.174, 0.9)
pt3dadd(41.238, 68.736, 11.174, 0.91)
pt3dadd(41.123, 68.77, 11.174, 0.92)
pt3dadd(41.008, 68.804, 11.174, 0.932)
pt3dadd(40.893, 68.838, 11.174, 0.942)
pt3dadd(40.778, 68.872, 11.174, 0.954)
pt3dadd(40.663, 68.906, 11.174, 0.964)
pt3dadd(40.548, 68.94, 11.174, 0.974)
pt3dadd(40.433, 68.974, 11.174, 0.986)
pt3dadd(40.318, 69.008, 11.174, 0.996)
pt3dadd(40.2, 69.03, 11.174, 0.98)
pt3dadd(40.081, 69.046, 11.174, 0.952)
pt3dadd(39.962, 69.062, 11.174, 0.922)
pt3dadd(39.843, 69.078, 11.174, 0.892)
pt3dadd(39.725, 69.094, 11.174, 0.864)
pt3dadd(39.606, 69.11, 11.174, 0.834)
pt3dadd(39.487, 69.126, 11.174, 0.804)
pt3dadd(39.368, 69.142, 11.174, 0.776)
pt3dadd(39.249, 69.158, 11.174, 0.746)
pt3dadd(39.13, 69.174, 11.174, 0.716)
}
}
proc shape3d_189() {
dend_7[27] { pt3dadd(39.01, 69.177, 11.174, 0.72)
pt3dadd(38.89, 69.173, 11.174, 0.74)
pt3dadd(38.77, 69.169, 11.174, 0.76)
pt3dadd(38.65, 69.166, 11.174, 0.778)
pt3dadd(38.531, 69.162, 11.174, 0.798)
pt3dadd(38.411, 69.158, 11.174, 0.816)
pt3dadd(38.291, 69.154, 11.174, 0.836)
pt3dadd(38.171, 69.15, 11.174, 0.856)
pt3dadd(38.051, 69.147, 11.174, 0.874)
pt3dadd(37.931, 69.143, 11.174, 0.894)
pt3dadd(37.818, 69.108, 11.174, 0.912)
pt3dadd(37.709, 69.059, 11.174, 0.93)
pt3dadd(37.599, 69.01, 11.174, 0.948)
pt3dadd(37.49, 68.961, 11.174, 0.966)
pt3dadd(37.38, 68.911, 11.174, 0.984)
pt3dadd(37.271, 68.862, 11.174, 1)
pt3dadd(37.161, 68.813, 11.174, 1.018)
pt3dadd(37.052, 68.763, 11.174, 1.036)
pt3dadd(36.943, 68.714, 11.174, 1.054)
pt3dadd(36.833, 68.665, 11.174, 1.072)
pt3dadd(36.723, 68.619, 11.174, 1.046)
pt3dadd(36.611, 68.574, 11.174, 1)
pt3dadd(36.5, 68.529, 11.175, 0.954)
pt3dadd(36.389, 68.484, 11.175, 0.908)
pt3dadd(36.277, 68.439, 11.175, 0.862)
pt3dadd(36.166, 68.394, 11.175, 0.816)
pt3dadd(36.055, 68.349, 11.175, 0.77)
pt3dadd(35.943, 68.305, 11.175, 0.724)
pt3dadd(35.832, 68.26, 11.175, 0.678)
pt3dadd(35.721, 68.215, 11.175, 0.632)
pt3dadd(35.609, 68.172, 11.175, 0.59)
pt3dadd(35.496, 68.13, 11.175, 0.552)
pt3dadd(35.384, 68.088, 11.175, 0.512)
pt3dadd(35.271, 68.046, 11.175, 0.474)
pt3dadd(35.159, 68.004, 11.176, 0.434)
pt3dadd(35.047, 67.962, 11.176, 0.394)
pt3dadd(34.934, 67.92, 11.176, 0.356)
pt3dadd(34.822, 67.878, 11.176, 0.316)
pt3dadd(34.709, 67.836, 11.176, 0.278)
pt3dadd(34.597, 67.794, 11.176, 0.238)
pt3dadd(34.487, 67.747, 11.176, 0.226)
pt3dadd(34.377, 67.698, 11.177, 0.226)
pt3dadd(34.268, 67.649, 11.177, 0.226)
pt3dadd(34.158, 67.6, 11.177, 0.226)
pt3dadd(34.049, 67.551, 11.177, 0.226)
pt3dadd(33.939, 67.502, 11.177, 0.226)
pt3dadd(33.83, 67.452, 11.178, 0.226)
pt3dadd(33.72, 67.403, 11.178, 0.226)
pt3dadd(33.611, 67.354, 11.178, 0.226)
pt3dadd(33.501, 67.305, 11.178, 0.226)
pt3dadd(33.401, 67.241, 11.179, 0.226)
pt3dadd(33.303, 67.171, 11.179, 0.226)
pt3dadd(33.205, 67.101, 11.179, 0.226)
pt3dadd(33.107, 67.032, 11.18, 0.226)
pt3dadd(33.009, 66.963, 11.18, 0.226)
pt3dadd(32.912, 66.893, 11.18, 0.226)
pt3dadd(32.814, 66.824, 11.181, 0.226)
pt3dadd(32.716, 66.754, 11.181, 0.226)
pt3dadd(32.618, 66.685, 11.181, 0.226)
pt3dadd(32.52, 66.615, 11.182, 0.226)
pt3dadd(32.434, 66.532, 11.182, 0.272)
pt3dadd(32.352, 66.445, 11.183, 0.334)
pt3dadd(32.269, 66.358, 11.184, 0.394)
pt3dadd(32.186, 66.271, 11.184, 0.454)
pt3dadd(32.104, 66.184, 11.185, 0.516)
pt3dadd(32.021, 66.097, 11.185, 0.576)
pt3dadd(31.939, 66.01, 11.186, 0.636)
pt3dadd(31.856, 65.923, 11.187, 0.698)
pt3dadd(31.773, 65.835, 11.187, 0.758)
pt3dadd(31.691, 65.748, 11.188, 0.818)
pt3dadd(31.621, 65.651, 11.189, 0.826)
pt3dadd(31.554, 65.552, 11.19, 0.82)
pt3dadd(31.488, 65.452, 11.191, 0.812)
pt3dadd(31.421, 65.352, 11.193, 0.806)
pt3dadd(31.355, 65.252, 11.194, 0.798)
pt3dadd(31.288, 65.152, 11.195, 0.792)
pt3dadd(31.222, 65.052, 11.196, 0.784)
pt3dadd(31.155, 64.952, 11.197, 0.776)
pt3dadd(31.089, 64.853, 11.198, 0.77)
pt3dadd(31.022, 64.753, 11.2, 0.762)
pt3dadd(30.968, 64.645, 11.201, 0.714)
pt3dadd(30.916, 64.537, 11.203, 0.66)
pt3dadd(30.864, 64.429, 11.205, 0.606)
pt3dadd(30.812, 64.321, 11.207, 0.554)
pt3dadd(30.76, 64.213, 11.209, 0.5)
pt3dadd(30.708, 64.105, 11.211, 0.446)
pt3dadd(30.655, 63.997, 11.213, 0.392)
pt3dadd(30.603, 63.889, 11.215, 0.338)
pt3dadd(30.551, 63.781, 11.217, 0.286)
pt3dadd(30.499, 63.673, 11.219, 0.232)
pt3dadd(30.444, 63.566, 11.222, 0.226)
pt3dadd(30.39, 63.459, 11.226, 0.226)
pt3dadd(30.335, 63.353, 11.229, 0.226)
pt3dadd(30.281, 63.246, 11.232, 0.226)
pt3dadd(30.226, 63.139, 11.235, 0.226)
pt3dadd(30.171, 63.032, 11.239, 0.226)
pt3dadd(30.117, 62.926, 11.242, 0.226)
pt3dadd(30.062, 62.819, 11.245, 0.226)
pt3dadd(30.007, 62.712, 11.248, 0.226)
pt3dadd(29.953, 62.605, 11.252, 0.226)
pt3dadd(29.919, 62.491, 11.259, 0.256)
pt3dadd(29.888, 62.375, 11.267, 0.29)
pt3dadd(29.857, 62.26, 11.275, 0.324)
pt3dadd(29.826, 62.144, 11.283, 0.358)
pt3dadd(29.795, 62.029, 11.291, 0.392)
pt3dadd(29.764, 61.913, 11.299, 0.426)
pt3dadd(29.733, 61.798, 11.307, 0.46)
pt3dadd(29.702, 61.682, 11.315, 0.494)
pt3dadd(29.671, 61.567, 11.323, 0.528)
pt3dadd(29.64, 61.451, 11.331, 0.562)
pt3dadd(29.621, 61.334, 11.344, 0.576)
pt3dadd(29.603, 61.216, 11.357, 0.586)
pt3dadd(29.586, 61.098, 11.37, 0.598)
pt3dadd(29.568, 60.981, 11.383, 0.61)
pt3dadd(29.55, 60.863, 11.396, 0.62)
pt3dadd(29.533, 60.745, 11.409, 0.632)
pt3dadd(29.515, 60.628, 11.422, 0.644)
pt3dadd(29.497, 60.51, 11.435, 0.654)
pt3dadd(29.48, 60.392, 11.448, 0.666)
pt3dadd(29.462, 60.275, 11.461, 0.678)
pt3dadd(29.455, 60.16, 11.49, 0.662)
pt3dadd(29.449, 60.046, 11.521, 0.644)
pt3dadd(29.443, 59.932, 11.551, 0.626)
pt3dadd(29.437, 59.818, 11.581, 0.608)
pt3dadd(29.431, 59.703, 11.611, 0.59)
pt3dadd(29.425, 59.589, 11.641, 0.572)
pt3dadd(29.419, 59.475, 11.671, 0.554)
pt3dadd(29.413, 59.361, 11.702, 0.536)
pt3dadd(29.407, 59.246, 11.732, 0.518)
pt3dadd(29.401, 59.133, 11.763, 0.498)
pt3dadd(29.402, 59.024, 11.806, 0.472)
pt3dadd(29.403, 58.916, 11.848, 0.444)
pt3dadd(29.404, 58.807, 11.891, 0.416)
pt3dadd(29.405, 58.699, 11.934, 0.388)
pt3dadd(29.406, 58.59, 11.977, 0.362)
pt3dadd(29.406, 58.482, 12.019, 0.334)
pt3dadd(29.407, 58.373, 12.062, 0.306)
pt3dadd(29.408, 58.265, 12.105, 0.278)
pt3dadd(29.409, 58.156, 12.148, 0.252)
pt3dadd(29.41, 58.047, 12.19, 0.226)
pt3dadd(29.412, 57.936, 12.227, 0.226)
pt3dadd(29.413, 57.825, 12.265, 0.226)
pt3dadd(29.415, 57.714, 12.302, 0.226)
pt3dadd(29.417, 57.602, 12.34, 0.226)
pt3dadd(29.418, 57.491, 12.377, 0.226)
pt3dadd(29.42, 57.38, 12.414, 0.226)
pt3dadd(29.421, 57.269, 12.452, 0.226)
pt3dadd(29.423, 57.157, 12.489, 0.226)
pt3dadd(29.425, 57.046, 12.527, 0.226)
pt3dadd(29.426, 56.935, 12.565, 0.228)
pt3dadd(29.429, 56.834, 12.618, 0.264)
pt3dadd(29.432, 56.732, 12.671, 0.298)
pt3dadd(29.435, 56.63, 12.724, 0.332)
pt3dadd(29.439, 56.528, 12.777, 0.366)
pt3dadd(29.442, 56.426, 12.83, 0.4)
pt3dadd(29.445, 56.325, 12.882, 0.436)
pt3dadd(29.448, 56.223, 12.935, 0.47)
pt3dadd(29.451, 56.121, 12.988, 0.504)
pt3dadd(29.454, 56.019, 13.041, 0.538)
pt3dadd(29.457, 55.917, 13.093, 0.574)
pt3dadd(29.464, 55.808, 13.136, 0.612)
pt3dadd(29.471, 55.7, 13.179, 0.65)
pt3dadd(29.478, 55.592, 13.221, 0.69)
pt3dadd(29.485, 55.484, 13.264, 0.728)
pt3dadd(29.492, 55.376, 13.307, 0.766)
pt3dadd(29.499, 55.267, 13.35, 0.806)
pt3dadd(29.506, 55.159, 13.392, 0.844)
pt3dadd(29.513, 55.051, 13.435, 0.882)
pt3dadd(29.52, 54.943, 13.478, 0.922)
pt3dadd(29.528, 54.835, 13.522, 0.954)
pt3dadd(29.542, 54.735, 13.576, 0.944)
pt3dadd(29.556, 54.635, 13.63, 0.934)
pt3dadd(29.569, 54.534, 13.683, 0.924)
pt3dadd(29.583, 54.434, 13.737, 0.914)
pt3dadd(29.597, 54.334, 13.791, 0.904)
pt3dadd(29.611, 54.234, 13.844, 0.894)
pt3dadd(29.625, 54.133, 13.898, 0.884)
pt3dadd(29.638, 54.033, 13.952, 0.874)
pt3dadd(29.652, 53.933, 14.005, 0.864)
pt3dadd(29.673, 53.832, 14.056, 0.85)
pt3dadd(29.714, 53.732, 14.099, 0.816)
pt3dadd(29.755, 53.632, 14.142, 0.784)
pt3dadd(29.797, 53.532, 14.185, 0.752)
pt3dadd(29.838, 53.432, 14.228, 0.72)
pt3dadd(29.88, 53.332, 14.271, 0.688)
pt3dadd(29.921, 53.231, 14.314, 0.654)
pt3dadd(29.962, 53.131, 14.357, 0.622)
pt3dadd(30.004, 53.031, 14.4, 0.59)
pt3dadd(30.045, 52.931, 14.443, 0.558)
pt3dadd(30.086, 52.826, 14.474, 0.53)
pt3dadd(30.127, 52.715, 14.493, 0.51)
pt3dadd(30.168, 52.605, 14.513, 0.488)
pt3dadd(30.209, 52.495, 14.533, 0.466)
pt3dadd(30.25, 52.384, 14.552, 0.446)
pt3dadd(30.291, 52.274, 14.572, 0.424)
pt3dadd(30.332, 52.164, 14.591, 0.402)
pt3dadd(30.373, 52.053, 14.611, 0.382)
pt3dadd(30.414, 51.943, 14.63, 0.36)
pt3dadd(30.455, 51.833, 14.65, 0.338)
pt3dadd(30.484, 51.718, 14.662, 0.324)
}
}
proc shape3d_190() {
dend_7[27] { pt3dadd(30.505, 51.6, 14.67, 0.314)
pt3dadd(30.527, 51.482, 14.678, 0.302)
pt3dadd(30.548, 51.365, 14.685, 0.292)
pt3dadd(30.57, 51.247, 14.693, 0.282)
pt3dadd(30.591, 51.129, 14.7, 0.272)
pt3dadd(30.613, 51.012, 14.708, 0.262)
pt3dadd(30.634, 50.894, 14.715, 0.25)
pt3dadd(30.656, 50.776, 14.723, 0.24)
pt3dadd(30.677, 50.658, 14.73, 0.23)
pt3dadd(30.689, 50.539, 14.735, 0.238)
pt3dadd(30.696, 50.42, 14.738, 0.258)
pt3dadd(30.702, 50.3, 14.741, 0.278)
pt3dadd(30.709, 50.18, 14.744, 0.298)
pt3dadd(30.715, 50.06, 14.747, 0.318)
pt3dadd(30.722, 49.941, 14.75, 0.336)
pt3dadd(30.728, 49.821, 14.753, 0.356)
pt3dadd(30.735, 49.701, 14.756, 0.376)
pt3dadd(30.741, 49.581, 14.759, 0.396)
pt3dadd(30.748, 49.461, 14.762, 0.414)
pt3dadd(30.747, 49.342, 14.767, 0.454)
pt3dadd(30.742, 49.222, 14.772, 0.502)
pt3dadd(30.737, 49.102, 14.778, 0.55)
pt3dadd(30.733, 48.983, 14.784, 0.598)
pt3dadd(30.728, 48.863, 14.789, 0.646)
pt3dadd(30.723, 48.743, 14.795, 0.696)
pt3dadd(30.718, 48.623, 14.8, 0.744)
pt3dadd(30.714, 48.504, 14.806, 0.792)
pt3dadd(30.709, 48.384, 14.812, 0.84)
pt3dadd(30.704, 48.264, 14.817, 0.888)
pt3dadd(30.696, 48.145, 14.825, 0.904)
pt3dadd(30.686, 48.026, 14.835, 0.902)
pt3dadd(30.677, 47.907, 14.844, 0.9)
pt3dadd(30.667, 47.788, 14.853, 0.9)
pt3dadd(30.657, 47.669, 14.863, 0.898)
pt3dadd(30.648, 47.55, 14.872, 0.898)
pt3dadd(30.638, 47.43, 14.881, 0.896)
pt3dadd(30.628, 47.311, 14.891, 0.894)
pt3dadd(30.619, 47.192, 14.9, 0.894)
pt3dadd(30.609, 47.073, 14.91, 0.892)
pt3dadd(30.595, 46.959, 14.934, 0.878)
pt3dadd(30.578, 46.846, 14.965, 0.858)
pt3dadd(30.562, 46.733, 14.996, 0.838)
pt3dadd(30.546, 46.62, 15.027, 0.816)
pt3dadd(30.53, 46.507, 15.059, 0.796)
pt3dadd(30.513, 46.394, 15.09, 0.776)
pt3dadd(30.497, 46.281, 15.121, 0.756)
pt3dadd(30.481, 46.168, 15.152, 0.736)
pt3dadd(30.465, 46.056, 15.183, 0.714)
pt3dadd(30.448, 45.943, 15.214, 0.694)
pt3dadd(30.406, 45.835, 15.233, 0.702)
pt3dadd(30.352, 45.729, 15.245, 0.722)
pt3dadd(30.297, 45.623, 15.257, 0.742)
pt3dadd(30.243, 45.517, 15.27, 0.762)
pt3dadd(30.189, 45.411, 15.282, 0.782)
pt3dadd(30.135, 45.305, 15.294, 0.802)
pt3dadd(30.081, 45.198, 15.307, 0.822)
pt3dadd(30.026, 45.093, 15.319, 0.842)
pt3dadd(29.972, 44.987, 15.331, 0.862)
pt3dadd(29.918, 44.88, 15.344, 0.882)
pt3dadd(29.865, 44.799, 15.299, 0.838)
pt3dadd(29.812, 44.726, 15.233, 0.77)
pt3dadd(29.759, 44.653, 15.166, 0.702)
pt3dadd(29.706, 44.58, 15.1, 0.634)
pt3dadd(29.654, 44.508, 15.034, 0.566)
pt3dadd(29.601, 44.435, 14.967, 0.498)
pt3dadd(29.548, 44.362, 14.901, 0.43)
pt3dadd(29.495, 44.29, 14.835, 0.362)
pt3dadd(29.443, 44.217, 14.768, 0.294)
pt3dadd(29.39, 44.144, 14.702, 0.226)
}
dend_7[28] {pt3dclear()
pt3dadd(77.377, 93.076, 16.58, 1.13)
pt3dadd(77.359, 93.145, 16.5, 1.092)
pt3dadd(77.34, 93.215, 16.42, 1.054)
pt3dadd(77.322, 93.284, 16.34, 1.016)
pt3dadd(77.304, 93.354, 16.26, 0.98)
pt3dadd(77.285, 93.424, 16.18, 0.942)
pt3dadd(77.267, 93.493, 16.1, 0.904)
}
dend_7[29] {pt3dclear()
pt3dadd(77.267, 93.493, 16.1, 0.904)
pt3dadd(77.22, 93.481, 16.108, 0.904)
pt3dadd(77.107, 93.452, 16.128, 0.904)
pt3dadd(76.993, 93.423, 16.148, 0.904)
pt3dadd(76.879, 93.394, 16.168, 0.904)
pt3dadd(76.765, 93.365, 16.188, 0.904)
pt3dadd(76.651, 93.332, 16.2, 0.904)
pt3dadd(76.538, 93.292, 16.2, 0.904)
pt3dadd(76.425, 93.252, 16.2, 0.904)
pt3dadd(76.311, 93.213, 16.2, 0.904)
pt3dadd(76.198, 93.173, 16.2, 0.904)
pt3dadd(76.083, 93.148, 16.213, 0.904)
pt3dadd(75.966, 93.131, 16.232, 0.904)
pt3dadd(75.882, 93.113, 16.28, 0.904)
pt3dadd(75.852, 93.095, 16.375, 0.904)
pt3dadd(75.808, 93.077, 16.457, 0.904)
pt3dadd(75.69, 93.057, 16.469, 0.904)
pt3dadd(75.573, 93.037, 16.48, 0.904)
pt3dadd(75.455, 93.016, 16.491, 0.904)
pt3dadd(75.337, 93, 16.5, 0.904)
pt3dadd(75.217, 93, 16.5, 0.904)
pt3dadd(75.097, 93, 16.5, 0.904)
pt3dadd(74.977, 92.997, 16.5, 0.904)
pt3dadd(74.858, 92.982, 16.5, 0.904)
pt3dadd(74.74, 92.964, 16.5, 0.904)
pt3dadd(74.621, 92.947, 16.5, 0.904)
pt3dadd(74.502, 92.93, 16.5, 0.904)
pt3dadd(74.383, 92.913, 16.5, 0.904)
pt3dadd(74.265, 92.895, 16.5, 0.904)
pt3dadd(74.146, 92.88, 16.5, 0.904)
pt3dadd(74.026, 92.88, 16.5, 0.904)
pt3dadd(73.906, 92.88, 16.5, 0.904)
pt3dadd(73.786, 92.88, 16.5, 0.904)
pt3dadd(73.666, 92.88, 16.5, 0.904)
pt3dadd(73.546, 92.88, 16.5, 0.904)
pt3dadd(73.426, 92.88, 16.5, 0.904)
pt3dadd(73.306, 92.88, 16.5, 0.904)
pt3dadd(73.186, 92.88, 16.5, 0.904)
pt3dadd(73.066, 92.88, 16.5, 0.904)
pt3dadd(72.946, 92.88, 16.5, 0.904)
pt3dadd(72.826, 92.88, 16.5, 0.904)
pt3dadd(72.706, 92.88, 16.5, 0.904)
pt3dadd(72.586, 92.88, 16.5, 0.904)
pt3dadd(72.466, 92.88, 16.5, 0.904)
pt3dadd(72.346, 92.878, 16.5, 0.904)
pt3dadd(72.226, 92.876, 16.5, 0.904)
pt3dadd(72.106, 92.874, 16.5, 0.904)
pt3dadd(71.986, 92.872, 16.5, 0.904)
pt3dadd(71.866, 92.87, 16.5, 0.904)
pt3dadd(71.746, 92.868, 16.5, 0.904)
pt3dadd(71.626, 92.861, 16.5, 0.904)
pt3dadd(71.509, 92.836, 16.5, 0.904)
pt3dadd(71.392, 92.812, 16.5, 0.904)
pt3dadd(71.274, 92.787, 16.5, 0.904)
pt3dadd(71.157, 92.762, 16.5, 0.904)
pt3dadd(71.039, 92.737, 16.5, 0.904)
pt3dadd(70.923, 92.709, 16.5, 0.904)
pt3dadd(70.808, 92.673, 16.5, 0.904)
pt3dadd(70.694, 92.637, 16.5, 0.904)
pt3dadd(70.579, 92.601, 16.5, 0.904)
pt3dadd(70.465, 92.565, 16.5, 0.904)
pt3dadd(70.35, 92.529, 16.5, 0.904)
pt3dadd(70.232, 92.52, 16.5, 0.904)
pt3dadd(70.112, 92.52, 16.5, 0.904)
pt3dadd(69.992, 92.52, 16.5, 0.904)
pt3dadd(69.872, 92.52, 16.5, 0.904)
pt3dadd(69.752, 92.52, 16.5, 0.904)
pt3dadd(69.632, 92.52, 16.5, 0.904)
pt3dadd(69.512, 92.52, 16.5, 0.904)
pt3dadd(69.392, 92.52, 16.5, 0.904)
pt3dadd(69.272, 92.52, 16.5, 0.904)
pt3dadd(69.152, 92.52, 16.5, 0.904)
pt3dadd(69.032, 92.52, 16.5, 0.904)
pt3dadd(68.912, 92.52, 16.5, 0.904)
pt3dadd(68.792, 92.52, 16.5, 0.904)
pt3dadd(68.672, 92.52, 16.5, 0.904)
pt3dadd(68.552, 92.52, 16.5, 0.904)
pt3dadd(68.432, 92.52, 16.5, 0.904)
pt3dadd(68.312, 92.52, 16.5, 0.904)
pt3dadd(68.193, 92.505, 16.5, 0.904)
pt3dadd(68.075, 92.485, 16.5, 0.904)
pt3dadd(67.962, 92.455, 16.5, 0.904)
pt3dadd(67.88, 92.367, 16.5, 0.904)
pt3dadd(67.799, 92.279, 16.5, 0.904)
pt3dadd(67.705, 92.204, 16.5, 0.904)
pt3dadd(67.611, 92.129, 16.5, 0.904)
pt3dadd(67.505, 92.073, 16.5, 0.904)
pt3dadd(67.398, 92.019, 16.5, 0.904)
pt3dadd(67.291, 91.965, 16.5, 0.904)
pt3dadd(67.182, 91.919, 16.5, 0.904)
pt3dadd(67.062, 91.915, 16.5, 0.904)
pt3dadd(66.942, 91.91, 16.5, 0.904)
pt3dadd(66.823, 91.898, 16.5, 0.904)
pt3dadd(66.706, 91.874, 16.5, 0.904)
pt3dadd(66.587, 91.859, 16.5, 0.904)
pt3dadd(66.468, 91.844, 16.5, 0.904)
pt3dadd(66.349, 91.829, 16.5, 0.904)
pt3dadd(66.23, 91.814, 16.5, 0.904)
pt3dadd(66.111, 91.799, 16.5, 0.904)
pt3dadd(65.992, 91.783, 16.503, 0.904)
pt3dadd(65.875, 91.763, 16.52, 0.904)
pt3dadd(65.759, 91.743, 16.536, 0.904)
pt3dadd(65.642, 91.723, 16.553, 0.904)
pt3dadd(65.525, 91.704, 16.569, 0.904)
pt3dadd(65.409, 91.684, 16.586, 0.904)
pt3dadd(65.292, 91.657, 16.59, 0.904)
pt3dadd(65.175, 91.629, 16.592, 0.904)
pt3dadd(65.059, 91.602, 16.594, 0.904)
pt3dadd(64.942, 91.574, 16.596, 0.904)
pt3dadd(64.825, 91.546, 16.598, 0.904)
pt3dadd(64.709, 91.516, 16.6, 0.904)
pt3dadd(64.601, 91.465, 16.6, 0.904)
pt3dadd(64.492, 91.414, 16.6, 0.904)
pt3dadd(64.383, 91.363, 16.6, 0.904)
pt3dadd(64.274, 91.312, 16.6, 0.904)
pt3dadd(64.166, 91.261, 16.6, 0.904)
pt3dadd(64.056, 91.213, 16.6, 0.904)
pt3dadd(63.946, 91.166, 16.6, 0.904)
pt3dadd(63.835, 91.118, 16.6, 0.904)
pt3dadd(63.725, 91.071, 16.6, 0.904)
pt3dadd(63.615, 91.023, 16.6, 0.904)
pt3dadd(63.508, 90.969, 16.6, 0.904)
pt3dadd(63.404, 90.91, 16.6, 0.904)
pt3dadd(63.3, 90.85, 16.6, 0.904)
}
}
proc shape3d_191() {
dend_7[29] { pt3dadd(63.196, 90.791, 16.6, 0.904)
pt3dadd(63.091, 90.731, 16.6, 0.904)
pt3dadd(62.985, 90.676, 16.6, 0.904)
pt3dadd(62.875, 90.628, 16.6, 0.904)
pt3dadd(62.765, 90.581, 16.6, 0.904)
pt3dadd(62.655, 90.533, 16.6, 0.904)
pt3dadd(62.544, 90.486, 16.6, 0.904)
pt3dadd(62.435, 90.437, 16.601, 0.904)
pt3dadd(62.347, 90.36, 16.624, 0.904)
pt3dadd(62.258, 90.284, 16.647, 0.904)
pt3dadd(62.17, 90.208, 16.67, 0.904)
pt3dadd(62.082, 90.131, 16.693, 0.904)
pt3dadd(61.986, 90.061, 16.7, 0.904)
pt3dadd(61.887, 89.993, 16.7, 0.904)
pt3dadd(61.828, 89.9, 16.708, 0.904)
pt3dadd(61.805, 89.783, 16.722, 0.904)
pt3dadd(61.768, 89.676, 16.742, 0.904)
pt3dadd(61.686, 89.601, 16.779, 0.904)
pt3dadd(61.589, 89.545, 16.8, 0.904)
pt3dadd(61.473, 89.513, 16.8, 0.904)
pt3dadd(61.358, 89.479, 16.8, 0.904)
pt3dadd(61.265, 89.404, 16.8, 0.904)
pt3dadd(61.161, 89.347, 16.8, 0.904)
pt3dadd(61.049, 89.303, 16.8, 0.904)
pt3dadd(60.938, 89.258, 16.8, 0.904)
pt3dadd(60.826, 89.214, 16.8, 0.904)
pt3dadd(60.715, 89.169, 16.8, 0.904)
pt3dadd(60.603, 89.127, 16.8, 0.904)
pt3dadd(60.486, 89.097, 16.8, 0.904)
pt3dadd(60.37, 89.067, 16.8, 0.904)
pt3dadd(60.254, 89.036, 16.8, 0.904)
pt3dadd(60.138, 89.006, 16.8, 0.904)
pt3dadd(60.022, 88.976, 16.8, 0.904)
pt3dadd(59.906, 88.947, 16.8, 0.904)
pt3dadd(59.789, 88.919, 16.8, 0.904)
pt3dadd(59.672, 88.892, 16.8, 0.904)
pt3dadd(59.555, 88.865, 16.8, 0.904)
pt3dadd(59.438, 88.837, 16.8, 0.904)
pt3dadd(59.321, 88.81, 16.8, 0.904)
pt3dadd(59.203, 88.789, 16.8, 0.904)
pt3dadd(59.085, 88.772, 16.8, 0.904)
pt3dadd(58.966, 88.754, 16.8, 0.904)
pt3dadd(58.847, 88.737, 16.8, 0.904)
pt3dadd(58.728, 88.72, 16.8, 0.904)
pt3dadd(58.61, 88.702, 16.8, 0.904)
pt3dadd(58.49, 88.695, 16.8, 0.904)
pt3dadd(58.37, 88.699, 16.8, 0.904)
pt3dadd(58.25, 88.703, 16.8, 0.904)
pt3dadd(58.131, 88.707, 16.8, 0.904)
pt3dadd(58.011, 88.711, 16.8, 0.904)
pt3dadd(57.891, 88.715, 16.8, 0.904)
pt3dadd(57.771, 88.719, 16.8, 0.904)
pt3dadd(57.652, 88.732, 16.795, 0.904)
pt3dadd(57.532, 88.745, 16.79, 0.904)
pt3dadd(57.413, 88.758, 16.784, 0.904)
pt3dadd(57.294, 88.772, 16.778, 0.904)
pt3dadd(57.175, 88.785, 16.773, 0.904)
pt3dadd(57.056, 88.798, 16.767, 0.904)
pt3dadd(56.937, 88.8, 16.758, 0.904)
pt3dadd(56.817, 88.8, 16.747, 0.904)
pt3dadd(56.698, 88.8, 16.737, 0.904)
pt3dadd(56.579, 88.8, 16.726, 0.904)
pt3dadd(56.46, 88.8, 16.716, 0.904)
pt3dadd(56.34, 88.8, 16.705, 0.904)
pt3dadd(56.221, 88.81, 16.7, 0.904)
pt3dadd(56.103, 88.83, 16.7, 0.904)
pt3dadd(55.985, 88.849, 16.7, 0.904)
pt3dadd(55.866, 88.869, 16.7, 0.904)
pt3dadd(55.748, 88.889, 16.7, 0.904)
pt3dadd(55.629, 88.908, 16.7, 0.904)
pt3dadd(55.511, 88.927, 16.7, 0.904)
pt3dadd(55.392, 88.944, 16.7, 0.904)
pt3dadd(55.273, 88.962, 16.7, 0.904)
pt3dadd(55.155, 88.979, 16.7, 0.904)
pt3dadd(55.036, 88.996, 16.7, 0.904)
pt3dadd(54.917, 89.014, 16.7, 0.904)
pt3dadd(54.798, 89.028, 16.7, 0.904)
pt3dadd(54.678, 89.032, 16.7, 0.904)
pt3dadd(54.558, 89.036, 16.7, 0.904)
pt3dadd(54.438, 89.039, 16.7, 0.904)
pt3dadd(54.318, 89.043, 16.7, 0.904)
pt3dadd(54.198, 89.047, 16.7, 0.904)
pt3dadd(54.079, 89.051, 16.7, 0.904)
pt3dadd(53.962, 89.071, 16.7, 0.904)
pt3dadd(53.848, 89.111, 16.7, 0.904)
pt3dadd(53.735, 89.147, 16.7, 0.904)
pt3dadd(53.615, 89.152, 16.7, 0.904)
pt3dadd(53.495, 89.156, 16.7, 0.904)
pt3dadd(53.375, 89.161, 16.7, 0.904)
pt3dadd(53.255, 89.166, 16.7, 0.904)
pt3dadd(53.135, 89.17, 16.7, 0.904)
pt3dadd(53.032, 89.205, 16.7, 0.904)
pt3dadd(52.964, 89.304, 16.7, 0.904)
pt3dadd(52.898, 89.404, 16.7, 0.904)
pt3dadd(52.844, 89.511, 16.7, 0.904)
pt3dadd(52.758, 89.589, 16.7, 0.904)
pt3dadd(52.656, 89.652, 16.7, 0.904)
pt3dadd(52.554, 89.715, 16.7, 0.904)
pt3dadd(52.452, 89.778, 16.7, 0.904)
pt3dadd(52.349, 89.841, 16.7, 0.904)
pt3dadd(52.237, 89.869, 16.7, 0.904)
pt3dadd(52.117, 89.874, 16.7, 0.904)
pt3dadd(51.997, 89.879, 16.7, 0.904)
pt3dadd(51.886, 89.917, 16.7, 0.904)
pt3dadd(51.778, 89.971, 16.7, 0.904)
pt3dadd(51.68, 90.037, 16.7, 0.904)
pt3dadd(51.592, 90.119, 16.7, 0.904)
pt3dadd(51.513, 90.207, 16.7, 0.904)
pt3dadd(51.452, 90.311, 16.7, 0.904)
pt3dadd(51.385, 90.407, 16.7, 0.904)
pt3dadd(51.277, 90.461, 16.7, 0.904)
pt3dadd(51.17, 90.515, 16.7, 0.904)
pt3dadd(51.063, 90.569, 16.7, 0.904)
pt3dadd(50.95, 90.6, 16.7, 0.904)
pt3dadd(50.83, 90.6, 16.7, 0.904)
pt3dadd(50.71, 90.6, 16.7, 0.904)
pt3dadd(50.59, 90.6, 16.7, 0.904)
pt3dadd(50.47, 90.6, 16.7, 0.904)
pt3dadd(50.35, 90.6, 16.7, 0.904)
pt3dadd(50.23, 90.6, 16.7, 0.904)
pt3dadd(50.11, 90.6, 16.7, 0.904)
pt3dadd(49.99, 90.6, 16.7, 0.904)
pt3dadd(49.87, 90.6, 16.7, 0.904)
pt3dadd(49.75, 90.6, 16.7, 0.904)
pt3dadd(49.63, 90.6, 16.7, 0.904)
pt3dadd(49.51, 90.6, 16.7, 0.904)
pt3dadd(49.39, 90.6, 16.7, 0.904)
pt3dadd(49.27, 90.6, 16.7, 0.904)
pt3dadd(49.15, 90.6, 16.7, 0.904)
pt3dadd(49.03, 90.6, 16.7, 0.904)
pt3dadd(48.91, 90.6, 16.7, 0.904)
pt3dadd(48.791, 90.6, 16.707, 0.904)
pt3dadd(48.672, 90.6, 16.723, 0.904)
pt3dadd(48.554, 90.6, 16.74, 0.904)
pt3dadd(48.436, 90.6, 16.756, 0.904)
pt3dadd(48.317, 90.6, 16.773, 0.904)
pt3dadd(48.199, 90.6, 16.789, 0.904)
pt3dadd(48.08, 90.6, 16.8, 0.904)
pt3dadd(47.96, 90.6, 16.8, 0.904)
pt3dadd(47.84, 90.6, 16.8, 0.904)
pt3dadd(47.72, 90.6, 16.8, 0.904)
pt3dadd(47.6, 90.6, 16.8, 0.904)
pt3dadd(47.48, 90.6, 16.8, 0.904)
pt3dadd(47.36, 90.6, 16.8, 0.904)
pt3dadd(47.24, 90.6, 16.8, 0.904)
pt3dadd(47.12, 90.6, 16.8, 0.904)
pt3dadd(47, 90.6, 16.8, 0.904)
pt3dadd(46.88, 90.6, 16.8, 0.904)
pt3dadd(46.76, 90.6, 16.8, 0.904)
pt3dadd(46.64, 90.6, 16.8, 0.904)
pt3dadd(46.52, 90.6, 16.8, 0.904)
pt3dadd(46.4, 90.6, 16.8, 0.904)
pt3dadd(46.28, 90.6, 16.8, 0.904)
pt3dadd(46.16, 90.6, 16.8, 0.904)
pt3dadd(46.04, 90.6, 16.8, 0.904)
pt3dadd(45.92, 90.6, 16.8, 0.904)
pt3dadd(45.8, 90.6, 16.8, 0.904)
pt3dadd(45.68, 90.6, 16.8, 0.904)
pt3dadd(45.561, 90.593, 16.8, 0.904)
pt3dadd(45.442, 90.574, 16.8, 0.904)
pt3dadd(45.324, 90.554, 16.8, 0.904)
pt3dadd(45.206, 90.534, 16.8, 0.904)
pt3dadd(45.087, 90.515, 16.8, 0.904)
pt3dadd(44.969, 90.495, 16.8, 0.904)
pt3dadd(44.85, 90.48, 16.8, 0.904)
pt3dadd(44.73, 90.48, 16.8, 0.904)
pt3dadd(44.61, 90.48, 16.8, 0.904)
pt3dadd(44.49, 90.48, 16.8, 0.904)
pt3dadd(44.37, 90.48, 16.8, 0.904)
pt3dadd(44.25, 90.48, 16.8, 0.904)
pt3dadd(44.13, 90.48, 16.8, 0.904)
pt3dadd(44.01, 90.48, 16.804, 0.904)
pt3dadd(43.892, 90.48, 16.82, 0.904)
pt3dadd(43.774, 90.48, 16.837, 0.904)
pt3dadd(43.655, 90.48, 16.853, 0.904)
pt3dadd(43.537, 90.48, 16.87, 0.904)
pt3dadd(43.419, 90.48, 16.886, 0.904)
pt3dadd(43.3, 90.48, 16.901, 0.904)
pt3dadd(43.18, 90.48, 16.906, 0.904)
pt3dadd(43.06, 90.48, 16.911, 0.904)
pt3dadd(42.94, 90.48, 16.916, 0.904)
pt3dadd(42.821, 90.48, 16.921, 0.904)
pt3dadd(42.701, 90.48, 16.926, 0.904)
pt3dadd(42.581, 90.48, 16.931, 0.904)
pt3dadd(42.463, 90.48, 16.947, 0.904)
pt3dadd(42.348, 90.48, 16.974, 0.904)
pt3dadd(42.233, 90.48, 17.002, 0.904)
pt3dadd(42.117, 90.48, 17.029, 0.904)
pt3dadd(42.002, 90.48, 17.057, 0.904)
pt3dadd(41.886, 90.48, 17.084, 0.904)
pt3dadd(41.767, 90.48, 17.09, 0.904)
pt3dadd(41.647, 90.48, 17.092, 0.904)
pt3dadd(41.527, 90.48, 17.094, 0.904)
pt3dadd(41.407, 90.48, 17.095, 0.904)
pt3dadd(41.287, 90.48, 17.097, 0.904)
pt3dadd(41.167, 90.48, 17.098, 0.904)
pt3dadd(41.047, 90.48, 17.1, 0.904)
pt3dadd(40.927, 90.48, 17.1, 0.904)
pt3dadd(40.807, 90.48, 17.1, 0.904)
pt3dadd(40.687, 90.48, 17.1, 0.904)
}
}
proc shape3d_192() {
dend_7[29] { pt3dadd(40.567, 90.48, 17.1, 0.904)
pt3dadd(40.447, 90.48, 17.1, 0.904)
pt3dadd(40.327, 90.48, 17.1, 0.904)
pt3dadd(40.208, 90.48, 17.112, 0.904)
pt3dadd(40.089, 90.48, 17.124, 0.904)
pt3dadd(39.978, 90.48, 17.15, 0.904)
pt3dadd(39.89, 90.48, 17.219, 0.904)
pt3dadd(39.801, 90.48, 17.286, 0.904)
pt3dadd(39.708, 90.48, 17.348, 0.904)
pt3dadd(39.597, 90.48, 17.378, 0.904)
pt3dadd(39.478, 90.48, 17.395, 0.904)
pt3dadd(39.36, 90.48, 17.411, 0.904)
pt3dadd(39.241, 90.48, 17.428, 0.904)
pt3dadd(39.123, 90.48, 17.444, 0.904)
pt3dadd(39.005, 90.48, 17.46, 0.904)
pt3dadd(38.885, 90.48, 17.47, 0.904)
pt3dadd(38.766, 90.48, 17.475, 0.904)
pt3dadd(38.646, 90.48, 17.48, 0.904)
pt3dadd(38.526, 90.48, 17.485, 0.904)
pt3dadd(38.406, 90.48, 17.49, 0.904)
pt3dadd(38.286, 90.48, 17.495, 0.904)
pt3dadd(38.166, 90.48, 17.5, 0.904)
pt3dadd(38.047, 90.48, 17.514, 0.904)
pt3dadd(37.929, 90.48, 17.528, 0.904)
pt3dadd(37.81, 90.48, 17.542, 0.904)
pt3dadd(37.691, 90.48, 17.557, 0.904)
pt3dadd(37.572, 90.48, 17.571, 0.904)
pt3dadd(37.454, 90.48, 17.586, 0.904)
pt3dadd(37.34, 90.503, 17.608, 0.904)
pt3dadd(37.228, 90.533, 17.633, 0.904)
pt3dadd(37.116, 90.563, 17.658, 0.904)
pt3dadd(37.003, 90.593, 17.684, 0.904)
pt3dadd(36.891, 90.623, 17.709, 0.904)
pt3dadd(36.774, 90.642, 17.726, 0.904)
pt3dadd(36.657, 90.659, 17.742, 0.904)
pt3dadd(36.54, 90.676, 17.758, 0.904)
pt3dadd(36.423, 90.693, 17.775, 0.904)
pt3dadd(36.306, 90.71, 17.791, 0.904)
pt3dadd(36.188, 90.72, 17.805, 0.904)
pt3dadd(36.068, 90.72, 17.815, 0.904)
pt3dadd(35.949, 90.72, 17.826, 0.904)
pt3dadd(35.83, 90.72, 17.836, 0.904)
pt3dadd(35.71, 90.72, 17.847, 0.904)
pt3dadd(35.591, 90.72, 17.857, 0.904)
pt3dadd(35.473, 90.72, 17.87, 0.904)
pt3dadd(35.365, 90.72, 17.915, 0.904)
pt3dadd(35.258, 90.72, 17.959, 0.904)
pt3dadd(35.151, 90.72, 18.004, 0.904)
pt3dadd(35.043, 90.72, 18.049, 0.904)
pt3dadd(34.936, 90.72, 18.093, 0.904)
pt3dadd(34.822, 90.7, 18.116, 0.904)
pt3dadd(34.706, 90.677, 18.136, 0.904)
pt3dadd(34.591, 90.654, 18.155, 0.904)
pt3dadd(34.475, 90.631, 18.174, 0.904)
pt3dadd(34.36, 90.608, 18.193, 0.904)
pt3dadd(34.241, 90.6, 18.2, 0.904)
pt3dadd(34.121, 90.6, 18.2, 0.904)
pt3dadd(34.001, 90.6, 18.2, 0.904)
pt3dadd(33.881, 90.6, 18.2, 0.904)
pt3dadd(33.761, 90.6, 18.2, 0.904)
pt3dadd(33.641, 90.6, 18.2, 0.904)
pt3dadd(33.521, 90.6, 18.2, 0.904)
pt3dadd(33.403, 90.582, 18.2, 0.904)
pt3dadd(33.287, 90.555, 18.2, 0.904)
pt3dadd(33.17, 90.527, 18.2, 0.904)
pt3dadd(33.053, 90.5, 18.2, 0.904)
pt3dadd(32.936, 90.472, 18.2, 0.904)
pt3dadd(32.819, 90.445, 18.2, 0.904)
pt3dadd(32.707, 90.403, 18.2, 0.904)
pt3dadd(32.595, 90.359, 18.2, 0.904)
pt3dadd(32.484, 90.314, 18.2, 0.904)
pt3dadd(32.373, 90.27, 18.2, 0.904)
pt3dadd(32.261, 90.225, 18.2, 0.904)
pt3dadd(32.158, 90.167, 18.2, 0.904)
pt3dadd(32.064, 90.092, 18.2, 0.904)
pt3dadd(31.97, 90.017, 18.2, 0.904)
pt3dadd(31.877, 89.942, 18.2, 0.904)
pt3dadd(31.783, 89.867, 18.2, 0.904)
pt3dadd(31.701, 89.781, 18.2, 0.904)
pt3dadd(31.633, 89.682, 18.2, 0.904)
pt3dadd(31.566, 89.583, 18.2, 0.904)
pt3dadd(31.498, 89.484, 18.2, 0.904)
pt3dadd(31.424, 89.391, 18.2, 0.904)
pt3dadd(31.321, 89.33, 18.2, 0.904)
pt3dadd(31.217, 89.269, 18.2, 0.904)
pt3dadd(31.104, 89.229, 18.2, 0.904)
pt3dadd(30.991, 89.189, 18.2, 0.904)
pt3dadd(30.874, 89.169, 18.2, 0.904)
pt3dadd(30.754, 89.162, 18.2, 0.904)
pt3dadd(30.636, 89.144, 18.2, 0.904)
pt3dadd(30.518, 89.122, 18.2, 0.904)
pt3dadd(30.4, 89.1, 18.2, 0.904)
pt3dadd(30.282, 89.077, 18.2, 0.904)
pt3dadd(30.164, 89.055, 18.2, 0.904)
pt3dadd(30.046, 89.033, 18.2, 0.904)
pt3dadd(29.935, 88.99, 18.2, 0.904)
pt3dadd(29.826, 88.94, 18.2, 0.904)
pt3dadd(29.717, 88.889, 18.2, 0.904)
pt3dadd(29.608, 88.839, 18.2, 0.904)
pt3dadd(29.499, 88.788, 18.2, 0.904)
pt3dadd(29.396, 88.729, 18.2, 0.904)
pt3dadd(29.297, 88.66, 18.2, 0.904)
pt3dadd(29.199, 88.591, 18.2, 0.904)
pt3dadd(29.101, 88.522, 18.2, 0.904)
pt3dadd(29.003, 88.453, 18.2, 0.904)
pt3dadd(28.896, 88.406, 18.2, 0.904)
pt3dadd(28.777, 88.389, 18.2, 0.904)
pt3dadd(28.658, 88.372, 18.2, 0.904)
pt3dadd(28.54, 88.354, 18.2, 0.904)
pt3dadd(28.421, 88.337, 18.2, 0.904)
pt3dadd(28.302, 88.32, 18.2, 0.904)
pt3dadd(28.185, 88.297, 18.2, 0.904)
pt3dadd(28.072, 88.257, 18.2, 0.904)
pt3dadd(27.958, 88.217, 18.2, 0.904)
pt3dadd(27.839, 88.209, 18.2, 0.904)
pt3dadd(27.719, 88.205, 18.2, 0.904)
pt3dadd(27.599, 88.2, 18.2, 0.904)
pt3dadd(27.479, 88.2, 18.204, 0.904)
pt3dadd(27.36, 88.2, 18.208, 0.904)
pt3dadd(27.246, 88.2, 18.221, 0.904)
pt3dadd(27.178, 88.2, 18.303, 0.904)
pt3dadd(27.11, 88.2, 18.385, 0.904)
pt3dadd(26.996, 88.2, 18.415, 0.904)
pt3dadd(26.881, 88.2, 18.443, 0.904)
pt3dadd(26.765, 88.2, 18.47, 0.904)
pt3dadd(26.65, 88.2, 18.498, 0.904)
pt3dadd(26.531, 88.2, 18.503, 0.904)
pt3dadd(26.411, 88.2, 18.507, 0.904)
pt3dadd(26.291, 88.2, 18.512, 0.904)
pt3dadd(26.177, 88.181, 18.537, 0.904)
pt3dadd(26.059, 88.162, 18.549, 0.904)
pt3dadd(25.942, 88.142, 18.561, 0.904)
pt3dadd(25.824, 88.123, 18.573, 0.904)
pt3dadd(25.707, 88.104, 18.585, 0.904)
pt3dadd(25.589, 88.085, 18.597, 0.904)
pt3dadd(25.476, 88.046, 18.6, 0.904)
pt3dadd(25.365, 88.002, 18.6, 0.904)
pt3dadd(25.253, 87.957, 18.6, 0.904)
pt3dadd(25.142, 87.913, 18.6, 0.904)
pt3dadd(25.03, 87.868, 18.6, 0.904)
pt3dadd(24.921, 87.819, 18.605, 0.904)
pt3dadd(24.817, 87.763, 18.619, 0.904)
pt3dadd(24.712, 87.706, 18.634, 0.904)
pt3dadd(24.608, 87.65, 18.648, 0.904)
pt3dadd(24.503, 87.593, 18.662, 0.904)
pt3dadd(24.411, 87.524, 18.687, 0.904)
pt3dadd(24.326, 87.449, 18.719, 0.904)
pt3dadd(24.241, 87.373, 18.75, 0.904)
pt3dadd(24.156, 87.297, 18.782, 0.904)
pt3dadd(24.068, 87.222, 18.8, 0.904)
pt3dadd(23.974, 87.147, 18.8, 0.904)
pt3dadd(23.88, 87.072, 18.8, 0.904)
pt3dadd(23.786, 86.997, 18.8, 0.904)
pt3dadd(23.693, 86.922, 18.8, 0.904)
pt3dadd(23.62, 86.831, 18.8, 0.904)
pt3dadd(23.576, 86.72, 18.8, 0.904)
pt3dadd(23.531, 86.608, 18.8, 0.904)
pt3dadd(23.487, 86.497, 18.8, 0.904)
pt3dadd(23.442, 86.386, 18.8, 0.904)
pt3dadd(23.398, 86.274, 18.8, 0.904)
pt3dadd(23.351, 86.164, 18.8, 0.904)
pt3dadd(23.304, 86.053, 18.8, 0.904)
pt3dadd(23.241, 85.951, 18.8, 0.904)
pt3dadd(23.174, 85.852, 18.8, 0.904)
pt3dadd(23.084, 85.776, 18.8, 0.904)
pt3dadd(22.981, 85.716, 18.8, 0.904)
pt3dadd(22.876, 85.657, 18.802, 0.904)
pt3dadd(22.77, 85.601, 18.807, 0.904)
pt3dadd(22.674, 85.546, 18.83, 0.904)
pt3dadd(22.601, 85.497, 18.898, 0.904)
pt3dadd(22.528, 85.447, 18.966, 0.904)
pt3dadd(22.474, 85.377, 19.024, 0.904)
pt3dadd(22.454, 85.268, 19.061, 0.904)
pt3dadd(22.419, 85.164, 19.09, 0.904)
pt3dadd(22.336, 85.077, 19.094, 0.904)
pt3dadd(22.254, 84.99, 19.098, 0.904)
pt3dadd(22.157, 84.923, 19.1, 0.904)
pt3dadd(22.047, 84.876, 19.1, 0.904)
pt3dadd(21.937, 84.828, 19.1, 0.904)
pt3dadd(21.825, 84.785, 19.1, 0.904)
pt3dadd(21.71, 84.752, 19.1, 0.904)
pt3dadd(21.595, 84.72, 19.1, 0.904)
pt3dadd(21.475, 84.72, 19.1, 0.904)
pt3dadd(21.355, 84.72, 19.1, 0.904)
pt3dadd(21.235, 84.717, 19.1, 0.904)
pt3dadd(21.132, 84.656, 19.1, 0.904)
pt3dadd(21.028, 84.596, 19.1, 0.904)
pt3dadd(20.996, 84.486, 19.1, 0.904)
pt3dadd(20.975, 84.368, 19.1, 0.904)
pt3dadd(20.946, 84.252, 19.1, 0.904)
pt3dadd(20.892, 84.145, 19.1, 0.904)
pt3dadd(20.812, 84.057, 19.1, 0.904)
pt3dadd(20.724, 83.976, 19.1, 0.904)
pt3dadd(20.671, 83.877, 19.122, 0.904)
pt3dadd(20.638, 83.769, 19.155, 0.904)
pt3dadd(20.562, 83.688, 19.178, 0.904)
pt3dadd(20.466, 83.619, 19.195, 0.904)
pt3dadd(20.356, 83.576, 19.2, 0.904)
pt3dadd(20.241, 83.543, 19.2, 0.904)
pt3dadd(20.125, 83.513, 19.2, 0.904)
}
}
proc shape3d_193() {
dend_7[29] { pt3dadd(20.007, 83.49, 19.2, 0.904)
pt3dadd(19.891, 83.46, 19.2, 0.904)
pt3dadd(19.775, 83.427, 19.2, 0.904)
pt3dadd(19.659, 83.397, 19.2, 0.904)
pt3dadd(19.541, 83.376, 19.2, 0.904)
pt3dadd(19.423, 83.356, 19.2, 0.904)
pt3dadd(19.35, 83.281, 19.2, 0.904)
pt3dadd(19.311, 83.168, 19.2, 0.904)
pt3dadd(19.262, 83.06, 19.2, 0.904)
pt3dadd(19.18, 82.973, 19.2, 0.904)
pt3dadd(19.095, 82.891, 19.2, 0.904)
pt3dadd(18.978, 82.866, 19.2, 0.904)
pt3dadd(18.86, 82.84, 19.2, 0.904)
pt3dadd(18.743, 82.815, 19.2, 0.904)
pt3dadd(18.626, 82.79, 19.2, 0.904)
pt3dadd(18.512, 82.751, 19.2, 0.904)
pt3dadd(18.399, 82.712, 19.2, 0.904)
pt3dadd(18.283, 82.685, 19.2, 0.904)
pt3dadd(18.164, 82.666, 19.2, 0.904)
pt3dadd(18.046, 82.644, 19.2, 0.904)
pt3dadd(17.928, 82.621, 19.2, 0.904)
pt3dadd(17.81, 82.599, 19.2, 0.904)
pt3dadd(17.693, 82.577, 19.2, 0.904)
pt3dadd(17.575, 82.555, 19.2, 0.904)
pt3dadd(17.457, 82.529, 19.2, 0.904)
pt3dadd(17.341, 82.502, 19.2, 0.904)
pt3dadd(17.224, 82.474, 19.2, 0.904)
pt3dadd(17.107, 82.447, 19.2, 0.904)
pt3dadd(16.99, 82.419, 19.2, 0.904)
pt3dadd(16.873, 82.392, 19.2, 0.904)
pt3dadd(16.781, 82.319, 19.2, 0.904)
pt3dadd(16.693, 82.238, 19.2, 0.904)
pt3dadd(16.587, 82.185, 19.2, 0.904)
pt3dadd(16.474, 82.146, 19.2, 0.904)
pt3dadd(16.361, 82.106, 19.2, 0.904)
pt3dadd(16.247, 82.067, 19.2, 0.904)
pt3dadd(16.134, 82.027, 19.2, 0.904)
pt3dadd(16.107, 81.911, 19.2, 0.904)
pt3dadd(16.08, 81.794, 19.2, 0.904)
pt3dadd(16.041, 81.681, 19.2, 0.904)
pt3dadd(15.987, 81.574, 19.2, 0.904)
pt3dadd(15.901, 81.49, 19.2, 0.904)
pt3dadd(15.815, 81.407, 19.2, 0.904)
pt3dadd(15.729, 81.323, 19.2, 0.904)
pt3dadd(15.643, 81.24, 19.2, 0.904)
pt3dadd(15.556, 81.157, 19.2, 0.904)
pt3dadd(15.458, 81.088, 19.2, 0.904)
pt3dadd(15.36, 81.019, 19.2, 0.904)
pt3dadd(15.261, 80.95, 19.2, 0.904)
pt3dadd(15.163, 80.881, 19.2, 0.904)
pt3dadd(15.065, 80.811, 19.2, 0.904)
pt3dadd(14.985, 80.723, 19.2, 0.904)
pt3dadd(14.904, 80.634, 19.2, 0.904)
pt3dadd(14.823, 80.545, 19.2, 0.904)
pt3dadd(14.742, 80.457, 19.2, 0.904)
pt3dadd(14.661, 80.368, 19.2, 0.904)
pt3dadd(14.573, 80.286, 19.2, 0.904)
pt3dadd(14.485, 80.205, 19.2, 0.904)
pt3dadd(14.37, 80.184, 19.213, 0.904)
pt3dadd(14.252, 80.167, 19.227, 0.904)
pt3dadd(14.138, 80.146, 19.251, 0.904)
pt3dadd(14.028, 80.12, 19.284, 0.904)
pt3dadd(13.953, 80.05, 19.3, 0.904)
pt3dadd(13.914, 79.936, 19.3, 0.904)
pt3dadd(13.874, 79.823, 19.3, 0.904)
pt3dadd(13.83, 79.711, 19.3, 0.904)
pt3dadd(13.788, 79.599, 19.303, 0.904)
pt3dadd(13.747, 79.487, 19.308, 0.904)
pt3dadd(13.713, 79.376, 19.327, 0.904)
pt3dadd(13.693, 79.271, 19.371, 0.904)
pt3dadd(13.665, 79.17, 19.419, 0.904)
pt3dadd(13.62, 79.081, 19.474, 0.904)
pt3dadd(13.589, 79.008, 19.546, 0.904)
pt3dadd(13.569, 78.947, 19.63, 0.904)
pt3dadd(13.558, 78.857, 19.687, 0.904)
pt3dadd(13.554, 78.744, 19.722, 0.904)
pt3dadd(13.551, 78.632, 19.757, 0.904)
pt3dadd(13.548, 78.519, 19.792, 0.904)
pt3dadd(13.516, 78.406, 19.8, 0.904)
pt3dadd(13.477, 78.293, 19.8, 0.904)
pt3dadd(13.447, 78.178, 19.8, 0.904)
pt3dadd(13.414, 78.064, 19.8, 0.904)
pt3dadd(13.363, 77.955, 19.8, 0.904)
pt3dadd(13.313, 77.846, 19.8, 0.904)
pt3dadd(13.262, 77.737, 19.8, 0.904)
pt3dadd(13.212, 77.629, 19.8, 0.904)
pt3dadd(13.164, 77.519, 19.8, 0.904)
pt3dadd(13.125, 77.405, 19.8, 0.904)
pt3dadd(13.086, 77.291, 19.8, 0.904)
pt3dadd(13.048, 77.178, 19.8, 0.904)
pt3dadd(13.009, 77.064, 19.8, 0.904)
pt3dadd(12.97, 76.951, 19.8, 0.904)
pt3dadd(12.918, 76.851, 19.829, 0.904)
pt3dadd(12.862, 76.756, 19.868, 0.904)
pt3dadd(12.805, 76.662, 19.908, 0.904)
pt3dadd(12.748, 76.567, 19.947, 0.904)
pt3dadd(12.716, 76.467, 19.99, 0.904)
pt3dadd(12.708, 76.362, 20.038, 0.904)
pt3dadd(12.7, 76.256, 20.085, 0.904)
pt3dadd(12.692, 76.151, 20.132, 0.904)
pt3dadd(12.684, 76.045, 20.18, 0.904)
pt3dadd(12.643, 75.954, 20.228, 0.904)
pt3dadd(12.578, 75.872, 20.277, 0.904)
pt3dadd(12.512, 75.79, 20.326, 0.904)
pt3dadd(12.447, 75.709, 20.375, 0.904)
pt3dadd(12.377, 75.623, 20.41, 0.904)
pt3dadd(12.301, 75.533, 20.43, 0.904)
pt3dadd(12.226, 75.442, 20.45, 0.904)
pt3dadd(12.151, 75.352, 20.47, 0.904)
pt3dadd(12.075, 75.262, 20.49, 0.904)
pt3dadd(11.989, 75.183, 20.514, 0.904)
pt3dadd(11.91, 75.101, 20.54, 0.904)
pt3dadd(11.86, 75, 20.576, 0.904)
pt3dadd(11.792, 74.924, 20.613, 0.904)
pt3dadd(11.684, 74.898, 20.652, 0.904)
pt3dadd(11.578, 74.88, 20.695, 0.904)
pt3dadd(11.475, 74.88, 20.746, 0.904)
pt3dadd(11.369, 74.883, 20.789, 0.904)
pt3dadd(11.251, 74.902, 20.792, 0.904)
pt3dadd(11.132, 74.92, 20.795, 0.904)
pt3dadd(11.014, 74.939, 20.797, 0.904)
pt3dadd(10.895, 74.958, 20.8, 0.904)
pt3dadd(10.782, 74.977, 20.773, 0.904)
pt3dadd(10.67, 74.995, 20.742, 0.904)
pt3dadd(10.555, 75, 20.713, 0.904)
pt3dadd(10.441, 75.033, 20.702, 0.904)
pt3dadd(10.327, 75.07, 20.692, 0.904)
pt3dadd(10.223, 75.11, 20.66, 0.904)
pt3dadd(10.123, 75.153, 20.618, 0.904)
pt3dadd(10.033, 75.228, 20.611, 0.904)
pt3dadd(9.945, 75.31, 20.611, 0.904)
pt3dadd(9.861, 75.38, 20.65, 0.904)
pt3dadd(9.776, 75.448, 20.69, 0.904)
pt3dadd(9.678, 75.516, 20.698, 0.904)
pt3dadd(9.569, 75.565, 20.698, 0.904)
pt3dadd(9.457, 75.607, 20.696, 0.904)
pt3dadd(9.344, 75.65, 20.694, 0.904)
pt3dadd(9.232, 75.692, 20.692, 0.904)
pt3dadd(9.12, 75.734, 20.69, 0.904)
pt3dadd(9.015, 75.788, 20.681, 0.904)
pt3dadd(8.919, 75.856, 20.661, 0.904)
pt3dadd(8.824, 75.925, 20.641, 0.904)
pt3dadd(8.728, 75.994, 20.621, 0.904)
pt3dadd(8.633, 76.062, 20.601, 0.904)
pt3dadd(8.519, 76.1, 20.6, 0.904)
pt3dadd(8.405, 76.136, 20.6, 0.904)
pt3dadd(8.29, 76.172, 20.6, 0.904)
pt3dadd(8.176, 76.208, 20.6, 0.904)
pt3dadd(8.061, 76.244, 20.6, 0.904)
pt3dadd(7.953, 76.291, 20.6, 0.904)
pt3dadd(7.854, 76.36, 20.6, 0.904)
pt3dadd(7.756, 76.429, 20.6, 0.904)
pt3dadd(7.658, 76.498, 20.6, 0.904)
pt3dadd(7.559, 76.566, 20.6, 0.904)
pt3dadd(7.475, 76.647, 20.6, 0.904)
pt3dadd(7.418, 76.753, 20.6, 0.904)
pt3dadd(7.361, 76.859, 20.6, 0.904)
pt3dadd(7.305, 76.965, 20.6, 0.904)
pt3dadd(7.248, 77.071, 20.6, 0.904)
pt3dadd(7.192, 77.177, 20.6, 0.904)
pt3dadd(7.138, 77.284, 20.6, 0.904)
pt3dadd(7.084, 77.391, 20.6, 0.904)
pt3dadd(6.994, 77.469, 20.6, 0.904)
pt3dadd(6.9, 77.544, 20.6, 0.904)
pt3dadd(6.868, 77.653, 20.6, 0.904)
pt3dadd(6.853, 77.772, 20.6, 0.904)
pt3dadd(6.84, 77.891, 20.6, 0.904)
pt3dadd(6.84, 78.011, 20.6, 0.904)
pt3dadd(6.84, 78.131, 20.6, 0.904)
pt3dadd(6.837, 78.25, 20.597, 0.904)
pt3dadd(6.8, 78.359, 20.567, 0.904)
pt3dadd(6.764, 78.467, 20.537, 0.904)
pt3dadd(6.728, 78.576, 20.507, 0.904)
pt3dadd(6.679, 78.665, 20.456, 0.904)
pt3dadd(6.625, 78.748, 20.4, 0.904)
pt3dadd(6.545, 78.831, 20.388, 0.904)
pt3dadd(6.495, 78.93, 20.349, 0.904)
pt3dadd(6.446, 79.028, 20.311, 0.904)
pt3dadd(6.396, 79.127, 20.272, 0.904)
pt3dadd(6.347, 79.226, 20.233, 0.904)
pt3dadd(6.298, 79.333, 20.212, 0.904)
pt3dadd(6.249, 79.439, 20.19, 0.904)
pt3dadd(6.2, 79.546, 20.169, 0.904)
pt3dadd(6.151, 79.652, 20.147, 0.904)
pt3dadd(6.09, 79.752, 20.131, 0.904)
pt3dadd(6.008, 79.839, 20.124, 0.904)
pt3dadd(5.927, 79.927, 20.117, 0.904)
pt3dadd(5.845, 80.014, 20.11, 0.904)
pt3dadd(5.763, 80.102, 20.103, 0.904)
pt3dadd(5.692, 80.197, 20.1, 0.904)
pt3dadd(5.626, 80.297, 20.1, 0.904)
pt3dadd(5.56, 80.398, 20.1, 0.904)
pt3dadd(5.494, 80.498, 20.1, 0.904)
pt3dadd(5.428, 80.598, 20.1, 0.904)
pt3dadd(5.397, 80.71, 20.1, 0.904)
pt3dadd(5.393, 80.83, 20.1, 0.904)
pt3dadd(5.388, 80.95, 20.1, 0.904)
pt3dadd(5.358, 81.064, 20.103, 0.904)
pt3dadd(5.317, 81.177, 20.108, 0.904)
pt3dadd(5.291, 81.285, 20.134, 0.904)
}
}
proc shape3d_194() {
dend_7[29] { pt3dadd(5.284, 81.386, 20.187, 0.904)
pt3dadd(5.273, 81.477, 20.249, 0.904)
pt3dadd(5.253, 81.545, 20.329, 0.904)
pt3dadd(5.217, 81.591, 20.413, 0.904)
pt3dadd(5.16, 81.6, 20.5, 0.904)
}
dend_7[30] {pt3dclear()
pt3dadd(77.267, 93.493, 16.1, 0.904)
pt3dadd(77.383, 93.52, 16.1, 0.904)
pt3dadd(77.499, 93.548, 16.1, 0.904)
pt3dadd(77.616, 93.575, 16.1, 0.904)
pt3dadd(77.733, 93.603, 16.1, 0.904)
pt3dadd(77.85, 93.63, 16.1, 0.904)
pt3dadd(77.966, 93.659, 16.097, 0.904)
pt3dadd(78.077, 93.698, 16.076, 0.904)
pt3dadd(78.187, 93.737, 16.055, 0.904)
pt3dadd(78.298, 93.776, 16.034, 0.904)
pt3dadd(78.409, 93.815, 16.013, 0.904)
pt3dadd(78.52, 93.855, 16, 0.904)
pt3dadd(78.633, 93.897, 16, 0.904)
pt3dadd(78.745, 93.938, 16, 0.904)
pt3dadd(78.858, 93.98, 16, 0.904)
pt3dadd(78.97, 94.021, 16, 0.904)
pt3dadd(79.083, 94.063, 16, 0.904)
pt3dadd(79.196, 94.102, 16, 0.904)
pt3dadd(79.31, 94.141, 16, 0.904)
pt3dadd(79.424, 94.179, 16, 0.904)
pt3dadd(79.537, 94.218, 16, 0.904)
pt3dadd(79.651, 94.257, 16, 0.904)
pt3dadd(79.765, 94.287, 15.993, 0.904)
pt3dadd(79.882, 94.304, 15.974, 0.904)
pt3dadd(79.999, 94.322, 15.955, 0.904)
pt3dadd(80.115, 94.339, 15.937, 0.904)
pt3dadd(80.232, 94.356, 15.918, 0.904)
pt3dadd(80.349, 94.373, 15.9, 0.904)
pt3dadd(80.463, 94.409, 15.9, 0.904)
pt3dadd(80.578, 94.445, 15.9, 0.904)
pt3dadd(80.692, 94.481, 15.9, 0.904)
pt3dadd(80.807, 94.517, 15.9, 0.904)
pt3dadd(80.921, 94.553, 15.9, 0.904)
pt3dadd(81.028, 94.603, 15.897, 0.904)
pt3dadd(81.126, 94.673, 15.89, 0.904)
pt3dadd(81.223, 94.742, 15.883, 0.904)
pt3dadd(81.321, 94.812, 15.876, 0.904)
pt3dadd(81.418, 94.881, 15.869, 0.904)
pt3dadd(81.524, 94.913, 15.842, 0.904)
pt3dadd(81.636, 94.923, 15.81, 0.904)
pt3dadd(81.755, 94.938, 15.806, 0.904)
pt3dadd(81.873, 94.954, 15.802, 0.904)
pt3dadd(81.989, 94.984, 15.8, 0.904)
pt3dadd(82.102, 95.023, 15.8, 0.904)
pt3dadd(82.212, 95.07, 15.8, 0.904)
pt3dadd(82.311, 95.138, 15.8, 0.904)
pt3dadd(82.403, 95.21, 15.797, 0.904)
pt3dadd(82.429, 95.321, 15.764, 0.904)
pt3dadd(82.458, 95.429, 15.733, 0.904)
pt3dadd(82.558, 95.492, 15.718, 0.904)
pt3dadd(82.658, 95.556, 15.704, 0.904)
pt3dadd(82.759, 95.619, 15.69, 0.904)
pt3dadd(82.859, 95.682, 15.675, 0.904)
pt3dadd(82.92, 95.757, 15.642, 0.904)
pt3dadd(82.968, 95.829, 15.578, 0.904)
pt3dadd(83.037, 95.89, 15.514, 0.904)
pt3dadd(83.131, 95.962, 15.507, 0.904)
pt3dadd(83.227, 96.034, 15.503, 0.904)
pt3dadd(83.324, 96.104, 15.5, 0.904)
pt3dadd(83.427, 96.165, 15.5, 0.904)
pt3dadd(83.531, 96.225, 15.5, 0.904)
pt3dadd(83.645, 96.263, 15.5, 0.904)
pt3dadd(83.759, 96.3, 15.5, 0.904)
pt3dadd(83.873, 96.337, 15.5, 0.904)
pt3dadd(83.987, 96.374, 15.5, 0.904)
pt3dadd(84.013, 96.491, 15.5, 0.904)
pt3dadd(84.039, 96.608, 15.5, 0.904)
pt3dadd(84.111, 96.677, 15.5, 0.904)
pt3dadd(84.23, 96.698, 15.5, 0.904)
pt3dadd(84.348, 96.718, 15.5, 0.904)
pt3dadd(84.467, 96.733, 15.5, 0.904)
pt3dadd(84.586, 96.748, 15.5, 0.904)
pt3dadd(84.704, 96.766, 15.5, 0.904)
pt3dadd(84.82, 96.8, 15.5, 0.904)
pt3dadd(84.935, 96.833, 15.5, 0.904)
pt3dadd(85.047, 96.875, 15.5, 0.904)
pt3dadd(85.159, 96.919, 15.5, 0.904)
pt3dadd(85.27, 96.964, 15.5, 0.904)
pt3dadd(85.381, 97.009, 15.5, 0.904)
pt3dadd(85.493, 97.053, 15.5, 0.904)
pt3dadd(85.607, 97.088, 15.5, 0.904)
pt3dadd(85.725, 97.108, 15.5, 0.904)
pt3dadd(85.844, 97.127, 15.5, 0.904)
pt3dadd(85.962, 97.147, 15.5, 0.904)
pt3dadd(86.081, 97.167, 15.5, 0.904)
pt3dadd(86.199, 97.186, 15.5, 0.904)
pt3dadd(86.316, 97.21, 15.5, 0.904)
pt3dadd(86.432, 97.243, 15.5, 0.904)
pt3dadd(86.547, 97.277, 15.5, 0.904)
pt3dadd(86.662, 97.31, 15.5, 0.904)
pt3dadd(86.778, 97.343, 15.5, 0.904)
pt3dadd(86.893, 97.376, 15.5, 0.904)
pt3dadd(87.009, 97.409, 15.5, 0.904)
pt3dadd(87.124, 97.442, 15.5, 0.904)
pt3dadd(87.239, 97.474, 15.5, 0.904)
pt3dadd(87.355, 97.507, 15.5, 0.904)
pt3dadd(87.47, 97.54, 15.5, 0.904)
pt3dadd(87.586, 97.573, 15.5, 0.904)
pt3dadd(87.701, 97.607, 15.5, 0.904)
pt3dadd(87.814, 97.647, 15.5, 0.904)
pt3dadd(87.927, 97.686, 15.5, 0.904)
pt3dadd(88.002, 97.776, 15.5, 0.904)
pt3dadd(88.068, 97.875, 15.5, 0.904)
pt3dadd(88.135, 97.975, 15.5, 0.904)
pt3dadd(88.189, 98.08, 15.5, 0.904)
pt3dadd(88.198, 98.199, 15.5, 0.904)
pt3dadd(88.208, 98.319, 15.5, 0.904)
pt3dadd(88.258, 98.413, 15.5, 0.904)
pt3dadd(88.361, 98.474, 15.5, 0.904)
pt3dadd(88.467, 98.53, 15.5, 0.904)
pt3dadd(88.58, 98.569, 15.5, 0.904)
pt3dadd(88.694, 98.609, 15.5, 0.904)
pt3dadd(88.767, 98.701, 15.5, 0.904)
pt3dadd(88.834, 98.8, 15.5, 0.904)
pt3dadd(88.938, 98.849, 15.5, 0.904)
pt3dadd(89.054, 98.879, 15.5, 0.904)
pt3dadd(89.17, 98.909, 15.5, 0.904)
pt3dadd(89.286, 98.939, 15.5, 0.904)
pt3dadd(89.402, 98.97, 15.5, 0.904)
pt3dadd(89.518, 99, 15.5, 0.904)
pt3dadd(89.638, 99.006, 15.5, 0.904)
pt3dadd(89.758, 99.012, 15.5, 0.904)
pt3dadd(89.878, 99.018, 15.5, 0.904)
pt3dadd(89.998, 99.024, 15.5, 0.904)
pt3dadd(90.117, 99.03, 15.5, 0.904)
pt3dadd(90.237, 99.036, 15.5, 0.904)
pt3dadd(90.356, 99.051, 15.5, 0.904)
pt3dadd(90.47, 99.087, 15.5, 0.904)
pt3dadd(90.585, 99.122, 15.5, 0.904)
pt3dadd(90.699, 99.158, 15.5, 0.904)
pt3dadd(90.814, 99.194, 15.5, 0.904)
pt3dadd(90.928, 99.23, 15.5, 0.904)
pt3dadd(91.036, 99.282, 15.494, 0.904)
pt3dadd(91.141, 99.329, 15.476, 0.904)
pt3dadd(91.249, 99.356, 15.437, 0.904)
pt3dadd(91.354, 99.394, 15.409, 0.904)
pt3dadd(91.456, 99.458, 15.404, 0.904)
pt3dadd(91.557, 99.521, 15.401, 0.904)
pt3dadd(91.659, 99.585, 15.406, 0.904)
pt3dadd(91.752, 99.653, 15.416, 0.904)
pt3dadd(91.786, 99.758, 15.457, 0.904)
pt3dadd(91.831, 99.858, 15.489, 0.904)
pt3dadd(91.916, 99.942, 15.492, 0.904)
pt3dadd(92.001, 100.027, 15.494, 0.904)
pt3dadd(92.086, 100.112, 15.496, 0.904)
pt3dadd(92.171, 100.197, 15.498, 0.904)
pt3dadd(92.262, 100.273, 15.5, 0.904)
pt3dadd(92.366, 100.333, 15.5, 0.904)
pt3dadd(92.47, 100.393, 15.5, 0.904)
pt3dadd(92.574, 100.453, 15.5, 0.904)
pt3dadd(92.678, 100.513, 15.5, 0.904)
pt3dadd(92.777, 100.579, 15.5, 0.904)
pt3dadd(92.858, 100.668, 15.5, 0.904)
pt3dadd(92.938, 100.757, 15.5, 0.904)
pt3dadd(93.019, 100.845, 15.5, 0.904)
pt3dadd(93.1, 100.934, 15.5, 0.904)
pt3dadd(93.187, 101.014, 15.5, 0.904)
pt3dadd(93.288, 101.078, 15.5, 0.904)
pt3dadd(93.382, 101.153, 15.5, 0.904)
pt3dadd(93.48, 101.22, 15.5, 0.904)
pt3dadd(93.588, 101.274, 15.5, 0.904)
pt3dadd(93.695, 101.327, 15.5, 0.904)
pt3dadd(93.802, 101.381, 15.5, 0.904)
pt3dadd(93.918, 101.4, 15.5, 0.904)
pt3dadd(94.038, 101.4, 15.5, 0.904)
pt3dadd(94.158, 101.4, 15.5, 0.904)
pt3dadd(94.277, 101.41, 15.5, 0.904)
pt3dadd(94.396, 101.424, 15.5, 0.904)
pt3dadd(94.515, 101.439, 15.5, 0.904)
pt3dadd(94.6, 101.52, 15.517, 0.904)
pt3dadd(94.682, 101.604, 15.535, 0.904)
pt3dadd(94.741, 101.699, 15.571, 0.904)
pt3dadd(94.806, 101.791, 15.604, 0.904)
pt3dadd(94.89, 101.873, 15.625, 0.904)
pt3dadd(94.975, 101.955, 15.645, 0.904)
pt3dadd(95.059, 102.036, 15.665, 0.904)
pt3dadd(95.144, 102.118, 15.685, 0.904)
pt3dadd(95.224, 102.206, 15.696, 0.904)
pt3dadd(95.276, 102.308, 15.7, 0.904)
pt3dadd(95.297, 102.427, 15.7, 0.904)
pt3dadd(95.317, 102.545, 15.7, 0.904)
pt3dadd(95.391, 102.637, 15.7, 0.904)
pt3dadd(95.473, 102.724, 15.7, 0.904)
pt3dadd(95.578, 102.776, 15.7, 0.904)
pt3dadd(95.691, 102.816, 15.7, 0.904)
pt3dadd(95.801, 102.864, 15.7, 0.904)
pt3dadd(95.904, 102.925, 15.7, 0.904)
pt3dadd(96.005, 102.989, 15.7, 0.904)
pt3dadd(96.097, 103.067, 15.7, 0.904)
pt3dadd(96.188, 103.145, 15.7, 0.904)
pt3dadd(96.279, 103.222, 15.7, 0.904)
pt3dadd(96.371, 103.3, 15.7, 0.904)
pt3dadd(96.461, 103.379, 15.7, 0.904)
pt3dadd(96.547, 103.463, 15.7, 0.904)
pt3dadd(96.633, 103.547, 15.7, 0.904)
}
}
proc shape3d_195() {
dend_7[30] { pt3dadd(96.719, 103.63, 15.7, 0.904)
pt3dadd(96.805, 103.714, 15.7, 0.904)
pt3dadd(96.884, 103.803, 15.7, 0.904)
pt3dadd(96.947, 103.905, 15.7, 0.904)
pt3dadd(97.01, 104.007, 15.7, 0.904)
pt3dadd(97.073, 104.109, 15.7, 0.904)
pt3dadd(97.136, 104.211, 15.7, 0.904)
pt3dadd(97.203, 104.31, 15.7, 0.904)
pt3dadd(97.287, 104.397, 15.7, 0.904)
pt3dadd(97.37, 104.483, 15.7, 0.904)
pt3dadd(97.454, 104.569, 15.7, 0.904)
pt3dadd(97.537, 104.656, 15.7, 0.904)
pt3dadd(97.625, 104.737, 15.7, 0.904)
pt3dadd(97.725, 104.802, 15.7, 0.904)
pt3dadd(97.825, 104.868, 15.7, 0.904)
pt3dadd(97.926, 104.934, 15.7, 0.904)
pt3dadd(98.026, 105, 15.7, 0.904)
pt3dadd(98.12, 105.072, 15.7, 0.904)
pt3dadd(98.189, 105.17, 15.7, 0.904)
pt3dadd(98.258, 105.268, 15.7, 0.904)
pt3dadd(98.327, 105.367, 15.7, 0.904)
pt3dadd(98.395, 105.465, 15.7, 0.904)
pt3dadd(98.471, 105.554, 15.7, 0.904)
pt3dadd(98.584, 105.597, 15.7, 0.904)
pt3dadd(98.677, 105.667, 15.7, 0.904)
pt3dadd(98.758, 105.756, 15.7, 0.904)
pt3dadd(98.832, 105.844, 15.718, 0.904)
pt3dadd(98.899, 105.933, 15.755, 0.904)
pt3dadd(98.946, 106.039, 15.778, 0.904)
pt3dadd(98.984, 106.151, 15.793, 0.904)
pt3dadd(99, 106.268, 15.8, 0.904)
pt3dadd(99, 106.388, 15.8, 0.904)
pt3dadd(99, 106.508, 15.8, 0.904)
pt3dadd(99.015, 106.623, 15.816, 0.794)
pt3dadd(99.042, 106.735, 15.845, 0.598)
pt3dadd(99.069, 106.846, 15.874, 0.402)
pt3dadd(99.106, 106.949, 15.9, 0.226)
pt3dadd(99.222, 106.978, 15.9, 0.226)
pt3dadd(99.339, 107.006, 15.9, 0.226)
pt3dadd(99.456, 107.034, 15.9, 0.226)
pt3dadd(99.574, 107.052, 15.9, 0.226)
pt3dadd(99.693, 107.066, 15.9, 0.226)
pt3dadd(99.805, 107.091, 15.9, 0.226)
pt3dadd(99.85, 107.202, 15.9, 0.226)
pt3dadd(99.895, 107.313, 15.9, 0.226)
pt3dadd(99.94, 107.424, 15.9, 0.226)
pt3dadd(99.984, 107.536, 15.9, 0.226)
pt3dadd(100.023, 107.649, 15.9, 0.226)
pt3dadd(100.063, 107.763, 15.9, 0.226)
pt3dadd(100.075, 107.882, 15.9, 0.226)
pt3dadd(100.085, 108.001, 15.9, 0.226)
pt3dadd(100.105, 108.114, 15.9, 0.226)
pt3dadd(100.209, 108.175, 15.9, 0.226)
pt3dadd(100.312, 108.235, 15.9, 0.226)
pt3dadd(100.423, 108.254, 15.868, 0.414)
pt3dadd(100.535, 108.27, 15.834, 0.618)
pt3dadd(100.646, 108.286, 15.799, 0.822)
pt3dadd(100.758, 108.301, 15.765, 1.026)
}
dend_7[31] {pt3dclear()
pt3dadd(100.758, 108.301, 15.765, 1.026)
pt3dadd(100.773, 108.341, 15.786, 1.04)
pt3dadd(100.808, 108.439, 15.837, 1.072)
pt3dadd(100.843, 108.536, 15.887, 1.106)
pt3dadd(100.879, 108.633, 15.938, 1.14)
pt3dadd(100.914, 108.73, 15.989, 1.172)
pt3dadd(100.949, 108.827, 16.04, 1.206)
pt3dadd(100.985, 108.924, 16.09, 1.24)
pt3dadd(101.02, 109.022, 16.141, 1.272)
pt3dadd(101.055, 109.119, 16.192, 1.306)
pt3dadd(101.091, 109.216, 16.243, 1.34)
pt3dadd(101.118, 109.311, 16.298, 1.356)
pt3dadd(101.139, 109.405, 16.359, 1.356)
pt3dadd(101.159, 109.498, 16.419, 1.356)
pt3dadd(101.179, 109.592, 16.48, 1.356)
pt3dadd(101.2, 109.685, 16.54, 1.356)
pt3dadd(101.22, 109.778, 16.6, 1.356)
pt3dadd(101.24, 109.872, 16.661, 1.356)
pt3dadd(101.26, 109.965, 16.721, 1.356)
pt3dadd(101.281, 110.059, 16.782, 1.356)
pt3dadd(101.301, 110.152, 16.842, 1.356)
pt3dadd(101.322, 110.223, 16.917, 1.362)
pt3dadd(101.345, 110.269, 17.007, 1.372)
pt3dadd(101.368, 110.316, 17.097, 1.384)
pt3dadd(101.391, 110.363, 17.187, 1.394)
pt3dadd(101.414, 110.41, 17.278, 1.404)
pt3dadd(101.437, 110.457, 17.368, 1.416)
pt3dadd(101.46, 110.503, 17.458, 1.426)
pt3dadd(101.483, 110.55, 17.548, 1.438)
pt3dadd(101.505, 110.597, 17.638, 1.448)
pt3dadd(101.528, 110.644, 17.728, 1.46)
}
dend_7[32] {pt3dclear()
pt3dadd(100.758, 108.301, 15.765, 1.026)
pt3dadd(100.744, 108.263, 15.746, 1.016)
pt3dadd(100.707, 108.165, 15.696, 0.992)
pt3dadd(100.669, 108.068, 15.647, 0.968)
pt3dadd(100.632, 107.97, 15.598, 0.942)
pt3dadd(100.595, 107.873, 15.549, 0.918)
pt3dadd(100.558, 107.775, 15.499, 0.894)
pt3dadd(100.521, 107.677, 15.45, 0.87)
pt3dadd(100.484, 107.58, 15.401, 0.846)
pt3dadd(100.447, 107.482, 15.351, 0.82)
pt3dadd(100.41, 107.385, 15.302, 0.796)
pt3dadd(100.379, 107.288, 15.249, 0.796)
pt3dadd(100.356, 107.193, 15.191, 0.826)
pt3dadd(100.333, 107.098, 15.133, 0.856)
pt3dadd(100.31, 107.004, 15.074, 0.888)
pt3dadd(100.287, 106.909, 15.016, 0.918)
pt3dadd(100.263, 106.814, 14.958, 0.948)
pt3dadd(100.24, 106.719, 14.9, 0.978)
pt3dadd(100.217, 106.624, 14.842, 1.008)
pt3dadd(100.194, 106.529, 14.784, 1.04)
pt3dadd(100.171, 106.434, 14.726, 1.07)
pt3dadd(100.153, 106.341, 14.665, 1.078)
pt3dadd(100.141, 106.249, 14.601, 1.056)
pt3dadd(100.13, 106.157, 14.538, 1.036)
pt3dadd(100.118, 106.066, 14.474, 1.016)
pt3dadd(100.107, 105.974, 14.41, 0.994)
pt3dadd(100.095, 105.882, 14.346, 0.974)
pt3dadd(100.084, 105.791, 14.283, 0.954)
pt3dadd(100.072, 105.699, 14.219, 0.932)
pt3dadd(100.061, 105.607, 14.155, 0.912)
pt3dadd(100.049, 105.515, 14.091, 0.892)
pt3dadd(100.04, 105.424, 14.027, 0.876)
pt3dadd(100.034, 105.334, 13.961, 0.87)
pt3dadd(100.027, 105.243, 13.896, 0.862)
pt3dadd(100.021, 105.153, 13.83, 0.856)
pt3dadd(100.015, 105.063, 13.765, 0.848)
pt3dadd(100.009, 104.972, 13.699, 0.84)
pt3dadd(100.002, 104.882, 13.633, 0.834)
pt3dadd(99.996, 104.792, 13.568, 0.826)
pt3dadd(99.99, 104.701, 13.502, 0.82)
pt3dadd(99.984, 104.611, 13.437, 0.812)
pt3dadd(99.981, 104.521, 13.37, 0.828)
pt3dadd(99.982, 104.433, 13.303, 0.872)
pt3dadd(99.984, 104.344, 13.235, 0.914)
pt3dadd(99.985, 104.255, 13.168, 0.956)
pt3dadd(99.986, 104.166, 13.101, 1)
pt3dadd(99.988, 104.078, 13.033, 1.042)
pt3dadd(99.989, 103.989, 12.966, 1.084)
pt3dadd(99.99, 103.9, 12.899, 1.126)
pt3dadd(99.992, 103.812, 12.831, 1.17)
pt3dadd(99.993, 103.723, 12.764, 1.212)
pt3dadd(99.995, 103.633, 12.698, 1.246)
pt3dadd(99.997, 103.543, 12.632, 1.268)
pt3dadd(99.999, 103.452, 12.567, 1.29)
pt3dadd(100.001, 103.361, 12.501, 1.314)
pt3dadd(100.003, 103.27, 12.436, 1.336)
pt3dadd(100.005, 103.179, 12.371, 1.358)
pt3dadd(100.008, 103.089, 12.305, 1.382)
pt3dadd(100.01, 102.998, 12.24, 1.404)
pt3dadd(100.012, 102.907, 12.175, 1.426)
pt3dadd(100.014, 102.816, 12.109, 1.448)
pt3dadd(100.017, 102.724, 12.046, 1.458)
pt3dadd(100.02, 102.629, 11.984, 1.452)
pt3dadd(100.024, 102.534, 11.923, 1.446)
pt3dadd(100.027, 102.44, 11.861, 1.44)
pt3dadd(100.031, 102.345, 11.8, 1.436)
pt3dadd(100.034, 102.251, 11.738, 1.43)
pt3dadd(100.038, 102.156, 11.677, 1.424)
pt3dadd(100.041, 102.062, 11.615, 1.418)
pt3dadd(100.045, 101.967, 11.554, 1.412)
pt3dadd(100.048, 101.872, 11.493, 1.406)
pt3dadd(100.054, 101.772, 11.439, 1.352)
pt3dadd(100.061, 101.665, 11.394, 1.248)
pt3dadd(100.069, 101.558, 11.349, 1.146)
pt3dadd(100.077, 101.452, 11.303, 1.044)
pt3dadd(100.084, 101.345, 11.258, 0.942)
pt3dadd(100.092, 101.238, 11.213, 0.838)
pt3dadd(100.099, 101.131, 11.167, 0.736)
pt3dadd(100.107, 101.025, 11.122, 0.634)
pt3dadd(100.114, 100.918, 11.077, 0.53)
pt3dadd(100.122, 100.811, 11.031, 0.428)
pt3dadd(100.131, 100.706, 10.984, 0.42)
pt3dadd(100.143, 100.603, 10.933, 0.504)
pt3dadd(100.154, 100.5, 10.883, 0.586)
pt3dadd(100.165, 100.397, 10.833, 0.668)
pt3dadd(100.176, 100.294, 10.783, 0.752)
pt3dadd(100.188, 100.19, 10.733, 0.834)
pt3dadd(100.199, 100.087, 10.683, 0.916)
pt3dadd(100.21, 99.984, 10.633, 1)
pt3dadd(100.222, 99.881, 10.582, 1.082)
pt3dadd(100.233, 99.778, 10.532, 1.164)
pt3dadd(100.252, 99.674, 10.486, 1.224)
pt3dadd(100.278, 99.569, 10.442, 1.26)
pt3dadd(100.305, 99.464, 10.399, 1.298)
pt3dadd(100.331, 99.359, 10.355, 1.334)
pt3dadd(100.358, 99.255, 10.311, 1.372)
pt3dadd(100.384, 99.15, 10.268, 1.408)
pt3dadd(100.411, 99.045, 10.224, 1.444)
pt3dadd(100.437, 98.94, 10.181, 1.482)
pt3dadd(100.464, 98.836, 10.137, 1.518)
pt3dadd(100.49, 98.731, 10.094, 1.556)
pt3dadd(100.525, 98.626, 10.055, 1.542)
pt3dadd(100.565, 98.522, 10.019, 1.5)
pt3dadd(100.605, 98.417, 9.983, 1.46)
pt3dadd(100.644, 98.313, 9.946, 1.418)
pt3dadd(100.684, 98.208, 9.91, 1.374)
pt3dadd(100.724, 98.103, 9.874, 1.334)
pt3dadd(100.764, 97.999, 9.838, 1.292)
pt3dadd(100.804, 97.894, 9.802, 1.25)
pt3dadd(100.843, 97.79, 9.765, 1.208)
pt3dadd(100.883, 97.685, 9.729, 1.166)
}
}
proc shape3d_196() {
dend_7[32] { pt3dadd(100.914, 97.583, 9.684, 1.162)
pt3dadd(100.939, 97.482, 9.635, 1.178)
pt3dadd(100.964, 97.38, 9.586, 1.194)
pt3dadd(100.989, 97.279, 9.536, 1.21)
pt3dadd(101.014, 97.178, 9.487, 1.226)
pt3dadd(101.039, 97.076, 9.438, 1.242)
pt3dadd(101.064, 96.975, 9.389, 1.258)
pt3dadd(101.089, 96.874, 9.339, 1.274)
pt3dadd(101.114, 96.772, 9.29, 1.29)
pt3dadd(101.139, 96.671, 9.241, 1.308)
pt3dadd(101.158, 96.564, 9.198, 1.324)
pt3dadd(101.174, 96.454, 9.16, 1.342)
pt3dadd(101.19, 96.345, 9.122, 1.36)
pt3dadd(101.206, 96.235, 9.083, 1.378)
pt3dadd(101.222, 96.126, 9.045, 1.394)
pt3dadd(101.238, 96.016, 9.006, 1.412)
pt3dadd(101.254, 95.906, 8.968, 1.43)
pt3dadd(101.27, 95.797, 8.93, 1.448)
pt3dadd(101.286, 95.687, 8.891, 1.464)
pt3dadd(101.302, 95.577, 8.853, 1.482)
pt3dadd(101.311, 95.467, 8.813, 1.494)
pt3dadd(101.317, 95.358, 8.773, 1.504)
pt3dadd(101.324, 95.248, 8.733, 1.514)
pt3dadd(101.33, 95.138, 8.693, 1.522)
pt3dadd(101.337, 95.028, 8.654, 1.532)
pt3dadd(101.343, 94.918, 8.614, 1.542)
pt3dadd(101.35, 94.809, 8.574, 1.552)
pt3dadd(101.356, 94.699, 8.534, 1.56)
pt3dadd(101.363, 94.589, 8.494, 1.57)
pt3dadd(101.369, 94.479, 8.454, 1.58)
pt3dadd(101.371, 94.37, 8.412, 1.58)
pt3dadd(101.371, 94.262, 8.369, 1.578)
pt3dadd(101.371, 94.154, 8.326, 1.574)
pt3dadd(101.371, 94.045, 8.283, 1.572)
pt3dadd(101.371, 93.937, 8.24, 1.568)
pt3dadd(101.371, 93.829, 8.196, 1.566)
pt3dadd(101.371, 93.72, 8.154, 1.564)
pt3dadd(101.371, 93.612, 8.111, 1.56)
pt3dadd(101.371, 93.504, 8.068, 1.558)
pt3dadd(101.371, 93.395, 8.024, 1.554)
pt3dadd(101.371, 93.281, 7.995, 1.54)
pt3dadd(101.371, 93.165, 7.97, 1.522)
pt3dadd(101.371, 93.049, 7.944, 1.502)
pt3dadd(101.371, 92.933, 7.919, 1.484)
pt3dadd(101.371, 92.817, 7.894, 1.466)
pt3dadd(101.371, 92.701, 7.869, 1.448)
pt3dadd(101.371, 92.585, 7.843, 1.428)
pt3dadd(101.371, 92.468, 7.818, 1.41)
pt3dadd(101.371, 92.352, 7.793, 1.392)
pt3dadd(101.371, 92.236, 7.768, 1.372)
pt3dadd(101.371, 92.118, 7.75, 1.34)
pt3dadd(101.371, 91.999, 7.736, 1.304)
pt3dadd(101.371, 91.881, 7.721, 1.266)
pt3dadd(101.371, 91.762, 7.707, 1.23)
pt3dadd(101.371, 91.643, 7.692, 1.194)
pt3dadd(101.371, 91.525, 7.677, 1.156)
pt3dadd(101.371, 91.406, 7.663, 1.12)
pt3dadd(101.371, 91.287, 7.648, 1.082)
pt3dadd(101.371, 91.168, 7.633, 1.046)
pt3dadd(101.371, 91.05, 7.619, 1.01)
pt3dadd(101.371, 90.93, 7.609, 0.96)
pt3dadd(101.371, 90.811, 7.6, 0.908)
pt3dadd(101.371, 90.691, 7.591, 0.854)
pt3dadd(101.371, 90.572, 7.582, 0.802)
pt3dadd(101.371, 90.452, 7.573, 0.75)
pt3dadd(101.371, 90.333, 7.565, 0.698)
pt3dadd(101.371, 90.213, 7.556, 0.644)
pt3dadd(101.371, 90.094, 7.547, 0.592)
pt3dadd(101.371, 89.974, 7.538, 0.54)
pt3dadd(101.371, 89.855, 7.529, 0.486)
pt3dadd(101.371, 89.735, 7.52, 0.48)
pt3dadd(101.371, 89.616, 7.51, 0.488)
pt3dadd(101.371, 89.496, 7.5, 0.496)
pt3dadd(101.371, 89.377, 7.491, 0.504)
pt3dadd(101.371, 89.257, 7.481, 0.51)
pt3dadd(101.371, 89.138, 7.471, 0.518)
pt3dadd(101.371, 89.019, 7.461, 0.526)
pt3dadd(101.371, 88.899, 7.452, 0.534)
pt3dadd(101.371, 88.78, 7.442, 0.542)
pt3dadd(101.371, 88.66, 7.432, 0.548)
pt3dadd(101.371, 88.543, 7.413, 0.584)
pt3dadd(101.371, 88.425, 7.391, 0.626)
pt3dadd(101.371, 88.308, 7.37, 0.668)
pt3dadd(101.371, 88.191, 7.348, 0.712)
pt3dadd(101.371, 88.074, 7.326, 0.754)
pt3dadd(101.371, 87.957, 7.304, 0.796)
pt3dadd(101.371, 87.84, 7.283, 0.838)
pt3dadd(101.371, 87.723, 7.261, 0.882)
pt3dadd(101.371, 87.606, 7.239, 0.924)
pt3dadd(101.371, 87.489, 7.218, 0.966)
pt3dadd(101.371, 87.376, 7.184, 0.986)
pt3dadd(101.371, 87.264, 7.148, 1.002)
pt3dadd(101.372, 87.152, 7.112, 1.018)
pt3dadd(101.372, 87.04, 7.076, 1.034)
pt3dadd(101.372, 86.928, 7.04, 1.048)
pt3dadd(101.372, 86.816, 7.004, 1.064)
pt3dadd(101.372, 86.704, 6.968, 1.08)
pt3dadd(101.372, 86.592, 6.932, 1.096)
pt3dadd(101.372, 86.48, 6.896, 1.112)
pt3dadd(101.372, 86.368, 6.859, 1.128)
pt3dadd(101.372, 86.253, 6.833, 1.13)
pt3dadd(101.372, 86.136, 6.809, 1.13)
pt3dadd(101.372, 86.02, 6.784, 1.13)
pt3dadd(101.372, 85.904, 6.76, 1.13)
pt3dadd(101.372, 85.787, 6.735, 1.13)
pt3dadd(101.372, 85.671, 6.71, 1.13)
pt3dadd(101.372, 85.555, 6.686, 1.13)
pt3dadd(101.372, 85.438, 6.661, 1.13)
pt3dadd(101.372, 85.322, 6.636, 1.13)
pt3dadd(101.372, 85.206, 6.612, 1.13)
pt3dadd(101.372, 85.087, 6.597, 1.116)
pt3dadd(101.372, 84.968, 6.583, 1.098)
pt3dadd(101.372, 84.849, 6.569, 1.08)
pt3dadd(101.372, 84.731, 6.555, 1.064)
pt3dadd(101.372, 84.612, 6.542, 1.046)
pt3dadd(101.372, 84.493, 6.528, 1.03)
pt3dadd(101.372, 84.374, 6.514, 1.012)
pt3dadd(101.372, 84.255, 6.5, 0.994)
pt3dadd(101.372, 84.136, 6.486, 0.978)
pt3dadd(101.372, 84.018, 6.473, 0.96)
pt3dadd(101.373, 83.898, 6.466, 0.954)
pt3dadd(101.373, 83.778, 6.46, 0.948)
pt3dadd(101.373, 83.658, 6.454, 0.942)
pt3dadd(101.373, 83.538, 6.448, 0.938)
pt3dadd(101.373, 83.419, 6.443, 0.932)
pt3dadd(101.373, 83.299, 6.437, 0.926)
pt3dadd(101.373, 83.179, 6.431, 0.92)
pt3dadd(101.373, 83.059, 6.425, 0.916)
pt3dadd(101.373, 82.939, 6.419, 0.91)
pt3dadd(101.374, 82.82, 6.414, 0.904)
pt3dadd(101.374, 82.7, 6.408, 0.914)
pt3dadd(101.374, 82.58, 6.402, 0.924)
pt3dadd(101.374, 82.46, 6.397, 0.934)
pt3dadd(101.374, 82.34, 6.391, 0.944)
pt3dadd(101.374, 82.221, 6.386, 0.954)
pt3dadd(101.374, 82.101, 6.38, 0.964)
pt3dadd(101.374, 81.981, 6.374, 0.974)
pt3dadd(101.374, 81.861, 6.369, 0.986)
pt3dadd(101.374, 81.741, 6.363, 0.996)
pt3dadd(101.374, 81.621, 6.358, 1.006)
pt3dadd(101.374, 81.502, 6.349, 1.006)
pt3dadd(101.374, 81.383, 6.339, 1.004)
pt3dadd(101.374, 81.263, 6.329, 1.004)
pt3dadd(101.375, 81.144, 6.32, 1.002)
pt3dadd(101.375, 81.024, 6.31, 1)
pt3dadd(101.375, 80.905, 6.301, 1)
pt3dadd(101.375, 80.785, 6.291, 0.998)
pt3dadd(101.376, 80.666, 6.282, 0.996)
pt3dadd(101.376, 80.546, 6.272, 0.994)
pt3dadd(101.376, 80.427, 6.263, 0.994)
pt3dadd(101.376, 80.309, 6.246, 0.968)
pt3dadd(101.377, 80.191, 6.228, 0.94)
pt3dadd(101.377, 80.072, 6.211, 0.91)
pt3dadd(101.378, 79.954, 6.193, 0.882)
pt3dadd(101.378, 79.836, 6.175, 0.854)
pt3dadd(101.379, 79.718, 6.158, 0.824)
pt3dadd(101.379, 79.6, 6.14, 0.796)
pt3dadd(101.38, 79.482, 6.122, 0.768)
pt3dadd(101.38, 79.364, 6.105, 0.738)
pt3dadd(101.381, 79.246, 6.087, 0.71)
pt3dadd(101.381, 79.135, 6.049, 0.726)
pt3dadd(101.382, 79.025, 6.01, 0.742)
pt3dadd(101.383, 78.914, 5.97, 0.76)
pt3dadd(101.383, 78.804, 5.931, 0.778)
pt3dadd(101.384, 78.694, 5.891, 0.796)
pt3dadd(101.384, 78.584, 5.852, 0.814)
pt3dadd(101.385, 78.473, 5.813, 0.832)
pt3dadd(101.386, 78.363, 5.773, 0.848)
pt3dadd(101.386, 78.253, 5.734, 0.866)
pt3dadd(101.387, 78.142, 5.694, 0.884)
pt3dadd(101.388, 78.029, 5.662, 0.902)
pt3dadd(101.39, 77.915, 5.631, 0.92)
pt3dadd(101.391, 77.801, 5.6, 0.938)
pt3dadd(101.393, 77.687, 5.569, 0.958)
pt3dadd(101.394, 77.573, 5.537, 0.976)
pt3dadd(101.396, 77.459, 5.506, 0.994)
pt3dadd(101.398, 77.345, 5.475, 1.012)
pt3dadd(101.399, 77.231, 5.444, 1.03)
pt3dadd(101.401, 77.117, 5.412, 1.048)
pt3dadd(101.402, 77.003, 5.381, 1.066)
pt3dadd(101.405, 76.887, 5.356, 1.062)
pt3dadd(101.408, 76.771, 5.331, 1.056)
pt3dadd(101.411, 76.654, 5.306, 1.05)
pt3dadd(101.414, 76.538, 5.281, 1.044)
pt3dadd(101.417, 76.422, 5.256, 1.038)
pt3dadd(101.42, 76.306, 5.231, 1.032)
pt3dadd(101.422, 76.19, 5.206, 1.026)
pt3dadd(101.425, 76.074, 5.181, 1.02)
pt3dadd(101.428, 75.957, 5.156, 1.012)
pt3dadd(101.431, 75.841, 5.131, 1.006)
pt3dadd(101.436, 75.726, 5.103, 1.02)
pt3dadd(101.442, 75.612, 5.074, 1.034)
pt3dadd(101.447, 75.497, 5.044, 1.048)
pt3dadd(101.452, 75.382, 5.016, 1.062)
pt3dadd(101.457, 75.268, 4.986, 1.076)
pt3dadd(101.463, 75.153, 4.957, 1.09)
pt3dadd(101.468, 75.038, 4.928, 1.104)
pt3dadd(101.473, 74.924, 4.899, 1.118)
pt3dadd(101.479, 74.809, 4.87, 1.132)
pt3dadd(101.484, 74.694, 4.841, 1.146)
}
}
proc shape3d_197() {
dend_7[32] { pt3dadd(101.493, 74.582, 4.806, 1.192)
pt3dadd(101.502, 74.47, 4.772, 1.24)
pt3dadd(101.511, 74.358, 4.737, 1.286)
pt3dadd(101.519, 74.245, 4.702, 1.334)
pt3dadd(101.528, 74.133, 4.668, 1.38)
pt3dadd(101.537, 74.021, 4.633, 1.428)
pt3dadd(101.546, 73.909, 4.598, 1.474)
pt3dadd(101.555, 73.797, 4.563, 1.522)
pt3dadd(101.564, 73.684, 4.529, 1.568)
pt3dadd(101.573, 73.572, 4.494, 1.616)
}
dend_7[33] {pt3dclear()
pt3dadd(101.573, 73.572, 4.494, 1.616)
pt3dadd(101.583, 73.485, 4.476, 1.63)
pt3dadd(101.596, 73.369, 4.452, 1.648)
pt3dadd(101.61, 73.253, 4.429, 1.666)
pt3dadd(101.623, 73.137, 4.405, 1.686)
pt3dadd(101.637, 73.022, 4.381, 1.704)
pt3dadd(101.65, 72.906, 4.357, 1.722)
pt3dadd(101.664, 72.79, 4.333, 1.742)
pt3dadd(101.677, 72.674, 4.309, 1.76)
pt3dadd(101.691, 72.559, 4.286, 1.778)
pt3dadd(101.704, 72.443, 4.262, 1.796)
pt3dadd(101.74, 72.331, 4.248, 1.764)
pt3dadd(101.783, 72.219, 4.237, 1.712)
pt3dadd(101.827, 72.108, 4.226, 1.662)
pt3dadd(101.87, 71.997, 4.215, 1.61)
pt3dadd(101.913, 71.886, 4.205, 1.56)
pt3dadd(101.957, 71.775, 4.194, 1.51)
pt3dadd(102, 71.664, 4.183, 1.458)
pt3dadd(102.044, 71.553, 4.172, 1.408)
pt3dadd(102.087, 71.442, 4.162, 1.358)
pt3dadd(102.13, 71.33, 4.151, 1.306)
pt3dadd(102.166, 71.216, 4.146, 1.252)
pt3dadd(102.2, 71.101, 4.143, 1.198)
pt3dadd(102.234, 70.986, 4.14, 1.142)
pt3dadd(102.267, 70.871, 4.136, 1.086)
pt3dadd(102.301, 70.756, 4.133, 1.032)
pt3dadd(102.335, 70.641, 4.13, 0.976)
pt3dadd(102.369, 70.526, 4.127, 0.92)
pt3dadd(102.402, 70.41, 4.124, 0.866)
pt3dadd(102.436, 70.295, 4.12, 0.81)
pt3dadd(102.47, 70.18, 4.117, 0.754)
pt3dadd(102.494, 70.063, 4.117, 0.728)
pt3dadd(102.515, 69.945, 4.117, 0.708)
pt3dadd(102.536, 69.827, 4.117, 0.688)
pt3dadd(102.558, 69.709, 4.117, 0.668)
pt3dadd(102.579, 69.591, 4.117, 0.648)
pt3dadd(102.601, 69.472, 4.116, 0.628)
pt3dadd(102.622, 69.354, 4.116, 0.608)
pt3dadd(102.643, 69.236, 4.116, 0.588)
pt3dadd(102.665, 69.118, 4.116, 0.568)
pt3dadd(102.686, 69, 4.116, 0.546)
pt3dadd(102.698, 68.881, 4.116, 0.564)
pt3dadd(102.707, 68.761, 4.116, 0.588)
pt3dadd(102.717, 68.641, 4.116, 0.614)
pt3dadd(102.726, 68.522, 4.116, 0.638)
pt3dadd(102.735, 68.402, 4.116, 0.664)
pt3dadd(102.745, 68.283, 4.116, 0.688)
pt3dadd(102.754, 68.163, 4.116, 0.712)
pt3dadd(102.763, 68.043, 4.116, 0.738)
pt3dadd(102.773, 67.924, 4.116, 0.762)
pt3dadd(102.782, 67.804, 4.116, 0.788)
pt3dadd(102.784, 67.684, 4.116, 0.818)
pt3dadd(102.784, 67.564, 4.116, 0.85)
pt3dadd(102.784, 67.444, 4.116, 0.88)
pt3dadd(102.784, 67.324, 4.116, 0.912)
pt3dadd(102.784, 67.204, 4.116, 0.944)
pt3dadd(102.784, 67.084, 4.116, 0.976)
pt3dadd(102.784, 66.964, 4.116, 1.008)
pt3dadd(102.784, 66.844, 4.116, 1.038)
pt3dadd(102.784, 66.724, 4.116, 1.07)
pt3dadd(102.784, 66.604, 4.116, 1.102)
pt3dadd(102.784, 66.484, 4.116, 1.092)
pt3dadd(102.784, 66.364, 4.116, 1.072)
pt3dadd(102.784, 66.244, 4.116, 1.052)
pt3dadd(102.784, 66.124, 4.116, 1.034)
pt3dadd(102.784, 66.004, 4.116, 1.014)
pt3dadd(102.784, 65.884, 4.116, 0.996)
pt3dadd(102.784, 65.764, 4.116, 0.976)
pt3dadd(102.785, 65.644, 4.116, 0.956)
pt3dadd(102.785, 65.524, 4.116, 0.938)
pt3dadd(102.785, 65.404, 4.116, 0.918)
pt3dadd(102.785, 65.284, 4.116, 0.884)
pt3dadd(102.785, 65.164, 4.116, 0.846)
pt3dadd(102.786, 65.044, 4.116, 0.81)
pt3dadd(102.786, 64.924, 4.116, 0.772)
pt3dadd(102.786, 64.804, 4.116, 0.734)
pt3dadd(102.786, 64.684, 4.116, 0.698)
pt3dadd(102.786, 64.564, 4.116, 0.66)
pt3dadd(102.787, 64.444, 4.115, 0.622)
pt3dadd(102.787, 64.324, 4.115, 0.586)
pt3dadd(102.787, 64.204, 4.115, 0.548)
pt3dadd(102.787, 64.084, 4.115, 0.522)
pt3dadd(102.788, 63.964, 4.115, 0.498)
pt3dadd(102.788, 63.844, 4.115, 0.474)
pt3dadd(102.788, 63.724, 4.115, 0.452)
pt3dadd(102.788, 63.604, 4.115, 0.428)
pt3dadd(102.789, 63.484, 4.115, 0.404)
pt3dadd(102.789, 63.364, 4.115, 0.38)
pt3dadd(102.789, 63.244, 4.115, 0.356)
pt3dadd(102.789, 63.124, 4.114, 0.332)
pt3dadd(102.79, 63.004, 4.114, 0.308)
pt3dadd(102.79, 62.884, 4.114, 0.318)
pt3dadd(102.791, 62.764, 4.114, 0.332)
pt3dadd(102.791, 62.644, 4.113, 0.346)
pt3dadd(102.792, 62.524, 4.113, 0.362)
pt3dadd(102.792, 62.404, 4.113, 0.376)
pt3dadd(102.793, 62.284, 4.113, 0.392)
pt3dadd(102.794, 62.164, 4.113, 0.406)
pt3dadd(102.794, 62.044, 4.112, 0.42)
pt3dadd(102.795, 61.924, 4.112, 0.436)
pt3dadd(102.795, 61.804, 4.112, 0.45)
pt3dadd(102.797, 61.684, 4.111, 0.472)
pt3dadd(102.798, 61.564, 4.111, 0.494)
pt3dadd(102.799, 61.444, 4.111, 0.516)
pt3dadd(102.8, 61.324, 4.11, 0.54)
pt3dadd(102.801, 61.204, 4.11, 0.562)
pt3dadd(102.803, 61.084, 4.109, 0.584)
pt3dadd(102.804, 60.964, 4.109, 0.606)
pt3dadd(102.805, 60.844, 4.108, 0.63)
pt3dadd(102.806, 60.724, 4.108, 0.652)
pt3dadd(102.807, 60.604, 4.108, 0.674)
pt3dadd(102.809, 60.484, 4.107, 0.674)
pt3dadd(102.811, 60.364, 4.106, 0.67)
pt3dadd(102.813, 60.244, 4.105, 0.666)
pt3dadd(102.815, 60.124, 4.104, 0.66)
pt3dadd(102.817, 60.004, 4.103, 0.656)
pt3dadd(102.819, 59.884, 4.103, 0.652)
pt3dadd(102.822, 59.764, 4.102, 0.646)
pt3dadd(102.824, 59.644, 4.101, 0.642)
pt3dadd(102.826, 59.524, 4.1, 0.638)
pt3dadd(102.828, 59.404, 4.099, 0.634)
pt3dadd(102.831, 59.284, 4.098, 0.62)
pt3dadd(102.835, 59.165, 4.096, 0.604)
pt3dadd(102.839, 59.045, 4.095, 0.588)
pt3dadd(102.842, 58.925, 4.094, 0.572)
pt3dadd(102.846, 58.805, 4.092, 0.556)
pt3dadd(102.85, 58.685, 4.09, 0.54)
pt3dadd(102.853, 58.565, 4.089, 0.524)
pt3dadd(102.857, 58.445, 4.088, 0.51)
pt3dadd(102.861, 58.325, 4.086, 0.494)
pt3dadd(102.865, 58.205, 4.084, 0.478)
pt3dadd(102.872, 58.085, 4.082, 0.508)
pt3dadd(102.881, 57.966, 4.079, 0.546)
pt3dadd(102.889, 57.846, 4.076, 0.584)
pt3dadd(102.898, 57.726, 4.073, 0.622)
pt3dadd(102.906, 57.607, 4.07, 0.66)
pt3dadd(102.915, 57.487, 4.068, 0.7)
pt3dadd(102.923, 57.368, 4.065, 0.738)
pt3dadd(102.932, 57.248, 4.062, 0.776)
pt3dadd(102.94, 57.128, 4.059, 0.814)
pt3dadd(102.949, 57.009, 4.056, 0.852)
pt3dadd(102.961, 56.889, 4.05, 0.862)
pt3dadd(102.975, 56.77, 4.044, 0.866)
pt3dadd(102.988, 56.651, 4.037, 0.872)
pt3dadd(103.001, 56.532, 4.031, 0.876)
pt3dadd(103.014, 56.413, 4.024, 0.88)
pt3dadd(103.027, 56.294, 4.018, 0.886)
pt3dadd(103.041, 56.175, 4.011, 0.89)
pt3dadd(103.054, 56.056, 4.005, 0.894)
pt3dadd(103.067, 55.937, 3.998, 0.898)
pt3dadd(103.08, 55.818, 3.992, 0.904)
pt3dadd(103.112, 55.704, 3.983, 0.894)
pt3dadd(103.148, 55.589, 3.973, 0.882)
pt3dadd(103.183, 55.475, 3.963, 0.868)
pt3dadd(103.218, 55.361, 3.954, 0.856)
pt3dadd(103.254, 55.247, 3.944, 0.844)
pt3dadd(103.289, 55.133, 3.934, 0.832)
pt3dadd(103.325, 55.019, 3.924, 0.82)
pt3dadd(103.36, 54.905, 3.915, 0.806)
pt3dadd(103.396, 54.791, 3.905, 0.794)
pt3dadd(103.431, 54.677, 3.895, 0.782)
pt3dadd(103.469, 54.566, 3.875, 0.772)
pt3dadd(103.506, 54.455, 3.853, 0.762)
pt3dadd(103.544, 54.344, 3.831, 0.75)
pt3dadd(103.582, 54.233, 3.81, 0.74)
pt3dadd(103.619, 54.122, 3.788, 0.73)
pt3dadd(103.657, 54.011, 3.766, 0.72)
pt3dadd(103.695, 53.9, 3.745, 0.708)
pt3dadd(103.733, 53.789, 3.723, 0.698)
pt3dadd(103.77, 53.678, 3.701, 0.688)
pt3dadd(103.808, 53.568, 3.679, 0.678)
pt3dadd(103.833, 53.458, 3.645, 0.678)
pt3dadd(103.859, 53.349, 3.61, 0.678)
pt3dadd(103.884, 53.239, 3.575, 0.678)
pt3dadd(103.91, 53.129, 3.54, 0.678)
pt3dadd(103.935, 53.02, 3.505, 0.678)
pt3dadd(103.961, 52.91, 3.47, 0.678)
pt3dadd(103.986, 52.801, 3.435, 0.678)
pt3dadd(104.012, 52.691, 3.4, 0.678)
pt3dadd(104.037, 52.582, 3.365, 0.678)
pt3dadd(104.062, 52.472, 3.331, 0.678)
pt3dadd(104.076, 52.356, 3.307, 0.678)
pt3dadd(104.089, 52.241, 3.283, 0.678)
pt3dadd(104.103, 52.125, 3.259, 0.678)
pt3dadd(104.117, 52.009, 3.235, 0.678)
pt3dadd(104.13, 51.893, 3.211, 0.678)
pt3dadd(104.144, 51.778, 3.187, 0.678)
pt3dadd(104.158, 51.662, 3.163, 0.678)
pt3dadd(104.172, 51.546, 3.14, 0.678)
pt3dadd(104.185, 51.431, 3.116, 0.678)
}
}
proc shape3d_198() {
dend_7[33] { pt3dadd(104.199, 51.315, 3.092, 0.678)
pt3dadd(104.202, 51.196, 3.079, 0.66)
pt3dadd(104.205, 51.077, 3.067, 0.642)
pt3dadd(104.208, 50.958, 3.054, 0.626)
pt3dadd(104.211, 50.839, 3.042, 0.608)
pt3dadd(104.214, 50.72, 3.029, 0.592)
pt3dadd(104.217, 50.601, 3.016, 0.574)
pt3dadd(104.22, 50.482, 3.004, 0.558)
pt3dadd(104.223, 50.363, 2.991, 0.54)
pt3dadd(104.227, 50.244, 2.978, 0.522)
pt3dadd(104.23, 50.125, 2.966, 0.506)
pt3dadd(104.233, 50.005, 2.962, 0.516)
pt3dadd(104.236, 49.885, 2.959, 0.524)
pt3dadd(104.239, 49.765, 2.955, 0.532)
pt3dadd(104.243, 49.645, 2.951, 0.54)
pt3dadd(104.246, 49.525, 2.948, 0.548)
pt3dadd(104.249, 49.406, 2.944, 0.556)
pt3dadd(104.253, 49.286, 2.94, 0.564)
pt3dadd(104.256, 49.166, 2.937, 0.574)
pt3dadd(104.259, 49.046, 2.933, 0.582)
pt3dadd(104.262, 48.926, 2.929, 0.59)
pt3dadd(104.269, 48.806, 2.928, 0.61)
pt3dadd(104.276, 48.686, 2.927, 0.628)
pt3dadd(104.283, 48.567, 2.926, 0.648)
pt3dadd(104.289, 48.447, 2.925, 0.666)
pt3dadd(104.296, 48.327, 2.924, 0.686)
pt3dadd(104.303, 48.207, 2.923, 0.706)
pt3dadd(104.309, 48.087, 2.922, 0.724)
pt3dadd(104.316, 47.968, 2.921, 0.744)
pt3dadd(104.323, 47.848, 2.92, 0.762)
pt3dadd(104.33, 47.728, 2.919, 0.782)
pt3dadd(104.341, 47.609, 2.917, 0.802)
pt3dadd(104.353, 47.489, 2.915, 0.82)
pt3dadd(104.364, 47.37, 2.913, 0.84)
pt3dadd(104.376, 47.25, 2.911, 0.858)
pt3dadd(104.388, 47.131, 2.909, 0.878)
pt3dadd(104.399, 47.011, 2.907, 0.896)
pt3dadd(104.411, 46.892, 2.905, 0.916)
pt3dadd(104.422, 46.773, 2.903, 0.934)
pt3dadd(104.434, 46.653, 2.901, 0.954)
pt3dadd(104.446, 46.534, 2.9, 0.972)
pt3dadd(104.467, 46.416, 2.896, 0.982)
pt3dadd(104.488, 46.298, 2.892, 0.992)
pt3dadd(104.509, 46.18, 2.889, 1.002)
pt3dadd(104.53, 46.062, 2.886, 1.012)
pt3dadd(104.551, 45.944, 2.882, 1.022)
pt3dadd(104.573, 45.826, 2.879, 1.032)
pt3dadd(104.594, 45.708, 2.875, 1.042)
pt3dadd(104.615, 45.589, 2.872, 1.052)
pt3dadd(104.636, 45.471, 2.868, 1.062)
pt3dadd(104.66, 45.354, 2.864, 1.066)
pt3dadd(104.708, 45.244, 2.858, 1.03)
pt3dadd(104.755, 45.134, 2.852, 0.996)
pt3dadd(104.802, 45.024, 2.845, 0.96)
pt3dadd(104.85, 44.914, 2.839, 0.924)
pt3dadd(104.897, 44.804, 2.832, 0.89)
pt3dadd(104.945, 44.694, 2.826, 0.854)
pt3dadd(104.992, 44.584, 2.819, 0.82)
pt3dadd(105.039, 44.475, 2.813, 0.784)
pt3dadd(105.087, 44.364, 2.806, 0.748)
pt3dadd(105.133, 44.254, 2.799, 0.718)
pt3dadd(105.171, 44.141, 2.789, 0.732)
pt3dadd(105.208, 44.028, 2.778, 0.744)
pt3dadd(105.246, 43.914, 2.768, 0.756)
pt3dadd(105.283, 43.801, 2.757, 0.768)
pt3dadd(105.321, 43.688, 2.747, 0.78)
pt3dadd(105.358, 43.575, 2.736, 0.792)
pt3dadd(105.396, 43.461, 2.726, 0.804)
pt3dadd(105.434, 43.348, 2.715, 0.816)
pt3dadd(105.471, 43.235, 2.705, 0.828)
pt3dadd(105.508, 43.122, 2.692, 0.838)
pt3dadd(105.537, 43.01, 2.664, 0.822)
pt3dadd(105.567, 42.899, 2.637, 0.806)
pt3dadd(105.597, 42.787, 2.609, 0.788)
pt3dadd(105.626, 42.676, 2.582, 0.772)
pt3dadd(105.656, 42.564, 2.554, 0.756)
pt3dadd(105.686, 42.453, 2.527, 0.74)
pt3dadd(105.715, 42.342, 2.499, 0.724)
pt3dadd(105.745, 42.23, 2.471, 0.708)
pt3dadd(105.775, 42.119, 2.444, 0.692)
pt3dadd(105.805, 42.008, 2.415, 0.674)
pt3dadd(105.837, 41.898, 2.384, 0.644)
pt3dadd(105.87, 41.789, 2.352, 0.616)
pt3dadd(105.903, 41.68, 2.321, 0.586)
pt3dadd(105.935, 41.571, 2.289, 0.558)
pt3dadd(105.968, 41.462, 2.258, 0.528)
pt3dadd(106, 41.353, 2.226, 0.5)
pt3dadd(106.033, 41.244, 2.194, 0.47)
pt3dadd(106.065, 41.135, 2.163, 0.442)
pt3dadd(106.098, 41.026, 2.131, 0.412)
pt3dadd(106.134, 40.917, 2.102, 0.388)
pt3dadd(106.178, 40.808, 2.081, 0.372)
pt3dadd(106.223, 40.7, 2.059, 0.358)
pt3dadd(106.267, 40.592, 2.037, 0.342)
pt3dadd(106.311, 40.483, 2.015, 0.328)
pt3dadd(106.356, 40.375, 1.993, 0.312)
pt3dadd(106.4, 40.267, 1.972, 0.298)
pt3dadd(106.445, 40.158, 1.95, 0.282)
pt3dadd(106.489, 40.05, 1.928, 0.268)
pt3dadd(106.534, 39.941, 1.906, 0.252)
pt3dadd(106.575, 39.831, 1.888, 0.252)
pt3dadd(106.607, 39.716, 1.877, 0.288)
pt3dadd(106.639, 39.602, 1.866, 0.324)
pt3dadd(106.671, 39.487, 1.856, 0.362)
pt3dadd(106.703, 39.372, 1.845, 0.398)
pt3dadd(106.735, 39.257, 1.834, 0.436)
pt3dadd(106.768, 39.142, 1.824, 0.472)
pt3dadd(106.8, 39.027, 1.813, 0.508)
pt3dadd(106.832, 38.912, 1.803, 0.546)
pt3dadd(106.864, 38.797, 1.792, 0.582)
pt3dadd(106.894, 38.682, 1.784, 0.616)
pt3dadd(106.918, 38.564, 1.782, 0.638)
pt3dadd(106.942, 38.447, 1.78, 0.66)
pt3dadd(106.967, 38.329, 1.778, 0.682)
pt3dadd(106.991, 38.211, 1.776, 0.704)
pt3dadd(107.015, 38.094, 1.774, 0.726)
pt3dadd(107.039, 37.976, 1.772, 0.748)
pt3dadd(107.063, 37.859, 1.77, 0.772)
pt3dadd(107.087, 37.741, 1.768, 0.794)
pt3dadd(107.112, 37.624, 1.766, 0.816)
pt3dadd(107.134, 37.506, 1.764, 0.826)
pt3dadd(107.152, 37.387, 1.764, 0.81)
pt3dadd(107.171, 37.269, 1.764, 0.794)
pt3dadd(107.189, 37.15, 1.764, 0.778)
pt3dadd(107.208, 37.032, 1.764, 0.762)
pt3dadd(107.226, 36.913, 1.764, 0.746)
pt3dadd(107.244, 36.795, 1.764, 0.73)
pt3dadd(107.263, 36.676, 1.764, 0.714)
pt3dadd(107.281, 36.557, 1.764, 0.696)
pt3dadd(107.299, 36.439, 1.764, 0.68)
pt3dadd(107.321, 36.321, 1.764, 0.668)
pt3dadd(107.351, 36.205, 1.764, 0.66)
pt3dadd(107.381, 36.089, 1.764, 0.654)
pt3dadd(107.411, 35.972, 1.764, 0.648)
pt3dadd(107.441, 35.856, 1.764, 0.64)
pt3dadd(107.471, 35.74, 1.764, 0.634)
pt3dadd(107.501, 35.624, 1.764, 0.628)
pt3dadd(107.531, 35.508, 1.764, 0.62)
pt3dadd(107.561, 35.391, 1.764, 0.614)
pt3dadd(107.591, 35.275, 1.764, 0.608)
pt3dadd(107.628, 35.161, 1.764, 0.616)
pt3dadd(107.674, 35.051, 1.764, 0.648)
pt3dadd(107.721, 34.94, 1.764, 0.682)
pt3dadd(107.767, 34.829, 1.764, 0.714)
pt3dadd(107.814, 34.719, 1.764, 0.746)
pt3dadd(107.86, 34.608, 1.764, 0.78)
pt3dadd(107.907, 34.497, 1.764, 0.812)
pt3dadd(107.953, 34.387, 1.764, 0.846)
pt3dadd(108, 34.276, 1.764, 0.878)
pt3dadd(108.046, 34.166, 1.764, 0.91)
pt3dadd(108.089, 34.054, 1.764, 0.938)
pt3dadd(108.127, 33.94, 1.764, 0.956)
pt3dadd(108.165, 33.826, 1.764, 0.974)
pt3dadd(108.203, 33.712, 1.764, 0.992)
pt3dadd(108.241, 33.598, 1.764, 1.01)
pt3dadd(108.279, 33.484, 1.764, 1.028)
pt3dadd(108.317, 33.371, 1.764, 1.048)
pt3dadd(108.355, 33.257, 1.764, 1.066)
pt3dadd(108.393, 33.143, 1.764, 1.084)
pt3dadd(108.43, 33.029, 1.764, 1.102)
pt3dadd(108.466, 32.914, 1.764, 1.108)
pt3dadd(108.497, 32.798, 1.764, 1.092)
pt3dadd(108.528, 32.682, 1.764, 1.076)
pt3dadd(108.558, 32.566, 1.764, 1.062)
pt3dadd(108.589, 32.451, 1.764, 1.046)
pt3dadd(108.62, 32.335, 1.764, 1.032)
pt3dadd(108.651, 32.219, 1.764, 1.016)
pt3dadd(108.682, 32.103, 1.764, 1)
pt3dadd(108.713, 31.987, 1.764, 0.986)
pt3dadd(108.744, 31.871, 1.764, 0.97)
pt3dadd(108.781, 31.757, 1.764, 0.954)
pt3dadd(108.826, 31.646, 1.764, 0.936)
pt3dadd(108.871, 31.535, 1.764, 0.918)
pt3dadd(108.917, 31.423, 1.764, 0.902)
pt3dadd(108.962, 31.312, 1.764, 0.884)
pt3dadd(109.007, 31.201, 1.764, 0.866)
pt3dadd(109.053, 31.09, 1.764, 0.848)
pt3dadd(109.098, 30.979, 1.764, 0.83)
pt3dadd(109.143, 30.868, 1.764, 0.812)
pt3dadd(109.189, 30.757, 1.764, 0.794)
pt3dadd(109.235, 30.646, 1.764, 0.774)
pt3dadd(109.284, 30.536, 1.764, 0.75)
pt3dadd(109.332, 30.427, 1.764, 0.724)
pt3dadd(109.38, 30.317, 1.764, 0.7)
pt3dadd(109.429, 30.207, 1.764, 0.676)
pt3dadd(109.477, 30.097, 1.764, 0.65)
pt3dadd(109.526, 29.987, 1.763, 0.626)
pt3dadd(109.574, 29.877, 1.763, 0.602)
pt3dadd(109.622, 29.768, 1.763, 0.578)
pt3dadd(109.671, 29.658, 1.763, 0.552)
pt3dadd(109.717, 29.547, 1.763, 0.526)
pt3dadd(109.762, 29.436, 1.763, 0.494)
pt3dadd(109.807, 29.325, 1.763, 0.462)
pt3dadd(109.851, 29.213, 1.763, 0.432)
pt3dadd(109.896, 29.102, 1.763, 0.4)
pt3dadd(109.94, 28.99, 1.763, 0.368)
pt3dadd(109.985, 28.879, 1.763, 0.338)
pt3dadd(110.029, 28.767, 1.763, 0.306)
pt3dadd(110.074, 28.656, 1.763, 0.274)
pt3dadd(110.119, 28.545, 1.763, 0.244)
}
}
proc shape3d_199() {
dend_7[33] { pt3dadd(110.169, 28.436, 1.763, 0.226)
pt3dadd(110.227, 28.331, 1.763, 0.226)
pt3dadd(110.284, 28.225, 1.762, 0.226)
pt3dadd(110.342, 28.12, 1.762, 0.226)
pt3dadd(110.4, 28.015, 1.762, 0.226)
pt3dadd(110.457, 27.91, 1.762, 0.226)
pt3dadd(110.515, 27.804, 1.762, 0.226)
pt3dadd(110.572, 27.699, 1.762, 0.226)
pt3dadd(110.63, 27.594, 1.762, 0.226)
pt3dadd(110.688, 27.489, 1.762, 0.226)
pt3dadd(110.738, 27.38, 1.761, 0.252)
pt3dadd(110.78, 27.268, 1.761, 0.31)
pt3dadd(110.823, 27.156, 1.761, 0.368)
pt3dadd(110.865, 27.043, 1.761, 0.424)
pt3dadd(110.907, 26.931, 1.76, 0.482)
pt3dadd(110.949, 26.819, 1.76, 0.54)
pt3dadd(110.992, 26.706, 1.76, 0.598)
pt3dadd(111.034, 26.594, 1.76, 0.656)
pt3dadd(111.076, 26.482, 1.759, 0.712)
pt3dadd(111.118, 26.369, 1.759, 0.77)
pt3dadd(111.156, 26.256, 1.759, 0.806)
pt3dadd(111.19, 26.14, 1.758, 0.82)
pt3dadd(111.224, 26.025, 1.758, 0.832)
pt3dadd(111.258, 25.91, 1.757, 0.844)
pt3dadd(111.291, 25.795, 1.757, 0.856)
pt3dadd(111.325, 25.68, 1.757, 0.87)
pt3dadd(111.359, 25.565, 1.756, 0.882)
pt3dadd(111.393, 25.449, 1.756, 0.894)
pt3dadd(111.426, 25.334, 1.755, 0.906)
pt3dadd(111.46, 25.219, 1.755, 0.92)
pt3dadd(111.496, 25.104, 1.754, 0.914)
pt3dadd(111.533, 24.99, 1.753, 0.89)
pt3dadd(111.571, 24.876, 1.752, 0.864)
pt3dadd(111.608, 24.763, 1.751, 0.84)
pt3dadd(111.645, 24.649, 1.751, 0.814)
pt3dadd(111.683, 24.535, 1.75, 0.79)
pt3dadd(111.72, 24.421, 1.749, 0.764)
pt3dadd(111.758, 24.307, 1.748, 0.74)
pt3dadd(111.795, 24.193, 1.747, 0.714)
pt3dadd(111.833, 24.079, 1.747, 0.69)
pt3dadd(111.878, 23.967, 1.745, 0.678)
pt3dadd(111.929, 23.859, 1.744, 0.678)
pt3dadd(111.98, 23.751, 1.743, 0.678)
pt3dadd(112.032, 23.642, 1.741, 0.678)
pt3dadd(112.083, 23.534, 1.74, 0.678)
pt3dadd(112.135, 23.425, 1.739, 0.678)
pt3dadd(112.186, 23.317, 1.737, 0.678)
pt3dadd(112.237, 23.208, 1.736, 0.678)
pt3dadd(112.289, 23.1, 1.735, 0.678)
pt3dadd(112.34, 22.992, 1.733, 0.678)
pt3dadd(112.387, 22.881, 1.732, 0.678)
pt3dadd(112.429, 22.769, 1.729, 0.678)
pt3dadd(112.472, 22.657, 1.726, 0.678)
pt3dadd(112.514, 22.545, 1.724, 0.678)
pt3dadd(112.557, 22.432, 1.721, 0.678)
pt3dadd(112.599, 22.32, 1.718, 0.678)
pt3dadd(112.642, 22.208, 1.716, 0.678)
pt3dadd(112.684, 22.096, 1.713, 0.678)
pt3dadd(112.727, 21.984, 1.71, 0.678)
pt3dadd(112.769, 21.872, 1.708, 0.678)
pt3dadd(112.818, 21.762, 1.703, 0.678)
pt3dadd(112.872, 21.655, 1.698, 0.678)
pt3dadd(112.926, 21.548, 1.693, 0.678)
pt3dadd(112.979, 21.441, 1.687, 0.678)
pt3dadd(113.033, 21.334, 1.682, 0.678)
pt3dadd(113.087, 21.227, 1.676, 0.678)
pt3dadd(113.141, 21.12, 1.671, 0.678)
pt3dadd(113.195, 21.013, 1.666, 0.678)
pt3dadd(113.249, 20.906, 1.66, 0.678)
pt3dadd(113.303, 20.799, 1.655, 0.678)
pt3dadd(113.354, 20.691, 1.648, 0.686)
pt3dadd(113.403, 20.582, 1.64, 0.702)
pt3dadd(113.451, 20.472, 1.631, 0.718)
pt3dadd(113.5, 20.363, 1.623, 0.734)
pt3dadd(113.549, 20.254, 1.615, 0.75)
pt3dadd(113.597, 20.145, 1.607, 0.766)
pt3dadd(113.646, 20.035, 1.598, 0.78)
pt3dadd(113.694, 19.926, 1.59, 0.796)
pt3dadd(113.743, 19.817, 1.582, 0.812)
pt3dadd(113.791, 19.707, 1.573, 0.828)
pt3dadd(113.832, 19.596, 1.561, 0.85)
pt3dadd(113.867, 19.483, 1.545, 0.876)
pt3dadd(113.902, 19.369, 1.529, 0.902)
pt3dadd(113.937, 19.256, 1.513, 0.93)
pt3dadd(113.971, 19.143, 1.497, 0.956)
pt3dadd(114.006, 19.03, 1.481, 0.982)
pt3dadd(114.041, 18.916, 1.466, 1.008)
pt3dadd(114.076, 18.803, 1.45, 1.036)
pt3dadd(114.111, 18.69, 1.434, 1.062)
pt3dadd(114.146, 18.577, 1.418, 1.088)
pt3dadd(114.175, 18.466, 1.389, 1.086)
pt3dadd(114.201, 18.358, 1.353, 1.068)
pt3dadd(114.227, 18.249, 1.317, 1.052)
pt3dadd(114.253, 18.14, 1.28, 1.034)
pt3dadd(114.279, 18.031, 1.244, 1.016)
pt3dadd(114.305, 17.923, 1.208, 1)
pt3dadd(114.331, 17.814, 1.171, 0.982)
pt3dadd(114.357, 17.705, 1.135, 0.964)
pt3dadd(114.383, 17.596, 1.099, 0.948)
pt3dadd(114.409, 17.488, 1.063, 0.93)
pt3dadd(114.447, 17.379, 1.034, 0.912)
pt3dadd(114.491, 17.271, 1.01, 0.894)
pt3dadd(114.534, 17.163, 0.987, 0.878)
pt3dadd(114.578, 17.055, 0.963, 0.86)
pt3dadd(114.622, 16.947, 0.939, 0.844)
pt3dadd(114.666, 16.839, 0.915, 0.826)
pt3dadd(114.71, 16.731, 0.892, 0.808)
pt3dadd(114.753, 16.623, 0.868, 0.792)
pt3dadd(114.797, 16.515, 0.844, 0.774)
pt3dadd(114.841, 16.407, 0.82, 0.756)
pt3dadd(114.882, 16.297, 0.802, 0.76)
pt3dadd(114.922, 16.185, 0.786, 0.774)
pt3dadd(114.962, 16.074, 0.771, 0.788)
pt3dadd(115.002, 15.962, 0.755, 0.802)
pt3dadd(115.042, 15.85, 0.74, 0.816)
pt3dadd(115.082, 15.739, 0.724, 0.83)
pt3dadd(115.122, 15.627, 0.709, 0.844)
pt3dadd(115.162, 15.516, 0.693, 0.858)
pt3dadd(115.202, 15.404, 0.678, 0.872)
pt3dadd(115.242, 15.292, 0.662, 0.886)
pt3dadd(115.276, 15.178, 0.653, 0.892)
pt3dadd(115.308, 15.063, 0.646, 0.898)
pt3dadd(115.34, 14.947, 0.639, 0.902)
pt3dadd(115.372, 14.832, 0.632, 0.908)
pt3dadd(115.404, 14.717, 0.625, 0.912)
pt3dadd(115.436, 14.601, 0.618, 0.916)
pt3dadd(115.468, 14.486, 0.611, 0.922)
pt3dadd(115.5, 14.371, 0.604, 0.926)
pt3dadd(115.532, 14.255, 0.597, 0.932)
pt3dadd(115.564, 14.14, 0.59, 0.936)
pt3dadd(115.593, 14.024, 0.588, 0.904)
pt3dadd(115.62, 13.907, 0.588, 0.858)
pt3dadd(115.648, 13.79, 0.588, 0.812)
pt3dadd(115.675, 13.673, 0.588, 0.766)
pt3dadd(115.702, 13.556, 0.588, 0.72)
pt3dadd(115.73, 13.439, 0.588, 0.674)
pt3dadd(115.757, 13.323, 0.588, 0.628)
pt3dadd(115.785, 13.206, 0.588, 0.582)
pt3dadd(115.812, 13.089, 0.588, 0.536)
pt3dadd(115.839, 12.972, 0.588, 0.49)
pt3dadd(115.877, 12.858, 0.588, 0.49)
pt3dadd(115.919, 12.746, 0.588, 0.508)
pt3dadd(115.961, 12.633, 0.588, 0.526)
pt3dadd(116.002, 12.521, 0.588, 0.544)
pt3dadd(116.044, 12.408, 0.588, 0.562)
pt3dadd(116.086, 12.296, 0.588, 0.58)
pt3dadd(116.128, 12.183, 0.588, 0.598)
pt3dadd(116.169, 12.071, 0.588, 0.616)
pt3dadd(116.211, 11.958, 0.588, 0.636)
pt3dadd(116.253, 11.846, 0.588, 0.654)
pt3dadd(116.281, 11.73, 0.588, 0.648)
pt3dadd(116.304, 11.612, 0.588, 0.632)
pt3dadd(116.327, 11.494, 0.588, 0.616)
pt3dadd(116.35, 11.376, 0.588, 0.602)
pt3dadd(116.373, 11.259, 0.588, 0.586)
pt3dadd(116.397, 11.141, 0.588, 0.572)
pt3dadd(116.42, 11.023, 0.588, 0.556)
pt3dadd(116.443, 10.905, 0.588, 0.542)
pt3dadd(116.466, 10.787, 0.588, 0.526)
pt3dadd(116.489, 10.67, 0.588, 0.512)
pt3dadd(116.498, 10.55, 0.588, 0.494)
pt3dadd(116.503, 10.43, 0.588, 0.474)
pt3dadd(116.507, 10.311, 0.588, 0.454)
pt3dadd(116.512, 10.191, 0.588, 0.436)
pt3dadd(116.517, 10.071, 0.588, 0.416)
pt3dadd(116.521, 9.951, 0.588, 0.396)
pt3dadd(116.526, 9.831, 0.588, 0.378)
pt3dadd(116.53, 9.711, 0.588, 0.358)
pt3dadd(116.535, 9.591, 0.588, 0.338)
pt3dadd(116.539, 9.471, 0.588, 0.32)
pt3dadd(116.519, 9.354, 0.588, 0.324)
pt3dadd(116.491, 9.237, 0.588, 0.336)
pt3dadd(116.463, 9.12, 0.588, 0.348)
pt3dadd(116.435, 9.004, 0.588, 0.36)
pt3dadd(116.407, 8.887, 0.588, 0.372)
pt3dadd(116.379, 8.77, 0.588, 0.384)
pt3dadd(116.351, 8.653, 0.588, 0.398)
pt3dadd(116.323, 8.537, 0.588, 0.41)
pt3dadd(116.295, 8.42, 0.588, 0.422)
pt3dadd(116.267, 8.303, 0.588, 0.434)
pt3dadd(116.224, 8.192, 0.588, 0.446)
pt3dadd(116.18, 8.08, 0.588, 0.458)
pt3dadd(116.136, 7.968, 0.588, 0.47)
pt3dadd(116.093, 7.856, 0.588, 0.482)
pt3dadd(116.049, 7.745, 0.588, 0.496)
pt3dadd(116.005, 7.633, 0.588, 0.508)
pt3dadd(115.961, 7.521, 0.588, 0.52)
pt3dadd(115.918, 7.409, 0.588, 0.532)
pt3dadd(115.874, 7.298, 0.588, 0.544)
pt3dadd(115.83, 7.186, 0.588, 0.558)
pt3dadd(115.796, 7.071, 0.588, 0.524)
pt3dadd(115.761, 6.956, 0.588, 0.492)
pt3dadd(115.727, 6.841, 0.588, 0.458)
pt3dadd(115.692, 6.726, 0.588, 0.424)
pt3dadd(115.658, 6.611, 0.588, 0.392)
pt3dadd(115.623, 6.496, 0.588, 0.358)
pt3dadd(115.589, 6.381, 0.588, 0.326)
pt3dadd(115.554, 6.266, 0.588, 0.292)
pt3dadd(115.52, 6.151, 0.588, 0.26)
pt3dadd(115.486, 6.036, 0.588, 0.226)
}
}
proc shape3d_200() {
dend_7[33] { }
dend_7[34] {pt3dclear()
pt3dadd(101.573, 73.572, 4.494, 1.616)
pt3dadd(101.568, 73.566, 4.486, 1.608)
pt3dadd(101.522, 73.507, 4.408, 1.53)
pt3dadd(101.475, 73.448, 4.329, 1.454)
pt3dadd(101.429, 73.389, 4.251, 1.378)
pt3dadd(101.383, 73.331, 4.173, 1.3)
pt3dadd(101.336, 73.272, 4.095, 1.224)
pt3dadd(101.29, 73.213, 4.017, 1.146)
pt3dadd(101.28, 73.2, 3.922, 1.13)
pt3dadd(101.28, 73.2, 3.822, 1.13)
pt3dadd(101.28, 73.2, 3.722, 1.13)
pt3dadd(101.28, 73.2, 3.622, 1.13)
pt3dadd(101.28, 73.2, 3.522, 1.13)
pt3dadd(101.28, 73.2, 3.422, 1.13)
pt3dadd(101.28, 73.2, 3.322, 1.13)
pt3dadd(101.28, 73.2, 3.222, 1.13)
pt3dadd(101.28, 73.2, 3.122, 1.13)
pt3dadd(101.28, 73.2, 3.022, 1.13)
pt3dadd(101.28, 73.2, 2.922, 1.13)
pt3dadd(101.28, 73.2, 2.822, 1.13)
pt3dadd(101.28, 73.2, 2.722, 1.13)
pt3dadd(101.28, 73.2, 2.622, 1.13)
pt3dadd(101.28, 73.2, 2.522, 1.13)
pt3dadd(101.28, 73.2, 2.422, 1.13)
pt3dadd(101.28, 73.2, 2.322, 1.13)
pt3dadd(101.28, 73.2, 2.222, 1.13)
pt3dadd(101.28, 73.2, 2.122, 1.13)
pt3dadd(101.28, 73.2, 2.022, 1.13)
pt3dadd(101.28, 73.2, 1.922, 1.13)
pt3dadd(101.28, 73.2, 1.822, 1.13)
pt3dadd(101.28, 73.2, 1.722, 1.13)
pt3dadd(101.28, 73.2, 1.622, 1.13)
pt3dadd(101.28, 73.2, 1.522, 1.13)
pt3dadd(101.28, 73.2, 1.422, 1.13)
pt3dadd(101.28, 73.2, 1.322, 1.13)
pt3dadd(101.28, 73.2, 1.222, 1.13)
pt3dadd(101.28, 73.226, 1.125, 1.13)
pt3dadd(101.28, 73.259, 1.029, 1.13)
pt3dadd(101.28, 73.292, 0.933, 1.13)
pt3dadd(101.28, 73.325, 0.836, 1.13)
pt3dadd(101.28, 73.358, 0.74, 1.13)
pt3dadd(101.28, 73.39, 0.644, 1.13)
pt3dadd(101.28, 73.416, 0.546, 1.13)
pt3dadd(101.28, 73.443, 0.449, 1.13)
pt3dadd(101.28, 73.507, 0.369, 1.13)
pt3dadd(101.28, 73.595, 0.301, 1.13)
pt3dadd(101.28, 73.693, 0.245, 1.13)
pt3dadd(101.28, 73.8, 0.2, 1.13)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
shape3d_36()
shape3d_37()
shape3d_38()
shape3d_39()
shape3d_40()
shape3d_41()
shape3d_42()
shape3d_43()
shape3d_44()
shape3d_45()
shape3d_46()
shape3d_47()
shape3d_48()
shape3d_49()
shape3d_50()
shape3d_51()
shape3d_52()
shape3d_53()
shape3d_54()
shape3d_55()
shape3d_56()
shape3d_57()
shape3d_58()
shape3d_59()
shape3d_60()
shape3d_61()
shape3d_62()
shape3d_63()
shape3d_64()
shape3d_65()
shape3d_66()
shape3d_67()
shape3d_68()
shape3d_69()
shape3d_70()
shape3d_71()
shape3d_72()
shape3d_73()
shape3d_74()
shape3d_75()
shape3d_76()
shape3d_77()
shape3d_78()
shape3d_79()
shape3d_80()
shape3d_81()
shape3d_82()
shape3d_83()
shape3d_84()
shape3d_85()
shape3d_86()
shape3d_87()
shape3d_88()
shape3d_89()
shape3d_90()
shape3d_91()
shape3d_92()
shape3d_93()
shape3d_94()
shape3d_95()
shape3d_96()
shape3d_97()
shape3d_98()
shape3d_99()
shape3d_100()
basic_shape_1()
}
proc basic_shape_1() {
shape3d_101()
shape3d_102()
shape3d_103()
shape3d_104()
shape3d_105()
shape3d_106()
shape3d_107()
shape3d_108()
shape3d_109()
shape3d_110()
shape3d_111()
shape3d_112()
shape3d_113()
shape3d_114()
shape3d_115()
shape3d_116()
shape3d_117()
shape3d_118()
shape3d_119()
shape3d_120()
shape3d_121()
shape3d_122()
shape3d_123()
shape3d_124()
shape3d_125()
shape3d_126()
shape3d_127()
shape3d_128()
shape3d_129()
shape3d_130()
shape3d_131()
shape3d_132()
shape3d_133()
shape3d_134()
shape3d_135()
shape3d_136()
shape3d_137()
shape3d_138()
shape3d_139()
shape3d_140()
shape3d_141()
shape3d_142()
shape3d_143()
shape3d_144()
shape3d_145()
shape3d_146()
shape3d_147()
shape3d_148()
shape3d_149()
shape3d_150()
shape3d_151()
shape3d_152()
shape3d_153()
shape3d_154()
shape3d_155()
shape3d_156()
shape3d_157()
shape3d_158()
shape3d_159()
shape3d_160()
shape3d_161()
shape3d_162()
shape3d_163()
shape3d_164()
shape3d_165()
shape3d_166()
shape3d_167()
shape3d_168()
shape3d_169()
shape3d_170()
shape3d_171()
shape3d_172()
shape3d_173()
shape3d_174()
shape3d_175()
shape3d_176()
shape3d_177()
shape3d_178()
shape3d_179()
shape3d_180()
shape3d_181()
shape3d_182()
shape3d_183()
shape3d_184()
shape3d_185()
shape3d_186()
shape3d_187()
shape3d_188()
shape3d_189()
shape3d_190()
shape3d_191()
shape3d_192()
shape3d_193()
shape3d_194()
shape3d_195()
shape3d_196()
shape3d_197()
shape3d_198()
shape3d_199()
shape3d_200()
basic_shape_2()
}
proc basic_shape_2() {
}
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, 8 dend_0[i] all.append()
for i=0, 34 dend_7[i] all.append()
for i=0, 28 apic[i] all.append()
for i=0, 19 dend_5[i] all.append()
dendritic_0 = new SectionList()
for i=0, 8 dend_0[i] dendritic_0.append()
somatic = new SectionList()
soma somatic.append()
apical = new SectionList()
for i=0, 28 apic[i] apical.append()
dendritic_5 = new SectionList()
for i=0, 19 dend_5[i] dendritic_5.append()
dendritic_7 = new SectionList()
for i=0, 34 dend_7[i] dendritic_7.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()