proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[124]
proc topol() { local i
connect dend(0), soma(0.5)
for i = 1, 2 connect dend[i](0), dend[i-1](1)
connect dend[3](0), dend[1](1)
for i = 4, 5 connect dend[i](0), dend[3](1)
connect dend[6](0), dend[1](1)
connect dend[7](0), dend(1)
for i = 8, 9 connect dend[i](0), dend[7](1)
for i = 10, 11 connect dend[i](0), dend[9](1)
for i = 12, 14 connect dend[i](0), dend[11](1)
for i = 15, 16 connect dend[i](0), dend[i-1](1)
for i = 17, 18 connect dend[i](0), dend[15](1)
for i = 19, 20 connect dend[i](0), dend[18](1)
connect dend[21](0), dend[14](1)
for i = 22, 25 connect dend[i](0), dend[i-1](1)
connect dend[26](0), dend[24](1)
for i = 27, 28 connect dend[i](0), dend[26](1)
connect dend[29](0), dend[23](1)
connect dend[30](0), dend[22](1)
for i = 31, 33 connect dend[i](0), dend[30](1)
connect dend[34](0), soma(0.5)
for i = 35, 36 connect dend[i](0), dend[i-1](1)
connect dend[37](0), dend[35](1)
connect dend[38](0), dend[37](1)
connect dend[39](0), dend[34](1)
connect dend[40](0), soma(0.5)
for i = 41, 42 connect dend[i](0), dend[40](1)
for i = 43, 44 connect dend[i](0), dend[42](1)
for i = 45, 46 connect dend[i](0), soma(0.5)
for i = 47, 48 connect dend[i](0), dend[46](1)
for i = 49, 50 connect dend[i](0), soma(0.5)
for i = 51, 64 connect dend[i](0), dend[i-1](1)
connect dend[65](0), dend[63](1)
connect dend[66](0), dend[62](1)
connect dend[67](0), dend[61](1)
for i = 68, 69 connect dend[i](0), dend[i-1](1)
connect dend[70](0), dend[68](1)
connect dend[71](0), dend[67](1)
connect dend[72](0), dend[60](1)
for i = 73, 74 connect dend[i](0), dend[72](1)
for i = 75, 76 connect dend[i](0), dend[74](1)
connect dend[77](0), dend[59](1)
connect dend[78](0), dend[58](1)
connect dend[79](0), dend[57](1)
connect dend[80](0), dend[56](1)
connect dend[81](0), dend[55](1)
connect dend[82](0), dend[54](1)
for i = 83, 84 connect dend[i](0), dend[i-1](1)
connect dend[85](0), dend[83](1)
for i = 86, 87 connect dend[i](0), dend[85](1)
for i = 88, 89 connect dend[i](0), dend[87](1)
for i = 90, 91 connect dend[i](0), dend[i-1](1)
connect dend[92](0), dend[90](1)
for i = 93, 95 connect dend[i](0), dend[i-1](1)
connect dend[96](0), dend[94](1)
connect dend[97](0), dend[93](1)
connect dend[98](0), dend[92](1)
connect dend[99](0), dend[89](1)
for i = 100, 101 connect dend[i](0), dend[i-1](1)
connect dend[102](0), dend[100](1)
connect dend[103](0), dend[99](1)
connect dend[104](0), dend[82](1)
for i = 105, 107 connect dend[i](0), dend[i-1](1)
for i = 108, 109 connect dend[i](0), dend[106](1)
connect dend[110](0), dend[104](1)
connect dend[111](0), dend[53](1)
connect dend[112](0), dend[52](1)
connect dend[113](0), dend[51](1)
for i = 114, 116 connect dend[i](0), dend[i-1](1)
connect dend[117](0), dend[115](1)
for i = 118, 120 connect dend[i](0), dend[117](1)
connect dend[121](0), dend[114](1)
connect dend[122](0), dend[113](1)
connect dend[123](0), dend[50](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(271.823, 334.848, -8.70909, 8.94976)
pt3dadd(273.078, 340.597, -8.22015, 14.6064)
pt3dadd(274.334, 346.347, -7.7312, 20.2858)
pt3dadd(275.589, 352.097, -7.24225, 25.1465)
pt3dadd(276.845, 357.847, -6.7533, 32.3824)
pt3dadd(278.1, 363.596, -6.26436, 37.8782)
pt3dadd(279.356, 369.346, -5.77541, 39.6592)
pt3dadd(280.611, 375.096, -5.28646, 42.0896)
pt3dadd(281.867, 380.846, -4.79752, 43.5279)
pt3dadd(283.123, 386.595, -4.30857, 46.1742)
pt3dadd(284.378, 392.345, -3.81962, 47.9088)
pt3dadd(285.634, 398.095, -3.33067, 50.885)
pt3dadd(286.889, 403.844, -2.84173, 49.7892)
pt3dadd(288.145, 409.594, -2.35278, 48.7528)
pt3dadd(289.4, 415.344, -1.86383, 45.9144)
pt3dadd(290.656, 421.094, -1.37489, 41.1701)
pt3dadd(291.911, 426.843, -0.885938, 38.9518)
pt3dadd(293.167, 432.593, -0.396991, 34.5424)
pt3dadd(294.422, 438.343, 0.0919565, 27.9353)
pt3dadd(295.678, 444.092, 0.580904, 12.7374)
pt3dadd(296.933, 449.842, 1.06985, 8.73679)
}
dend {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(-501.8, -1214.32, -25.75, 1.7)
pt3dadd(-510.19, -1225.5, -25.75, 1.7)
pt3dadd(-510.02, -1225.31, -25.75, 1.7)
pt3dadd(-509.85, -1225.12, -25.75, 1.7)
pt3dadd(-509.68, -1224.92, -25.75, 1.7)
pt3dadd(-509.51, -1224.73, -25.75, 1.7)
pt3dadd(-509.34, -1224.54, -25.75, 1.7)
pt3dadd(-509.17, -1224.15, -25.75, 1.7)
pt3dadd(-508.83, -1223.96, -25.75, 1.7)
pt3dadd(-510.38, -1228.3, -25.75, 1.7)
pt3dadd(-508.66, -1223.57, -25.75, 1.7)
pt3dadd(-508.49, -1223.38, -25.75, 1.7)
pt3dadd(-508.32, -1222.99, -25.75, 1.7)
pt3dadd(-508.15, -1222.8, -25.75, 1.7)
pt3dadd(-507.81, -1222.61, -25.75, 1.7)
pt3dadd(-507.64, -1222.03, -25.75, 1.7)
pt3dadd(-507.47, -1221.64, -25.75, 1.7)
pt3dadd(-507.3, -1221.26, -25.75, 1.7)
pt3dadd(-506.96, -1220.87, -25.75, 1.7)
pt3dadd(-506.62, -1220.49, -25.75, 1.7)
pt3dadd(-506.45, -1220.1, -25.75, 1.7)
pt3dadd(-506.11, -1219.52, -25.75, 1.7)
pt3dadd(-505.94, -1219.14, -25.75, 1.7)
pt3dadd(-505.6, -1218.75, -25.75, 1.7)
pt3dadd(-505.43, -1218.36, -25.75, 1.7)
pt3dadd(-505.27, -1217.98, -25.75, 1.7)
pt3dadd(-505.1, -1217.59, -25.75, 1.7)
pt3dadd(-504.93, -1217.21, -25.75, 1.7)
pt3dadd(-504.76, -1217.01, -25.75, 1.7)
pt3dadd(-504.08, -1216.24, -25.75, 1.7)
pt3dadd(-503.91, -1216.05, -25.75, 1.7)
pt3dadd(-503.74, -1215.66, -25.75, 1.7)
pt3dadd(-503.23, -1215.08, -25.75, 1.7)
pt3dadd(-503.06, -1214.7, -25.75, 1.7)
pt3dadd(-502.72, -1214.51, -25.75, 1.7)
pt3dadd(-502.72, -1214.12, -25.75, 1.7)
pt3dadd(-502.55, -1213.93, -25.75, 1.7)
pt3dadd(-502.21, -1213.73, -25.75, 1.7)
pt3dadd(-502.04, -1213.35, -25.75, 1.7)
pt3dadd(-501.87, -1213.16, -25.75, 1.7)
pt3dadd(-501.7, -1212.77, -25.75, 1.7)
pt3dadd(-501.36, -1212.58, -25.75, 1.7)
pt3dadd(-501.19, -1212.38, -25.75, 1.7)
pt3dadd(-501.02, -1212, -25.75, 1.7)
pt3dadd(-500.85, -1211.81, -25.75, 1.7)
pt3dadd(-500.68, -1211.42, -25.75, 1.7)
pt3dadd(-500.51, -1211.23, -25.75, 1.7)
pt3dadd(-500.51, -1210.84, -25.75, 1.7)
pt3dadd(-500.34, -1210.65, -25.75, 1.7)
pt3dadd(-500.17, -1210.45, -25.75, 1.7)
pt3dadd(-500, -1210.07, -25.75, 1.7)
pt3dadd(-499.83, -1209.68, -25.75, 1.7)
pt3dadd(-499.66, -1209.3, -25.75, 1.7)
pt3dadd(-499.49, -1208.91, -25.75, 1.7)
pt3dadd(-499.49, -1208.53, -25.75, 1.7)
pt3dadd(-499.32, -1208.33, -25.75, 1.7)
pt3dadd(-499.32, -1207.75, -25.75, 1.7)
pt3dadd(-499.66, -1208.24, -23.75, 1.7)
pt3dadd(-499.66, -1208.43, -23.75, 1.7)
pt3dadd(-499.49, -1208.24, -23.75, 1.7)
pt3dadd(-499.32, -1208.04, -23.75, 1.7)
pt3dadd(-498.64, -1207.27, -23.75, 1.7)
pt3dadd(-498.3, -1206.89, -23.75, 1.7)
pt3dadd(-498.13, -1206.69, -23.75, 1.7)
pt3dadd(-497.96, -1206.31, -23.75, 1.7)
pt3dadd(-497.62, -1206.11, -23.75, 1.7)
pt3dadd(-497.28, -1205.54, -23.75, 1.7)
pt3dadd(-496.77, -1204.96, -23.75, 1.7)
pt3dadd(-496.26, -1204.38, -23.75, 1.7)
pt3dadd(-495.75, -1203.61, -23.75, 1.7)
pt3dadd(-495.24, -1203.03, -23.75, 1.7)
pt3dadd(-494.74, -1202.45, -23.75, 1.7)
pt3dadd(-493.72, -1201.29, -23.75, 1.7)
pt3dadd(-493.55, -1201.1, -23.75, 1.7)
pt3dadd(-493.38, -1200.91, -23.75, 1.7)
pt3dadd(-493.04, -1200.71, -23.75, 1.7)
pt3dadd(-492.7, -1200.52, -23.75, 1.7)
pt3dadd(-492.53, -1200.33, -23.75, 1.7)
pt3dadd(-492.19, -1199.94, -23.75, 1.7)
pt3dadd(-491.68, -1199.56, -23.75, 1.7)
pt3dadd(-491.17, -1198.98, -23.75, 1.7)
pt3dadd(-490.83, -1198.59, -23.75, 1.7)
pt3dadd(-490.49, -1198.21, -23.75, 1.7)
pt3dadd(-490.15, -1198.01, -23.75, 1.7)
pt3dadd(-489.98, -1197.63, -23.75, 1.7)
pt3dadd(-489.64, -1197.24, -23.75, 1.7)
pt3dadd(-489.47, -1196.86, -23.75, 1.7)
pt3dadd(-489.13, -1196.66, -23.75, 1.7)
pt3dadd(-488.96, -1196.28, -23.75, 1.7)
pt3dadd(-488.45, -1195.7, -23.75, 1.7)
pt3dadd(-488.11, -1195.12, -23.75, 1.7)
pt3dadd(-487.6, -1194.73, -23.75, 1.7)
pt3dadd(-487.26, -1194.35, -23.75, 1.7)
pt3dadd(-486.41, -1193.38, -23.75, 1.7)
pt3dadd(-485.9, -1193, -23.75, 1.7)
pt3dadd(-485.73, -1192.42, -23.75, 1.7)
pt3dadd(-485.22, -1192.03, -23.75, 1.7)
pt3dadd(-484.88, -1191.07, -23.75, 1.7)
pt3dadd(-484.04, -1190.1, -23.75, 1.7)
pt3dadd(-483.87, -1189.53, -23.75, 1.7)
pt3dadd(-483.36, -1188.95, -23.75, 1.7)
pt3dadd(-482.85, -1188.56, -23.75, 1.7)
pt3dadd(-482.68, -1188.17, -23.75, 1.7)
pt3dadd(-482.51, -1187.79, -23.75, 1.7)
pt3dadd(-482.34, -1187.4, -23.75, 1.7)
pt3dadd(-482, -1187.02, -23.75, 1.7)
pt3dadd(-481.66, -1186.82, -23.75, 1.7)
pt3dadd(-481.49, -1186.44, -23.75, 1.7)
pt3dadd(-481.32, -1186.05, -23.75, 1.7)
pt3dadd(-480.98, -1185.67, -23.75, 1.7)
pt3dadd(-480.64, -1185.09, -23.75, 1.7)
pt3dadd(-480.3, -1184.7, -23.75, 1.7)
pt3dadd(-480.13, -1184.32, -23.75, 1.7)
pt3dadd(-479.79, -1183.74, -23.75, 1.7)
pt3dadd(-479.62, -1183.35, -23.75, 1.7)
pt3dadd(-479.45, -1183.16, -23.75, 1.7)
pt3dadd(-478.94, -1182.39, -23.75, 1.7)
pt3dadd(-478.77, -1182.19, -23.75, 1.7)
pt3dadd(-478.6, -1181.81, -23.75, 1.7)
pt3dadd(-478.26, -1181.23, -23.75, 1.7)
pt3dadd(-478.09, -1180.84, -23.75, 1.7)
pt3dadd(-477.58, -1180.27, -23.75, 1.7)
pt3dadd(-477.58, -1179.88, -23.75, 1.7)
pt3dadd(-477.24, -1179.49, -23.75, 1.7)
pt3dadd(-476.9, -1179.11, -23.75, 1.7)
pt3dadd(-476.73, -1178.53, -23.75, 1.7)
pt3dadd(-476.39, -1177.95, -23.75, 1.7)
pt3dadd(-476.22, -1177.57, -23.75, 1.7)
pt3dadd(-475.88, -1176.99, -23.75, 1.7)
pt3dadd(-475.54, -1176.41, -23.75, 1.7)
pt3dadd(-475.37, -1176.02, -23.75, 1.7)
pt3dadd(-475.03, -1175.64, -23.75, 1.7)
pt3dadd(-475.03, -1175.06, -23.75, 1.7)
pt3dadd(-474.69, -1174.67, -23.75, 1.7)
pt3dadd(-474.69, -1174.29, -23.75, 1.7)
pt3dadd(-474.35, -1173.9, -23.75, 1.7)
pt3dadd(-473.85, -1172.94, -23.75, 1.7)
pt3dadd(-473.68, -1172.55, -23.75, 1.7)
pt3dadd(-473.51, -1172.16, -23.75, 1.7)
pt3dadd(-473.17, -1171.59, -23.75, 1.7)
pt3dadd(-473, -1171.2, -23.75, 1.7)
pt3dadd(-472.66, -1170.62, -23.75, 1.7)
pt3dadd(-472.49, -1170.04, -23.75, 1.7)
pt3dadd(-472.32, -1169.66, -23.75, 1.7)
pt3dadd(-471.98, -1168.88, -23.75, 1.7)
pt3dadd(-471.81, -1168.31, -23.75, 1.7)
pt3dadd(-471.64, -1167.73, -23.75, 1.7)
pt3dadd(-471.3, -1166.96, -23.75, 1.7)
pt3dadd(-471.13, -1166.57, -23.75, 1.7)
pt3dadd(-470.96, -1165.99, -23.75, 1.7)
pt3dadd(-470.62, -1165.22, -23.75, 1.7)
pt3dadd(-470.45, -1164.64, -23.75, 1.7)
pt3dadd(-470.11, -1164.26, -23.75, 1.7)
pt3dadd(-469.94, -1163.68, -23.75, 1.7)
pt3dadd(-469.94, -1163.29, -23.75, 1.7)
pt3dadd(-469.6, -1162.71, -23.75, 1.7)
pt3dadd(-469.6, -1162.33, -23.75, 1.7)
pt3dadd(-469.43, -1161.75, -23.75, 1.7)
pt3dadd(-469.26, -1161.36, -23.75, 1.7)
pt3dadd(-469.09, -1161.17, -23.75, 1.7)
pt3dadd(-468.92, -1160.78, -23.75, 1.7)
pt3dadd(-468.75, -1160.4, -23.75, 1.7)
pt3dadd(-468.58, -1160.01, -23.75, 1.7)
pt3dadd(-468.58, -1159.63, -23.75, 1.7)
pt3dadd(-468.41, -1159.43, -23.75, 1.7)
pt3dadd(-468.24, -1159.24, -23.75, 1.7)
pt3dadd(-468.24, -1158.66, -23.75, 1.7)
pt3dadd(-468.07, -1158.47, -23.75, 1.7)
pt3dadd(-468.07, -1157.89, -23.75, 1.7)
pt3dadd(-468.58, -1158.56, -20.75, 1.7)
pt3dadd(-468.41, -1158.37, -20.75, 1.7)
pt3dadd(-468.41, -1157.79, -20.75, 1.7)
pt3dadd(-468.24, -1157.21, -20.75, 1.7)
pt3dadd(-468.24, -1156.44, -20.75, 1.7)
pt3dadd(-468.07, -1155.86, -20.75, 1.7)
pt3dadd(-467.9, -1155.48, -20.75, 1.7)
pt3dadd(-467.73, -1154.71, -20.75, 1.7)
pt3dadd(-467.73, -1154.13, -20.75, 1.7)
}
}
proc shape3d_2() {
dend { pt3dadd(-467.56, -1153.36, -20.75, 1.7)
pt3dadd(-467.39, -1152.78, -20.75, 1.7)
pt3dadd(-467.39, -1151.81, -20.75, 1.7)
pt3dadd(-467.22, -1151.23, -20.75, 1.7)
pt3dadd(-467.05, -1150.85, -20.75, 1.7)
pt3dadd(-467.05, -1150.27, -20.75, 1.7)
pt3dadd(-466.88, -1149.69, -20.75, 1.7)
pt3dadd(-466.71, -1149.31, -20.75, 1.7)
pt3dadd(-466.71, -1148.34, -20.75, 1.7)
pt3dadd(-466.54, -1147.95, -20.75, 1.7)
pt3dadd(-466.2, -1146.99, -20.75, 1.7)
pt3dadd(-466.03, -1146.41, -20.75, 1.7)
pt3dadd(-466.03, -1145.83, -20.75, 1.7)
pt3dadd(-465.69, -1144.87, -20.75, 1.7)
pt3dadd(-465.52, -1144.29, -20.75, 1.7)
pt3dadd(-465.35, -1143.71, -20.75, 1.7)
pt3dadd(-465.18, -1143.33, -20.75, 1.7)
pt3dadd(-465.18, -1142.75, -20.75, 1.7)
pt3dadd(-465.01, -1142.36, -20.75, 1.7)
pt3dadd(-464.84, -1141.78, -20.75, 1.7)
pt3dadd(-464.67, -1141.4, -20.75, 1.7)
pt3dadd(-464.5, -1140.82, -20.75, 1.7)
pt3dadd(-464.5, -1140.24, -20.75, 1.7)
pt3dadd(-464.33, -1139.85, -20.75, 1.7)
pt3dadd(-464.16, -1139.47, -20.75, 1.7)
pt3dadd(-464.16, -1139.08, -20.75, 1.7)
pt3dadd(-463.99, -1138.5, -20.75, 1.7)
pt3dadd(-463.99, -1137.92, -20.75, 1.7)
pt3dadd(-463.82, -1137.54, -20.75, 1.7)
pt3dadd(-463.65, -1137.15, -20.75, 1.7)
pt3dadd(-463.65, -1136.38, -20.75, 1.7)
pt3dadd(-463.49, -1135.99, -20.75, 1.7)
pt3dadd(-463.49, -1135.61, -20.75, 1.7)
pt3dadd(-463.32, -1135.22, -20.75, 1.7)
pt3dadd(-463.15, -1134.84, -20.75, 1.7)
pt3dadd(-463.15, -1134.45, -20.75, 1.7)
pt3dadd(-462.98, -1134.07, -20.75, 1.7)
pt3dadd(-462.98, -1133.49, -20.75, 1.7)
pt3dadd(-462.81, -1133.1, -20.75, 1.7)
pt3dadd(-462.81, -1132.72, -20.75, 1.7)
pt3dadd(-462.64, -1132.33, -20.75, 1.7)
pt3dadd(-462.64, -1131.75, -20.75, 1.7)
pt3dadd(-462.47, -1131.37, -20.75, 1.7)
pt3dadd(-462.47, -1130.4, -20.75, 1.7)
pt3dadd(-462.13, -1130.21, -20.75, 1.7)
pt3dadd(-462.13, -1129.63, -20.75, 1.7)
pt3dadd(-461.96, -1129.44, -20.75, 1.7)
pt3dadd(-461.96, -1128.86, -20.75, 1.7)
pt3dadd(-461.79, -1128.47, -20.75, 1.7)
pt3dadd(-461.79, -1127.7, -20.75, 1.7)
pt3dadd(-461.62, -1127.51, -20.75, 1.7)
pt3dadd(-461.62, -1127.12, -20.75, 1.7)
pt3dadd(-461.45, -1126.93, -20.75, 1.7)
pt3dadd(-461.45, -1126.35, -20.75, 1.7)
pt3dadd(-461.28, -1126.16, -20.75, 1.7)
pt3dadd(-461.11, -1125.77, -20.75, 1.7)
pt3dadd(-461.11, -1125, -20.75, 1.7)
pt3dadd(-460.94, -1124.81, -20.75, 1.7)
pt3dadd(-460.94, -1124.23, -20.75, 1.7)
pt3dadd(-461.45, -1125.1, -18.75, 1.7)
pt3dadd(-461.45, -1124.9, -18.75, 1.7)
pt3dadd(-461.28, -1124.71, -18.75, 1.7)
pt3dadd(-461.11, -1124.32, -18.75, 1.7)
pt3dadd(-461.11, -1123.94, -18.75, 1.7)
pt3dadd(-460.94, -1123.75, -18.75, 1.7)
pt3dadd(-460.94, -1122.78, -18.75, 1.7)
pt3dadd(-460.77, -1122.59, -18.75, 1.7)
pt3dadd(-460.77, -1121.82, -18.75, 1.7)
pt3dadd(-460.6, -1121.24, -18.75, 1.7)
pt3dadd(-460.43, -1120.85, -18.75, 1.7)
pt3dadd(-460.43, -1120.27, -18.75, 1.7)
pt3dadd(-460.26, -1119.89, -18.75, 1.7)
pt3dadd(-460.26, -1118.92, -18.75, 1.7)
pt3dadd(-460.09, -1118.73, -18.75, 1.7)
pt3dadd(-460.09, -1118.34, -18.75, 1.7)
pt3dadd(-459.92, -1117.77, -18.75, 1.7)
pt3dadd(-459.92, -1116.99, -18.75, 1.7)
pt3dadd(-459.75, -1116.8, -18.75, 1.7)
pt3dadd(-459.75, -1116.22, -18.75, 1.7)
pt3dadd(-459.58, -1115.84, -18.75, 1.7)
pt3dadd(-459.58, -1115.07, -18.75, 1.7)
pt3dadd(-459.41, -1114.68, -18.75, 1.7)
pt3dadd(-459.41, -1113.71, -18.75, 1.7)
pt3dadd(-459.24, -1113.52, -18.75, 1.7)
pt3dadd(-459.24, -1112.75, -18.75, 1.7)
pt3dadd(-459.07, -1112.56, -18.75, 1.7)
pt3dadd(-458.9, -1111.98, -18.75, 1.7)
pt3dadd(-458.9, -1111.01, -18.75, 1.7)
pt3dadd(-458.73, -1110.82, -18.75, 1.7)
pt3dadd(-458.73, -1110.05, -18.75, 1.7)
pt3dadd(-458.56, -1109.86, -18.75, 1.7)
pt3dadd(-458.39, -1109.28, -18.75, 1.7)
pt3dadd(-458.39, -1108.89, -18.75, 1.7)
pt3dadd(-458.22, -1108.31, -18.75, 1.7)
pt3dadd(-458.05, -1107.74, -18.75, 1.7)
pt3dadd(-457.88, -1107.35, -18.75, 1.7)
pt3dadd(-457.54, -1106.96, -18.75, 1.7)
pt3dadd(-457.54, -1106.38, -18.75, 1.7)
pt3dadd(-456.86, -1105.23, -18.75, 1.7)
pt3dadd(-456.69, -1104.84, -18.75, 1.7)
pt3dadd(-456.52, -1104.26, -18.75, 1.7)
pt3dadd(-456.01, -1103.3, -18.75, 1.7)
pt3dadd(-455.84, -1102.91, -18.75, 1.7)
pt3dadd(-455.67, -1102.53, -18.75, 1.7)
pt3dadd(-455.5, -1102.14, -18.75, 1.7)
pt3dadd(-455.16, -1101.76, -18.75, 1.7)
pt3dadd(-454.99, -1101.18, -18.75, 1.7)
pt3dadd(-454.82, -1100.79, -18.75, 1.7)
pt3dadd(-454.65, -1100.6, -18.75, 1.7)
pt3dadd(-454.65, -1100.21, -18.75, 1.7)
pt3dadd(-454.31, -1099.83, -18.75, 1.7)
pt3dadd(-454.14, -1099.44, -18.75, 1.7)
pt3dadd(-453.97, -1099.05, -18.75, 1.7)
pt3dadd(-453.8, -1098.86, -18.75, 1.7)
pt3dadd(-453.63, -1098.67, -18.75, 1.7)
pt3dadd(-453.63, -1098.09, -18.75, 1.7)
pt3dadd(-453.46, -1097.7, -18.75, 1.7)
pt3dadd(-453.3, -1097.32, -18.75, 1.7)
pt3dadd(-452.96, -1096.74, -18.75, 1.7)
pt3dadd(-452.79, -1096.35, -18.75, 1.7)
pt3dadd(-452.62, -1095.97, -18.75, 1.7)
pt3dadd(-452.62, -1095, -18.75, 1.7)
pt3dadd(-452.45, -1094.62, -18.75, 1.7)
pt3dadd(-452.28, -1094.42, -18.75, 1.7)
pt3dadd(-452.28, -1094.04, -18.75, 1.7)
pt3dadd(-452.11, -1093.85, -18.75, 1.7)
pt3dadd(-450.91, -1096.29, -18.75, 1.7)
pt3dadd(-451.94, -1092.11, -18.75, 1.7)
pt3dadd(-451.94, -1090.95, -18.75, 1.7)
pt3dadd(-451.77, -1090.76, -18.75, 1.7)
pt3dadd(-451.77, -1089.41, -18.75, 1.7)
pt3dadd(-451, -1089.22, -18.75, 1.7)
pt3dadd(-451.94, -1090.28, -15.75, 1.7)
pt3dadd(-451.6, -1090.08, -15.75, 1.7)
pt3dadd(-451.6, -1089.7, -15.75, 1.7)
pt3dadd(-451.26, -1089.31, -15.75, 1.7)
pt3dadd(-450.92, -1091.78, -15.75, 1.7)
pt3dadd(-450.75, -1088.73, -15.75, 1.7)
pt3dadd(-450.58, -1088.54, -15.75, 1.7)
pt3dadd(-450.41, -1088.16, -15.75, 1.7)
pt3dadd(-450.24, -1087.96, -15.75, 1.7)
pt3dadd(-450.07, -1087.58, -15.75, 1.7)
pt3dadd(-449.73, -1087.38, -15.75, 1.7)
pt3dadd(-449.56, -1087.19, -15.75, 1.7)
pt3dadd(-449.39, -1086.81, -15.75, 1.7)
pt3dadd(-449.22, -1086.61, -15.75, 1.7)
pt3dadd(-449.05, -1086.42, -15.75, 1.7)
pt3dadd(-448.88, -1086.23, -15.75, 1.7)
pt3dadd(-448.54, -1086.03, -15.75, 1.7)
pt3dadd(-448.37, -1085.84, -15.75, 1.7)
pt3dadd(-448.2, -1085.45, -15.75, 1.7)
pt3dadd(-447.18, -1084.3, -15.75, 1.7)
pt3dadd(-447.01, -1083.91, -15.75, 1.7)
pt3dadd(-446.84, -1083.53, -15.75, 1.7)
pt3dadd(-446.5, -1083.33, -15.75, 1.7)
pt3dadd(-446.33, -1082.95, -15.75, 1.7)
pt3dadd(-445.82, -1082.56, -15.75, 1.7)
pt3dadd(-445.82, -1082.18, -15.75, 1.7)
pt3dadd(-445.48, -1081.79, -15.75, 1.7)
pt3dadd(-445.31, -1081.4, -15.75, 1.7)
pt3dadd(-444.97, -1080.83, -15.75, 1.7)
pt3dadd(-444.63, -1080.63, -15.75, 1.7)
pt3dadd(-444.12, -1080.25, -15.75, 1.7)
pt3dadd(-443.95, -1079.86, -15.75, 1.7)
pt3dadd(-443.78, -1079.67, -15.75, 1.7)
pt3dadd(-443.61, -1079.28, -15.75, 1.7)
pt3dadd(-443.44, -1079.09, -15.75, 1.7)
pt3dadd(-443.1, -1078.9, -15.75, 1.7)
pt3dadd(-442.93, -1078.51, -15.75, 1.7)
pt3dadd(-442.6, -1078.12, -15.75, 1.7)
pt3dadd(-442.43, -1077.93, -15.75, 1.7)
pt3dadd(-441.92, -1077.35, -15.75, 1.7)
pt3dadd(-441.58, -1077.16, -15.75, 1.7)
pt3dadd(-441.41, -1076.77, -15.75, 1.7)
pt3dadd(-441.24, -1076.58, -15.75, 1.7)
pt3dadd(-441.07, -1076.2, -15.75, 1.7)
pt3dadd(-440.9, -1076, -15.75, 1.7)
pt3dadd(-440.73, -1075.62, -15.75, 1.7)
pt3dadd(-440.56, -1075.42, -15.75, 1.7)
pt3dadd(-439.88, -1074.65, -15.75, 1.7)
pt3dadd(-439.71, -1074.27, -15.75, 1.7)
pt3dadd(-439.37, -1073.88, -15.75, 1.7)
pt3dadd(-439.2, -1073.5, -15.75, 1.7)
pt3dadd(-439.03, -1073.3, -15.75, 1.7)
pt3dadd(-438.86, -1073.11, -15.75, 1.7)
pt3dadd(-438.52, -1072.72, -15.75, 1.7)
pt3dadd(-438.18, -1072.34, -15.75, 1.7)
pt3dadd(-437.84, -1072.14, -15.75, 1.7)
pt3dadd(-437.67, -1071.95, -15.75, 1.7)
pt3dadd(-437.5, -1071.76, -15.75, 1.7)
pt3dadd(-437.33, -1071.37, -15.75, 1.7)
pt3dadd(-436.99, -1070.99, -15.75, 1.7)
pt3dadd(-436.82, -1070.6, -15.75, 1.7)
pt3dadd(-436.48, -1070.41, -15.75, 1.7)
pt3dadd(-436.31, -1070.22, -15.75, 1.7)
pt3dadd(-436.14, -1070.02, -15.75, 1.7)
pt3dadd(-435.97, -1069.83, -15.75, 1.7)
pt3dadd(-435.8, -1069.64, -15.75, 1.7)
pt3dadd(-435.46, -1069.44, -15.75, 1.7)
pt3dadd(-435.29, -1069.25, -15.75, 1.7)
}
}
proc shape3d_3() {
dend { pt3dadd(-434.95, -1069.06, -15.75, 1.7)
pt3dadd(-434.78, -1068.67, -15.75, 1.7)
pt3dadd(-434.44, -1068.48, -15.75, 1.7)
pt3dadd(-434.1, -1068.09, -15.75, 1.7)
pt3dadd(-434.1, -1067.71, -15.75, 1.7)
pt3dadd(-433.76, -1067.52, -15.75, 1.7)
pt3dadd(-433.59, -1067.32, -15.75, 1.7)
pt3dadd(-433.42, -1066.94, -15.75, 1.7)
pt3dadd(-433.08, -1066.74, -15.75, 1.7)
pt3dadd(-432.74, -1066.55, -15.75, 1.7)
pt3dadd(-432.57, -1066.36, -15.75, 1.7)
pt3dadd(-432.24, -1066.16, -15.75, 1.7)
pt3dadd(-432.07, -1065.97, -15.75, 1.7)
pt3dadd(-431.73, -1065.78, -15.75, 1.7)
pt3dadd(-431.05, -1065.78, -15.75, 1.7)
pt3dadd(-430.88, -1065.59, -15.75, 1.7)
pt3dadd(-430.54, -1065.39, -15.75, 1.7)
pt3dadd(-430.2, -1065.2, -15.75, 1.7)
pt3dadd(-429.86, -1065.2, -15.75, 1.7)
pt3dadd(-429.69, -1065.01, -15.75, 1.7)
pt3dadd(-430.03, -1065.3, -14.75, 1.7)
pt3dadd(-429.18, -1065.3, -14.75, 1.7)
pt3dadd(-429.01, -1065.1, -14.75, 1.7)
pt3dadd(-428.5, -1065.1, -14.75, 1.7)
pt3dadd(-428.33, -1064.91, -14.75, 1.7)
pt3dadd(-427.99, -1064.72, -14.75, 1.7)
pt3dadd(-427.82, -1064.53, -14.75, 1.7)
pt3dadd(-427.48, -1064.33, -14.75, 1.7)
pt3dadd(-427.14, -1064.33, -14.75, 1.7)
pt3dadd(-426.97, -1064.14, -14.75, 1.7)
pt3dadd(-426.63, -1063.95, -14.75, 1.7)
pt3dadd(-426.29, -1063.56, -14.75, 1.7)
pt3dadd(-425.78, -1062.98, -14.75, 1.7)
pt3dadd(-425.44, -1062.6, -14.75, 1.7)
pt3dadd(-425.27, -1062.21, -14.75, 1.7)
pt3dadd(-424.93, -1062.02, -14.75, 1.7)
pt3dadd(-424.76, -1061.63, -14.75, 1.7)
pt3dadd(-424.59, -1061.25, -14.75, 1.7)
pt3dadd(-424.42, -1061.05, -14.75, 1.7)
pt3dadd(-424.25, -1060.86, -14.75, 1.7)
pt3dadd(-423.74, -1060.28, -14.75, 1.7)
pt3dadd(-423.4, -1059.7, -14.75, 1.7)
pt3dadd(-422.89, -1059.32, -14.75, 1.7)
pt3dadd(-422.72, -1058.93, -14.75, 1.7)
pt3dadd(-422.38, -1058.35, -14.75, 1.7)
pt3dadd(-422.21, -1057.97, -14.75, 1.7)
pt3dadd(-421.88, -1057.39, -14.75, 1.7)
pt3dadd(-421.54, -1057.19, -14.75, 1.7)
pt3dadd(-421.54, -1056.81, -14.75, 1.7)
pt3dadd(-421.37, -1056.42, -14.75, 1.7)
pt3dadd(-421.03, -1056.23, -14.75, 1.7)
pt3dadd(-420.86, -1055.84, -14.75, 1.7)
pt3dadd(-420.69, -1055.46, -14.75, 1.7)
pt3dadd(-420.52, -1055.07, -14.75, 1.7)
pt3dadd(-420.18, -1054.49, -14.75, 1.7)
pt3dadd(-419.84, -1053.92, -14.75, 1.7)
pt3dadd(-419.67, -1053.53, -14.75, 1.7)
pt3dadd(-419.5, -1053.14, -14.75, 1.7)
pt3dadd(-419.16, -1052.76, -14.75, 1.7)
pt3dadd(-418.99, -1052.57, -14.75, 1.7)
pt3dadd(-418.82, -1051.99, -14.75, 1.7)
pt3dadd(-418.48, -1051.79, -14.75, 1.7)
pt3dadd(-418.31, -1051.41, -14.75, 1.7)
pt3dadd(-418.14, -1050.83, -14.75, 1.7)
pt3dadd(-417.8, -1050.44, -14.75, 1.7)
pt3dadd(-417.63, -1050.06, -14.75, 1.7)
pt3dadd(-417.46, -1049.67, -14.75, 1.7)
pt3dadd(-417.12, -1049.29, -14.75, 1.7)
pt3dadd(-416.95, -1048.71, -14.75, 1.7)
pt3dadd(-416.78, -1048.32, -14.75, 1.7)
pt3dadd(-416.44, -1047.94, -14.75, 1.7)
pt3dadd(-416.1, -1046.97, -14.75, 1.7)
pt3dadd(-415.76, -1046.59, -14.75, 1.7)
pt3dadd(-415.59, -1046.2, -14.75, 1.7)
pt3dadd(-415.42, -1045.81, -14.75, 1.7)
pt3dadd(-415.25, -1045.43, -14.75, 1.7)
pt3dadd(-414.74, -1044.85, -14.75, 1.7)
pt3dadd(-414.57, -1044.27, -14.75, 1.7)
pt3dadd(-414.23, -1044.08, -14.75, 1.7)
pt3dadd(-414.23, -1043.5, -14.75, 1.7)
pt3dadd(-413.72, -1042.92, -14.75, 1.7)
pt3dadd(-413.55, -1042.53, -14.75, 1.7)
pt3dadd(-413.38, -1042.15, -14.75, 1.7)
pt3dadd(-413.04, -1041.96, -14.75, 1.7)
pt3dadd(-412.87, -1041.57, -14.75, 1.7)
pt3dadd(-412.7, -1041.38, -14.75, 1.7)
pt3dadd(-412.53, -1040.99, -14.75, 1.7)
pt3dadd(-412.36, -1040.61, -14.75, 1.7)
pt3dadd(-412.02, -1040.41, -14.75, 1.7)
pt3dadd(-411.85, -1040.22, -14.75, 1.7)
pt3dadd(-411.51, -1039.83, -14.75, 1.7)
pt3dadd(-411.35, -1039.64, -14.75, 1.7)
pt3dadd(-411.35, -1039.26, -14.75, 1.7)
pt3dadd(-411.01, -1039.26, -14.75, 1.7)
pt3dadd(-411.01, -1038.87, -14.75, 1.7)
pt3dadd(-410.16, -1037.9, -14.75, 1.7)
pt3dadd(-409.99, -1037.71, -14.75, 1.7)
pt3dadd(-409.65, -1037.52, -14.75, 1.7)
pt3dadd(-409.48, -1037.33, -14.75, 1.7)
pt3dadd(-409.31, -1037.13, -14.75, 1.7)
pt3dadd(-409.14, -1036.75, -14.75, 1.7)
pt3dadd(-408.8, -1036.36, -14.75, 1.7)
pt3dadd(-408.46, -1036.17, -14.75, 1.7)
pt3dadd(-408.29, -1035.98, -14.75, 1.7)
pt3dadd(-408.12, -1035.78, -14.75, 1.7)
pt3dadd(-407.95, -1035.59, -14.75, 1.7)
pt3dadd(-407.78, -1035.4, -14.75, 1.7)
pt3dadd(-407.61, -1035.2, -14.75, 1.7)
pt3dadd(-407.44, -1035.01, -14.75, 1.7)
pt3dadd(-407.27, -1034.82, -14.75, 1.7)
pt3dadd(-407.1, -1034.63, -14.75, 1.7)
pt3dadd(-406.76, -1034.63, -14.75, 1.7)
pt3dadd(-406.42, -1034.43, -14.75, 1.7)
pt3dadd(-406.08, -1034.24, -14.75, 1.7)
pt3dadd(-405.74, -1034.24, -14.75, 1.7)
pt3dadd(-406.25, -1033.95, -14.75, 1.7)
pt3dadd(-406.25, -1034.53, -14.75, 1.7)
pt3dadd(-405.91, -1034.53, -14.75, 1.7)
pt3dadd(-405.57, -1034.34, -14.75, 1.7)
pt3dadd(-405.23, -1034.14, -14.75, 1.7)
pt3dadd(-404.72, -1034.14, -14.75, 1.7)
pt3dadd(-404.38, -1033.95, -14.75, 1.7)
pt3dadd(-404.21, -1033.76, -14.75, 1.7)
pt3dadd(-403.87, -1033.76, -14.75, 1.7)
pt3dadd(-403.7, -1033.56, -14.75, 1.7)
pt3dadd(-403.53, -1033.37, -14.75, 1.7)
pt3dadd(-403.19, -1033.37, -14.75, 1.7)
pt3dadd(-403.02, -1033.18, -14.75, 1.7)
pt3dadd(-402.85, -1032.99, -14.75, 1.7)
pt3dadd(-402.34, -1032.6, -14.75, 1.7)
pt3dadd(-402.17, -1032.41, -14.75, 1.7)
pt3dadd(-401.83, -1031.83, -14.75, 1.7)
pt3dadd(-401.49, -1031.44, -14.75, 1.7)
pt3dadd(-401.15, -1031.06, -14.75, 1.7)
pt3dadd(-400.82, -1030.67, -14.75, 1.7)
pt3dadd(-400.48, -1030.29, -14.75, 1.7)
pt3dadd(-399.46, -1029.13, -14.75, 1.7)
pt3dadd(-399.29, -1028.93, -14.75, 1.7)
pt3dadd(-398.95, -1028.74, -14.75, 1.7)
pt3dadd(-398.78, -1028.16, -14.75, 1.7)
pt3dadd(-398.61, -1027.97, -14.75, 1.7)
pt3dadd(-397.93, -1027.2, -14.75, 1.7)
pt3dadd(-397.76, -1026.81, -14.75, 1.7)
pt3dadd(-397.25, -1026.23, -14.75, 1.7)
pt3dadd(-397.08, -1025.85, -14.75, 1.7)
pt3dadd(-396.74, -1025.66, -14.75, 1.7)
pt3dadd(-396.4, -1025.27, -14.75, 1.7)
pt3dadd(-396.06, -1024.69, -14.75, 1.7)
pt3dadd(-395.89, -1024.31, -14.75, 1.7)
pt3dadd(-395.55, -1023.73, -14.75, 1.7)
pt3dadd(-395.21, -1023.34, -14.75, 1.7)
pt3dadd(-394.87, -1022.95, -14.75, 1.7)
pt3dadd(-394.7, -1022.57, -14.75, 1.7)
pt3dadd(-394.53, -1022.18, -14.75, 1.7)
pt3dadd(-394.36, -1021.99, -14.75, 1.7)
pt3dadd(-394.02, -1021.6, -14.75, 1.7)
pt3dadd(-393.85, -1021.22, -14.75, 1.7)
pt3dadd(-393.51, -1020.83, -14.75, 1.7)
pt3dadd(-393.17, -1020.45, -14.75, 1.7)
pt3dadd(-393, -1020.25, -14.75, 1.7)
pt3dadd(-392.83, -1019.87, -14.75, 1.7)
pt3dadd(-392.66, -1019.48, -14.75, 1.7)
pt3dadd(-392.15, -1018.9, -14.75, 1.7)
pt3dadd(-391.98, -1018.71, -14.75, 1.7)
pt3dadd(-391.81, -1018.52, -14.75, 1.7)
pt3dadd(-391.64, -1018.13, -14.75, 1.7)
pt3dadd(-391.13, -1017.55, -14.75, 1.7)
pt3dadd(-390.96, -1017.17, -14.75, 1.7)
pt3dadd(-390.63, -1016.59, -14.75, 1.7)
pt3dadd(-390.29, -1016.01, -14.75, 1.7)
pt3dadd(-389.95, -1015.62, -14.75, 1.7)
pt3dadd(-389.61, -1015.24, -14.75, 1.7)
pt3dadd(-389.44, -1014.85, -14.75, 1.7)
pt3dadd(-389.27, -1014.47, -14.75, 1.7)
pt3dadd(-388.93, -1013.89, -14.75, 1.7)
pt3dadd(-388.76, -1013.7, -14.75, 1.7)
pt3dadd(-388.42, -1013.31, -14.75, 1.7)
pt3dadd(-388.25, -1013.12, -14.75, 1.7)
pt3dadd(-387.91, -1012.73, -14.75, 1.7)
pt3dadd(-387.74, -1012.35, -14.75, 1.7)
pt3dadd(-387.57, -1012.15, -14.75, 1.7)
pt3dadd(-387.4, -1011.77, -14.75, 1.7)
pt3dadd(-386.72, -1011, -14.75, 1.7)
pt3dadd(-386.55, -1010.8, -14.75, 1.7)
pt3dadd(-386.38, -1010.61, -14.75, 1.7)
pt3dadd(-386.21, -1010.42, -14.75, 1.7)
pt3dadd(-386.04, -1010.03, -14.75, 1.7)
pt3dadd(-385.87, -1009.64, -14.75, 1.7)
pt3dadd(-385.7, -1009.26, -14.75, 1.7)
pt3dadd(-385.36, -1008.87, -14.75, 1.7)
pt3dadd(-385.19, -1008.29, -14.75, 1.7)
pt3dadd(-384.85, -1008.1, -14.75, 1.7)
pt3dadd(-384.68, -1007.52, -14.75, 1.7)
pt3dadd(-384.51, -1007.14, -14.75, 1.7)
pt3dadd(-384.34, -1006.75, -14.75, 1.7)
pt3dadd(-384.17, -1006.56, -14.75, 1.7)
pt3dadd(-384.17, -1006.17, -14.75, 1.7)
pt3dadd(-384, -1005.79, -14.75, 1.7)
pt3dadd(-383.83, -1005.59, -14.75, 1.7)
pt3dadd(-383.83, -1004.82, -14.75, 1.7)
}
}
proc shape3d_4() {
dend { pt3dadd(-383.49, -1003.86, -14.75, 1.7)
pt3dadd(-383.49, -1003.47, -14.75, 1.7)
pt3dadd(-383.32, -1003.09, -14.75, 1.7)
pt3dadd(-383.32, -1001.93, -14.75, 1.7)
pt3dadd(-383.15, -1001.54, -14.75, 1.7)
pt3dadd(-383.15, -1000, -14.75, 1.7)
pt3dadd(-382.98, -999.61, -14.75, 1.7)
pt3dadd(-382.81, -999.23, -14.75, 1.7)
pt3dadd(-382.81, -998.07, -14.75, 1.7)
pt3dadd(-382.64, -997.68, -14.75, 1.7)
pt3dadd(-382.64, -997.11, -14.75, 1.7)
pt3dadd(-382.47, -996.53, -14.75, 1.7)
pt3dadd(-382.3, -996.14, -14.75, 1.7)
pt3dadd(-382.3, -995.76, -14.75, 1.7)
pt3dadd(-382.13, -995.56, -14.75, 1.7)
pt3dadd(-382.13, -995.18, -14.75, 1.7)
pt3dadd(-381.96, -994.79, -14.75, 1.7)
pt3dadd(-381.62, -994.21, -14.75, 1.7)
pt3dadd(-381.45, -993.83, -14.75, 1.7)
pt3dadd(-381.28, -993.44, -14.75, 1.7)
pt3dadd(-381.11, -993.25, -14.75, 1.7)
pt3dadd(-380.77, -992.67, -14.75, 1.7)
pt3dadd(-380.6, -992.28, -14.75, 1.7)
pt3dadd(-380.43, -991.9, -14.75, 1.7)
pt3dadd(-380.26, -991.7, -14.75, 1.7)
pt3dadd(-380.1, -991.32, -14.75, 1.7)
pt3dadd(-379.93, -991.13, -14.75, 1.7)
pt3dadd(-379.76, -990.55, -14.75, 1.7)
pt3dadd(-379.42, -990.16, -14.75, 1.7)
pt3dadd(-379.25, -989.58, -14.75, 1.7)
pt3dadd(-379.08, -989.39, -14.75, 1.7)
pt3dadd(-378.74, -988.81, -14.75, 1.7)
pt3dadd(-378.57, -988.43, -14.75, 1.7)
pt3dadd(-378.06, -987.85, -14.75, 1.7)
pt3dadd(-377.72, -987.08, -14.75, 1.7)
pt3dadd(-377.38, -986.69, -14.75, 1.7)
pt3dadd(-377.21, -986.3, -14.75, 1.7)
pt3dadd(-377.04, -985.92, -14.75, 1.7)
pt3dadd(-376.87, -985.53, -14.75, 1.7)
pt3dadd(-376.7, -985.15, -14.75, 1.7)
pt3dadd(-376.19, -984.76, -14.75, 1.7)
pt3dadd(-376.19, -984.37, -14.75, 1.7)
pt3dadd(-375.85, -983.99, -14.75, 1.7)
pt3dadd(-375.68, -983.6, -14.75, 1.7)
pt3dadd(-375.51, -983.22, -14.75, 1.7)
pt3dadd(-375.34, -983.02, -14.75, 1.7)
pt3dadd(-375.17, -982.83, -14.75, 1.7)
pt3dadd(-375, -982.45, -14.75, 1.7)
pt3dadd(-374.83, -982.06, -14.75, 1.7)
pt3dadd(-374.66, -981.87, -14.75, 1.7)
pt3dadd(-374.66, -981.29, -14.75, 1.7)
pt3dadd(-374.49, -980.9, -14.75, 1.7)
pt3dadd(-374.32, -980.71, -14.75, 1.7)
pt3dadd(-374.15, -980.52, -14.75, 1.7)
pt3dadd(-373.98, -980.32, -14.75, 1.7)
pt3dadd(-373.81, -980.13, -14.75, 1.7)
pt3dadd(-374.49, -980.61, -10.75, 1.7)
pt3dadd(-374.49, -981, -10.75, 1.7)
pt3dadd(-374.32, -981.19, -10.75, 1.7)
pt3dadd(-374.15, -981, -10.75, 1.7)
pt3dadd(-373.64, -980.42, -10.75, 1.7)
pt3dadd(-373.47, -980.23, -10.75, 1.7)
pt3dadd(-373.3, -979.84, -10.75, 1.7)
pt3dadd(-373.13, -979.46, -10.75, 1.7)
pt3dadd(-372.79, -979.07, -10.75, 1.7)
pt3dadd(-372.62, -978.88, -10.75, 1.7)
pt3dadd(-372.45, -978.3, -10.75, 1.7)
pt3dadd(-372.28, -977.91, -10.75, 1.7)
pt3dadd(-372.11, -977.72, -10.75, 1.7)
pt3dadd(-371.94, -977.33, -10.75, 1.7)
pt3dadd(-371.6, -977.14, -10.75, 1.7)
pt3dadd(-371.43, -976.56, -10.75, 1.7)
pt3dadd(-371.26, -976.18, -10.75, 1.7)
pt3dadd(-370.92, -975.6, -10.75, 1.7)
pt3dadd(-370.75, -975.4, -10.75, 1.7)
pt3dadd(-370.58, -975.02, -10.75, 1.7)
pt3dadd(-370.24, -974.83, -10.75, 1.7)
pt3dadd(-369.9, -974.25, -10.75, 1.7)
pt3dadd(-369.74, -974.05, -10.75, 1.7)
pt3dadd(-369.4, -973.67, -10.75, 1.7)
pt3dadd(-369.06, -973.28, -10.75, 1.7)
pt3dadd(-368.89, -972.9, -10.75, 1.7)
pt3dadd(-368.55, -972.51, -10.75, 1.7)
pt3dadd(-368.21, -972.13, -10.75, 1.7)
pt3dadd(-368.04, -971.74, -10.75, 1.7)
pt3dadd(-367.87, -971.55, -10.75, 1.7)
pt3dadd(-367.53, -971.16, -10.75, 1.7)
pt3dadd(-367.19, -970.58, -10.75, 1.7)
pt3dadd(-366.85, -970.2, -10.75, 1.7)
pt3dadd(-366.68, -970, -10.75, 1.7)
pt3dadd(-366.51, -969.81, -10.75, 1.7)
pt3dadd(-366.34, -969.42, -10.75, 1.7)
pt3dadd(-366.17, -969.23, -10.75, 1.7)
pt3dadd(-366, -968.46, -10.75, 1.7)
pt3dadd(-365.49, -967.88, -10.75, 1.7)
pt3dadd(-365.32, -967.5, -10.75, 1.7)
pt3dadd(-364.98, -966.92, -10.75, 1.7)
pt3dadd(-364.47, -966.34, -10.75, 1.7)
pt3dadd(-364.3, -965.76, -10.75, 1.7)
pt3dadd(-363.79, -965.18, -10.75, 1.7)
pt3dadd(-363.62, -964.6, -10.75, 1.7)
pt3dadd(-363.45, -964.22, -10.75, 1.7)
pt3dadd(-362.77, -963.44, -10.75, 1.7)
pt3dadd(-362.6, -962.87, -10.75, 1.7)
pt3dadd(-362.43, -962.48, -10.75, 1.7)
pt3dadd(-362.09, -962.09, -10.75, 1.7)
pt3dadd(-361.75, -961.71, -10.75, 1.7)
pt3dadd(-361.41, -961.52, -10.75, 1.7)
pt3dadd(-361.24, -960.94, -10.75, 1.7)
pt3dadd(-360.9, -960.55, -10.75, 1.7)
pt3dadd(-360.56, -960.17, -10.75, 1.7)
pt3dadd(-360.56, -959.78, -10.75, 1.7)
pt3dadd(-360.22, -959.39, -10.75, 1.7)
pt3dadd(-359.54, -958.62, -10.75, 1.7)
pt3dadd(-359.37, -958.43, -10.75, 1.7)
pt3dadd(-359.21, -957.85, -10.75, 1.7)
pt3dadd(-358.87, -957.46, -10.75, 1.7)
pt3dadd(-358.53, -956.89, -10.75, 1.7)
pt3dadd(-358.36, -956.5, -10.75, 1.7)
pt3dadd(-358.02, -955.73, -10.75, 1.7)
pt3dadd(-357.68, -955.34, -10.75, 1.7)
pt3dadd(-357.34, -954.96, -10.75, 1.7)
pt3dadd(-357, -954.38, -10.75, 1.7)
pt3dadd(-356.66, -953.8, -10.75, 1.7)
pt3dadd(-356.15, -953.22, -10.75, 1.7)
pt3dadd(-355.98, -952.64, -10.75, 1.7)
pt3dadd(-355.64, -952.06, -10.75, 1.7)
pt3dadd(-355.3, -951.49, -10.75, 1.7)
pt3dadd(-354.96, -951.1, -10.75, 1.7)
pt3dadd(-354.62, -950.71, -10.75, 1.7)
pt3dadd(-354.62, -950.33, -10.75, 1.7)
pt3dadd(-354.11, -949.94, -10.75, 1.7)
pt3dadd(-353.94, -949.36, -10.75, 1.7)
pt3dadd(-353.6, -948.98, -10.75, 1.7)
pt3dadd(-353.43, -948.59, -10.75, 1.7)
pt3dadd(-353.09, -948.21, -10.75, 1.7)
pt3dadd(-352.92, -947.82, -10.75, 1.7)
pt3dadd(-352.75, -947.43, -10.75, 1.7)
pt3dadd(-352.58, -947.05, -10.75, 1.7)
pt3dadd(-352.24, -946.66, -10.75, 1.7)
pt3dadd(-352.07, -946.28, -10.75, 1.7)
pt3dadd(-351.73, -946.08, -10.75, 1.7)
pt3dadd(-351.73, -945.7, -10.75, 1.7)
pt3dadd(-351.56, -945.31, -10.75, 1.7)
pt3dadd(-351.22, -944.93, -10.75, 1.7)
pt3dadd(-350.88, -944.54, -10.75, 1.7)
pt3dadd(-350.71, -943.96, -10.75, 1.7)
pt3dadd(-350.54, -943.77, -10.75, 1.7)
pt3dadd(-350.37, -943.38, -10.75, 1.7)
pt3dadd(-350.03, -943, -10.75, 1.7)
pt3dadd(-349.86, -942.61, -10.75, 1.7)
pt3dadd(-349.69, -942.42, -10.75, 1.7)
pt3dadd(-349.18, -941.84, -10.75, 1.7)
pt3dadd(-348.85, -941.65, -10.75, 1.7)
pt3dadd(-348.68, -941.45, -10.75, 1.7)
pt3dadd(-348.51, -941.26, -10.75, 1.7)
pt3dadd(-348.17, -941.07, -10.75, 1.7)
pt3dadd(-348, -940.88, -10.75, 1.7)
pt3dadd(-347.83, -940.49, -10.75, 1.7)
pt3dadd(-346.81, -939.33, -10.75, 1.7)
pt3dadd(-346.64, -939.14, -10.75, 1.7)
pt3dadd(-347.32, -939.04, -9.75, 1.7)
pt3dadd(-347.15, -939.24, -9.75, 1.7)
pt3dadd(-346.98, -939.04, -9.75, 1.7)
pt3dadd(-346.64, -939.04, -9.75, 1.7)
pt3dadd(-346.3, -938.85, -9.75, 1.7)
pt3dadd(-345.96, -938.66, -9.75, 1.7)
pt3dadd(-345.79, -938.46, -9.75, 1.7)
pt3dadd(-345.45, -938.27, -9.75, 1.7)
pt3dadd(-344.77, -937.5, -9.75, 1.7)
pt3dadd(-344.43, -937.31, -9.75, 1.7)
pt3dadd(-344.09, -937.11, -9.75, 1.7)
pt3dadd(-343.75, -936.73, -9.75, 1.7)
pt3dadd(-343.41, -936.34, -9.75, 1.7)
pt3dadd(-343.07, -935.96, -9.75, 1.7)
pt3dadd(-342.39, -935.38, -9.75, 1.7)
pt3dadd(-342.05, -935.18, -9.75, 1.7)
pt3dadd(-341.71, -934.8, -9.75, 1.7)
pt3dadd(-341.03, -934.03, -9.75, 1.7)
pt3dadd(-340.52, -933.83, -9.75, 1.7)
pt3dadd(-340.18, -933.45, -9.75, 1.7)
pt3dadd(-339.84, -933.06, -9.75, 1.7)
pt3dadd(-338.82, -931.91, -9.75, 1.7)
pt3dadd(-338.49, -931.71, -9.75, 1.7)
pt3dadd(-338.15, -931.33, -9.75, 1.7)
pt3dadd(-337.98, -931.13, -9.75, 1.7)
pt3dadd(-337.64, -930.94, -9.75, 1.7)
pt3dadd(-336.96, -930.17, -9.75, 1.7)
pt3dadd(-336.45, -929.78, -9.75, 1.7)
pt3dadd(-336.11, -929.2, -9.75, 1.7)
pt3dadd(-335.77, -929.01, -9.75, 1.7)
pt3dadd(-335.43, -928.63, -9.75, 1.7)
pt3dadd(-335.26, -928.24, -9.75, 1.7)
pt3dadd(-334.92, -928.05, -9.75, 1.7)
pt3dadd(-334.24, -927.28, -9.75, 1.7)
pt3dadd(-334.07, -926.89, -9.75, 1.7)
pt3dadd(-333.73, -926.7, -9.75, 1.7)
pt3dadd(-333.39, -926.31, -9.75, 1.7)
pt3dadd(-333.05, -925.93, -9.75, 1.7)
pt3dadd(-332.71, -925.54, -9.75, 1.7)
}
}
proc shape3d_5() {
dend { pt3dadd(-332.2, -924.96, -9.75, 1.7)
pt3dadd(-331.69, -924.38, -9.75, 1.7)
pt3dadd(-331.35, -923.8, -9.75, 1.7)
pt3dadd(-331.01, -923.42, -9.75, 1.7)
pt3dadd(-330.5, -923.03, -9.75, 1.7)
pt3dadd(-330.16, -922.26, -9.75, 1.7)
pt3dadd(-329.65, -921.87, -9.75, 1.7)
pt3dadd(-329.48, -921.49, -9.75, 1.7)
pt3dadd(-329.31, -921.3, -9.75, 1.7)
pt3dadd(-328.97, -920.91, -9.75, 1.7)
pt3dadd(-328.46, -920.52, -9.75, 1.7)
pt3dadd(-327.96, -919.95, -9.75, 1.7)
pt3dadd(-327.62, -919.56, -9.75, 1.7)
pt3dadd(-327.28, -918.98, -9.75, 1.7)
pt3dadd(-326.94, -918.4, -9.75, 1.7)
pt3dadd(-326.77, -918.02, -9.75, 1.7)
pt3dadd(-326.26, -917.44, -9.75, 1.7)
pt3dadd(-325.92, -917.05, -9.75, 1.7)
pt3dadd(-325.75, -916.67, -9.75, 1.7)
pt3dadd(-325.58, -916.47, -9.75, 1.7)
pt3dadd(-325.07, -915.89, -9.75, 1.7)
pt3dadd(-324.73, -915.89, -9.75, 1.7)
pt3dadd(-324.56, -915.7, -9.75, 1.7)
pt3dadd(-324.39, -915.51, -9.75, 1.7)
pt3dadd(-324.22, -915.12, -9.75, 1.7)
pt3dadd(-324.05, -914.74, -9.75, 1.7)
pt3dadd(-323.88, -914.16, -9.75, 1.7)
pt3dadd(-323.54, -913.77, -9.75, 1.7)
pt3dadd(-323.2, -913.19, -9.75, 1.7)
pt3dadd(-323.03, -912.62, -9.75, 1.7)
pt3dadd(-322.52, -912.04, -9.75, 1.7)
pt3dadd(-322.35, -911.46, -9.75, 1.7)
pt3dadd(-322.01, -910.69, -9.75, 1.7)
pt3dadd(-321.67, -910.11, -9.75, 1.7)
pt3dadd(-321.5, -909.72, -9.75, 1.7)
pt3dadd(-321.33, -909.34, -9.75, 1.7)
pt3dadd(-321.16, -908.95, -9.75, 1.7)
pt3dadd(-320.99, -908.37, -9.75, 1.7)
pt3dadd(-320.82, -907.99, -9.75, 1.7)
pt3dadd(-320.65, -907.6, -9.75, 1.7)
pt3dadd(-320.31, -907.41, -9.75, 1.7)
pt3dadd(-320.14, -907.02, -9.75, 1.7)
pt3dadd(-319.97, -906.64, -9.75, 1.7)
pt3dadd(-319.8, -906.25, -9.75, 1.7)
pt3dadd(-319.46, -905.86, -9.75, 1.7)
pt3dadd(-319.29, -905.67, -9.75, 1.7)
pt3dadd(-318.95, -905.09, -9.75, 1.7)
pt3dadd(-318.78, -904.71, -9.75, 1.7)
pt3dadd(-318.61, -904.13, -9.75, 1.7)
pt3dadd(-318.44, -903.74, -9.75, 1.7)
pt3dadd(-318.1, -903.36, -9.75, 1.7)
pt3dadd(-317.93, -902.97, -9.75, 1.7)
pt3dadd(-317.76, -902.58, -9.75, 1.7)
pt3dadd(-317.6, -902.2, -9.75, 1.7)
pt3dadd(-317.43, -901.62, -9.75, 1.7)
pt3dadd(-317.26, -901.23, -9.75, 1.7)
pt3dadd(-317.09, -900.85, -9.75, 1.7)
pt3dadd(-316.75, -900.46, -9.75, 1.7)
pt3dadd(-316.58, -900.08, -9.75, 1.7)
pt3dadd(-316.41, -899.69, -9.75, 1.7)
pt3dadd(-316.07, -899.11, -9.75, 1.7)
pt3dadd(-315.9, -898.73, -9.75, 1.7)
pt3dadd(-315.9, -898.34, -9.75, 1.7)
pt3dadd(-315.56, -897.95, -9.75, 1.7)
pt3dadd(-315.39, -897.57, -9.75, 1.7)
pt3dadd(-315.05, -896.99, -9.75, 1.7)
pt3dadd(-314.88, -896.6, -9.75, 1.7)
pt3dadd(-314.71, -896.03, -9.75, 1.7)
pt3dadd(-314.54, -895.83, -9.75, 1.7)
pt3dadd(-314.37, -895.64, -9.75, 1.7)
pt3dadd(-314.2, -895.45, -9.75, 1.7)
pt3dadd(-314.2, -895.06, -9.75, 1.7)
pt3dadd(-314.03, -894.48, -9.75, 1.7)
pt3dadd(-313.86, -894.29, -9.75, 1.7)
pt3dadd(-313.69, -893.9, -9.75, 1.7)
pt3dadd(-313.52, -893.71, -9.75, 1.7)
pt3dadd(-313.18, -893.52, -9.75, 1.7)
pt3dadd(-313.01, -893.33, -9.75, 1.7)
pt3dadd(-313.35, -893.81, -6.75, 1.7)
pt3dadd(-313.18, -893.61, -6.75, 1.7)
pt3dadd(-313.01, -893.42, -6.75, 1.7)
pt3dadd(-312.84, -893.23, -6.75, 1.7)
pt3dadd(-312.67, -892.84, -6.75, 1.7)
pt3dadd(-312.33, -892.26, -6.75, 1.7)
pt3dadd(-312.16, -891.88, -6.75, 1.7)
pt3dadd(-311.82, -891.49, -6.75, 1.7)
pt3dadd(-311.65, -891.11, -6.75, 1.7)
pt3dadd(-311.48, -890.72, -6.75, 1.7)
pt3dadd(-311.14, -890.34, -6.75, 1.7)
pt3dadd(-310.97, -889.95, -6.75, 1.7)
pt3dadd(-310.8, -889.56, -6.75, 1.7)
pt3dadd(-310.46, -888.98, -6.75, 1.7)
pt3dadd(-310.29, -888.6, -6.75, 1.7)
pt3dadd(-309.95, -887.83, -6.75, 1.7)
pt3dadd(-309.78, -887.44, -6.75, 1.7)
pt3dadd(-309.27, -886.86, -6.75, 1.7)
pt3dadd(-309.1, -886.09, -6.75, 1.7)
pt3dadd(-308.93, -885.71, -6.75, 1.7)
pt3dadd(-308.59, -885.32, -6.75, 1.7)
pt3dadd(-308.42, -884.93, -6.75, 1.7)
pt3dadd(-308.25, -884.55, -6.75, 1.7)
pt3dadd(-307.91, -883.97, -6.75, 1.7)
pt3dadd(-307.74, -883.78, -6.75, 1.7)
pt3dadd(-307.57, -883.2, -6.75, 1.7)
pt3dadd(-307.4, -882.81, -6.75, 1.7)
pt3dadd(-307.07, -882.43, -6.75, 1.7)
pt3dadd(-306.9, -882.23, -6.75, 1.7)
pt3dadd(-306.73, -881.85, -6.75, 1.7)
pt3dadd(-306.22, -880.88, -6.75, 1.7)
pt3dadd(-305.88, -880.3, -6.75, 1.7)
pt3dadd(-305.71, -879.92, -6.75, 1.7)
pt3dadd(-305.54, -879.53, -6.75, 1.7)
pt3dadd(-305.37, -879.15, -6.75, 1.7)
pt3dadd(-305.03, -878.57, -6.75, 1.7)
pt3dadd(-304.86, -878.18, -6.75, 1.7)
pt3dadd(-304.69, -877.8, -6.75, 1.7)
pt3dadd(-304.35, -877.41, -6.75, 1.7)
pt3dadd(-304.18, -876.64, -6.75, 1.7)
pt3dadd(-304.01, -876.25, -6.75, 1.7)
pt3dadd(-303.84, -875.87, -6.75, 1.7)
pt3dadd(-303.5, -875.1, -6.75, 1.7)
pt3dadd(-303.33, -874.71, -6.75, 1.7)
pt3dadd(-302.99, -873.94, -6.75, 1.7)
pt3dadd(-302.65, -873.55, -6.75, 1.7)
pt3dadd(-302.48, -872.97, -6.75, 1.7)
pt3dadd(-302.31, -872.59, -6.75, 1.7)
pt3dadd(-302.14, -872.2, -6.75, 1.7)
pt3dadd(-301.8, -871.82, -6.75, 1.7)
pt3dadd(-301.63, -871.24, -6.75, 1.7)
pt3dadd(-301.46, -870.85, -6.75, 1.7)
pt3dadd(-301.46, -870.08, -6.75, 1.7)
pt3dadd(-301.29, -869.69, -6.75, 1.7)
pt3dadd(-301.12, -869.12, -6.75, 1.7)
pt3dadd(-300.95, -868.73, -6.75, 1.7)
pt3dadd(-300.78, -868.34, -6.75, 1.7)
pt3dadd(-300.61, -867.77, -6.75, 1.7)
pt3dadd(-300.44, -867.19, -6.75, 1.7)
pt3dadd(-300.27, -866.61, -6.75, 1.7)
pt3dadd(-300.1, -866.22, -6.75, 1.7)
pt3dadd(-299.93, -865.64, -6.75, 1.7)
pt3dadd(-299.93, -864.87, -6.75, 1.7)
pt3dadd(-299.76, -864.49, -6.75, 1.7)
pt3dadd(-299.59, -864.1, -6.75, 1.7)
pt3dadd(-299.42, -863.91, -6.75, 1.7)
pt3dadd(-299.42, -863.52, -6.75, 1.7)
pt3dadd(-299.25, -863.14, -6.75, 1.7)
pt3dadd(-299.08, -862.94, -6.75, 1.7)
pt3dadd(-298.91, -862.56, -6.75, 1.7)
pt3dadd(-298.74, -862.17, -6.75, 1.7)
pt3dadd(-298.57, -861.59, -6.75, 1.7)
pt3dadd(-298.4, -860.82, -6.75, 1.7)
pt3dadd(-298.23, -860.44, -6.75, 1.7)
pt3dadd(-298.06, -859.86, -6.75, 1.7)
pt3dadd(-297.89, -859.47, -6.75, 1.7)
pt3dadd(-297.72, -859.28, -6.75, 1.7)
pt3dadd(-298.23, -859.76, -4.75, 1.7)
pt3dadd(-298.06, -859.95, -4.75, 1.7)
pt3dadd(-298.06, -859.57, -4.75, 1.7)
pt3dadd(-297.89, -859.18, -4.75, 1.7)
pt3dadd(-297.72, -858.8, -4.75, 1.7)
pt3dadd(-297.55, -858.22, -4.75, 1.7)
pt3dadd(-297.38, -857.83, -4.75, 1.7)
pt3dadd(-297.38, -857.45, -4.75, 1.7)
pt3dadd(-297.21, -857.25, -4.75, 1.7)
pt3dadd(-297.04, -856.87, -4.75, 1.7)
pt3dadd(-296.87, -856.48, -4.75, 1.7)
pt3dadd(-296.71, -855.9, -4.75, 1.7)
pt3dadd(-296.54, -855.52, -4.75, 1.7)
pt3dadd(-296.37, -854.94, -4.75, 1.7)
pt3dadd(-296.2, -854.55, -4.75, 1.7)
pt3dadd(-296.03, -854.17, -4.75, 1.7)
pt3dadd(-295.86, -853.59, -4.75, 1.7)
pt3dadd(-295.69, -853.2, -4.75, 1.7)
pt3dadd(-295.52, -852.82, -4.75, 1.7)
pt3dadd(-295.52, -852.43, -4.75, 1.7)
pt3dadd(-295.35, -852.04, -4.75, 1.7)
pt3dadd(-295.18, -851.66, -4.75, 1.7)
pt3dadd(-295.01, -851.08, -4.75, 1.7)
pt3dadd(-294.84, -850.5, -4.75, 1.7)
pt3dadd(-294.67, -849.92, -4.75, 1.7)
pt3dadd(-294.5, -849.73, -4.75, 1.7)
pt3dadd(-294.5, -849.15, -4.75, 1.7)
pt3dadd(-294.33, -848.77, -4.75, 1.7)
pt3dadd(-294.33, -848.38, -4.75, 1.7)
pt3dadd(-294.16, -847.61, -4.75, 1.7)
pt3dadd(-293.99, -846.84, -4.75, 1.7)
pt3dadd(-293.82, -846.64, -4.75, 1.7)
pt3dadd(-293.65, -846.06, -4.75, 1.7)
pt3dadd(-293.48, -845.68, -4.75, 1.7)
pt3dadd(-293.31, -845.1, -4.75, 1.7)
pt3dadd(-293.31, -844.52, -4.75, 1.7)
pt3dadd(-293.14, -844.14, -4.75, 1.7)
pt3dadd(-292.97, -843.75, -4.75, 1.7)
pt3dadd(-292.8, -843.36, -4.75, 1.7)
pt3dadd(-292.63, -842.98, -4.75, 1.7)
pt3dadd(-292.29, -842.4, -4.75, 1.7)
pt3dadd(-292.12, -842.01, -4.75, 1.7)
pt3dadd(-291.95, -841.43, -4.75, 1.7)
pt3dadd(-291.61, -840.66, -4.75, 1.7)
pt3dadd(-291.44, -840.28, -4.75, 1.7)
}
}
proc shape3d_6() {
dend { pt3dadd(-291.27, -839.89, -4.75, 1.7)
pt3dadd(-291.1, -839.7, -4.75, 1.7)
pt3dadd(-290.93, -839.12, -4.75, 1.7)
pt3dadd(-290.76, -838.73, -4.75, 1.7)
pt3dadd(-290.42, -838.35, -4.75, 1.7)
pt3dadd(-290.25, -837.96, -4.75, 1.7)
pt3dadd(-289.91, -837.19, -4.75, 1.7)
pt3dadd(-289.74, -836.81, -4.75, 1.7)
pt3dadd(-289.57, -836.61, -4.75, 1.7)
pt3dadd(-289.4, -836.03, -4.75, 1.7)
pt3dadd(-289.06, -835.65, -4.75, 1.7)
pt3dadd(-289.06, -835.26, -4.75, 1.7)
pt3dadd(-288.72, -834.68, -4.75, 1.7)
pt3dadd(-288.55, -834.3, -4.75, 1.7)
pt3dadd(-288.38, -833.72, -4.75, 1.7)
pt3dadd(-288.04, -833.14, -4.75, 1.7)
pt3dadd(-287.53, -832.56, -4.75, 1.7)
pt3dadd(-287.36, -831.79, -4.75, 1.7)
pt3dadd(-287.02, -831.21, -4.75, 1.7)
pt3dadd(-286.68, -830.44, -4.75, 1.7)
pt3dadd(-286.51, -830.25, -4.75, 1.7)
pt3dadd(-286.35, -829.67, -4.75, 1.7)
pt3dadd(-286.18, -829.28, -4.75, 1.7)
pt3dadd(-285.84, -828.9, -4.75, 1.7)
pt3dadd(-285.67, -828.51, -4.75, 1.7)
pt3dadd(-285.5, -828.12, -4.75, 1.7)
pt3dadd(-285.33, -827.55, -4.75, 1.7)
pt3dadd(-285.16, -827.16, -4.75, 1.7)
pt3dadd(-284.82, -826.2, -4.75, 1.7)
pt3dadd(-284.48, -825.81, -4.75, 1.7)
pt3dadd(-284.31, -825.23, -4.75, 1.7)
pt3dadd(-284.14, -824.85, -4.75, 1.7)
pt3dadd(-283.8, -824.27, -4.75, 1.7)
pt3dadd(-283.63, -823.69, -4.75, 1.7)
pt3dadd(-283.29, -823.11, -4.75, 1.7)
pt3dadd(-283.12, -822.53, -4.75, 1.7)
pt3dadd(-282.78, -822.14, -4.75, 1.7)
pt3dadd(-282.61, -821.57, -4.75, 1.7)
pt3dadd(-282.44, -821.37, -4.75, 1.7)
pt3dadd(-282.1, -820.79, -4.75, 1.7)
pt3dadd(-281.93, -820.41, -4.75, 1.7)
pt3dadd(-281.76, -820.22, -4.75, 1.7)
pt3dadd(-281.42, -819.44, -4.75, 1.7)
pt3dadd(-281.25, -819.25, -4.75, 1.7)
pt3dadd(-281.08, -819.06, -4.75, 1.7)
pt3dadd(-280.91, -818.67, -4.75, 1.7)
pt3dadd(-280.57, -818.09, -4.75, 1.7)
pt3dadd(-280.4, -817.71, -4.75, 1.7)
pt3dadd(-280.23, -817.32, -4.75, 1.7)
pt3dadd(-279.89, -816.94, -4.75, 1.7)
pt3dadd(-279.72, -816.55, -4.75, 1.7)
pt3dadd(-279.55, -816.16, -4.75, 1.7)
pt3dadd(-279.38, -815.78, -4.75, 1.7)
pt3dadd(-279.21, -815.39, -4.75, 1.7)
pt3dadd(-279.04, -815.01, -4.75, 1.7)
pt3dadd(-278.7, -814.62, -4.75, 1.7)
pt3dadd(-278.7, -814.24, -4.75, 1.7)
pt3dadd(-278.53, -813.85, -4.75, 1.7)
pt3dadd(-278.19, -813.66, -4.75, 1.7)
pt3dadd(-278.02, -813.08, -4.75, 1.7)
pt3dadd(-277.85, -812.89, -4.75, 1.7)
pt3dadd(-277.68, -812.69, -4.75, 1.7)
pt3dadd(-277.51, -812.5, -4.75, 1.7)
pt3dadd(-277.17, -812.11, -4.75, 1.7)
pt3dadd(-277, -811.92, -4.75, 1.7)
pt3dadd(-276.83, -811.54, -4.75, 1.7)
pt3dadd(-276.66, -811.15, -4.75, 1.7)
pt3dadd(-276.49, -810.76, -4.75, 1.7)
pt3dadd(-276.15, -810.38, -4.75, 1.7)
pt3dadd(-275.99, -810.18, -4.75, 1.7)
pt3dadd(-276.32, -810.47, -2.75, 1.7)
pt3dadd(-276.15, -810.47, -2.75, 1.7)
pt3dadd(-275.82, -810.28, -2.75, 1.7)
pt3dadd(-275.31, -809.7, -2.75, 1.7)
pt3dadd(-274.8, -809.32, -2.75, 1.7)
pt3dadd(-274.46, -808.55, -2.75, 1.7)
pt3dadd(-274.12, -808.16, -2.75, 1.7)
pt3dadd(-273.78, -807.77, -2.75, 1.7)
pt3dadd(-273.61, -807.19, -2.75, 1.7)
pt3dadd(-273.27, -806.81, -2.75, 1.7)
pt3dadd(-273.1, -806.42, -2.75, 1.7)
pt3dadd(-272.76, -805.84, -2.75, 1.7)
pt3dadd(-272.42, -805.27, -2.75, 1.7)
pt3dadd(-272.25, -804.88, -2.75, 1.7)
pt3dadd(-272.08, -804.3, -2.75, 1.7)
pt3dadd(-271.74, -803.72, -2.75, 1.7)
pt3dadd(-271.4, -803.34, -2.75, 1.7)
pt3dadd(-271.06, -803.14, -2.75, 1.7)
pt3dadd(-270.89, -802.57, -2.75, 1.7)
pt3dadd(-270.72, -801.99, -2.75, 1.7)
pt3dadd(-270.38, -801.6, -2.75, 1.7)
pt3dadd(-270.04, -801.02, -2.75, 1.7)
pt3dadd(-269.53, -800.06, -2.75, 1.7)
pt3dadd(-269.36, -799.48, -2.75, 1.7)
pt3dadd(-268.85, -798.32, -2.75, 1.7)
pt3dadd(-268.34, -797.55, -2.75, 1.7)
pt3dadd(-268, -796.97, -2.75, 1.7)
pt3dadd(-267.66, -796.39, -2.75, 1.7)
pt3dadd(-267.49, -795.62, -2.75, 1.7)
pt3dadd(-267.15, -795.23, -2.75, 1.7)
pt3dadd(-266.81, -794.46, -2.75, 1.7)
pt3dadd(-266.47, -793.69, -2.75, 1.7)
pt3dadd(-265.96, -792.92, -2.75, 1.7)
pt3dadd(-265.62, -792.34, -2.75, 1.7)
pt3dadd(-265.46, -791.76, -2.75, 1.7)
pt3dadd(-265.12, -791.38, -2.75, 1.7)
pt3dadd(-264.78, -790.61, -2.75, 1.7)
pt3dadd(-264.61, -790.22, -2.75, 1.7)
pt3dadd(-264.27, -789.83, -2.75, 1.7)
pt3dadd(-264.1, -789.45, -2.75, 1.7)
pt3dadd(-263.93, -788.87, -2.75, 1.7)
pt3dadd(-263.59, -788.48, -2.75, 1.7)
pt3dadd(-263.42, -788.1, -2.75, 1.7)
pt3dadd(-263.25, -787.52, -2.75, 1.7)
pt3dadd(-263.08, -787.13, -2.75, 1.7)
pt3dadd(-262.74, -786.94, -2.75, 1.7)
pt3dadd(-262.57, -786.75, -2.75, 1.7)
pt3dadd(-262.4, -786.17, -2.75, 1.7)
pt3dadd(-262.06, -785.98, -2.75, 1.7)
pt3dadd(-261.89, -785.78, -2.75, 1.7)
pt3dadd(-261.72, -785.59, -2.75, 1.7)
pt3dadd(-261.55, -785.2, -2.75, 1.7)
pt3dadd(-261.38, -785.01, -2.75, 1.7)
pt3dadd(-261.04, -784.43, -2.75, 1.7)
pt3dadd(-261.04, -783.85, -2.75, 1.7)
pt3dadd(-260.7, -783.66, -2.75, 1.7)
pt3dadd(-260.53, -783.47, -2.75, 1.7)
pt3dadd(-260.36, -783.28, -2.75, 1.7)
pt3dadd(-260.36, -782.89, -2.75, 1.7)
pt3dadd(-260.19, -782.7, -2.75, 1.7)
pt3dadd(-260.02, -782.5, -2.75, 1.7)
pt3dadd(-259.85, -782.31, -2.75, 1.7)
pt3dadd(-260.36, -783.18, -2.75, 1.7)
pt3dadd(-260.36, -783.37, -2.75, 1.7)
pt3dadd(-260.19, -783.18, -2.75, 1.7)
pt3dadd(-260.02, -782.99, -2.75, 1.7)
pt3dadd(-259.85, -782.6, -2.75, 1.7)
pt3dadd(-259.68, -782.41, -2.75, 1.7)
pt3dadd(-259.51, -782.21, -2.75, 1.7)
pt3dadd(-259.34, -782.02, -2.75, 1.7)
pt3dadd(-259.17, -781.83, -2.75, 1.7)
pt3dadd(-259, -781.64, -2.75, 1.7)
pt3dadd(-258.83, -781.44, -2.75, 1.7)
pt3dadd(-258.66, -781.25, -2.75, 1.7)
pt3dadd(-258.49, -780.86, -2.75, 1.7)
pt3dadd(-258.32, -780.48, -2.75, 1.7)
pt3dadd(-258.15, -780.29, -2.75, 1.7)
pt3dadd(-257.98, -780.09, -2.75, 1.7)
pt3dadd(-257.81, -779.9, -2.75, 1.7)
pt3dadd(-257.64, -779.71, -2.75, 1.7)
pt3dadd(-257.47, -779.32, -2.75, 1.7)
pt3dadd(-257.3, -778.93, -2.75, 1.7)
pt3dadd(-256.96, -778.74, -2.75, 1.7)
pt3dadd(-256.79, -778.36, -2.75, 1.7)
pt3dadd(-256.62, -777.97, -2.75, 1.7)
pt3dadd(-256.28, -777.58, -2.75, 1.7)
pt3dadd(-256.11, -777.2, -2.75, 1.7)
pt3dadd(-255.94, -776.81, -2.75, 1.7)
pt3dadd(-255.6, -776.62, -2.75, 1.7)
pt3dadd(-255.26, -776.43, -2.75, 1.7)
pt3dadd(-255.1, -776.04, -2.75, 1.7)
pt3dadd(-254.76, -775.46, -2.75, 1.7)
pt3dadd(-254.59, -775.27, -2.75, 1.7)
pt3dadd(-254.42, -774.88, -2.75, 1.7)
pt3dadd(-254.25, -774.31, -2.75, 1.7)
pt3dadd(-253.91, -773.73, -2.75, 1.7)
pt3dadd(-253.74, -773.34, -2.75, 1.7)
pt3dadd(-253.4, -772.95, -2.75, 1.7)
pt3dadd(-253.4, -772.57, -2.75, 1.7)
pt3dadd(-253.06, -772.18, -2.75, 1.7)
pt3dadd(-252.89, -771.8, -2.75, 1.7)
pt3dadd(-252.55, -771.22, -2.75, 1.7)
pt3dadd(-252.55, -770.83, -2.75, 1.7)
pt3dadd(-252.21, -770.64, -2.75, 1.7)
pt3dadd(-252.21, -770.25, -2.75, 1.7)
pt3dadd(-251.87, -769.68, -2.75, 1.7)
pt3dadd(-251.7, -769.29, -2.75, 1.7)
pt3dadd(-251.36, -769.1, -2.75, 1.7)
pt3dadd(-251.19, -768.9, -2.75, 1.7)
pt3dadd(-251.02, -768.52, -2.75, 1.7)
pt3dadd(-250.68, -767.94, -2.75, 1.7)
pt3dadd(-250.51, -767.36, -2.75, 1.7)
pt3dadd(-250.34, -766.97, -2.75, 1.7)
pt3dadd(-249.83, -766.4, -2.75, 1.7)
pt3dadd(-249.49, -765.62, -2.75, 1.7)
pt3dadd(-249.15, -764.85, -2.75, 1.7)
pt3dadd(-248.64, -764.27, -2.75, 1.7)
pt3dadd(-248.3, -763.31, -2.75, 1.7)
pt3dadd(-247.96, -762.92, -2.75, 1.7)
pt3dadd(-247.45, -761.96, -2.75, 1.7)
pt3dadd(-247.28, -761.57, -2.75, 1.7)
pt3dadd(-246.94, -761.19, -2.75, 1.7)
pt3dadd(-246.6, -760.61, -2.75, 1.7)
pt3dadd(-246.26, -759.64, -2.75, 1.7)
pt3dadd(-245.92, -759.07, -2.75, 1.7)
pt3dadd(-245.41, -758.29, -2.75, 1.7)
pt3dadd(-245.07, -757.91, -2.75, 1.7)
pt3dadd(-244.9, -757.52, -2.75, 1.7)
pt3dadd(-244.57, -756.94, -2.75, 1.7)
pt3dadd(-244.4, -756.37, -2.75, 1.7)
}
}
proc shape3d_7() {
dend { pt3dadd(-243.89, -755.79, -2.75, 1.7)
pt3dadd(-243.72, -755.02, -2.75, 1.7)
pt3dadd(-243.38, -754.63, -2.75, 1.7)
pt3dadd(-243.04, -753.86, -2.75, 1.7)
pt3dadd(-242.87, -753.28, -2.75, 1.7)
pt3dadd(-242.53, -752.89, -2.75, 1.7)
pt3dadd(-242.36, -752.31, -2.75, 1.7)
pt3dadd(-242.02, -751.93, -2.75, 1.7)
pt3dadd(-242.02, -751.54, -2.75, 1.7)
pt3dadd(-241.68, -751.16, -2.75, 1.7)
pt3dadd(-241.34, -750.58, -2.75, 1.7)
pt3dadd(-241.17, -750.19, -2.75, 1.7)
pt3dadd(-241, -750, -2.75, 1.7)
pt3dadd(-240.83, -749.61, -2.75, 1.7)
pt3dadd(-240.66, -749.23, -2.75, 1.7)
pt3dadd(-240.49, -748.84, -2.75, 1.7)
pt3dadd(-240.32, -748.26, -2.75, 1.7)
pt3dadd(-240.15, -748.07, -2.75, 1.7)
pt3dadd(-239.98, -747.49, -2.75, 1.7)
pt3dadd(-239.64, -747.3, -2.75, 1.7)
pt3dadd(-239.47, -746.91, -2.75, 1.7)
pt3dadd(-239.3, -746.53, -2.75, 1.7)
pt3dadd(-239.13, -746.14, -2.75, 1.7)
pt3dadd(-238.96, -745.76, -2.75, 1.7)
pt3dadd(-238.62, -745.37, -2.75, 1.7)
pt3dadd(-238.62, -744.98, -2.75, 1.7)
pt3dadd(-238.45, -744.6, -2.75, 1.7)
pt3dadd(-238.11, -744.02, -2.75, 1.7)
pt3dadd(-237.94, -743.83, -2.75, 1.7)
pt3dadd(-237.77, -743.44, -2.75, 1.7)
pt3dadd(-237.6, -743.06, -2.75, 1.7)
pt3dadd(-237.43, -742.67, -2.75, 1.7)
pt3dadd(-236.92, -741.7, -2.75, 1.7)
pt3dadd(-236.75, -741.32, -2.75, 1.7)
pt3dadd(-236.58, -740.93, -2.75, 1.7)
pt3dadd(-236.41, -740.55, -2.75, 1.7)
pt3dadd(-236.07, -739.97, -2.75, 1.7)
pt3dadd(-235.9, -739.78, -2.75, 1.7)
pt3dadd(-235.73, -739.39, -2.75, 1.7)
pt3dadd(-236.24, -740.26, -2.75, 1.7)
pt3dadd(-236.07, -740.07, -2.75, 1.7)
pt3dadd(-236.07, -739.49, -2.75, 1.7)
pt3dadd(-235.9, -739.29, -2.75, 1.7)
pt3dadd(-235.56, -738.71, -2.75, 1.7)
pt3dadd(-235.22, -737.75, -2.75, 1.7)
pt3dadd(-235.05, -737.36, -2.75, 1.7)
pt3dadd(-234.88, -736.79, -2.75, 1.7)
pt3dadd(-234.71, -736.21, -2.75, 1.7)
pt3dadd(-234.54, -735.82, -2.75, 1.7)
pt3dadd(-234.37, -735.24, -2.75, 1.7)
pt3dadd(-234.21, -734.66, -2.75, 1.7)
pt3dadd(-234.21, -734.28, -2.75, 1.7)
pt3dadd(-234.04, -734.09, -2.75, 1.7)
pt3dadd(-234.04, -733.7, -2.75, 1.7)
pt3dadd(-233.87, -733.51, -2.75, 1.7)
pt3dadd(-233.7, -733.12, -2.75, 1.7)
pt3dadd(-233.53, -732.93, -2.75, 1.7)
pt3dadd(-233.53, -732.54, -2.75, 1.7)
pt3dadd(-233.36, -732.16, -2.75, 1.7)
pt3dadd(-233.19, -731.77, -2.75, 1.7)
pt3dadd(-233.02, -731.38, -2.75, 1.7)
pt3dadd(-232.85, -731.19, -2.75, 1.7)
pt3dadd(-232.68, -730.81, -2.75, 1.7)
pt3dadd(-232.51, -730.61, -2.75, 1.7)
pt3dadd(-232.34, -730.03, -2.75, 1.7)
pt3dadd(-232.17, -729.65, -2.75, 1.7)
pt3dadd(-232, -729.26, -2.75, 1.7)
pt3dadd(-231.83, -728.88, -2.75, 1.7)
pt3dadd(-231.49, -728.49, -2.75, 1.7)
pt3dadd(-231.32, -727.91, -2.75, 1.7)
pt3dadd(-230.98, -727.33, -2.75, 1.7)
pt3dadd(-230.81, -726.76, -2.75, 1.7)
pt3dadd(-230.64, -726.37, -2.75, 1.7)
pt3dadd(-230.13, -725.21, -2.75, 1.7)
pt3dadd(-229.96, -724.63, -2.75, 1.7)
pt3dadd(-229.45, -724.25, -2.75, 1.7)
pt3dadd(-229.11, -723.67, -2.75, 1.7)
pt3dadd(-229.11, -723.09, -2.75, 1.7)
pt3dadd(-228.77, -722.7, -2.75, 1.7)
pt3dadd(-228.6, -722.32, -2.75, 1.7)
pt3dadd(-228.43, -721.93, -2.75, 1.7)
pt3dadd(-228.09, -721.35, -2.75, 1.7)
pt3dadd(-227.92, -720.78, -2.75, 1.7)
pt3dadd(-227.58, -720, -2.75, 1.7)
pt3dadd(-227.07, -719.04, -2.75, 1.7)
pt3dadd(-226.73, -718.46, -2.75, 1.7)
pt3dadd(-226.56, -717.88, -2.75, 1.7)
pt3dadd(-226.22, -717.3, -2.75, 1.7)
pt3dadd(-225.88, -716.92, -2.75, 1.7)
pt3dadd(-225.71, -716.34, -2.75, 1.7)
pt3dadd(-225.54, -715.76, -2.75, 1.7)
pt3dadd(-225.2, -715.37, -2.75, 1.7)
pt3dadd(-225.03, -714.99, -2.75, 1.7)
pt3dadd(-224.86, -714.22, -2.75, 1.7)
pt3dadd(-224.69, -713.83, -2.75, 1.7)
pt3dadd(-224.35, -713.25, -2.75, 1.7)
pt3dadd(-224.18, -712.67, -2.75, 1.7)
pt3dadd(-223.85, -712.09, -2.75, 1.7)
pt3dadd(-223.68, -711.71, -2.75, 1.7)
pt3dadd(-223.51, -711.13, -2.75, 1.7)
pt3dadd(-223.17, -710.55, -2.75, 1.7)
pt3dadd(-222.83, -710.17, -2.75, 1.7)
pt3dadd(-222.66, -709.59, -2.75, 1.7)
pt3dadd(-222.49, -709.2, -2.75, 1.7)
pt3dadd(-222.32, -709.01, -2.75, 1.7)
pt3dadd(-222.15, -708.62, -2.75, 1.7)
pt3dadd(-221.98, -708.04, -2.75, 1.7)
pt3dadd(-221.81, -707.66, -2.75, 1.7)
pt3dadd(-221.47, -707.08, -2.75, 1.7)
pt3dadd(-221.47, -706.69, -2.75, 1.7)
pt3dadd(-221.13, -706.11, -2.75, 1.7)
pt3dadd(-220.96, -705.54, -2.75, 1.7)
pt3dadd(-220.79, -705.15, -2.75, 1.7)
pt3dadd(-220.79, -704.19, -2.75, 1.7)
pt3dadd(-220.62, -703.8, -2.75, 1.7)
pt3dadd(-220.62, -694.73, -2.75, 1.7)
pt3dadd(-220.96, -695.02, -2.75, 1.7)
pt3dadd(-221.13, -694.64, -2.75, 1.7)
pt3dadd(-221.3, -694.44, -2.75, 1.7)
pt3dadd(-221.47, -694.06, -2.75, 1.7)
pt3dadd(-221.64, -693.87, -2.75, 1.7)
pt3dadd(-221.98, -693.48, -2.75, 1.7)
pt3dadd(-222.15, -693.29, -2.75, 1.7)
pt3dadd(-222.66, -692.71, -2.75, 1.7)
pt3dadd(-222.83, -692.52, -2.75, 1.7)
pt3dadd(-223, -692.13, -2.75, 1.7)
pt3dadd(-223, -691.74, -2.75, 1.7)
pt3dadd(-223.17, -691.36, -2.75, 1.7)
pt3dadd(-223.34, -691.16, -2.75, 1.7)
pt3dadd(-223.68, -690.78, -2.75, 1.7)
pt3dadd(-224.01, -690.39, -2.75, 1.7)
pt3dadd(-224.18, -690.2, -2.75, 1.7)
pt3dadd(-224.52, -690.01, -2.75, 1.7)
pt3dadd(-224.69, -689.62, -2.75, 1.7)
pt3dadd(-225.03, -689.43, -2.75, 1.7)
pt3dadd(-225.37, -689.04, -2.75, 1.7)
pt3dadd(-225.71, -688.85, -2.75, 1.7)
pt3dadd(-226.05, -688.66, -2.75, 1.7)
pt3dadd(-226.39, -688.46, -2.75, 1.7)
pt3dadd(-226.73, -688.08, -2.75, 1.7)
pt3dadd(-227.24, -687.69, -2.75, 1.7)
pt3dadd(-227.58, -687.5, -2.75, 1.7)
pt3dadd(-227.75, -687.11, -2.75, 1.7)
pt3dadd(-228.09, -686.92, -2.75, 1.7)
pt3dadd(-228.6, -686.54, -2.75, 1.7)
pt3dadd(-228.77, -686.34, -2.75, 1.7)
pt3dadd(-229.11, -686.15, -2.75, 1.7)
pt3dadd(-229.28, -685.96, -2.75, 1.7)
pt3dadd(-229.62, -685.76, -2.75, 1.7)
pt3dadd(-229.96, -685.38, -2.75, 1.7)
pt3dadd(-230.3, -685.18, -2.75, 1.7)
pt3dadd(-230.47, -684.99, -2.75, 1.7)
pt3dadd(-230.64, -684.8, -2.75, 1.7)
pt3dadd(-230.98, -684.8, -2.75, 1.7)
pt3dadd(-231.32, -684.61, -2.75, 1.7)
pt3dadd(-231.49, -684.22, -2.75, 1.7)
pt3dadd(-231.83, -684.03, -2.75, 1.7)
pt3dadd(-232.17, -683.83, -2.75, 1.7)
pt3dadd(-232.68, -683.64, -2.75, 1.7)
pt3dadd(-232.85, -683.45, -2.75, 1.7)
pt3dadd(-233.19, -683.26, -2.75, 1.7)
pt3dadd(-233.53, -682.87, -2.75, 1.7)
pt3dadd(-233.87, -682.68, -2.75, 1.7)
pt3dadd(-234.21, -682.68, -2.75, 1.7)
pt3dadd(-234.54, -682.48, -2.75, 1.7)
pt3dadd(-234.71, -682.29, -2.75, 1.7)
pt3dadd(-235.05, -682.1, -2.75, 1.7)
pt3dadd(-235.22, -681.91, -2.75, 1.7)
pt3dadd(-235.56, -681.71, -2.75, 1.7)
pt3dadd(-235.9, -681.52, -2.75, 1.7)
pt3dadd(-236.24, -681.33, -2.75, 1.7)
pt3dadd(-236.41, -681.13, -2.75, 1.7)
pt3dadd(-236.58, -680.94, -2.75, 1.7)
pt3dadd(-236.75, -680.56, -2.75, 1.7)
pt3dadd(-237.09, -680.36, -2.75, 1.7)
pt3dadd(-237.43, -680.17, -2.75, 1.7)
pt3dadd(-237.6, -679.78, -2.75, 1.7)
pt3dadd(-237.94, -679.4, -2.75, 1.7)
pt3dadd(-238.45, -678.82, -2.75, 1.7)
pt3dadd(-238.62, -678.24, -2.75, 1.7)
pt3dadd(-239.3, -677.47, -2.75, 1.7)
pt3dadd(-239.64, -676.89, -2.75, 1.7)
pt3dadd(-239.98, -676.5, -2.75, 1.7)
pt3dadd(-240.15, -676.31, -2.75, 1.7)
pt3dadd(-240.32, -675.73, -2.75, 1.7)
pt3dadd(-240.49, -675.35, -2.75, 1.7)
pt3dadd(-240.66, -674.96, -2.75, 1.7)
pt3dadd(-240.83, -674.58, -2.75, 1.7)
pt3dadd(-241.17, -674.38, -2.75, 1.7)
pt3dadd(-241.34, -673.8, -2.75, 1.7)
pt3dadd(-241.51, -673.22, -2.75, 1.7)
pt3dadd(-242.02, -672.65, -2.75, 1.7)
pt3dadd(-242.19, -672.07, -2.75, 1.7)
pt3dadd(-242.36, -671.68, -2.75, 1.7)
pt3dadd(-242.7, -671.49, -2.75, 1.7)
pt3dadd(-242.87, -670.91, -2.75, 1.7)
pt3dadd(-242.87, -670.52, -2.75, 1.7)
pt3dadd(-243.21, -670.14, -2.75, 1.7)
pt3dadd(-243.38, -669.75, -2.75, 1.7)
pt3dadd(-243.55, -669.37, -2.75, 1.7)
}
}
proc shape3d_8() {
dend { pt3dadd(-243.89, -668.98, -2.75, 1.7)
pt3dadd(-244.06, -668.4, -2.75, 1.7)
pt3dadd(-244.4, -667.63, -2.75, 1.7)
pt3dadd(-244.74, -667.24, -2.75, 1.7)
pt3dadd(-245.24, -666.09, -2.75, 1.7)
pt3dadd(-245.58, -665.32, -2.75, 1.7)
pt3dadd(-245.92, -664.74, -2.75, 1.7)
pt3dadd(-246.26, -663.97, -2.75, 1.7)
pt3dadd(-246.43, -663.39, -2.75, 1.7)
pt3dadd(-246.94, -662.81, -2.75, 1.7)
pt3dadd(-246.94, -662.42, -2.75, 1.7)
pt3dadd(-247.28, -662.23, -2.75, 1.7)
pt3dadd(-247.45, -661.65, -2.75, 1.7)
pt3dadd(-247.62, -661.27, -2.75, 1.7)
pt3dadd(-247.79, -660.88, -2.75, 1.7)
pt3dadd(-247.96, -660.49, -2.75, 1.7)
pt3dadd(-248.13, -659.91, -2.75, 1.7)
pt3dadd(-248.13, -659.34, -2.75, 1.7)
pt3dadd(-248.3, -658.76, -2.75, 1.7)
pt3dadd(-248.47, -658.56, -2.75, 1.7)
pt3dadd(-248.64, -658.18, -2.75, 1.7)
pt3dadd(-248.64, -657.41, -2.75, 1.7)
pt3dadd(-248.81, -657.21, -2.75, 1.7)
pt3dadd(-248.98, -656.83, -2.75, 1.7)
pt3dadd(-248.98, -648.73, -2.75, 1.7)
pt3dadd(-248.81, -648.15, -2.75, 1.7)
pt3dadd(-248.81, -646.99, -2.75, 1.7)
pt3dadd(-248.64, -646.8, -2.75, 1.7)
pt3dadd(-248.64, -646.89, -4.75, 1.7)
pt3dadd(-248.64, -647.09, -4.75, 1.7)
pt3dadd(-248.47, -646.7, -4.75, 1.7)
pt3dadd(-248.47, -646.32, -4.75, 1.7)
pt3dadd(-248.3, -646.12, -4.75, 1.7)
pt3dadd(-248.13, -645.74, -4.75, 1.7)
pt3dadd(-247.96, -645.54, -4.75, 1.7)
pt3dadd(-247.96, -644.58, -4.75, 1.7)
pt3dadd(-247.62, -644.19, -4.75, 1.7)
pt3dadd(-247.28, -643.81, -4.75, 1.7)
pt3dadd(-246.94, -643.04, -4.75, 1.7)
pt3dadd(-246.77, -642.84, -4.75, 1.7)
pt3dadd(-246.6, -642.26, -4.75, 1.7)
pt3dadd(-246.26, -641.88, -4.75, 1.7)
pt3dadd(-246.26, -641.49, -4.75, 1.7)
pt3dadd(-246.09, -641.11, -4.75, 1.7)
pt3dadd(-245.75, -640.91, -4.75, 1.7)
pt3dadd(-245.58, -640.34, -4.75, 1.7)
pt3dadd(-245.41, -639.95, -4.75, 1.7)
pt3dadd(-245.24, -639.56, -4.75, 1.7)
pt3dadd(-244.9, -639.18, -4.75, 1.7)
pt3dadd(-244.73, -638.79, -4.75, 1.7)
pt3dadd(-244.4, -638.21, -4.75, 1.7)
pt3dadd(-244.23, -637.63, -4.75, 1.7)
pt3dadd(-243.89, -637.25, -4.75, 1.7)
pt3dadd(-243.72, -636.67, -4.75, 1.7)
pt3dadd(-243.55, -636.09, -4.75, 1.7)
pt3dadd(-243.21, -635.9, -4.75, 1.7)
pt3dadd(-243.21, -635.32, -4.75, 1.7)
pt3dadd(-242.87, -635.13, -4.75, 1.7)
pt3dadd(-242.7, -634.74, -4.75, 1.7)
pt3dadd(-242.53, -634.16, -4.75, 1.7)
pt3dadd(-242.36, -633.78, -4.75, 1.7)
pt3dadd(-242.02, -633.39, -4.75, 1.7)
pt3dadd(-241.85, -632.81, -4.75, 1.7)
pt3dadd(-241.51, -632.04, -4.75, 1.7)
pt3dadd(-241.34, -631.65, -4.75, 1.7)
pt3dadd(-241, -631.08, -4.75, 1.7)
pt3dadd(-240.83, -630.69, -4.75, 1.7)
pt3dadd(-240.66, -630.3, -4.75, 1.7)
pt3dadd(-240.32, -629.73, -4.75, 1.7)
pt3dadd(-239.98, -628.95, -4.75, 1.7)
pt3dadd(-239.64, -628.57, -4.75, 1.7)
pt3dadd(-239.3, -627.99, -4.75, 1.7)
pt3dadd(-238.79, -627.03, -4.75, 1.7)
pt3dadd(-238.62, -626.64, -4.75, 1.7)
pt3dadd(-238.28, -626.06, -4.75, 1.7)
pt3dadd(-237.77, -625.67, -4.75, 1.7)
pt3dadd(-237.43, -625.1, -4.75, 1.7)
pt3dadd(-237.09, -624.52, -4.75, 1.7)
pt3dadd(-236.58, -623.94, -4.75, 1.7)
pt3dadd(-236.07, -623.55, -4.75, 1.7)
pt3dadd(-235.56, -623.17, -4.75, 1.7)
pt3dadd(-235.22, -622.78, -4.75, 1.7)
pt3dadd(-234.37, -621.82, -4.75, 1.7)
pt3dadd(-233.87, -621.43, -4.75, 1.7)
pt3dadd(-233.19, -620.85, -4.75, 1.7)
pt3dadd(-232.85, -620.47, -4.75, 1.7)
pt3dadd(-232.34, -620.08, -4.75, 1.7)
pt3dadd(-231.66, -619.69, -4.75, 1.7)
pt3dadd(-231.32, -619.31, -4.75, 1.7)
pt3dadd(-230.64, -618.92, -4.75, 1.7)
pt3dadd(-230.13, -618.54, -4.75, 1.7)
pt3dadd(-229.79, -618.34, -4.75, 1.7)
pt3dadd(-228.94, -617.77, -4.75, 1.7)
pt3dadd(-228.43, -617.57, -4.75, 1.7)
pt3dadd(-227.92, -617.19, -4.75, 1.7)
pt3dadd(-227.41, -616.99, -4.75, 1.7)
pt3dadd(-227.07, -616.8, -4.75, 1.7)
pt3dadd(-226.56, -616.61, -4.75, 1.7)
pt3dadd(-226.05, -616.22, -4.75, 1.7)
pt3dadd(-225.71, -616.22, -4.75, 1.7)
pt3dadd(-225.37, -616.03, -4.75, 1.7)
pt3dadd(-224.69, -615.64, -4.75, 1.7)
pt3dadd(-224.35, -615.64, -4.75, 1.7)
pt3dadd(-223.85, -615.26, -4.75, 1.7)
pt3dadd(-223.34, -615.26, -4.75, 1.7)
pt3dadd(-223, -614.87, -4.75, 1.7)
pt3dadd(-222.49, -614.87, -4.75, 1.7)
pt3dadd(-221.98, -614.49, -4.75, 1.7)
pt3dadd(-221.47, -614.29, -4.75, 1.7)
pt3dadd(-220.96, -614.1, -4.75, 1.7)
pt3dadd(-220.28, -613.91, -4.75, 1.7)
pt3dadd(-219.94, -613.71, -4.75, 1.7)
pt3dadd(-219.26, -613.52, -4.75, 1.7)
pt3dadd(-218.75, -613.14, -4.75, 1.7)
pt3dadd(-218.07, -613.14, -4.75, 1.7)
pt3dadd(-217.56, -612.94, -4.75, 1.7)
pt3dadd(-217.05, -612.75, -4.75, 1.7)
pt3dadd(-216.37, -612.75, -4.75, 1.7)
pt3dadd(-215.86, -612.56, -4.75, 1.7)
pt3dadd(-215.52, -612.36, -4.75, 1.7)
pt3dadd(-214.16, -612.36, -4.75, 1.7)
pt3dadd(-213.82, -612.17, -4.75, 1.7)
pt3dadd(-209.58, -612.17, -4.75, 1.7)
pt3dadd(-210.09, -612.46, -5.75, 1.7)
pt3dadd(-209.75, -612.46, -5.75, 1.7)
pt3dadd(-209.41, -612.65, -5.75, 1.7)
pt3dadd(-208.05, -612.65, -5.75, 1.7)
pt3dadd(-207.71, -612.85, -5.75, 1.7)
pt3dadd(-206.52, -612.85, -5.75, 1.7)
pt3dadd(-206.18, -613.04, -5.75, 1.7)
pt3dadd(-205.16, -613.04, -5.75, 1.7)
pt3dadd(-204.82, -613.23, -5.75, 1.7)
pt3dadd(-203.46, -613.23, -5.75, 1.7)
pt3dadd(-202.96, -613.43, -5.75, 1.7)
pt3dadd(-199.56, -613.43, -5.75, 1.7)
pt3dadd(-199.22, -613.62, -5.75, 1.7)
pt3dadd(-197.69, -613.62, -5.75, 1.7)
pt3dadd(-197.18, -613.81, -5.75, 1.7)
pt3dadd(-195.48, -613.81, -5.75, 1.7)
pt3dadd(-194.63, -614, -5.75, 1.7)
pt3dadd(-193.1, -614, -5.75, 1.7)
pt3dadd(-192.26, -614.2, -5.75, 1.7)
pt3dadd(-190.9, -614.2, -5.75, 1.7)
pt3dadd(-189.88, -614.39, -5.75, 1.7)
pt3dadd(-189.2, -614.39, -5.75, 1.7)
pt3dadd(-188.69, -614.58, -5.75, 1.7)
pt3dadd(-187.5, -614.58, -5.75, 1.7)
pt3dadd(-187.16, -614.78, -5.75, 1.7)
pt3dadd(-186.31, -614.78, -5.75, 1.7)
pt3dadd(-185.97, -614.97, -5.75, 1.7)
pt3dadd(-185.29, -614.97, -5.75, 1.7)
pt3dadd(-184.78, -615.16, -5.75, 1.7)
pt3dadd(-184.44, -615.16, -5.75, 1.7)
pt3dadd(-184.1, -615.35, -5.75, 1.7)
pt3dadd(-183.59, -615.35, -5.75, 1.7)
pt3dadd(-182.91, -615.55, -5.75, 1.7)
pt3dadd(-182.23, -615.55, -5.75, 1.7)
pt3dadd(-181.73, -615.74, -5.75, 1.7)
pt3dadd(-181.05, -615.93, -5.75, 1.7)
pt3dadd(-179.86, -615.93, -5.75, 1.7)
pt3dadd(-179.35, -616.13, -5.75, 1.7)
pt3dadd(-178.84, -616.13, -5.75, 1.7)
pt3dadd(-178.5, -616.32, -5.75, 1.7)
pt3dadd(-177.48, -616.32, -5.75, 1.7)
pt3dadd(-176.97, -616.51, -5.75, 1.7)
pt3dadd(-175.44, -616.51, -5.75, 1.7)
pt3dadd(-175.1, -616.7, -5.75, 1.7)
pt3dadd(-173.23, -616.7, -5.75, 1.7)
pt3dadd(-172.72, -616.9, -5.75, 1.7)
pt3dadd(-163.21, -616.9, -5.75, 1.7)
pt3dadd(-163.21, -616.8, -7.75, 1.7)
pt3dadd(-154.89, -616.8, -7.75, 1.7)
pt3dadd(-154.55, -616.42, -7.75, 1.7)
pt3dadd(-154.21, -616.22, -7.75, 1.7)
pt3dadd(-153.53, -616.22, -7.75, 1.7)
pt3dadd(-153.19, -616.03, -7.75, 1.7)
pt3dadd(-152.68, -615.84, -7.75, 1.7)
pt3dadd(-151.83, -615.84, -7.75, 1.7)
pt3dadd(-151.49, -615.64, -7.75, 1.7)
pt3dadd(-151.15, -615.45, -7.75, 1.7)
pt3dadd(-150.65, -615.45, -7.75, 1.7)
pt3dadd(-150.31, -615.26, -7.75, 1.7)
pt3dadd(-149.97, -615.07, -7.75, 1.7)
pt3dadd(-149.46, -614.87, -7.75, 1.7)
pt3dadd(-149.29, -614.68, -7.75, 1.7)
pt3dadd(-148.78, -614.29, -7.75, 1.7)
pt3dadd(-148.44, -614.1, -7.75, 1.7)
pt3dadd(-148.1, -613.91, -7.75, 1.7)
pt3dadd(-147.93, -613.71, -7.75, 1.7)
pt3dadd(-147.59, -613.52, -7.75, 1.7)
pt3dadd(-147.08, -613.33, -7.75, 1.7)
pt3dadd(-146.91, -613.14, -7.75, 1.7)
pt3dadd(-146.4, -612.94, -7.75, 1.7)
pt3dadd(-146.23, -612.56, -7.75, 1.7)
pt3dadd(-146.06, -612.36, -7.75, 1.7)
pt3dadd(-145.72, -612.17, -7.75, 1.7)
pt3dadd(-145.38, -611.98, -7.75, 1.7)
pt3dadd(-145.04, -611.79, -7.75, 1.7)
pt3dadd(-144.7, -611.59, -7.75, 1.7)
pt3dadd(-144.53, -611.21, -7.75, 1.7)
}
}
proc shape3d_9() {
dend { pt3dadd(-144.36, -610.82, -7.75, 1.7)
pt3dadd(-143.85, -610.24, -7.75, 1.7)
pt3dadd(-143.51, -610.05, -7.75, 1.7)
pt3dadd(-143.34, -609.66, -7.75, 1.7)
pt3dadd(-143, -609.47, -7.75, 1.7)
pt3dadd(-142.66, -609.28, -7.75, 1.7)
pt3dadd(-142.32, -609.09, -7.75, 1.7)
pt3dadd(-141.98, -609.09, -7.75, 1.7)
pt3dadd(-141.81, -608.89, -7.75, 1.7)
pt3dadd(-141.47, -608.7, -7.75, 1.7)
pt3dadd(-141.3, -608.51, -7.75, 1.7)
pt3dadd(-140.96, -608.51, -7.75, 1.7)
pt3dadd(-140.79, -608.31, -7.75, 1.7)
pt3dadd(-140.46, -608.12, -7.75, 1.7)
pt3dadd(-140.12, -608.12, -7.75, 1.7)
pt3dadd(-139.95, -607.93, -7.75, 1.7)
pt3dadd(-139.78, -607.73, -7.75, 1.7)
pt3dadd(-140.12, -606.87, -10.75, 1.7)
pt3dadd(-140.12, -607.06, -10.75, 1.7)
pt3dadd(-140.29, -607.25, -10.75, 1.7)
pt3dadd(-140.29, -607.83, -10.75, 1.7)
pt3dadd(-139.78, -607.83, -10.75, 1.7)
pt3dadd(-139.44, -607.64, -10.75, 1.7)
pt3dadd(-139.1, -607.45, -10.75, 1.7)
pt3dadd(-138.76, -607.06, -10.75, 1.7)
pt3dadd(-138.42, -606.87, -10.75, 1.7)
pt3dadd(-138.25, -606.67, -10.75, 1.7)
pt3dadd(-138.08, -606.29, -10.75, 1.7)
pt3dadd(-137.74, -606.1, -10.75, 1.7)
pt3dadd(-137.4, -605.71, -10.75, 1.7)
pt3dadd(-137.23, -605.52, -10.75, 1.7)
pt3dadd(-136.72, -605.13, -10.75, 1.7)
pt3dadd(-136.55, -604.94, -10.75, 1.7)
pt3dadd(-136.21, -604.75, -10.75, 1.7)
pt3dadd(-135.87, -604.55, -10.75, 1.7)
pt3dadd(-135.02, -603.97, -10.75, 1.7)
pt3dadd(-134.51, -603.78, -10.75, 1.7)
pt3dadd(-134.34, -603.59, -10.75, 1.7)
pt3dadd(-134, -603.39, -10.75, 1.7)
pt3dadd(-133.66, -603.01, -10.75, 1.7)
pt3dadd(-133.15, -602.82, -10.75, 1.7)
pt3dadd(-132.81, -602.43, -10.75, 1.7)
pt3dadd(-132.47, -602.24, -10.75, 1.7)
pt3dadd(-132.13, -602.04, -10.75, 1.7)
pt3dadd(-131.79, -601.66, -10.75, 1.7)
pt3dadd(-131.62, -601.47, -10.75, 1.7)
pt3dadd(-131.28, -601.47, -10.75, 1.7)
pt3dadd(-131.11, -601.27, -10.75, 1.7)
pt3dadd(-130.77, -601.08, -10.75, 1.7)
pt3dadd(-130.26, -600.89, -10.75, 1.7)
pt3dadd(-129.93, -600.69, -10.75, 1.7)
pt3dadd(-129.59, -600.31, -10.75, 1.7)
pt3dadd(-129.25, -600.12, -10.75, 1.7)
pt3dadd(-128.74, -599.92, -10.75, 1.7)
pt3dadd(-128.23, -599.54, -10.75, 1.7)
pt3dadd(-127.55, -599.15, -10.75, 1.7)
pt3dadd(-126.87, -598.57, -10.75, 1.7)
pt3dadd(-126.02, -597.99, -10.75, 1.7)
pt3dadd(-125.34, -597.61, -10.75, 1.7)
pt3dadd(-125, -597.41, -10.75, 1.7)
pt3dadd(-124.32, -597.22, -10.75, 1.7)
pt3dadd(-123.98, -597.03, -10.75, 1.7)
pt3dadd(-123.47, -596.64, -10.75, 1.7)
pt3dadd(-123.13, -596.26, -10.75, 1.7)
pt3dadd(-122.62, -596.06, -10.75, 1.7)
pt3dadd(-122.28, -595.87, -10.75, 1.7)
pt3dadd(-121.77, -595.68, -10.75, 1.7)
pt3dadd(-121.43, -595.49, -10.75, 1.7)
pt3dadd(-121.09, -595.29, -10.75, 1.7)
pt3dadd(-120.58, -595.1, -10.75, 1.7)
pt3dadd(-120.24, -594.71, -10.75, 1.7)
pt3dadd(-119.9, -594.52, -10.75, 1.7)
pt3dadd(-119.57, -594.33, -10.75, 1.7)
pt3dadd(-119.06, -594.14, -10.75, 1.7)
pt3dadd(-118.72, -593.94, -10.75, 1.7)
pt3dadd(-118.38, -593.75, -10.75, 1.7)
pt3dadd(-118.04, -593.75, -10.75, 1.7)
pt3dadd(-117.7, -593.56, -10.75, 1.7)
pt3dadd(-117.19, -593.17, -10.75, 1.7)
pt3dadd(-116.85, -593.17, -10.75, 1.7)
pt3dadd(-116.51, -592.98, -10.75, 1.7)
pt3dadd(-116.17, -592.79, -10.75, 1.7)
pt3dadd(-116, -592.4, -10.75, 1.7)
pt3dadd(-115.49, -592.21, -10.75, 1.7)
pt3dadd(-114.98, -591.82, -10.75, 1.7)
pt3dadd(-114.64, -591.63, -10.75, 1.7)
pt3dadd(-114.13, -591.24, -10.75, 1.7)
pt3dadd(-113.79, -591.05, -10.75, 1.7)
pt3dadd(-113.28, -591.05, -10.75, 1.7)
pt3dadd(-112.94, -590.66, -10.75, 1.7)
pt3dadd(-112.6, -590.47, -10.75, 1.7)
pt3dadd(-112.09, -590.08, -10.75, 1.7)
pt3dadd(-111.41, -589.89, -10.75, 1.7)
pt3dadd(-110.9, -589.51, -10.75, 1.7)
pt3dadd(-110.22, -589.12, -10.75, 1.7)
pt3dadd(-109.71, -588.93, -10.75, 1.7)
pt3dadd(-108.87, -588.35, -10.75, 1.7)
pt3dadd(-108.36, -587.96, -10.75, 1.7)
pt3dadd(-107.68, -587.77, -10.75, 1.7)
pt3dadd(-107, -587.38, -10.75, 1.7)
pt3dadd(-106.66, -587.19, -10.75, 1.7)
pt3dadd(-106.15, -587, -10.75, 1.7)
pt3dadd(-105.81, -586.61, -10.75, 1.7)
pt3dadd(-105.3, -586.42, -10.75, 1.7)
pt3dadd(-104.96, -586.23, -10.75, 1.7)
pt3dadd(-104.62, -586.23, -10.75, 1.7)
pt3dadd(-104.11, -585.84, -10.75, 1.7)
pt3dadd(-103.77, -585.84, -10.75, 1.7)
pt3dadd(-103.43, -585.45, -10.75, 1.7)
pt3dadd(-103.09, -585.45, -10.75, 1.7)
pt3dadd(-102.75, -585.26, -10.75, 1.7)
pt3dadd(-102.07, -585.07, -10.75, 1.7)
pt3dadd(-101.73, -584.88, -10.75, 1.7)
pt3dadd(-101.39, -584.68, -10.75, 1.7)
pt3dadd(-101.05, -584.49, -10.75, 1.7)
pt3dadd(-100.71, -584.1, -10.75, 1.7)
pt3dadd(-100.2, -583.72, -10.75, 1.7)
pt3dadd(-99.69, -583.53, -10.75, 1.7)
pt3dadd(-99.35, -583.33, -10.75, 1.7)
pt3dadd(-98.85, -582.95, -10.75, 1.7)
pt3dadd(-98.51, -582.75, -10.75, 1.7)
pt3dadd(-98.17, -582.56, -10.75, 1.7)
pt3dadd(-97.66, -582.37, -10.75, 1.7)
pt3dadd(-97.32, -582.18, -10.75, 1.7)
pt3dadd(-96.81, -581.79, -10.75, 1.7)
pt3dadd(-96.3, -581.4, -10.75, 1.7)
pt3dadd(-95.96, -581.02, -10.75, 1.7)
pt3dadd(-95.62, -580.83, -10.75, 1.7)
pt3dadd(-95.28, -580.63, -10.75, 1.7)
pt3dadd(-95.11, -580.44, -10.75, 1.7)
pt3dadd(-94.77, -580.25, -10.75, 1.7)
pt3dadd(-94.43, -579.86, -10.75, 1.7)
pt3dadd(-94.26, -579.67, -10.75, 1.7)
pt3dadd(-93.92, -579.28, -10.75, 1.7)
pt3dadd(-93.58, -579.09, -10.75, 1.7)
pt3dadd(-93.41, -578.51, -10.75, 1.7)
pt3dadd(-93.07, -578.32, -10.75, 1.7)
pt3dadd(-92.73, -577.93, -10.75, 1.7)
pt3dadd(-92.39, -577.74, -10.75, 1.7)
pt3dadd(-92.22, -577.35, -10.75, 1.7)
pt3dadd(-91.88, -576.97, -10.75, 1.7)
pt3dadd(-91.54, -576.39, -10.75, 1.7)
pt3dadd(-91.2, -576.2, -10.75, 1.7)
pt3dadd(-90.86, -575.81, -10.75, 1.7)
pt3dadd(-90.52, -575.42, -10.75, 1.7)
pt3dadd(-90.52, -575.04, -10.75, 1.7)
pt3dadd(-90.35, -574.85, -10.75, 1.7)
pt3dadd(-90.01, -574.65, -10.75, 1.7)
pt3dadd(-89.67, -574.27, -10.75, 1.7)
pt3dadd(-89.33, -574.07, -10.75, 1.7)
pt3dadd(-89.16, -573.5, -10.75, 1.7)
pt3dadd(-88.99, -573.3, -10.75, 1.7)
pt3dadd(-88.82, -572.92, -10.75, 1.7)
pt3dadd(-88.65, -572.53, -10.75, 1.7)
pt3dadd(-88.32, -572.14, -10.75, 1.7)
pt3dadd(-87.98, -571.76, -10.75, 1.7)
pt3dadd(-87.64, -571.37, -10.75, 1.7)
pt3dadd(-87.47, -570.99, -10.75, 1.7)
pt3dadd(-87.3, -570.6, -10.75, 1.7)
pt3dadd(-87.13, -570.41, -10.75, 1.7)
pt3dadd(-86.62, -569.83, -10.75, 1.7)
pt3dadd(-86.45, -569.44, -10.75, 1.7)
pt3dadd(-86.28, -569.25, -10.75, 1.7)
pt3dadd(-85.94, -568.87, -10.75, 1.7)
pt3dadd(-85.6, -568.67, -10.75, 1.7)
pt3dadd(-85.43, -568.29, -10.75, 1.7)
pt3dadd(-85.26, -567.9, -10.75, 1.7)
pt3dadd(-85.09, -567.52, -10.75, 1.7)
pt3dadd(-84.92, -567.32, -10.75, 1.7)
pt3dadd(-84.75, -566.94, -10.75, 1.7)
pt3dadd(-84.41, -566.74, -10.75, 1.7)
pt3dadd(-84.24, -566.36, -10.75, 1.7)
pt3dadd(-84.07, -566.16, -10.75, 1.7)
pt3dadd(-83.39, -565.39, -10.75, 1.7)
pt3dadd(-83.22, -565.01, -10.75, 1.7)
pt3dadd(-82.88, -564.81, -10.75, 1.7)
pt3dadd(-82.71, -564.43, -10.75, 1.7)
pt3dadd(-82.54, -564.24, -10.75, 1.7)
pt3dadd(-82.2, -563.85, -10.75, 1.7)
pt3dadd(-82.03, -563.46, -10.75, 1.7)
pt3dadd(-81.69, -563.08, -10.75, 1.7)
pt3dadd(-81.52, -562.69, -10.75, 1.7)
pt3dadd(-81.18, -562.31, -10.75, 1.7)
pt3dadd(-80.84, -562.11, -10.75, 1.7)
pt3dadd(-80.67, -561.73, -10.75, 1.7)
pt3dadd(-80.5, -561.54, -10.75, 1.7)
pt3dadd(-80.16, -561.34, -10.75, 1.7)
pt3dadd(-79.99, -561.15, -10.75, 1.7)
pt3dadd(-79.82, -560.96, -10.75, 1.7)
pt3dadd(-79.65, -560.38, -10.75, 1.7)
pt3dadd(-79.48, -560.18, -10.75, 1.7)
pt3dadd(-79.14, -559.99, -10.75, 1.7)
pt3dadd(-78.97, -559.8, -10.75, 1.7)
pt3dadd(-78.8, -559.22, -10.75, 1.7)
pt3dadd(-78.63, -559.03, -10.75, 1.7)
pt3dadd(-78.29, -558.64, -10.75, 1.7)
pt3dadd(-77.96, -558.45, -10.75, 1.7)
pt3dadd(-77.79, -558.26, -10.75, 1.7)
pt3dadd(-77.45, -558.06, -10.75, 1.7)
pt3dadd(-77.28, -557.87, -10.75, 1.7)
}
}
proc shape3d_10() {
dend { pt3dadd(-76.94, -557.68, -10.75, 1.7)
pt3dadd(-76.77, -557.48, -10.75, 1.7)
pt3dadd(-76.6, -557.29, -10.75, 1.7)
pt3dadd(-76.6, -557.39, -10.75, 1.7)
pt3dadd(-76.43, -557.58, -10.75, 1.7)
pt3dadd(-76.26, -557.39, -10.75, 1.7)
pt3dadd(-75.92, -557.19, -10.75, 1.7)
pt3dadd(-75.41, -557, -10.75, 1.7)
pt3dadd(-75.07, -556.81, -10.75, 1.7)
pt3dadd(-74.73, -556.62, -10.75, 1.7)
pt3dadd(-74.39, -556.62, -10.75, 1.7)
pt3dadd(-74.05, -556.42, -10.75, 1.7)
pt3dadd(-73.71, -556.23, -10.75, 1.7)
pt3dadd(-73.54, -556.04, -10.75, 1.7)
pt3dadd(-73.37, -555.84, -10.75, 1.7)
pt3dadd(-73.03, -555.65, -10.75, 1.7)
pt3dadd(-72.69, -555.46, -10.75, 1.7)
pt3dadd(-72.35, -555.27, -10.75, 1.7)
pt3dadd(-72.01, -554.88, -10.75, 1.7)
pt3dadd(-71.67, -554.49, -10.75, 1.7)
pt3dadd(-71.33, -554.49, -10.75, 1.7)
pt3dadd(-71.16, -554.3, -10.75, 1.7)
pt3dadd(-70.82, -554.3, -10.75, 1.7)
pt3dadd(-70.48, -554.11, -10.75, 1.7)
pt3dadd(-70.31, -553.92, -10.75, 1.7)
pt3dadd(-69.8, -553.34, -10.75, 1.7)
pt3dadd(-69.46, -553.14, -10.75, 1.7)
pt3dadd(-69.29, -552.95, -10.75, 1.7)
pt3dadd(-68.95, -552.76, -10.75, 1.7)
pt3dadd(-68.61, -552.37, -10.75, 1.7)
pt3dadd(-68.44, -552.18, -10.75, 1.7)
pt3dadd(-68.1, -552.18, -10.75, 1.7)
pt3dadd(-67.93, -551.99, -10.75, 1.7)
pt3dadd(-67.76, -551.6, -10.75, 1.7)
pt3dadd(-67.09, -550.83, -10.75, 1.7)
pt3dadd(-66.92, -550.64, -10.75, 1.7)
pt3dadd(-66.75, -550.44, -10.75, 1.7)
pt3dadd(-66.58, -549.86, -10.75, 1.7)
pt3dadd(-66.41, -549.67, -10.75, 1.7)
pt3dadd(-65.73, -548.9, -10.75, 1.7)
pt3dadd(-65.56, -548.51, -10.75, 1.7)
pt3dadd(-65.39, -548.13, -10.75, 1.7)
pt3dadd(-65.22, -547.94, -10.75, 1.7)
pt3dadd(-65.05, -547.55, -10.75, 1.7)
pt3dadd(-64.71, -547.16, -10.75, 1.7)
pt3dadd(-64.54, -546.97, -10.75, 1.7)
pt3dadd(-64.37, -546.59, -10.75, 1.7)
pt3dadd(-64.03, -546.01, -10.75, 1.7)
pt3dadd(-63.86, -545.81, -10.75, 1.7)
pt3dadd(-63.52, -545.43, -10.75, 1.7)
pt3dadd(-63.01, -545.04, -10.75, 1.7)
pt3dadd(-62.84, -544.66, -10.75, 1.7)
pt3dadd(-62.67, -544.08, -10.75, 1.7)
pt3dadd(-62.33, -543.69, -10.75, 1.7)
pt3dadd(-61.99, -543.11, -10.75, 1.7)
pt3dadd(-61.82, -542.73, -10.75, 1.7)
pt3dadd(-61.65, -542.53, -10.75, 1.7)
pt3dadd(-61.48, -541.96, -10.75, 1.7)
pt3dadd(-61.14, -541.76, -10.75, 1.7)
pt3dadd(-61.14, -541.38, -10.75, 1.7)
pt3dadd(-60.8, -541.18, -10.75, 1.7)
pt3dadd(-60.63, -540.8, -10.75, 1.7)
pt3dadd(-60.46, -540.41, -10.75, 1.7)
pt3dadd(-60.12, -540.22, -10.75, 1.7)
pt3dadd(-59.78, -539.83, -10.75, 1.7)
pt3dadd(-59.61, -539.64, -10.75, 1.7)
pt3dadd(-59.44, -539.06, -10.75, 1.7)
pt3dadd(-59.27, -538.68, -10.75, 1.7)
pt3dadd(-58.93, -538.48, -10.75, 1.7)
pt3dadd(-58.76, -537.9, -10.75, 1.7)
pt3dadd(-58.59, -537.71, -10.75, 1.7)
pt3dadd(-58.42, -537.52, -10.75, 1.7)
pt3dadd(-58.08, -537.13, -10.75, 1.7)
pt3dadd(-57.91, -536.75, -10.75, 1.7)
pt3dadd(-57.57, -536.17, -10.75, 1.7)
pt3dadd(-57.23, -535.78, -10.75, 1.7)
pt3dadd(-57.07, -535.4, -10.75, 1.7)
pt3dadd(-56.9, -535.01, -10.75, 1.7)
pt3dadd(-56.73, -534.63, -10.75, 1.7)
pt3dadd(-56.05, -533.85, -10.75, 1.7)
pt3dadd(-55.88, -533.47, -10.75, 1.7)
pt3dadd(-55.71, -533.08, -10.75, 1.7)
pt3dadd(-55.54, -532.7, -10.75, 1.7)
pt3dadd(-55.37, -532.31, -10.75, 1.7)
pt3dadd(-55.2, -531.92, -10.75, 1.7)
pt3dadd(-54.86, -531.73, -10.75, 1.7)
pt3dadd(-54.69, -531.35, -10.75, 1.7)
pt3dadd(-54.52, -530.77, -10.75, 1.7)
pt3dadd(-54.18, -530.38, -10.75, 1.7)
pt3dadd(-53.84, -530, -10.75, 1.7)
pt3dadd(-53.67, -529.61, -10.75, 1.7)
pt3dadd(-53.5, -529.22, -10.75, 1.7)
pt3dadd(-53.16, -528.84, -10.75, 1.7)
pt3dadd(-52.82, -528.45, -10.75, 1.7)
pt3dadd(-52.65, -528.07, -10.75, 1.7)
pt3dadd(-52.48, -527.68, -10.75, 1.7)
pt3dadd(-52.31, -527.3, -10.75, 1.7)
pt3dadd(-52.14, -526.91, -10.75, 1.7)
pt3dadd(-51.8, -526.52, -10.75, 1.7)
pt3dadd(-51.63, -526.14, -10.75, 1.7)
pt3dadd(-51.46, -525.75, -10.75, 1.7)
pt3dadd(-51.29, -525.37, -10.75, 1.7)
pt3dadd(-50.95, -524.79, -10.75, 1.7)
pt3dadd(-50.78, -524.4, -10.75, 1.7)
pt3dadd(-50.44, -523.82, -10.75, 1.7)
pt3dadd(-50.27, -523.44, -10.75, 1.7)
pt3dadd(-50.1, -522.86, -10.75, 1.7)
pt3dadd(-49.93, -522.47, -10.75, 1.7)
pt3dadd(-49.59, -522.09, -10.75, 1.7)
pt3dadd(-49.59, -521.51, -10.75, 1.7)
pt3dadd(-49.25, -521.12, -10.75, 1.7)
pt3dadd(-49.08, -520.54, -10.75, 1.7)
pt3dadd(-48.74, -519.96, -10.75, 1.7)
pt3dadd(-48.74, -519.58, -10.75, 1.7)
pt3dadd(-48.4, -519.19, -10.75, 1.7)
pt3dadd(-48.23, -518.81, -10.75, 1.7)
pt3dadd(-48.06, -518.23, -10.75, 1.7)
pt3dadd(-47.89, -517.84, -10.75, 1.7)
pt3dadd(-47.55, -517.65, -10.75, 1.7)
pt3dadd(-47.38, -517.26, -10.75, 1.7)
pt3dadd(-47.21, -516.88, -10.75, 1.7)
pt3dadd(-47.04, -516.69, -10.75, 1.7)
pt3dadd(-46.87, -516.3, -10.75, 1.7)
pt3dadd(-46.71, -516.11, -10.75, 1.7)
pt3dadd(-46.54, -515.72, -10.75, 1.7)
pt3dadd(-46.37, -515.34, -10.75, 1.7)
pt3dadd(-46.2, -514.95, -10.75, 1.7)
pt3dadd(-45.86, -514.37, -10.75, 1.7)
pt3dadd(-45.69, -513.99, -10.75, 1.7)
pt3dadd(-45.35, -513.6, -10.75, 1.7)
pt3dadd(-45.18, -513.21, -10.75, 1.7)
pt3dadd(-45.01, -512.83, -10.75, 1.7)
pt3dadd(-45.01, -512.44, -10.75, 1.7)
pt3dadd(-44.84, -512.25, -10.75, 1.7)
pt3dadd(-44.67, -511.86, -10.75, 1.7)
pt3dadd(-44.5, -511.67, -10.75, 1.7)
pt3dadd(-44.33, -511.48, -10.75, 1.7)
pt3dadd(-44.16, -511.09, -10.75, 1.7)
pt3dadd(-43.99, -510.71, -10.75, 1.7)
pt3dadd(-43.82, -510.32, -10.75, 1.7)
pt3dadd(-43.65, -509.93, -10.75, 1.7)
pt3dadd(-43.48, -509.74, -10.75, 1.7)
pt3dadd(-43.31, -509.55, -10.75, 1.7)
pt3dadd(-43.14, -509.36, -10.75, 1.7)
pt3dadd(-42.97, -509.16, -10.75, 1.7)
pt3dadd(-42.8, -508.97, -10.75, 1.7)
pt3dadd(-42.8, -508.58, -10.75, 1.7)
pt3dadd(-42.63, -508.39, -10.75, 1.7)
pt3dadd(-42.46, -508.01, -10.75, 1.7)
pt3dadd(-42.29, -507.81, -10.75, 1.7)
pt3dadd(-42.12, -507.62, -10.75, 1.7)
pt3dadd(-42.12, -507.23, -10.75, 1.7)
pt3dadd(-41.95, -507.33, -9.75, 1.7)
pt3dadd(-41.78, -506.94, -9.75, 1.7)
pt3dadd(-41.61, -506.75, -9.75, 1.7)
pt3dadd(-41.44, -506.37, -9.75, 1.7)
pt3dadd(-41.1, -505.79, -9.75, 1.7)
pt3dadd(-40.93, -505.4, -9.75, 1.7)
pt3dadd(-40.76, -505.02, -9.75, 1.7)
pt3dadd(-40.59, -504.63, -9.75, 1.7)
pt3dadd(-40.42, -504.44, -9.75, 1.7)
pt3dadd(-40.25, -504.24, -9.75, 1.7)
pt3dadd(-40.08, -504.05, -9.75, 1.7)
pt3dadd(-39.74, -503.86, -9.75, 1.7)
pt3dadd(-39.57, -503.66, -9.75, 1.7)
pt3dadd(-39.4, -503.47, -9.75, 1.7)
pt3dadd(-39.23, -503.09, -9.75, 1.7)
pt3dadd(-39.06, -502.7, -9.75, 1.7)
pt3dadd(-38.72, -502.31, -9.75, 1.7)
pt3dadd(-38.55, -502.12, -9.75, 1.7)
pt3dadd(-38.38, -501.74, -9.75, 1.7)
pt3dadd(-38.21, -501.54, -9.75, 1.7)
pt3dadd(-38.04, -501.16, -9.75, 1.7)
pt3dadd(-37.7, -500.77, -9.75, 1.7)
pt3dadd(-37.53, -500.39, -9.75, 1.7)
pt3dadd(-37.36, -500.19, -9.75, 1.7)
pt3dadd(-37.19, -499.61, -9.75, 1.7)
pt3dadd(-37.02, -499.42, -9.75, 1.7)
pt3dadd(-36.68, -498.84, -9.75, 1.7)
pt3dadd(-36.68, -498.46, -9.75, 1.7)
pt3dadd(-36.35, -498.07, -9.75, 1.7)
pt3dadd(-36.18, -497.68, -9.75, 1.7)
pt3dadd(-36.01, -497.49, -9.75, 1.7)
pt3dadd(-36.01, -496.72, -9.75, 1.7)
pt3dadd(-35.84, -496.53, -9.75, 1.7)
pt3dadd(-35.67, -496.33, -9.75, 1.7)
pt3dadd(-35.67, -495.95, -9.75, 1.7)
pt3dadd(-35.5, -495.56, -9.75, 1.7)
pt3dadd(-35.33, -495.18, -9.75, 1.7)
pt3dadd(-35.33, -494.6, -9.75, 1.7)
pt3dadd(-35.16, -494.21, -9.75, 1.7)
pt3dadd(-34.99, -493.83, -9.75, 1.7)
pt3dadd(-34.99, -493.44, -9.75, 1.7)
pt3dadd(-34.82, -493.25, -9.75, 1.7)
pt3dadd(-34.65, -492.86, -9.75, 1.7)
pt3dadd(-34.48, -492.67, -9.75, 1.7)
pt3dadd(-34.48, -492.28, -9.75, 1.7)
pt3dadd(-34.31, -492.09, -9.75, 1.7)
pt3dadd(-34.31, -491.7, -9.75, 1.7)
pt3dadd(-34.31, -491.8, -8.75, 1.7)
}
}
proc shape3d_11() {
dend { pt3dadd(-34.48, -491.42, -8.75, 1.7)
pt3dadd(-34.48, -490.64, -8.75, 1.7)
pt3dadd(-34.65, -490.07, -8.75, 1.7)
pt3dadd(-34.65, -489.49, -8.75, 1.7)
pt3dadd(-34.82, -489.29, -8.75, 1.7)
pt3dadd(-34.82, -486.21, -8.75, 1.7)
pt3dadd(-34.65, -486.01, -8.75, 1.7)
pt3dadd(-34.65, -485.05, -8.75, 1.7)
pt3dadd(-34.48, -484.66, -8.75, 1.7)
pt3dadd(-34.48, -470, -8.75, 1.7)
pt3dadd(-34.31, -469.62, -8.75, 1.7)
pt3dadd(-34.31, -469.23, -8.75, 1.7)
pt3dadd(-34.14, -468.65, -8.75, 1.7)
pt3dadd(-34.14, -467.88, -8.75, 1.7)
pt3dadd(-33.97, -467.69, -8.75, 1.7)
pt3dadd(-34.31, -468.17, -4.75, 1.7)
pt3dadd(-34.14, -467.98, -4.75, 1.7)
pt3dadd(-33.97, -467.59, -4.75, 1.7)
pt3dadd(-33.8, -467.21, -4.75, 1.7)
pt3dadd(-33.63, -466.82, -4.75, 1.7)
pt3dadd(-33.29, -466.43, -4.75, 1.7)
pt3dadd(-32.95, -466.05, -4.75, 1.7)
pt3dadd(-32.78, -465.47, -4.75, 1.7)
pt3dadd(-32.44, -465.08, -4.75, 1.7)
pt3dadd(-32.44, -464.51, -4.75, 1.7)
pt3dadd(-32.1, -463.93, -4.75, 1.7)
pt3dadd(-31.93, -463.54, -4.75, 1.7)
pt3dadd(-31.76, -462.96, -4.75, 1.7)
pt3dadd(-31.59, -462.58, -4.75, 1.7)
pt3dadd(-31.42, -462.19, -4.75, 1.7)
pt3dadd(-31.25, -461.81, -4.75, 1.7)
pt3dadd(-31.08, -461.42, -4.75, 1.7)
pt3dadd(-30.91, -461.03, -4.75, 1.7)
pt3dadd(-30.91, -460.65, -4.75, 1.7)
pt3dadd(-30.74, -460.07, -4.75, 1.7)
pt3dadd(-30.57, -459.68, -4.75, 1.7)
pt3dadd(-30.23, -459.3, -4.75, 1.7)
pt3dadd(-30.06, -458.91, -4.75, 1.7)
pt3dadd(-29.89, -458.53, -4.75, 1.7)
pt3dadd(-29.72, -458.14, -4.75, 1.7)
pt3dadd(-29.55, -457.95, -4.75, 1.7)
pt3dadd(-29.38, -457.37, -4.75, 1.7)
pt3dadd(-29.04, -457.18, -4.75, 1.7)
pt3dadd(-28.87, -456.79, -4.75, 1.7)
pt3dadd(-28.7, -456.4, -4.75, 1.7)
pt3dadd(-28.53, -456.02, -4.75, 1.7)
pt3dadd(-28.36, -455.63, -4.75, 1.7)
pt3dadd(-28.19, -455.44, -4.75, 1.7)
pt3dadd(-28.02, -455.05, -4.75, 1.7)
pt3dadd(-27.68, -454.48, -4.75, 1.7)
pt3dadd(-27.51, -454.09, -4.75, 1.7)
pt3dadd(-27.17, -453.51, -4.75, 1.7)
pt3dadd(-26.66, -452.55, -4.75, 1.7)
pt3dadd(-26.49, -452.16, -4.75, 1.7)
pt3dadd(-26.15, -451.77, -4.75, 1.7)
pt3dadd(-25.98, -451.39, -4.75, 1.7)
pt3dadd(-25.82, -450.81, -4.75, 1.7)
pt3dadd(-25.65, -450.42, -4.75, 1.7)
pt3dadd(-25.48, -449.85, -4.75, 1.7)
pt3dadd(-25.31, -449.27, -4.75, 1.7)
pt3dadd(-24.97, -448.88, -4.75, 1.7)
pt3dadd(-24.97, -448.5, -4.75, 1.7)
pt3dadd(-24.63, -448.11, -4.75, 1.7)
pt3dadd(-24.46, -447.72, -4.75, 1.7)
pt3dadd(-24.29, -447.14, -4.75, 1.7)
pt3dadd(-24.12, -446.76, -4.75, 1.7)
pt3dadd(-23.78, -446.37, -4.75, 1.7)
pt3dadd(-23.78, -445.99, -4.75, 1.7)
pt3dadd(-23.44, -445.79, -4.75, 1.7)
pt3dadd(-23.27, -445.41, -4.75, 1.7)
pt3dadd(-23.1, -445.02, -4.75, 1.7)
pt3dadd(-22.59, -444.44, -4.75, 1.7)
pt3dadd(-22.42, -444.25, -4.75, 1.7)
pt3dadd(-22.25, -444.06, -4.75, 1.7)
pt3dadd(-22.08, -443.67, -4.75, 1.7)
pt3dadd(-21.91, -443.29, -4.75, 1.7)
pt3dadd(-21.74, -442.9, -4.75, 1.7)
pt3dadd(-21.4, -442.32, -4.75, 1.7)
pt3dadd(-21.23, -442.13, -4.75, 1.7)
pt3dadd(-21.06, -441.74, -4.75, 1.7)
pt3dadd(-20.89, -441.55, -4.75, 1.7)
pt3dadd(-20.72, -441.36, -4.75, 1.7)
pt3dadd(-20.55, -441.16, -4.75, 1.7)
pt3dadd(-20.55, -440.78, -4.75, 1.7)
pt3dadd(-20.38, -440.59, -4.75, 1.7)
pt3dadd(-20.21, -440.39, -4.75, 1.7)
pt3dadd(-20.04, -440.01, -4.75, 1.7)
pt3dadd(-19.87, -439.81, -4.75, 1.7)
pt3dadd(-19.87, -439.43, -4.75, 1.7)
pt3dadd(-19.7, -439.24, -4.75, 1.7)
pt3dadd(-19.53, -439.04, -4.75, 1.7)
pt3dadd(-19.53, -438.46, -4.75, 1.7)
pt3dadd(-19.36, -438.27, -4.75, 1.7)
pt3dadd(-19.19, -438.08, -4.75, 1.7)
pt3dadd(-19.19, -437.5, -4.75, 1.7)
pt3dadd(-19.02, -437.31, -4.75, 1.7)
pt3dadd(-19.02, -436.15, -4.75, 1.7)
pt3dadd(-19.02, -435.09, -3.75, 1.7)
pt3dadd(-19.19, -435.47, -3.75, 1.7)
pt3dadd(-19.19, -435.86, -3.75, 1.7)
pt3dadd(-19.02, -435.67, -3.75, 1.7)
pt3dadd(-18.85, -435.28, -3.75, 1.7)
pt3dadd(-18.85, -434.9, -3.75, 1.7)
pt3dadd(-18.68, -434.7, -3.75, 1.7)
pt3dadd(-18, -433.93, -3.75, 1.7)
pt3dadd(-18, -433.55, -3.75, 1.7)
pt3dadd(-17.66, -433.35, -3.75, 1.7)
pt3dadd(-17.49, -432.97, -3.75, 1.7)
pt3dadd(-17.32, -432.58, -3.75, 1.7)
pt3dadd(-17.15, -432.19, -3.75, 1.7)
pt3dadd(-16.81, -431.62, -3.75, 1.7)
pt3dadd(-16.64, -431.23, -3.75, 1.7)
pt3dadd(-15.96, -430.46, -3.75, 1.7)
pt3dadd(-15.79, -430.07, -3.75, 1.7)
pt3dadd(-15.62, -429.69, -3.75, 1.7)
pt3dadd(-15.46, -429.3, -3.75, 1.7)
pt3dadd(-15.12, -428.92, -3.75, 1.7)
pt3dadd(-14.95, -428.53, -3.75, 1.7)
pt3dadd(-14.44, -428.14, -3.75, 1.7)
pt3dadd(-14.27, -427.57, -3.75, 1.7)
pt3dadd(-13.93, -426.99, -3.75, 1.7)
pt3dadd(-13.59, -426.6, -3.75, 1.7)
pt3dadd(-13.25, -426.21, -3.75, 1.7)
pt3dadd(-13.25, -425.83, -3.75, 1.7)
pt3dadd(-12.91, -425.44, -3.75, 1.7)
pt3dadd(-12.74, -425.06, -3.75, 1.7)
pt3dadd(-12.57, -424.48, -3.75, 1.7)
pt3dadd(-12.23, -424.09, -3.75, 1.7)
pt3dadd(-12.06, -423.71, -3.75, 1.7)
pt3dadd(-11.72, -423.32, -3.75, 1.7)
pt3dadd(-11.55, -422.94, -3.75, 1.7)
pt3dadd(-11.38, -422.55, -3.75, 1.7)
pt3dadd(-11.21, -422.16, -3.75, 1.7)
pt3dadd(-10.87, -421.97, -3.75, 1.7)
pt3dadd(-10.7, -421.59, -3.75, 1.7)
pt3dadd(-10.53, -421.2, -3.75, 1.7)
pt3dadd(-10.36, -420.81, -3.75, 1.7)
pt3dadd(-10.02, -420.43, -3.75, 1.7)
pt3dadd(-9.85, -419.85, -3.75, 1.7)
pt3dadd(-9.34, -418.88, -3.75, 1.7)
pt3dadd(-9.17, -418.5, -3.75, 1.7)
pt3dadd(-9, -418.11, -3.75, 1.7)
pt3dadd(-8.49, -417.53, -3.75, 1.7)
pt3dadd(-8.49, -417.15, -3.75, 1.7)
pt3dadd(-8.15, -416.76, -3.75, 1.7)
pt3dadd(-8.15, -416.38, -3.75, 1.7)
pt3dadd(-7.81, -415.99, -3.75, 1.7)
pt3dadd(-7.64, -415.61, -3.75, 1.7)
pt3dadd(-7.47, -415.22, -3.75, 1.7)
pt3dadd(-7.3, -415.03, -3.75, 1.7)
pt3dadd(-7.13, -414.45, -3.75, 1.7)
pt3dadd(-6.79, -413.87, -3.75, 1.7)
pt3dadd(-6.62, -413.48, -3.75, 1.7)
pt3dadd(-6.45, -413.1, -3.75, 1.7)
pt3dadd(-6.28, -412.9, -3.75, 1.7)
pt3dadd(-6.11, -412.52, -3.75, 1.7)
pt3dadd(-5.77, -411.94, -3.75, 1.7)
pt3dadd(-5.6, -411.36, -3.75, 1.7)
pt3dadd(-5.43, -410.98, -3.75, 1.7)
pt3dadd(-4.93, -410.4, -3.75, 1.7)
pt3dadd(-4.76, -409.82, -3.75, 1.7)
pt3dadd(-4.59, -409.43, -3.75, 1.7)
pt3dadd(-4.25, -408.85, -3.75, 1.7)
pt3dadd(-4.08, -408.47, -3.75, 1.7)
pt3dadd(-3.91, -408.08, -3.75, 1.7)
pt3dadd(-3.57, -407.89, -3.75, 1.7)
pt3dadd(-3.4, -407.7, -3.75, 1.7)
pt3dadd(-3.06, -406.92, -3.75, 1.7)
pt3dadd(-2.89, -406.54, -3.75, 1.7)
pt3dadd(-2.55, -406.35, -3.75, 1.7)
pt3dadd(-2.38, -405.96, -3.75, 1.7)
pt3dadd(-2.04, -405.38, -3.75, 1.7)
pt3dadd(-1.87, -405, -3.75, 1.7)
pt3dadd(-1.53, -404.61, -3.75, 1.7)
pt3dadd(-1.36, -404.22, -3.75, 1.7)
pt3dadd(-1.02, -403.84, -3.75, 1.7)
pt3dadd(-0.85, -403.45, -3.75, 1.7)
pt3dadd(-0.34, -402.68, -3.75, 1.7)
pt3dadd(0, -402.1, -3.75, 1.7)
pt3dadd(0.34, -401.52, -3.75, 1.7)
pt3dadd(0.68, -401.33, -3.75, 1.7)
pt3dadd(0.68, -400.94, -3.75, 1.7)
pt3dadd(1.02, -400.75, -3.75, 1.7)
pt3dadd(1.19, -400.37, -3.75, 1.7)
pt3dadd(1.36, -399.98, -3.75, 1.7)
pt3dadd(1.53, -399.4, -3.75, 1.7)
pt3dadd(1.87, -398.82, -3.75, 1.7)
pt3dadd(2.04, -398.44, -3.75, 1.7)
pt3dadd(2.21, -398.05, -3.75, 1.7)
pt3dadd(2.38, -397.86, -3.75, 1.7)
pt3dadd(2.55, -397.67, -3.75, 1.7)
pt3dadd(2.89, -397.28, -3.75, 1.7)
pt3dadd(3.06, -396.89, -3.75, 1.7)
pt3dadd(3.23, -396.7, -3.75, 1.7)
pt3dadd(3.23, -396.32, -3.75, 1.7)
pt3dadd(3.4, -395.93, -3.75, 1.7)
pt3dadd(3.57, -395.74, -3.75, 1.7)
pt3dadd(3.74, -395.35, -3.75, 1.7)
pt3dadd(3.91, -395.16, -3.75, 1.7)
pt3dadd(4.08, -394.96, -3.75, 1.7)
}
}
proc shape3d_12() {
dend { pt3dadd(4.08, -394.58, -3.75, 1.7)
pt3dadd(4.25, -394.19, -3.75, 1.7)
pt3dadd(4.42, -393.81, -3.75, 1.7)
pt3dadd(4.42, -393.23, -3.75, 1.7)
pt3dadd(4.59, -393.04, -3.75, 1.7)
pt3dadd(4.76, -392.36, -3.75, 1.7)
pt3dadd(4.25, -391.88, -5.75, 1.7)
pt3dadd(4.08, -392.26, -5.75, 1.7)
pt3dadd(4.08, -393.61, -5.75, 1.7)
pt3dadd(4.25, -393.42, -5.75, 1.7)
pt3dadd(4.42, -393.23, -5.75, 1.7)
pt3dadd(4.76, -392.84, -5.75, 1.7)
pt3dadd(4.93, -392.46, -5.75, 1.7)
pt3dadd(5.1, -392.26, -5.75, 1.7)
pt3dadd(5.43, -391.69, -5.75, 1.7)
pt3dadd(5.6, -391.3, -5.75, 1.7)
pt3dadd(5.77, -390.91, -5.75, 1.7)
pt3dadd(6.11, -390.53, -5.75, 1.7)
pt3dadd(6.45, -390.14, -5.75, 1.7)
pt3dadd(6.62, -389.76, -5.75, 1.7)
pt3dadd(6.79, -389.37, -5.75, 1.7)
pt3dadd(6.96, -389.18, -5.75, 1.7)
pt3dadd(7.3, -388.79, -5.75, 1.7)
pt3dadd(7.64, -388.41, -5.75, 1.7)
pt3dadd(7.64, -388.02, -5.75, 1.7)
pt3dadd(7.98, -387.63, -5.75, 1.7)
pt3dadd(8.15, -387.25, -5.75, 1.7)
pt3dadd(8.32, -386.86, -5.75, 1.7)
pt3dadd(8.66, -386.67, -5.75, 1.7)
pt3dadd(8.66, -386.09, -5.75, 1.7)
pt3dadd(9, -385.9, -5.75, 1.7)
pt3dadd(9.17, -385.32, -5.75, 1.7)
pt3dadd(9.34, -384.93, -5.75, 1.7)
pt3dadd(9.68, -384.55, -5.75, 1.7)
pt3dadd(10.02, -383.97, -5.75, 1.7)
pt3dadd(10.36, -383.39, -5.75, 1.7)
pt3dadd(10.53, -383.01, -5.75, 1.7)
pt3dadd(10.7, -382.43, -5.75, 1.7)
pt3dadd(11.04, -382.23, -5.75, 1.7)
pt3dadd(11.21, -382.04, -5.75, 1.7)
pt3dadd(11.55, -381.46, -5.75, 1.7)
pt3dadd(11.72, -381.08, -5.75, 1.7)
pt3dadd(12.06, -380.69, -5.75, 1.7)
pt3dadd(12.23, -380.5, -5.75, 1.7)
pt3dadd(12.57, -380.11, -5.75, 1.7)
pt3dadd(12.74, -379.73, -5.75, 1.7)
pt3dadd(12.91, -379.53, -5.75, 1.7)
pt3dadd(13.25, -379.15, -5.75, 1.7)
pt3dadd(13.59, -378.76, -5.75, 1.7)
pt3dadd(13.76, -378.38, -5.75, 1.7)
pt3dadd(13.93, -377.8, -5.75, 1.7)
pt3dadd(14.1, -377.41, -5.75, 1.7)
pt3dadd(14.27, -377.03, -5.75, 1.7)
pt3dadd(14.61, -376.45, -5.75, 1.7)
pt3dadd(14.95, -375.87, -5.75, 1.7)
pt3dadd(15.12, -375.48, -5.75, 1.7)
pt3dadd(15.29, -375.1, -5.75, 1.7)
pt3dadd(15.63, -374.71, -5.75, 1.7)
pt3dadd(15.79, -374.52, -5.75, 1.7)
pt3dadd(15.96, -374.13, -5.75, 1.7)
pt3dadd(16.13, -373.75, -5.75, 1.7)
pt3dadd(16.47, -373.36, -5.75, 1.7)
pt3dadd(16.64, -373.17, -5.75, 1.7)
pt3dadd(16.81, -372.59, -5.75, 1.7)
pt3dadd(17.15, -372.2, -5.75, 1.7)
pt3dadd(17.32, -372.01, -5.75, 1.7)
pt3dadd(17.66, -371.43, -5.75, 1.7)
pt3dadd(17.83, -371.24, -5.75, 1.7)
pt3dadd(18, -371.05, -5.75, 1.7)
pt3dadd(18.17, -370.85, -5.75, 1.7)
pt3dadd(18.34, -370.66, -5.75, 1.7)
pt3dadd(18.51, -370.08, -5.75, 1.7)
pt3dadd(18.68, -369.89, -5.75, 1.7)
pt3dadd(18.85, -369.69, -5.75, 1.7)
pt3dadd(19.19, -369.5, -5.75, 1.7)
pt3dadd(19.36, -368.92, -5.75, 1.7)
pt3dadd(19.53, -368.73, -5.75, 1.7)
pt3dadd(19.7, -368.34, -5.75, 1.7)
pt3dadd(19.87, -368.15, -5.75, 1.7)
pt3dadd(19.87, -367.77, -5.75, 1.7)
pt3dadd(20.04, -367.38, -5.75, 1.7)
pt3dadd(20.21, -367.19, -5.75, 1.7)
pt3dadd(20.21, -366.42, -5.75, 1.7)
pt3dadd(21.58, -366.03, -5.75, 1.7)
pt3dadd(20.98, -362.16, -5.75, 1.7)
pt3dadd(22.35, -363.48, -5.75, 1.7)
pt3dadd(20.55, -359.86, -5.75, 1.7)
pt3dadd(23.12, -361.37, -5.75, 1.7)
pt3dadd(23.29, -360.98, -5.75, 1.7)
pt3dadd(21.23, -358.89, -5.75, 1.7)
pt3dadd(21.23, -358.51, -5.75, 1.7)
pt3dadd(23.2, -361.16, -5.75, 1.7)
pt3dadd(23.37, -360.97, -5.75, 1.7)
pt3dadd(21.74, -357.93, -5.75, 1.7)
pt3dadd(21.91, -357.74, -5.75, 1.7)
pt3dadd(23.28, -362.29, -5.75, 1.7)
pt3dadd(21.05, -359.25, -5.75, 1.7)
pt3dadd(23.79, -356.96, -5.75, 1.7)
pt3dadd(22.76, -358.67, -5.75, 1.7)
pt3dadd(23.61, -356.77, -5.75, 1.7)
pt3dadd(23.78, -356.58, -5.75, 1.7)
pt3dadd(24.12, -356.58, -5.75, 1.7)
pt3dadd(24.29, -356.38, -5.75, 1.7)
pt3dadd(24.63, -356.38, -5.75, 1.7)
pt3dadd(24.97, -356.19, -5.75, 1.7)
pt3dadd(25.14, -356, -5.75, 1.7)
pt3dadd(25.65, -356, -5.75, 1.7)
pt3dadd(25.99, -355.81, -5.75, 1.7)
pt3dadd(26.32, -355.61, -5.75, 1.7)
pt3dadd(26.66, -355.61, -5.75, 1.7)
pt3dadd(26.83, -355.42, -5.75, 1.7)
pt3dadd(27.17, -355.03, -5.75, 1.7)
pt3dadd(27.51, -354.84, -5.75, 1.7)
pt3dadd(27.85, -354.65, -5.75, 1.7)
pt3dadd(28.36, -354.65, -5.75, 1.7)
pt3dadd(28.53, -354.46, -5.75, 1.7)
pt3dadd(28.87, -354.26, -5.75, 1.7)
pt3dadd(29.38, -354.07, -5.75, 1.7)
pt3dadd(29.72, -353.88, -5.75, 1.7)
pt3dadd(29.89, -353.68, -5.75, 1.7)
pt3dadd(30.23, -353.68, -5.75, 1.7)
pt3dadd(30.57, -353.49, -5.75, 1.7)
pt3dadd(30.91, -353.3, -5.75, 1.7)
pt3dadd(31.25, -353.11, -5.75, 1.7)
pt3dadd(31.76, -352.91, -5.75, 1.7)
pt3dadd(32.1, -352.72, -5.75, 1.7)
pt3dadd(32.27, -352.53, -5.75, 1.7)
pt3dadd(32.44, -352.33, -5.75, 1.7)
pt3dadd(32.95, -352.33, -5.75, 1.7)
pt3dadd(33.29, -352.14, -5.75, 1.7)
pt3dadd(33.63, -351.95, -5.75, 1.7)
pt3dadd(33.97, -351.76, -5.75, 1.7)
pt3dadd(34.31, -351.37, -5.75, 1.7)
pt3dadd(34.48, -351.18, -5.75, 1.7)
pt3dadd(34.82, -350.98, -5.75, 1.7)
pt3dadd(35.16, -350.98, -5.75, 1.7)
pt3dadd(35.33, -350.6, -5.75, 1.7)
pt3dadd(35.67, -350.4, -5.75, 1.7)
pt3dadd(35.84, -350.21, -5.75, 1.7)
pt3dadd(36.01, -350.02, -5.75, 1.7)
pt3dadd(36.18, -349.83, -5.75, 1.7)
pt3dadd(36.52, -349.63, -5.75, 1.7)
pt3dadd(36.68, -349.44, -5.75, 1.7)
pt3dadd(36.85, -349.25, -5.75, 1.7)
pt3dadd(37.19, -349.05, -5.75, 1.7)
pt3dadd(37.36, -348.67, -5.75, 1.7)
pt3dadd(37.53, -348.48, -5.75, 1.7)
pt3dadd(37.87, -348.28, -5.75, 1.7)
pt3dadd(38.04, -347.9, -5.75, 1.7)
pt3dadd(38.21, -347.7, -5.75, 1.7)
pt3dadd(38.55, -347.51, -5.75, 1.7)
pt3dadd(38.89, -347.32, -5.75, 1.7)
pt3dadd(39.06, -347.13, -5.75, 1.7)
pt3dadd(39.23, -346.93, -5.75, 1.7)
pt3dadd(39.4, -346.74, -5.75, 1.7)
pt3dadd(39.74, -346.55, -5.75, 1.7)
pt3dadd(40.08, -346.35, -5.75, 1.7)
pt3dadd(40.25, -346.16, -5.75, 1.7)
pt3dadd(40.42, -345.97, -5.75, 1.7)
pt3dadd(40.59, -345.78, -5.75, 1.7)
pt3dadd(40.76, -345.58, -5.75, 1.7)
pt3dadd(40.93, -345.39, -5.75, 1.7)
pt3dadd(41.1, -345.2, -5.75, 1.7)
pt3dadd(41.27, -345, -5.75, 1.7)
pt3dadd(41.44, -344.81, -5.75, 1.7)
pt3dadd(41.61, -344.62, -5.75, 1.7)
pt3dadd(41.78, -344.42, -5.75, 1.7)
pt3dadd(41.95, -344.23, -5.75, 1.7)
pt3dadd(42.12, -344.04, -5.75, 1.7)
pt3dadd(42.29, -343.85, -5.75, 1.7)
pt3dadd(42.46, -343.65, -5.75, 1.7)
pt3dadd(42.8, -343.46, -5.75, 1.7)
pt3dadd(42.8, -343.07, -5.75, 1.7)
pt3dadd(42.8, -343.17, -8.75, 1.7)
pt3dadd(42.97, -342.98, -8.75, 1.7)
pt3dadd(43.14, -342.79, -8.75, 1.7)
pt3dadd(43.48, -342.21, -8.75, 1.7)
pt3dadd(43.65, -342.01, -8.75, 1.7)
pt3dadd(43.82, -341.82, -8.75, 1.7)
pt3dadd(44.16, -341.43, -8.75, 1.7)
pt3dadd(44.33, -341.24, -8.75, 1.7)
pt3dadd(44.67, -340.86, -8.75, 1.7)
pt3dadd(45.01, -340.66, -8.75, 1.7)
pt3dadd(45.18, -340.47, -8.75, 1.7)
pt3dadd(45.69, -339.89, -8.75, 1.7)
pt3dadd(45.86, -339.31, -8.75, 1.7)
pt3dadd(46.37, -338.93, -8.75, 1.7)
pt3dadd(46.54, -338.54, -8.75, 1.7)
pt3dadd(46.71, -338.16, -8.75, 1.7)
pt3dadd(46.88, -337.96, -8.75, 1.7)
pt3dadd(47.04, -337.58, -8.75, 1.7)
pt3dadd(47.21, -337.38, -8.75, 1.7)
pt3dadd(47.38, -337, -8.75, 1.7)
pt3dadd(47.55, -336.81, -8.75, 1.7)
pt3dadd(47.72, -336.61, -8.75, 1.7)
pt3dadd(47.89, -336.23, -8.75, 1.7)
pt3dadd(48.06, -336.03, -8.75, 1.7)
pt3dadd(48.4, -335.45, -8.75, 1.7)
pt3dadd(48.57, -335.07, -8.75, 1.7)
pt3dadd(48.91, -334.88, -8.75, 1.7)
}
}
proc shape3d_13() {
dend { pt3dadd(49.08, -334.49, -8.75, 1.7)
pt3dadd(49.25, -334.1, -8.75, 1.7)
pt3dadd(49.42, -333.91, -8.75, 1.7)
pt3dadd(49.76, -333.53, -8.75, 1.7)
pt3dadd(49.93, -333.14, -8.75, 1.7)
pt3dadd(50.27, -332.95, -8.75, 1.7)
pt3dadd(50.44, -332.56, -8.75, 1.7)
pt3dadd(50.78, -332.18, -8.75, 1.7)
pt3dadd(50.95, -331.79, -8.75, 1.7)
pt3dadd(51.12, -331.4, -8.75, 1.7)
pt3dadd(51.46, -331.02, -8.75, 1.7)
pt3dadd(51.63, -330.63, -8.75, 1.7)
pt3dadd(51.97, -330.25, -8.75, 1.7)
pt3dadd(52.31, -329.67, -8.75, 1.7)
pt3dadd(52.48, -329.28, -8.75, 1.7)
pt3dadd(52.65, -328.9, -8.75, 1.7)
pt3dadd(52.99, -328.51, -8.75, 1.7)
pt3dadd(53.16, -328.32, -8.75, 1.7)
pt3dadd(52.82, -328.61, -8.75, 1.7)
pt3dadd(52.99, -328.61, -8.75, 1.7)
pt3dadd(53.16, -328.22, -8.75, 1.7)
pt3dadd(53.33, -328.03, -8.75, 1.7)
pt3dadd(53.5, -327.84, -8.75, 1.7)
pt3dadd(53.67, -327.64, -8.75, 1.7)
pt3dadd(53.84, -327.45, -8.75, 1.7)
pt3dadd(54.01, -327.26, -8.75, 1.7)
pt3dadd(54.35, -327.06, -8.75, 1.7)
pt3dadd(54.52, -326.87, -8.75, 1.7)
pt3dadd(54.69, -326.29, -8.75, 1.7)
pt3dadd(54.86, -325.91, -8.75, 1.7)
pt3dadd(55.2, -325.71, -8.75, 1.7)
pt3dadd(55.2, -325.13, -8.75, 1.7)
pt3dadd(55.54, -324.75, -8.75, 1.7)
pt3dadd(55.71, -324.36, -8.75, 1.7)
pt3dadd(56.05, -323.78, -8.75, 1.7)
pt3dadd(56.22, -323.4, -8.75, 1.7)
pt3dadd(56.39, -322.82, -8.75, 1.7)
pt3dadd(56.56, -322.24, -8.75, 1.7)
pt3dadd(56.9, -322.05, -8.75, 1.7)
pt3dadd(56.9, -321.47, -8.75, 1.7)
pt3dadd(57.24, -321.28, -8.75, 1.7)
pt3dadd(57.24, -320.89, -8.75, 1.7)
pt3dadd(57.4, -320.7, -8.75, 1.7)
pt3dadd(57.74, -320.31, -8.75, 1.7)
pt3dadd(57.74, -319.93, -8.75, 1.7)
pt3dadd(57.91, -319.54, -8.75, 1.7)
pt3dadd(58.25, -319.15, -8.75, 1.7)
pt3dadd(58.25, -318.77, -8.75, 1.7)
pt3dadd(58.42, -318.19, -8.75, 1.7)
pt3dadd(58.76, -317.61, -8.75, 1.7)
pt3dadd(58.93, -317.23, -8.75, 1.7)
pt3dadd(59.1, -316.65, -8.75, 1.7)
pt3dadd(59.27, -316.07, -8.75, 1.7)
pt3dadd(59.44, -315.68, -8.75, 1.7)
pt3dadd(59.78, -315.49, -8.75, 1.7)
pt3dadd(59.95, -314.91, -8.75, 1.7)
pt3dadd(59.95, -314.53, -8.75, 1.7)
pt3dadd(60.12, -314.14, -8.75, 1.7)
pt3dadd(60.29, -313.95, -8.75, 1.7)
pt3dadd(60.46, -313.37, -8.75, 1.7)
pt3dadd(60.63, -312.98, -8.75, 1.7)
pt3dadd(60.8, -312.4, -8.75, 1.7)
pt3dadd(60.97, -312.21, -8.75, 1.7)
pt3dadd(61.14, -311.82, -8.75, 1.7)
pt3dadd(61.31, -311.63, -8.75, 1.7)
pt3dadd(61.48, -311.25, -8.75, 1.7)
pt3dadd(61.48, -310.67, -8.75, 1.7)
pt3dadd(61.82, -310.28, -8.75, 1.7)
pt3dadd(61.82, -309.51, -8.75, 1.7)
pt3dadd(61.99, -309.32, -8.75, 1.7)
pt3dadd(62.16, -309.12, -8.75, 1.7)
pt3dadd(62.16, -308.74, -8.75, 1.7)
pt3dadd(62.33, -308.55, -8.75, 1.7)
pt3dadd(62.5, -308.35, -8.75, 1.7)
pt3dadd(62.67, -308.16, -8.75, 1.7)
pt3dadd(62.84, -307.97, -8.75, 1.7)
pt3dadd(62.84, -307.39, -8.75, 1.7)
pt3dadd(63.01, -307.19, -8.75, 1.7)
pt3dadd(63.18, -307, -8.75, 1.7)
pt3dadd(62.5, -307.68, -11.75, 1.7)
pt3dadd(62.84, -307.29, -11.75, 1.7)
pt3dadd(63.18, -306.91, -11.75, 1.7)
pt3dadd(63.52, -306.13, -11.75, 1.7)
pt3dadd(63.86, -305.36, -11.75, 1.7)
pt3dadd(64.54, -304.98, -11.75, 1.7)
pt3dadd(65.22, -304.59, -11.75, 1.7)
pt3dadd(65.56, -303.82, -11.75, 1.7)
pt3dadd(65.9, -303.43, -11.75, 1.7)
pt3dadd(66.58, -302.66, -11.75, 1.7)
pt3dadd(66.92, -302.28, -11.75, 1.7)
pt3dadd(67.26, -301.5, -11.75, 1.7)
pt3dadd(67.6, -301.12, -11.75, 1.7)
pt3dadd(68.27, -300.73, -11.75, 1.7)
pt3dadd(68.61, -299.96, -11.75, 1.7)
pt3dadd(68.95, -299.58, -11.75, 1.7)
pt3dadd(69.29, -299.19, -11.75, 1.7)
pt3dadd(69.63, -298.8, -11.75, 1.7)
pt3dadd(69.97, -298.42, -11.75, 1.7)
pt3dadd(70.31, -298.03, -11.75, 1.7)
pt3dadd(70.65, -297.26, -11.75, 1.7)
pt3dadd(71.33, -296.87, -11.75, 1.7)
pt3dadd(71.67, -296.1, -11.75, 1.7)
pt3dadd(72.01, -295.72, -11.75, 1.7)
pt3dadd(72.35, -295.33, -11.75, 1.7)
pt3dadd(72.69, -294.95, -11.75, 1.7)
pt3dadd(73.03, -294.56, -11.75, 1.7)
pt3dadd(73.71, -294.17, -11.75, 1.7)
pt3dadd(74.05, -293.4, -11.75, 1.7)
pt3dadd(74.39, -292.63, -11.75, 1.7)
pt3dadd(74.73, -292.25, -11.75, 1.7)
pt3dadd(75.41, -291.47, -11.75, 1.7)
pt3dadd(75.75, -290.7, -11.75, 1.7)
pt3dadd(76.09, -289.93, -11.75, 1.7)
pt3dadd(76.43, -289.54, -11.75, 1.7)
pt3dadd(76.77, -288.77, -11.75, 1.7)
pt3dadd(77.11, -288, -11.75, 1.7)
pt3dadd(77.45, -287.62, -11.75, 1.7)
pt3dadd(77.79, -286.84, -11.75, 1.7)
pt3dadd(78.13, -286.07, -11.75, 1.7)
pt3dadd(78.46, -285.3, -11.75, 1.7)
pt3dadd(78.8, -284.53, -11.75, 1.7)
pt3dadd(79.14, -284.14, -11.75, 1.7)
pt3dadd(79.48, -283.76, -11.75, 1.7)
pt3dadd(79.82, -283.37, -11.75, 1.7)
pt3dadd(80.16, -282.6, -11.75, 1.7)
pt3dadd(80.5, -282.21, -11.75, 1.7)
pt3dadd(80.5, -281.44, -11.75, 1.7)
pt3dadd(80.84, -281.06, -11.75, 1.7)
pt3dadd(81.18, -280.29, -11.75, 1.7)
pt3dadd(103.09, -223.6, -11.75, 3.4)
pt3dadd(103.27, -223.4, -11.75, 3.4)
pt3dadd(103.27, -222.18, -11.75, 3.4)
pt3dadd(103.45, -221.78, -11.75, 3.4)
pt3dadd(103.63, -221.58, -11.75, 3.4)
pt3dadd(103.63, -221.17, -11.75, 3.4)
pt3dadd(103.8, -220.97, -11.75, 3.4)
pt3dadd(103.8, -220.36, -11.75, 3.4)
pt3dadd(104.16, -220.16, -11.75, 3.4)
pt3dadd(104.34, -219.55, -11.75, 3.4)
pt3dadd(104.52, -219.15, -11.75, 3.4)
pt3dadd(104.7, -218.54, -11.75, 3.4)
pt3dadd(105.05, -218.13, -11.75, 3.4)
pt3dadd(105.23, -217.73, -11.75, 3.4)
pt3dadd(105.41, -217.53, -11.75, 3.4)
pt3dadd(105.59, -217.12, -11.75, 3.4)
pt3dadd(105.77, -216.71, -11.75, 3.4)
pt3dadd(105.94, -216.31, -11.75, 3.4)
pt3dadd(106.3, -215.9, -11.75, 3.4)
pt3dadd(106.48, -215.5, -11.75, 3.4)
pt3dadd(106.66, -214.89, -11.75, 3.4)
pt3dadd(107.01, -214.69, -11.75, 3.4)
pt3dadd(107.01, -214.08, -11.75, 3.4)
pt3dadd(107.37, -213.68, -11.75, 3.4)
pt3dadd(107.55, -213.27, -11.75, 3.4)
pt3dadd(107.73, -212.87, -11.75, 3.4)
pt3dadd(107.91, -212.46, -11.75, 3.4)
pt3dadd(108.08, -212.06, -11.75, 3.4)
pt3dadd(108.26, -211.65, -11.75, 3.4)
pt3dadd(108.62, -211.25, -11.75, 3.4)
pt3dadd(108.8, -211.04, -11.75, 3.4)
pt3dadd(108.98, -210.64, -11.75, 3.4)
pt3dadd(108.98, -210.23, -11.75, 3.4)
pt3dadd(109.15, -209.83, -11.75, 3.4)
pt3dadd(109.33, -209.63, -11.75, 3.4)
pt3dadd(109.51, -209.22, -11.75, 3.4)
pt3dadd(109.69, -209.02, -11.75, 3.4)
pt3dadd(109.87, -208.61, -11.75, 3.4)
pt3dadd(110.05, -208.21, -11.75, 3.4)
pt3dadd(110.22, -207.8, -11.75, 3.4)
pt3dadd(110.4, -207.2, -11.75, 3.4)
pt3dadd(110.58, -206.99, -11.75, 3.4)
pt3dadd(110.76, -206.59, -11.75, 3.4)
pt3dadd(110.94, -206.18, -11.75, 3.4)
pt3dadd(110.94, -205.78, -11.75, 3.4)
pt3dadd(111.12, -205.57, -11.75, 3.4)
pt3dadd(111.29, -205.17, -11.75, 3.4)
pt3dadd(111.47, -204.97, -11.75, 3.4)
pt3dadd(111.47, -204.56, -11.75, 3.4)
pt3dadd(111.65, -204.36, -11.75, 3.4)
pt3dadd(111.65, -203.95, -11.75, 3.4)
pt3dadd(111.83, -203.75, -11.75, 3.4)
pt3dadd(112.01, -203.35, -11.75, 3.4)
pt3dadd(112.01, -202.94, -11.75, 3.4)
pt3dadd(112.19, -202.54, -11.75, 3.4)
pt3dadd(112.36, -202.33, -11.75, 3.4)
pt3dadd(112.54, -201.93, -11.75, 3.4)
pt3dadd(112.72, -201.73, -11.75, 3.4)
pt3dadd(112.9, -201.32, -11.75, 3.4)
pt3dadd(113.08, -200.92, -11.75, 3.4)
pt3dadd(113.26, -200.51, -11.75, 3.4)
pt3dadd(113.43, -200.11, -11.75, 3.4)
pt3dadd(113.61, -199.7, -11.75, 3.4)
pt3dadd(113.79, -199.5, -11.75, 3.4)
pt3dadd(114.15, -199.5, -11.75, 3.4)
pt3dadd(114.15, -199.09, -11.75, 3.4)
pt3dadd(113.26, -200.51, -12.8, 3.4)
pt3dadd(113.43, -200.31, -12.8, 3.4)
pt3dadd(113.61, -200.11, -12.8, 3.4)
pt3dadd(113.97, -199.7, -12.8, 3.4)
pt3dadd(114.15, -199.3, -12.8, 3.4)
}
}
proc shape3d_14() {
dend { pt3dadd(114.33, -199.09, -12.8, 3.4)
pt3dadd(114.5, -198.49, -12.8, 3.4)
pt3dadd(114.68, -197.88, -12.8, 3.4)
pt3dadd(115.04, -197.27, -12.8, 3.4)
pt3dadd(115.4, -196.87, -12.8, 3.4)
pt3dadd(115.57, -196.46, -12.8, 3.4)
pt3dadd(115.75, -196.06, -12.8, 3.4)
pt3dadd(116.11, -195.45, -12.8, 3.4)
pt3dadd(116.29, -195.24, -12.8, 3.4)
pt3dadd(116.64, -194.84, -12.8, 3.4)
pt3dadd(117.18, -194.43, -12.8, 3.4)
pt3dadd(117.36, -194.23, -12.8, 3.4)
pt3dadd(117.89, -193.83, -12.8, 3.4)
pt3dadd(118.07, -193.62, -12.8, 3.4)
pt3dadd(118.61, -193.02, -12.8, 3.4)
pt3dadd(118.78, -192.81, -12.8, 3.4)
pt3dadd(119.5, -192, -12.8, 3.4)
pt3dadd(119.68, -191.8, -12.8, 3.4)
pt3dadd(120.03, -191.4, -12.8, 3.4)
pt3dadd(120.39, -191.19, -12.8, 3.4)
pt3dadd(120.75, -190.79, -12.8, 3.4)
pt3dadd(120.92, -190.59, -12.8, 3.4)
pt3dadd(121.28, -190.38, -12.8, 3.4)
pt3dadd(121.64, -189.98, -12.8, 3.4)
pt3dadd(121.99, -189.78, -12.8, 3.4)
pt3dadd(122.35, -189.57, -12.8, 3.4)
pt3dadd(122.71, -189.37, -12.8, 3.4)
pt3dadd(122.89, -189.17, -12.8, 3.4)
pt3dadd(123.24, -188.97, -12.8, 3.4)
pt3dadd(123.6, -188.76, -12.8, 3.4)
pt3dadd(123.96, -188.56, -12.8, 3.4)
pt3dadd(124.31, -188.16, -12.8, 3.4)
pt3dadd(124.85, -187.95, -12.8, 3.4)
pt3dadd(125.38, -187.75, -12.8, 3.4)
pt3dadd(125.56, -187.35, -12.8, 3.4)
pt3dadd(125.92, -187.14, -12.8, 3.4)
pt3dadd(126.1, -186.74, -12.8, 3.4)
pt3dadd(126.45, -186.54, -12.8, 3.4)
pt3dadd(126.81, -186.33, -12.8, 3.4)
pt3dadd(127.17, -186.33, -12.8, 3.4)
pt3dadd(127.34, -186.13, -12.8, 3.4)
pt3dadd(127.7, -185.93, -12.8, 3.4)
pt3dadd(127.88, -185.73, -12.8, 3.4)
pt3dadd(128.24, -185.32, -12.8, 3.4)
pt3dadd(128.59, -185.12, -12.8, 3.4)
pt3dadd(129.13, -184.71, -12.8, 3.4)
pt3dadd(129.31, -184.51, -12.8, 3.4)
pt3dadd(129.48, -184.31, -12.8, 3.4)
pt3dadd(129.66, -184.1, -12.8, 3.4)
pt3dadd(130.02, -183.9, -12.8, 3.4)
pt3dadd(130.38, -183.5, -12.8, 3.4)
pt3dadd(130.73, -183.09, -12.8, 3.4)
pt3dadd(131.09, -182.89, -12.8, 3.4)
pt3dadd(131.27, -182.69, -12.8, 3.4)
pt3dadd(131.62, -182.48, -12.8, 3.4)
pt3dadd(131.98, -182.08, -12.8, 3.4)
pt3dadd(132.16, -181.88, -12.8, 3.4)
pt3dadd(132.52, -181.67, -12.8, 3.4)
pt3dadd(132.87, -181.27, -12.8, 3.4)
pt3dadd(133.05, -181.07, -12.8, 3.4)
pt3dadd(133.23, -180.86, -12.8, 3.4)
pt3dadd(133.59, -180.66, -12.8, 3.4)
pt3dadd(133.94, -180.26, -12.8, 3.4)
pt3dadd(134.3, -179.85, -12.8, 3.4)
pt3dadd(134.48, -179.65, -12.8, 3.4)
pt3dadd(134.66, -179.45, -12.8, 3.4)
pt3dadd(135.01, -179.45, -12.8, 3.4)
pt3dadd(135.73, -178.64, -12.8, 3.4)
pt3dadd(135.9, -178.43, -12.8, 3.4)
pt3dadd(136.26, -178.23, -12.8, 3.4)
pt3dadd(136.62, -178.03, -12.8, 3.4)
pt3dadd(136.8, -177.83, -12.8, 3.4)
pt3dadd(136.97, -177.42, -12.8, 3.4)
pt3dadd(137.15, -177.22, -12.8, 3.4)
pt3dadd(137.51, -176.81, -12.8, 3.4)
pt3dadd(137.69, -176.41, -12.8, 3.4)
pt3dadd(137.87, -176.21, -12.8, 3.4)
pt3dadd(138.22, -175.8, -12.8, 3.4)
pt3dadd(138.4, -175.6, -12.8, 3.4)
pt3dadd(138.76, -175.4, -12.8, 3.4)
pt3dadd(138.94, -175.19, -12.8, 3.4)
pt3dadd(139.29, -174.79, -12.8, 3.4)
pt3dadd(139.65, -174.59, -12.8, 3.4)
pt3dadd(139.83, -174.38, -12.8, 3.4)
pt3dadd(140.18, -174.18, -12.8, 3.4)
pt3dadd(140.36, -173.98, -12.8, 3.4)
pt3dadd(140.72, -173.57, -12.8, 3.4)
pt3dadd(140.9, -173.37, -12.8, 3.4)
pt3dadd(141.25, -172.96, -12.8, 3.4)
pt3dadd(141.43, -172.56, -12.8, 3.4)
pt3dadd(141.61, -172.36, -12.8, 3.4)
pt3dadd(141.97, -172.15, -12.8, 3.4)
pt3dadd(142.32, -171.95, -12.8, 3.4)
pt3dadd(142.5, -171.75, -12.8, 3.4)
pt3dadd(142.68, -171.55, -12.8, 3.4)
pt3dadd(142.86, -171.34, -12.8, 3.4)
pt3dadd(143.04, -171.14, -12.8, 3.4)
pt3dadd(143.22, -170.94, -12.8, 3.4)
pt3dadd(143.39, -170.53, -12.8, 3.4)
pt3dadd(143.57, -170.13, -12.8, 3.4)
pt3dadd(144.11, -169.52, -12.8, 3.4)
pt3dadd(144.29, -169.12, -12.8, 3.4)
pt3dadd(144.46, -168.91, -12.8, 3.4)
pt3dadd(144.82, -168.31, -12.8, 3.4)
pt3dadd(145, -168.1, -12.8, 3.4)
pt3dadd(145.18, -167.7, -12.8, 3.4)
pt3dadd(145.53, -167.29, -12.8, 3.4)
pt3dadd(145.71, -166.69, -12.8, 3.4)
pt3dadd(145.89, -166.08, -12.8, 3.4)
pt3dadd(146.25, -165.47, -12.8, 3.4)
pt3dadd(146.43, -164.86, -12.8, 3.4)
pt3dadd(146.78, -164.26, -12.8, 3.4)
pt3dadd(146.96, -163.85, -12.8, 3.4)
pt3dadd(147.32, -163.45, -12.8, 3.4)
pt3dadd(147.49, -163.04, -12.8, 3.4)
pt3dadd(147.67, -162.64, -12.8, 3.4)
pt3dadd(148.03, -162.23, -12.8, 3.4)
pt3dadd(148.21, -161.82, -12.8, 3.4)
pt3dadd(148.39, -161.62, -12.8, 3.4)
pt3dadd(148.56, -161.22, -12.8, 3.4)
pt3dadd(148.74, -160.81, -12.8, 3.4)
pt3dadd(148.92, -160.41, -12.8, 3.4)
pt3dadd(149.1, -160, -12.8, 3.4)
pt3dadd(149.28, -159.6, -12.8, 3.4)
pt3dadd(149.46, -159.39, -12.8, 3.4)
pt3dadd(149.63, -159.19, -12.8, 3.4)
pt3dadd(149.63, -158.79, -12.8, 3.4)
pt3dadd(149.81, -158.38, -12.8, 3.4)
pt3dadd(150.17, -157.98, -12.8, 3.4)
pt3dadd(150.35, -157.57, -12.8, 3.4)
pt3dadd(150.35, -157.17, -12.8, 3.4)
pt3dadd(150.53, -156.76, -12.8, 3.4)
pt3dadd(150.7, -156.56, -12.8, 3.4)
pt3dadd(150.88, -156.15, -12.8, 3.4)
pt3dadd(151.06, -155.95, -12.8, 3.4)
pt3dadd(151.24, -155.34, -12.8, 3.4)
pt3dadd(151.42, -154.94, -12.8, 3.4)
pt3dadd(151.6, -154.33, -12.8, 3.4)
pt3dadd(151.77, -154.13, -12.8, 3.4)
pt3dadd(151.77, -153.72, -12.8, 3.4)
pt3dadd(151.95, -153.12, -12.8, 3.4)
pt3dadd(152.13, -152.71, -12.8, 3.4)
pt3dadd(152.31, -152.31, -12.8, 3.4)
pt3dadd(152.31, -151.9, -12.8, 3.4)
pt3dadd(152.49, -151.49, -12.8, 3.4)
pt3dadd(152.49, -151.09, -12.8, 3.4)
pt3dadd(152.67, -150.68, -12.8, 3.4)
pt3dadd(152.67, -150.08, -12.8, 3.4)
pt3dadd(152.84, -149.87, -12.8, 3.4)
pt3dadd(152.84, -149.27, -12.8, 3.4)
pt3dadd(153.02, -149.06, -12.8, 3.4)
pt3dadd(153.02, -148.46, -12.8, 3.4)
pt3dadd(153.2, -148.25, -12.8, 3.4)
pt3dadd(153.2, -147.85, -12.8, 3.4)
pt3dadd(153.38, -147.44, -12.8, 3.4)
pt3dadd(153.56, -147.04, -12.8, 3.4)
pt3dadd(153.74, -146.84, -12.8, 3.4)
pt3dadd(153.91, -146.63, -12.8, 3.4)
pt3dadd(154.27, -146.23, -12.8, 3.4)
pt3dadd(154.45, -145.82, -12.8, 3.4)
pt3dadd(154.63, -145.42, -12.8, 3.4)
pt3dadd(154.98, -145.22, -12.8, 3.4)
pt3dadd(155.16, -145.01, -12.8, 3.4)
pt3dadd(155.34, -144.81, -12.8, 3.4)
pt3dadd(155.34, -144.41, -12.8, 3.4)
pt3dadd(154.63, -144, -14.9, 3.4)
pt3dadd(154.63, -144.81, -14.9, 3.4)
pt3dadd(155.52, -144.81, -14.9, 3.4)
pt3dadd(155.7, -144.61, -14.9, 3.4)
pt3dadd(156.05, -144.41, -14.9, 3.4)
pt3dadd(156.23, -144.2, -14.9, 3.4)
pt3dadd(156.41, -144, -14.9, 3.4)
pt3dadd(156.77, -143.8, -14.9, 3.4)
pt3dadd(157.12, -143.6, -14.9, 3.4)
pt3dadd(157.3, -143.39, -14.9, 3.4)
pt3dadd(157.66, -143.19, -14.9, 3.4)
pt3dadd(158.02, -142.79, -14.9, 3.4)
pt3dadd(158.19, -142.58, -14.9, 3.4)
pt3dadd(158.37, -142.18, -14.9, 3.4)
pt3dadd(158.73, -141.77, -14.9, 3.4)
pt3dadd(159.09, -141.57, -14.9, 3.4)
pt3dadd(159.26, -141.37, -14.9, 3.4)
pt3dadd(159.44, -141.17, -14.9, 3.4)
pt3dadd(159.62, -140.76, -14.9, 3.4)
pt3dadd(159.8, -140.56, -14.9, 3.4)
pt3dadd(160.16, -140.15, -14.9, 3.4)
pt3dadd(160.51, -139.75, -14.9, 3.4)
pt3dadd(160.87, -139.54, -14.9, 3.4)
pt3dadd(161.05, -139.34, -14.9, 3.4)
pt3dadd(161.23, -139.14, -14.9, 3.4)
pt3dadd(162.3, -137.92, -14.9, 3.4)
pt3dadd(162.47, -137.52, -14.9, 3.4)
pt3dadd(162.65, -137.32, -14.9, 3.4)
pt3dadd(163.01, -136.91, -14.9, 3.4)
pt3dadd(163.19, -136.51, -14.9, 3.4)
pt3dadd(163.37, -136.3, -14.9, 3.4)
pt3dadd(163.72, -135.9, -14.9, 3.4)
pt3dadd(164.44, -135.09, -14.9, 3.4)
pt3dadd(164.44, -134.68, -14.9, 3.4)
pt3dadd(164.79, -134.28, -14.9, 3.4)
}
}
proc shape3d_15() {
dend { pt3dadd(164.97, -133.87, -14.9, 3.4)
pt3dadd(165.15, -133.47, -14.9, 3.4)
pt3dadd(165.51, -133.27, -14.9, 3.4)
pt3dadd(165.68, -132.86, -14.9, 3.4)
pt3dadd(165.86, -132.46, -14.9, 3.4)
pt3dadd(166.58, -131.65, -14.9, 3.4)
pt3dadd(166.75, -131.44, -14.9, 3.4)
pt3dadd(166.93, -131.04, -14.9, 3.4)
pt3dadd(167.11, -130.63, -14.9, 3.4)
pt3dadd(167.29, -130.43, -14.9, 3.4)
pt3dadd(167.47, -130.23, -14.9, 3.4)
pt3dadd(167.65, -130.03, -14.9, 3.4)
pt3dadd(167.82, -129.62, -14.9, 3.4)
pt3dadd(168.18, -129.42, -14.9, 3.4)
pt3dadd(168.18, -129.01, -14.9, 3.4)
pt3dadd(168.54, -128.61, -14.9, 3.4)
pt3dadd(168.72, -128, -14.9, 3.4)
pt3dadd(169.07, -127.39, -14.9, 3.4)
pt3dadd(169.25, -126.99, -14.9, 3.4)
pt3dadd(169.61, -126.18, -14.9, 3.4)
pt3dadd(169.79, -125.97, -14.9, 3.4)
pt3dadd(169.96, -125.77, -14.9, 3.4)
pt3dadd(170.14, -125.57, -14.9, 3.4)
pt3dadd(170.32, -125.37, -14.9, 3.4)
pt3dadd(170.5, -124.96, -14.9, 3.4)
pt3dadd(170.86, -124.76, -14.9, 3.4)
pt3dadd(171.03, -124.56, -14.9, 3.4)
pt3dadd(171.21, -124.35, -14.9, 3.4)
pt3dadd(171.39, -123.95, -14.9, 3.4)
pt3dadd(174.96, -120.3, -14.9, 3.4)
pt3dadd(174.24, -120.51, -15.95, 3.4)
pt3dadd(174.24, -121.11, -15.95, 3.4)
pt3dadd(174.6, -121.11, -15.95, 3.4)
pt3dadd(174.78, -120.91, -15.95, 3.4)
pt3dadd(174.96, -120.51, -15.95, 3.4)
pt3dadd(175.14, -120.3, -15.95, 3.4)
pt3dadd(175.31, -120.1, -15.95, 3.4)
pt3dadd(175.49, -119.9, -15.95, 3.4)
pt3dadd(175.85, -119.9, -15.95, 3.4)
pt3dadd(176.03, -119.7, -15.95, 3.4)
pt3dadd(176.38, -119.29, -15.95, 3.4)
pt3dadd(176.56, -119.09, -15.95, 3.4)
pt3dadd(176.92, -118.68, -15.95, 3.4)
pt3dadd(177.1, -118.48, -15.95, 3.4)
pt3dadd(177.28, -118.28, -15.95, 3.4)
pt3dadd(177.99, -117.47, -15.95, 3.4)
pt3dadd(178.17, -117.26, -15.95, 3.4)
pt3dadd(178.35, -116.86, -15.95, 3.4)
pt3dadd(178.52, -116.66, -15.95, 3.4)
pt3dadd(178.88, -116.25, -15.95, 3.4)
pt3dadd(179.06, -116.05, -15.95, 3.4)
pt3dadd(179.24, -115.64, -15.95, 3.4)
pt3dadd(179.59, -115.24, -15.95, 3.4)
pt3dadd(179.77, -115.04, -15.95, 3.4)
pt3dadd(179.95, -114.63, -15.95, 3.4)
pt3dadd(180.31, -114.43, -15.95, 3.4)
pt3dadd(180.49, -114.23, -15.95, 3.4)
pt3dadd(180.66, -113.82, -15.95, 3.4)
pt3dadd(181.02, -113.62, -15.95, 3.4)
pt3dadd(181.38, -113.42, -15.95, 3.4)
pt3dadd(181.91, -112.81, -15.95, 3.4)
pt3dadd(182.09, -112.4, -15.95, 3.4)
pt3dadd(182.45, -112.2, -15.95, 3.4)
pt3dadd(182.63, -112, -15.95, 3.4)
pt3dadd(182.8, -111.8, -15.95, 3.4)
pt3dadd(182.98, -111.19, -15.95, 3.4)
pt3dadd(183.16, -110.99, -15.95, 3.4)
pt3dadd(183.34, -110.78, -15.95, 3.4)
pt3dadd(183.7, -110.38, -15.95, 3.4)
pt3dadd(183.87, -109.97, -15.95, 3.4)
pt3dadd(184.23, -109.57, -15.95, 3.4)
pt3dadd(184.41, -109.37, -15.95, 3.4)
pt3dadd(184.59, -108.96, -15.95, 3.4)
pt3dadd(184.77, -108.56, -15.95, 3.4)
pt3dadd(184.94, -108.35, -15.95, 3.4)
pt3dadd(185.3, -107.95, -15.95, 3.4)
pt3dadd(185.48, -107.54, -15.95, 3.4)
pt3dadd(185.84, -107.14, -15.95, 3.4)
pt3dadd(186.19, -106.53, -15.95, 3.4)
pt3dadd(186.37, -106.12, -15.95, 3.4)
pt3dadd(186.55, -105.52, -15.95, 3.4)
pt3dadd(186.73, -105.31, -15.95, 3.4)
pt3dadd(186.91, -105.11, -15.95, 3.4)
pt3dadd(187.08, -104.71, -15.95, 3.4)
pt3dadd(187.26, -104.1, -15.95, 3.4)
pt3dadd(187.44, -103.9, -15.95, 3.4)
pt3dadd(187.62, -103.49, -15.95, 3.4)
pt3dadd(187.8, -102.88, -15.95, 3.4)
pt3dadd(187.98, -102.68, -15.95, 3.4)
pt3dadd(188.15, -102.07, -15.95, 3.4)
pt3dadd(188.33, -101.67, -15.95, 3.4)
pt3dadd(188.33, -101.26, -15.95, 3.4)
pt3dadd(188.51, -101.06, -15.95, 3.4)
pt3dadd(188.69, -100.66, -15.95, 3.4)
pt3dadd(188.87, -100.25, -15.95, 3.4)
pt3dadd(189.05, -99.64, -15.95, 3.4)
pt3dadd(189.22, -99.24, -15.95, 3.4)
pt3dadd(189.22, -98.83, -15.95, 3.4)
pt3dadd(189.4, -98.43, -15.95, 3.4)
pt3dadd(189.58, -98.02, -15.95, 3.4)
pt3dadd(189.76, -97.82, -15.95, 3.4)
pt3dadd(189.76, -97.42, -15.95, 3.4)
pt3dadd(189.94, -97.01, -15.95, 3.4)
pt3dadd(190.12, -96.81, -15.95, 3.4)
pt3dadd(190.29, -96.4, -15.95, 3.4)
pt3dadd(190.29, -96, -15.95, 3.4)
pt3dadd(190.47, -95.79, -15.95, 3.4)
pt3dadd(190.47, -95.39, -15.95, 3.4)
pt3dadd(190.65, -94.98, -15.95, 3.4)
pt3dadd(190.83, -94.58, -15.95, 3.4)
pt3dadd(190.83, -94.17, -15.95, 3.4)
pt3dadd(191.01, -93.57, -15.95, 3.4)
pt3dadd(191.01, -92.96, -15.95, 3.4)
pt3dadd(191.19, -92.55, -15.95, 3.4)
pt3dadd(191.19, -86.68, -15.95, 3.4)
pt3dadd(190.83, -87.29, -17, 3.4)
pt3dadd(190.65, -87.69, -17, 3.4)
pt3dadd(190.65, -89.31, -17, 3.4)
pt3dadd(190.83, -89.52, -17, 3.4)
pt3dadd(190.83, -88.91, -17, 3.4)
pt3dadd(191.01, -88.71, -17, 3.4)
pt3dadd(191.19, -88.3, -17, 3.4)
pt3dadd(191.36, -87.9, -17, 3.4)
pt3dadd(191.54, -87.69, -17, 3.4)
pt3dadd(191.54, -87.29, -17, 3.4)
pt3dadd(191.72, -87.09, -17, 3.4)
pt3dadd(191.9, -86.48, -17, 3.4)
pt3dadd(192.08, -86.07, -17, 3.4)
pt3dadd(192.08, -85.67, -17, 3.4)
pt3dadd(192.43, -84.65, -17, 3.4)
pt3dadd(192.43, -84.25, -17, 3.4)
pt3dadd(192.61, -83.84, -17, 3.4)
pt3dadd(192.79, -83.24, -17, 3.4)
pt3dadd(192.97, -82.83, -17, 3.4)
pt3dadd(192.97, -82.22, -17, 3.4)
pt3dadd(193.15, -81.62, -17, 3.4)
pt3dadd(193.33, -81.21, -17, 3.4)
pt3dadd(193.33, -80.81, -17, 3.4)
pt3dadd(193.5, -80.2, -17, 3.4)
pt3dadd(193.5, -79.19, -17, 3.4)
pt3dadd(193.68, -78.78, -17, 3.4)
pt3dadd(193.86, -78.58, -17, 3.4)
pt3dadd(193.86, -77.57, -17, 3.4)
pt3dadd(194.04, -77.16, -17, 3.4)
pt3dadd(194.04, -76.76, -17, 3.4)
pt3dadd(194.22, -76.35, -17, 3.4)
pt3dadd(194.4, -75.95, -17, 3.4)
pt3dadd(194.57, -75.54, -17, 3.4)
pt3dadd(194.75, -75.14, -17, 3.4)
pt3dadd(194.93, -74.93, -17, 3.4)
pt3dadd(195.11, -74.73, -17, 3.4)
pt3dadd(195.29, -74.32, -17, 3.4)
pt3dadd(195.47, -73.92, -17, 3.4)
pt3dadd(195.64, -73.51, -17, 3.4)
pt3dadd(195.82, -73.31, -17, 3.4)
pt3dadd(196, -73.11, -17, 3.4)
pt3dadd(196.18, -72.91, -17, 3.4)
pt3dadd(196.18, -72.5, -17, 3.4)
pt3dadd(196.36, -72.3, -17, 3.4)
pt3dadd(196.71, -72.1, -17, 3.4)
pt3dadd(196.89, -71.69, -17, 3.4)
pt3dadd(197.07, -71.29, -17, 3.4)
pt3dadd(197.25, -71.08, -17, 3.4)
pt3dadd(197.25, -70.68, -17, 3.4)
pt3dadd(197.43, -70.27, -17, 3.4)
pt3dadd(197.61, -70.07, -17, 3.4)
pt3dadd(197.78, -69.67, -17, 3.4)
pt3dadd(197.96, -69.26, -17, 3.4)
pt3dadd(198.14, -68.86, -17, 3.4)
pt3dadd(198.32, -68.25, -17, 3.4)
pt3dadd(198.5, -68.05, -17, 3.4)
pt3dadd(198.68, -67.84, -17, 3.4)
pt3dadd(198.68, -67.44, -17, 3.4)
pt3dadd(198.85, -67.03, -17, 3.4)
pt3dadd(199.03, -66.63, -17, 3.4)
pt3dadd(199.21, -66.43, -17, 3.4)
pt3dadd(199.39, -66.22, -17, 3.4)
pt3dadd(199.39, -65.82, -17, 3.4)
pt3dadd(199.57, -65.41, -17, 3.4)
pt3dadd(199.75, -65.21, -17, 3.4)
pt3dadd(199.75, -64.81, -17, 3.4)
pt3dadd(199.92, -64.6, -17, 3.4)
pt3dadd(199.92, -64.2, -17, 3.4)
pt3dadd(200.1, -63.79, -17, 3.4)
pt3dadd(200.28, -63.39, -17, 3.4)
pt3dadd(200.28, -62.98, -17, 3.4)
pt3dadd(200.46, -62.58, -17, 3.4)
pt3dadd(200.46, -62.17, -17, 3.4)
pt3dadd(200.64, -61.56, -17, 3.4)
pt3dadd(200.82, -61.16, -17, 3.4)
pt3dadd(200.82, -60.75, -17, 3.4)
pt3dadd(200.99, -60.35, -17, 3.4)
pt3dadd(200.99, -59.54, -17, 3.4)
pt3dadd(201.17, -59.34, -17, 3.4)
pt3dadd(201.17, -58.12, -17, 3.4)
pt3dadd(201.35, -57.72, -17, 3.4)
pt3dadd(201.35, -57.11, -17, 3.4)
pt3dadd(201.53, -56.91, -17, 3.4)
pt3dadd(201.53, -55.89, -17, 3.4)
pt3dadd(201.71, -55.69, -17, 3.4)
}
}
proc shape3d_16() {
dend { pt3dadd(201.71, -54.88, -17, 3.4)
pt3dadd(201.89, -54.68, -17, 3.4)
pt3dadd(202.06, -54.27, -17, 3.4)
pt3dadd(202.06, -53.87, -17, 3.4)
pt3dadd(202.24, -53.26, -17, 3.4)
pt3dadd(202.24, -52.45, -17, 3.4)
pt3dadd(202.42, -52.04, -17, 3.4)
pt3dadd(202.42, -51.44, -17, 3.4)
pt3dadd(202.6, -51.03, -17, 3.4)
pt3dadd(202.6, -50.63, -17, 3.4)
pt3dadd(202.78, -50.22, -17, 3.4)
pt3dadd(202.96, -49.82, -17, 3.4)
pt3dadd(202.96, -49.41, -17, 3.4)
pt3dadd(203.13, -49.21, -17, 3.4)
pt3dadd(203.13, -48.8, -17, 3.4)
pt3dadd(203.31, -48.6, -17, 3.4)
pt3dadd(203.49, -48.2, -17, 3.4)
pt3dadd(203.67, -47.79, -17, 3.4)
pt3dadd(203.85, -47.59, -17, 3.4)
pt3dadd(204.03, -47.39, -17, 3.4)
pt3dadd(204.2, -46.98, -17, 3.4)
pt3dadd(204.2, -46.58, -17, 3.4)
pt3dadd(204.38, -46.37, -17, 3.4)
pt3dadd(204.56, -46.17, -17, 3.4)
pt3dadd(204.56, -45.77, -17, 3.4)
pt3dadd(204.74, -45.56, -17, 3.4)
pt3dadd(204.92, -45.16, -17, 3.4)
pt3dadd(205.1, -44.75, -17, 3.4)
pt3dadd(205.27, -44.35, -17, 3.4)
pt3dadd(205.45, -43.94, -17, 3.4)
pt3dadd(205.63, -43.54, -17, 3.4)
pt3dadd(205.81, -43.13, -17, 3.4)
pt3dadd(205.81, -42.73, -17, 3.4)
pt3dadd(206.17, -42.32, -17, 3.4)
pt3dadd(206.17, -41.92, -17, 3.4)
pt3dadd(206.34, -41.51, -17, 3.4)
pt3dadd(206.52, -41.31, -17, 3.4)
pt3dadd(206.7, -40.7, -17, 3.4)
pt3dadd(206.88, -40.3, -17, 3.4)
pt3dadd(207.06, -39.89, -17, 3.4)
pt3dadd(207.24, -39.49, -17, 3.4)
pt3dadd(207.24, -39.08, -17, 3.4)
pt3dadd(207.41, -38.68, -17, 3.4)
pt3dadd(207.59, -38.47, -17, 3.4)
pt3dadd(207.77, -38.27, -17, 3.4)
pt3dadd(207.95, -37.87, -17, 3.4)
pt3dadd(208.13, -37.46, -17, 3.4)
pt3dadd(208.31, -37.06, -17, 3.4)
pt3dadd(208.31, -36.65, -17, 3.4)
pt3dadd(208.48, -36.25, -17, 3.4)
pt3dadd(208.66, -35.64, -17, 3.4)
pt3dadd(208.84, -35.44, -17, 3.4)
pt3dadd(209.02, -35.23, -17, 3.4)
pt3dadd(209.02, -34.83, -17, 3.4)
pt3dadd(209.2, -34.42, -17, 3.4)
pt3dadd(209.38, -34.02, -17, 3.4)
pt3dadd(209.38, -33.61, -17, 3.4)
pt3dadd(209.55, -33.41, -17, 3.4)
pt3dadd(209.55, -32.8, -17, 3.4)
pt3dadd(209.73, -32.4, -17, 3.4)
pt3dadd(209.91, -32.2, -17, 3.4)
pt3dadd(209.02, -31.99, -18.05, 3.4)
pt3dadd(209.02, -32.8, -18.05, 3.4)
pt3dadd(209.2, -33.01, -18.05, 3.4)
pt3dadd(209.38, -32.6, -18.05, 3.4)
pt3dadd(209.38, -32.2, -18.05, 3.4)
pt3dadd(209.55, -31.99, -18.05, 3.4)
pt3dadd(209.73, -31.59, -18.05, 3.4)
pt3dadd(209.91, -31.39, -18.05, 3.4)
pt3dadd(210.09, -30.98, -18.05, 3.4)
pt3dadd(210.45, -30.57, -18.05, 3.4)
pt3dadd(210.62, -30.17, -18.05, 3.4)
pt3dadd(210.8, -29.97, -18.05, 3.4)
pt3dadd(210.98, -29.36, -18.05, 3.4)
pt3dadd(211.16, -28.95, -18.05, 3.4)
pt3dadd(211.34, -28.55, -18.05, 3.4)
pt3dadd(211.52, -28.14, -18.05, 3.4)
pt3dadd(211.87, -27.74, -18.05, 3.4)
pt3dadd(212.05, -27.54, -18.05, 3.4)
pt3dadd(212.23, -27.13, -18.05, 3.4)
pt3dadd(212.41, -26.73, -18.05, 3.4)
pt3dadd(212.59, -26.52, -18.05, 3.4)
pt3dadd(212.76, -26.12, -18.05, 3.4)
pt3dadd(212.94, -25.71, -18.05, 3.4)
pt3dadd(213.3, -25.31, -18.05, 3.4)
pt3dadd(213.48, -24.9, -18.05, 3.4)
pt3dadd(213.66, -24.7, -18.05, 3.4)
pt3dadd(213.83, -24.3, -18.05, 3.4)
pt3dadd(214.01, -24.09, -18.05, 3.4)
pt3dadd(214.19, -23.69, -18.05, 3.4)
pt3dadd(214.37, -23.49, -18.05, 3.4)
pt3dadd(214.55, -22.88, -18.05, 3.4)
pt3dadd(214.72, -22.68, -18.05, 3.4)
pt3dadd(214.9, -22.27, -18.05, 3.4)
pt3dadd(215.08, -21.66, -18.05, 3.4)
pt3dadd(215.26, -21.06, -18.05, 3.4)
pt3dadd(215.44, -20.65, -18.05, 3.4)
pt3dadd(215.62, -20.04, -18.05, 3.4)
pt3dadd(215.79, -19.43, -18.05, 3.4)
pt3dadd(216.15, -18.83, -18.05, 3.4)
pt3dadd(216.33, -18.02, -18.05, 3.4)
pt3dadd(216.51, -17.61, -18.05, 3.4)
pt3dadd(216.69, -17, -18.05, 3.4)
pt3dadd(216.86, -16.4, -18.05, 3.4)
pt3dadd(217.22, -15.79, -18.05, 3.4)
pt3dadd(217.4, -15.38, -18.05, 3.4)
pt3dadd(217.58, -14.98, -18.05, 3.4)
pt3dadd(217.76, -14.57, -18.05, 3.4)
pt3dadd(217.93, -14.17, -18.05, 3.4)
pt3dadd(218.11, -13.97, -18.05, 3.4)
pt3dadd(218.29, -13.36, -18.05, 3.4)
pt3dadd(218.47, -13.16, -18.05, 3.4)
pt3dadd(218.65, -12.95, -18.05, 3.4)
pt3dadd(218.65, -12.55, -18.05, 3.4)
pt3dadd(219, -12.14, -18.05, 3.4)
pt3dadd(219.18, -11.74, -18.05, 3.4)
pt3dadd(219.36, -11.33, -18.05, 3.4)
pt3dadd(219.54, -10.93, -18.05, 3.4)
pt3dadd(219.9, -10.52, -18.05, 3.4)
pt3dadd(219.9, -10.12, -18.05, 3.4)
pt3dadd(220.07, -9.92, -18.05, 3.4)
pt3dadd(220.25, -9.51, -18.05, 3.4)
pt3dadd(220.43, -9.31, -18.05, 3.4)
pt3dadd(220.61, -8.9, -18.05, 3.4)
pt3dadd(220.79, -8.7, -18.05, 3.4)
pt3dadd(220.79, -8.09, -18.05, 3.4)
pt3dadd(220.97, -7.89, -18.05, 3.4)
pt3dadd(221.14, -7.48, -18.05, 3.4)
pt3dadd(221.32, -7.08, -18.05, 3.4)
pt3dadd(221.32, -6.67, -18.05, 3.4)
pt3dadd(221.5, -6.07, -18.05, 3.4)
pt3dadd(221.68, -5.86, -18.05, 3.4)
pt3dadd(221.86, -5.66, -18.05, 3.4)
pt3dadd(221.86, -4.85, -18.05, 3.4)
pt3dadd(222.04, -4.65, -18.05, 3.4)
pt3dadd(222.21, -4.24, -18.05, 3.4)
pt3dadd(222.21, -3.84, -18.05, 3.4)
pt3dadd(222.39, -3.43, -18.05, 3.4)
pt3dadd(222.57, -3.23, -18.05, 3.4)
pt3dadd(222.75, -2.83, -18.05, 3.4)
pt3dadd(222.93, -2.42, -18.05, 3.4)
pt3dadd(222.93, -1.81, -18.05, 3.4)
pt3dadd(223.11, -1.61, -18.05, 3.4)
pt3dadd(223.28, -1.41, -18.05, 3.4)
pt3dadd(223.28, -0.6, -18.05, 3.4)
pt3dadd(223.46, -0.4, -18.05, 3.4)
pt3dadd(223.64, 0.01, -18.05, 3.4)
pt3dadd(223.64, 0.41, -18.05, 3.4)
pt3dadd(223.46, 0.82, -19.1, 3.4)
pt3dadd(223.46, -0.8, -19.1, 3.4)
pt3dadd(223.64, -1, -19.1, 3.4)
pt3dadd(223.82, -1, -19.1, 3.4)
pt3dadd(224, -0.8, -19.1, 3.4)
pt3dadd(224.18, -0.4, -19.1, 3.4)
pt3dadd(224.35, -0.19, -19.1, 3.4)
pt3dadd(224.53, 0.21, -19.1, 3.4)
pt3dadd(224.89, 0.62, -19.1, 3.4)
pt3dadd(225.07, 0.82, -19.1, 3.4)
pt3dadd(225.25, 1.22, -19.1, 3.4)
pt3dadd(225.96, 2.04, -19.1, 3.4)
pt3dadd(226.14, 2.24, -19.1, 3.4)
pt3dadd(226.67, 2.85, -19.1, 3.4)
pt3dadd(227.03, 3.05, -19.1, 3.4)
pt3dadd(227.21, 3.25, -19.1, 3.4)
pt3dadd(227.39, 3.45, -19.1, 3.4)
pt3dadd(227.56, 3.86, -19.1, 3.4)
pt3dadd(227.74, 4.06, -19.1, 3.4)
pt3dadd(227.92, 4.26, -19.1, 3.4)
pt3dadd(228.28, 4.67, -19.1, 3.4)
pt3dadd(228.46, 4.87, -19.1, 3.4)
pt3dadd(228.63, 5.28, -19.1, 3.4)
pt3dadd(228.81, 5.48, -19.1, 3.4)
pt3dadd(229.17, 6.09, -19.1, 3.4)
pt3dadd(229.35, 6.29, -19.1, 3.4)
pt3dadd(229.7, 6.69, -19.1, 3.4)
pt3dadd(229.88, 6.9, -19.1, 3.4)
pt3dadd(230.06, 7.3, -19.1, 3.4)
pt3dadd(230.42, 7.5, -19.1, 3.4)
pt3dadd(230.6, 7.91, -19.1, 3.4)
pt3dadd(230.77, 8.31, -19.1, 3.4)
pt3dadd(230.95, 8.72, -19.1, 3.4)
pt3dadd(231.31, 9.12, -19.1, 3.4)
pt3dadd(231.49, 9.53, -19.1, 3.4)
pt3dadd(231.67, 9.93, -19.1, 3.4)
pt3dadd(232.02, 10.34, -19.1, 3.4)
pt3dadd(232.2, 10.74, -19.1, 3.4)
pt3dadd(232.38, 11.15, -19.1, 3.4)
pt3dadd(232.56, 11.55, -19.1, 3.4)
pt3dadd(232.91, 11.76, -19.1, 3.4)
pt3dadd(233.09, 12.16, -19.1, 3.4)
pt3dadd(233.27, 12.57, -19.1, 3.4)
pt3dadd(233.63, 12.97, -19.1, 3.4)
pt3dadd(233.98, 13.38, -19.1, 3.4)
pt3dadd(234.16, 13.58, -19.1, 3.4)
pt3dadd(234.52, 13.99, -19.1, 3.4)
pt3dadd(234.7, 14.39, -19.1, 3.4)
pt3dadd(235.05, 14.59, -19.1, 3.4)
pt3dadd(235.23, 14.8, -19.1, 3.4)
pt3dadd(235.41, 15.2, -19.1, 3.4)
pt3dadd(235.59, 15.4, -19.1, 3.4)
}
}
proc shape3d_17() {
dend { pt3dadd(235.95, 15.81, -19.1, 3.4)
pt3dadd(236.12, 16.21, -19.1, 3.4)
pt3dadd(236.66, 16.82, -19.1, 3.4)
pt3dadd(236.84, 17.23, -19.1, 3.4)
pt3dadd(237.19, 17.63, -19.1, 3.4)
pt3dadd(237.37, 17.83, -19.1, 3.4)
pt3dadd(237.73, 18.24, -19.1, 3.4)
pt3dadd(237.91, 18.64, -19.1, 3.4)
pt3dadd(238.26, 19.05, -19.1, 3.4)
pt3dadd(238.44, 19.25, -19.1, 3.4)
pt3dadd(238.62, 19.66, -19.1, 3.4)
pt3dadd(238.8, 20.06, -19.1, 3.4)
pt3dadd(239.16, 20.47, -19.1, 3.4)
pt3dadd(239.51, 21.07, -19.1, 3.4)
pt3dadd(239.69, 21.48, -19.1, 3.4)
pt3dadd(239.87, 21.68, -19.1, 3.4)
pt3dadd(240.05, 22.09, -19.1, 3.4)
pt3dadd(240.23, 22.29, -19.1, 3.4)
pt3dadd(240.4, 22.49, -19.1, 3.4)
pt3dadd(240.58, 23.1, -19.1, 3.4)
pt3dadd(240.94, 23.71, -19.1, 3.4)
pt3dadd(241.12, 23.91, -19.1, 3.4)
pt3dadd(241.3, 24.32, -19.1, 3.4)
pt3dadd(241.47, 24.72, -19.1, 3.4)
pt3dadd(241.47, 25.13, -19.1, 3.4)
pt3dadd(241.83, 25.33, -19.1, 3.4)
pt3dadd(241.83, 26.14, -19.1, 3.4)
pt3dadd(242.19, 26.34, -19.1, 3.4)
pt3dadd(242.19, 26.95, -19.1, 3.4)
pt3dadd(242.37, 27.15, -19.1, 3.4)
pt3dadd(242.54, 27.56, -19.1, 3.4)
pt3dadd(242.72, 27.96, -19.1, 3.4)
pt3dadd(242.9, 28.37, -19.1, 3.4)
pt3dadd(243.08, 28.57, -19.1, 3.4)
pt3dadd(243.08, 28.97, -19.1, 3.4)
pt3dadd(243.26, 29.18, -19.1, 3.4)
pt3dadd(243.44, 29.38, -19.1, 3.4)
pt3dadd(243.44, 29.78, -19.1, 3.4)
pt3dadd(243.61, 30.19, -19.1, 3.4)
pt3dadd(243.79, 30.59, -19.1, 3.4)
pt3dadd(243.79, 31, -19.1, 3.4)
pt3dadd(243.97, 31.4, -19.1, 3.4)
pt3dadd(243.97, 32.01, -19.1, 3.4)
pt3dadd(244.15, 32.21, -19.1, 3.4)
pt3dadd(244.15, 32.82, -19.1, 3.4)
pt3dadd(244.33, 33.23, -19.1, 3.4)
pt3dadd(244.33, 34.04, -19.1, 3.4)
pt3dadd(244.51, 34.44, -19.1, 3.4)
pt3dadd(244.51, 56.93, -19.1, 3.4)
pt3dadd(244.68, 58.14, -19.1, 3.4)
pt3dadd(244.68, 57.74, -19.1, 3.4)
pt3dadd(244.68, 58.14, -19.1, 3.4)
pt3dadd(244.86, 58.34, -19.1, 3.4)
pt3dadd(245.04, 58.75, -19.1, 3.4)
pt3dadd(245.04, 59.36, -19.1, 3.4)
pt3dadd(245.22, 59.56, -19.1, 3.4)
pt3dadd(245.22, 60.17, -19.1, 3.4)
pt3dadd(245.4, 60.37, -19.1, 3.4)
pt3dadd(245.4, 60.98, -19.1, 3.4)
pt3dadd(245.58, 61.38, -19.1, 3.4)
pt3dadd(245.58, 61.79, -19.1, 3.4)
pt3dadd(245.75, 61.99, -19.1, 3.4)
pt3dadd(245.93, 62.39, -19.1, 3.4)
pt3dadd(245.93, 62.8, -19.1, 3.4)
pt3dadd(246.11, 63.2, -19.1, 3.4)
pt3dadd(246.29, 63.61, -19.1, 3.4)
pt3dadd(246.47, 64.01, -19.1, 3.4)
pt3dadd(246.47, 64.42, -19.1, 3.4)
pt3dadd(246.65, 64.82, -19.1, 3.4)
pt3dadd(246.82, 65.23, -19.1, 3.4)
pt3dadd(247, 65.43, -19.1, 3.4)
pt3dadd(247.18, 65.84, -19.1, 3.4)
pt3dadd(247.36, 66.04, -19.1, 3.4)
pt3dadd(247.54, 66.44, -19.1, 3.4)
pt3dadd(247.72, 66.65, -19.1, 3.4)
pt3dadd(247.72, 67.05, -19.1, 3.4)
pt3dadd(247.89, 67.46, -19.1, 3.4)
pt3dadd(248.25, 68.07, -19.1, 3.4)
pt3dadd(248.43, 68.47, -19.1, 3.4)
pt3dadd(248.79, 69.28, -19.1, 3.4)
pt3dadd(248.96, 69.69, -19.1, 3.4)
pt3dadd(249.14, 69.89, -19.1, 3.4)
pt3dadd(249.32, 70.5, -19.1, 3.4)
pt3dadd(249.5, 70.9, -19.1, 3.4)
pt3dadd(249.5, 71.31, -19.1, 3.4)
pt3dadd(249.68, 71.91, -19.1, 3.4)
pt3dadd(249.86, 72.12, -19.1, 3.4)
pt3dadd(250.21, 72.93, -19.1, 3.4)
pt3dadd(250.39, 73.33, -19.1, 3.4)
pt3dadd(250.57, 73.74, -19.1, 3.4)
pt3dadd(250.57, 74.34, -19.1, 3.4)
pt3dadd(250.93, 74.75, -19.1, 3.4)
pt3dadd(250.93, 75.36, -19.1, 3.4)
pt3dadd(251.1, 75.76, -19.1, 3.4)
pt3dadd(251.28, 76.17, -19.1, 3.4)
pt3dadd(251.28, 77.18, -19.1, 3.4)
pt3dadd(251.46, 77.58, -19.1, 3.4)
pt3dadd(251.46, 78.6, -19.1, 3.4)
pt3dadd(251.64, 79, -19.1, 3.4)
pt3dadd(251.64, 81.23, -19.1, 3.4)
pt3dadd(251.82, 81.43, -19.1, 3.4)
pt3dadd(251.82, 106.95, -19.1, 3.4)
pt3dadd(251.64, 107.36, -19.1, 3.4)
pt3dadd(251.64, 107.97, -19.1, 3.4)
pt3dadd(251.46, 108.17, -19.1, 3.4)
pt3dadd(251.46, 110.19, -19.1, 3.4)
pt3dadd(251.28, 110.4, -19.1, 3.4)
pt3dadd(251.1, 110.6, -19.1, 3.4)
pt3dadd(251.1, 111.41, -19.1, 3.4)
pt3dadd(250.93, 111.61, -19.1, 3.4)
pt3dadd(250.75, 111.82, -19.1, 3.4)
pt3dadd(250.75, 111.01, -18.05, 3.4)
pt3dadd(250.75, 111.21, -18.05, 3.4)
pt3dadd(250.57, 111.41, -18.05, 3.4)
pt3dadd(250.57, 111.82, -18.05, 3.4)
pt3dadd(250.39, 112.02, -18.05, 3.4)
pt3dadd(250.21, 112.22, -18.05, 3.4)
pt3dadd(250.21, 112.63, -18.05, 3.4)
pt3dadd(250.03, 113.03, -18.05, 3.4)
pt3dadd(249.86, 113.44, -18.05, 3.4)
pt3dadd(249.68, 113.84, -18.05, 3.4)
pt3dadd(249.5, 114.04, -18.05, 3.4)
pt3dadd(249.32, 114.25, -18.05, 3.4)
pt3dadd(249.14, 114.45, -18.05, 3.4)
pt3dadd(248.96, 114.85, -18.05, 3.4)
pt3dadd(248.79, 114.85, -18.05, 3.4)
pt3dadd(248.61, 115.06, -18.05, 3.4)
pt3dadd(248.43, 115.26, -18.05, 3.4)
pt3dadd(248.25, 115.66, -18.05, 3.4)
pt3dadd(248.25, 116.07, -18.05, 3.4)
pt3dadd(248.07, 116.47, -18.05, 3.4)
pt3dadd(247.89, 116.88, -18.05, 3.4)
pt3dadd(247.89, 117.28, -18.05, 3.4)
pt3dadd(247.72, 117.89, -18.05, 3.4)
pt3dadd(247.72, 118.7, -18.05, 3.4)
pt3dadd(247.54, 119.11, -18.05, 3.4)
pt3dadd(247.54, 125.99, -18.05, 3.4)
pt3dadd(247.72, 126.4, -18.05, 3.4)
pt3dadd(247.72, 130.04, -18.05, 3.4)
pt3dadd(247.89, 130.25, -18.05, 3.4)
pt3dadd(247.89, 131.87, -18.05, 3.4)
pt3dadd(248.07, 132.47, -18.05, 3.4)
pt3dadd(248.07, 136.53, -18.05, 3.4)
pt3dadd(248.25, 136.93, -18.05, 3.4)
pt3dadd(248.25, 137.54, -18.05, 3.4)
pt3dadd(248.43, 137.74, -18.05, 3.4)
pt3dadd(248.43, 138.55, -18.05, 3.4)
pt3dadd(248.61, 138.96, -18.05, 3.4)
pt3dadd(248.61, 139.36, -18.05, 3.4)
pt3dadd(248.79, 139.97, -18.05, 3.4)
pt3dadd(248.79, 140.37, -18.05, 3.4)
pt3dadd(248.96, 140.78, -18.05, 3.4)
pt3dadd(248.96, 141.18, -18.05, 3.4)
pt3dadd(249.14, 141.79, -18.05, 3.4)
pt3dadd(249.14, 142.4, -18.05, 3.4)
pt3dadd(249.32, 143.01, -18.05, 3.4)
pt3dadd(249.32, 144.22, -18.05, 3.4)
pt3dadd(249.5, 144.63, -18.05, 3.4)
pt3dadd(249.5, 146.05, -18.05, 3.4)
pt3dadd(249.68, 146.45, -18.05, 3.4)
pt3dadd(249.68, 147.06, -18.05, 3.4)
pt3dadd(249.86, 147.67, -18.05, 3.4)
pt3dadd(249.86, 148.07, -18.05, 3.4)
pt3dadd(250.03, 148.68, -18.05, 3.4)
pt3dadd(250.03, 149.69, -18.05, 3.4)
pt3dadd(250.21, 149.89, -18.05, 3.4)
pt3dadd(250.21, 151.11, -18.05, 3.4)
pt3dadd(250.39, 151.31, -18.05, 3.4)
pt3dadd(250.39, 152.12, -18.05, 3.4)
pt3dadd(250.57, 152.32, -18.05, 3.4)
pt3dadd(250.57, 153.13, -18.05, 3.4)
pt3dadd(250.75, 153.54, -18.05, 3.4)
pt3dadd(250.75, 154.35, -18.05, 3.4)
pt3dadd(250.93, 154.96, -18.05, 3.4)
pt3dadd(250.93, 155.36, -18.05, 3.4)
pt3dadd(251.1, 155.77, -18.05, 3.4)
pt3dadd(251.1, 156.38, -18.05, 3.4)
pt3dadd(251.28, 156.58, -18.05, 3.4)
pt3dadd(251.28, 156.98, -18.05, 3.4)
pt3dadd(251.46, 157.39, -18.05, 3.4)
pt3dadd(251.46, 158.4, -18.05, 3.4)
pt3dadd(251.64, 159.01, -18.05, 3.4)
pt3dadd(251.64, 159.41, -18.05, 3.4)
pt3dadd(251.82, 159.62, -18.05, 3.4)
pt3dadd(252, 160.02, -18.05, 3.4)
pt3dadd(252, 160.63, -18.05, 3.4)
pt3dadd(252.17, 160.83, -18.05, 3.4)
pt3dadd(252.17, 161.24, -18.05, 3.4)
pt3dadd(252.35, 161.64, -18.05, 3.4)
pt3dadd(252.53, 161.84, -18.05, 3.4)
pt3dadd(252.71, 162.05, -18.05, 3.4)
pt3dadd(252.89, 162.45, -18.05, 3.4)
pt3dadd(253.07, 163.67, -15.95, 3.57)
pt3dadd(253.07, 166.91, -15.95, 3.57)
pt3dadd(253.24, 167.31, -15.95, 3.57)
pt3dadd(253.24, 168.73, -15.95, 3.57)
pt3dadd(253.42, 168.93, -15.95, 3.57)
pt3dadd(253.42, 169.74, -15.95, 3.57)
pt3dadd(253.6, 169.95, -15.95, 3.57)
pt3dadd(253.6, 171.16, -15.95, 3.57)
}
}
proc shape3d_18() {
dend { pt3dadd(253.78, 171.57, -15.95, 3.57)
pt3dadd(253.96, 171.97, -15.95, 3.57)
pt3dadd(253.96, 172.38, -15.95, 3.57)
pt3dadd(254.14, 172.78, -15.95, 3.57)
pt3dadd(254.14, 174, -15.95, 3.57)
pt3dadd(254.31, 174.2, -15.95, 3.57)
pt3dadd(254.31, 174.81, -15.95, 3.57)
pt3dadd(254.49, 175.01, -15.95, 3.57)
pt3dadd(254.67, 175.21, -15.95, 3.57)
pt3dadd(254.67, 175.62, -15.95, 3.57)
pt3dadd(254.85, 175.82, -15.95, 3.57)
pt3dadd(255.03, 176.22, -15.95, 3.57)
pt3dadd(255.03, 176.83, -15.95, 3.57)
pt3dadd(255.21, 177.04, -15.95, 3.57)
pt3dadd(255.38, 177.44, -15.95, 3.57)
pt3dadd(255.56, 177.85, -15.95, 3.57)
pt3dadd(255.56, 178.25, -15.95, 3.57)
pt3dadd(255.74, 178.66, -15.95, 3.57)
pt3dadd(255.92, 178.86, -15.95, 3.57)
pt3dadd(255.92, 179.47, -15.95, 3.57)
pt3dadd(256.1, 179.87, -15.95, 3.57)
pt3dadd(256.28, 180.28, -15.95, 3.57)
pt3dadd(256.45, 180.68, -15.95, 3.57)
pt3dadd(256.63, 180.88, -15.95, 3.57)
pt3dadd(256.81, 181.49, -15.95, 3.57)
pt3dadd(256.99, 181.9, -15.95, 3.57)
pt3dadd(256.99, 182.3, -15.95, 3.57)
pt3dadd(257.35, 182.71, -15.95, 3.57)
pt3dadd(257.52, 183.11, -15.95, 3.57)
pt3dadd(257.7, 183.52, -15.95, 3.57)
pt3dadd(257.88, 183.92, -15.95, 3.57)
pt3dadd(258.06, 184.12, -15.95, 3.57)
pt3dadd(258.24, 184.73, -15.95, 3.57)
pt3dadd(258.42, 185.14, -15.95, 3.57)
pt3dadd(258.59, 185.74, -15.95, 3.57)
pt3dadd(258.59, 186.15, -15.95, 3.57)
pt3dadd(258.95, 186.76, -15.95, 3.57)
pt3dadd(259.13, 187.36, -15.95, 3.57)
pt3dadd(259.31, 187.97, -15.95, 3.57)
pt3dadd(259.49, 188.38, -15.95, 3.57)
pt3dadd(259.49, 188.99, -15.95, 3.57)
pt3dadd(259.66, 189.39, -15.95, 3.57)
pt3dadd(259.84, 189.8, -15.95, 3.57)
pt3dadd(260.02, 190.4, -15.95, 3.57)
pt3dadd(260.2, 190.81, -15.95, 3.57)
pt3dadd(260.38, 191.42, -15.95, 3.57)
pt3dadd(260.56, 191.62, -15.95, 3.57)
pt3dadd(260.73, 192.02, -15.95, 3.57)
pt3dadd(260.91, 192.43, -15.95, 3.57)
pt3dadd(261.09, 192.83, -15.95, 3.57)
pt3dadd(261.27, 193.04, -15.95, 3.57)
pt3dadd(261.45, 193.44, -15.95, 3.57)
pt3dadd(261.45, 193.85, -15.95, 3.57)
pt3dadd(261.63, 194.25, -15.95, 3.57)
pt3dadd(261.8, 194.45, -15.95, 3.57)
pt3dadd(261.98, 194.66, -15.95, 3.57)
pt3dadd(261.98, 195.26, -15.95, 3.57)
pt3dadd(262.16, 195.67, -15.95, 3.57)
pt3dadd(262.34, 196.07, -15.95, 3.57)
pt3dadd(262.52, 196.48, -15.95, 3.57)
pt3dadd(262.7, 196.88, -15.95, 3.57)
pt3dadd(262.87, 197.29, -15.95, 3.57)
pt3dadd(263.05, 197.69, -15.95, 3.57)
pt3dadd(263.23, 198.3, -15.95, 3.57)
pt3dadd(263.41, 198.71, -15.95, 3.57)
pt3dadd(263.59, 199.11, -15.95, 3.57)
pt3dadd(263.77, 199.72, -15.95, 3.57)
pt3dadd(263.77, 200.13, -15.95, 3.57)
pt3dadd(263.94, 200.53, -15.95, 3.57)
pt3dadd(264.3, 200.94, -15.95, 3.57)
pt3dadd(264.48, 201.14, -15.95, 3.57)
pt3dadd(264.66, 201.75, -15.95, 3.57)
pt3dadd(264.84, 202.15, -15.95, 3.57)
pt3dadd(265.19, 202.35, -15.95, 3.57)
pt3dadd(265.19, 202.76, -15.95, 3.57)
pt3dadd(265.55, 203.16, -15.95, 3.57)
pt3dadd(265.73, 203.57, -15.95, 3.57)
pt3dadd(265.91, 203.97, -15.95, 3.57)
pt3dadd(265.91, 204.58, -15.95, 3.57)
pt3dadd(266.08, 204.78, -15.95, 3.57)
pt3dadd(266.26, 205.19, -15.95, 3.57)
pt3dadd(266.44, 205.59, -15.95, 3.57)
pt3dadd(266.44, 206, -15.95, 3.57)
pt3dadd(266.62, 206.4, -15.95, 3.57)
pt3dadd(266.8, 206.81, -15.95, 3.57)
pt3dadd(266.8, 207.21, -15.95, 3.57)
pt3dadd(266.98, 207.62, -15.95, 3.57)
pt3dadd(267.15, 207.82, -15.95, 3.57)
pt3dadd(267.15, 208.63, -15.95, 3.57)
pt3dadd(267.33, 209.04, -15.95, 3.57)
pt3dadd(267.51, 209.44, -15.95, 3.57)
pt3dadd(267.51, 210.05, -15.95, 3.57)
pt3dadd(267.69, 210.25, -15.95, 3.57)
pt3dadd(267.87, 210.46, -15.95, 3.57)
pt3dadd(267.87, 211.06, -15.95, 3.57)
pt3dadd(268.05, 211.47, -15.95, 3.57)
pt3dadd(268.22, 211.67, -15.95, 3.57)
pt3dadd(268.22, 212.08, -15.95, 3.57)
pt3dadd(268.4, 212.28, -15.95, 3.57)
pt3dadd(268.4, 213.9, -13.85, 3.4)
pt3dadd(268.4, 213.29, -13.85, 3.4)
pt3dadd(268.58, 213.09, -13.85, 3.4)
pt3dadd(268.76, 213.29, -13.85, 3.4)
pt3dadd(269.12, 213.49, -13.85, 3.4)
pt3dadd(269.29, 213.7, -13.85, 3.4)
pt3dadd(269.47, 214.1, -13.85, 3.4)
pt3dadd(269.65, 214.3, -13.85, 3.4)
pt3dadd(269.83, 214.71, -13.85, 3.4)
pt3dadd(270.19, 214.91, -13.85, 3.4)
pt3dadd(270.36, 215.32, -13.85, 3.4)
pt3dadd(270.54, 215.52, -13.85, 3.4)
pt3dadd(270.9, 215.92, -13.85, 3.4)
pt3dadd(271.08, 216.13, -13.85, 3.4)
pt3dadd(271.26, 216.53, -13.85, 3.4)
pt3dadd(271.61, 216.73, -13.85, 3.4)
pt3dadd(271.79, 216.94, -13.85, 3.4)
pt3dadd(271.97, 217.14, -13.85, 3.4)
pt3dadd(272.15, 217.34, -13.85, 3.4)
pt3dadd(272.33, 217.54, -13.85, 3.4)
pt3dadd(272.5, 217.75, -13.85, 3.4)
pt3dadd(272.68, 217.95, -13.85, 3.4)
pt3dadd(272.86, 218.15, -13.85, 3.4)
pt3dadd(273.04, 218.56, -13.85, 3.4)
pt3dadd(273.22, 218.76, -13.85, 3.4)
pt3dadd(273.4, 218.96, -13.85, 3.4)
pt3dadd(273.57, 219.16, -13.85, 3.4)
pt3dadd(273.75, 219.37, -13.85, 3.4)
pt3dadd(273.93, 219.57, -13.85, 3.4)
pt3dadd(274.11, 219.77, -13.85, 3.4)
pt3dadd(274.29, 219.97, -13.85, 3.4)
pt3dadd(274.47, 220.18, -13.85, 3.4)
pt3dadd(274.47, 220.58, -13.85, 3.4)
pt3dadd(274.64, 220.79, -13.85, 3.4)
pt3dadd(274.82, 220.99, -13.85, 3.4)
pt3dadd(275, 221.19, -13.85, 3.4)
pt3dadd(275.18, 221.39, -13.85, 3.4)
pt3dadd(275.36, 221.6, -13.85, 3.4)
pt3dadd(275.54, 221.8, -13.85, 3.4)
pt3dadd(275.71, 222, -13.85, 3.4)
pt3dadd(275.89, 222.2, -13.85, 3.4)
pt3dadd(276.07, 222.41, -13.85, 3.4)
pt3dadd(276.07, 222.81, -13.85, 3.4)
pt3dadd(276.25, 223.22, -13.85, 3.4)
pt3dadd(276.43, 223.42, -13.85, 3.4)
pt3dadd(276.43, 223.82, -13.85, 3.4)
pt3dadd(276.61, 224.03, -13.85, 3.4)
pt3dadd(276.61, 233.75, -13.85, 3.4)
pt3dadd(276.43, 234.36, -13.85, 3.4)
pt3dadd(276.43, 235.57, -13.85, 3.4)
pt3dadd(276.25, 235.98, -13.85, 3.4)
pt3dadd(276.25, 236.58, -13.85, 3.4)
pt3dadd(276.07, 236.99, -13.85, 3.4)
pt3dadd(276.07, 237.39, -13.85, 3.4)
pt3dadd(275.89, 237.8, -13.85, 3.4)
pt3dadd(275.89, 238.2, -13.85, 3.4)
pt3dadd(274.82, 239.01, -13.85, 4.25)
pt3dadd(274.82, 239.42, -13.85, 4.25)
pt3dadd(274.64, 239.62, -13.85, 4.25)
pt3dadd(274.64, 240.63, -13.85, 4.25)
pt3dadd(274.47, 240.84, -13.85, 4.25)
pt3dadd(274.47, 241.44, -13.85, 4.25)
pt3dadd(274.29, 241.65, -13.85, 4.25)
pt3dadd(274.11, 242.05, -13.85, 4.25)
pt3dadd(274.11, 242.46, -13.85, 4.25)
pt3dadd(273.93, 242.86, -13.85, 4.25)
pt3dadd(273.75, 243.07, -13.85, 4.25)
pt3dadd(273.75, 243.67, -13.85, 4.25)
pt3dadd(273.57, 243.88, -13.85, 4.25)
pt3dadd(273.4, 244.08, -13.85, 4.25)
pt3dadd(273.4, 246.31, -13.85, 4.25)
pt3dadd(273.22, 246.71, -13.85, 4.25)
pt3dadd(273.22, 258.66, -13.85, 4.25)
pt3dadd(273.4, 259.07, -13.85, 4.25)
pt3dadd(273.4, 259.67, -13.85, 4.25)
pt3dadd(273.57, 259.88, -13.85, 4.25)
pt3dadd(273.57, 263.12, -13.85, 4.25)
pt3dadd(273.57, 265.75, -12.8, 4.93)
pt3dadd(273.57, 266.76, -12.8, 4.93)
pt3dadd(273.75, 267.17, -12.8, 4.93)
pt3dadd(273.75, 268.38, -12.8, 4.93)
pt3dadd(273.93, 268.79, -12.8, 4.93)
pt3dadd(273.93, 270.61, -12.8, 4.93)
pt3dadd(274.11, 271.02, -12.8, 4.93)
pt3dadd(274.11, 274.66, -12.8, 4.93)
pt3dadd(274.29, 274.86, -12.8, 4.93)
pt3dadd(274.29, 275.47, -12.8, 4.93)
pt3dadd(274.47, 275.88, -12.8, 4.93)
pt3dadd(274.47, 277.09, -12.8, 4.93)
pt3dadd(274.64, 277.7, -12.8, 4.93)
pt3dadd(274.82, 278.31, -12.8, 4.93)
pt3dadd(274.82, 280.54, -12.8, 4.93)
pt3dadd(275, 280.74, -12.8, 4.93)
pt3dadd(275, 281.75, -12.8, 4.93)
pt3dadd(275.18, 282.16, -12.8, 4.93)
pt3dadd(275.18, 282.56, -12.8, 4.93)
pt3dadd(275.36, 282.76, -12.8, 4.93)
pt3dadd(275.54, 283.17, -12.8, 4.93)
pt3dadd(275.71, 283.57, -12.8, 4.93)
pt3dadd(275.89, 283.98, -12.8, 4.93)
pt3dadd(276.25, 284.38, -12.8, 4.93)
}
}
proc shape3d_19() {
dend { pt3dadd(276.43, 284.79, -12.8, 4.93)
pt3dadd(276.61, 284.99, -12.8, 4.93)
pt3dadd(276.61, 285.4, -12.8, 4.93)
pt3dadd(276.78, 285.6, -12.8, 4.93)
pt3dadd(276.96, 286.01, -12.8, 4.93)
pt3dadd(277.14, 286.21, -12.8, 4.93)
pt3dadd(277.32, 286.41, -12.8, 4.93)
pt3dadd(277.5, 286.82, -12.8, 4.93)
pt3dadd(277.68, 287.22, -12.8, 4.93)
pt3dadd(277.85, 287.42, -12.8, 4.93)
pt3dadd(280.71, 289.25, -12.8, 6.11)
}
dend[1] {pt3dclear()
pt3dadd(280.71, 289.25, -12.8, 4.08)
pt3dadd(281.6, 288.64, -13.85, 4.08)
pt3dadd(282.13, 288.64, -13.85, 4.08)
pt3dadd(282.67, 288.44, -13.85, 4.08)
pt3dadd(283.2, 288.23, -13.85, 4.08)
pt3dadd(283.56, 288.23, -13.85, 4.08)
pt3dadd(284.09, 288.03, -13.85, 4.08)
pt3dadd(284.45, 288.03, -13.85, 4.08)
pt3dadd(283.2, 288.44, -13.85, 4.59)
pt3dadd(283.56, 288.44, -13.85, 4.59)
pt3dadd(284.09, 288.23, -13.85, 4.59)
pt3dadd(284.81, 288.03, -13.85, 4.59)
pt3dadd(285.34, 287.83, -13.85, 4.59)
pt3dadd(286.06, 287.63, -13.85, 4.59)
pt3dadd(286.59, 287.22, -13.85, 4.59)
pt3dadd(287.13, 287.22, -13.85, 4.59)
pt3dadd(287.48, 287.02, -13.85, 4.59)
pt3dadd(287.66, 286.61, -13.85, 4.59)
pt3dadd(288.02, 286.41, -13.85, 4.59)
pt3dadd(288.37, 286.21, -13.85, 4.59)
pt3dadd(288.73, 286.21, -13.85, 4.59)
pt3dadd(289.09, 285.8, -13.85, 4.59)
pt3dadd(289.44, 285.6, -13.85, 4.59)
pt3dadd(289.62, 285.4, -13.85, 4.59)
pt3dadd(289.98, 285.19, -13.85, 4.59)
pt3dadd(290.34, 284.79, -13.85, 4.59)
pt3dadd(290.87, 284.38, -13.85, 4.59)
pt3dadd(291.23, 284.18, -13.85, 4.59)
pt3dadd(291.94, 283.98, -13.85, 4.59)
pt3dadd(292.3, 283.78, -13.85, 4.59)
pt3dadd(292.48, 283.37, -13.85, 4.59)
pt3dadd(292.65, 283.17, -13.85, 4.59)
pt3dadd(292.83, 282.97, -13.85, 4.59)
pt3dadd(293.01, 282.76, -13.85, 4.59)
pt3dadd(293.19, 282.56, -13.85, 4.59)
pt3dadd(293.55, 282.56, -13.85, 4.59)
pt3dadd(294.08, 282.16, -13.85, 4.59)
pt3dadd(294.44, 281.95, -13.85, 4.59)
pt3dadd(294.62, 281.55, -13.85, 4.59)
pt3dadd(295.15, 281.35, -13.85, 4.59)
pt3dadd(295.51, 281.14, -13.85, 4.59)
pt3dadd(295.86, 280.94, -13.85, 4.59)
pt3dadd(296.22, 280.54, -13.85, 4.59)
pt3dadd(296.76, 280.33, -13.85, 4.59)
pt3dadd(297.29, 280.13, -13.85, 4.59)
pt3dadd(297.65, 279.73, -13.85, 4.59)
pt3dadd(298.18, 279.52, -13.85, 4.59)
pt3dadd(298.54, 279.32, -13.85, 4.59)
pt3dadd(298.9, 279.12, -13.85, 4.59)
pt3dadd(299.43, 279.12, -13.85, 4.59)
pt3dadd(299.61, 278.92, -13.85, 4.59)
pt3dadd(299.97, 278.71, -13.85, 4.59)
pt3dadd(300.32, 278.51, -13.85, 4.59)
pt3dadd(300.68, 278.31, -13.85, 4.59)
pt3dadd(301.21, 278.31, -13.85, 4.59)
pt3dadd(301.39, 278.11, -13.85, 4.59)
pt3dadd(302.64, 278.11, -13.85, 4.59)
pt3dadd(303, 277.9, -13.85, 4.59)
pt3dadd(307.28, 277.9, -13.85, 4.59)
pt3dadd(307.63, 277.7, -13.85, 4.59)
pt3dadd(308.53, 277.7, -13.85, 4.59)
pt3dadd(309.06, 277.5, -13.85, 4.59)
pt3dadd(309.6, 277.3, -13.85, 4.59)
pt3dadd(309.95, 277.09, -13.85, 4.59)
pt3dadd(310.31, 277.09, -13.85, 4.59)
pt3dadd(310.49, 276.89, -13.85, 4.59)
pt3dadd(311.91, 276.89, -13.85, 4.59)
pt3dadd(312.27, 276.69, -13.85, 4.59)
pt3dadd(312.63, 276.49, -13.85, 4.59)
pt3dadd(313.16, 276.28, -13.85, 4.59)
pt3dadd(313.7, 276.28, -13.85, 4.59)
pt3dadd(314.23, 276.08, -13.85, 4.59)
pt3dadd(314.59, 276.08, -13.85, 4.59)
pt3dadd(314.77, 275.88, -13.85, 4.59)
pt3dadd(315.12, 275.88, -13.85, 4.59)
pt3dadd(315.48, 275.68, -13.85, 4.59)
pt3dadd(315.84, 275.68, -13.85, 4.59)
pt3dadd(316.02, 275.47, -13.85, 4.59)
pt3dadd(316.37, 275.27, -13.85, 4.59)
pt3dadd(317.09, 275.27, -13.85, 4.59)
pt3dadd(317.62, 275.07, -13.85, 4.59)
pt3dadd(317.8, 274.66, -13.85, 4.59)
pt3dadd(318.51, 274.86, -15.95, 4.59)
pt3dadd(318.69, 274.66, -15.95, 4.59)
pt3dadd(319.05, 274.46, -15.95, 4.59)
pt3dadd(319.4, 274.26, -15.95, 4.59)
pt3dadd(319.58, 273.85, -15.95, 4.59)
pt3dadd(320.65, 272.64, -15.95, 4.59)
pt3dadd(321.01, 272.23, -15.95, 4.59)
pt3dadd(321.54, 271.62, -15.95, 4.59)
pt3dadd(321.72, 271.42, -15.95, 4.59)
pt3dadd(321.9, 271.02, -15.95, 4.59)
pt3dadd(322.08, 270.61, -15.95, 4.59)
pt3dadd(322.08, 269.19, -15.95, 4.59)
pt3dadd(322.26, 268.99, -15.95, 4.59)
pt3dadd(322.44, 268.59, -15.95, 4.59)
pt3dadd(322.44, 267.78, -15.95, 4.59)
pt3dadd(322.61, 267.17, -15.95, 4.59)
pt3dadd(322.61, 266.56, -15.95, 4.59)
pt3dadd(322.79, 266.16, -15.95, 4.59)
pt3dadd(322.79, 264.94, -15.95, 4.59)
pt3dadd(322.97, 264.74, -15.95, 4.59)
pt3dadd(323.15, 264.33, -15.95, 4.59)
pt3dadd(323.15, 263.72, -15.95, 4.59)
pt3dadd(323.33, 263.32, -15.95, 4.59)
pt3dadd(323.51, 262.91, -15.95, 4.59)
pt3dadd(323.86, 262.51, -15.95, 4.59)
pt3dadd(324.04, 262.1, -15.95, 4.59)
pt3dadd(324.22, 261.7, -15.95, 4.59)
pt3dadd(324.4, 261.29, -15.95, 4.59)
pt3dadd(324.4, 259.47, -15.95, 4.59)
pt3dadd(324.58, 259.27, -15.95, 4.59)
pt3dadd(324.58, 258.46, -15.95, 4.59)
pt3dadd(324.75, 258.26, -15.95, 4.59)
pt3dadd(324.93, 257.85, -15.95, 4.59)
pt3dadd(325.11, 257.45, -15.95, 4.59)
pt3dadd(325.29, 257.04, -15.95, 4.59)
pt3dadd(325.65, 256.84, -15.95, 4.59)
pt3dadd(325.82, 256.43, -15.95, 4.59)
pt3dadd(326.18, 255.83, -15.95, 4.59)
pt3dadd(326.36, 255.42, -15.95, 4.59)
pt3dadd(326.72, 254.81, -15.95, 4.59)
pt3dadd(327.07, 254.41, -15.95, 4.59)
pt3dadd(327.25, 254, -15.95, 4.59)
pt3dadd(327.61, 253.4, -15.95, 4.59)
pt3dadd(327.79, 252.99, -15.95, 4.59)
pt3dadd(327.96, 252.58, -15.95, 4.59)
pt3dadd(328.32, 252.18, -15.95, 4.59)
pt3dadd(328.5, 251.57, -15.95, 4.59)
pt3dadd(328.68, 251.17, -15.95, 4.59)
pt3dadd(328.68, 250.56, -15.95, 4.59)
pt3dadd(328.86, 250.15, -15.95, 4.59)
pt3dadd(329.21, 249.55, -15.95, 4.59)
pt3dadd(329.21, 248.94, -15.95, 4.59)
pt3dadd(329.39, 248.53, -15.95, 4.59)
pt3dadd(329.75, 248.13, -15.95, 4.59)
pt3dadd(329.75, 247.32, -15.95, 4.59)
pt3dadd(329.93, 246.91, -15.95, 4.59)
pt3dadd(329.93, 245.29, -15.95, 4.59)
pt3dadd(330.28, 244.69, -17, 4.25)
pt3dadd(330.28, 243.47, -17, 4.25)
pt3dadd(330.46, 243.07, -17, 4.25)
pt3dadd(330.46, 238.41, -17, 4.25)
pt3dadd(330.64, 238, -17, 4.25)
pt3dadd(330.82, 237.8, -17, 4.25)
pt3dadd(331, 237.6, -17, 4.25)
pt3dadd(331.17, 237.19, -17, 4.25)
pt3dadd(331.35, 236.79, -17, 4.25)
pt3dadd(331.35, 236.38, -17, 4.25)
pt3dadd(331.53, 236.18, -17, 4.25)
pt3dadd(331.71, 235.98, -17, 4.25)
pt3dadd(331.89, 235.77, -17, 4.25)
pt3dadd(332.07, 235.57, -17, 4.25)
pt3dadd(332.24, 235.37, -17, 4.25)
pt3dadd(332.42, 235.17, -17, 4.25)
pt3dadd(332.78, 234.96, -17, 4.25)
pt3dadd(332.96, 234.76, -17, 4.25)
pt3dadd(333.14, 234.56, -17, 4.25)
pt3dadd(333.49, 234.36, -17, 4.25)
pt3dadd(333.85, 234.15, -17, 4.25)
pt3dadd(337.95, 234.15, -17, 4.25)
pt3dadd(339.2, 234.36, -17, 4.25)
pt3dadd(345.97, 234.36, -17, 4.25)
pt3dadd(346.51, 234.56, -17, 4.25)
pt3dadd(347.04, 234.76, -17, 4.25)
pt3dadd(347.94, 234.76, -17, 4.25)
pt3dadd(348.29, 234.96, -17, 4.25)
pt3dadd(348.83, 234.96, -17, 4.25)
pt3dadd(349.01, 235.17, -17, 4.25)
pt3dadd(349.18, 235.37, -17, 4.25)
pt3dadd(349.54, 235.37, -17, 4.25)
pt3dadd(349.72, 235.57, -17, 4.25)
pt3dadd(350.08, 235.77, -17, 4.25)
pt3dadd(350.43, 235.98, -17, 4.25)
pt3dadd(350.79, 236.18, -17, 4.25)
pt3dadd(351.32, 236.18, -17, 4.25)
pt3dadd(351.5, 236.38, -17, 4.25)
pt3dadd(351.86, 236.58, -17, 4.25)
pt3dadd(352.22, 236.79, -17, 4.25)
pt3dadd(352.57, 236.79, -17, 4.25)
pt3dadd(352.75, 236.99, -17, 4.25)
pt3dadd(353.29, 236.99, -17, 4.25)
pt3dadd(353.46, 237.19, -17, 4.25)
pt3dadd(353.64, 237.39, -17, 4.25)
pt3dadd(354.18, 237.39, -17, 4.25)
pt3dadd(354.53, 237.6, -17, 4.25)
pt3dadd(354.89, 237.8, -17, 4.25)
pt3dadd(355.07, 238, -17, 4.25)
pt3dadd(355.6, 238, -17, 4.25)
}
}
proc shape3d_20() {
dend[1] { pt3dadd(355.96, 238.2, -17, 4.25)
pt3dadd(356.14, 238.41, -17, 4.25)
}
dend[2] {pt3dclear()
pt3dadd(356.14, 238.41, -17, 3.91)
pt3dadd(356.67, 233.34, -22.25, 3.91)
pt3dadd(356.67, 231.93, -22.25, 3.91)
pt3dadd(356.85, 231.52, -22.25, 3.91)
pt3dadd(356.85, 229.9, -22.25, 3.91)
pt3dadd(357.03, 229.7, -22.25, 3.91)
pt3dadd(357.21, 229.29, -22.25, 3.91)
pt3dadd(357.21, 228.89, -22.25, 3.91)
pt3dadd(357.39, 228.48, -22.25, 3.91)
pt3dadd(357.57, 228.28, -22.25, 3.91)
pt3dadd(357.74, 228.08, -22.25, 3.91)
pt3dadd(357.92, 227.67, -22.25, 3.91)
pt3dadd(358.1, 227.27, -22.25, 3.91)
pt3dadd(358.28, 227.06, -22.25, 3.91)
pt3dadd(358.28, 226.66, -22.25, 3.91)
pt3dadd(358.46, 226.46, -22.25, 3.91)
pt3dadd(358.64, 226.05, -22.25, 3.91)
pt3dadd(358.81, 225.65, -22.25, 3.91)
pt3dadd(358.99, 225.44, -22.25, 3.91)
pt3dadd(358.99, 225.04, -22.25, 3.91)
pt3dadd(359.17, 224.23, -23.3, 3.57)
pt3dadd(359.35, 223.82, -23.3, 3.57)
pt3dadd(359.53, 223.42, -23.3, 3.57)
pt3dadd(359.71, 223.01, -23.3, 3.57)
pt3dadd(360.06, 222.41, -23.3, 3.57)
pt3dadd(360.42, 221.8, -23.3, 3.57)
pt3dadd(360.78, 221.19, -23.3, 3.57)
pt3dadd(360.95, 220.99, -23.3, 3.57)
pt3dadd(361.13, 220.58, -23.3, 3.57)
pt3dadd(361.31, 219.97, -23.3, 3.57)
pt3dadd(361.49, 219.77, -23.3, 3.57)
pt3dadd(361.67, 219.57, -23.3, 3.57)
pt3dadd(361.67, 219.16, -23.3, 3.57)
pt3dadd(361.85, 218.96, -23.3, 3.57)
pt3dadd(361.85, 218.56, -23.3, 3.57)
pt3dadd(362.02, 218.15, -23.3, 3.57)
pt3dadd(362.2, 217.75, -23.3, 3.57)
pt3dadd(362.2, 217.14, -23.3, 3.57)
pt3dadd(362.38, 216.94, -23.3, 3.57)
pt3dadd(362.56, 216.73, -23.3, 3.57)
pt3dadd(362.74, 216.33, -23.3, 3.57)
pt3dadd(362.92, 215.92, -23.3, 3.57)
pt3dadd(363.09, 215.52, -23.3, 3.57)
pt3dadd(363.45, 215.32, -23.3, 3.57)
pt3dadd(363.45, 214.71, -23.3, 3.57)
pt3dadd(363.63, 214.3, -23.3, 3.57)
pt3dadd(363.81, 213.9, -23.3, 3.57)
pt3dadd(363.99, 213.49, -23.3, 3.57)
pt3dadd(364.16, 213.09, -23.3, 3.57)
pt3dadd(364.16, 212.68, -23.3, 3.57)
pt3dadd(364.34, 212.08, -23.3, 3.57)
pt3dadd(364.52, 211.67, -23.3, 3.57)
pt3dadd(364.7, 211.27, -23.3, 3.57)
pt3dadd(364.7, 210.46, -23.3, 3.57)
pt3dadd(364.88, 210.05, -23.3, 3.57)
pt3dadd(364.88, 209.04, -23.3, 3.57)
pt3dadd(365.06, 208.63, -23.3, 3.57)
pt3dadd(365.41, 208.63, -26.45, 3.57)
pt3dadd(365.59, 208.43, -26.45, 3.57)
pt3dadd(365.77, 208.02, -26.45, 3.57)
pt3dadd(365.95, 207.62, -26.45, 3.57)
pt3dadd(366.3, 207.01, -26.45, 3.57)
pt3dadd(366.66, 206.61, -26.45, 3.57)
pt3dadd(366.84, 206.2, -26.45, 3.57)
pt3dadd(367.2, 205.8, -26.45, 3.57)
pt3dadd(367.55, 205.39, -26.45, 3.57)
pt3dadd(367.91, 204.99, -26.45, 3.57)
pt3dadd(368.09, 204.78, -26.45, 3.57)
pt3dadd(368.27, 204.58, -26.45, 3.57)
pt3dadd(368.62, 204.18, -26.45, 3.57)
pt3dadd(368.98, 203.97, -26.45, 3.57)
pt3dadd(369.51, 203.37, -26.45, 3.57)
pt3dadd(369.87, 203.16, -26.45, 3.57)
pt3dadd(370.05, 202.96, -26.45, 3.57)
pt3dadd(370.58, 202.56, -26.45, 3.57)
pt3dadd(370.94, 202.35, -26.45, 3.57)
pt3dadd(371.3, 202.15, -26.45, 3.57)
pt3dadd(371.83, 201.75, -26.45, 3.57)
pt3dadd(372.19, 201.34, -26.45, 3.57)
pt3dadd(372.55, 200.94, -26.45, 3.57)
pt3dadd(372.9, 200.53, -26.45, 3.57)
pt3dadd(373.44, 200.13, -26.45, 3.57)
pt3dadd(373.97, 199.92, -26.45, 3.57)
pt3dadd(374.33, 199.72, -26.45, 3.57)
pt3dadd(374.69, 199.52, -26.45, 3.57)
pt3dadd(374.86, 199.32, -26.45, 3.57)
pt3dadd(375.22, 199.11, -26.45, 3.57)
pt3dadd(375.58, 198.91, -26.45, 3.57)
pt3dadd(375.76, 198.71, -26.45, 3.57)
pt3dadd(376.11, 198.51, -26.45, 3.57)
pt3dadd(376.65, 197.9, -26.45, 3.57)
pt3dadd(377.18, 197.49, -26.45, 3.57)
pt3dadd(377.54, 197.29, -26.45, 3.57)
pt3dadd(377.72, 196.88, -26.45, 3.57)
pt3dadd(378.07, 196.68, -26.45, 3.57)
pt3dadd(378.25, 196.48, -26.45, 3.57)
pt3dadd(378.97, 195.67, -26.45, 3.57)
pt3dadd(379.32, 195.47, -26.45, 3.57)
pt3dadd(379.86, 194.86, -26.45, 3.57)
pt3dadd(380.21, 194.66, -26.45, 3.57)
pt3dadd(380.57, 194.25, -26.45, 3.57)
pt3dadd(380.75, 194.05, -26.45, 3.57)
pt3dadd(381.28, 193.44, -26.45, 3.57)
pt3dadd(381.64, 193.04, -26.45, 3.57)
pt3dadd(382, 192.63, -26.45, 3.57)
pt3dadd(382.35, 192.23, -26.45, 3.57)
pt3dadd(382.89, 191.62, -26.45, 3.57)
pt3dadd(383.42, 191.21, -26.45, 3.57)
pt3dadd(383.78, 190.81, -26.45, 3.57)
pt3dadd(383.96, 190.61, -26.45, 3.57)
pt3dadd(384.32, 190.4, -26.45, 3.57)
pt3dadd(384.49, 190, -26.45, 3.57)
pt3dadd(385.39, 188.99, -26.45, 3.57)
pt3dadd(385.74, 188.78, -26.45, 3.57)
pt3dadd(386.1, 188.38, -26.45, 3.57)
pt3dadd(386.46, 188.18, -26.45, 3.57)
pt3dadd(386.99, 187.57, -26.45, 3.57)
pt3dadd(387.53, 187.16, -26.45, 3.57)
pt3dadd(387.88, 186.76, -26.45, 3.57)
pt3dadd(388.42, 186.15, -26.45, 3.57)
pt3dadd(388.95, 185.54, -26.45, 3.57)
pt3dadd(389.31, 185.14, -26.45, 3.57)
pt3dadd(389.67, 184.73, -26.45, 3.57)
pt3dadd(389.84, 184.33, -26.45, 3.57)
pt3dadd(390.56, 183.52, -26.45, 3.57)
pt3dadd(390.74, 183.31, -26.45, 3.57)
pt3dadd(391.09, 182.91, -26.45, 3.57)
pt3dadd(391.45, 182.3, -26.45, 3.57)
pt3dadd(391.81, 181.9, -26.45, 3.57)
pt3dadd(391.98, 181.69, -26.45, 3.57)
pt3dadd(392.16, 181.29, -26.45, 3.57)
pt3dadd(392.34, 181.09, -26.45, 3.57)
pt3dadd(392.52, 180.88, -26.45, 3.57)
pt3dadd(392.7, 180.68, -26.45, 3.57)
pt3dadd(392.7, 180.48, -26.45, 3.57)
pt3dadd(392.88, 180.48, -30.65, 3.57)
pt3dadd(393.05, 180.28, -30.65, 3.57)
pt3dadd(393.41, 180.07, -30.65, 3.57)
pt3dadd(393.77, 179.87, -30.65, 3.57)
pt3dadd(394.12, 179.47, -30.65, 3.57)
pt3dadd(394.48, 179.26, -30.65, 3.57)
pt3dadd(395.73, 177.85, -30.65, 3.57)
pt3dadd(396.09, 177.64, -30.65, 3.57)
pt3dadd(396.26, 177.24, -30.65, 3.57)
pt3dadd(396.44, 177.04, -30.65, 3.57)
pt3dadd(396.62, 176.63, -30.65, 3.57)
pt3dadd(396.98, 176.22, -30.65, 3.57)
pt3dadd(397.16, 176.02, -30.65, 3.57)
pt3dadd(397.51, 175.62, -30.65, 3.57)
pt3dadd(397.69, 175.41, -30.65, 3.57)
pt3dadd(398.05, 175.01, -30.65, 3.57)
pt3dadd(398.23, 174.81, -30.65, 3.57)
pt3dadd(398.58, 174.4, -30.65, 3.57)
pt3dadd(398.76, 174.2, -30.65, 3.57)
pt3dadd(398.94, 174, -30.65, 3.57)
pt3dadd(399.3, 173.59, -30.65, 3.57)
pt3dadd(399.47, 173.19, -30.65, 3.57)
pt3dadd(399.65, 172.98, -30.65, 3.57)
pt3dadd(400.01, 172.78, -30.65, 3.57)
pt3dadd(400.37, 172.38, -30.65, 3.57)
pt3dadd(400.54, 171.97, -30.65, 3.57)
pt3dadd(401.26, 171.16, -30.65, 3.57)
pt3dadd(402.15, 170.15, -30.65, 3.57)
pt3dadd(402.51, 169.74, -30.65, 3.57)
pt3dadd(402.86, 169.14, -30.65, 3.57)
pt3dadd(403.22, 168.53, -30.65, 3.57)
pt3dadd(403.75, 168.12, -30.65, 3.57)
pt3dadd(404.11, 167.52, -30.65, 3.57)
pt3dadd(404.47, 167.11, -30.65, 3.57)
pt3dadd(404.65, 166.71, -30.65, 3.57)
pt3dadd(405, 166.3, -30.65, 3.57)
pt3dadd(405.89, 165.29, -30.65, 3.57)
pt3dadd(406.25, 164.88, -30.65, 3.57)
pt3dadd(406.43, 164.48, -30.65, 3.57)
pt3dadd(406.96, 163.87, -30.65, 3.57)
pt3dadd(407.14, 163.46, -30.65, 3.57)
pt3dadd(407.32, 163.26, -30.65, 3.57)
pt3dadd(407.5, 162.86, -30.65, 3.57)
pt3dadd(407.86, 162.45, -30.65, 3.57)
pt3dadd(408.03, 162.05, -30.65, 3.57)
pt3dadd(408.57, 161.44, -30.65, 3.57)
pt3dadd(408.75, 161.03, -30.65, 3.57)
pt3dadd(408.93, 160.63, -30.65, 3.57)
pt3dadd(409.28, 160.43, -30.65, 3.57)
pt3dadd(409.46, 159.82, -30.65, 3.57)
pt3dadd(409.64, 159.41, -30.65, 3.57)
pt3dadd(410, 159.01, -30.65, 3.57)
pt3dadd(410.17, 158.6, -30.65, 3.57)
pt3dadd(410.71, 158, -30.65, 3.57)
pt3dadd(410.89, 157.59, -30.65, 3.57)
pt3dadd(411.24, 156.98, -30.65, 3.57)
pt3dadd(411.6, 156.78, -30.65, 3.57)
pt3dadd(411.78, 156.38, -30.65, 3.57)
pt3dadd(411.96, 155.97, -30.65, 3.57)
pt3dadd(412.13, 155.57, -30.65, 3.57)
pt3dadd(412.31, 155.16, -30.65, 3.57)
pt3dadd(412.49, 154.96, -30.65, 3.57)
pt3dadd(412.49, 154.55, -30.65, 3.57)
}
}
proc shape3d_21() {
dend[2] { pt3dadd(412.85, 153.94, -30.65, 3.57)
pt3dadd(413.03, 153.54, -30.65, 3.57)
pt3dadd(413.03, 153.13, -30.65, 3.57)
pt3dadd(413.2, 152.73, -30.65, 3.57)
pt3dadd(413.38, 152.53, -30.65, 3.57)
pt3dadd(413.38, 151.72, -30.65, 3.57)
pt3dadd(413.56, 151.31, -30.65, 3.57)
pt3dadd(413.74, 150.91, -30.65, 3.57)
pt3dadd(413.92, 150.5, -30.65, 3.57)
pt3dadd(414.1, 150.1, -30.65, 3.57)
pt3dadd(414.27, 149.69, -30.65, 3.57)
pt3dadd(414.45, 149.29, -30.65, 3.57)
pt3dadd(414.63, 149.08, -30.65, 3.57)
pt3dadd(414.63, 148.68, -30.65, 3.57)
pt3dadd(414.81, 148.48, -30.65, 3.57)
pt3dadd(414.81, 148.07, -30.65, 3.57)
pt3dadd(414.99, 147.67, -30.65, 3.57)
pt3dadd(415.17, 147.46, -30.65, 3.57)
pt3dadd(415.34, 147.06, -30.65, 3.57)
pt3dadd(415.52, 146.86, -30.65, 3.57)
pt3dadd(415.7, 146.45, -30.65, 3.57)
pt3dadd(415.7, 146.05, -30.65, 3.57)
pt3dadd(415.88, 145.64, -30.65, 3.57)
pt3dadd(416.24, 145.24, -30.65, 3.57)
pt3dadd(416.41, 144.83, -30.65, 3.57)
pt3dadd(416.59, 144.63, -30.65, 3.57)
pt3dadd(416.77, 144.02, -30.65, 3.57)
pt3dadd(416.95, 143.61, -30.65, 3.57)
pt3dadd(417.31, 143.21, -30.65, 3.57)
pt3dadd(417.48, 142.6, -30.65, 3.57)
pt3dadd(417.66, 142.2, -30.65, 3.57)
pt3dadd(417.84, 141.79, -30.65, 3.57)
pt3dadd(418.2, 141.39, -30.65, 3.57)
pt3dadd(418.38, 140.98, -30.65, 3.57)
pt3dadd(418.38, 140.58, -30.65, 3.57)
pt3dadd(418.55, 140.17, -30.65, 3.57)
pt3dadd(419.09, 139.56, -30.65, 3.57)
pt3dadd(419.27, 139.16, -30.65, 3.57)
pt3dadd(419.27, 138.35, -30.65, 3.57)
pt3dadd(419.45, 137.94, -30.65, 3.57)
pt3dadd(419.45, 137.34, -30.65, 3.57)
pt3dadd(419.62, 136.93, -30.65, 3.57)
pt3dadd(419.62, 136.53, -30.65, 3.57)
pt3dadd(419.8, 136.12, -30.65, 3.57)
pt3dadd(419.98, 135.72, -30.65, 3.57)
pt3dadd(419.98, 135.31, -30.65, 3.57)
pt3dadd(420.16, 135.11, -30.65, 3.57)
pt3dadd(420.16, 134.7, -30.65, 3.57)
pt3dadd(420.34, 134.3, -30.65, 3.57)
pt3dadd(420.52, 133.89, -30.65, 3.57)
pt3dadd(420.69, 133.69, -30.65, 3.57)
pt3dadd(420.69, 133.08, -30.65, 3.57)
pt3dadd(420.87, 132.68, -30.65, 3.57)
pt3dadd(421.05, 132.27, -30.65, 3.57)
pt3dadd(421.41, 131.66, -30.65, 3.57)
pt3dadd(421.59, 131.26, -30.65, 3.57)
pt3dadd(421.94, 130.65, -30.65, 3.57)
pt3dadd(421.94, 130.25, -30.65, 3.57)
pt3dadd(422.3, 129.84, -30.65, 3.57)
pt3dadd(422.3, 129.44, -30.65, 3.57)
pt3dadd(422.48, 129.23, -30.65, 3.57)
pt3dadd(422.66, 128.83, -30.65, 3.57)
pt3dadd(422.66, 128.42, -30.65, 3.57)
pt3dadd(422.83, 128.02, -30.65, 3.57)
pt3dadd(423.19, 127.61, -30.65, 3.57)
pt3dadd(423.55, 127.21, -30.65, 3.57)
pt3dadd(423.73, 126.6, -30.65, 3.57)
pt3dadd(423.9, 125.99, -30.65, 3.57)
pt3dadd(424.26, 125.59, -30.65, 3.57)
pt3dadd(424.26, 125.18, -30.65, 3.57)
pt3dadd(424.62, 124.58, -30.65, 3.57)
pt3dadd(424.62, 124.17, -30.65, 3.57)
pt3dadd(424.8, 123.97, -30.65, 3.57)
pt3dadd(424.8, 123.56, -30.65, 3.57)
pt3dadd(424.97, 123.36, -30.65, 3.57)
pt3dadd(424.97, 122.96, -30.65, 3.57)
pt3dadd(425.15, 123.36, -31.7, 3.57)
pt3dadd(426.94, 115.06, -31.7, 3.57)
pt3dadd(426.94, 105.74, -31.7, 3.57)
pt3dadd(427.29, 104.93, -33.8, 3.4)
pt3dadd(427.29, 104.32, -33.8, 3.4)
pt3dadd(427.47, 103.71, -33.8, 3.4)
pt3dadd(427.65, 103.31, -33.8, 3.4)
pt3dadd(427.65, 102.7, -33.8, 3.4)
pt3dadd(459.55, 29.72, 0, 2.48)
pt3dadd(485.25, -44.24, 0, 2.48)
pt3dadd(486.8, -99.59, 0, 2.48)
pt3dadd(484.01, -157.87, 0, 2.48)
pt3dadd(458.31, -210.28, 0, 2.48)
pt3dadd(452.42, -219.59, 0, 2.48)
}
dend[3] {pt3dclear()
pt3dadd(356.14, 238.41, -17, 3.72)
pt3dadd(392.37, 214.41, 0, 3.72)
pt3dadd(417.46, 190.41, 0, 3.72)
pt3dadd(438.82, 189.92, 0, 3.72)
}
dend[4] {pt3dclear()
pt3dadd(438.82, 189.92, 0, 3.1)
pt3dadd(454.62, 189.43, 0, 3.1)
pt3dadd(469.17, 163.47, 0, 3.1)
pt3dadd(490.54, 77.76, 0, 3.1)
pt3dadd(508.81, -16.78, 0, 3.1)
pt3dadd(527.7, -51.55, 0, 3.1)
pt3dadd(543.5, -58.9, 0, 3.1)
}
dend[5] {pt3dclear()
pt3dadd(438.82, 189.92, 0, 2.48)
pt3dadd(457.72, 248.21, 0, 2.48)
pt3dadd(466.7, 285.92, 0, 2.48)
pt3dadd(483.11, 322.66, 0, 2.48)
pt3dadd(524.3, 357.43, 0, 2.48)
pt3dadd(605.74, 404.94, 0, 2.48)
pt3dadd(699.58, 447.55, 0, 2.48)
pt3dadd(733.95, 466.66, 0, 2.48)
}
dend[6] {pt3dclear()
pt3dadd(356.14, 238.41, -17, 4.25)
pt3dadd(356.67, 237.8, -19.1, 4.25)
pt3dadd(357.21, 238, -19.1, 4.25)
pt3dadd(357.74, 238.2, -19.1, 4.25)
pt3dadd(358.28, 238.61, -19.1, 4.25)
pt3dadd(358.64, 238.61, -19.1, 4.25)
pt3dadd(358.99, 238.81, -19.1, 4.25)
pt3dadd(359.17, 239.01, -19.1, 4.25)
pt3dadd(359.88, 239.01, -19.1, 4.25)
pt3dadd(360.24, 239.22, -19.1, 4.25)
pt3dadd(360.42, 239.42, -19.1, 4.25)
pt3dadd(360.78, 239.42, -19.1, 4.25)
pt3dadd(361.13, 239.62, -19.1, 4.25)
pt3dadd(361.31, 239.82, -19.1, 4.25)
pt3dadd(361.49, 240.03, -19.1, 4.25)
pt3dadd(362.02, 240.03, -19.1, 4.25)
pt3dadd(362.2, 240.23, -19.1, 4.25)
pt3dadd(362.38, 240.43, -19.1, 4.25)
pt3dadd(362.74, 240.43, -19.1, 4.25)
pt3dadd(362.47, 241.61, -19.1, 4.25)
}
dend[7] {pt3dclear()
pt3dadd(280.71, 289.25, -12.8, 6.11)
pt3dadd(280.88, 289.04, -12.8, 6.11)
pt3dadd(281.06, 288.64, -12.8, 6.11)
pt3dadd(281.24, 288.44, -12.8, 6.11)
pt3dadd(281.42, 288.23, -12.8, 6.11)
pt3dadd(281.42, 287.83, -12.8, 6.11)
pt3dadd(281.78, 287.63, -12.8, 6.11)
pt3dadd(281.95, 287.22, -12.8, 6.11)
pt3dadd(282.13, 287.42, -12.8, 6.11)
pt3dadd(281.95, 287.83, -12.8, 6.11)
pt3dadd(281.95, 288.23, -12.8, 6.11)
pt3dadd(281.78, 288.44, -12.8, 6.11)
pt3dadd(281.6, 288.84, -12.8, 6.11)
pt3dadd(281.42, 289.25, -12.8, 6.11)
pt3dadd(281.24, 289.65, -12.8, 6.11)
pt3dadd(281.06, 289.85, -12.8, 6.11)
pt3dadd(280.53, 290.46, -12.8, 6.11)
pt3dadd(280.53, 290.87, -12.8, 6.11)
pt3dadd(280.17, 291.27, -12.8, 6.11)
pt3dadd(280.17, 291.68, -12.8, 6.11)
pt3dadd(279.99, 292.08, -12.8, 6.11)
pt3dadd(279.64, 292.28, -12.8, 6.11)
pt3dadd(279.46, 292.69, -12.8, 6.11)
pt3dadd(279.28, 292.89, -12.8, 6.11)
pt3dadd(279.28, 293.3, -12.8, 6.11)
pt3dadd(278.92, 293.7, -12.8, 6.11)
pt3dadd(278.74, 293.9, -12.8, 6.11)
pt3dadd(278.74, 294.31, -12.8, 6.11)
pt3dadd(278.57, 294.51, -12.8, 6.11)
pt3dadd(278.39, 294.92, -12.8, 6.11)
pt3dadd(278.21, 295.12, -12.8, 6.11)
pt3dadd(277.85, 295.32, -12.8, 6.11)
pt3dadd(277.68, 295.73, -12.8, 6.11)
pt3dadd(277.5, 295.93, -12.8, 6.11)
pt3dadd(277.5, 296.33, -12.8, 6.11)
pt3dadd(277.32, 296.74, -12.8, 6.11)
pt3dadd(277.14, 297.15, -12.8, 6.11)
pt3dadd(277.14, 297.96, -12.8, 6.11)
pt3dadd(281.6, 289.45, -11.75, 5.43)
pt3dadd(281.42, 289.45, -11.75, 5.43)
pt3dadd(281.42, 289.85, -11.75, 5.43)
pt3dadd(281.24, 290.06, -11.75, 5.43)
pt3dadd(281.06, 290.26, -11.75, 5.43)
pt3dadd(280.88, 290.46, -11.75, 5.43)
pt3dadd(280.71, 290.66, -11.75, 5.43)
pt3dadd(280.71, 291.07, -11.75, 5.43)
pt3dadd(280.53, 291.27, -11.75, 5.43)
pt3dadd(280.35, 291.47, -11.75, 5.43)
pt3dadd(280.17, 291.88, -11.75, 5.43)
pt3dadd(279.99, 292.08, -11.75, 5.43)
pt3dadd(279.99, 292.49, -11.75, 5.43)
pt3dadd(279.82, 292.89, -11.75, 5.43)
pt3dadd(279.64, 293.3, -11.75, 5.43)
pt3dadd(279.46, 293.5, -11.75, 5.43)
pt3dadd(279.28, 293.9, -11.75, 5.43)
pt3dadd(279.1, 294.31, -11.75, 5.43)
pt3dadd(278.92, 294.71, -11.75, 5.43)
pt3dadd(278.74, 295.12, -11.75, 5.43)
pt3dadd(278.57, 295.52, -11.75, 5.43)
pt3dadd(278.39, 295.73, -11.75, 5.43)
pt3dadd(278.21, 296.13, -11.75, 5.43)
pt3dadd(278.03, 296.54, -11.75, 5.43)
pt3dadd(277.68, 296.74, -11.75, 5.43)
pt3dadd(277.68, 297.15, -11.75, 5.43)
pt3dadd(277.5, 297.55, -11.75, 5.43)
pt3dadd(277.32, 297.96, -11.75, 5.43)
pt3dadd(277.14, 298.36, -11.75, 5.43)
pt3dadd(276.96, 298.56, -11.75, 5.43)
pt3dadd(276.61, 298.56, -11.75, 5.43)
pt3dadd(276.43, 298.77, -11.75, 5.43)
pt3dadd(276.25, 299.17, -11.75, 5.43)
}
}
proc shape3d_22() {
dend[7] { pt3dadd(275.71, 299.78, -11.75, 5.43)
pt3dadd(275.54, 300.18, -11.75, 5.43)
pt3dadd(275.36, 300.59, -11.75, 5.43)
pt3dadd(275.36, 303.42, -11.75, 5.43)
pt3dadd(275.14, 303.63, -11.75, 5.43)
}
dend[8] {pt3dclear()
pt3dadd(275.14, 303.63, -11.75, 6.79)
pt3dadd(267.66, 295.14, -16.75, 6.79)
pt3dadd(257.47, 286.65, -16.75, 6.79)
pt3dadd(248.64, 281.25, -16.75, 6.79)
pt3dadd(241.17, 280.48, -16.75, 5.43)
pt3dadd(233.7, 287.42, -16.75, 5.43)
pt3dadd(226.22, 294.37, -16.75, 5.43)
pt3dadd(226.9, 295.14, -16.75, 5.43)
}
dend[9] {pt3dclear()
pt3dadd(275.14, 303.63, -11.75, 5.43)
pt3dadd(275.18, 304.03, -11.75, 5.43)
pt3dadd(275, 304.64, -11.75, 5.43)
pt3dadd(275, 305.25, -11.75, 5.43)
pt3dadd(271.79, 313.35, -10.7, 7)
}
dend[10] {pt3dclear()
pt3dadd(271.79, 313.35, -10.7, 7)
pt3dadd(272.5, 313.35, -10.7, 7)
pt3dadd(271.88, 324.69, -10.7, 7)
pt3dadd(272.15, 325.1, -10.7, 7.5)
pt3dadd(272.15, 336.37, -10.7, 8)
}
dend[11] {pt3dclear()
pt3dadd(271.79, 313.35, -10.7, 6.62)
pt3dadd(265.73, 307.47, -9.65, 6.62)
pt3dadd(265.55, 307.07, -9.65, 6.62)
pt3dadd(265.37, 306.87, -9.65, 6.62)
pt3dadd(265.19, 306.66, -9.65, 6.62)
pt3dadd(265.01, 306.46, -9.65, 6.62)
pt3dadd(264.84, 306.26, -9.65, 6.62)
pt3dadd(264.84, 305.85, -9.65, 6.62)
pt3dadd(264.66, 305.65, -9.65, 6.62)
pt3dadd(264.66, 304.64, -9.65, 6.62)
pt3dadd(264.48, 304.44, -9.65, 6.62)
pt3dadd(264.48, 301.4, -9.65, 6.62)
pt3dadd(264.3, 301.2, -9.65, 6.62)
pt3dadd(264.3, 299.17, -9.65, 6.62)
pt3dadd(264.12, 298.77, -9.65, 6.62)
pt3dadd(264.12, 297.96, -9.65, 6.62)
pt3dadd(263.94, 297.55, -9.65, 6.62)
pt3dadd(263.94, 296.94, -9.65, 6.62)
pt3dadd(263.77, 296.33, -9.65, 6.62)
pt3dadd(263.77, 295.93, -9.65, 6.62)
pt3dadd(263.59, 295.52, -9.65, 6.62)
pt3dadd(263.59, 295.12, -9.65, 6.62)
pt3dadd(263.41, 294.71, -9.65, 6.62)
pt3dadd(263.23, 294.31, -9.65, 6.62)
pt3dadd(263.23, 293.9, -9.65, 6.62)
pt3dadd(263.05, 293.5, -9.65, 6.62)
pt3dadd(263.05, 293.09, -9.65, 6.62)
pt3dadd(262.87, 292.69, -9.65, 6.62)
pt3dadd(262.87, 291.68, -9.65, 6.62)
pt3dadd(262.7, 291.27, -9.65, 6.62)
pt3dadd(262.7, 289.45, -9.65, 6.62)
pt3dadd(262.52, 289.04, -9.65, 6.62)
pt3dadd(262.52, 287.83, -9.65, 6.62)
pt3dadd(262.34, 287.42, -9.65, 6.62)
pt3dadd(262.34, 286.61, -9.65, 6.62)
pt3dadd(262.16, 286.21, -9.65, 6.62)
pt3dadd(262.16, 285.4, -9.65, 6.62)
pt3dadd(261.98, 284.99, -9.65, 6.62)
pt3dadd(261.8, 284.59, -9.65, 6.62)
pt3dadd(261.8, 283.98, -9.65, 6.62)
pt3dadd(261.63, 283.78, -9.65, 6.62)
pt3dadd(261.63, 282.97, -9.65, 6.62)
pt3dadd(261.45, 282.76, -9.65, 6.62)
pt3dadd(261.45, 280.74, -9.65, 6.62)
pt3dadd(261.27, 280.33, -9.65, 6.62)
pt3dadd(261.27, 279.93, -9.65, 6.62)
pt3dadd(261.09, 279.52, -9.65, 6.62)
pt3dadd(260.91, 279.12, -9.65, 6.62)
pt3dadd(260.73, 278.71, -9.65, 6.62)
pt3dadd(260.56, 278.31, -9.65, 6.62)
pt3dadd(260.38, 277.9, -9.65, 6.62)
pt3dadd(260.2, 277.5, -9.65, 6.62)
pt3dadd(260.2, 277.09, -9.65, 6.62)
pt3dadd(260.02, 276.49, -9.65, 6.62)
pt3dadd(259.84, 276.28, -9.65, 6.62)
pt3dadd(259.84, 275.88, -9.65, 6.62)
pt3dadd(259.66, 275.47, -9.65, 6.62)
pt3dadd(259.49, 275.07, -9.65, 6.62)
pt3dadd(259.31, 274.66, -9.65, 6.62)
pt3dadd(259.13, 274.26, -9.65, 6.62)
pt3dadd(258.95, 273.85, -9.65, 6.62)
pt3dadd(258.77, 273.65, -9.65, 6.62)
pt3dadd(258.59, 273.45, -9.65, 6.62)
pt3dadd(258.42, 273.04, -9.65, 6.62)
pt3dadd(258.24, 272.84, -9.65, 6.62)
pt3dadd(258.06, 272.43, -9.65, 6.62)
pt3dadd(257.7, 272.03, -9.65, 6.62)
pt3dadd(257.7, 271.62, -9.65, 6.62)
pt3dadd(257.52, 271.42, -9.65, 6.62)
pt3dadd(257.35, 271.22, -9.65, 6.62)
pt3dadd(257.35, 270.81, -9.65, 6.62)
pt3dadd(257.17, 270.61, -9.65, 6.62)
pt3dadd(256.81, 270.21, -9.65, 6.62)
pt3dadd(256.63, 270, -9.65, 6.62)
pt3dadd(256.45, 269.6, -9.65, 6.62)
pt3dadd(256.28, 269.4, -9.65, 6.62)
pt3dadd(255.92, 269.19, -9.65, 6.62)
pt3dadd(255.74, 268.99, -9.65, 6.62)
pt3dadd(255.56, 268.79, -9.65, 6.62)
pt3dadd(255.38, 268.59, -9.65, 6.62)
pt3dadd(255.21, 268.38, -9.65, 6.62)
pt3dadd(255.03, 268.18, -9.65, 6.62)
pt3dadd(254.85, 267.78, -9.65, 6.62)
pt3dadd(254.67, 267.57, -9.65, 6.62)
pt3dadd(254.49, 267.37, -9.65, 6.62)
pt3dadd(254.31, 267.17, -9.65, 6.62)
pt3dadd(254.14, 266.97, -9.65, 6.62)
pt3dadd(253.96, 266.76, -9.65, 6.62)
pt3dadd(253.96, 265.75, -9.65, 6.62)
pt3dadd(253.78, 265.55, -9.65, 6.62)
pt3dadd(253.78, 264.94, -9.65, 6.62)
pt3dadd(253.6, 264.74, -9.65, 6.62)
pt3dadd(253.6, 263.12, -9.65, 6.62)
pt3dadd(253.42, 263.32, -9.65, 6.62)
pt3dadd(253.24, 263.72, -9.65, 6.62)
pt3dadd(253.24, 263.93, -9.65, 6.62)
pt3dadd(252.17, 261.5, -9.65, 6.62)
pt3dadd(252.35, 261.29, -9.65, 6.62)
pt3dadd(252.35, 258.86, -9.65, 6.62)
pt3dadd(252.17, 258.26, -9.65, 6.62)
pt3dadd(252.17, 257.65, -9.65, 6.62)
pt3dadd(252, 257.24, -9.65, 6.62)
pt3dadd(251.82, 256.84, -9.65, 6.62)
pt3dadd(251.82, 255.62, -9.65, 6.62)
pt3dadd(251.64, 255.42, -9.65, 6.62)
pt3dadd(251.64, 255.02, -9.65, 6.62)
pt3dadd(251.46, 254.81, -9.65, 6.62)
pt3dadd(251.46, 254.41, -9.65, 6.62)
pt3dadd(251.28, 254, -9.65, 6.62)
pt3dadd(251.28, 253.4, -9.65, 6.62)
pt3dadd(251.1, 252.79, -9.65, 6.62)
pt3dadd(250.93, 252.38, -9.65, 6.62)
pt3dadd(250.75, 251.77, -9.65, 6.62)
pt3dadd(250.57, 251.37, -9.65, 6.62)
pt3dadd(250.57, 250.56, -9.65, 6.62)
pt3dadd(250.39, 249.95, -9.65, 6.62)
pt3dadd(250.21, 249.75, -9.65, 6.62)
pt3dadd(250.03, 249.34, -9.65, 6.62)
pt3dadd(250.03, 248.74, -9.65, 6.62)
pt3dadd(249.86, 248.33, -9.65, 6.62)
pt3dadd(249.68, 247.72, -9.65, 6.62)
pt3dadd(249.5, 247.32, -9.65, 6.62)
pt3dadd(249.5, 246.91, -9.65, 6.62)
pt3dadd(249.32, 246.31, -9.65, 6.62)
pt3dadd(249.32, 245.9, -9.65, 6.62)
pt3dadd(249.14, 245.29, -9.65, 6.62)
pt3dadd(248.96, 244.89, -9.65, 6.62)
pt3dadd(248.96, 244.28, -9.65, 6.62)
pt3dadd(248.79, 244.08, -9.65, 6.62)
pt3dadd(248.79, 243.67, -9.65, 6.62)
pt3dadd(248.61, 243.27, -9.65, 6.62)
pt3dadd(248.43, 242.86, -9.65, 6.62)
pt3dadd(248.43, 242.46, -9.65, 6.62)
pt3dadd(248.25, 242.26, -9.65, 6.62)
pt3dadd(248.07, 241.85, -9.65, 6.62)
pt3dadd(247.89, 241.65, -9.65, 6.62)
pt3dadd(247.89, 241.24, -9.65, 6.62)
pt3dadd(247.72, 241.04, -9.65, 6.62)
pt3dadd(247.54, 240.84, -9.65, 6.62)
pt3dadd(247.54, 240.43, -9.65, 6.62)
pt3dadd(247.36, 240.03, -9.65, 6.62)
pt3dadd(247.18, 239.62, -9.65, 6.62)
pt3dadd(247, 239.01, -9.65, 6.62)
pt3dadd(246.82, 238.41, -9.65, 6.62)
pt3dadd(246.65, 238.2, -9.65, 6.62)
pt3dadd(246.47, 237.6, -9.65, 6.62)
pt3dadd(246.47, 236.99, -9.65, 6.62)
pt3dadd(246.29, 236.79, -9.65, 6.62)
pt3dadd(246.29, 236.38, -9.65, 6.62)
pt3dadd(246.11, 235.98, -9.65, 6.62)
pt3dadd(245.93, 235.37, -9.65, 6.62)
pt3dadd(245.75, 234.96, -9.65, 6.62)
pt3dadd(245.75, 234.36, -9.65, 6.62)
pt3dadd(245.58, 233.95, -9.65, 6.62)
pt3dadd(245.22, 232.94, -9.65, 6.62)
pt3dadd(244.86, 231.93, -9.65, 6.62)
pt3dadd(244.68, 231.52, -9.65, 6.62)
pt3dadd(244.68, 231.11, -9.65, 6.62)
pt3dadd(244.51, 230.71, -9.65, 6.62)
pt3dadd(244.33, 230.3, -9.65, 6.62)
pt3dadd(244.33, 229.9, -9.65, 6.62)
pt3dadd(244.15, 229.49, -9.65, 6.62)
pt3dadd(243.97, 229.29, -9.65, 6.62)
pt3dadd(243.97, 228.48, -9.65, 6.62)
pt3dadd(243.79, 228.08, -9.65, 6.62)
pt3dadd(243.61, 227.67, -9.65, 6.62)
pt3dadd(243.44, 227.27, -9.65, 6.62)
pt3dadd(243.44, 226.46, -9.65, 6.62)
pt3dadd(243.08, 225.85, -9.65, 6.62)
pt3dadd(243.08, 225.04, -9.65, 6.62)
pt3dadd(242.9, 224.63, -9.65, 6.62)
pt3dadd(242.72, 224.03, -9.65, 6.62)
pt3dadd(242.72, 223.62, -9.65, 6.62)
pt3dadd(242.54, 223.22, -9.65, 6.62)
pt3dadd(242.54, 222.61, -9.65, 6.62)
pt3dadd(242.37, 222.41, -9.65, 6.62)
pt3dadd(242.37, 221.8, -9.65, 6.62)
}
}
proc shape3d_23() {
dend[11] { pt3dadd(242.19, 221.39, -9.65, 6.62)
pt3dadd(242.19, 220.38, -9.65, 6.62)
pt3dadd(242.01, 219.97, -9.65, 6.62)
pt3dadd(242.01, 219.16, -9.65, 6.62)
pt3dadd(241.83, 218.76, -9.65, 6.62)
pt3dadd(241.83, 218.15, -9.65, 6.62)
pt3dadd(241.65, 217.54, -9.65, 6.62)
pt3dadd(241.65, 216.94, -9.65, 6.62)
pt3dadd(241.47, 216.53, -9.65, 6.62)
pt3dadd(241.12, 215.92, -9.65, 6.62)
pt3dadd(240.94, 215.32, -9.65, 6.62)
pt3dadd(240.76, 214.71, -9.65, 6.62)
pt3dadd(240.58, 214.1, -9.65, 6.62)
pt3dadd(240.4, 213.7, -9.65, 6.62)
pt3dadd(240.05, 213.09, -9.65, 6.62)
pt3dadd(239.87, 212.89, -9.65, 6.62)
pt3dadd(239.69, 212.48, -9.65, 6.62)
pt3dadd(239.33, 212.08, -9.65, 6.62)
pt3dadd(239.33, 211.67, -9.65, 6.62)
pt3dadd(238.98, 211.47, -9.65, 6.62)
pt3dadd(238.98, 207.82, -11.75, 5.43)
pt3dadd(238.98, 205.39, -11.75, 5.43)
pt3dadd(238.8, 204.78, -11.75, 5.43)
pt3dadd(238.8, 204.18, -11.75, 5.43)
pt3dadd(238.62, 203.97, -11.75, 5.43)
pt3dadd(238.62, 203.16, -11.75, 5.43)
pt3dadd(238.44, 202.96, -11.75, 5.43)
pt3dadd(238.26, 202.76, -11.75, 5.43)
pt3dadd(238.26, 202.35, -11.75, 5.43)
pt3dadd(238.09, 202.15, -11.75, 5.43)
pt3dadd(237.91, 201.75, -11.75, 5.43)
pt3dadd(237.73, 201.54, -11.75, 5.43)
pt3dadd(237.73, 200.94, -11.75, 5.43)
pt3dadd(237.55, 200.73, -11.75, 5.43)
pt3dadd(237.37, 200.33, -11.75, 5.43)
pt3dadd(237.37, 199.92, -11.75, 5.43)
pt3dadd(237.19, 199.72, -11.75, 5.43)
pt3dadd(237.19, 199.11, -11.75, 5.43)
pt3dadd(237.02, 198.91, -11.75, 5.43)
pt3dadd(237.02, 197.9, -11.75, 5.43)
pt3dadd(236.84, 197.69, -11.75, 5.43)
pt3dadd(236.84, 193.44, -11.75, 5.43)
pt3dadd(237.37, 190.61, -11.75, 4.08)
pt3dadd(237.02, 188.38, -11.75, 4.08)
pt3dadd(237.02, 187.77, -11.75, 4.08)
pt3dadd(236.84, 187.57, -11.75, 4.08)
pt3dadd(236.84, 187.16, -11.75, 4.08)
pt3dadd(236.66, 186.96, -11.75, 4.08)
pt3dadd(236.48, 186.76, -11.75, 4.08)
pt3dadd(236.48, 186.35, -11.75, 4.08)
pt3dadd(236.3, 186.15, -11.75, 4.08)
pt3dadd(235.95, 185.95, -11.75, 4.08)
pt3dadd(235.77, 185.74, -11.75, 4.08)
pt3dadd(235.59, 185.54, -11.75, 4.08)
pt3dadd(235.41, 185.34, -11.75, 4.08)
pt3dadd(235.23, 185.14, -11.75, 4.08)
pt3dadd(235.05, 184.93, -11.75, 4.08)
pt3dadd(234.88, 184.73, -11.75, 4.08)
pt3dadd(234.7, 184.53, -11.75, 4.08)
pt3dadd(234.52, 184.12, -11.75, 4.08)
pt3dadd(234.34, 183.92, -11.75, 4.08)
pt3dadd(234.16, 183.72, -11.75, 4.08)
pt3dadd(233.81, 183.72, -11.75, 4.08)
pt3dadd(233.63, 183.52, -11.75, 4.08)
pt3dadd(233.27, 183.11, -11.75, 4.08)
pt3dadd(233.09, 182.91, -11.75, 4.08)
pt3dadd(232.91, 182.71, -11.75, 4.08)
pt3dadd(232.74, 182.5, -11.75, 4.08)
pt3dadd(232.56, 182.3, -11.75, 4.08)
pt3dadd(232.38, 182.1, -11.75, 4.08)
pt3dadd(232.2, 181.9, -11.75, 4.08)
pt3dadd(232.02, 181.69, -11.75, 4.08)
pt3dadd(231.84, 181.49, -11.75, 4.08)
pt3dadd(231.67, 181.29, -11.75, 4.08)
pt3dadd(231.49, 181.09, -11.75, 4.08)
pt3dadd(231.31, 180.88, -11.75, 4.08)
pt3dadd(231.13, 180.68, -11.75, 4.08)
pt3dadd(230.95, 180.48, -11.75, 4.08)
pt3dadd(230.77, 180.28, -11.75, 4.08)
pt3dadd(230.6, 180.07, -11.75, 4.08)
pt3dadd(230.42, 179.87, -11.75, 4.08)
pt3dadd(230.42, 179.47, -11.75, 4.08)
pt3dadd(230.24, 179.26, -11.75, 4.08)
pt3dadd(230.06, 179.06, -11.75, 4.08)
pt3dadd(229.88, 178.86, -11.75, 4.08)
pt3dadd(229.88, 178.45, -11.75, 4.08)
pt3dadd(229.7, 178.25, -11.75, 4.08)
pt3dadd(229.53, 178.05, -11.75, 4.08)
pt3dadd(229.35, 177.85, -11.75, 4.08)
pt3dadd(229.35, 177.24, -11.75, 4.08)
pt3dadd(229.17, 177.04, -11.75, 4.08)
pt3dadd(228.99, 176.83, -11.75, 4.08)
pt3dadd(228.81, 176.43, -11.75, 4.08)
pt3dadd(228.63, 176.22, -11.75, 4.08)
pt3dadd(228.63, 175.62, -11.75, 4.08)
pt3dadd(228.46, 175.41, -11.75, 4.08)
pt3dadd(228.28, 175.21, -11.75, 4.08)
pt3dadd(228.1, 175.01, -11.75, 4.08)
pt3dadd(227.92, 174.81, -11.75, 4.08)
pt3dadd(227.92, 174.4, -11.75, 4.08)
pt3dadd(227.74, 174.2, -11.75, 4.08)
pt3dadd(227.56, 173.79, -11.75, 4.08)
pt3dadd(227.56, 173.19, -11.75, 4.08)
pt3dadd(227.39, 172.98, -11.75, 4.08)
pt3dadd(227.21, 172.58, -11.75, 4.08)
pt3dadd(227.21, 171.57, -11.75, 4.08)
pt3dadd(227.03, 171.16, -11.75, 4.08)
pt3dadd(227.03, 170.55, -11.75, 4.08)
pt3dadd(226.85, 170.15, -11.75, 4.08)
pt3dadd(226.67, 169.74, -11.75, 4.08)
pt3dadd(226.67, 169.14, -11.75, 4.08)
pt3dadd(226.49, 168.73, -11.75, 4.08)
pt3dadd(226.49, 167.11, -11.75, 4.08)
pt3dadd(226.32, 166.91, -11.75, 4.08)
pt3dadd(226.32, 166.5, -11.75, 4.08)
pt3dadd(226.14, 166.3, -11.75, 4.08)
pt3dadd(225.96, 166.1, -11.75, 4.08)
pt3dadd(225.78, 165.69, -11.75, 4.08)
pt3dadd(225.6, 165.29, -11.75, 4.08)
pt3dadd(225.42, 165.08, -11.75, 4.08)
pt3dadd(225.25, 164.88, -11.75, 4.08)
pt3dadd(225.07, 164.68, -11.75, 4.08)
pt3dadd(224.89, 164.27, -11.75, 4.08)
pt3dadd(224.71, 164.07, -11.75, 4.08)
pt3dadd(224.53, 163.87, -11.75, 4.08)
pt3dadd(224.35, 163.46, -11.75, 4.08)
pt3dadd(224.18, 163.06, -11.75, 4.08)
pt3dadd(224, 162.65, -11.75, 4.08)
pt3dadd(223.82, 162.45, -11.75, 4.08)
pt3dadd(223.46, 162.25, -11.75, 4.08)
pt3dadd(223.28, 162.05, -11.75, 4.08)
pt3dadd(223.11, 161.84, -11.75, 4.08)
pt3dadd(223.11, 161.44, -11.75, 4.08)
pt3dadd(222.93, 161.24, -11.75, 4.08)
pt3dadd(222.75, 161.03, -11.75, 4.08)
pt3dadd(222.39, 160.83, -11.75, 4.08)
pt3dadd(222.21, 160.63, -11.75, 4.08)
pt3dadd(221.86, 160.22, -11.75, 4.08)
pt3dadd(221.68, 160.02, -11.75, 4.08)
pt3dadd(221.5, 159.82, -11.75, 4.08)
pt3dadd(221.32, 159.62, -11.75, 4.08)
pt3dadd(221.14, 159.41, -11.75, 4.08)
pt3dadd(220.97, 159.21, -11.75, 4.08)
pt3dadd(220.79, 159.01, -11.75, 4.08)
pt3dadd(220.61, 158.81, -11.75, 4.08)
pt3dadd(220.25, 158.6, -11.75, 4.08)
pt3dadd(220.07, 158.4, -11.75, 4.08)
pt3dadd(219.9, 158.2, -11.75, 4.08)
pt3dadd(219.72, 158, -11.75, 4.08)
pt3dadd(219.54, 157.79, -11.75, 4.08)
pt3dadd(219.54, 158.4, -11.75, 4.08)
pt3dadd(219.9, 159.01, -11.75, 4.08)
pt3dadd(220.07, 159.21, -11.75, 4.08)
pt3dadd(218.65, 157.19, -11.75, 3.4)
pt3dadd(218.47, 156.98, -11.75, 3.4)
pt3dadd(218.11, 156.98, -11.75, 3.4)
pt3dadd(217.93, 156.78, -11.75, 3.4)
pt3dadd(217.76, 156.58, -11.75, 3.4)
pt3dadd(217.58, 156.38, -11.75, 3.4)
pt3dadd(217.4, 156.17, -11.75, 3.4)
pt3dadd(217.04, 155.97, -11.75, 3.4)
pt3dadd(216.86, 155.77, -11.75, 3.4)
pt3dadd(216.69, 155.57, -11.75, 3.4)
pt3dadd(216.51, 155.36, -11.75, 3.4)
pt3dadd(216.33, 154.96, -11.75, 3.4)
pt3dadd(216.15, 154.76, -11.75, 3.4)
pt3dadd(216.15, 154.35, -11.75, 3.4)
pt3dadd(215.97, 154.15, -11.75, 3.4)
pt3dadd(215.79, 153.74, -11.75, 3.4)
pt3dadd(215.62, 153.54, -11.75, 3.4)
pt3dadd(215.44, 153.34, -11.75, 3.4)
pt3dadd(215.26, 153.13, -11.75, 3.4)
pt3dadd(215.08, 152.73, -11.75, 3.4)
pt3dadd(214.9, 152.53, -11.75, 3.4)
pt3dadd(214.72, 152.32, -11.75, 3.4)
pt3dadd(214.55, 152.12, -11.75, 3.4)
pt3dadd(214.37, 151.92, -11.75, 3.4)
pt3dadd(214.19, 151.72, -11.75, 3.4)
pt3dadd(214.01, 151.51, -11.75, 3.4)
pt3dadd(213.83, 151.31, -11.75, 3.4)
pt3dadd(213.65, 151.11, -11.75, 3.4)
pt3dadd(213.3, 150.7, -11.75, 3.4)
pt3dadd(213.12, 150.3, -11.75, 3.4)
pt3dadd(212.94, 149.89, -11.75, 3.4)
pt3dadd(212.59, 149.49, -11.75, 3.4)
pt3dadd(212.41, 149.08, -11.75, 3.4)
pt3dadd(212.23, 148.88, -11.75, 3.4)
pt3dadd(212.05, 148.68, -11.75, 3.4)
pt3dadd(211.87, 148.27, -11.75, 3.4)
pt3dadd(211.52, 148.07, -11.75, 3.4)
pt3dadd(211.34, 147.87, -11.75, 3.4)
pt3dadd(211.16, 147.67, -11.75, 3.4)
pt3dadd(210.98, 147.46, -11.75, 3.4)
pt3dadd(210.8, 147.26, -11.75, 3.4)
pt3dadd(210.62, 147.06, -11.75, 3.4)
pt3dadd(210.45, 146.65, -11.75, 3.4)
pt3dadd(210.09, 146.25, -11.75, 3.4)
pt3dadd(209.91, 146.05, -11.75, 3.4)
pt3dadd(209.73, 145.84, -11.75, 3.4)
pt3dadd(209.38, 145.64, -11.75, 3.4)
}
}
proc shape3d_24() {
dend[11] { pt3dadd(209.2, 145.44, -11.75, 3.4)
pt3dadd(209.02, 145.24, -11.75, 3.4)
pt3dadd(208.84, 144.83, -11.75, 3.4)
pt3dadd(208.48, 144.63, -11.75, 3.4)
pt3dadd(208.48, 145.03, -11.75, 3.4)
pt3dadd(207.24, 143.01, -11.75, 3.74)
pt3dadd(206.88, 143.01, -11.75, 3.74)
pt3dadd(206.7, 142.8, -11.75, 3.74)
pt3dadd(205.99, 142.8, -11.75, 3.74)
pt3dadd(205.63, 142.6, -11.75, 3.74)
pt3dadd(205.45, 142.4, -11.75, 3.74)
pt3dadd(205.27, 142.2, -11.75, 3.74)
pt3dadd(205.1, 141.99, -11.75, 3.74)
pt3dadd(204.92, 141.59, -11.75, 3.74)
pt3dadd(204.92, 141.18, -11.75, 3.74)
pt3dadd(204.74, 140.78, -11.75, 3.74)
pt3dadd(204.56, 140.58, -11.75, 3.74)
pt3dadd(204.38, 140.17, -11.75, 3.74)
pt3dadd(204.38, 139.77, -11.75, 3.74)
pt3dadd(204.2, 139.56, -11.75, 3.74)
pt3dadd(204.03, 139.16, -11.75, 3.74)
pt3dadd(203.85, 138.96, -11.75, 3.74)
pt3dadd(203.85, 138.55, -11.75, 3.74)
pt3dadd(203.67, 138.35, -11.75, 3.74)
pt3dadd(203.49, 137.94, -11.75, 3.74)
pt3dadd(203.49, 137.54, -11.75, 3.74)
pt3dadd(203.31, 137.34, -11.75, 3.74)
pt3dadd(203.13, 136.93, -11.75, 3.74)
pt3dadd(203.13, 136.32, -11.75, 3.74)
pt3dadd(202.96, 136.12, -11.75, 3.74)
pt3dadd(202.78, 135.92, -11.75, 3.74)
pt3dadd(202.78, 135.51, -11.75, 3.74)
pt3dadd(202.6, 135.11, -11.75, 3.74)
pt3dadd(202.42, 134.91, -11.75, 3.74)
pt3dadd(202.24, 134.7, -11.75, 3.74)
pt3dadd(202.06, 134.5, -11.75, 3.74)
pt3dadd(201.89, 134.1, -11.75, 3.74)
pt3dadd(201.71, 133.89, -11.75, 3.74)
pt3dadd(201.71, 133.49, -11.75, 3.74)
pt3dadd(201.53, 133.08, -11.75, 3.74)
pt3dadd(201.35, 132.68, -11.75, 3.74)
pt3dadd(201.17, 132.47, -11.75, 3.74)
pt3dadd(200.99, 132.07, -11.75, 3.74)
pt3dadd(200.82, 131.66, -11.75, 3.74)
pt3dadd(200.64, 131.26, -11.75, 3.74)
pt3dadd(200.64, 130.65, -11.75, 3.74)
pt3dadd(200.46, 130.45, -11.75, 3.74)
pt3dadd(200.28, 130.25, -11.75, 3.74)
pt3dadd(200.1, 129.84, -11.75, 3.74)
pt3dadd(199.92, 129.23, -11.75, 3.74)
pt3dadd(199.75, 128.83, -11.75, 3.74)
pt3dadd(199.57, 128.42, -11.75, 3.74)
pt3dadd(199.39, 128.02, -11.75, 3.74)
pt3dadd(199.21, 127.61, -11.75, 3.74)
pt3dadd(199.03, 127.41, -11.75, 3.74)
pt3dadd(198.85, 127.01, -11.75, 3.74)
pt3dadd(198.68, 126.8, -11.75, 3.74)
pt3dadd(198.32, 126.4, -11.75, 3.74)
pt3dadd(198.14, 126.2, -11.75, 3.74)
pt3dadd(197.96, 125.79, -11.75, 3.74)
pt3dadd(197.78, 125.39, -11.75, 3.74)
pt3dadd(197.61, 125.18, -11.75, 3.74)
pt3dadd(197.61, 124.78, -11.75, 3.74)
pt3dadd(197.43, 124.58, -11.75, 3.74)
pt3dadd(197.25, 124.37, -11.75, 3.74)
pt3dadd(197.25, 123.97, -11.75, 3.74)
pt3dadd(197.07, 123.77, -11.75, 3.74)
pt3dadd(196.89, 123.56, -11.75, 3.74)
pt3dadd(196.71, 123.36, -11.75, 3.74)
pt3dadd(196.71, 122.96, -11.75, 3.74)
pt3dadd(196.54, 122.75, -11.75, 3.74)
pt3dadd(196.36, 122.35, -11.75, 3.74)
pt3dadd(196.18, 122.15, -11.75, 3.74)
pt3dadd(196, 121.74, -11.75, 3.74)
pt3dadd(195.82, 121.33, -11.75, 3.74)
pt3dadd(195.64, 121.13, -11.75, 3.74)
pt3dadd(195.64, 120.73, -11.75, 3.74)
pt3dadd(195.29, 120.32, -11.75, 3.74)
pt3dadd(195.11, 119.92, -11.75, 3.74)
pt3dadd(194.93, 119.51, -11.75, 3.74)
pt3dadd(194.75, 119.11, -11.75, 3.74)
pt3dadd(194.57, 118.7, -11.75, 3.74)
pt3dadd(194.4, 118.3, -11.75, 3.74)
pt3dadd(194.22, 117.89, -11.75, 3.74)
pt3dadd(194.04, 117.69, -11.75, 3.74)
pt3dadd(193.86, 117.49, -11.75, 3.74)
pt3dadd(193.86, 117.08, -11.75, 3.74)
pt3dadd(193.68, 116.88, -11.75, 3.74)
pt3dadd(193.68, 116.47, -11.75, 3.74)
pt3dadd(193.5, 116.27, -11.75, 3.74)
pt3dadd(193.33, 116.07, -11.75, 3.74)
pt3dadd(193.15, 115.66, -11.75, 3.74)
pt3dadd(192.97, 115.46, -11.75, 3.74)
pt3dadd(192.97, 115.06, -11.75, 3.74)
pt3dadd(192.79, 114.85, -11.75, 3.74)
pt3dadd(192.61, 114.65, -11.75, 3.74)
pt3dadd(192.26, 114.25, -11.75, 3.74)
pt3dadd(192.26, 113.84, -11.75, 3.74)
pt3dadd(192.08, 113.64, -11.75, 3.74)
pt3dadd(191.9, 113.23, -11.75, 3.74)
pt3dadd(191.72, 113.03, -11.75, 3.74)
pt3dadd(191.54, 112.63, -11.75, 3.74)
pt3dadd(191.36, 112.22, -11.75, 3.74)
pt3dadd(191.36, 111.82, -11.75, 3.74)
pt3dadd(191.19, 111.61, -11.75, 3.74)
pt3dadd(191.01, 111.21, -11.75, 3.74)
pt3dadd(191.01, 110.4, -11.75, 3.74)
pt3dadd(190.83, 110.19, -11.75, 3.74)
pt3dadd(190.83, 109.79, -11.75, 3.74)
pt3dadd(190.65, 109.59, -11.75, 3.74)
pt3dadd(190.47, 109.18, -11.75, 3.74)
pt3dadd(190.29, 108.78, -11.75, 3.74)
pt3dadd(190.29, 107.76, -11.75, 3.74)
pt3dadd(190.12, 107.56, -11.75, 3.74)
pt3dadd(190.12, 106.95, -11.75, 3.74)
pt3dadd(189.94, 106.55, -11.75, 3.74)
pt3dadd(189.94, 97.84, -11.75, 3.74)
pt3dadd(190.12, 97.64, -11.75, 3.74)
pt3dadd(190.12, 97.23, -11.75, 3.74)
pt3dadd(190.29, 97.03, -11.75, 3.74)
pt3dadd(190.47, 96.83, -11.75, 3.74)
pt3dadd(191.36, 96.83, -11.75, 3.74)
pt3dadd(191.36, 96.42, -11.75, 3.74)
pt3dadd(191.54, 96.22, -11.75, 3.74)
pt3dadd(191.54, 95.81, -11.75, 3.74)
pt3dadd(191.72, 95.61, -11.75, 3.74)
pt3dadd(191.72, 93.38, -11.75, 3.74)
pt3dadd(191.72, 93.79, -11.75, 3.74)
pt3dadd(191.9, 91.97, -10.7, 3.74)
pt3dadd(192.08, 91.76, -10.7, 3.74)
pt3dadd(192.08, 84.47, -10.7, 3.74)
pt3dadd(192.43, 87.71, -10.7, 5.77)
pt3dadd(192.43, 81.03, -10.7, 5.77)
pt3dadd(192.43, 89.94, -10.7, 5.77)
pt3dadd(192.43, 81.64, -10.7, 5.77)
}
dend[12] {pt3dclear()
pt3dadd(192.43, 81.64, -10.7, 5.77)
pt3dadd(191.9, 81.84, -10.7, 5.77)
}
dend[13] {pt3dclear()
pt3dadd(191.9, 81.84, -10.7, 4.25)
pt3dadd(189.4, 81.23, -13.85, 4.25)
pt3dadd(189.22, 81.03, -13.85, 4.25)
pt3dadd(189.05, 80.83, -13.85, 4.25)
pt3dadd(188.87, 80.62, -13.85, 4.25)
pt3dadd(188.51, 80.42, -13.85, 4.25)
pt3dadd(188.15, 80.22, -13.85, 4.25)
pt3dadd(187.98, 80.02, -13.85, 4.25)
pt3dadd(187.62, 80.02, -13.85, 4.25)
pt3dadd(187.44, 79.81, -13.85, 4.25)
pt3dadd(187.08, 79.61, -13.85, 4.25)
pt3dadd(186.73, 79.41, -13.85, 4.25)
pt3dadd(182.98, 79.41, -13.85, 4.25)
pt3dadd(182.8, 79.61, -13.85, 4.25)
pt3dadd(182.45, 79.61, -13.85, 4.25)
pt3dadd(182.27, 79.81, -13.85, 4.25)
pt3dadd(182.09, 80.02, -13.85, 4.25)
pt3dadd(181.73, 80.22, -13.85, 4.25)
pt3dadd(181.56, 80.42, -13.85, 4.25)
pt3dadd(181.38, 80.62, -13.85, 4.25)
pt3dadd(181.02, 80.62, -13.85, 4.25)
pt3dadd(180.84, 80.83, -13.85, 4.25)
pt3dadd(180.66, 81.03, -13.85, 4.25)
pt3dadd(180.49, 81.23, -13.85, 4.25)
pt3dadd(180.13, 81.23, -13.85, 4.25)
pt3dadd(179.95, 81.43, -13.85, 4.25)
pt3dadd(179.77, 81.84, -13.85, 4.25)
pt3dadd(179.42, 81.84, -13.85, 4.25)
pt3dadd(179.24, 82.24, -13.85, 4.25)
pt3dadd(179.06, 82.45, -13.85, 4.25)
pt3dadd(178.7, 82.45, -13.85, 4.25)
pt3dadd(178.52, 82.65, -13.85, 4.25)
pt3dadd(178.35, 82.85, -13.85, 4.25)
pt3dadd(177.99, 82.85, -13.85, 4.25)
pt3dadd(177.81, 83.05, -13.85, 4.25)
pt3dadd(177.63, 83.26, -13.85, 4.25)
pt3dadd(177.28, 83.26, -13.85, 4.25)
pt3dadd(176.92, 83.46, -13.85, 4.25)
pt3dadd(176.56, 83.66, -13.85, 4.25)
pt3dadd(176.21, 83.66, -13.85, 4.25)
pt3dadd(175.85, 83.86, -13.85, 4.25)
pt3dadd(175.49, 84.07, -13.85, 4.25)
pt3dadd(174.6, 84.07, -13.85, 4.25)
pt3dadd(172.82, 83.05, -14.9, 3.74)
pt3dadd(172.64, 82.85, -14.9, 3.74)
pt3dadd(172.28, 82.85, -14.9, 3.74)
pt3dadd(172.1, 82.65, -14.9, 3.74)
pt3dadd(171.75, 82.65, -14.9, 3.74)
pt3dadd(171.39, 82.45, -14.9, 3.74)
pt3dadd(168.18, 82.45, -14.9, 3.74)
pt3dadd(167.82, 82.65, -14.9, 3.74)
pt3dadd(167.65, 82.85, -14.9, 3.74)
pt3dadd(167.29, 82.85, -14.9, 3.74)
pt3dadd(167.11, 83.05, -14.9, 3.74)
pt3dadd(166.75, 83.26, -14.9, 3.74)
pt3dadd(166.58, 83.46, -14.9, 3.74)
pt3dadd(166.22, 83.46, -14.9, 3.74)
pt3dadd(166.04, 83.66, -14.9, 3.74)
pt3dadd(165.86, 83.86, -14.9, 3.74)
pt3dadd(165.68, 84.07, -14.9, 3.74)
pt3dadd(165.33, 84.27, -14.9, 3.74)
pt3dadd(165.15, 84.47, -14.9, 3.74)
pt3dadd(164.79, 84.67, -14.9, 3.74)
}
}
proc shape3d_25() {
dend[13] { pt3dadd(164.44, 84.88, -14.9, 3.74)
pt3dadd(164.26, 85.08, -14.9, 3.74)
}
dend[14] {pt3dclear()
pt3dadd(192.43, 81.64, -10.7, 4.59)
pt3dadd(193.33, 77.79, -9.65, 4.59)
pt3dadd(194.19, 69.62, -9.65, 4.59)
}
dend[15] {pt3dclear()
pt3dadd(194.19, 69.62, -9.65, 1.36)
pt3dadd(190.79, 45.7, -8.6, 1.36)
pt3dadd(189.88, 27.2, -8.6, 3.06)
pt3dadd(189.71, 26.81, -8.6, 3.06)
pt3dadd(189.71, 25.66, -8.6, 3.06)
pt3dadd(189.54, 25.27, -8.6, 3.06)
pt3dadd(189.54, 22.96, -8.6, 3.06)
pt3dadd(189.37, 22.57, -8.6, 3.06)
pt3dadd(189.37, 20.64, -8.6, 3.06)
pt3dadd(189.2, 20.25, -8.6, 3.06)
pt3dadd(189.2, 19.29, -8.6, 3.06)
pt3dadd(189.03, 18.9, -8.6, 3.06)
pt3dadd(189.03, 17.94, -8.6, 3.06)
pt3dadd(188.86, 17.75, -8.6, 3.06)
pt3dadd(188.86, 15.05, -8.6, 3.06)
pt3dadd(188.69, 14.47, -8.6, 3.06)
pt3dadd(188.69, 13.7, -8.6, 3.06)
pt3dadd(188.52, 13.31, -8.6, 3.06)
pt3dadd(188.52, 12.92, -8.6, 3.06)
pt3dadd(188.35, 12.73, -8.6, 3.06)
pt3dadd(188.35, 12.35, -8.6, 3.06)
pt3dadd(188.18, 11.96, -8.6, 3.06)
pt3dadd(188.01, 11.77, -8.6, 3.06)
pt3dadd(187.84, 11.38, -8.6, 3.06)
pt3dadd(187.84, 11, -8.6, 3.06)
pt3dadd(187.67, 10.61, -8.6, 3.06)
pt3dadd(187.5, 10.22, -8.6, 3.06)
pt3dadd(187.33, 9.84, -8.6, 3.06)
pt3dadd(187.16, 9.45, -8.6, 3.06)
pt3dadd(186.99, 9.07, -8.6, 3.06)
pt3dadd(186.82, 8.68, -8.6, 3.06)
pt3dadd(186.65, 8.29, -8.6, 3.06)
pt3dadd(186.48, 8.1, -8.6, 3.06)
pt3dadd(186.31, 7.72, -8.6, 3.06)
pt3dadd(186.31, 7.33, -8.6, 3.06)
pt3dadd(186.14, 6.94, -8.6, 3.06)
pt3dadd(185.8, 6.75, -8.6, 3.06)
pt3dadd(185.63, 6.37, -8.6, 3.06)
pt3dadd(185.46, 5.98, -8.6, 3.06)
pt3dadd(185.12, 5.59, -8.6, 3.06)
pt3dadd(184.95, 5.4, -8.6, 3.06)
pt3dadd(184.95, 5.02, -8.6, 3.06)
pt3dadd(184.61, 4.82, -8.6, 3.06)
pt3dadd(184.44, 4.44, -8.6, 3.06)
pt3dadd(183.93, 3.86, -8.6, 3.06)
pt3dadd(183.76, 3.67, -8.6, 3.06)
pt3dadd(183.59, 3.28, -8.6, 3.06)
pt3dadd(183.42, 2.89, -8.6, 3.06)
pt3dadd(183.25, 2.51, -8.6, 3.06)
pt3dadd(182.74, 1.93, -8.6, 3.06)
pt3dadd(182.57, 1.74, -8.6, 3.06)
pt3dadd(181.9, 0.96, -8.6, 3.06)
pt3dadd(181.73, 0.58, -8.6, 3.06)
pt3dadd(181.56, 0.39, -8.6, 3.06)
pt3dadd(181.39, 0.19, -8.6, 3.06)
pt3dadd(181.22, 0, -8.6, 3.06)
pt3dadd(181.22, -0.39, -8.6, 3.06)
pt3dadd(180.88, -0.58, -8.6, 3.06)
pt3dadd(180.88, -0.96, -8.6, 3.06)
pt3dadd(180.54, -1.16, -8.6, 3.06)
pt3dadd(180.71, -0.87, -8.6, 2.38)
pt3dadd(180.54, -1.25, -8.6, 2.38)
pt3dadd(180.54, -1.64, -8.6, 2.38)
pt3dadd(180.37, -1.83, -8.6, 2.38)
pt3dadd(180.37, -2.6, -8.6, 2.38)
pt3dadd(180.2, -1.74, -8.6, 2.55)
pt3dadd(180.2, -2.31, -8.6, 2.55)
pt3dadd(180.03, -2.51, -8.6, 2.55)
pt3dadd(180.03, -3.28, -8.6, 2.55)
pt3dadd(179.86, -3.66, -8.6, 2.55)
pt3dadd(179.69, -3.86, -8.6, 2.55)
pt3dadd(179.52, -4.24, -8.6, 2.55)
pt3dadd(179.52, -4.63, -8.6, 2.55)
pt3dadd(179.35, -4.82, -8.6, 2.55)
pt3dadd(179.01, -5.02, -8.6, 2.55)
pt3dadd(179.01, -5.4, -8.6, 2.55)
pt3dadd(178.84, -5.79, -8.6, 2.55)
pt3dadd(178.67, -5.98, -8.6, 2.55)
pt3dadd(178.5, -6.17, -8.6, 2.55)
pt3dadd(178.33, -6.37, -8.6, 2.55)
pt3dadd(178.16, -6.56, -8.6, 2.55)
pt3dadd(177.99, -6.94, -8.6, 2.55)
pt3dadd(177.82, -7.14, -8.6, 2.55)
pt3dadd(177.82, -7.52, -8.6, 2.55)
pt3dadd(177.65, -7.72, -8.6, 2.55)
pt3dadd(177.48, -7.91, -8.6, 2.55)
pt3dadd(177.48, -8.29, -8.6, 2.55)
pt3dadd(177.31, -8.49, -8.6, 2.55)
pt3dadd(177.31, -8.87, -8.6, 2.55)
pt3dadd(177.14, -9.07, -8.6, 2.55)
pt3dadd(176.97, -9.26, -8.6, 2.55)
pt3dadd(176.8, -9.45, -8.6, 2.55)
pt3dadd(176.8, -9.84, -8.6, 2.55)
pt3dadd(176.63, -10.03, -8.6, 2.55)
pt3dadd(176.46, -10.42, -8.6, 2.55)
pt3dadd(176.29, -10.8, -8.6, 2.55)
pt3dadd(176.29, -11.57, -8.6, 2.55)
pt3dadd(176.12, -11.96, -8.6, 2.55)
pt3dadd(175.95, -12.35, -8.6, 2.55)
pt3dadd(175.95, -12.73, -8.6, 2.55)
pt3dadd(175.78, -12.92, -8.6, 2.55)
pt3dadd(175.61, -13.31, -8.6, 2.55)
pt3dadd(175.44, -13.7, -8.6, 2.55)
pt3dadd(175.44, -14.08, -8.6, 2.55)
pt3dadd(175.1, -14.08, -8.6, 2.55)
pt3dadd(175.1, -14.66, -8.6, 2.55)
pt3dadd(174.93, -15.05, -8.6, 2.55)
pt3dadd(174.76, -15.43, -8.6, 2.55)
pt3dadd(174.59, -15.62, -8.6, 2.55)
pt3dadd(174.59, -16.2, -8.6, 2.55)
pt3dadd(174.42, -16.78, -8.6, 2.55)
pt3dadd(174.25, -17.17, -8.6, 2.55)
pt3dadd(174.08, -17.55, -8.6, 2.55)
pt3dadd(174.08, -18.13, -8.6, 2.55)
pt3dadd(173.91, -18.52, -8.6, 2.55)
pt3dadd(173.91, -18.9, -8.6, 2.55)
pt3dadd(173.57, -19.29, -8.6, 2.55)
pt3dadd(173.57, -20.06, -8.6, 2.55)
pt3dadd(173.4, -20.45, -8.6, 2.55)
pt3dadd(173.23, -21.03, -8.6, 2.55)
pt3dadd(173.23, -21.41, -8.6, 2.55)
pt3dadd(173.06, -21.8, -8.6, 2.55)
pt3dadd(173.06, -22.18, -8.6, 2.55)
pt3dadd(172.89, -22.57, -8.6, 2.55)
pt3dadd(172.72, -23.15, -8.6, 2.55)
pt3dadd(172.72, -23.53, -8.6, 2.55)
pt3dadd(172.38, -24.11, -8.6, 2.55)
pt3dadd(172.38, -24.88, -8.6, 2.55)
pt3dadd(172.21, -25.46, -8.6, 2.55)
pt3dadd(172.05, -26.04, -8.6, 2.55)
pt3dadd(172.05, -27.01, -8.6, 2.55)
pt3dadd(171.88, -27.78, -8.6, 2.55)
pt3dadd(171.71, -28.16, -8.6, 2.55)
pt3dadd(171.71, -29.32, -8.6, 2.55)
pt3dadd(171.54, -29.9, -8.6, 2.55)
pt3dadd(171.54, -30.67, -8.6, 2.55)
pt3dadd(171.37, -31.25, -8.6, 2.55)
pt3dadd(171.37, -31.83, -8.6, 2.55)
pt3dadd(171.2, -32.41, -8.6, 2.55)
pt3dadd(171.03, -32.79, -8.6, 2.55)
pt3dadd(171.03, -33.56, -8.6, 2.55)
pt3dadd(170.86, -33.95, -8.6, 2.55)
pt3dadd(170.69, -34.34, -8.6, 2.55)
pt3dadd(170.69, -35.69, -8.6, 2.55)
pt3dadd(170.52, -36.27, -8.6, 2.55)
pt3dadd(170.52, -37.23, -8.6, 2.55)
pt3dadd(170.35, -37.62, -8.6, 2.55)
pt3dadd(170.35, -38.39, -8.6, 2.55)
pt3dadd(170.18, -38.97, -8.6, 2.55)
pt3dadd(170.18, -39.54, -8.6, 2.55)
pt3dadd(170.01, -39.93, -8.6, 2.55)
pt3dadd(170.01, -40.51, -8.6, 2.55)
pt3dadd(169.84, -40.89, -8.6, 2.55)
pt3dadd(169.84, -41.86, -8.6, 2.55)
pt3dadd(169.67, -42.63, -8.6, 2.55)
pt3dadd(169.67, -43.02, -8.6, 2.55)
pt3dadd(169.5, -43.6, -8.6, 2.55)
pt3dadd(169.33, -44.37, -8.6, 2.55)
pt3dadd(169.84, -43.69, -10.6, 2.55)
pt3dadd(169.84, -44.08, -10.6, 2.55)
pt3dadd(169.67, -44.27, -10.6, 2.55)
pt3dadd(169.67, -45.24, -10.6, 2.55)
pt3dadd(169.5, -45.43, -10.6, 2.55)
pt3dadd(169.5, -57, -10.6, 2.55)
pt3dadd(169.33, -57.39, -10.6, 2.55)
pt3dadd(169.33, -65.88, -10.6, 2.55)
pt3dadd(169.16, -66.45, -10.6, 2.55)
pt3dadd(169.16, -69.54, -10.6, 2.55)
pt3dadd(168.99, -69.93, -10.6, 2.55)
pt3dadd(168.99, -73.4, -10.6, 2.55)
pt3dadd(168.82, -73.78, -10.6, 2.55)
pt3dadd(168.82, -74.94, -10.6, 2.55)
pt3dadd(168.65, -75.13, -10.6, 2.55)
pt3dadd(168.48, -75.52, -10.6, 2.55)
pt3dadd(168.48, -76.29, -10.6, 2.55)
pt3dadd(168.31, -76.49, -10.6, 2.55)
pt3dadd(168.31, -77.06, -10.6, 2.55)
pt3dadd(168.14, -77.45, -10.6, 2.55)
pt3dadd(167.97, -77.84, -10.6, 2.55)
pt3dadd(167.8, -78.22, -10.6, 2.55)
pt3dadd(167.63, -78.61, -10.6, 2.55)
pt3dadd(167.46, -79.19, -10.6, 2.55)
pt3dadd(167.29, -79.57, -10.6, 2.55)
pt3dadd(167.29, -79.96, -10.6, 2.55)
pt3dadd(167.12, -80.34, -10.6, 2.55)
pt3dadd(166.95, -80.73, -10.6, 2.55)
pt3dadd(166.78, -81.11, -10.6, 2.55)
pt3dadd(166.61, -81.5, -10.6, 2.55)
pt3dadd(166.44, -81.69, -10.6, 2.55)
pt3dadd(166.1, -82.27, -10.6, 2.55)
pt3dadd(165.93, -82.66, -10.6, 2.55)
pt3dadd(165.76, -83.04, -10.6, 2.55)
pt3dadd(165.59, -83.43, -10.6, 2.55)
pt3dadd(165.42, -83.82, -10.6, 2.55)
pt3dadd(165.25, -84.2, -10.6, 2.55)
}
}
proc shape3d_26() {
dend[15] { pt3dadd(164.91, -84.78, -10.6, 2.55)
pt3dadd(164.74, -84.97, -10.6, 2.55)
pt3dadd(164.57, -85.36, -10.6, 2.55)
pt3dadd(164.4, -85.36, -10.6, 2.55)
pt3dadd(164.57, -85.46, -11.6, 2.55)
pt3dadd(164.4, -85.65, -11.6, 2.55)
pt3dadd(164.06, -85.84, -11.6, 2.55)
pt3dadd(163.89, -86.03, -11.6, 2.55)
pt3dadd(163.72, -86.23, -11.6, 2.55)
pt3dadd(163.55, -86.61, -11.6, 2.55)
pt3dadd(163.38, -86.81, -11.6, 2.55)
pt3dadd(162.87, -87.38, -11.6, 2.55)
pt3dadd(162.7, -87.58, -11.6, 2.55)
pt3dadd(162.36, -87.96, -11.6, 2.55)
pt3dadd(162.19, -88.16, -11.6, 2.55)
pt3dadd(162.02, -88.35, -11.6, 2.55)
pt3dadd(161.85, -88.54, -11.6, 2.55)
pt3dadd(161.69, -88.73, -11.6, 2.55)
pt3dadd(161.52, -88.93, -11.6, 2.55)
pt3dadd(161.18, -89.12, -11.6, 2.55)
pt3dadd(160.84, -89.51, -11.6, 2.55)
pt3dadd(160.67, -89.89, -11.6, 2.55)
pt3dadd(160.5, -90.28, -11.6, 2.55)
pt3dadd(160.16, -90.47, -11.6, 2.55)
pt3dadd(160.16, -90.86, -11.6, 2.55)
pt3dadd(159.82, -91.05, -11.6, 2.55)
pt3dadd(159.65, -91.43, -11.6, 2.55)
pt3dadd(159.48, -91.63, -11.6, 2.55)
pt3dadd(159.31, -92.01, -11.6, 2.55)
pt3dadd(158.97, -92.21, -11.6, 2.55)
pt3dadd(158.8, -92.59, -11.6, 2.55)
pt3dadd(158.46, -92.98, -11.6, 2.55)
pt3dadd(158.29, -93.17, -11.6, 2.55)
pt3dadd(158.12, -93.36, -11.6, 2.55)
pt3dadd(157.78, -93.75, -11.6, 2.55)
pt3dadd(157.44, -94.14, -11.6, 2.55)
pt3dadd(157.27, -94.33, -11.6, 2.55)
pt3dadd(157.1, -94.71, -11.6, 2.55)
pt3dadd(156.42, -95.49, -11.6, 2.55)
pt3dadd(156.25, -95.68, -11.6, 2.55)
pt3dadd(156.08, -96.06, -11.6, 2.55)
pt3dadd(155.91, -96.64, -11.6, 2.55)
pt3dadd(155.74, -97.03, -11.6, 2.55)
pt3dadd(155.4, -97.41, -11.6, 2.55)
pt3dadd(155.23, -97.8, -11.6, 2.55)
pt3dadd(155.06, -97.99, -11.6, 2.55)
pt3dadd(154.72, -98.57, -11.6, 2.55)
pt3dadd(154.38, -99.15, -11.6, 2.55)
pt3dadd(154.04, -99.54, -11.6, 2.55)
pt3dadd(153.7, -99.92, -11.6, 2.55)
pt3dadd(153.53, -100.5, -11.6, 2.55)
pt3dadd(153.19, -100.89, -11.6, 2.55)
pt3dadd(153.02, -101.47, -11.6, 2.55)
pt3dadd(152.85, -101.85, -11.6, 2.55)
pt3dadd(152.68, -102.24, -11.6, 2.55)
pt3dadd(152.51, -102.43, -11.6, 2.55)
pt3dadd(152.34, -103.01, -11.6, 2.55)
pt3dadd(152, -103.2, -11.6, 2.55)
pt3dadd(152, -103.59, -11.6, 2.55)
pt3dadd(151.83, -103.78, -11.6, 2.55)
pt3dadd(151.49, -103.97, -11.6, 2.55)
pt3dadd(151.49, -104.55, -11.6, 2.55)
pt3dadd(151.16, -104.94, -11.6, 2.55)
pt3dadd(150.82, -105.32, -11.6, 2.55)
pt3dadd(150.65, -105.71, -11.6, 2.55)
pt3dadd(150.48, -105.9, -11.6, 2.55)
pt3dadd(150.31, -106.29, -11.6, 2.55)
pt3dadd(149.8, -107.25, -11.6, 2.55)
pt3dadd(149.46, -107.64, -11.6, 2.55)
pt3dadd(149.29, -108.02, -11.6, 2.55)
pt3dadd(149.12, -108.41, -11.6, 2.55)
pt3dadd(148.78, -108.99, -11.6, 2.55)
pt3dadd(148.61, -109.18, -11.6, 2.55)
pt3dadd(148.44, -109.57, -11.6, 2.55)
pt3dadd(148.27, -109.95, -11.6, 2.55)
pt3dadd(147.93, -110.15, -11.6, 2.55)
pt3dadd(147.76, -110.53, -11.6, 2.55)
pt3dadd(147.59, -110.92, -11.6, 2.55)
pt3dadd(147.25, -111.11, -11.6, 2.55)
pt3dadd(146.91, -111.5, -11.6, 2.55)
pt3dadd(146.74, -111.88, -11.6, 2.55)
pt3dadd(146.57, -112.46, -11.6, 2.55)
pt3dadd(146.23, -112.65, -11.6, 2.55)
pt3dadd(146.06, -112.85, -11.6, 2.55)
pt3dadd(145.89, -113.23, -11.6, 2.55)
pt3dadd(145.72, -113.62, -11.6, 2.55)
pt3dadd(145.55, -113.81, -11.6, 2.55)
pt3dadd(144.87, -114.58, -11.6, 2.55)
pt3dadd(144.7, -115.16, -11.6, 2.55)
pt3dadd(144.53, -115.55, -11.6, 2.55)
pt3dadd(144.36, -115.93, -11.6, 2.55)
pt3dadd(144.19, -116.32, -11.6, 2.55)
pt3dadd(144.02, -116.51, -11.6, 2.55)
pt3dadd(143.85, -116.9, -11.6, 2.55)
pt3dadd(143.68, -117.28, -11.6, 2.55)
pt3dadd(143.51, -117.48, -11.6, 2.55)
pt3dadd(143.34, -117.28, -11.6, 2.55)
pt3dadd(143.68, -117.19, -14.6, 2.55)
pt3dadd(142.83, -117.19, -14.6, 2.55)
pt3dadd(142.66, -117.38, -14.6, 2.55)
pt3dadd(142.32, -117.57, -14.6, 2.55)
pt3dadd(142.15, -117.96, -14.6, 2.55)
pt3dadd(141.81, -118.15, -14.6, 2.55)
pt3dadd(141.64, -118.34, -14.6, 2.55)
pt3dadd(141.47, -118.54, -14.6, 2.55)
pt3dadd(142.66, -117.67, -14.6, 2.55)
pt3dadd(142.49, -117.86, -14.6, 2.55)
pt3dadd(142.32, -118.06, -14.6, 2.55)
pt3dadd(142.15, -118.25, -14.6, 2.55)
pt3dadd(141.98, -118.63, -14.6, 2.55)
pt3dadd(141.81, -118.83, -14.6, 2.55)
pt3dadd(141.64, -119.02, -14.6, 2.55)
pt3dadd(141.64, -119.41, -14.6, 2.55)
pt3dadd(141.47, -119.6, -14.6, 2.55)
pt3dadd(141.47, -119.98, -14.6, 2.55)
pt3dadd(141.3, -120.18, -14.6, 2.55)
pt3dadd(141.3, -121.14, -14.6, 2.55)
pt3dadd(141.13, -121.33, -14.6, 2.55)
pt3dadd(141.13, -125, -14.6, 2.55)
pt3dadd(140.96, -125.39, -14.6, 2.55)
pt3dadd(141.98, -128.26, -14.6, 2.55)
}
dend[16] {pt3dclear()
pt3dadd(141.98, -128.26, -14.6, 1.36)
pt3dadd(137.23, -126.54, 0.4, 1.36)
pt3dadd(132.16, -126.99, 0.4, 3.23)
pt3dadd(131.98, -127.19, 0.4, 3.23)
pt3dadd(131.8, -127.39, 0.4, 3.23)
pt3dadd(131.27, -127.39, 0.4, 3.23)
pt3dadd(131.09, -127.59, 0.4, 3.23)
pt3dadd(130.55, -127.8, 0.4, 3.23)
pt3dadd(130.2, -128, 0.4, 3.23)
pt3dadd(129.84, -128.2, 0.4, 3.23)
pt3dadd(129.48, -128.2, 0.4, 3.23)
pt3dadd(128.95, -128.4, 0.4, 3.23)
pt3dadd(128.59, -128.61, 0.4, 3.23)
pt3dadd(127.88, -128.81, 0.4, 3.23)
pt3dadd(127.52, -128.81, 0.4, 3.23)
pt3dadd(126.99, -129.01, 0.4, 3.23)
pt3dadd(126.45, -129.22, 0.4, 3.23)
pt3dadd(125.92, -129.42, 0.4, 3.23)
pt3dadd(125.56, -129.62, 0.4, 3.23)
pt3dadd(124.85, -129.82, 0.4, 3.23)
pt3dadd(124.49, -129.82, 0.4, 3.23)
pt3dadd(123.42, -130.23, 0.4, 3.23)
pt3dadd(123.06, -130.23, 0.4, 3.23)
pt3dadd(122.53, -130.43, 0.4, 3.23)
pt3dadd(106.66, -130.43, 0.4, 3.23)
pt3dadd(106.48, -130.63, 0.4, 3.23)
pt3dadd(105.94, -130.63, 0.4, 3.23)
pt3dadd(105.77, -131.24, 2.5, 2.72)
pt3dadd(105.41, -131.24, 2.5, 2.72)
pt3dadd(105.05, -131.44, 2.5, 2.72)
pt3dadd(104.7, -131.65, 2.5, 2.72)
pt3dadd(104.34, -131.85, 2.5, 2.72)
pt3dadd(104.16, -132.05, 2.5, 2.72)
pt3dadd(103.8, -132.25, 2.5, 2.72)
pt3dadd(103.63, -132.46, 2.5, 2.72)
pt3dadd(103.27, -132.46, 2.5, 2.72)
pt3dadd(102.91, -132.66, 2.5, 2.72)
pt3dadd(102.56, -132.86, 2.5, 2.72)
pt3dadd(102.38, -133.06, 2.5, 2.72)
pt3dadd(102.2, -133.27, 2.5, 2.72)
pt3dadd(101.84, -133.47, 2.5, 2.72)
pt3dadd(101.66, -133.67, 2.5, 2.72)
pt3dadd(101.49, -133.87, 2.5, 2.72)
pt3dadd(101.13, -133.87, 2.5, 2.72)
pt3dadd(100.95, -134.08, 2.5, 2.72)
pt3dadd(100.59, -134.28, 2.5, 2.72)
pt3dadd(100.42, -134.48, 2.5, 2.72)
pt3dadd(100.06, -134.48, 2.5, 2.72)
pt3dadd(99.7, -134.68, 2.5, 2.72)
pt3dadd(99.52, -134.89, 2.5, 2.72)
pt3dadd(99.35, -135.09, 2.5, 2.72)
pt3dadd(98.99, -135.29, 2.5, 2.72)
pt3dadd(98.63, -135.49, 2.5, 2.72)
pt3dadd(98.28, -135.49, 2.5, 2.72)
pt3dadd(98.1, -135.7, 2.5, 2.72)
pt3dadd(97.92, -135.9, 2.5, 2.72)
pt3dadd(97.38, -136.51, 2.5, 2.72)
pt3dadd(97.21, -136.91, 2.5, 2.72)
pt3dadd(96.14, -138.13, 2.5, 2.72)
pt3dadd(95.78, -138.73, 2.5, 2.72)
pt3dadd(95.42, -139.14, 2.5, 2.72)
pt3dadd(95.42, -139.54, 2.5, 2.72)
pt3dadd(94.89, -139.95, 2.5, 2.72)
pt3dadd(94.71, -140.36, 2.5, 2.72)
pt3dadd(94.53, -140.56, 2.5, 2.72)
pt3dadd(94.17, -140.96, 2.5, 2.72)
pt3dadd(93.82, -141.77, 2.5, 2.72)
pt3dadd(93.46, -142.18, 2.5, 2.72)
pt3dadd(93.28, -142.38, 2.5, 2.72)
pt3dadd(93.1, -142.79, 2.5, 2.72)
pt3dadd(92.93, -143.19, 2.5, 2.72)
pt3dadd(92.75, -143.39, 2.5, 2.72)
pt3dadd(92.03, -144.2, 2.5, 2.72)
pt3dadd(91.86, -144.61, 2.5, 2.72)
pt3dadd(91.68, -144.81, 2.5, 2.72)
pt3dadd(91.5, -145.01, 2.5, 2.72)
pt3dadd(91.32, -145.22, 2.5, 2.72)
pt3dadd(91.5, -144.81, 6.7, 2.38)
pt3dadd(91.5, -145.22, 6.7, 2.38)
}
}
proc shape3d_27() {
dend[16] { pt3dadd(91.14, -145.62, 6.7, 2.38)
pt3dadd(90.96, -146.03, 6.7, 2.38)
pt3dadd(90.61, -146.63, 6.7, 2.38)
pt3dadd(90.43, -147.04, 6.7, 2.38)
pt3dadd(90.07, -147.44, 6.7, 2.38)
pt3dadd(89.72, -147.65, 6.7, 2.38)
pt3dadd(89.54, -148.05, 6.7, 2.38)
pt3dadd(89.18, -148.46, 6.7, 2.38)
pt3dadd(89, -148.66, 6.7, 2.38)
pt3dadd(88.65, -149.06, 6.7, 2.38)
pt3dadd(88.29, -149.67, 6.7, 2.38)
pt3dadd(88.11, -149.87, 6.7, 2.38)
pt3dadd(87.93, -150.08, 6.7, 2.38)
pt3dadd(87.58, -150.28, 6.7, 2.38)
pt3dadd(87.4, -150.48, 6.7, 2.38)
pt3dadd(87.22, -150.68, 6.7, 2.38)
pt3dadd(86.51, -151.5, 6.7, 2.38)
pt3dadd(86.33, -151.7, 6.7, 2.38)
pt3dadd(86.15, -152.1, 6.7, 2.38)
pt3dadd(85.97, -152.31, 6.7, 2.38)
pt3dadd(85.62, -152.71, 6.7, 2.38)
pt3dadd(85.26, -152.91, 6.7, 2.38)
pt3dadd(85.08, -153.32, 6.7, 2.38)
pt3dadd(84.72, -153.72, 6.7, 2.38)
pt3dadd(84.55, -153.93, 6.7, 2.38)
pt3dadd(84.19, -154.33, 6.7, 2.38)
pt3dadd(84.01, -154.53, 6.7, 2.38)
pt3dadd(83.48, -155.34, 6.7, 2.38)
pt3dadd(82.94, -155.95, 6.7, 2.38)
pt3dadd(82.76, -156.15, 6.7, 2.38)
pt3dadd(82.58, -156.76, 6.7, 2.38)
pt3dadd(82.41, -156.96, 6.7, 2.38)
pt3dadd(82.05, -157.17, 6.7, 2.38)
pt3dadd(81.87, -157.57, 6.7, 2.38)
pt3dadd(81.69, -157.98, 6.7, 2.38)
pt3dadd(81.16, -158.58, 6.7, 2.38)
pt3dadd(80.98, -158.79, 6.7, 2.38)
}
dend[17] {pt3dclear()
pt3dadd(141.98, -128.26, -14.6, 2.55)
pt3dadd(140.96, -133.28, -14.6, 2.55)
pt3dadd(140.8, -132.72, -14.6, 2.55)
pt3dadd(140.8, -133.49, -14.6, 2.55)
pt3dadd(140.63, -133.68, -14.6, 2.55)
pt3dadd(140.63, -134.26, -14.6, 2.55)
pt3dadd(140.46, -134.45, -14.6, 2.55)
pt3dadd(140.29, -134.84, -14.6, 2.55)
}
dend[18] {pt3dclear()
pt3dadd(141.98, -128.26, -14.6, 3)
pt3dadd(125.48, -162.91, -16.75, 3)
pt3dadd(115.57, -189.02, -16.75, 3)
pt3dadd(105.07, -221.77, -16.75, 3)
pt3dadd(95.17, -265.91, -16.75, 3)
pt3dadd(96.07, -313.85, -16.75, 3)
pt3dadd(91.57, -365.59, -16.75, 3)
pt3dadd(88.27, -432.51, -16.75, 3)
pt3dadd(86.77, -459.57, -16.75, 3)
pt3dadd(82.26, -481.88, -16.75, 3)
pt3dadd(69.96, -508.93, -16.75, 3)
pt3dadd(54.05, -536.94, -16.75, 3)
pt3dadd(48.35, -561.14, -16.75, 3)
pt3dadd(43.85, -584.4, -16.75, 3)
}
dend[19] {pt3dclear()
pt3dadd(43.85, -584.4, -16.75, 2.4)
pt3dadd(38.75, -620.95, -16.75, 2.4)
pt3dadd(15.04, -654.65, -16.75, 2.4)
pt3dadd(-9.87, -687.4, -16.75, 2.4)
pt3dadd(-25.77, -728.7, -16.75, 2.4)
pt3dadd(-33.88, -764.29, -16.75, 2.4)
}
dend[20] {pt3dclear()
pt3dadd(43.85, -584.4, -16.75, 2.4)
pt3dadd(59.76, -587.73, -16.75, 2.4)
pt3dadd(71.46, -567.32, -16.75, 2.4)
pt3dadd(88.57, -538.36, -16.75, 2.4)
pt3dadd(107.47, -498.97, -16.75, 2.4)
pt3dadd(120.98, -482.35, -16.75, 2.4)
}
dend[21] {pt3dclear()
pt3dadd(194.19, 69.62, -9.65, 4.59)
pt3dadd(193.33, 63.81, -9.65, 4.59)
pt3dadd(193.15, 63.41, -9.65, 4.59)
pt3dadd(192.97, 63.2, -9.65, 4.59)
pt3dadd(192.97, 62.6, -9.65, 4.59)
pt3dadd(192.79, 62.39, -9.65, 4.59)
pt3dadd(192.61, 61.79, -9.65, 4.59)
pt3dadd(192.61, 61.38, -9.65, 4.59)
pt3dadd(192.43, 60.98, -9.65, 4.59)
pt3dadd(192.43, 60.57, -9.65, 4.59)
pt3dadd(192.26, 60.37, -9.65, 4.59)
pt3dadd(192.08, 60.17, -9.65, 4.59)
pt3dadd(191.9, 59.96, -9.65, 4.59)
pt3dadd(191.54, 59.36, -9.65, 4.59)
pt3dadd(191.54, 58.95, -9.65, 4.59)
pt3dadd(191.19, 58.55, -9.65, 4.59)
pt3dadd(191.01, 58.14, -9.65, 4.59)
pt3dadd(190.83, 57.74, -9.65, 4.59)
pt3dadd(190.65, 57.13, -9.65, 4.59)
pt3dadd(190.47, 56.72, -9.65, 4.59)
pt3dadd(190.29, 56.52, -9.65, 4.59)
pt3dadd(190.29, 56.93, -9.65, 4.59)
pt3dadd(191.01, 59.56, -6.5, 4.59)
pt3dadd(191.01, 59.15, -6.5, 4.59)
pt3dadd(190.83, 58.95, -6.5, 4.59)
pt3dadd(190.65, 58.75, -6.5, 4.59)
pt3dadd(190.47, 58.55, -6.5, 4.59)
pt3dadd(190.29, 58.34, -6.5, 4.59)
pt3dadd(190.29, 57.94, -6.5, 4.59)
pt3dadd(189.94, 57.74, -6.5, 4.59)
pt3dadd(189.76, 57.53, -6.5, 4.59)
pt3dadd(189.58, 57.13, -6.5, 4.59)
pt3dadd(189.4, 56.93, -6.5, 4.59)
pt3dadd(189.22, 56.72, -6.5, 4.59)
pt3dadd(189.05, 56.32, -6.5, 4.59)
pt3dadd(188.69, 56.12, -6.5, 4.59)
pt3dadd(188.69, 55.71, -6.5, 4.59)
pt3dadd(188.51, 55.51, -6.5, 4.59)
pt3dadd(188.33, 55.1, -6.5, 4.59)
pt3dadd(187.98, 54.7, -6.5, 4.59)
pt3dadd(188.87, 54.09, -6.5, 4.59)
}
dend[22] {pt3dclear()
pt3dadd(188.87, 54.09, -6.5, 4.59)
pt3dadd(187.8, 54.29, -6.5, 4.59)
pt3dadd(187.26, 53.68, -6.5, 4.59)
pt3dadd(187.08, 53.48, -6.5, 4.59)
pt3dadd(186.91, 53.28, -6.5, 4.59)
pt3dadd(186.73, 53.08, -6.5, 4.59)
pt3dadd(186.55, 52.67, -6.5, 4.59)
pt3dadd(186.37, 52.47, -6.5, 4.59)
pt3dadd(186.37, 52.06, -6.5, 4.59)
pt3dadd(186.19, 51.86, -6.5, 4.59)
pt3dadd(186.01, 51.66, -6.5, 4.59)
pt3dadd(185.84, 51.25, -6.5, 4.59)
pt3dadd(185.66, 51.05, -6.5, 4.59)
pt3dadd(185.48, 50.85, -6.5, 4.59)
pt3dadd(185.3, 50.44, -6.5, 4.59)
pt3dadd(184.94, 50.04, -6.5, 4.59)
pt3dadd(184.77, 49.63, -6.5, 4.59)
pt3dadd(184.59, 49.03, -6.5, 4.59)
pt3dadd(184.23, 48.82, -6.5, 4.59)
pt3dadd(184.05, 48.42, -6.5, 4.59)
pt3dadd(183.87, 48.01, -6.5, 4.59)
pt3dadd(183.7, 47.81, -6.5, 4.59)
pt3dadd(183.7, 47.41, -6.5, 4.59)
pt3dadd(183.52, 47, -6.5, 4.59)
pt3dadd(183.34, 46.8, -6.5, 4.59)
pt3dadd(183.16, 46.6, -6.5, 4.59)
pt3dadd(182.98, 46.39, -6.5, 4.59)
pt3dadd(182.8, 45.99, -6.5, 4.59)
pt3dadd(182.8, 45.58, -6.5, 4.59)
pt3dadd(182.63, 45.38, -6.5, 4.59)
pt3dadd(182.45, 45.18, -6.5, 4.59)
pt3dadd(182.27, 44.97, -6.5, 4.59)
pt3dadd(182.09, 44.77, -6.5, 4.59)
pt3dadd(181.91, 44.37, -6.5, 4.59)
pt3dadd(181.73, 43.96, -6.5, 4.59)
pt3dadd(181.38, 43.56, -6.5, 4.59)
pt3dadd(181.38, 43.15, -6.5, 4.59)
pt3dadd(181.2, 42.95, -6.5, 4.59)
pt3dadd(181.02, 42.54, -6.5, 4.59)
pt3dadd(180.84, 42.34, -6.5, 4.59)
pt3dadd(180.66, 41.94, -6.5, 4.59)
pt3dadd(180.49, 41.53, -6.5, 4.59)
pt3dadd(180.31, 41.33, -6.5, 4.59)
pt3dadd(180.13, 41.33, -6.5, 4.59)
pt3dadd(179.59, 40.52, -5.45, 2.89)
pt3dadd(179.59, 39.3, -5.45, 2.89)
pt3dadd(179.42, 39.1, -5.45, 2.89)
pt3dadd(179.24, 38.9, -5.45, 2.89)
pt3dadd(179.24, 38.49, -5.45, 2.89)
pt3dadd(179.06, 38.29, -5.45, 2.89)
pt3dadd(179.06, 37.89, -5.45, 2.89)
pt3dadd(178.7, 37.68, -5.45, 2.89)
pt3dadd(178.52, 37.48, -5.45, 2.89)
pt3dadd(178.52, 37.08, -5.45, 2.89)
pt3dadd(178.35, 36.87, -5.45, 2.89)
pt3dadd(177.99, 36.67, -5.45, 2.89)
pt3dadd(177.81, 36.47, -5.45, 2.89)
pt3dadd(177.81, 36.06, -5.45, 2.89)
pt3dadd(177.63, 35.86, -5.45, 2.89)
pt3dadd(177.45, 35.66, -5.45, 2.89)
pt3dadd(177.28, 35.46, -5.45, 2.89)
pt3dadd(177.1, 35.25, -5.45, 2.89)
pt3dadd(176.92, 35.05, -5.45, 2.89)
pt3dadd(176.74, 34.85, -5.45, 2.89)
pt3dadd(176.56, 34.65, -5.45, 2.89)
pt3dadd(176.38, 34.44, -5.45, 2.89)
pt3dadd(176.21, 34.04, -5.45, 2.89)
pt3dadd(176.03, 33.83, -5.45, 2.89)
pt3dadd(175.85, 33.63, -5.45, 2.89)
pt3dadd(175.67, 33.43, -5.45, 2.89)
pt3dadd(175.49, 33.02, -5.45, 2.89)
pt3dadd(175.31, 32.62, -5.45, 2.89)
pt3dadd(175.14, 32.42, -5.45, 2.89)
pt3dadd(174.96, 32.21, -5.45, 2.89)
pt3dadd(174.78, 32.01, -5.45, 2.89)
pt3dadd(174.42, 31.81, -5.45, 2.89)
pt3dadd(174.24, 31.61, -5.45, 2.89)
pt3dadd(174.07, 31.4, -5.45, 2.89)
pt3dadd(173.89, 31.2, -5.45, 2.89)
pt3dadd(173.71, 31, -5.45, 2.89)
pt3dadd(173.71, 31.4, -5.45, 2.89)
pt3dadd(173.89, 30.8, -3.35, 2.89)
pt3dadd(173.71, 30.59, -3.35, 2.89)
pt3dadd(173.53, 30.39, -3.35, 2.89)
pt3dadd(173.35, 30.19, -3.35, 2.89)
pt3dadd(173, 29.78, -3.35, 2.89)
pt3dadd(172.64, 29.58, -3.35, 2.89)
pt3dadd(172.28, 29.38, -3.35, 2.89)
}
}
proc shape3d_28() {
dend[22] { pt3dadd(171.93, 29.18, -3.35, 2.89)
pt3dadd(171.75, 28.97, -3.35, 2.89)
pt3dadd(171.57, 28.77, -3.35, 2.89)
pt3dadd(171.03, 28.37, -3.35, 2.89)
pt3dadd(170.86, 28.16, -3.35, 2.89)
pt3dadd(170.5, 27.96, -3.35, 2.89)
pt3dadd(170.14, 27.76, -3.35, 2.89)
pt3dadd(169.61, 27.15, -3.35, 2.89)
pt3dadd(169.43, 26.95, -3.35, 2.89)
pt3dadd(169.07, 26.75, -3.35, 2.89)
pt3dadd(168.72, 26.54, -3.35, 2.89)
pt3dadd(168.54, 26.34, -3.35, 2.89)
pt3dadd(168.36, 25.94, -3.35, 2.89)
pt3dadd(168, 25.73, -3.35, 2.89)
pt3dadd(167.65, 25.53, -3.35, 2.89)
pt3dadd(167.29, 25.33, -3.35, 2.89)
pt3dadd(166.93, 25.13, -3.35, 2.89)
pt3dadd(166.58, 24.92, -3.35, 2.89)
pt3dadd(166.4, 24.72, -3.35, 2.89)
pt3dadd(166.04, 24.52, -3.35, 2.89)
pt3dadd(165.68, 24.32, -3.35, 2.89)
pt3dadd(165.33, 24.11, -3.35, 2.89)
pt3dadd(164.97, 23.91, -3.35, 2.89)
pt3dadd(164.79, 23.71, -3.35, 2.89)
pt3dadd(164.44, 23.51, -3.35, 2.89)
pt3dadd(164.26, 23.1, -3.35, 2.89)
pt3dadd(163.9, 22.9, -3.35, 2.89)
pt3dadd(163.72, 22.49, -3.35, 2.89)
pt3dadd(163.54, 22.29, -3.35, 2.89)
pt3dadd(163.37, 22.09, -3.35, 2.89)
pt3dadd(163.19, 21.88, -3.35, 2.89)
pt3dadd(163.01, 21.68, -3.35, 2.89)
pt3dadd(162.65, 21.48, -3.35, 2.89)
pt3dadd(162.47, 21.28, -3.35, 2.89)
pt3dadd(162.3, 21.48, -3.35, 2.89)
pt3dadd(162.3, 21.68, -3.35, 2.89)
pt3dadd(162.47, 20.26, -3.35, 2.38)
pt3dadd(162.47, 19.86, -3.35, 2.38)
pt3dadd(162.3, 19.66, -3.35, 2.38)
pt3dadd(161.94, 19.45, -3.35, 2.38)
pt3dadd(161.76, 19.25, -3.35, 2.38)
pt3dadd(161.58, 19.05, -3.35, 2.38)
pt3dadd(161.4, 18.85, -3.35, 2.38)
pt3dadd(161.23, 18.44, -3.35, 2.38)
pt3dadd(160.87, 18.24, -3.35, 2.38)
pt3dadd(160.51, 17.83, -3.35, 2.38)
pt3dadd(160.33, 17.63, -3.35, 2.38)
pt3dadd(159.26, 16.42, -3.35, 2.38)
pt3dadd(159.09, 16.21, -3.35, 2.38)
pt3dadd(158.55, 15.61, -3.35, 2.38)
pt3dadd(158.37, 15.4, -3.35, 2.38)
pt3dadd(157.84, 14.8, -3.35, 2.38)
pt3dadd(157.66, 14.59, -3.35, 2.38)
pt3dadd(157.48, 14.39, -3.35, 2.38)
pt3dadd(157.3, 14.19, -3.35, 2.38)
pt3dadd(157.12, 13.78, -3.35, 2.38)
pt3dadd(156.95, 13.58, -3.35, 2.38)
pt3dadd(156.77, 13.38, -3.35, 2.38)
pt3dadd(156.41, 13.18, -3.35, 2.38)
pt3dadd(156.23, 12.97, -3.35, 2.38)
pt3dadd(156.05, 12.77, -3.35, 2.38)
pt3dadd(155.88, 12.37, -3.35, 2.38)
pt3dadd(155.7, 12.16, -3.35, 2.38)
pt3dadd(155.52, 11.76, -3.35, 2.38)
pt3dadd(155.16, 11.55, -3.35, 2.38)
pt3dadd(154.98, 11.35, -3.35, 2.38)
pt3dadd(154.81, 11.15, -3.35, 2.38)
pt3dadd(154.63, 10.95, -3.35, 2.38)
pt3dadd(154.63, 10.54, -3.35, 2.38)
pt3dadd(154.27, 10.34, -3.35, 2.38)
pt3dadd(153.91, 9.93, -3.35, 2.38)
pt3dadd(153.74, 9.53, -3.35, 2.38)
pt3dadd(153.56, 9.33, -3.35, 2.38)
pt3dadd(153.38, 9.12, -3.35, 2.38)
pt3dadd(153.2, 8.92, -3.35, 2.38)
pt3dadd(153.02, 8.52, -3.35, 2.38)
pt3dadd(152.84, 8.31, -3.35, 2.38)
pt3dadd(152.49, 8.11, -3.35, 2.38)
pt3dadd(152.31, 7.91, -3.35, 2.38)
pt3dadd(152.13, 7.71, -3.35, 2.38)
pt3dadd(151.95, 7.5, -3.35, 2.38)
pt3dadd(151.77, 7.3, -3.35, 2.38)
pt3dadd(151.6, 7.1, -3.35, 2.38)
pt3dadd(151.42, 6.9, -3.35, 2.38)
pt3dadd(151.06, 6.49, -3.35, 2.38)
pt3dadd(150.88, 6.29, -3.35, 2.38)
pt3dadd(150.53, 5.88, -3.35, 2.38)
pt3dadd(150.35, 5.68, -3.35, 2.38)
pt3dadd(150.17, 5.48, -3.35, 2.38)
pt3dadd(149.99, 5.28, -3.35, 2.38)
pt3dadd(149.63, 5.28, -3.35, 2.38)
pt3dadd(149.46, 5.07, -3.35, 2.38)
pt3dadd(149.28, 4.87, -3.35, 2.38)
pt3dadd(149.1, 4.67, -3.35, 2.38)
pt3dadd(148.92, 4.26, -3.35, 2.38)
pt3dadd(148.74, 4.06, -3.35, 2.38)
pt3dadd(148.74, 3.66, -3.35, 2.38)
pt3dadd(148.56, 3.45, -3.35, 2.38)
pt3dadd(148.39, 3.25, -3.35, 2.38)
pt3dadd(148.39, 2.85, -3.35, 2.38)
pt3dadd(148.21, 2.64, -3.35, 2.38)
pt3dadd(148.03, 2.44, -3.35, 2.38)
pt3dadd(148.03, 2.04, -3.35, 2.38)
pt3dadd(147.85, 1.83, -3.35, 2.38)
pt3dadd(147.67, 1.63, -3.35, 2.38)
pt3dadd(147.49, 1.43, -3.35, 2.38)
pt3dadd(147.49, 1.02, -3.35, 2.38)
pt3dadd(147.32, 0.82, -3.35, 2.38)
pt3dadd(147.14, 0.62, -3.35, 2.38)
pt3dadd(147.14, 0.01, -3.35, 2.38)
pt3dadd(146.96, -0.4, -3.35, 2.38)
pt3dadd(146.78, -0.6, -3.35, 2.38)
pt3dadd(146.6, -0.8, -3.35, 2.38)
pt3dadd(146.43, -1, -3.35, 2.38)
pt3dadd(146.25, -1.41, -3.35, 2.38)
pt3dadd(146.25, -1.81, -3.35, 2.38)
pt3dadd(146.07, -2.02, -3.35, 2.38)
pt3dadd(145.89, -2.22, -3.35, 2.38)
pt3dadd(145.71, -2.42, -3.35, 2.38)
pt3dadd(145.71, -2.83, -3.35, 2.38)
pt3dadd(145.53, -3.23, -3.35, 2.38)
pt3dadd(145.36, -3.43, -3.35, 2.38)
pt3dadd(145.18, -3.84, -3.35, 2.38)
pt3dadd(145, -4.24, -3.35, 2.38)
pt3dadd(145, -4.65, -3.35, 2.38)
pt3dadd(144.82, -5.05, -3.35, 2.38)
pt3dadd(144.64, -5.26, -3.35, 2.38)
pt3dadd(144.46, -5.66, -3.35, 2.38)
pt3dadd(144.29, -5.86, -3.35, 2.38)
pt3dadd(144.29, -6.27, -3.35, 2.38)
pt3dadd(143.93, -6.67, -3.35, 2.38)
pt3dadd(143.93, -7.08, -3.35, 2.38)
pt3dadd(143.75, -7.28, -3.35, 2.38)
pt3dadd(143.57, -7.69, -3.35, 2.38)
pt3dadd(143.39, -7.89, -3.35, 2.38)
pt3dadd(143.39, -8.29, -3.35, 2.38)
pt3dadd(143.22, -8.7, -3.35, 2.38)
pt3dadd(143.04, -9.1, -3.35, 2.38)
pt3dadd(143.04, -9.51, -3.35, 2.38)
pt3dadd(142.86, -9.92, -3.35, 2.38)
pt3dadd(142.86, -10.52, -3.35, 2.38)
pt3dadd(142.68, -10.73, -3.35, 2.38)
pt3dadd(142.68, -21.06, -3.35, 2.38)
pt3dadd(142.5, -21.46, -3.35, 2.38)
pt3dadd(142.5, -22.27, -3.35, 2.38)
pt3dadd(142.32, -22.68, -3.35, 2.38)
pt3dadd(142.32, -23.49, -3.35, 2.38)
pt3dadd(142.15, -23.89, -3.35, 2.38)
pt3dadd(142.15, -24.3, -3.35, 2.38)
pt3dadd(141.97, -24.9, -3.35, 2.38)
pt3dadd(141.97, -25.51, -3.35, 2.38)
pt3dadd(141.79, -25.92, -3.35, 2.38)
pt3dadd(141.79, -26.52, -3.35, 2.38)
pt3dadd(141.61, -26.73, -3.35, 2.38)
pt3dadd(141.61, -27.33, -3.35, 2.38)
pt3dadd(141.43, -27.54, -3.35, 2.38)
pt3dadd(141.43, -28.14, -3.35, 2.38)
pt3dadd(141.25, -28.35, -3.35, 2.38)
pt3dadd(141.25, -28.75, -3.35, 2.38)
pt3dadd(141.08, -28.95, -3.35, 2.38)
pt3dadd(141.08, -29.36, -3.35, 2.38)
pt3dadd(141.08, -27.33, -3.35, 2.38)
pt3dadd(140.9, -28.55, -3.35, 2.38)
pt3dadd(140.72, -28.75, -3.35, 2.38)
pt3dadd(140.72, -29.36, -3.35, 2.38)
pt3dadd(140.54, -29.56, -3.35, 2.38)
pt3dadd(140.36, -29.76, -3.35, 2.38)
pt3dadd(140.18, -30.37, -3.35, 2.38)
pt3dadd(140.18, -30.78, -3.35, 2.38)
pt3dadd(140.01, -31.18, -3.35, 2.38)
pt3dadd(139.83, -31.59, -3.35, 2.38)
pt3dadd(139.65, -31.99, -3.35, 2.38)
pt3dadd(139.65, -32.6, -3.35, 2.38)
pt3dadd(139.47, -32.8, -3.35, 2.38)
pt3dadd(139.47, -33.61, -3.35, 2.38)
pt3dadd(139.29, -33.82, -3.35, 2.38)
pt3dadd(139.29, -34.42, -3.35, 2.38)
pt3dadd(139.11, -34.63, -3.35, 2.38)
pt3dadd(139.11, -35.64, -3.35, 2.38)
pt3dadd(138.94, -36.04, -3.35, 2.38)
pt3dadd(138.94, -40.9, -3.35, 2.38)
pt3dadd(138.76, -41.31, -3.35, 2.38)
pt3dadd(138.76, -42.53, -3.35, 2.38)
pt3dadd(138.58, -42.73, -3.35, 2.38)
pt3dadd(138.58, -45.36, -3.35, 2.38)
pt3dadd(138.4, -45.77, -3.35, 2.38)
pt3dadd(138.4, -48.6, -3.35, 2.38)
pt3dadd(138.22, -49.01, -3.35, 2.38)
pt3dadd(138.22, -50.42, -3.35, 2.38)
pt3dadd(138.04, -50.83, -3.35, 2.38)
pt3dadd(138.04, -52.04, -3.35, 2.38)
pt3dadd(137.87, -52.25, -3.35, 2.38)
pt3dadd(137.87, -53.06, -3.35, 2.38)
pt3dadd(137.69, -53.46, -3.35, 2.38)
pt3dadd(137.69, -58.53, -3.35, 2.38)
pt3dadd(137.69, -58.12, -1.25, 2.38)
pt3dadd(137.69, -58.93, -1.25, 2.38)
pt3dadd(137.51, -59.34, -1.25, 2.38)
pt3dadd(137.33, -59.74, -1.25, 2.38)
pt3dadd(137.33, -60.35, -1.25, 2.38)
}
}
proc shape3d_29() {
dend[22] { pt3dadd(137.15, -60.96, -1.25, 2.38)
pt3dadd(136.97, -61.36, -1.25, 2.38)
pt3dadd(136.8, -61.97, -1.25, 2.38)
pt3dadd(136.8, -62.58, -1.25, 2.38)
pt3dadd(136.62, -63.18, -1.25, 2.38)
pt3dadd(136.44, -63.59, -1.25, 2.38)
pt3dadd(136.44, -64.4, -1.25, 2.38)
pt3dadd(136.26, -64.81, -1.25, 2.38)
pt3dadd(136.26, -65.62, -1.25, 2.38)
pt3dadd(136.08, -66.02, -1.25, 2.38)
pt3dadd(136.08, -67.84, -1.25, 2.38)
pt3dadd(135.9, -68.45, -1.25, 2.38)
pt3dadd(135.9, -69.26, -1.25, 2.38)
pt3dadd(135.73, -69.67, -1.25, 2.38)
pt3dadd(135.73, -70.68, -1.25, 2.38)
pt3dadd(135.55, -71.29, -1.25, 2.38)
pt3dadd(135.55, -72.1, -1.25, 2.38)
pt3dadd(135.37, -72.5, -1.25, 2.38)
pt3dadd(135.37, -73.31, -1.25, 2.38)
pt3dadd(135.19, -73.92, -1.25, 2.38)
pt3dadd(135.19, -74.53, -1.25, 2.38)
pt3dadd(135.01, -74.73, -1.25, 2.38)
pt3dadd(135.01, -75.34, -1.25, 2.38)
pt3dadd(134.83, -75.74, -1.25, 2.38)
pt3dadd(134.83, -76.35, -1.25, 2.38)
pt3dadd(134.66, -76.55, -1.25, 2.38)
pt3dadd(134.66, -76.96, -1.25, 2.38)
pt3dadd(134.48, -77.36, -1.25, 2.38)
pt3dadd(134.48, -77.97, -1.25, 2.38)
pt3dadd(134.3, -78.58, -1.25, 2.38)
pt3dadd(134.3, -79.19, -1.25, 2.38)
pt3dadd(134.12, -79.59, -1.25, 2.38)
pt3dadd(134.12, -80, -1.25, 2.38)
pt3dadd(133.94, -80.4, -1.25, 2.38)
pt3dadd(133.76, -81.21, -1.25, 2.38)
pt3dadd(133.76, -81.82, -1.25, 2.38)
pt3dadd(133.59, -82.02, -1.25, 2.38)
pt3dadd(133.59, -82.63, -1.25, 2.38)
pt3dadd(133.41, -83.03, -1.25, 2.38)
pt3dadd(133.41, -83.64, -1.25, 2.38)
pt3dadd(133.23, -84.05, -1.25, 2.38)
pt3dadd(133.23, -84.86, -1.25, 2.38)
pt3dadd(133.05, -85.26, -1.25, 2.38)
pt3dadd(133.05, -87.69, -1.25, 2.38)
pt3dadd(132.87, -87.9, -1.25, 2.38)
pt3dadd(132.87, -90.33, -1.25, 2.38)
pt3dadd(133.23, -90.73, -0.2, 2.55)
pt3dadd(133.05, -90.93, -0.2, 2.55)
pt3dadd(133.05, -92.15, -0.2, 2.55)
pt3dadd(132.87, -92.76, -0.2, 2.55)
pt3dadd(132.87, -111.19, -0.2, 2.55)
pt3dadd(132.69, -111.59, -0.2, 2.55)
pt3dadd(132.69, -113.21, -0.2, 2.55)
pt3dadd(132.52, -113.62, -0.2, 2.55)
pt3dadd(132.52, -114.43, -0.2, 2.55)
pt3dadd(132.34, -114.63, -0.2, 2.55)
pt3dadd(132.34, -115.44, -0.2, 2.55)
pt3dadd(132.16, -115.85, -0.2, 2.55)
pt3dadd(131.98, -116.25, -0.2, 2.55)
pt3dadd(131.98, -116.66, -0.2, 2.55)
pt3dadd(131.8, -117.26, -0.2, 2.55)
pt3dadd(131.8, -117.67, -0.2, 2.55)
pt3dadd(131.62, -117.87, -0.2, 2.55)
pt3dadd(131.45, -118.07, -0.2, 2.55)
pt3dadd(131.45, -118.48, -0.2, 2.55)
pt3dadd(131.27, -118.68, -0.2, 2.55)
pt3dadd(131.27, -119.09, -0.2, 2.55)
pt3dadd(131.09, -119.29, -0.2, 2.55)
pt3dadd(130.91, -119.7, -0.2, 2.55)
pt3dadd(130.73, -119.9, -0.2, 2.55)
pt3dadd(130.73, -120.51, -0.2, 2.55)
pt3dadd(130.55, -120.71, -0.2, 2.55)
pt3dadd(130.38, -121.11, -0.2, 2.55)
pt3dadd(130.2, -121.52, -0.2, 2.55)
pt3dadd(130.2, -121.92, -0.2, 2.55)
pt3dadd(130.02, -122.13, -0.2, 2.55)
pt3dadd(130.02, -122.53, -0.2, 2.55)
}
dend[23] {pt3dclear()
pt3dadd(130.02, -122.53, -0.2, 3.57)
pt3dadd(129.48, -124.76, -1.25, 3.57)
pt3dadd(129.48, -125.37, -1.25, 3.57)
pt3dadd(129.31, -125.57, -1.25, 3.57)
pt3dadd(129.31, -125.97, -1.25, 3.57)
pt3dadd(129.13, -126.18, -1.25, 3.57)
pt3dadd(129.13, -126.58, -1.25, 3.57)
pt3dadd(128.95, -126.78, -1.25, 3.57)
pt3dadd(128.95, -127.19, -1.25, 3.57)
pt3dadd(128.77, -127.39, -1.25, 3.57)
pt3dadd(128.77, -127.8, -1.25, 3.57)
pt3dadd(128.59, -128.2, -1.25, 3.57)
pt3dadd(128.59, -135.49, -1.25, 3.57)
pt3dadd(128.77, -135.9, -1.25, 3.57)
pt3dadd(128.77, -136.91, -1.25, 3.57)
pt3dadd(128.95, -137.32, -1.25, 3.57)
pt3dadd(128.95, -138.13, -1.25, 3.57)
pt3dadd(129.13, -138.53, -1.25, 3.57)
pt3dadd(129.31, -138.94, -1.25, 3.57)
pt3dadd(129.48, -139.14, -1.25, 3.57)
pt3dadd(129.66, -139.34, -1.25, 3.57)
pt3dadd(129.84, -139.54, -1.25, 3.57)
pt3dadd(130.02, -139.95, -1.25, 3.57)
pt3dadd(130.2, -140.35, -1.25, 3.57)
pt3dadd(130.55, -140.35, -1.25, 3.57)
pt3dadd(130.73, -140.56, -1.25, 3.57)
pt3dadd(130.91, -140.76, -1.25, 3.57)
pt3dadd(131.09, -141.16, -1.25, 3.57)
pt3dadd(131.45, -141.57, -1.25, 3.57)
pt3dadd(131.62, -141.77, -1.25, 3.57)
pt3dadd(131.98, -141.98, -1.25, 3.57)
pt3dadd(132.34, -142.18, -1.25, 3.57)
pt3dadd(132.52, -142.38, -1.25, 3.57)
pt3dadd(132.69, -142.58, -1.25, 3.57)
pt3dadd(132.87, -142.79, -1.25, 3.57)
pt3dadd(133.41, -143.39, -1.25, 3.57)
pt3dadd(133.59, -143.6, -1.25, 3.57)
pt3dadd(133.94, -144, -1.25, 3.57)
pt3dadd(134.12, -144.2, -1.25, 3.57)
pt3dadd(134.3, -144.61, -1.25, 3.57)
pt3dadd(134.48, -145.01, -1.25, 3.57)
pt3dadd(134.66, -145.22, -1.25, 3.57)
pt3dadd(134.83, -145.42, -1.25, 3.57)
pt3dadd(135.01, -145.62, -1.25, 3.57)
pt3dadd(135.19, -145.82, -1.25, 3.57)
pt3dadd(135.37, -146.03, -1.25, 3.57)
pt3dadd(135.55, -146.23, -1.25, 3.57)
pt3dadd(135.73, -146.43, -1.25, 3.57)
pt3dadd(135.9, -146.63, -1.25, 3.57)
pt3dadd(136.08, -146.84, -1.25, 3.57)
pt3dadd(136.26, -147.04, -1.25, 3.57)
pt3dadd(136.62, -147.04, -1.25, 3.57)
pt3dadd(136.8, -147.24, -1.25, 3.57)
pt3dadd(136.97, -147.44, -1.25, 3.57)
pt3dadd(137.33, -147.85, -1.25, 3.57)
pt3dadd(137.51, -148.05, -1.25, 3.57)
pt3dadd(137.87, -148.05, -1.25, 3.57)
pt3dadd(138.04, -148.25, -1.25, 3.57)
pt3dadd(138.22, -148.46, -1.25, 3.57)
pt3dadd(138.76, -149.06, -1.25, 3.57)
pt3dadd(139.11, -149.06, -1.25, 3.57)
pt3dadd(139.29, -149.27, -1.25, 3.57)
pt3dadd(139.47, -149.47, -1.25, 3.57)
pt3dadd(139.83, -149.67, -1.25, 3.57)
pt3dadd(140.01, -149.87, -1.25, 3.57)
pt3dadd(140.54, -149.87, -1.25, 3.57)
pt3dadd(140.72, -150.08, -1.25, 3.57)
pt3dadd(140.9, -150.28, -1.25, 3.57)
pt3dadd(141.25, -150.48, -1.25, 3.57)
pt3dadd(141.79, -150.68, -1.25, 3.57)
pt3dadd(142.15, -151.09, -1.25, 3.57)
pt3dadd(142.68, -151.7, -1.25, 3.57)
pt3dadd(143.04, -151.9, -1.25, 3.57)
pt3dadd(143.57, -152.1, -1.25, 3.57)
pt3dadd(143.93, -152.31, -1.25, 3.57)
pt3dadd(144.11, -152.51, -1.25, 3.57)
pt3dadd(144.46, -152.71, -1.25, 3.57)
pt3dadd(144.64, -152.91, -1.25, 3.57)
pt3dadd(145, -153.12, -1.25, 3.57)
pt3dadd(145.18, -153.32, -1.25, 3.57)
pt3dadd(144.82, -153.32, 0.85, 3.57)
pt3dadd(147.85, -156.56, 0.85, 3.57)
pt3dadd(148.21, -156.76, 0.85, 3.57)
pt3dadd(148.56, -157.37, 0.85, 3.57)
pt3dadd(149.1, -157.98, 0.85, 3.57)
pt3dadd(149.46, -158.38, 0.85, 3.57)
pt3dadd(149.81, -158.58, 0.85, 3.57)
pt3dadd(149.81, -158.99, 0.85, 3.57)
pt3dadd(149.99, -159.19, 0.85, 3.57)
pt3dadd(150.17, -159.39, 0.85, 3.57)
pt3dadd(150.35, -159.6, 0.85, 3.57)
pt3dadd(150.53, -159.8, 0.85, 3.57)
pt3dadd(150.7, -160, 0.85, 3.57)
pt3dadd(150.88, -160.2, 0.85, 3.57)
pt3dadd(151.24, -160.41, 0.85, 3.57)
pt3dadd(151.42, -160.61, 0.85, 3.57)
pt3dadd(151.6, -161.01, 0.85, 3.57)
pt3dadd(151.95, -161.42, 0.85, 3.57)
pt3dadd(152.31, -161.82, 0.85, 3.57)
pt3dadd(152.67, -162.43, 0.85, 3.57)
pt3dadd(152.84, -162.84, 0.85, 3.57)
pt3dadd(153.2, -163.24, 0.85, 3.57)
pt3dadd(153.38, -163.45, 0.85, 3.57)
pt3dadd(153.56, -163.65, 0.85, 3.57)
pt3dadd(153.91, -163.85, 0.85, 3.57)
pt3dadd(154.09, -164.26, 0.85, 3.57)
pt3dadd(154.27, -164.46, 0.85, 3.57)
pt3dadd(154.45, -164.86, 0.85, 3.57)
pt3dadd(154.81, -165.27, 0.85, 3.57)
pt3dadd(154.98, -165.47, 0.85, 3.57)
pt3dadd(155.16, -165.88, 0.85, 3.57)
pt3dadd(155.52, -166.48, 0.85, 3.57)
pt3dadd(155.7, -166.89, 0.85, 3.57)
pt3dadd(155.88, -167.09, 0.85, 3.57)
pt3dadd(156.05, -167.7, 0.85, 3.57)
pt3dadd(156.23, -168.1, 0.85, 3.57)
pt3dadd(156.41, -168.31, 0.85, 3.57)
pt3dadd(156.59, -168.71, 0.85, 3.57)
pt3dadd(156.59, -169.12, 0.85, 3.57)
pt3dadd(156.77, -169.72, 0.85, 3.57)
pt3dadd(156.95, -170.13, 0.85, 3.57)
pt3dadd(157.12, -170.33, 0.85, 3.57)
pt3dadd(157.12, -170.74, 0.85, 3.57)
}
}
proc shape3d_30() {
dend[23] { pt3dadd(157.3, -170.94, 0.85, 3.57)
pt3dadd(157.3, -171.95, 0.85, 3.57)
pt3dadd(157.48, -172.56, 0.85, 3.57)
pt3dadd(157.66, -172.96, 0.85, 3.57)
pt3dadd(157.66, -173.98, 0.85, 3.57)
pt3dadd(157.84, -174.38, 0.85, 3.57)
pt3dadd(157.84, -175.8, 0.85, 3.57)
pt3dadd(158.02, -176.21, 0.85, 3.57)
pt3dadd(158.02, -176.81, 0.85, 3.57)
pt3dadd(158.37, -177.62, 0.85, 3.57)
pt3dadd(158.37, -178.03, 0.85, 3.57)
pt3dadd(158.73, -178.64, 0.85, 3.57)
pt3dadd(158.73, -179.04, 0.85, 3.57)
pt3dadd(158.91, -179.65, 0.85, 3.57)
pt3dadd(158.91, -181.27, 0.85, 3.57)
pt3dadd(158.55, -181.27, 1.9, 3.57)
pt3dadd(158.55, -182.48, 1.9, 3.57)
pt3dadd(158.37, -182.69, 1.9, 3.57)
pt3dadd(159.61, -194.43, 1.9, 3.57)
pt3dadd(153.6, -197.34, 4, 2.89)
pt3dadd(158.19, -193.62, 4, 2.89)
pt3dadd(158.02, -193.83, 4, 2.89)
pt3dadd(157.84, -194.03, 4, 2.89)
pt3dadd(157.66, -194.23, 4, 2.89)
pt3dadd(157.48, -194.43, 4, 2.89)
pt3dadd(157.48, -194.84, 4, 2.89)
pt3dadd(157.3, -195.04, 4, 2.89)
pt3dadd(156.95, -195.24, 4, 2.89)
pt3dadd(156.77, -195.65, 4, 2.89)
pt3dadd(156.59, -195.85, 4, 2.89)
pt3dadd(156.59, -196.26, 4, 2.89)
pt3dadd(156.41, -196.46, 4, 2.89)
pt3dadd(156.23, -196.87, 4, 2.89)
pt3dadd(156.23, -197.27, 4, 2.89)
pt3dadd(156.05, -197.47, 4, 2.89)
pt3dadd(155.88, -197.68, 4, 2.89)
pt3dadd(155.7, -197.88, 4, 2.89)
pt3dadd(155.52, -198.08, 4, 2.89)
pt3dadd(155.52, -198.49, 4, 2.89)
pt3dadd(155.34, -198.69, 4, 2.89)
pt3dadd(155.16, -198.89, 4, 2.89)
pt3dadd(155.16, -199.3, 4, 2.89)
pt3dadd(154.98, -199.7, 4, 2.89)
pt3dadd(154.81, -200.31, 4, 2.89)
pt3dadd(154.63, -200.51, 4, 2.89)
pt3dadd(154.45, -200.92, 4, 2.89)
pt3dadd(154.27, -201.32, 4, 2.89)
pt3dadd(154.09, -201.52, 4, 2.89)
pt3dadd(153.91, -201.93, 4, 2.89)
pt3dadd(153.74, -202.33, 4, 2.89)
pt3dadd(153.56, -202.54, 4, 2.89)
pt3dadd(153.38, -202.74, 4, 2.89)
pt3dadd(153.2, -202.94, 4, 2.89)
pt3dadd(153.02, -203.35, 4, 2.89)
pt3dadd(152.84, -203.55, 4, 2.89)
pt3dadd(152.31, -204.16, 4, 2.89)
pt3dadd(152.13, -204.36, 4, 2.89)
pt3dadd(151.95, -204.56, 4, 2.89)
pt3dadd(151.77, -204.76, 4, 2.89)
pt3dadd(151.6, -204.97, 4, 2.89)
pt3dadd(151.42, -205.17, 4, 2.89)
pt3dadd(151.24, -205.37, 4, 2.89)
pt3dadd(151.06, -205.57, 4, 2.89)
pt3dadd(150.88, -205.78, 4, 2.89)
pt3dadd(150.7, -206.18, 4, 2.89)
pt3dadd(150.53, -206.59, 4, 2.89)
pt3dadd(150.35, -206.79, 4, 2.89)
pt3dadd(150.17, -207.2, 4, 2.89)
pt3dadd(149.99, -207.4, 4, 2.89)
pt3dadd(149.81, -207.8, 4, 2.89)
pt3dadd(149.63, -208.01, 4, 2.89)
pt3dadd(149.46, -208.41, 4, 2.89)
pt3dadd(149.28, -208.82, 4, 2.89)
pt3dadd(149.1, -209.22, 4, 2.89)
pt3dadd(148.92, -209.42, 4, 2.89)
pt3dadd(148.74, -209.83, 4, 2.89)
pt3dadd(148.74, -210.44, 4, 2.89)
pt3dadd(148.56, -210.84, 4, 2.89)
pt3dadd(148.56, -211.25, 4, 2.89)
pt3dadd(148.39, -211.85, 4, 2.89)
pt3dadd(148.39, -219.55, 4, 2.89)
pt3dadd(148.56, -219.75, 4, 2.89)
pt3dadd(148.74, -219.96, 4, 2.89)
pt3dadd(148.92, -220.16, 4, 2.89)
pt3dadd(148.92, -220.56, 4, 2.89)
pt3dadd(149.1, -220.97, 4, 2.89)
pt3dadd(149.1, -221.98, 4, 2.89)
pt3dadd(149.28, -222.18, 4, 2.89)
pt3dadd(149.46, -222.59, 4, 2.89)
pt3dadd(149.63, -222.99, 4, 2.89)
pt3dadd(149.63, -223.4, 4, 2.89)
pt3dadd(149.81, -223.8, 4, 2.89)
pt3dadd(149.99, -224.21, 4, 2.89)
pt3dadd(251.01, 6.54, 4, 2.89)
pt3dadd(250.75, 5.07, 4, 2.89)
pt3dadd(250.93, 5.48, 4, 2.89)
pt3dadd(250.93, 5.88, 4, 2.89)
pt3dadd(251.1, 6.29, 4, 2.89)
pt3dadd(251.1, 6.69, 4, 2.89)
pt3dadd(251.28, 7.1, 4, 2.89)
pt3dadd(251.28, 7.5, 4, 2.89)
pt3dadd(251.46, 8.11, 4, 2.89)
pt3dadd(251.02, 8.31, 4, 2.89)
pt3dadd(251.82, 9.12, 4, 2.89)
pt3dadd(251.82, 9.53, 4, 2.89)
pt3dadd(252, 9.93, 4, 2.89)
pt3dadd(252.17, 10.14, 4, 2.89)
pt3dadd(252.35, 10.74, 4, 2.89)
pt3dadd(252.35, 11.15, 4, 2.89)
pt3dadd(252.53, 11.35, 4, 2.89)
pt3dadd(252.53, 11.96, 4, 2.89)
pt3dadd(252.71, 12.36, 4, 2.89)
pt3dadd(252.89, 12.97, 4, 2.89)
pt3dadd(253.07, 13.38, 4, 2.89)
pt3dadd(253.07, 13.78, 4, 2.89)
pt3dadd(253.24, 13.99, 4, 2.89)
pt3dadd(253.42, 14.8, 4, 2.89)
pt3dadd(253.42, 15.4, 4, 2.89)
pt3dadd(253.78, 16.01, 4, 2.89)
pt3dadd(253.78, 16.82, 4, 2.89)
pt3dadd(253.96, 17.43, 4, 2.89)
pt3dadd(254.14, 17.83, 4, 2.89)
pt3dadd(254.31, 18.24, 4, 2.89)
pt3dadd(254.31, 18.64, 4, 2.89)
pt3dadd(254.49, 19.05, 4, 2.89)
pt3dadd(254.67, 19.45, 4, 2.89)
pt3dadd(254.67, 20.26, 4, 2.89)
pt3dadd(254.85, 20.67, 4, 2.89)
pt3dadd(255.03, 20.87, 4, 2.89)
pt3dadd(255.03, 21.48, 4, 2.89)
pt3dadd(255.21, 21.88, 4, 2.89)
pt3dadd(255.21, 22.49, 4, 2.89)
pt3dadd(255.38, 22.9, 4, 2.89)
pt3dadd(255.56, 23.3, 4, 2.89)
pt3dadd(255.56, 23.91, 4, 2.89)
pt3dadd(255.74, 24.11, 4, 2.89)
pt3dadd(255.92, 24.52, 4, 2.89)
pt3dadd(256.1, 25.13, 4, 2.89)
pt3dadd(256.1, 25.53, 4, 2.89)
pt3dadd(256.28, 25.94, 4, 2.89)
pt3dadd(256.28, 26.34, 4, 2.89)
pt3dadd(256.45, 26.75, 4, 2.89)
pt3dadd(256.63, 27.15, 4, 2.89)
pt3dadd(256.81, 27.96, 4, 2.89)
pt3dadd(256.81, 28.37, 4, 2.89)
pt3dadd(256.99, 28.77, 4, 2.89)
pt3dadd(256.99, 29.58, 4, 2.89)
pt3dadd(257.17, 30.19, 4, 2.89)
pt3dadd(257.17, 30.8, 4, 2.89)
pt3dadd(257.35, 31.2, 4, 2.89)
pt3dadd(257.35, 32.01, 4, 2.89)
pt3dadd(257.52, 32.62, 4, 2.89)
pt3dadd(257.52, 33.63, 4, 2.89)
pt3dadd(257.7, 34.04, 4, 2.89)
pt3dadd(257.7, 35.46, 4, 2.89)
pt3dadd(257.88, 35.86, 4, 2.89)
pt3dadd(257.88, 37.28, 4, 2.89)
pt3dadd(258.06, 37.68, 4, 2.89)
pt3dadd(258.06, 38.9, 4, 2.89)
pt3dadd(258.24, 39.3, 4, 2.89)
pt3dadd(258.24, 40.32, 4, 2.89)
pt3dadd(258.42, 40.72, 4, 2.89)
pt3dadd(258.42, 41.73, 4, 2.89)
pt3dadd(258.59, 42.14, 4, 2.89)
pt3dadd(258.59, 43.35, 4, 2.89)
pt3dadd(258.77, 43.56, 4, 2.89)
pt3dadd(258.77, 44.37, 4, 2.89)
pt3dadd(258.95, 44.77, 4, 2.89)
pt3dadd(258.95, 45.58, 4, 2.89)
pt3dadd(259.13, 45.99, 4, 2.89)
pt3dadd(259.13, 46.6, 4, 2.89)
pt3dadd(259.31, 47, 4, 2.89)
pt3dadd(259.31, 47.61, 4, 2.89)
pt3dadd(259.49, 48.01, 4, 2.89)
pt3dadd(259.66, 48.22, 4, 2.89)
pt3dadd(259.66, 48.62, 4, 2.89)
pt3dadd(259.84, 48.82, 4, 2.89)
pt3dadd(260.02, 49.23, 4, 2.89)
pt3dadd(260.02, 49.84, 4, 2.89)
pt3dadd(260.2, 50.24, 4, 2.89)
pt3dadd(260.56, 50.85, 4, 2.89)
pt3dadd(260.73, 51.05, 4, 2.89)
pt3dadd(260.56, 51.66, 4, 2.89)
pt3dadd(260.56, 51.66, 4, 2.89)
pt3dadd(260.56, 50.44, 4, 2.89)
pt3dadd(260.73, 50.85, 4, 2.89)
pt3dadd(260.73, 51.25, 4, 2.89)
pt3dadd(260.91, 51.66, 4, 2.89)
pt3dadd(260.91, 52.47, 4, 2.89)
pt3dadd(261.09, 52.87, 4, 2.89)
pt3dadd(261.27, 53.48, 4, 2.89)
pt3dadd(261.27, 53.89, 4, 2.89)
pt3dadd(261.45, 54.49, 4, 2.89)
pt3dadd(261.45, 55.1, 4, 2.89)
pt3dadd(261.63, 55.3, 4, 2.89)
pt3dadd(261.63, 55.71, 4, 2.89)
pt3dadd(261.8, 56.11, 4, 2.89)
pt3dadd(261.8, 56.72, 4, 2.89)
pt3dadd(261.98, 57.13, 4, 2.89)
pt3dadd(262.16, 57.74, 4, 2.89)
}
}
proc shape3d_31() {
dend[23] { pt3dadd(262.16, 58.14, 4, 2.89)
pt3dadd(262.34, 58.75, 4, 2.89)
pt3dadd(262.52, 59.36, 4, 2.89)
pt3dadd(262.7, 59.96, 4, 2.89)
pt3dadd(262.87, 60.57, 4, 2.89)
pt3dadd(263.05, 60.98, 4, 2.89)
pt3dadd(263.05, 61.58, 4, 2.89)
pt3dadd(263.23, 61.79, 4, 2.89)
pt3dadd(263.23, 62.39, 4, 2.89)
pt3dadd(263.59, 63.41, 4, 2.89)
pt3dadd(263.59, 64.42, 4, 2.89)
pt3dadd(263.77, 65.03, 4, 2.89)
pt3dadd(263.94, 65.23, 4, 2.89)
pt3dadd(263.94, 65.63, 4, 2.89)
pt3dadd(264.12, 66.24, 4, 2.89)
pt3dadd(264.12, 66.65, 4, 2.89)
pt3dadd(264.3, 67.05, 4, 2.89)
pt3dadd(264.3, 67.46, 4, 2.89)
pt3dadd(264.48, 67.86, 4, 2.89)
pt3dadd(264.48, 68.67, 4, 2.89)
pt3dadd(264.66, 68.88, 4, 2.89)
pt3dadd(264.66, 69.48, 4, 2.89)
pt3dadd(264.84, 69.89, 4, 2.89)
pt3dadd(265.01, 70.5, 4, 2.89)
pt3dadd(265.01, 70.9, 4, 2.89)
pt3dadd(265.19, 71.51, 4, 2.89)
pt3dadd(265.37, 71.91, 4, 2.89)
pt3dadd(265.73, 72.32, 4, 2.89)
pt3dadd(265.91, 72.72, 4, 2.89)
pt3dadd(266.08, 73.13, 4, 2.89)
pt3dadd(266.08, 73.53, 4, 2.89)
pt3dadd(266.44, 73.94, 4, 2.89)
pt3dadd(266.44, 74.34, 4, 2.89)
pt3dadd(266.62, 74.75, 4, 2.89)
pt3dadd(266.98, 75.15, 4, 2.89)
pt3dadd(266.98, 75.56, 4, 2.89)
pt3dadd(267.33, 76.17, 4, 2.89)
pt3dadd(267.51, 76.77, 4, 2.89)
pt3dadd(267.69, 77.18, 4, 2.89)
pt3dadd(267.87, 77.38, 4, 2.89)
pt3dadd(268.05, 77.79, 4, 2.89)
pt3dadd(268.22, 78.4, 4, 2.89)
pt3dadd(268.4, 78.8, 4, 2.89)
pt3dadd(268.76, 79.21, 4, 2.89)
pt3dadd(268.94, 79.81, 4, 2.89)
pt3dadd(269.12, 80.22, 4, 2.89)
pt3dadd(269.29, 80.83, 4, 2.89)
pt3dadd(269.65, 81.23, 4, 2.89)
pt3dadd(269.83, 81.84, 4, 2.89)
pt3dadd(270.01, 82.24, 4, 2.89)
pt3dadd(270.01, 82.85, 4, 2.89)
pt3dadd(270.36, 83.46, 4, 2.89)
pt3dadd(270.54, 83.86, 4, 2.89)
pt3dadd(270.9, 84.47, 4, 2.89)
pt3dadd(271.08, 85.08, 4, 2.89)
pt3dadd(271.26, 85.48, 4, 2.89)
pt3dadd(271.43, 86.09, 4, 2.89)
pt3dadd(271.61, 86.5, 4, 2.89)
pt3dadd(271.79, 86.9, 4, 2.89)
pt3dadd(271.97, 87.31, 4, 2.89)
pt3dadd(272.15, 87.91, 4, 2.89)
pt3dadd(272.33, 88.32, 4, 2.89)
pt3dadd(272.5, 88.52, 4, 2.89)
pt3dadd(272.68, 89.13, 4, 2.89)
pt3dadd(272.86, 89.54, 4, 2.89)
pt3dadd(273.04, 89.94, 4, 2.89)
pt3dadd(273.22, 90.14, 4, 2.89)
pt3dadd(273.57, 90.95, 4, 2.89)
pt3dadd(273.75, 91.16, 4, 2.89)
pt3dadd(273.75, 91.56, 4, 2.89)
pt3dadd(274.11, 92.17, 4, 2.89)
pt3dadd(274.29, 92.57, 4, 2.89)
pt3dadd(274.29, 92.98, 4, 2.89)
pt3dadd(274.47, 93.18, 4, 2.89)
pt3dadd(274.64, 93.59, 4, 2.89)
pt3dadd(274.82, 93.79, 4, 2.89)
pt3dadd(275, 94.4, 4, 2.89)
pt3dadd(275, 94.8, 4, 2.89)
pt3dadd(275.18, 95.41, 4, 2.89)
pt3dadd(275.54, 95.81, 4, 2.89)
pt3dadd(275.54, 96.42, 4, 2.89)
pt3dadd(275.71, 96.62, 4, 2.89)
pt3dadd(275.89, 97.03, 4, 2.89)
pt3dadd(276.07, 97.43, 4, 2.89)
pt3dadd(276.25, 97.84, 4, 2.89)
pt3dadd(276.25, 98.24, 4, 2.89)
pt3dadd(276.43, 98.65, 4, 2.89)
pt3dadd(276.61, 99.26, 4, 2.89)
pt3dadd(276.61, 99.66, 4, 2.89)
pt3dadd(276.78, 100.07, 4, 2.89)
pt3dadd(276.78, 100.68, 4, 2.89)
pt3dadd(276.96, 101.08, 4, 2.89)
pt3dadd(277.14, 101.49, 4, 2.89)
pt3dadd(277.14, 101.89, 4, 2.89)
pt3dadd(277.32, 102.5, 4, 2.89)
pt3dadd(277.32, 103.51, 4, 2.89)
pt3dadd(277.5, 103.71, 4, 2.89)
pt3dadd(277.5, 104.32, 4, 2.89)
pt3dadd(277.68, 104.52, 4, 2.89)
pt3dadd(277.68, 104.93, 4, 2.89)
pt3dadd(277.85, 105.33, 4, 2.89)
pt3dadd(278.03, 105.74, 4, 2.89)
pt3dadd(278.21, 105.94, 4, 2.89)
pt3dadd(278.21, 106.75, 4, 2.89)
pt3dadd(278.39, 107.16, 4, 2.89)
pt3dadd(278.57, 107.56, 4, 2.89)
pt3dadd(278.57, 108.17, 4, 2.89)
pt3dadd(278.74, 108.57, 4, 2.89)
pt3dadd(278.92, 109.18, 4, 2.89)
pt3dadd(278.92, 108.17, 4, 2.89)
pt3dadd(279.1, 108.37, 4, 2.89)
pt3dadd(279.28, 108.57, 4, 2.89)
pt3dadd(279.28, 109.38, 4, 2.89)
pt3dadd(279.46, 109.79, 4, 2.89)
pt3dadd(279.46, 110.6, 4, 2.89)
pt3dadd(279.64, 111.01, 4, 2.89)
pt3dadd(279.64, 111.41, 4, 2.89)
pt3dadd(279.82, 111.61, 4, 2.89)
pt3dadd(279.82, 112.22, 4, 2.89)
pt3dadd(279.99, 112.63, 4, 2.89)
pt3dadd(280.17, 113.03, 4, 2.89)
pt3dadd(280.17, 113.44, 4, 2.89)
pt3dadd(280.35, 113.84, 4, 2.89)
pt3dadd(280.53, 114.25, 4, 2.89)
pt3dadd(280.71, 114.65, 4, 2.89)
pt3dadd(280.88, 115.06, 4, 2.89)
pt3dadd(280.88, 115.46, 4, 2.89)
pt3dadd(281.06, 115.87, 4, 2.89)
pt3dadd(281.24, 116.27, 4, 2.89)
pt3dadd(281.24, 116.68, 4, 2.89)
pt3dadd(281.42, 116.88, 4, 2.89)
pt3dadd(281.6, 117.28, 4, 2.89)
pt3dadd(281.6, 118.09, 4, 2.89)
pt3dadd(281.78, 118.5, 4, 2.89)
pt3dadd(281.95, 118.9, 4, 2.89)
pt3dadd(281.95, 119.51, 4, 2.89)
pt3dadd(282.13, 119.92, 4, 2.89)
pt3dadd(282.31, 120.32, 4, 2.89)
pt3dadd(282.31, 120.73, 4, 2.89)
pt3dadd(282.49, 120.93, 4, 2.89)
pt3dadd(282.67, 121.54, 4, 2.89)
pt3dadd(282.67, 121.94, 4, 2.89)
pt3dadd(282.85, 122.15, 4, 2.89)
pt3dadd(282.85, 122.75, 4, 2.89)
pt3dadd(283.02, 122.96, 4, 2.89)
pt3dadd(283.02, 123.36, 4, 2.89)
pt3dadd(283.2, 123.56, 4, 2.89)
pt3dadd(283.2, 124.37, 4, 2.89)
pt3dadd(283.38, 124.78, 4, 2.89)
pt3dadd(283.56, 124.98, 4, 2.89)
pt3dadd(283.56, 125.79, 4, 2.89)
pt3dadd(283.74, 125.99, 4, 2.89)
pt3dadd(283.92, 126.6, 4, 2.89)
pt3dadd(283.92, 127.01, 4, 2.89)
pt3dadd(284.09, 127.41, 4, 2.89)
pt3dadd(284.27, 127.82, 4, 2.89)
pt3dadd(284.45, 128.22, 4, 2.89)
pt3dadd(284.45, 128.83, 4, 2.89)
pt3dadd(284.63, 129.23, 4, 2.89)
pt3dadd(284.63, 129.64, 4, 2.89)
pt3dadd(284.81, 129.84, 4, 2.89)
pt3dadd(284.99, 130.25, 4, 2.89)
pt3dadd(285.16, 130.85, 4, 2.89)
pt3dadd(285.34, 131.26, 4, 2.89)
pt3dadd(285.34, 131.66, 4, 2.89)
pt3dadd(285.52, 132.07, 4, 2.89)
pt3dadd(285.7, 132.27, 4, 2.89)
pt3dadd(285.88, 132.68, 4, 2.89)
pt3dadd(285.88, 133.08, 4, 2.89)
pt3dadd(286.06, 133.69, 4, 2.89)
pt3dadd(286.23, 134.1, 4, 2.89)
pt3dadd(286.41, 134.7, 4, 2.89)
pt3dadd(286.77, 135.11, 4, 2.89)
pt3dadd(286.77, 135.51, 4, 2.89)
pt3dadd(286.95, 135.92, 4, 2.89)
pt3dadd(287.13, 136.53, 4, 2.89)
pt3dadd(287.3, 136.93, 4, 2.89)
pt3dadd(287.48, 137.34, 4, 2.89)
pt3dadd(287.66, 137.74, 4, 2.89)
pt3dadd(287.84, 138.35, 4, 2.89)
pt3dadd(288.02, 138.75, 4, 2.89)
pt3dadd(288.2, 139.16, 4, 2.89)
pt3dadd(288.37, 139.56, 4, 2.89)
pt3dadd(288.55, 139.97, 4, 2.89)
pt3dadd(288.91, 140.58, 4, 2.89)
pt3dadd(289.09, 140.78, 4, 2.89)
pt3dadd(289.27, 141.39, 4, 2.89)
pt3dadd(289.44, 141.79, 4, 2.89)
pt3dadd(289.62, 142.2, 4, 2.89)
pt3dadd(289.8, 142.4, 4, 2.89)
pt3dadd(289.98, 142.8, 4, 2.89)
pt3dadd(290.16, 143.21, 4, 2.89)
pt3dadd(290.34, 143.41, 4, 2.89)
pt3dadd(290.51, 143.82, 4, 2.89)
pt3dadd(290.69, 144.22, 4, 2.89)
pt3dadd(290.87, 144.63, 4, 2.89)
pt3dadd(291.05, 145.03, 4, 2.89)
pt3dadd(291.23, 145.44, 4, 2.89)
pt3dadd(291.58, 145.84, 4, 2.89)
pt3dadd(291.76, 146.45, 4, 2.89)
}
}
proc shape3d_32() {
dend[23] { pt3dadd(291.94, 146.65, 4, 2.89)
pt3dadd(292.12, 147.06, 4, 2.89)
pt3dadd(292.3, 147.46, 4, 2.89)
pt3dadd(292.65, 148.07, 4, 2.89)
pt3dadd(292.83, 148.48, 4, 2.89)
pt3dadd(293.01, 148.88, 4, 2.89)
pt3dadd(293.19, 149.29, 4, 2.89)
pt3dadd(293.37, 149.69, 4, 2.89)
pt3dadd(293.72, 150.1, 4, 2.89)
pt3dadd(293.9, 150.5, 4, 2.89)
pt3dadd(294.08, 150.7, 4, 2.89)
pt3dadd(294.44, 151.31, 4, 2.89)
pt3dadd(294.62, 151.72, 4, 2.89)
pt3dadd(294.79, 152.12, 4, 2.89)
pt3dadd(294.97, 152.32, 4, 2.89)
pt3dadd(295.15, 152.73, 4, 2.89)
pt3dadd(295.33, 152.93, 4, 2.89)
pt3dadd(295.51, 153.13, 4, 2.89)
pt3dadd(295.69, 153.54, 4, 2.89)
pt3dadd(295.86, 153.94, 4, 2.89)
pt3dadd(296.04, 154.15, 4, 2.89)
pt3dadd(296.22, 154.55, 4, 2.89)
pt3dadd(296.4, 154.96, 4, 2.89)
pt3dadd(296.76, 155.57, 4, 2.89)
pt3dadd(296.93, 155.97, 4, 2.89)
pt3dadd(297.29, 156.17, 4, 2.89)
pt3dadd(297.47, 156.58, 4, 2.89)
pt3dadd(297.65, 156.78, 4, 2.89)
pt3dadd(297.65, 157.19, 4, 2.89)
pt3dadd(298, 157.59, 4, 2.89)
pt3dadd(298.18, 157.79, 4, 2.89)
pt3dadd(298.36, 158.2, 4, 2.89)
pt3dadd(298.54, 158.6, 4, 2.89)
pt3dadd(298.72, 159.01, 4, 2.89)
pt3dadd(298.9, 159.41, 4, 2.89)
pt3dadd(299.25, 159.82, 4, 2.89)
pt3dadd(299.43, 160.02, 4, 2.89)
pt3dadd(299.61, 160.22, 4, 2.89)
pt3dadd(299.79, 160.43, 4, 2.89)
pt3dadd(299.79, 160.83, 4, 2.89)
pt3dadd(299.97, 161.24, 4, 2.89)
pt3dadd(300.14, 161.44, 4, 2.89)
pt3dadd(300.32, 161.64, 4, 2.89)
pt3dadd(300.5, 161.84, 4, 2.89)
pt3dadd(300.68, 162.25, 4, 2.89)
pt3dadd(300.86, 162.45, 4, 2.89)
pt3dadd(301.21, 163.06, 4, 2.89)
pt3dadd(301.39, 163.26, 4, 2.89)
pt3dadd(301.75, 163.46, 4, 2.89)
pt3dadd(301.75, 163.87, 4, 2.89)
pt3dadd(301.93, 164.07, 4, 2.89)
pt3dadd(302.11, 164.27, 4, 2.89)
pt3dadd(302.28, 164.48, 4, 2.89)
pt3dadd(302.46, 164.88, 4, 2.89)
pt3dadd(302.64, 165.29, 4, 2.89)
pt3dadd(302.82, 165.49, 4, 2.89)
pt3dadd(303, 165.69, 4, 2.89)
pt3dadd(303.18, 165.9, 4, 2.89)
pt3dadd(303.18, 166.3, 4, 2.89)
pt3dadd(303.35, 166.5, 4, 2.89)
pt3dadd(303.53, 166.71, 4, 2.89)
pt3dadd(303.71, 166.91, 4, 2.89)
pt3dadd(303.89, 167.31, 4, 2.89)
pt3dadd(304.07, 167.52, 4, 2.89)
pt3dadd(304.07, 167.52, 4, 2.89)
pt3dadd(304.07, 167.52, 4, 2.89)
pt3dadd(304.6, 167.52, 4, 2.89)
pt3dadd(304.78, 167.72, 4, 2.89)
pt3dadd(305.32, 167.72, 4, 2.89)
pt3dadd(305.67, 167.92, 4, 2.89)
pt3dadd(306.03, 168.12, 4, 2.89)
pt3dadd(306.39, 168.33, 4, 2.89)
pt3dadd(306.74, 168.53, 4, 2.89)
pt3dadd(307.1, 168.73, 4, 2.89)
pt3dadd(307.28, 168.93, 4, 2.89)
pt3dadd(307.46, 169.14, 4, 2.89)
pt3dadd(308.17, 169.14, 4, 2.89)
pt3dadd(308.35, 169.54, 4, 2.89)
pt3dadd(308.53, 169.74, 4, 2.89)
pt3dadd(308.88, 169.74, 4, 2.89)
pt3dadd(309.06, 169.95, 4, 2.89)
pt3dadd(309.42, 170.15, 4, 2.89)
pt3dadd(309.77, 170.35, 4, 2.89)
pt3dadd(309.95, 170.55, 4, 2.89)
pt3dadd(310.31, 170.55, 4, 2.89)
pt3dadd(310.49, 170.76, 4, 2.89)
pt3dadd(310.67, 170.96, 4, 2.89)
pt3dadd(310.84, 171.16, 4, 2.89)
pt3dadd(311.02, 171.36, 4, 2.89)
pt3dadd(311.2, 171.57, 4, 2.89)
pt3dadd(311.38, 171.77, 4, 2.89)
pt3dadd(311.56, 171.97, 4, 2.89)
pt3dadd(311.91, 172.17, 4, 2.89)
pt3dadd(312.09, 172.38, 4, 2.89)
pt3dadd(312.27, 172.58, 4, 2.89)
pt3dadd(312.45, 172.78, 4, 2.89)
pt3dadd(312.63, 172.98, 4, 2.89)
pt3dadd(312.63, 173.39, 4, 2.89)
pt3dadd(312.81, 173.59, 4, 2.89)
pt3dadd(312.98, 173.79, 4, 2.89)
pt3dadd(313.16, 174, 4, 2.89)
pt3dadd(313.16, 174.6, 4, 2.89)
pt3dadd(313.34, 175.01, 4, 2.89)
pt3dadd(313.52, 175.21, 4, 2.89)
pt3dadd(313.52, 175.82, 4, 2.89)
pt3dadd(313.7, 176.02, 4, 2.89)
pt3dadd(313.7, 176.83, 4, 2.89)
pt3dadd(313.88, 177.04, 4, 2.89)
pt3dadd(313.88, 178.66, 4, 2.89)
pt3dadd(314.05, 178.86, 4, 2.89)
pt3dadd(314.05, 179.47, 4, 2.89)
pt3dadd(314.23, 179.67, 4, 2.89)
pt3dadd(314.41, 180.07, 4, 2.89)
pt3dadd(314.59, 180.48, 4, 2.89)
pt3dadd(314.77, 180.88, 4, 2.89)
pt3dadd(314.77, 181.29, 4, 2.89)
pt3dadd(318.16, 184.93, 4, 2.89)
pt3dadd(314.77, 181.49, 4, 3.23)
pt3dadd(314.77, 181.29, 4, 3.23)
pt3dadd(314.95, 181.09, 4, 3.23)
pt3dadd(315.12, 181.29, 4, 3.23)
pt3dadd(315.48, 181.49, 4, 3.23)
pt3dadd(315.66, 181.9, 4, 3.23)
pt3dadd(315.84, 182.1, 4, 3.23)
pt3dadd(316.19, 182.3, 4, 3.23)
pt3dadd(316.37, 182.71, 4, 3.23)
pt3dadd(316.55, 182.91, 4, 3.23)
pt3dadd(316.73, 183.11, 4, 3.23)
pt3dadd(316.91, 183.31, 4, 3.23)
pt3dadd(317.09, 183.52, 4, 3.23)
pt3dadd(317.26, 183.92, 4, 3.23)
pt3dadd(317.62, 184.12, 4, 3.23)
pt3dadd(317.8, 184.33, 4, 3.23)
pt3dadd(317.98, 184.73, 4, 3.23)
pt3dadd(318.16, 184.93, 4, 3.23)
pt3dadd(318.33, 185.14, 4, 3.23)
pt3dadd(318.69, 185.54, 4, 3.23)
pt3dadd(318.87, 185.74, 4, 3.23)
pt3dadd(319.23, 186.15, 4, 3.23)
pt3dadd(319.4, 186.55, 4, 3.23)
pt3dadd(319.58, 186.76, 4, 3.23)
pt3dadd(319.76, 186.96, 4, 3.23)
pt3dadd(320.12, 187.16, 4, 3.23)
pt3dadd(320.3, 187.57, 4, 3.23)
pt3dadd(320.47, 187.97, 4, 3.23)
pt3dadd(320.83, 188.38, 4, 3.23)
pt3dadd(321.01, 188.78, 4, 3.23)
pt3dadd(321.19, 188.99, 4, 3.23)
pt3dadd(321.54, 189.39, 4, 3.23)
pt3dadd(321.72, 189.8, 4, 3.23)
pt3dadd(322.26, 190.4, 4, 3.23)
pt3dadd(322.44, 190.61, 4, 3.23)
pt3dadd(322.79, 191.01, 4, 3.23)
pt3dadd(322.97, 191.21, 4, 3.23)
pt3dadd(323.15, 191.42, 4, 3.23)
pt3dadd(323.33, 191.62, 4, 3.23)
pt3dadd(323.51, 192.02, 4, 3.23)
pt3dadd(323.86, 192.23, 4, 3.23)
pt3dadd(324.04, 192.63, 4, 3.23)
pt3dadd(324.22, 193.04, 4, 3.23)
pt3dadd(324.58, 193.24, 4, 3.23)
pt3dadd(324.75, 193.64, 4, 3.23)
pt3dadd(324.93, 194.05, 4, 3.23)
pt3dadd(325.11, 194.25, 4, 3.23)
pt3dadd(325.47, 194.66, 4, 3.23)
pt3dadd(325.65, 195.06, 4, 3.23)
pt3dadd(326, 195.47, 4, 3.23)
pt3dadd(326.36, 195.87, 4, 3.23)
pt3dadd(326.54, 196.28, 4, 3.23)
pt3dadd(326.72, 196.48, 4, 3.23)
pt3dadd(326.89, 196.68, 4, 3.23)
pt3dadd(327.61, 197.49, 4, 3.23)
pt3dadd(327.79, 197.69, 4, 3.23)
pt3dadd(327.96, 197.9, 4, 3.23)
pt3dadd(328.14, 198.1, 4, 3.23)
pt3dadd(328.32, 198.3, 4, 3.23)
pt3dadd(328.5, 198.71, 4, 3.23)
pt3dadd(329.21, 199.52, 4, 3.23)
pt3dadd(329.39, 199.92, 4, 3.23)
pt3dadd(329.57, 200.33, 4, 3.23)
pt3dadd(329.75, 200.73, 4, 3.23)
pt3dadd(330.1, 201.14, 4, 3.23)
pt3dadd(330.28, 201.34, 4, 3.23)
pt3dadd(330.46, 201.54, 4, 3.23)
pt3dadd(330.64, 201.75, 4, 3.23)
pt3dadd(330.64, 202.15, 4, 3.23)
pt3dadd(330.82, 202.35, 4, 3.23)
pt3dadd(331, 202.76, 4, 3.23)
pt3dadd(331.17, 203.16, 4, 3.23)
pt3dadd(331.53, 203.37, 4, 3.23)
pt3dadd(331.53, 203.77, 4, 3.23)
pt3dadd(331.89, 203.97, 4, 3.23)
pt3dadd(332.07, 204.18, 4, 3.23)
pt3dadd(332.07, 204.58, 4, 3.23)
pt3dadd(332.24, 204.78, 4, 3.23)
pt3dadd(332.42, 204.99, 4, 3.23)
pt3dadd(332.6, 205.39, 4, 3.23)
pt3dadd(332.78, 205.59, 4, 3.23)
pt3dadd(332.96, 205.8, 4, 3.23)
pt3dadd(333.14, 206, 4, 3.23)
}
}
proc shape3d_33() {
dend[23] { pt3dadd(333.31, 206.4, 4, 3.23)
pt3dadd(333.49, 206.81, 4, 3.23)
pt3dadd(333.67, 207.01, 4, 3.23)
pt3dadd(333.67, 207.42, 4, 3.23)
pt3dadd(333.85, 207.62, 4, 3.23)
pt3dadd(334.03, 207.82, 4, 3.23)
pt3dadd(334.03, 208.23, 4, 3.23)
pt3dadd(334.21, 208.43, 4, 3.23)
pt3dadd(334.38, 208.63, 4, 3.23)
pt3dadd(334.56, 209.04, 4, 3.23)
pt3dadd(334.56, 209.44, 4, 3.23)
pt3dadd(334.74, 209.65, 4, 3.23)
pt3dadd(334.92, 209.85, 4, 3.23)
pt3dadd(334.92, 210.46, 4, 3.23)
pt3dadd(335.1, 210.66, 4, 3.23)
pt3dadd(335.28, 210.86, 4, 3.23)
pt3dadd(335.28, 211.27, 4, 3.23)
pt3dadd(335.45, 211.47, 4, 3.23)
pt3dadd(335.45, 211.87, 4, 3.23)
pt3dadd(335.63, 212.08, 4, 3.23)
pt3dadd(335.63, 212.68, 4, 3.23)
pt3dadd(335.81, 213.09, 4, 3.23)
pt3dadd(335.81, 213.7, 4, 3.23)
pt3dadd(335.99, 214.3, 4, 3.23)
pt3dadd(335.99, 215.52, 4, 3.23)
pt3dadd(336.17, 215.92, 4, 3.23)
pt3dadd(336.17, 237.8, 4, 3.23)
pt3dadd(336.35, 236.79, 4, 3.23)
pt3dadd(336.52, 237.39, 4, 3.23)
pt3dadd(336.52, 236.99, 4, 3.23)
pt3dadd(336.7, 237.19, 4, 3.23)
pt3dadd(336.88, 237.39, 4, 3.23)
pt3dadd(336.88, 237.8, 4, 3.23)
pt3dadd(337.06, 238, 4, 3.23)
pt3dadd(337.24, 238.2, 4, 3.23)
pt3dadd(337.24, 238.81, 4, 3.23)
pt3dadd(337.42, 239.01, 4, 3.23)
pt3dadd(337.42, 240.63, 4, 3.23)
pt3dadd(337.59, 240.84, 4, 3.23)
pt3dadd(337.59, 252.18, 4, 3.23)
pt3dadd(337.42, 252.38, 4, 3.23)
pt3dadd(337.42, 261.29, 4, 3.23)
pt3dadd(337.59, 261.5, 4, 3.23)
pt3dadd(337.59, 262.31, 4, 3.23)
pt3dadd(337.77, 262.71, 4, 3.23)
pt3dadd(337.95, 262.91, 4, 3.23)
pt3dadd(337.95, 263.32, 4, 3.23)
pt3dadd(338.13, 263.52, 4, 3.23)
pt3dadd(338.31, 263.72, 4, 3.23)
pt3dadd(338.31, 264.13, 4, 3.23)
pt3dadd(338.49, 264.33, 4, 3.23)
pt3dadd(338.49, 264.74, 4, 3.23)
pt3dadd(338.66, 265.14, 4, 3.23)
pt3dadd(338.84, 265.35, 4, 3.23)
pt3dadd(339.02, 265.55, 4, 3.23)
pt3dadd(339.02, 265.95, 4, 3.23)
pt3dadd(339.2, 266.16, 4, 3.23)
pt3dadd(339.38, 266.36, 4, 3.23)
pt3dadd(339.56, 266.56, 4, 3.23)
pt3dadd(339.56, 267.17, 4, 3.23)
pt3dadd(339.73, 267.37, 4, 3.23)
pt3dadd(339.91, 267.78, 4, 3.23)
pt3dadd(339.91, 268.59, 4, 3.23)
pt3dadd(340.09, 268.79, 4, 3.23)
pt3dadd(340.09, 282.76, 4, 3.23)
pt3dadd(340.27, 282.97, 4, 3.23)
pt3dadd(340.27, 283.78, 4, 3.23)
pt3dadd(340.45, 283.98, 4, 3.23)
pt3dadd(340.63, 284.38, 4, 3.23)
pt3dadd(340.8, 284.59, 4, 3.23)
pt3dadd(340.98, 284.99, 4, 3.23)
pt3dadd(341.16, 285.19, 4, 3.23)
pt3dadd(341.34, 285.4, 4, 3.23)
pt3dadd(341.7, 285.4, 4, 3.23)
pt3dadd(341.7, 286.41, 4, 3.4)
pt3dadd(341.34, 287.02, 4, 3.57)
}
dend[24] {pt3dclear()
pt3dadd(341.34, 287.02, 4, 3.57)
pt3dadd(341.34, 289.04, 4, 3.57)
pt3dadd(341.16, 289.45, 4, 3.57)
pt3dadd(341.16, 294.31, 4, 3.57)
pt3dadd(340.98, 294.71, 4, 3.57)
pt3dadd(340.98, 296.13, 4, 3.57)
pt3dadd(340.8, 296.54, 4, 3.57)
pt3dadd(340.8, 296.94, 4, 3.57)
pt3dadd(340.63, 297.15, 4, 3.57)
pt3dadd(340.45, 297.55, 4, 3.57)
pt3dadd(340.27, 297.75, 4, 3.57)
pt3dadd(340.27, 305.65, 4, 3.57)
pt3dadd(340.63, 305.65, 4, 3.57)
pt3dadd(340.63, 305.85, 4, 3.57)
pt3dadd(340.45, 306.26, 4, 3.57)
pt3dadd(340.45, 308.29, 4, 3.57)
pt3dadd(340.27, 308.49, 4, 3.57)
pt3dadd(340.27, 309.5, 4, 3.57)
pt3dadd(340.09, 309.91, 4, 3.57)
pt3dadd(339.91, 310.31, 4, 3.57)
pt3dadd(339.91, 311.53, 4, 3.57)
pt3dadd(339.73, 311.93, 4, 3.57)
pt3dadd(339.73, 312.74, 4, 3.57)
pt3dadd(339.56, 312.94, 4, 3.57)
pt3dadd(339.56, 313.35, 4, 3.57)
pt3dadd(339.38, 313.75, 4, 3.57)
pt3dadd(339.38, 314.77, 4, 3.57)
pt3dadd(339.2, 315.17, 4, 3.57)
pt3dadd(339.02, 315.58, 4, 3.57)
pt3dadd(339.02, 317.4, 4, 3.57)
pt3dadd(338.84, 317.6, 4, 3.57)
pt3dadd(338.84, 327.12, 4, 3.57)
pt3dadd(338.66, 327.12, 4, 3.57)
pt3dadd(338.66, 329.15, 4, 3.57)
pt3dadd(338.49, 328.94, 4, 3.57)
pt3dadd(338.31, 329.15, 4, 3.57)
pt3dadd(338.31, 329.55, 4, 3.57)
pt3dadd(337.95, 329.76, 4, 3.57)
pt3dadd(337.77, 330.16, 4, 3.57)
pt3dadd(337.59, 330.57, 4, 3.57)
pt3dadd(337.06, 331.17, 4, 3.57)
pt3dadd(336.7, 331.38, 4, 3.57)
pt3dadd(336.35, 331.78, 4, 3.57)
pt3dadd(336.17, 332.19, 4, 3.57)
pt3dadd(335.99, 332.59, 4, 3.57)
pt3dadd(335.63, 332.79, 4, 3.57)
pt3dadd(335.45, 333.2, 4, 3.57)
pt3dadd(334.92, 333.81, 4, 3.57)
pt3dadd(334.56, 334.21, 4, 3.57)
pt3dadd(333.85, 335.02, 4, 3.57)
pt3dadd(333.49, 335.43, 4, 3.57)
pt3dadd(333.14, 336.24, 4, 3.57)
pt3dadd(332.78, 336.44, 4, 3.57)
pt3dadd(332.42, 337.05, 4, 3.57)
pt3dadd(332.24, 337.45, 4, 3.57)
pt3dadd(331.89, 337.65, 4, 3.57)
pt3dadd(331.71, 338.06, 4, 3.57)
pt3dadd(331.53, 338.26, 4, 3.57)
pt3dadd(331.35, 338.67, 4, 3.57)
pt3dadd(331, 339.07, 4, 3.57)
pt3dadd(330.64, 339.48, 4, 3.57)
pt3dadd(330.28, 340.08, 4, 3.57)
pt3dadd(329.93, 340.49, 4, 3.57)
pt3dadd(329.75, 340.69, 4, 3.57)
pt3dadd(329.57, 341.1, 4, 3.57)
pt3dadd(329.21, 341.3, 4, 3.57)
pt3dadd(329.03, 341.5, 4, 3.57)
pt3dadd(328.86, 341.91, 4, 3.57)
pt3dadd(328.5, 342.31, 4, 3.57)
pt3dadd(328.32, 342.52, 4, 3.57)
pt3dadd(327.96, 342.72, 4, 3.57)
pt3dadd(327.61, 342.92, 4, 3.57)
pt3dadd(327.43, 343.12, 4, 3.57)
pt3dadd(327.25, 343.33, 4, 3.57)
pt3dadd(327.07, 343.53, 4, 3.57)
pt3dadd(326.72, 343.53, 4, 3.57)
pt3dadd(326.54, 343.73, 4, 3.57)
pt3dadd(326.18, 343.93, 4, 3.57)
pt3dadd(326, 344.14, 4, 3.57)
pt3dadd(325.65, 344.34, 4, 3.57)
pt3dadd(325.29, 344.34, 4, 3.57)
pt3dadd(325.11, 344.54, 4, 3.57)
pt3dadd(324.93, 344.74, 4, 3.57)
pt3dadd(324.75, 344.95, 4, 3.57)
pt3dadd(324.58, 345.15, 4, 3.57)
pt3dadd(324.4, 345.35, 4, 3.57)
pt3dadd(324.22, 345.55, 4, 3.57)
pt3dadd(324.04, 345.76, 4, 3.57)
pt3dadd(323.86, 346.16, 4, 3.57)
pt3dadd(323.68, 346.36, 4, 3.57)
pt3dadd(323.51, 346.57, 4, 3.57)
pt3dadd(323.51, 346.97, 4, 3.57)
pt3dadd(323.33, 347.17, 4, 3.57)
pt3dadd(323.33, 347.78, 4, 3.57)
pt3dadd(323.15, 347.98, 4, 3.57)
pt3dadd(322.97, 348.19, 4, 3.57)
pt3dadd(322.79, 348.39, 4, 3.57)
pt3dadd(322.61, 348.59, 4, 3.57)
pt3dadd(322.44, 348.79, 4, 3.57)
pt3dadd(322.26, 349, 4, 3.57)
pt3dadd(322.08, 349.2, 4, 3.57)
pt3dadd(321.9, 349.4, 4, 3.57)
pt3dadd(321.9, 349.81, 4, 3.57)
pt3dadd(321.72, 350.01, 4, 3.57)
pt3dadd(321.54, 350.21, 4, 3.57)
pt3dadd(321.54, 350.62, 4, 3.57)
pt3dadd(321.37, 351.02, 4, 3.57)
pt3dadd(321.19, 351.43, 4, 3.57)
pt3dadd(321.19, 351.83, 4, 3.57)
pt3dadd(321.01, 352.04, 4, 3.57)
pt3dadd(320.83, 351.83, 4, 3.06)
pt3dadd(320.65, 353.25, 13.45, 6.79)
}
dend[25] {pt3dclear()
pt3dadd(320.65, 353.25, 13.45, 6.79)
pt3dadd(321.19, 352.85, 13.45, 6.79)
pt3dadd(321.01, 352.64, 13.45, 6.79)
pt3dadd(320.83, 352.44, 13.45, 6.79)
pt3dadd(320.12, 352.44, 13.45, 6.79)
pt3dadd(317.8, 353.86, 14.5, 11.38)
pt3dadd(316.55, 353.86, 14.5, 11.38)
pt3dadd(314.23, 355.48, 17.65, 11.38)
pt3dadd(314.05, 355.68, 17.65, 11.38)
pt3dadd(313.88, 355.88, 17.65, 11.38)
pt3dadd(313.52, 356.29, 17.65, 11.38)
pt3dadd(313.16, 356.49, 17.65, 11.38)
}
}
proc shape3d_34() {
dend[25] { pt3dadd(312.81, 356.69, 17.65, 11.38)
pt3dadd(312.63, 356.9, 17.65, 11.38)
pt3dadd(312.27, 357.1, 17.65, 11.38)
pt3dadd(311.56, 357.1, 17.65, 11.38)
pt3dadd(311.38, 357.3, 17.65, 11.38)
pt3dadd(311.02, 357.5, 17.65, 11.38)
pt3dadd(310.84, 357.71, 17.65, 11.38)
pt3dadd(310.67, 357.91, 17.65, 11.38)
pt3dadd(310.49, 358.11, 17.65, 11.38)
pt3dadd(310.31, 358.31, 17.65, 11.38)
pt3dadd(310.13, 358.52, 17.65, 11.38)
pt3dadd(309.95, 358.72, 17.65, 11.38)
pt3dadd(309.77, 358.92, 17.65, 11.38)
pt3dadd(309.6, 359.12, 17.65, 11.38)
pt3dadd(309.42, 359.33, 17.65, 11.38)
pt3dadd(309.24, 359.53, 17.65, 11.38)
pt3dadd(308.53, 359.53, 17.65, 11.38)
pt3dadd(308.35, 359.73, 17.65, 11.38)
pt3dadd(308.17, 359.93, 17.65, 11.38)
pt3dadd(308.17, 360.34, 17.65, 11.38)
pt3dadd(294.33, 369.72, 0, 0.28)
}
dend[26] {pt3dclear()
pt3dadd(320.65, 353.25, 13.45, 6.79)
pt3dadd(321.37, 353.25, 13.45, 6.79)
pt3dadd(321.54, 353.66, 13.45, 6.79)
pt3dadd(321.72, 354.06, 13.45, 6.79)
pt3dadd(321.9, 354.26, 13.45, 6.79)
pt3dadd(322.08, 354.47, 13.45, 6.79)
pt3dadd(322.26, 354.67, 13.45, 6.79)
pt3dadd(322.44, 354.87, 13.45, 6.79)
pt3dadd(322.61, 355.07, 13.45, 6.79)
pt3dadd(323.15, 355.07, 13.45, 6.79)
pt3dadd(323.33, 355.28, 13.45, 6.79)
pt3dadd(325.82, 355.28, 13.45, 6.79)
pt3dadd(326, 355.48, 13.45, 6.79)
pt3dadd(326.36, 355.68, 13.45, 6.79)
pt3dadd(326.54, 355.88, 13.45, 6.79)
pt3dadd(326.89, 355.88, 13.45, 6.79)
pt3dadd(327.07, 356.09, 13.45, 6.79)
pt3dadd(327.25, 356.29, 13.45, 6.79)
pt3dadd(327.43, 356.49, 13.45, 6.79)
pt3dadd(327.79, 356.69, 13.45, 6.79)
pt3dadd(327.96, 356.9, 13.45, 6.79)
pt3dadd(328.14, 357.1, 13.45, 6.79)
pt3dadd(328.5, 357.3, 13.45, 6.79)
pt3dadd(328.86, 357.5, 13.45, 6.79)
pt3dadd(329.39, 358.11, 13.45, 6.79)
pt3dadd(329.75, 358.31, 13.45, 6.79)
pt3dadd(329.93, 358.52, 13.45, 6.79)
pt3dadd(330.28, 358.72, 13.45, 6.79)
pt3dadd(330.64, 359.12, 13.45, 6.79)
pt3dadd(331, 359.33, 13.45, 6.79)
pt3dadd(331.35, 359.53, 13.45, 6.79)
pt3dadd(331.53, 359.73, 13.45, 6.79)
pt3dadd(331.71, 359.93, 13.45, 6.79)
pt3dadd(333.14, 359.93, 13.45, 6.79)
pt3dadd(332.96, 360.14, 13.45, 4.93)
pt3dadd(333.14, 360.34, 13.45, 4.93)
pt3dadd(333.49, 360.34, 13.45, 4.93)
pt3dadd(333.85, 360.54, 13.45, 4.93)
pt3dadd(346.69, 360.54, 13.45, 4.93)
pt3dadd(347.04, 360.34, 13.45, 4.93)
pt3dadd(347.4, 360.14, 13.45, 4.93)
pt3dadd(347.58, 359.93, 13.45, 4.93)
pt3dadd(347.94, 359.73, 13.45, 4.93)
pt3dadd(348.29, 359.53, 13.45, 4.93)
pt3dadd(348.65, 359.33, 13.45, 4.93)
pt3dadd(349.01, 359.12, 13.45, 4.93)
pt3dadd(349.18, 358.92, 13.45, 4.93)
pt3dadd(349.36, 358.52, 13.45, 4.93)
pt3dadd(349.54, 358.31, 13.45, 4.93)
pt3dadd(349.72, 358.11, 13.45, 4.93)
pt3dadd(350.43, 358.11, 13.45, 4.93)
pt3dadd(350.25, 358.11, 10.3, 4.93)
pt3dadd(350.61, 358.31, 10.3, 4.93)
pt3dadd(350.25, 358.52, 10.3, 4.93)
pt3dadd(355.78, 358.52, 10.3, 4.93)
pt3dadd(355.96, 358.72, 10.3, 4.93)
pt3dadd(356.5, 358.72, 10.3, 4.93)
pt3dadd(356.67, 358.92, 10.3, 4.93)
pt3dadd(356.85, 359.12, 10.3, 4.93)
pt3dadd(357.03, 359.33, 10.3, 4.93)
pt3dadd(357.39, 359.53, 10.3, 4.93)
pt3dadd(357.57, 359.73, 10.3, 4.93)
pt3dadd(357.74, 359.93, 10.3, 4.93)
pt3dadd(358.1, 359.93, 10.3, 4.93)
pt3dadd(358.28, 360.14, 10.3, 4.93)
pt3dadd(358.46, 360.14, 10.3, 4.93)
pt3dadd(358.81, 359.73, 10.3, 3.06)
pt3dadd(358.81, 360.34, 10.3, 3.06)
pt3dadd(359.17, 360.54, 10.3, 3.06)
pt3dadd(359.17, 360.95, 10.3, 3.06)
pt3dadd(359.35, 361.15, 10.3, 3.06)
pt3dadd(359.35, 361.55, 10.3, 3.06)
pt3dadd(359.53, 361.96, 10.3, 3.06)
pt3dadd(359.53, 360.95, 10.3, 3.57)
pt3dadd(359.71, 361.35, 10.3, 3.57)
pt3dadd(359.71, 363.18, 10.3, 3.57)
pt3dadd(359.88, 363.38, 10.3, 3.57)
pt3dadd(360.06, 363.78, 10.3, 3.57)
pt3dadd(360.24, 363.99, 10.3, 3.57)
pt3dadd(360.42, 364.39, 10.3, 3.57)
pt3dadd(360.6, 364.59, 10.3, 3.57)
pt3dadd(360.78, 364.8, 10.3, 3.57)
pt3dadd(360.95, 365.2, 10.3, 3.57)
pt3dadd(361.67, 366.01, 10.3, 3.57)
pt3dadd(361.85, 366.21, 10.3, 3.57)
pt3dadd(362.02, 366.42, 10.3, 3.57)
pt3dadd(362.2, 366.82, 10.3, 3.57)
pt3dadd(362.38, 367.02, 10.3, 3.57)
pt3dadd(362.56, 367.43, 10.3, 3.57)
pt3dadd(362.74, 367.83, 10.3, 3.57)
pt3dadd(363.09, 368.04, 10.3, 3.57)
pt3dadd(363.27, 368.44, 10.3, 3.57)
pt3dadd(363.45, 368.85, 10.3, 3.57)
pt3dadd(363.63, 369.25, 10.3, 3.57)
pt3dadd(363.81, 369.45, 10.3, 3.57)
pt3dadd(363.99, 369.66, 10.3, 3.57)
pt3dadd(364.34, 370.06, 10.3, 3.57)
pt3dadd(364.52, 370.26, 10.3, 3.57)
pt3dadd(364.7, 370.47, 10.3, 3.57)
pt3dadd(365.06, 370.67, 10.3, 3.57)
pt3dadd(365.23, 370.87, 10.3, 3.57)
pt3dadd(365.41, 371.28, 10.3, 3.57)
pt3dadd(365.59, 371.48, 10.3, 3.57)
pt3dadd(365.95, 371.48, 10.3, 3.57)
pt3dadd(366.13, 371.68, 10.3, 3.57)
pt3dadd(366.48, 371.68, 10.3, 3.57)
pt3dadd(366.66, 371.88, 10.3, 3.57)
pt3dadd(364.52, 370.26, 10.3, 4.25)
pt3dadd(364.7, 370.47, 10.3, 4.25)
pt3dadd(364.88, 370.67, 10.3, 4.25)
pt3dadd(365.41, 370.87, 10.3, 4.25)
pt3dadd(365.59, 371.07, 10.3, 4.25)
pt3dadd(365.95, 371.28, 10.3, 4.25)
pt3dadd(366.3, 371.28, 10.3, 4.25)
pt3dadd(366.48, 371.48, 10.3, 4.25)
pt3dadd(370.05, 371.48, 10.3, 4.25)
pt3dadd(368.8, 371.48, 8.2, 4.25)
pt3dadd(372.72, 371.48, 8.2, 4.25)
pt3dadd(373.08, 371.68, 8.2, 4.25)
pt3dadd(373.62, 371.68, 8.2, 4.25)
pt3dadd(374.15, 371.88, 8.2, 4.25)
pt3dadd(376.83, 371.88, 8.2, 4.25)
pt3dadd(377.18, 372.09, 8.2, 4.25)
pt3dadd(388.95, 372.09, 8.2, 4.25)
pt3dadd(389.13, 372.29, 8.2, 4.25)
pt3dadd(390.02, 372.29, 8.2, 4.25)
}
dend[27] {pt3dclear()
pt3dadd(390.02, 372.29, 8.2, 3.1)
pt3dadd(421.92, 277.76, 0, 3.1)
pt3dadd(451.96, 217.51, 0, 3.1)
pt3dadd(511.1, 162.17, 0, 3.1)
pt3dadd(530.61, 104.86, 0, 3.1)
pt3dadd(535.26, 78.9, 0, 3.1)
}
dend[28] {pt3dclear()
pt3dadd(390.02, 372.29, 8.2, 3.1)
pt3dadd(421.92, 377.68, 0, 3.1)
pt3dadd(474.25, 357.6, 0, 3.1)
pt3dadd(527.83, 341.43, 0, 3.1)
pt3dadd(586.36, 311.55, 0, 3.1)
pt3dadd(607.73, 270.9, 0, 3.1)
}
dend[29] {pt3dclear()
pt3dadd(341.34, 287.02, 4, 3.57)
pt3dadd(341.34, 286.82, 4, 3.57)
pt3dadd(341.52, 287.02, 4, 3.57)
pt3dadd(341.7, 287.22, 4, 3.57)
pt3dadd(341.87, 287.42, 4, 3.57)
pt3dadd(342.05, 287.63, 4, 3.57)
pt3dadd(342.23, 287.83, 4, 3.57)
pt3dadd(342.41, 288.03, 4, 3.57)
pt3dadd(342.59, 288.23, 4, 3.57)
pt3dadd(342.77, 288.44, 4, 3.57)
pt3dadd(342.94, 288.64, 4, 3.57)
pt3dadd(343.12, 289.04, 4, 3.57)
pt3dadd(343.3, 289.25, 4, 3.57)
pt3dadd(343.3, 289.65, 4, 3.57)
pt3dadd(343.48, 289.85, 4, 3.57)
pt3dadd(343.66, 290.06, 4, 3.57)
pt3dadd(343.84, 290.26, 4, 3.57)
pt3dadd(343.84, 290.66, 4, 3.57)
pt3dadd(344.01, 290.87, 4, 3.57)
pt3dadd(344.19, 291.07, 4, 3.57)
pt3dadd(344.37, 291.47, 4, 3.57)
pt3dadd(344.55, 291.68, 4, 3.57)
pt3dadd(344.55, 292.08, 4, 3.57)
pt3dadd(344.73, 292.28, 4, 3.57)
pt3dadd(345.44, 293.09, 4, 3.57)
pt3dadd(345.62, 293.3, 4, 3.57)
pt3dadd(345.97, 293.5, 4, 3.57)
pt3dadd(346.15, 293.7, 4, 3.57)
pt3dadd(346.33, 293.9, 4, 3.57)
pt3dadd(346.51, 294.11, 4, 3.57)
pt3dadd(346.87, 294.31, 4, 3.57)
pt3dadd(347.22, 294.51, 4, 3.57)
pt3dadd(347.4, 294.71, 4, 3.57)
pt3dadd(347.58, 294.92, 4, 3.57)
pt3dadd(347.94, 294.92, 4, 3.57)
pt3dadd(348.11, 295.12, 4, 3.57)
pt3dadd(348.29, 295.32, 4, 3.57)
pt3dadd(348.65, 295.32, 4, 3.57)
pt3dadd(348.83, 295.52, 4, 3.57)
pt3dadd(349.18, 295.52, 4, 3.57)
pt3dadd(349.36, 295.73, 4, 3.57)
}
}
proc shape3d_35() {
dend[29] { pt3dadd(349.9, 295.73, 4, 3.57)
pt3dadd(350.08, 295.93, 4, 3.57)
pt3dadd(350.25, 295.93, 4, 3.57)
pt3dadd(349.72, 296.94, 4, 3.57)
pt3dadd(349.9, 296.74, 4, 3.57)
pt3dadd(370.65, 309.96, 0, 3.1)
pt3dadd(379.01, 328.09, 0, 3.1)
pt3dadd(384.27, 337.39, 0, 3.1)
}
dend[30] {pt3dclear()
pt3dadd(130.02, -122.53, -0.2, 3.23)
pt3dadd(128.77, -122.33, 1.9, 3.23)
pt3dadd(115.75, -122.33, 1.9, 3.23)
pt3dadd(115.4, -122.53, 1.9, 3.23)
pt3dadd(115.22, -122.73, 1.9, 3.23)
pt3dadd(115.04, -122.94, 1.9, 3.23)
pt3dadd(114.86, -123.14, 1.9, 3.23)
pt3dadd(114.5, -123.14, 1.9, 3.23)
pt3dadd(114.33, -123.54, 1.9, 3.23)
pt3dadd(113.97, -123.95, 1.9, 3.23)
pt3dadd(113.79, -124.15, 1.9, 3.23)
pt3dadd(113.61, -124.35, 1.9, 3.23)
pt3dadd(113.43, -124.56, 1.9, 3.23)
pt3dadd(113.26, -124.76, 1.9, 3.23)
pt3dadd(113.08, -124.96, 1.9, 3.23)
pt3dadd(112.9, -125.16, 1.9, 3.23)
pt3dadd(112.72, -125.37, 1.9, 3.23)
pt3dadd(112.54, -125.57, 1.9, 3.23)
pt3dadd(112.36, -125.77, 1.9, 3.23)
pt3dadd(112.19, -125.97, 1.9, 3.23)
pt3dadd(112.19, -126.38, 1.9, 3.23)
pt3dadd(111.83, -126.58, 1.9, 3.23)
pt3dadd(111.65, -126.78, 1.9, 3.23)
pt3dadd(111.47, -126.99, 1.9, 3.23)
pt3dadd(111.29, -127.19, 1.9, 3.23)
pt3dadd(111.12, -127.39, 1.9, 3.23)
pt3dadd(110.94, -127.59, 1.9, 3.23)
pt3dadd(110.76, -127.8, 1.9, 3.23)
pt3dadd(110.58, -128, 1.9, 3.23)
pt3dadd(110.4, -128.2, 1.9, 3.23)
pt3dadd(110.22, -128.2, 1.9, 3.23)
pt3dadd(109.69, -128.61, 1.9, 2.21)
pt3dadd(109.69, -129.01, 1.9, 2.21)
pt3dadd(109.51, -129.42, 1.9, 2.21)
pt3dadd(109.15, -129.82, 1.9, 2.21)
pt3dadd(108.98, -130.02, 1.9, 2.21)
pt3dadd(108.98, -130.43, 1.9, 2.21)
pt3dadd(108.8, -130.63, 1.9, 2.21)
pt3dadd(108.62, -130.84, 1.9, 2.21)
pt3dadd(108.44, -131.04, 1.9, 2.21)
pt3dadd(108.44, -131.44, 1.9, 2.21)
pt3dadd(108.26, -131.65, 1.9, 2.21)
pt3dadd(108.26, -132.05, 1.9, 2.21)
pt3dadd(108.08, -132.25, 1.9, 2.21)
pt3dadd(107.91, -132.46, 1.9, 2.21)
pt3dadd(107.73, -132.66, 1.9, 2.21)
pt3dadd(107.55, -133.06, 1.9, 2.21)
pt3dadd(107.55, -133.47, 1.9, 2.21)
pt3dadd(107.19, -133.87, 1.9, 2.21)
pt3dadd(107.01, -134.28, 1.9, 2.21)
pt3dadd(106.84, -134.48, 1.9, 2.21)
pt3dadd(106.66, -134.89, 1.9, 2.21)
pt3dadd(106.48, -135.29, 1.9, 2.21)
pt3dadd(106.3, -135.7, 1.9, 2.21)
pt3dadd(106.12, -135.9, 1.9, 2.21)
pt3dadd(106.12, -136.51, 1.9, 2.21)
pt3dadd(105.94, -136.71, 1.9, 2.21)
pt3dadd(105.77, -137.11, 1.9, 2.21)
pt3dadd(105.59, -137.32, 1.9, 2.21)
pt3dadd(105.41, -137.52, 1.9, 2.21)
pt3dadd(105.23, -137.72, 1.9, 2.21)
pt3dadd(105.05, -137.92, 1.9, 2.21)
pt3dadd(104.87, -138.33, 1.9, 2.21)
pt3dadd(104.7, -138.73, 1.9, 2.21)
pt3dadd(104.52, -139.14, 1.9, 2.21)
pt3dadd(104.16, -139.34, 1.9, 2.21)
pt3dadd(103.98, -139.54, 1.9, 2.21)
pt3dadd(103.8, -139.75, 1.9, 2.21)
pt3dadd(103.63, -140.15, 1.9, 2.21)
pt3dadd(103.27, -140.76, 1.9, 2.21)
pt3dadd(103.09, -140.96, 1.9, 2.21)
pt3dadd(102.91, -141.37, 1.9, 2.21)
pt3dadd(102.73, -141.77, 1.9, 2.21)
pt3dadd(102.56, -141.98, 1.9, 2.21)
pt3dadd(102.38, -142.18, 1.9, 2.21)
pt3dadd(102.2, -142.38, 1.9, 2.21)
pt3dadd(102.02, -142.58, 1.9, 2.21)
pt3dadd(101.84, -142.79, 1.9, 2.21)
pt3dadd(101.66, -143.19, 1.9, 2.21)
pt3dadd(101.49, -143.39, 1.9, 2.21)
pt3dadd(101.31, -143.6, 1.9, 2.21)
pt3dadd(101.13, -143.8, 1.9, 2.21)
pt3dadd(100.95, -144, 1.9, 2.21)
pt3dadd(100.77, -144.2, 1.9, 2.21)
pt3dadd(100.59, -144.41, 1.9, 2.21)
pt3dadd(100.42, -144.61, 1.9, 2.21)
pt3dadd(100.06, -144.81, 1.9, 2.21)
pt3dadd(99.7, -145.22, 1.9, 2.21)
pt3dadd(99.52, -145.42, 1.9, 2.21)
pt3dadd(99.35, -145.62, 1.9, 2.21)
pt3dadd(99.17, -145.82, 1.9, 2.21)
pt3dadd(98.99, -146.23, 1.9, 2.21)
pt3dadd(98.81, -146.43, 1.9, 2.21)
pt3dadd(98.63, -146.63, 1.9, 2.21)
pt3dadd(98.45, -146.84, 1.9, 2.21)
pt3dadd(98.1, -146.84, 1.9, 2.21)
pt3dadd(97.92, -147.24, 1.9, 2.21)
pt3dadd(97.74, -147.44, 1.9, 2.21)
pt3dadd(97.38, -147.85, 1.9, 2.21)
pt3dadd(97.03, -148.05, 1.9, 2.21)
pt3dadd(96.85, -148.25, 1.9, 2.21)
pt3dadd(96.67, -148.46, 1.9, 2.21)
pt3dadd(96.31, -148.66, 1.9, 2.21)
pt3dadd(96.14, -148.86, 1.9, 2.21)
pt3dadd(95.78, -149.06, 1.9, 2.21)
pt3dadd(95.6, -149.47, 1.9, 2.21)
pt3dadd(95.24, -149.67, 1.9, 2.21)
pt3dadd(95.07, -149.87, 1.9, 2.21)
pt3dadd(94.89, -150.08, 1.9, 2.21)
pt3dadd(94.71, -150.28, 1.9, 2.21)
pt3dadd(94.53, -150.48, 1.9, 2.21)
pt3dadd(94.35, -150.68, 1.9, 2.21)
pt3dadd(94, -150.68, 1.9, 2.21)
pt3dadd(93.64, -150.89, 1.9, 2.21)
pt3dadd(93.46, -151.09, 1.9, 2.21)
pt3dadd(93.28, -151.29, 1.9, 2.21)
pt3dadd(93.82, -150.28, 0.85, 2.21)
pt3dadd(93.82, -150.68, 0.85, 2.21)
pt3dadd(93.64, -150.89, 0.85, 2.21)
pt3dadd(93.46, -151.09, 0.85, 2.21)
pt3dadd(93.28, -151.29, 0.85, 2.21)
pt3dadd(93.1, -151.49, 0.85, 2.21)
pt3dadd(92.93, -151.7, 0.85, 2.21)
pt3dadd(92.75, -151.9, 0.85, 2.21)
pt3dadd(92.39, -152.1, 0.85, 2.21)
pt3dadd(92.21, -152.31, 0.85, 2.21)
pt3dadd(92.03, -152.51, 0.85, 2.21)
pt3dadd(91.86, -152.71, 0.85, 2.21)
pt3dadd(91.68, -152.91, 0.85, 2.21)
pt3dadd(91.5, -153.12, 0.85, 2.21)
pt3dadd(91.32, -153.32, 0.85, 2.21)
pt3dadd(91.14, -153.72, 0.85, 2.21)
pt3dadd(90.96, -153.93, 0.85, 2.21)
pt3dadd(90.79, -154.33, 0.85, 2.21)
pt3dadd(90.61, -154.53, 0.85, 2.21)
pt3dadd(90.43, -154.74, 0.85, 2.21)
pt3dadd(90.25, -154.94, 0.85, 2.21)
pt3dadd(90.07, -155.14, 0.85, 2.21)
pt3dadd(89.89, -155.34, 0.85, 2.21)
pt3dadd(89.72, -155.55, 0.85, 2.21)
pt3dadd(89.54, -155.75, 0.85, 2.21)
pt3dadd(89.36, -155.95, 0.85, 2.21)
pt3dadd(89, -156.15, 0.85, 2.21)
pt3dadd(88.82, -156.56, 0.85, 2.21)
pt3dadd(88.65, -156.76, 0.85, 2.21)
pt3dadd(88.29, -156.96, 0.85, 2.21)
pt3dadd(88.11, -157.37, 0.85, 2.21)
pt3dadd(87.75, -157.57, 0.85, 2.21)
pt3dadd(87.58, -157.77, 0.85, 2.21)
pt3dadd(87.22, -157.98, 0.85, 2.21)
pt3dadd(86.86, -158.18, 0.85, 2.21)
pt3dadd(86.51, -158.58, 0.85, 2.21)
pt3dadd(86.15, -158.58, 0.85, 2.21)
pt3dadd(85.97, -158.79, 0.85, 2.21)
pt3dadd(85.61, -158.99, 0.85, 2.21)
pt3dadd(85.44, -159.39, 0.85, 2.21)
pt3dadd(85.08, -159.39, 0.85, 2.21)
pt3dadd(84.9, -159.6, 0.85, 2.21)
pt3dadd(84.72, -159.8, 0.85, 2.21)
pt3dadd(84.37, -160, 0.85, 2.21)
pt3dadd(84.01, -160.2, 0.85, 2.21)
pt3dadd(83.65, -160.41, 0.85, 2.21)
pt3dadd(82.94, -161.22, 0.85, 2.21)
pt3dadd(82.76, -161.42, 0.85, 2.21)
pt3dadd(82.41, -161.62, 0.85, 2.21)
pt3dadd(82.23, -161.82, 0.85, 2.21)
pt3dadd(82.05, -162.03, 0.85, 2.21)
pt3dadd(81.87, -162.23, 0.85, 2.21)
pt3dadd(81.69, -162.63, 0.85, 2.21)
pt3dadd(81.34, -162.84, 0.85, 2.21)
pt3dadd(81.16, -163.04, 0.85, 2.21)
pt3dadd(80.8, -163.24, 0.85, 2.21)
pt3dadd(80.44, -163.65, 0.85, 2.21)
pt3dadd(80.09, -163.85, 0.85, 2.21)
pt3dadd(79.73, -164.05, 0.85, 2.21)
pt3dadd(79.37, -164.46, 0.85, 2.21)
pt3dadd(79.2, -164.66, 0.85, 2.21)
pt3dadd(78.84, -164.86, 0.85, 2.21)
pt3dadd(78.48, -165.27, 0.85, 2.21)
pt3dadd(78.3, -165.47, 0.85, 2.21)
pt3dadd(77.95, -165.67, 0.85, 2.21)
pt3dadd(77.77, -165.88, 0.85, 2.21)
pt3dadd(77.59, -166.08, 0.85, 2.21)
pt3dadd(77.41, -166.48, 0.85, 2.21)
pt3dadd(77.23, -166.69, 0.85, 2.21)
pt3dadd(77.06, -167.09, 0.85, 2.21)
pt3dadd(76.7, -167.29, 0.85, 2.21)
pt3dadd(76.34, -167.7, 0.85, 2.21)
pt3dadd(76.16, -167.9, 0.85, 2.21)
pt3dadd(75.81, -168.1, 0.85, 2.21)
pt3dadd(75.63, -168.31, 0.85, 2.21)
pt3dadd(75.27, -168.51, 0.85, 2.21)
}
}
proc shape3d_36() {
dend[30] { pt3dadd(74.92, -168.71, 0.85, 2.21)
pt3dadd(74.74, -168.91, 0.85, 2.21)
pt3dadd(74.38, -169.12, 0.85, 2.21)
pt3dadd(74.2, -169.32, 0.85, 2.21)
pt3dadd(74.02, -169.52, 0.85, 2.21)
pt3dadd(73.67, -169.72, 0.85, 2.21)
pt3dadd(73.49, -169.93, 0.85, 2.21)
pt3dadd(73.31, -170.13, 0.85, 2.21)
pt3dadd(72.95, -170.33, 0.85, 2.21)
pt3dadd(72.78, -170.53, 0.85, 2.21)
pt3dadd(72.42, -170.74, 0.85, 2.21)
pt3dadd(72.06, -170.74, 0.85, 2.21)
pt3dadd(71.88, -170.94, 0.85, 2.21)
pt3dadd(71.71, -170.74, -1.25, 2.21)
pt3dadd(71.71, -171.95, -1.25, 2.21)
pt3dadd(71.53, -172.15, -1.25, 2.21)
pt3dadd(71.35, -172.36, -1.25, 2.21)
pt3dadd(71.17, -172.56, -1.25, 2.21)
pt3dadd(70.99, -172.76, -1.25, 2.21)
pt3dadd(70.81, -172.96, -1.25, 2.21)
pt3dadd(70.64, -173.17, -1.25, 2.21)
pt3dadd(70.46, -173.37, -1.25, 2.21)
pt3dadd(70.1, -173.37, -1.25, 2.21)
pt3dadd(69.92, -173.77, -1.25, 2.21)
pt3dadd(69.57, -173.98, -1.25, 2.21)
pt3dadd(69.39, -174.18, -1.25, 2.21)
pt3dadd(69.03, -174.38, -1.25, 2.21)
pt3dadd(68.85, -174.59, -1.25, 2.21)
pt3dadd(68.32, -175.19, -1.25, 2.21)
pt3dadd(68.14, -175.6, -1.25, 2.21)
pt3dadd(67.96, -175.8, -1.25, 2.21)
pt3dadd(67.78, -176, -1.25, 2.21)
pt3dadd(67.43, -176.21, -1.25, 2.21)
pt3dadd(67.25, -176.41, -1.25, 2.21)
pt3dadd(66.71, -177.02, -1.25, 2.21)
pt3dadd(66.53, -177.22, -1.25, 2.21)
pt3dadd(66.36, -177.62, -1.25, 2.21)
pt3dadd(66.18, -177.83, -1.25, 2.21)
pt3dadd(66, -178.23, -1.25, 2.21)
pt3dadd(65.64, -178.43, -1.25, 2.21)
pt3dadd(65.46, -178.84, -1.25, 2.21)
pt3dadd(65.29, -179.04, -1.25, 2.21)
pt3dadd(65.11, -179.45, -1.25, 2.21)
pt3dadd(64.57, -180.05, -1.25, 2.21)
pt3dadd(64.39, -180.46, -1.25, 2.21)
pt3dadd(64.22, -180.66, -1.25, 2.21)
pt3dadd(64.04, -180.86, -1.25, 2.21)
pt3dadd(63.86, -181.07, -1.25, 2.21)
pt3dadd(63.68, -181.47, -1.25, 2.21)
pt3dadd(63.5, -181.67, -1.25, 2.21)
pt3dadd(63.32, -181.88, -1.25, 2.21)
pt3dadd(63.15, -182.08, -1.25, 2.21)
pt3dadd(62.97, -182.28, -1.25, 2.21)
pt3dadd(62.79, -182.48, -1.25, 2.21)
pt3dadd(62.43, -182.69, -1.25, 2.21)
pt3dadd(61.9, -183.29, -1.25, 2.21)
pt3dadd(61.9, -183.5, -1.25, 2.21)
pt3dadd(61.72, -183.9, -4.4, 2.04)
pt3dadd(61.72, -184.51, -4.4, 2.04)
pt3dadd(61.54, -184.91, -4.4, 2.04)
pt3dadd(61.36, -185.12, -4.4, 2.04)
pt3dadd(61.36, -185.52, -4.4, 2.04)
pt3dadd(61.18, -185.73, -4.4, 2.04)
pt3dadd(61.18, -186.13, -4.4, 2.04)
pt3dadd(61.01, -186.33, -4.4, 2.04)
pt3dadd(61.01, -186.74, -4.4, 2.04)
pt3dadd(60.83, -186.94, -4.4, 2.04)
pt3dadd(60.65, -187.14, -4.4, 2.04)
pt3dadd(60.65, -187.75, -4.4, 2.04)
pt3dadd(60.47, -187.95, -4.4, 2.04)
pt3dadd(60.29, -188.36, -4.4, 2.04)
pt3dadd(60.29, -188.76, -4.4, 2.04)
pt3dadd(60.11, -188.97, -4.4, 2.04)
pt3dadd(59.94, -189.17, -4.4, 2.04)
pt3dadd(59.94, -189.57, -4.4, 2.04)
pt3dadd(59.76, -189.78, -4.4, 2.04)
pt3dadd(59.58, -190.18, -4.4, 2.04)
pt3dadd(59.4, -190.38, -4.4, 2.04)
pt3dadd(59.22, -190.79, -4.4, 2.04)
pt3dadd(59.04, -190.99, -4.4, 2.04)
pt3dadd(58.87, -191.4, -4.4, 2.04)
pt3dadd(58.69, -191.6, -4.4, 2.04)
pt3dadd(58.69, -192.21, -4.4, 2.04)
pt3dadd(58.51, -192.81, -4.4, 2.04)
pt3dadd(58.33, -193.22, -4.4, 2.04)
pt3dadd(58.15, -193.62, -4.4, 2.04)
pt3dadd(57.64, -193.5, -4.4, 2.04)
}
dend[31] {pt3dclear()
pt3dadd(57.64, -193.5, -4.4, 2.04)
pt3dadd(57.97, -194.23, -4.4, 2.04)
pt3dadd(57.97, -194.64, -4.4, 2.04)
pt3dadd(57.8, -195.04, -4.4, 2.04)
pt3dadd(57.8, -195.65, -4.4, 2.04)
pt3dadd(57.62, -195.85, -4.4, 2.04)
pt3dadd(57.62, -196.26, -4.4, 2.04)
pt3dadd(57.44, -196.66, -4.4, 2.04)
pt3dadd(57.44, -197.47, -4.4, 2.04)
pt3dadd(57.26, -197.88, -4.4, 2.04)
pt3dadd(57.08, -198.28, -4.4, 2.04)
pt3dadd(57.08, -199.09, -4.4, 2.04)
pt3dadd(56.9, -199.5, -4.4, 2.04)
pt3dadd(56.9, -200.51, -4.4, 2.04)
pt3dadd(56.13, -201.12, -4.4, 2.04)
pt3dadd(56.73, -204.56, -4.4, 2.04)
pt3dadd(56.55, -204.76, -4.4, 2.04)
pt3dadd(56.55, -205.37, -4.4, 2.04)
pt3dadd(56.73, -203.95, -9.65, 2.04)
}
dend[32] {pt3dclear()
pt3dadd(57.64, -193.5, -4.4, 1.36)
pt3dadd(51.53, -195.81, 27.7, 1.36)
pt3dadd(45.01, -195.51, 27.7, 1.87)
pt3dadd(44.84, -195.7, 27.7, 1.87)
pt3dadd(45.86, -195.22, 13.7, 1.87)
pt3dadd(44.16, -195.22, 13.7, 1.87)
pt3dadd(43.99, -195.41, 13.7, 1.87)
pt3dadd(41.1, -195.41, 13.7, 1.87)
pt3dadd(40.93, -195.6, 13.7, 1.87)
pt3dadd(40.08, -195.6, 13.7, 1.87)
pt3dadd(39.74, -195.79, 13.7, 1.87)
pt3dadd(38.55, -195.79, 13.7, 1.87)
pt3dadd(38.04, -195.99, 13.7, 1.87)
pt3dadd(36.18, -195.99, 13.7, 1.87)
pt3dadd(36.01, -196.18, 13.7, 1.87)
pt3dadd(33.12, -196.18, 13.7, 1.87)
pt3dadd(32.95, -196.37, 13.7, 1.87)
pt3dadd(32.61, -196.37, 13.7, 1.87)
pt3dadd(32.27, -196.57, 13.7, 1.87)
pt3dadd(31.93, -196.57, 13.7, 1.87)
pt3dadd(31.76, -196.76, 13.7, 1.87)
pt3dadd(31.42, -196.76, 13.7, 1.87)
pt3dadd(31.08, -196.95, 13.7, 1.87)
pt3dadd(30.74, -197.14, 13.7, 1.87)
pt3dadd(30.4, -197.34, 13.7, 1.87)
pt3dadd(30.06, -197.53, 13.7, 1.87)
pt3dadd(29.72, -197.72, 13.7, 1.87)
pt3dadd(29.38, -197.72, 13.7, 1.87)
pt3dadd(28.87, -198.11, 13.7, 1.87)
pt3dadd(28.53, -198.11, 13.7, 1.87)
pt3dadd(28.36, -198.3, 13.7, 1.87)
pt3dadd(28.19, -198.5, 13.7, 1.87)
pt3dadd(27.68, -198.69, 13.7, 1.87)
pt3dadd(27.34, -198.88, 13.7, 1.87)
pt3dadd(26.83, -198.88, 13.7, 1.87)
pt3dadd(26.5, -199.07, 13.7, 1.87)
pt3dadd(26.16, -199.46, 13.7, 1.87)
pt3dadd(25.82, -199.46, 13.7, 1.87)
pt3dadd(25.65, -199.65, 13.7, 1.87)
pt3dadd(25.14, -199.85, 13.7, 1.87)
pt3dadd(24.63, -199.85, 13.7, 1.87)
pt3dadd(24.29, -200.04, 13.7, 1.87)
pt3dadd(23.78, -200.23, 13.7, 1.87)
pt3dadd(23.44, -200.42, 13.7, 1.87)
pt3dadd(23.1, -200.62, 13.7, 1.87)
pt3dadd(22.93, -201, 13.7, 1.87)
pt3dadd(22.76, -201.2, 13.7, 1.87)
pt3dadd(22.42, -201.39, 13.7, 1.87)
pt3dadd(21.91, -201.77, 13.7, 1.87)
pt3dadd(21.06, -202.74, 13.7, 1.87)
pt3dadd(20.72, -203.12, 13.7, 1.87)
pt3dadd(20.38, -203.32, 13.7, 1.87)
pt3dadd(20.04, -203.51, 13.7, 1.87)
pt3dadd(19.87, -203.9, 13.7, 1.87)
pt3dadd(19.53, -204.28, 13.7, 1.87)
pt3dadd(19.19, -204.67, 13.7, 1.87)
pt3dadd(19.02, -205.05, 13.7, 1.87)
pt3dadd(18.68, -205.44, 13.7, 1.87)
pt3dadd(18.51, -205.83, 13.7, 1.87)
pt3dadd(18.17, -206.21, 13.7, 1.87)
pt3dadd(17.83, -206.6, 13.7, 1.87)
pt3dadd(17.66, -207.18, 13.7, 1.87)
pt3dadd(17.32, -207.75, 13.7, 1.87)
pt3dadd(16.98, -208.14, 13.7, 1.87)
pt3dadd(16.81, -208.53, 13.7, 1.87)
pt3dadd(16.64, -208.91, 13.7, 1.87)
pt3dadd(16.31, -209.49, 13.7, 1.87)
pt3dadd(15.97, -210.07, 13.7, 1.87)
pt3dadd(15.8, -210.46, 13.7, 1.87)
pt3dadd(15.63, -210.84, 13.7, 1.87)
pt3dadd(15.29, -211.61, 13.7, 1.87)
pt3dadd(14.95, -212.19, 13.7, 1.87)
pt3dadd(14.78, -212.58, 13.7, 1.87)
pt3dadd(14.61, -213.16, 13.7, 1.87)
pt3dadd(14.1, -213.73, 13.7, 1.87)
pt3dadd(13.76, -214.31, 13.7, 1.87)
pt3dadd(13.76, -214.89, 13.7, 1.87)
pt3dadd(13.25, -215.47, 13.7, 1.87)
pt3dadd(12.91, -216.44, 13.7, 1.87)
pt3dadd(12.57, -217.01, 13.7, 1.87)
pt3dadd(12.23, -217.59, 13.7, 1.87)
pt3dadd(12.06, -218.17, 13.7, 1.87)
pt3dadd(11.72, -218.56, 13.7, 1.87)
pt3dadd(11.38, -218.94, 13.7, 1.87)
pt3dadd(11.21, -219.33, 13.7, 1.87)
pt3dadd(10.87, -219.71, 13.7, 1.87)
pt3dadd(10.53, -220.29, 13.7, 1.87)
pt3dadd(10.36, -220.68, 13.7, 1.87)
pt3dadd(9.85, -221.26, 13.7, 1.87)
pt3dadd(9.68, -222.03, 13.7, 1.87)
pt3dadd(9.34, -222.61, 13.7, 1.87)
pt3dadd(9, -222.99, 13.7, 1.87)
pt3dadd(8.83, -223.38, 13.7, 1.87)
pt3dadd(8.32, -223.77, 13.7, 1.87)
}
}
proc shape3d_37() {
dend[32] { pt3dadd(8.15, -224.15, 13.7, 1.87)
pt3dadd(7.81, -224.54, 13.7, 1.87)
pt3dadd(7.13, -225.12, 13.7, 1.87)
pt3dadd(6.79, -225.31, 13.7, 1.87)
pt3dadd(6.62, -225.69, 13.7, 1.87)
pt3dadd(6.11, -226.27, 13.7, 1.87)
pt3dadd(5.78, -226.47, 13.7, 1.87)
pt3dadd(5.27, -227.04, 13.7, 1.87)
pt3dadd(4.59, -227.62, 13.7, 1.87)
pt3dadd(4.25, -227.82, 13.7, 1.87)
pt3dadd(4.08, -228.2, 13.7, 1.87)
pt3dadd(3.57, -228.59, 13.7, 1.87)
pt3dadd(3.23, -228.78, 13.7, 1.87)
pt3dadd(2.89, -229.17, 13.7, 1.87)
pt3dadd(2.55, -229.55, 13.7, 1.87)
pt3dadd(2.21, -229.75, 13.7, 1.87)
pt3dadd(1.87, -229.75, 13.7, 1.87)
pt3dadd(1.53, -229.94, 13.7, 1.87)
pt3dadd(1.36, -230.13, 13.7, 1.87)
pt3dadd(0.85, -230.13, 13.7, 1.87)
pt3dadd(0.68, -230.32, 13.7, 1.87)
pt3dadd(0.17, -230.32, 13.7, 1.87)
pt3dadd(0.17, -230.13, 13.7, 1.87)
pt3dadd(-0.17, -230.23, 17.7, 1.87)
pt3dadd(-0.85, -230.23, 17.7, 1.87)
pt3dadd(-1.19, -230.42, 17.7, 1.87)
pt3dadd(-1.7, -230.61, 17.7, 1.87)
pt3dadd(-2.04, -230.81, 17.7, 1.87)
pt3dadd(-2.38, -230.81, 17.7, 1.87)
pt3dadd(-2.72, -231, 17.7, 1.87)
pt3dadd(-4.58, -231, 17.7, 1.87)
pt3dadd(-5.09, -231.19, 17.7, 1.87)
pt3dadd(-10.02, -231.19, 17.7, 1.87)
pt3dadd(-10.53, -231.58, 17.7, 1.87)
pt3dadd(-11.21, -231.58, 17.7, 1.87)
pt3dadd(-11.38, -231.77, 17.7, 1.87)
pt3dadd(-11.72, -231.96, 17.7, 1.87)
pt3dadd(-12.06, -232.16, 17.7, 1.87)
pt3dadd(-12.4, -232.35, 17.7, 1.87)
pt3dadd(-12.74, -232.54, 17.7, 1.87)
pt3dadd(-13.08, -232.93, 17.7, 1.87)
pt3dadd(-13.42, -232.93, 17.7, 1.87)
pt3dadd(-13.76, -233.12, 17.7, 1.87)
pt3dadd(-14.27, -233.51, 17.7, 1.87)
pt3dadd(-14.44, -233.89, 17.7, 1.87)
pt3dadd(-14.78, -234.28, 17.7, 1.87)
pt3dadd(-15.11, -234.47, 17.7, 1.87)
pt3dadd(-15.45, -234.66, 17.7, 1.87)
pt3dadd(-15.62, -235.05, 17.7, 1.87)
pt3dadd(-15.79, -235.24, 17.7, 1.87)
pt3dadd(-16.13, -235.44, 17.7, 1.87)
pt3dadd(-16.47, -235.82, 17.7, 1.87)
pt3dadd(-16.81, -236.21, 17.7, 1.87)
pt3dadd(-17.32, -236.79, 17.7, 1.87)
pt3dadd(-17.49, -237.17, 17.7, 1.87)
pt3dadd(-17.83, -237.56, 17.7, 1.87)
pt3dadd(-18.17, -237.75, 17.7, 1.87)
pt3dadd(-18.68, -238.14, 17.7, 1.87)
pt3dadd(-19.02, -238.52, 17.7, 1.87)
pt3dadd(-19.36, -239.1, 17.7, 1.87)
pt3dadd(-19.53, -239.49, 17.7, 1.87)
pt3dadd(-19.87, -239.87, 17.7, 1.87)
pt3dadd(-20.04, -240.07, 17.7, 1.87)
pt3dadd(-20.38, -240.26, 17.7, 1.87)
pt3dadd(-20.55, -240.64, 17.7, 1.87)
pt3dadd(-20.89, -241.03, 17.7, 1.87)
pt3dadd(-21.06, -241.42, 17.7, 1.87)
pt3dadd(-21.57, -241.8, 17.7, 1.87)
pt3dadd(-22.25, -242.57, 17.7, 1.87)
pt3dadd(-22.76, -243.34, 17.7, 1.87)
pt3dadd(-23.1, -243.73, 17.7, 1.87)
pt3dadd(-23.44, -244.12, 17.7, 1.87)
pt3dadd(-23.61, -244.5, 17.7, 1.87)
pt3dadd(-23.95, -244.89, 17.7, 1.87)
pt3dadd(-24.12, -245.08, 17.7, 1.87)
pt3dadd(-24.46, -245.47, 17.7, 1.87)
pt3dadd(-24.8, -245.85, 17.7, 1.87)
pt3dadd(-25.64, -246.82, 17.7, 1.87)
pt3dadd(-25.81, -247.01, 17.7, 1.87)
pt3dadd(-26.15, -247.4, 17.7, 1.87)
pt3dadd(-27, -247.97, 17.7, 1.87)
pt3dadd(-27.51, -248.55, 17.7, 1.87)
pt3dadd(-27.85, -248.94, 17.7, 1.87)
pt3dadd(-28.19, -249.13, 17.7, 1.87)
pt3dadd(-28.53, -249.32, 17.7, 1.87)
pt3dadd(-28.7, -249.52, 17.7, 1.87)
pt3dadd(-28.87, -249.71, 17.7, 1.87)
pt3dadd(-29.21, -249.9, 17.7, 1.87)
pt3dadd(-29.38, -250.1, 17.7, 1.87)
pt3dadd(-29.72, -250.48, 17.7, 1.87)
pt3dadd(-30.06, -250.68, 17.7, 1.87)
pt3dadd(-30.57, -251.25, 17.7, 1.87)
pt3dadd(-30.74, -251.45, 17.7, 1.87)
pt3dadd(-31.08, -251.83, 17.7, 1.87)
pt3dadd(-31.42, -252.22, 17.7, 1.87)
pt3dadd(-31.76, -252.6, 17.7, 1.87)
pt3dadd(-31.93, -252.99, 17.7, 1.87)
pt3dadd(-32.27, -253.18, 17.7, 1.87)
pt3dadd(-32.78, -253.57, 17.7, 1.87)
pt3dadd(-33.12, -253.95, 17.7, 1.87)
pt3dadd(-33.46, -254.34, 17.7, 1.87)
pt3dadd(-33.8, -254.73, 17.7, 1.87)
pt3dadd(-34.14, -254.92, 17.7, 1.87)
pt3dadd(-34.31, -255.11, 17.7, 1.87)
pt3dadd(-34.48, -255.3, 17.7, 1.87)
pt3dadd(-34.82, -255.5, 17.7, 1.87)
pt3dadd(-35.16, -255.69, 17.7, 1.87)
pt3dadd(-35.83, -256.08, 17.7, 1.87)
pt3dadd(-36.68, -256.85, 17.7, 1.87)
pt3dadd(-38.04, -257.62, 17.7, 1.87)
pt3dadd(-39.4, -258.58, 17.7, 1.87)
pt3dadd(-40.76, -259.36, 17.7, 1.87)
pt3dadd(-42.12, -260.13, 17.7, 1.87)
pt3dadd(-43.48, -260.51, 17.7, 1.87)
pt3dadd(-44.33, -261.09, 17.7, 1.87)
pt3dadd(-45.18, -261.67, 17.7, 1.87)
pt3dadd(-45.69, -261.86, 17.7, 1.87)
pt3dadd(-46.19, -262.06, 17.7, 1.87)
pt3dadd(-46.53, -262.25, 17.7, 1.87)
pt3dadd(-47.04, -262.44, 17.7, 1.87)
pt3dadd(-47.55, -262.63, 17.7, 1.87)
pt3dadd(-48.06, -263.02, 17.7, 1.87)
pt3dadd(-48.57, -263.02, 17.7, 1.87)
pt3dadd(-48.91, -263.21, 17.7, 1.87)
pt3dadd(-48.23, -262.92, 20.7, 1.53)
pt3dadd(-49.42, -262.92, 20.7, 1.53)
pt3dadd(-49.59, -263.12, 20.7, 1.53)
pt3dadd(-49.93, -263.31, 20.7, 1.53)
pt3dadd(-50.1, -263.5, 20.7, 1.53)
pt3dadd(-50.44, -263.5, 20.7, 1.53)
pt3dadd(-50.78, -263.7, 20.7, 1.53)
pt3dadd(-51.29, -263.7, 20.7, 1.53)
pt3dadd(-51.46, -263.89, 20.7, 1.53)
pt3dadd(-51.63, -264.08, 20.7, 1.53)
pt3dadd(-51.97, -264.27, 20.7, 1.53)
pt3dadd(-52.31, -264.27, 20.7, 1.53)
pt3dadd(-52.48, -264.47, 20.7, 1.53)
pt3dadd(-52.82, -264.66, 20.7, 1.53)
pt3dadd(-53.33, -264.85, 20.7, 1.53)
pt3dadd(-53.67, -265.05, 20.7, 1.53)
pt3dadd(-55.37, -265.05, 20.7, 1.53)
pt3dadd(-55.71, -265.24, 20.7, 1.53)
pt3dadd(-56.05, -265.43, 20.7, 1.53)
pt3dadd(-57.74, -265.43, 20.7, 1.53)
pt3dadd(-58.08, -265.62, 20.7, 1.53)
pt3dadd(-58.59, -265.82, 20.7, 1.53)
pt3dadd(-59.1, -266.01, 20.7, 1.53)
pt3dadd(-59.44, -266.01, 20.7, 1.53)
pt3dadd(-59.95, -266.2, 20.7, 1.53)
pt3dadd(-60.46, -266.4, 20.7, 1.53)
pt3dadd(-60.8, -266.59, 20.7, 1.53)
pt3dadd(-62.16, -266.59, 20.7, 1.53)
pt3dadd(-62.5, -266.78, 20.7, 1.53)
pt3dadd(-63.18, -266.78, 20.7, 1.53)
pt3dadd(-63.52, -266.98, 20.7, 1.53)
pt3dadd(-64.2, -266.98, 20.7, 1.53)
pt3dadd(-64.54, -267.17, 20.7, 1.53)
pt3dadd(-64.88, -267.36, 20.7, 1.53)
pt3dadd(-66.75, -267.36, 20.7, 1.53)
pt3dadd(-67.08, -267.55, 20.7, 1.53)
pt3dadd(-67.59, -267.55, 20.7, 1.53)
pt3dadd(-66.92, -267.65, 15.7, 1.53)
pt3dadd(-74.05, -267.65, 15.7, 1.53)
pt3dadd(-74.05, -267.94, 15.7, 1.53)
pt3dadd(-74.73, -267.94, 15.7, 1.53)
pt3dadd(-74.9, -267.75, 15.7, 1.53)
pt3dadd(-75.41, -267.75, 15.7, 1.53)
pt3dadd(-75.58, -267.55, 15.7, 1.53)
pt3dadd(-76.09, -267.55, 15.7, 1.53)
pt3dadd(-76.26, -267.36, 15.7, 1.53)
pt3dadd(-84.07, -267.36, 15.7, 1.53)
pt3dadd(-84.41, -267.55, 15.7, 1.53)
pt3dadd(-84.75, -267.75, 15.7, 1.53)
pt3dadd(-85.09, -268.13, 15.7, 1.53)
pt3dadd(-85.43, -268.33, 15.7, 1.53)
pt3dadd(-85.6, -268.52, 15.7, 1.53)
pt3dadd(-85.94, -268.71, 15.7, 1.53)
pt3dadd(-86.28, -269.1, 15.7, 1.53)
pt3dadd(-86.62, -269.29, 15.7, 1.53)
pt3dadd(-86.96, -269.68, 15.7, 1.53)
pt3dadd(-87.13, -269.87, 15.7, 1.53)
pt3dadd(-87.47, -270.25, 15.7, 1.53)
pt3dadd(-87.8, -270.25, 15.7, 1.53)
pt3dadd(-88.14, -270.64, 15.7, 1.53)
pt3dadd(-88.65, -271.03, 15.7, 1.53)
pt3dadd(-88.99, -271.22, 15.7, 1.53)
pt3dadd(-89.33, -271.41, 15.7, 1.53)
pt3dadd(-90.01, -272.18, 15.7, 1.53)
pt3dadd(-90.35, -272.57, 15.7, 1.53)
pt3dadd(-90.69, -272.76, 15.7, 1.53)
pt3dadd(-91.2, -273.15, 15.7, 1.53)
pt3dadd(-91.54, -273.53, 15.7, 1.53)
pt3dadd(-91.88, -273.73, 15.7, 1.53)
pt3dadd(-92.05, -274.31, 15.7, 1.53)
pt3dadd(-92.39, -274.31, 15.7, 1.53)
pt3dadd(-92.56, -274.5, 15.7, 1.53)
pt3dadd(-92.9, -274.88, 15.7, 1.53)
pt3dadd(-93.24, -275.27, 15.7, 1.53)
pt3dadd(-93.41, -275.46, 15.7, 1.53)
pt3dadd(-93.58, -275.85, 15.7, 1.53)
}
}
proc shape3d_38() {
dend[32] { pt3dadd(-93.92, -276.04, 15.7, 1.53)
pt3dadd(-94.26, -276.43, 15.7, 1.53)
pt3dadd(-94.6, -276.81, 15.7, 1.53)
pt3dadd(-94.94, -277.2, 15.7, 1.53)
pt3dadd(-95.45, -277.78, 15.7, 1.53)
pt3dadd(-95.79, -278.16, 15.7, 1.53)
pt3dadd(-96.13, -278.55, 15.7, 1.53)
pt3dadd(-96.64, -279.13, 15.7, 1.53)
pt3dadd(-96.81, -279.51, 15.7, 1.53)
pt3dadd(-97.15, -279.71, 15.7, 1.53)
pt3dadd(-97.49, -280.29, 15.7, 1.53)
pt3dadd(-97.83, -280.86, 15.7, 1.53)
pt3dadd(-98.17, -281.25, 15.7, 1.53)
pt3dadd(-98.67, -281.64, 15.7, 1.53)
pt3dadd(-99.01, -282.21, 15.7, 1.53)
pt3dadd(-99.35, -282.6, 15.7, 1.53)
pt3dadd(-99.69, -282.99, 15.7, 1.53)
pt3dadd(-100.03, -283.37, 15.7, 1.53)
pt3dadd(-100.37, -283.95, 15.7, 1.53)
pt3dadd(-100.88, -284.53, 15.7, 1.53)
pt3dadd(-101.05, -284.91, 15.7, 1.53)
pt3dadd(-101.39, -285.3, 15.7, 1.53)
pt3dadd(-101.73, -285.69, 15.7, 1.53)
pt3dadd(-101.9, -286.07, 15.7, 1.53)
pt3dadd(-102.41, -286.65, 15.7, 1.53)
pt3dadd(-102.58, -287.23, 15.7, 1.53)
pt3dadd(-102.92, -287.62, 15.7, 1.53)
pt3dadd(-103.26, -288.19, 15.7, 1.53)
pt3dadd(-103.6, -288.58, 15.7, 1.53)
pt3dadd(-103.94, -288.97, 15.7, 1.53)
pt3dadd(-104.11, -289.35, 15.7, 1.53)
pt3dadd(-104.45, -289.74, 15.7, 1.53)
pt3dadd(-104.62, -290.12, 15.7, 1.53)
pt3dadd(-104.96, -290.51, 15.7, 1.53)
pt3dadd(-105.3, -291.09, 15.7, 1.53)
pt3dadd(-105.64, -291.86, 15.7, 1.53)
pt3dadd(-105.98, -292.63, 15.7, 1.53)
pt3dadd(-106.15, -293.21, 15.7, 1.53)
pt3dadd(-106.49, -293.79, 15.7, 1.53)
pt3dadd(-106.83, -294.37, 15.7, 1.53)
pt3dadd(-107.17, -294.75, 15.7, 1.53)
pt3dadd(-107.34, -294.95, 15.7, 1.53)
pt3dadd(-107.51, -295.14, 15.7, 1.53)
}
dend[33] {pt3dclear()
pt3dadd(57.64, -193.5, -4.4, 2.4)
pt3dadd(53.14, -216.76, -16.75, 2.4)
pt3dadd(38.43, -247.61, -16.75, 2.4)
pt3dadd(12.93, -286.06, -16.75, 2.4)
pt3dadd(-19.19, -343.49, -16.75, 2.4)
pt3dadd(-54.9, -388.58, -16.75, 2.4)
}
dend[34] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(249.5, 360.74, -57.75, 6.79)
pt3dadd(250.75, 360.95, -57.75, 6.79)
pt3dadd(248.43, 360.95, -57.75, 6.79)
pt3dadd(247.89, 360.74, -57.75, 6.79)
pt3dadd(247.54, 360.54, -57.75, 6.79)
pt3dadd(247, 360.34, -57.75, 6.79)
pt3dadd(246.65, 360.14, -57.75, 6.79)
pt3dadd(246.29, 359.93, -57.75, 6.79)
pt3dadd(245.4, 359.93, -57.75, 6.79)
pt3dadd(245.22, 359.73, -57.75, 6.79)
pt3dadd(244.86, 359.53, -57.75, 6.79)
pt3dadd(244.15, 359.53, -57.75, 6.79)
pt3dadd(243.97, 359.33, -57.75, 6.79)
pt3dadd(243.61, 359.33, -57.75, 6.79)
pt3dadd(243.26, 359.12, -57.75, 6.79)
pt3dadd(242.9, 358.92, -57.75, 6.79)
pt3dadd(242.54, 358.92, -57.75, 6.79)
pt3dadd(242.19, 358.72, -57.75, 6.79)
pt3dadd(241.83, 358.31, -57.75, 6.79)
pt3dadd(241.47, 358.11, -57.75, 6.79)
pt3dadd(240.94, 357.91, -57.75, 6.79)
pt3dadd(240.4, 357.5, -57.75, 6.79)
pt3dadd(240.23, 357.3, -57.75, 6.79)
pt3dadd(239.69, 357.1, -57.75, 6.79)
pt3dadd(239.33, 356.9, -57.75, 6.79)
pt3dadd(239.16, 356.69, -57.75, 6.79)
pt3dadd(238.8, 356.49, -57.75, 6.79)
pt3dadd(238.09, 356.49, -57.75, 6.79)
pt3dadd(237.91, 356.29, -57.75, 6.79)
pt3dadd(237.55, 356.29, -57.75, 6.79)
pt3dadd(237.37, 356.09, -57.75, 6.79)
pt3dadd(237.19, 355.88, -57.75, 6.79)
pt3dadd(236.66, 355.88, -57.75, 6.79)
pt3dadd(236.48, 355.68, -57.75, 6.79)
pt3dadd(235.77, 355.68, -57.75, 6.79)
pt3dadd(235.59, 355.48, -57.75, 6.79)
pt3dadd(235.41, 355.28, -57.75, 6.79)
pt3dadd(235.05, 355.07, -57.75, 6.79)
pt3dadd(234.7, 354.87, -57.75, 6.79)
pt3dadd(234.52, 354.67, -57.75, 6.79)
pt3dadd(234.16, 354.67, -57.75, 6.79)
pt3dadd(233.98, 354.47, -57.75, 6.79)
pt3dadd(233.81, 354.26, -57.75, 6.79)
pt3dadd(233.27, 353.66, -57.75, 6.79)
pt3dadd(233.09, 353.45, -57.75, 6.79)
pt3dadd(232.91, 353.25, -57.75, 6.79)
pt3dadd(232.74, 353.05, -57.75, 6.79)
pt3dadd(232.56, 352.64, -57.75, 6.79)
pt3dadd(232.2, 352.24, -57.75, 6.79)
pt3dadd(232.02, 352.04, -57.75, 6.79)
pt3dadd(229.7, 352.64, -57.75, 6.79)
}
dend[35] {pt3dclear()
pt3dadd(229.7, 352.64, -57.75, 6.79)
pt3dadd(231.31, 351.22, -57.75, 6.79)
pt3dadd(231.13, 351.02, -57.75, 6.79)
pt3dadd(230.95, 350.62, -57.75, 6.79)
pt3dadd(230.6, 350.62, -57.75, 6.79)
pt3dadd(230.42, 350.41, -57.75, 6.79)
pt3dadd(230.24, 350.01, -57.75, 6.79)
pt3dadd(229.88, 349.81, -57.75, 6.79)
pt3dadd(229.7, 349.6, -57.75, 6.79)
pt3dadd(229.53, 349.4, -57.75, 6.79)
pt3dadd(229.35, 349.2, -57.75, 6.79)
pt3dadd(229.17, 349, -57.75, 6.79)
pt3dadd(228.81, 349, -57.75, 6.79)
pt3dadd(228.63, 348.79, -57.75, 6.79)
pt3dadd(228.28, 348.59, -57.75, 6.79)
pt3dadd(228.1, 348.39, -57.75, 6.79)
pt3dadd(227.74, 348.19, -57.75, 6.79)
pt3dadd(227.56, 347.98, -57.75, 6.79)
pt3dadd(227.39, 347.78, -57.75, 6.79)
pt3dadd(227.03, 347.58, -57.75, 6.79)
pt3dadd(226.85, 347.38, -57.75, 6.79)
pt3dadd(226.67, 347.17, -57.75, 6.79)
pt3dadd(226.32, 346.97, -57.75, 6.79)
pt3dadd(226.14, 346.77, -57.75, 6.79)
pt3dadd(225.78, 346.57, -57.75, 6.79)
pt3dadd(225.6, 346.36, -57.75, 6.79)
pt3dadd(225.25, 346.16, -57.75, 6.79)
pt3dadd(224.89, 345.96, -57.75, 6.79)
pt3dadd(224.71, 345.76, -57.75, 6.79)
pt3dadd(224.53, 345.55, -57.75, 6.79)
pt3dadd(224.35, 345.35, -57.75, 6.79)
pt3dadd(224.18, 345.15, -57.75, 6.79)
pt3dadd(224, 344.95, -57.75, 6.79)
pt3dadd(223.82, 344.74, -57.75, 6.79)
pt3dadd(223.64, 344.54, -57.75, 6.79)
pt3dadd(223.46, 344.34, -57.75, 6.79)
pt3dadd(223.28, 344.14, -57.75, 6.79)
pt3dadd(223.11, 343.73, -57.75, 6.79)
pt3dadd(222.93, 343.53, -57.75, 6.79)
pt3dadd(222.75, 343.33, -57.75, 6.79)
pt3dadd(222.57, 342.92, -57.75, 6.79)
pt3dadd(222.57, 342.52, -57.75, 6.79)
pt3dadd(222.39, 342.31, -57.75, 6.79)
pt3dadd(222.21, 341.91, -57.75, 6.79)
pt3dadd(222.04, 341.5, -57.75, 6.79)
pt3dadd(222.04, 341.1, -57.75, 6.79)
pt3dadd(221.86, 340.69, -57.75, 6.79)
pt3dadd(221.68, 340.49, -57.75, 6.79)
pt3dadd(221.5, 339.88, -57.75, 6.79)
pt3dadd(221.32, 339.68, -57.75, 6.79)
pt3dadd(221.14, 339.27, -57.75, 6.79)
pt3dadd(220.97, 339.07, -57.75, 6.79)
pt3dadd(220.79, 338.67, -57.75, 6.79)
pt3dadd(220.61, 338.26, -57.75, 6.79)
pt3dadd(220.61, 337.86, -57.75, 6.79)
pt3dadd(220.25, 337.65, -57.75, 6.79)
pt3dadd(220.07, 337.25, -57.75, 6.79)
pt3dadd(219.72, 336.84, -57.75, 6.79)
pt3dadd(219.54, 336.44, -57.75, 6.79)
pt3dadd(219.36, 336.03, -57.75, 6.79)
pt3dadd(219.18, 335.63, -57.75, 6.79)
pt3dadd(219, 335.43, -57.75, 6.79)
pt3dadd(218.83, 335.22, -57.75, 6.79)
pt3dadd(218.47, 334.82, -57.75, 6.79)
pt3dadd(218.47, 334.41, -57.75, 6.79)
pt3dadd(218.11, 334.21, -57.75, 6.79)
pt3dadd(217.76, 333.6, -57.75, 6.79)
pt3dadd(217.58, 333.2, -57.75, 6.79)
pt3dadd(217.4, 333, -57.75, 6.79)
pt3dadd(217.22, 332.79, -57.75, 6.79)
pt3dadd(217.04, 332.39, -57.75, 6.79)
pt3dadd(216.86, 331.98, -57.75, 6.79)
pt3dadd(216.69, 331.78, -57.75, 6.79)
pt3dadd(216.51, 331.38, -57.75, 6.79)
pt3dadd(216.33, 330.97, -57.75, 6.79)
pt3dadd(216.15, 330.77, -57.75, 6.79)
pt3dadd(215.97, 330.36, -57.75, 6.79)
pt3dadd(215.79, 329.96, -57.75, 6.79)
pt3dadd(215.44, 329.55, -57.75, 6.79)
pt3dadd(215.26, 329.35, -57.75, 6.79)
pt3dadd(215.08, 329.15, -57.75, 6.79)
pt3dadd(214.9, 328.74, -57.75, 6.79)
pt3dadd(214.72, 328.34, -57.75, 6.79)
pt3dadd(214.55, 328.13, -57.75, 6.79)
pt3dadd(214.19, 327.73, -57.75, 6.79)
pt3dadd(214.01, 327.32, -57.75, 6.79)
pt3dadd(213.83, 326.92, -57.75, 6.79)
pt3dadd(213.65, 326.51, -57.75, 6.79)
pt3dadd(213.48, 326.31, -57.75, 6.79)
pt3dadd(213.12, 325.7, -57.75, 6.79)
pt3dadd(212.94, 325.3, -57.75, 6.79)
pt3dadd(212.58, 324.89, -57.75, 6.79)
pt3dadd(212.41, 324.69, -57.75, 6.79)
pt3dadd(212.23, 324.29, -57.75, 6.79)
pt3dadd(212.05, 323.88, -57.75, 6.79)
pt3dadd(211.87, 323.68, -57.75, 6.79)
pt3dadd(211.52, 323.27, -57.75, 6.79)
pt3dadd(211.52, 322.87, -57.75, 6.79)
pt3dadd(211.34, 322.67, -57.75, 6.79)
}
}
proc shape3d_39() {
dend[35] { pt3dadd(211.16, 322.26, -57.75, 6.79)
pt3dadd(210.98, 322.06, -57.75, 6.79)
pt3dadd(210.8, 321.65, -57.75, 6.79)
pt3dadd(210.62, 321.45, -57.75, 6.79)
pt3dadd(210.45, 321.25, -57.75, 6.79)
pt3dadd(210.27, 320.84, -57.75, 6.79)
pt3dadd(210.09, 320.64, -57.75, 6.79)
pt3dadd(209.91, 320.44, -57.75, 6.79)
pt3dadd(209.55, 320.03, -57.75, 6.79)
pt3dadd(209.38, 319.63, -57.75, 6.79)
pt3dadd(209.2, 319.43, -57.75, 6.79)
pt3dadd(209.02, 319.22, -57.75, 6.79)
pt3dadd(209.02, 319.63, -57.75, 6.79)
pt3dadd(208.66, 319.43, -58.8, 5.94)
pt3dadd(208.66, 319.02, -58.8, 5.94)
pt3dadd(208.48, 318.61, -58.8, 5.94)
pt3dadd(208.31, 318.21, -58.8, 5.94)
pt3dadd(208.13, 318.01, -58.8, 5.94)
pt3dadd(207.95, 317.6, -58.8, 5.94)
pt3dadd(207.95, 316.99, -58.8, 5.94)
pt3dadd(207.77, 316.79, -58.8, 5.94)
pt3dadd(207.77, 316.39, -58.8, 5.94)
pt3dadd(207.59, 316.18, -58.8, 5.94)
pt3dadd(207.41, 315.78, -58.8, 5.94)
pt3dadd(207.41, 315.37, -58.8, 5.94)
pt3dadd(207.24, 315.17, -58.8, 5.94)
pt3dadd(207.06, 314.77, -58.8, 5.94)
pt3dadd(206.88, 314.36, -58.8, 5.94)
pt3dadd(206.88, 313.96, -58.8, 5.94)
pt3dadd(206.7, 313.55, -58.8, 5.94)
pt3dadd(206.52, 313.15, -58.8, 5.94)
pt3dadd(206.17, 312.54, -58.8, 5.94)
pt3dadd(205.99, 312.13, -58.8, 5.94)
pt3dadd(205.81, 311.93, -58.8, 5.94)
pt3dadd(205.63, 311.53, -58.8, 5.94)
pt3dadd(205.45, 311.32, -58.8, 5.94)
pt3dadd(205.27, 310.92, -58.8, 5.94)
pt3dadd(205.1, 310.51, -58.8, 5.94)
pt3dadd(204.92, 310.31, -58.8, 5.94)
pt3dadd(204.74, 310.11, -58.8, 5.94)
pt3dadd(204.56, 309.91, -58.8, 5.94)
pt3dadd(204.38, 309.7, -58.8, 5.94)
pt3dadd(204.2, 309.5, -58.8, 5.94)
pt3dadd(204.03, 309.3, -58.8, 5.94)
pt3dadd(203.85, 308.89, -58.8, 5.94)
pt3dadd(203.67, 308.69, -58.8, 5.94)
pt3dadd(203.49, 308.29, -58.8, 5.94)
pt3dadd(203.31, 308.08, -58.8, 5.94)
pt3dadd(203.13, 307.88, -58.8, 5.94)
pt3dadd(203.13, 307.47, -58.8, 5.94)
pt3dadd(202.78, 307.27, -58.8, 5.94)
pt3dadd(202.6, 307.07, -58.8, 5.94)
pt3dadd(202.42, 306.87, -58.8, 5.94)
pt3dadd(202.24, 306.66, -58.8, 5.94)
pt3dadd(202.06, 306.46, -58.8, 5.94)
pt3dadd(201.89, 306.26, -58.8, 5.94)
pt3dadd(201.71, 306.06, -58.8, 5.94)
pt3dadd(201.53, 305.65, -58.8, 5.94)
pt3dadd(201.35, 305.45, -58.8, 5.94)
pt3dadd(200.99, 305.25, -58.8, 5.94)
pt3dadd(200.82, 304.84, -58.8, 5.94)
pt3dadd(200.64, 304.64, -58.8, 5.94)
pt3dadd(200.46, 304.44, -58.8, 5.94)
pt3dadd(201.09, 302.85, -58.8, 5.94)
}
dend[36] {pt3dclear()
pt3dadd(201.09, 302.85, -58.8, 1.36)
pt3dadd(184.1, 294.37, -51.45, 1.36)
pt3dadd(151.66, 286.86, -51.45, 4.42)
pt3dadd(155.56, 285.52, -51.45, 4.42)
pt3dadd(152.31, 287.07, -51.45, 4.42)
pt3dadd(151.95, 285.73, -51.45, 4.42)
pt3dadd(151.77, 284.38, -51.45, 4.42)
pt3dadd(151.06, 284.38, -51.45, 4.42)
pt3dadd(150.7, 284.59, -51.45, 4.42)
pt3dadd(150.35, 284.79, -51.45, 4.42)
pt3dadd(148.63, 289.42, -51.45, 4.42)
pt3dadd(149.63, 284.99, -51.45, 4.42)
pt3dadd(149.28, 285.19, -51.45, 4.42)
pt3dadd(149.1, 285.4, -51.45, 4.42)
pt3dadd(148.92, 285.6, -51.45, 4.42)
pt3dadd(148.74, 285.8, -51.45, 4.42)
pt3dadd(148.56, 286, -51.45, 4.42)
pt3dadd(148.39, 286.41, -51.45, 4.42)
pt3dadd(148.03, 286.61, -51.45, 4.42)
pt3dadd(147.85, 286.82, -51.45, 4.42)
pt3dadd(147.67, 287.22, -51.45, 4.42)
pt3dadd(147.49, 287.42, -51.45, 4.42)
pt3dadd(147.14, 287.63, -51.45, 4.42)
pt3dadd(146.96, 287.83, -51.45, 4.42)
pt3dadd(146.6, 288.23, -51.45, 4.42)
pt3dadd(146.43, 288.44, -51.45, 4.42)
pt3dadd(145.89, 289.04, -51.45, 4.42)
pt3dadd(145.71, 289.25, -51.45, 4.42)
pt3dadd(145.53, 289.45, -51.45, 4.42)
pt3dadd(145.18, 289.65, -51.45, 4.42)
pt3dadd(144.11, 290.87, -51.45, 4.42)
pt3dadd(143.93, 291.07, -51.45, 4.42)
pt3dadd(143.57, 291.47, -51.45, 4.42)
pt3dadd(143.39, 291.68, -51.45, 4.42)
pt3dadd(143.04, 291.88, -51.45, 4.42)
pt3dadd(142.68, 292.08, -51.45, 4.42)
pt3dadd(142.5, 292.28, -51.45, 4.42)
pt3dadd(142.32, 292.49, -51.45, 4.42)
pt3dadd(141.97, 292.69, -51.45, 4.42)
pt3dadd(141.61, 292.89, -51.45, 4.42)
pt3dadd(141.08, 293.09, -51.45, 4.42)
pt3dadd(140.54, 293.3, -51.45, 4.42)
pt3dadd(140.18, 293.5, -51.45, 4.42)
pt3dadd(139.83, 293.5, -51.45, 4.42)
pt3dadd(139.65, 293.7, -51.45, 4.42)
pt3dadd(139.29, 293.9, -51.45, 4.42)
pt3dadd(138.94, 294.11, -51.45, 4.42)
pt3dadd(138.58, 294.11, -51.45, 4.42)
pt3dadd(138.22, 294.31, -51.45, 4.42)
pt3dadd(137.87, 294.31, -51.45, 4.42)
pt3dadd(137.69, 294.51, -51.45, 4.42)
pt3dadd(137.15, 294.51, -51.45, 4.42)
pt3dadd(136.8, 295.32, -56.7, 4.42)
pt3dadd(136.44, 295.52, -56.7, 4.42)
pt3dadd(136.26, 295.73, -56.7, 4.42)
pt3dadd(135.73, 296.33, -56.7, 4.42)
pt3dadd(135.55, 296.74, -56.7, 4.42)
pt3dadd(135.19, 297.14, -56.7, 4.42)
pt3dadd(135.01, 297.35, -56.7, 4.42)
pt3dadd(134.66, 297.75, -56.7, 4.42)
pt3dadd(134.48, 298.16, -56.7, 4.42)
pt3dadd(133.94, 298.56, -56.7, 4.42)
pt3dadd(133.76, 298.77, -56.7, 4.42)
pt3dadd(133.59, 299.17, -56.7, 4.42)
pt3dadd(133.23, 299.37, -56.7, 4.42)
pt3dadd(132.87, 299.78, -56.7, 4.42)
pt3dadd(132.69, 299.98, -56.7, 4.42)
pt3dadd(132.16, 300.39, -56.7, 4.42)
pt3dadd(131.98, 300.79, -56.7, 4.42)
pt3dadd(131.8, 300.99, -56.7, 4.42)
pt3dadd(131.45, 301.2, -56.7, 4.42)
pt3dadd(131.09, 301.4, -56.7, 4.42)
pt3dadd(130.91, 301.6, -56.7, 4.42)
pt3dadd(130.55, 301.8, -56.7, 4.42)
pt3dadd(130.38, 302.01, -56.7, 4.42)
pt3dadd(129.84, 302.21, -56.7, 4.42)
pt3dadd(129.48, 302.41, -56.7, 4.42)
pt3dadd(128.95, 302.82, -56.7, 4.42)
pt3dadd(128.59, 303.02, -56.7, 4.42)
pt3dadd(128.24, 303.22, -56.7, 4.42)
pt3dadd(127.88, 303.42, -56.7, 4.42)
pt3dadd(127.34, 303.63, -56.7, 4.42)
pt3dadd(126.81, 303.83, -56.7, 4.42)
pt3dadd(126.45, 304.03, -56.7, 4.42)
pt3dadd(126.27, 304.23, -56.7, 4.42)
pt3dadd(125.92, 304.23, -56.7, 4.42)
pt3dadd(125.56, 304.44, -56.7, 4.42)
pt3dadd(125.2, 304.64, -56.7, 4.42)
pt3dadd(124.85, 304.84, -56.7, 4.42)
pt3dadd(124.49, 305.04, -56.7, 4.42)
pt3dadd(124.31, 305.25, -56.7, 4.42)
pt3dadd(124.13, 305.45, -56.7, 4.42)
pt3dadd(123.78, 305.45, -56.7, 4.42)
pt3dadd(123.6, 305.65, -56.7, 4.42)
pt3dadd(123.24, 305.85, -56.7, 4.42)
pt3dadd(123.06, 306.06, -56.7, 4.42)
pt3dadd(122.89, 306.46, -56.7, 4.42)
pt3dadd(122.53, 306.66, -56.7, 4.42)
pt3dadd(122.35, 306.87, -56.7, 4.42)
pt3dadd(121.99, 307.07, -56.7, 4.42)
pt3dadd(121.82, 307.27, -56.7, 4.42)
pt3dadd(121.64, 307.68, -56.7, 4.42)
pt3dadd(121.28, 307.88, -56.7, 4.42)
pt3dadd(121.1, 308.29, -56.7, 4.42)
pt3dadd(120.75, 308.49, -56.7, 4.42)
pt3dadd(120.57, 308.89, -56.7, 4.42)
pt3dadd(120.39, 309.1, -56.7, 4.42)
pt3dadd(120.21, 309.5, -56.7, 4.42)
pt3dadd(120.03, 310.11, -56.7, 4.42)
pt3dadd(119.85, 310.31, -56.7, 4.42)
pt3dadd(119.68, 310.51, -56.7, 4.42)
pt3dadd(119.5, 310.92, -56.7, 4.42)
pt3dadd(119.32, 311.32, -56.7, 4.42)
pt3dadd(118.96, 311.53, -56.7, 4.42)
pt3dadd(118.96, 311.93, -56.7, 4.42)
pt3dadd(118.61, 312.54, -56.7, 4.42)
pt3dadd(118.61, 313.35, -56.7, 4.42)
pt3dadd(118.43, 313.96, -56.7, 4.42)
pt3dadd(118.07, 314.56, -56.7, 4.42)
pt3dadd(118.07, 314.97, -56.7, 4.42)
pt3dadd(117.89, 315.17, -56.7, 4.42)
pt3dadd(117.71, 315.58, -56.7, 4.42)
pt3dadd(117.54, 315.98, -56.7, 4.42)
pt3dadd(117.36, 316.39, -56.7, 4.42)
pt3dadd(117.18, 316.79, -56.7, 4.42)
pt3dadd(117, 317.2, -56.7, 4.42)
pt3dadd(116.82, 317.6, -56.7, 4.42)
pt3dadd(116.47, 318.01, -56.7, 4.42)
pt3dadd(116.29, 318.61, -56.7, 4.42)
pt3dadd(115.75, 319.22, -56.7, 4.42)
pt3dadd(115.57, 319.63, -56.7, 4.42)
pt3dadd(115.22, 320.24, -56.7, 4.42)
pt3dadd(114.86, 320.64, -56.7, 4.42)
pt3dadd(114.68, 321.05, -56.7, 4.42)
pt3dadd(114.33, 321.45, -56.7, 4.42)
pt3dadd(114.15, 321.86, -56.7, 4.42)
}
}
proc shape3d_40() {
dend[36] { pt3dadd(113.97, 322.06, -56.7, 4.42)
pt3dadd(113.79, 322.26, -56.7, 4.42)
pt3dadd(113.79, 322.46, -56.7, 4.42)
pt3dadd(114.33, 322.67, -57.75, 4.42)
pt3dadd(114.15, 322.87, -57.75, 4.42)
pt3dadd(113.79, 323.48, -57.75, 4.42)
pt3dadd(113.61, 323.88, -57.75, 4.42)
pt3dadd(113.43, 324.08, -57.75, 4.42)
pt3dadd(113.26, 324.49, -57.75, 4.42)
pt3dadd(112.72, 325.1, -57.75, 4.42)
pt3dadd(112.54, 325.3, -57.75, 4.42)
pt3dadd(112.19, 325.5, -57.75, 4.42)
pt3dadd(112.01, 325.91, -57.75, 4.42)
pt3dadd(111.83, 326.11, -57.75, 4.42)
pt3dadd(111.47, 326.31, -57.75, 4.42)
pt3dadd(111.29, 326.51, -57.75, 4.42)
pt3dadd(111.12, 326.72, -57.75, 4.42)
pt3dadd(110.22, 327.73, -57.75, 4.42)
pt3dadd(110.05, 327.93, -57.75, 4.42)
pt3dadd(109.69, 328.13, -57.75, 4.42)
pt3dadd(109.51, 328.54, -57.75, 4.42)
pt3dadd(109.33, 328.94, -57.75, 4.42)
pt3dadd(108.98, 329.35, -57.75, 4.42)
pt3dadd(107.73, 330.77, -57.75, 4.42)
pt3dadd(107.37, 331.38, -57.75, 4.42)
pt3dadd(107.01, 331.58, -57.75, 4.42)
pt3dadd(106.84, 331.98, -57.75, 4.42)
pt3dadd(106.66, 332.19, -57.75, 4.42)
pt3dadd(106.48, 332.39, -57.75, 4.42)
pt3dadd(106.12, 332.59, -57.75, 4.42)
pt3dadd(105.94, 332.79, -57.75, 4.42)
pt3dadd(105.77, 333, -57.75, 4.42)
pt3dadd(105.59, 333.4, -57.75, 4.42)
pt3dadd(105.23, 333.6, -57.75, 4.42)
pt3dadd(105.05, 333.81, -57.75, 4.42)
pt3dadd(104.87, 334.01, -57.75, 4.42)
pt3dadd(104.7, 334.21, -57.75, 4.42)
pt3dadd(104.52, 334.62, -57.75, 4.42)
pt3dadd(104.16, 334.82, -57.75, 4.42)
pt3dadd(103.8, 335.02, -57.75, 4.42)
pt3dadd(103.63, 335.43, -57.75, 4.42)
pt3dadd(103.45, 335.63, -57.75, 4.42)
pt3dadd(103.09, 335.63, -57.75, 4.42)
pt3dadd(102.91, 336.03, -57.75, 4.42)
pt3dadd(102.73, 336.03, -57.75, 4.42)
pt3dadd(103.63, 335.43, -65.1, 4.42)
pt3dadd(103.27, 335.43, -65.1, 4.42)
pt3dadd(103.09, 335.83, -65.1, 4.42)
pt3dadd(102.73, 336.03, -65.1, 4.42)
pt3dadd(102.56, 336.24, -65.1, 4.42)
pt3dadd(102.2, 336.44, -65.1, 4.42)
pt3dadd(101.66, 336.64, -65.1, 4.42)
pt3dadd(101.31, 336.84, -65.1, 4.42)
pt3dadd(101.31, 337.25, -65.1, 4.42)
pt3dadd(100.95, 337.25, -65.1, 4.42)
pt3dadd(100.77, 337.45, -65.1, 4.42)
pt3dadd(100.59, 337.86, -65.1, 4.42)
pt3dadd(100.24, 337.86, -65.1, 4.42)
pt3dadd(100.06, 338.06, -65.1, 4.42)
pt3dadd(99.52, 338.67, -65.1, 4.42)
pt3dadd(99.35, 338.87, -65.1, 4.42)
pt3dadd(98.99, 339.27, -65.1, 4.42)
pt3dadd(98.81, 339.48, -65.1, 4.42)
pt3dadd(98.63, 339.68, -65.1, 4.42)
pt3dadd(98.45, 339.88, -65.1, 4.42)
pt3dadd(98.1, 339.88, -65.1, 4.42)
pt3dadd(97.92, 340.08, -65.1, 4.42)
pt3dadd(97.74, 340.29, -65.1, 4.42)
pt3dadd(97.56, 340.49, -65.1, 4.42)
pt3dadd(97.21, 340.69, -65.1, 4.42)
pt3dadd(97.03, 340.89, -65.1, 4.42)
pt3dadd(96.67, 341.1, -65.1, 4.42)
pt3dadd(96.49, 341.3, -65.1, 4.42)
pt3dadd(96.14, 341.3, -65.1, 4.42)
pt3dadd(95.96, 341.5, -65.1, 4.42)
pt3dadd(95.6, 341.71, -65.1, 4.42)
pt3dadd(95.07, 341.71, -65.1, 4.42)
pt3dadd(94.71, 341.91, -65.1, 4.42)
pt3dadd(92.57, 341.91, -65.1, 4.42)
pt3dadd(92.39, 341.71, -65.1, 4.42)
pt3dadd(91.14, 341.71, -65.1, 4.42)
pt3dadd(90.96, 341.5, -65.1, 4.42)
pt3dadd(90.61, 341.3, -65.1, 4.42)
pt3dadd(90.43, 341.1, -65.1, 4.42)
pt3dadd(90.07, 340.69, -65.1, 4.42)
pt3dadd(89.54, 340.69, -65.1, 4.42)
pt3dadd(89, 340.08, -65.1, 4.42)
pt3dadd(88.47, 339.88, -65.1, 4.42)
pt3dadd(88.11, 339.68, -65.1, 4.42)
pt3dadd(87.93, 339.48, -65.1, 4.42)
pt3dadd(87.4, 339.27, -65.1, 4.42)
pt3dadd(86.86, 339.27, -65.1, 4.42)
pt3dadd(86.51, 339.07, -65.1, 4.42)
pt3dadd(85.61, 339.07, -65.1, 4.42)
pt3dadd(85.26, 338.87, -65.1, 4.42)
pt3dadd(83.65, 338.87, -65.1, 4.42)
pt3dadd(83.47, 339.07, -65.1, 4.42)
pt3dadd(83.12, 339.48, -65.1, 4.42)
pt3dadd(82.94, 339.68, -65.1, 4.42)
pt3dadd(82.76, 339.88, -65.1, 4.42)
pt3dadd(82.58, 340.08, -65.1, 4.42)
pt3dadd(82.23, 340.29, -65.1, 4.42)
pt3dadd(82.05, 340.69, -65.1, 4.42)
pt3dadd(81.87, 340.89, -65.1, 4.42)
pt3dadd(81.69, 341.3, -65.1, 4.42)
pt3dadd(81.34, 341.5, -65.1, 4.42)
pt3dadd(80.8, 341.91, -65.1, 4.42)
pt3dadd(80.44, 342.31, -65.1, 4.42)
pt3dadd(80.09, 342.52, -65.1, 4.42)
pt3dadd(79.91, 342.72, -65.1, 4.42)
pt3dadd(79.55, 343.12, -65.1, 4.42)
pt3dadd(79.37, 343.53, -65.1, 4.42)
pt3dadd(79.2, 343.73, -65.1, 4.42)
pt3dadd(79.02, 343.93, -65.1, 4.42)
pt3dadd(78.66, 344.14, -65.1, 4.42)
pt3dadd(78.48, 344.34, -65.1, 4.42)
pt3dadd(78.48, 344.74, -65.1, 4.42)
pt3dadd(78.3, 344.95, -65.1, 4.42)
pt3dadd(78.13, 345.15, -65.1, 4.42)
pt3dadd(78.13, 345.55, -65.1, 4.42)
pt3dadd(77.95, 345.76, -65.1, 4.42)
pt3dadd(77.77, 345.96, -65.1, 4.42)
pt3dadd(77.59, 346.16, -65.1, 4.42)
pt3dadd(77.41, 346.36, -65.1, 4.42)
pt3dadd(77.23, 346.57, -65.1, 4.42)
pt3dadd(77.23, 346.97, -65.1, 4.42)
pt3dadd(77.06, 347.17, -65.1, 4.42)
pt3dadd(76.88, 347.38, -65.1, 4.42)
pt3dadd(76.88, 347.78, -65.1, 4.42)
pt3dadd(76.7, 347.98, -65.1, 4.42)
}
dend[37] {pt3dclear()
pt3dadd(201.09, 302.85, -58.8, 5.94)
pt3dadd(200.28, 304.23, -58.8, 5.94)
pt3dadd(199.92, 304.03, -58.8, 5.94)
pt3dadd(199.39, 303.42, -58.8, 5.94)
pt3dadd(199.21, 303.02, -58.8, 5.94)
pt3dadd(198.85, 302.61, -58.8, 5.94)
pt3dadd(198.68, 302.21, -58.8, 5.94)
pt3dadd(198.5, 301.8, -58.8, 5.94)
pt3dadd(198.32, 301.4, -58.8, 5.94)
pt3dadd(198.14, 300.99, -58.8, 5.94)
pt3dadd(197.96, 300.79, -58.8, 5.94)
pt3dadd(197.78, 300.59, -58.8, 5.94)
pt3dadd(197.61, 300.39, -58.8, 5.94)
pt3dadd(197.25, 299.98, -58.8, 5.94)
pt3dadd(197.07, 299.78, -58.8, 5.94)
pt3dadd(196.89, 299.58, -58.8, 5.94)
pt3dadd(196.71, 299.37, -58.8, 5.94)
pt3dadd(196.36, 299.17, -58.8, 5.94)
pt3dadd(196.18, 298.97, -58.8, 5.94)
pt3dadd(195.82, 298.56, -58.8, 5.94)
pt3dadd(195.47, 298.36, -58.8, 5.94)
pt3dadd(195.29, 298.16, -58.8, 5.94)
pt3dadd(195.11, 297.96, -58.8, 5.94)
pt3dadd(194.75, 297.75, -58.8, 5.94)
pt3dadd(194.57, 297.55, -58.8, 5.94)
pt3dadd(194.4, 297.35, -58.8, 5.94)
pt3dadd(194.22, 296.94, -58.8, 5.94)
pt3dadd(193.86, 296.54, -58.8, 5.94)
pt3dadd(193.68, 296.33, -58.8, 5.94)
pt3dadd(193.5, 296.13, -58.8, 5.94)
pt3dadd(193.33, 295.73, -58.8, 5.94)
pt3dadd(193.15, 295.52, -58.8, 5.94)
pt3dadd(192.97, 295.12, -58.8, 5.94)
pt3dadd(192.79, 294.92, -58.8, 5.94)
pt3dadd(192.43, 294.71, -58.8, 5.94)
pt3dadd(192.08, 294.31, -58.8, 5.94)
pt3dadd(191.9, 294.11, -58.8, 5.94)
pt3dadd(191.19, 293.3, -58.8, 5.94)
pt3dadd(190.83, 293.09, -58.8, 5.94)
pt3dadd(190.65, 292.69, -58.8, 5.94)
pt3dadd(190.29, 292.49, -58.8, 5.94)
pt3dadd(190.12, 292.28, -58.8, 5.94)
pt3dadd(189.58, 291.68, -58.8, 5.94)
pt3dadd(189.4, 291.27, -58.8, 5.94)
pt3dadd(189.05, 291.07, -58.8, 5.94)
pt3dadd(188.33, 291.07, -58.8, 5.94)
}
dend[38] {pt3dclear()
pt3dadd(188.33, 291.07, -58.8, 5.94)
pt3dadd(188.87, 290.66, -58.8, 5.94)
pt3dadd(188.15, 288.23, -63, 4.59)
pt3dadd(187.98, 288.03, -63, 4.59)
pt3dadd(187.62, 287.83, -63, 4.59)
pt3dadd(187.44, 287.42, -63, 4.59)
pt3dadd(187.26, 287.22, -63, 4.59)
pt3dadd(187.08, 287.02, -63, 4.59)
pt3dadd(186.91, 286.82, -63, 4.59)
pt3dadd(186.73, 286.61, -63, 4.59)
pt3dadd(186.55, 286.41, -63, 4.59)
pt3dadd(186.37, 286.21, -63, 4.59)
pt3dadd(186.01, 286.01, -63, 4.59)
pt3dadd(185.84, 285.6, -63, 4.59)
pt3dadd(185.66, 285.19, -63, 4.59)
pt3dadd(185.48, 284.99, -63, 4.59)
pt3dadd(185.3, 284.79, -63, 4.59)
pt3dadd(185.12, 284.38, -63, 4.59)
pt3dadd(184.94, 284.18, -63, 4.59)
pt3dadd(184.77, 283.98, -63, 4.59)
pt3dadd(184.59, 283.57, -63, 4.59)
pt3dadd(184.23, 283.37, -63, 4.59)
pt3dadd(184.05, 283.17, -63, 4.59)
pt3dadd(183.87, 282.76, -63, 4.59)
}
}
proc shape3d_41() {
dend[38] { pt3dadd(183.7, 282.36, -63, 4.59)
pt3dadd(183.52, 281.95, -63, 4.59)
pt3dadd(183.34, 281.55, -63, 4.59)
pt3dadd(183.16, 281.35, -63, 4.59)
pt3dadd(182.98, 281.14, -63, 4.59)
pt3dadd(182.8, 280.94, -63, 4.59)
pt3dadd(182.63, 280.54, -63, 4.59)
pt3dadd(182.45, 280.13, -63, 4.59)
pt3dadd(182.27, 279.93, -63, 4.59)
pt3dadd(182.09, 279.73, -63, 4.59)
pt3dadd(181.91, 279.52, -63, 4.59)
pt3dadd(181.91, 279.12, -63, 4.59)
pt3dadd(181.73, 278.92, -63, 4.59)
pt3dadd(181.56, 278.71, -63, 4.59)
pt3dadd(181.38, 278.51, -63, 4.59)
pt3dadd(181.2, 278.11, -63, 4.59)
pt3dadd(181.2, 277.7, -63, 4.59)
pt3dadd(181.02, 277.5, -63, 4.59)
pt3dadd(180.84, 277.09, -63, 4.59)
pt3dadd(180.66, 276.89, -63, 4.59)
pt3dadd(180.66, 276.49, -63, 4.59)
pt3dadd(180.49, 276.28, -63, 4.59)
pt3dadd(180.31, 275.88, -63, 4.59)
pt3dadd(180.13, 275.47, -63, 4.59)
pt3dadd(180.13, 275.07, -63, 4.59)
pt3dadd(179.95, 274.66, -63, 4.59)
pt3dadd(179.77, 274.26, -63, 4.59)
pt3dadd(179.59, 274.05, -63, 4.59)
pt3dadd(179.42, 273.65, -63, 4.59)
pt3dadd(179.42, 273.24, -63, 4.59)
pt3dadd(179.24, 273.04, -63, 4.59)
pt3dadd(179.06, 272.64, -63, 4.59)
pt3dadd(178.88, 272.43, -63, 4.59)
pt3dadd(178.7, 272.03, -63, 4.59)
pt3dadd(178.52, 271.83, -63, 4.59)
pt3dadd(178.52, 271.42, -63, 4.59)
pt3dadd(178.35, 271.22, -63, 4.59)
pt3dadd(178.17, 270.81, -63, 4.59)
pt3dadd(177.81, 270.41, -63, 4.59)
pt3dadd(177.81, 270, -63, 4.59)
pt3dadd(177.63, 269.8, -63, 4.59)
pt3dadd(177.45, 269.4, -63, 4.59)
pt3dadd(177.28, 268.99, -63, 4.59)
pt3dadd(176.92, 268.59, -63, 4.59)
pt3dadd(176.92, 268.18, -63, 4.59)
pt3dadd(176.56, 267.98, -63, 4.59)
pt3dadd(176.38, 267.57, -63, 4.59)
pt3dadd(176.21, 267.37, -63, 4.59)
pt3dadd(176.03, 266.97, -63, 4.59)
pt3dadd(175.85, 266.56, -63, 4.59)
pt3dadd(175.67, 266.16, -63, 4.59)
pt3dadd(175.49, 265.75, -63, 4.59)
pt3dadd(175.31, 265.35, -63, 4.59)
pt3dadd(174.96, 264.74, -63, 4.59)
pt3dadd(174.78, 264.33, -63, 4.59)
pt3dadd(174.6, 263.93, -63, 4.59)
pt3dadd(174.42, 263.52, -63, 4.59)
pt3dadd(174.24, 263.32, -63, 4.59)
pt3dadd(174.07, 262.71, -63, 4.59)
pt3dadd(173.71, 262.31, -63, 4.59)
pt3dadd(173.71, 261.7, -63, 4.59)
pt3dadd(173.35, 261.5, -63, 4.59)
pt3dadd(173.17, 261.09, -63, 4.59)
pt3dadd(173, 260.89, -63, 4.59)
pt3dadd(172.64, 260.28, -63, 4.59)
pt3dadd(172.46, 259.88, -63, 4.59)
pt3dadd(172.28, 259.47, -63, 4.59)
pt3dadd(172.1, 259.07, -63, 4.59)
pt3dadd(171.93, 258.66, -63, 4.59)
pt3dadd(171.75, 258.26, -63, 4.59)
pt3dadd(171.57, 257.85, -63, 4.59)
pt3dadd(171.39, 257.45, -63, 4.59)
pt3dadd(171.21, 257.04, -63, 4.59)
pt3dadd(170.86, 256.64, -63, 4.59)
pt3dadd(170.68, 256.43, -63, 4.59)
pt3dadd(170.5, 256.03, -63, 4.59)
pt3dadd(170.32, 255.62, -63, 4.59)
pt3dadd(170.14, 255.42, -63, 4.59)
pt3dadd(169.96, 255.02, -63, 4.59)
pt3dadd(169.79, 254.61, -63, 4.59)
pt3dadd(169.61, 254.41, -63, 4.59)
pt3dadd(169.61, 254, -63, 4.59)
pt3dadd(169.43, 253.6, -63, 4.59)
pt3dadd(169.25, 253.19, -63, 4.59)
pt3dadd(169.07, 252.99, -63, 4.59)
pt3dadd(168.72, 252.58, -63, 4.59)
pt3dadd(168.54, 252.18, -63, 4.59)
pt3dadd(168.36, 251.77, -63, 4.59)
pt3dadd(168, 251.37, -63, 4.59)
pt3dadd(167.82, 250.96, -63, 4.59)
pt3dadd(167.65, 250.56, -63, 4.59)
pt3dadd(167.47, 250.36, -63, 4.59)
pt3dadd(167.11, 249.75, -63, 4.59)
pt3dadd(166.75, 249.14, -63, 4.59)
pt3dadd(166.58, 248.94, -63, 4.59)
pt3dadd(166.4, 248.74, -63, 4.59)
pt3dadd(166.04, 248.33, -63, 4.59)
pt3dadd(165.86, 247.93, -63, 4.59)
pt3dadd(165.68, 247.32, -63, 4.59)
pt3dadd(165.33, 247.12, -63, 4.59)
pt3dadd(165.15, 246.71, -63, 4.59)
pt3dadd(164.79, 246.1, -63, 4.59)
pt3dadd(164.61, 245.9, -63, 4.59)
pt3dadd(164.26, 245.7, -63, 4.59)
pt3dadd(164.08, 245.29, -63, 4.59)
pt3dadd(163.9, 244.89, -63, 4.59)
pt3dadd(163.54, 244.48, -63, 4.59)
pt3dadd(163.37, 244.28, -63, 4.59)
pt3dadd(163.19, 243.88, -63, 4.59)
pt3dadd(163.01, 243.67, -63, 4.59)
pt3dadd(162.83, 243.27, -63, 4.59)
pt3dadd(162.65, 243.07, -63, 4.59)
pt3dadd(162.47, 242.66, -63, 4.59)
pt3dadd(162.3, 242.46, -63, 4.59)
pt3dadd(161.94, 242.05, -63, 4.59)
pt3dadd(161.76, 241.65, -63, 4.59)
pt3dadd(161.4, 241.24, -63, 4.59)
pt3dadd(161.23, 241.04, -63, 4.59)
pt3dadd(160.87, 240.43, -63, 4.59)
pt3dadd(160.69, 240.03, -63, 4.59)
pt3dadd(160.51, 239.62, -63, 4.59)
pt3dadd(160.33, 239.22, -63, 4.59)
pt3dadd(160.16, 238.81, -63, 4.59)
pt3dadd(159.98, 238.41, -63, 4.59)
pt3dadd(159.62, 238.2, -63, 4.59)
pt3dadd(159.44, 238, -63, 4.59)
pt3dadd(159.26, 237.8, -63, 4.59)
pt3dadd(159.09, 237.39, -63, 4.59)
pt3dadd(158.91, 237.19, -63, 4.59)
pt3dadd(158.73, 236.79, -63, 4.59)
pt3dadd(158.55, 236.58, -63, 4.59)
pt3dadd(158.19, 236.18, -63, 4.59)
pt3dadd(158.19, 235.77, -63, 4.59)
pt3dadd(157.84, 235.57, -63, 4.59)
pt3dadd(157.66, 235.17, -63, 4.59)
pt3dadd(157.3, 234.76, -63, 4.59)
pt3dadd(157.12, 234.56, -63, 4.59)
pt3dadd(156.95, 234.15, -63, 4.59)
pt3dadd(156.77, 233.75, -63, 4.59)
pt3dadd(156.41, 233.34, -63, 4.59)
pt3dadd(156.23, 233.14, -63, 4.59)
pt3dadd(156.23, 233.95, -63, 4.59)
pt3dadd(156.41, 234.56, -63, 4.59)
pt3dadd(156.23, 233.75, -63, 4.25)
pt3dadd(156.05, 233.55, -63, 4.25)
pt3dadd(155.88, 233.34, -63, 4.25)
pt3dadd(155.88, 232.94, -63, 4.25)
pt3dadd(155.7, 232.74, -63, 4.25)
pt3dadd(155.52, 232.53, -63, 4.25)
pt3dadd(155.52, 232.13, -63, 4.25)
pt3dadd(155.34, 231.93, -63, 4.25)
pt3dadd(155.16, 231.72, -63, 4.25)
pt3dadd(154.98, 231.52, -63, 4.25)
pt3dadd(154.81, 231.32, -63, 4.25)
pt3dadd(154.81, 230.91, -63, 4.25)
pt3dadd(154.63, 230.71, -63, 4.25)
pt3dadd(154.45, 230.51, -63, 4.25)
pt3dadd(154.27, 230.3, -63, 4.25)
pt3dadd(153.74, 229.7, -63, 4.25)
pt3dadd(153.56, 229.49, -63, 4.25)
pt3dadd(153.38, 229.29, -63, 4.25)
pt3dadd(153.2, 229.09, -63, 4.25)
pt3dadd(153.02, 228.89, -63, 4.25)
pt3dadd(152.84, 228.68, -63, 4.25)
pt3dadd(152.67, 228.28, -63, 4.25)
pt3dadd(152.49, 227.87, -63, 4.25)
pt3dadd(152.31, 227.47, -63, 4.25)
pt3dadd(151.6, 226.66, -63, 4.25)
pt3dadd(151.42, 226.46, -63, 4.25)
pt3dadd(151.24, 226.25, -63, 4.25)
pt3dadd(151.06, 226.05, -63, 4.25)
pt3dadd(150.88, 225.85, -63, 4.25)
pt3dadd(150.7, 225.65, -63, 4.25)
pt3dadd(150.53, 225.44, -63, 4.25)
pt3dadd(150.35, 225.24, -63, 4.25)
pt3dadd(150.17, 224.84, -63, 4.25)
pt3dadd(149.99, 224.63, -63, 4.25)
pt3dadd(149.63, 224.43, -63, 4.25)
pt3dadd(149.46, 224.03, -63, 4.25)
pt3dadd(149.1, 223.82, -63, 4.25)
pt3dadd(148.92, 223.62, -63, 4.25)
pt3dadd(148.74, 223.42, -63, 4.25)
pt3dadd(148.56, 223.22, -63, 4.25)
pt3dadd(148.21, 223.01, -63, 4.25)
pt3dadd(148.03, 222.81, -63, 4.25)
pt3dadd(147.85, 222.61, -63, 4.25)
pt3dadd(147.67, 222.2, -63, 4.25)
pt3dadd(147.49, 222, -63, 4.25)
pt3dadd(146.96, 221.6, -63, 4.25)
pt3dadd(146.78, 221.39, -63, 4.25)
pt3dadd(145.71, 220.18, -63, 4.25)
pt3dadd(145.36, 220.18, -63, 4.25)
pt3dadd(145.18, 219.97, -63, 4.25)
pt3dadd(144.82, 219.77, -63, 4.25)
pt3dadd(144.64, 219.57, -63, 4.25)
pt3dadd(144.29, 219.37, -63, 4.25)
pt3dadd(143.93, 219.16, -63, 4.25)
pt3dadd(143.57, 218.96, -63, 4.25)
pt3dadd(143.22, 218.56, -63, 4.25)
pt3dadd(143.04, 218.35, -63, 4.25)
}
}
proc shape3d_42() {
dend[38] { pt3dadd(142.68, 218.15, -63, 4.25)
pt3dadd(141.97, 217.34, -63, 4.25)
pt3dadd(141.79, 217.14, -63, 4.25)
pt3dadd(141.61, 216.94, -63, 4.25)
pt3dadd(141.25, 216.73, -63, 4.25)
pt3dadd(140.72, 216.13, -63, 4.25)
pt3dadd(140.54, 215.92, -63, 4.25)
pt3dadd(140.18, 215.72, -63, 4.25)
pt3dadd(140.01, 215.52, -63, 4.25)
pt3dadd(139.83, 215.32, -63, 4.25)
pt3dadd(139.65, 215.11, -63, 4.25)
pt3dadd(139.29, 215.11, -63, 4.25)
pt3dadd(139.11, 214.71, -63, 4.25)
pt3dadd(138.94, 214.51, -63, 4.25)
pt3dadd(138.76, 214.1, -63, 4.25)
pt3dadd(138.4, 214.1, -63, 4.25)
pt3dadd(138.22, 213.9, -63, 4.25)
pt3dadd(138.04, 213.49, -63, 4.25)
pt3dadd(137.87, 213.29, -63, 4.25)
pt3dadd(137.51, 213.09, -63, 4.25)
pt3dadd(136.97, 212.48, -63, 4.25)
pt3dadd(136.8, 212.28, -63, 4.25)
pt3dadd(136.62, 212.08, -63, 4.25)
pt3dadd(136.26, 211.87, -63, 4.25)
pt3dadd(136.08, 211.67, -63, 4.25)
pt3dadd(135.9, 211.47, -63, 4.25)
pt3dadd(135.37, 211.47, -63, 4.25)
pt3dadd(135.01, 211.27, -63, 4.25)
pt3dadd(133.94, 211.27, -63, 4.25)
pt3dadd(133.76, 211.06, -63, 4.25)
pt3dadd(129.66, 211.06, -63, 4.25)
pt3dadd(129.31, 210.86, -63, 4.25)
pt3dadd(128.95, 210.86, -63, 4.25)
pt3dadd(128.59, 210.66, -63, 4.25)
pt3dadd(128.06, 210.66, -63, 4.25)
pt3dadd(127.88, 210.46, -63, 4.25)
pt3dadd(127.52, 210.25, -63, 4.25)
pt3dadd(126.99, 210.25, -63, 4.25)
pt3dadd(126.63, 210.05, -63, 4.25)
pt3dadd(126.27, 209.85, -63, 4.25)
pt3dadd(125.03, 209.85, -63, 4.25)
pt3dadd(124.49, 209.65, -63, 4.25)
pt3dadd(124.13, 209.44, -63, 4.25)
pt3dadd(123.78, 209.24, -63, 4.25)
pt3dadd(120.39, 209.24, -63, 4.25)
pt3dadd(120.03, 209.04, -63, 4.25)
pt3dadd(119.68, 208.83, -63, 4.25)
pt3dadd(119.32, 208.63, -63, 4.25)
pt3dadd(118.96, 208.43, -63, 4.25)
pt3dadd(118.78, 208.23, -63, 4.25)
pt3dadd(118.43, 208.02, -63, 4.25)
pt3dadd(118.07, 207.82, -63, 4.25)
pt3dadd(117.71, 207.62, -63, 4.25)
pt3dadd(117.54, 207.42, -63, 4.25)
pt3dadd(117.36, 207.21, -63, 4.25)
pt3dadd(117, 207.21, -63, 4.25)
pt3dadd(116.82, 207.01, -63, 4.25)
pt3dadd(116.64, 206.81, -63, 4.25)
pt3dadd(116.29, 206.81, -63, 4.25)
pt3dadd(116.11, 206.61, -63, 4.25)
pt3dadd(115.04, 205.39, -63, 4.25)
pt3dadd(114.86, 205.19, -63, 4.25)
pt3dadd(114.5, 204.78, -63, 4.25)
pt3dadd(114.33, 204.58, -63, 4.25)
pt3dadd(114.15, 204.38, -63, 4.25)
pt3dadd(113.79, 204.18, -63, 4.25)
pt3dadd(113.43, 203.77, -63, 4.25)
pt3dadd(113.26, 203.57, -63, 4.25)
pt3dadd(112.9, 202.96, -63, 4.25)
pt3dadd(112.54, 202.56, -63, 4.25)
pt3dadd(112.19, 202.15, -63, 4.25)
pt3dadd(111.83, 201.75, -63, 4.25)
pt3dadd(111.29, 201.34, -63, 4.25)
pt3dadd(110.94, 200.94, -63, 4.25)
pt3dadd(110.4, 200.33, -63, 4.25)
pt3dadd(110.22, 200.13, -63, 4.25)
pt3dadd(109.87, 199.92, -63, 4.25)
pt3dadd(109.51, 199.72, -63, 4.25)
pt3dadd(109.33, 199.52, -63, 4.25)
pt3dadd(109.15, 199.32, -63, 4.25)
pt3dadd(108.98, 199.11, -63, 4.25)
pt3dadd(108.62, 199.11, -63, 4.25)
pt3dadd(108.44, 198.91, -63, 4.25)
pt3dadd(108.08, 198.71, -63, 4.25)
pt3dadd(107.91, 198.51, -63, 4.25)
pt3dadd(107.55, 198.1, -63, 4.25)
pt3dadd(107.37, 197.9, -63, 4.25)
pt3dadd(106.3, 197.9, -63, 4.25)
pt3dadd(106.12, 197.69, -63, 4.25)
pt3dadd(105.59, 197.69, -63, 4.25)
pt3dadd(105.41, 197.49, -63, 4.25)
pt3dadd(105.23, 197.29, -63, 4.25)
pt3dadd(104.52, 197.29, -63, 4.25)
pt3dadd(104.34, 197.09, -63, 4.25)
pt3dadd(103.8, 197.09, -63, 4.25)
pt3dadd(103.63, 196.88, -63, 4.25)
pt3dadd(102.91, 196.88, -63, 4.25)
pt3dadd(102.73, 196.68, -63, 4.25)
pt3dadd(102.38, 196.68, -63, 4.25)
pt3dadd(102.2, 196.48, -63, 4.25)
pt3dadd(102.02, 196.28, -63, 4.25)
pt3dadd(101.49, 196.28, -63, 4.25)
pt3dadd(101.31, 196.07, -63, 4.25)
pt3dadd(101.13, 195.87, -63, 4.25)
pt3dadd(100.59, 195.87, -63, 4.25)
pt3dadd(100.42, 195.67, -63, 4.25)
pt3dadd(99.88, 195.67, -63, 4.25)
pt3dadd(99.7, 195.47, -63, 4.25)
pt3dadd(99.35, 195.47, -63, 4.25)
pt3dadd(99.17, 195.26, -63, 4.25)
pt3dadd(98.99, 195.06, -63, 4.25)
pt3dadd(98.63, 194.86, -63, 4.25)
pt3dadd(98.45, 194.66, -63, 4.25)
pt3dadd(98.1, 194.45, -63, 4.25)
pt3dadd(98.28, 194.05, -63, 4.08)
pt3dadd(98.1, 193.64, -63, 4.08)
pt3dadd(97.92, 193.44, -63, 4.08)
pt3dadd(97.74, 193.04, -63, 4.08)
pt3dadd(97.56, 192.83, -63, 4.08)
pt3dadd(97.38, 192.63, -63, 4.08)
pt3dadd(97.38, 192.02, -63, 4.08)
pt3dadd(97.21, 191.82, -63, 4.08)
pt3dadd(97.03, 191.62, -63, 4.08)
pt3dadd(96.85, 191.42, -63, 4.08)
pt3dadd(96.67, 191.01, -63, 4.08)
pt3dadd(96.49, 190.61, -63, 4.08)
pt3dadd(96.31, 190.4, -63, 4.08)
pt3dadd(96.14, 190, -63, 4.08)
pt3dadd(95.96, 189.59, -63, 4.08)
pt3dadd(95.78, 189.39, -63, 4.08)
pt3dadd(95.6, 188.99, -63, 4.08)
pt3dadd(95.42, 188.78, -63, 4.08)
pt3dadd(95.24, 188.58, -63, 4.08)
pt3dadd(95.07, 188.38, -63, 4.08)
pt3dadd(94.89, 188.18, -63, 4.08)
pt3dadd(94.71, 187.77, -63, 4.08)
pt3dadd(94.53, 187.57, -63, 4.08)
pt3dadd(94.35, 187.36, -63, 4.08)
pt3dadd(94.17, 186.96, -63, 4.08)
pt3dadd(93.82, 186.76, -63, 4.08)
pt3dadd(92.93, 185.74, -63, 4.08)
pt3dadd(92.57, 185.54, -63, 4.08)
pt3dadd(92.21, 185.34, -63, 4.08)
pt3dadd(92.03, 185.14, -63, 4.08)
pt3dadd(91.86, 184.93, -63, 4.08)
pt3dadd(91.68, 184.73, -63, 4.08)
pt3dadd(91.5, 184.33, -63, 4.08)
pt3dadd(91.32, 184.12, -63, 4.08)
pt3dadd(90.96, 183.72, -63, 4.08)
pt3dadd(90.79, 183.52, -63, 4.08)
pt3dadd(90.61, 183.31, -63, 4.08)
pt3dadd(90.25, 182.91, -63, 4.08)
pt3dadd(90.07, 182.5, -63, 4.08)
pt3dadd(89.89, 182.3, -63, 4.08)
pt3dadd(89.72, 182.1, -63, 4.08)
pt3dadd(89.36, 181.9, -63, 4.08)
pt3dadd(89.18, 181.49, -63, 4.08)
pt3dadd(88.82, 181.29, -63, 4.08)
pt3dadd(88.47, 181.09, -63, 4.08)
pt3dadd(88.29, 180.68, -63, 4.08)
pt3dadd(88.11, 180.48, -63, 4.08)
pt3dadd(87.75, 180.28, -63, 4.08)
pt3dadd(87.75, 179.87, -63, 4.08)
pt3dadd(87.4, 179.67, -63, 4.08)
pt3dadd(87.04, 179.26, -63, 4.08)
pt3dadd(86.86, 179.06, -63, 4.08)
pt3dadd(86.68, 178.86, -63, 4.08)
pt3dadd(85.97, 178.05, -63, 4.08)
pt3dadd(85.61, 177.64, -63, 4.08)
pt3dadd(85.44, 177.44, -63, 4.08)
pt3dadd(85.26, 177.04, -63, 4.08)
pt3dadd(85.08, 176.83, -63, 4.08)
pt3dadd(84.9, 176.43, -63, 4.08)
pt3dadd(84.54, 176.43, -63, 4.08)
pt3dadd(84.37, 176.02, -63, 4.08)
pt3dadd(83.83, 175.41, -63, 4.08)
pt3dadd(83.65, 175.21, -63, 4.08)
pt3dadd(83.3, 175.01, -63, 4.08)
pt3dadd(83.12, 174.6, -63, 4.08)
pt3dadd(82.94, 174.4, -63, 4.08)
pt3dadd(82.76, 174.2, -63, 4.08)
pt3dadd(82.4, 174, -63, 4.08)
pt3dadd(82.23, 173.59, -63, 4.08)
pt3dadd(82.05, 173.39, -63, 4.08)
pt3dadd(81.51, 172.98, -63, 4.08)
pt3dadd(81.33, 172.58, -63, 4.08)
pt3dadd(81.16, 172.38, -63, 4.08)
pt3dadd(80.8, 172.38, -63, 4.08)
pt3dadd(80.62, 172.17, -63, 4.08)
pt3dadd(80.26, 171.57, -63, 4.08)
pt3dadd(80.09, 171.36, -63, 4.08)
pt3dadd(79.73, 170.96, -63, 4.08)
pt3dadd(79.37, 170.76, -63, 4.08)
pt3dadd(79.2, 170.55, -63, 4.08)
pt3dadd(78.84, 170.35, -63, 4.08)
pt3dadd(78.48, 170.15, -63, 4.08)
pt3dadd(78.13, 169.95, -63, 4.08)
pt3dadd(77.59, 169.74, -63, 4.08)
pt3dadd(77.41, 169.54, -63, 4.08)
pt3dadd(77.06, 169.34, -63, 4.08)
}
}
proc shape3d_43() {
dend[38] { pt3dadd(76.7, 169.14, -63, 4.08)
pt3dadd(76.34, 168.93, -63, 4.08)
pt3dadd(75.99, 168.53, -63, 4.08)
pt3dadd(75.81, 168.33, -63, 4.08)
pt3dadd(75.45, 168.12, -63, 4.08)
pt3dadd(74.92, 167.92, -63, 4.08)
pt3dadd(74.56, 167.72, -63, 4.08)
pt3dadd(74.02, 167.72, -63, 4.08)
pt3dadd(73.49, 167.31, -63, 4.08)
pt3dadd(72.78, 167.31, -63, 4.08)
pt3dadd(72.6, 167.11, -63, 4.08)
pt3dadd(72.24, 166.91, -63, 4.08)
pt3dadd(71.71, 166.91, -63, 4.08)
pt3dadd(71.17, 166.3, -63, 4.08)
pt3dadd(70.81, 166.3, -63, 4.08)
pt3dadd(70.64, 166.1, -63, 4.08)
pt3dadd(70.28, 166.1, -63, 4.08)
pt3dadd(70.1, 165.9, -63, 4.08)
pt3dadd(69.92, 165.69, -63, 4.08)
pt3dadd(69.74, 165.49, -63, 4.08)
pt3dadd(69.57, 165.29, -63, 4.08)
pt3dadd(69.21, 165.29, -63, 4.08)
pt3dadd(68.85, 165.08, -63, 4.08)
pt3dadd(68.67, 164.68, -63, 4.08)
pt3dadd(68.5, 164.48, -63, 4.08)
pt3dadd(68.14, 164.07, -63, 4.08)
pt3dadd(67.96, 163.87, -63, 4.08)
pt3dadd(67.78, 163.67, -63, 4.08)
pt3dadd(67.43, 163.46, -63, 4.08)
pt3dadd(67.25, 163.26, -63, 4.08)
pt3dadd(67.07, 163.06, -63, 4.08)
pt3dadd(66.89, 162.65, -63, 4.08)
pt3dadd(66.53, 162.45, -63, 4.08)
pt3dadd(66.36, 162.25, -63, 4.08)
pt3dadd(66.18, 162.05, -63, 4.08)
pt3dadd(65.82, 162.05, -63, 4.08)
pt3dadd(65.64, 161.84, -63, 4.08)
pt3dadd(65.46, 161.64, -63, 4.08)
pt3dadd(65.29, 161.44, -63, 4.08)
pt3dadd(65.11, 161.24, -63, 4.08)
pt3dadd(64.75, 161.03, -63, 4.08)
pt3dadd(64.39, 160.83, -63, 4.08)
pt3dadd(64.04, 160.83, -63, 4.08)
pt3dadd(63.86, 160.63, -63, 4.08)
pt3dadd(63.5, 160.43, -63, 4.08)
pt3dadd(63.15, 160.22, -63, 4.08)
pt3dadd(62.61, 159.82, -63, 4.08)
pt3dadd(62.43, 159.62, -63, 4.08)
pt3dadd(62.08, 159.41, -63, 4.08)
pt3dadd(61.9, 159.21, -63, 4.08)
pt3dadd(61.54, 159.21, -63, 4.08)
pt3dadd(61.36, 159.01, -63, 4.08)
pt3dadd(61.18, 158.81, -63, 4.08)
pt3dadd(61.01, 158.6, -63, 4.08)
pt3dadd(60.65, 158.2, -63, 3.4)
pt3dadd(59.94, 158, -63, 3.4)
pt3dadd(59.76, 157.79, -63, 3.4)
pt3dadd(59.22, 157.19, -63, 3.4)
pt3dadd(59.04, 156.98, -63, 3.4)
pt3dadd(58.15, 156.98, -63, 3.4)
pt3dadd(57.8, 156.78, -63, 3.4)
pt3dadd(57.62, 156.58, -63, 3.4)
pt3dadd(57.26, 156.38, -63, 3.4)
pt3dadd(56.9, 156.17, -63, 3.4)
pt3dadd(56.55, 155.97, -63, 3.4)
pt3dadd(56.37, 155.57, -63, 3.4)
pt3dadd(55.66, 154.76, -63, 3.4)
pt3dadd(55.3, 154.76, -63, 3.4)
pt3dadd(55.12, 154.55, -63, 3.4)
pt3dadd(54.94, 154.35, -63, 3.4)
pt3dadd(54.76, 154.15, -63, 3.4)
pt3dadd(54.41, 154.15, -63, 3.4)
pt3dadd(54.23, 153.94, -63, 3.4)
pt3dadd(54.05, 153.74, -63, 3.4)
pt3dadd(53.87, 153.54, -63, 3.4)
pt3dadd(53.52, 153.34, -63, 3.4)
pt3dadd(53.16, 153.13, -63, 3.4)
pt3dadd(52.98, 152.73, -63, 3.4)
pt3dadd(52.8, 152.53, -63, 3.4)
pt3dadd(52.45, 152.12, -63, 3.4)
pt3dadd(52.27, 151.92, -63, 3.4)
pt3dadd(51.91, 151.51, -63, 3.4)
pt3dadd(51.55, 151.31, -63, 3.4)
pt3dadd(51.2, 151.11, -63, 3.4)
pt3dadd(51.02, 150.91, -63, 3.4)
pt3dadd(50.84, 150.5, -63, 3.4)
pt3dadd(50.66, 150.3, -63, 3.4)
pt3dadd(50.31, 150.3, -63, 3.4)
pt3dadd(50.13, 150.1, -63, 3.4)
pt3dadd(49.95, 149.89, -63, 3.4)
pt3dadd(49.59, 149.69, -63, 3.4)
pt3dadd(49.24, 149.49, -63, 3.4)
pt3dadd(49.06, 149.29, -63, 3.4)
pt3dadd(48.88, 149.08, -63, 3.4)
pt3dadd(48.7, 148.88, -63, 3.4)
pt3dadd(48.52, 148.68, -63, 3.4)
pt3dadd(47.99, 148.07, -63, 3.4)
pt3dadd(47.81, 147.87, -63, 3.4)
pt3dadd(47.63, 147.46, -63, 3.4)
pt3dadd(46.92, 146.65, -63, 3.4)
pt3dadd(46.74, 146.25, -63, 3.4)
pt3dadd(46.56, 145.84, -63, 3.4)
pt3dadd(46.38, 145.64, -63, 3.4)
pt3dadd(46.03, 145.24, -63, 3.4)
pt3dadd(45.85, 145.03, -63, 3.4)
pt3dadd(45.67, 144.63, -63, 3.4)
pt3dadd(45.31, 144.43, -63, 3.4)
pt3dadd(45.13, 144.02, -63, 3.4)
pt3dadd(44.78, 143.61, -63, 3.4)
pt3dadd(44.6, 143.41, -63, 3.4)
pt3dadd(44.6, 143.01, -63, 3.4)
pt3dadd(44.42, 142.8, -63, 3.4)
pt3dadd(44.24, 142.6, -63, 3.4)
pt3dadd(43.89, 142.4, -63, 3.4)
pt3dadd(43.71, 141.99, -63, 3.4)
pt3dadd(43.35, 141.79, -63, 3.4)
pt3dadd(43.35, 141.39, -63, 3.4)
pt3dadd(43.17, 141.18, -63, 3.4)
pt3dadd(42.64, 140.58, -63, 3.4)
pt3dadd(42.46, 140.37, -63, 3.4)
pt3dadd(42.28, 139.97, -63, 3.4)
pt3dadd(42.1, 139.56, -63, 3.4)
pt3dadd(41.92, 139.16, -63, 3.4)
pt3dadd(41.75, 138.96, -63, 3.4)
pt3dadd(41.57, 138.75, -63, 3.4)
pt3dadd(41.39, 138.35, -63, 3.4)
pt3dadd(41.21, 138.15, -63, 3.4)
pt3dadd(41.03, 137.74, -63, 3.4)
pt3dadd(41.03, 137.34, -63, 3.4)
pt3dadd(40.85, 137.13, -63, 3.4)
pt3dadd(40.85, 136.53, -63, 3.4)
pt3dadd(40.68, 136.32, -63, 3.4)
pt3dadd(40.5, 135.92, -63, 3.4)
pt3dadd(40.5, 135.51, -63, 3.4)
pt3dadd(40.32, 135.31, -63, 3.4)
pt3dadd(40.14, 134.91, -63, 3.4)
pt3dadd(39.96, 134.91, -63, 3.4)
pt3dadd(40.5, 135.11, -65.1, 3.4)
pt3dadd(40.14, 134.91, -65.1, 3.4)
pt3dadd(39.78, 134.5, -65.1, 3.4)
pt3dadd(39.61, 134.3, -65.1, 3.4)
pt3dadd(39.25, 134.1, -65.1, 3.4)
pt3dadd(38.89, 133.89, -65.1, 3.4)
pt3dadd(38.71, 133.69, -65.1, 3.4)
pt3dadd(38.54, 133.49, -65.1, 3.4)
pt3dadd(38.36, 133.29, -65.1, 3.4)
pt3dadd(38.18, 133.08, -65.1, 3.4)
pt3dadd(38, 132.88, -65.1, 3.4)
pt3dadd(37.82, 132.68, -65.1, 3.4)
pt3dadd(37.64, 132.27, -65.1, 3.4)
pt3dadd(37.47, 132.07, -65.1, 3.4)
pt3dadd(37.29, 131.66, -65.1, 3.4)
pt3dadd(37.11, 131.46, -65.1, 3.4)
pt3dadd(36.75, 131.06, -65.1, 3.4)
pt3dadd(36.57, 130.85, -65.1, 3.4)
pt3dadd(36.4, 130.65, -65.1, 3.4)
pt3dadd(36.22, 130.45, -65.1, 3.4)
pt3dadd(36.04, 130.25, -65.1, 3.4)
pt3dadd(35.86, 130.04, -65.1, 3.4)
pt3dadd(35.86, 129.64, -65.1, 3.4)
pt3dadd(35.68, 129.44, -65.1, 3.4)
pt3dadd(35.5, 129.23, -65.1, 3.4)
pt3dadd(35.15, 129.03, -65.1, 3.4)
pt3dadd(35.15, 128.63, -65.1, 3.4)
pt3dadd(34.79, 128.42, -65.1, 3.4)
pt3dadd(34.79, 128.02, -65.1, 3.4)
pt3dadd(34.43, 127.82, -65.1, 3.4)
pt3dadd(34.08, 127.21, -65.1, 3.4)
pt3dadd(33.72, 126.8, -65.1, 3.4)
pt3dadd(33.54, 126.4, -65.1, 3.4)
pt3dadd(33.19, 125.99, -65.1, 3.4)
pt3dadd(33.01, 125.79, -65.1, 3.4)
pt3dadd(32.83, 125.39, -65.1, 3.4)
pt3dadd(32.65, 125.18, -65.1, 3.4)
pt3dadd(32.47, 124.78, -65.1, 3.4)
pt3dadd(32.29, 124.37, -65.1, 3.4)
pt3dadd(32.12, 124.17, -65.1, 3.4)
pt3dadd(31.94, 123.97, -65.1, 3.4)
pt3dadd(31.76, 123.77, -65.1, 3.4)
pt3dadd(31.58, 123.56, -65.1, 3.4)
pt3dadd(31.4, 123.36, -65.1, 3.4)
pt3dadd(31.22, 122.96, -65.1, 3.4)
pt3dadd(31.05, 122.75, -65.1, 3.4)
pt3dadd(30.87, 122.35, -65.1, 3.4)
pt3dadd(30.51, 122.15, -65.1, 3.4)
pt3dadd(30.33, 121.74, -65.1, 3.4)
pt3dadd(30.15, 121.33, -65.1, 3.4)
pt3dadd(29.98, 121.13, -65.1, 3.4)
pt3dadd(29.8, 120.93, -65.1, 3.4)
pt3dadd(29.62, 120.52, -65.1, 3.4)
pt3dadd(29.44, 120.32, -65.1, 3.4)
pt3dadd(29.26, 120.12, -65.1, 3.4)
pt3dadd(29.08, 119.92, -65.1, 3.4)
pt3dadd(28.73, 119.31, -65.1, 3.4)
pt3dadd(28.55, 118.9, -65.1, 3.4)
pt3dadd(28.37, 118.7, -65.1, 3.4)
pt3dadd(28.19, 118.3, -65.1, 3.4)
pt3dadd(28.01, 118.09, -65.1, 3.4)
pt3dadd(28.01, 117.69, -65.1, 3.4)
pt3dadd(27.66, 117.49, -65.1, 3.4)
}
}
proc shape3d_44() {
dend[38] { pt3dadd(27.48, 117.08, -65.1, 3.4)
pt3dadd(27.3, 116.68, -65.1, 3.4)
pt3dadd(27.12, 116.27, -65.1, 3.4)
pt3dadd(26.94, 115.87, -65.1, 3.4)
pt3dadd(26.77, 115.66, -65.1, 3.4)
pt3dadd(26.59, 115.46, -65.1, 3.4)
pt3dadd(26.41, 115.06, -65.1, 3.4)
pt3dadd(26.23, 114.85, -65.1, 3.4)
pt3dadd(25.87, 114.65, -65.1, 3.4)
pt3dadd(25.87, 114.25, -65.1, 3.4)
pt3dadd(25.52, 114.04, -65.1, 3.4)
pt3dadd(25.34, 113.64, -65.1, 3.4)
pt3dadd(25.16, 113.23, -65.1, 3.4)
pt3dadd(24.98, 112.83, -65.1, 3.4)
pt3dadd(24.8, 112.63, -65.1, 3.4)
pt3dadd(24.8, 112.22, -65.1, 3.4)
pt3dadd(24.63, 111.61, -65.1, 3.4)
pt3dadd(24.45, 111.41, -65.1, 3.4)
pt3dadd(24.27, 111.21, -65.1, 3.4)
pt3dadd(24.09, 110.6, -65.1, 3.4)
pt3dadd(23.91, 110.19, -65.1, 3.4)
pt3dadd(23.73, 109.79, -65.1, 3.4)
pt3dadd(23.73, 108.98, -65.1, 3.4)
pt3dadd(23.56, 108.57, -65.1, 3.4)
pt3dadd(23.38, 108.17, -65.1, 3.4)
pt3dadd(23.38, 107.56, -65.1, 3.4)
pt3dadd(23.2, 107.16, -65.1, 3.4)
pt3dadd(23.02, 106.55, -65.1, 3.4)
pt3dadd(22.84, 106.14, -65.1, 3.4)
pt3dadd(22.84, 105.54, -65.1, 3.4)
pt3dadd(22.66, 105.33, -65.1, 3.4)
pt3dadd(22.66, 104.93, -65.1, 3.4)
pt3dadd(22.49, 104.52, -65.1, 3.4)
pt3dadd(22.31, 104.12, -65.1, 3.4)
pt3dadd(22.31, 103.11, -65.1, 3.4)
pt3dadd(22.13, 102.7, -65.1, 3.4)
pt3dadd(22.13, 102.09, -65.1, 3.4)
pt3dadd(21.95, 101.89, -65.1, 3.4)
pt3dadd(21.95, 101.08, -65.1, 3.4)
pt3dadd(21.77, 100.68, -65.1, 3.4)
pt3dadd(21.77, 100.07, -65.1, 3.4)
pt3dadd(21.59, 99.46, -65.1, 3.4)
pt3dadd(21.42, 99.05, -65.1, 3.4)
pt3dadd(21.42, 98.04, -65.1, 3.4)
pt3dadd(21.24, 97.64, -65.1, 3.4)
pt3dadd(21.24, 97.03, -65.1, 3.4)
pt3dadd(21.06, 96.62, -65.1, 3.4)
pt3dadd(21.06, 95.81, -65.1, 3.4)
pt3dadd(20.88, 95.41, -65.1, 3.4)
pt3dadd(20.7, 95, -65.1, 3.4)
pt3dadd(20.7, 94.4, -65.1, 3.4)
pt3dadd(20.52, 93.99, -65.1, 3.4)
pt3dadd(20.35, 93.59, -65.1, 3.4)
pt3dadd(20.35, 93.18, -65.1, 3.4)
pt3dadd(20.17, 92.98, -65.1, 3.4)
pt3dadd(20.17, 92.37, -65.1, 3.4)
pt3dadd(19.99, 92.17, -65.1, 3.4)
pt3dadd(19.81, 91.97, -65.1, 3.4)
pt3dadd(19.81, 91.56, -65.1, 3.4)
pt3dadd(19.63, 91.16, -65.1, 3.4)
pt3dadd(19.63, 90.75, -65.1, 3.4)
pt3dadd(19.45, 90.35, -65.1, 3.4)
pt3dadd(19.28, 89.94, -65.1, 3.4)
pt3dadd(19.28, 88.93, -65.1, 3.4)
pt3dadd(19.1, 88.72, -65.1, 3.4)
pt3dadd(19.1, 89.74, -65.1, 3.4)
pt3dadd(19.63, 90.14, -66.15, 3.4)
pt3dadd(19.45, 89.74, -66.15, 3.4)
pt3dadd(19.28, 89.33, -66.15, 3.4)
pt3dadd(19.1, 88.93, -66.15, 3.4)
pt3dadd(18.92, 88.52, -66.15, 3.4)
pt3dadd(18.74, 88.32, -66.15, 3.4)
pt3dadd(18.74, 87.91, -66.15, 3.4)
pt3dadd(18.56, 87.51, -66.15, 3.4)
pt3dadd(18.38, 87.31, -66.15, 3.4)
pt3dadd(18.21, 86.9, -66.15, 3.4)
pt3dadd(18.03, 86.7, -66.15, 3.4)
pt3dadd(17.85, 86.29, -66.15, 3.4)
pt3dadd(17.85, 85.89, -66.15, 3.4)
pt3dadd(17.67, 85.48, -66.15, 3.4)
pt3dadd(17.49, 85.08, -66.15, 3.4)
pt3dadd(17.31, 84.88, -66.15, 3.4)
pt3dadd(17.14, 84.67, -66.15, 3.4)
pt3dadd(16.96, 84.47, -66.15, 3.4)
pt3dadd(16.78, 83.86, -66.15, 3.4)
pt3dadd(16.6, 83.66, -66.15, 3.4)
pt3dadd(16.6, 83.26, -66.15, 3.4)
pt3dadd(16.42, 83.05, -66.15, 3.4)
pt3dadd(16.24, 82.85, -66.15, 3.4)
pt3dadd(16.07, 82.45, -66.15, 3.4)
pt3dadd(15.89, 82.24, -66.15, 3.4)
pt3dadd(15.71, 82.04, -66.15, 3.4)
pt3dadd(15.53, 81.84, -66.15, 3.4)
pt3dadd(15.35, 81.64, -66.15, 3.4)
pt3dadd(15.17, 81.43, -66.15, 3.4)
pt3dadd(15, 81.03, -66.15, 3.4)
pt3dadd(14.82, 80.62, -66.15, 3.4)
pt3dadd(14.64, 80.22, -66.15, 3.4)
pt3dadd(14.46, 79.81, -66.15, 3.4)
pt3dadd(14.28, 79.21, -66.15, 3.4)
pt3dadd(14.1, 79, -66.15, 3.4)
pt3dadd(13.93, 78.6, -66.15, 3.4)
pt3dadd(13.75, 78.19, -66.15, 3.4)
pt3dadd(13.57, 77.58, -66.15, 3.4)
pt3dadd(13.39, 77.38, -66.15, 3.4)
pt3dadd(13.21, 76.98, -66.15, 3.4)
pt3dadd(13.03, 76.77, -66.15, 3.4)
pt3dadd(12.86, 76.57, -66.15, 3.4)
pt3dadd(12.68, 76.17, -66.15, 3.4)
pt3dadd(12.5, 75.76, -66.15, 3.4)
pt3dadd(12.32, 75.36, -66.15, 3.4)
pt3dadd(12.14, 75.15, -66.15, 3.4)
pt3dadd(11.97, 74.75, -66.15, 3.4)
pt3dadd(11.97, 74.34, -66.15, 3.4)
pt3dadd(11.79, 74.14, -66.15, 3.4)
pt3dadd(11.61, 73.74, -66.15, 3.4)
pt3dadd(11.43, 73.33, -66.15, 3.4)
pt3dadd(11.25, 72.93, -66.15, 3.4)
pt3dadd(11.07, 72.32, -66.15, 3.4)
pt3dadd(10.9, 71.91, -66.15, 3.4)
pt3dadd(10.9, 71.51, -66.15, 3.4)
pt3dadd(10.72, 71.1, -66.15, 3.4)
pt3dadd(10.54, 70.5, -66.15, 3.4)
pt3dadd(10.54, 70.09, -66.15, 3.4)
pt3dadd(10.36, 69.69, -66.15, 3.4)
pt3dadd(10.18, 69.28, -66.15, 3.4)
pt3dadd(10.18, 68.88, -66.15, 3.4)
pt3dadd(10, 68.67, -66.15, 3.4)
pt3dadd(9.83, 68.27, -66.15, 3.4)
pt3dadd(9.65, 68.07, -66.15, 3.4)
pt3dadd(9.47, 67.66, -66.15, 3.4)
pt3dadd(9.29, 67.26, -66.15, 3.4)
pt3dadd(9.11, 66.85, -66.15, 3.4)
pt3dadd(8.93, 66.65, -66.15, 3.4)
pt3dadd(8.76, 66.44, -66.15, 3.4)
pt3dadd(8.58, 66.04, -66.15, 3.4)
pt3dadd(8.4, 65.63, -66.15, 3.4)
pt3dadd(8.22, 65.43, -66.15, 3.4)
pt3dadd(8.04, 65.23, -66.15, 3.4)
pt3dadd(7.86, 64.82, -66.15, 3.4)
pt3dadd(7.69, 64.42, -66.15, 3.4)
pt3dadd(7.51, 64.22, -66.15, 3.4)
pt3dadd(7.33, 64.01, -66.15, 3.4)
pt3dadd(7.15, 63.81, -66.15, 3.4)
pt3dadd(6.97, 63.61, -66.15, 3.4)
pt3dadd(6.79, 63.41, -66.15, 3.4)
pt3dadd(6.62, 63.2, -66.15, 3.4)
pt3dadd(6.44, 63, -66.15, 3.4)
pt3dadd(6.26, 62.8, -66.15, 3.4)
pt3dadd(6.08, 62.6, -66.15, 3.4)
pt3dadd(5.9, 62.39, -66.15, 3.4)
pt3dadd(5.72, 62.19, -66.15, 3.4)
pt3dadd(5.55, 61.99, -66.15, 3.4)
pt3dadd(5.37, 61.79, -66.15, 3.4)
pt3dadd(5.19, 61.58, -66.15, 3.4)
pt3dadd(5.01, 61.38, -66.15, 3.4)
pt3dadd(4.83, 61.18, -66.15, 3.4)
pt3dadd(4.65, 60.98, -66.15, 3.4)
pt3dadd(4.48, 60.77, -66.15, 3.4)
pt3dadd(4.3, 60.57, -66.15, 3.4)
pt3dadd(3.94, 60.37, -66.15, 3.4)
pt3dadd(3.58, 59.96, -66.15, 3.4)
pt3dadd(3.41, 59.76, -66.15, 3.4)
pt3dadd(3.05, 59.76, -66.15, 3.4)
pt3dadd(2.87, 59.56, -66.15, 3.4)
pt3dadd(2.69, 59.15, -66.15, 3.4)
pt3dadd(2.34, 58.95, -66.15, 3.4)
pt3dadd(2.16, 58.75, -66.15, 3.4)
pt3dadd(1.8, 58.55, -66.15, 3.4)
pt3dadd(1.62, 58.34, -66.15, 3.4)
pt3dadd(1.27, 58.14, -66.15, 3.4)
pt3dadd(1.09, 57.94, -66.15, 3.4)
pt3dadd(0.91, 57.74, -66.15, 3.4)
pt3dadd(0.55, 57.53, -66.15, 3.4)
pt3dadd(0.37, 57.33, -66.15, 3.4)
pt3dadd(0.2, 56.93, -66.15, 3.4)
pt3dadd(0.02, 56.72, -66.15, 3.4)
pt3dadd(-0.16, 56.52, -66.15, 3.4)
pt3dadd(-0.52, 56.32, -66.15, 3.4)
pt3dadd(-0.87, 55.91, -66.15, 3.4)
pt3dadd(-1.05, 55.51, -66.15, 3.4)
pt3dadd(-1.23, 55.3, -66.15, 3.4)
pt3dadd(-1.59, 55.3, -66.15, 3.4)
pt3dadd(-2.12, 54.9, -66.15, 3.4)
pt3dadd(-2.48, 54.7, -66.15, 3.4)
pt3dadd(-2.84, 54.29, -66.15, 3.4)
pt3dadd(-3.19, 54.09, -66.15, 3.4)
pt3dadd(-3.55, 54.09, -66.15, 3.4)
pt3dadd(-3.55, 54.49, -66.15, 3.4)
pt3dadd(-3.37, 54.9, -66.15, 3.4)
pt3dadd(-3.19, 54.29, -68.25, 2.89)
pt3dadd(-3.37, 54.09, -68.25, 2.89)
pt3dadd(-3.55, 53.89, -68.25, 2.89)
pt3dadd(-4.08, 53.28, -68.25, 2.89)
pt3dadd(-4.26, 53.08, -68.25, 2.89)
pt3dadd(-4.62, 52.87, -68.25, 2.89)
pt3dadd(-4.8, 52.67, -68.25, 2.89)
pt3dadd(-4.98, 52.47, -68.25, 2.89)
pt3dadd(-5.15, 52.06, -68.25, 2.89)
pt3dadd(-5.33, 51.66, -68.25, 2.89)
}
}
proc shape3d_45() {
dend[38] { pt3dadd(-5.51, 51.46, -68.25, 2.89)
pt3dadd(-5.69, 51.25, -68.25, 2.89)
pt3dadd(-5.87, 51.05, -68.25, 2.89)
pt3dadd(-6.05, 50.85, -68.25, 2.89)
pt3dadd(-6.22, 50.65, -68.25, 2.89)
pt3dadd(-6.4, 50.24, -68.25, 2.89)
pt3dadd(-6.58, 49.84, -68.25, 2.89)
pt3dadd(-6.76, 49.63, -68.25, 2.89)
pt3dadd(-6.94, 49.43, -68.25, 2.89)
pt3dadd(-6.94, 49.03, -68.25, 2.89)
pt3dadd(-7.12, 48.82, -68.25, 2.89)
pt3dadd(-7.47, 48.42, -68.25, 2.89)
pt3dadd(-7.65, 48.22, -68.25, 2.89)
pt3dadd(-7.83, 47.81, -68.25, 2.89)
pt3dadd(-8.01, 47.41, -68.25, 2.89)
pt3dadd(-8.19, 47, -68.25, 2.89)
pt3dadd(-8.36, 46.8, -68.25, 2.89)
pt3dadd(-8.54, 45.99, -68.25, 3.06)
pt3dadd(-8.72, 45.79, -68.25, 3.06)
pt3dadd(-8.9, 45.58, -68.25, 3.06)
pt3dadd(-9.08, 45.38, -68.25, 3.06)
pt3dadd(-9.26, 45.18, -68.25, 3.06)
pt3dadd(-9.43, 44.97, -68.25, 3.06)
pt3dadd(-9.61, 44.77, -68.25, 3.06)
pt3dadd(-9.79, 44.57, -68.25, 3.06)
pt3dadd(-9.97, 44.37, -68.25, 3.06)
pt3dadd(-10.15, 44.16, -68.25, 3.06)
pt3dadd(-10.15, 42.54, -68.25, 3.06)
pt3dadd(-10.33, 42.34, -68.25, 3.06)
pt3dadd(-10.33, 41.94, -68.25, 3.06)
pt3dadd(-10.5, 41.53, -68.25, 3.06)
pt3dadd(-10.68, 41.13, -68.25, 3.06)
pt3dadd(-10.68, 40.52, -68.25, 3.06)
pt3dadd(-10.86, 40.32, -68.25, 3.06)
pt3dadd(-10.86, 39.91, -68.25, 3.06)
pt3dadd(-11.04, 39.71, -68.25, 3.06)
pt3dadd(-11.04, 39.3, -68.25, 3.06)
pt3dadd(-11.22, 39.1, -68.25, 3.06)
pt3dadd(-11.57, 38.9, -68.25, 3.06)
pt3dadd(-11.57, 38.29, -68.25, 3.06)
pt3dadd(-11.75, 37.89, -68.25, 3.06)
pt3dadd(-11.75, 37.28, -68.25, 3.06)
pt3dadd(-11.93, 37.08, -68.25, 3.06)
pt3dadd(-12.11, 36.87, -68.25, 3.06)
pt3dadd(-12.11, 36.27, -68.25, 3.06)
pt3dadd(-12.29, 36.06, -68.25, 3.06)
pt3dadd(-12.47, 35.86, -68.25, 3.06)
pt3dadd(-12.47, 35.46, -68.25, 3.06)
pt3dadd(-12.64, 35.05, -68.25, 3.06)
pt3dadd(-12.82, 34.85, -68.25, 3.06)
pt3dadd(-13, 34.65, -68.25, 3.06)
pt3dadd(-13.18, 34.24, -68.25, 3.06)
pt3dadd(-13.36, 33.83, -68.25, 3.06)
pt3dadd(-13.36, 33.43, -68.25, 3.06)
pt3dadd(-13.54, 33.02, -68.25, 3.06)
pt3dadd(-13.71, 32.82, -68.25, 3.06)
pt3dadd(-13.71, 32.21, -68.25, 3.06)
pt3dadd(-13.89, 32.01, -68.25, 3.06)
pt3dadd(-14.07, 31.81, -68.25, 3.06)
pt3dadd(-14.07, 31.4, -68.25, 3.06)
pt3dadd(-14.43, 31, -68.25, 3.23)
pt3dadd(-17.1, 28.37, -68.25, 3.23)
pt3dadd(-16.75, 28.57, -68.25, 3.23)
pt3dadd(-16.92, 28.37, -68.25, 3.23)
pt3dadd(-17.1, 28.16, -68.25, 3.23)
pt3dadd(-17.28, 27.96, -68.25, 3.23)
pt3dadd(-17.64, 27.96, -68.25, 3.23)
pt3dadd(-17.82, 27.76, -68.25, 3.23)
pt3dadd(-17.99, 27.56, -68.25, 3.23)
pt3dadd(-18.17, 27.35, -68.25, 3.23)
pt3dadd(-18.35, 27.15, -68.25, 3.23)
pt3dadd(-18.53, 26.95, -68.25, 3.23)
pt3dadd(-18.71, 26.75, -68.25, 3.23)
pt3dadd(-18.71, 26.34, -68.25, 3.23)
pt3dadd(-19.06, 26.14, -68.25, 3.23)
pt3dadd(-19.24, 25.94, -68.25, 3.23)
pt3dadd(-19.42, 25.73, -68.25, 3.23)
pt3dadd(-19.6, 25.53, -68.25, 3.23)
pt3dadd(-19.78, 25.33, -68.25, 3.23)
pt3dadd(-19.96, 25.13, -68.25, 3.23)
pt3dadd(-20.13, 24.92, -68.25, 3.23)
pt3dadd(-20.31, 24.72, -68.25, 3.23)
pt3dadd(-20.49, 24.52, -68.25, 3.23)
pt3dadd(-20.67, 24.32, -68.25, 3.23)
pt3dadd(-20.85, 24.11, -68.25, 3.23)
pt3dadd(-21.03, 23.91, -68.25, 3.23)
pt3dadd(-21.2, 23.71, -68.25, 3.23)
pt3dadd(-21.38, 23.3, -68.25, 3.23)
pt3dadd(-21.38, 22.9, -68.25, 3.23)
pt3dadd(-21.56, 22.69, -68.25, 3.23)
pt3dadd(-21.74, 22.29, -68.25, 3.23)
pt3dadd(-21.92, 22.09, -68.25, 3.23)
pt3dadd(-22.1, 21.88, -68.25, 3.23)
pt3dadd(-22.1, 21.48, -68.25, 3.23)
pt3dadd(-22.27, 21.28, -68.25, 3.23)
pt3dadd(-22.27, 20.87, -68.25, 3.23)
pt3dadd(-22.45, 20.67, -68.25, 3.23)
pt3dadd(-22.45, 20.47, -68.25, 3.23)
pt3dadd(-23.17, 20.06, -68.25, 3.4)
pt3dadd(-23.34, 19.86, -68.25, 3.4)
pt3dadd(-23.52, 19.66, -68.25, 3.4)
pt3dadd(-23.7, 19.45, -68.25, 3.4)
pt3dadd(-23.88, 19.25, -68.25, 3.4)
pt3dadd(-24.06, 19.05, -68.25, 3.4)
pt3dadd(-24.24, 18.85, -68.25, 3.4)
pt3dadd(-24.41, 18.64, -68.25, 3.4)
pt3dadd(-24.59, 18.44, -68.25, 3.4)
pt3dadd(-24.77, 18.24, -68.25, 3.4)
pt3dadd(-24.95, 18.04, -68.25, 3.4)
pt3dadd(-25.13, 17.83, -68.25, 3.4)
pt3dadd(-25.31, 17.63, -68.25, 3.4)
pt3dadd(-25.48, 17.43, -68.25, 3.4)
pt3dadd(-25.66, 17.23, -68.25, 3.4)
pt3dadd(-25.84, 17.02, -68.25, 3.4)
pt3dadd(-26.02, 16.82, -68.25, 3.4)
pt3dadd(-26.2, 16.62, -68.25, 3.4)
pt3dadd(-26.38, 16.42, -68.25, 3.4)
pt3dadd(-26.55, 16.21, -68.25, 3.4)
pt3dadd(-26.73, 16.01, -68.25, 3.4)
pt3dadd(-26.91, 15.81, -68.25, 3.4)
pt3dadd(-27.09, 15.61, -68.25, 3.4)
pt3dadd(-27.27, 15.4, -68.25, 3.4)
pt3dadd(-27.45, 15.2, -68.25, 3.4)
pt3dadd(-27.62, 15, -68.25, 3.4)
pt3dadd(-27.8, 14.8, -68.25, 3.4)
pt3dadd(-27.98, 14.59, -68.25, 3.4)
pt3dadd(-28.16, 14.39, -68.25, 3.4)
pt3dadd(-28.34, 14.19, -68.25, 3.4)
pt3dadd(-28.52, 13.99, -68.25, 3.4)
pt3dadd(-28.69, 13.78, -68.25, 3.4)
pt3dadd(-28.87, 13.58, -68.25, 3.4)
pt3dadd(-29.05, 13.38, -68.25, 3.4)
pt3dadd(-29.23, 13.18, -68.25, 3.4)
pt3dadd(-29.41, 12.77, -68.25, 3.4)
pt3dadd(-29.76, 12.77, -68.25, 3.4)
pt3dadd(-29.94, 12.57, -68.25, 3.4)
pt3dadd(-30.12, 12.37, -68.25, 3.4)
pt3dadd(-30.66, 11.76, -68.25, 3.4)
pt3dadd(-31.01, 11.55, -68.25, 3.4)
pt3dadd(-31.37, 11.35, -68.25, 3.4)
pt3dadd(-31.73, 11.15, -68.25, 3.4)
pt3dadd(-31.9, 10.95, -68.25, 3.4)
pt3dadd(-32.26, 10.54, -68.25, 3.4)
pt3dadd(-32.44, 10.34, -68.25, 3.4)
pt3dadd(-32.62, 10.14, -68.25, 3.4)
pt3dadd(-32.8, 9.93, -68.25, 3.4)
pt3dadd(-33.15, 9.93, -68.25, 3.4)
pt3dadd(-33.33, 9.73, -68.25, 3.4)
pt3dadd(-33.69, 9.53, -68.25, 3.4)
pt3dadd(-34.04, 9.33, -68.25, 3.4)
pt3dadd(-34.22, 9.12, -68.25, 3.4)
pt3dadd(-34.4, 8.92, -68.25, 3.4)
pt3dadd(-34.76, 8.72, -68.25, 3.4)
pt3dadd(-35.11, 8.52, -68.25, 3.4)
pt3dadd(-35.29, 8.31, -68.25, 3.4)
pt3dadd(-35.47, 7.91, -68.25, 3.4)
pt3dadd(-36.01, 7.71, -68.25, 3.4)
pt3dadd(-36.54, 7.1, -68.25, 3.4)
pt3dadd(-36.9, 6.9, -68.25, 3.4)
pt3dadd(-37.08, 6.69, -68.25, 3.4)
pt3dadd(-37.25, 6.49, -68.25, 3.4)
pt3dadd(-37.61, 6.29, -68.25, 3.4)
pt3dadd(-37.79, 5.88, -68.25, 3.4)
pt3dadd(-37.97, 5.68, -68.25, 3.4)
pt3dadd(-38.5, 5.07, -68.25, 3.4)
pt3dadd(-38.86, 4.87, -68.25, 3.4)
pt3dadd(-39.04, 4.67, -68.25, 3.4)
pt3dadd(-39.39, 4.47, -68.25, 3.4)
pt3dadd(-39.75, 4.06, -68.25, 3.4)
pt3dadd(-40.11, 3.86, -68.25, 3.4)
pt3dadd(-40.46, 3.66, -68.25, 3.4)
pt3dadd(-40.82, 3.45, -68.25, 3.4)
pt3dadd(-41, 3.05, -68.25, 3.4)
pt3dadd(-41.18, 2.85, -68.25, 3.4)
pt3dadd(-41.53, 2.64, -68.25, 3.4)
pt3dadd(-41.89, 2.44, -68.25, 3.4)
pt3dadd(-42.07, 2.24, -68.25, 3.4)
pt3dadd(-42.43, 2.24, -68.25, 3.4)
pt3dadd(-42.6, 2.04, -68.25, 3.4)
pt3dadd(-43.14, 2.04, -68.25, 3.4)
pt3dadd(-43.32, 1.83, -68.25, 3.4)
pt3dadd(-43.85, 1.83, -68.25, 3.4)
pt3dadd(-44.21, 1.63, -68.25, 3.4)
pt3dadd(-44.57, 1.43, -68.25, 3.4)
pt3dadd(-44.74, 1.22, -68.25, 3.4)
pt3dadd(-45.1, 1.02, -68.25, 3.4)
pt3dadd(-45.28, 0.82, -68.25, 3.4)
pt3dadd(-45.64, 0.62, -68.25, 3.4)
pt3dadd(-46.17, 0.62, -68.25, 3.4)
pt3dadd(-46.35, 0.41, -68.25, 3.4)
pt3dadd(-46.71, 0.21, -68.25, 3.4)
pt3dadd(-47.06, 0.21, -68.25, 3.4)
pt3dadd(-47.42, 0.01, -68.25, 3.4)
pt3dadd(-47.78, 0.01, -68.25, 3.4)
pt3dadd(-47.95, -0.4, -68.25, 3.4)
pt3dadd(-48.31, -0.4, -68.25, 3.4)
pt3dadd(-48.49, -0.6, -68.25, 3.4)
pt3dadd(-48.85, -0.8, -68.25, 3.4)
pt3dadd(-49.02, -1, -68.25, 3.4)
pt3dadd(-49.38, -1, -68.25, 3.4)
}
}
proc shape3d_46() {
dend[38] { pt3dadd(-49.56, -1.21, -68.25, 3.4)
pt3dadd(-49.92, -1.41, -68.25, 3.4)
pt3dadd(-50.09, -1.61, -68.25, 3.4)
pt3dadd(-50.27, -1.81, -68.25, 3.4)
pt3dadd(-50.45, -2.02, -68.25, 3.4)
pt3dadd(-50.81, -2.02, -68.25, 3.4)
pt3dadd(-51.16, -2.22, -68.25, 3.4)
pt3dadd(-51.34, -2.42, -68.25, 3.4)
pt3dadd(-51.7, -2.42, -68.25, 3.4)
pt3dadd(-52.06, -2.62, -68.25, 3.4)
pt3dadd(-52.23, -2.83, -68.25, 3.4)
pt3dadd(-52.41, -3.03, -68.25, 3.4)
pt3dadd(-52.59, -3.23, -68.25, 3.4)
pt3dadd(-52.77, -3.43, -68.25, 3.4)
pt3dadd(-53.13, -3.43, -68.25, 3.4)
pt3dadd(-53.48, -3.84, -68.25, 3.4)
pt3dadd(-53.66, -4.04, -68.25, 3.4)
pt3dadd(-54.02, -4.45, -68.25, 3.4)
pt3dadd(-54.2, -4.65, -68.25, 3.4)
pt3dadd(-54.55, -4.85, -68.25, 3.4)
pt3dadd(-54.73, -5.05, -68.25, 3.4)
pt3dadd(-55.09, -5.26, -68.25, 3.4)
pt3dadd(-55.27, -5.46, -68.25, 3.4)
pt3dadd(-55.44, -5.66, -68.25, 3.4)
pt3dadd(-55.8, -5.86, -68.25, 3.4)
pt3dadd(-55.98, -6.27, -68.25, 3.4)
pt3dadd(-56.16, -6.47, -68.25, 3.4)
pt3dadd(-56.51, -6.88, -68.25, 3.4)
pt3dadd(-56.69, -7.08, -68.25, 3.4)
pt3dadd(-57.05, -7.28, -68.25, 3.4)
pt3dadd(-57.23, -7.48, -68.25, 3.4)
pt3dadd(-57.58, -7.69, -68.25, 3.4)
pt3dadd(-57.94, -7.89, -68.25, 3.4)
pt3dadd(-58.3, -8.09, -68.25, 3.4)
pt3dadd(-58.65, -8.09, -68.25, 3.4)
pt3dadd(-58.83, -8.29, -68.25, 3.4)
pt3dadd(-59.19, -8.5, -68.25, 3.4)
pt3dadd(-59.37, -8.7, -68.25, 3.4)
pt3dadd(-59.72, -8.7, -68.25, 3.4)
pt3dadd(-60.08, -8.9, -68.25, 3.4)
pt3dadd(-60.26, -9.1, -68.25, 3.4)
pt3dadd(-60.44, -9.31, -68.25, 3.4)
pt3dadd(-60.79, -9.51, -68.25, 3.4)
pt3dadd(-60.97, -9.71, -68.25, 3.4)
pt3dadd(-61.33, -9.92, -68.25, 3.4)
pt3dadd(-61.51, -10.12, -68.25, 3.4)
pt3dadd(-61.86, -10.32, -68.25, 3.4)
pt3dadd(-62.22, -10.52, -68.25, 3.4)
pt3dadd(-62.58, -10.73, -68.25, 3.4)
pt3dadd(-62.93, -10.73, -68.25, 3.4)
pt3dadd(-62.4, -10.93, -66.15, 3.4)
pt3dadd(-62.58, -11.13, -66.15, 3.4)
pt3dadd(-62.75, -11.33, -66.15, 3.4)
pt3dadd(-63.11, -11.33, -66.15, 3.4)
pt3dadd(-63.29, -11.54, -66.15, 3.4)
pt3dadd(-63.47, -11.74, -66.15, 3.4)
pt3dadd(-64, -11.74, -66.15, 3.4)
pt3dadd(-64.18, -11.94, -66.15, 3.4)
pt3dadd(-64.36, -12.14, -66.15, 3.4)
pt3dadd(-65.61, -12.14, -66.15, 3.4)
pt3dadd(-65.96, -12.35, -66.15, 3.4)
pt3dadd(-66.32, -12.55, -66.15, 3.4)
pt3dadd(-66.68, -12.75, -66.15, 3.4)
pt3dadd(-67.03, -12.75, -66.15, 3.4)
pt3dadd(-67.39, -12.95, -66.15, 3.4)
pt3dadd(-67.75, -12.95, -66.15, 3.4)
pt3dadd(-68.1, -13.16, -66.15, 3.4)
pt3dadd(-68.46, -13.36, -66.15, 3.4)
pt3dadd(-69, -13.36, -66.15, 3.4)
pt3dadd(-69.17, -13.56, -66.15, 3.4)
pt3dadd(-69.35, -13.76, -66.15, 3.4)
pt3dadd(-69.53, -13.97, -66.15, 3.4)
pt3dadd(-69.89, -14.17, -66.15, 3.4)
pt3dadd(-70.07, -14.37, -66.15, 3.4)
pt3dadd(-70.42, -14.37, -66.15, 3.4)
pt3dadd(-70.6, -14.57, -66.15, 3.4)
pt3dadd(-70.78, -14.78, -66.15, 3.4)
pt3dadd(-71.67, -14.78, -66.15, 3.4)
pt3dadd(-71.85, -14.98, -66.15, 3.4)
pt3dadd(-72.03, -15.18, -66.15, 3.4)
pt3dadd(-72.38, -15.38, -66.15, 3.4)
pt3dadd(-72.74, -15.59, -66.15, 3.4)
pt3dadd(-73.1, -15.59, -66.15, 3.4)
pt3dadd(-73.45, -15.79, -66.15, 3.4)
pt3dadd(-73.81, -15.79, -66.15, 3.4)
pt3dadd(-73.99, -15.99, -66.15, 3.4)
pt3dadd(-74.17, -16.19, -66.15, 3.4)
pt3dadd(-74.52, -16.19, -66.15, 3.4)
pt3dadd(-74.88, -16.4, -66.15, 3.4)
pt3dadd(-75.24, -16.6, -66.15, 3.4)
pt3dadd(-75.59, -16.6, -66.15, 3.4)
pt3dadd(-75.95, -16.8, -66.15, 3.4)
pt3dadd(-76.13, -17, -66.15, 3.4)
pt3dadd(-76.49, -17, -66.15, 3.4)
pt3dadd(-76.66, -17.21, -66.15, 3.4)
pt3dadd(-77.02, -17.41, -66.15, 3.4)
pt3dadd(-77.38, -17.61, -66.15, 3.4)
pt3dadd(-77.91, -17.61, -66.15, 3.4)
pt3dadd(-78.27, -17.81, -66.15, 3.4)
pt3dadd(-78.63, -18.02, -66.15, 3.4)
pt3dadd(-78.8, -18.22, -66.15, 3.4)
pt3dadd(-79.16, -18.42, -66.15, 3.4)
pt3dadd(-79.52, -18.42, -66.15, 3.4)
pt3dadd(-79.7, -18.62, -66.15, 3.4)
pt3dadd(-80.23, -18.62, -66.15, 3.4)
pt3dadd(-80.41, -18.83, -66.15, 3.4)
pt3dadd(-81.12, -18.83, -66.15, 3.4)
pt3dadd(-81.3, -19.03, -66.15, 3.4)
pt3dadd(-81.66, -19.03, -66.15, 3.4)
pt3dadd(-82.01, -19.23, -66.15, 3.4)
pt3dadd(-82.19, -19.43, -66.15, 3.4)
pt3dadd(-82.91, -19.43, -66.15, 3.4)
pt3dadd(-83.26, -19.64, -66.15, 3.4)
pt3dadd(-83.8, -19.64, -66.15, 3.4)
pt3dadd(-84.15, -19.84, -66.15, 3.4)
pt3dadd(-84.51, -20.04, -66.15, 3.4)
pt3dadd(-84.69, -20.24, -66.15, 3.4)
pt3dadd(-84.87, -20.45, -66.15, 3.4)
pt3dadd(-85.05, -20.65, -66.15, 3.4)
pt3dadd(-85.22, -20.85, -66.15, 3.4)
pt3dadd(-85.58, -21.06, -66.15, 3.4)
pt3dadd(-85.76, -21.26, -66.15, 3.4)
pt3dadd(-85.94, -21.46, -66.15, 3.4)
pt3dadd(-86.29, -21.66, -66.15, 3.4)
pt3dadd(-86.65, -21.87, -66.15, 3.4)
pt3dadd(-87.01, -22.07, -66.15, 3.4)
pt3dadd(-87.19, -22.27, -66.15, 3.4)
pt3dadd(-87.36, -22.47, -66.15, 3.4)
pt3dadd(-87.72, -22.68, -66.15, 3.4)
pt3dadd(-88.08, -23.08, -66.15, 3.4)
pt3dadd(-88.26, -23.28, -66.15, 3.4)
pt3dadd(-88.61, -23.49, -66.15, 3.4)
pt3dadd(-88.97, -23.49, -66.15, 3.4)
pt3dadd(-89.15, -23.89, -66.15, 3.4)
pt3dadd(-89.33, -23.69, -66.15, 3.4)
pt3dadd(-88.08, -22.68, -63, 3.4)
pt3dadd(-88.26, -22.88, -63, 3.4)
pt3dadd(-88.61, -22.88, -63, 3.4)
pt3dadd(-88.97, -23.08, -63, 3.4)
pt3dadd(-89.33, -23.28, -63, 3.4)
pt3dadd(-89.5, -23.49, -63, 3.4)
pt3dadd(-89.86, -23.49, -63, 3.4)
pt3dadd(-90.04, -23.69, -63, 3.4)
pt3dadd(-90.4, -23.89, -63, 3.4)
pt3dadd(-90.57, -24.09, -63, 3.4)
pt3dadd(-90.93, -24.3, -63, 3.4)
pt3dadd(-91.11, -24.5, -63, 3.4)
pt3dadd(-91.47, -24.5, -63, 3.4)
pt3dadd(-91.64, -24.7, -63, 3.4)
pt3dadd(-91.82, -24.9, -63, 3.4)
pt3dadd(-92, -25.11, -63, 3.4)
pt3dadd(-93.25, -26.52, -63, 3.4)
pt3dadd(-93.43, -26.73, -63, 3.4)
pt3dadd(-93.78, -26.93, -63, 3.4)
pt3dadd(-93.96, -27.13, -63, 3.4)
pt3dadd(-94.14, -27.33, -63, 3.4)
pt3dadd(-94.32, -27.74, -63, 3.4)
pt3dadd(-94.5, -28.14, -63, 3.4)
pt3dadd(-94.5, -28.55, -63, 3.4)
pt3dadd(-94.68, -28.95, -63, 3.4)
pt3dadd(-94.85, -29.36, -63, 3.4)
pt3dadd(-94.85, -29.97, -63, 3.4)
pt3dadd(-94.14, -29.56, -58.8, 3.4)
pt3dadd(-94.14, -30.17, -58.8, 3.4)
pt3dadd(-94.32, -30.37, -58.8, 3.4)
pt3dadd(-94.32, -33.01, -58.8, 3.4)
pt3dadd(-94.5, -33.21, -58.8, 3.4)
pt3dadd(-94.68, -33.61, -58.8, 3.4)
pt3dadd(-94.68, -34.02, -58.8, 3.4)
pt3dadd(-94.85, -34.22, -58.8, 3.4)
pt3dadd(-95.21, -34.42, -58.8, 3.4)
pt3dadd(-95.39, -34.63, -58.8, 3.4)
pt3dadd(-95.57, -35.03, -58.8, 3.4)
pt3dadd(-95.75, -35.23, -58.8, 3.4)
pt3dadd(-95.92, -35.44, -58.8, 3.4)
pt3dadd(-96.1, -35.64, -58.8, 3.4)
pt3dadd(-96.28, -35.84, -58.8, 3.4)
pt3dadd(-96.46, -36.04, -58.8, 3.4)
pt3dadd(-96.64, -36.25, -58.8, 3.4)
pt3dadd(-96.82, -36.45, -58.8, 3.4)
pt3dadd(-96.99, -36.85, -58.8, 3.4)
pt3dadd(-97.17, -37.06, -58.8, 3.4)
pt3dadd(-97.53, -37.06, -58.8, 3.4)
pt3dadd(-97.71, -37.46, -58.8, 3.4)
pt3dadd(-98.06, -37.66, -58.8, 3.4)
pt3dadd(-98.42, -37.66, -58.8, 3.4)
pt3dadd(-98.78, -38.07, -58.8, 3.4)
pt3dadd(-99.31, -38.07, -58.8, 3.4)
pt3dadd(-99.49, -38.27, -58.8, 3.4)
pt3dadd(-99.85, -38.47, -58.8, 3.4)
pt3dadd(-100.03, -38.68, -58.8, 3.4)
pt3dadd(-100.38, -38.88, -58.8, 3.4)
pt3dadd(-100.74, -39.08, -58.8, 3.4)
pt3dadd(-100.92, -39.28, -58.8, 3.4)
pt3dadd(-101.63, -39.28, -58.8, 3.4)
pt3dadd(-101.81, -39.49, -58.8, 3.4)
pt3dadd(-101.99, -39.69, -58.8, 3.4)
pt3dadd(-102.34, -39.69, -58.8, 3.4)
pt3dadd(-102.52, -39.89, -58.8, 3.4)
pt3dadd(-102.88, -39.89, -58.8, 3.4)
}
}
proc shape3d_47() {
dend[38] { pt3dadd(-103.06, -40.09, -58.8, 3.4)
pt3dadd(-103.77, -40.09, -58.8, 3.4)
pt3dadd(-103.95, -40.3, -58.8, 3.4)
pt3dadd(-104.13, -40.5, -58.8, 3.4)
pt3dadd(-104.48, -40.5, -58.8, 3.4)
pt3dadd(-104.84, -40.7, -58.8, 3.4)
pt3dadd(-105.02, -40.9, -58.8, 3.4)
pt3dadd(-105.55, -40.9, -58.8, 3.4)
pt3dadd(-105.73, -41.11, -58.8, 3.4)
pt3dadd(-106.27, -41.11, -58.8, 3.4)
pt3dadd(-106.45, -41.31, -58.8, 3.4)
pt3dadd(-107.16, -41.31, -58.8, 3.4)
pt3dadd(-107.34, -41.51, -58.8, 3.4)
pt3dadd(-107.52, -41.71, -58.8, 3.4)
pt3dadd(-108.05, -41.71, -58.8, 3.4)
pt3dadd(-108.23, -41.92, -58.8, 3.4)
pt3dadd(-108.59, -42.12, -58.8, 3.4)
pt3dadd(-108.76, -42.32, -58.8, 3.4)
pt3dadd(-108.94, -42.53, -58.8, 3.4)
pt3dadd(-109.12, -42.73, -58.8, 3.4)
pt3dadd(-109.48, -42.93, -58.8, 3.4)
pt3dadd(-109.66, -43.13, -58.8, 3.4)
pt3dadd(-109.83, -43.34, -58.8, 3.4)
pt3dadd(-110.01, -43.74, -58.8, 3.4)
pt3dadd(-110.55, -44.35, -58.8, 3.4)
pt3dadd(-110.9, -44.55, -58.8, 3.4)
pt3dadd(-111.44, -44.55, -58.8, 3.4)
pt3dadd(-110.9, -44.75, -57.75, 3.4)
pt3dadd(-111.26, -44.96, -57.75, 3.4)
pt3dadd(-111.26, -45.36, -57.75, 3.4)
pt3dadd(-111.44, -45.36, -57.75, 3.4)
pt3dadd(-111.44, -45.77, -57.75, 3.23)
pt3dadd(-111.62, -45.97, -57.75, 3.23)
pt3dadd(-111.97, -46.37, -57.75, 3.23)
pt3dadd(-112.15, -46.58, -57.75, 3.23)
pt3dadd(-112.33, -46.78, -57.75, 3.23)
pt3dadd(-112.51, -46.98, -57.75, 3.23)
pt3dadd(-112.69, -47.18, -57.75, 3.23)
pt3dadd(-112.87, -47.39, -57.75, 3.23)
pt3dadd(-113.04, -47.59, -57.75, 3.23)
pt3dadd(-113.22, -47.79, -57.75, 3.23)
pt3dadd(-113.4, -47.99, -57.75, 3.23)
pt3dadd(-113.58, -48.2, -57.75, 3.23)
pt3dadd(-113.76, -48.4, -57.75, 3.23)
pt3dadd(-113.94, -48.6, -57.75, 3.23)
pt3dadd(-114.29, -48.8, -57.75, 3.23)
pt3dadd(-114.47, -49.01, -57.75, 3.23)
pt3dadd(-114.65, -49.21, -57.75, 3.23)
pt3dadd(-115.01, -49.41, -57.75, 3.23)
pt3dadd(-115.36, -49.82, -57.75, 3.23)
pt3dadd(-115.54, -50.02, -57.75, 3.23)
pt3dadd(-115.72, -50.22, -57.75, 3.23)
pt3dadd(-116.08, -50.42, -57.75, 3.23)
pt3dadd(-116.25, -50.63, -57.75, 3.23)
pt3dadd(-116.61, -51.03, -57.75, 3.23)
pt3dadd(-116.79, -51.23, -57.75, 3.23)
pt3dadd(-117.15, -51.44, -57.75, 3.23)
pt3dadd(-117.68, -52.04, -57.75, 3.23)
pt3dadd(-117.86, -52.25, -57.75, 3.23)
pt3dadd(-118.22, -52.85, -57.75, 3.23)
pt3dadd(-118.75, -53.46, -57.75, 3.23)
pt3dadd(-118.93, -53.67, -57.75, 3.23)
pt3dadd(-119.11, -54.07, -57.75, 3.23)
pt3dadd(-119.46, -54.27, -57.75, 3.23)
pt3dadd(-119.64, -54.68, -57.75, 3.23)
pt3dadd(-119.82, -54.88, -57.75, 3.23)
pt3dadd(-120.18, -55.29, -57.75, 3.23)
pt3dadd(-120.36, -55.69, -57.75, 3.23)
pt3dadd(-120.53, -55.89, -57.75, 3.23)
pt3dadd(-120.71, -56.1, -57.75, 3.23)
pt3dadd(-120.89, -56.3, -57.75, 3.23)
pt3dadd(-121.25, -56.5, -57.75, 3.23)
pt3dadd(-121.43, -56.91, -57.75, 3.23)
pt3dadd(-121.6, -57.11, -57.75, 3.23)
pt3dadd(-121.96, -57.31, -57.75, 3.23)
pt3dadd(-122.14, -57.72, -57.75, 3.23)
pt3dadd(-122.32, -57.92, -57.75, 3.23)
pt3dadd(-122.67, -58.32, -57.75, 3.23)
pt3dadd(-122.85, -58.53, -57.75, 3.23)
pt3dadd(-123.03, -58.93, -57.75, 3.23)
pt3dadd(-123.74, -59.74, -57.75, 3.23)
pt3dadd(-123.92, -59.94, -57.75, 3.23)
pt3dadd(-124.1, -60.35, -57.75, 3.23)
pt3dadd(-124.28, -60.55, -57.75, 3.23)
pt3dadd(-124.99, -61.36, -57.75, 3.23)
pt3dadd(-125.17, -61.56, -57.75, 3.23)
pt3dadd(-125.35, -61.97, -57.75, 3.23)
pt3dadd(-125.7, -62.17, -57.75, 3.23)
pt3dadd(-126.06, -62.58, -57.75, 3.23)
pt3dadd(-126.24, -62.78, -57.75, 3.23)
pt3dadd(-126.42, -62.98, -57.75, 3.23)
pt3dadd(-126.6, -63.18, -57.75, 3.23)
pt3dadd(-126.77, -63.39, -57.75, 3.23)
pt3dadd(-127.13, -63.59, -57.75, 3.23)
pt3dadd(-127.49, -63.79, -57.75, 3.23)
pt3dadd(-127.67, -63.99, -57.75, 3.23)
pt3dadd(-127.84, -64.2, -57.75, 3.23)
pt3dadd(-127.84, -63.99, -57.75, 3.23)
pt3dadd(-127.49, -64.2, -55.65, 3.23)
pt3dadd(-127.49, -64.6, -55.65, 3.23)
pt3dadd(-127.67, -64.81, -55.65, 3.23)
pt3dadd(-127.84, -65.21, -55.65, 3.23)
pt3dadd(-128.2, -65.21, -55.65, 3.23)
pt3dadd(-128.2, -65.62, -55.65, 3.23)
pt3dadd(-128.56, -65.82, -55.65, 3.23)
pt3dadd(-128.74, -66.22, -55.65, 3.23)
pt3dadd(-128.91, -66.63, -55.65, 3.23)
pt3dadd(-129.09, -66.83, -55.65, 3.23)
pt3dadd(-129.27, -67.03, -55.65, 3.23)
pt3dadd(-129.45, -67.44, -55.65, 3.23)
pt3dadd(-129.63, -67.64, -55.65, 3.23)
pt3dadd(-129.98, -68.05, -55.65, 3.23)
pt3dadd(-130.16, -68.25, -55.65, 3.23)
pt3dadd(-130.34, -68.65, -55.65, 3.23)
pt3dadd(-130.52, -69.06, -55.65, 3.23)
pt3dadd(-130.7, -69.26, -55.65, 3.23)
pt3dadd(-130.88, -69.46, -55.65, 3.23)
pt3dadd(-131.05, -69.87, -55.65, 3.23)
pt3dadd(-131.23, -70.27, -55.65, 3.23)
pt3dadd(-131.41, -70.68, -55.65, 3.23)
pt3dadd(-131.59, -70.88, -55.65, 3.23)
pt3dadd(-131.77, -71.29, -55.65, 3.23)
pt3dadd(-131.95, -71.49, -55.65, 3.23)
pt3dadd(-132.12, -71.89, -55.65, 3.23)
pt3dadd(-132.3, -72.1, -55.65, 3.23)
pt3dadd(-132.66, -72.5, -55.65, 3.23)
pt3dadd(-132.84, -72.91, -55.65, 3.23)
pt3dadd(-133.02, -73.31, -55.65, 3.23)
pt3dadd(-133.19, -73.51, -55.65, 3.23)
pt3dadd(-133.37, -73.92, -55.65, 3.23)
pt3dadd(-133.55, -74.32, -55.65, 3.23)
pt3dadd(-133.73, -74.73, -55.65, 3.23)
pt3dadd(-133.91, -74.93, -55.65, 3.23)
pt3dadd(-134.09, -75.34, -55.65, 3.23)
pt3dadd(-134.26, -75.74, -55.65, 3.23)
pt3dadd(-134.44, -76.15, -55.65, 3.23)
pt3dadd(-134.62, -76.55, -55.65, 3.23)
pt3dadd(-134.8, -76.96, -55.65, 3.23)
pt3dadd(-134.98, -77.36, -55.65, 3.23)
pt3dadd(-135.16, -77.77, -55.65, 3.23)
pt3dadd(-135.16, -78.17, -55.65, 3.23)
pt3dadd(-135.33, -78.58, -55.65, 3.23)
pt3dadd(-135.51, -78.98, -55.65, 3.23)
pt3dadd(-135.51, -79.59, -55.65, 3.23)
pt3dadd(-135.69, -80, -55.65, 3.23)
pt3dadd(-135.87, -80.6, -55.65, 3.23)
pt3dadd(-136.05, -81.01, -55.65, 3.23)
pt3dadd(-136.05, -81.41, -55.65, 3.23)
pt3dadd(-136.23, -81.41, -55.65, 3.23)
}
dend[39] {pt3dclear()
pt3dadd(229.7, 352.64, -57.75, 3.57)
pt3dadd(228.1, 353.45, -26.25, 3.57)
pt3dadd(216.15, 353.45, -26.25, 3.57)
pt3dadd(215.97, 352.85, -24.15, 3.57)
pt3dadd(212.76, 352.85, -24.15, 3.57)
pt3dadd(212.23, 353.05, -24.15, 3.57)
pt3dadd(211.52, 353.05, -24.15, 3.57)
pt3dadd(210.8, 353.45, -24.15, 3.57)
pt3dadd(209.91, 353.45, -24.15, 3.57)
pt3dadd(209.55, 353.66, -24.15, 3.57)
pt3dadd(209.38, 353.86, -24.15, 3.57)
pt3dadd(208.84, 353.86, -24.15, 3.57)
pt3dadd(208.31, 354.06, -24.15, 3.57)
pt3dadd(207.95, 354.26, -24.15, 3.57)
pt3dadd(207.59, 354.47, -24.15, 3.57)
pt3dadd(207.24, 354.67, -24.15, 3.57)
pt3dadd(206.88, 354.87, -24.15, 3.57)
pt3dadd(206.52, 355.07, -24.15, 3.57)
pt3dadd(206.17, 355.28, -24.15, 3.57)
pt3dadd(205.81, 355.48, -24.15, 3.57)
pt3dadd(205.45, 355.68, -24.15, 3.57)
pt3dadd(205.27, 355.88, -24.15, 3.57)
pt3dadd(204.74, 356.09, -24.15, 3.57)
pt3dadd(204.38, 356.29, -24.15, 3.57)
pt3dadd(204.03, 356.29, -24.15, 3.57)
pt3dadd(203.67, 356.49, -24.15, 3.57)
pt3dadd(203.13, 356.69, -24.15, 3.57)
pt3dadd(202.78, 356.9, -24.15, 3.57)
pt3dadd(202.42, 357.1, -24.15, 3.57)
pt3dadd(202.06, 357.3, -24.15, 3.57)
pt3dadd(201.71, 357.5, -24.15, 3.57)
pt3dadd(201.35, 357.5, -24.15, 3.57)
pt3dadd(200.99, 357.71, -24.15, 3.57)
pt3dadd(200.64, 357.91, -24.15, 3.57)
pt3dadd(200.46, 358.11, -24.15, 3.57)
pt3dadd(200.1, 358.11, -24.15, 3.57)
pt3dadd(199.75, 358.31, -24.15, 3.57)
pt3dadd(199.57, 358.52, -24.15, 3.57)
pt3dadd(199.39, 358.72, -24.15, 3.57)
pt3dadd(199.03, 358.92, -24.15, 3.57)
pt3dadd(198.68, 359.12, -24.15, 3.57)
pt3dadd(198.5, 359.33, -24.15, 3.57)
pt3dadd(198.14, 359.53, -24.15, 3.57)
pt3dadd(197.78, 359.53, -24.15, 3.57)
pt3dadd(197.43, 359.73, -24.15, 3.57)
pt3dadd(197.25, 359.93, -24.15, 3.57)
pt3dadd(196.89, 360.14, -24.15, 3.57)
pt3dadd(196.54, 360.14, -24.15, 3.57)
pt3dadd(196.18, 360.54, -24.15, 3.57)
pt3dadd(195.82, 360.54, -24.15, 3.57)
pt3dadd(195.64, 360.74, -24.15, 3.57)
}
}
proc shape3d_48() {
dend[39] { pt3dadd(195.47, 360.95, -24.15, 3.57)
pt3dadd(195.11, 360.95, -24.15, 3.57)
pt3dadd(194.75, 361.15, -24.15, 3.57)
pt3dadd(194.4, 361.35, -24.15, 3.57)
pt3dadd(194.04, 361.55, -24.15, 3.57)
pt3dadd(193.5, 361.76, -24.15, 3.57)
pt3dadd(192.79, 362.16, -24.15, 3.57)
pt3dadd(192.43, 362.16, -24.15, 3.57)
pt3dadd(192.26, 362.36, -24.15, 3.57)
pt3dadd(191.9, 362.36, -24.15, 3.57)
pt3dadd(191.72, 362.57, -24.15, 3.57)
pt3dadd(191.36, 362.77, -24.15, 3.57)
pt3dadd(191.19, 362.97, -24.15, 3.57)
pt3dadd(190.83, 363.18, -24.15, 3.57)
pt3dadd(190.29, 363.18, -24.15, 3.57)
pt3dadd(190.12, 363.38, -24.15, 3.57)
pt3dadd(189.94, 363.58, -24.15, 3.57)
pt3dadd(189.58, 363.58, -24.15, 3.57)
pt3dadd(189.22, 363.78, -24.15, 3.57)
pt3dadd(188.87, 363.99, -24.15, 3.57)
pt3dadd(188.51, 364.19, -24.15, 3.57)
pt3dadd(188.33, 364.39, -24.15, 3.57)
pt3dadd(188.15, 364.59, -24.15, 3.57)
pt3dadd(187.98, 364.8, -24.15, 3.57)
pt3dadd(187.62, 364.8, -24.15, 3.57)
pt3dadd(187.44, 365, -24.15, 3.57)
pt3dadd(187.26, 365.2, -24.15, 3.57)
pt3dadd(187.26, 365.2, -21, 3.57)
pt3dadd(186.91, 365.4, -21, 3.57)
pt3dadd(186.73, 365.61, -21, 3.57)
pt3dadd(186.37, 365.81, -21, 3.57)
pt3dadd(186.19, 366.21, -21, 3.57)
pt3dadd(185.84, 366.42, -21, 3.57)
pt3dadd(185.48, 366.62, -21, 3.57)
pt3dadd(185.12, 367.02, -21, 3.57)
pt3dadd(184.94, 367.23, -21, 3.57)
pt3dadd(184.94, 367.63, -21, 3.57)
pt3dadd(184.59, 367.63, -21, 3.57)
pt3dadd(184.41, 367.83, -21, 3.57)
pt3dadd(184.23, 368.04, -21, 3.57)
pt3dadd(184.05, 368.24, -21, 3.57)
pt3dadd(183.87, 368.44, -21, 3.57)
pt3dadd(183.52, 368.64, -21, 3.57)
pt3dadd(183.16, 368.85, -21, 3.57)
pt3dadd(182.98, 369.05, -21, 3.57)
pt3dadd(182.63, 369.05, -21, 3.57)
pt3dadd(182.09, 369.25, -21, 3.57)
pt3dadd(181.73, 369.25, -21, 3.57)
pt3dadd(181.38, 369.45, -21, 3.57)
pt3dadd(180.49, 369.45, -21, 3.57)
pt3dadd(180.13, 369.66, -21, 3.57)
pt3dadd(177.45, 369.66, -21, 3.57)
pt3dadd(177.1, 369.86, -21, 3.57)
pt3dadd(176.21, 369.86, -21, 3.57)
pt3dadd(175.85, 370.06, -21, 3.57)
pt3dadd(174.24, 370.06, -21, 3.57)
pt3dadd(173.53, 370.26, -21, 3.57)
pt3dadd(173, 370.26, -21, 3.57)
pt3dadd(172.64, 370.47, -21, 3.57)
pt3dadd(171.75, 370.47, -21, 3.57)
pt3dadd(171.39, 370.67, -21, 3.57)
pt3dadd(170.86, 370.67, -21, 3.57)
pt3dadd(170.68, 370.87, -21, 3.57)
pt3dadd(170.14, 370.87, -21, 3.57)
pt3dadd(169.79, 371.07, -21, 3.57)
pt3dadd(169.61, 371.28, -21, 3.57)
pt3dadd(169.25, 371.28, -21, 3.57)
pt3dadd(168.89, 371.48, -21, 3.57)
pt3dadd(168.54, 371.68, -21, 3.57)
pt3dadd(168.18, 371.68, -21, 3.57)
pt3dadd(167.82, 371.88, -21, 3.57)
pt3dadd(167.29, 371.88, -21, 3.57)
pt3dadd(166.93, 372.09, -21, 3.57)
pt3dadd(166.4, 372.29, -21, 3.57)
pt3dadd(165.68, 372.29, -21, 3.57)
pt3dadd(165.33, 372.49, -21, 3.57)
pt3dadd(156.77, 372.49, -21, 3.57)
pt3dadd(156.41, 372.69, -21, 3.57)
pt3dadd(155.88, 372.69, -21, 3.57)
pt3dadd(155.34, 372.9, -21, 3.57)
pt3dadd(154.98, 372.9, -21, 3.57)
pt3dadd(154.27, 373.3, -21, 3.57)
pt3dadd(153.91, 373.5, -21, 3.57)
pt3dadd(153.38, 373.5, -21, 3.57)
pt3dadd(153.2, 373.71, -21, 3.57)
pt3dadd(152.84, 373.91, -21, 3.57)
pt3dadd(152.31, 374.11, -21, 3.57)
pt3dadd(151.77, 374.32, -21, 3.57)
pt3dadd(151.42, 374.52, -21, 3.57)
pt3dadd(150.88, 374.92, -21, 3.57)
pt3dadd(150.53, 375.33, -21, 3.57)
pt3dadd(149.99, 375.73, -21, 3.57)
pt3dadd(149.63, 375.94, -21, 3.57)
pt3dadd(149.1, 376.14, -21, 3.57)
pt3dadd(148.57, 376.54, -21, 3.57)
pt3dadd(148.21, 376.75, -21, 3.57)
pt3dadd(148.03, 376.95, -21, 3.57)
pt3dadd(147.5, 377.15, -21, 3.57)
pt3dadd(147.14, 377.35, -21, 3.57)
pt3dadd(146.78, 377.76, -21, 3.57)
pt3dadd(146.6, 377.96, -21, 3.57)
pt3dadd(146.25, 378.16, -21, 3.57)
pt3dadd(145.89, 378.16, -21, 3.57)
pt3dadd(145.53, 378.37, -21, 3.57)
pt3dadd(145.18, 378.57, -21, 3.57)
pt3dadd(144.82, 378.77, -21, 3.57)
pt3dadd(144.46, 378.77, -21, 3.57)
pt3dadd(144.29, 378.97, -21, 3.57)
pt3dadd(143.75, 378.97, -21, 3.57)
pt3dadd(143.22, 379.18, -21, 3.57)
pt3dadd(142.15, 379.18, -21, 3.57)
pt3dadd(141.79, 379.38, -21, 3.57)
pt3dadd(140.36, 379.38, -21, 3.57)
pt3dadd(139.83, 379.58, -21, 3.57)
pt3dadd(138.94, 379.58, -21, 3.57)
pt3dadd(138.58, 379.78, -21, 3.57)
pt3dadd(136.44, 379.78, -21, 3.57)
pt3dadd(135.9, 379.99, -21, 3.57)
pt3dadd(135.01, 379.99, -21, 3.57)
pt3dadd(134.66, 380.19, -21, 3.57)
pt3dadd(134.12, 380.19, -21, 3.57)
pt3dadd(133.94, 380.39, -21, 3.57)
pt3dadd(133.59, 380.39, -21, 3.57)
pt3dadd(133.41, 380.59, -21, 3.57)
pt3dadd(133.05, 380.59, -21, 3.57)
pt3dadd(132.87, 380.8, -21, 3.57)
pt3dadd(132.69, 381, -21, 3.57)
pt3dadd(132.52, 381, -21, 3.57)
pt3dadd(131.98, 381.61, -21, 3.06)
pt3dadd(131.8, 381.81, -21, 3.06)
pt3dadd(131.62, 382.01, -21, 3.06)
pt3dadd(131.45, 382.21, -21, 3.06)
pt3dadd(131.09, 382.21, -21, 3.06)
pt3dadd(130.91, 382.42, -21, 3.06)
pt3dadd(130.55, 382.62, -21, 3.06)
pt3dadd(130.38, 382.82, -21, 3.06)
pt3dadd(130.2, 383.02, -21, 3.06)
pt3dadd(130.02, 383.43, -21, 3.06)
pt3dadd(129.66, 383.43, -21, 3.06)
pt3dadd(129.48, 383.63, -21, 3.06)
pt3dadd(129.31, 383.83, -21, 3.06)
pt3dadd(129.13, 384.04, -21, 3.06)
pt3dadd(128.95, 384.24, -21, 3.06)
pt3dadd(128.77, 384.64, -21, 3.06)
pt3dadd(128.41, 384.85, -21, 3.06)
pt3dadd(128.06, 385.25, -21, 3.06)
pt3dadd(127.88, 385.46, -21, 3.06)
pt3dadd(127.52, 385.66, -21, 3.06)
pt3dadd(126.63, 386.67, -21, 3.06)
pt3dadd(126.1, 387.08, -21, 3.06)
pt3dadd(125.74, 387.28, -21, 3.06)
pt3dadd(125.38, 387.48, -21, 3.06)
pt3dadd(125.03, 387.68, -21, 3.06)
pt3dadd(124.67, 387.89, -21, 3.06)
pt3dadd(124.31, 388.09, -21, 3.06)
pt3dadd(123.78, 388.29, -21, 3.06)
pt3dadd(123.42, 388.7, -21, 3.06)
pt3dadd(123.06, 388.9, -21, 3.06)
pt3dadd(122.71, 388.9, -21, 3.06)
pt3dadd(122.35, 389.3, -21, 3.06)
pt3dadd(121.99, 389.51, -21, 3.06)
pt3dadd(121.46, 389.71, -21, 3.06)
pt3dadd(120.92, 389.91, -21, 3.06)
pt3dadd(120.57, 390.11, -21, 3.06)
pt3dadd(120.21, 390.32, -21, 3.06)
pt3dadd(119.68, 390.72, -21, 3.06)
pt3dadd(119.32, 390.92, -21, 3.06)
pt3dadd(118.78, 391.13, -21, 3.06)
pt3dadd(118.25, 391.33, -21, 3.06)
pt3dadd(117.89, 391.73, -21, 3.06)
pt3dadd(117.18, 391.94, -21, 3.06)
pt3dadd(116.64, 392.14, -21, 3.06)
pt3dadd(115.75, 392.75, -21, 3.06)
pt3dadd(115.04, 392.95, -21, 3.06)
pt3dadd(114.5, 393.35, -21, 3.06)
pt3dadd(114.15, 393.35, -21, 3.06)
pt3dadd(113.61, 393.56, -21, 3.06)
pt3dadd(113.08, 393.96, -21, 3.06)
pt3dadd(112.9, 394.16, -21, 3.06)
pt3dadd(112.36, 394.37, -21, 3.06)
pt3dadd(112.01, 394.57, -21, 3.06)
pt3dadd(111.47, 394.97, -21, 3.06)
pt3dadd(111.12, 395.18, -21, 3.06)
pt3dadd(110.58, 395.38, -21, 3.06)
pt3dadd(110.22, 395.58, -21, 3.06)
pt3dadd(110.05, 395.79, -21, 3.06)
pt3dadd(109.69, 396.19, -21, 3.06)
pt3dadd(109.15, 396.39, -21, 3.06)
pt3dadd(108.98, 396.6, -21, 3.06)
pt3dadd(108.62, 396.6, -21, 3.06)
pt3dadd(108.26, 396.8, -21, 3.06)
pt3dadd(107.91, 397, -21, 3.06)
pt3dadd(107.73, 397.2, -21, 3.06)
pt3dadd(107.55, 397.41, -21, 3.06)
pt3dadd(107.19, 397.81, -21, 3.06)
pt3dadd(107.01, 398.01, -21, 3.06)
pt3dadd(106.66, 398.22, -21, 3.06)
pt3dadd(106.48, 398.42, -21, 3.06)
pt3dadd(106.3, 398.82, -21, 3.06)
pt3dadd(105.94, 399.03, -21, 3.06)
}
}
proc shape3d_49() {
dend[39] { pt3dadd(105.77, 399.43, -21, 3.06)
pt3dadd(105.59, 399.63, -21, 3.06)
pt3dadd(105.41, 399.84, -21, 3.06)
pt3dadd(105.05, 400.04, -21, 3.06)
pt3dadd(104.87, 400.24, -21, 3.06)
pt3dadd(104.52, 400.65, -21, 3.06)
pt3dadd(104.34, 400.85, -21, 3.06)
pt3dadd(104.34, 401.25, -21, 3.06)
pt3dadd(104.16, 401.46, -21, 3.06)
pt3dadd(103.8, 401.86, -21, 3.06)
pt3dadd(103.63, 402.06, -21, 3.06)
pt3dadd(103.63, 402.47, -21, 3.06)
pt3dadd(103.45, 402.67, -21, 3.06)
pt3dadd(103.27, 402.87, -21, 3.06)
pt3dadd(103.09, 403.28, -21, 3.06)
pt3dadd(102.73, 403.48, -21, 3.06)
pt3dadd(102.73, 403.89, -21, 3.06)
pt3dadd(102.56, 404.09, -21, 3.06)
pt3dadd(102.38, 404.29, -21, 3.06)
pt3dadd(102.2, 404.7, -21, 3.06)
pt3dadd(102.02, 404.9, -21, 3.06)
pt3dadd(101.66, 405.1, -21, 3.06)
pt3dadd(101.66, 405.51, -21, 3.06)
pt3dadd(101.31, 405.71, -21, 3.06)
pt3dadd(101.13, 405.91, -21, 3.06)
pt3dadd(100.95, 406.32, -21, 3.06)
pt3dadd(100.77, 406.52, -21, 3.06)
pt3dadd(100.42, 406.72, -21, 3.06)
pt3dadd(100.24, 406.93, -21, 3.06)
pt3dadd(100.06, 407.13, -21, 3.06)
pt3dadd(99.88, 407.53, -21, 3.06)
pt3dadd(99.7, 407.74, -21, 3.06)
pt3dadd(99.52, 407.94, -21, 3.06)
pt3dadd(99.35, 408.14, -21, 3.06)
pt3dadd(98.99, 408.34, -21, 3.06)
pt3dadd(98.81, 408.55, -21, 3.06)
pt3dadd(98.63, 408.75, -21, 3.06)
pt3dadd(98.45, 408.95, -21, 3.06)
pt3dadd(98.28, 409.36, -21, 3.06)
pt3dadd(98.1, 409.56, -21, 3.06)
pt3dadd(97.92, 409.76, -21, 3.06)
pt3dadd(97.56, 409.96, -21, 3.06)
pt3dadd(97.21, 410.37, -21, 3.06)
pt3dadd(97.03, 410.57, -21, 3.06)
pt3dadd(96.85, 410.77, -21, 3.06)
pt3dadd(96.49, 410.98, -21, 3.06)
pt3dadd(96.14, 411.18, -21, 3.06)
pt3dadd(95.78, 411.38, -21, 3.06)
pt3dadd(95.6, 411.58, -21, 3.06)
pt3dadd(95.24, 411.58, -21, 3.06)
pt3dadd(94.89, 411.79, -21, 3.06)
pt3dadd(94.53, 412.19, -21, 3.06)
pt3dadd(94.17, 412.19, -21, 3.06)
pt3dadd(94, 412.6, -21, 3.06)
pt3dadd(93.64, 412.6, -21, 3.06)
pt3dadd(93.28, 412.8, -21, 3.06)
pt3dadd(92.75, 413, -21, 3.06)
pt3dadd(92.39, 413.2, -21, 3.06)
pt3dadd(92.03, 413.2, -21, 3.06)
pt3dadd(91.86, 413.41, -21, 3.06)
pt3dadd(91.5, 413.61, -21, 3.06)
pt3dadd(90.79, 413.81, -21, 3.06)
pt3dadd(90.07, 413.81, -21, 3.06)
pt3dadd(89.72, 414.01, -21, 3.06)
pt3dadd(89.18, 414.01, -21, 3.06)
pt3dadd(88.82, 414.22, -21, 3.06)
pt3dadd(88.29, 414.22, -21, 3.06)
pt3dadd(87.93, 414.42, -21, 3.06)
pt3dadd(87.4, 414.42, -21, 3.06)
pt3dadd(87.04, 414.62, -21, 3.06)
pt3dadd(86.68, 414.82, -21, 3.06)
pt3dadd(86.33, 414.82, -21, 3.06)
pt3dadd(85.97, 415.03, -21, 3.06)
pt3dadd(85.61, 415.43, -21, 3.06)
pt3dadd(85.44, 415.63, -21, 3.06)
pt3dadd(85.08, 415.84, -21, 3.06)
pt3dadd(84.9, 416.04, -21, 3.06)
pt3dadd(84.54, 416.04, -21, 3.06)
pt3dadd(84.37, 416.44, -21, 3.06)
pt3dadd(84.19, 416.65, -21, 3.06)
pt3dadd(83.83, 416.85, -21, 3.06)
pt3dadd(83.47, 417.25, -21, 3.06)
pt3dadd(83.12, 417.46, -21, 3.06)
pt3dadd(82.94, 417.86, -21, 3.06)
pt3dadd(82.58, 418.07, -21, 3.06)
pt3dadd(82.23, 418.27, -21, 3.06)
pt3dadd(81.87, 418.67, -21, 3.06)
pt3dadd(81.51, 418.88, -21, 3.06)
pt3dadd(81.34, 419.28, -21, 3.06)
pt3dadd(81.16, 419.48, -21, 3.06)
pt3dadd(80.8, 419.69, -21, 3.06)
pt3dadd(80.44, 419.89, -21, 3.06)
pt3dadd(80.09, 420.09, -21, 3.06)
pt3dadd(75.09, 420.09, -21, 3.06)
pt3dadd(74.74, 419.89, -21, 3.06)
pt3dadd(73.31, 419.89, -21, 3.06)
pt3dadd(72.78, 419.69, -21, 3.06)
pt3dadd(72.42, 419.48, -21, 3.06)
pt3dadd(72.78, 419.08, -22.05, 3.06)
pt3dadd(67.96, 419.08, -22.05, 3.06)
pt3dadd(67.6, 419.28, -22.05, 3.06)
pt3dadd(67.25, 419.28, -22.05, 3.06)
pt3dadd(66.89, 419.48, -22.05, 3.06)
pt3dadd(66.71, 419.69, -22.05, 3.06)
pt3dadd(66.18, 419.89, -22.05, 3.06)
pt3dadd(65.82, 419.89, -22.05, 3.06)
pt3dadd(65.46, 420.09, -22.05, 3.06)
pt3dadd(65.11, 420.29, -22.05, 3.06)
pt3dadd(64.75, 420.7, -22.05, 3.06)
pt3dadd(64.39, 420.7, -22.05, 3.06)
pt3dadd(64.04, 420.9, -22.05, 3.06)
pt3dadd(63.5, 421.1, -22.05, 3.06)
pt3dadd(63.32, 421.31, -22.05, 3.06)
pt3dadd(62.97, 421.51, -22.05, 3.06)
pt3dadd(62.25, 421.51, -22.05, 3.06)
pt3dadd(61.9, 421.71, -22.05, 3.06)
pt3dadd(61.36, 421.91, -22.05, 3.06)
pt3dadd(60.47, 421.91, -22.05, 3.06)
pt3dadd(60.29, 422.12, -22.05, 3.06)
pt3dadd(51.02, 422.12, -22.05, 3.06)
pt3dadd(50.66, 421.91, -22.05, 3.06)
pt3dadd(50.31, 421.91, -22.05, 3.06)
pt3dadd(49.77, 421.71, -22.05, 3.06)
pt3dadd(49.59, 421.51, -22.05, 3.06)
pt3dadd(49.24, 421.31, -22.05, 3.06)
pt3dadd(48.7, 421.31, -22.05, 3.06)
pt3dadd(48.34, 421.1, -22.05, 3.06)
pt3dadd(47.81, 420.9, -22.05, 3.06)
pt3dadd(47.45, 420.9, -22.05, 3.06)
pt3dadd(47.1, 420.7, -22.05, 3.06)
pt3dadd(46.74, 420.5, -22.05, 3.06)
pt3dadd(46.2, 420.29, -22.05, 3.06)
pt3dadd(45.67, 420.09, -22.05, 3.06)
pt3dadd(45.31, 419.89, -22.05, 3.06)
pt3dadd(44.6, 419.48, -22.05, 3.06)
pt3dadd(44.24, 419.48, -22.05, 3.06)
pt3dadd(43.89, 419.28, -22.05, 3.06)
pt3dadd(43.53, 419.08, -22.05, 3.06)
pt3dadd(42.99, 418.88, -22.05, 3.06)
pt3dadd(42.64, 418.67, -22.05, 3.06)
pt3dadd(42.1, 418.67, -22.05, 3.06)
pt3dadd(41.92, 418.47, -22.05, 3.06)
pt3dadd(41.57, 418.27, -22.05, 3.06)
pt3dadd(41.21, 418.07, -22.05, 3.06)
pt3dadd(40.85, 418.07, -22.05, 3.06)
pt3dadd(40.5, 417.66, -22.05, 3.06)
pt3dadd(40.14, 417.66, -22.05, 3.06)
pt3dadd(39.78, 417.46, -22.05, 3.06)
pt3dadd(39.43, 417.25, -22.05, 3.06)
pt3dadd(39.07, 417.05, -22.05, 3.06)
pt3dadd(38.71, 416.85, -22.05, 3.06)
pt3dadd(38.36, 416.85, -22.05, 3.06)
pt3dadd(38, 416.65, -22.05, 3.06)
pt3dadd(37.64, 416.44, -22.05, 3.06)
pt3dadd(37.47, 416.24, -22.05, 3.06)
pt3dadd(37.29, 416.04, -22.05, 3.06)
pt3dadd(36.93, 416.04, -22.05, 3.06)
pt3dadd(36.75, 415.84, -22.05, 3.06)
pt3dadd(36.4, 415.63, -22.05, 3.06)
pt3dadd(36.04, 415.43, -22.05, 3.06)
pt3dadd(35.68, 415.23, -22.05, 3.06)
pt3dadd(35.33, 415.03, -22.05, 3.06)
pt3dadd(35.15, 414.82, -22.05, 3.06)
pt3dadd(34.79, 414.42, -22.05, 3.06)
pt3dadd(34.61, 414.22, -22.05, 3.06)
pt3dadd(34.43, 413.81, -22.05, 3.06)
pt3dadd(34.26, 413.61, -22.05, 3.06)
pt3dadd(34.08, 413.41, -22.05, 3.06)
pt3dadd(33.72, 413, -22.05, 3.06)
pt3dadd(32.47, 411.58, -22.05, 3.06)
pt3dadd(32.29, 411.38, -22.05, 3.06)
pt3dadd(31.94, 410.98, -22.05, 3.06)
pt3dadd(31.58, 410.37, -22.05, 3.06)
pt3dadd(31.4, 410.17, -22.05, 3.06)
pt3dadd(31.22, 409.96, -22.05, 3.06)
pt3dadd(30.87, 409.56, -22.05, 3.06)
pt3dadd(30.15, 409.15, -22.05, 3.06)
pt3dadd(29.62, 408.75, -22.05, 3.06)
pt3dadd(29.44, 408.34, -22.05, 3.06)
pt3dadd(28.91, 408.14, -22.05, 3.06)
pt3dadd(28.55, 407.74, -22.05, 3.06)
pt3dadd(28.01, 407.74, -22.05, 3.06)
pt3dadd(27.66, 407.53, -22.05, 3.06)
pt3dadd(27.3, 407.33, -22.05, 3.06)
pt3dadd(24.63, 407.33, -22.05, 3.06)
pt3dadd(24.27, 407.53, -22.05, 3.06)
pt3dadd(24.09, 407.74, -22.05, 3.06)
pt3dadd(23.73, 407.94, -22.05, 3.06)
pt3dadd(23.38, 407.94, -22.05, 3.06)
pt3dadd(23.02, 408.14, -22.05, 3.06)
pt3dadd(13.75, 408.14, -22.05, 3.06)
pt3dadd(13.39, 407.94, -22.05, 3.06)
pt3dadd(13.21, 407.74, -22.05, 3.06)
pt3dadd(12.86, 407.74, -22.05, 3.06)
pt3dadd(12.68, 407.53, -22.05, 3.06)
pt3dadd(12.32, 407.13, -22.05, 3.06)
pt3dadd(12.14, 406.93, -22.05, 3.06)
pt3dadd(11.97, 406.72, -22.05, 3.06)
pt3dadd(11.61, 406.52, -22.05, 3.06)
pt3dadd(11.25, 406.11, -22.05, 3.06)
}
}
proc shape3d_50() {
dend[39] { pt3dadd(11.07, 405.91, -22.05, 3.06)
pt3dadd(10.9, 405.71, -22.05, 3.06)
pt3dadd(10.36, 405.1, -22.05, 3.06)
pt3dadd(10, 405.1, -22.05, 3.06)
pt3dadd(9.83, 404.9, -22.05, 3.06)
pt3dadd(9.65, 404.7, -22.05, 3.06)
pt3dadd(9.47, 404.49, -22.05, 3.06)
pt3dadd(9.29, 404.09, -22.05, 3.06)
pt3dadd(9.11, 403.89, -22.05, 3.06)
pt3dadd(8.93, 403.68, -22.05, 3.06)
pt3dadd(8.58, 403.48, -22.05, 3.06)
pt3dadd(8.22, 403.28, -22.05, 3.06)
pt3dadd(8.04, 403.08, -22.05, 3.06)
pt3dadd(7.69, 403.08, -22.05, 3.06)
pt3dadd(7.51, 402.87, -22.05, 3.06)
pt3dadd(7.33, 402.67, -22.05, 3.06)
pt3dadd(6.97, 402.67, -22.05, 3.06)
pt3dadd(6.62, 402.47, -22.05, 3.06)
pt3dadd(6.08, 402.27, -22.05, 3.06)
pt3dadd(5.55, 402.06, -22.05, 3.06)
pt3dadd(5.19, 401.86, -22.05, 3.06)
pt3dadd(3.41, 401.86, -22.05, 3.06)
pt3dadd(3.05, 402.06, -22.05, 3.06)
pt3dadd(2.69, 402.47, -22.05, 3.06)
pt3dadd(2.51, 402.67, -22.05, 3.06)
pt3dadd(2.16, 403.08, -22.05, 3.06)
pt3dadd(1.98, 403.28, -22.05, 3.06)
pt3dadd(1.8, 403.68, -22.05, 3.06)
pt3dadd(1.62, 403.89, -22.05, 3.06)
pt3dadd(1.09, 404.49, -22.05, 3.06)
pt3dadd(0.91, 404.7, -22.05, 3.06)
pt3dadd(0.55, 405.1, -22.05, 3.06)
pt3dadd(0.37, 405.3, -22.05, 3.06)
pt3dadd(0.2, 405.51, -22.05, 3.06)
pt3dadd(-0.16, 405.71, -22.05, 3.06)
pt3dadd(-0.34, 405.91, -22.05, 3.06)
pt3dadd(-0.52, 406.32, -22.05, 3.06)
pt3dadd(-0.7, 406.52, -22.05, 3.06)
pt3dadd(-1.05, 406.52, -22.05, 3.06)
pt3dadd(-1.23, 406.93, -22.05, 3.06)
pt3dadd(-1.59, 406.93, -22.05, 3.06)
pt3dadd(-1.77, 407.33, -22.05, 3.06)
pt3dadd(-2.12, 407.33, -22.05, 3.06)
pt3dadd(-2.48, 407.74, -22.05, 3.06)
pt3dadd(-2.84, 407.94, -22.05, 3.06)
pt3dadd(-3.37, 408.34, -22.05, 3.06)
pt3dadd(-3.55, 408.55, -22.05, 3.06)
pt3dadd(-3.91, 408.75, -22.05, 3.06)
pt3dadd(-4.08, 409.15, -22.05, 3.06)
pt3dadd(-4.44, 409.36, -22.05, 3.06)
pt3dadd(-4.8, 409.56, -22.05, 3.06)
pt3dadd(-5.33, 409.76, -22.05, 3.06)
pt3dadd(-5.69, 409.96, -22.05, 3.06)
pt3dadd(-6.05, 410.17, -22.05, 3.06)
pt3dadd(-6.58, 410.17, -22.05, 3.06)
pt3dadd(-6.94, 410.37, -22.05, 3.06)
pt3dadd(-12.11, 410.37, -22.05, 3.06)
pt3dadd(-12.29, 410.17, -22.05, 3.06)
pt3dadd(-12.64, 409.96, -22.05, 3.06)
pt3dadd(-13, 409.96, -22.05, 3.06)
pt3dadd(-13.18, 409.76, -22.05, 3.06)
pt3dadd(-13.54, 409.76, -22.05, 3.06)
pt3dadd(-13.71, 409.56, -22.05, 3.06)
pt3dadd(-13.89, 409.36, -22.05, 3.06)
pt3dadd(-14.07, 409.15, -22.05, 3.06)
pt3dadd(-14.43, 409.15, -22.05, 3.06)
pt3dadd(-14.61, 408.95, -22.05, 3.06)
pt3dadd(-15.32, 408.95, -22.05, 3.06)
pt3dadd(-15.5, 408.75, -22.05, 3.06)
pt3dadd(-16.21, 408.75, -22.05, 3.06)
pt3dadd(-16.75, 408.55, -22.05, 3.06)
pt3dadd(-17.1, 408.55, -22.05, 3.06)
pt3dadd(-17.46, 408.34, -22.05, 3.06)
pt3dadd(-18.17, 408.34, -22.05, 3.06)
pt3dadd(-18.35, 408.14, -22.05, 3.06)
pt3dadd(-20.67, 408.14, -22.05, 3.06)
pt3dadd(-21.03, 407.94, -22.05, 3.06)
pt3dadd(-21.38, 407.74, -22.05, 3.06)
pt3dadd(-21.92, 407.74, -22.05, 3.06)
pt3dadd(-22.27, 407.53, -22.05, 3.06)
pt3dadd(-22.63, 407.33, -22.05, 3.06)
pt3dadd(-22.99, 407.33, -22.05, 3.06)
pt3dadd(-23.34, 407.13, -22.05, 3.06)
pt3dadd(-23.7, 407.13, -22.05, 3.06)
pt3dadd(-24.24, 406.93, -22.05, 3.06)
pt3dadd(-24.59, 406.72, -22.05, 3.06)
pt3dadd(-24.95, 406.52, -22.05, 3.06)
pt3dadd(-32.44, 406.52, -22.05, 3.06)
pt3dadd(-32.44, 405.91, -25.2, 2.72)
pt3dadd(-33.15, 405.91, -25.2, 2.72)
pt3dadd(-33.51, 405.71, -25.2, 2.72)
pt3dadd(-33.87, 405.51, -25.2, 2.72)
pt3dadd(-34.22, 405.3, -25.2, 2.72)
pt3dadd(-34.58, 405.1, -25.2, 2.72)
pt3dadd(-34.76, 404.9, -25.2, 2.72)
pt3dadd(-36.36, 404.9, -25.2, 2.72)
pt3dadd(-36.54, 404.7, -25.2, 2.72)
pt3dadd(-36.9, 404.49, -25.2, 2.72)
pt3dadd(-37.25, 404.29, -25.2, 2.72)
pt3dadd(-37.43, 404.09, -25.2, 2.72)
pt3dadd(-37.79, 403.89, -25.2, 2.72)
pt3dadd(-38.15, 403.68, -25.2, 2.72)
pt3dadd(-38.5, 403.28, -25.2, 2.72)
pt3dadd(-38.68, 403.08, -25.2, 2.72)
pt3dadd(-39.04, 402.67, -25.2, 2.72)
pt3dadd(-39.22, 402.47, -25.2, 2.72)
pt3dadd(-39.57, 402.27, -25.2, 2.72)
pt3dadd(-40.46, 401.25, -25.2, 2.72)
pt3dadd(-40.82, 400.85, -25.2, 2.72)
pt3dadd(-41.18, 400.65, -25.2, 2.72)
pt3dadd(-41.36, 400.44, -25.2, 2.72)
pt3dadd(-41.53, 400.04, -25.2, 2.72)
pt3dadd(-41.89, 399.84, -25.2, 2.72)
pt3dadd(-42.07, 399.43, -25.2, 2.72)
pt3dadd(-42.43, 399.23, -25.2, 2.72)
pt3dadd(-42.78, 398.62, -25.2, 2.72)
pt3dadd(-42.96, 398.42, -25.2, 2.72)
pt3dadd(-43.14, 398.22, -25.2, 2.72)
pt3dadd(-43.32, 397.81, -25.2, 2.72)
pt3dadd(-43.5, 397.41, -25.2, 2.72)
pt3dadd(-43.85, 397.2, -25.2, 2.72)
pt3dadd(-44.39, 396.6, -25.2, 2.72)
pt3dadd(-44.57, 396.39, -25.2, 2.72)
pt3dadd(-44.74, 395.99, -25.2, 2.72)
pt3dadd(-44.92, 395.58, -25.2, 2.72)
pt3dadd(-45.46, 394.97, -25.2, 2.72)
pt3dadd(-45.81, 394.57, -25.2, 2.72)
pt3dadd(-45.99, 394.16, -25.2, 2.72)
pt3dadd(-46.35, 393.76, -25.2, 2.72)
pt3dadd(-46.53, 393.35, -25.2, 2.72)
pt3dadd(-46.71, 393.15, -25.2, 2.72)
pt3dadd(-47.06, 392.75, -25.2, 2.72)
pt3dadd(-47.42, 392.14, -25.2, 2.72)
pt3dadd(-47.6, 391.73, -25.2, 2.72)
pt3dadd(-47.95, 391.33, -25.2, 2.72)
pt3dadd(-48.49, 390.72, -25.2, 2.72)
pt3dadd(-49.02, 390.11, -25.2, 2.72)
pt3dadd(-49.38, 389.51, -25.2, 2.72)
pt3dadd(-49.74, 389.1, -25.2, 2.72)
pt3dadd(-50.63, 388.09, -25.2, 2.72)
pt3dadd(-50.98, 387.68, -25.2, 2.72)
pt3dadd(-51.34, 387.28, -25.2, 2.72)
pt3dadd(-51.52, 386.87, -25.2, 2.72)
pt3dadd(-51.88, 386.47, -25.2, 2.72)
pt3dadd(-52.23, 386.27, -25.2, 2.72)
pt3dadd(-52.59, 385.86, -25.2, 2.72)
pt3dadd(-52.77, 385.46, -25.2, 2.72)
pt3dadd(-53.12, 385.25, -25.2, 2.72)
pt3dadd(-53.3, 385.05, -25.2, 2.72)
pt3dadd(-54.02, 384.85, -25.2, 2.72)
pt3dadd(-54.37, 384.44, -25.2, 2.72)
pt3dadd(-54.73, 384.04, -25.2, 2.72)
pt3dadd(-55.09, 383.83, -25.2, 2.72)
pt3dadd(-55.62, 383.43, -25.2, 2.72)
pt3dadd(-55.98, 383.02, -25.2, 2.72)
pt3dadd(-56.51, 382.82, -25.2, 2.72)
pt3dadd(-56.87, 382.62, -25.2, 2.72)
pt3dadd(-57.4, 382.21, -25.2, 2.72)
pt3dadd(-57.76, 382.01, -25.2, 2.72)
pt3dadd(-58.3, 381.81, -25.2, 2.72)
pt3dadd(-58.65, 381.61, -25.2, 2.72)
pt3dadd(-59.01, 381.4, -25.2, 2.72)
pt3dadd(-59.37, 381.2, -25.2, 2.72)
pt3dadd(-59.72, 381, -25.2, 2.72)
pt3dadd(-60.08, 380.8, -25.2, 2.72)
pt3dadd(-60.44, 380.59, -25.2, 2.72)
pt3dadd(-60.61, 380.39, -25.2, 2.72)
pt3dadd(-61.15, 380.39, -25.2, 2.72)
pt3dadd(-61.51, 380.19, -25.2, 2.72)
pt3dadd(-61.86, 380.19, -25.2, 2.72)
pt3dadd(-62.22, 379.99, -25.2, 2.72)
pt3dadd(-62.58, 379.58, -25.2, 2.72)
pt3dadd(-62.93, 379.38, -25.2, 2.72)
pt3dadd(-63.29, 379.38, -25.2, 2.72)
pt3dadd(-63.47, 379.18, -25.2, 2.72)
pt3dadd(-63.82, 379.18, -25.2, 2.72)
pt3dadd(-64.18, 378.97, -25.2, 2.72)
pt3dadd(-64.36, 378.97, -25.2, 2.72)
pt3dadd(-63.82, 378.57, -27.3, 2.55)
pt3dadd(-65.07, 378.57, -27.3, 2.55)
pt3dadd(-65.25, 378.37, -27.3, 2.55)
pt3dadd(-65.43, 378.16, -27.3, 2.55)
pt3dadd(-65.61, 377.96, -27.3, 2.55)
pt3dadd(-65.96, 377.96, -27.3, 2.55)
pt3dadd(-66.32, 377.76, -27.3, 2.55)
pt3dadd(-66.5, 377.56, -27.3, 2.55)
pt3dadd(-66.68, 377.35, -27.3, 2.55)
pt3dadd(-67.03, 377.15, -27.3, 2.55)
pt3dadd(-67.39, 376.95, -27.3, 2.55)
pt3dadd(-67.75, 376.75, -27.3, 2.55)
pt3dadd(-68.1, 376.54, -27.3, 2.55)
pt3dadd(-68.28, 376.34, -27.3, 2.55)
pt3dadd(-68.46, 375.94, -27.3, 2.55)
pt3dadd(-69, 375.33, -27.3, 2.55)
pt3dadd(-69.35, 374.92, -27.3, 2.55)
pt3dadd(-69.53, 374.72, -27.3, 2.55)
pt3dadd(-69.89, 374.32, -27.3, 2.55)
pt3dadd(-70.07, 374.11, -27.3, 2.55)
pt3dadd(-70.96, 373.1, -27.3, 2.55)
pt3dadd(-71.14, 372.9, -27.3, 2.55)
}
}
proc shape3d_51() {
dend[39] { pt3dadd(-71.49, 372.69, -27.3, 2.55)
pt3dadd(-71.67, 372.49, -27.3, 2.55)
pt3dadd(-72.21, 372.09, -27.3, 2.55)
pt3dadd(-72.92, 372.09, -27.3, 2.55)
pt3dadd(-73.45, 371.68, -27.3, 2.55)
pt3dadd(-73.99, 371.48, -27.3, 2.55)
pt3dadd(-74.52, 371.28, -27.3, 2.55)
pt3dadd(-74.7, 371.07, -27.3, 2.55)
pt3dadd(-75.06, 370.87, -27.3, 2.55)
pt3dadd(-75.42, 370.67, -27.3, 2.55)
pt3dadd(-76.84, 370.67, -27.3, 2.55)
pt3dadd(-77.38, 370.47, -27.3, 2.55)
pt3dadd(-77.73, 370.26, -27.3, 2.55)
pt3dadd(-78.09, 370.26, -27.3, 2.55)
pt3dadd(-78.27, 370.06, -27.3, 2.55)
pt3dadd(-78.63, 369.86, -27.3, 2.55)
pt3dadd(-79.34, 369.86, -27.3, 2.55)
pt3dadd(-79.7, 369.66, -27.3, 2.55)
pt3dadd(-80.23, 369.25, -27.3, 2.55)
pt3dadd(-80.59, 369.25, -27.3, 2.55)
pt3dadd(-80.94, 369.05, -27.3, 2.55)
pt3dadd(-81.3, 369.05, -27.3, 2.55)
pt3dadd(-81.66, 368.85, -27.3, 2.55)
pt3dadd(-82.01, 368.64, -27.3, 2.55)
pt3dadd(-82.37, 368.44, -27.3, 2.55)
pt3dadd(-83.08, 368.44, -27.3, 2.55)
pt3dadd(-83.26, 368.24, -27.3, 2.55)
pt3dadd(-83.8, 368.24, -27.3, 2.55)
pt3dadd(-84.15, 368.04, -27.3, 2.55)
pt3dadd(-84.69, 367.63, -27.3, 2.55)
pt3dadd(-85.4, 367.63, -27.3, 2.55)
pt3dadd(-85.76, 367.43, -27.3, 2.55)
pt3dadd(-86.12, 367.23, -27.3, 2.55)
pt3dadd(-86.65, 367.02, -27.3, 2.55)
pt3dadd(-87.01, 366.82, -27.3, 2.55)
pt3dadd(-87.54, 366.82, -27.3, 2.55)
pt3dadd(-87.9, 366.62, -27.3, 2.55)
pt3dadd(-88.79, 366.62, -27.3, 2.55)
pt3dadd(-89.15, 366.42, -27.3, 2.55)
pt3dadd(-89.5, 366.21, -27.3, 2.55)
pt3dadd(-89.86, 366.21, -27.3, 2.55)
pt3dadd(-90.4, 366.01, -27.3, 2.55)
pt3dadd(-93.25, 366.01, -27.3, 2.55)
pt3dadd(-92.54, 365.81, -30.45, 2.55)
pt3dadd(-96.99, 365.81, -30.45, 2.55)
pt3dadd(-97.17, 366.01, -30.45, 2.55)
pt3dadd(-97.53, 366.01, -30.45, 2.55)
pt3dadd(-97.71, 366.21, -30.45, 2.55)
pt3dadd(-97.89, 366.42, -30.45, 2.55)
pt3dadd(-98.06, 366.62, -30.45, 2.55)
pt3dadd(-98.24, 366.82, -30.45, 2.55)
pt3dadd(-98.6, 367.02, -30.45, 2.55)
pt3dadd(-98.96, 367.43, -30.45, 2.55)
pt3dadd(-99.13, 367.83, -30.45, 2.55)
pt3dadd(-99.49, 368.24, -30.45, 2.55)
pt3dadd(-99.85, 368.64, -30.45, 2.55)
pt3dadd(-100.03, 368.85, -30.45, 2.55)
pt3dadd(-100.38, 369.25, -30.45, 2.55)
pt3dadd(-100.74, 369.45, -30.45, 2.55)
pt3dadd(-100.92, 369.86, -30.45, 2.55)
pt3dadd(-101.27, 370.06, -30.45, 2.55)
pt3dadd(-101.45, 370.47, -30.45, 2.55)
pt3dadd(-101.81, 370.67, -30.45, 2.55)
pt3dadd(-102.7, 371.68, -30.45, 2.55)
pt3dadd(-103.06, 372.09, -30.45, 2.55)
pt3dadd(-103.41, 372.49, -30.45, 2.55)
pt3dadd(-103.77, 372.9, -30.45, 2.55)
pt3dadd(-104.13, 373.1, -30.45, 2.55)
pt3dadd(-104.31, 373.3, -30.45, 2.55)
pt3dadd(-104.84, 373.91, -30.45, 2.55)
pt3dadd(-105.2, 374.11, -30.45, 2.55)
pt3dadd(-105.55, 374.32, -30.45, 2.55)
pt3dadd(-105.73, 374.52, -30.45, 2.55)
pt3dadd(-106.09, 374.92, -30.45, 2.55)
pt3dadd(-106.62, 375.53, -30.45, 2.55)
pt3dadd(-106.98, 375.73, -30.45, 2.55)
pt3dadd(-107.34, 375.94, -30.45, 2.55)
pt3dadd(-107.52, 376.14, -30.45, 2.55)
pt3dadd(-107.87, 376.54, -30.45, 2.55)
pt3dadd(-108.23, 376.75, -30.45, 2.55)
pt3dadd(-108.59, 376.95, -30.45, 2.55)
pt3dadd(-108.94, 377.15, -30.45, 2.55)
pt3dadd(-109.3, 377.56, -30.45, 2.55)
pt3dadd(-109.66, 377.76, -30.45, 2.55)
pt3dadd(-110.01, 377.96, -30.45, 2.55)
pt3dadd(-110.19, 378.16, -30.45, 2.55)
pt3dadd(-110.55, 378.37, -30.45, 2.55)
pt3dadd(-110.9, 378.77, -30.45, 2.55)
pt3dadd(-111.26, 378.77, -30.45, 2.55)
pt3dadd(-111.44, 379.18, -30.45, 2.55)
pt3dadd(-111.8, 379.38, -30.45, 2.55)
pt3dadd(-112.15, 379.58, -30.45, 2.55)
pt3dadd(-112.51, 379.78, -30.45, 2.55)
pt3dadd(-113.04, 380.39, -30.45, 2.55)
pt3dadd(-113.4, 380.59, -30.45, 2.55)
pt3dadd(-113.76, 380.59, -30.45, 2.55)
pt3dadd(-113.94, 380.8, -30.45, 2.55)
pt3dadd(-114.29, 381, -30.45, 2.55)
pt3dadd(-114.83, 381.4, -30.45, 2.55)
pt3dadd(-115.01, 381.61, -30.45, 2.55)
pt3dadd(-115.36, 381.61, -30.45, 2.55)
pt3dadd(-115.72, 381.81, -30.45, 2.55)
pt3dadd(-115.9, 382.01, -30.45, 2.55)
pt3dadd(-116.43, 382.01, -30.45, 2.55)
pt3dadd(-116.61, 382.21, -30.45, 2.55)
pt3dadd(-116.97, 382.21, -30.45, 2.55)
pt3dadd(-117.32, 382.42, -30.45, 2.55)
pt3dadd(-118.75, 382.42, -30.45, 2.55)
pt3dadd(-118.93, 382.62, -30.45, 2.55)
pt3dadd(-135.51, 382.62, -30.45, 2.55)
pt3dadd(-135.87, 382.42, -30.45, 2.55)
pt3dadd(-137.12, 382.42, -30.45, 2.55)
pt3dadd(-137.65, 382.21, -30.45, 2.55)
pt3dadd(-138.72, 382.21, -30.45, 2.55)
pt3dadd(-139.26, 381.81, -30.45, 2.55)
pt3dadd(-139.79, 381.81, -30.45, 2.55)
pt3dadd(-140.33, 381.61, -30.45, 2.55)
pt3dadd(-141.4, 381.61, -30.45, 2.55)
pt3dadd(-141.93, 381.4, -30.45, 2.55)
pt3dadd(-142.47, 381.4, -30.45, 2.55)
pt3dadd(-143, 381, -30.45, 2.55)
pt3dadd(-143.54, 380.8, -30.45, 2.55)
pt3dadd(-144.07, 380.8, -30.45, 2.55)
pt3dadd(-144.43, 380.59, -30.45, 2.55)
pt3dadd(-144.96, 380.59, -30.45, 2.55)
pt3dadd(-145.32, 380.39, -30.45, 2.55)
pt3dadd(-145.68, 380.19, -30.45, 2.55)
pt3dadd(-146.39, 380.19, -30.45, 2.55)
pt3dadd(-146.57, 379.99, -30.45, 2.55)
pt3dadd(-147.1, 379.58, -30.45, 2.55)
pt3dadd(-147.46, 379.38, -30.45, 2.55)
pt3dadd(-148, 379.18, -30.45, 2.55)
pt3dadd(-148.17, 378.97, -30.45, 2.55)
pt3dadd(-148.71, 378.97, -30.45, 2.55)
pt3dadd(-149.24, 378.57, -30.45, 2.55)
pt3dadd(-149.6, 378.37, -30.45, 2.55)
pt3dadd(-149.96, 378.16, -30.45, 2.55)
pt3dadd(-150.31, 378.16, -30.45, 2.55)
pt3dadd(-150.67, 377.96, -30.45, 2.55)
pt3dadd(-151.03, 377.76, -30.45, 2.55)
pt3dadd(-151.38, 377.56, -30.45, 2.55)
pt3dadd(-151.74, 377.56, -30.45, 2.55)
pt3dadd(-152.1, 377.35, -30.45, 2.55)
pt3dadd(-152.45, 377.15, -30.45, 2.55)
pt3dadd(-152.99, 377.15, -30.45, 2.55)
pt3dadd(-153.35, 376.95, -30.45, 2.55)
pt3dadd(-153.52, 376.54, -30.45, 2.55)
pt3dadd(-153.88, 376.34, -30.45, 2.55)
pt3dadd(-154.24, 376.34, -30.45, 2.55)
pt3dadd(-154.59, 376.14, -30.45, 2.55)
pt3dadd(-154.95, 375.73, -30.45, 2.55)
pt3dadd(-155.31, 375.53, -30.45, 2.55)
pt3dadd(-155.84, 375.33, -30.45, 2.55)
pt3dadd(-156.2, 374.92, -30.45, 2.55)
pt3dadd(-156.56, 374.72, -30.45, 2.55)
pt3dadd(-156.91, 374.52, -30.45, 2.55)
pt3dadd(-157.45, 373.91, -30.45, 2.55)
pt3dadd(-157.8, 373.5, -30.45, 2.55)
pt3dadd(-158.34, 373.3, -30.45, 2.55)
pt3dadd(-158.87, 372.9, -30.45, 2.55)
pt3dadd(-159.41, 372.49, -30.45, 2.55)
pt3dadd(-159.94, 372.09, -30.45, 2.55)
pt3dadd(-160.3, 371.88, -30.45, 2.55)
pt3dadd(-160.84, 371.48, -30.45, 2.55)
pt3dadd(-161.37, 371.07, -30.45, 2.55)
pt3dadd(-161.73, 370.87, -30.45, 2.55)
pt3dadd(-162.08, 370.47, -30.45, 2.55)
pt3dadd(-162.62, 370.26, -30.45, 2.55)
pt3dadd(-163.15, 369.86, -30.45, 2.55)
pt3dadd(-163.51, 369.66, -30.45, 2.55)
pt3dadd(-163.87, 369.45, -30.45, 2.55)
pt3dadd(-164.4, 369.25, -30.45, 2.55)
pt3dadd(-164.76, 369.05, -30.45, 2.55)
pt3dadd(-165.12, 368.85, -30.45, 2.55)
pt3dadd(-165.65, 368.85, -30.45, 2.55)
pt3dadd(-165.83, 368.64, -30.45, 2.55)
pt3dadd(-166.19, 368.64, -30.45, 2.55)
pt3dadd(-166.54, 368.44, -30.45, 2.55)
pt3dadd(-166.72, 368.24, -30.45, 2.55)
pt3dadd(-167.26, 368.24, -30.45, 2.55)
pt3dadd(-167.79, 368.04, -30.45, 2.55)
pt3dadd(-170.82, 368.04, -30.45, 2.55)
pt3dadd(-171.18, 368.24, -30.45, 2.55)
pt3dadd(-171.54, 368.24, -30.45, 2.55)
pt3dadd(-171.71, 368.44, -30.45, 2.55)
pt3dadd(-172.07, 368.64, -30.45, 2.55)
pt3dadd(-172.61, 368.85, -30.45, 2.55)
pt3dadd(-173.14, 368.85, -30.45, 2.55)
pt3dadd(-173.32, 369.05, -30.45, 2.55)
pt3dadd(-173.68, 369.25, -30.45, 2.55)
pt3dadd(-174.03, 369.45, -30.45, 2.55)
pt3dadd(-174.39, 369.86, -30.45, 2.55)
pt3dadd(-174.75, 369.86, -30.45, 2.55)
pt3dadd(-175.1, 370.06, -30.45, 2.55)
pt3dadd(-175.46, 370.26, -30.45, 2.55)
pt3dadd(-175.99, 370.47, -30.45, 2.55)
pt3dadd(-176.35, 370.67, -30.45, 2.55)
pt3dadd(-176.71, 370.87, -30.45, 2.55)
pt3dadd(-176.89, 371.07, -30.45, 2.55)
pt3dadd(-177.42, 371.07, -30.45, 2.55)
}
}
proc shape3d_52() {
dend[39] { pt3dadd(-177.78, 371.28, -30.45, 2.55)
pt3dadd(-178.31, 371.48, -30.45, 2.55)
pt3dadd(-178.85, 371.68, -30.45, 2.55)
pt3dadd(-179.2, 371.68, -30.45, 2.55)
pt3dadd(-179.56, 371.88, -30.45, 2.55)
pt3dadd(-180.1, 371.88, -30.45, 2.55)
pt3dadd(-180.63, 372.09, -30.45, 2.55)
pt3dadd(-181.34, 372.09, -30.45, 2.55)
pt3dadd(-181.7, 372.29, -30.45, 2.55)
pt3dadd(-190.08, 372.29, -30.45, 2.55)
pt3dadd(-190.44, 372.09, -30.45, 2.55)
pt3dadd(-190.79, 371.88, -30.45, 2.55)
pt3dadd(-191.15, 371.88, -30.45, 2.55)
pt3dadd(-191.33, 371.68, -30.45, 2.55)
pt3dadd(-191.69, 371.48, -30.45, 2.55)
pt3dadd(-192.04, 371.28, -30.45, 2.55)
pt3dadd(-192.22, 371.07, -30.45, 2.55)
pt3dadd(-192.58, 371.07, -30.45, 2.55)
pt3dadd(-192.76, 370.87, -30.45, 2.55)
pt3dadd(-193.11, 370.67, -30.45, 2.55)
pt3dadd(-193.29, 370.26, -30.45, 2.55)
pt3dadd(-193.65, 370.26, -30.45, 2.55)
pt3dadd(-193.83, 370.06, -30.45, 2.55)
pt3dadd(-194.18, 369.86, -30.45, 2.55)
pt3dadd(-194.54, 369.66, -30.45, 2.55)
pt3dadd(-194.9, 369.45, -30.45, 2.55)
pt3dadd(-195.07, 369.25, -30.45, 2.55)
pt3dadd(-195.43, 368.85, -30.45, 2.55)
pt3dadd(-195.61, 368.64, -30.45, 2.55)
pt3dadd(-195.97, 368.64, -30.45, 2.55)
pt3dadd(-196.32, 368.44, -30.45, 2.55)
pt3dadd(-196.68, 368.24, -30.45, 2.55)
pt3dadd(-197.04, 368.04, -30.45, 2.55)
pt3dadd(-197.21, 367.83, -30.45, 2.55)
pt3dadd(-197.93, 367.63, -30.45, 2.55)
pt3dadd(-198.28, 367.43, -30.45, 2.55)
pt3dadd(-198.64, 367.23, -30.45, 2.55)
pt3dadd(-198.82, 367.02, -30.45, 2.55)
pt3dadd(-199.18, 367.02, -30.45, 2.55)
pt3dadd(-199.53, 366.82, -30.45, 2.55)
pt3dadd(-199.71, 366.62, -30.45, 2.55)
pt3dadd(-200.42, 365.81, -30.45, 2.55)
pt3dadd(-200.78, 365.61, -30.45, 2.55)
pt3dadd(-201.14, 365.4, -30.45, 2.55)
pt3dadd(-201.67, 365.2, -30.45, 2.55)
pt3dadd(-201.85, 365, -30.45, 2.55)
pt3dadd(-202.21, 365, -30.45, 2.55)
pt3dadd(-201.14, 365.4, -31.5, 2.55)
pt3dadd(-202.03, 365.4, -31.5, 2.55)
pt3dadd(-202.39, 365.2, -31.5, 2.55)
pt3dadd(-202.74, 365, -31.5, 2.55)
pt3dadd(-203.46, 365, -31.5, 2.55)
pt3dadd(-203.81, 364.8, -31.5, 2.55)
pt3dadd(-204.17, 364.59, -31.5, 2.55)
pt3dadd(-204.35, 364.39, -31.5, 2.55)
pt3dadd(-204.7, 364.39, -31.5, 2.55)
pt3dadd(-204.88, 364.19, -31.5, 2.55)
pt3dadd(-205.06, 363.99, -31.5, 2.55)
pt3dadd(-205.42, 363.78, -31.5, 2.55)
pt3dadd(-205.95, 363.78, -31.5, 2.55)
pt3dadd(-206.13, 363.58, -31.5, 2.55)
pt3dadd(-206.49, 363.38, -31.5, 2.55)
pt3dadd(-206.84, 363.18, -31.5, 2.55)
pt3dadd(-207.2, 362.97, -31.5, 2.55)
pt3dadd(-207.56, 362.57, -31.5, 2.55)
pt3dadd(-207.91, 362.36, -31.5, 2.55)
pt3dadd(-208.27, 362.16, -31.5, 2.55)
pt3dadd(-208.45, 361.96, -31.5, 2.55)
pt3dadd(-208.81, 361.76, -31.5, 2.55)
pt3dadd(-209.16, 361.35, -31.5, 2.55)
pt3dadd(-209.34, 361.15, -31.5, 2.55)
pt3dadd(-209.88, 360.74, -31.5, 2.55)
pt3dadd(-210.23, 360.54, -31.5, 2.55)
pt3dadd(-210.59, 360.14, -31.5, 2.55)
pt3dadd(-210.95, 359.93, -31.5, 2.55)
pt3dadd(-211.66, 359.73, -31.5, 2.55)
pt3dadd(-212.02, 359.33, -31.5, 2.55)
pt3dadd(-212.37, 359.12, -31.5, 2.55)
pt3dadd(-212.55, 358.72, -31.5, 2.55)
pt3dadd(-213.26, 357.91, -31.5, 2.55)
pt3dadd(-213.8, 357.3, -31.5, 2.55)
pt3dadd(-214.33, 357.1, -31.5, 2.55)
pt3dadd(-214.51, 356.9, -31.5, 2.55)
pt3dadd(-214.87, 356.49, -31.5, 2.55)
pt3dadd(-215.4, 355.88, -31.5, 2.55)
pt3dadd(-215.76, 355.48, -31.5, 2.55)
pt3dadd(-216.12, 355.07, -31.5, 2.55)
pt3dadd(-216.3, 354.87, -31.5, 2.55)
pt3dadd(-216.65, 354.47, -31.5, 2.55)
pt3dadd(-217.19, 353.66, -31.5, 2.55)
pt3dadd(-217.54, 353.05, -31.5, 2.55)
pt3dadd(-217.72, 352.64, -31.5, 2.55)
pt3dadd(-218.08, 352.04, -31.5, 2.55)
pt3dadd(-218.61, 351.43, -31.5, 2.55)
pt3dadd(-218.97, 350.82, -31.5, 2.55)
pt3dadd(-219.33, 350.41, -31.5, 2.55)
pt3dadd(-219.33, 350.01, -31.5, 2.55)
pt3dadd(-219.68, 349.4, -31.5, 2.55)
pt3dadd(-220.04, 349, -31.5, 2.55)
pt3dadd(-220.4, 348.39, -31.5, 2.55)
pt3dadd(-220.58, 347.98, -31.5, 2.55)
pt3dadd(-220.93, 347.17, -31.5, 2.55)
pt3dadd(-221.11, 346.97, -31.5, 2.55)
pt3dadd(-221.47, 346.16, -31.5, 2.55)
pt3dadd(-222, 345.55, -31.5, 2.55)
pt3dadd(-222.18, 344.95, -31.5, 2.55)
pt3dadd(-222.36, 344.54, -31.5, 2.55)
pt3dadd(-222.89, 344.14, -31.5, 2.55)
pt3dadd(-223.25, 343.53, -31.5, 2.55)
pt3dadd(-223.43, 342.92, -31.5, 2.55)
pt3dadd(-223.79, 342.52, -31.5, 2.55)
pt3dadd(-223.96, 341.91, -31.5, 2.55)
pt3dadd(-224.32, 341.71, -31.5, 2.55)
pt3dadd(-224.68, 341.1, -31.5, 2.55)
pt3dadd(-224.86, 340.49, -31.5, 2.55)
pt3dadd(-225.03, 340.08, -31.5, 2.55)
pt3dadd(-225.21, 339.68, -31.5, 2.55)
pt3dadd(-225.57, 339.27, -31.5, 2.55)
pt3dadd(-225.75, 338.87, -31.5, 2.55)
pt3dadd(-225.93, 338.46, -31.5, 2.55)
pt3dadd(-226.28, 337.65, -31.5, 2.55)
pt3dadd(-226.64, 337.45, -31.5, 2.55)
pt3dadd(-226.82, 337.05, -31.5, 2.55)
pt3dadd(-227, 336.64, -31.5, 2.55)
pt3dadd(-227.53, 335.63, -31.5, 2.55)
pt3dadd(-227.89, 335.22, -31.5, 2.55)
pt3dadd(-228.07, 334.82, -31.5, 2.55)
pt3dadd(-228.24, 334.41, -31.5, 2.55)
pt3dadd(-228.6, 334.21, -31.5, 2.55)
pt3dadd(-228.78, 333.81, -31.5, 2.55)
pt3dadd(-228.96, 333.6, -31.5, 2.55)
pt3dadd(-229.14, 333.2, -31.5, 2.55)
pt3dadd(-229.49, 332.59, -31.5, 2.55)
pt3dadd(-229.67, 332.19, -31.5, 2.55)
pt3dadd(-230.03, 331.98, -31.5, 2.55)
pt3dadd(-230.21, 331.58, -31.5, 2.55)
pt3dadd(-230.21, 331.17, -31.5, 2.55)
pt3dadd(-230.56, 330.97, -31.5, 2.55)
pt3dadd(-230.74, 330.77, -31.5, 2.55)
pt3dadd(-230.92, 330.97, -31.5, 2.55)
}
dend[40] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(247.36, 352.04, -18.9, 11.72)
pt3dadd(247.71, 352.97, -18.9, 11.72)
}
dend[41] {pt3dclear()
pt3dadd(247.71, 352.97, -18.9, 11.72)
pt3dadd(247.18, 351.83, -18.9, 11.72)
pt3dadd(247, 351.63, -18.9, 11.72)
pt3dadd(246.82, 351.43, -18.9, 11.72)
pt3dadd(246.65, 351.22, -18.9, 11.72)
pt3dadd(246.47, 351.02, -18.9, 11.72)
pt3dadd(246.29, 350.62, -18.9, 11.72)
pt3dadd(246.11, 350.41, -18.9, 11.72)
pt3dadd(246.11, 350.01, -18.9, 11.72)
pt3dadd(245.93, 349.81, -18.9, 11.72)
pt3dadd(245.75, 349.6, -18.9, 11.72)
pt3dadd(242.9, 346.36, -18.9, 5.6)
pt3dadd(242.72, 346.16, -18.9, 5.6)
pt3dadd(242.37, 345.76, -18.9, 5.6)
pt3dadd(242.01, 345.15, -18.9, 5.6)
pt3dadd(241.83, 344.74, -18.9, 5.6)
pt3dadd(241.65, 344.54, -18.9, 5.6)
pt3dadd(241.47, 344.14, -18.9, 5.6)
pt3dadd(241.3, 343.93, -18.9, 5.6)
pt3dadd(241.3, 343.53, -18.9, 5.6)
pt3dadd(240.4, 343.33, -18.9, 6.28)
pt3dadd(240.4, 342.52, -18.9, 6.28)
pt3dadd(240.23, 342.11, -18.9, 6.28)
pt3dadd(240.05, 341.91, -18.9, 6.28)
pt3dadd(239.87, 341.5, -18.9, 6.28)
pt3dadd(239.69, 341.3, -18.9, 6.28)
pt3dadd(239.51, 341.1, -18.9, 6.28)
pt3dadd(239.33, 340.9, -18.9, 6.28)
pt3dadd(239.33, 340.49, -18.9, 6.28)
pt3dadd(239.16, 340.29, -18.9, 6.28)
pt3dadd(238.98, 340.08, -18.9, 6.28)
pt3dadd(238.98, 339.48, -18.9, 6.28)
pt3dadd(238.8, 339.27, -18.9, 6.28)
pt3dadd(238.62, 339.07, -18.9, 6.28)
pt3dadd(238.62, 338.67, -18.9, 6.28)
pt3dadd(238.44, 338.46, -18.9, 6.28)
pt3dadd(238.26, 338.26, -18.9, 6.28)
pt3dadd(238.26, 337.86, -18.9, 6.28)
pt3dadd(238.09, 337.65, -18.9, 6.28)
pt3dadd(237.91, 337.45, -18.9, 6.28)
pt3dadd(237.91, 337.05, -18.9, 6.28)
pt3dadd(237.73, 336.84, -18.9, 6.28)
pt3dadd(237.55, 336.44, -18.9, 6.28)
pt3dadd(237.37, 336.03, -18.9, 6.28)
pt3dadd(237.19, 335.83, -18.9, 6.28)
pt3dadd(237.02, 335.63, -18.9, 6.28)
pt3dadd(236.84, 335.22, -18.9, 6.28)
pt3dadd(236.84, 334.82, -18.9, 6.28)
pt3dadd(236.66, 334.62, -18.9, 6.28)
pt3dadd(236.48, 334.41, -18.9, 6.28)
pt3dadd(236.48, 333.81, -18.9, 6.28)
pt3dadd(236.3, 333.6, -18.9, 6.28)
pt3dadd(236.12, 333.2, -18.9, 6.28)
pt3dadd(235.95, 333, -18.9, 6.28)
pt3dadd(235.95, 332.59, -18.9, 6.28)
pt3dadd(235.77, 332.39, -18.9, 6.28)
pt3dadd(235.59, 332.19, -18.9, 6.28)
}
}
proc shape3d_53() {
dend[41] { pt3dadd(235.41, 331.98, -18.9, 6.28)
pt3dadd(235.23, 331.78, -18.9, 6.28)
pt3dadd(235.05, 331.58, -18.9, 6.28)
pt3dadd(234.88, 331.38, -18.9, 6.28)
pt3dadd(234.7, 331.17, -18.9, 6.28)
pt3dadd(234.52, 330.97, -18.9, 6.28)
pt3dadd(234.34, 330.77, -18.9, 6.28)
pt3dadd(234.16, 330.57, -18.9, 6.28)
pt3dadd(233.98, 330.36, -18.9, 6.28)
pt3dadd(233.81, 330.16, -18.9, 6.28)
pt3dadd(233.63, 329.96, -18.9, 6.28)
pt3dadd(233.45, 329.55, -18.9, 6.28)
pt3dadd(233.27, 329.15, -18.9, 6.28)
pt3dadd(233.09, 328.94, -18.9, 6.28)
pt3dadd(232.91, 328.54, -18.9, 6.28)
pt3dadd(232.74, 328.13, -18.9, 6.28)
pt3dadd(232.56, 327.93, -18.9, 6.28)
pt3dadd(232.38, 327.53, -18.9, 6.28)
pt3dadd(232.2, 327.12, -18.9, 6.28)
pt3dadd(232.02, 326.72, -18.9, 6.28)
pt3dadd(231.84, 326.31, -18.9, 6.28)
pt3dadd(231.67, 326.11, -18.9, 6.28)
pt3dadd(231.49, 325.7, -18.9, 6.28)
pt3dadd(231.49, 325.3, -18.9, 6.28)
pt3dadd(231.31, 325.1, -18.9, 6.28)
pt3dadd(231.13, 324.89, -18.9, 6.28)
pt3dadd(230.95, 324.49, -18.9, 6.28)
pt3dadd(230.77, 324.08, -18.9, 6.28)
pt3dadd(230.42, 323.68, -18.9, 6.28)
pt3dadd(230.24, 323.27, -18.9, 6.28)
pt3dadd(230.06, 323.07, -18.9, 6.28)
pt3dadd(229.88, 322.67, -18.9, 6.28)
pt3dadd(229.7, 322.26, -18.9, 6.28)
pt3dadd(229.53, 322.06, -18.9, 6.28)
pt3dadd(229.17, 321.65, -18.9, 6.28)
pt3dadd(228.81, 321.05, -18.9, 6.28)
pt3dadd(228.63, 320.64, -18.9, 6.28)
pt3dadd(228.46, 320.24, -18.9, 6.28)
pt3dadd(228.28, 319.83, -18.9, 6.28)
pt3dadd(227.92, 319.43, -18.9, 6.28)
pt3dadd(227.74, 318.82, -18.9, 6.28)
pt3dadd(227.56, 318.61, -18.9, 6.28)
pt3dadd(227.21, 318.41, -18.9, 6.28)
pt3dadd(227.03, 318.01, -18.9, 6.28)
pt3dadd(226.85, 317.6, -18.9, 6.28)
pt3dadd(226.67, 317.2, -18.9, 6.28)
pt3dadd(226.49, 316.79, -18.9, 6.28)
pt3dadd(226.14, 316.59, -18.9, 6.28)
pt3dadd(225.96, 316.18, -18.9, 6.28)
pt3dadd(225.6, 315.78, -18.9, 6.28)
pt3dadd(225.42, 315.37, -18.9, 6.28)
pt3dadd(225.25, 314.97, -18.9, 6.28)
pt3dadd(225.07, 314.56, -18.9, 6.28)
pt3dadd(224.71, 314.36, -18.9, 6.28)
pt3dadd(224.53, 313.96, -18.9, 6.28)
pt3dadd(224.35, 313.55, -18.9, 6.28)
pt3dadd(224, 313.15, -18.9, 6.28)
pt3dadd(223.82, 312.94, -18.9, 6.28)
pt3dadd(223.64, 312.74, -18.9, 6.28)
pt3dadd(223.28, 312.34, -18.9, 6.28)
pt3dadd(223.11, 312.13, -18.9, 6.28)
pt3dadd(222.93, 311.93, -18.9, 6.28)
pt3dadd(222.75, 311.93, -18.9, 6.28)
pt3dadd(221.32, 309.5, -19.95, 5.26)
pt3dadd(221.32, 309.1, -19.95, 5.26)
pt3dadd(221.14, 308.69, -19.95, 5.26)
pt3dadd(220.97, 308.49, -19.95, 5.26)
pt3dadd(220.97, 308.08, -19.95, 5.26)
pt3dadd(220.79, 307.88, -19.95, 5.26)
pt3dadd(220.61, 307.68, -19.95, 5.26)
pt3dadd(220.43, 307.27, -19.95, 5.26)
pt3dadd(220.25, 307.07, -19.95, 5.26)
pt3dadd(220.25, 306.66, -19.95, 5.26)
pt3dadd(220.07, 306.46, -19.95, 5.26)
pt3dadd(219.9, 306.26, -19.95, 5.26)
pt3dadd(219.72, 306.06, -19.95, 5.26)
pt3dadd(219.54, 305.85, -19.95, 5.26)
pt3dadd(219.36, 305.45, -19.95, 5.26)
pt3dadd(219.18, 305.25, -19.95, 5.26)
pt3dadd(219, 305.04, -19.95, 5.26)
pt3dadd(218.65, 304.84, -19.95, 5.26)
pt3dadd(218.47, 304.64, -19.95, 5.26)
pt3dadd(218.47, 304.23, -19.95, 5.26)
pt3dadd(218.29, 304.03, -19.95, 5.26)
pt3dadd(218.11, 303.83, -19.95, 5.26)
pt3dadd(217.93, 303.63, -19.95, 5.26)
pt3dadd(217.76, 303.42, -19.95, 5.26)
pt3dadd(217.58, 303.22, -19.95, 5.26)
pt3dadd(217.22, 303.22, -19.95, 5.26)
pt3dadd(217.04, 303.02, -19.95, 5.26)
pt3dadd(216.69, 302.82, -19.95, 5.26)
pt3dadd(216.33, 302.61, -19.95, 5.26)
pt3dadd(215.62, 301.8, -19.95, 5.26)
pt3dadd(215.44, 301.6, -19.95, 5.26)
pt3dadd(215.08, 301.4, -19.95, 5.26)
pt3dadd(214.9, 300.99, -19.95, 5.26)
pt3dadd(214.55, 300.79, -19.95, 5.26)
pt3dadd(214.37, 300.59, -19.95, 5.26)
pt3dadd(214.19, 300.39, -19.95, 5.26)
pt3dadd(214.01, 300.18, -19.95, 5.26)
pt3dadd(213.83, 299.98, -19.95, 5.26)
pt3dadd(213.48, 299.78, -19.95, 5.26)
pt3dadd(213.3, 299.58, -19.95, 5.26)
pt3dadd(212.94, 299.37, -19.95, 5.26)
pt3dadd(212.59, 299.17, -19.95, 5.26)
pt3dadd(212.41, 298.97, -19.95, 5.26)
pt3dadd(212.05, 298.36, -19.95, 5.26)
pt3dadd(212.05, 297.96, -19.95, 5.26)
pt3dadd(211.69, 297.55, -19.95, 5.26)
pt3dadd(211.34, 297.15, -19.95, 5.26)
pt3dadd(211.16, 296.74, -19.95, 5.26)
pt3dadd(210.98, 296.13, -19.95, 5.26)
pt3dadd(210.62, 295.93, -19.95, 5.26)
pt3dadd(210.45, 295.52, -19.95, 5.26)
pt3dadd(210.27, 295.12, -19.95, 5.26)
pt3dadd(210.09, 294.71, -19.95, 5.26)
pt3dadd(209.73, 294.31, -19.95, 5.26)
pt3dadd(209.38, 293.5, -19.95, 5.26)
pt3dadd(209.2, 293.3, -19.95, 5.26)
pt3dadd(209.02, 293.09, -19.95, 5.26)
pt3dadd(208.66, 292.28, -19.95, 5.26)
pt3dadd(208.31, 291.68, -19.95, 5.26)
pt3dadd(208.13, 291.27, -19.95, 5.26)
pt3dadd(207.95, 290.87, -19.95, 5.26)
pt3dadd(207.59, 290.46, -19.95, 5.26)
pt3dadd(207.41, 289.85, -19.95, 5.26)
pt3dadd(207.06, 289.45, -19.95, 5.26)
pt3dadd(206.88, 289.04, -19.95, 5.26)
pt3dadd(206.52, 288.64, -19.95, 5.26)
pt3dadd(206.17, 288.23, -19.95, 5.26)
pt3dadd(206.17, 287.83, -19.95, 5.26)
pt3dadd(205.81, 287.63, -19.95, 5.26)
pt3dadd(205.63, 287.42, -19.95, 5.26)
pt3dadd(205.45, 287.22, -19.95, 5.26)
pt3dadd(205.45, 286.82, -19.95, 5.26)
pt3dadd(205.1, 286.61, -19.95, 5.26)
pt3dadd(204.92, 286.21, -19.95, 5.26)
pt3dadd(204.74, 285.8, -19.95, 5.26)
pt3dadd(204.56, 285.6, -19.95, 5.26)
pt3dadd(204.38, 285.19, -19.95, 5.26)
pt3dadd(204.03, 283.98, -22.05, 4.25)
pt3dadd(204.03, 283.37, -22.05, 4.25)
pt3dadd(203.85, 283.17, -22.05, 4.25)
pt3dadd(203.85, 281.75, -22.05, 4.25)
pt3dadd(203.67, 281.55, -22.05, 4.25)
pt3dadd(203.67, 278.31, -22.05, 4.25)
pt3dadd(203.49, 277.9, -22.05, 4.25)
pt3dadd(203.49, 277.5, -22.05, 4.25)
pt3dadd(203.31, 277.09, -22.05, 4.25)
pt3dadd(203.31, 276.69, -22.05, 4.25)
pt3dadd(203.13, 276.49, -22.05, 4.25)
pt3dadd(202.96, 276.28, -22.05, 4.25)
pt3dadd(202.78, 276.08, -22.05, 4.25)
pt3dadd(202.78, 275.68, -22.05, 4.25)
pt3dadd(202.6, 275.47, -22.05, 4.25)
pt3dadd(202.42, 275.07, -22.05, 4.25)
pt3dadd(202.24, 274.86, -22.05, 4.25)
pt3dadd(202.06, 274.46, -22.05, 4.25)
pt3dadd(201.89, 274.26, -22.05, 4.25)
pt3dadd(201.71, 273.85, -22.05, 4.25)
pt3dadd(201.53, 273.65, -22.05, 4.25)
pt3dadd(201.35, 273.45, -22.05, 4.25)
pt3dadd(201.17, 273.04, -22.05, 4.25)
pt3dadd(200.99, 272.64, -22.05, 4.25)
pt3dadd(200.46, 272.03, -22.05, 4.25)
pt3dadd(200.28, 271.62, -22.05, 4.25)
pt3dadd(200.1, 271.22, -22.05, 4.25)
pt3dadd(199.92, 270.81, -22.05, 4.25)
pt3dadd(199.75, 270.61, -22.05, 4.25)
pt3dadd(199.57, 270.41, -22.05, 4.25)
pt3dadd(199.39, 270, -22.05, 4.25)
pt3dadd(199.21, 269.8, -22.05, 4.25)
pt3dadd(198.85, 269.4, -22.05, 4.25)
pt3dadd(198.68, 269.19, -22.05, 4.25)
pt3dadd(198.5, 268.99, -22.05, 4.25)
pt3dadd(198.32, 268.59, -22.05, 4.25)
pt3dadd(198.14, 267.98, -22.05, 4.25)
pt3dadd(197.78, 267.57, -22.05, 4.25)
pt3dadd(197.61, 267.17, -22.05, 4.25)
pt3dadd(197.43, 266.76, -22.05, 4.25)
pt3dadd(197.07, 266.36, -22.05, 4.25)
pt3dadd(197.07, 265.95, -22.05, 4.25)
pt3dadd(196.71, 265.55, -22.05, 4.25)
pt3dadd(196.54, 265.35, -22.05, 4.25)
pt3dadd(196.36, 264.94, -22.05, 4.25)
pt3dadd(196.18, 264.74, -22.05, 4.25)
pt3dadd(196, 264.54, -22.05, 4.25)
pt3dadd(195.82, 264.33, -22.05, 4.25)
pt3dadd(195.82, 263.93, -22.05, 4.25)
pt3dadd(195.64, 263.72, -22.05, 4.25)
pt3dadd(195.64, 263.32, -22.05, 4.25)
pt3dadd(195.47, 262.91, -22.05, 4.25)
pt3dadd(195.47, 262.31, -22.05, 4.25)
pt3dadd(195.29, 261.9, -22.05, 4.25)
pt3dadd(195.29, 261.5, -22.05, 4.25)
pt3dadd(195.11, 261.09, -22.05, 4.25)
pt3dadd(195.11, 260.69, -22.05, 4.25)
pt3dadd(194.93, 260.28, -22.05, 4.25)
pt3dadd(194.93, 259.88, -22.05, 4.25)
pt3dadd(194.75, 259.47, -22.05, 4.25)
}
}
proc shape3d_54() {
dend[41] { pt3dadd(194.75, 259.07, -22.05, 4.25)
pt3dadd(194.57, 258.86, -22.05, 4.25)
pt3dadd(194.57, 258.26, -22.05, 4.25)
pt3dadd(194.4, 257.85, -22.05, 4.25)
pt3dadd(194.4, 257.24, -22.05, 4.25)
pt3dadd(194.22, 256.84, -22.05, 4.25)
pt3dadd(194.04, 256.43, -22.05, 4.25)
pt3dadd(194.04, 255.62, -22.05, 4.25)
pt3dadd(193.86, 255.22, -22.05, 4.25)
pt3dadd(193.68, 254.81, -22.05, 4.25)
pt3dadd(193.68, 254.21, -22.05, 4.25)
pt3dadd(193.5, 253.6, -22.05, 4.25)
pt3dadd(193.33, 253.19, -22.05, 4.25)
pt3dadd(193.33, 252.58, -22.05, 4.25)
pt3dadd(193.15, 252.18, -22.05, 4.25)
pt3dadd(192.97, 251.77, -22.05, 4.25)
pt3dadd(192.97, 251.17, -22.05, 4.25)
pt3dadd(192.79, 250.76, -22.05, 4.25)
pt3dadd(192.61, 250.15, -22.05, 4.25)
pt3dadd(192.43, 249.75, -22.05, 4.25)
pt3dadd(192.43, 249.14, -22.05, 4.25)
pt3dadd(192.26, 248.74, -22.05, 4.25)
pt3dadd(192.08, 248.33, -22.05, 4.25)
pt3dadd(192.08, 247.72, -22.05, 4.25)
pt3dadd(191.9, 247.52, -22.05, 4.25)
pt3dadd(191.9, 247.12, -22.05, 4.25)
pt3dadd(191.72, 246.71, -22.05, 4.25)
pt3dadd(191.54, 246.31, -22.05, 4.25)
pt3dadd(191.54, 245.7, -22.05, 4.25)
pt3dadd(191.36, 245.29, -22.05, 4.25)
pt3dadd(191.19, 244.69, -22.05, 4.25)
pt3dadd(191.01, 244.28, -22.05, 4.25)
pt3dadd(191.01, 243.47, -22.05, 4.25)
pt3dadd(190.83, 243.07, -22.05, 4.25)
pt3dadd(190.83, 242.66, -22.05, 4.25)
pt3dadd(190.65, 242.46, -22.05, 4.25)
pt3dadd(190.65, 242.05, -22.05, 4.25)
pt3dadd(190.47, 241.44, -22.05, 4.25)
pt3dadd(190.29, 241.04, -22.05, 4.25)
pt3dadd(190.12, 240.43, -22.05, 4.25)
pt3dadd(190.12, 240.03, -22.05, 4.25)
pt3dadd(189.94, 239.62, -22.05, 4.25)
pt3dadd(189.94, 239.22, -22.05, 4.25)
pt3dadd(189.76, 238.81, -22.05, 4.25)
pt3dadd(189.58, 238.2, -22.05, 4.25)
pt3dadd(189.4, 237.6, -22.05, 4.25)
pt3dadd(189.4, 236.99, -22.05, 4.25)
pt3dadd(189.22, 236.58, -22.05, 4.25)
pt3dadd(189.05, 236.18, -22.05, 4.25)
pt3dadd(189.05, 235.57, -22.05, 4.25)
pt3dadd(188.69, 234.56, -22.05, 4.25)
pt3dadd(188.69, 233.95, -22.05, 4.25)
pt3dadd(188.51, 233.55, -22.05, 4.25)
pt3dadd(188.33, 233.34, -22.05, 4.25)
pt3dadd(188.15, 232.53, -22.05, 4.25)
pt3dadd(188.15, 232.13, -22.05, 4.25)
pt3dadd(187.98, 231.72, -22.05, 4.25)
pt3dadd(187.8, 231.32, -22.05, 4.25)
pt3dadd(187.8, 230.91, -22.05, 4.25)
pt3dadd(187.62, 230.51, -22.05, 4.25)
pt3dadd(187.44, 230.1, -22.05, 4.25)
pt3dadd(187.26, 229.49, -22.05, 4.25)
pt3dadd(187.08, 229.09, -22.05, 4.25)
pt3dadd(187.08, 228.68, -22.05, 4.25)
pt3dadd(186.91, 228.28, -22.05, 4.25)
pt3dadd(186.73, 228.08, -22.05, 4.25)
pt3dadd(186.73, 227.67, -22.05, 4.25)
pt3dadd(186.55, 227.27, -22.05, 4.25)
pt3dadd(186.37, 226.86, -22.05, 4.25)
pt3dadd(186.37, 226.46, -22.05, 4.25)
pt3dadd(186.19, 226.46, -22.05, 4.25)
pt3dadd(186.19, 226.46, -22.05, 4.25)
pt3dadd(186.19, 226.05, -22.05, 4.25)
pt3dadd(186.01, 225.85, -22.05, 4.25)
pt3dadd(186.01, 225.24, -22.05, 4.25)
pt3dadd(185.84, 224.84, -22.05, 4.25)
pt3dadd(185.84, 224.43, -22.05, 4.25)
pt3dadd(185.66, 224.03, -22.05, 4.25)
pt3dadd(185.66, 223.42, -22.05, 4.25)
pt3dadd(185.48, 223.22, -22.05, 4.25)
pt3dadd(185.48, 222.61, -22.05, 4.25)
pt3dadd(185.3, 222.2, -22.05, 4.25)
pt3dadd(185.12, 221.8, -22.05, 4.25)
pt3dadd(185.12, 220.99, -22.05, 4.25)
pt3dadd(184.94, 220.58, -22.05, 4.25)
pt3dadd(184.94, 220.18, -22.05, 4.25)
pt3dadd(184.59, 219.57, -22.05, 4.25)
pt3dadd(184.59, 218.76, -22.05, 4.25)
pt3dadd(184.41, 218.56, -22.05, 4.25)
pt3dadd(184.23, 218.15, -22.05, 4.25)
pt3dadd(184.05, 217.95, -22.05, 4.25)
pt3dadd(184.05, 217.54, -22.05, 4.25)
pt3dadd(183.87, 217.14, -22.05, 4.25)
pt3dadd(183.7, 216.94, -22.05, 4.25)
pt3dadd(183.52, 216.53, -22.05, 4.25)
pt3dadd(183.34, 216.33, -22.05, 4.25)
pt3dadd(183.34, 215.92, -22.05, 4.25)
pt3dadd(182.98, 215.52, -22.05, 4.25)
pt3dadd(182.8, 215.11, -22.05, 4.25)
pt3dadd(182.63, 214.71, -22.05, 4.25)
pt3dadd(182.45, 214.3, -22.05, 4.25)
pt3dadd(182.27, 214.1, -22.05, 4.25)
pt3dadd(181.91, 213.7, -22.05, 4.25)
pt3dadd(181.56, 213.09, -22.05, 4.25)
pt3dadd(181.38, 212.68, -22.05, 4.25)
pt3dadd(181.2, 212.28, -22.05, 4.25)
pt3dadd(180.84, 211.87, -22.05, 4.25)
pt3dadd(180.66, 211.47, -22.05, 4.25)
pt3dadd(179.95, 210.66, -22.05, 4.25)
pt3dadd(179.77, 210.05, -22.05, 4.25)
pt3dadd(179.42, 209.44, -22.05, 4.25)
pt3dadd(179.24, 208.83, -22.05, 4.25)
pt3dadd(178.88, 208.23, -22.05, 4.25)
pt3dadd(178.52, 207.62, -22.05, 4.25)
pt3dadd(178.35, 207.21, -22.05, 4.25)
pt3dadd(178.17, 206.61, -22.05, 4.25)
pt3dadd(177.81, 206, -22.05, 4.25)
pt3dadd(177.45, 205.39, -22.05, 4.25)
pt3dadd(177.1, 204.99, -22.05, 4.25)
pt3dadd(176.92, 204.38, -22.05, 4.25)
pt3dadd(176.74, 204.18, -22.05, 4.25)
pt3dadd(176.56, 203.77, -22.05, 4.25)
pt3dadd(176.21, 203.37, -22.05, 4.25)
pt3dadd(175.85, 202.76, -22.05, 4.25)
pt3dadd(175.67, 202.15, -22.05, 4.25)
pt3dadd(175.49, 201.75, -22.05, 4.25)
pt3dadd(175.14, 201.54, -22.05, 4.25)
pt3dadd(174.96, 201.14, -22.05, 4.25)
pt3dadd(174.78, 200.73, -22.05, 4.25)
pt3dadd(174.24, 200.13, -22.05, 4.25)
pt3dadd(173.89, 199.72, -22.05, 4.25)
pt3dadd(173.71, 199.32, -22.05, 4.25)
pt3dadd(173.35, 198.71, -22.05, 4.25)
pt3dadd(173.17, 198.3, -22.05, 4.25)
pt3dadd(172.64, 197.49, -22.05, 4.25)
pt3dadd(172.28, 197.09, -22.05, 4.25)
pt3dadd(171.93, 196.68, -22.05, 4.25)
pt3dadd(171.57, 196.07, -22.05, 4.25)
pt3dadd(171.21, 195.67, -22.05, 4.25)
pt3dadd(170.68, 195.06, -22.05, 4.25)
pt3dadd(170.32, 194.66, -22.05, 4.25)
pt3dadd(169.96, 194.25, -22.05, 4.25)
pt3dadd(169.79, 193.64, -22.05, 4.25)
pt3dadd(169.25, 193.24, -22.05, 4.25)
pt3dadd(167.29, 191.01, -22.05, 4.25)
pt3dadd(166.93, 190.61, -22.05, 4.25)
pt3dadd(166.4, 190.2, -22.05, 4.25)
pt3dadd(166.04, 189.8, -22.05, 4.25)
pt3dadd(165.68, 189.39, -22.05, 4.25)
pt3dadd(165.33, 188.78, -22.05, 4.25)
pt3dadd(165.15, 188.58, -22.05, 4.25)
pt3dadd(164.79, 188.18, -22.05, 4.25)
pt3dadd(164.61, 187.97, -22.05, 4.25)
pt3dadd(164.44, 187.57, -22.05, 4.25)
pt3dadd(164.08, 187.36, -22.05, 4.25)
pt3dadd(163.72, 186.76, -22.05, 4.25)
pt3dadd(163.37, 186.55, -22.05, 4.25)
pt3dadd(163.19, 186.35, -22.05, 4.25)
pt3dadd(163.01, 185.95, -22.05, 4.25)
pt3dadd(162.65, 185.74, -22.05, 4.25)
pt3dadd(162.47, 185.54, -22.05, 4.25)
pt3dadd(162.3, 185.34, -22.05, 4.25)
pt3dadd(161.94, 184.73, -22.05, 4.25)
pt3dadd(161.58, 184.53, -22.05, 4.25)
pt3dadd(161.4, 184.33, -22.05, 4.25)
pt3dadd(161.05, 183.92, -22.05, 4.25)
pt3dadd(160.87, 183.52, -22.05, 4.25)
pt3dadd(160.51, 183.11, -22.05, 4.25)
pt3dadd(160.16, 182.71, -22.05, 4.25)
pt3dadd(159.8, 182.3, -22.05, 4.25)
pt3dadd(158.91, 181.29, -22.05, 4.25)
pt3dadd(158.73, 180.88, -22.05, 4.25)
pt3dadd(158.37, 180.68, -22.05, 4.25)
pt3dadd(158.19, 180.28, -22.05, 4.25)
pt3dadd(157.84, 180.07, -22.05, 4.25)
pt3dadd(157.48, 179.47, -22.05, 4.25)
pt3dadd(156.95, 179.06, -22.05, 4.25)
pt3dadd(156.77, 178.86, -22.05, 4.25)
pt3dadd(156.41, 178.45, -22.05, 4.25)
pt3dadd(156.05, 178.25, -22.05, 4.25)
pt3dadd(155.16, 177.24, -22.05, 4.25)
pt3dadd(154.81, 176.83, -22.05, 4.25)
pt3dadd(154.63, 176.43, -22.05, 4.25)
pt3dadd(153.91, 175.62, -22.05, 4.25)
pt3dadd(153.74, 175.21, -22.05, 4.25)
pt3dadd(153.38, 175.01, -22.05, 4.25)
pt3dadd(152.84, 173.79, -22.05, 4.25)
pt3dadd(152.49, 173.19, -22.05, 4.25)
pt3dadd(152.13, 172.78, -22.05, 4.25)
pt3dadd(151.95, 172.38, -22.05, 4.25)
pt3dadd(151.42, 171.77, -22.05, 4.25)
pt3dadd(151.24, 171.36, -22.05, 4.25)
pt3dadd(150.88, 171.16, -22.05, 4.25)
pt3dadd(150.53, 170.76, -22.05, 4.25)
pt3dadd(150.35, 170.35, -22.05, 4.25)
pt3dadd(149.81, 169.74, -22.05, 4.25)
pt3dadd(149.63, 169.54, -22.05, 4.25)
pt3dadd(149.46, 169.14, -22.05, 4.25)
pt3dadd(149.1, 168.93, -22.05, 4.25)
pt3dadd(148.92, 168.53, -22.05, 4.25)
}
}
proc shape3d_55() {
dend[41] { pt3dadd(148.56, 168.53, -22.05, 4.25)
pt3dadd(148.56, 168.93, -22.05, 4.25)
pt3dadd(148.74, 168.53, -19.95, 4.25)
pt3dadd(148.74, 167.92, -19.95, 4.25)
pt3dadd(148.56, 167.72, -19.95, 4.25)
pt3dadd(148.39, 167.52, -19.95, 4.25)
pt3dadd(148.21, 167.31, -19.95, 4.25)
pt3dadd(148.03, 166.91, -19.95, 4.25)
pt3dadd(147.85, 166.5, -19.95, 4.25)
pt3dadd(147.85, 166.1, -19.95, 4.25)
pt3dadd(147.67, 165.9, -19.95, 4.25)
pt3dadd(147.49, 165.49, -19.95, 4.25)
pt3dadd(147.32, 165.29, -19.95, 4.25)
pt3dadd(147.32, 164.88, -19.95, 4.25)
pt3dadd(147.14, 164.48, -19.95, 4.25)
pt3dadd(146.78, 164.07, -19.95, 4.25)
pt3dadd(146.6, 163.87, -19.95, 4.25)
pt3dadd(146.43, 163.46, -19.95, 4.25)
pt3dadd(146.25, 163.06, -19.95, 4.25)
pt3dadd(146.07, 162.86, -19.95, 4.25)
pt3dadd(145.89, 162.65, -19.95, 4.25)
pt3dadd(145.71, 162.25, -19.95, 4.25)
pt3dadd(145.53, 161.84, -19.95, 4.25)
pt3dadd(145.36, 161.44, -19.95, 4.25)
pt3dadd(145.18, 161.24, -19.95, 4.25)
pt3dadd(145, 160.83, -19.95, 4.25)
pt3dadd(144.82, 160.43, -19.95, 4.25)
pt3dadd(144.46, 159.82, -19.95, 4.25)
pt3dadd(144.29, 159.21, -19.95, 4.25)
pt3dadd(143.93, 158.81, -19.95, 4.25)
pt3dadd(143.75, 158.4, -19.95, 4.25)
pt3dadd(143.57, 158.2, -19.95, 4.25)
pt3dadd(143.22, 157.59, -19.95, 4.25)
pt3dadd(143.04, 157.19, -19.95, 4.25)
pt3dadd(142.86, 156.98, -19.95, 4.25)
pt3dadd(142.68, 156.58, -19.95, 4.25)
pt3dadd(142.5, 156.38, -19.95, 4.25)
pt3dadd(142.15, 155.77, -19.95, 4.25)
pt3dadd(141.79, 155.36, -19.95, 4.25)
pt3dadd(141.61, 154.96, -19.95, 4.25)
pt3dadd(141.43, 154.55, -19.95, 4.25)
pt3dadd(141.25, 154.15, -19.95, 4.25)
pt3dadd(140.9, 153.94, -19.95, 4.25)
pt3dadd(140.72, 153.54, -19.95, 4.25)
pt3dadd(140.54, 153.13, -19.95, 4.25)
pt3dadd(140.18, 152.73, -19.95, 4.25)
pt3dadd(140.01, 152.32, -19.95, 4.25)
pt3dadd(140.01, 151.92, -19.95, 4.25)
pt3dadd(139.65, 151.72, -19.95, 4.25)
pt3dadd(139.47, 151.31, -19.95, 4.25)
pt3dadd(138.76, 150.5, -19.95, 4.25)
pt3dadd(138.58, 150.1, -19.95, 4.25)
pt3dadd(138.22, 149.49, -19.95, 4.25)
pt3dadd(138.04, 149.08, -19.95, 4.25)
pt3dadd(137.87, 148.68, -19.95, 4.25)
pt3dadd(137.69, 148.48, -19.95, 4.25)
pt3dadd(137.51, 148.07, -19.95, 4.25)
pt3dadd(137.15, 147.67, -19.95, 4.25)
pt3dadd(136.8, 147.26, -19.95, 4.25)
pt3dadd(136.62, 146.86, -19.95, 4.25)
pt3dadd(136.26, 146.45, -19.95, 4.25)
pt3dadd(135.9, 146.05, -19.95, 4.25)
pt3dadd(135.73, 145.84, -19.95, 4.25)
pt3dadd(135.55, 145.44, -19.95, 4.25)
pt3dadd(135.37, 145.03, -19.95, 4.25)
pt3dadd(135.01, 144.63, -19.95, 4.25)
pt3dadd(134.66, 143.82, -19.95, 4.25)
pt3dadd(134.48, 143.61, -19.95, 4.25)
pt3dadd(133.94, 143.01, -19.95, 4.25)
pt3dadd(133.76, 142.6, -19.95, 4.25)
pt3dadd(133.59, 142.2, -19.95, 4.25)
pt3dadd(133.41, 141.79, -19.95, 4.25)
pt3dadd(133.05, 141.39, -19.95, 4.25)
pt3dadd(132.87, 140.98, -19.95, 4.25)
pt3dadd(132.52, 140.58, -19.95, 4.25)
pt3dadd(132.34, 140.17, -19.95, 4.25)
pt3dadd(132.16, 139.97, -19.95, 4.25)
pt3dadd(131.98, 139.56, -19.95, 4.25)
pt3dadd(131.8, 139.36, -19.95, 4.25)
pt3dadd(131.62, 138.96, -19.95, 4.25)
pt3dadd(131.45, 138.75, -19.95, 4.25)
pt3dadd(131.27, 138.55, -19.95, 4.25)
pt3dadd(130.73, 137.94, -19.95, 4.25)
pt3dadd(130.55, 137.54, -19.95, 4.25)
pt3dadd(130.38, 137.13, -19.95, 4.25)
pt3dadd(130.02, 136.73, -19.95, 4.25)
pt3dadd(129.84, 136.12, -19.95, 4.25)
pt3dadd(129.31, 135.72, -19.95, 4.25)
pt3dadd(129.13, 135.11, -19.95, 4.25)
pt3dadd(128.77, 134.7, -19.95, 4.25)
pt3dadd(128.41, 134.1, -19.95, 4.25)
pt3dadd(128.06, 133.69, -19.95, 4.25)
pt3dadd(128.06, 133.29, -19.95, 4.25)
pt3dadd(127.7, 132.88, -19.95, 4.25)
pt3dadd(127.52, 132.47, -19.95, 4.25)
pt3dadd(127.17, 132.07, -19.95, 4.25)
pt3dadd(126.81, 131.46, -19.95, 4.25)
pt3dadd(126.63, 131.26, -19.95, 4.25)
pt3dadd(126.27, 130.45, -19.95, 4.25)
pt3dadd(126.1, 130.25, -19.95, 4.25)
pt3dadd(125.92, 130.04, -19.95, 4.25)
pt3dadd(125.56, 129.44, -19.95, 4.25)
pt3dadd(125.38, 129.03, -19.95, 4.25)
pt3dadd(125.2, 128.83, -19.95, 4.25)
pt3dadd(124.49, 128.02, -19.95, 4.25)
pt3dadd(124.31, 127.61, -19.95, 4.25)
pt3dadd(123.96, 127.41, -19.95, 4.25)
pt3dadd(123.78, 127.21, -19.95, 4.25)
pt3dadd(123.6, 127.01, -19.95, 4.25)
pt3dadd(123.42, 126.8, -19.95, 4.25)
pt3dadd(123.06, 126.4, -19.95, 4.25)
pt3dadd(122.89, 125.99, -19.95, 4.25)
pt3dadd(122.71, 125.79, -19.95, 4.25)
pt3dadd(122.53, 125.59, -19.95, 4.25)
pt3dadd(122.17, 125.18, -19.95, 4.25)
pt3dadd(121.82, 124.78, -19.95, 4.25)
pt3dadd(121.64, 124.17, -19.95, 4.25)
pt3dadd(121.46, 123.97, -19.95, 4.25)
pt3dadd(121.28, 123.56, -19.95, 4.25)
pt3dadd(120.75, 122.75, -19.95, 4.25)
pt3dadd(120.57, 122.35, -19.95, 4.25)
pt3dadd(120.39, 121.94, -19.95, 4.25)
pt3dadd(120.03, 121.54, -19.95, 4.25)
pt3dadd(119.85, 121.33, -19.95, 4.25)
pt3dadd(119.68, 120.93, -19.95, 4.25)
pt3dadd(119.5, 120.52, -19.95, 4.25)
pt3dadd(119.32, 120.32, -19.95, 4.25)
pt3dadd(119.14, 120.12, -19.95, 4.25)
pt3dadd(118.78, 119.71, -19.95, 4.25)
pt3dadd(118.43, 119.51, -19.95, 4.25)
pt3dadd(118.25, 119.11, -19.95, 4.25)
pt3dadd(117.89, 118.9, -19.95, 4.25)
pt3dadd(117.71, 118.5, -19.95, 4.25)
pt3dadd(117.54, 118.3, -19.95, 4.25)
pt3dadd(117.36, 117.89, -19.95, 4.25)
pt3dadd(117.18, 117.28, -19.95, 4.25)
pt3dadd(116.82, 117.08, -19.95, 4.25)
pt3dadd(116.47, 116.68, -19.95, 4.25)
pt3dadd(116.11, 116.07, -19.95, 4.25)
pt3dadd(115.93, 115.66, -19.95, 4.25)
pt3dadd(115.57, 115.06, -19.95, 4.25)
pt3dadd(115.4, 114.85, -19.95, 4.25)
pt3dadd(115.22, 114.45, -19.95, 4.25)
pt3dadd(115.04, 114.25, -19.95, 4.25)
pt3dadd(114.68, 114.04, -19.95, 4.25)
pt3dadd(114.5, 113.64, -19.95, 4.25)
pt3dadd(113.97, 113.03, -19.95, 4.25)
pt3dadd(113.79, 112.83, -19.95, 4.25)
pt3dadd(113.43, 112.63, -19.95, 4.25)
pt3dadd(113.26, 112.22, -19.95, 4.25)
pt3dadd(112.9, 112.02, -19.95, 4.25)
pt3dadd(112.36, 111.82, -19.95, 4.25)
pt3dadd(111.83, 111.21, -19.95, 4.25)
pt3dadd(111.47, 111.01, -19.95, 4.25)
pt3dadd(111.12, 110.6, -19.95, 4.25)
pt3dadd(110.94, 110.4, -19.95, 4.25)
pt3dadd(110.58, 110.4, -19.95, 4.25)
pt3dadd(110.22, 109.99, -19.95, 4.25)
pt3dadd(109.69, 109.99, -19.95, 4.25)
pt3dadd(109.33, 109.79, -19.95, 4.25)
pt3dadd(108.98, 109.59, -19.95, 4.25)
pt3dadd(108.8, 109.38, -19.95, 4.25)
pt3dadd(108.62, 109.18, -19.95, 4.25)
pt3dadd(108.26, 108.98, -19.95, 4.25)
pt3dadd(107.91, 108.78, -19.95, 4.25)
pt3dadd(107.01, 108.78, -19.95, 4.25)
pt3dadd(107.19, 108.57, -19.95, 4.25)
pt3dadd(107.73, 108.57, -19.95, 4.25)
pt3dadd(107.91, 108.78, -19.95, 4.25)
pt3dadd(107.19, 108.37, -17.85, 4.25)
pt3dadd(106.66, 108.37, -17.85, 4.25)
pt3dadd(106.48, 108.17, -17.85, 4.25)
pt3dadd(106.3, 107.97, -17.85, 4.25)
pt3dadd(105.94, 107.76, -17.85, 4.25)
pt3dadd(105.77, 107.56, -17.85, 4.25)
pt3dadd(105.41, 107.56, -17.85, 4.25)
pt3dadd(105.05, 107.36, -17.85, 4.25)
pt3dadd(104.7, 107.16, -17.85, 4.25)
pt3dadd(104.52, 106.75, -17.85, 4.25)
pt3dadd(104.16, 106.55, -17.85, 4.25)
pt3dadd(103.8, 106.35, -17.85, 4.25)
pt3dadd(103.63, 106.14, -17.85, 4.25)
pt3dadd(103.27, 106.14, -17.85, 4.25)
pt3dadd(103.09, 105.94, -17.85, 4.25)
pt3dadd(102.73, 105.54, -17.85, 4.25)
pt3dadd(102.56, 105.33, -17.85, 4.25)
pt3dadd(102.2, 104.93, -17.85, 4.25)
pt3dadd(102.02, 104.73, -17.85, 4.25)
pt3dadd(101.66, 104.32, -17.85, 4.25)
pt3dadd(101.49, 104.12, -17.85, 4.25)
pt3dadd(100.95, 103.51, -17.85, 4.25)
pt3dadd(100.42, 102.9, -17.85, 4.25)
pt3dadd(100.24, 102.7, -17.85, 4.25)
pt3dadd(99.88, 102.5, -17.85, 4.25)
pt3dadd(99.52, 102.09, -17.85, 4.25)
pt3dadd(99.35, 101.89, -17.85, 4.25)
pt3dadd(99.17, 101.49, -17.85, 4.25)
pt3dadd(98.99, 101.28, -17.85, 4.25)
pt3dadd(98.63, 101.08, -17.85, 4.25)
pt3dadd(98.45, 100.88, -17.85, 4.25)
}
}
proc shape3d_56() {
dend[41] { pt3dadd(97.92, 100.27, -17.85, 4.25)
pt3dadd(97.74, 100.07, -17.85, 4.25)
pt3dadd(97.56, 99.86, -17.85, 4.25)
pt3dadd(97.38, 99.46, -17.85, 4.25)
pt3dadd(97.03, 99.26, -17.85, 4.25)
pt3dadd(96.67, 98.85, -17.85, 4.25)
pt3dadd(96.31, 98.65, -17.85, 4.25)
pt3dadd(96.14, 98.45, -17.85, 4.25)
pt3dadd(95.96, 98.04, -17.85, 4.25)
pt3dadd(95.78, 97.84, -17.85, 4.25)
pt3dadd(95.6, 97.43, -17.85, 4.25)
pt3dadd(95.42, 97.23, -17.85, 4.25)
pt3dadd(95.24, 96.62, -17.85, 4.25)
pt3dadd(94.89, 96.42, -17.85, 4.25)
pt3dadd(94.71, 96.02, -17.85, 4.25)
pt3dadd(94.35, 95.61, -17.85, 4.25)
pt3dadd(94.17, 95.21, -17.85, 4.25)
pt3dadd(94, 94.8, -17.85, 4.25)
pt3dadd(93.82, 94.4, -17.85, 4.25)
pt3dadd(93.64, 93.99, -17.85, 4.25)
pt3dadd(93.28, 93.79, -17.85, 4.25)
pt3dadd(93.82, 93.79, -17.85, 3.91)
pt3dadd(93.64, 93.59, -17.85, 3.91)
pt3dadd(93.46, 93.38, -17.85, 3.91)
pt3dadd(93.28, 93.18, -17.85, 3.91)
pt3dadd(93.1, 92.98, -17.85, 3.91)
pt3dadd(92.75, 92.78, -17.85, 3.91)
pt3dadd(92.57, 92.57, -17.85, 3.91)
pt3dadd(92.21, 92.57, -17.85, 3.91)
pt3dadd(92.03, 92.37, -17.85, 3.91)
pt3dadd(91.86, 92.17, -17.85, 3.91)
pt3dadd(91.68, 91.97, -17.85, 3.91)
pt3dadd(91.5, 91.76, -17.85, 3.91)
pt3dadd(91.32, 91.56, -17.85, 3.91)
pt3dadd(91.14, 91.36, -17.85, 3.91)
pt3dadd(90.96, 91.16, -17.85, 3.91)
pt3dadd(90.96, 91.16, -17.85, 3.4)
pt3dadd(90.79, 90.95, -17.85, 3.4)
pt3dadd(90.61, 90.55, -17.85, 3.4)
pt3dadd(90.25, 90.35, -17.85, 3.4)
pt3dadd(89.89, 90.14, -17.85, 3.4)
pt3dadd(89.36, 89.54, -17.85, 3.4)
pt3dadd(89.18, 89.33, -17.85, 3.4)
pt3dadd(89, 89.13, -17.85, 3.4)
pt3dadd(88.82, 88.93, -17.85, 3.4)
pt3dadd(88.65, 88.72, -17.85, 3.4)
pt3dadd(88.29, 88.52, -17.85, 3.4)
pt3dadd(88.11, 88.32, -17.85, 3.4)
pt3dadd(87.4, 87.51, -17.85, 3.4)
pt3dadd(87.22, 87.31, -17.85, 3.4)
pt3dadd(87.04, 87.1, -17.85, 3.4)
pt3dadd(86.68, 86.9, -17.85, 3.4)
pt3dadd(86.33, 86.7, -17.85, 3.4)
pt3dadd(86.15, 86.29, -17.85, 3.4)
pt3dadd(85.97, 86.09, -17.85, 3.4)
pt3dadd(85.61, 85.89, -17.85, 3.4)
pt3dadd(85.44, 85.69, -17.85, 3.4)
pt3dadd(84.9, 85.08, -17.85, 3.4)
pt3dadd(84.72, 84.88, -17.85, 3.4)
pt3dadd(84.37, 84.67, -17.85, 3.4)
pt3dadd(84.19, 84.27, -17.85, 3.4)
pt3dadd(83.83, 83.66, -17.85, 3.4)
pt3dadd(83.65, 83.46, -17.85, 3.4)
pt3dadd(83.47, 83.05, -17.85, 3.4)
pt3dadd(83.12, 82.85, -17.85, 3.4)
pt3dadd(82.94, 82.45, -17.85, 3.4)
pt3dadd(82.76, 82.04, -17.85, 3.4)
pt3dadd(82.58, 81.84, -17.85, 3.4)
pt3dadd(82.23, 81.64, -17.85, 3.4)
pt3dadd(81.87, 81.43, -17.85, 3.4)
pt3dadd(81.69, 81.23, -17.85, 3.4)
pt3dadd(81.51, 81.03, -17.85, 3.4)
pt3dadd(81.33, 80.42, -17.85, 3.4)
pt3dadd(80.98, 80.22, -17.85, 3.4)
pt3dadd(80.8, 79.81, -17.85, 3.4)
pt3dadd(80.62, 79.61, -17.85, 3.4)
pt3dadd(80.27, 79.21, -17.85, 3.4)
pt3dadd(80.09, 79, -17.85, 3.4)
pt3dadd(79.73, 78.8, -17.85, 3.4)
pt3dadd(79.37, 78.4, -17.85, 3.4)
pt3dadd(79.2, 78.19, -17.85, 3.4)
pt3dadd(78.66, 77.79, -17.85, 3.4)
pt3dadd(78.48, 77.58, -17.85, 3.4)
pt3dadd(78.13, 77.18, -17.85, 3.4)
pt3dadd(77.95, 76.98, -17.85, 3.4)
pt3dadd(77.77, 76.77, -17.85, 3.4)
pt3dadd(77.41, 76.77, -17.85, 3.4)
pt3dadd(77.23, 76.57, -17.85, 3.4)
pt3dadd(76.52, 75.76, -17.85, 3.4)
pt3dadd(76.34, 75.56, -17.85, 3.4)
pt3dadd(75.99, 75.36, -17.85, 3.4)
pt3dadd(75.63, 74.95, -17.85, 3.4)
pt3dadd(75.27, 74.55, -17.85, 3.4)
pt3dadd(74.92, 74.34, -17.85, 3.4)
pt3dadd(74.74, 74.14, -17.85, 3.4)
pt3dadd(74.02, 73.33, -17.85, 3.4)
pt3dadd(73.67, 73.13, -17.85, 3.4)
pt3dadd(73.31, 72.72, -17.85, 3.4)
pt3dadd(72.95, 72.52, -17.85, 3.4)
pt3dadd(72.6, 72.12, -17.85, 3.4)
pt3dadd(72.42, 71.71, -17.85, 3.4)
pt3dadd(72.06, 71.51, -17.85, 3.4)
pt3dadd(71.71, 71.31, -17.85, 3.4)
pt3dadd(71.53, 70.9, -17.85, 3.4)
pt3dadd(71.17, 70.7, -17.85, 3.4)
pt3dadd(70.28, 69.69, -17.85, 3.4)
pt3dadd(70.1, 69.48, -17.85, 3.4)
pt3dadd(69.57, 68.88, -17.85, 3.4)
pt3dadd(69.21, 68.67, -17.85, 3.4)
pt3dadd(69.03, 68.27, -17.85, 3.4)
pt3dadd(68.85, 68.07, -17.85, 3.4)
pt3dadd(68.5, 67.66, -17.85, 3.4)
pt3dadd(68.14, 67.46, -17.85, 3.4)
pt3dadd(67.78, 66.85, -17.85, 3.4)
pt3dadd(67.43, 66.65, -17.85, 3.4)
pt3dadd(67.25, 66.44, -17.85, 3.4)
pt3dadd(65.64, 64.62, -17.85, 3.4)
pt3dadd(65.46, 64.42, -17.85, 3.4)
pt3dadd(65.11, 64.01, -17.85, 3.4)
pt3dadd(64.93, 63.81, -17.85, 3.4)
pt3dadd(64.57, 63.41, -17.85, 3.4)
pt3dadd(64.22, 63.2, -17.85, 3.4)
pt3dadd(64.04, 62.8, -17.85, 3.4)
pt3dadd(63.5, 62.39, -17.85, 3.4)
pt3dadd(63.32, 62.19, -17.85, 3.4)
pt3dadd(62.97, 61.79, -17.85, 3.4)
pt3dadd(62.61, 61.58, -17.85, 3.4)
pt3dadd(62.08, 60.98, -17.85, 3.4)
pt3dadd(61.72, 60.37, -17.85, 3.4)
pt3dadd(60.47, 58.95, -17.85, 3.4)
pt3dadd(60.29, 58.55, -17.85, 3.4)
pt3dadd(60.11, 58.14, -17.85, 3.4)
pt3dadd(59.94, 57.94, -17.85, 3.4)
pt3dadd(59.76, 57.74, -17.85, 3.4)
pt3dadd(59.4, 57.53, -17.85, 3.4)
pt3dadd(59.22, 57.33, -17.85, 3.4)
pt3dadd(59.04, 56.93, -17.85, 3.4)
pt3dadd(58.69, 56.52, -17.85, 3.4)
pt3dadd(58.51, 56.11, -17.85, 3.4)
pt3dadd(58.15, 55.71, -17.85, 3.4)
pt3dadd(57.97, 55.51, -17.85, 3.4)
pt3dadd(57.8, 55.1, -17.85, 3.4)
pt3dadd(57.44, 54.7, -17.85, 3.4)
pt3dadd(57.26, 54.29, -17.85, 3.4)
pt3dadd(56.9, 53.89, -17.85, 3.4)
pt3dadd(56.73, 53.48, -17.85, 3.4)
pt3dadd(56.55, 53.08, -17.85, 3.4)
pt3dadd(56.19, 52.87, -17.85, 3.4)
pt3dadd(55.83, 52.47, -17.85, 3.4)
pt3dadd(55.48, 52.06, -17.85, 3.4)
pt3dadd(55.12, 51.46, -17.85, 3.4)
pt3dadd(54.59, 50.85, -17.85, 3.4)
pt3dadd(54.23, 50.24, -17.85, 3.4)
pt3dadd(53.87, 50.04, -17.85, 3.4)
pt3dadd(53.69, 49.84, -17.85, 3.4)
pt3dadd(53.52, 49.63, -17.85, 3.4)
pt3dadd(53.34, 49.23, -17.85, 3.4)
pt3dadd(52.98, 49.03, -17.85, 3.4)
pt3dadd(52.8, 48.62, -17.85, 3.4)
pt3dadd(52.62, 48.42, -17.85, 3.4)
pt3dadd(52.45, 48.01, -17.85, 3.4)
pt3dadd(52.27, 47.61, -17.85, 3.4)
pt3dadd(51.91, 47.2, -17.85, 3.4)
pt3dadd(51.73, 46.6, -17.85, 3.4)
pt3dadd(51.02, 45.79, -17.85, 3.4)
pt3dadd(50.66, 45.18, -17.85, 3.4)
pt3dadd(50.48, 44.77, -17.85, 3.4)
pt3dadd(50.13, 44.57, -17.85, 3.4)
pt3dadd(49.95, 44.16, -17.85, 3.4)
pt3dadd(49.59, 43.76, -17.85, 3.4)
pt3dadd(49.24, 43.35, -17.85, 3.4)
pt3dadd(49.06, 43.15, -17.85, 3.4)
pt3dadd(48.88, 42.75, -17.85, 3.4)
pt3dadd(48.52, 42.34, -17.85, 3.4)
pt3dadd(48.34, 42.14, -17.85, 3.4)
pt3dadd(48.17, 41.94, -17.85, 3.4)
pt3dadd(47.99, 41.73, -17.85, 3.4)
pt3dadd(47.81, 41.33, -17.85, 3.4)
pt3dadd(47.45, 41.13, -17.85, 3.4)
pt3dadd(47.27, 40.92, -17.85, 3.4)
pt3dadd(47.1, 40.72, -17.85, 3.4)
pt3dadd(46.92, 40.52, -17.85, 3.4)
pt3dadd(46.56, 40.52, -17.85, 3.4)
pt3dadd(48.34, 41.53, -15.75, 3.4)
pt3dadd(47.99, 41.53, -15.75, 3.4)
pt3dadd(47.81, 41.33, -15.75, 3.4)
pt3dadd(47.63, 41.13, -15.75, 3.4)
pt3dadd(47.45, 40.92, -15.75, 3.4)
pt3dadd(47.27, 40.72, -15.75, 3.4)
pt3dadd(47.1, 40.52, -15.75, 3.4)
pt3dadd(46.92, 40.32, -15.75, 3.4)
pt3dadd(46.56, 39.91, -15.75, 3.4)
pt3dadd(46.56, 39.51, -15.75, 3.4)
pt3dadd(46.38, 39.3, -15.75, 3.4)
pt3dadd(46.2, 38.9, -15.75, 3.4)
pt3dadd(46.03, 38.49, -15.75, 3.4)
pt3dadd(45.85, 38.29, -15.75, 3.4)
pt3dadd(45.85, 37.89, -15.75, 3.4)
pt3dadd(45.67, 37.48, -15.75, 3.4)
pt3dadd(45.49, 37.08, -15.75, 3.4)
}
}
proc shape3d_57() {
dend[41] { pt3dadd(45.49, 36.67, -15.75, 3.4)
pt3dadd(45.31, 36.27, -15.75, 3.4)
pt3dadd(45.31, 35.86, -15.75, 3.4)
pt3dadd(45.13, 35.46, -15.75, 3.4)
pt3dadd(44.96, 35.05, -15.75, 3.4)
pt3dadd(44.78, 34.65, -15.75, 3.4)
pt3dadd(44.6, 34.24, -15.75, 3.4)
pt3dadd(44.6, 33.83, -15.75, 3.4)
pt3dadd(44.42, 33.43, -15.75, 3.4)
pt3dadd(44.24, 33.23, -15.75, 3.4)
pt3dadd(44.06, 32.62, -15.75, 3.4)
pt3dadd(43.89, 32.42, -15.75, 3.4)
pt3dadd(43.71, 31.81, -15.75, 3.4)
pt3dadd(43.53, 31.61, -15.75, 3.4)
pt3dadd(43.35, 31, -15.75, 3.4)
pt3dadd(43.17, 30.8, -15.75, 3.4)
pt3dadd(43.17, 30.39, -15.75, 3.4)
pt3dadd(42.99, 30.19, -15.75, 3.4)
pt3dadd(42.82, 29.78, -15.75, 3.4)
pt3dadd(42.64, 29.58, -15.75, 3.4)
pt3dadd(42.64, 29.18, -15.75, 3.4)
pt3dadd(42.28, 28.77, -15.75, 3.4)
pt3dadd(42.28, 28.37, -15.75, 3.4)
pt3dadd(42.1, 28.16, -15.75, 3.4)
pt3dadd(41.92, 27.76, -15.75, 3.4)
pt3dadd(41.75, 27.35, -15.75, 3.4)
pt3dadd(41.57, 26.95, -15.75, 3.4)
pt3dadd(41.39, 26.54, -15.75, 3.4)
pt3dadd(41.03, 25.94, -15.75, 3.4)
pt3dadd(40.85, 25.53, -15.75, 3.4)
pt3dadd(40.68, 25.33, -15.75, 3.4)
pt3dadd(40.5, 25.13, -15.75, 3.4)
pt3dadd(40.32, 24.92, -15.75, 3.4)
pt3dadd(40.14, 24.52, -15.75, 3.4)
pt3dadd(39.96, 24.11, -15.75, 3.4)
pt3dadd(39.61, 23.91, -15.75, 3.4)
pt3dadd(39.61, 23.51, -15.75, 3.4)
pt3dadd(39.43, 23.3, -15.75, 3.4)
pt3dadd(39.25, 22.9, -15.75, 3.4)
pt3dadd(39.07, 22.69, -15.75, 3.4)
pt3dadd(38.71, 22.29, -15.75, 3.4)
pt3dadd(38.54, 21.88, -15.75, 3.4)
pt3dadd(38.36, 21.48, -15.75, 3.4)
pt3dadd(38.18, 21.28, -15.75, 3.4)
pt3dadd(38, 20.87, -15.75, 3.4)
pt3dadd(37.64, 20.47, -15.75, 3.4)
pt3dadd(37.47, 19.86, -15.75, 3.4)
pt3dadd(37.11, 19.45, -15.75, 3.4)
pt3dadd(36.93, 18.85, -15.75, 3.4)
pt3dadd(36.75, 18.64, -15.75, 3.4)
pt3dadd(36.57, 18.24, -15.75, 3.4)
pt3dadd(36.4, 17.83, -15.75, 3.4)
pt3dadd(36.22, 17.43, -15.75, 3.4)
pt3dadd(36.04, 17.02, -15.75, 3.4)
pt3dadd(35.68, 16.62, -15.75, 3.4)
pt3dadd(35.5, 16.42, -15.75, 3.4)
pt3dadd(35.33, 16.21, -15.75, 3.4)
pt3dadd(35.15, 15.81, -15.75, 3.4)
pt3dadd(34.97, 15.61, -15.75, 3.4)
pt3dadd(34.79, 15.2, -15.75, 3.4)
pt3dadd(34.61, 14.8, -15.75, 3.4)
pt3dadd(34.26, 14.39, -15.75, 3.4)
pt3dadd(34.08, 13.99, -15.75, 3.4)
pt3dadd(33.9, 13.78, -15.75, 3.4)
pt3dadd(33.72, 13.38, -15.75, 3.4)
pt3dadd(33.54, 13.18, -15.75, 3.4)
pt3dadd(33.36, 12.97, -15.75, 3.4)
pt3dadd(33.19, 12.57, -15.75, 3.4)
pt3dadd(33.01, 12.37, -15.75, 3.4)
pt3dadd(32.83, 11.96, -15.75, 3.4)
pt3dadd(32.65, 11.76, -15.75, 3.4)
pt3dadd(32.47, 11.35, -15.75, 3.4)
pt3dadd(32.29, 11.15, -15.75, 3.4)
pt3dadd(32.12, 10.74, -15.75, 3.4)
pt3dadd(31.94, 10.34, -15.75, 3.4)
pt3dadd(31.76, 10.14, -15.75, 3.4)
pt3dadd(31.4, 9.73, -15.75, 3.4)
pt3dadd(31.22, 9.53, -15.75, 3.4)
pt3dadd(31.05, 9.33, -15.75, 3.4)
pt3dadd(-11.27, -95.55, -15.75, 2.38)
pt3dadd(-11.63, -95.76, -15.75, 2.38)
pt3dadd(-11.98, -96.16, -15.75, 2.38)
pt3dadd(-12.16, -96.36, -15.75, 2.38)
pt3dadd(-12.34, -96.57, -15.75, 2.38)
pt3dadd(-12.52, -96.77, -15.75, 2.38)
pt3dadd(-12.7, -96.97, -15.75, 2.38)
pt3dadd(-12.87, -97.17, -15.75, 2.38)
pt3dadd(-12.87, -96.77, -15.75, 2.38)
pt3dadd(-12.34, -95.55, -15.75, 2.38)
pt3dadd(-11.8, -96.57, -15.75, 2.38)
pt3dadd(-11.8, -96.97, -15.75, 2.38)
pt3dadd(-11.98, -97.17, -15.75, 2.38)
pt3dadd(-12.16, -97.38, -15.75, 2.38)
pt3dadd(-12.34, -97.58, -15.75, 2.38)
pt3dadd(-12.34, -97.98, -15.75, 2.38)
pt3dadd(-12.52, -98.19, -15.75, 2.38)
pt3dadd(-12.7, -98.39, -15.75, 2.38)
pt3dadd(-12.87, -98.59, -15.75, 2.38)
pt3dadd(-13.05, -98.79, -15.75, 2.38)
pt3dadd(-13.23, -99.2, -15.75, 2.38)
pt3dadd(-13.23, -99.6, -15.75, 2.38)
pt3dadd(-13.41, -100.01, -15.75, 2.38)
pt3dadd(-13.59, -100.21, -15.75, 2.38)
pt3dadd(-13.59, -100.82, -15.75, 2.38)
pt3dadd(-13.77, -101.23, -15.75, 2.38)
pt3dadd(-13.94, -101.43, -15.75, 2.38)
pt3dadd(-14.12, -102.04, -15.75, 2.38)
pt3dadd(-14.12, -102.64, -15.75, 2.38)
pt3dadd(-14.3, -103.25, -15.75, 2.38)
pt3dadd(-14.48, -103.66, -15.75, 2.38)
pt3dadd(-14.66, -104.06, -15.75, 2.38)
pt3dadd(-14.84, -104.47, -15.75, 2.38)
pt3dadd(-15.01, -105.07, -15.75, 2.38)
pt3dadd(-15.19, -105.68, -15.75, 2.38)
pt3dadd(-15.37, -106.29, -15.75, 2.38)
pt3dadd(-15.55, -106.69, -15.75, 3.74)
pt3dadd(-15.73, -106.9, -15.75, 2.38)
pt3dadd(-15.91, -107.5, -15.75, 2.38)
pt3dadd(-16.08, -107.91, -15.75, 2.38)
pt3dadd(-16.26, -108.31, -15.75, 2.38)
pt3dadd(-16.44, -108.92, -15.75, 2.38)
pt3dadd(-16.62, -109.73, -15.75, 2.38)
pt3dadd(-16.8, -110.14, -15.75, 2.38)
pt3dadd(-17.15, -110.95, -15.75, 2.38)
pt3dadd(-17.51, -111.76, -15.75, 2.38)
pt3dadd(-17.69, -112.37, -15.75, 2.38)
pt3dadd(-17.87, -112.77, -15.75, 2.38)
pt3dadd(-18.4, -113.78, -15.75, 2.38)
pt3dadd(-18.76, -114.39, -15.75, 2.38)
pt3dadd(-18.94, -115.2, -15.75, 2.38)
pt3dadd(-19.29, -116.01, -15.75, 2.38)
pt3dadd(-19.65, -116.62, -15.75, 2.38)
pt3dadd(-19.83, -117.43, -15.75, 2.38)
pt3dadd(-20.18, -117.83, -15.75, 2.38)
pt3dadd(-20.36, -118.44, -15.75, 2.38)
pt3dadd(-20.54, -119.25, -15.75, 2.38)
pt3dadd(-20.9, -119.66, -15.75, 2.38)
pt3dadd(-21.08, -120.47, -15.75, 2.38)
pt3dadd(-21.25, -121.07, -15.75, 2.38)
pt3dadd(-21.61, -121.88, -15.75, 2.38)
pt3dadd(-21.97, -122.7, -15.75, 2.38)
pt3dadd(-22.15, -123.1, -15.75, 2.38)
pt3dadd(-22.5, -123.91, -15.75, 2.38)
pt3dadd(-22.68, -124.32, -15.75, 2.38)
pt3dadd(-23.22, -125.73, -15.75, 2.38)
pt3dadd(-23.39, -126.34, -15.75, 2.38)
pt3dadd(-23.75, -127.15, -15.75, 2.38)
pt3dadd(-23.93, -127.76, -15.75, 2.38)
pt3dadd(-24.29, -128.37, -15.75, 2.38)
pt3dadd(-24.64, -129.38, -15.75, 2.38)
pt3dadd(-25, -129.99, -15.75, 2.38)
pt3dadd(-25.18, -130.59, -15.75, 2.38)
pt3dadd(-25.36, -131.2, -15.75, 2.38)
pt3dadd(-25.71, -132.01, -15.75, 2.38)
pt3dadd(-26.07, -132.42, -15.75, 2.38)
pt3dadd(-26.25, -133.02, -15.75, 2.38)
pt3dadd(-26.43, -133.43, -15.75, 2.38)
pt3dadd(-26.78, -134.04, -15.75, 2.38)
pt3dadd(-26.96, -134.44, -15.75, 2.38)
pt3dadd(-27.14, -135.05, -15.75, 2.38)
pt3dadd(-27.5, -135.66, -15.75, 2.38)
pt3dadd(-27.67, -136.06, -15.75, 2.38)
pt3dadd(-28.03, -137.08, -15.75, 2.38)
pt3dadd(-28.39, -137.48, -15.75, 2.38)
pt3dadd(-28.57, -137.89, -15.75, 2.38)
pt3dadd(-28.74, -138.49, -15.75, 2.38)
pt3dadd(-28.92, -138.9, -15.75, 2.38)
pt3dadd(-29.1, -139.3, -15.75, 2.38)
pt3dadd(-29.46, -139.71, -15.75, 2.38)
pt3dadd(-29.64, -140.11, -15.75, 2.38)
pt3dadd(-29.99, -140.72, -15.75, 2.38)
pt3dadd(-30.17, -141.13, -15.75, 2.38)
pt3dadd(-30.35, -141.53, -15.75, 2.38)
pt3dadd(-30.53, -141.94, -15.75, 2.38)
pt3dadd(-30.88, -142.54, -15.75, 2.38)
pt3dadd(-31.06, -142.95, -15.75, 2.38)
pt3dadd(-31.42, -143.56, -15.75, 2.38)
pt3dadd(-31.6, -143.96, -15.75, 2.38)
pt3dadd(-31.78, -144.37, -15.75, 2.38)
pt3dadd(-32.13, -144.77, -15.75, 2.38)
pt3dadd(-32.31, -144.98, -15.75, 2.38)
pt3dadd(-32.49, -145.18, -15.75, 2.38)
pt3dadd(-32.67, -145.79, -15.75, 2.38)
pt3dadd(-32.85, -146.19, -15.75, 2.38)
pt3dadd(-33.02, -146.6, -15.75, 2.38)
pt3dadd(-33.2, -147, -15.75, 2.38)
pt3dadd(-33.38, -147.41, -15.75, 2.38)
pt3dadd(-33.74, -147.81, -15.75, 2.38)
pt3dadd(-33.92, -148.01, -15.75, 2.38)
pt3dadd(-34.09, -148.62, -15.75, 2.38)
pt3dadd(-34.27, -149.03, -15.75, 2.38)
pt3dadd(-34.45, -149.43, -15.75, 2.38)
pt3dadd(-34.63, -149.84, -15.75, 2.38)
pt3dadd(-34.81, -150.24, -15.75, 2.38)
pt3dadd(-34.81, -150.65, -15.75, 2.38)
pt3dadd(-35.16, -151.05, -15.75, 2.38)
pt3dadd(-35.34, -151.46, -15.75, 2.38)
pt3dadd(-35.52, -151.86, -15.75, 2.38)
pt3dadd(-35.52, -152.27, -15.75, 2.38)
pt3dadd(-35.7, -152.47, -15.75, 2.38)
}
}
proc shape3d_58() {
dend[41] { pt3dadd(-35.7, -152.87, -15.75, 2.38)
pt3dadd(-35.88, -153.28, -15.75, 2.38)
pt3dadd(-36.06, -153.68, -15.75, 2.38)
pt3dadd(-36.23, -154.29, -15.75, 2.38)
pt3dadd(-36.23, -154.9, -15.75, 2.38)
pt3dadd(-36.41, -155.1, -15.75, 2.38)
pt3dadd(-36.41, -154.9, -15.75, 2.38)
pt3dadd(-36.23, -154.09, -15.75, 2.38)
pt3dadd(-36.23, -154.7, -15.75, 2.38)
pt3dadd(-36.41, -155.1, -15.75, 2.38)
pt3dadd(-36.59, -155.51, -15.75, 2.38)
pt3dadd(-36.77, -156.12, -15.75, 2.38)
pt3dadd(-36.95, -156.52, -15.75, 2.38)
pt3dadd(-37.13, -157.13, -15.75, 2.38)
pt3dadd(-37.48, -157.94, -15.75, 2.38)
pt3dadd(-37.66, -158.55, -15.75, 2.38)
pt3dadd(-37.84, -158.95, -15.75, 2.38)
pt3dadd(-38.02, -159.36, -15.75, 2.38)
pt3dadd(-38.2, -159.76, -15.75, 2.38)
pt3dadd(-38.2, -160.17, -15.75, 2.38)
pt3dadd(-38.55, -160.77, -15.75, 2.38)
pt3dadd(-38.73, -161.18, -15.75, 2.38)
pt3dadd(-38.91, -161.58, -15.75, 2.38)
pt3dadd(-39.09, -162.19, -15.75, 2.38)
pt3dadd(-39.27, -162.6, -15.75, 2.38)
pt3dadd(-36.73, -163, -15.75, 2.38)
pt3dadd(-39.62, -163.41, -15.75, 2.38)
pt3dadd(-39.8, -164.01, -15.75, 2.38)
pt3dadd(-39.98, -164.42, -15.75, 2.38)
pt3dadd(-40.16, -164.82, -15.75, 2.38)
pt3dadd(-40.34, -165.43, -15.75, 2.38)
pt3dadd(-40.51, -165.63, -15.75, 2.38)
pt3dadd(-40.69, -166.04, -15.75, 2.38)
pt3dadd(-41.05, -166.65, -15.75, 2.38)
pt3dadd(-41.23, -167.05, -15.75, 2.38)
pt3dadd(-41.41, -167.46, -15.75, 2.38)
pt3dadd(-41.58, -167.86, -15.75, 2.38)
pt3dadd(-41.76, -168.27, -15.75, 2.38)
pt3dadd(-41.94, -168.67, -15.75, 2.38)
pt3dadd(-42.12, -169.08, -15.75, 2.38)
pt3dadd(-42.3, -169.48, -15.75, 2.38)
pt3dadd(-42.48, -169.89, -15.75, 2.38)
pt3dadd(-42.65, -170.29, -15.75, 2.38)
pt3dadd(-43.01, -170.7, -15.75, 2.38)
pt3dadd(-43.01, -171.31, -15.75, 2.38)
pt3dadd(-43.37, -171.71, -15.75, 2.38)
pt3dadd(-43.55, -171.91, -15.75, 2.38)
pt3dadd(-43.72, -172.52, -15.75, 2.38)
pt3dadd(-43.9, -172.93, -15.75, 2.38)
pt3dadd(-44.08, -173.33, -15.75, 2.38)
pt3dadd(-44.26, -173.74, -15.75, 2.38)
pt3dadd(-44.44, -174.14, -15.75, 2.38)
pt3dadd(-44.62, -174.55, -15.75, 2.38)
pt3dadd(-44.79, -175.15, -15.75, 2.38)
pt3dadd(-44.97, -175.36, -15.75, 2.38)
pt3dadd(-45.15, -175.76, -15.75, 2.38)
pt3dadd(-44.62, -175.15, -15.75, 2.38)
pt3dadd(-44.62, -175.76, -15.75, 2.38)
pt3dadd(-44.79, -176.17, -15.75, 2.38)
pt3dadd(-45.15, -176.77, -15.75, 2.38)
pt3dadd(-45.15, -177.18, -15.75, 2.38)
pt3dadd(-45.51, -177.38, -15.75, 2.38)
pt3dadd(-45.51, -177.99, -15.75, 2.38)
pt3dadd(-45.86, -178.8, -15.75, 2.38)
pt3dadd(-46.22, -179.21, -15.75, 2.38)
pt3dadd(-46.4, -180.02, -15.75, 2.38)
pt3dadd(-46.58, -180.62, -15.75, 2.38)
pt3dadd(-46.76, -180.83, -15.75, 2.38)
pt3dadd(-46.93, -181.23, -15.75, 2.38)
pt3dadd(-47.11, -181.64, -15.75, 2.38)
pt3dadd(-47.11, -182.04, -15.75, 2.38)
pt3dadd(-47.29, -182.45, -15.75, 2.38)
pt3dadd(-47.47, -182.65, -15.75, 2.38)
pt3dadd(-47.65, -183.05, -15.75, 2.38)
pt3dadd(-47.83, -183.26, -15.75, 2.38)
pt3dadd(-47.83, -183.86, -15.75, 2.38)
pt3dadd(-48.18, -184.47, -15.75, 2.38)
pt3dadd(-48.36, -184.67, -15.75, 2.38)
pt3dadd(-48.54, -185.28, -15.75, 2.38)
pt3dadd(-48.72, -185.89, -15.75, 2.38)
pt3dadd(-48.9, -186.5, -15.75, 2.38)
pt3dadd(-49.07, -186.9, -15.75, 2.38)
pt3dadd(-49.25, -187.31, -15.75, 2.38)
pt3dadd(-49.43, -187.91, -15.75, 2.38)
pt3dadd(-49.79, -188.93, -15.75, 2.38)
pt3dadd(-49.97, -189.33, -15.75, 2.38)
pt3dadd(-50.14, -189.74, -15.75, 2.38)
pt3dadd(-50.32, -190.35, -15.75, 2.38)
pt3dadd(-50.5, -190.75, -15.75, 2.38)
pt3dadd(-50.68, -191.36, -15.75, 2.38)
pt3dadd(-50.86, -191.97, -15.75, 2.38)
pt3dadd(-51.04, -192.37, -15.75, 2.38)
pt3dadd(-51.21, -192.78, -15.75, 2.38)
pt3dadd(-51.39, -193.18, -15.75, 2.38)
pt3dadd(-51.57, -193.59, -15.75, 2.38)
pt3dadd(-51.57, -194.19, -15.75, 2.38)
pt3dadd(-51.75, -194.6, -15.75, 2.38)
pt3dadd(-51.93, -195, -15.75, 2.38)
pt3dadd(-52.11, -195.41, -15.75, 2.38)
pt3dadd(-52.11, -196.22, -15.75, 2.38)
pt3dadd(-52.28, -196.83, -15.75, 2.38)
pt3dadd(-52.46, -197.23, -15.75, 2.38)
pt3dadd(-52.64, -198.04, -15.75, 2.38)
pt3dadd(-52.82, -198.65, -15.75, 2.38)
pt3dadd(-53, -199.46, -15.75, 2.38)
pt3dadd(-53, -199.87, -15.75, 2.38)
pt3dadd(-53.18, -200.68, -15.75, 2.38)
pt3dadd(-53.35, -201.28, -15.75, 2.38)
pt3dadd(-53.71, -202.7, -15.75, 2.38)
pt3dadd(-53.89, -203.11, -15.75, 2.38)
pt3dadd(-54.07, -203.92, -15.75, 2.38)
pt3dadd(-54.25, -204.52, -15.75, 2.38)
pt3dadd(-54.78, -206.14, -15.75, 2.38)
pt3dadd(-54.96, -206.95, -15.75, 2.38)
pt3dadd(-55.32, -207.56, -15.75, 2.38)
pt3dadd(-55.49, -208.17, -15.75, 2.38)
pt3dadd(-55.67, -209.18, -15.75, 2.38)
pt3dadd(-55.85, -209.79, -15.75, 2.38)
pt3dadd(-56.21, -210.6, -15.75, 2.38)
pt3dadd(-56.39, -211.21, -15.75, 2.38)
pt3dadd(-56.56, -212.02, -15.75, 2.38)
pt3dadd(-56.92, -212.63, -15.75, 2.38)
pt3dadd(-57.1, -213.23, -15.75, 2.38)
pt3dadd(-57.28, -213.84, -15.75, 2.38)
pt3dadd(-57.28, -214.45, -15.75, 2.38)
pt3dadd(-57.46, -214.65, -15.75, 2.38)
pt3dadd(-57.63, -215.46, -15.75, 2.38)
pt3dadd(-57.63, -216.27, -15.75, 2.38)
pt3dadd(-57.81, -216.68, -15.75, 2.38)
pt3dadd(-57.81, -217.49, -15.75, 2.38)
pt3dadd(-57.99, -217.89, -15.75, 2.38)
pt3dadd(-58.17, -218.3, -15.75, 2.38)
pt3dadd(-58.17, -218.9, -15.75, 2.38)
pt3dadd(-58.35, -219.51, -15.75, 2.38)
pt3dadd(-58.53, -220.12, -15.75, 2.38)
pt3dadd(-58.53, -220.52, -15.75, 2.38)
pt3dadd(-58.88, -221.54, -15.75, 2.38)
pt3dadd(-59.06, -222.35, -15.75, 2.38)
pt3dadd(-59.24, -222.96, -15.75, 2.38)
pt3dadd(-59.42, -223.56, -15.75, 2.38)
pt3dadd(-59.6, -223.97, -15.75, 2.38)
pt3dadd(-59.77, -224.58, -15.75, 2.38)
pt3dadd(-59.95, -225.59, -15.75, 2.38)
pt3dadd(-60.13, -226.2, -15.75, 2.38)
pt3dadd(-60.31, -227.01, -15.75, 2.38)
pt3dadd(-60.49, -227.82, -15.75, 2.38)
pt3dadd(-60.67, -228.63, -15.75, 2.38)
pt3dadd(-61.02, -230.04, -15.75, 2.38)
pt3dadd(-61.2, -230.85, -15.75, 2.38)
pt3dadd(-61.38, -231.46, -15.75, 2.38)
pt3dadd(-61.56, -232.27, -15.75, 2.38)
pt3dadd(-61.56, -232.88, -15.75, 2.38)
pt3dadd(-61.74, -233.29, -15.75, 2.38)
pt3dadd(-61.74, -233.89, -15.75, 2.38)
pt3dadd(-61.91, -234.1, -15.75, 2.38)
pt3dadd(-62.09, -234.3, -15.75, 2.38)
pt3dadd(-62.09, -233.69, -15.75, 2.38)
pt3dadd(-61.91, -233.29, -15.75, 2.38)
pt3dadd(-61.38, -232.27, -15.75, 2.38)
pt3dadd(-61.38, -232.68, -15.75, 2.38)
pt3dadd(-61.56, -233.08, -15.75, 2.38)
pt3dadd(-61.91, -233.29, -15.75, 2.38)
pt3dadd(-62.09, -233.89, -15.75, 2.38)
pt3dadd(-62.27, -234.1, -15.75, 2.38)
pt3dadd(-62.63, -234.5, -15.75, 2.38)
pt3dadd(-62.81, -234.91, -15.75, 2.38)
pt3dadd(-62.98, -235.31, -15.75, 2.38)
pt3dadd(-63.34, -235.72, -15.75, 2.38)
pt3dadd(-63.52, -236.12, -15.75, 2.38)
pt3dadd(-63.7, -236.32, -15.75, 2.38)
pt3dadd(-63.7, -236.73, -15.75, 2.38)
pt3dadd(-63.88, -236.93, -15.75, 2.38)
pt3dadd(-64.23, -237.13, -15.75, 2.38)
pt3dadd(-64.59, -237.74, -15.75, 2.38)
pt3dadd(-64.77, -237.94, -15.75, 2.38)
pt3dadd(-65.12, -238.35, -15.75, 2.38)
pt3dadd(-65.3, -238.55, -15.75, 2.38)
pt3dadd(-65.48, -239.16, -15.75, 2.38)
pt3dadd(-65.66, -239.56, -15.75, 2.38)
pt3dadd(-66.02, -239.77, -15.75, 2.38)
pt3dadd(-66.19, -240.17, -15.75, 2.38)
pt3dadd(-66.37, -240.37, -15.75, 2.38)
pt3dadd(-66.55, -240.78, -15.75, 2.38)
pt3dadd(-67.09, -241.39, -15.75, 2.38)
pt3dadd(-67.26, -241.79, -15.75, 2.38)
pt3dadd(-67.44, -242.2, -15.75, 2.38)
pt3dadd(-67.98, -242.81, -15.75, 2.38)
pt3dadd(-68.16, -243.01, -15.75, 2.38)
pt3dadd(-68.33, -243.41, -15.75, 2.38)
pt3dadd(-68.87, -243.82, -15.75, 2.38)
pt3dadd(-69.4, -244.63, -15.75, 2.38)
pt3dadd(-69.94, -245.03, -15.75, 2.38)
pt3dadd(-70.3, -245.44, -15.75, 2.38)
pt3dadd(-70.83, -245.84, -15.75, 2.38)
pt3dadd(-71.37, -246.45, -15.75, 2.38)
pt3dadd(-71.72, -246.86, -15.75, 2.38)
pt3dadd(-72.08, -247.26, -15.75, 2.38)
pt3dadd(-72.61, -247.67, -15.75, 2.38)
pt3dadd(-73.15, -248.27, -15.75, 2.38)
pt3dadd(-73.68, -248.68, -15.75, 2.38)
}
}
proc shape3d_59() {
dend[41] { pt3dadd(-74.04, -249.08, -15.75, 2.38)
pt3dadd(-74.4, -249.49, -15.75, 2.38)
pt3dadd(-74.93, -249.89, -15.75, 2.38)
pt3dadd(-75.29, -250.1, -15.75, 2.38)
pt3dadd(-76, -250.5, -15.75, 2.38)
pt3dadd(-76.36, -250.7, -15.75, 2.38)
pt3dadd(-76.54, -250.91, -15.75, 2.38)
pt3dadd(-76.72, -251.31, -15.75, 2.38)
pt3dadd(-77.25, -251.51, -15.75, 2.38)
pt3dadd(-77.61, -251.72, -15.75, 2.38)
pt3dadd(-78.14, -252.32, -15.75, 2.38)
pt3dadd(-78.68, -252.32, -15.75, 2.38)
pt3dadd(-78.86, -252.53, -15.75, 2.38)
pt3dadd(-79.21, -252.73, -15.75, 2.38)
pt3dadd(-79.57, -252.93, -15.75, 2.38)
pt3dadd(-79.93, -253.13, -15.75, 2.38)
pt3dadd(-80.28, -253.13, -15.75, 2.38)
pt3dadd(-80.64, -253.54, -15.75, 2.38)
pt3dadd(-81, -253.74, -15.75, 2.38)
pt3dadd(-81.53, -253.95, -15.75, 2.38)
pt3dadd(-82.07, -254.35, -15.75, 2.38)
pt3dadd(-82.24, -254.55, -15.75, 2.38)
pt3dadd(-82.6, -254.76, -15.75, 2.38)
pt3dadd(-82.78, -254.96, -15.75, 2.38)
pt3dadd(-83.31, -255.16, -15.75, 2.38)
pt3dadd(-83.85, -255.57, -15.75, 2.38)
pt3dadd(-84.56, -256.38, -15.75, 2.38)
pt3dadd(-84.92, -256.58, -15.75, 2.38)
pt3dadd(-85.27, -256.78, -15.75, 2.38)
pt3dadd(-85.63, -256.98, -15.75, 2.38)
pt3dadd(-86.34, -257.59, -15.75, 2.38)
pt3dadd(-86.7, -257.79, -15.75, 2.38)
pt3dadd(-87.24, -258.2, -15.75, 2.38)
pt3dadd(-87.59, -258.6, -15.75, 2.38)
pt3dadd(-87.95, -258.6, -15.75, 2.38)
pt3dadd(-88.48, -259.21, -15.75, 2.38)
pt3dadd(-89.02, -259.41, -15.75, 2.38)
pt3dadd(-89.55, -259.82, -15.75, 2.38)
pt3dadd(-90.45, -259.82, -15.75, 2.38)
}
dend[42] {pt3dclear()
pt3dadd(247.71, 352.97, -18.9, 2.72)
pt3dadd(256.45, 346.77, -76.65, 2.72)
pt3dadd(257.17, 348.59, -64.05, 3.06)
pt3dadd(257.17, 344.74, -64.05, 3.06)
pt3dadd(256.99, 344.54, -64.05, 3.06)
pt3dadd(256.99, 344.14, -64.05, 3.06)
pt3dadd(256.81, 343.93, -64.05, 3.06)
pt3dadd(256.63, 343.53, -64.05, 3.06)
pt3dadd(256.63, 342.92, -64.05, 3.06)
pt3dadd(256.45, 342.72, -64.05, 3.06)
pt3dadd(256.45, 342.31, -64.05, 3.06)
pt3dadd(256.28, 342.11, -64.05, 3.06)
pt3dadd(256.1, 341.91, -64.05, 3.06)
pt3dadd(256.1, 341.3, -64.05, 3.06)
pt3dadd(255.92, 340.89, -64.05, 3.06)
pt3dadd(255.74, 340.49, -64.05, 3.06)
pt3dadd(255.74, 339.88, -64.05, 3.06)
pt3dadd(255.56, 339.68, -64.05, 3.06)
pt3dadd(255.38, 339.48, -64.05, 3.06)
pt3dadd(255.21, 339.07, -64.05, 3.06)
pt3dadd(255.03, 338.87, -64.05, 3.06)
pt3dadd(254.85, 338.67, -64.05, 3.06)
pt3dadd(254.67, 338.46, -64.05, 3.06)
pt3dadd(254.49, 338.26, -64.05, 3.06)
pt3dadd(254.31, 338.06, -64.05, 3.06)
pt3dadd(254.14, 337.86, -64.05, 3.06)
pt3dadd(253.96, 337.65, -64.05, 3.06)
pt3dadd(253.78, 337.45, -64.05, 3.06)
pt3dadd(253.6, 337.25, -64.05, 3.06)
pt3dadd(253.42, 337.05, -64.05, 3.06)
pt3dadd(253.07, 336.84, -64.05, 3.06)
pt3dadd(252.89, 336.64, -64.05, 3.06)
pt3dadd(252.71, 336.44, -64.05, 3.06)
pt3dadd(252.53, 336.03, -64.05, 3.06)
pt3dadd(252.35, 335.83, -64.05, 3.06)
pt3dadd(252, 335.63, -64.05, 3.06)
pt3dadd(251.82, 335.02, -64.05, 3.06)
pt3dadd(251.64, 334.82, -64.05, 3.06)
pt3dadd(251.46, 334.41, -64.05, 3.06)
pt3dadd(251.1, 334.41, -64.05, 3.06)
pt3dadd(250.93, 334.21, -64.05, 3.06)
pt3dadd(250.75, 334.01, -64.05, 3.06)
pt3dadd(250.57, 333.6, -64.05, 3.06)
pt3dadd(250.39, 333.4, -64.05, 3.06)
pt3dadd(250.03, 333.2, -64.05, 3.06)
pt3dadd(249.86, 333, -64.05, 3.06)
pt3dadd(249.68, 332.59, -64.05, 3.06)
pt3dadd(249.5, 332.39, -64.05, 3.06)
pt3dadd(249.14, 331.78, -64.05, 3.06)
pt3dadd(248.79, 331.17, -64.05, 3.06)
pt3dadd(248.61, 330.77, -64.05, 3.06)
pt3dadd(248.43, 330.56, -64.05, 3.06)
pt3dadd(248.25, 330.16, -64.05, 3.06)
pt3dadd(248.07, 329.75, -64.05, 3.06)
pt3dadd(247.89, 329.35, -64.05, 3.06)
pt3dadd(247.72, 329.15, -64.05, 3.06)
pt3dadd(247.36, 328.74, -64.05, 3.06)
pt3dadd(247.36, 328.34, -64.05, 3.06)
pt3dadd(247.18, 328.13, -64.05, 3.06)
pt3dadd(247, 327.73, -64.05, 3.06)
pt3dadd(246.82, 327.53, -64.05, 3.06)
pt3dadd(246.65, 327.12, -64.05, 3.06)
pt3dadd(246.29, 326.51, -64.05, 3.06)
pt3dadd(246.11, 326.11, -64.05, 3.06)
pt3dadd(245.93, 325.91, -64.05, 3.06)
pt3dadd(245.93, 325.5, -64.05, 3.06)
pt3dadd(245.75, 325.3, -64.05, 3.06)
pt3dadd(245.58, 324.89, -64.05, 3.06)
pt3dadd(245.4, 324.49, -64.05, 3.06)
pt3dadd(245.22, 324.08, -64.05, 3.06)
pt3dadd(245.04, 323.68, -64.05, 3.06)
pt3dadd(244.86, 323.27, -64.05, 3.06)
pt3dadd(244.68, 322.87, -64.05, 3.06)
pt3dadd(244.68, 322.26, -64.05, 3.06)
pt3dadd(244.51, 322.06, -64.05, 3.06)
pt3dadd(244.33, 321.65, -64.05, 3.06)
pt3dadd(244.33, 321.05, -64.05, 3.06)
pt3dadd(244.15, 320.64, -64.05, 3.06)
pt3dadd(243.97, 320.24, -64.05, 3.06)
pt3dadd(243.79, 319.83, -64.05, 3.06)
pt3dadd(243.79, 319.22, -64.05, 3.06)
pt3dadd(243.61, 318.61, -64.05, 3.06)
pt3dadd(243.44, 318.21, -64.05, 3.06)
pt3dadd(243.26, 317.8, -64.05, 3.06)
pt3dadd(243.26, 316.39, -64.05, 3.06)
pt3dadd(243.08, 316.18, -64.05, 3.06)
pt3dadd(242.9, 315.58, -64.05, 3.06)
pt3dadd(242.9, 313.96, -64.05, 3.06)
pt3dadd(242.72, 313.75, -64.05, 3.06)
pt3dadd(242.72, 312.34, -64.05, 3.06)
pt3dadd(242.54, 311.93, -64.05, 3.06)
pt3dadd(242.54, 311.12, -64.05, 3.06)
pt3dadd(242.37, 310.72, -64.05, 3.06)
pt3dadd(242.37, 293.5, -64.05, 3.06)
pt3dadd(242.54, 293.3, -64.05, 3.06)
pt3dadd(242.54, 292.69, -64.05, 3.06)
pt3dadd(242.72, 292.69, -64.05, 3.06)
pt3dadd(242.37, 292.49, -64.05, 3.06)
pt3dadd(242.37, 291.68, -64.05, 3.06)
pt3dadd(242.54, 291.27, -64.05, 3.06)
pt3dadd(242.54, 290.87, -64.05, 3.06)
pt3dadd(242.72, 290.46, -64.05, 3.06)
pt3dadd(242.9, 290.06, -64.05, 3.06)
pt3dadd(243.08, 289.85, -64.05, 3.06)
pt3dadd(243.08, 289.25, -64.05, 3.06)
pt3dadd(243.26, 288.84, -64.05, 3.06)
pt3dadd(243.44, 288.44, -64.05, 3.06)
pt3dadd(243.61, 288.03, -64.05, 3.06)
pt3dadd(243.79, 287.63, -64.05, 3.06)
pt3dadd(243.79, 287.22, -64.05, 3.06)
pt3dadd(243.97, 287.02, -64.05, 3.06)
pt3dadd(243.97, 286, -64.05, 3.06)
pt3dadd(244.15, 285.8, -64.05, 3.06)
pt3dadd(244.15, 285.19, -64.05, 3.06)
pt3dadd(244.33, 284.79, -64.05, 3.06)
pt3dadd(244.51, 284.38, -64.05, 3.06)
pt3dadd(244.51, 283.57, -64.05, 3.06)
pt3dadd(244.68, 282.97, -64.05, 3.06)
pt3dadd(244.86, 282.76, -64.05, 3.06)
pt3dadd(244.86, 282.36, -64.05, 3.06)
pt3dadd(245.04, 281.95, -64.05, 3.06)
pt3dadd(245.04, 281.35, -64.05, 3.06)
pt3dadd(245.22, 280.74, -64.05, 3.06)
pt3dadd(245.22, 275.88, -64.05, 3.06)
pt3dadd(245.4, 275.47, -64.05, 3.06)
pt3dadd(245.4, 275.07, -64.05, 3.06)
pt3dadd(245.58, 274.66, -64.05, 3.06)
pt3dadd(245.58, 274.05, -64.05, 3.06)
pt3dadd(245.75, 273.65, -64.05, 3.06)
pt3dadd(245.75, 271.83, -64.05, 3.06)
pt3dadd(245.93, 271.42, -64.05, 3.06)
pt3dadd(245.93, 270, -64.05, 3.06)
pt3dadd(246.11, 269.6, -64.05, 3.06)
pt3dadd(246.11, 269.19, -64.05, 3.06)
pt3dadd(246.29, 268.79, -64.05, 3.06)
pt3dadd(246.29, 262.51, -64.05, 3.06)
pt3dadd(246.47, 261.9, -64.05, 3.06)
pt3dadd(246.47, 243.47, -64.05, 3.06)
pt3dadd(246.11, 243.47, -64.05, 3.06)
pt3dadd(246.65, 244.08, -57.75, 3.06)
pt3dadd(246.47, 243.88, -57.75, 3.06)
pt3dadd(246.47, 242.66, -57.75, 3.06)
pt3dadd(246.29, 242.46, -57.75, 3.06)
pt3dadd(246.29, 242.05, -57.75, 3.06)
pt3dadd(246.11, 241.65, -57.75, 3.06)
pt3dadd(245.93, 241.24, -57.75, 3.06)
pt3dadd(245.93, 240.84, -57.75, 3.06)
pt3dadd(245.75, 240.43, -57.75, 3.06)
pt3dadd(245.75, 240.03, -57.75, 3.06)
pt3dadd(245.58, 239.82, -57.75, 3.06)
pt3dadd(245.58, 239.42, -57.75, 3.06)
pt3dadd(245.4, 239.22, -57.75, 3.06)
pt3dadd(245.22, 238.81, -57.75, 3.06)
pt3dadd(245.22, 238.2, -57.75, 3.06)
pt3dadd(245.04, 237.8, -57.75, 3.06)
pt3dadd(244.86, 237.39, -57.75, 3.06)
pt3dadd(244.86, 236.79, -57.75, 3.06)
pt3dadd(244.68, 236.38, -57.75, 3.06)
pt3dadd(244.68, 235.98, -57.75, 3.06)
pt3dadd(244.51, 235.77, -57.75, 3.06)
pt3dadd(244.51, 234.96, -57.75, 3.06)
}
}
proc shape3d_60() {
dend[42] { pt3dadd(244.33, 234.56, -57.75, 3.06)
pt3dadd(244.15, 234.15, -57.75, 3.06)
pt3dadd(244.15, 233.34, -57.75, 3.06)
pt3dadd(243.97, 232.94, -57.75, 3.06)
pt3dadd(243.79, 232.33, -57.75, 3.06)
pt3dadd(243.61, 231.92, -57.75, 3.06)
pt3dadd(243.61, 231.52, -57.75, 3.06)
pt3dadd(243.44, 231.11, -57.75, 3.06)
pt3dadd(243.26, 230.71, -57.75, 3.06)
pt3dadd(243.08, 230.3, -57.75, 3.06)
pt3dadd(243.08, 229.7, -57.75, 3.06)
pt3dadd(242.9, 229.49, -57.75, 3.06)
pt3dadd(242.72, 229.09, -57.75, 3.06)
pt3dadd(242.72, 228.68, -57.75, 3.06)
pt3dadd(242.54, 228.48, -57.75, 3.06)
pt3dadd(242.37, 228.28, -57.75, 3.06)
pt3dadd(242.19, 227.87, -57.75, 3.06)
pt3dadd(242.19, 227.47, -57.75, 3.06)
pt3dadd(242.01, 227.06, -57.75, 3.06)
pt3dadd(241.65, 226.05, -57.75, 3.06)
pt3dadd(241.47, 225.65, -57.75, 3.06)
pt3dadd(241.3, 225.24, -57.75, 3.06)
pt3dadd(241.3, 224.63, -57.75, 3.06)
pt3dadd(241.12, 224.43, -57.75, 3.06)
pt3dadd(240.94, 223.82, -57.75, 3.06)
pt3dadd(240.76, 223.42, -57.75, 3.06)
pt3dadd(240.4, 223.01, -57.75, 3.06)
pt3dadd(240.4, 222.41, -57.75, 3.06)
pt3dadd(240.23, 222, -57.75, 3.06)
pt3dadd(240.05, 221.6, -57.75, 3.06)
pt3dadd(239.87, 221.19, -57.75, 3.06)
pt3dadd(239.69, 220.78, -57.75, 3.06)
pt3dadd(239.69, 220.18, -57.75, 3.06)
pt3dadd(239.51, 219.77, -57.75, 3.06)
pt3dadd(239.33, 219.37, -57.75, 3.06)
pt3dadd(239.16, 218.96, -57.75, 3.06)
pt3dadd(238.98, 218.35, -57.75, 3.06)
pt3dadd(238.8, 217.95, -57.75, 3.06)
pt3dadd(238.8, 217.34, -57.75, 3.06)
pt3dadd(238.62, 216.94, -57.75, 3.06)
pt3dadd(238.44, 216.33, -57.75, 3.06)
pt3dadd(238.44, 215.92, -57.75, 3.06)
pt3dadd(238.26, 215.52, -57.75, 3.06)
pt3dadd(238.09, 215.11, -57.75, 3.06)
pt3dadd(238.09, 214.71, -57.75, 3.06)
pt3dadd(237.91, 214.51, -57.75, 3.06)
pt3dadd(237.73, 214.1, -57.75, 3.06)
pt3dadd(237.73, 213.7, -57.75, 3.06)
pt3dadd(237.55, 213.49, -57.75, 3.06)
pt3dadd(237.37, 213.09, -57.75, 3.06)
pt3dadd(237.19, 212.68, -57.75, 3.06)
pt3dadd(237.02, 212.28, -57.75, 3.06)
pt3dadd(236.84, 211.87, -57.75, 3.06)
pt3dadd(236.66, 211.47, -57.75, 3.06)
pt3dadd(236.48, 211.06, -57.75, 3.06)
pt3dadd(236.3, 210.66, -57.75, 3.06)
pt3dadd(236.12, 210.45, -57.75, 3.06)
pt3dadd(235.95, 210.25, -57.75, 3.06)
pt3dadd(235.77, 210.05, -57.75, 3.06)
pt3dadd(235.59, 209.85, -57.75, 3.06)
pt3dadd(235.59, 209.44, -57.75, 3.06)
pt3dadd(235.23, 209.24, -57.75, 3.06)
pt3dadd(235.05, 208.83, -57.75, 3.06)
pt3dadd(234.88, 208.43, -57.75, 3.06)
pt3dadd(234.52, 208.02, -57.75, 3.06)
pt3dadd(234.52, 207.62, -57.75, 3.06)
pt3dadd(234.34, 207.42, -57.75, 3.06)
pt3dadd(234.16, 207.21, -57.75, 3.06)
pt3dadd(233.98, 207.01, -57.75, 3.06)
pt3dadd(233.81, 206.81, -57.75, 3.06)
pt3dadd(233.63, 206.4, -57.75, 3.06)
pt3dadd(233.45, 206.2, -57.75, 3.06)
pt3dadd(233.27, 205.8, -57.75, 3.06)
pt3dadd(233.09, 205.59, -57.75, 3.06)
pt3dadd(232.91, 205.19, -57.75, 3.06)
pt3dadd(232.56, 204.58, -57.75, 3.06)
pt3dadd(232.2, 204.18, -57.75, 3.06)
pt3dadd(232.02, 203.77, -57.75, 3.06)
pt3dadd(231.84, 203.37, -57.75, 3.06)
pt3dadd(231.67, 203.16, -57.75, 3.06)
pt3dadd(231.49, 203.16, -57.75, 3.06)
pt3dadd(231.31, 203.16, -56.7, 3.06)
pt3dadd(230.95, 202.96, -56.7, 3.06)
pt3dadd(230.77, 202.76, -56.7, 3.06)
pt3dadd(230.6, 202.56, -56.7, 3.06)
pt3dadd(230.24, 202.35, -56.7, 3.06)
pt3dadd(230.06, 202.15, -56.7, 3.06)
pt3dadd(229.88, 201.95, -56.7, 3.06)
pt3dadd(229.53, 201.95, -56.7, 3.06)
pt3dadd(229.35, 201.75, -56.7, 3.06)
pt3dadd(229.17, 201.54, -56.7, 3.06)
pt3dadd(228.99, 201.14, -56.7, 3.06)
pt3dadd(228.63, 200.73, -56.7, 3.06)
pt3dadd(228.46, 200.33, -56.7, 3.06)
pt3dadd(228.1, 200.13, -56.7, 3.06)
pt3dadd(227.92, 199.72, -56.7, 3.06)
pt3dadd(227.56, 199.31, -56.7, 3.06)
pt3dadd(227.39, 198.91, -56.7, 3.06)
pt3dadd(227.21, 198.71, -56.7, 3.06)
pt3dadd(226.85, 198.3, -56.7, 3.06)
pt3dadd(226.67, 197.9, -56.7, 3.06)
pt3dadd(226.32, 197.69, -56.7, 3.06)
pt3dadd(225.96, 197.49, -56.7, 3.06)
pt3dadd(225.78, 197.09, -56.7, 3.06)
pt3dadd(225.6, 196.88, -56.7, 3.06)
pt3dadd(225.25, 196.48, -56.7, 3.06)
pt3dadd(225.07, 196.07, -56.7, 3.06)
pt3dadd(224.89, 195.67, -56.7, 3.06)
pt3dadd(224.71, 195.26, -56.7, 3.06)
pt3dadd(224.53, 194.86, -56.7, 3.06)
pt3dadd(224.35, 194.45, -56.7, 3.06)
pt3dadd(224.18, 194.05, -56.7, 3.06)
pt3dadd(224.18, 193.64, -56.7, 3.06)
pt3dadd(224, 193.24, -56.7, 3.06)
pt3dadd(223.82, 192.83, -56.7, 3.06)
pt3dadd(223.82, 192.43, -56.7, 3.06)
pt3dadd(223.64, 192.02, -56.7, 3.06)
pt3dadd(223.46, 191.62, -56.7, 3.06)
pt3dadd(223.46, 191.42, -56.7, 3.06)
pt3dadd(223.64, 192.23, -54.6, 3.06)
pt3dadd(223.64, 187.97, -54.6, 3.06)
pt3dadd(223.46, 187.77, -54.6, 3.06)
pt3dadd(223.46, 187.16, -54.6, 3.06)
pt3dadd(223.28, 186.76, -54.6, 3.06)
pt3dadd(223.28, 186.15, -54.6, 3.06)
pt3dadd(223.11, 185.74, -54.6, 3.06)
pt3dadd(222.93, 185.34, -54.6, 3.06)
pt3dadd(222.93, 184.93, -54.6, 3.06)
pt3dadd(222.75, 184.53, -54.6, 3.06)
pt3dadd(222.57, 184.12, -54.6, 3.06)
pt3dadd(222.57, 183.72, -54.6, 3.06)
pt3dadd(222.83, 183.64, -54.6, 3.06)
}
dend[43] {pt3dclear()
pt3dadd(222.83, 183.64, -54.6, 3.06)
pt3dadd(222.39, 183.31, -54.6, 3.06)
pt3dadd(222.39, 182.91, -54.6, 3.06)
pt3dadd(222.21, 182.71, -54.6, 3.06)
pt3dadd(222.04, 182.3, -54.6, 3.06)
pt3dadd(221.86, 181.9, -54.6, 3.06)
pt3dadd(221.86, 181.49, -54.6, 3.06)
pt3dadd(221.68, 181.29, -54.6, 3.06)
pt3dadd(221.5, 180.88, -54.6, 3.06)
pt3dadd(221.32, 180.28, -54.6, 3.06)
pt3dadd(221.14, 180.07, -54.6, 3.06)
pt3dadd(220.97, 179.67, -54.6, 3.06)
pt3dadd(220.79, 179.47, -54.6, 3.06)
pt3dadd(220.61, 179.06, -54.6, 3.06)
pt3dadd(220.43, 178.86, -54.6, 3.06)
pt3dadd(220.43, 178.45, -54.6, 3.06)
pt3dadd(220.25, 178.05, -54.6, 3.06)
pt3dadd(220.07, 177.64, -54.6, 3.06)
pt3dadd(219.9, 177.44, -54.6, 3.06)
pt3dadd(219.54, 177.03, -54.6, 3.06)
pt3dadd(219.54, 176.63, -54.6, 3.06)
pt3dadd(219.36, 176.22, -54.6, 3.06)
pt3dadd(219.18, 175.82, -54.6, 3.06)
pt3dadd(219, 175.62, -54.6, 3.06)
pt3dadd(218.83, 175.21, -54.6, 3.06)
pt3dadd(218.65, 175.01, -54.6, 3.06)
pt3dadd(218.47, 174.6, -54.6, 3.06)
pt3dadd(218.29, 174.2, -54.6, 3.06)
pt3dadd(218.11, 173.79, -54.6, 3.06)
pt3dadd(217.93, 173.39, -54.6, 3.06)
pt3dadd(217.76, 172.98, -54.6, 3.06)
pt3dadd(217.4, 172.78, -54.6, 3.06)
pt3dadd(217.22, 172.17, -54.6, 3.06)
pt3dadd(217.04, 171.77, -54.6, 3.06)
pt3dadd(216.69, 171.16, -54.6, 3.06)
pt3dadd(216.69, 170.76, -54.6, 3.06)
pt3dadd(216.33, 170.35, -54.6, 3.06)
pt3dadd(216.15, 169.95, -54.6, 3.06)
pt3dadd(215.97, 169.54, -54.6, 3.06)
pt3dadd(215.79, 168.93, -54.6, 3.06)
pt3dadd(215.62, 168.53, -54.6, 3.06)
pt3dadd(215.62, 168.12, -54.6, 3.06)
pt3dadd(215.44, 167.72, -54.6, 3.06)
pt3dadd(215.26, 167.31, -54.6, 3.06)
pt3dadd(215.08, 167.11, -54.6, 3.06)
pt3dadd(214.9, 166.7, -54.6, 3.06)
pt3dadd(214.9, 166.3, -54.6, 3.06)
pt3dadd(214.72, 165.89, -54.6, 3.06)
pt3dadd(214.55, 165.49, -54.6, 3.06)
pt3dadd(214.55, 165.08, -54.6, 3.06)
pt3dadd(214.37, 164.68, -54.6, 3.06)
pt3dadd(214.19, 164.27, -54.6, 3.06)
pt3dadd(214.01, 163.67, -54.6, 3.06)
pt3dadd(213.83, 163.26, -54.6, 3.06)
pt3dadd(213.65, 162.65, -54.6, 3.06)
pt3dadd(213.48, 162.05, -54.6, 3.06)
pt3dadd(213.48, 161.64, -54.6, 3.06)
pt3dadd(213.3, 161.03, -54.6, 3.06)
pt3dadd(213.12, 160.63, -54.6, 3.06)
pt3dadd(213.12, 160.22, -54.6, 3.06)
pt3dadd(212.94, 160.02, -54.6, 3.06)
pt3dadd(212.76, 159.62, -54.6, 3.06)
pt3dadd(212.58, 159.21, -54.6, 3.06)
pt3dadd(212.58, 158.81, -54.6, 3.06)
pt3dadd(212.41, 158.6, -54.6, 3.06)
pt3dadd(212.23, 158.4, -54.6, 3.06)
pt3dadd(212.23, 158.6, -54.6, 3.06)
pt3dadd(212.41, 158.81, -52.5, 3.06)
}
}
proc shape3d_61() {
dend[43] { pt3dadd(212.41, 158, -52.5, 3.06)
pt3dadd(212.23, 157.79, -52.5, 3.06)
pt3dadd(212.05, 157.19, -52.5, 3.06)
pt3dadd(211.87, 156.78, -52.5, 3.06)
pt3dadd(211.87, 156.38, -52.5, 3.06)
pt3dadd(211.52, 155.97, -52.5, 3.06)
pt3dadd(211.52, 155.56, -52.5, 3.06)
pt3dadd(211.34, 155.16, -52.5, 3.06)
pt3dadd(211.16, 154.96, -52.5, 3.06)
pt3dadd(210.98, 154.35, -52.5, 3.06)
pt3dadd(210.8, 153.94, -52.5, 3.06)
pt3dadd(210.8, 153.54, -52.5, 3.06)
pt3dadd(210.62, 153.13, -52.5, 3.06)
pt3dadd(210.45, 152.93, -52.5, 3.06)
pt3dadd(210.27, 152.32, -52.5, 3.06)
pt3dadd(210.09, 152.12, -52.5, 3.06)
pt3dadd(209.91, 151.72, -52.5, 3.06)
pt3dadd(209.73, 151.31, -52.5, 3.06)
pt3dadd(209.55, 150.91, -52.5, 3.06)
pt3dadd(209.55, 150.5, -52.5, 3.06)
pt3dadd(209.38, 150.3, -52.5, 3.06)
pt3dadd(209.2, 149.89, -52.5, 3.06)
pt3dadd(209.02, 149.49, -52.5, 3.06)
pt3dadd(208.66, 148.88, -52.5, 3.06)
pt3dadd(208.66, 148.27, -52.5, 3.06)
pt3dadd(208.31, 147.67, -52.5, 3.06)
pt3dadd(208.13, 147.06, -52.5, 3.06)
pt3dadd(207.77, 146.65, -52.5, 3.06)
pt3dadd(207.59, 145.84, -52.5, 3.06)
pt3dadd(207.24, 145.03, -52.5, 3.06)
pt3dadd(207.06, 144.22, -52.5, 3.06)
pt3dadd(206.88, 143.61, -52.5, 3.06)
pt3dadd(206.34, 142.4, -52.5, 3.06)
pt3dadd(206.17, 141.99, -52.5, 3.06)
pt3dadd(205.99, 141.39, -52.5, 3.06)
pt3dadd(205.81, 140.78, -52.5, 3.06)
pt3dadd(205.63, 140.37, -52.5, 3.06)
pt3dadd(205.45, 139.77, -52.5, 3.06)
pt3dadd(205.27, 139.16, -52.5, 3.06)
pt3dadd(205.1, 138.75, -52.5, 3.06)
pt3dadd(204.74, 138.15, -52.5, 3.06)
pt3dadd(204.56, 137.74, -52.5, 3.06)
pt3dadd(204.38, 137.34, -52.5, 3.06)
pt3dadd(204.2, 136.93, -52.5, 3.06)
pt3dadd(204.2, 136.53, -52.5, 3.06)
pt3dadd(204.03, 136.12, -52.5, 3.06)
pt3dadd(203.67, 135.51, -52.5, 3.06)
pt3dadd(203.67, 134.91, -52.5, 3.06)
pt3dadd(203.49, 134.3, -52.5, 3.06)
pt3dadd(203.31, 133.69, -52.5, 3.06)
pt3dadd(203.13, 133.28, -52.5, 3.06)
pt3dadd(203.13, 132.68, -52.5, 3.06)
pt3dadd(202.96, 132.07, -52.5, 3.06)
pt3dadd(202.78, 131.87, -52.5, 3.06)
pt3dadd(202.6, 131.26, -52.5, 3.06)
pt3dadd(202.42, 130.85, -52.5, 3.06)
pt3dadd(202.42, 130.45, -52.5, 3.06)
pt3dadd(202.24, 130.04, -52.5, 3.06)
pt3dadd(202.06, 129.84, -52.5, 3.06)
pt3dadd(202.06, 129.23, -52.5, 3.06)
pt3dadd(201.89, 129.03, -52.5, 3.06)
pt3dadd(201.71, 128.63, -52.5, 3.06)
pt3dadd(201.71, 128.02, -52.5, 3.06)
pt3dadd(201.53, 127.61, -52.5, 3.06)
pt3dadd(201.35, 127.21, -52.5, 3.06)
pt3dadd(201.35, 126.8, -52.5, 3.06)
pt3dadd(201.17, 126.2, -52.5, 3.06)
pt3dadd(201.17, 125.59, -52.5, 3.06)
pt3dadd(200.99, 124.98, -52.5, 3.06)
pt3dadd(200.99, 124.37, -52.5, 3.06)
pt3dadd(200.82, 123.77, -52.5, 3.06)
pt3dadd(200.82, 123.16, -52.5, 3.06)
pt3dadd(200.64, 122.75, -52.5, 3.06)
pt3dadd(200.64, 122.35, -52.5, 3.06)
pt3dadd(200.46, 121.94, -52.5, 3.06)
pt3dadd(200.46, 121.33, -52.5, 3.06)
pt3dadd(200.28, 121.13, -52.5, 3.06)
pt3dadd(200.28, 120.52, -52.5, 3.06)
pt3dadd(200.1, 120.32, -52.5, 3.06)
pt3dadd(199.92, 120.12, -52.5, 3.06)
pt3dadd(179.51, 68, -52.5, 2.72)
pt3dadd(180.92, 68, -52.5, 2.72)
pt3dadd(178.7, 65.63, -52.5, 2.72)
pt3dadd(177.63, 65.23, -52.5, 2.72)
pt3dadd(176.56, 65.23, -52.5, 2.72)
pt3dadd(176.21, 64.82, -52.5, 2.72)
pt3dadd(175.49, 64.42, -52.5, 2.72)
pt3dadd(174.42, 64.42, -52.5, 2.72)
pt3dadd(174.07, 64.01, -52.5, 2.72)
pt3dadd(173, 63.61, -52.5, 2.72)
pt3dadd(172.28, 63.61, -52.5, 2.72)
pt3dadd(171.57, 63.2, -52.5, 2.72)
pt3dadd(170.86, 62.8, -52.5, 2.72)
pt3dadd(170.14, 62.39, -52.5, 2.72)
pt3dadd(166.58, 62.39, -52.5, 2.72)
pt3dadd(165.86, 61.99, -52.5, 2.72)
pt3dadd(165.51, 61.58, -52.5, 2.72)
pt3dadd(164.08, 61.58, -52.5, 2.72)
pt3dadd(163.37, 61.18, -52.5, 2.72)
pt3dadd(162.65, 60.77, -52.5, 2.72)
pt3dadd(161.23, 60.77, -52.5, 2.72)
pt3dadd(160.51, 60.37, -52.5, 2.72)
pt3dadd(159.44, 59.96, -52.5, 2.72)
pt3dadd(158.73, 59.56, -52.5, 2.72)
pt3dadd(158.37, 59.15, -52.5, 2.72)
pt3dadd(157.3, 59.15, -52.5, 2.72)
pt3dadd(156.59, 58.75, -52.5, 2.72)
pt3dadd(155.88, 58.34, -52.5, 2.72)
pt3dadd(155.16, 57.94, -52.5, 2.72)
pt3dadd(154.45, 57.53, -52.5, 2.72)
pt3dadd(153.74, 57.13, -52.5, 2.72)
pt3dadd(152.67, 56.72, -52.5, 2.72)
pt3dadd(151.95, 56.72, -52.5, 2.72)
pt3dadd(151.6, 56.32, -52.5, 2.72)
pt3dadd(150.88, 55.91, -52.5, 2.72)
pt3dadd(150.17, 55.51, -52.5, 2.72)
pt3dadd(148.74, 55.51, -52.5, 2.72)
pt3dadd(148.39, 55.1, -52.5, 2.72)
pt3dadd(147.67, 54.29, -52.5, 2.72)
pt3dadd(146.96, 54.29, -52.5, 2.72)
pt3dadd(146.6, 53.89, -52.5, 2.72)
pt3dadd(146.25, 53.48, -52.5, 2.72)
pt3dadd(145.89, 53.08, -52.5, 2.72)
pt3dadd(145.53, 52.67, -52.5, 2.72)
pt3dadd(144.82, 52.67, -52.5, 2.72)
pt3dadd(144.46, 51.86, -52.5, 2.72)
pt3dadd(143.75, 51.46, -52.5, 2.72)
pt3dadd(143.39, 51.05, -52.5, 2.72)
pt3dadd(143.04, 50.65, -52.5, 2.72)
pt3dadd(142.68, 50.24, -52.5, 2.72)
pt3dadd(142.32, 49.43, -52.5, 2.72)
pt3dadd(141.97, 48.62, -52.5, 2.72)
pt3dadd(141.61, 47.81, -52.5, 2.72)
pt3dadd(140.9, 46.59, -52.5, 2.72)
pt3dadd(140.54, 45.78, -52.5, 2.72)
pt3dadd(140.18, 44.97, -52.5, 2.72)
pt3dadd(139.11, 43.76, -52.5, 2.72)
pt3dadd(138.76, 42.95, -52.5, 2.72)
pt3dadd(138.04, 41.73, -52.5, 2.72)
pt3dadd(137.69, 40.92, -52.5, 2.72)
pt3dadd(136.97, 39.71, -52.5, 2.72)
pt3dadd(136.62, 38.9, -52.5, 2.72)
pt3dadd(134.83, 36.87, -52.5, 2.72)
pt3dadd(134.48, 36.06, -52.5, 2.72)
pt3dadd(134.12, 35.25, -52.5, 2.72)
pt3dadd(133.41, 34.44, -52.5, 2.72)
pt3dadd(133.05, 34.04, -52.5, 2.72)
pt3dadd(132.34, 33.23, -52.5, 2.72)
pt3dadd(131.98, 32.42, -52.5, 2.72)
pt3dadd(131.27, 32.01, -52.5, 2.72)
pt3dadd(129.84, 30.39, -52.5, 2.72)
pt3dadd(129.48, 29.99, -52.5, 2.72)
pt3dadd(129.13, 29.18, -52.5, 2.72)
pt3dadd(128.77, 28.77, -52.5, 2.72)
pt3dadd(127.7, 27.56, -52.5, 2.72)
pt3dadd(127.34, 26.75, -52.5, 2.72)
pt3dadd(126.27, 25.94, -52.5, 2.72)
pt3dadd(126.27, 25.13, -52.5, 2.72)
pt3dadd(125.56, 24.31, -52.5, 2.72)
pt3dadd(125.2, 23.91, -52.5, 2.72)
pt3dadd(124.49, 23.1, -52.5, 2.72)
pt3dadd(123.78, 22.29, -52.5, 2.72)
pt3dadd(123.42, 21.88, -52.5, 2.72)
pt3dadd(122.71, 21.48, -52.5, 2.72)
pt3dadd(122.35, 20.26, -52.5, 2.72)
pt3dadd(121.99, 19.45, -52.5, 2.72)
pt3dadd(121.28, 18.64, -52.5, 2.72)
pt3dadd(120.57, 17.83, -52.5, 2.72)
pt3dadd(120.21, 17.43, -52.5, 2.72)
pt3dadd(119.85, 17.02, -52.5, 2.72)
pt3dadd(119.5, 16.21, -52.5, 2.72)
pt3dadd(119.14, 15.4, -52.5, 2.72)
pt3dadd(118.43, 15, -52.5, 2.72)
pt3dadd(118.07, 14.19, -52.5, 2.72)
pt3dadd(117.71, 13.38, -52.5, 2.72)
pt3dadd(117, 12.97, -52.5, 2.72)
pt3dadd(116.29, 12.16, -52.5, 2.72)
pt3dadd(115.93, 11.76, -52.5, 2.72)
pt3dadd(114.86, 10.54, -52.5, 2.72)
pt3dadd(114.5, 10.14, -52.5, 2.72)
pt3dadd(114.15, 9.73, -52.5, 2.72)
pt3dadd(114.5, 10.54, -60.9, 2.72)
pt3dadd(114.15, 10.14, -60.9, 2.72)
pt3dadd(113.79, 9.33, -60.9, 2.72)
pt3dadd(112.01, 7.3, -60.9, 2.72)
pt3dadd(111.65, 6.9, -60.9, 2.72)
pt3dadd(111.29, 6.09, -60.9, 2.72)
pt3dadd(110.58, 5.68, -60.9, 2.72)
pt3dadd(109.87, 4.47, -60.9, 2.72)
pt3dadd(109.51, 3.66, -60.9, 2.72)
pt3dadd(108.8, 3.25, -60.9, 2.72)
pt3dadd(108.44, 2.44, -60.9, 2.72)
pt3dadd(108.08, 2.03, -60.9, 2.72)
pt3dadd(107.01, 0.82, -60.9, 2.72)
pt3dadd(106.66, 0.41, -60.9, 2.72)
pt3dadd(105.59, -1.61, -60.9, 2.72)
pt3dadd(105.23, -2.02, -60.9, 2.72)
pt3dadd(104.52, -3.64, -60.9, 2.72)
pt3dadd(104.16, -4.45, -60.9, 2.72)
pt3dadd(103.45, -4.85, -60.9, 2.72)
}
}
proc shape3d_62() {
dend[43] { pt3dadd(103.09, -6.07, -60.9, 2.72)
pt3dadd(102.38, -7.28, -60.9, 2.72)
pt3dadd(102.02, -8.09, -60.9, 2.72)
pt3dadd(99.88, -10.52, -60.9, 2.72)
pt3dadd(99.52, -11.33, -60.9, 2.72)
pt3dadd(99.17, -12.55, -60.9, 2.72)
pt3dadd(98.45, -13.36, -60.9, 2.72)
pt3dadd(98.1, -14.17, -60.9, 2.72)
pt3dadd(97.38, -15.38, -60.9, 2.72)
pt3dadd(97.03, -16.19, -60.9, 2.72)
pt3dadd(95.96, -17.41, -60.9, 2.72)
pt3dadd(95.6, -17.81, -60.9, 2.72)
pt3dadd(94.89, -18.62, -60.9, 2.72)
pt3dadd(94.18, -19.84, -60.9, 2.72)
pt3dadd(93.82, -21.06, -60.9, 2.72)
pt3dadd(93.46, -21.87, -60.9, 2.72)
pt3dadd(92.75, -22.68, -60.9, 2.72)
pt3dadd(92.39, -23.49, -60.9, 2.72)
pt3dadd(92.04, -24.3, -60.9, 2.72)
pt3dadd(91.68, -25.11, -60.9, 2.72)
pt3dadd(90.97, -26.32, -60.9, 2.72)
pt3dadd(90.25, -27.54, -60.9, 2.72)
pt3dadd(89.9, -27.94, -60.9, 2.72)
pt3dadd(89.18, -28.75, -60.9, 2.72)
pt3dadd(88.47, -29.56, -60.9, 2.72)
pt3dadd(88.11, -30.78, -60.9, 2.72)
pt3dadd(87.76, -31.18, -60.9, 2.72)
pt3dadd(87.04, -31.59, -60.9, 2.72)
pt3dadd(86.69, -32.4, -60.9, 2.72)
pt3dadd(86.33, -33.21, -60.9, 2.72)
pt3dadd(85.26, -35.23, -60.9, 2.72)
pt3dadd(84.9, -36.04, -60.9, 2.72)
pt3dadd(84.19, -36.85, -60.9, 2.72)
pt3dadd(83.83, -37.66, -60.9, 2.72)
pt3dadd(82.76, -38.88, -60.9, 2.72)
pt3dadd(82.41, -39.28, -60.9, 2.72)
pt3dadd(80.98, -40.91, -60.9, 2.72)
pt3dadd(80.62, -41.31, -60.9, 2.72)
pt3dadd(80.27, -41.72, -60.9, 2.72)
pt3dadd(79.55, -41.72, -60.9, 2.72)
pt3dadd(79.2, -42.12, -60.9, 2.72)
pt3dadd(78.84, -42.53, -60.9, 2.72)
pt3dadd(78.84, -43.34, -58.8, 2.38)
pt3dadd(78.84, -44.15, -58.8, 2.38)
pt3dadd(78.48, -44.55, -58.8, 2.38)
pt3dadd(78.13, -44.96, -58.8, 2.38)
pt3dadd(77.77, -45.36, -58.8, 2.38)
pt3dadd(77.06, -45.77, -58.8, 2.38)
pt3dadd(76.7, -46.17, -58.8, 2.38)
pt3dadd(76.34, -46.98, -58.8, 2.38)
pt3dadd(75.99, -47.79, -58.8, 2.38)
pt3dadd(75.63, -48.2, -58.8, 2.38)
pt3dadd(74.92, -48.6, -58.8, 2.38)
pt3dadd(74.56, -49.01, -58.8, 2.38)
pt3dadd(74.2, -49.82, -58.8, 2.38)
pt3dadd(73.85, -50.22, -58.8, 2.38)
pt3dadd(73.49, -50.63, -58.8, 2.38)
pt3dadd(73.13, -51.44, -58.8, 2.38)
pt3dadd(72.42, -51.84, -58.8, 2.38)
pt3dadd(71.71, -52.65, -58.8, 2.38)
pt3dadd(70.99, -53.46, -58.8, 2.38)
pt3dadd(70.64, -53.87, -58.8, 2.38)
pt3dadd(69.57, -55.08, -58.8, 2.38)
pt3dadd(69.21, -55.89, -58.8, 2.38)
pt3dadd(68.85, -56.7, -58.8, 2.38)
pt3dadd(68.14, -57.51, -58.8, 2.38)
pt3dadd(67.43, -57.92, -58.8, 2.38)
pt3dadd(67.07, -58.73, -58.8, 2.38)
pt3dadd(64.57, -61.56, -58.8, 2.38)
pt3dadd(64.57, -62.37, -58.8, 2.38)
pt3dadd(63.86, -62.78, -58.8, 2.38)
pt3dadd(62.79, -64, -58.8, 2.38)
pt3dadd(62.43, -64.4, -58.8, 2.38)
pt3dadd(61.36, -65.62, -58.8, 2.38)
pt3dadd(61.01, -66.43, -58.8, 2.38)
pt3dadd(60.65, -66.83, -58.8, 2.38)
pt3dadd(60.29, -67.64, -58.8, 2.38)
pt3dadd(59.58, -68.05, -58.8, 2.38)
pt3dadd(59.58, -68.86, -58.8, 2.38)
pt3dadd(58.87, -69.26, -58.8, 2.38)
pt3dadd(58.87, -70.07, -58.8, 2.38)
pt3dadd(58.15, -70.48, -58.8, 2.38)
pt3dadd(57.44, -70.88, -58.8, 2.38)
pt3dadd(56.37, -71.69, -58.8, 2.38)
pt3dadd(55.66, -72.5, -58.8, 2.38)
pt3dadd(54.23, -74.12, -58.8, 2.38)
pt3dadd(53.87, -74.93, -58.8, 2.38)
pt3dadd(53.52, -75.34, -58.8, 2.38)
pt3dadd(52.45, -76.55, -58.8, 2.38)
pt3dadd(52.09, -76.96, -58.8, 2.38)
pt3dadd(51.02, -77.77, -58.8, 2.38)
pt3dadd(49.95, -78.98, -58.8, 2.38)
pt3dadd(49.59, -79.79, -58.8, 2.38)
pt3dadd(49.24, -80.2, -58.8, 2.38)
pt3dadd(48.17, -81.01, -58.8, 2.38)
pt3dadd(47.1, -81.82, -58.8, 2.38)
pt3dadd(45.67, -83.44, -58.8, 2.38)
pt3dadd(44.96, -84.25, -58.8, 2.38)
pt3dadd(43.89, -85.06, -58.8, 2.38)
pt3dadd(43.17, -85.47, -58.8, 2.38)
pt3dadd(42.1, -86.68, -58.8, 2.38)
pt3dadd(41.39, -87.09, -58.8, 2.38)
pt3dadd(40.32, -87.49, -58.8, 2.38)
pt3dadd(39.61, -88.3, -58.8, 2.38)
pt3dadd(38.54, -89.11, -58.8, 2.38)
pt3dadd(38.18, -89.52, -58.8, 2.38)
pt3dadd(37.11, -90.33, -58.8, 2.38)
pt3dadd(36.4, -91.14, -58.8, 2.38)
pt3dadd(35.68, -91.54, -58.8, 2.38)
pt3dadd(34.61, -91.95, -58.8, 2.38)
pt3dadd(34.26, -92.35, -58.8, 2.38)
pt3dadd(33.54, -92.76, -58.8, 2.38)
pt3dadd(33.19, -93.57, -58.8, 2.38)
pt3dadd(32.47, -93.97, -58.8, 2.38)
pt3dadd(31.4, -94.78, -58.8, 2.38)
pt3dadd(30.33, -95.19, -58.8, 2.38)
pt3dadd(29.26, -95.59, -58.8, 2.38)
pt3dadd(27.84, -96.81, -58.8, 2.38)
pt3dadd(26.05, -98.02, -58.8, 2.38)
pt3dadd(23.91, -98.83, -58.8, 2.38)
pt3dadd(22.49, -99.64, -58.8, 2.38)
pt3dadd(21.06, -100.45, -58.8, 2.38)
pt3dadd(18.92, -101.67, -58.8, 2.38)
pt3dadd(17.14, -102.48, -58.8, 2.38)
pt3dadd(16.07, -103.29, -58.8, 2.38)
pt3dadd(14.64, -103.69, -58.8, 2.38)
pt3dadd(13.21, -104.1, -58.8, 2.38)
pt3dadd(12.5, -104.5, -58.8, 2.38)
pt3dadd(11.07, -104.91, -58.8, 2.38)
pt3dadd(10, -105.31, -58.8, 2.38)
pt3dadd(9.29, -105.31, -58.8, 2.38)
pt3dadd(8.22, -105.72, -58.8, 2.38)
pt3dadd(7.15, -106.12, -58.8, 2.38)
pt3dadd(6.44, -106.53, -58.8, 2.38)
pt3dadd(5.01, -106.94, -58.8, 2.38)
pt3dadd(4.3, -107.34, -58.8, 2.38)
pt3dadd(2.87, -107.34, -58.8, 2.38)
pt3dadd(1.44, -108.15, -58.8, 2.38)
pt3dadd(-0.34, -108.15, -58.8, 2.38)
pt3dadd(-1.77, -108.96, -58.8, 2.38)
pt3dadd(-2.84, -108.96, -58.8, 2.38)
pt3dadd(-3.91, -109.77, -58.8, 2.38)
pt3dadd(-4.98, -109.77, -58.8, 2.38)
pt3dadd(-6.05, -110.18, -58.8, 2.38)
pt3dadd(-6.76, -110.58, -58.8, 2.38)
pt3dadd(-8.19, -110.58, -58.8, 2.38)
}
dend[44] {pt3dclear()
pt3dadd(222.83, 183.64, -54.6, 1.36)
pt3dadd(228.94, 178.24, -6.3, 1.36)
pt3dadd(229.9, 179.73, -6.3, 2.16)
pt3dadd(229.97, 179.48, -6.3, 2.16)
pt3dadd(230.19, 179.23, -6.3, 2.16)
pt3dadd(230.26, 178.98, -6.3, 2.16)
pt3dadd(230.41, 178.73, -6.3, 2.16)
pt3dadd(230.56, 178.56, -6.3, 2.16)
pt3dadd(230.7, 178.4, -6.3, 2.16)
pt3dadd(230.78, 178.23, -6.3, 2.16)
pt3dadd(230.85, 178.06, -6.3, 2.16)
pt3dadd(230.92, 177.81, -6.3, 2.16)
pt3dadd(231.07, 177.56, -6.3, 2.16)
pt3dadd(231.29, 177.32, -6.3, 2.16)
pt3dadd(231.36, 177.15, -6.3, 2.16)
pt3dadd(231.43, 176.9, -6.3, 2.16)
pt3dadd(231.51, 176.73, -6.3, 2.16)
pt3dadd(231.65, 176.48, -6.3, 2.16)
pt3dadd(231.8, 176.32, -6.3, 2.16)
pt3dadd(231.87, 176.07, -6.3, 2.16)
pt3dadd(232.02, 175.82, -6.3, 2.16)
pt3dadd(232.17, 175.57, -6.3, 2.16)
pt3dadd(232.31, 175.4, -6.3, 2.16)
pt3dadd(232.46, 175.07, -6.3, 2.16)
pt3dadd(232.53, 174.82, -6.3, 2.16)
pt3dadd(232.68, 174.57, -6.3, 2.16)
pt3dadd(232.97, 173.91, -6.3, 2.16)
pt3dadd(233.04, 173.66, -6.3, 2.16)
pt3dadd(233.19, 173.33, -6.3, 2.16)
pt3dadd(233.34, 172.99, -6.3, 2.16)
pt3dadd(233.48, 172.58, -6.3, 2.16)
pt3dadd(233.56, 172.33, -6.3, 2.16)
pt3dadd(233.77, 171.91, -6.3, 2.16)
pt3dadd(233.92, 171.58, -6.3, 2.16)
pt3dadd(233.99, 171.25, -6.3, 2.16)
pt3dadd(234.14, 170.92, -6.3, 2.16)
pt3dadd(234.29, 170.58, -6.3, 2.16)
pt3dadd(234.36, 170.42, -6.3, 2.16)
pt3dadd(234.51, 170.09, -6.3, 2.16)
pt3dadd(234.58, 169.84, -6.3, 2.16)
pt3dadd(234.73, 169.5, -6.3, 2.16)
pt3dadd(234.87, 169.17, -6.3, 2.16)
pt3dadd(234.95, 168.92, -6.3, 2.16)
pt3dadd(235.02, 168.59, -6.3, 2.16)
pt3dadd(235.16, 168.34, -6.3, 2.16)
pt3dadd(235.16, 168.01, -6.3, 2.16)
pt3dadd(235.31, 167.76, -6.3, 2.16)
pt3dadd(235.31, 167.51, -6.3, 2.16)
pt3dadd(235.38, 167.18, -6.3, 2.16)
pt3dadd(235.46, 166.85, -6.3, 2.16)
pt3dadd(235.46, 164.6, -6.3, 2.16)
pt3dadd(235.53, 164.35, -6.3, 2.16)
pt3dadd(235.53, 162.94, -6.3, 2.16)
pt3dadd(235.68, 162.61, -6.3, 2.16)
}
}
proc shape3d_63() {
dend[44] { pt3dadd(235.68, 162.27, -6.3, 2.16)
pt3dadd(235.75, 161.94, -6.3, 2.16)
pt3dadd(235.82, 161.53, -6.3, 2.16)
pt3dadd(235.82, 159.2, -6.3, 2.16)
pt3dadd(235.75, 160.11, -6.3, 2.16)
pt3dadd(235.75, 153.88, -6.3, 2.16)
pt3dadd(235.82, 153.55, -6.3, 2.16)
pt3dadd(235.82, 153.22, -6.3, 2.16)
pt3dadd(235.97, 152.97, -6.3, 2.16)
pt3dadd(235.97, 152.64, -6.3, 2.16)
pt3dadd(236.04, 152.47, -6.3, 2.16)
pt3dadd(236.19, 152.05, -6.3, 2.16)
pt3dadd(236.26, 151.72, -6.3, 2.16)
pt3dadd(236.34, 151.47, -6.3, 2.16)
pt3dadd(236.41, 151.22, -6.3, 2.16)
pt3dadd(236.41, 150.89, -6.3, 2.16)
pt3dadd(236.55, 150.64, -6.3, 2.16)
pt3dadd(236.55, 150.31, -6.3, 2.16)
pt3dadd(236.7, 150.06, -6.3, 2.16)
pt3dadd(236.85, 149.64, -6.3, 2.16)
pt3dadd(237.07, 149.15, -6.3, 2.16)
pt3dadd(237.14, 148.81, -6.3, 2.16)
pt3dadd(237.21, 148.56, -6.3, 2.16)
pt3dadd(237.29, 148.23, -6.3, 2.16)
pt3dadd(237.36, 147.9, -6.3, 2.16)
pt3dadd(237.36, 147.65, -6.3, 2.16)
pt3dadd(237.43, 147.4, -6.3, 2.16)
pt3dadd(237.51, 147.15, -6.3, 2.16)
pt3dadd(237.51, 146.9, -6.3, 2.16)
pt3dadd(237.58, 146.65, -6.3, 2.16)
pt3dadd(237.65, 146.4, -6.3, 2.16)
pt3dadd(237.73, 146.07, -6.3, 2.16)
pt3dadd(237.73, 145.82, -6.3, 2.16)
pt3dadd(237.8, 145.57, -6.3, 2.16)
pt3dadd(237.87, 145.32, -6.3, 2.16)
pt3dadd(237.87, 144.66, -6.3, 2.16)
pt3dadd(237.94, 144.41, -6.3, 2.16)
pt3dadd(237.94, 144.16, -6.3, 2.16)
pt3dadd(238.09, 143.83, -6.3, 2.16)
pt3dadd(238.24, 143.58, -6.3, 2.16)
pt3dadd(238.38, 143.33, -6.3, 2.16)
pt3dadd(238.53, 142.91, -6.3, 2.16)
pt3dadd(238.6, 142.66, -6.3, 2.16)
pt3dadd(238.75, 142.5, -6.3, 2.16)
pt3dadd(238.82, 142.33, -6.3, 2.16)
pt3dadd(238.9, 142.17, -6.3, 2.16)
pt3dadd(238.97, 141.92, -6.3, 2.16)
pt3dadd(239.12, 141.75, -6.3, 2.16)
pt3dadd(239.26, 141.58, -6.3, 2.16)
pt3dadd(239.33, 141.5, -6.3, 2.16)
pt3dadd(239.41, 141.42, -6.3, 2.16)
pt3dadd(239.48, 141.25, -6.3, 2.16)
pt3dadd(239.63, 141.17, -6.3, 2.16)
pt3dadd(239.77, 141.09, -6.3, 2.16)
pt3dadd(239.92, 141, -6.3, 2.16)
pt3dadd(240.14, 140.92, -6.3, 2.16)
pt3dadd(242.04, 140.92, -6.3, 2.16)
pt3dadd(242.19, 141, -6.3, 2.16)
pt3dadd(242.41, 141.09, -6.3, 2.16)
pt3dadd(242.63, 141.17, -6.3, 2.16)
pt3dadd(242.85, 141.25, -6.3, 2.16)
pt3dadd(242.99, 141.33, -6.3, 2.16)
pt3dadd(243.21, 141.42, -6.3, 2.16)
pt3dadd(243.43, 141.5, -6.3, 2.16)
pt3dadd(243.58, 141.58, -6.3, 2.16)
pt3dadd(243.72, 141.75, -6.3, 2.16)
pt3dadd(243.94, 141.83, -6.3, 2.16)
pt3dadd(244.16, 142, -6.3, 2.16)
pt3dadd(244.38, 142.17, -6.3, 2.16)
pt3dadd(244.53, 142.25, -6.3, 2.16)
pt3dadd(244.6, 142.41, -6.3, 2.16)
pt3dadd(244.75, 142.41, -6.3, 2.16)
pt3dadd(244.9, 142.58, -6.3, 2.16)
pt3dadd(245.11, 142.75, -6.3, 2.16)
pt3dadd(245.26, 142.83, -6.3, 2.16)
pt3dadd(245.48, 143, -6.3, 2.16)
pt3dadd(245.63, 143.16, -6.3, 2.16)
pt3dadd(245.85, 143.33, -6.3, 2.16)
pt3dadd(245.99, 143.41, -6.3, 2.16)
pt3dadd(246.21, 143.58, -6.3, 2.16)
pt3dadd(246.58, 143.83, -6.3, 2.16)
pt3dadd(246.72, 143.91, -6.3, 2.16)
pt3dadd(247.09, 144.24, -6.3, 2.16)
pt3dadd(247.31, 144.33, -6.3, 2.16)
pt3dadd(247.53, 144.49, -6.3, 2.16)
pt3dadd(247.68, 144.58, -6.3, 2.16)
pt3dadd(247.89, 144.82, -6.3, 2.16)
pt3dadd(248.26, 145.07, -6.3, 2.16)
pt3dadd(248.55, 145.32, -6.3, 2.16)
pt3dadd(248.77, 145.49, -6.3, 2.16)
pt3dadd(248.99, 145.74, -6.3, 2.16)
pt3dadd(249.21, 145.82, -6.3, 2.16)
pt3dadd(249.36, 145.99, -6.3, 2.16)
pt3dadd(249.5, 146.15, -6.3, 2.16)
pt3dadd(249.65, 146.32, -6.3, 2.16)
pt3dadd(249.8, 146.4, -6.3, 2.16)
pt3dadd(249.87, 146.49, -6.3, 2.16)
pt3dadd(250.02, 146.57, -6.3, 2.16)
pt3dadd(250.16, 146.65, -6.3, 2.16)
pt3dadd(250.31, 146.82, -6.3, 2.16)
pt3dadd(250.38, 146.9, -6.3, 2.16)
pt3dadd(250.53, 146.99, -6.3, 2.16)
pt3dadd(250.75, 147.23, -6.3, 2.16)
pt3dadd(251.04, 147.4, -6.3, 2.16)
pt3dadd(251.19, 147.57, -6.3, 2.16)
pt3dadd(251.41, 147.82, -6.3, 2.16)
pt3dadd(251.48, 147.9, -6.3, 2.16)
pt3dadd(251.63, 147.98, -6.3, 2.16)
pt3dadd(251.77, 148.07, -6.3, 2.16)
pt3dadd(251.92, 148.15, -6.3, 2.16)
pt3dadd(251.99, 148.31, -6.3, 2.16)
pt3dadd(252.14, 148.4, -6.3, 2.16)
pt3dadd(252.21, 148.48, -6.3, 2.16)
pt3dadd(252.43, 148.56, -6.3, 2.16)
pt3dadd(252.65, 148.73, -6.3, 2.16)
pt3dadd(252.87, 148.81, -6.3, 2.16)
pt3dadd(253.09, 148.9, -6.3, 2.16)
pt3dadd(253.31, 149.06, -6.3, 2.16)
pt3dadd(253.53, 149.15, -6.3, 2.16)
pt3dadd(253.67, 149.31, -6.3, 2.16)
pt3dadd(253.89, 149.4, -6.3, 2.16)
pt3dadd(254.04, 149.48, -6.3, 2.16)
pt3dadd(254.19, 149.64, -6.3, 2.16)
pt3dadd(254.33, 149.73, -6.3, 2.16)
pt3dadd(254.55, 149.81, -6.3, 2.16)
pt3dadd(254.7, 149.89, -6.3, 2.16)
pt3dadd(254.84, 149.98, -6.3, 2.16)
pt3dadd(255.06, 150.06, -6.3, 2.16)
pt3dadd(255.28, 150.14, -6.3, 2.16)
pt3dadd(255.5, 150.23, -6.3, 2.16)
pt3dadd(255.72, 150.23, -6.3, 2.16)
pt3dadd(255.94, 150.31, -6.3, 2.16)
pt3dadd(256.23, 150.39, -6.3, 2.16)
pt3dadd(256.45, 150.48, -6.3, 2.16)
pt3dadd(256.82, 150.56, -6.3, 2.16)
pt3dadd(257.19, 150.64, -6.3, 2.16)
pt3dadd(257.55, 150.64, -6.3, 2.16)
pt3dadd(257.92, 150.72, -6.3, 2.16)
pt3dadd(258.21, 150.81, -6.3, 2.16)
pt3dadd(258.5, 150.81, -6.3, 2.16)
pt3dadd(258.06, 150.31, -8.4, 2.23)
pt3dadd(263.62, 150.31, -8.4, 2.23)
pt3dadd(263.77, 150.48, -8.4, 2.23)
pt3dadd(264.06, 150.48, -8.4, 2.23)
pt3dadd(262.89, 150.48, -10.5, 2.23)
pt3dadd(265.38, 150.48, -10.5, 2.23)
pt3dadd(265.67, 150.64, -10.5, 2.23)
pt3dadd(265.82, 150.81, -10.5, 2.23)
pt3dadd(265.97, 150.97, -10.5, 2.23)
pt3dadd(266.11, 151.14, -10.5, 2.23)
pt3dadd(266.26, 151.31, -10.5, 2.23)
pt3dadd(266.4, 151.47, -10.5, 2.23)
pt3dadd(266.55, 151.64, -10.5, 2.23)
pt3dadd(266.7, 151.8, -10.5, 2.23)
pt3dadd(266.84, 151.97, -10.5, 2.23)
pt3dadd(267.14, 152.14, -10.5, 2.23)
pt3dadd(267.14, 152.47, -10.5, 2.23)
pt3dadd(267.28, 152.64, -10.5, 2.23)
pt3dadd(267.43, 152.8, -10.5, 2.23)
pt3dadd(267.57, 152.97, -10.5, 2.23)
pt3dadd(267.87, 153.13, -10.5, 2.23)
pt3dadd(268.16, 153.47, -10.5, 2.23)
pt3dadd(268.31, 153.63, -10.5, 2.23)
pt3dadd(268.45, 153.8, -10.5, 2.23)
pt3dadd(268.6, 153.97, -10.5, 2.23)
pt3dadd(268.75, 154.13, -10.5, 2.23)
pt3dadd(269.04, 154.3, -10.5, 2.23)
pt3dadd(269.18, 154.46, -10.5, 2.23)
pt3dadd(269.33, 154.63, -10.5, 2.23)
pt3dadd(269.48, 154.8, -10.5, 2.23)
pt3dadd(269.62, 154.96, -10.5, 2.23)
pt3dadd(269.77, 155.13, -10.5, 2.23)
pt3dadd(270.06, 155.29, -10.5, 2.23)
pt3dadd(270.35, 155.46, -10.5, 2.23)
pt3dadd(270.65, 155.79, -10.5, 2.23)
pt3dadd(270.94, 155.96, -10.5, 2.23)
pt3dadd(271.09, 156.13, -10.5, 2.23)
pt3dadd(271.23, 156.29, -10.5, 2.23)
pt3dadd(271.82, 156.29, -10.5, 2.23)
pt3dadd(272.11, 156.46, -10.5, 2.23)
pt3dadd(276.94, 156.46, -10.5, 2.23)
pt3dadd(277.23, 156.29, -10.5, 2.23)
pt3dadd(277.67, 156.29, -10.5, 2.23)
pt3dadd(277.96, 156.13, -10.5, 2.23)
pt3dadd(278.11, 155.96, -10.5, 2.23)
pt3dadd(278.4, 155.96, -10.5, 2.23)
pt3dadd(278.84, 155.63, -13.65, 2.23)
pt3dadd(279.43, 155.63, -13.65, 2.23)
pt3dadd(279.72, 155.46, -13.65, 2.23)
pt3dadd(280.01, 155.46, -13.65, 2.23)
pt3dadd(280.3, 155.29, -13.65, 2.23)
pt3dadd(280.6, 155.29, -13.65, 2.23)
pt3dadd(280.74, 155.13, -13.65, 2.23)
pt3dadd(281.04, 154.96, -13.65, 2.23)
pt3dadd(281.18, 154.8, -13.65, 2.23)
pt3dadd(282.21, 154.8, -13.65, 2.23)
pt3dadd(282.5, 154.63, -13.65, 2.23)
pt3dadd(282.79, 154.63, -13.65, 2.23)
pt3dadd(282.94, 154.46, -13.65, 2.23)
pt3dadd(283.23, 154.3, -13.65, 2.23)
}
}
proc shape3d_64() {
dend[44] { pt3dadd(283.52, 154.13, -13.65, 2.23)
pt3dadd(284.84, 154.13, -13.65, 2.23)
pt3dadd(284.99, 153.97, -13.65, 2.23)
pt3dadd(285.72, 153.97, -13.65, 2.23)
pt3dadd(286.01, 153.8, -13.65, 2.23)
pt3dadd(286.16, 153.47, -13.65, 2.23)
pt3dadd(286.45, 153.3, -13.65, 2.23)
pt3dadd(286.74, 152.97, -13.65, 2.23)
pt3dadd(287.04, 152.8, -13.65, 2.23)
pt3dadd(287.33, 152.47, -13.65, 2.23)
pt3dadd(287.77, 152.3, -13.65, 2.23)
pt3dadd(288.21, 151.97, -13.65, 2.23)
pt3dadd(288.65, 151.64, -13.65, 2.23)
pt3dadd(288.94, 151.14, -13.65, 2.23)
pt3dadd(289.38, 150.97, -13.65, 2.23)
pt3dadd(289.67, 150.64, -13.65, 2.23)
pt3dadd(290.11, 150.14, -13.65, 2.23)
pt3dadd(290.55, 149.31, -13.65, 2.23)
pt3dadd(290.99, 148.98, -13.65, 2.23)
pt3dadd(291.28, 148.48, -13.65, 2.23)
pt3dadd(291.72, 147.98, -13.65, 2.23)
pt3dadd(292.16, 147.32, -13.65, 2.23)
pt3dadd(293.18, 146.15, -13.65, 2.23)
pt3dadd(293.62, 145.66, -13.65, 2.23)
pt3dadd(294.5, 144.66, -13.65, 2.23)
pt3dadd(294.94, 144.33, -13.65, 2.23)
pt3dadd(295.38, 143.83, -13.65, 2.23)
pt3dadd(295.96, 143.16, -13.65, 2.23)
pt3dadd(296.69, 142.5, -13.65, 2.23)
pt3dadd(297.13, 141.83, -13.65, 2.23)
pt3dadd(297.72, 141.33, -13.65, 2.23)
pt3dadd(298.16, 140.67, -13.65, 2.23)
pt3dadd(298.59, 140.17, -13.65, 2.23)
pt3dadd(299.18, 139.67, -13.65, 2.23)
pt3dadd(299.77, 139.01, -13.65, 2.23)
pt3dadd(300.2, 138.34, -13.65, 2.23)
pt3dadd(300.64, 137.84, -13.65, 2.23)
pt3dadd(301.23, 137.01, -13.65, 2.23)
pt3dadd(301.81, 136.35, -13.65, 2.23)
pt3dadd(302.4, 135.85, -13.65, 2.23)
pt3dadd(302.69, 135.35, -13.65, 2.23)
pt3dadd(303.13, 134.85, -13.65, 2.23)
pt3dadd(303.72, 134.19, -13.65, 2.23)
pt3dadd(304.16, 133.52, -13.65, 2.23)
pt3dadd(304.59, 133.03, -13.65, 2.23)
pt3dadd(305.18, 132.53, -13.65, 2.23)
pt3dadd(305.47, 131.86, -13.65, 2.23)
pt3dadd(306.06, 131.2, -13.65, 2.23)
pt3dadd(306.64, 130.37, -13.65, 2.23)
pt3dadd(307.23, 129.7, -13.65, 2.23)
pt3dadd(307.67, 129.2, -13.65, 2.23)
pt3dadd(308.11, 128.37, -13.65, 2.23)
pt3dadd(308.69, 127.71, -13.65, 2.23)
pt3dadd(309.28, 127.21, -13.65, 2.23)
pt3dadd(309.86, 126.54, -13.65, 2.23)
pt3dadd(310.3, 125.71, -13.65, 2.23)
pt3dadd(310.89, 125.05, -13.65, 2.23)
pt3dadd(311.32, 124.38, -13.65, 2.23)
pt3dadd(311.76, 123.88, -13.65, 2.23)
pt3dadd(312.2, 123.39, -13.65, 2.23)
pt3dadd(312.79, 122.72, -13.65, 2.23)
pt3dadd(313.23, 122.06, -13.65, 2.23)
pt3dadd(313.67, 121.56, -13.65, 2.23)
pt3dadd(314.1, 120.89, -13.65, 2.23)
pt3dadd(314.69, 120.39, -13.65, 2.23)
pt3dadd(315.28, 119.73, -13.65, 2.23)
pt3dadd(315.71, 119.07, -13.65, 2.23)
pt3dadd(316.3, 118.23, -13.65, 2.23)
pt3dadd(316.89, 117.74, -13.65, 2.23)
pt3dadd(317.32, 117.07, -13.65, 2.23)
pt3dadd(317.76, 116.74, -13.65, 2.23)
pt3dadd(318.2, 116.24, -13.65, 2.23)
pt3dadd(318.49, 115.74, -13.65, 2.23)
pt3dadd(318.93, 115.24, -13.65, 2.23)
pt3dadd(319.37, 114.91, -13.65, 2.23)
pt3dadd(319.67, 114.41, -13.65, 2.23)
pt3dadd(320.1, 114.08, -13.65, 2.23)
pt3dadd(320.54, 113.58, -13.65, 2.23)
pt3dadd(321.27, 112.58, -13.65, 2.23)
pt3dadd(321.71, 112.08, -13.65, 2.23)
pt3dadd(322.3, 111.42, -13.65, 2.23)
pt3dadd(322.74, 111.09, -13.65, 2.23)
pt3dadd(323.18, 110.76, -13.65, 2.23)
pt3dadd(323.62, 110.26, -13.65, 2.23)
pt3dadd(324.05, 109.92, -13.65, 2.23)
pt3dadd(324.49, 109.59, -13.65, 2.23)
pt3dadd(324.93, 109.09, -13.65, 2.23)
pt3dadd(325.23, 108.93, -13.65, 2.23)
pt3dadd(325.52, 108.59, -13.65, 2.23)
pt3dadd(325.96, 108.1, -13.65, 2.23)
pt3dadd(326.25, 107.93, -13.65, 2.23)
pt3dadd(326.4, 107.6, -13.65, 2.23)
pt3dadd(325.37, 108.1, -12.6, 2.23)
pt3dadd(325.81, 107.6, -12.6, 2.23)
pt3dadd(325.96, 107.43, -12.6, 2.23)
pt3dadd(326.1, 107.1, -12.6, 2.23)
pt3dadd(326.4, 106.93, -12.6, 2.23)
pt3dadd(327.42, 105.77, -12.6, 2.23)
pt3dadd(327.57, 105.44, -12.6, 2.23)
pt3dadd(327.86, 104.94, -12.6, 2.23)
pt3dadd(328.01, 104.61, -12.6, 2.23)
pt3dadd(328.44, 104.11, -12.6, 2.23)
pt3dadd(328.59, 103.78, -12.6, 2.23)
pt3dadd(328.74, 103.61, -12.6, 2.23)
pt3dadd(329.03, 103.28, -12.6, 2.23)
pt3dadd(329.61, 102.61, -12.6, 2.23)
pt3dadd(329.91, 102.28, -12.6, 2.23)
pt3dadd(330.2, 101.78, -12.6, 2.23)
pt3dadd(330.49, 101.45, -12.6, 2.23)
pt3dadd(330.93, 100.78, -12.6, 2.23)
pt3dadd(331.37, 100.29, -12.6, 2.23)
pt3dadd(331.81, 99.62, -12.6, 2.23)
pt3dadd(332.25, 99.12, -12.6, 2.23)
pt3dadd(332.69, 98.46, -12.6, 2.23)
pt3dadd(333.27, 97.79, -12.6, 2.23)
pt3dadd(333.71, 97.29, -12.6, 2.23)
pt3dadd(334.3, 96.63, -12.6, 2.23)
pt3dadd(334.59, 96.13, -12.6, 2.23)
pt3dadd(335.03, 95.63, -12.6, 2.23)
pt3dadd(335.47, 95.13, -12.6, 2.23)
pt3dadd(335.91, 94.8, -12.6, 2.23)
pt3dadd(336.35, 94.3, -12.6, 2.23)
pt3dadd(336.78, 93.8, -12.6, 2.23)
pt3dadd(336.93, 93.64, -12.6, 2.23)
pt3dadd(337.37, 93.14, -12.6, 2.23)
pt3dadd(337.81, 92.64, -12.6, 2.23)
pt3dadd(338.25, 92.47, -12.6, 2.23)
pt3dadd(338.54, 92.14, -12.6, 2.23)
pt3dadd(338.69, 91.81, -12.6, 2.23)
pt3dadd(338.83, 91.64, -12.6, 2.23)
pt3dadd(339.13, 91.48, -12.6, 2.23)
pt3dadd(339.27, 91.31, -12.6, 2.23)
pt3dadd(339.42, 91.14, -12.6, 2.23)
pt3dadd(339.42, 91.64, -18.9, 2.23)
pt3dadd(339.56, 91.31, -18.9, 2.23)
pt3dadd(340.59, 90.15, -18.9, 2.23)
pt3dadd(341.61, 89.15, -18.9, 2.23)
pt3dadd(342.05, 88.65, -18.9, 2.23)
pt3dadd(342.34, 88.32, -18.9, 2.23)
pt3dadd(342.64, 87.82, -18.9, 2.23)
pt3dadd(343.08, 87.49, -18.9, 2.23)
pt3dadd(343.52, 86.99, -18.9, 2.23)
pt3dadd(343.81, 86.49, -18.9, 2.23)
pt3dadd(344.1, 85.83, -18.9, 2.23)
pt3dadd(344.54, 85.33, -18.9, 2.23)
pt3dadd(344.83, 84.66, -18.9, 2.23)
pt3dadd(345.27, 84.16, -18.9, 2.23)
pt3dadd(345.56, 83.67, -18.9, 2.23)
pt3dadd(346, 83, -18.9, 2.23)
pt3dadd(346.44, 82.34, -18.9, 2.23)
pt3dadd(346.88, 81.84, -18.9, 2.23)
pt3dadd(347.32, 81.01, -18.9, 2.23)
pt3dadd(347.17, 80.84, -15.75, 1.81)
pt3dadd(347.61, 80.84, -15.75, 1.81)
pt3dadd(347.76, 80.67, -15.75, 1.81)
pt3dadd(347.91, 80.34, -15.75, 1.81)
pt3dadd(348.05, 80.18, -15.75, 1.81)
pt3dadd(348.2, 79.84, -15.75, 1.81)
pt3dadd(348.34, 79.35, -15.75, 1.81)
pt3dadd(348.49, 79.01, -15.75, 1.81)
pt3dadd(348.93, 78.51, -15.75, 1.81)
pt3dadd(349.08, 78.18, -15.75, 1.81)
pt3dadd(349.22, 77.85, -15.75, 1.81)
pt3dadd(349.37, 77.68, -15.75, 1.81)
pt3dadd(349.51, 77.35, -15.75, 1.81)
pt3dadd(349.81, 76.85, -15.75, 1.81)
pt3dadd(350.25, 76.35, -15.75, 1.81)
pt3dadd(350.39, 76.02, -15.75, 1.81)
pt3dadd(350.54, 75.69, -15.75, 1.81)
pt3dadd(350.69, 75.36, -15.75, 1.81)
pt3dadd(350.98, 75.02, -15.75, 1.81)
pt3dadd(351.12, 74.86, -15.75, 1.81)
pt3dadd(351.27, 74.53, -15.75, 1.81)
pt3dadd(351.42, 74.19, -15.75, 1.81)
pt3dadd(351.56, 73.69, -15.75, 1.81)
pt3dadd(351.71, 73.36, -15.75, 1.81)
pt3dadd(351.86, 73.03, -15.75, 1.81)
pt3dadd(352, 72.7, -15.75, 1.81)
pt3dadd(352.29, 72.37, -15.75, 1.81)
pt3dadd(352.44, 72.03, -15.75, 1.81)
pt3dadd(352.73, 71.53, -15.75, 1.81)
pt3dadd(353.03, 71.37, -15.75, 1.81)
pt3dadd(353.17, 70.87, -15.75, 1.81)
pt3dadd(353.47, 70.54, -15.75, 1.81)
pt3dadd(353.76, 70.04, -15.75, 1.81)
pt3dadd(354.2, 69.54, -15.75, 1.81)
pt3dadd(354.34, 69.04, -15.75, 1.81)
pt3dadd(354.78, 68.54, -15.75, 1.81)
pt3dadd(354.93, 68.04, -15.75, 1.81)
pt3dadd(355.07, 67.55, -15.75, 1.81)
pt3dadd(355.37, 67.21, -15.75, 1.81)
pt3dadd(355.81, 66.38, -15.75, 1.81)
pt3dadd(355.95, 66.05, -15.75, 1.81)
pt3dadd(356.25, 65.55, -15.75, 1.81)
pt3dadd(356.39, 65.05, -15.75, 1.81)
pt3dadd(356.83, 64.55, -15.75, 1.81)
pt3dadd(356.98, 64.06, -15.75, 1.81)
pt3dadd(357.27, 63.72, -15.75, 1.81)
pt3dadd(357.42, 63.39, -15.75, 1.81)
pt3dadd(357.85, 62.89, -15.75, 1.81)
}
}
proc shape3d_65() {
dend[44] { pt3dadd(358.15, 62.39, -15.75, 1.81)
pt3dadd(358.29, 61.89, -15.75, 1.81)
pt3dadd(358.59, 61.4, -15.75, 1.81)
pt3dadd(358.88, 61.06, -15.75, 1.81)
pt3dadd(359.17, 60.57, -15.75, 1.81)
pt3dadd(359.32, 60.23, -15.75, 1.81)
pt3dadd(359.46, 59.73, -15.75, 1.81)
pt3dadd(359.61, 59.57, -15.75, 1.81)
pt3dadd(359.9, 59.07, -15.75, 1.81)
pt3dadd(360.05, 58.74, -15.75, 1.81)
pt3dadd(360.2, 58.24, -15.75, 1.81)
pt3dadd(360.49, 57.74, -15.75, 1.81)
pt3dadd(360.78, 57.08, -15.75, 1.81)
pt3dadd(361.07, 56.74, -15.75, 1.81)
pt3dadd(361.37, 56.41, -15.75, 1.81)
pt3dadd(361.51, 56.08, -15.75, 1.81)
pt3dadd(361.66, 55.58, -15.75, 1.81)
pt3dadd(361.81, 55.25, -15.75, 1.81)
pt3dadd(362.1, 55.08, -15.75, 1.81)
pt3dadd(362.1, 54.58, -15.75, 1.81)
pt3dadd(362.24, 54.25, -15.75, 1.81)
pt3dadd(362.39, 53.92, -15.75, 1.81)
pt3dadd(362.39, 53.59, -15.75, 1.81)
pt3dadd(362.68, 53.09, -15.75, 1.81)
pt3dadd(362.83, 52.75, -15.75, 1.81)
pt3dadd(362.98, 52.26, -15.75, 1.81)
pt3dadd(363.12, 51.92, -15.75, 1.81)
pt3dadd(363.12, 46.61, -15.75, 1.81)
}
dend[45] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(248.96, 364.8, -31.5, 4.76)
pt3dadd(240.23, 364.8, -31.5, 4.76)
pt3dadd(239.87, 365, -31.5, 4.76)
pt3dadd(238.62, 365, -31.5, 4.76)
pt3dadd(238.26, 365.2, -31.5, 4.76)
pt3dadd(237.37, 365.2, -31.5, 4.76)
pt3dadd(237.19, 365.4, -31.5, 4.76)
pt3dadd(236.12, 365.4, -31.5, 4.76)
pt3dadd(235.95, 365.61, -31.5, 4.76)
pt3dadd(234.88, 365.61, -31.5, 4.76)
pt3dadd(234.7, 365.81, -31.5, 4.76)
pt3dadd(233.98, 365.81, -31.5, 4.76)
pt3dadd(233.63, 366.01, -31.5, 4.76)
pt3dadd(233.09, 366.01, -31.5, 4.76)
pt3dadd(232.91, 366.21, -31.5, 4.76)
pt3dadd(232.38, 366.21, -31.5, 4.76)
pt3dadd(232.2, 366.42, -31.5, 4.76)
pt3dadd(231.84, 366.42, -31.5, 4.76)
pt3dadd(231.67, 366.62, -31.5, 4.76)
pt3dadd(231.31, 366.62, -31.5, 4.76)
pt3dadd(231.13, 366.82, -31.5, 4.76)
pt3dadd(230.77, 366.82, -31.5, 4.76)
pt3dadd(230.6, 367.02, -31.5, 4.76)
pt3dadd(230.24, 367.02, -31.5, 4.76)
pt3dadd(230.06, 367.23, -31.5, 4.76)
pt3dadd(229.7, 367.23, -31.5, 4.76)
pt3dadd(229.53, 367.43, -31.5, 4.76)
pt3dadd(229.17, 367.43, -31.5, 4.76)
pt3dadd(228.99, 367.63, -31.5, 4.76)
pt3dadd(228.63, 367.83, -31.5, 4.76)
pt3dadd(228.28, 367.83, -31.5, 4.76)
pt3dadd(228.1, 368.04, -31.5, 4.76)
pt3dadd(227.92, 368.24, -31.5, 4.76)
pt3dadd(227.74, 368.44, -31.5, 4.76)
pt3dadd(227.39, 368.64, -31.5, 4.76)
pt3dadd(227.21, 369.05, -31.5, 4.76)
pt3dadd(226.85, 369.25, -31.5, 4.76)
pt3dadd(226.49, 369.45, -31.5, 4.76)
pt3dadd(226.14, 369.66, -31.5, 4.76)
pt3dadd(225.96, 369.86, -31.5, 4.76)
pt3dadd(225.78, 370.06, -31.5, 4.76)
pt3dadd(225.6, 370.26, -31.5, 4.76)
pt3dadd(225.07, 370.87, -31.5, 4.76)
pt3dadd(224.71, 371.07, -31.5, 4.76)
pt3dadd(224.35, 371.28, -31.5, 4.76)
pt3dadd(224.18, 371.48, -31.5, 4.76)
pt3dadd(224, 371.68, -31.5, 4.76)
pt3dadd(223.82, 371.88, -31.5, 4.76)
pt3dadd(223.46, 372.09, -31.5, 4.76)
pt3dadd(223.28, 372.29, -31.5, 4.76)
pt3dadd(222.93, 372.49, -31.5, 4.76)
pt3dadd(222.57, 372.69, -31.5, 4.76)
pt3dadd(222.39, 372.9, -31.5, 4.76)
pt3dadd(222.21, 373.1, -31.5, 4.76)
pt3dadd(221.86, 373.1, -31.5, 4.76)
pt3dadd(221.68, 373.3, -31.5, 4.76)
pt3dadd(221.32, 373.51, -31.5, 4.76)
pt3dadd(221.14, 373.91, -31.5, 4.76)
pt3dadd(220.79, 374.11, -31.5, 4.76)
pt3dadd(220.61, 374.32, -31.5, 4.76)
pt3dadd(220.43, 374.72, -31.5, 4.76)
pt3dadd(220.07, 374.92, -31.5, 4.76)
pt3dadd(219.9, 375.13, -31.5, 4.76)
pt3dadd(219.72, 375.33, -31.5, 4.76)
pt3dadd(219.54, 375.73, -31.5, 4.76)
pt3dadd(219.36, 375.94, -31.5, 4.76)
pt3dadd(219.18, 376.14, -31.5, 4.76)
pt3dadd(218.83, 376.54, -31.5, 4.76)
pt3dadd(218.47, 376.75, -31.5, 4.76)
pt3dadd(218.29, 377.15, -31.5, 4.76)
pt3dadd(217.93, 377.76, -31.5, 4.76)
pt3dadd(217.76, 378.16, -31.5, 4.76)
pt3dadd(217.22, 378.57, -31.5, 4.76)
pt3dadd(217.04, 378.97, -31.5, 4.76)
pt3dadd(216.51, 379.58, -31.5, 4.76)
pt3dadd(216.33, 379.78, -31.5, 4.76)
pt3dadd(215.79, 380.39, -31.5, 4.76)
pt3dadd(215.62, 380.59, -31.5, 4.76)
pt3dadd(215.44, 381, -31.5, 4.76)
pt3dadd(215.26, 381.2, -31.5, 4.76)
pt3dadd(215.08, 381.61, -31.5, 4.76)
pt3dadd(214.9, 381.81, -31.5, 4.76)
pt3dadd(214.72, 382.21, -31.5, 4.76)
pt3dadd(214.19, 382.82, -31.5, 4.76)
pt3dadd(214.01, 383.02, -31.5, 4.76)
pt3dadd(213.83, 383.23, -31.5, 4.76)
pt3dadd(213.83, 383.63, -31.5, 4.76)
pt3dadd(213.65, 383.83, -31.5, 4.76)
pt3dadd(213.65, 384.24, -31.5, 4.76)
pt3dadd(213.48, 384.44, -31.5, 4.76)
pt3dadd(213.48, 385.05, -31.5, 4.76)
pt3dadd(213.48, 385.86, -30.45, 4.08)
pt3dadd(213.48, 386.27, -30.45, 4.08)
pt3dadd(213.3, 386.67, -30.45, 4.08)
pt3dadd(212.94, 386.87, -30.45, 4.08)
pt3dadd(212.76, 387.28, -30.45, 4.08)
pt3dadd(212.59, 387.68, -30.45, 4.08)
pt3dadd(212.23, 387.68, -30.45, 4.08)
pt3dadd(212.05, 387.89, -30.45, 4.08)
pt3dadd(211.87, 388.09, -30.45, 4.08)
pt3dadd(211.52, 388.09, -30.45, 4.08)
pt3dadd(211.34, 388.29, -30.45, 4.08)
pt3dadd(210.98, 388.49, -30.45, 4.08)
pt3dadd(210.62, 388.7, -30.45, 4.08)
pt3dadd(210.09, 389.1, -30.45, 4.08)
pt3dadd(209.91, 389.3, -30.45, 4.08)
pt3dadd(209.55, 389.51, -30.45, 4.08)
pt3dadd(209.2, 389.91, -30.45, 4.08)
pt3dadd(209.02, 390.11, -30.45, 4.08)
pt3dadd(208.84, 390.32, -30.45, 4.08)
pt3dadd(208.66, 390.52, -30.45, 4.08)
pt3dadd(208.31, 390.72, -30.45, 4.08)
pt3dadd(207.95, 390.72, -30.45, 4.08)
pt3dadd(207.59, 390.92, -30.45, 4.08)
pt3dadd(201.53, 390.92, -30.45, 4.08)
pt3dadd(200.99, 391.13, -30.45, 4.08)
pt3dadd(200.64, 391.33, -30.45, 4.08)
pt3dadd(200.28, 391.33, -30.45, 4.08)
pt3dadd(200.1, 391.53, -30.45, 4.08)
pt3dadd(199.92, 391.73, -30.45, 4.08)
pt3dadd(199.75, 391.94, -30.45, 4.08)
pt3dadd(199.39, 391.94, -30.45, 4.08)
pt3dadd(199.03, 392.14, -30.45, 4.08)
pt3dadd(198.85, 392.54, -30.45, 4.08)
pt3dadd(198.5, 392.75, -30.45, 4.08)
pt3dadd(198.14, 392.95, -30.45, 4.08)
pt3dadd(197.96, 393.15, -30.45, 4.08)
pt3dadd(197.78, 393.35, -30.45, 4.08)
pt3dadd(197.61, 393.56, -30.45, 4.08)
pt3dadd(197.25, 393.76, -30.45, 4.08)
pt3dadd(197.07, 393.96, -30.45, 4.08)
pt3dadd(196.89, 394.37, -30.45, 4.08)
pt3dadd(196.36, 394.97, -30.45, 4.08)
pt3dadd(196.18, 395.18, -30.45, 4.08)
pt3dadd(196, 395.38, -30.45, 4.08)
pt3dadd(196, 395.99, -30.45, 4.08)
pt3dadd(195.82, 396.19, -30.45, 4.08)
pt3dadd(195.64, 396.39, -30.45, 4.08)
pt3dadd(195.64, 396.8, -30.45, 4.08)
pt3dadd(195.47, 397.2, -30.45, 4.08)
pt3dadd(195.47, 397.61, -30.45, 4.08)
pt3dadd(195.29, 398.01, -30.45, 4.08)
pt3dadd(195.29, 404.09, -30.45, 4.08)
pt3dadd(195.64, 402.47, -28.35, 4.08)
pt3dadd(195.47, 402.87, -28.35, 4.08)
pt3dadd(195.11, 403.08, -28.35, 4.08)
pt3dadd(194.93, 403.48, -28.35, 4.08)
pt3dadd(194.4, 404.09, -28.35, 4.08)
pt3dadd(194.22, 404.29, -28.35, 4.08)
pt3dadd(194.04, 404.49, -28.35, 4.08)
pt3dadd(193.86, 404.7, -28.35, 4.08)
pt3dadd(193.68, 404.9, -28.35, 4.08)
pt3dadd(193.5, 405.3, -28.35, 4.08)
pt3dadd(193.33, 405.51, -28.35, 4.08)
pt3dadd(193.15, 405.71, -28.35, 4.08)
pt3dadd(192.79, 405.91, -28.35, 4.08)
pt3dadd(192.61, 406.11, -28.35, 4.08)
pt3dadd(192.43, 406.32, -28.35, 4.08)
pt3dadd(192.26, 406.52, -28.35, 4.08)
pt3dadd(192.08, 406.72, -28.35, 4.08)
pt3dadd(191.9, 407.13, -28.35, 4.08)
pt3dadd(191.54, 407.33, -28.35, 4.08)
pt3dadd(191.36, 407.53, -28.35, 4.08)
pt3dadd(191.19, 407.94, -28.35, 4.08)
pt3dadd(190.83, 408.14, -28.35, 4.08)
pt3dadd(190.65, 408.34, -28.35, 4.08)
pt3dadd(190.47, 408.75, -28.35, 4.08)
pt3dadd(190.12, 408.75, -28.35, 4.08)
pt3dadd(189.94, 408.95, -28.35, 4.08)
pt3dadd(189.76, 409.15, -28.35, 4.08)
pt3dadd(189.58, 409.36, -28.35, 4.08)
}
}
proc shape3d_66() {
dend[45] { pt3dadd(189.22, 409.56, -28.35, 4.08)
pt3dadd(189.05, 409.76, -28.35, 4.08)
pt3dadd(188.87, 409.96, -28.35, 4.08)
pt3dadd(188.51, 409.96, -28.35, 4.08)
pt3dadd(188.33, 410.17, -28.35, 4.08)
pt3dadd(187.98, 410.57, -28.35, 4.08)
pt3dadd(187.8, 410.77, -28.35, 4.08)
pt3dadd(187.44, 410.98, -28.35, 4.08)
pt3dadd(187.26, 411.18, -28.35, 4.08)
pt3dadd(187.08, 411.38, -28.35, 4.08)
pt3dadd(186.73, 411.79, -28.35, 4.08)
pt3dadd(186.55, 411.99, -28.35, 4.08)
pt3dadd(186.37, 412.19, -28.35, 4.08)
pt3dadd(186.19, 412.39, -28.35, 4.08)
pt3dadd(186.01, 412.6, -28.35, 4.08)
pt3dadd(185.84, 412.8, -28.35, 4.08)
pt3dadd(185.66, 413, -28.35, 4.08)
pt3dadd(185.48, 413.2, -28.35, 4.08)
pt3dadd(185.3, 413.41, -28.35, 4.08)
pt3dadd(185.3, 413.81, -28.35, 4.08)
pt3dadd(185.12, 414.01, -28.35, 4.08)
pt3dadd(184.77, 414.22, -28.35, 4.08)
pt3dadd(184.77, 414.62, -28.35, 4.08)
pt3dadd(184.59, 414.82, -28.35, 4.08)
pt3dadd(184.41, 415.03, -28.35, 4.08)
pt3dadd(184.23, 415.23, -28.35, 4.08)
pt3dadd(184.05, 415.43, -28.35, 4.08)
pt3dadd(184.05, 416.04, -28.35, 4.08)
pt3dadd(183.87, 416.24, -28.35, 4.08)
pt3dadd(183.87, 426.77, -28.35, 4.08)
pt3dadd(183.7, 426.98, -28.35, 4.08)
pt3dadd(183.7, 427.58, -28.35, 4.08)
pt3dadd(183.52, 427.79, -28.35, 4.08)
pt3dadd(183.34, 428.19, -28.35, 4.08)
pt3dadd(182.98, 428.8, -28.35, 4.08)
pt3dadd(182.8, 429, -28.35, 4.08)
pt3dadd(182.63, 429.61, -28.35, 4.08)
pt3dadd(182.45, 430.02, -28.35, 4.08)
pt3dadd(182.27, 430.22, -28.35, 4.08)
pt3dadd(182.09, 430.42, -28.35, 4.08)
pt3dadd(182.09, 430.83, -28.35, 4.08)
pt3dadd(181.91, 431.23, -28.35, 4.08)
pt3dadd(181.73, 431.43, -28.35, 4.08)
pt3dadd(181.56, 431.84, -28.35, 4.08)
pt3dadd(181.38, 432.04, -28.35, 4.08)
pt3dadd(181.2, 432.45, -28.35, 4.08)
pt3dadd(181.02, 432.65, -28.35, 4.08)
pt3dadd(180.84, 432.85, -28.35, 4.08)
pt3dadd(180.66, 433.26, -28.35, 4.08)
pt3dadd(180.31, 433.66, -28.35, 4.08)
pt3dadd(180.31, 434.07, -28.35, 4.08)
pt3dadd(180.13, 434.27, -28.35, 4.08)
pt3dadd(179.95, 434.47, -28.35, 4.08)
pt3dadd(179.95, 434.88, -28.35, 4.08)
pt3dadd(179.77, 435.08, -28.35, 4.08)
pt3dadd(179.59, 435.48, -28.35, 4.08)
pt3dadd(179.42, 435.69, -28.35, 4.08)
pt3dadd(179.24, 435.89, -28.35, 4.08)
pt3dadd(179.24, 436.29, -28.35, 4.08)
pt3dadd(179.06, 436.5, -28.35, 4.08)
pt3dadd(178.88, 436.9, -28.35, 4.08)
pt3dadd(178.7, 437.1, -28.35, 4.08)
pt3dadd(178.7, 437.71, -28.35, 4.08)
pt3dadd(178.52, 437.91, -28.35, 4.08)
pt3dadd(178.35, 438.12, -28.35, 4.08)
pt3dadd(178.35, 438.52, -28.35, 4.08)
pt3dadd(178.17, 438.93, -28.35, 4.08)
pt3dadd(178.7, 438.93, -27.3, 3.91)
pt3dadd(174.6, 448.24, -27.3, 3.91)
pt3dadd(174.78, 447.84, -27.3, 3.91)
pt3dadd(174.6, 448.04, -27.3, 3.91)
pt3dadd(173.89, 448.85, -27.3, 3.91)
pt3dadd(173.71, 449.26, -27.3, 3.91)
pt3dadd(173.71, 449.66, -27.3, 3.91)
pt3dadd(173.35, 449.86, -27.3, 3.91)
pt3dadd(173.35, 450.27, -27.3, 3.91)
pt3dadd(173, 450.47, -27.3, 3.91)
pt3dadd(172.82, 450.68, -27.3, 3.91)
pt3dadd(172.64, 451.08, -27.3, 3.91)
pt3dadd(172.28, 451.28, -27.3, 3.91)
pt3dadd(172.1, 451.69, -27.3, 3.91)
pt3dadd(171.93, 452.09, -27.3, 3.91)
pt3dadd(171.57, 452.3, -27.3, 3.91)
pt3dadd(171.21, 452.7, -27.3, 3.91)
pt3dadd(171.03, 452.9, -27.3, 3.91)
pt3dadd(170.68, 453.11, -27.3, 3.91)
pt3dadd(170.5, 453.51, -27.3, 3.91)
pt3dadd(170.32, 453.71, -27.3, 3.91)
pt3dadd(169.61, 454.52, -27.3, 3.91)
pt3dadd(169.25, 454.93, -27.3, 3.91)
pt3dadd(169.07, 455.13, -27.3, 3.91)
pt3dadd(168.72, 455.33, -27.3, 3.91)
pt3dadd(168.54, 455.54, -27.3, 3.91)
pt3dadd(168.18, 455.94, -27.3, 3.91)
pt3dadd(167.82, 456.35, -27.3, 3.91)
pt3dadd(167.47, 456.75, -27.3, 3.91)
pt3dadd(167.29, 457.16, -27.3, 3.91)
pt3dadd(166.93, 457.36, -27.3, 3.91)
pt3dadd(166.75, 457.56, -27.3, 3.91)
pt3dadd(166.58, 457.76, -27.3, 3.91)
pt3dadd(166.4, 458.17, -27.3, 3.91)
pt3dadd(166.04, 458.37, -27.3, 3.91)
pt3dadd(165.86, 458.57, -27.3, 3.91)
pt3dadd(165.68, 458.98, -27.3, 3.91)
pt3dadd(165.51, 459.18, -27.3, 3.91)
pt3dadd(165.33, 459.38, -27.3, 3.91)
pt3dadd(164.97, 459.59, -27.3, 3.91)
pt3dadd(164.79, 459.79, -27.3, 3.91)
pt3dadd(164.61, 459.99, -27.3, 3.91)
pt3dadd(164.44, 460.4, -27.3, 3.91)
pt3dadd(164.26, 460.6, -27.3, 3.91)
pt3dadd(164.08, 460.8, -27.3, 3.91)
pt3dadd(163.72, 461.01, -27.3, 3.91)
pt3dadd(163.54, 461.41, -27.3, 3.91)
pt3dadd(163.37, 461.61, -27.3, 3.91)
pt3dadd(163.01, 461.82, -27.3, 3.91)
pt3dadd(162.83, 462.02, -27.3, 3.91)
pt3dadd(162.65, 462.22, -27.3, 3.91)
pt3dadd(162.47, 462.42, -27.3, 3.91)
pt3dadd(161.76, 463.23, -27.3, 3.91)
pt3dadd(161.58, 463.44, -27.3, 3.91)
pt3dadd(161.4, 463.64, -27.3, 3.91)
pt3dadd(161.23, 463.84, -27.3, 3.91)
pt3dadd(160.87, 464.04, -27.3, 3.91)
pt3dadd(160.51, 464.25, -27.3, 3.91)
pt3dadd(160.33, 464.45, -27.3, 3.91)
pt3dadd(159.98, 464.65, -27.3, 3.91)
pt3dadd(159.62, 464.85, -27.3, 3.91)
pt3dadd(159.44, 465.06, -27.3, 3.91)
pt3dadd(159.09, 465.06, -27.3, 3.91)
pt3dadd(158.73, 465.46, -27.3, 3.91)
pt3dadd(158.37, 465.46, -27.3, 3.91)
pt3dadd(158.19, 465.66, -27.3, 3.91)
pt3dadd(157.84, 465.87, -27.3, 3.91)
pt3dadd(157.3, 465.87, -27.3, 3.91)
pt3dadd(157.12, 466.07, -27.3, 3.91)
pt3dadd(156.95, 466.27, -27.3, 3.91)
pt3dadd(156.41, 466.47, -27.3, 3.91)
pt3dadd(156.05, 466.47, -27.3, 3.91)
pt3dadd(155.88, 466.68, -27.3, 3.91)
pt3dadd(155.52, 466.88, -27.3, 3.91)
pt3dadd(155.16, 467.08, -27.3, 3.91)
pt3dadd(154.63, 467.28, -27.3, 3.91)
pt3dadd(154.45, 467.49, -27.3, 3.91)
pt3dadd(154.27, 467.69, -27.3, 3.91)
pt3dadd(154.09, 467.89, -27.3, 3.91)
pt3dadd(153.74, 468.09, -27.3, 3.91)
pt3dadd(153.56, 468.3, -27.3, 3.91)
pt3dadd(153.38, 468.5, -27.3, 3.91)
pt3dadd(153.2, 468.7, -27.3, 3.91)
pt3dadd(152.84, 468.9, -27.3, 3.91)
pt3dadd(152.67, 469.11, -27.3, 3.91)
pt3dadd(152.49, 469.51, -27.3, 3.91)
pt3dadd(152.31, 469.71, -27.3, 3.91)
pt3dadd(152.13, 469.92, -27.3, 3.91)
pt3dadd(151.77, 470.12, -27.3, 3.91)
pt3dadd(151.6, 470.32, -27.3, 3.91)
pt3dadd(151.42, 470.73, -27.3, 3.91)
pt3dadd(151.06, 470.93, -27.3, 3.91)
pt3dadd(150.88, 471.13, -27.3, 3.91)
pt3dadd(150.7, 471.54, -27.3, 3.91)
pt3dadd(150.17, 472.15, -27.3, 3.91)
pt3dadd(149.99, 472.35, -27.3, 3.91)
pt3dadd(149.46, 472.96, -27.3, 3.91)
pt3dadd(149.28, 473.16, -27.3, 3.91)
pt3dadd(149.1, 473.56, -27.3, 3.91)
pt3dadd(148.92, 473.77, -27.3, 3.91)
pt3dadd(148.56, 473.77, -27.3, 3.91)
pt3dadd(148.39, 473.97, -27.3, 3.91)
pt3dadd(148.21, 474.17, -27.3, 3.91)
pt3dadd(148.03, 474.58, -27.3, 3.91)
pt3dadd(147.67, 474.78, -27.3, 3.91)
pt3dadd(147.49, 475.18, -27.3, 3.91)
pt3dadd(147.14, 475.39, -27.3, 3.91)
pt3dadd(146.78, 475.59, -27.3, 3.91)
pt3dadd(146.43, 475.79, -27.3, 3.91)
pt3dadd(146.25, 475.99, -27.3, 3.91)
pt3dadd(146.07, 476.2, -27.3, 3.91)
pt3dadd(145.71, 476.2, -27.3, 3.91)
pt3dadd(145.53, 476.4, -27.3, 3.91)
pt3dadd(146.6, 476.2, -26.25, 3.91)
pt3dadd(146.25, 476.6, -26.25, 3.91)
pt3dadd(145.89, 476.8, -26.25, 3.91)
pt3dadd(145.71, 477.41, -26.25, 3.91)
pt3dadd(145.18, 478.02, -26.25, 3.91)
pt3dadd(145, 478.42, -26.25, 3.91)
pt3dadd(144.64, 478.83, -26.25, 3.91)
pt3dadd(144.46, 479.03, -26.25, 3.91)
pt3dadd(143.93, 479.64, -26.25, 3.91)
pt3dadd(143.75, 479.84, -26.25, 3.91)
pt3dadd(143.57, 480.25, -26.25, 3.91)
pt3dadd(143.39, 480.45, -26.25, 3.91)
pt3dadd(143.22, 480.65, -26.25, 3.91)
pt3dadd(143.04, 480.85, -26.25, 3.91)
pt3dadd(143.04, 481.26, -26.25, 3.91)
pt3dadd(142.86, 481.46, -26.25, 3.91)
pt3dadd(142.68, 481.66, -26.25, 3.91)
pt3dadd(142.5, 482.07, -26.25, 3.91)
pt3dadd(142.32, 482.47, -26.25, 3.91)
pt3dadd(142.15, 482.88, -26.25, 3.91)
}
}
proc shape3d_67() {
dend[45] { pt3dadd(141.97, 483.29, -26.25, 3.91)
pt3dadd(141.97, 483.69, -26.25, 3.91)
pt3dadd(141.79, 484.3, -26.25, 3.91)
pt3dadd(141.61, 484.5, -26.25, 3.91)
pt3dadd(141.61, 485.31, -26.25, 3.91)
pt3dadd(141.43, 485.51, -26.25, 3.91)
pt3dadd(141.43, 485.72, -26.25, 3.91)
pt3dadd(141.79, 484.91, -26.25, 3.57)
pt3dadd(141.79, 485.31, -26.25, 3.57)
pt3dadd(141.61, 485.51, -26.25, 3.57)
pt3dadd(141.25, 485.92, -26.25, 3.57)
pt3dadd(141.25, 486.32, -26.25, 3.57)
pt3dadd(140.9, 486.73, -26.25, 3.57)
pt3dadd(140.72, 487.13, -26.25, 3.57)
pt3dadd(140.54, 487.54, -26.25, 3.57)
pt3dadd(140.18, 487.74, -26.25, 3.57)
pt3dadd(140.01, 487.94, -26.25, 3.57)
pt3dadd(139.83, 488.15, -26.25, 3.57)
pt3dadd(139.83, 488.55, -26.25, 3.57)
pt3dadd(139.47, 488.55, -26.25, 3.57)
pt3dadd(139.29, 488.96, -26.25, 3.57)
pt3dadd(139.11, 489.16, -26.25, 3.57)
pt3dadd(138.94, 489.36, -26.25, 3.57)
pt3dadd(138.58, 489.56, -26.25, 3.57)
pt3dadd(138.4, 489.97, -26.25, 3.57)
pt3dadd(138.22, 490.17, -26.25, 3.57)
pt3dadd(138.04, 490.37, -26.25, 3.57)
pt3dadd(137.69, 490.78, -26.25, 3.57)
pt3dadd(137.51, 490.98, -26.25, 3.57)
pt3dadd(137.33, 491.39, -26.25, 3.57)
pt3dadd(136.97, 491.59, -26.25, 3.57)
pt3dadd(136.8, 491.79, -26.25, 3.57)
pt3dadd(136.62, 492.2, -26.25, 3.57)
pt3dadd(136.44, 492.4, -26.25, 3.57)
pt3dadd(136.08, 492.8, -26.25, 3.57)
pt3dadd(135.9, 493.21, -26.25, 3.57)
pt3dadd(135.73, 493.41, -26.25, 3.57)
pt3dadd(135.19, 493.82, -26.25, 3.57)
pt3dadd(134.3, 494.83, -26.25, 3.57)
pt3dadd(133.94, 495.03, -26.25, 3.57)
pt3dadd(133.76, 495.44, -26.25, 3.57)
pt3dadd(133.59, 495.84, -26.25, 3.57)
pt3dadd(133.23, 496.45, -26.25, 3.57)
pt3dadd(132.87, 496.86, -26.25, 3.57)
pt3dadd(132.52, 497.26, -26.25, 3.57)
pt3dadd(132.16, 497.67, -26.25, 3.57)
pt3dadd(131.98, 497.87, -26.25, 3.57)
pt3dadd(131.8, 498.27, -26.25, 3.57)
pt3dadd(131.62, 498.68, -26.25, 3.57)
pt3dadd(131.27, 499.08, -26.25, 3.57)
pt3dadd(131.09, 499.49, -26.25, 3.57)
pt3dadd(130.91, 499.69, -26.25, 3.57)
pt3dadd(130.55, 499.89, -26.25, 3.57)
pt3dadd(130.38, 500.3, -26.25, 3.57)
pt3dadd(130.02, 500.5, -26.25, 3.57)
pt3dadd(129.84, 500.91, -26.25, 3.57)
pt3dadd(129.66, 501.31, -26.25, 3.57)
pt3dadd(129.13, 501.72, -26.25, 3.57)
pt3dadd(128.95, 502.12, -26.25, 3.57)
pt3dadd(128.77, 502.53, -26.25, 3.57)
pt3dadd(128.41, 502.73, -26.25, 3.57)
pt3dadd(128.24, 503.13, -26.25, 3.57)
pt3dadd(127.88, 503.54, -26.25, 3.57)
pt3dadd(127.52, 503.74, -26.25, 3.57)
pt3dadd(127.17, 504.35, -26.25, 3.57)
pt3dadd(126.81, 504.96, -26.25, 3.57)
pt3dadd(126.45, 505.16, -26.25, 3.57)
pt3dadd(126.27, 505.57, -26.25, 3.57)
pt3dadd(125.92, 505.77, -26.25, 3.57)
pt3dadd(125.74, 505.97, -26.25, 3.57)
pt3dadd(125.56, 506.38, -26.25, 3.57)
pt3dadd(125.2, 506.58, -26.25, 3.57)
pt3dadd(125.03, 506.98, -26.25, 3.57)
pt3dadd(124.67, 507.19, -26.25, 3.57)
pt3dadd(124.49, 507.59, -26.25, 3.57)
pt3dadd(124.13, 508, -26.25, 3.57)
pt3dadd(123.78, 508.4, -26.25, 3.57)
pt3dadd(123.78, 508.81, -26.25, 3.57)
pt3dadd(123.42, 509.01, -26.25, 3.57)
pt3dadd(123.24, 509.41, -26.25, 3.57)
pt3dadd(122.89, 509.62, -26.25, 3.57)
pt3dadd(122.71, 510.02, -26.25, 3.57)
pt3dadd(122.53, 510.22, -26.25, 3.57)
pt3dadd(122.35, 510.63, -26.25, 3.57)
pt3dadd(122.17, 510.83, -26.25, 3.57)
pt3dadd(121.99, 511.03, -26.25, 3.57)
pt3dadd(121.64, 511.44, -26.25, 3.57)
pt3dadd(121.46, 511.64, -26.25, 3.57)
pt3dadd(121.28, 512.05, -26.25, 3.57)
pt3dadd(120.75, 512.65, -26.25, 3.57)
pt3dadd(120.57, 513.06, -26.25, 3.57)
pt3dadd(120.21, 513.46, -26.25, 3.57)
pt3dadd(120.03, 513.67, -26.25, 3.57)
pt3dadd(119.85, 513.87, -26.25, 3.57)
pt3dadd(119.68, 514.27, -26.25, 3.57)
pt3dadd(119.5, 514.68, -26.25, 3.57)
pt3dadd(119.32, 514.88, -26.25, 3.57)
pt3dadd(119.14, 515.08, -26.25, 3.57)
pt3dadd(119.14, 515.49, -26.25, 3.57)
pt3dadd(118.96, 515.69, -26.25, 3.57)
pt3dadd(118.78, 515.9, -26.25, 3.57)
pt3dadd(118.78, 516.5, -26.25, 3.57)
pt3dadd(118.61, 516.91, -26.25, 3.57)
pt3dadd(118.43, 517.11, -26.25, 3.57)
pt3dadd(118.43, 517.92, -26.25, 3.57)
pt3dadd(118.25, 518.12, -26.25, 3.57)
pt3dadd(118.25, 518.53, -26.25, 3.57)
pt3dadd(118.07, 518.73, -26.25, 3.57)
pt3dadd(117.89, 518.93, -26.25, 3.57)
pt3dadd(117.89, 519.34, -26.25, 3.57)
pt3dadd(117.71, 519.74, -26.25, 3.57)
pt3dadd(117.54, 519.95, -26.25, 3.57)
pt3dadd(117.54, 520.35, -26.25, 3.57)
pt3dadd(117.36, 520.55, -26.25, 3.57)
pt3dadd(117.18, 520.76, -26.25, 3.57)
pt3dadd(117.18, 521.16, -26.25, 3.57)
pt3dadd(117, 521.36, -26.25, 3.57)
pt3dadd(117, 521.57, -26.25, 3.57)
pt3dadd(117.36, 521.57, -25.2, 3.57)
pt3dadd(117.18, 521.77, -25.2, 3.57)
pt3dadd(117, 521.97, -25.2, 3.57)
pt3dadd(116.82, 522.38, -25.2, 3.57)
pt3dadd(116.64, 522.58, -25.2, 3.57)
pt3dadd(115.75, 523.59, -25.2, 3.57)
pt3dadd(115.4, 524.2, -25.2, 3.57)
pt3dadd(115.04, 524.4, -25.2, 3.57)
pt3dadd(114.86, 524.6, -25.2, 3.57)
pt3dadd(114.68, 525.01, -25.2, 3.57)
pt3dadd(114.5, 525.21, -25.2, 3.57)
pt3dadd(114.33, 525.41, -25.2, 3.57)
pt3dadd(113.97, 525.62, -25.2, 3.57)
pt3dadd(113.79, 525.82, -25.2, 3.57)
pt3dadd(113.61, 526.02, -25.2, 3.57)
pt3dadd(113.26, 526.22, -25.2, 3.57)
pt3dadd(112.9, 526.43, -25.2, 3.57)
pt3dadd(112.72, 526.83, -25.2, 3.57)
pt3dadd(112.36, 527.04, -25.2, 3.57)
pt3dadd(112.19, 527.24, -25.2, 3.57)
pt3dadd(112.01, 527.44, -25.2, 3.57)
pt3dadd(111.47, 528.05, -25.2, 3.57)
pt3dadd(111.12, 528.25, -25.2, 3.57)
pt3dadd(110.94, 528.45, -25.2, 3.57)
pt3dadd(110.76, 528.86, -25.2, 3.57)
pt3dadd(110.58, 529.06, -25.2, 3.57)
pt3dadd(110.4, 529.26, -25.2, 3.57)
pt3dadd(110.05, 529.47, -25.2, 3.57)
pt3dadd(109.87, 529.87, -25.2, 3.57)
pt3dadd(109.69, 530.07, -25.2, 3.57)
pt3dadd(109.51, 530.28, -25.2, 3.57)
pt3dadd(109.33, 530.68, -25.2, 3.57)
pt3dadd(109.15, 530.88, -25.2, 3.57)
pt3dadd(108.98, 531.09, -25.2, 3.57)
pt3dadd(108.8, 531.29, -25.2, 3.57)
pt3dadd(108.62, 531.49, -25.2, 3.57)
pt3dadd(108.44, 531.69, -25.2, 3.57)
pt3dadd(108.26, 531.9, -25.2, 3.57)
pt3dadd(108.08, 532.3, -25.2, 3.57)
pt3dadd(107.91, 532.5, -25.2, 3.57)
pt3dadd(107.73, 532.71, -25.2, 3.57)
pt3dadd(107.55, 533.11, -25.2, 3.57)
pt3dadd(107.37, 533.31, -25.2, 3.57)
pt3dadd(107.19, 533.72, -25.2, 3.57)
pt3dadd(107.01, 534.12, -25.2, 3.57)
pt3dadd(106.84, 534.33, -25.2, 3.57)
pt3dadd(106.66, 534.73, -25.2, 3.57)
pt3dadd(106.48, 535.14, -25.2, 3.57)
pt3dadd(106.3, 535.54, -25.2, 3.57)
pt3dadd(106.12, 535.95, -25.2, 3.57)
pt3dadd(105.94, 536.15, -25.2, 3.57)
pt3dadd(105.77, 536.76, -25.2, 3.57)
pt3dadd(105.77, 537.36, -25.2, 3.57)
pt3dadd(105.59, 537.57, -25.2, 3.57)
pt3dadd(105.59, 537.97, -25.2, 3.57)
pt3dadd(105.41, 538.18, -25.2, 3.57)
pt3dadd(105.23, 538.38, -25.2, 3.57)
pt3dadd(105.23, 538.99, -25.2, 3.57)
pt3dadd(105.05, 539.19, -25.2, 3.57)
pt3dadd(104.87, 539.59, -25.2, 3.57)
pt3dadd(104.7, 539.8, -25.2, 3.57)
pt3dadd(104.7, 540.2, -25.2, 3.57)
pt3dadd(104.52, 540.4, -25.2, 3.57)
pt3dadd(104.34, 540.61, -25.2, 3.57)
pt3dadd(104.34, 541.01, -25.2, 3.57)
pt3dadd(104.16, 541.21, -25.2, 3.57)
pt3dadd(103.98, 541.42, -25.2, 3.57)
pt3dadd(103.8, 541.82, -25.2, 3.57)
pt3dadd(103.63, 542.02, -25.2, 3.57)
pt3dadd(103.45, 542.23, -25.2, 3.57)
pt3dadd(103.27, 542.43, -25.2, 3.57)
pt3dadd(103.09, 542.63, -25.2, 3.57)
pt3dadd(103.09, 543.04, -25.2, 3.57)
pt3dadd(102.91, 543.24, -25.2, 3.57)
pt3dadd(102.73, 543.44, -25.2, 3.57)
pt3dadd(102.38, 543.64, -25.2, 3.57)
pt3dadd(102.2, 543.85, -25.2, 3.57)
pt3dadd(102.02, 544.05, -25.2, 3.57)
pt3dadd(101.66, 544.25, -25.2, 3.57)
pt3dadd(101.49, 544.45, -25.2, 3.57)
pt3dadd(100.95, 544.66, -25.2, 3.57)
pt3dadd(100.59, 544.86, -25.2, 3.57)
}
}
proc shape3d_68() {
dend[45] { pt3dadd(100.24, 545.26, -25.2, 3.57)
pt3dadd(99.52, 545.26, -25.2, 3.57)
pt3dadd(99.17, 545.47, -25.2, 3.57)
pt3dadd(98.81, 545.67, -25.2, 3.57)
pt3dadd(98.28, 545.87, -25.2, 3.57)
pt3dadd(97.92, 546.07, -25.2, 3.57)
pt3dadd(97.38, 546.07, -25.2, 3.57)
pt3dadd(97.03, 546.28, -25.2, 3.57)
pt3dadd(96.67, 546.48, -25.2, 3.57)
pt3dadd(96.31, 546.68, -25.2, 3.57)
pt3dadd(95.96, 546.88, -25.2, 3.57)
pt3dadd(95.6, 547.09, -25.2, 3.57)
pt3dadd(95.24, 547.29, -25.2, 3.57)
pt3dadd(94.89, 547.29, -25.2, 3.57)
pt3dadd(94.53, 547.49, -25.2, 3.57)
pt3dadd(94.17, 547.69, -25.2, 3.57)
pt3dadd(94, 547.9, -25.2, 3.57)
pt3dadd(93.64, 548.1, -25.2, 3.57)
pt3dadd(93.46, 548.5, -25.2, 3.57)
pt3dadd(93.1, 548.71, -25.2, 3.57)
pt3dadd(92.57, 549.11, -25.2, 3.57)
pt3dadd(92.39, 549.32, -25.2, 3.57)
pt3dadd(92.21, 549.52, -25.2, 3.57)
pt3dadd(92.03, 549.72, -25.2, 3.57)
pt3dadd(91.68, 550.13, -25.2, 3.57)
pt3dadd(91.5, 550.33, -25.2, 3.57)
pt3dadd(91.32, 550.53, -25.2, 3.57)
pt3dadd(91.14, 550.73, -25.2, 3.57)
pt3dadd(90.96, 551.14, -25.2, 3.57)
pt3dadd(90.61, 551.34, -25.2, 3.57)
pt3dadd(90.07, 551.95, -25.2, 3.57)
pt3dadd(89.89, 552.15, -25.2, 3.57)
pt3dadd(89.36, 552.76, -25.2, 3.57)
pt3dadd(89.18, 552.96, -25.2, 3.57)
pt3dadd(88.65, 553.57, -25.2, 3.57)
pt3dadd(88.29, 553.77, -25.2, 3.57)
pt3dadd(88.11, 553.97, -25.2, 3.57)
pt3dadd(87.93, 554.38, -25.2, 3.57)
pt3dadd(87.75, 554.58, -25.2, 3.57)
pt3dadd(87.58, 554.78, -25.2, 3.57)
pt3dadd(87.22, 554.78, -25.2, 3.57)
pt3dadd(87.04, 555.19, -25.2, 3.57)
pt3dadd(86.86, 555.39, -25.2, 3.57)
pt3dadd(86.68, 555.59, -25.2, 3.57)
pt3dadd(86.51, 555.8, -25.2, 3.57)
pt3dadd(86.15, 556, -25.2, 3.57)
pt3dadd(85.97, 556.2, -25.2, 3.57)
pt3dadd(85.61, 556.4, -25.2, 3.57)
pt3dadd(85.08, 557.01, -25.2, 3.57)
pt3dadd(84.9, 557.21, -25.2, 3.57)
pt3dadd(84.37, 557.42, -25.2, 3.57)
pt3dadd(84.19, 557.62, -25.2, 3.57)
pt3dadd(83.83, 557.82, -25.2, 3.57)
pt3dadd(83.47, 558.02, -25.2, 3.57)
pt3dadd(83.12, 558.23, -25.2, 3.57)
pt3dadd(82.94, 558.63, -25.2, 3.57)
pt3dadd(82.58, 558.83, -25.2, 3.57)
pt3dadd(82.23, 559.04, -25.2, 3.57)
pt3dadd(81.87, 559.04, -25.2, 3.57)
pt3dadd(81.51, 559.44, -25.2, 3.57)
pt3dadd(80.98, 559.85, -25.2, 3.57)
pt3dadd(80.62, 559.85, -25.2, 3.57)
pt3dadd(80.27, 560.25, -25.2, 3.57)
pt3dadd(80.09, 560.46, -25.2, 3.57)
pt3dadd(79.91, 560.66, -25.2, 3.57)
pt3dadd(79.55, 560.86, -25.2, 3.57)
pt3dadd(79.37, 561.06, -25.2, 3.57)
pt3dadd(79.2, 561.27, -25.2, 3.57)
pt3dadd(79.02, 561.47, -25.2, 3.57)
pt3dadd(78.66, 561.67, -25.2, 3.57)
pt3dadd(78.48, 562.08, -25.2, 3.57)
pt3dadd(78.13, 562.08, -25.2, 3.57)
pt3dadd(77.95, 562.28, -25.2, 3.57)
pt3dadd(77.77, 562.48, -25.2, 3.57)
pt3dadd(77.41, 562.68, -25.2, 3.57)
pt3dadd(77.23, 562.89, -25.2, 3.57)
pt3dadd(77.06, 563.09, -25.2, 3.57)
pt3dadd(76.7, 563.49, -25.2, 3.57)
pt3dadd(76.52, 563.7, -25.2, 3.57)
pt3dadd(76.34, 563.9, -25.2, 3.57)
pt3dadd(75.99, 564.1, -25.2, 3.57)
pt3dadd(75.81, 564.3, -25.2, 3.57)
pt3dadd(75.81, 563.49, -30.45, 3.57)
pt3dadd(75.27, 563.49, -30.45, 3.57)
pt3dadd(75.09, 563.7, -30.45, 3.57)
pt3dadd(74.74, 563.7, -30.45, 3.57)
pt3dadd(74.56, 563.9, -30.45, 3.57)
pt3dadd(74.2, 564.1, -30.45, 3.57)
pt3dadd(74.02, 564.3, -30.45, 3.57)
pt3dadd(73.49, 564.3, -30.45, 3.57)
pt3dadd(73.31, 564.51, -30.45, 3.57)
pt3dadd(73.13, 564.71, -30.45, 3.57)
pt3dadd(72.6, 564.71, -30.45, 3.57)
pt3dadd(72.24, 565.11, -30.45, 3.57)
pt3dadd(72.06, 565.32, -30.45, 3.57)
pt3dadd(71.53, 565.52, -30.45, 3.57)
pt3dadd(71.17, 565.72, -30.45, 3.57)
pt3dadd(70.99, 565.92, -30.45, 3.57)
pt3dadd(70.81, 566.13, -30.45, 3.57)
pt3dadd(70.64, 566.33, -30.45, 3.57)
pt3dadd(70.46, 566.73, -30.45, 3.57)
pt3dadd(70.28, 566.94, -30.45, 3.57)
pt3dadd(69.92, 567.14, -30.45, 3.57)
pt3dadd(69.74, 567.34, -30.45, 3.57)
pt3dadd(69.57, 567.54, -30.45, 3.57)
pt3dadd(69.39, 567.95, -30.45, 3.57)
pt3dadd(69.21, 568.15, -30.45, 3.57)
pt3dadd(68.85, 568.56, -30.45, 3.57)
pt3dadd(68.5, 568.96, -30.45, 3.57)
pt3dadd(68.32, 569.37, -30.45, 3.57)
pt3dadd(67.96, 569.57, -30.45, 3.57)
pt3dadd(67.43, 570.18, -30.45, 3.57)
pt3dadd(67.07, 570.58, -30.45, 3.57)
pt3dadd(66.71, 570.79, -30.45, 3.57)
pt3dadd(66.53, 571.19, -30.45, 3.57)
pt3dadd(66.36, 571.39, -30.45, 3.57)
pt3dadd(66, 571.8, -30.45, 3.57)
pt3dadd(65.82, 572, -30.45, 3.57)
pt3dadd(65.64, 572.41, -30.45, 3.57)
pt3dadd(65.29, 572.41, -30.45, 3.57)
pt3dadd(65.11, 572.81, -30.45, 3.57)
pt3dadd(64.93, 573.22, -30.45, 3.57)
pt3dadd(64.75, 573.42, -30.45, 3.57)
pt3dadd(64.57, 573.82, -30.45, 3.57)
pt3dadd(64.39, 574.03, -30.45, 3.57)
pt3dadd(64.04, 574.23, -30.45, 3.57)
pt3dadd(63.86, 574.43, -30.45, 3.57)
pt3dadd(63.68, 574.63, -30.45, 3.57)
pt3dadd(63.32, 574.84, -30.45, 3.57)
pt3dadd(63.15, 575.04, -30.45, 3.57)
pt3dadd(62.79, 575.24, -30.45, 3.57)
pt3dadd(55.48, 575.24, -30.45, 3.57)
pt3dadd(56.37, 574.84, -33.6, 3.57)
pt3dadd(56.19, 575.04, -33.6, 3.57)
pt3dadd(55.83, 575.44, -33.6, 3.57)
pt3dadd(55.48, 575.85, -33.6, 3.57)
pt3dadd(55.3, 576.25, -33.6, 3.57)
pt3dadd(55.12, 576.46, -33.6, 3.57)
pt3dadd(55.12, 577.06, -33.6, 3.57)
pt3dadd(54.94, 577.47, -33.6, 3.57)
pt3dadd(54.76, 577.87, -33.6, 3.57)
pt3dadd(54.59, 578.28, -33.6, 3.57)
pt3dadd(54.59, 578.89, -33.6, 3.57)
pt3dadd(54.41, 579.29, -33.6, 3.57)
pt3dadd(54.41, 579.7, -33.6, 3.57)
pt3dadd(54.23, 579.9, -33.6, 3.57)
pt3dadd(54.23, 580.3, -33.6, 3.57)
pt3dadd(54.05, 580.51, -33.6, 3.57)
pt3dadd(53.87, 580.91, -33.6, 3.57)
pt3dadd(53.69, 581.11, -33.6, 3.57)
pt3dadd(53.52, 581.52, -33.6, 3.57)
pt3dadd(53.34, 581.72, -33.6, 3.57)
pt3dadd(53.16, 582.13, -33.6, 3.57)
pt3dadd(52.98, 582.53, -33.6, 3.57)
pt3dadd(52.8, 582.94, -33.6, 3.57)
pt3dadd(52.62, 583.55, -33.6, 3.57)
pt3dadd(52.45, 583.95, -33.6, 3.57)
pt3dadd(52.09, 584.15, -33.6, 3.57)
pt3dadd(52.09, 584.56, -33.6, 3.57)
pt3dadd(51.91, 584.76, -33.6, 3.57)
pt3dadd(51.73, 584.96, -33.6, 3.57)
pt3dadd(51.73, 585.37, -33.6, 3.57)
pt3dadd(51.55, 585.57, -33.6, 3.57)
pt3dadd(51.38, 585.77, -33.6, 3.57)
pt3dadd(51.2, 586.18, -33.6, 3.57)
pt3dadd(50.84, 586.38, -33.6, 3.57)
pt3dadd(50.66, 586.79, -33.6, 3.57)
pt3dadd(50.31, 586.99, -33.6, 3.57)
pt3dadd(50.13, 587.19, -33.6, 3.57)
pt3dadd(49.95, 587.6, -33.6, 3.57)
pt3dadd(49.77, 587.8, -33.6, 3.57)
pt3dadd(49.59, 588, -33.6, 3.57)
pt3dadd(49.41, 588.2, -33.6, 3.57)
pt3dadd(49.24, 588.41, -33.6, 3.57)
pt3dadd(49.06, 588.61, -33.6, 3.57)
pt3dadd(48.88, 588.81, -33.6, 3.57)
pt3dadd(48.7, 589.01, -33.6, 3.57)
pt3dadd(48.52, 589.22, -33.6, 3.57)
pt3dadd(48.34, 589.42, -33.6, 3.57)
pt3dadd(48.17, 589.62, -33.6, 3.57)
pt3dadd(47.99, 589.82, -33.6, 3.57)
pt3dadd(47.81, 590.03, -33.6, 3.57)
pt3dadd(47.63, 590.43, -33.6, 3.57)
pt3dadd(47.27, 590.63, -33.6, 3.57)
pt3dadd(47.1, 590.84, -33.6, 3.57)
pt3dadd(46.92, 591.04, -33.6, 3.57)
pt3dadd(47.1, 590.43, -37.8, 3.57)
pt3dadd(46.92, 590.63, -37.8, 3.57)
pt3dadd(46.74, 591.04, -37.8, 3.57)
pt3dadd(46.56, 591.24, -37.8, 3.57)
pt3dadd(46.38, 591.44, -37.8, 3.57)
pt3dadd(46.03, 591.65, -37.8, 3.57)
pt3dadd(45.85, 591.85, -37.8, 3.57)
pt3dadd(45.67, 592.25, -37.8, 3.57)
pt3dadd(45.49, 592.46, -37.8, 3.57)
pt3dadd(45.31, 592.66, -37.8, 3.57)
pt3dadd(44.96, 592.86, -37.8, 3.57)
pt3dadd(44.78, 593.07, -37.8, 3.57)
pt3dadd(44.42, 593.07, -37.8, 3.57)
pt3dadd(44.24, 593.27, -37.8, 3.57)
}
}
proc shape3d_69() {
dend[45] { pt3dadd(44.06, 593.47, -37.8, 3.57)
pt3dadd(43.71, 593.47, -37.8, 3.57)
pt3dadd(43.53, 593.67, -37.8, 3.57)
pt3dadd(43.17, 593.88, -37.8, 3.57)
pt3dadd(42.82, 593.88, -37.8, 3.57)
pt3dadd(42.46, 594.08, -37.8, 3.57)
pt3dadd(41.75, 594.08, -37.8, 3.57)
pt3dadd(41.39, 594.28, -37.8, 3.57)
pt3dadd(33.54, 594.28, -37.8, 3.57)
pt3dadd(33.19, 594.48, -37.8, 3.57)
pt3dadd(32.12, 594.48, -37.8, 3.57)
pt3dadd(31.94, 594.69, -37.8, 3.57)
pt3dadd(31.05, 594.69, -37.8, 3.57)
pt3dadd(30.69, 594.89, -37.8, 3.57)
pt3dadd(29.98, 594.89, -37.8, 3.57)
pt3dadd(29.44, 595.09, -37.8, 3.57)
pt3dadd(28.91, 595.29, -37.8, 3.57)
pt3dadd(28.37, 595.29, -37.8, 3.57)
pt3dadd(28.19, 595.5, -37.8, 3.57)
pt3dadd(27.84, 595.7, -37.8, 3.57)
pt3dadd(27.66, 595.9, -37.8, 3.57)
pt3dadd(27.3, 595.9, -37.8, 3.57)
pt3dadd(27.12, 596.1, -37.8, 3.57)
pt3dadd(26.77, 596.31, -37.8, 3.57)
pt3dadd(26.23, 596.71, -37.8, 3.57)
pt3dadd(25.87, 597.12, -37.8, 3.57)
pt3dadd(25.52, 597.32, -37.8, 3.57)
pt3dadd(25.16, 597.52, -37.8, 3.57)
pt3dadd(24.8, 597.72, -37.8, 3.57)
pt3dadd(24.63, 597.93, -37.8, 3.57)
pt3dadd(24.27, 598.13, -37.8, 3.57)
pt3dadd(24.09, 598.53, -37.8, 3.57)
pt3dadd(23.73, 598.53, -37.8, 3.57)
pt3dadd(23.56, 598.94, -37.8, 3.57)
pt3dadd(23.2, 598.94, -37.8, 3.57)
pt3dadd(23.02, 599.34, -37.8, 3.57)
pt3dadd(22.66, 599.55, -37.8, 3.57)
pt3dadd(22.49, 599.75, -37.8, 3.57)
pt3dadd(22.31, 599.95, -37.8, 3.57)
pt3dadd(21.95, 600.15, -37.8, 3.57)
pt3dadd(21.77, 600.36, -37.8, 3.57)
pt3dadd(21.59, 600.56, -37.8, 3.57)
pt3dadd(21.24, 600.76, -37.8, 3.57)
pt3dadd(21.06, 600.96, -37.8, 3.57)
pt3dadd(20.7, 601.17, -37.8, 3.57)
pt3dadd(20.52, 601.37, -37.8, 3.57)
pt3dadd(20.35, 601.57, -37.8, 3.57)
pt3dadd(20.17, 601.77, -37.8, 3.57)
pt3dadd(19.81, 601.98, -37.8, 3.57)
pt3dadd(19.63, 602.18, -37.8, 3.57)
pt3dadd(19.45, 602.58, -37.8, 3.57)
pt3dadd(19.1, 602.79, -37.8, 3.57)
pt3dadd(18.92, 603.19, -37.8, 3.57)
pt3dadd(18.56, 603.4, -37.8, 3.57)
pt3dadd(18.38, 603.6, -37.8, 3.57)
pt3dadd(18.03, 603.8, -37.8, 3.57)
pt3dadd(17.85, 604.21, -37.8, 3.57)
pt3dadd(17.67, 604.41, -37.8, 3.57)
pt3dadd(17.31, 604.61, -37.8, 3.57)
pt3dadd(17.14, 605.02, -37.8, 3.57)
pt3dadd(16.78, 605.22, -37.8, 3.57)
pt3dadd(16.6, 605.83, -37.8, 3.57)
pt3dadd(16.24, 606.03, -37.8, 3.57)
pt3dadd(16.07, 606.43, -37.8, 3.57)
pt3dadd(15.89, 606.84, -37.8, 3.57)
pt3dadd(15.71, 607.24, -37.8, 3.57)
pt3dadd(15.53, 607.85, -37.8, 3.57)
pt3dadd(15.35, 608.05, -37.8, 3.57)
pt3dadd(15.35, 609.27, -37.8, 3.57)
pt3dadd(15.17, 609.67, -37.8, 3.57)
pt3dadd(15.17, 626.28, -37.8, 3.57)
pt3dadd(15, 626.49, -37.8, 3.57)
pt3dadd(14.82, 626.69, -37.8, 3.57)
pt3dadd(14.82, 627.09, -37.8, 3.57)
pt3dadd(14.64, 627.3, -37.8, 3.57)
pt3dadd(14.46, 627.5, -37.8, 3.57)
pt3dadd(14.28, 627.7, -37.8, 3.57)
pt3dadd(14.28, 628.11, -37.8, 3.57)
pt3dadd(14.1, 628.31, -37.8, 3.57)
pt3dadd(13.93, 628.51, -37.8, 3.57)
pt3dadd(13.75, 628.71, -37.8, 3.57)
pt3dadd(13.57, 628.92, -37.8, 3.57)
pt3dadd(13.39, 629.12, -37.8, 3.57)
pt3dadd(13.39, 629.52, -37.8, 3.57)
pt3dadd(13.21, 629.73, -37.8, 3.57)
pt3dadd(12.86, 629.93, -37.8, 3.57)
pt3dadd(12.68, 630.33, -37.8, 3.57)
pt3dadd(12.5, 630.54, -37.8, 3.57)
pt3dadd(12.32, 630.74, -37.8, 3.57)
pt3dadd(12.14, 630.94, -37.8, 3.57)
pt3dadd(11.97, 631.35, -37.8, 3.57)
pt3dadd(11.79, 631.55, -37.8, 3.57)
pt3dadd(11.61, 631.75, -37.8, 3.57)
pt3dadd(11.43, 632.16, -37.8, 3.57)
pt3dadd(11.25, 632.36, -37.8, 3.57)
pt3dadd(11.07, 632.56, -37.8, 3.57)
pt3dadd(10.9, 632.76, -37.8, 3.57)
pt3dadd(10.9, 633.17, -37.8, 3.57)
pt3dadd(10.72, 633.37, -37.8, 3.57)
pt3dadd(10.54, 633.57, -37.8, 3.57)
pt3dadd(11.07, 632.97, -38.85, 3.57)
pt3dadd(10.9, 633.37, -38.85, 3.57)
pt3dadd(10.72, 633.57, -38.85, 3.57)
pt3dadd(10.54, 633.98, -38.85, 3.57)
pt3dadd(10.36, 634.59, -38.85, 3.57)
pt3dadd(10, 635.19, -38.85, 3.57)
pt3dadd(10, 635.6, -38.85, 3.57)
pt3dadd(9.65, 636.41, -38.85, 3.57)
pt3dadd(9.47, 636.82, -38.85, 3.57)
pt3dadd(9.11, 637.63, -38.85, 3.57)
pt3dadd(8.93, 638.03, -38.85, 3.57)
pt3dadd(8.76, 638.23, -38.85, 3.57)
pt3dadd(8.58, 638.84, -38.85, 3.57)
pt3dadd(8.58, 639.65, -38.85, 3.57)
pt3dadd(8.4, 640.06, -38.85, 3.57)
pt3dadd(8.4, 640.87, -38.85, 3.57)
pt3dadd(8.22, 641.47, -38.85, 3.57)
pt3dadd(8.22, 641.88, -38.85, 3.57)
pt3dadd(8.04, 642.28, -38.85, 3.57)
pt3dadd(7.86, 642.69, -38.85, 3.57)
pt3dadd(7.86, 643.5, -38.85, 3.57)
pt3dadd(7.69, 643.9, -38.85, 3.57)
pt3dadd(7.51, 644.31, -38.85, 3.57)
pt3dadd(7.51, 645.12, -38.85, 3.57)
pt3dadd(7.33, 645.32, -38.85, 3.57)
pt3dadd(7.15, 645.73, -38.85, 3.57)
pt3dadd(7.15, 646.54, -38.85, 3.57)
pt3dadd(6.97, 647.14, -38.85, 3.57)
pt3dadd(6.79, 647.55, -38.85, 3.57)
pt3dadd(6.79, 648.16, -38.85, 3.57)
pt3dadd(6.62, 648.56, -38.85, 3.57)
pt3dadd(6.62, 649.37, -38.85, 3.57)
pt3dadd(6.44, 649.58, -38.85, 3.57)
pt3dadd(6.44, 650.18, -38.85, 3.57)
pt3dadd(6.26, 650.39, -38.85, 3.57)
pt3dadd(6.26, 650.99, -38.85, 3.57)
pt3dadd(6.08, 651.4, -38.85, 3.57)
pt3dadd(6.08, 651.8, -38.85, 3.57)
pt3dadd(5.9, 652.21, -38.85, 3.57)
pt3dadd(5.9, 652.61, -38.85, 3.57)
pt3dadd(5.72, 653.02, -38.85, 3.57)
pt3dadd(5.55, 653.42, -38.85, 3.57)
pt3dadd(5.37, 653.83, -38.85, 3.57)
pt3dadd(5.19, 654.44, -38.85, 3.57)
pt3dadd(5.01, 654.84, -38.85, 3.57)
pt3dadd(4.48, 655.85, -38.85, 3.57)
pt3dadd(4.3, 656.26, -38.85, 3.57)
pt3dadd(4.12, 656.66, -38.85, 3.57)
pt3dadd(3.94, 657.07, -38.85, 3.57)
pt3dadd(3.58, 657.27, -38.85, 3.57)
pt3dadd(3.41, 657.68, -38.85, 3.57)
pt3dadd(3.23, 657.88, -38.85, 3.57)
pt3dadd(3.05, 658.28, -38.85, 3.57)
pt3dadd(2.87, 658.49, -38.85, 3.57)
pt3dadd(2.69, 658.89, -38.85, 3.57)
pt3dadd(2.51, 659.1, -38.85, 3.57)
pt3dadd(2.34, 659.3, -38.85, 3.57)
pt3dadd(2.16, 659.7, -38.85, 3.57)
pt3dadd(1.98, 659.91, -38.85, 3.57)
pt3dadd(1.8, 660.11, -38.85, 3.57)
pt3dadd(1.62, 660.31, -38.85, 3.57)
pt3dadd(1.44, 660.51, -38.85, 3.57)
pt3dadd(1.27, 660.72, -38.85, 3.57)
pt3dadd(1.09, 661.12, -38.85, 3.57)
pt3dadd(0.91, 661.32, -38.85, 3.57)
pt3dadd(0.73, 661.53, -38.85, 3.57)
pt3dadd(0.73, 661.93, -38.85, 3.57)
pt3dadd(0.55, 662.13, -38.85, 3.57)
pt3dadd(0.37, 662.34, -38.85, 3.57)
pt3dadd(0.2, 662.54, -38.85, 3.57)
pt3dadd(0.02, 662.74, -38.85, 3.57)
pt3dadd(0.02, 663.15, -38.85, 3.57)
pt3dadd(-0.16, 663.35, -38.85, 3.57)
pt3dadd(-0.34, 663.55, -38.85, 3.57)
pt3dadd(-0.52, 663.75, -38.85, 3.57)
pt3dadd(-0.7, 664.16, -38.85, 3.57)
pt3dadd(-0.87, 664.36, -38.85, 3.57)
pt3dadd(-1.05, 664.77, -38.85, 3.57)
pt3dadd(-1.23, 665.17, -38.85, 3.57)
pt3dadd(-1.41, 665.37, -38.85, 3.57)
pt3dadd(-1.77, 665.78, -38.85, 3.57)
pt3dadd(-2.12, 666.39, -38.85, 3.57)
pt3dadd(-2.3, 666.59, -38.85, 3.57)
pt3dadd(-2.48, 666.99, -38.85, 3.57)
pt3dadd(-2.66, 667.2, -38.85, 3.57)
pt3dadd(-2.84, 667.4, -38.85, 3.57)
pt3dadd(-3.01, 667.8, -38.85, 3.57)
pt3dadd(-3.19, 668.01, -38.85, 3.57)
pt3dadd(-3.37, 668.21, -38.85, 3.57)
pt3dadd(-3.37, 668.61, -38.85, 3.57)
pt3dadd(-3.55, 668.82, -38.85, 3.57)
pt3dadd(-3.73, 669.02, -38.85, 3.57)
pt3dadd(-3.91, 669.22, -38.85, 3.57)
pt3dadd(-3.91, 669.83, -38.85, 3.57)
pt3dadd(-4.08, 670.03, -38.85, 3.57)
pt3dadd(-4.08, 670.44, -38.85, 3.57)
pt3dadd(-4.26, 670.64, -38.85, 3.57)
pt3dadd(-4.26, 671.05, -38.85, 3.57)
pt3dadd(-4.44, 671.25, -38.85, 3.57)
pt3dadd(-4.62, 671.65, -38.85, 3.57)
}
}
proc shape3d_70() {
dend[45] { pt3dadd(-4.8, 672.06, -38.85, 3.57)
pt3dadd(-4.8, 672.46, -38.85, 3.57)
pt3dadd(-4.98, 673.07, -38.85, 3.57)
pt3dadd(-5.15, 673.27, -38.85, 3.57)
pt3dadd(-5.15, 673.68, -38.85, 3.57)
pt3dadd(-5.33, 673.88, -38.85, 3.57)
pt3dadd(-5.33, 674.29, -38.85, 3.57)
pt3dadd(-5.51, 674.49, -38.85, 3.57)
pt3dadd(-5.51, 674.89, -38.85, 3.57)
pt3dadd(-5.69, 674.89, -38.85, 3.57)
pt3dadd(-5.15, 673.27, -33.6, 3.4)
pt3dadd(-5.15, 673.88, -33.6, 3.4)
pt3dadd(-5.33, 674.29, -33.6, 3.4)
pt3dadd(-5.33, 674.69, -33.6, 3.4)
pt3dadd(-5.51, 675.3, -33.6, 3.4)
pt3dadd(-5.51, 685.43, -33.6, 3.4)
pt3dadd(-5.33, 685.63, -33.6, 3.4)
pt3dadd(-5.33, 686.24, -33.6, 3.4)
pt3dadd(-5.15, 686.44, -33.6, 3.4)
pt3dadd(-5.15, 687.25, -33.6, 3.4)
pt3dadd(-4.98, 687.45, -33.6, 3.4)
pt3dadd(-4.98, 689.88, -33.6, 3.4)
pt3dadd(-4.8, 690.29, -33.6, 3.4)
pt3dadd(-4.8, 690.69, -33.6, 3.4)
pt3dadd(-4.62, 691.1, -33.6, 3.4)
pt3dadd(-4.62, 691.91, -33.6, 3.4)
pt3dadd(-4.44, 692.11, -33.6, 3.4)
pt3dadd(-4.26, 692.31, -33.6, 3.4)
pt3dadd(-4.08, 692.72, -33.6, 3.4)
pt3dadd(-3.91, 693.12, -33.6, 3.4)
pt3dadd(-3.73, 693.53, -33.6, 3.4)
pt3dadd(-3.55, 693.93, -33.6, 3.4)
pt3dadd(-3.37, 694.14, -33.6, 3.4)
pt3dadd(-3.19, 694.54, -33.6, 3.4)
pt3dadd(-3.01, 694.95, -33.6, 3.4)
pt3dadd(-2.84, 695.35, -33.6, 3.4)
pt3dadd(-2.84, 695.96, -33.6, 3.4)
pt3dadd(-2.66, 696.16, -33.6, 3.4)
pt3dadd(-2.66, 696.57, -33.6, 3.4)
pt3dadd(-2.48, 696.77, -33.6, 3.4)
pt3dadd(-2.3, 696.97, -33.6, 3.4)
pt3dadd(-2.12, 697.38, -33.6, 3.4)
pt3dadd(-2.12, 697.78, -33.6, 3.4)
pt3dadd(-1.94, 697.98, -33.6, 3.4)
pt3dadd(-1.77, 698.19, -33.6, 3.4)
pt3dadd(-1.59, 698.39, -33.6, 3.4)
pt3dadd(-1.41, 698.79, -33.6, 3.4)
pt3dadd(-1.23, 699, -33.6, 3.4)
pt3dadd(-1.23, 699.4, -33.6, 3.4)
pt3dadd(-1.05, 699.6, -33.6, 3.4)
pt3dadd(-0.87, 700.01, -33.6, 3.4)
pt3dadd(-0.7, 700.41, -33.6, 3.4)
pt3dadd(-0.52, 700.82, -33.6, 3.4)
pt3dadd(-0.52, 701.43, -33.6, 3.4)
pt3dadd(-0.34, 701.63, -33.6, 3.4)
pt3dadd(-0.16, 701.83, -33.6, 3.4)
pt3dadd(-0.16, 703.05, -33.6, 3.4)
pt3dadd(0.02, 703.25, -33.6, 3.4)
pt3dadd(0.2, 703.45, -33.6, 3.4)
pt3dadd(0.2, 705.07, -33.6, 3.4)
pt3dadd(0.37, 702.85, -33.6, 3.06)
pt3dadd(0.37, 708.72, -33.6, 3.06)
pt3dadd(0.55, 708.92, -33.6, 3.06)
pt3dadd(0.73, 709.33, -33.6, 3.06)
pt3dadd(0.73, 711.15, -33.6, 3.06)
pt3dadd(0.91, 711.55, -33.6, 3.06)
pt3dadd(1.09, 711.76, -33.6, 3.06)
pt3dadd(1.09, 712.36, -33.6, 3.06)
pt3dadd(1.27, 712.57, -33.6, 3.06)
pt3dadd(1.44, 712.77, -33.6, 3.06)
pt3dadd(1.44, 713.18, -33.6, 3.06)
pt3dadd(2.69, 714.59, -33.6, 3.06)
pt3dadd(2.87, 714.8, -33.6, 3.06)
pt3dadd(3.23, 715.2, -33.6, 3.06)
pt3dadd(3.41, 715.4, -33.6, 3.06)
pt3dadd(3.58, 715.61, -33.6, 3.06)
pt3dadd(3.76, 716.01, -33.6, 3.06)
pt3dadd(3.94, 716.42, -33.6, 3.06)
pt3dadd(4.12, 716.62, -33.6, 3.06)
pt3dadd(4.3, 717.02, -33.6, 3.06)
pt3dadd(4.48, 717.23, -33.6, 3.06)
pt3dadd(4.65, 717.43, -33.6, 3.06)
pt3dadd(4.83, 717.83, -33.6, 3.06)
pt3dadd(5.01, 718.24, -33.6, 3.06)
pt3dadd(5.55, 718.44, -33.6, 3.06)
pt3dadd(5.72, 718.64, -33.6, 3.06)
pt3dadd(6.08, 719.05, -33.6, 3.06)
pt3dadd(6.26, 719.25, -33.6, 3.06)
pt3dadd(6.44, 719.66, -33.6, 3.06)
pt3dadd(6.79, 720.06, -33.6, 3.06)
pt3dadd(7.15, 720.26, -33.6, 3.06)
pt3dadd(7.33, 720.47, -33.6, 3.06)
pt3dadd(7.51, 720.87, -33.6, 3.06)
pt3dadd(7.86, 720.87, -33.6, 3.06)
pt3dadd(8.04, 721.28, -33.6, 3.06)
pt3dadd(8.22, 721.48, -33.6, 3.06)
pt3dadd(8.22, 721.88, -33.6, 3.06)
pt3dadd(8.4, 722.09, -33.6, 3.06)
pt3dadd(8.58, 722.49, -33.6, 3.06)
pt3dadd(8.58, 722.9, -33.6, 3.06)
pt3dadd(8.76, 723.3, -33.6, 3.06)
pt3dadd(8.93, 723.71, -33.6, 3.06)
pt3dadd(8.93, 724.11, -33.6, 3.06)
pt3dadd(9.11, 724.32, -33.6, 3.06)
pt3dadd(9.29, 724.72, -33.6, 3.06)
pt3dadd(9.47, 724.92, -33.6, 3.06)
pt3dadd(9.47, 725.53, -33.6, 3.06)
pt3dadd(9.65, 725.94, -33.6, 3.06)
pt3dadd(9.83, 726.14, -33.6, 3.06)
pt3dadd(10, 726.34, -33.6, 3.06)
pt3dadd(10.36, 726.75, -33.6, 3.06)
pt3dadd(10.54, 727.15, -33.6, 3.06)
pt3dadd(11.25, 727.96, -33.6, 3.06)
pt3dadd(11.43, 728.16, -33.6, 3.06)
pt3dadd(11.61, 728.37, -33.6, 3.06)
pt3dadd(11.97, 728.57, -33.6, 3.06)
pt3dadd(12.32, 728.77, -33.6, 3.06)
pt3dadd(12.5, 728.97, -33.6, 3.06)
pt3dadd(12.68, 729.18, -33.6, 3.06)
pt3dadd(12.86, 729.38, -33.6, 3.06)
pt3dadd(13.21, 729.58, -33.6, 3.06)
pt3dadd(13.39, 729.78, -33.6, 3.06)
pt3dadd(13.75, 729.99, -33.6, 3.06)
pt3dadd(14.1, 729.99, -33.6, 3.06)
pt3dadd(14.28, 730.19, -33.6, 3.06)
pt3dadd(14.64, 730.39, -33.6, 3.06)
pt3dadd(15, 730.59, -33.6, 3.06)
pt3dadd(15.35, 730.59, -33.6, 3.06)
pt3dadd(15.53, 730.8, -33.6, 3.06)
pt3dadd(15.89, 731, -33.6, 3.06)
pt3dadd(16.42, 731, -33.6, 3.06)
pt3dadd(16.6, 731.2, -33.6, 3.06)
pt3dadd(17.14, 731.2, -33.6, 3.06)
pt3dadd(17.31, 731.4, -33.6, 3.06)
pt3dadd(17.67, 731.61, -33.6, 3.06)
pt3dadd(18.21, 731.61, -33.6, 3.06)
pt3dadd(18.56, 731.81, -33.6, 3.06)
pt3dadd(18.92, 732.01, -33.6, 3.06)
pt3dadd(19.28, 732.01, -33.6, 3.06)
pt3dadd(19.45, 732.21, -33.6, 3.06)
pt3dadd(19.81, 732.42, -33.6, 3.06)
pt3dadd(20.17, 732.42, -33.6, 3.06)
pt3dadd(20.52, 732.62, -33.6, 3.06)
pt3dadd(20.88, 732.82, -33.6, 3.06)
pt3dadd(21.24, 733.02, -33.6, 3.06)
pt3dadd(21.77, 733.02, -33.6, 3.06)
pt3dadd(22.13, 733.23, -33.6, 3.06)
pt3dadd(22.49, 733.43, -33.6, 3.06)
pt3dadd(22.84, 733.63, -33.6, 3.06)
pt3dadd(23.2, 733.63, -33.6, 3.06)
pt3dadd(23.56, 733.83, -33.6, 3.06)
pt3dadd(23.91, 734.04, -33.6, 3.06)
pt3dadd(24.45, 734.04, -33.6, 3.06)
pt3dadd(24.63, 734.24, -33.6, 3.06)
pt3dadd(24.98, 734.44, -33.6, 3.06)
pt3dadd(25.52, 734.44, -33.6, 3.06)
pt3dadd(25.87, 734.64, -33.6, 3.06)
pt3dadd(26.23, 734.85, -33.6, 3.06)
pt3dadd(26.41, 735.05, -33.6, 3.06)
pt3dadd(26.77, 735.05, -33.6, 3.06)
pt3dadd(27.12, 735.25, -33.6, 3.06)
pt3dadd(27.3, 735.46, -33.6, 3.06)
pt3dadd(27.84, 735.46, -33.6, 3.06)
pt3dadd(28.01, 735.66, -33.6, 3.06)
pt3dadd(28.37, 735.86, -33.6, 3.06)
pt3dadd(28.73, 736.06, -33.6, 3.06)
pt3dadd(29.08, 736.06, -33.6, 3.06)
pt3dadd(29.26, 736.27, -33.6, 3.06)
pt3dadd(29.8, 736.47, -33.6, 3.06)
pt3dadd(30.15, 736.67, -33.6, 3.06)
pt3dadd(30.51, 736.87, -33.6, 3.06)
pt3dadd(31.05, 737.08, -33.6, 3.06)
pt3dadd(31.22, 737.28, -33.6, 3.06)
pt3dadd(31.58, 737.48, -33.6, 3.06)
pt3dadd(31.76, 737.68, -33.6, 3.06)
pt3dadd(32.12, 737.89, -33.6, 3.06)
pt3dadd(32.47, 738.09, -33.6, 3.06)
pt3dadd(32.83, 738.29, -33.6, 3.06)
pt3dadd(33.19, 738.49, -33.6, 3.06)
pt3dadd(33.36, 738.7, -33.6, 3.06)
pt3dadd(33.72, 738.7, -33.6, 3.06)
pt3dadd(33.9, 738.9, -33.6, 3.06)
pt3dadd(34.26, 739.1, -33.6, 3.06)
pt3dadd(34.61, 739.3, -33.6, 3.06)
pt3dadd(34.79, 739.71, -33.6, 3.06)
pt3dadd(35.15, 739.91, -33.6, 3.06)
pt3dadd(35.33, 740.11, -33.6, 3.06)
pt3dadd(35.86, 740.32, -33.6, 3.06)
pt3dadd(36.04, 740.52, -33.6, 3.06)
pt3dadd(36.22, 740.72, -33.6, 3.06)
pt3dadd(36.4, 740.92, -33.6, 3.06)
pt3dadd(61.85, 770.95, -33.6, 3.06)
pt3dadd(61.26, 770.95, -33.6, 3.06)
pt3dadd(67.11, 822.8, -33.6, 3.06)
pt3dadd(36.68, 864.02, -33.6, 3.06)
pt3dadd(48.97, 850.72, -33.6, 3.06)
pt3dadd(68.87, 814.83, -33.6, 3.06)
pt3dadd(67.7, 814.83, -33.6, 3.06)
pt3dadd(61.85, 772.95, -33.6, 3.06)
pt3dadd(36.57, 740.92, -33.6, 3.06)
}
}
proc shape3d_71() {
dend[45] { }
dend[46] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(-31.63, -360.18, -17, 1.7)
pt3dadd(-31.13, -358.17, -98.9, 2.55)
}
dend[47] {pt3dclear()
pt3dadd(-31.13, -358.17, -98.9, 2.55)
pt3dadd(-31.97, -359.59, -98.9, 2.55)
pt3dadd(-32.33, -359.99, -98.9, 2.55)
pt3dadd(-32.86, -360.6, -98.9, 2.55)
pt3dadd(-33.4, -361.21, -98.9, 2.55)
pt3dadd(-33.76, -361.61, -98.9, 2.55)
pt3dadd(-33.93, -361.82, -98.9, 2.55)
pt3dadd(-34.29, -361.82, -98.9, 2.55)
pt3dadd(-34.47, -362.02, -98.9, 2.55)
pt3dadd(-34.65, -361.82, -98.9, 2.55)
pt3dadd(-37.75, -369.83, -98.9, 2.55)
pt3dadd(-33.76, -361.61, -99.95, 2.55)
pt3dadd(-33.76, -362.02, -99.95, 2.55)
pt3dadd(-33.93, -362.22, -99.95, 2.55)
pt3dadd(-34.11, -362.42, -99.95, 2.55)
pt3dadd(-34.29, -362.63, -99.95, 2.55)
pt3dadd(-34.47, -362.83, -99.95, 2.55)
pt3dadd(-34.65, -363.03, -99.95, 2.55)
pt3dadd(-34.83, -363.23, -99.95, 2.55)
pt3dadd(-35, -363.44, -99.95, 2.55)
pt3dadd(-35.36, -363.64, -99.95, 2.55)
pt3dadd(-35.54, -364.04, -99.95, 2.55)
pt3dadd(-35.72, -364.45, -99.95, 2.55)
pt3dadd(-35.9, -364.65, -99.95, 2.55)
pt3dadd(-36.07, -364.85, -99.95, 2.55)
pt3dadd(-36.25, -365.26, -99.95, 2.55)
pt3dadd(-36.61, -365.66, -99.95, 2.55)
pt3dadd(-36.97, -366.27, -99.95, 2.55)
pt3dadd(-37.32, -366.68, -99.95, 2.55)
pt3dadd(-37.5, -366.88, -99.95, 2.55)
pt3dadd(-37.68, -367.08, -99.95, 2.55)
pt3dadd(-37.86, -367.49, -99.95, 2.55)
pt3dadd(-38.04, -367.69, -99.95, 2.55)
pt3dadd(-38.21, -368.09, -99.95, 2.55)
pt3dadd(-38.57, -368.5, -99.95, 2.55)
pt3dadd(-38.75, -368.9, -99.95, 2.55)
pt3dadd(-38.93, -369.11, -99.95, 2.55)
pt3dadd(-39.1, -369.51, -99.95, 2.55)
pt3dadd(-39.46, -370.12, -99.95, 2.55)
pt3dadd(-39.64, -370.32, -99.95, 2.55)
pt3dadd(-39.82, -370.73, -99.95, 2.55)
pt3dadd(-40, -371.13, -99.95, 2.55)
pt3dadd(-40.17, -371.54, -99.95, 2.55)
pt3dadd(-40.35, -371.74, -99.95, 2.55)
pt3dadd(-40.71, -372.35, -99.95, 2.55)
pt3dadd(-40.89, -372.75, -99.95, 2.55)
pt3dadd(-41.07, -373.16, -99.95, 2.55)
pt3dadd(-41.24, -373.56, -99.95, 2.55)
pt3dadd(-41.42, -373.77, -99.95, 2.55)
pt3dadd(-41.6, -374.17, -99.95, 2.55)
pt3dadd(-41.96, -374.58, -99.95, 2.55)
pt3dadd(-42.14, -374.78, -99.95, 2.55)
pt3dadd(-42.31, -374.98, -99.95, 2.55)
pt3dadd(-42.14, -374.58, -103.1, 2.55)
pt3dadd(-42.14, -374.98, -103.1, 2.55)
pt3dadd(-42.31, -375.18, -103.1, 2.55)
pt3dadd(-42.49, -375.59, -103.1, 2.55)
pt3dadd(-42.67, -375.79, -103.1, 2.55)
pt3dadd(-42.85, -375.99, -103.1, 2.55)
pt3dadd(-42.85, -376.4, -103.1, 2.55)
pt3dadd(-43.03, -376.8, -103.1, 2.55)
pt3dadd(-43.21, -377.21, -103.1, 2.55)
pt3dadd(-43.38, -377.61, -103.1, 2.55)
pt3dadd(-43.38, -378.02, -103.1, 2.55)
pt3dadd(-43.56, -378.22, -103.1, 2.55)
pt3dadd(-43.74, -378.63, -103.1, 2.55)
pt3dadd(-43.92, -379.03, -103.1, 2.55)
pt3dadd(-44.1, -379.23, -103.1, 2.55)
pt3dadd(-44.45, -379.44, -103.1, 2.55)
pt3dadd(-44.63, -380.04, -103.1, 2.55)
pt3dadd(-44.81, -380.45, -103.1, 2.55)
pt3dadd(-45.17, -380.85, -103.1, 2.55)
pt3dadd(-45.35, -381.26, -103.1, 2.55)
pt3dadd(-45.7, -381.66, -103.1, 2.55)
pt3dadd(-46.06, -381.87, -103.1, 2.55)
pt3dadd(-46.24, -382.48, -103.1, 2.55)
pt3dadd(-46.42, -382.88, -103.1, 2.55)
pt3dadd(-46.77, -383.08, -103.1, 2.55)
pt3dadd(-46.95, -383.49, -103.1, 2.55)
pt3dadd(-47.13, -383.89, -103.1, 2.55)
pt3dadd(-47.31, -384.3, -103.1, 2.55)
pt3dadd(-47.49, -384.5, -103.1, 2.55)
pt3dadd(-48.02, -385.11, -103.1, 2.55)
pt3dadd(-48.2, -385.72, -103.1, 2.55)
pt3dadd(-48.56, -385.92, -103.1, 2.55)
pt3dadd(-48.73, -386.32, -103.1, 2.55)
pt3dadd(-49.09, -386.53, -103.1, 2.55)
pt3dadd(-49.45, -387.13, -103.1, 2.55)
pt3dadd(-49.98, -387.74, -103.1, 2.55)
pt3dadd(-50.16, -387.94, -103.1, 2.55)
pt3dadd(-50.7, -388.55, -103.1, 2.55)
pt3dadd(-51.05, -388.75, -103.1, 2.55)
pt3dadd(-51.23, -388.96, -103.1, 2.55)
pt3dadd(-51.59, -389.36, -103.1, 2.55)
pt3dadd(-51.94, -389.56, -103.1, 2.55)
pt3dadd(-52.12, -389.97, -103.1, 2.55)
pt3dadd(-52.48, -390.17, -103.1, 2.55)
pt3dadd(-52.84, -390.37, -103.1, 2.55)
pt3dadd(-53.01, -390.78, -103.1, 2.55)
pt3dadd(-53.37, -390.98, -103.1, 2.55)
pt3dadd(-53.73, -391.18, -103.1, 2.55)
pt3dadd(-54.26, -391.79, -103.1, 2.55)
pt3dadd(-54.8, -391.99, -103.1, 2.55)
pt3dadd(-55.15, -392.2, -103.1, 2.55)
pt3dadd(-55.51, -392.6, -103.1, 2.55)
pt3dadd(-55.69, -392.8, -103.1, 2.55)
pt3dadd(-56.05, -393.21, -103.1, 2.55)
pt3dadd(-56.4, -393.62, -103.1, 2.55)
pt3dadd(-56.94, -393.82, -103.1, 2.55)
pt3dadd(-57.29, -394.22, -103.1, 2.55)
pt3dadd(-57.47, -394.43, -103.1, 2.55)
pt3dadd(-57.83, -394.63, -103.1, 2.55)
pt3dadd(-58.19, -394.83, -103.1, 2.55)
pt3dadd(-58.54, -395.03, -103.1, 2.55)
pt3dadd(-58.9, -395.24, -103.1, 2.55)
pt3dadd(-59.26, -395.44, -103.1, 2.55)
pt3dadd(-59.79, -395.64, -103.1, 2.55)
pt3dadd(-60.15, -396.05, -103.1, 2.55)
pt3dadd(-60.5, -396.25, -103.1, 2.55)
pt3dadd(-60.86, -396.45, -103.1, 2.55)
pt3dadd(-61.4, -396.45, -103.1, 2.55)
pt3dadd(-61.75, -396.86, -103.1, 2.55)
pt3dadd(-62.29, -397.26, -103.1, 2.55)
pt3dadd(-62.64, -397.46, -103.1, 2.55)
pt3dadd(-63.36, -397.67, -103.1, 2.55)
pt3dadd(-63.89, -398.27, -103.1, 2.55)
pt3dadd(-64.43, -398.48, -103.1, 2.55)
pt3dadd(-64.96, -398.68, -103.1, 2.55)
pt3dadd(-65.5, -399.08, -103.1, 2.55)
pt3dadd(-66.03, -399.29, -103.1, 2.55)
pt3dadd(-66.57, -399.49, -103.1, 2.55)
pt3dadd(-67.1, -399.49, -103.1, 2.55)
pt3dadd(-67.28, -399.69, -103.1, 2.55)
pt3dadd(-67.82, -399.89, -103.1, 2.55)
pt3dadd(-68.17, -400.1, -103.1, 2.55)
pt3dadd(-68.71, -400.3, -103.1, 2.55)
pt3dadd(-69.06, -400.5, -103.1, 2.55)
pt3dadd(-69.6, -400.5, -103.1, 2.55)
pt3dadd(-69.96, -400.7, -103.1, 2.55)
pt3dadd(-70.67, -400.7, -103.1, 2.55)
pt3dadd(-70.67, -399.69, -103.1, 2.55)
pt3dadd(-69.78, -400.5, -103.1, 2.55)
pt3dadd(-69.96, -400.7, -103.1, 2.55)
pt3dadd(-71.03, -400.7, -103.1, 2.55)
pt3dadd(-71.38, -400.91, -103.1, 2.55)
pt3dadd(-71.92, -400.91, -103.1, 2.55)
pt3dadd(-72.1, -401.11, -103.1, 2.55)
pt3dadd(-72.45, -401.31, -103.1, 2.55)
pt3dadd(-72.81, -401.31, -103.1, 2.55)
pt3dadd(-72.99, -401.51, -103.1, 2.55)
pt3dadd(-73.34, -401.92, -103.1, 2.55)
pt3dadd(-73.52, -402.12, -103.1, 2.55)
pt3dadd(-73.88, -402.53, -103.1, 2.55)
pt3dadd(-74.41, -402.73, -103.1, 2.55)
pt3dadd(-74.77, -402.93, -103.1, 2.55)
pt3dadd(-75.31, -403.34, -103.1, 2.55)
pt3dadd(-75.66, -403.74, -103.1, 2.55)
pt3dadd(-75.84, -403.94, -103.1, 2.55)
pt3dadd(-76.38, -404.15, -103.1, 2.55)
pt3dadd(-76.91, -404.76, -103.1, 2.55)
pt3dadd(-77.27, -404.96, -103.1, 2.55)
pt3dadd(-77.62, -405.16, -103.1, 2.55)
pt3dadd(-77.98, -405.57, -103.1, 2.55)
pt3dadd(-78.34, -405.77, -103.1, 2.55)
pt3dadd(-78.69, -405.97, -103.1, 2.55)
pt3dadd(-79.05, -406.17, -103.1, 2.55)
pt3dadd(-79.41, -406.38, -103.1, 2.55)
pt3dadd(-79.94, -406.98, -103.1, 2.55)
pt3dadd(-80.48, -407.19, -103.1, 2.55)
pt3dadd(-80.83, -407.59, -103.1, 2.55)
pt3dadd(-81.55, -408, -103.1, 2.55)
pt3dadd(-82.08, -408.2, -103.1, 2.55)
pt3dadd(-82.8, -408.6, -103.1, 2.55)
pt3dadd(-83.15, -409.01, -103.1, 2.55)
pt3dadd(-83.51, -409.21, -103.1, 2.55)
pt3dadd(-84.04, -409.41, -103.1, 2.55)
pt3dadd(-84.58, -409.82, -103.1, 2.55)
pt3dadd(-85.11, -410.02, -103.1, 2.55)
pt3dadd(-85.47, -410.22, -103.1, 2.55)
pt3dadd(-86.54, -410.83, -103.1, 2.55)
pt3dadd(-86.9, -411.03, -103.1, 2.55)
pt3dadd(-87.43, -411.03, -103.1, 2.55)
pt3dadd(-87.97, -411.44, -103.1, 2.55)
pt3dadd(-88.5, -411.64, -103.1, 2.55)
pt3dadd(-89.04, -411.84, -103.1, 2.55)
pt3dadd(-89.57, -412.25, -103.1, 2.55)
pt3dadd(-90.29, -412.45, -103.1, 2.55)
pt3dadd(-91, -412.65, -103.1, 2.55)
pt3dadd(-91.71, -413.06, -103.1, 2.55)
pt3dadd(-92.25, -413.06, -103.1, 2.55)
pt3dadd(-92.96, -413.46, -103.1, 2.55)
pt3dadd(-93.67, -413.67, -103.1, 2.55)
pt3dadd(-94.39, -414.07, -103.1, 2.55)
pt3dadd(-94.92, -414.27, -103.1, 2.55)
pt3dadd(-95.64, -414.27, -103.1, 2.55)
pt3dadd(-96.17, -414.68, -103.1, 2.55)
pt3dadd(-96.53, -414.88, -103.1, 2.55)
}
}
proc shape3d_72() {
dend[47] { pt3dadd(-97.06, -414.88, -103.1, 2.55)
pt3dadd(-97.6, -415.29, -103.1, 2.55)
pt3dadd(-97.95, -415.29, -103.1, 2.55)
pt3dadd(-98.31, -415.49, -103.1, 2.55)
pt3dadd(-99.2, -415.49, -103.1, 2.55)
pt3dadd(-99.56, -415.69, -103.1, 2.55)
pt3dadd(-100.09, -415.69, -103.1, 2.55)
pt3dadd(-100.27, -415.9, -103.1, 2.55)
pt3dadd(-100.81, -415.9, -103.1, 2.55)
pt3dadd(-101.16, -416.1, -103.1, 2.55)
pt3dadd(-101.34, -416.3, -103.1, 2.55)
pt3dadd(-101.88, -416.5, -103.1, 2.55)
pt3dadd(-102.23, -416.91, -103.1, 2.55)
pt3dadd(-102.41, -417.11, -103.1, 2.55)
pt3dadd(-102.77, -417.31, -103.1, 2.55)
pt3dadd(-103.13, -417.52, -103.1, 2.55)
pt3dadd(-103.48, -417.92, -103.1, 2.55)
pt3dadd(-103.84, -418.12, -103.1, 2.55)
pt3dadd(-104.02, -418.33, -103.1, 2.55)
pt3dadd(-104.37, -418.53, -103.1, 2.55)
pt3dadd(-104.91, -419.14, -103.1, 2.55)
pt3dadd(-105.27, -419.34, -103.1, 2.55)
pt3dadd(-105.44, -419.54, -103.1, 2.55)
pt3dadd(-105.8, -419.54, -103.1, 2.55)
pt3dadd(-105.98, -419.74, -103.1, 2.55)
pt3dadd(-106.33, -419.95, -103.1, 2.55)
pt3dadd(-106.69, -420.15, -103.1, 2.55)
pt3dadd(-107.05, -420.35, -103.1, 2.55)
pt3dadd(-107.76, -420.35, -103.1, 2.55)
pt3dadd(-107.76, -419.14, -103.1, 2.55)
}
dend[48] {pt3dclear()
pt3dadd(-31.13, -358.17, -98.9, 2.55)
pt3dadd(-30.72, -358.17, -98.9, 2.55)
pt3dadd(-30.55, -357.97, -98.9, 2.55)
pt3dadd(-30.19, -357.56, -98.9, 2.55)
pt3dadd(-29.83, -357.16, -98.9, 2.55)
pt3dadd(-29.83, -356.75, -98.9, 2.55)
pt3dadd(-29.48, -356.55, -98.9, 2.55)
pt3dadd(-29.3, -356.14, -98.9, 2.55)
pt3dadd(-28.94, -355.94, -98.9, 2.55)
pt3dadd(-28.58, -355.74, -98.9, 2.55)
pt3dadd(-28.41, -355.54, -98.9, 2.55)
pt3dadd(-28.23, -355.13, -98.9, 2.55)
pt3dadd(-27.87, -354.93, -98.9, 2.55)
pt3dadd(-27.51, -354.52, -98.9, 2.55)
pt3dadd(-27.34, -354.32, -98.9, 2.55)
pt3dadd(-26.98, -353.92, -98.9, 2.55)
pt3dadd(-25.73, -352.5, -98.9, 2.55)
pt3dadd(-25.55, -352.09, -98.9, 2.55)
pt3dadd(-25.2, -351.69, -98.9, 2.55)
pt3dadd(-24.66, -351.08, -98.9, 2.55)
pt3dadd(-24.3, -350.88, -98.9, 2.55)
pt3dadd(-23.95, -350.47, -98.9, 2.55)
pt3dadd(-23.77, -350.07, -98.9, 2.55)
pt3dadd(-23.59, -349.87, -98.9, 2.55)
pt3dadd(-23.06, -349.26, -98.9, 2.55)
pt3dadd(-22.88, -349.05, -98.9, 2.55)
pt3dadd(-22.34, -348.65, -98.9, 2.55)
pt3dadd(-22.16, -348.24, -98.9, 2.55)
pt3dadd(-21.81, -347.84, -98.9, 2.55)
pt3dadd(-21.45, -347.43, -98.9, 2.55)
pt3dadd(-21.09, -347.03, -98.9, 2.55)
pt3dadd(-20.74, -346.83, -98.9, 2.55)
pt3dadd(-20.38, -346.22, -98.9, 2.55)
pt3dadd(-20.02, -345.81, -98.9, 2.55)
pt3dadd(-19.67, -345.41, -98.9, 2.55)
pt3dadd(-19.31, -345, -98.9, 2.55)
pt3dadd(-18.95, -344.4, -98.9, 2.55)
pt3dadd(-18.78, -343.99, -98.9, 2.55)
pt3dadd(-18.42, -343.38, -98.9, 2.55)
pt3dadd(-17.88, -342.78, -98.9, 2.55)
pt3dadd(-17.53, -341.97, -98.9, 2.55)
pt3dadd(-17.35, -341.76, -98.9, 2.55)
pt3dadd(-16.81, -340.95, -98.9, 2.55)
pt3dadd(-16.46, -340.55, -98.9, 2.55)
pt3dadd(-16.28, -339.94, -98.9, 2.55)
pt3dadd(-15.92, -339.74, -98.9, 2.55)
pt3dadd(-15.74, -339.33, -98.9, 2.55)
pt3dadd(-15.57, -338.73, -98.9, 2.55)
pt3dadd(-15.39, -338.32, -98.9, 2.55)
pt3dadd(-15.03, -338.12, -98.9, 2.55)
pt3dadd(-14.85, -337.71, -98.9, 2.55)
pt3dadd(-14.67, -337.31, -98.9, 2.55)
pt3dadd(-14.5, -336.9, -98.9, 2.55)
pt3dadd(-14.14, -336.5, -98.9, 2.55)
pt3dadd(-13.96, -336.09, -98.9, 2.55)
pt3dadd(-13.6, -335.69, -98.9, 2.55)
pt3dadd(-13.6, -335.28, -98.9, 2.55)
pt3dadd(-13.25, -334.88, -98.9, 2.55)
pt3dadd(-13.07, -334.47, -98.9, 2.55)
pt3dadd(-12.89, -334.07, -98.9, 2.55)
pt3dadd(-12.18, -333.26, -98.9, 2.55)
pt3dadd(-12, -332.85, -98.9, 2.55)
pt3dadd(-11.82, -332.65, -98.9, 2.55)
pt3dadd(-11.46, -332.24, -98.9, 2.55)
pt3dadd(-11.29, -331.64, -98.9, 2.55)
pt3dadd(-10.93, -331.43, -98.9, 2.55)
pt3dadd(-10.75, -331.03, -98.9, 2.55)
pt3dadd(-10.57, -330.83, -98.9, 2.55)
pt3dadd(-10.22, -330.62, -98.9, 2.55)
pt3dadd(-10.04, -330.22, -98.9, 2.55)
pt3dadd(-9.86, -330.02, -98.9, 2.55)
pt3dadd(-9.68, -329.81, -98.9, 2.55)
pt3dadd(-9.5, -329.61, -98.9, 2.55)
pt3dadd(-9.32, -329.21, -98.9, 2.55)
pt3dadd(-8.61, -328.4, -98.9, 2.55)
pt3dadd(-8.43, -328.19, -98.9, 2.55)
pt3dadd(-8.43, -327.79, -98.9, 2.55)
pt3dadd(-8.08, -327.59, -98.9, 2.55)
pt3dadd(-7.9, -327.18, -98.9, 2.55)
pt3dadd(-7.72, -326.98, -98.9, 2.55)
pt3dadd(-6.65, -325.76, -98.9, 2.55)
pt3dadd(-6.47, -325.36, -98.9, 2.55)
pt3dadd(-6.11, -325.15, -98.9, 2.55)
pt3dadd(-5.94, -324.75, -98.9, 2.55)
pt3dadd(-5.76, -324.34, -98.9, 2.55)
pt3dadd(-5.4, -324.14, -98.9, 2.55)
pt3dadd(-5.22, -323.94, -98.9, 2.55)
pt3dadd(-5.04, -323.53, -98.9, 2.55)
pt3dadd(-4.87, -323.33, -98.9, 2.55)
pt3dadd(-4.69, -323.13, -98.9, 2.55)
pt3dadd(-4.51, -322.93, -98.9, 2.55)
pt3dadd(-4.33, -322.72, -98.9, 2.55)
pt3dadd(-4.15, -322.52, -98.9, 2.55)
pt3dadd(-3.97, -322.32, -98.9, 2.55)
pt3dadd(-3.8, -322.12, -98.9, 2.55)
pt3dadd(-3.62, -321.71, -98.9, 2.55)
pt3dadd(-3.44, -321.31, -98.9, 2.55)
pt3dadd(-3.26, -320.9, -98.9, 2.55)
pt3dadd(-3.08, -320.5, -98.9, 2.55)
pt3dadd(-2.9, -320.29, -98.9, 2.55)
pt3dadd(-2.73, -319.89, -98.9, 2.55)
pt3dadd(-2.55, -319.69, -98.9, 2.55)
pt3dadd(-2.37, -319.08, -98.9, 2.55)
pt3dadd(-2.19, -318.67, -98.9, 2.55)
pt3dadd(-2.19, -318.27, -98.9, 2.55)
pt3dadd(-2.01, -317.86, -98.9, 2.55)
pt3dadd(-1.83, -317.46, -98.9, 2.55)
pt3dadd(-1.83, -317.05, -98.9, 2.55)
pt3dadd(-1.66, -316.65, -98.9, 2.55)
pt3dadd(-1.48, -316.24, -98.9, 2.55)
pt3dadd(-1.48, -315.84, -98.9, 2.55)
pt3dadd(-1.3, -315.63, -98.9, 2.55)
pt3dadd(-1.3, -315.23, -98.9, 2.55)
pt3dadd(-1.12, -314.82, -98.9, 2.55)
pt3dadd(-1.12, -314.22, -98.9, 2.55)
pt3dadd(-0.94, -314.01, -98.9, 2.55)
pt3dadd(-0.94, -313.61, -98.9, 2.55)
pt3dadd(-0.76, -313.2, -98.9, 2.55)
pt3dadd(-0.76, -312.8, -98.9, 2.55)
pt3dadd(-0.59, -312.19, -98.9, 2.55)
pt3dadd(-0.41, -311.79, -98.9, 2.55)
pt3dadd(-0.41, -311.18, -98.9, 2.55)
pt3dadd(-0.23, -310.98, -98.9, 2.55)
pt3dadd(-0.23, -310.57, -98.9, 2.55)
pt3dadd(-0.05, -310.17, -98.9, 2.55)
pt3dadd(0.13, -309.96, -98.9, 2.55)
pt3dadd(0.13, -309.56, -98.9, 2.55)
pt3dadd(0.31, -309.15, -98.9, 2.55)
pt3dadd(0.48, -308.75, -98.9, 2.55)
pt3dadd(0.84, -308.34, -98.9, 2.55)
pt3dadd(1.02, -307.94, -98.9, 2.55)
pt3dadd(1.2, -307.74, -98.9, 2.55)
pt3dadd(1.38, -307.13, -98.9, 2.55)
pt3dadd(1.73, -306.72, -98.9, 2.55)
pt3dadd(1.91, -306.32, -98.9, 2.55)
pt3dadd(2.09, -305.91, -98.9, 2.55)
pt3dadd(2.45, -305.51, -98.9, 2.55)
pt3dadd(2.8, -305.1, -98.9, 2.55)
pt3dadd(2.98, -304.7, -98.9, 2.55)
pt3dadd(3.34, -304.49, -98.9, 2.55)
pt3dadd(3.52, -304.29, -98.9, 2.55)
pt3dadd(3.69, -304.09, -98.9, 2.55)
pt3dadd(3.87, -303.89, -98.9, 2.55)
pt3dadd(4.05, -303.68, -98.9, 2.55)
pt3dadd(4.23, -303.28, -98.9, 2.55)
pt3dadd(4.59, -303.08, -98.9, 2.55)
pt3dadd(4.76, -302.87, -98.9, 2.55)
pt3dadd(5.12, -302.47, -98.9, 2.55)
pt3dadd(5.48, -302.47, -98.9, 2.55)
pt3dadd(5.66, -302.27, -98.9, 2.55)
pt3dadd(6.01, -302.06, -98.9, 2.55)
pt3dadd(6.19, -301.66, -98.9, 2.55)
pt3dadd(6.55, -301.46, -98.9, 2.55)
pt3dadd(6.73, -301.25, -98.9, 2.55)
pt3dadd(6.19, -301.66, -98.9, 2.55)
pt3dadd(6.55, -301.46, -98.9, 2.55)
pt3dadd(6.9, -301.25, -98.9, 2.55)
pt3dadd(7.44, -301.05, -98.9, 2.55)
pt3dadd(7.8, -300.85, -98.9, 2.55)
pt3dadd(8.51, -300.44, -98.9, 2.55)
pt3dadd(8.87, -300.04, -98.9, 2.55)
pt3dadd(9.4, -299.63, -98.9, 2.55)
pt3dadd(9.94, -299.63, -98.9, 2.55)
pt3dadd(10.29, -299.23, -98.9, 2.55)
pt3dadd(10.83, -299.03, -98.9, 2.55)
pt3dadd(11.36, -298.62, -98.9, 2.55)
pt3dadd(12.08, -298.22, -98.9, 2.55)
pt3dadd(12.43, -298.01, -98.9, 2.55)
pt3dadd(12.97, -297.81, -98.9, 2.55)
pt3dadd(13.5, -297.41, -98.9, 2.55)
}
}
proc shape3d_73() {
dend[48] { pt3dadd(14.04, -297, -98.9, 2.55)
pt3dadd(14.57, -296.6, -98.9, 2.55)
pt3dadd(15.11, -296.19, -98.9, 2.55)
pt3dadd(15.64, -295.79, -98.9, 2.55)
pt3dadd(16.18, -295.58, -98.9, 2.55)
pt3dadd(16.71, -295.38, -98.9, 2.55)
pt3dadd(17.25, -294.77, -98.9, 2.55)
pt3dadd(17.78, -294.57, -98.9, 2.55)
pt3dadd(18.14, -294.16, -98.9, 2.55)
pt3dadd(19.03, -293.56, -98.9, 2.55)
pt3dadd(19.39, -293.15, -98.9, 2.55)
pt3dadd(19.92, -292.75, -98.9, 2.55)
pt3dadd(20.46, -292.54, -98.9, 2.55)
pt3dadd(20.99, -292.14, -98.9, 2.55)
pt3dadd(21.17, -291.73, -98.9, 2.55)
pt3dadd(21.71, -291.33, -98.9, 2.55)
pt3dadd(22.06, -290.92, -98.9, 2.55)
pt3dadd(22.42, -290.72, -98.9, 2.55)
pt3dadd(22.95, -290.11, -98.9, 2.55)
pt3dadd(23.49, -289.71, -98.9, 2.55)
pt3dadd(24.02, -289.3, -98.9, 2.55)
pt3dadd(24.74, -288.49, -98.9, 2.55)
pt3dadd(25.09, -288.09, -98.9, 2.55)
pt3dadd(25.45, -287.68, -98.9, 2.55)
pt3dadd(25.99, -287.08, -98.9, 2.55)
pt3dadd(26.34, -286.67, -98.9, 2.55)
pt3dadd(26.7, -286.27, -98.9, 2.55)
pt3dadd(27.41, -285.46, -98.9, 2.55)
pt3dadd(27.59, -285.05, -98.9, 2.55)
pt3dadd(27.95, -284.65, -98.9, 2.55)
pt3dadd(28.13, -284.24, -98.9, 2.55)
pt3dadd(28.66, -283.83, -98.9, 2.55)
pt3dadd(28.84, -283.43, -98.9, 2.55)
pt3dadd(29.19, -282.82, -98.9, 2.55)
pt3dadd(29.55, -282.42, -98.9, 2.55)
pt3dadd(29.73, -282.01, -98.9, 2.55)
pt3dadd(29.91, -281.61, -98.9, 2.55)
pt3dadd(30.09, -281.2, -98.9, 2.55)
pt3dadd(30.44, -281, -98.9, 2.55)
pt3dadd(30.8, -280.39, -98.9, 2.55)
pt3dadd(30.98, -279.99, -98.9, 2.55)
pt3dadd(31.16, -279.38, -98.9, 2.55)
pt3dadd(31.51, -278.97, -98.9, 2.55)
pt3dadd(31.87, -278.37, -98.9, 2.55)
pt3dadd(32.05, -278.16, -98.9, 2.55)
pt3dadd(32.23, -277.76, -98.9, 2.55)
pt3dadd(32.58, -277.15, -98.9, 2.55)
pt3dadd(32.76, -276.75, -98.9, 2.55)
pt3dadd(33.12, -276.34, -98.9, 2.55)
pt3dadd(33.3, -275.94, -98.9, 2.55)
pt3dadd(33.47, -275.33, -98.9, 2.55)
pt3dadd(33.65, -274.92, -98.9, 2.55)
pt3dadd(34.01, -274.32, -98.9, 2.55)
pt3dadd(34.19, -273.91, -98.9, 2.55)
pt3dadd(34.37, -273.51, -98.9, 2.55)
pt3dadd(34.54, -273.1, -98.9, 2.55)
pt3dadd(34.72, -272.69, -98.9, 2.55)
pt3dadd(34.9, -272.29, -98.9, 2.55)
pt3dadd(35.08, -271.88, -98.9, 2.55)
pt3dadd(35.44, -271.28, -98.9, 2.55)
pt3dadd(35.61, -270.87, -98.9, 2.55)
pt3dadd(35.79, -270.67, -98.9, 2.55)
pt3dadd(35.97, -270.47, -98.9, 2.55)
pt3dadd(36.15, -270.06, -98.9, 2.55)
pt3dadd(36.33, -269.66, -98.9, 2.55)
pt3dadd(36.86, -269.05, -98.9, 2.55)
pt3dadd(37.04, -268.85, -98.9, 2.55)
pt3dadd(37.22, -268.64, -98.9, 2.55)
pt3dadd(37.4, -268.24, -98.9, 2.55)
pt3dadd(37.58, -267.83, -98.9, 2.55)
pt3dadd(37.75, -267.63, -98.9, 2.55)
pt3dadd(38.11, -267.02, -98.9, 2.55)
pt3dadd(38.29, -266.62, -98.9, 2.55)
pt3dadd(38.65, -266.21, -98.9, 2.55)
pt3dadd(38.82, -265.81, -98.9, 2.55)
pt3dadd(39, -265.61, -98.9, 2.55)
pt3dadd(39.18, -265.2, -98.9, 2.55)
pt3dadd(39.36, -264.8, -98.9, 2.55)
pt3dadd(39.54, -264.39, -98.9, 2.55)
pt3dadd(39.89, -263.99, -98.9, 2.55)
pt3dadd(40.07, -263.58, -98.9, 2.55)
pt3dadd(40.43, -263.18, -98.9, 2.55)
pt3dadd(40.79, -262.37, -98.9, 2.55)
pt3dadd(40.96, -262.16, -98.9, 2.55)
pt3dadd(41.14, -261.55, -98.9, 2.55)
pt3dadd(41.32, -261.15, -98.9, 2.55)
pt3dadd(41.68, -260.74, -98.9, 2.55)
pt3dadd(41.86, -260.34, -98.9, 2.55)
pt3dadd(42.21, -259.73, -98.9, 2.55)
pt3dadd(42.39, -259.33, -98.9, 2.55)
pt3dadd(42.75, -258.92, -98.9, 2.55)
pt3dadd(42.93, -258.52, -98.9, 2.55)
pt3dadd(42.93, -257.91, -98.9, 2.55)
pt3dadd(43.28, -257.71, -98.9, 2.55)
pt3dadd(43.46, -257.3, -98.9, 2.55)
pt3dadd(43.64, -256.69, -98.9, 2.55)
pt3dadd(43.82, -256.29, -98.9, 2.55)
pt3dadd(44, -256.09, -98.9, 2.55)
pt3dadd(44.17, -255.68, -98.9, 2.55)
pt3dadd(44.35, -255.28, -98.9, 2.55)
pt3dadd(44.53, -254.87, -98.9, 2.55)
pt3dadd(44.71, -254.26, -98.9, 2.55)
pt3dadd(44.89, -253.86, -98.9, 2.55)
pt3dadd(45.07, -253.45, -98.9, 2.55)
pt3dadd(45.24, -253.25, -98.9, 2.55)
pt3dadd(45.6, -252.85, -98.9, 2.55)
pt3dadd(45.78, -252.44, -98.9, 2.55)
pt3dadd(45.96, -252.04, -98.9, 2.55)
pt3dadd(46.14, -251.63, -98.9, 2.55)
pt3dadd(46.49, -251.23, -98.9, 2.55)
pt3dadd(46.67, -250.82, -98.9, 2.55)
pt3dadd(46.85, -250.62, -98.9, 2.55)
pt3dadd(47.03, -250.21, -98.9, 2.55)
pt3dadd(47.03, -249.6, -98.9, 2.55)
pt3dadd(46.49, -250.62, -98.9, 2.55)
pt3dadd(46.67, -251.63, -95.75, 2.55)
pt3dadd(46.85, -251.63, -95.75, 2.55)
pt3dadd(47.03, -251.23, -95.75, 2.55)
pt3dadd(47.21, -250.82, -95.75, 2.55)
pt3dadd(47.38, -250.41, -95.75, 2.55)
pt3dadd(47.56, -250.01, -95.75, 2.55)
pt3dadd(47.74, -249.6, -95.75, 2.55)
pt3dadd(47.92, -249, -95.75, 2.55)
pt3dadd(48.1, -248.59, -95.75, 2.55)
pt3dadd(48.28, -247.78, -95.75, 2.55)
pt3dadd(48.63, -247.17, -95.75, 2.55)
pt3dadd(48.81, -246.77, -95.75, 2.55)
pt3dadd(48.99, -246.36, -95.75, 2.55)
pt3dadd(49.17, -245.76, -95.75, 2.55)
pt3dadd(49.35, -245.35, -95.75, 2.55)
pt3dadd(49.52, -244.74, -95.75, 2.55)
pt3dadd(49.7, -244.34, -95.75, 2.55)
pt3dadd(49.88, -243.93, -95.75, 2.55)
pt3dadd(50.06, -243.53, -95.75, 2.55)
pt3dadd(50.42, -242.92, -95.75, 2.55)
pt3dadd(50.59, -242.72, -95.75, 2.55)
pt3dadd(50.77, -242.11, -95.75, 2.55)
pt3dadd(50.95, -241.71, -95.75, 2.55)
pt3dadd(51.13, -241.3, -95.75, 2.55)
pt3dadd(51.49, -241.1, -95.75, 2.55)
pt3dadd(51.66, -240.69, -95.75, 2.55)
pt3dadd(51.84, -240.09, -95.75, 2.55)
pt3dadd(52.2, -239.88, -95.75, 2.55)
pt3dadd(52.2, -239.27, -95.75, 2.55)
pt3dadd(52.56, -238.67, -95.75, 2.55)
pt3dadd(52.73, -238.26, -95.75, 2.55)
pt3dadd(52.91, -237.86, -95.75, 2.55)
pt3dadd(53.27, -237.25, -95.75, 2.55)
pt3dadd(53.45, -236.64, -95.75, 2.55)
pt3dadd(53.8, -236.03, -95.75, 2.55)
pt3dadd(53.98, -235.63, -95.75, 2.55)
pt3dadd(54.16, -235.43, -95.75, 2.55)
pt3dadd(54.34, -234.82, -95.75, 2.55)
pt3dadd(54.52, -234.41, -95.75, 2.55)
pt3dadd(54.7, -234.01, -95.75, 2.55)
pt3dadd(54.7, -233.6, -95.75, 2.55)
pt3dadd(54.87, -233.2, -95.75, 2.55)
pt3dadd(55.05, -232.79, -95.75, 2.55)
pt3dadd(55.23, -232.59, -95.75, 2.55)
pt3dadd(55.41, -232.19, -95.75, 2.55)
pt3dadd(55.59, -231.78, -95.75, 2.55)
pt3dadd(55.94, -231.17, -95.75, 2.55)
pt3dadd(55.94, -230.77, -95.75, 2.55)
pt3dadd(56.12, -230.57, -95.75, 2.55)
pt3dadd(56.3, -230.16, -95.75, 2.55)
pt3dadd(56.48, -229.96, -95.75, 2.55)
pt3dadd(56.66, -229.55, -95.75, 2.55)
pt3dadd(56.66, -229.15, -95.75, 2.55)
pt3dadd(57.01, -228.54, -95.75, 2.55)
pt3dadd(57.01, -228.13, -95.75, 2.55)
pt3dadd(57.19, -227.73, -95.75, 2.55)
pt3dadd(57.37, -227.12, -95.75, 2.55)
pt3dadd(57.01, -227.53, -93.65, 2.55)
pt3dadd(57.19, -227.32, -93.65, 2.55)
pt3dadd(57.73, -226.72, -93.65, 2.55)
pt3dadd(57.91, -226.51, -93.65, 2.55)
pt3dadd(58.08, -226.31, -93.65, 2.55)
pt3dadd(58.26, -225.91, -93.65, 2.55)
pt3dadd(58.44, -225.5, -93.65, 2.55)
pt3dadd(58.8, -225.1, -93.65, 2.55)
pt3dadd(58.98, -224.69, -93.65, 2.55)
pt3dadd(59.15, -224.29, -93.65, 2.55)
pt3dadd(59.51, -223.88, -93.65, 2.55)
pt3dadd(59.87, -223.48, -93.65, 2.55)
pt3dadd(59.87, -223.07, -93.65, 2.55)
pt3dadd(60.22, -222.67, -93.65, 2.55)
pt3dadd(60.58, -222.26, -93.65, 2.55)
pt3dadd(60.76, -221.86, -93.65, 2.55)
pt3dadd(60.94, -221.45, -93.65, 2.55)
pt3dadd(61.12, -221.05, -93.65, 2.55)
pt3dadd(61.29, -220.64, -93.65, 2.55)
pt3dadd(61.47, -220.03, -93.65, 2.55)
pt3dadd(61.65, -219.63, -93.65, 2.55)
pt3dadd(62.01, -219.43, -93.65, 2.55)
pt3dadd(62.19, -219.02, -93.65, 2.55)
pt3dadd(62.36, -218.62, -93.65, 2.55)
pt3dadd(62.72, -218.21, -93.65, 2.55)
pt3dadd(63.08, -217.6, -93.65, 2.55)
pt3dadd(63.26, -217.4, -93.65, 2.55)
pt3dadd(63.43, -216.99, -93.65, 2.55)
}
}
proc shape3d_74() {
dend[48] { pt3dadd(63.79, -216.59, -93.65, 2.55)
pt3dadd(64.15, -216.18, -93.65, 2.55)
pt3dadd(64.15, -215.78, -93.65, 2.55)
pt3dadd(64.5, -215.17, -93.65, 2.55)
pt3dadd(64.68, -214.77, -93.65, 2.55)
pt3dadd(64.86, -214.36, -93.65, 2.55)
pt3dadd(65.04, -213.96, -93.65, 2.55)
pt3dadd(65.4, -213.75, -93.65, 2.55)
pt3dadd(65.57, -213.15, -93.65, 2.55)
pt3dadd(65.75, -212.74, -93.65, 2.55)
pt3dadd(65.93, -212.34, -93.65, 2.55)
pt3dadd(66.29, -211.93, -93.65, 2.55)
pt3dadd(66.47, -211.32, -93.65, 2.55)
pt3dadd(66.64, -210.92, -93.65, 2.55)
pt3dadd(66.82, -210.31, -93.65, 2.55)
pt3dadd(67.18, -209.91, -93.65, 2.55)
pt3dadd(67.36, -209.7, -93.65, 2.55)
pt3dadd(67.89, -208.69, -93.65, 2.55)
pt3dadd(68.07, -208.08, -93.65, 2.55)
pt3dadd(68.25, -207.68, -93.65, 2.55)
pt3dadd(68.61, -207.27, -93.65, 2.55)
pt3dadd(68.78, -206.87, -93.65, 2.55)
pt3dadd(69.32, -206.26, -93.65, 2.55)
pt3dadd(69.5, -205.85, -93.65, 2.55)
pt3dadd(69.68, -205.45, -93.65, 2.55)
pt3dadd(69.85, -205.25, -93.65, 2.55)
pt3dadd(70.21, -204.64, -93.65, 2.55)
pt3dadd(70.57, -204.23, -93.65, 2.55)
pt3dadd(70.75, -204.03, -93.65, 2.55)
pt3dadd(70.92, -203.63, -93.65, 2.55)
pt3dadd(71.28, -203.42, -93.65, 2.55)
pt3dadd(71.28, -203.02, -93.65, 2.55)
pt3dadd(71.64, -202.82, -93.65, 2.55)
pt3dadd(71.82, -202.41, -93.65, 2.55)
pt3dadd(71.99, -202.21, -93.65, 2.55)
pt3dadd(72.17, -201.8, -93.65, 2.55)
pt3dadd(72.35, -201.6, -93.65, 2.55)
pt3dadd(72.71, -201.4, -93.65, 2.55)
pt3dadd(72.89, -200.99, -93.65, 2.55)
pt3dadd(73.06, -200.59, -93.65, 2.55)
pt3dadd(73.24, -200.39, -93.65, 2.55)
pt3dadd(73.6, -200.18, -93.65, 2.55)
pt3dadd(73.78, -199.78, -93.65, 2.55)
pt3dadd(74.13, -199.58, -93.65, 2.55)
pt3dadd(74.31, -199.37, -93.65, 2.55)
pt3dadd(74.67, -198.77, -93.65, 2.55)
pt3dadd(74.85, -198.56, -93.65, 2.55)
pt3dadd(75.2, -198.16, -93.65, 2.55)
pt3dadd(75.38, -197.75, -93.65, 2.55)
pt3dadd(75.74, -197.15, -93.65, 2.55)
pt3dadd(75.92, -196.94, -93.65, 2.55)
pt3dadd(76.1, -196.74, -93.65, 2.55)
pt3dadd(76.27, -196.54, -93.65, 2.55)
pt3dadd(76.99, -195.73, -93.65, 2.55)
pt3dadd(77.34, -195.12, -93.65, 2.55)
pt3dadd(77.52, -194.92, -93.65, 2.55)
pt3dadd(77.7, -194.71, -93.65, 2.55)
pt3dadd(77.88, -194.31, -93.65, 2.55)
pt3dadd(78.06, -194.11, -93.65, 2.55)
pt3dadd(78.24, -193.9, -93.65, 2.55)
pt3dadd(78.41, -193.7, -93.65, 2.55)
pt3dadd(78.59, -193.5, -93.65, 2.55)
pt3dadd(78.77, -193.09, -93.65, 2.55)
pt3dadd(78.95, -192.89, -93.65, 2.55)
pt3dadd(79.13, -192.69, -93.65, 2.55)
pt3dadd(79.31, -192.49, -93.65, 2.55)
pt3dadd(79.48, -192.28, -93.65, 2.55)
pt3dadd(79.66, -191.88, -93.65, 2.55)
pt3dadd(79.84, -191.47, -93.65, 2.55)
pt3dadd(80.02, -191.27, -93.65, 2.55)
pt3dadd(80.02, -190.87, -93.65, 2.55)
pt3dadd(80.2, -190.66, -93.65, 2.55)
pt3dadd(80.38, -190.46, -93.65, 2.55)
pt3dadd(80.38, -189.45, -93.65, 2.55)
pt3dadd(80.2, -189.65, -90.5, 2.55)
pt3dadd(80.38, -189.45, -90.5, 2.55)
pt3dadd(80.55, -189.25, -90.5, 2.55)
pt3dadd(80.73, -188.84, -90.5, 2.55)
pt3dadd(80.91, -188.64, -90.5, 2.55)
pt3dadd(80.91, -188.03, -90.5, 2.55)
pt3dadd(81.27, -187.63, -90.5, 2.55)
pt3dadd(81.45, -187.02, -90.5, 2.55)
pt3dadd(81.62, -186.61, -90.5, 2.55)
pt3dadd(81.8, -186.21, -90.5, 2.55)
pt3dadd(81.98, -185.6, -90.5, 2.55)
pt3dadd(82.16, -185.19, -90.5, 2.55)
pt3dadd(82.34, -184.79, -90.5, 2.55)
pt3dadd(82.52, -184.18, -90.5, 2.55)
pt3dadd(82.69, -183.57, -90.5, 2.55)
pt3dadd(82.87, -183.37, -90.5, 2.55)
pt3dadd(83.05, -182.56, -90.5, 2.55)
pt3dadd(83.23, -181.95, -90.5, 2.55)
pt3dadd(83.41, -181.35, -90.5, 2.55)
pt3dadd(83.59, -180.74, -90.5, 2.55)
pt3dadd(83.76, -180.13, -90.5, 2.55)
pt3dadd(83.94, -179.73, -90.5, 2.55)
pt3dadd(84.12, -178.92, -90.5, 2.55)
pt3dadd(84.3, -178.31, -90.5, 2.55)
pt3dadd(84.66, -177.5, -90.5, 2.55)
pt3dadd(84.83, -177.09, -90.5, 2.55)
pt3dadd(84.83, -176.49, -90.5, 2.55)
pt3dadd(85.19, -176.08, -90.5, 2.55)
pt3dadd(85.37, -175.68, -90.5, 2.55)
pt3dadd(85.55, -175.07, -90.5, 2.55)
pt3dadd(85.73, -174.66, -90.5, 2.55)
pt3dadd(85.9, -174.05, -90.5, 2.55)
pt3dadd(86.08, -173.45, -90.5, 2.55)
pt3dadd(86.26, -173.04, -90.5, 2.55)
pt3dadd(86.44, -172.43, -90.5, 2.55)
pt3dadd(86.62, -171.83, -90.5, 2.55)
pt3dadd(86.8, -171.42, -90.5, 2.55)
pt3dadd(86.97, -171.02, -90.5, 2.55)
pt3dadd(87.15, -170.41, -90.5, 2.55)
pt3dadd(87.33, -170, -90.5, 2.55)
pt3dadd(87.33, -169.4, -90.5, 2.55)
pt3dadd(87.51, -168.79, -90.5, 2.55)
pt3dadd(87.69, -168.59, -90.5, 2.55)
pt3dadd(87.69, -167.98, -90.5, 2.55)
pt3dadd(87.87, -167.57, -90.5, 2.55)
pt3dadd(88.04, -167.17, -90.5, 2.55)
pt3dadd(88.22, -166.56, -90.5, 2.55)
pt3dadd(88.4, -166.16, -90.5, 2.55)
pt3dadd(88.4, -165.75, -90.5, 2.55)
pt3dadd(88.76, -165.14, -90.5, 2.55)
pt3dadd(88.94, -164.74, -90.5, 2.55)
pt3dadd(88.94, -164.33, -90.5, 2.55)
pt3dadd(89.11, -163.93, -90.5, 2.55)
pt3dadd(89.29, -163.32, -90.5, 2.55)
pt3dadd(89.47, -162.71, -90.5, 2.55)
pt3dadd(89.65, -162.51, -90.5, 2.55)
pt3dadd(89.83, -161.9, -90.5, 2.55)
pt3dadd(90.01, -161.29, -90.5, 2.55)
pt3dadd(90.18, -160.89, -90.5, 2.55)
pt3dadd(90.36, -160.48, -90.5, 2.55)
pt3dadd(90.36, -160.08, -90.5, 2.55)
pt3dadd(90.54, -159.67, -90.5, 2.55)
pt3dadd(90.72, -159.07, -90.5, 2.55)
pt3dadd(90.9, -158.66, -90.5, 2.55)
pt3dadd(91.08, -158.26, -90.5, 2.55)
pt3dadd(91.08, -157.45, -90.5, 2.55)
pt3dadd(91.25, -157.04, -90.5, 2.55)
pt3dadd(91.43, -156.64, -90.5, 2.55)
pt3dadd(91.43, -156.03, -90.5, 2.55)
pt3dadd(91.61, -155.42, -90.5, 2.55)
pt3dadd(91.79, -155.02, -90.5, 2.55)
pt3dadd(91.97, -154.81, -90.5, 2.55)
pt3dadd(91.97, -154.41, -90.5, 2.55)
pt3dadd(92.15, -153.8, -90.5, 2.55)
pt3dadd(92.15, -153.4, -90.5, 2.55)
pt3dadd(92.32, -152.79, -90.5, 2.55)
pt3dadd(92.32, -151.37, -90.5, 2.55)
pt3dadd(91.43, -152.38, -88.4, 2.55)
pt3dadd(91.61, -152.18, -88.4, 2.55)
pt3dadd(91.79, -151.98, -88.4, 2.55)
pt3dadd(91.97, -151.57, -88.4, 2.55)
pt3dadd(92.15, -150.96, -88.4, 2.55)
pt3dadd(92.32, -150.76, -88.4, 2.55)
pt3dadd(92.68, -150.56, -88.4, 2.55)
pt3dadd(92.86, -150.15, -88.4, 2.55)
pt3dadd(93.22, -149.55, -88.4, 2.55)
pt3dadd(93.39, -149.14, -88.4, 2.55)
pt3dadd(93.57, -148.74, -88.4, 2.55)
pt3dadd(93.75, -148.33, -88.4, 2.55)
pt3dadd(93.93, -148.13, -88.4, 2.55)
pt3dadd(94.11, -147.72, -88.4, 2.55)
pt3dadd(94.29, -147.32, -88.4, 2.55)
pt3dadd(94.46, -147.12, -88.4, 2.55)
pt3dadd(94.64, -146.71, -88.4, 2.55)
pt3dadd(94.82, -146.31, -88.4, 2.55)
pt3dadd(95, -145.9, -88.4, 2.55)
pt3dadd(95.36, -145.29, -88.4, 2.55)
pt3dadd(95.53, -144.89, -88.4, 2.55)
pt3dadd(95.71, -144.48, -88.4, 2.55)
pt3dadd(95.89, -144.28, -88.4, 2.55)
pt3dadd(96.07, -143.88, -88.4, 2.55)
pt3dadd(96.25, -143.67, -88.4, 2.55)
pt3dadd(96.25, -143.27, -88.4, 2.55)
pt3dadd(96.6, -142.86, -88.4, 2.55)
pt3dadd(96.78, -142.66, -88.4, 2.55)
pt3dadd(96.96, -142.26, -88.4, 2.55)
pt3dadd(97.14, -142.05, -88.4, 2.55)
pt3dadd(97.32, -141.65, -88.4, 2.55)
pt3dadd(97.49, -141.24, -88.4, 2.55)
pt3dadd(97.49, -140.84, -88.4, 2.55)
pt3dadd(97.67, -140.63, -88.4, 2.55)
pt3dadd(97.85, -140.43, -88.4, 2.55)
pt3dadd(98.03, -140.03, -88.4, 2.55)
pt3dadd(98.21, -139.62, -88.4, 2.55)
pt3dadd(98.39, -139.22, -88.4, 2.55)
pt3dadd(98.39, -138.81, -88.4, 2.55)
pt3dadd(98.56, -138.61, -88.4, 2.55)
pt3dadd(98.74, -138.2, -88.4, 2.55)
pt3dadd(98.92, -138, -88.4, 2.55)
pt3dadd(98.92, -137.6, -88.4, 2.55)
pt3dadd(99.1, -137.39, -88.4, 2.55)
pt3dadd(99.28, -137.19, -88.4, 2.55)
pt3dadd(99.28, -136.79, -88.4, 2.55)
pt3dadd(99.46, -136.58, -88.4, 2.55)
pt3dadd(99.63, -136.18, -88.4, 2.55)
pt3dadd(99.63, -135.77, -88.4, 2.55)
}
}
proc shape3d_75() {
dend[48] { pt3dadd(99.81, -135.57, -88.4, 2.55)
pt3dadd(99.99, -135.17, -88.4, 2.55)
pt3dadd(100.17, -134.76, -88.4, 2.55)
pt3dadd(100.35, -134.56, -88.4, 2.55)
pt3dadd(99.63, -135.37, -87.35, 2.55)
pt3dadd(99.81, -134.96, -87.35, 2.55)
pt3dadd(100.17, -134.56, -87.35, 2.55)
pt3dadd(100.35, -134.15, -87.35, 2.55)
pt3dadd(100.7, -133.95, -87.35, 2.55)
pt3dadd(101.06, -133.55, -87.35, 2.55)
pt3dadd(101.24, -133.14, -87.35, 2.55)
pt3dadd(101.42, -132.74, -87.35, 2.55)
pt3dadd(101.77, -132.33, -87.35, 2.55)
pt3dadd(101.95, -131.72, -87.35, 2.55)
pt3dadd(102.49, -131.12, -87.35, 2.55)
pt3dadd(102.84, -130.51, -87.35, 2.55)
pt3dadd(103.2, -130.3, -87.35, 2.55)
pt3dadd(103.38, -129.9, -87.35, 2.55)
pt3dadd(103.56, -129.7, -87.35, 2.55)
pt3dadd(103.74, -129.29, -87.35, 2.55)
pt3dadd(104.63, -128.28, -87.35, 2.55)
pt3dadd(104.81, -128.08, -87.35, 2.55)
pt3dadd(104.98, -127.67, -87.35, 2.55)
pt3dadd(105.16, -127.47, -87.35, 2.55)
pt3dadd(105.34, -127.27, -87.35, 2.55)
pt3dadd(105.52, -126.86, -87.35, 2.55)
pt3dadd(105.7, -126.46, -87.35, 2.55)
pt3dadd(106.05, -126.25, -87.35, 2.55)
pt3dadd(106.23, -125.85, -87.35, 2.55)
pt3dadd(106.41, -125.44, -87.35, 2.55)
pt3dadd(106.59, -125.04, -87.35, 2.55)
pt3dadd(106.77, -124.84, -87.35, 2.55)
pt3dadd(107.12, -124.43, -87.35, 2.55)
pt3dadd(107.3, -124.03, -87.35, 2.55)
pt3dadd(107.48, -123.62, -87.35, 2.55)
pt3dadd(107.66, -123.22, -87.35, 2.55)
pt3dadd(108.02, -122.81, -87.35, 2.55)
pt3dadd(108.37, -122.2, -87.35, 2.55)
pt3dadd(108.73, -121.6, -87.35, 2.55)
pt3dadd(109.26, -120.58, -87.35, 2.55)
pt3dadd(109.44, -120.18, -87.35, 2.55)
pt3dadd(109.98, -119.37, -87.35, 2.55)
pt3dadd(110.33, -118.96, -87.35, 2.55)
pt3dadd(110.51, -118.56, -87.35, 2.55)
pt3dadd(110.87, -117.95, -87.35, 2.55)
pt3dadd(111.05, -117.54, -87.35, 2.55)
pt3dadd(111.4, -117.14, -87.35, 2.55)
pt3dadd(111.58, -116.73, -87.35, 2.55)
pt3dadd(111.94, -116.13, -87.35, 2.55)
pt3dadd(112.12, -115.72, -87.35, 2.55)
pt3dadd(112.3, -115.32, -87.35, 2.55)
pt3dadd(112.65, -114.91, -87.35, 2.55)
pt3dadd(112.83, -114.3, -87.35, 2.55)
pt3dadd(113.19, -114.1, -87.35, 2.55)
pt3dadd(113.37, -113.7, -87.35, 2.55)
pt3dadd(113.54, -113.29, -87.35, 2.55)
pt3dadd(113.72, -112.89, -87.35, 2.55)
pt3dadd(114.08, -112.48, -87.35, 2.55)
pt3dadd(114.26, -112.08, -87.35, 2.55)
pt3dadd(114.44, -111.67, -87.35, 2.55)
pt3dadd(114.61, -111.47, -87.35, 2.55)
pt3dadd(115.33, -110.66, -87.35, 2.55)
pt3dadd(115.33, -110.25, -87.35, 2.55)
pt3dadd(115.68, -110.05, -87.35, 2.55)
pt3dadd(115.86, -109.65, -87.35, 2.55)
pt3dadd(116.04, -109.24, -87.35, 2.55)
pt3dadd(116.22, -108.84, -87.35, 2.55)
pt3dadd(116.58, -108.63, -87.35, 2.55)
pt3dadd(116.75, -108.23, -87.35, 2.55)
pt3dadd(116.75, -107.62, -87.35, 2.55)
pt3dadd(117.11, -107.21, -87.35, 2.55)
pt3dadd(117.29, -106.81, -87.35, 2.55)
pt3dadd(117.47, -106.4, -87.35, 2.55)
pt3dadd(117.65, -106.2, -87.35, 2.55)
pt3dadd(117.82, -106, -87.35, 2.55)
pt3dadd(118, -105.59, -87.35, 2.55)
pt3dadd(118.36, -105.19, -87.35, 2.55)
pt3dadd(118.54, -104.78, -87.35, 2.55)
pt3dadd(118.72, -104.38, -87.35, 2.55)
pt3dadd(118.89, -104.18, -87.35, 2.55)
pt3dadd(119.07, -103.97, -87.35, 2.55)
pt3dadd(119.25, -103.77, -87.35, 2.55)
pt3dadd(119.25, -103.37, -87.35, 2.55)
pt3dadd(119.43, -103.16, -87.35, 2.55)
pt3dadd(119.61, -102.76, -87.35, 2.55)
pt3dadd(119.79, -102.56, -87.35, 2.55)
pt3dadd(119.96, -102.15, -87.35, 2.55)
pt3dadd(120.14, -101.95, -87.35, 2.55)
pt3dadd(120.32, -101.54, -87.35, 2.55)
pt3dadd(120.5, -101.14, -87.35, 2.55)
pt3dadd(119.43, -102.15, -86.3, 2.55)
pt3dadd(119.43, -102.76, -86.3, 2.55)
pt3dadd(119.79, -102.56, -86.3, 2.55)
pt3dadd(120.5, -101.75, -86.3, 2.55)
pt3dadd(120.68, -101.34, -86.3, 2.55)
pt3dadd(120.86, -100.94, -86.3, 2.55)
pt3dadd(121.21, -100.53, -86.3, 2.55)
pt3dadd(121.39, -100.13, -86.3, 2.55)
pt3dadd(121.75, -99.52, -86.3, 2.55)
pt3dadd(121.93, -99.11, -86.3, 2.55)
pt3dadd(122.1, -98.71, -86.3, 2.55)
pt3dadd(122.64, -98.3, -86.3, 2.55)
pt3dadd(122.82, -97.7, -86.3, 2.55)
pt3dadd(123, -97.29, -86.3, 2.55)
pt3dadd(123.35, -96.88, -86.3, 2.55)
pt3dadd(123.53, -96.48, -86.3, 2.55)
pt3dadd(123.71, -95.87, -86.3, 2.55)
pt3dadd(124.07, -95.47, -86.3, 2.55)
pt3dadd(124.07, -95.06, -86.3, 2.55)
pt3dadd(124.42, -94.45, -86.3, 2.55)
pt3dadd(124.6, -94.05, -86.3, 2.55)
pt3dadd(124.96, -93.85, -86.3, 2.55)
pt3dadd(125.14, -93.24, -86.3, 2.55)
pt3dadd(125.31, -92.83, -86.3, 2.55)
pt3dadd(125.67, -92.23, -86.3, 2.55)
pt3dadd(125.85, -91.82, -86.3, 2.55)
pt3dadd(126.03, -91.42, -86.3, 2.55)
pt3dadd(126.21, -91.01, -86.3, 2.55)
pt3dadd(126.56, -90.81, -86.3, 2.55)
pt3dadd(126.74, -90.4, -86.3, 2.55)
pt3dadd(126.92, -89.8, -86.3, 2.55)
pt3dadd(127.28, -89.39, -86.3, 2.55)
pt3dadd(127.45, -88.78, -86.3, 2.55)
pt3dadd(127.63, -88.38, -86.3, 2.55)
pt3dadd(127.81, -87.97, -86.3, 2.55)
pt3dadd(127.99, -87.77, -86.3, 2.55)
pt3dadd(128.17, -87.16, -86.3, 2.55)
pt3dadd(128.52, -86.76, -86.3, 2.55)
pt3dadd(128.7, -86.35, -86.3, 2.55)
pt3dadd(129.06, -85.95, -86.3, 2.55)
pt3dadd(129.24, -85.54, -86.3, 2.55)
pt3dadd(129.42, -85.14, -86.3, 2.55)
pt3dadd(129.59, -84.73, -86.3, 2.55)
pt3dadd(129.95, -84.33, -86.3, 2.55)
pt3dadd(130.31, -83.92, -86.3, 2.55)
pt3dadd(130.66, -83.11, -86.3, 2.55)
pt3dadd(130.84, -82.71, -86.3, 2.55)
pt3dadd(131.38, -82.3, -86.3, 2.55)
pt3dadd(131.56, -81.69, -86.3, 2.55)
pt3dadd(131.73, -81.09, -86.3, 2.55)
pt3dadd(132.09, -80.48, -86.3, 2.55)
pt3dadd(132.27, -79.87, -86.3, 2.55)
pt3dadd(132.45, -79.47, -86.3, 2.55)
pt3dadd(132.8, -78.86, -86.3, 2.55)
pt3dadd(132.98, -78.25, -86.3, 2.55)
pt3dadd(133.16, -77.85, -86.3, 2.55)
pt3dadd(133.52, -77.44, -86.3, 2.55)
pt3dadd(133.7, -76.83, -86.3, 2.55)
pt3dadd(133.87, -76.43, -86.3, 2.55)
pt3dadd(134.05, -76.02, -86.3, 2.55)
pt3dadd(134.41, -75.62, -86.3, 2.55)
pt3dadd(134.41, -75.21, -86.3, 2.55)
pt3dadd(134.77, -74.81, -86.3, 2.55)
pt3dadd(134.94, -74.6, -86.3, 2.55)
pt3dadd(135.12, -74.2, -86.3, 2.55)
pt3dadd(135.3, -73.79, -86.3, 2.55)
pt3dadd(135.48, -73.39, -86.3, 2.55)
pt3dadd(135.84, -72.98, -86.3, 2.55)
pt3dadd(136.01, -72.58, -86.3, 2.55)
pt3dadd(136.19, -72.17, -86.3, 2.55)
pt3dadd(136.37, -71.77, -86.3, 2.55)
pt3dadd(136.55, -71.36, -86.3, 2.55)
pt3dadd(136.73, -70.96, -86.3, 2.55)
pt3dadd(136.91, -70.55, -86.3, 2.55)
pt3dadd(137.08, -70.15, -86.3, 2.55)
pt3dadd(137.26, -69.54, -86.3, 2.55)
pt3dadd(137.44, -69.14, -86.3, 2.55)
pt3dadd(137.62, -68.73, -86.3, 2.55)
pt3dadd(137.8, -68.33, -86.3, 2.55)
pt3dadd(137.98, -67.92, -86.3, 2.55)
pt3dadd(138.33, -67.31, -86.3, 2.55)
pt3dadd(138.51, -66.91, -86.3, 2.55)
pt3dadd(138.69, -66.3, -86.3, 2.55)
pt3dadd(138.87, -65.69, -86.3, 2.55)
pt3dadd(139.22, -65.29, -86.3, 2.55)
pt3dadd(139.4, -64.68, -86.3, 2.55)
pt3dadd(139.4, -64.27, -86.3, 2.55)
pt3dadd(139.76, -63.67, -86.3, 2.55)
pt3dadd(139.94, -63.26, -86.3, 2.55)
pt3dadd(139.94, -62.45, -86.3, 2.55)
pt3dadd(140.29, -62.05, -86.3, 2.55)
pt3dadd(140.47, -61.24, -86.3, 2.55)
pt3dadd(140.65, -60.83, -86.3, 2.55)
pt3dadd(140.83, -60.22, -86.3, 2.55)
pt3dadd(141.19, -59.62, -86.3, 2.55)
pt3dadd(141.36, -59.21, -86.3, 2.55)
pt3dadd(141.54, -58.6, -86.3, 2.55)
pt3dadd(141.72, -58.2, -86.3, 2.55)
pt3dadd(141.9, -57.59, -86.3, 2.55)
pt3dadd(142.08, -57.39, -86.3, 2.55)
pt3dadd(142.26, -56.78, -86.3, 2.55)
pt3dadd(142.43, -56.38, -86.3, 2.55)
pt3dadd(142.61, -55.97, -86.3, 2.55)
pt3dadd(142.79, -55.57, -86.3, 2.55)
pt3dadd(143.15, -54.96, -86.3, 2.55)
pt3dadd(143.15, -54.55, -86.3, 2.55)
pt3dadd(143.5, -54.35, -86.3, 2.55)
pt3dadd(143.68, -53.95, -86.3, 2.55)
pt3dadd(143.68, -53.54, -86.3, 2.55)
pt3dadd(143.86, -53.34, -86.3, 2.55)
}
}
proc shape3d_76() {
dend[48] { pt3dadd(144.04, -52.93, -86.3, 2.55)
pt3dadd(144.22, -52.53, -86.3, 2.55)
pt3dadd(144.4, -51.92, -86.3, 2.55)
pt3dadd(144.75, -51.51, -86.3, 2.55)
pt3dadd(144.75, -51.11, -86.3, 2.55)
pt3dadd(144.93, -50.91, -86.3, 2.55)
pt3dadd(145.11, -50.5, -86.3, 2.55)
pt3dadd(145.29, -50.3, -86.3, 2.55)
pt3dadd(145.29, -49.89, -86.3, 2.55)
pt3dadd(145.47, -49.49, -86.3, 2.55)
pt3dadd(145.64, -49.29, -86.3, 2.55)
pt3dadd(145.64, -48.68, -86.3, 2.55)
pt3dadd(145.82, -48.48, -86.3, 2.55)
pt3dadd(145.82, -47.87, -86.3, 2.55)
pt3dadd(145.47, -47.87, -84.2, 2.55)
pt3dadd(145.47, -48.48, -84.2, 2.55)
pt3dadd(145.64, -48.27, -84.2, 2.55)
pt3dadd(145.82, -47.87, -84.2, 2.55)
pt3dadd(146, -47.67, -84.2, 2.55)
pt3dadd(146.18, -47.26, -84.2, 2.55)
pt3dadd(146.71, -46.65, -84.2, 2.55)
pt3dadd(146.89, -46.25, -84.2, 2.55)
pt3dadd(147.07, -45.84, -84.2, 2.55)
pt3dadd(147.25, -45.44, -84.2, 2.55)
pt3dadd(147.43, -45.03, -84.2, 2.55)
pt3dadd(147.61, -44.43, -84.2, 2.55)
pt3dadd(147.96, -44.02, -84.2, 2.55)
pt3dadd(148.14, -43.41, -84.2, 2.55)
pt3dadd(148.5, -43.01, -84.2, 2.55)
pt3dadd(148.68, -42.6, -84.2, 2.55)
pt3dadd(148.85, -42.2, -84.2, 2.55)
pt3dadd(149.03, -41.79, -84.2, 2.55)
pt3dadd(149.39, -41.59, -84.2, 2.55)
pt3dadd(149.57, -40.98, -84.2, 2.55)
pt3dadd(149.75, -40.58, -84.2, 2.55)
pt3dadd(150.1, -39.97, -84.2, 2.55)
pt3dadd(150.28, -39.56, -84.2, 2.55)
pt3dadd(150.64, -39.16, -84.2, 2.55)
pt3dadd(150.82, -38.55, -84.2, 2.55)
pt3dadd(150.99, -38.15, -84.2, 2.55)
pt3dadd(151.17, -37.74, -84.2, 2.55)
pt3dadd(151.35, -37.13, -84.2, 2.55)
pt3dadd(151.53, -36.73, -84.2, 2.55)
pt3dadd(151.89, -36.32, -84.2, 2.55)
pt3dadd(152.06, -35.92, -84.2, 2.55)
pt3dadd(152.24, -35.51, -84.2, 2.55)
pt3dadd(152.6, -35.11, -84.2, 2.55)
pt3dadd(152.96, -34.5, -84.2, 2.55)
pt3dadd(153.13, -34.1, -84.2, 2.55)
pt3dadd(153.31, -33.69, -84.2, 2.55)
pt3dadd(153.67, -33.29, -84.2, 2.55)
pt3dadd(153.85, -32.88, -84.2, 2.55)
pt3dadd(154.03, -32.68, -84.2, 2.55)
pt3dadd(154.38, -32.27, -84.2, 2.55)
pt3dadd(154.56, -31.87, -84.2, 2.55)
pt3dadd(154.74, -31.26, -84.2, 2.55)
pt3dadd(154.92, -31.06, -84.2, 2.55)
pt3dadd(155.27, -30.65, -84.2, 2.55)
pt3dadd(155.45, -30.04, -84.2, 2.55)
pt3dadd(155.63, -29.64, -84.2, 2.55)
pt3dadd(155.99, -29.23, -84.2, 2.55)
pt3dadd(156.17, -29.03, -84.2, 2.55)
pt3dadd(156.34, -28.42, -84.2, 2.55)
pt3dadd(156.7, -28.02, -84.2, 2.55)
pt3dadd(156.88, -27.61, -84.2, 2.55)
pt3dadd(157.06, -27.01, -84.2, 2.55)
pt3dadd(157.24, -26.6, -84.2, 2.55)
pt3dadd(157.77, -26.2, -84.2, 2.55)
pt3dadd(157.77, -25.79, -84.2, 2.55)
pt3dadd(158.13, -25.39, -84.2, 2.55)
pt3dadd(158.31, -24.78, -84.2, 2.55)
pt3dadd(158.66, -23.97, -84.2, 2.55)
pt3dadd(158.84, -23.56, -84.2, 2.55)
pt3dadd(159.02, -23.16, -84.2, 2.55)
pt3dadd(159.38, -22.75, -84.2, 2.55)
pt3dadd(159.55, -22.35, -84.2, 2.55)
pt3dadd(159.73, -21.94, -84.2, 2.55)
pt3dadd(160.09, -21.54, -84.2, 2.55)
pt3dadd(160.09, -21.13, -84.2, 2.55)
pt3dadd(160.45, -20.73, -84.2, 2.55)
pt3dadd(160.62, -20.32, -84.2, 2.55)
pt3dadd(160.8, -20.12, -84.2, 2.55)
pt3dadd(160.98, -19.71, -84.2, 2.55)
pt3dadd(161.34, -19.11, -84.2, 2.55)
pt3dadd(161.51, -18.7, -84.2, 2.55)
pt3dadd(161.87, -18.3, -84.2, 2.55)
pt3dadd(162.05, -17.89, -84.2, 2.55)
pt3dadd(162.41, -17.69, -84.2, 2.55)
pt3dadd(162.58, -17.28, -84.2, 2.55)
pt3dadd(162.76, -16.68, -84.2, 2.55)
pt3dadd(163.3, -16.07, -84.2, 2.55)
pt3dadd(163.48, -15.66, -84.2, 2.55)
pt3dadd(163.83, -15.26, -84.2, 2.55)
pt3dadd(164.01, -15.06, -84.2, 2.55)
pt3dadd(164.37, -14.65, -84.2, 2.55)
pt3dadd(164.55, -14.25, -84.2, 2.55)
pt3dadd(164.72, -14.04, -84.2, 2.55)
pt3dadd(165.08, -13.64, -84.2, 2.55)
pt3dadd(165.26, -13.23, -84.2, 2.55)
pt3dadd(165.44, -12.83, -84.2, 2.55)
pt3dadd(165.62, -12.42, -84.2, 2.55)
pt3dadd(166.15, -11.41, -84.2, 2.55)
pt3dadd(166.33, -11.01, -84.2, 2.55)
pt3dadd(166.51, -10.8, -84.2, 2.55)
pt3dadd(166.69, -10.4, -84.2, 2.55)
pt3dadd(166.86, -9.79, -84.2, 2.55)
pt3dadd(167.22, -9.59, -84.2, 2.55)
pt3dadd(167.4, -9.18, -84.2, 2.55)
pt3dadd(167.58, -8.98, -84.2, 2.55)
pt3dadd(167.93, -8.37, -84.2, 2.55)
pt3dadd(168.11, -8.17, -84.2, 2.55)
pt3dadd(168.29, -7.97, -84.2, 2.55)
pt3dadd(168.65, -7.76, -84.2, 2.55)
pt3dadd(169.18, -7.16, -84.2, 2.55)
pt3dadd(169.36, -6.95, -84.2, 2.55)
pt3dadd(169.54, -6.55, -84.2, 2.55)
pt3dadd(169.72, -6.35, -84.2, 2.55)
pt3dadd(169.9, -5.94, -84.2, 2.55)
pt3dadd(170.43, -5.33, -84.2, 2.55)
pt3dadd(170.79, -5.13, -84.2, 2.55)
pt3dadd(170.97, -4.73, -84.2, 2.55)
pt3dadd(171.32, -4.73, -84.2, 2.55)
pt3dadd(171.5, -4.52, -84.2, 2.55)
pt3dadd(170.79, -5.33, -83.15, 2.55)
pt3dadd(170.79, -5.13, -83.15, 2.55)
pt3dadd(170.97, -4.93, -83.15, 2.55)
pt3dadd(171.32, -4.52, -83.15, 2.55)
pt3dadd(171.5, -4.32, -83.15, 2.55)
pt3dadd(172.21, -3.51, -83.15, 2.55)
pt3dadd(172.21, -3.11, -83.15, 2.55)
pt3dadd(172.57, -2.7, -83.15, 2.55)
pt3dadd(172.93, -2.3, -83.15, 2.55)
pt3dadd(172.93, -1.69, -83.15, 2.55)
pt3dadd(173.28, -1.28, -83.15, 2.55)
pt3dadd(173.46, -1.08, -83.15, 2.55)
pt3dadd(173.82, -0.47, -83.15, 2.55)
pt3dadd(174, -0.07, -83.15, 2.55)
pt3dadd(174.35, 0.34, -83.15, 2.55)
pt3dadd(174.53, 0.94, -83.15, 2.55)
pt3dadd(174.71, 1.15, -83.15, 2.55)
pt3dadd(174.89, 1.55, -83.15, 2.55)
pt3dadd(175.25, 1.96, -83.15, 2.55)
pt3dadd(175.42, 2.36, -83.15, 2.55)
pt3dadd(175.6, 2.97, -83.15, 2.55)
pt3dadd(175.78, 3.38, -83.15, 2.55)
pt3dadd(175.96, 3.78, -83.15, 2.55)
pt3dadd(176.14, 4.19, -83.15, 2.55)
pt3dadd(176.49, 4.79, -83.15, 2.55)
pt3dadd(176.49, 5.2, -83.15, 2.55)
pt3dadd(176.85, 5.6, -83.15, 2.55)
pt3dadd(177.03, 6.21, -83.15, 2.55)
pt3dadd(177.21, 6.82, -83.15, 2.55)
pt3dadd(177.56, 7.22, -83.15, 2.55)
pt3dadd(177.74, 7.83, -83.15, 2.55)
pt3dadd(177.92, 8.24, -83.15, 2.55)
pt3dadd(178.28, 8.64, -83.15, 2.55)
pt3dadd(178.46, 9.45, -83.15, 2.55)
pt3dadd(178.63, 9.86, -83.15, 2.55)
pt3dadd(178.81, 10.26, -83.15, 2.55)
pt3dadd(178.99, 10.67, -83.15, 2.55)
pt3dadd(179.35, 11.07, -83.15, 2.55)
pt3dadd(179.53, 11.48, -83.15, 2.55)
pt3dadd(179.7, 11.68, -83.15, 2.55)
pt3dadd(180.06, 12.29, -83.15, 2.55)
pt3dadd(180.24, 12.69, -83.15, 2.55)
pt3dadd(180.42, 12.9, -83.15, 2.55)
pt3dadd(180.6, 13.1, -83.15, 2.55)
pt3dadd(180.77, 13.5, -83.15, 2.55)
pt3dadd(180.95, 13.91, -83.15, 2.55)
pt3dadd(181.13, 14.31, -83.15, 2.55)
pt3dadd(181.49, 14.72, -83.15, 2.55)
pt3dadd(181.49, 15.12, -83.15, 2.55)
pt3dadd(181.84, 15.53, -83.15, 2.55)
pt3dadd(181.84, 15.93, -83.15, 2.55)
pt3dadd(182.2, 16.14, -83.15, 2.55)
pt3dadd(182.2, 16.74, -83.15, 2.55)
pt3dadd(182.56, 17.15, -83.15, 2.55)
pt3dadd(182.74, 17.55, -83.15, 2.55)
pt3dadd(182.91, 17.96, -83.15, 2.55)
pt3dadd(183.09, 18.16, -83.15, 2.55)
pt3dadd(183.09, 18.57, -83.15, 2.55)
pt3dadd(183.27, 18.97, -83.15, 2.55)
pt3dadd(183.63, 19.38, -83.15, 2.55)
pt3dadd(183.63, 19.78, -83.15, 2.55)
pt3dadd(183.98, 20.19, -83.15, 2.55)
pt3dadd(184.16, 20.39, -83.15, 2.55)
pt3dadd(184.34, 20.79, -83.15, 2.55)
pt3dadd(184.52, 21, -83.15, 2.55)
pt3dadd(184.52, 21.4, -83.15, 2.55)
pt3dadd(185.23, 22.21, -83.15, 2.55)
pt3dadd(185.23, 22.62, -83.15, 2.55)
pt3dadd(185.59, 22.82, -83.15, 2.55)
pt3dadd(185.77, 23.23, -83.15, 2.55)
pt3dadd(185.95, 23.43, -83.15, 2.55)
pt3dadd(186.12, 23.63, -83.15, 2.55)
pt3dadd(186.12, 24.04, -83.15, 2.55)
pt3dadd(186.3, 24.24, -83.15, 2.55)
pt3dadd(186.48, 24.64, -83.15, 2.55)
pt3dadd(186.84, 24.85, -83.15, 2.55)
pt3dadd(186.84, 25.45, -83.15, 2.55)
}
}
proc shape3d_77() {
dend[48] { pt3dadd(187.02, 25.66, -83.15, 2.55)
pt3dadd(187.19, 26.06, -83.15, 2.55)
pt3dadd(187.37, 26.47, -83.15, 2.55)
pt3dadd(187.55, 26.87, -83.15, 2.55)
pt3dadd(187.73, 27.07, -83.15, 2.55)
pt3dadd(187.91, 27.48, -83.15, 2.55)
pt3dadd(188.09, 27.88, -83.15, 2.55)
pt3dadd(188.26, 28.29, -83.15, 2.55)
pt3dadd(188.62, 28.9, -83.15, 2.55)
pt3dadd(188.8, 29.3, -83.15, 2.55)
pt3dadd(188.98, 29.71, -83.15, 2.55)
pt3dadd(189.33, 30.11, -83.15, 2.55)
pt3dadd(189.51, 30.52, -83.15, 2.55)
pt3dadd(189.69, 30.92, -83.15, 2.55)
pt3dadd(189.87, 31.12, -83.15, 2.55)
pt3dadd(190.05, 31.33, -83.15, 2.55)
pt3dadd(190.23, 31.53, -83.15, 2.55)
pt3dadd(190.4, 32.14, -83.15, 2.55)
pt3dadd(190.4, 32.54, -83.15, 2.55)
pt3dadd(190.58, 32.74, -83.15, 2.55)
pt3dadd(190.76, 32.95, -83.15, 2.55)
pt3dadd(190.94, 33.35, -83.15, 2.55)
pt3dadd(191.12, 33.76, -83.15, 2.55)
pt3dadd(191.3, 33.96, -83.15, 2.55)
pt3dadd(191.3, 34.37, -83.15, 2.55)
pt3dadd(191.47, 34.77, -83.15, 2.55)
pt3dadd(191.65, 35.18, -83.15, 2.55)
pt3dadd(191.83, 35.38, -83.15, 2.55)
pt3dadd(192.01, 35.78, -83.15, 2.55)
pt3dadd(192.01, 36.19, -83.15, 2.55)
pt3dadd(192.37, 36.8, -83.15, 2.55)
pt3dadd(192.37, 37.4, -83.15, 2.55)
pt3dadd(192.72, 38.01, -83.15, 2.55)
pt3dadd(192.72, 38.82, -83.15, 2.55)
pt3dadd(190.05, 34.16, -81.05, 2.55)
pt3dadd(190.23, 34.37, -81.05, 2.55)
pt3dadd(190.23, 34.77, -81.05, 2.55)
pt3dadd(190.4, 34.97, -81.05, 2.55)
pt3dadd(190.58, 35.38, -81.05, 2.55)
pt3dadd(190.76, 35.78, -81.05, 2.55)
pt3dadd(191.12, 36.19, -81.05, 2.55)
pt3dadd(191.12, 36.59, -81.05, 2.55)
pt3dadd(191.3, 37, -81.05, 2.55)
pt3dadd(191.47, 37.4, -81.05, 2.55)
pt3dadd(191.65, 37.61, -81.05, 2.55)
pt3dadd(192.01, 38.21, -81.05, 2.55)
pt3dadd(192.01, 38.62, -81.05, 2.55)
pt3dadd(192.54, 39.43, -81.05, 2.55)
pt3dadd(192.72, 39.63, -81.05, 2.55)
pt3dadd(192.9, 40.24, -81.05, 2.55)
pt3dadd(193.08, 40.64, -81.05, 2.55)
pt3dadd(193.44, 41.25, -81.05, 2.55)
pt3dadd(193.61, 41.66, -81.05, 2.55)
pt3dadd(194.15, 42.26, -81.05, 2.55)
pt3dadd(194.33, 42.67, -81.05, 2.55)
pt3dadd(194.51, 43.28, -81.05, 2.55)
pt3dadd(194.86, 43.68, -81.05, 2.55)
pt3dadd(195.04, 44.09, -81.05, 2.55)
pt3dadd(195.22, 44.69, -81.05, 2.55)
pt3dadd(195.4, 45.3, -81.05, 2.55)
pt3dadd(195.75, 45.91, -81.05, 2.55)
pt3dadd(195.93, 46.32, -81.05, 2.55)
pt3dadd(196.11, 46.72, -81.05, 2.55)
pt3dadd(196.29, 47.13, -81.05, 2.55)
pt3dadd(196.47, 47.53, -81.05, 2.55)
pt3dadd(196.65, 48.14, -81.05, 2.55)
pt3dadd(196.82, 48.75, -81.05, 2.55)
pt3dadd(197, 49.15, -81.05, 2.55)
pt3dadd(197.18, 49.56, -81.05, 2.55)
pt3dadd(197.36, 49.96, -81.05, 2.55)
pt3dadd(197.54, 50.37, -81.05, 2.55)
pt3dadd(197.72, 50.97, -81.05, 2.55)
pt3dadd(197.89, 51.38, -81.05, 2.55)
pt3dadd(198.07, 51.78, -81.05, 2.55)
pt3dadd(198.07, 52.39, -81.05, 2.55)
pt3dadd(198.25, 52.59, -81.05, 2.55)
pt3dadd(198.43, 53, -81.05, 2.55)
pt3dadd(198.61, 53.61, -81.05, 2.55)
pt3dadd(198.96, 54.42, -81.05, 2.55)
pt3dadd(199.14, 55.02, -81.05, 2.55)
pt3dadd(199.32, 55.43, -81.05, 2.55)
pt3dadd(199.5, 55.84, -81.05, 2.55)
pt3dadd(199.68, 56.24, -81.05, 2.55)
pt3dadd(199.68, 56.85, -81.05, 2.55)
pt3dadd(199.86, 57.25, -81.05, 2.55)
pt3dadd(200.03, 57.46, -81.05, 2.55)
pt3dadd(200.03, 58.47, -81.05, 2.55)
pt3dadd(200.21, 58.87, -81.05, 2.55)
pt3dadd(200.21, 59.68, -81.05, 2.55)
pt3dadd(200.39, 60.09, -81.05, 2.55)
pt3dadd(200.57, 60.49, -81.05, 2.55)
pt3dadd(200.57, 60.9, -81.05, 2.55)
pt3dadd(200.75, 61.3, -81.05, 2.55)
pt3dadd(200.75, 62.11, -81.05, 2.55)
pt3dadd(200.93, 62.32, -81.05, 2.55)
pt3dadd(201.1, 62.52, -81.05, 2.55)
pt3dadd(201.28, 62.92, -81.05, 2.55)
pt3dadd(201.28, 63.53, -81.05, 2.55)
pt3dadd(201.46, 63.94, -81.05, 2.55)
pt3dadd(201.64, 64.34, -81.05, 2.55)
pt3dadd(201.82, 64.75, -81.05, 2.55)
pt3dadd(202, 64.95, -81.05, 2.55)
pt3dadd(202, 65.35, -81.05, 2.55)
pt3dadd(202.17, 65.56, -81.05, 2.55)
pt3dadd(201.46, 64.95, -77.9, 2.55)
pt3dadd(201.64, 64.95, -77.9, 2.55)
pt3dadd(201.64, 65.56, -77.9, 2.55)
pt3dadd(201.82, 65.76, -77.9, 2.55)
pt3dadd(202, 66.16, -77.9, 2.55)
pt3dadd(202.17, 66.37, -77.9, 2.55)
pt3dadd(202.35, 66.77, -77.9, 2.55)
pt3dadd(202.35, 67.18, -77.9, 2.55)
pt3dadd(202.53, 67.58, -77.9, 2.55)
pt3dadd(202.71, 68.19, -77.9, 2.55)
pt3dadd(202.89, 68.8, -77.9, 2.55)
pt3dadd(203.07, 69.2, -77.9, 2.55)
pt3dadd(203.24, 69.61, -77.9, 2.55)
pt3dadd(203.42, 70.22, -77.9, 2.55)
pt3dadd(203.42, 70.62, -77.9, 2.55)
pt3dadd(203.6, 71.23, -77.9, 2.55)
pt3dadd(203.78, 71.84, -77.9, 2.55)
pt3dadd(203.78, 72.24, -77.9, 2.55)
pt3dadd(203.96, 72.85, -77.9, 2.55)
pt3dadd(203.96, 73.25, -77.9, 2.55)
pt3dadd(204.14, 73.86, -77.9, 2.55)
pt3dadd(204.31, 74.27, -77.9, 2.55)
pt3dadd(204.49, 74.87, -77.9, 2.55)
pt3dadd(204.49, 75.68, -77.9, 2.55)
pt3dadd(204.67, 76.09, -77.9, 2.55)
pt3dadd(204.85, 76.49, -77.9, 2.55)
pt3dadd(205.03, 77.1, -77.9, 2.55)
pt3dadd(205.03, 77.51, -77.9, 2.55)
pt3dadd(205.21, 78.12, -77.9, 2.55)
pt3dadd(205.38, 78.72, -77.9, 2.55)
pt3dadd(205.38, 79.33, -77.9, 2.55)
pt3dadd(205.56, 79.74, -77.9, 2.55)
pt3dadd(205.74, 80.14, -77.9, 2.55)
pt3dadd(205.74, 80.55, -77.9, 2.55)
pt3dadd(205.92, 80.95, -77.9, 2.55)
pt3dadd(205.92, 81.36, -77.9, 2.55)
pt3dadd(206.1, 81.96, -77.9, 2.55)
pt3dadd(206.1, 83.18, -77.9, 2.55)
pt3dadd(206.28, 83.58, -77.9, 2.55)
pt3dadd(206.45, 83.99, -77.9, 2.55)
pt3dadd(206.45, 84.6, -77.9, 2.55)
pt3dadd(206.63, 85, -77.9, 2.55)
pt3dadd(206.63, 86.01, -77.9, 2.55)
pt3dadd(206.81, 86.42, -77.9, 2.55)
pt3dadd(206.99, 87.03, -77.9, 2.55)
pt3dadd(206.99, 87.43, -77.9, 2.55)
pt3dadd(207.17, 88.04, -77.9, 2.55)
pt3dadd(207.17, 88.85, -77.9, 2.55)
pt3dadd(207.35, 89.46, -77.9, 2.55)
pt3dadd(207.52, 90.07, -77.9, 2.55)
pt3dadd(207.52, 90.47, -77.9, 2.55)
pt3dadd(207.7, 90.67, -77.9, 2.55)
pt3dadd(207.7, 91.28, -77.9, 2.55)
pt3dadd(207.88, 91.69, -77.9, 2.55)
pt3dadd(207.88, 92.09, -77.9, 2.55)
pt3dadd(208.06, 92.7, -77.9, 2.55)
pt3dadd(208.06, 93.31, -77.9, 2.55)
pt3dadd(208.24, 93.71, -77.9, 2.55)
pt3dadd(208.24, 95.53, -77.9, 2.55)
pt3dadd(208.42, 95.74, -77.9, 2.55)
pt3dadd(208.42, 96.55, -77.9, 2.55)
pt3dadd(208.59, 96.75, -77.9, 2.55)
pt3dadd(208.59, 97.56, -77.9, 2.55)
pt3dadd(208.77, 97.76, -77.9, 2.55)
pt3dadd(208.95, 97.96, -77.9, 2.55)
pt3dadd(208.95, 98.37, -77.9, 2.55)
pt3dadd(209.13, 98.57, -77.9, 2.55)
pt3dadd(208.42, 96.95, -77.9, 2.55)
pt3dadd(209.84, 105.26, -77.9, 2.55)
pt3dadd(209.49, 104.45, -74.75, 2.55)
pt3dadd(209.49, 112.55, -74.75, 2.55)
pt3dadd(209.66, 112.95, -74.75, 2.55)
pt3dadd(209.66, 117.41, -74.75, 2.55)
pt3dadd(209.84, 117.81, -74.75, 2.55)
pt3dadd(209.84, 120.65, -74.75, 2.55)
pt3dadd(210.02, 121.05, -74.75, 2.55)
pt3dadd(210.02, 122.07, -74.75, 2.55)
pt3dadd(210.2, 122.47, -74.75, 2.55)
pt3dadd(210.2, 125.71, -74.75, 2.55)
pt3dadd(210.38, 125.92, -74.75, 2.55)
pt3dadd(210.38, 126.73, -74.75, 2.55)
pt3dadd(210.56, 126.93, -74.75, 2.55)
pt3dadd(210.56, 127.54, -74.75, 2.55)
pt3dadd(210.2, 126.32, -71.6, 2.55)
pt3dadd(210.38, 126.93, -71.6, 2.55)
pt3dadd(210.56, 127.13, -71.6, 2.55)
pt3dadd(210.73, 127.74, -71.6, 2.55)
pt3dadd(211.09, 128.14, -71.6, 2.55)
pt3dadd(211.27, 128.55, -71.6, 2.55)
pt3dadd(211.45, 129.16, -71.6, 2.55)
pt3dadd(211.63, 129.76, -71.6, 2.55)
pt3dadd(211.8, 130.17, -71.6, 2.55)
pt3dadd(212.16, 130.98, -71.6, 2.55)
pt3dadd(212.34, 131.38, -71.6, 2.55)
pt3dadd(212.7, 131.79, -71.6, 2.55)
pt3dadd(212.87, 132.19, -71.6, 2.55)
}
}
proc shape3d_78() {
dend[48] { pt3dadd(213.05, 132.8, -71.6, 2.55)
pt3dadd(213.23, 133.21, -71.6, 2.55)
pt3dadd(213.59, 134.22, -71.6, 2.55)
pt3dadd(213.77, 134.63, -71.6, 2.55)
pt3dadd(213.94, 135.03, -71.6, 2.55)
pt3dadd(214.12, 135.64, -71.6, 2.55)
pt3dadd(214.3, 136.25, -71.6, 2.55)
pt3dadd(214.48, 136.85, -71.6, 2.55)
pt3dadd(214.66, 137.26, -71.6, 2.55)
pt3dadd(214.84, 137.66, -71.6, 2.55)
pt3dadd(215.01, 138.27, -71.6, 2.55)
pt3dadd(215.19, 138.68, -71.6, 2.55)
pt3dadd(215.19, 139.28, -71.6, 2.55)
pt3dadd(215.37, 139.89, -71.6, 2.55)
pt3dadd(215.55, 140.09, -71.6, 2.55)
pt3dadd(215.73, 140.7, -71.6, 2.55)
pt3dadd(215.91, 141.31, -71.6, 2.55)
pt3dadd(215.91, 141.71, -71.6, 2.55)
pt3dadd(216.08, 142.12, -71.6, 2.55)
pt3dadd(216.26, 142.73, -71.6, 2.55)
pt3dadd(216.44, 143.13, -71.6, 2.55)
pt3dadd(216.44, 143.74, -71.6, 2.55)
pt3dadd(216.62, 144.15, -71.6, 2.55)
pt3dadd(216.8, 144.75, -71.6, 2.55)
pt3dadd(216.8, 145.36, -71.6, 2.55)
pt3dadd(216.98, 145.77, -71.6, 2.55)
pt3dadd(217.15, 146.37, -71.6, 2.55)
pt3dadd(217.33, 146.98, -71.6, 2.55)
pt3dadd(217.33, 147.59, -71.6, 2.55)
pt3dadd(217.69, 148.2, -71.6, 2.55)
pt3dadd(217.69, 148.6, -71.6, 2.55)
pt3dadd(217.87, 149.01, -71.6, 2.55)
pt3dadd(218.05, 149.61, -71.6, 2.55)
pt3dadd(218.05, 150.02, -71.6, 2.55)
pt3dadd(218.22, 150.42, -71.6, 2.55)
pt3dadd(218.4, 150.83, -71.6, 2.55)
pt3dadd(218.58, 151.23, -71.6, 2.55)
pt3dadd(218.58, 151.64, -71.6, 2.55)
pt3dadd(218.76, 151.84, -71.6, 2.55)
pt3dadd(218.94, 152.45, -71.6, 2.55)
pt3dadd(219.12, 152.85, -71.6, 2.55)
pt3dadd(219.47, 153.26, -71.6, 2.55)
pt3dadd(219.65, 153.66, -71.6, 2.55)
pt3dadd(219.83, 154.07, -71.6, 2.55)
pt3dadd(220.19, 154.27, -71.6, 2.55)
pt3dadd(220.36, 154.68, -71.6, 2.55)
pt3dadd(220.54, 155.08, -71.6, 2.55)
pt3dadd(220.72, 155.49, -71.6, 2.55)
pt3dadd(220.9, 155.69, -71.6, 2.55)
pt3dadd(221.08, 156.1, -71.6, 2.55)
pt3dadd(221.26, 156.3, -71.6, 2.55)
pt3dadd(221.79, 156.91, -71.6, 2.55)
pt3dadd(221.97, 157.31, -71.6, 2.55)
pt3dadd(222.33, 157.51, -71.6, 2.55)
pt3dadd(222.5, 157.92, -71.6, 2.55)
pt3dadd(222.68, 158.12, -71.6, 2.55)
pt3dadd(223.04, 158.32, -71.6, 2.55)
pt3dadd(223.22, 158.53, -71.6, 2.55)
pt3dadd(223.4, 158.73, -71.6, 2.55)
pt3dadd(223.75, 159.13, -71.6, 2.55)
pt3dadd(223.93, 159.34, -71.6, 2.55)
pt3dadd(224.47, 159.54, -71.6, 2.55)
pt3dadd(224.64, 159.74, -71.6, 2.55)
pt3dadd(225, 159.94, -71.6, 2.55)
pt3dadd(225.18, 160.15, -71.6, 2.55)
pt3dadd(225.36, 160.35, -71.6, 2.55)
pt3dadd(225.89, 160.35, -71.6, 2.55)
pt3dadd(224.11, 159.54, -67.4, 2.55)
pt3dadd(224.64, 159.54, -67.4, 2.55)
pt3dadd(224.82, 159.74, -67.4, 2.55)
pt3dadd(225, 159.94, -67.4, 2.55)
pt3dadd(225.36, 160.15, -67.4, 2.55)
pt3dadd(225.71, 160.15, -67.4, 2.55)
pt3dadd(226.07, 160.55, -67.4, 2.55)
pt3dadd(226.43, 160.75, -67.4, 2.55)
pt3dadd(226.78, 161.36, -67.4, 2.55)
pt3dadd(226.96, 161.56, -67.4, 2.55)
pt3dadd(227.32, 161.97, -67.4, 2.55)
pt3dadd(227.5, 162.17, -67.4, 2.55)
pt3dadd(227.85, 162.58, -67.4, 2.55)
pt3dadd(228.03, 162.98, -67.4, 2.55)
pt3dadd(228.39, 163.18, -67.4, 2.55)
pt3dadd(228.74, 163.59, -67.4, 2.55)
pt3dadd(228.92, 163.79, -67.4, 2.55)
pt3dadd(229.28, 164.2, -67.4, 2.55)
pt3dadd(229.81, 164.6, -67.4, 2.55)
pt3dadd(230.17, 164.8, -67.4, 2.55)
pt3dadd(230.53, 165.21, -67.4, 2.55)
pt3dadd(230.71, 165.62, -67.4, 2.55)
pt3dadd(231.06, 165.82, -67.4, 2.55)
pt3dadd(231.42, 166.43, -67.4, 2.55)
pt3dadd(231.95, 166.83, -67.4, 2.55)
pt3dadd(232.13, 167.44, -67.4, 2.55)
pt3dadd(232.49, 167.84, -67.4, 2.55)
pt3dadd(233.02, 168.25, -67.4, 2.55)
pt3dadd(233.56, 168.86, -67.4, 2.55)
pt3dadd(233.92, 169.46, -67.4, 2.55)
pt3dadd(234.27, 169.87, -67.4, 2.55)
pt3dadd(234.63, 170.27, -67.4, 2.55)
pt3dadd(235.16, 171.08, -67.4, 2.55)
pt3dadd(235.7, 171.49, -67.4, 2.55)
pt3dadd(236.06, 172.1, -67.4, 2.55)
pt3dadd(236.41, 172.5, -67.4, 2.55)
pt3dadd(236.77, 172.91, -67.4, 2.55)
pt3dadd(237.13, 173.31, -67.4, 2.55)
pt3dadd(237.48, 173.72, -67.4, 2.55)
pt3dadd(239.09, 175.54, -67.4, 2.55)
pt3dadd(239.62, 176.15, -67.4, 2.55)
pt3dadd(239.98, 176.55, -67.4, 2.55)
pt3dadd(240.16, 176.96, -67.4, 2.55)
pt3dadd(240.51, 177.16, -67.4, 2.55)
pt3dadd(240.69, 177.57, -67.4, 2.55)
pt3dadd(241.05, 177.77, -67.4, 2.55)
pt3dadd(241.41, 178.17, -67.4, 2.55)
pt3dadd(241.76, 178.58, -67.4, 2.55)
pt3dadd(242.12, 178.98, -67.4, 2.55)
pt3dadd(242.48, 179.59, -67.4, 2.55)
pt3dadd(242.83, 180, -67.4, 2.55)
pt3dadd(243.19, 180.4, -67.4, 2.55)
pt3dadd(243.55, 180.6, -67.4, 2.55)
pt3dadd(242.65, 180, -63.2, 2.55)
pt3dadd(243.01, 180.2, -63.2, 2.55)
pt3dadd(243.19, 180.6, -63.2, 2.55)
pt3dadd(244.26, 181.82, -63.2, 2.55)
pt3dadd(244.62, 182.22, -63.2, 2.55)
pt3dadd(245.33, 183.03, -63.2, 2.55)
pt3dadd(245.69, 183.64, -63.2, 2.55)
pt3dadd(245.86, 184.05, -63.2, 2.55)
pt3dadd(246.22, 184.45, -63.2, 2.55)
pt3dadd(246.58, 184.86, -63.2, 2.55)
pt3dadd(246.93, 185.06, -63.2, 2.55)
pt3dadd(247.11, 185.46, -63.2, 2.55)
pt3dadd(247.65, 186.07, -63.2, 2.55)
pt3dadd(248, 186.48, -63.2, 2.55)
pt3dadd(248.72, 187.29, -63.2, 2.55)
pt3dadd(248.9, 187.69, -63.2, 2.55)
pt3dadd(249.25, 188.3, -63.2, 2.55)
pt3dadd(249.97, 189.11, -63.2, 2.55)
pt3dadd(250.5, 190.12, -63.2, 2.55)
pt3dadd(251.04, 190.73, -63.2, 2.55)
pt3dadd(251.39, 191.14, -63.2, 2.55)
pt3dadd(251.57, 191.54, -63.2, 2.55)
pt3dadd(251.75, 191.95, -63.2, 2.55)
pt3dadd(251.93, 192.35, -63.2, 2.55)
pt3dadd(252.11, 192.76, -63.2, 2.55)
pt3dadd(252.46, 192.96, -63.2, 2.55)
pt3dadd(252.64, 193.36, -63.2, 2.55)
pt3dadd(252.82, 193.97, -63.2, 2.55)
pt3dadd(253.18, 194.58, -63.2, 2.55)
pt3dadd(253.53, 194.98, -63.2, 2.55)
pt3dadd(253.89, 195.39, -63.2, 2.55)
pt3dadd(254.07, 196, -63.2, 2.55)
pt3dadd(254.25, 196.4, -63.2, 2.55)
pt3dadd(254.6, 196.81, -63.2, 2.55)
pt3dadd(254.96, 197.41, -63.2, 2.55)
pt3dadd(255.32, 197.82, -63.2, 2.55)
pt3dadd(255.49, 198.23, -63.2, 2.55)
pt3dadd(256.03, 198.83, -63.2, 2.55)
pt3dadd(256.21, 199.24, -63.2, 2.55)
pt3dadd(256.39, 199.44, -63.2, 2.55)
pt3dadd(256.56, 199.85, -63.2, 2.55)
pt3dadd(256.92, 200.25, -63.2, 2.55)
pt3dadd(257.1, 200.86, -63.2, 2.55)
pt3dadd(257.28, 201.26, -63.2, 2.55)
pt3dadd(257.46, 201.67, -63.2, 2.55)
pt3dadd(257.99, 202.28, -63.2, 2.55)
pt3dadd(258.17, 202.68, -63.2, 2.55)
pt3dadd(258.35, 203.09, -63.2, 2.55)
pt3dadd(258.88, 203.69, -63.2, 2.55)
pt3dadd(259.06, 204.1, -63.2, 2.55)
pt3dadd(259.24, 204.5, -63.2, 2.55)
pt3dadd(259.42, 204.71, -63.2, 2.55)
pt3dadd(259.6, 205.11, -63.2, 2.55)
pt3dadd(259.95, 204.91, -59, 2.55)
pt3dadd(260.13, 205.31, -59, 2.55)
pt3dadd(260.31, 205.52, -59, 2.55)
pt3dadd(260.67, 206.12, -59, 2.55)
pt3dadd(261.02, 206.53, -59, 2.55)
pt3dadd(261.38, 207.54, -59, 2.55)
pt3dadd(261.56, 207.95, -59, 2.55)
pt3dadd(261.91, 208.35, -59, 2.55)
pt3dadd(262.09, 208.96, -59, 2.55)
pt3dadd(262.27, 209.37, -59, 2.55)
pt3dadd(262.63, 209.97, -59, 2.55)
pt3dadd(262.81, 210.58, -59, 2.55)
pt3dadd(263.16, 211.19, -59, 2.55)
pt3dadd(263.34, 211.59, -59, 2.55)
pt3dadd(263.7, 212.2, -59, 2.55)
pt3dadd(263.88, 212.81, -59, 2.55)
pt3dadd(264.05, 213.21, -59, 2.55)
pt3dadd(264.41, 213.62, -59, 2.55)
pt3dadd(264.59, 214.23, -59, 2.55)
pt3dadd(264.95, 214.63, -59, 2.55)
pt3dadd(264.95, 215.24, -59, 2.55)
pt3dadd(265.3, 215.64, -59, 2.55)
pt3dadd(265.48, 216.05, -59, 2.55)
pt3dadd(265.84, 217.06, -59, 2.55)
pt3dadd(266.02, 217.47, -59, 2.55)
pt3dadd(266.37, 218.07, -59, 2.55)
pt3dadd(266.55, 218.68, -59, 2.55)
}
}
proc shape3d_79() {
dend[48] { pt3dadd(266.73, 219.09, -59, 2.55)
pt3dadd(267.09, 219.69, -59, 2.55)
pt3dadd(267.26, 220.3, -59, 2.55)
pt3dadd(267.44, 220.91, -59, 2.55)
pt3dadd(267.62, 221.32, -59, 2.55)
pt3dadd(267.98, 221.52, -59, 2.55)
pt3dadd(268.16, 222.13, -59, 2.55)
pt3dadd(268.33, 222.33, -59, 2.55)
pt3dadd(268.69, 222.94, -59, 2.55)
pt3dadd(268.87, 223.34, -59, 2.55)
pt3dadd(269.05, 223.75, -59, 2.55)
pt3dadd(269.23, 223.95, -59, 2.55)
pt3dadd(269.58, 224.56, -59, 2.55)
pt3dadd(269.76, 224.96, -59, 2.55)
pt3dadd(270.3, 225.57, -59, 2.55)
pt3dadd(270.47, 225.97, -59, 2.55)
pt3dadd(270.83, 226.38, -59, 2.55)
pt3dadd(271.01, 226.78, -59, 2.55)
pt3dadd(271.19, 227.19, -59, 2.55)
pt3dadd(271.37, 227.39, -59, 2.55)
pt3dadd(271.72, 228, -59, 2.55)
pt3dadd(271.9, 228.2, -59, 2.55)
pt3dadd(272.08, 228.61, -59, 2.55)
pt3dadd(272.44, 229.21, -59, 2.55)
pt3dadd(272.61, 229.62, -59, 2.55)
pt3dadd(273.15, 230.02, -59, 2.55)
pt3dadd(273.15, 230.43, -59, 2.55)
pt3dadd(273.51, 230.84, -59, 2.55)
pt3dadd(273.68, 231.44, -59, 2.55)
pt3dadd(273.86, 231.65, -59, 2.55)
pt3dadd(274.22, 232.05, -59, 2.55)
pt3dadd(274.22, 232.46, -59, 2.55)
pt3dadd(274.58, 232.66, -59, 2.55)
pt3dadd(274.75, 232.86, -59, 2.55)
pt3dadd(274.93, 233.06, -59, 2.55)
pt3dadd(275.11, 233.47, -59, 2.55)
pt3dadd(275.29, 233.87, -59, 2.55)
pt3dadd(275.65, 234.08, -59, 2.55)
pt3dadd(275.82, 234.48, -59, 2.55)
pt3dadd(276.18, 234.89, -59, 2.55)
pt3dadd(276.36, 235.29, -59, 2.55)
pt3dadd(276.72, 235.7, -59, 2.55)
pt3dadd(276.89, 236.1, -59, 2.55)
pt3dadd(277.07, 236.51, -59, 2.55)
pt3dadd(277.43, 236.71, -59, 2.55)
pt3dadd(277.61, 236.91, -59, 2.55)
pt3dadd(277.79, 237.11, -59, 2.55)
pt3dadd(277.96, 237.52, -59, 2.55)
pt3dadd(278.14, 237.92, -59, 2.55)
pt3dadd(278.32, 238.33, -59, 2.55)
pt3dadd(278.5, 238.53, -59, 2.55)
pt3dadd(278.68, 238.73, -59, 2.55)
pt3dadd(278.86, 238.94, -59, 2.55)
pt3dadd(278.86, 239.34, -59, 2.55)
pt3dadd(278.5, 237.92, -56.9, 2.55)
pt3dadd(278.68, 238.13, -56.9, 2.55)
pt3dadd(278.68, 238.53, -56.9, 2.55)
pt3dadd(278.86, 238.94, -56.9, 2.55)
pt3dadd(279.03, 239.34, -56.9, 2.55)
pt3dadd(279.21, 239.95, -56.9, 2.55)
pt3dadd(279.21, 240.35, -56.9, 2.55)
pt3dadd(279.39, 240.76, -56.9, 2.55)
pt3dadd(279.57, 241.16, -56.9, 2.55)
pt3dadd(279.57, 241.57, -56.9, 2.55)
pt3dadd(279.75, 241.98, -56.9, 2.55)
pt3dadd(279.75, 242.58, -56.9, 2.55)
pt3dadd(279.93, 243.19, -56.9, 2.55)
pt3dadd(280.1, 243.39, -56.9, 2.55)
pt3dadd(280.1, 244.41, -56.9, 2.55)
pt3dadd(280.28, 244.61, -56.9, 2.55)
pt3dadd(280.28, 245.82, -56.9, 2.55)
pt3dadd(280.46, 246.23, -56.9, 2.55)
pt3dadd(280.46, 247.44, -56.9, 2.55)
pt3dadd(280.64, 247.85, -56.9, 2.55)
pt3dadd(280.64, 248.86, -56.9, 2.55)
pt3dadd(280.82, 249.06, -56.9, 2.55)
pt3dadd(280.82, 249.87, -56.9, 2.55)
pt3dadd(281, 250.48, -56.9, 2.55)
pt3dadd(281, 251.09, -56.9, 2.55)
pt3dadd(281.17, 251.7, -56.9, 2.55)
pt3dadd(281.35, 252.3, -56.9, 2.55)
pt3dadd(281.53, 252.71, -56.9, 2.55)
pt3dadd(281.71, 253.32, -56.9, 2.55)
pt3dadd(281.71, 253.93, -56.9, 2.55)
pt3dadd(281.89, 254.33, -56.9, 2.55)
pt3dadd(282.07, 255.14, -56.9, 2.55)
pt3dadd(282.24, 255.55, -56.9, 2.55)
pt3dadd(282.42, 256.15, -56.9, 2.55)
pt3dadd(282.6, 256.56, -56.9, 2.55)
pt3dadd(282.78, 256.96, -56.9, 2.55)
pt3dadd(282.78, 257.37, -56.9, 2.55)
pt3dadd(282.96, 257.57, -53.75, 2.55)
pt3dadd(283.14, 257.98, -53.75, 2.55)
pt3dadd(283.31, 258.38, -53.75, 2.55)
pt3dadd(283.49, 258.79, -53.75, 2.55)
pt3dadd(283.49, 260, -53.75, 2.55)
pt3dadd(283.67, 260.61, -53.75, 2.55)
pt3dadd(283.85, 261.42, -53.75, 2.55)
pt3dadd(283.85, 262.03, -53.75, 2.55)
pt3dadd(284.03, 262.63, -53.75, 2.55)
pt3dadd(284.03, 263.24, -53.75, 2.55)
pt3dadd(284.21, 263.65, -53.75, 2.55)
pt3dadd(284.38, 264.26, -53.75, 2.55)
pt3dadd(284.74, 265.27, -53.75, 2.55)
pt3dadd(284.92, 265.67, -53.75, 2.55)
pt3dadd(285.1, 266.08, -53.75, 2.55)
pt3dadd(285.28, 266.48, -53.75, 2.55)
pt3dadd(285.63, 267.09, -53.75, 2.55)
pt3dadd(285.81, 267.5, -53.75, 2.55)
pt3dadd(285.99, 267.9, -53.75, 2.55)
pt3dadd(286.35, 268.51, -53.75, 2.55)
pt3dadd(286.52, 269.12, -53.75, 2.55)
pt3dadd(286.7, 269.52, -53.75, 2.55)
pt3dadd(287.06, 270.13, -53.75, 2.55)
pt3dadd(287.24, 270.53, -53.75, 2.55)
pt3dadd(287.42, 270.74, -53.75, 2.55)
pt3dadd(287.77, 271.14, -53.75, 2.55)
pt3dadd(288.13, 271.34, -53.75, 2.55)
pt3dadd(288.31, 271.95, -53.75, 2.55)
pt3dadd(288.49, 272.36, -53.75, 2.55)
pt3dadd(288.66, 272.56, -53.75, 2.55)
pt3dadd(289.38, 273.37, -53.75, 2.55)
pt3dadd(289.73, 273.77, -53.75, 2.55)
pt3dadd(290.09, 274.18, -53.75, 2.55)
pt3dadd(290.45, 274.79, -53.75, 2.55)
pt3dadd(290.63, 275.19, -53.75, 2.55)
pt3dadd(290.8, 275.6, -53.75, 2.55)
pt3dadd(290.98, 276, -53.75, 2.55)
pt3dadd(291.16, 276.41, -53.75, 2.55)
pt3dadd(291.52, 276.81, -53.75, 2.55)
pt3dadd(291.7, 277.22, -53.75, 2.55)
pt3dadd(292.05, 277.83, -53.75, 2.55)
pt3dadd(292.23, 278.23, -53.75, 2.55)
pt3dadd(292.59, 278.64, -53.75, 2.55)
pt3dadd(292.76, 279.04, -53.75, 2.55)
pt3dadd(292.94, 279.45, -53.75, 2.55)
pt3dadd(293.12, 279.65, -53.75, 2.55)
pt3dadd(293.48, 280.05, -53.75, 2.55)
pt3dadd(293.66, 280.46, -53.75, 2.55)
pt3dadd(293.83, 280.86, -53.75, 2.55)
pt3dadd(294.01, 281.27, -53.75, 2.55)
pt3dadd(294.19, 281.67, -53.75, 2.55)
pt3dadd(294.55, 282.08, -53.75, 2.55)
pt3dadd(294.73, 282.69, -53.75, 2.55)
pt3dadd(294.9, 283.29, -53.75, 2.55)
pt3dadd(295.26, 283.7, -53.75, 2.55)
pt3dadd(295.62, 284.51, -53.75, 2.55)
pt3dadd(295.97, 285.32, -53.75, 2.55)
pt3dadd(296.33, 285.93, -53.75, 2.55)
pt3dadd(296.51, 286.74, -53.75, 2.55)
pt3dadd(296.69, 287.35, -53.75, 2.55)
pt3dadd(297.04, 287.75, -53.75, 2.55)
pt3dadd(297.22, 288.36, -53.75, 2.55)
pt3dadd(297.4, 288.97, -53.75, 2.55)
pt3dadd(297.76, 289.37, -53.75, 2.55)
pt3dadd(297.94, 289.98, -53.75, 2.55)
pt3dadd(298.29, 290.59, -53.75, 2.55)
pt3dadd(298.47, 291.19, -53.75, 2.55)
pt3dadd(298.83, 291.8, -53.75, 2.55)
pt3dadd(299.18, 292.41, -53.75, 2.55)
pt3dadd(299.36, 293.02, -53.75, 2.55)
pt3dadd(299.54, 293.42, -53.75, 2.55)
pt3dadd(299.9, 293.83, -53.75, 2.55)
pt3dadd(300.08, 294.43, -53.75, 2.55)
pt3dadd(300.25, 295.04, -53.75, 2.55)
pt3dadd(300.61, 295.45, -53.75, 2.55)
pt3dadd(300.79, 295.85, -53.75, 2.55)
pt3dadd(300.97, 296.46, -53.75, 2.55)
pt3dadd(301.32, 296.87, -53.75, 2.55)
pt3dadd(301.5, 297.27, -53.75, 2.55)
pt3dadd(301.68, 297.88, -53.75, 2.55)
pt3dadd(302.04, 298.49, -53.75, 2.55)
pt3dadd(302.22, 298.89, -53.75, 2.55)
pt3dadd(302.39, 299.3, -53.75, 2.55)
pt3dadd(302.57, 299.7, -53.75, 2.55)
pt3dadd(302.75, 300.11, -53.75, 2.55)
pt3dadd(302.93, 300.51, -53.75, 2.55)
pt3dadd(303.11, 300.92, -53.75, 2.55)
pt3dadd(303.29, 301.32, -53.75, 2.55)
pt3dadd(303.46, 301.73, -53.75, 2.55)
pt3dadd(303.64, 302.13, -53.75, 2.55)
pt3dadd(303.82, 302.54, -53.75, 2.55)
pt3dadd(303.82, 302.94, -53.75, 2.55)
pt3dadd(304, 303.35, -53.75, 2.55)
pt3dadd(304.18, 303.75, -53.75, 2.55)
pt3dadd(304.36, 304.16, -53.75, 2.55)
pt3dadd(304.53, 304.36, -53.75, 2.55)
pt3dadd(304.53, 304.97, -53.75, 2.55)
pt3dadd(304.71, 305.37, -53.75, 2.55)
pt3dadd(304.89, 305.78, -53.75, 2.55)
pt3dadd(305.07, 306.18, -53.75, 2.55)
pt3dadd(305.25, 306.59, -53.75, 2.55)
pt3dadd(305.25, 306.99, -53.75, 2.55)
pt3dadd(304.71, 306.38, -53.75, 2.55)
pt3dadd(304.71, 315.9, -53.75, 2.55)
pt3dadd(304.53, 316.51, -53.75, 2.55)
pt3dadd(304.53, 317.32, -53.75, 2.55)
pt3dadd(304.18, 317.73, -53.75, 2.55)
pt3dadd(304, 318.13, -53.75, 2.55)
pt3dadd(304, 318.94, -53.75, 2.55)
}
}
proc shape3d_80() {
dend[48] { pt3dadd(303.82, 319.35, -53.75, 2.55)
pt3dadd(303.64, 319.96, -53.75, 2.55)
pt3dadd(303.46, 320.36, -53.75, 2.55)
pt3dadd(303.11, 321.37, -53.75, 2.55)
pt3dadd(302.93, 321.78, -53.75, 2.55)
pt3dadd(302.75, 322.18, -53.75, 2.55)
pt3dadd(302.57, 322.59, -53.75, 2.55)
pt3dadd(302.57, 323.4, -53.75, 2.55)
pt3dadd(302.39, 323.6, -53.75, 2.55)
pt3dadd(302.39, 324.01, -53.75, 2.55)
pt3dadd(302.22, 324.41, -53.75, 2.55)
pt3dadd(302.04, 324.82, -53.75, 2.55)
pt3dadd(302.04, 328.46, -53.75, 2.55)
pt3dadd(301.86, 328.87, -53.75, 2.55)
pt3dadd(301.86, 336.16, -53.75, 2.55)
pt3dadd(302.04, 336.56, -53.75, 2.55)
pt3dadd(302.04, 336.97, -53.75, 2.55)
pt3dadd(302.22, 337.37, -53.75, 2.55)
pt3dadd(302.39, 338.39, -53.75, 2.55)
pt3dadd(302.57, 338.99, -53.75, 2.55)
pt3dadd(302.75, 339.6, -53.75, 2.55)
pt3dadd(302.93, 340.41, -53.75, 2.55)
pt3dadd(302.93, 341.22, -53.75, 2.55)
pt3dadd(303.11, 341.63, -53.75, 2.9)
pt3dadd(303.29, 342.03, -53.75, 2.55)
pt3dadd(303.46, 342.44, -53.75, 2.55)
pt3dadd(303.46, 343.45, -53.75, 2.55)
pt3dadd(303.64, 343.65, -53.75, 2.55)
pt3dadd(303.82, 344.06, -53.75, 2.55)
pt3dadd(303.82, 344.67, -53.75, 2.55)
pt3dadd(304, 345.07, -53.75, 2.55)
pt3dadd(304.18, 345.48, -53.75, 2.9)
pt3dadd(304.18, 345.88, -53.75, 2.55)
pt3dadd(304.36, 346.49, -53.75, 2.55)
pt3dadd(304.53, 346.89, -53.75, 2.55)
pt3dadd(304.53, 347.5, -53.75, 2.55)
pt3dadd(304.71, 347.91, -53.75, 2.9)
pt3dadd(304.89, 348.72, -53.75, 2.55)
pt3dadd(305.07, 349.12, -53.75, 2.55)
pt3dadd(305.07, 349.53, -53.75, 2.55)
pt3dadd(305.25, 349.93, -53.75, 2.55)
pt3dadd(305.43, 350.13, -53.75, 2.55)
pt3dadd(305.6, 350.54, -53.75, 2.55)
pt3dadd(305.6, 351.15, -53.75, 2.55)
pt3dadd(305.78, 351.55, -53.75, 2.55)
pt3dadd(305.96, 351.96, -53.75, 2.55)
pt3dadd(306.14, 352.16, -53.75, 2.55)
pt3dadd(306.14, 352.57, -53.75, 2.55)
pt3dadd(306.32, 352.77, -53.75, 2.55)
pt3dadd(306.5, 352.97, -53.75, 2.55)
pt3dadd(306.67, 353.38, -53.75, 2.55)
pt3dadd(306.85, 353.78, -53.75, 2.55)
pt3dadd(307.03, 353.98, -53.75, 2.55)
pt3dadd(307.21, 354.39, -53.75, 2.55)
pt3dadd(307.57, 354.79, -53.75, 2.55)
pt3dadd(307.74, 355.2, -53.75, 2.55)
pt3dadd(307.92, 355.6, -53.75, 2.55)
pt3dadd(308.1, 355.81, -53.75, 2.55)
pt3dadd(308.46, 356.01, -53.75, 2.55)
pt3dadd(308.64, 356.21, -53.75, 2.55)
pt3dadd(308.99, 356.82, -53.75, 2.55)
pt3dadd(308.99, 357.63, -53.75, 2.55)
pt3dadd(308.64, 358.03, -53.75, 2.55)
pt3dadd(308.64, 361.27, -53.75, 2.55)
pt3dadd(308.28, 361.68, -53.75, 2.55)
pt3dadd(307.92, 362.09, -53.75, 2.55)
pt3dadd(307.57, 362.49, -53.75, 3)
pt3dadd(303.29, 362.49, -53.75, 2.9)
pt3dadd(291.23, 364.53, 0, 0.56)
}
dend[49] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(257.47, 369.38, 3.3, 3.48)
pt3dadd(254.82, 369.22, 3.3, 3.48)
pt3dadd(254.41, 369.06, 3.3, 3.48)
pt3dadd(244.65, 369.06, 3.3, 3.48)
pt3dadd(244.37, 369.22, 3.3, 3.48)
pt3dadd(243.4, 369.22, 3.3, 3.48)
pt3dadd(243.12, 369.38, 3.3, 3.48)
pt3dadd(242.7, 369.38, 3.3, 3.48)
pt3dadd(242.56, 369.53, 3.3, 3.48)
pt3dadd(242.42, 369.53, 3.3, 3.48)
pt3dadd(242.42, 368.74, 6.3, 3.48)
pt3dadd(240.19, 368.74, 6.3, 3.48)
pt3dadd(240.05, 368.59, 6.3, 3.48)
pt3dadd(239.5, 368.43, 6.3, 3.48)
pt3dadd(239.22, 368.27, 6.3, 3.48)
pt3dadd(238.94, 368.27, 6.3, 3.48)
pt3dadd(238.52, 368.11, 6.3, 3.48)
pt3dadd(238.24, 367.79, 6.3, 3.48)
pt3dadd(237.96, 367.64, 6.3, 3.48)
pt3dadd(237.68, 367.48, 6.3, 3.48)
pt3dadd(236.85, 367, 6.3, 3.48)
pt3dadd(236.57, 366.69, 6.3, 3.48)
pt3dadd(236.15, 366.37, 6.3, 3.48)
pt3dadd(235.73, 365.89, 6.3, 3.48)
pt3dadd(235.32, 365.74, 6.3, 3.48)
pt3dadd(234.62, 364.94, 6.3, 3.48)
pt3dadd(234.34, 364.63, 6.3, 3.48)
pt3dadd(234.06, 364.47, 6.3, 3.48)
pt3dadd(233.92, 364.15, 6.3, 3.48)
pt3dadd(233.64, 363.99, 6.3, 3.48)
pt3dadd(233.36, 363.68, 6.3, 3.48)
pt3dadd(233.23, 363.52, 6.3, 3.48)
pt3dadd(233.09, 363.2, 6.3, 3.48)
pt3dadd(232.81, 363.05, 6.3, 3.48)
pt3dadd(232.39, 362.57, 6.3, 3.48)
pt3dadd(232.25, 362.41, 6.3, 3.48)
pt3dadd(231.97, 362.25, 6.3, 3.48)
pt3dadd(231.55, 361.94, 6.3, 3.48)
pt3dadd(231.27, 361.62, 6.3, 3.48)
pt3dadd(231, 361.46, 6.3, 3.48)
pt3dadd(230.72, 360.99, 6.3, 3.48)
pt3dadd(230.44, 360.83, 6.3, 3.48)
pt3dadd(230.16, 360.51, 6.3, 3.48)
pt3dadd(230.02, 360.35, 6.3, 3.48)
pt3dadd(229.74, 360.04, 6.3, 3.48)
pt3dadd(229.6, 359.88, 6.3, 3.48)
pt3dadd(229.04, 359.25, 6.3, 3.48)
pt3dadd(228.91, 358.93, 6.3, 3.48)
pt3dadd(228.63, 358.77, 6.3, 3.48)
pt3dadd(228.21, 358.61, 6.3, 3.48)
pt3dadd(228.07, 358.46, 6.3, 3.48)
pt3dadd(227.65, 358.3, 6.3, 3.48)
pt3dadd(227.51, 357.98, 6.3, 3.48)
pt3dadd(227.23, 357.82, 6.3, 3.48)
pt3dadd(226.81, 357.66, 6.3, 3.48)
pt3dadd(226.54, 357.35, 6.3, 3.48)
pt3dadd(226.12, 357.19, 6.3, 3.48)
pt3dadd(225.84, 356.71, 6.3, 3.48)
pt3dadd(225.56, 356.56, 6.3, 3.48)
pt3dadd(225.42, 356.4, 6.3, 3.48)
pt3dadd(225.28, 356.24, 6.3, 3.48)
pt3dadd(225, 356.08, 6.3, 3.48)
pt3dadd(224.59, 355.92, 6.3, 3.48)
pt3dadd(224.31, 355.61, 6.3, 3.48)
pt3dadd(224.03, 355.29, 6.3, 3.48)
pt3dadd(223.75, 354.97, 6.3, 3.48)
pt3dadd(223.47, 354.66, 6.3, 3.48)
pt3dadd(223.19, 354.34, 6.3, 3.48)
pt3dadd(223.05, 354.18, 6.3, 3.48)
pt3dadd(222.91, 354.02, 6.3, 3.48)
pt3dadd(222.63, 353.87, 6.3, 3.48)
pt3dadd(222.49, 353.71, 6.3, 3.48)
pt3dadd(222.36, 353.87, 6.3, 3.48)
pt3dadd(222.36, 354.34, 6.3, 3.48)
pt3dadd(223.05, 354.5, 9.3, 3.48)
pt3dadd(222.91, 354.18, 9.3, 3.48)
pt3dadd(222.63, 353.87, 9.3, 3.48)
pt3dadd(222.49, 353.39, 9.3, 3.48)
pt3dadd(222.22, 353.07, 9.3, 3.48)
pt3dadd(222.08, 352.92, 9.3, 3.48)
pt3dadd(221.94, 352.76, 9.3, 3.48)
pt3dadd(221.8, 352.44, 9.3, 3.48)
pt3dadd(221.66, 352.12, 9.3, 3.48)
pt3dadd(221.38, 351.81, 9.3, 3.48)
pt3dadd(221.24, 351.49, 9.3, 3.48)
pt3dadd(220.96, 351.33, 9.3, 3.48)
pt3dadd(220.68, 351.02, 9.3, 3.48)
pt3dadd(220.54, 350.7, 9.3, 3.48)
pt3dadd(220.4, 350.38, 9.3, 3.48)
pt3dadd(220.27, 350.22, 9.3, 3.48)
pt3dadd(219.99, 349.91, 9.3, 3.48)
pt3dadd(219.85, 349.59, 9.3, 3.48)
pt3dadd(219.57, 348.8, 9.3, 3.48)
pt3dadd(219.15, 348.33, 9.3, 3.48)
pt3dadd(219.15, 347.85, 9.3, 3.48)
pt3dadd(218.87, 347.53, 9.3, 3.48)
pt3dadd(218.73, 347.06, 9.3, 3.48)
pt3dadd(218.59, 346.74, 9.3, 3.48)
pt3dadd(218.31, 346.27, 9.3, 3.48)
pt3dadd(218.17, 345.95, 9.3, 3.48)
pt3dadd(218.04, 345.48, 9.3, 3.48)
pt3dadd(217.9, 345.16, 9.3, 3.48)
pt3dadd(217.62, 344.84, 9.3, 3.48)
pt3dadd(217.62, 344.53, 9.3, 3.48)
pt3dadd(217.34, 344.21, 9.3, 3.48)
pt3dadd(217.2, 343.89, 9.3, 3.48)
pt3dadd(217.06, 343.58, 9.3, 3.48)
pt3dadd(216.78, 343.26, 9.3, 3.48)
pt3dadd(216.64, 342.79, 9.3, 3.48)
pt3dadd(216.5, 342.47, 9.3, 3.48)
pt3dadd(216.36, 342.15, 9.3, 3.48)
pt3dadd(216.08, 341.84, 9.3, 3.48)
pt3dadd(215.95, 341.36, 9.3, 3.48)
pt3dadd(215.81, 341.2, 9.3, 3.48)
pt3dadd(215.53, 340.89, 9.3, 3.48)
pt3dadd(215.39, 340.57, 9.3, 3.48)
pt3dadd(215.39, 340.09, 9.3, 3.48)
pt3dadd(215.11, 339.78, 9.3, 3.48)
pt3dadd(214.97, 339.3, 9.3, 3.48)
pt3dadd(214.83, 338.99, 9.3, 3.48)
pt3dadd(214.69, 338.67, 9.3, 3.48)
pt3dadd(214.69, 338.35, 9.3, 3.48)
pt3dadd(214.55, 338.04, 9.3, 3.48)
pt3dadd(214.41, 337.72, 9.3, 3.48)
pt3dadd(214.27, 337.4, 9.3, 3.48)
pt3dadd(214.13, 337.09, 9.3, 3.48)
pt3dadd(213.99, 336.77, 9.3, 3.48)
pt3dadd(213.86, 336.45, 9.3, 3.48)
pt3dadd(213.72, 335.98, 9.3, 3.48)
pt3dadd(213.58, 335.66, 9.3, 3.48)
}
}
proc shape3d_81() {
dend[49] { pt3dadd(213.44, 335.35, 9.3, 3.48)
pt3dadd(213.44, 333.92, 9.3, 3.48)
pt3dadd(213.3, 333.61, 9.3, 3.48)
pt3dadd(213.3, 332.5, 9.3, 3.48)
pt3dadd(213.16, 332.18, 9.3, 3.48)
pt3dadd(213.16, 326.32, 9.3, 3.48)
pt3dadd(213.02, 326.48, 9.3, 3.48)
pt3dadd(213.02, 326.96, 9.3, 3.48)
pt3dadd(212.88, 327.59, 9.3, 3.48)
pt3dadd(212.88, 328.86, 9.3, 3.48)
pt3dadd(212.88, 326.64, 11.3, 3.48)
pt3dadd(212.88, 326.32, 11.3, 3.48)
pt3dadd(212.6, 326.01, 11.3, 3.48)
pt3dadd(212.6, 325.53, 11.3, 3.48)
pt3dadd(212.46, 325.22, 11.3, 3.48)
pt3dadd(212.18, 324.9, 11.3, 3.48)
pt3dadd(212.18, 324.43, 11.3, 3.48)
pt3dadd(211.9, 324.11, 11.3, 3.48)
pt3dadd(211.76, 323.79, 11.3, 3.48)
pt3dadd(211.63, 323.48, 11.3, 3.48)
pt3dadd(211.35, 323.16, 11.3, 3.48)
pt3dadd(211.21, 322.84, 11.3, 3.48)
pt3dadd(211.21, 322.53, 11.3, 3.48)
pt3dadd(210.93, 322.21, 11.3, 3.48)
pt3dadd(210.79, 321.89, 11.3, 3.48)
pt3dadd(210.65, 321.58, 11.3, 3.48)
pt3dadd(210.51, 321.26, 11.3, 3.48)
pt3dadd(210.37, 320.94, 11.3, 3.48)
pt3dadd(210.23, 320.63, 11.3, 3.48)
pt3dadd(210.09, 320.47, 11.3, 3.48)
pt3dadd(209.81, 320.15, 11.3, 3.48)
pt3dadd(209.67, 319.84, 11.3, 3.48)
pt3dadd(209.54, 319.52, 11.3, 3.48)
pt3dadd(209.26, 319.2, 11.3, 3.48)
pt3dadd(208.98, 318.73, 11.3, 3.48)
pt3dadd(208.84, 318.41, 11.3, 3.48)
pt3dadd(208.7, 317.94, 11.3, 3.48)
pt3dadd(208.56, 317.62, 11.3, 3.48)
pt3dadd(208.28, 316.99, 11.3, 3.48)
pt3dadd(208.14, 316.67, 11.3, 3.48)
pt3dadd(207.86, 316.04, 11.3, 3.48)
pt3dadd(207.72, 315.56, 11.3, 3.48)
pt3dadd(207.72, 315.25, 11.3, 3.48)
pt3dadd(207.58, 314.93, 11.3, 3.48)
pt3dadd(207.58, 314.61, 11.3, 3.48)
pt3dadd(207.44, 314.3, 11.3, 3.48)
pt3dadd(207.44, 313.98, 11.3, 3.48)
pt3dadd(207.31, 313.66, 11.3, 3.48)
pt3dadd(207.17, 313.35, 11.3, 3.48)
pt3dadd(207.17, 312.87, 11.3, 3.48)
pt3dadd(207.03, 312.4, 11.3, 3.48)
pt3dadd(207.03, 312.08, 11.3, 3.48)
pt3dadd(206.89, 311.6, 11.3, 3.48)
pt3dadd(206.75, 311.13, 11.3, 3.48)
pt3dadd(206.75, 310.66, 11.3, 3.48)
pt3dadd(206.61, 310.34, 11.3, 3.48)
pt3dadd(206.61, 309.55, 11.3, 3.48)
pt3dadd(206.47, 309.23, 11.3, 3.48)
pt3dadd(206.47, 308.91, 11.3, 3.48)
pt3dadd(206.33, 308.6, 11.3, 3.48)
pt3dadd(206.33, 308.28, 11.3, 3.48)
pt3dadd(206.19, 307.81, 11.3, 3.48)
pt3dadd(206.19, 307.01, 11.3, 3.48)
pt3dadd(206.05, 306.54, 11.3, 3.48)
pt3dadd(206.05, 306.07, 11.3, 3.48)
pt3dadd(205.91, 305.43, 11.3, 3.48)
pt3dadd(205.91, 304.48, 11.3, 3.48)
pt3dadd(205.77, 304.17, 11.3, 3.48)
pt3dadd(205.77, 302.11, 11.3, 3.48)
pt3dadd(205.63, 301.95, 11.3, 3.48)
pt3dadd(205.63, 301, 11.3, 3.48)
pt3dadd(205.49, 300.84, 11.3, 3.48)
pt3dadd(205.77, 301.16, 14.3, 3.48)
pt3dadd(205.63, 301, 14.3, 3.48)
pt3dadd(205.63, 300.53, 14.3, 3.48)
pt3dadd(205.35, 300.21, 14.3, 3.48)
pt3dadd(205.22, 299.89, 14.3, 3.48)
pt3dadd(205.22, 299.58, 14.3, 3.48)
pt3dadd(205.08, 299.42, 14.3, 3.48)
pt3dadd(204.94, 299.1, 14.3, 3.48)
pt3dadd(204.94, 298.78, 14.3, 3.48)
pt3dadd(204.8, 298.63, 14.3, 3.48)
pt3dadd(204.66, 298.31, 14.3, 3.48)
pt3dadd(204.38, 297.99, 14.3, 3.48)
pt3dadd(204.24, 297.68, 14.3, 3.48)
pt3dadd(204.1, 297.36, 14.3, 3.48)
pt3dadd(203.82, 296.89, 14.3, 3.48)
pt3dadd(203.54, 296.41, 14.3, 3.48)
pt3dadd(203.4, 296.09, 14.3, 3.48)
pt3dadd(203.26, 295.94, 14.3, 3.48)
pt3dadd(203.12, 295.62, 14.3, 3.48)
pt3dadd(202.99, 295.3, 14.3, 3.48)
pt3dadd(202.71, 295.14, 14.3, 3.48)
pt3dadd(202.57, 294.83, 14.3, 3.48)
pt3dadd(202.43, 294.51, 14.3, 3.48)
pt3dadd(202.15, 294.04, 14.3, 3.48)
pt3dadd(201.87, 293.88, 14.3, 3.48)
pt3dadd(201.73, 293.4, 14.3, 3.48)
pt3dadd(201.59, 293.09, 14.3, 3.48)
pt3dadd(201.45, 292.77, 14.3, 3.48)
pt3dadd(201.31, 292.45, 14.3, 3.48)
pt3dadd(201.03, 292.3, 14.3, 3.48)
pt3dadd(200.9, 291.82, 14.3, 3.48)
pt3dadd(200.76, 291.66, 14.3, 3.48)
pt3dadd(200.48, 291.5, 14.3, 3.48)
pt3dadd(200.34, 291.19, 14.3, 3.48)
pt3dadd(200.2, 290.87, 14.3, 3.48)
pt3dadd(200.06, 290.55, 14.3, 3.48)
pt3dadd(199.78, 290.08, 14.3, 3.48)
pt3dadd(199.64, 289.76, 14.3, 3.48)
pt3dadd(199.36, 289.6, 14.3, 3.48)
pt3dadd(199.08, 289.45, 14.3, 3.48)
pt3dadd(198.94, 289.13, 14.3, 3.48)
pt3dadd(198.8, 288.97, 14.3, 3.48)
pt3dadd(198.67, 288.81, 14.3, 3.48)
pt3dadd(198.25, 288.5, 14.3, 3.48)
pt3dadd(197.97, 288.34, 14.3, 3.48)
pt3dadd(197.83, 288.18, 14.3, 3.48)
pt3dadd(197.69, 287.86, 14.3, 3.48)
pt3dadd(197.41, 287.7, 14.3, 3.48)
pt3dadd(197.27, 287.55, 14.3, 3.48)
pt3dadd(196.99, 287.39, 14.3, 3.48)
pt3dadd(196.85, 287.23, 14.3, 3.48)
pt3dadd(196.3, 287.23, 14.3, 3.48)
pt3dadd(196.02, 286.91, 17.3, 3.48)
pt3dadd(195.6, 286.76, 17.3, 3.48)
pt3dadd(195.46, 286.6, 17.3, 3.48)
pt3dadd(195.18, 286.6, 17.3, 3.48)
pt3dadd(195.04, 286.44, 17.3, 3.48)
pt3dadd(194.76, 286.28, 17.3, 3.48)
pt3dadd(194.48, 286.12, 17.3, 3.48)
pt3dadd(194.21, 285.96, 17.3, 3.48)
pt3dadd(193.79, 285.65, 17.3, 3.48)
pt3dadd(193.37, 285.49, 17.3, 3.48)
pt3dadd(193.09, 285.33, 17.3, 3.48)
pt3dadd(192.81, 285.17, 17.3, 3.48)
pt3dadd(192.39, 285.01, 17.3, 3.48)
pt3dadd(192.12, 284.86, 17.3, 3.48)
pt3dadd(191.7, 284.7, 17.3, 3.48)
pt3dadd(191.14, 284.7, 17.3, 3.48)
pt3dadd(190.72, 284.38, 17.3, 3.48)
pt3dadd(190.16, 284.38, 17.3, 3.48)
pt3dadd(189.75, 284.06, 17.3, 3.48)
pt3dadd(189.19, 284.06, 17.3, 3.48)
pt3dadd(188.77, 283.91, 17.3, 3.48)
pt3dadd(188.21, 283.75, 17.3, 3.48)
pt3dadd(178.18, 283.75, 17.3, 3.48)
pt3dadd(177.9, 283.59, 17.3, 3.48)
pt3dadd(177.76, 283.43, 17.3, 3.48)
pt3dadd(177.21, 283.27, 17.3, 3.48)
pt3dadd(176.93, 283.11, 17.3, 3.48)
pt3dadd(176.51, 282.8, 17.3, 3.48)
pt3dadd(176.37, 282.64, 17.3, 3.48)
pt3dadd(176.09, 282.48, 17.3, 3.48)
pt3dadd(175.81, 282.17, 17.3, 3.48)
pt3dadd(175.39, 281.85, 17.3, 3.48)
pt3dadd(175.11, 281.85, 17.3, 3.48)
pt3dadd(174.98, 281.69, 17.3, 3.48)
pt3dadd(174.7, 281.53, 17.3, 3.48)
pt3dadd(174.42, 281.22, 17.3, 3.48)
pt3dadd(174.28, 280.9, 17.3, 3.48)
pt3dadd(174.14, 280.74, 17.3, 3.48)
pt3dadd(173.86, 280.74, 17.3, 3.48)
pt3dadd(173.72, 280.58, 17.3, 3.48)
pt3dadd(173.44, 280.27, 17.3, 3.48)
pt3dadd(173.16, 280.11, 17.3, 3.48)
pt3dadd(172.89, 279.95, 17.3, 3.48)
pt3dadd(172.75, 279.79, 17.3, 3.48)
pt3dadd(172.61, 279.47, 17.3, 3.48)
pt3dadd(172.33, 279.32, 17.3, 3.48)
pt3dadd(172.19, 279, 17.3, 3.48)
pt3dadd(171.91, 278.68, 17.3, 3.48)
pt3dadd(171.63, 278.52, 17.3, 3.48)
pt3dadd(171.49, 278.21, 17.3, 3.48)
pt3dadd(171.21, 278.05, 17.3, 3.48)
pt3dadd(171.07, 277.73, 17.3, 3.48)
pt3dadd(170.79, 277.26, 17.3, 3.48)
pt3dadd(170.52, 277.1, 17.3, 3.48)
pt3dadd(170.38, 276.94, 17.3, 3.48)
pt3dadd(170.1, 276.78, 17.3, 3.48)
pt3dadd(169.96, 276.63, 17.3, 3.48)
pt3dadd(169.82, 276.47, 17.3, 3.48)
pt3dadd(169.68, 276.31, 17.3, 3.48)
pt3dadd(169.54, 276.31, 17.3, 3.48)
pt3dadd(169.82, 277.1, 22.3, 3.48)
pt3dadd(169.54, 277.1, 22.3, 3.48)
pt3dadd(169.4, 276.94, 22.3, 3.48)
pt3dadd(169.26, 276.78, 22.3, 3.48)
pt3dadd(168.98, 276.78, 22.3, 3.48)
pt3dadd(168.7, 276.47, 22.3, 3.48)
pt3dadd(168.43, 276.31, 22.3, 3.48)
pt3dadd(168.01, 276.15, 22.3, 3.48)
pt3dadd(167.73, 275.99, 22.3, 3.48)
pt3dadd(167.31, 275.83, 22.3, 3.48)
pt3dadd(167.03, 275.83, 22.3, 3.48)
pt3dadd(166.75, 275.68, 22.3, 3.48)
pt3dadd(166.47, 275.52, 22.3, 3.48)
pt3dadd(166.2, 275.52, 22.3, 3.48)
pt3dadd(165.92, 275.36, 22.3, 3.48)
pt3dadd(165.08, 275.36, 22.3, 3.48)
}
}
proc shape3d_82() {
dend[49] { pt3dadd(164.8, 275.2, 22.3, 3.48)
pt3dadd(162.99, 275.2, 22.3, 3.48)
pt3dadd(162.71, 275.04, 22.3, 3.48)
pt3dadd(160.9, 275.04, 22.3, 3.48)
pt3dadd(158.62, 273.9, 22.3, 3.48)
pt3dadd(158.53, 274.88, 22.3, 3.48)
pt3dadd(119.82, 259.7, 0, 3.1)
pt3dadd(85.45, 246.47, 0, 3.1)
pt3dadd(65.32, 218.55, 0, 3.1)
pt3dadd(57.57, 171.04, 0, 3.1)
pt3dadd(59.12, 143.12, 0, 3.1)
pt3dadd(64.39, 130.88, 0, 3.1)
}
dend[50] {pt3dclear()
pt3dstyle(1, 285.116, 395.725, -3.53219)
pt3dadd(307.74, 390.63, -2.7, 9.85)
pt3dadd(307.74, 391.4, -2.7, 9.85)
pt3dadd(308.55, 391.41, -2.7, 9.85)
}
dend[51] {pt3dclear()
pt3dadd(308.55, 391.41, -2.7, 9.85)
pt3dadd(308.08, 392.17, -2.7, 9.85)
pt3dadd(308.42, 392.94, -2.7, 9.85)
pt3dadd(308.76, 393.33, -2.7, 9.85)
pt3dadd(308.76, 394.1, -2.7, 9.85)
pt3dadd(309.1, 394.87, -2.7, 9.85)
pt3dadd(309.44, 395.64, -2.7, 9.85)
pt3dadd(309.78, 396.03, -2.7, 9.85)
pt3dadd(309.78, 396.8, -2.7, 9.85)
pt3dadd(310.12, 397.18, -2.7, 9.85)
pt3dadd(310.12, 397.96, -2.7, 9.85)
pt3dadd(310.46, 398.34, -2.7, 9.85)
pt3dadd(310.8, 398.73, -2.7, 9.85)
pt3dadd(311.48, 399.5, -2.7, 9.85)
pt3dadd(311.82, 400.27, -2.7, 9.85)
pt3dadd(312.84, 401.43, -2.7, 9.85)
pt3dadd(313.18, 401.81, -2.7, 9.85)
pt3dadd(313.52, 402.2, -2.7, 9.85)
pt3dadd(313.86, 402.59, -2.7, 9.85)
pt3dadd(314.54, 402.59, -2.7, 9.85)
pt3dadd(314.88, 402.97, -2.7, 9.85)
pt3dadd(315.22, 403.36, -2.7, 9.85)
pt3dadd(315.9, 403.74, -2.7, 9.85)
pt3dadd(316.58, 404.13, -2.7, 9.85)
pt3dadd(316.92, 404.13, -2.7, 9.85)
}
dend[52] {pt3dclear()
pt3dadd(316.92, 404.13, -2.7, 8.64)
pt3dadd(309.53, 404.29, 1.3, 8.64)
pt3dadd(309.53, 404.76, 1.3, 8.64)
pt3dadd(309.39, 405.24, 1.3, 8.64)
pt3dadd(309.25, 405.55, 1.3, 8.64)
pt3dadd(308.2, 407.68, 1.3, 8.64)
}
dend[53] {pt3dclear()
pt3dadd(308.2, 407.68, 1.3, 8.64)
pt3dadd(309.25, 407.93, 1.3, 8.64)
pt3dadd(309.39, 408.24, 1.3, 8.64)
pt3dadd(309.39, 408.56, 1.3, 8.64)
pt3dadd(309.53, 408.72, 1.3, 8.64)
pt3dadd(309.53, 409.03, 1.3, 8.64)
pt3dadd(309.67, 409.19, 1.3, 8.64)
pt3dadd(309.67, 409.83, 1.3, 8.64)
pt3dadd(309.81, 409.98, 1.3, 8.64)
pt3dadd(309.81, 410.78, 1.3, 8.64)
pt3dadd(309.95, 410.93, 1.3, 8.64)
pt3dadd(310.09, 411.09, 1.3, 8.64)
pt3dadd(310.09, 411.88, 1.3, 8.64)
pt3dadd(310.23, 412.04, 1.3, 8.64)
pt3dadd(310.37, 412.52, 1.3, 8.64)
pt3dadd(310.37, 412.83, 1.3, 8.64)
pt3dadd(310.51, 412.99, 1.3, 8.64)
pt3dadd(310.65, 413.31, 1.3, 8.64)
pt3dadd(310.78, 413.47, 1.3, 8.64)
pt3dadd(310.92, 413.78, 1.3, 8.64)
pt3dadd(311.06, 414.1, 1.3, 8.64)
pt3dadd(311.06, 414.57, 1.3, 8.64)
pt3dadd(311.2, 414.73, 1.3, 8.64)
pt3dadd(311.2, 415.05, 1.3, 8.64)
pt3dadd(311.34, 415.21, 1.3, 8.64)
pt3dadd(311.48, 415.52, 1.3, 8.64)
pt3dadd(311.48, 416.95, 1.3, 8.64)
pt3dadd(311.62, 417.27, 1.3, 8.64)
pt3dadd(311.62, 418.21, 1.3, 8.64)
pt3dadd(311.76, 418.53, 1.3, 8.64)
pt3dadd(311.9, 418.69, 1.3, 8.64)
pt3dadd(311.9, 420.91, 1.3, 8.64)
pt3dadd(312.04, 421.38, 1.3, 8.64)
pt3dadd(312.04, 422.17, 1.3, 8.64)
pt3dadd(312.18, 422.65, 1.3, 8.64)
pt3dadd(312.32, 422.96, 1.3, 8.64)
pt3dadd(312.32, 423.28, 1.3, 8.64)
pt3dadd(312.46, 423.6, 1.3, 8.64)
pt3dadd(312.6, 424.07, 1.3, 8.64)
pt3dadd(312.74, 424.55, 1.3, 8.64)
pt3dadd(312.74, 424.86, 1.3, 8.64)
pt3dadd(312.87, 425.34, 1.3, 8.64)
pt3dadd(313.01, 425.81, 1.3, 8.64)
pt3dadd(313.01, 426.13, 1.3, 8.64)
pt3dadd(313.15, 426.29, 1.3, 8.64)
pt3dadd(313.15, 427.08, 1.3, 8.64)
pt3dadd(313.29, 427.55, 1.3, 8.64)
pt3dadd(313.29, 431.51, 1.3, 8.64)
pt3dadd(312.87, 427.24, 4.3, 8.64)
pt3dadd(312.87, 427.55, 4.3, 8.64)
pt3dadd(312.74, 427.71, 4.3, 8.64)
pt3dadd(312.6, 428.03, 4.3, 8.64)
pt3dadd(312.6, 428.66, 4.3, 8.64)
pt3dadd(312.46, 428.98, 4.3, 8.64)
pt3dadd(312.46, 429.29, 4.3, 8.64)
pt3dadd(312.32, 429.77, 4.3, 8.64)
pt3dadd(312.32, 430.56, 4.3, 8.64)
pt3dadd(312.18, 430.88, 4.3, 8.64)
pt3dadd(312.18, 431.99, 4.3, 8.64)
pt3dadd(312.04, 432.14, 4.3, 8.64)
pt3dadd(312.04, 432.93, 4.3, 8.64)
pt3dadd(311.9, 433.25, 4.3, 8.64)
pt3dadd(311.9, 448.29, 4.3, 8.64)
pt3dadd(311.76, 448.6, 4.3, 8.64)
pt3dadd(311.76, 453.67, 4.3, 8.64)
pt3dadd(311.62, 454.14, 4.3, 8.64)
pt3dadd(311.62, 455.41, 4.3, 8.64)
pt3dadd(311.48, 455.73, 4.3, 8.64)
pt3dadd(311.48, 456.83, 4.3, 8.64)
pt3dadd(311.34, 456.99, 4.3, 8.64)
pt3dadd(311.34, 457.63, 4.3, 8.64)
pt3dadd(311.2, 457.94, 4.3, 8.64)
pt3dadd(311.2, 458.42, 4.3, 8.64)
pt3dadd(311.06, 458.89, 4.3, 8.64)
pt3dadd(310.92, 459.37, 4.3, 8.64)
pt3dadd(310.92, 460.48, 4.3, 8.64)
pt3dadd(310.92, 458.89, 8.3, 8.92)
pt3dadd(310.92, 465.07, 8.3, 8.92)
pt3dadd(311.06, 465.38, 8.3, 8.92)
pt3dadd(311.06, 469.5, 8.3, 8.92)
pt3dadd(311.2, 469.97, 8.3, 8.92)
pt3dadd(311.34, 470.45, 8.3, 8.92)
pt3dadd(311.48, 470.76, 8.3, 8.92)
pt3dadd(311.48, 471.71, 8.3, 8.92)
pt3dadd(311.62, 472.03, 8.3, 8.92)
pt3dadd(311.62, 472.5, 8.3, 8.92)
pt3dadd(311.76, 472.82, 8.3, 8.92)
pt3dadd(311.9, 473.45, 8.3, 8.92)
pt3dadd(312.04, 473.93, 8.3, 8.92)
pt3dadd(312.04, 474.4, 8.3, 8.92)
pt3dadd(312.32, 475.2, 8.3, 8.92)
pt3dadd(312.32, 475.51, 8.3, 8.92)
pt3dadd(312.6, 475.99, 8.3, 8.92)
pt3dadd(312.6, 476.46, 8.3, 8.92)
pt3dadd(312.74, 476.94, 8.3, 8.92)
pt3dadd(312.74, 477.57, 8.3, 8.92)
pt3dadd(312.87, 477.89, 8.3, 8.92)
pt3dadd(312.87, 478.52, 8.3, 8.92)
pt3dadd(313.01, 478.99, 8.3, 8.92)
pt3dadd(313.15, 479.31, 8.3, 8.92)
pt3dadd(313.29, 479.79, 8.3, 8.92)
pt3dadd(313.29, 480.58, 8.3, 8.92)
pt3dadd(313.43, 481.05, 8.3, 8.92)
pt3dadd(313.57, 481.37, 8.3, 8.92)
pt3dadd(313.57, 482, 8.3, 8.92)
pt3dadd(313.71, 482.32, 8.3, 8.92)
pt3dadd(313.85, 482.63, 8.3, 8.92)
pt3dadd(313.85, 483.27, 8.3, 8.92)
pt3dadd(313.99, 483.58, 8.3, 8.92)
pt3dadd(313.99, 484.22, 8.3, 8.92)
pt3dadd(314.13, 484.53, 8.3, 8.92)
pt3dadd(314.13, 485.32, 8.3, 8.92)
pt3dadd(314.27, 485.64, 8.3, 8.92)
pt3dadd(314.27, 488.49, 8.3, 8.92)
pt3dadd(314.41, 488.97, 8.3, 8.92)
pt3dadd(314.41, 491.5, 8.3, 8.92)
pt3dadd(314.55, 491.66, 8.3, 8.92)
pt3dadd(314.55, 494.03, 8.3, 8.92)
pt3dadd(314.55, 488.97, 11.3, 8.92)
pt3dadd(314.55, 490.55, 11.3, 8.92)
pt3dadd(314.83, 491.5, 11.3, 8.92)
pt3dadd(315.1, 492.13, 11.3, 8.92)
pt3dadd(315.1, 507.96, 11.3, 8.92)
pt3dadd(315.38, 508.91, 11.3, 8.92)
pt3dadd(315.38, 511.44, 11.3, 8.92)
}
dend[54] {pt3dclear()
pt3dadd(315.38, 511.44, 11.3, 9.2)
pt3dadd(316.92, 514.45, 12.3, 9.2)
pt3dadd(317.33, 523.47, 12.3, 9.2)
pt3dadd(317.33, 522.99, 12.3, 8.92)
pt3dadd(317.33, 523.79, 12.3, 8.92)
pt3dadd(317.47, 524.1, 12.3, 8.92)
pt3dadd(317.75, 524.42, 12.3, 8.92)
pt3dadd(317.89, 524.89, 12.3, 8.92)
pt3dadd(317.89, 530.43, 12.3, 8.92)
pt3dadd(318.03, 530.75, 12.3, 8.92)
pt3dadd(318.17, 531.23, 12.3, 8.92)
pt3dadd(318.17, 531.7, 12.3, 8.92)
pt3dadd(318.31, 532.02, 12.3, 8.92)
pt3dadd(318.45, 532.49, 12.3, 8.92)
pt3dadd(318.59, 532.97, 12.3, 8.92)
pt3dadd(318.87, 533.6, 12.3, 8.92)
pt3dadd(319.01, 533.92, 12.3, 8.92)
pt3dadd(319.28, 534.07, 12.3, 8.92)
pt3dadd(319.28, 534.39, 12.3, 8.92)
pt3dadd(319.42, 534.87, 12.3, 8.92)
pt3dadd(319.56, 535.18, 12.3, 8.92)
pt3dadd(319.7, 535.5, 12.3, 8.92)
pt3dadd(319.84, 535.66, 12.3, 8.92)
pt3dadd(319.98, 535.97, 12.3, 8.92)
pt3dadd(320.12, 536.29, 12.3, 8.92)
pt3dadd(320.12, 536.61, 12.3, 8.92)
pt3dadd(320.26, 536.77, 12.3, 8.92)
pt3dadd(320.26, 537.08, 12.3, 8.92)
}
}
proc shape3d_83() {
dend[54] { pt3dadd(320.4, 537.24, 12.3, 8.92)
pt3dadd(320.54, 537.56, 12.3, 8.92)
pt3dadd(320.54, 537.87, 12.3, 8.92)
pt3dadd(320.82, 538.35, 12.3, 8.92)
pt3dadd(320.96, 538.66, 12.3, 8.92)
pt3dadd(321.1, 538.82, 12.3, 8.92)
pt3dadd(321.24, 538.98, 12.3, 8.92)
pt3dadd(321.24, 540.09, 12.3, 8.92)
pt3dadd(320.96, 537.87, 14.3, 8.92)
pt3dadd(320.96, 539.14, 14.3, 8.92)
pt3dadd(321.24, 539.77, 14.3, 8.92)
pt3dadd(321.24, 543.89, 14.3, 8.92)
pt3dadd(321.51, 544.52, 14.3, 8.92)
pt3dadd(321.51, 545.15, 14.3, 8.92)
pt3dadd(321.79, 545.79, 14.3, 8.92)
pt3dadd(320.18, 549.5, 14.3, 8.92)
}
dend[55] {pt3dclear()
pt3dadd(320.18, 549.5, 14.3, 8.92)
pt3dadd(321.79, 551.17, 14.3, 8.92)
pt3dadd(322.07, 551.8, 14.3, 8.92)
pt3dadd(322.35, 552.43, 14.3, 8.92)
pt3dadd(322.63, 552.75, 14.3, 8.92)
pt3dadd(323.19, 553.7, 14.3, 8.92)
pt3dadd(323.47, 554.33, 14.3, 8.92)
pt3dadd(324.02, 555.28, 14.3, 8.92)
pt3dadd(324.86, 556.87, 14.3, 8.92)
pt3dadd(325.14, 557.18, 14.3, 8.92)
pt3dadd(325.14, 559.72, 14.3, 8.92)
pt3dadd(325.42, 560.03, 14.3, 8.92)
pt3dadd(325.7, 560.35, 14.3, 8.92)
pt3dadd(325.7, 560.98, 14.3, 8.92)
pt3dadd(325.97, 561.3, 14.3, 8.92)
pt3dadd(326.25, 561.61, 14.3, 8.92)
pt3dadd(326.25, 562.88, 14.3, 8.92)
pt3dadd(326.53, 563.2, 14.3, 8.92)
pt3dadd(326.81, 563.51, 14.3, 8.92)
pt3dadd(326.81, 569.85, 14.3, 8.92)
pt3dadd(326.25, 564.78, 18.3, 8.92)
pt3dadd(326.53, 565.41, 18.3, 8.92)
pt3dadd(326.81, 565.73, 18.3, 8.92)
pt3dadd(326.81, 566.36, 18.3, 8.92)
pt3dadd(327.09, 566.68, 18.3, 8.92)
pt3dadd(327.09, 567.31, 18.3, 8.92)
pt3dadd(327.37, 567.63, 18.3, 8.92)
pt3dadd(327.65, 568.26, 18.3, 8.92)
pt3dadd(327.65, 569.85, 18.3, 8.92)
pt3dadd(327.92, 570.48, 18.3, 8.92)
pt3dadd(327.92, 573.01, 18.3, 8.92)
pt3dadd(328.2, 573.64, 18.3, 8.92)
pt3dadd(328.2, 574.91, 18.3, 8.92)
pt3dadd(328.48, 575.54, 18.3, 8.92)
pt3dadd(328.48, 576.18, 18.3, 8.92)
pt3dadd(328.76, 576.81, 18.3, 8.92)
pt3dadd(329.04, 577.13, 18.3, 8.92)
pt3dadd(329.04, 578.08, 18.3, 8.92)
pt3dadd(329.32, 578.71, 18.3, 8.92)
pt3dadd(329.6, 579.34, 18.3, 8.92)
pt3dadd(329.6, 581.24, 18.3, 8.92)
pt3dadd(329.88, 582.19, 18.3, 8.92)
pt3dadd(330.15, 582.82, 18.3, 8.92)
pt3dadd(330.43, 583.46, 18.3, 8.92)
pt3dadd(330.43, 585.04, 18.3, 8.92)
pt3dadd(330.71, 585.67, 18.3, 8.92)
pt3dadd(330.71, 587.26, 18.3, 8.92)
pt3dadd(330.99, 588.21, 18.3, 8.92)
pt3dadd(330.99, 589.79, 18.3, 8.92)
pt3dadd(331.27, 590.42, 18.3, 8.92)
pt3dadd(331.55, 591.05, 18.3, 8.92)
pt3dadd(331.55, 592, 18.3, 8.92)
pt3dadd(332.11, 592.64, 18.3, 8.92)
pt3dadd(332.11, 593.59, 18.3, 8.92)
pt3dadd(332.66, 594.54, 18.3, 8.92)
pt3dadd(332.66, 595.17, 18.3, 8.92)
pt3dadd(333.22, 596.12, 18.3, 8.92)
pt3dadd(333.22, 596.75, 18.3, 8.92)
pt3dadd(333.5, 597.7, 18.3, 8.92)
pt3dadd(333.5, 598.34, 18.3, 8.92)
pt3dadd(333.78, 599.28, 18.3, 8.92)
pt3dadd(333.78, 607.52, 18.3, 8.92)
pt3dadd(334.06, 608.15, 18.3, 8.92)
pt3dadd(334.06, 612.58, 18.3, 8.92)
pt3dadd(334.34, 605.3, 21.3, 8.92)
pt3dadd(334.34, 606.25, 21.3, 8.92)
pt3dadd(334.61, 607.2, 21.3, 8.92)
pt3dadd(334.89, 607.52, 21.3, 8.92)
pt3dadd(334.89, 638.85, 21.3, 8.92)
pt3dadd(335.17, 639.17, 21.3, 8.92)
pt3dadd(335.17, 642.65, 21.3, 8.92)
pt3dadd(335.45, 643.6, 21.3, 8.92)
pt3dadd(335.45, 647.4, 21.3, 8.92)
pt3dadd(335.73, 648.03, 21.3, 8.92)
pt3dadd(335.73, 648.98, 21.3, 8.92)
pt3dadd(336.01, 649.62, 21.3, 8.92)
pt3dadd(336.29, 650.25, 21.3, 8.92)
pt3dadd(336.29, 651.2, 21.3, 8.92)
pt3dadd(336.56, 651.52, 21.3, 8.92)
pt3dadd(336.56, 652.78, 21.3, 8.92)
pt3dadd(336.01, 649.62, 23.3, 8.92)
pt3dadd(336.29, 650.25, 23.3, 8.92)
pt3dadd(336.84, 651.2, 23.3, 8.92)
pt3dadd(337.12, 652.15, 23.3, 8.92)
pt3dadd(337.4, 653.1, 23.3, 8.92)
pt3dadd(337.4, 672.09, 23.3, 8.92)
pt3dadd(337.68, 672.41, 23.3, 8.92)
pt3dadd(337.96, 673.36, 23.3, 8.92)
pt3dadd(337.96, 674.63, 23.3, 8.92)
pt3dadd(338.24, 675.26, 23.3, 8.92)
pt3dadd(338.52, 675.89, 23.3, 8.92)
pt3dadd(338.52, 676.84, 23.3, 8.92)
pt3dadd(338.79, 677.16, 23.3, 8.92)
pt3dadd(339.07, 677.79, 23.3, 8.92)
pt3dadd(339.35, 678.11, 23.3, 8.92)
pt3dadd(339.63, 678.74, 23.3, 8.92)
pt3dadd(339.91, 679.37, 23.3, 8.92)
pt3dadd(339.91, 680.01, 23.3, 8.92)
pt3dadd(340.19, 680.96, 23.3, 8.92)
pt3dadd(340.19, 682.22, 23.3, 8.92)
pt3dadd(340.47, 682.54, 23.3, 8.92)
pt3dadd(340.75, 683.17, 23.3, 8.92)
pt3dadd(341.02, 683.49, 23.3, 8.92)
pt3dadd(341.3, 683.81, 23.3, 8.92)
pt3dadd(341.3, 685.07, 23.3, 8.92)
pt3dadd(341.58, 685.7, 23.3, 8.92)
pt3dadd(341.58, 686.34, 23.3, 8.92)
pt3dadd(341.86, 686.97, 23.3, 8.92)
pt3dadd(342.14, 687.6, 23.3, 8.92)
pt3dadd(342.42, 687.92, 23.3, 8.92)
pt3dadd(342.42, 688.55, 23.3, 8.92)
pt3dadd(342.7, 689.19, 23.3, 8.92)
pt3dadd(342.98, 689.5, 23.3, 8.92)
pt3dadd(342.98, 690.14, 23.3, 8.92)
pt3dadd(343.25, 690.45, 23.3, 8.92)
pt3dadd(343.53, 691.09, 23.3, 8.92)
pt3dadd(343.53, 692.04, 23.3, 8.92)
pt3dadd(343.81, 692.67, 23.3, 8.92)
pt3dadd(343.81, 694.57, 23.3, 8.92)
pt3dadd(342.98, 692.99, 27.3, 8.92)
pt3dadd(342.98, 713.25, 27.3, 8.92)
pt3dadd(343.25, 714.19, 27.3, 8.92)
pt3dadd(343.25, 715.14, 27.3, 8.92)
pt3dadd(343.53, 715.78, 27.3, 8.92)
pt3dadd(343.53, 716.41, 27.3, 8.92)
pt3dadd(343.81, 717.04, 27.3, 8.92)
pt3dadd(344.09, 717.36, 27.3, 8.92)
pt3dadd(344.09, 717.99, 27.3, 8.92)
pt3dadd(344.37, 718.94, 27.3, 8.92)
pt3dadd(344.65, 719.58, 27.3, 8.92)
pt3dadd(344.65, 720.21, 27.3, 8.92)
pt3dadd(344.93, 720.84, 27.3, 8.92)
pt3dadd(345.2, 721.79, 27.3, 8.92)
pt3dadd(345.48, 722.43, 27.3, 8.92)
pt3dadd(345.76, 723.06, 27.3, 8.92)
pt3dadd(346.04, 723.69, 27.3, 8.92)
pt3dadd(346.04, 724.32, 27.3, 8.92)
pt3dadd(346.32, 725.27, 27.3, 8.92)
pt3dadd(346.6, 725.91, 27.3, 8.92)
pt3dadd(346.88, 726.22, 27.3, 8.92)
pt3dadd(346.88, 726.86, 27.3, 8.92)
pt3dadd(347.16, 727.49, 27.3, 8.92)
pt3dadd(347.16, 728.12, 27.3, 8.92)
pt3dadd(347.43, 729.07, 27.3, 8.92)
pt3dadd(347.71, 729.71, 27.3, 8.92)
pt3dadd(347.71, 731.61, 27.3, 8.92)
pt3dadd(347.99, 732.24, 27.3, 8.92)
pt3dadd(347.99, 758.2, 27.3, 8.92)
pt3dadd(347.99, 754.4, 29.3, 8.92)
pt3dadd(347.99, 756.93, 29.3, 8.92)
pt3dadd(348.27, 757.56, 29.3, 8.92)
pt3dadd(348.55, 758.2, 29.3, 8.92)
pt3dadd(348.55, 758.83, 29.3, 8.92)
pt3dadd(348.83, 759.46, 29.3, 8.92)
pt3dadd(349.39, 760.1, 29.3, 8.92)
pt3dadd(349.66, 760.73, 29.3, 8.92)
pt3dadd(349.66, 761.36, 29.3, 8.92)
pt3dadd(349.94, 761.68, 29.3, 8.92)
pt3dadd(350.22, 761.99, 29.3, 8.92)
pt3dadd(350.22, 762.63, 29.3, 8.92)
pt3dadd(350.5, 762.94, 29.3, 8.92)
pt3dadd(350.5, 764.84, 29.3, 8.92)
pt3dadd(350.78, 765.79, 29.3, 8.92)
pt3dadd(351.06, 766.43, 29.3, 8.92)
pt3dadd(351.06, 767.69, 29.3, 8.92)
pt3dadd(351.34, 768.64, 29.3, 8.92)
pt3dadd(351.61, 769.28, 29.3, 8.92)
pt3dadd(351.61, 769.91, 29.3, 8.92)
pt3dadd(351.89, 770.54, 29.3, 8.92)
pt3dadd(352.17, 771.17, 29.3, 8.92)
pt3dadd(352.45, 771.81, 29.3, 8.92)
pt3dadd(353.01, 772.76, 29.3, 8.92)
pt3dadd(353.29, 773.71, 29.3, 8.92)
pt3dadd(353.57, 774.34, 29.3, 8.92)
pt3dadd(353.84, 774.97, 29.3, 8.92)
pt3dadd(354.12, 775.61, 29.3, 8.92)
pt3dadd(354.4, 776.24, 29.3, 8.92)
pt3dadd(354.68, 776.87, 29.3, 8.92)
pt3dadd(354.68, 777.51, 29.3, 8.92)
pt3dadd(354.96, 778.46, 29.3, 8.92)
pt3dadd(355.24, 778.77, 29.3, 8.92)
pt3dadd(355.52, 779.41, 29.3, 8.92)
pt3dadd(355.8, 780.04, 29.3, 8.92)
pt3dadd(356.07, 780.67, 29.3, 8.92)
}
}
proc shape3d_84() {
dend[55] { pt3dadd(356.07, 781.3, 29.3, 8.92)
pt3dadd(356.35, 781.94, 29.3, 8.92)
pt3dadd(356.63, 782.89, 29.3, 8.92)
pt3dadd(356.63, 783.84, 29.3, 8.92)
pt3dadd(356.91, 784.15, 29.3, 8.92)
pt3dadd(357.19, 785.1, 29.3, 8.92)
pt3dadd(357.47, 785.74, 29.3, 8.92)
pt3dadd(357.75, 786.37, 29.3, 8.92)
pt3dadd(358.03, 787, 29.3, 8.92)
pt3dadd(358.03, 787.64, 29.3, 8.92)
pt3dadd(358.3, 788.27, 29.3, 8.92)
pt3dadd(358.86, 789.22, 29.3, 8.92)
pt3dadd(359.14, 789.85, 29.3, 8.92)
pt3dadd(359.42, 790.48, 29.3, 8.92)
pt3dadd(359.7, 791.12, 29.3, 8.92)
pt3dadd(359.98, 791.75, 29.3, 8.92)
pt3dadd(360.25, 792.38, 29.3, 8.92)
pt3dadd(360.25, 793.02, 29.3, 8.92)
pt3dadd(360.53, 793.65, 29.3, 8.92)
pt3dadd(361.09, 794.28, 29.3, 8.92)
pt3dadd(361.37, 795.23, 29.3, 8.92)
pt3dadd(361.65, 795.87, 29.3, 8.92)
pt3dadd(361.93, 796.5, 29.3, 8.92)
pt3dadd(361.93, 797.77, 29.3, 8.92)
pt3dadd(362.21, 798.4, 29.3, 8.92)
pt3dadd(362.48, 799.35, 29.3, 8.92)
pt3dadd(362.48, 799.98, 29.3, 8.92)
pt3dadd(362.76, 800.61, 29.3, 8.92)
pt3dadd(363.04, 801.25, 29.3, 8.92)
pt3dadd(363.04, 801.88, 29.3, 8.92)
pt3dadd(363.32, 802.83, 29.3, 8.92)
pt3dadd(363.6, 803.46, 29.3, 8.92)
pt3dadd(363.6, 804.73, 29.3, 8.92)
pt3dadd(363.88, 805.68, 29.3, 8.92)
pt3dadd(364.16, 806.31, 29.3, 8.92)
pt3dadd(364.16, 807.58, 29.3, 8.92)
pt3dadd(362.21, 801.56, 32.3, 8.92)
pt3dadd(362.48, 802.2, 32.3, 8.92)
pt3dadd(363.04, 803.15, 32.3, 8.92)
pt3dadd(363.6, 804.1, 32.3, 8.92)
pt3dadd(363.88, 804.41, 32.3, 8.92)
pt3dadd(364.44, 806, 32.3, 8.92)
pt3dadd(364.71, 806.63, 32.3, 8.92)
pt3dadd(364.71, 807.26, 32.3, 8.92)
pt3dadd(364.99, 807.9, 32.3, 8.92)
pt3dadd(364.99, 817.71, 32.3, 8.92)
pt3dadd(365.27, 818.66, 32.3, 8.92)
pt3dadd(365.27, 819.61, 32.3, 8.92)
pt3dadd(365.55, 820.24, 32.3, 8.92)
pt3dadd(365.83, 821.19, 32.3, 8.92)
pt3dadd(365.83, 822.14, 32.3, 8.92)
pt3dadd(366.11, 823.09, 32.3, 8.92)
pt3dadd(366.39, 823.72, 32.3, 8.92)
pt3dadd(366.39, 824.67, 32.3, 8.92)
pt3dadd(366.67, 825.62, 32.3, 8.92)
pt3dadd(366.94, 826.57, 32.3, 8.92)
pt3dadd(366.94, 830.05, 32.3, 8.92)
pt3dadd(367.22, 831, 32.3, 8.92)
pt3dadd(367.5, 831.64, 32.3, 8.92)
pt3dadd(367.5, 832.59, 32.3, 8.92)
pt3dadd(367.78, 833.54, 32.3, 8.92)
pt3dadd(368.06, 834.17, 32.3, 8.92)
pt3dadd(368.34, 834.8, 32.3, 8.92)
pt3dadd(368.62, 835.75, 32.3, 8.92)
pt3dadd(368.62, 837.65, 32.3, 8.92)
pt3dadd(368.89, 838.28, 32.3, 8.92)
pt3dadd(369.17, 839.23, 32.3, 8.92)
pt3dadd(369.17, 841.13, 32.3, 8.92)
pt3dadd(369.45, 841.45, 32.3, 8.92)
pt3dadd(369.45, 843.03, 32.3, 8.92)
pt3dadd(368.34, 841.45, 36.3, 8.92)
pt3dadd(368.34, 842.08, 36.3, 8.92)
pt3dadd(368.62, 843.03, 36.3, 8.92)
pt3dadd(369.17, 843.98, 36.3, 8.92)
pt3dadd(369.45, 844.62, 36.3, 8.92)
pt3dadd(369.73, 845.88, 36.3, 8.92)
pt3dadd(370.01, 846.2, 36.3, 8.92)
pt3dadd(370.29, 846.83, 36.3, 8.92)
pt3dadd(370.57, 847.15, 36.3, 8.92)
pt3dadd(370.57, 848.73, 36.3, 8.92)
pt3dadd(370.85, 849.05, 36.3, 8.92)
pt3dadd(371.12, 849.68, 36.3, 8.92)
pt3dadd(371.4, 850, 36.3, 8.92)
pt3dadd(371.68, 850.63, 36.3, 8.92)
pt3dadd(371.68, 851.26, 36.3, 8.92)
pt3dadd(371.96, 851.9, 36.3, 8.92)
pt3dadd(372.52, 852.85, 36.3, 8.92)
pt3dadd(373.08, 853.8, 36.3, 8.92)
pt3dadd(373.35, 854.11, 36.3, 8.92)
pt3dadd(373.63, 855.06, 36.3, 8.92)
pt3dadd(373.63, 856.01, 36.3, 8.92)
pt3dadd(374.19, 856.64, 36.3, 8.92)
pt3dadd(374.19, 857.28, 36.3, 8.92)
pt3dadd(374.75, 858.54, 36.3, 8.92)
pt3dadd(375.03, 859.18, 36.3, 8.92)
pt3dadd(375.58, 860.13, 36.3, 8.92)
pt3dadd(375.86, 860.76, 36.3, 8.92)
pt3dadd(376.14, 861.71, 36.3, 8.92)
pt3dadd(376.7, 862.03, 36.3, 8.92)
pt3dadd(376.98, 863.29, 36.3, 8.92)
pt3dadd(376.98, 864.24, 36.3, 8.92)
pt3dadd(377.26, 864.56, 36.3, 8.92)
pt3dadd(377.26, 865.83, 36.3, 8.92)
pt3dadd(377.53, 866.46, 36.3, 8.92)
pt3dadd(377.53, 868.36, 36.3, 8.92)
pt3dadd(377.81, 868.99, 36.3, 8.92)
pt3dadd(377.72, 886.19, 36.3, 8.92)
}
dend[56] {pt3dclear()
pt3dadd(377.72, 886.19, 36.3, 10.87)
pt3dadd(386.55, 890.05, 117.55, 10.87)
pt3dadd(393.34, 903.55, 117.55, 8.15)
pt3dadd(399.46, 924.77, 117.55, 8.83)
}
dend[57] {pt3dclear()
pt3dadd(399.46, 924.77, 117.55, 8.15)
pt3dadd(399.46, 1002.32, 117.55, 8.15)
pt3dadd(412.36, 1106.1, 117.55, 8.15)
pt3dadd(420.52, 1145.83, 117.55, 10.87)
}
dend[58] {pt3dclear()
pt3dadd(420.52, 1145.83, 117.55, 10.87)
pt3dadd(444.97, 1201.78, 117.55, 10.87)
pt3dadd(466.03, 1293.21, 117.55, 10.87)
pt3dadd(485.05, 1388.5, 117.55, 10.87)
}
dend[59] {pt3dclear()
pt3dadd(485.05, 1388.5, 117.55, 10.87)
pt3dadd(500, 1441.36, 117.55, 10.87)
pt3dadd(521.74, 1509.65, 117.55, 10.87)
pt3dadd(544.84, 1567.9, 117.55, 10.87)
pt3dadd(564.54, 1615.36, 117.55, 10.87)
pt3dadd(577.45, 1647.38, 117.55, 10.87)
pt3dadd(584.92, 1670.91, 117.55, 10.87)
pt3dadd(602.58, 1717.59, 117.55, 10.87)
pt3dadd(614.13, 1752.7, 117.55, 8.83)
}
dend[60] {pt3dclear()
pt3dadd(614.13, 1752.7, 117.55, 8.83)
pt3dadd(658.97, 1824.85, 117.55, 8.83)
pt3dadd(682.07, 1869.99, 117.55, 8.83)
pt3dadd(693.61, 1904.32, 117.55, 8.15)
pt3dadd(707.88, 1962.58, 117.55, 8.15)
pt3dadd(708.56, 1963.35, 117.55, 8.15)
pt3dadd(708.56, 1964.89, 117.55, 8.15)
pt3dadd(709.92, 1965.66, 117.55, 8.15)
pt3dadd(711.28, 1966.44, 117.55, 8.15)
pt3dadd(711.28, 1967.98, 117.55, 8.15)
pt3dadd(712.64, 1969.52, 117.55, 8.15)
pt3dadd(713.32, 1970.29, 117.55, 8.15)
pt3dadd(713.99, 1971.07, 117.55, 8.15)
pt3dadd(713.99, 1974.15, 117.55, 8.15)
pt3dadd(714.67, 1974.92, 117.55, 8.15)
pt3dadd(715.35, 1975.7, 117.55, 8.15)
pt3dadd(715.35, 1979.55, 117.55, 8.15)
pt3dadd(716.03, 1980.32, 117.55, 8.15)
pt3dadd(716.03, 2010.42, 117.55, 8.15)
pt3dadd(716.71, 2011.19, 117.55, 8.15)
pt3dadd(716.71, 2012.73, 117.55, 8.15)
pt3dadd(717.39, 2013.5, 117.55, 8.15)
pt3dadd(718.07, 2014.28, 117.55, 8.15)
pt3dadd(718.75, 2015.05, 117.55, 8.15)
pt3dadd(719.43, 2015.82, 117.55, 8.15)
pt3dadd(720.11, 2016.59, 117.55, 8.15)
pt3dadd(720.79, 2017.36, 117.55, 8.15)
pt3dadd(721.47, 2018.91, 117.55, 8.15)
pt3dadd(722.15, 2019.68, 117.55, 8.15)
pt3dadd(722.83, 2020.45, 117.55, 8.15)
pt3dadd(723.51, 2021.22, 117.55, 8.15)
pt3dadd(724.18, 2021.99, 117.55, 8.15)
pt3dadd(724.86, 2022.76, 117.55, 8.15)
pt3dadd(726.22, 2023.53, 117.55, 8.15)
pt3dadd(728.26, 2023.53, 117.55, 8.15)
pt3dadd(729.62, 2026.24, 117.55, 7.47)
pt3dadd(733.02, 2055.94, 117.55, 10.87)
}
dend[61] {pt3dclear()
pt3dadd(733.02, 2055.94, 117.55, 10.87)
pt3dadd(740.49, 2099.54, 117.55, 10.87)
pt3dadd(748.64, 2140.05, 117.55, 10.87)
pt3dadd(756.79, 2192.9, 117.55, 10.87)
pt3dadd(766.3, 2273.92, 117.55, 10.87)
pt3dadd(774.46, 2330.25, 117.55, 10.87)
pt3dadd(768.51, 2308.22, 117.55, 5.77)
pt3dadd(768.51, 2307.45, 117.55, 5.77)
pt3dadd(768.85, 2307.83, 117.55, 5.77)
pt3dadd(769.19, 2308.22, 117.55, 5.77)
pt3dadd(769.19, 2308.99, 117.55, 5.77)
pt3dadd(769.53, 2309.38, 117.55, 5.77)
pt3dadd(769.53, 2314.39, 117.55, 5.77)
pt3dadd(769.87, 2314.78, 117.55, 5.77)
pt3dadd(770.21, 2315.16, 117.55, 5.77)
pt3dadd(770.55, 2315.55, 117.55, 5.77)
pt3dadd(770.89, 2316.32, 117.55, 5.77)
pt3dadd(771.23, 2316.71, 117.55, 5.77)
pt3dadd(771.57, 2317.09, 117.55, 5.77)
pt3dadd(771.91, 2317.48, 117.55, 5.77)
pt3dadd(772.25, 2317.86, 117.55, 5.77)
pt3dadd(772.59, 2318.25, 117.55, 5.77)
pt3dadd(773.27, 2319.02, 117.55, 5.77)
pt3dadd(773.61, 2319.41, 117.55, 5.77)
pt3dadd(773.95, 2320.18, 117.55, 5.77)
pt3dadd(774.29, 2320.56, 117.55, 5.77)
pt3dadd(774.29, 2327.51, 117.55, 5.77)
pt3dadd(773.95, 2327.89, 117.55, 5.77)
pt3dadd(772.25, 2327.89, 117.55, 5.77)
pt3dadd(772.59, 2328.28, 117.55, 5.77)
pt3dadd(772.93, 2328.67, 117.55, 5.77)
pt3dadd(773.27, 2329.05, 117.55, 5.77)
pt3dadd(773.61, 2329.82, 117.55, 5.77)
pt3dadd(773.95, 2330.21, 117.55, 5.77)
pt3dadd(774.29, 2330.6, 117.55, 5.77)
}
}
proc shape3d_85() {
dend[61] { pt3dadd(774.63, 2330.98, 117.55, 5.77)
pt3dadd(774.97, 2331.75, 117.55, 5.77)
pt3dadd(775.31, 2332.14, 117.55, 5.77)
pt3dadd(775.98, 2332.52, 117.55, 8)
pt3dadd(776.66, 2332.91, 117.55, 9)
pt3dadd(777.34, 2333.3, 117.55, 5.77)
pt3dadd(777.68, 2333.68, 117.55, 8)
pt3dadd(778.02, 2334.07, 117.55, 5.77)
pt3dadd(778.36, 2334.45, 117.55, 5.77)
pt3dadd(778.7, 2334.84, 117.55, 5.77)
pt3dadd(779.04, 2335.23, 117.55, 5.77)
pt3dadd(779.38, 2335.61, 117.55, 5.77)
pt3dadd(779.72, 2336, 117.55, 5.77)
pt3dadd(780.06, 2336.38, 117.55, 5.77)
pt3dadd(780.4, 2337.15, 117.55, 5.77)
pt3dadd(780.74, 2337.54, 117.55, 5.77)
pt3dadd(781.08, 2337.93, 117.55, 5.77)
pt3dadd(781.42, 2338.7, 117.55, 5.77)
pt3dadd(781.76, 2339.47, 117.55, 7)
pt3dadd(782.1, 2339.85, 117.55, 5.77)
pt3dadd(782.44, 2340.24, 117.55, 5.77)
pt3dadd(783.12, 2340.63, 117.55, 5.77)
pt3dadd(783.12, 2341.4, 117.55, 7.7)
pt3dadd(783.46, 2341.78, 117.55, 5.77)
pt3dadd(783.8, 2342.17, 117.55, 5.77)
pt3dadd(783.8, 2342.94, 117.55, 5.77)
pt3dadd(784.14, 2343.33, 117.55, 5.77)
pt3dadd(784.14, 2344.1, 117.55, 5.77)
pt3dadd(784.48, 2344.87, 117.55, 5.77)
pt3dadd(784.48, 2345.64, 117.55, 5.77)
pt3dadd(784.82, 2346.41, 117.55, 5.77)
pt3dadd(785.16, 2346.8, 117.55, 5.77)
pt3dadd(785.16, 2347.57, 117.55, 5.77)
pt3dadd(785.5, 2347.96, 117.55, 5.77)
pt3dadd(785.83, 2348.34, 117.55, 5.77)
pt3dadd(786.85, 2349.5, 117.55, 5.77)
pt3dadd(787.19, 2350.27, 117.55, 5.77)
pt3dadd(787.53, 2350.66, 117.55, 5.77)
pt3dadd(787.87, 2351.04, 117.55, 5.77)
pt3dadd(788.21, 2351.43, 117.55, 5.77)
pt3dadd(788.55, 2351.81, 117.55, 6)
pt3dadd(788.89, 2352.2, 117.55, 5.77)
pt3dadd(789.23, 2352.59, 117.55, 5.77)
pt3dadd(789.57, 2352.97, 117.55, 5.77)
pt3dadd(789.91, 2353.36, 117.55, 5.77)
pt3dadd(790.25, 2353.74, 117.55, 5.77)
pt3dadd(790.59, 2354.13, 117.55, 5.77)
pt3dadd(790.93, 2354.52, 117.55, 5.77)
pt3dadd(791.27, 2354.9, 117.55, 5.77)
pt3dadd(791.27, 2355.67, 117.55, 5.77)
pt3dadd(791.95, 2356.06, 117.55, 5.77)
pt3dadd(791.95, 2356.83, 117.55, 5.77)
pt3dadd(792.29, 2357.6, 117.55, 5.77)
pt3dadd(792.63, 2357.99, 117.55, 5.77)
pt3dadd(792.97, 2358.37, 117.55, 5.77)
pt3dadd(792.97, 2359.53, 117.55, 5.77)
pt3dadd(793.31, 2359.92, 117.55, 5.77)
pt3dadd(793.31, 2361.85, 117.55, 5.77)
pt3dadd(793.65, 2362.62, 117.55, 5.77)
pt3dadd(793.99, 2363.39, 117.55, 5.77)
pt3dadd(793.99, 2364.55, 117.55, 5.77)
pt3dadd(794.33, 2365.32, 117.55, 5.77)
pt3dadd(794.67, 2366.09, 117.55, 5.77)
pt3dadd(795.01, 2366.48, 117.55, 5.77)
pt3dadd(795.35, 2366.86, 117.55, 5.77)
pt3dadd(795.69, 2367.25, 117.55, 5.77)
pt3dadd(796.03, 2367.63, 117.55, 5.77)
pt3dadd(796.36, 2368.02, 117.55, 5.77)
pt3dadd(796.7, 2368.4, 117.55, 5.77)
pt3dadd(797.04, 2369.18, 117.55, 5.77)
pt3dadd(797.38, 2369.56, 117.55, 5.77)
pt3dadd(798.06, 2369.95, 117.55, 5.77)
pt3dadd(798.4, 2370.33, 117.55, 5.77)
pt3dadd(796.7, 2366.86, 117.55, 5.1)
pt3dadd(796.7, 2367.25, 117.55, 5.1)
pt3dadd(797.04, 2367.63, 117.55, 5.1)
pt3dadd(797.04, 2368.4, 117.55, 5.1)
pt3dadd(797.38, 2368.79, 117.55, 5.1)
pt3dadd(797.38, 2370.33, 117.55, 5.1)
pt3dadd(797.72, 2370.72, 117.55, 5.1)
pt3dadd(798.06, 2371.1, 117.55, 5.1)
pt3dadd(798.06, 2372.26, 117.55, 5.1)
pt3dadd(798.4, 2372.65, 117.55, 5.1)
pt3dadd(798.74, 2373.03, 117.55, 5.1)
pt3dadd(798.74, 2373.81, 117.55, 5.1)
pt3dadd(799.08, 2374.19, 117.55, 5.1)
pt3dadd(799.42, 2374.58, 117.55, 5.1)
pt3dadd(799.76, 2375.35, 117.55, 5.1)
pt3dadd(800.1, 2375.73, 117.55, 5.1)
pt3dadd(800.44, 2376.12, 117.55, 5.1)
pt3dadd(800.78, 2376.51, 117.55, 5.1)
pt3dadd(801.12, 2376.89, 117.55, 5.1)
pt3dadd(801.46, 2377.28, 117.55, 5.1)
pt3dadd(801.8, 2377.66, 117.55, 5.1)
pt3dadd(802.14, 2378.05, 117.55, 5.1)
pt3dadd(802.48, 2378.44, 117.55, 5.1)
pt3dadd(802.82, 2379.21, 117.55, 5.1)
pt3dadd(803.16, 2379.59, 117.55, 5.1)
pt3dadd(803.5, 2379.98, 117.55, 5.1)
pt3dadd(803.84, 2380.36, 117.55, 5.1)
pt3dadd(803.84, 2381.14, 117.55, 5.1)
pt3dadd(804.52, 2381.91, 117.55, 5.1)
pt3dadd(804.86, 2382.68, 117.55, 5.1)
pt3dadd(805.2, 2383.45, 117.55, 5.1)
pt3dadd(805.54, 2383.84, 117.55, 5.1)
pt3dadd(805.54, 2384.61, 117.55, 5.1)
pt3dadd(805.88, 2384.99, 117.55, 5.1)
pt3dadd(806.22, 2385.38, 117.55, 5.1)
pt3dadd(806.56, 2385.77, 117.55, 5.1)
pt3dadd(806.89, 2386.54, 117.55, 5.1)
pt3dadd(807.23, 2386.92, 117.55, 5.1)
pt3dadd(807.57, 2387.31, 117.55, 5.1)
pt3dadd(807.91, 2388.08, 117.55, 5.1)
pt3dadd(808.25, 2388.85, 117.55, 5.1)
pt3dadd(808.59, 2389.24, 117.55, 5.1)
pt3dadd(808.93, 2389.62, 117.55, 5.1)
pt3dadd(809.61, 2390.4, 117.55, 5.1)
pt3dadd(809.95, 2390.78, 117.55, 5.1)
pt3dadd(810.29, 2391.17, 117.55, 5.1)
pt3dadd(810.63, 2391.55, 117.55, 5.1)
pt3dadd(810.97, 2392.32, 117.55, 5.1)
pt3dadd(811.31, 2392.71, 117.55, 5.1)
pt3dadd(811.31, 2393.48, 117.55, 5.1)
pt3dadd(811.65, 2393.87, 117.55, 5.1)
pt3dadd(811.99, 2394.25, 117.55, 5.1)
pt3dadd(812.33, 2395.02, 117.55, 5.1)
pt3dadd(812.33, 2395.8, 117.55, 5.1)
pt3dadd(812.67, 2396.18, 117.55, 5.1)
pt3dadd(813.01, 2396.57, 117.55, 5.1)
pt3dadd(813.35, 2396.95, 117.55, 5.1)
pt3dadd(813.69, 2397.34, 117.55, 5.1)
pt3dadd(814.03, 2397.73, 117.55, 5.1)
pt3dadd(814.03, 2398.5, 117.55, 5.1)
pt3dadd(814.37, 2398.88, 117.55, 5.1)
pt3dadd(814.71, 2399.27, 117.55, 5.1)
pt3dadd(814.71, 2401.2, 117.55, 5.1)
pt3dadd(816.07, 2403.51, 117.55, 5.77)
pt3dadd(816.07, 2403.13, 117.55, 5.77)
pt3dadd(816.41, 2402.74, 117.55, 5.77)
pt3dadd(816.75, 2403.51, 117.55, 5.77)
pt3dadd(816.75, 2404.28, 117.55, 5.77)
pt3dadd(817.08, 2404.67, 117.55, 5.77)
pt3dadd(817.42, 2405.06, 117.55, 5.77)
pt3dadd(817.42, 2405.83, 117.55, 5.77)
pt3dadd(817.76, 2406.21, 117.55, 5.77)
pt3dadd(817.76, 2406.98, 117.55, 5.77)
pt3dadd(818.1, 2407.76, 117.55, 5.77)
pt3dadd(818.44, 2408.14, 117.55, 5.77)
pt3dadd(818.44, 2408.91, 117.55, 5.77)
pt3dadd(818.78, 2409.69, 117.55, 5.77)
pt3dadd(819.12, 2410.07, 117.55, 5.77)
pt3dadd(819.12, 2410.84, 117.55, 5.77)
pt3dadd(819.46, 2411.61, 117.55, 5.77)
pt3dadd(819.8, 2412, 117.55, 5.77)
pt3dadd(819.8, 2413.16, 117.55, 5.77)
pt3dadd(820.14, 2413.54, 117.55, 5.77)
pt3dadd(820.48, 2414.31, 117.55, 5.77)
pt3dadd(820.82, 2415.09, 117.55, 5.77)
pt3dadd(820.82, 2415.86, 117.55, 5.77)
pt3dadd(821.16, 2416.24, 117.55, 5.77)
pt3dadd(821.16, 2417.02, 117.55, 5.77)
pt3dadd(821.5, 2417.79, 117.55, 5.77)
pt3dadd(821.84, 2418.17, 117.55, 5.77)
pt3dadd(821.84, 2418.94, 117.55, 5.77)
pt3dadd(822.18, 2419.72, 117.55, 5.77)
pt3dadd(822.52, 2420.1, 117.55, 5.77)
pt3dadd(822.52, 2420.87, 117.55, 5.77)
pt3dadd(822.86, 2421.26, 117.55, 5.77)
pt3dadd(822.86, 2422.03, 117.55, 5.77)
pt3dadd(823.2, 2422.42, 117.55, 5.77)
pt3dadd(823.2, 2423.19, 117.55, 5.77)
pt3dadd(823.54, 2423.57, 117.55, 5.77)
pt3dadd(823.54, 2424.73, 117.55, 5.77)
pt3dadd(823.88, 2425.5, 117.55, 5.77)
pt3dadd(824.22, 2425.89, 117.55, 5.77)
pt3dadd(824.22, 2427.05, 117.55, 5.77)
pt3dadd(824.56, 2427.43, 117.55, 5.77)
pt3dadd(824.56, 2428.2, 117.55, 5.77)
pt3dadd(824.9, 2428.59, 117.55, 5.77)
pt3dadd(824.9, 2429.75, 117.55, 5.77)
pt3dadd(825.24, 2430.13, 117.55, 5.77)
pt3dadd(825.24, 2430.9, 117.55, 5.77)
pt3dadd(825.58, 2431.29, 117.55, 5.77)
pt3dadd(825.58, 2432.45, 117.55, 5.77)
pt3dadd(825.92, 2433.22, 117.55, 5.77)
pt3dadd(826.26, 2433.6, 117.55, 5.77)
pt3dadd(826.26, 2434.38, 117.55, 5.77)
pt3dadd(826.6, 2435.15, 117.55, 5.77)
pt3dadd(826.6, 2436.31, 117.55, 5.77)
pt3dadd(826.94, 2437.08, 117.55, 5.77)
pt3dadd(827.28, 2437.46, 117.55, 5.77)
pt3dadd(827.28, 2438.23, 117.55, 5.77)
pt3dadd(827.61, 2439.01, 117.55, 5.77)
pt3dadd(827.95, 2439.78, 117.55, 5.77)
pt3dadd(828.29, 2440.16, 117.55, 5.77)
pt3dadd(828.29, 2440.94, 117.55, 5.77)
pt3dadd(828.63, 2441.32, 117.55, 5.77)
pt3dadd(828.97, 2442.09, 117.55, 5.77)
pt3dadd(829.31, 2442.86, 117.55, 5.77)
pt3dadd(829.65, 2443.25, 117.55, 5.77)
}
}
proc shape3d_86() {
dend[61] { pt3dadd(829.65, 2444.02, 117.55, 5.77)
pt3dadd(829.99, 2444.79, 117.55, 5.77)
pt3dadd(830.33, 2445.56, 117.55, 5.77)
pt3dadd(830.33, 2446.72, 117.55, 5.77)
pt3dadd(830.67, 2447.11, 117.55, 5.77)
pt3dadd(831.01, 2447.49, 117.55, 5.77)
pt3dadd(831.01, 2448.65, 117.55, 5.77)
pt3dadd(831.35, 2449.04, 117.55, 5.77)
pt3dadd(831.35, 2449.81, 117.55, 5.77)
pt3dadd(831.69, 2450.19, 117.55, 5.77)
pt3dadd(831.69, 2451.74, 117.55, 5.77)
pt3dadd(832.03, 2452.12, 117.55, 5.77)
pt3dadd(832.37, 2453.28, 117.55, 5.77)
pt3dadd(832.37, 2454.05, 117.55, 5.77)
pt3dadd(832.71, 2454.82, 117.55, 5.77)
pt3dadd(832.71, 2455.6, 117.55, 5.77)
pt3dadd(833.05, 2455.98, 117.55, 5.77)
pt3dadd(833.39, 2456.37, 117.55, 5.77)
pt3dadd(833.39, 2457.52, 117.55, 5.77)
pt3dadd(833.73, 2457.91, 117.55, 5.77)
pt3dadd(834.07, 2458.68, 117.55, 5.77)
pt3dadd(834.41, 2459.45, 117.55, 5.77)
pt3dadd(834.41, 2460.23, 117.55, 5.77)
pt3dadd(834.75, 2461, 117.55, 5.77)
pt3dadd(835.09, 2461.77, 117.55, 5.77)
pt3dadd(835.43, 2462.54, 117.55, 5.77)
pt3dadd(835.77, 2462.93, 117.55, 5.77)
pt3dadd(836.11, 2463.31, 117.55, 5.77)
pt3dadd(836.11, 2464.08, 117.55, 5.77)
pt3dadd(836.45, 2464.47, 117.55, 5.77)
pt3dadd(836.79, 2464.85, 117.55, 5.77)
pt3dadd(836.79, 2465.63, 117.55, 5.77)
pt3dadd(837.13, 2466.4, 117.55, 5.77)
pt3dadd(837.47, 2466.78, 117.55, 5.77)
pt3dadd(837.47, 2467.56, 117.55, 5.77)
pt3dadd(837.81, 2467.94, 117.55, 5.77)
pt3dadd(838.14, 2468.33, 117.55, 5.77)
pt3dadd(838.48, 2469.1, 117.55, 5.77)
pt3dadd(838.48, 2469.87, 117.55, 5.77)
pt3dadd(838.82, 2470.64, 117.55, 5.77)
pt3dadd(839.16, 2471.03, 117.55, 5.77)
pt3dadd(839.16, 2472.19, 117.55, 5.77)
pt3dadd(839.5, 2472.57, 117.55, 5.77)
pt3dadd(839.84, 2472.96, 117.55, 5.77)
pt3dadd(839.84, 2474.11, 117.55, 5.77)
pt3dadd(840.18, 2474.5, 117.55, 5.77)
pt3dadd(840.18, 2476.43, 117.55, 5.77)
pt3dadd(840.52, 2476.81, 117.55, 5.77)
pt3dadd(840.52, 2483.76, 117.55, 5.77)
pt3dadd(841.54, 2484.53, 117.55, 6.45)
pt3dadd(841.88, 2484.92, 117.55, 6.45)
pt3dadd(841.88, 2486.07, 117.55, 6.45)
pt3dadd(842.22, 2486.46, 117.55, 6.45)
pt3dadd(842.56, 2486.85, 117.55, 6.45)
pt3dadd(842.56, 2488, 117.55, 6.45)
pt3dadd(842.9, 2488.39, 117.55, 6.45)
pt3dadd(842.9, 2490.32, 117.55, 6.45)
pt3dadd(843.24, 2490.7, 117.55, 6.45)
pt3dadd(843.24, 2491.86, 117.55, 6.45)
pt3dadd(843.58, 2492.25, 117.55, 6.45)
pt3dadd(843.58, 2493.02, 117.55, 6.45)
pt3dadd(843.92, 2493.4, 117.55, 6.45)
pt3dadd(843.92, 2494.56, 117.55, 6.45)
pt3dadd(844.26, 2495.33, 117.55, 6.45)
pt3dadd(844.6, 2495.72, 117.55, 6.45)
pt3dadd(844.6, 2496.88, 117.55, 6.45)
pt3dadd(844.94, 2497.65, 117.55, 6.45)
pt3dadd(845.28, 2498.42, 117.55, 6.45)
pt3dadd(845.62, 2498.81, 117.55, 6.45)
pt3dadd(845.96, 2499.58, 117.55, 6.45)
pt3dadd(845.96, 2500.35, 117.55, 6.45)
pt3dadd(846.3, 2500.73, 117.55, 6.45)
pt3dadd(846.64, 2501.12, 117.55, 6.45)
pt3dadd(846.98, 2501.51, 117.55, 6.45)
pt3dadd(846.98, 2502.28, 117.55, 6.45)
pt3dadd(847.32, 2502.66, 117.55, 6.45)
pt3dadd(847.32, 2503.44, 117.55, 6.45)
pt3dadd(847.66, 2504.21, 117.55, 6.45)
pt3dadd(847.66, 2504.98, 117.55, 6.45)
pt3dadd(848, 2505.75, 117.55, 6.45)
pt3dadd(848, 2507.29, 117.55, 6.45)
pt3dadd(848.33, 2507.68, 117.55, 6.45)
pt3dadd(848.67, 2508.06, 117.55, 6.45)
pt3dadd(848.67, 2508.84, 117.55, 6.45)
pt3dadd(849.01, 2509.61, 117.55, 6.45)
pt3dadd(849.01, 2510.38, 117.55, 6.45)
pt3dadd(849.35, 2510.77, 117.55, 6.45)
pt3dadd(849.69, 2511.15, 117.55, 6.45)
pt3dadd(849.69, 2512.31, 117.55, 6.45)
pt3dadd(850.03, 2513.08, 117.55, 6.45)
pt3dadd(850.37, 2513.47, 117.55, 6.45)
pt3dadd(850.71, 2513.85, 117.55, 6.45)
pt3dadd(851.05, 2514.24, 117.55, 6.45)
pt3dadd(851.05, 2515.01, 117.55, 6.45)
pt3dadd(851.39, 2515.4, 117.55, 6.45)
pt3dadd(851.39, 2521.95, 117.55, 6.45)
pt3dadd(851.73, 2522.73, 117.55, 6.45)
pt3dadd(851.73, 2540.86, 117.55, 6.45)
pt3dadd(851.39, 2541.63, 117.55, 6.45)
pt3dadd(851.05, 2545.49, 117.55, 6.11)
pt3dadd(851.05, 2546.26, 117.55, 6.11)
pt3dadd(850.71, 2546.65, 117.55, 6.11)
pt3dadd(850.71, 2548.57, 117.55, 6.11)
pt3dadd(851.05, 2548.96, 117.55, 6.11)
pt3dadd(851.05, 2550.12, 117.55, 6.11)
pt3dadd(851.39, 2550.89, 117.55, 6.11)
pt3dadd(851.39, 2551.66, 117.55, 6.11)
pt3dadd(851.73, 2552.05, 117.55, 6.11)
pt3dadd(852.07, 2552.82, 117.55, 6.11)
pt3dadd(852.07, 2553.59, 117.55, 6.11)
pt3dadd(852.41, 2553.98, 117.55, 6.11)
pt3dadd(852.75, 2554.36, 117.55, 6.11)
pt3dadd(852.75, 2555.13, 117.55, 6.11)
pt3dadd(853.09, 2555.52, 117.55, 6.11)
pt3dadd(853.09, 2556.29, 117.55, 6.11)
pt3dadd(853.43, 2557.06, 117.55, 6.11)
pt3dadd(853.43, 2557.83, 117.55, 6.11)
pt3dadd(853.77, 2558.6, 117.55, 6.11)
pt3dadd(853.77, 2562.85, 117.55, 6.11)
pt3dadd(854.11, 2563.62, 117.55, 6.11)
pt3dadd(854.11, 2566.32, 117.55, 6.11)
pt3dadd(854.45, 2566.71, 117.55, 6.11)
pt3dadd(856.66, 2567.13, 117.55, 6.11)
}
dend[62] {pt3dclear()
pt3dadd(856.66, 2567.13, 117.55, 5.43)
pt3dadd(845.11, 2575.62, 117.55, 5.43)
pt3dadd(745.28, 2675.51, 117.55, 5.77)
pt3dadd(737.81, 2688.05, 117.55, 5.77)
pt3dadd(733.74, 2701.36, 117.55, 5.77)
pt3dadd(729.66, 2708.88, 117.55, 5.77)
pt3dadd(727.62, 2716.79, 117.55, 5.77)
pt3dadd(725.24, 2719.3, 117.55, 5.43)
pt3dadd(723.21, 2737.62, 117.55, 5.43)
pt3dadd(722.19, 2753.25, 117.55, 5.43)
pt3dadd(720.15, 2765.4, 117.55, 5.43)
pt3dadd(718.45, 2773.7, 117.55, 5.43)
pt3dadd(718.45, 2780.45, 117.55, 4.76)
pt3dadd(718.45, 2784.5, 117.55, 4.42)
pt3dadd(721.85, 2792.41, 117.55, 4.42)
pt3dadd(725.58, 2799.93, 117.55, 4.08)
pt3dadd(729.32, 2810.54, 117.55, 4.08)
pt3dadd(728.98, 2819.61, 117.55, 4.08)
pt3dadd(727.62, 2827.13, 117.55, 4.08)
pt3dadd(725.92, 2835.81, 117.55, 4.08)
pt3dadd(724.56, 2842.18, 117.55, 4.08)
pt3dadd(725.24, 2852.01, 117.55, 3.06)
pt3dadd(725.24, 2852.59, 117.55, 3.06)
}
dend[63] {pt3dclear()
pt3dadd(725.24, 2852.59, 117.55, 3.06)
pt3dadd(725.58, 2863.39, 117.55, 3.06)
pt3dadd(724.9, 2867.45, 117.55, 3.06)
pt3dadd(725.58, 2870.72, 117.55, 3.06)
pt3dadd(731.7, 2880.95, 117.55, 3.06)
pt3dadd(735.09, 2891.17, 117.55, 3.06)
pt3dadd(737.81, 2898.31, 117.55, 2.72)
pt3dadd(751.06, 2926.28, 117.55, 2.72)
pt3dadd(757.85, 2950.39, 117.55, 2.72)
pt3dadd(761.59, 2966.79, 117.55, 2.72)
pt3dadd(764.31, 2979.71, 117.55, 2.72)
pt3dadd(762.95, 2990.71, 117.55, 2.72)
pt3dadd(765.67, 3017.14, 117.55, 2.72)
pt3dadd(766.68, 3042.41, 117.55, 2.72)
pt3dadd(770.76, 3060.73, 117.55, 2.72)
pt3dadd(776.54, 3079.06, 117.55, 2.72)
pt3dadd(781.97, 3095.84, 117.55, 2.72)
pt3dadd(779.93, 3111.47, 117.55, 2.72)
pt3dadd(776.54, 3122.85, 117.55, 2.72)
pt3dadd(773.82, 3131.14, 117.55, 2.72)
pt3dadd(773.48, 3146.77, 117.55, 2.72)
pt3dadd(776.2, 3154.68, 117.55, 3.06)
pt3dadd(777.21, 3170.3, 117.55, 3.06)
pt3dadd(776.54, 3185.93, 117.55, 3.06)
pt3dadd(776.54, 3201.55, 117.55, 3.06)
pt3dadd(776.54, 3214.09, 117.55, 3.06)
pt3dadd(775.52, 3223.16, 117.55, 3.4)
pt3dadd(774.84, 3229.91, 117.55, 3.4)
pt3dadd(772.12, 3235.12, 117.55, 4.08)
pt3dadd(774.84, 3239.55, 117.55, 4.08)
pt3dadd(774.16, 3245.15, 117.55, 4.08)
pt3dadd(873, 3706.37, 117.55, 3.74)
pt3dadd(875, 3704.09, 117.55, 3.74)
pt3dadd(872.32, 3714.67, 117.55, 3.74)
pt3dadd(874.36, 3721.42, 117.55, 3.74)
pt3dadd(875.38, 3726.24, 117.55, 3.74)
pt3dadd(873.68, 3728.75, 117.55, 3.74)
pt3dadd(873, 3731.26, 117.55, 3.74)
pt3dadd(874.02, 3738.01, 117.55, 3.74)
pt3dadd(876.4, 3754.79, 117.55, 4.42)
pt3dadd(873.68, 3776.59, 117.55, 4.42)
pt3dadd(871.98, 3792.99, 117.55, 4.42)
pt3dadd(869.95, 3805.14, 117.55, 4.42)
pt3dadd(870.96, 3828.48, 117.55, 4.42)
pt3dadd(871.64, 3847.58, 117.55, 4.42)
pt3dadd(875.04, 3862.43, 117.55, 4.42)
pt3dadd(880.82, 3873.04, 117.55, 4.42)
pt3dadd(887.27, 3892.91, 117.55, 4.42)
pt3dadd(891.35, 3916.64, 117.55, 4.76)
pt3dadd(891.01, 3935.73, 117.55, 4.76)
pt3dadd(886.25, 3955.22, 117.55, 4.76)
pt3dadd(877.76, 3967.37, 117.55, 4.76)
pt3dadd(868.93, 3998.04, 117.55, 4.76)
pt3dadd(862.47, 4014.44, 117.55, 4.08)
}
}
proc shape3d_87() {
dend[63] { pt3dadd(852.8, 4055.92, 117.55, 4.08)
pt3dadd(855.18, 4047.04, 117.55, 4.08)
pt3dadd(853.48, 4048.97, 117.55, 4.08)
pt3dadd(846.35, 4057.07, 117.55, 4.08)
pt3dadd(856.88, 4057.46, 117.55, 4.08)
pt3dadd(856.54, 4057.84, 117.55, 4.08)
pt3dadd(854.5, 4057.84, 117.55, 4.08)
pt3dadd(854.16, 4058.23, 117.55, 4.08)
pt3dadd(853.82, 4058.62, 117.55, 4.08)
pt3dadd(853.48, 4059, 117.55, 4.08)
pt3dadd(853.14, 4059.39, 117.55, 4.08)
pt3dadd(852.8, 4059.77, 117.55, 4.08)
pt3dadd(852.46, 4060.16, 117.55, 4.08)
pt3dadd(852.12, 4060.54, 117.55, 4.08)
pt3dadd(851.78, 4060.93, 117.55, 4.08)
pt3dadd(851.44, 4061.32, 117.55, 4.08)
pt3dadd(851.1, 4061.7, 117.55, 4.08)
pt3dadd(850.77, 4062.47, 117.55, 4.08)
pt3dadd(850.09, 4062.47, 117.55, 4.08)
pt3dadd(849.75, 4062.86, 117.55, 4.08)
pt3dadd(849.75, 4063.63, 117.55, 4.08)
pt3dadd(849.41, 4064.02, 117.55, 4.08)
pt3dadd(849.07, 4064.4, 117.55, 4.08)
pt3dadd(848.73, 4064.79, 117.55, 4.08)
pt3dadd(848.39, 4065.17, 117.55, 4.08)
pt3dadd(844.31, 4065.17, 117.55, 4.08)
pt3dadd(846.69, 4065.17, 117.55, 4.08)
pt3dadd(846.69, 4072.12, 117.55, 4.08)
pt3dadd(846.35, 4073.28, 117.55, 4.08)
pt3dadd(846.01, 4074.05, 117.55, 4.08)
pt3dadd(845.67, 4074.82, 117.55, 4.08)
pt3dadd(846.01, 4074.43, 117.55, 4.08)
pt3dadd(846.69, 4074.05, 117.55, 4.08)
pt3dadd(847.03, 4073.66, 117.55, 4.08)
pt3dadd(847.03, 4072.12, 117.55, 4.08)
pt3dadd(847.37, 4071.73, 117.55, 4.08)
pt3dadd(847.71, 4071.35, 117.55, 4.08)
pt3dadd(848.39, 4071.35, 117.55, 4.08)
pt3dadd(848.39, 4074.43, 117.55, 4.08)
pt3dadd(848.05, 4074.82, 117.55, 4.08)
pt3dadd(848.05, 4075.59, 117.55, 4.08)
pt3dadd(847.71, 4075.98, 117.55, 4.08)
pt3dadd(847.71, 4076.75, 117.55, 4.08)
pt3dadd(847.37, 4077.13, 117.55, 4.08)
pt3dadd(847.03, 4077.52, 117.55, 4.08)
pt3dadd(846.69, 4077.91, 117.55, 4.08)
pt3dadd(846.35, 4078.29, 117.55, 4.08)
pt3dadd(845.67, 4079.06, 117.55, 4.08)
pt3dadd(844.65, 4079.45, 117.55, 4.08)
pt3dadd(844.31, 4079.83, 117.55, 4.08)
pt3dadd(843.97, 4080.22, 117.55, 4.08)
pt3dadd(843.29, 4080.61, 117.55, 4.08)
pt3dadd(842.95, 4081.38, 117.55, 4.08)
pt3dadd(841.59, 4081.38, 117.55, 4.08)
pt3dadd(841.25, 4081.76, 117.55, 4.08)
pt3dadd(840.91, 4082.15, 117.55, 4.08)
pt3dadd(840.57, 4082.53, 117.55, 4.08)
pt3dadd(840.24, 4082.92, 117.55, 4.08)
pt3dadd(840.24, 4089.48, 117.55, 4.08)
pt3dadd(839.9, 4089.86, 117.55, 4.08)
pt3dadd(839.56, 4090.25, 117.55, 4.08)
pt3dadd(839.56, 4091.02, 117.55, 4.08)
pt3dadd(838.88, 4091.02, 117.55, 4.08)
pt3dadd(838.54, 4091.41, 117.55, 4.08)
pt3dadd(838.2, 4091.79, 117.55, 4.08)
pt3dadd(837.86, 4092.18, 117.55, 4.08)
pt3dadd(837.86, 4095.27, 117.55, 4.08)
pt3dadd(837.52, 4095.65, 117.55, 4.08)
pt3dadd(837.18, 4096.04, 117.55, 4.08)
pt3dadd(835.48, 4096.04, 117.55, 4.08)
pt3dadd(835.48, 4104.14, 117.55, 4.08)
pt3dadd(835.14, 4104.53, 117.55, 4.08)
pt3dadd(835.14, 4106.84, 117.55, 4.42)
pt3dadd(834.8, 4107.23, 117.55, 4.42)
pt3dadd(834.46, 4107.61, 117.55, 4.42)
pt3dadd(834.12, 4108, 117.55, 4.42)
pt3dadd(833.78, 4108.38, 117.55, 4.42)
pt3dadd(833.44, 4108.77, 117.55, 4.42)
pt3dadd(833.1, 4109.16, 117.55, 4.42)
pt3dadd(833.1, 4110.31, 117.55, 4.42)
pt3dadd(832.76, 4110.7, 117.55, 4.42)
pt3dadd(832.42, 4111.08, 117.55, 4.42)
pt3dadd(832.08, 4111.47, 117.55, 4.42)
pt3dadd(832.08, 4112.63, 117.55, 4.42)
pt3dadd(831.74, 4113.01, 117.55, 4.42)
pt3dadd(831.4, 4113.4, 117.55, 4.42)
pt3dadd(831.06, 4113.79, 117.55, 4.42)
pt3dadd(830.72, 4114.17, 117.55, 4.42)
pt3dadd(830.38, 4114.56, 117.55, 4.42)
pt3dadd(829.71, 4115.33, 117.55, 4.42)
pt3dadd(829.37, 4115.71, 117.55, 4.42)
pt3dadd(829.03, 4116.1, 117.55, 4.42)
pt3dadd(828.69, 4116.49, 117.55, 4.42)
pt3dadd(828.01, 4116.49, 117.55, 4.42)
pt3dadd(827.67, 4116.87, 117.55, 4.42)
pt3dadd(827.33, 4117.64, 117.55, 4.42)
pt3dadd(826.65, 4117.64, 117.55, 4.42)
pt3dadd(826.31, 4118.42, 117.55, 4.42)
pt3dadd(825.63, 4119.19, 117.55, 4.42)
pt3dadd(824.95, 4119.57, 117.55, 4.42)
pt3dadd(824.61, 4120.34, 117.55, 4.42)
pt3dadd(824.27, 4120.73, 117.55, 4.42)
pt3dadd(823.93, 4121.12, 117.55, 4.42)
pt3dadd(823.59, 4121.5, 117.55, 4.42)
pt3dadd(823.25, 4121.89, 117.55, 4.42)
pt3dadd(823.25, 4122.66, 117.55, 4.42)
pt3dadd(822.91, 4123.43, 117.55, 4.42)
pt3dadd(822.57, 4124.2, 117.55, 4.42)
pt3dadd(822.23, 4124.97, 117.55, 4.42)
pt3dadd(821.89, 4125.36, 117.55, 4.42)
pt3dadd(821.55, 4126.13, 117.55, 4.42)
pt3dadd(821.21, 4126.9, 117.55, 4.42)
pt3dadd(820.87, 4127.67, 117.55, 4.42)
pt3dadd(820.53, 4128.06, 117.55, 4.42)
pt3dadd(820.19, 4128.45, 117.55, 4.42)
pt3dadd(819.85, 4128.83, 117.55, 4.42)
pt3dadd(819.52, 4129.22, 117.55, 4.42)
pt3dadd(819.18, 4129.6, 117.55, 4.42)
pt3dadd(818.84, 4129.99, 117.55, 4.42)
pt3dadd(818.5, 4130.76, 117.55, 4.42)
pt3dadd(818.16, 4131.15, 117.55, 4.42)
pt3dadd(817.48, 4131.53, 117.55, 4.42)
pt3dadd(817.14, 4132.3, 117.55, 4.42)
pt3dadd(816.8, 4133.08, 117.55, 4.42)
pt3dadd(816.46, 4133.46, 117.55, 4.42)
pt3dadd(816.12, 4134.23, 117.55, 4.42)
pt3dadd(815.78, 4134.62, 117.55, 4.42)
pt3dadd(815.44, 4135, 117.55, 4.42)
pt3dadd(815.1, 4135.39, 117.55, 4.42)
pt3dadd(815.1, 4136.16, 117.55, 4.42)
pt3dadd(814.76, 4136.55, 117.55, 4.42)
pt3dadd(814.76, 4140.02, 117.55, 4.42)
pt3dadd(814.42, 4140.41, 117.55, 4.42)
pt3dadd(814.42, 4141.18, 117.55, 4.42)
pt3dadd(814.08, 4141.56, 117.55, 4.42)
pt3dadd(813.74, 4142.33, 117.55, 4.42)
pt3dadd(813.06, 4143.49, 117.55, 4.42)
pt3dadd(812.72, 4144.65, 117.55, 4.42)
pt3dadd(812.04, 4146.19, 117.55, 3.06)
}
dend[64] {pt3dclear()
pt3dadd(812.04, 4146.19, 117.55, 3.06)
pt3dadd(811.02, 4146.19, 117.55, 3.06)
pt3dadd(811.02, 4151.59, 117.55, 3.06)
pt3dadd(810.68, 4151.98, 117.55, 3.06)
pt3dadd(810.68, 4155.45, 117.55, 3.06)
pt3dadd(811.02, 4155.84, 117.55, 3.06)
pt3dadd(811.02, 4156.61, 117.55, 3.06)
pt3dadd(809.66, 4150.82, 117.55, 2.38)
pt3dadd(809.66, 4157.77, 117.55, 2.38)
pt3dadd(810, 4158.15, 117.55, 2.38)
pt3dadd(810, 4159.31, 117.55, 2.38)
pt3dadd(810.34, 4159.7, 117.55, 2.38)
pt3dadd(810.34, 4160.47, 117.55, 2.38)
pt3dadd(810.68, 4161.24, 117.55, 2.38)
pt3dadd(810.68, 4162.01, 117.55, 2.38)
pt3dadd(811.02, 4162.4, 117.55, 2.38)
pt3dadd(811.36, 4162.78, 117.55, 2.38)
pt3dadd(811.36, 4163.55, 117.55, 2.38)
pt3dadd(811.7, 4163.94, 117.55, 2.38)
pt3dadd(811.7, 4165.48, 117.55, 2.38)
pt3dadd(812.04, 4165.87, 117.55, 2.38)
pt3dadd(812.04, 4168.57, 117.55, 2.38)
pt3dadd(812.38, 4168.96, 117.55, 2.38)
pt3dadd(812.38, 4170.88, 117.55, 2.38)
pt3dadd(812.72, 4171.27, 117.55, 2.38)
pt3dadd(812.72, 4172.04, 117.55, 2.38)
pt3dadd(813.06, 4172.43, 117.55, 2.38)
pt3dadd(813.06, 4173.2, 117.55, 2.38)
pt3dadd(813.4, 4173.58, 117.55, 2.38)
pt3dadd(813.4, 4175.13, 117.55, 2.38)
pt3dadd(813.74, 4175.51, 117.55, 2.38)
pt3dadd(813.74, 4177.44, 117.55, 2.38)
pt3dadd(814.08, 4178.21, 117.55, 2.38)
pt3dadd(814.08, 4182.46, 117.55, 2.38)
pt3dadd(814.42, 4182.84, 117.55, 2.38)
pt3dadd(814.42, 4184.39, 117.55, 2.38)
pt3dadd(814.76, 4185.16, 117.55, 2.38)
pt3dadd(814.76, 4185.93, 117.55, 2.38)
pt3dadd(815.1, 4186.32, 117.55, 2.38)
pt3dadd(815.44, 4188.25, 117.55, 2.38)
pt3dadd(815.78, 4189.79, 117.55, 1.7)
pt3dadd(815.78, 4191.33, 117.55, 1.7)
pt3dadd(816.12, 4191.72, 117.55, 1.7)
pt3dadd(816.12, 4192.49, 117.55, 1.7)
pt3dadd(816.46, 4192.88, 117.55, 1.7)
pt3dadd(816.46, 4194.8, 117.55, 1.7)
pt3dadd(816.8, 4195.19, 117.55, 1.7)
pt3dadd(817.14, 4195.58, 117.55, 1.7)
pt3dadd(817.48, 4195.96, 117.55, 1.7)
pt3dadd(817.48, 4197.89, 117.55, 1.7)
pt3dadd(817.82, 4198.28, 117.55, 1.7)
pt3dadd(818.16, 4199.05, 117.55, 1.7)
pt3dadd(818.16, 4199.82, 117.55, 1.7)
pt3dadd(818.5, 4200.21, 117.55, 1.7)
pt3dadd(818.84, 4200.59, 117.55, 1.7)
pt3dadd(819.18, 4200.98, 117.55, 1.7)
pt3dadd(819.18, 4201.75, 117.55, 1.7)
pt3dadd(819.52, 4202.13, 117.55, 1.7)
pt3dadd(819.85, 4202.52, 117.55, 1.7)
pt3dadd(819.85, 4203.29, 117.55, 1.7)
pt3dadd(820.19, 4203.68, 117.55, 1.7)
}
}
proc shape3d_88() {
dend[64] { pt3dadd(820.53, 4204.06, 117.55, 1.7)
pt3dadd(820.53, 4204.83, 117.55, 1.7)
pt3dadd(820.87, 4205.22, 117.55, 1.7)
pt3dadd(820.87, 4205.99, 117.55, 1.7)
pt3dadd(821.21, 4206.76, 117.55, 1.7)
pt3dadd(821.21, 4207.54, 117.55, 1.7)
pt3dadd(821.55, 4207.92, 117.55, 1.7)
pt3dadd(821.55, 4208.69, 117.55, 1.7)
pt3dadd(821.89, 4209.08, 117.55, 1.7)
pt3dadd(821.89, 4209.85, 117.55, 1.7)
pt3dadd(822.23, 4210.24, 117.55, 1.7)
pt3dadd(822.23, 4211.01, 117.55, 1.7)
pt3dadd(822.57, 4211.39, 117.55, 1.7)
pt3dadd(822.91, 4211.78, 117.55, 1.7)
pt3dadd(822.91, 4212.55, 117.55, 1.7)
pt3dadd(823.25, 4212.94, 117.55, 1.7)
pt3dadd(823.59, 4213.32, 117.55, 1.7)
pt3dadd(823.93, 4213.71, 117.55, 1.7)
pt3dadd(824.61, 4214.48, 117.55, 1.7)
pt3dadd(824.95, 4215.25, 117.55, 1.7)
pt3dadd(825.29, 4215.64, 117.55, 1.7)
pt3dadd(825.63, 4216.41, 117.55, 1.7)
pt3dadd(825.63, 4218.34, 117.55, 1.7)
pt3dadd(825.97, 4218.72, 117.55, 1.7)
pt3dadd(826.31, 4219.11, 117.55, 1.7)
pt3dadd(826.31, 4220.27, 117.55, 1.7)
pt3dadd(826.65, 4221.04, 117.55, 1.7)
pt3dadd(826.31, 4221.04, 117.55, 1.7)
pt3dadd(826.65, 4221.42, 117.55, 1.7)
pt3dadd(826.99, 4221.81, 117.55, 1.7)
pt3dadd(826.99, 4222.58, 117.55, 1.7)
pt3dadd(827.33, 4223.35, 117.55, 1.7)
pt3dadd(827.67, 4224.13, 117.55, 1.7)
pt3dadd(828.01, 4224.51, 117.55, 1.7)
pt3dadd(828.01, 4225.28, 117.55, 1.7)
pt3dadd(827.67, 4225.67, 117.55, 1.7)
pt3dadd(827.67, 4226.44, 117.55, 1.7)
pt3dadd(827.33, 4226.83, 117.55, 1.7)
pt3dadd(827.33, 4243.8, 117.55, 1.7)
pt3dadd(827.67, 4244.19, 117.55, 1.7)
pt3dadd(828.01, 4244.57, 117.55, 1.7)
pt3dadd(828.01, 4245.34, 117.55, 1.7)
pt3dadd(828.35, 4246.12, 117.55, 1.7)
pt3dadd(828.69, 4246.5, 117.55, 1.7)
pt3dadd(828.69, 4247.27, 117.55, 1.7)
pt3dadd(829.03, 4247.66, 117.55, 1.7)
pt3dadd(829.37, 4248.43, 117.55, 1.7)
pt3dadd(829.37, 4249.2, 117.55, 1.7)
pt3dadd(829.71, 4249.59, 117.55, 1.7)
pt3dadd(830.05, 4249.97, 117.55, 1.7)
pt3dadd(830.38, 4250.36, 117.55, 1.7)
pt3dadd(830.72, 4250.75, 117.55, 1.7)
pt3dadd(830.72, 4251.52, 117.55, 1.7)
pt3dadd(831.4, 4252.29, 117.55, 1.7)
pt3dadd(831.74, 4252.67, 117.55, 1.7)
pt3dadd(831.74, 4253.45, 117.55, 1.7)
pt3dadd(832.08, 4253.83, 117.55, 1.7)
pt3dadd(832.42, 4254.22, 117.55, 1.7)
pt3dadd(832.76, 4254.99, 117.55, 1.7)
pt3dadd(833.1, 4255.38, 117.55, 1.7)
pt3dadd(833.44, 4256.15, 117.55, 1.7)
pt3dadd(833.78, 4256.53, 117.55, 1.7)
pt3dadd(834.12, 4256.92, 117.55, 1.7)
pt3dadd(834.46, 4257.3, 117.55, 1.7)
pt3dadd(834.8, 4257.69, 117.55, 1.7)
pt3dadd(834.8, 4258.46, 117.55, 1.7)
pt3dadd(835.14, 4258.85, 117.55, 1.7)
pt3dadd(835.48, 4259.23, 117.55, 1.7)
pt3dadd(835.48, 4260, 117.55, 1.7)
pt3dadd(835.82, 4260.78, 117.55, 1.7)
pt3dadd(835.82, 4261.55, 117.55, 1.7)
pt3dadd(836.16, 4261.93, 117.55, 1.7)
pt3dadd(836.5, 4262.32, 117.55, 1.7)
pt3dadd(836.5, 4263.86, 117.55, 1.7)
pt3dadd(836.84, 4264.25, 117.55, 1.7)
pt3dadd(836.84, 4266.56, 117.55, 1.7)
pt3dadd(837.18, 4266.95, 117.55, 1.7)
pt3dadd(837.18, 4268.49, 117.55, 1.7)
pt3dadd(837.52, 4268.88, 117.55, 1.7)
pt3dadd(837.86, 4269.65, 117.55, 1.7)
pt3dadd(837.86, 4270.42, 117.55, 1.7)
pt3dadd(838.2, 4270.81, 117.55, 1.7)
pt3dadd(838.2, 4271.58, 117.55, 1.7)
pt3dadd(838.54, 4272.35, 117.55, 1.7)
pt3dadd(838.54, 4288.17, 117.55, 1.7)
pt3dadd(837.18, 4286.24, 117.55, 1.7)
pt3dadd(837.52, 4286.63, 117.55, 1.7)
pt3dadd(837.52, 4288.17, 117.55, 1.7)
pt3dadd(837.86, 4288.55, 117.55, 1.7)
pt3dadd(838.2, 4288.94, 117.55, 1.7)
pt3dadd(838.2, 4290.1, 117.55, 1.7)
pt3dadd(838.54, 4290.48, 117.55, 1.7)
pt3dadd(838.88, 4290.87, 117.55, 1.7)
pt3dadd(838.88, 4291.64, 117.55, 1.7)
pt3dadd(839.22, 4292.03, 117.55, 1.7)
pt3dadd(839.56, 4292.41, 117.55, 1.7)
pt3dadd(839.9, 4293.18, 117.55, 1.7)
pt3dadd(840.24, 4293.57, 117.55, 1.7)
pt3dadd(840.57, 4293.96, 117.55, 1.7)
pt3dadd(840.91, 4294.34, 117.55, 1.7)
pt3dadd(841.25, 4294.73, 117.55, 1.7)
pt3dadd(841.93, 4295.11, 117.55, 1.7)
pt3dadd(842.27, 4295.5, 117.55, 1.7)
pt3dadd(842.61, 4295.88, 117.55, 1.7)
pt3dadd(842.61, 4306.3, 117.55, 1.7)
pt3dadd(842.95, 4306.69, 117.55, 1.7)
pt3dadd(842.95, 4308.23, 117.55, 1.7)
pt3dadd(843.29, 4308.62, 117.55, 1.7)
pt3dadd(843.29, 4310.54, 117.55, 1.7)
pt3dadd(843.63, 4311.32, 117.55, 1.7)
pt3dadd(843.63, 4312.09, 117.55, 1.7)
pt3dadd(843.97, 4312.47, 117.55, 1.7)
pt3dadd(843.97, 4313.25, 117.55, 1.7)
pt3dadd(844.31, 4313.63, 117.55, 1.7)
pt3dadd(844.31, 4315.17, 117.55, 1.7)
pt3dadd(844.65, 4315.56, 117.55, 1.7)
pt3dadd(844.65, 4316.72, 117.55, 1.7)
pt3dadd(844.99, 4317.1, 117.55, 1.7)
pt3dadd(844.99, 4317.88, 117.55, 1.7)
pt3dadd(845.33, 4318.65, 117.55, 1.7)
pt3dadd(845.67, 4319.03, 117.55, 1.7)
pt3dadd(845.67, 4320.19, 117.55, 1.7)
pt3dadd(846.01, 4320.96, 117.55, 1.7)
pt3dadd(846.35, 4321.35, 117.55, 1.7)
pt3dadd(846.35, 4322.12, 117.55, 1.7)
pt3dadd(846.69, 4322.89, 117.55, 1.7)
pt3dadd(846.69, 4323.66, 117.55, 1.7)
pt3dadd(847.03, 4324.05, 117.55, 1.7)
pt3dadd(847.37, 4324.43, 117.55, 1.7)
pt3dadd(847.37, 4325.21, 117.55, 1.7)
pt3dadd(847.71, 4325.59, 117.55, 1.7)
pt3dadd(847.71, 4327.13, 117.55, 1.7)
pt3dadd(848.05, 4327.52, 117.55, 1.7)
pt3dadd(848.05, 4329.45, 117.55, 1.7)
pt3dadd(848.39, 4329.83, 117.55, 1.7)
pt3dadd(848.39, 4330.99, 117.55, 1.7)
pt3dadd(848.73, 4331.76, 117.55, 1.7)
pt3dadd(849.07, 4332.15, 117.55, 1.7)
pt3dadd(849.07, 4333.31, 117.55, 1.7)
pt3dadd(849.41, 4333.69, 117.55, 1.7)
pt3dadd(849.41, 4334.85, 117.55, 1.7)
pt3dadd(849.75, 4335.62, 117.55, 1.7)
pt3dadd(849.75, 4336.78, 117.55, 1.7)
pt3dadd(850.09, 4337.17, 117.55, 1.7)
pt3dadd(850.09, 4338.32, 117.55, 1.7)
pt3dadd(850.43, 4338.71, 117.55, 1.7)
pt3dadd(850.43, 4340.25, 117.55, 1.7)
pt3dadd(850.77, 4340.64, 117.55, 1.7)
pt3dadd(850.77, 4341.79, 117.55, 1.7)
pt3dadd(851.1, 4342.18, 117.55, 1.7)
pt3dadd(851.44, 4342.95, 117.55, 1.7)
pt3dadd(851.78, 4343.72, 117.55, 1.7)
pt3dadd(852.12, 4344.11, 117.55, 1.7)
pt3dadd(852.12, 4346.81, 117.55, 1.7)
pt3dadd(852.46, 4347.2, 117.55, 1.7)
pt3dadd(852.46, 4357.23, 117.55, 1.7)
pt3dadd(852.8, 4357.61, 117.55, 1.7)
pt3dadd(852.8, 4360.7, 117.55, 1.7)
pt3dadd(853.14, 4361.08, 117.55, 1.7)
pt3dadd(853.48, 4361.47, 117.55, 1.7)
pt3dadd(853.48, 4362.63, 117.55, 1.7)
pt3dadd(853.82, 4363.4, 117.55, 1.7)
pt3dadd(854.16, 4363.79, 117.55, 1.7)
pt3dadd(854.5, 4364.17, 117.55, 1.7)
pt3dadd(854.5, 4364.94, 117.55, 1.7)
pt3dadd(854.84, 4365.71, 117.55, 1.7)
pt3dadd(855.18, 4366.1, 117.55, 1.7)
pt3dadd(855.18, 4367.26, 117.55, 1.7)
pt3dadd(855.52, 4367.64, 117.55, 1.7)
pt3dadd(855.52, 4368.8, 117.55, 1.7)
pt3dadd(855.86, 4369.19, 117.55, 1.7)
pt3dadd(856.2, 4369.57, 117.55, 1.7)
pt3dadd(856.54, 4369.96, 117.55, 1.7)
pt3dadd(856.54, 4371.12, 117.55, 1.7)
pt3dadd(856.88, 4371.5, 117.55, 1.7)
pt3dadd(857.22, 4371.89, 117.55, 1.7)
pt3dadd(857.22, 4372.66, 117.55, 1.7)
pt3dadd(857.56, 4373.04, 117.55, 1.7)
pt3dadd(857.9, 4373.43, 117.55, 1.7)
pt3dadd(858.24, 4374.2, 117.55, 1.7)
pt3dadd(858.58, 4374.59, 117.55, 1.7)
pt3dadd(858.58, 4375.36, 117.55, 1.7)
pt3dadd(858.92, 4375.75, 117.55, 1.7)
pt3dadd(859.26, 4376.52, 117.55, 1.7)
pt3dadd(859.26, 4377.29, 117.55, 1.7)
pt3dadd(859.6, 4377.67, 117.55, 1.7)
pt3dadd(859.6, 4383.08, 117.55, 1.7)
pt3dadd(859.94, 4383.46, 117.55, 1.7)
pt3dadd(859.94, 4385, 117.55, 1.7)
pt3dadd(860.28, 4385.39, 117.55, 1.7)
pt3dadd(860.28, 4386.16, 117.55, 1.7)
pt3dadd(860.62, 4386.55, 117.55, 1.7)
pt3dadd(860.62, 4387.32, 117.55, 1.7)
pt3dadd(860.96, 4387.71, 117.55, 1.7)
pt3dadd(861.63, 4388.48, 117.55, 1.7)
pt3dadd(861.63, 4389.25, 117.55, 1.7)
pt3dadd(861.97, 4389.63, 117.55, 1.7)
pt3dadd(862.31, 4390.02, 117.55, 1.7)
pt3dadd(862.65, 4390.41, 117.55, 1.7)
pt3dadd(862.99, 4390.79, 117.55, 1.7)
}
}
proc shape3d_89() {
dend[64] { pt3dadd(863.33, 4391.18, 117.55, 1.7)
pt3dadd(863.67, 4391.56, 117.55, 1.7)
pt3dadd(864.01, 4391.95, 117.55, 1.7)
pt3dadd(864.35, 4392.33, 117.55, 1.7)
pt3dadd(864.69, 4392.72, 117.55, 1.7)
pt3dadd(865.03, 4393.11, 117.55, 1.7)
pt3dadd(865.37, 4393.49, 117.55, 1.7)
pt3dadd(865.71, 4393.88, 117.55, 1.7)
pt3dadd(865.71, 4394.65, 117.55, 1.7)
pt3dadd(866.05, 4395.04, 117.55, 1.7)
pt3dadd(866.39, 4395.42, 117.55, 1.7)
pt3dadd(866.73, 4395.81, 117.55, 1.7)
pt3dadd(867.07, 4396.58, 117.55, 1.7)
pt3dadd(867.41, 4396.96, 117.55, 1.7)
pt3dadd(867.75, 4397.35, 117.55, 1.7)
pt3dadd(867.75, 4398.12, 117.55, 1.7)
pt3dadd(867.41, 4398.51, 117.55, 2.72)
pt3dadd(867.75, 4398.89, 117.55, 2.72)
pt3dadd(867.75, 4400.05, 117.55, 2.72)
pt3dadd(868.09, 4400.44, 117.55, 2.72)
pt3dadd(868.43, 4400.82, 117.55, 2.72)
pt3dadd(868.43, 4408.92, 117.55, 2.72)
pt3dadd(868.77, 4409.31, 117.55, 2.72)
pt3dadd(869.11, 4410.47, 117.55, 2.72)
pt3dadd(869.45, 4411.24, 117.55, 2.72)
pt3dadd(869.79, 4411.63, 117.55, 2.72)
pt3dadd(869.79, 4412.4, 117.55, 2.72)
pt3dadd(870.13, 4412.78, 117.55, 2.72)
pt3dadd(870.13, 4413.55, 117.55, 2.72)
pt3dadd(870.47, 4413.94, 117.55, 2.72)
pt3dadd(870.81, 4414.33, 117.55, 2.72)
pt3dadd(870.81, 4415.1, 117.55, 2.72)
pt3dadd(871.15, 4415.48, 117.55, 2.72)
pt3dadd(871.49, 4416.25, 117.55, 2.72)
pt3dadd(871.82, 4416.64, 117.55, 2.72)
pt3dadd(872.16, 4417.03, 117.55, 2.72)
pt3dadd(872.5, 4417.41, 117.55, 2.72)
pt3dadd(872.84, 4417.8, 117.55, 2.72)
pt3dadd(873.18, 4418.18, 117.55, 2.72)
pt3dadd(873.52, 4418.57, 117.55, 2.72)
pt3dadd(873.52, 4419.34, 117.55, 2.72)
pt3dadd(873.86, 4419.73, 117.55, 2.72)
pt3dadd(874.2, 4420.11, 117.55, 2.72)
pt3dadd(874.2, 4420.88, 117.55, 2.72)
pt3dadd(874.54, 4421.27, 117.55, 2.72)
pt3dadd(874.88, 4422.04, 117.55, 2.72)
pt3dadd(875.22, 4422.81, 117.55, 2.72)
pt3dadd(875.56, 4423.58, 117.55, 2.72)
pt3dadd(876.24, 4423.58, 117.55, 2.72)
pt3dadd(876.24, 4424.36, 117.55, 2.72)
pt3dadd(876.58, 4425.13, 117.55, 2.72)
pt3dadd(876.92, 4425.51, 117.55, 2.72)
pt3dadd(877.26, 4425.9, 117.55, 2.72)
pt3dadd(877.26, 4426.67, 117.55, 2.72)
pt3dadd(877.6, 4427.44, 117.55, 2.72)
pt3dadd(877.94, 4427.83, 117.55, 2.72)
pt3dadd(877.94, 4428.99, 117.55, 2.72)
pt3dadd(878.28, 4429.37, 117.55, 2.72)
pt3dadd(878.28, 4430.14, 117.55, 2.72)
pt3dadd(876.58, 4424.74, 117.55, 2.04)
pt3dadd(876.92, 4425.13, 117.55, 2.04)
pt3dadd(876.92, 4425.9, 117.55, 2.04)
pt3dadd(877.26, 4426.29, 117.55, 2.04)
pt3dadd(877.6, 4426.67, 117.55, 2.04)
pt3dadd(877.6, 4427.44, 117.55, 2.04)
pt3dadd(877.94, 4427.83, 117.55, 2.04)
pt3dadd(877.94, 4428.99, 117.55, 2.04)
pt3dadd(878.28, 4429.37, 117.55, 2.04)
pt3dadd(878.62, 4429.76, 117.55, 2.04)
pt3dadd(878.62, 4430.92, 117.55, 2.04)
pt3dadd(878.96, 4431.3, 117.55, 2.04)
pt3dadd(879.3, 4432.07, 117.55, 2.04)
pt3dadd(879.3, 4432.84, 117.55, 2.04)
pt3dadd(879.64, 4433.23, 117.55, 2.04)
pt3dadd(879.64, 4435.16, 117.55, 2.04)
pt3dadd(879.98, 4435.54, 117.55, 2.04)
pt3dadd(879.98, 4437.47, 117.55, 2.04)
pt3dadd(880.66, 4437.86, 117.55, 2.04)
pt3dadd(880.66, 4438.63, 117.55, 2.04)
pt3dadd(881.34, 4438.63, 117.55, 2.04)
pt3dadd(881.68, 4439.02, 117.55, 2.04)
pt3dadd(882.02, 4439.4, 117.55, 2.04)
pt3dadd(882.02, 4440.95, 117.55, 2.04)
pt3dadd(882.35, 4441.33, 117.55, 2.04)
pt3dadd(882.35, 4446.35, 117.55, 2.04)
pt3dadd(882.69, 4446.73, 117.55, 2.04)
pt3dadd(883.03, 4447.12, 117.55, 2.04)
pt3dadd(883.37, 4447.5, 117.55, 2.04)
pt3dadd(883.71, 4447.89, 117.55, 2.04)
pt3dadd(884.05, 4448.66, 117.55, 2.04)
pt3dadd(884.39, 4449.05, 117.55, 2.04)
pt3dadd(885.07, 4449.43, 117.55, 2.04)
pt3dadd(884.39, 4448.66, 117.55, 2.72)
pt3dadd(884.73, 4449.05, 117.55, 2.72)
pt3dadd(885.07, 4449.43, 117.55, 2.72)
pt3dadd(885.75, 4449.82, 117.55, 2.72)
pt3dadd(886.09, 4450.21, 117.55, 2.72)
pt3dadd(886.09, 4457.15, 117.55, 2.72)
pt3dadd(886.43, 4457.92, 117.55, 2.72)
pt3dadd(886.43, 4459.08, 117.55, 2.72)
pt3dadd(886.77, 4459.46, 117.55, 2.72)
pt3dadd(886.77, 4461.78, 117.55, 2.72)
pt3dadd(887.11, 4462.17, 117.55, 2.72)
pt3dadd(887.11, 4462.94, 117.55, 2.72)
pt3dadd(887.45, 4463.71, 117.55, 2.72)
pt3dadd(887.79, 4464.09, 117.55, 2.72)
pt3dadd(887.79, 4481.84, 117.55, 2.72)
pt3dadd(887.45, 4482.23, 117.55, 2.72)
pt3dadd(887.45, 4485.7, 117.55, 2.72)
pt3dadd(887.11, 4486.08, 117.55, 2.72)
pt3dadd(886.77, 4486.47, 117.55, 2.72)
pt3dadd(886.77, 4488.4, 117.55, 2.72)
pt3dadd(886.43, 4489.17, 117.55, 2.72)
pt3dadd(886.43, 4490.71, 117.55, 2.72)
pt3dadd(886.09, 4491.1, 117.55, 2.72)
pt3dadd(885.75, 4491.49, 117.55, 2.72)
pt3dadd(885.75, 4499.59, 117.55, 2.72)
pt3dadd(886.09, 4499.97, 117.55, 2.72)
pt3dadd(886.09, 4510.78, 117.55, 2.72)
pt3dadd(886.43, 4511.16, 117.55, 2.72)
pt3dadd(886.43, 4511.93, 117.55, 2.72)
pt3dadd(886.77, 4512.71, 117.55, 2.72)
pt3dadd(886.77, 4513.86, 117.55, 2.72)
pt3dadd(887.11, 4514.25, 117.55, 2.72)
pt3dadd(887.45, 4514.63, 117.55, 2.72)
pt3dadd(887.45, 4516.18, 117.55, 2.72)
pt3dadd(887.79, 4516.56, 117.55, 2.72)
pt3dadd(888.13, 4516.95, 117.55, 2.72)
pt3dadd(888.13, 4517.72, 117.55, 2.72)
pt3dadd(888.47, 4518.11, 117.55, 2.72)
pt3dadd(888.47, 4518.88, 117.55, 2.72)
pt3dadd(888.81, 4519.26, 117.55, 2.72)
pt3dadd(889.15, 4519.65, 117.55, 2.72)
pt3dadd(889.15, 4520.42, 117.55, 2.72)
pt3dadd(889.49, 4520.81, 117.55, 2.72)
pt3dadd(889.83, 4521.58, 117.55, 2.72)
pt3dadd(889.83, 4525.44, 117.55, 2.72)
pt3dadd(890.17, 4525.82, 117.55, 2.72)
pt3dadd(890.17, 4526.98, 117.55, 2.72)
pt3dadd(890.51, 4527.37, 117.55, 2.72)
pt3dadd(890.51, 4540.87, 117.55, 2.72)
pt3dadd(890.85, 4541.25, 117.55, 2.72)
pt3dadd(890.85, 4542.03, 117.55, 2.72)
pt3dadd(891.19, 4542.41, 117.55, 2.72)
pt3dadd(891.53, 4542.8, 117.55, 2.72)
pt3dadd(891.53, 4543.57, 117.55, 2.72)
pt3dadd(891.53, 4570.96, 117.55, 2.72)
pt3dadd(891.19, 4571.35, 117.55, 2.72)
pt3dadd(891.19, 4572.5, 117.55, 2.72)
pt3dadd(890.85, 4572.89, 117.55, 2.72)
pt3dadd(890.51, 4573.28, 117.55, 2.72)
pt3dadd(890.51, 4579.45, 117.55, 2.72)
pt3dadd(890.17, 4579.83, 117.55, 2.72)
pt3dadd(889.83, 4580.61, 117.55, 2.72)
pt3dadd(889.83, 4581.76, 117.55, 2.72)
pt3dadd(889.49, 4582.15, 117.55, 2.72)
pt3dadd(889.49, 4583.31, 117.55, 2.72)
pt3dadd(889.15, 4584.08, 117.55, 2.72)
pt3dadd(889.15, 4587.94, 117.55, 2.72)
pt3dadd(888.81, 4588.32, 117.55, 2.72)
pt3dadd(888.47, 4588.71, 117.55, 2.72)
pt3dadd(888.13, 4589.09, 117.55, 2.72)
pt3dadd(888.13, 4591.79, 117.55, 2.72)
pt3dadd(887.79, 4592.18, 117.55, 2.72)
pt3dadd(887.45, 4592.57, 117.55, 2.72)
pt3dadd(887.45, 4593.34, 117.55, 2.72)
pt3dadd(886.77, 4594.11, 117.55, 2.72)
pt3dadd(886.43, 4594.88, 117.55, 2.72)
pt3dadd(886.09, 4595.27, 117.55, 2.72)
pt3dadd(886.09, 4596.04, 117.55, 2.72)
pt3dadd(885.75, 4596.42, 117.55, 2.72)
pt3dadd(885.41, 4596.81, 117.55, 2.72)
pt3dadd(885.07, 4597.2, 117.55, 2.72)
pt3dadd(884.73, 4597.58, 117.55, 2.72)
pt3dadd(884.39, 4597.97, 117.55, 2.72)
pt3dadd(884.05, 4598.35, 117.55, 2.72)
pt3dadd(884.05, 4599.13, 117.55, 2.72)
pt3dadd(883.71, 4599.51, 117.55, 2.72)
pt3dadd(883.71, 4608, 117.55, 2.72)
pt3dadd(883.37, 4608.77, 117.55, 2.72)
pt3dadd(883.03, 4609.16, 117.55, 2.72)
pt3dadd(882.69, 4609.93, 117.55, 2.72)
pt3dadd(882.35, 4610.31, 117.55, 2.72)
pt3dadd(882.35, 4611.47, 117.55, 2.72)
pt3dadd(882.02, 4611.86, 117.55, 2.72)
pt3dadd(881.68, 4612.24, 117.55, 2.72)
pt3dadd(881.34, 4612.63, 117.55, 2.72)
pt3dadd(881, 4613.01, 117.55, 2.72)
pt3dadd(881, 4614.94, 117.55, 2.72)
pt3dadd(880.66, 4615.33, 117.55, 2.72)
pt3dadd(880.32, 4616.1, 117.55, 2.72)
pt3dadd(879.98, 4616.49, 117.55, 2.72)
pt3dadd(879.64, 4616.87, 117.55, 2.72)
pt3dadd(879.64, 4620.73, 117.55, 2.72)
pt3dadd(879.3, 4621.12, 117.55, 2.72)
pt3dadd(878.96, 4621.5, 117.55, 2.72)
pt3dadd(878.96, 4622.27, 117.55, 2.72)
pt3dadd(878.28, 4622.27, 117.55, 2.72)
pt3dadd(877.94, 4622.66, 117.55, 2.72)
pt3dadd(877.94, 4632.3, 117.55, 2.72)
}
}
proc shape3d_90() {
dend[64] { pt3dadd(878.28, 4632.69, 117.55, 3.06)
pt3dadd(878.62, 4633.46, 117.55, 3.06)
pt3dadd(878.96, 4633.85, 117.55, 3.06)
pt3dadd(879.3, 4634.23, 117.55, 3.06)
pt3dadd(879.64, 4634.62, 117.55, 3.06)
pt3dadd(879.64, 4635.39, 117.55, 3.06)
pt3dadd(879.98, 4636.16, 117.55, 3.06)
pt3dadd(880.32, 4636.55, 117.55, 3.06)
pt3dadd(880.66, 4636.93, 117.55, 3.06)
pt3dadd(881, 4637.32, 117.55, 3.06)
pt3dadd(881.34, 4637.71, 117.55, 3.06)
pt3dadd(881.68, 4638.09, 117.55, 3.06)
pt3dadd(881.68, 4638.86, 117.55, 3.06)
pt3dadd(882.02, 4639.25, 117.55, 3.06)
pt3dadd(882.35, 4639.63, 117.55, 3.06)
pt3dadd(882.69, 4640.02, 117.55, 3.06)
pt3dadd(883.03, 4640.41, 117.55, 3.06)
pt3dadd(883.03, 4641.18, 117.55, 3.06)
pt3dadd(883.37, 4641.56, 117.55, 3.06)
pt3dadd(883.71, 4641.95, 117.55, 3.06)
pt3dadd(884.05, 4642.33, 117.55, 3.06)
pt3dadd(884.73, 4642.72, 117.55, 3.06)
pt3dadd(885.41, 4643.88, 117.55, 2.04)
pt3dadd(885.41, 4647.35, 117.55, 2.04)
pt3dadd(885.75, 4648.12, 117.55, 2.04)
pt3dadd(885.75, 4650.05, 117.55, 2.04)
pt3dadd(886.09, 4650.44, 117.55, 2.04)
pt3dadd(886.09, 4651.98, 117.55, 2.04)
pt3dadd(886.43, 4652.37, 117.55, 2.04)
pt3dadd(886.43, 4653.91, 117.55, 2.04)
pt3dadd(886.77, 4654.29, 117.55, 2.04)
pt3dadd(886.77, 4662.01, 117.55, 2.04)
pt3dadd(887.11, 4662.4, 117.55, 2.04)
pt3dadd(887.11, 4668.96, 117.55, 2.04)
pt3dadd(887.45, 4669.34, 117.55, 2.04)
pt3dadd(887.45, 4670.11, 117.55, 2.04)
pt3dadd(887.79, 4670.5, 117.55, 2.04)
pt3dadd(887.79, 4672.04, 117.55, 2.04)
pt3dadd(888.13, 4672.43, 117.55, 2.04)
pt3dadd(888.13, 4676.29, 117.55, 2.04)
pt3dadd(888.47, 4676.67, 117.55, 2.04)
pt3dadd(888.47, 4677.83, 117.55, 2.04)
pt3dadd(888.81, 4678.21, 117.55, 2.04)
pt3dadd(888.81, 4680.92, 117.55, 2.04)
pt3dadd(889.15, 4681.3, 117.55, 2.04)
pt3dadd(889.15, 4685.16, 117.55, 2.04)
pt3dadd(889.49, 4685.54, 117.55, 2.04)
pt3dadd(889.83, 4686.32, 117.55, 2.04)
pt3dadd(890.17, 4687.09, 117.55, 2.04)
pt3dadd(890.51, 4687.47, 117.55, 2.04)
pt3dadd(890.51, 4688.25, 117.55, 2.04)
pt3dadd(890.85, 4688.63, 117.55, 2.04)
pt3dadd(891.19, 4689.02, 117.55, 2.04)
pt3dadd(891.19, 4689.79, 117.55, 2.04)
pt3dadd(891.53, 4690.17, 117.55, 2.04)
pt3dadd(891.87, 4690.95, 117.55, 2.04)
pt3dadd(892.21, 4691.33, 117.55, 2.04)
pt3dadd(892.21, 4692.1, 117.55, 2.04)
pt3dadd(892.55, 4692.49, 117.55, 2.04)
pt3dadd(893.22, 4692.88, 117.55, 2.04)
pt3dadd(893.22, 4695.19, 117.55, 2.04)
pt3dadd(892.88, 4695.96, 117.55, 2.04)
pt3dadd(892.88, 4698.66, 117.55, 2.04)
pt3dadd(892.55, 4699.05, 117.55, 2.04)
pt3dadd(892.21, 4699.43, 117.55, 2.04)
pt3dadd(892.21, 4700.59, 117.55, 2.04)
pt3dadd(891.87, 4700.98, 117.55, 2.04)
pt3dadd(891.87, 4708.31, 117.55, 2.04)
pt3dadd(892.55, 4708.31, 117.55, 2.04)
pt3dadd(892.55, 4710.62, 117.55, 2.04)
pt3dadd(892.21, 4711.01, 117.55, 2.04)
pt3dadd(891.19, 4711.01, 117.55, 2.04)
pt3dadd(891.19, 4709.08, 117.55, 2.04)
pt3dadd(891.53, 4709.08, 117.55, 2.04)
pt3dadd(891.87, 4709.46, 117.55, 2.04)
pt3dadd(891.87, 4712.17, 117.55, 2.04)
pt3dadd(890.85, 4712.17, 117.55, 2.04)
pt3dadd(890.85, 4709.08, 117.55, 2.04)
pt3dadd(890.85, 4710.62, 117.55, 2.04)
pt3dadd(891.19, 4711.01, 117.55, 2.04)
pt3dadd(891.19, 4711.78, 117.55, 2.04)
pt3dadd(890.85, 4712.55, 117.55, 2.04)
pt3dadd(890.85, 4714.48, 117.55, 2.04)
pt3dadd(890.17, 4714.87, 117.55, 2.04)
pt3dadd(890.17, 4730.68, 117.55, 2.04)
pt3dadd(889.83, 4731.07, 117.55, 2.04)
pt3dadd(889.83, 4745.34, 117.55, 2.04)
pt3dadd(889.49, 4745.73, 117.55, 2.04)
pt3dadd(888.47, 4745.73, 117.55, 2.04)
pt3dadd(888.13, 4746.12, 117.55, 2.04)
pt3dadd(888.13, 4751.9, 117.55, 2.04)
pt3dadd(887.79, 4752.29, 117.55, 3.74)
pt3dadd(887.79, 4755.76, 117.55, 3.74)
pt3dadd(887.45, 4756.15, 117.55, 3.74)
pt3dadd(887.11, 4756.53, 117.55, 3.74)
pt3dadd(886.77, 4756.92, 117.55, 3.74)
pt3dadd(886.43, 4757.3, 117.55, 3.74)
pt3dadd(886.09, 4757.69, 117.55, 3.74)
pt3dadd(885.75, 4758.08, 117.55, 3.74)
pt3dadd(885.07, 4758.08, 117.55, 3.74)
pt3dadd(885.07, 4758.85, 117.55, 3.74)
pt3dadd(885.41, 4759.23, 117.55, 2.04)
pt3dadd(885.41, 4769.65, 117.55, 2.04)
pt3dadd(885.75, 4770.04, 117.55, 2.04)
pt3dadd(885.75, 4773.51, 117.55, 2.04)
pt3dadd(886.09, 4773.89, 117.55, 2.04)
pt3dadd(886.09, 4774.67, 117.55, 2.04)
pt3dadd(886.43, 4775.05, 117.55, 2.04)
pt3dadd(886.77, 4775.82, 117.55, 2.04)
pt3dadd(887.11, 4776.21, 117.55, 2.04)
pt3dadd(887.79, 4776.59, 117.55, 2.04)
pt3dadd(887.79, 4777.37, 117.55, 2.04)
pt3dadd(888.13, 4777.75, 117.55, 2.04)
pt3dadd(888.47, 4778.14, 117.55, 2.04)
pt3dadd(888.47, 4782.38, 117.55, 2.04)
pt3dadd(888.13, 4782.77, 117.55, 2.04)
pt3dadd(888.13, 4793.96, 117.55, 2.04)
pt3dadd(888.47, 4794.34, 117.55, 2.04)
pt3dadd(888.47, 4795.88, 117.55, 2.04)
pt3dadd(888.81, 4796.66, 117.55, 2.04)
pt3dadd(889.15, 4797.43, 117.55, 2.04)
pt3dadd(889.49, 4797.81, 117.55, 2.04)
pt3dadd(889.83, 4798.2, 117.55, 2.04)
pt3dadd(890.17, 4798.58, 117.55, 2.04)
pt3dadd(890.51, 4798.97, 117.55, 2.04)
pt3dadd(890.85, 4799.36, 117.55, 2.04)
pt3dadd(890.85, 4801.67, 117.55, 2.04)
pt3dadd(891.19, 4802.44, 117.55, 2.04)
pt3dadd(891.19, 4803.6, 117.55, 2.04)
pt3dadd(891.53, 4804.37, 117.55, 2.04)
pt3dadd(891.87, 4804.76, 117.55, 2.04)
pt3dadd(892.21, 4805.53, 117.55, 2.04)
pt3dadd(892.55, 4805.92, 117.55, 2.04)
pt3dadd(892.55, 4806.69, 117.55, 2.04)
pt3dadd(892.88, 4807.07, 117.55, 2.04)
pt3dadd(893.22, 4807.46, 117.55, 2.04)
pt3dadd(893.22, 4809.39, 117.55, 2.04)
pt3dadd(893.56, 4809.77, 117.55, 2.04)
pt3dadd(893.9, 4810.54, 117.55, 2.04)
pt3dadd(893.9, 4813.63, 117.55, 2.04)
pt3dadd(894.24, 4814.02, 117.55, 2.04)
pt3dadd(894.58, 4814.4, 117.55, 2.04)
pt3dadd(894.58, 4815.17, 117.55, 2.04)
pt3dadd(894.92, 4815.56, 117.55, 2.04)
pt3dadd(894.92, 4816.72, 117.55, 2.04)
pt3dadd(895.26, 4817.1, 117.55, 2.04)
pt3dadd(895.6, 4817.88, 117.55, 2.04)
pt3dadd(895.6, 4836.39, 117.55, 2.04)
pt3dadd(895.94, 4838.32, 117.55, 3.4)
pt3dadd(895.94, 4851.44, 117.55, 3.4)
pt3dadd(895.6, 4851.83, 117.55, 3.4)
pt3dadd(895.26, 4852.21, 117.55, 3.4)
pt3dadd(894.92, 4852.6, 117.55, 3.4)
pt3dadd(894.58, 4852.98, 117.55, 3.4)
pt3dadd(894.58, 4855.68, 117.55, 3.4)
pt3dadd(894.58, 4857.23, 117.55, 1.36)
pt3dadd(894.92, 4857.61, 117.55, 1.36)
pt3dadd(895.26, 4858, 117.55, 1.36)
pt3dadd(895.26, 4858.77, 117.55, 1.36)
pt3dadd(895.6, 4859.54, 117.55, 1.36)
pt3dadd(895.94, 4859.93, 117.55, 1.36)
pt3dadd(895.94, 4861.08, 117.55, 1.36)
pt3dadd(896.28, 4861.47, 117.55, 1.36)
pt3dadd(896.28, 4863.01, 117.55, 1.36)
pt3dadd(896.62, 4863.4, 117.55, 1.36)
pt3dadd(896.62, 4866.87, 117.55, 1.36)
pt3dadd(896.96, 4867.26, 117.55, 1.36)
pt3dadd(897.3, 4867.64, 117.55, 1.36)
pt3dadd(897.3, 4868.8, 117.55, 1.36)
pt3dadd(897.64, 4869.19, 117.55, 1.36)
pt3dadd(897.64, 4871.12, 117.55, 1.36)
pt3dadd(897.98, 4871.89, 117.55, 1.36)
pt3dadd(897.98, 4873.82, 117.55, 1.36)
pt3dadd(897.64, 4874.2, 117.55, 1.36)
pt3dadd(897.3, 4874.59, 117.55, 1.36)
pt3dadd(897.3, 4875.36, 117.55, 1.36)
pt3dadd(896.96, 4875.75, 117.55, 1.36)
pt3dadd(896.62, 4876.13, 117.55, 1.36)
pt3dadd(896.62, 4883.85, 117.55, 1.36)
pt3dadd(897.3, 4885.78, 117.55, 2.38)
pt3dadd(897.3, 4886.16, 117.55, 2.38)
pt3dadd(897.64, 4886.55, 117.55, 2.38)
pt3dadd(897.98, 4886.93, 117.55, 2.38)
pt3dadd(898.32, 4887.32, 117.55, 2.38)
pt3dadd(898.66, 4887.71, 117.55, 2.38)
pt3dadd(899.34, 4888.09, 117.55, 2.38)
pt3dadd(899.68, 4888.48, 117.55, 2.38)
pt3dadd(899.68, 4889.25, 117.55, 2.38)
pt3dadd(900.02, 4889.63, 117.55, 2.38)
pt3dadd(900.36, 4890.02, 117.55, 2.38)
pt3dadd(900.36, 4890.79, 117.55, 2.38)
pt3dadd(900.7, 4891.56, 117.55, 2.38)
pt3dadd(901.04, 4891.95, 117.55, 2.38)
pt3dadd(901.04, 4892.72, 117.55, 2.38)
pt3dadd(901.38, 4893.11, 117.55, 2.38)
pt3dadd(901.38, 4893.88, 117.55, 2.38)
pt3dadd(901.72, 4894.26, 117.55, 2.38)
pt3dadd(901.72, 4895.42, 117.55, 2.38)
pt3dadd(902.06, 4895.81, 117.55, 2.38)
pt3dadd(902.06, 4896.96, 117.55, 2.38)
}
}
proc shape3d_91() {
dend[64] { pt3dadd(902.4, 4897.35, 117.55, 2.38)
pt3dadd(902.4, 4898.12, 117.55, 2.38)
pt3dadd(902.74, 4898.51, 117.55, 2.38)
pt3dadd(902.74, 4901.98, 117.55, 2.38)
pt3dadd(903.07, 4902.75, 117.55, 2.38)
pt3dadd(903.07, 4904.29, 117.55, 2.38)
pt3dadd(903.41, 4904.68, 117.55, 2.38)
pt3dadd(903.75, 4905.07, 117.55, 2.38)
pt3dadd(903.75, 4905.84, 117.55, 2.38)
pt3dadd(904.09, 4906.61, 117.55, 2.38)
pt3dadd(904.09, 4908.92, 117.55, 2.38)
pt3dadd(904.43, 4909.7, 117.55, 2.38)
pt3dadd(904.43, 4911.24, 117.55, 2.38)
pt3dadd(904.77, 4911.63, 117.55, 2.38)
pt3dadd(904.77, 4912.78, 117.55, 2.38)
pt3dadd(905.11, 4913.55, 117.55, 2.38)
pt3dadd(905.45, 4913.94, 117.55, 2.38)
pt3dadd(905.45, 4914.71, 117.55, 2.38)
pt3dadd(905.79, 4915.1, 117.55, 2.38)
pt3dadd(906.13, 4915.48, 117.55, 2.38)
pt3dadd(906.13, 4916.25, 117.55, 2.38)
pt3dadd(906.47, 4917.03, 117.55, 2.38)
pt3dadd(906.81, 4917.8, 117.55, 2.38)
pt3dadd(906.81, 4918.57, 117.55, 2.38)
pt3dadd(907.15, 4918.96, 117.55, 2.38)
pt3dadd(907.49, 4919.34, 117.55, 2.38)
pt3dadd(907.83, 4919.73, 117.55, 2.38)
pt3dadd(907.83, 4920.5, 117.55, 2.38)
pt3dadd(908.17, 4920.88, 117.55, 2.38)
pt3dadd(908.51, 4921.27, 117.55, 2.38)
pt3dadd(908.51, 4922.43, 117.55, 2.38)
pt3dadd(908.85, 4923.2, 117.55, 2.38)
pt3dadd(909.19, 4923.58, 117.55, 2.38)
pt3dadd(909.53, 4923.97, 117.55, 2.38)
pt3dadd(909.87, 4924.36, 117.55, 2.38)
pt3dadd(910.21, 4924.74, 117.55, 2.38)
pt3dadd(910.55, 4925.51, 117.55, 2.38)
pt3dadd(910.55, 4926.29, 117.55, 2.38)
pt3dadd(910.89, 4926.67, 117.55, 2.38)
pt3dadd(911.23, 4927.06, 117.55, 2.38)
pt3dadd(911.57, 4927.44, 117.55, 2.38)
pt3dadd(911.57, 4928.21, 117.55, 2.38)
pt3dadd(911.91, 4928.6, 117.55, 2.38)
pt3dadd(911.91, 4929.37, 117.55, 2.38)
pt3dadd(912.25, 4929.76, 117.55, 2.38)
pt3dadd(912.25, 4930.53, 117.55, 2.38)
pt3dadd(912.59, 4930.92, 117.55, 2.38)
pt3dadd(912.59, 4931.69, 117.55, 2.38)
pt3dadd(912.93, 4932.07, 117.55, 2.38)
pt3dadd(913.27, 4932.46, 117.55, 2.38)
pt3dadd(913.27, 4933.23, 117.55, 2.38)
pt3dadd(913.6, 4933.62, 117.55, 2.38)
pt3dadd(913.94, 4934, 117.55, 2.38)
pt3dadd(913.94, 4934.77, 117.55, 2.38)
pt3dadd(914.28, 4935.16, 117.55, 2.38)
pt3dadd(914.28, 4935.93, 117.55, 2.38)
pt3dadd(914.62, 4936.32, 117.55, 2.38)
pt3dadd(914.96, 4937.09, 117.55, 2.38)
pt3dadd(914.96, 4948.66, 117.55, 2.38)
pt3dadd(915.3, 4949.05, 117.55, 2.38)
pt3dadd(915.64, 4949.43, 117.55, 2.38)
pt3dadd(915.64, 4950.21, 117.55, 2.38)
pt3dadd(915.98, 4950.59, 117.55, 2.38)
pt3dadd(915.98, 4952.13, 117.55, 2.38)
pt3dadd(916.32, 4952.52, 117.55, 2.38)
pt3dadd(916.66, 4952.91, 117.55, 2.38)
pt3dadd(916.66, 4953.68, 117.55, 2.38)
pt3dadd(917, 4954.06, 117.55, 2.38)
pt3dadd(917.34, 4954.45, 117.55, 2.38)
pt3dadd(917.68, 4954.83, 117.55, 2.38)
pt3dadd(918.02, 4955.22, 117.55, 2.38)
pt3dadd(918.36, 4955.61, 117.55, 2.38)
pt3dadd(918.7, 4955.99, 117.55, 2.38)
pt3dadd(918.7, 4956.76, 117.55, 2.38)
pt3dadd(919.04, 4957.15, 117.55, 2.38)
pt3dadd(919.38, 4957.54, 117.55, 2.38)
pt3dadd(919.72, 4957.92, 117.55, 2.38)
pt3dadd(920.06, 4958.31, 117.55, 2.38)
pt3dadd(920.06, 4959.08, 117.55, 2.38)
pt3dadd(920.4, 4959.46, 117.55, 2.38)
pt3dadd(920.74, 4959.85, 117.55, 2.38)
pt3dadd(921.08, 4960.24, 117.55, 2.38)
pt3dadd(921.08, 4963.71, 117.55, 2.38)
pt3dadd(921.42, 4964.09, 117.55, 2.38)
pt3dadd(921.42, 4965.64, 117.55, 2.38)
pt3dadd(921.76, 4966.41, 117.55, 2.38)
pt3dadd(922.1, 4966.79, 117.55, 2.38)
pt3dadd(922.44, 4967.18, 117.55, 2.38)
pt3dadd(922.78, 4967.57, 117.55, 2.38)
pt3dadd(922.78, 4968.72, 117.55, 2.38)
pt3dadd(923.12, 4969.11, 117.55, 2.38)
pt3dadd(923.12, 4976.44, 117.55, 2.38)
pt3dadd(923.46, 4977.21, 117.55, 2.38)
pt3dadd(923.46, 4978.37, 117.55, 2.38)
pt3dadd(923.8, 4979.14, 117.55, 2.38)
pt3dadd(924.13, 4979.91, 117.55, 2.38)
pt3dadd(924.47, 4980.68, 117.55, 2.38)
pt3dadd(924.47, 4975.67, 117.55, 2.38)
pt3dadd(924.47, 4981.84, 117.55, 2.38)
pt3dadd(923.79, 4979.53, 117.55, 1.36)
pt3dadd(923.79, 4988.01, 117.55, 1.36)
pt3dadd(924.13, 4988.4, 117.55, 1.36)
pt3dadd(924.47, 4989.17, 117.55, 1.36)
pt3dadd(924.81, 4989.56, 117.55, 1.36)
pt3dadd(925.15, 4989.94, 117.55, 1.36)
pt3dadd(925.49, 4990.33, 117.55, 1.36)
pt3dadd(925.49, 4991.1, 117.55, 1.36)
pt3dadd(925.83, 4991.49, 117.55, 1.36)
pt3dadd(925.83, 4992.64, 117.55, 1.36)
pt3dadd(926.17, 4993.03, 117.55, 1.36)
pt3dadd(926.51, 4993.8, 117.55, 1.36)
pt3dadd(926.51, 4994.57, 117.55, 1.36)
pt3dadd(926.85, 4994.96, 117.55, 1.36)
pt3dadd(927.19, 4995.73, 117.55, 1.36)
pt3dadd(927.53, 4996.5, 117.55, 1.36)
pt3dadd(927.87, 4996.89, 117.55, 1.36)
pt3dadd(928.21, 4997.27, 117.55, 1.36)
pt3dadd(928.55, 4997.66, 117.55, 1.36)
pt3dadd(928.89, 4998.04, 117.55, 1.36)
pt3dadd(929.23, 4998.43, 117.55, 1.36)
pt3dadd(929.57, 4998.82, 117.55, 1.36)
pt3dadd(929.91, 4999.2, 117.55, 1.36)
pt3dadd(930.59, 4999.59, 117.55, 1.36)
pt3dadd(931.27, 4999.59, 117.55, 1.36)
pt3dadd(931.61, 4999.97, 117.55, 1.36)
pt3dadd(932.29, 5000.75, 117.55, 1.36)
pt3dadd(932.63, 5001.13, 117.55, 1.36)
pt3dadd(932.97, 5001.52, 117.55, 1.36)
pt3dadd(933.99, 5002.67, 117.55, 1.36)
pt3dadd(934.32, 5003.06, 117.55, 1.36)
pt3dadd(934.66, 5003.45, 117.55, 1.36)
pt3dadd(935, 5003.83, 117.55, 1.36)
pt3dadd(935.34, 5004.22, 117.55, 1.36)
pt3dadd(935.68, 5004.6, 117.55, 1.36)
pt3dadd(936.02, 5005.38, 117.55, 1.36)
pt3dadd(936.36, 5005.76, 117.55, 1.36)
pt3dadd(936.7, 5006.15, 117.55, 1.36)
pt3dadd(937.04, 5006.53, 117.55, 1.36)
pt3dadd(937.38, 5006.53, 117.55, 1.36)
pt3dadd(937.72, 5006.92, 117.55, 1.36)
pt3dadd(938.06, 5007.3, 117.55, 1.36)
pt3dadd(938.4, 5007.69, 117.55, 1.36)
pt3dadd(939.08, 5007.69, 117.55, 1.36)
pt3dadd(939.08, 5008.46, 117.55, 1.36)
pt3dadd(939.76, 5008.46, 117.55, 1.36)
pt3dadd(940.1, 5009.23, 117.55, 1.36)
pt3dadd(940.44, 5010, 117.55, 1.36)
pt3dadd(940.78, 5010.39, 117.55, 1.36)
pt3dadd(941.12, 5010.78, 117.55, 1.36)
pt3dadd(941.12, 5011.55, 117.55, 1.36)
pt3dadd(941.46, 5011.93, 117.55, 1.36)
pt3dadd(941.8, 5012.32, 117.55, 1.36)
pt3dadd(942.14, 5012.71, 117.55, 1.36)
pt3dadd(942.48, 5013.48, 117.55, 1.36)
pt3dadd(942.82, 5014.25, 117.55, 1.36)
pt3dadd(943.16, 5014.63, 117.55, 1.36)
pt3dadd(943.5, 5015.02, 117.55, 1.36)
pt3dadd(943.84, 5015.41, 117.55, 1.36)
pt3dadd(944.18, 5015.79, 117.55, 1.36)
pt3dadd(944.52, 5016.18, 117.55, 1.36)
pt3dadd(944.85, 5016.95, 117.55, 1.36)
pt3dadd(945.19, 5017.33, 117.55, 1.36)
pt3dadd(945.53, 5017.72, 117.55, 1.36)
pt3dadd(945.87, 5018.11, 117.55, 1.36)
pt3dadd(946.21, 5018.49, 117.55, 1.36)
pt3dadd(946.55, 5018.88, 117.55, 1.36)
pt3dadd(946.89, 5019.26, 117.55, 1.36)
pt3dadd(947.23, 5019.65, 117.55, 1.36)
pt3dadd(947.57, 5020.04, 117.55, 1.36)
pt3dadd(947.91, 5020.81, 117.55, 1.36)
pt3dadd(948.25, 5021.19, 117.55, 1.36)
pt3dadd(948.59, 5021.58, 117.55, 1.36)
pt3dadd(949.27, 5021.96, 117.55, 1.36)
pt3dadd(949.27, 5022.74, 117.55, 1.36)
pt3dadd(949.61, 5023.12, 117.55, 1.36)
pt3dadd(949.95, 5023.51, 117.55, 1.36)
pt3dadd(950.29, 5023.89, 117.55, 1.36)
pt3dadd(950.63, 5024.28, 117.55, 1.36)
pt3dadd(950.97, 5024.67, 117.55, 1.36)
pt3dadd(951.31, 5025.05, 117.55, 1.36)
pt3dadd(951.65, 5025.44, 117.55, 1.36)
pt3dadd(951.99, 5025.82, 117.55, 1.36)
pt3dadd(952.33, 5026.21, 117.55, 1.36)
pt3dadd(952.67, 5026.59, 117.55, 1.36)
pt3dadd(953.01, 5026.98, 117.55, 1.36)
pt3dadd(953.35, 5027.37, 117.55, 1.36)
pt3dadd(953.69, 5028.14, 117.55, 1.36)
pt3dadd(954.03, 5028.52, 117.55, 1.36)
pt3dadd(954.71, 5028.91, 117.55, 1.36)
pt3dadd(955.05, 5029.68, 117.55, 1.36)
pt3dadd(955.38, 5030.07, 117.55, 1.36)
pt3dadd(955.72, 5030.45, 117.55, 1.36)
pt3dadd(956.06, 5030.84, 117.55, 1.36)
pt3dadd(956.4, 5031.22, 117.55, 1.36)
pt3dadd(956.74, 5031.61, 117.55, 1.36)
pt3dadd(957.08, 5032, 117.55, 1.36)
pt3dadd(957.42, 5032.38, 117.55, 1.36)
pt3dadd(958.1, 5032.77, 117.55, 1.36)
pt3dadd(958.44, 5033.15, 117.55, 1.36)
pt3dadd(958.78, 5033.54, 117.55, 1.36)
}
}
proc shape3d_92() {
dend[64] { pt3dadd(959.12, 5033.92, 117.55, 1.36)
pt3dadd(959.46, 5034.31, 117.55, 1.36)
pt3dadd(959.8, 5034.7, 117.55, 1.36)
pt3dadd(960.14, 5035.47, 117.55, 1.36)
pt3dadd(960.82, 5035.85, 117.55, 1.36)
pt3dadd(961.16, 5036.24, 117.55, 1.36)
pt3dadd(961.5, 5036.63, 117.55, 1.36)
pt3dadd(961.84, 5037.01, 117.55, 1.36)
pt3dadd(962.18, 5037.4, 117.55, 1.36)
pt3dadd(962.52, 5037.78, 117.55, 1.36)
pt3dadd(962.86, 5038.17, 117.55, 1.36)
pt3dadd(963.2, 5038.55, 117.55, 1.36)
pt3dadd(963.54, 5038.94, 117.55, 1.36)
pt3dadd(963.88, 5039.33, 117.55, 1.36)
pt3dadd(964.56, 5039.71, 117.55, 1.36)
pt3dadd(964.9, 5040.48, 117.55, 1.36)
pt3dadd(965.24, 5040.87, 117.55, 1.36)
pt3dadd(965.57, 5041.25, 117.55, 1.36)
pt3dadd(965.91, 5041.64, 117.55, 1.36)
pt3dadd(966.25, 5042.03, 117.55, 1.36)
pt3dadd(966.59, 5042.41, 117.55, 1.36)
pt3dadd(966.93, 5042.8, 117.55, 1.36)
pt3dadd(967.27, 5043.18, 117.55, 1.36)
pt3dadd(967.61, 5043.57, 117.55, 1.36)
pt3dadd(967.95, 5043.96, 117.55, 1.36)
pt3dadd(968.29, 5044.34, 117.55, 1.36)
pt3dadd(968.63, 5044.73, 117.55, 1.36)
pt3dadd(968.97, 5045.11, 117.55, 1.36)
pt3dadd(969.31, 5045.5, 117.55, 1.36)
pt3dadd(969.65, 5045.88, 117.55, 1.36)
pt3dadd(969.99, 5046.27, 117.55, 1.36)
pt3dadd(970.33, 5046.66, 117.55, 1.36)
pt3dadd(970.67, 5047.04, 117.55, 1.36)
pt3dadd(971.01, 5047.43, 117.55, 1.36)
pt3dadd(971.35, 5047.81, 117.55, 1.36)
pt3dadd(971.69, 5048.2, 117.55, 1.36)
pt3dadd(972.03, 5048.58, 117.55, 1.36)
pt3dadd(972.37, 5048.97, 117.55, 1.36)
pt3dadd(972.71, 5049.36, 117.55, 1.36)
pt3dadd(973.05, 5049.74, 117.55, 1.36)
pt3dadd(973.39, 5050.13, 117.55, 1.36)
pt3dadd(973.73, 5050.51, 117.55, 1.36)
pt3dadd(974.07, 5050.9, 117.55, 1.36)
pt3dadd(974.75, 5051.67, 117.55, 1.36)
pt3dadd(975.09, 5052.06, 117.55, 1.36)
pt3dadd(975.77, 5052.44, 117.55, 1.36)
pt3dadd(976.1, 5052.83, 117.55, 1.36)
pt3dadd(976.78, 5053.21, 117.55, 1.36)
pt3dadd(977.46, 5053.99, 117.55, 1.36)
pt3dadd(977.8, 5054.37, 117.55, 1.36)
pt3dadd(978.14, 5054.76, 117.55, 1.36)
pt3dadd(978.82, 5054.76, 117.55, 1.36)
pt3dadd(979.16, 5055.14, 117.55, 1.36)
pt3dadd(979.5, 5055.53, 117.55, 1.36)
pt3dadd(979.84, 5055.92, 117.55, 1.36)
pt3dadd(980.18, 5056.3, 117.55, 1.36)
pt3dadd(980.86, 5056.3, 117.55, 1.36)
pt3dadd(981.2, 5056.69, 117.55, 1.36)
pt3dadd(981.54, 5057.46, 117.55, 1.36)
pt3dadd(981.88, 5057.84, 117.55, 1.36)
pt3dadd(982.22, 5058.23, 117.55, 1.36)
pt3dadd(982.56, 5058.62, 117.55, 1.36)
pt3dadd(983.24, 5059, 117.55, 1.36)
pt3dadd(983.58, 5059.39, 117.55, 1.36)
pt3dadd(983.92, 5059.77, 117.55, 1.36)
pt3dadd(984.26, 5060.16, 117.55, 1.36)
pt3dadd(984.6, 5060.54, 117.55, 1.36)
pt3dadd(984.94, 5060.93, 117.55, 1.36)
pt3dadd(985.28, 5061.32, 117.55, 1.36)
pt3dadd(985.62, 5062.09, 117.55, 1.36)
pt3dadd(985.96, 5062.86, 117.55, 1.36)
pt3dadd(986.29, 5063.25, 117.55, 1.36)
pt3dadd(986.63, 5064.02, 117.55, 1.36)
pt3dadd(986.97, 5064.4, 117.55, 1.36)
pt3dadd(987.31, 5064.79, 117.55, 1.36)
pt3dadd(987.65, 5065.17, 117.55, 1.36)
pt3dadd(988.33, 5065.95, 117.55, 1.36)
pt3dadd(989.01, 5066.33, 117.55, 1.36)
pt3dadd(989.35, 5066.72, 117.55, 1.36)
pt3dadd(989.69, 5067.1, 117.55, 1.36)
pt3dadd(990.03, 5067.49, 117.55, 1.36)
pt3dadd(990.37, 5067.88, 117.55, 1.36)
pt3dadd(991.05, 5068.26, 117.55, 1.36)
pt3dadd(991.73, 5068.65, 117.55, 1.36)
pt3dadd(992.07, 5069.03, 117.55, 1.36)
pt3dadd(992.41, 5069.42, 117.55, 1.36)
pt3dadd(992.75, 5069.8, 117.55, 1.36)
pt3dadd(993.09, 5070.19, 117.55, 1.36)
pt3dadd(993.43, 5070.58, 117.55, 1.36)
pt3dadd(993.77, 5070.96, 117.55, 1.36)
pt3dadd(994.11, 5071.35, 117.55, 1.36)
pt3dadd(994.45, 5071.73, 117.55, 1.36)
pt3dadd(994.79, 5072.12, 117.55, 1.36)
pt3dadd(995.13, 5072.5, 117.55, 1.36)
pt3dadd(995.47, 5072.89, 117.55, 1.36)
pt3dadd(996.15, 5072.89, 117.55, 1.36)
pt3dadd(996.49, 5073.66, 117.55, 1.36)
pt3dadd(996.82, 5074.05, 117.55, 1.36)
pt3dadd(997.16, 5074.43, 117.55, 1.36)
pt3dadd(997.5, 5075.21, 117.55, 1.36)
pt3dadd(998.52, 5076.36, 117.55, 1.36)
pt3dadd(998.86, 5076.75, 117.55, 1.36)
pt3dadd(999.2, 5077.13, 117.55, 1.36)
pt3dadd(999.54, 5077.52, 117.55, 1.36)
pt3dadd(1000.22, 5077.52, 117.55, 1.36)
pt3dadd(1000.56, 5078.29, 117.55, 1.36)
pt3dadd(1000.9, 5078.68, 117.55, 1.36)
pt3dadd(1001.24, 5079.06, 117.55, 1.36)
pt3dadd(1001.58, 5079.45, 117.55, 1.36)
pt3dadd(1001.92, 5079.83, 117.55, 1.36)
pt3dadd(1002.26, 5080.22, 117.55, 1.36)
pt3dadd(1002.6, 5080.61, 117.55, 1.36)
pt3dadd(1003.28, 5080.99, 117.55, 1.36)
pt3dadd(1003.62, 5081.38, 117.55, 1.36)
pt3dadd(1003.96, 5081.76, 117.55, 1.36)
pt3dadd(1004.3, 5082.15, 117.55, 1.36)
pt3dadd(1004.64, 5082.54, 117.55, 1.36)
pt3dadd(1006, 5082.54, 117.55, 1.36)
pt3dadd(1006.34, 5082.92, 117.55, 1.36)
pt3dadd(1007.02, 5083.31, 117.55, 1.36)
pt3dadd(1008.03, 5083.31, 117.55, 1.36)
pt3dadd(1008.37, 5083.69, 117.55, 1.36)
pt3dadd(1009.05, 5083.69, 117.55, 1.36)
pt3dadd(1009.39, 5084.08, 117.55, 1.36)
pt3dadd(1010.41, 5084.08, 117.55, 1.36)
pt3dadd(1010.75, 5084.46, 117.55, 1.36)
pt3dadd(1011.09, 5084.85, 117.55, 1.36)
pt3dadd(1011.43, 5085.24, 117.55, 1.36)
pt3dadd(1012.11, 5085.62, 117.55, 1.36)
pt3dadd(1012.45, 5086.01, 117.55, 1.36)
pt3dadd(1013.13, 5086.39, 117.55, 1.36)
pt3dadd(1013.47, 5086.78, 117.55, 1.36)
pt3dadd(1014.15, 5087.17, 117.55, 1.36)
pt3dadd(1014.49, 5087.55, 117.55, 1.36)
pt3dadd(1015.51, 5087.55, 117.55, 1.36)
pt3dadd(1015.85, 5087.94, 117.55, 1.36)
pt3dadd(1016.53, 5088.32, 117.55, 1.36)
pt3dadd(1017.88, 5088.32, 117.55, 1.36)
pt3dadd(1018.22, 5088.71, 117.55, 1.36)
pt3dadd(1018.9, 5088.71, 117.55, 1.36)
pt3dadd(1019.24, 5089.09, 117.55, 1.36)
pt3dadd(1019.92, 5089.09, 117.55, 1.36)
pt3dadd(1020.26, 5089.48, 117.55, 1.36)
pt3dadd(1020.94, 5089.48, 117.55, 1.36)
pt3dadd(1021.28, 5089.87, 117.55, 1.36)
pt3dadd(1022.64, 5089.87, 117.55, 1.36)
pt3dadd(1022.98, 5090.25, 117.55, 1.36)
pt3dadd(1023.32, 5090.64, 117.55, 1.36)
pt3dadd(1024.34, 5090.64, 117.55, 1.36)
pt3dadd(1025.02, 5091.02, 117.55, 1.36)
pt3dadd(1025.36, 5091.41, 117.55, 1.36)
pt3dadd(1025.7, 5091.79, 117.55, 1.36)
pt3dadd(1026.04, 5092.18, 117.55, 1.36)
pt3dadd(1026.38, 5092.57, 117.55, 1.36)
pt3dadd(1026.72, 5092.95, 117.55, 1.36)
pt3dadd(1027.06, 5093.34, 117.55, 1.36)
pt3dadd(1027.4, 5093.72, 117.55, 1.36)
pt3dadd(1027.74, 5094.11, 117.55, 1.36)
pt3dadd(1028.41, 5094.88, 117.55, 1.36)
pt3dadd(1028.75, 5095.27, 117.55, 1.36)
pt3dadd(1029.43, 5095.65, 117.55, 1.36)
pt3dadd(1030.11, 5096.04, 117.55, 1.36)
pt3dadd(1030.45, 5096.42, 117.55, 1.36)
pt3dadd(1030.79, 5096.81, 117.55, 1.36)
pt3dadd(1031.13, 5097.2, 117.55, 1.36)
pt3dadd(1031.47, 5097.58, 117.55, 1.36)
pt3dadd(1031.81, 5097.97, 117.55, 1.36)
pt3dadd(1031.81, 5098.74, 117.55, 1.36)
pt3dadd(1032.15, 5099.13, 117.55, 1.36)
pt3dadd(1032.49, 5099.51, 117.55, 1.36)
pt3dadd(1032.83, 5099.9, 117.55, 1.36)
pt3dadd(1034.53, 5099.9, 117.55, 1.36)
pt3dadd(1034.87, 5100.28, 117.55, 1.36)
pt3dadd(1035.55, 5100.28, 117.55, 1.36)
pt3dadd(1035.89, 5100.67, 117.55, 1.36)
pt3dadd(1035.89, 5101.05, 117.55, 1.02)
pt3dadd(1036.57, 5101.44, 117.55, 1.02)
pt3dadd(1036.91, 5101.83, 117.55, 1.02)
pt3dadd(1037.25, 5102.21, 117.55, 1.02)
pt3dadd(1037.59, 5102.6, 117.55, 1.02)
pt3dadd(1038.27, 5102.6, 117.55, 1.02)
pt3dadd(1038.6, 5102.98, 117.55, 1.02)
pt3dadd(1039.62, 5102.98, 117.55, 1.02)
pt3dadd(1039.96, 5103.37, 117.55, 1.02)
pt3dadd(1040.3, 5103.75, 117.55, 1.02)
pt3dadd(1040.64, 5104.14, 117.55, 1.02)
pt3dadd(1040.98, 5104.53, 117.55, 1.02)
pt3dadd(1041.32, 5104.91, 117.55, 1.02)
pt3dadd(1042, 5105.3, 117.55, 1.02)
pt3dadd(1042.34, 5105.68, 117.55, 1.02)
pt3dadd(1043.02, 5106.07, 117.55, 1.02)
pt3dadd(1043.36, 5106.46, 117.55, 1.02)
pt3dadd(1043.7, 5106.84, 117.55, 1.02)
pt3dadd(1044.04, 5107.23, 117.55, 1.02)
pt3dadd(1044.38, 5107.61, 117.55, 1.02)
pt3dadd(1044.72, 5108, 117.55, 1.02)
pt3dadd(1045.06, 5108.38, 117.55, 1.02)
pt3dadd(1045.4, 5108.77, 117.55, 1.02)
pt3dadd(1045.74, 5109.16, 117.55, 1.02)
pt3dadd(1046.08, 5109.54, 117.55, 1.02)
}
}
proc shape3d_93() {
dend[64] { pt3dadd(1046.42, 5109.93, 117.55, 1.02)
pt3dadd(1046.76, 5110.31, 117.55, 1.02)
pt3dadd(1047.1, 5110.7, 117.55, 1.02)
pt3dadd(1047.44, 5111.08, 117.55, 1.02)
pt3dadd(1047.78, 5111.47, 117.55, 1.02)
pt3dadd(1048.12, 5111.86, 117.55, 1.02)
pt3dadd(1048.46, 5112.24, 117.55, 1.02)
pt3dadd(1048.46, 5114.56, 117.55, 1.02)
pt3dadd(1048.79, 5114.94, 117.55, 1.02)
pt3dadd(1050.49, 5114.94, 117.55, 1.02)
pt3dadd(1050.83, 5115.33, 117.55, 1.02)
pt3dadd(1051.51, 5115.33, 117.55, 1.02)
pt3dadd(1052.19, 5115.71, 117.55, 1.02)
pt3dadd(1050.49, 5115.71, 117.55, 1.02)
pt3dadd(1050.15, 5115.33, 117.55, 1.02)
pt3dadd(1049.81, 5114.56, 117.55, 1.02)
pt3dadd(1049.47, 5113.79, 117.55, 1.02)
pt3dadd(1049.13, 5113.4, 117.55, 1.02)
pt3dadd(1049.81, 5113.79, 117.55, 1.02)
pt3dadd(1050.49, 5113.79, 117.55, 1.02)
pt3dadd(1051.17, 5114.17, 117.55, 1.02)
pt3dadd(1052.19, 5114.17, 117.55, 1.02)
pt3dadd(1052.87, 5114.56, 117.55, 1.02)
pt3dadd(1053.89, 5114.56, 117.55, 1.02)
pt3dadd(1115.89, 5160.65, 117.55, 1.02)
pt3dadd(1054.57, 5114.94, 117.55, 1.02)
pt3dadd(1054.91, 5115.33, 117.55, 1.02)
pt3dadd(1055.59, 5115.71, 117.55, 1.02)
pt3dadd(1047.78, 5113.4, 117.55, 1.36)
pt3dadd(1049.13, 5114.94, 117.55, 1.36)
pt3dadd(1049.13, 5116.49, 117.55, 1.36)
pt3dadd(1057.29, 5116.49, 117.55, 1.36)
}
dend[65] {pt3dclear()
pt3dadd(812.04, 4146.19, 117.55, 3.06)
pt3dadd(810.34, 4145.81, 117.55, 3.06)
pt3dadd(810, 4145.42, 117.55, 3.06)
pt3dadd(801.51, 4145.42, 117.55, 3.06)
pt3dadd(801.17, 4145.81, 117.55, 3.06)
pt3dadd(800.83, 4146.19, 117.55, 3.06)
pt3dadd(800.49, 4146.96, 117.55, 3.06)
pt3dadd(800.15, 4147.35, 117.55, 3.06)
pt3dadd(800.15, 4148.12, 117.55, 3.06)
pt3dadd(799.81, 4148.51, 117.55, 3.06)
pt3dadd(799.47, 4148.89, 117.55, 3.06)
pt3dadd(799.13, 4149.28, 117.55, 3.06)
pt3dadd(798.8, 4150.05, 117.55, 3.06)
pt3dadd(798.46, 4150.44, 117.55, 3.06)
pt3dadd(798.12, 4151.21, 117.55, 3.06)
pt3dadd(797.78, 4151.59, 117.55, 3.06)
pt3dadd(797.44, 4151.98, 117.55, 3.06)
pt3dadd(796.76, 4152.37, 117.55, 3.06)
pt3dadd(796.42, 4152.75, 117.55, 3.06)
pt3dadd(796.08, 4153.14, 117.55, 3.06)
pt3dadd(795.74, 4153.52, 117.55, 3.06)
pt3dadd(795.4, 4153.91, 117.55, 3.06)
pt3dadd(795.06, 4154.68, 117.55, 3.06)
pt3dadd(794.72, 4155.07, 117.55, 3.06)
pt3dadd(794.38, 4155.45, 117.55, 3.06)
pt3dadd(793.7, 4155.45, 117.55, 3.06)
pt3dadd(793.36, 4155.84, 117.55, 3.06)
pt3dadd(793.02, 4156.22, 117.55, 3.06)
pt3dadd(792.68, 4156.61, 117.55, 3.06)
pt3dadd(792.34, 4157, 117.55, 3.06)
pt3dadd(792, 4157.38, 117.55, 3.06)
pt3dadd(791.66, 4157.77, 117.55, 3.06)
pt3dadd(790.98, 4158.15, 117.55, 3.06)
pt3dadd(790.64, 4158.54, 117.55, 3.06)
pt3dadd(790.3, 4158.92, 117.55, 3.06)
pt3dadd(789.96, 4159.31, 117.55, 3.06)
pt3dadd(789.62, 4159.7, 117.55, 3.06)
pt3dadd(789.28, 4160.08, 117.55, 3.06)
pt3dadd(788.94, 4160.47, 117.55, 3.06)
pt3dadd(788.6, 4160.85, 117.55, 3.06)
pt3dadd(788.27, 4161.24, 117.55, 3.06)
pt3dadd(787.59, 4161.63, 117.55, 3.06)
pt3dadd(787.25, 4162.01, 117.55, 3.06)
pt3dadd(786.91, 4162.78, 117.55, 3.06)
pt3dadd(786.23, 4163.17, 117.55, 3.06)
pt3dadd(785.89, 4163.55, 117.55, 3.06)
pt3dadd(785.55, 4163.94, 117.55, 3.06)
pt3dadd(785.21, 4164.33, 117.55, 3.06)
pt3dadd(784.87, 4164.71, 117.55, 3.06)
pt3dadd(784.53, 4165.1, 117.55, 3.06)
pt3dadd(783.85, 4165.1, 117.55, 3.06)
pt3dadd(783.51, 4165.48, 117.55, 3.06)
pt3dadd(783.17, 4165.87, 117.55, 3.06)
pt3dadd(782.83, 4166.25, 117.55, 3.06)
pt3dadd(782.49, 4166.64, 117.55, 3.06)
pt3dadd(782.15, 4167.41, 117.55, 3.06)
pt3dadd(781.47, 4167.8, 117.55, 3.06)
pt3dadd(781.13, 4168.18, 117.55, 3.06)
pt3dadd(780.79, 4168.57, 117.55, 3.06)
pt3dadd(780.79, 4169.34, 117.55, 3.06)
pt3dadd(780.45, 4169.73, 117.55, 3.06)
pt3dadd(780.11, 4170.5, 117.55, 3.06)
pt3dadd(779.77, 4170.88, 117.55, 3.06)
pt3dadd(779.77, 4172.43, 117.55, 3.06)
pt3dadd(779.43, 4172.81, 117.55, 3.06)
pt3dadd(779.43, 4178.6, 117.55, 3.06)
pt3dadd(778.75, 4178.99, 117.55, 3.06)
pt3dadd(779.09, 4177.06, 117.55, 2.38)
pt3dadd(778.75, 4177.44, 117.55, 2.38)
pt3dadd(778.41, 4177.83, 117.55, 2.38)
pt3dadd(777.74, 4178.21, 117.55, 2.38)
pt3dadd(777.4, 4178.6, 117.55, 2.38)
pt3dadd(777.06, 4178.99, 117.55, 2.38)
pt3dadd(776.72, 4179.37, 117.55, 2.38)
pt3dadd(776.38, 4179.76, 117.55, 2.38)
pt3dadd(776.04, 4180.14, 117.55, 2.38)
pt3dadd(775.7, 4180.53, 117.55, 2.38)
pt3dadd(775.36, 4180.92, 117.55, 2.38)
pt3dadd(775.02, 4181.3, 117.55, 2.38)
pt3dadd(774.68, 4181.69, 117.55, 2.38)
pt3dadd(774.34, 4182.07, 117.55, 2.38)
pt3dadd(774.34, 4182.84, 117.55, 2.38)
pt3dadd(774, 4183.23, 117.55, 2.38)
pt3dadd(773.32, 4183.23, 117.55, 2.38)
pt3dadd(772.98, 4183.62, 117.55, 2.38)
pt3dadd(772.64, 4184, 117.55, 2.38)
pt3dadd(772.3, 4184.39, 117.55, 2.38)
pt3dadd(771.96, 4184.77, 117.55, 2.38)
pt3dadd(771.62, 4185.16, 117.55, 2.38)
pt3dadd(771.28, 4185.54, 117.55, 2.38)
pt3dadd(766.19, 4185.54, 117.55, 2.38)
pt3dadd(765.85, 4185.16, 117.55, 2.38)
pt3dadd(765.51, 4184.77, 117.55, 2.38)
pt3dadd(765.17, 4184.39, 117.55, 2.38)
pt3dadd(764.83, 4184, 117.55, 2.38)
pt3dadd(764.49, 4183.62, 117.55, 2.38)
pt3dadd(764.15, 4183.23, 117.55, 2.38)
pt3dadd(763.81, 4182.84, 117.55, 2.38)
pt3dadd(763.47, 4182.46, 117.55, 2.38)
pt3dadd(763.13, 4182.07, 117.55, 2.38)
pt3dadd(762.79, 4181.69, 117.55, 2.38)
pt3dadd(761.77, 4181.69, 117.55, 2.38)
pt3dadd(761.43, 4181.3, 117.55, 2.38)
pt3dadd(761.09, 4180.92, 117.55, 2.38)
pt3dadd(760.41, 4180.92, 117.55, 2.38)
pt3dadd(759.73, 4180.53, 117.55, 2.38)
pt3dadd(759.39, 4180.14, 117.55, 2.38)
pt3dadd(759.05, 4179.76, 117.55, 2.38)
pt3dadd(758.71, 4179.37, 117.55, 2.38)
pt3dadd(758.03, 4178.99, 117.55, 2.38)
pt3dadd(757.35, 4178.6, 117.55, 2.38)
pt3dadd(756.68, 4178.21, 117.55, 2.38)
pt3dadd(756.34, 4177.83, 117.55, 2.38)
pt3dadd(756, 4177.44, 117.55, 2.38)
pt3dadd(755.66, 4177.06, 117.55, 2.38)
pt3dadd(755.32, 4176.67, 117.55, 2.38)
pt3dadd(754.64, 4176.67, 117.55, 2.38)
pt3dadd(753.96, 4176.29, 117.55, 2.38)
pt3dadd(751.58, 4176.29, 117.55, 2.38)
pt3dadd(751.24, 4176.67, 117.55, 2.38)
pt3dadd(750.9, 4177.06, 117.55, 2.38)
pt3dadd(750.56, 4177.44, 117.55, 2.38)
pt3dadd(749.88, 4177.44, 117.55, 2.38)
pt3dadd(749.54, 4177.83, 117.55, 2.38)
pt3dadd(749.2, 4178.21, 117.55, 2.38)
pt3dadd(748.86, 4178.6, 117.55, 2.38)
pt3dadd(748.52, 4178.99, 117.55, 2.38)
pt3dadd(748.18, 4179.37, 117.55, 2.38)
pt3dadd(747.84, 4179.76, 117.55, 2.38)
pt3dadd(747.84, 4182.84, 117.55, 2.38)
pt3dadd(749.88, 4179.76, 117.55, 3.4)
pt3dadd(749.88, 4180.53, 117.55, 3.4)
pt3dadd(749.54, 4180.92, 117.55, 3.4)
pt3dadd(749.54, 4182.46, 117.55, 3.4)
pt3dadd(749.2, 4182.84, 117.55, 3.4)
pt3dadd(749.2, 4183.62, 117.55, 3.4)
pt3dadd(748.86, 4184, 117.55, 3.4)
pt3dadd(748.86, 4184.77, 117.55, 3.4)
pt3dadd(748.52, 4185.54, 117.55, 3.4)
pt3dadd(748.18, 4186.32, 117.55, 3.4)
pt3dadd(747.5, 4186.32, 117.55, 3.4)
pt3dadd(746.49, 4186.7, 117.55, 3.4)
pt3dadd(746.15, 4187.09, 117.55, 3.4)
pt3dadd(745.47, 4187.09, 117.55, 3.4)
pt3dadd(745.13, 4187.47, 117.55, 3.4)
pt3dadd(744.11, 4187.47, 117.55, 3.4)
pt3dadd(744.45, 4187.09, 117.55, 2.38)
pt3dadd(743.77, 4187.47, 117.55, 2.38)
pt3dadd(743.09, 4188.25, 117.55, 2.38)
pt3dadd(742.41, 4188.63, 117.55, 2.38)
pt3dadd(741.73, 4188.63, 117.55, 2.38)
pt3dadd(741.39, 4189.02, 117.55, 2.38)
pt3dadd(741.05, 4189.4, 117.55, 2.38)
pt3dadd(740.71, 4189.79, 117.55, 2.38)
pt3dadd(740.37, 4190.17, 117.55, 2.38)
pt3dadd(740.03, 4190.56, 117.55, 2.38)
pt3dadd(739.69, 4190.95, 117.55, 2.38)
pt3dadd(739.35, 4191.33, 117.55, 2.38)
pt3dadd(739.35, 4192.1, 117.55, 2.38)
pt3dadd(739.01, 4192.49, 117.55, 2.38)
pt3dadd(738.67, 4192.88, 117.55, 2.38)
pt3dadd(738.67, 4200.21, 117.55, 2.38)
pt3dadd(739.01, 4200.21, 117.55, 2.04)
pt3dadd(738.33, 4200.21, 117.55, 2.04)
pt3dadd(737.99, 4200.59, 117.55, 2.04)
pt3dadd(737.65, 4200.98, 117.55, 2.04)
pt3dadd(737.31, 4201.36, 117.55, 2.04)
pt3dadd(736.63, 4201.75, 117.55, 2.04)
}
}
proc shape3d_94() {
dend[65] { pt3dadd(736.29, 4202.13, 117.55, 2.04)
pt3dadd(735.96, 4202.52, 117.55, 2.04)
pt3dadd(735.62, 4202.91, 117.55, 2.04)
pt3dadd(735.28, 4203.29, 117.55, 2.04)
pt3dadd(734.6, 4203.68, 117.55, 2.04)
pt3dadd(734.6, 4204.45, 117.55, 2.04)
pt3dadd(734.26, 4204.83, 117.55, 2.04)
pt3dadd(733.92, 4205.22, 117.55, 2.04)
pt3dadd(733.58, 4205.99, 117.55, 2.04)
pt3dadd(733.24, 4206.38, 117.55, 2.04)
pt3dadd(732.9, 4206.76, 117.55, 2.04)
pt3dadd(732.9, 4207.54, 117.55, 2.04)
pt3dadd(732.56, 4207.92, 117.55, 2.04)
pt3dadd(732.56, 4208.69, 117.55, 2.04)
pt3dadd(732.22, 4209.46, 117.55, 2.04)
pt3dadd(732.22, 4210.62, 117.55, 2.04)
pt3dadd(731.88, 4211.01, 117.55, 2.04)
pt3dadd(731.2, 4211.39, 117.55, 2.04)
pt3dadd(730.86, 4211.78, 117.55, 2.04)
pt3dadd(730.52, 4212.55, 117.55, 2.04)
pt3dadd(729.16, 4212.55, 117.55, 2.04)
pt3dadd(730.18, 4212.17, 117.55, 2.72)
pt3dadd(729.5, 4212.17, 117.55, 2.72)
pt3dadd(728.48, 4212.55, 117.55, 2.72)
pt3dadd(727.46, 4212.94, 117.55, 2.72)
pt3dadd(726.44, 4213.32, 117.55, 2.72)
pt3dadd(726.1, 4213.71, 117.55, 2.72)
pt3dadd(723.05, 4213.71, 117.55, 2.72)
pt3dadd(723.05, 4214.09, 117.55, 2.04)
pt3dadd(721.01, 4214.09, 117.55, 2.04)
pt3dadd(720.67, 4214.87, 117.55, 2.04)
pt3dadd(720.33, 4215.25, 117.55, 2.04)
pt3dadd(720.33, 4222.97, 117.55, 2.04)
pt3dadd(719.99, 4223.35, 117.55, 2.04)
pt3dadd(719.99, 4224.13, 117.55, 2.04)
pt3dadd(719.65, 4224.51, 117.55, 2.04)
pt3dadd(719.31, 4224.9, 117.55, 2.04)
pt3dadd(718.97, 4225.28, 117.55, 2.04)
pt3dadd(718.63, 4225.67, 117.55, 2.04)
pt3dadd(718.63, 4226.44, 117.55, 2.04)
pt3dadd(718.29, 4226.83, 117.55, 2.04)
pt3dadd(717.95, 4227.21, 117.55, 2.04)
pt3dadd(717.61, 4227.6, 117.55, 2.04)
pt3dadd(716.59, 4227.6, 117.55, 2.04)
pt3dadd(715.91, 4227.98, 117.55, 2.04)
pt3dadd(714.56, 4227.98, 117.55, 2.04)
pt3dadd(713.88, 4227.6, 117.55, 2.04)
pt3dadd(713.2, 4227.21, 117.55, 2.04)
pt3dadd(712.86, 4226.83, 117.55, 2.04)
pt3dadd(711.84, 4226.83, 117.55, 2.04)
pt3dadd(711.5, 4226.44, 117.55, 2.04)
pt3dadd(706.4, 4226.44, 117.55, 2.04)
pt3dadd(706.06, 4226.83, 117.55, 2.04)
pt3dadd(705.72, 4227.21, 117.55, 2.04)
pt3dadd(705.72, 4227.98, 117.55, 2.04)
pt3dadd(705.38, 4228.37, 117.55, 2.04)
pt3dadd(704.71, 4229.14, 117.55, 2.04)
pt3dadd(704.37, 4229.53, 117.55, 2.04)
pt3dadd(704.03, 4229.91, 117.55, 2.04)
pt3dadd(704.03, 4230.68, 117.55, 2.04)
pt3dadd(703.69, 4231.07, 117.55, 2.04)
pt3dadd(703.35, 4231.46, 117.55, 2.04)
pt3dadd(703.01, 4231.84, 117.55, 2.04)
pt3dadd(700.29, 4231.84, 117.55, 2.04)
pt3dadd(700.29, 4231.07, 117.55, 2.04)
pt3dadd(699.95, 4230.68, 117.55, 2.04)
pt3dadd(699.61, 4230.3, 117.55, 2.04)
pt3dadd(699.27, 4229.91, 117.55, 2.04)
pt3dadd(698.93, 4229.53, 117.55, 2.04)
pt3dadd(698.25, 4229.14, 117.55, 2.04)
pt3dadd(697.91, 4228.75, 117.55, 2.04)
pt3dadd(697.57, 4228.37, 117.55, 2.04)
pt3dadd(696.89, 4227.98, 117.55, 2.04)
pt3dadd(696.55, 4227.6, 117.55, 2.04)
pt3dadd(695.87, 4227.6, 117.55, 2.04)
pt3dadd(695.19, 4227.21, 117.55, 2.04)
pt3dadd(694.52, 4226.83, 117.55, 2.04)
pt3dadd(693.84, 4226.83, 117.55, 2.04)
pt3dadd(693.5, 4226.44, 117.55, 2.04)
pt3dadd(691.46, 4226.44, 117.55, 2.04)
pt3dadd(691.12, 4226.05, 117.55, 2.04)
pt3dadd(690.44, 4225.67, 117.55, 2.04)
pt3dadd(689.76, 4225.67, 117.55, 2.04)
pt3dadd(689.42, 4225.28, 117.55, 2.04)
pt3dadd(688.74, 4225.28, 117.55, 2.04)
pt3dadd(688.4, 4224.9, 117.55, 2.04)
pt3dadd(687.04, 4224.9, 117.55, 2.04)
pt3dadd(686.7, 4225.28, 117.55, 2.04)
pt3dadd(686.36, 4225.67, 117.55, 2.04)
pt3dadd(686.02, 4226.05, 117.55, 2.04)
pt3dadd(685.68, 4226.44, 117.55, 2.04)
pt3dadd(685.34, 4227.21, 117.55, 2.04)
pt3dadd(684.66, 4227.21, 117.55, 2.04)
pt3dadd(684.32, 4226.83, 117.55, 2.04)
pt3dadd(683.99, 4226.44, 117.55, 2.04)
pt3dadd(683.65, 4226.05, 117.55, 2.04)
pt3dadd(682.63, 4226.05, 117.55, 2.04)
pt3dadd(682.29, 4225.67, 117.55, 2.04)
pt3dadd(681.61, 4225.28, 117.55, 2.04)
pt3dadd(681.27, 4224.9, 117.55, 2.04)
pt3dadd(680.93, 4224.51, 117.55, 2.04)
pt3dadd(673.79, 4224.51, 117.55, 2.04)
pt3dadd(673.46, 4224.9, 117.55, 2.04)
pt3dadd(672.78, 4224.9, 117.55, 2.04)
pt3dadd(672.44, 4225.28, 117.55, 2.04)
pt3dadd(672.1, 4225.67, 117.55, 2.04)
pt3dadd(671.42, 4225.67, 117.55, 2.04)
pt3dadd(671.08, 4226.44, 117.55, 2.04)
pt3dadd(670.74, 4226.83, 117.55, 2.04)
pt3dadd(670.74, 4227.98, 117.55, 2.04)
pt3dadd(670.4, 4228.75, 117.55, 2.04)
pt3dadd(670.4, 4230.68, 117.55, 2.04)
pt3dadd(669.72, 4231.07, 117.55, 2.04)
pt3dadd(669.38, 4231.46, 117.55, 2.04)
pt3dadd(669.04, 4231.84, 117.55, 2.04)
pt3dadd(668.36, 4231.07, 117.55, 2.04)
pt3dadd(667.68, 4231.07, 117.55, 2.04)
pt3dadd(667.34, 4230.68, 117.55, 2.04)
pt3dadd(667, 4230.3, 117.55, 2.04)
pt3dadd(666.66, 4229.91, 117.55, 2.04)
pt3dadd(666.32, 4229.53, 117.55, 2.04)
pt3dadd(665.98, 4229.14, 117.55, 2.04)
pt3dadd(665.64, 4228.75, 117.55, 2.04)
pt3dadd(665.3, 4228.37, 117.55, 2.04)
pt3dadd(664.96, 4227.98, 117.55, 2.04)
pt3dadd(664.62, 4227.6, 117.55, 2.04)
pt3dadd(664.28, 4227.21, 117.55, 2.04)
pt3dadd(663.94, 4226.83, 117.55, 2.04)
pt3dadd(661.57, 4226.83, 117.55, 2.04)
pt3dadd(660.89, 4226.44, 117.55, 2.04)
pt3dadd(659.19, 4226.44, 117.55, 2.04)
pt3dadd(658.85, 4226.83, 117.55, 2.04)
pt3dadd(658.51, 4227.6, 117.55, 2.04)
pt3dadd(658.17, 4227.98, 117.55, 2.04)
pt3dadd(657.83, 4228.37, 117.55, 2.04)
pt3dadd(657.49, 4228.75, 117.55, 2.04)
pt3dadd(657.15, 4229.14, 117.55, 2.04)
pt3dadd(657.15, 4229.91, 117.55, 2.04)
pt3dadd(656.81, 4230.3, 117.55, 2.04)
pt3dadd(656.47, 4231.07, 117.55, 2.04)
pt3dadd(656.13, 4231.46, 117.55, 2.04)
pt3dadd(655.79, 4231.84, 117.55, 2.04)
pt3dadd(655.79, 4232.61, 117.55, 2.04)
pt3dadd(655.45, 4233, 117.55, 2.04)
pt3dadd(655.11, 4233.38, 117.55, 2.04)
pt3dadd(655.11, 4234.16, 117.55, 2.04)
pt3dadd(654.77, 4234.54, 117.55, 2.04)
pt3dadd(654.43, 4234.93, 117.55, 2.04)
pt3dadd(654.09, 4235.31, 117.55, 2.04)
pt3dadd(653.41, 4235.31, 117.55, 2.04)
pt3dadd(653.07, 4235.7, 117.55, 2.04)
pt3dadd(652.74, 4236.08, 117.55, 2.04)
pt3dadd(652.4, 4236.47, 117.55, 2.04)
pt3dadd(651.72, 4236.47, 117.55, 2.04)
pt3dadd(651.38, 4236.86, 117.55, 2.04)
pt3dadd(646.96, 4236.86, 117.55, 2.04)
pt3dadd(646.62, 4236.47, 117.55, 2.04)
pt3dadd(646.28, 4236.08, 117.55, 2.04)
pt3dadd(645.94, 4235.7, 117.55, 2.04)
pt3dadd(645.26, 4235.7, 117.55, 2.04)
pt3dadd(644.92, 4235.31, 117.55, 2.04)
pt3dadd(643.56, 4235.31, 117.55, 2.04)
pt3dadd(643.56, 4236.08, 117.55, 2.04)
pt3dadd(642.88, 4236.47, 117.55, 2.04)
pt3dadd(642.54, 4236.86, 117.55, 2.04)
pt3dadd(642.21, 4237.24, 117.55, 2.04)
pt3dadd(641.53, 4237.24, 117.55, 2.04)
pt3dadd(641.19, 4237.63, 117.55, 2.04)
pt3dadd(640.85, 4238.01, 117.55, 2.04)
pt3dadd(640.17, 4238.4, 117.55, 2.04)
pt3dadd(639.83, 4238.79, 117.55, 2.04)
pt3dadd(639.49, 4239.56, 117.55, 2.04)
pt3dadd(639.15, 4239.94, 117.55, 2.04)
pt3dadd(638.81, 4240.33, 117.55, 2.04)
pt3dadd(638.47, 4240.71, 117.55, 2.04)
pt3dadd(638.13, 4241.1, 117.55, 2.04)
pt3dadd(637.79, 4241.49, 117.55, 2.04)
pt3dadd(637.79, 4242.26, 117.55, 2.04)
pt3dadd(637.45, 4242.64, 117.55, 2.04)
pt3dadd(637.11, 4243.03, 117.55, 2.04)
pt3dadd(636.77, 4243.42, 117.55, 2.04)
pt3dadd(636.43, 4243.8, 117.55, 2.04)
pt3dadd(628.62, 4243.8, 117.55, 2.04)
pt3dadd(627.94, 4244.19, 117.55, 2.72)
pt3dadd(627.6, 4244.57, 117.55, 2.72)
pt3dadd(626.92, 4244.96, 117.55, 2.72)
pt3dadd(626.92, 4245.73, 117.55, 2.72)
pt3dadd(626.24, 4246.12, 117.55, 2.72)
pt3dadd(625.9, 4246.5, 117.55, 2.72)
pt3dadd(625.56, 4246.89, 117.55, 2.72)
pt3dadd(625.56, 4247.66, 117.55, 2.72)
pt3dadd(625.22, 4248.04, 117.55, 2.72)
pt3dadd(624.88, 4248.43, 117.55, 2.72)
pt3dadd(624.88, 4249.2, 117.55, 2.72)
pt3dadd(624.54, 4249.59, 117.55, 2.72)
pt3dadd(624.2, 4249.97, 117.55, 2.72)
pt3dadd(623.52, 4250.36, 117.55, 2.72)
pt3dadd(623.18, 4250.75, 117.55, 2.72)
pt3dadd(621.82, 4250.75, 117.55, 2.72)
pt3dadd(621.49, 4251.13, 117.55, 2.72)
}
}
proc shape3d_95() {
dend[65] { pt3dadd(621.15, 4251.52, 117.55, 2.72)
pt3dadd(620.47, 4251.9, 117.55, 2.72)
pt3dadd(620.13, 4252.29, 117.55, 2.72)
pt3dadd(619.79, 4252.67, 117.55, 2.72)
pt3dadd(619.11, 4253.06, 117.55, 2.72)
pt3dadd(618.77, 4253.45, 117.55, 2.72)
pt3dadd(618.43, 4253.83, 117.55, 2.72)
pt3dadd(617.75, 4253.83, 117.55, 2.72)
pt3dadd(617.41, 4254.22, 117.55, 2.72)
pt3dadd(617.07, 4254.6, 117.55, 2.72)
pt3dadd(616.73, 4254.99, 117.55, 2.72)
pt3dadd(616.39, 4255.38, 117.55, 2.72)
pt3dadd(615.71, 4255.76, 117.55, 2.72)
pt3dadd(615.37, 4256.15, 117.55, 2.72)
pt3dadd(615.03, 4256.92, 117.55, 2.72)
pt3dadd(614.69, 4257.3, 117.55, 2.72)
pt3dadd(614.01, 4257.69, 117.55, 2.72)
pt3dadd(613.67, 4258.08, 117.55, 2.72)
pt3dadd(613.33, 4258.46, 117.55, 2.72)
pt3dadd(610.28, 4258.46, 117.55, 2.72)
pt3dadd(609.94, 4258.08, 117.55, 2.72)
pt3dadd(609.6, 4257.69, 117.55, 2.72)
pt3dadd(609.26, 4257.3, 117.55, 2.72)
pt3dadd(608.92, 4256.92, 117.55, 2.72)
pt3dadd(608.24, 4256.53, 117.55, 2.72)
pt3dadd(607.9, 4256.15, 117.55, 2.72)
pt3dadd(605.18, 4256.15, 117.55, 2.72)
pt3dadd(604.84, 4256.92, 117.55, 2.72)
pt3dadd(604.5, 4257.69, 117.55, 2.72)
pt3dadd(604.16, 4258.08, 117.55, 2.72)
pt3dadd(603.48, 4258.46, 117.55, 2.72)
pt3dadd(603.14, 4258.85, 117.55, 2.72)
pt3dadd(602.8, 4259.23, 117.55, 2.72)
pt3dadd(602.8, 4260, 117.55, 2.72)
pt3dadd(602.46, 4260.39, 117.55, 2.72)
pt3dadd(602.12, 4260.78, 117.55, 2.72)
pt3dadd(601.78, 4261.16, 117.55, 2.72)
pt3dadd(601.44, 4261.55, 117.55, 2.72)
pt3dadd(601.44, 4262.32, 117.55, 2.72)
pt3dadd(601.1, 4262.71, 117.55, 2.72)
pt3dadd(600.09, 4263.48, 117.55, 2.72)
pt3dadd(600.09, 4264.25, 117.55, 2.72)
pt3dadd(599.75, 4264.63, 117.55, 2.72)
pt3dadd(599.41, 4265.02, 117.55, 2.72)
pt3dadd(599.07, 4265.41, 117.55, 2.72)
pt3dadd(598.73, 4265.79, 117.55, 2.72)
pt3dadd(598.39, 4266.18, 117.55, 2.72)
pt3dadd(598.05, 4266.95, 117.55, 2.72)
pt3dadd(597.71, 4267.33, 117.55, 2.72)
pt3dadd(597.37, 4267.72, 117.55, 2.72)
pt3dadd(597.03, 4268.11, 117.55, 2.72)
pt3dadd(596.69, 4268.49, 117.55, 2.72)
pt3dadd(596.35, 4268.88, 117.55, 2.72)
pt3dadd(596.01, 4269.26, 117.55, 2.72)
pt3dadd(591.59, 4269.26, 117.55, 2.72)
pt3dadd(591.25, 4268.88, 117.55, 2.72)
pt3dadd(590.91, 4268.49, 117.55, 2.72)
pt3dadd(590.91, 4267.72, 117.55, 2.72)
pt3dadd(590.57, 4267.33, 117.55, 2.72)
pt3dadd(590.24, 4266.95, 117.55, 2.72)
pt3dadd(589.9, 4266.56, 117.55, 2.72)
pt3dadd(589.22, 4266.56, 117.55, 2.72)
pt3dadd(588.54, 4266.18, 117.55, 2.72)
pt3dadd(588.2, 4265.79, 117.55, 2.72)
pt3dadd(586.16, 4265.79, 117.55, 2.72)
pt3dadd(585.82, 4266.18, 117.55, 2.72)
pt3dadd(585.48, 4266.56, 117.55, 2.72)
pt3dadd(585.14, 4266.95, 117.55, 2.72)
pt3dadd(584.8, 4267.33, 117.55, 2.72)
pt3dadd(584.12, 4267.33, 117.55, 2.72)
pt3dadd(583.78, 4267.72, 117.55, 2.72)
pt3dadd(583.44, 4268.49, 117.55, 2.72)
pt3dadd(583.1, 4268.88, 117.55, 2.72)
pt3dadd(582.76, 4269.26, 117.55, 2.72)
pt3dadd(582.42, 4269.65, 117.55, 2.72)
pt3dadd(582.08, 4270.04, 117.55, 2.72)
pt3dadd(581.74, 4270.42, 117.55, 2.72)
pt3dadd(581.06, 4270.81, 117.55, 2.72)
pt3dadd(580.72, 4271.19, 117.55, 2.72)
pt3dadd(580.38, 4271.58, 117.55, 2.72)
pt3dadd(580.04, 4271.96, 117.55, 2.72)
pt3dadd(579.71, 4272.35, 117.55, 2.72)
pt3dadd(579.03, 4272.74, 117.55, 2.72)
pt3dadd(578.69, 4273.12, 117.55, 2.72)
pt3dadd(578.35, 4273.51, 117.55, 2.72)
pt3dadd(577.67, 4273.51, 117.55, 2.72)
pt3dadd(577.33, 4273.89, 117.55, 2.72)
pt3dadd(565.78, 4273.89, 117.55, 2.72)
pt3dadd(566.46, 4275.05, 117.55, 2.72)
pt3dadd(565.44, 4275.05, 117.55, 2.72)
pt3dadd(565.1, 4275.44, 117.55, 2.72)
pt3dadd(564.76, 4275.82, 117.55, 2.72)
pt3dadd(564.42, 4276.21, 117.55, 2.72)
pt3dadd(564.08, 4276.59, 117.55, 2.72)
pt3dadd(563.74, 4276.98, 117.55, 2.72)
pt3dadd(563.74, 4277.75, 117.55, 2.72)
pt3dadd(563.4, 4278.14, 117.55, 2.72)
pt3dadd(563.06, 4278.52, 117.55, 2.72)
pt3dadd(562.72, 4279.29, 117.55, 2.72)
pt3dadd(562.72, 4280.45, 117.55, 2.72)
pt3dadd(562.38, 4280.84, 117.55, 2.72)
pt3dadd(562.38, 4281.61, 117.55, 2.72)
pt3dadd(562.04, 4282, 117.55, 2.72)
pt3dadd(561.7, 4282.38, 117.55, 2.72)
pt3dadd(561.36, 4282.77, 117.55, 2.72)
pt3dadd(561.36, 4283.54, 117.55, 2.72)
pt3dadd(561.02, 4283.92, 117.55, 2.72)
pt3dadd(560.68, 4284.31, 117.55, 2.72)
pt3dadd(560.34, 4284.7, 117.55, 2.72)
pt3dadd(560, 4285.08, 117.55, 2.72)
pt3dadd(559.66, 4285.47, 117.55, 2.72)
pt3dadd(559.32, 4286.24, 117.55, 2.72)
pt3dadd(558.99, 4286.63, 117.55, 2.72)
pt3dadd(558.65, 4287.01, 117.55, 2.72)
pt3dadd(558.31, 4287.4, 117.55, 2.72)
pt3dadd(557.63, 4287.4, 117.55, 2.72)
pt3dadd(557.29, 4287.78, 117.55, 2.72)
pt3dadd(556.95, 4288.17, 117.55, 2.72)
pt3dadd(556.61, 4288.55, 117.55, 2.72)
pt3dadd(556.61, 4293.18, 117.55, 2.72)
pt3dadd(556.27, 4293.96, 117.55, 2.72)
pt3dadd(555.93, 4294.34, 117.55, 2.72)
pt3dadd(555.59, 4294.73, 117.55, 2.72)
pt3dadd(555.59, 4295.5, 117.55, 2.72)
pt3dadd(554.91, 4295.88, 117.55, 2.72)
pt3dadd(554.57, 4296.27, 117.55, 2.72)
pt3dadd(554.23, 4296.66, 117.55, 2.72)
pt3dadd(553.89, 4297.43, 117.55, 2.72)
pt3dadd(553.55, 4297.81, 117.55, 2.72)
pt3dadd(552.87, 4298.2, 117.55, 2.72)
pt3dadd(552.53, 4297.81, 117.55, 2.72)
pt3dadd(552.19, 4297.43, 117.55, 2.72)
pt3dadd(551.85, 4297.04, 117.55, 2.72)
pt3dadd(551.51, 4296.66, 117.55, 2.72)
pt3dadd(551.51, 4295.88, 117.55, 2.72)
pt3dadd(550.83, 4295.5, 117.55, 2.72)
pt3dadd(550.49, 4295.11, 117.55, 2.72)
pt3dadd(549.13, 4295.11, 117.55, 2.72)
pt3dadd(548.79, 4294.73, 117.55, 2.72)
pt3dadd(543.36, 4294.73, 117.55, 2.72)
pt3dadd(548.12, 4294.34, 117.55, 2.72)
pt3dadd(547.1, 4294.34, 117.55, 2.72)
pt3dadd(546.42, 4293.96, 117.55, 2.72)
pt3dadd(541.66, 4293.96, 117.55, 2.72)
pt3dadd(541.32, 4294.34, 117.55, 2.72)
pt3dadd(540.98, 4295.11, 117.55, 2.72)
pt3dadd(540.64, 4295.5, 117.55, 2.72)
pt3dadd(540.3, 4295.88, 117.55, 2.72)
pt3dadd(540.3, 4297.43, 117.55, 2.72)
pt3dadd(539.96, 4297.81, 117.55, 2.72)
pt3dadd(539.96, 4298.58, 117.55, 2.72)
pt3dadd(539.62, 4298.97, 117.55, 2.72)
pt3dadd(539.28, 4299.36, 117.55, 2.72)
pt3dadd(538.6, 4300.13, 117.55, 2.72)
pt3dadd(538.26, 4300.51, 117.55, 2.72)
pt3dadd(537.93, 4300.9, 117.55, 2.72)
pt3dadd(537.59, 4300.51, 117.55, 2.72)
pt3dadd(536.91, 4300.51, 117.55, 2.72)
pt3dadd(536.91, 4299.36, 117.55, 2.72)
pt3dadd(536.57, 4298.97, 117.55, 2.72)
pt3dadd(535.89, 4298.58, 117.55, 2.72)
pt3dadd(535.21, 4298.2, 117.55, 2.72)
pt3dadd(534.87, 4297.81, 117.55, 2.72)
pt3dadd(534.19, 4297.81, 117.55, 2.72)
pt3dadd(533.51, 4297.43, 117.55, 2.72)
pt3dadd(530.79, 4297.43, 117.55, 2.72)
pt3dadd(530.45, 4297.81, 117.55, 2.72)
pt3dadd(530.11, 4298.2, 117.55, 2.72)
pt3dadd(529.77, 4298.58, 117.55, 2.72)
pt3dadd(529.09, 4298.58, 117.55, 2.72)
pt3dadd(528.75, 4298.97, 117.55, 2.72)
pt3dadd(528.41, 4299.36, 117.55, 2.72)
pt3dadd(527.4, 4299.36, 117.55, 2.72)
pt3dadd(526.72, 4299.74, 117.55, 2.72)
pt3dadd(526.04, 4300.13, 117.55, 2.72)
pt3dadd(525.02, 4300.13, 117.55, 2.72)
pt3dadd(524.68, 4300.51, 117.55, 2.72)
pt3dadd(523.66, 4300.51, 117.55, 2.72)
pt3dadd(523.32, 4300.9, 117.55, 2.72)
pt3dadd(522.64, 4300.9, 117.55, 2.72)
pt3dadd(522.3, 4301.29, 117.55, 2.72)
pt3dadd(521.96, 4301.67, 117.55, 2.72)
pt3dadd(521.28, 4301.67, 117.55, 2.72)
pt3dadd(520.94, 4302.06, 117.55, 2.72)
pt3dadd(520.26, 4302.06, 117.55, 2.72)
pt3dadd(519.58, 4301.67, 117.55, 3.06)
pt3dadd(519.24, 4301.29, 117.55, 3.06)
pt3dadd(518.56, 4300.9, 117.55, 3.06)
pt3dadd(518.22, 4300.51, 117.55, 3.06)
pt3dadd(517.88, 4300.13, 117.55, 3.06)
pt3dadd(517.54, 4299.74, 117.55, 3.06)
pt3dadd(516.87, 4299.36, 117.55, 3.06)
pt3dadd(512.45, 4299.36, 117.55, 3.06)
pt3dadd(512.11, 4298.97, 117.55, 3.06)
pt3dadd(511.77, 4298.58, 117.55, 3.06)
pt3dadd(511.09, 4298.58, 117.55, 3.06)
pt3dadd(510.75, 4298.2, 117.55, 3.06)
pt3dadd(510.41, 4297.81, 117.55, 3.06)
pt3dadd(510.07, 4297.43, 117.55, 3.06)
pt3dadd(509.73, 4297.04, 117.55, 3.06)
}
}
proc shape3d_96() {
dend[65] { pt3dadd(509.05, 4296.66, 117.55, 3.06)
pt3dadd(508.71, 4296.27, 117.55, 3.06)
pt3dadd(508.37, 4295.88, 117.55, 3.06)
pt3dadd(508.03, 4295.5, 117.55, 3.06)
pt3dadd(502.94, 4295.5, 117.55, 3.06)
pt3dadd(502.26, 4295.11, 117.55, 3.06)
pt3dadd(501.92, 4294.73, 117.55, 3.06)
pt3dadd(501.58, 4294.34, 117.55, 3.06)
pt3dadd(500.9, 4294.34, 117.55, 3.06)
pt3dadd(500.56, 4293.96, 117.55, 3.06)
pt3dadd(500.22, 4293.57, 117.55, 3.06)
pt3dadd(499.54, 4292.8, 117.55, 3.06)
pt3dadd(499.2, 4292.41, 117.55, 3.06)
pt3dadd(498.52, 4292.41, 117.55, 3.06)
pt3dadd(497.84, 4292.03, 117.55, 3.06)
pt3dadd(492.75, 4292.03, 117.55, 3.06)
pt3dadd(492.41, 4292.41, 117.55, 3.06)
pt3dadd(492.07, 4292.8, 117.55, 3.06)
pt3dadd(479.5, 4292.8, 117.55, 3.06)
pt3dadd(479.5, 4290.87, 117.55, 3.06)
pt3dadd(479.16, 4290.48, 117.55, 3.06)
pt3dadd(478.82, 4290.1, 117.55, 3.06)
pt3dadd(475.43, 4290.1, 117.55, 3.06)
pt3dadd(475.09, 4290.87, 117.55, 3.06)
pt3dadd(474.75, 4291.25, 117.55, 3.06)
pt3dadd(474.41, 4291.64, 117.55, 3.06)
pt3dadd(473.73, 4292.03, 117.55, 3.06)
pt3dadd(473.39, 4292.41, 117.55, 3.06)
pt3dadd(473.05, 4292.8, 117.55, 3.06)
pt3dadd(472.71, 4293.18, 117.55, 3.06)
pt3dadd(472.37, 4293.96, 117.55, 3.06)
pt3dadd(472.03, 4294.34, 117.55, 3.06)
pt3dadd(471.69, 4294.73, 117.55, 3.06)
pt3dadd(471.35, 4295.11, 117.55, 3.06)
pt3dadd(471.01, 4295.5, 117.55, 3.06)
pt3dadd(470.67, 4295.88, 117.55, 3.06)
pt3dadd(467.95, 4295.88, 117.55, 3.06)
pt3dadd(467.61, 4296.27, 117.55, 3.06)
pt3dadd(466.93, 4296.27, 117.55, 3.06)
pt3dadd(466.59, 4295.88, 117.55, 3.06)
pt3dadd(466.25, 4295.5, 117.55, 3.06)
pt3dadd(465.57, 4295.11, 117.55, 3.06)
pt3dadd(464.9, 4295.11, 117.55, 3.06)
pt3dadd(464.22, 4294.73, 117.55, 3.06)
pt3dadd(463.88, 4294.34, 117.55, 3.06)
pt3dadd(459.46, 4294.34, 117.55, 3.06)
pt3dadd(459.12, 4293.96, 117.55, 3.06)
pt3dadd(458.1, 4293.96, 117.55, 3.06)
pt3dadd(457.76, 4293.57, 117.55, 3.06)
pt3dadd(457.08, 4293.18, 117.55, 3.06)
pt3dadd(456.74, 4292.8, 117.55, 3.06)
pt3dadd(446.55, 4292.8, 117.55, 3.06)
pt3dadd(447.23, 4291.25, 117.55, 2.72)
pt3dadd(446.89, 4291.64, 117.55, 2.72)
pt3dadd(446.55, 4292.41, 117.55, 2.72)
pt3dadd(446.21, 4292.8, 117.55, 2.72)
pt3dadd(445.87, 4293.18, 117.55, 2.72)
pt3dadd(445.19, 4293.57, 117.55, 2.72)
pt3dadd(445.19, 4294.34, 117.55, 2.72)
pt3dadd(444.85, 4294.73, 117.55, 2.72)
pt3dadd(444.51, 4295.11, 117.55, 2.72)
pt3dadd(444.18, 4295.5, 117.55, 2.72)
pt3dadd(444.18, 4296.27, 117.55, 2.72)
pt3dadd(443.84, 4296.66, 117.55, 2.72)
pt3dadd(443.5, 4297.43, 117.55, 2.72)
pt3dadd(443.5, 4299.74, 117.55, 2.72)
pt3dadd(443.16, 4300.13, 117.55, 2.72)
pt3dadd(442.82, 4300.51, 117.55, 2.72)
pt3dadd(436.36, 4300.51, 117.55, 2.72)
pt3dadd(436.36, 4300.9, 117.55, 3.06)
pt3dadd(432.29, 4300.9, 117.55, 3.06)
pt3dadd(431.95, 4301.29, 117.55, 3.06)
pt3dadd(431.61, 4301.67, 117.55, 3.06)
pt3dadd(431.27, 4302.06, 117.55, 3.06)
pt3dadd(431.27, 4302.83, 117.55, 3.06)
pt3dadd(430.93, 4303.21, 117.55, 3.06)
pt3dadd(430.59, 4303.6, 117.55, 3.06)
pt3dadd(430.59, 4304.76, 117.55, 3.06)
pt3dadd(430.25, 4305.14, 117.55, 3.06)
pt3dadd(430.25, 4306.3, 117.55, 3.06)
pt3dadd(429.91, 4306.69, 117.55, 3.06)
pt3dadd(429.57, 4307.07, 117.55, 3.06)
pt3dadd(429.23, 4307.46, 117.55, 3.06)
pt3dadd(428.89, 4307.84, 117.55, 3.06)
pt3dadd(428.21, 4307.84, 117.55, 3.06)
pt3dadd(427.87, 4308.23, 117.55, 3.06)
pt3dadd(427.19, 4307.84, 117.55, 3.06)
pt3dadd(426.85, 4307.46, 117.55, 3.06)
pt3dadd(426.51, 4307.07, 117.55, 3.06)
pt3dadd(425.83, 4307.07, 117.55, 3.06)
pt3dadd(425.49, 4306.69, 117.55, 3.06)
pt3dadd(422.1, 4306.69, 117.55, 3.06)
pt3dadd(422.44, 4306.3, 117.55, 2.04)
pt3dadd(421.76, 4306.3, 117.55, 2.04)
pt3dadd(421.42, 4306.69, 117.55, 2.04)
pt3dadd(421.08, 4307.07, 117.55, 2.04)
pt3dadd(420.74, 4307.84, 117.55, 2.04)
pt3dadd(420.4, 4308.23, 117.55, 2.04)
pt3dadd(420.06, 4308.62, 117.55, 2.04)
pt3dadd(419.72, 4309, 117.55, 2.04)
pt3dadd(419.72, 4309.77, 117.55, 2.04)
pt3dadd(419.38, 4310.16, 117.55, 2.04)
pt3dadd(419.04, 4310.54, 117.55, 2.04)
pt3dadd(409.87, 4310.54, 117.55, 2.04)
pt3dadd(409.87, 4309.77, 117.55, 2.04)
pt3dadd(409.53, 4309.39, 117.55, 2.04)
pt3dadd(409.19, 4309.77, 117.55, 2.04)
pt3dadd(409.19, 4312.09, 117.55, 2.04)
pt3dadd(408.85, 4312.47, 117.55, 2.04)
pt3dadd(408.85, 4313.25, 117.55, 2.04)
pt3dadd(408.51, 4313.63, 117.55, 2.04)
pt3dadd(408.51, 4314.4, 117.55, 2.04)
pt3dadd(408.17, 4314.79, 117.55, 2.04)
pt3dadd(407.83, 4315.17, 117.55, 2.04)
pt3dadd(407.49, 4315.56, 117.55, 2.04)
pt3dadd(407.49, 4316.33, 117.55, 2.04)
pt3dadd(407.15, 4316.72, 117.55, 2.04)
pt3dadd(406.81, 4317.1, 117.55, 2.04)
pt3dadd(406.13, 4317.1, 117.55, 2.04)
pt3dadd(405.79, 4317.49, 117.55, 2.04)
pt3dadd(399.68, 4317.49, 117.55, 2.04)
pt3dadd(400.7, 4317.49, 117.55, 2.72)
pt3dadd(392.88, 4317.49, 117.55, 2.72)
pt3dadd(392.54, 4317.1, 117.55, 2.72)
pt3dadd(391.87, 4316.72, 117.55, 2.72)
pt3dadd(391.19, 4316.72, 117.55, 2.72)
pt3dadd(390.85, 4316.33, 117.55, 2.72)
pt3dadd(390.17, 4316.33, 117.55, 2.72)
pt3dadd(389.83, 4315.95, 117.55, 2.72)
pt3dadd(389.15, 4315.95, 117.55, 2.72)
pt3dadd(388.81, 4315.56, 117.55, 2.72)
pt3dadd(388.13, 4315.56, 117.55, 2.72)
pt3dadd(387.79, 4315.17, 117.55, 2.72)
pt3dadd(386.77, 4315.17, 117.55, 2.72)
pt3dadd(386.09, 4314.79, 117.55, 2.72)
pt3dadd(385.75, 4314.4, 117.55, 2.72)
pt3dadd(385.07, 4314.02, 117.55, 2.72)
pt3dadd(384.73, 4313.63, 117.55, 2.72)
pt3dadd(384.05, 4313.63, 117.55, 2.72)
pt3dadd(383.71, 4313.25, 117.55, 2.72)
pt3dadd(383.37, 4312.86, 117.55, 2.72)
pt3dadd(383.03, 4312.47, 117.55, 2.72)
pt3dadd(382.69, 4312.09, 117.55, 2.72)
pt3dadd(382.01, 4312.09, 117.55, 2.72)
pt3dadd(381.68, 4311.7, 117.55, 2.72)
pt3dadd(381.34, 4311.32, 117.55, 2.72)
pt3dadd(380.66, 4311.32, 117.55, 2.72)
pt3dadd(380.32, 4310.93, 117.55, 2.72)
pt3dadd(379.98, 4310.54, 117.55, 2.72)
pt3dadd(378.96, 4310.54, 117.55, 2.72)
pt3dadd(378.62, 4310.16, 117.55, 2.72)
pt3dadd(378.28, 4309.77, 117.55, 2.72)
pt3dadd(377.6, 4309.77, 117.55, 2.72)
pt3dadd(377.26, 4309.39, 117.55, 2.72)
pt3dadd(376.92, 4309, 117.55, 2.72)
pt3dadd(376.24, 4309, 117.55, 2.72)
pt3dadd(375.9, 4308.62, 117.55, 2.72)
pt3dadd(375.22, 4308.23, 117.55, 2.72)
pt3dadd(372.5, 4308.23, 117.55, 2.72)
pt3dadd(372.16, 4308.62, 117.55, 2.72)
pt3dadd(371.82, 4309, 117.55, 2.72)
pt3dadd(371.15, 4309, 117.55, 2.72)
pt3dadd(370.81, 4309.39, 117.55, 2.72)
pt3dadd(370.47, 4309.77, 117.55, 2.72)
pt3dadd(370.13, 4310.16, 117.55, 2.72)
pt3dadd(370.13, 4308.62, 117.55, 2.72)
pt3dadd(369.79, 4308.23, 117.55, 2.72)
pt3dadd(369.45, 4307.84, 117.55, 2.72)
pt3dadd(368.77, 4307.46, 117.55, 2.72)
pt3dadd(368.09, 4307.07, 117.55, 2.72)
pt3dadd(367.75, 4306.69, 117.55, 2.72)
pt3dadd(367.07, 4306.69, 117.55, 2.72)
pt3dadd(366.39, 4306.3, 117.55, 2.72)
pt3dadd(366.05, 4305.92, 117.55, 2.72)
pt3dadd(365.71, 4305.53, 117.55, 2.72)
pt3dadd(365.37, 4305.14, 117.55, 2.72)
pt3dadd(363.33, 4305.14, 117.55, 2.72)
pt3dadd(362.99, 4305.14, 117.55, 2.72)
pt3dadd(362.31, 4304.76, 117.55, 2.72)
pt3dadd(361.97, 4304.37, 117.55, 2.72)
pt3dadd(361.29, 4303.6, 117.55, 2.72)
pt3dadd(360.28, 4303.6, 117.55, 2.72)
pt3dadd(359.94, 4303.21, 117.55, 2.72)
pt3dadd(357.22, 4303.21, 117.55, 2.72)
pt3dadd(356.54, 4302.44, 117.55, 2.72)
pt3dadd(356.2, 4302.06, 117.55, 2.72)
pt3dadd(355.52, 4302.06, 117.55, 2.72)
pt3dadd(355.18, 4301.67, 117.55, 2.72)
pt3dadd(354.84, 4301.29, 117.55, 2.72)
pt3dadd(354.16, 4300.9, 117.55, 2.72)
pt3dadd(353.82, 4300.51, 117.55, 2.72)
pt3dadd(353.48, 4300.13, 117.55, 2.72)
pt3dadd(353.14, 4299.74, 117.55, 2.72)
pt3dadd(352.46, 4299.74, 117.55, 2.72)
pt3dadd(352.12, 4299.36, 117.55, 2.72)
pt3dadd(351.44, 4298.97, 117.55, 2.72)
pt3dadd(350.09, 4298.97, 117.55, 2.72)
pt3dadd(349.41, 4298.58, 117.55, 2.72)
pt3dadd(349.07, 4298.2, 117.55, 2.72)
pt3dadd(348.05, 4298.2, 117.55, 2.72)
}
}
proc shape3d_97() {
dend[65] { pt3dadd(347.37, 4297.81, 117.55, 2.72)
pt3dadd(346.69, 4297.43, 117.55, 2.72)
pt3dadd(346.01, 4297.43, 117.55, 2.72)
pt3dadd(345.33, 4297.04, 117.55, 2.72)
pt3dadd(344.31, 4297.04, 117.55, 2.72)
pt3dadd(343.63, 4296.66, 117.55, 2.72)
pt3dadd(343.29, 4296.27, 117.55, 2.72)
pt3dadd(341.59, 4296.27, 117.55, 2.72)
pt3dadd(341.25, 4295.88, 117.55, 2.72)
pt3dadd(340.23, 4295.88, 117.55, 2.72)
pt3dadd(341.25, 4295.88, 117.55, 2.38)
pt3dadd(334.12, 4295.88, 117.55, 2.38)
pt3dadd(333.78, 4296.27, 117.55, 2.38)
pt3dadd(333.44, 4296.66, 117.55, 2.38)
pt3dadd(332.42, 4296.66, 117.55, 2.38)
pt3dadd(331.74, 4296.27, 117.55, 2.38)
pt3dadd(331.06, 4295.88, 117.55, 2.38)
pt3dadd(330.72, 4295.5, 117.55, 2.38)
pt3dadd(330.38, 4295.11, 117.55, 2.38)
pt3dadd(330.04, 4294.73, 117.55, 2.38)
pt3dadd(329.7, 4294.34, 117.55, 2.38)
pt3dadd(329.37, 4293.96, 117.55, 2.38)
pt3dadd(329.03, 4293.57, 117.55, 2.38)
pt3dadd(328.69, 4293.18, 117.55, 2.38)
pt3dadd(328.35, 4292.8, 117.55, 2.38)
pt3dadd(328.01, 4292.41, 117.55, 2.38)
pt3dadd(327.67, 4292.03, 117.55, 2.38)
pt3dadd(327.33, 4291.64, 117.55, 2.38)
pt3dadd(326.65, 4290.87, 117.55, 2.38)
pt3dadd(326.31, 4290.48, 117.55, 2.38)
pt3dadd(325.97, 4290.1, 117.55, 2.38)
pt3dadd(325.63, 4289.71, 117.55, 2.38)
pt3dadd(324.95, 4289.33, 117.55, 2.38)
pt3dadd(324.61, 4288.94, 117.55, 2.38)
pt3dadd(324.27, 4288.55, 117.55, 2.38)
pt3dadd(323.93, 4288.17, 117.55, 2.38)
pt3dadd(323.59, 4287.78, 117.55, 2.38)
pt3dadd(323.25, 4287.4, 117.55, 2.38)
pt3dadd(322.91, 4287.01, 117.55, 2.38)
pt3dadd(322.57, 4286.63, 117.55, 2.38)
pt3dadd(322.23, 4286.24, 117.55, 2.38)
pt3dadd(321.89, 4285.47, 117.55, 2.38)
pt3dadd(321.21, 4285.47, 117.55, 2.38)
pt3dadd(320.87, 4285.08, 117.55, 2.38)
pt3dadd(320.53, 4284.7, 117.55, 2.38)
pt3dadd(320.19, 4284.31, 117.55, 2.38)
pt3dadd(319.85, 4283.54, 117.55, 2.38)
pt3dadd(319.17, 4283.15, 117.55, 2.38)
pt3dadd(318.84, 4282.77, 117.55, 2.38)
pt3dadd(318.5, 4282.38, 117.55, 2.38)
pt3dadd(317.48, 4282.38, 117.55, 2.38)
pt3dadd(317.14, 4282, 117.55, 2.38)
pt3dadd(316.12, 4282, 117.55, 2.38)
pt3dadd(315.78, 4281.61, 117.55, 2.38)
pt3dadd(314.42, 4281.61, 117.55, 2.38)
pt3dadd(313.74, 4281.22, 117.55, 2.38)
pt3dadd(313.4, 4280.84, 117.55, 2.38)
pt3dadd(312.38, 4280.84, 117.55, 2.38)
pt3dadd(314.42, 4280.07, 117.55, 2.38)
pt3dadd(314.08, 4280.84, 117.55, 2.38)
pt3dadd(313.4, 4281.22, 117.55, 2.38)
pt3dadd(313.06, 4281.61, 117.55, 2.38)
pt3dadd(312.72, 4282, 117.55, 2.38)
pt3dadd(312.38, 4282.38, 117.55, 2.38)
pt3dadd(311.7, 4282.38, 117.55, 2.38)
pt3dadd(311.36, 4282.77, 117.55, 2.38)
pt3dadd(311.02, 4283.54, 117.55, 2.38)
pt3dadd(310.68, 4283.92, 117.55, 2.38)
pt3dadd(310.34, 4284.31, 117.55, 2.38)
pt3dadd(310, 4284.7, 117.55, 2.38)
pt3dadd(309.32, 4284.7, 117.55, 2.38)
pt3dadd(308.98, 4285.08, 117.55, 2.38)
pt3dadd(307.29, 4285.08, 117.55, 2.38)
pt3dadd(306.61, 4284.7, 117.55, 2.38)
pt3dadd(306.27, 4284.31, 117.55, 2.38)
pt3dadd(305.93, 4283.92, 117.55, 2.38)
pt3dadd(304.91, 4283.92, 117.55, 2.38)
pt3dadd(304.57, 4283.54, 117.55, 2.38)
pt3dadd(303.89, 4283.15, 117.55, 2.38)
pt3dadd(303.21, 4282.77, 117.55, 2.38)
pt3dadd(302.87, 4282.38, 117.55, 2.38)
pt3dadd(302.19, 4282.38, 117.55, 2.38)
pt3dadd(301.85, 4282, 117.55, 2.38)
pt3dadd(300.83, 4282, 117.55, 2.38)
pt3dadd(300.15, 4281.61, 117.55, 2.38)
pt3dadd(298.79, 4281.61, 117.55, 2.38)
}
dend[66] {pt3dclear()
pt3dadd(725.24, 2852.59, 117.55, 4.08)
pt3dadd(736.11, 2863.97, 117.55, 4.08)
pt3dadd(736.79, 2871.5, 117.55, 4.08)
pt3dadd(734.08, 2883.65, 117.55, 4.08)
pt3dadd(733.06, 2890.79, 117.55, 3.74)
pt3dadd(734.42, 2898.7, 117.55, 3.74)
pt3dadd(738.15, 2907.38, 117.55, 3.4)
pt3dadd(741.89, 2919.92, 117.55, 3.4)
pt3dadd(742.91, 2929.37, 117.55, 3.4)
pt3dadd(739.85, 2933.42, 117.55, 3.4)
pt3dadd(738.15, 2935.15, 117.55, 3.4)
}
dend[67] {pt3dclear()
pt3dadd(856.66, 2567.13, 117.55, 6.11)
pt3dadd(854.45, 2570.18, 117.55, 6.11)
pt3dadd(854.79, 2570.56, 117.55, 6.11)
pt3dadd(855.13, 2571.34, 117.55, 6.11)
pt3dadd(855.13, 2573.27, 117.55, 6.11)
pt3dadd(855.47, 2573.65, 117.55, 6.11)
pt3dadd(855.81, 2574.04, 117.55, 6.11)
pt3dadd(855.81, 2574.81, 117.55, 6.11)
pt3dadd(856.15, 2575.19, 117.55, 6.11)
pt3dadd(856.15, 2575.97, 117.55, 6.11)
pt3dadd(856.49, 2576.35, 117.55, 6.11)
pt3dadd(856.83, 2577.12, 117.55, 6.11)
pt3dadd(857.17, 2577.51, 117.55, 6.11)
pt3dadd(857.51, 2577.9, 117.55, 6.11)
pt3dadd(857.85, 2579.05, 117.55, 6.11)
pt3dadd(858.19, 2579.44, 117.55, 6.11)
pt3dadd(858.53, 2579.82, 117.55, 6.11)
pt3dadd(858.53, 2580.6, 117.55, 6.11)
pt3dadd(858.86, 2580.98, 117.55, 6.11)
pt3dadd(859.2, 2581.37, 117.55, 6.11)
pt3dadd(859.2, 2582.14, 117.55, 6.11)
pt3dadd(859.54, 2582.52, 117.55, 6.11)
pt3dadd(859.54, 2583.68, 117.55, 6.11)
pt3dadd(859.88, 2584.45, 117.55, 6.11)
pt3dadd(859.88, 2585.61, 117.55, 6.11)
pt3dadd(860.22, 2586.38, 117.55, 6.11)
pt3dadd(860.22, 2587.93, 117.55, 6.11)
pt3dadd(860.56, 2588.7, 117.55, 6.11)
pt3dadd(860.9, 2589.08, 117.55, 6.11)
pt3dadd(860.9, 2590.63, 117.55, 6.11)
pt3dadd(861.24, 2591.01, 117.55, 6.11)
pt3dadd(861.24, 2592.94, 117.55, 6.11)
pt3dadd(861.58, 2593.33, 117.55, 6.11)
pt3dadd(861.58, 2594.1, 117.55, 6.11)
pt3dadd(861.92, 2594.87, 117.55, 6.11)
pt3dadd(862.26, 2595.64, 117.55, 6.11)
pt3dadd(862.26, 2596.41, 117.55, 6.11)
pt3dadd(862.6, 2596.8, 117.55, 6.11)
pt3dadd(862.6, 2597.96, 117.55, 6.11)
pt3dadd(862.94, 2598.73, 117.55, 6.11)
pt3dadd(862.94, 2601.04, 117.55, 6.11)
pt3dadd(863.28, 2601.43, 117.55, 6.11)
pt3dadd(863.28, 2604.13, 117.55, 6.11)
pt3dadd(863.62, 2604.52, 117.55, 6.11)
pt3dadd(863.62, 2606.06, 117.55, 6.11)
pt3dadd(863.96, 2606.44, 117.55, 6.11)
pt3dadd(863.96, 2608.37, 117.55, 6.11)
pt3dadd(864.3, 2608.76, 117.55, 6.11)
pt3dadd(864.3, 2611.07, 117.55, 6.11)
pt3dadd(864.64, 2611.46, 117.55, 6.11)
pt3dadd(864.64, 2614.16, 117.55, 6.11)
pt3dadd(864.98, 2614.93, 117.55, 6.11)
pt3dadd(864.98, 2616.86, 117.55, 6.11)
pt3dadd(865.32, 2617.25, 117.55, 6.11)
pt3dadd(865.32, 2619.18, 117.55, 6.11)
pt3dadd(865.66, 2619.56, 117.55, 6.11)
pt3dadd(865.66, 2620.33, 117.55, 6.11)
pt3dadd(866, 2621.1, 117.55, 6.11)
pt3dadd(866.34, 2621.49, 117.55, 6.11)
pt3dadd(866.34, 2623.42, 117.55, 6.11)
pt3dadd(866.68, 2623.81, 117.55, 6.11)
pt3dadd(866.68, 2626.12, 117.55, 6.11)
pt3dadd(867.02, 2626.51, 117.55, 6.11)
pt3dadd(868.21, 2626.54, 117.55, 6.11)
}
dend[68] {pt3dclear()
pt3dadd(868.21, 2626.54, 117.55, 6.11)
pt3dadd(867.02, 2628.44, 117.55, 6.11)
pt3dadd(867.36, 2629.21, 117.55, 6.11)
pt3dadd(867.7, 2629.59, 117.55, 6.11)
pt3dadd(867.7, 2642.32, 117.55, 6.11)
pt3dadd(868.04, 2642.71, 117.55, 6.11)
pt3dadd(868.04, 2643.87, 117.55, 6.11)
pt3dadd(868.38, 2644.25, 117.55, 6.11)
pt3dadd(868.72, 2644.64, 117.55, 6.11)
pt3dadd(869.06, 2645.02, 117.55, 6.11)
pt3dadd(869.06, 2645.8, 117.55, 6.11)
pt3dadd(869.39, 2646.57, 117.55, 6.11)
pt3dadd(869.73, 2647.34, 117.55, 6.11)
pt3dadd(870.07, 2647.73, 117.55, 6.11)
pt3dadd(870.07, 2648.5, 117.55, 6.11)
pt3dadd(870.41, 2648.88, 117.55, 6.11)
pt3dadd(870.75, 2649.65, 117.55, 6.11)
pt3dadd(871.09, 2650.43, 117.55, 6.11)
pt3dadd(871.43, 2650.81, 117.55, 6.11)
pt3dadd(871.77, 2651.58, 117.55, 6.11)
pt3dadd(871.77, 2653.51, 117.55, 6.11)
pt3dadd(872.79, 2656.21, 117.55, 6.11)
pt3dadd(873.13, 2656.6, 117.55, 6.11)
pt3dadd(873.47, 2656.98, 117.55, 6.11)
pt3dadd(873.81, 2657.37, 117.55, 6.11)
pt3dadd(873.81, 2664.31, 117.55, 6.11)
pt3dadd(873.47, 2664.7, 117.55, 6.11)
pt3dadd(873.47, 2668.56, 117.55, 6.11)
pt3dadd(873.13, 2669.33, 117.55, 6.11)
pt3dadd(872.79, 2669.72, 117.55, 6.11)
pt3dadd(872.79, 2677.05, 117.55, 6.11)
pt3dadd(873.13, 2677.43, 117.55, 6.11)
pt3dadd(873.13, 2678.59, 117.55, 6.11)
pt3dadd(873.47, 2678.98, 117.55, 6.11)
pt3dadd(873.81, 2679.75, 117.55, 6.11)
pt3dadd(873.81, 2680.52, 117.55, 6.11)
pt3dadd(874.15, 2680.9, 117.55, 6.11)
pt3dadd(874.49, 2681.29, 117.55, 6.11)
pt3dadd(874.49, 2682.06, 117.55, 6.11)
}
}
proc shape3d_98() {
dend[68] { pt3dadd(874.83, 2682.45, 117.55, 6.11)
pt3dadd(874.83, 2683.22, 117.55, 6.11)
pt3dadd(875.17, 2683.6, 117.55, 6.11)
pt3dadd(875.17, 2684.38, 117.55, 6.11)
pt3dadd(875.51, 2684.76, 117.55, 6.11)
pt3dadd(875.51, 2685.53, 117.55, 6.11)
pt3dadd(875.85, 2685.92, 117.55, 6.11)
pt3dadd(876.19, 2686.31, 117.55, 6.11)
pt3dadd(876.19, 2688.23, 117.55, 6.11)
pt3dadd(876.53, 2689.01, 117.55, 6.11)
pt3dadd(876.53, 2700.97, 117.55, 6.11)
pt3dadd(876.87, 2701.35, 117.55, 6.11)
pt3dadd(876.87, 2702.9, 117.55, 6.11)
pt3dadd(877.21, 2703.67, 117.55, 6.11)
pt3dadd(877.21, 2704.44, 117.55, 6.11)
pt3dadd(877.55, 2704.82, 117.55, 6.11)
pt3dadd(877.89, 2705.21, 117.55, 6.11)
pt3dadd(877.89, 2705.98, 117.55, 6.11)
pt3dadd(878.23, 2706.37, 117.55, 6.11)
pt3dadd(878.57, 2706.75, 117.55, 6.11)
pt3dadd(878.57, 2707.52, 117.55, 6.11)
pt3dadd(878.91, 2708.3, 117.55, 6.11)
pt3dadd(878.91, 2711.77, 117.55, 6.11)
pt3dadd(879.25, 2712.15, 117.55, 6.11)
pt3dadd(879.25, 2715.24, 117.55, 6.11)
pt3dadd(879.58, 2715.63, 117.55, 6.11)
pt3dadd(879.58, 2717.94, 117.55, 6.11)
pt3dadd(879.92, 2718.33, 117.55, 6.11)
pt3dadd(879.92, 2719.87, 117.55, 6.11)
pt3dadd(880.26, 2720.26, 117.55, 6.11)
pt3dadd(880.26, 2721.41, 117.55, 6.11)
pt3dadd(880.6, 2721.8, 117.55, 6.11)
pt3dadd(880.94, 2722.19, 117.55, 6.11)
pt3dadd(880.94, 2722.96, 117.55, 6.11)
pt3dadd(881.28, 2723.34, 117.55, 6.11)
pt3dadd(881.28, 2725.27, 117.55, 6.11)
pt3dadd(881.62, 2725.66, 117.55, 6.11)
pt3dadd(881.96, 2726.04, 117.55, 6.11)
pt3dadd(881.96, 2726.81, 117.55, 6.11)
pt3dadd(882.3, 2727.59, 117.55, 6.11)
pt3dadd(882.64, 2728.36, 117.55, 6.11)
pt3dadd(882.98, 2728.74, 117.55, 6.11)
pt3dadd(882.98, 2729.9, 117.55, 6.11)
pt3dadd(883.32, 2730.67, 117.55, 6.11)
pt3dadd(883.66, 2731.06, 117.55, 6.11)
pt3dadd(883.66, 2732.22, 117.55, 6.11)
pt3dadd(884, 2732.99, 117.55, 6.11)
pt3dadd(884.34, 2733.76, 117.55, 6.11)
pt3dadd(884.34, 2734.53, 117.55, 6.11)
pt3dadd(884.68, 2735.3, 117.55, 6.11)
pt3dadd(885.02, 2735.69, 117.55, 6.11)
pt3dadd(885.02, 2736.46, 117.55, 6.11)
pt3dadd(885.36, 2736.85, 117.55, 6.11)
pt3dadd(885.7, 2737.23, 117.55, 6.11)
pt3dadd(885.7, 2741.09, 117.55, 6.11)
pt3dadd(886.04, 2741.86, 117.55, 6.11)
pt3dadd(886.04, 2743.4, 117.55, 6.11)
pt3dadd(886.38, 2744.18, 117.55, 6.11)
pt3dadd(886.38, 2744.95, 117.55, 6.11)
pt3dadd(886.72, 2745.33, 117.55, 6.11)
pt3dadd(886.72, 2748.03, 117.55, 6.11)
pt3dadd(887.06, 2748.81, 117.55, 6.11)
pt3dadd(887.4, 2749.96, 117.55, 6.11)
pt3dadd(887.74, 2750.73, 117.55, 6.11)
pt3dadd(888.08, 2751.12, 117.55, 6.11)
pt3dadd(888.42, 2751.51, 117.55, 6.11)
pt3dadd(888.42, 2752.66, 117.55, 6.11)
pt3dadd(888.76, 2753.44, 117.55, 6.11)
pt3dadd(888.76, 2754.59, 117.55, 6.11)
pt3dadd(889.1, 2755.36, 117.55, 6.11)
pt3dadd(889.1, 2756.14, 117.55, 6.11)
pt3dadd(889.44, 2756.91, 117.55, 6.11)
pt3dadd(889.44, 2758.06, 117.55, 6.11)
pt3dadd(889.78, 2758.45, 117.55, 6.11)
pt3dadd(889.78, 2759.61, 117.55, 6.11)
pt3dadd(890.11, 2760.38, 117.55, 6.11)
pt3dadd(890.45, 2760.77, 117.55, 6.11)
pt3dadd(890.45, 2761.54, 117.55, 6.11)
pt3dadd(890.79, 2761.92, 117.55, 6.11)
pt3dadd(890.79, 2763.47, 117.55, 6.11)
pt3dadd(891.13, 2763.85, 117.55, 6.11)
pt3dadd(891.13, 2765.4, 117.55, 6.11)
pt3dadd(891.47, 2765.78, 117.55, 6.11)
pt3dadd(891.47, 2767.32, 117.55, 6.11)
pt3dadd(891.81, 2768.1, 117.55, 6.11)
pt3dadd(891.81, 2772.34, 117.55, 6.11)
pt3dadd(892.15, 2772.34, 117.55, 4.76)
pt3dadd(892.49, 2772.73, 117.55, 4.76)
pt3dadd(892.83, 2773.11, 117.55, 4.76)
pt3dadd(893.17, 2773.88, 117.55, 4.76)
pt3dadd(893.51, 2774.27, 117.55, 4.76)
pt3dadd(893.85, 2774.65, 117.55, 4.76)
pt3dadd(894.19, 2775.04, 117.55, 4.76)
pt3dadd(894.53, 2775.43, 117.55, 4.76)
pt3dadd(894.53, 2776.2, 117.55, 4.76)
pt3dadd(894.87, 2776.58, 117.55, 4.76)
pt3dadd(895.21, 2776.97, 117.55, 4.76)
pt3dadd(895.55, 2777.35, 117.55, 4.76)
pt3dadd(895.89, 2777.74, 117.55, 4.76)
pt3dadd(896.23, 2778.13, 117.55, 4.76)
pt3dadd(896.57, 2778.51, 117.55, 4.76)
pt3dadd(896.57, 2780.44, 117.55, 4.76)
pt3dadd(896.91, 2781.21, 117.55, 4.76)
pt3dadd(897.25, 2781.6, 117.55, 4.76)
pt3dadd(897.25, 2783.53, 117.55, 4.76)
pt3dadd(898.61, 2785.46, 117.55, 6.11)
pt3dadd(898.61, 2788.54, 117.55, 5.77)
pt3dadd(898.61, 2788.93, 117.55, 5.77)
pt3dadd(898.95, 2789.31, 117.55, 5.77)
pt3dadd(898.95, 2790.47, 117.55, 5.77)
pt3dadd(899.29, 2791.24, 117.55, 5.77)
pt3dadd(899.29, 2792.4, 117.55, 5.77)
pt3dadd(899.63, 2792.79, 117.55, 5.77)
pt3dadd(899.63, 2794.33, 117.55, 5.77)
pt3dadd(899.97, 2794.72, 117.55, 5.77)
pt3dadd(899.97, 2795.87, 117.55, 5.77)
pt3dadd(900.31, 2796.65, 117.55, 5.77)
pt3dadd(900.64, 2797.42, 117.55, 5.77)
pt3dadd(900.64, 2798.19, 117.55, 5.77)
pt3dadd(900.98, 2798.57, 117.55, 5.77)
pt3dadd(900.98, 2799.35, 117.55, 5.77)
pt3dadd(901.32, 2800.12, 117.55, 5.77)
pt3dadd(901.66, 2800.5, 117.55, 5.77)
pt3dadd(901.66, 2802.43, 117.55, 5.77)
pt3dadd(902, 2802.82, 117.55, 5.77)
pt3dadd(902, 2804.36, 117.55, 5.77)
pt3dadd(902.34, 2804.75, 117.55, 5.77)
pt3dadd(902.34, 2806.68, 117.55, 5.77)
pt3dadd(902.68, 2807.06, 117.55, 5.77)
pt3dadd(902.68, 2808.6, 117.55, 5.77)
pt3dadd(903.02, 2808.99, 117.55, 5.77)
pt3dadd(903.02, 2810.53, 117.55, 5.77)
pt3dadd(903.36, 2810.92, 117.55, 5.77)
pt3dadd(903.36, 2811.69, 117.55, 5.77)
pt3dadd(903.7, 2812.08, 117.55, 5.77)
pt3dadd(903.7, 2812.85, 117.55, 5.77)
pt3dadd(904.04, 2813.23, 117.55, 5.77)
pt3dadd(904.04, 2815.16, 117.55, 5.77)
pt3dadd(904.38, 2815.55, 117.55, 5.77)
pt3dadd(904.38, 2820.18, 117.55, 5.77)
pt3dadd(904.72, 2820.56, 117.55, 5.77)
pt3dadd(904.72, 2822.49, 117.55, 5.77)
pt3dadd(905.06, 2822.88, 117.55, 5.77)
pt3dadd(905.4, 2823.65, 117.55, 5.77)
pt3dadd(905.74, 2824.42, 117.55, 5.77)
pt3dadd(906.08, 2824.81, 117.55, 5.77)
pt3dadd(906.42, 2825.19, 117.55, 5.77)
pt3dadd(906.76, 2825.58, 117.55, 5.77)
pt3dadd(907.1, 2825.97, 117.55, 5.77)
pt3dadd(907.1, 2826.74, 117.55, 5.77)
pt3dadd(907.44, 2827.12, 117.55, 5.77)
pt3dadd(907.78, 2827.51, 117.55, 5.77)
pt3dadd(907.78, 2829.44, 117.55, 5.77)
pt3dadd(908.12, 2829.82, 117.55, 5.77)
pt3dadd(908.12, 2831.37, 117.55, 5.77)
pt3dadd(908.46, 2831.75, 117.55, 5.77)
pt3dadd(908.46, 2832.52, 117.55, 5.77)
pt3dadd(908.8, 2832.91, 117.55, 5.77)
pt3dadd(908.8, 2834.45, 117.55, 5.77)
pt3dadd(909.14, 2834.84, 117.55, 5.77)
pt3dadd(909.14, 2836.77, 117.55, 5.77)
pt3dadd(909.48, 2837.54, 117.55, 5.77)
pt3dadd(909.48, 2839.47, 117.55, 5.77)
pt3dadd(909.82, 2839.85, 117.55, 5.77)
pt3dadd(910.16, 2840.24, 117.55, 5.77)
pt3dadd(910.16, 2841.4, 117.55, 5.77)
pt3dadd(910.5, 2841.78, 117.55, 5.77)
pt3dadd(910.83, 2842.56, 117.55, 5.77)
pt3dadd(911.17, 2843.33, 117.55, 5.77)
pt3dadd(911.51, 2843.71, 117.55, 5.77)
pt3dadd(911.51, 2844.48, 117.55, 5.77)
pt3dadd(911.85, 2844.87, 117.55, 5.77)
pt3dadd(912.19, 2845.26, 117.55, 5.77)
pt3dadd(912.19, 2846.03, 117.55, 5.77)
pt3dadd(912.53, 2846.41, 117.55, 5.77)
pt3dadd(912.53, 2847.19, 117.55, 5.77)
pt3dadd(912.87, 2847.57, 117.55, 5.77)
pt3dadd(913.21, 2847.96, 117.55, 5.77)
pt3dadd(913.55, 2848.34, 117.55, 5.77)
pt3dadd(913.89, 2848.73, 117.55, 5.77)
pt3dadd(914.23, 2849.11, 117.55, 5.77)
pt3dadd(914.23, 2849.89, 117.55, 5.77)
pt3dadd(914.57, 2850.66, 117.55, 5.77)
pt3dadd(914.91, 2851.43, 117.55, 5.77)
pt3dadd(915.25, 2851.81, 117.55, 5.77)
pt3dadd(915.25, 2852.59, 117.55, 5.77)
pt3dadd(915.59, 2852.97, 117.55, 5.77)
pt3dadd(915.59, 2854.13, 117.55, 5.77)
pt3dadd(915.93, 2854.9, 117.55, 5.77)
pt3dadd(916.27, 2855.29, 117.55, 5.77)
pt3dadd(916.27, 2856.06, 117.55, 5.77)
pt3dadd(916.61, 2856.44, 117.55, 5.77)
pt3dadd(916.95, 2856.83, 117.55, 5.77)
pt3dadd(917.29, 2857.6, 117.55, 5.77)
pt3dadd(917.29, 2858.37, 117.55, 5.77)
pt3dadd(917.63, 2859.15, 117.55, 5.77)
pt3dadd(918.65, 2857.6, 117.55, 4.76)
pt3dadd(918.65, 2857.99, 117.55, 4.76)
pt3dadd(918.99, 2858.37, 117.55, 4.76)
pt3dadd(919.33, 2858.76, 117.55, 4.76)
}
}
proc shape3d_99() {
dend[68] { pt3dadd(919.67, 2859.53, 117.55, 4.76)
pt3dadd(919.67, 2860.3, 117.55, 4.76)
pt3dadd(920.35, 2860.69, 117.55, 4.76)
pt3dadd(920.35, 2861.46, 117.55, 4.76)
pt3dadd(920.69, 2861.85, 117.55, 4.76)
pt3dadd(920.69, 2862.62, 117.55, 4.76)
pt3dadd(921.03, 2863, 117.55, 4.76)
pt3dadd(921.36, 2863.39, 117.55, 4.76)
pt3dadd(921.7, 2863.77, 117.55, 4.76)
pt3dadd(922.38, 2864.16, 117.55, 4.76)
pt3dadd(922.38, 2864.93, 117.55, 4.76)
pt3dadd(923.06, 2864.93, 117.55, 4.76)
pt3dadd(923.06, 2865.7, 117.55, 4.76)
pt3dadd(923.4, 2866.09, 117.55, 4.76)
pt3dadd(923.4, 2866.86, 117.55, 4.76)
pt3dadd(923.74, 2867.25, 117.55, 4.76)
pt3dadd(923.74, 2869.18, 117.55, 4.76)
pt3dadd(924.08, 2869.56, 117.55, 4.76)
pt3dadd(924.42, 2869.95, 117.55, 4.76)
pt3dadd(924.76, 2870.33, 117.55, 4.76)
pt3dadd(925.1, 2870.72, 117.55, 4.76)
pt3dadd(925.44, 2871.1, 117.55, 4.76)
pt3dadd(925.78, 2871.49, 117.55, 4.76)
pt3dadd(926.12, 2871.88, 117.55, 4.76)
pt3dadd(926.46, 2872.26, 117.55, 4.76)
pt3dadd(926.46, 2873.03, 117.55, 4.76)
pt3dadd(926.8, 2873.42, 117.55, 4.76)
pt3dadd(927.14, 2874.19, 117.55, 4.76)
pt3dadd(927.48, 2874.58, 117.55, 4.76)
pt3dadd(927.82, 2874.96, 117.55, 4.76)
pt3dadd(927.82, 2875.73, 117.55, 4.76)
pt3dadd(928.16, 2876.51, 117.55, 4.76)
pt3dadd(928.16, 2877.28, 117.55, 4.76)
pt3dadd(928.5, 2877.66, 117.55, 4.76)
pt3dadd(928.84, 2878.05, 117.55, 4.76)
pt3dadd(928.84, 2878.82, 117.55, 4.76)
pt3dadd(929.18, 2879.21, 117.55, 4.76)
pt3dadd(929.52, 2879.59, 117.55, 4.76)
pt3dadd(929.86, 2879.98, 117.55, 4.76)
pt3dadd(930.2, 2880.36, 117.55, 4.76)
pt3dadd(930.54, 2880.75, 117.55, 4.76)
pt3dadd(930.88, 2881.14, 117.55, 4.76)
pt3dadd(931.22, 2881.52, 117.55, 4.76)
pt3dadd(932.91, 2886.15, 117.55, 6.79)
pt3dadd(933.25, 2886.15, 117.55, 6.79)
pt3dadd(933.59, 2886.92, 117.55, 6.79)
pt3dadd(932.91, 2883.45, 117.55, 5.77)
pt3dadd(933.25, 2883.45, 117.55, 5.77)
pt3dadd(933.59, 2883.84, 117.55, 5.77)
pt3dadd(933.93, 2884.61, 117.55, 5.77)
pt3dadd(934.27, 2884.99, 117.55, 5.77)
pt3dadd(934.61, 2885.38, 117.55, 5.77)
pt3dadd(934.95, 2886.15, 117.55, 5.77)
pt3dadd(935.29, 2886.54, 117.55, 5.77)
pt3dadd(935.63, 2886.92, 117.55, 5.77)
pt3dadd(935.97, 2887.31, 117.55, 5.77)
pt3dadd(935.97, 2888.47, 117.55, 5.77)
pt3dadd(936.31, 2888.85, 117.55, 5.77)
pt3dadd(936.65, 2889.24, 117.55, 5.77)
pt3dadd(936.99, 2890.01, 117.55, 5.77)
pt3dadd(937.33, 2890.4, 117.55, 5.77)
pt3dadd(937.33, 2891.17, 117.55, 5.77)
pt3dadd(937.67, 2891.55, 117.55, 5.77)
pt3dadd(938.01, 2892.32, 117.55, 5.77)
pt3dadd(938.35, 2892.71, 117.55, 5.77)
pt3dadd(938.69, 2893.1, 117.55, 5.77)
pt3dadd(939.03, 2893.48, 117.55, 5.77)
pt3dadd(939.37, 2893.87, 117.55, 5.77)
pt3dadd(939.71, 2894.25, 117.55, 5.77)
pt3dadd(940.05, 2894.64, 117.55, 5.77)
pt3dadd(940.39, 2895.02, 117.55, 5.77)
pt3dadd(940.39, 2895.8, 117.55, 5.77)
pt3dadd(941.07, 2895.8, 117.55, 5.77)
pt3dadd(941.07, 2896.57, 117.55, 5.77)
pt3dadd(941.41, 2896.95, 117.55, 5.77)
pt3dadd(942.08, 2897.34, 117.55, 5.77)
pt3dadd(942.42, 2898.11, 117.55, 5.77)
pt3dadd(942.76, 2898.5, 117.55, 5.77)
pt3dadd(943.1, 2898.88, 117.55, 5.77)
pt3dadd(943.44, 2899.27, 117.55, 5.77)
pt3dadd(943.78, 2900.04, 117.55, 5.77)
pt3dadd(944.12, 2900.43, 117.55, 5.77)
pt3dadd(944.46, 2900.81, 117.55, 5.77)
pt3dadd(944.8, 2901.2, 117.55, 5.77)
pt3dadd(945.14, 2901.58, 117.55, 5.77)
pt3dadd(945.48, 2901.97, 117.55, 5.77)
pt3dadd(945.82, 2902.74, 117.55, 5.77)
pt3dadd(946.5, 2903.51, 117.55, 5.77)
pt3dadd(946.84, 2903.9, 117.55, 5.77)
pt3dadd(947.18, 2904.67, 117.55, 5.77)
pt3dadd(947.52, 2905.06, 117.55, 5.77)
pt3dadd(948.2, 2905.44, 117.55, 5.77)
pt3dadd(948.54, 2905.83, 117.55, 5.77)
pt3dadd(948.88, 2906.6, 117.55, 5.77)
pt3dadd(949.22, 2906.98, 117.55, 5.77)
pt3dadd(949.56, 2907.37, 117.55, 5.77)
pt3dadd(949.9, 2907.76, 117.55, 5.77)
pt3dadd(950.24, 2908.14, 117.55, 5.77)
pt3dadd(950.58, 2908.53, 117.55, 5.77)
pt3dadd(950.92, 2908.91, 117.55, 5.77)
pt3dadd(951.26, 2909.69, 117.55, 5.77)
pt3dadd(951.6, 2910.07, 117.55, 5.77)
pt3dadd(951.94, 2910.46, 117.55, 5.77)
pt3dadd(952.61, 2910.84, 117.55, 5.77)
pt3dadd(952.95, 2911.61, 117.55, 5.77)
pt3dadd(953.29, 2912, 117.55, 5.77)
pt3dadd(953.97, 2912.39, 117.55, 5.77)
pt3dadd(954.31, 2912.77, 117.55, 5.77)
pt3dadd(954.65, 2913.16, 117.55, 5.77)
pt3dadd(954.99, 2913.54, 117.55, 5.77)
pt3dadd(955.33, 2913.93, 117.55, 5.77)
pt3dadd(955.67, 2914.31, 117.55, 5.77)
pt3dadd(956.01, 2914.7, 117.55, 5.77)
pt3dadd(956.35, 2915.47, 117.55, 5.77)
pt3dadd(956.69, 2915.86, 117.55, 5.77)
pt3dadd(957.03, 2916.24, 117.55, 5.77)
pt3dadd(957.37, 2917.02, 117.55, 5.77)
pt3dadd(957.37, 2917.79, 117.55, 5.77)
pt3dadd(958.05, 2918.94, 117.55, 5.77)
pt3dadd(958.39, 2919.72, 117.55, 5.77)
pt3dadd(958.73, 2920.49, 117.55, 5.77)
pt3dadd(959.07, 2921.26, 117.55, 5.77)
pt3dadd(959.07, 2922.03, 117.55, 5.77)
pt3dadd(959.41, 2922.42, 117.55, 5.77)
pt3dadd(959.75, 2923.19, 117.55, 5.77)
pt3dadd(960.09, 2923.57, 117.55, 5.77)
pt3dadd(960.43, 2923.96, 117.55, 5.77)
pt3dadd(960.43, 2924.73, 117.55, 5.77)
pt3dadd(960.77, 2925.5, 117.55, 5.77)
pt3dadd(961.11, 2926.27, 117.55, 5.77)
pt3dadd(961.45, 2926.66, 117.55, 5.77)
pt3dadd(961.45, 2927.43, 117.55, 5.77)
pt3dadd(961.79, 2927.82, 117.55, 5.77)
pt3dadd(962.13, 2928.59, 117.55, 5.77)
pt3dadd(962.13, 2929.36, 117.55, 5.77)
pt3dadd(962.47, 2930.13, 117.55, 5.77)
pt3dadd(962.81, 2930.52, 117.55, 5.77)
pt3dadd(963.14, 2930.9, 117.55, 5.77)
pt3dadd(963.48, 2931.29, 117.55, 5.77)
pt3dadd(963.48, 2932.06, 117.55, 5.77)
pt3dadd(964.16, 2932.83, 117.55, 5.77)
pt3dadd(964.5, 2933.22, 117.55, 5.77)
pt3dadd(964.84, 2933.6, 117.55, 5.77)
pt3dadd(965.18, 2933.99, 117.55, 5.77)
pt3dadd(965.52, 2934.38, 117.55, 5.77)
pt3dadd(965.86, 2934.76, 117.55, 5.77)
pt3dadd(966.2, 2935.15, 117.55, 5.77)
pt3dadd(966.54, 2935.53, 117.55, 5.77)
pt3dadd(966.88, 2935.92, 117.55, 5.77)
pt3dadd(967.22, 2936.69, 117.55, 5.77)
pt3dadd(967.56, 2937.08, 117.55, 5.77)
pt3dadd(967.56, 2937.85, 117.55, 5.77)
pt3dadd(967.9, 2938.23, 117.55, 5.77)
pt3dadd(967.9, 2939.01, 117.55, 5.77)
pt3dadd(968.24, 2939.39, 117.55, 5.77)
pt3dadd(968.58, 2940.16, 117.55, 5.77)
pt3dadd(968.58, 2940.94, 117.55, 5.77)
pt3dadd(968.92, 2941.32, 117.55, 5.77)
pt3dadd(969.26, 2942.09, 117.55, 5.77)
pt3dadd(969.6, 2942.48, 117.55, 5.77)
pt3dadd(969.6, 2943.25, 117.55, 5.77)
pt3dadd(969.94, 2944.02, 117.55, 5.77)
pt3dadd(970.28, 2944.41, 117.55, 5.77)
pt3dadd(970.28, 2945.95, 117.55, 5.77)
pt3dadd(970.62, 2946.34, 117.55, 5.77)
pt3dadd(971.3, 2947.11, 117.55, 5.77)
pt3dadd(971.3, 2948.27, 117.55, 5.77)
pt3dadd(971.64, 2948.65, 117.55, 5.77)
pt3dadd(972.66, 2950.58, 117.55, 6.45)
pt3dadd(973, 2950.58, 117.55, 6.45)
pt3dadd(973.33, 2950.97, 117.55, 6.45)
pt3dadd(973.67, 2951.74, 117.55, 6.45)
pt3dadd(974.01, 2952.12, 117.55, 6.45)
pt3dadd(974.69, 2952.51, 117.55, 6.45)
pt3dadd(975.03, 2952.9, 117.55, 6.45)
pt3dadd(975.37, 2953.28, 117.55, 6.45)
pt3dadd(975.71, 2953.67, 117.55, 6.45)
pt3dadd(976.05, 2954.44, 117.55, 6.45)
pt3dadd(976.39, 2954.82, 117.55, 6.45)
pt3dadd(976.39, 2955.6, 117.55, 6.45)
pt3dadd(976.73, 2955.98, 117.55, 6.45)
pt3dadd(977.07, 2956.37, 117.55, 6.45)
pt3dadd(977.07, 2957.52, 117.55, 6.45)
pt3dadd(977.41, 2957.91, 117.55, 6.45)
pt3dadd(977.75, 2958.3, 117.55, 6.45)
pt3dadd(977.75, 2959.45, 117.55, 6.45)
pt3dadd(978.09, 2960.23, 117.55, 6.45)
pt3dadd(978.09, 2961, 117.55, 6.45)
pt3dadd(978.43, 2961.38, 117.55, 6.45)
pt3dadd(978.77, 2961.77, 117.55, 6.45)
pt3dadd(978.77, 2962.54, 117.55, 6.45)
pt3dadd(979.11, 2962.93, 117.55, 6.45)
pt3dadd(979.45, 2963.31, 117.55, 6.45)
pt3dadd(979.45, 2964.47, 117.55, 6.45)
pt3dadd(979.79, 2964.85, 117.55, 6.45)
pt3dadd(980.13, 2965.63, 117.55, 6.45)
pt3dadd(980.13, 2966.4, 117.55, 6.45)
pt3dadd(980.47, 2966.78, 117.55, 6.45)
pt3dadd(980.81, 2967.17, 117.55, 6.45)
pt3dadd(980.81, 2967.94, 117.55, 6.45)
}
}
proc shape3d_100() {
dend[68] { pt3dadd(981.15, 2968.33, 117.55, 6.45)
pt3dadd(981.49, 2968.71, 117.55, 6.45)
pt3dadd(981.49, 2969.48, 117.55, 6.45)
pt3dadd(981.83, 2969.87, 117.55, 6.45)
pt3dadd(982.17, 2970.64, 117.55, 6.45)
pt3dadd(982.51, 2971.03, 117.55, 6.45)
pt3dadd(982.85, 2971.41, 117.55, 6.45)
pt3dadd(983.19, 2972.19, 117.55, 6.45)
pt3dadd(983.53, 2972.96, 117.55, 6.45)
pt3dadd(983.86, 2973.73, 117.55, 6.45)
pt3dadd(984.2, 2974.11, 117.55, 6.45)
pt3dadd(984.54, 2974.5, 117.55, 6.45)
pt3dadd(984.88, 2974.89, 117.55, 6.45)
pt3dadd(985.22, 2975.66, 117.55, 6.45)
pt3dadd(985.56, 2976.04, 117.55, 6.45)
pt3dadd(985.9, 2976.81, 117.55, 6.45)
pt3dadd(986.24, 2977.2, 117.55, 6.45)
pt3dadd(986.24, 2977.97, 117.55, 6.45)
pt3dadd(986.58, 2978.36, 117.55, 6.45)
pt3dadd(986.92, 2978.74, 117.55, 6.45)
pt3dadd(987.26, 2979.13, 117.55, 6.45)
pt3dadd(987.6, 2979.52, 117.55, 6.45)
pt3dadd(987.94, 2979.9, 117.55, 6.45)
pt3dadd(988.28, 2980.29, 117.55, 6.45)
pt3dadd(988.28, 2983.76, 117.55, 6.45)
pt3dadd(988.62, 2984.15, 117.55, 6.45)
pt3dadd(988.62, 2996.49, 117.55, 6.45)
pt3dadd(988.96, 2996.88, 117.55, 6.45)
pt3dadd(988.96, 2998.03, 117.55, 6.45)
pt3dadd(989.3, 2998.42, 117.55, 6.45)
pt3dadd(989.64, 2998.81, 117.55, 6.45)
pt3dadd(989.98, 2999.19, 117.55, 6.45)
pt3dadd(990.32, 2999.58, 117.55, 6.45)
pt3dadd(990.66, 3000.35, 117.55, 6.45)
pt3dadd(991, 3001.12, 117.55, 6.45)
pt3dadd(991.34, 3001.89, 117.55, 6.45)
pt3dadd(991.68, 3002.28, 117.55, 6.45)
pt3dadd(992.02, 3002.66, 117.55, 6.45)
pt3dadd(992.36, 3003.05, 117.55, 6.45)
pt3dadd(992.36, 3004.21, 117.55, 6.45)
pt3dadd(992.7, 3004.59, 117.55, 6.45)
pt3dadd(993.04, 3004.98, 117.55, 6.45)
pt3dadd(993.04, 3005.75, 117.55, 6.45)
pt3dadd(993.38, 3006.14, 117.55, 6.45)
pt3dadd(993.72, 3006.52, 117.55, 6.45)
pt3dadd(993.72, 3007.29, 117.55, 6.45)
pt3dadd(994.06, 3007.68, 117.55, 6.45)
pt3dadd(994.39, 3008.06, 117.55, 6.45)
pt3dadd(994.39, 3008.84, 117.55, 6.45)
pt3dadd(994.73, 3009.22, 117.55, 6.45)
pt3dadd(994.73, 3010.38, 117.55, 6.45)
pt3dadd(995.07, 3010.77, 117.55, 6.45)
pt3dadd(995.07, 3011.54, 117.55, 6.45)
pt3dadd(995.41, 3011.92, 117.55, 6.45)
pt3dadd(995.41, 3013.08, 117.55, 6.45)
pt3dadd(995.75, 3013.47, 117.55, 6.45)
pt3dadd(995.75, 3014.24, 117.55, 6.45)
pt3dadd(996.09, 3015.01, 117.55, 6.45)
pt3dadd(996.09, 3016.17, 117.55, 6.45)
pt3dadd(996.43, 3016.55, 117.55, 6.45)
pt3dadd(996.77, 3016.94, 117.55, 6.45)
pt3dadd(996.77, 3018.1, 117.55, 6.45)
pt3dadd(997.11, 3018.87, 117.55, 6.45)
pt3dadd(997.45, 3019.64, 117.55, 6.45)
pt3dadd(997.45, 3020.41, 117.55, 6.45)
pt3dadd(997.79, 3020.8, 117.55, 6.45)
pt3dadd(997.79, 3021.95, 117.55, 6.45)
pt3dadd(998.13, 3022.34, 117.55, 6.45)
pt3dadd(998.13, 3023.88, 117.55, 6.45)
pt3dadd(998.47, 3024.27, 117.55, 6.45)
pt3dadd(998.47, 3025.81, 117.55, 6.45)
pt3dadd(998.81, 3026.58, 117.55, 6.45)
pt3dadd(998.81, 3027.74, 117.55, 6.45)
pt3dadd(999.15, 3028.13, 117.55, 6.45)
pt3dadd(999.49, 3028.51, 117.55, 6.45)
pt3dadd(999.49, 3030.06, 117.55, 6.45)
pt3dadd(999.83, 3030.44, 117.55, 6.45)
pt3dadd(1000.17, 3030.83, 117.55, 6.45)
pt3dadd(1000.17, 3031.98, 117.55, 6.45)
pt3dadd(1000.51, 3032.76, 117.55, 6.45)
pt3dadd(1000.51, 3033.53, 117.55, 6.45)
pt3dadd(1000.85, 3033.91, 117.55, 6.45)
pt3dadd(1000.85, 3034.69, 117.55, 6.45)
pt3dadd(1001.19, 3035.07, 117.55, 6.45)
pt3dadd(1001.19, 3036.23, 117.55, 6.45)
pt3dadd(1001.53, 3037, 117.55, 6.45)
pt3dadd(1001.53, 3037.77, 117.55, 6.45)
pt3dadd(1001.87, 3038.16, 117.55, 6.45)
pt3dadd(1001.87, 3038.93, 117.55, 6.45)
pt3dadd(1002.21, 3039.31, 117.55, 6.45)
pt3dadd(1002.21, 3041.24, 117.55, 6.45)
pt3dadd(1002.55, 3041.63, 117.55, 6.45)
pt3dadd(1002.55, 3042.79, 117.55, 6.45)
pt3dadd(1002.89, 3043.56, 117.55, 6.45)
pt3dadd(1002.89, 3044.33, 117.55, 6.45)
pt3dadd(1003.23, 3044.72, 117.55, 6.45)
pt3dadd(1003.57, 3045.1, 117.55, 6.45)
pt3dadd(1003.57, 3045.87, 117.55, 6.45)
pt3dadd(1003.91, 3046.26, 117.55, 6.45)
pt3dadd(1003.91, 3047.03, 117.55, 6.45)
pt3dadd(1004.25, 3047.42, 117.55, 6.45)
pt3dadd(1004.25, 3048.96, 117.55, 6.45)
pt3dadd(1004.58, 3049.35, 117.55, 6.45)
pt3dadd(1004.58, 3051.66, 117.55, 6.45)
pt3dadd(1004.92, 3052.05, 117.55, 6.45)
pt3dadd(1004.92, 3053.2, 117.55, 6.45)
pt3dadd(1005.26, 3053.59, 117.55, 6.45)
pt3dadd(1005.26, 3058.6, 117.55, 6.45)
pt3dadd(1005.6, 3058.99, 117.55, 6.45)
pt3dadd(1005.6, 3059.76, 117.55, 6.45)
pt3dadd(1005.94, 3060.15, 117.55, 6.45)
pt3dadd(1005.94, 3062.85, 117.55, 6.45)
pt3dadd(1008.32, 3064.78, 117.55, 6.11)
pt3dadd(1008.32, 3065.16, 117.55, 6.11)
pt3dadd(1008.66, 3065.55, 117.55, 6.11)
pt3dadd(1009, 3065.94, 117.55, 6.11)
pt3dadd(1009, 3067.09, 117.55, 6.11)
pt3dadd(1009.34, 3067.86, 117.55, 6.11)
pt3dadd(1009.34, 3071.34, 117.55, 6.11)
pt3dadd(1009.68, 3071.72, 117.55, 6.11)
pt3dadd(1009.68, 3074.42, 117.55, 6.11)
pt3dadd(1010.02, 3074.81, 117.55, 6.11)
pt3dadd(1010.36, 3075.58, 117.55, 6.11)
pt3dadd(1010.36, 3076.74, 117.55, 6.11)
pt3dadd(1010.7, 3077.12, 117.55, 6.11)
pt3dadd(1011.04, 3077.9, 117.55, 6.11)
pt3dadd(1011.04, 3078.67, 117.55, 6.11)
pt3dadd(1011.38, 3079.05, 117.55, 6.11)
pt3dadd(1011.38, 3079.82, 117.55, 6.11)
pt3dadd(1011.72, 3080.6, 117.55, 6.11)
pt3dadd(1012.06, 3080.98, 117.55, 6.11)
pt3dadd(1012.06, 3081.75, 117.55, 6.11)
pt3dadd(1012.4, 3082.52, 117.55, 6.11)
pt3dadd(1012.74, 3082.91, 117.55, 6.11)
pt3dadd(1013.08, 3083.3, 117.55, 6.11)
pt3dadd(1013.42, 3083.68, 117.55, 6.11)
pt3dadd(1013.76, 3084.45, 117.55, 6.11)
pt3dadd(1014.1, 3084.84, 117.55, 6.11)
pt3dadd(1014.44, 3085.61, 117.55, 6.11)
pt3dadd(1014.78, 3086, 117.55, 6.11)
pt3dadd(1014.78, 3086.77, 117.55, 6.11)
pt3dadd(1015.11, 3087.15, 117.55, 6.11)
pt3dadd(1015.45, 3087.93, 117.55, 6.11)
pt3dadd(1015.79, 3088.31, 117.55, 6.11)
pt3dadd(1015.79, 3089.08, 117.55, 6.11)
pt3dadd(1016.13, 3089.47, 117.55, 6.11)
pt3dadd(1016.13, 3090.24, 117.55, 6.11)
pt3dadd(1016.47, 3090.63, 117.55, 6.11)
pt3dadd(1016.81, 3091.01, 117.55, 6.11)
pt3dadd(1016.81, 3091.78, 117.55, 6.11)
pt3dadd(1017.15, 3092.17, 117.55, 6.11)
pt3dadd(1017.49, 3092.56, 117.55, 6.11)
pt3dadd(1017.49, 3095.26, 117.55, 6.11)
pt3dadd(1017.83, 3095.64, 117.55, 6.11)
pt3dadd(1017.83, 3096.8, 117.55, 6.11)
pt3dadd(1018.17, 3097.19, 117.55, 6.11)
pt3dadd(1018.51, 3098.34, 117.55, 6.11)
pt3dadd(1018.85, 3098.73, 117.55, 6.11)
pt3dadd(1018.85, 3099.5, 117.55, 6.11)
pt3dadd(1019.19, 3099.89, 117.55, 6.11)
pt3dadd(1019.19, 3101.43, 117.55, 6.11)
pt3dadd(1019.87, 3101.43, 117.55, 6.11)
pt3dadd(1019.87, 3102.59, 117.55, 6.11)
pt3dadd(1020.21, 3102.97, 117.55, 6.11)
pt3dadd(1020.55, 3103.36, 117.55, 6.11)
pt3dadd(1020.89, 3103.74, 117.55, 6.11)
pt3dadd(1021.23, 3104.13, 117.55, 6.11)
pt3dadd(1021.23, 3105.29, 117.55, 6.11)
pt3dadd(1021.57, 3105.67, 117.55, 6.11)
pt3dadd(1021.91, 3106.06, 117.55, 6.11)
pt3dadd(1022.25, 3106.44, 117.55, 6.11)
pt3dadd(1022.25, 3107.22, 117.55, 6.11)
pt3dadd(1022.59, 3107.6, 117.55, 6.11)
pt3dadd(1022.93, 3108.37, 117.55, 6.11)
pt3dadd(1023.27, 3108.76, 117.55, 6.11)
pt3dadd(1023.27, 3109.92, 117.55, 6.11)
pt3dadd(1023.61, 3110.69, 117.55, 6.11)
pt3dadd(1023.95, 3111.07, 117.55, 6.11)
pt3dadd(1023.95, 3112.23, 117.55, 6.11)
pt3dadd(1024.29, 3112.62, 117.55, 6.11)
pt3dadd(1024.29, 3113.39, 117.55, 6.11)
pt3dadd(1024.63, 3114.16, 117.55, 6.11)
pt3dadd(1024.63, 3114.93, 117.55, 6.11)
pt3dadd(1024.97, 3115.32, 117.55, 6.11)
pt3dadd(1025.31, 3115.7, 117.55, 6.11)
pt3dadd(1025.31, 3116.48, 117.55, 6.11)
pt3dadd(1025.98, 3116.48, 117.55, 6.11)
pt3dadd(1025.98, 3117.63, 117.55, 6.11)
pt3dadd(1026.32, 3118.02, 117.55, 6.11)
pt3dadd(1026.66, 3118.4, 117.55, 6.11)
pt3dadd(1027, 3118.79, 117.55, 6.11)
pt3dadd(1027, 3119.95, 117.55, 6.11)
pt3dadd(1027.34, 3120.33, 117.55, 6.11)
pt3dadd(1027.68, 3120.72, 117.55, 6.11)
pt3dadd(1027.68, 3121.88, 117.55, 6.11)
pt3dadd(1028.02, 3122.26, 117.55, 6.11)
pt3dadd(1028.36, 3122.65, 117.55, 6.11)
pt3dadd(1028.36, 3123.42, 117.55, 6.11)
pt3dadd(1028.7, 3124.19, 117.55, 6.11)
pt3dadd(1029.04, 3124.58, 117.55, 6.11)
}
}
proc shape3d_101() {
dend[68] { pt3dadd(1029.04, 3126.51, 117.55, 6.11)
pt3dadd(1029.38, 3127.28, 117.55, 6.11)
pt3dadd(1029.72, 3128.44, 117.55, 6.11)
pt3dadd(1030.06, 3129.21, 117.55, 6.11)
pt3dadd(1030.4, 3129.98, 117.55, 6.11)
pt3dadd(1030.74, 3130.36, 117.55, 6.11)
pt3dadd(1031.08, 3130.75, 117.55, 6.11)
pt3dadd(1031.08, 3131.52, 117.55, 6.11)
pt3dadd(1031.42, 3131.91, 117.55, 6.11)
pt3dadd(1031.76, 3132.29, 117.55, 6.11)
pt3dadd(1032.1, 3132.68, 117.55, 6.11)
pt3dadd(1032.44, 3133.06, 117.55, 6.11)
pt3dadd(1033.12, 3133.06, 117.55, 6.11)
pt3dadd(1033.12, 3133.84, 117.55, 6.11)
pt3dadd(1033.8, 3134.61, 117.55, 6.11)
pt3dadd(1034.14, 3134.99, 117.55, 6.11)
pt3dadd(1034.48, 3135.38, 117.55, 6.11)
pt3dadd(1034.82, 3136.15, 117.55, 6.11)
pt3dadd(1035.16, 3136.54, 117.55, 6.11)
pt3dadd(1035.16, 3137.31, 117.55, 6.11)
pt3dadd(1035.5, 3137.69, 117.55, 6.11)
pt3dadd(1035.84, 3138.47, 117.55, 6.11)
pt3dadd(1035.84, 3140.01, 117.55, 6.11)
pt3dadd(1036.17, 3140.78, 117.55, 6.11)
pt3dadd(1036.51, 3141.17, 117.55, 6.11)
pt3dadd(1036.51, 3141.94, 117.55, 6.11)
pt3dadd(1036.85, 3142.32, 117.55, 6.11)
pt3dadd(1037.19, 3142.71, 117.55, 6.11)
pt3dadd(1037.19, 3143.87, 117.55, 6.11)
pt3dadd(1037.53, 3144.25, 117.55, 6.11)
pt3dadd(1037.87, 3143.87, 117.55, 6.11)
pt3dadd(1038.55, 3143.48, 117.55, 6.11)
pt3dadd(1038.89, 3142.71, 117.55, 6.11)
pt3dadd(1039.23, 3142.32, 117.55, 6.11)
pt3dadd(1039.57, 3142.71, 117.55, 6.11)
pt3dadd(1039.23, 3143.1, 117.55, 6.11)
pt3dadd(1038.89, 3143.48, 117.55, 6.11)
pt3dadd(1038.89, 3144.25, 117.55, 6.11)
pt3dadd(1038.55, 3144.64, 117.55, 6.11)
pt3dadd(1038.21, 3145.02, 117.55, 6.11)
pt3dadd(1037.87, 3145.41, 117.55, 6.11)
pt3dadd(1037.87, 3149.27, 117.55, 6.11)
pt3dadd(1038.21, 3151.97, 117.55, 5.43)
pt3dadd(1038.21, 3152.35, 117.55, 5.43)
pt3dadd(1038.55, 3153.13, 117.55, 5.43)
pt3dadd(1038.55, 3154.28, 117.55, 5.43)
pt3dadd(1038.89, 3154.67, 117.55, 5.43)
pt3dadd(1038.89, 3156.6, 117.55, 5.43)
pt3dadd(1039.23, 3156.98, 117.55, 5.43)
pt3dadd(1039.57, 3157.37, 117.55, 5.43)
pt3dadd(1039.57, 3158.14, 117.55, 5.43)
pt3dadd(1039.91, 3158.53, 117.55, 5.43)
pt3dadd(1040.25, 3158.91, 117.55, 5.43)
pt3dadd(1040.25, 3159.69, 117.55, 5.43)
pt3dadd(1040.93, 3159.69, 117.55, 5.43)
pt3dadd(1040.93, 3160.46, 117.55, 5.43)
pt3dadd(1041.27, 3160.84, 117.55, 5.43)
pt3dadd(1041.61, 3161.23, 117.55, 5.43)
pt3dadd(1041.95, 3161.61, 117.55, 5.43)
pt3dadd(1041.95, 3162.39, 117.55, 5.43)
pt3dadd(1042.29, 3162.77, 117.55, 5.43)
pt3dadd(1042.63, 3163.16, 117.55, 5.43)
pt3dadd(1042.97, 3163.54, 117.55, 5.43)
pt3dadd(1042.97, 3164.31, 117.55, 5.43)
pt3dadd(1043.31, 3164.7, 117.55, 5.43)
pt3dadd(1043.65, 3165.09, 117.55, 5.43)
pt3dadd(1043.99, 3165.86, 117.55, 5.43)
pt3dadd(1043.99, 3166.63, 117.55, 5.43)
pt3dadd(1044.33, 3167.02, 117.55, 5.43)
pt3dadd(1044.67, 3167.4, 117.55, 5.43)
pt3dadd(1045.01, 3167.79, 117.55, 5.43)
pt3dadd(1045.01, 3168.56, 117.55, 5.43)
pt3dadd(1045.35, 3168.94, 117.55, 5.43)
pt3dadd(1045.69, 3169.72, 117.55, 5.43)
pt3dadd(1045.69, 3170.87, 117.55, 5.43)
pt3dadd(1046.03, 3171.26, 117.55, 5.43)
pt3dadd(1046.03, 3173.19, 117.55, 5.43)
pt3dadd(1046.37, 3173.57, 117.55, 5.43)
pt3dadd(1046.37, 3174.73, 117.55, 5.43)
pt3dadd(1046.7, 3175.12, 117.55, 5.43)
pt3dadd(1047.04, 3175.89, 117.55, 5.43)
pt3dadd(1047.38, 3176.66, 117.55, 5.43)
pt3dadd(1047.72, 3177.05, 117.55, 5.43)
pt3dadd(1047.72, 3177.82, 117.55, 5.43)
pt3dadd(1048.06, 3178.2, 117.55, 5.43)
pt3dadd(1048.4, 3178.59, 117.55, 5.43)
pt3dadd(1048.74, 3178.98, 117.55, 5.43)
pt3dadd(1048.74, 3179.75, 117.55, 5.43)
pt3dadd(1049.08, 3180.13, 117.55, 5.43)
pt3dadd(1049.42, 3180.9, 117.55, 5.43)
pt3dadd(1049.76, 3181.29, 117.55, 5.43)
pt3dadd(1049.76, 3182.45, 117.55, 5.43)
pt3dadd(1050.1, 3182.83, 117.55, 5.43)
pt3dadd(1050.1, 3184.38, 117.55, 5.43)
pt3dadd(1050.44, 3185.15, 117.55, 5.43)
pt3dadd(1050.78, 3185.92, 117.55, 5.43)
pt3dadd(1050.78, 3187.08, 117.55, 5.43)
pt3dadd(1051.12, 3187.85, 117.55, 5.43)
pt3dadd(1051.46, 3188.23, 117.55, 5.43)
pt3dadd(1051.8, 3189.01, 117.55, 5.43)
pt3dadd(1052.14, 3189.39, 117.55, 5.43)
pt3dadd(1052.48, 3189.78, 117.55, 5.43)
pt3dadd(1052.82, 3190.16, 117.55, 5.43)
pt3dadd(1053.16, 3190.55, 117.55, 5.43)
pt3dadd(1053.5, 3191.32, 117.55, 5.43)
pt3dadd(1054.18, 3191.71, 117.55, 5.43)
pt3dadd(1054.52, 3192.48, 117.55, 5.43)
pt3dadd(1054.86, 3192.86, 117.55, 5.43)
pt3dadd(1054.86, 3193.64, 117.55, 5.43)
pt3dadd(1055.2, 3194.02, 117.55, 5.43)
pt3dadd(1055.54, 3194.41, 117.55, 5.43)
pt3dadd(1055.54, 3195.18, 117.55, 5.43)
pt3dadd(1055.88, 3195.56, 117.55, 5.43)
pt3dadd(1056.22, 3195.95, 117.55, 5.43)
pt3dadd(1056.22, 3196.72, 117.55, 5.43)
pt3dadd(1056.56, 3197.11, 117.55, 5.43)
pt3dadd(1056.89, 3197.49, 117.55, 5.43)
pt3dadd(1057.57, 3198.27, 117.55, 5.43)
pt3dadd(1057.91, 3199.04, 117.55, 5.43)
pt3dadd(1058.25, 3199.42, 117.55, 5.43)
pt3dadd(1058.59, 3199.81, 117.55, 5.43)
pt3dadd(1058.93, 3200.58, 117.55, 5.43)
pt3dadd(1059.27, 3201.35, 117.55, 5.43)
pt3dadd(1059.61, 3201.74, 117.55, 5.43)
pt3dadd(1060.29, 3202.51, 117.55, 5.43)
pt3dadd(1060.63, 3202.9, 117.55, 5.43)
pt3dadd(1060.97, 3203.28, 117.55, 5.43)
pt3dadd(1060.97, 3204.05, 117.55, 5.43)
pt3dadd(1061.31, 3204.44, 117.55, 5.43)
pt3dadd(1061.65, 3205.21, 117.55, 5.43)
pt3dadd(1061.99, 3205.6, 117.55, 5.43)
pt3dadd(1062.33, 3206.37, 117.55, 5.43)
pt3dadd(1062.67, 3206.75, 117.55, 5.43)
pt3dadd(1063.01, 3207.14, 117.55, 5.43)
pt3dadd(1063.01, 3207.91, 117.55, 5.43)
pt3dadd(1063.35, 3208.3, 117.55, 5.43)
pt3dadd(1063.69, 3209.07, 117.55, 5.43)
pt3dadd(1063.69, 3209.84, 117.55, 5.43)
pt3dadd(1064.03, 3210.23, 117.55, 5.43)
pt3dadd(1064.37, 3211, 117.55, 5.43)
pt3dadd(1064.71, 3211.38, 117.55, 5.43)
pt3dadd(1064.71, 3212.15, 117.55, 5.43)
pt3dadd(1065.05, 3212.54, 117.55, 5.43)
pt3dadd(1065.39, 3213.31, 117.55, 5.43)
pt3dadd(1065.73, 3213.7, 117.55, 5.43)
pt3dadd(1066.07, 3214.47, 117.55, 5.43)
pt3dadd(1066.41, 3214.85, 117.55, 5.43)
pt3dadd(1066.75, 3215.24, 117.55, 5.43)
pt3dadd(1067.09, 3215.63, 117.55, 5.43)
pt3dadd(1067.09, 3216.4, 117.55, 5.43)
pt3dadd(1067.76, 3216.78, 117.55, 5.43)
pt3dadd(1068.1, 3217.56, 117.55, 5.43)
pt3dadd(1068.44, 3217.94, 117.55, 5.43)
pt3dadd(1068.78, 3218.33, 117.55, 5.43)
pt3dadd(1069.12, 3218.71, 117.55, 5.43)
pt3dadd(1069.46, 3219.1, 117.55, 5.43)
pt3dadd(1069.8, 3219.48, 117.55, 5.43)
pt3dadd(1069.8, 3220.26, 117.55, 5.43)
pt3dadd(1070.14, 3220.64, 117.55, 5.43)
pt3dadd(1070.48, 3221.03, 117.55, 5.43)
pt3dadd(1070.82, 3221.41, 117.55, 5.43)
pt3dadd(1071.16, 3221.8, 117.55, 5.43)
pt3dadd(1071.5, 3222.19, 117.55, 5.43)
pt3dadd(1071.5, 3223.34, 117.55, 5.43)
pt3dadd(1071.84, 3223.73, 117.55, 5.43)
pt3dadd(1072.18, 3224.11, 117.55, 5.43)
pt3dadd(1072.52, 3224.89, 117.55, 5.43)
pt3dadd(1072.86, 3225.66, 117.55, 5.43)
pt3dadd(1072.86, 3228.36, 117.55, 5.43)
pt3dadd(1073.2, 3228.74, 117.55, 5.43)
pt3dadd(1073.2, 3230.29, 117.55, 5.43)
pt3dadd(1073.54, 3230.67, 117.55, 5.43)
pt3dadd(1073.54, 3231.44, 117.55, 5.43)
pt3dadd(1073.88, 3231.83, 117.55, 5.43)
pt3dadd(1073.88, 3232.6, 117.55, 5.43)
pt3dadd(1074.22, 3232.99, 117.55, 5.43)
pt3dadd(1074.22, 3234.53, 117.55, 5.43)
pt3dadd(1074.56, 3235.3, 117.55, 5.43)
pt3dadd(1074.9, 3235.69, 117.55, 5.43)
pt3dadd(1074.9, 3236.46, 117.55, 5.43)
pt3dadd(1075.24, 3236.85, 117.55, 5.43)
pt3dadd(1075.58, 3237.23, 117.55, 5.43)
pt3dadd(1075.92, 3237.62, 117.55, 5.43)
pt3dadd(1076.26, 3238.39, 117.55, 5.43)
pt3dadd(1076.6, 3238.77, 117.55, 5.43)
pt3dadd(1076.6, 3239.55, 117.55, 5.43)
pt3dadd(1077.28, 3239.93, 117.55, 5.43)
pt3dadd(1077.62, 3240.32, 117.55, 5.43)
pt3dadd(1077.95, 3241.09, 117.55, 5.43)
pt3dadd(1078.29, 3241.48, 117.55, 5.43)
pt3dadd(1078.63, 3241.86, 117.55, 5.43)
pt3dadd(1078.63, 3242.63, 117.55, 5.43)
pt3dadd(1078.97, 3243.4, 117.55, 5.43)
pt3dadd(1078.97, 3244.18, 117.55, 5.43)
pt3dadd(1079.31, 3244.56, 117.55, 5.43)
pt3dadd(1079.31, 3245.33, 117.55, 5.43)
pt3dadd(1079.65, 3245.72, 117.55, 5.43)
pt3dadd(1079.99, 3246.1, 117.55, 5.43)
pt3dadd(1079.99, 3246.88, 117.55, 5.43)
pt3dadd(1080.33, 3247.26, 117.55, 5.43)
}
}
proc shape3d_102() {
dend[68] { pt3dadd(1080.67, 3248.03, 117.55, 5.43)
pt3dadd(1080.67, 3249.58, 117.55, 5.43)
pt3dadd(1081.01, 3249.96, 117.55, 5.43)
pt3dadd(1081.01, 3250.73, 117.55, 5.43)
pt3dadd(1081.35, 3251.12, 117.55, 5.43)
pt3dadd(1081.35, 3251.89, 117.55, 5.43)
pt3dadd(1081.69, 3253.05, 117.55, 5.43)
pt3dadd(1082.03, 3253.44, 117.55, 5.43)
pt3dadd(1082.37, 3254.21, 117.55, 5.43)
pt3dadd(1082.37, 3254.98, 117.55, 5.43)
pt3dadd(1083.05, 3253.82, 117.55, 5.43)
pt3dadd(1083.39, 3254.21, 117.55, 5.43)
pt3dadd(1083.73, 3254.59, 117.55, 5.43)
pt3dadd(1083.73, 3255.36, 117.55, 5.43)
pt3dadd(1084.07, 3255.75, 117.55, 5.43)
pt3dadd(1084.07, 3267.32, 117.55, 5.43)
pt3dadd(1084.41, 3267.71, 117.55, 5.43)
pt3dadd(1084.41, 3268.48, 117.55, 5.43)
pt3dadd(1084.75, 3268.87, 117.55, 5.43)
pt3dadd(1085.09, 3269.25, 117.55, 5.43)
pt3dadd(1085.09, 3271.18, 117.55, 5.43)
pt3dadd(1085.43, 3271.57, 117.55, 5.43)
pt3dadd(1085.77, 3271.95, 117.55, 5.43)
pt3dadd(1085.77, 3272.73, 117.55, 5.43)
pt3dadd(1086.11, 3273.11, 117.55, 5.43)
pt3dadd(1086.45, 3273.5, 117.55, 5.43)
pt3dadd(1086.79, 3273.88, 117.55, 5.43)
pt3dadd(1087.13, 3274.27, 117.55, 5.43)
pt3dadd(1087.47, 3274.65, 117.55, 5.43)
pt3dadd(1087.81, 3275.04, 117.55, 5.43)
pt3dadd(1088.14, 3275.43, 117.55, 5.43)
pt3dadd(1088.48, 3275.81, 117.55, 5.43)
pt3dadd(1088.48, 3276.58, 117.55, 5.43)
pt3dadd(1088.82, 3276.97, 117.55, 5.43)
pt3dadd(1089.16, 3277.35, 117.55, 5.43)
pt3dadd(1089.5, 3277.74, 117.55, 5.43)
pt3dadd(1089.5, 3278.51, 117.55, 5.43)
pt3dadd(1089.84, 3278.9, 117.55, 5.43)
pt3dadd(1090.18, 3279.28, 117.55, 5.43)
pt3dadd(1090.52, 3279.67, 117.55, 5.43)
pt3dadd(1090.86, 3280.06, 117.55, 5.43)
pt3dadd(1091.2, 3280.44, 117.55, 5.43)
pt3dadd(1091.2, 3295.87, 117.55, 5.43)
pt3dadd(1090.86, 3296.26, 117.55, 5.43)
pt3dadd(1090.86, 3312.46, 117.55, 5.43)
pt3dadd(1091.2, 3312.85, 117.55, 5.43)
pt3dadd(1091.2, 3316.71, 117.55, 5.43)
pt3dadd(1091.54, 3317.09, 117.55, 5.43)
pt3dadd(1091.54, 3317.86, 117.55, 5.43)
pt3dadd(1091.88, 3318.25, 117.55, 5.43)
pt3dadd(1091.88, 3328.67, 117.55, 5.43)
pt3dadd(1092.22, 3329.05, 117.55, 5.43)
pt3dadd(1092.22, 3331.37, 117.55, 5.43)
pt3dadd(1092.56, 3331.75, 117.55, 5.43)
pt3dadd(1092.9, 3332.14, 117.55, 5.43)
pt3dadd(1093.24, 3332.52, 117.55, 5.43)
pt3dadd(1093.58, 3332.91, 117.55, 5.43)
pt3dadd(1093.58, 3348.34, 117.55, 5.43)
pt3dadd(1093.92, 3348.73, 117.55, 5.43)
pt3dadd(1093.92, 3351.04, 117.55, 5.43)
pt3dadd(1094.26, 3351.43, 117.55, 5.43)
pt3dadd(1094.6, 3351.81, 117.55, 5.43)
pt3dadd(1094.6, 3360.69, 117.55, 5.43)
pt3dadd(1094.26, 3361.46, 117.55, 5.43)
pt3dadd(1094.26, 3374.58, 117.55, 5.43)
pt3dadd(1093.92, 3374.96, 117.55, 5.43)
pt3dadd(1093.92, 3384.61, 117.55, 5.43)
pt3dadd(1094.26, 3384.99, 117.55, 5.43)
pt3dadd(1094.26, 3385.77, 117.55, 5.43)
pt3dadd(1094.6, 3386.15, 117.55, 5.43)
pt3dadd(1094.6, 3387.69, 117.55, 5.43)
pt3dadd(1094.94, 3388.08, 117.55, 5.43)
pt3dadd(1094.94, 3390.78, 117.55, 5.43)
pt3dadd(1095.28, 3391.17, 117.55, 5.43)
pt3dadd(1095.62, 3391.55, 117.55, 5.43)
pt3dadd(1095.96, 3391.94, 117.55, 5.43)
pt3dadd(1096.3, 3392.32, 117.55, 5.43)
pt3dadd(1096.64, 3392.71, 117.55, 5.43)
pt3dadd(1099.01, 3392.71, 117.55, 5.43)
pt3dadd(1098.67, 3392.32, 117.55, 5.43)
pt3dadd(1098.34, 3391.94, 117.55, 5.43)
pt3dadd(1097.66, 3391.94, 117.55, 5.43)
pt3dadd(1097.32, 3391.55, 117.55, 5.43)
pt3dadd(1096.3, 3391.17, 117.55, 5.43)
pt3dadd(1095.28, 3390.78, 117.55, 5.43)
pt3dadd(1094.6, 3390.4, 117.55, 5.43)
pt3dadd(1094.6, 3396.95, 117.55, 5.43)
pt3dadd(1094.26, 3397.34, 117.55, 5.43)
pt3dadd(1094.26, 3398.5, 117.55, 5.43)
pt3dadd(1093.92, 3398.88, 117.55, 5.43)
pt3dadd(1093.92, 3399.65, 117.55, 5.43)
pt3dadd(1093.24, 3400.04, 117.55, 5.43)
pt3dadd(1092.9, 3400.43, 117.55, 5.43)
pt3dadd(1092.56, 3401.2, 117.55, 5.43)
pt3dadd(1092.22, 3401.58, 117.55, 5.43)
pt3dadd(1092.22, 3402.74, 117.55, 5.43)
pt3dadd(1091.88, 3403.13, 117.55, 5.43)
pt3dadd(1091.54, 3403.9, 117.55, 5.43)
pt3dadd(1091.2, 3404.28, 117.55, 5.43)
pt3dadd(1091.2, 3408.53, 117.55, 5.43)
pt3dadd(1090.86, 3408.91, 117.55, 5.43)
pt3dadd(1090.52, 3409.3, 117.55, 5.43)
pt3dadd(1090.18, 3409.69, 117.55, 5.43)
pt3dadd(1089.84, 3410.07, 117.55, 5.43)
pt3dadd(1089.5, 3410.46, 117.55, 5.43)
pt3dadd(1089.16, 3410.84, 117.55, 5.43)
pt3dadd(1088.82, 3411.61, 117.55, 5.43)
pt3dadd(1088.82, 3420.1, 117.55, 5.43)
pt3dadd(1089.16, 3420.49, 117.55, 5.43)
pt3dadd(1089.16, 3422.8, 117.55, 5.43)
pt3dadd(1088.82, 3422.03, 117.55, 4.76)
pt3dadd(1088.82, 3426.66, 117.55, 4.76)
pt3dadd(1089.16, 3427.05, 117.55, 4.76)
pt3dadd(1089.5, 3427.43, 117.55, 4.76)
pt3dadd(1089.84, 3427.82, 117.55, 4.76)
pt3dadd(1090.18, 3428.2, 117.55, 4.76)
pt3dadd(1090.52, 3428.59, 117.55, 4.76)
pt3dadd(1091.2, 3431.68, 117.55, 5.43)
pt3dadd(1091.2, 3444.02, 117.55, 5.43)
pt3dadd(1091.2, 3442.86, 117.55, 5.43)
pt3dadd(1090.86, 3442.09, 117.55, 5.43)
pt3dadd(1090.18, 3440.94, 117.55, 5.43)
pt3dadd(1089.84, 3440.55, 117.55, 5.43)
pt3dadd(1089.5, 3439.78, 117.55, 5.43)
pt3dadd(1089.16, 3440.16, 117.55, 5.43)
pt3dadd(1089.16, 3443.25, 117.55, 5.43)
pt3dadd(1089.5, 3443.64, 117.55, 5.43)
pt3dadd(1089.84, 3444.02, 117.55, 5.43)
pt3dadd(1090.18, 3444.79, 117.55, 5.43)
pt3dadd(1090.52, 3445.56, 117.55, 5.43)
pt3dadd(1090.86, 3445.95, 117.55, 5.43)
pt3dadd(1090.86, 3446.72, 117.55, 5.43)
pt3dadd(1091.2, 3447.11, 117.55, 5.43)
pt3dadd(1091.54, 3447.49, 117.55, 5.43)
pt3dadd(1092.22, 3447.88, 117.55, 5.43)
pt3dadd(1092.56, 3448.27, 117.55, 5.43)
pt3dadd(1092.56, 3449.04, 117.55, 5.43)
pt3dadd(1092.9, 3449.42, 117.55, 5.43)
pt3dadd(1093.24, 3449.81, 117.55, 5.43)
pt3dadd(1093.24, 3450.58, 117.55, 5.43)
pt3dadd(1093.58, 3451.35, 117.55, 5.43)
pt3dadd(1093.58, 3452.12, 117.55, 5.43)
pt3dadd(1093.92, 3452.9, 117.55, 5.43)
pt3dadd(1093.92, 3454.05, 117.55, 5.43)
pt3dadd(1094.26, 3454.44, 117.55, 5.43)
pt3dadd(1094.6, 3454.82, 117.55, 5.43)
pt3dadd(1094.6, 3457.91, 117.55, 5.43)
pt3dadd(1094.94, 3458.68, 117.55, 5.43)
pt3dadd(1095.28, 3459.84, 117.55, 5.43)
pt3dadd(1095.28, 3460.61, 117.55, 5.43)
pt3dadd(1095.62, 3461, 117.55, 5.43)
pt3dadd(1095.62, 3462.54, 117.55, 5.43)
pt3dadd(1095.96, 3463.31, 117.55, 5.43)
pt3dadd(1095.96, 3464.08, 117.55, 5.43)
pt3dadd(1096.3, 3464.47, 117.55, 5.43)
pt3dadd(1096.3, 3465.24, 117.55, 5.43)
pt3dadd(1096.64, 3465.63, 117.55, 5.43)
pt3dadd(1096.98, 3466.01, 117.55, 5.43)
pt3dadd(1096.98, 3466.78, 117.55, 5.43)
pt3dadd(1097.32, 3467.17, 117.55, 5.43)
pt3dadd(1097.66, 3467.94, 117.55, 5.43)
pt3dadd(1098.34, 3468.71, 117.55, 5.43)
pt3dadd(1098.34, 3469.48, 117.55, 5.43)
pt3dadd(1100.03, 3470.26, 117.55, 5.43)
pt3dadd(1100.03, 3478.36, 117.55, 5.43)
pt3dadd(1099.69, 3478.74, 117.55, 5.43)
pt3dadd(1099.35, 3479.52, 117.55, 5.43)
pt3dadd(1099.01, 3480.29, 117.55, 5.43)
pt3dadd(1098.34, 3481.06, 117.55, 5.43)
pt3dadd(1098, 3481.83, 117.55, 5.43)
pt3dadd(1097.66, 3482.6, 117.55, 5.43)
pt3dadd(1097.32, 3483.37, 117.55, 5.43)
pt3dadd(1096.98, 3483.76, 117.55, 5.43)
pt3dadd(1096.98, 3487.62, 117.55, 5.43)
pt3dadd(1096.64, 3488, 117.55, 5.43)
pt3dadd(1096.64, 3494.18, 117.55, 5.43)
pt3dadd(1096.3, 3494.95, 117.55, 5.43)
pt3dadd(1096.3, 3503.82, 117.55, 5.43)
pt3dadd(1096.64, 3504.21, 117.55, 5.43)
pt3dadd(1096.64, 3507.29, 117.55, 5.43)
pt3dadd(1096.64, 3505.36, 117.55, 5.43)
pt3dadd(1095.96, 3504.21, 117.55, 5.43)
pt3dadd(1095.62, 3503.82, 117.55, 5.43)
pt3dadd(1095.62, 3501.89, 117.55, 5.43)
pt3dadd(1095.28, 3501.12, 117.55, 5.43)
pt3dadd(1094.94, 3500.35, 117.55, 5.43)
pt3dadd(1094.94, 3498.42, 117.55, 5.43)
pt3dadd(1094.94, 3500.35, 117.55, 5.43)
pt3dadd(1095.28, 3500.73, 117.55, 5.43)
pt3dadd(1095.62, 3501.12, 117.55, 5.43)
pt3dadd(1095.96, 3501.51, 117.55, 5.43)
pt3dadd(1095.96, 3502.66, 117.55, 5.43)
pt3dadd(1096.3, 3503.44, 117.55, 5.43)
pt3dadd(1096.3, 3513.08, 117.55, 5.43)
pt3dadd(1096.98, 3514.24, 117.55, 5.43)
pt3dadd(1097.66, 3514.62, 117.55, 5.43)
pt3dadd(1098, 3515.01, 117.55, 5.43)
pt3dadd(1098.34, 3515.78, 117.55, 5.43)
pt3dadd(1098.67, 3516.17, 117.55, 5.43)
pt3dadd(1098.67, 3516.94, 117.55, 5.43)
}
}
proc shape3d_103() {
dend[68] { pt3dadd(1099.01, 3518.1, 117.55, 5.43)
pt3dadd(1099.69, 3518.87, 117.55, 5.43)
pt3dadd(1100.37, 3520.41, 117.55, 5.43)
pt3dadd(1100.37, 3521.57, 117.55, 5.43)
pt3dadd(1101.39, 3523.11, 117.55, 5.43)
pt3dadd(1101.73, 3523.11, 117.55, 5.43)
pt3dadd(1101.39, 3522.34, 117.55, 5.43)
pt3dadd(1101.39, 3520.8, 117.55, 5.43)
pt3dadd(1101.05, 3520.41, 117.55, 5.43)
pt3dadd(1100.71, 3519.25, 117.55, 5.43)
pt3dadd(1100.71, 3515.4, 117.55, 5.43)
pt3dadd(1100.37, 3514.24, 117.55, 5.43)
pt3dadd(1099.35, 3513.08, 117.55, 5.43)
pt3dadd(1099.01, 3511.92, 117.55, 5.43)
pt3dadd(1099.01, 3512.69, 117.55, 5.43)
pt3dadd(1099.35, 3513.08, 117.55, 5.43)
pt3dadd(1099.35, 3519.25, 117.55, 5.43)
pt3dadd(1099.69, 3519.64, 117.55, 5.43)
pt3dadd(1099.69, 3520.41, 117.55, 5.43)
pt3dadd(1100.03, 3520.8, 117.55, 5.43)
pt3dadd(1100.37, 3521.57, 117.55, 5.43)
pt3dadd(1100.71, 3522.34, 117.55, 5.43)
pt3dadd(1101.05, 3523.11, 117.55, 5.43)
pt3dadd(1101.73, 3523.88, 117.55, 5.43)
pt3dadd(1102.07, 3524.65, 117.55, 5.43)
pt3dadd(1102.41, 3525.43, 117.55, 5.43)
pt3dadd(1103.09, 3526.2, 117.55, 5.43)
pt3dadd(1103.43, 3526.97, 117.55, 5.43)
pt3dadd(1103.43, 3528.13, 117.55, 5.43)
pt3dadd(1103.77, 3528.51, 117.55, 5.43)
pt3dadd(1103.77, 3529.28, 117.55, 5.43)
pt3dadd(1104.11, 3530.06, 117.55, 5.43)
pt3dadd(1104.45, 3530.83, 117.55, 5.43)
pt3dadd(1104.79, 3531.98, 117.55, 5.43)
pt3dadd(1105.47, 3533.14, 117.55, 5.43)
pt3dadd(1106.15, 3533.91, 117.55, 5.43)
pt3dadd(1106.15, 3532.37, 117.55, 5.43)
pt3dadd(1105.81, 3531.98, 117.55, 5.43)
pt3dadd(1105.81, 3530.83, 117.55, 5.43)
pt3dadd(1105.47, 3530.06, 117.55, 5.43)
pt3dadd(1105.13, 3529.28, 117.55, 5.43)
pt3dadd(1104.79, 3528.51, 117.55, 5.43)
pt3dadd(1104.11, 3527.35, 117.55, 5.43)
pt3dadd(1103.09, 3525.43, 117.55, 5.43)
pt3dadd(1102.75, 3524.65, 117.55, 5.43)
pt3dadd(1103.09, 3524.65, 117.55, 5.43)
pt3dadd(1103.09, 3525.43, 117.55, 5.43)
pt3dadd(1103.43, 3525.81, 117.55, 5.43)
pt3dadd(1103.43, 3526.97, 117.55, 5.43)
pt3dadd(1103.77, 3527.74, 117.55, 5.43)
pt3dadd(1103.77, 3530.06, 117.55, 5.43)
pt3dadd(1104.11, 3530.83, 117.55, 5.43)
pt3dadd(1104.11, 3534.69, 117.55, 5.43)
pt3dadd(1104.45, 3535.07, 117.55, 5.43)
pt3dadd(1104.79, 3535.46, 117.55, 5.43)
pt3dadd(1105.13, 3536.23, 117.55, 5.43)
pt3dadd(1105.47, 3537.39, 117.55, 5.43)
pt3dadd(1106.15, 3538.93, 117.55, 5.43)
pt3dadd(1106.15, 3543.17, 117.55, 5.43)
pt3dadd(1105.81, 3542.79, 117.55, 5.43)
pt3dadd(1104.79, 3542.02, 117.55, 5.43)
pt3dadd(1104.11, 3540.86, 117.55, 5.43)
pt3dadd(1103.77, 3540.09, 117.55, 5.43)
pt3dadd(1104.45, 3540.09, 117.55, 5.43)
pt3dadd(1105.47, 3540.47, 117.55, 5.43)
pt3dadd(1105.81, 3540.86, 117.55, 5.43)
pt3dadd(1106.49, 3540.86, 117.55, 5.43)
pt3dadd(1106.49, 3542.79, 117.55, 5.43)
pt3dadd(1105.81, 3542.79, 117.55, 5.43)
pt3dadd(1105.81, 3538.54, 117.55, 5.43)
pt3dadd(1106.49, 3538.54, 117.55, 5.43)
pt3dadd(1107.17, 3539.31, 117.55, 5.43)
pt3dadd(1107.17, 3542.79, 117.55, 5.43)
pt3dadd(1106.49, 3543.17, 117.55, 5.43)
pt3dadd(1105.81, 3543.56, 117.55, 5.43)
pt3dadd(1105.47, 3543.94, 117.55, 5.43)
pt3dadd(1105.81, 3539.31, 117.55, 4.08)
pt3dadd(1106.15, 3539.31, 117.55, 4.08)
pt3dadd(1106.15, 3548.19, 117.55, 4.08)
pt3dadd(1105.47, 3549.35, 117.55, 4.08)
pt3dadd(1104.79, 3550.12, 117.55, 4.08)
pt3dadd(1103.77, 3550.12, 117.55, 4.08)
pt3dadd(1103.43, 3549.73, 117.55, 4.08)
pt3dadd(1103.43, 3547.42, 117.55, 4.08)
pt3dadd(1103.77, 3547.03, 117.55, 4.08)
pt3dadd(1104.11, 3546.26, 117.55, 4.08)
pt3dadd(1104.45, 3545.87, 117.55, 4.08)
pt3dadd(1105.13, 3545.1, 117.55, 4.08)
pt3dadd(1105.81, 3543.94, 117.55, 4.08)
pt3dadd(1106.49, 3542.79, 117.55, 4.08)
pt3dadd(1107.17, 3542.02, 117.55, 4.08)
pt3dadd(1106.83, 3542.79, 117.55, 4.08)
pt3dadd(1106.83, 3543.56, 117.55, 4.08)
pt3dadd(1106.49, 3543.94, 117.55, 4.08)
pt3dadd(1106.15, 3544.33, 117.55, 4.08)
pt3dadd(1105.81, 3544.72, 117.55, 4.08)
pt3dadd(1105.13, 3545.1, 117.55, 4.08)
pt3dadd(1104.79, 3545.49, 117.55, 4.08)
pt3dadd(1104.45, 3545.87, 117.55, 4.08)
pt3dadd(1104.11, 3546.26, 117.55, 4.08)
pt3dadd(1103.77, 3547.03, 117.55, 4.08)
pt3dadd(1103.77, 3551.66, 117.55, 4.08)
pt3dadd(1104.11, 3552.43, 117.55, 4.08)
pt3dadd(1104.11, 3553.2, 117.55, 4.08)
pt3dadd(1104.45, 3553.98, 117.55, 4.08)
pt3dadd(1104.79, 3554.75, 117.55, 4.08)
pt3dadd(1105.13, 3556.29, 117.55, 4.08)
pt3dadd(1105.13, 3557.83, 117.55, 4.08)
pt3dadd(1105.47, 3558.6, 117.55, 4.08)
pt3dadd(1105.81, 3559.38, 117.55, 4.08)
pt3dadd(1106.15, 3559.76, 117.55, 4.08)
pt3dadd(1106.49, 3560.53, 117.55, 4.08)
pt3dadd(1106.83, 3561.69, 117.55, 4.08)
pt3dadd(1107.17, 3562.46, 117.55, 4.08)
pt3dadd(1106.15, 3552.43, 117.55, 4.08)
pt3dadd(1106.15, 3552.05, 117.55, 4.08)
pt3dadd(1106.15, 3576.74, 117.55, 4.08)
pt3dadd(1106.49, 3577.12, 117.55, 4.08)
pt3dadd(1106.49, 3578.67, 117.55, 4.08)
pt3dadd(1106.83, 3579.05, 117.55, 4.08)
pt3dadd(1106.83, 3579.82, 117.55, 4.08)
pt3dadd(1107.17, 3580.21, 117.55, 4.08)
pt3dadd(1107.17, 3581.37, 117.55, 4.08)
pt3dadd(1107.51, 3582.14, 117.55, 4.08)
pt3dadd(1107.51, 3583.3, 117.55, 4.08)
pt3dadd(1107.85, 3584.07, 117.55, 4.08)
pt3dadd(1107.85, 3584.84, 117.55, 4.08)
pt3dadd(1108.19, 3585.61, 117.55, 4.08)
pt3dadd(1108.19, 3587.15, 117.55, 4.08)
pt3dadd(1108.53, 3587.54, 117.55, 4.08)
pt3dadd(1108.53, 3602.2, 117.55, 4.08)
pt3dadd(1108.87, 3602.59, 117.55, 4.08)
pt3dadd(1109.2, 3602.97, 117.55, 4.08)
pt3dadd(1109.2, 3603.74, 117.55, 4.08)
pt3dadd(1109.54, 3604.13, 117.55, 4.08)
pt3dadd(1109.88, 3604.52, 117.55, 4.08)
pt3dadd(1110.22, 3604.9, 117.55, 4.08)
pt3dadd(1113.15, 3617.45, 117.55, 7.47)
pt3dadd(1136.25, 3704.25, 117.55, 5.43)
}
dend[69] {pt3dclear()
pt3dadd(1136.25, 3704.25, 117.55, 5.43)
pt3dadd(1134.89, 3718.53, 117.55, 5.43)
pt3dadd(1141.68, 3772.15, 117.55, 5.43)
pt3dadd(1150.52, 3819.61, 117.55, 5.43)
pt3dadd(1156.63, 3860.89, 117.55, 5.43)
pt3dadd(1162.74, 3895.99, 117.55, 5.43)
pt3dadd(1172.93, 3927.24, 117.55, 5.43)
pt3dadd(1185.16, 3956.95, 117.55, 5.43)
pt3dadd(1201.47, 4011.74, 117.55, 4.76)
pt3dadd(1150.02, 3810.54, 117.55, 4.76)
pt3dadd(1151.72, 3822.89, 117.55, 4.76)
pt3dadd(1152.06, 3823.28, 117.55, 4.76)
pt3dadd(1152.06, 3825.2, 117.55, 4.76)
pt3dadd(1151.72, 3825.59, 117.55, 4.76)
pt3dadd(1151.72, 3824.43, 117.55, 4.76)
pt3dadd(1151.38, 3824.05, 117.55, 4.76)
pt3dadd(1151.04, 3823.28, 117.55, 4.76)
pt3dadd(1150.7, 3822.89, 117.55, 4.76)
pt3dadd(1150.7, 3820.96, 117.55, 4.76)
pt3dadd(1150.36, 3820.19, 117.55, 4.76)
pt3dadd(1150.36, 3809.77, 117.55, 4.76)
pt3dadd(1150.02, 3809.39, 117.55, 4.76)
pt3dadd(1150.02, 3808.62, 117.55, 4.76)
pt3dadd(1150.02, 3814.02, 117.55, 4.76)
pt3dadd(1150.36, 3814.4, 117.55, 4.76)
pt3dadd(1150.36, 3815.95, 117.55, 4.76)
pt3dadd(1150.7, 3816.33, 117.55, 4.76)
pt3dadd(1150.7, 3817.1, 117.55, 4.76)
pt3dadd(1151.04, 3817.87, 117.55, 4.76)
pt3dadd(1151.38, 3818.65, 117.55, 4.76)
pt3dadd(1151.72, 3819.03, 117.55, 4.76)
pt3dadd(1150.7, 3820.19, 117.55, 3.74)
pt3dadd(1150.7, 3824.82, 117.55, 3.74)
pt3dadd(1151.04, 3825.2, 117.55, 3.74)
pt3dadd(1151.38, 3825.59, 117.55, 3.74)
pt3dadd(1151.72, 3825.98, 117.55, 3.74)
pt3dadd(1152.06, 3826.36, 117.55, 3.74)
pt3dadd(1152.4, 3826.75, 117.55, 3.74)
pt3dadd(1152.73, 3827.13, 117.55, 3.74)
pt3dadd(1152.73, 3827.91, 117.55, 3.74)
pt3dadd(1153.07, 3828.29, 117.55, 3.74)
pt3dadd(1153.41, 3828.68, 117.55, 3.74)
pt3dadd(1153.41, 3835.24, 117.55, 3.74)
pt3dadd(1153.75, 3835.62, 117.55, 3.74)
pt3dadd(1153.75, 3838.32, 117.55, 3.74)
pt3dadd(1154.09, 3838.71, 117.55, 3.74)
pt3dadd(1154.09, 3840.64, 117.55, 3.74)
pt3dadd(1154.43, 3841.02, 117.55, 3.74)
pt3dadd(1154.77, 3841.41, 117.55, 3.74)
pt3dadd(1154.77, 3842.95, 117.55, 3.74)
pt3dadd(1155.11, 3843.34, 117.55, 3.74)
pt3dadd(1155.11, 3844.11, 117.55, 3.74)
pt3dadd(1155.45, 3844.49, 117.55, 3.74)
pt3dadd(1155.45, 3846.04, 117.55, 3.74)
pt3dadd(1155.79, 3846.81, 117.55, 3.74)
pt3dadd(1155.79, 3849.12, 117.55, 3.74)
pt3dadd(1155.45, 3849.12, 117.55, 3.74)
pt3dadd(1155.45, 3848.35, 117.55, 3.74)
pt3dadd(1155.11, 3847.2, 117.55, 3.74)
pt3dadd(1154.43, 3846.42, 117.55, 3.74)
pt3dadd(1154.09, 3845.65, 117.55, 3.74)
}
}
proc shape3d_104() {
dend[69] { pt3dadd(1154.09, 3844.88, 117.55, 3.74)
pt3dadd(1154.09, 3850.67, 117.55, 3.74)
pt3dadd(1154.43, 3851.05, 117.55, 3.74)
pt3dadd(1154.77, 3851.44, 117.55, 3.74)
pt3dadd(1155.11, 3851.83, 117.55, 3.74)
pt3dadd(1155.79, 3852.6, 117.55, 3.74)
pt3dadd(1156.13, 3852.98, 117.55, 3.74)
pt3dadd(1156.13, 3860.7, 117.55, 3.74)
pt3dadd(1156.47, 3861.08, 117.55, 3.74)
pt3dadd(1156.47, 3861.86, 117.55, 3.74)
pt3dadd(1156.81, 3862.24, 117.55, 3.74)
pt3dadd(1156.81, 3863.79, 117.55, 3.74)
pt3dadd(1157.15, 3864.17, 117.55, 3.74)
pt3dadd(1157.49, 3864.56, 117.55, 3.74)
pt3dadd(1157.49, 3865.33, 117.55, 3.74)
pt3dadd(1157.83, 3865.71, 117.55, 3.74)
pt3dadd(1157.83, 3867.64, 117.55, 3.74)
pt3dadd(1158.17, 3868.41, 117.55, 3.74)
pt3dadd(1158.17, 3874.2, 117.55, 3.74)
pt3dadd(1158.51, 3876.13, 117.55, 4.42)
pt3dadd(1158.51, 3875.74, 117.55, 4.42)
pt3dadd(1158.85, 3876.13, 117.55, 4.42)
pt3dadd(1159.19, 3876.52, 117.55, 4.42)
pt3dadd(1159.19, 3877.29, 117.55, 4.42)
pt3dadd(1159.53, 3877.67, 117.55, 4.42)
pt3dadd(1159.87, 3878.06, 117.55, 4.42)
pt3dadd(1159.87, 3878.83, 117.55, 4.42)
pt3dadd(1160.21, 3879.22, 117.55, 4.42)
pt3dadd(1160.55, 3879.6, 117.55, 4.42)
pt3dadd(1160.89, 3879.99, 117.55, 4.42)
pt3dadd(1161.23, 3880.37, 117.55, 4.42)
pt3dadd(1161.57, 3880.76, 117.55, 4.42)
pt3dadd(1161.57, 3882.69, 117.55, 4.42)
pt3dadd(1161.91, 3883.08, 117.55, 4.42)
pt3dadd(1161.91, 3884.23, 117.55, 4.42)
pt3dadd(1162.25, 3884.62, 117.55, 4.42)
pt3dadd(1163.94, 3888.09, 117.55, 4.42)
pt3dadd(1162.59, 3885.78, 117.55, 4.42)
pt3dadd(1162.93, 3886.16, 117.55, 4.42)
pt3dadd(1159.19, 3888.09, 117.55, 4.42)
pt3dadd(1163.26, 3887.32, 117.55, 4.42)
pt3dadd(1163.6, 3887.7, 117.55, 4.42)
pt3dadd(1163.6, 3893.49, 117.55, 4.42)
pt3dadd(1163.94, 3894.26, 117.55, 4.42)
pt3dadd(1164.28, 3894.65, 117.55, 4.42)
pt3dadd(1164.28, 3895.42, 117.55, 4.42)
pt3dadd(1164.62, 3895.81, 117.55, 4.42)
pt3dadd(1164.96, 3896.19, 117.55, 4.42)
pt3dadd(1165.3, 3896.58, 117.55, 4.42)
pt3dadd(1168.02, 3897.74, 117.55, 4.42)
pt3dadd(1161.57, 3902.75, 117.55, 4.42)
pt3dadd(1165.64, 3910.85, 117.55, 4.42)
pt3dadd(1165.98, 3910.47, 117.55, 4.42)
pt3dadd(1166.32, 3910.08, 117.55, 4.42)
pt3dadd(1166.32, 3909.31, 117.55, 4.42)
pt3dadd(1166.66, 3908.92, 117.55, 4.42)
pt3dadd(1167.34, 3908.92, 117.55, 4.42)
pt3dadd(1167.68, 3909.31, 117.55, 4.42)
pt3dadd(1168.02, 3909.7, 117.55, 4.42)
pt3dadd(1168.36, 3910.08, 117.55, 4.42)
pt3dadd(1168.7, 3910.47, 117.55, 4.42)
pt3dadd(1169.04, 3910.85, 117.55, 4.42)
pt3dadd(1169.38, 3911.24, 117.55, 4.42)
pt3dadd(1169.72, 3911.62, 117.55, 4.42)
pt3dadd(1170.06, 3912.01, 117.55, 4.42)
pt3dadd(1170.4, 3912.78, 117.55, 4.42)
pt3dadd(1170.74, 3913.17, 117.55, 4.42)
pt3dadd(1171.08, 3913.55, 117.55, 4.42)
pt3dadd(1171.42, 3914.33, 117.55, 4.42)
pt3dadd(1171.76, 3914.71, 117.55, 4.42)
pt3dadd(1172.1, 3915.1, 117.55, 4.42)
pt3dadd(1172.1, 3915.87, 117.55, 4.42)
pt3dadd(1172.44, 3916.25, 117.55, 4.42)
pt3dadd(1172.44, 3917.8, 117.55, 4.42)
pt3dadd(1172.78, 3918.18, 117.55, 4.42)
pt3dadd(1173.12, 3918.57, 117.55, 4.42)
pt3dadd(1173.12, 3919.34, 117.55, 4.42)
pt3dadd(1173.46, 3920.11, 117.55, 4.42)
pt3dadd(1173.46, 3921.66, 117.55, 4.42)
pt3dadd(1173.79, 3922.04, 117.55, 4.42)
pt3dadd(1173.79, 3923.2, 117.55, 4.42)
pt3dadd(1174.13, 3923.58, 117.55, 4.42)
pt3dadd(1174.47, 3924.74, 117.55, 4.42)
pt3dadd(1174.81, 3925.13, 117.55, 4.42)
pt3dadd(1174.81, 3925.9, 117.55, 4.42)
pt3dadd(1175.15, 3926.28, 117.55, 4.42)
pt3dadd(1175.49, 3926.67, 117.55, 4.42)
pt3dadd(1175.49, 3927.44, 117.55, 4.42)
pt3dadd(1175.83, 3928.21, 117.55, 4.42)
pt3dadd(1175.83, 3929.37, 117.55, 4.42)
pt3dadd(1175.15, 3930.91, 117.55, 3.74)
pt3dadd(1175.15, 3931.69, 117.55, 3.74)
pt3dadd(1175.49, 3932.07, 117.55, 3.74)
pt3dadd(1175.49, 3933.23, 117.55, 3.74)
pt3dadd(1175.83, 3933.62, 117.55, 3.74)
pt3dadd(1175.83, 3934.39, 117.55, 3.74)
pt3dadd(1176.17, 3934.77, 117.55, 3.74)
pt3dadd(1176.17, 3935.93, 117.55, 3.74)
pt3dadd(1176.51, 3936.32, 117.55, 3.74)
pt3dadd(1176.51, 3940.17, 117.55, 3.74)
pt3dadd(1176.85, 3940.56, 117.55, 3.74)
pt3dadd(1176.85, 3941.33, 117.55, 3.74)
pt3dadd(1177.19, 3941.72, 117.55, 3.74)
pt3dadd(1177.53, 3942.1, 117.55, 3.74)
pt3dadd(1177.87, 3942.49, 117.55, 3.74)
pt3dadd(1178.21, 3943.26, 117.55, 3.74)
pt3dadd(1178.55, 3943.65, 117.55, 3.74)
pt3dadd(1178.89, 3944.42, 117.55, 3.74)
pt3dadd(1179.23, 3944.8, 117.55, 3.74)
pt3dadd(1179.23, 3945.58, 117.55, 3.74)
pt3dadd(1179.57, 3945.96, 117.55, 3.74)
pt3dadd(1179.91, 3946.35, 117.55, 3.74)
pt3dadd(1179.91, 3947.12, 117.55, 3.74)
pt3dadd(1180.25, 3947.5, 117.55, 3.74)
pt3dadd(1180.59, 3947.89, 117.55, 3.74)
pt3dadd(1180.93, 3948.28, 117.55, 3.74)
pt3dadd(1181.27, 3948.66, 117.55, 3.74)
pt3dadd(1181.61, 3949.05, 117.55, 3.74)
pt3dadd(1181.95, 3949.43, 117.55, 3.74)
pt3dadd(1182.29, 3949.82, 117.55, 3.74)
pt3dadd(1182.63, 3950.2, 117.55, 3.74)
pt3dadd(1182.97, 3950.98, 117.55, 3.74)
pt3dadd(1183.31, 3951.36, 117.55, 3.74)
pt3dadd(1183.65, 3951.75, 117.55, 3.74)
pt3dadd(1183.65, 3952.52, 117.55, 3.74)
pt3dadd(1183.98, 3952.91, 117.55, 3.74)
pt3dadd(1184.32, 3953.29, 117.55, 3.74)
pt3dadd(1184.66, 3953.68, 117.55, 3.74)
pt3dadd(1184.66, 3954.45, 117.55, 3.74)
pt3dadd(1185, 3954.83, 117.55, 3.74)
pt3dadd(1185.34, 3955.22, 117.55, 3.74)
pt3dadd(1185.34, 3955.99, 117.55, 3.74)
pt3dadd(1185.68, 3956.38, 117.55, 3.74)
pt3dadd(1186.02, 3956.76, 117.55, 3.74)
pt3dadd(1186.36, 3957.15, 117.55, 3.74)
pt3dadd(1186.36, 3957.92, 117.55, 3.74)
pt3dadd(1186.7, 3958.31, 117.55, 3.74)
pt3dadd(1187.04, 3958.69, 117.55, 3.74)
pt3dadd(1187.04, 3959.85, 117.55, 3.74)
pt3dadd(1187.38, 3960.24, 117.55, 3.74)
pt3dadd(1187.38, 3961.01, 117.55, 3.74)
pt3dadd(1187.72, 3961.39, 117.55, 3.74)
pt3dadd(1187.72, 3962.16, 117.55, 3.74)
pt3dadd(1188.06, 3962.55, 117.55, 3.74)
pt3dadd(1188.06, 3964.87, 117.55, 3.74)
pt3dadd(1188.4, 3965.25, 117.55, 3.74)
pt3dadd(1188.4, 3967.18, 117.55, 3.74)
pt3dadd(1188.74, 3967.57, 117.55, 3.74)
pt3dadd(1188.74, 3968.34, 117.55, 3.74)
pt3dadd(1189.08, 3968.72, 117.55, 3.74)
pt3dadd(1189.42, 3969.11, 117.55, 3.74)
pt3dadd(1189.76, 3969.88, 117.55, 3.74)
pt3dadd(1190.44, 3970.27, 117.55, 3.06)
pt3dadd(1190.78, 3970.65, 117.55, 3.06)
pt3dadd(1190.78, 3971.81, 117.55, 3.06)
pt3dadd(1191.12, 3972.2, 117.55, 3.06)
pt3dadd(1191.46, 3972.58, 117.55, 3.06)
pt3dadd(1191.8, 3972.97, 117.55, 3.06)
pt3dadd(1192.14, 3973.35, 117.55, 3.06)
pt3dadd(1192.48, 3973.74, 117.55, 3.06)
pt3dadd(1192.48, 3974.51, 117.55, 3.06)
pt3dadd(1192.48, 3972.97, 117.55, 3.06)
pt3dadd(1192.82, 3972.58, 117.55, 3.06)
pt3dadd(1193.16, 3972.97, 117.55, 3.06)
pt3dadd(1193.5, 3973.35, 117.55, 3.06)
pt3dadd(1193.84, 3974.12, 117.55, 3.06)
pt3dadd(1193.84, 3974.9, 117.55, 3.06)
pt3dadd(1194.18, 3975.28, 117.55, 3.06)
pt3dadd(1194.51, 3975.67, 117.55, 3.06)
pt3dadd(1194.51, 3976.44, 117.55, 3.06)
pt3dadd(1194.85, 3977.21, 117.55, 3.06)
pt3dadd(1194.85, 3979.14, 117.55, 3.06)
pt3dadd(1195.19, 3979.53, 117.55, 3.06)
pt3dadd(1195.53, 3979.91, 117.55, 3.06)
pt3dadd(1195.87, 3980.3, 117.55, 3.06)
pt3dadd(1196.21, 3980.68, 117.55, 3.06)
pt3dadd(1196.21, 3981.45, 117.55, 3.06)
pt3dadd(1196.89, 3982.23, 117.55, 3.06)
pt3dadd(1197.57, 3983, 117.55, 3.06)
pt3dadd(1197.91, 3984.16, 117.55, 3.06)
pt3dadd(1198.25, 3984.93, 117.55, 3.06)
pt3dadd(1197.91, 3984.54, 117.55, 3.06)
pt3dadd(1197.57, 3983.77, 117.55, 3.06)
pt3dadd(1197.23, 3983, 117.55, 3.06)
pt3dadd(1196.89, 3982.61, 117.55, 3.06)
pt3dadd(1196.89, 3983.77, 117.55, 3.06)
pt3dadd(1197.23, 3984.16, 117.55, 3.06)
pt3dadd(1197.57, 3984.93, 117.55, 3.06)
pt3dadd(1197.91, 3985.7, 117.55, 3.06)
pt3dadd(1198.59, 3986.08, 117.55, 3.06)
pt3dadd(1198.93, 3986.86, 117.55, 3.06)
pt3dadd(1199.61, 3988.01, 117.55, 3.06)
pt3dadd(1199.61, 3989.94, 117.55, 3.06)
pt3dadd(1198.59, 3989.94, 117.55, 3.06)
pt3dadd(1198.59, 3985.31, 117.55, 3.06)
pt3dadd(1198.25, 3984.93, 117.55, 3.06)
pt3dadd(1198.25, 3983.77, 117.55, 3.06)
pt3dadd(1198.25, 3988.01, 117.55, 3.06)
pt3dadd(1198.59, 3988.79, 117.55, 3.06)
pt3dadd(1198.59, 3990.33, 117.55, 3.06)
}
}
proc shape3d_105() {
dend[69] { pt3dadd(1198.93, 3991.1, 117.55, 3.06)
pt3dadd(1199.27, 3992.26, 117.55, 3.06)
pt3dadd(1199.27, 3993.42, 117.55, 3.06)
pt3dadd(1199.61, 3993.8, 117.55, 3.06)
pt3dadd(1199.95, 3994.19, 117.55, 3.06)
pt3dadd(1199.95, 3995.73, 117.55, 3.06)
pt3dadd(1200.29, 3996.12, 117.55, 3.06)
pt3dadd(1200.63, 3996.89, 117.55, 3.06)
pt3dadd(1200.63, 3997.66, 117.55, 3.06)
pt3dadd(1200.97, 3998.04, 117.55, 3.06)
pt3dadd(1201.31, 3998.43, 117.55, 3.06)
pt3dadd(1201.31, 3999.2, 117.55, 3.06)
pt3dadd(1201.65, 3999.59, 117.55, 3.06)
pt3dadd(1201.65, 4000.36, 117.55, 3.06)
pt3dadd(1201.99, 4000.75, 117.55, 3.06)
pt3dadd(1202.33, 4001.52, 117.55, 3.06)
pt3dadd(1202.33, 4003.45, 117.55, 3.06)
pt3dadd(1202.67, 4003.83, 117.55, 3.06)
pt3dadd(1202.67, 4005.76, 117.55, 3.06)
pt3dadd(1203.01, 4006.15, 117.55, 3.06)
pt3dadd(1203.01, 4012.71, 117.55, 3.06)
pt3dadd(1203.35, 4013.09, 117.55, 3.06)
pt3dadd(1203.35, 4015.41, 117.55, 3.06)
pt3dadd(1203.69, 4016.95, 117.55, 4.08)
pt3dadd(1204.03, 4016.95, 117.55, 4.08)
pt3dadd(1204.03, 4017.72, 117.55, 4.08)
pt3dadd(1204.37, 4018.11, 117.55, 4.08)
pt3dadd(1204.37, 4018.88, 117.55, 4.08)
pt3dadd(1204.71, 4019.26, 117.55, 4.08)
pt3dadd(1204.71, 4020.04, 117.55, 4.08)
pt3dadd(1205.04, 4020.42, 117.55, 4.08)
pt3dadd(1205.38, 4020.81, 117.55, 4.08)
pt3dadd(1205.72, 4021.19, 117.55, 4.08)
pt3dadd(1205.72, 4021.96, 117.55, 4.08)
pt3dadd(1206.06, 4022.35, 117.55, 4.08)
pt3dadd(1206.4, 4022.74, 117.55, 4.08)
pt3dadd(1206.74, 4023.12, 117.55, 4.08)
pt3dadd(1207.08, 4023.51, 117.55, 4.08)
pt3dadd(1207.08, 4024.28, 117.55, 4.08)
pt3dadd(1207.42, 4024.67, 117.55, 4.08)
pt3dadd(1207.42, 4026.21, 117.55, 4.08)
pt3dadd(1207.76, 4026.98, 117.55, 4.08)
pt3dadd(1207.76, 4028.14, 117.55, 4.08)
pt3dadd(1208.1, 4028.91, 117.55, 4.08)
pt3dadd(1208.1, 4029.68, 117.55, 4.08)
pt3dadd(1208.44, 4030.45, 117.55, 4.08)
pt3dadd(1208.1, 4031.61, 117.55, 3.74)
pt3dadd(1208.1, 4032.77, 117.55, 3.74)
pt3dadd(1208.44, 4033.15, 117.55, 3.74)
pt3dadd(1208.44, 4033.92, 117.55, 3.74)
pt3dadd(1208.78, 4034.31, 117.55, 3.74)
pt3dadd(1209.12, 4034.7, 117.55, 3.74)
pt3dadd(1209.46, 4035.08, 117.55, 3.74)
pt3dadd(1209.46, 4043.96, 117.55, 3.74)
pt3dadd(1209.8, 4044.34, 117.55, 3.74)
pt3dadd(1210.14, 4045.11, 117.55, 3.74)
pt3dadd(1210.14, 4049.74, 117.55, 3.74)
pt3dadd(1210.48, 4050.13, 117.55, 3.74)
pt3dadd(1210.48, 4050.9, 117.55, 3.74)
pt3dadd(1210.82, 4051.67, 117.55, 3.74)
pt3dadd(1211.16, 4052.06, 117.55, 3.74)
pt3dadd(1211.16, 4052.83, 117.55, 3.74)
pt3dadd(1211.5, 4053.21, 117.55, 3.74)
pt3dadd(1211.84, 4053.99, 117.55, 3.74)
pt3dadd(1212.18, 4054.37, 117.55, 3.74)
pt3dadd(1212.18, 4055.14, 117.55, 3.74)
pt3dadd(1212.52, 4055.53, 117.55, 3.74)
pt3dadd(1212.86, 4056.3, 117.55, 3.74)
pt3dadd(1213.54, 4057.07, 117.55, 3.74)
pt3dadd(1213.88, 4057.46, 117.55, 3.74)
pt3dadd(1214.22, 4058.23, 117.55, 3.74)
pt3dadd(1214.56, 4059, 117.55, 3.74)
pt3dadd(1214.9, 4059.39, 117.55, 3.74)
pt3dadd(1215.24, 4060.16, 117.55, 3.74)
pt3dadd(1215.57, 4060.54, 117.55, 3.74)
pt3dadd(1215.91, 4061.32, 117.55, 3.74)
pt3dadd(1216.25, 4061.7, 117.55, 3.74)
pt3dadd(1216.59, 4062.47, 117.55, 3.74)
pt3dadd(1216.93, 4062.86, 117.55, 3.74)
pt3dadd(1217.27, 4063.63, 117.55, 3.74)
pt3dadd(1217.27, 4064.4, 117.55, 3.74)
pt3dadd(1217.61, 4064.79, 117.55, 3.74)
pt3dadd(1217.95, 4065.17, 117.55, 3.74)
pt3dadd(1217.95, 4066.33, 117.55, 3.74)
pt3dadd(1218.29, 4067.1, 117.55, 3.74)
pt3dadd(1218.63, 4067.49, 117.55, 3.74)
pt3dadd(1218.63, 4068.26, 117.55, 3.74)
pt3dadd(1218.97, 4068.65, 117.55, 3.74)
pt3dadd(1218.97, 4069.42, 117.55, 3.74)
pt3dadd(1219.31, 4069.8, 117.55, 3.74)
pt3dadd(1219.31, 4070.96, 117.55, 3.74)
pt3dadd(1219.65, 4071.35, 117.55, 3.74)
pt3dadd(1219.99, 4071.73, 117.55, 3.74)
pt3dadd(1219.99, 4072.89, 117.55, 3.74)
pt3dadd(1220.33, 4073.28, 117.55, 3.74)
pt3dadd(1220.33, 4075.2, 117.55, 3.74)
pt3dadd(1220.67, 4075.59, 117.55, 3.74)
pt3dadd(1220.67, 4076.36, 117.55, 3.74)
pt3dadd(1221.01, 4076.75, 117.55, 3.74)
pt3dadd(1221.01, 4077.52, 117.55, 3.74)
pt3dadd(1221.35, 4077.91, 117.55, 3.74)
pt3dadd(1221.35, 4079.06, 117.55, 3.74)
pt3dadd(1221.69, 4079.45, 117.55, 3.74)
pt3dadd(1222.03, 4079.83, 117.55, 3.74)
pt3dadd(1222.03, 4080.99, 117.55, 3.74)
pt3dadd(1222.37, 4081.38, 117.55, 3.74)
pt3dadd(1222.71, 4081.76, 117.55, 3.74)
pt3dadd(1222.71, 4082.54, 117.55, 3.74)
pt3dadd(1223.05, 4083.31, 117.55, 3.74)
pt3dadd(1223.39, 4083.69, 117.55, 3.74)
pt3dadd(1223.39, 4084.46, 117.55, 3.74)
pt3dadd(1223.73, 4084.85, 117.55, 3.74)
pt3dadd(1223.73, 4085.62, 117.55, 3.74)
pt3dadd(1224.07, 4086.01, 117.55, 3.74)
pt3dadd(1224.07, 4087.55, 117.55, 3.74)
pt3dadd(1224.41, 4087.94, 117.55, 3.74)
pt3dadd(1224.41, 4088.71, 117.55, 3.74)
pt3dadd(1224.75, 4089.09, 117.55, 3.74)
pt3dadd(1225.09, 4089.48, 117.55, 3.74)
pt3dadd(1225.09, 4090.25, 117.55, 3.74)
pt3dadd(1225.43, 4091.02, 117.55, 3.74)
pt3dadd(1225.76, 4091.41, 117.55, 3.74)
pt3dadd(1225.76, 4092.18, 117.55, 3.74)
pt3dadd(1226.1, 4092.57, 117.55, 3.74)
pt3dadd(1226.1, 4093.34, 117.55, 3.74)
pt3dadd(1226.44, 4093.72, 117.55, 3.74)
pt3dadd(1226.44, 4096.42, 117.55, 3.74)
pt3dadd(1226.78, 4096.81, 117.55, 3.74)
pt3dadd(1227.12, 4097.58, 117.55, 3.74)
pt3dadd(1227.12, 4098.35, 117.55, 3.74)
pt3dadd(1227.46, 4098.74, 117.55, 3.74)
pt3dadd(1227.8, 4099.13, 117.55, 3.74)
pt3dadd(1227.8, 4099.9, 117.55, 3.74)
pt3dadd(1228.14, 4100.28, 117.55, 3.74)
pt3dadd(1228.48, 4100.67, 117.55, 3.74)
pt3dadd(1228.82, 4101.05, 117.55, 3.74)
pt3dadd(1228.82, 4101.83, 117.55, 3.74)
pt3dadd(1229.16, 4102.21, 117.55, 3.74)
pt3dadd(1229.5, 4102.6, 117.55, 3.74)
pt3dadd(1229.5, 4103.75, 117.55, 3.74)
pt3dadd(1229.84, 4104.53, 117.55, 3.74)
pt3dadd(1230.18, 4104.91, 117.55, 3.74)
pt3dadd(1230.52, 4105.3, 117.55, 3.74)
pt3dadd(1230.86, 4106.07, 117.55, 3.74)
pt3dadd(1231.2, 4106.46, 117.55, 3.74)
pt3dadd(1231.54, 4106.84, 117.55, 3.74)
pt3dadd(1231.88, 4107.23, 117.55, 3.74)
pt3dadd(1231.88, 4108, 117.55, 3.74)
pt3dadd(1232.22, 4108.38, 117.55, 3.74)
pt3dadd(1232.56, 4109.16, 117.55, 3.74)
pt3dadd(1232.9, 4109.93, 117.55, 3.74)
pt3dadd(1233.24, 4110.31, 117.55, 3.74)
pt3dadd(1233.58, 4110.7, 117.55, 3.74)
pt3dadd(1233.58, 4111.47, 117.55, 3.74)
pt3dadd(1233.92, 4111.86, 117.55, 3.74)
pt3dadd(1233.92, 4112.63, 117.55, 3.74)
pt3dadd(1234.26, 4113.01, 117.55, 3.74)
pt3dadd(1234.6, 4113.4, 117.55, 3.74)
pt3dadd(1234.94, 4113.79, 117.55, 3.74)
pt3dadd(1234.94, 4115.33, 117.55, 3.74)
pt3dadd(1235.28, 4115.71, 117.55, 3.74)
pt3dadd(1235.28, 4116.49, 117.55, 3.74)
pt3dadd(1235.62, 4116.87, 117.55, 3.74)
pt3dadd(1235.96, 4117.26, 117.55, 3.74)
pt3dadd(1236.29, 4117.64, 117.55, 3.74)
pt3dadd(1236.63, 4118.42, 117.55, 3.74)
pt3dadd(1236.97, 4119.19, 117.55, 3.74)
pt3dadd(1237.99, 4120.34, 117.55, 4.76)
pt3dadd(1238.33, 4120.73, 117.55, 4.76)
pt3dadd(1238.67, 4121.12, 117.55, 4.76)
pt3dadd(1238.67, 4121.89, 117.55, 4.76)
pt3dadd(1239.01, 4122.66, 117.55, 4.76)
pt3dadd(1239.35, 4123.04, 117.55, 4.76)
pt3dadd(1239.69, 4123.82, 117.55, 4.76)
pt3dadd(1239.69, 4124.59, 117.55, 4.76)
pt3dadd(1240.03, 4124.97, 117.55, 4.76)
pt3dadd(1240.37, 4125.36, 117.55, 4.76)
pt3dadd(1240.37, 4126.52, 117.55, 4.76)
pt3dadd(1240.71, 4126.9, 117.55, 4.76)
pt3dadd(1241.05, 4127.29, 117.55, 4.76)
pt3dadd(1241.39, 4127.67, 117.55, 4.76)
pt3dadd(1241.39, 4128.45, 117.55, 4.76)
pt3dadd(1241.73, 4128.83, 117.55, 4.76)
pt3dadd(1242.07, 4129.22, 117.55, 4.76)
pt3dadd(1242.07, 4133.85, 117.55, 4.76)
pt3dadd(1242.41, 4134.23, 117.55, 4.76)
pt3dadd(1242.41, 4135.78, 117.55, 4.76)
pt3dadd(1242.75, 4136.16, 117.55, 4.76)
pt3dadd(1243.09, 4136.55, 117.55, 4.76)
pt3dadd(1243.09, 4137.32, 117.55, 4.76)
pt3dadd(1243.43, 4138.09, 117.55, 4.76)
pt3dadd(1243.77, 4138.48, 117.55, 4.76)
pt3dadd(1244.11, 4138.86, 117.55, 4.76)
pt3dadd(1244.11, 4143.11, 117.55, 4.76)
pt3dadd(1244.11, 4141.56, 117.55, 4.76)
pt3dadd(1243.77, 4140.79, 117.55, 4.76)
pt3dadd(1243.77, 4135, 117.55, 4.76)
pt3dadd(1243.77, 4145.42, 117.55, 4.76)
pt3dadd(1244.11, 4145.81, 117.55, 4.76)
pt3dadd(1244.45, 4146.19, 117.55, 4.76)
}
}
proc shape3d_106() {
dend[69] { pt3dadd(1244.45, 4146.96, 117.55, 4.76)
pt3dadd(1244.79, 4147.35, 117.55, 4.76)
pt3dadd(1245.13, 4147.74, 117.55, 4.76)
pt3dadd(1245.47, 4148.51, 117.55, 4.76)
pt3dadd(1245.81, 4148.89, 117.55, 4.76)
pt3dadd(1245.81, 4149.67, 117.55, 4.76)
pt3dadd(1246.15, 4150.44, 117.55, 4.76)
pt3dadd(1246.15, 4150.82, 117.55, 4.76)
pt3dadd(1246.15, 4150.05, 117.55, 4.76)
pt3dadd(1245.81, 4149.67, 117.55, 4.76)
pt3dadd(1245.13, 4149.67, 117.55, 4.76)
pt3dadd(1245.13, 4150.05, 117.55, 4.76)
pt3dadd(1245.47, 4150.82, 117.55, 4.76)
pt3dadd(1245.81, 4151.21, 117.55, 4.76)
pt3dadd(1246.15, 4151.98, 117.55, 4.76)
pt3dadd(1246.49, 4152.37, 117.55, 4.76)
pt3dadd(1246.82, 4152.75, 117.55, 4.76)
pt3dadd(1247.16, 4153.14, 117.55, 4.76)
pt3dadd(1247.5, 4153.52, 117.55, 4.76)
pt3dadd(1247.84, 4153.91, 117.55, 4.76)
pt3dadd(1248.18, 4154.29, 117.55, 4.76)
pt3dadd(1248.52, 4154.68, 117.55, 4.76)
pt3dadd(1248.86, 4155.07, 117.55, 4.76)
pt3dadd(1249.2, 4155.45, 117.55, 4.76)
pt3dadd(1249.54, 4155.84, 117.55, 4.76)
pt3dadd(1249.88, 4156.22, 117.55, 4.76)
pt3dadd(1250.22, 4156.61, 117.55, 4.76)
pt3dadd(1250.22, 4158.15, 117.55, 4.76)
pt3dadd(1250.56, 4158.54, 117.55, 4.76)
pt3dadd(1252.26, 4158.54, 117.55, 4.76)
pt3dadd(1253.62, 4159.7, 117.55, 4.08)
pt3dadd(1253.96, 4160.08, 117.55, 4.08)
pt3dadd(1254.3, 4160.85, 117.55, 4.08)
pt3dadd(1254.64, 4161.24, 117.55, 4.08)
pt3dadd(1254.64, 4162.01, 117.55, 4.08)
pt3dadd(1254.98, 4162.4, 117.55, 4.08)
pt3dadd(1255.32, 4162.78, 117.55, 4.08)
pt3dadd(1256, 4163.55, 117.55, 4.08)
pt3dadd(1256.34, 4164.33, 117.55, 4.08)
pt3dadd(1256.34, 4165.1, 117.55, 4.08)
pt3dadd(1256.68, 4165.48, 117.55, 4.08)
pt3dadd(1257.01, 4166.25, 117.55, 4.08)
pt3dadd(1257.01, 4167.03, 117.55, 4.08)
pt3dadd(1257.35, 4167.41, 117.55, 4.08)
pt3dadd(1257.69, 4167.8, 117.55, 4.08)
pt3dadd(1257.69, 4170.88, 117.55, 4.08)
pt3dadd(1258.03, 4171.27, 117.55, 4.08)
pt3dadd(1258.03, 4172.04, 117.55, 4.08)
pt3dadd(1258.37, 4172.43, 117.55, 4.08)
pt3dadd(1258.37, 4175.13, 117.55, 4.08)
pt3dadd(1258.71, 4175.51, 117.55, 4.08)
pt3dadd(1258.71, 4177.06, 117.55, 4.08)
pt3dadd(1259.05, 4178.21, 117.55, 4.08)
pt3dadd(1259.39, 4178.6, 117.55, 4.08)
pt3dadd(1259.39, 4180.14, 117.55, 4.08)
pt3dadd(1259.73, 4180.53, 117.55, 4.08)
pt3dadd(1260.07, 4181.3, 117.55, 4.08)
pt3dadd(1260.41, 4182.07, 117.55, 4.08)
pt3dadd(1260.75, 4182.84, 117.55, 4.08)
pt3dadd(1261.09, 4183.62, 117.55, 4.08)
pt3dadd(1261.43, 4184, 117.55, 4.08)
pt3dadd(1261.09, 4185.54, 117.55, 3.06)
pt3dadd(1261.09, 4184.77, 117.55, 3.06)
pt3dadd(1261.43, 4185.16, 117.55, 3.06)
pt3dadd(1261.77, 4185.93, 117.55, 3.06)
pt3dadd(1261.77, 4186.7, 117.55, 3.06)
pt3dadd(1262.11, 4187.09, 117.55, 3.06)
pt3dadd(1262.45, 4187.86, 117.55, 3.06)
pt3dadd(1262.79, 4188.63, 117.55, 3.06)
pt3dadd(1263.13, 4189.02, 117.55, 3.06)
pt3dadd(1263.13, 4189.79, 117.55, 3.06)
pt3dadd(1263.47, 4190.17, 117.55, 3.06)
pt3dadd(1263.81, 4190.56, 117.55, 3.06)
pt3dadd(1263.81, 4191.33, 117.55, 3.06)
pt3dadd(1264.15, 4191.72, 117.55, 3.06)
pt3dadd(1264.49, 4192.49, 117.55, 3.06)
pt3dadd(1264.83, 4192.88, 117.55, 3.06)
pt3dadd(1265.17, 4193.26, 117.55, 3.06)
pt3dadd(1265.17, 4194.03, 117.55, 3.06)
pt3dadd(1265.51, 4194.42, 117.55, 3.06)
pt3dadd(1265.85, 4194.8, 117.55, 3.06)
pt3dadd(1266.19, 4195.19, 117.55, 3.06)
pt3dadd(1266.53, 4195.58, 117.55, 3.06)
pt3dadd(1266.87, 4196.35, 117.55, 3.06)
pt3dadd(1267.21, 4196.73, 117.55, 3.06)
pt3dadd(1267.54, 4197.12, 117.55, 3.06)
pt3dadd(1267.88, 4197.5, 117.55, 3.06)
pt3dadd(1267.88, 4198.28, 117.55, 3.06)
pt3dadd(1268.22, 4199.05, 117.55, 3.06)
pt3dadd(1268.56, 4199.43, 117.55, 3.06)
pt3dadd(1268.56, 4200.59, 117.55, 3.06)
pt3dadd(1268.9, 4200.98, 117.55, 3.06)
pt3dadd(1269.24, 4201.36, 117.55, 3.06)
pt3dadd(1269.24, 4202.91, 117.55, 3.06)
pt3dadd(1269.58, 4203.29, 117.55, 3.06)
pt3dadd(1269.58, 4211.01, 117.55, 3.06)
pt3dadd(1269.92, 4211.39, 117.55, 3.06)
pt3dadd(1269.92, 4212.94, 117.55, 3.06)
pt3dadd(1270.26, 4213.71, 117.55, 3.06)
pt3dadd(1270.6, 4214.48, 117.55, 3.06)
pt3dadd(1270.6, 4216.02, 117.55, 3.06)
pt3dadd(1271.96, 4215.64, 117.55, 4.08)
pt3dadd(1272.3, 4216.02, 117.55, 4.08)
pt3dadd(1272.64, 4216.41, 117.55, 4.08)
pt3dadd(1272.64, 4217.18, 117.55, 4.08)
pt3dadd(1272.98, 4217.57, 117.55, 4.08)
pt3dadd(1273.32, 4217.95, 117.55, 4.08)
pt3dadd(1273.66, 4218.34, 117.55, 4.08)
pt3dadd(1273.66, 4219.11, 117.55, 4.08)
pt3dadd(1274, 4219.5, 117.55, 4.08)
pt3dadd(1274.34, 4220.27, 117.55, 4.08)
pt3dadd(1274.68, 4220.65, 117.55, 4.08)
pt3dadd(1275.02, 4221.04, 117.55, 4.08)
pt3dadd(1275.02, 4222.2, 117.55, 4.08)
pt3dadd(1275.36, 4222.58, 117.55, 4.08)
pt3dadd(1275.7, 4222.97, 117.55, 4.08)
pt3dadd(1275.7, 4223.74, 117.55, 4.08)
pt3dadd(1276.04, 4224.51, 117.55, 4.08)
pt3dadd(1276.04, 4225.28, 117.55, 4.08)
pt3dadd(1276.38, 4225.67, 117.55, 4.08)
pt3dadd(1276.72, 4226.44, 117.55, 4.08)
pt3dadd(1277.06, 4226.83, 117.55, 4.08)
pt3dadd(1277.06, 4227.6, 117.55, 4.08)
pt3dadd(1277.4, 4227.98, 117.55, 4.08)
pt3dadd(1277.4, 4231.46, 117.55, 4.08)
pt3dadd(1277.74, 4231.84, 117.55, 4.08)
pt3dadd(1277.74, 4233.38, 117.55, 4.08)
pt3dadd(1278.07, 4233.77, 117.55, 4.08)
pt3dadd(1278.07, 4234.54, 117.55, 4.08)
pt3dadd(1278.41, 4234.93, 117.55, 4.08)
pt3dadd(1278.41, 4236.08, 117.55, 4.08)
pt3dadd(1278.75, 4236.47, 117.55, 4.08)
pt3dadd(1279.09, 4236.86, 117.55, 4.08)
pt3dadd(1279.09, 4237.63, 117.55, 4.08)
pt3dadd(1279.43, 4238.01, 117.55, 4.08)
pt3dadd(1279.77, 4238.4, 117.55, 4.08)
pt3dadd(1279.77, 4239.17, 117.55, 4.08)
pt3dadd(1280.11, 4239.56, 117.55, 4.08)
pt3dadd(1280.11, 4240.33, 117.55, 4.08)
pt3dadd(1280.45, 4240.71, 117.55, 4.08)
pt3dadd(1280.79, 4241.1, 117.55, 4.08)
pt3dadd(1281.13, 4241.49, 117.55, 4.08)
pt3dadd(1281.13, 4242.26, 117.55, 4.08)
pt3dadd(1281.47, 4242.64, 117.55, 4.08)
pt3dadd(1281.81, 4243.03, 117.55, 4.08)
pt3dadd(1282.15, 4243.42, 117.55, 4.08)
pt3dadd(1282.15, 4244.19, 117.55, 4.08)
pt3dadd(1282.49, 4244.57, 117.55, 4.08)
pt3dadd(1282.83, 4245.34, 117.55, 4.08)
pt3dadd(1283.17, 4245.73, 117.55, 4.08)
pt3dadd(1283.85, 4246.89, 117.55, 3.74)
pt3dadd(1284.19, 4247.27, 117.55, 3.74)
pt3dadd(1284.53, 4247.66, 117.55, 3.74)
pt3dadd(1284.87, 4248.04, 117.55, 3.74)
pt3dadd(1285.21, 4248.43, 117.55, 3.74)
pt3dadd(1285.21, 4249.2, 117.55, 3.74)
pt3dadd(1285.55, 4249.59, 117.55, 3.74)
pt3dadd(1285.89, 4249.97, 117.55, 3.74)
pt3dadd(1285.89, 4250.75, 117.55, 3.74)
pt3dadd(1286.23, 4251.13, 117.55, 3.74)
pt3dadd(1286.57, 4251.52, 117.55, 3.74)
pt3dadd(1286.91, 4251.9, 117.55, 3.74)
pt3dadd(1286.91, 4253.06, 117.55, 3.74)
pt3dadd(1287.25, 4253.45, 117.55, 3.74)
pt3dadd(1287.59, 4253.83, 117.55, 3.74)
pt3dadd(1287.93, 4254.22, 117.55, 3.74)
pt3dadd(1287.93, 4255.38, 117.55, 3.74)
pt3dadd(1288.26, 4255.76, 117.55, 3.74)
pt3dadd(1288.6, 4256.15, 117.55, 3.74)
pt3dadd(1288.6, 4256.92, 117.55, 3.74)
pt3dadd(1288.94, 4257.3, 117.55, 3.74)
pt3dadd(1289.28, 4258.08, 117.55, 3.74)
pt3dadd(1289.62, 4258.46, 117.55, 3.74)
pt3dadd(1289.62, 4259.23, 117.55, 3.74)
pt3dadd(1289.96, 4259.62, 117.55, 3.74)
pt3dadd(1290.3, 4260, 117.55, 3.74)
pt3dadd(1290.64, 4260.39, 117.55, 3.74)
pt3dadd(1290.98, 4260.78, 117.55, 3.74)
pt3dadd(1291.32, 4261.16, 117.55, 3.74)
pt3dadd(1291.32, 4261.93, 117.55, 3.74)
pt3dadd(1291.66, 4262.32, 117.55, 3.74)
pt3dadd(1292, 4262.71, 117.55, 3.74)
pt3dadd(1292, 4263.48, 117.55, 3.74)
pt3dadd(1292.34, 4263.86, 117.55, 3.74)
pt3dadd(1292.68, 4264.25, 117.55, 3.74)
pt3dadd(1292.68, 4265.02, 117.55, 3.74)
pt3dadd(1293.02, 4265.41, 117.55, 3.74)
pt3dadd(1293.02, 4266.95, 117.55, 4.42)
pt3dadd(1293.02, 4267.33, 117.55, 4.42)
pt3dadd(1293.36, 4268.11, 117.55, 4.42)
pt3dadd(1294.04, 4268.88, 117.55, 4.42)
pt3dadd(1294.04, 4269.65, 117.55, 4.42)
pt3dadd(1294.38, 4270.42, 117.55, 4.42)
pt3dadd(1294.72, 4270.81, 117.55, 4.42)
pt3dadd(1294.72, 4271.58, 117.55, 4.42)
pt3dadd(1295.06, 4271.96, 117.55, 4.42)
pt3dadd(1295.06, 4273.12, 117.55, 4.42)
pt3dadd(1295.4, 4273.89, 117.55, 4.42)
pt3dadd(1295.74, 4274.28, 117.55, 4.42)
pt3dadd(1295.74, 4275.05, 117.55, 4.42)
}
}
proc shape3d_107() {
dend[69] { pt3dadd(1296.08, 4275.82, 117.55, 4.42)
pt3dadd(1296.42, 4276.59, 117.55, 4.42)
pt3dadd(1296.76, 4276.98, 117.55, 4.42)
pt3dadd(1296.76, 4278.14, 117.55, 4.42)
pt3dadd(1297.1, 4278.52, 117.55, 4.42)
pt3dadd(1297.44, 4278.91, 117.55, 4.42)
pt3dadd(1297.78, 4279.29, 117.55, 4.42)
pt3dadd(1298.12, 4279.68, 117.55, 4.42)
pt3dadd(1298.46, 4280.07, 117.55, 4.42)
pt3dadd(1298.79, 4280.84, 117.55, 4.42)
pt3dadd(1299.13, 4281.61, 117.55, 4.42)
pt3dadd(1299.47, 4282.38, 117.55, 4.42)
pt3dadd(1299.81, 4282.77, 117.55, 4.42)
pt3dadd(1300.15, 4283.15, 117.55, 4.42)
pt3dadd(1300.49, 4283.54, 117.55, 4.42)
pt3dadd(1300.83, 4283.92, 117.55, 4.42)
pt3dadd(1300.83, 4284.7, 117.55, 4.42)
pt3dadd(1301.17, 4285.08, 117.55, 4.42)
pt3dadd(1301.51, 4285.47, 117.55, 4.42)
pt3dadd(1301.51, 4286.24, 117.55, 4.42)
pt3dadd(1301.85, 4286.63, 117.55, 4.42)
pt3dadd(1301.85, 4287.4, 117.55, 4.42)
pt3dadd(1302.19, 4287.78, 117.55, 4.42)
pt3dadd(1302.53, 4288.17, 117.55, 4.42)
pt3dadd(1302.53, 4288.94, 117.55, 4.42)
pt3dadd(1302.87, 4289.33, 117.55, 4.42)
pt3dadd(1303.21, 4289.71, 117.55, 4.42)
pt3dadd(1303.55, 4290.48, 117.55, 4.42)
pt3dadd(1303.89, 4290.87, 117.55, 4.42)
pt3dadd(1303.89, 4292.41, 117.55, 4.42)
pt3dadd(1304.23, 4292.8, 117.55, 4.42)
pt3dadd(1304.57, 4293.18, 117.55, 4.42)
pt3dadd(1304.57, 4294.34, 117.55, 4.42)
pt3dadd(1304.91, 4294.73, 117.55, 4.42)
pt3dadd(1305.25, 4295.11, 117.55, 4.42)
pt3dadd(1305.25, 4295.88, 117.55, 4.42)
pt3dadd(1305.59, 4296.27, 117.55, 4.42)
pt3dadd(1305.59, 4298.97, 117.55, 4.42)
pt3dadd(1305.93, 4299.36, 117.55, 4.42)
pt3dadd(1305.93, 4300.9, 117.55, 4.42)
pt3dadd(1306.27, 4301.29, 117.55, 4.42)
pt3dadd(1306.27, 4302.06, 117.55, 4.42)
pt3dadd(1306.61, 4302.44, 117.55, 4.42)
pt3dadd(1306.95, 4302.83, 117.55, 4.42)
pt3dadd(1307.29, 4303.21, 117.55, 4.42)
pt3dadd(1307.29, 4303.99, 117.55, 4.42)
pt3dadd(1307.63, 4304.37, 117.55, 4.42)
pt3dadd(1307.97, 4304.76, 117.55, 4.42)
pt3dadd(1308.31, 4305.14, 117.55, 4.42)
pt3dadd(1308.65, 4305.92, 117.55, 4.42)
pt3dadd(1308.99, 4306.3, 117.55, 4.42)
pt3dadd(1309.32, 4307.07, 117.55, 4.42)
pt3dadd(1309.66, 4307.46, 117.55, 4.42)
pt3dadd(1309.66, 4308.23, 117.55, 4.42)
pt3dadd(1310, 4308.62, 117.55, 4.42)
pt3dadd(1310.34, 4309, 117.55, 4.42)
pt3dadd(1310.34, 4310.16, 117.55, 4.42)
pt3dadd(1310.68, 4310.54, 117.55, 4.42)
pt3dadd(1311.02, 4310.93, 117.55, 4.42)
pt3dadd(1311.36, 4311.32, 117.55, 4.42)
pt3dadd(1311.36, 4312.09, 117.55, 4.42)
pt3dadd(1311.7, 4312.47, 117.55, 4.42)
pt3dadd(1312.04, 4313.25, 117.55, 4.42)
pt3dadd(1312.38, 4313.63, 117.55, 4.42)
pt3dadd(1312.72, 4314.4, 117.55, 4.42)
pt3dadd(1313.06, 4314.79, 117.55, 4.42)
pt3dadd(1313.06, 4318.65, 117.55, 4.42)
pt3dadd(1313.4, 4319.03, 117.55, 4.42)
pt3dadd(1313.4, 4320.19, 117.55, 4.42)
pt3dadd(1313.74, 4320.58, 117.55, 4.42)
pt3dadd(1313.74, 4322.5, 117.55, 4.42)
pt3dadd(1313.4, 4324.82, 117.55, 4.76)
pt3dadd(1315.44, 4325.59, 117.55, 3.74)
pt3dadd(1316.12, 4325.59, 117.55, 3.74)
pt3dadd(1316.46, 4325.98, 117.55, 3.74)
pt3dadd(1316.8, 4326.36, 117.55, 3.74)
pt3dadd(1317.14, 4326.75, 117.55, 3.74)
pt3dadd(1317.48, 4327.13, 117.55, 3.74)
pt3dadd(1317.82, 4327.91, 117.55, 3.74)
pt3dadd(1318.16, 4328.29, 117.55, 3.74)
pt3dadd(1318.5, 4328.68, 117.55, 3.74)
pt3dadd(1318.84, 4329.06, 117.55, 3.74)
pt3dadd(1319.18, 4329.45, 117.55, 3.74)
pt3dadd(1319.51, 4329.83, 117.55, 3.74)
pt3dadd(1319.85, 4330.22, 117.55, 3.74)
pt3dadd(1319.85, 4330.99, 117.55, 3.74)
pt3dadd(1320.19, 4331.38, 117.55, 3.74)
pt3dadd(1320.53, 4332.15, 117.55, 3.74)
pt3dadd(1320.87, 4332.54, 117.55, 3.74)
pt3dadd(1321.21, 4332.92, 117.55, 3.74)
pt3dadd(1321.55, 4333.31, 117.55, 3.74)
pt3dadd(1321.89, 4333.69, 117.55, 3.74)
pt3dadd(1321.89, 4334.46, 117.55, 3.74)
pt3dadd(1322.23, 4335.24, 117.55, 3.74)
pt3dadd(1322.57, 4335.62, 117.55, 3.74)
pt3dadd(1322.91, 4336.39, 117.55, 3.74)
pt3dadd(1323.25, 4336.78, 117.55, 3.74)
pt3dadd(1323.59, 4337.17, 117.55, 3.74)
pt3dadd(1323.93, 4337.55, 117.55, 3.74)
pt3dadd(1323.93, 4338.32, 117.55, 3.74)
pt3dadd(1324.27, 4338.71, 117.55, 3.74)
pt3dadd(1324.61, 4339.09, 117.55, 3.74)
pt3dadd(1324.61, 4339.87, 117.55, 3.74)
pt3dadd(1324.95, 4340.64, 117.55, 3.74)
pt3dadd(1325.29, 4341.02, 117.55, 3.74)
pt3dadd(1325.63, 4341.41, 117.55, 3.74)
pt3dadd(1325.97, 4341.79, 117.55, 3.74)
pt3dadd(1326.31, 4342.18, 117.55, 3.74)
pt3dadd(1326.65, 4342.57, 117.55, 3.74)
pt3dadd(1326.65, 4343.34, 117.55, 3.74)
pt3dadd(1326.99, 4343.72, 117.55, 3.74)
pt3dadd(1327.33, 4344.11, 117.55, 3.74)
pt3dadd(1327.67, 4344.5, 117.55, 3.74)
pt3dadd(1328.01, 4344.88, 117.55, 3.74)
pt3dadd(1328.35, 4345.27, 117.55, 3.74)
pt3dadd(1328.69, 4345.65, 117.55, 3.74)
pt3dadd(1329.03, 4346.04, 117.55, 3.74)
pt3dadd(1329.37, 4346.42, 117.55, 3.74)
pt3dadd(1329.37, 4347.2, 117.55, 3.74)
pt3dadd(1329.71, 4347.58, 117.55, 3.74)
pt3dadd(1330.04, 4347.97, 117.55, 3.74)
pt3dadd(1330.04, 4348.74, 117.55, 3.74)
pt3dadd(1330.38, 4349.13, 117.55, 3.74)
pt3dadd(1330.72, 4349.51, 117.55, 3.74)
pt3dadd(1330.72, 4350.28, 117.55, 3.74)
pt3dadd(1331.06, 4350.67, 117.55, 3.74)
pt3dadd(1331.4, 4351.05, 117.55, 3.74)
pt3dadd(1331.4, 4351.83, 117.55, 3.74)
pt3dadd(1331.74, 4352.21, 117.55, 3.74)
pt3dadd(1332.08, 4352.6, 117.55, 3.74)
pt3dadd(1332.08, 4353.75, 117.55, 3.74)
pt3dadd(1332.42, 4354.14, 117.55, 3.74)
pt3dadd(1332.76, 4354.53, 117.55, 3.74)
pt3dadd(1332.76, 4355.3, 117.55, 3.74)
pt3dadd(1333.1, 4355.68, 117.55, 3.74)
pt3dadd(1333.44, 4356.07, 117.55, 3.74)
pt3dadd(1333.44, 4356.84, 117.55, 3.74)
pt3dadd(1333.78, 4357.23, 117.55, 3.74)
pt3dadd(1334.12, 4357.61, 117.55, 3.74)
pt3dadd(1334.46, 4358, 117.55, 3.74)
pt3dadd(1334.8, 4358.38, 117.55, 3.74)
pt3dadd(1334.8, 4359.16, 117.55, 3.74)
pt3dadd(1335.14, 4359.54, 117.55, 3.74)
pt3dadd(1335.48, 4360.31, 117.55, 3.74)
pt3dadd(1335.82, 4361.47, 117.55, 3.74)
pt3dadd(1336.16, 4362.24, 117.55, 3.74)
pt3dadd(1336.16, 4363.4, 117.55, 3.74)
pt3dadd(1336.5, 4363.79, 117.55, 3.74)
pt3dadd(1336.16, 4363.4, 117.55, 3.74)
pt3dadd(1335.82, 4363.01, 117.55, 3.74)
pt3dadd(1335.48, 4362.63, 117.55, 3.74)
pt3dadd(1335.14, 4362.24, 117.55, 3.74)
pt3dadd(1335.14, 4361.47, 117.55, 3.74)
pt3dadd(1334.8, 4361.08, 117.55, 3.74)
pt3dadd(1334.46, 4360.31, 117.55, 3.74)
pt3dadd(1334.12, 4359.93, 117.55, 3.74)
pt3dadd(1333.78, 4359.16, 117.55, 3.74)
pt3dadd(1333.78, 4354.91, 117.55, 3.74)
pt3dadd(1333.44, 4354.53, 117.55, 3.74)
pt3dadd(1333.44, 4353.37, 117.55, 3.74)
pt3dadd(1333.78, 4354.14, 117.55, 3.74)
pt3dadd(1334.12, 4354.53, 117.55, 3.74)
pt3dadd(1334.12, 4355.3, 117.55, 3.74)
pt3dadd(1334.46, 4355.68, 117.55, 3.74)
pt3dadd(1334.8, 4356.07, 117.55, 3.74)
pt3dadd(1335.14, 4356.46, 117.55, 3.74)
pt3dadd(1335.48, 4356.84, 117.55, 3.74)
pt3dadd(1335.48, 4357.61, 117.55, 3.74)
pt3dadd(1335.82, 4358, 117.55, 3.74)
pt3dadd(1336.16, 4358.38, 117.55, 3.74)
pt3dadd(1336.5, 4358.77, 117.55, 3.74)
pt3dadd(1336.5, 4359.54, 117.55, 3.74)
pt3dadd(1336.84, 4359.93, 117.55, 3.74)
pt3dadd(1337.18, 4360.7, 117.55, 3.74)
pt3dadd(1337.18, 4361.47, 117.55, 3.74)
pt3dadd(1337.52, 4361.86, 117.55, 3.74)
pt3dadd(1337.86, 4362.24, 117.55, 3.74)
pt3dadd(1337.86, 4363.01, 117.55, 3.74)
pt3dadd(1338.2, 4363.4, 117.55, 3.74)
pt3dadd(1338.54, 4363.79, 117.55, 3.74)
pt3dadd(1338.88, 4364.56, 117.55, 3.74)
pt3dadd(1339.22, 4364.94, 117.55, 3.74)
pt3dadd(1339.56, 4365.33, 117.55, 3.74)
pt3dadd(1339.9, 4365.71, 117.55, 3.74)
pt3dadd(1340.24, 4366.49, 117.55, 3.74)
pt3dadd(1340.57, 4366.87, 117.55, 3.74)
pt3dadd(1340.91, 4367.26, 117.55, 3.74)
pt3dadd(1340.91, 4368.03, 117.55, 3.74)
pt3dadd(1341.25, 4368.42, 117.55, 3.74)
pt3dadd(1341.59, 4368.8, 117.55, 3.74)
pt3dadd(1341.93, 4369.19, 117.55, 3.74)
pt3dadd(1341.93, 4369.96, 117.55, 3.74)
pt3dadd(1342.27, 4370.73, 117.55, 3.74)
pt3dadd(1342.27, 4371.5, 117.55, 3.74)
pt3dadd(1342.61, 4371.89, 117.55, 3.74)
pt3dadd(1342.95, 4372.27, 117.55, 3.74)
pt3dadd(1342.95, 4373.43, 117.55, 3.74)
pt3dadd(1343.29, 4373.82, 117.55, 3.74)
pt3dadd(1343.63, 4374.2, 117.55, 3.74)
pt3dadd(1343.63, 4374.97, 117.55, 3.74)
}
}
proc shape3d_108() {
dend[69] { pt3dadd(1343.97, 4375.75, 117.55, 3.74)
pt3dadd(1344.31, 4376.52, 117.55, 3.74)
pt3dadd(1344.65, 4376.9, 117.55, 3.74)
pt3dadd(1344.65, 4377.67, 117.55, 3.74)
pt3dadd(1344.99, 4378.06, 117.55, 3.74)
pt3dadd(1344.99, 4378.83, 117.55, 3.74)
pt3dadd(1345.33, 4379.22, 117.55, 3.74)
pt3dadd(1345.67, 4379.6, 117.55, 3.74)
pt3dadd(1346.01, 4379.99, 117.55, 3.74)
pt3dadd(1346.35, 4380.38, 117.55, 3.74)
pt3dadd(1346.69, 4380.76, 117.55, 3.74)
pt3dadd(1347.03, 4381.15, 117.55, 3.74)
pt3dadd(1347.37, 4381.53, 117.55, 3.74)
pt3dadd(1347.71, 4381.92, 117.55, 3.74)
pt3dadd(1348.05, 4382.3, 117.55, 3.74)
pt3dadd(1348.39, 4382.69, 117.55, 3.74)
pt3dadd(1348.73, 4383.08, 117.55, 3.74)
pt3dadd(1349.07, 4383.85, 117.55, 3.74)
pt3dadd(1349.41, 4384.23, 117.55, 3.74)
pt3dadd(1349.75, 4384.62, 117.55, 3.74)
pt3dadd(1350.09, 4385, 117.55, 3.74)
pt3dadd(1350.43, 4385.39, 117.55, 3.74)
pt3dadd(1350.43, 4386.16, 117.55, 3.74)
pt3dadd(1350.76, 4386.55, 117.55, 3.74)
pt3dadd(1351.1, 4387.32, 117.55, 3.74)
pt3dadd(1351.44, 4387.71, 117.55, 3.74)
pt3dadd(1351.78, 4388.09, 117.55, 3.74)
pt3dadd(1352.12, 4388.48, 117.55, 3.74)
pt3dadd(1352.46, 4388.86, 117.55, 3.74)
pt3dadd(1352.46, 4389.63, 117.55, 3.74)
pt3dadd(1352.8, 4390.02, 117.55, 3.74)
pt3dadd(1353.14, 4390.79, 117.55, 3.74)
pt3dadd(1353.48, 4391.56, 117.55, 3.74)
pt3dadd(1353.82, 4391.95, 117.55, 3.74)
pt3dadd(1353.82, 4392.72, 117.55, 3.74)
pt3dadd(1354.16, 4393.11, 117.55, 3.74)
pt3dadd(1354.5, 4393.49, 117.55, 3.74)
pt3dadd(1354.5, 4394.26, 117.55, 3.74)
pt3dadd(1354.84, 4395.04, 117.55, 3.74)
pt3dadd(1354.84, 4396.58, 117.55, 3.74)
pt3dadd(1355.18, 4397.35, 117.55, 3.74)
pt3dadd(1355.52, 4397.74, 117.55, 3.74)
pt3dadd(1355.52, 4398.51, 117.55, 3.74)
pt3dadd(1355.86, 4399.28, 117.55, 3.74)
pt3dadd(1356.2, 4399.67, 117.55, 3.74)
pt3dadd(1356.2, 4400.44, 117.55, 3.74)
pt3dadd(1356.54, 4400.82, 117.55, 3.74)
pt3dadd(1356.88, 4401.21, 117.55, 3.74)
pt3dadd(1356.88, 4401.98, 117.55, 3.74)
pt3dadd(1357.22, 4402.37, 117.55, 3.74)
pt3dadd(1357.56, 4402.75, 117.55, 3.74)
pt3dadd(1357.56, 4403.52, 117.55, 3.74)
pt3dadd(1357.9, 4403.91, 117.55, 3.74)
pt3dadd(1358.24, 4404.29, 117.55, 3.74)
pt3dadd(1358.24, 4405.07, 117.55, 3.74)
pt3dadd(1358.58, 4405.84, 117.55, 3.74)
pt3dadd(1358.58, 4406.61, 117.55, 3.74)
pt3dadd(1358.92, 4407.38, 117.55, 3.74)
pt3dadd(1359.26, 4407.77, 117.55, 3.74)
pt3dadd(1359.26, 4410.08, 117.55, 3.74)
pt3dadd(1359.6, 4410.47, 117.55, 3.74)
pt3dadd(1359.6, 4411.24, 117.55, 3.74)
pt3dadd(1359.94, 4411.63, 117.55, 3.74)
pt3dadd(1359.94, 4412.78, 117.55, 3.74)
pt3dadd(1360.28, 4413.55, 117.55, 3.74)
pt3dadd(1360.62, 4413.94, 117.55, 3.74)
pt3dadd(1360.96, 4414.71, 117.55, 3.74)
pt3dadd(1361.29, 4415.1, 117.55, 3.74)
pt3dadd(1358.24, 4412.4, 117.55, 3.06)
pt3dadd(1358.58, 4412.78, 117.55, 3.06)
pt3dadd(1358.92, 4413.17, 117.55, 3.06)
pt3dadd(1359.26, 4413.55, 117.55, 3.06)
pt3dadd(1359.26, 4414.33, 117.55, 3.06)
pt3dadd(1359.6, 4414.71, 117.55, 3.06)
pt3dadd(1359.94, 4415.1, 117.55, 3.06)
pt3dadd(1360.28, 4415.48, 117.55, 3.06)
pt3dadd(1360.62, 4415.87, 117.55, 3.06)
pt3dadd(1360.62, 4416.64, 117.55, 3.06)
pt3dadd(1360.96, 4417.03, 117.55, 3.06)
pt3dadd(1361.29, 4417.41, 117.55, 3.06)
pt3dadd(1361.29, 4418.18, 117.55, 3.06)
pt3dadd(1361.63, 4418.57, 117.55, 3.06)
pt3dadd(1361.63, 4419.34, 117.55, 3.06)
pt3dadd(1361.97, 4420.11, 117.55, 3.06)
pt3dadd(1361.97, 4421.66, 117.55, 3.06)
pt3dadd(1362.31, 4422.04, 117.55, 3.06)
pt3dadd(1362.31, 4422.81, 117.55, 3.06)
pt3dadd(1362.65, 4423.2, 117.55, 3.06)
pt3dadd(1362.65, 4423.97, 117.55, 3.06)
pt3dadd(1362.99, 4424.36, 117.55, 3.06)
pt3dadd(1363.33, 4424.74, 117.55, 3.06)
pt3dadd(1363.67, 4425.51, 117.55, 3.06)
pt3dadd(1364.01, 4426.29, 117.55, 3.06)
pt3dadd(1364.69, 4427.06, 117.55, 3.06)
pt3dadd(1365.03, 4427.44, 117.55, 3.06)
pt3dadd(1365.37, 4427.83, 117.55, 3.06)
pt3dadd(1365.71, 4428.21, 117.55, 3.06)
pt3dadd(1365.71, 4428.99, 117.55, 3.06)
pt3dadd(1366.05, 4429.37, 117.55, 3.06)
pt3dadd(1366.39, 4429.76, 117.55, 3.06)
pt3dadd(1366.39, 4430.53, 117.55, 3.06)
pt3dadd(1366.73, 4430.92, 117.55, 3.06)
pt3dadd(1367.07, 4431.69, 117.55, 3.06)
pt3dadd(1367.07, 4432.46, 117.55, 3.06)
pt3dadd(1367.41, 4432.84, 117.55, 3.06)
pt3dadd(1367.75, 4433.62, 117.55, 3.06)
pt3dadd(1368.09, 4434.39, 117.55, 3.06)
pt3dadd(1368.43, 4434.77, 117.55, 3.06)
pt3dadd(1368.43, 4435.93, 117.55, 3.06)
pt3dadd(1368.77, 4436.32, 117.55, 3.06)
pt3dadd(1369.11, 4436.7, 117.55, 3.06)
pt3dadd(1369.11, 4437.47, 117.55, 3.06)
pt3dadd(1369.45, 4438.25, 117.55, 3.06)
pt3dadd(1369.79, 4438.63, 117.55, 3.06)
pt3dadd(1369.79, 4439.4, 117.55, 3.06)
pt3dadd(1370.13, 4440.17, 117.55, 3.06)
pt3dadd(1370.13, 4441.33, 117.55, 3.06)
pt3dadd(1370.47, 4441.72, 117.55, 3.06)
pt3dadd(1370.47, 4443.65, 117.55, 3.06)
pt3dadd(1370.81, 4444.03, 117.55, 3.06)
pt3dadd(1370.81, 4445.19, 117.55, 3.06)
pt3dadd(1371.15, 4445.58, 117.55, 3.06)
pt3dadd(1371.49, 4446.35, 117.55, 3.06)
pt3dadd(1371.49, 4447.12, 117.55, 3.06)
pt3dadd(1371.82, 4447.5, 117.55, 3.06)
pt3dadd(1372.16, 4447.89, 117.55, 3.06)
pt3dadd(1372.16, 4448.66, 117.55, 3.06)
pt3dadd(1372.5, 4449.05, 117.55, 3.06)
pt3dadd(1372.84, 4449.43, 117.55, 3.06)
pt3dadd(1372.84, 4450.21, 117.55, 3.06)
pt3dadd(1373.18, 4450.59, 117.55, 3.06)
pt3dadd(1373.52, 4451.36, 117.55, 3.06)
pt3dadd(1373.86, 4452.13, 117.55, 3.06)
pt3dadd(1373.52, 4449.05, 117.55, 3.06)
pt3dadd(1373.86, 4449.43, 117.55, 3.06)
pt3dadd(1373.86, 4450.21, 117.55, 3.06)
pt3dadd(1374.2, 4450.98, 117.55, 3.06)
pt3dadd(1374.54, 4451.36, 117.55, 3.06)
pt3dadd(1374.54, 4452.13, 117.55, 3.06)
pt3dadd(1374.88, 4452.91, 117.55, 3.06)
pt3dadd(1374.88, 4454.06, 117.55, 3.06)
pt3dadd(1375.22, 4454.45, 117.55, 3.06)
pt3dadd(1375.22, 4455.61, 117.55, 3.06)
pt3dadd(1376.58, 4461.78, 117.55, 3.06)
pt3dadd(1375.9, 4460.62, 117.55, 3.74)
pt3dadd(1375.9, 4461.01, 117.55, 3.74)
pt3dadd(1376.24, 4461.39, 117.55, 3.74)
pt3dadd(1376.58, 4461.78, 117.55, 3.74)
pt3dadd(1376.58, 4462.55, 117.55, 3.74)
pt3dadd(1376.92, 4462.94, 117.55, 3.74)
pt3dadd(1376.92, 4463.71, 117.55, 3.74)
pt3dadd(1377.26, 4464.09, 117.55, 3.74)
pt3dadd(1377.6, 4464.48, 117.55, 3.74)
pt3dadd(1377.94, 4464.87, 117.55, 3.74)
pt3dadd(1378.28, 4465.64, 117.55, 3.74)
pt3dadd(1378.62, 4466.02, 117.55, 3.74)
pt3dadd(1378.62, 4466.79, 117.55, 3.74)
pt3dadd(1378.96, 4467.18, 117.55, 3.74)
pt3dadd(1378.96, 4468.34, 117.55, 3.74)
pt3dadd(1379.3, 4468.72, 117.55, 3.74)
pt3dadd(1379.3, 4469.5, 117.55, 3.74)
pt3dadd(1379.64, 4469.88, 117.55, 3.74)
pt3dadd(1379.64, 4471.04, 117.55, 3.74)
pt3dadd(1379.98, 4471.42, 117.55, 3.74)
pt3dadd(1379.98, 4472.97, 117.55, 3.74)
pt3dadd(1380.32, 4473.35, 117.55, 3.74)
pt3dadd(1380.32, 4474.13, 117.55, 3.74)
pt3dadd(1380.66, 4474.51, 117.55, 3.74)
pt3dadd(1380.66, 4475.67, 117.55, 3.74)
pt3dadd(1381, 4476.44, 117.55, 3.74)
pt3dadd(1381, 4477.6, 117.55, 3.74)
pt3dadd(1381.34, 4478.37, 117.55, 3.74)
pt3dadd(1381.34, 4480.3, 117.55, 3.74)
pt3dadd(1381.68, 4480.68, 117.55, 3.74)
pt3dadd(1381.68, 4481.46, 117.55, 3.74)
pt3dadd(1382.01, 4481.84, 117.55, 3.74)
pt3dadd(1382.01, 4482.61, 117.55, 3.74)
pt3dadd(1382.35, 4483, 117.55, 3.74)
pt3dadd(1382.69, 4483.38, 117.55, 3.74)
pt3dadd(1383.03, 4484.16, 117.55, 3.74)
pt3dadd(1383.37, 4484.54, 117.55, 3.74)
pt3dadd(1383.71, 4484.93, 117.55, 3.74)
pt3dadd(1383.71, 4485.7, 117.55, 3.74)
pt3dadd(1384.05, 4486.08, 117.55, 3.74)
pt3dadd(1384.39, 4486.47, 117.55, 3.74)
pt3dadd(1384.39, 4487.24, 117.55, 3.74)
pt3dadd(1384.73, 4487.63, 117.55, 3.74)
pt3dadd(1385.07, 4488.01, 117.55, 3.74)
pt3dadd(1385.07, 4489.56, 117.55, 3.74)
pt3dadd(1385.41, 4489.94, 117.55, 3.74)
pt3dadd(1385.41, 4490.71, 117.55, 3.74)
pt3dadd(1385.75, 4491.49, 117.55, 3.74)
pt3dadd(1386.09, 4491.87, 117.55, 3.74)
pt3dadd(1386.09, 4492.64, 117.55, 3.74)
pt3dadd(1386.43, 4493.03, 117.55, 3.74)
pt3dadd(1386.43, 4493.8, 117.55, 3.74)
pt3dadd(1386.77, 4494.19, 117.55, 3.74)
pt3dadd(1386.77, 4497.27, 117.55, 3.74)
pt3dadd(1387.11, 4497.66, 117.55, 3.74)
pt3dadd(1387.11, 4499.59, 117.55, 3.74)
}
}
proc shape3d_109() {
dend[69] { pt3dadd(1387.45, 4499.97, 117.55, 3.74)
pt3dadd(1387.45, 4500.75, 117.55, 3.74)
pt3dadd(1387.79, 4501.13, 117.55, 3.74)
pt3dadd(1388.13, 4501.52, 117.55, 3.74)
pt3dadd(1388.13, 4502.29, 117.55, 3.74)
pt3dadd(1388.47, 4502.67, 117.55, 3.74)
pt3dadd(1388.81, 4503.45, 117.55, 3.74)
pt3dadd(1389.15, 4504.22, 117.55, 3.74)
pt3dadd(1389.49, 4504.99, 117.55, 4.76)
pt3dadd(1389.49, 4505.38, 117.55, 4.76)
pt3dadd(1389.83, 4505.76, 117.55, 4.76)
pt3dadd(1389.83, 4506.53, 117.55, 4.76)
pt3dadd(1390.17, 4507.3, 117.55, 4.76)
pt3dadd(1390.17, 4508.85, 117.55, 4.76)
pt3dadd(1390.51, 4509.23, 117.55, 4.76)
pt3dadd(1390.51, 4510.39, 117.55, 4.76)
pt3dadd(1390.85, 4510.78, 117.55, 4.76)
pt3dadd(1390.85, 4513.48, 117.55, 4.76)
pt3dadd(1390.85, 4515.41, 117.55, 4.08)
pt3dadd(1390.85, 4514.63, 117.55, 4.08)
pt3dadd(1390.85, 4515.79, 117.55, 4.08)
pt3dadd(1390.51, 4516.18, 117.55, 4.08)
pt3dadd(1390.51, 4528.14, 117.55, 4.08)
pt3dadd(1390.17, 4528.52, 117.55, 4.08)
pt3dadd(1389.83, 4528.91, 117.55, 4.08)
pt3dadd(1389.49, 4529.29, 117.55, 4.08)
pt3dadd(1389.15, 4529.68, 117.55, 4.08)
pt3dadd(1388.81, 4530.45, 117.55, 4.08)
pt3dadd(1388.81, 4534.31, 117.55, 4.08)
pt3dadd(1388.47, 4535.08, 117.55, 4.08)
pt3dadd(1388.47, 4538.17, 117.55, 4.08)
pt3dadd(1388.81, 4538.55, 117.55, 4.08)
pt3dadd(1389.15, 4538.94, 117.55, 4.08)
pt3dadd(1389.49, 4539.71, 117.55, 4.08)
pt3dadd(1389.83, 4540.1, 117.55, 4.08)
pt3dadd(1390.17, 4540.48, 117.55, 4.08)
pt3dadd(1390.17, 4542.03, 117.55, 4.08)
pt3dadd(1390.51, 4542.41, 117.55, 4.08)
pt3dadd(1390.85, 4542.8, 117.55, 4.08)
pt3dadd(1390.85, 4543.96, 117.55, 4.08)
pt3dadd(1391.19, 4544.34, 117.55, 4.08)
pt3dadd(1391.19, 4545.5, 117.55, 4.08)
pt3dadd(1391.53, 4546.27, 117.55, 4.08)
pt3dadd(1391.87, 4546.66, 117.55, 4.08)
pt3dadd(1391.87, 4548.58, 117.55, 4.08)
pt3dadd(1392.21, 4548.97, 117.55, 4.08)
pt3dadd(1392.21, 4550.13, 117.55, 4.08)
pt3dadd(1392.54, 4550.9, 117.55, 4.08)
pt3dadd(1392.54, 4553.6, 117.55, 4.08)
pt3dadd(1392.88, 4553.99, 117.55, 4.08)
pt3dadd(1392.88, 4555.14, 117.55, 4.08)
pt3dadd(1393.22, 4555.53, 117.55, 4.08)
pt3dadd(1393.22, 4556.3, 117.55, 4.08)
pt3dadd(1393.56, 4556.69, 117.55, 4.08)
pt3dadd(1393.9, 4557.46, 117.55, 4.08)
pt3dadd(1394.24, 4558.23, 117.55, 4.08)
pt3dadd(1394.58, 4558.62, 117.55, 4.08)
pt3dadd(1394.58, 4559.39, 117.55, 4.08)
pt3dadd(1394.92, 4559.77, 117.55, 4.08)
pt3dadd(1394.92, 4560.54, 117.55, 4.08)
pt3dadd(1395.26, 4561.32, 117.55, 4.08)
pt3dadd(1395.6, 4561.7, 117.55, 4.08)
pt3dadd(1395.6, 4562.47, 117.55, 4.08)
pt3dadd(1395.94, 4562.86, 117.55, 4.08)
pt3dadd(1396.28, 4563.25, 117.55, 4.08)
pt3dadd(1396.28, 4564.02, 117.55, 4.08)
pt3dadd(1396.62, 4564.79, 117.55, 4.08)
pt3dadd(1396.96, 4565.17, 117.55, 4.08)
pt3dadd(1396.96, 4565.95, 117.55, 4.08)
pt3dadd(1397.3, 4566.33, 117.55, 4.08)
pt3dadd(1397.3, 4567.1, 117.55, 4.08)
pt3dadd(1397.64, 4567.49, 117.55, 4.08)
pt3dadd(1397.64, 4568.26, 117.55, 4.08)
pt3dadd(1397.98, 4569.03, 117.55, 4.08)
pt3dadd(1397.98, 4569.8, 117.55, 4.08)
pt3dadd(1398.32, 4570.19, 117.55, 4.08)
pt3dadd(1398.66, 4570.58, 117.55, 4.08)
pt3dadd(1398.66, 4571.73, 117.55, 4.08)
pt3dadd(1399, 4572.12, 117.55, 4.08)
pt3dadd(1399, 4573.66, 117.55, 4.08)
pt3dadd(1399.34, 4574.43, 117.55, 4.08)
pt3dadd(1399.68, 4574.82, 117.55, 4.08)
pt3dadd(1399.68, 4583.31, 117.55, 4.08)
pt3dadd(1400.02, 4584.08, 117.55, 4.08)
pt3dadd(1400.02, 4584.85, 117.55, 4.08)
pt3dadd(1400.36, 4585.24, 117.55, 4.08)
pt3dadd(1400.36, 4586.39, 117.55, 4.08)
pt3dadd(1400.7, 4586.78, 117.55, 4.08)
pt3dadd(1401.04, 4587.17, 117.55, 4.08)
pt3dadd(1401.38, 4587.55, 117.55, 4.08)
pt3dadd(1401.72, 4587.94, 117.55, 4.08)
pt3dadd(1402.06, 4588.32, 117.55, 4.08)
pt3dadd(1402.4, 4588.71, 117.55, 4.08)
pt3dadd(1402.74, 4589.09, 117.55, 4.08)
pt3dadd(1402.74, 4603.37, 117.55, 4.08)
pt3dadd(1403.07, 4604.14, 117.55, 4.08)
pt3dadd(1403.07, 4606.46, 117.55, 4.08)
pt3dadd(1403.41, 4607.61, 117.55, 4.08)
pt3dadd(1403.41, 4609.54, 117.55, 4.08)
pt3dadd(1404.09, 4609.16, 117.55, 3.74)
pt3dadd(1404.43, 4609.54, 117.55, 3.74)
pt3dadd(1404.77, 4609.93, 117.55, 3.74)
pt3dadd(1404.77, 4614.56, 117.55, 3.74)
pt3dadd(1405.11, 4615.33, 117.55, 3.74)
pt3dadd(1405.11, 4616.87, 117.55, 3.74)
pt3dadd(1405.45, 4617.26, 117.55, 3.74)
pt3dadd(1405.45, 4618.42, 117.55, 3.74)
pt3dadd(1405.79, 4618.8, 117.55, 3.74)
pt3dadd(1405.79, 4628.45, 117.55, 3.74)
pt3dadd(1406.13, 4628.83, 117.55, 3.74)
pt3dadd(1406.13, 4629.6, 117.55, 3.74)
pt3dadd(1406.47, 4629.99, 117.55, 3.74)
pt3dadd(1406.47, 4631.53, 117.55, 3.74)
pt3dadd(1406.81, 4631.92, 117.55, 3.74)
pt3dadd(1406.81, 4633.08, 117.55, 3.74)
pt3dadd(1407.15, 4633.46, 117.55, 3.74)
pt3dadd(1407.15, 4634.23, 117.55, 3.74)
pt3dadd(1407.49, 4634.62, 117.55, 3.74)
pt3dadd(1407.49, 4636.55, 117.55, 3.74)
pt3dadd(1407.83, 4636.93, 117.55, 3.74)
pt3dadd(1407.83, 4638.09, 117.55, 3.74)
pt3dadd(1408.17, 4638.48, 117.55, 3.74)
pt3dadd(1408.17, 4639.63, 117.55, 3.74)
pt3dadd(1408.51, 4640.02, 117.55, 3.74)
pt3dadd(1408.85, 4640.41, 117.55, 3.74)
pt3dadd(1409.19, 4641.18, 117.55, 3.74)
pt3dadd(1409.53, 4642.33, 117.55, 3.74)
pt3dadd(1409.53, 4643.49, 117.55, 3.74)
pt3dadd(1410.21, 4644.26, 117.55, 3.74)
pt3dadd(1410.55, 4645.04, 117.55, 3.74)
pt3dadd(1410.55, 4640.41, 117.55, 3.74)
pt3dadd(1409.87, 4640.02, 117.55, 3.74)
pt3dadd(1409.53, 4639.25, 117.55, 3.74)
pt3dadd(1409.19, 4638.86, 117.55, 3.74)
pt3dadd(1408.85, 4638.09, 117.55, 3.74)
pt3dadd(1408.85, 4637.71, 117.55, 3.74)
pt3dadd(1409.19, 4638.09, 117.55, 3.74)
pt3dadd(1409.19, 4638.86, 117.55, 3.74)
pt3dadd(1409.53, 4639.25, 117.55, 3.74)
pt3dadd(1409.87, 4639.63, 117.55, 3.74)
pt3dadd(1410.55, 4639.63, 117.55, 3.74)
pt3dadd(1410.89, 4640.41, 117.55, 3.74)
pt3dadd(1411.23, 4640.79, 117.55, 3.74)
pt3dadd(1411.57, 4641.18, 117.55, 3.74)
pt3dadd(1411.57, 4642.33, 117.55, 3.74)
pt3dadd(1411.91, 4643.11, 117.55, 3.74)
pt3dadd(1411.91, 4645.42, 117.55, 3.74)
pt3dadd(1412.25, 4646.19, 117.55, 3.74)
pt3dadd(1412.59, 4646.58, 117.55, 3.74)
pt3dadd(1412.59, 4649.67, 117.55, 3.74)
pt3dadd(1412.25, 4650.44, 117.55, 3.74)
pt3dadd(1411.91, 4651.21, 117.55, 3.74)
pt3dadd(1411.91, 4652.75, 117.55, 3.74)
pt3dadd(1411.57, 4653.14, 117.55, 3.74)
pt3dadd(1411.23, 4653.52, 117.55, 3.74)
pt3dadd(1411.23, 4663.94, 117.55, 3.74)
pt3dadd(1411.57, 4664.33, 117.55, 3.74)
pt3dadd(1411.57, 4665.1, 117.55, 3.74)
pt3dadd(1411.91, 4665.48, 117.55, 3.74)
pt3dadd(1411.91, 4666.64, 117.55, 3.74)
pt3dadd(1412.25, 4667.41, 117.55, 3.74)
pt3dadd(1412.59, 4667.8, 117.55, 3.74)
pt3dadd(1412.59, 4668.57, 117.55, 3.74)
pt3dadd(1412.93, 4668.96, 117.55, 3.74)
pt3dadd(1412.93, 4669.73, 117.55, 3.74)
pt3dadd(1413.26, 4670.11, 117.55, 3.74)
pt3dadd(1413.6, 4670.5, 117.55, 3.74)
pt3dadd(1413.94, 4670.88, 117.55, 3.74)
pt3dadd(1413.94, 4671.66, 117.55, 3.74)
pt3dadd(1414.28, 4672.04, 117.55, 3.74)
pt3dadd(1414.28, 4672.81, 117.55, 3.74)
pt3dadd(1414.62, 4673.2, 117.55, 3.74)
pt3dadd(1414.96, 4673.97, 117.55, 3.74)
pt3dadd(1415.3, 4675.9, 117.55, 3.4)
pt3dadd(1415.3, 4676.67, 117.55, 4.76)
pt3dadd(1415.3, 4682.84, 117.55, 4.76)
pt3dadd(1415.64, 4683.23, 117.55, 4.76)
pt3dadd(1415.98, 4683.62, 117.55, 4.76)
pt3dadd(1415.98, 4684.39, 117.55, 4.76)
pt3dadd(1416.32, 4684.77, 117.55, 4.76)
pt3dadd(1416.32, 4685.54, 117.55, 4.76)
pt3dadd(1416.66, 4685.93, 117.55, 4.76)
pt3dadd(1416.66, 4690.56, 117.55, 4.76)
pt3dadd(1417, 4690.95, 117.55, 4.76)
pt3dadd(1417.34, 4691.33, 117.55, 4.76)
pt3dadd(1417.34, 4692.1, 117.55, 4.76)
pt3dadd(1417.68, 4692.49, 117.55, 4.76)
pt3dadd(1418.02, 4692.88, 117.55, 4.76)
pt3dadd(1418.36, 4693.65, 117.55, 4.76)
pt3dadd(1418.36, 4694.42, 117.55, 4.76)
pt3dadd(1418.7, 4694.8, 117.55, 4.76)
pt3dadd(1419.04, 4695.19, 117.55, 4.76)
pt3dadd(1419.04, 4696.35, 117.55, 4.76)
pt3dadd(1419.38, 4696.73, 117.55, 4.76)
pt3dadd(1419.38, 4699.05, 117.55, 4.76)
pt3dadd(1419.72, 4699.82, 117.55, 4.76)
pt3dadd(1419.72, 4700.59, 117.55, 4.76)
pt3dadd(1420.06, 4700.98, 117.55, 4.76)
pt3dadd(1420.06, 4701.75, 117.55, 4.76)
pt3dadd(1420.4, 4702.13, 117.55, 4.76)
}
}
proc shape3d_110() {
dend[69] { pt3dadd(1420.4, 4707.15, 117.55, 4.76)
pt3dadd(1420.74, 4707.54, 117.55, 4.76)
pt3dadd(1420.74, 4710.24, 117.55, 4.76)
pt3dadd(1420.74, 4712.17, 117.55, 3.4)
pt3dadd(1420.74, 4712.94, 117.55, 3.4)
pt3dadd(1421.08, 4713.32, 117.55, 3.4)
pt3dadd(1421.42, 4713.71, 117.55, 3.4)
pt3dadd(1421.76, 4714.48, 117.55, 3.4)
pt3dadd(1422.1, 4714.87, 117.55, 3.4)
pt3dadd(1422.1, 4716.79, 117.55, 3.4)
pt3dadd(1422.44, 4717.18, 117.55, 3.4)
pt3dadd(1422.44, 4718.72, 117.55, 3.4)
pt3dadd(1422.78, 4719.11, 117.55, 3.4)
pt3dadd(1422.78, 4721.81, 117.55, 3.4)
pt3dadd(1423.79, 4722.97, 117.55, 4.76)
pt3dadd(1424.13, 4723.35, 117.55, 4.76)
pt3dadd(1424.13, 4724.51, 117.55, 4.76)
pt3dadd(1424.47, 4724.9, 117.55, 4.76)
pt3dadd(1424.47, 4726.83, 117.55, 4.76)
pt3dadd(1424.81, 4727.21, 117.55, 4.76)
pt3dadd(1424.81, 4731.46, 117.55, 4.76)
pt3dadd(1425.15, 4732.23, 117.55, 4.76)
pt3dadd(1425.49, 4732.61, 117.55, 4.76)
pt3dadd(1425.83, 4733, 117.55, 4.76)
pt3dadd(1425.83, 4733.77, 117.55, 4.76)
pt3dadd(1426.17, 4734.54, 117.55, 4.76)
pt3dadd(1426.17, 4740.71, 117.55, 4.76)
pt3dadd(1427.19, 4739.56, 117.55, 4.08)
pt3dadd(1427.19, 4743.03, 117.55, 4.08)
pt3dadd(1427.53, 4743.42, 117.55, 4.08)
pt3dadd(1427.53, 4744.57, 117.55, 4.08)
pt3dadd(1427.87, 4744.96, 117.55, 4.08)
pt3dadd(1428.21, 4745.34, 117.55, 4.08)
pt3dadd(1428.55, 4745.73, 117.55, 4.08)
pt3dadd(1428.89, 4746.12, 117.55, 4.08)
pt3dadd(1428.89, 4750.36, 117.55, 4.08)
pt3dadd(1429.57, 4751.13, 117.55, 3.74)
pt3dadd(1429.91, 4751.52, 117.55, 3.74)
pt3dadd(1429.91, 4752.29, 117.55, 3.74)
pt3dadd(1430.25, 4752.67, 117.55, 3.74)
pt3dadd(1430.59, 4753.45, 117.55, 3.74)
pt3dadd(1430.93, 4753.83, 117.55, 3.74)
pt3dadd(1431.27, 4754.22, 117.55, 3.74)
pt3dadd(1431.61, 4754.6, 117.55, 3.74)
pt3dadd(1431.61, 4755.38, 117.55, 3.74)
pt3dadd(1431.95, 4755.76, 117.55, 3.74)
pt3dadd(1432.29, 4756.15, 117.55, 3.74)
pt3dadd(1432.63, 4756.92, 117.55, 3.74)
pt3dadd(1432.63, 4757.69, 117.55, 3.74)
pt3dadd(1432.97, 4758.08, 117.55, 3.74)
pt3dadd(1433.31, 4758.46, 117.55, 3.74)
pt3dadd(1433.31, 4759.23, 117.55, 3.74)
pt3dadd(1433.65, 4759.62, 117.55, 3.74)
pt3dadd(1433.65, 4760.39, 117.55, 3.74)
pt3dadd(1433.99, 4760.78, 117.55, 3.74)
pt3dadd(1433.99, 4761.55, 117.55, 3.74)
pt3dadd(1434.32, 4761.93, 117.55, 3.74)
pt3dadd(1434.66, 4762.32, 117.55, 3.74)
pt3dadd(1434.66, 4763.09, 117.55, 3.74)
pt3dadd(1435, 4763.48, 117.55, 3.74)
pt3dadd(1435.34, 4763.86, 117.55, 3.74)
pt3dadd(1435.68, 4764.25, 117.55, 3.74)
pt3dadd(1436.02, 4765.02, 117.55, 3.74)
pt3dadd(1436.36, 4765.79, 117.55, 3.74)
pt3dadd(1436.7, 4766.18, 117.55, 3.74)
pt3dadd(1436.7, 4766.95, 117.55, 3.74)
pt3dadd(1437.04, 4767.72, 117.55, 3.74)
pt3dadd(1437.04, 4768.49, 117.55, 3.74)
pt3dadd(1437.38, 4769.26, 117.55, 3.74)
pt3dadd(1437.38, 4771.19, 117.55, 3.74)
pt3dadd(1437.72, 4771.58, 117.55, 3.74)
pt3dadd(1437.72, 4772.35, 117.55, 3.74)
pt3dadd(1438.06, 4772.74, 117.55, 3.74)
pt3dadd(1438.06, 4774.28, 117.55, 3.74)
pt3dadd(1438.4, 4774.67, 117.55, 3.74)
pt3dadd(1438.4, 4775.44, 117.55, 3.74)
pt3dadd(1438.74, 4775.82, 117.55, 3.74)
pt3dadd(1438.74, 4778.14, 117.55, 3.74)
pt3dadd(1439.08, 4778.52, 117.55, 3.74)
pt3dadd(1439.08, 4781.22, 117.55, 3.74)
pt3dadd(1439.42, 4782, 117.55, 3.74)
pt3dadd(1439.76, 4782.38, 117.55, 3.74)
pt3dadd(1439.76, 4783.15, 117.55, 3.74)
pt3dadd(1440.1, 4783.54, 117.55, 3.74)
pt3dadd(1440.44, 4783.92, 117.55, 3.74)
pt3dadd(1440.78, 4784.31, 117.55, 3.74)
pt3dadd(1441.12, 4785.08, 117.55, 3.74)
pt3dadd(1441.46, 4785.47, 117.55, 3.74)
pt3dadd(1441.46, 4786.24, 117.55, 3.74)
pt3dadd(1441.8, 4786.63, 117.55, 3.74)
pt3dadd(1442.14, 4787.4, 117.55, 3.74)
pt3dadd(1442.14, 4796.27, 117.55, 3.74)
pt3dadd(1441.12, 4790.1, 117.55, 3.06)
pt3dadd(1441.12, 4797.04, 117.55, 3.06)
pt3dadd(1441.46, 4797.43, 117.55, 3.06)
pt3dadd(1441.46, 4798.2, 117.55, 3.06)
pt3dadd(1441.8, 4798.58, 117.55, 3.06)
pt3dadd(1441.8, 4799.36, 117.55, 3.06)
pt3dadd(1442.14, 4800.13, 117.55, 3.06)
pt3dadd(1442.48, 4800.51, 117.55, 3.06)
pt3dadd(1442.48, 4801.29, 117.55, 3.06)
pt3dadd(1442.82, 4802.06, 117.55, 3.06)
pt3dadd(1443.16, 4802.44, 117.55, 3.06)
pt3dadd(1443.16, 4803.21, 117.55, 3.06)
pt3dadd(1443.5, 4803.6, 117.55, 3.06)
pt3dadd(1443.84, 4803.99, 117.55, 3.06)
pt3dadd(1444.18, 4804.76, 117.55, 3.06)
pt3dadd(1444.18, 4806.3, 117.55, 3.06)
pt3dadd(1444.51, 4806.69, 117.55, 3.06)
pt3dadd(1444.51, 4809, 117.55, 3.06)
pt3dadd(1444.85, 4809.39, 117.55, 3.06)
pt3dadd(1445.19, 4809.77, 117.55, 3.06)
pt3dadd(1445.19, 4810.93, 117.55, 3.06)
pt3dadd(1445.53, 4811.32, 117.55, 3.06)
pt3dadd(1445.53, 4812.09, 117.55, 3.06)
pt3dadd(1445.87, 4812.47, 117.55, 3.06)
pt3dadd(1445.87, 4814.4, 117.55, 3.06)
pt3dadd(1446.21, 4814.79, 117.55, 3.06)
pt3dadd(1446.21, 4815.95, 117.55, 3.06)
pt3dadd(1446.55, 4816.33, 117.55, 3.06)
pt3dadd(1446.89, 4816.72, 117.55, 3.06)
pt3dadd(1447.23, 4817.1, 117.55, 3.06)
pt3dadd(1447.57, 4817.88, 117.55, 3.06)
pt3dadd(1447.57, 4819.42, 117.55, 3.06)
pt3dadd(1447.91, 4819.8, 117.55, 3.06)
pt3dadd(1447.91, 4821.35, 117.55, 3.06)
pt3dadd(1448.25, 4822.12, 117.55, 3.06)
pt3dadd(1448.25, 4823.28, 117.55, 3.06)
pt3dadd(1448.59, 4824.05, 117.55, 3.06)
pt3dadd(1448.59, 4825.21, 117.55, 3.06)
pt3dadd(1448.93, 4825.98, 117.55, 3.06)
pt3dadd(1449.61, 4825.21, 117.55, 2.72)
pt3dadd(1449.95, 4825.59, 117.55, 2.72)
pt3dadd(1449.95, 4828.29, 117.55, 2.72)
pt3dadd(1450.97, 4828.68, 117.55, 4.08)
pt3dadd(1451.31, 4829.06, 117.55, 4.08)
pt3dadd(1451.65, 4829.45, 117.55, 4.08)
pt3dadd(1451.99, 4829.83, 117.55, 4.08)
pt3dadd(1452.33, 4830.22, 117.55, 4.08)
pt3dadd(1452.67, 4830.61, 117.55, 4.08)
pt3dadd(1453.01, 4831.38, 117.55, 4.08)
pt3dadd(1453.35, 4831.76, 117.55, 4.08)
pt3dadd(1453.35, 4832.54, 117.55, 4.08)
pt3dadd(1453.69, 4832.92, 117.55, 4.08)
pt3dadd(1454.03, 4833.31, 117.55, 4.08)
pt3dadd(1454.37, 4834.08, 117.55, 4.08)
pt3dadd(1454.71, 4834.46, 117.55, 4.08)
pt3dadd(1454.71, 4835.24, 117.55, 4.08)
pt3dadd(1455.04, 4836.01, 117.55, 4.08)
pt3dadd(1455.38, 4836.78, 117.55, 4.08)
pt3dadd(1455.38, 4837.94, 117.55, 4.08)
pt3dadd(1455.72, 4838.71, 117.55, 4.08)
pt3dadd(1456.06, 4839.48, 117.55, 4.08)
pt3dadd(1456.06, 4841.02, 117.55, 4.08)
pt3dadd(1456.4, 4841.41, 117.55, 4.08)
pt3dadd(1456.74, 4841.79, 117.55, 4.08)
pt3dadd(1457.08, 4842.57, 117.55, 4.08)
pt3dadd(1457.42, 4843.34, 117.55, 4.08)
pt3dadd(1457.76, 4844.11, 117.55, 4.08)
pt3dadd(1458.1, 4844.5, 117.55, 4.08)
pt3dadd(1458.44, 4844.88, 117.55, 4.08)
pt3dadd(1452.67, 4829.83, 117.55, 3.06)
pt3dadd(1453.01, 4830.22, 117.55, 3.06)
pt3dadd(1453.01, 4831.76, 117.55, 3.06)
pt3dadd(1453.35, 4832.15, 117.55, 3.06)
pt3dadd(1453.69, 4832.54, 117.55, 3.06)
pt3dadd(1453.69, 4834.08, 117.55, 3.06)
pt3dadd(1454.03, 4834.46, 117.55, 3.06)
pt3dadd(1454.03, 4836.01, 117.55, 3.06)
pt3dadd(1454.37, 4836.39, 117.55, 3.06)
pt3dadd(1454.37, 4837.55, 117.55, 3.06)
pt3dadd(1454.71, 4837.94, 117.55, 3.06)
pt3dadd(1454.71, 4839.09, 117.55, 3.06)
pt3dadd(1455.04, 4839.48, 117.55, 3.06)
pt3dadd(1455.38, 4839.87, 117.55, 3.06)
pt3dadd(1455.72, 4840.64, 117.55, 3.06)
pt3dadd(1455.72, 4841.79, 117.55, 3.06)
pt3dadd(1456.06, 4842.18, 117.55, 3.06)
pt3dadd(1456.4, 4842.95, 117.55, 3.06)
pt3dadd(1456.74, 4843.34, 117.55, 3.06)
pt3dadd(1457.08, 4843.72, 117.55, 3.06)
pt3dadd(1457.76, 4844.5, 117.55, 3.06)
pt3dadd(1458.1, 4844.88, 117.55, 3.06)
pt3dadd(1458.44, 4845.27, 117.55, 3.06)
pt3dadd(1458.78, 4846.04, 117.55, 3.06)
pt3dadd(1459.12, 4846.42, 117.55, 3.06)
pt3dadd(1459.46, 4846.81, 117.55, 3.06)
pt3dadd(1460.14, 4847.2, 117.55, 3.06)
pt3dadd(1460.48, 4847.58, 117.55, 3.06)
pt3dadd(1460.82, 4848.35, 117.55, 3.06)
pt3dadd(1460.82, 4849.51, 117.55, 3.06)
pt3dadd(1461.16, 4850.28, 117.55, 3.06)
pt3dadd(1461.16, 4851.44, 117.55, 3.06)
pt3dadd(1461.5, 4851.83, 117.55, 3.06)
pt3dadd(1461.5, 4852.6, 117.55, 3.06)
pt3dadd(1461.84, 4852.98, 117.55, 3.06)
pt3dadd(1461.84, 4853.75, 117.55, 3.06)
pt3dadd(1462.18, 4854.14, 117.55, 3.06)
pt3dadd(1462.52, 4854.53, 117.55, 3.06)
pt3dadd(1462.86, 4855.3, 117.55, 3.06)
}
}
proc shape3d_111() {
dend[69] { pt3dadd(1463.2, 4855.68, 117.55, 3.06)
pt3dadd(1463.54, 4856.07, 117.55, 3.06)
pt3dadd(1463.88, 4856.46, 117.55, 3.06)
pt3dadd(1464.22, 4856.84, 117.55, 3.06)
pt3dadd(1464.56, 4857.23, 117.55, 3.06)
pt3dadd(1465.24, 4857.61, 117.55, 3.06)
pt3dadd(1465.57, 4858.38, 117.55, 3.06)
pt3dadd(1465.91, 4858.77, 117.55, 3.06)
pt3dadd(1466.25, 4859.16, 117.55, 3.06)
pt3dadd(1466.93, 4859.16, 117.55, 3.06)
pt3dadd(1466.93, 4859.54, 117.55, 3.74)
pt3dadd(1466.93, 4858.77, 117.55, 3.74)
pt3dadd(1467.27, 4859.16, 117.55, 3.74)
pt3dadd(1467.61, 4859.54, 117.55, 3.74)
pt3dadd(1467.95, 4859.93, 117.55, 3.74)
pt3dadd(1468.29, 4860.31, 117.55, 3.74)
pt3dadd(1468.63, 4860.7, 117.55, 3.74)
pt3dadd(1468.97, 4861.08, 117.55, 3.74)
pt3dadd(1469.31, 4861.47, 117.55, 3.74)
pt3dadd(1469.31, 4862.24, 117.55, 3.74)
pt3dadd(1469.65, 4863.01, 117.55, 3.74)
pt3dadd(1469.99, 4863.79, 117.55, 3.74)
pt3dadd(1470.33, 4864.17, 117.55, 3.74)
pt3dadd(1470.67, 4864.94, 117.55, 3.74)
pt3dadd(1471.01, 4865.71, 117.55, 3.74)
pt3dadd(1471.35, 4866.1, 117.55, 3.74)
pt3dadd(1471.69, 4866.49, 117.55, 3.74)
pt3dadd(1471.69, 4867.26, 117.55, 3.74)
pt3dadd(1472.03, 4867.64, 117.55, 3.74)
pt3dadd(1472.37, 4868.03, 117.55, 3.74)
pt3dadd(1472.37, 4869.19, 117.55, 3.74)
pt3dadd(1472.71, 4869.57, 117.55, 3.74)
pt3dadd(1473.05, 4869.96, 117.55, 3.74)
pt3dadd(1473.39, 4870.34, 117.55, 3.74)
pt3dadd(1473.73, 4870.73, 117.55, 3.74)
pt3dadd(1474.07, 4871.12, 117.55, 3.74)
pt3dadd(1474.41, 4871.5, 117.55, 3.74)
pt3dadd(1474.75, 4871.89, 117.55, 3.74)
pt3dadd(1475.09, 4872.27, 117.55, 3.74)
pt3dadd(1475.43, 4872.66, 117.55, 3.74)
pt3dadd(1475.76, 4873.04, 117.55, 3.74)
pt3dadd(1476.1, 4873.43, 117.55, 3.74)
pt3dadd(1476.44, 4873.82, 117.55, 3.74)
pt3dadd(1476.78, 4874.59, 117.55, 3.74)
pt3dadd(1477.12, 4874.97, 117.55, 3.74)
pt3dadd(1477.12, 4875.75, 117.55, 3.74)
pt3dadd(1477.46, 4876.13, 117.55, 3.74)
pt3dadd(1477.8, 4876.52, 117.55, 3.74)
pt3dadd(1478.14, 4876.9, 117.55, 3.74)
pt3dadd(1478.48, 4877.29, 117.55, 3.74)
pt3dadd(1478.82, 4877.67, 117.55, 3.74)
pt3dadd(1479.16, 4878.06, 117.55, 3.74)
pt3dadd(1479.5, 4878.45, 117.55, 3.74)
pt3dadd(1479.84, 4879.22, 117.55, 3.74)
pt3dadd(1480.18, 4879.6, 117.55, 3.74)
pt3dadd(1480.52, 4879.99, 117.55, 3.74)
pt3dadd(1480.86, 4880.38, 117.55, 3.74)
pt3dadd(1481.2, 4881.15, 117.55, 3.74)
pt3dadd(1481.54, 4881.53, 117.55, 3.74)
pt3dadd(1481.88, 4881.92, 117.55, 3.74)
pt3dadd(1482.22, 4882.3, 117.55, 3.74)
pt3dadd(1482.9, 4882.69, 117.55, 3.74)
pt3dadd(1483.24, 4883.08, 117.55, 3.74)
pt3dadd(1483.58, 4883.46, 117.55, 3.74)
pt3dadd(1483.92, 4883.85, 117.55, 3.74)
pt3dadd(1484.26, 4884.23, 117.55, 3.74)
pt3dadd(1484.6, 4884.62, 117.55, 3.74)
pt3dadd(1484.94, 4885, 117.55, 3.74)
pt3dadd(1485.28, 4885.39, 117.55, 3.74)
pt3dadd(1485.62, 4886.16, 117.55, 3.74)
pt3dadd(1485.96, 4886.55, 117.55, 3.74)
pt3dadd(1486.29, 4886.93, 117.55, 3.74)
pt3dadd(1486.63, 4887.32, 117.55, 3.74)
pt3dadd(1486.97, 4887.71, 117.55, 3.74)
pt3dadd(1487.31, 4888.09, 117.55, 3.74)
pt3dadd(1487.65, 4888.48, 117.55, 3.74)
pt3dadd(1487.99, 4888.86, 117.55, 3.74)
pt3dadd(1488.33, 4889.25, 117.55, 3.74)
pt3dadd(1488.67, 4889.63, 117.55, 3.74)
pt3dadd(1489.35, 4890.02, 117.55, 3.74)
pt3dadd(1489.69, 4890.41, 117.55, 3.74)
pt3dadd(1490.03, 4890.79, 117.55, 3.74)
pt3dadd(1490.37, 4891.18, 117.55, 3.74)
pt3dadd(1490.71, 4891.56, 117.55, 3.74)
pt3dadd(1491.05, 4891.95, 117.55, 3.74)
pt3dadd(1491.39, 4892.33, 117.55, 3.74)
pt3dadd(1491.73, 4892.72, 117.55, 3.74)
pt3dadd(1492.07, 4893.49, 117.55, 3.74)
pt3dadd(1492.41, 4894.26, 117.55, 3.74)
pt3dadd(1492.75, 4894.65, 117.55, 3.74)
pt3dadd(1493.09, 4895.04, 117.55, 3.74)
pt3dadd(1493.43, 4895.42, 117.55, 3.74)
pt3dadd(1493.77, 4895.81, 117.55, 3.74)
pt3dadd(1493.77, 4896.58, 117.55, 3.74)
pt3dadd(1494.11, 4896.96, 117.55, 3.74)
pt3dadd(1494.45, 4897.35, 117.55, 3.74)
pt3dadd(1494.79, 4898.12, 117.55, 3.74)
pt3dadd(1495.13, 4898.51, 117.55, 3.74)
pt3dadd(1495.13, 4899.28, 117.55, 3.74)
pt3dadd(1495.81, 4899.28, 117.55, 3.74)
pt3dadd(1495.81, 4900.05, 117.55, 3.74)
pt3dadd(1496.15, 4900.44, 117.55, 3.74)
pt3dadd(1496.49, 4900.82, 117.55, 3.74)
pt3dadd(1496.82, 4901.21, 117.55, 3.74)
pt3dadd(1496.82, 4901.98, 117.55, 3.74)
pt3dadd(1497.16, 4902.37, 117.55, 3.74)
pt3dadd(1497.16, 4904.68, 117.55, 3.74)
pt3dadd(1497.5, 4905.07, 117.55, 3.74)
pt3dadd(1497.5, 4906.22, 117.55, 3.74)
pt3dadd(1497.84, 4906.61, 117.55, 3.74)
pt3dadd(1498.18, 4907, 117.55, 3.74)
pt3dadd(1498.18, 4907.77, 117.55, 3.74)
pt3dadd(1498.52, 4908.15, 117.55, 3.74)
pt3dadd(1498.86, 4908.54, 117.55, 3.74)
pt3dadd(1498.86, 4909.7, 117.55, 3.74)
pt3dadd(1499.2, 4910.08, 117.55, 3.74)
pt3dadd(1499.2, 4911.63, 117.55, 3.74)
pt3dadd(1499.54, 4912.01, 117.55, 3.74)
pt3dadd(1499.88, 4912.4, 117.55, 3.74)
pt3dadd(1499.88, 4913.17, 117.55, 3.74)
pt3dadd(1500.22, 4913.55, 117.55, 3.74)
pt3dadd(1500.56, 4913.94, 117.55, 3.74)
pt3dadd(1500.9, 4914.33, 117.55, 3.74)
pt3dadd(1501.24, 4914.71, 117.55, 3.74)
pt3dadd(1501.24, 4915.48, 117.55, 3.74)
pt3dadd(1501.58, 4916.25, 117.55, 3.74)
pt3dadd(1501.92, 4916.64, 117.55, 3.74)
pt3dadd(1502.26, 4917.03, 117.55, 3.74)
pt3dadd(1502.6, 4917.41, 117.55, 3.74)
pt3dadd(1502.6, 4918.18, 117.55, 3.74)
pt3dadd(1502.94, 4918.57, 117.55, 3.74)
pt3dadd(1503.28, 4918.96, 117.55, 3.74)
pt3dadd(1503.62, 4919.34, 117.55, 3.74)
pt3dadd(1503.96, 4919.73, 117.55, 3.74)
pt3dadd(1504.3, 4920.11, 117.55, 3.74)
pt3dadd(1504.64, 4920.5, 117.55, 3.74)
pt3dadd(1504.98, 4920.88, 117.55, 3.74)
pt3dadd(1504.98, 4921.66, 117.55, 3.74)
pt3dadd(1505.32, 4922.04, 117.55, 3.74)
pt3dadd(1505.66, 4922.43, 117.55, 3.74)
pt3dadd(1506, 4922.81, 117.55, 3.74)
pt3dadd(1506.34, 4923.2, 117.55, 3.74)
pt3dadd(1506.68, 4923.58, 117.55, 3.74)
pt3dadd(1507.02, 4923.97, 117.55, 3.74)
pt3dadd(1507.35, 4924.36, 117.55, 3.74)
pt3dadd(1507.69, 4924.74, 117.55, 3.74)
pt3dadd(1508.03, 4925.13, 117.55, 3.74)
pt3dadd(1508.37, 4925.51, 117.55, 3.74)
pt3dadd(1508.71, 4925.9, 117.55, 3.74)
pt3dadd(1508.71, 4926.67, 117.55, 3.74)
pt3dadd(1509.05, 4927.06, 117.55, 3.74)
pt3dadd(1509.39, 4927.83, 117.55, 3.74)
pt3dadd(1509.73, 4928.21, 117.55, 3.74)
pt3dadd(1509.73, 4928.99, 117.55, 3.74)
pt3dadd(1510.07, 4929.37, 117.55, 3.74)
pt3dadd(1510.41, 4929.76, 117.55, 3.74)
pt3dadd(1510.75, 4930.14, 117.55, 3.74)
pt3dadd(1510.75, 4930.92, 117.55, 3.74)
pt3dadd(1511.09, 4931.3, 117.55, 3.74)
pt3dadd(1511.43, 4931.69, 117.55, 3.74)
pt3dadd(1511.77, 4932.46, 117.55, 3.74)
pt3dadd(1512.11, 4932.84, 117.55, 3.74)
pt3dadd(1512.45, 4933.23, 117.55, 3.74)
pt3dadd(1512.79, 4933.62, 117.55, 3.74)
pt3dadd(1513.13, 4934, 117.55, 3.74)
pt3dadd(1513.81, 4934.77, 117.55, 3.74)
pt3dadd(1514.15, 4935.16, 117.55, 3.74)
pt3dadd(1514.49, 4935.54, 117.55, 3.74)
pt3dadd(1514.83, 4935.93, 117.55, 3.74)
pt3dadd(1515.17, 4936.32, 117.55, 3.74)
pt3dadd(1515.51, 4936.7, 117.55, 3.74)
pt3dadd(1515.51, 4937.47, 117.55, 3.74)
pt3dadd(1515.85, 4937.86, 117.55, 3.74)
pt3dadd(1516.19, 4938.25, 117.55, 3.74)
pt3dadd(1516.53, 4939.02, 117.55, 3.74)
pt3dadd(1516.87, 4939.4, 117.55, 3.74)
pt3dadd(1517.21, 4940.17, 117.55, 3.74)
pt3dadd(1517.54, 4940.56, 117.55, 3.74)
pt3dadd(1517.88, 4940.95, 117.55, 3.74)
pt3dadd(1517.88, 4941.72, 117.55, 3.74)
pt3dadd(1518.22, 4942.1, 117.55, 3.74)
pt3dadd(1518.22, 4942.88, 117.55, 3.74)
pt3dadd(1518.56, 4943.26, 117.55, 3.74)
pt3dadd(1518.56, 4944.03, 117.55, 3.74)
pt3dadd(1518.9, 4944.42, 117.55, 3.74)
pt3dadd(1518.9, 4945.58, 117.55, 3.74)
pt3dadd(1519.24, 4945.96, 117.55, 3.74)
pt3dadd(1519.24, 4946.73, 117.55, 3.74)
pt3dadd(1519.58, 4947.12, 117.55, 3.74)
pt3dadd(1519.58, 4948.66, 117.55, 3.74)
pt3dadd(1519.92, 4949.05, 117.55, 3.74)
pt3dadd(1519.92, 4949.82, 117.55, 3.74)
pt3dadd(1520.26, 4950.59, 117.55, 3.74)
pt3dadd(1520.26, 4951.36, 117.55, 3.74)
pt3dadd(1520.6, 4951.75, 117.55, 3.74)
pt3dadd(1520.94, 4952.13, 117.55, 3.74)
pt3dadd(1520.94, 4952.91, 117.55, 3.74)
pt3dadd(1521.28, 4953.29, 117.55, 3.74)
pt3dadd(1521.62, 4953.68, 117.55, 3.74)
pt3dadd(1521.62, 4954.45, 117.55, 3.74)
}
}
proc shape3d_112() {
dend[69] { pt3dadd(1521.96, 4954.83, 117.55, 3.74)
pt3dadd(1522.3, 4955.22, 117.55, 3.74)
pt3dadd(1522.3, 4955.99, 117.55, 3.74)
pt3dadd(1522.64, 4956.38, 117.55, 3.74)
pt3dadd(1522.98, 4956.76, 117.55, 3.74)
pt3dadd(1523.32, 4957.15, 117.55, 3.74)
pt3dadd(1523.66, 4957.92, 117.55, 3.74)
pt3dadd(1524, 4958.69, 117.55, 3.74)
pt3dadd(1524.34, 4959.08, 117.55, 3.74)
pt3dadd(1524.68, 4959.46, 117.55, 3.74)
pt3dadd(1524.68, 4961.78, 117.55, 3.74)
pt3dadd(1525.02, 4962.55, 117.55, 3.74)
pt3dadd(1525.02, 4965.64, 117.55, 3.74)
pt3dadd(1524.68, 4966.02, 117.55, 4.42)
pt3dadd(1524.68, 4965.64, 117.55, 4.42)
pt3dadd(1524.68, 4966.79, 117.55, 4.42)
pt3dadd(1525.02, 4967.18, 117.55, 4.42)
pt3dadd(1525.36, 4967.57, 117.55, 4.42)
pt3dadd(1525.36, 4968.34, 117.55, 4.42)
pt3dadd(1525.7, 4968.72, 117.55, 4.42)
pt3dadd(1525.7, 4969.5, 117.55, 4.42)
pt3dadd(1526.04, 4969.88, 117.55, 4.42)
pt3dadd(1526.38, 4970.27, 117.55, 4.42)
pt3dadd(1526.38, 4971.04, 117.55, 4.42)
pt3dadd(1526.72, 4971.42, 117.55, 4.42)
pt3dadd(1527.06, 4971.81, 117.55, 4.42)
pt3dadd(1527.06, 4973.35, 117.55, 4.42)
pt3dadd(1527.4, 4973.74, 117.55, 4.42)
pt3dadd(1527.4, 4974.9, 117.55, 4.42)
pt3dadd(1527.74, 4975.28, 117.55, 4.42)
pt3dadd(1527.74, 4981.84, 117.55, 4.42)
pt3dadd(1528.07, 4982.23, 117.55, 4.42)
pt3dadd(1528.07, 4983.38, 117.55, 4.42)
pt3dadd(1528.41, 4983.77, 117.55, 4.42)
pt3dadd(1528.75, 4984.16, 117.55, 4.42)
pt3dadd(1529.09, 4984.54, 117.55, 4.42)
pt3dadd(1529.43, 4984.93, 117.55, 4.42)
pt3dadd(1530.11, 4985.7, 117.55, 4.42)
pt3dadd(1530.45, 4986.47, 117.55, 4.42)
pt3dadd(1530.79, 4987.24, 117.55, 4.42)
pt3dadd(1531.13, 4986.08, 117.55, 3.4)
pt3dadd(1531.47, 4986.47, 117.55, 3.4)
pt3dadd(1531.47, 4991.1, 117.55, 3.4)
pt3dadd(1531.81, 4991.49, 117.55, 3.4)
pt3dadd(1531.81, 4992.26, 117.55, 3.4)
pt3dadd(1532.15, 4992.64, 117.55, 3.4)
pt3dadd(1532.83, 4992.64, 117.55, 3.4)
pt3dadd(1533.17, 4993.03, 117.55, 3.4)
pt3dadd(1533.51, 4993.42, 117.55, 3.4)
pt3dadd(1533.85, 4993.8, 117.55, 3.4)
pt3dadd(1534.53, 4994.19, 117.55, 3.4)
pt3dadd(1534.87, 4994.57, 117.55, 3.4)
pt3dadd(1535.21, 4995.34, 117.55, 3.4)
pt3dadd(1535.21, 5005.38, 117.55, 3.4)
pt3dadd(1535.55, 5006.15, 117.55, 3.4)
pt3dadd(1535.89, 5006.92, 117.55, 3.4)
pt3dadd(1535.89, 5008.08, 117.55, 3.4)
pt3dadd(1536.23, 5008.46, 117.55, 3.4)
pt3dadd(1536.23, 5010.39, 117.55, 3.4)
pt3dadd(1536.57, 5011.16, 117.55, 3.4)
pt3dadd(1536.57, 5012.32, 117.55, 3.4)
pt3dadd(1536.91, 5012.71, 117.55, 3.4)
pt3dadd(1537.25, 5013.09, 117.55, 3.4)
pt3dadd(1537.25, 5013.86, 117.55, 3.4)
pt3dadd(1537.59, 5014.25, 117.55, 3.4)
pt3dadd(1537.93, 5015.02, 117.55, 3.4)
pt3dadd(1538.27, 5015.41, 117.55, 3.4)
pt3dadd(1538.6, 5015.79, 117.55, 3.4)
pt3dadd(1538.6, 5016.56, 117.55, 3.4)
pt3dadd(1538.94, 5017.33, 117.55, 3.4)
pt3dadd(1539.28, 5017.72, 117.55, 3.4)
pt3dadd(1539.96, 5018.11, 117.55, 3.4)
pt3dadd(1540.3, 5018.88, 117.55, 3.4)
pt3dadd(1540.64, 5019.26, 117.55, 3.4)
pt3dadd(1540.98, 5019.65, 117.55, 3.4)
pt3dadd(1540.98, 5028.52, 117.55, 3.4)
pt3dadd(1541.32, 5028.91, 117.55, 3.4)
pt3dadd(1541.32, 5030.07, 117.55, 3.4)
pt3dadd(1541.66, 5030.45, 117.55, 3.4)
pt3dadd(1541.66, 5031.22, 117.55, 3.4)
pt3dadd(1542, 5032, 117.55, 3.4)
pt3dadd(1542, 5032.77, 117.55, 3.4)
pt3dadd(1542.34, 5033.15, 117.55, 3.4)
pt3dadd(1542.34, 5041.25, 117.55, 3.4)
pt3dadd(1542.34, 5042.41, 117.55, 2.72)
pt3dadd(1542.68, 5042.8, 117.55, 2.72)
pt3dadd(1543.02, 5043.18, 117.55, 2.72)
pt3dadd(1543.36, 5043.57, 117.55, 2.72)
pt3dadd(1543.7, 5043.96, 117.55, 2.72)
pt3dadd(1543.7, 5044.73, 117.55, 2.72)
pt3dadd(1544.04, 5045.11, 117.55, 2.72)
pt3dadd(1544.38, 5045.5, 117.55, 2.72)
pt3dadd(1544.72, 5045.88, 117.55, 2.72)
pt3dadd(1545.06, 5046.27, 117.55, 2.72)
pt3dadd(1545.74, 5046.66, 117.55, 2.72)
pt3dadd(1546.08, 5047.04, 117.55, 2.72)
pt3dadd(1546.42, 5047.43, 117.55, 2.72)
pt3dadd(1546.76, 5047.81, 117.55, 2.72)
pt3dadd(1547.1, 5048.97, 117.55, 2.72)
pt3dadd(1547.1, 5050.13, 117.55, 2.72)
pt3dadd(1547.44, 5050.51, 117.55, 2.72)
pt3dadd(1547.78, 5051.29, 117.55, 2.72)
pt3dadd(1547.78, 5053.21, 117.55, 2.72)
pt3dadd(1548.12, 5053.6, 117.55, 2.72)
pt3dadd(1548.12, 5057.07, 117.55, 2.72)
pt3dadd(1548.46, 5057.46, 117.55, 2.72)
pt3dadd(1548.79, 5057.84, 117.55, 2.72)
pt3dadd(1548.79, 5058.62, 117.55, 2.72)
pt3dadd(1549.13, 5059.39, 117.55, 2.72)
pt3dadd(1549.13, 5060.16, 117.55, 2.72)
pt3dadd(1549.47, 5060.54, 117.55, 2.72)
pt3dadd(1549.47, 5063.63, 117.55, 2.72)
pt3dadd(1549.81, 5064.02, 117.55, 2.72)
pt3dadd(1549.81, 5065.95, 117.55, 2.72)
pt3dadd(1550.15, 5066.33, 117.55, 2.72)
pt3dadd(1550.15, 5067.1, 117.55, 2.72)
pt3dadd(1550.49, 5067.49, 117.55, 2.72)
pt3dadd(1550.83, 5068.26, 117.55, 2.72)
pt3dadd(1551.17, 5068.65, 117.55, 2.72)
pt3dadd(1551.51, 5069.03, 117.55, 2.72)
pt3dadd(1551.85, 5069.42, 117.55, 2.72)
pt3dadd(1551.85, 5070.19, 117.55, 2.72)
pt3dadd(1552.19, 5070.58, 117.55, 2.72)
pt3dadd(1552.53, 5070.96, 117.55, 2.72)
pt3dadd(1552.87, 5071.35, 117.55, 2.72)
pt3dadd(1553.21, 5071.73, 117.55, 2.72)
pt3dadd(1553.55, 5072.12, 117.55, 2.72)
pt3dadd(1553.89, 5072.5, 117.55, 2.72)
pt3dadd(1554.23, 5072.89, 117.55, 2.72)
pt3dadd(1554.57, 5073.28, 117.55, 2.72)
pt3dadd(1554.57, 5079.45, 117.55, 2.72)
pt3dadd(1554.91, 5079.83, 117.55, 2.72)
pt3dadd(1554.91, 5080.61, 117.55, 2.72)
pt3dadd(1555.25, 5080.99, 117.55, 2.72)
pt3dadd(1555.25, 5081.76, 117.55, 2.72)
pt3dadd(1555.59, 5082.15, 117.55, 2.72)
pt3dadd(1555.93, 5082.54, 117.55, 2.72)
pt3dadd(1555.93, 5083.31, 117.55, 2.72)
pt3dadd(1556.27, 5083.69, 117.55, 2.72)
pt3dadd(1556.27, 5084.46, 117.55, 2.72)
pt3dadd(1556.61, 5084.85, 117.55, 2.72)
pt3dadd(1556.95, 5085.24, 117.55, 2.72)
pt3dadd(1557.29, 5085.62, 117.55, 2.72)
pt3dadd(1557.63, 5086.01, 117.55, 2.72)
pt3dadd(1557.97, 5086.39, 117.55, 2.72)
pt3dadd(1558.31, 5086.78, 117.55, 2.72)
pt3dadd(1558.65, 5087.17, 117.55, 2.72)
pt3dadd(1558.99, 5087.55, 117.55, 2.72)
pt3dadd(1559.32, 5088.32, 117.55, 2.72)
pt3dadd(1559.66, 5088.71, 117.55, 2.72)
pt3dadd(1560, 5089.09, 117.55, 2.72)
pt3dadd(1560.34, 5089.48, 117.55, 2.72)
pt3dadd(1560.34, 5090.25, 117.55, 2.72)
pt3dadd(1560.68, 5090.64, 117.55, 2.72)
pt3dadd(1561.02, 5091.02, 117.55, 2.72)
pt3dadd(1561.02, 5091.79, 117.55, 2.72)
pt3dadd(1561.36, 5092.18, 117.55, 2.72)
pt3dadd(1561.7, 5092.57, 117.55, 2.72)
pt3dadd(1561.7, 5093.34, 117.55, 2.72)
pt3dadd(1562.04, 5093.72, 117.55, 2.72)
pt3dadd(1562.38, 5094.11, 117.55, 2.72)
pt3dadd(1562.72, 5094.5, 117.55, 2.72)
pt3dadd(1562.72, 5095.27, 117.55, 2.72)
pt3dadd(1563.06, 5095.65, 117.55, 2.72)
pt3dadd(1563.06, 5096.81, 117.55, 2.72)
pt3dadd(1563.4, 5097.2, 117.55, 2.72)
pt3dadd(1563.74, 5097.58, 117.55, 2.72)
pt3dadd(1563.74, 5098.35, 117.55, 2.72)
pt3dadd(1564.08, 5098.74, 117.55, 2.72)
pt3dadd(1564.42, 5099.13, 117.55, 2.72)
pt3dadd(1564.76, 5099.51, 117.55, 2.72)
pt3dadd(1565.1, 5099.9, 117.55, 2.72)
pt3dadd(1565.44, 5100.28, 117.55, 2.72)
pt3dadd(1565.44, 5104.14, 117.55, 2.72)
pt3dadd(1565.1, 5104.91, 117.55, 2.38)
pt3dadd(1565.44, 5105.68, 117.55, 2.38)
pt3dadd(1565.78, 5106.46, 117.55, 2.38)
pt3dadd(1566.12, 5107.23, 117.55, 2.38)
pt3dadd(1566.12, 5108, 117.55, 2.38)
pt3dadd(1566.46, 5108.38, 117.55, 2.38)
pt3dadd(1566.8, 5108.77, 117.55, 2.38)
pt3dadd(1567.14, 5109.54, 117.55, 2.38)
pt3dadd(1567.48, 5109.93, 117.55, 2.38)
pt3dadd(1567.82, 5110.31, 117.55, 2.38)
pt3dadd(1567.82, 5111.08, 117.55, 2.38)
pt3dadd(1568.16, 5111.47, 117.55, 2.38)
pt3dadd(1568.5, 5112.24, 117.55, 2.38)
pt3dadd(1568.84, 5112.63, 117.55, 2.38)
pt3dadd(1569.18, 5113.01, 117.55, 2.38)
pt3dadd(1569.52, 5113.4, 117.55, 2.38)
pt3dadd(1569.85, 5113.79, 117.55, 2.38)
pt3dadd(1570.19, 5114.17, 117.55, 2.38)
pt3dadd(1570.53, 5114.94, 117.55, 2.38)
pt3dadd(1570.87, 5115.33, 117.55, 2.38)
pt3dadd(1571.21, 5115.71, 117.55, 2.38)
pt3dadd(1571.21, 5116.49, 117.55, 2.38)
pt3dadd(1571.55, 5116.87, 117.55, 2.38)
pt3dadd(1571.89, 5117.26, 117.55, 2.38)
pt3dadd(1572.23, 5117.64, 117.55, 2.38)
pt3dadd(1572.57, 5118.03, 117.55, 2.38)
}
}
proc shape3d_113() {
dend[69] { pt3dadd(1572.91, 5118.42, 117.55, 2.38)
pt3dadd(1572.91, 5119.19, 117.55, 2.38)
pt3dadd(1573.25, 5119.57, 117.55, 2.38)
pt3dadd(1573.59, 5119.96, 117.55, 2.38)
pt3dadd(1573.59, 5120.73, 117.55, 2.38)
pt3dadd(1573.93, 5121.12, 117.55, 2.38)
pt3dadd(1573.93, 5122.27, 117.55, 2.38)
pt3dadd(1574.27, 5123.04, 117.55, 2.38)
pt3dadd(1574.27, 5126.13, 117.55, 2.38)
pt3dadd(1574.27, 5126.13, 117.55, 3.4)
pt3dadd(1574.61, 5126.13, 117.55, 3.4)
pt3dadd(1574.95, 5126.52, 117.55, 3.4)
pt3dadd(1575.29, 5127.29, 117.55, 3.4)
pt3dadd(1575.63, 5127.67, 117.55, 3.4)
pt3dadd(1575.63, 5128.45, 117.55, 3.4)
pt3dadd(1575.97, 5129.22, 117.55, 3.4)
pt3dadd(1575.97, 5130.76, 117.55, 3.4)
pt3dadd(1576.31, 5131.15, 117.55, 3.4)
pt3dadd(1576.31, 5135, 117.55, 3.4)
pt3dadd(1576.65, 5135.39, 117.55, 3.4)
pt3dadd(1576.99, 5135.78, 117.55, 3.4)
pt3dadd(1577.33, 5136.55, 117.55, 3.4)
pt3dadd(1577.67, 5137.32, 117.55, 3.4)
pt3dadd(1578.35, 5138.48, 117.55, 3.4)
pt3dadd(1578.69, 5139.25, 117.55, 3.4)
pt3dadd(1579.03, 5139.63, 117.55, 3.4)
pt3dadd(1579.37, 5140.02, 117.55, 3.4)
pt3dadd(1579.71, 5140.79, 117.55, 3.4)
pt3dadd(1580.04, 5141.18, 117.55, 3.4)
pt3dadd(1580.38, 5141.56, 117.55, 3.4)
pt3dadd(1580.72, 5141.95, 117.55, 3.4)
pt3dadd(1581.06, 5142.33, 117.55, 3.4)
pt3dadd(1581.4, 5143.11, 117.55, 3.4)
pt3dadd(1581.74, 5143.49, 117.55, 3.4)
pt3dadd(1582.42, 5144.65, 117.55, 3.4)
pt3dadd(1583.1, 5145.42, 117.55, 3.4)
pt3dadd(1583.1, 5146.19, 117.55, 3.4)
pt3dadd(1583.44, 5146.58, 117.55, 3.4)
pt3dadd(1583.78, 5147.35, 117.55, 3.4)
pt3dadd(1583.78, 5157.77, 117.55, 3.4)
pt3dadd(1584.46, 5157, 117.55, 3.06)
pt3dadd(1584.46, 5157.77, 117.55, 3.06)
pt3dadd(1584.8, 5158.15, 117.55, 3.06)
pt3dadd(1584.8, 5158.92, 117.55, 3.06)
pt3dadd(1585.14, 5159.7, 117.55, 3.06)
pt3dadd(1585.48, 5160.47, 117.55, 3.06)
pt3dadd(1585.82, 5160.85, 117.55, 3.06)
pt3dadd(1585.82, 5161.63, 117.55, 3.06)
pt3dadd(1586.16, 5162.01, 117.55, 3.06)
pt3dadd(1586.5, 5162.4, 117.55, 3.06)
pt3dadd(1586.84, 5162.78, 117.55, 3.06)
pt3dadd(1587.18, 5163.17, 117.55, 3.06)
pt3dadd(1587.52, 5163.55, 117.55, 3.06)
pt3dadd(1587.86, 5164.33, 117.55, 3.06)
pt3dadd(1588.2, 5164.71, 117.55, 3.06)
pt3dadd(1588.2, 5165.48, 117.55, 3.06)
pt3dadd(1588.54, 5166.25, 117.55, 3.06)
pt3dadd(1588.88, 5166.64, 117.55, 3.06)
pt3dadd(1589.22, 5167.03, 117.55, 3.06)
pt3dadd(1589.56, 5167.41, 117.55, 3.06)
pt3dadd(1589.9, 5167.8, 117.55, 3.06)
pt3dadd(1589.9, 5168.57, 117.55, 3.06)
pt3dadd(1590.24, 5168.96, 117.55, 3.06)
pt3dadd(1590.57, 5169.34, 117.55, 3.06)
pt3dadd(1590.91, 5169.73, 117.55, 3.06)
pt3dadd(1591.25, 5170.11, 117.55, 3.06)
pt3dadd(1591.59, 5170.5, 117.55, 3.06)
pt3dadd(1591.93, 5170.88, 117.55, 3.06)
pt3dadd(1592.27, 5171.27, 117.55, 3.06)
pt3dadd(1592.27, 5172.04, 117.55, 3.06)
pt3dadd(1592.61, 5172.43, 117.55, 3.06)
pt3dadd(1592.95, 5173.2, 117.55, 3.06)
pt3dadd(1593.29, 5173.58, 117.55, 3.06)
pt3dadd(1593.29, 5174.36, 117.55, 3.06)
pt3dadd(1593.63, 5174.74, 117.55, 3.06)
pt3dadd(1593.97, 5175.13, 117.55, 3.06)
pt3dadd(1594.31, 5175.51, 117.55, 3.06)
pt3dadd(1594.31, 5176.29, 117.55, 3.06)
pt3dadd(1594.65, 5176.67, 117.55, 3.06)
pt3dadd(1594.99, 5177.44, 117.55, 3.06)
pt3dadd(1595.33, 5177.83, 117.55, 3.06)
pt3dadd(1595.33, 5178.6, 117.55, 3.06)
pt3dadd(1595.67, 5179.37, 117.55, 3.06)
pt3dadd(1596.01, 5179.76, 117.55, 3.06)
pt3dadd(1596.35, 5180.14, 117.55, 3.06)
pt3dadd(1596.69, 5180.53, 117.55, 3.06)
pt3dadd(1596.69, 5181.3, 117.55, 3.06)
pt3dadd(1597.37, 5181.69, 117.55, 3.06)
pt3dadd(1597.37, 5182.46, 117.55, 3.06)
pt3dadd(1598.05, 5183.23, 117.55, 3.06)
pt3dadd(1598.39, 5183.62, 117.55, 3.06)
pt3dadd(1598.39, 5184.39, 117.55, 3.06)
pt3dadd(1599.07, 5185.16, 117.55, 3.06)
pt3dadd(1599.41, 5185.54, 117.55, 3.06)
pt3dadd(1599.75, 5185.93, 117.55, 3.06)
pt3dadd(1600.09, 5186.7, 117.55, 3.06)
pt3dadd(1600.43, 5187.47, 117.55, 3.06)
pt3dadd(1600.76, 5187.86, 117.55, 3.06)
pt3dadd(1601.1, 5188.25, 117.55, 3.06)
pt3dadd(1601.44, 5188.63, 117.55, 3.06)
pt3dadd(1601.78, 5189.02, 117.55, 3.06)
pt3dadd(1602.12, 5189.4, 117.55, 3.06)
pt3dadd(1602.46, 5189.79, 117.55, 3.06)
pt3dadd(1602.46, 5190.56, 117.55, 3.06)
pt3dadd(1602.8, 5190.95, 117.55, 3.06)
pt3dadd(1603.14, 5191.72, 117.55, 3.06)
pt3dadd(1603.48, 5192.49, 117.55, 3.06)
pt3dadd(1603.82, 5192.88, 117.55, 3.06)
pt3dadd(1603.82, 5193.65, 117.55, 3.06)
pt3dadd(1604.16, 5194.03, 117.55, 3.06)
pt3dadd(1604.16, 5195.19, 117.55, 3.06)
pt3dadd(1604.5, 5195.58, 117.55, 3.06)
pt3dadd(1604.5, 5196.73, 117.55, 3.06)
pt3dadd(1604.84, 5197.12, 117.55, 3.06)
pt3dadd(1605.18, 5197.5, 117.55, 3.06)
pt3dadd(1605.18, 5198.28, 117.55, 3.06)
pt3dadd(1605.86, 5198.66, 117.55, 3.06)
pt3dadd(1606.2, 5199.05, 117.55, 3.06)
pt3dadd(1606.54, 5199.43, 117.55, 3.06)
pt3dadd(1606.54, 5200.21, 117.55, 3.06)
pt3dadd(1606.88, 5200.59, 117.55, 3.06)
pt3dadd(1607.22, 5200.98, 117.55, 3.06)
pt3dadd(1607.56, 5201.36, 117.55, 3.06)
pt3dadd(1607.9, 5201.75, 117.55, 3.06)
pt3dadd(1608.24, 5202.13, 117.55, 3.06)
pt3dadd(1608.58, 5202.52, 117.55, 3.06)
pt3dadd(1608.92, 5202.91, 117.55, 3.06)
pt3dadd(1609.26, 5203.29, 117.55, 3.06)
pt3dadd(1609.94, 5203.29, 117.55, 3.06)
pt3dadd(1609.94, 5204.45, 117.55, 3.06)
pt3dadd(1610.28, 5205.22, 117.55, 3.06)
pt3dadd(1610.28, 5207.54, 117.55, 3.06)
pt3dadd(1610.62, 5208.31, 117.55, 3.06)
pt3dadd(1610.62, 5209.85, 117.55, 3.06)
pt3dadd(1610.96, 5210.24, 117.55, 3.06)
pt3dadd(1610.96, 5211.01, 117.55, 3.06)
pt3dadd(1611.29, 5211.39, 117.55, 3.06)
pt3dadd(1611.63, 5212.17, 117.55, 3.06)
pt3dadd(1611.97, 5212.55, 117.55, 3.06)
pt3dadd(1611.97, 5213.32, 117.55, 3.06)
pt3dadd(1612.31, 5213.71, 117.55, 3.06)
pt3dadd(1612.31, 5214.87, 117.55, 3.06)
pt3dadd(1612.65, 5215.25, 117.55, 3.06)
pt3dadd(1612.65, 5216.41, 117.55, 3.06)
pt3dadd(1612.99, 5216.79, 117.55, 3.06)
pt3dadd(1613.33, 5217.18, 117.55, 3.06)
pt3dadd(1613.33, 5217.95, 117.55, 3.06)
pt3dadd(1613.67, 5218.34, 117.55, 3.06)
pt3dadd(1614.01, 5218.72, 117.55, 3.06)
pt3dadd(1614.35, 5219.11, 117.55, 3.06)
pt3dadd(1614.35, 5220.27, 117.55, 3.06)
pt3dadd(1614.69, 5220.65, 117.55, 3.06)
pt3dadd(1615.03, 5221.04, 117.55, 3.06)
pt3dadd(1615.03, 5222.2, 117.55, 3.06)
pt3dadd(1615.37, 5222.97, 117.55, 3.06)
pt3dadd(1615.71, 5223.74, 117.55, 3.06)
pt3dadd(1615.71, 5224.51, 117.55, 3.06)
pt3dadd(1616.05, 5224.9, 117.55, 3.06)
pt3dadd(1616.39, 5225.67, 117.55, 3.06)
pt3dadd(1616.73, 5226.05, 117.55, 3.06)
pt3dadd(1616.73, 5227.21, 117.55, 3.06)
pt3dadd(1617.07, 5227.98, 117.55, 3.06)
pt3dadd(1617.41, 5228.37, 117.55, 3.06)
pt3dadd(1617.41, 5229.14, 117.55, 3.06)
pt3dadd(1617.75, 5229.53, 117.55, 3.06)
pt3dadd(1617.75, 5230.3, 117.55, 3.06)
pt3dadd(1618.09, 5231.46, 117.55, 3.06)
pt3dadd(1618.43, 5232.23, 117.55, 3.06)
pt3dadd(1618.77, 5232.61, 117.55, 3.06)
pt3dadd(1618.77, 5233.77, 117.55, 3.06)
pt3dadd(1619.11, 5234.16, 117.55, 3.06)
pt3dadd(1619.45, 5234.93, 117.55, 3.06)
pt3dadd(1619.45, 5236.47, 117.55, 3.06)
pt3dadd(1619.79, 5236.86, 117.55, 3.06)
pt3dadd(1620.13, 5237.24, 117.55, 3.06)
pt3dadd(1620.47, 5237.63, 117.55, 3.06)
pt3dadd(1620.47, 5239.17, 117.55, 3.06)
pt3dadd(1620.81, 5239.94, 117.55, 3.06)
pt3dadd(1621.15, 5240.71, 117.55, 3.06)
pt3dadd(1618.77, 5234.16, 117.55, 2.72)
pt3dadd(1619.11, 5234.16, 117.55, 2.72)
pt3dadd(1619.45, 5234.54, 117.55, 2.72)
pt3dadd(1619.45, 5235.31, 117.55, 2.72)
pt3dadd(1619.79, 5236.08, 117.55, 2.72)
pt3dadd(1619.79, 5237.24, 117.55, 2.72)
pt3dadd(1620.13, 5238.01, 117.55, 2.72)
pt3dadd(1620.47, 5238.79, 117.55, 2.72)
pt3dadd(1620.81, 5239.17, 117.55, 2.72)
pt3dadd(1621.15, 5239.56, 117.55, 2.72)
pt3dadd(1621.49, 5239.94, 117.55, 2.72)
pt3dadd(1621.49, 5240.71, 117.55, 2.72)
pt3dadd(1621.82, 5241.1, 117.55, 2.72)
pt3dadd(1621.82, 5248.43, 117.55, 2.72)
pt3dadd(1622.16, 5248.82, 117.55, 2.72)
pt3dadd(1622.16, 5249.59, 117.55, 2.72)
pt3dadd(1622.5, 5249.97, 117.55, 2.72)
pt3dadd(1622.5, 5251.13, 117.55, 2.72)
pt3dadd(1622.84, 5251.52, 117.55, 2.72)
pt3dadd(1623.18, 5251.9, 117.55, 2.72)
pt3dadd(1623.52, 5252.29, 117.55, 2.72)
}
}
proc shape3d_114() {
dend[69] { pt3dadd(1623.86, 5252.67, 117.55, 2.72)
pt3dadd(1623.86, 5253.45, 117.55, 2.72)
pt3dadd(1624.2, 5254.22, 117.55, 2.72)
pt3dadd(1624.54, 5254.6, 117.55, 2.72)
pt3dadd(1624.88, 5254.99, 117.55, 2.72)
pt3dadd(1624.88, 5255.76, 117.55, 2.72)
pt3dadd(1625.22, 5256.15, 117.55, 2.72)
pt3dadd(1625.56, 5256.53, 117.55, 2.72)
pt3dadd(1625.9, 5257.3, 117.55, 2.72)
pt3dadd(1626.24, 5257.69, 117.55, 2.72)
pt3dadd(1626.58, 5258.08, 117.55, 2.72)
pt3dadd(1626.92, 5258.46, 117.55, 2.72)
pt3dadd(1626.92, 5259.23, 117.55, 2.72)
pt3dadd(1627.26, 5259.62, 117.55, 2.72)
pt3dadd(1627.26, 5260.78, 117.55, 2.72)
pt3dadd(1627.6, 5261.16, 117.55, 2.72)
pt3dadd(1627.6, 5266.56, 117.55, 2.72)
pt3dadd(1626.92, 5266.95, 117.55, 3.06)
pt3dadd(1627.26, 5268.88, 117.55, 3.74)
pt3dadd(1627.26, 5293.96, 117.55, 3.74)
pt3dadd(1627.6, 5294.73, 117.55, 3.74)
pt3dadd(1627.6, 5297.43, 117.55, 3.74)
pt3dadd(1627.94, 5297.81, 117.55, 3.74)
pt3dadd(1627.94, 5299.36, 117.55, 3.74)
pt3dadd(1628.28, 5299.74, 117.55, 3.74)
pt3dadd(1628.28, 5302.06, 117.55, 3.74)
pt3dadd(1628.62, 5302.44, 117.55, 3.74)
pt3dadd(1628.62, 5303.6, 117.55, 3.74)
pt3dadd(1628.96, 5303.99, 117.55, 3.74)
pt3dadd(1629.3, 5304.37, 117.55, 3.74)
pt3dadd(1629.3, 5312.47, 117.55, 3.74)
pt3dadd(1629.64, 5313.25, 117.55, 3.74)
pt3dadd(1629.98, 5313.63, 117.55, 3.74)
pt3dadd(1630.32, 5314.02, 117.55, 3.74)
pt3dadd(1630.66, 5314.79, 117.55, 3.74)
pt3dadd(1630.66, 5321.73, 117.55, 3.74)
pt3dadd(1631, 5322.5, 117.55, 3.74)
pt3dadd(1631, 5323.28, 117.55, 3.74)
pt3dadd(1630.32, 5324.05, 117.55, 3.06)
pt3dadd(1630.32, 5330.22, 117.55, 3.06)
pt3dadd(1630.66, 5330.61, 117.55, 3.06)
pt3dadd(1630.66, 5331.38, 117.55, 3.06)
pt3dadd(1631, 5331.76, 117.55, 3.06)
pt3dadd(1631.34, 5332.54, 117.55, 3.06)
pt3dadd(1631.68, 5332.92, 117.55, 3.06)
pt3dadd(1632.02, 5333.31, 117.55, 3.06)
pt3dadd(1632.35, 5333.69, 117.55, 3.06)
pt3dadd(1632.69, 5334.08, 117.55, 3.06)
pt3dadd(1632.69, 5341.02, 117.55, 3.06)
pt3dadd(1633.03, 5341.79, 117.55, 2.72)
pt3dadd(1633.03, 5342.57, 117.55, 2.72)
pt3dadd(1632.69, 5342.95, 117.55, 2.72)
pt3dadd(1632.35, 5343.34, 117.55, 2.72)
pt3dadd(1632.35, 5344.11, 117.55, 2.72)
pt3dadd(1632.02, 5344.5, 117.55, 2.72)
pt3dadd(1632.02, 5346.04, 117.55, 2.72)
pt3dadd(1631.68, 5346.42, 117.55, 2.72)
pt3dadd(1631.68, 5349.9, 117.55, 2.72)
pt3dadd(1631, 5349.9, 117.55, 2.72)
pt3dadd(1631, 5354.14, 117.55, 2.72)
pt3dadd(1630.66, 5354.53, 117.55, 2.72)
pt3dadd(1630.66, 5355.68, 117.55, 2.72)
pt3dadd(1630.32, 5356.07, 117.55, 2.72)
pt3dadd(1630.32, 5359.54, 117.55, 2.72)
pt3dadd(1631, 5363.4, 117.55, 2.72)
pt3dadd(1630.66, 5373.43, 117.55, 2.72)
pt3dadd(1627.94, 5385, 117.55, 2.72)
pt3dadd(1628.62, 5383.46, 117.55, 2.72)
pt3dadd(1630.32, 5381.15, 117.55, 2.72)
pt3dadd(1630.66, 5360.31, 117.55, 2.72)
pt3dadd(1630.66, 5375.75, 117.55, 2.72)
pt3dadd(1630.66, 5378.83, 117.55, 2.72)
}
dend[70] {pt3dclear()
pt3dadd(1136.25, 3704.25, 117.55, 4.08)
pt3dadd(1155.27, 3717.75, 117.55, 4.08)
pt3dadd(1176.33, 3735.12, 117.55, 3.4)
pt3dadd(1201.47, 3754.79, 117.55, 3.4)
pt3dadd(1209.62, 3761.35, 117.55, 3.4)
pt3dadd(1219.81, 3775.62, 117.55, 3.4)
pt3dadd(1232.72, 3791.44, 117.55, 3.4)
pt3dadd(1255.14, 3824.24, 117.55, 3.4)
pt3dadd(1282.31, 3856.26, 117.55, 3.4)
pt3dadd(1291.14, 3864.36, 117.55, 2.72)
}
dend[71] {pt3dclear()
pt3dadd(868.21, 2626.54, 117.55, 5.43)
pt3dadd(896.06, 2633.49, 117.55, 5.43)
pt3dadd(969.99, 2665.41, 117.55, 6.11)
pt3dadd(970.67, 2665.79, 117.55, 6.11)
pt3dadd(971.01, 2666.18, 117.55, 6.11)
pt3dadd(971.69, 2666.56, 117.55, 6.11)
pt3dadd(972.37, 2666.95, 117.55, 6.11)
pt3dadd(973.05, 2667.33, 117.55, 6.11)
pt3dadd(973.73, 2667.72, 117.55, 6.11)
pt3dadd(974.41, 2668.11, 117.55, 6.11)
pt3dadd(975.09, 2668.49, 117.55, 6.11)
pt3dadd(975.77, 2668.88, 117.55, 6.11)
pt3dadd(976.11, 2669.65, 117.55, 6.11)
pt3dadd(976.45, 2670.03, 117.55, 6.11)
pt3dadd(977.47, 2671.19, 117.55, 6.11)
pt3dadd(977.8, 2671.58, 117.55, 6.11)
pt3dadd(978.48, 2672.35, 117.55, 6.11)
pt3dadd(978.82, 2672.74, 117.55, 6.11)
pt3dadd(979.16, 2673.12, 117.55, 6.11)
pt3dadd(979.84, 2673.51, 117.55, 6.11)
pt3dadd(980.18, 2673.89, 117.55, 6.11)
pt3dadd(980.86, 2674.66, 117.55, 6.11)
pt3dadd(981.2, 2675.05, 117.55, 6.11)
pt3dadd(981.54, 2675.44, 117.55, 6.11)
pt3dadd(982.22, 2675.82, 117.55, 6.11)
pt3dadd(982.9, 2676.21, 117.55, 6.11)
pt3dadd(983.58, 2676.21, 117.55, 6.11)
pt3dadd(983.92, 2676.59, 117.55, 6.11)
pt3dadd(984.6, 2676.98, 117.55, 6.11)
pt3dadd(984.94, 2677.36, 117.55, 6.11)
pt3dadd(985.62, 2677.36, 117.55, 6.11)
pt3dadd(985.96, 2677.75, 117.55, 6.11)
pt3dadd(986.3, 2678.14, 117.55, 6.11)
pt3dadd(986.98, 2678.14, 117.55, 6.11)
pt3dadd(987.66, 2678.52, 117.55, 6.11)
pt3dadd(987.66, 2679.29, 117.55, 6.11)
pt3dadd(988, 2679.68, 117.55, 6.11)
pt3dadd(988.33, 2680.07, 117.55, 6.11)
pt3dadd(988.67, 2680.45, 117.55, 6.11)
pt3dadd(989.01, 2680.84, 117.55, 6.11)
pt3dadd(989.69, 2680.84, 117.55, 6.11)
pt3dadd(992.41, 2683.54, 117.55, 6.11)
pt3dadd(991.73, 2683.34, 117.55, 6.11)
pt3dadd(992.41, 2683.73, 117.55, 6.11)
pt3dadd(993.09, 2684.12, 117.55, 6.11)
pt3dadd(993.43, 2684.5, 117.55, 6.11)
pt3dadd(994.11, 2684.89, 117.55, 6.11)
pt3dadd(994.79, 2685.66, 117.55, 6.11)
pt3dadd(995.13, 2686.05, 117.55, 6.11)
pt3dadd(995.47, 2686.82, 117.55, 6.11)
pt3dadd(996.15, 2687.2, 117.55, 6.11)
pt3dadd(996.49, 2687.59, 117.55, 6.11)
pt3dadd(996.83, 2687.97, 117.55, 6.11)
pt3dadd(997.51, 2688.36, 117.55, 6.11)
pt3dadd(997.85, 2688.75, 117.55, 6.11)
pt3dadd(998.53, 2689.13, 117.55, 6.11)
pt3dadd(999.2, 2689.52, 117.55, 6.11)
pt3dadd(999.54, 2689.9, 117.55, 6.11)
pt3dadd(1000.22, 2689.9, 117.55, 6.11)
pt3dadd(1000.56, 2690.29, 117.55, 6.11)
pt3dadd(1000.9, 2690.68, 117.55, 6.11)
pt3dadd(1001.58, 2690.68, 117.55, 6.11)
pt3dadd(1001.92, 2691.06, 117.55, 6.11)
pt3dadd(1002.6, 2691.45, 117.55, 6.11)
pt3dadd(1002.94, 2691.83, 117.55, 6.11)
pt3dadd(1003.62, 2692.6, 117.55, 6.11)
pt3dadd(1003.96, 2692.99, 117.55, 6.11)
pt3dadd(1004.64, 2693.76, 117.55, 6.11)
pt3dadd(1005.32, 2694.15, 117.55, 6.11)
pt3dadd(1005.66, 2694.53, 117.55, 6.11)
pt3dadd(1006.68, 2695.69, 117.55, 6.11)
pt3dadd(1007.36, 2696.08, 117.55, 6.11)
pt3dadd(1007.7, 2696.46, 117.55, 6.11)
pt3dadd(1008.38, 2697.23, 117.55, 6.11)
pt3dadd(1008.72, 2697.62, 117.55, 6.11)
pt3dadd(1009.39, 2697.62, 117.55, 6.11)
pt3dadd(1009.73, 2698.01, 117.55, 6.11)
pt3dadd(1010.07, 2698.78, 117.55, 6.11)
pt3dadd(1010.41, 2699.16, 117.55, 6.11)
pt3dadd(1011.09, 2699.93, 117.55, 6.11)
pt3dadd(1011.77, 2699.93, 117.55, 6.11)
pt3dadd(1012.11, 2700.71, 117.55, 6.11)
pt3dadd(1012.45, 2701.09, 117.55, 6.11)
pt3dadd(1012.79, 2701.86, 117.55, 6.11)
pt3dadd(1013.13, 2702.64, 117.55, 6.11)
pt3dadd(1013.47, 2703.02, 117.55, 6.11)
pt3dadd(1013.47, 2703.79, 117.55, 6.11)
pt3dadd(1013.81, 2704.18, 117.55, 6.11)
pt3dadd(1014.15, 2704.56, 117.55, 6.11)
pt3dadd(1014.49, 2705.34, 117.55, 6.11)
pt3dadd(1014.83, 2705.72, 117.55, 6.11)
pt3dadd(1015.17, 2706.49, 117.55, 6.11)
pt3dadd(1015.51, 2707.26, 117.55, 6.11)
pt3dadd(1015.85, 2707.65, 117.55, 6.11)
pt3dadd(1016.19, 2708.42, 117.55, 6.11)
pt3dadd(1016.19, 2709.19, 117.55, 6.11)
pt3dadd(1016.87, 2709.97, 117.55, 6.11)
pt3dadd(1017.21, 2710.35, 117.55, 6.11)
pt3dadd(1017.21, 2711.12, 117.55, 6.11)
pt3dadd(1017.55, 2711.51, 117.55, 6.11)
pt3dadd(1017.89, 2712.28, 117.55, 6.11)
pt3dadd(1018.23, 2712.67, 117.55, 6.11)
pt3dadd(1018.57, 2713.44, 117.55, 6.11)
pt3dadd(1019.25, 2714.21, 117.55, 6.11)
pt3dadd(1019.58, 2714.98, 117.55, 6.11)
pt3dadd(1019.92, 2715.75, 117.55, 6.11)
pt3dadd(1020.26, 2716.14, 117.55, 6.11)
pt3dadd(1020.6, 2716.52, 117.55, 6.11)
pt3dadd(1020.94, 2716.91, 117.55, 6.11)
pt3dadd(1021.28, 2717.3, 117.55, 6.11)
pt3dadd(1021.62, 2718.07, 117.55, 6.11)
pt3dadd(1021.96, 2718.84, 117.55, 6.11)
pt3dadd(1022.3, 2719.22, 117.55, 6.11)
pt3dadd(1022.64, 2719.61, 117.55, 6.11)
pt3dadd(1023.32, 2720.38, 117.55, 6.11)
pt3dadd(1024, 2721.15, 117.55, 6.11)
pt3dadd(1024.34, 2721.93, 117.55, 6.11)
pt3dadd(1024.68, 2722.7, 117.55, 6.11)
}
}
proc shape3d_115() {
dend[71] { pt3dadd(1025.02, 2723.08, 117.55, 6.11)
pt3dadd(1025.36, 2723.85, 117.55, 6.11)
pt3dadd(1026.38, 2725.01, 117.55, 6.11)
pt3dadd(1027.06, 2725.01, 117.55, 6.11)
pt3dadd(1027.4, 2725.4, 117.55, 6.11)
pt3dadd(1027.74, 2725.78, 117.55, 6.11)
pt3dadd(1028.42, 2726.17, 117.55, 6.11)
pt3dadd(1028.76, 2726.55, 117.55, 6.11)
pt3dadd(1029.44, 2726.55, 117.55, 6.11)
pt3dadd(1029.78, 2727.33, 117.55, 6.11)
pt3dadd(1030.11, 2727.71, 117.55, 6.11)
pt3dadd(1030.79, 2728.1, 117.55, 6.11)
pt3dadd(1031.47, 2728.48, 117.55, 6.11)
pt3dadd(1031.81, 2728.87, 117.55, 6.11)
pt3dadd(1032.49, 2729.26, 117.55, 6.11)
pt3dadd(1033.17, 2729.64, 117.55, 6.11)
pt3dadd(1033.85, 2730.03, 117.55, 6.11)
pt3dadd(1034.53, 2730.41, 117.55, 6.11)
pt3dadd(1035.21, 2730.8, 117.55, 6.11)
pt3dadd(1037.93, 2730.8, 117.55, 6.11)
pt3dadd(1038.27, 2730.41, 117.55, 6.11)
pt3dadd(1039.97, 2730.41, 117.55, 6.11)
pt3dadd(1040.31, 2730.99, 117.55, 6.11)
pt3dadd(1040.64, 2730.99, 117.55, 6.11)
pt3dadd(1040.98, 2730.99, 117.55, 6.11)
pt3dadd(1042, 2731.38, 117.55, 6.11)
pt3dadd(1042.68, 2731.76, 117.55, 6.11)
pt3dadd(1043.02, 2732.15, 117.55, 6.11)
pt3dadd(1044.04, 2732.15, 117.55, 6.11)
pt3dadd(1044.72, 2732.53, 117.55, 6.11)
pt3dadd(1045.4, 2732.92, 117.55, 6.11)
pt3dadd(1046.42, 2733.31, 117.55, 6.11)
pt3dadd(1046.76, 2734.08, 117.55, 6.11)
pt3dadd(1047.44, 2734.46, 117.55, 6.11)
pt3dadd(1048.12, 2734.85, 117.55, 6.11)
pt3dadd(1048.8, 2735.24, 117.55, 6.11)
pt3dadd(1049.48, 2735.62, 117.55, 6.11)
pt3dadd(1050.5, 2736.01, 117.55, 6.11)
pt3dadd(1051.17, 2736.39, 117.55, 6.11)
pt3dadd(1051.85, 2736.78, 117.55, 6.11)
pt3dadd(1052.19, 2737.16, 117.55, 6.11)
pt3dadd(1052.53, 2737.55, 117.55, 6.11)
pt3dadd(1053.89, 2737.55, 117.55, 6.11)
pt3dadd(1054.91, 2737.94, 117.55, 6.11)
pt3dadd(1055.25, 2738.32, 117.55, 6.11)
pt3dadd(1055.93, 2738.71, 117.55, 6.11)
pt3dadd(1056.27, 2739.09, 117.55, 6.11)
pt3dadd(1056.61, 2739.48, 117.55, 6.11)
pt3dadd(1057.63, 2740.64, 117.55, 6.11)
pt3dadd(1058.31, 2741.02, 117.55, 6.11)
pt3dadd(1058.65, 2741.41, 117.55, 6.11)
pt3dadd(1059.33, 2741.79, 117.55, 6.11)
pt3dadd(1059.67, 2742.18, 117.55, 6.11)
pt3dadd(1060.35, 2742.57, 117.55, 6.11)
pt3dadd(1060.69, 2742.95, 117.55, 6.11)
pt3dadd(1061.36, 2743.34, 117.55, 6.11)
pt3dadd(1062.04, 2743.34, 117.55, 6.11)
pt3dadd(1062.72, 2743.72, 117.55, 6.11)
pt3dadd(1063.06, 2744.49, 117.55, 6.11)
pt3dadd(1063.74, 2744.49, 117.55, 6.11)
pt3dadd(1064.08, 2744.88, 117.55, 6.11)
pt3dadd(1064.76, 2745.27, 117.55, 6.11)
pt3dadd(1065.44, 2745.65, 117.55, 6.11)
pt3dadd(1065.78, 2746.04, 117.55, 6.11)
pt3dadd(1066.46, 2746.04, 117.55, 6.11)
pt3dadd(1066.8, 2746.42, 117.55, 6.11)
pt3dadd(1067.48, 2746.81, 117.55, 6.11)
pt3dadd(1068.16, 2746.81, 117.55, 6.11)
pt3dadd(1068.5, 2747.2, 117.55, 6.11)
pt3dadd(1068.84, 2747.58, 117.55, 6.11)
pt3dadd(1069.86, 2748.35, 117.55, 6.11)
pt3dadd(1070.54, 2748.74, 117.55, 6.11)
pt3dadd(1071.22, 2748.74, 117.55, 6.11)
pt3dadd(1071.56, 2749.12, 117.55, 6.11)
pt3dadd(1072.23, 2749.51, 117.55, 6.11)
pt3dadd(1072.57, 2749.9, 117.55, 6.11)
pt3dadd(1072.91, 2750.28, 117.55, 6.11)
pt3dadd(1073.59, 2750.28, 117.55, 6.11)
pt3dadd(1073.93, 2751.05, 117.55, 6.11)
pt3dadd(1074.61, 2751.44, 117.55, 6.11)
pt3dadd(1074.61, 2752.21, 117.55, 6.11)
pt3dadd(1075.29, 2752.6, 117.55, 6.11)
pt3dadd(1075.97, 2753.75, 117.55, 6.11)
pt3dadd(1076.31, 2754.14, 117.55, 6.11)
pt3dadd(1076.99, 2754.53, 117.55, 6.11)
pt3dadd(1077.33, 2754.91, 117.55, 6.11)
pt3dadd(1078.01, 2756.07, 117.55, 6.11)
pt3dadd(1078.69, 2756.45, 117.55, 6.11)
pt3dadd(1079.03, 2756.84, 117.55, 6.11)
pt3dadd(1079.71, 2757.23, 117.55, 6.11)
pt3dadd(1080.39, 2758, 117.55, 6.11)
pt3dadd(1081.07, 2758.38, 117.55, 6.11)
pt3dadd(1081.41, 2758.77, 117.55, 6.11)
pt3dadd(1081.75, 2759.16, 117.55, 6.11)
pt3dadd(1082.42, 2759.93, 117.55, 6.11)
pt3dadd(1083.1, 2760.31, 117.55, 6.11)
pt3dadd(1083.44, 2760.7, 117.55, 6.11)
pt3dadd(1083.78, 2761.08, 117.55, 6.11)
pt3dadd(1084.12, 2761.47, 117.55, 6.11)
pt3dadd(1084.8, 2761.47, 117.55, 6.11)
pt3dadd(1085.14, 2761.86, 117.55, 6.11)
pt3dadd(1085.82, 2762.63, 117.55, 6.11)
pt3dadd(1086.16, 2763.01, 117.55, 6.11)
pt3dadd(1086.84, 2763.01, 117.55, 6.11)
pt3dadd(1087.18, 2763.4, 117.55, 6.11)
pt3dadd(1087.52, 2763.78, 117.55, 6.11)
pt3dadd(1088.2, 2763.78, 117.55, 6.11)
pt3dadd(1088.54, 2764.17, 117.55, 6.11)
pt3dadd(1088.88, 2764.56, 117.55, 6.11)
pt3dadd(1089.56, 2764.56, 117.55, 6.11)
pt3dadd(1090.24, 2764.94, 117.55, 6.11)
pt3dadd(1090.58, 2765.33, 117.55, 6.11)
pt3dadd(1091.94, 2765.33, 117.55, 6.11)
pt3dadd(1092.28, 2766.1, 117.55, 6.11)
pt3dadd(1092.95, 2766.49, 117.55, 6.11)
pt3dadd(1093.29, 2766.87, 117.55, 6.11)
pt3dadd(1093.97, 2767.26, 117.55, 6.11)
pt3dadd(1094.31, 2767.64, 117.55, 6.11)
pt3dadd(1094.99, 2767.64, 117.55, 6.11)
pt3dadd(1095.67, 2768.03, 117.55, 6.11)
pt3dadd(1096.35, 2768.41, 117.55, 6.11)
pt3dadd(1097.03, 2768.8, 117.55, 6.11)
pt3dadd(1097.71, 2769.19, 117.55, 6.11)
pt3dadd(1098.05, 2769.57, 117.55, 6.11)
pt3dadd(1098.39, 2770.34, 117.55, 6.11)
pt3dadd(1099.07, 2770.73, 117.55, 6.11)
pt3dadd(1099.41, 2771.5, 117.55, 6.11)
pt3dadd(1099.75, 2771.89, 117.55, 6.11)
pt3dadd(1100.43, 2771.89, 117.55, 6.11)
pt3dadd(1100.77, 2772.27, 117.55, 6.11)
pt3dadd(1101.11, 2772.66, 117.55, 6.11)
pt3dadd(1101.79, 2773.04, 117.55, 6.11)
pt3dadd(1102.47, 2773.04, 117.55, 6.11)
pt3dadd(1102.81, 2773.43, 117.55, 6.11)
pt3dadd(1103.48, 2773.82, 117.55, 6.11)
pt3dadd(1103.82, 2774.2, 117.55, 6.11)
pt3dadd(1104.16, 2774.59, 117.55, 6.11)
pt3dadd(1104.5, 2774.97, 117.55, 6.11)
pt3dadd(1105.18, 2774.97, 117.55, 6.11)
pt3dadd(1105.52, 2775.36, 117.55, 6.11)
pt3dadd(1105.86, 2775.74, 117.55, 6.11)
pt3dadd(1106.2, 2776.13, 117.55, 6.11)
pt3dadd(1106.54, 2776.52, 117.55, 6.11)
pt3dadd(1107.22, 2776.9, 117.55, 6.11)
pt3dadd(1107.56, 2777.29, 117.55, 6.11)
pt3dadd(1108.24, 2777.67, 117.55, 6.11)
pt3dadd(1108.58, 2778.06, 117.55, 6.11)
pt3dadd(1109.26, 2778.45, 117.55, 6.11)
pt3dadd(1109.94, 2778.83, 117.55, 6.11)
pt3dadd(1110.28, 2779.22, 117.55, 6.11)
pt3dadd(1110.62, 2779.99, 117.55, 6.11)
pt3dadd(1110.96, 2780.37, 117.55, 6.11)
pt3dadd(1111.64, 2780.76, 117.55, 6.11)
pt3dadd(1111.98, 2781.15, 117.55, 6.11)
pt3dadd(1112.32, 2781.53, 117.55, 6.11)
pt3dadd(1112.66, 2781.92, 117.55, 6.11)
pt3dadd(1113.33, 2782.69, 117.55, 6.11)
pt3dadd(1113.67, 2783.46, 117.55, 6.11)
pt3dadd(1114.35, 2783.85, 117.55, 6.11)
pt3dadd(1112.66, 2782.5, 117.55, 4.42)
pt3dadd(1113.33, 2782.88, 117.55, 4.42)
pt3dadd(1113.67, 2783.27, 117.55, 4.42)
pt3dadd(1114.35, 2783.65, 117.55, 4.42)
pt3dadd(1115.03, 2784.04, 117.55, 4.42)
pt3dadd(1115.71, 2784.43, 117.55, 4.42)
pt3dadd(1116.05, 2784.81, 117.55, 4.42)
pt3dadd(1116.73, 2785.2, 117.55, 4.42)
pt3dadd(1117.41, 2785.58, 117.55, 4.42)
pt3dadd(1117.75, 2785.97, 117.55, 4.42)
pt3dadd(1118.43, 2786.35, 117.55, 4.42)
pt3dadd(1119.11, 2786.35, 117.55, 4.42)
pt3dadd(1119.45, 2787.13, 117.55, 4.42)
pt3dadd(1120.13, 2787.51, 117.55, 4.42)
pt3dadd(1120.81, 2787.9, 117.55, 4.42)
pt3dadd(1121.83, 2787.9, 117.55, 4.42)
pt3dadd(1122.17, 2788.28, 117.55, 4.42)
pt3dadd(1122.85, 2788.67, 117.55, 4.42)
pt3dadd(1123.19, 2789.05, 117.55, 4.42)
pt3dadd(1124.2, 2790.21, 117.55, 4.42)
pt3dadd(1124.54, 2790.6, 117.55, 4.42)
pt3dadd(1124.88, 2790.98, 117.55, 4.42)
pt3dadd(1125.56, 2791.76, 117.55, 4.42)
pt3dadd(1125.9, 2792.14, 117.55, 4.42)
pt3dadd(1126.58, 2792.53, 117.55, 4.42)
pt3dadd(1126.92, 2793.3, 117.55, 4.42)
pt3dadd(1127.26, 2793.68, 117.55, 4.42)
pt3dadd(1127.94, 2794.46, 117.55, 4.42)
pt3dadd(1128.28, 2794.84, 117.55, 4.42)
pt3dadd(1128.96, 2794.84, 117.55, 4.42)
pt3dadd(1129.64, 2795.23, 117.55, 4.42)
pt3dadd(1130.32, 2795.61, 117.55, 4.42)
pt3dadd(1131, 2796, 117.55, 4.42)
pt3dadd(1131.34, 2796.39, 117.55, 4.42)
pt3dadd(1132.02, 2796.77, 117.55, 4.42)
pt3dadd(1132.36, 2797.16, 117.55, 4.42)
pt3dadd(1133.04, 2797.16, 117.55, 4.42)
pt3dadd(1133.72, 2797.93, 117.55, 4.42)
pt3dadd(1134.39, 2798.31, 117.55, 4.42)
pt3dadd(1134.73, 2798.7, 117.55, 4.42)
pt3dadd(1136.09, 2798.7, 117.55, 4.42)
}
}
proc shape3d_116() {
dend[71] { pt3dadd(1136.43, 2799.09, 117.55, 4.42)
pt3dadd(1136.77, 2799.47, 117.55, 4.42)
pt3dadd(1137.45, 2799.86, 117.55, 4.42)
pt3dadd(1138.13, 2800.24, 117.55, 4.42)
pt3dadd(1139.15, 2800.63, 117.55, 4.42)
pt3dadd(1139.83, 2800.63, 117.55, 4.42)
pt3dadd(1140.17, 2801.01, 117.55, 4.42)
pt3dadd(1140.51, 2801.4, 117.55, 4.42)
pt3dadd(1140.85, 2801.79, 117.55, 4.42)
pt3dadd(1141.87, 2802.56, 117.55, 4.42)
pt3dadd(1142.21, 2802.94, 117.55, 4.42)
pt3dadd(1142.55, 2803.33, 117.55, 4.42)
pt3dadd(1143.23, 2803.72, 117.55, 4.42)
pt3dadd(1143.57, 2804.1, 117.55, 4.42)
pt3dadd(1143.91, 2804.49, 117.55, 4.42)
pt3dadd(1144.25, 2804.87, 117.55, 4.42)
pt3dadd(1144.92, 2805.26, 117.55, 4.42)
pt3dadd(1145.26, 2805.64, 117.55, 4.42)
pt3dadd(1145.6, 2806.03, 117.55, 4.42)
pt3dadd(1146.28, 2806.42, 117.55, 4.42)
pt3dadd(1146.62, 2806.8, 117.55, 4.42)
pt3dadd(1147.3, 2807.19, 117.55, 4.42)
pt3dadd(1147.64, 2807.57, 117.55, 4.42)
pt3dadd(1147.98, 2808.34, 117.55, 4.42)
pt3dadd(1148.66, 2808.73, 117.55, 4.42)
pt3dadd(1149, 2809.5, 117.55, 4.42)
pt3dadd(1149.68, 2809.89, 117.55, 4.42)
pt3dadd(1150.02, 2810.66, 117.55, 4.42)
pt3dadd(1150.36, 2811.43, 117.55, 4.42)
pt3dadd(1151.04, 2811.82, 117.55, 4.42)
pt3dadd(1151.72, 2812.2, 117.55, 4.42)
pt3dadd(1152.4, 2812.59, 117.55, 4.42)
pt3dadd(1152.74, 2812.97, 117.55, 4.42)
pt3dadd(1153.08, 2813.75, 117.55, 4.42)
pt3dadd(1153.76, 2814.13, 117.55, 4.42)
pt3dadd(1154.1, 2814.52, 117.55, 4.42)
pt3dadd(1154.44, 2814.9, 117.55, 4.42)
pt3dadd(1154.78, 2815.68, 117.55, 4.42)
pt3dadd(1155.11, 2816.06, 117.55, 4.42)
pt3dadd(1155.79, 2816.45, 117.55, 4.42)
pt3dadd(1156.13, 2817.22, 117.55, 4.42)
pt3dadd(1156.81, 2817.99, 117.55, 4.42)
pt3dadd(1157.15, 2818.38, 117.55, 4.42)
pt3dadd(1157.83, 2819.15, 117.55, 4.42)
pt3dadd(1158.17, 2819.92, 117.55, 4.42)
pt3dadd(1158.51, 2820.69, 117.55, 4.42)
pt3dadd(1158.85, 2821.46, 117.55, 4.42)
pt3dadd(1159.53, 2822.23, 117.55, 4.42)
pt3dadd(1159.87, 2823.01, 117.55, 4.42)
pt3dadd(1160.21, 2823.39, 117.55, 4.42)
pt3dadd(1160.55, 2824.16, 117.55, 4.42)
pt3dadd(1160.55, 2824.93, 117.55, 4.42)
pt3dadd(1160.89, 2825.32, 117.55, 4.42)
pt3dadd(1161.91, 2826.48, 117.55, 4.42)
pt3dadd(1162.25, 2826.86, 117.55, 4.42)
pt3dadd(1162.59, 2828.02, 117.55, 4.42)
pt3dadd(1163.95, 2829.56, 117.55, 4.42)
pt3dadd(1164.29, 2829.95, 117.55, 4.42)
pt3dadd(1164.63, 2830.72, 117.55, 4.42)
pt3dadd(1164.97, 2831.11, 117.55, 4.42)
pt3dadd(1165.31, 2831.88, 117.55, 4.42)
pt3dadd(1165.64, 2832.65, 117.55, 4.42)
pt3dadd(1165.98, 2833.04, 117.55, 4.42)
pt3dadd(1166.66, 2833.42, 117.55, 4.42)
pt3dadd(1167, 2834.19, 117.55, 4.42)
pt3dadd(1167.34, 2834.58, 117.55, 4.42)
pt3dadd(1167.68, 2835.35, 117.55, 4.42)
pt3dadd(1168.02, 2836.51, 117.55, 4.42)
pt3dadd(1168.36, 2836.89, 117.55, 4.42)
pt3dadd(1168.7, 2837.28, 117.55, 4.42)
pt3dadd(1169.04, 2838.05, 117.55, 4.42)
pt3dadd(1169.38, 2838.44, 117.55, 4.42)
pt3dadd(1169.38, 2839.21, 117.55, 4.42)
pt3dadd(1169.72, 2839.59, 117.55, 4.42)
pt3dadd(1170.06, 2839.98, 117.55, 4.42)
pt3dadd(1170.74, 2840.37, 117.55, 4.42)
pt3dadd(1171.08, 2841.14, 117.55, 4.42)
pt3dadd(1171.42, 2841.91, 117.55, 4.42)
pt3dadd(1171.76, 2842.68, 117.55, 4.42)
pt3dadd(1172.1, 2843.45, 117.55, 4.42)
pt3dadd(1172.78, 2844.22, 117.55, 4.42)
pt3dadd(1173.12, 2845, 117.55, 4.42)
pt3dadd(1173.46, 2845.38, 117.55, 4.42)
pt3dadd(1173.8, 2846.15, 117.55, 4.42)
pt3dadd(1174.14, 2846.93, 117.55, 4.42)
pt3dadd(1174.48, 2847.31, 117.55, 4.42)
pt3dadd(1174.82, 2847.7, 117.55, 4.42)
pt3dadd(1175.16, 2848.47, 117.55, 4.42)
pt3dadd(1175.5, 2849.24, 117.55, 4.42)
pt3dadd(1175.83, 2850.01, 117.55, 4.42)
pt3dadd(1176.17, 2850.78, 117.55, 4.42)
pt3dadd(1176.51, 2851.17, 117.55, 4.42)
pt3dadd(1176.85, 2851.55, 117.55, 4.42)
pt3dadd(1177.19, 2852.33, 117.55, 4.42)
pt3dadd(1177.53, 2853.1, 117.55, 4.42)
pt3dadd(1177.87, 2853.87, 117.55, 4.42)
pt3dadd(1178.21, 2854.26, 117.55, 4.42)
pt3dadd(1178.55, 2855.03, 117.55, 4.42)
pt3dadd(1178.89, 2855.41, 117.55, 4.42)
pt3dadd(1179.23, 2855.8, 117.55, 4.42)
pt3dadd(1179.57, 2856.18, 117.55, 4.42)
pt3dadd(1180.25, 2856.96, 117.55, 4.42)
pt3dadd(1180.59, 2857.73, 117.55, 4.42)
pt3dadd(1181.27, 2858.11, 117.55, 4.42)
pt3dadd(1181.61, 2858.5, 117.55, 4.42)
pt3dadd(1182.29, 2858.89, 117.55, 4.42)
pt3dadd(1183.31, 2860.04, 117.55, 4.42)
pt3dadd(1183.65, 2860.43, 117.55, 4.42)
pt3dadd(1183.99, 2860.81, 117.55, 4.42)
pt3dadd(1184.33, 2861.2, 117.55, 4.42)
pt3dadd(1185.01, 2861.2, 117.55, 4.42)
pt3dadd(1185.35, 2861.59, 117.55, 4.42)
pt3dadd(1186.03, 2861.97, 117.55, 4.42)
pt3dadd(1186.7, 2862.36, 117.55, 4.42)
pt3dadd(1187.38, 2863.13, 117.55, 4.42)
pt3dadd(1188.06, 2863.13, 117.55, 4.42)
pt3dadd(1188.74, 2863.51, 117.55, 4.42)
pt3dadd(1189.08, 2863.9, 117.55, 4.42)
pt3dadd(1189.76, 2864.29, 117.55, 4.42)
pt3dadd(1190.1, 2865.06, 117.55, 4.42)
pt3dadd(1190.78, 2865.44, 117.55, 4.42)
pt3dadd(1191.12, 2865.83, 117.55, 4.42)
pt3dadd(1191.46, 2866.22, 117.55, 4.42)
pt3dadd(1192.14, 2866.6, 117.55, 4.42)
pt3dadd(1192.48, 2866.99, 117.55, 4.42)
pt3dadd(1192.82, 2867.76, 117.55, 4.42)
pt3dadd(1193.5, 2868.14, 117.55, 4.42)
pt3dadd(1193.84, 2868.53, 117.55, 4.42)
pt3dadd(1194.18, 2868.92, 117.55, 4.42)
pt3dadd(1194.86, 2869.3, 117.55, 4.42)
pt3dadd(1195.54, 2869.69, 117.55, 4.42)
pt3dadd(1195.88, 2870.46, 117.55, 4.42)
pt3dadd(1196.22, 2870.84, 117.55, 4.42)
pt3dadd(1196.55, 2871.23, 117.55, 4.42)
pt3dadd(1197.23, 2871.62, 117.55, 4.42)
pt3dadd(1197.91, 2872, 117.55, 4.42)
pt3dadd(1198.25, 2872.77, 117.55, 4.42)
pt3dadd(1198.93, 2873.16, 117.55, 4.42)
pt3dadd(1199.61, 2873.16, 117.55, 4.42)
pt3dadd(1199.95, 2873.93, 117.55, 4.42)
pt3dadd(1200.63, 2874.32, 117.55, 4.42)
pt3dadd(1200.97, 2874.7, 117.55, 4.42)
pt3dadd(1201.65, 2875.09, 117.55, 4.42)
pt3dadd(1202.33, 2875.86, 117.55, 4.42)
pt3dadd(1203.01, 2875.86, 117.55, 4.42)
pt3dadd(1203.35, 2876.25, 117.55, 4.42)
pt3dadd(1203.69, 2876.63, 117.55, 4.42)
pt3dadd(1204.03, 2877.02, 117.55, 4.42)
pt3dadd(1204.37, 2877.4, 117.55, 4.42)
pt3dadd(1205.05, 2877.79, 117.55, 4.42)
pt3dadd(1205.39, 2878.18, 117.55, 4.42)
pt3dadd(1206.07, 2878.18, 117.55, 4.42)
pt3dadd(1206.75, 2878.56, 117.55, 4.42)
pt3dadd(1207.08, 2878.95, 117.55, 4.42)
pt3dadd(1207.42, 2879.33, 117.55, 4.42)
pt3dadd(1208.78, 2880.88, 117.55, 4.42)
pt3dadd(1209.12, 2881.26, 117.55, 4.42)
pt3dadd(1209.8, 2881.65, 117.55, 4.42)
pt3dadd(1210.48, 2882.03, 117.55, 4.42)
pt3dadd(1210.82, 2882.42, 117.55, 4.42)
pt3dadd(1211.16, 2882.8, 117.55, 4.42)
pt3dadd(1211.5, 2883.19, 117.55, 4.42)
pt3dadd(1212.18, 2883.19, 117.55, 4.42)
pt3dadd(1212.52, 2883.58, 117.55, 4.42)
pt3dadd(1212.86, 2884.35, 117.55, 4.42)
pt3dadd(1213.2, 2884.73, 117.55, 4.42)
pt3dadd(1213.54, 2885.12, 117.55, 4.42)
pt3dadd(1214.22, 2885.51, 117.55, 4.42)
pt3dadd(1214.56, 2885.89, 117.55, 4.42)
pt3dadd(1214.9, 2886.28, 117.55, 4.42)
pt3dadd(1215.58, 2886.66, 117.55, 4.42)
pt3dadd(1216.26, 2887.05, 117.55, 4.42)
pt3dadd(1216.6, 2887.82, 117.55, 4.42)
pt3dadd(1216.94, 2888.59, 117.55, 4.42)
pt3dadd(1217.61, 2889.75, 117.55, 4.42)
pt3dadd(1217.95, 2890.14, 117.55, 4.42)
pt3dadd(1217.95, 2890.91, 117.55, 4.42)
pt3dadd(1218.63, 2891.87, 117.55, 4.42)
pt3dadd(1218.97, 2892.64, 117.55, 4.42)
pt3dadd(1219.31, 2893.41, 117.55, 4.42)
pt3dadd(1219.99, 2894.57, 117.55, 4.42)
pt3dadd(1220.33, 2894.96, 117.55, 4.42)
pt3dadd(1220.67, 2895.34, 117.55, 4.42)
pt3dadd(1220.67, 2896.89, 117.55, 4.42)
pt3dadd(1221.01, 2897.27, 117.55, 4.42)
pt3dadd(1221.35, 2898.04, 117.55, 4.42)
pt3dadd(1221.69, 2898.43, 117.55, 4.42)
pt3dadd(1222.03, 2898.82, 117.55, 4.42)
pt3dadd(1222.37, 2899.2, 117.55, 4.42)
pt3dadd(1222.71, 2899.59, 117.55, 4.42)
pt3dadd(1223.05, 2900.74, 117.55, 4.42)
pt3dadd(1223.39, 2901.13, 117.55, 4.42)
pt3dadd(1223.73, 2901.9, 117.55, 4.42)
pt3dadd(1223.73, 2902.67, 117.55, 4.42)
pt3dadd(1224.07, 2903.45, 117.55, 4.42)
pt3dadd(1224.41, 2903.83, 117.55, 4.42)
pt3dadd(1224.41, 2904.6, 117.55, 4.42)
pt3dadd(1224.75, 2904.99, 117.55, 4.42)
pt3dadd(1225.09, 2905.76, 117.55, 4.42)
pt3dadd(1225.43, 2906.53, 117.55, 4.42)
}
}
proc shape3d_117() {
dend[71] { pt3dadd(1225.43, 2907.3, 117.55, 4.42)
pt3dadd(1225.77, 2908.07, 117.55, 4.42)
pt3dadd(1226.11, 2908.85, 117.55, 4.42)
pt3dadd(1226.79, 2909.62, 117.55, 4.42)
pt3dadd(1226.79, 2910.39, 117.55, 4.42)
pt3dadd(1227.13, 2910.78, 117.55, 4.42)
pt3dadd(1227.47, 2911.16, 117.55, 4.42)
pt3dadd(1227.8, 2911.55, 117.55, 4.42)
pt3dadd(1228.14, 2911.93, 117.55, 4.42)
pt3dadd(1228.48, 2912.32, 117.55, 4.42)
pt3dadd(1228.82, 2913.09, 117.55, 4.42)
pt3dadd(1229.16, 2913.48, 117.55, 4.42)
pt3dadd(1229.16, 2914.25, 117.55, 4.42)
pt3dadd(1229.5, 2915.02, 117.55, 4.42)
pt3dadd(1229.84, 2915.79, 117.55, 4.42)
pt3dadd(1230.18, 2916.18, 117.55, 4.42)
pt3dadd(1230.18, 2916.95, 117.55, 4.42)
pt3dadd(1230.52, 2917.72, 117.55, 4.42)
pt3dadd(1230.86, 2918.49, 117.55, 4.42)
pt3dadd(1231.54, 2918.88, 117.55, 4.42)
pt3dadd(1231.54, 2920.42, 117.55, 4.42)
pt3dadd(1232.22, 2921.19, 117.55, 4.42)
pt3dadd(1232.56, 2921.96, 117.55, 4.42)
pt3dadd(1232.9, 2922.74, 117.55, 4.42)
pt3dadd(1233.24, 2923.51, 117.55, 4.42)
pt3dadd(1233.58, 2923.89, 117.55, 4.42)
pt3dadd(1233.92, 2925.05, 117.55, 4.42)
pt3dadd(1234.26, 2925.44, 117.55, 4.42)
pt3dadd(1234.6, 2926.21, 117.55, 4.42)
pt3dadd(1234.94, 2926.98, 117.55, 4.42)
pt3dadd(1235.28, 2927.36, 117.55, 4.42)
pt3dadd(1235.28, 2928.14, 117.55, 4.42)
pt3dadd(1235.62, 2928.52, 117.55, 4.42)
pt3dadd(1235.96, 2929.29, 117.55, 4.42)
pt3dadd(1236.3, 2930.07, 117.55, 4.42)
pt3dadd(1236.64, 2930.84, 117.55, 4.42)
pt3dadd(1236.98, 2931.61, 117.55, 4.42)
pt3dadd(1237.32, 2931.99, 117.55, 4.42)
pt3dadd(1237.66, 2932.38, 117.55, 4.42)
pt3dadd(1238, 2932.77, 117.55, 4.42)
pt3dadd(1238.33, 2933.15, 117.55, 4.42)
pt3dadd(1238.67, 2933.92, 117.55, 4.42)
pt3dadd(1239.01, 2934.7, 117.55, 4.42)
pt3dadd(1239.35, 2935.47, 117.55, 4.42)
pt3dadd(1239.69, 2936.24, 117.55, 4.42)
pt3dadd(1240.03, 2936.62, 117.55, 4.42)
pt3dadd(1240.37, 2937.78, 117.55, 4.42)
pt3dadd(1240.71, 2938.55, 117.55, 4.42)
pt3dadd(1241.05, 2939.32, 117.55, 4.42)
pt3dadd(1241.39, 2939.71, 117.55, 4.42)
pt3dadd(1241.39, 2940.48, 117.55, 4.42)
pt3dadd(1241.73, 2940.87, 117.55, 4.42)
pt3dadd(1242.07, 2941.64, 117.55, 4.42)
pt3dadd(1242.41, 2942.03, 117.55, 4.42)
pt3dadd(1243.09, 2942.41, 117.55, 4.42)
pt3dadd(1243.43, 2942.8, 117.55, 4.42)
pt3dadd(1243.77, 2943.57, 117.55, 4.42)
pt3dadd(1244.79, 2944.73, 117.55, 4.42)
pt3dadd(1245.13, 2945.11, 117.55, 4.42)
pt3dadd(1245.81, 2945.5, 117.55, 4.42)
pt3dadd(1246.15, 2945.88, 117.55, 4.42)
pt3dadd(1246.49, 2946.27, 117.55, 4.42)
pt3dadd(1247.17, 2946.66, 117.55, 4.42)
pt3dadd(1247.51, 2947.04, 117.55, 4.42)
pt3dadd(1247.51, 2947.81, 117.55, 4.42)
pt3dadd(1247.85, 2948.2, 117.55, 4.42)
pt3dadd(1248.19, 2948.97, 117.55, 4.42)
pt3dadd(1248.53, 2949.36, 117.55, 4.42)
pt3dadd(1248.86, 2949.74, 117.55, 4.42)
pt3dadd(1249.2, 2950.51, 117.55, 4.42)
pt3dadd(1249.2, 2951.28, 117.55, 4.42)
pt3dadd(1249.54, 2951.67, 117.55, 4.42)
pt3dadd(1249.88, 2952.06, 117.55, 4.42)
pt3dadd(1250.22, 2952.83, 117.55, 4.42)
pt3dadd(1250.56, 2953.6, 117.55, 4.42)
pt3dadd(1251.24, 2954.37, 117.55, 4.42)
pt3dadd(1251.58, 2954.76, 117.55, 4.42)
pt3dadd(1251.92, 2955.14, 117.55, 4.42)
pt3dadd(1252.6, 2955.91, 117.55, 4.42)
pt3dadd(1253.62, 2957.07, 117.55, 4.42)
pt3dadd(1253.96, 2957.84, 117.55, 4.42)
pt3dadd(1254.3, 2958.61, 117.55, 4.42)
pt3dadd(1254.64, 2959.39, 117.55, 4.42)
pt3dadd(1254.98, 2959.77, 117.55, 4.42)
pt3dadd(1255.32, 2960.16, 117.55, 4.42)
pt3dadd(1255.66, 2960.93, 117.55, 4.42)
pt3dadd(1256, 2961.7, 117.55, 4.42)
pt3dadd(1256.34, 2962.47, 117.55, 4.42)
pt3dadd(1256.68, 2962.86, 117.55, 4.42)
pt3dadd(1257.36, 2963.24, 117.55, 4.42)
pt3dadd(1257.7, 2964.02, 117.55, 4.42)
pt3dadd(1258.04, 2964.79, 117.55, 4.42)
pt3dadd(1259.06, 2965.95, 117.55, 4.42)
pt3dadd(1259.73, 2966.33, 117.55, 4.42)
pt3dadd(1260.07, 2966.72, 117.55, 4.42)
pt3dadd(1261.09, 2967.49, 117.55, 4.42)
pt3dadd(1261.77, 2967.87, 117.55, 4.42)
pt3dadd(1262.11, 2968.65, 117.55, 4.42)
pt3dadd(1262.79, 2969.03, 117.55, 4.42)
pt3dadd(1263.47, 2969.42, 117.55, 4.42)
pt3dadd(1263.81, 2969.8, 117.55, 4.42)
pt3dadd(1264.49, 2970.57, 117.55, 4.42)
pt3dadd(1264.83, 2971.35, 117.55, 4.42)
pt3dadd(1265.51, 2972.12, 117.55, 4.42)
pt3dadd(1265.85, 2972.5, 117.55, 4.42)
pt3dadd(1267.55, 2974.43, 117.55, 4.42)
pt3dadd(1268.23, 2974.82, 117.55, 4.42)
pt3dadd(1268.57, 2975.59, 117.55, 4.42)
pt3dadd(1268.91, 2976.36, 117.55, 4.42)
pt3dadd(1269.25, 2976.75, 117.55, 4.42)
pt3dadd(1269.58, 2977.13, 117.55, 4.42)
pt3dadd(1269.92, 2977.52, 117.55, 4.42)
pt3dadd(1270.6, 2977.91, 117.55, 4.42)
pt3dadd(1270.94, 2978.68, 117.55, 4.42)
pt3dadd(1271.62, 2979.06, 117.55, 4.42)
pt3dadd(1271.96, 2979.83, 117.55, 4.42)
pt3dadd(1272.3, 2980.61, 117.55, 4.42)
pt3dadd(1272.98, 2980.99, 117.55, 4.42)
pt3dadd(1273.66, 2981.38, 117.55, 4.42)
pt3dadd(1274, 2982.15, 117.55, 4.42)
pt3dadd(1274.34, 2982.92, 117.55, 4.42)
pt3dadd(1274.68, 2983.31, 117.55, 4.42)
pt3dadd(1275.36, 2984.08, 117.55, 4.42)
pt3dadd(1275.7, 2984.46, 117.55, 4.42)
pt3dadd(1276.04, 2984.85, 117.55, 4.42)
pt3dadd(1276.38, 2985.62, 117.55, 4.42)
pt3dadd(1277.06, 2986.78, 117.55, 4.42)
pt3dadd(1277.4, 2987.16, 117.55, 4.42)
pt3dadd(1277.74, 2987.55, 117.55, 4.42)
pt3dadd(1278.08, 2988.32, 117.55, 4.42)
pt3dadd(1278.76, 2989.09, 117.55, 4.42)
pt3dadd(1279.1, 2989.86, 117.55, 4.42)
pt3dadd(1279.44, 2990.25, 117.55, 4.42)
pt3dadd(1280.11, 2990.64, 117.55, 4.42)
pt3dadd(1280.45, 2991.41, 117.55, 4.42)
pt3dadd(1280.79, 2992.18, 117.55, 4.42)
pt3dadd(1281.13, 2992.57, 117.55, 4.42)
pt3dadd(1281.47, 2993.72, 117.55, 4.42)
pt3dadd(1282.15, 2994.11, 117.55, 4.42)
pt3dadd(1282.49, 2994.49, 117.55, 4.42)
pt3dadd(1282.83, 2994.88, 117.55, 4.42)
pt3dadd(1283.17, 2995.27, 117.55, 4.42)
pt3dadd(1283.51, 2995.65, 117.55, 4.42)
pt3dadd(1283.85, 2996.42, 117.55, 4.42)
pt3dadd(1284.53, 2996.81, 117.55, 4.42)
pt3dadd(1284.87, 2997.2, 117.55, 4.42)
pt3dadd(1285.55, 2997.58, 117.55, 4.42)
pt3dadd(1285.89, 2997.97, 117.55, 4.42)
pt3dadd(1286.57, 2998.35, 117.55, 4.42)
pt3dadd(1286.91, 2998.74, 117.55, 4.42)
pt3dadd(1287.59, 2999.12, 117.55, 4.42)
pt3dadd(1288.27, 2999.51, 117.55, 4.42)
pt3dadd(1288.95, 2999.9, 117.55, 4.42)
pt3dadd(1289.63, 3000.28, 117.55, 4.42)
pt3dadd(1289.97, 3000.67, 117.55, 4.42)
pt3dadd(1290.31, 3001.05, 117.55, 4.42)
pt3dadd(1290.98, 3001.05, 117.55, 4.42)
pt3dadd(1291.66, 3001.44, 117.55, 4.42)
pt3dadd(1292.34, 3002.6, 117.55, 4.42)
pt3dadd(1292.68, 3002.98, 117.55, 4.42)
pt3dadd(1293.02, 3003.37, 117.55, 4.42)
pt3dadd(1293.36, 3003.75, 117.55, 4.42)
pt3dadd(1294.04, 3003.75, 117.55, 4.42)
pt3dadd(1294.38, 3004.91, 117.55, 4.42)
pt3dadd(1295.06, 3006.07, 117.55, 4.42)
pt3dadd(1296.08, 3007.23, 117.55, 4.42)
pt3dadd(1296.76, 3008.38, 117.55, 4.42)
pt3dadd(1297.1, 3008.38, 117.55, 4.42)
pt3dadd(1297.78, 3008, 117.55, 4.42)
pt3dadd(1298.46, 3007.61, 117.55, 4.42)
pt3dadd(1305.25, 3007.61, 117.55, 4.42)
pt3dadd(1306.61, 3007.03, 117.55, 4.42)
pt3dadd(1313.74, 3007.03, 117.55, 4.42)
pt3dadd(1314.08, 3006.65, 117.55, 4.42)
pt3dadd(1314.76, 3006.65, 117.55, 4.42)
pt3dadd(1315.1, 3007.03, 117.55, 4.42)
pt3dadd(1315.78, 3007.8, 117.55, 4.42)
pt3dadd(1316.46, 3008.19, 117.55, 4.42)
pt3dadd(1317.14, 3008.58, 117.55, 4.42)
pt3dadd(1318.84, 3008.58, 117.55, 4.42)
pt3dadd(1318.5, 3008.38, 117.55, 3.4)
pt3dadd(1319.18, 3008.38, 117.55, 3.4)
pt3dadd(1319.52, 3008.77, 117.55, 3.4)
pt3dadd(1319.86, 3009.16, 117.55, 3.4)
pt3dadd(1320.2, 3009.93, 117.55, 3.4)
pt3dadd(1320.54, 3010.7, 117.55, 3.4)
pt3dadd(1320.88, 3011.08, 117.55, 3.4)
pt3dadd(1321.22, 3011.47, 117.55, 3.4)
pt3dadd(1321.56, 3012.24, 117.55, 3.4)
pt3dadd(1321.89, 3013.01, 117.55, 3.4)
pt3dadd(1322.23, 3013.4, 117.55, 3.4)
pt3dadd(1322.57, 3014.17, 117.55, 3.4)
pt3dadd(1322.91, 3014.94, 117.55, 3.4)
pt3dadd(1323.25, 3015.33, 117.55, 3.4)
pt3dadd(1323.25, 3016.1, 117.55, 3.4)
pt3dadd(1323.59, 3016.87, 117.55, 3.4)
pt3dadd(1324.27, 3017.26, 117.55, 3.4)
pt3dadd(1324.27, 3018.03, 117.55, 3.4)
pt3dadd(1324.61, 3018.8, 117.55, 3.4)
pt3dadd(1324.95, 3019.19, 117.55, 3.4)
}
}
proc shape3d_118() {
dend[71] { pt3dadd(1325.29, 3019.57, 117.55, 3.4)
pt3dadd(1325.63, 3020.34, 117.55, 3.4)
pt3dadd(1325.97, 3020.73, 117.55, 3.4)
pt3dadd(1326.31, 3021.5, 117.55, 3.4)
pt3dadd(1326.65, 3022.27, 117.55, 3.4)
pt3dadd(1326.99, 3022.66, 117.55, 3.4)
pt3dadd(1327.33, 3023.43, 117.55, 3.4)
pt3dadd(1328.01, 3024.2, 117.55, 3.4)
pt3dadd(1328.69, 3024.59, 117.55, 3.4)
pt3dadd(1329.03, 3024.97, 117.55, 3.4)
pt3dadd(1329.37, 3025.36, 117.55, 3.4)
pt3dadd(1329.71, 3026.13, 117.55, 3.4)
pt3dadd(1330.05, 3026.52, 117.55, 3.4)
pt3dadd(1330.05, 3027.29, 117.55, 3.4)
pt3dadd(1330.73, 3028.06, 117.55, 3.4)
pt3dadd(1331.07, 3028.83, 117.55, 3.4)
pt3dadd(1331.41, 3029.22, 117.55, 3.4)
pt3dadd(1331.75, 3029.6, 117.55, 3.4)
pt3dadd(1332.08, 3030.37, 117.55, 3.4)
pt3dadd(1332.42, 3031.15, 117.55, 3.4)
pt3dadd(1333.1, 3031.53, 117.55, 3.4)
pt3dadd(1333.44, 3032.3, 117.55, 3.4)
pt3dadd(1333.44, 3033.07, 117.55, 3.4)
pt3dadd(1333.78, 3033.46, 117.55, 3.4)
pt3dadd(1334.12, 3034.23, 117.55, 3.4)
pt3dadd(1334.8, 3035, 117.55, 3.4)
pt3dadd(1335.14, 3035.39, 117.55, 3.4)
pt3dadd(1335.48, 3035.78, 117.55, 3.4)
pt3dadd(1335.82, 3036.55, 117.55, 3.4)
pt3dadd(1336.16, 3036.93, 117.55, 3.4)
pt3dadd(1336.5, 3037.32, 117.55, 3.4)
pt3dadd(1336.84, 3038.09, 117.55, 3.4)
pt3dadd(1337.52, 3038.48, 117.55, 3.4)
pt3dadd(1337.86, 3038.86, 117.55, 3.4)
pt3dadd(1338.2, 3039.25, 117.55, 3.4)
pt3dadd(1338.88, 3039.25, 117.55, 3.4)
pt3dadd(1339.22, 3039.63, 117.55, 3.4)
pt3dadd(1339.56, 3040.02, 117.55, 3.4)
pt3dadd(1342.61, 3040.02, 117.55, 3.4)
pt3dadd(1343.29, 3039.63, 117.55, 3.4)
pt3dadd(1348.73, 3039.63, 117.55, 3.4)
pt3dadd(1349.41, 3040.02, 117.55, 3.4)
pt3dadd(1350.09, 3040.41, 117.55, 3.4)
pt3dadd(1351.11, 3041.18, 117.55, 3.4)
pt3dadd(1351.79, 3041.56, 117.55, 3.4)
pt3dadd(1352.47, 3041.95, 117.55, 3.4)
pt3dadd(1353.82, 3041.95, 117.55, 3.4)
pt3dadd(1354.5, 3042.33, 117.55, 3.4)
pt3dadd(1355.18, 3042.72, 117.55, 3.4)
pt3dadd(1355.86, 3042.72, 117.55, 3.4)
pt3dadd(1356.2, 3043.11, 117.55, 3.4)
pt3dadd(1356.88, 3043.49, 117.55, 3.4)
pt3dadd(1357.56, 3043.88, 117.55, 3.4)
pt3dadd(1357.9, 3044.26, 117.55, 3.4)
pt3dadd(1358.24, 3044.65, 117.55, 3.4)
pt3dadd(1358.58, 3045.03, 117.55, 3.4)
pt3dadd(1359.26, 3045.81, 117.55, 3.4)
pt3dadd(1359.94, 3046.19, 117.55, 3.4)
pt3dadd(1360.62, 3046.58, 117.55, 3.4)
pt3dadd(1361.3, 3046.96, 117.55, 3.4)
pt3dadd(1361.64, 3047.35, 117.55, 3.4)
pt3dadd(1362.32, 3047.74, 117.55, 3.4)
pt3dadd(1362.66, 3048.12, 117.55, 3.4)
pt3dadd(1363.67, 3049.28, 117.55, 3.4)
pt3dadd(1363.67, 3050.05, 117.55, 3.4)
pt3dadd(1364.01, 3050.44, 117.55, 3.4)
pt3dadd(1364.35, 3050.82, 117.55, 3.4)
pt3dadd(1364.69, 3051.21, 117.55, 3.4)
pt3dadd(1365.03, 3051.98, 117.55, 3.4)
pt3dadd(1365.37, 3052.75, 117.55, 3.4)
pt3dadd(1365.71, 3053.52, 117.55, 3.4)
pt3dadd(1366.05, 3053.91, 117.55, 3.4)
pt3dadd(1366.39, 3054.68, 117.55, 3.4)
pt3dadd(1366.73, 3055.07, 117.55, 3.4)
pt3dadd(1367.07, 3055.45, 117.55, 3.4)
pt3dadd(1367.41, 3056.22, 117.55, 3.4)
pt3dadd(1367.75, 3056.99, 117.55, 3.4)
pt3dadd(1368.09, 3057.38, 117.55, 3.4)
pt3dadd(1368.43, 3058.15, 117.55, 3.4)
pt3dadd(1369.11, 3058.54, 117.55, 3.4)
pt3dadd(1369.11, 3059.31, 117.55, 3.4)
pt3dadd(1369.45, 3059.7, 117.55, 3.4)
pt3dadd(1369.79, 3060.47, 117.55, 3.4)
pt3dadd(1371.49, 3062.4, 117.55, 3.4)
pt3dadd(1371.83, 3062.78, 117.55, 3.4)
pt3dadd(1372.17, 3063.17, 117.55, 3.4)
pt3dadd(1372.85, 3064.32, 117.55, 3.4)
pt3dadd(1373.19, 3064.71, 117.55, 3.4)
pt3dadd(1373.86, 3065.1, 117.55, 3.4)
pt3dadd(1374.54, 3065.48, 117.55, 3.4)
pt3dadd(1375.56, 3066.64, 117.55, 3.4)
pt3dadd(1376.24, 3067.03, 117.55, 3.4)
pt3dadd(1376.58, 3067.8, 117.55, 3.4)
pt3dadd(1376.92, 3068.57, 117.55, 3.4)
pt3dadd(1377.6, 3069.34, 117.55, 3.4)
pt3dadd(1378.28, 3069.73, 117.55, 3.4)
pt3dadd(1378.96, 3070.5, 117.55, 3.4)
pt3dadd(1379.64, 3071.27, 117.55, 3.4)
pt3dadd(1379.98, 3072.04, 117.55, 3.4)
pt3dadd(1380.32, 3073.2, 117.55, 3.4)
pt3dadd(1380.66, 3073.58, 117.55, 3.4)
pt3dadd(1381.34, 3073.97, 117.55, 3.4)
pt3dadd(1382.02, 3075.13, 117.55, 3.4)
pt3dadd(1383.72, 3077.06, 117.55, 3.4)
pt3dadd(1384.06, 3077.83, 117.55, 3.4)
pt3dadd(1384.73, 3078.6, 117.55, 3.4)
pt3dadd(1385.07, 3078.99, 117.55, 3.4)
pt3dadd(1385.75, 3079.37, 117.55, 3.4)
pt3dadd(1386.43, 3079.76, 117.55, 3.4)
pt3dadd(1386.77, 3080.14, 117.55, 3.4)
pt3dadd(1389.83, 3083.61, 117.55, 3.4)
pt3dadd(1390.17, 3084, 117.55, 3.4)
pt3dadd(1390.85, 3084.77, 117.55, 3.4)
pt3dadd(1391.19, 3085.16, 117.55, 3.4)
pt3dadd(1391.87, 3085.54, 117.55, 3.4)
pt3dadd(1392.55, 3085.93, 117.55, 3.4)
pt3dadd(1392.89, 3086.32, 117.55, 3.4)
pt3dadd(1393.23, 3086.7, 117.55, 3.4)
pt3dadd(1393.57, 3087.09, 117.55, 3.4)
pt3dadd(1393.91, 3087.47, 117.55, 3.4)
pt3dadd(1394.25, 3087.86, 117.55, 3.4)
pt3dadd(1394.58, 3088.24, 117.55, 3.4)
pt3dadd(1395.26, 3089.02, 117.55, 3.4)
pt3dadd(1395.6, 3089.4, 117.55, 3.4)
pt3dadd(1395.94, 3089.79, 117.55, 3.4)
pt3dadd(1396.28, 3090.17, 117.55, 3.4)
pt3dadd(1396.62, 3090.95, 117.55, 3.4)
pt3dadd(1396.96, 3091.72, 117.55, 3.4)
pt3dadd(1397.3, 3092.1, 117.55, 3.4)
pt3dadd(1397.98, 3092.49, 117.55, 3.4)
pt3dadd(1398.32, 3092.87, 117.55, 3.4)
pt3dadd(1398.66, 3093.26, 117.55, 3.4)
pt3dadd(1399.34, 3094.03, 117.55, 3.4)
pt3dadd(1400.02, 3094.03, 117.55, 3.4)
pt3dadd(1400.36, 3094.8, 117.55, 3.4)
pt3dadd(1400.7, 3095.57, 117.55, 3.4)
pt3dadd(1401.38, 3096.35, 117.55, 3.4)
pt3dadd(1401.72, 3096.73, 117.55, 3.4)
pt3dadd(1402.06, 3097.5, 117.55, 3.4)
pt3dadd(1404.44, 3097.5, 117.55, 3.4)
pt3dadd(1403.42, 3097.7, 117.55, 3.4)
pt3dadd(1404.1, 3098.08, 117.55, 3.4)
pt3dadd(1404.78, 3098.47, 117.55, 3.4)
pt3dadd(1405.11, 3098.85, 117.55, 3.4)
pt3dadd(1406.13, 3098.85, 117.55, 3.4)
pt3dadd(1406.47, 3099.24, 117.55, 3.4)
pt3dadd(1407.15, 3099.24, 117.55, 3.4)
pt3dadd(1407.49, 3099.63, 117.55, 3.4)
pt3dadd(1407.83, 3100.01, 117.55, 3.4)
pt3dadd(1408.51, 3100.4, 117.55, 3.4)
pt3dadd(1408.85, 3100.78, 117.55, 3.4)
pt3dadd(1409.19, 3101.17, 117.55, 3.4)
pt3dadd(1409.53, 3101.55, 117.55, 3.4)
pt3dadd(1410.21, 3101.94, 117.55, 3.4)
pt3dadd(1410.55, 3102.33, 117.55, 3.4)
pt3dadd(1411.23, 3102.71, 117.55, 3.4)
pt3dadd(1411.91, 3102.71, 117.55, 3.4)
pt3dadd(1412.25, 3103.1, 117.55, 3.4)
pt3dadd(1412.59, 3103.87, 117.55, 3.4)
pt3dadd(1412.93, 3104.26, 117.55, 3.4)
pt3dadd(1413.61, 3104.64, 117.55, 3.4)
pt3dadd(1413.95, 3105.03, 117.55, 3.4)
pt3dadd(1414.63, 3105.41, 117.55, 3.4)
pt3dadd(1414.97, 3105.8, 117.55, 3.4)
pt3dadd(1415.64, 3106.18, 117.55, 3.4)
pt3dadd(1415.98, 3106.57, 117.55, 3.4)
pt3dadd(1416.32, 3107.34, 117.55, 3.4)
pt3dadd(1417, 3107.73, 117.55, 3.4)
pt3dadd(1417.34, 3108.11, 117.55, 3.4)
pt3dadd(1418.02, 3108.11, 117.55, 3.4)
pt3dadd(1418.7, 3108.5, 117.55, 3.4)
pt3dadd(1419.04, 3108.89, 117.55, 3.4)
pt3dadd(1419.38, 3109.27, 117.55, 3.4)
pt3dadd(1419.72, 3109.66, 117.55, 3.4)
pt3dadd(1420.4, 3109.66, 117.55, 3.4)
pt3dadd(1420.74, 3110.04, 117.55, 3.4)
pt3dadd(1421.08, 3110.43, 117.55, 3.4)
pt3dadd(1421.76, 3110.43, 117.55, 3.4)
pt3dadd(1422.1, 3110.81, 117.55, 3.4)
pt3dadd(1422.78, 3111.59, 117.55, 3.4)
pt3dadd(1423.12, 3111.97, 117.55, 3.4)
pt3dadd(1423.8, 3111.97, 117.55, 3.4)
pt3dadd(1424.14, 3112.36, 117.55, 3.4)
pt3dadd(1424.82, 3112.74, 117.55, 3.4)
pt3dadd(1425.16, 3113.13, 117.55, 3.4)
pt3dadd(1425.83, 3113.51, 117.55, 3.4)
pt3dadd(1426.17, 3114.29, 117.55, 3.4)
pt3dadd(1426.51, 3114.67, 117.55, 3.4)
pt3dadd(1427.19, 3115.44, 117.55, 3.4)
pt3dadd(1427.87, 3115.83, 117.55, 3.4)
pt3dadd(1428.55, 3116.22, 117.55, 3.4)
pt3dadd(1428.89, 3116.99, 117.55, 3.4)
pt3dadd(1429.23, 3117.37, 117.55, 3.4)
pt3dadd(1429.57, 3117.76, 117.55, 3.4)
pt3dadd(1430.25, 3118.14, 117.55, 3.4)
pt3dadd(1430.93, 3118.14, 117.55, 3.4)
pt3dadd(1431.27, 3118.53, 117.55, 3.4)
pt3dadd(1431.95, 3118.92, 117.55, 3.4)
pt3dadd(1432.29, 3119.3, 117.55, 3.4)
pt3dadd(1432.63, 3119.69, 117.55, 3.4)
}
}
proc shape3d_119() {
dend[71] { pt3dadd(1433.31, 3120.46, 117.55, 3.4)
pt3dadd(1433.65, 3120.84, 117.55, 3.4)
pt3dadd(1435.69, 3120.84, 117.55, 3.4)
pt3dadd(1436.36, 3121.23, 117.55, 3.4)
pt3dadd(1436.7, 3121.62, 117.55, 3.4)
pt3dadd(1437.38, 3122, 117.55, 3.4)
pt3dadd(1438.06, 3122, 117.55, 3.4)
pt3dadd(1438.74, 3122.77, 117.55, 3.4)
pt3dadd(1439.42, 3122.77, 117.55, 3.4)
pt3dadd(1440.1, 3124.32, 117.55, 3.4)
pt3dadd(1440.44, 3124.7, 117.55, 3.4)
pt3dadd(1440.78, 3125.09, 117.55, 3.4)
pt3dadd(1441.46, 3125.47, 117.55, 3.4)
pt3dadd(1441.8, 3125.86, 117.55, 3.4)
pt3dadd(1442.48, 3126.63, 117.55, 3.4)
pt3dadd(1442.82, 3127.4, 117.55, 3.4)
pt3dadd(1443.16, 3127.79, 117.55, 3.4)
pt3dadd(1443.5, 3128.18, 117.55, 3.4)
pt3dadd(1443.84, 3128.56, 117.55, 3.4)
pt3dadd(1444.18, 3128.95, 117.55, 3.4)
pt3dadd(1444.86, 3128.95, 117.55, 3.4)
pt3dadd(1445.2, 3129.72, 117.55, 3.4)
pt3dadd(1445.54, 3130.49, 117.55, 3.4)
pt3dadd(1446.22, 3130.88, 117.55, 3.4)
pt3dadd(1446.56, 3131.26, 117.55, 3.4)
pt3dadd(1446.89, 3131.65, 117.55, 3.4)
pt3dadd(1447.57, 3132.03, 117.55, 3.4)
pt3dadd(1448.25, 3132.42, 117.55, 3.4)
pt3dadd(1448.59, 3133.19, 117.55, 3.4)
pt3dadd(1448.59, 3133.96, 117.55, 3.4)
pt3dadd(1449.27, 3134.35, 117.55, 3.4)
pt3dadd(1449.61, 3134.73, 117.55, 3.4)
pt3dadd(1449.95, 3135.12, 117.55, 3.4)
pt3dadd(1450.63, 3135.51, 117.55, 3.4)
pt3dadd(1450.97, 3135.89, 117.55, 3.4)
pt3dadd(1451.31, 3136.28, 117.55, 3.4)
pt3dadd(1451.99, 3136.66, 117.55, 3.4)
pt3dadd(1452.33, 3137.05, 117.55, 3.4)
pt3dadd(1452.67, 3137.43, 117.55, 3.4)
pt3dadd(1452.67, 3138.21, 117.55, 3.4)
pt3dadd(1453.35, 3138.59, 117.55, 3.4)
pt3dadd(1453.69, 3138.98, 117.55, 3.4)
pt3dadd(1454.37, 3139.36, 117.55, 3.4)
pt3dadd(1454.71, 3139.75, 117.55, 3.4)
pt3dadd(1455.39, 3140.52, 117.55, 3.4)
pt3dadd(1456.07, 3140.91, 117.55, 3.4)
pt3dadd(1456.07, 3141.68, 117.55, 3.4)
pt3dadd(1456.41, 3142.06, 117.55, 3.4)
pt3dadd(1457.42, 3143.22, 117.55, 3.4)
pt3dadd(1458.1, 3143.61, 117.55, 3.4)
pt3dadd(1458.44, 3143.99, 117.55, 3.4)
pt3dadd(1458.78, 3144.38, 117.55, 3.4)
pt3dadd(1459.46, 3144.76, 117.55, 3.4)
pt3dadd(1459.8, 3145.15, 117.55, 3.4)
pt3dadd(1460.48, 3145.54, 117.55, 3.4)
pt3dadd(1461.5, 3146.69, 117.55, 3.4)
pt3dadd(1462.18, 3147.08, 117.55, 3.4)
pt3dadd(1462.52, 3147.47, 117.55, 3.4)
pt3dadd(1462.86, 3147.85, 117.55, 3.4)
pt3dadd(1463.54, 3148.24, 117.55, 3.4)
pt3dadd(1463.88, 3149.01, 117.55, 3.4)
pt3dadd(1464.22, 3149.39, 117.55, 3.4)
pt3dadd(1464.56, 3149.78, 117.55, 3.4)
pt3dadd(1464.9, 3150.55, 117.55, 3.4)
pt3dadd(1464.9, 3151.32, 117.55, 3.4)
pt3dadd(1465.24, 3151.71, 117.55, 3.4)
pt3dadd(1465.58, 3152.09, 117.55, 3.4)
pt3dadd(1465.92, 3152.87, 117.55, 3.4)
pt3dadd(1466.26, 3153.64, 117.55, 3.4)
pt3dadd(1466.6, 3154.02, 117.55, 3.4)
pt3dadd(1466.94, 3154.41, 117.55, 3.4)
pt3dadd(1467.28, 3155.18, 117.55, 3.4)
pt3dadd(1467.61, 3155.95, 117.55, 3.4)
pt3dadd(1468.63, 3157.11, 117.55, 3.4)
pt3dadd(1468.97, 3157.88, 117.55, 3.4)
pt3dadd(1469.31, 3157.5, 117.55, 3.4)
pt3dadd(1469.99, 3157.5, 117.55, 3.4)
pt3dadd(1470.67, 3158.46, 117.55, 3.4)
pt3dadd(1471.69, 3159.62, 117.55, 3.4)
pt3dadd(1472.37, 3160, 117.55, 3.4)
pt3dadd(1472.71, 3160.39, 117.55, 3.4)
pt3dadd(1473.05, 3161.16, 117.55, 3.4)
pt3dadd(1473.73, 3161.55, 117.55, 3.4)
pt3dadd(1474.07, 3161.93, 117.55, 3.4)
pt3dadd(1474.41, 3162.7, 117.55, 3.4)
pt3dadd(1475.09, 3163.09, 117.55, 3.4)
pt3dadd(1475.77, 3163.48, 117.55, 3.4)
pt3dadd(1476.45, 3163.86, 117.55, 3.4)
pt3dadd(1477.13, 3164.25, 117.55, 3.4)
pt3dadd(1477.47, 3164.63, 117.55, 3.4)
pt3dadd(1478.14, 3165.41, 117.55, 3.4)
pt3dadd(1478.82, 3165.79, 117.55, 3.4)
pt3dadd(1479.16, 3166.18, 117.55, 3.4)
pt3dadd(1480.18, 3166.95, 117.55, 3.4)
pt3dadd(1481.2, 3168.11, 117.55, 3.4)
pt3dadd(1481.88, 3168.49, 117.55, 3.4)
pt3dadd(1482.56, 3168.88, 117.55, 3.4)
pt3dadd(1482.9, 3169.26, 117.55, 3.4)
pt3dadd(1483.24, 3169.65, 117.55, 3.4)
pt3dadd(1483.92, 3170.03, 117.55, 3.4)
pt3dadd(1484.94, 3171.19, 117.55, 3.4)
pt3dadd(1485.28, 3171.96, 117.55, 3.4)
pt3dadd(1485.96, 3171.96, 117.55, 3.4)
pt3dadd(1486.64, 3172.74, 117.55, 3.4)
pt3dadd(1487.32, 3173.12, 117.55, 3.4)
pt3dadd(1487.66, 3173.89, 117.55, 3.4)
pt3dadd(1488, 3174.28, 117.55, 3.4)
pt3dadd(1488.33, 3174.66, 117.55, 3.4)
pt3dadd(1489.01, 3174.66, 117.55, 3.4)
pt3dadd(1489.35, 3175.05, 117.55, 3.4)
pt3dadd(1490.03, 3175.44, 117.55, 3.4)
pt3dadd(1490.71, 3175.82, 117.55, 3.4)
pt3dadd(1491.05, 3176.59, 117.55, 3.4)
pt3dadd(1491.39, 3176.98, 117.55, 3.4)
pt3dadd(1492.07, 3176.98, 117.55, 3.4)
pt3dadd(1492.75, 3177.36, 117.55, 3.4)
pt3dadd(1493.09, 3178.14, 117.55, 3.4)
pt3dadd(1493.43, 3178.91, 117.55, 3.4)
pt3dadd(1493.77, 3179.29, 117.55, 3.4)
pt3dadd(1494.79, 3180.45, 117.55, 3.4)
pt3dadd(1495.13, 3181.22, 117.55, 3.4)
pt3dadd(1495.81, 3181.61, 117.55, 3.4)
pt3dadd(1496.15, 3182.77, 117.55, 3.4)
pt3dadd(1496.49, 3183.15, 117.55, 3.4)
pt3dadd(1497.17, 3183.92, 117.55, 3.4)
pt3dadd(1497.51, 3184.31, 117.55, 3.4)
pt3dadd(1497.85, 3185.08, 117.55, 3.4)
pt3dadd(1498.53, 3185.47, 117.55, 3.4)
pt3dadd(1498.86, 3185.85, 117.55, 3.4)
pt3dadd(1499.54, 3186.24, 117.55, 3.4)
pt3dadd(1500.22, 3186.62, 117.55, 3.4)
pt3dadd(1500.56, 3187.01, 117.55, 3.4)
pt3dadd(1500.9, 3187.4, 117.55, 3.4)
pt3dadd(1501.58, 3187.78, 117.55, 3.4)
pt3dadd(1502.26, 3187.78, 117.55, 3.4)
pt3dadd(1503.62, 3189.32, 117.55, 3.4)
pt3dadd(1503.96, 3190.1, 117.55, 3.4)
pt3dadd(1504.64, 3191.25, 117.55, 3.4)
pt3dadd(1505.32, 3191.64, 117.55, 3.4)
pt3dadd(1505.66, 3192.41, 117.55, 3.4)
pt3dadd(1506, 3193.18, 117.55, 3.4)
pt3dadd(1507.36, 3194.73, 117.55, 3.4)
pt3dadd(1507.7, 3195.11, 117.55, 3.4)
pt3dadd(1508.04, 3195.88, 117.55, 3.4)
pt3dadd(1508.38, 3196.66, 117.55, 3.4)
pt3dadd(1508.72, 3197.04, 117.55, 3.4)
pt3dadd(1510.07, 3198.58, 117.55, 3.4)
pt3dadd(1510.75, 3198.97, 117.55, 3.4)
pt3dadd(1511.09, 3199.36, 117.55, 3.4)
pt3dadd(1511.43, 3199.74, 117.55, 3.4)
pt3dadd(1512.11, 3200.9, 117.55, 3.4)
pt3dadd(1512.45, 3201.67, 117.55, 3.4)
pt3dadd(1512.79, 3202.06, 117.55, 3.4)
pt3dadd(1513.47, 3202.44, 117.55, 3.4)
pt3dadd(1513.81, 3202.83, 117.55, 3.4)
pt3dadd(1515.17, 3204.37, 117.55, 3.4)
pt3dadd(1515.51, 3204.76, 117.55, 3.4)
pt3dadd(1516.19, 3205.14, 117.55, 3.4)
pt3dadd(1516.53, 3205.53, 117.55, 3.4)
pt3dadd(1516.87, 3205.91, 117.55, 3.4)
pt3dadd(1517.21, 3206.3, 117.55, 3.4)
pt3dadd(1517.55, 3206.69, 117.55, 3.4)
pt3dadd(1518.23, 3206.69, 117.55, 3.4)
pt3dadd(1518.57, 3207.07, 117.55, 3.4)
pt3dadd(1518.91, 3208.23, 117.55, 3.4)
pt3dadd(1519.25, 3209, 117.55, 3.4)
pt3dadd(1519.92, 3209.39, 117.55, 3.4)
pt3dadd(1520.26, 3209.77, 117.55, 3.4)
pt3dadd(1520.6, 3210.16, 117.55, 3.4)
pt3dadd(1521.28, 3210.16, 117.55, 3.4)
pt3dadd(1521.62, 3210.54, 117.55, 3.4)
pt3dadd(1521.96, 3210.93, 117.55, 3.4)
pt3dadd(1522.64, 3211.7, 117.55, 3.4)
pt3dadd(1523.32, 3211.7, 117.55, 3.4)
pt3dadd(1523.66, 3212.09, 117.55, 3.4)
pt3dadd(1524.34, 3212.86, 117.55, 3.4)
pt3dadd(1525.02, 3213.24, 117.55, 3.4)
pt3dadd(1525.36, 3213.63, 117.55, 3.4)
pt3dadd(1526.04, 3214.02, 117.55, 3.4)
pt3dadd(1526.38, 3214.4, 117.55, 3.4)
pt3dadd(1526.72, 3214.79, 117.55, 3.4)
pt3dadd(1527.06, 3215.17, 117.55, 3.4)
pt3dadd(1527.74, 3215.56, 117.55, 3.4)
pt3dadd(1528.08, 3215.95, 117.55, 3.4)
pt3dadd(1528.76, 3215.95, 117.55, 3.4)
pt3dadd(1529.1, 3216.33, 117.55, 3.4)
pt3dadd(1529.44, 3216.72, 117.55, 3.4)
pt3dadd(1530.11, 3217.1, 117.55, 3.4)
pt3dadd(1530.45, 3217.87, 117.55, 3.4)
pt3dadd(1530.79, 3218.26, 117.55, 3.4)
pt3dadd(1531.47, 3218.65, 117.55, 3.4)
pt3dadd(1531.81, 3219.03, 117.55, 3.4)
pt3dadd(1532.15, 3219.42, 117.55, 3.4)
pt3dadd(1532.83, 3219.42, 117.55, 3.4)
pt3dadd(1533.17, 3219.8, 117.55, 3.4)
pt3dadd(1533.51, 3220.57, 117.55, 3.4)
pt3dadd(1533.85, 3220.96, 117.55, 3.4)
pt3dadd(1534.19, 3221.35, 117.55, 3.4)
pt3dadd(1534.53, 3222.12, 117.55, 3.4)
pt3dadd(1534.87, 3222.89, 117.55, 3.4)
}
}
proc shape3d_120() {
dend[71] { pt3dadd(1535.55, 3223.28, 117.55, 3.4)
pt3dadd(1535.89, 3223.66, 117.55, 3.4)
pt3dadd(1536.23, 3224.05, 117.55, 3.4)
pt3dadd(1536.57, 3224.82, 117.55, 3.4)
pt3dadd(1537.25, 3225.59, 117.55, 3.4)
pt3dadd(1537.59, 3226.36, 117.55, 3.4)
pt3dadd(1537.93, 3227.52, 117.55, 3.4)
pt3dadd(1538.27, 3227.91, 117.55, 3.4)
pt3dadd(1538.61, 3227.71, 117.55, 3.4)
pt3dadd(1539.29, 3228.87, 117.55, 3.4)
pt3dadd(1539.29, 3230.03, 117.55, 3.4)
pt3dadd(1539.63, 3230.8, 117.55, 3.4)
pt3dadd(1539.63, 3232.73, 117.55, 3.4)
pt3dadd(1539.97, 3233.5, 117.55, 3.4)
pt3dadd(1540.31, 3234.27, 117.55, 3.4)
pt3dadd(1540.64, 3235.04, 117.55, 3.4)
pt3dadd(1540.64, 3243.14, 117.55, 3.4)
pt3dadd(1540.98, 3243.92, 117.55, 3.4)
pt3dadd(1540.98, 3245.46, 117.55, 3.4)
pt3dadd(1541.32, 3245.84, 117.55, 3.4)
pt3dadd(1541.66, 3246.62, 117.55, 3.4)
pt3dadd(1541.66, 3247.77, 117.55, 3.4)
pt3dadd(1542.34, 3248.93, 117.55, 3.4)
pt3dadd(1542.68, 3249.32, 117.55, 3.4)
pt3dadd(1543.02, 3250.09, 117.55, 3.4)
pt3dadd(1543.36, 3250.86, 117.55, 3.4)
pt3dadd(1543.7, 3251.63, 117.55, 3.4)
pt3dadd(1544.04, 3252.4, 117.55, 3.4)
pt3dadd(1544.04, 3253.56, 117.55, 3.4)
pt3dadd(1544.38, 3253.95, 117.55, 3.4)
pt3dadd(1544.72, 3254.72, 117.55, 3.4)
pt3dadd(1545.06, 3255.49, 117.55, 3.4)
pt3dadd(1545.74, 3257.03, 117.55, 3.4)
pt3dadd(1546.08, 3257.42, 117.55, 3.4)
pt3dadd(1546.42, 3258.58, 117.55, 3.4)
pt3dadd(1546.76, 3258.96, 117.55, 3.4)
pt3dadd(1547.1, 3259.73, 117.55, 3.4)
pt3dadd(1547.44, 3260.51, 117.55, 3.4)
pt3dadd(1547.78, 3260.89, 117.55, 3.4)
pt3dadd(1548.12, 3261.66, 117.55, 3.4)
pt3dadd(1548.46, 3262.43, 117.55, 3.4)
pt3dadd(1548.8, 3263.21, 117.55, 3.4)
pt3dadd(1549.14, 3263.59, 117.55, 3.4)
pt3dadd(1549.48, 3264.75, 117.55, 3.4)
pt3dadd(1549.82, 3265.91, 117.55, 3.4)
pt3dadd(1550.5, 3266.68, 117.55, 3.4)
pt3dadd(1550.83, 3267.45, 117.55, 3.4)
pt3dadd(1551.17, 3268.61, 117.55, 3.4)
pt3dadd(1551.85, 3269.76, 117.55, 3.4)
pt3dadd(1552.19, 3270.54, 117.55, 3.4)
pt3dadd(1552.19, 3271.31, 117.55, 3.4)
pt3dadd(1552.53, 3271.69, 117.55, 3.4)
pt3dadd(1552.87, 3272.08, 117.55, 3.4)
pt3dadd(1553.21, 3272.85, 117.55, 3.4)
pt3dadd(1553.55, 3273.62, 117.55, 3.4)
pt3dadd(1553.89, 3274.01, 117.55, 3.4)
pt3dadd(1553.89, 3274.78, 117.55, 3.4)
pt3dadd(1554.57, 3275.55, 117.55, 3.4)
pt3dadd(1554.91, 3276.32, 117.55, 3.4)
pt3dadd(1555.25, 3276.71, 117.55, 3.4)
pt3dadd(1555.59, 3277.48, 117.55, 3.4)
pt3dadd(1555.93, 3278.25, 117.55, 3.4)
pt3dadd(1556.27, 3279.02, 117.55, 3.4)
pt3dadd(1556.61, 3279.41, 117.55, 3.4)
pt3dadd(1556.95, 3280.18, 117.55, 3.4)
pt3dadd(1557.29, 3280.95, 117.55, 3.4)
pt3dadd(1557.63, 3281.72, 117.55, 3.4)
pt3dadd(1557.97, 3282.11, 117.55, 3.4)
pt3dadd(1558.31, 3282.88, 117.55, 3.4)
pt3dadd(1558.65, 3283.65, 117.55, 3.4)
pt3dadd(1558.99, 3284.43, 117.55, 3.4)
pt3dadd(1559.33, 3285.2, 117.55, 3.4)
pt3dadd(1559.67, 3285.58, 117.55, 3.4)
pt3dadd(1560.01, 3285.97, 117.55, 3.4)
pt3dadd(1560.01, 3286.74, 117.55, 3.4)
pt3dadd(1560.35, 3287.13, 117.55, 3.4)
pt3dadd(1560.69, 3287.51, 117.55, 3.4)
pt3dadd(1560.69, 3288.67, 117.55, 3.4)
pt3dadd(1561.03, 3289.05, 117.55, 3.4)
pt3dadd(1561.36, 3289.83, 117.55, 3.4)
pt3dadd(1561.7, 3290.6, 117.55, 3.4)
pt3dadd(1562.04, 3291.37, 117.55, 3.4)
pt3dadd(1562.38, 3291.76, 117.55, 3.4)
pt3dadd(1562.72, 3292.53, 117.55, 3.4)
pt3dadd(1563.06, 3293.3, 117.55, 3.4)
pt3dadd(1563.74, 3294.46, 117.55, 3.4)
pt3dadd(1564.08, 3295.23, 117.55, 3.4)
pt3dadd(1564.42, 3296.39, 117.55, 3.4)
pt3dadd(1564.76, 3297.16, 117.55, 3.4)
pt3dadd(1565.44, 3297.93, 117.55, 3.4)
pt3dadd(1565.44, 3298.7, 117.55, 3.4)
pt3dadd(1566.12, 3299.47, 117.55, 3.4)
pt3dadd(1566.46, 3300.24, 117.55, 3.4)
pt3dadd(1566.8, 3301.01, 117.55, 3.4)
pt3dadd(1567.48, 3301.79, 117.55, 3.4)
pt3dadd(1567.82, 3302.56, 117.55, 3.4)
pt3dadd(1568.16, 3302.94, 117.55, 3.4)
pt3dadd(1568.5, 3303.33, 117.55, 3.4)
pt3dadd(1568.84, 3304.49, 117.55, 3.4)
pt3dadd(1569.18, 3305.26, 117.55, 3.4)
pt3dadd(1569.52, 3306.03, 117.55, 3.4)
pt3dadd(1569.86, 3306.42, 117.55, 3.4)
pt3dadd(1570.2, 3306.8, 117.55, 3.4)
pt3dadd(1570.54, 3307.57, 117.55, 3.4)
pt3dadd(1570.88, 3308.34, 117.55, 3.4)
pt3dadd(1571.22, 3308.73, 117.55, 3.4)
pt3dadd(1571.22, 3309.5, 117.55, 3.4)
pt3dadd(1571.56, 3310.66, 117.55, 3.4)
pt3dadd(1571.89, 3311.05, 117.55, 3.4)
pt3dadd(1572.23, 3311.82, 117.55, 3.4)
pt3dadd(1572.57, 3312.59, 117.55, 3.4)
pt3dadd(1572.91, 3313.36, 117.55, 3.4)
pt3dadd(1573.25, 3313.75, 117.55, 3.4)
pt3dadd(1573.59, 3314.52, 117.55, 3.4)
pt3dadd(1573.93, 3315.29, 117.55, 3.4)
pt3dadd(1574.61, 3316.06, 117.55, 3.4)
pt3dadd(1574.95, 3316.83, 117.55, 3.4)
pt3dadd(1575.29, 3317.22, 117.55, 3.4)
pt3dadd(1575.63, 3317.99, 117.55, 3.4)
pt3dadd(1575.97, 3318.76, 117.55, 3.4)
pt3dadd(1576.31, 3319.53, 117.55, 3.4)
pt3dadd(1576.65, 3319.92, 117.55, 3.4)
pt3dadd(1576.99, 3320.69, 117.55, 3.4)
pt3dadd(1577.33, 3321.46, 117.55, 3.4)
pt3dadd(1577.67, 3322.23, 117.55, 3.4)
pt3dadd(1577.67, 3323.01, 117.55, 3.4)
pt3dadd(1578.01, 3323.78, 117.55, 3.4)
pt3dadd(1578.35, 3324.16, 117.55, 3.4)
pt3dadd(1578.69, 3324.55, 117.55, 3.4)
pt3dadd(1579.03, 3324.93, 117.55, 3.4)
pt3dadd(1579.37, 3325.71, 117.55, 3.4)
pt3dadd(1579.71, 3326.48, 117.55, 3.4)
pt3dadd(1580.05, 3327.25, 117.55, 3.4)
pt3dadd(1580.39, 3328.02, 117.55, 3.4)
pt3dadd(1580.73, 3328.41, 117.55, 3.4)
pt3dadd(1581.07, 3328.79, 117.55, 3.4)
pt3dadd(1581.41, 3329.56, 117.55, 3.4)
pt3dadd(1581.75, 3330.34, 117.55, 3.4)
pt3dadd(1582.09, 3330.72, 117.55, 3.4)
pt3dadd(1582.42, 3331.11, 117.55, 3.4)
pt3dadd(1582.76, 3331.88, 117.55, 3.4)
pt3dadd(1583.1, 3332.26, 117.55, 3.4)
pt3dadd(1583.1, 3336.12, 117.55, 3.4)
pt3dadd(1583.44, 3336.51, 117.55, 3.4)
pt3dadd(1583.44, 3343.07, 117.55, 3.4)
pt3dadd(1583.1, 3342.87, 117.55, 4.08)
pt3dadd(1583.44, 3343.26, 117.55, 4.08)
pt3dadd(1584.12, 3344.03, 117.55, 4.08)
pt3dadd(1584.12, 3345.19, 117.55, 4.08)
pt3dadd(1584.46, 3345.57, 117.55, 4.08)
pt3dadd(1584.8, 3346.35, 117.55, 4.08)
pt3dadd(1584.8, 3347.5, 117.55, 4.08)
pt3dadd(1585.14, 3347.89, 117.55, 4.08)
pt3dadd(1585.82, 3347.89, 117.55, 4.08)
pt3dadd(1586.16, 3348.28, 117.55, 4.08)
pt3dadd(1586.5, 3348.66, 117.55, 4.08)
pt3dadd(1586.5, 3349.43, 117.55, 4.08)
pt3dadd(1587.18, 3350.2, 117.55, 4.08)
pt3dadd(1587.18, 3351.36, 117.55, 4.08)
pt3dadd(1587.52, 3351.75, 117.55, 4.08)
pt3dadd(1587.86, 3352.52, 117.55, 4.08)
pt3dadd(1587.86, 3354.06, 117.55, 4.08)
pt3dadd(1588.2, 3354.45, 117.55, 4.08)
pt3dadd(1588.2, 3355.22, 117.55, 4.08)
pt3dadd(1588.54, 3355.99, 117.55, 4.08)
pt3dadd(1588.88, 3356.76, 117.55, 4.08)
pt3dadd(1588.88, 3357.53, 117.55, 4.08)
pt3dadd(1589.22, 3357.92, 117.55, 4.08)
pt3dadd(1589.56, 3358.31, 117.55, 4.08)
pt3dadd(1589.9, 3359.08, 117.55, 4.08)
pt3dadd(1590.24, 3359.46, 117.55, 4.08)
pt3dadd(1590.58, 3359.85, 117.55, 4.08)
pt3dadd(1590.92, 3360.62, 117.55, 4.08)
pt3dadd(1591.26, 3361.01, 117.55, 4.08)
pt3dadd(1591.6, 3361.39, 117.55, 4.08)
pt3dadd(1591.6, 3362.16, 117.55, 4.08)
pt3dadd(1591.94, 3362.55, 117.55, 4.08)
pt3dadd(1592.28, 3362.94, 117.55, 4.08)
pt3dadd(1592.61, 3363.71, 117.55, 4.08)
pt3dadd(1592.95, 3364.09, 117.55, 4.08)
pt3dadd(1593.29, 3364.48, 117.55, 4.08)
pt3dadd(1593.63, 3365.25, 117.55, 4.08)
pt3dadd(1593.63, 3366.79, 117.55, 4.08)
pt3dadd(1593.97, 3367.18, 117.55, 4.08)
pt3dadd(1593.97, 3369.49, 117.55, 4.08)
pt3dadd(1594.31, 3370.27, 117.55, 4.08)
pt3dadd(1594.65, 3370.65, 117.55, 4.08)
pt3dadd(1594.99, 3371.04, 117.55, 4.08)
pt3dadd(1594.99, 3377.98, 117.55, 4.08)
pt3dadd(1595.33, 3378.37, 117.55, 4.08)
pt3dadd(1595.33, 3379.14, 117.55, 4.08)
pt3dadd(1596.01, 3379.91, 117.55, 4.08)
pt3dadd(1596.35, 3380.68, 117.55, 4.08)
pt3dadd(1596.35, 3381.45, 117.55, 4.08)
pt3dadd(1596.69, 3381.84, 117.55, 4.08)
pt3dadd(1597.03, 3382.61, 117.55, 4.08)
pt3dadd(1597.37, 3383.38, 117.55, 4.08)
pt3dadd(1597.71, 3384.16, 117.55, 4.08)
pt3dadd(1598.39, 3384.93, 117.55, 4.08)
pt3dadd(1598.73, 3385.7, 117.55, 4.08)
}
}
proc shape3d_121() {
dend[71] { pt3dadd(1599.07, 3386.47, 117.55, 4.08)
pt3dadd(1599.07, 3387.24, 117.55, 4.08)
pt3dadd(1599.41, 3388.01, 117.55, 4.08)
pt3dadd(1599.75, 3388.4, 117.55, 4.08)
pt3dadd(1600.09, 3388.78, 117.55, 4.08)
pt3dadd(1600.43, 3389.94, 117.55, 4.08)
pt3dadd(1601.11, 3391.1, 117.55, 4.08)
pt3dadd(1601.45, 3391.49, 117.55, 4.08)
pt3dadd(1601.79, 3392.26, 117.55, 4.08)
pt3dadd(1602.13, 3393.03, 117.55, 4.08)
pt3dadd(1602.47, 3393.8, 117.55, 4.08)
pt3dadd(1602.81, 3394.19, 117.55, 4.08)
pt3dadd(1603.14, 3394.57, 117.55, 4.08)
pt3dadd(1603.48, 3394.96, 117.55, 4.08)
pt3dadd(1603.82, 3395.34, 117.55, 4.08)
pt3dadd(1604.16, 3395.73, 117.55, 4.08)
pt3dadd(1604.16, 3396.5, 117.55, 4.08)
pt3dadd(1604.5, 3396.89, 117.55, 4.08)
pt3dadd(1604.84, 3397.66, 117.55, 4.08)
pt3dadd(1605.18, 3398.43, 117.55, 4.08)
pt3dadd(1605.52, 3398.82, 117.55, 4.08)
pt3dadd(1605.86, 3399.2, 117.55, 4.08)
pt3dadd(1605.86, 3399.97, 117.55, 4.08)
pt3dadd(1606.2, 3400.36, 117.55, 4.08)
pt3dadd(1606.54, 3400.74, 117.55, 4.08)
pt3dadd(1606.88, 3401.13, 117.55, 4.08)
pt3dadd(1607.22, 3401.52, 117.55, 4.08)
pt3dadd(1607.56, 3401.9, 117.55, 4.08)
pt3dadd(1607.9, 3402.29, 117.55, 4.08)
pt3dadd(1607.9, 3405.37, 117.55, 4.08)
pt3dadd(1608.24, 3405.76, 117.55, 4.08)
pt3dadd(1608.24, 3406.92, 117.55, 4.08)
pt3dadd(1608.58, 3407.3, 117.55, 4.08)
pt3dadd(1608.92, 3408.07, 117.55, 4.08)
pt3dadd(1609.26, 3408.85, 117.55, 4.08)
pt3dadd(1609.6, 3409.23, 117.55, 4.08)
pt3dadd(1609.94, 3409.62, 117.55, 4.08)
pt3dadd(1610.62, 3410, 117.55, 4.08)
pt3dadd(1610.62, 3418.49, 117.55, 4.08)
pt3dadd(1610.62, 3407.88, 117.55, 1.36)
pt3dadd(1610.62, 3421.77, 117.55, 1.36)
pt3dadd(1664.18, 3565.16, 117.55, 4.2)
pt3dadd(1664.18, 3572.88, 117.55, 4.2)
pt3dadd(1664.18, 3573.26, 117.55, 4.2)
pt3dadd(1664.52, 3573.65, 117.55, 4.2)
pt3dadd(1664.52, 3575.19, 117.55, 4.2)
pt3dadd(1664.86, 3575.58, 117.55, 4.2)
pt3dadd(1665.2, 3575.97, 117.55, 4.2)
pt3dadd(1665.2, 3577.51, 117.55, 4.2)
pt3dadd(1665.54, 3577.89, 117.55, 4.2)
pt3dadd(1666.22, 3578.28, 117.55, 4.2)
pt3dadd(1666.56, 3578.67, 117.55, 4.2)
pt3dadd(1666.9, 3579.05, 117.55, 4.2)
pt3dadd(1667.58, 3578.67, 117.55, 4.2)
pt3dadd(1670.64, 3578.67, 117.55, 4.2)
pt3dadd(1670.98, 3578.67, 117.55, 4.2)
pt3dadd(1671.66, 3578.28, 117.55, 4.2)
pt3dadd(1671.99, 3577.89, 117.55, 4.2)
pt3dadd(1672.33, 3577.51, 117.55, 4.2)
pt3dadd(1672.67, 3577.12, 117.55, 4.2)
pt3dadd(1673.69, 3577.12, 117.55, 4.2)
pt3dadd(1674.03, 3576.35, 117.55, 4.2)
pt3dadd(1674.37, 3576.74, 117.55, 4.2)
pt3dadd(1675.05, 3576.35, 117.55, 4.2)
pt3dadd(1680.15, 3576.35, 117.55, 4.2)
pt3dadd(1680.49, 3576.93, 117.55, 4.2)
pt3dadd(1696.79, 3611.07, 117.55, 4.2)
pt3dadd(1709.7, 3644.44, 117.55, 4.2)
pt3dadd(1722.61, 3670.49, 117.55, 4.2)
pt3dadd(1726.68, 3697.3, 117.55, 4.2)
pt3dadd(1730.76, 3722.96, 117.55, 4.2)
pt3dadd(1736.87, 3740.51, 117.55, 4.2)
pt3dadd(1742.31, 3789.31, 117.55, 4.2)
pt3dadd(1749.78, 3833.87, 117.55, 4.2)
pt3dadd(1753.18, 3871.49, 117.55, 4.2)
pt3dadd(1759.63, 3903.32, 117.55, 4.2)
pt3dadd(1767.78, 3923.19, 117.55, 4.2)
pt3dadd(1777.63, 3953.86, 117.55, 4.2)
pt3dadd(1793.6, 3983.76, 117.55, 4.2)
pt3dadd(1803.79, 4002.86, 117.55, 4.2)
pt3dadd(1804.13, 4002.86, 117.55, 4.2)
pt3dadd(1804.47, 4003.24, 117.55, 4.2)
pt3dadd(1804.81, 4003.63, 117.55, 4.2)
pt3dadd(1805.15, 4004.01, 117.55, 4.2)
pt3dadd(1805.83, 4004.4, 117.55, 4.2)
pt3dadd(1806.17, 4004.78, 117.55, 4.2)
pt3dadd(1806.51, 4005.56, 117.55, 4.2)
pt3dadd(1806.85, 4005.94, 117.55, 4.2)
pt3dadd(1807.18, 4006.71, 117.55, 4.2)
pt3dadd(1807.52, 4007.1, 117.55, 4.2)
pt3dadd(1808.2, 4007.48, 117.55, 4.2)
pt3dadd(1808.54, 4008.26, 117.55, 4.2)
pt3dadd(1808.88, 4009.03, 117.55, 4.2)
pt3dadd(1809.22, 4009.8, 117.55, 4.2)
pt3dadd(1809.56, 4010.57, 117.55, 4.2)
pt3dadd(1809.9, 4010.96, 117.55, 4.2)
pt3dadd(1810.24, 4011.34, 117.55, 4.2)
pt3dadd(1810.58, 4012.11, 117.55, 4.2)
pt3dadd(1810.92, 4012.89, 117.55, 4.2)
pt3dadd(1811.26, 4013.27, 117.55, 4.2)
pt3dadd(1811.6, 4014.43, 117.55, 4.2)
pt3dadd(1811.94, 4014.82, 117.55, 4.2)
pt3dadd(1812.28, 4015.2, 117.55, 4.2)
pt3dadd(1812.62, 4015.59, 117.55, 4.2)
pt3dadd(1812.96, 4016.36, 117.55, 4.2)
pt3dadd(1813.3, 4016.74, 117.55, 4.2)
pt3dadd(1813.64, 4017.52, 117.55, 4.2)
pt3dadd(1813.98, 4017.9, 117.55, 4.2)
pt3dadd(1814.32, 4018.29, 117.55, 4.2)
pt3dadd(1815, 4018.67, 117.55, 4.2)
pt3dadd(1815.34, 4019.06, 117.55, 4.2)
pt3dadd(1815.68, 4019.44, 117.55, 4.2)
pt3dadd(1816.36, 4019.83, 117.55, 4.2)
pt3dadd(1816.7, 4020.6, 117.55, 4.2)
pt3dadd(1817.04, 4020.99, 117.55, 4.2)
pt3dadd(1817.38, 4021.37, 117.55, 4.2)
pt3dadd(1817.71, 4021.76, 117.55, 4.2)
pt3dadd(1818.05, 4022.15, 117.55, 4.2)
pt3dadd(1818.39, 4022.53, 117.55, 4.2)
pt3dadd(1818.73, 4023.3, 117.55, 4.2)
pt3dadd(1819.07, 4024.07, 117.55, 4.2)
pt3dadd(1819.07, 4024.85, 117.55, 4.2)
pt3dadd(1819.75, 4025.23, 117.55, 4.2)
pt3dadd(1820.09, 4025.62, 117.55, 4.2)
pt3dadd(1820.43, 4026, 117.55, 4.2)
pt3dadd(1821.11, 4026.39, 117.55, 4.2)
pt3dadd(1821.79, 4026.78, 117.55, 4.2)
pt3dadd(1822.13, 4027.16, 117.55, 4.2)
pt3dadd(1822.47, 4027.93, 117.55, 4.2)
pt3dadd(1822.81, 4028.32, 117.55, 4.2)
pt3dadd(1823.15, 4028.7, 117.55, 4.2)
pt3dadd(1823.49, 4029.09, 117.55, 4.2)
pt3dadd(1823.49, 4030.25, 117.55, 4.2)
pt3dadd(1823.83, 4030.63, 117.55, 4.2)
pt3dadd(1823.83, 4033.72, 117.55, 4.2)
pt3dadd(1824.17, 4034.49, 117.55, 4.2)
pt3dadd(1824.51, 4034.88, 117.55, 4.2)
pt3dadd(1824.85, 4035.65, 117.55, 4.2)
pt3dadd(1825.19, 4036.03, 117.55, 4.2)
pt3dadd(1825.53, 4036.42, 117.55, 4.2)
pt3dadd(1826.21, 4037.19, 117.55, 4.2)
pt3dadd(1826.55, 4037.96, 117.55, 4.2)
pt3dadd(1826.55, 4038.73, 117.55, 4.2)
pt3dadd(1826.89, 4039.51, 117.55, 4.2)
pt3dadd(1827.23, 4039.89, 117.55, 4.2)
pt3dadd(1827.57, 4040.28, 117.55, 4.2)
pt3dadd(1827.57, 4042.59, 117.55, 4.2)
pt3dadd(1827.91, 4043.36, 117.55, 4.2)
pt3dadd(1827.91, 4044.14, 117.55, 4.2)
pt3dadd(1828.24, 4044.52, 117.55, 4.2)
pt3dadd(1828.58, 4044.91, 117.55, 4.2)
pt3dadd(1828.92, 4045.29, 117.55, 4.2)
pt3dadd(1829.26, 4046.06, 117.55, 4.2)
pt3dadd(1829.6, 4046.45, 117.55, 4.2)
pt3dadd(1829.6, 4047.22, 117.55, 4.2)
pt3dadd(1829.94, 4047.61, 117.55, 4.2)
pt3dadd(1829.94, 4048.77, 117.55, 4.2)
pt3dadd(1830.28, 4049.15, 117.55, 4.2)
pt3dadd(1830.28, 4050.31, 117.55, 4.2)
pt3dadd(1830.62, 4051.08, 117.55, 4.2)
pt3dadd(1830.62, 4053.4, 117.55, 4.2)
pt3dadd(1831.3, 4053.4, 117.55, 4.2)
pt3dadd(1831.64, 4053.78, 117.55, 4.2)
pt3dadd(1831.98, 4054.17, 117.55, 4.2)
pt3dadd(1832.32, 4054.94, 117.55, 4.2)
pt3dadd(1832.66, 4056.1, 117.55, 4.2)
pt3dadd(1833.34, 4057.25, 117.55, 4.2)
pt3dadd(1833.68, 4057.64, 117.55, 4.2)
pt3dadd(1834.02, 4058.03, 117.55, 4.2)
pt3dadd(1835.04, 4059.38, 117.55, 4.2)
pt3dadd(1835.38, 4059.76, 117.55, 4.2)
pt3dadd(1835.38, 4061.3, 117.55, 4.2)
pt3dadd(1835.72, 4061.69, 117.55, 4.2)
pt3dadd(1836.4, 4062.46, 117.55, 4.2)
pt3dadd(1836.4, 4063.62, 117.55, 4.2)
pt3dadd(1836.74, 4064.01, 117.55, 4.2)
pt3dadd(1837.08, 4064.39, 117.55, 4.2)
pt3dadd(1837.08, 4065.16, 117.55, 4.2)
pt3dadd(1837.42, 4065.55, 117.55, 4.2)
pt3dadd(1837.76, 4066.32, 117.55, 4.2)
pt3dadd(1838.1, 4067.09, 117.55, 4.2)
pt3dadd(1838.43, 4067.48, 117.55, 4.2)
pt3dadd(1838.77, 4067.86, 117.55, 4.2)
pt3dadd(1838.77, 4068.64, 117.55, 4.2)
pt3dadd(1839.11, 4069.41, 117.55, 4.2)
pt3dadd(1839.45, 4069.79, 117.55, 4.2)
pt3dadd(1839.79, 4070.56, 117.55, 4.2)
pt3dadd(1840.13, 4070.95, 117.55, 4.2)
pt3dadd(1840.47, 4071.34, 117.55, 4.2)
pt3dadd(1840.81, 4072.11, 117.55, 4.2)
pt3dadd(1841.49, 4072.49, 117.55, 4.2)
pt3dadd(1841.49, 4073.26, 117.55, 4.2)
pt3dadd(1841.83, 4074.04, 117.55, 4.2)
pt3dadd(1842.17, 4074.42, 117.55, 4.2)
pt3dadd(1842.51, 4074.81, 117.55, 4.2)
pt3dadd(1842.85, 4075.58, 117.55, 4.2)
pt3dadd(1843.19, 4075.96, 117.55, 4.2)
pt3dadd(1843.53, 4076.74, 117.55, 4.2)
pt3dadd(1844.21, 4077.12, 117.55, 4.2)
pt3dadd(1844.89, 4077.51, 117.55, 4.2)
}
}
proc shape3d_122() {
dend[71] { pt3dadd(1845.23, 4077.89, 117.55, 4.2)
pt3dadd(1845.57, 4078.28, 117.55, 4.2)
pt3dadd(1845.91, 4079.05, 117.55, 4.2)
pt3dadd(1846.59, 4079.05, 117.55, 4.2)
pt3dadd(1846.93, 4079.82, 117.55, 4.2)
pt3dadd(1847.27, 4080.21, 117.55, 4.2)
pt3dadd(1847.61, 4080.59, 117.55, 4.2)
pt3dadd(1848.96, 4080.59, 117.55, 4.2)
pt3dadd(1849.3, 4080.98, 117.55, 4.2)
pt3dadd(1849.64, 4081.37, 117.55, 4.2)
pt3dadd(1850.32, 4081.37, 117.55, 4.2)
pt3dadd(1850.66, 4081.75, 117.55, 4.2)
pt3dadd(1851.34, 4082.14, 117.55, 4.2)
pt3dadd(1852.02, 4082.52, 117.55, 4.2)
pt3dadd(1852.36, 4082.91, 117.55, 4.2)
pt3dadd(1852.7, 4083.68, 117.55, 4.2)
pt3dadd(1853.04, 4084.45, 117.55, 4.2)
pt3dadd(1853.38, 4084.84, 117.55, 4.2)
pt3dadd(1853.72, 4085.61, 117.55, 4.2)
pt3dadd(1854.06, 4086.38, 117.55, 4.2)
pt3dadd(1854.74, 4087.54, 117.55, 4.2)
pt3dadd(1855.08, 4088.7, 117.55, 4.2)
pt3dadd(1855.76, 4088.7, 117.55, 4.2)
pt3dadd(1856.78, 4090.05, 117.55, 4.2)
pt3dadd(1874.78, 4117.25, 117.55, 4.2)
pt3dadd(1891.08, 4126.7, 117.55, 4.2)
pt3dadd(1902.63, 4135.77, 117.55, 4.2)
pt3dadd(1916.56, 4136.34, 117.55, 4.2)
pt3dadd(1936.94, 4138.47, 117.55, 4.2)
pt3dadd(1966.15, 4132.49, 117.55, 4.2)
pt3dadd(1989.93, 4134.22, 117.55, 4.2)
pt3dadd(2012.69, 4128.24, 117.55, 4.2)
pt3dadd(2039.86, 4126.12, 117.55, 4.2)
pt3dadd(2057.18, 4128.24, 117.55, 4.2)
pt3dadd(2079.6, 4121.1, 117.55, 4.2)
pt3dadd(2093.87, 4117.05, 117.55, 4.2)
pt3dadd(2104.4, 4104.9, 117.55, 4.2)
pt3dadd(2117.65, 4092.75, 117.55, 4.2)
pt3dadd(2119.01, 4091.2, 117.55, 4.2)
pt3dadd(2120.36, 4089.66, 117.55, 4.2)
}
dend[72] {pt3dclear()
pt3dadd(733.02, 2055.94, 117.55, 6.79)
pt3dadd(762.23, 2069.45, 117.55, 6.79)
pt3dadd(786.68, 2086.03, 117.55, 6.11)
pt3dadd(806.39, 2095.68, 117.55, 5.43)
pt3dadd(824.73, 2111.5, 117.55, 4.76)
pt3dadd(832.88, 2115.74, 117.55, 4.76)
pt3dadd(849.86, 2138.5, 117.55, 4.76)
pt3dadd(847.42, 2137.59, 117.55, 3.4)
pt3dadd(993.92, 2215.94, 117.55, 3.4)
pt3dadd(1023.37, 2246.77, 117.55, 3.4)
pt3dadd(1030.85, 2261.05, 117.55, 3.4)
pt3dadd(1032.89, 2267.6, 117.55, 3.4)
pt3dadd(1036.96, 2273.39, 117.55, 3.4)
pt3dadd(1047.15, 2279.18, 117.55, 3.4)
pt3dadd(1063.46, 2300.4, 117.55, 3.4)
pt3dadd(1074.33, 2313.9, 117.55, 3.4)
pt3dadd(1085.2, 2323.55, 117.55, 3.4)
pt3dadd(1104.9, 2333.96, 117.55, 3.4)
pt3dadd(1119.84, 2345.15, 117.55, 3.4)
pt3dadd(1128.67, 2355.57, 117.55, 3.4)
pt3dadd(1142.26, 2372.16, 117.55, 3.4)
pt3dadd(1146.34, 2393.38, 117.55, 3.4)
pt3dadd(1147.02, 2414.6, 117.55, 3.4)
pt3dadd(1144.98, 2441.99, 117.55, 3.4)
pt3dadd(1148.38, 2471.69, 117.55, 4.08)
pt3dadd(1151.77, 2496, 117.55, 4.08)
pt3dadd(1159.92, 2521.08, 117.55, 4.08)
pt3dadd(1174.87, 2556.19, 117.55, 4.08)
pt3dadd(1189.82, 2592.06, 117.55, 4.08)
pt3dadd(1207.48, 2623.31, 117.55, 4.08)
pt3dadd(1222.42, 2649.16, 117.55, 4.08)
pt3dadd(1232.61, 2669.61, 117.55, 4.76)
pt3dadd(1240.77, 2682.34, 117.55, 4.76)
pt3dadd(1245.52, 2702.79, 117.55, 4.76)
pt3dadd(1255.03, 2727.1, 117.55, 5.43)
pt3dadd(1263.86, 2749.86, 117.55, 5.43)
pt3dadd(1267.26, 2761.05, 117.55, 5.43)
pt3dadd(1274.05, 2766.06, 117.55, 5.43)
pt3dadd(1287.64, 2774.94, 117.55, 5.43)
pt3dadd(1305.3, 2783.81, 117.55, 6.11)
pt3dadd(1320.93, 2785.74, 117.55, 6.79)
pt3dadd(1346.74, 2794.23, 117.55, 6.79)
pt3dadd(1365.77, 2822.77, 117.55, 6.79)
pt3dadd(1382.07, 2860.58, 117.55, 5.43)
pt3dadd(1395.66, 2899.94, 117.55, 5.43)
pt3dadd(1398.38, 2925.4, 117.55, 5.43)
pt3dadd(1394.3, 2967.84, 117.55, 4.76)
pt3dadd(1397.21, 2934.9, 117.55, 3.06)
pt3dadd(1395.51, 2949.36, 117.55, 3.06)
pt3dadd(1392.46, 2971.16, 117.55, 3.06)
pt3dadd(1393.13, 2992.57, 117.55, 4.5)
pt3dadd(1391.44, 3007.04, 117.55, 4)
pt3dadd(1390.42, 3016.88, 117.55, 3.6)
pt3dadd(1386, 3034.43, 117.55, 3)
pt3dadd(1383.62, 3051.21, 117.55, 2.8)
pt3dadd(1380.57, 3059.9, 117.55, 2.5)
pt3dadd(1379.55, 3064.72, 117.55, 2.38)
pt3dadd(1380.91, 3067.61, 117.55, 2.38)
pt3dadd(1381.59, 3084.01, 117.55, 2.45)
pt3dadd(1383.62, 3098.09, 117.55, 2.38)
pt3dadd(1382.6, 3104.84, 117.55, 2.38)
pt3dadd(1381.59, 3109.66, 117.55, 2.38)
pt3dadd(1382.94, 3116.03, 117.55, 2.38)
pt3dadd(1386.34, 3124.71, 117.55, 2.38)
pt3dadd(1392.8, 3137.63, 117.55, 2.38)
pt3dadd(1398.57, 3148.24, 117.55, 2.38)
pt3dadd(1402.31, 3153.84, 117.55, 2.38)
pt3dadd(1402.65, 3158.66, 117.55, 2.38)
pt3dadd(1401.97, 3163.1, 117.55, 2.38)
pt3dadd(1401.63, 3166.76, 117.55, 2.38)
pt3dadd(1401.97, 3170.43, 117.55, 2.38)
pt3dadd(1404, 3176.02, 117.55, 2.38)
pt3dadd(1408.08, 3187.79, 117.55, 2.38)
pt3dadd(1412.16, 3198.01, 117.55, 2.38)
pt3dadd(1413.85, 3212.48, 117.55, 2.38)
pt3dadd(1419.29, 3233.51, 117.55, 2.38)
pt3dadd(1424.72, 3244.5, 117.55, 2.38)
pt3dadd(1428.46, 3251.64, 117.55, 2.38)
pt3dadd(1430.16, 3256.46, 117.55, 2.38)
pt3dadd(1431.86, 3260.13, 117.55, 2.38)
pt3dadd(1432.2, 3263.79, 117.55, 2.38)
pt3dadd(1431.52, 3267.46, 117.55, 2.38)
pt3dadd(1430.84, 3273.82, 117.55, 2.38)
pt3dadd(1433.22, 3287.13, 117.55, 2.38)
pt3dadd(1437.97, 3298.13, 117.55, 2.38)
pt3dadd(1440.69, 3306.42, 117.55, 2.38)
pt3dadd(1442.39, 3313.95, 117.55, 2.38)
pt3dadd(1440.35, 3321.86, 117.55, 2.38)
pt3dadd(1441.03, 3329.38, 117.55, 2.38)
pt3dadd(1443.41, 3336.52, 117.55, 2.38)
pt3dadd(1442.39, 3346.35, 117.55, 2.38)
pt3dadd(1440.01, 3355.81, 117.55, 2.38)
pt3dadd(1441.03, 3363.71, 117.55, 2.72)
pt3dadd(1442.73, 3376.25, 117.55, 2.72)
pt3dadd(1444.09, 3386.86, 117.55, 2.72)
pt3dadd(1447.48, 3394.77, 117.55, 2.72)
pt3dadd(1454.28, 3428.92, 117.55, 2.04)
}
dend[73] {pt3dclear()
pt3dadd(1454.28, 3428.92, 117.55, 2.04)
pt3dadd(1461.75, 3434.9, 117.55, 2.04)
pt3dadd(1465.83, 3447.82, 117.55, 2.04)
pt3dadd(1466.84, 3456.5, 117.55, 2.04)
pt3dadd(1467.86, 3466.34, 117.55, 2.04)
pt3dadd(1471.26, 3476.18, 117.55, 2.04)
pt3dadd(1472.62, 3484.86, 117.55, 2.04)
pt3dadd(1469.9, 3497.4, 117.55, 2.04)
pt3dadd(1469.9, 3498.36, 117.55, 1.7)
pt3dadd(1470.58, 3500.87, 117.55, 1.7)
pt3dadd(1472.28, 3504.53, 117.55, 1.7)
pt3dadd(1474.66, 3512.83, 117.55, 1.7)
pt3dadd(1476.69, 3532.31, 117.55, 1.7)
pt3dadd(1480.43, 3543.69, 117.55, 1.7)
pt3dadd(1480.77, 3546.59, 117.55, 1.7)
pt3dadd(1483.83, 3549.86, 117.55, 1.7)
pt3dadd(1487.22, 3548.9, 117.55, 1.7)
pt3dadd(1492.66, 3545.62, 117.55, 1.7)
pt3dadd(1499.79, 3540.03, 117.55, 1.7)
pt3dadd(1509.64, 3529.42, 117.55, 1.7)
pt3dadd(1509.3, 3530.38, 117.55, 1.7)
pt3dadd(1510.32, 3527.87, 117.55, 1.7)
pt3dadd(1512.36, 3526.52, 117.55, 1.7)
pt3dadd(1514.4, 3527.1, 117.55, 1.7)
pt3dadd(1516.44, 3528.84, 117.55, 1.7)
pt3dadd(1518.81, 3531.35, 117.55, 1.7)
pt3dadd(1522.55, 3531.92, 117.55, 1.7)
pt3dadd(1523.23, 3530.96, 117.55, 1.7)
pt3dadd(1524.93, 3529.61, 117.55, 1.7)
pt3dadd(1526.63, 3525.94, 117.55, 1.7)
pt3dadd(1528.32, 3519.19, 117.55, 1.7)
pt3dadd(1530.02, 3510.51, 117.55, 1.7)
pt3dadd(1531.72, 3506.08, 117.55, 2.38)
pt3dadd(1535.8, 3501.64, 117.55, 2.38)
pt3dadd(1540.21, 3501.45, 117.55, 2.38)
pt3dadd(1545.31, 3498.55, 117.55, 2.38)
pt3dadd(1547.69, 3497.2, 117.55, 2.38)
pt3dadd(1551.08, 3495.85, 117.55, 2.38)
pt3dadd(1554.48, 3497.2, 117.55, 2.38)
pt3dadd(1559.24, 3500.87, 117.55, 2.38)
pt3dadd(1561.27, 3502.22, 117.55, 2.38)
pt3dadd(1563.65, 3504.73, 117.55, 2.38)
pt3dadd(1568.07, 3507.62, 117.55, 2.38)
pt3dadd(1569.77, 3507.43, 117.55, 2.38)
pt3dadd(1571.8, 3506.08, 117.55, 2.38)
pt3dadd(1571.8, 3505.11, 117.55, 2.38)
pt3dadd(1572.48, 3505.3, 117.55, 2.38)
}
dend[74] {pt3dclear()
pt3dadd(1454.28, 3428.92, 117.55, 2.04)
pt3dadd(1453.6, 3448.78, 117.55, 2.04)
pt3dadd(1453.94, 3475.98, 117.55, 2.04)
pt3dadd(1456.99, 3495.08, 117.55, 2.04)
pt3dadd(1458.35, 3514.56, 117.55, 2.04)
pt3dadd(1461.41, 3534.05, 117.55, 2.04)
pt3dadd(1463.79, 3551.99, 117.55, 2.04)
pt3dadd(1466.5, 3565.3, 117.55, 2.38)
pt3dadd(1465.49, 3574.36, 117.55, 2.38)
pt3dadd(1464.13, 3582.27, 117.55, 2.38)
pt3dadd(1466.5, 3590.18, 117.55, 2.38)
pt3dadd(1468.54, 3596.16, 117.55, 2.38)
pt3dadd(1470.24, 3611.4, 117.55, 2.38)
pt3dadd(1472.62, 3636.67, 117.55, 2.72)
pt3dadd(1476.69, 3660.01, 117.55, 2.72)
pt3dadd(1476.35, 3681.04, 117.55, 2.72)
}
}
proc shape3d_123() {
dend[74] { pt3dadd(1476.35, 3692.42, 117.55, 2.72)
pt3dadd(1476.02, 3701.48, 117.55, 2.72)
pt3dadd(1476.35, 3704.38, 117.55, 2.72)
pt3dadd(1476.35, 3705.73, 117.55, 2.72)
pt3dadd(1478.73, 3710.17, 117.55, 2.72)
pt3dadd(1481.11, 3713.06, 117.55, 2.72)
pt3dadd(1484.51, 3718.65, 117.55, 2.72)
pt3dadd(1489.6, 3734.66, 117.55, 2.72)
pt3dadd(1492.66, 3747.2, 117.55, 2.72)
pt3dadd(1492.66, 3758.97, 117.55, 2.72)
pt3dadd(1492.66, 3771.51, 117.55, 2.38)
pt3dadd(1491.3, 3788.29, 117.55, 2.38)
pt3dadd(1493, 3805.07, 117.55, 2.38)
pt3dadd(1491.98, 3818.77, 117.55, 2.38)
pt3dadd(1494.36, 3834.39, 117.55, 2.38)
pt3dadd(1496.74, 3847.32, 117.55, 2.38)
pt3dadd(1501.83, 3870.66, 117.55, 1.7)
}
dend[75] {pt3dclear()
pt3dadd(1501.83, 3870.66, 117.55, 2.72)
pt3dadd(1515.08, 3895.93, 117.55, 2.72)
pt3dadd(1521.53, 3911.94, 117.55, 2.38)
pt3dadd(1527.31, 3936.82, 117.55, 2.38)
pt3dadd(1540.89, 3970.2, 117.55, 2.38)
pt3dadd(1553.12, 4000.1, 117.55, 2.38)
pt3dadd(1557.88, 4014.95, 117.55, 2.38)
pt3dadd(1558.56, 4032.12, 117.55, 2.38)
pt3dadd(1558.9, 4049.29, 117.55, 2.38)
pt3dadd(1552.78, 4062.6, 117.55, 2.38)
pt3dadd(1545.65, 4077.83, 117.55, 2.38)
pt3dadd(1536.82, 4093.85, 117.55, 2.38)
pt3dadd(1525.61, 4109.86, 117.55, 2.38)
pt3dadd(1511.34, 4121.62, 117.55, 2.38)
pt3dadd(1503.87, 4133.78, 117.55, 2.38)
pt3dadd(1502.51, 4142.07, 117.55, 2.38)
pt3dadd(1501.49, 4157.31, 117.55, 2.38)
pt3dadd(1499.45, 4162.13, 117.55, 2.38)
pt3dadd(1493.34, 4173.51, 117.55, 2.38)
pt3dadd(1481.11, 4211.9, 117.55, 2.38)
pt3dadd(1475.34, 4229.07, 117.55, 2.38)
pt3dadd(1471.94, 4252.41, 117.55, 2.38)
pt3dadd(1471.6, 4268.81, 117.55, 2.38)
pt3dadd(1472.28, 4270.54, 117.55, 2.38)
}
dend[76] {pt3dclear()
pt3dadd(1501.83, 3870.66, 117.55, 1.7)
pt3dadd(1500.81, 3888.21, 117.55, 1.7)
pt3dadd(1501.15, 3921.97, 117.55, 1.7)
pt3dadd(1499.11, 3953.41, 117.55, 1.7)
pt3dadd(1499.11, 3978.3, 117.55, 1.7)
pt3dadd(1499.11, 3990.84, 117.55, 1.7)
pt3dadd(1500.47, 4000.29, 117.55, 1.7)
pt3dadd(1502.17, 4008.2, 117.55, 1.7)
pt3dadd(1506.93, 4028.45, 117.55, 1.7)
pt3dadd(1510.32, 4046.39, 117.55, 1.7)
pt3dadd(1512.02, 4055.84, 117.55, 1.36)
pt3dadd(1512.7, 4059.12, 117.55, 1.36)
pt3dadd(1512.7, 4061.25, 117.55, 1.36)
pt3dadd(1511, 4069.54, 117.55, 1.36)
pt3dadd(1507.27, 4085.17, 117.55, 1.36)
pt3dadd(1506.93, 4115.84, 117.55, 1.36)
pt3dadd(1511, 4143.42, 117.55, 1.36)
pt3dadd(1513.38, 4167.92, 117.55, 1.36)
pt3dadd(1516.78, 4191.65, 117.55, 1.36)
pt3dadd(1518.81, 4216.14, 117.55, 1.36)
pt3dadd(1522.21, 4255.88, 117.55, 0.68)
pt3dadd(1522.89, 4301.02, 117.55, 1.36)
pt3dadd(1520.17, 4358.89, 117.55, 1.36)
pt3dadd(1516.1, 4433.74, 117.55, 1.36)
pt3dadd(1514.34, 4463.37, 117.55, 1.36)
pt3dadd(1511.62, 4479.38, 117.55, 1.36)
pt3dadd(1511.96, 4491.92, 117.55, 1.36)
pt3dadd(1515.7, 4499.83, 117.55, 1.36)
pt3dadd(1516.38, 4505.04, 117.55, 1.36)
pt3dadd(1514.68, 4509.47, 117.55, 1.36)
pt3dadd(1512.98, 4520.85, 117.55, 1.36)
pt3dadd(1514.68, 4540.72, 117.55, 1.36)
pt3dadd(1510.6, 4569.08, 117.55, 1.36)
pt3dadd(1504.49, 4608.62, 117.55, 1.36)
pt3dadd(1498.37, 4641.22, 117.55, 1.36)
pt3dadd(1496.68, 4658.01, 117.55, 1.7)
pt3dadd(1497.35, 4668.23, 117.55, 1.7)
pt3dadd(1501.77, 4695.04, 117.55, 2.04)
pt3dadd(1504.49, 4712.6, 117.55, 2.04)
pt3dadd(1506.19, 4718.96, 117.55, 2.04)
pt3dadd(1504.49, 4732.66, 117.55, 2.04)
pt3dadd(1502.45, 4750.21, 117.55, 2.04)
pt3dadd(1503.81, 4775.87, 117.55, 2.72)
pt3dadd(1512.64, 4821.59, 117.55, 2.72)
pt3dadd(1514.34, 4856.12, 117.55, 2.72)
pt3dadd(1515.02, 4872.9, 117.55, 2.72)
pt3dadd(1515.02, 4881.96, 117.55, 2.72)
pt3dadd(1510.6, 4896.82, 117.55, 2.72)
pt3dadd(1500.75, 4924.79, 117.55, 2.72)
pt3dadd(1485.13, 4951.99, 117.55, 2.72)
pt3dadd(1473.92, 4977.26, 117.55, 2.72)
pt3dadd(1465.42, 4999.83, 117.55, 2.72)
pt3dadd(1463.05, 5003.88, 117.55, 2.72)
pt3dadd(1462.37, 5007.54, 117.55, 2.72)
pt3dadd(1464.41, 5015.07, 117.55, 2.72)
pt3dadd(1466.1, 5033.01, 117.55, 2.72)
pt3dadd(1466.1, 5048.25, 117.55, 2.72)
pt3dadd(1465.42, 5071.78, 117.55, 2.72)
pt3dadd(1464.75, 5095.31, 117.55, 2.72)
pt3dadd(1464.07, 5118.85, 117.55, 2.72)
pt3dadd(1455.91, 5151.64, 117.55, 2.72)
pt3dadd(1452.52, 5178.65, 117.55, 2.72)
pt3dadd(1443.69, 5207.2, 117.55, 2.72)
pt3dadd(1430.78, 5246.55, 117.55, 2.72)
pt3dadd(1417.87, 5285.9, 117.55, 2.72)
pt3dadd(1395.45, 5332.97, 117.55, 2.72)
pt3dadd(1379.83, 5384.67, 117.55, 2.72)
pt3dadd(1373.71, 5394.7, 117.55, 2.72)
}
dend[77] {pt3dclear()
pt3dadd(614.13, 1752.7, 117.55, 6.79)
pt3dadd(605.3, 1763.12, 117.55, 6.79)
pt3dadd(604.62, 1767.36, 117.55, 6.79)
pt3dadd(604.62, 1771.61, 117.55, 6.79)
pt3dadd(604.62, 1785.11, 117.55, 6.79)
pt3dadd(605.3, 1790.12, 117.55, 6.79)
pt3dadd(604.62, 1798.23, 117.55, 6.79)
pt3dadd(602.58, 1800.93, 117.55, 6.79)
pt3dadd(592.39, 1833.72, 117.55, 6.79)
pt3dadd(588.99, 1849.54, 117.55, 6.11)
pt3dadd(585.6, 1873.84, 117.55, 6.11)
pt3dadd(577.45, 1900.46, 117.55, 6.11)
pt3dadd(572.01, 1925.54, 117.55, 6.11)
pt3dadd(569.29, 1949.85, 117.55, 6.11)
pt3dadd(563.86, 1971.84, 117.55, 5.43)
pt3dadd(560.46, 1976.85, 117.55, 6.11)
pt3dadd(557.07, 1985.73, 117.55, 6.11)
pt3dadd(558.42, 1998.46, 117.55, 6.11)
pt3dadd(561.14, 2014.28, 117.55, 6.11)
pt3dadd(567.26, 2040.9, 117.55, 6.11)
pt3dadd(576.09, 2084.49, 117.55, 6.11)
pt3dadd(576.77, 2125.77, 117.55, 6.11)
pt3dadd(581.52, 2170.14, 117.55, 6.11)
pt3dadd(580.84, 2175.16, 117.55, 6.11)
pt3dadd(577.45, 2183.26, 117.55, 6.11)
pt3dadd(572.69, 2197.53, 117.55, 6.11)
pt3dadd(574.05, 2204.86, 117.55, 6.11)
pt3dadd(576.77, 2214.51, 117.55, 6.11)
pt3dadd(578.13, 2244.99, 117.55, 6.11)
pt3dadd(579.48, 2296.3, 117.55, 5.43)
pt3dadd(582.2, 2318.29, 117.55, 5.43)
pt3dadd(586.28, 2339.51, 117.55, 4.76)
pt3dadd(587.64, 2367.67, 117.55, 4.76)
pt3dadd(587.64, 2409.72, 117.55, 4.76)
pt3dadd(576.77, 2446.37, 117.55, 4.76)
pt3dadd(566.58, 2490.36, 117.55, 4.76)
}
dend[78] {pt3dclear()
pt3dadd(485.05, 1388.5, 117.55, 9.51)
pt3dadd(473.51, 1425.15, 117.55, 9.51)
pt3dadd(468.07, 1454.09, 117.55, 8.15)
pt3dadd(462.64, 1463.74, 117.55, 8.15)
pt3dadd(459.24, 1467.21, 117.55, 7.47)
}
dend[79] {pt3dclear()
pt3dadd(420.52, 1145.83, 117.55, 6.79)
pt3dadd(411.01, 1146.22, 117.55, 6.79)
pt3dadd(401.49, 1140.43, 117.55, 6.11)
pt3dadd(391.98, 1126.93, 117.55, 6.11)
pt3dadd(387.91, 1123.46, 117.55, 6.11)
}
dend[80] {pt3dclear()
pt3dadd(399.46, 924.77, 117.55, 7.47)
pt3dadd(407.61, 918.98, 117.55, 7.47)
pt3dadd(420.52, 919.37, 117.55, 7.47)
pt3dadd(426.63, 915.9, 117.55, 7.47)
pt3dadd(430.71, 911.65, 117.55, 7.47)
pt3dadd(436.14, 910.49, 117.55, 7.47)
pt3dadd(439.54, 913.2, 117.55, 7.47)
pt3dadd(445.65, 919.75, 117.55, 7.47)
pt3dadd(448.37, 926.31, 117.55, 5.43)
pt3dadd(454.48, 934.41, 117.55, 5.43)
pt3dadd(459.24, 945.6, 117.55, 5.43)
pt3dadd(459.24, 945.22, 117.55, 5.43)
}
dend[81] {pt3dclear()
pt3dadd(377.72, 886.19, 36.3, 8.92)
pt3dadd(377.81, 889.57, 36.3, 8.92)
pt3dadd(378.09, 889.88, 36.3, 8.92)
pt3dadd(378.09, 892.1, 36.3, 8.92)
pt3dadd(378.37, 892.73, 36.3, 8.92)
pt3dadd(378.37, 908.88, 36.3, 8.92)
pt3dadd(378.65, 909.51, 36.3, 8.92)
pt3dadd(378.65, 920.27, 36.3, 8.92)
pt3dadd(378.65, 919.01, 39.3, 8.92)
pt3dadd(381.16, 941.17, 39.3, 8.92)
pt3dadd(380.04, 939.9, 39.3, 8.92)
pt3dadd(380.04, 940.85, 39.3, 8.92)
pt3dadd(380.32, 941.8, 39.3, 8.92)
pt3dadd(380.6, 943.06, 39.3, 8.92)
pt3dadd(380.88, 944.33, 39.3, 8.92)
pt3dadd(380.88, 945.91, 39.3, 8.92)
pt3dadd(381.16, 947.18, 39.3, 8.92)
pt3dadd(381.16, 950.98, 39.3, 8.92)
pt3dadd(381.44, 951.3, 39.3, 8.92)
pt3dadd(381.44, 952.56, 39.3, 8.92)
pt3dadd(381.72, 953.19, 39.3, 8.92)
pt3dadd(381.99, 953.51, 39.3, 8.92)
pt3dadd(381.99, 954.46, 39.3, 8.92)
pt3dadd(382.27, 955.09, 39.3, 8.92)
pt3dadd(382.55, 955.73, 39.3, 8.92)
pt3dadd(382.83, 956.36, 39.3, 8.92)
pt3dadd(382.83, 957.31, 39.3, 8.92)
pt3dadd(383.11, 958.58, 39.3, 8.92)
pt3dadd(383.67, 958.89, 39.3, 8.92)
pt3dadd(383.94, 959.84, 39.3, 8.92)
pt3dadd(383.94, 960.48, 39.3, 8.92)
pt3dadd(384.22, 961.11, 39.3, 8.92)
pt3dadd(384.5, 962.06, 39.3, 8.92)
}
}
proc shape3d_124() {
dend[81] { pt3dadd(384.78, 962.69, 39.3, 8.92)
pt3dadd(385.06, 963.32, 39.3, 8.92)
pt3dadd(385.34, 963.96, 39.3, 8.92)
pt3dadd(385.62, 964.59, 39.3, 8.92)
pt3dadd(385.62, 965.86, 39.3, 8.92)
pt3dadd(385.9, 966.49, 39.3, 8.92)
pt3dadd(386.17, 967.12, 39.3, 8.92)
pt3dadd(386.17, 968.07, 39.3, 8.92)
pt3dadd(386.45, 969.34, 39.3, 8.92)
pt3dadd(386.73, 969.66, 39.3, 8.92)
pt3dadd(387.01, 970.61, 39.3, 8.92)
pt3dadd(387.29, 971.24, 39.3, 8.92)
pt3dadd(387.29, 971.87, 39.3, 8.92)
pt3dadd(387.57, 972.5, 39.3, 8.92)
pt3dadd(387.57, 974.09, 39.3, 8.92)
pt3dadd(387.85, 974.4, 39.3, 8.92)
pt3dadd(387.85, 978.52, 39.3, 8.92)
pt3dadd(387.29, 975.67, 42.3, 8.92)
pt3dadd(387.29, 977.89, 42.3, 8.92)
pt3dadd(387.85, 978.84, 42.3, 8.92)
pt3dadd(387.85, 980.1, 42.3, 8.92)
pt3dadd(388.13, 981.05, 42.3, 8.92)
pt3dadd(388.4, 981.68, 42.3, 8.92)
pt3dadd(388.4, 982.32, 42.3, 8.92)
pt3dadd(388.68, 982.63, 42.3, 8.92)
pt3dadd(388.68, 983.9, 42.3, 8.92)
pt3dadd(388.96, 984.22, 42.3, 8.92)
pt3dadd(389.24, 984.85, 42.3, 8.92)
pt3dadd(389.24, 985.8, 42.3, 8.92)
pt3dadd(389.52, 986.75, 42.3, 8.92)
pt3dadd(389.52, 987.38, 42.3, 8.92)
pt3dadd(389.8, 987.7, 42.3, 8.92)
pt3dadd(390.08, 988.33, 42.3, 8.92)
pt3dadd(390.08, 988.97, 42.3, 8.92)
pt3dadd(390.36, 989.6, 42.3, 8.92)
pt3dadd(390.63, 990.55, 42.3, 8.92)
pt3dadd(390.91, 991.18, 42.3, 8.92)
pt3dadd(390.91, 991.81, 42.3, 8.92)
pt3dadd(391.19, 992.45, 42.3, 8.92)
pt3dadd(391.47, 993.4, 42.3, 8.92)
pt3dadd(392.03, 994.35, 42.3, 8.92)
pt3dadd(392.03, 994.98, 42.3, 8.92)
pt3dadd(392.58, 995.93, 42.3, 8.92)
pt3dadd(392.58, 996.88, 42.3, 8.92)
pt3dadd(392.86, 997.83, 42.3, 8.92)
pt3dadd(393.42, 998.46, 42.3, 8.92)
pt3dadd(393.42, 999.41, 42.3, 8.92)
pt3dadd(393.7, 1000.36, 42.3, 8.92)
pt3dadd(393.98, 1001.31, 42.3, 8.92)
pt3dadd(394.54, 1002.89, 42.3, 8.92)
pt3dadd(394.81, 1003.53, 42.3, 8.92)
pt3dadd(394.81, 1004.48, 42.3, 8.92)
pt3dadd(395.09, 1005.11, 42.3, 8.92)
pt3dadd(395.37, 1006.06, 42.3, 8.92)
pt3dadd(395.65, 1006.69, 42.3, 8.92)
pt3dadd(395.65, 1007.64, 42.3, 8.92)
pt3dadd(395.93, 1008.59, 42.3, 8.92)
pt3dadd(396.21, 1008.91, 42.3, 8.92)
pt3dadd(396.49, 1009.86, 42.3, 8.92)
pt3dadd(396.77, 1010.81, 42.3, 8.92)
pt3dadd(396.77, 1011.44, 42.3, 8.92)
pt3dadd(397.04, 1012.07, 42.3, 8.92)
pt3dadd(397.32, 1012.71, 42.3, 8.92)
pt3dadd(397.32, 1013.34, 42.3, 8.92)
pt3dadd(397.6, 1013.97, 42.3, 8.92)
pt3dadd(397.6, 1014.61, 42.3, 8.92)
pt3dadd(397.88, 1015.56, 42.3, 8.92)
pt3dadd(398.16, 1016.51, 42.3, 8.92)
pt3dadd(398.16, 1018.4, 42.3, 8.92)
pt3dadd(398.44, 1019.04, 42.3, 8.92)
pt3dadd(398.44, 1032.02, 42.3, 8.92)
pt3dadd(398.16, 1030.75, 43.3, 8.92)
pt3dadd(398.44, 1031.38, 43.3, 8.92)
pt3dadd(399.27, 1032.02, 43.3, 8.92)
pt3dadd(399.55, 1032.65, 43.3, 8.92)
pt3dadd(399.83, 1032.97, 43.3, 8.92)
pt3dadd(400.39, 1033.28, 43.3, 8.92)
pt3dadd(400.39, 1033.92, 43.3, 8.92)
pt3dadd(400.67, 1034.23, 43.3, 8.92)
pt3dadd(400.95, 1034.55, 43.3, 8.92)
pt3dadd(400.95, 1035.5, 43.3, 8.92)
pt3dadd(401.22, 1035.82, 43.3, 8.92)
pt3dadd(401.5, 1036.13, 43.3, 8.92)
pt3dadd(401.78, 1036.77, 43.3, 8.92)
pt3dadd(402.06, 1037.4, 43.3, 8.92)
pt3dadd(402.34, 1038.03, 43.3, 8.92)
pt3dadd(402.62, 1038.35, 43.3, 8.92)
pt3dadd(402.9, 1038.66, 43.3, 8.92)
pt3dadd(402.9, 1039.61, 43.3, 8.92)
pt3dadd(403.18, 1039.93, 43.3, 8.92)
pt3dadd(403.45, 1040.25, 43.3, 8.92)
pt3dadd(403.45, 1040.88, 43.3, 8.92)
pt3dadd(403.73, 1041.2, 43.3, 8.92)
pt3dadd(403.73, 1042.15, 43.3, 8.92)
pt3dadd(404.01, 1042.46, 43.3, 8.92)
pt3dadd(404.29, 1042.78, 43.3, 8.92)
pt3dadd(404.29, 1044.05, 43.3, 8.92)
pt3dadd(404.57, 1044.36, 43.3, 8.92)
pt3dadd(404.57, 1046.58, 43.3, 8.92)
pt3dadd(404.85, 1046.9, 43.3, 8.92)
pt3dadd(404.85, 1047.84, 43.3, 8.92)
pt3dadd(405.13, 1048.48, 43.3, 8.92)
pt3dadd(405.13, 1050.06, 43.3, 8.92)
pt3dadd(405.41, 1050.38, 43.3, 8.92)
pt3dadd(405.41, 1051.33, 43.3, 8.92)
pt3dadd(405.68, 1051.96, 43.3, 8.92)
pt3dadd(405.96, 1052.59, 43.3, 8.92)
pt3dadd(406.24, 1053.54, 43.3, 8.92)
pt3dadd(406.52, 1054.18, 43.3, 8.92)
pt3dadd(406.8, 1055.13, 43.3, 8.92)
pt3dadd(407.08, 1055.44, 43.3, 8.92)
pt3dadd(407.08, 1057.02, 43.3, 8.92)
pt3dadd(407.36, 1057.34, 43.3, 8.92)
pt3dadd(407.36, 1057.97, 43.3, 8.92)
pt3dadd(407.63, 1058.29, 43.3, 8.92)
pt3dadd(407.91, 1058.61, 43.3, 8.92)
pt3dadd(407.91, 1060.19, 43.3, 8.92)
}
dend[82] {pt3dclear()
pt3dadd(320.18, 549.5, 14.3, 3.34)
pt3dadd(317.67, 547.91, 7.3, 3.34)
pt3dadd(315.44, 547.91, 7.3, 3.34)
pt3dadd(314.89, 547.6, 7.3, 3.34)
pt3dadd(313.77, 547.6, 7.3, 3.34)
pt3dadd(313.21, 547.28, 7.3, 3.34)
pt3dadd(312.94, 546.96, 7.3, 3.34)
pt3dadd(312.66, 546.65, 7.3, 3.34)
pt3dadd(312.38, 546.33, 7.3, 3.34)
pt3dadd(311.82, 546.01, 7.3, 3.34)
pt3dadd(311.54, 545.7, 7.3, 3.34)
pt3dadd(311.26, 545.06, 7.3, 3.34)
pt3dadd(310.98, 544.75, 7.3, 3.34)
pt3dadd(310.71, 544.43, 7.3, 3.34)
pt3dadd(310.43, 544.12, 7.3, 3.34)
pt3dadd(310.15, 543.8, 7.3, 3.34)
pt3dadd(309.87, 543.48, 7.3, 3.34)
pt3dadd(309.87, 542.53, 7.3, 3.34)
pt3dadd(309.59, 542.22, 7.3, 3.34)
pt3dadd(309.59, 541.58, 7.3, 3.34)
pt3dadd(309.31, 541.27, 7.3, 3.34)
pt3dadd(309.03, 540.95, 7.3, 3.34)
pt3dadd(309.03, 540.32, 7.3, 3.34)
pt3dadd(308.76, 539.68, 7.3, 3.34)
pt3dadd(308.76, 539.05, 7.3, 3.34)
pt3dadd(308.48, 538.73, 7.3, 3.34)
pt3dadd(308.48, 538.1, 7.3, 3.34)
pt3dadd(308.2, 537.78, 7.3, 3.34)
pt3dadd(307.92, 537.47, 7.3, 3.34)
pt3dadd(307.64, 536.83, 7.3, 3.34)
pt3dadd(307.08, 535.88, 7.3, 3.34)
pt3dadd(306.8, 535.57, 7.3, 3.34)
pt3dadd(306.8, 534.62, 7.3, 3.34)
pt3dadd(306.53, 534.3, 7.3, 3.34)
pt3dadd(306.25, 533.99, 7.3, 3.34)
pt3dadd(306.25, 533.35, 7.3, 3.34)
pt3dadd(305.97, 533.04, 7.3, 3.34)
pt3dadd(305.97, 532.72, 9.3, 3.07)
pt3dadd(304.02, 518.16, 9.3, 3.07)
pt3dadd(303.88, 518.16, 9.3, 3.07)
pt3dadd(303.88, 517.05, 9.3, 3.07)
pt3dadd(303.74, 516.89, 9.3, 3.07)
pt3dadd(303.74, 516.57, 9.3, 3.07)
pt3dadd(303.6, 516.42, 9.3, 3.07)
pt3dadd(303.6, 516.1, 9.3, 3.07)
pt3dadd(303.46, 515.94, 9.3, 3.07)
pt3dadd(303.32, 515.63, 9.3, 3.07)
pt3dadd(303.18, 515.31, 9.3, 3.07)
pt3dadd(303.04, 515.15, 9.3, 3.07)
pt3dadd(302.9, 514.99, 9.3, 3.07)
pt3dadd(302.9, 514.68, 9.3, 3.07)
pt3dadd(302.76, 514.36, 9.3, 3.07)
pt3dadd(302.62, 514.2, 9.3, 3.07)
pt3dadd(302.48, 513.88, 9.3, 3.07)
pt3dadd(302.48, 513.57, 9.3, 3.07)
pt3dadd(302.34, 513.41, 9.3, 3.07)
pt3dadd(302.21, 513.09, 9.3, 3.07)
pt3dadd(302.07, 512.78, 9.3, 3.07)
pt3dadd(301.93, 512.62, 9.3, 3.07)
pt3dadd(301.79, 512.3, 9.3, 3.07)
pt3dadd(301.65, 511.98, 9.3, 3.07)
pt3dadd(301.51, 511.83, 9.3, 3.07)
pt3dadd(301.37, 511.67, 9.3, 3.07)
pt3dadd(301.23, 511.35, 9.3, 3.07)
pt3dadd(300.95, 510.88, 9.3, 3.07)
pt3dadd(300.81, 510.72, 9.3, 3.07)
pt3dadd(300.67, 510.4, 9.3, 3.07)
pt3dadd(300.53, 510.24, 9.3, 3.07)
pt3dadd(300.39, 509.77, 9.3, 3.07)
pt3dadd(300.25, 509.45, 9.3, 3.07)
pt3dadd(300.12, 509.14, 9.3, 3.07)
pt3dadd(299.98, 508.82, 9.3, 3.07)
pt3dadd(299.84, 508.5, 9.3, 3.07)
pt3dadd(299.7, 508.03, 9.3, 3.07)
pt3dadd(299.56, 507.71, 9.3, 3.07)
pt3dadd(299.42, 507.24, 9.3, 3.07)
pt3dadd(299.28, 506.76, 9.3, 3.07)
pt3dadd(299.14, 506.29, 9.3, 3.07)
pt3dadd(298.86, 505.5, 9.3, 3.07)
pt3dadd(298.72, 505.18, 9.3, 3.07)
pt3dadd(298.58, 504.86, 9.3, 3.07)
pt3dadd(298.44, 504.39, 9.3, 3.07)
pt3dadd(298.3, 504.07, 9.3, 3.07)
}
}
proc shape3d_125() {
dend[82] { pt3dadd(298.3, 503.6, 9.3, 3.07)
pt3dadd(298.16, 503.28, 9.3, 3.07)
pt3dadd(298.16, 502.49, 9.3, 3.07)
pt3dadd(298.02, 502.33, 9.3, 3.07)
pt3dadd(297.89, 501.85, 9.3, 3.07)
pt3dadd(297.89, 501.22, 9.3, 3.07)
pt3dadd(298.3, 501.06, 11.3, 3.07)
pt3dadd(297.75, 500.43, 11.3, 3.07)
pt3dadd(297.61, 500.11, 11.3, 3.07)
pt3dadd(297.33, 499.8, 11.3, 3.07)
pt3dadd(297.19, 499.48, 11.3, 3.07)
pt3dadd(297.05, 499.16, 11.3, 3.07)
pt3dadd(296.91, 498.85, 11.3, 3.07)
pt3dadd(296.77, 498.37, 11.3, 3.07)
pt3dadd(296.63, 497.9, 11.3, 3.07)
pt3dadd(296.63, 497.58, 11.3, 3.07)
pt3dadd(296.49, 497.26, 11.3, 3.07)
pt3dadd(296.35, 496.95, 11.3, 3.07)
pt3dadd(296.21, 496.63, 11.3, 3.07)
pt3dadd(296.07, 496.16, 11.3, 3.07)
pt3dadd(296.07, 495.68, 11.3, 3.07)
pt3dadd(295.93, 495.52, 11.3, 3.07)
pt3dadd(295.8, 495.05, 11.3, 3.07)
pt3dadd(295.8, 494.42, 11.3, 3.07)
pt3dadd(295.52, 493.62, 11.3, 3.07)
pt3dadd(295.52, 493.15, 11.3, 3.07)
pt3dadd(295.38, 492.83, 11.3, 3.07)
pt3dadd(295.24, 492.36, 11.3, 3.07)
pt3dadd(295.24, 492.04, 11.3, 3.07)
pt3dadd(295.1, 491.73, 11.3, 3.07)
pt3dadd(294.96, 491.41, 11.3, 3.07)
pt3dadd(294.96, 491.09, 11.3, 3.07)
pt3dadd(294.82, 490.62, 11.3, 3.07)
pt3dadd(294.68, 490.3, 11.3, 3.07)
pt3dadd(294.54, 489.83, 11.3, 3.07)
pt3dadd(294.4, 489.51, 11.3, 3.07)
pt3dadd(294.26, 489.03, 11.3, 3.07)
pt3dadd(294.12, 488.72, 11.3, 3.07)
pt3dadd(293.98, 488.4, 11.3, 3.07)
pt3dadd(293.84, 488.24, 11.3, 3.07)
pt3dadd(293.7, 487.93, 11.3, 3.07)
pt3dadd(293.57, 487.77, 11.3, 3.07)
pt3dadd(293.29, 487.29, 11.3, 3.07)
pt3dadd(293.15, 486.98, 11.3, 3.07)
pt3dadd(293.01, 486.82, 11.3, 3.07)
pt3dadd(292.87, 486.5, 11.3, 3.07)
pt3dadd(292.59, 486.19, 11.3, 3.07)
pt3dadd(292.45, 486.03, 11.3, 3.07)
pt3dadd(292.17, 485.39, 11.3, 3.07)
pt3dadd(291.89, 484.92, 11.3, 3.07)
pt3dadd(291.61, 484.44, 11.3, 3.07)
pt3dadd(291.48, 484.13, 11.3, 3.07)
pt3dadd(291.34, 483.81, 11.3, 3.07)
pt3dadd(291.06, 483.49, 11.3, 3.07)
pt3dadd(290.92, 482.86, 11.3, 3.07)
pt3dadd(290.64, 482.39, 11.3, 3.07)
pt3dadd(290.64, 482.07, 11.3, 3.07)
pt3dadd(290.36, 481.6, 11.3, 3.07)
pt3dadd(289.94, 480.65, 11.3, 3.07)
pt3dadd(289.8, 480.01, 11.3, 3.07)
pt3dadd(289.66, 479.54, 11.3, 3.07)
pt3dadd(289.52, 479.22, 11.3, 3.07)
pt3dadd(289.38, 478.9, 11.3, 3.07)
pt3dadd(289.38, 478.27, 11.3, 3.07)
pt3dadd(289.25, 477.8, 11.3, 3.07)
pt3dadd(289.25, 477.48, 11.3, 3.07)
pt3dadd(289.11, 477.01, 11.3, 3.07)
pt3dadd(289.11, 476.53, 11.3, 3.07)
pt3dadd(288.97, 476.06, 11.3, 3.07)
pt3dadd(288.83, 475.26, 11.3, 3.07)
pt3dadd(288.83, 474.79, 11.3, 3.07)
pt3dadd(288.69, 474.31, 11.3, 3.07)
pt3dadd(288.69, 473.36, 11.3, 3.07)
pt3dadd(288.69, 474, 11.3, 3.07)
pt3dadd(288.83, 474.47, 13.3, 3.07)
pt3dadd(288.83, 473.68, 13.3, 3.07)
pt3dadd(288.69, 473.21, 13.3, 3.07)
pt3dadd(288.55, 472.57, 13.3, 3.07)
pt3dadd(288.41, 472.1, 13.3, 3.07)
pt3dadd(288.27, 471.62, 13.3, 3.07)
pt3dadd(288.27, 471.15, 13.3, 3.07)
pt3dadd(288.13, 470.52, 13.3, 3.07)
pt3dadd(287.99, 470.2, 13.3, 3.07)
pt3dadd(287.99, 469.09, 13.3, 3.07)
pt3dadd(287.85, 468.77, 13.3, 3.07)
pt3dadd(287.85, 468.3, 13.3, 3.07)
pt3dadd(287.71, 467.83, 13.3, 3.07)
pt3dadd(287.71, 467.51, 13.3, 3.07)
pt3dadd(287.57, 467.03, 13.3, 3.07)
pt3dadd(287.57, 466.24, 13.3, 3.07)
pt3dadd(287.43, 465.61, 13.3, 3.07)
pt3dadd(287.43, 464.82, 13.3, 3.07)
pt3dadd(287.29, 464.18, 13.3, 3.07)
pt3dadd(287.29, 463.55, 13.3, 3.07)
pt3dadd(287.16, 462.92, 13.3, 3.07)
pt3dadd(287.16, 462.6, 13.3, 3.07)
pt3dadd(287.02, 461.97, 13.3, 3.07)
pt3dadd(287.02, 460.23, 13.3, 3.07)
pt3dadd(286.88, 459.75, 13.3, 3.07)
pt3dadd(286.74, 459.44, 13.3, 3.07)
pt3dadd(286.74, 458.8, 13.3, 3.07)
pt3dadd(286.6, 458.49, 13.3, 3.07)
pt3dadd(286.46, 458.01, 13.3, 3.07)
pt3dadd(286.46, 457.54, 13.3, 3.07)
pt3dadd(286.32, 457.06, 13.3, 3.07)
pt3dadd(286.32, 456.59, 13.3, 3.07)
pt3dadd(286.18, 455.95, 13.3, 3.07)
pt3dadd(286.18, 454.69, 13.3, 3.07)
pt3dadd(286.04, 454.06, 13.3, 3.07)
pt3dadd(286.04, 444.72, 13.3, 3.07)
pt3dadd(286.18, 444.4, 13.3, 3.07)
pt3dadd(286.18, 442.34, 13.3, 3.07)
pt3dadd(286.18, 442.98, 13.3, 3.07)
pt3dadd(286.04, 442.98, 14.3, 3.07)
pt3dadd(286.04, 438.23, 14.3, 3.07)
pt3dadd(285.9, 437.91, 14.3, 3.07)
pt3dadd(285.9, 437.44, 14.3, 3.07)
pt3dadd(285.76, 437.12, 14.3, 3.07)
pt3dadd(285.76, 436.64, 14.3, 3.07)
pt3dadd(285.62, 436.49, 14.3, 3.07)
pt3dadd(285.48, 436.17, 14.3, 3.07)
pt3dadd(285.34, 435.85, 14.3, 3.07)
pt3dadd(285.2, 435.38, 14.3, 3.07)
pt3dadd(285.2, 435.06, 14.3, 3.07)
pt3dadd(285.06, 434.75, 14.3, 3.07)
pt3dadd(284.93, 434.27, 14.3, 3.07)
pt3dadd(284.79, 433.95, 14.3, 3.07)
pt3dadd(284.51, 433.32, 14.3, 3.07)
pt3dadd(284.37, 432.85, 14.3, 3.07)
pt3dadd(284.23, 432.21, 14.3, 3.07)
pt3dadd(283.95, 431.74, 14.3, 3.07)
pt3dadd(283.81, 431.26, 14.3, 3.07)
pt3dadd(283.81, 430.95, 14.3, 3.07)
pt3dadd(283.67, 430.63, 14.3, 3.07)
pt3dadd(283.53, 430, 14.3, 3.07)
pt3dadd(283.39, 429.84, 14.3, 3.07)
pt3dadd(283.39, 429.21, 14.3, 3.07)
pt3dadd(283.25, 428.89, 14.3, 3.07)
pt3dadd(283.25, 427.15, 14.3, 3.07)
pt3dadd(283.39, 426.83, 14.3, 3.07)
pt3dadd(285.33, 425.93, 14.3, 3.07)
}
dend[83] {pt3dclear()
pt3dadd(285.33, 425.93, 14.3, 3.07)
pt3dadd(283.39, 425.25, 14.3, 3.07)
pt3dadd(283.53, 424.77, 14.3, 3.07)
pt3dadd(283.53, 423.19, 14.3, 3.07)
pt3dadd(283.67, 422.56, 14.3, 3.07)
pt3dadd(283.81, 422.08, 14.3, 3.07)
pt3dadd(283.81, 421.77, 14.3, 3.07)
pt3dadd(283.95, 421.45, 14.3, 3.07)
pt3dadd(283.95, 420.97, 14.3, 3.07)
pt3dadd(284.09, 420.5, 14.3, 3.07)
pt3dadd(284.23, 420.03, 14.3, 3.07)
pt3dadd(284.37, 419.71, 14.3, 3.07)
pt3dadd(284.51, 419.23, 14.3, 3.07)
pt3dadd(284.65, 419.08, 14.3, 3.07)
pt3dadd(284.79, 418.6, 14.3, 3.07)
pt3dadd(284.93, 417.81, 14.3, 3.07)
pt3dadd(285.2, 417.65, 14.3, 3.07)
pt3dadd(285.34, 417.18, 14.3, 3.07)
pt3dadd(285.48, 416.7, 14.3, 3.07)
pt3dadd(297.85, 377.91, 0, 0.56)
pt3dadd(302.99, 375.58, -2.7, 9.85)
pt3dadd(302.65, 374.81, -2.7, 9.85)
pt3dadd(302.65, 372.49, -2.7, 9.85)
pt3dadd(302.65, 372.88, -5.7, 12.23)
pt3dadd(302.65, 372.11, -5.7, 12.23)
pt3dadd(302.31, 371.72, -5.7, 12.23)
pt3dadd(302.31, 370.56, -5.7, 12.23)
pt3dadd(301.97, 370.18, -5.7, 12.23)
pt3dadd(301.97, 367.48, -5.7, 12.23)
pt3dadd(301.63, 366.71, -5.7, 12.23)
pt3dadd(301.29, 366.32, -5.7, 12.23)
pt3dadd(301.29, 362.85, -5.7, 12.23)
pt3dadd(300.95, 362.08, -5.7, 12.23)
pt3dadd(300.95, 355.13, -5.7, 12.23)
pt3dadd(282.61, 287.04, -5.7, 10.31)
}
dend[84] {pt3dclear()
pt3dadd(282.61, 287.04, -5.7, 2.72)
pt3dadd(312.5, 314.81, 0, 2.72)
}
dend[85] {pt3dclear()
pt3dadd(282.61, 287.04, -5.7, 10.31)
pt3dadd(282.56, 285.17, -5.7, 10.31)
pt3dadd(282.56, 283.59, -5.7, 10.31)
pt3dadd(282.28, 283.27, -5.7, 10.31)
pt3dadd(282.28, 281.37, -5.7, 10.31)
pt3dadd(282, 281.06, -5.7, 10.31)
pt3dadd(282, 280.42, -5.7, 10.31)
pt3dadd(281.72, 279.79, -5.7, 10.31)
pt3dadd(281.72, 279.16, -5.7, 10.31)
pt3dadd(281.44, 278.84, -5.7, 10.31)
pt3dadd(281.16, 278.52, -5.7, 10.31)
pt3dadd(281.16, 277.58, -5.7, 10.31)
pt3dadd(280.88, 276.94, -5.7, 10.31)
pt3dadd(280.61, 276.31, -5.7, 10.31)
pt3dadd(280.33, 275.68, -5.7, 10.31)
pt3dadd(280.33, 275.04, -5.7, 10.31)
pt3dadd(280.05, 274.73, -5.7, 10.31)
pt3dadd(279.77, 274.09, -5.7, 10.31)
pt3dadd(279.77, 273.46, -5.7, 10.31)
pt3dadd(279.49, 272.83, -5.7, 10.31)
pt3dadd(279.21, 272.51, -5.7, 10.31)
pt3dadd(278.93, 271.88, -5.7, 10.31)
}
}
proc shape3d_126() {
dend[85] { pt3dadd(278.65, 271.56, -5.7, 10.31)
pt3dadd(278.65, 270.93, -5.7, 10.31)
pt3dadd(278.38, 270.61, -5.7, 10.31)
pt3dadd(278.1, 270.29, -5.7, 10.31)
pt3dadd(278.1, 269.66, -5.7, 10.31)
pt3dadd(277.82, 269.03, -5.7, 10.31)
pt3dadd(277.54, 268.39, -5.7, 10.31)
pt3dadd(276.98, 267.13, -5.7, 10.31)
pt3dadd(276.98, 266.5, -5.7, 10.31)
pt3dadd(276.43, 266.18, -5.7, 10.31)
pt3dadd(276.15, 265.23, -5.7, 10.31)
pt3dadd(275.87, 264.6, -5.7, 10.31)
pt3dadd(275.59, 263.65, -5.7, 10.31)
pt3dadd(275.03, 263.01, -5.7, 10.31)
pt3dadd(274.75, 262.38, -5.7, 10.31)
pt3dadd(274.47, 261.43, -5.7, 10.31)
pt3dadd(273.92, 260.48, -5.7, 10.31)
pt3dadd(273.64, 259.85, -5.7, 10.31)
pt3dadd(273.08, 258.9, -5.7, 10.31)
pt3dadd(272.8, 258.27, -5.7, 10.31)
pt3dadd(272.52, 257.63, -5.7, 10.31)
pt3dadd(272.24, 257, -5.7, 10.31)
pt3dadd(271.41, 256.05, -5.7, 10.31)
pt3dadd(271.13, 255.42, -5.7, 10.31)
pt3dadd(270.85, 254.47, -5.7, 10.31)
pt3dadd(270.29, 254.15, -5.7, 10.31)
pt3dadd(270.01, 253.52, -5.7, 10.31)
pt3dadd(269.18, 252.57, -5.7, 10.31)
pt3dadd(268.62, 251.93, -5.7, 10.31)
pt3dadd(268.34, 251.3, -5.7, 10.31)
pt3dadd(268.06, 250.67, -5.7, 10.31)
pt3dadd(267.51, 250.03, -5.7, 10.31)
pt3dadd(267.23, 249.4, -5.7, 10.31)
pt3dadd(266.95, 248.77, -5.7, 10.31)
pt3dadd(266.11, 247.82, -5.7, 10.31)
pt3dadd(265.83, 247.5, -5.7, 10.31)
pt3dadd(265.28, 246.87, -5.7, 10.31)
pt3dadd(264.72, 246.55, -5.7, 10.31)
pt3dadd(264.16, 246.24, -5.7, 10.31)
pt3dadd(264.16, 245.6, -5.7, 10.31)
pt3dadd(263.6, 245.29, -5.7, 10.31)
pt3dadd(263.33, 244.97, -5.7, 10.31)
pt3dadd(262.77, 244.65, -5.7, 10.31)
pt3dadd(262.21, 244.34, -5.7, 10.31)
pt3dadd(261.65, 244.02, -5.7, 10.31)
pt3dadd(261.1, 244.02, -5.7, 10.31)
pt3dadd(260.82, 243.7, -5.7, 10.31)
pt3dadd(260.54, 243.39, -5.7, 10.31)
pt3dadd(260.26, 243.07, -5.7, 10.31)
pt3dadd(259.7, 243.07, -5.7, 10.31)
pt3dadd(259.42, 242.75, -5.7, 10.31)
pt3dadd(259.15, 242.44, -5.7, 10.31)
pt3dadd(258.87, 242.12, -5.7, 10.31)
pt3dadd(258.59, 241.8, -5.7, 10.31)
pt3dadd(258.31, 241.49, -5.7, 10.31)
pt3dadd(258.03, 241.17, -5.7, 10.31)
pt3dadd(257.75, 240.54, -5.7, 10.31)
pt3dadd(257.19, 240.22, -5.7, 10.31)
pt3dadd(256.64, 239.9, -5.7, 10.31)
pt3dadd(256.08, 239.27, -5.7, 10.31)
pt3dadd(255.8, 238.96, -5.7, 10.31)
pt3dadd(255.24, 238.96, -5.7, 10.31)
pt3dadd(254.96, 238.64, -5.7, 10.31)
pt3dadd(254.69, 238.32, -5.7, 10.31)
pt3dadd(254.41, 238.01, -5.7, 10.31)
pt3dadd(253.85, 237.69, -5.7, 10.31)
pt3dadd(253.29, 237.37, -5.7, 10.31)
pt3dadd(253.01, 237.06, -5.7, 10.31)
pt3dadd(252.73, 236.74, -5.7, 10.31)
}
dend[86] {pt3dclear()
pt3dadd(252.73, 236.74, -5.7, 4.46)
pt3dadd(253.15, 234.84, -1.7, 4.46)
pt3dadd(253.15, 234.21, -1.7, 4.46)
pt3dadd(253.29, 233.89, -1.7, 4.46)
pt3dadd(253.43, 233.42, -1.7, 4.46)
pt3dadd(253.43, 232.94, -1.7, 4.46)
pt3dadd(253.57, 232.62, -1.7, 4.46)
pt3dadd(253.85, 232.15, -1.7, 4.46)
pt3dadd(253.99, 231.67, -1.7, 4.46)
pt3dadd(254.13, 231.36, -1.7, 4.46)
pt3dadd(254.13, 230.25, -1.7, 4.46)
pt3dadd(254.27, 230.09, -1.7, 4.46)
pt3dadd(254.41, 229.78, -1.7, 4.46)
pt3dadd(254.55, 229.46, -1.7, 4.46)
pt3dadd(254.69, 229.3, -1.7, 4.46)
pt3dadd(254.69, 228.67, -1.7, 4.46)
pt3dadd(254.83, 228.35, -1.7, 4.46)
pt3dadd(254.96, 228.19, -1.7, 4.46)
pt3dadd(255.1, 227.88, -1.7, 4.46)
pt3dadd(255.1, 227.4, -1.7, 4.46)
pt3dadd(255.38, 226.93, -1.7, 4.46)
pt3dadd(255.38, 226.61, -1.7, 4.46)
pt3dadd(255.52, 226.29, -1.7, 4.46)
pt3dadd(255.52, 225.98, -1.7, 4.46)
pt3dadd(255.66, 225.66, -1.7, 4.46)
pt3dadd(255.8, 225.18, -1.7, 4.46)
pt3dadd(255.8, 222.49, -1.7, 4.46)
pt3dadd(256.08, 221.7, -1.7, 4.46)
pt3dadd(256.22, 221.39, -1.7, 4.46)
pt3dadd(256.22, 220.91, -1.7, 4.46)
pt3dadd(256.36, 220.59, -1.7, 4.46)
pt3dadd(256.36, 219.49, -1.7, 4.46)
pt3dadd(256.5, 219.17, -1.7, 4.46)
pt3dadd(256.5, 208.88, -1.7, 4.46)
pt3dadd(256.5, 207.62, -1.7, 3.9)
pt3dadd(256.36, 207.3, -1.7, 3.9)
pt3dadd(256.36, 195.43, -1.7, 3.9)
pt3dadd(256.22, 195.27, -1.7, 3.9)
pt3dadd(256.22, 194.8, -1.7, 3.9)
pt3dadd(256.08, 194.32, -1.7, 3.9)
pt3dadd(255.94, 194, -1.7, 3.9)
pt3dadd(255.94, 193.53, -1.7, 3.9)
pt3dadd(255.8, 193.21, -1.7, 3.9)
pt3dadd(255.8, 192.9, -1.7, 3.9)
pt3dadd(255.66, 192.58, -1.7, 3.9)
pt3dadd(255.66, 192.26, -1.7, 3.9)
pt3dadd(255.52, 191.95, -1.7, 3.9)
pt3dadd(255.38, 191.63, -1.7, 3.9)
pt3dadd(255.38, 191.31, -1.7, 3.9)
pt3dadd(255.24, 191, -1.7, 3.9)
pt3dadd(255.24, 183.72, -1.7, 3.9)
pt3dadd(255.1, 183.56, -1.7, 3.9)
pt3dadd(255.1, 182.61, -1.7, 3.9)
pt3dadd(255.24, 182.61, 0.3, 3.9)
pt3dadd(255.1, 182.29, 0.3, 3.9)
pt3dadd(255.1, 181.5, 0.3, 3.9)
pt3dadd(254.96, 181.18, 0.3, 3.9)
pt3dadd(254.96, 180.23, 0.3, 3.9)
pt3dadd(254.83, 179.76, 0.3, 3.9)
pt3dadd(254.69, 179.13, 0.3, 3.9)
pt3dadd(254.69, 178.18, 0.3, 3.9)
pt3dadd(254.55, 177.7, 0.3, 3.9)
pt3dadd(254.55, 177.23, 0.3, 3.9)
pt3dadd(254.41, 176.75, 0.3, 3.9)
pt3dadd(254.41, 175.96, 0.3, 3.9)
pt3dadd(254.27, 175.49, 0.3, 3.9)
pt3dadd(254.27, 174.69, 0.3, 3.9)
pt3dadd(254.13, 174.06, 0.3, 3.9)
pt3dadd(254.13, 173.74, 0.3, 3.9)
pt3dadd(253.99, 172.95, 0.3, 3.9)
pt3dadd(253.99, 172.48, 0.3, 3.9)
pt3dadd(253.85, 172, 0.3, 3.9)
pt3dadd(253.71, 171.21, 0.3, 3.9)
pt3dadd(253.57, 170.42, 0.3, 3.9)
pt3dadd(253.57, 169.95, 0.3, 3.9)
pt3dadd(253.43, 169.47, 0.3, 3.9)
pt3dadd(253.29, 168.84, 0.3, 3.9)
pt3dadd(253.29, 168.52, 0.3, 3.9)
pt3dadd(253.15, 167.89, 0.3, 3.9)
pt3dadd(253.01, 167.41, 0.3, 3.9)
pt3dadd(252.87, 166.94, 0.3, 3.9)
pt3dadd(252.73, 166.46, 0.3, 3.9)
pt3dadd(252.6, 166.15, 0.3, 3.9)
pt3dadd(252.6, 165.67, 0.3, 3.9)
pt3dadd(252.46, 165.2, 0.3, 3.9)
pt3dadd(252.32, 164.72, 0.3, 3.9)
pt3dadd(252.32, 164.25, 0.3, 3.9)
pt3dadd(252.18, 163.93, 0.3, 3.9)
pt3dadd(252.04, 163.46, 0.3, 3.9)
pt3dadd(251.9, 163.14, 0.3, 3.9)
pt3dadd(251.76, 162.67, 0.3, 3.9)
pt3dadd(251.76, 162.35, 0.3, 3.9)
pt3dadd(251.62, 162.03, 0.3, 3.9)
pt3dadd(251.48, 161.72, 0.3, 3.9)
pt3dadd(251.48, 161.4, 0.3, 3.9)
pt3dadd(251.2, 160.92, 0.3, 3.9)
pt3dadd(251.06, 160.61, 0.3, 3.9)
pt3dadd(250.92, 159.97, 0.3, 3.9)
pt3dadd(250.92, 159.66, 0.3, 3.9)
pt3dadd(250.64, 159.18, 0.3, 3.9)
pt3dadd(250.51, 158.87, 0.3, 3.9)
pt3dadd(250.37, 158.39, 0.3, 3.9)
pt3dadd(250.23, 157.92, 0.3, 3.9)
pt3dadd(250.09, 157.76, 0.3, 3.9)
pt3dadd(249.95, 157.44, 0.3, 3.9)
pt3dadd(249.81, 157.13, 0.3, 3.9)
pt3dadd(249.67, 156.81, 0.3, 3.9)
pt3dadd(249.39, 156.33, 0.3, 3.9)
pt3dadd(249.39, 156.02, 0.3, 3.9)
pt3dadd(249.25, 155.7, 0.3, 3.9)
pt3dadd(249.11, 155.38, 0.3, 3.9)
pt3dadd(248.97, 154.91, 0.3, 3.9)
pt3dadd(248.83, 154.59, 0.3, 3.9)
pt3dadd(248.69, 154.28, 0.3, 3.9)
pt3dadd(248.55, 153.8, 0.3, 3.9)
pt3dadd(248.42, 153.33, 0.3, 3.9)
pt3dadd(248.28, 153.01, 0.3, 3.9)
pt3dadd(248.28, 152.54, 0.3, 3.9)
pt3dadd(248, 152.22, 0.3, 3.9)
pt3dadd(248, 151.74, 0.3, 3.9)
pt3dadd(247.72, 151.43, 0.3, 3.9)
pt3dadd(247.72, 151.11, 0.3, 3.9)
pt3dadd(247.44, 150.79, 0.3, 3.9)
pt3dadd(247.44, 150.32, 0.3, 3.9)
pt3dadd(247.3, 150, 0.3, 3.9)
pt3dadd(247.16, 149.69, 0.3, 3.9)
pt3dadd(247.02, 149.37, 0.3, 3.9)
pt3dadd(246.88, 149.05, 0.3, 3.9)
pt3dadd(246.88, 148.58, 0.3, 3.9)
pt3dadd(246.74, 148.26, 0.3, 3.9)
pt3dadd(246.6, 147.95, 0.3, 3.9)
}
}
proc shape3d_127() {
dend[86] { pt3dadd(246.46, 147.47, 0.3, 3.9)
pt3dadd(246.32, 147.15, 0.3, 3.9)
pt3dadd(246.19, 146.84, 0.3, 3.9)
pt3dadd(246.05, 146.52, 0.3, 3.9)
pt3dadd(245.91, 146.2, 0.3, 3.9)
pt3dadd(245.77, 145.89, 0.3, 3.9)
pt3dadd(245.77, 145.57, 0.3, 3.9)
pt3dadd(245.63, 145.1, 0.3, 3.9)
pt3dadd(245.35, 144.78, 0.3, 3.9)
pt3dadd(245.21, 144.46, 0.3, 3.9)
pt3dadd(245.21, 143.99, 0.3, 3.9)
pt3dadd(245.07, 143.67, 0.3, 3.9)
pt3dadd(244.93, 143.2, 0.3, 3.9)
pt3dadd(244.79, 142.88, 0.3, 3.9)
pt3dadd(244.65, 142.41, 0.3, 3.9)
pt3dadd(244.37, 141.77, 0.3, 3.9)
pt3dadd(244.23, 141.3, 0.3, 3.9)
pt3dadd(244.1, 140.98, 0.3, 3.9)
pt3dadd(243.82, 140.19, 0.3, 3.9)
pt3dadd(243.54, 139.71, 0.3, 3.9)
pt3dadd(243.4, 139.24, 0.3, 3.9)
pt3dadd(243.26, 139.08, 0.3, 3.9)
pt3dadd(242.98, 138.77, 0.3, 3.9)
pt3dadd(242.7, 137.97, 0.3, 3.9)
pt3dadd(242.56, 137.66, 0.3, 3.9)
pt3dadd(242.42, 137.5, 0.3, 3.9)
pt3dadd(242.28, 137.18, 0.3, 3.9)
pt3dadd(242.14, 137.02, 0.3, 3.9)
pt3dadd(242, 136.55, 0.3, 3.9)
pt3dadd(241.87, 136.23, 0.3, 3.9)
pt3dadd(241.73, 136.07, 0.3, 3.9)
pt3dadd(241.59, 136.23, 0.3, 3.9)
pt3dadd(241.31, 136.71, 0.3, 3.9)
pt3dadd(241.31, 137.97, 0.3, 3.9)
pt3dadd(242.14, 136.87, 2.3, 3.9)
pt3dadd(242.14, 135.92, 2.3, 3.9)
pt3dadd(242, 135.6, 2.3, 3.9)
pt3dadd(241.87, 135.12, 2.3, 3.9)
pt3dadd(241.73, 134.65, 2.3, 3.9)
pt3dadd(241.59, 134.33, 2.3, 3.9)
pt3dadd(241.59, 133.7, 2.3, 3.9)
pt3dadd(241.45, 133.23, 2.3, 3.9)
pt3dadd(241.45, 131.33, 2.3, 3.9)
pt3dadd(241.31, 131.01, 2.3, 3.9)
pt3dadd(241.31, 129.9, 2.3, 3.9)
pt3dadd(241.17, 129.59, 2.3, 3.9)
pt3dadd(241.17, 127.05, 2.3, 3.9)
pt3dadd(241.03, 126.58, 2.3, 3.9)
pt3dadd(241.03, 125, 2.3, 3.9)
pt3dadd(240.89, 124.52, 2.3, 3.9)
pt3dadd(240.89, 113.28, 2.3, 3.9)
pt3dadd(241.03, 112.81, 2.3, 3.9)
pt3dadd(241.17, 112.49, 2.3, 3.9)
pt3dadd(241.17, 111.7, 2.3, 3.9)
pt3dadd(241.31, 111.07, 2.3, 3.9)
pt3dadd(241.45, 110.59, 2.3, 3.9)
pt3dadd(241.59, 110.12, 2.3, 3.9)
pt3dadd(241.73, 109.96, 2.3, 3.9)
pt3dadd(241.87, 109.48, 2.3, 3.9)
pt3dadd(242, 109.01, 2.3, 3.9)
pt3dadd(242.14, 108.69, 2.3, 3.9)
pt3dadd(242.28, 108.22, 2.3, 3.9)
pt3dadd(242.56, 107.74, 2.3, 3.9)
pt3dadd(242.7, 107.43, 2.3, 3.9)
pt3dadd(242.84, 107.11, 2.3, 3.9)
pt3dadd(243.26, 106.32, 2.3, 3.9)
pt3dadd(243.4, 105.84, 2.3, 3.9)
pt3dadd(243.68, 105.37, 2.3, 3.9)
pt3dadd(243.96, 104.89, 2.3, 3.9)
pt3dadd(244.1, 104.42, 2.3, 3.9)
pt3dadd(244.23, 104.1, 2.3, 3.9)
pt3dadd(244.37, 103.63, 2.3, 3.9)
pt3dadd(244.51, 103.15, 2.3, 3.9)
pt3dadd(244.65, 102.84, 2.3, 3.9)
pt3dadd(244.79, 102.36, 2.3, 3.9)
pt3dadd(244.79, 97.14, 2.3, 3.9)
pt3dadd(244.79, 99.51, 3.3, 3.9)
pt3dadd(244.93, 99.04, 3.3, 3.9)
pt3dadd(244.93, 98.72, 3.3, 3.9)
pt3dadd(245.07, 98.25, 3.3, 3.9)
pt3dadd(245.07, 72.29, 3.3, 3.9)
pt3dadd(244.93, 71.97, 3.3, 3.9)
pt3dadd(244.93, 71.34, 3.3, 3.9)
pt3dadd(244.79, 71.18, 3.3, 3.9)
pt3dadd(244.79, 70.86, 3.3, 3.9)
pt3dadd(244.65, 70.55, 3.3, 3.9)
pt3dadd(244.51, 70.23, 3.3, 3.9)
pt3dadd(244.51, 69.76, 3.3, 3.9)
pt3dadd(244.37, 69.6, 3.3, 3.9)
pt3dadd(244.23, 69.12, 3.3, 3.9)
pt3dadd(244.1, 68.96, 3.3, 3.9)
pt3dadd(243.96, 68.65, 3.3, 3.9)
pt3dadd(243.82, 68.33, 3.3, 3.9)
pt3dadd(243.68, 68.02, 3.3, 3.9)
pt3dadd(243.54, 67.86, 3.3, 3.9)
pt3dadd(243.26, 67.54, 3.3, 3.9)
pt3dadd(243.12, 67.22, 3.3, 3.9)
pt3dadd(242.98, 66.91, 3.3, 3.9)
pt3dadd(242.7, 66.59, 3.3, 3.9)
pt3dadd(242.56, 66.27, 3.3, 3.9)
pt3dadd(242.42, 65.8, 3.3, 3.9)
pt3dadd(242.14, 65.64, 3.3, 3.9)
pt3dadd(242.14, 65.32, 3.3, 3.9)
pt3dadd(241.87, 65.17, 3.3, 3.9)
pt3dadd(241.73, 64.85, 3.3, 3.9)
pt3dadd(241.17, 64.22, 3.3, 3.9)
pt3dadd(241.03, 63.9, 3.3, 3.9)
pt3dadd(240.75, 63.58, 3.3, 3.9)
pt3dadd(240.61, 63.27, 3.3, 3.9)
pt3dadd(240.33, 62.79, 3.3, 3.9)
pt3dadd(240.19, 62.63, 3.3, 3.9)
pt3dadd(240.05, 62.32, 3.3, 3.9)
pt3dadd(239.78, 61.84, 3.3, 3.9)
pt3dadd(239.5, 61.37, 3.3, 3.9)
pt3dadd(239.22, 60.89, 3.3, 3.9)
pt3dadd(239.08, 60.42, 3.3, 3.9)
pt3dadd(238.94, 60.1, 3.3, 3.9)
pt3dadd(238.66, 59.63, 3.3, 3.9)
pt3dadd(238.52, 59.31, 3.3, 3.9)
pt3dadd(238.38, 58.83, 3.3, 3.9)
pt3dadd(237.96, 58.52, 3.3, 3.9)
pt3dadd(237.82, 58.2, 3.3, 3.9)
pt3dadd(237.68, 57.73, 3.3, 3.9)
pt3dadd(237.41, 57.41, 3.3, 3.9)
pt3dadd(237.27, 57.09, 3.3, 3.9)
pt3dadd(237.13, 56.78, 3.3, 3.9)
pt3dadd(236.99, 56.46, 3.3, 3.9)
pt3dadd(236.85, 55.99, 3.3, 3.9)
pt3dadd(236.57, 55.51, 3.3, 3.9)
pt3dadd(236.43, 55.35, 3.3, 3.9)
pt3dadd(236.29, 54.88, 3.3, 3.9)
pt3dadd(236.15, 54.56, 3.3, 3.9)
pt3dadd(236.01, 54.24, 3.3, 3.9)
pt3dadd(235.73, 53.93, 3.3, 3.9)
pt3dadd(235.59, 53.45, 3.3, 3.9)
pt3dadd(235.46, 53.14, 3.3, 3.9)
pt3dadd(235.32, 52.82, 3.3, 3.9)
pt3dadd(235.32, 52.5, 3.3, 3.9)
pt3dadd(235.18, 52.35, 3.3, 3.9)
pt3dadd(235.04, 52.19, 3.3, 3.9)
pt3dadd(235.04, 51.71, 3.3, 3.9)
pt3dadd(234.9, 51.4, 3.3, 3.9)
pt3dadd(234.76, 51.08, 3.3, 3.9)
pt3dadd(234.62, 50.92, 3.3, 3.9)
pt3dadd(234.62, 50.45, 3.3, 3.9)
pt3dadd(234.48, 50.6, 3.3, 3.9)
pt3dadd(234.48, 51.08, 3.3, 3.9)
pt3dadd(234.62, 51.4, 3.3, 3.9)
pt3dadd(234.76, 51.87, 3.3, 3.9)
pt3dadd(234.9, 51.87, 3.3, 3.9)
pt3dadd(235.04, 50.92, 5.3, 3.9)
pt3dadd(235.04, 49.97, 5.3, 3.9)
pt3dadd(234.9, 49.81, 5.3, 3.9)
pt3dadd(234.76, 49.65, 5.3, 3.9)
pt3dadd(234.62, 49.34, 5.3, 3.9)
pt3dadd(234.48, 49.02, 5.3, 3.9)
pt3dadd(234.48, 48.55, 5.3, 3.9)
pt3dadd(234.2, 48.07, 5.3, 3.9)
pt3dadd(234.2, 47.6, 5.3, 3.9)
pt3dadd(234.06, 47.28, 5.3, 3.9)
pt3dadd(233.78, 46.81, 5.3, 3.9)
pt3dadd(233.78, 46.33, 5.3, 3.9)
pt3dadd(233.64, 45.86, 5.3, 3.9)
pt3dadd(233.5, 45.38, 5.3, 3.9)
pt3dadd(233.5, 44.91, 5.3, 3.9)
pt3dadd(233.36, 44.59, 5.3, 3.9)
pt3dadd(233.23, 44.12, 5.3, 3.9)
pt3dadd(233.09, 43.64, 5.3, 3.9)
pt3dadd(232.95, 43.17, 5.3, 3.9)
pt3dadd(232.95, 42.69, 5.3, 3.9)
pt3dadd(232.81, 42.22, 5.3, 3.9)
pt3dadd(232.67, 41.74, 5.3, 3.9)
pt3dadd(232.53, 41.27, 5.3, 3.9)
pt3dadd(232.39, 40.79, 5.3, 3.9)
pt3dadd(232.25, 40.47, 5.3, 3.9)
pt3dadd(232.11, 39.84, 5.3, 3.9)
pt3dadd(231.97, 39.37, 5.3, 3.9)
pt3dadd(231.83, 39.05, 5.3, 3.9)
pt3dadd(231.69, 38.26, 5.3, 3.9)
pt3dadd(231.55, 37.78, 5.3, 3.9)
pt3dadd(231.27, 37.31, 5.3, 3.9)
pt3dadd(231.14, 36.83, 5.3, 3.9)
pt3dadd(231, 36.2, 5.3, 3.9)
pt3dadd(231, 35.88, 5.3, 3.9)
pt3dadd(230.86, 35.09, 5.3, 3.9)
pt3dadd(230.72, 34.78, 5.3, 3.9)
pt3dadd(230.44, 34.14, 5.3, 3.9)
pt3dadd(230.3, 33.67, 5.3, 3.9)
pt3dadd(230.16, 33.04, 5.3, 3.9)
pt3dadd(230.02, 32.56, 5.3, 3.9)
pt3dadd(229.88, 32.09, 5.3, 3.9)
pt3dadd(229.74, 31.77, 5.3, 3.9)
pt3dadd(229.6, 31.29, 5.3, 3.9)
pt3dadd(229.46, 30.82, 5.3, 3.9)
pt3dadd(229.32, 30.5, 5.3, 3.9)
pt3dadd(229.18, 30.03, 5.3, 3.9)
pt3dadd(229.04, 29.71, 5.3, 3.9)
pt3dadd(228.77, 29.08, 5.3, 3.9)
pt3dadd(228.63, 28.76, 5.3, 3.9)
pt3dadd(228.49, 28.29, 5.3, 3.9)
}
}
proc shape3d_128() {
dend[86] { pt3dadd(228.35, 27.81, 5.3, 3.9)
pt3dadd(228.07, 27.5, 5.3, 3.9)
pt3dadd(227.93, 27.02, 5.3, 3.9)
pt3dadd(227.79, 26.55, 5.3, 3.9)
pt3dadd(227.65, 26.23, 5.3, 3.9)
pt3dadd(227.37, 25.91, 5.3, 3.9)
pt3dadd(227.23, 25.6, 5.3, 3.9)
pt3dadd(227.09, 25.28, 5.3, 3.9)
pt3dadd(226.82, 24.96, 5.3, 3.9)
pt3dadd(226.68, 24.65, 5.3, 3.9)
pt3dadd(226.54, 24.17, 5.3, 3.9)
pt3dadd(226.4, 23.86, 5.3, 3.9)
pt3dadd(226.26, 23.54, 5.3, 3.9)
pt3dadd(225.98, 23.06, 5.3, 3.9)
pt3dadd(225.84, 22.75, 5.3, 3.9)
pt3dadd(225.56, 22.43, 5.3, 3.9)
pt3dadd(225.42, 22.11, 5.3, 3.9)
pt3dadd(225.14, 21.64, 5.3, 3.9)
pt3dadd(225, 21.32, 5.3, 3.9)
pt3dadd(224.86, 21.01, 5.3, 3.9)
pt3dadd(224.72, 20.69, 5.3, 3.9)
pt3dadd(224.86, 21.01, 5.3, 3.9)
pt3dadd(224.86, 21.16, 5.3, 3.9)
pt3dadd(225.56, 21.01, 7.3, 3.9)
pt3dadd(225.42, 20.69, 7.3, 3.9)
pt3dadd(225.14, 20.37, 7.3, 3.9)
pt3dadd(225, 19.9, 7.3, 3.9)
pt3dadd(224.86, 19.58, 7.3, 3.9)
pt3dadd(224.59, 19.27, 7.3, 3.9)
pt3dadd(224.45, 18.95, 7.3, 3.9)
pt3dadd(224.31, 18.63, 7.3, 3.9)
pt3dadd(223.89, 17.84, 7.3, 3.9)
pt3dadd(223.75, 17.37, 7.3, 3.9)
pt3dadd(223.61, 17.05, 7.3, 3.9)
pt3dadd(223.47, 16.57, 7.3, 3.9)
pt3dadd(223.19, 16.1, 7.3, 3.9)
pt3dadd(223.05, 15.63, 7.3, 3.9)
pt3dadd(222.91, 15.31, 7.3, 3.9)
pt3dadd(222.77, 14.83, 7.3, 3.9)
pt3dadd(222.63, 14.52, 7.3, 3.9)
pt3dadd(222.36, 13.88, 7.3, 3.9)
pt3dadd(222.22, 13.57, 7.3, 3.9)
pt3dadd(222.08, 13.09, 7.3, 3.9)
pt3dadd(221.94, 12.62, 7.3, 3.9)
pt3dadd(221.8, 12.3, 7.3, 3.9)
pt3dadd(221.52, 11.98, 7.3, 3.9)
pt3dadd(221.38, 11.51, 7.3, 3.9)
pt3dadd(221.24, 11.19, 7.3, 3.9)
pt3dadd(221.1, 10.72, 7.3, 3.9)
pt3dadd(220.96, 10.24, 7.3, 3.9)
pt3dadd(220.68, 9.93, 7.3, 3.9)
pt3dadd(220.68, 9.45, 7.3, 3.9)
pt3dadd(220.4, 9.14, 7.3, 3.9)
pt3dadd(220.27, 8.82, 7.3, 3.9)
pt3dadd(220.13, 8.34, 7.3, 3.9)
pt3dadd(219.99, 7.87, 7.3, 3.9)
pt3dadd(219.85, 7.55, 7.3, 3.9)
pt3dadd(219.71, 7.08, 7.3, 3.9)
pt3dadd(219.57, 6.76, 7.3, 3.9)
pt3dadd(219.29, 6.29, 7.3, 3.9)
pt3dadd(219.15, 5.81, 7.3, 3.9)
pt3dadd(218.87, 5.34, 7.3, 3.9)
pt3dadd(218.73, 4.86, 7.3, 3.9)
pt3dadd(218.45, 4.55, 7.3, 3.9)
pt3dadd(218.45, 4.23, 7.3, 3.9)
pt3dadd(218.18, 3.75, 7.3, 3.9)
pt3dadd(218.04, 3.28, 7.3, 3.9)
pt3dadd(217.76, 2.8, 7.3, 3.9)
pt3dadd(217.62, 2.65, 7.3, 3.9)
pt3dadd(217.48, 2.17, 7.3, 3.9)
pt3dadd(217.34, 1.85, 7.3, 3.9)
pt3dadd(217.06, 1.54, 7.3, 3.9)
pt3dadd(216.92, 1.22, 7.3, 3.9)
pt3dadd(216.78, 0.75, 7.3, 3.9)
pt3dadd(216.64, 0.43, 7.3, 3.9)
pt3dadd(216.36, 0.11, 7.3, 3.9)
pt3dadd(216.36, -0.2, 7.3, 3.9)
pt3dadd(216.22, -0.52, 7.3, 3.9)
pt3dadd(215.95, -0.99, 7.3, 3.9)
pt3dadd(215.81, -1.31, 7.3, 3.9)
pt3dadd(215.67, -1.63, 7.3, 3.9)
pt3dadd(215.53, -1.79, 7.3, 3.9)
pt3dadd(215.39, -1.94, 7.3, 3.9)
pt3dadd(216.08, -1.63, 11.3, 3.9)
pt3dadd(216.08, -2.42, 11.3, 3.9)
pt3dadd(215.95, -2.58, 11.3, 3.9)
pt3dadd(215.95, -3.21, 11.3, 3.9)
pt3dadd(215.81, -3.37, 11.3, 3.9)
pt3dadd(215.67, -3.53, 11.3, 3.9)
pt3dadd(215.67, -4.16, 11.3, 3.9)
pt3dadd(215.53, -4.32, 11.3, 3.9)
pt3dadd(215.39, -4.48, 11.3, 3.9)
pt3dadd(215.39, -4.95, 11.3, 3.9)
pt3dadd(215.25, -5.11, 11.3, 3.9)
pt3dadd(215.25, -5.43, 11.3, 3.9)
pt3dadd(215.11, -5.58, 11.3, 3.9)
}
dend[87] {pt3dclear()
pt3dadd(252.73, 236.74, -5.7, 8.64)
pt3dadd(252.18, 236.42, -5.7, 8.64)
pt3dadd(251.9, 236.74, -5.7, 8.64)
pt3dadd(251.34, 236.74, -5.7, 8.64)
pt3dadd(251.06, 237.06, -5.7, 8.64)
pt3dadd(250.51, 237.37, -5.7, 8.64)
pt3dadd(250.23, 237.69, -5.7, 8.64)
pt3dadd(249.95, 238.01, -5.7, 8.64)
pt3dadd(249.39, 238.32, -5.7, 8.64)
pt3dadd(249.11, 238.64, -5.7, 8.64)
pt3dadd(248.83, 238.96, -5.7, 8.64)
pt3dadd(248.28, 238.96, -5.7, 8.64)
pt3dadd(248, 239.27, -5.7, 8.64)
pt3dadd(247.72, 239.59, -5.7, 8.64)
pt3dadd(247.16, 239.59, -5.7, 8.64)
pt3dadd(246.88, 239.9, -5.7, 8.64)
pt3dadd(246.32, 240.22, -5.7, 8.64)
pt3dadd(244.93, 240.22, -5.7, 8.64)
pt3dadd(244.37, 240.54, -5.7, 8.64)
pt3dadd(224.31, 240.54, -5.7, 8.64)
pt3dadd(223.75, 240.22, -5.7, 8.64)
pt3dadd(223.19, 240.22, -5.7, 8.64)
pt3dadd(222.91, 239.9, -5.7, 8.64)
pt3dadd(220.68, 238.96, -5.7, 8.64)
}
dend[88] {pt3dclear()
pt3dadd(220.68, 238.96, -5.7, 4.46)
pt3dadd(220.96, 235.47, 6.3, 4.46)
pt3dadd(221.24, 235.16, 6.3, 4.46)
pt3dadd(221.52, 234.84, 6.3, 4.46)
pt3dadd(221.52, 227.88, 6.3, 4.46)
pt3dadd(221.24, 227.56, 6.3, 4.46)
pt3dadd(221.24, 226.93, 6.3, 4.46)
pt3dadd(220.96, 226.93, 6.3, 4.46)
pt3dadd(221.52, 226.29, 13.3, 3.9)
pt3dadd(221.52, 210.15, 13.3, 3.9)
pt3dadd(221.24, 209.83, 13.3, 3.9)
pt3dadd(221.24, 208.88, 13.3, 3.9)
pt3dadd(221.1, 208.88, 15.3, 3.9)
pt3dadd(215.53, 203.34, 15.3, 3.9)
pt3dadd(216.5, 203.66, 15.3, 3.9)
pt3dadd(216.09, 203.66, 15.3, 3.9)
pt3dadd(215.95, 203.5, 15.3, 3.9)
pt3dadd(215.67, 203.34, 15.3, 3.9)
pt3dadd(215.53, 203.18, 15.3, 3.9)
pt3dadd(215.39, 203.03, 15.3, 3.9)
pt3dadd(215.25, 202.87, 15.3, 3.9)
pt3dadd(214.97, 202.55, 15.3, 3.9)
pt3dadd(214.83, 202.39, 15.3, 3.9)
pt3dadd(214.69, 202.23, 15.3, 3.9)
pt3dadd(214.55, 201.92, 15.3, 3.9)
pt3dadd(214.41, 201.76, 15.3, 3.9)
pt3dadd(214.41, 201.44, 15.3, 3.9)
pt3dadd(214.27, 201.29, 15.3, 3.9)
pt3dadd(214.13, 201.13, 15.3, 3.9)
pt3dadd(213.99, 200.97, 15.3, 3.9)
pt3dadd(213.72, 200.65, 15.3, 3.9)
pt3dadd(213.58, 200.34, 15.3, 3.9)
pt3dadd(213.44, 200.02, 15.3, 3.9)
pt3dadd(213.16, 199.7, 15.3, 3.9)
pt3dadd(213.02, 199.54, 15.3, 3.9)
pt3dadd(212.88, 199.23, 15.3, 3.9)
pt3dadd(212.74, 199.07, 15.3, 3.9)
pt3dadd(212.46, 198.75, 15.3, 3.9)
pt3dadd(212.32, 198.44, 15.3, 3.9)
pt3dadd(212.04, 197.96, 15.3, 3.9)
pt3dadd(211.9, 197.8, 15.3, 3.9)
pt3dadd(211.63, 197.64, 15.3, 3.9)
pt3dadd(211.35, 197.33, 15.3, 3.9)
pt3dadd(211.21, 197.17, 15.3, 3.9)
pt3dadd(211.07, 197.01, 15.3, 3.9)
pt3dadd(210.93, 196.85, 15.3, 3.9)
pt3dadd(210.93, 197.01, 15.3, 3.9)
pt3dadd(211.49, 196.85, 18.3, 3.9)
pt3dadd(211.21, 196.7, 18.3, 3.9)
pt3dadd(211.07, 196.54, 18.3, 3.9)
pt3dadd(210.93, 196.38, 18.3, 3.9)
pt3dadd(210.79, 196.22, 18.3, 3.9)
pt3dadd(210.79, 195.9, 18.3, 3.9)
pt3dadd(210.51, 195.9, 18.3, 3.9)
pt3dadd(210.51, 195.59, 18.3, 3.9)
pt3dadd(210.37, 195.43, 18.3, 3.9)
pt3dadd(210.23, 195.27, 18.3, 3.9)
pt3dadd(210.09, 195.11, 18.3, 3.9)
pt3dadd(210.09, 193.69, 18.3, 3.9)
pt3dadd(209.95, 193.37, 18.3, 3.9)
pt3dadd(209.95, 184.35, 18.3, 3.9)
pt3dadd(210.09, 184.19, 18.3, 3.9)
pt3dadd(210.23, 184.03, 20.3, 3.9)
pt3dadd(210.23, 179.28, 20.3, 3.9)
pt3dadd(210.09, 179.13, 20.3, 3.9)
pt3dadd(209.81, 178.65, 20.3, 3.9)
pt3dadd(209.67, 178.49, 20.3, 3.9)
pt3dadd(209.54, 178.33, 20.3, 3.9)
pt3dadd(209.4, 178.02, 20.3, 3.9)
pt3dadd(209.12, 177.86, 20.3, 3.9)
pt3dadd(208.98, 177.54, 20.3, 3.9)
pt3dadd(208.84, 177.39, 20.3, 3.9)
pt3dadd(208.7, 177.23, 20.3, 3.9)
pt3dadd(208.42, 177.07, 20.3, 3.9)
pt3dadd(208.14, 176.75, 20.3, 3.9)
pt3dadd(208, 176.59, 20.3, 3.9)
pt3dadd(207.58, 176.12, 20.3, 3.9)
pt3dadd(207.45, 175.96, 20.3, 3.9)
pt3dadd(206.89, 175.33, 20.3, 3.9)
pt3dadd(206.47, 175.33, 20.3, 3.9)
}
}
proc shape3d_129() {
dend[88] { pt3dadd(206.33, 175.17, 20.3, 3.9)
pt3dadd(206.19, 175.01, 20.3, 3.9)
pt3dadd(206.05, 174.85, 20.3, 3.9)
pt3dadd(205.91, 174.69, 20.3, 3.9)
pt3dadd(205.63, 174.69, 20.3, 3.9)
pt3dadd(205.49, 174.54, 20.3, 3.9)
pt3dadd(205.35, 174.38, 20.3, 3.9)
pt3dadd(205.22, 174.22, 20.3, 3.9)
pt3dadd(205.08, 173.9, 20.3, 3.9)
pt3dadd(204.52, 173.74, 20.3, 3.9)
pt3dadd(204.24, 173.59, 20.3, 3.9)
pt3dadd(203.96, 173.27, 20.3, 3.9)
pt3dadd(203.68, 173.11, 20.3, 3.9)
pt3dadd(203.4, 172.8, 20.3, 3.9)
pt3dadd(203.13, 172.8, 20.3, 3.9)
pt3dadd(202.99, 172.64, 20.3, 3.9)
pt3dadd(202.71, 172.48, 20.3, 3.9)
pt3dadd(202.29, 172.32, 20.3, 3.9)
pt3dadd(202.15, 172.16, 20.3, 3.9)
pt3dadd(201.87, 172, 20.3, 3.9)
pt3dadd(201.59, 172, 20.3, 3.9)
pt3dadd(201.45, 171.85, 20.3, 3.9)
pt3dadd(201.03, 171.85, 20.3, 3.9)
pt3dadd(200.62, 171.69, 20.3, 3.9)
pt3dadd(197.27, 171.69, 20.3, 3.9)
pt3dadd(196.85, 171.53, 20.3, 3.9)
pt3dadd(190.72, 171.53, 20.3, 3.9)
pt3dadd(190.86, 171.69, 20.3, 3.9)
pt3dadd(190.86, 172, 20.3, 3.9)
pt3dadd(190.44, 171.37, 22.3, 3.9)
pt3dadd(190.17, 171.21, 22.3, 3.9)
pt3dadd(189.89, 171.05, 22.3, 3.9)
pt3dadd(189.75, 170.9, 22.3, 3.9)
pt3dadd(189.47, 170.74, 22.3, 3.9)
pt3dadd(189.05, 170.26, 22.3, 3.9)
pt3dadd(188.91, 170.1, 22.3, 3.9)
pt3dadd(188.63, 170.1, 22.3, 3.9)
pt3dadd(188.35, 169.95, 22.3, 3.9)
pt3dadd(188.21, 169.79, 22.3, 3.9)
pt3dadd(187.8, 169.63, 22.3, 3.9)
pt3dadd(187.52, 169.63, 22.3, 3.9)
pt3dadd(187.38, 169.47, 22.3, 3.9)
pt3dadd(187.1, 169.47, 22.3, 3.9)
pt3dadd(186.82, 169.31, 22.3, 3.9)
pt3dadd(186.68, 169.15, 22.3, 3.9)
pt3dadd(186.26, 169.15, 22.3, 3.9)
pt3dadd(185.98, 169, 22.3, 3.9)
pt3dadd(185.57, 168.84, 22.3, 3.9)
pt3dadd(185.29, 168.68, 22.3, 3.9)
pt3dadd(185.01, 168.52, 22.3, 3.9)
pt3dadd(184.45, 168.52, 22.3, 3.9)
pt3dadd(184.03, 168.21, 22.3, 3.9)
pt3dadd(183.62, 168.21, 22.3, 3.9)
pt3dadd(183.2, 168.05, 22.3, 3.9)
pt3dadd(182.92, 167.73, 22.3, 3.9)
pt3dadd(182.64, 167.73, 22.3, 3.9)
pt3dadd(182.36, 167.57, 22.3, 3.9)
pt3dadd(182.08, 167.41, 22.3, 3.9)
pt3dadd(181.8, 167.1, 22.3, 3.9)
pt3dadd(181.25, 167.1, 22.3, 3.9)
pt3dadd(180.83, 166.94, 22.3, 3.9)
pt3dadd(180.55, 166.62, 22.3, 3.9)
pt3dadd(180.27, 166.62, 22.3, 3.9)
pt3dadd(179.85, 166.46, 22.3, 3.9)
pt3dadd(179.44, 166.31, 22.3, 3.9)
pt3dadd(178.88, 166.31, 22.3, 3.9)
pt3dadd(178.74, 166.15, 22.3, 3.9)
pt3dadd(178.6, 165.99, 22.3, 3.9)
pt3dadd(178.18, 165.83, 22.3, 3.9)
pt3dadd(177.9, 165.67, 22.3, 3.9)
pt3dadd(177.62, 165.67, 22.3, 3.9)
pt3dadd(177.21, 165.51, 22.3, 3.9)
pt3dadd(176.93, 165.36, 22.3, 3.9)
pt3dadd(176.65, 165.2, 22.3, 3.9)
pt3dadd(176.23, 164.88, 22.3, 3.9)
pt3dadd(176.09, 164.72, 22.3, 3.9)
pt3dadd(175.81, 164.56, 22.3, 3.9)
pt3dadd(175.53, 164.41, 22.3, 3.9)
pt3dadd(175.12, 164.41, 22.3, 3.9)
pt3dadd(174.84, 164.25, 22.3, 3.9)
pt3dadd(174.56, 163.93, 22.3, 3.9)
pt3dadd(174.14, 163.77, 22.3, 3.9)
pt3dadd(173.72, 163.61, 22.3, 3.9)
pt3dadd(173.44, 163.3, 22.3, 3.9)
pt3dadd(173.16, 163.3, 22.3, 3.9)
pt3dadd(172.89, 163.14, 22.3, 3.9)
pt3dadd(172.47, 162.82, 22.3, 3.9)
pt3dadd(171.91, 162.82, 22.3, 3.9)
pt3dadd(171.63, 162.67, 22.3, 3.9)
pt3dadd(171.35, 162.35, 22.3, 3.9)
pt3dadd(171.07, 162.35, 22.3, 3.9)
pt3dadd(170.8, 162.19, 22.3, 3.9)
pt3dadd(170.52, 161.87, 22.3, 3.9)
pt3dadd(170.24, 161.72, 22.3, 3.9)
pt3dadd(169.82, 161.72, 22.3, 3.9)
pt3dadd(169.54, 161.56, 22.3, 3.9)
pt3dadd(168.43, 161.56, 22.3, 3.9)
pt3dadd(168.43, 162.19, 22.3, 3.9)
pt3dadd(168.43, 161.4, 26.3, 3.76)
pt3dadd(168.15, 161.4, 26.3, 3.76)
pt3dadd(167.87, 161.24, 26.3, 3.76)
pt3dadd(167.59, 161.24, 26.3, 3.76)
pt3dadd(167.31, 161.08, 26.3, 3.76)
pt3dadd(166.75, 161.08, 26.3, 3.76)
pt3dadd(166.61, 160.92, 26.3, 3.76)
pt3dadd(165.92, 160.92, 26.3, 3.76)
pt3dadd(165.64, 160.77, 26.3, 3.76)
pt3dadd(165.36, 160.61, 26.3, 3.76)
pt3dadd(165.22, 160.45, 26.3, 3.76)
pt3dadd(165.08, 160.29, 26.3, 3.76)
pt3dadd(164.8, 160.13, 26.3, 3.76)
pt3dadd(164.52, 159.82, 26.3, 3.76)
pt3dadd(164.38, 159.66, 26.3, 3.76)
pt3dadd(164.25, 159.34, 26.3, 3.76)
pt3dadd(164.11, 159.02, 26.3, 3.76)
pt3dadd(163.55, 158.39, 26.3, 3.76)
pt3dadd(163.55, 158.08, 26.3, 3.76)
pt3dadd(163.41, 157.76, 26.3, 3.76)
pt3dadd(163.13, 157.6, 26.3, 3.76)
pt3dadd(162.85, 157.13, 26.3, 3.76)
pt3dadd(162.57, 156.81, 26.3, 3.76)
pt3dadd(162.29, 156.18, 26.3, 3.76)
pt3dadd(162.16, 155.86, 26.3, 3.76)
pt3dadd(161.88, 155.7, 26.3, 3.76)
pt3dadd(161.74, 155.38, 26.3, 3.76)
pt3dadd(161.6, 154.91, 26.3, 3.76)
pt3dadd(161.46, 154.59, 26.3, 3.76)
pt3dadd(161.32, 154.28, 26.3, 3.76)
pt3dadd(161.18, 153.8, 26.3, 3.76)
pt3dadd(161.04, 153.49, 26.3, 3.76)
pt3dadd(160.76, 153.17, 26.3, 3.76)
pt3dadd(160.76, 152.85, 26.3, 3.76)
pt3dadd(160.62, 152.54, 26.3, 3.76)
pt3dadd(160.34, 152.22, 26.3, 3.76)
pt3dadd(160.34, 151.9, 26.3, 3.76)
pt3dadd(160.2, 151.43, 26.3, 3.76)
pt3dadd(160.06, 151.11, 26.3, 3.76)
pt3dadd(159.93, 150.79, 26.3, 3.76)
pt3dadd(159.79, 150.32, 26.3, 3.76)
pt3dadd(159.65, 150.16, 26.3, 3.76)
pt3dadd(159.51, 149.84, 26.3, 3.76)
pt3dadd(159.37, 149.53, 26.3, 3.76)
pt3dadd(159.37, 149.21, 26.3, 3.76)
pt3dadd(159.23, 148.9, 26.3, 3.76)
pt3dadd(159.09, 148.74, 26.3, 3.76)
pt3dadd(158.95, 148.58, 26.3, 3.76)
pt3dadd(158.81, 148.26, 26.3, 3.76)
pt3dadd(158.67, 147.79, 26.3, 3.76)
pt3dadd(158.53, 147.47, 26.3, 3.76)
pt3dadd(158.39, 147.15, 26.3, 3.76)
pt3dadd(158.25, 146.84, 26.3, 3.76)
pt3dadd(158.25, 146.36, 26.3, 3.76)
pt3dadd(158.11, 146.05, 26.3, 3.76)
pt3dadd(157.97, 145.89, 26.3, 3.76)
pt3dadd(157.97, 145.57, 26.3, 3.76)
pt3dadd(157.84, 145.41, 26.3, 3.76)
pt3dadd(157.7, 145.1, 26.3, 3.76)
pt3dadd(157.56, 144.78, 26.3, 3.76)
pt3dadd(157.56, 144.46, 26.3, 3.76)
pt3dadd(157.42, 144.15, 26.3, 3.76)
pt3dadd(157.28, 143.83, 26.3, 3.76)
pt3dadd(157.14, 143.67, 26.3, 3.76)
pt3dadd(157, 143.36, 26.3, 3.76)
pt3dadd(156.86, 142.88, 26.3, 3.76)
pt3dadd(156.58, 142.41, 26.3, 3.76)
pt3dadd(156.44, 142.09, 26.3, 3.76)
pt3dadd(156.44, 141.77, 26.3, 3.76)
pt3dadd(156.3, 141.61, 26.3, 3.76)
pt3dadd(156.16, 141.46, 26.3, 3.76)
pt3dadd(156.16, 141.14, 26.3, 3.76)
pt3dadd(156.02, 140.98, 26.3, 3.76)
pt3dadd(155.88, 140.66, 26.3, 3.76)
pt3dadd(155.88, 140.35, 26.3, 3.76)
pt3dadd(155.74, 140.03, 26.3, 3.76)
pt3dadd(155.61, 139.56, 26.3, 3.76)
pt3dadd(155.47, 139.08, 26.3, 3.76)
pt3dadd(155.47, 138.29, 26.3, 3.76)
pt3dadd(155.33, 138.13, 26.3, 3.76)
pt3dadd(155.33, 137.66, 26.3, 3.76)
pt3dadd(155.19, 137.5, 26.3, 3.76)
pt3dadd(155.05, 137.02, 26.3, 3.76)
pt3dadd(155.05, 136.71, 26.3, 3.76)
pt3dadd(154.91, 136.39, 26.3, 3.76)
pt3dadd(154.77, 136.23, 26.3, 3.76)
pt3dadd(154.77, 136.87, 26.3, 3.76)
pt3dadd(154.91, 136.39, 27.3, 3.76)
pt3dadd(154.77, 136.23, 27.3, 3.76)
pt3dadd(154.63, 136.07, 27.3, 3.76)
pt3dadd(154.49, 135.92, 27.3, 3.76)
pt3dadd(154.21, 135.44, 27.3, 3.76)
pt3dadd(154.07, 135.12, 27.3, 3.76)
pt3dadd(153.93, 134.97, 27.3, 3.76)
pt3dadd(153.79, 134.65, 27.3, 3.76)
pt3dadd(153.65, 134.33, 27.3, 3.76)
pt3dadd(153.52, 134.02, 27.3, 3.76)
pt3dadd(153.38, 133.86, 27.3, 3.76)
pt3dadd(152.96, 133.38, 27.3, 3.76)
pt3dadd(152.82, 133.07, 27.3, 3.76)
pt3dadd(152.4, 132.59, 27.3, 3.76)
pt3dadd(152.26, 132.43, 27.3, 3.76)
}
}
proc shape3d_130() {
dend[88] { pt3dadd(152.12, 132.12, 27.3, 3.76)
pt3dadd(151.98, 131.96, 27.3, 3.76)
pt3dadd(151.84, 131.64, 27.3, 3.76)
pt3dadd(151.56, 131.33, 27.3, 3.76)
pt3dadd(151.29, 130.85, 27.3, 3.76)
pt3dadd(150.87, 130.06, 27.3, 3.76)
pt3dadd(150.59, 129.74, 27.3, 3.76)
pt3dadd(150.45, 129.43, 27.3, 3.76)
pt3dadd(150.31, 129.27, 27.3, 3.76)
pt3dadd(150.17, 129.11, 27.3, 3.76)
pt3dadd(149.75, 128.79, 27.3, 3.76)
pt3dadd(149.61, 128.48, 27.3, 3.76)
pt3dadd(148.78, 127.53, 27.3, 3.76)
pt3dadd(148.64, 127.21, 27.3, 3.76)
pt3dadd(148.5, 126.89, 27.3, 3.76)
pt3dadd(148.22, 126.42, 27.3, 3.76)
pt3dadd(147.94, 125.94, 27.3, 3.76)
pt3dadd(147.66, 125.63, 27.3, 3.76)
pt3dadd(147.38, 125.31, 27.3, 3.76)
pt3dadd(147.24, 124.84, 27.3, 3.76)
pt3dadd(146.97, 124.36, 27.3, 3.76)
pt3dadd(146.69, 123.89, 27.3, 3.76)
pt3dadd(146.55, 123.57, 27.3, 3.76)
pt3dadd(146.27, 123.1, 27.3, 3.76)
pt3dadd(146.13, 122.78, 27.3, 3.76)
pt3dadd(145.99, 122.3, 27.3, 3.76)
pt3dadd(145.85, 122.15, 27.3, 3.76)
pt3dadd(145.57, 121.51, 27.3, 3.76)
pt3dadd(145.57, 121.2, 27.3, 3.76)
pt3dadd(145.29, 120.72, 27.3, 3.76)
pt3dadd(145.29, 120.41, 27.3, 3.76)
pt3dadd(145.15, 120.25, 27.3, 3.76)
pt3dadd(145.01, 119.93, 27.3, 3.76)
pt3dadd(144.88, 119.77, 27.3, 3.76)
pt3dadd(144.74, 119.93, 27.3, 3.76)
pt3dadd(144.88, 120.09, 27.3, 3.76)
pt3dadd(144.88, 120.25, 27.3, 3.76)
pt3dadd(144.88, 119.77, 32.3, 3.62)
pt3dadd(144.32, 119.14, 32.3, 3.62)
pt3dadd(144.18, 118.82, 32.3, 3.62)
pt3dadd(144.04, 118.35, 32.3, 3.62)
pt3dadd(143.76, 118.03, 32.3, 3.62)
pt3dadd(143.48, 117.4, 32.3, 3.62)
pt3dadd(143.2, 117.08, 32.3, 3.62)
pt3dadd(142.92, 116.76, 32.3, 3.62)
pt3dadd(142.65, 116.45, 32.3, 3.62)
pt3dadd(142.51, 115.97, 32.3, 3.62)
pt3dadd(142.37, 115.82, 32.3, 3.62)
pt3dadd(142.23, 115.5, 32.3, 3.62)
pt3dadd(141.95, 115.34, 32.3, 3.62)
pt3dadd(141.81, 115.18, 32.3, 3.62)
pt3dadd(141.53, 115.18, 32.3, 3.62)
pt3dadd(141.39, 114.87, 32.3, 3.62)
pt3dadd(141.11, 114.71, 32.3, 3.62)
pt3dadd(140.83, 114.55, 32.3, 3.62)
pt3dadd(140.56, 114.23, 32.3, 3.62)
pt3dadd(140.28, 114.23, 32.3, 3.62)
pt3dadd(139.86, 113.76, 32.3, 3.62)
pt3dadd(139.72, 113.44, 32.3, 3.62)
pt3dadd(139.3, 113.28, 32.3, 3.62)
pt3dadd(139.02, 112.97, 32.3, 3.62)
pt3dadd(138.6, 112.81, 32.3, 3.62)
pt3dadd(138.47, 112.65, 32.3, 3.62)
pt3dadd(138.19, 112.49, 32.3, 3.62)
pt3dadd(138.05, 112.17, 32.3, 3.62)
pt3dadd(137.77, 111.86, 32.3, 3.62)
pt3dadd(137.49, 111.7, 32.3, 3.62)
pt3dadd(137.21, 111.38, 32.3, 3.62)
pt3dadd(136.93, 111.22, 32.3, 3.62)
pt3dadd(136.65, 111.07, 32.3, 3.62)
pt3dadd(136.37, 110.75, 32.3, 3.62)
pt3dadd(136.1, 110.43, 32.3, 3.62)
pt3dadd(135.4, 109.96, 32.3, 3.62)
pt3dadd(135.26, 109.8, 32.3, 3.62)
pt3dadd(135.12, 109.48, 32.3, 3.62)
pt3dadd(134.84, 109.33, 32.3, 3.62)
pt3dadd(134.56, 109.01, 32.3, 3.62)
pt3dadd(134.42, 108.85, 32.3, 3.62)
pt3dadd(134.01, 108.53, 32.3, 3.62)
pt3dadd(133.73, 108.38, 32.3, 3.62)
pt3dadd(133.45, 108.22, 32.3, 3.62)
pt3dadd(133.17, 107.9, 32.3, 3.62)
pt3dadd(132.89, 107.58, 32.3, 3.62)
pt3dadd(132.47, 107.43, 32.3, 3.62)
pt3dadd(132.19, 107.11, 32.3, 3.62)
pt3dadd(131.92, 106.79, 32.3, 3.62)
pt3dadd(131.64, 106.79, 32.3, 3.62)
pt3dadd(131.22, 106.32, 32.3, 3.62)
pt3dadd(130.94, 106.16, 32.3, 3.62)
pt3dadd(130.66, 106, 32.3, 3.62)
pt3dadd(130.1, 105.69, 32.3, 3.62)
pt3dadd(129.69, 105.21, 32.3, 3.62)
pt3dadd(129.27, 105.05, 32.3, 3.62)
pt3dadd(129.13, 104.74, 32.3, 3.62)
pt3dadd(128.85, 104.58, 32.3, 3.62)
pt3dadd(128.43, 104.42, 32.3, 3.62)
pt3dadd(128.01, 104.26, 32.3, 3.62)
pt3dadd(126.62, 104.26, 32.3, 3.62)
pt3dadd(126.62, 104.74, 32.3, 3.62)
pt3dadd(127.04, 103.79, 36.3, 3.62)
pt3dadd(125.64, 103.79, 36.3, 3.62)
pt3dadd(125.37, 103.63, 36.3, 3.62)
pt3dadd(125.09, 103.47, 36.3, 3.62)
pt3dadd(124.81, 103.31, 36.3, 3.62)
pt3dadd(124.25, 102.68, 36.3, 3.62)
pt3dadd(123.97, 102.36, 36.3, 3.62)
pt3dadd(123.55, 102.2, 36.3, 3.62)
pt3dadd(123.42, 101.89, 36.3, 3.62)
pt3dadd(123.14, 101.73, 36.3, 3.62)
pt3dadd(123, 101.41, 36.3, 3.62)
pt3dadd(122.72, 101.25, 36.3, 3.62)
pt3dadd(122.58, 100.94, 36.3, 3.62)
pt3dadd(122.3, 100.78, 36.3, 3.62)
pt3dadd(122.16, 100.62, 36.3, 3.62)
pt3dadd(121.88, 100.3, 36.3, 3.62)
pt3dadd(121.46, 99.83, 36.3, 3.62)
pt3dadd(121.19, 99.67, 36.3, 3.62)
pt3dadd(120.77, 99.2, 36.3, 3.62)
pt3dadd(120.35, 98.88, 36.3, 3.62)
pt3dadd(119.65, 98.09, 36.3, 3.62)
pt3dadd(119.23, 97.77, 36.3, 3.62)
pt3dadd(118.96, 97.61, 36.3, 3.62)
pt3dadd(118.68, 97.45, 36.3, 3.62)
pt3dadd(118.4, 97.14, 36.3, 3.62)
pt3dadd(118.12, 96.98, 36.3, 3.62)
pt3dadd(117.84, 96.66, 36.3, 3.62)
pt3dadd(117.56, 96.35, 36.3, 3.62)
pt3dadd(117.14, 96.03, 36.3, 3.62)
pt3dadd(116.73, 95.71, 36.3, 3.62)
pt3dadd(116.17, 95.08, 36.3, 3.62)
pt3dadd(115.75, 94.76, 36.3, 3.62)
pt3dadd(115.33, 94.29, 36.3, 3.62)
pt3dadd(114.91, 93.97, 36.3, 3.62)
pt3dadd(114.64, 93.66, 36.3, 3.62)
pt3dadd(113.94, 92.86, 36.3, 3.62)
pt3dadd(113.52, 92.39, 36.3, 3.62)
pt3dadd(112.96, 91.92, 36.3, 3.62)
pt3dadd(111.99, 90.81, 36.3, 3.62)
pt3dadd(111.85, 90.65, 36.3, 3.62)
pt3dadd(111.57, 90.33, 36.3, 3.62)
pt3dadd(111.29, 90.17, 36.3, 3.62)
pt3dadd(110.73, 89.54, 36.3, 3.62)
pt3dadd(110.59, 89.22, 36.3, 3.62)
pt3dadd(110.46, 89.07, 36.3, 3.62)
pt3dadd(110.18, 88.75, 36.3, 3.62)
pt3dadd(110.04, 88.59, 36.3, 3.62)
pt3dadd(109.9, 88.43, 36.3, 3.62)
pt3dadd(109.76, 87.96, 36.3, 3.62)
pt3dadd(109.48, 87.8, 36.3, 3.62)
pt3dadd(109.2, 87.48, 36.3, 3.62)
pt3dadd(108.92, 87.32, 36.3, 3.62)
pt3dadd(108.78, 87.01, 36.3, 3.62)
pt3dadd(108.5, 86.85, 36.3, 3.62)
pt3dadd(108.36, 86.69, 36.3, 3.62)
pt3dadd(108.23, 86.38, 36.3, 3.62)
pt3dadd(107.95, 86.22, 36.3, 3.62)
pt3dadd(107.67, 86.06, 36.3, 3.62)
pt3dadd(107.53, 86.06, 36.3, 3.62)
pt3dadd(107.53, 86.53, 36.3, 3.62)
pt3dadd(107.67, 87.01, 36.3, 3.62)
pt3dadd(107.95, 87.01, 36.3, 3.62)
pt3dadd(107.81, 86.85, 37.3, 3.62)
pt3dadd(105.86, 86.85, 37.3, 3.62)
pt3dadd(105.58, 87.01, 37.3, 3.62)
pt3dadd(105.3, 87.17, 37.3, 3.62)
pt3dadd(105.16, 87.32, 37.3, 3.62)
pt3dadd(104.74, 87.48, 37.3, 3.62)
pt3dadd(104.46, 87.64, 37.3, 3.62)
pt3dadd(104.18, 87.8, 37.3, 3.62)
pt3dadd(103.91, 88.12, 37.3, 3.62)
pt3dadd(103.63, 88.27, 37.3, 3.62)
pt3dadd(103.21, 88.43, 37.3, 3.62)
pt3dadd(102.79, 88.75, 37.3, 3.62)
pt3dadd(102.51, 88.91, 37.3, 3.62)
pt3dadd(101.95, 89.22, 37.3, 3.62)
pt3dadd(101.54, 89.54, 37.3, 3.62)
pt3dadd(101.26, 89.7, 37.3, 3.62)
pt3dadd(100.84, 90.02, 37.3, 3.62)
pt3dadd(100.42, 90.49, 37.3, 3.62)
pt3dadd(100.28, 90.65, 37.3, 3.62)
pt3dadd(99.86, 90.17, 43.3, 3.62)
pt3dadd(99.59, 90.17, 43.3, 3.62)
pt3dadd(99.45, 90.02, 43.3, 3.62)
pt3dadd(98.33, 90.02, 43.3, 3.62)
pt3dadd(98.19, 89.86, 43.3, 3.62)
pt3dadd(98.05, 89.7, 43.3, 3.62)
pt3dadd(97.77, 89.7, 43.3, 3.62)
pt3dadd(97.63, 89.54, 43.3, 3.62)
pt3dadd(97.36, 89.38, 43.3, 3.62)
pt3dadd(97.08, 89.07, 43.3, 3.62)
pt3dadd(96.8, 88.91, 43.3, 3.62)
pt3dadd(96.66, 88.75, 43.3, 3.62)
pt3dadd(96.52, 88.59, 43.3, 3.62)
pt3dadd(96.24, 88.43, 43.3, 3.62)
pt3dadd(96.1, 88.27, 43.3, 3.62)
pt3dadd(95.96, 88.12, 43.3, 3.62)
pt3dadd(95.82, 87.96, 43.3, 3.62)
pt3dadd(95.68, 87.64, 43.3, 3.62)
pt3dadd(95.27, 87.17, 43.3, 3.62)
pt3dadd(95.13, 87.01, 43.3, 3.62)
}
}
proc shape3d_131() {
dend[88] { pt3dadd(94.99, 86.69, 43.3, 3.62)
pt3dadd(94.71, 86.38, 43.3, 3.62)
pt3dadd(94.57, 86.06, 43.3, 3.62)
pt3dadd(94.29, 85.58, 43.3, 3.62)
pt3dadd(94.01, 85.27, 43.3, 3.62)
pt3dadd(93.73, 85.11, 43.3, 3.62)
pt3dadd(93.45, 84.79, 43.3, 3.62)
pt3dadd(93.31, 84.48, 43.3, 3.62)
pt3dadd(93.04, 84.32, 43.3, 3.62)
pt3dadd(92.9, 84, 43.3, 3.62)
pt3dadd(92.62, 83.84, 43.3, 3.62)
pt3dadd(92.48, 83.37, 43.3, 3.62)
pt3dadd(92.2, 83.21, 43.3, 3.62)
pt3dadd(91.78, 82.42, 43.3, 3.62)
pt3dadd(91.5, 82.1, 43.3, 3.62)
pt3dadd(91.22, 81.79, 43.3, 3.62)
pt3dadd(91.08, 81.63, 43.3, 3.62)
pt3dadd(90.81, 81.31, 43.3, 3.62)
pt3dadd(90.53, 80.84, 43.3, 3.62)
pt3dadd(89.97, 80.2, 43.3, 3.62)
pt3dadd(89.69, 79.89, 43.3, 3.62)
pt3dadd(89.41, 79.57, 43.3, 3.62)
pt3dadd(89.27, 79.09, 43.3, 3.62)
pt3dadd(88.86, 78.78, 43.3, 3.62)
pt3dadd(88.58, 78.3, 43.3, 3.62)
pt3dadd(87.88, 77.51, 43.3, 3.62)
pt3dadd(87.46, 77.2, 43.3, 3.62)
pt3dadd(87.18, 76.72, 43.3, 3.62)
pt3dadd(86.9, 76.4, 43.3, 3.62)
pt3dadd(86.63, 76.09, 43.3, 3.62)
pt3dadd(86.35, 75.77, 43.3, 3.62)
pt3dadd(85.93, 75.45, 43.3, 3.62)
pt3dadd(85.65, 74.98, 43.3, 3.62)
pt3dadd(84.54, 73.71, 43.3, 3.62)
pt3dadd(84.26, 73.4, 43.3, 3.62)
pt3dadd(83.98, 73.08, 43.3, 3.62)
pt3dadd(83.56, 72.61, 43.3, 3.62)
pt3dadd(83.28, 72.29, 43.3, 3.62)
pt3dadd(83, 71.97, 43.3, 3.62)
pt3dadd(82.72, 71.66, 43.3, 3.62)
pt3dadd(82.58, 71.34, 43.3, 3.62)
pt3dadd(82.45, 71.02, 43.3, 3.62)
pt3dadd(82.17, 70.71, 43.3, 3.62)
pt3dadd(81.89, 70.55, 43.3, 3.62)
pt3dadd(81.75, 70.23, 43.3, 3.62)
pt3dadd(81.47, 69.91, 43.3, 3.62)
pt3dadd(81.33, 69.76, 43.3, 3.62)
pt3dadd(81.19, 69.44, 43.3, 3.62)
pt3dadd(81.05, 69.28, 43.3, 3.62)
pt3dadd(80.91, 68.96, 43.3, 3.62)
pt3dadd(80.77, 68.81, 43.3, 3.62)
pt3dadd(80.77, 68.33, 43.3, 3.62)
pt3dadd(80.91, 68.49, 43.3, 3.62)
pt3dadd(80.91, 70.07, 43.3, 3.62)
pt3dadd(81.33, 68.02, 47.3, 3.62)
pt3dadd(81.19, 67.86, 47.3, 3.62)
pt3dadd(81.05, 67.7, 47.3, 3.62)
pt3dadd(80.77, 67.38, 47.3, 3.62)
pt3dadd(80.63, 67.22, 47.3, 3.62)
pt3dadd(80.35, 66.91, 47.3, 3.62)
pt3dadd(80.35, 66.43, 47.3, 3.62)
pt3dadd(80.22, 66.27, 47.3, 3.62)
pt3dadd(80.08, 65.96, 47.3, 3.62)
pt3dadd(79.94, 65.64, 47.3, 3.62)
pt3dadd(79.8, 65.48, 47.3, 3.62)
pt3dadd(79.66, 65.17, 47.3, 3.62)
pt3dadd(79.66, 64.69, 47.3, 3.62)
pt3dadd(79.52, 64.37, 47.3, 3.62)
pt3dadd(79.52, 63.9, 47.3, 3.62)
pt3dadd(79.38, 63.43, 47.3, 3.62)
pt3dadd(79.38, 62.79, 47.3, 3.62)
pt3dadd(79.24, 62.48, 47.3, 3.62)
pt3dadd(79.24, 61.68, 47.3, 3.62)
pt3dadd(79.1, 61.21, 47.3, 3.62)
pt3dadd(79.1, 60.42, 47.3, 3.62)
pt3dadd(78.96, 59.94, 47.3, 3.62)
pt3dadd(78.96, 59.15, 47.3, 3.62)
pt3dadd(78.82, 58.68, 47.3, 3.62)
pt3dadd(78.82, 57.73, 47.3, 3.62)
pt3dadd(78.68, 57.09, 47.3, 3.62)
pt3dadd(78.68, 50.29, 47.3, 3.62)
pt3dadd(78.54, 52.66, 49.3, 3.62)
pt3dadd(78.54, 50.6, 49.3, 3.62)
pt3dadd(78.4, 50.29, 49.3, 3.62)
pt3dadd(78.26, 50.13, 49.3, 3.62)
pt3dadd(78.26, 49.34, 49.3, 3.62)
pt3dadd(78.13, 49.18, 49.3, 3.62)
pt3dadd(77.99, 48.86, 49.3, 3.62)
pt3dadd(77.85, 48.55, 49.3, 3.62)
pt3dadd(77.57, 48.39, 49.3, 3.62)
pt3dadd(77.29, 48.07, 49.3, 3.62)
pt3dadd(77.15, 47.76, 49.3, 3.62)
pt3dadd(77.01, 47.6, 49.3, 3.62)
pt3dadd(76.73, 47.28, 49.3, 3.62)
pt3dadd(76.45, 46.96, 49.3, 3.62)
pt3dadd(76.17, 46.65, 49.3, 3.62)
pt3dadd(75.76, 46.17, 49.3, 3.62)
pt3dadd(75.62, 46.01, 49.3, 3.62)
pt3dadd(75.34, 45.86, 49.3, 3.62)
pt3dadd(75.2, 45.7, 49.3, 3.62)
pt3dadd(74.92, 45.54, 49.3, 3.62)
pt3dadd(74.64, 45.38, 49.3, 3.62)
pt3dadd(74.5, 45.22, 49.3, 3.62)
pt3dadd(74.22, 45.06, 49.3, 3.62)
pt3dadd(74.08, 44.91, 49.3, 3.62)
pt3dadd(73.81, 44.75, 49.3, 3.62)
pt3dadd(73.53, 44.59, 49.3, 3.62)
pt3dadd(73.39, 44.43, 49.3, 3.62)
pt3dadd(73.25, 44.27, 49.3, 3.62)
pt3dadd(72.41, 44.27, 49.3, 3.62)
pt3dadd(72.27, 44.12, 49.3, 3.62)
pt3dadd(68.09, 44.12, 49.3, 3.62)
}
dend[89] {pt3dclear()
pt3dadd(220.68, 238.96, -5.7, 8.64)
pt3dadd(216.22, 239.9, -5.7, 8.64)
pt3dadd(215.67, 239.59, -5.7, 8.64)
pt3dadd(212.6, 239.59, -5.7, 8.64)
pt3dadd(212.32, 239.27, -5.7, 8.64)
pt3dadd(212.04, 238.96, -5.7, 8.64)
pt3dadd(211.49, 238.96, -5.7, 8.64)
pt3dadd(210.93, 238.64, -5.7, 8.64)
pt3dadd(210.37, 238.64, -5.7, 8.64)
pt3dadd(209.81, 238.32, -5.7, 8.64)
pt3dadd(208.98, 238.32, -5.7, 8.64)
pt3dadd(208.7, 238.01, -5.7, 8.64)
pt3dadd(208.42, 237.69, -5.7, 8.64)
pt3dadd(207.86, 237.69, -5.7, 8.64)
pt3dadd(207.31, 237.37, -5.7, 8.64)
pt3dadd(206.75, 237.37, -5.7, 8.64)
pt3dadd(206.19, 237.06, -5.7, 8.64)
pt3dadd(205.35, 237.06, -5.7, 8.64)
pt3dadd(204.8, 236.74, -5.7, 8.64)
pt3dadd(200.06, 236.74, -5.7, 8.64)
pt3dadd(198.94, 237.06, -5.7, 8.64)
}
dend[90] {pt3dclear()
pt3dadd(198.94, 237.06, -5.7, 7.53)
pt3dadd(197.27, 236.11, -4.7, 7.53)
pt3dadd(193.37, 236.11, -4.7, 7.53)
pt3dadd(192.81, 235.79, -4.7, 7.53)
pt3dadd(192.26, 235.47, -4.7, 7.53)
pt3dadd(191.98, 235.16, -4.7, 7.53)
pt3dadd(191.7, 234.84, -4.7, 7.53)
pt3dadd(190.86, 234.52, -4.7, 7.53)
pt3dadd(190.3, 234.21, -4.7, 7.53)
pt3dadd(190.03, 233.89, -4.7, 7.53)
pt3dadd(188.07, 233.89, -4.7, 7.53)
pt3dadd(187.8, 233.57, -4.7, 7.53)
pt3dadd(187.52, 233.26, -4.7, 7.53)
pt3dadd(186.96, 232.94, -4.7, 7.53)
pt3dadd(186.68, 232.62, -4.7, 7.53)
pt3dadd(186.4, 232.31, -4.7, 7.53)
pt3dadd(185.85, 232.31, -4.7, 7.53)
pt3dadd(185.57, 231.99, -4.7, 7.53)
pt3dadd(185.29, 231.67, -4.7, 7.53)
pt3dadd(184.73, 231.36, -4.7, 7.53)
pt3dadd(184.45, 231.04, -4.7, 7.53)
pt3dadd(184.17, 230.72, -4.7, 7.53)
pt3dadd(183.62, 230.41, -4.7, 7.53)
pt3dadd(183.06, 230.09, -4.7, 7.53)
pt3dadd(182.78, 229.78, -4.7, 7.53)
pt3dadd(182.5, 229.46, -4.7, 7.53)
pt3dadd(181.66, 229.46, -4.7, 7.53)
pt3dadd(181.11, 229.14, -4.7, 7.53)
}
dend[91] {pt3dclear()
pt3dadd(181.11, 229.14, -4.7, 5.3)
pt3dadd(181.11, 226.93, -5.7, 5.3)
pt3dadd(180.83, 226.29, -5.7, 5.3)
pt3dadd(180.55, 224.39, -5.7, 5.02)
pt3dadd(180.27, 223.76, -5.7, 5.02)
pt3dadd(179.99, 222.81, -5.7, 5.02)
pt3dadd(179.71, 222.18, -5.7, 5.02)
pt3dadd(179.71, 221.54, -5.7, 5.02)
pt3dadd(179.44, 220.59, -5.7, 5.02)
pt3dadd(179.16, 220.28, -5.7, 5.02)
pt3dadd(179.16, 219.65, -5.7, 5.02)
pt3dadd(178.88, 219.33, -5.7, 5.02)
pt3dadd(178.88, 218.7, -5.7, 5.02)
pt3dadd(178.6, 218.06, -5.7, 5.02)
pt3dadd(178.6, 217.43, -5.7, 5.02)
pt3dadd(178.32, 217.11, -5.7, 5.02)
pt3dadd(178.32, 215.85, -5.7, 5.02)
pt3dadd(178.04, 215.53, -5.7, 5.02)
pt3dadd(178.04, 214.26, -5.7, 5.02)
pt3dadd(177.76, 213.95, -5.7, 5.02)
pt3dadd(177.76, 213.31, -5.7, 5.02)
pt3dadd(177.48, 212.36, -5.7, 5.02)
pt3dadd(177.48, 211.73, -5.7, 5.02)
pt3dadd(177.21, 211.1, -5.7, 5.02)
pt3dadd(177.21, 210.47, -5.7, 5.02)
pt3dadd(176.93, 209.83, -5.7, 5.02)
pt3dadd(176.93, 209.2, -5.7, 5.02)
pt3dadd(176.09, 207.3, -5.7, 4.74)
pt3dadd(175.53, 206.67, -5.7, 4.74)
pt3dadd(175.25, 206.03, -5.7, 4.74)
pt3dadd(174.98, 205.4, -5.7, 4.74)
pt3dadd(174.7, 205.08, -5.7, 4.74)
pt3dadd(174.42, 204.45, -5.7, 4.74)
pt3dadd(174.14, 204.13, -5.7, 4.74)
pt3dadd(173.58, 203.5, -5.7, 4.74)
pt3dadd(173.58, 202.87, -5.7, 4.74)
pt3dadd(173.02, 202.55, -5.7, 4.74)
pt3dadd(173.02, 201.92, -5.7, 4.74)
pt3dadd(172.75, 201.29, -5.7, 4.74)
}
}
proc shape3d_132() {
dend[91] { pt3dadd(172.75, 200.65, -5.7, 4.74)
pt3dadd(172.19, 200.02, -5.7, 4.74)
pt3dadd(172.19, 199.07, -5.7, 4.74)
pt3dadd(171.91, 198.44, -5.7, 4.74)
pt3dadd(171.63, 197.8, -5.7, 4.74)
pt3dadd(171.63, 197.17, -5.7, 4.74)
pt3dadd(171.35, 196.85, -5.7, 4.74)
pt3dadd(171.35, 195.9, -5.7, 4.74)
pt3dadd(171.07, 195.27, -5.7, 4.74)
pt3dadd(170.8, 194.95, -5.7, 4.74)
pt3dadd(170.8, 193.69, -5.7, 4.74)
pt3dadd(170.52, 193.05, -5.7, 4.74)
pt3dadd(170.52, 192.1, -5.7, 4.74)
pt3dadd(170.24, 191.47, -5.7, 4.74)
pt3dadd(169.96, 190.84, -5.7, 4.74)
pt3dadd(169.96, 190.21, -5.7, 4.74)
pt3dadd(169.68, 189.57, -5.7, 4.74)
pt3dadd(169.68, 188.94, -5.7, 4.74)
pt3dadd(169.4, 188.31, -5.7, 4.74)
pt3dadd(169.12, 187.67, -5.7, 4.74)
pt3dadd(169.12, 187.04, -5.7, 4.74)
pt3dadd(168.84, 186.72, -5.7, 4.74)
pt3dadd(168.84, 186.41, -5.7, 4.74)
pt3dadd(168.84, 186.72, -6.7, 3.62)
pt3dadd(168.29, 186.72, -6.7, 3.62)
pt3dadd(168.01, 186.41, -6.7, 3.62)
pt3dadd(167.73, 185.77, -6.7, 3.62)
pt3dadd(167.45, 185.14, -6.7, 3.62)
pt3dadd(167.17, 184.51, -6.7, 3.62)
pt3dadd(166.89, 183.87, -6.7, 3.62)
pt3dadd(166.61, 183.56, -6.7, 3.62)
pt3dadd(166.34, 182.92, -6.7, 3.62)
pt3dadd(166.06, 182.29, -6.7, 3.62)
pt3dadd(165.78, 181.66, -6.7, 3.62)
pt3dadd(165.5, 181.34, -6.7, 3.62)
pt3dadd(165.5, 180.71, -6.7, 3.62)
pt3dadd(165.22, 180.39, -6.7, 3.62)
pt3dadd(164.94, 180.08, -6.7, 3.62)
pt3dadd(164.94, 179.44, -6.7, 3.62)
pt3dadd(164.66, 179.13, -6.7, 3.62)
pt3dadd(164.38, 178.49, -6.7, 3.62)
pt3dadd(164.38, 177.86, -6.7, 3.62)
pt3dadd(164.11, 177.54, -6.7, 3.62)
pt3dadd(164.11, 176.91, -6.7, 3.62)
pt3dadd(163.55, 176.28, -6.7, 3.62)
pt3dadd(163.55, 175.33, -6.7, 3.62)
pt3dadd(163.27, 175.01, -6.7, 3.62)
pt3dadd(162.99, 174.38, -6.7, 3.62)
pt3dadd(162.71, 173.74, -6.7, 3.62)
pt3dadd(162.71, 173.11, -6.7, 3.62)
pt3dadd(162.16, 172.48, -6.7, 3.62)
pt3dadd(162.16, 171.53, -6.7, 3.62)
pt3dadd(161.88, 170.9, -6.7, 3.62)
pt3dadd(161.6, 170.26, -6.7, 3.62)
pt3dadd(161.6, 169.63, -6.7, 3.62)
pt3dadd(161.32, 169, -6.7, 3.62)
pt3dadd(161.04, 168.68, -6.7, 3.62)
pt3dadd(161.04, 168.05, -6.7, 3.62)
pt3dadd(160.76, 167.41, -6.7, 3.62)
pt3dadd(160.48, 166.78, -6.7, 3.62)
pt3dadd(160.2, 166.15, -6.7, 3.62)
pt3dadd(159.93, 165.51, -6.7, 3.62)
pt3dadd(159.65, 164.88, -6.7, 3.62)
pt3dadd(159.65, 164.25, -6.7, 3.62)
pt3dadd(159.37, 163.61, -6.7, 3.62)
pt3dadd(159.09, 162.98, -6.7, 3.62)
pt3dadd(158.81, 162.35, -6.7, 3.62)
pt3dadd(158.81, 161.72, -6.7, 3.62)
pt3dadd(158.53, 161.08, -6.7, 3.62)
pt3dadd(158.25, 160.77, -6.7, 3.62)
pt3dadd(157.97, 159.82, -6.7, 3.62)
pt3dadd(157.97, 158.87, -6.7, 3.62)
pt3dadd(157.7, 158.55, -6.7, 3.62)
pt3dadd(157.42, 157.92, -6.7, 3.62)
pt3dadd(157.42, 157.28, -6.7, 3.62)
pt3dadd(157.14, 156.65, -6.7, 3.62)
pt3dadd(156.86, 155.7, -6.7, 3.62)
pt3dadd(156.58, 155.07, -6.7, 3.62)
pt3dadd(156.3, 154.43, -6.7, 3.62)
pt3dadd(156.02, 153.8, -6.7, 3.62)
pt3dadd(156.02, 152.85, -6.7, 3.62)
pt3dadd(155.74, 152.22, -6.7, 3.62)
pt3dadd(155.47, 151.59, -6.7, 3.62)
pt3dadd(155.19, 151.27, -6.7, 3.62)
pt3dadd(154.91, 150, -6.7, 3.62)
pt3dadd(154.63, 149.37, -6.7, 3.62)
pt3dadd(154.35, 148.42, -6.7, 3.62)
pt3dadd(153.79, 148.1, -6.7, 3.62)
pt3dadd(153.79, 147.47, -6.7, 3.62)
pt3dadd(153.52, 146.84, -6.7, 3.62)
pt3dadd(153.24, 146.2, -6.7, 3.62)
pt3dadd(152.96, 145.89, -6.7, 3.62)
pt3dadd(152.68, 144.94, -6.7, 3.62)
pt3dadd(152.12, 144.62, -6.7, 3.62)
pt3dadd(152.12, 143.99, -6.7, 3.62)
pt3dadd(151.84, 143.67, -6.7, 3.62)
pt3dadd(151.56, 143.36, -6.7, 3.62)
pt3dadd(151.29, 143.04, -6.7, 3.62)
pt3dadd(151.01, 142.72, -6.7, 3.62)
pt3dadd(151.01, 143.04, -6.7, 3.62)
pt3dadd(151.29, 142.41, -6.7, 3.9)
pt3dadd(145.99, 132.91, -6.7, 3.9)
pt3dadd(147.66, 134.49, -6.7, 3.9)
pt3dadd(147.11, 133.86, -6.7, 3.9)
pt3dadd(146.83, 133.54, -6.7, 3.9)
pt3dadd(146.55, 133.23, -6.7, 3.9)
pt3dadd(146.27, 132.91, -6.7, 3.9)
pt3dadd(145.99, 132.28, -6.7, 3.9)
pt3dadd(145.43, 131.96, -6.7, 3.9)
pt3dadd(145.15, 131.64, -6.7, 3.9)
pt3dadd(144.88, 131.33, -6.7, 3.9)
pt3dadd(144.6, 131.01, -6.7, 3.9)
pt3dadd(144.32, 130.38, -6.7, 3.9)
pt3dadd(143.76, 130.06, -6.7, 3.9)
pt3dadd(143.48, 129.43, -6.7, 3.9)
pt3dadd(143.2, 129.11, -6.7, 3.9)
pt3dadd(142.92, 128.48, -6.7, 3.9)
pt3dadd(142.65, 128.16, -6.7, 3.9)
pt3dadd(142.37, 127.84, -6.7, 3.9)
pt3dadd(142.09, 127.53, -6.7, 3.9)
pt3dadd(141.81, 126.89, -6.7, 3.9)
pt3dadd(141.53, 126.58, -6.7, 3.9)
pt3dadd(140.97, 126.26, -6.7, 3.9)
pt3dadd(140.69, 125.63, -6.7, 3.9)
pt3dadd(140.14, 125.31, -6.7, 3.9)
pt3dadd(139.86, 125, -6.7, 3.9)
pt3dadd(139.58, 124.36, -6.7, 3.9)
pt3dadd(139.02, 123.73, -6.7, 3.9)
pt3dadd(138.74, 123.41, -6.7, 3.9)
pt3dadd(138.19, 123.1, -6.7, 3.9)
pt3dadd(137.91, 122.46, -6.7, 3.9)
pt3dadd(137.63, 122.15, -6.7, 3.9)
pt3dadd(137.07, 121.51, -6.7, 3.9)
pt3dadd(136.79, 120.88, -6.7, 3.9)
pt3dadd(136.51, 120.25, -6.7, 3.9)
pt3dadd(135.96, 119.93, -6.7, 3.9)
pt3dadd(135.68, 119.3, -6.7, 3.9)
pt3dadd(135.4, 118.98, -6.7, 3.9)
pt3dadd(135.12, 118.03, -6.7, 3.9)
pt3dadd(134.56, 117.4, -6.7, 3.9)
pt3dadd(134.28, 116.76, -6.7, 3.9)
pt3dadd(134.01, 116.13, -6.7, 3.9)
pt3dadd(133.73, 115.5, -6.7, 3.9)
pt3dadd(133.17, 115.18, -6.7, 3.9)
pt3dadd(132.89, 114.55, -6.7, 3.9)
pt3dadd(132.33, 113.92, -6.7, 3.9)
pt3dadd(132.05, 113.28, -6.7, 3.9)
pt3dadd(131.78, 112.97, -6.7, 3.9)
pt3dadd(131.5, 112.33, -6.7, 3.9)
pt3dadd(131.22, 112.02, -6.7, 3.9)
pt3dadd(130.66, 111.7, -6.7, 3.9)
pt3dadd(130.38, 111.07, -6.7, 3.9)
pt3dadd(130.1, 110.75, -6.7, 3.9)
pt3dadd(129.55, 110.43, -6.7, 3.9)
pt3dadd(129.27, 109.8, -6.7, 3.9)
pt3dadd(128.15, 108.53, -6.7, 3.9)
pt3dadd(127.87, 108.22, -6.7, 3.9)
pt3dadd(127.6, 107.58, -6.7, 3.9)
pt3dadd(127.04, 107.58, -6.7, 3.9)
pt3dadd(126.48, 106.95, -6.7, 3.9)
pt3dadd(125.92, 106.32, -6.7, 3.9)
pt3dadd(125.37, 106, -6.7, 3.9)
pt3dadd(124.81, 105.69, -6.7, 3.9)
pt3dadd(124.53, 105.37, -6.7, 3.9)
pt3dadd(124.25, 105.37, -6.7, 3.9)
pt3dadd(125.64, 106, -7.7, 3.9)
pt3dadd(125.09, 105.69, -7.7, 3.9)
pt3dadd(124.53, 105.69, -7.7, 3.9)
pt3dadd(124.25, 105.37, -7.7, 3.9)
pt3dadd(122.3, 103.15, -7.7, 3.9)
pt3dadd(122.02, 102.84, -7.7, 3.9)
pt3dadd(121.74, 102.52, -7.7, 3.9)
pt3dadd(121.46, 101.89, -7.7, 3.9)
pt3dadd(120.91, 101.89, -7.7, 3.9)
pt3dadd(120.63, 101.25, -7.7, 3.9)
pt3dadd(120.35, 100.94, -7.7, 3.9)
pt3dadd(119.79, 100.62, -7.7, 3.9)
pt3dadd(119.51, 100.3, -7.7, 3.9)
pt3dadd(119.23, 99.99, -7.7, 3.9)
pt3dadd(118.96, 99.67, -7.7, 3.9)
pt3dadd(118.68, 99.35, -7.7, 3.9)
pt3dadd(118.4, 98.72, -7.7, 3.9)
pt3dadd(117.84, 98.72, -7.7, 3.9)
pt3dadd(117.56, 98.4, -7.7, 3.9)
pt3dadd(117.28, 98.09, -7.7, 3.9)
pt3dadd(116.73, 97.45, -7.7, 3.9)
pt3dadd(116.45, 97.14, -7.7, 3.9)
pt3dadd(116.17, 96.51, -7.7, 3.9)
pt3dadd(115.89, 96.19, -7.7, 3.9)
pt3dadd(115.61, 95.87, -7.7, 3.9)
pt3dadd(115.05, 94.92, -7.7, 3.9)
pt3dadd(114.78, 94.29, -7.7, 3.9)
pt3dadd(114.5, 93.66, -7.7, 3.9)
pt3dadd(114.22, 93.02, -7.7, 3.9)
pt3dadd(113.66, 92.39, -7.7, 3.9)
pt3dadd(113.38, 92.07, -7.7, 3.9)
pt3dadd(113.1, 91.44, -7.7, 3.9)
pt3dadd(112.82, 90.81, -7.7, 3.9)
pt3dadd(112.55, 90.49, -7.7, 3.9)
pt3dadd(111.99, 90.17, -7.7, 3.9)
}
}
proc shape3d_133() {
dend[91] { pt3dadd(111.71, 90.17, -7.7, 3.9)
pt3dadd(113.38, 90.81, -9.7, 3.9)
pt3dadd(113.1, 90.49, -9.7, 3.9)
pt3dadd(112.82, 90.17, -9.7, 3.9)
pt3dadd(112.55, 89.86, -9.7, 3.9)
pt3dadd(112.27, 89.54, -9.7, 3.9)
pt3dadd(111.99, 89.22, -9.7, 3.9)
pt3dadd(111.71, 88.91, -9.7, 3.9)
pt3dadd(111.43, 88.27, -9.7, 3.9)
pt3dadd(111.15, 87.96, -9.7, 3.9)
pt3dadd(110.87, 87.64, -9.7, 3.9)
pt3dadd(110.59, 87.32, -9.7, 3.9)
pt3dadd(110.32, 87.01, -9.7, 3.9)
pt3dadd(110.32, 86.38, -9.7, 3.9)
pt3dadd(110.04, 85.74, -9.7, 3.9)
pt3dadd(109.76, 85.43, -9.7, 3.9)
pt3dadd(109.48, 84.79, -9.7, 3.9)
pt3dadd(109.2, 84.48, -9.7, 3.9)
pt3dadd(108.92, 83.84, -9.7, 3.9)
pt3dadd(108.64, 83.21, -9.7, 3.9)
pt3dadd(108.36, 82.89, -9.7, 3.9)
pt3dadd(108.09, 82.26, -9.7, 3.9)
pt3dadd(107.81, 81.94, -9.7, 3.9)
pt3dadd(107.25, 81.63, -9.7, 3.9)
pt3dadd(106.97, 80.99, -9.7, 3.9)
pt3dadd(106.69, 80.36, -9.7, 3.9)
pt3dadd(106.41, 79.73, -9.7, 3.9)
pt3dadd(106.14, 79.09, -9.7, 3.9)
pt3dadd(105.86, 78.46, -9.7, 3.9)
pt3dadd(105.58, 78.14, -9.7, 3.9)
pt3dadd(105.02, 77.2, -9.7, 3.9)
pt3dadd(104.74, 76.88, -9.7, 3.9)
pt3dadd(104.46, 76.25, -9.7, 3.9)
pt3dadd(104.18, 75.3, -9.7, 3.9)
pt3dadd(103.63, 74.66, -9.7, 3.9)
pt3dadd(103.35, 74.03, -9.7, 3.9)
pt3dadd(103.07, 73.4, -9.7, 3.9)
pt3dadd(102.51, 72.76, -9.7, 3.9)
pt3dadd(102.23, 72.13, -9.7, 3.9)
pt3dadd(101.95, 71.5, -9.7, 3.9)
pt3dadd(101.68, 70.55, -9.7, 3.9)
pt3dadd(101.4, 69.91, -9.7, 3.9)
pt3dadd(100.84, 69.28, -9.7, 3.9)
pt3dadd(100.56, 68.33, -9.7, 3.9)
pt3dadd(100.28, 68.02, -9.7, 3.9)
pt3dadd(99.72, 67.38, -9.7, 3.9)
pt3dadd(99.45, 66.75, -9.7, 3.9)
pt3dadd(99.17, 66.43, -9.7, 3.9)
pt3dadd(98.89, 65.8, -9.7, 3.9)
pt3dadd(98.05, 64.85, -9.7, 3.9)
pt3dadd(97.77, 64.53, -9.7, 3.9)
pt3dadd(97.5, 63.9, -9.7, 3.9)
pt3dadd(97.22, 63.58, -9.7, 3.9)
pt3dadd(96.94, 62.95, -9.7, 3.9)
pt3dadd(96.66, 62.32, -9.7, 3.9)
pt3dadd(96.38, 61.68, -9.7, 3.9)
pt3dadd(96.1, 61.37, -9.7, 3.9)
pt3dadd(95.82, 60.73, -9.7, 3.9)
pt3dadd(95.27, 60.1, -9.7, 3.9)
pt3dadd(94.99, 59.47, -9.7, 3.9)
pt3dadd(94.71, 58.83, -9.7, 3.9)
pt3dadd(94.15, 58.2, -9.7, 3.9)
pt3dadd(93.87, 57.25, -9.7, 3.9)
pt3dadd(93.31, 56.62, -9.7, 3.9)
pt3dadd(93.04, 55.99, -9.7, 3.9)
pt3dadd(92.76, 55.04, -9.7, 3.9)
pt3dadd(92.48, 54.72, -9.7, 3.9)
pt3dadd(92.2, 54.09, -9.7, 3.9)
pt3dadd(91.92, 53.45, -9.7, 3.9)
pt3dadd(91.64, 53.14, -9.7, 3.9)
pt3dadd(91.36, 52.82, -9.7, 3.9)
pt3dadd(91.08, 52.19, -9.7, 3.9)
pt3dadd(90.81, 51.87, -9.7, 3.9)
pt3dadd(90.53, 51.24, -9.7, 3.9)
pt3dadd(90.25, 50.6, -9.7, 3.9)
pt3dadd(89.97, 49.97, -9.7, 3.9)
pt3dadd(89.69, 49.34, -9.7, 3.9)
pt3dadd(89.41, 48.71, -9.7, 3.9)
pt3dadd(89.13, 48.39, -9.7, 3.9)
pt3dadd(89.13, 47.12, -9.7, 3.9)
pt3dadd(88.86, 46.49, -9.7, 3.9)
pt3dadd(88.58, 45.86, -9.7, 3.9)
pt3dadd(88.3, 45.54, -9.7, 3.9)
pt3dadd(88.02, 45.22, -9.7, 3.9)
pt3dadd(88.02, 46.17, -9.7, 3.9)
pt3dadd(88.58, 46.81, -9.7, 3.9)
pt3dadd(89.13, 48.39, -9.7, 3.9)
}
dend[92] {pt3dclear()
pt3dadd(181.11, 229.14, -4.7, 5.85)
pt3dadd(178.88, 228.83, -3.7, 5.85)
pt3dadd(171.63, 228.83, -3.7, 5.85)
pt3dadd(171.35, 228.51, -3.7, 5.85)
pt3dadd(170.8, 228.51, -3.7, 5.85)
pt3dadd(170.52, 228.19, -3.7, 5.85)
pt3dadd(169.96, 227.88, -3.7, 5.85)
pt3dadd(169.12, 227.88, -3.7, 5.85)
pt3dadd(168.57, 227.56, -3.7, 5.85)
pt3dadd(168.01, 227.24, -3.7, 5.85)
pt3dadd(167.45, 226.93, -3.7, 5.85)
pt3dadd(166.89, 226.93, -3.7, 5.85)
pt3dadd(166.61, 226.61, -3.7, 5.85)
pt3dadd(166.06, 226.29, -3.7, 5.85)
pt3dadd(165.5, 225.98, -3.7, 5.85)
pt3dadd(164.94, 225.98, -3.7, 5.85)
pt3dadd(164.38, 225.66, -3.7, 5.85)
pt3dadd(163.83, 225.34, -3.7, 5.85)
pt3dadd(163.27, 225.34, -3.7, 5.85)
pt3dadd(162.71, 225.03, -3.7, 5.85)
pt3dadd(162.43, 224.71, -3.7, 5.85)
pt3dadd(162.16, 224.39, -3.7, 5.85)
pt3dadd(161.32, 224.39, -3.7, 5.85)
pt3dadd(160.76, 224.08, -3.7, 5.85)
pt3dadd(160.2, 223.76, -3.7, 5.85)
pt3dadd(159.93, 223.44, -3.7, 5.85)
pt3dadd(159.65, 223.13, -3.7, 5.85)
pt3dadd(159.09, 222.81, -3.7, 5.85)
pt3dadd(158.81, 222.18, -3.7, 5.85)
pt3dadd(158.53, 221.86, -3.7, 5.85)
pt3dadd(157.97, 221.86, -3.7, 5.85)
pt3dadd(156.02, 225.03, -3.7, 5.85)
}
dend[93] {pt3dclear()
pt3dadd(156.02, 225.03, -3.7, 5.85)
pt3dadd(157.7, 221.23, -3.7, 5.85)
pt3dadd(157.42, 220.91, -3.7, 5.85)
pt3dadd(157.14, 220.59, -3.7, 5.85)
pt3dadd(156.86, 220.28, -3.7, 5.85)
pt3dadd(156.58, 219.65, -3.7, 5.85)
pt3dadd(156.3, 219.33, -3.7, 5.85)
pt3dadd(156.02, 219.01, -3.7, 5.85)
pt3dadd(155.74, 218.38, -3.7, 5.85)
pt3dadd(155.47, 218.06, -3.7, 5.85)
pt3dadd(155.19, 217.43, -3.7, 5.85)
pt3dadd(154.91, 217.11, -3.7, 5.85)
pt3dadd(154.63, 216.8, -3.7, 5.85)
pt3dadd(154.35, 216.16, -3.7, 5.85)
pt3dadd(154.07, 215.85, -3.7, 5.85)
pt3dadd(153.79, 215.53, -3.7, 5.85)
pt3dadd(153.79, 214.9, -3.7, 5.85)
pt3dadd(153.52, 214.58, -3.7, 5.85)
pt3dadd(153.24, 213.95, -3.7, 5.85)
pt3dadd(152.96, 213.63, -3.7, 5.85)
pt3dadd(152.68, 213.31, -3.7, 5.85)
pt3dadd(152.68, 212.68, -3.7, 5.85)
pt3dadd(152.4, 212.36, -3.7, 5.85)
pt3dadd(152.12, 211.73, -3.7, 5.85)
pt3dadd(151.84, 211.41, -3.7, 5.85)
pt3dadd(151.84, 210.78, -3.7, 5.85)
pt3dadd(151.56, 210.47, -3.7, 5.85)
pt3dadd(151.29, 210.15, -3.7, 5.85)
pt3dadd(151.01, 209.83, -3.7, 5.85)
pt3dadd(150.73, 209.52, -3.7, 5.85)
pt3dadd(150.45, 208.88, -3.7, 5.85)
pt3dadd(150.45, 208.25, -3.7, 5.85)
pt3dadd(150.17, 207.93, -3.7, 5.85)
pt3dadd(150.17, 207.3, -3.7, 5.85)
pt3dadd(149.89, 206.67, -3.7, 5.85)
pt3dadd(149.89, 201.92, -3.7, 5.85)
pt3dadd(149.61, 201.29, -3.7, 5.85)
pt3dadd(149.61, 200.34, -3.7, 5.85)
pt3dadd(149.33, 199.7, -3.7, 5.85)
pt3dadd(149.33, 199.07, -3.7, 5.85)
pt3dadd(149.06, 198.44, -3.7, 5.85)
pt3dadd(148.78, 197.8, -3.7, 5.85)
pt3dadd(148.78, 197.17, -3.7, 5.85)
pt3dadd(148.5, 196.85, -3.7, 5.85)
pt3dadd(148.5, 194.64, -3.7, 5.85)
pt3dadd(148.22, 194.32, -3.7, 5.85)
pt3dadd(148.22, 193.69, -3.7, 5.85)
pt3dadd(147.94, 193.05, -3.7, 5.85)
pt3dadd(147.94, 192.1, -3.7, 5.85)
pt3dadd(147.66, 191.47, -3.7, 5.85)
pt3dadd(147.66, 190.52, -3.7, 5.85)
pt3dadd(147.38, 189.89, -3.7, 5.85)
pt3dadd(147.11, 189.26, -3.7, 5.85)
pt3dadd(147.11, 188.62, -3.7, 5.85)
pt3dadd(146.83, 187.67, -3.7, 5.85)
pt3dadd(146.55, 187.04, -3.7, 5.85)
pt3dadd(146.27, 186.41, -3.7, 5.85)
pt3dadd(145.99, 185.77, -3.7, 5.85)
pt3dadd(145.71, 185.14, -3.7, 5.85)
pt3dadd(145.71, 184.51, -3.7, 5.85)
pt3dadd(145.43, 183.87, -3.7, 5.85)
pt3dadd(145.15, 183.24, -3.7, 5.85)
pt3dadd(144.88, 182.92, -3.7, 5.85)
pt3dadd(144.6, 182.29, -3.7, 5.85)
pt3dadd(144.32, 181.66, -3.7, 5.85)
pt3dadd(144.04, 181.03, -3.7, 5.85)
pt3dadd(144.04, 180.39, -3.7, 5.85)
pt3dadd(143.76, 180.08, -3.7, 5.85)
pt3dadd(143.48, 179.44, -3.7, 5.85)
pt3dadd(143.2, 178.81, -3.7, 5.85)
pt3dadd(143.2, 178.18, -3.7, 5.85)
pt3dadd(142.92, 177.86, -3.7, 5.85)
pt3dadd(142.37, 177.23, -3.7, 5.85)
pt3dadd(142.37, 176.59, -3.7, 5.85)
pt3dadd(142.09, 176.28, -3.7, 5.85)
pt3dadd(141.81, 175.64, -3.7, 5.85)
pt3dadd(141.53, 175.01, -3.7, 5.85)
pt3dadd(141.25, 174.38, -3.7, 5.85)
pt3dadd(140.97, 174.06, -3.7, 5.85)
pt3dadd(140.69, 173.43, -3.7, 5.85)
pt3dadd(140.42, 172.48, -3.7, 5.85)
}
}
proc shape3d_134() {
dend[93] { pt3dadd(140.14, 171.85, -3.7, 5.85)
pt3dadd(139.86, 171.21, -3.7, 5.85)
pt3dadd(139.58, 170.9, -3.7, 5.85)
pt3dadd(139.3, 170.26, -3.7, 5.85)
pt3dadd(139.02, 169.95, -3.7, 5.85)
pt3dadd(139.02, 169.31, -3.7, 5.85)
pt3dadd(138.74, 168.68, -3.7, 5.85)
pt3dadd(138.47, 168.05, -3.7, 5.85)
pt3dadd(138.19, 167.41, -3.7, 5.85)
pt3dadd(138.19, 166.78, -3.7, 5.85)
pt3dadd(137.91, 166.46, -3.7, 5.85)
pt3dadd(137.91, 165.2, -3.7, 5.85)
pt3dadd(137.63, 164.56, -3.7, 5.85)
pt3dadd(137.35, 163.93, -3.7, 5.85)
pt3dadd(137.35, 163.3, -3.7, 5.85)
pt3dadd(137.07, 162.35, -3.7, 5.85)
pt3dadd(136.79, 162.03, -3.7, 5.85)
pt3dadd(136.51, 161.4, -3.7, 5.85)
pt3dadd(136.24, 160.77, -3.7, 5.85)
pt3dadd(135.96, 160.13, -3.7, 5.85)
pt3dadd(135.68, 159.5, -3.7, 5.85)
pt3dadd(135.12, 158.55, -3.7, 5.85)
pt3dadd(134.84, 157.92, -3.7, 5.85)
pt3dadd(134.56, 157.28, -3.7, 5.85)
pt3dadd(134.28, 156.65, -3.7, 5.85)
pt3dadd(134.01, 156.33, -3.7, 5.85)
pt3dadd(133.73, 156.02, -3.7, 5.85)
pt3dadd(133.73, 155.38, -3.7, 5.85)
pt3dadd(133.45, 155.07, -3.7, 5.85)
pt3dadd(133.17, 154.75, -3.7, 5.85)
pt3dadd(132.89, 154.12, -3.7, 5.85)
pt3dadd(132.61, 153.8, -3.7, 5.85)
pt3dadd(132.61, 153.17, -3.7, 5.85)
pt3dadd(132.33, 152.54, -3.7, 5.85)
pt3dadd(132.05, 152.22, -3.7, 5.85)
}
dend[94] {pt3dclear()
pt3dadd(132.05, 152.22, -3.7, 3.76)
pt3dadd(130.94, 150.48, -4.7, 3.76)
pt3dadd(130.8, 150.32, -4.7, 3.76)
pt3dadd(130.66, 150, -4.7, 3.76)
pt3dadd(130.52, 149.69, -4.7, 3.76)
pt3dadd(130.24, 149.21, -4.7, 3.76)
pt3dadd(130.24, 148.74, -4.7, 3.76)
pt3dadd(130.1, 148.58, -4.7, 3.76)
pt3dadd(129.96, 148.42, -4.7, 3.76)
pt3dadd(129.83, 148.1, -4.7, 3.76)
pt3dadd(129.83, 147.63, -4.7, 3.76)
pt3dadd(129.69, 147.47, -4.7, 3.76)
pt3dadd(129.69, 147, -4.7, 3.76)
pt3dadd(129.55, 146.84, -4.7, 3.76)
pt3dadd(129.55, 146.52, -4.7, 3.76)
pt3dadd(129.41, 146.36, -4.7, 3.76)
pt3dadd(129.27, 146.05, -4.7, 3.76)
pt3dadd(129.13, 145.73, -4.7, 3.76)
pt3dadd(129.13, 145.25, -4.7, 3.76)
pt3dadd(128.85, 144.78, -4.7, 3.76)
pt3dadd(128.71, 144.31, -4.7, 3.76)
pt3dadd(128.57, 144.15, -4.7, 3.76)
pt3dadd(128.43, 143.83, -4.7, 3.76)
pt3dadd(128.29, 143.51, -4.7, 3.76)
pt3dadd(128.15, 143.04, -4.7, 3.76)
pt3dadd(128.01, 142.88, -4.7, 3.76)
pt3dadd(127.87, 142.56, -4.7, 3.76)
pt3dadd(127.73, 142.41, -4.7, 3.76)
pt3dadd(127.6, 142.09, -4.7, 3.76)
pt3dadd(127.6, 141.77, -4.7, 3.76)
pt3dadd(127.46, 141.61, -4.7, 3.76)
pt3dadd(127.32, 141.3, -4.7, 3.76)
pt3dadd(127.18, 141.14, -4.7, 3.76)
pt3dadd(127.18, 140.66, -4.7, 3.76)
pt3dadd(127.04, 140.35, -4.7, 3.76)
pt3dadd(126.9, 140.19, -4.7, 3.76)
pt3dadd(126.76, 139.87, -4.7, 3.76)
pt3dadd(126.62, 139.56, -4.7, 3.76)
pt3dadd(126.48, 139.24, -4.7, 3.76)
pt3dadd(126.34, 138.92, -4.7, 3.76)
pt3dadd(126.34, 138.61, -4.7, 3.76)
pt3dadd(126.2, 138.45, -4.7, 3.76)
pt3dadd(126.06, 138.13, -4.7, 3.76)
pt3dadd(125.92, 137.82, -4.7, 3.76)
pt3dadd(125.78, 137.5, -4.7, 3.76)
pt3dadd(125.64, 137.18, -4.7, 3.76)
pt3dadd(125.51, 136.71, -4.7, 3.76)
pt3dadd(125.37, 136.39, -4.7, 3.76)
pt3dadd(125.23, 136.07, -4.7, 3.76)
pt3dadd(125.09, 135.92, -4.7, 3.76)
pt3dadd(124.95, 135.44, -4.7, 3.76)
pt3dadd(124.81, 135.28, -4.7, 3.76)
pt3dadd(124.67, 134.97, -4.7, 3.76)
pt3dadd(124.53, 134.65, -4.7, 3.76)
pt3dadd(124.39, 134.49, -4.7, 3.76)
pt3dadd(124.25, 134.18, -4.7, 3.76)
pt3dadd(124.11, 134.02, -4.7, 3.76)
pt3dadd(124.39, 134.81, -5.7, 3.76)
pt3dadd(124.25, 134.65, -5.7, 3.76)
pt3dadd(124.11, 134.49, -5.7, 3.76)
pt3dadd(123.97, 134.33, -5.7, 3.76)
pt3dadd(123.83, 134.18, -5.7, 3.76)
pt3dadd(123.55, 133.54, -5.7, 3.76)
pt3dadd(123.42, 133.23, -5.7, 3.76)
pt3dadd(123.14, 133.07, -5.7, 3.76)
pt3dadd(123, 132.59, -5.7, 3.76)
pt3dadd(122.72, 132.28, -5.7, 3.76)
pt3dadd(122.58, 131.96, -5.7, 3.76)
pt3dadd(122.44, 131.48, -5.7, 3.76)
pt3dadd(122.3, 131.17, -5.7, 3.76)
pt3dadd(122.16, 130.85, -5.7, 3.76)
pt3dadd(121.88, 130.69, -5.7, 3.76)
pt3dadd(121.74, 130.38, -5.7, 3.76)
pt3dadd(121.6, 130.06, -5.7, 3.76)
pt3dadd(121.46, 129.59, -5.7, 3.76)
pt3dadd(121.32, 129.43, -5.7, 3.76)
pt3dadd(121.05, 129.11, -5.7, 3.76)
pt3dadd(121.05, 128.79, -5.7, 3.76)
pt3dadd(120.77, 128.32, -5.7, 3.76)
pt3dadd(120.63, 128, -5.7, 3.76)
pt3dadd(120.35, 127.69, -5.7, 3.76)
pt3dadd(120.21, 127.37, -5.7, 3.76)
pt3dadd(120.07, 127.05, -5.7, 3.76)
pt3dadd(119.79, 126.58, -5.7, 3.76)
pt3dadd(119.65, 126.1, -5.7, 3.76)
pt3dadd(119.51, 125.94, -5.7, 3.76)
pt3dadd(119.23, 125.63, -5.7, 3.76)
pt3dadd(119.1, 125.31, -5.7, 3.76)
pt3dadd(118.96, 125, -5.7, 3.76)
pt3dadd(118.82, 124.68, -5.7, 3.76)
pt3dadd(118.54, 124.2, -5.7, 3.76)
pt3dadd(118.26, 123.89, -5.7, 3.76)
pt3dadd(118.26, 123.57, -5.7, 3.76)
pt3dadd(118.12, 123.25, -5.7, 3.76)
pt3dadd(117.84, 122.94, -5.7, 3.76)
pt3dadd(117.7, 122.46, -5.7, 3.76)
pt3dadd(117.56, 122.3, -5.7, 3.76)
pt3dadd(117.42, 121.99, -5.7, 3.76)
pt3dadd(117.28, 121.67, -5.7, 3.76)
pt3dadd(117, 121.2, -5.7, 3.76)
pt3dadd(117, 120.88, -5.7, 3.76)
pt3dadd(116.73, 120.56, -5.7, 3.76)
pt3dadd(116.59, 120.09, -5.7, 3.76)
pt3dadd(116.45, 119.77, -5.7, 3.76)
pt3dadd(116.17, 119.61, -5.7, 3.76)
pt3dadd(116.17, 119.3, -5.7, 3.76)
pt3dadd(115.89, 119.14, -5.7, 3.76)
pt3dadd(115.75, 118.82, -5.7, 3.76)
pt3dadd(115.61, 118.66, -5.7, 3.76)
pt3dadd(115.33, 118.19, -5.7, 3.76)
pt3dadd(115.19, 117.87, -5.7, 3.76)
pt3dadd(115.05, 117.4, -5.7, 3.76)
pt3dadd(114.91, 117.24, -5.7, 3.76)
pt3dadd(114.78, 117.08, -5.7, 3.76)
pt3dadd(114.5, 116.92, -5.7, 3.76)
pt3dadd(114.36, 116.61, -5.7, 3.76)
pt3dadd(114.22, 116.45, -5.7, 3.76)
pt3dadd(113.94, 115.82, -5.7, 3.76)
pt3dadd(113.66, 115.5, -5.7, 3.76)
pt3dadd(113.52, 115.18, -5.7, 3.76)
pt3dadd(113.38, 114.87, -5.7, 3.76)
pt3dadd(113.1, 114.71, -5.7, 3.76)
pt3dadd(112.96, 114.39, -5.7, 3.76)
pt3dadd(112.68, 114.23, -5.7, 3.76)
pt3dadd(112.55, 114.07, -5.7, 3.76)
pt3dadd(112.41, 113.76, -5.7, 3.76)
pt3dadd(112.13, 113.6, -5.7, 3.76)
pt3dadd(111.85, 113.28, -5.7, 3.76)
pt3dadd(111.57, 112.97, -5.7, 3.76)
pt3dadd(111.29, 112.65, -5.7, 3.76)
pt3dadd(111.01, 112.33, -5.7, 3.76)
pt3dadd(110.87, 112.02, -5.7, 3.76)
pt3dadd(110.59, 111.86, -5.7, 3.76)
pt3dadd(110.46, 111.7, -5.7, 3.76)
pt3dadd(110.32, 111.38, -5.7, 3.76)
pt3dadd(110.18, 111.22, -5.7, 3.76)
pt3dadd(109.9, 110.91, -5.7, 3.76)
pt3dadd(109.34, 110.28, -5.7, 3.76)
pt3dadd(109.2, 110.12, -5.7, 3.76)
pt3dadd(109.06, 109.8, -5.7, 3.76)
pt3dadd(108.92, 109.64, -5.7, 3.76)
pt3dadd(108.64, 109.17, -5.7, 3.76)
pt3dadd(108.36, 109.01, -5.7, 3.76)
pt3dadd(108.23, 108.69, -5.7, 3.76)
pt3dadd(108.09, 108.53, -5.7, 3.76)
pt3dadd(107.81, 108.22, -5.7, 3.76)
pt3dadd(107.67, 108.06, -5.7, 3.76)
pt3dadd(107.39, 107.9, -5.7, 3.76)
pt3dadd(107.25, 107.74, -5.7, 3.76)
pt3dadd(106.83, 107.43, -5.7, 3.76)
pt3dadd(106.55, 107.27, -5.7, 3.76)
pt3dadd(106.41, 106.95, -5.7, 3.76)
pt3dadd(106.14, 106.63, -5.7, 3.76)
pt3dadd(106, 106.48, -5.7, 3.76)
pt3dadd(105.16, 105.53, -5.7, 3.76)
pt3dadd(105.02, 105.37, -5.7, 3.76)
pt3dadd(104.74, 105.05, -5.7, 3.76)
pt3dadd(104.6, 104.89, -5.7, 3.76)
pt3dadd(104.32, 104.58, -5.7, 3.76)
pt3dadd(104.18, 104.26, -5.7, 3.76)
pt3dadd(103.91, 103.94, -5.7, 3.76)
pt3dadd(103.77, 103.79, -5.7, 3.76)
pt3dadd(103.63, 103.47, -5.7, 3.76)
pt3dadd(103.49, 103.15, -5.7, 3.76)
pt3dadd(103.07, 102.68, -5.7, 3.76)
}
}
proc shape3d_135() {
dend[94] { pt3dadd(102.79, 102.36, -5.7, 3.76)
pt3dadd(102.65, 102.2, -5.7, 3.76)
pt3dadd(102.37, 101.73, -5.7, 3.76)
pt3dadd(102.23, 101.41, -5.7, 3.76)
pt3dadd(102.09, 101.1, -5.7, 3.76)
pt3dadd(101.82, 100.94, -5.7, 3.76)
pt3dadd(101.68, 100.62, -5.7, 3.76)
pt3dadd(101.4, 100.15, -5.7, 3.76)
pt3dadd(101.12, 99.83, -5.7, 3.76)
pt3dadd(100.98, 99.51, -5.7, 3.76)
pt3dadd(100.7, 99.2, -5.7, 3.76)
pt3dadd(100.56, 98.88, -5.7, 3.76)
pt3dadd(100.28, 98.56, -5.7, 3.76)
pt3dadd(100, 98.09, -5.7, 3.76)
pt3dadd(99.86, 97.77, -5.7, 3.76)
pt3dadd(99.72, 97.61, -5.7, 3.76)
pt3dadd(99.59, 97.3, -5.7, 3.76)
pt3dadd(99.31, 97.14, -5.7, 3.76)
pt3dadd(99.17, 96.82, -5.7, 3.76)
pt3dadd(98.89, 96.66, -5.7, 3.76)
pt3dadd(98.75, 96.35, -5.7, 3.76)
pt3dadd(98.61, 96.03, -5.7, 3.76)
pt3dadd(98.33, 95.87, -5.7, 3.76)
pt3dadd(98.19, 95.71, -5.7, 3.76)
pt3dadd(98.05, 95.56, -5.7, 3.76)
pt3dadd(97.91, 95.4, -5.7, 3.76)
pt3dadd(97.77, 95.08, -5.7, 3.76)
pt3dadd(97.22, 94.45, -5.7, 3.76)
pt3dadd(96.94, 94.13, -5.7, 3.76)
pt3dadd(96.66, 93.81, -5.7, 3.76)
pt3dadd(96.52, 93.34, -5.7, 3.76)
pt3dadd(96.38, 93.02, -5.7, 3.76)
pt3dadd(96.1, 92.86, -5.7, 3.76)
pt3dadd(95.96, 92.71, -5.7, 3.76)
pt3dadd(95.82, 92.39, -5.7, 3.76)
pt3dadd(95.54, 91.92, -5.7, 3.76)
pt3dadd(95.54, 91.6, -5.7, 3.76)
pt3dadd(95.27, 91.44, -5.7, 3.76)
pt3dadd(94.99, 91.28, -5.7, 3.76)
pt3dadd(94.85, 90.97, -5.7, 3.76)
pt3dadd(94.71, 90.81, -5.7, 3.76)
pt3dadd(94.57, 90.49, -5.7, 3.76)
pt3dadd(94.43, 90.17, -5.7, 3.76)
pt3dadd(94.15, 90.02, -5.7, 3.76)
pt3dadd(94.01, 89.86, -5.7, 3.76)
pt3dadd(93.87, 89.54, -5.7, 3.76)
pt3dadd(93.73, 89.38, -5.7, 3.76)
pt3dadd(93.31, 88.91, -5.7, 3.76)
pt3dadd(93.04, 88.59, -5.7, 3.76)
pt3dadd(92.9, 88.27, -5.7, 3.76)
pt3dadd(92.62, 87.96, -5.7, 3.76)
pt3dadd(92.34, 87.8, -5.7, 3.76)
pt3dadd(92.2, 87.48, -5.7, 3.76)
pt3dadd(91.92, 87.32, -5.7, 3.76)
pt3dadd(91.78, 87.01, -5.7, 3.76)
pt3dadd(91.5, 87.01, -5.7, 3.76)
pt3dadd(91.36, 86.85, -5.7, 3.76)
pt3dadd(90.95, 86.85, -5.7, 3.76)
pt3dadd(90.95, 87.17, -5.7, 3.76)
pt3dadd(91.22, 87.64, -5.7, 3.76)
pt3dadd(91.5, 88.43, -5.7, 3.76)
pt3dadd(91.64, 88.75, -5.7, 3.76)
pt3dadd(91.22, 87.48, -5.7, 3.76)
pt3dadd(90.95, 87.32, -5.7, 3.76)
pt3dadd(90.81, 87.17, -5.7, 3.76)
pt3dadd(90.67, 87.01, -5.7, 3.76)
pt3dadd(90.53, 86.85, -5.7, 3.76)
pt3dadd(90.25, 86.53, -5.7, 3.76)
pt3dadd(90.11, 86.38, -5.7, 3.76)
pt3dadd(89.97, 86.22, -5.7, 3.76)
pt3dadd(89.69, 85.74, -5.7, 3.76)
pt3dadd(89.41, 85.27, -5.7, 3.76)
pt3dadd(89.27, 84.95, -5.7, 3.76)
pt3dadd(88.72, 84.32, -5.7, 3.76)
pt3dadd(88.58, 84.16, -5.7, 3.76)
pt3dadd(88.44, 83.68, -5.7, 3.76)
pt3dadd(88.3, 83.37, -5.7, 3.76)
pt3dadd(88.16, 83.21, -5.7, 3.76)
pt3dadd(87.88, 82.89, -5.7, 3.76)
pt3dadd(87.6, 82.73, -5.7, 3.76)
pt3dadd(87.46, 82.26, -5.7, 3.76)
pt3dadd(87.32, 81.94, -5.7, 3.76)
pt3dadd(86.76, 81.31, -5.7, 3.76)
pt3dadd(86.63, 80.99, -5.7, 3.76)
pt3dadd(86.35, 80.84, -5.7, 3.76)
pt3dadd(86.21, 80.68, -5.7, 3.76)
pt3dadd(86.07, 80.36, -5.7, 3.76)
pt3dadd(85.65, 79.57, -5.7, 3.76)
pt3dadd(85.37, 79.09, -5.7, 3.76)
pt3dadd(84.67, 78.3, -5.7, 3.76)
pt3dadd(84.4, 77.83, -5.7, 3.76)
pt3dadd(84.26, 77.51, -5.7, 3.76)
pt3dadd(83.84, 76.72, -5.7, 3.76)
pt3dadd(83.28, 76.09, -5.7, 3.76)
pt3dadd(83, 75.61, -5.7, 3.76)
pt3dadd(82.72, 75.14, -5.7, 3.76)
pt3dadd(82.45, 74.66, -5.7, 3.76)
pt3dadd(82.17, 74.19, -5.7, 3.76)
pt3dadd(81.89, 73.87, -5.7, 3.76)
pt3dadd(81.33, 73.24, -5.7, 3.76)
pt3dadd(81.05, 72.76, -5.7, 3.76)
pt3dadd(80.77, 72.29, -5.7, 3.76)
pt3dadd(80.49, 71.66, -5.7, 3.76)
pt3dadd(80.22, 71.18, -5.7, 3.76)
pt3dadd(79.94, 70.71, -5.7, 3.76)
pt3dadd(79.66, 70.23, -5.7, 3.76)
pt3dadd(79.38, 69.76, -5.7, 3.76)
pt3dadd(79.24, 69.44, -5.7, 3.76)
pt3dadd(78.68, 68.65, -5.7, 3.76)
pt3dadd(78.26, 68.02, -5.7, 3.76)
pt3dadd(78.13, 67.54, -5.7, 3.76)
pt3dadd(77.43, 66.12, -5.7, 3.76)
pt3dadd(77.15, 65.8, -5.7, 3.76)
pt3dadd(77.01, 65.32, -5.7, 3.76)
pt3dadd(76.87, 65.17, -5.7, 3.76)
pt3dadd(76.73, 64.85, -5.7, 3.76)
pt3dadd(76.59, 64.53, -5.7, 3.76)
pt3dadd(76.45, 64.22, -5.7, 3.76)
pt3dadd(76.17, 63.9, -5.7, 3.76)
pt3dadd(76.03, 63.58, -5.7, 3.76)
pt3dadd(75.9, 63.11, -5.7, 3.76)
pt3dadd(75.76, 62.79, -5.7, 3.76)
pt3dadd(75.62, 62.32, -5.7, 3.76)
pt3dadd(75.48, 62, -5.7, 3.76)
pt3dadd(75.34, 61.68, -5.7, 3.76)
pt3dadd(75.06, 61.21, -5.7, 3.76)
pt3dadd(74.92, 60.89, -5.7, 3.76)
pt3dadd(74.64, 60.42, -5.7, 3.76)
pt3dadd(74.5, 60.1, -5.7, 3.76)
pt3dadd(74.36, 59.78, -5.7, 3.76)
pt3dadd(74.22, 59.47, -5.7, 3.76)
pt3dadd(74.08, 59.15, -5.7, 3.76)
pt3dadd(73.81, 58.68, -5.7, 3.76)
pt3dadd(73.67, 58.52, -5.7, 3.76)
pt3dadd(73.39, 57.89, -5.7, 3.76)
pt3dadd(73.25, 57.41, -5.7, 3.76)
pt3dadd(72.97, 57.09, -5.7, 3.76)
pt3dadd(72.83, 56.78, -5.7, 3.76)
pt3dadd(72.69, 56.3, -5.7, 3.76)
pt3dadd(72.41, 55.99, -5.7, 3.76)
pt3dadd(72.27, 55.67, -5.7, 3.76)
pt3dadd(72.13, 55.35, -5.7, 3.76)
pt3dadd(71.99, 55.04, -5.7, 3.76)
pt3dadd(71.71, 54.56, -5.7, 3.76)
pt3dadd(71.58, 54.24, -5.7, 3.76)
pt3dadd(71.3, 53.93, -5.7, 3.76)
pt3dadd(71.3, 53.61, -5.7, 3.76)
pt3dadd(71.16, 53.3, -5.7, 3.76)
pt3dadd(71.02, 52.98, -5.7, 3.76)
pt3dadd(70.88, 52.66, -5.7, 3.76)
pt3dadd(70.74, 52.35, -5.7, 3.76)
pt3dadd(70.46, 52.03, -5.7, 3.76)
pt3dadd(70.32, 51.87, -5.7, 3.76)
pt3dadd(70.04, 51.4, -5.7, 3.76)
pt3dadd(69.9, 51.08, -5.7, 3.76)
pt3dadd(69.62, 50.92, -5.7, 3.76)
pt3dadd(69.49, 50.6, -5.7, 3.76)
pt3dadd(69.35, 50.29, -5.7, 3.76)
pt3dadd(69.21, 49.97, -5.7, 3.76)
pt3dadd(68.93, 49.65, -5.7, 3.76)
pt3dadd(68.79, 49.34, -5.7, 3.76)
pt3dadd(68.65, 49.02, -5.7, 3.76)
pt3dadd(68.37, 48.71, -5.7, 3.76)
pt3dadd(68.09, 48.23, -5.7, 3.76)
pt3dadd(67.95, 47.91, -5.7, 3.76)
pt3dadd(67.81, 47.6, -5.7, 3.76)
pt3dadd(67.67, 47.28, -5.7, 3.76)
pt3dadd(67.39, 46.96, -5.7, 3.76)
pt3dadd(67.26, 46.65, -5.7, 3.76)
pt3dadd(67.12, 46.33, -5.7, 3.76)
pt3dadd(66.84, 46.01, -5.7, 3.76)
pt3dadd(66.7, 45.7, -5.7, 3.76)
pt3dadd(66.56, 45.38, -5.7, 3.76)
pt3dadd(66.28, 45.06, -5.7, 3.76)
pt3dadd(66.14, 44.75, -5.7, 3.76)
pt3dadd(66, 44.43, -5.7, 3.76)
pt3dadd(65.72, 44.12, -5.7, 3.76)
pt3dadd(65.58, 43.8, -5.7, 3.76)
pt3dadd(65.44, 43.48, -5.7, 3.76)
pt3dadd(65.3, 43.32, -5.7, 3.76)
pt3dadd(65.03, 43.01, -5.7, 3.76)
pt3dadd(64.89, 42.53, -5.7, 3.76)
pt3dadd(64.61, 42.37, -5.7, 3.76)
pt3dadd(64.61, 42.06, -5.7, 3.76)
pt3dadd(64.33, 41.9, -5.7, 3.76)
pt3dadd(64.05, 41.74, -5.7, 3.76)
pt3dadd(63.91, 41.58, -5.7, 3.76)
pt3dadd(63.77, 41.42, -5.7, 3.76)
pt3dadd(63.49, 41.42, -5.7, 3.76)
pt3dadd(63.49, 41.58, -5.7, 3.76)
pt3dadd(64.75, 42.53, -5.7, 3.76)
pt3dadd(64.33, 42.53, -5.7, 3.76)
pt3dadd(64.05, 42.37, -5.7, 3.76)
pt3dadd(63.91, 42.22, -5.7, 3.76)
pt3dadd(63.77, 42.06, -5.7, 3.76)
pt3dadd(63.63, 41.9, -5.7, 3.76)
pt3dadd(63.49, 41.74, -5.7, 3.76)
pt3dadd(63.35, 41.42, -5.7, 3.76)
pt3dadd(63.21, 41.27, -5.7, 3.76)
pt3dadd(63.21, 40.95, -5.7, 3.76)
}
}
proc shape3d_136() {
dend[94] { pt3dadd(62.94, 40.79, -5.7, 3.76)
pt3dadd(62.94, 40.32, -5.7, 3.76)
pt3dadd(62.66, 40.16, -5.7, 3.76)
pt3dadd(62.66, 39.84, -5.7, 3.76)
pt3dadd(62.52, 39.68, -5.7, 3.76)
pt3dadd(62.38, 39.37, -5.7, 3.76)
pt3dadd(62.24, 39.05, -5.7, 3.76)
pt3dadd(62.1, 38.73, -5.7, 3.76)
pt3dadd(62.1, 38.42, -5.7, 3.76)
pt3dadd(61.82, 37.94, -5.7, 3.76)
pt3dadd(61.68, 37.47, -5.7, 3.76)
pt3dadd(61.4, 37.15, -5.7, 3.76)
pt3dadd(61.4, 36.83, -5.7, 3.76)
pt3dadd(60.98, 36.04, -5.7, 3.76)
pt3dadd(60.98, 35.57, -5.7, 3.76)
pt3dadd(60.71, 35.09, -5.7, 3.76)
pt3dadd(60.57, 34.46, -5.7, 3.76)
pt3dadd(60.29, 34.3, -5.7, 3.76)
pt3dadd(60.29, 33.83, -5.7, 3.76)
pt3dadd(60.01, 33.19, -5.7, 3.76)
pt3dadd(59.73, 32.88, -5.7, 3.76)
pt3dadd(59.73, 32.56, -5.7, 3.76)
pt3dadd(59.45, 32.09, -5.7, 3.76)
pt3dadd(59.45, 31.77, -5.7, 3.76)
pt3dadd(59.17, 31.45, -5.7, 3.76)
pt3dadd(59.03, 30.98, -5.7, 3.76)
pt3dadd(58.89, 30.66, -5.7, 3.76)
pt3dadd(58.62, 30.34, -5.7, 3.76)
pt3dadd(58.48, 29.87, -5.7, 3.76)
pt3dadd(58.2, 29.4, -5.7, 3.76)
pt3dadd(58.06, 29.08, -5.7, 3.76)
pt3dadd(57.92, 28.45, -5.7, 3.76)
pt3dadd(57.64, 28.29, -5.7, 3.76)
pt3dadd(57.5, 27.97, -5.7, 3.76)
pt3dadd(57.36, 27.65, -5.7, 3.76)
pt3dadd(57.22, 27.34, -5.7, 3.76)
pt3dadd(56.94, 27.02, -5.7, 3.76)
pt3dadd(56.8, 26.55, -5.7, 3.76)
pt3dadd(56.66, 26.23, -5.7, 3.76)
pt3dadd(56.53, 25.75, -5.7, 3.76)
pt3dadd(56.25, 25.6, -5.7, 3.76)
pt3dadd(56.11, 25.12, -5.7, 3.76)
pt3dadd(55.97, 24.49, -5.7, 3.76)
pt3dadd(55.69, 24.01, -5.7, 3.76)
pt3dadd(55.55, 23.7, -5.7, 3.76)
pt3dadd(55.41, 23.38, -5.7, 3.76)
pt3dadd(55.13, 22.91, -5.7, 3.76)
pt3dadd(54.85, 22.27, -5.7, 3.76)
pt3dadd(54.71, 21.96, -5.7, 3.76)
pt3dadd(54.44, 21.32, -5.7, 3.76)
pt3dadd(54.02, 20.85, -5.7, 3.76)
pt3dadd(53.88, 20.53, -5.7, 3.76)
pt3dadd(53.74, 20.06, -5.7, 3.76)
pt3dadd(53.46, 19.74, -5.7, 3.76)
pt3dadd(53.32, 19.42, -5.7, 3.76)
pt3dadd(53.18, 19.11, -5.7, 3.76)
pt3dadd(52.48, 18.32, -5.7, 3.76)
pt3dadd(52.34, 18, -5.7, 3.76)
pt3dadd(52.07, 17.68, -5.7, 3.76)
pt3dadd(51.93, 17.21, -5.7, 3.76)
pt3dadd(51.65, 16.89, -5.7, 3.76)
pt3dadd(51.51, 16.57, -5.7, 3.76)
pt3dadd(51.37, 16.26, -5.7, 3.76)
pt3dadd(51.23, 15.94, -5.7, 3.76)
pt3dadd(51.09, 15.78, -5.7, 3.76)
pt3dadd(50.81, 15.47, -5.7, 3.76)
pt3dadd(50.67, 15.15, -5.7, 3.76)
pt3dadd(50.25, 14.36, -5.7, 3.76)
pt3dadd(49.98, 13.88, -5.7, 3.76)
pt3dadd(49.7, 13.57, -5.7, 3.76)
pt3dadd(49.42, 13.09, -5.7, 3.76)
pt3dadd(49.14, 12.78, -5.7, 3.76)
pt3dadd(49, 12.3, -5.7, 3.76)
pt3dadd(48.72, 11.98, -5.7, 3.76)
pt3dadd(48.58, 11.67, -5.7, 3.76)
pt3dadd(48.3, 11.35, -5.7, 3.76)
pt3dadd(48.02, 10.88, -5.7, 3.76)
pt3dadd(47.75, 10.56, -5.7, 3.76)
pt3dadd(47.61, 10.09, -5.7, 3.76)
pt3dadd(47.33, 9.77, -5.7, 3.76)
pt3dadd(47.05, 9.45, -5.7, 3.76)
pt3dadd(46.77, 8.98, -5.7, 3.76)
pt3dadd(46.49, 8.66, -5.7, 3.76)
pt3dadd(46.35, 8.19, -5.7, 3.76)
pt3dadd(46.07, 7.87, -5.7, 3.76)
pt3dadd(45.8, 7.24, -5.7, 3.76)
pt3dadd(45.52, 6.92, -5.7, 3.76)
pt3dadd(45.24, 6.6, -5.7, 3.76)
pt3dadd(45.1, 6.13, -5.7, 3.76)
pt3dadd(44.96, 5.65, -5.7, 3.76)
pt3dadd(44.68, 5.34, -5.7, 3.76)
pt3dadd(44.26, 5.02, -5.7, 3.76)
pt3dadd(44.12, 4.55, -5.7, 3.76)
pt3dadd(43.84, 4.23, -5.7, 3.76)
pt3dadd(43.7, 3.91, -5.7, 3.76)
pt3dadd(43.43, 3.44, -5.7, 3.76)
pt3dadd(43.29, 3.12, -5.7, 3.76)
pt3dadd(42.87, 2.65, -5.7, 3.76)
pt3dadd(42.59, 2.01, -5.7, 3.76)
pt3dadd(42.45, 1.7, -5.7, 3.76)
pt3dadd(42.17, 1.22, -5.7, 3.76)
pt3dadd(42.03, 0.75, -5.7, 3.76)
pt3dadd(41.75, 0.43, -5.7, 3.76)
pt3dadd(41.48, 0.11, -5.7, 3.76)
pt3dadd(41.2, -0.2, -5.7, 3.76)
pt3dadd(41.06, -0.68, -5.7, 3.76)
pt3dadd(40.92, -0.99, -5.7, 3.76)
pt3dadd(40.64, -1.47, -5.7, 3.76)
pt3dadd(40.36, -1.79, -5.7, 3.76)
pt3dadd(40.22, -2.26, -5.7, 3.76)
pt3dadd(39.94, -2.74, -5.7, 3.76)
pt3dadd(39.66, -3.21, -5.7, 3.76)
pt3dadd(39.52, -3.53, -5.7, 3.76)
pt3dadd(39.25, -3.84, -5.7, 3.76)
pt3dadd(39.11, -4.16, -5.7, 3.76)
pt3dadd(38.97, -4.48, -5.7, 3.76)
pt3dadd(38.83, -4.63, -5.7, 3.76)
pt3dadd(38.41, -5.11, -5.7, 3.76)
pt3dadd(38.27, -5.27, -5.7, 3.76)
pt3dadd(37.85, -5.9, -5.7, 3.76)
pt3dadd(37.71, -5.9, -5.7, 3.76)
pt3dadd(37.85, -5.43, -5.7, 3.76)
pt3dadd(37.99, -5.11, -5.7, 3.76)
pt3dadd(38.69, -5.11, -5.7, 3.76)
pt3dadd(32.84, -11.44, -5.7, 3.76)
pt3dadd(33.67, -10.33, -5.7, 3.76)
pt3dadd(33.53, -10.49, -5.7, 3.76)
pt3dadd(33.25, -10.81, -5.7, 3.76)
pt3dadd(33.11, -10.97, -5.7, 3.76)
pt3dadd(32.97, -11.28, -5.7, 3.76)
pt3dadd(32.7, -11.44, -5.7, 3.76)
pt3dadd(32.56, -11.76, -5.7, 3.76)
pt3dadd(32.42, -12.23, -5.7, 3.76)
pt3dadd(32.14, -12.39, -5.7, 3.76)
pt3dadd(31.86, -12.71, -5.7, 3.76)
pt3dadd(31.72, -13.02, -5.7, 3.76)
pt3dadd(31.44, -13.5, -5.7, 3.76)
pt3dadd(31.16, -13.81, -5.7, 3.76)
pt3dadd(31.02, -13.97, -5.7, 3.76)
pt3dadd(30.88, -14.29, -5.7, 3.76)
pt3dadd(30.74, -14.61, -5.7, 3.76)
pt3dadd(30.47, -14.92, -5.7, 3.76)
pt3dadd(30.33, -15.08, -5.7, 3.76)
pt3dadd(30.19, -15.4, -5.7, 3.76)
pt3dadd(29.91, -15.87, -5.7, 3.76)
pt3dadd(29.77, -16.03, -5.7, 3.76)
pt3dadd(29.49, -16.35, -5.7, 3.76)
pt3dadd(29.35, -16.51, -5.7, 3.76)
pt3dadd(29.21, -16.82, -5.7, 3.76)
pt3dadd(28.79, -17.3, -5.7, 3.76)
pt3dadd(28.65, -17.45, -5.7, 3.76)
pt3dadd(27.68, -18.56, -5.7, 3.76)
pt3dadd(27.4, -18.88, -5.7, 3.76)
pt3dadd(27.26, -19.04, -5.7, 3.76)
pt3dadd(27.12, -19.35, -5.7, 3.76)
pt3dadd(26.84, -19.51, -5.7, 3.76)
pt3dadd(26.56, -19.83, -5.7, 3.76)
pt3dadd(25.45, -21.1, -5.7, 3.76)
pt3dadd(25.31, -21.25, -5.7, 3.76)
pt3dadd(25.03, -21.41, -5.7, 3.76)
pt3dadd(24.89, -21.57, -5.7, 3.76)
pt3dadd(24.75, -21.89, -5.7, 3.76)
pt3dadd(24.61, -22.05, -5.7, 3.76)
pt3dadd(24.33, -22.2, -5.7, 3.76)
pt3dadd(24.06, -22.36, -5.7, 3.76)
pt3dadd(23.78, -22.68, -5.7, 3.76)
pt3dadd(23.36, -22.99, -5.7, 3.76)
pt3dadd(23.08, -23.15, -5.7, 3.76)
pt3dadd(22.66, -23.47, -5.7, 3.76)
pt3dadd(22.52, -23.79, -5.7, 3.76)
pt3dadd(22.24, -23.94, -5.7, 3.76)
pt3dadd(21.97, -24.1, -5.7, 3.76)
pt3dadd(21.69, -24.42, -5.7, 3.76)
pt3dadd(21.27, -24.74, -5.7, 3.76)
pt3dadd(20.85, -25.21, -5.7, 3.76)
pt3dadd(20.29, -25.69, -5.7, 3.76)
pt3dadd(20.01, -25.84, -5.7, 3.76)
pt3dadd(19.74, -26, -5.7, 3.76)
pt3dadd(19.6, -26.16, -5.7, 3.76)
pt3dadd(19.32, -26.32, -5.7, 3.76)
pt3dadd(19.18, -26.64, -5.7, 3.76)
pt3dadd(18.9, -26.79, -5.7, 3.76)
pt3dadd(18.62, -27.11, -5.7, 3.76)
pt3dadd(18.48, -27.27, -5.7, 3.76)
pt3dadd(18.06, -27.58, -5.7, 3.76)
pt3dadd(17.79, -27.74, -5.7, 3.76)
pt3dadd(17.51, -28.06, -5.7, 3.76)
pt3dadd(17.37, -28.22, -5.7, 3.76)
pt3dadd(17.09, -28.38, -5.7, 3.76)
pt3dadd(16.67, -28.69, -5.7, 3.76)
pt3dadd(16.53, -29.01, -5.7, 3.76)
pt3dadd(16.25, -29.17, -5.7, 3.76)
pt3dadd(15.97, -29.48, -5.7, 3.76)
pt3dadd(15.42, -29.96, -5.7, 3.76)
pt3dadd(15.14, -30.28, -5.7, 3.76)
pt3dadd(14.86, -30.59, -5.7, 3.76)
pt3dadd(14.72, -30.91, -5.7, 3.76)
pt3dadd(14.44, -31.23, -5.7, 3.76)
pt3dadd(14.02, -31.54, -5.7, 3.76)
pt3dadd(13.88, -31.86, -5.7, 3.76)
}
}
proc shape3d_137() {
dend[94] { pt3dadd(13.6, -32.17, -5.7, 3.76)
pt3dadd(13.33, -32.65, -5.7, 3.76)
pt3dadd(13.05, -32.97, -5.7, 3.76)
pt3dadd(12.77, -33.44, -5.7, 3.76)
pt3dadd(12.35, -33.92, -5.7, 3.76)
pt3dadd(12.07, -34.23, -5.7, 3.76)
pt3dadd(11.79, -34.71, -5.7, 3.76)
pt3dadd(11.51, -34.87, -5.7, 3.76)
pt3dadd(11.1, -35.5, -5.7, 3.76)
pt3dadd(10.4, -36.29, -5.7, 3.76)
pt3dadd(10.26, -36.45, -5.7, 3.76)
pt3dadd(9.98, -36.76, -5.7, 3.76)
pt3dadd(9.7, -37.24, -5.7, 3.76)
pt3dadd(9.56, -37.4, -5.7, 3.76)
pt3dadd(9.42, -37.71, -5.7, 3.76)
pt3dadd(9.15, -38.03, -5.7, 3.76)
pt3dadd(9.01, -38.19, -5.7, 3.76)
pt3dadd(8.73, -38.51, -5.7, 3.76)
pt3dadd(8.59, -38.66, -5.7, 3.76)
pt3dadd(8.45, -38.98, -5.7, 3.76)
pt3dadd(8.03, -39.3, -5.7, 3.76)
pt3dadd(7.75, -39.61, -5.7, 3.76)
pt3dadd(7.61, -39.93, -5.7, 3.76)
pt3dadd(7.33, -40.09, -5.7, 3.76)
pt3dadd(7.05, -40.56, -5.7, 3.76)
pt3dadd(6.92, -40.72, -5.7, 3.76)
pt3dadd(6.36, -41.35, -5.7, 3.76)
pt3dadd(6.08, -41.83, -5.7, 3.76)
pt3dadd(5.8, -41.99, -5.7, 3.76)
pt3dadd(5.66, -42.3, -5.7, 3.76)
pt3dadd(5.52, -42.62, -5.7, 3.76)
pt3dadd(4.83, -43.41, -5.7, 3.76)
pt3dadd(4.55, -43.73, -5.7, 3.76)
pt3dadd(4.27, -44.05, -5.7, 3.76)
pt3dadd(3.99, -44.36, -5.7, 3.76)
pt3dadd(3.71, -44.68, -5.7, 3.76)
pt3dadd(3.43, -45, -5.7, 3.76)
pt3dadd(3.15, -45.47, -5.7, 3.76)
pt3dadd(2.87, -45.79, -5.7, 3.76)
pt3dadd(2.46, -46.26, -5.7, 3.76)
pt3dadd(2.32, -46.58, -5.7, 3.76)
pt3dadd(2.04, -46.89, -5.7, 3.76)
pt3dadd(1.48, -47.53, -5.7, 3.76)
pt3dadd(1.34, -47.84, -5.7, 3.76)
pt3dadd(1.06, -48.32, -5.7, 3.76)
pt3dadd(0.92, -48.64, -5.7, 3.76)
pt3dadd(0.78, -48.95, -5.7, 3.76)
pt3dadd(0.51, -49.27, -5.7, 3.76)
pt3dadd(0.37, -49.59, -5.7, 3.76)
pt3dadd(0.23, -49.9, -5.7, 3.76)
pt3dadd(-0.19, -50.38, -5.7, 3.76)
pt3dadd(-0.33, -50.69, -5.7, 3.76)
pt3dadd(-0.47, -51.01, -5.7, 3.76)
pt3dadd(-0.75, -51.64, -5.7, 3.76)
pt3dadd(-1.03, -52.12, -5.7, 3.76)
pt3dadd(-1.31, -52.75, -5.7, 3.76)
pt3dadd(-1.72, -53.38, -5.7, 3.76)
pt3dadd(-1.86, -53.7, -5.7, 3.76)
pt3dadd(-2.14, -54.18, -5.7, 3.76)
pt3dadd(-2.28, -54.49, -5.7, 3.76)
pt3dadd(-2.42, -54.97, -5.7, 3.76)
pt3dadd(-2.56, -55.28, -5.7, 3.76)
pt3dadd(-2.7, -55.44, -5.7, 3.76)
pt3dadd(-2.98, -55.76, -5.7, 3.76)
pt3dadd(-3.12, -56.07, -5.7, 3.76)
pt3dadd(-3.26, -56.23, -5.7, 3.76)
pt3dadd(-3.4, -56.39, -5.7, 3.76)
pt3dadd(-3.54, -56.71, -5.7, 3.76)
pt3dadd(-3.68, -56.87, -5.7, 3.76)
pt3dadd(-3.95, -57.34, -5.7, 3.76)
pt3dadd(-4.09, -57.66, -5.7, 3.76)
pt3dadd(-4.37, -58.13, -5.7, 3.76)
pt3dadd(-4.65, -58.29, -5.7, 3.76)
pt3dadd(-4.79, -58.61, -5.7, 3.76)
pt3dadd(-4.93, -58.77, -5.7, 3.76)
pt3dadd(-5.07, -58.92, -5.7, 3.76)
pt3dadd(-5.21, -59.08, -5.7, 3.76)
pt3dadd(-5.35, -58.92, -5.7, 3.76)
pt3dadd(-5.35, -58.29, -5.7, 3.76)
pt3dadd(-5.07, -57.82, -5.7, 3.76)
pt3dadd(-4.93, -57.66, -5.7, 3.76)
pt3dadd(-4.65, -57.02, -5.7, 3.76)
pt3dadd(-5.07, -58.45, -4.7, 3.76)
pt3dadd(-5.21, -58.61, -4.7, 3.76)
pt3dadd(-6.04, -59.56, -4.7, 3.76)
pt3dadd(-6.18, -59.72, -4.7, 3.76)
pt3dadd(-6.46, -59.87, -4.7, 3.76)
pt3dadd(-6.6, -60.19, -4.7, 3.76)
pt3dadd(-6.74, -60.51, -4.7, 3.76)
pt3dadd(-6.88, -60.82, -4.7, 3.76)
pt3dadd(-7.16, -60.98, -4.7, 3.76)
pt3dadd(-7.3, -61.3, -4.7, 3.76)
pt3dadd(-7.72, -61.77, -4.7, 3.76)
pt3dadd(-7.86, -62.09, -4.7, 3.76)
pt3dadd(-8.13, -62.25, -4.7, 3.76)
pt3dadd(-8.41, -62.56, -4.7, 3.76)
pt3dadd(-8.69, -63.04, -4.7, 3.76)
pt3dadd(-8.97, -63.36, -4.7, 3.76)
pt3dadd(-9.25, -63.67, -4.7, 3.76)
pt3dadd(-9.53, -63.99, -4.7, 3.76)
pt3dadd(-9.67, -64.31, -4.7, 3.76)
pt3dadd(-11.2, -66.05, -4.7, 3.76)
pt3dadd(-11.48, -66.36, -4.7, 3.76)
pt3dadd(-12.32, -67.31, -4.7, 3.76)
pt3dadd(-12.73, -67.79, -4.7, 3.76)
pt3dadd(-13.15, -68.26, -4.7, 3.76)
pt3dadd(-13.85, -68.9, -4.7, 3.76)
pt3dadd(-14.13, -69.37, -4.7, 3.76)
pt3dadd(-14.54, -69.69, -4.7, 3.76)
pt3dadd(-15.1, -70.16, -4.7, 3.76)
pt3dadd(-15.52, -70.64, -4.7, 3.76)
pt3dadd(-15.94, -71.11, -4.7, 3.76)
pt3dadd(-16.36, -71.59, -4.7, 3.76)
pt3dadd(-16.77, -71.9, -4.7, 3.76)
pt3dadd(-17.47, -72.54, -4.7, 3.76)
pt3dadd(-17.89, -73.01, -4.7, 3.76)
pt3dadd(-18.17, -73.33, -4.7, 3.76)
pt3dadd(-18.59, -73.8, -4.7, 3.76)
pt3dadd(-19.42, -74.75, -4.7, 3.76)
pt3dadd(-19.84, -75.23, -4.7, 3.76)
pt3dadd(-20.26, -75.7, -4.7, 3.76)
pt3dadd(-20.68, -76.18, -4.7, 3.76)
pt3dadd(-20.96, -76.49, -4.7, 3.76)
pt3dadd(-21.23, -76.81, -4.7, 3.76)
pt3dadd(-21.65, -77.28, -4.7, 3.76)
pt3dadd(-21.93, -77.76, -4.7, 3.76)
pt3dadd(-22.77, -78.71, -4.7, 3.76)
pt3dadd(-23.18, -79.03, -4.7, 3.76)
pt3dadd(-23.74, -79.82, -4.7, 3.76)
pt3dadd(-24.16, -80.45, -4.7, 3.76)
pt3dadd(-24.44, -80.77, -4.7, 3.76)
pt3dadd(-24.86, -81.4, -4.7, 3.76)
pt3dadd(-25.14, -81.87, -4.7, 3.76)
pt3dadd(-25.41, -82.35, -4.7, 3.76)
pt3dadd(-25.69, -82.82, -4.7, 3.76)
pt3dadd(-25.97, -83.14, -4.7, 3.76)
pt3dadd(-26.25, -83.46, -4.7, 3.76)
pt3dadd(-26.39, -83.77, -4.7, 3.76)
pt3dadd(-26.67, -84.09, -4.7, 3.76)
pt3dadd(-26.95, -84.41, -4.7, 3.76)
pt3dadd(-27.09, -84.88, -4.7, 3.76)
pt3dadd(-27.37, -85.04, -4.7, 3.76)
pt3dadd(-27.5, -85.36, -4.7, 3.76)
pt3dadd(-27.78, -85.51, -4.7, 3.76)
pt3dadd(-28.06, -85.99, -4.7, 3.76)
pt3dadd(-28.2, -86.31, -4.7, 3.76)
pt3dadd(-28.48, -86.62, -4.7, 3.76)
pt3dadd(-28.9, -87.26, -4.7, 3.76)
pt3dadd(-29.04, -87.41, -4.7, 3.76)
pt3dadd(-29.32, -87.73, -4.7, 3.76)
pt3dadd(-29.46, -88.05, -4.7, 3.76)
pt3dadd(-29.6, -88.36, -4.7, 3.76)
pt3dadd(-29.87, -88.52, -4.7, 3.76)
pt3dadd(-30.01, -88.84, -4.7, 3.76)
pt3dadd(-30.29, -89, -4.7, 3.76)
pt3dadd(-30.43, -89.31, -4.7, 3.76)
pt3dadd(-30.57, -89.47, -4.7, 3.76)
pt3dadd(-30.71, -89.63, -4.7, 3.76)
pt3dadd(-31.13, -90.42, -4.7, 3.76)
pt3dadd(-31.27, -90.58, -4.7, 3.76)
pt3dadd(-31.41, -90.74, -4.7, 3.76)
pt3dadd(-31.69, -91.05, -4.7, 3.76)
pt3dadd(-32.1, -91.37, -4.7, 3.76)
pt3dadd(-32.24, -91.69, -4.7, 3.76)
pt3dadd(-32.38, -91.85, -4.7, 3.76)
pt3dadd(-32.66, -92.16, -4.7, 3.76)
pt3dadd(-32.8, -92.32, -4.7, 3.76)
pt3dadd(-32.94, -92.48, -4.7, 3.76)
pt3dadd(-34.61, -94.38, -4.7, 3.76)
pt3dadd(-34.89, -94.69, -4.7, 3.76)
pt3dadd(-35.31, -95.33, -4.7, 3.76)
pt3dadd(-35.59, -95.49, -4.7, 3.76)
pt3dadd(-35.87, -95.8, -4.7, 3.76)
pt3dadd(-36.14, -95.96, -4.7, 3.76)
pt3dadd(-36.42, -96.12, -4.7, 3.76)
pt3dadd(-36.56, -96.28, -4.7, 3.76)
pt3dadd(-36.7, -96.44, -4.7, 3.76)
pt3dadd(-36.98, -96.59, -4.7, 3.76)
pt3dadd(-37.12, -96.75, -4.7, 3.76)
pt3dadd(-37.26, -96.91, -4.7, 3.76)
pt3dadd(-37.4, -97.23, -4.7, 3.76)
pt3dadd(-37.68, -97.23, -4.7, 3.76)
pt3dadd(-37.68, -96.91, -4.7, 3.76)
pt3dadd(-37.54, -96.44, -4.7, 3.76)
pt3dadd(-37.26, -96.12, -4.7, 3.76)
pt3dadd(-36.84, -96.75, -3.7, 3.76)
pt3dadd(-37.12, -96.75, -3.7, 3.76)
pt3dadd(-36.56, -95.8, -3.7, 3.76)
pt3dadd(-41.02, -100.87, -3.7, 3.76)
pt3dadd(-40.05, -98.81, -3.7, 3.76)
pt3dadd(-40.19, -98.97, -3.7, 3.76)
pt3dadd(-40.33, -99.13, -3.7, 3.76)
pt3dadd(-40.46, -99.28, -3.7, 3.76)
pt3dadd(-40.6, -99.44, -3.7, 3.76)
pt3dadd(-40.74, -99.6, -3.7, 3.76)
pt3dadd(-41.02, -99.92, -3.7, 3.76)
pt3dadd(-41.16, -100.23, -3.7, 3.76)
pt3dadd(-41.3, -100.71, -3.7, 3.76)
pt3dadd(-41.44, -101.03, -3.7, 3.76)
pt3dadd(-41.58, -101.34, -3.7, 3.76)
}
}
proc shape3d_138() {
dend[94] { pt3dadd(-41.72, -101.5, -3.7, 3.76)
pt3dadd(-41.86, -101.66, -3.7, 3.76)
pt3dadd(-41.86, -101.98, -3.7, 3.76)
pt3dadd(-42, -102.13, -3.7, 3.76)
pt3dadd(-42.14, -102.45, -3.7, 3.76)
pt3dadd(-42.14, -102.77, -3.7, 3.76)
pt3dadd(-42.28, -103.08, -3.7, 3.76)
pt3dadd(-42.28, -103.4, -3.7, 3.76)
pt3dadd(-42.42, -103.56, -3.7, 3.76)
pt3dadd(-42.42, -103.87, -3.7, 3.76)
pt3dadd(-42.55, -104.19, -3.7, 3.76)
pt3dadd(-42.55, -104.51, -3.7, 3.76)
pt3dadd(-42.69, -104.98, -3.7, 3.76)
pt3dadd(-42.83, -105.3, -3.7, 3.76)
pt3dadd(-42.83, -105.62, -3.7, 3.76)
pt3dadd(-42.97, -105.93, -3.7, 3.76)
pt3dadd(-43.11, -106.25, -3.7, 3.76)
pt3dadd(-43.25, -106.57, -3.7, 3.76)
pt3dadd(-43.25, -106.88, -3.7, 3.76)
pt3dadd(-43.39, -107.2, -3.7, 3.76)
pt3dadd(-43.53, -107.52, -3.7, 3.76)
pt3dadd(-43.67, -107.67, -3.7, 3.76)
pt3dadd(-43.81, -107.99, -3.7, 3.76)
pt3dadd(-43.95, -108.31, -3.7, 3.76)
pt3dadd(-43.95, -108.62, -3.7, 3.76)
pt3dadd(-44.09, -108.94, -3.7, 3.76)
pt3dadd(-44.23, -109.1, -3.7, 3.76)
pt3dadd(-44.37, -109.41, -3.7, 3.76)
pt3dadd(-44.51, -109.57, -3.7, 3.76)
pt3dadd(-44.65, -109.89, -3.7, 3.76)
pt3dadd(-44.92, -110.05, -3.7, 3.76)
pt3dadd(-44.92, -110.36, -3.7, 3.76)
pt3dadd(-45.2, -110.68, -3.7, 3.76)
pt3dadd(-45.34, -111, -3.7, 3.76)
pt3dadd(-45.62, -111.47, -3.7, 3.76)
pt3dadd(-45.9, -111.79, -3.7, 3.76)
pt3dadd(-46.04, -112.11, -3.7, 3.76)
pt3dadd(-46.18, -112.42, -3.7, 3.76)
pt3dadd(-46.46, -112.58, -3.7, 3.76)
pt3dadd(-46.6, -112.9, -3.7, 3.76)
pt3dadd(-46.74, -113.21, -3.7, 3.76)
pt3dadd(-47.29, -113.85, -3.7, 3.76)
pt3dadd(-47.43, -114, -3.7, 3.76)
pt3dadd(-47.57, -114.32, -3.7, 3.76)
pt3dadd(-48.13, -114.95, -3.7, 3.76)
pt3dadd(-48.41, -115.27, -3.7, 3.76)
pt3dadd(-48.55, -115.59, -3.7, 3.76)
pt3dadd(-48.83, -115.9, -3.7, 3.76)
pt3dadd(-49.1, -116.54, -3.7, 3.76)
pt3dadd(-49.24, -117.01, -3.7, 3.76)
pt3dadd(-49.52, -117.33, -3.7, 3.76)
pt3dadd(-49.8, -117.64, -3.7, 3.76)
pt3dadd(-49.94, -117.96, -3.7, 3.76)
pt3dadd(-50.08, -118.44, -3.7, 3.76)
pt3dadd(-50.22, -118.75, -3.7, 3.76)
pt3dadd(-50.36, -118.91, -3.7, 3.76)
pt3dadd(-50.78, -119.54, -3.7, 3.76)
pt3dadd(-50.92, -119.86, -3.7, 3.76)
pt3dadd(-51.06, -120.02, -3.7, 3.76)
pt3dadd(-51.33, -120.34, -3.7, 3.76)
pt3dadd(-51.47, -120.65, -3.7, 3.76)
pt3dadd(-51.61, -121.13, -3.7, 3.76)
pt3dadd(-51.89, -121.44, -3.7, 3.76)
pt3dadd(-51.89, -121.76, -3.7, 3.76)
pt3dadd(-52.17, -122.08, -3.7, 3.76)
pt3dadd(-52.45, -122.39, -3.7, 3.76)
pt3dadd(-52.59, -122.87, -3.7, 3.76)
pt3dadd(-52.73, -123.18, -3.7, 3.76)
pt3dadd(-52.87, -123.34, -3.7, 3.76)
pt3dadd(-53.29, -123.98, -3.7, 3.76)
pt3dadd(-53.42, -124.29, -3.7, 3.76)
pt3dadd(-53.56, -124.61, -3.7, 3.76)
pt3dadd(-53.7, -124.77, -3.7, 3.76)
pt3dadd(-53.84, -124.93, -3.7, 3.76)
pt3dadd(-54.12, -125.08, -3.7, 3.76)
pt3dadd(-54.4, -125.24, -3.7, 3.76)
pt3dadd(-54.54, -125.4, -3.7, 3.76)
pt3dadd(-54.68, -125.56, -3.7, 3.76)
pt3dadd(-54.82, -125.72, -3.7, 3.76)
pt3dadd(-54.96, -125.88, -3.7, 3.76)
pt3dadd(-55.1, -126.03, -3.7, 3.76)
pt3dadd(-55.38, -126.19, -3.7, 3.76)
pt3dadd(-55.38, -126.51, -3.7, 3.76)
pt3dadd(-55.65, -126.83, -3.7, 3.76)
pt3dadd(-55.93, -127.14, -3.7, 3.76)
pt3dadd(-56.07, -127.46, -3.7, 3.76)
pt3dadd(-56.21, -127.62, -3.7, 3.76)
pt3dadd(-56.49, -128.09, -3.7, 3.76)
pt3dadd(-56.63, -128.41, -3.7, 3.76)
pt3dadd(-56.77, -128.57, -3.7, 3.76)
pt3dadd(-56.91, -128.88, -3.7, 3.76)
pt3dadd(-57.19, -129.04, -3.7, 3.76)
pt3dadd(-57.33, -129.36, -3.7, 3.76)
pt3dadd(-57.47, -129.67, -3.7, 3.76)
pt3dadd(-57.61, -129.99, -3.7, 3.76)
pt3dadd(-57.74, -130.31, -3.7, 3.76)
pt3dadd(-57.88, -130.78, -3.7, 3.76)
pt3dadd(-58.02, -131.1, -3.7, 3.76)
pt3dadd(-58.3, -131.42, -3.7, 3.76)
pt3dadd(-58.44, -131.89, -3.7, 3.76)
pt3dadd(-58.72, -132.36, -3.7, 3.76)
pt3dadd(-58.86, -132.68, -3.7, 3.76)
pt3dadd(-59, -133.16, -3.7, 3.76)
pt3dadd(-59.14, -133.63, -3.7, 3.76)
pt3dadd(-59.28, -133.95, -3.7, 3.76)
pt3dadd(-59.28, -134.26, -3.7, 3.76)
pt3dadd(-59.42, -134.74, -3.7, 3.76)
pt3dadd(-59.56, -135.06, -3.7, 3.76)
pt3dadd(-59.7, -135.37, -3.7, 3.76)
pt3dadd(-59.83, -135.85, -3.7, 3.76)
pt3dadd(-59.83, -136.16, -3.7, 3.76)
pt3dadd(-59.97, -136.64, -3.7, 3.76)
pt3dadd(-60.11, -137.11, -3.7, 3.76)
pt3dadd(-60.25, -137.43, -3.7, 3.76)
pt3dadd(-60.39, -137.9, -3.7, 3.76)
pt3dadd(-60.53, -138.22, -3.7, 3.76)
pt3dadd(-60.67, -138.85, -3.7, 3.76)
pt3dadd(-60.81, -139.33, -3.7, 3.76)
pt3dadd(-60.81, -139.96, -3.7, 3.76)
pt3dadd(-60.95, -140.44, -3.7, 3.76)
pt3dadd(-61.09, -140.91, -3.7, 3.76)
pt3dadd(-61.23, -141.07, -3.7, 3.76)
pt3dadd(-61.37, -141.54, -3.7, 3.76)
pt3dadd(-61.37, -142.02, -3.7, 3.76)
pt3dadd(-61.51, -142.34, -3.7, 3.76)
pt3dadd(-61.79, -142.97, -3.7, 3.76)
pt3dadd(-61.93, -143.13, -3.7, 3.76)
pt3dadd(-61.93, -143.44, -3.7, 3.76)
pt3dadd(-62.06, -143.76, -3.7, 3.76)
pt3dadd(-62.34, -144.08, -3.7, 3.76)
pt3dadd(-62.48, -144.39, -3.7, 3.76)
pt3dadd(-62.34, -144.55, -3.7, 3.76)
pt3dadd(-62.2, -144.39, -3.7, 3.76)
pt3dadd(-62.2, -144.24, -3.7, 3.76)
pt3dadd(-62.2, -143.76, -3.7, 3.76)
pt3dadd(-62.34, -143.92, -3.7, 3.76)
pt3dadd(-62.48, -144.24, -3.7, 3.76)
pt3dadd(-62.76, -144.71, -3.7, 3.76)
pt3dadd(-62.9, -145.19, -3.7, 3.76)
pt3dadd(-63.04, -145.5, -3.7, 3.76)
pt3dadd(-63.18, -145.66, -3.7, 3.76)
pt3dadd(-63.46, -146.14, -3.7, 3.76)
pt3dadd(-63.46, -146.45, -3.7, 3.76)
pt3dadd(-63.74, -146.77, -3.7, 3.76)
pt3dadd(-64.02, -147.24, -3.7, 3.76)
pt3dadd(-64.15, -147.56, -3.7, 3.76)
pt3dadd(-64.43, -148.03, -3.7, 3.76)
pt3dadd(-64.43, -148.35, -3.7, 3.76)
pt3dadd(-64.71, -148.67, -3.7, 3.76)
pt3dadd(-64.85, -149.3, -3.7, 3.76)
pt3dadd(-65.13, -149.62, -3.7, 3.76)
pt3dadd(-65.27, -149.93, -3.7, 3.76)
pt3dadd(-65.41, -150.41, -3.7, 3.76)
pt3dadd(-65.69, -150.88, -3.7, 3.76)
pt3dadd(-65.83, -151.2, -3.7, 3.76)
pt3dadd(-65.97, -151.52, -3.7, 3.76)
pt3dadd(-66.25, -151.83, -3.7, 3.76)
pt3dadd(-66.66, -152.62, -3.7, 3.76)
pt3dadd(-66.94, -153.1, -3.7, 3.76)
pt3dadd(-66.94, -153.57, -3.7, 3.76)
pt3dadd(-67.22, -153.89, -3.7, 3.76)
pt3dadd(-67.36, -154.37, -3.7, 3.76)
pt3dadd(-67.64, -154.84, -3.7, 3.76)
pt3dadd(-67.92, -155.63, -3.7, 3.76)
pt3dadd(-68.2, -156.11, -3.7, 3.76)
pt3dadd(-68.2, -156.74, -3.7, 3.76)
pt3dadd(-68.47, -157.06, -3.7, 3.76)
pt3dadd(-68.75, -157.69, -3.7, 3.76)
pt3dadd(-68.89, -158.16, -3.7, 3.76)
pt3dadd(-69.17, -158.64, -3.7, 3.76)
pt3dadd(-69.31, -159.11, -3.7, 3.76)
pt3dadd(-69.45, -159.43, -3.7, 3.76)
pt3dadd(-69.59, -159.91, -3.7, 3.76)
pt3dadd(-69.87, -160.38, -3.7, 3.76)
pt3dadd(-69.87, -160.7, -3.7, 3.76)
pt3dadd(-70.15, -161.33, -3.7, 3.76)
pt3dadd(-70.29, -161.8, -3.7, 3.76)
pt3dadd(-70.43, -162.28, -3.7, 3.76)
pt3dadd(-70.57, -162.75, -3.7, 3.76)
pt3dadd(-70.7, -163.07, -3.7, 3.76)
pt3dadd(-70.84, -163.7, -3.7, 3.76)
pt3dadd(-70.98, -164.02, -3.7, 3.76)
pt3dadd(-71.12, -164.65, -3.7, 3.76)
pt3dadd(-71.12, -165.13, -3.7, 3.76)
pt3dadd(-71.4, -165.6, -3.7, 3.76)
pt3dadd(-71.4, -166.08, -3.7, 3.76)
pt3dadd(-71.54, -166.55, -3.7, 3.76)
pt3dadd(-71.68, -167.5, -3.7, 3.76)
pt3dadd(-71.82, -167.82, -3.7, 3.76)
pt3dadd(-71.96, -168.45, -3.7, 3.76)
pt3dadd(-72.1, -168.93, -3.7, 3.76)
pt3dadd(-72.1, -169.4, -3.7, 3.76)
pt3dadd(-72.24, -169.88, -3.7, 3.76)
pt3dadd(-72.38, -170.19, -3.7, 3.76)
pt3dadd(-72.38, -170.51, -3.7, 3.76)
pt3dadd(-72.52, -171.14, -3.7, 3.76)
pt3dadd(-72.66, -171.46, -3.7, 3.76)
pt3dadd(-72.79, -171.93, -3.7, 3.76)
pt3dadd(-72.93, -172.09, -3.7, 3.76)
pt3dadd(-73.07, -172.57, -3.7, 3.76)
}
}
proc shape3d_139() {
dend[94] { pt3dadd(-73.21, -173.04, -3.7, 3.76)
pt3dadd(-73.21, -173.36, -3.7, 3.76)
pt3dadd(-73.35, -173.68, -3.7, 3.76)
pt3dadd(-73.49, -174.31, -3.7, 3.76)
pt3dadd(-73.63, -174.78, -3.7, 3.76)
pt3dadd(-73.77, -175.1, -3.7, 3.76)
pt3dadd(-73.91, -175.57, -3.7, 3.76)
pt3dadd(-74.05, -176.05, -3.7, 3.76)
pt3dadd(-74.05, -176.52, -3.7, 3.76)
pt3dadd(-74.19, -177.16, -3.7, 3.76)
pt3dadd(-74.33, -177.79, -3.7, 3.76)
pt3dadd(-74.47, -177.95, -3.7, 3.76)
pt3dadd(-74.61, -178.42, -3.7, 3.76)
pt3dadd(-74.61, -178.74, -3.7, 3.76)
pt3dadd(-74.75, -179.06, -3.7, 3.76)
pt3dadd(-74.88, -179.37, -3.7, 3.76)
pt3dadd(-75.02, -179.85, -3.7, 3.76)
pt3dadd(-75.16, -180.16, -3.7, 3.76)
pt3dadd(-75.16, -180.64, -3.7, 3.76)
pt3dadd(-75.3, -180.96, -3.7, 3.76)
pt3dadd(-75.44, -181.27, -3.7, 3.76)
pt3dadd(-75.58, -181.59, -3.7, 3.76)
pt3dadd(-75.58, -181.91, -3.7, 3.76)
pt3dadd(-75.72, -182.22, -3.7, 3.76)
pt3dadd(-75.86, -182.54, -3.7, 3.76)
pt3dadd(-76, -182.86, -3.7, 3.76)
pt3dadd(-76, -183.33, -3.7, 3.76)
pt3dadd(-76, -183.17, -3.7, 3.76)
pt3dadd(-75.72, -182.38, -3.7, 3.76)
pt3dadd(-76, -182.7, -3.7, 3.76)
pt3dadd(-76.14, -183.01, -3.7, 3.76)
pt3dadd(-76.28, -183.17, -3.7, 3.76)
pt3dadd(-76.7, -183.65, -3.7, 3.76)
pt3dadd(-76.84, -183.81, -3.7, 3.76)
pt3dadd(-76.98, -184.12, -3.7, 3.76)
pt3dadd(-77.11, -184.28, -3.7, 3.76)
pt3dadd(-77.25, -184.6, -3.7, 3.76)
pt3dadd(-77.39, -184.91, -3.7, 3.76)
pt3dadd(-77.67, -185.23, -3.7, 3.76)
pt3dadd(-77.81, -185.55, -3.7, 3.76)
pt3dadd(-77.95, -185.86, -3.7, 3.76)
pt3dadd(-78.23, -186.02, -3.7, 3.76)
pt3dadd(-78.37, -186.34, -3.7, 3.76)
pt3dadd(-78.51, -186.65, -3.7, 3.76)
pt3dadd(-78.93, -187.13, -3.7, 3.76)
pt3dadd(-79.07, -187.29, -3.7, 3.76)
pt3dadd(-79.2, -187.6, -3.7, 3.76)
pt3dadd(-79.34, -187.76, -3.7, 3.76)
pt3dadd(-79.48, -188.08, -3.7, 3.76)
pt3dadd(-79.76, -188.4, -3.7, 3.76)
pt3dadd(-79.9, -188.71, -3.7, 3.76)
pt3dadd(-80.04, -189.03, -3.7, 3.76)
pt3dadd(-80.32, -189.34, -3.7, 3.76)
pt3dadd(-80.46, -189.66, -3.7, 3.76)
pt3dadd(-80.6, -189.82, -3.7, 3.76)
pt3dadd(-80.88, -190.45, -3.7, 3.76)
pt3dadd(-81.02, -190.61, -3.7, 3.76)
pt3dadd(-81.3, -190.93, -3.7, 3.76)
pt3dadd(-81.43, -191.24, -3.7, 3.76)
pt3dadd(-81.71, -191.72, -3.7, 3.76)
pt3dadd(-81.85, -192.04, -3.7, 3.76)
pt3dadd(-81.99, -192.35, -3.7, 3.76)
pt3dadd(-82.27, -192.67, -3.7, 3.76)
pt3dadd(-82.41, -193.14, -3.7, 3.76)
pt3dadd(-82.69, -193.62, -3.7, 3.76)
pt3dadd(-82.83, -193.93, -3.7, 3.76)
pt3dadd(-82.97, -194.41, -3.7, 3.76)
pt3dadd(-83.11, -194.57, -3.7, 3.76)
pt3dadd(-83.39, -195.04, -3.7, 3.76)
pt3dadd(-83.66, -195.36, -3.7, 3.76)
pt3dadd(-83.8, -195.68, -3.7, 3.76)
pt3dadd(-83.94, -195.99, -3.7, 3.76)
pt3dadd(-84.08, -196.15, -3.7, 3.76)
pt3dadd(-84.36, -196.47, -3.7, 3.76)
pt3dadd(-84.5, -196.63, -3.7, 3.76)
pt3dadd(-84.64, -196.78, -3.7, 3.76)
pt3dadd(-84.78, -197.1, -3.7, 3.76)
pt3dadd(-85.06, -197.42, -3.7, 3.76)
pt3dadd(-85.2, -197.73, -3.7, 3.76)
pt3dadd(-85.34, -197.89, -3.7, 3.76)
pt3dadd(-85.62, -198.05, -3.7, 3.76)
pt3dadd(-85.62, -198.37, -3.7, 3.76)
pt3dadd(-85.89, -198.52, -3.7, 3.76)
pt3dadd(-86.03, -198.84, -3.7, 3.76)
pt3dadd(-86.17, -199.16, -3.7, 3.76)
pt3dadd(-86.31, -199.32, -3.7, 3.76)
pt3dadd(-86.59, -199.63, -3.7, 3.76)
pt3dadd(-86.73, -199.79, -3.7, 3.76)
pt3dadd(-86.87, -199.95, -3.7, 3.76)
pt3dadd(-87.01, -200.27, -3.7, 3.76)
pt3dadd(-87.15, -200.42, -3.7, 3.76)
pt3dadd(-87.29, -200.74, -3.7, 3.76)
pt3dadd(-87.43, -200.9, -3.7, 3.76)
pt3dadd(-87.57, -201.22, -3.7, 3.76)
pt3dadd(-87.71, -201.53, -3.7, 3.76)
pt3dadd(-87.84, -201.69, -3.7, 3.76)
pt3dadd(-88.26, -202.64, -3.7, 3.76)
pt3dadd(-88.4, -202.96, -3.7, 3.76)
pt3dadd(-88.54, -203.43, -3.7, 3.76)
pt3dadd(-88.68, -203.75, -3.7, 3.76)
pt3dadd(-88.82, -204.06, -3.7, 3.76)
pt3dadd(-88.96, -204.38, -3.7, 3.76)
pt3dadd(-89.1, -204.86, -3.7, 3.76)
pt3dadd(-89.38, -205.17, -3.7, 3.76)
pt3dadd(-89.52, -205.49, -3.7, 3.76)
pt3dadd(-89.66, -205.96, -3.7, 3.76)
pt3dadd(-89.8, -206.28, -3.7, 3.76)
pt3dadd(-89.94, -206.6, -3.7, 3.76)
pt3dadd(-90.21, -206.91, -3.7, 3.76)
pt3dadd(-90.21, -207.39, -3.7, 3.76)
pt3dadd(-90.35, -207.7, -3.7, 3.76)
pt3dadd(-90.63, -208.02, -3.7, 3.76)
pt3dadd(-90.63, -208.5, -3.7, 3.76)
pt3dadd(-90.91, -208.65, -3.7, 3.76)
pt3dadd(-91.05, -209.13, -3.7, 3.76)
pt3dadd(-91.19, -209.29, -3.7, 3.76)
pt3dadd(-91.33, -209.92, -3.7, 3.76)
pt3dadd(-91.47, -210.24, -3.7, 3.76)
pt3dadd(-91.75, -210.71, -3.7, 3.76)
pt3dadd(-92.03, -211.19, -3.7, 3.76)
pt3dadd(-92.16, -211.5, -3.7, 3.76)
pt3dadd(-92.3, -211.98, -3.7, 3.76)
pt3dadd(-92.44, -212.3, -3.7, 3.76)
pt3dadd(-92.58, -212.61, -3.7, 3.76)
pt3dadd(-92.72, -212.93, -3.7, 3.76)
pt3dadd(-93, -213.4, -3.7, 3.76)
pt3dadd(-93.14, -213.88, -3.7, 3.76)
pt3dadd(-93.42, -214.35, -3.7, 3.76)
pt3dadd(-93.56, -214.67, -3.7, 3.76)
pt3dadd(-91.03, -216.05, -3.7, 3.76)
}
dend[95] {pt3dclear()
pt3dadd(-91.03, -216.05, -3.7, 1.36)
pt3dadd(-99.86, -216.82, -14.7, 1.36)
pt3dadd(-107.16, -220.56, -14.7, 2.89)
pt3dadd(-107.34, -220.97, -14.7, 2.89)
pt3dadd(-107.52, -221.17, -14.7, 2.89)
pt3dadd(-107.87, -221.78, -14.7, 2.89)
pt3dadd(-108.05, -222.18, -14.7, 2.89)
pt3dadd(-108.41, -222.39, -14.7, 2.89)
pt3dadd(-108.59, -222.79, -14.7, 2.89)
pt3dadd(-108.76, -223.4, -14.7, 2.89)
pt3dadd(-109.12, -223.6, -14.7, 2.89)
pt3dadd(-109.12, -224.01, -14.7, 2.89)
pt3dadd(-109.48, -224.21, -14.7, 2.89)
pt3dadd(-109.66, -224.82, -14.7, 2.89)
pt3dadd(-109.83, -225.22, -14.7, 2.89)
pt3dadd(-110.19, -225.63, -14.7, 2.89)
pt3dadd(-110.55, -226.23, -14.7, 2.89)
pt3dadd(-111.08, -227.25, -14.7, 2.89)
pt3dadd(-111.44, -227.65, -14.7, 2.89)
pt3dadd(-111.62, -228.06, -14.7, 2.89)
pt3dadd(-111.8, -228.46, -14.7, 2.89)
pt3dadd(-112.15, -229.07, -14.7, 2.89)
pt3dadd(-112.33, -229.48, -14.7, 2.89)
pt3dadd(-112.51, -229.88, -14.7, 2.89)
pt3dadd(-112.87, -230.08, -14.7, 2.89)
pt3dadd(-113.04, -230.69, -14.7, 2.89)
pt3dadd(-113.22, -231.1, -14.7, 2.89)
pt3dadd(-113.4, -231.3, -14.7, 2.89)
pt3dadd(-113.58, -231.7, -14.7, 2.89)
pt3dadd(-113.76, -231.91, -14.7, 2.89)
pt3dadd(-114.11, -232.31, -14.7, 2.89)
pt3dadd(-114.29, -232.92, -14.7, 2.89)
pt3dadd(-114.47, -233.53, -14.7, 2.89)
pt3dadd(-114.65, -233.93, -14.7, 2.89)
pt3dadd(-114.83, -234.54, -14.7, 2.89)
pt3dadd(-115.01, -234.94, -14.7, 2.89)
pt3dadd(-115.36, -235.35, -14.7, 2.89)
pt3dadd(-115.54, -236.16, -14.7, 2.89)
pt3dadd(-115.72, -236.56, -14.7, 2.89)
pt3dadd(-115.72, -236.97, -14.7, 2.89)
pt3dadd(-115.9, -237.37, -14.7, 2.89)
pt3dadd(-116.07, -237.78, -14.7, 2.89)
pt3dadd(-116.25, -238.18, -14.7, 2.89)
pt3dadd(-116.43, -238.59, -14.7, 2.89)
pt3dadd(-116.43, -239, -14.7, 2.89)
pt3dadd(-116.61, -239.4, -14.7, 2.89)
pt3dadd(-116.61, -239.81, -14.7, 2.89)
pt3dadd(-116.79, -240.21, -14.7, 2.89)
pt3dadd(-116.97, -240.82, -14.7, 2.89)
pt3dadd(-116.97, -241.43, -14.7, 2.89)
pt3dadd(-117.14, -241.83, -14.7, 2.89)
pt3dadd(-117.32, -242.24, -14.7, 2.89)
pt3dadd(-117.32, -242.84, -14.7, 2.89)
pt3dadd(-117.5, -243.45, -14.7, 2.89)
pt3dadd(-117.68, -244.06, -14.7, 2.89)
pt3dadd(-117.86, -244.46, -14.7, 2.89)
pt3dadd(-117.86, -245.07, -14.7, 2.89)
pt3dadd(-118.04, -245.68, -14.7, 2.89)
pt3dadd(-118.04, -246.08, -14.7, 2.89)
pt3dadd(-118.21, -246.49, -14.7, 2.89)
pt3dadd(-118.21, -247.1, -14.7, 2.89)
pt3dadd(-118.39, -247.7, -14.7, 2.89)
pt3dadd(-118.57, -248.11, -14.7, 2.89)
pt3dadd(-118.75, -248.51, -14.7, 2.89)
pt3dadd(-118.75, -249.12, -14.7, 2.89)
pt3dadd(-118.93, -249.73, -14.7, 2.89)
pt3dadd(-119.11, -250.34, -14.7, 2.89)
pt3dadd(-119.28, -250.74, -14.7, 2.89)
pt3dadd(-119.28, -251.35, -14.7, 2.89)
pt3dadd(-119.46, -251.96, -14.7, 2.89)
}
}
proc shape3d_140() {
dend[95] { pt3dadd(-119.64, -252.57, -14.7, 2.89)
pt3dadd(-119.82, -253.17, -14.7, 2.89)
pt3dadd(-119.82, -253.58, -14.7, 2.89)
pt3dadd(-120, -254.19, -14.7, 2.89)
pt3dadd(-120.18, -254.79, -14.7, 2.89)
pt3dadd(-120.18, -255.4, -14.7, 2.89)
pt3dadd(-120.35, -256.01, -14.7, 2.89)
pt3dadd(-120.53, -256.62, -14.7, 2.89)
pt3dadd(-120.71, -257.02, -14.7, 2.89)
pt3dadd(-120.71, -257.43, -14.7, 2.89)
pt3dadd(-120.89, -258.03, -14.7, 2.89)
pt3dadd(-121.07, -258.64, -14.7, 2.89)
pt3dadd(-121.07, -259.25, -14.7, 2.89)
pt3dadd(-121.25, -259.65, -14.7, 2.89)
pt3dadd(-121.42, -260.06, -14.7, 2.89)
pt3dadd(-121.42, -260.67, -14.7, 2.89)
pt3dadd(-121.6, -261.28, -14.7, 2.89)
pt3dadd(-121.78, -261.88, -14.7, 2.89)
pt3dadd(-121.78, -262.29, -14.7, 2.89)
pt3dadd(-121.96, -262.69, -14.7, 2.89)
pt3dadd(-121.96, -263.3, -14.7, 2.89)
pt3dadd(-122.14, -263.71, -14.7, 2.89)
pt3dadd(-122.32, -264.31, -14.7, 2.89)
pt3dadd(-122.32, -265.73, -14.7, 2.89)
pt3dadd(-122.49, -266.34, -14.7, 2.89)
pt3dadd(-122.49, -267.15, -14.7, 2.89)
pt3dadd(-122.67, -267.76, -14.7, 2.89)
pt3dadd(-122.67, -268.77, -14.7, 2.89)
pt3dadd(-122.85, -269.17, -14.7, 2.89)
pt3dadd(-122.85, -270.19, -14.7, 2.89)
pt3dadd(-123.03, -270.59, -14.7, 2.89)
pt3dadd(-123.03, -271.61, -14.7, 2.89)
pt3dadd(-123.21, -271.81, -14.7, 2.89)
pt3dadd(-123.21, -272.62, -14.7, 2.89)
pt3dadd(-123.39, -272.82, -14.7, 2.89)
pt3dadd(-123.39, -273.02, -14.7, 2.89)
pt3dadd(-123.39, -272.42, -16.8, 2.55)
pt3dadd(-123.39, -273.83, -16.8, 2.55)
pt3dadd(-123.56, -274.04, -16.8, 2.55)
pt3dadd(-123.74, -274.64, -16.8, 2.55)
pt3dadd(-123.74, -275.66, -16.8, 2.55)
pt3dadd(-123.92, -276.06, -16.8, 2.55)
pt3dadd(-124.1, -276.47, -16.8, 2.55)
pt3dadd(-124.28, -276.87, -16.8, 2.55)
pt3dadd(-124.28, -277.48, -16.8, 2.55)
pt3dadd(-124.46, -277.68, -16.8, 2.55)
pt3dadd(-124.46, -278.09, -16.8, 2.55)
pt3dadd(-124.63, -278.29, -16.8, 2.55)
pt3dadd(-124.63, -278.69, -16.8, 2.55)
pt3dadd(-124.81, -278.9, -16.8, 2.55)
pt3dadd(-124.81, -279.3, -16.8, 2.55)
pt3dadd(-124.99, -279.5, -16.8, 2.55)
pt3dadd(-125.17, -279.91, -16.8, 2.55)
pt3dadd(-125.35, -280.31, -16.8, 2.55)
pt3dadd(-125.53, -280.72, -16.8, 2.55)
pt3dadd(-125.7, -281.12, -16.8, 2.55)
pt3dadd(-125.7, -281.53, -16.8, 2.55)
pt3dadd(-125.88, -281.73, -16.8, 2.55)
pt3dadd(-126.24, -282.54, -16.8, 2.55)
pt3dadd(-126.42, -282.95, -16.8, 2.55)
pt3dadd(-126.6, -283.35, -16.8, 2.55)
pt3dadd(-126.77, -283.96, -16.8, 2.55)
pt3dadd(-126.95, -284.57, -16.8, 2.55)
pt3dadd(-127.13, -284.97, -16.8, 2.55)
pt3dadd(-127.31, -285.58, -16.8, 2.55)
pt3dadd(-127.49, -285.99, -16.8, 2.55)
pt3dadd(-127.67, -286.39, -16.8, 2.55)
pt3dadd(-127.84, -287, -16.8, 2.55)
pt3dadd(-128.02, -287.4, -16.8, 2.55)
pt3dadd(-128.2, -287.81, -16.8, 2.55)
pt3dadd(-128.2, -288.42, -16.8, 2.55)
pt3dadd(-128.38, -288.82, -16.8, 2.55)
pt3dadd(-128.56, -289.23, -16.8, 2.55)
pt3dadd(-128.74, -289.43, -16.8, 2.55)
pt3dadd(-129.09, -290.04, -16.8, 2.55)
pt3dadd(-129.27, -290.64, -16.8, 2.55)
pt3dadd(-129.45, -291.05, -16.8, 2.55)
pt3dadd(-129.63, -291.25, -16.8, 2.55)
pt3dadd(-129.81, -291.66, -16.8, 2.55)
pt3dadd(-129.98, -292.06, -16.8, 2.55)
pt3dadd(-130.16, -292.47, -16.8, 2.55)
pt3dadd(-130.34, -292.87, -16.8, 2.55)
pt3dadd(-130.52, -293.28, -16.8, 2.55)
pt3dadd(-130.88, -293.68, -16.8, 2.55)
pt3dadd(-131.05, -293.89, -16.8, 2.55)
pt3dadd(-131.23, -294.49, -16.8, 2.55)
pt3dadd(-131.41, -294.7, -16.8, 2.55)
pt3dadd(-131.77, -295.1, -16.8, 2.55)
pt3dadd(-131.95, -295.51, -16.8, 2.55)
pt3dadd(-132.12, -295.91, -16.8, 2.55)
pt3dadd(-132.3, -296.32, -16.8, 2.55)
pt3dadd(-132.48, -296.52, -16.8, 2.55)
pt3dadd(-132.66, -296.92, -16.8, 2.55)
pt3dadd(-132.84, -297.13, -16.8, 2.55)
pt3dadd(-133.02, -297.53, -16.8, 2.55)
pt3dadd(-133.37, -297.94, -16.8, 2.55)
pt3dadd(-133.55, -298.34, -16.8, 2.55)
pt3dadd(-133.73, -298.75, -16.8, 2.55)
pt3dadd(-133.91, -299.15, -16.8, 2.55)
pt3dadd(-134.09, -299.56, -16.8, 2.55)
pt3dadd(-134.26, -299.76, -16.8, 2.55)
pt3dadd(-134.44, -299.96, -16.8, 2.55)
pt3dadd(-134.62, -300.37, -16.8, 2.55)
pt3dadd(-134.8, -300.57, -16.8, 2.55)
pt3dadd(-134.98, -300.97, -16.8, 2.55)
pt3dadd(-135.16, -301.18, -16.8, 2.55)
pt3dadd(-135.51, -301.58, -16.8, 2.55)
pt3dadd(-135.69, -301.78, -16.8, 2.55)
pt3dadd(-135.69, -302.19, -16.8, 2.55)
pt3dadd(-136.23, -302.8, -16.8, 2.55)
pt3dadd(-136.4, -303.2, -16.8, 2.55)
pt3dadd(-136.58, -303.4, -16.8, 2.55)
pt3dadd(-136.76, -303.81, -16.8, 2.55)
pt3dadd(-137.12, -304.42, -16.8, 2.55)
pt3dadd(-137.47, -304.82, -16.8, 2.55)
pt3dadd(-137.65, -305.23, -16.8, 2.55)
pt3dadd(-137.83, -305.63, -16.8, 2.55)
pt3dadd(-138.01, -306.04, -16.8, 2.55)
pt3dadd(-138.19, -306.44, -16.8, 2.55)
pt3dadd(-138.54, -307.05, -16.8, 2.55)
pt3dadd(-138.72, -307.46, -16.8, 2.55)
pt3dadd(-139.08, -308.27, -16.8, 2.55)
pt3dadd(-139.26, -308.47, -16.8, 2.55)
pt3dadd(-139.44, -309.08, -16.8, 2.55)
pt3dadd(-139.61, -309.48, -16.8, 2.55)
pt3dadd(-139.79, -309.89, -16.8, 2.55)
pt3dadd(-139.97, -310.29, -16.8, 2.55)
pt3dadd(-140.33, -310.49, -16.8, 2.55)
pt3dadd(-140.51, -310.9, -16.8, 2.55)
pt3dadd(-140.68, -311.1, -16.8, 2.55)
pt3dadd(-141.04, -311.51, -16.8, 2.55)
pt3dadd(-141.04, -311.91, -16.8, 2.55)
pt3dadd(-141.4, -312.11, -16.8, 2.55)
pt3dadd(-141.58, -312.32, -16.8, 2.55)
pt3dadd(-141.75, -312.52, -16.8, 2.55)
pt3dadd(-141.75, -312.11, -16.8, 2.55)
pt3dadd(-140.86, -310.9, -19.95, 2.55)
pt3dadd(-140.86, -311.3, -19.95, 2.55)
pt3dadd(-141.04, -311.51, -19.95, 2.55)
pt3dadd(-141.22, -311.91, -19.95, 2.55)
pt3dadd(-141.4, -312.32, -19.95, 2.55)
pt3dadd(-141.58, -312.72, -19.95, 2.55)
pt3dadd(-141.75, -312.92, -19.95, 2.55)
pt3dadd(-141.93, -313.13, -19.95, 2.55)
pt3dadd(-141.93, -313.53, -19.95, 2.55)
pt3dadd(-142.11, -313.73, -19.95, 2.55)
pt3dadd(-142.29, -314.14, -19.95, 2.55)
pt3dadd(-142.47, -314.54, -19.95, 2.55)
pt3dadd(-142.65, -315.15, -19.95, 2.55)
pt3dadd(-143, -315.76, -19.95, 2.55)
pt3dadd(-143.18, -316.17, -19.95, 2.55)
pt3dadd(-143.54, -316.57, -19.95, 2.55)
pt3dadd(-143.54, -316.98, -19.95, 2.55)
pt3dadd(-143.89, -317.38, -19.95, 2.55)
pt3dadd(-144.07, -317.99, -19.95, 2.55)
pt3dadd(-144.25, -318.39, -19.95, 2.55)
pt3dadd(-144.43, -319, -19.95, 2.55)
pt3dadd(-144.79, -319.41, -19.95, 2.55)
pt3dadd(-144.96, -319.81, -19.95, 2.55)
pt3dadd(-144.96, -320.22, -19.95, 2.55)
pt3dadd(-145.32, -320.62, -19.95, 2.55)
pt3dadd(-145.68, -321.03, -19.95, 2.55)
pt3dadd(-145.86, -321.63, -19.95, 2.55)
pt3dadd(-146.03, -322.04, -19.95, 2.55)
pt3dadd(-146.39, -322.65, -19.95, 2.55)
pt3dadd(-146.75, -323.25, -19.95, 2.55)
pt3dadd(-146.93, -323.66, -19.95, 2.55)
pt3dadd(-147.1, -324.06, -19.95, 2.55)
pt3dadd(-147.28, -324.47, -19.95, 2.55)
pt3dadd(-147.64, -324.87, -19.95, 2.55)
pt3dadd(-147.82, -325.28, -19.95, 2.55)
pt3dadd(-148, -325.68, -19.95, 2.55)
pt3dadd(-148.35, -326.09, -19.95, 2.55)
pt3dadd(-148.53, -326.29, -19.95, 2.55)
pt3dadd(-148.71, -326.5, -19.95, 2.55)
pt3dadd(-148.89, -326.7, -19.95, 2.55)
pt3dadd(-149.07, -326.9, -19.95, 2.55)
pt3dadd(-149.42, -327.1, -19.95, 2.55)
pt3dadd(-149.78, -327.31, -19.95, 2.55)
pt3dadd(-150.14, -327.31, -19.95, 2.55)
pt3dadd(-150.49, -327.51, -19.95, 2.55)
pt3dadd(-150.85, -327.51, -19.95, 2.55)
pt3dadd(-151.03, -327.71, -19.95, 2.55)
pt3dadd(-151.21, -327.91, -21, 2.04)
pt3dadd(-151.56, -328.12, -21, 2.04)
pt3dadd(-151.74, -328.32, -21, 2.04)
pt3dadd(-151.92, -328.52, -21, 2.04)
pt3dadd(-152.1, -328.72, -21, 2.04)
pt3dadd(-152.28, -329.13, -21, 2.04)
pt3dadd(-152.63, -329.53, -21, 2.04)
pt3dadd(-152.81, -329.74, -21, 2.04)
pt3dadd(-153.17, -330.14, -21, 2.04)
pt3dadd(-153.35, -330.55, -21, 2.04)
pt3dadd(-153.7, -330.75, -21, 2.04)
pt3dadd(-153.88, -330.95, -21, 2.04)
pt3dadd(-154.06, -331.36, -21, 2.04)
pt3dadd(-154.24, -331.56, -21, 2.04)
pt3dadd(-154.42, -331.76, -21, 2.04)
pt3dadd(-154.95, -332.37, -21, 2.04)
pt3dadd(-155.13, -332.77, -21, 2.04)
}
}
proc shape3d_141() {
dend[95] { pt3dadd(-155.31, -332.98, -21, 2.04)
pt3dadd(-155.49, -333.38, -21, 2.04)
pt3dadd(-155.66, -333.79, -21, 2.04)
pt3dadd(-155.84, -333.99, -21, 2.04)
pt3dadd(-156.38, -334.8, -21, 2.04)
pt3dadd(-156.56, -335.41, -21, 2.04)
pt3dadd(-156.91, -335.61, -21, 2.04)
pt3dadd(-157.09, -336.01, -21, 2.04)
pt3dadd(-157.27, -336.42, -21, 2.04)
pt3dadd(-157.8, -337.03, -21, 2.04)
pt3dadd(-157.98, -337.43, -21, 2.04)
pt3dadd(-158.16, -338.24, -21, 2.04)
pt3dadd(-158.34, -338.45, -21, 2.04)
pt3dadd(-158.52, -339.05, -21, 2.04)
pt3dadd(-158.87, -339.46, -21, 2.04)
pt3dadd(-159.05, -339.86, -21, 2.04)
pt3dadd(-159.23, -340.27, -21, 2.04)
pt3dadd(-159.41, -340.67, -21, 2.04)
pt3dadd(-159.59, -341.28, -21, 2.04)
pt3dadd(-159.77, -341.69, -21, 2.04)
pt3dadd(-159.94, -342.09, -21, 2.04)
pt3dadd(-160.12, -342.5, -21, 2.04)
pt3dadd(-160.48, -342.9, -21, 2.04)
pt3dadd(-160.66, -343.31, -21, 2.04)
pt3dadd(-160.66, -343.71, -21, 2.04)
pt3dadd(-160.84, -344.12, -21, 2.04)
pt3dadd(-161.01, -344.52, -21, 2.04)
pt3dadd(-161.19, -344.93, -21, 2.04)
pt3dadd(-161.37, -345.33, -21, 2.04)
pt3dadd(-161.55, -345.94, -21, 2.04)
pt3dadd(-161.73, -346.34, -21, 2.04)
pt3dadd(-161.91, -346.95, -21, 2.04)
pt3dadd(-162.08, -347.36, -21, 2.04)
pt3dadd(-162.26, -347.76, -21, 2.04)
pt3dadd(-162.44, -348.17, -21, 2.04)
pt3dadd(-162.44, -348.57, -21, 2.04)
pt3dadd(-162.62, -348.78, -21, 2.04)
pt3dadd(-162.62, -348.17, -21, 2.04)
pt3dadd(-162.44, -348.78, -23.1, 2.04)
pt3dadd(-163.87, -357.28, -23.1, 2.04)
pt3dadd(-163.51, -355.86, -23.1, 2.04)
pt3dadd(-163.51, -357.28, -23.1, 2.04)
pt3dadd(-163.69, -357.69, -23.1, 2.04)
pt3dadd(-163.69, -358.7, -23.1, 2.04)
pt3dadd(-163.87, -358.9, -23.1, 2.04)
pt3dadd(-163.87, -359.71, -23.1, 2.04)
pt3dadd(-164.05, -359.92, -23.1, 2.04)
pt3dadd(-164.05, -362.75, -23.1, 2.04)
pt3dadd(-164.22, -361.13, -25.2, 2.04)
pt3dadd(-164.22, -361.54, -25.2, 2.04)
pt3dadd(-164.4, -361.74, -25.2, 2.04)
pt3dadd(-164.4, -362.14, -25.2, 2.04)
pt3dadd(-164.58, -362.35, -25.2, 2.04)
pt3dadd(-164.58, -362.95, -25.2, 2.04)
pt3dadd(-164.76, -363.16, -25.2, 2.04)
pt3dadd(-164.76, -364.37, -25.2, 2.04)
pt3dadd(-164.94, -364.57, -25.2, 2.04)
pt3dadd(-164.94, -365.59, -25.2, 2.04)
pt3dadd(-165.12, -365.79, -25.2, 2.04)
pt3dadd(-165.12, -366.4, -25.2, 2.04)
pt3dadd(-165.29, -366.8, -25.2, 2.04)
pt3dadd(-165.29, -367.41, -25.2, 2.04)
pt3dadd(-165.47, -367.81, -25.2, 2.04)
pt3dadd(-165.47, -368.42, -25.2, 2.04)
pt3dadd(-165.65, -368.83, -25.2, 2.04)
pt3dadd(-165.65, -369.23, -25.2, 2.04)
pt3dadd(-165.83, -369.84, -25.2, 2.04)
pt3dadd(-165.83, -370.25, -25.2, 2.04)
pt3dadd(-166.01, -370.45, -25.2, 2.04)
pt3dadd(-166.01, -370.85, -25.2, 2.04)
pt3dadd(-166.19, -371.06, -25.2, 2.04)
pt3dadd(-166.19, -371.66, -25.2, 2.04)
pt3dadd(-166.36, -371.87, -25.2, 2.04)
pt3dadd(-166.54, -372.27, -25.2, 2.04)
pt3dadd(-166.54, -372.68, -25.2, 2.04)
pt3dadd(-166.72, -372.88, -25.2, 2.04)
pt3dadd(-167.08, -373.89, -25.2, 2.04)
pt3dadd(-167.26, -374.09, -25.2, 2.04)
pt3dadd(-167.26, -374.7, -25.2, 2.04)
pt3dadd(-167.43, -374.9, -25.2, 2.04)
pt3dadd(-167.61, -375.11, -25.2, 2.04)
pt3dadd(-167.79, -375.71, -25.2, 2.04)
pt3dadd(-167.79, -376.12, -25.2, 2.04)
pt3dadd(-167.97, -376.32, -25.2, 2.04)
pt3dadd(-168.15, -376.73, -25.2, 2.04)
pt3dadd(-168.33, -377.33, -25.2, 2.04)
pt3dadd(-168.5, -377.74, -25.2, 2.04)
pt3dadd(-168.68, -377.94, -25.2, 2.04)
pt3dadd(-168.68, -378.35, -25.2, 2.04)
pt3dadd(-168.86, -378.75, -25.2, 2.04)
pt3dadd(-169.04, -379.16, -25.2, 2.04)
pt3dadd(-169.04, -379.76, -25.2, 2.04)
pt3dadd(-169.22, -380.37, -25.2, 2.04)
pt3dadd(-169.4, -380.98, -25.2, 2.04)
pt3dadd(-169.57, -381.18, -25.2, 2.04)
pt3dadd(-169.75, -381.79, -25.2, 2.04)
pt3dadd(-169.75, -382.8, -25.2, 2.04)
pt3dadd(-169.22, -381.79, -25.2, 2.04)
pt3dadd(-169.4, -381.99, -25.2, 2.04)
pt3dadd(-169.75, -382.2, -25.2, 2.04)
pt3dadd(-170.11, -382.8, -25.2, 2.04)
pt3dadd(-170.29, -383.21, -25.2, 2.04)
pt3dadd(-170.47, -383.61, -25.2, 2.04)
pt3dadd(-170.64, -383.82, -25.2, 2.04)
pt3dadd(-170.64, -384.22, -25.2, 2.04)
pt3dadd(-170.82, -384.42, -25.2, 2.04)
pt3dadd(-171, -384.83, -25.2, 2.04)
pt3dadd(-171, -385.23, -25.2, 2.04)
pt3dadd(-171.18, -385.44, -25.2, 2.04)
pt3dadd(-171.36, -385.84, -25.2, 2.04)
pt3dadd(-171.36, -386.25, -25.2, 2.04)
pt3dadd(-171.54, -386.45, -25.2, 2.04)
pt3dadd(-171.71, -386.65, -25.2, 2.04)
pt3dadd(-171.71, -387.06, -25.2, 2.04)
pt3dadd(-171.89, -387.26, -25.2, 2.04)
pt3dadd(-172.07, -387.66, -25.2, 2.04)
pt3dadd(-172.07, -388.07, -25.2, 2.04)
pt3dadd(-172.25, -388.27, -25.2, 2.04)
pt3dadd(-172.43, -388.47, -25.2, 2.04)
pt3dadd(-172.43, -388.88, -25.2, 2.04)
pt3dadd(-172.61, -389.08, -25.2, 2.04)
pt3dadd(-172.61, -389.49, -25.2, 2.04)
pt3dadd(-172.78, -389.69, -25.2, 2.04)
pt3dadd(-172.96, -390.09, -25.2, 2.04)
pt3dadd(-173.14, -390.5, -25.2, 2.04)
pt3dadd(-173.32, -390.7, -25.2, 2.04)
pt3dadd(-173.5, -391.11, -25.2, 2.04)
pt3dadd(-173.68, -391.51, -25.2, 2.04)
pt3dadd(-173.85, -391.92, -25.2, 2.04)
pt3dadd(-174.03, -392.32, -25.2, 2.04)
pt3dadd(-174.21, -392.73, -25.2, 2.04)
pt3dadd(-174.39, -393.13, -25.2, 2.04)
pt3dadd(-174.57, -393.34, -25.2, 2.04)
pt3dadd(-174.75, -393.74, -25.2, 2.04)
pt3dadd(-174.92, -393.94, -25.2, 2.04)
pt3dadd(-175.1, -394.35, -25.2, 2.04)
pt3dadd(-175.28, -394.75, -25.2, 2.04)
pt3dadd(-175.64, -395.16, -25.2, 2.04)
pt3dadd(-175.82, -395.56, -25.2, 2.04)
pt3dadd(-175.99, -395.77, -25.2, 2.04)
pt3dadd(-176.17, -396.17, -25.2, 2.04)
pt3dadd(-176.71, -397.18, -25.2, 2.04)
pt3dadd(-176.89, -397.59, -25.2, 2.04)
pt3dadd(-177.24, -397.99, -25.2, 2.04)
pt3dadd(-177.6, -398.6, -25.2, 2.04)
pt3dadd(-177.78, -399.01, -25.2, 2.04)
pt3dadd(-177.96, -399.21, -25.2, 2.04)
pt3dadd(-178.13, -399.61, -25.2, 2.04)
pt3dadd(-178.31, -399.82, -25.2, 2.04)
pt3dadd(-178.49, -400.22, -25.2, 2.04)
pt3dadd(-178.67, -400.63, -25.2, 2.04)
pt3dadd(-178.85, -401.03, -25.2, 2.04)
pt3dadd(-179.03, -401.23, -25.2, 2.04)
pt3dadd(-179.2, -401.64, -25.2, 2.04)
pt3dadd(-179.56, -402.05, -25.2, 2.04)
pt3dadd(-179.74, -402.45, -25.2, 2.04)
pt3dadd(-179.92, -402.65, -25.2, 2.04)
pt3dadd(-179.92, -403.06, -25.2, 2.04)
pt3dadd(-180.1, -403.26, -25.2, 2.04)
pt3dadd(-180.45, -403.87, -25.2, 2.04)
pt3dadd(-180.63, -404.27, -25.2, 2.04)
pt3dadd(-180.81, -404.68, -25.2, 2.04)
pt3dadd(-180.99, -404.88, -25.2, 2.04)
pt3dadd(-181.34, -405.49, -25.2, 2.04)
pt3dadd(-181.52, -405.89, -25.2, 2.04)
pt3dadd(-181.7, -406.3, -25.2, 2.04)
pt3dadd(-182.06, -406.7, -25.2, 2.04)
pt3dadd(-182.24, -407.11, -25.2, 2.04)
pt3dadd(-182.41, -407.51, -25.2, 2.04)
pt3dadd(-182.59, -407.92, -25.2, 2.04)
pt3dadd(-182.77, -408.12, -25.2, 2.04)
pt3dadd(-182.95, -408.53, -25.2, 2.04)
pt3dadd(-182.95, -409.13, -25.2, 2.04)
pt3dadd(-183.13, -409.54, -25.2, 2.04)
pt3dadd(-183.13, -410.15, -25.2, 2.04)
pt3dadd(-183.31, -410.35, -25.2, 2.04)
pt3dadd(-183.48, -411.16, -25.2, 2.04)
pt3dadd(-183.48, -411.56, -25.2, 2.04)
pt3dadd(-183.66, -411.97, -25.2, 2.04)
pt3dadd(-183.66, -412.78, -25.2, 2.04)
pt3dadd(-183.84, -413.39, -25.2, 2.04)
pt3dadd(-183.84, -420.48, -25.2, 2.04)
pt3dadd(-183.84, -420.07, -25.2, 2.04)
pt3dadd(-183.66, -419.87, -25.2, 2.04)
pt3dadd(-183.48, -421.49, -25.2, 2.04)
pt3dadd(-183.48, -424.93, -25.2, 2.04)
}
dend[96] {pt3dclear()
pt3dadd(-91.03, -216.05, -3.7, 3.76)
pt3dadd(-93.84, -215.3, -3.7, 3.76)
pt3dadd(-93.98, -215.62, -3.7, 3.76)
pt3dadd(-94.12, -215.94, -3.7, 3.76)
pt3dadd(-94.26, -216.41, -3.7, 3.76)
pt3dadd(-94.39, -216.73, -3.7, 3.76)
pt3dadd(-94.67, -217.04, -3.7, 3.76)
pt3dadd(-94.81, -217.36, -3.7, 3.76)
pt3dadd(-94.95, -217.68, -3.7, 3.76)
pt3dadd(-95.09, -217.99, -3.7, 3.76)
pt3dadd(-95.37, -218.31, -3.7, 3.76)
pt3dadd(-95.51, -218.63, -3.7, 3.76)
pt3dadd(-95.65, -218.94, -3.7, 3.76)
pt3dadd(-95.93, -219.26, -3.7, 3.76)
}
}
proc shape3d_142() {
dend[96] { pt3dadd(-96.07, -219.73, -3.7, 3.76)
pt3dadd(-96.21, -219.89, -3.7, 3.76)
pt3dadd(-96.48, -220.21, -3.7, 3.76)
pt3dadd(-96.62, -220.53, -3.7, 3.76)
pt3dadd(-96.76, -220.84, -3.7, 3.76)
pt3dadd(-96.9, -221.16, -3.7, 3.76)
pt3dadd(-97.18, -221.32, -3.7, 3.76)
pt3dadd(-97.46, -221.79, -3.7, 3.76)
pt3dadd(-97.6, -222.11, -3.7, 3.76)
pt3dadd(-97.74, -222.27, -3.7, 3.76)
pt3dadd(-97.88, -222.58, -3.7, 3.76)
pt3dadd(-98.02, -222.74, -3.7, 3.76)
pt3dadd(-98.16, -223.06, -3.7, 3.76)
pt3dadd(-98.16, -223.37, -3.7, 3.76)
pt3dadd(-98.3, -223.69, -3.7, 3.76)
pt3dadd(-98.44, -223.85, -3.7, 3.76)
pt3dadd(-98.58, -224.17, -3.7, 3.76)
pt3dadd(-98.58, -224.01, -3.7, 3.76)
pt3dadd(-98.3, -223.85, -3.7, 3.76)
pt3dadd(-97.88, -223.37, -3.7, 3.76)
pt3dadd(-97.88, -222.42, -3.7, 3.76)
pt3dadd(-98.16, -222.58, -3.7, 3.76)
pt3dadd(-98.16, -222.9, -3.7, 3.76)
pt3dadd(-98.3, -223.06, -3.7, 3.76)
pt3dadd(-98.44, -223.22, -3.7, 3.76)
pt3dadd(-98.58, -223.37, -3.7, 3.76)
pt3dadd(-98.71, -223.69, -3.7, 3.76)
pt3dadd(-98.85, -223.85, -3.7, 3.76)
pt3dadd(-98.99, -224.17, -3.7, 3.76)
pt3dadd(-99.13, -224.48, -3.7, 3.76)
pt3dadd(-99.27, -224.64, -3.7, 3.76)
pt3dadd(-99.41, -224.96, -3.7, 3.76)
pt3dadd(-99.55, -225.12, -3.7, 3.76)
pt3dadd(-99.69, -225.59, -3.7, 3.76)
pt3dadd(-99.83, -225.75, -3.7, 3.76)
pt3dadd(-99.83, -226.07, -3.7, 3.76)
pt3dadd(-99.97, -226.22, -3.7, 3.76)
pt3dadd(-100.11, -226.38, -3.7, 3.76)
pt3dadd(-100.25, -226.54, -3.7, 3.76)
pt3dadd(-100.53, -226.7, -3.7, 3.76)
pt3dadd(-100.67, -227.01, -3.7, 3.76)
pt3dadd(-100.8, -227.17, -3.7, 3.76)
pt3dadd(-101.08, -227.49, -3.7, 3.76)
pt3dadd(-101.08, -227.81, -3.7, 3.76)
pt3dadd(-101.36, -227.96, -3.7, 3.76)
pt3dadd(-101.36, -228.28, -3.7, 3.76)
pt3dadd(-101.64, -228.6, -3.7, 3.76)
pt3dadd(-101.78, -228.76, -3.7, 3.76)
pt3dadd(-101.92, -229.23, -3.7, 3.76)
pt3dadd(-102.2, -229.39, -3.7, 3.76)
pt3dadd(-102.2, -229.71, -3.7, 3.76)
pt3dadd(-102.34, -229.86, -3.7, 3.76)
pt3dadd(-102.48, -230.18, -3.7, 3.76)
pt3dadd(-102.76, -230.5, -3.7, 3.76)
pt3dadd(-102.9, -230.81, -3.7, 3.76)
pt3dadd(-103.03, -231.13, -3.7, 3.76)
pt3dadd(-103.17, -231.45, -3.7, 3.76)
pt3dadd(-103.45, -231.61, -3.7, 3.76)
pt3dadd(-103.59, -231.92, -3.7, 3.76)
pt3dadd(-103.73, -232.08, -3.7, 3.76)
pt3dadd(-103.87, -232.24, -3.7, 3.76)
pt3dadd(-104.01, -232.55, -3.7, 3.76)
pt3dadd(-104.29, -232.87, -3.7, 3.76)
pt3dadd(-104.43, -233.19, -3.7, 3.76)
pt3dadd(-104.85, -233.66, -3.7, 3.76)
pt3dadd(-104.99, -233.98, -3.7, 3.76)
pt3dadd(-105.12, -234.14, -3.7, 3.76)
pt3dadd(-105.4, -234.3, -3.7, 3.76)
pt3dadd(-105.54, -234.45, -3.7, 3.76)
pt3dadd(-105.68, -234.77, -3.7, 3.76)
pt3dadd(-105.96, -234.93, -3.7, 3.76)
pt3dadd(-106.1, -235.09, -3.7, 3.76)
pt3dadd(-106.24, -235.4, -3.7, 3.76)
pt3dadd(-106.38, -235.56, -3.7, 3.76)
pt3dadd(-106.52, -236.04, -3.7, 3.76)
pt3dadd(-106.66, -236.19, -3.7, 3.76)
pt3dadd(-106.94, -236.51, -3.7, 3.76)
pt3dadd(-107.08, -236.99, -3.7, 3.76)
pt3dadd(-107.35, -237.14, -3.7, 3.76)
pt3dadd(-107.35, -237.46, -3.7, 3.76)
pt3dadd(-107.63, -237.62, -3.7, 3.76)
pt3dadd(-107.91, -238.09, -3.7, 3.76)
pt3dadd(-107.91, -238.41, -3.7, 3.76)
pt3dadd(-108.19, -238.73, -3.7, 3.76)
pt3dadd(-108.33, -239.04, -3.7, 3.76)
pt3dadd(-108.61, -239.36, -3.7, 3.76)
pt3dadd(-108.75, -239.68, -3.7, 3.76)
pt3dadd(-109.03, -239.99, -3.7, 3.76)
pt3dadd(-109.17, -240.31, -3.7, 3.76)
pt3dadd(-109.31, -240.63, -3.7, 3.76)
pt3dadd(-109.44, -240.79, -3.7, 3.76)
pt3dadd(-110, -241.42, -3.7, 3.76)
pt3dadd(-110.14, -241.73, -3.7, 3.76)
pt3dadd(-111.4, -243.16, -3.7, 3.76)
pt3dadd(-111.67, -243.48, -3.7, 3.76)
pt3dadd(-111.95, -243.79, -3.7, 3.76)
pt3dadd(-112.23, -244.11, -3.7, 3.76)
pt3dadd(-112.37, -244.43, -3.7, 3.76)
pt3dadd(-112.93, -245.06, -3.7, 3.76)
pt3dadd(-113.21, -245.22, -3.7, 3.76)
pt3dadd(-113.49, -245.53, -3.7, 3.76)
pt3dadd(-113.76, -245.69, -3.7, 3.76)
pt3dadd(-114.04, -246.01, -3.7, 3.76)
pt3dadd(-114.32, -246.17, -3.7, 3.76)
pt3dadd(-114.46, -246.48, -3.7, 3.76)
pt3dadd(-114.88, -246.8, -3.7, 3.76)
pt3dadd(-115.16, -246.96, -3.7, 3.76)
pt3dadd(-115.44, -247.12, -3.7, 3.76)
pt3dadd(-115.72, -247.43, -3.7, 3.76)
pt3dadd(-115.99, -247.43, -3.7, 3.76)
pt3dadd(-116.41, -247.75, -3.7, 3.76)
pt3dadd(-116.69, -248.07, -3.7, 3.76)
pt3dadd(-116.97, -248.07, -3.7, 3.76)
pt3dadd(-117.39, -248.38, -3.7, 3.76)
pt3dadd(-117.67, -248.54, -3.7, 3.76)
pt3dadd(-117.95, -248.54, -3.7, 3.76)
pt3dadd(-118.22, -248.86, -3.7, 3.76)
pt3dadd(-118.5, -248.86, -3.7, 3.76)
pt3dadd(-118.64, -249.02, -3.7, 3.76)
pt3dadd(-118.92, -249.17, -3.7, 3.76)
pt3dadd(-119.2, -249.17, -3.7, 3.76)
pt3dadd(-119.48, -249.33, -3.7, 3.76)
pt3dadd(-119.76, -249.49, -3.7, 3.76)
pt3dadd(-120.04, -249.49, -3.7, 3.76)
pt3dadd(-120.31, -249.65, -3.7, 3.76)
pt3dadd(-120.59, -249.81, -3.7, 3.76)
pt3dadd(-121.15, -249.81, -3.7, 3.76)
pt3dadd(-121.43, -249.97, -3.7, 3.76)
pt3dadd(-121.71, -249.97, -3.7, 3.76)
pt3dadd(-122.13, -250.12, -3.7, 3.76)
pt3dadd(-122.4, -250.28, -3.7, 3.76)
pt3dadd(-122.82, -250.44, -3.7, 3.76)
pt3dadd(-123.24, -250.44, -3.7, 3.76)
pt3dadd(-123.52, -250.6, -3.7, 3.76)
pt3dadd(-123.8, -250.76, -3.7, 3.76)
pt3dadd(-124.22, -250.91, -3.7, 3.76)
pt3dadd(-124.36, -251.07, -3.7, 3.76)
pt3dadd(-124.77, -251.23, -3.7, 3.76)
pt3dadd(-125.05, -251.39, -3.7, 3.76)
pt3dadd(-125.47, -251.55, -3.7, 3.76)
pt3dadd(-125.75, -251.71, -3.7, 3.76)
pt3dadd(-126.03, -251.86, -3.7, 3.76)
pt3dadd(-126.31, -252.02, -3.7, 3.76)
pt3dadd(-126.72, -252.18, -3.7, 3.76)
pt3dadd(-127.14, -252.34, -3.7, 3.76)
pt3dadd(-127.42, -252.66, -3.7, 3.76)
pt3dadd(-127.7, -252.81, -3.7, 3.76)
pt3dadd(-128.54, -252.81, -3.7, 3.76)
pt3dadd(-128.68, -252.97, -3.7, 3.76)
pt3dadd(-128.95, -253.13, -3.7, 3.76)
pt3dadd(-129.09, -253.29, -3.7, 3.76)
pt3dadd(-129.51, -253.45, -3.7, 3.76)
pt3dadd(-129.79, -253.61, -3.7, 3.76)
pt3dadd(-129.93, -253.76, -3.7, 3.76)
pt3dadd(-130.35, -253.92, -3.7, 3.76)
pt3dadd(-130.63, -254.24, -3.7, 3.76)
pt3dadd(-130.91, -254.24, -3.7, 3.76)
pt3dadd(-131.18, -254.4, -3.7, 3.76)
pt3dadd(-131.6, -254.71, -3.7, 3.76)
pt3dadd(-131.88, -254.87, -3.7, 3.76)
pt3dadd(-132.16, -255.03, -3.7, 3.76)
pt3dadd(-132.44, -255.19, -3.7, 3.76)
pt3dadd(-132.72, -255.35, -3.7, 3.76)
pt3dadd(-133, -255.35, -3.7, 3.76)
pt3dadd(-133.27, -255.66, -3.7, 3.76)
pt3dadd(-133.41, -255.82, -3.7, 3.76)
pt3dadd(-133.69, -255.98, -3.7, 3.76)
pt3dadd(-133.97, -256.14, -3.7, 3.76)
pt3dadd(-134.39, -256.3, -3.7, 3.76)
pt3dadd(-134.67, -256.61, -3.7, 3.76)
pt3dadd(-134.81, -256.77, -3.7, 3.76)
pt3dadd(-135.23, -256.77, -3.7, 3.76)
pt3dadd(-135.5, -256.93, -3.7, 3.76)
pt3dadd(-135.64, -257.09, -3.7, 3.76)
pt3dadd(-136.06, -257.25, -3.7, 3.76)
pt3dadd(-136.34, -257.4, -3.7, 3.76)
pt3dadd(-136.62, -257.56, -3.7, 3.76)
pt3dadd(-137.04, -257.72, -3.7, 3.76)
pt3dadd(-137.59, -258.2, -3.7, 3.76)
pt3dadd(-137.87, -258.35, -3.7, 3.76)
pt3dadd(-138.15, -258.51, -3.7, 3.76)
pt3dadd(-138.43, -258.83, -3.7, 3.76)
pt3dadd(-138.85, -258.99, -3.7, 3.76)
pt3dadd(-139.27, -259.15, -3.7, 3.76)
pt3dadd(-139.41, -259.3, -3.7, 3.76)
pt3dadd(-139.68, -259.62, -3.7, 3.76)
pt3dadd(-139.96, -259.78, -3.7, 3.76)
pt3dadd(-140.24, -259.94, -3.7, 3.76)
pt3dadd(-140.66, -260.1, -3.7, 3.76)
pt3dadd(-140.94, -260.41, -3.7, 3.76)
pt3dadd(-141.22, -260.57, -3.7, 3.76)
pt3dadd(-141.64, -260.89, -3.7, 3.76)
pt3dadd(-141.91, -261.04, -3.7, 3.76)
pt3dadd(-142.33, -261.36, -3.7, 3.76)
pt3dadd(-142.61, -261.52, -3.7, 3.76)
pt3dadd(-142.89, -261.68, -3.7, 3.76)
pt3dadd(-143.45, -262.31, -3.7, 3.76)
pt3dadd(-143.73, -262.47, -3.7, 3.76)
pt3dadd(-144, -262.63, -3.7, 3.76)
pt3dadd(-144.42, -263.1, -3.7, 3.76)
}
}
proc shape3d_143() {
dend[96] { pt3dadd(-144.84, -263.42, -3.7, 3.76)
pt3dadd(-145.26, -263.89, -3.7, 3.76)
pt3dadd(-145.4, -264.05, -3.7, 3.76)
pt3dadd(-145.68, -264.37, -3.7, 3.76)
pt3dadd(-145.96, -264.53, -3.7, 3.76)
pt3dadd(-146.09, -264.84, -3.7, 3.76)
pt3dadd(-146.37, -265, -3.7, 3.76)
pt3dadd(-146.79, -265.32, -3.7, 3.76)
pt3dadd(-146.93, -265.63, -3.7, 3.76)
pt3dadd(-147.07, -265.79, -3.7, 3.76)
pt3dadd(-147.49, -266.27, -3.7, 3.76)
pt3dadd(-147.77, -266.43, -3.7, 3.76)
pt3dadd(-148.32, -266.58, -3.7, 3.76)
pt3dadd(-148.74, -266.9, -3.7, 3.76)
pt3dadd(-148.88, -267.06, -3.7, 3.76)
pt3dadd(-149.16, -267.38, -3.7, 3.76)
pt3dadd(-149.3, -267.53, -3.7, 3.76)
pt3dadd(-149.58, -267.69, -3.7, 3.76)
pt3dadd(-149.86, -268.01, -3.7, 3.76)
pt3dadd(-150.14, -268.17, -3.7, 3.76)
pt3dadd(-150.55, -268.64, -3.7, 3.76)
pt3dadd(-150.69, -268.8, -3.7, 3.76)
pt3dadd(-151.11, -268.8, -3.7, 3.76)
pt3dadd(-150.97, -268.48, -3.7, 3.76)
pt3dadd(-150.41, -268.01, -3.7, 3.76)
pt3dadd(-150.14, -267.69, -3.7, 3.76)
pt3dadd(-149.86, -267.38, -3.7, 3.76)
pt3dadd(-150.41, -268.17, -3.7, 3.76)
pt3dadd(-150.69, -268.17, -3.7, 3.76)
pt3dadd(-150.83, -268.33, -3.7, 3.76)
pt3dadd(-151.11, -268.48, -3.7, 3.76)
pt3dadd(-151.39, -268.64, -3.7, 3.76)
pt3dadd(-151.53, -268.8, -3.7, 3.76)
pt3dadd(-151.81, -268.8, -3.7, 3.76)
pt3dadd(-151.95, -268.96, -3.7, 3.76)
pt3dadd(-152.23, -269.28, -3.7, 3.76)
pt3dadd(-152.37, -269.59, -3.7, 3.76)
pt3dadd(-152.64, -269.75, -3.7, 3.76)
pt3dadd(-152.78, -269.91, -3.7, 3.76)
pt3dadd(-152.92, -270.07, -3.7, 3.76)
pt3dadd(-153.06, -270.22, -3.7, 3.76)
pt3dadd(-153.34, -270.22, -3.7, 3.76)
pt3dadd(-153.48, -270.38, -3.7, 3.76)
pt3dadd(-153.76, -270.54, -3.7, 3.76)
pt3dadd(-153.9, -270.7, -3.7, 3.76)
pt3dadd(-154.32, -271.02, -3.7, 3.76)
pt3dadd(-154.46, -271.33, -3.7, 3.76)
pt3dadd(-154.6, -271.65, -3.7, 3.76)
pt3dadd(-154.87, -271.97, -3.7, 3.76)
pt3dadd(-155.01, -272.28, -3.7, 3.76)
pt3dadd(-155.15, -272.44, -3.7, 3.76)
pt3dadd(-155.43, -272.76, -3.7, 3.76)
pt3dadd(-155.85, -273.23, -3.7, 3.76)
pt3dadd(-155.99, -273.55, -3.7, 3.76)
pt3dadd(-156.13, -273.71, -3.7, 3.76)
pt3dadd(-156.41, -274.18, -3.7, 3.76)
pt3dadd(-156.55, -274.5, -3.7, 3.76)
pt3dadd(-156.69, -274.66, -3.7, 3.76)
pt3dadd(-156.82, -274.97, -3.7, 3.76)
pt3dadd(-157.1, -275.13, -3.7, 3.76)
pt3dadd(-157.24, -275.29, -3.7, 3.76)
pt3dadd(-157.38, -275.45, -3.7, 3.76)
pt3dadd(-156.69, -274.18, -3.7, 3.76)
pt3dadd(-156.82, -274.34, -3.7, 3.76)
pt3dadd(-156.96, -274.66, -3.7, 3.76)
pt3dadd(-157.1, -274.81, -3.7, 3.76)
pt3dadd(-157.38, -274.97, -3.7, 3.76)
pt3dadd(-157.52, -275.29, -3.7, 3.76)
pt3dadd(-157.66, -275.61, -3.7, 3.76)
pt3dadd(-157.94, -275.76, -3.7, 3.76)
pt3dadd(-157.94, -276.08, -3.7, 3.76)
pt3dadd(-158.22, -276.4, -3.7, 3.76)
pt3dadd(-158.5, -276.71, -3.7, 3.76)
pt3dadd(-158.64, -276.87, -3.7, 3.76)
pt3dadd(-158.78, -277.19, -3.7, 3.76)
pt3dadd(-159.05, -277.51, -3.7, 3.76)
pt3dadd(-159.19, -277.66, -3.7, 3.76)
pt3dadd(-159.33, -277.82, -3.7, 3.76)
pt3dadd(-159.47, -277.98, -3.7, 3.76)
pt3dadd(-159.61, -278.3, -3.7, 3.76)
pt3dadd(-159.75, -278.46, -3.7, 3.76)
pt3dadd(-159.89, -278.61, -3.7, 3.76)
pt3dadd(-160.03, -278.77, -3.7, 3.76)
pt3dadd(-160.17, -278.93, -3.7, 3.76)
pt3dadd(-160.31, -279.09, -3.7, 3.76)
pt3dadd(-160.45, -279.4, -3.7, 3.76)
pt3dadd(-160.73, -279.72, -3.7, 3.76)
pt3dadd(-161.01, -280.2, -3.7, 3.76)
pt3dadd(-161.14, -280.51, -3.7, 3.76)
pt3dadd(-161.28, -280.83, -3.7, 3.76)
pt3dadd(-161.7, -281.78, -3.7, 3.76)
pt3dadd(-161.84, -282.1, -3.7, 3.76)
pt3dadd(-161.98, -282.41, -3.7, 3.76)
pt3dadd(-162.12, -282.89, -3.7, 3.76)
pt3dadd(-162.4, -283.36, -3.7, 3.76)
pt3dadd(-162.54, -283.68, -3.7, 3.76)
pt3dadd(-162.82, -284.15, -3.7, 3.76)
pt3dadd(-162.82, -284.47, -3.7, 3.76)
pt3dadd(-163.1, -284.94, -3.7, 3.76)
pt3dadd(-163.37, -285.42, -3.7, 3.76)
pt3dadd(-163.51, -285.74, -3.7, 3.76)
pt3dadd(-163.65, -286.21, -3.7, 3.76)
pt3dadd(-163.93, -286.69, -3.7, 3.76)
pt3dadd(-164.07, -287.16, -3.7, 3.76)
pt3dadd(-164.35, -287.64, -3.7, 3.76)
pt3dadd(-164.63, -287.95, -3.7, 3.76)
pt3dadd(-164.91, -288.43, -3.7, 3.76)
pt3dadd(-165.05, -288.74, -3.7, 3.76)
pt3dadd(-165.19, -289.22, -3.7, 3.76)
pt3dadd(-165.46, -289.69, -3.7, 3.76)
pt3dadd(-165.88, -290.01, -3.7, 3.76)
pt3dadd(-166.02, -290.48, -3.7, 3.76)
pt3dadd(-166.3, -290.96, -3.7, 3.76)
pt3dadd(-166.44, -291.43, -3.7, 3.76)
pt3dadd(-166.72, -291.91, -3.7, 3.76)
pt3dadd(-167.14, -292.23, -3.7, 3.76)
pt3dadd(-167.28, -292.54, -3.7, 3.76)
pt3dadd(-167.56, -293.18, -3.7, 3.76)
pt3dadd(-167.69, -293.49, -3.7, 3.76)
pt3dadd(-167.83, -293.65, -3.7, 3.76)
pt3dadd(-168.11, -294.12, -3.7, 3.76)
pt3dadd(-168.39, -294.44, -3.7, 3.76)
pt3dadd(-168.53, -294.76, -3.7, 3.76)
pt3dadd(-168.81, -295.07, -3.7, 3.76)
pt3dadd(-169.09, -295.39, -3.7, 3.76)
pt3dadd(-169.37, -296.02, -3.7, 3.76)
pt3dadd(-169.65, -296.5, -3.7, 3.76)
pt3dadd(-169.92, -296.97, -3.7, 3.76)
pt3dadd(-170.2, -297.29, -3.7, 3.76)
pt3dadd(-170.48, -297.77, -3.7, 3.76)
pt3dadd(-170.76, -298.08, -3.7, 3.76)
pt3dadd(-171.32, -298.71, -3.7, 3.76)
pt3dadd(-171.6, -299.19, -3.7, 3.76)
pt3dadd(-171.88, -299.66, -3.7, 3.76)
pt3dadd(-172.29, -300.14, -3.7, 3.76)
pt3dadd(-172.57, -300.46, -3.7, 3.76)
pt3dadd(-172.85, -300.93, -3.7, 3.76)
pt3dadd(-173.27, -301.41, -3.7, 3.76)
pt3dadd(-173.55, -301.88, -3.7, 3.76)
pt3dadd(-173.83, -302.2, -3.7, 3.76)
pt3dadd(-174.1, -302.67, -3.7, 3.76)
pt3dadd(-174.38, -302.83, -3.7, 3.76)
pt3dadd(-174.52, -303.15, -3.7, 3.76)
pt3dadd(-174.8, -303.46, -3.7, 3.76)
pt3dadd(-175.08, -303.78, -3.7, 3.76)
pt3dadd(-175.22, -304.1, -3.7, 3.76)
pt3dadd(-175.36, -304.41, -3.7, 3.76)
pt3dadd(-175.5, -304.57, -3.7, 3.76)
pt3dadd(-175.78, -305.05, -3.7, 3.76)
pt3dadd(-176.19, -305.36, -3.7, 3.76)
pt3dadd(-176.33, -305.68, -3.7, 3.76)
pt3dadd(-176.47, -306, -3.7, 3.76)
pt3dadd(-176.75, -306.31, -3.7, 3.76)
pt3dadd(-177.03, -306.63, -3.7, 3.76)
pt3dadd(-177.31, -307.1, -3.7, 3.76)
pt3dadd(-177.45, -307.42, -3.7, 3.76)
pt3dadd(-177.73, -307.89, -3.7, 3.76)
pt3dadd(-178.15, -308.21, -3.7, 3.76)
pt3dadd(-178.29, -308.53, -3.7, 3.76)
pt3dadd(-178.56, -309, -3.7, 3.76)
pt3dadd(-178.84, -309.32, -3.7, 3.76)
pt3dadd(-179.12, -309.64, -3.7, 3.76)
pt3dadd(-179.4, -310.11, -3.7, 3.76)
pt3dadd(-179.68, -310.43, -3.7, 3.76)
pt3dadd(-180.1, -310.74, -3.7, 3.76)
pt3dadd(-180.24, -311.06, -3.7, 3.76)
pt3dadd(-180.51, -311.38, -3.7, 3.76)
pt3dadd(-180.79, -311.69, -3.7, 3.76)
pt3dadd(-180.93, -312.01, -3.7, 3.76)
pt3dadd(-181.77, -312.96, -3.7, 3.76)
pt3dadd(-182.05, -313.43, -3.7, 3.76)
pt3dadd(-182.33, -313.75, -3.7, 3.76)
pt3dadd(-182.47, -314.07, -3.7, 3.76)
pt3dadd(-182.74, -314.38, -3.7, 3.76)
pt3dadd(-183.16, -314.7, -3.7, 3.76)
pt3dadd(-183.58, -315.18, -3.7, 3.76)
pt3dadd(-183.86, -315.49, -3.7, 3.76)
pt3dadd(-184, -315.65, -3.7, 3.76)
pt3dadd(-184.28, -315.97, -3.7, 3.76)
pt3dadd(-184.56, -316.44, -3.7, 3.76)
pt3dadd(-184.83, -316.76, -3.7, 3.76)
pt3dadd(-185.11, -317.23, -3.7, 3.76)
pt3dadd(-185.81, -318.02, -3.7, 3.76)
pt3dadd(-186.09, -318.34, -3.7, 3.76)
pt3dadd(-186.23, -318.66, -3.7, 3.76)
pt3dadd(-186.51, -318.97, -3.7, 3.76)
pt3dadd(-187.06, -319.61, -3.7, 3.76)
pt3dadd(-187.2, -319.77, -3.7, 3.76)
pt3dadd(-187.48, -319.77, -3.7, 3.76)
pt3dadd(-187.48, -318.97, -3.7, 3.76)
pt3dadd(-186.65, -318.97, -5.7, 3.76)
pt3dadd(-186.79, -319.13, -5.7, 3.76)
pt3dadd(-187.06, -319.29, -5.7, 3.76)
pt3dadd(-187.2, -319.45, -5.7, 3.76)
pt3dadd(-187.34, -319.77, -5.7, 3.76)
pt3dadd(-187.48, -319.92, -5.7, 3.76)
pt3dadd(-187.62, -320.08, -5.7, 3.76)
pt3dadd(-187.76, -320.24, -5.7, 3.76)
pt3dadd(-188.04, -320.72, -5.7, 3.76)
pt3dadd(-188.32, -321.03, -5.7, 3.76)
}
}
proc shape3d_144() {
dend[96] { pt3dadd(-188.46, -321.35, -5.7, 3.76)
pt3dadd(-188.6, -321.67, -5.7, 3.76)
pt3dadd(-188.74, -321.98, -5.7, 3.76)
pt3dadd(-188.88, -322.3, -5.7, 3.76)
pt3dadd(-189.15, -322.46, -5.7, 3.76)
pt3dadd(-189.29, -322.77, -5.7, 3.76)
pt3dadd(-189.43, -323.09, -5.7, 3.76)
pt3dadd(-189.71, -323.41, -5.7, 3.76)
pt3dadd(-189.85, -323.72, -5.7, 3.76)
pt3dadd(-189.99, -323.88, -5.7, 3.76)
pt3dadd(-190.13, -324.2, -5.7, 3.76)
pt3dadd(-190.27, -324.51, -5.7, 3.76)
pt3dadd(-190.41, -324.83, -5.7, 3.76)
pt3dadd(-190.55, -324.99, -5.7, 3.76)
pt3dadd(-190.69, -325.15, -5.7, 3.76)
pt3dadd(-190.83, -325.46, -5.7, 3.76)
pt3dadd(-190.97, -325.78, -5.7, 3.76)
pt3dadd(-191.11, -326.1, -5.7, 3.76)
pt3dadd(-191.25, -326.41, -5.7, 3.76)
pt3dadd(-191.25, -326.73, -5.7, 3.76)
pt3dadd(-191.52, -327.2, -5.7, 3.76)
pt3dadd(-191.52, -327.52, -5.7, 3.76)
pt3dadd(-191.8, -328, -5.7, 3.76)
pt3dadd(-191.94, -328.31, -5.7, 3.76)
pt3dadd(-192.08, -328.79, -5.7, 3.76)
pt3dadd(-192.22, -329.26, -5.7, 3.76)
pt3dadd(-192.36, -329.74, -5.7, 3.76)
pt3dadd(-192.5, -330.05, -5.7, 3.76)
pt3dadd(-192.78, -330.85, -5.7, 3.76)
pt3dadd(-192.92, -331.32, -5.7, 3.76)
pt3dadd(-193.06, -331.79, -5.7, 3.76)
pt3dadd(-193.2, -332.43, -5.7, 3.76)
pt3dadd(-193.34, -332.9, -5.7, 3.76)
pt3dadd(-193.34, -333.54, -5.7, 3.76)
pt3dadd(-193.47, -334.01, -5.7, 3.76)
pt3dadd(-193.61, -334.64, -5.7, 3.76)
pt3dadd(-193.75, -335.12, -5.7, 3.76)
pt3dadd(-193.89, -335.59, -5.7, 3.76)
pt3dadd(-194.03, -336.07, -5.7, 3.76)
pt3dadd(-194.17, -336.54, -5.7, 3.76)
pt3dadd(-194.31, -337.18, -5.7, 3.76)
pt3dadd(-194.45, -337.65, -5.7, 3.76)
pt3dadd(-194.59, -337.97, -5.7, 3.76)
pt3dadd(-194.73, -338.44, -5.7, 3.76)
pt3dadd(-195.01, -338.92, -5.7, 3.76)
pt3dadd(-195.15, -339.23, -5.7, 3.76)
pt3dadd(-195.43, -339.71, -5.7, 3.76)
pt3dadd(-195.57, -340.34, -5.7, 3.76)
pt3dadd(-195.98, -341.29, -5.7, 3.76)
pt3dadd(-196.12, -341.77, -5.7, 3.76)
pt3dadd(-196.4, -342.24, -5.7, 3.76)
pt3dadd(-196.54, -342.56, -5.7, 3.76)
pt3dadd(-196.68, -343.03, -5.7, 3.76)
pt3dadd(-196.82, -343.35, -5.7, 3.76)
pt3dadd(-197.1, -343.82, -5.7, 3.76)
pt3dadd(-197.24, -344.14, -5.7, 3.76)
pt3dadd(-197.38, -344.62, -5.7, 3.76)
pt3dadd(-197.66, -345.09, -5.7, 3.76)
pt3dadd(-197.79, -345.41, -5.7, 3.76)
pt3dadd(-197.93, -345.72, -5.7, 3.76)
pt3dadd(-198.07, -346.04, -5.7, 3.76)
pt3dadd(-198.49, -346.83, -5.7, 3.76)
pt3dadd(-198.63, -347.15, -5.7, 3.76)
pt3dadd(-198.77, -347.46, -5.7, 3.76)
pt3dadd(-199.05, -347.78, -5.7, 3.76)
pt3dadd(-199.19, -348.26, -5.7, 3.76)
pt3dadd(-199.47, -348.89, -5.7, 3.76)
pt3dadd(-199.75, -349.36, -5.7, 3.76)
pt3dadd(-199.89, -349.84, -5.7, 3.76)
pt3dadd(-200.16, -350.31, -5.7, 3.76)
pt3dadd(-200.44, -350.79, -5.7, 3.76)
pt3dadd(-200.58, -351.26, -5.7, 3.76)
pt3dadd(-201, -351.9, -5.7, 3.76)
pt3dadd(-201.14, -352.37, -5.7, 3.76)
pt3dadd(-201.28, -352.85, -5.7, 3.76)
pt3dadd(-201.56, -353.32, -5.7, 3.76)
pt3dadd(-201.7, -353.64, -5.7, 3.76)
pt3dadd(-201.84, -353.95, -5.7, 3.76)
pt3dadd(-202.11, -354.27, -5.7, 3.76)
pt3dadd(-202.25, -354.59, -5.7, 3.76)
pt3dadd(-202.39, -354.75, -5.7, 3.76)
pt3dadd(-202.53, -354.9, -5.7, 3.76)
pt3dadd(-202.53, -354.59, -5.7, 3.76)
pt3dadd(-201.84, -353.64, -8.7, 3.76)
pt3dadd(-202.11, -353.8, -8.7, 3.76)
pt3dadd(-202.39, -353.95, -8.7, 3.76)
pt3dadd(-202.95, -354.59, -8.7, 3.76)
pt3dadd(-203.09, -354.75, -8.7, 3.76)
pt3dadd(-203.23, -355.06, -8.7, 3.76)
pt3dadd(-203.37, -355.38, -8.7, 3.76)
pt3dadd(-203.51, -355.69, -8.7, 3.76)
pt3dadd(-203.65, -356.01, -8.7, 3.76)
pt3dadd(-203.93, -356.33, -8.7, 3.76)
pt3dadd(-204.07, -356.64, -8.7, 3.76)
pt3dadd(-204.2, -357.12, -8.7, 3.76)
pt3dadd(-204.48, -357.44, -8.7, 3.76)
pt3dadd(-204.62, -357.75, -8.7, 3.76)
pt3dadd(-204.76, -358.07, -8.7, 3.76)
pt3dadd(-205.04, -358.54, -8.7, 3.76)
pt3dadd(-205.18, -359.02, -8.7, 3.76)
pt3dadd(-205.6, -359.49, -8.7, 3.76)
pt3dadd(-205.74, -359.97, -8.7, 3.76)
pt3dadd(-205.88, -360.13, -8.7, 3.76)
pt3dadd(-206.16, -360.6, -8.7, 3.76)
pt3dadd(-206.3, -360.92, -8.7, 3.76)
pt3dadd(-206.57, -361.55, -8.7, 3.76)
pt3dadd(-206.71, -362.03, -8.7, 3.76)
pt3dadd(-206.99, -362.34, -8.7, 3.76)
pt3dadd(-207.13, -362.66, -8.7, 3.76)
pt3dadd(-207.41, -363.29, -8.7, 3.76)
pt3dadd(-207.55, -363.61, -8.7, 3.76)
pt3dadd(-207.69, -363.93, -8.7, 3.76)
pt3dadd(-207.97, -364.24, -8.7, 3.76)
pt3dadd(-208.11, -364.56, -8.7, 3.76)
pt3dadd(-208.39, -365.19, -8.7, 3.76)
pt3dadd(-208.66, -365.51, -8.7, 3.76)
pt3dadd(-208.94, -365.82, -8.7, 3.76)
pt3dadd(-209.08, -366.3, -8.7, 3.76)
pt3dadd(-209.22, -366.77, -8.7, 3.76)
pt3dadd(-209.5, -367.09, -8.7, 3.76)
pt3dadd(-209.78, -367.57, -8.7, 3.76)
pt3dadd(-210.06, -367.88, -8.7, 3.76)
pt3dadd(-210.34, -368.2, -8.7, 3.76)
pt3dadd(-210.62, -368.52, -8.7, 3.76)
pt3dadd(-210.89, -368.83, -8.7, 3.76)
pt3dadd(-211.03, -369.15, -8.7, 3.76)
pt3dadd(-211.73, -369.94, -8.7, 3.76)
pt3dadd(-212.01, -370.26, -8.7, 3.76)
pt3dadd(-212.29, -370.57, -8.7, 3.76)
pt3dadd(-212.98, -371.36, -8.7, 3.76)
pt3dadd(-213.12, -371.68, -8.7, 3.76)
pt3dadd(-213.26, -371.84, -8.7, 3.76)
pt3dadd(-213.54, -372, -8.7, 3.76)
pt3dadd(-213.96, -372, -8.7, 3.76)
pt3dadd(-213.96, -370.89, -8.7, 3.76)
pt3dadd(-213.82, -370.57, -8.7, 3.76)
pt3dadd(-213.68, -371.05, -9.7, 3.76)
pt3dadd(-213.82, -371.21, -9.7, 3.76)
pt3dadd(-213.96, -371.36, -9.7, 3.76)
pt3dadd(-214.1, -371.52, -9.7, 3.76)
pt3dadd(-214.38, -371.68, -9.7, 3.76)
pt3dadd(-214.52, -372, -9.7, 3.76)
pt3dadd(-214.66, -372.16, -9.7, 3.76)
pt3dadd(-214.8, -372.47, -9.7, 3.76)
pt3dadd(-215.07, -372.63, -9.7, 3.76)
pt3dadd(-215.21, -372.79, -9.7, 3.76)
pt3dadd(-215.35, -373.26, -9.7, 3.76)
pt3dadd(-215.49, -373.58, -9.7, 3.76)
pt3dadd(-215.77, -373.74, -9.7, 3.76)
pt3dadd(-215.91, -374.06, -9.7, 3.76)
pt3dadd(-216.33, -374.53, -9.7, 3.76)
pt3dadd(-216.61, -374.85, -9.7, 3.76)
pt3dadd(-216.89, -375.32, -9.7, 3.76)
pt3dadd(-217.16, -375.64, -9.7, 3.76)
pt3dadd(-217.44, -375.95, -9.7, 3.76)
pt3dadd(-217.58, -376.27, -9.7, 3.76)
pt3dadd(-217.86, -376.75, -9.7, 3.76)
pt3dadd(-218.14, -377.06, -9.7, 3.76)
pt3dadd(-218.7, -377.7, -9.7, 3.76)
pt3dadd(-218.84, -378.01, -9.7, 3.76)
pt3dadd(-219.12, -378.49, -9.7, 3.76)
pt3dadd(-219.39, -378.8, -9.7, 3.76)
pt3dadd(-219.53, -379.12, -9.7, 3.76)
pt3dadd(-219.81, -379.44, -9.7, 3.76)
pt3dadd(-219.95, -379.91, -9.7, 3.76)
pt3dadd(-220.23, -380.23, -9.7, 3.76)
pt3dadd(-220.37, -380.54, -9.7, 3.76)
pt3dadd(-220.51, -380.86, -9.7, 3.76)
pt3dadd(-220.65, -381.18, -9.7, 3.76)
pt3dadd(-220.93, -381.34, -9.7, 3.76)
pt3dadd(-221.07, -381.65, -9.7, 3.76)
pt3dadd(-221.21, -381.97, -9.7, 3.76)
pt3dadd(-221.35, -382.29, -9.7, 3.76)
pt3dadd(-221.62, -382.6, -9.7, 3.76)
pt3dadd(-221.76, -382.92, -9.7, 3.76)
pt3dadd(-222.04, -383.39, -9.7, 3.76)
pt3dadd(-222.18, -383.71, -9.7, 3.76)
pt3dadd(-222.46, -384.5, -9.7, 3.76)
pt3dadd(-222.6, -384.82, -9.7, 3.76)
pt3dadd(-222.74, -385.13, -9.7, 3.76)
pt3dadd(-223.02, -385.45, -9.7, 3.76)
pt3dadd(-223.02, -385.77, -9.7, 3.76)
pt3dadd(-223.3, -386.24, -9.7, 3.76)
pt3dadd(-223.44, -386.4, -9.7, 3.76)
pt3dadd(-223.58, -387.03, -9.7, 3.76)
pt3dadd(-223.85, -387.35, -9.7, 3.76)
pt3dadd(-223.99, -387.67, -9.7, 3.76)
pt3dadd(-224.13, -387.98, -9.7, 3.76)
pt3dadd(-224.41, -388.3, -9.7, 3.76)
pt3dadd(-224.55, -388.62, -9.7, 3.76)
pt3dadd(-224.69, -388.93, -9.7, 3.76)
pt3dadd(-224.97, -389.09, -9.7, 3.76)
pt3dadd(-224.97, -389.57, -9.7, 3.76)
pt3dadd(-225.25, -389.88, -9.7, 3.76)
pt3dadd(-225.39, -390.2, -9.7, 3.76)
pt3dadd(-225.53, -390.67, -9.7, 3.76)
pt3dadd(-225.8, -390.83, -9.7, 3.76)
pt3dadd(-225.94, -391.15, -9.7, 3.76)
pt3dadd(-226.22, -391.62, -9.7, 3.76)
pt3dadd(-226.36, -391.78, -9.7, 3.76)
}
}
proc shape3d_145() {
dend[96] { pt3dadd(-226.64, -392.42, -9.7, 3.76)
pt3dadd(-226.78, -392.73, -9.7, 3.76)
pt3dadd(-227.06, -393.21, -9.7, 3.76)
pt3dadd(-227.2, -393.52, -9.7, 3.76)
pt3dadd(-227.34, -393.84, -9.7, 3.76)
pt3dadd(-227.48, -394.16, -9.7, 3.76)
pt3dadd(-227.76, -394.47, -9.7, 3.76)
pt3dadd(-227.76, -394.79, -9.7, 3.76)
pt3dadd(-228.03, -395.42, -9.7, 3.76)
pt3dadd(-228.31, -396.21, -9.7, 3.76)
pt3dadd(-228.45, -396.53, -9.7, 3.76)
pt3dadd(-228.59, -397.01, -9.7, 3.76)
pt3dadd(-228.73, -397.32, -9.7, 3.76)
pt3dadd(-228.73, -397.64, -9.7, 3.76)
pt3dadd(-229.01, -398.11, -9.7, 3.76)
pt3dadd(-229.01, -398.59, -9.7, 3.76)
pt3dadd(-229.15, -398.75, -9.7, 3.76)
pt3dadd(-229.29, -399.22, -9.7, 3.76)
pt3dadd(-229.43, -399.7, -9.7, 3.76)
pt3dadd(-229.57, -399.85, -9.7, 3.76)
pt3dadd(-229.71, -400.17, -9.7, 3.76)
pt3dadd(-229.85, -400.8, -9.7, 3.76)
pt3dadd(-229.99, -401.44, -9.7, 3.76)
pt3dadd(-230.12, -401.75, -9.7, 3.76)
pt3dadd(-230.26, -402.23, -9.7, 3.76)
pt3dadd(-230.26, -403.34, -9.7, 3.76)
pt3dadd(-230.4, -403.65, -9.7, 3.76)
pt3dadd(-230.4, -404.6, -9.7, 3.76)
pt3dadd(-230.54, -404.92, -9.7, 3.76)
pt3dadd(-230.54, -405.55, -9.7, 3.76)
pt3dadd(-230.68, -405.71, -9.7, 3.76)
pt3dadd(-230.68, -406.82, -9.7, 3.76)
pt3dadd(-230.82, -406.98, -9.7, 3.76)
pt3dadd(-230.82, -407.61, -9.7, 3.76)
pt3dadd(-230.96, -407.93, -9.7, 3.76)
pt3dadd(-231.1, -408.08, -9.7, 3.76)
pt3dadd(-231.1, -408.4, -9.7, 3.76)
pt3dadd(-231.24, -408.88, -9.7, 3.76)
pt3dadd(-231.38, -409.03, -9.7, 3.76)
pt3dadd(-231.52, -409.35, -9.7, 3.76)
pt3dadd(-231.66, -409.51, -9.7, 3.76)
pt3dadd(-231.8, -409.67, -9.7, 3.76)
pt3dadd(-231.8, -409.98, -9.7, 3.76)
pt3dadd(-231.94, -409.83, -9.7, 3.76)
pt3dadd(-231.94, -409.03, -9.7, 3.76)
pt3dadd(-231.8, -408.88, -9.7, 3.76)
pt3dadd(-236.4, -416, -9.7, 3.76)
pt3dadd(-236.26, -416.32, -9.7, 3.76)
pt3dadd(-237.23, -416.32, -9.7, 3.76)
pt3dadd(-237.51, -416.47, -9.7, 3.76)
pt3dadd(-237.79, -416.79, -9.7, 3.76)
pt3dadd(-238.07, -416.79, -9.7, 3.76)
pt3dadd(-238.35, -416.95, -9.7, 3.76)
pt3dadd(-238.9, -416.95, -9.7, 3.76)
}
dend[97] {pt3dclear()
pt3dadd(132.05, 152.22, -3.7, 4.46)
pt3dadd(130.94, 152.85, -4.7, 4.46)
pt3dadd(130.66, 153.17, -4.7, 4.46)
pt3dadd(130.38, 153.49, -4.7, 4.46)
pt3dadd(130.1, 153.8, -4.7, 4.46)
pt3dadd(129.96, 154.28, -4.7, 4.46)
pt3dadd(129.69, 154.43, -4.7, 4.46)
pt3dadd(129.55, 154.59, -4.7, 4.46)
pt3dadd(129.41, 154.75, -4.7, 4.46)
pt3dadd(129.27, 155.07, -4.7, 4.46)
pt3dadd(129.13, 155.23, -4.7, 4.46)
pt3dadd(128.99, 155.38, -4.7, 4.46)
pt3dadd(128.85, 155.54, -4.7, 4.46)
pt3dadd(128.57, 155.54, -4.7, 4.46)
pt3dadd(128.43, 155.7, -4.7, 4.46)
pt3dadd(128.29, 155.86, -4.7, 4.46)
pt3dadd(128.01, 156.02, -4.7, 4.46)
pt3dadd(127.73, 156.02, -4.7, 4.46)
pt3dadd(127.46, 156.18, -4.7, 4.46)
pt3dadd(121.6, 156.18, -4.7, 4.46)
pt3dadd(120.91, 156.02, -4.7, 3.34)
pt3dadd(120.35, 156.02, -4.7, 3.34)
pt3dadd(120.07, 155.86, -4.7, 3.34)
pt3dadd(119.93, 155.7, -4.7, 3.34)
pt3dadd(119.51, 155.7, -4.7, 3.34)
pt3dadd(119.37, 155.54, -4.7, 3.34)
pt3dadd(118.26, 155.54, -4.7, 3.34)
pt3dadd(118.12, 155.38, -4.7, 3.34)
pt3dadd(117.84, 155.38, -4.7, 3.34)
pt3dadd(117.7, 155.23, -4.7, 3.34)
pt3dadd(115.19, 155.23, -4.7, 3.34)
pt3dadd(115.05, 155.07, -4.7, 3.34)
pt3dadd(114.78, 155.07, -4.7, 3.34)
pt3dadd(114.64, 154.91, -4.7, 3.34)
pt3dadd(114.36, 154.75, -4.7, 3.34)
pt3dadd(114.22, 154.59, -4.7, 3.34)
pt3dadd(113.94, 154.43, -4.7, 3.34)
pt3dadd(113.66, 154.43, -4.7, 3.34)
pt3dadd(113.38, 154.28, -4.7, 3.34)
pt3dadd(113.1, 154.28, -4.7, 3.34)
pt3dadd(112.82, 154.12, -4.7, 3.34)
pt3dadd(112.68, 153.96, -4.7, 3.34)
pt3dadd(112.55, 153.8, -4.7, 3.34)
pt3dadd(112.41, 153.64, -4.7, 3.34)
pt3dadd(111.85, 153.64, -4.7, 3.34)
pt3dadd(111.71, 153.49, -4.7, 3.34)
pt3dadd(111.43, 153.49, -4.7, 3.34)
pt3dadd(111.15, 153.33, -4.7, 3.34)
pt3dadd(111.01, 153.17, -4.7, 3.34)
pt3dadd(110.73, 153.01, -4.7, 3.34)
pt3dadd(110.46, 152.85, -4.7, 3.34)
pt3dadd(110.18, 152.69, -4.7, 3.34)
pt3dadd(110.04, 152.54, -4.7, 3.34)
pt3dadd(109.76, 152.38, -4.7, 3.34)
pt3dadd(109.48, 152.38, -4.7, 3.34)
pt3dadd(109.34, 152.22, -4.7, 3.34)
pt3dadd(109.06, 152.22, -4.7, 3.34)
pt3dadd(108.92, 152.06, -4.7, 3.34)
pt3dadd(108.78, 151.9, -4.7, 3.34)
pt3dadd(108.5, 151.74, -4.7, 3.34)
pt3dadd(108.36, 151.59, -4.7, 3.34)
pt3dadd(108.09, 151.59, -4.7, 3.34)
pt3dadd(107.95, 151.43, -4.7, 3.34)
pt3dadd(107.67, 151.27, -4.7, 3.34)
pt3dadd(107.39, 151.27, -4.7, 3.34)
pt3dadd(107.25, 151.11, -4.7, 3.34)
pt3dadd(107.11, 150.95, -4.7, 3.34)
pt3dadd(106.97, 150.79, -4.7, 3.34)
pt3dadd(106.69, 150.64, -4.7, 3.34)
pt3dadd(106.14, 150.64, -4.7, 3.34)
pt3dadd(106, 150.48, -4.7, 3.34)
pt3dadd(105.72, 150.48, -4.7, 3.34)
pt3dadd(105.58, 150.32, -4.7, 3.34)
pt3dadd(105.44, 150.16, -4.7, 3.34)
pt3dadd(105.16, 150.16, -4.7, 3.34)
pt3dadd(105.02, 150, -4.7, 3.34)
pt3dadd(104.88, 149.84, -4.7, 3.34)
pt3dadd(104.6, 149.69, -4.7, 3.34)
pt3dadd(104.32, 149.37, -4.7, 3.34)
pt3dadd(104.04, 149.21, -4.7, 3.34)
pt3dadd(103.77, 149.21, -4.7, 3.34)
pt3dadd(103.63, 149.05, -4.7, 3.34)
pt3dadd(103.35, 148.9, -4.7, 3.34)
pt3dadd(103.21, 148.58, -4.7, 3.34)
pt3dadd(102.93, 148.42, -4.7, 3.34)
pt3dadd(102.65, 148.1, -4.7, 3.34)
pt3dadd(102.37, 147.79, -4.7, 3.34)
pt3dadd(102.23, 147.63, -4.7, 3.34)
pt3dadd(101.95, 147.31, -4.7, 3.34)
pt3dadd(101.82, 147.15, -4.7, 3.34)
pt3dadd(101.54, 146.84, -4.7, 3.34)
pt3dadd(101.26, 146.52, -4.7, 3.34)
pt3dadd(100.84, 146.05, -4.7, 3.34)
pt3dadd(100.56, 145.73, -4.7, 3.34)
pt3dadd(100.28, 145.41, -4.7, 3.34)
pt3dadd(100.14, 145.1, -4.7, 3.34)
pt3dadd(99.72, 144.78, -4.7, 3.34)
pt3dadd(99.59, 144.46, -4.7, 3.34)
pt3dadd(99.31, 144.31, -4.7, 3.34)
pt3dadd(99.17, 144.15, -4.7, 3.34)
pt3dadd(98.89, 143.83, -4.7, 3.34)
pt3dadd(98.75, 143.51, -4.7, 3.34)
pt3dadd(98.47, 143.36, -4.7, 3.34)
pt3dadd(98.19, 143.04, -4.7, 3.34)
pt3dadd(98.05, 142.72, -4.7, 3.34)
pt3dadd(97.77, 142.56, -4.7, 3.34)
pt3dadd(97.5, 142.56, -4.7, 3.34)
pt3dadd(97.08, 142.25, -4.7, 3.34)
pt3dadd(96.94, 141.93, -4.7, 3.34)
pt3dadd(96.66, 141.77, -4.7, 3.34)
pt3dadd(96.24, 141.46, -4.7, 3.34)
pt3dadd(96.1, 141.14, -4.7, 3.34)
pt3dadd(95.96, 140.98, -4.7, 3.34)
pt3dadd(95.68, 140.82, -4.7, 3.34)
pt3dadd(95.54, 140.51, -4.7, 3.34)
pt3dadd(95.4, 140.35, -4.7, 3.34)
pt3dadd(95.13, 140.19, -4.7, 3.34)
pt3dadd(94.99, 139.87, -4.7, 3.34)
pt3dadd(94.85, 139.71, -4.7, 3.34)
pt3dadd(94.57, 139.56, -4.7, 3.34)
pt3dadd(94.43, 139.24, -4.7, 3.34)
pt3dadd(94.15, 139.24, -4.7, 3.34)
pt3dadd(94.01, 139.08, -4.7, 3.34)
pt3dadd(93.73, 138.92, -4.7, 3.34)
pt3dadd(93.59, 138.77, -4.7, 3.34)
pt3dadd(93.45, 138.61, -4.7, 3.34)
pt3dadd(93.31, 138.45, -4.7, 3.34)
pt3dadd(93.04, 138.29, -4.7, 3.34)
pt3dadd(92.34, 138.29, -4.7, 3.34)
pt3dadd(93.31, 138.77, -6.7, 3.34)
pt3dadd(93.04, 138.77, -6.7, 3.34)
pt3dadd(92.76, 138.61, -6.7, 3.34)
pt3dadd(92.62, 138.29, -6.7, 3.34)
pt3dadd(92.48, 138.13, -6.7, 3.34)
pt3dadd(92.2, 138.13, -6.7, 3.34)
pt3dadd(92.06, 137.97, -6.7, 3.34)
pt3dadd(91.92, 137.66, -6.7, 3.34)
pt3dadd(91.64, 137.5, -6.7, 3.34)
pt3dadd(91.5, 137.18, -6.7, 3.34)
pt3dadd(91.22, 137.02, -6.7, 3.34)
pt3dadd(91.08, 136.87, -6.7, 3.34)
pt3dadd(90.81, 136.55, -6.7, 3.34)
pt3dadd(90.67, 136.23, -6.7, 3.34)
pt3dadd(90.25, 135.92, -6.7, 3.34)
pt3dadd(90.11, 135.76, -6.7, 3.34)
pt3dadd(89.97, 135.6, -6.7, 3.34)
}
}
proc shape3d_146() {
dend[97] { pt3dadd(89.69, 135.28, -6.7, 3.34)
pt3dadd(89.41, 134.97, -6.7, 3.34)
pt3dadd(89.27, 134.65, -6.7, 3.34)
pt3dadd(88.99, 134.33, -6.7, 3.34)
pt3dadd(88.86, 134.18, -6.7, 3.34)
pt3dadd(88.44, 133.86, -6.7, 3.34)
pt3dadd(88.3, 133.54, -6.7, 3.34)
pt3dadd(88.02, 133.38, -6.7, 3.34)
pt3dadd(87.74, 133.07, -6.7, 3.34)
pt3dadd(87.46, 132.75, -6.7, 3.34)
pt3dadd(87.18, 132.43, -6.7, 3.34)
pt3dadd(86.9, 132.12, -6.7, 3.34)
pt3dadd(86.49, 131.8, -6.7, 3.34)
pt3dadd(86.21, 131.33, -6.7, 3.34)
pt3dadd(85.79, 131.01, -6.7, 3.34)
pt3dadd(85.37, 130.53, -6.7, 3.34)
pt3dadd(85.09, 130.38, -6.7, 3.34)
pt3dadd(84.4, 129.59, -6.7, 3.34)
pt3dadd(83.98, 129.11, -6.7, 3.34)
pt3dadd(83.56, 128.79, -6.7, 3.34)
pt3dadd(83.14, 128.32, -6.7, 3.34)
pt3dadd(82.86, 128.16, -6.7, 3.34)
pt3dadd(82.45, 127.69, -6.7, 3.34)
pt3dadd(82.03, 127.53, -6.7, 3.34)
pt3dadd(81.75, 127.21, -6.7, 3.34)
pt3dadd(81.19, 126.58, -6.7, 3.34)
pt3dadd(80.91, 126.26, -6.7, 3.34)
pt3dadd(80.49, 125.94, -6.7, 3.34)
pt3dadd(80.22, 125.63, -6.7, 3.34)
pt3dadd(79.94, 125.31, -6.7, 3.34)
pt3dadd(79.8, 125.15, -6.7, 3.34)
pt3dadd(79.52, 125, -6.7, 3.34)
pt3dadd(79.24, 124.84, -6.7, 3.34)
pt3dadd(78.82, 124.84, -6.7, 3.34)
pt3dadd(78.68, 125.15, -10.7, 3.34)
pt3dadd(78.54, 125, -10.7, 3.34)
pt3dadd(78.13, 125, -10.7, 3.34)
pt3dadd(77.99, 124.84, -10.7, 3.34)
pt3dadd(77.71, 124.68, -10.7, 3.34)
pt3dadd(77.43, 124.52, -10.7, 3.34)
pt3dadd(77.15, 124.52, -10.7, 3.34)
pt3dadd(77.01, 124.36, -10.7, 3.34)
pt3dadd(76.73, 124.2, -10.7, 3.34)
pt3dadd(76.31, 124.2, -10.7, 3.34)
pt3dadd(75.9, 124.05, -10.7, 3.34)
pt3dadd(75.62, 123.89, -10.7, 3.34)
pt3dadd(75.2, 123.89, -10.7, 3.34)
pt3dadd(75.06, 123.73, -10.7, 3.34)
pt3dadd(74.78, 123.73, -10.7, 3.34)
pt3dadd(74.5, 123.57, -10.7, 3.34)
pt3dadd(74.22, 123.57, -10.7, 3.34)
pt3dadd(73.94, 123.41, -10.7, 3.34)
pt3dadd(73.53, 123.41, -10.7, 3.34)
pt3dadd(73.11, 123.1, -10.7, 3.34)
pt3dadd(72.13, 123.1, -10.7, 3.34)
pt3dadd(71.99, 122.94, -10.7, 3.34)
pt3dadd(71.58, 122.78, -10.7, 3.34)
pt3dadd(64.05, 122.78, -10.7, 3.34)
}
dend[98] {pt3dclear()
pt3dadd(156.02, 225.03, -3.7, 4.74)
pt3dadd(154.35, 223.76, 0.3, 4.74)
pt3dadd(145.43, 223.76, 0.3, 4.74)
pt3dadd(144.88, 223.44, 0.3, 4.74)
pt3dadd(144.32, 223.13, 0.3, 4.74)
pt3dadd(144.04, 222.81, 0.3, 4.74)
pt3dadd(143.48, 222.81, 0.3, 4.74)
pt3dadd(142.92, 222.18, 0.3, 4.74)
pt3dadd(142.65, 221.86, 0.3, 4.74)
pt3dadd(142.37, 221.54, 0.3, 4.74)
pt3dadd(141.81, 221.23, 0.3, 4.74)
pt3dadd(141.53, 220.91, 0.3, 4.74)
pt3dadd(140.97, 220.59, 0.3, 4.74)
pt3dadd(140.42, 220.28, 0.3, 4.74)
pt3dadd(140.14, 219.96, 0.3, 4.74)
pt3dadd(139.58, 219.65, 0.3, 4.74)
pt3dadd(139.3, 219.33, 0.3, 4.74)
pt3dadd(138.74, 219.01, 0.3, 4.74)
pt3dadd(137.91, 219.01, 0.3, 4.74)
pt3dadd(137.35, 218.7, 0.3, 4.74)
pt3dadd(135.96, 218.7, 0.3, 4.74)
pt3dadd(135.68, 218.38, 0.3, 4.74)
pt3dadd(129.55, 218.38, 0.3, 4.74)
pt3dadd(128.99, 218.06, 0.3, 4.74)
pt3dadd(128.43, 217.75, 0.3, 4.74)
pt3dadd(128.15, 217.43, 0.3, 4.74)
pt3dadd(127.6, 217.11, 0.3, 4.74)
pt3dadd(126.76, 217.11, 0.3, 4.74)
pt3dadd(126.48, 216.8, 0.3, 4.74)
pt3dadd(125.37, 216.8, 0.3, 4.74)
pt3dadd(125.09, 216.48, 0.3, 4.74)
pt3dadd(124.81, 216.16, 0.3, 4.74)
pt3dadd(123.69, 216.16, 0.3, 4.74)
pt3dadd(123.41, 215.85, 0.3, 4.74)
pt3dadd(123.14, 215.53, 0.3, 4.74)
pt3dadd(122.58, 215.21, 0.3, 4.74)
pt3dadd(122.02, 214.9, 0.3, 4.74)
pt3dadd(121.46, 214.58, 0.3, 4.74)
pt3dadd(120.91, 213.95, 0.3, 4.74)
pt3dadd(120.35, 213.95, 0.3, 4.74)
pt3dadd(120.07, 213.63, 0.3, 4.74)
pt3dadd(119.79, 213.31, 0.3, 4.74)
pt3dadd(119.23, 213.31, 0.3, 4.74)
pt3dadd(118.96, 213, 0.3, 4.74)
pt3dadd(118.68, 212.68, 0.3, 4.74)
pt3dadd(118.12, 212.68, 0.3, 4.74)
pt3dadd(117.84, 212.36, 0.3, 4.74)
pt3dadd(117.56, 212.05, 0.3, 4.74)
pt3dadd(117.28, 211.73, 0.3, 4.74)
pt3dadd(117, 211.41, 0.3, 4.74)
pt3dadd(116.45, 211.41, 0.3, 4.74)
pt3dadd(115.89, 211.1, 0.3, 4.74)
pt3dadd(115.61, 210.78, 0.3, 4.74)
pt3dadd(115.33, 210.47, 0.3, 4.74)
pt3dadd(115.05, 210.15, 0.3, 4.74)
pt3dadd(114.78, 209.83, 0.3, 4.74)
pt3dadd(114.22, 209.83, 0.3, 4.74)
pt3dadd(113.94, 209.52, 0.3, 4.74)
pt3dadd(113.1, 209.52, 0.3, 4.74)
pt3dadd(112.82, 209.2, 0.3, 4.74)
pt3dadd(111.99, 208.88, 0.3, 4.74)
pt3dadd(111.43, 208.57, 0.3, 4.74)
pt3dadd(111.15, 208.25, 0.3, 4.74)
pt3dadd(110.87, 207.93, 0.3, 4.74)
pt3dadd(110.59, 207.62, 0.3, 4.74)
pt3dadd(110.04, 207.62, 0.3, 4.74)
pt3dadd(109.48, 207.3, 0.3, 4.74)
pt3dadd(109.2, 206.98, 0.3, 4.74)
pt3dadd(108.64, 206.98, 0.3, 4.74)
pt3dadd(108.09, 206.35, 0.3, 4.74)
pt3dadd(107.53, 206.03, 0.3, 4.74)
pt3dadd(106.97, 205.72, 0.3, 4.74)
pt3dadd(105.02, 205.72, 0.3, 4.74)
pt3dadd(104.74, 205.4, 0.3, 4.74)
pt3dadd(103.91, 205.4, 0.3, 4.74)
pt3dadd(103.63, 205.08, 0.3, 4.74)
pt3dadd(103.35, 204.77, 0.3, 4.74)
pt3dadd(103.07, 204.45, 0.3, 4.74)
pt3dadd(102.79, 204.13, 0.3, 4.74)
pt3dadd(102.51, 203.82, 0.3, 4.74)
pt3dadd(102.23, 203.5, 0.3, 4.74)
pt3dadd(101.68, 203.18, 0.3, 4.74)
pt3dadd(101.12, 203.18, 0.3, 4.74)
pt3dadd(100.84, 202.87, 0.3, 4.74)
pt3dadd(100.56, 202.55, 0.3, 4.74)
pt3dadd(100.28, 202.23, 0.3, 4.74)
pt3dadd(99.72, 202.23, 0.3, 4.74)
pt3dadd(99.45, 201.92, 0.3, 4.74)
pt3dadd(99.17, 201.6, 0.3, 4.74)
pt3dadd(98.89, 201.29, 0.3, 4.74)
pt3dadd(98.61, 200.97, 0.3, 4.74)
pt3dadd(98.05, 200.97, 0.3, 4.74)
pt3dadd(97.5, 200.65, 0.3, 4.74)
pt3dadd(96.94, 200.34, 0.3, 4.74)
pt3dadd(96.66, 200.02, 0.3, 4.74)
pt3dadd(96.1, 199.39, 0.3, 4.74)
pt3dadd(95.82, 199.07, 0.3, 4.74)
pt3dadd(95.27, 198.75, 0.3, 4.74)
pt3dadd(94.99, 198.12, 0.3, 4.74)
pt3dadd(94.43, 197.49, 0.3, 4.74)
pt3dadd(94.15, 197.17, 0.3, 4.74)
pt3dadd(93.59, 196.54, 0.3, 4.74)
pt3dadd(93.31, 195.9, 0.3, 4.74)
pt3dadd(93.04, 195.59, 0.3, 4.74)
pt3dadd(92.48, 195.27, 0.3, 4.74)
pt3dadd(92.48, 194.64, 0.3, 4.74)
pt3dadd(92.2, 194.32, 0.3, 4.74)
pt3dadd(91.64, 194, 0.3, 4.74)
pt3dadd(91.36, 193.37, 0.3, 4.74)
pt3dadd(91.08, 193.05, 0.3, 4.74)
pt3dadd(90.53, 192.42, 0.3, 4.74)
pt3dadd(90.25, 192.1, 0.3, 4.74)
pt3dadd(89.69, 191.79, 0.3, 4.74)
pt3dadd(89.41, 191.47, 0.3, 4.74)
pt3dadd(89.13, 190.84, 0.3, 4.74)
pt3dadd(88.58, 190.52, 0.3, 4.74)
pt3dadd(88.3, 190.21, 0.3, 4.74)
pt3dadd(87.74, 189.57, 0.3, 4.74)
pt3dadd(87.18, 188.62, 0.3, 4.74)
pt3dadd(86.9, 188.31, 0.3, 4.74)
pt3dadd(86.63, 187.67, 0.3, 4.74)
pt3dadd(86.07, 187.36, 0.3, 4.74)
pt3dadd(85.79, 186.72, 0.3, 4.74)
pt3dadd(85.51, 186.09, 0.3, 4.74)
pt3dadd(84.95, 185.77, 0.3, 4.74)
pt3dadd(83.84, 184.51, 0.3, 4.74)
pt3dadd(83.56, 183.87, 0.3, 4.74)
pt3dadd(83, 183.24, 0.3, 4.74)
pt3dadd(82.72, 182.92, 0.3, 4.74)
pt3dadd(82.45, 182.29, 0.3, 4.74)
pt3dadd(81.61, 181.34, 0.3, 4.74)
pt3dadd(81.33, 181.03, 0.3, 4.74)
pt3dadd(81.05, 180.71, 0.3, 4.74)
pt3dadd(80.77, 180.08, 0.3, 4.74)
pt3dadd(79.94, 179.13, 0.3, 4.74)
pt3dadd(79.38, 178.49, 0.3, 4.74)
pt3dadd(79.1, 177.86, 0.3, 4.74)
pt3dadd(78.54, 177.23, 0.3, 4.74)
pt3dadd(78.26, 176.91, 0.3, 4.74)
pt3dadd(76.87, 175.33, 0.3, 4.74)
pt3dadd(76.31, 174.69, 0.3, 4.74)
pt3dadd(75.76, 174.06, 0.3, 4.74)
}
}
proc shape3d_147() {
dend[98] { pt3dadd(75.2, 173.43, 0.3, 4.74)
pt3dadd(74.08, 172.16, 0.3, 4.74)
pt3dadd(73.53, 171.85, 0.3, 4.74)
pt3dadd(73.25, 171.21, 0.3, 4.74)
pt3dadd(72.41, 170.9, 0.3, 4.74)
pt3dadd(71.85, 170.26, 0.3, 4.74)
pt3dadd(71.3, 169.95, 0.3, 4.74)
pt3dadd(71.02, 169.63, 0.3, 4.74)
pt3dadd(70.46, 169, 0.3, 4.74)
pt3dadd(69.62, 168.05, 0.3, 4.74)
pt3dadd(69.07, 167.73, 0.3, 4.74)
pt3dadd(68.23, 167.1, 0.3, 4.74)
pt3dadd(67.39, 166.46, 0.3, 4.74)
pt3dadd(66, 164.88, 0.3, 4.74)
pt3dadd(65.44, 163.93, 0.3, 4.74)
pt3dadd(64.89, 163.61, 0.3, 4.74)
pt3dadd(64.33, 162.98, 0.3, 4.74)
pt3dadd(63.77, 162.35, 0.3, 4.74)
pt3dadd(63.21, 162.03, 0.3, 4.74)
pt3dadd(62.66, 161.4, 0.3, 4.74)
pt3dadd(62.38, 160.77, 0.3, 4.74)
pt3dadd(61.82, 160.45, 0.3, 4.74)
pt3dadd(60.98, 159.82, 0.3, 4.74)
pt3dadd(60.71, 159.18, 0.3, 4.74)
pt3dadd(60.43, 158.87, 0.3, 4.74)
pt3dadd(59.31, 157.6, 0.3, 4.74)
pt3dadd(58.75, 157.28, 0.3, 4.74)
pt3dadd(58.48, 156.97, 0.3, 4.74)
pt3dadd(57.64, 156.02, 0.3, 4.74)
pt3dadd(57.36, 155.7, 0.3, 4.74)
pt3dadd(57.08, 155.07, 0.3, 4.74)
pt3dadd(56.53, 154.43, 0.3, 4.74)
pt3dadd(56.25, 153.8, 0.3, 4.74)
pt3dadd(55.69, 153.49, 0.3, 4.74)
pt3dadd(54.57, 152.22, 0.3, 4.74)
pt3dadd(54.3, 151.9, 0.3, 4.74)
pt3dadd(54.02, 151.27, 0.3, 4.74)
pt3dadd(53.46, 150.95, 0.3, 4.74)
pt3dadd(53.18, 150.64, 0.3, 4.74)
pt3dadd(52.9, 150, 0.3, 4.74)
pt3dadd(52.62, 149.69, 0.3, 4.74)
pt3dadd(52.34, 149.37, 0.3, 4.74)
pt3dadd(52.07, 149.05, 0.3, 4.74)
pt3dadd(51.79, 148.74, 0.3, 4.74)
pt3dadd(51.51, 148.42, 0.3, 4.74)
pt3dadd(51.23, 148.74, 0.3, 4.74)
pt3dadd(51.51, 149.37, 0.3, 4.74)
pt3dadd(51.51, 150, 0.3, 4.74)
pt3dadd(52.07, 150.64, 0.3, 4.74)
pt3dadd(52.34, 150.95, 0.3, 4.74)
pt3dadd(52.07, 150, 0.3, 4.18)
pt3dadd(51.51, 150, 0.3, 4.18)
pt3dadd(50.95, 149.69, 0.3, 4.18)
pt3dadd(50.95, 149.05, 0.3, 4.18)
pt3dadd(50.39, 148.42, 0.3, 4.18)
pt3dadd(50.12, 147.47, 0.3, 4.18)
pt3dadd(49.84, 147.15, 0.3, 4.18)
pt3dadd(49.56, 146.84, 0.3, 4.18)
pt3dadd(49.56, 145.57, 0.3, 4.18)
pt3dadd(49.28, 145.25, 0.3, 4.18)
pt3dadd(49.28, 143.36, 0.3, 4.18)
pt3dadd(49, 143.04, 0.3, 4.18)
pt3dadd(49, 142.09, 0.3, 4.18)
pt3dadd(48.72, 141.46, 0.3, 4.18)
pt3dadd(48.72, 140.82, 0.3, 4.18)
pt3dadd(48.44, 140.19, 0.3, 4.18)
pt3dadd(48.16, 139.87, 0.3, 4.18)
pt3dadd(47.89, 139.56, 0.3, 4.18)
pt3dadd(47.89, 138.92, 0.3, 4.18)
pt3dadd(47.33, 138.61, 0.3, 4.18)
pt3dadd(47.05, 137.97, 0.3, 4.18)
pt3dadd(46.49, 137.66, 0.3, 4.18)
pt3dadd(46.21, 137.34, 0.3, 4.18)
pt3dadd(45.66, 137.02, 0.3, 4.18)
pt3dadd(45.38, 136.71, 0.3, 4.18)
pt3dadd(45.1, 136.07, 0.3, 4.18)
pt3dadd(44.82, 135.76, 0.3, 4.18)
pt3dadd(44.54, 135.12, 0.3, 4.18)
pt3dadd(44.26, 134.81, 0.3, 4.18)
pt3dadd(43.7, 134.49, 0.3, 4.18)
pt3dadd(43.43, 133.54, 0.3, 4.18)
pt3dadd(43.15, 133.23, 0.3, 4.18)
pt3dadd(42.87, 132.59, 0.3, 4.18)
pt3dadd(42.59, 131.96, 0.3, 4.18)
pt3dadd(42.03, 131.64, 0.3, 4.18)
pt3dadd(42.03, 131.01, 0.3, 4.18)
pt3dadd(41.48, 130.38, 0.3, 4.18)
pt3dadd(41.2, 130.06, 0.3, 4.18)
pt3dadd(41.2, 129.43, 0.3, 4.18)
pt3dadd(40.64, 128.48, 0.3, 4.18)
pt3dadd(40.64, 127.84, 0.3, 4.18)
pt3dadd(40.36, 127.53, 0.3, 4.18)
pt3dadd(40.08, 126.89, 0.3, 4.18)
pt3dadd(39.8, 126.26, 0.3, 4.18)
pt3dadd(39.8, 125.63, 0.3, 4.18)
pt3dadd(39.52, 125, 0.3, 4.18)
pt3dadd(39.25, 124.36, 0.3, 4.18)
pt3dadd(38.97, 123.73, 0.3, 4.18)
pt3dadd(38.69, 123.41, 0.3, 4.18)
pt3dadd(38.41, 123.1, 0.3, 4.18)
pt3dadd(38.41, 122.46, 0.3, 4.18)
pt3dadd(38.13, 122.15, 0.3, 4.18)
pt3dadd(37.85, 121.51, 0.3, 4.18)
pt3dadd(37.29, 121.2, 0.3, 4.18)
pt3dadd(37.02, 120.56, 0.3, 4.18)
pt3dadd(36.74, 119.93, 0.3, 4.18)
pt3dadd(36.46, 119.61, 0.3, 4.18)
pt3dadd(35.9, 118.66, 0.3, 4.18)
pt3dadd(35.62, 118.35, 0.3, 4.18)
pt3dadd(35.34, 117.71, 0.3, 4.18)
pt3dadd(35.06, 117.08, 0.3, 4.18)
pt3dadd(34.79, 116.45, 0.3, 4.18)
pt3dadd(34.51, 116.13, 0.3, 4.18)
pt3dadd(34.23, 115.81, 0.3, 4.18)
pt3dadd(33.95, 115.18, 0.3, 4.18)
pt3dadd(33.39, 114.55, 0.3, 4.18)
pt3dadd(33.11, 113.92, 0.3, 4.18)
pt3dadd(32.84, 113.28, 0.3, 4.18)
pt3dadd(32.56, 112.65, 0.3, 4.18)
pt3dadd(32.28, 112.02, 0.3, 4.18)
pt3dadd(31.72, 111.07, 0.3, 4.18)
pt3dadd(31.44, 110.43, 0.3, 4.18)
pt3dadd(30.61, 109.48, 0.3, 4.18)
pt3dadd(30.33, 108.85, 0.3, 4.18)
pt3dadd(30.05, 107.9, 0.3, 4.18)
pt3dadd(29.77, 107.27, 0.3, 4.18)
pt3dadd(29.21, 106.63, 0.3, 4.18)
pt3dadd(28.93, 106.32, 0.3, 4.18)
pt3dadd(28.65, 105.37, 0.3, 4.18)
pt3dadd(28.38, 105.05, 0.3, 4.18)
pt3dadd(27.82, 104.74, 0.3, 4.18)
pt3dadd(27.54, 104.1, 0.3, 4.18)
pt3dadd(26.7, 103.15, 0.3, 4.18)
pt3dadd(26.42, 102.84, 0.3, 4.18)
pt3dadd(25.87, 101.89, 0.3, 4.18)
pt3dadd(25.59, 101.57, 0.3, 4.18)
pt3dadd(24.75, 100.62, 0.3, 4.18)
pt3dadd(24.47, 100.3, 0.3, 4.18)
pt3dadd(23.92, 99.67, 0.3, 4.18)
pt3dadd(23.64, 99.04, 0.3, 4.18)
pt3dadd(23.08, 98.4, 0.3, 4.18)
pt3dadd(22.8, 97.77, 0.3, 4.18)
pt3dadd(22.52, 97.45, 0.3, 4.18)
pt3dadd(21.41, 96.19, 0.3, 4.18)
pt3dadd(21.13, 95.56, 0.3, 4.18)
pt3dadd(20.85, 95.24, 0.3, 4.18)
pt3dadd(20.29, 94.92, 0.3, 4.18)
pt3dadd(19.74, 94.29, 0.3, 4.18)
pt3dadd(19.46, 93.97, 0.3, 4.18)
pt3dadd(19.18, 93.34, 0.3, 4.18)
pt3dadd(18.9, 93.02, 0.3, 4.18)
pt3dadd(18.34, 93.02, 0.3, 4.18)
pt3dadd(18.06, 92.71, 0.3, 4.18)
pt3dadd(17.51, 92.39, 0.3, 4.18)
pt3dadd(17.23, 91.76, 0.3, 4.18)
pt3dadd(16.67, 91.44, 0.3, 4.18)
pt3dadd(16.11, 91.12, 0.3, 4.18)
pt3dadd(15.83, 90.81, 0.3, 4.18)
pt3dadd(15.28, 90.17, 0.3, 4.18)
pt3dadd(15, 89.86, 0.3, 4.18)
pt3dadd(14.44, 89.22, 0.3, 4.18)
pt3dadd(13.88, 88.91, 0.3, 4.18)
pt3dadd(13.6, 88.27, 0.3, 4.18)
pt3dadd(13.05, 87.64, 0.3, 4.18)
pt3dadd(12.49, 87.32, 0.3, 4.18)
pt3dadd(12.21, 86.69, 0.3, 4.18)
pt3dadd(11.37, 86.38, 0.3, 4.18)
pt3dadd(10.82, 85.43, 0.3, 4.18)
pt3dadd(10.26, 85.11, 0.3, 4.18)
pt3dadd(9.98, 84.79, 0.3, 4.18)
pt3dadd(9.42, 84.48, 0.3, 4.18)
pt3dadd(8.87, 84.48, 0.3, 4.18)
pt3dadd(8.31, 84.16, 0.3, 4.18)
pt3dadd(7.75, 83.84, 0.3, 4.18)
pt3dadd(6.92, 83.21, 0.3, 4.18)
pt3dadd(6.64, 82.58, 0.3, 4.18)
pt3dadd(6.08, 82.26, 0.3, 4.18)
pt3dadd(5.52, 81.94, 0.3, 4.18)
pt3dadd(5.24, 81.63, 0.3, 4.18)
pt3dadd(4.69, 81.63, 0.3, 4.18)
pt3dadd(4.41, 81.31, 0.3, 4.18)
pt3dadd(3.85, 80.99, 0.3, 4.18)
pt3dadd(3.29, 80.68, 0.3, 4.18)
pt3dadd(3.01, 80.04, 0.3, 4.18)
pt3dadd(2.73, 79.73, 0.3, 4.18)
pt3dadd(2.18, 79.41, 0.3, 4.18)
pt3dadd(1.9, 79.09, 0.3, 4.18)
pt3dadd(1.34, 78.78, 0.3, 4.18)
pt3dadd(0.51, 77.83, 0.3, 4.18)
pt3dadd(0.23, 77.51, 0.3, 4.18)
pt3dadd(-0.33, 77.2, 0.3, 4.18)
pt3dadd(-0.61, 76.88, 0.3, 4.18)
pt3dadd(-1.17, 76.88, 0.3, 4.18)
pt3dadd(-1.45, 76.56, 0.3, 4.18)
pt3dadd(-2, 76.56, 0.3, 4.18)
pt3dadd(-2, 77.83, 0.3, 4.18)
pt3dadd(-0.89, 77.51, 0.3, 4.18)
pt3dadd(-1.45, 77.51, 0.3, 4.18)
pt3dadd(-1.72, 77.2, 0.3, 4.18)
pt3dadd(-2, 76.88, 0.3, 4.18)
}
}
proc shape3d_148() {
dend[98] { pt3dadd(-2.28, 76.56, 0.3, 4.18)
pt3dadd(-2.84, 76.25, 0.3, 4.18)
pt3dadd(-3.12, 75.93, 0.3, 4.18)
pt3dadd(-3.4, 75.3, 0.3, 4.18)
pt3dadd(-4.23, 74.35, 0.3, 4.18)
pt3dadd(-4.51, 73.71, 0.3, 4.18)
pt3dadd(-4.79, 73.4, 0.3, 4.18)
pt3dadd(-5.35, 72.76, 0.3, 4.18)
pt3dadd(-5.63, 72.45, 0.3, 4.18)
pt3dadd(-6.46, 71.5, 0.3, 4.18)
pt3dadd(-6.74, 71.18, 0.3, 4.18)
pt3dadd(-7.3, 70.86, 0.3, 4.18)
pt3dadd(-8.41, 69.6, 0.3, 4.18)
pt3dadd(-8.69, 68.96, 0.3, 4.18)
pt3dadd(-8.97, 68.65, 0.3, 4.18)
pt3dadd(-9.25, 68.33, 0.3, 4.18)
pt3dadd(-9.81, 68.02, 0.3, 4.18)
pt3dadd(-10.36, 67.38, 0.3, 4.18)
pt3dadd(-10.92, 66.75, 0.3, 4.18)
pt3dadd(-11.2, 66.43, 0.3, 4.18)
pt3dadd(-11.2, 65.8, 0.3, 4.18)
pt3dadd(-11.48, 65.48, 0.3, 4.18)
pt3dadd(-11.76, 65.17, 0.3, 4.18)
pt3dadd(-12.04, 64.85, 0.3, 4.18)
pt3dadd(-12.59, 63.9, 0.3, 4.18)
pt3dadd(-12.59, 63.27, 0.3, 4.18)
pt3dadd(-13.15, 62.95, 0.3, 4.18)
pt3dadd(-13.43, 62, 0.3, 4.18)
pt3dadd(-13.71, 61.37, 0.3, 4.18)
pt3dadd(-14.27, 60.73, 0.3, 4.18)
pt3dadd(-14.27, 59.78, 0.3, 4.18)
pt3dadd(-15.38, 58.52, 0.3, 4.18)
pt3dadd(-15.66, 57.89, 0.3, 4.18)
pt3dadd(-15.94, 57.25, 0.3, 4.18)
pt3dadd(-16.22, 56.62, 0.3, 4.18)
pt3dadd(-17.05, 55.99, 0.3, 4.18)
pt3dadd(-17.05, 55.35, 0.3, 4.18)
pt3dadd(-17.61, 55.04, 0.3, 4.18)
pt3dadd(-17.89, 54.4, 0.3, 4.18)
pt3dadd(-18.17, 53.77, 0.3, 4.18)
pt3dadd(-18.73, 53.45, 0.3, 4.18)
pt3dadd(-19, 52.82, 0.3, 4.18)
pt3dadd(-19.28, 52.19, 0.3, 4.18)
pt3dadd(-20.12, 51.24, 0.3, 4.18)
pt3dadd(-20.12, 50.6, 0.3, 4.18)
pt3dadd(-20.68, 50.29, 0.3, 4.18)
pt3dadd(-20.96, 49.97, 0.3, 4.18)
pt3dadd(-21.23, 49.34, 0.3, 4.18)
pt3dadd(-21.51, 49.02, 0.3, 4.18)
pt3dadd(-22.07, 48.39, 0.3, 4.18)
pt3dadd(-22.35, 48.07, 0.3, 4.18)
pt3dadd(-22.91, 47.44, 0.3, 4.18)
pt3dadd(-23.18, 47.12, 0.3, 4.18)
pt3dadd(-23.74, 46.81, 0.3, 4.18)
pt3dadd(-24.02, 46.49, 0.3, 4.18)
pt3dadd(-24.02, 45.86, 0.3, 4.18)
pt3dadd(-24.86, 45.22, 0.3, 4.18)
pt3dadd(-25.14, 44.59, 0.3, 4.18)
pt3dadd(-25.69, 43.96, 0.3, 4.18)
pt3dadd(-26.25, 43.32, 0.3, 4.18)
pt3dadd(-26.53, 43.01, 0.3, 4.18)
pt3dadd(-26.53, 42.37, 0.3, 4.18)
pt3dadd(-27.09, 42.06, 0.3, 4.18)
pt3dadd(-27.37, 41.74, 0.3, 4.18)
pt3dadd(-27.64, 41.11, 0.3, 4.18)
pt3dadd(-27.92, 40.79, 0.3, 4.18)
pt3dadd(-28.48, 40.47, 0.3, 4.18)
pt3dadd(-29.04, 39.84, 0.3, 4.18)
pt3dadd(-29.32, 39.53, 0.3, 4.18)
pt3dadd(-29.6, 38.89, 0.3, 4.18)
pt3dadd(-30.15, 38.26, 0.3, 4.18)
pt3dadd(-30.43, 37.63, 0.3, 4.18)
pt3dadd(-31.82, 36.04, 0.3, 4.18)
pt3dadd(-32.1, 35.73, 0.3, 4.18)
pt3dadd(-32.38, 35.09, 0.3, 4.18)
pt3dadd(-32.66, 34.46, 0.3, 4.18)
pt3dadd(-32.94, 33.83, 0.3, 4.18)
pt3dadd(-33.5, 33.19, 0.3, 4.18)
pt3dadd(-33.78, 32.56, 0.3, 4.18)
pt3dadd(-34.33, 31.61, 0.3, 4.18)
pt3dadd(-34.61, 31.29, 0.3, 4.18)
pt3dadd(-34.89, 30.98, 0.3, 4.18)
pt3dadd(-35.45, 30.34, 0.3, 4.18)
pt3dadd(-35.73, 29.71, 0.3, 4.18)
pt3dadd(-36.84, 28.45, 0.3, 4.18)
pt3dadd(-37.12, 28.13, 0.3, 4.18)
pt3dadd(-37.4, 27.81, 0.3, 4.18)
pt3dadd(-37.96, 27.81, 0.3, 4.18)
pt3dadd(-38.24, 27.5, 0.3, 4.18)
pt3dadd(-38.51, 26.86, 0.3, 4.18)
pt3dadd(-39.07, 26.55, 0.3, 4.18)
pt3dadd(-39.35, 25.91, 0.3, 4.18)
pt3dadd(-39.63, 25.6, 0.3, 4.18)
pt3dadd(-40.19, 25.28, 0.3, 4.18)
pt3dadd(-40.19, 24.65, 0.3, 4.18)
pt3dadd(-40.74, 24.65, 0.3, 4.18)
pt3dadd(-41.02, 24.01, 0.3, 4.18)
pt3dadd(-41.58, 23.38, 0.3, 4.18)
pt3dadd(-41.86, 22.75, 0.3, 4.18)
pt3dadd(-42.14, 22.11, 0.3, 4.18)
pt3dadd(-42.42, 21.8, 0.3, 4.18)
pt3dadd(-42.97, 21.48, 0.3, 4.18)
pt3dadd(-43.53, 20.53, 0.3, 4.18)
pt3dadd(-43.81, 19.9, 0.3, 4.18)
pt3dadd(-44.09, 19.58, 0.3, 4.18)
pt3dadd(-44.65, 18.95, 0.3, 4.18)
pt3dadd(-45.2, 18.32, 0.3, 4.18)
pt3dadd(-46.6, 16.73, 0.3, 4.18)
pt3dadd(-47.15, 16.1, 0.3, 4.18)
pt3dadd(-47.99, 15.47, 0.3, 4.18)
pt3dadd(-48.55, 14.83, 0.3, 4.18)
pt3dadd(-49.66, 14.2, 0.3, 4.18)
pt3dadd(-50.5, 13.25, 0.3, 4.18)
pt3dadd(-52.17, 11.98, 0.3, 4.18)
pt3dadd(-53.01, 11.03, 0.3, 4.18)
pt3dadd(-53.84, 10.72, 0.3, 4.18)
pt3dadd(-54.68, 10.09, 0.3, 4.18)
pt3dadd(-55.51, 9.45, 0.3, 4.18)
pt3dadd(-56.07, 9.14, 0.3, 4.18)
pt3dadd(-56.91, 8.82, 0.3, 4.18)
pt3dadd(-57.47, 8.5, 0.3, 4.18)
pt3dadd(-58.3, 8.5, 0.3, 4.18)
pt3dadd(-58.58, 8.19, 0.3, 4.18)
pt3dadd(-59.14, 7.87, 0.3, 4.18)
pt3dadd(-59.7, 7.55, 0.3, 4.18)
pt3dadd(-60.25, 7.55, 0.3, 4.18)
pt3dadd(-60.81, 7.24, 0.3, 4.18)
pt3dadd(-61.37, 7.24, 0.3, 4.18)
pt3dadd(-61.93, 6.92, 0.3, 4.18)
pt3dadd(-59.42, 8.5, 0.3, 4.18)
pt3dadd(-59.97, 8.5, 0.3, 4.18)
pt3dadd(-60.25, 8.19, 0.3, 4.18)
pt3dadd(-60.53, 7.87, 0.3, 4.18)
pt3dadd(-61.37, 7.87, 0.3, 4.18)
pt3dadd(-61.65, 7.55, 0.3, 4.18)
pt3dadd(-62.2, 7.55, 0.3, 4.18)
pt3dadd(-62.48, 7.24, 0.3, 4.18)
pt3dadd(-62.76, 6.6, 0.3, 4.18)
pt3dadd(-63.32, 6.29, 0.3, 4.18)
pt3dadd(-63.6, 5.97, 0.3, 4.18)
pt3dadd(-64.15, 5.97, 0.3, 4.18)
pt3dadd(-64.43, 5.65, 0.3, 4.18)
pt3dadd(-64.71, 5.34, 0.3, 4.18)
pt3dadd(-65.55, 5.34, 0.3, 4.18)
pt3dadd(-65.83, 5.02, 0.3, 4.18)
pt3dadd(-66.38, 4.7, 0.3, 4.18)
pt3dadd(-66.94, 4.39, 0.3, 4.18)
pt3dadd(-67.5, 4.07, 0.3, 4.18)
pt3dadd(-68.06, 3.75, 0.3, 4.18)
pt3dadd(-68.34, 3.44, 0.3, 4.18)
pt3dadd(-68.61, 3.12, 0.3, 4.18)
pt3dadd(-69.17, 2.8, 0.3, 4.18)
pt3dadd(-69.73, 2.17, 0.3, 4.18)
pt3dadd(-70.29, 1.85, 0.3, 4.18)
pt3dadd(-70.84, 1.54, 0.3, 4.18)
pt3dadd(-71.12, 1.22, 0.3, 4.18)
pt3dadd(-71.4, 0.91, 0.3, 4.18)
pt3dadd(-71.96, 0.59, 0.3, 4.18)
pt3dadd(-72.52, -0.04, 0.3, 4.18)
pt3dadd(-72.79, -0.36, 0.3, 4.18)
pt3dadd(-73.35, -0.36, 0.3, 4.18)
pt3dadd(-73.63, -0.99, 0.3, 4.18)
pt3dadd(-73.91, -1.31, 0.3, 4.18)
pt3dadd(-74.47, -1.63, 0.3, 4.18)
pt3dadd(-75.02, -2.26, 0.3, 4.18)
pt3dadd(-75.58, -2.58, 0.3, 4.18)
pt3dadd(-76.14, -3.21, 0.3, 4.18)
pt3dadd(-76.42, -3.53, 0.3, 4.18)
pt3dadd(-76.98, -3.84, 0.3, 4.18)
pt3dadd(-77.53, -4.16, 0.3, 4.18)
pt3dadd(-77.81, -4.79, 0.3, 4.18)
pt3dadd(-78.09, -5.11, 0.3, 4.18)
pt3dadd(-79.76, -7.01, 0.3, 4.18)
pt3dadd(-80.04, -7.33, 0.3, 4.18)
pt3dadd(-80.32, -7.96, 0.3, 4.18)
pt3dadd(-80.88, -8.59, 0.3, 4.18)
pt3dadd(-81.16, -9.22, 0.3, 4.18)
pt3dadd(-81.71, -9.86, 0.3, 4.18)
pt3dadd(-81.99, -10.49, 0.3, 4.18)
pt3dadd(-82.83, -12.07, 0.3, 4.18)
pt3dadd(-83.11, -12.71, 0.3, 4.18)
pt3dadd(-83.66, -13.02, 0.3, 4.18)
pt3dadd(-83.66, -13.66, 0.3, 4.18)
pt3dadd(-84.22, -14.29, 0.3, 4.18)
pt3dadd(-84.5, -14.61, 0.3, 4.18)
pt3dadd(-84.5, -15.24, 0.3, 4.18)
pt3dadd(-84.78, -15.87, 0.3, 4.18)
pt3dadd(-85.34, -16.51, 0.3, 4.18)
pt3dadd(-85.62, -17.14, 0.3, 4.18)
pt3dadd(-85.89, -17.77, 0.3, 4.18)
pt3dadd(-86.17, -18.09, 0.3, 4.18)
pt3dadd(-86.45, -18.72, 0.3, 4.18)
pt3dadd(-86.45, -19.35, 0.3, 4.18)
pt3dadd(-86.73, -19.99, 0.3, 4.18)
pt3dadd(-87.29, -20.3, 0.3, 4.18)
pt3dadd(-87.57, -21.25, 0.3, 4.18)
pt3dadd(-88.12, -22.2, 0.3, 4.18)
pt3dadd(-88.12, -22.84, 0.3, 4.18)
pt3dadd(-88.4, -23.47, 0.3, 4.18)
pt3dadd(-88.96, -24.1, 0.3, 4.18)
}
}
proc shape3d_149() {
dend[98] { pt3dadd(-89.52, -25.05, 0.3, 4.18)
pt3dadd(-89.8, -25.37, 0.3, 4.18)
pt3dadd(-90.07, -26, 0.3, 4.18)
pt3dadd(-90.35, -26.64, 0.3, 4.18)
pt3dadd(-90.91, -26.95, 0.3, 4.18)
pt3dadd(-90.91, -27.58, 0.3, 4.18)
pt3dadd(-91.19, -27.9, 0.3, 4.18)
pt3dadd(-91.47, -28.53, 0.3, 4.18)
pt3dadd(-92.03, -29.17, 0.3, 4.18)
pt3dadd(-92.58, -29.8, 0.3, 4.18)
pt3dadd(-92.86, -30.12, 0.3, 4.18)
pt3dadd(-93.14, -30.43, 0.3, 4.18)
pt3dadd(-93.42, -30.75, 0.3, 4.18)
pt3dadd(-93.7, -31.38, 0.3, 4.18)
pt3dadd(-93.98, -31.7, 0.3, 4.18)
pt3dadd(-94.26, -32.02, 0.3, 4.18)
pt3dadd(-94.81, -32.65, 0.3, 4.18)
pt3dadd(-95.09, -32.97, 0.3, 4.18)
pt3dadd(-95.09, -33.6, 0.3, 4.18)
pt3dadd(-95.37, -33.92, 0.3, 4.18)
pt3dadd(-95.65, -34.23, 0.3, 4.18)
pt3dadd(-96.21, -35.18, 0.3, 4.18)
pt3dadd(-96.48, -35.82, 0.3, 4.18)
pt3dadd(-96.76, -36.45, 0.3, 4.18)
pt3dadd(-96.76, -37.08, 0.3, 4.18)
pt3dadd(-97.04, -37.4, 0.3, 4.18)
pt3dadd(-97.32, -37.71, 0.3, 4.18)
pt3dadd(-97.32, -38.35, 0.3, 4.18)
pt3dadd(-97.6, -38.66, 0.3, 4.18)
pt3dadd(-97.88, -38.98, 0.3, 4.18)
pt3dadd(-98.16, -39.61, 0.3, 4.18)
pt3dadd(-98.71, -40.25, 0.3, 4.18)
pt3dadd(-98.44, -39.93, 0.3, 4.18)
pt3dadd(-97.88, -39.61, 0.3, 4.18)
pt3dadd(-97.88, -39.3, 0.3, 4.18)
pt3dadd(-98.71, -39.3, 4.3, 4.18)
pt3dadd(-98.71, -39.93, 4.3, 4.18)
pt3dadd(-98.99, -40.25, 4.3, 4.18)
pt3dadd(-99.27, -40.56, 4.3, 4.18)
pt3dadd(-99.55, -40.88, 4.3, 4.18)
pt3dadd(-99.83, -41.2, 4.3, 4.18)
pt3dadd(-100.11, -41.51, 4.3, 4.18)
pt3dadd(-100.39, -41.83, 4.3, 4.18)
pt3dadd(-100.94, -41.83, 4.3, 4.18)
pt3dadd(-101.5, -42.15, 4.3, 4.18)
pt3dadd(-102.06, -42.15, 4.3, 4.18)
pt3dadd(-102.34, -42.46, 4.3, 4.18)
pt3dadd(-102.62, -42.78, 4.3, 4.18)
pt3dadd(-108.19, -42.78, 4.3, 4.18)
pt3dadd(-108.47, -42.46, 4.3, 4.18)
pt3dadd(-109.03, -42.15, 4.3, 4.18)
pt3dadd(-109.58, -42.15, 4.3, 4.18)
pt3dadd(-110.14, -41.51, 4.3, 4.18)
pt3dadd(-110.42, -41.2, 4.3, 4.18)
pt3dadd(-110.98, -40.88, 4.3, 4.18)
pt3dadd(-111.53, -40.56, 4.3, 4.18)
pt3dadd(-111.81, -40.25, 4.3, 4.18)
pt3dadd(-112.09, -39.93, 4.3, 4.18)
pt3dadd(-112.65, -39.61, 4.3, 4.18)
pt3dadd(-112.93, -39.3, 4.3, 4.18)
pt3dadd(-113.49, -39.3, 4.3, 4.18)
pt3dadd(-113.76, -38.98, 4.3, 4.18)
pt3dadd(-114.04, -38.66, 4.3, 4.18)
pt3dadd(-114.32, -38.35, 4.3, 4.18)
pt3dadd(-114.88, -38.35, 4.3, 4.18)
pt3dadd(-115.44, -38.03, 4.3, 4.18)
pt3dadd(-115.72, -37.71, 4.3, 4.18)
pt3dadd(-116.27, -37.4, 4.3, 4.18)
pt3dadd(-116.83, -37.08, 4.3, 4.18)
pt3dadd(-117.39, -36.77, 4.3, 4.18)
pt3dadd(-117.95, -36.77, 4.3, 4.18)
pt3dadd(-118.22, -36.45, 4.3, 4.18)
pt3dadd(-118.78, -36.45, 4.3, 4.18)
pt3dadd(-119.34, -36.13, 4.3, 4.18)
pt3dadd(-120.17, -36.13, 4.3, 4.18)
pt3dadd(-120.45, -35.82, 4.3, 4.18)
pt3dadd(-127.7, -35.82, 4.3, 4.18)
pt3dadd(-127.98, -36.13, 4.3, 4.18)
pt3dadd(-128.26, -36.45, 4.3, 4.18)
pt3dadd(-128.54, -36.77, 4.3, 4.18)
pt3dadd(-129.09, -36.77, 4.3, 4.18)
pt3dadd(-129.37, -37.08, 4.3, 4.18)
pt3dadd(-129.65, -37.4, 4.3, 4.18)
pt3dadd(-130.21, -37.4, 4.3, 4.18)
pt3dadd(-130.49, -37.71, 4.3, 4.18)
pt3dadd(-130.77, -38.03, 4.3, 4.18)
pt3dadd(-131.04, -38.35, 4.3, 4.18)
pt3dadd(-131.32, -38.66, 4.3, 4.18)
pt3dadd(-131.88, -39.61, 4.3, 4.18)
pt3dadd(-132.16, -39.93, 4.3, 4.18)
pt3dadd(-132.44, -40.56, 4.3, 4.18)
pt3dadd(-132.72, -41.2, 4.3, 4.18)
pt3dadd(-133, -41.83, 4.3, 4.18)
pt3dadd(-133.55, -42.15, 4.3, 4.18)
pt3dadd(-134.11, -42.78, 4.3, 4.18)
pt3dadd(-134.67, -43.73, 4.3, 4.18)
pt3dadd(-135.5, -44.68, 4.3, 4.18)
pt3dadd(-135.78, -45, 4.3, 4.18)
pt3dadd(-136.34, -45.63, 4.3, 4.18)
pt3dadd(-136.62, -46.26, 4.3, 4.18)
pt3dadd(-137.18, -46.58, 4.3, 4.18)
pt3dadd(-137.73, -46.89, 4.3, 4.18)
pt3dadd(-138.01, -47.21, 4.3, 4.18)
pt3dadd(-138.57, -47.53, 4.3, 4.18)
pt3dadd(-139.13, -47.84, 4.3, 4.18)
pt3dadd(-139.68, -48.48, 4.3, 4.18)
pt3dadd(-139.96, -48.79, 4.3, 4.18)
pt3dadd(-140.52, -49.11, 4.3, 4.18)
pt3dadd(-141.08, -49.74, 4.3, 4.18)
pt3dadd(-141.64, -50.38, 4.3, 4.18)
pt3dadd(-141.91, -50.69, 4.3, 4.18)
pt3dadd(-142.47, -51.01, 4.3, 4.18)
pt3dadd(-142.75, -51.33, 4.3, 4.18)
pt3dadd(-143.31, -51.64, 4.3, 4.18)
pt3dadd(-143.59, -52.28, 4.3, 4.18)
pt3dadd(-144.14, -52.59, 4.3, 4.18)
pt3dadd(-144.7, -53.23, 4.3, 4.18)
pt3dadd(-145.26, -53.54, 4.3, 4.18)
pt3dadd(-145.82, -53.54, 4.3, 4.18)
pt3dadd(-146.37, -53.86, 4.3, 4.18)
pt3dadd(-146.93, -54.49, 4.3, 4.18)
pt3dadd(-147.21, -54.81, 4.3, 4.18)
pt3dadd(-147.77, -55.13, 4.3, 4.18)
pt3dadd(-148.32, -55.44, 4.3, 4.18)
pt3dadd(-148.6, -55.76, 4.3, 4.18)
pt3dadd(-149.16, -56.07, 4.3, 4.18)
pt3dadd(-150, -56.39, 4.3, 4.18)
pt3dadd(-150.28, -56.71, 4.3, 4.18)
pt3dadd(-151.11, -57.34, 4.3, 4.18)
pt3dadd(-151.95, -57.66, 4.3, 4.18)
pt3dadd(-152.5, -57.97, 4.3, 4.18)
pt3dadd(-153.06, -58.29, 4.3, 4.18)
pt3dadd(-153.34, -58.61, 4.3, 4.18)
pt3dadd(-153.9, -58.92, 4.3, 4.18)
pt3dadd(-154.73, -58.92, 4.3, 4.18)
pt3dadd(-155.29, -59.24, 4.3, 4.18)
pt3dadd(-155.85, -59.87, 4.3, 4.18)
pt3dadd(-156.69, -60.19, 4.3, 4.18)
pt3dadd(-157.52, -60.51, 4.3, 4.18)
pt3dadd(-158.08, -60.51, 4.3, 4.18)
pt3dadd(-158.92, -60.82, 4.3, 4.18)
pt3dadd(-159.47, -61.14, 4.3, 4.18)
pt3dadd(-160.03, -61.46, 4.3, 4.18)
pt3dadd(-161.7, -61.46, 4.3, 4.18)
pt3dadd(-161.98, -61.77, 4.3, 4.18)
pt3dadd(-162.54, -62.09, 4.3, 4.18)
pt3dadd(-164.49, -62.09, 4.3, 4.18)
pt3dadd(-165.05, -62.41, 4.3, 4.18)
pt3dadd(-166.44, -62.41, 4.3, 4.18)
pt3dadd(-167, -62.72, 4.3, 4.18)
pt3dadd(-167.28, -63.04, 4.3, 4.18)
pt3dadd(-167.83, -63.36, 4.3, 4.18)
pt3dadd(-168.11, -63.67, 4.3, 4.18)
pt3dadd(-168.67, -63.99, 4.3, 4.18)
pt3dadd(-168.95, -64.31, 4.3, 4.18)
pt3dadd(-169.78, -64.94, 4.3, 4.18)
pt3dadd(-170.34, -65.25, 4.3, 4.18)
pt3dadd(-170.9, -65.57, 4.3, 4.18)
pt3dadd(-171.74, -66.52, 4.3, 4.18)
pt3dadd(-172.29, -66.84, 4.3, 4.18)
pt3dadd(-172.85, -67.47, 4.3, 4.18)
pt3dadd(-173.41, -67.79, 4.3, 4.18)
pt3dadd(-173.69, -68.1, 4.3, 4.18)
pt3dadd(-174.24, -68.42, 4.3, 4.18)
pt3dadd(-174.52, -68.74, 4.3, 4.18)
pt3dadd(-175.08, -69.05, 4.3, 4.18)
pt3dadd(-175.64, -69.37, 4.3, 4.18)
pt3dadd(-176.19, -69.69, 4.3, 4.18)
pt3dadd(-179.26, -69.69, 4.3, 4.18)
pt3dadd(-179.82, -69.37, 4.3, 4.18)
pt3dadd(-180.38, -69.37, 4.3, 4.18)
pt3dadd(-180.65, -69.05, 4.3, 4.18)
pt3dadd(-181.21, -68.74, 4.3, 4.18)
pt3dadd(-181.49, -68.42, 4.3, 4.18)
pt3dadd(-182.05, -68.42, 4.3, 4.18)
pt3dadd(-182.33, -68.1, 4.3, 4.18)
pt3dadd(-182.88, -67.79, 4.3, 4.18)
pt3dadd(-183.44, -67.47, 4.3, 4.18)
pt3dadd(-185.67, -67.47, 4.3, 4.18)
pt3dadd(-185.95, -67.79, 4.3, 4.18)
pt3dadd(-186.51, -68.1, 4.3, 4.18)
pt3dadd(-186.79, -68.42, 4.3, 4.18)
pt3dadd(-187.34, -68.74, 4.3, 4.18)
pt3dadd(-187.9, -69.05, 4.3, 4.18)
pt3dadd(-187.9, -68.74, 5.3, 3.62)
pt3dadd(-188.46, -69.05, 5.3, 3.62)
pt3dadd(-188.74, -69.69, 5.3, 3.62)
pt3dadd(-189.02, -70, 5.3, 3.62)
pt3dadd(-189.29, -70.32, 5.3, 3.62)
pt3dadd(-189.57, -70.64, 5.3, 3.62)
pt3dadd(-189.85, -70.95, 5.3, 3.62)
pt3dadd(-190.13, -71.59, 5.3, 3.62)
pt3dadd(-190.41, -72.22, 5.3, 3.62)
pt3dadd(-190.97, -72.54, 5.3, 3.62)
pt3dadd(-191.25, -72.85, 5.3, 3.62)
pt3dadd(-191.52, -73.17, 5.3, 3.62)
pt3dadd(-191.8, -73.8, 5.3, 3.62)
pt3dadd(-192.08, -74.12, 5.3, 3.62)
pt3dadd(-192.64, -74.44, 5.3, 3.62)
pt3dadd(-192.92, -74.75, 5.3, 3.62)
}
}
proc shape3d_150() {
dend[98] { pt3dadd(-193.75, -75.7, 5.3, 3.62)
pt3dadd(-194.31, -76.02, 5.3, 3.62)
pt3dadd(-194.59, -76.33, 5.3, 3.62)
pt3dadd(-194.87, -76.65, 5.3, 3.62)
pt3dadd(-195.43, -76.97, 5.3, 3.62)
pt3dadd(-195.7, -77.28, 5.3, 3.62)
pt3dadd(-196.82, -78.55, 5.3, 3.62)
pt3dadd(-197.1, -78.87, 5.3, 3.62)
pt3dadd(-197.38, -79.5, 5.3, 3.62)
pt3dadd(-197.93, -80.13, 5.3, 3.62)
pt3dadd(-198.21, -80.45, 5.3, 3.62)
pt3dadd(-198.49, -80.77, 5.3, 3.62)
pt3dadd(-198.77, -81.4, 5.3, 3.62)
pt3dadd(-199.33, -81.72, 5.3, 3.62)
pt3dadd(-199.61, -82.03, 5.3, 3.62)
pt3dadd(-200.16, -82.35, 5.3, 3.62)
pt3dadd(-200.44, -82.67, 5.3, 3.62)
pt3dadd(-200.72, -82.98, 5.3, 3.62)
pt3dadd(-201, -83.62, 5.3, 3.62)
pt3dadd(-201.28, -83.93, 5.3, 3.62)
pt3dadd(-201.84, -84.25, 5.3, 3.62)
pt3dadd(-202.39, -84.56, 5.3, 3.62)
pt3dadd(-202.67, -84.88, 5.3, 3.62)
pt3dadd(-203.51, -85.83, 5.3, 3.62)
pt3dadd(-203.79, -86.15, 5.3, 3.62)
pt3dadd(-205.18, -87.73, 5.3, 3.62)
pt3dadd(-205.46, -88.05, 5.3, 3.62)
pt3dadd(-205.74, -88.68, 5.3, 3.62)
pt3dadd(-206.3, -89, 5.3, 3.62)
pt3dadd(-206.85, -89.31, 5.3, 3.62)
pt3dadd(-207.13, -89.63, 5.3, 3.62)
pt3dadd(-207.41, -89.95, 5.3, 3.62)
pt3dadd(-207.97, -90.26, 5.3, 3.62)
pt3dadd(-208.25, -90.58, 5.3, 3.62)
pt3dadd(-208.8, -90.58, 5.3, 3.62)
pt3dadd(-209.36, -90.9, 5.3, 3.62)
pt3dadd(-209.64, -91.21, 5.3, 3.62)
pt3dadd(-209.92, -91.53, 5.3, 3.62)
pt3dadd(-210.75, -91.53, 5.3, 3.62)
pt3dadd(-211.03, -91.85, 5.3, 3.62)
pt3dadd(-211.59, -91.85, 5.3, 3.62)
pt3dadd(-211.87, -92.16, 5.3, 3.62)
pt3dadd(-212.43, -92.48, 5.3, 3.62)
pt3dadd(-212.98, -92.8, 5.3, 3.62)
pt3dadd(-213.54, -93.11, 5.3, 3.62)
pt3dadd(-214.1, -93.43, 5.3, 3.62)
pt3dadd(-214.66, -93.74, 5.3, 3.62)
pt3dadd(-215.21, -94.06, 5.3, 3.62)
pt3dadd(-215.49, -94.38, 5.3, 3.62)
pt3dadd(-216.61, -94.38, 5.3, 3.62)
pt3dadd(-217.16, -94.69, 5.3, 3.62)
pt3dadd(-217.72, -95.01, 5.3, 3.62)
pt3dadd(-218.28, -95.33, 5.3, 3.62)
pt3dadd(-218.56, -95.64, 5.3, 3.62)
pt3dadd(-218.84, -95.96, 5.3, 3.62)
pt3dadd(-219.12, -96.59, 5.3, 3.62)
pt3dadd(-219.39, -96.91, 5.3, 3.62)
pt3dadd(-219.67, -97.23, 5.3, 3.62)
pt3dadd(-219.95, -97.54, 5.3, 3.62)
pt3dadd(-221.35, -98.49, 5.3, 3.62)
pt3dadd(-221.62, -99.13, 5.3, 3.62)
pt3dadd(-222.18, -99.76, 5.3, 3.62)
pt3dadd(-222.46, -100.08, 5.3, 3.62)
pt3dadd(-223.02, -100.39, 5.3, 3.62)
pt3dadd(-223.3, -101.03, 5.3, 3.62)
pt3dadd(-223.85, -101.98, 5.3, 3.62)
pt3dadd(-224.41, -102.29, 5.3, 3.62)
pt3dadd(-225.25, -102.93, 5.3, 3.62)
pt3dadd(-225.53, -103.24, 5.3, 3.62)
pt3dadd(-226.08, -103.56, 5.3, 3.62)
pt3dadd(-226.36, -104.19, 5.3, 3.62)
pt3dadd(-226.92, -104.51, 5.3, 3.62)
pt3dadd(-227.48, -105.14, 5.3, 3.62)
pt3dadd(-227.76, -105.46, 5.3, 3.62)
pt3dadd(-228.31, -105.77, 5.3, 3.62)
pt3dadd(-228.87, -105.77, 5.3, 3.62)
pt3dadd(-229.15, -106.09, 5.3, 3.62)
pt3dadd(-229.71, -106.41, 5.3, 3.62)
pt3dadd(-230.26, -106.72, 5.3, 3.62)
pt3dadd(-230.82, -107.36, 5.3, 3.62)
pt3dadd(-231.38, -107.67, 5.3, 3.62)
pt3dadd(-231.94, -107.99, 5.3, 3.62)
pt3dadd(-232.21, -108.31, 5.3, 3.62)
pt3dadd(-232.77, -108.31, 5.3, 3.62)
pt3dadd(-233.05, -108.62, 5.3, 3.62)
pt3dadd(-233.61, -108.94, 5.3, 3.62)
pt3dadd(-233.89, -109.26, 5.3, 3.62)
pt3dadd(-234.72, -109.26, 5.3, 3.62)
pt3dadd(-235, -109.57, 5.3, 3.62)
pt3dadd(-235.56, -109.89, 5.3, 3.62)
pt3dadd(-238.63, -109.89, 5.3, 3.62)
pt3dadd(-239.18, -110.21, 5.3, 3.62)
pt3dadd(-239.46, -110.52, 5.3, 3.62)
pt3dadd(-240.02, -110.52, 5.3, 3.62)
pt3dadd(-240.85, -111.16, 5.3, 3.62)
pt3dadd(-242.53, -111.16, 5.3, 3.62)
pt3dadd(-243.08, -111.47, 5.3, 3.62)
pt3dadd(-243.64, -111.79, 5.3, 3.62)
pt3dadd(-244.2, -112.11, 5.3, 3.62)
pt3dadd(-244.76, -112.42, 5.3, 3.62)
pt3dadd(-245.04, -112.74, 5.3, 3.62)
pt3dadd(-245.59, -112.74, 5.3, 3.62)
pt3dadd(-246.43, -113.37, 5.3, 3.62)
pt3dadd(-246.71, -113.69, 5.3, 3.62)
pt3dadd(-247.27, -114, 5.3, 3.62)
pt3dadd(-247.82, -114.32, 5.3, 3.62)
pt3dadd(-248.38, -114.64, 5.3, 3.62)
pt3dadd(-248.94, -114.95, 5.3, 3.62)
pt3dadd(-249.22, -115.27, 5.3, 3.62)
pt3dadd(-249.77, -115.59, 5.3, 3.62)
pt3dadd(-250.33, -115.9, 5.3, 3.62)
pt3dadd(-250.61, -116.22, 5.3, 3.62)
pt3dadd(-251.17, -116.54, 5.3, 3.62)
pt3dadd(-251.72, -116.54, 5.3, 3.62)
pt3dadd(-252.56, -117.17, 5.3, 3.62)
pt3dadd(-252.84, -117.49, 5.3, 3.62)
pt3dadd(-253.4, -117.49, 5.3, 3.62)
pt3dadd(-254.23, -118.12, 5.3, 3.62)
pt3dadd(-255.07, -118.12, 5.3, 3.62)
pt3dadd(-255.35, -118.44, 5.3, 3.62)
pt3dadd(-256.18, -118.44, 5.3, 3.62)
pt3dadd(-256.46, -118.75, 5.3, 3.62)
pt3dadd(-257.3, -118.75, 5.3, 3.62)
pt3dadd(-257.86, -119.07, 5.3, 3.62)
pt3dadd(-258.97, -119.07, 5.3, 3.62)
pt3dadd(-259.25, -119.39, 5.3, 3.62)
pt3dadd(-259.53, -119.7, 5.3, 3.62)
pt3dadd(-260.92, -119.7, 5.3, 3.62)
pt3dadd(-261.48, -120.02, 5.3, 3.62)
pt3dadd(-262.04, -120.34, 5.3, 3.62)
pt3dadd(-262.59, -120.65, 5.3, 3.62)
pt3dadd(-263.15, -120.97, 5.3, 3.62)
pt3dadd(-263.43, -121.29, 5.3, 3.62)
pt3dadd(-264.27, -121.29, 5.3, 3.62)
pt3dadd(-264.82, -121.6, 5.3, 3.62)
pt3dadd(-267.05, -121.6, 5.3, 3.62)
pt3dadd(-267.05, -120.97, 5.3, 3.62)
pt3dadd(-266.77, -120.65, 5.3, 3.62)
pt3dadd(-266.5, -120.65, 8.3, 3.62)
pt3dadd(-269.56, -120.65, 8.3, 3.62)
pt3dadd(-270.12, -120.97, 8.3, 3.62)
pt3dadd(-270.96, -121.29, 8.3, 3.62)
pt3dadd(-271.79, -121.92, 8.3, 3.62)
pt3dadd(-272.07, -122.55, 8.3, 3.62)
pt3dadd(-272.63, -122.87, 8.3, 3.62)
pt3dadd(-273.18, -123.5, 8.3, 3.62)
pt3dadd(-273.46, -123.82, 8.3, 3.62)
pt3dadd(-274.02, -124.13, 8.3, 3.62)
pt3dadd(-274.3, -124.45, 8.3, 3.62)
pt3dadd(-274.58, -124.77, 8.3, 3.62)
pt3dadd(-274.86, -125.08, 8.3, 3.62)
pt3dadd(-275.41, -125.4, 8.3, 3.62)
pt3dadd(-275.69, -125.72, 8.3, 3.62)
pt3dadd(-275.97, -126.03, 8.3, 3.62)
pt3dadd(-276.53, -126.35, 8.3, 3.62)
pt3dadd(-276.81, -126.67, 8.3, 3.62)
pt3dadd(-277.64, -127.3, 8.3, 3.62)
pt3dadd(-278.2, -127.62, 8.3, 3.62)
pt3dadd(-278.48, -127.93, 8.3, 3.62)
pt3dadd(-278.76, -128.25, 8.3, 3.62)
pt3dadd(-279.6, -128.57, 8.3, 3.62)
pt3dadd(-280.15, -129.2, 8.3, 3.62)
pt3dadd(-280.43, -129.83, 8.3, 3.62)
pt3dadd(-280.99, -130.15, 8.3, 3.62)
pt3dadd(-281.55, -130.47, 8.3, 3.62)
pt3dadd(-282.1, -130.78, 8.3, 3.62)
pt3dadd(-282.66, -131.1, 8.3, 3.62)
pt3dadd(-282.94, -131.42, 8.3, 3.62)
pt3dadd(-283.5, -132.05, 8.3, 3.62)
pt3dadd(-283.78, -132.36, 8.3, 3.62)
pt3dadd(-284.05, -132.68, 8.3, 3.62)
pt3dadd(-285.45, -134.26, 8.3, 3.62)
pt3dadd(-286.01, -134.58, 8.3, 3.62)
pt3dadd(-286.56, -135.21, 8.3, 3.62)
pt3dadd(-287.12, -135.85, 8.3, 3.62)
pt3dadd(-287.68, -136.48, 8.3, 3.62)
pt3dadd(-288.24, -136.8, 8.3, 3.62)
pt3dadd(-288.79, -137.43, 8.3, 3.62)
pt3dadd(-289.35, -138.06, 8.3, 3.62)
pt3dadd(-289.91, -139.01, 8.3, 3.62)
pt3dadd(-290.46, -139.33, 8.3, 3.62)
pt3dadd(-291.02, -139.96, 8.3, 3.62)
pt3dadd(-291.86, -140.91, 8.3, 3.62)
pt3dadd(-292.14, -141.23, 8.3, 3.62)
pt3dadd(-292.69, -141.86, 8.3, 3.62)
pt3dadd(-292.97, -142.18, 8.3, 3.62)
pt3dadd(-293.53, -142.49, 8.3, 3.62)
pt3dadd(-294.09, -143.13, 8.3, 3.62)
pt3dadd(-294.65, -143.44, 8.3, 3.62)
pt3dadd(-295.2, -143.76, 8.3, 3.62)
pt3dadd(-295.76, -144.39, 8.3, 3.62)
pt3dadd(-296.04, -145.03, 8.3, 3.62)
pt3dadd(-296.87, -145.34, 8.3, 3.62)
pt3dadd(-297.43, -145.98, 8.3, 3.62)
pt3dadd(-297.71, -146.29, 8.3, 3.62)
pt3dadd(-298.27, -146.61, 8.3, 3.62)
pt3dadd(-298.55, -146.93, 8.3, 3.62)
pt3dadd(-299.1, -147.24, 8.3, 3.62)
pt3dadd(-299.38, -147.88, 8.3, 3.62)
pt3dadd(-299.94, -148.19, 8.3, 3.62)
}
}
proc shape3d_151() {
dend[98] { pt3dadd(-300.22, -148.51, 8.3, 3.62)
pt3dadd(-301.33, -149.78, 8.3, 3.62)
pt3dadd(-302.17, -149.78, 8.3, 3.62)
pt3dadd(-302.45, -150.09, 8.3, 3.62)
pt3dadd(-302.17, -149.46, 11.3, 3.62)
pt3dadd(-302.73, -149.46, 11.3, 3.62)
pt3dadd(-303.84, -149.78, 11.3, 3.62)
pt3dadd(-304.12, -150.09, 11.3, 3.62)
pt3dadd(-304.4, -150.41, 11.3, 3.62)
pt3dadd(-307.19, -150.41, 11.3, 3.62)
pt3dadd(-307.47, -150.73, 11.3, 3.62)
pt3dadd(-308.02, -150.73, 11.3, 3.62)
pt3dadd(-308.58, -151.04, 11.3, 3.62)
pt3dadd(-310.25, -151.04, 11.3, 3.62)
pt3dadd(-310.81, -151.36, 11.3, 3.62)
pt3dadd(-333.11, -151.36, 11.3, 3.62)
pt3dadd(-333.39, -151.67, 13.3, 3.34)
pt3dadd(-334.22, -151.67, 13.3, 3.34)
pt3dadd(-334.5, -151.99, 13.3, 3.34)
pt3dadd(-335.34, -151.99, 13.3, 3.34)
pt3dadd(-335.89, -152.31, 13.3, 3.34)
pt3dadd(-336.45, -152.31, 13.3, 3.34)
pt3dadd(-336.73, -152.62, 13.3, 3.34)
pt3dadd(-338.4, -152.62, 13.3, 3.34)
pt3dadd(-338.96, -152.94, 13.3, 3.34)
pt3dadd(-340.63, -152.94, 13.3, 3.34)
pt3dadd(-340.91, -153.26, 13.3, 3.34)
pt3dadd(-341.75, -153.57, 13.3, 3.34)
pt3dadd(-342.3, -153.89, 13.3, 3.34)
pt3dadd(-343.14, -154.21, 13.3, 3.34)
pt3dadd(-343.7, -154.21, 13.3, 3.34)
pt3dadd(-344.26, -154.52, 13.3, 3.34)
pt3dadd(-344.81, -154.84, 13.3, 3.34)
pt3dadd(-345.37, -155.16, 13.3, 3.34)
pt3dadd(-345.93, -155.47, 13.3, 3.34)
pt3dadd(-346.76, -155.79, 13.3, 3.34)
pt3dadd(-347.32, -156.11, 13.3, 3.34)
pt3dadd(-347.88, -156.11, 13.3, 3.34)
pt3dadd(-348.44, -156.42, 13.3, 3.34)
pt3dadd(-348.99, -156.74, 13.3, 3.34)
pt3dadd(-350.11, -156.74, 13.3, 3.34)
pt3dadd(-350.67, -157.06, 13.3, 3.34)
pt3dadd(-352.62, -157.06, 13.3, 3.34)
pt3dadd(-353.17, -157.37, 13.3, 3.34)
pt3dadd(-353.73, -157.69, 13.3, 3.34)
pt3dadd(-354.29, -158.01, 13.3, 3.34)
pt3dadd(-355.4, -159.27, 13.3, 3.34)
pt3dadd(-355.68, -159.59, 13.3, 3.34)
pt3dadd(-355.96, -159.91, 13.3, 3.34)
pt3dadd(-356.52, -160.22, 13.3, 3.34)
pt3dadd(-356.8, -160.54, 13.3, 3.34)
pt3dadd(-357.35, -160.85, 13.3, 3.34)
pt3dadd(-357.63, -161.17, 13.3, 3.34)
pt3dadd(-357.91, -161.8, 13.3, 3.34)
pt3dadd(-358.19, -162.12, 13.3, 3.34)
pt3dadd(-358.75, -162.44, 13.3, 3.34)
pt3dadd(-359.03, -162.75, 13.3, 3.34)
pt3dadd(-359.31, -163.07, 13.3, 3.34)
pt3dadd(-359.58, -163.39, 13.3, 3.34)
pt3dadd(-360.42, -164.02, 13.3, 3.34)
pt3dadd(-360.98, -164.02, 13.3, 3.34)
pt3dadd(-361.26, -164.34, 13.3, 3.34)
pt3dadd(-361.81, -164.65, 13.3, 3.34)
pt3dadd(-362.09, -164.97, 13.3, 3.34)
pt3dadd(-362.93, -165.29, 13.3, 3.34)
pt3dadd(-363.49, -165.6, 13.3, 3.34)
pt3dadd(-364.04, -165.92, 13.3, 3.34)
pt3dadd(-364.6, -165.92, 13.3, 3.34)
pt3dadd(-365.16, -166.24, 13.3, 3.34)
pt3dadd(-367.95, -166.24, 13.3, 3.34)
pt3dadd(-368.5, -166.55, 13.3, 3.34)
pt3dadd(-370.17, -166.55, 13.3, 3.34)
pt3dadd(-370.73, -166.87, 13.3, 3.34)
pt3dadd(-371.29, -166.87, 13.3, 3.34)
pt3dadd(-371.85, -167.19, 13.3, 3.34)
pt3dadd(-372.4, -167.5, 13.3, 3.34)
pt3dadd(-372.96, -167.82, 13.3, 3.34)
pt3dadd(-373.24, -168.14, 13.3, 3.34)
pt3dadd(-374.08, -168.14, 13.3, 3.34)
pt3dadd(-374.36, -168.45, 13.3, 3.34)
pt3dadd(-374.63, -168.77, 13.3, 3.34)
pt3dadd(-375.19, -168.77, 13.3, 3.34)
pt3dadd(-376.31, -170.04, 13.3, 3.34)
pt3dadd(-376.86, -170.04, 13.3, 3.34)
pt3dadd(-377.14, -170.35, 13.3, 3.34)
pt3dadd(-377.42, -170.35, 13.3, 3.34)
pt3dadd(-376.03, -169.09, 16.3, 3.34)
pt3dadd(-377.42, -169.09, 16.3, 3.34)
pt3dadd(-377.7, -169.4, 16.3, 3.34)
pt3dadd(-378.26, -169.72, 16.3, 3.34)
pt3dadd(-379.09, -170.04, 16.3, 3.34)
pt3dadd(-379.65, -170.35, 16.3, 3.34)
pt3dadd(-380.21, -170.67, 16.3, 3.34)
pt3dadd(-380.77, -171.3, 16.3, 3.34)
pt3dadd(-381.6, -171.62, 16.3, 3.34)
pt3dadd(-381.88, -171.93, 16.3, 3.34)
pt3dadd(-382.44, -172.25, 16.3, 3.34)
pt3dadd(-382.72, -172.88, 16.3, 3.34)
pt3dadd(-383.27, -173.2, 16.3, 3.34)
pt3dadd(-383.83, -174.15, 16.3, 3.34)
pt3dadd(-384.39, -174.47, 16.3, 3.34)
pt3dadd(-384.67, -174.78, 16.3, 3.34)
pt3dadd(-385.23, -175.1, 16.3, 3.34)
pt3dadd(-385.5, -175.42, 16.3, 3.34)
pt3dadd(-386.06, -175.42, 16.3, 3.34)
pt3dadd(-386.34, -175.73, 16.3, 3.34)
pt3dadd(-386.62, -176.37, 16.3, 3.34)
pt3dadd(-387.18, -176.68, 16.3, 3.34)
pt3dadd(-387.45, -177, 16.3, 3.34)
pt3dadd(-388.01, -177.63, 16.3, 3.34)
pt3dadd(-388.29, -177.95, 16.3, 3.34)
pt3dadd(-388.85, -178.27, 16.3, 3.34)
pt3dadd(-389.13, -178.58, 16.3, 3.34)
pt3dadd(-389.41, -179.53, 16.3, 3.34)
pt3dadd(-389.68, -179.85, 16.3, 3.34)
pt3dadd(-389.96, -180.48, 16.3, 3.34)
pt3dadd(-390.24, -180.8, 16.3, 3.34)
pt3dadd(-390.8, -181.11, 16.3, 3.34)
pt3dadd(-391.08, -181.43, 16.3, 3.34)
pt3dadd(-391.36, -182.06, 16.3, 3.34)
pt3dadd(-391.64, -182.38, 16.3, 3.34)
pt3dadd(-392.19, -182.7, 16.3, 3.34)
pt3dadd(-392.47, -183.65, 16.3, 3.34)
pt3dadd(-392.75, -183.96, 16.3, 3.34)
pt3dadd(-393.31, -184.6, 16.3, 3.34)
pt3dadd(-393.87, -185.55, 16.3, 3.34)
pt3dadd(-394.42, -186.18, 16.3, 3.34)
pt3dadd(-394.7, -186.5, 16.3, 3.34)
pt3dadd(-394.98, -187.13, 16.3, 3.34)
pt3dadd(-394.98, -187.76, 16.3, 3.34)
pt3dadd(-395.26, -188.4, 16.3, 3.34)
pt3dadd(-395.54, -188.71, 16.3, 3.34)
pt3dadd(-395.82, -189.34, 16.3, 3.34)
pt3dadd(-396.09, -189.66, 16.3, 3.34)
pt3dadd(-396.37, -189.98, 16.3, 3.34)
pt3dadd(-396.65, -190.61, 16.3, 3.34)
pt3dadd(-396.93, -190.93, 16.3, 3.34)
pt3dadd(-397.21, -191.24, 16.3, 3.34)
pt3dadd(-397.49, -191.88, 16.3, 3.34)
}
dend[99] {pt3dclear()
pt3dadd(198.94, 237.06, -5.7, 3.9)
pt3dadd(198.39, 238.8, 10.3, 3.9)
pt3dadd(198.25, 238.96, 10.3, 3.9)
pt3dadd(197.83, 239.43, 10.3, 3.9)
pt3dadd(197.69, 239.75, 10.3, 3.9)
pt3dadd(197.41, 240.06, 10.3, 3.9)
pt3dadd(199.05, 243.06, 10.3, 8.64)
}
dend[100] {pt3dclear()
pt3dadd(199.05, 243.06, 10.3, 3.9)
pt3dadd(197.27, 240.22, 10.3, 3.9)
pt3dadd(196.99, 240.38, 10.3, 3.9)
pt3dadd(196.71, 240.54, 10.3, 3.9)
pt3dadd(196.58, 240.7, 10.3, 3.9)
pt3dadd(196.44, 240.85, 10.3, 3.9)
pt3dadd(196.16, 241.33, 10.3, 3.9)
pt3dadd(196.02, 241.49, 10.3, 3.9)
pt3dadd(195.88, 241.65, 10.3, 3.9)
pt3dadd(195.74, 241.8, 10.3, 3.9)
pt3dadd(195.6, 242.12, 10.3, 3.9)
pt3dadd(195.32, 242.28, 10.3, 3.9)
pt3dadd(195.18, 242.44, 10.3, 3.9)
pt3dadd(194.9, 242.91, 10.3, 3.9)
pt3dadd(194.76, 243.23, 10.3, 3.9)
pt3dadd(194.62, 243.55, 10.3, 3.9)
pt3dadd(194.49, 243.7, 10.3, 3.9)
pt3dadd(194.35, 244.02, 10.3, 3.9)
pt3dadd(193.93, 244.34, 10.3, 3.9)
pt3dadd(193.79, 244.65, 10.3, 3.9)
pt3dadd(193.51, 244.81, 10.3, 3.9)
pt3dadd(193.37, 245.13, 10.3, 3.9)
pt3dadd(193.23, 245.44, 10.3, 3.9)
pt3dadd(192.95, 245.6, 10.3, 3.9)
pt3dadd(192.81, 245.76, 10.3, 3.9)
pt3dadd(192.67, 246.08, 10.3, 3.9)
pt3dadd(192.53, 246.24, 10.3, 3.9)
pt3dadd(192.26, 246.55, 10.3, 3.9)
pt3dadd(192.12, 246.71, 10.3, 3.9)
pt3dadd(191.98, 247.03, 10.3, 3.9)
pt3dadd(191.7, 247.19, 10.3, 3.9)
pt3dadd(191.56, 247.5, 10.3, 3.9)
pt3dadd(191.28, 247.82, 10.3, 3.9)
pt3dadd(191, 248.14, 10.3, 3.9)
pt3dadd(190.86, 248.29, 10.3, 3.9)
pt3dadd(190.58, 248.61, 10.3, 3.9)
pt3dadd(190.3, 249.09, 10.3, 3.9)
pt3dadd(190.17, 249.4, 10.3, 3.9)
pt3dadd(190.03, 249.72, 10.3, 3.9)
pt3dadd(189.61, 250.19, 10.3, 3.9)
pt3dadd(189.47, 250.51, 10.3, 3.9)
pt3dadd(189.33, 250.83, 10.3, 3.9)
pt3dadd(189.05, 250.98, 10.3, 3.9)
pt3dadd(188.77, 251.3, 10.3, 3.9)
pt3dadd(188.63, 251.62, 10.3, 3.9)
pt3dadd(188.49, 251.78, 10.3, 3.9)
pt3dadd(188.21, 252.25, 10.3, 3.9)
pt3dadd(188.07, 252.41, 10.3, 3.9)
pt3dadd(187.8, 252.57, 10.3, 3.9)
pt3dadd(187.66, 252.88, 10.3, 3.9)
pt3dadd(187.52, 253.2, 10.3, 3.9)
pt3dadd(187.38, 253.36, 10.3, 3.9)
pt3dadd(187.1, 253.52, 10.3, 3.9)
pt3dadd(186.96, 253.83, 10.3, 3.9)
}
}
proc shape3d_152() {
dend[100] { pt3dadd(186.82, 253.99, 10.3, 3.9)
pt3dadd(186.68, 254.31, 10.3, 3.9)
pt3dadd(186.4, 254.47, 10.3, 3.9)
pt3dadd(186.12, 254.62, 10.3, 3.9)
pt3dadd(185.98, 254.78, 10.3, 3.9)
pt3dadd(185.98, 255.1, 10.3, 3.9)
pt3dadd(185.71, 255.26, 10.3, 3.9)
pt3dadd(185.57, 255.57, 10.3, 3.9)
pt3dadd(185.29, 255.73, 10.3, 3.9)
pt3dadd(185.29, 256.05, 10.3, 3.9)
pt3dadd(185.15, 256.21, 10.3, 3.9)
pt3dadd(185.01, 256.37, 10.3, 3.9)
pt3dadd(184.87, 256.52, 10.3, 3.9)
pt3dadd(185.43, 256.37, 12.3, 3.9)
pt3dadd(185.29, 256.68, 12.3, 3.9)
pt3dadd(185.15, 257, 12.3, 3.9)
pt3dadd(185.01, 257.32, 12.3, 3.9)
pt3dadd(184.73, 257.79, 12.3, 3.9)
pt3dadd(184.59, 258.11, 12.3, 3.9)
pt3dadd(184.31, 258.9, 12.3, 3.9)
pt3dadd(184.03, 259.21, 12.3, 3.9)
pt3dadd(183.89, 259.53, 12.3, 3.9)
pt3dadd(183.89, 259.85, 12.3, 3.9)
pt3dadd(183.76, 260.16, 12.3, 3.9)
pt3dadd(183.62, 260.48, 12.3, 3.9)
pt3dadd(183.62, 260.8, 12.3, 3.9)
pt3dadd(183.48, 261.11, 12.3, 3.9)
pt3dadd(183.34, 261.43, 12.3, 3.9)
pt3dadd(183.34, 261.91, 12.3, 3.9)
pt3dadd(183.2, 262.06, 12.3, 3.9)
pt3dadd(183.2, 262.54, 12.3, 3.9)
pt3dadd(183.06, 262.86, 12.3, 3.9)
pt3dadd(183.06, 263.33, 12.3, 3.9)
pt3dadd(182.92, 264.12, 12.3, 3.9)
pt3dadd(182.78, 264.6, 12.3, 3.9)
pt3dadd(182.78, 265.39, 12.3, 3.9)
pt3dadd(182.64, 265.7, 12.3, 3.9)
pt3dadd(182.64, 266.5, 12.3, 3.9)
pt3dadd(182.5, 266.81, 12.3, 3.9)
pt3dadd(182.5, 267.6, 12.3, 3.9)
pt3dadd(182.36, 267.92, 12.3, 3.9)
pt3dadd(182.36, 268.71, 12.3, 3.9)
pt3dadd(182.22, 269.34, 12.3, 3.9)
pt3dadd(182.22, 269.98, 12.3, 3.9)
pt3dadd(182.08, 270.29, 12.3, 3.9)
pt3dadd(182.08, 270.61, 12.3, 3.9)
pt3dadd(181.94, 270.93, 12.3, 3.9)
pt3dadd(181.94, 271.4, 12.3, 3.9)
pt3dadd(181.8, 271.72, 12.3, 3.9)
pt3dadd(181.66, 272.04, 12.3, 3.9)
pt3dadd(181.66, 272.51, 12.3, 3.9)
pt3dadd(181.53, 272.83, 12.3, 3.9)
pt3dadd(181.39, 273.3, 12.3, 3.9)
pt3dadd(181.39, 273.62, 12.3, 3.9)
pt3dadd(181.25, 273.78, 12.3, 3.9)
pt3dadd(181.11, 274.09, 12.3, 3.9)
pt3dadd(181.11, 274.57, 12.3, 3.9)
pt3dadd(180.97, 274.73, 12.3, 3.9)
pt3dadd(180.97, 275.04, 12.3, 3.9)
pt3dadd(180.83, 275.2, 12.3, 3.9)
pt3dadd(180.83, 275.52, 12.3, 3.9)
pt3dadd(180.69, 275.68, 12.3, 3.9)
pt3dadd(180.69, 275.99, 12.3, 3.9)
pt3dadd(180.55, 276.15, 12.3, 3.9)
pt3dadd(180.55, 276.31, 12.3, 3.9)
pt3dadd(181.39, 275.2, 14.3, 3.9)
pt3dadd(180.97, 275.52, 16.3, 3.9)
pt3dadd(180.97, 275.83, 16.3, 3.9)
pt3dadd(180.69, 275.99, 16.3, 3.9)
pt3dadd(180.41, 276.31, 16.3, 3.9)
pt3dadd(180.27, 276.63, 16.3, 3.9)
pt3dadd(180.13, 277.1, 16.3, 3.9)
pt3dadd(179.99, 277.26, 16.3, 3.9)
pt3dadd(179.57, 277.73, 16.3, 3.9)
pt3dadd(179.44, 278.05, 16.3, 3.9)
pt3dadd(179.16, 278.21, 16.3, 3.9)
pt3dadd(178.88, 278.52, 16.3, 3.9)
pt3dadd(178.6, 278.84, 16.3, 3.9)
pt3dadd(178.32, 279.16, 16.3, 3.9)
pt3dadd(178.18, 279.47, 16.3, 3.9)
pt3dadd(177.76, 279.79, 16.3, 3.9)
pt3dadd(177.48, 280.11, 16.3, 3.9)
pt3dadd(177.21, 280.42, 16.3, 3.9)
pt3dadd(176.79, 280.74, 16.3, 3.9)
pt3dadd(176.23, 281.22, 16.3, 3.9)
pt3dadd(175.81, 281.37, 16.3, 3.9)
pt3dadd(175.53, 281.69, 16.3, 3.9)
pt3dadd(174.84, 282.17, 16.3, 3.9)
pt3dadd(174.14, 282.64, 16.3, 3.9)
pt3dadd(173.86, 282.96, 16.3, 3.9)
pt3dadd(173.44, 283.11, 16.3, 3.9)
pt3dadd(173.02, 283.43, 16.3, 3.9)
pt3dadd(172.61, 283.75, 16.3, 3.9)
pt3dadd(172.33, 284.06, 16.3, 3.9)
pt3dadd(171.91, 284.22, 16.3, 3.9)
pt3dadd(171.49, 284.38, 16.3, 3.9)
pt3dadd(171.35, 284.54, 16.3, 3.9)
pt3dadd(170.66, 285.01, 16.3, 3.9)
pt3dadd(170.24, 285.17, 16.3, 3.9)
pt3dadd(169.82, 285.33, 16.3, 3.9)
pt3dadd(169.54, 285.65, 16.3, 3.9)
pt3dadd(168.84, 286.12, 16.3, 3.9)
pt3dadd(168.57, 286.28, 16.3, 3.9)
pt3dadd(167.59, 286.76, 16.3, 3.9)
pt3dadd(167.17, 287.07, 16.3, 3.9)
pt3dadd(166.75, 287.23, 16.3, 3.9)
pt3dadd(166.34, 287.39, 16.3, 3.9)
pt3dadd(166.06, 287.7, 16.3, 3.9)
pt3dadd(165.64, 287.86, 16.3, 3.9)
pt3dadd(165.5, 288.02, 16.3, 3.9)
pt3dadd(165.22, 288.18, 16.3, 3.9)
pt3dadd(164.94, 288.34, 16.3, 3.9)
pt3dadd(164.66, 288.5, 16.3, 3.9)
pt3dadd(164.25, 288.65, 16.3, 3.9)
pt3dadd(164.11, 288.97, 16.3, 3.9)
pt3dadd(163.83, 289.13, 16.3, 3.9)
pt3dadd(163.69, 289.29, 16.3, 3.9)
pt3dadd(163.27, 289.45, 16.3, 3.9)
pt3dadd(162.85, 289.92, 16.3, 3.9)
pt3dadd(162.57, 290.08, 16.3, 3.9)
pt3dadd(162.43, 290.24, 16.3, 3.9)
pt3dadd(162.16, 290.4, 16.3, 3.9)
pt3dadd(162.02, 290.55, 16.3, 3.9)
pt3dadd(161.88, 290.87, 16.3, 3.9)
pt3dadd(161.6, 291.03, 16.3, 3.9)
pt3dadd(161.46, 291.19, 16.3, 3.9)
pt3dadd(161.18, 291.5, 16.3, 3.9)
pt3dadd(161.04, 291.66, 16.3, 3.9)
pt3dadd(160.76, 291.98, 16.3, 3.9)
pt3dadd(160.62, 292.14, 16.3, 3.9)
pt3dadd(160.34, 292.3, 16.3, 3.9)
pt3dadd(160.2, 292.45, 16.3, 3.9)
pt3dadd(160.06, 292.61, 16.3, 3.9)
pt3dadd(159.93, 292.93, 16.3, 3.9)
pt3dadd(159.65, 293.09, 16.3, 3.9)
pt3dadd(159.09, 293.72, 16.3, 3.9)
pt3dadd(158.95, 293.88, 16.3, 3.9)
pt3dadd(158.67, 294.04, 16.3, 3.9)
pt3dadd(158.53, 294.19, 16.3, 3.9)
pt3dadd(158.39, 294.35, 16.3, 3.9)
pt3dadd(158.11, 294.67, 16.3, 3.9)
pt3dadd(157.97, 294.83, 16.3, 3.9)
pt3dadd(157.84, 295.14, 16.3, 3.9)
pt3dadd(157.7, 295.3, 16.3, 3.9)
pt3dadd(157.56, 295.46, 16.3, 3.9)
pt3dadd(157.42, 295.62, 16.3, 3.9)
pt3dadd(157.28, 295.78, 16.3, 3.9)
pt3dadd(157.14, 295.94, 16.3, 3.9)
pt3dadd(157.61, 296.3, 16.3, 3.9)
}
dend[101] {pt3dclear()
pt3dadd(157.61, 296.3, 16.3, 3.9)
pt3dadd(157, 296.25, 16.3, 3.9)
pt3dadd(157, 296.57, 16.3, 3.9)
pt3dadd(156.86, 296.73, 16.3, 3.9)
pt3dadd(156.72, 296.89, 16.3, 3.9)
pt3dadd(156.58, 297.2, 16.3, 3.9)
pt3dadd(156.44, 297.2, 16.3, 3.9)
pt3dadd(157, 295.94, 21.3, 3.9)
pt3dadd(156.86, 296.09, 21.3, 3.9)
pt3dadd(156.72, 296.41, 21.3, 3.9)
pt3dadd(156.44, 296.57, 21.3, 3.9)
pt3dadd(156.16, 297.04, 21.3, 3.9)
pt3dadd(156.02, 297.36, 21.3, 3.9)
pt3dadd(155.88, 297.83, 21.3, 3.9)
pt3dadd(155.61, 298.15, 21.3, 3.9)
pt3dadd(155.33, 298.47, 21.3, 3.9)
pt3dadd(155.05, 299.26, 21.3, 3.9)
pt3dadd(154.77, 299.58, 21.3, 3.9)
pt3dadd(154.35, 300.37, 21.3, 3.9)
pt3dadd(154.21, 300.84, 21.3, 3.9)
pt3dadd(153.79, 301.48, 21.3, 3.9)
pt3dadd(153.38, 302.11, 21.3, 3.9)
pt3dadd(153.1, 302.42, 21.3, 3.9)
pt3dadd(152.82, 302.9, 21.3, 3.9)
pt3dadd(152.54, 303.53, 21.3, 3.9)
pt3dadd(152.26, 303.85, 21.3, 3.9)
pt3dadd(152.12, 304.32, 21.3, 3.9)
pt3dadd(151.84, 304.8, 21.3, 3.9)
pt3dadd(151.56, 305.27, 21.3, 3.9)
pt3dadd(151.29, 305.59, 21.3, 3.9)
pt3dadd(151.01, 305.91, 21.3, 3.9)
pt3dadd(150.87, 306.38, 21.3, 3.9)
pt3dadd(150.73, 306.7, 21.3, 3.9)
pt3dadd(150.45, 307.17, 21.3, 3.9)
pt3dadd(150.31, 307.49, 21.3, 3.9)
pt3dadd(150.03, 307.65, 21.3, 3.9)
pt3dadd(149.89, 307.96, 21.3, 3.9)
pt3dadd(149.75, 308.44, 21.3, 3.9)
pt3dadd(149.61, 308.76, 21.3, 3.9)
pt3dadd(149.33, 309.07, 21.3, 3.9)
pt3dadd(149.2, 309.39, 21.3, 3.9)
pt3dadd(148.92, 309.71, 21.3, 3.9)
pt3dadd(148.78, 310.02, 21.3, 3.9)
pt3dadd(148.64, 310.34, 21.3, 3.9)
pt3dadd(148.5, 310.5, 21.3, 3.9)
pt3dadd(148.36, 310.66, 21.3, 3.9)
pt3dadd(148.22, 310.97, 21.3, 3.9)
pt3dadd(148.08, 311.13, 21.3, 3.9)
pt3dadd(147.8, 311.6, 21.3, 3.9)
pt3dadd(147.52, 311.92, 21.3, 3.9)
pt3dadd(147.38, 312.08, 21.3, 3.9)
}
}
proc shape3d_153() {
dend[101] { pt3dadd(147.38, 312.4, 21.3, 3.9)
pt3dadd(147.24, 312.55, 21.3, 3.9)
pt3dadd(147.11, 312.87, 21.3, 3.9)
pt3dadd(147.11, 313.19, 21.3, 3.9)
pt3dadd(146.97, 313.5, 21.3, 3.9)
pt3dadd(146.97, 314.14, 21.3, 3.9)
pt3dadd(146.83, 314.45, 21.3, 3.9)
pt3dadd(146.83, 327.59, 21.3, 3.9)
pt3dadd(146.69, 327.91, 21.3, 3.9)
pt3dadd(146.69, 329.02, 21.3, 3.9)
pt3dadd(146.55, 329.17, 21.3, 3.9)
pt3dadd(146.55, 329.81, 21.3, 3.9)
pt3dadd(146.41, 330.12, 21.3, 3.9)
pt3dadd(146.41, 330.6, 21.3, 3.9)
pt3dadd(146.27, 330.76, 21.3, 3.9)
pt3dadd(146.27, 331.07, 21.3, 3.9)
pt3dadd(146.97, 330.6, 25.3, 3.9)
pt3dadd(146.69, 330.76, 25.3, 3.9)
pt3dadd(146.55, 331.07, 25.3, 3.9)
pt3dadd(146.27, 331.39, 25.3, 3.9)
pt3dadd(145.99, 331.86, 25.3, 3.9)
pt3dadd(145.71, 332.18, 25.3, 3.9)
pt3dadd(145.29, 332.66, 25.3, 3.9)
pt3dadd(145.15, 332.97, 25.3, 3.9)
pt3dadd(144.74, 333.61, 25.3, 3.9)
pt3dadd(144.32, 334.08, 25.3, 3.9)
pt3dadd(144.18, 334.24, 25.3, 3.9)
pt3dadd(143.62, 334.87, 25.3, 3.9)
pt3dadd(143.34, 335.03, 25.3, 3.9)
pt3dadd(143.06, 335.35, 25.3, 3.9)
pt3dadd(142.79, 335.5, 25.3, 3.9)
pt3dadd(142.51, 335.82, 25.3, 3.9)
pt3dadd(142.09, 336.3, 25.3, 3.9)
pt3dadd(141.67, 336.61, 25.3, 3.9)
pt3dadd(141.25, 336.93, 25.3, 3.9)
pt3dadd(140.97, 337.09, 25.3, 3.9)
pt3dadd(140.56, 337.4, 25.3, 3.9)
pt3dadd(140.28, 337.56, 25.3, 3.9)
pt3dadd(139.86, 337.88, 25.3, 3.9)
pt3dadd(139.44, 338.2, 25.3, 3.9)
pt3dadd(139.02, 338.35, 25.3, 3.9)
pt3dadd(138.6, 338.67, 25.3, 3.9)
pt3dadd(138.19, 338.83, 25.3, 3.9)
pt3dadd(137.91, 338.99, 25.3, 3.9)
pt3dadd(137.63, 339.15, 25.3, 3.9)
pt3dadd(137.21, 339.46, 25.3, 3.9)
pt3dadd(136.79, 339.62, 25.3, 3.9)
pt3dadd(136.51, 339.94, 25.3, 3.9)
pt3dadd(136.1, 340.09, 25.3, 3.9)
pt3dadd(135.96, 340.41, 25.3, 3.9)
pt3dadd(135.68, 340.57, 25.3, 3.9)
pt3dadd(135.54, 340.73, 25.3, 3.9)
pt3dadd(135.4, 341.04, 25.3, 3.9)
pt3dadd(135.12, 341.2, 25.3, 3.9)
pt3dadd(134.98, 341.36, 25.3, 3.9)
pt3dadd(134.84, 341.36, 25.3, 3.9)
pt3dadd(135.96, 340.57, 27.3, 3.9)
pt3dadd(135.82, 340.73, 27.3, 3.9)
pt3dadd(135.54, 340.89, 27.3, 3.9)
pt3dadd(135.12, 341.04, 27.3, 3.9)
pt3dadd(134.84, 341.2, 27.3, 3.9)
pt3dadd(134.42, 341.52, 27.3, 3.9)
pt3dadd(134.15, 341.84, 27.3, 3.9)
pt3dadd(133.45, 342.31, 27.3, 3.9)
pt3dadd(132.89, 342.63, 27.3, 3.9)
pt3dadd(132.61, 342.79, 27.3, 3.9)
pt3dadd(132.19, 343.1, 27.3, 3.9)
pt3dadd(132.05, 343.26, 27.3, 3.9)
pt3dadd(131.78, 343.42, 27.3, 3.9)
pt3dadd(131.5, 343.58, 27.3, 3.9)
pt3dadd(131.36, 343.74, 27.3, 3.9)
pt3dadd(131.08, 344.05, 27.3, 3.9)
pt3dadd(130.94, 344.21, 27.3, 3.9)
pt3dadd(130.8, 344.53, 27.3, 3.9)
pt3dadd(130.66, 344.69, 27.3, 3.9)
pt3dadd(130.38, 344.84, 27.3, 3.9)
pt3dadd(130.24, 345.16, 27.3, 3.9)
pt3dadd(130.1, 345.32, 27.3, 3.9)
pt3dadd(129.96, 345.48, 27.3, 3.9)
pt3dadd(129.83, 345.63, 27.3, 3.9)
pt3dadd(129.55, 346.11, 27.3, 3.9)
pt3dadd(129.41, 346.43, 27.3, 3.9)
pt3dadd(129.27, 346.74, 27.3, 3.9)
pt3dadd(129.13, 347.06, 27.3, 3.9)
pt3dadd(129.13, 347.53, 27.3, 3.9)
pt3dadd(128.99, 347.85, 27.3, 3.9)
pt3dadd(128.99, 348.17, 27.3, 3.9)
pt3dadd(128.85, 348.48, 27.3, 3.9)
pt3dadd(128.85, 349.59, 27.3, 3.9)
pt3dadd(128.71, 350.07, 27.3, 3.9)
pt3dadd(128.71, 362.1, 27.3, 3.9)
pt3dadd(128.57, 362.25, 27.3, 3.9)
pt3dadd(128.57, 363.52, 27.3, 3.9)
pt3dadd(128.43, 363.84, 27.3, 3.9)
pt3dadd(128.29, 364, 27.3, 3.9)
pt3dadd(128.15, 364.15, 27.3, 3.9)
pt3dadd(128.01, 364.47, 27.3, 3.9)
pt3dadd(127.73, 364.79, 27.3, 3.9)
pt3dadd(127.6, 365.26, 27.3, 3.9)
pt3dadd(127.46, 365.58, 27.3, 3.9)
pt3dadd(127.18, 365.89, 27.3, 3.9)
pt3dadd(126.9, 366.37, 27.3, 3.9)
pt3dadd(126.76, 366.69, 27.3, 3.9)
pt3dadd(126.62, 367, 27.3, 3.9)
pt3dadd(126.48, 367.16, 27.3, 3.9)
pt3dadd(126.48, 367.32, 29.3, 3.9)
pt3dadd(126.34, 367.48, 29.3, 3.9)
pt3dadd(126.2, 367.64, 29.3, 3.9)
pt3dadd(125.92, 367.79, 29.3, 3.9)
pt3dadd(125.78, 368.11, 29.3, 3.9)
pt3dadd(125.51, 368.27, 29.3, 3.9)
pt3dadd(125.09, 368.59, 29.3, 3.9)
pt3dadd(124.95, 368.74, 29.3, 3.9)
pt3dadd(124.53, 369.06, 29.3, 3.9)
pt3dadd(124.25, 369.38, 29.3, 3.9)
pt3dadd(123.97, 369.53, 29.3, 3.9)
pt3dadd(123.69, 369.69, 29.3, 3.9)
pt3dadd(123.55, 370.01, 29.3, 3.9)
pt3dadd(123.28, 370.17, 29.3, 3.9)
pt3dadd(122.86, 370.33, 29.3, 3.9)
pt3dadd(122.44, 370.64, 29.3, 3.9)
pt3dadd(121.74, 370.96, 29.3, 3.9)
pt3dadd(121.32, 371.28, 29.3, 3.9)
pt3dadd(120.91, 371.43, 29.3, 3.9)
pt3dadd(120.49, 371.75, 29.3, 3.9)
pt3dadd(120.07, 371.91, 29.3, 3.9)
pt3dadd(119.65, 372.23, 29.3, 3.9)
pt3dadd(119.23, 372.38, 29.3, 3.9)
pt3dadd(118.82, 372.7, 29.3, 3.9)
pt3dadd(118.54, 372.86, 29.3, 3.9)
pt3dadd(118.12, 373.02, 29.3, 3.9)
pt3dadd(117.56, 373.18, 29.3, 3.9)
pt3dadd(117.28, 373.49, 29.3, 3.9)
pt3dadd(116.73, 373.65, 29.3, 3.9)
pt3dadd(116.31, 373.97, 29.3, 3.9)
pt3dadd(115.89, 374.12, 29.3, 3.9)
pt3dadd(115.47, 374.44, 29.3, 3.9)
pt3dadd(115.05, 374.6, 29.3, 3.9)
pt3dadd(114.64, 374.76, 29.3, 3.9)
pt3dadd(114.08, 375.07, 29.3, 3.9)
pt3dadd(113.66, 375.23, 29.3, 3.9)
pt3dadd(113.24, 375.55, 29.3, 3.9)
pt3dadd(112.82, 375.71, 29.3, 3.9)
pt3dadd(112.27, 375.87, 29.3, 3.9)
pt3dadd(111.99, 376.18, 29.3, 3.9)
pt3dadd(111.71, 376.34, 29.3, 3.9)
pt3dadd(111.29, 376.66, 29.3, 3.9)
pt3dadd(111.01, 376.66, 29.3, 3.9)
pt3dadd(110.73, 376.97, 29.3, 3.9)
pt3dadd(110.46, 376.97, 29.3, 3.9)
pt3dadd(110.18, 377.29, 29.3, 3.9)
pt3dadd(109.9, 377.45, 29.3, 3.9)
pt3dadd(109.62, 377.45, 29.3, 3.9)
pt3dadd(109.34, 377.61, 29.3, 3.9)
pt3dadd(109.62, 377.45, 33.3, 3.9)
pt3dadd(109.48, 377.61, 33.3, 3.9)
pt3dadd(109.2, 377.77, 33.3, 3.9)
pt3dadd(109.06, 377.92, 33.3, 3.9)
pt3dadd(108.5, 378.4, 33.3, 3.9)
pt3dadd(108.23, 378.56, 33.3, 3.9)
pt3dadd(107.67, 378.87, 33.3, 3.9)
pt3dadd(107.25, 379.19, 33.3, 3.9)
pt3dadd(106.83, 379.66, 33.3, 3.9)
pt3dadd(106.27, 379.98, 33.3, 3.9)
pt3dadd(105.72, 380.3, 33.3, 3.9)
pt3dadd(105.3, 380.77, 33.3, 3.9)
pt3dadd(104.88, 380.77, 33.3, 3.9)
pt3dadd(104.46, 381.25, 33.3, 3.9)
pt3dadd(104.04, 381.41, 33.3, 3.9)
pt3dadd(103.77, 381.56, 33.3, 3.9)
pt3dadd(103.49, 381.72, 33.3, 3.9)
pt3dadd(103.21, 381.88, 33.3, 3.9)
pt3dadd(102.93, 382.2, 33.3, 3.9)
pt3dadd(102.65, 382.36, 33.3, 3.9)
pt3dadd(102.23, 382.51, 33.3, 3.9)
pt3dadd(101.95, 382.83, 33.3, 3.9)
pt3dadd(101.54, 382.99, 33.3, 3.9)
pt3dadd(101.12, 383.15, 33.3, 3.9)
pt3dadd(100.7, 383.46, 33.3, 3.9)
pt3dadd(100.42, 383.46, 33.3, 3.9)
pt3dadd(100.14, 383.78, 33.3, 3.9)
pt3dadd(99.72, 383.94, 33.3, 3.9)
pt3dadd(99.31, 383.94, 33.3, 3.9)
pt3dadd(98.89, 384.1, 33.3, 3.9)
pt3dadd(98.47, 384.25, 33.3, 3.9)
pt3dadd(98.19, 384.41, 33.3, 3.9)
pt3dadd(97.77, 384.41, 33.3, 3.9)
pt3dadd(97.36, 384.57, 33.3, 3.9)
pt3dadd(93.87, 384.57, 33.3, 3.9)
pt3dadd(93.31, 384.73, 33.3, 3.9)
pt3dadd(86.63, 384.73, 33.3, 3.9)
pt3dadd(86.49, 384.89, 33.3, 3.9)
pt3dadd(86.35, 384.89, 33.3, 3.9)
pt3dadd(86.49, 384.41, 36.3, 3.9)
pt3dadd(86.21, 384.41, 36.3, 3.9)
pt3dadd(85.93, 384.73, 36.3, 3.9)
pt3dadd(85.51, 384.89, 36.3, 3.9)
pt3dadd(85.09, 385.2, 36.3, 3.9)
pt3dadd(84.81, 385.36, 36.3, 3.9)
pt3dadd(84.54, 385.52, 36.3, 3.9)
}
}
proc shape3d_154() {
dend[101] { pt3dadd(83.98, 385.84, 36.3, 3.9)
pt3dadd(83.84, 386, 36.3, 3.9)
pt3dadd(83.56, 386.15, 36.3, 3.9)
pt3dadd(83.28, 386.31, 36.3, 3.9)
pt3dadd(82.86, 386.63, 36.3, 3.9)
pt3dadd(82.58, 386.79, 36.3, 3.9)
pt3dadd(82.31, 386.95, 36.3, 3.9)
pt3dadd(81.89, 387.26, 36.3, 3.9)
pt3dadd(81.47, 387.42, 36.3, 3.9)
pt3dadd(81.19, 387.58, 36.3, 3.9)
pt3dadd(80.77, 387.74, 36.3, 3.9)
pt3dadd(80.63, 388.05, 36.3, 3.9)
pt3dadd(80.22, 388.21, 36.3, 3.9)
pt3dadd(79.94, 388.37, 36.3, 3.9)
pt3dadd(79.66, 388.53, 36.3, 3.9)
pt3dadd(79.38, 388.84, 36.3, 3.9)
pt3dadd(78.96, 389, 36.3, 3.9)
pt3dadd(78.68, 389.16, 36.3, 3.9)
pt3dadd(78.4, 389.32, 36.3, 3.9)
pt3dadd(77.99, 389.48, 36.3, 3.9)
pt3dadd(77.57, 389.79, 36.3, 3.9)
pt3dadd(77.29, 389.95, 36.3, 3.9)
pt3dadd(77.01, 390.11, 36.3, 3.9)
pt3dadd(76.73, 390.27, 36.3, 3.9)
pt3dadd(76.45, 390.43, 36.3, 3.9)
pt3dadd(76.17, 390.74, 36.3, 3.9)
pt3dadd(75.9, 390.9, 36.3, 3.9)
pt3dadd(75.62, 391.06, 36.3, 3.9)
pt3dadd(75.2, 391.38, 36.3, 3.9)
pt3dadd(74.92, 391.54, 36.3, 3.9)
pt3dadd(74.64, 391.69, 36.3, 3.9)
pt3dadd(74.5, 392.01, 36.3, 3.9)
pt3dadd(74.08, 392.33, 36.3, 3.9)
pt3dadd(73.25, 393.28, 36.3, 3.9)
pt3dadd(73.11, 393.59, 36.3, 3.9)
pt3dadd(72.97, 393.75, 36.3, 3.9)
pt3dadd(72.69, 393.91, 36.3, 3.9)
pt3dadd(72.55, 394.23, 36.3, 3.9)
pt3dadd(72.41, 394.38, 36.3, 3.9)
pt3dadd(72.27, 394.54, 36.3, 3.9)
pt3dadd(71.99, 394.86, 36.3, 3.9)
pt3dadd(71.71, 395.33, 36.3, 3.9)
pt3dadd(71.58, 395.65, 36.3, 3.9)
pt3dadd(71.44, 395.81, 36.3, 3.9)
pt3dadd(71.3, 396.13, 36.3, 3.9)
pt3dadd(71.16, 396.28, 36.3, 3.9)
pt3dadd(71.02, 396.6, 36.3, 3.9)
pt3dadd(70.88, 396.92, 36.3, 3.9)
pt3dadd(70.88, 397.23, 36.3, 3.9)
pt3dadd(70.6, 397.55, 36.3, 3.9)
pt3dadd(70.6, 397.87, 36.3, 3.9)
pt3dadd(70.46, 398.02, 36.3, 3.9)
pt3dadd(70.32, 398.34, 36.3, 3.9)
pt3dadd(70.18, 398.5, 36.3, 3.9)
pt3dadd(70.04, 398.66, 36.3, 3.9)
pt3dadd(70.04, 399.13, 36.3, 3.9)
pt3dadd(69.9, 399.29, 36.3, 3.9)
pt3dadd(69.76, 399.45, 36.3, 3.9)
pt3dadd(69.62, 399.77, 36.3, 3.9)
pt3dadd(69.49, 400.08, 36.3, 3.9)
pt3dadd(69.35, 400.24, 36.3, 3.9)
pt3dadd(69.35, 400.56, 36.3, 3.9)
pt3dadd(69.21, 400.72, 36.3, 3.9)
pt3dadd(69.07, 401.03, 36.3, 3.9)
pt3dadd(68.93, 401.19, 36.3, 3.9)
pt3dadd(68.79, 401.51, 36.3, 3.9)
pt3dadd(68.65, 401.82, 36.3, 3.9)
pt3dadd(68.51, 401.98, 36.3, 3.9)
pt3dadd(68.37, 402.3, 36.3, 3.9)
pt3dadd(68.23, 402.46, 36.3, 3.9)
pt3dadd(68.09, 402.61, 36.3, 3.9)
pt3dadd(67.95, 402.93, 36.3, 3.9)
pt3dadd(67.81, 403.09, 36.3, 3.9)
pt3dadd(67.53, 403.25, 36.3, 3.9)
pt3dadd(67.39, 403.56, 36.3, 3.9)
pt3dadd(67.26, 403.88, 36.3, 3.9)
pt3dadd(67.12, 404.04, 36.3, 3.9)
pt3dadd(66.98, 404.36, 36.3, 3.9)
pt3dadd(66.84, 404.51, 36.3, 3.9)
pt3dadd(66.56, 404.83, 36.3, 3.9)
pt3dadd(66.42, 405.15, 36.3, 3.9)
pt3dadd(66.28, 405.31, 36.3, 3.9)
pt3dadd(66.14, 405.78, 36.3, 3.9)
pt3dadd(66, 406.1, 36.3, 3.9)
pt3dadd(65.72, 406.57, 36.3, 3.9)
pt3dadd(65.3, 407.05, 36.3, 3.9)
pt3dadd(64.47, 408.63, 36.3, 3.9)
pt3dadd(63.49, 409.74, 36.3, 3.9)
pt3dadd(62.66, 411.16, 36.3, 3.9)
pt3dadd(61.96, 412.27, 36.3, 3.9)
pt3dadd(61.26, 413.06, 36.3, 3.9)
pt3dadd(60.85, 413.85, 36.3, 3.9)
pt3dadd(60.57, 414.17, 36.3, 3.9)
pt3dadd(60.43, 414.33, 36.3, 3.9)
pt3dadd(60.29, 414.49, 36.3, 3.9)
pt3dadd(60.15, 414.64, 36.3, 3.9)
pt3dadd(60.01, 414.8, 36.3, 3.9)
pt3dadd(59.73, 414.8, 36.3, 3.9)
pt3dadd(59.59, 414.96, 36.3, 3.9)
pt3dadd(59.45, 415.12, 36.3, 3.9)
pt3dadd(59.17, 415.12, 36.3, 3.9)
pt3dadd(59.03, 415.28, 36.3, 3.9)
pt3dadd(58.89, 415.44, 36.3, 3.9)
pt3dadd(59.87, 414.33, 39.3, 3.9)
pt3dadd(59.73, 414.49, 39.3, 3.9)
pt3dadd(59.45, 414.8, 39.3, 3.9)
pt3dadd(59.03, 415.12, 39.3, 3.9)
pt3dadd(58.48, 415.59, 39.3, 3.9)
pt3dadd(57.92, 416.39, 39.3, 3.9)
pt3dadd(57.36, 417.02, 39.3, 3.9)
pt3dadd(56.66, 417.49, 39.3, 3.9)
pt3dadd(56.11, 418.13, 39.3, 3.9)
pt3dadd(55.69, 418.76, 39.3, 3.9)
pt3dadd(55.27, 419.39, 39.3, 3.9)
pt3dadd(54.85, 419.87, 39.3, 3.9)
pt3dadd(54.44, 420.5, 39.3, 3.9)
pt3dadd(53.88, 421.13, 39.3, 3.9)
pt3dadd(53.6, 421.61, 39.3, 3.9)
pt3dadd(53.18, 422.24, 39.3, 3.9)
pt3dadd(52.9, 422.87, 39.3, 3.9)
pt3dadd(52.48, 423.35, 39.3, 3.9)
pt3dadd(52.21, 423.82, 39.3, 3.9)
pt3dadd(51.79, 424.46, 39.3, 3.9)
pt3dadd(51.51, 424.93, 39.3, 3.9)
pt3dadd(51.23, 425.57, 39.3, 3.9)
pt3dadd(50.81, 426.04, 39.3, 3.9)
pt3dadd(50.39, 426.83, 39.3, 3.9)
pt3dadd(50.12, 427.31, 39.3, 3.9)
pt3dadd(49.84, 427.62, 39.3, 3.9)
pt3dadd(49.56, 428.1, 39.3, 3.9)
pt3dadd(49.28, 428.57, 39.3, 3.9)
pt3dadd(49, 429.05, 39.3, 3.9)
pt3dadd(48.72, 429.52, 39.3, 3.9)
pt3dadd(48.58, 429.84, 39.3, 3.9)
pt3dadd(48.3, 430.31, 39.3, 3.9)
pt3dadd(48.02, 430.79, 39.3, 3.9)
pt3dadd(47.75, 431.26, 39.3, 3.9)
pt3dadd(47.47, 431.74, 39.3, 3.9)
pt3dadd(47.33, 432.05, 39.3, 3.9)
pt3dadd(46.91, 432.53, 39.3, 3.9)
pt3dadd(46.77, 432.85, 39.3, 3.9)
pt3dadd(46.63, 433.32, 39.3, 3.9)
pt3dadd(46.49, 433.48, 39.3, 3.9)
pt3dadd(46.35, 433.8, 39.3, 3.9)
pt3dadd(45.93, 434.27, 39.3, 3.9)
pt3dadd(45.8, 434.43, 39.3, 3.9)
pt3dadd(45.66, 434.59, 39.3, 3.9)
pt3dadd(45.52, 435.06, 39.3, 3.9)
pt3dadd(45.38, 435.38, 39.3, 3.9)
pt3dadd(45.24, 435.69, 39.3, 3.9)
pt3dadd(45.24, 436.01, 39.3, 3.9)
pt3dadd(45.1, 436.17, 39.3, 3.9)
pt3dadd(45.1, 436.49, 39.3, 3.9)
pt3dadd(44.96, 436.8, 39.3, 3.9)
pt3dadd(44.82, 437.12, 39.3, 3.9)
pt3dadd(44.82, 439.97, 39.3, 3.9)
pt3dadd(44.68, 440.13, 39.3, 3.9)
pt3dadd(44.68, 440.6, 39.3, 3.9)
pt3dadd(44.54, 440.76, 39.3, 3.9)
pt3dadd(44.54, 441.23, 39.3, 3.9)
pt3dadd(44.4, 441.39, 39.3, 3.9)
pt3dadd(44.4, 441.71, 39.3, 3.9)
pt3dadd(44.26, 441.87, 39.3, 3.9)
pt3dadd(44.68, 441.39, 42.3, 3.9)
pt3dadd(44.4, 441.55, 42.3, 3.9)
pt3dadd(44.26, 441.71, 42.3, 3.9)
pt3dadd(43.98, 442.03, 42.3, 3.9)
pt3dadd(43.84, 442.34, 42.3, 3.9)
pt3dadd(43.7, 442.5, 42.3, 3.9)
pt3dadd(43.43, 442.5, 42.3, 3.9)
pt3dadd(43.29, 442.66, 42.3, 3.9)
pt3dadd(43.15, 442.82, 42.3, 3.9)
pt3dadd(42.87, 443.13, 42.3, 3.9)
pt3dadd(42.45, 443.45, 42.3, 3.9)
pt3dadd(42.17, 443.61, 42.3, 3.9)
pt3dadd(42.03, 443.77, 42.3, 3.9)
pt3dadd(41.75, 444.08, 42.3, 3.9)
pt3dadd(41.48, 444.08, 42.3, 3.9)
pt3dadd(41.34, 444.24, 42.3, 3.9)
pt3dadd(41.06, 444.4, 42.3, 3.9)
pt3dadd(40.78, 444.56, 42.3, 3.9)
pt3dadd(40.5, 444.56, 42.3, 3.9)
pt3dadd(40.22, 444.72, 42.3, 3.9)
pt3dadd(39.8, 444.88, 42.3, 3.9)
pt3dadd(38.97, 444.88, 42.3, 3.9)
pt3dadd(38.69, 445.03, 42.3, 3.9)
pt3dadd(37.57, 445.03, 42.3, 3.9)
pt3dadd(37.43, 445.19, 42.3, 3.9)
pt3dadd(36.32, 445.19, 42.3, 3.9)
pt3dadd(36.04, 445.35, 42.3, 3.9)
pt3dadd(35.62, 445.35, 42.3, 3.9)
pt3dadd(35.48, 445.51, 42.3, 3.9)
pt3dadd(35.06, 445.51, 42.3, 3.9)
pt3dadd(34.93, 445.67, 42.3, 3.9)
pt3dadd(34.65, 445.82, 42.3, 3.9)
pt3dadd(34.51, 445.98, 42.3, 3.9)
pt3dadd(34.23, 445.98, 42.3, 3.9)
pt3dadd(33.81, 446.46, 42.3, 3.9)
pt3dadd(33.39, 446.62, 42.3, 3.9)
pt3dadd(32.97, 446.77, 42.3, 3.9)
}
}
proc shape3d_155() {
dend[101] { pt3dadd(32.56, 447.09, 42.3, 3.9)
pt3dadd(31.86, 447.57, 42.3, 3.9)
pt3dadd(31.44, 447.88, 42.3, 3.9)
pt3dadd(31.16, 448.2, 42.3, 3.9)
pt3dadd(30.88, 448.36, 42.3, 3.9)
pt3dadd(30.61, 448.52, 42.3, 3.9)
pt3dadd(30.33, 448.83, 42.3, 3.9)
pt3dadd(30.05, 449.15, 42.3, 3.9)
pt3dadd(29.77, 449.31, 42.3, 3.9)
pt3dadd(29.63, 449.47, 42.3, 3.9)
pt3dadd(29.35, 449.62, 42.3, 3.9)
pt3dadd(28.93, 449.78, 42.3, 3.9)
pt3dadd(28.79, 450.1, 42.3, 3.9)
pt3dadd(28.52, 450.41, 42.3, 3.9)
pt3dadd(28.24, 450.57, 42.3, 3.9)
pt3dadd(27.96, 450.89, 42.3, 3.9)
pt3dadd(27.68, 451.05, 42.3, 3.9)
pt3dadd(27.4, 451.21, 42.3, 3.9)
pt3dadd(27.26, 451.36, 42.3, 3.9)
pt3dadd(26.98, 451.52, 42.3, 3.9)
pt3dadd(26.7, 451.84, 42.3, 3.9)
pt3dadd(26.43, 452.31, 42.3, 3.9)
pt3dadd(26.15, 452.47, 42.3, 3.9)
pt3dadd(25.87, 452.63, 42.3, 3.9)
pt3dadd(25.73, 452.79, 42.3, 3.9)
pt3dadd(25.59, 453.11, 42.3, 3.9)
pt3dadd(25.31, 453.42, 42.3, 3.9)
pt3dadd(25.03, 453.58, 42.3, 3.9)
pt3dadd(24.75, 453.74, 42.3, 3.9)
pt3dadd(24.61, 454.06, 42.3, 3.9)
pt3dadd(24.33, 454.21, 42.3, 3.9)
pt3dadd(24.2, 454.37, 42.3, 3.9)
pt3dadd(24.06, 454.53, 42.3, 3.9)
pt3dadd(23.78, 454.85, 42.3, 3.9)
pt3dadd(23.5, 455.16, 42.3, 3.9)
pt3dadd(23.36, 455.32, 42.3, 3.9)
pt3dadd(22.94, 455.8, 42.3, 3.9)
pt3dadd(22.8, 455.95, 42.3, 3.9)
pt3dadd(22.66, 456.11, 42.3, 3.9)
pt3dadd(22.52, 456.27, 42.3, 3.9)
pt3dadd(22.24, 456.43, 42.3, 3.9)
pt3dadd(22.11, 456.59, 42.3, 3.9)
pt3dadd(21.97, 456.75, 42.3, 3.9)
pt3dadd(21.69, 456.9, 42.3, 3.9)
pt3dadd(21.41, 456.9, 42.3, 3.9)
pt3dadd(21.27, 457.06, 42.3, 3.9)
pt3dadd(21.13, 457.22, 42.3, 3.9)
pt3dadd(20.85, 457.22, 42.3, 3.9)
pt3dadd(21.13, 456.59, 45.3, 3.9)
pt3dadd(20.85, 456.75, 45.3, 3.9)
pt3dadd(20.57, 457.06, 45.3, 3.9)
pt3dadd(20.15, 457.22, 45.3, 3.9)
pt3dadd(19.6, 457.54, 45.3, 3.9)
pt3dadd(19.18, 457.85, 45.3, 3.9)
pt3dadd(18.62, 458.01, 45.3, 3.9)
pt3dadd(18.2, 458.33, 45.3, 3.9)
pt3dadd(17.79, 458.49, 45.3, 3.9)
pt3dadd(17.51, 458.65, 45.3, 3.9)
pt3dadd(17.09, 458.8, 45.3, 3.9)
pt3dadd(16.95, 459.12, 45.3, 3.9)
pt3dadd(16.67, 459.12, 45.3, 3.9)
pt3dadd(16.53, 459.28, 45.3, 3.9)
pt3dadd(16.25, 459.59, 45.3, 3.9)
pt3dadd(16.11, 459.75, 45.3, 3.9)
pt3dadd(15.97, 459.91, 45.3, 3.9)
pt3dadd(15.69, 460.07, 45.3, 3.9)
pt3dadd(15.56, 460.23, 45.3, 3.9)
pt3dadd(15.42, 460.39, 45.3, 3.9)
pt3dadd(15.28, 460.54, 45.3, 3.9)
pt3dadd(14.86, 460.7, 45.3, 3.9)
pt3dadd(14.44, 461.02, 45.3, 3.9)
pt3dadd(14.02, 461.18, 45.3, 3.9)
pt3dadd(13.74, 461.34, 45.3, 3.9)
pt3dadd(13.6, 461.49, 45.3, 3.9)
pt3dadd(13.33, 461.81, 45.3, 3.9)
pt3dadd(12.91, 461.97, 45.3, 3.9)
pt3dadd(12.49, 462.13, 45.3, 3.9)
pt3dadd(12.07, 462.44, 45.3, 3.9)
pt3dadd(11.65, 462.6, 45.3, 3.9)
pt3dadd(11.24, 462.76, 45.3, 3.9)
pt3dadd(10.96, 463.24, 45.3, 3.9)
pt3dadd(10.4, 463.39, 45.3, 3.9)
pt3dadd(10.12, 463.55, 45.3, 3.9)
pt3dadd(9.84, 463.87, 45.3, 3.9)
pt3dadd(9.56, 463.87, 45.3, 3.9)
pt3dadd(9.28, 464.18, 45.3, 3.9)
pt3dadd(8.87, 464.18, 45.3, 3.9)
pt3dadd(8.59, 464.5, 45.3, 3.9)
pt3dadd(8.31, 464.66, 45.3, 3.9)
pt3dadd(8.03, 464.82, 45.3, 3.9)
pt3dadd(7.75, 464.98, 45.3, 3.9)
pt3dadd(7.47, 465.29, 45.3, 3.9)
pt3dadd(7.19, 465.45, 45.3, 3.9)
pt3dadd(7.05, 465.61, 45.3, 3.9)
pt3dadd(6.64, 465.93, 45.3, 3.9)
pt3dadd(6.36, 466.08, 45.3, 3.9)
pt3dadd(6.08, 466.4, 45.3, 3.9)
pt3dadd(5.66, 466.56, 45.3, 3.9)
pt3dadd(5.52, 466.72, 45.3, 3.9)
pt3dadd(5.24, 467.03, 45.3, 3.9)
pt3dadd(5.1, 467.19, 45.3, 3.9)
pt3dadd(4.83, 467.35, 45.3, 3.9)
pt3dadd(4.55, 467.51, 45.3, 3.9)
pt3dadd(4.41, 467.67, 45.3, 3.9)
pt3dadd(4.27, 467.67, 45.3, 3.9)
pt3dadd(4.41, 467.19, 46.3, 3.62)
pt3dadd(4.13, 467.19, 46.3, 3.62)
pt3dadd(3.85, 467.51, 46.3, 3.62)
pt3dadd(3.57, 467.67, 46.3, 3.62)
pt3dadd(3.15, 467.83, 46.3, 3.62)
pt3dadd(2.73, 468.14, 46.3, 3.62)
pt3dadd(2.46, 468.3, 46.3, 3.62)
pt3dadd(2.18, 468.46, 46.3, 3.62)
pt3dadd(1.9, 468.62, 46.3, 3.62)
pt3dadd(1.48, 469.09, 46.3, 3.62)
pt3dadd(1.2, 469.09, 46.3, 3.62)
pt3dadd(1.06, 469.25, 46.3, 3.62)
pt3dadd(0.92, 469.41, 46.3, 3.62)
pt3dadd(0.78, 469.57, 46.3, 3.62)
pt3dadd(0.51, 469.88, 46.3, 3.62)
pt3dadd(0.37, 470.04, 46.3, 3.62)
pt3dadd(0.23, 470.2, 46.3, 3.62)
pt3dadd(0.09, 470.52, 46.3, 3.62)
pt3dadd(-0.19, 470.67, 46.3, 3.62)
pt3dadd(-0.33, 470.99, 46.3, 3.62)
pt3dadd(-0.47, 471.15, 46.3, 3.62)
pt3dadd(-0.75, 471.31, 46.3, 3.62)
pt3dadd(-0.89, 471.47, 46.3, 3.62)
pt3dadd(-1.17, 471.62, 46.3, 3.62)
pt3dadd(-1.31, 471.94, 46.3, 3.62)
pt3dadd(-1.59, 471.94, 46.3, 3.62)
pt3dadd(-1.72, 472.1, 46.3, 3.62)
pt3dadd(-1.86, 472.26, 46.3, 3.62)
pt3dadd(-2, 472.42, 46.3, 3.62)
pt3dadd(-2.14, 472.73, 46.3, 3.62)
pt3dadd(-2.28, 472.89, 46.3, 3.62)
pt3dadd(-2.42, 473.05, 46.3, 3.62)
pt3dadd(-2.7, 473.37, 46.3, 3.62)
pt3dadd(-2.84, 473.52, 46.3, 3.62)
pt3dadd(-3.4, 474.16, 46.3, 3.62)
pt3dadd(-3.68, 474.31, 46.3, 3.62)
pt3dadd(-3.81, 474.63, 46.3, 3.62)
pt3dadd(-3.95, 474.95, 46.3, 3.62)
pt3dadd(-4.23, 475.11, 46.3, 3.62)
pt3dadd(-4.51, 475.26, 46.3, 3.62)
pt3dadd(-4.65, 475.42, 46.3, 3.62)
pt3dadd(-4.93, 475.74, 46.3, 3.62)
pt3dadd(-5.07, 475.9, 46.3, 3.62)
pt3dadd(-5.21, 476.06, 46.3, 3.62)
pt3dadd(-5.49, 476.21, 46.3, 3.62)
pt3dadd(-5.77, 476.37, 46.3, 3.62)
pt3dadd(-5.9, 476.69, 46.3, 3.62)
pt3dadd(-6.04, 477.01, 46.3, 3.62)
pt3dadd(-6.18, 477.16, 46.3, 3.62)
pt3dadd(-6.32, 477.32, 46.3, 3.62)
pt3dadd(-6.74, 477.8, 46.3, 3.62)
pt3dadd(-6.88, 477.96, 46.3, 3.62)
pt3dadd(-7.58, 478.75, 46.3, 3.62)
pt3dadd(-7.72, 479.06, 46.3, 3.62)
pt3dadd(-8, 479.22, 46.3, 3.62)
pt3dadd(-8.13, 479.38, 46.3, 3.62)
pt3dadd(-8.41, 479.7, 46.3, 3.62)
pt3dadd(-8.55, 479.85, 46.3, 3.62)
pt3dadd(-8.83, 480.17, 46.3, 3.62)
pt3dadd(-8.97, 480.33, 46.3, 3.62)
pt3dadd(-9.11, 480.49, 46.3, 3.62)
pt3dadd(-9.39, 480.65, 46.3, 3.62)
pt3dadd(-9.53, 480.96, 46.3, 3.62)
pt3dadd(-9.81, 481.12, 46.3, 3.62)
pt3dadd(-9.95, 481.44, 46.3, 3.62)
pt3dadd(-10.23, 481.6, 46.3, 3.62)
pt3dadd(-10.36, 481.91, 46.3, 3.62)
pt3dadd(-10.64, 482.23, 46.3, 3.62)
pt3dadd(-10.78, 482.39, 46.3, 3.62)
pt3dadd(-10.92, 482.7, 46.3, 3.62)
pt3dadd(-11.06, 482.86, 46.3, 3.62)
pt3dadd(-11.2, 483.02, 46.3, 3.62)
pt3dadd(-11.34, 483.18, 46.3, 3.62)
pt3dadd(-11.48, 483.34, 46.3, 3.62)
pt3dadd(-11.62, 483.65, 46.3, 3.62)
pt3dadd(-11.76, 483.97, 46.3, 3.62)
pt3dadd(-12.18, 484.44, 46.3, 3.62)
pt3dadd(-12.32, 484.76, 46.3, 3.62)
pt3dadd(-12.45, 484.92, 46.3, 3.62)
pt3dadd(-12.59, 485.24, 46.3, 3.62)
pt3dadd(-12.73, 485.39, 46.3, 3.62)
pt3dadd(-12.73, 485.55, 46.3, 3.62)
pt3dadd(-12.87, 484.92, 48.3, 3.62)
pt3dadd(-13.29, 485.39, 48.3, 3.62)
pt3dadd(-13.57, 485.71, 48.3, 3.62)
pt3dadd(-13.85, 486.03, 48.3, 3.62)
pt3dadd(-13.99, 486.19, 48.3, 3.62)
pt3dadd(-14.27, 486.5, 48.3, 3.62)
pt3dadd(-14.41, 486.82, 48.3, 3.62)
pt3dadd(-14.82, 487.14, 48.3, 3.62)
pt3dadd(-14.96, 487.45, 48.3, 3.62)
pt3dadd(-15.1, 487.61, 48.3, 3.62)
pt3dadd(-15.24, 487.93, 48.3, 3.62)
pt3dadd(-15.52, 488.08, 48.3, 3.62)
pt3dadd(-15.66, 488.24, 48.3, 3.62)
}
}
proc shape3d_156() {
dend[101] { pt3dadd(-15.8, 488.56, 48.3, 3.62)
pt3dadd(-15.94, 488.88, 48.3, 3.62)
pt3dadd(-16.22, 489.03, 48.3, 3.62)
pt3dadd(-16.36, 489.35, 48.3, 3.62)
pt3dadd(-16.5, 489.51, 48.3, 3.62)
pt3dadd(-16.77, 489.83, 48.3, 3.62)
pt3dadd(-16.91, 489.98, 48.3, 3.62)
pt3dadd(-17.05, 490.3, 48.3, 3.62)
pt3dadd(-17.19, 490.62, 48.3, 3.62)
pt3dadd(-17.61, 491.09, 48.3, 3.62)
pt3dadd(-17.75, 491.25, 48.3, 3.62)
pt3dadd(-18.03, 491.88, 48.3, 3.62)
pt3dadd(-18.17, 492.2, 48.3, 3.62)
pt3dadd(-18.31, 492.36, 48.3, 3.62)
pt3dadd(-18.59, 492.67, 48.3, 3.62)
pt3dadd(-18.73, 492.99, 48.3, 3.62)
pt3dadd(-18.86, 493.31, 48.3, 3.62)
pt3dadd(-19, 493.47, 48.3, 3.62)
pt3dadd(-19.14, 493.78, 48.3, 3.62)
pt3dadd(-19.28, 494.1, 48.3, 3.62)
pt3dadd(-19.42, 494.42, 48.3, 3.62)
pt3dadd(-19.56, 494.57, 48.3, 3.62)
pt3dadd(-19.7, 494.89, 48.3, 3.62)
pt3dadd(-19.84, 495.21, 48.3, 3.62)
pt3dadd(-19.84, 495.68, 48.3, 3.62)
pt3dadd(-19.98, 495.84, 48.3, 3.62)
pt3dadd(-19.98, 496.16, 48.3, 3.62)
pt3dadd(-20.12, 496.63, 48.3, 3.62)
pt3dadd(-20.12, 497.58, 48.3, 3.62)
pt3dadd(-20.26, 497.9, 48.3, 3.62)
pt3dadd(-20.26, 498.69, 48.3, 3.62)
pt3dadd(-20.4, 499.16, 48.3, 3.62)
pt3dadd(-20.4, 499.8, 48.3, 3.62)
pt3dadd(-20.54, 500.11, 48.3, 3.62)
pt3dadd(-20.54, 501.22, 48.3, 3.62)
pt3dadd(-20.68, 501.38, 48.3, 3.62)
pt3dadd(-20.68, 501.86, 48.3, 3.62)
pt3dadd(-20.82, 502.01, 48.3, 3.62)
pt3dadd(-20.82, 502.8, 48.3, 3.62)
pt3dadd(-20.96, 503.12, 48.3, 3.62)
pt3dadd(-20.96, 503.44, 48.3, 3.62)
pt3dadd(-21.09, 503.75, 48.3, 3.62)
pt3dadd(-21.23, 504.07, 48.3, 3.62)
pt3dadd(-21.23, 504.7, 48.3, 3.62)
pt3dadd(-21.37, 505.02, 48.3, 3.62)
pt3dadd(-21.51, 505.18, 48.3, 3.62)
pt3dadd(-21.51, 505.65, 48.3, 3.62)
pt3dadd(-21.65, 505.97, 48.3, 3.62)
pt3dadd(-21.65, 506.13, 48.3, 3.62)
pt3dadd(-27.18, 495.95, 48.3, 4.8)
pt3dadd(-28.2, 496.53, 48.3, 4.8)
pt3dadd(-28.87, 496.53, 48.3, 5.77)
pt3dadd(-29.55, 496.91, 48.3, 5.77)
pt3dadd(-29.89, 497.3, 48.3, 5.77)
pt3dadd(-30.23, 497.68, 48.3, 5.77)
pt3dadd(-30.23, 498.84, 48.3, 5.77)
pt3dadd(-30.91, 499.61, 48.3, 5.77)
pt3dadd(-30.91, 500.39, 48.3, 5.77)
pt3dadd(-31.25, 500.77, 48.3, 5.77)
pt3dadd(-31.25, 501.54, 48.3, 4.8)
pt3dadd(-31.59, 501.93, 48.3, 4.7)
pt3dadd(-31.93, 502.31, 48.3, 5.77)
pt3dadd(-32.27, 502.7, 48.3, 4.8)
pt3dadd(-32.61, 503.09, 48.3, 4.8)
pt3dadd(-32.61, 503.86, 48.3, 5.77)
pt3dadd(-32.95, 504.24, 48.3, 5.77)
pt3dadd(-33.29, 504.63, 48.3, 4.8)
pt3dadd(-33.63, 505.02, 48.3, 4)
pt3dadd(-33.97, 505.4, 48.3, 5.77)
pt3dadd(-34.31, 505.79, 48.3, 4.8)
pt3dadd(-34.99, 506.17, 48.3, 5.77)
pt3dadd(-35.33, 506.56, 48.3, 5.77)
pt3dadd(-37.37, 506.56, 48.3, 5.77)
pt3dadd(-37.71, 506.94, 48.3, 5.77)
pt3dadd(-39.4, 506.94, 48.3, 5.77)
pt3dadd(-40.76, 506.37, 48.3, 4.42)
pt3dadd(-42.12, 506.37, 48.3, 4.42)
pt3dadd(-42.8, 505.98, 48.3, 4.42)
pt3dadd(-43.14, 505.59, 48.3, 4.42)
pt3dadd(-43.82, 505.21, 48.3, 4.42)
pt3dadd(-44.84, 504.44, 48.3, 4.42)
pt3dadd(-45.18, 504.05, 48.3, 4.42)
pt3dadd(-45.52, 503.66, 48.3, 4.42)
pt3dadd(-46.2, 502.89, 48.3, 4.42)
pt3dadd(-46.88, 502.51, 48.3, 4.42)
pt3dadd(-47.56, 502.51, 48.3, 4.42)
pt3dadd(-49.25, 501.16, 48.3, 4.08)
pt3dadd(-53.67, 501.16, 48.3, 4.08)
pt3dadd(-54.01, 501.54, 48.3, 4.08)
pt3dadd(-54.35, 501.93, 48.3, 4.08)
pt3dadd(-55.03, 501.93, 48.3, 4.08)
pt3dadd(-55.37, 502.31, 48.3, 4.08)
pt3dadd(-55.71, 502.7, 48.3, 4.08)
pt3dadd(-56.05, 503.09, 48.3, 4.08)
pt3dadd(-56.39, 503.47, 48.3, 4.08)
pt3dadd(-56.73, 503.86, 48.3, 4.08)
pt3dadd(-57.41, 503.86, 48.3, 4.08)
pt3dadd(-57.75, 504.24, 48.3, 4.08)
pt3dadd(-58.09, 504.63, 48.3, 4.08)
pt3dadd(-58.43, 505.02, 48.3, 4.08)
pt3dadd(-58.77, 505.4, 48.3, 4.08)
pt3dadd(-59.45, 505.4, 48.3, 4.08)
pt3dadd(-59.78, 505.79, 48.3, 4.08)
pt3dadd(-62.5, 505.79, 48.3, 4.08)
pt3dadd(-62.84, 506.17, 48.3, 4.08)
pt3dadd(-66.24, 506.17, 48.3, 4.08)
pt3dadd(-66.58, 505.79, 48.3, 4.08)
pt3dadd(-67.94, 505.79, 48.3, 4.08)
pt3dadd(-68.28, 505.02, 48.3, 4.08)
pt3dadd(-69.3, 503.86, 48.3, 4.08)
pt3dadd(-69.64, 503.47, 48.3, 4.08)
pt3dadd(-69.98, 502.7, 48.3, 4.08)
pt3dadd(-70.65, 502.31, 48.3, 4.08)
pt3dadd(-71.33, 501.93, 48.3, 4.08)
pt3dadd(-72.01, 501.54, 48.3, 4.08)
pt3dadd(-72.35, 501.16, 48.3, 4.08)
pt3dadd(-73.03, 500.77, 48.3, 4)
pt3dadd(-73.71, 500.39, 48.3, 4.08)
pt3dadd(-74.39, 500, 48.3, 4.08)
pt3dadd(-74.73, 499.61, 48.3, 4.08)
pt3dadd(-75.41, 499.23, 48.3, 4.08)
pt3dadd(-75.75, 498.84, 48.3, 4.08)
pt3dadd(-76.09, 498.46, 48.3, 4.08)
pt3dadd(-76.77, 498.07, 48.3, 4.08)
pt3dadd(-77.45, 497.68, 48.3, 4.08)
pt3dadd(-77.79, 497.3, 48.3, 4.08)
pt3dadd(-78.13, 496.91, 48.3, 4.08)
pt3dadd(-78.47, 496.53, 48.3, 4.08)
pt3dadd(-79.15, 496.14, 48.3, 4.08)
pt3dadd(-79.83, 496.14, 48.3, 4.08)
pt3dadd(-80.17, 495.37, 48.3, 4.08)
pt3dadd(-80.5, 494.98, 48.3, 4.08)
pt3dadd(-80.84, 494.6, 48.3, 4.08)
pt3dadd(-81.52, 494.6, 48.3, 4.08)
pt3dadd(-81.86, 494.21, 48.3, 4.08)
pt3dadd(-82.2, 493.83, 48.3, 4.08)
pt3dadd(-82.88, 493.83, 48.3, 4.08)
pt3dadd(-83.9, 493.44, 48.3, 4.08)
pt3dadd(-87.3, 493.44, 48.3, 4.08)
pt3dadd(-87.98, 494.21, 48.3, 4.08)
pt3dadd(-92.73, 494.21, 48.3, 4.08)
pt3dadd(-93.07, 493.83, 48.3, 4.08)
pt3dadd(-93.75, 493.44, 48.3, 4.08)
pt3dadd(-94.43, 493.06, 48.3, 4.08)
pt3dadd(-94.77, 492.67, 48.3, 4.08)
pt3dadd(-96.13, 491.13, 48.3, 4.08)
pt3dadd(-96.47, 490.74, 48.3, 4.08)
pt3dadd(-97.15, 490.74, 48.3, 4.08)
pt3dadd(-97.83, 490.35, 48.3, 4.08)
pt3dadd(-98.17, 489.97, 48.3, 4.08)
pt3dadd(-98.51, 489.58, 48.3, 4.08)
pt3dadd(-100.55, 489.58, 48.3, 4.08)
pt3dadd(-100.89, 489.2, 48.3, 4.08)
pt3dadd(-101.56, 488.81, 48.3, 4.08)
pt3dadd(-107.34, 488.81, 48.3, 4.08)
pt3dadd(-108.02, 488.43, 48.3, 4.08)
pt3dadd(-109.04, 488.43, 48.3, 4.08)
pt3dadd(-109.38, 488.04, 48.3, 4.08)
pt3dadd(-109.72, 487.65, 48.3, 4.08)
pt3dadd(-110.06, 487.27, 48.3, 4.08)
pt3dadd(-110.74, 486.88, 48.3, 4.08)
pt3dadd(-111.08, 486.5, 48.3, 4.08)
pt3dadd(-111.75, 486.11, 48.3, 4.08)
pt3dadd(-112.09, 485.34, 48.3, 4.08)
pt3dadd(-112.43, 484.95, 48.3, 4.08)
pt3dadd(-113.11, 484.57, 48.3, 4.08)
pt3dadd(-115.15, 484.57, 48.3, 4.08)
pt3dadd(-115.49, 484.95, 48.3, 4.08)
pt3dadd(-115.83, 485.34, 48.3, 4.08)
pt3dadd(-116.51, 485.34, 48.3, 4.08)
pt3dadd(-116.85, 485.72, 48.3, 4.08)
pt3dadd(-117.19, 486.11, 48.3, 4.08)
pt3dadd(-117.53, 486.5, 48.3, 4.08)
pt3dadd(-117.53, 487.27, 48.3, 4.08)
pt3dadd(-118.21, 488.04, 48.3, 4.08)
pt3dadd(-118.55, 488.81, 48.3, 4.08)
pt3dadd(-118.89, 489.2, 48.3, 4.08)
pt3dadd(-119.23, 489.58, 48.3, 4.08)
pt3dadd(-119.23, 490.35, 48.3, 4.08)
pt3dadd(-119.57, 490.74, 48.3, 4.08)
pt3dadd(-120.25, 491.13, 48.3, 4.08)
pt3dadd(-120.25, 491.9, 48.3, 4.08)
pt3dadd(-120.59, 492.28, 48.3, 4.08)
pt3dadd(-120.93, 492.67, 48.3, 4.08)
pt3dadd(-120.93, 493.44, 48.3, 4.08)
pt3dadd(-121.27, 493.83, 48.3, 4.08)
pt3dadd(-121.61, 494.21, 48.3, 4.08)
pt3dadd(-122.28, 494.6, 48.3, 4.08)
pt3dadd(-122.62, 495.37, 48.3, 4.08)
pt3dadd(-122.96, 495.76, 48.3, 4.08)
pt3dadd(-123.64, 496.14, 48.3, 4.08)
pt3dadd(-123.98, 496.53, 48.3, 4.08)
pt3dadd(-124.32, 496.91, 48.3, 4.08)
pt3dadd(-124.66, 497.68, 48.3, 4.08)
pt3dadd(-125, 498.07, 48.3, 4.08)
pt3dadd(-125.34, 498.46, 48.3, 4.08)
pt3dadd(-125.68, 498.84, 48.3, 4.08)
pt3dadd(-126.02, 499.23, 48.3, 4.08)
pt3dadd(-126.36, 500, 48.3, 4.08)
pt3dadd(-127.04, 500.39, 48.3, 4.08)
}
}
proc shape3d_157() {
dend[101] { pt3dadd(-127.38, 500.77, 48.3, 4.08)
pt3dadd(-127.72, 501.16, 48.3, 4.08)
pt3dadd(-128.4, 501.54, 48.3, 4.08)
pt3dadd(-128.74, 501.93, 48.3, 4.08)
pt3dadd(-129.08, 502.31, 48.3, 4.08)
pt3dadd(-129.42, 503.09, 48.3, 4.08)
pt3dadd(-130.1, 503.09, 48.3, 4.08)
pt3dadd(-129.08, 501.74, 48.3, 3.74)
pt3dadd(-129.76, 502.12, 48.3, 3.74)
pt3dadd(-130.44, 502.51, 48.3, 3.74)
pt3dadd(-140.29, 502.51, 48.3, 3.74)
pt3dadd(-140.97, 502.12, 48.3, 3.74)
pt3dadd(-143, 502.12, 48.3, 3.74)
pt3dadd(-143.68, 501.74, 48.3, 3.74)
pt3dadd(-144.02, 501.35, 48.3, 3.74)
pt3dadd(-145.38, 501.35, 48.3, 3.74)
pt3dadd(-145.72, 500.96, 48.3, 3.74)
pt3dadd(-146.06, 500.58, 48.3, 3.74)
pt3dadd(-146.74, 499.81, 48.3, 3.74)
pt3dadd(-147.08, 499.04, 48.3, 3.74)
pt3dadd(-147.76, 499.04, 48.3, 3.74)
pt3dadd(-148.1, 498.65, 48.3, 3.74)
pt3dadd(-148.44, 498.26, 48.3, 3.74)
pt3dadd(-150.14, 498.26, 48.3, 3.74)
pt3dadd(-150.48, 497.49, 48.3, 3.74)
pt3dadd(-151.16, 497.49, 48.3, 3.74)
pt3dadd(-151.84, 497.11, 48.3, 3.74)
pt3dadd(-152.52, 496.72, 48.3, 3.74)
pt3dadd(-153.2, 496.33, 48.3, 3.74)
pt3dadd(-154.21, 496.33, 48.3, 3.74)
pt3dadd(-154.89, 495.95, 48.3, 3.74)
pt3dadd(-155.57, 495.56, 48.3, 3.74)
pt3dadd(-156.25, 495.18, 48.3, 3.74)
pt3dadd(-160.33, 495.18, 48.3, 3.74)
pt3dadd(-160.67, 495.56, 48.3, 3.74)
pt3dadd(-161.35, 495.95, 48.3, 3.74)
pt3dadd(-161.69, 496.33, 48.3, 3.74)
pt3dadd(-162.37, 496.72, 48.3, 3.74)
pt3dadd(-162.37, 497.49, 48.3, 3.74)
pt3dadd(-162.71, 497.88, 48.3, 3.74)
pt3dadd(-163.39, 498.26, 48.3, 3.74)
pt3dadd(-163.39, 499.04, 48.3, 3.74)
pt3dadd(-163.73, 499.42, 48.3, 3.74)
pt3dadd(-164.06, 499.81, 48.3, 3.74)
pt3dadd(-164.4, 500.58, 48.3, 3.74)
pt3dadd(-164.4, 501.35, 48.3, 3.74)
pt3dadd(-164.74, 502.12, 48.3, 3.74)
pt3dadd(-165.08, 502.51, 48.3, 3.74)
pt3dadd(-165.42, 502.89, 48.3, 3.74)
pt3dadd(-165.76, 503.28, 48.3, 3.74)
pt3dadd(-165.76, 511, 48.3, 3.74)
pt3dadd(-166.1, 511.77, 48.3, 3.74)
pt3dadd(-166.44, 512.15, 48.3, 3.74)
pt3dadd(-166.78, 512.92, 48.3, 3.74)
pt3dadd(-167.12, 513.7, 48.3, 3.74)
pt3dadd(-167.46, 514.08, 48.3, 3.74)
pt3dadd(-167.8, 514.47, 48.3, 3.74)
pt3dadd(-167.8, 515.24, 48.3, 3.74)
pt3dadd(-168.14, 516.01, 48.3, 3.74)
}
dend[102] {pt3dclear()
pt3dadd(157.61, 296.3, 16.3, 1.36)
pt3dadd(161.01, 284.72, -7.35, 1.36)
pt3dadd(160.91, 285.51, -7.35, 2.23)
pt3dadd(161.2, 285.17, -7.35, 2.23)
pt3dadd(161.35, 285.01, -7.35, 2.23)
pt3dadd(161.49, 284.68, -7.35, 2.23)
pt3dadd(161.93, 284.18, -7.35, 2.23)
pt3dadd(162.08, 284.01, -7.35, 2.23)
pt3dadd(162.22, 283.68, -7.35, 2.23)
pt3dadd(162.37, 283.35, -7.35, 2.23)
pt3dadd(162.52, 283.18, -7.35, 2.23)
pt3dadd(162.66, 282.85, -7.35, 2.23)
pt3dadd(162.96, 282.68, -7.35, 2.23)
pt3dadd(163.1, 282.35, -7.35, 2.23)
pt3dadd(163.25, 282.18, -7.35, 2.23)
pt3dadd(163.69, 281.68, -7.35, 2.23)
pt3dadd(163.83, 281.52, -7.35, 2.23)
pt3dadd(164.13, 281.19, -7.35, 2.23)
pt3dadd(164.42, 280.85, -7.35, 2.23)
pt3dadd(164.56, 280.69, -7.35, 2.23)
pt3dadd(164.71, 280.35, -7.35, 2.23)
pt3dadd(165, 280.02, -7.35, 2.23)
pt3dadd(165.15, 279.69, -7.35, 2.23)
pt3dadd(165.59, 279.19, -7.35, 2.23)
pt3dadd(165.88, 278.69, -7.35, 2.23)
pt3dadd(166.17, 278.36, -7.35, 2.23)
pt3dadd(166.47, 278.03, -7.35, 2.23)
pt3dadd(167.05, 277.36, -7.35, 2.23)
pt3dadd(167.34, 276.86, -7.35, 2.23)
pt3dadd(167.64, 276.53, -7.35, 2.23)
pt3dadd(168.08, 276.03, -7.35, 2.23)
pt3dadd(168.37, 275.7, -7.35, 2.23)
pt3dadd(170.42, 273.37, -7.35, 2.23)
pt3dadd(170.56, 273.21, -7.35, 2.23)
pt3dadd(170.86, 272.88, -7.35, 2.23)
pt3dadd(171.15, 272.54, -7.35, 2.23)
pt3dadd(171.44, 272.38, -7.35, 2.23)
pt3dadd(172.47, 271.21, -7.35, 2.23)
pt3dadd(172.76, 271.05, -7.35, 2.23)
pt3dadd(173.2, 270.72, -7.35, 2.23)
pt3dadd(173.34, 270.38, -7.35, 2.23)
pt3dadd(173.64, 270.05, -7.35, 2.23)
pt3dadd(173.93, 269.72, -7.35, 2.23)
pt3dadd(174.22, 269.55, -7.35, 2.23)
pt3dadd(174.66, 269.05, -7.35, 2.23)
pt3dadd(175.1, 268.72, -7.35, 2.23)
pt3dadd(175.39, 268.39, -7.35, 2.23)
pt3dadd(175.83, 268.22, -7.35, 2.23)
pt3dadd(176.27, 267.89, -7.35, 2.23)
pt3dadd(176.71, 267.56, -7.35, 2.23)
pt3dadd(177.15, 267.23, -7.35, 2.23)
pt3dadd(177.44, 266.89, -7.35, 2.23)
pt3dadd(177.88, 266.73, -7.35, 2.23)
pt3dadd(178.32, 266.56, -7.35, 2.23)
pt3dadd(178.61, 266.23, -7.35, 2.23)
pt3dadd(178.9, 266.06, -7.35, 2.23)
pt3dadd(179.2, 265.9, -7.35, 2.23)
pt3dadd(179.34, 265.73, -7.35, 2.23)
pt3dadd(179.78, 265.56, -7.35, 2.23)
pt3dadd(179.93, 265.4, -7.35, 2.23)
pt3dadd(180.22, 265.23, -7.35, 2.23)
pt3dadd(180.51, 264.9, -7.35, 2.23)
pt3dadd(180.81, 264.73, -7.35, 2.23)
pt3dadd(181.25, 264.57, -7.35, 2.23)
pt3dadd(181.54, 264.4, -7.35, 2.23)
pt3dadd(181.83, 264.07, -7.35, 2.23)
pt3dadd(182.12, 263.9, -7.35, 2.23)
pt3dadd(182.42, 263.57, -7.35, 2.23)
pt3dadd(183, 263.24, -7.35, 2.23)
pt3dadd(183.73, 262.41, -7.35, 2.23)
pt3dadd(184.03, 262.24, -7.35, 2.23)
pt3dadd(184.9, 261.24, -7.35, 2.23)
pt3dadd(185.05, 261.08, -7.35, 2.23)
pt3dadd(185.2, 260.91, -7.35, 2.23)
pt3dadd(185.49, 260.58, -7.35, 2.23)
pt3dadd(185.78, 260.24, -7.35, 2.23)
pt3dadd(185.93, 259.75, -7.35, 2.23)
pt3dadd(186.22, 259.58, -7.35, 2.23)
pt3dadd(186.37, 259.25, -7.35, 2.23)
pt3dadd(186.66, 258.92, -7.35, 2.23)
pt3dadd(186.81, 258.75, -7.35, 2.23)
pt3dadd(186.95, 258.42, -7.35, 2.23)
pt3dadd(186.81, 258.42, -7.35, 2.23)
pt3dadd(186.81, 254.43, -7.35, 2.23)
pt3dadd(186.95, 254.26, -7.35, 2.23)
pt3dadd(186.95, 253.93, -7.35, 2.23)
pt3dadd(187.1, 253.76, -7.35, 2.23)
pt3dadd(187.24, 253.43, -7.35, 2.23)
pt3dadd(187.39, 253.26, -7.35, 2.23)
pt3dadd(187.54, 252.77, -7.35, 2.23)
pt3dadd(187.68, 252.27, -7.35, 2.23)
pt3dadd(187.83, 251.94, -7.35, 2.23)
pt3dadd(187.83, 251.6, -7.35, 2.23)
pt3dadd(187.98, 251.44, -7.35, 2.23)
pt3dadd(188.12, 251.27, -7.35, 2.23)
pt3dadd(188.27, 251.1, -7.35, 2.23)
pt3dadd(188.42, 250.94, -7.35, 2.23)
pt3dadd(188.56, 250.61, -7.35, 2.23)
pt3dadd(188.71, 250.27, -7.35, 2.23)
pt3dadd(188.85, 250.11, -7.35, 2.23)
pt3dadd(189, 249.94, -7.35, 2.23)
pt3dadd(189.15, 249.77, -7.35, 2.23)
pt3dadd(189.29, 249.61, -7.35, 2.23)
pt3dadd(189.44, 249.44, -7.35, 2.23)
pt3dadd(189, 249.77, -7.35, 2.23)
pt3dadd(189.88, 248.78, -7.35, 2.23)
pt3dadd(190.17, 248.45, -7.35, 2.23)
pt3dadd(190.46, 248.11, -7.35, 2.23)
pt3dadd(190.76, 247.78, -7.35, 2.23)
pt3dadd(190.9, 247.61, -7.35, 2.23)
pt3dadd(191.05, 247.28, -7.35, 2.23)
pt3dadd(191.05, 246.95, -7.35, 2.23)
pt3dadd(191.2, 246.78, -7.35, 2.23)
pt3dadd(191.34, 246.62, -7.35, 2.23)
pt3dadd(191.49, 246.28, -7.35, 2.23)
pt3dadd(191.63, 245.95, -7.35, 2.23)
pt3dadd(191.78, 245.62, -7.35, 2.23)
pt3dadd(191.93, 245.45, -7.35, 2.23)
pt3dadd(192.07, 245.29, -7.35, 2.23)
pt3dadd(192.22, 244.96, -7.35, 2.23)
pt3dadd(192.37, 244.79, -7.35, 2.23)
pt3dadd(192.66, 244.46, -7.35, 2.23)
pt3dadd(192.8, 244.29, -7.35, 2.23)
pt3dadd(192.95, 244.12, -7.35, 2.23)
pt3dadd(193.1, 243.96, -7.35, 2.23)
pt3dadd(193.39, 243.63, -7.35, 2.23)
pt3dadd(193.54, 243.29, -7.35, 2.23)
pt3dadd(194.85, 241.8, -7.35, 2.23)
pt3dadd(195, 241.63, -7.35, 2.23)
pt3dadd(195.15, 241.47, -7.35, 2.23)
pt3dadd(195.29, 241.3, -7.35, 2.23)
pt3dadd(195.44, 241.13, -7.35, 2.23)
pt3dadd(195.58, 240.97, -7.35, 2.23)
pt3dadd(195.73, 240.8, -7.35, 2.23)
pt3dadd(195.88, 240.63, -7.35, 2.23)
pt3dadd(196.02, 240.47, -7.35, 2.23)
pt3dadd(196.32, 240.47, -7.35, 2.23)
pt3dadd(196.46, 240.3, -7.35, 2.23)
pt3dadd(196.61, 240.14, -7.35, 2.23)
pt3dadd(196.76, 239.97, -7.35, 2.23)
pt3dadd(196.9, 239.8, -7.35, 2.23)
}
}
proc shape3d_158() {
dend[102] { pt3dadd(197.19, 239.8, -7.35, 2.23)
pt3dadd(197.34, 239.64, -7.35, 2.23)
pt3dadd(197.49, 239.47, -7.35, 2.23)
pt3dadd(197.63, 239.3, -7.35, 2.23)
pt3dadd(198.36, 239.3, -7.35, 2.23)
pt3dadd(198.51, 239.14, -7.35, 2.23)
pt3dadd(199.24, 239.14, -7.35, 2.23)
pt3dadd(199.39, 238.97, -7.35, 2.23)
pt3dadd(199.68, 238.97, -7.35, 2.23)
pt3dadd(199.83, 238.81, -7.35, 2.23)
pt3dadd(200.12, 238.64, -7.35, 2.23)
pt3dadd(200.41, 238.47, -7.35, 2.23)
pt3dadd(200.71, 238.31, -7.35, 2.23)
pt3dadd(201, 238.14, -7.35, 2.23)
pt3dadd(201.44, 238.14, -7.35, 2.23)
pt3dadd(201.73, 237.98, -7.35, 2.23)
pt3dadd(202.17, 237.98, -7.35, 1.4)
pt3dadd(202.46, 237.81, -7.35, 2.23)
pt3dadd(202.9, 237.64, -7.35, 2.23)
pt3dadd(203.19, 237.64, -7.35, 2.23)
pt3dadd(203.63, 237.48, -7.35, 2.23)
pt3dadd(207.73, 237.48, -7.35, 2.23)
pt3dadd(207.88, 237.31, -7.35, 2.23)
pt3dadd(208.17, 237.31, -7.35, 2.23)
pt3dadd(208.46, 237.14, -7.35, 2.23)
pt3dadd(208.75, 236.98, -7.35, 2.23)
pt3dadd(209.05, 236.81, -7.35, 2.23)
pt3dadd(209.49, 236.65, -7.35, 2.23)
pt3dadd(209.92, 236.15, -7.35, 2.23)
pt3dadd(210.07, 235.98, -7.35, 2.23)
pt3dadd(210.22, 235.81, -7.35, 2.23)
pt3dadd(210.36, 235.65, -7.35, 2.23)
pt3dadd(210.66, 235.48, -7.35, 2.23)
pt3dadd(210.8, 235.15, -7.35, 2.23)
pt3dadd(210.95, 234.82, -7.35, 2.23)
pt3dadd(211.09, 234.65, -7.35, 2.23)
pt3dadd(211.09, 234.49, -7.35, 2.23)
pt3dadd(211.24, 234.15, -8.4, 2.23)
pt3dadd(211.24, 233.82, -8.4, 2.23)
pt3dadd(211.39, 233.65, -8.4, 2.23)
pt3dadd(211.53, 233.32, -8.4, 2.23)
pt3dadd(211.83, 232.99, -8.4, 2.23)
pt3dadd(211.97, 232.82, -8.4, 2.23)
pt3dadd(212.12, 232.66, -8.4, 2.23)
pt3dadd(212.41, 232.32, -8.4, 2.23)
pt3dadd(212.56, 232.16, -8.4, 2.23)
pt3dadd(212.7, 231.99, -8.4, 2.23)
pt3dadd(212.85, 231.83, -8.4, 2.23)
pt3dadd(213.14, 231.49, -8.4, 2.23)
pt3dadd(213.44, 231, -8.4, 2.23)
pt3dadd(213.87, 230.5, -8.4, 2.23)
pt3dadd(214.17, 230.16, -8.4, 2.23)
pt3dadd(214.46, 229.83, -8.4, 2.23)
pt3dadd(214.75, 229.5, -8.4, 2.23)
pt3dadd(215.05, 229, -8.4, 2.23)
pt3dadd(215.34, 228.67, -8.4, 2.23)
pt3dadd(215.78, 228.34, -8.4, 2.23)
pt3dadd(216.07, 227.84, -8.4, 2.23)
pt3dadd(216.36, 227.51, -8.4, 2.23)
pt3dadd(216.8, 227.17, -8.4, 2.23)
pt3dadd(217.09, 226.67, -8.4, 2.23)
pt3dadd(217.83, 225.84, -8.4, 2.23)
pt3dadd(218.12, 225.51, -8.4, 2.23)
pt3dadd(218.41, 225.18, -8.4, 2.23)
pt3dadd(218.7, 224.85, -8.4, 2.23)
pt3dadd(219.14, 224.35, -8.4, 2.23)
pt3dadd(219.58, 224.02, -8.4, 2.23)
pt3dadd(220.02, 223.18, -8.4, 2.23)
pt3dadd(220.46, 222.85, -8.4, 2.23)
pt3dadd(220.75, 222.35, -8.4, 2.23)
pt3dadd(221.19, 222.02, -8.4, 2.23)
pt3dadd(221.48, 221.69, -8.4, 2.23)
pt3dadd(221.78, 221.36, -8.4, 2.23)
pt3dadd(222.07, 220.86, -8.4, 2.23)
pt3dadd(222.8, 220.03, -8.4, 2.23)
pt3dadd(223.09, 219.53, -8.4, 2.23)
pt3dadd(223.39, 219.2, -8.4, 2.23)
pt3dadd(223.82, 218.86, -8.4, 2.23)
pt3dadd(224.12, 218.36, -8.4, 2.23)
pt3dadd(224.41, 218.03, -8.4, 2.23)
pt3dadd(224.85, 217.53, -8.4, 2.23)
pt3dadd(225, 217.2, -8.4, 2.23)
pt3dadd(225.43, 216.7, -8.4, 2.23)
pt3dadd(225.87, 215.87, -8.4, 2.23)
pt3dadd(226.17, 215.54, -8.4, 2.23)
pt3dadd(226.6, 214.71, -8.4, 2.23)
pt3dadd(227.34, 213.88, -8.4, 2.23)
pt3dadd(227.48, 213.38, -8.4, 2.23)
pt3dadd(227.92, 212.71, -8.4, 2.23)
pt3dadd(228.21, 212.38, -8.4, 2.23)
pt3dadd(228.65, 211.72, -8.4, 2.23)
pt3dadd(228.8, 211.22, -8.4, 2.23)
pt3dadd(229.09, 210.72, -8.4, 2.23)
pt3dadd(229.24, 210.39, -8.4, 2.23)
pt3dadd(229.53, 210.06, -8.4, 2.23)
pt3dadd(229.82, 209.56, -8.4, 2.23)
pt3dadd(230.12, 209.06, -8.4, 2.23)
pt3dadd(229.09, 211.05, -11.55, 2.23)
pt3dadd(229.24, 210.89, -11.55, 2.23)
pt3dadd(229.39, 210.72, -11.55, 2.23)
pt3dadd(229.53, 210.39, -11.55, 2.23)
pt3dadd(229.68, 210.22, -11.55, 2.23)
pt3dadd(229.68, 209.89, -11.55, 2.23)
pt3dadd(229.82, 209.72, -11.55, 2.23)
pt3dadd(229.97, 209.56, -11.55, 2.23)
pt3dadd(230.12, 209.39, -11.55, 2.23)
pt3dadd(230.12, 209.06, -11.55, 2.23)
pt3dadd(230.26, 208.89, -11.55, 2.23)
pt3dadd(230.41, 208.73, -11.55, 2.23)
pt3dadd(230.41, 208.39, -11.55, 2.23)
pt3dadd(230.56, 208.23, -11.55, 2.23)
pt3dadd(230.7, 208.06, -11.55, 2.23)
pt3dadd(230.7, 207.73, -11.55, 2.23)
pt3dadd(230.85, 207.56, -11.55, 2.23)
pt3dadd(231.14, 207.56, -11.55, 2.23)
pt3dadd(231.29, 207.4, -11.55, 2.23)
pt3dadd(231.58, 207.06, -11.55, 2.23)
pt3dadd(231.73, 206.9, -11.55, 2.23)
pt3dadd(231.87, 206.73, -11.55, 2.23)
pt3dadd(232.17, 206.4, -11.55, 2.23)
pt3dadd(232.46, 206.4, -11.55, 2.23)
pt3dadd(232.6, 206.07, -11.55, 2.23)
pt3dadd(232.9, 206.07, -11.55, 2.23)
pt3dadd(233.04, 205.9, -11.55, 2.23)
pt3dadd(233.34, 205.9, -11.55, 2.23)
pt3dadd(233.48, 205.57, -11.55, 2.23)
pt3dadd(233.77, 205.57, -11.55, 2.23)
pt3dadd(233.92, 205.4, -11.55, 2.23)
pt3dadd(234.21, 205.4, -11.55, 2.23)
pt3dadd(234.36, 205.24, -11.55, 2.23)
pt3dadd(234.65, 205.07, -11.55, 2.23)
pt3dadd(234.95, 205.07, -11.55, 2.23)
pt3dadd(235.24, 204.9, -11.55, 2.23)
pt3dadd(236.12, 204.9, -11.55, 2.23)
pt3dadd(236.41, 204.74, -11.55, 2.23)
pt3dadd(236.55, 204.57, -11.55, 2.23)
pt3dadd(236.85, 204.4, -11.55, 2.23)
pt3dadd(237.14, 204.24, -11.55, 2.23)
pt3dadd(237.43, 204.24, -11.55, 2.23)
pt3dadd(237.58, 204.07, -11.55, 2.23)
pt3dadd(237.73, 203.91, -11.55, 2.23)
pt3dadd(238.02, 203.91, -11.55, 2.23)
pt3dadd(238.31, 203.74, -11.55, 2.23)
pt3dadd(238.6, 203.57, -11.55, 2.23)
pt3dadd(238.75, 203.41, -11.55, 2.23)
pt3dadd(239.19, 203.24, -11.55, 2.23)
pt3dadd(239.48, 203.07, -11.55, 2.23)
pt3dadd(239.92, 203.07, -11.55, 2.23)
pt3dadd(240.21, 202.91, -11.55, 2.23)
pt3dadd(240.36, 202.74, -11.55, 2.23)
pt3dadd(240.94, 202.74, -11.55, 2.23)
pt3dadd(241.38, 202.58, -11.55, 2.23)
pt3dadd(241.68, 202.41, -11.55, 2.23)
pt3dadd(241.97, 202.24, -11.55, 2.23)
pt3dadd(242.41, 202.08, -11.55, 2.23)
pt3dadd(242.85, 202.08, -11.55, 2.23)
pt3dadd(243.29, 201.91, -11.55, 2.23)
pt3dadd(243.58, 201.75, -11.55, 2.23)
pt3dadd(243.87, 201.75, -11.55, 2.23)
pt3dadd(244.31, 201.58, -11.55, 2.23)
pt3dadd(244.46, 201.25, -11.55, 2.23)
pt3dadd(244.9, 201.25, -11.55, 2.23)
pt3dadd(245.19, 201.08, -11.55, 2.23)
pt3dadd(245.48, 200.91, -11.55, 2.23)
pt3dadd(245.92, 200.91, -11.55, 2.23)
pt3dadd(246.36, 200.75, -11.55, 2.23)
pt3dadd(246.65, 200.58, -11.55, 2.23)
pt3dadd(247.09, 200.58, -11.55, 2.23)
pt3dadd(247.38, 200.42, -11.55, 2.23)
pt3dadd(247.82, 200.42, -11.55, 2.23)
pt3dadd(248.26, 200.25, -11.55, 2.23)
pt3dadd(248.55, 200.25, -11.55, 2.23)
pt3dadd(248.99, 200.08, -11.55, 2.23)
pt3dadd(249.43, 199.92, -11.55, 2.23)
pt3dadd(250.02, 199.92, -11.55, 2.23)
pt3dadd(250.31, 199.58, -11.55, 2.23)
pt3dadd(251.04, 199.58, -11.55, 2.23)
pt3dadd(251.48, 199.42, -11.55, 2.23)
pt3dadd(252.06, 199.42, -11.55, 2.23)
pt3dadd(252.36, 199.25, -11.55, 2.23)
pt3dadd(252.94, 199.25, -11.55, 2.23)
pt3dadd(253.09, 199.09, -11.55, 2.23)
pt3dadd(253.82, 199.09, -11.55, 2.23)
pt3dadd(253.97, 198.92, -11.55, 2.23)
pt3dadd(256.31, 198.92, -11.55, 2.23)
}
dend[103] {pt3dclear()
pt3dadd(199.05, 243.06, 10.3, 1.5)
pt3dadd(203.7, 228.57, 0, 1.5)
pt3dadd(200.75, 203.9, 0, 2.72)
pt3dadd(194.97, 187.5, 0, 2.72)
pt3dadd(181.38, 168.02, 0, 2.72)
pt3dadd(180.7, 155.48, 0, 2.72)
pt3dadd(183.42, 150.27, 0, 2.72)
pt3dadd(182.4, 143.13, 0, 2.72)
pt3dadd(176.97, 132.52, 0, 2.72)
pt3dadd(164.4, 121.53, 0, 2.72)
pt3dadd(151.49, 110.53, 0, 2.72)
pt3dadd(146.74, 107.64, 0, 2.72)
pt3dadd(144.36, 108.22, 0, 2.72)
pt3dadd(141.3, 109.57, 0, 2.72)
pt3dadd(137.57, 116.32, 0, 2.72)
}
}
proc shape3d_159() {
dend[103] { pt3dadd(131.79, 125, 0, 2.72)
pt3dadd(127.72, 132.91, 0, 2.72)
pt3dadd(125.68, 135.42, 0, 2.72)
pt3dadd(122.96, 134.07, 0, 2.72)
pt3dadd(119.9, 132.33, 0, 2.72)
pt3dadd(91.37, 113.62, 0, 2.38)
pt3dadd(68.61, 101.85, 0, 2.38)
pt3dadd(64.54, 97.8, 0, 2.38)
}
dend[104] {pt3dclear()
pt3dadd(285.33, 425.93, 14.3, 4.08)
pt3dadd(275.14, 435.96, -19.7, 4.08)
pt3dadd(266.26, 446.83, -19.7, 5.1)
pt3dadd(266.08, 447.23, -19.7, 5.1)
pt3dadd(265.55, 447.84, -19.7, 5.1)
pt3dadd(265.37, 448.04, -19.7, 5.1)
pt3dadd(265.19, 448.24, -19.7, 5.1)
pt3dadd(265.19, 448.65, -19.7, 5.1)
pt3dadd(265.01, 448.85, -19.7, 5.1)
pt3dadd(264.66, 449.05, -19.7, 5.1)
pt3dadd(264.95, 449.46, -19.7, 5.1)
}
dend[105] {pt3dclear()
pt3dadd(264.95, 449.46, -19.7, 5.1)
pt3dadd(264.48, 449.26, -19.7, 5.1)
pt3dadd(264.3, 449.46, -19.7, 5.1)
pt3dadd(264.12, 449.86, -19.7, 5.1)
pt3dadd(263.77, 450.07, -19.7, 5.1)
pt3dadd(263.59, 450.27, -19.7, 5.1)
pt3dadd(263.41, 450.68, -19.7, 5.1)
pt3dadd(263.23, 451.08, -19.7, 5.1)
pt3dadd(262.87, 451.28, -19.7, 5.1)
pt3dadd(262.7, 451.49, -19.7, 5.1)
pt3dadd(262.52, 451.69, -19.7, 5.1)
pt3dadd(262.34, 452.3, -19.7, 5.1)
pt3dadd(261.98, 452.5, -19.7, 5.1)
pt3dadd(261.8, 452.7, -19.7, 5.1)
pt3dadd(261.63, 453.11, -19.7, 5.1)
pt3dadd(261.27, 453.31, -19.7, 5.1)
pt3dadd(261.27, 453.71, -19.7, 5.1)
pt3dadd(260.91, 453.92, -19.7, 5.1)
pt3dadd(260.56, 454.32, -19.7, 5.1)
pt3dadd(260.38, 454.52, -19.7, 5.1)
pt3dadd(260.2, 454.73, -19.7, 5.1)
pt3dadd(260.02, 454.93, -19.7, 5.1)
pt3dadd(260.02, 455.33, -19.7, 5.1)
pt3dadd(259.84, 455.54, -19.7, 5.1)
pt3dadd(259.66, 455.74, -19.7, 5.1)
pt3dadd(259.49, 455.94, -19.7, 5.1)
pt3dadd(259.31, 456.35, -19.7, 5.1)
pt3dadd(258.95, 456.55, -19.7, 5.1)
pt3dadd(258.77, 456.95, -19.7, 5.1)
pt3dadd(258.59, 457.16, -19.7, 5.1)
pt3dadd(258.42, 457.56, -19.7, 5.1)
pt3dadd(258.06, 457.97, -19.7, 5.1)
pt3dadd(257.88, 458.37, -19.7, 5.1)
pt3dadd(257.52, 458.57, -19.7, 5.1)
pt3dadd(257.52, 458.98, -19.7, 5.1)
pt3dadd(257.35, 459.18, -19.7, 5.1)
pt3dadd(257.17, 459.38, -19.7, 5.1)
pt3dadd(256.99, 459.59, -19.7, 5.1)
pt3dadd(256.63, 459.99, -19.7, 5.1)
pt3dadd(256.99, 459.99, -19.7, 5.1)
}
dend[106] {pt3dclear()
pt3dadd(256.99, 459.99, -19.7, 5.1)
pt3dadd(258.42, 458.98, -23.9, 5.1)
pt3dadd(258.24, 459.38, -23.9, 5.1)
pt3dadd(258.06, 459.59, -23.9, 5.1)
pt3dadd(257.88, 459.99, -23.9, 5.1)
pt3dadd(257.7, 460.4, -23.9, 5.1)
pt3dadd(257.52, 460.6, -23.9, 5.1)
pt3dadd(257.35, 461.01, -23.9, 5.1)
pt3dadd(257.17, 461.41, -23.9, 5.1)
pt3dadd(256.99, 461.82, -23.9, 5.1)
pt3dadd(256.81, 462.22, -23.9, 5.1)
pt3dadd(256.45, 462.63, -23.9, 5.1)
pt3dadd(256.28, 463.23, -23.9, 5.1)
pt3dadd(256.1, 463.84, -23.9, 5.1)
pt3dadd(255.92, 464.04, -23.9, 5.1)
pt3dadd(255.74, 464.65, -23.9, 5.1)
pt3dadd(255.74, 465.26, -23.9, 5.1)
pt3dadd(255.56, 465.87, -23.9, 5.1)
pt3dadd(255.38, 466.27, -23.9, 5.1)
pt3dadd(255.38, 466.68, -23.9, 5.1)
pt3dadd(255.21, 467.08, -23.9, 5.1)
pt3dadd(255.03, 467.49, -23.9, 5.1)
pt3dadd(254.85, 468.09, -23.9, 5.1)
pt3dadd(254.67, 468.5, -23.9, 5.1)
pt3dadd(254.49, 468.9, -23.9, 5.1)
pt3dadd(254.49, 469.31, -23.9, 5.1)
pt3dadd(254.31, 469.51, -23.9, 5.1)
pt3dadd(254.14, 469.92, -23.9, 5.1)
pt3dadd(254.14, 470.32, -23.9, 5.1)
pt3dadd(253.96, 470.73, -23.9, 5.1)
pt3dadd(253.78, 471.13, -23.9, 5.1)
pt3dadd(253.78, 471.54, -23.9, 5.1)
pt3dadd(253.6, 471.94, -23.9, 5.1)
pt3dadd(253.42, 472.35, -23.9, 5.1)
pt3dadd(253.42, 472.75, -23.9, 5.1)
pt3dadd(253.24, 473.16, -23.9, 5.1)
pt3dadd(253.07, 473.56, -23.9, 5.1)
pt3dadd(252.89, 473.97, -23.9, 5.1)
pt3dadd(252.89, 474.37, -23.9, 5.1)
pt3dadd(252.71, 474.58, -23.9, 5.1)
pt3dadd(252.71, 475.18, -23.9, 5.1)
pt3dadd(252.53, 475.59, -23.9, 5.1)
pt3dadd(252.35, 475.99, -23.9, 5.1)
pt3dadd(252.17, 476.4, -23.9, 5.1)
pt3dadd(252, 476.8, -23.9, 5.1)
pt3dadd(252, 477.61, -23.9, 5.1)
pt3dadd(251.82, 477.82, -23.9, 5.1)
pt3dadd(251.82, 478.42, -23.9, 5.1)
pt3dadd(251.64, 478.63, -23.9, 5.1)
pt3dadd(251.46, 479.03, -23.9, 5.1)
pt3dadd(251.46, 479.64, -23.9, 5.1)
pt3dadd(251.28, 479.84, -23.9, 5.1)
pt3dadd(251.1, 480.04, -23.9, 5.1)
pt3dadd(251.1, 480.65, -23.9, 5.1)
pt3dadd(250.93, 481.06, -23.9, 5.1)
pt3dadd(250.75, 481.46, -23.9, 5.1)
pt3dadd(250.57, 481.87, -23.9, 5.1)
pt3dadd(250.57, 482.27, -23.9, 5.1)
pt3dadd(250.39, 482.68, -23.9, 5.1)
pt3dadd(250.21, 483.08, -23.9, 5.1)
}
dend[107] {pt3dclear()
pt3dadd(250.21, 483.08, -23.9, 3.74)
pt3dadd(249.68, 482.88, -26, 3.74)
pt3dadd(249.68, 483.29, -26, 3.74)
pt3dadd(249.5, 483.69, -26, 3.74)
pt3dadd(249.32, 483.89, -26, 3.74)
pt3dadd(249.32, 484.5, -26, 3.74)
pt3dadd(249.14, 484.91, -26, 3.74)
pt3dadd(248.96, 485.31, -26, 3.74)
pt3dadd(248.79, 485.51, -26, 3.74)
pt3dadd(248.79, 485.92, -26, 3.74)
pt3dadd(248.61, 486.12, -26, 3.74)
pt3dadd(248.43, 486.53, -26, 3.74)
pt3dadd(248.25, 486.93, -26, 3.74)
pt3dadd(248.07, 487.13, -26, 3.74)
pt3dadd(247.89, 487.54, -26, 3.74)
pt3dadd(247.72, 487.94, -26, 3.74)
pt3dadd(247.54, 488.35, -26, 3.74)
pt3dadd(247.36, 488.55, -26, 3.74)
pt3dadd(247.18, 488.96, -26, 3.74)
pt3dadd(247, 489.36, -26, 3.74)
pt3dadd(246.82, 489.77, -26, 3.74)
pt3dadd(246.29, 490.37, -26, 3.74)
pt3dadd(246.11, 490.58, -26, 3.74)
pt3dadd(245.75, 491.18, -26, 3.74)
pt3dadd(245.58, 491.59, -26, 3.74)
pt3dadd(245.22, 491.79, -26, 3.74)
pt3dadd(244.86, 492.2, -26, 3.74)
pt3dadd(244.86, 492.6, -26, 3.74)
pt3dadd(244.51, 492.8, -26, 3.74)
pt3dadd(244.33, 493.21, -26, 3.74)
pt3dadd(244.15, 493.41, -26, 3.74)
pt3dadd(243.79, 493.82, -26, 3.74)
pt3dadd(243.61, 494.02, -26, 3.74)
pt3dadd(243.26, 494.43, -26, 3.74)
pt3dadd(242.9, 494.63, -26, 3.74)
pt3dadd(242.9, 495.03, -26, 3.74)
pt3dadd(242.72, 495.24, -26, 3.74)
pt3dadd(242.54, 495.44, -26, 3.74)
}
dend[108] {pt3dclear()
pt3dadd(250.21, 483.08, -23.9, 4.42)
pt3dadd(250.93, 483.08, -28.1, 4.42)
pt3dadd(251.28, 483.49, -28.1, 4.42)
pt3dadd(251.46, 484.1, -28.1, 4.42)
pt3dadd(251.64, 484.3, -28.1, 4.42)
pt3dadd(252, 484.5, -28.1, 4.42)
pt3dadd(252.17, 484.91, -28.1, 4.42)
pt3dadd(252.53, 484.91, -28.1, 4.42)
pt3dadd(252.71, 485.31, -28.1, 4.42)
pt3dadd(252.89, 485.72, -28.1, 4.42)
pt3dadd(253.07, 485.92, -28.1, 4.42)
pt3dadd(253.24, 486.32, -28.1, 4.42)
pt3dadd(253.42, 486.73, -28.1, 4.42)
pt3dadd(253.78, 486.93, -28.1, 4.42)
pt3dadd(254.14, 487.34, -28.1, 4.42)
pt3dadd(254.31, 487.54, -28.1, 4.42)
pt3dadd(254.67, 487.74, -28.1, 4.42)
pt3dadd(254.85, 488.15, -28.1, 4.42)
pt3dadd(255.21, 488.35, -28.1, 4.42)
pt3dadd(255.38, 488.55, -28.1, 4.42)
pt3dadd(255.56, 488.75, -28.1, 4.42)
pt3dadd(255.74, 488.96, -28.1, 4.42)
pt3dadd(255.92, 489.36, -28.1, 4.42)
pt3dadd(256.1, 489.56, -28.1, 4.42)
pt3dadd(256.28, 489.77, -28.1, 4.42)
pt3dadd(256.45, 490.17, -28.1, 4.42)
pt3dadd(256.63, 490.58, -28.1, 4.42)
pt3dadd(256.81, 490.98, -28.1, 4.42)
pt3dadd(257.17, 491.39, -28.1, 4.42)
pt3dadd(257.35, 491.59, -28.1, 4.42)
pt3dadd(257.52, 491.79, -28.1, 4.42)
pt3dadd(257.7, 492.2, -28.1, 4.42)
pt3dadd(257.88, 492.4, -28.1, 4.42)
pt3dadd(258.42, 493.01, -28.1, 4.42)
pt3dadd(258.59, 493.21, -28.1, 4.42)
pt3dadd(258.77, 493.41, -28.1, 4.42)
pt3dadd(259.13, 493.61, -28.1, 4.42)
pt3dadd(259.31, 494.02, -28.1, 4.42)
pt3dadd(259.49, 494.22, -28.1, 4.42)
pt3dadd(259.66, 494.63, -28.1, 4.42)
pt3dadd(259.84, 495.03, -28.1, 4.42)
pt3dadd(260.02, 495.24, -28.1, 4.42)
pt3dadd(260.38, 495.64, -28.1, 4.42)
}
}
proc shape3d_160() {
dend[108] { pt3dadd(260.56, 495.84, -28.1, 4.42)
pt3dadd(260.91, 496.05, -28.1, 4.42)
pt3dadd(261.09, 496.45, -28.1, 4.42)
pt3dadd(261.63, 497.06, -28.1, 4.42)
pt3dadd(261.8, 497.26, -28.1, 4.42)
pt3dadd(261.98, 497.46, -28.1, 4.42)
pt3dadd(262.16, 497.87, -28.1, 4.42)
pt3dadd(262.52, 498.07, -28.1, 4.42)
pt3dadd(262.87, 498.27, -28.1, 4.42)
pt3dadd(263.05, 498.68, -28.1, 4.42)
pt3dadd(263.23, 499.08, -28.1, 4.42)
pt3dadd(263.41, 499.29, -28.1, 4.42)
pt3dadd(263.59, 499.49, -28.1, 4.42)
pt3dadd(263.77, 499.89, -28.1, 4.42)
pt3dadd(263.94, 500.1, -28.1, 4.42)
pt3dadd(264.12, 500.5, -28.1, 4.42)
pt3dadd(264.48, 500.91, -28.1, 4.42)
pt3dadd(264.66, 501.11, -28.1, 4.42)
pt3dadd(264.84, 501.31, -28.1, 4.42)
pt3dadd(265.01, 501.72, -28.1, 4.42)
pt3dadd(265.19, 501.92, -28.1, 4.42)
pt3dadd(265.37, 502.12, -28.1, 4.42)
pt3dadd(265.55, 502.32, -28.1, 4.42)
pt3dadd(265.73, 502.53, -28.1, 4.42)
pt3dadd(265.73, 502.73, -28.1, 4.42)
pt3dadd(265.55, 502.12, -30.2, 3.91)
pt3dadd(265.91, 502.32, -30.2, 3.91)
pt3dadd(265.91, 502.73, -30.2, 3.91)
pt3dadd(266.08, 503.13, -30.2, 3.91)
pt3dadd(266.26, 503.34, -30.2, 3.91)
pt3dadd(266.44, 503.74, -30.2, 3.91)
pt3dadd(266.62, 503.94, -30.2, 3.91)
pt3dadd(266.62, 504.35, -30.2, 3.91)
pt3dadd(266.8, 504.55, -30.2, 3.91)
pt3dadd(266.98, 504.96, -30.2, 3.91)
pt3dadd(267.15, 505.16, -30.2, 3.91)
pt3dadd(267.33, 505.57, -30.2, 3.91)
pt3dadd(267.51, 505.97, -30.2, 3.91)
pt3dadd(267.51, 506.38, -30.2, 3.91)
pt3dadd(267.69, 506.58, -30.2, 3.91)
pt3dadd(267.87, 506.98, -30.2, 3.91)
pt3dadd(268.05, 507.19, -30.2, 3.91)
pt3dadd(268.22, 507.39, -30.2, 3.91)
pt3dadd(268.4, 507.59, -30.2, 3.91)
pt3dadd(268.58, 507.79, -30.2, 3.91)
pt3dadd(268.76, 508, -30.2, 3.91)
pt3dadd(268.94, 508.2, -30.2, 3.91)
pt3dadd(275, 508.2, -30.2, 3.91)
pt3dadd(275.54, 508.4, -32.3, 3.74)
pt3dadd(275.71, 508.6, -32.3, 3.74)
pt3dadd(275.89, 509.01, -32.3, 3.74)
pt3dadd(276.07, 509.41, -32.3, 3.74)
pt3dadd(276.25, 509.62, -32.3, 3.74)
pt3dadd(276.43, 509.82, -32.3, 3.74)
pt3dadd(276.61, 510.02, -32.3, 3.74)
pt3dadd(276.78, 510.22, -32.3, 3.74)
pt3dadd(276.96, 510.63, -32.3, 3.74)
pt3dadd(277.14, 510.83, -32.3, 3.74)
pt3dadd(277.32, 511.03, -32.3, 3.74)
pt3dadd(277.5, 511.24, -32.3, 3.74)
pt3dadd(277.68, 511.64, -32.3, 3.74)
pt3dadd(277.85, 511.84, -32.3, 3.74)
pt3dadd(278.03, 512.25, -32.3, 3.74)
pt3dadd(278.21, 512.45, -32.3, 3.74)
pt3dadd(278.21, 512.86, -32.3, 3.74)
pt3dadd(278.39, 513.26, -32.3, 3.74)
pt3dadd(278.57, 513.46, -32.3, 3.74)
pt3dadd(278.74, 513.87, -32.3, 3.74)
pt3dadd(278.92, 514.27, -32.3, 3.74)
pt3dadd(279.1, 514.48, -32.3, 3.74)
pt3dadd(279.28, 514.68, -32.3, 3.74)
pt3dadd(279.46, 514.88, -32.3, 3.74)
pt3dadd(279.64, 515.08, -32.3, 3.74)
pt3dadd(279.82, 515.49, -32.3, 3.74)
pt3dadd(280.17, 515.69, -32.3, 3.74)
pt3dadd(280.35, 516.1, -32.3, 3.74)
pt3dadd(280.53, 516.3, -32.3, 3.74)
pt3dadd(280.88, 516.71, -32.3, 3.74)
pt3dadd(281.06, 516.91, -32.3, 3.74)
pt3dadd(281.42, 517.31, -32.3, 3.74)
pt3dadd(281.6, 517.52, -32.3, 3.74)
pt3dadd(282.13, 518.12, -32.3, 3.74)
pt3dadd(282.31, 518.33, -32.3, 3.74)
pt3dadd(282.67, 518.73, -32.3, 3.74)
pt3dadd(282.85, 518.93, -32.3, 3.74)
pt3dadd(283.02, 519.34, -32.3, 3.74)
pt3dadd(283.2, 519.54, -32.3, 3.74)
pt3dadd(283.38, 519.74, -32.3, 3.74)
pt3dadd(283.92, 520.15, -32.3, 3.74)
pt3dadd(284.27, 520.35, -32.3, 3.74)
pt3dadd(284.45, 520.76, -32.3, 3.74)
pt3dadd(284.63, 520.96, -32.3, 3.74)
pt3dadd(284.99, 521.16, -32.3, 3.74)
pt3dadd(285.7, 521.97, -32.3, 3.74)
pt3dadd(286.06, 522.17, -32.3, 3.74)
pt3dadd(286.59, 522.78, -32.3, 3.74)
pt3dadd(286.77, 522.98, -32.3, 3.74)
pt3dadd(287.13, 523.19, -32.3, 3.74)
pt3dadd(287.3, 523.39, -32.3, 3.74)
pt3dadd(287.66, 523.59, -32.3, 3.74)
pt3dadd(287.84, 523.79, -32.3, 3.74)
pt3dadd(288.02, 524, -32.3, 3.74)
pt3dadd(288.37, 524, -32.3, 3.74)
pt3dadd(288.55, 524.2, -32.3, 3.74)
pt3dadd(288.91, 524.4, -32.3, 3.74)
pt3dadd(289.27, 524.6, -32.3, 3.74)
pt3dadd(289.44, 524.81, -32.3, 3.74)
pt3dadd(289.8, 524.81, -32.3, 3.74)
pt3dadd(290.16, 525.01, -32.3, 3.74)
pt3dadd(290.51, 525.21, -32.3, 3.74)
pt3dadd(290.87, 525.21, -32.3, 3.74)
pt3dadd(291.05, 525.41, -32.3, 3.74)
pt3dadd(291.41, 525.62, -32.3, 3.74)
pt3dadd(290.51, 525.82, -36.5, 3.74)
pt3dadd(290.87, 526.02, -36.5, 3.74)
pt3dadd(291.23, 526.22, -36.5, 3.74)
pt3dadd(291.76, 526.63, -36.5, 3.74)
pt3dadd(292.12, 526.63, -36.5, 3.74)
pt3dadd(292.65, 527.04, -36.5, 3.74)
pt3dadd(293.01, 527.24, -36.5, 3.74)
pt3dadd(293.37, 527.44, -36.5, 3.74)
pt3dadd(293.72, 527.64, -36.5, 3.74)
pt3dadd(293.9, 527.85, -36.5, 3.74)
pt3dadd(294.44, 527.85, -36.5, 3.74)
pt3dadd(294.62, 528.05, -36.5, 3.74)
pt3dadd(294.79, 528.25, -36.5, 3.74)
pt3dadd(294.97, 528.45, -36.5, 3.74)
pt3dadd(295.33, 528.66, -36.5, 3.74)
pt3dadd(295.69, 528.66, -36.5, 3.74)
pt3dadd(296.04, 528.86, -36.5, 3.74)
pt3dadd(296.22, 529.06, -36.5, 3.74)
pt3dadd(296.4, 529.26, -36.5, 3.74)
pt3dadd(296.58, 529.47, -36.5, 3.74)
pt3dadd(296.93, 529.47, -36.5, 3.74)
pt3dadd(297.11, 529.67, -36.5, 3.74)
pt3dadd(297.29, 529.87, -36.5, 3.74)
pt3dadd(297.65, 530.07, -36.5, 3.74)
pt3dadd(297.83, 530.28, -36.5, 3.74)
pt3dadd(298.18, 530.48, -36.5, 3.74)
pt3dadd(298.72, 530.68, -36.5, 3.74)
pt3dadd(299.07, 530.68, -36.5, 3.74)
pt3dadd(299.25, 530.88, -36.5, 3.74)
pt3dadd(299.43, 531.09, -36.5, 3.74)
pt3dadd(299.79, 531.09, -36.5, 3.74)
pt3dadd(299.97, 531.29, -36.5, 3.74)
pt3dadd(300.32, 531.49, -36.5, 3.74)
pt3dadd(300.86, 531.49, -36.5, 3.74)
pt3dadd(301.21, 531.9, -36.5, 3.74)
pt3dadd(301.75, 531.9, -36.5, 3.74)
pt3dadd(302.11, 532.1, -36.5, 3.74)
pt3dadd(302.46, 532.1, -36.5, 3.74)
pt3dadd(302.64, 532.3, -36.5, 3.74)
pt3dadd(303.35, 532.3, -36.5, 3.74)
pt3dadd(303.71, 532.5, -36.5, 3.74)
pt3dadd(304.42, 532.5, -36.5, 3.74)
pt3dadd(304.78, 532.71, -36.5, 3.74)
pt3dadd(305.14, 532.71, -36.5, 3.74)
pt3dadd(305.49, 532.91, -36.5, 3.74)
pt3dadd(306.03, 532.91, -36.5, 3.74)
pt3dadd(306.39, 533.11, -36.5, 3.74)
pt3dadd(307.1, 533.11, -36.5, 3.74)
pt3dadd(307.63, 533.31, -36.5, 3.74)
pt3dadd(309.24, 533.31, -36.5, 3.74)
pt3dadd(308.88, 533.31, -40.7, 3.74)
pt3dadd(309.24, 533.31, -40.7, 3.74)
pt3dadd(309.42, 533.52, -40.7, 3.74)
pt3dadd(309.95, 533.52, -40.7, 3.74)
pt3dadd(310.31, 533.72, -40.7, 3.74)
pt3dadd(310.49, 533.92, -40.7, 3.74)
pt3dadd(310.84, 533.92, -40.7, 3.74)
pt3dadd(311.2, 534.12, -40.7, 3.74)
pt3dadd(311.38, 534.33, -40.7, 3.74)
pt3dadd(311.74, 534.53, -40.7, 3.74)
pt3dadd(311.91, 534.73, -40.7, 3.74)
pt3dadd(312.09, 534.93, -40.7, 3.74)
pt3dadd(312.27, 535.14, -40.7, 3.74)
pt3dadd(312.45, 535.34, -40.7, 3.74)
pt3dadd(312.63, 535.74, -40.7, 3.74)
pt3dadd(313.16, 536.35, -40.7, 3.74)
pt3dadd(313.34, 536.55, -40.7, 3.74)
pt3dadd(313.52, 536.76, -40.7, 3.74)
pt3dadd(313.7, 537.16, -40.7, 3.74)
pt3dadd(314.23, 537.77, -40.7, 3.74)
pt3dadd(314.41, 537.97, -40.7, 3.74)
pt3dadd(314.59, 538.18, -40.7, 3.74)
pt3dadd(314.77, 538.38, -40.7, 3.74)
pt3dadd(314.95, 538.78, -40.7, 3.74)
pt3dadd(315.12, 538.99, -40.7, 3.74)
pt3dadd(315.12, 539.39, -40.7, 3.74)
pt3dadd(315.3, 539.59, -40.7, 3.74)
pt3dadd(315.66, 540, -40.7, 3.74)
pt3dadd(315.84, 540.2, -40.7, 3.74)
pt3dadd(316.19, 540.61, -40.7, 3.74)
pt3dadd(316.37, 540.81, -40.7, 3.74)
pt3dadd(316.73, 541.01, -40.7, 3.74)
pt3dadd(317.09, 541.42, -40.7, 3.74)
pt3dadd(317.44, 541.62, -40.7, 3.74)
pt3dadd(317.8, 541.82, -40.7, 3.74)
pt3dadd(317.98, 542.23, -40.7, 3.74)
pt3dadd(318.33, 542.43, -40.7, 3.74)
}
}
proc shape3d_161() {
dend[108] { pt3dadd(318.51, 542.63, -40.7, 3.74)
pt3dadd(318.69, 543.04, -40.7, 3.74)
pt3dadd(318.87, 543.24, -40.7, 3.74)
pt3dadd(318.87, 543.64, -40.7, 3.74)
pt3dadd(319.23, 543.85, -40.7, 3.74)
pt3dadd(319.4, 544.05, -40.7, 3.74)
pt3dadd(319.58, 544.25, -40.7, 3.74)
pt3dadd(319.76, 544.66, -40.7, 3.74)
pt3dadd(319.94, 544.86, -40.7, 3.74)
pt3dadd(320.3, 545.26, -40.7, 3.74)
pt3dadd(320.47, 545.47, -40.7, 3.74)
pt3dadd(320.83, 545.87, -40.7, 3.74)
pt3dadd(321.01, 546.07, -40.7, 3.74)
pt3dadd(321.19, 546.48, -40.7, 3.74)
pt3dadd(321.37, 546.68, -40.7, 3.74)
pt3dadd(321.54, 546.88, -40.7, 3.74)
pt3dadd(321.72, 547.29, -40.7, 3.74)
pt3dadd(322.26, 547.9, -40.7, 3.74)
pt3dadd(322.44, 548.1, -40.7, 3.74)
pt3dadd(322.61, 548.3, -40.7, 3.74)
pt3dadd(322.79, 548.71, -40.7, 3.74)
pt3dadd(323.15, 549.11, -40.7, 3.74)
pt3dadd(323.33, 549.32, -40.7, 3.74)
pt3dadd(323.51, 549.52, -40.7, 3.74)
pt3dadd(323.68, 549.92, -40.7, 3.74)
pt3dadd(324.04, 550.13, -40.7, 3.74)
pt3dadd(324.22, 550.53, -40.7, 3.74)
pt3dadd(324.75, 551.14, -40.7, 3.74)
pt3dadd(324.93, 551.34, -40.7, 3.74)
pt3dadd(325.29, 551.75, -40.7, 3.74)
pt3dadd(325.47, 551.95, -40.7, 3.74)
pt3dadd(325.82, 552.15, -40.7, 3.74)
pt3dadd(326, 552.35, -40.7, 3.74)
pt3dadd(326.18, 552.56, -40.7, 3.74)
pt3dadd(326.36, 552.76, -40.7, 3.74)
pt3dadd(326.54, 552.96, -40.7, 3.74)
pt3dadd(326.72, 553.16, -40.7, 3.74)
pt3dadd(326.89, 553.37, -40.7, 3.74)
pt3dadd(327.07, 553.57, -40.7, 3.74)
pt3dadd(327.25, 553.77, -40.7, 3.74)
pt3dadd(327.43, 553.97, -40.7, 3.74)
pt3dadd(327.61, 554.38, -40.7, 3.74)
pt3dadd(327.79, 554.78, -40.7, 3.74)
pt3dadd(327.96, 554.99, -40.7, 3.74)
pt3dadd(328.14, 555.19, -40.7, 3.74)
pt3dadd(328.5, 555.59, -40.7, 3.74)
pt3dadd(328.68, 555.8, -40.7, 3.74)
pt3dadd(328.86, 556.2, -40.7, 3.74)
pt3dadd(329.21, 556.61, -40.7, 3.74)
pt3dadd(329.39, 556.81, -40.7, 3.74)
pt3dadd(329.75, 557.01, -40.7, 3.74)
pt3dadd(329.75, 557.42, -40.7, 3.74)
pt3dadd(329.93, 557.62, -40.7, 3.74)
pt3dadd(330.28, 558.02, -40.7, 3.74)
pt3dadd(330.46, 558.23, -40.7, 3.74)
pt3dadd(330.64, 558.43, -40.7, 3.74)
pt3dadd(330.64, 558.83, -40.7, 3.74)
pt3dadd(330.82, 559.24, -40.7, 3.74)
pt3dadd(331, 559.44, -40.7, 3.74)
pt3dadd(331, 560.25, -40.7, 3.74)
pt3dadd(331.17, 560.66, -40.7, 3.74)
pt3dadd(331.35, 561.06, -40.7, 3.74)
pt3dadd(331.53, 561.47, -40.7, 3.74)
pt3dadd(331.71, 561.67, -40.7, 3.74)
pt3dadd(331.89, 562.08, -40.7, 3.74)
pt3dadd(332.07, 562.28, -40.7, 3.74)
pt3dadd(332.24, 562.48, -40.7, 3.74)
pt3dadd(332.42, 562.89, -40.7, 3.74)
pt3dadd(332.6, 563.09, -40.7, 3.74)
pt3dadd(332.78, 563.49, -40.7, 3.74)
pt3dadd(332.96, 563.9, -40.7, 3.74)
pt3dadd(333.14, 564.1, -40.7, 3.74)
pt3dadd(333.31, 564.51, -40.7, 3.74)
pt3dadd(333.49, 564.91, -40.7, 3.74)
pt3dadd(333.67, 565.11, -40.7, 3.74)
pt3dadd(333.85, 565.32, -40.7, 3.74)
pt3dadd(333.85, 565.72, -40.7, 3.74)
pt3dadd(334.03, 566.13, -40.7, 3.74)
pt3dadd(334.21, 566.53, -40.7, 3.74)
pt3dadd(334.38, 566.73, -40.7, 3.74)
pt3dadd(334.38, 567.14, -40.7, 3.74)
pt3dadd(334.56, 567.34, -40.7, 3.74)
pt3dadd(334.74, 567.54, -40.7, 3.74)
pt3dadd(334.74, 569.57, -40.7, 3.74)
pt3dadd(334.56, 569.16, -43.85, 3.23)
pt3dadd(334.56, 569.77, -43.85, 3.23)
pt3dadd(334.74, 569.97, -43.85, 3.23)
pt3dadd(335.28, 570.58, -43.85, 3.23)
pt3dadd(335.45, 570.79, -43.85, 3.23)
pt3dadd(335.81, 571.19, -43.85, 3.23)
pt3dadd(335.45, 570.38, -43.85, 3.57)
pt3dadd(335.63, 570.79, -43.85, 3.57)
pt3dadd(335.81, 571.19, -43.85, 3.57)
pt3dadd(335.81, 571.8, -43.85, 3.57)
pt3dadd(335.99, 572, -43.85, 3.57)
pt3dadd(335.99, 572.81, -43.85, 3.57)
pt3dadd(336.17, 573.01, -43.85, 3.57)
pt3dadd(336.35, 573.22, -43.85, 3.57)
pt3dadd(336.52, 573.42, -43.85, 3.57)
pt3dadd(336.52, 574.03, -43.85, 3.57)
pt3dadd(336.7, 574.43, -43.85, 3.57)
pt3dadd(336.88, 574.63, -43.85, 3.57)
pt3dadd(337.06, 575.04, -43.85, 3.57)
pt3dadd(337.24, 575.24, -43.85, 3.57)
pt3dadd(337.42, 575.65, -43.85, 3.57)
pt3dadd(337.59, 576.05, -43.85, 3.57)
pt3dadd(337.77, 576.46, -43.85, 3.57)
pt3dadd(337.95, 576.66, -43.85, 3.57)
pt3dadd(338.13, 577.06, -43.85, 3.57)
pt3dadd(338.49, 577.27, -43.85, 3.57)
pt3dadd(338.66, 577.47, -43.85, 3.57)
pt3dadd(338.84, 577.67, -43.85, 3.57)
pt3dadd(339.02, 578.08, -43.85, 3.57)
pt3dadd(339.2, 578.28, -43.85, 3.57)
pt3dadd(339.56, 578.68, -43.85, 3.57)
pt3dadd(339.73, 578.89, -43.85, 3.57)
pt3dadd(339.91, 579.09, -43.85, 3.57)
pt3dadd(339.91, 579.49, -43.85, 3.57)
pt3dadd(340.09, 579.7, -43.85, 3.57)
pt3dadd(340.8, 580.51, -43.85, 3.57)
pt3dadd(341.16, 580.71, -43.85, 3.57)
pt3dadd(341.52, 581.32, -43.85, 3.57)
pt3dadd(341.87, 581.52, -43.85, 3.57)
pt3dadd(342.23, 581.93, -43.85, 3.57)
pt3dadd(342.59, 582.13, -43.85, 3.57)
pt3dadd(342.77, 582.33, -43.85, 3.57)
pt3dadd(342.94, 582.53, -43.85, 3.57)
pt3dadd(343.48, 583.14, -43.85, 3.57)
pt3dadd(343.84, 583.34, -43.85, 3.57)
pt3dadd(344.01, 583.55, -43.85, 3.57)
pt3dadd(344.19, 583.75, -43.85, 3.57)
pt3dadd(344.37, 584.15, -43.85, 3.57)
pt3dadd(344.55, 584.56, -43.85, 3.57)
pt3dadd(344.73, 584.76, -43.85, 3.57)
pt3dadd(344.91, 585.17, -43.85, 3.57)
pt3dadd(345.08, 585.57, -43.85, 3.57)
pt3dadd(345.26, 585.98, -43.85, 3.57)
pt3dadd(345.44, 586.18, -43.85, 3.57)
pt3dadd(345.62, 586.58, -43.85, 3.57)
pt3dadd(345.8, 586.79, -43.85, 3.57)
pt3dadd(345.98, 586.99, -43.85, 3.57)
pt3dadd(345.98, 587.39, -43.85, 3.57)
pt3dadd(346.15, 587.8, -43.85, 3.57)
pt3dadd(346.33, 588, -43.85, 3.57)
pt3dadd(346.51, 588.2, -43.85, 3.57)
pt3dadd(346.69, 588.61, -43.85, 3.57)
pt3dadd(346.87, 589.01, -43.85, 3.57)
pt3dadd(347.22, 589.42, -43.85, 3.57)
pt3dadd(347.22, 590.23, -43.85, 3.57)
pt3dadd(347.4, 590.43, -43.85, 3.57)
pt3dadd(347.58, 590.63, -43.85, 3.57)
pt3dadd(347.58, 591.24, -43.85, 3.57)
pt3dadd(347.76, 591.44, -43.85, 3.57)
pt3dadd(347.94, 591.85, -43.85, 3.57)
pt3dadd(348.11, 592.26, -43.85, 3.57)
pt3dadd(348.29, 592.66, -43.85, 3.57)
pt3dadd(348.47, 592.86, -43.85, 3.57)
pt3dadd(348.65, 593.07, -43.85, 3.57)
pt3dadd(348.29, 592.46, -48.05, 3.57)
pt3dadd(348.29, 593.27, -48.05, 3.57)
pt3dadd(348.47, 593.47, -48.05, 3.57)
pt3dadd(348.65, 593.67, -48.05, 3.57)
pt3dadd(348.83, 594.08, -48.05, 3.57)
pt3dadd(349.01, 594.28, -48.05, 3.57)
pt3dadd(349.18, 594.89, -48.05, 3.57)
pt3dadd(349.54, 595.29, -48.05, 3.57)
pt3dadd(349.72, 595.7, -48.05, 3.57)
pt3dadd(349.9, 596.1, -48.05, 3.57)
pt3dadd(350.08, 596.31, -48.05, 3.57)
pt3dadd(350.25, 596.71, -48.05, 3.57)
pt3dadd(350.43, 596.91, -48.05, 3.57)
pt3dadd(350.43, 597.32, -48.05, 3.57)
pt3dadd(350.61, 597.52, -48.05, 3.57)
pt3dadd(350.79, 597.72, -48.05, 3.57)
pt3dadd(350.79, 598.13, -48.05, 3.57)
pt3dadd(351.15, 598.74, -48.05, 3.57)
pt3dadd(351.32, 599.14, -48.05, 3.57)
pt3dadd(351.5, 599.34, -48.05, 3.57)
pt3dadd(351.68, 599.75, -48.05, 3.57)
pt3dadd(352.04, 599.95, -48.05, 3.57)
pt3dadd(352.22, 600.15, -48.05, 3.57)
pt3dadd(352.57, 600.56, -48.05, 3.57)
pt3dadd(352.93, 600.76, -48.05, 3.57)
pt3dadd(353.64, 601.57, -48.05, 3.57)
pt3dadd(354, 601.77, -48.05, 3.57)
pt3dadd(354.18, 601.98, -48.05, 3.57)
pt3dadd(354.53, 602.38, -48.05, 3.57)
pt3dadd(354.89, 602.58, -48.05, 3.57)
pt3dadd(355.78, 603.6, -48.05, 3.57)
pt3dadd(355.96, 603.8, -48.05, 3.57)
pt3dadd(356.5, 604, -48.05, 3.57)
pt3dadd(356.85, 604.21, -48.05, 3.57)
pt3dadd(357.03, 604.61, -48.05, 3.57)
pt3dadd(357.39, 604.81, -48.05, 3.57)
pt3dadd(357.74, 605.22, -48.05, 3.57)
pt3dadd(357.92, 605.42, -48.05, 3.57)
pt3dadd(358.64, 606.23, -48.05, 3.57)
pt3dadd(358.99, 606.43, -48.05, 3.57)
pt3dadd(359.17, 606.64, -48.05, 3.57)
pt3dadd(359.53, 606.84, -48.05, 3.57)
}
}
proc shape3d_162() {
dend[108] { pt3dadd(359.71, 607.24, -48.05, 3.57)
pt3dadd(360.06, 607.24, -48.05, 3.57)
pt3dadd(360.42, 607.65, -48.05, 3.57)
pt3dadd(360.78, 607.65, -48.05, 3.57)
pt3dadd(361.31, 608.26, -48.05, 3.57)
pt3dadd(361.49, 608.46, -48.05, 3.57)
pt3dadd(361.85, 608.66, -48.05, 3.57)
pt3dadd(362.2, 608.86, -48.05, 3.57)
pt3dadd(362.56, 609.07, -48.05, 3.57)
pt3dadd(362.92, 609.27, -48.05, 3.57)
pt3dadd(363.27, 609.47, -48.05, 3.57)
pt3dadd(363.45, 609.67, -48.05, 3.57)
pt3dadd(363.81, 609.88, -48.05, 3.57)
pt3dadd(364.16, 610.08, -48.05, 3.57)
pt3dadd(364.52, 610.28, -48.05, 3.57)
pt3dadd(364.88, 610.48, -48.05, 3.57)
pt3dadd(365.06, 610.69, -48.05, 3.57)
pt3dadd(365.41, 610.69, -48.05, 3.57)
pt3dadd(365.59, 610.89, -48.05, 3.57)
pt3dadd(365.95, 611.09, -48.05, 3.57)
pt3dadd(366.3, 611.5, -48.05, 3.57)
pt3dadd(366.48, 611.5, -48.05, 3.57)
pt3dadd(366.3, 610.48, -50.15, 3.57)
pt3dadd(366.3, 611.09, -50.15, 3.57)
pt3dadd(366.48, 611.29, -50.15, 3.57)
pt3dadd(366.66, 611.5, -50.15, 3.57)
pt3dadd(366.84, 611.9, -50.15, 3.57)
pt3dadd(367.02, 612.31, -50.15, 3.57)
pt3dadd(367.2, 612.51, -50.15, 3.57)
pt3dadd(367.55, 612.91, -50.15, 3.57)
pt3dadd(367.73, 613.32, -50.15, 3.57)
pt3dadd(368.44, 614.13, -50.15, 3.57)
pt3dadd(368.62, 614.33, -50.15, 3.57)
pt3dadd(369.16, 614.74, -50.15, 3.57)
pt3dadd(369.51, 614.94, -50.15, 3.57)
pt3dadd(369.87, 615.14, -50.15, 3.57)
pt3dadd(370.23, 615.55, -50.15, 3.57)
pt3dadd(370.58, 615.75, -50.15, 3.57)
pt3dadd(370.76, 615.95, -50.15, 3.57)
pt3dadd(371.12, 616.36, -50.15, 3.57)
pt3dadd(371.48, 616.36, -50.15, 3.57)
pt3dadd(372.01, 616.97, -50.15, 3.57)
pt3dadd(372.55, 617.17, -50.15, 3.57)
pt3dadd(372.72, 617.37, -50.15, 3.57)
pt3dadd(373.08, 617.57, -50.15, 3.57)
pt3dadd(373.62, 617.78, -50.15, 3.57)
pt3dadd(373.97, 618.18, -50.15, 3.57)
pt3dadd(374.33, 618.38, -50.15, 3.57)
pt3dadd(374.69, 618.59, -50.15, 3.57)
pt3dadd(375.04, 618.79, -50.15, 3.57)
pt3dadd(375.4, 619.19, -50.15, 3.57)
pt3dadd(375.76, 619.4, -50.15, 3.57)
pt3dadd(375.93, 619.6, -50.15, 3.57)
pt3dadd(376.11, 619.8, -50.15, 3.57)
pt3dadd(376.47, 620, -50.15, 3.57)
pt3dadd(376.83, 620.41, -50.15, 3.57)
pt3dadd(377.18, 620.61, -50.15, 3.57)
pt3dadd(377.36, 620.81, -50.15, 3.57)
pt3dadd(377.9, 621.22, -50.15, 3.57)
pt3dadd(378.07, 621.42, -50.15, 3.57)
pt3dadd(378.43, 621.62, -50.15, 3.57)
pt3dadd(378.61, 621.83, -50.15, 3.57)
pt3dadd(379.14, 622.43, -50.15, 3.57)
pt3dadd(379.5, 622.64, -50.15, 3.57)
pt3dadd(380.04, 623.24, -50.15, 3.57)
pt3dadd(380.39, 623.45, -50.15, 3.57)
pt3dadd(380.75, 623.65, -50.15, 3.57)
pt3dadd(380.93, 624.05, -50.15, 3.57)
pt3dadd(381.11, 624.26, -50.15, 3.57)
pt3dadd(381.28, 624.46, -50.15, 3.57)
pt3dadd(381.64, 624.66, -50.15, 3.57)
pt3dadd(381.82, 624.86, -50.15, 3.57)
pt3dadd(382.18, 625.07, -50.15, 3.57)
pt3dadd(382.35, 625.27, -50.15, 3.57)
pt3dadd(382.53, 625.68, -50.15, 3.57)
pt3dadd(382.89, 625.68, -50.15, 3.57)
pt3dadd(382.89, 625.88, -50.15, 3.57)
pt3dadd(382.89, 625.68, -51.2, 3.57)
pt3dadd(383.07, 625.88, -51.2, 3.57)
pt3dadd(383.25, 626.08, -51.2, 3.57)
pt3dadd(383.6, 626.28, -51.2, 3.57)
pt3dadd(384.14, 626.28, -51.2, 3.57)
pt3dadd(384.32, 626.49, -51.2, 3.57)
pt3dadd(385.03, 626.49, -51.2, 3.57)
pt3dadd(385.21, 626.69, -51.2, 3.57)
}
dend[109] {pt3dclear()
pt3dadd(250.21, 483.08, -23.9, 4.72)
pt3dadd(202, 575.32, 0, 4.72)
pt3dadd(120.76, 769.94, 0, 4.72)
pt3dadd(63.11, 951.76, 0, 4.72)
pt3dadd(39.18, 982.15, 0, 4.72)
pt3dadd(11.2, 1021.07, 0, 4.72)
pt3dadd(4.79, 1038.67, 0, 4.72)
pt3dadd(15.24, 1075.46, 0, 4.72)
pt3dadd(29.74, 1118.64, 0, 4.72)
}
dend[110] {pt3dclear()
pt3dadd(264.95, 449.46, -19.7, 1.36)
pt3dadd(256.11, 448.69, 42.9, 1.36)
pt3dadd(238.09, 459.59, 42.9, 5.1)
pt3dadd(237.73, 459.99, 42.9, 5.1)
pt3dadd(237.37, 460.4, 42.9, 5.1)
pt3dadd(236.66, 460.8, 42.9, 5.1)
pt3dadd(236.3, 461.61, 42.9, 5.1)
pt3dadd(235.95, 462.02, 42.9, 5.1)
pt3dadd(235.59, 462.42, 42.9, 5.1)
pt3dadd(235.23, 462.83, 42.9, 5.1)
pt3dadd(234.88, 463.23, 42.9, 5.1)
pt3dadd(234.16, 463.64, 42.9, 5.1)
pt3dadd(233.81, 464.04, 42.9, 5.1)
pt3dadd(233.45, 464.45, 42.9, 5.1)
pt3dadd(233.09, 464.85, 42.9, 5.1)
pt3dadd(232.74, 465.26, 42.9, 5.1)
pt3dadd(232.02, 465.66, 42.9, 5.1)
pt3dadd(231.67, 466.07, 42.9, 5.1)
pt3dadd(231.31, 466.47, 42.9, 5.1)
pt3dadd(230.95, 466.88, 42.9, 5.1)
pt3dadd(230.6, 467.28, 42.9, 5.1)
pt3dadd(230.24, 467.69, 42.9, 5.1)
pt3dadd(229.53, 467.69, 42.9, 5.1)
pt3dadd(229.17, 468.09, 42.9, 5.1)
pt3dadd(228.81, 468.5, 42.9, 5.1)
pt3dadd(228.1, 468.9, 42.9, 5.1)
pt3dadd(227.74, 469.31, 42.9, 5.1)
pt3dadd(227.03, 469.31, 42.9, 5.1)
pt3dadd(226.67, 469.71, 42.9, 5.1)
pt3dadd(225.96, 469.71, 42.9, 5.1)
pt3dadd(225.6, 470.12, 42.9, 5.1)
pt3dadd(224.53, 470.12, 42.9, 5.1)
pt3dadd(224.18, 470.52, 42.9, 5.1)
pt3dadd(223.11, 470.52, 42.9, 5.1)
pt3dadd(222.39, 470.93, 42.9, 5.1)
pt3dadd(220.97, 470.93, 42.9, 5.1)
pt3dadd(222.04, 471.33, 47.1, 4.76)
pt3dadd(220.97, 471.33, 47.1, 4.76)
pt3dadd(220.61, 472.14, 47.1, 4.76)
pt3dadd(220.25, 472.55, 47.1, 4.76)
pt3dadd(219.54, 472.55, 47.1, 4.76)
pt3dadd(219.18, 472.96, 47.1, 4.76)
pt3dadd(218.83, 473.36, 47.1, 4.76)
pt3dadd(218.47, 473.77, 47.1, 4.76)
pt3dadd(218.11, 474.58, 47.1, 4.76)
pt3dadd(217.76, 474.98, 47.1, 4.76)
pt3dadd(217.4, 475.39, 47.1, 4.76)
pt3dadd(217.04, 475.79, 47.1, 4.76)
pt3dadd(216.69, 476.2, 47.1, 4.76)
pt3dadd(216.69, 477.01, 47.1, 4.76)
pt3dadd(216.33, 477.41, 47.1, 4.76)
pt3dadd(215.97, 477.82, 47.1, 4.76)
pt3dadd(215.62, 478.22, 47.1, 4.76)
pt3dadd(214.9, 479.03, 47.1, 4.76)
pt3dadd(214.55, 479.44, 47.1, 4.76)
pt3dadd(214.19, 479.84, 47.1, 4.76)
pt3dadd(212.76, 481.46, 47.1, 4.76)
pt3dadd(212.05, 482.68, 47.1, 4.76)
pt3dadd(211.69, 483.08, 47.1, 4.76)
pt3dadd(211.34, 483.49, 47.1, 4.76)
pt3dadd(210.98, 483.89, 47.1, 4.76)
pt3dadd(210.62, 484.7, 47.1, 4.76)
pt3dadd(210.27, 485.51, 47.1, 4.76)
pt3dadd(209.55, 485.92, 47.1, 4.76)
pt3dadd(209.55, 486.73, 47.1, 4.76)
pt3dadd(208.84, 487.13, 47.1, 4.76)
pt3dadd(208.84, 487.94, 47.1, 4.76)
pt3dadd(208.13, 488.35, 47.1, 4.76)
pt3dadd(207.77, 488.75, 47.1, 4.76)
pt3dadd(207.41, 489.16, 47.1, 4.76)
pt3dadd(207.06, 489.97, 47.1, 4.76)
pt3dadd(206.7, 490.37, 47.1, 4.76)
pt3dadd(205.99, 491.18, 47.1, 4.76)
pt3dadd(205.63, 491.59, 47.1, 4.76)
pt3dadd(205.27, 492.4, 47.1, 4.76)
pt3dadd(204.56, 492.8, 47.1, 4.76)
pt3dadd(204.2, 493.21, 47.1, 4.76)
pt3dadd(203.85, 493.61, 47.1, 4.76)
pt3dadd(203.49, 494.02, 47.1, 4.76)
pt3dadd(203.13, 494.43, 47.1, 4.76)
pt3dadd(202.78, 494.83, 47.1, 4.76)
pt3dadd(202.42, 495.64, 47.1, 4.76)
pt3dadd(202.06, 496.05, 47.1, 4.76)
pt3dadd(201.71, 496.45, 47.1, 4.76)
pt3dadd(201.35, 496.86, 47.1, 4.76)
pt3dadd(200.99, 497.26, 47.1, 4.76)
pt3dadd(200.64, 498.07, 47.1, 4.76)
pt3dadd(199.92, 498.48, 47.1, 4.76)
pt3dadd(199.57, 498.88, 47.1, 4.76)
pt3dadd(199.21, 499.29, 47.1, 4.76)
pt3dadd(198.85, 499.69, 47.1, 4.76)
pt3dadd(198.5, 500.1, 47.1, 4.76)
pt3dadd(198.5, 500.5, 47.1, 4.76)
pt3dadd(200.28, 498.88, 49.2, 4.08)
pt3dadd(199.92, 499.69, 49.2, 4.08)
pt3dadd(199.57, 500.5, 49.2, 4.08)
pt3dadd(199.21, 501.31, 49.2, 4.08)
pt3dadd(198.85, 502.12, 49.2, 4.08)
pt3dadd(198.5, 502.93, 49.2, 4.08)
pt3dadd(198.14, 503.34, 49.2, 4.08)
pt3dadd(198.14, 504.15, 49.2, 4.08)
pt3dadd(197.78, 504.55, 49.2, 4.08)
pt3dadd(197.43, 505.36, 49.2, 4.08)
pt3dadd(197.07, 505.77, 49.2, 4.08)
pt3dadd(196.71, 506.17, 49.2, 4.08)
pt3dadd(196.71, 506.98, 49.2, 4.08)
}
}
proc shape3d_163() {
dend[110] { pt3dadd(196.36, 507.39, 49.2, 4.08)
pt3dadd(196, 507.79, 49.2, 4.08)
pt3dadd(195.64, 508.6, 49.2, 4.08)
pt3dadd(195.29, 509.01, 49.2, 4.08)
pt3dadd(194.93, 509.41, 49.2, 4.08)
pt3dadd(194.57, 509.82, 49.2, 4.08)
pt3dadd(193.86, 510.22, 49.2, 4.08)
pt3dadd(193.15, 511.03, 49.2, 4.08)
pt3dadd(192.79, 511.44, 49.2, 4.08)
pt3dadd(191.72, 512.65, 49.2, 4.08)
pt3dadd(191.36, 513.06, 49.2, 4.08)
pt3dadd(190.29, 513.06, 49.2, 4.08)
pt3dadd(189.94, 513.46, 49.2, 4.08)
pt3dadd(189.22, 513.46, 49.2, 4.08)
pt3dadd(188.87, 513.87, 49.2, 4.08)
pt3dadd(178.52, 513.87, 49.2, 4.08)
pt3dadd(178.17, 514.27, 49.2, 4.08)
pt3dadd(177.81, 514.68, 49.2, 4.08)
pt3dadd(177.45, 515.49, 49.2, 4.08)
pt3dadd(177.1, 515.89, 49.2, 4.08)
pt3dadd(176.74, 516.3, 49.2, 4.08)
pt3dadd(176.38, 516.71, 49.2, 4.08)
pt3dadd(176.03, 517.11, 49.2, 4.08)
pt3dadd(175.67, 517.52, 49.2, 4.08)
pt3dadd(175.67, 518.33, 49.2, 4.08)
pt3dadd(175.31, 518.73, 49.2, 4.08)
pt3dadd(174.96, 519.14, 49.2, 4.08)
pt3dadd(174.6, 519.54, 49.2, 4.08)
pt3dadd(174.24, 519.95, 49.2, 4.08)
pt3dadd(174.24, 520.76, 49.2, 4.08)
pt3dadd(173.53, 521.16, 49.2, 4.08)
pt3dadd(173.17, 521.57, 49.2, 4.08)
pt3dadd(172.82, 521.97, 49.2, 4.08)
pt3dadd(172.1, 522.38, 49.2, 4.08)
pt3dadd(171.75, 522.78, 49.2, 4.08)
pt3dadd(171.75, 523.59, 49.2, 4.08)
pt3dadd(171.03, 524, 49.2, 4.08)
pt3dadd(170.68, 524.4, 49.2, 4.08)
pt3dadd(170.32, 524.81, 49.2, 4.08)
pt3dadd(169.96, 525.21, 49.2, 4.08)
pt3dadd(169.61, 525.62, 49.2, 4.08)
pt3dadd(169.25, 526.02, 49.2, 4.08)
pt3dadd(168.89, 526.43, 49.2, 4.08)
pt3dadd(168.54, 526.83, 49.2, 4.08)
pt3dadd(168.18, 527.64, 49.2, 4.08)
pt3dadd(167.47, 528.05, 49.2, 4.08)
pt3dadd(167.29, 527.04, 52.35, 4.08)
pt3dadd(166.75, 527.04, 52.35, 4.08)
pt3dadd(166.58, 527.24, 52.35, 4.08)
pt3dadd(152.13, 527.24, 52.35, 4.08)
pt3dadd(151.95, 527.44, 52.35, 4.08)
pt3dadd(152.13, 527.03, 55.5, 3.91)
pt3dadd(151.6, 527.44, 55.5, 3.91)
pt3dadd(151.06, 527.85, 55.5, 3.91)
pt3dadd(150.35, 528.25, 55.5, 3.91)
pt3dadd(149.81, 528.86, 55.5, 3.91)
pt3dadd(149.28, 529.26, 55.5, 3.91)
pt3dadd(148.92, 529.47, 55.5, 3.91)
pt3dadd(148.57, 529.87, 55.5, 3.91)
pt3dadd(148.39, 530.07, 55.5, 3.91)
pt3dadd(148.03, 530.48, 55.5, 3.91)
pt3dadd(147.67, 530.68, 55.5, 3.91)
pt3dadd(147.5, 530.88, 55.5, 3.91)
pt3dadd(147.14, 531.29, 55.5, 3.91)
pt3dadd(146.78, 531.49, 55.5, 3.91)
pt3dadd(146.6, 531.69, 55.5, 3.91)
pt3dadd(146.25, 531.9, 55.5, 3.91)
pt3dadd(145.89, 532.1, 55.5, 3.91)
pt3dadd(145.71, 532.5, 55.5, 3.91)
pt3dadd(145.36, 532.71, 55.5, 3.91)
pt3dadd(144.82, 533.11, 55.5, 3.91)
pt3dadd(143.93, 533.72, 55.5, 3.91)
pt3dadd(143.57, 533.92, 55.5, 3.91)
pt3dadd(143.04, 534.33, 55.5, 3.91)
pt3dadd(142.86, 534.73, 55.5, 3.91)
pt3dadd(142.5, 534.93, 55.5, 3.91)
pt3dadd(142.15, 535.34, 55.5, 3.91)
pt3dadd(141.79, 535.54, 55.5, 3.91)
pt3dadd(141.43, 535.74, 55.5, 3.91)
pt3dadd(141.08, 535.95, 55.5, 3.91)
pt3dadd(140.72, 536.35, 55.5, 3.91)
pt3dadd(140.54, 536.55, 55.5, 3.91)
pt3dadd(140.01, 536.76, 55.5, 3.91)
pt3dadd(139.65, 537.16, 55.5, 3.91)
pt3dadd(139.29, 537.36, 55.5, 3.91)
pt3dadd(139.11, 537.77, 55.5, 3.91)
pt3dadd(138.76, 537.97, 55.5, 3.91)
pt3dadd(138.22, 538.38, 55.5, 3.91)
pt3dadd(138.04, 538.58, 55.5, 3.91)
pt3dadd(137.69, 538.78, 55.5, 3.91)
pt3dadd(137.33, 539.39, 55.5, 3.91)
pt3dadd(136.97, 539.59, 55.5, 3.91)
pt3dadd(136.8, 539.8, 55.5, 3.91)
pt3dadd(135.73, 541.01, 55.5, 3.91)
pt3dadd(135.55, 541.21, 55.5, 3.91)
pt3dadd(135.19, 541.62, 55.5, 3.91)
pt3dadd(135.01, 541.82, 55.5, 3.91)
pt3dadd(134.83, 542.02, 55.5, 3.91)
pt3dadd(134.66, 542.43, 55.5, 3.91)
pt3dadd(134.3, 542.63, 55.5, 3.91)
pt3dadd(134.12, 543.04, 55.5, 3.91)
pt3dadd(133.94, 543.24, 55.5, 3.91)
pt3dadd(133.59, 543.44, 55.5, 3.91)
pt3dadd(133.41, 543.64, 55.5, 3.91)
pt3dadd(133.23, 544.25, 55.5, 3.91)
pt3dadd(132.87, 544.45, 55.5, 3.91)
pt3dadd(132.69, 544.66, 55.5, 3.91)
pt3dadd(132.52, 545.06, 55.5, 3.91)
pt3dadd(132.34, 545.26, 55.5, 3.91)
pt3dadd(131.98, 545.47, 55.5, 3.91)
pt3dadd(131.8, 545.67, 55.5, 3.91)
pt3dadd(131.62, 546.07, 55.5, 3.91)
pt3dadd(131.45, 546.28, 55.5, 3.91)
pt3dadd(131.27, 546.48, 55.5, 3.91)
pt3dadd(130.91, 546.68, 55.5, 3.91)
pt3dadd(130.73, 546.88, 55.5, 3.91)
pt3dadd(130.55, 547.29, 55.5, 3.91)
pt3dadd(130.38, 547.49, 55.5, 3.91)
pt3dadd(130.2, 547.69, 55.5, 3.91)
pt3dadd(129.84, 547.9, 55.5, 3.91)
pt3dadd(129.66, 548.1, 55.5, 3.91)
pt3dadd(129.66, 548.5, 55.5, 3.91)
pt3dadd(129.48, 548.71, 55.5, 3.91)
pt3dadd(129.31, 548.91, 55.5, 3.91)
pt3dadd(129.13, 549.32, 55.5, 3.91)
pt3dadd(128.95, 549.52, 55.5, 3.91)
pt3dadd(128.77, 549.72, 55.5, 3.91)
pt3dadd(128.59, 549.92, 55.5, 3.91)
pt3dadd(128.41, 550.13, 55.5, 3.91)
pt3dadd(129.31, 549.11, 60.75, 3.91)
pt3dadd(129.13, 549.52, 60.75, 3.91)
pt3dadd(128.95, 549.92, 60.75, 3.91)
pt3dadd(128.41, 550.53, 60.75, 3.91)
pt3dadd(128.24, 550.94, 60.75, 3.91)
pt3dadd(128.06, 551.34, 60.75, 3.91)
pt3dadd(127.7, 551.75, 60.75, 3.91)
pt3dadd(127.52, 551.95, 60.75, 3.91)
pt3dadd(127.34, 552.15, 60.75, 3.91)
pt3dadd(127.34, 552.56, 60.75, 3.91)
pt3dadd(127.17, 552.76, 60.75, 3.91)
pt3dadd(125.92, 554.18, 60.75, 3.91)
pt3dadd(125.74, 554.38, 60.75, 3.91)
pt3dadd(125.38, 554.58, 60.75, 3.91)
pt3dadd(125.2, 554.99, 60.75, 3.91)
pt3dadd(125.03, 555.39, 60.75, 3.91)
pt3dadd(124.67, 555.8, 60.75, 3.91)
pt3dadd(124.31, 556, 60.75, 3.91)
pt3dadd(124.13, 556.4, 60.75, 3.91)
pt3dadd(123.96, 556.61, 60.75, 3.91)
pt3dadd(123.78, 556.81, 60.75, 3.91)
pt3dadd(123.6, 557.01, 60.75, 3.91)
pt3dadd(123.42, 557.42, 60.75, 3.91)
pt3dadd(123.24, 557.82, 60.75, 3.91)
pt3dadd(122.89, 558.23, 60.75, 3.91)
pt3dadd(122.71, 558.43, 60.75, 3.91)
pt3dadd(122.53, 558.83, 60.75, 3.91)
pt3dadd(122.35, 559.24, 60.75, 3.91)
pt3dadd(122.17, 559.44, 60.75, 3.91)
pt3dadd(121.82, 559.85, 60.75, 3.91)
pt3dadd(121.64, 560.25, 60.75, 3.91)
pt3dadd(121.46, 560.46, 60.75, 3.91)
pt3dadd(121.1, 561.06, 60.75, 3.91)
pt3dadd(120.75, 561.27, 60.75, 3.91)
pt3dadd(120.57, 561.87, 60.75, 3.91)
pt3dadd(120.39, 562.08, 60.75, 3.91)
pt3dadd(120.03, 562.28, 60.75, 3.91)
pt3dadd(119.85, 562.48, 60.75, 3.91)
pt3dadd(119.5, 562.89, 60.75, 3.91)
pt3dadd(119.32, 563.09, 60.75, 3.91)
pt3dadd(118.96, 563.49, 60.75, 3.91)
pt3dadd(118.78, 563.7, 60.75, 3.91)
pt3dadd(118.61, 563.9, 60.75, 3.91)
pt3dadd(118.43, 564.3, 60.75, 3.91)
pt3dadd(118.25, 564.71, 60.75, 3.91)
pt3dadd(118.07, 564.91, 60.75, 3.91)
pt3dadd(117.89, 565.11, 60.75, 3.91)
pt3dadd(117.71, 565.52, 60.75, 3.91)
pt3dadd(117.54, 565.72, 60.75, 3.91)
pt3dadd(117.18, 565.92, 60.75, 3.91)
pt3dadd(117, 566.13, 60.75, 3.91)
pt3dadd(116.64, 566.33, 60.75, 3.91)
pt3dadd(116.47, 566.53, 60.75, 3.91)
pt3dadd(116.11, 566.73, 60.75, 3.91)
pt3dadd(115.93, 566.94, 60.75, 3.91)
pt3dadd(115.75, 567.34, 60.75, 3.91)
pt3dadd(115.4, 567.54, 60.75, 3.91)
pt3dadd(115.22, 567.95, 60.75, 3.91)
pt3dadd(114.86, 568.15, 60.75, 3.91)
pt3dadd(114.68, 568.35, 60.75, 3.91)
pt3dadd(114.5, 568.76, 60.75, 3.91)
pt3dadd(114.33, 568.96, 60.75, 3.91)
pt3dadd(113.97, 569.37, 60.75, 3.91)
pt3dadd(113.79, 569.57, 60.75, 3.91)
pt3dadd(113.43, 569.77, 60.75, 3.91)
pt3dadd(113.26, 570.18, 60.75, 3.91)
pt3dadd(113.08, 570.38, 60.75, 3.91)
pt3dadd(112.9, 570.58, 60.75, 3.91)
pt3dadd(112.72, 570.79, 60.75, 3.91)
pt3dadd(112.54, 571.19, 60.75, 3.91)
}
dend[111] {pt3dclear()
pt3dadd(315.38, 511.44, 11.3, 6.69)
}
}
proc shape3d_164() {
dend[111] { pt3dadd(312.32, 508.59, 11.3, 6.69)
pt3dadd(309.53, 508.59, 11.3, 6.69)
pt3dadd(309.25, 508.91, 11.3, 6.69)
pt3dadd(308.97, 509.22, 11.3, 6.69)
pt3dadd(308.69, 509.86, 11.3, 6.69)
pt3dadd(308.42, 510.17, 11.3, 6.69)
pt3dadd(308.14, 510.49, 11.3, 6.69)
pt3dadd(307.86, 510.81, 11.3, 6.69)
pt3dadd(307.58, 511.12, 11.3, 6.69)
pt3dadd(307.3, 511.44, 11.3, 6.69)
pt3dadd(307.02, 511.76, 11.3, 6.69)
pt3dadd(307.02, 512.39, 11.3, 6.69)
pt3dadd(306.74, 512.71, 11.3, 6.69)
pt3dadd(306.05, 512.23, 11.3, 4.74)
pt3dadd(305.77, 512.23, 11.3, 4.74)
pt3dadd(305.63, 512.55, 11.3, 4.74)
pt3dadd(305.49, 512.71, 11.3, 4.74)
pt3dadd(305.49, 513.34, 11.3, 4.74)
pt3dadd(305.35, 513.5, 11.3, 4.74)
pt3dadd(305.35, 514.13, 11.3, 4.74)
pt3dadd(305.21, 514.45, 11.3, 4.74)
pt3dadd(305.21, 519.83, 11.3, 4.74)
pt3dadd(305.07, 519.99, 11.3, 4.74)
pt3dadd(305.07, 524.1, 11.3, 4.74)
pt3dadd(304.93, 524.42, 11.3, 4.74)
pt3dadd(304.93, 524.89, 11.3, 4.74)
pt3dadd(304.79, 525.21, 11.3, 4.74)
pt3dadd(304.79, 526.32, 11.3, 4.74)
pt3dadd(304.65, 526.64, 11.3, 4.74)
pt3dadd(304.65, 527.11, 11.3, 4.74)
pt3dadd(304.51, 527.59, 11.3, 4.74)
pt3dadd(304.51, 529.33, 11.3, 4.74)
pt3dadd(304.37, 529.64, 11.3, 4.74)
pt3dadd(304.37, 531.07, 11.3, 4.74)
pt3dadd(304.51, 530.28, 11.3, 4.04)
pt3dadd(304.37, 530.59, 11.3, 4.04)
pt3dadd(304.23, 530.91, 11.3, 4.04)
pt3dadd(304.23, 531.23, 11.3, 4.04)
pt3dadd(303.96, 531.7, 11.3, 4.04)
pt3dadd(303.96, 532.02, 11.3, 4.04)
pt3dadd(303.82, 532.33, 11.3, 4.04)
pt3dadd(303.68, 532.65, 11.3, 4.04)
pt3dadd(303.68, 533.28, 11.3, 4.04)
pt3dadd(303.54, 533.44, 11.3, 4.04)
pt3dadd(303.4, 533.76, 11.3, 4.04)
pt3dadd(303.4, 549.27, 11.3, 4.04)
pt3dadd(303.54, 549.74, 11.3, 4.04)
pt3dadd(303.54, 551.01, 11.3, 4.04)
pt3dadd(303.68, 551.48, 11.3, 4.04)
pt3dadd(303.68, 552.28, 11.3, 4.04)
pt3dadd(303.82, 552.43, 11.3, 4.04)
pt3dadd(303.82, 554.33, 11.3, 4.04)
pt3dadd(303.96, 554.65, 11.3, 4.04)
pt3dadd(304.1, 554.97, 11.3, 4.04)
pt3dadd(304.1, 555.92, 11.3, 4.04)
pt3dadd(304.23, 556.23, 11.3, 4.04)
pt3dadd(304.23, 556.55, 11.3, 4.04)
pt3dadd(304.37, 556.71, 11.3, 4.04)
pt3dadd(304.51, 557.02, 11.3, 4.04)
pt3dadd(304.51, 557.5, 11.3, 4.04)
pt3dadd(304.65, 557.82, 11.3, 4.04)
pt3dadd(304.79, 557.97, 11.3, 4.04)
pt3dadd(304.79, 559.72, 11.3, 4.04)
pt3dadd(304.93, 560.03, 11.3, 4.04)
pt3dadd(304.93, 563.2, 11.3, 4.04)
pt3dadd(305.07, 562.56, 12.3, 3.9)
pt3dadd(305.07, 565.41, 12.3, 3.9)
pt3dadd(304.93, 565.73, 12.3, 3.9)
pt3dadd(304.93, 566.36, 12.3, 3.9)
pt3dadd(304.79, 566.68, 12.3, 3.9)
pt3dadd(304.79, 567.31, 12.3, 3.9)
pt3dadd(304.65, 567.63, 12.3, 3.9)
pt3dadd(304.65, 568.1, 12.3, 3.9)
pt3dadd(304.51, 568.58, 12.3, 3.9)
pt3dadd(304.37, 568.9, 12.3, 3.9)
pt3dadd(304.37, 569.69, 12.3, 3.9)
pt3dadd(304.23, 570.16, 12.3, 3.9)
pt3dadd(304.1, 570.48, 12.3, 3.9)
pt3dadd(304.1, 571.43, 12.3, 3.9)
pt3dadd(303.96, 571.59, 12.3, 3.9)
pt3dadd(303.96, 586.62, 12.3, 3.9)
pt3dadd(304.1, 586.94, 12.3, 3.9)
pt3dadd(304.1, 589.79, 12.3, 3.9)
pt3dadd(304.23, 590.26, 12.3, 3.9)
pt3dadd(304.23, 590.9, 12.3, 3.9)
pt3dadd(304.37, 591.21, 12.3, 3.9)
pt3dadd(304.51, 591.53, 12.3, 3.9)
pt3dadd(304.51, 592, 12.3, 3.9)
pt3dadd(304.65, 592.32, 12.3, 3.9)
pt3dadd(304.79, 592.8, 12.3, 3.9)
pt3dadd(304.93, 593.11, 12.3, 3.9)
pt3dadd(305.07, 593.59, 12.3, 3.9)
pt3dadd(305.07, 593.9, 12.3, 3.9)
pt3dadd(305.21, 594.22, 12.3, 3.9)
pt3dadd(305.21, 594.69, 12.3, 3.9)
pt3dadd(305.35, 595.01, 12.3, 3.9)
pt3dadd(305.35, 596.59, 12.3, 3.9)
pt3dadd(305.49, 596.75, 12.3, 3.9)
pt3dadd(305.49, 598.81, 12.3, 3.9)
pt3dadd(305.63, 599.28, 12.3, 3.9)
pt3dadd(305.63, 600.55, 12.3, 3.9)
pt3dadd(305.77, 598.65, 13.3, 3.9)
pt3dadd(305.77, 613.21, 13.3, 3.9)
pt3dadd(305.63, 613.69, 13.3, 3.9)
pt3dadd(305.63, 614.48, 13.3, 3.9)
pt3dadd(305.49, 614.95, 13.3, 3.9)
pt3dadd(305.49, 615.43, 13.3, 3.9)
pt3dadd(305.35, 615.75, 13.3, 3.9)
pt3dadd(305.35, 616.22, 13.3, 3.9)
pt3dadd(305.21, 616.54, 13.3, 3.9)
pt3dadd(305.07, 617.01, 13.3, 3.9)
pt3dadd(305.07, 617.49, 13.3, 3.9)
pt3dadd(304.93, 617.8, 13.3, 3.9)
pt3dadd(304.79, 618.12, 13.3, 3.9)
pt3dadd(304.79, 618.44, 13.3, 3.9)
pt3dadd(304.65, 618.75, 13.3, 3.9)
pt3dadd(304.51, 619.23, 13.3, 3.9)
pt3dadd(304.51, 619.7, 13.3, 3.9)
pt3dadd(304.37, 620.02, 13.3, 3.9)
pt3dadd(304.23, 620.34, 13.3, 3.9)
pt3dadd(304.23, 620.81, 13.3, 3.9)
pt3dadd(304.1, 621.13, 13.3, 3.9)
pt3dadd(303.96, 621.6, 13.3, 3.9)
pt3dadd(303.82, 622.08, 13.3, 3.9)
pt3dadd(303.68, 622.39, 13.3, 3.9)
pt3dadd(303.54, 622.87, 13.3, 3.9)
pt3dadd(303.4, 623.34, 13.3, 3.9)
pt3dadd(303.26, 623.66, 13.3, 3.9)
pt3dadd(303.26, 623.98, 13.3, 3.9)
pt3dadd(303.12, 624.29, 13.3, 3.9)
pt3dadd(303.12, 624.61, 13.3, 3.9)
pt3dadd(302.98, 625.08, 13.3, 3.9)
pt3dadd(302.98, 625.4, 13.3, 3.9)
pt3dadd(302.84, 626.03, 13.3, 3.9)
pt3dadd(302.84, 626.51, 13.3, 3.9)
pt3dadd(302.7, 626.67, 13.3, 3.9)
pt3dadd(302.7, 627.14, 13.3, 3.9)
pt3dadd(302.56, 627.3, 13.3, 3.9)
pt3dadd(302.56, 629.52, 13.3, 3.9)
pt3dadd(302.42, 629.83, 13.3, 3.9)
pt3dadd(302.42, 631.89, 13.3, 3.9)
pt3dadd(302.28, 632.36, 13.3, 3.9)
pt3dadd(302.28, 633.16, 13.3, 3.9)
pt3dadd(302.14, 633.47, 13.3, 3.9)
pt3dadd(302.14, 634.58, 13.3, 3.9)
pt3dadd(302.01, 634.9, 13.3, 3.9)
pt3dadd(302.01, 635.21, 13.3, 3.9)
pt3dadd(301.87, 635.53, 13.3, 3.9)
pt3dadd(301.87, 636.32, 13.3, 3.9)
pt3dadd(301.73, 636.64, 13.3, 3.9)
pt3dadd(301.59, 636.8, 13.3, 3.9)
pt3dadd(301.59, 637.43, 13.3, 3.9)
pt3dadd(301.45, 637.75, 13.3, 3.9)
pt3dadd(301.45, 638.06, 13.3, 3.9)
pt3dadd(301.31, 638.22, 13.3, 3.9)
pt3dadd(301.17, 638.54, 13.3, 3.9)
pt3dadd(301.03, 638.85, 13.3, 3.9)
pt3dadd(300.89, 639.17, 13.3, 3.9)
pt3dadd(300.75, 639.49, 13.3, 3.9)
pt3dadd(300.61, 639.65, 13.3, 3.9)
pt3dadd(300.61, 640.12, 13.3, 3.9)
pt3dadd(300.47, 640.44, 13.3, 3.9)
pt3dadd(300.33, 640.6, 13.3, 3.9)
pt3dadd(300.19, 640.91, 13.3, 3.9)
pt3dadd(300.05, 641.23, 13.3, 3.9)
pt3dadd(299.91, 641.55, 13.3, 3.9)
pt3dadd(299.78, 641.86, 13.3, 3.9)
pt3dadd(299.64, 642.18, 13.3, 3.9)
pt3dadd(299.5, 642.34, 13.3, 3.9)
pt3dadd(299.5, 642.65, 13.3, 3.9)
pt3dadd(299.36, 642.81, 13.3, 3.9)
pt3dadd(299.22, 643.13, 13.3, 3.9)
pt3dadd(299.08, 643.44, 13.3, 3.9)
pt3dadd(298.94, 643.76, 13.3, 3.9)
pt3dadd(298.8, 643.92, 13.3, 3.9)
pt3dadd(298.8, 644.08, 13.3, 3.9)
pt3dadd(299.08, 642.65, 14.3, 3.9)
pt3dadd(299.08, 642.97, 14.3, 3.9)
pt3dadd(298.8, 643.13, 14.3, 3.9)
pt3dadd(298.66, 643.6, 14.3, 3.9)
pt3dadd(298.52, 644.24, 14.3, 3.9)
pt3dadd(298.24, 644.71, 14.3, 3.9)
pt3dadd(298.1, 645.34, 14.3, 3.9)
pt3dadd(297.96, 645.82, 14.3, 3.9)
pt3dadd(297.69, 646.61, 14.3, 3.9)
pt3dadd(297.55, 647.24, 14.3, 3.9)
pt3dadd(297.41, 647.72, 14.3, 3.9)
pt3dadd(297.13, 648.19, 14.3, 3.9)
pt3dadd(296.99, 648.51, 14.3, 3.9)
pt3dadd(296.85, 648.83, 14.3, 3.9)
pt3dadd(296.71, 649.14, 14.3, 3.9)
pt3dadd(296.57, 649.46, 14.3, 3.9)
pt3dadd(296.43, 649.93, 14.3, 3.9)
pt3dadd(296.43, 650.57, 14.3, 3.9)
pt3dadd(296.29, 651.04, 14.3, 3.9)
pt3dadd(296.15, 651.67, 14.3, 3.9)
pt3dadd(296.15, 652.62, 14.3, 3.9)
pt3dadd(296.01, 653.26, 14.3, 3.9)
pt3dadd(295.87, 653.73, 14.3, 3.9)
pt3dadd(295.87, 654.52, 14.3, 3.9)
}
}
proc shape3d_165() {
dend[111] { pt3dadd(295.73, 654.84, 14.3, 3.9)
pt3dadd(295.73, 655.32, 14.3, 3.9)
pt3dadd(295.59, 655.63, 14.3, 3.9)
pt3dadd(295.46, 656.42, 14.3, 3.9)
pt3dadd(295.32, 656.9, 14.3, 3.9)
pt3dadd(295.32, 657.37, 14.3, 3.9)
pt3dadd(295.18, 657.85, 14.3, 3.9)
pt3dadd(294.9, 658.64, 14.3, 3.9)
pt3dadd(294.9, 658.96, 14.3, 3.9)
pt3dadd(294.76, 659.43, 14.3, 3.9)
pt3dadd(294.62, 659.75, 14.3, 3.9)
pt3dadd(294.48, 660.22, 14.3, 3.9)
pt3dadd(294.34, 660.7, 14.3, 3.9)
pt3dadd(294.2, 661.01, 14.3, 3.9)
pt3dadd(293.92, 661.65, 14.3, 3.9)
pt3dadd(293.78, 661.8, 14.3, 3.9)
pt3dadd(293.64, 662.28, 14.3, 3.9)
pt3dadd(293.5, 662.6, 14.3, 3.9)
pt3dadd(293.09, 663.07, 14.3, 3.9)
pt3dadd(292.95, 663.39, 14.3, 3.9)
pt3dadd(292.81, 663.7, 14.3, 3.9)
pt3dadd(292.67, 664.18, 14.3, 3.9)
pt3dadd(292.39, 664.5, 14.3, 3.9)
pt3dadd(292.25, 665.13, 14.3, 3.9)
pt3dadd(291.97, 665.45, 14.3, 3.9)
pt3dadd(291.83, 665.92, 14.3, 3.9)
pt3dadd(291.69, 666.24, 14.3, 3.9)
pt3dadd(291.55, 666.55, 14.3, 3.9)
pt3dadd(291.27, 667.03, 14.3, 3.9)
pt3dadd(291.14, 667.5, 14.3, 3.9)
pt3dadd(291, 667.82, 14.3, 3.9)
pt3dadd(290.86, 668.14, 14.3, 3.9)
pt3dadd(290.86, 668.45, 14.3, 3.9)
pt3dadd(290.72, 668.93, 14.3, 3.9)
pt3dadd(290.58, 669.24, 14.3, 3.9)
pt3dadd(290.44, 669.72, 14.3, 3.9)
pt3dadd(290.3, 670.04, 14.3, 3.9)
pt3dadd(290.3, 670.51, 14.3, 3.9)
pt3dadd(290.02, 671.14, 14.3, 3.9)
pt3dadd(290.02, 671.62, 14.3, 3.9)
pt3dadd(289.88, 672.09, 14.3, 3.9)
pt3dadd(289.88, 672.73, 14.3, 3.9)
pt3dadd(289.6, 673.2, 14.3, 3.9)
pt3dadd(289.6, 685.7, 14.3, 3.9)
pt3dadd(289.74, 686.18, 14.3, 3.9)
pt3dadd(289.74, 689.98, 14.3, 3.9)
pt3dadd(289.32, 689.5, 14.3, 3.9)
pt3dadd(289.32, 697.1, 14.3, 3.9)
pt3dadd(289.18, 697.42, 14.3, 3.9)
pt3dadd(289.18, 697.89, 14.3, 3.9)
pt3dadd(289.05, 698.21, 14.3, 3.9)
pt3dadd(288.91, 698.53, 14.3, 3.9)
pt3dadd(288.77, 698.84, 14.3, 3.9)
pt3dadd(288.63, 699.16, 14.3, 3.9)
pt3dadd(288.35, 699.63, 14.3, 3.9)
pt3dadd(288.21, 699.79, 14.3, 3.9)
pt3dadd(288.07, 700.27, 14.3, 3.9)
pt3dadd(287.93, 700.58, 14.3, 3.9)
pt3dadd(287.79, 700.9, 14.3, 3.9)
pt3dadd(287.65, 701.22, 14.3, 3.9)
pt3dadd(287.51, 701.53, 14.3, 3.9)
pt3dadd(287.23, 702.01, 14.3, 3.9)
pt3dadd(287.09, 702.32, 14.3, 3.9)
pt3dadd(286.95, 702.64, 14.3, 3.9)
pt3dadd(286.82, 702.96, 14.3, 3.9)
pt3dadd(286.68, 703.27, 14.3, 3.9)
pt3dadd(286.54, 703.59, 14.3, 3.9)
pt3dadd(286.4, 703.91, 14.3, 3.9)
pt3dadd(286.26, 704.22, 14.3, 3.9)
pt3dadd(286.12, 704.7, 14.3, 3.9)
pt3dadd(286.12, 705.33, 14.3, 3.9)
pt3dadd(285.98, 705.81, 14.3, 3.9)
pt3dadd(285.84, 706.12, 14.3, 3.9)
pt3dadd(285.84, 707.39, 14.3, 3.9)
pt3dadd(285.7, 707.71, 14.3, 3.9)
pt3dadd(285.7, 709.29, 14.3, 3.9)
pt3dadd(285.56, 709.92, 14.3, 3.9)
pt3dadd(285.56, 717.36, 14.3, 3.9)
pt3dadd(285.42, 717.84, 14.3, 3.9)
pt3dadd(285.42, 719.26, 14.3, 3.9)
pt3dadd(285.28, 719.73, 14.3, 3.9)
pt3dadd(285.14, 720.68, 14.3, 3.9)
pt3dadd(285.14, 721.48, 14.3, 3.9)
pt3dadd(285, 721.95, 14.3, 3.9)
pt3dadd(285, 722.43, 14.3, 3.9)
pt3dadd(284.86, 722.74, 14.3, 3.9)
pt3dadd(284.73, 723.37, 14.3, 3.9)
pt3dadd(284.73, 724.17, 14.3, 3.9)
pt3dadd(284.59, 724.64, 14.3, 3.9)
pt3dadd(284.45, 724.96, 14.3, 3.9)
pt3dadd(284.31, 725.43, 14.3, 3.9)
pt3dadd(284.31, 725.91, 14.3, 3.9)
pt3dadd(284.17, 726.22, 14.3, 3.9)
pt3dadd(284.03, 726.7, 14.3, 3.9)
pt3dadd(283.89, 727.33, 14.3, 3.9)
pt3dadd(283.75, 727.65, 14.3, 3.9)
pt3dadd(283.61, 728.12, 14.3, 3.9)
pt3dadd(283.61, 728.76, 14.3, 3.9)
pt3dadd(283.47, 729.07, 14.3, 3.9)
pt3dadd(283.47, 729.55, 14.3, 3.9)
pt3dadd(283.33, 730.02, 14.3, 3.9)
pt3dadd(283.33, 730.34, 14.3, 3.9)
pt3dadd(283.19, 730.66, 14.3, 3.9)
pt3dadd(283.19, 731.29, 14.3, 3.9)
pt3dadd(283.05, 731.61, 14.3, 3.9)
pt3dadd(283.05, 732.08, 14.3, 3.9)
pt3dadd(282.91, 732.4, 14.3, 3.9)
pt3dadd(282.91, 732.55, 14.3, 3.9)
pt3dadd(282.91, 731.76, 14.3, 3.9)
pt3dadd(282.77, 731.92, 14.3, 3.9)
pt3dadd(282.77, 739.36, 14.3, 3.9)
pt3dadd(282.91, 739.99, 14.3, 3.9)
pt3dadd(282.91, 740.94, 14.3, 3.9)
pt3dadd(283.05, 741.26, 14.3, 3.9)
pt3dadd(283.19, 741.74, 14.3, 3.9)
pt3dadd(283.19, 742.53, 14.3, 3.9)
pt3dadd(283.33, 742.84, 14.3, 3.9)
pt3dadd(283.33, 743.63, 14.3, 3.9)
pt3dadd(283.47, 744.11, 14.3, 3.9)
pt3dadd(283.47, 744.74, 14.3, 3.9)
pt3dadd(283.61, 745.22, 14.3, 3.9)
pt3dadd(283.61, 745.85, 14.3, 3.9)
pt3dadd(283.75, 746.33, 14.3, 3.9)
pt3dadd(283.89, 746.96, 14.3, 3.9)
pt3dadd(284.03, 747.27, 14.3, 3.9)
pt3dadd(284.17, 747.75, 14.3, 3.9)
pt3dadd(284.17, 749.33, 14.3, 3.9)
pt3dadd(284.31, 749.65, 14.3, 3.9)
pt3dadd(284.31, 750.28, 14.3, 3.9)
pt3dadd(284.45, 750.76, 14.3, 3.9)
pt3dadd(284.73, 751.23, 14.3, 3.9)
pt3dadd(284.86, 751.55, 14.3, 3.9)
pt3dadd(285.14, 752.02, 14.3, 3.9)
pt3dadd(285.14, 752.5, 14.3, 3.9)
pt3dadd(285.42, 753.29, 14.3, 3.9)
pt3dadd(285.7, 753.61, 14.3, 3.9)
pt3dadd(285.7, 754.24, 14.3, 3.9)
pt3dadd(285.84, 754.4, 14.3, 3.9)
pt3dadd(285.84, 755.35, 14.3, 3.9)
pt3dadd(285.98, 755.51, 14.3, 3.9)
pt3dadd(285.98, 759.15, 14.3, 3.9)
pt3dadd(285.84, 758.2, 15.3, 3.9)
pt3dadd(285.84, 758.67, 15.3, 3.9)
pt3dadd(285.7, 758.99, 15.3, 3.9)
pt3dadd(285.7, 759.46, 15.3, 3.9)
pt3dadd(285.56, 760.1, 15.3, 3.9)
pt3dadd(285.42, 760.25, 15.3, 3.9)
pt3dadd(285.28, 760.73, 15.3, 3.9)
pt3dadd(285.14, 761.04, 15.3, 3.9)
pt3dadd(285.14, 761.36, 15.3, 3.9)
pt3dadd(285, 761.68, 15.3, 3.9)
pt3dadd(284.86, 761.99, 15.3, 3.9)
pt3dadd(284.73, 762.15, 15.3, 3.9)
pt3dadd(284.73, 762.47, 15.3, 3.9)
pt3dadd(284.59, 762.79, 15.3, 3.9)
pt3dadd(284.59, 763.1, 15.3, 3.9)
pt3dadd(284.45, 763.74, 15.3, 3.9)
pt3dadd(284.31, 764.05, 15.3, 3.9)
pt3dadd(284.17, 764.53, 15.3, 3.9)
pt3dadd(284.03, 764.84, 15.3, 3.9)
pt3dadd(283.89, 765.16, 15.3, 3.9)
pt3dadd(283.89, 765.48, 15.3, 3.9)
pt3dadd(283.75, 765.79, 15.3, 3.9)
pt3dadd(283.47, 766.27, 15.3, 3.9)
pt3dadd(283.19, 766.58, 15.3, 3.9)
pt3dadd(283.05, 766.9, 15.3, 3.9)
pt3dadd(282.91, 767.22, 15.3, 3.9)
pt3dadd(282.63, 767.53, 15.3, 3.9)
pt3dadd(282.5, 767.85, 15.3, 3.9)
pt3dadd(282.36, 768.33, 15.3, 3.9)
pt3dadd(282.22, 768.64, 15.3, 3.9)
pt3dadd(281.94, 768.96, 15.3, 3.9)
pt3dadd(281.8, 769.43, 15.3, 3.9)
pt3dadd(281.66, 769.75, 15.3, 3.9)
pt3dadd(281.52, 770.07, 15.3, 3.9)
pt3dadd(281.38, 770.23, 15.3, 3.9)
pt3dadd(281.24, 770.54, 15.3, 3.9)
pt3dadd(280.96, 770.86, 15.3, 3.9)
pt3dadd(280.82, 771.33, 15.3, 3.9)
pt3dadd(280.54, 771.65, 15.3, 3.9)
pt3dadd(280.41, 771.97, 15.3, 3.9)
pt3dadd(280.27, 772.28, 15.3, 3.9)
pt3dadd(280.13, 772.6, 15.3, 3.9)
pt3dadd(280.13, 772.92, 15.3, 3.9)
pt3dadd(279.99, 773.07, 15.3, 3.9)
pt3dadd(279.85, 773.39, 15.3, 3.9)
pt3dadd(279.57, 773.87, 15.3, 3.9)
pt3dadd(279.43, 774.18, 15.3, 3.9)
pt3dadd(279.29, 774.5, 15.3, 3.9)
pt3dadd(279.15, 774.82, 15.3, 3.9)
pt3dadd(279.01, 775.13, 15.3, 3.9)
pt3dadd(278.87, 775.45, 15.3, 3.9)
pt3dadd(278.73, 775.92, 15.3, 3.9)
pt3dadd(278.59, 776.24, 15.3, 3.9)
pt3dadd(278.45, 776.56, 15.3, 3.9)
pt3dadd(278.45, 777.03, 15.3, 3.9)
pt3dadd(278.18, 777.19, 15.3, 3.9)
pt3dadd(278.18, 777.82, 15.3, 3.9)
pt3dadd(278.04, 778.3, 15.3, 3.9)
pt3dadd(277.9, 778.46, 15.3, 3.9)
}
}
proc shape3d_166() {
dend[111] { pt3dadd(277.76, 779.09, 15.3, 3.9)
pt3dadd(277.62, 779.56, 15.3, 3.9)
pt3dadd(277.48, 780.04, 15.3, 3.9)
pt3dadd(277.34, 780.51, 15.3, 3.9)
pt3dadd(277.2, 780.83, 15.3, 3.9)
pt3dadd(277.06, 781.3, 15.3, 3.9)
pt3dadd(276.92, 781.78, 15.3, 3.9)
pt3dadd(276.64, 782.57, 15.3, 3.9)
pt3dadd(276.5, 783.05, 15.3, 3.9)
pt3dadd(276.36, 783.68, 15.3, 3.9)
pt3dadd(276.22, 784.31, 15.3, 3.9)
pt3dadd(276.09, 784.95, 15.3, 3.9)
pt3dadd(275.95, 785.58, 15.3, 3.9)
pt3dadd(275.81, 786.05, 15.3, 3.9)
pt3dadd(275.81, 786.69, 15.3, 3.9)
pt3dadd(275.67, 787.48, 15.3, 3.9)
pt3dadd(275.53, 788.11, 15.3, 3.9)
pt3dadd(275.39, 788.74, 15.3, 3.9)
pt3dadd(275.25, 789.53, 15.3, 3.9)
pt3dadd(275.25, 790.01, 15.3, 3.9)
pt3dadd(275.11, 790.64, 15.3, 3.9)
pt3dadd(274.97, 791.12, 15.3, 3.9)
pt3dadd(274.97, 791.75, 15.3, 3.9)
pt3dadd(274.83, 792.23, 15.3, 3.9)
pt3dadd(274.83, 792.54, 15.3, 3.9)
pt3dadd(274.69, 793.02, 15.3, 3.9)
pt3dadd(274.69, 793.33, 15.3, 3.9)
pt3dadd(274.55, 793.97, 15.3, 3.9)
pt3dadd(274.55, 794.44, 15.3, 3.9)
pt3dadd(274.41, 794.76, 15.3, 3.9)
pt3dadd(274.41, 795.23, 15.3, 3.9)
pt3dadd(274.27, 795.71, 15.3, 3.9)
pt3dadd(274.27, 796.18, 15.3, 3.9)
pt3dadd(274.13, 796.66, 15.3, 3.9)
pt3dadd(274.13, 797.45, 15.3, 3.9)
pt3dadd(274, 797.77, 15.3, 3.9)
pt3dadd(274, 803.94, 15.3, 3.9)
pt3dadd(273.86, 804.1, 15.3, 3.9)
pt3dadd(273.86, 804.57, 15.3, 3.9)
pt3dadd(273.58, 803.78, 16.3, 3.9)
pt3dadd(273.72, 804.1, 16.3, 3.9)
pt3dadd(273.72, 808.84, 16.3, 3.9)
pt3dadd(273.58, 809.16, 16.3, 3.9)
pt3dadd(273.58, 809.95, 16.3, 3.9)
pt3dadd(273.44, 810.11, 16.3, 3.9)
pt3dadd(273.3, 810.43, 16.3, 3.9)
pt3dadd(273.3, 811.06, 16.3, 3.9)
pt3dadd(273.16, 811.38, 16.3, 3.9)
pt3dadd(273.16, 811.85, 16.3, 3.9)
pt3dadd(273.02, 812.17, 16.3, 3.9)
pt3dadd(272.88, 812.49, 16.3, 3.9)
pt3dadd(272.88, 812.8, 16.3, 3.9)
pt3dadd(272.74, 813.12, 16.3, 3.9)
pt3dadd(272.6, 813.43, 16.3, 3.9)
pt3dadd(272.46, 813.75, 16.3, 3.9)
pt3dadd(272.46, 814.23, 16.3, 3.9)
pt3dadd(272.32, 814.38, 16.3, 3.9)
pt3dadd(272.18, 814.7, 16.3, 3.9)
pt3dadd(272.18, 815.02, 16.3, 3.9)
pt3dadd(272.04, 815.33, 16.3, 3.9)
pt3dadd(271.9, 815.65, 16.3, 3.9)
pt3dadd(271.77, 815.97, 16.3, 3.9)
pt3dadd(271.63, 816.28, 16.3, 3.9)
pt3dadd(271.63, 816.6, 16.3, 3.9)
pt3dadd(271.49, 816.92, 16.3, 3.9)
pt3dadd(271.35, 817.23, 16.3, 3.9)
pt3dadd(271.07, 817.55, 16.3, 3.9)
pt3dadd(271.07, 817.87, 16.3, 3.9)
pt3dadd(270.79, 818.18, 16.3, 3.9)
pt3dadd(270.79, 818.5, 16.3, 3.9)
pt3dadd(270.51, 818.97, 16.3, 3.9)
pt3dadd(270.37, 819.29, 16.3, 3.9)
pt3dadd(270.09, 819.92, 16.3, 3.9)
pt3dadd(269.81, 820.4, 16.3, 3.9)
pt3dadd(269.4, 820.87, 16.3, 3.9)
pt3dadd(269.26, 821.03, 16.3, 3.9)
pt3dadd(268.42, 821.98, 16.3, 3.9)
pt3dadd(268.28, 822.14, 16.3, 3.9)
pt3dadd(268, 822.46, 16.3, 3.9)
pt3dadd(267.72, 822.62, 16.3, 3.9)
pt3dadd(267.31, 823.09, 16.3, 3.9)
pt3dadd(267.03, 823.25, 16.3, 3.9)
pt3dadd(266.33, 824.04, 16.3, 3.9)
pt3dadd(266.19, 824.36, 16.3, 3.9)
pt3dadd(266.05, 824.51, 16.3, 3.9)
pt3dadd(265.91, 824.67, 16.3, 3.9)
pt3dadd(265.49, 825.15, 16.3, 3.9)
pt3dadd(265.36, 825.31, 16.3, 3.9)
pt3dadd(265.08, 825.62, 16.3, 3.9)
pt3dadd(264.8, 826.1, 16.3, 3.9)
pt3dadd(264.66, 826.26, 16.3, 3.9)
pt3dadd(264.52, 826.57, 16.3, 3.9)
pt3dadd(264.1, 826.89, 16.3, 3.9)
pt3dadd(263.82, 827.52, 16.3, 3.9)
pt3dadd(263.68, 828, 16.3, 3.9)
pt3dadd(263.4, 828.31, 16.3, 3.9)
pt3dadd(263.26, 828.63, 16.3, 3.9)
pt3dadd(263.13, 828.95, 16.3, 3.9)
pt3dadd(262.85, 829.42, 16.3, 3.9)
pt3dadd(262.71, 829.58, 16.3, 3.9)
pt3dadd(262.43, 830.21, 16.3, 3.9)
pt3dadd(262.29, 830.37, 16.3, 3.9)
pt3dadd(262.01, 830.69, 16.3, 3.9)
pt3dadd(261.73, 831, 16.3, 3.9)
pt3dadd(261.59, 831.16, 16.3, 3.9)
pt3dadd(261.45, 831.32, 16.3, 3.9)
pt3dadd(261.31, 831.64, 16.3, 3.9)
pt3dadd(261.17, 831.8, 16.3, 3.9)
pt3dadd(261.17, 832.11, 16.3, 3.9)
pt3dadd(261.04, 832.27, 16.3, 3.9)
pt3dadd(260.76, 832.11, 17.3, 3.9)
pt3dadd(260.62, 832.27, 17.3, 3.9)
pt3dadd(260.48, 832.43, 17.3, 3.9)
pt3dadd(260.2, 832.74, 17.3, 3.9)
pt3dadd(260.06, 832.9, 17.3, 3.9)
pt3dadd(259.92, 833.22, 17.3, 3.9)
pt3dadd(259.78, 833.69, 17.3, 3.9)
pt3dadd(259.5, 834.01, 17.3, 3.9)
pt3dadd(259.22, 834.8, 17.3, 3.9)
pt3dadd(259.08, 835.28, 17.3, 3.9)
pt3dadd(258.94, 835.75, 17.3, 3.9)
pt3dadd(258.67, 836.23, 17.3, 3.9)
pt3dadd(258.53, 836.54, 17.3, 3.9)
pt3dadd(258.39, 837.18, 17.3, 3.9)
pt3dadd(258.11, 837.81, 17.3, 3.9)
pt3dadd(257.97, 838.13, 17.3, 3.9)
pt3dadd(257.83, 838.6, 17.3, 3.9)
pt3dadd(257.55, 839.23, 17.3, 3.9)
pt3dadd(257.13, 840.03, 17.3, 3.9)
pt3dadd(257.13, 840.34, 17.3, 3.9)
pt3dadd(256.85, 840.82, 17.3, 3.9)
pt3dadd(256.72, 841.13, 17.3, 3.9)
pt3dadd(256.58, 841.45, 17.3, 3.9)
pt3dadd(256.44, 841.77, 17.3, 3.9)
pt3dadd(256.44, 842.08, 17.3, 3.9)
pt3dadd(256.3, 842.56, 17.3, 3.9)
pt3dadd(256.02, 843.03, 17.3, 3.9)
pt3dadd(255.88, 843.51, 17.3, 3.9)
pt3dadd(255.6, 844.14, 17.3, 3.9)
pt3dadd(255.32, 844.62, 17.3, 3.9)
pt3dadd(255.18, 844.93, 17.3, 3.9)
pt3dadd(255.04, 845.41, 17.3, 3.9)
pt3dadd(254.9, 845.88, 17.3, 3.9)
pt3dadd(254.76, 846.2, 17.3, 3.9)
pt3dadd(254.62, 846.67, 17.3, 3.9)
pt3dadd(254.49, 846.99, 17.3, 3.9)
pt3dadd(254.35, 847.31, 17.3, 3.9)
pt3dadd(254.07, 847.94, 17.3, 3.9)
pt3dadd(253.93, 848.26, 17.3, 3.9)
pt3dadd(253.79, 848.57, 17.3, 3.9)
pt3dadd(253.79, 849.05, 17.3, 3.9)
pt3dadd(253.65, 849.21, 17.3, 3.9)
pt3dadd(253.51, 849.68, 17.3, 3.9)
pt3dadd(253.51, 850, 17.3, 3.9)
pt3dadd(253.37, 850.63, 17.3, 3.9)
pt3dadd(253.23, 850.95, 17.3, 3.9)
pt3dadd(253.09, 851.42, 17.3, 3.9)
pt3dadd(252.95, 851.9, 17.3, 3.9)
pt3dadd(252.95, 852.21, 17.3, 3.9)
pt3dadd(252.81, 852.69, 17.3, 3.9)
pt3dadd(252.67, 853, 17.3, 3.9)
pt3dadd(252.53, 853.48, 17.3, 3.9)
pt3dadd(252.53, 854.27, 17.3, 3.9)
pt3dadd(252.4, 854.59, 17.3, 3.9)
pt3dadd(252.26, 855.06, 17.3, 3.9)
pt3dadd(252.26, 855.38, 17.3, 3.9)
pt3dadd(252.12, 855.7, 17.3, 3.9)
pt3dadd(252.12, 856.33, 17.3, 3.9)
pt3dadd(251.98, 856.64, 17.3, 3.9)
pt3dadd(251.84, 856.96, 17.3, 3.9)
pt3dadd(251.84, 857.44, 17.3, 3.9)
pt3dadd(251.7, 857.59, 17.3, 3.9)
pt3dadd(251.56, 858.07, 17.3, 3.9)
pt3dadd(251.56, 858.54, 17.3, 3.9)
pt3dadd(251.42, 859.02, 17.3, 3.9)
pt3dadd(251.28, 859.34, 17.3, 3.9)
pt3dadd(251.14, 859.97, 17.3, 3.9)
pt3dadd(251, 860.44, 17.3, 3.9)
pt3dadd(251, 861.08, 17.3, 3.9)
pt3dadd(250.86, 861.39, 17.3, 3.9)
pt3dadd(250.72, 861.87, 17.3, 3.9)
pt3dadd(250.72, 862.34, 17.3, 3.9)
pt3dadd(250.58, 862.66, 17.3, 3.9)
pt3dadd(250.44, 862.82, 17.3, 3.9)
pt3dadd(250.44, 863.29, 17.3, 3.9)
pt3dadd(250.3, 863.61, 17.3, 3.9)
pt3dadd(250.86, 862.82, 18.3, 3.9)
pt3dadd(250.72, 862.98, 18.3, 3.9)
pt3dadd(250.58, 863.13, 18.3, 3.9)
pt3dadd(250.44, 863.29, 18.3, 3.9)
pt3dadd(250.17, 863.45, 18.3, 3.9)
pt3dadd(250.03, 863.77, 18.3, 3.9)
pt3dadd(249.89, 864.08, 18.3, 3.9)
pt3dadd(249.61, 864.56, 18.3, 3.9)
pt3dadd(249.33, 864.88, 18.3, 3.9)
pt3dadd(249.05, 865.51, 18.3, 3.9)
pt3dadd(248.91, 865.98, 18.3, 3.9)
pt3dadd(248.63, 866.3, 18.3, 3.9)
pt3dadd(248.49, 866.77, 18.3, 3.9)
pt3dadd(248.35, 867.09, 18.3, 3.9)
}
}
proc shape3d_167() {
dend[111] { pt3dadd(248.21, 867.41, 18.3, 3.9)
pt3dadd(248.08, 867.72, 18.3, 3.9)
pt3dadd(247.94, 867.88, 18.3, 3.9)
pt3dadd(247.8, 868.36, 18.3, 3.9)
pt3dadd(247.52, 868.67, 18.3, 3.9)
pt3dadd(247.38, 868.99, 18.3, 3.9)
pt3dadd(247.1, 869.47, 18.3, 3.9)
pt3dadd(246.96, 869.78, 18.3, 3.9)
pt3dadd(246.82, 870.1, 18.3, 3.9)
pt3dadd(246.68, 870.41, 18.3, 3.9)
pt3dadd(246.54, 870.73, 18.3, 3.9)
pt3dadd(246.4, 871.05, 18.3, 3.9)
pt3dadd(246.12, 871.52, 18.3, 3.9)
pt3dadd(245.99, 871.84, 18.3, 3.9)
pt3dadd(245.99, 872.31, 18.3, 3.9)
pt3dadd(245.85, 872.79, 18.3, 3.9)
pt3dadd(245.71, 873.26, 18.3, 3.9)
pt3dadd(245.57, 873.9, 18.3, 3.9)
pt3dadd(245.43, 874.21, 18.3, 3.9)
pt3dadd(245.29, 874.85, 18.3, 3.9)
pt3dadd(245.15, 875.48, 18.3, 3.9)
pt3dadd(245.01, 876.11, 18.3, 3.9)
pt3dadd(245.01, 876.75, 18.3, 3.9)
pt3dadd(244.87, 877.38, 18.3, 3.9)
pt3dadd(244.73, 877.85, 18.3, 3.9)
pt3dadd(244.59, 878.49, 18.3, 3.9)
pt3dadd(244.59, 880.07, 18.3, 3.9)
pt3dadd(244.45, 880.54, 18.3, 3.9)
pt3dadd(244.45, 883.55, 18.3, 3.9)
pt3dadd(244.31, 883.87, 18.3, 3.9)
pt3dadd(244.31, 885.29, 18.3, 3.9)
pt3dadd(244.17, 885.77, 18.3, 3.9)
pt3dadd(244.17, 886.08, 18.3, 3.9)
pt3dadd(244.03, 886.56, 18.3, 3.9)
pt3dadd(244.03, 887.51, 18.3, 3.9)
pt3dadd(243.89, 887.98, 18.3, 3.9)
pt3dadd(243.89, 888.62, 18.3, 3.9)
pt3dadd(243.76, 889.09, 18.3, 3.9)
pt3dadd(243.76, 889.41, 18.3, 3.9)
pt3dadd(243.62, 890.04, 18.3, 3.9)
pt3dadd(243.48, 890.36, 18.3, 3.9)
pt3dadd(243.48, 890.83, 18.3, 3.9)
pt3dadd(243.34, 890.99, 18.3, 3.9)
pt3dadd(243.34, 891.62, 18.3, 3.9)
pt3dadd(243.2, 891.94, 18.3, 3.9)
pt3dadd(243.2, 892.42, 18.3, 3.9)
pt3dadd(243.06, 892.73, 18.3, 3.9)
pt3dadd(243.06, 893.37, 18.3, 3.9)
pt3dadd(242.92, 893.68, 18.3, 3.9)
pt3dadd(242.92, 894.31, 18.3, 3.9)
pt3dadd(242.78, 894.63, 18.3, 3.9)
pt3dadd(242.78, 896.06, 18.3, 3.9)
pt3dadd(242.64, 896.37, 18.3, 3.9)
pt3dadd(242.64, 902.86, 18.3, 3.9)
pt3dadd(242.78, 903.02, 18.3, 3.9)
pt3dadd(242.92, 903.34, 18.3, 3.9)
pt3dadd(243.06, 903.5, 18.3, 3.9)
pt3dadd(243.2, 903.81, 18.3, 3.9)
pt3dadd(243.2, 904.76, 18.3, 3.9)
pt3dadd(242.78, 901.91, 19.3, 3.9)
pt3dadd(242.78, 903.5, 19.3, 3.9)
pt3dadd(243.06, 903.81, 19.3, 3.9)
pt3dadd(243.2, 904.29, 19.3, 3.9)
pt3dadd(243.2, 925.34, 19.3, 3.9)
pt3dadd(243.06, 924.55, 20.3, 3.9)
pt3dadd(243.06, 926.13, 20.3, 3.9)
pt3dadd(242.92, 926.45, 20.3, 3.9)
pt3dadd(242.64, 926.76, 20.3, 3.9)
pt3dadd(242.5, 927.08, 20.3, 3.9)
pt3dadd(242.36, 927.55, 20.3, 3.9)
pt3dadd(242.08, 927.87, 20.3, 3.9)
pt3dadd(241.8, 928.5, 20.3, 3.9)
pt3dadd(241.67, 928.82, 20.3, 3.9)
pt3dadd(241.53, 929.29, 20.3, 3.9)
pt3dadd(241.25, 929.77, 20.3, 3.9)
pt3dadd(240.97, 930.24, 20.3, 3.9)
pt3dadd(240.83, 930.56, 20.3, 3.9)
pt3dadd(240.69, 930.88, 20.3, 3.9)
pt3dadd(240.55, 931.19, 20.3, 3.9)
pt3dadd(240.13, 931.67, 20.3, 3.9)
pt3dadd(239.99, 932.14, 20.3, 3.9)
pt3dadd(239.85, 932.62, 20.3, 3.9)
pt3dadd(239.3, 933.41, 20.3, 3.9)
pt3dadd(239.16, 933.73, 20.3, 3.9)
pt3dadd(238.88, 934.2, 20.3, 3.9)
pt3dadd(238.74, 934.52, 20.3, 3.9)
pt3dadd(238.46, 934.99, 20.3, 3.9)
pt3dadd(238.18, 935.47, 20.3, 3.9)
pt3dadd(237.9, 935.94, 20.3, 3.9)
pt3dadd(237.62, 936.42, 20.3, 3.9)
pt3dadd(237.48, 936.73, 20.3, 3.9)
pt3dadd(237.21, 937.05, 20.3, 3.9)
pt3dadd(236.93, 937.37, 20.3, 3.9)
pt3dadd(236.23, 938.16, 20.3, 3.9)
pt3dadd(235.95, 938.47, 20.3, 3.9)
pt3dadd(235.67, 938.79, 20.3, 3.9)
pt3dadd(235.39, 939.11, 20.3, 3.9)
pt3dadd(235.25, 939.27, 20.3, 3.9)
pt3dadd(235.12, 939.58, 20.3, 3.9)
pt3dadd(234.84, 939.74, 20.3, 3.9)
pt3dadd(234.56, 939.9, 20.3, 3.9)
pt3dadd(234.42, 940.22, 20.3, 3.9)
pt3dadd(234.14, 940.37, 20.3, 3.9)
pt3dadd(234, 940.69, 20.3, 3.9)
pt3dadd(233.72, 940.85, 20.3, 3.9)
pt3dadd(233.58, 941.17, 20.3, 3.9)
pt3dadd(233.3, 941.32, 20.3, 3.9)
pt3dadd(233.16, 941.48, 20.3, 3.9)
pt3dadd(233.16, 941.8, 20.3, 3.9)
pt3dadd(233.03, 941.96, 20.3, 3.9)
pt3dadd(232.89, 942.11, 20.3, 3.9)
pt3dadd(234.28, 940.85, 22.3, 3.9)
pt3dadd(234.14, 941.17, 22.3, 3.9)
pt3dadd(234, 941.32, 22.3, 3.9)
pt3dadd(233.72, 941.96, 22.3, 3.9)
pt3dadd(233.3, 942.59, 22.3, 3.9)
pt3dadd(232.89, 943.38, 22.3, 3.9)
pt3dadd(232.47, 944.17, 22.3, 3.9)
pt3dadd(232.19, 944.49, 22.3, 3.9)
pt3dadd(232.05, 944.96, 22.3, 3.9)
pt3dadd(231.91, 945.28, 22.3, 3.9)
pt3dadd(231.49, 945.91, 22.3, 3.9)
pt3dadd(231.35, 946.23, 22.3, 3.9)
pt3dadd(231.21, 946.7, 22.3, 3.9)
pt3dadd(230.93, 947.18, 22.3, 3.9)
pt3dadd(230.8, 947.5, 22.3, 3.9)
pt3dadd(230.38, 947.81, 22.3, 3.9)
pt3dadd(229.96, 948.6, 22.3, 3.9)
pt3dadd(229.82, 948.92, 22.3, 3.9)
pt3dadd(229.4, 949.24, 22.3, 3.9)
pt3dadd(228.98, 950.03, 22.3, 3.9)
pt3dadd(228.71, 950.35, 22.3, 3.9)
pt3dadd(228.43, 950.98, 22.3, 3.9)
pt3dadd(228.15, 951.45, 22.3, 3.9)
pt3dadd(227.87, 951.77, 22.3, 3.9)
pt3dadd(227.59, 952.09, 22.3, 3.9)
pt3dadd(227.17, 952.88, 22.3, 3.9)
pt3dadd(226.89, 953.19, 22.3, 3.9)
pt3dadd(226.48, 953.99, 22.3, 3.9)
pt3dadd(226.2, 954.3, 22.3, 3.9)
pt3dadd(225.92, 954.78, 22.3, 3.9)
pt3dadd(225.64, 955.25, 22.3, 3.9)
pt3dadd(225.36, 955.57, 22.3, 3.9)
pt3dadd(224.94, 956.36, 22.3, 3.9)
pt3dadd(224.8, 956.52, 22.3, 3.9)
pt3dadd(224.52, 956.99, 22.3, 3.9)
pt3dadd(224.25, 957.31, 22.3, 3.9)
pt3dadd(223.97, 957.63, 22.3, 3.9)
pt3dadd(223.83, 957.94, 22.3, 3.9)
pt3dadd(223.69, 958.26, 22.3, 3.9)
pt3dadd(223.41, 958.58, 22.3, 3.9)
pt3dadd(223.27, 958.73, 22.3, 3.9)
pt3dadd(222.71, 959.37, 22.3, 3.9)
pt3dadd(222.57, 959.53, 22.3, 3.9)
pt3dadd(222.43, 959.68, 22.3, 3.9)
pt3dadd(222.16, 960, 22.3, 3.9)
pt3dadd(221.88, 960.16, 22.3, 3.9)
pt3dadd(221.6, 960.48, 22.3, 3.9)
pt3dadd(221.32, 960.63, 22.3, 3.9)
pt3dadd(221.04, 960.79, 22.3, 3.9)
pt3dadd(220.76, 960.95, 22.3, 3.9)
pt3dadd(220.48, 961.11, 22.3, 3.9)
pt3dadd(220.34, 961.42, 22.3, 3.9)
pt3dadd(220.07, 961.74, 22.3, 3.9)
pt3dadd(219.79, 961.9, 22.3, 3.9)
pt3dadd(219.51, 962.06, 22.3, 3.9)
pt3dadd(219.23, 962.37, 22.3, 3.9)
pt3dadd(218.95, 962.53, 22.3, 3.9)
pt3dadd(218.67, 962.69, 22.3, 3.9)
pt3dadd(218.39, 963.01, 22.3, 3.9)
pt3dadd(218.25, 963.17, 22.3, 3.9)
pt3dadd(217.98, 963.32, 22.3, 3.9)
pt3dadd(217.7, 963.64, 22.3, 3.9)
pt3dadd(217.42, 963.64, 22.3, 3.9)
pt3dadd(217.28, 963.8, 22.3, 3.9)
pt3dadd(217.14, 963.96, 22.3, 3.9)
pt3dadd(216.86, 964.27, 22.3, 3.9)
pt3dadd(216.58, 964.43, 22.3, 3.9)
pt3dadd(216.58, 964.75, 22.3, 3.9)
pt3dadd(216.3, 964.75, 22.3, 3.9)
pt3dadd(216.16, 965.07, 22.3, 3.9)
pt3dadd(216.02, 965.22, 22.3, 3.9)
pt3dadd(215.75, 965.38, 22.3, 3.9)
pt3dadd(215.61, 965.54, 22.3, 3.9)
pt3dadd(216.86, 964.59, 25.3, 3.9)
pt3dadd(216.72, 964.75, 25.3, 3.9)
pt3dadd(216.58, 964.91, 25.3, 3.9)
pt3dadd(216.3, 965.07, 25.3, 3.9)
pt3dadd(216.16, 965.38, 25.3, 3.9)
pt3dadd(216.02, 965.54, 25.3, 3.9)
pt3dadd(215.88, 965.86, 25.3, 3.9)
pt3dadd(215.47, 966.33, 25.3, 3.9)
pt3dadd(215.33, 966.49, 25.3, 3.9)
pt3dadd(215.19, 966.81, 25.3, 3.9)
pt3dadd(215.05, 966.96, 25.3, 3.9)
pt3dadd(214.91, 967.12, 25.3, 3.9)
pt3dadd(214.77, 967.44, 25.3, 3.9)
pt3dadd(214.63, 967.91, 25.3, 3.9)
pt3dadd(214.35, 968.23, 25.3, 3.9)
pt3dadd(214.21, 968.71, 25.3, 3.9)
}
}
proc shape3d_168() {
dend[111] { pt3dadd(213.93, 969.18, 25.3, 3.9)
pt3dadd(213.79, 969.5, 25.3, 3.9)
pt3dadd(213.52, 969.81, 25.3, 3.9)
pt3dadd(213.38, 970.29, 25.3, 3.9)
pt3dadd(213.24, 970.76, 25.3, 3.9)
pt3dadd(213.1, 971.08, 25.3, 3.9)
pt3dadd(212.96, 971.4, 25.3, 3.9)
pt3dadd(212.82, 971.71, 25.3, 3.9)
pt3dadd(212.68, 972.03, 25.3, 3.9)
pt3dadd(212.68, 972.5, 25.3, 3.9)
pt3dadd(212.54, 972.82, 25.3, 3.9)
pt3dadd(212.54, 987.38, 25.3, 3.9)
pt3dadd(212.82, 986.91, 28.3, 3.9)
pt3dadd(212.82, 988.65, 28.3, 3.9)
pt3dadd(212.68, 989.28, 28.3, 3.9)
pt3dadd(212.68, 989.6, 28.3, 3.9)
pt3dadd(212.54, 990.07, 28.3, 3.9)
pt3dadd(212.54, 991.18, 28.3, 3.9)
pt3dadd(212.4, 991.5, 28.3, 3.9)
pt3dadd(212.26, 991.97, 28.3, 3.9)
pt3dadd(212.26, 992.45, 28.3, 3.9)
pt3dadd(212.12, 992.76, 28.3, 3.9)
pt3dadd(211.98, 993.24, 28.3, 3.9)
pt3dadd(211.84, 993.71, 28.3, 3.9)
pt3dadd(211.7, 994.19, 28.3, 3.9)
pt3dadd(211.43, 994.82, 28.3, 3.9)
pt3dadd(211.29, 995.14, 28.3, 3.9)
pt3dadd(211.15, 995.61, 28.3, 3.9)
pt3dadd(211.01, 995.93, 28.3, 3.9)
pt3dadd(210.87, 996.25, 28.3, 3.9)
pt3dadd(210.73, 996.72, 28.3, 3.9)
pt3dadd(210.73, 997.2, 28.3, 3.9)
pt3dadd(210.45, 997.51, 28.3, 3.9)
pt3dadd(210.31, 997.99, 28.3, 3.9)
pt3dadd(210.31, 998.46, 28.3, 3.9)
pt3dadd(210.17, 998.94, 28.3, 3.9)
pt3dadd(210.03, 999.41, 28.3, 3.9)
pt3dadd(209.89, 1000.04, 28.3, 3.9)
pt3dadd(209.61, 1000.52, 28.3, 3.9)
pt3dadd(209.47, 1001.15, 28.3, 3.9)
pt3dadd(209.34, 1001.63, 28.3, 3.9)
pt3dadd(209.2, 1002.26, 28.3, 3.9)
pt3dadd(209.06, 1002.74, 28.3, 3.9)
pt3dadd(209.06, 1003.37, 28.3, 3.9)
pt3dadd(208.78, 1003.84, 28.3, 3.9)
pt3dadd(208.78, 1004.48, 28.3, 3.9)
pt3dadd(208.64, 1004.95, 28.3, 3.9)
pt3dadd(208.5, 1005.27, 28.3, 3.9)
pt3dadd(208.36, 1005.74, 28.3, 3.9)
pt3dadd(208.22, 1006.22, 28.3, 3.9)
pt3dadd(208.08, 1006.69, 28.3, 3.9)
pt3dadd(207.94, 1007.17, 28.3, 3.9)
pt3dadd(207.8, 1007.48, 28.3, 3.9)
pt3dadd(207.8, 1007.8, 28.3, 3.9)
pt3dadd(207.66, 1007.96, 28.3, 3.9)
pt3dadd(207.66, 1008.28, 28.3, 3.9)
pt3dadd(207.52, 1008.43, 28.3, 3.9)
pt3dadd(207.52, 1008.75, 28.3, 3.9)
pt3dadd(207.38, 1009.07, 28.3, 3.9)
pt3dadd(207.24, 1009.38, 28.3, 3.9)
pt3dadd(207.24, 1009.7, 28.3, 3.9)
pt3dadd(207.11, 1010.02, 28.3, 3.9)
pt3dadd(206.97, 1010.33, 28.3, 3.9)
pt3dadd(206.97, 1010.65, 28.3, 3.9)
pt3dadd(206.83, 1010.81, 28.3, 3.9)
pt3dadd(206.69, 1011.28, 28.3, 3.9)
pt3dadd(206.55, 1011.6, 28.3, 3.9)
pt3dadd(206.55, 1011.76, 28.3, 3.9)
pt3dadd(207.8, 1009.22, 30.3, 3.9)
pt3dadd(207.52, 1009.38, 30.3, 3.9)
pt3dadd(207.38, 1009.7, 30.3, 3.9)
pt3dadd(207.11, 1010.33, 30.3, 3.9)
pt3dadd(206.83, 1010.65, 30.3, 3.9)
pt3dadd(206.69, 1011.12, 30.3, 3.9)
pt3dadd(206.55, 1011.6, 30.3, 3.9)
pt3dadd(206.27, 1012.07, 30.3, 3.9)
pt3dadd(206.13, 1012.55, 30.3, 3.9)
pt3dadd(205.99, 1013.02, 30.3, 3.9)
pt3dadd(205.71, 1013.34, 30.3, 3.9)
pt3dadd(205.57, 1013.81, 30.3, 3.9)
pt3dadd(205.43, 1014.45, 30.3, 3.9)
pt3dadd(205.15, 1014.76, 30.3, 3.9)
pt3dadd(205.02, 1015.4, 30.3, 3.9)
pt3dadd(204.88, 1015.71, 30.3, 3.9)
pt3dadd(204.6, 1016.19, 30.3, 3.9)
pt3dadd(204.18, 1016.98, 30.3, 3.9)
pt3dadd(204.04, 1017.46, 30.3, 3.9)
pt3dadd(203.9, 1017.93, 30.3, 3.9)
pt3dadd(203.48, 1018.72, 30.3, 3.9)
pt3dadd(203.2, 1019.2, 30.3, 3.9)
pt3dadd(202.92, 1019.67, 30.3, 3.9)
pt3dadd(202.79, 1020.3, 30.3, 3.9)
pt3dadd(202.37, 1020.78, 30.3, 3.9)
pt3dadd(202.23, 1021.57, 30.3, 3.9)
pt3dadd(201.67, 1023.15, 30.3, 3.9)
pt3dadd(201.39, 1023.63, 30.3, 3.9)
pt3dadd(201.11, 1024.42, 30.3, 3.9)
pt3dadd(200.97, 1024.89, 30.3, 3.9)
pt3dadd(200.7, 1025.53, 30.3, 3.9)
pt3dadd(200.56, 1026, 30.3, 3.9)
pt3dadd(200.28, 1026.79, 30.3, 3.9)
pt3dadd(200.14, 1027.27, 30.3, 3.9)
pt3dadd(200, 1027.9, 30.3, 3.9)
pt3dadd(199.72, 1028.38, 30.3, 3.9)
pt3dadd(199.58, 1028.69, 30.3, 3.9)
pt3dadd(199.44, 1029.01, 30.3, 3.9)
pt3dadd(199.3, 1029.48, 30.3, 3.9)
pt3dadd(199.16, 1029.8, 30.3, 3.9)
pt3dadd(199.02, 1030.12, 30.3, 3.9)
pt3dadd(198.74, 1030.59, 30.3, 3.9)
pt3dadd(198.6, 1030.75, 30.3, 3.9)
pt3dadd(198.6, 1031.07, 30.3, 3.9)
pt3dadd(198.47, 1031.38, 30.3, 3.9)
pt3dadd(198.33, 1031.54, 30.3, 3.9)
pt3dadd(198.19, 1031.86, 30.3, 3.9)
pt3dadd(198.05, 1032.18, 30.3, 3.9)
pt3dadd(197.91, 1032.49, 30.3, 3.9)
pt3dadd(197.77, 1032.81, 30.3, 3.9)
pt3dadd(197.63, 1033.12, 30.3, 3.9)
pt3dadd(197.49, 1033.44, 30.3, 3.9)
pt3dadd(197.49, 1033.92, 30.3, 3.9)
pt3dadd(197.21, 1034.39, 30.3, 3.9)
pt3dadd(197.07, 1034.87, 30.3, 3.9)
pt3dadd(196.93, 1035.34, 30.3, 3.9)
pt3dadd(196.93, 1035.66, 30.3, 3.9)
pt3dadd(196.79, 1036.13, 30.3, 3.9)
pt3dadd(196.51, 1036.29, 30.3, 3.9)
pt3dadd(196.51, 1036.77, 30.3, 3.9)
pt3dadd(196.38, 1036.92, 30.3, 3.9)
pt3dadd(196.38, 1037.56, 30.3, 3.9)
pt3dadd(196.24, 1037.71, 30.3, 3.9)
pt3dadd(196.1, 1038.19, 30.3, 3.9)
pt3dadd(196.1, 1038.82, 30.3, 3.9)
pt3dadd(195.96, 1039.14, 30.3, 3.9)
pt3dadd(195.82, 1039.61, 30.3, 3.9)
pt3dadd(195.82, 1040.25, 30.3, 3.9)
pt3dadd(195.68, 1040.72, 30.3, 3.9)
pt3dadd(195.68, 1041.2, 30.3, 3.9)
pt3dadd(195.54, 1041.51, 30.3, 3.9)
pt3dadd(195.4, 1042.31, 30.3, 3.9)
pt3dadd(195.4, 1042.94, 30.3, 3.9)
pt3dadd(195.26, 1043.41, 30.3, 3.9)
pt3dadd(195.26, 1043.73, 30.3, 3.9)
pt3dadd(195.12, 1043.89, 30.3, 3.9)
pt3dadd(195.68, 1043.25, 32.3, 3.9)
pt3dadd(195.68, 1044.36, 32.3, 3.9)
pt3dadd(195.54, 1045, 32.3, 3.9)
pt3dadd(195.4, 1045.63, 32.3, 3.9)
pt3dadd(195.26, 1046.42, 32.3, 3.9)
pt3dadd(195.26, 1047.53, 32.3, 3.9)
pt3dadd(194.98, 1048.32, 32.3, 3.9)
pt3dadd(194.98, 1048.95, 32.3, 3.9)
pt3dadd(194.84, 1049.43, 32.3, 3.9)
pt3dadd(194.84, 1049.9, 32.3, 3.9)
pt3dadd(194.7, 1050.38, 32.3, 3.9)
pt3dadd(194.56, 1050.85, 32.3, 3.9)
pt3dadd(194.42, 1051.33, 32.3, 3.9)
pt3dadd(194.28, 1051.8, 32.3, 3.9)
pt3dadd(194.28, 1052.12, 32.3, 3.9)
pt3dadd(194.01, 1052.75, 32.3, 3.9)
pt3dadd(193.73, 1053.38, 32.3, 3.9)
pt3dadd(193.59, 1054.02, 32.3, 3.9)
pt3dadd(193.31, 1054.49, 32.3, 3.9)
pt3dadd(193.17, 1055.13, 32.3, 3.9)
pt3dadd(193.03, 1055.6, 32.3, 3.9)
pt3dadd(192.89, 1055.92, 32.3, 3.9)
pt3dadd(192.61, 1056.55, 32.3, 3.9)
pt3dadd(192.47, 1057.02, 32.3, 3.9)
pt3dadd(192.19, 1057.5, 32.3, 3.9)
pt3dadd(192.06, 1057.82, 32.3, 3.9)
pt3dadd(191.92, 1058.13, 32.3, 3.9)
pt3dadd(191.64, 1058.45, 32.3, 3.9)
pt3dadd(191.5, 1058.77, 32.3, 3.9)
pt3dadd(191.36, 1058.92, 32.3, 3.9)
pt3dadd(191.36, 1059.24, 32.3, 3.9)
pt3dadd(191.22, 1059.4, 32.3, 3.9)
pt3dadd(191.08, 1059.56, 32.3, 3.9)
pt3dadd(190.94, 1059.87, 32.3, 3.9)
pt3dadd(190.8, 1060.03, 32.3, 3.9)
pt3dadd(190.66, 1060.19, 32.3, 3.9)
pt3dadd(190.24, 1060.67, 32.3, 3.9)
pt3dadd(189.96, 1060.98, 32.3, 3.9)
pt3dadd(189.83, 1061.14, 32.3, 3.9)
pt3dadd(189.69, 1061.3, 32.3, 3.9)
pt3dadd(189.69, 1061.61, 32.3, 3.9)
pt3dadd(189.55, 1061.77, 32.3, 3.9)
pt3dadd(190.38, 1060.67, 35.3, 3.9)
pt3dadd(190.24, 1060.98, 35.3, 3.9)
pt3dadd(189.96, 1061.3, 35.3, 3.9)
pt3dadd(189.83, 1061.61, 35.3, 3.9)
pt3dadd(189.69, 1061.93, 35.3, 3.9)
pt3dadd(189.55, 1062.25, 35.3, 3.9)
pt3dadd(189.41, 1062.41, 35.3, 3.9)
}
dend[112] {pt3dclear()
pt3dadd(308.2, 407.68, 1.3, 3.48)
pt3dadd(305.13, 405.15, -10.7, 3.48)
pt3dadd(304.99, 404.83, -10.7, 3.48)
pt3dadd(304.85, 404.51, -10.7, 3.48)
pt3dadd(304.85, 404.2, -10.7, 3.48)
pt3dadd(304.71, 404.04, -10.7, 3.48)
pt3dadd(304.57, 403.72, -10.7, 3.48)
}
}
proc shape3d_169() {
dend[112] { pt3dadd(304.43, 403.56, -10.7, 3.48)
pt3dadd(304.3, 403.41, -10.7, 3.48)
pt3dadd(304.16, 403.09, -10.7, 3.48)
pt3dadd(304.02, 402.77, -10.7, 3.48)
pt3dadd(303.74, 402.14, -10.7, 3.48)
pt3dadd(303.46, 401.67, -10.7, 3.48)
pt3dadd(303.04, 401.19, -10.7, 3.48)
pt3dadd(302.62, 400.72, -10.7, 3.48)
pt3dadd(302.48, 400.4, -10.7, 3.48)
pt3dadd(302.34, 400.08, -10.7, 3.48)
pt3dadd(295.93, 375.87, 16.3, 3.07)
pt3dadd(296.07, 375.55, 16.3, 3.07)
pt3dadd(296.07, 375.07, 16.3, 3.07)
pt3dadd(296.21, 374.76, 16.3, 3.07)
pt3dadd(296.35, 374.44, 16.3, 3.07)
pt3dadd(296.35, 373.97, 16.3, 3.07)
pt3dadd(296.49, 373.65, 16.3, 3.07)
pt3dadd(296.63, 373.33, 16.3, 3.07)
pt3dadd(296.77, 373.02, 16.3, 3.07)
pt3dadd(296.77, 372.7, 16.3, 3.07)
pt3dadd(296.77, 373.33, 12.3, 3.07)
pt3dadd(297.05, 373.02, 12.3, 3.07)
pt3dadd(297.33, 372.07, 12.3, 3.07)
pt3dadd(297.61, 371.43, 12.3, 3.07)
pt3dadd(297.89, 370.8, 12.3, 3.07)
pt3dadd(297.89, 370.17, 12.3, 3.07)
pt3dadd(298.16, 369.85, 12.3, 3.07)
pt3dadd(298.44, 369.22, 12.3, 3.07)
pt3dadd(298.72, 368.58, 12.3, 3.07)
pt3dadd(299, 368.27, 12.3, 3.07)
pt3dadd(299.28, 367.64, 12.3, 3.07)
pt3dadd(299.56, 367, 12.3, 3.07)
pt3dadd(299.84, 366.37, 12.3, 3.07)
pt3dadd(300.12, 365.42, 12.3, 3.07)
pt3dadd(300.39, 364.47, 12.3, 3.07)
pt3dadd(300.67, 364.15, 12.3, 3.07)
pt3dadd(301.23, 363.2, 12.3, 3.07)
pt3dadd(301.51, 361.94, 12.3, 3.07)
pt3dadd(302.07, 361.3, 12.3, 3.07)
pt3dadd(302.34, 360.04, 12.3, 3.07)
pt3dadd(302.62, 358.77, 12.3, 3.07)
pt3dadd(303.18, 357.82, 12.3, 3.07)
pt3dadd(303.74, 356.56, 12.3, 3.07)
pt3dadd(304.02, 355.92, 12.3, 3.07)
pt3dadd(303.74, 356.87, 13.3, 3.07)
pt3dadd(304.57, 356.87, 13.3, 3.07)
pt3dadd(304.85, 356.56, 13.3, 3.07)
pt3dadd(305.13, 356.24, 13.3, 3.07)
pt3dadd(305.41, 355.92, 13.3, 3.07)
pt3dadd(305.69, 355.61, 13.3, 3.07)
pt3dadd(305.97, 355.29, 13.3, 3.07)
pt3dadd(306.25, 354.97, 13.3, 3.07)
pt3dadd(306.25, 354.34, 13.3, 3.07)
pt3dadd(306.53, 354.02, 13.3, 3.07)
pt3dadd(306.8, 353.71, 13.3, 3.07)
pt3dadd(306.8, 353.07, 13.3, 3.07)
pt3dadd(307.08, 352.76, 13.3, 3.07)
pt3dadd(307.36, 352.44, 13.3, 3.07)
pt3dadd(307.64, 351.81, 13.3, 3.07)
pt3dadd(307.92, 351.49, 13.3, 3.07)
pt3dadd(308.2, 351.17, 13.3, 3.07)
pt3dadd(308.2, 350.22, 13.3, 3.07)
pt3dadd(308.48, 349.59, 13.3, 3.07)
pt3dadd(308.48, 346.74, 13.3, 3.07)
pt3dadd(308.76, 346.43, 13.3, 3.07)
pt3dadd(308.76, 345.79, 13.3, 3.07)
pt3dadd(309.03, 345.16, 13.3, 3.07)
pt3dadd(309.03, 343.58, 13.3, 3.07)
pt3dadd(309.31, 342.94, 13.3, 3.07)
pt3dadd(309.59, 342.63, 13.3, 3.07)
pt3dadd(309.87, 342.31, 13.3, 3.07)
pt3dadd(309.87, 339.46, 13.3, 3.07)
pt3dadd(310.15, 339.15, 13.3, 3.07)
pt3dadd(310.15, 331.55, 13.3, 3.07)
pt3dadd(310.43, 330.91, 13.3, 3.07)
pt3dadd(310.43, 327.12, 13.3, 3.07)
pt3dadd(310.71, 326.48, 13.3, 3.07)
pt3dadd(310.71, 324.58, 13.3, 3.07)
pt3dadd(310.98, 323.95, 13.3, 3.07)
pt3dadd(310.98, 323.32, 13.3, 3.07)
pt3dadd(311.26, 322.68, 13.3, 3.07)
pt3dadd(311.54, 321.73, 13.3, 3.07)
pt3dadd(311.54, 321.1, 13.3, 3.07)
pt3dadd(311.82, 320.78, 13.3, 3.07)
pt3dadd(311.82, 313.82, 13.3, 3.07)
pt3dadd(312.1, 312.87, 13.3, 3.07)
pt3dadd(312.1, 301.48, 13.3, 3.07)
pt3dadd(311.26, 301.48, 13.3, 3.07)
pt3dadd(311.26, 302.42, 13.3, 3.07)
pt3dadd(312.1, 303.69, 13.3, 3.07)
pt3dadd(312.1, 300.84, 13.3, 3.07)
pt3dadd(311.82, 300.53, 13.3, 3.07)
pt3dadd(311.82, 299.26, 13.3, 3.07)
pt3dadd(311.54, 298.94, 13.3, 3.07)
pt3dadd(311.26, 298.63, 13.3, 3.07)
pt3dadd(311.26, 297.99, 13.3, 3.07)
pt3dadd(310.98, 297.36, 13.3, 3.07)
pt3dadd(310.98, 296.41, 13.3, 3.07)
pt3dadd(310.71, 296.09, 13.3, 3.07)
pt3dadd(310.43, 295.78, 13.3, 3.07)
pt3dadd(310.43, 294.83, 13.3, 3.07)
pt3dadd(310.15, 294.51, 13.3, 3.07)
pt3dadd(309.87, 294.19, 13.3, 3.07)
pt3dadd(309.59, 293.56, 13.3, 3.07)
pt3dadd(309.59, 292.93, 13.3, 3.07)
pt3dadd(309.31, 292.29, 13.3, 3.07)
pt3dadd(309.03, 291.66, 13.3, 3.07)
pt3dadd(309.03, 291.03, 13.3, 3.07)
pt3dadd(308.76, 290.4, 13.3, 3.07)
pt3dadd(308.76, 289.45, 13.3, 3.07)
pt3dadd(308.48, 288.81, 13.3, 3.07)
pt3dadd(308.48, 286.91, 13.3, 3.07)
pt3dadd(308.2, 286.6, 13.3, 3.07)
pt3dadd(308.2, 263.17, 13.3, 3.07)
pt3dadd(308.2, 264.12, 14.3, 3.07)
pt3dadd(308.2, 262.22, 14.3, 3.07)
pt3dadd(308.76, 261.27, 14.3, 3.07)
pt3dadd(308.76, 257.47, 14.3, 3.07)
pt3dadd(309.03, 257.16, 14.3, 3.07)
pt3dadd(309.31, 256.84, 14.3, 3.07)
pt3dadd(309.31, 253.68, 14.3, 3.07)
pt3dadd(309.59, 253.36, 14.3, 3.07)
pt3dadd(309.59, 249.88, 14.3, 3.07)
pt3dadd(309.87, 249.24, 14.3, 3.07)
pt3dadd(310.15, 248.61, 14.3, 3.07)
pt3dadd(310.43, 247.66, 14.3, 3.07)
pt3dadd(310.43, 246.71, 14.3, 3.07)
pt3dadd(310.71, 246.08, 14.3, 3.07)
pt3dadd(310.71, 244.81, 14.3, 3.07)
pt3dadd(310.98, 244.18, 14.3, 3.07)
pt3dadd(311.26, 243.86, 14.3, 3.07)
pt3dadd(311.26, 243.23, 14.3, 3.07)
pt3dadd(310.98, 243.86, 17.3, 3.07)
pt3dadd(310.98, 240.7, 17.3, 3.07)
pt3dadd(311.26, 239.75, 17.3, 3.07)
pt3dadd(311.54, 239.11, 17.3, 3.07)
pt3dadd(311.54, 231.2, 17.3, 3.07)
pt3dadd(311.82, 230.25, 17.3, 3.07)
pt3dadd(311.82, 226.77, 17.3, 3.07)
pt3dadd(312.1, 226.45, 17.3, 3.07)
pt3dadd(312.38, 225.82, 17.3, 3.07)
pt3dadd(312.66, 225.19, 17.3, 3.07)
pt3dadd(312.94, 224.55, 17.3, 3.07)
pt3dadd(313.77, 223.6, 17.3, 3.07)
pt3dadd(314.05, 223.29, 17.3, 3.07)
pt3dadd(314.33, 222.65, 17.3, 3.07)
pt3dadd(314.61, 222.34, 17.3, 3.07)
pt3dadd(314.61, 221.7, 17.3, 3.07)
pt3dadd(314.89, 221.39, 17.3, 3.07)
pt3dadd(315.17, 221.07, 17.3, 3.07)
pt3dadd(315.72, 220.44, 17.3, 3.07)
pt3dadd(316, 220.12, 17.3, 3.07)
pt3dadd(316.28, 219.8, 17.3, 3.07)
pt3dadd(316.28, 219.17, 17.3, 3.07)
pt3dadd(316.56, 218.22, 17.3, 3.07)
pt3dadd(316.84, 217.9, 17.3, 3.07)
pt3dadd(317.39, 217.27, 17.3, 3.07)
pt3dadd(317.67, 216.95, 17.3, 3.07)
pt3dadd(317.95, 216.32, 17.3, 3.07)
pt3dadd(318.51, 216, 17.3, 3.07)
pt3dadd(318.79, 215.37, 17.3, 3.07)
pt3dadd(319.07, 215.06, 17.3, 3.07)
pt3dadd(319.35, 214.11, 17.3, 3.07)
pt3dadd(319.62, 213.47, 17.3, 3.07)
pt3dadd(319.62, 212.84, 17.3, 3.07)
pt3dadd(319.9, 212.52, 17.3, 3.07)
pt3dadd(319.9, 208.72, 17.3, 3.07)
pt3dadd(318.32, 209.7, 19.3, 3.07)
pt3dadd(320.46, 208.09, 19.3, 3.07)
pt3dadd(320.46, 207.14, 19.3, 3.07)
pt3dadd(320.77, 149.83, 0, 2.48)
pt3dadd(329.13, 101.34, 0, 2.48)
pt3dadd(328.82, 67.55, 0, 2.48)
}
dend[113] {pt3dclear()
pt3dadd(316.92, 404.13, -2.7, 5.43)
pt3dadd(319.15, 406.19, -1.7, 5.43)
pt3dadd(319.42, 406.19, -1.7, 5.43)
pt3dadd(319.7, 406.34, -1.7, 5.43)
pt3dadd(319.98, 406.5, -1.7, 5.43)
pt3dadd(320.12, 406.66, -1.7, 5.43)
pt3dadd(320.54, 406.82, -1.7, 5.43)
pt3dadd(320.68, 406.98, -1.7, 5.43)
pt3dadd(320.96, 407.14, -1.7, 5.43)
pt3dadd(321.1, 407.45, -1.7, 5.43)
pt3dadd(321.38, 407.45, -1.7, 5.43)
pt3dadd(321.65, 407.61, -1.7, 5.43)
pt3dadd(321.79, 407.77, -1.7, 5.43)
pt3dadd(321.93, 407.93, -1.7, 5.43)
pt3dadd(322.07, 408.09, -1.7, 5.43)
pt3dadd(322.21, 408.24, -1.7, 5.43)
pt3dadd(322.35, 408.56, -1.7, 5.43)
pt3dadd(322.49, 408.72, -1.7, 5.43)
pt3dadd(322.77, 408.88, -1.7, 5.43)
pt3dadd(323.05, 408.88, -1.7, 5.43)
pt3dadd(323.19, 409.03, -1.7, 5.43)
pt3dadd(323.47, 409.19, -1.7, 5.43)
pt3dadd(323.6, 409.35, -1.7, 5.43)
pt3dadd(323.88, 409.35, -1.7, 5.43)
pt3dadd(324.16, 409.51, -1.7, 5.43)
pt3dadd(324.3, 409.67, -1.7, 5.43)
pt3dadd(324.58, 409.67, -1.7, 5.43)
}
}
proc shape3d_170() {
dend[113] { pt3dadd(324.72, 409.83, -1.7, 5.43)
pt3dadd(325.14, 409.83, -1.7, 5.43)
pt3dadd(325.56, 409.98, -1.7, 5.43)
pt3dadd(325.83, 410.14, -1.7, 5.43)
pt3dadd(326.11, 410.14, -1.7, 5.43)
pt3dadd(326.39, 410.3, -1.7, 5.43)
pt3dadd(326.67, 410.3, -1.7, 5.43)
pt3dadd(326.81, 410.46, -1.7, 5.43)
pt3dadd(326.95, 410.62, -1.7, 5.43)
pt3dadd(327.37, 410.62, -1.7, 5.43)
pt3dadd(327.51, 410.78, -1.7, 5.43)
pt3dadd(327.79, 410.93, -1.7, 5.43)
pt3dadd(327.92, 411.09, -1.7, 5.43)
pt3dadd(328.06, 411.25, -1.7, 5.43)
pt3dadd(328.2, 411.41, -1.7, 5.43)
pt3dadd(328.48, 411.57, -1.7, 5.43)
pt3dadd(328.76, 411.73, -1.7, 5.43)
pt3dadd(328.9, 411.88, -1.7, 5.43)
pt3dadd(329.18, 412.04, -1.7, 5.43)
pt3dadd(329.32, 412.2, -1.7, 5.43)
pt3dadd(329.6, 412.36, -1.7, 5.43)
pt3dadd(329.88, 412.52, -1.7, 5.43)
pt3dadd(330.15, 412.52, -1.7, 5.43)
pt3dadd(330.29, 412.68, -1.7, 5.43)
pt3dadd(330.43, 412.83, -1.7, 5.43)
pt3dadd(330.71, 412.99, -1.7, 5.43)
pt3dadd(330.85, 413.15, -1.7, 5.43)
pt3dadd(331.13, 413.15, -1.7, 5.43)
pt3dadd(331.27, 413.31, -1.7, 5.43)
pt3dadd(331.55, 413.47, -1.7, 5.43)
pt3dadd(331.69, 413.62, -1.7, 5.43)
pt3dadd(331.83, 413.78, -1.7, 5.43)
pt3dadd(332.11, 413.78, -1.7, 5.43)
pt3dadd(332.24, 413.94, -1.7, 5.43)
pt3dadd(332.52, 414.1, -1.7, 5.43)
pt3dadd(332.8, 414.1, -1.7, 5.43)
pt3dadd(333.08, 414.26, -1.7, 5.43)
pt3dadd(333.22, 414.42, -1.7, 5.43)
pt3dadd(333.5, 414.57, -1.7, 5.43)
pt3dadd(333.78, 414.73, -1.7, 5.43)
pt3dadd(334.2, 414.89, -1.7, 5.43)
pt3dadd(334.47, 415.05, -1.7, 5.43)
pt3dadd(334.75, 415.21, -1.7, 5.43)
pt3dadd(334.89, 415.37, -1.7, 5.43)
pt3dadd(335.31, 415.52, -1.7, 5.43)
pt3dadd(335.59, 415.68, -1.7, 5.43)
pt3dadd(336.01, 415.84, -1.7, 5.43)
pt3dadd(336.15, 416, -1.7, 5.43)
pt3dadd(336.43, 416.16, -1.7, 5.43)
pt3dadd(336.84, 416.32, -1.7, 5.43)
pt3dadd(337.12, 416.47, -1.7, 5.43)
pt3dadd(337.4, 416.63, -1.7, 5.43)
pt3dadd(337.82, 416.79, -1.7, 5.43)
pt3dadd(338.1, 416.95, -1.7, 5.43)
pt3dadd(338.38, 417.11, -1.7, 5.43)
pt3dadd(338.66, 417.27, -1.7, 5.43)
pt3dadd(338.93, 417.58, -1.7, 5.43)
pt3dadd(339.21, 417.58, -1.7, 5.43)
pt3dadd(339.35, 417.9, -1.7, 5.43)
pt3dadd(339.63, 418.06, -1.7, 5.43)
pt3dadd(339.91, 418.21, -1.7, 5.43)
pt3dadd(340.19, 418.37, -1.7, 5.43)
pt3dadd(340.47, 418.69, -1.7, 5.43)
pt3dadd(340.75, 418.85, -1.7, 5.43)
pt3dadd(341.02, 419.01, -1.7, 5.43)
pt3dadd(341.44, 419.32, -1.7, 5.43)
pt3dadd(341.72, 419.48, -1.7, 5.43)
pt3dadd(342.14, 419.64, -1.7, 5.43)
pt3dadd(342.28, 419.8, -1.7, 5.43)
pt3dadd(342.56, 420.11, -1.7, 5.43)
pt3dadd(342.84, 420.27, -1.7, 5.43)
pt3dadd(343.11, 420.43, -1.7, 5.43)
pt3dadd(343.39, 420.59, -1.7, 5.43)
pt3dadd(343.81, 420.91, -1.7, 5.43)
pt3dadd(344.09, 421.06, -1.7, 5.43)
pt3dadd(344.51, 421.22, -1.7, 5.43)
pt3dadd(344.65, 421.38, -1.7, 5.43)
pt3dadd(344.93, 421.54, -1.7, 5.43)
pt3dadd(345.07, 421.7, -1.7, 5.43)
pt3dadd(345.34, 421.86, -1.7, 5.43)
pt3dadd(345.62, 421.86, -1.7, 5.43)
pt3dadd(345.9, 422.01, -1.7, 5.43)
pt3dadd(346.18, 422.17, -1.7, 5.43)
pt3dadd(346.46, 422.33, -1.7, 5.43)
pt3dadd(346.74, 422.33, -1.7, 5.43)
pt3dadd(347.02, 422.49, -1.7, 5.43)
pt3dadd(347.3, 422.65, -1.7, 5.43)
pt3dadd(347.71, 422.81, -1.7, 5.43)
pt3dadd(348.13, 422.96, -1.7, 5.43)
pt3dadd(348.27, 423.12, -1.7, 5.43)
pt3dadd(348.69, 423.12, -1.7, 5.43)
pt3dadd(349.25, 423.28, -1.7, 5.43)
pt3dadd(349.52, 423.44, -1.7, 5.43)
pt3dadd(350.08, 423.44, -1.7, 5.43)
pt3dadd(350.36, 423.6, -1.7, 5.43)
pt3dadd(350.92, 423.75, -1.7, 5.43)
pt3dadd(351.34, 423.75, -1.7, 5.43)
pt3dadd(351.89, 423.91, -1.7, 5.43)
pt3dadd(352.17, 424.07, -1.7, 5.43)
pt3dadd(352.45, 424.07, -1.7, 5.43)
pt3dadd(352.87, 424.23, -1.7, 5.43)
pt3dadd(353.29, 424.39, -1.7, 5.43)
pt3dadd(353.57, 424.39, -1.7, 5.43)
pt3dadd(353.84, 424.55, -1.7, 5.43)
pt3dadd(354.4, 424.55, -1.7, 5.43)
pt3dadd(354.68, 424.7, -1.7, 5.43)
pt3dadd(355.38, 424.7, -1.7, 5.43)
pt3dadd(355.66, 424.86, -1.7, 5.43)
pt3dadd(356.07, 425.02, -1.7, 5.43)
pt3dadd(356.63, 425.02, -1.7, 5.43)
pt3dadd(357.05, 425.18, -1.7, 5.43)
pt3dadd(357.89, 425.18, -1.7, 5.43)
pt3dadd(358.3, 425.34, -1.7, 5.43)
pt3dadd(358.86, 425.34, -1.7, 5.43)
pt3dadd(359.14, 425.5, -1.7, 5.43)
pt3dadd(359.84, 425.5, -1.7, 5.43)
pt3dadd(360.12, 425.65, -1.7, 5.43)
pt3dadd(361.23, 425.65, -1.7, 5.43)
pt3dadd(361.51, 425.81, -1.7, 5.43)
pt3dadd(361.93, 425.81, -1.7, 5.43)
pt3dadd(362.21, 425.97, -1.7, 5.43)
pt3dadd(363.04, 425.97, -1.7, 5.43)
pt3dadd(363.6, 426.13, -1.7, 5.43)
pt3dadd(369.45, 426.13, -1.7, 5.43)
pt3dadd(368.62, 426.6, -4.7, 5.02)
pt3dadd(369.03, 426.6, -4.7, 5.02)
pt3dadd(369.17, 426.76, -4.7, 5.02)
pt3dadd(369.73, 426.76, -4.7, 5.02)
pt3dadd(370.01, 426.92, -4.7, 5.02)
pt3dadd(370.29, 426.92, -4.7, 5.02)
pt3dadd(370.57, 427.08, -4.7, 5.02)
pt3dadd(370.85, 427.24, -4.7, 5.02)
pt3dadd(371.12, 427.24, -4.7, 5.02)
pt3dadd(371.54, 427.4, -4.7, 5.02)
pt3dadd(371.82, 427.55, -4.7, 5.02)
pt3dadd(372.38, 427.55, -4.7, 5.02)
pt3dadd(372.66, 427.71, -4.7, 5.02)
pt3dadd(386.73, 427.71, -4.7, 5.02)
}
dend[114] {pt3dclear()
pt3dadd(386.73, 427.71, -4.7, 5.02)
pt3dadd(387.71, 428.34, -4.7, 5.02)
pt3dadd(387.71, 428.66, -4.7, 5.02)
pt3dadd(387.85, 428.82, -4.7, 5.02)
pt3dadd(388.13, 428.98, -4.7, 5.02)
pt3dadd(388.26, 429.14, -4.7, 5.02)
pt3dadd(388.4, 429.45, -4.7, 5.02)
pt3dadd(388.54, 429.61, -4.7, 5.02)
pt3dadd(388.68, 429.77, -4.7, 5.02)
pt3dadd(388.68, 430.24, -4.7, 5.02)
pt3dadd(388.82, 430.56, -4.7, 5.02)
pt3dadd(388.96, 430.72, -4.7, 5.02)
pt3dadd(389.1, 431.04, -4.7, 5.02)
pt3dadd(389.24, 431.19, -4.7, 5.02)
pt3dadd(389.38, 431.35, -4.7, 5.02)
pt3dadd(389.52, 431.67, -4.7, 5.02)
pt3dadd(389.8, 431.83, -4.7, 5.02)
pt3dadd(389.8, 432.14, -4.7, 5.02)
pt3dadd(389.94, 432.3, -4.7, 5.02)
pt3dadd(390.22, 432.62, -4.7, 5.02)
pt3dadd(390.36, 432.78, -4.7, 5.02)
pt3dadd(390.49, 432.93, -4.7, 5.02)
pt3dadd(390.49, 433.41, -4.7, 5.02)
pt3dadd(390.63, 433.73, -4.7, 5.02)
pt3dadd(390.77, 433.88, -4.7, 5.02)
pt3dadd(390.77, 434.2, -4.7, 5.02)
pt3dadd(390.91, 434.36, -4.7, 5.02)
pt3dadd(391.05, 434.68, -4.7, 5.02)
pt3dadd(391.19, 434.99, -4.7, 5.02)
pt3dadd(391.33, 435.15, -4.7, 5.02)
pt3dadd(391.47, 435.31, -4.7, 5.02)
pt3dadd(391.47, 435.63, -4.7, 5.02)
pt3dadd(391.61, 435.78, -4.7, 5.02)
pt3dadd(391.61, 436.1, -4.7, 5.02)
pt3dadd(391.75, 436.26, -4.7, 5.02)
pt3dadd(391.89, 436.58, -4.7, 5.02)
pt3dadd(391.89, 436.89, -4.7, 5.02)
pt3dadd(392.03, 437.05, -4.7, 5.02)
pt3dadd(392.17, 437.21, -4.7, 5.02)
pt3dadd(392.31, 437.37, -4.7, 5.02)
pt3dadd(392.45, 437.68, -4.7, 5.02)
pt3dadd(392.58, 437.84, -4.7, 5.02)
pt3dadd(393.34, 437.5, -4.7, 5.02)
}
dend[115] {pt3dclear()
pt3dadd(393.34, 437.5, -4.7, 1.36)
pt3dadd(398.1, 433.64, 13.9, 1.36)
pt3dadd(398.69, 436.92, 13.9, 1.7)
pt3dadd(399.12, 437.21, 13.9, 1.7)
pt3dadd(399.37, 437.5, 13.9, 1.7)
pt3dadd(399.54, 437.6, 13.9, 1.7)
pt3dadd(399.71, 437.79, 13.9, 1.7)
pt3dadd(399.88, 437.98, 13.9, 1.7)
pt3dadd(399.97, 438.08, 13.9, 1.7)
pt3dadd(400.05, 438.17, 13.9, 1.7)
pt3dadd(400.31, 438.27, 13.9, 1.7)
pt3dadd(400.48, 438.56, 13.9, 1.7)
pt3dadd(400.56, 438.75, 13.9, 1.7)
pt3dadd(400.73, 438.85, 13.9, 1.7)
pt3dadd(400.82, 439.04, 13.9, 1.7)
pt3dadd(401.07, 439.04, 13.9, 1.7)
pt3dadd(401.24, 439.24, 13.9, 1.7)
pt3dadd(401.32, 439.52, 13.9, 1.7)
pt3dadd(401.58, 439.72, 13.9, 1.7)
}
}
proc shape3d_171() {
dend[115] { pt3dadd(401.83, 439.81, 13.9, 1.7)
pt3dadd(402.09, 440.2, 13.9, 1.7)
pt3dadd(402.26, 440.59, 13.9, 1.7)
pt3dadd(402.6, 440.88, 13.9, 1.7)
pt3dadd(402.85, 441.74, 13.9, 1.7)
pt3dadd(403.11, 442.03, 13.9, 1.7)
pt3dadd(403.36, 442.32, 13.9, 1.7)
pt3dadd(403.53, 442.71, 13.9, 1.7)
pt3dadd(403.79, 443, 13.9, 1.7)
pt3dadd(403.87, 443.09, 13.9, 1.7)
pt3dadd(404.04, 443.58, 13.9, 1.7)
pt3dadd(404.3, 443.87, 13.9, 1.7)
pt3dadd(404.47, 444.15, 13.9, 1.7)
pt3dadd(404.72, 444.44, 13.9, 1.7)
pt3dadd(404.89, 444.83, 13.9, 1.7)
pt3dadd(405.15, 445.12, 13.9, 1.7)
pt3dadd(405.4, 445.6, 13.9, 1.7)
pt3dadd(405.57, 445.99, 13.9, 1.7)
pt3dadd(405.74, 446.28, 13.9, 1.7)
pt3dadd(406, 446.57, 13.9, 1.7)
pt3dadd(406.17, 446.86, 13.9, 1.7)
pt3dadd(406.33, 447.14, 13.9, 1.7)
pt3dadd(406.42, 447.43, 13.9, 1.7)
pt3dadd(406.5, 447.72, 13.9, 1.7)
pt3dadd(406.76, 448.01, 13.9, 1.7)
pt3dadd(406.93, 448.3, 13.9, 1.7)
pt3dadd(407.1, 448.49, 13.9, 1.7)
pt3dadd(407.18, 448.78, 13.9, 1.7)
pt3dadd(407.35, 449.17, 13.9, 1.7)
pt3dadd(407.52, 449.46, 13.9, 1.7)
pt3dadd(407.61, 449.75, 13.9, 1.7)
pt3dadd(407.78, 450.13, 13.9, 1.7)
pt3dadd(408.03, 450.52, 13.9, 1.7)
pt3dadd(408.2, 451, 13.9, 1.7)
pt3dadd(408.46, 451.48, 13.9, 1.7)
pt3dadd(408.63, 451.77, 13.9, 1.7)
pt3dadd(408.71, 452.06, 13.9, 1.7)
pt3dadd(408.88, 452.35, 13.9, 1.7)
pt3dadd(408.97, 452.74, 13.9, 1.7)
pt3dadd(409.22, 453.12, 13.9, 1.7)
pt3dadd(409.31, 453.41, 13.9, 1.7)
pt3dadd(409.48, 453.9, 13.9, 1.7)
pt3dadd(409.65, 454.19, 13.9, 1.7)
pt3dadd(409.82, 454.47, 13.9, 1.7)
pt3dadd(409.9, 454.86, 13.9, 1.7)
pt3dadd(409.99, 455.05, 13.9, 1.7)
pt3dadd(410.24, 455.25, 13.9, 1.7)
pt3dadd(410.33, 455.44, 13.9, 1.7)
pt3dadd(410.5, 455.73, 13.9, 1.7)
pt3dadd(410.58, 455.92, 13.9, 1.7)
pt3dadd(410.67, 456.21, 13.9, 1.7)
pt3dadd(410.75, 456.4, 13.9, 1.7)
pt3dadd(410.92, 456.5, 13.9, 1.7)
pt3dadd(411.01, 456.69, 13.9, 1.7)
pt3dadd(411.09, 456.89, 13.9, 1.7)
pt3dadd(411.09, 457.08, 13.9, 1.7)
pt3dadd(411.18, 457.18, 13.9, 1.7)
pt3dadd(411.26, 457.27, 13.9, 1.7)
pt3dadd(411.35, 457.37, 13.9, 1.7)
pt3dadd(411.43, 457.46, 13.9, 1.7)
pt3dadd(411.43, 457.85, 13.9, 1.7)
pt3dadd(411.51, 457.95, 13.9, 1.7)
pt3dadd(411.6, 458.04, 13.9, 1.7)
pt3dadd(411.68, 458.14, 13.9, 1.7)
pt3dadd(411.43, 458.24, 15.9, 1.87)
pt3dadd(411.43, 458.33, 15.9, 1.87)
pt3dadd(411.6, 458.43, 15.9, 1.87)
pt3dadd(411.68, 458.72, 15.9, 1.87)
pt3dadd(411.85, 458.91, 15.9, 1.87)
pt3dadd(411.94, 459.2, 15.9, 1.87)
pt3dadd(412.02, 459.59, 15.9, 1.87)
pt3dadd(412.19, 459.97, 15.9, 1.87)
pt3dadd(412.28, 460.45, 15.9, 1.87)
pt3dadd(412.45, 460.74, 15.9, 1.87)
pt3dadd(412.53, 461.23, 15.9, 1.87)
pt3dadd(412.62, 461.61, 15.9, 1.87)
pt3dadd(412.79, 461.9, 15.9, 1.87)
pt3dadd(412.87, 462.19, 15.9, 1.87)
pt3dadd(412.96, 462.29, 15.9, 1.87)
pt3dadd(413.04, 462.38, 15.9, 1.87)
pt3dadd(413.04, 462.67, 15.9, 1.87)
pt3dadd(413.21, 462.77, 15.9, 1.87)
pt3dadd(413.21, 462.96, 15.9, 1.87)
pt3dadd(413.3, 463.16, 15.9, 1.87)
pt3dadd(413.55, 463.44, 15.9, 1.87)
pt3dadd(413.64, 463.54, 15.9, 1.87)
pt3dadd(413.72, 463.73, 15.9, 1.87)
pt3dadd(413.81, 463.93, 15.9, 1.87)
pt3dadd(413.98, 464.02, 15.9, 1.87)
pt3dadd(414.06, 464.12, 15.9, 1.87)
pt3dadd(414.15, 464.31, 15.9, 1.87)
pt3dadd(414.23, 464.51, 15.9, 1.87)
pt3dadd(414.4, 464.7, 15.9, 1.87)
pt3dadd(414.49, 464.79, 15.9, 1.87)
pt3dadd(414.57, 464.89, 15.9, 1.87)
pt3dadd(414.66, 465.08, 15.9, 1.87)
pt3dadd(414.74, 465.28, 15.9, 1.87)
pt3dadd(414.91, 465.37, 15.9, 1.87)
pt3dadd(415, 465.57, 15.9, 1.87)
pt3dadd(415, 465.76, 15.9, 1.87)
pt3dadd(415.17, 465.95, 15.9, 1.87)
pt3dadd(415.25, 466.05, 15.9, 1.87)
pt3dadd(415.34, 466.24, 15.9, 1.87)
pt3dadd(415.42, 466.34, 15.9, 1.87)
pt3dadd(415.59, 466.53, 15.9, 1.87)
pt3dadd(415.68, 466.63, 15.9, 1.87)
pt3dadd(415.68, 466.82, 15.9, 1.87)
pt3dadd(415.76, 467.01, 15.9, 1.87)
pt3dadd(415.85, 467.11, 15.9, 1.87)
pt3dadd(416.02, 467.3, 15.9, 1.87)
pt3dadd(416.02, 467.5, 15.9, 1.87)
pt3dadd(416.1, 467.69, 15.9, 1.87)
pt3dadd(416.19, 467.78, 15.9, 1.87)
pt3dadd(416.27, 467.98, 15.9, 1.87)
pt3dadd(416.36, 468.07, 15.9, 1.87)
pt3dadd(416.44, 468.17, 15.9, 1.87)
pt3dadd(416.44, 468.36, 15.9, 1.87)
pt3dadd(416.53, 468.56, 15.9, 1.87)
pt3dadd(416.61, 468.75, 15.9, 1.87)
pt3dadd(416.61, 469.14, 15.9, 1.87)
pt3dadd(416.7, 469.33, 15.9, 1.87)
pt3dadd(416.7, 469.62, 15.9, 1.87)
pt3dadd(416.78, 469.71, 15.9, 1.87)
pt3dadd(416.78, 470.1, 15.9, 1.87)
pt3dadd(416.86, 470.2, 15.9, 1.87)
pt3dadd(416.86, 470.77, 15.9, 1.87)
pt3dadd(416.95, 470.97, 15.9, 1.87)
pt3dadd(416.95, 475.12, 15.9, 1.87)
pt3dadd(417.03, 475.21, 15.9, 1.87)
pt3dadd(417.03, 475.4, 15.9, 1.87)
pt3dadd(417.12, 475.6, 15.9, 1.87)
pt3dadd(417.12, 475.89, 15.9, 1.87)
pt3dadd(417.2, 475.98, 15.9, 1.87)
pt3dadd(417.2, 476.18, 15.9, 1.87)
pt3dadd(416.7, 475.98, 15.9, 1.87)
pt3dadd(417.03, 476.37, 15.9, 1.87)
pt3dadd(417.12, 476.47, 15.9, 1.87)
pt3dadd(417.12, 476.66, 15.9, 1.87)
pt3dadd(417.29, 476.75, 15.9, 1.87)
pt3dadd(417.37, 476.85, 15.9, 1.87)
pt3dadd(417.46, 476.95, 15.9, 1.87)
pt3dadd(417.54, 477.14, 15.9, 1.87)
pt3dadd(417.63, 477.33, 15.9, 1.87)
pt3dadd(417.71, 477.43, 15.9, 1.87)
pt3dadd(417.54, 477.43, 15.9, 1.87)
pt3dadd(417.63, 477.24, 15.9, 1.87)
pt3dadd(417.63, 476.95, 15.9, 1.87)
pt3dadd(417.71, 477.04, 15.9, 1.87)
pt3dadd(417.8, 477.24, 15.9, 1.87)
pt3dadd(417.88, 477.62, 15.9, 1.87)
pt3dadd(417.97, 477.82, 15.9, 1.87)
pt3dadd(418.14, 478.3, 15.9, 1.87)
pt3dadd(418.22, 478.59, 15.9, 1.87)
pt3dadd(418.39, 478.97, 15.9, 1.87)
pt3dadd(418.39, 479.36, 15.9, 1.87)
pt3dadd(418.56, 479.74, 15.9, 1.87)
pt3dadd(418.73, 480.23, 15.9, 1.87)
pt3dadd(418.73, 480.61, 15.9, 1.87)
pt3dadd(418.82, 480.9, 15.9, 1.87)
pt3dadd(418.9, 481.19, 15.9, 1.87)
pt3dadd(418.99, 481.48, 15.9, 1.87)
pt3dadd(419.07, 481.58, 15.9, 1.87)
pt3dadd(419.16, 481.87, 15.9, 1.87)
pt3dadd(419.24, 482.16, 15.9, 1.87)
pt3dadd(419.41, 482.35, 15.9, 1.87)
pt3dadd(419.5, 482.64, 15.9, 1.87)
pt3dadd(419.67, 483.02, 15.9, 1.87)
pt3dadd(419.75, 483.22, 15.9, 1.87)
pt3dadd(419.84, 483.6, 15.9, 1.87)
pt3dadd(419.92, 483.89, 15.9, 1.87)
pt3dadd(420.01, 484.09, 15.9, 1.87)
pt3dadd(420.18, 484.18, 15.9, 1.87)
pt3dadd(420.18, 484.47, 15.9, 1.87)
pt3dadd(420.26, 484.66, 15.9, 1.87)
pt3dadd(420.35, 484.76, 15.9, 1.87)
pt3dadd(420.35, 484.95, 15.9, 1.87)
pt3dadd(420.43, 485.15, 15.9, 1.87)
pt3dadd(420.52, 485.34, 15.9, 1.87)
pt3dadd(420.69, 485.53, 15.9, 1.87)
pt3dadd(420.86, 485.82, 15.9, 1.87)
pt3dadd(420.86, 486.11, 15.9, 1.87)
pt3dadd(422.55, 486.11, 15.9, 1.87)
}
dend[116] {pt3dclear()
pt3dadd(422.55, 486.11, 15.9, 1.87)
pt3dadd(421.03, 486.5, 15.9, 1.87)
pt3dadd(421.11, 486.98, 15.9, 1.87)
pt3dadd(421.28, 487.17, 15.9, 1.87)
pt3dadd(421.37, 487.46, 15.9, 1.87)
pt3dadd(421.54, 487.94, 15.9, 1.87)
pt3dadd(421.62, 488.14, 15.9, 1.87)
pt3dadd(421.79, 488.62, 15.9, 1.87)
pt3dadd(421.88, 488.81, 15.9, 1.87)
pt3dadd(421.96, 489, 15.9, 1.87)
pt3dadd(422.13, 489.29, 15.9, 1.87)
pt3dadd(422.13, 489.58, 15.9, 1.87)
pt3dadd(422.21, 489.78, 15.9, 1.87)
pt3dadd(422.38, 490.16, 15.9, 1.87)
pt3dadd(422.64, 490.64, 15.9, 1.87)
pt3dadd(422.72, 490.84, 15.9, 1.87)
pt3dadd(422.89, 491.03, 15.9, 1.87)
pt3dadd(422.98, 491.32, 15.9, 1.87)
}
}
proc shape3d_172() {
dend[116] { pt3dadd(423.15, 491.51, 15.9, 1.87)
pt3dadd(423.15, 491.8, 15.9, 1.87)
pt3dadd(423.32, 491.99, 15.9, 1.87)
pt3dadd(423.4, 492.28, 15.9, 1.87)
pt3dadd(423.66, 492.48, 15.9, 1.87)
pt3dadd(423.83, 492.77, 15.9, 1.87)
pt3dadd(423.83, 492.96, 15.9, 1.87)
pt3dadd(424, 493.25, 15.9, 1.87)
pt3dadd(424.08, 493.54, 15.9, 1.87)
pt3dadd(424.25, 493.83, 15.9, 1.87)
pt3dadd(424.34, 494.02, 15.9, 1.87)
pt3dadd(424.51, 494.31, 15.9, 1.87)
pt3dadd(424.59, 494.6, 15.9, 1.87)
pt3dadd(424.76, 494.79, 15.9, 1.87)
pt3dadd(424.85, 494.98, 15.9, 1.87)
pt3dadd(424.93, 495.27, 15.9, 1.87)
pt3dadd(425.1, 495.47, 15.9, 1.87)
pt3dadd(425.19, 495.66, 15.9, 1.87)
pt3dadd(425.27, 495.95, 15.9, 1.87)
pt3dadd(425.44, 496.24, 15.9, 1.87)
pt3dadd(425.53, 496.33, 15.9, 1.87)
pt3dadd(425.61, 496.62, 15.9, 1.87)
pt3dadd(425.78, 496.91, 15.9, 1.87)
pt3dadd(425.87, 497.2, 15.9, 1.87)
pt3dadd(426.04, 497.3, 15.9, 1.87)
pt3dadd(426.21, 497.49, 15.9, 1.87)
pt3dadd(426.29, 497.68, 15.9, 1.87)
pt3dadd(426.38, 497.97, 15.9, 1.87)
pt3dadd(426.55, 498.07, 15.9, 1.87)
pt3dadd(426.63, 498.17, 15.9, 1.87)
pt3dadd(426.72, 498.46, 15.9, 1.87)
pt3dadd(426.8, 498.65, 15.9, 1.87)
pt3dadd(426.89, 498.94, 15.9, 1.87)
pt3dadd(426.97, 499.13, 15.9, 1.87)
pt3dadd(427.14, 499.42, 15.9, 1.87)
pt3dadd(427.22, 499.61, 15.9, 1.87)
pt3dadd(427.31, 499.81, 15.9, 1.87)
pt3dadd(427.31, 500.1, 15.9, 1.87)
pt3dadd(427.39, 500.29, 15.9, 1.87)
pt3dadd(427.56, 500.39, 15.9, 1.87)
pt3dadd(427.56, 500.58, 15.9, 1.87)
pt3dadd(427.65, 500.77, 15.9, 1.87)
pt3dadd(427.73, 501.06, 15.9, 1.87)
pt3dadd(427.82, 501.35, 15.9, 1.87)
pt3dadd(427.9, 501.74, 15.9, 1.87)
pt3dadd(427.9, 502.31, 15.9, 1.87)
pt3dadd(427.73, 502.31, 16.9, 1.95)
pt3dadd(427.82, 502.31, 16.9, 1.95)
pt3dadd(427.9, 502.51, 16.9, 1.95)
pt3dadd(427.99, 502.8, 16.9, 1.95)
pt3dadd(428.16, 502.99, 16.9, 1.95)
pt3dadd(428.24, 503.28, 16.9, 1.95)
pt3dadd(428.33, 503.47, 16.9, 1.95)
pt3dadd(428.5, 503.76, 16.9, 1.95)
pt3dadd(428.58, 503.95, 16.9, 1.95)
pt3dadd(428.67, 504.34, 16.9, 1.95)
pt3dadd(428.84, 504.63, 16.9, 1.95)
pt3dadd(428.92, 505.01, 16.9, 1.95)
pt3dadd(429.18, 505.4, 16.9, 1.95)
pt3dadd(429.18, 505.69, 16.9, 1.95)
pt3dadd(429.35, 505.98, 16.9, 1.95)
pt3dadd(429.43, 506.27, 16.9, 1.95)
pt3dadd(429.6, 506.56, 16.9, 1.95)
pt3dadd(429.77, 506.94, 16.9, 1.95)
pt3dadd(429.94, 507.33, 16.9, 1.95)
pt3dadd(430.11, 507.72, 16.9, 1.95)
pt3dadd(430.2, 507.91, 16.9, 1.95)
pt3dadd(430.37, 508.2, 16.9, 1.95)
pt3dadd(430.45, 508.49, 16.9, 1.95)
pt3dadd(430.62, 508.78, 16.9, 1.95)
pt3dadd(430.71, 509.16, 16.9, 1.95)
pt3dadd(430.88, 509.45, 16.9, 1.95)
pt3dadd(430.96, 509.74, 16.9, 1.95)
pt3dadd(431.13, 509.93, 16.9, 1.95)
pt3dadd(431.22, 510.13, 16.9, 1.95)
pt3dadd(431.3, 510.32, 16.9, 1.95)
pt3dadd(431.39, 510.61, 16.9, 1.95)
pt3dadd(431.47, 510.8, 16.9, 1.95)
pt3dadd(431.56, 511.09, 16.9, 1.95)
pt3dadd(431.73, 511.38, 16.9, 1.95)
pt3dadd(431.81, 511.57, 16.9, 1.95)
pt3dadd(431.9, 511.86, 16.9, 1.95)
pt3dadd(432.07, 512.15, 16.9, 1.95)
pt3dadd(432.24, 512.44, 16.9, 1.95)
pt3dadd(432.49, 512.63, 16.9, 1.95)
pt3dadd(432.57, 512.92, 16.9, 1.95)
pt3dadd(432.66, 513.12, 16.9, 1.95)
pt3dadd(432.83, 513.41, 16.9, 1.95)
pt3dadd(433, 513.7, 16.9, 1.95)
pt3dadd(433.08, 513.98, 16.9, 1.95)
pt3dadd(433.17, 514.18, 16.9, 1.95)
pt3dadd(433.34, 514.47, 16.9, 1.95)
pt3dadd(433.51, 514.66, 16.9, 1.95)
pt3dadd(433.59, 514.85, 16.9, 1.95)
pt3dadd(433.68, 515.05, 16.9, 1.95)
pt3dadd(433.85, 515.34, 16.9, 1.95)
pt3dadd(433.93, 515.53, 16.9, 1.95)
pt3dadd(434.02, 515.82, 16.9, 1.95)
pt3dadd(434.19, 516.11, 16.9, 1.95)
pt3dadd(434.27, 516.3, 16.9, 1.95)
pt3dadd(434.44, 516.49, 16.9, 1.95)
pt3dadd(434.61, 516.69, 16.9, 1.95)
pt3dadd(434.7, 516.97, 16.9, 1.95)
pt3dadd(434.78, 517.17, 16.9, 1.95)
pt3dadd(434.87, 517.26, 16.9, 1.95)
pt3dadd(434.95, 517.46, 16.9, 1.95)
pt3dadd(435.04, 517.65, 16.9, 1.95)
pt3dadd(435.12, 517.94, 16.9, 1.95)
pt3dadd(435.29, 518.13, 16.9, 1.95)
pt3dadd(435.46, 518.42, 16.9, 1.95)
pt3dadd(435.55, 518.71, 16.9, 1.95)
pt3dadd(435.63, 519, 16.9, 1.95)
pt3dadd(435.8, 519.19, 16.9, 1.95)
pt3dadd(435.89, 519.39, 16.9, 1.95)
pt3dadd(435.97, 519.58, 16.9, 1.95)
pt3dadd(436.06, 519.87, 16.9, 1.95)
pt3dadd(436.48, 520.35, 16.9, 1.95)
pt3dadd(436.57, 520.64, 16.9, 1.95)
pt3dadd(436.65, 520.83, 16.9, 1.95)
pt3dadd(436.82, 521.12, 16.9, 1.95)
pt3dadd(436.91, 521.41, 16.9, 1.95)
pt3dadd(437.08, 521.7, 16.9, 1.95)
pt3dadd(437.25, 521.99, 16.9, 1.95)
pt3dadd(437.33, 522.18, 16.9, 1.95)
pt3dadd(437.42, 522.38, 16.9, 1.95)
pt3dadd(437.42, 522.57, 16.9, 1.95)
pt3dadd(437.58, 522.67, 16.9, 1.95)
pt3dadd(437.67, 522.86, 16.9, 1.95)
pt3dadd(437.75, 523.05, 16.9, 1.95)
pt3dadd(437.84, 523.24, 16.9, 1.95)
pt3dadd(438.01, 523.73, 16.9, 1.95)
pt3dadd(438.09, 523.92, 16.9, 1.95)
pt3dadd(438.18, 524.21, 16.9, 1.95)
pt3dadd(438.26, 524.4, 16.9, 1.95)
pt3dadd(438.43, 524.5, 16.9, 1.95)
pt3dadd(438.52, 524.79, 16.9, 1.95)
pt3dadd(438.52, 525.08, 16.9, 1.95)
pt3dadd(438.6, 525.17, 16.9, 1.95)
pt3dadd(438.69, 525.27, 16.9, 1.95)
pt3dadd(438.77, 525.37, 16.9, 1.95)
pt3dadd(438.86, 525.56, 16.9, 1.95)
pt3dadd(438.86, 526.04, 16.9, 1.95)
pt3dadd(438.86, 525.66, 18.9, 2.04)
pt3dadd(438.86, 526.62, 18.9, 2.04)
pt3dadd(439.03, 527.01, 18.9, 2.04)
pt3dadd(439.2, 527.58, 18.9, 2.04)
pt3dadd(439.2, 528.36, 18.9, 2.04)
pt3dadd(439.37, 528.93, 18.9, 2.04)
pt3dadd(439.71, 529.71, 18.9, 2.04)
pt3dadd(439.88, 530.48, 18.9, 2.04)
pt3dadd(440.22, 531.25, 18.9, 2.04)
pt3dadd(440.39, 531.83, 18.9, 2.04)
pt3dadd(440.73, 532.79, 18.9, 2.04)
pt3dadd(440.9, 533.37, 18.9, 2.04)
pt3dadd(441.07, 533.95, 18.9, 2.04)
pt3dadd(441.24, 534.14, 18.9, 2.04)
pt3dadd(441.58, 534.53, 18.9, 2.04)
pt3dadd(441.58, 535.11, 18.9, 2.04)
pt3dadd(441.92, 535.69, 18.9, 2.04)
pt3dadd(442.09, 536.26, 18.9, 2.04)
pt3dadd(442.43, 536.46, 18.9, 2.04)
pt3dadd(442.43, 537.04, 18.9, 2.04)
pt3dadd(442.6, 537.23, 18.9, 2.04)
pt3dadd(442.76, 537.62, 18.9, 2.04)
pt3dadd(443.1, 537.81, 18.9, 2.04)
pt3dadd(443.27, 538.19, 18.9, 2.04)
pt3dadd(443.44, 538.58, 18.9, 2.04)
pt3dadd(443.61, 538.97, 18.9, 2.04)
pt3dadd(443.78, 539.74, 18.9, 2.04)
pt3dadd(443.78, 540.12, 18.9, 2.04)
pt3dadd(443.95, 540.51, 18.9, 2.04)
pt3dadd(444.29, 540.89, 18.9, 2.04)
pt3dadd(444.29, 541.47, 18.9, 2.04)
pt3dadd(444.63, 541.86, 18.9, 2.04)
pt3dadd(444.97, 542.44, 18.9, 2.04)
pt3dadd(444.97, 543.4, 18.9, 2.04)
pt3dadd(445.31, 544.17, 18.9, 2.04)
pt3dadd(445.48, 544.37, 18.9, 2.04)
pt3dadd(445.48, 545.14, 18.9, 2.04)
pt3dadd(445.82, 546.1, 18.9, 2.04)
pt3dadd(445.99, 546.49, 18.9, 2.04)
pt3dadd(446.16, 546.87, 18.9, 2.04)
pt3dadd(446.33, 547.26, 18.9, 2.04)
pt3dadd(446.33, 547.84, 18.9, 2.04)
pt3dadd(446.5, 548.22, 18.9, 2.04)
pt3dadd(446.67, 548.61, 18.9, 2.04)
pt3dadd(446.67, 549.58, 18.9, 2.04)
pt3dadd(446.84, 549.96, 18.9, 2.04)
pt3dadd(447.01, 550.35, 18.9, 2.04)
pt3dadd(447.18, 550.73, 18.9, 2.04)
pt3dadd(447.18, 551.12, 18.9, 2.04)
pt3dadd(447.35, 551.31, 18.9, 2.04)
pt3dadd(447.35, 551.89, 18.9, 2.04)
pt3dadd(447.52, 552.08, 18.9, 2.04)
pt3dadd(447.69, 552.28, 18.9, 2.04)
pt3dadd(447.69, 552.66, 18.9, 2.04)
pt3dadd(447.86, 552.85, 18.9, 2.04)
pt3dadd(448.03, 553.05, 18.9, 2.04)
pt3dadd(448.2, 553.43, 18.9, 2.04)
pt3dadd(448.03, 553.43, 21.9, 2.04)
}
}
proc shape3d_173() {
dend[116] { pt3dadd(448.03, 554.01, 21.9, 2.04)
pt3dadd(448.37, 554.4, 21.9, 2.04)
pt3dadd(448.37, 554.98, 21.9, 2.04)
pt3dadd(448.54, 555.55, 21.9, 2.04)
pt3dadd(448.88, 555.94, 21.9, 2.04)
pt3dadd(448.88, 556.33, 21.9, 2.04)
pt3dadd(449.05, 556.91, 21.9, 2.04)
pt3dadd(449.39, 557.48, 21.9, 2.04)
pt3dadd(449.56, 557.87, 21.9, 2.04)
pt3dadd(449.73, 558.26, 21.9, 2.04)
pt3dadd(449.9, 558.64, 21.9, 2.04)
pt3dadd(449.9, 559.22, 21.9, 2.04)
pt3dadd(450.07, 559.61, 21.9, 2.04)
pt3dadd(450.24, 559.8, 21.9, 2.04)
pt3dadd(450.41, 560.38, 21.9, 2.04)
pt3dadd(450.58, 560.76, 21.9, 2.04)
pt3dadd(450.75, 561.15, 21.9, 2.04)
pt3dadd(450.75, 561.53, 21.9, 2.04)
pt3dadd(451.26, 562.11, 21.9, 2.04)
pt3dadd(451.43, 562.5, 21.9, 2.04)
pt3dadd(451.43, 563.08, 21.9, 2.04)
pt3dadd(451.6, 563.46, 21.9, 2.04)
pt3dadd(451.77, 563.85, 21.9, 2.04)
pt3dadd(451.94, 564.04, 21.9, 2.04)
pt3dadd(451.94, 564.62, 21.9, 2.04)
pt3dadd(452.28, 564.81, 21.9, 2.04)
pt3dadd(452.45, 565.39, 21.9, 2.04)
pt3dadd(452.62, 566.16, 21.9, 2.04)
pt3dadd(452.96, 566.74, 21.9, 2.04)
pt3dadd(453.13, 567.51, 21.9, 2.04)
pt3dadd(453.29, 568.09, 21.9, 2.04)
pt3dadd(453.63, 568.48, 21.9, 2.04)
pt3dadd(453.63, 569.25, 21.9, 2.04)
pt3dadd(453.97, 569.64, 21.9, 2.04)
pt3dadd(454.14, 570.02, 21.9, 2.04)
pt3dadd(454.31, 570.6, 21.9, 2.04)
pt3dadd(454.31, 571.57, 21.9, 2.04)
pt3dadd(454.65, 571.95, 21.9, 2.04)
pt3dadd(454.82, 572.14, 21.9, 2.04)
pt3dadd(454.99, 572.53, 21.9, 2.04)
pt3dadd(455.33, 572.92, 21.9, 2.04)
pt3dadd(455.67, 573.49, 21.9, 2.04)
pt3dadd(456.01, 574.46, 21.9, 2.04)
pt3dadd(456.35, 575.23, 21.9, 2.04)
pt3dadd(456.52, 576.2, 21.9, 2.04)
pt3dadd(457.03, 576.97, 21.9, 2.04)
pt3dadd(457.54, 578.12, 21.9, 2.04)
pt3dadd(457.88, 578.9, 21.9, 2.04)
pt3dadd(458.22, 579.67, 21.9, 2.04)
pt3dadd(458.56, 580.05, 21.9, 2.04)
pt3dadd(458.73, 580.63, 21.9, 2.04)
pt3dadd(458.9, 581.21, 21.9, 2.04)
pt3dadd(459.24, 581.79, 21.9, 2.04)
pt3dadd(459.58, 582.18, 21.9, 2.04)
pt3dadd(459.75, 582.75, 21.9, 2.04)
pt3dadd(460.09, 583.14, 21.9, 2.04)
pt3dadd(460.43, 583.72, 21.9, 2.04)
pt3dadd(460.6, 584.1, 21.9, 2.04)
pt3dadd(460.77, 584.49, 21.9, 2.04)
pt3dadd(461.11, 584.88, 21.9, 2.04)
pt3dadd(461.28, 585.26, 21.9, 2.04)
pt3dadd(461.45, 585.45, 21.9, 2.04)
pt3dadd(461.79, 585.65, 21.9, 2.04)
pt3dadd(462.13, 586.03, 21.9, 2.04)
pt3dadd(462.47, 586.23, 21.9, 2.04)
pt3dadd(462.64, 586.42, 21.9, 2.04)
pt3dadd(462.81, 586.61, 21.9, 2.04)
pt3dadd(462.98, 586.8, 21.9, 2.04)
pt3dadd(463.15, 587, 21.9, 2.04)
pt3dadd(463.32, 587.19, 21.9, 2.04)
pt3dadd(462.13, 586.03, 24.9, 2.04)
pt3dadd(462.13, 585.84, 24.9, 2.04)
pt3dadd(462.3, 586.03, 24.9, 2.04)
pt3dadd(462.47, 586.23, 24.9, 2.04)
pt3dadd(462.64, 586.61, 24.9, 2.04)
pt3dadd(462.81, 587.38, 24.9, 2.04)
pt3dadd(463.15, 587.96, 24.9, 2.04)
pt3dadd(463.32, 588.73, 24.9, 2.04)
pt3dadd(463.65, 589.31, 24.9, 2.04)
pt3dadd(463.99, 590.28, 24.9, 2.04)
pt3dadd(464.16, 590.86, 24.9, 2.04)
pt3dadd(464.33, 591.24, 24.9, 2.04)
pt3dadd(464.67, 591.63, 24.9, 2.04)
pt3dadd(465.01, 591.82, 24.9, 2.04)
pt3dadd(465.01, 592.21, 24.9, 2.04)
pt3dadd(465.18, 592.4, 24.9, 2.04)
pt3dadd(465.35, 592.78, 24.9, 2.04)
pt3dadd(465.52, 593.17, 24.9, 2.04)
pt3dadd(465.69, 593.56, 24.9, 2.04)
pt3dadd(465.86, 593.75, 24.9, 2.04)
pt3dadd(466.2, 594.33, 24.9, 2.04)
pt3dadd(466.37, 594.71, 24.9, 2.04)
pt3dadd(466.54, 595.1, 24.9, 2.04)
pt3dadd(466.71, 595.49, 24.9, 2.04)
pt3dadd(466.88, 595.87, 24.9, 2.04)
pt3dadd(467.05, 596.45, 24.9, 2.04)
pt3dadd(467.22, 596.84, 24.9, 2.04)
pt3dadd(467.39, 597.22, 24.9, 2.04)
pt3dadd(467.56, 597.8, 24.9, 2.04)
pt3dadd(467.9, 598.19, 24.9, 2.04)
pt3dadd(468.07, 598.76, 24.9, 2.04)
pt3dadd(468.24, 599.15, 24.9, 2.04)
pt3dadd(468.41, 599.34, 24.9, 2.04)
pt3dadd(468.58, 599.92, 24.9, 2.04)
pt3dadd(468.58, 600.31, 24.9, 2.04)
pt3dadd(468.75, 600.5, 24.9, 2.04)
pt3dadd(468.92, 600.69, 24.9, 2.04)
pt3dadd(469.09, 601.08, 24.9, 2.04)
pt3dadd(469.26, 601.66, 24.9, 2.04)
pt3dadd(469.6, 602.24, 24.9, 2.04)
pt3dadd(469.77, 602.62, 24.9, 2.04)
pt3dadd(469.94, 603.01, 24.9, 2.04)
pt3dadd(470.28, 603.2, 24.9, 2.04)
pt3dadd(470.45, 603.59, 24.9, 2.04)
pt3dadd(470.62, 603.97, 24.9, 2.04)
pt3dadd(471.13, 604.55, 24.9, 2.04)
pt3dadd(471.3, 604.94, 24.9, 2.04)
pt3dadd(471.81, 605.52, 24.9, 2.04)
pt3dadd(471.98, 605.9, 24.9, 2.04)
pt3dadd(472.15, 606.29, 24.9, 2.04)
pt3dadd(472.32, 606.67, 24.9, 2.04)
pt3dadd(472.49, 607.06, 24.9, 2.04)
pt3dadd(472.66, 607.45, 24.9, 2.04)
pt3dadd(473, 607.64, 24.9, 2.04)
pt3dadd(473, 608.02, 24.9, 2.04)
pt3dadd(473.17, 608.22, 24.9, 2.04)
pt3dadd(473.34, 608.6, 24.9, 2.04)
pt3dadd(473.68, 608.99, 24.9, 2.04)
pt3dadd(473.85, 609.37, 24.9, 2.04)
pt3dadd(474.01, 609.76, 24.9, 2.04)
pt3dadd(474.35, 610.34, 24.9, 2.04)
pt3dadd(474.52, 610.72, 24.9, 2.04)
pt3dadd(474.69, 611.3, 24.9, 2.04)
pt3dadd(474.86, 611.5, 24.9, 2.04)
pt3dadd(475.2, 611.88, 24.9, 2.04)
pt3dadd(475.2, 612.65, 24.9, 2.04)
pt3dadd(475.54, 613.04, 24.9, 2.04)
pt3dadd(475.71, 613.62, 24.9, 2.04)
pt3dadd(475.88, 614, 24.9, 2.04)
pt3dadd(476.22, 614.58, 24.9, 2.04)
pt3dadd(476.39, 615.16, 24.9, 2.04)
pt3dadd(476.73, 615.74, 24.9, 2.04)
pt3dadd(477.07, 616.13, 24.9, 2.04)
pt3dadd(477.24, 616.7, 24.9, 2.04)
pt3dadd(477.75, 617.09, 24.9, 2.04)
pt3dadd(477.75, 617.67, 24.9, 2.04)
pt3dadd(478.09, 617.86, 24.9, 2.04)
pt3dadd(478.26, 618.25, 24.9, 2.04)
pt3dadd(478.43, 618.83, 24.9, 2.04)
pt3dadd(478.6, 619.02, 24.9, 2.04)
pt3dadd(478.77, 619.41, 24.9, 2.04)
pt3dadd(478.94, 619.79, 24.9, 2.04)
pt3dadd(479.11, 620.18, 24.9, 2.04)
pt3dadd(479.28, 620.56, 24.9, 2.04)
pt3dadd(479.45, 620.95, 24.9, 2.04)
pt3dadd(479.62, 621.33, 24.9, 2.04)
pt3dadd(479.79, 621.72, 24.9, 2.04)
pt3dadd(480.13, 622.3, 24.9, 2.04)
pt3dadd(480.3, 622.68, 24.9, 2.04)
pt3dadd(480.47, 623.07, 24.9, 2.04)
pt3dadd(480.47, 623.46, 24.9, 2.04)
pt3dadd(480.64, 624.03, 24.9, 2.04)
pt3dadd(480.81, 624.61, 24.9, 2.04)
pt3dadd(480.81, 626.74, 24.9, 2.04)
pt3dadd(479.96, 625.58, 26.9, 2.04)
pt3dadd(479.96, 625.19, 26.9, 2.04)
pt3dadd(480.13, 625.39, 26.9, 2.04)
pt3dadd(480.3, 625.77, 26.9, 2.04)
pt3dadd(480.47, 626.35, 26.9, 2.04)
pt3dadd(480.64, 626.93, 26.9, 2.04)
pt3dadd(480.81, 627.12, 26.9, 2.04)
pt3dadd(480.98, 627.7, 26.9, 2.04)
pt3dadd(480.98, 628.28, 26.9, 2.04)
pt3dadd(481.15, 628.86, 26.9, 2.04)
pt3dadd(481.32, 629.44, 26.9, 2.04)
pt3dadd(481.49, 629.63, 26.9, 2.04)
pt3dadd(481.49, 630.01, 26.9, 2.04)
pt3dadd(481.66, 630.4, 26.9, 2.04)
pt3dadd(481.83, 630.79, 26.9, 2.04)
pt3dadd(482, 631.37, 26.9, 2.04)
pt3dadd(482, 631.75, 26.9, 2.04)
pt3dadd(482.17, 631.94, 26.9, 2.04)
pt3dadd(482.34, 632.14, 26.9, 2.04)
pt3dadd(482.51, 632.52, 26.9, 2.04)
pt3dadd(482.68, 632.91, 26.9, 2.04)
pt3dadd(482.85, 633.1, 26.9, 2.04)
pt3dadd(483.02, 633.68, 26.9, 2.04)
pt3dadd(483.36, 634.07, 26.9, 2.04)
pt3dadd(483.53, 634.45, 26.9, 2.04)
pt3dadd(483.7, 634.84, 26.9, 2.04)
pt3dadd(484.04, 635.22, 26.9, 2.04)
pt3dadd(484.21, 635.99, 26.9, 2.04)
pt3dadd(484.54, 636.57, 26.9, 2.04)
pt3dadd(485.05, 637.15, 26.9, 2.04)
pt3dadd(485.22, 637.73, 26.9, 2.04)
pt3dadd(485.39, 638.12, 26.9, 2.04)
pt3dadd(485.73, 638.89, 26.9, 2.04)
pt3dadd(485.9, 639.27, 26.9, 2.04)
pt3dadd(486.07, 639.85, 26.9, 2.04)
pt3dadd(486.41, 640.24, 26.9, 2.04)
}
}
proc shape3d_174() {
dend[116] { pt3dadd(486.58, 640.62, 26.9, 2.04)
pt3dadd(486.75, 640.82, 26.9, 2.04)
pt3dadd(487.09, 641.4, 26.9, 2.04)
pt3dadd(487.26, 641.59, 26.9, 2.04)
pt3dadd(487.43, 641.78, 26.9, 2.04)
pt3dadd(487.77, 642.17, 26.9, 2.04)
pt3dadd(487.94, 642.36, 26.9, 2.04)
pt3dadd(488.45, 642.94, 26.9, 2.04)
pt3dadd(488.62, 643.13, 26.9, 2.04)
pt3dadd(488.79, 643.33, 26.9, 2.04)
pt3dadd(488.96, 643.71, 26.9, 2.04)
pt3dadd(489.13, 643.9, 26.9, 2.04)
pt3dadd(489.47, 644.48, 26.9, 2.04)
pt3dadd(489.81, 644.87, 26.9, 2.04)
pt3dadd(489.98, 645.25, 26.9, 2.04)
pt3dadd(490.15, 645.64, 26.9, 2.04)
pt3dadd(490.32, 645.83, 26.9, 2.04)
pt3dadd(490.66, 646.22, 26.9, 2.04)
pt3dadd(490.83, 646.8, 26.9, 2.04)
pt3dadd(491, 647.18, 26.9, 2.04)
pt3dadd(491.34, 647.38, 26.9, 2.04)
pt3dadd(491.68, 647.76, 26.9, 2.04)
pt3dadd(491.68, 648.34, 26.9, 2.04)
pt3dadd(492.02, 648.53, 26.9, 2.04)
pt3dadd(492.36, 648.92, 26.9, 2.04)
pt3dadd(492.7, 649.5, 26.9, 2.04)
pt3dadd(492.87, 649.88, 26.9, 2.04)
pt3dadd(493.21, 650.46, 26.9, 2.04)
pt3dadd(493.55, 650.85, 26.9, 2.04)
pt3dadd(493.72, 651.23, 26.9, 2.04)
pt3dadd(494.23, 651.81, 26.9, 2.04)
pt3dadd(494.57, 652.01, 26.9, 2.04)
pt3dadd(494.74, 652.39, 26.9, 2.04)
pt3dadd(494.9, 652.58, 26.9, 2.04)
pt3dadd(495.24, 652.78, 26.9, 2.04)
pt3dadd(495.41, 653.16, 26.9, 2.04)
pt3dadd(495.58, 653.36, 26.9, 2.04)
pt3dadd(495.75, 653.55, 26.9, 2.04)
pt3dadd(496.09, 653.74, 26.9, 2.04)
pt3dadd(496.43, 653.93, 26.9, 2.04)
pt3dadd(496.77, 654.13, 26.9, 2.04)
pt3dadd(496.94, 654.32, 26.9, 2.04)
pt3dadd(497.28, 654.51, 26.9, 2.04)
pt3dadd(497.45, 654.71, 26.9, 2.04)
pt3dadd(497.96, 654.71, 26.9, 2.04)
pt3dadd(498.3, 654.9, 26.9, 2.04)
pt3dadd(498.64, 655.09, 26.9, 2.04)
pt3dadd(498.98, 655.28, 26.9, 2.04)
pt3dadd(499.15, 655.48, 26.9, 2.04)
pt3dadd(499.49, 655.48, 26.9, 2.04)
pt3dadd(499.83, 655.67, 26.9, 2.04)
pt3dadd(500.17, 655.86, 26.9, 2.04)
pt3dadd(500.34, 656.06, 26.9, 2.04)
pt3dadd(500.68, 656.25, 26.9, 2.04)
pt3dadd(501.19, 656.83, 26.9, 2.04)
pt3dadd(501.36, 657.02, 26.9, 2.04)
pt3dadd(501.7, 657.21, 26.9, 2.04)
pt3dadd(502.04, 657.41, 26.9, 2.04)
pt3dadd(502.38, 657.6, 26.9, 2.04)
pt3dadd(502.55, 657.79, 26.9, 2.04)
pt3dadd(502.72, 657.99, 26.9, 2.04)
pt3dadd(503.06, 658.18, 26.9, 2.04)
pt3dadd(503.4, 658.37, 26.9, 2.04)
pt3dadd(503.57, 658.56, 26.9, 2.04)
pt3dadd(503.74, 658.76, 26.9, 2.04)
pt3dadd(503.91, 658.95, 26.9, 2.04)
pt3dadd(504.25, 659.14, 26.9, 2.04)
pt3dadd(504.59, 659.34, 26.9, 2.04)
pt3dadd(504.93, 659.53, 26.9, 2.04)
pt3dadd(505.26, 659.72, 26.9, 2.04)
pt3dadd(505.6, 659.91, 26.9, 2.04)
pt3dadd(505.77, 660.11, 26.9, 2.04)
pt3dadd(505.94, 660.3, 26.9, 2.04)
pt3dadd(506.11, 660.49, 26.9, 2.04)
pt3dadd(506.45, 660.69, 26.9, 2.04)
pt3dadd(506.45, 661.07, 26.9, 2.04)
pt3dadd(506.62, 661.26, 26.9, 2.04)
pt3dadd(506.79, 661.46, 26.9, 2.04)
pt3dadd(506.96, 661.65, 26.9, 2.04)
pt3dadd(507.13, 661.84, 26.9, 2.04)
pt3dadd(507.3, 662.04, 26.9, 2.04)
pt3dadd(507.47, 662.23, 26.9, 2.04)
pt3dadd(507.64, 662.42, 26.9, 2.04)
pt3dadd(507.64, 664.16, 26.9, 2.04)
pt3dadd(507.64, 663.19, 30.9, 2.04)
pt3dadd(507.64, 669.17, 30.9, 2.04)
pt3dadd(507.47, 669.37, 30.9, 2.04)
pt3dadd(507.47, 675.93, 30.9, 2.04)
pt3dadd(507.64, 676.31, 30.9, 2.04)
pt3dadd(507.64, 676.89, 30.9, 2.04)
pt3dadd(507.81, 677.08, 30.9, 2.04)
pt3dadd(507.81, 678.05, 30.9, 2.04)
pt3dadd(507.98, 678.82, 30.9, 2.04)
pt3dadd(508.15, 679.4, 30.9, 2.04)
pt3dadd(508.15, 679.98, 30.9, 2.04)
pt3dadd(508.32, 680.36, 30.9, 2.04)
pt3dadd(508.66, 680.94, 30.9, 2.04)
pt3dadd(508.83, 681.71, 30.9, 2.04)
pt3dadd(509, 682.1, 30.9, 2.04)
pt3dadd(509.17, 682.48, 30.9, 2.04)
pt3dadd(509.34, 682.87, 30.9, 2.04)
pt3dadd(509.34, 683.26, 30.9, 2.04)
pt3dadd(509.51, 683.64, 30.9, 2.04)
pt3dadd(509.85, 684.03, 30.9, 2.04)
pt3dadd(509.85, 684.61, 30.9, 2.04)
pt3dadd(510.02, 684.99, 30.9, 2.04)
pt3dadd(510.19, 685.38, 30.9, 2.04)
pt3dadd(510.36, 685.96, 30.9, 2.04)
pt3dadd(510.53, 686.53, 30.9, 2.04)
pt3dadd(510.87, 687.11, 30.9, 2.04)
pt3dadd(510.87, 687.5, 30.9, 2.04)
pt3dadd(511.21, 687.89, 30.9, 2.04)
pt3dadd(511.38, 688.08, 30.9, 2.04)
pt3dadd(511.55, 688.66, 30.9, 2.04)
pt3dadd(511.89, 689.24, 30.9, 2.04)
pt3dadd(511.89, 689.62, 30.9, 2.04)
pt3dadd(512.23, 690.01, 30.9, 2.04)
pt3dadd(512.23, 690.59, 30.9, 2.04)
pt3dadd(512.57, 691.16, 30.9, 2.04)
pt3dadd(512.74, 691.74, 30.9, 2.04)
pt3dadd(513.25, 692.32, 30.9, 2.04)
pt3dadd(513.42, 692.71, 30.9, 2.04)
pt3dadd(513.59, 692.9, 30.9, 2.04)
pt3dadd(513.59, 693.29, 30.9, 2.04)
pt3dadd(513.93, 693.29, 30.9, 2.04)
pt3dadd(513.93, 693.67, 30.9, 2.04)
pt3dadd(514.1, 693.87, 30.9, 2.04)
pt3dadd(514.1, 694.25, 30.9, 2.04)
pt3dadd(514.44, 694.25, 30.9, 2.04)
pt3dadd(514.44, 695.02, 30.9, 2.04)
pt3dadd(513.76, 694.06, 33.9, 2.04)
pt3dadd(513.93, 694.25, 33.9, 2.04)
pt3dadd(514.44, 694.64, 33.9, 2.04)
pt3dadd(514.78, 695.02, 33.9, 2.04)
pt3dadd(514.95, 695.41, 33.9, 2.04)
pt3dadd(515.29, 695.99, 33.9, 2.04)
pt3dadd(515.79, 696.57, 33.9, 2.04)
pt3dadd(516.13, 696.95, 33.9, 2.04)
pt3dadd(516.64, 697.72, 33.9, 2.04)
pt3dadd(516.98, 698.69, 33.9, 2.04)
pt3dadd(517.32, 699.07, 33.9, 2.04)
pt3dadd(517.66, 699.65, 33.9, 2.04)
pt3dadd(518, 700.23, 33.9, 2.04)
pt3dadd(518.34, 700.81, 33.9, 2.04)
pt3dadd(518.51, 701.2, 33.9, 2.04)
pt3dadd(518.68, 701.39, 33.9, 2.04)
pt3dadd(518.85, 701.77, 33.9, 2.04)
pt3dadd(519.02, 702.16, 33.9, 2.04)
pt3dadd(519.19, 702.55, 33.9, 2.04)
pt3dadd(519.36, 702.74, 33.9, 2.04)
pt3dadd(519.7, 703.12, 33.9, 2.04)
pt3dadd(520.04, 703.32, 33.9, 2.04)
pt3dadd(520.21, 703.7, 33.9, 2.04)
pt3dadd(520.38, 703.9, 33.9, 2.04)
pt3dadd(520.55, 704.28, 33.9, 2.04)
pt3dadd(520.89, 704.86, 33.9, 2.04)
pt3dadd(521.23, 705.44, 33.9, 2.04)
pt3dadd(521.4, 706.4, 33.9, 2.04)
pt3dadd(521.91, 706.98, 33.9, 2.04)
pt3dadd(522.25, 707.56, 33.9, 2.04)
pt3dadd(522.42, 708.33, 33.9, 2.04)
pt3dadd(522.76, 708.72, 33.9, 2.04)
pt3dadd(522.93, 708.91, 33.9, 2.04)
pt3dadd(523.27, 709.49, 33.9, 2.04)
pt3dadd(523.27, 709.88, 33.9, 2.04)
pt3dadd(523.61, 710.26, 33.9, 2.04)
pt3dadd(523.95, 710.84, 33.9, 2.04)
pt3dadd(524.29, 711.23, 33.9, 2.04)
pt3dadd(524.46, 711.81, 33.9, 2.04)
pt3dadd(524.8, 712.38, 33.9, 2.04)
pt3dadd(525.14, 712.77, 33.9, 2.04)
pt3dadd(525.31, 713.35, 33.9, 2.04)
pt3dadd(525.65, 713.93, 33.9, 2.04)
pt3dadd(525.82, 714.31, 33.9, 2.04)
pt3dadd(525.99, 714.89, 33.9, 2.04)
pt3dadd(526.15, 715.28, 33.9, 2.04)
pt3dadd(526.32, 715.66, 33.9, 2.04)
pt3dadd(526.49, 716.05, 33.9, 2.04)
pt3dadd(526.66, 716.63, 33.9, 2.04)
pt3dadd(526.83, 717.01, 33.9, 2.04)
pt3dadd(527, 717.4, 33.9, 2.04)
pt3dadd(527.17, 717.79, 33.9, 2.04)
pt3dadd(527.34, 718.36, 33.9, 2.04)
pt3dadd(527.51, 718.56, 33.9, 2.04)
pt3dadd(527.68, 718.94, 33.9, 2.04)
pt3dadd(527.85, 719.33, 33.9, 2.04)
pt3dadd(527.85, 719.71, 33.9, 2.04)
pt3dadd(528.19, 720.29, 33.9, 2.04)
pt3dadd(528.53, 720.68, 33.9, 2.04)
pt3dadd(528.7, 720.87, 33.9, 2.04)
pt3dadd(528.87, 721.26, 33.9, 2.04)
pt3dadd(529.04, 721.64, 33.9, 2.04)
pt3dadd(529.38, 722.03, 33.9, 2.04)
pt3dadd(529.38, 722.41, 33.9, 2.04)
pt3dadd(529.89, 722.99, 33.9, 2.04)
pt3dadd(530.06, 723.57, 33.9, 2.04)
pt3dadd(530.23, 723.76, 33.9, 2.04)
pt3dadd(530.57, 723.96, 33.9, 2.04)
pt3dadd(530.74, 724.15, 33.9, 2.04)
pt3dadd(530.74, 724.73, 33.9, 2.04)
}
}
proc shape3d_175() {
dend[116] { pt3dadd(530.91, 724.92, 33.9, 2.04)
pt3dadd(531.08, 725.12, 33.9, 2.04)
pt3dadd(531.08, 726.08, 33.9, 2.04)
pt3dadd(530.23, 725.12, 36.9, 2.04)
pt3dadd(530.23, 724.92, 36.9, 2.04)
pt3dadd(530.4, 725.31, 36.9, 2.04)
pt3dadd(530.74, 725.89, 36.9, 2.04)
pt3dadd(530.91, 726.66, 36.9, 2.04)
pt3dadd(531.42, 727.62, 36.9, 2.04)
pt3dadd(531.76, 728.59, 36.9, 2.04)
pt3dadd(532.1, 729.55, 36.9, 2.04)
pt3dadd(532.44, 730.32, 36.9, 2.04)
pt3dadd(532.78, 730.9, 36.9, 2.04)
pt3dadd(532.95, 731.48, 36.9, 2.04)
pt3dadd(532.95, 732.25, 36.9, 2.04)
pt3dadd(533.12, 732.64, 36.9, 2.04)
pt3dadd(533.29, 733.41, 36.9, 2.04)
pt3dadd(533.63, 733.99, 36.9, 2.04)
pt3dadd(533.8, 734.57, 36.9, 2.04)
pt3dadd(533.97, 735.34, 36.9, 2.04)
pt3dadd(534.14, 736.11, 36.9, 2.04)
pt3dadd(534.31, 736.69, 36.9, 2.04)
pt3dadd(534.31, 737.27, 36.9, 2.04)
pt3dadd(534.48, 737.65, 36.9, 2.04)
pt3dadd(534.65, 738.23, 36.9, 2.04)
pt3dadd(534.82, 738.62, 36.9, 2.04)
pt3dadd(534.99, 739, 36.9, 2.04)
pt3dadd(535.16, 739.58, 36.9, 2.04)
pt3dadd(535.33, 740.16, 36.9, 2.04)
pt3dadd(535.5, 740.55, 36.9, 2.04)
pt3dadd(535.67, 741.13, 36.9, 2.04)
pt3dadd(535.84, 741.51, 36.9, 2.04)
pt3dadd(536.01, 741.9, 36.9, 2.04)
pt3dadd(536.18, 742.09, 36.9, 2.04)
pt3dadd(536.18, 742.86, 36.9, 2.04)
pt3dadd(536.35, 743.25, 36.9, 2.04)
pt3dadd(536.52, 743.63, 36.9, 2.04)
pt3dadd(536.68, 744.02, 36.9, 2.04)
pt3dadd(536.85, 744.41, 36.9, 2.04)
pt3dadd(537.02, 744.79, 36.9, 2.04)
pt3dadd(537.19, 744.98, 36.9, 2.04)
pt3dadd(537.19, 745.56, 36.9, 2.04)
pt3dadd(537.53, 745.76, 36.9, 2.04)
pt3dadd(537.7, 746.14, 36.9, 2.04)
pt3dadd(537.87, 746.91, 36.9, 2.04)
pt3dadd(538.04, 747.11, 36.9, 2.04)
pt3dadd(538.04, 747.49, 36.9, 2.04)
pt3dadd(538.21, 747.88, 36.9, 2.04)
pt3dadd(538.38, 748.07, 36.9, 2.04)
pt3dadd(538.38, 748.65, 36.9, 2.04)
pt3dadd(538.72, 748.65, 36.9, 2.04)
pt3dadd(538.72, 749.03, 36.9, 2.04)
pt3dadd(539.06, 749.23, 36.9, 2.04)
pt3dadd(539.06, 749.61, 36.9, 2.04)
pt3dadd(539.4, 750, 36.9, 2.04)
pt3dadd(539.4, 750.39, 36.9, 2.04)
pt3dadd(539.57, 750.58, 36.9, 2.04)
pt3dadd(539.74, 750.77, 36.9, 2.04)
pt3dadd(539.91, 751.16, 36.9, 2.04)
pt3dadd(540.08, 751.35, 36.9, 2.04)
pt3dadd(540.25, 751.54, 36.9, 2.04)
pt3dadd(540.42, 751.74, 36.9, 2.04)
pt3dadd(540.59, 751.93, 36.9, 2.04)
pt3dadd(540.76, 752.12, 36.9, 2.04)
pt3dadd(540.93, 752.31, 36.9, 2.04)
pt3dadd(540.93, 752.7, 36.9, 2.04)
pt3dadd(541.1, 752.89, 36.9, 2.04)
pt3dadd(541.27, 753.09, 36.9, 2.04)
pt3dadd(541.44, 753.47, 36.9, 2.04)
pt3dadd(541.61, 753.66, 36.9, 2.04)
pt3dadd(541.95, 753.86, 36.9, 2.04)
pt3dadd(542.12, 754.24, 36.9, 2.04)
pt3dadd(542.29, 754.63, 36.9, 2.04)
pt3dadd(542.46, 755.01, 36.9, 2.04)
pt3dadd(542.63, 755.4, 36.9, 2.04)
pt3dadd(542.8, 755.59, 36.9, 2.04)
pt3dadd(542.97, 755.79, 36.9, 2.04)
pt3dadd(543.14, 756.17, 36.9, 2.04)
pt3dadd(543.31, 756.56, 36.9, 2.04)
pt3dadd(543.31, 756.94, 36.9, 2.04)
pt3dadd(543.48, 757.14, 36.9, 2.04)
pt3dadd(543.65, 757.33, 36.9, 2.04)
pt3dadd(543.82, 757.91, 36.9, 2.04)
pt3dadd(543.99, 758.1, 36.9, 2.04)
pt3dadd(544.16, 758.49, 36.9, 2.04)
pt3dadd(544.33, 758.87, 36.9, 2.04)
pt3dadd(544.33, 759.26, 36.9, 2.04)
pt3dadd(544.5, 759.45, 36.9, 2.04)
pt3dadd(544.67, 759.64, 36.9, 2.04)
pt3dadd(544.67, 760.22, 36.9, 2.04)
pt3dadd(544.84, 760.61, 36.9, 2.04)
pt3dadd(544.84, 760.99, 36.9, 2.04)
pt3dadd(545.01, 761.19, 36.9, 2.04)
pt3dadd(545.01, 762.54, 36.9, 2.04)
pt3dadd(543.99, 761.19, 37.9, 2.04)
pt3dadd(543.99, 760.8, 37.9, 2.04)
pt3dadd(544.16, 760.99, 37.9, 2.04)
pt3dadd(544.5, 761.19, 37.9, 2.04)
pt3dadd(544.67, 761.96, 37.9, 2.04)
pt3dadd(545.01, 762.35, 37.9, 2.04)
pt3dadd(545.18, 762.73, 37.9, 2.04)
pt3dadd(545.35, 763.12, 37.9, 2.04)
pt3dadd(545.52, 763.31, 37.9, 2.04)
pt3dadd(545.69, 763.7, 37.9, 2.04)
pt3dadd(546.03, 764.27, 37.9, 2.04)
pt3dadd(546.2, 764.85, 37.9, 2.04)
pt3dadd(546.54, 765.24, 37.9, 2.04)
pt3dadd(546.71, 765.82, 37.9, 2.04)
pt3dadd(546.88, 766.2, 37.9, 2.04)
pt3dadd(547.21, 766.78, 37.9, 2.04)
pt3dadd(547.38, 767.17, 37.9, 2.04)
pt3dadd(547.72, 767.75, 37.9, 2.04)
pt3dadd(547.89, 768.13, 37.9, 2.04)
pt3dadd(548.23, 768.52, 37.9, 2.04)
pt3dadd(548.57, 768.9, 37.9, 2.04)
pt3dadd(548.74, 769.29, 37.9, 2.04)
pt3dadd(548.91, 769.68, 37.9, 2.04)
pt3dadd(549.42, 770.06, 37.9, 2.04)
pt3dadd(549.59, 770.83, 37.9, 2.04)
pt3dadd(550.1, 771.41, 37.9, 2.04)
pt3dadd(550.44, 771.8, 37.9, 2.04)
pt3dadd(550.61, 772.18, 37.9, 2.04)
pt3dadd(550.78, 772.57, 37.9, 2.04)
pt3dadd(550.95, 772.95, 37.9, 2.04)
pt3dadd(551.29, 773.34, 37.9, 2.04)
pt3dadd(551.63, 773.73, 37.9, 2.04)
pt3dadd(551.97, 774.31, 37.9, 2.04)
pt3dadd(552.31, 775.08, 37.9, 2.04)
pt3dadd(553.16, 776.04, 37.9, 2.04)
pt3dadd(553.5, 776.62, 37.9, 2.04)
pt3dadd(554.01, 777.2, 37.9, 2.04)
pt3dadd(554.18, 777.58, 37.9, 2.04)
pt3dadd(554.35, 777.78, 37.9, 2.04)
pt3dadd(554.69, 778.16, 37.9, 2.04)
pt3dadd(554.86, 778.55, 37.9, 2.04)
pt3dadd(555.2, 778.93, 37.9, 2.04)
pt3dadd(555.54, 779.13, 37.9, 2.04)
pt3dadd(555.71, 779.32, 37.9, 2.04)
pt3dadd(555.88, 779.51, 37.9, 2.04)
pt3dadd(556.05, 779.71, 37.9, 2.04)
pt3dadd(556.39, 780.29, 37.9, 2.04)
pt3dadd(556.73, 780.67, 37.9, 2.04)
pt3dadd(556.9, 781.06, 37.9, 2.04)
pt3dadd(557.07, 781.44, 37.9, 2.04)
pt3dadd(557.4, 782.02, 37.9, 2.04)
pt3dadd(557.74, 782.6, 37.9, 2.04)
pt3dadd(557.91, 782.99, 37.9, 2.04)
pt3dadd(558.42, 783.56, 37.9, 2.04)
pt3dadd(558.59, 783.95, 37.9, 2.04)
pt3dadd(558.93, 784.34, 37.9, 2.04)
pt3dadd(559.1, 784.53, 37.9, 2.04)
pt3dadd(559.27, 785.11, 37.9, 2.04)
pt3dadd(559.78, 785.69, 37.9, 2.04)
pt3dadd(560.12, 786.46, 37.9, 2.04)
pt3dadd(560.46, 786.84, 37.9, 2.04)
pt3dadd(560.8, 787.81, 37.9, 2.04)
pt3dadd(560.97, 788, 37.9, 2.04)
pt3dadd(561.31, 788.77, 37.9, 2.04)
pt3dadd(561.82, 789.35, 37.9, 2.04)
pt3dadd(561.99, 789.74, 37.9, 2.04)
pt3dadd(562.16, 790.32, 37.9, 2.04)
pt3dadd(562.67, 790.89, 37.9, 2.04)
pt3dadd(563.01, 791.47, 37.9, 2.04)
pt3dadd(563.35, 792.24, 37.9, 2.04)
pt3dadd(563.86, 792.82, 37.9, 2.04)
pt3dadd(564.2, 793.6, 37.9, 2.04)
pt3dadd(564.54, 794.56, 37.9, 2.04)
pt3dadd(565.05, 795.14, 37.9, 2.04)
pt3dadd(565.39, 795.72, 37.9, 2.04)
pt3dadd(565.73, 796.3, 37.9, 2.04)
pt3dadd(565.9, 796.87, 37.9, 2.04)
pt3dadd(566.24, 797.45, 37.9, 2.04)
pt3dadd(566.58, 797.84, 37.9, 2.04)
pt3dadd(566.92, 798.22, 37.9, 2.04)
pt3dadd(567.09, 798.61, 37.9, 2.04)
pt3dadd(567.43, 799.19, 37.9, 2.04)
pt3dadd(567.77, 799.77, 37.9, 2.04)
pt3dadd(568.1, 800.15, 37.9, 2.04)
pt3dadd(568.44, 800.73, 37.9, 2.04)
pt3dadd(568.95, 801.7, 37.9, 2.04)
pt3dadd(569.46, 802.28, 37.9, 2.04)
pt3dadd(569.97, 803.24, 37.9, 2.04)
pt3dadd(570.31, 803.63, 37.9, 2.04)
pt3dadd(570.48, 804.01, 37.9, 2.04)
pt3dadd(570.82, 804.59, 37.9, 2.04)
pt3dadd(571.16, 804.98, 37.9, 2.04)
pt3dadd(571.33, 805.36, 37.9, 2.04)
pt3dadd(571.84, 805.94, 37.9, 2.04)
pt3dadd(572.01, 806.33, 37.9, 2.04)
pt3dadd(572.35, 806.71, 37.9, 2.04)
pt3dadd(572.52, 807.1, 37.9, 2.04)
pt3dadd(572.69, 807.48, 37.9, 2.04)
pt3dadd(572.86, 807.68, 37.9, 2.04)
pt3dadd(573.2, 808.06, 37.9, 2.04)
pt3dadd(573.37, 808.26, 37.9, 2.04)
pt3dadd(573.71, 808.45, 37.9, 2.04)
pt3dadd(573.88, 808.64, 37.9, 2.04)
pt3dadd(574.05, 809.03, 37.9, 2.04)
pt3dadd(574.39, 809.22, 37.9, 2.04)
pt3dadd(574.56, 809.41, 37.9, 2.04)
}
}
proc shape3d_176() {
dend[116] { pt3dadd(574.9, 809.61, 37.9, 2.04)
pt3dadd(575.07, 809.8, 37.9, 2.04)
pt3dadd(575.24, 809.99, 37.9, 2.04)
pt3dadd(575.58, 810.18, 37.9, 2.04)
pt3dadd(575.75, 810.38, 37.9, 2.04)
pt3dadd(575.92, 810.57, 37.9, 2.04)
pt3dadd(576.09, 810.76, 37.9, 2.04)
pt3dadd(574.9, 810.18, 39.9, 2.04)
pt3dadd(575.07, 810.38, 39.9, 2.04)
pt3dadd(575.24, 810.57, 39.9, 2.04)
pt3dadd(575.75, 810.96, 39.9, 2.04)
pt3dadd(576.26, 811.15, 39.9, 2.04)
pt3dadd(576.94, 811.92, 39.9, 2.04)
pt3dadd(577.79, 812.69, 39.9, 2.04)
pt3dadd(578.63, 813.27, 39.9, 2.04)
pt3dadd(579.14, 814.04, 39.9, 2.04)
pt3dadd(579.82, 814.62, 39.9, 2.04)
pt3dadd(580.33, 815.01, 39.9, 2.04)
pt3dadd(581.01, 815.78, 39.9, 2.04)
pt3dadd(581.35, 815.97, 39.9, 2.04)
pt3dadd(581.52, 816.36, 39.9, 2.04)
pt3dadd(581.69, 816.55, 39.9, 2.04)
pt3dadd(582.03, 816.74, 39.9, 2.04)
pt3dadd(582.2, 816.94, 39.9, 2.04)
pt3dadd(582.54, 817.13, 39.9, 2.04)
pt3dadd(582.71, 817.32, 39.9, 2.04)
pt3dadd(583.05, 817.71, 39.9, 2.04)
pt3dadd(583.39, 817.9, 39.9, 2.04)
pt3dadd(583.73, 818.29, 39.9, 2.04)
pt3dadd(584.07, 818.67, 39.9, 2.04)
pt3dadd(584.58, 819.25, 39.9, 2.04)
pt3dadd(584.92, 819.64, 39.9, 2.04)
pt3dadd(585.26, 820.02, 39.9, 2.04)
pt3dadd(586.11, 820.6, 39.9, 2.04)
pt3dadd(586.62, 821.18, 39.9, 2.04)
pt3dadd(586.96, 821.57, 39.9, 2.04)
pt3dadd(587.81, 822.14, 39.9, 2.04)
pt3dadd(588.15, 822.53, 39.9, 2.04)
pt3dadd(588.49, 822.72, 39.9, 2.04)
pt3dadd(588.66, 823.11, 39.9, 2.04)
pt3dadd(588.99, 823.3, 39.9, 2.04)
pt3dadd(589.16, 823.69, 39.9, 2.04)
pt3dadd(589.33, 823.88, 39.9, 2.04)
pt3dadd(589.67, 824.27, 39.9, 2.04)
pt3dadd(589.84, 824.46, 39.9, 2.04)
pt3dadd(590.18, 824.65, 39.9, 2.04)
pt3dadd(590.69, 825.04, 39.9, 2.04)
pt3dadd(591.37, 825.81, 39.9, 2.04)
pt3dadd(591.71, 826.2, 39.9, 2.04)
pt3dadd(592.05, 826.58, 39.9, 2.04)
pt3dadd(592.22, 826.97, 39.9, 2.04)
pt3dadd(592.39, 827.35, 39.9, 2.04)
pt3dadd(592.56, 827.55, 39.9, 2.04)
pt3dadd(592.9, 827.93, 39.9, 2.04)
pt3dadd(593.24, 828.32, 39.9, 2.04)
pt3dadd(593.41, 828.51, 39.9, 2.04)
pt3dadd(593.75, 829.09, 39.9, 2.04)
pt3dadd(593.92, 829.47, 39.9, 2.04)
pt3dadd(594.09, 829.67, 39.9, 2.04)
pt3dadd(594.43, 830.05, 39.9, 2.04)
pt3dadd(594.77, 830.63, 39.9, 2.04)
pt3dadd(594.94, 831.02, 39.9, 2.04)
pt3dadd(595.11, 831.4, 39.9, 2.04)
pt3dadd(595.28, 831.79, 39.9, 2.04)
pt3dadd(595.62, 832.18, 39.9, 2.04)
pt3dadd(595.79, 832.56, 39.9, 2.04)
pt3dadd(595.96, 832.95, 39.9, 2.04)
pt3dadd(596.13, 833.33, 39.9, 2.04)
pt3dadd(596.47, 833.72, 39.9, 2.04)
pt3dadd(596.64, 834.3, 39.9, 2.04)
pt3dadd(596.81, 834.49, 39.9, 2.04)
pt3dadd(596.98, 834.88, 39.9, 2.04)
pt3dadd(597.15, 835.07, 39.9, 2.04)
pt3dadd(597.83, 835.84, 39.9, 2.04)
pt3dadd(598, 836.23, 39.9, 2.04)
pt3dadd(598.34, 836.61, 39.9, 2.04)
pt3dadd(598.68, 837.19, 39.9, 2.04)
pt3dadd(598.85, 837.58, 39.9, 2.04)
pt3dadd(599.02, 837.77, 39.9, 2.04)
pt3dadd(599.35, 837.96, 39.9, 2.04)
pt3dadd(599.52, 838.35, 39.9, 2.04)
pt3dadd(599.69, 838.73, 39.9, 2.04)
pt3dadd(600.03, 838.73, 39.9, 2.04)
pt3dadd(600.2, 838.93, 39.9, 2.04)
pt3dadd(600.37, 839.12, 39.9, 2.04)
pt3dadd(600.54, 839.31, 39.9, 2.04)
pt3dadd(600.71, 839.51, 39.9, 2.04)
pt3dadd(600.88, 839.7, 39.9, 2.04)
pt3dadd(601.05, 839.89, 39.9, 2.04)
pt3dadd(599.35, 839.12, 40.9, 2.04)
pt3dadd(599.52, 839.31, 40.9, 2.04)
pt3dadd(600.03, 839.31, 40.9, 2.04)
pt3dadd(600.37, 839.51, 40.9, 2.04)
pt3dadd(600.54, 839.89, 40.9, 2.04)
pt3dadd(600.71, 840.08, 40.9, 2.04)
pt3dadd(600.88, 840.47, 40.9, 2.04)
pt3dadd(601.22, 840.66, 40.9, 2.04)
pt3dadd(601.39, 841.05, 40.9, 2.04)
pt3dadd(601.56, 841.24, 40.9, 2.04)
pt3dadd(601.9, 841.82, 40.9, 2.04)
pt3dadd(602.41, 842.21, 40.9, 2.04)
pt3dadd(602.58, 842.78, 40.9, 2.04)
pt3dadd(603.09, 843.17, 40.9, 2.04)
pt3dadd(603.43, 843.75, 40.9, 2.04)
pt3dadd(603.6, 844.14, 40.9, 2.04)
pt3dadd(604.11, 844.52, 40.9, 2.04)
pt3dadd(604.28, 844.91, 40.9, 2.04)
pt3dadd(604.62, 845.29, 40.9, 2.04)
pt3dadd(604.96, 845.87, 40.9, 2.04)
pt3dadd(605.13, 846.26, 40.9, 2.04)
pt3dadd(605.3, 846.45, 40.9, 2.04)
pt3dadd(605.64, 846.64, 40.9, 2.04)
pt3dadd(605.98, 846.84, 40.9, 2.04)
pt3dadd(606.15, 847.22, 40.9, 2.04)
pt3dadd(606.32, 847.41, 40.9, 2.04)
pt3dadd(606.83, 847.99, 40.9, 2.04)
pt3dadd(607, 848.38, 40.9, 2.04)
pt3dadd(607.34, 848.57, 40.9, 2.04)
pt3dadd(607.68, 848.96, 40.9, 2.04)
pt3dadd(607.85, 849.34, 40.9, 2.04)
pt3dadd(608.02, 849.73, 40.9, 2.04)
pt3dadd(608.36, 849.92, 40.9, 2.04)
pt3dadd(608.53, 850.31, 40.9, 2.04)
pt3dadd(608.7, 850.69, 40.9, 2.04)
pt3dadd(609.04, 851.08, 40.9, 2.04)
pt3dadd(609.38, 851.27, 40.9, 2.04)
pt3dadd(609.55, 851.66, 40.9, 2.04)
pt3dadd(609.88, 851.85, 40.9, 2.04)
pt3dadd(610.22, 852.04, 40.9, 2.04)
pt3dadd(610.39, 852.43, 40.9, 2.04)
pt3dadd(610.56, 852.62, 40.9, 2.04)
pt3dadd(610.73, 853.01, 40.9, 2.04)
pt3dadd(610.9, 853.2, 40.9, 2.04)
pt3dadd(611.75, 854.17, 40.9, 2.04)
pt3dadd(611.92, 854.55, 40.9, 2.04)
pt3dadd(612.09, 854.74, 40.9, 2.04)
pt3dadd(612.43, 855.13, 40.9, 2.04)
pt3dadd(612.77, 855.32, 40.9, 2.04)
pt3dadd(612.94, 855.52, 40.9, 2.04)
pt3dadd(613.11, 855.71, 40.9, 2.04)
pt3dadd(613.45, 855.9, 40.9, 2.04)
pt3dadd(613.62, 856.29, 40.9, 2.04)
pt3dadd(613.79, 856.67, 40.9, 2.04)
pt3dadd(613.96, 856.87, 40.9, 2.04)
pt3dadd(614.3, 857.06, 40.9, 2.04)
pt3dadd(614.47, 857.45, 40.9, 2.04)
pt3dadd(614.81, 857.64, 40.9, 2.04)
pt3dadd(614.98, 858.02, 40.9, 2.04)
pt3dadd(615.32, 858.6, 40.9, 2.04)
pt3dadd(615.49, 858.8, 40.9, 2.04)
pt3dadd(615.66, 859.18, 40.9, 2.04)
pt3dadd(616, 859.37, 40.9, 2.04)
pt3dadd(616.17, 859.76, 40.9, 2.04)
pt3dadd(616.34, 859.95, 40.9, 2.04)
pt3dadd(616.51, 860.34, 40.9, 2.04)
pt3dadd(616.85, 860.53, 40.9, 2.04)
pt3dadd(616.85, 860.92, 40.9, 2.04)
pt3dadd(617.19, 861.11, 40.9, 2.04)
pt3dadd(617.36, 861.3, 40.9, 2.04)
pt3dadd(617.53, 861.69, 40.9, 2.04)
pt3dadd(617.7, 862.08, 40.9, 2.04)
pt3dadd(618.21, 862.46, 40.9, 2.04)
pt3dadd(618.38, 862.85, 40.9, 2.04)
pt3dadd(618.89, 863.23, 40.9, 2.04)
pt3dadd(619.23, 863.81, 40.9, 2.04)
pt3dadd(619.4, 864.2, 40.9, 2.04)
pt3dadd(619.57, 864.78, 40.9, 2.04)
pt3dadd(619.74, 865.16, 40.9, 2.04)
pt3dadd(620.07, 865.55, 40.9, 2.04)
pt3dadd(620.24, 865.93, 40.9, 2.04)
pt3dadd(620.41, 866.32, 40.9, 2.04)
pt3dadd(620.58, 866.7, 40.9, 2.04)
pt3dadd(620.75, 866.9, 40.9, 2.04)
pt3dadd(621.09, 866.9, 40.9, 2.04)
pt3dadd(621.26, 867.28, 40.9, 2.04)
pt3dadd(621.43, 867.67, 40.9, 2.04)
pt3dadd(621.77, 867.86, 40.9, 2.04)
pt3dadd(621.94, 868.06, 40.9, 2.04)
pt3dadd(622.11, 868.25, 40.9, 2.04)
pt3dadd(622.28, 868.44, 40.9, 2.04)
pt3dadd(622.45, 868.63, 40.9, 2.04)
pt3dadd(622.45, 869.02, 40.9, 2.04)
pt3dadd(622.62, 869.21, 40.9, 2.04)
pt3dadd(622.79, 869.41, 40.9, 2.04)
pt3dadd(622.79, 869.79, 40.9, 2.04)
pt3dadd(622.62, 869.41, 42.9, 2.04)
pt3dadd(622.79, 869.41, 42.9, 2.04)
pt3dadd(622.79, 869.79, 42.9, 2.04)
pt3dadd(623.13, 870.18, 42.9, 2.04)
pt3dadd(623.3, 870.56, 42.9, 2.04)
pt3dadd(623.3, 870.95, 42.9, 2.04)
pt3dadd(623.47, 871.33, 42.9, 2.04)
pt3dadd(623.64, 871.72, 42.9, 2.04)
pt3dadd(623.64, 872.11, 42.9, 2.04)
pt3dadd(623.81, 872.49, 42.9, 2.04)
pt3dadd(623.98, 873.07, 42.9, 2.04)
pt3dadd(623.98, 873.65, 42.9, 2.04)
pt3dadd(624.32, 874.03, 42.9, 2.04)
pt3dadd(624.49, 874.61, 42.9, 2.04)
pt3dadd(624.66, 875.19, 42.9, 2.04)
}
}
proc shape3d_177() {
dend[116] { pt3dadd(624.66, 876.35, 42.9, 2.04)
pt3dadd(624.83, 876.54, 42.9, 2.04)
pt3dadd(624.83, 877.51, 42.9, 2.04)
pt3dadd(625, 877.89, 42.9, 2.04)
pt3dadd(625, 878.47, 42.9, 2.04)
pt3dadd(625.17, 879.05, 42.9, 2.04)
pt3dadd(625.34, 879.63, 42.9, 2.04)
pt3dadd(625.51, 880.21, 42.9, 2.04)
pt3dadd(625.51, 880.79, 42.9, 2.04)
pt3dadd(625.68, 881.17, 42.9, 2.04)
pt3dadd(625.68, 881.75, 42.9, 2.04)
pt3dadd(625.85, 882.14, 42.9, 2.04)
pt3dadd(626.19, 882.72, 42.9, 2.04)
pt3dadd(626.36, 883.29, 42.9, 2.04)
pt3dadd(626.36, 883.87, 42.9, 2.04)
pt3dadd(626.53, 884.26, 42.9, 2.04)
pt3dadd(626.53, 884.84, 42.9, 2.04)
pt3dadd(626.7, 885.03, 42.9, 2.04)
pt3dadd(626.87, 885.42, 42.9, 2.04)
pt3dadd(626.87, 885.8, 42.9, 2.04)
pt3dadd(627.04, 886.19, 42.9, 2.04)
pt3dadd(627.38, 886.57, 42.9, 2.04)
pt3dadd(627.55, 886.96, 42.9, 2.04)
pt3dadd(627.72, 887.54, 42.9, 2.04)
pt3dadd(627.72, 887.92, 42.9, 2.04)
pt3dadd(627.89, 888.12, 42.9, 2.04)
pt3dadd(628.06, 888.31, 42.9, 2.04)
pt3dadd(628.23, 888.5, 42.9, 2.04)
pt3dadd(628.4, 888.89, 42.9, 2.04)
pt3dadd(628.57, 889.08, 42.9, 2.04)
pt3dadd(628.74, 889.27, 42.9, 2.04)
pt3dadd(628.91, 889.47, 42.9, 2.04)
pt3dadd(629.08, 889.85, 42.9, 2.04)
pt3dadd(629.25, 890.05, 42.9, 2.04)
pt3dadd(629.42, 890.43, 42.9, 2.04)
pt3dadd(629.59, 890.62, 42.9, 2.04)
pt3dadd(629.76, 890.82, 42.9, 2.04)
pt3dadd(630.27, 891.4, 42.9, 2.04)
pt3dadd(630.43, 891.78, 42.9, 2.04)
pt3dadd(630.6, 891.97, 42.9, 2.04)
pt3dadd(630.77, 892.17, 42.9, 2.04)
pt3dadd(630.94, 892.55, 42.9, 2.04)
pt3dadd(631.28, 892.75, 42.9, 2.04)
pt3dadd(631.45, 893.13, 42.9, 2.04)
pt3dadd(631.79, 893.52, 42.9, 2.04)
pt3dadd(631.96, 893.71, 42.9, 2.04)
pt3dadd(632.13, 893.9, 42.9, 2.04)
pt3dadd(632.3, 894.1, 42.9, 2.04)
pt3dadd(632.47, 894.29, 42.9, 2.04)
pt3dadd(632.64, 894.48, 42.9, 2.04)
pt3dadd(632.81, 894.68, 42.9, 2.04)
pt3dadd(632.98, 894.87, 42.9, 2.04)
pt3dadd(633.32, 894.87, 42.9, 2.04)
pt3dadd(632.98, 895.45, 42.9, 3.06)
pt3dadd(682.06, 964.51, 42.9, 3.4)
pt3dadd(714.67, 1021.99, 42.9, 3.4)
pt3dadd(751.36, 1081.79, 42.9, 4.08)
pt3dadd(773.78, 1147.76, 42.9, 4.08)
pt3dadd(773.78, 1159.72, 42.9, 4.08)
pt3dadd(778.53, 1168.6, 42.9, 4.08)
pt3dadd(785.32, 1172.84, 42.9, 4.08)
pt3dadd(790.08, 1175.54, 42.9, 4.08)
pt3dadd(792.8, 1181.33, 42.9, 4.08)
pt3dadd(799.59, 1192.52, 42.9, 4.76)
pt3dadd(814.54, 1243.06, 42.9, 4.76)
pt3dadd(831.52, 1301.7, 42.9, 4.76)
pt3dadd(885.87, 1420.52, 42.9, 4.76)
pt3dadd(832.88, 1309.8, 42.9, 5.43)
}
dend[117] {pt3dclear()
pt3dadd(422.55, 486.11, 15.9, 1.36)
pt3dadd(424.59, 482.25, 103.9, 1.36)
pt3dadd(424.97, 479.44, 103.9, 4.08)
pt3dadd(425.33, 480.25, 103.9, 3.74)
pt3dadd(425.69, 479.84, 103.9, 3.74)
pt3dadd(426.04, 479.44, 103.9, 3.74)
pt3dadd(426.4, 478.63, 103.9, 3.74)
pt3dadd(427.11, 478.22, 103.9, 3.74)
pt3dadd(427.83, 477.41, 103.9, 3.74)
pt3dadd(428.18, 477.01, 103.9, 3.74)
pt3dadd(428.54, 476.6, 103.9, 3.74)
pt3dadd(428.54, 467.69, 103.9, 3.74)
pt3dadd(428.9, 467.28, 103.9, 3.74)
pt3dadd(429.25, 466.88, 103.9, 3.74)
pt3dadd(429.25, 466.07, 103.9, 3.74)
pt3dadd(429.61, 465.26, 103.9, 3.74)
pt3dadd(429.61, 464.85, 103.9, 3.74)
pt3dadd(430.68, 464.45, 100.75, 3.74)
pt3dadd(430.68, 463.64, 100.75, 3.74)
pt3dadd(431.04, 463.23, 100.75, 3.74)
pt3dadd(431.39, 462.42, 100.75, 3.74)
pt3dadd(431.75, 462.02, 100.75, 3.74)
pt3dadd(432.11, 461.61, 100.75, 3.74)
pt3dadd(432.46, 461.21, 100.75, 3.74)
pt3dadd(432.46, 458.78, 100.75, 3.74)
pt3dadd(432.82, 458.37, 100.75, 3.74)
pt3dadd(432.82, 455.54, 100.75, 3.74)
pt3dadd(433.18, 455.13, 100.75, 3.74)
pt3dadd(433.53, 454.73, 100.75, 3.74)
pt3dadd(433.53, 447.43, 100.75, 3.74)
pt3dadd(433.89, 446.62, 100.75, 3.74)
pt3dadd(434.25, 445.81, 100.75, 3.74)
pt3dadd(434.25, 445, 100.75, 3.74)
pt3dadd(434.6, 444.6, 100.75, 3.74)
pt3dadd(434.6, 443.79, 100.75, 3.74)
pt3dadd(434.96, 443.38, 100.75, 3.74)
pt3dadd(436.03, 444.19, 97.6, 3.74)
pt3dadd(436.39, 443.79, 97.6, 3.74)
pt3dadd(436.39, 442.98, 97.6, 3.74)
pt3dadd(436.74, 442.57, 97.6, 3.74)
pt3dadd(437.1, 441.76, 97.6, 3.74)
pt3dadd(437.46, 441.36, 97.6, 3.74)
pt3dadd(437.81, 440.95, 97.6, 3.74)
pt3dadd(438.17, 440.14, 97.6, 3.74)
pt3dadd(438.53, 439.74, 97.6, 3.74)
pt3dadd(438.88, 438.93, 97.6, 3.74)
pt3dadd(439.24, 438.12, 97.6, 3.74)
pt3dadd(439.24, 437.31, 97.6, 3.74)
pt3dadd(439.6, 436.9, 97.6, 3.74)
pt3dadd(439.95, 436.5, 97.6, 3.74)
pt3dadd(440.31, 435.69, 97.6, 3.74)
pt3dadd(440.67, 434.88, 97.6, 3.74)
pt3dadd(440.67, 434.07, 97.6, 3.74)
pt3dadd(441.02, 433.26, 97.6, 3.74)
pt3dadd(441.02, 432.45, 97.6, 3.74)
pt3dadd(441.38, 432.04, 97.6, 3.74)
pt3dadd(441.74, 431.64, 97.6, 3.74)
pt3dadd(441.74, 430.42, 97.6, 3.74)
pt3dadd(442.09, 430.02, 97.6, 3.74)
pt3dadd(442.09, 428.8, 97.6, 3.74)
pt3dadd(442.45, 428.39, 97.6, 3.74)
pt3dadd(442.81, 427.99, 97.6, 3.74)
pt3dadd(443.16, 427.58, 97.6, 3.74)
pt3dadd(443.16, 426.37, 97.6, 3.74)
pt3dadd(443.52, 425.56, 97.6, 3.74)
pt3dadd(443.52, 425.15, 97.6, 3.74)
pt3dadd(444.59, 422.72, 96.55, 3.74)
pt3dadd(444.95, 422.32, 96.55, 3.74)
}
dend[118] {pt3dclear()
pt3dadd(444.95, 422.32, 96.55, 2.38)
pt3dadd(444.06, 421.51, 96.55, 2.38)
pt3dadd(443.88, 421.1, 96.55, 2.38)
pt3dadd(443.7, 420.9, 96.55, 2.38)
pt3dadd(443.52, 420.7, 96.55, 2.38)
pt3dadd(443.34, 420.5, 96.55, 2.38)
pt3dadd(443.16, 420.29, 96.55, 2.38)
pt3dadd(442.99, 420.09, 96.55, 2.38)
pt3dadd(442.81, 419.89, 96.55, 2.38)
pt3dadd(442.45, 419.69, 96.55, 2.38)
pt3dadd(442.09, 419.28, 96.55, 2.38)
pt3dadd(441.74, 419.08, 96.55, 2.38)
pt3dadd(441.38, 418.88, 96.55, 2.38)
pt3dadd(441.02, 418.47, 96.55, 2.38)
pt3dadd(440.67, 418.27, 96.55, 2.38)
pt3dadd(440.31, 417.66, 96.55, 2.38)
pt3dadd(439.95, 417.66, 96.55, 2.38)
pt3dadd(439.6, 417.25, 96.55, 2.38)
pt3dadd(439.42, 417.05, 96.55, 2.38)
pt3dadd(438.88, 416.65, 96.55, 2.38)
pt3dadd(438.71, 416.44, 96.55, 2.38)
pt3dadd(438.35, 416.24, 96.55, 2.38)
pt3dadd(438.17, 415.84, 96.55, 2.38)
pt3dadd(437.81, 415.63, 96.55, 2.38)
pt3dadd(437.46, 415.23, 96.55, 2.38)
pt3dadd(437.28, 415.03, 96.55, 2.38)
pt3dadd(437.1, 414.62, 96.55, 2.38)
pt3dadd(436.74, 414.42, 96.55, 2.38)
pt3dadd(436.39, 414.22, 96.55, 2.38)
pt3dadd(436.03, 413.81, 96.55, 2.38)
pt3dadd(435.67, 413.61, 96.55, 2.38)
pt3dadd(435.32, 413.41, 96.55, 2.38)
pt3dadd(434.96, 413.2, 96.55, 2.38)
pt3dadd(434.6, 413, 96.55, 2.38)
pt3dadd(434.43, 412.8, 96.55, 2.38)
pt3dadd(434.25, 412.6, 96.55, 2.38)
pt3dadd(434.07, 412.19, 96.55, 2.38)
pt3dadd(433.71, 411.99, 96.55, 2.38)
pt3dadd(433.53, 411.58, 96.55, 2.38)
pt3dadd(433.18, 411.38, 96.55, 2.38)
pt3dadd(432.82, 411.38, 96.55, 2.38)
pt3dadd(432.46, 411.18, 96.55, 2.38)
pt3dadd(432.11, 410.77, 96.55, 2.38)
pt3dadd(431.75, 410.57, 96.55, 2.38)
pt3dadd(431.57, 410.37, 96.55, 2.38)
pt3dadd(430.86, 409.56, 96.55, 2.38)
pt3dadd(430.5, 409.36, 96.55, 2.38)
pt3dadd(430.15, 409.15, 96.55, 2.38)
pt3dadd(429.61, 408.55, 96.55, 2.38)
pt3dadd(429.25, 408.55, 96.55, 2.38)
pt3dadd(428.9, 408.14, 96.55, 2.38)
pt3dadd(428.54, 407.94, 96.55, 2.38)
pt3dadd(428.36, 407.74, 96.55, 2.38)
pt3dadd(428.01, 407.33, 96.55, 2.38)
pt3dadd(427.65, 406.92, 96.55, 2.38)
pt3dadd(427.47, 406.72, 96.55, 2.38)
pt3dadd(426.94, 406.52, 96.55, 2.38)
pt3dadd(426.22, 405.91, 96.55, 2.38)
pt3dadd(425.69, 405.71, 96.55, 2.38)
pt3dadd(425.33, 405.3, 96.55, 2.38)
pt3dadd(424.97, 405.3, 96.55, 2.38)
pt3dadd(424.62, 405.1, 96.55, 2.38)
pt3dadd(424.44, 404.9, 96.55, 2.38)
pt3dadd(423.73, 404.49, 96.55, 2.38)
}
}
proc shape3d_178() {
dend[118] { pt3dadd(423.37, 404.29, 96.55, 2.38)
pt3dadd(423.19, 404.09, 96.55, 2.38)
pt3dadd(422.83, 404.09, 96.55, 2.38)
pt3dadd(422.66, 403.89, 96.55, 2.38)
pt3dadd(422.48, 403.68, 96.55, 2.38)
pt3dadd(422.3, 403.48, 96.55, 2.38)
pt3dadd(421.94, 403.28, 96.55, 2.38)
pt3dadd(421.59, 403.08, 96.55, 2.38)
pt3dadd(421.05, 402.87, 96.55, 2.38)
pt3dadd(420.69, 402.67, 96.55, 2.38)
pt3dadd(420.34, 402.67, 96.55, 2.38)
pt3dadd(420.16, 402.47, 96.55, 2.38)
pt3dadd(419.98, 402.27, 96.55, 2.38)
pt3dadd(419.45, 402.06, 96.55, 2.38)
pt3dadd(419.27, 401.86, 96.55, 2.38)
pt3dadd(419.09, 401.66, 96.55, 2.38)
pt3dadd(418.73, 401.66, 96.55, 2.38)
pt3dadd(418.55, 401.46, 96.55, 2.38)
pt3dadd(418.38, 401.25, 96.55, 2.38)
pt3dadd(418.02, 401.25, 96.55, 2.38)
pt3dadd(417.66, 401.05, 96.55, 2.38)
pt3dadd(417.48, 400.85, 96.55, 2.38)
pt3dadd(417.31, 400.65, 96.55, 2.38)
pt3dadd(416.95, 400.44, 96.55, 2.38)
pt3dadd(416.77, 400.24, 96.55, 2.38)
pt3dadd(416.41, 400.04, 96.55, 2.38)
pt3dadd(416.24, 399.84, 96.55, 2.38)
pt3dadd(416.06, 399.63, 96.55, 2.38)
pt3dadd(415.88, 399.43, 96.55, 2.38)
pt3dadd(415.88, 399.03, 96.55, 2.38)
pt3dadd(415.7, 398.82, 96.55, 2.38)
pt3dadd(415.35, 398.42, 96.55, 2.38)
pt3dadd(415.35, 398.01, 96.55, 2.38)
pt3dadd(415.17, 397.61, 96.55, 2.38)
pt3dadd(414.99, 397.41, 96.55, 2.38)
pt3dadd(414.99, 397, 96.55, 2.38)
pt3dadd(414.81, 396.8, 96.55, 2.38)
pt3dadd(414.81, 396.39, 96.55, 2.38)
pt3dadd(414.63, 395.99, 96.55, 2.38)
pt3dadd(414.63, 395.18, 96.55, 2.38)
pt3dadd(414.45, 394.77, 96.55, 2.38)
pt3dadd(414.45, 394.37, 96.55, 2.38)
pt3dadd(414.63, 394.57, 96.55, 2.38)
pt3dadd(414.45, 394.37, 96.55, 2.38)
pt3dadd(414.45, 384.24, 96.55, 2.38)
pt3dadd(414.28, 384.04, 96.55, 2.38)
pt3dadd(414.1, 383.63, 96.55, 2.38)
pt3dadd(413.92, 383.02, 96.55, 2.38)
pt3dadd(413.74, 382.62, 96.55, 2.38)
pt3dadd(413.56, 382.42, 96.55, 2.38)
pt3dadd(413.38, 382.01, 96.55, 2.38)
pt3dadd(413.21, 381.61, 96.55, 2.38)
pt3dadd(413.03, 381.4, 96.55, 2.38)
pt3dadd(412.85, 381, 96.55, 2.38)
pt3dadd(412.67, 380.8, 96.55, 2.38)
pt3dadd(412.14, 380.39, 96.55, 2.38)
pt3dadd(411.96, 379.99, 96.55, 2.38)
pt3dadd(411.78, 379.78, 96.55, 2.38)
pt3dadd(411.6, 379.38, 96.55, 2.38)
pt3dadd(411.24, 379.18, 96.55, 2.38)
pt3dadd(410.71, 378.77, 96.55, 2.38)
pt3dadd(410.53, 378.57, 96.55, 2.38)
pt3dadd(410.17, 378.37, 96.55, 2.38)
pt3dadd(410, 378.16, 96.55, 2.38)
pt3dadd(409.82, 377.96, 96.55, 2.38)
pt3dadd(409.46, 377.35, 96.55, 2.38)
pt3dadd(409.1, 376.95, 96.55, 2.38)
pt3dadd(408.93, 376.75, 96.55, 2.38)
pt3dadd(408.75, 376.14, 96.55, 2.38)
pt3dadd(408.39, 375.94, 96.55, 2.38)
pt3dadd(408.21, 375.53, 96.55, 2.38)
pt3dadd(407.86, 375.13, 96.55, 2.38)
pt3dadd(407.68, 374.72, 96.55, 2.38)
pt3dadd(407.5, 374.52, 96.55, 2.38)
pt3dadd(407.14, 374.32, 96.55, 2.38)
pt3dadd(406.96, 374.11, 96.55, 2.38)
pt3dadd(406.79, 373.71, 96.55, 2.38)
pt3dadd(406.43, 373.3, 96.55, 2.38)
pt3dadd(406.25, 372.9, 96.55, 2.38)
pt3dadd(406.07, 372.69, 96.55, 2.38)
pt3dadd(405.72, 372.49, 96.55, 2.38)
pt3dadd(405.54, 372.09, 96.55, 2.38)
pt3dadd(404.82, 371.07, 96.55, 2.38)
pt3dadd(404.65, 370.67, 96.55, 2.38)
pt3dadd(404.11, 370.26, 96.55, 2.38)
pt3dadd(403.93, 369.86, 96.55, 2.38)
pt3dadd(403.58, 369.66, 96.55, 2.38)
pt3dadd(403.4, 369.25, 96.55, 2.38)
pt3dadd(403.04, 369.05, 96.55, 2.38)
pt3dadd(402.68, 368.64, 96.55, 2.38)
pt3dadd(402.51, 368.44, 96.55, 2.38)
pt3dadd(402.33, 368.04, 96.55, 2.38)
pt3dadd(401.97, 367.43, 96.55, 2.38)
pt3dadd(401.61, 366.82, 96.55, 2.38)
pt3dadd(401.44, 366.21, 96.55, 2.38)
pt3dadd(401.08, 365.81, 96.55, 2.38)
pt3dadd(401.08, 365.4, 96.55, 2.38)
pt3dadd(400.72, 365, 96.55, 2.38)
pt3dadd(400.54, 364.39, 96.55, 2.38)
pt3dadd(400.19, 363.58, 96.55, 2.38)
pt3dadd(400.01, 363.17, 96.55, 2.38)
pt3dadd(399.65, 362.57, 96.55, 2.38)
pt3dadd(399.47, 362.16, 96.55, 2.38)
pt3dadd(399.12, 361.35, 96.55, 2.38)
pt3dadd(398.76, 360.74, 96.55, 2.38)
pt3dadd(398.58, 360.14, 96.55, 2.38)
pt3dadd(398.23, 359.53, 96.55, 2.38)
pt3dadd(398.05, 358.92, 96.55, 2.38)
pt3dadd(397.87, 358.52, 96.55, 2.38)
pt3dadd(397.51, 357.71, 96.55, 2.38)
pt3dadd(397.33, 357.3, 96.55, 2.38)
pt3dadd(397.16, 356.9, 96.55, 2.38)
pt3dadd(396.98, 356.29, 96.55, 2.38)
pt3dadd(396.8, 355.68, 96.55, 2.38)
pt3dadd(396.62, 355.28, 96.55, 2.38)
pt3dadd(396.44, 354.87, 96.55, 2.38)
pt3dadd(396.26, 354.47, 96.55, 2.38)
pt3dadd(396.09, 354.06, 96.55, 2.38)
pt3dadd(396.09, 353.66, 96.55, 2.38)
pt3dadd(395.73, 353.25, 96.55, 2.38)
pt3dadd(395.73, 352.85, 96.55, 2.38)
pt3dadd(395.55, 352.24, 96.55, 2.38)
pt3dadd(395.37, 351.63, 96.55, 2.38)
pt3dadd(395.37, 351.22, 96.55, 2.38)
pt3dadd(395.19, 350.21, 96.55, 2.38)
pt3dadd(395.02, 349.6, 96.55, 2.38)
pt3dadd(395.02, 348.79, 96.55, 2.38)
pt3dadd(394.84, 348.19, 96.55, 2.38)
pt3dadd(394.66, 347.17, 96.55, 2.38)
pt3dadd(394.48, 346.77, 96.55, 2.38)
pt3dadd(394.48, 345.96, 96.55, 2.38)
pt3dadd(394.3, 345.55, 96.55, 2.38)
pt3dadd(394.12, 345.15, 96.55, 2.38)
pt3dadd(394.12, 344.54, 96.55, 2.38)
pt3dadd(393.95, 344.34, 96.55, 2.38)
pt3dadd(393.95, 343.93, 96.55, 2.38)
pt3dadd(393.77, 343.53, 96.55, 2.38)
pt3dadd(393.77, 342.92, 96.55, 2.38)
pt3dadd(393.59, 342.11, 96.55, 2.38)
pt3dadd(393.59, 341.5, 96.55, 2.38)
pt3dadd(393.41, 341.3, 96.55, 2.38)
pt3dadd(393.41, 340.08, 96.55, 2.38)
pt3dadd(393.41, 340.49, 96.55, 2.38)
pt3dadd(393.41, 340.08, 96.55, 2.21)
pt3dadd(393.41, 339.68, 96.55, 2.21)
pt3dadd(393.23, 339.07, 96.55, 2.21)
pt3dadd(393.05, 338.67, 96.55, 2.21)
pt3dadd(393.05, 337.86, 96.55, 2.21)
pt3dadd(392.88, 337.65, 96.55, 2.21)
pt3dadd(392.7, 337.05, 96.55, 2.21)
pt3dadd(392.7, 336.44, 96.55, 2.21)
pt3dadd(392.52, 336.03, 96.55, 2.21)
pt3dadd(392.34, 335.22, 96.55, 2.21)
pt3dadd(392.16, 334.82, 96.55, 2.21)
pt3dadd(392.16, 334.21, 96.55, 2.21)
pt3dadd(391.98, 334.01, 96.55, 2.21)
pt3dadd(391.98, 333.6, 96.55, 2.21)
pt3dadd(391.63, 332.79, 96.55, 2.21)
pt3dadd(391.45, 332.19, 96.55, 2.21)
pt3dadd(391.45, 331.58, 96.55, 2.21)
pt3dadd(391.27, 331.17, 96.55, 2.21)
pt3dadd(391.09, 330.77, 96.55, 2.21)
pt3dadd(391.09, 330.36, 96.55, 2.21)
pt3dadd(390.91, 329.96, 96.55, 2.21)
pt3dadd(390.74, 329.55, 96.55, 2.21)
pt3dadd(390.74, 328.94, 96.55, 2.21)
pt3dadd(390.56, 328.54, 96.55, 2.21)
pt3dadd(390.2, 327.53, 96.55, 2.21)
pt3dadd(390.02, 326.92, 96.55, 2.21)
pt3dadd(390.02, 326.51, 96.55, 2.21)
pt3dadd(389.84, 326.11, 96.55, 2.21)
pt3dadd(389.67, 325.7, 96.55, 2.21)
pt3dadd(389.49, 325.5, 96.55, 2.21)
pt3dadd(389.31, 325.1, 96.55, 2.21)
pt3dadd(389.13, 324.69, 96.55, 2.21)
pt3dadd(388.95, 324.29, 96.55, 2.21)
pt3dadd(388.77, 323.88, 96.55, 2.21)
pt3dadd(388.42, 323.07, 96.55, 2.21)
pt3dadd(388.42, 322.67, 96.55, 2.21)
pt3dadd(388.24, 322.26, 96.55, 2.21)
pt3dadd(388.06, 321.86, 96.55, 2.21)
pt3dadd(387.88, 321.25, 96.55, 2.21)
pt3dadd(387.7, 320.84, 96.55, 2.21)
pt3dadd(387.7, 320.44, 96.55, 2.21)
pt3dadd(387.53, 319.83, 96.55, 2.21)
pt3dadd(387.35, 319.22, 96.55, 2.21)
pt3dadd(387.17, 318.82, 96.55, 2.21)
pt3dadd(386.99, 318.41, 96.55, 2.21)
pt3dadd(386.81, 317.6, 96.55, 2.21)
pt3dadd(386.63, 316.99, 96.55, 2.21)
pt3dadd(386.46, 316.59, 96.55, 2.21)
pt3dadd(386.28, 315.78, 96.55, 2.21)
pt3dadd(386.1, 315.37, 96.55, 2.21)
pt3dadd(385.56, 313.75, 96.55, 2.21)
pt3dadd(385.39, 313.15, 96.55, 2.21)
pt3dadd(385.21, 312.94, 96.55, 2.21)
pt3dadd(385.03, 312.34, 96.55, 2.21)
pt3dadd(384.85, 311.93, 96.55, 2.21)
pt3dadd(384.67, 311.32, 96.55, 2.21)
pt3dadd(384.49, 310.92, 96.55, 2.21)
}
}
proc shape3d_179() {
dend[118] { pt3dadd(384.32, 310.31, 96.55, 2.21)
pt3dadd(384.14, 309.91, 96.55, 2.21)
pt3dadd(384.14, 309.5, 96.55, 2.21)
pt3dadd(383.96, 309.1, 96.55, 2.21)
pt3dadd(383.78, 308.49, 96.55, 2.21)
pt3dadd(383.6, 308.08, 96.55, 2.21)
pt3dadd(383.6, 307.68, 96.55, 2.21)
pt3dadd(383.42, 307.07, 96.55, 2.21)
pt3dadd(383.25, 306.87, 96.55, 2.21)
pt3dadd(383.07, 306.26, 96.55, 2.21)
pt3dadd(383.07, 305.85, 96.55, 2.21)
pt3dadd(382.89, 305.25, 96.55, 2.21)
pt3dadd(382.71, 305.04, 96.55, 2.21)
pt3dadd(382.53, 304.44, 96.55, 2.21)
pt3dadd(382.35, 304.03, 96.55, 2.21)
pt3dadd(382.18, 303.63, 96.55, 2.21)
pt3dadd(382, 303.22, 96.55, 2.21)
pt3dadd(381.82, 302.21, 96.55, 2.21)
pt3dadd(381.64, 301.8, 96.55, 2.21)
pt3dadd(381.46, 301.2, 96.55, 2.21)
pt3dadd(381.28, 300.59, 96.55, 2.21)
pt3dadd(381.11, 300.18, 96.55, 2.21)
pt3dadd(380.93, 299.58, 96.55, 2.21)
pt3dadd(380.75, 298.97, 96.55, 2.21)
pt3dadd(380.57, 298.36, 96.55, 2.21)
pt3dadd(380.39, 297.96, 96.55, 2.21)
pt3dadd(380.04, 296.94, 96.55, 2.21)
pt3dadd(379.86, 296.33, 96.55, 2.21)
pt3dadd(379.68, 295.93, 96.55, 2.21)
pt3dadd(379.32, 295.12, 96.55, 2.21)
pt3dadd(379.14, 294.71, 96.55, 2.21)
pt3dadd(378.97, 294.51, 96.55, 2.21)
pt3dadd(378.79, 294.11, 96.55, 2.21)
pt3dadd(378.61, 293.7, 96.55, 2.21)
pt3dadd(378.43, 293.5, 96.55, 2.21)
pt3dadd(378.07, 292.89, 96.55, 2.21)
pt3dadd(377.72, 292.28, 96.55, 2.21)
pt3dadd(377.36, 291.88, 96.55, 2.21)
pt3dadd(377.36, 291.47, 96.55, 2.21)
pt3dadd(377, 290.87, 96.55, 2.21)
pt3dadd(376.83, 290.46, 96.55, 2.21)
pt3dadd(376.65, 290.06, 96.55, 2.21)
pt3dadd(376.47, 289.65, 96.55, 2.21)
pt3dadd(376.29, 289.25, 96.55, 2.21)
pt3dadd(375.76, 288.23, 96.55, 2.21)
pt3dadd(375.58, 287.83, 96.55, 2.21)
pt3dadd(375.22, 287.42, 96.55, 2.21)
pt3dadd(375.04, 287.02, 96.55, 2.21)
pt3dadd(374.86, 286.82, 96.55, 2.21)
pt3dadd(374.86, 287.22, 96.55, 2.21)
pt3dadd(375.76, 288.23, 98.65, 2.21)
pt3dadd(375.58, 287.83, 98.65, 2.21)
pt3dadd(375.4, 287.42, 98.65, 2.21)
pt3dadd(375.22, 286.82, 98.65, 2.21)
pt3dadd(375.04, 286.21, 98.65, 2.21)
pt3dadd(375.04, 285.6, 98.65, 2.21)
pt3dadd(374.86, 285.4, 98.65, 2.21)
pt3dadd(374.86, 284.99, 98.65, 2.21)
pt3dadd(374.69, 284.59, 98.65, 2.21)
pt3dadd(374.51, 284.18, 98.65, 2.21)
pt3dadd(374.51, 283.57, 98.65, 2.21)
pt3dadd(374.33, 283.17, 98.65, 2.21)
pt3dadd(374.33, 282.76, 98.65, 2.21)
pt3dadd(374.15, 282.56, 98.65, 2.21)
pt3dadd(374.15, 282.16, 98.65, 2.21)
pt3dadd(373.97, 281.95, 98.65, 2.21)
pt3dadd(373.79, 281.55, 98.65, 2.21)
pt3dadd(373.79, 280.94, 98.65, 2.21)
pt3dadd(373.44, 280.13, 98.65, 2.21)
pt3dadd(373.26, 279.73, 98.65, 2.21)
pt3dadd(373.08, 279.32, 98.65, 2.21)
pt3dadd(372.9, 278.92, 98.65, 2.21)
pt3dadd(372.72, 278.51, 98.65, 2.21)
pt3dadd(372.55, 277.9, 98.65, 2.21)
pt3dadd(372.37, 277.7, 98.65, 2.21)
pt3dadd(372.19, 277.3, 98.65, 2.21)
pt3dadd(372.01, 276.69, 98.65, 2.21)
pt3dadd(371.83, 276.28, 98.65, 2.21)
pt3dadd(371.65, 275.88, 98.65, 2.21)
pt3dadd(371.48, 275.47, 98.65, 2.21)
pt3dadd(371.3, 275.07, 98.65, 2.21)
pt3dadd(371.12, 274.66, 98.65, 2.21)
pt3dadd(370.94, 274.26, 98.65, 2.21)
pt3dadd(370.76, 274.05, 98.65, 2.21)
pt3dadd(370.58, 273.45, 98.65, 2.21)
pt3dadd(370.23, 273.04, 98.65, 2.21)
pt3dadd(370.05, 272.64, 98.65, 2.21)
pt3dadd(369.87, 272.43, 98.65, 2.21)
pt3dadd(369.69, 272.03, 98.65, 2.21)
pt3dadd(369.51, 271.83, 98.65, 2.21)
pt3dadd(369.34, 271.22, 98.65, 2.21)
pt3dadd(369.16, 270.81, 98.65, 2.21)
pt3dadd(368.8, 270.41, 98.65, 2.21)
pt3dadd(368.62, 270, 98.65, 2.21)
pt3dadd(368.44, 269.6, 98.65, 2.21)
pt3dadd(368.27, 269.4, 98.65, 2.21)
pt3dadd(368.09, 268.99, 98.65, 2.21)
pt3dadd(367.73, 268.38, 98.65, 2.21)
pt3dadd(367.55, 267.98, 98.65, 2.21)
pt3dadd(367.37, 267.37, 98.65, 2.21)
pt3dadd(367.02, 266.76, 98.65, 2.21)
pt3dadd(366.84, 266.16, 98.65, 2.21)
pt3dadd(366.48, 265.75, 98.65, 2.21)
pt3dadd(366.3, 265.35, 98.65, 2.21)
pt3dadd(365.95, 264.94, 98.65, 2.21)
pt3dadd(365.77, 264.53, 98.65, 2.21)
pt3dadd(365.59, 264.33, 98.65, 2.21)
pt3dadd(365.41, 263.93, 98.65, 2.21)
pt3dadd(365.23, 263.52, 98.65, 2.21)
pt3dadd(365.06, 263.12, 98.65, 2.21)
pt3dadd(364.88, 262.71, 98.65, 2.21)
pt3dadd(364.7, 262.51, 98.65, 2.21)
pt3dadd(364.34, 262.31, 98.65, 2.21)
pt3dadd(364.34, 261.9, 98.65, 2.21)
pt3dadd(363.81, 260.89, 98.65, 2.21)
pt3dadd(363.63, 260.48, 98.65, 2.21)
pt3dadd(363.45, 260.28, 98.65, 2.21)
pt3dadd(363.27, 259.88, 98.65, 2.21)
pt3dadd(363.09, 259.67, 98.65, 2.21)
pt3dadd(362.92, 259.27, 98.65, 2.21)
pt3dadd(362.74, 259.07, 98.65, 2.21)
pt3dadd(362.56, 258.66, 98.65, 2.21)
pt3dadd(362.38, 258.26, 98.65, 2.21)
pt3dadd(362.2, 257.85, 98.65, 2.21)
pt3dadd(362.02, 257.45, 98.65, 2.21)
pt3dadd(361.67, 257.24, 98.65, 2.21)
pt3dadd(361.49, 256.84, 98.65, 2.21)
pt3dadd(361.31, 256.43, 98.65, 2.21)
pt3dadd(361.13, 256.03, 98.65, 2.21)
pt3dadd(360.95, 255.62, 98.65, 2.21)
pt3dadd(360.78, 255.22, 98.65, 2.21)
pt3dadd(360.42, 254.61, 98.65, 2.21)
pt3dadd(360.06, 254.21, 98.65, 2.21)
pt3dadd(359.88, 253.8, 98.65, 2.21)
pt3dadd(359.71, 253.39, 98.65, 2.21)
pt3dadd(359.53, 252.99, 98.65, 2.21)
pt3dadd(359.35, 252.58, 98.65, 2.21)
pt3dadd(358.99, 252.18, 98.65, 2.21)
pt3dadd(358.81, 251.77, 98.65, 2.21)
pt3dadd(358.64, 251.17, 98.65, 2.21)
pt3dadd(358.46, 250.76, 98.65, 2.21)
pt3dadd(358.1, 250.15, 98.65, 2.21)
pt3dadd(357.92, 249.75, 98.65, 2.21)
pt3dadd(357.74, 249.55, 98.65, 2.21)
pt3dadd(357.57, 249.14, 98.65, 2.21)
pt3dadd(357.03, 248.13, 98.65, 2.21)
pt3dadd(356.67, 247.12, 98.65, 2.21)
pt3dadd(356.5, 246.71, 98.65, 2.21)
pt3dadd(355.96, 245.7, 98.65, 2.21)
pt3dadd(355.78, 245.09, 98.65, 2.21)
pt3dadd(355.6, 244.69, 98.65, 2.21)
pt3dadd(355.43, 244.08, 98.65, 2.21)
pt3dadd(355.07, 243.27, 98.65, 2.21)
pt3dadd(354.89, 242.86, 98.65, 2.21)
pt3dadd(354.71, 242.46, 98.65, 2.21)
pt3dadd(354.53, 242.05, 98.65, 2.21)
pt3dadd(354.18, 241.44, 98.65, 2.21)
pt3dadd(353.82, 240.84, 98.65, 2.21)
pt3dadd(353.64, 240.43, 98.65, 2.21)
pt3dadd(353.46, 240.03, 98.65, 2.21)
pt3dadd(353.29, 239.82, 98.65, 2.21)
pt3dadd(353.11, 239.42, 98.65, 2.21)
pt3dadd(352.93, 239.01, 98.65, 2.21)
pt3dadd(352.75, 238.41, 98.65, 2.21)
pt3dadd(352.57, 238, 98.65, 2.21)
pt3dadd(352.39, 237.8, 98.65, 2.21)
pt3dadd(352.22, 237.39, 98.65, 2.21)
pt3dadd(352.04, 237.19, 98.65, 2.21)
pt3dadd(351.68, 236.58, 98.65, 2.21)
pt3dadd(351.32, 235.98, 98.65, 2.21)
pt3dadd(351.15, 235.57, 98.65, 2.21)
pt3dadd(350.97, 235.37, 98.65, 2.21)
pt3dadd(350.79, 234.96, 98.65, 2.21)
pt3dadd(350.61, 234.56, 98.65, 2.21)
pt3dadd(350.61, 235.37, 98.65, 2.21)
pt3dadd(350.97, 235.98, 98.65, 2.21)
pt3dadd(350.43, 234.15, 98.65, 2.21)
pt3dadd(350.25, 233.95, 98.65, 2.21)
pt3dadd(350.08, 233.55, 98.65, 2.21)
pt3dadd(349.9, 233.34, 98.65, 2.21)
pt3dadd(349.72, 233.14, 98.65, 2.21)
pt3dadd(349.54, 232.94, 98.65, 2.21)
pt3dadd(349.36, 232.74, 98.65, 2.21)
pt3dadd(349.18, 232.33, 98.65, 2.21)
pt3dadd(349.01, 231.92, 98.65, 2.21)
pt3dadd(348.83, 231.52, 98.65, 2.21)
pt3dadd(348.65, 231.11, 98.65, 2.21)
pt3dadd(348.29, 230.51, 98.65, 2.21)
pt3dadd(348.11, 230.1, 98.65, 2.21)
pt3dadd(347.94, 229.7, 98.65, 2.21)
pt3dadd(347.76, 229.49, 98.65, 2.21)
pt3dadd(347.76, 229.09, 98.65, 2.21)
pt3dadd(347.58, 228.68, 98.65, 2.21)
pt3dadd(347.4, 228.28, 98.65, 2.21)
pt3dadd(347.22, 228.08, 98.65, 2.21)
pt3dadd(347.22, 227.47, 98.65, 2.21)
pt3dadd(346.87, 226.86, 98.65, 2.21)
pt3dadd(346.69, 226.66, 98.65, 2.21)
pt3dadd(346.51, 226.25, 98.65, 2.21)
pt3dadd(346.51, 225.85, 98.65, 2.21)
}
}
proc shape3d_180() {
dend[118] { pt3dadd(346.33, 225.65, 98.65, 2.21)
pt3dadd(346.15, 225.24, 98.65, 2.21)
pt3dadd(345.98, 224.84, 98.65, 2.21)
pt3dadd(345.98, 224.43, 98.65, 2.21)
pt3dadd(345.8, 224.03, 98.65, 2.21)
pt3dadd(345.62, 223.62, 98.65, 2.21)
pt3dadd(345.26, 223.01, 98.65, 2.21)
pt3dadd(345.08, 222.61, 98.65, 2.21)
pt3dadd(344.91, 222.2, 98.65, 2.21)
pt3dadd(344.91, 221.8, 98.65, 2.21)
pt3dadd(344.73, 221.39, 98.65, 2.21)
pt3dadd(344.37, 220.58, 98.65, 2.21)
pt3dadd(344.19, 219.97, 98.65, 2.21)
pt3dadd(344.01, 219.57, 98.65, 2.21)
pt3dadd(343.66, 218.96, 98.65, 2.21)
pt3dadd(343.48, 218.35, 98.65, 2.21)
pt3dadd(343.3, 217.75, 98.65, 2.21)
pt3dadd(343.12, 217.54, 98.65, 2.21)
pt3dadd(342.94, 217.14, 98.65, 2.21)
pt3dadd(342.77, 216.94, 98.65, 2.21)
pt3dadd(342.59, 216.33, 98.65, 2.21)
pt3dadd(342.23, 215.72, 98.65, 2.21)
pt3dadd(342.23, 215.32, 98.65, 2.21)
pt3dadd(342.05, 214.91, 98.65, 2.21)
pt3dadd(341.87, 214.51, 98.65, 2.21)
pt3dadd(341.7, 214.3, 98.65, 2.21)
pt3dadd(341.52, 213.9, 98.65, 2.21)
pt3dadd(341.34, 213.49, 98.65, 2.21)
pt3dadd(341.16, 213.29, 98.65, 2.21)
pt3dadd(341.16, 212.89, 98.65, 2.21)
pt3dadd(340.98, 212.68, 98.65, 2.21)
pt3dadd(340.8, 212.28, 98.65, 2.21)
pt3dadd(340.63, 211.87, 98.65, 2.21)
pt3dadd(340.45, 211.47, 98.65, 2.21)
pt3dadd(340.27, 211.06, 98.65, 2.21)
pt3dadd(340.27, 210.66, 98.65, 2.21)
pt3dadd(340.09, 210.25, 98.65, 2.21)
pt3dadd(339.91, 209.85, 98.65, 2.21)
pt3dadd(339.73, 209.24, 98.65, 2.21)
pt3dadd(339.56, 209.04, 98.65, 2.21)
pt3dadd(339.2, 208.02, 98.65, 2.21)
pt3dadd(339.02, 207.62, 98.65, 2.21)
pt3dadd(338.84, 207.21, 98.65, 2.21)
pt3dadd(338.84, 206.81, 98.65, 2.21)
pt3dadd(338.49, 206.4, 98.65, 2.21)
pt3dadd(338.49, 206, 98.65, 2.21)
pt3dadd(338.31, 205.39, 98.65, 2.21)
pt3dadd(338.13, 204.99, 98.65, 2.21)
pt3dadd(337.95, 204.58, 98.65, 2.21)
pt3dadd(337.77, 204.18, 98.65, 2.21)
pt3dadd(337.59, 203.57, 98.65, 2.21)
pt3dadd(337.42, 202.96, 98.65, 2.21)
pt3dadd(337.24, 202.35, 98.65, 2.21)
pt3dadd(337.06, 201.95, 98.65, 2.21)
pt3dadd(336.88, 201.75, 98.65, 2.21)
pt3dadd(336.88, 201.34, 98.65, 2.21)
pt3dadd(336.7, 200.94, 98.65, 2.21)
pt3dadd(336.35, 200.53, 98.65, 2.21)
pt3dadd(336.17, 200.13, 98.65, 2.21)
pt3dadd(335.99, 199.72, 98.65, 2.21)
pt3dadd(335.63, 199.11, 98.65, 2.21)
pt3dadd(334.92, 198.3, 98.65, 2.21)
pt3dadd(334.74, 197.9, 98.65, 2.21)
pt3dadd(334.56, 197.69, 98.65, 2.21)
pt3dadd(334.38, 197.49, 98.65, 2.21)
pt3dadd(334.21, 197.29, 98.65, 2.21)
pt3dadd(334.21, 196.88, 98.65, 2.21)
pt3dadd(333.85, 196.68, 98.65, 2.21)
pt3dadd(332.96, 195.67, 98.65, 2.21)
pt3dadd(332.78, 195.47, 98.65, 2.21)
pt3dadd(332.42, 195.06, 98.65, 2.21)
pt3dadd(332.24, 194.86, 98.65, 2.21)
pt3dadd(332.07, 194.66, 98.65, 2.21)
pt3dadd(331.89, 194.45, 98.65, 2.21)
pt3dadd(331.71, 194.05, 98.65, 2.21)
pt3dadd(331.35, 193.85, 98.65, 2.21)
pt3dadd(331.17, 193.64, 98.65, 2.21)
pt3dadd(331, 193.24, 98.65, 2.21)
pt3dadd(330.64, 192.83, 98.65, 2.21)
pt3dadd(330.46, 192.63, 98.65, 2.21)
pt3dadd(330.28, 192.43, 98.65, 2.21)
pt3dadd(329.93, 192.23, 98.65, 2.21)
pt3dadd(329.75, 192.02, 98.65, 2.21)
pt3dadd(329.39, 191.82, 98.65, 2.21)
pt3dadd(329.03, 191.21, 98.65, 2.21)
pt3dadd(328.68, 191.01, 98.65, 2.21)
pt3dadd(328.5, 190.61, 98.65, 2.21)
pt3dadd(328.14, 190.4, 98.65, 2.21)
pt3dadd(327.96, 190, 98.65, 2.21)
pt3dadd(327.61, 189.8, 98.65, 2.21)
pt3dadd(327.25, 189.39, 98.65, 2.21)
pt3dadd(326.89, 188.99, 98.65, 2.21)
pt3dadd(326.72, 188.58, 98.65, 2.21)
pt3dadd(326.54, 188.38, 98.65, 2.21)
pt3dadd(326.36, 188.17, 98.65, 2.21)
pt3dadd(326.18, 187.97, 98.65, 2.21)
pt3dadd(326.18, 188.58, 98.65, 2.21)
pt3dadd(326.54, 187.77, 100.75, 2.21)
pt3dadd(326.36, 187.57, 100.75, 2.21)
pt3dadd(326.18, 186.96, 100.75, 2.21)
pt3dadd(326.18, 186.35, 100.75, 2.21)
pt3dadd(326, 185.95, 100.75, 2.21)
pt3dadd(325.82, 185.54, 100.75, 2.21)
pt3dadd(325.82, 184.93, 100.75, 2.21)
pt3dadd(325.65, 184.53, 100.75, 2.21)
pt3dadd(325.47, 184.12, 100.75, 2.21)
pt3dadd(325.29, 183.92, 100.75, 2.21)
pt3dadd(325.11, 183.52, 100.75, 2.21)
pt3dadd(325.11, 183.11, 100.75, 2.21)
pt3dadd(324.93, 182.91, 100.75, 2.21)
pt3dadd(324.75, 182.71, 100.75, 2.21)
pt3dadd(324.75, 182.3, 100.75, 2.21)
pt3dadd(324.58, 181.9, 100.75, 2.21)
pt3dadd(324.4, 181.49, 100.75, 2.21)
pt3dadd(324.22, 181.29, 100.75, 2.21)
pt3dadd(324.04, 181.09, 100.75, 2.21)
pt3dadd(324.04, 180.68, 100.75, 2.21)
pt3dadd(323.68, 180.28, 100.75, 2.21)
pt3dadd(323.51, 179.87, 100.75, 2.21)
pt3dadd(323.33, 179.67, 100.75, 2.21)
pt3dadd(322.97, 179.26, 100.75, 2.21)
pt3dadd(322.79, 178.86, 100.75, 2.21)
pt3dadd(322.61, 178.45, 100.75, 2.21)
pt3dadd(322.26, 178.25, 100.75, 2.21)
pt3dadd(322.08, 177.85, 100.75, 2.21)
pt3dadd(321.9, 177.64, 100.75, 2.21)
pt3dadd(321.72, 177.24, 100.75, 2.21)
pt3dadd(321.37, 177.03, 100.75, 2.21)
pt3dadd(321.19, 176.63, 100.75, 2.21)
pt3dadd(320.83, 176.43, 100.75, 2.21)
pt3dadd(320.47, 176.22, 100.75, 2.21)
pt3dadd(319.94, 175.21, 100.75, 2.21)
pt3dadd(319.76, 175.01, 100.75, 2.21)
pt3dadd(319.4, 174.6, 100.75, 2.21)
pt3dadd(319.23, 174.4, 100.75, 2.21)
pt3dadd(318.87, 174.2, 100.75, 2.21)
pt3dadd(318.69, 174, 100.75, 2.21)
pt3dadd(318.51, 173.39, 100.75, 2.21)
pt3dadd(318.16, 173.19, 100.75, 2.21)
pt3dadd(317.8, 172.58, 100.75, 2.21)
pt3dadd(317.44, 171.97, 100.75, 2.21)
pt3dadd(317.09, 171.57, 100.75, 2.21)
pt3dadd(316.91, 171.36, 100.75, 2.21)
pt3dadd(316.73, 171.16, 100.75, 2.21)
pt3dadd(316.37, 170.55, 100.75, 2.21)
pt3dadd(316.02, 169.95, 100.75, 2.21)
pt3dadd(315.66, 169.54, 100.75, 2.21)
pt3dadd(315.48, 169.34, 100.75, 2.21)
pt3dadd(315.12, 168.73, 100.75, 2.21)
pt3dadd(314.95, 168.53, 100.75, 2.21)
pt3dadd(314.77, 168.12, 100.75, 2.21)
pt3dadd(314.41, 167.92, 100.75, 2.21)
pt3dadd(314.23, 167.72, 100.75, 2.21)
pt3dadd(314.05, 167.31, 100.75, 2.21)
pt3dadd(313.7, 167.11, 100.75, 2.21)
pt3dadd(313.16, 166.5, 100.75, 2.21)
pt3dadd(312.98, 166.3, 100.75, 2.21)
pt3dadd(312.63, 165.69, 100.75, 2.21)
pt3dadd(312.45, 165.49, 100.75, 2.21)
pt3dadd(312.09, 165.29, 100.75, 2.21)
pt3dadd(311.91, 164.88, 100.75, 2.21)
pt3dadd(311.56, 164.68, 100.75, 2.21)
pt3dadd(311.38, 164.48, 100.75, 2.21)
pt3dadd(311.2, 164.07, 100.75, 2.21)
pt3dadd(310.84, 163.87, 100.75, 2.21)
pt3dadd(310.67, 163.67, 100.75, 2.21)
pt3dadd(310.49, 163.26, 100.75, 2.21)
pt3dadd(309.77, 162.45, 100.75, 2.21)
pt3dadd(309.6, 162.05, 100.75, 2.21)
pt3dadd(309.42, 161.84, 100.75, 2.21)
pt3dadd(309.06, 161.64, 100.75, 2.21)
pt3dadd(308.88, 161.24, 100.75, 2.21)
pt3dadd(308.7, 160.83, 100.75, 2.21)
pt3dadd(308.53, 160.43, 100.75, 2.21)
pt3dadd(308.17, 160.02, 100.75, 2.21)
pt3dadd(307.99, 159.62, 100.75, 2.21)
pt3dadd(307.81, 159.21, 100.75, 2.21)
pt3dadd(307.63, 159.01, 100.75, 2.21)
pt3dadd(307.46, 158.6, 100.75, 2.21)
pt3dadd(307.28, 158.2, 100.75, 2.21)
pt3dadd(307.1, 157.79, 100.75, 2.21)
pt3dadd(306.56, 157.19, 100.75, 2.21)
pt3dadd(306.39, 156.78, 100.75, 2.21)
pt3dadd(305.67, 155.77, 100.75, 2.21)
pt3dadd(305.14, 155.16, 100.75, 2.21)
pt3dadd(304.96, 154.55, 100.75, 2.21)
pt3dadd(304.42, 153.94, 100.75, 2.21)
pt3dadd(304.07, 153.74, 100.75, 2.21)
pt3dadd(303.71, 153.34, 100.75, 2.21)
pt3dadd(303.53, 152.93, 100.75, 2.21)
pt3dadd(303.35, 152.53, 100.75, 2.21)
pt3dadd(303.18, 152.32, 100.75, 2.21)
pt3dadd(302.46, 151.31, 100.75, 2.21)
pt3dadd(302.28, 150.91, 100.75, 2.21)
pt3dadd(301.93, 150.5, 100.75, 2.21)
pt3dadd(301.75, 150.1, 100.75, 2.21)
pt3dadd(301.57, 149.69, 100.75, 2.21)
pt3dadd(301.21, 149.49, 100.75, 2.21)
pt3dadd(301.04, 149.08, 100.75, 2.21)
pt3dadd(300.68, 148.68, 100.75, 2.21)
}
}
proc shape3d_181() {
dend[118] { pt3dadd(300.5, 148.48, 100.75, 2.21)
pt3dadd(300.14, 148.07, 100.75, 2.21)
pt3dadd(299.79, 147.46, 100.75, 2.21)
pt3dadd(299.61, 147.06, 100.75, 2.21)
pt3dadd(299.43, 146.86, 100.75, 2.21)
pt3dadd(299.07, 146.45, 100.75, 2.21)
pt3dadd(298.9, 146.25, 100.75, 2.21)
pt3dadd(298.72, 145.84, 100.75, 2.21)
pt3dadd(297.83, 144.83, 100.75, 2.21)
pt3dadd(297.65, 144.63, 100.75, 2.21)
pt3dadd(297.47, 144.42, 100.75, 2.21)
pt3dadd(297.11, 144.22, 100.75, 2.21)
pt3dadd(296.76, 144.02, 100.75, 2.21)
pt3dadd(296.4, 143.61, 100.75, 2.21)
pt3dadd(296.22, 143.41, 100.75, 2.21)
pt3dadd(296.04, 143.21, 100.75, 2.21)
pt3dadd(295.51, 142.6, 100.75, 2.21)
pt3dadd(295.15, 142.2, 100.75, 2.21)
pt3dadd(294.08, 140.98, 100.75, 2.21)
pt3dadd(293.9, 140.78, 100.75, 2.21)
pt3dadd(293.72, 140.58, 100.75, 2.21)
pt3dadd(293.37, 140.17, 100.75, 2.21)
pt3dadd(293.19, 139.97, 100.75, 2.21)
pt3dadd(293.01, 139.77, 100.75, 2.21)
pt3dadd(292.65, 139.56, 100.75, 2.21)
pt3dadd(291.58, 138.35, 100.75, 2.21)
pt3dadd(291.41, 138.15, 100.75, 2.21)
pt3dadd(291.05, 137.74, 100.75, 2.21)
pt3dadd(290.69, 137.54, 100.75, 2.21)
pt3dadd(290.51, 137.13, 100.75, 2.21)
pt3dadd(289.98, 136.73, 100.75, 2.21)
pt3dadd(289.62, 136.32, 100.75, 2.21)
pt3dadd(289.27, 135.92, 100.75, 2.21)
pt3dadd(288.73, 135.51, 100.75, 2.21)
pt3dadd(288.37, 135.31, 100.75, 2.21)
pt3dadd(288.2, 134.91, 100.75, 2.21)
pt3dadd(287.84, 134.5, 100.75, 2.21)
pt3dadd(287.3, 134.3, 100.75, 2.21)
pt3dadd(286.95, 134.1, 100.75, 2.21)
pt3dadd(286.77, 133.89, 100.75, 2.21)
pt3dadd(286.41, 133.89, 100.75, 2.21)
pt3dadd(286.23, 133.69, 100.75, 2.21)
pt3dadd(285.88, 133.49, 100.75, 2.21)
pt3dadd(285.52, 133.28, 100.75, 2.21)
pt3dadd(286.06, 133.49, 100.75, 2.21)
pt3dadd(279.82, 128.22, 100.75, 2.21)
pt3dadd(279.82, 128.63, 100.75, 2.21)
pt3dadd(279.64, 128.42, 100.75, 2.21)
pt3dadd(279.46, 128.02, 100.75, 2.21)
pt3dadd(279.28, 127.61, 100.75, 2.21)
pt3dadd(278.21, 126.4, 100.75, 2.21)
pt3dadd(278.03, 126.2, 100.75, 2.21)
pt3dadd(277.85, 125.99, 100.75, 2.21)
pt3dadd(277.5, 125.59, 100.75, 2.21)
pt3dadd(277.32, 125.39, 100.75, 2.21)
pt3dadd(277.14, 124.98, 100.75, 2.21)
pt3dadd(276.96, 124.78, 100.75, 2.21)
pt3dadd(276.78, 124.58, 100.75, 2.21)
pt3dadd(276.43, 124.37, 100.75, 2.21)
pt3dadd(276.25, 123.97, 100.75, 2.21)
pt3dadd(276.07, 123.56, 100.75, 2.21)
pt3dadd(275.71, 123.36, 100.75, 2.21)
pt3dadd(275.54, 123.16, 100.75, 2.21)
pt3dadd(275.36, 122.75, 100.75, 2.21)
pt3dadd(275.18, 122.14, 100.75, 2.21)
pt3dadd(274.82, 121.94, 100.75, 2.21)
pt3dadd(274.64, 121.54, 100.75, 2.21)
pt3dadd(274.47, 121.13, 100.75, 2.21)
pt3dadd(274.29, 120.73, 100.75, 2.21)
pt3dadd(274.11, 120.52, 100.75, 2.21)
pt3dadd(273.93, 120.12, 100.75, 2.21)
pt3dadd(273.93, 119.51, 100.75, 2.21)
pt3dadd(273.57, 119.31, 100.75, 2.21)
pt3dadd(273.57, 118.7, 100.75, 2.21)
pt3dadd(273.4, 118.09, 100.75, 2.21)
pt3dadd(273.22, 117.69, 100.75, 2.21)
pt3dadd(273.04, 117.08, 100.75, 2.21)
pt3dadd(272.68, 116.47, 100.75, 2.21)
pt3dadd(272.5, 115.87, 100.75, 2.21)
pt3dadd(272.33, 115.46, 100.75, 2.21)
pt3dadd(272.15, 115.06, 100.75, 2.21)
pt3dadd(272.15, 114.45, 100.75, 2.21)
pt3dadd(271.79, 113.84, 100.75, 2.21)
pt3dadd(271.43, 113.44, 100.75, 2.21)
pt3dadd(271.43, 113.03, 100.75, 2.21)
pt3dadd(271.26, 112.63, 100.75, 2.21)
pt3dadd(271.08, 112.22, 100.75, 2.21)
pt3dadd(270.9, 112.02, 100.75, 2.21)
pt3dadd(270.72, 111.82, 100.75, 2.21)
pt3dadd(270.54, 111.41, 100.75, 2.21)
pt3dadd(270.36, 110.8, 100.75, 2.21)
pt3dadd(270.01, 110.4, 100.75, 2.21)
pt3dadd(269.83, 109.99, 100.75, 2.21)
pt3dadd(269.65, 109.59, 100.75, 2.21)
pt3dadd(269.47, 108.98, 100.75, 2.21)
pt3dadd(269.29, 108.78, 100.75, 2.21)
pt3dadd(269.12, 108.37, 100.75, 2.21)
pt3dadd(268.94, 108.17, 100.75, 2.21)
pt3dadd(268.76, 107.97, 100.75, 2.21)
pt3dadd(268.58, 107.56, 100.75, 2.21)
pt3dadd(268.4, 107.36, 100.75, 2.21)
pt3dadd(268.05, 106.75, 100.75, 2.21)
pt3dadd(267.87, 106.55, 100.75, 2.21)
pt3dadd(267.69, 106.14, 100.75, 2.21)
pt3dadd(267.33, 105.74, 100.75, 2.21)
pt3dadd(267.15, 105.54, 100.75, 2.21)
pt3dadd(266.62, 104.93, 100.75, 2.21)
pt3dadd(266.44, 104.73, 100.75, 2.21)
pt3dadd(266.08, 104.52, 100.75, 2.21)
pt3dadd(265.91, 104.32, 100.75, 2.21)
pt3dadd(265.55, 104.12, 100.75, 2.21)
pt3dadd(265.37, 103.92, 100.75, 2.21)
pt3dadd(265.01, 103.71, 100.75, 2.21)
pt3dadd(264.84, 103.51, 100.75, 2.21)
pt3dadd(264.48, 103.31, 100.75, 2.21)
pt3dadd(264.12, 103.31, 100.75, 2.21)
pt3dadd(263.77, 103.11, 100.75, 2.21)
pt3dadd(263.41, 102.9, 100.75, 2.21)
pt3dadd(263.05, 102.9, 100.75, 2.21)
pt3dadd(262.87, 102.7, 100.75, 2.21)
pt3dadd(262.7, 102.5, 100.75, 2.21)
pt3dadd(261.98, 102.09, 100.75, 2.21)
pt3dadd(261.63, 101.69, 100.75, 2.21)
pt3dadd(261.45, 101.49, 100.75, 2.21)
pt3dadd(260.91, 101.28, 100.75, 2.21)
pt3dadd(260.2, 101.28, 100.75, 2.21)
pt3dadd(260.02, 101.08, 100.75, 2.21)
pt3dadd(259.84, 100.88, 100.75, 2.21)
pt3dadd(259.31, 100.88, 100.75, 2.21)
pt3dadd(259.13, 100.67, 100.75, 2.21)
pt3dadd(258.77, 100.67, 100.75, 2.21)
pt3dadd(258.59, 100.47, 100.75, 2.21)
pt3dadd(258.24, 100.27, 100.75, 2.21)
pt3dadd(257.88, 100.07, 100.75, 2.21)
pt3dadd(257.52, 99.86, 100.75, 2.21)
pt3dadd(257.35, 99.66, 100.75, 2.21)
pt3dadd(257.17, 99.46, 100.75, 2.21)
pt3dadd(256.81, 99.05, 100.75, 2.21)
pt3dadd(256.63, 98.85, 100.75, 2.21)
pt3dadd(256.28, 98.85, 100.75, 2.21)
pt3dadd(256.1, 98.65, 100.75, 2.21)
pt3dadd(255.92, 98.45, 100.75, 2.21)
pt3dadd(255.56, 98.24, 100.75, 2.21)
pt3dadd(255.38, 98.04, 100.75, 2.21)
pt3dadd(255.21, 97.64, 100.75, 2.21)
pt3dadd(255.03, 97.43, 100.75, 2.21)
pt3dadd(254.85, 97.03, 100.75, 2.21)
pt3dadd(254.67, 96.83, 100.75, 2.21)
pt3dadd(254.31, 96.02, 100.75, 2.21)
pt3dadd(254.14, 95.41, 100.75, 2.21)
pt3dadd(253.96, 95, 100.75, 2.21)
pt3dadd(253.78, 94.8, 100.75, 2.21)
pt3dadd(253.6, 93.99, 100.75, 2.21)
pt3dadd(253.42, 93.59, 100.75, 2.21)
pt3dadd(253.24, 92.98, 100.75, 2.21)
pt3dadd(253.07, 92.57, 100.75, 2.21)
pt3dadd(252.89, 91.97, 100.75, 2.21)
pt3dadd(252.71, 91.76, 100.75, 2.21)
pt3dadd(252.53, 91.36, 100.75, 2.21)
pt3dadd(252.53, 90.95, 100.75, 2.21)
pt3dadd(252.35, 90.75, 100.75, 2.21)
pt3dadd(252.17, 90.55, 100.75, 2.21)
pt3dadd(252.17, 90.14, 100.75, 2.21)
pt3dadd(252, 89.94, 100.75, 2.21)
pt3dadd(251.82, 89.74, 100.75, 2.21)
pt3dadd(251.82, 89.33, 100.75, 2.21)
pt3dadd(251.64, 89.13, 100.75, 2.21)
pt3dadd(251.46, 88.72, 100.75, 2.21)
pt3dadd(251.46, 88.12, 100.75, 2.21)
pt3dadd(251.28, 87.71, 100.75, 2.21)
pt3dadd(251.28, 80.62, 100.75, 2.21)
pt3dadd(251.46, 80.22, 100.75, 2.21)
pt3dadd(251.64, 80.02, 100.75, 2.21)
pt3dadd(251.82, 79.61, 100.75, 2.21)
pt3dadd(252.17, 79.21, 100.75, 2.21)
pt3dadd(252.35, 79, 100.75, 2.21)
pt3dadd(252.53, 78.39, 100.75, 2.21)
pt3dadd(252.71, 77.99, 100.75, 2.21)
pt3dadd(252.89, 77.79, 100.75, 2.21)
pt3dadd(253.24, 77.38, 100.75, 2.21)
pt3dadd(253.42, 77.18, 100.75, 2.21)
pt3dadd(253.6, 76.98, 100.75, 2.21)
pt3dadd(253.78, 76.77, 100.75, 2.21)
pt3dadd(253.78, 76.37, 100.75, 2.21)
pt3dadd(254.14, 75.96, 100.75, 2.21)
pt3dadd(254.31, 75.76, 100.75, 2.21)
pt3dadd(254.49, 75.36, 100.75, 2.21)
pt3dadd(254.85, 74.95, 100.75, 2.21)
pt3dadd(255.03, 74.75, 100.75, 2.21)
pt3dadd(255.21, 74.55, 100.75, 2.21)
pt3dadd(255.38, 74.34, 100.75, 2.21)
pt3dadd(255.38, 73.94, 100.75, 2.21)
pt3dadd(255.74, 73.94, 100.75, 2.21)
pt3dadd(255.74, 73.53, 100.75, 2.21)
pt3dadd(255.92, 73.33, 100.75, 2.21)
pt3dadd(256.1, 73.13, 100.75, 2.21)
pt3dadd(256.63, 72.72, 100.75, 2.21)
pt3dadd(256.99, 72.32, 100.75, 2.21)
pt3dadd(257.52, 71.71, 100.75, 2.21)
pt3dadd(257.7, 71.31, 100.75, 2.21)
}
}
proc shape3d_182() {
dend[118] { pt3dadd(258.06, 71.1, 100.75, 2.21)
pt3dadd(258.42, 70.7, 100.75, 2.21)
pt3dadd(258.77, 70.29, 100.75, 2.21)
pt3dadd(259.13, 69.69, 100.75, 2.21)
pt3dadd(259.49, 69.28, 100.75, 2.21)
pt3dadd(259.49, 68.88, 100.75, 2.21)
pt3dadd(259.66, 68.67, 100.75, 2.21)
pt3dadd(259.31, 69.48, 98.65, 2.21)
pt3dadd(259.66, 69.48, 98.65, 2.21)
pt3dadd(259.66, 69.08, 98.65, 2.21)
pt3dadd(260.02, 68.67, 98.65, 2.21)
pt3dadd(260.56, 68.27, 98.65, 2.21)
pt3dadd(261.8, 66.85, 98.65, 2.21)
pt3dadd(261.98, 66.65, 98.65, 2.21)
pt3dadd(262.34, 66.24, 98.65, 2.21)
pt3dadd(262.7, 65.43, 98.65, 2.21)
pt3dadd(263.59, 64.22, 98.65, 2.21)
pt3dadd(263.59, 63.81, 98.65, 2.21)
pt3dadd(263.94, 63.2, 98.65, 2.21)
pt3dadd(264.3, 62.6, 98.65, 2.21)
pt3dadd(264.66, 62.19, 98.65, 2.21)
pt3dadd(264.84, 61.79, 98.65, 2.21)
pt3dadd(265.37, 61.18, 98.65, 2.21)
pt3dadd(265.55, 60.77, 98.65, 2.21)
pt3dadd(265.73, 60.37, 98.65, 2.21)
pt3dadd(266.62, 59.36, 98.65, 2.21)
pt3dadd(266.8, 59.15, 98.65, 2.21)
pt3dadd(267.33, 58.34, 98.65, 2.21)
pt3dadd(267.51, 57.94, 98.65, 2.21)
pt3dadd(267.87, 57.53, 98.65, 2.21)
pt3dadd(268.22, 56.92, 98.65, 2.21)
pt3dadd(268.4, 56.52, 98.65, 2.21)
pt3dadd(268.94, 55.51, 98.65, 2.21)
pt3dadd(269.12, 55.3, 98.65, 2.21)
pt3dadd(269.29, 54.7, 98.65, 2.21)
pt3dadd(269.83, 54.09, 98.65, 2.21)
pt3dadd(270.01, 53.68, 98.65, 2.21)
pt3dadd(270.19, 53.28, 98.65, 2.21)
pt3dadd(270.54, 52.87, 98.65, 2.21)
pt3dadd(270.72, 52.47, 98.65, 2.21)
pt3dadd(271.08, 51.86, 98.65, 2.21)
pt3dadd(271.26, 51.46, 98.65, 2.21)
pt3dadd(271.79, 50.85, 98.65, 2.21)
pt3dadd(271.97, 50.65, 98.65, 2.21)
pt3dadd(272.33, 49.84, 98.65, 2.21)
pt3dadd(272.68, 49.63, 98.65, 2.21)
pt3dadd(272.86, 49.23, 98.65, 2.21)
pt3dadd(273.04, 49.03, 98.65, 2.21)
pt3dadd(273.22, 48.42, 98.65, 2.21)
pt3dadd(273.75, 47.81, 98.65, 2.21)
pt3dadd(273.75, 47.41, 98.65, 2.21)
pt3dadd(273.93, 47.2, 98.65, 2.21)
pt3dadd(274.29, 47, 98.65, 2.21)
pt3dadd(274.47, 46.8, 98.65, 2.21)
pt3dadd(274.64, 46.39, 98.65, 2.21)
pt3dadd(275.36, 45.58, 98.65, 2.21)
pt3dadd(275.54, 45.18, 98.65, 2.21)
pt3dadd(275.71, 45.18, 98.65, 2.21)
pt3dadd(275.54, 45.78, 93.4, 2.21)
pt3dadd(275.89, 45.58, 93.4, 2.21)
pt3dadd(276.43, 45.38, 93.4, 2.21)
pt3dadd(276.96, 45.38, 93.4, 2.21)
pt3dadd(277.32, 45.18, 93.4, 2.21)
pt3dadd(277.85, 44.97, 93.4, 2.21)
pt3dadd(278.03, 44.77, 93.4, 2.21)
pt3dadd(278.57, 44.57, 93.4, 2.21)
pt3dadd(278.92, 44.57, 93.4, 2.21)
pt3dadd(279.28, 44.37, 93.4, 2.21)
pt3dadd(279.64, 44.16, 93.4, 2.21)
pt3dadd(279.82, 43.96, 93.4, 2.21)
pt3dadd(280.17, 43.76, 93.4, 2.21)
pt3dadd(280.71, 43.35, 93.4, 2.21)
pt3dadd(281.24, 43.15, 93.4, 2.21)
pt3dadd(281.42, 42.95, 93.4, 2.21)
pt3dadd(281.78, 42.54, 93.4, 2.21)
pt3dadd(282.13, 42.34, 93.4, 2.21)
pt3dadd(282.49, 41.94, 93.4, 2.21)
pt3dadd(282.67, 41.73, 93.4, 2.21)
pt3dadd(283.02, 41.53, 93.4, 2.21)
pt3dadd(283.56, 40.92, 93.4, 2.21)
pt3dadd(283.92, 40.72, 93.4, 2.21)
pt3dadd(284.45, 40.32, 93.4, 2.21)
pt3dadd(284.99, 39.91, 93.4, 2.21)
pt3dadd(285.34, 39.51, 93.4, 2.21)
pt3dadd(285.88, 39.1, 93.4, 2.21)
pt3dadd(286.23, 38.49, 93.4, 2.21)
pt3dadd(286.77, 38.09, 93.4, 2.21)
pt3dadd(286.95, 37.89, 93.4, 2.21)
pt3dadd(287.48, 37.28, 93.4, 2.21)
pt3dadd(287.84, 37.08, 93.4, 2.21)
pt3dadd(288.37, 36.47, 93.4, 2.21)
pt3dadd(288.73, 36.06, 93.4, 2.21)
pt3dadd(289.27, 35.66, 93.4, 2.21)
pt3dadd(289.8, 35.05, 93.4, 2.21)
pt3dadd(290.16, 34.64, 93.4, 2.21)
pt3dadd(290.51, 34.24, 93.4, 2.21)
pt3dadd(291.23, 33.63, 93.4, 2.21)
pt3dadd(291.76, 33.23, 93.4, 2.21)
pt3dadd(292.83, 32.21, 93.4, 2.21)
pt3dadd(293.37, 31.61, 93.4, 2.21)
pt3dadd(293.9, 31.2, 93.4, 2.21)
pt3dadd(294.44, 30.59, 93.4, 2.21)
pt3dadd(294.97, 29.99, 93.4, 2.21)
pt3dadd(295.51, 29.58, 93.4, 2.21)
pt3dadd(295.86, 29.18, 93.4, 2.21)
pt3dadd(296.22, 28.57, 93.4, 2.21)
pt3dadd(296.76, 28.16, 93.4, 2.21)
pt3dadd(296.93, 27.76, 93.4, 2.21)
pt3dadd(297.47, 27.35, 93.4, 2.21)
pt3dadd(298, 26.75, 93.4, 2.21)
pt3dadd(298.18, 26.54, 93.4, 2.21)
pt3dadd(298.54, 26.14, 93.4, 2.21)
pt3dadd(298.72, 25.94, 93.4, 2.21)
pt3dadd(299.07, 25.33, 93.4, 2.21)
pt3dadd(299.43, 25.13, 93.4, 2.21)
pt3dadd(299.61, 24.72, 93.4, 2.21)
pt3dadd(299.79, 24.52, 93.4, 2.21)
pt3dadd(299.97, 24.32, 93.4, 2.21)
pt3dadd(300.5, 23.71, 93.4, 2.21)
pt3dadd(300.68, 23.5, 93.4, 2.21)
pt3dadd(300.86, 23.3, 93.4, 2.21)
pt3dadd(300.68, 23.91, 88.15, 2.21)
pt3dadd(301.21, 23.5, 88.15, 2.21)
pt3dadd(301.93, 22.9, 88.15, 2.21)
pt3dadd(302.46, 22.69, 88.15, 2.21)
pt3dadd(303, 22.49, 88.15, 2.21)
pt3dadd(303.35, 22.09, 88.15, 2.21)
pt3dadd(303.53, 21.88, 88.15, 2.21)
pt3dadd(304.25, 21.88, 88.15, 2.21)
pt3dadd(304.6, 21.68, 88.15, 2.21)
pt3dadd(304.78, 21.48, 88.15, 2.21)
pt3dadd(305.32, 21.28, 88.15, 2.21)
pt3dadd(305.85, 21.07, 88.15, 2.21)
pt3dadd(306.21, 20.87, 88.15, 2.21)
pt3dadd(306.74, 20.47, 88.15, 2.21)
pt3dadd(307.1, 20.06, 88.15, 2.21)
pt3dadd(307.46, 20.06, 88.15, 2.21)
pt3dadd(308.35, 19.45, 88.15, 2.21)
pt3dadd(308.88, 19.25, 88.15, 2.21)
pt3dadd(309.24, 18.85, 88.15, 2.21)
pt3dadd(310.13, 18.24, 88.15, 2.21)
pt3dadd(310.49, 18.04, 88.15, 2.21)
pt3dadd(311.02, 17.43, 88.15, 2.21)
pt3dadd(311.56, 17.23, 88.15, 2.21)
pt3dadd(312.45, 16.42, 88.15, 2.21)
pt3dadd(312.98, 16.01, 88.15, 2.21)
pt3dadd(313.52, 15.61, 88.15, 2.21)
pt3dadd(314.05, 15.4, 88.15, 2.21)
pt3dadd(314.41, 15, 88.15, 2.21)
pt3dadd(314.95, 14.8, 88.15, 2.21)
pt3dadd(315.48, 14.39, 88.15, 2.21)
pt3dadd(316.02, 13.99, 88.15, 2.21)
pt3dadd(316.37, 13.78, 88.15, 2.21)
pt3dadd(316.91, 13.38, 88.15, 2.21)
pt3dadd(317.26, 13.38, 88.15, 2.21)
pt3dadd(317.62, 13.17, 88.15, 2.21)
pt3dadd(317.98, 12.97, 88.15, 2.21)
pt3dadd(318.33, 12.77, 88.15, 2.21)
pt3dadd(318.51, 12.57, 88.15, 2.21)
pt3dadd(319.05, 12.57, 88.15, 2.21)
pt3dadd(319.23, 12.36, 88.15, 2.21)
pt3dadd(319.58, 12.16, 88.15, 2.21)
pt3dadd(319.76, 11.96, 88.15, 2.21)
pt3dadd(320.12, 11.96, 88.15, 2.21)
pt3dadd(320.3, 11.96, 85, 2.21)
pt3dadd(320.83, 11.96, 85, 2.21)
pt3dadd(321.19, 11.76, 85, 2.21)
pt3dadd(321.9, 11.55, 85, 2.21)
pt3dadd(322.79, 11.15, 85, 2.21)
pt3dadd(323.86, 9.19, 85, 2.21)
pt3dadd(359.47, 12.62, 0, 1.86)
pt3dadd(407.47, 21.93, 0, 1.86)
pt3dadd(435.04, 32.21, 0, 1.86)
pt3dadd(442.16, 33.68, 0, 1.86)
}
dend[119] {pt3dclear()
pt3dadd(444.95, 422.32, 96.55, 3.74)
pt3dadd(445.75, 419.48, 96.55, 3.74)
pt3dadd(447.09, 419.89, 96.55, 3.74)
}
dend[120] {pt3dclear()
pt3dadd(444.95, 422.32, 96.55, 3.1)
pt3dadd(460.12, 410.08, 0, 3.1)
pt3dadd(494.5, 355.71, 0, 3.72)
pt3dadd(526.4, 280.77, 0, 3.72)
pt3dadd(576.25, 181.34, 0, 3.72)
pt3dadd(640.98, 35.87, 0, 3.72)
}
dend[121] {pt3dclear()
pt3dadd(393.34, 437.5, -4.7, 5.02)
pt3dadd(392.72, 438, -4.7, 5.02)
pt3dadd(392.86, 438.32, -4.7, 5.02)
pt3dadd(393, 438.47, -4.7, 5.02)
pt3dadd(393.14, 438.63, -4.7, 5.02)
pt3dadd(393.28, 438.79, -4.7, 5.02)
pt3dadd(393.7, 439.11, -4.7, 5.02)
pt3dadd(393.98, 439.27, -4.7, 5.02)
pt3dadd(394.12, 439.42, -4.7, 5.02)
pt3dadd(394.26, 439.58, -4.7, 5.02)
pt3dadd(394.4, 439.74, -4.7, 5.02)
pt3dadd(394.54, 440.06, -4.7, 5.02)
pt3dadd(394.68, 440.22, -4.7, 5.02)
pt3dadd(394.81, 440.37, -4.7, 5.02)
pt3dadd(394.95, 440.69, -4.7, 5.02)
pt3dadd(395.09, 441.01, -4.7, 5.02)
pt3dadd(395.23, 441.17, -4.7, 5.02)
}
}
proc shape3d_183() {
dend[121] { pt3dadd(395.23, 442.75, -4.7, 5.02)
pt3dadd(395.37, 443.06, -4.7, 5.02)
pt3dadd(395.37, 443.54, -4.7, 5.02)
pt3dadd(395.51, 443.7, -4.7, 5.02)
pt3dadd(395.51, 444.33, -4.7, 5.02)
pt3dadd(396.21, 444.81, -4.7, 3.62)
pt3dadd(396.21, 445.12, -4.7, 3.62)
pt3dadd(396.35, 445.44, -4.7, 3.62)
pt3dadd(396.49, 445.76, -4.7, 3.62)
pt3dadd(396.49, 446.23, -4.7, 3.62)
pt3dadd(396.63, 446.39, -4.7, 3.62)
pt3dadd(396.63, 448.29, -4.7, 3.62)
pt3dadd(396.77, 448.45, -4.7, 3.62)
pt3dadd(396.77, 449.08, -4.7, 3.62)
pt3dadd(396.9, 449.24, -4.7, 3.62)
pt3dadd(397.04, 449.55, -4.7, 3.62)
pt3dadd(397.18, 449.87, -4.7, 3.62)
pt3dadd(397.18, 450.66, -4.7, 3.62)
pt3dadd(397.32, 450.98, -4.7, 3.62)
pt3dadd(397.46, 451.3, -4.7, 3.62)
pt3dadd(397.46, 451.61, -4.7, 3.62)
pt3dadd(397.74, 451.61, -4.7, 3.62)
pt3dadd(397.74, 451.93, -4.7, 3.62)
pt3dadd(397.88, 452.09, -4.7, 3.62)
pt3dadd(398.02, 452.4, -4.7, 3.62)
pt3dadd(398.16, 452.72, -4.7, 3.62)
pt3dadd(398.3, 453.04, -4.7, 3.62)
pt3dadd(398.44, 453.19, -4.7, 3.62)
pt3dadd(398.58, 453.51, -4.7, 3.62)
pt3dadd(398.72, 453.83, -4.7, 3.62)
pt3dadd(398.86, 454.14, -4.7, 3.62)
pt3dadd(399, 454.46, -4.7, 3.62)
pt3dadd(399.13, 454.62, -4.7, 3.62)
pt3dadd(399.27, 454.78, -4.7, 3.62)
pt3dadd(399.55, 455.25, -4.7, 3.62)
pt3dadd(399.69, 455.57, -4.7, 3.62)
pt3dadd(399.83, 455.89, -4.7, 3.62)
pt3dadd(399.97, 456.2, -4.7, 3.62)
pt3dadd(400.11, 456.36, -4.7, 3.62)
pt3dadd(400.25, 456.68, -4.7, 3.62)
pt3dadd(400.53, 456.83, -4.7, 3.62)
pt3dadd(400.53, 457.15, -4.7, 3.62)
pt3dadd(400.81, 457.31, -4.7, 3.62)
pt3dadd(400.95, 457.47, -4.7, 3.62)
pt3dadd(401.09, 457.78, -4.7, 3.62)
pt3dadd(401.22, 457.94, -4.7, 3.62)
pt3dadd(401.36, 458.26, -4.7, 3.62)
pt3dadd(401.36, 458.58, -4.7, 3.62)
pt3dadd(401.5, 458.73, -4.7, 3.62)
pt3dadd(401.64, 459.05, -4.7, 3.62)
pt3dadd(401.78, 459.21, -4.7, 3.62)
pt3dadd(401.78, 459.53, -4.7, 3.62)
pt3dadd(401.92, 459.68, -4.7, 3.62)
pt3dadd(402.06, 459.84, -4.7, 3.62)
pt3dadd(402.06, 460.16, -4.7, 3.62)
pt3dadd(402.48, 460.63, -4.7, 3.62)
pt3dadd(402.48, 461.42, -4.7, 3.62)
pt3dadd(402.62, 461.74, -4.7, 3.62)
pt3dadd(402.62, 462.22, -4.7, 3.62)
pt3dadd(402.76, 462.37, -4.7, 3.62)
pt3dadd(402.76, 463.01, -4.7, 3.62)
pt3dadd(402.9, 463.17, -4.7, 3.62)
pt3dadd(403.04, 463.48, -4.7, 3.62)
pt3dadd(403.18, 463.64, -4.7, 3.62)
pt3dadd(403.32, 463.96, -4.7, 3.62)
pt3dadd(403.45, 464.12, -4.7, 3.62)
pt3dadd(403.59, 464.43, -4.7, 3.62)
pt3dadd(403.73, 464.59, -4.7, 3.62)
pt3dadd(403.87, 464.91, -4.7, 3.62)
pt3dadd(404.01, 465.07, -4.7, 3.62)
pt3dadd(404.15, 465.38, -4.7, 3.62)
pt3dadd(404.29, 465.54, -4.7, 3.62)
pt3dadd(404.57, 465.7, -4.7, 3.62)
pt3dadd(404.71, 466.01, -4.7, 3.62)
pt3dadd(404.85, 466.17, -4.7, 3.62)
pt3dadd(404.99, 466.33, -4.7, 3.62)
pt3dadd(405.27, 466.65, -4.7, 3.62)
pt3dadd(405.41, 466.81, -4.7, 3.62)
pt3dadd(405.68, 466.96, -4.7, 3.62)
pt3dadd(405.68, 467.28, -4.7, 3.62)
pt3dadd(405.82, 467.44, -4.7, 3.62)
pt3dadd(405.96, 467.6, -4.7, 3.62)
pt3dadd(406.1, 467.91, -4.7, 3.62)
pt3dadd(406.24, 468.07, -4.7, 3.62)
pt3dadd(406.38, 468.39, -4.7, 3.62)
pt3dadd(406.52, 468.55, -4.7, 3.62)
pt3dadd(406.66, 468.71, -4.7, 3.62)
pt3dadd(406.66, 469.02, -4.7, 3.62)
pt3dadd(406.8, 469.18, -4.7, 3.62)
pt3dadd(406.94, 469.34, -4.7, 3.62)
pt3dadd(407.08, 469.66, -4.7, 3.62)
pt3dadd(407.22, 469.81, -4.7, 3.62)
pt3dadd(407.36, 470.13, -4.7, 3.62)
pt3dadd(407.5, 470.45, -4.7, 3.62)
pt3dadd(407.64, 470.6, -4.7, 3.62)
pt3dadd(407.77, 471.08, -4.7, 3.62)
pt3dadd(407.91, 471.55, -4.7, 3.62)
pt3dadd(408.19, 471.87, -4.7, 3.62)
pt3dadd(408.33, 472.19, -4.7, 3.62)
pt3dadd(408.47, 472.5, -4.7, 3.62)
pt3dadd(408.61, 472.66, -4.7, 3.62)
pt3dadd(408.75, 472.98, -4.7, 3.62)
pt3dadd(408.89, 473.14, -4.7, 3.62)
pt3dadd(409.03, 473.45, -4.7, 3.62)
pt3dadd(409.17, 473.77, -4.7, 3.62)
pt3dadd(409.31, 473.93, -4.7, 3.62)
pt3dadd(409.45, 474.25, -4.7, 3.62)
pt3dadd(409.59, 474.56, -4.7, 3.62)
pt3dadd(409.73, 474.88, -4.7, 3.62)
pt3dadd(409.86, 475.2, -4.7, 3.62)
pt3dadd(410, 475.51, -4.7, 3.62)
pt3dadd(410.14, 475.83, -4.7, 3.62)
pt3dadd(410.14, 476.46, -4.7, 3.62)
pt3dadd(410.28, 476.62, -4.7, 3.62)
pt3dadd(410.28, 477.25, -4.7, 3.62)
pt3dadd(410.42, 477.57, -4.7, 3.62)
pt3dadd(410.56, 477.73, -4.7, 3.62)
pt3dadd(410.7, 478.04, -4.7, 3.62)
pt3dadd(410.84, 478.36, -4.7, 3.62)
pt3dadd(410.84, 478.99, -4.7, 3.62)
pt3dadd(410.98, 479.15, -4.7, 3.62)
pt3dadd(411.12, 479.47, -4.7, 3.62)
pt3dadd(411.12, 480.1, -4.7, 3.62)
pt3dadd(411.26, 480.26, -4.7, 3.62)
pt3dadd(411.4, 480.58, -4.7, 3.62)
pt3dadd(411.54, 480.73, -4.7, 3.62)
pt3dadd(411.54, 481.05, -4.7, 3.62)
pt3dadd(411.68, 481.37, -4.7, 3.62)
pt3dadd(411.82, 481.53, -4.7, 3.62)
pt3dadd(411.95, 481.68, -4.7, 3.62)
pt3dadd(411.95, 482.32, -4.7, 3.62)
pt3dadd(412.09, 482.48, -4.7, 3.62)
pt3dadd(412.23, 482.63, -4.7, 3.62)
pt3dadd(412.23, 483.43, -4.7, 3.62)
pt3dadd(412.23, 483.58, -4.7, 3.62)
pt3dadd(412.23, 483.9, -4.7, 3.62)
pt3dadd(412.37, 484.22, -4.7, 3.62)
pt3dadd(412.37, 484.69, -4.7, 3.62)
pt3dadd(412.51, 484.85, -4.7, 3.62)
pt3dadd(412.51, 485.17, -4.7, 3.62)
pt3dadd(412.65, 485.64, -4.7, 3.62)
pt3dadd(412.65, 489.12, -4.7, 3.62)
pt3dadd(412.79, 489.28, -4.7, 3.62)
pt3dadd(412.79, 489.6, -4.7, 3.62)
pt3dadd(412.93, 489.91, -4.7, 3.62)
pt3dadd(413.07, 490.23, -4.7, 3.62)
pt3dadd(413.07, 490.71, -4.7, 3.62)
pt3dadd(413.21, 491.02, -4.7, 3.62)
pt3dadd(413.21, 491.34, -4.7, 3.62)
pt3dadd(413.35, 491.66, -4.7, 3.62)
pt3dadd(413.49, 491.97, -4.7, 3.62)
pt3dadd(413.49, 492.45, -4.7, 3.62)
pt3dadd(413.63, 492.92, -4.7, 3.62)
pt3dadd(413.77, 493.08, -4.7, 3.62)
pt3dadd(413.91, 493.4, -4.7, 3.62)
pt3dadd(413.91, 493.71, -4.7, 3.62)
pt3dadd(414.05, 493.87, -4.7, 3.62)
pt3dadd(414.18, 494.35, -4.7, 3.62)
pt3dadd(414.18, 495.14, -4.7, 3.62)
pt3dadd(414.32, 495.45, -4.7, 3.62)
pt3dadd(414.32, 495.93, -4.7, 3.62)
pt3dadd(414.6, 496.4, -4.7, 3.62)
pt3dadd(414.74, 496.72, -4.7, 3.62)
pt3dadd(414.74, 497.51, -4.7, 3.62)
pt3dadd(414.88, 497.83, -4.7, 3.62)
pt3dadd(414.88, 498.3, -4.7, 3.62)
pt3dadd(415.02, 498.78, -4.7, 3.62)
pt3dadd(415.16, 498.94, -4.7, 3.62)
pt3dadd(415.16, 499.25, -4.7, 3.62)
pt3dadd(415.3, 499.57, -4.7, 3.62)
pt3dadd(415.3, 499.89, -4.7, 3.62)
pt3dadd(415.44, 500.2, -4.7, 3.62)
pt3dadd(415.44, 500.68, -4.7, 3.62)
pt3dadd(415.58, 501.15, -4.7, 3.62)
pt3dadd(415.58, 502.89, -4.7, 3.62)
pt3dadd(415.72, 503.05, -4.7, 3.62)
pt3dadd(415.72, 503.37, -4.7, 3.62)
pt3dadd(415.86, 503.68, -4.7, 3.62)
pt3dadd(415.86, 504, -4.7, 3.62)
pt3dadd(416, 504.16, -4.7, 3.62)
pt3dadd(416.14, 504.48, -4.7, 3.62)
pt3dadd(416.27, 504.79, -4.7, 3.62)
pt3dadd(416.27, 505.58, -4.7, 3.62)
pt3dadd(416.41, 505.74, -4.7, 3.62)
pt3dadd(416.55, 506.06, -4.7, 3.62)
pt3dadd(416.69, 506.22, -4.7, 3.62)
pt3dadd(416.83, 506.53, -4.7, 3.62)
pt3dadd(416.97, 506.69, -4.7, 3.62)
pt3dadd(417.11, 507.01, -4.7, 3.62)
pt3dadd(417.25, 507.17, -4.7, 3.62)
pt3dadd(417.53, 507.33, -4.7, 3.62)
pt3dadd(417.67, 507.48, -4.7, 3.62)
pt3dadd(417.81, 507.8, -4.7, 3.62)
pt3dadd(417.95, 507.96, -4.7, 3.62)
pt3dadd(418.09, 508.12, -4.7, 3.62)
pt3dadd(418.23, 508.28, -4.7, 3.62)
pt3dadd(418.5, 508.59, -4.7, 3.62)
pt3dadd(418.64, 508.75, -4.7, 3.62)
pt3dadd(418.78, 508.91, -4.7, 3.62)
pt3dadd(418.92, 509.22, -4.7, 3.62)
}
}
proc shape3d_184() {
dend[121] { pt3dadd(419.06, 509.54, -4.7, 3.62)
pt3dadd(419.2, 509.7, -4.7, 3.62)
pt3dadd(419.34, 509.86, -4.7, 3.62)
pt3dadd(419.48, 510.02, -4.7, 3.62)
pt3dadd(419.62, 510.17, -4.7, 3.62)
pt3dadd(419.76, 510.33, -4.7, 3.62)
pt3dadd(419.76, 510.65, -4.7, 3.62)
pt3dadd(419.9, 510.81, -4.7, 3.62)
pt3dadd(420.04, 511.12, -4.7, 3.62)
pt3dadd(420.18, 511.44, -4.7, 3.62)
pt3dadd(420.32, 511.76, -4.7, 3.62)
pt3dadd(420.46, 511.92, -4.7, 3.62)
pt3dadd(420.59, 512.23, -4.7, 3.62)
pt3dadd(420.73, 512.39, -4.7, 3.62)
pt3dadd(420.73, 512.71, -4.7, 3.62)
pt3dadd(420.87, 512.87, -4.7, 3.62)
pt3dadd(421.01, 513.18, -4.7, 3.62)
pt3dadd(421.15, 513.34, -4.7, 3.62)
pt3dadd(421.29, 513.5, -4.7, 3.62)
pt3dadd(421.57, 513.81, -4.7, 3.62)
pt3dadd(421.71, 513.97, -4.7, 3.62)
pt3dadd(421.85, 514.13, -4.7, 3.62)
pt3dadd(421.99, 514.29, -4.7, 3.62)
pt3dadd(421.99, 514.76, -4.7, 3.62)
pt3dadd(422.13, 514.92, -4.7, 3.62)
pt3dadd(422.27, 515.08, -4.7, 3.62)
pt3dadd(422.27, 522.52, -4.7, 3.62)
pt3dadd(421.99, 521.25, -4.7, 3.07)
pt3dadd(422.13, 521.73, -4.7, 3.07)
pt3dadd(422.27, 522.05, -4.7, 3.07)
pt3dadd(422.41, 522.2, -4.7, 3.07)
pt3dadd(422.69, 522.36, -4.7, 3.07)
pt3dadd(422.69, 522.68, -4.7, 3.07)
pt3dadd(422.82, 522.84, -4.7, 3.07)
pt3dadd(422.96, 523.15, -4.7, 3.07)
pt3dadd(422.96, 523.63, -4.7, 3.07)
pt3dadd(423.1, 523.94, -4.7, 3.07)
pt3dadd(423.1, 524.58, -4.7, 3.07)
pt3dadd(423.24, 524.89, -4.7, 3.07)
pt3dadd(423.24, 525.53, -4.7, 3.07)
pt3dadd(423.38, 525.84, -4.7, 3.07)
pt3dadd(423.38, 527.27, -4.7, 3.07)
pt3dadd(423.52, 527.58, -4.7, 3.07)
pt3dadd(423.52, 528.06, -4.7, 3.07)
pt3dadd(423.66, 528.38, -4.7, 3.07)
pt3dadd(423.66, 531.23, -4.7, 3.07)
pt3dadd(423.8, 531.54, -4.7, 3.07)
pt3dadd(423.8, 532.81, -4.7, 3.07)
pt3dadd(423.94, 533.12, -4.7, 3.07)
pt3dadd(423.94, 533.44, -4.7, 3.07)
pt3dadd(424.08, 533.76, -4.7, 3.07)
pt3dadd(424.22, 534.23, -4.7, 3.07)
pt3dadd(424.36, 534.39, -4.7, 3.07)
pt3dadd(424.36, 534.71, -4.7, 3.07)
pt3dadd(424.5, 534.87, -4.7, 3.07)
pt3dadd(424.5, 535.18, -4.7, 3.07)
pt3dadd(424.64, 535.5, -4.7, 3.07)
pt3dadd(424.78, 535.82, -4.7, 3.07)
pt3dadd(424.91, 536.13, -4.7, 3.07)
pt3dadd(424.91, 536.45, -4.7, 3.07)
pt3dadd(425.05, 536.92, -4.7, 3.07)
pt3dadd(425.19, 537.4, -4.7, 3.07)
pt3dadd(425.33, 537.56, -4.7, 3.07)
pt3dadd(425.47, 537.87, -4.7, 3.07)
pt3dadd(425.47, 538.19, -4.7, 3.07)
pt3dadd(425.61, 538.51, -4.7, 3.07)
pt3dadd(425.75, 538.82, -4.7, 3.07)
pt3dadd(425.89, 539.14, -4.7, 3.07)
pt3dadd(426.03, 539.46, -4.7, 3.07)
pt3dadd(426.17, 539.77, -4.7, 3.07)
pt3dadd(426.31, 540.25, -4.7, 3.07)
pt3dadd(426.31, 540.72, -4.7, 3.07)
pt3dadd(426.45, 541.04, -4.7, 3.07)
pt3dadd(426.59, 541.2, -4.7, 3.07)
pt3dadd(426.59, 541.51, -4.7, 3.07)
pt3dadd(426.73, 541.83, -4.7, 3.07)
pt3dadd(426.73, 542.15, -4.7, 3.07)
pt3dadd(426.87, 542.3, -4.7, 3.07)
pt3dadd(426.87, 542.62, -4.7, 3.07)
pt3dadd(427.01, 542.94, -4.7, 3.07)
pt3dadd(427.14, 543.25, -4.7, 3.07)
pt3dadd(427.28, 543.57, -4.7, 3.07)
pt3dadd(427.28, 543.89, -4.7, 3.07)
pt3dadd(427.42, 544.2, -4.7, 3.07)
pt3dadd(427.56, 544.52, -4.7, 3.07)
pt3dadd(427.7, 544.84, -4.7, 3.07)
pt3dadd(427.7, 545.63, -4.7, 3.07)
pt3dadd(427.84, 545.95, -4.7, 3.07)
pt3dadd(427.98, 546.26, -4.7, 3.07)
pt3dadd(428.12, 546.58, -4.7, 3.07)
pt3dadd(428.12, 547.21, -4.7, 3.07)
pt3dadd(428.26, 547.53, -4.7, 3.07)
pt3dadd(428.26, 548.32, -4.7, 3.07)
pt3dadd(428.4, 548.64, -4.7, 3.07)
pt3dadd(428.54, 548.95, -4.7, 3.07)
pt3dadd(428.68, 549.11, -4.7, 3.07)
pt3dadd(428.68, 549.43, -4.7, 3.07)
pt3dadd(428.82, 549.74, -4.7, 3.07)
pt3dadd(428.82, 550.38, -4.7, 3.07)
pt3dadd(428.96, 550.69, -4.7, 3.07)
pt3dadd(428.96, 551.48, -4.7, 3.07)
pt3dadd(429.1, 551.8, -4.7, 3.07)
pt3dadd(429.1, 552.43, -4.7, 3.07)
pt3dadd(429.23, 552.59, -4.7, 3.07)
pt3dadd(429.37, 552.91, -4.7, 3.07)
pt3dadd(429.37, 553.38, -4.7, 3.07)
pt3dadd(429.51, 553.7, -4.7, 3.07)
pt3dadd(429.65, 554.02, -4.7, 3.07)
pt3dadd(429.79, 554.18, -4.7, 3.07)
pt3dadd(429.93, 554.33, -4.7, 3.07)
pt3dadd(430.07, 554.49, -4.7, 3.07)
pt3dadd(430.21, 554.81, -4.7, 3.07)
pt3dadd(430.35, 555.13, -4.7, 3.07)
pt3dadd(430.49, 555.28, -4.7, 3.07)
pt3dadd(430.63, 555.44, -4.7, 3.07)
pt3dadd(430.63, 555.76, -4.7, 3.07)
pt3dadd(430.77, 556.07, -4.7, 3.07)
pt3dadd(430.91, 556.23, -4.7, 3.07)
pt3dadd(431.05, 556.39, -4.7, 3.07)
pt3dadd(431.05, 556.71, -4.7, 3.07)
pt3dadd(431.33, 557.02, -4.7, 3.07)
pt3dadd(431.46, 557.18, -4.7, 3.07)
pt3dadd(431.46, 557.66, -4.7, 3.07)
pt3dadd(431.6, 557.82, -4.7, 3.07)
pt3dadd(431.74, 558.13, -4.7, 3.07)
pt3dadd(431.88, 558.29, -4.7, 3.07)
pt3dadd(432.02, 558.61, -4.7, 3.07)
pt3dadd(432.16, 558.92, -4.7, 3.07)
pt3dadd(432.3, 559.08, -4.7, 3.07)
pt3dadd(432.44, 559.24, -4.7, 3.07)
pt3dadd(432.58, 559.56, -4.7, 3.07)
pt3dadd(432.72, 559.72, -4.7, 3.07)
pt3dadd(432.86, 560.03, -4.7, 3.07)
pt3dadd(433, 560.19, -4.7, 3.07)
pt3dadd(433, 560.82, -4.7, 3.07)
pt3dadd(433.14, 560.98, -4.7, 3.07)
pt3dadd(433, 560.35, -4.7, 3.07)
pt3dadd(433.14, 560.51, -4.7, 3.07)
pt3dadd(433.14, 560.82, -4.7, 3.07)
pt3dadd(433.28, 561.14, -4.7, 3.07)
pt3dadd(433.28, 561.46, -4.7, 3.07)
pt3dadd(433.42, 561.61, -4.7, 3.07)
pt3dadd(433.55, 561.93, -4.7, 3.07)
pt3dadd(433.55, 562.25, -4.7, 3.07)
pt3dadd(433.69, 562.72, -4.7, 3.07)
pt3dadd(433.83, 563.04, -4.7, 3.07)
pt3dadd(433.83, 563.83, -4.7, 3.07)
pt3dadd(433.97, 563.99, -4.7, 3.07)
pt3dadd(433.97, 564.46, -4.7, 3.07)
pt3dadd(434.11, 564.62, -4.7, 3.07)
pt3dadd(434.11, 565.1, -4.7, 3.07)
pt3dadd(434.25, 565.41, -4.7, 3.07)
pt3dadd(434.39, 565.73, -4.7, 3.07)
pt3dadd(434.39, 566.68, -4.7, 3.07)
pt3dadd(434.53, 566.84, -4.7, 3.07)
pt3dadd(434.53, 567.63, -4.7, 3.07)
pt3dadd(434.67, 567.95, -4.7, 3.07)
pt3dadd(434.67, 568.26, -4.7, 3.07)
pt3dadd(434.81, 568.42, -4.7, 3.07)
pt3dadd(434.81, 568.74, -4.7, 3.07)
pt3dadd(434.95, 568.9, -4.7, 3.07)
pt3dadd(434.95, 569.37, -4.7, 3.07)
pt3dadd(435.09, 569.53, -4.7, 3.07)
pt3dadd(435.23, 569.69, -4.7, 3.07)
pt3dadd(435.23, 570, -4.7, 3.07)
pt3dadd(435.37, 570.32, -4.7, 3.07)
pt3dadd(435.51, 570.64, -4.7, 3.07)
pt3dadd(435.65, 571.11, -4.7, 3.07)
pt3dadd(435.78, 571.43, -4.7, 3.07)
pt3dadd(435.92, 571.59, -4.7, 3.07)
pt3dadd(436.06, 571.74, -4.7, 3.07)
pt3dadd(436.06, 572.22, -4.7, 3.07)
pt3dadd(436.2, 572.38, -4.7, 3.07)
pt3dadd(436.34, 572.69, -4.7, 3.07)
pt3dadd(436.48, 573.01, -4.7, 3.07)
pt3dadd(436.62, 573.17, -4.7, 3.07)
pt3dadd(436.76, 573.33, -4.7, 3.07)
pt3dadd(436.9, 573.64, -4.7, 3.07)
pt3dadd(437.04, 573.8, -4.7, 3.07)
pt3dadd(437.18, 574.12, -4.7, 3.07)
pt3dadd(437.18, 574.59, -4.7, 3.07)
pt3dadd(437.32, 574.91, -4.7, 3.07)
pt3dadd(437.46, 575.07, -4.7, 3.07)
pt3dadd(437.46, 575.38, -4.7, 3.07)
pt3dadd(437.6, 575.7, -4.7, 3.07)
pt3dadd(437.74, 576.02, -4.7, 3.07)
pt3dadd(437.87, 576.33, -4.7, 3.07)
pt3dadd(438.29, 576.81, -4.7, 3.07)
pt3dadd(438.43, 577.28, -4.7, 3.07)
pt3dadd(438.57, 577.44, -4.7, 3.07)
pt3dadd(438.71, 577.76, -4.7, 3.07)
pt3dadd(438.85, 578.08, -4.7, 3.07)
pt3dadd(438.99, 578.39, -4.7, 3.07)
pt3dadd(439.13, 578.71, -4.7, 3.07)
pt3dadd(439.13, 579.18, -4.7, 3.07)
pt3dadd(439.27, 579.5, -4.7, 3.07)
pt3dadd(439.27, 579.97, -4.7, 3.07)
pt3dadd(439.41, 580.29, -4.7, 3.07)
pt3dadd(439.55, 580.61, -4.7, 3.07)
pt3dadd(439.55, 581.08, -4.7, 3.07)
}
}
proc shape3d_185() {
dend[121] { pt3dadd(439.69, 581.24, -4.7, 3.07)
pt3dadd(439.83, 581.56, -4.7, 3.07)
pt3dadd(439.97, 581.72, -4.7, 3.07)
pt3dadd(440.1, 582.03, -4.7, 3.07)
pt3dadd(440.24, 582.19, -4.7, 3.07)
pt3dadd(440.38, 582.51, -4.7, 3.07)
pt3dadd(440.52, 582.82, -4.7, 3.07)
pt3dadd(440.66, 582.98, -4.7, 3.07)
pt3dadd(440.8, 583.3, -4.7, 3.07)
pt3dadd(440.94, 583.46, -4.7, 3.07)
pt3dadd(441.08, 583.62, -4.7, 3.07)
pt3dadd(441.08, 583.93, -4.7, 3.07)
pt3dadd(441.22, 584.09, -4.7, 3.07)
pt3dadd(441.22, 584.41, -4.7, 3.07)
pt3dadd(441.36, 584.72, -4.7, 3.07)
pt3dadd(441.5, 584.88, -4.7, 3.07)
pt3dadd(441.64, 585.04, -4.7, 3.07)
pt3dadd(441.64, 585.51, -4.7, 3.07)
pt3dadd(441.78, 585.83, -4.7, 3.07)
pt3dadd(441.92, 585.99, -4.7, 3.07)
pt3dadd(442.06, 586.15, -4.7, 3.07)
pt3dadd(442.19, 586.31, -4.7, 3.07)
pt3dadd(442.33, 586.46, -4.7, 3.07)
pt3dadd(442.47, 586.62, -4.7, 3.07)
pt3dadd(442.47, 586.94, -4.7, 3.07)
pt3dadd(442.61, 587.1, -4.7, 3.07)
pt3dadd(442.75, 587.41, -4.7, 3.07)
pt3dadd(442.75, 587.73, -4.7, 3.07)
pt3dadd(442.89, 587.89, -4.7, 3.07)
pt3dadd(442.89, 588.52, -4.7, 3.07)
pt3dadd(443.03, 588.68, -4.7, 3.07)
pt3dadd(443.03, 589, -4.7, 3.07)
pt3dadd(443.17, 589.16, -4.7, 3.07)
pt3dadd(443.31, 589.47, -4.7, 3.07)
pt3dadd(443.31, 589.95, -4.7, 3.07)
pt3dadd(443.45, 590.1, -4.7, 3.07)
pt3dadd(443.45, 590.58, -4.7, 3.07)
pt3dadd(443.59, 590.74, -4.7, 3.07)
pt3dadd(443.73, 590.9, -4.7, 3.07)
pt3dadd(443.73, 592.16, -4.7, 3.07)
pt3dadd(443.87, 592.32, -4.7, 3.07)
pt3dadd(444.01, 592.48, -4.7, 3.07)
pt3dadd(444.15, 592.8, -4.7, 3.07)
pt3dadd(444.15, 593.9, -4.7, 3.07)
pt3dadd(444.29, 594.06, -4.7, 3.07)
pt3dadd(444.29, 595.01, -4.7, 3.07)
pt3dadd(444.42, 594.06, -4.7, 3.07)
pt3dadd(448.47, 601.34, -4.7, 3.07)
pt3dadd(447.49, 600.08, -4.7, 3.07)
pt3dadd(447.63, 600.39, -4.7, 3.07)
pt3dadd(447.77, 600.71, -4.7, 3.07)
pt3dadd(448.05, 601.03, -4.7, 3.07)
pt3dadd(448.19, 601.18, -4.7, 3.07)
pt3dadd(448.33, 601.34, -4.7, 3.07)
pt3dadd(448.33, 601.66, -4.7, 3.07)
pt3dadd(448.47, 601.82, -4.7, 3.07)
pt3dadd(448.47, 602.13, -4.7, 3.07)
pt3dadd(448.6, 602.29, -4.7, 3.07)
pt3dadd(448.74, 602.45, -4.7, 3.07)
pt3dadd(448.74, 602.77, -4.7, 3.07)
pt3dadd(448.88, 602.93, -4.7, 3.07)
pt3dadd(448.88, 603.56, -4.7, 3.07)
pt3dadd(449.02, 603.87, -4.7, 3.07)
pt3dadd(449.02, 604.35, -4.7, 3.07)
pt3dadd(449.16, 604.51, -4.7, 3.07)
pt3dadd(449.16, 604.82, -4.7, 3.07)
pt3dadd(449.44, 605.14, -4.7, 3.07)
pt3dadd(449.58, 605.3, -4.7, 3.07)
pt3dadd(449.58, 605.62, -4.7, 3.07)
pt3dadd(449.72, 605.77, -4.7, 3.07)
pt3dadd(449.72, 606.09, -4.7, 3.07)
pt3dadd(449.86, 606.25, -4.7, 3.07)
pt3dadd(449.86, 606.57, -4.7, 3.07)
pt3dadd(450, 606.72, -4.7, 3.07)
pt3dadd(450.14, 606.88, -4.7, 3.07)
pt3dadd(450.14, 607.2, -4.7, 3.07)
pt3dadd(450.42, 607.52, -4.7, 3.07)
pt3dadd(450.56, 607.83, -4.7, 3.07)
pt3dadd(450.83, 608.31, -4.7, 3.07)
pt3dadd(450.97, 608.47, -4.7, 3.07)
pt3dadd(451.25, 609.1, -4.7, 3.07)
pt3dadd(451.67, 609.57, -4.7, 3.07)
pt3dadd(451.81, 609.89, -4.7, 3.07)
pt3dadd(452.09, 610.21, -4.7, 3.07)
pt3dadd(452.23, 610.52, -4.7, 3.07)
pt3dadd(452.51, 610.68, -4.7, 3.07)
pt3dadd(452.65, 611, -4.7, 3.07)
pt3dadd(452.79, 611.31, -4.7, 3.07)
pt3dadd(453.2, 611.79, -4.7, 3.07)
pt3dadd(453.2, 612.11, -4.7, 3.07)
pt3dadd(453.62, 612.58, -4.7, 3.07)
pt3dadd(453.9, 613.05, -4.7, 3.07)
pt3dadd(454.04, 613.37, -4.7, 3.07)
pt3dadd(454.32, 613.85, -4.7, 3.07)
pt3dadd(454.74, 614.48, -4.7, 3.07)
pt3dadd(455.02, 614.8, -4.7, 3.07)
pt3dadd(455.15, 615.11, -4.7, 3.07)
pt3dadd(455.29, 615.43, -4.7, 3.07)
pt3dadd(455.43, 615.59, -4.7, 3.07)
pt3dadd(455.43, 615.9, -4.7, 3.07)
pt3dadd(455.57, 616.22, -4.7, 3.07)
pt3dadd(455.71, 616.38, -4.7, 3.07)
pt3dadd(455.71, 616.7, -4.7, 3.07)
pt3dadd(455.85, 617.01, -4.7, 3.07)
pt3dadd(455.99, 617.17, -4.7, 3.07)
pt3dadd(456.13, 617.49, -4.7, 3.07)
pt3dadd(456.13, 617.8, -4.7, 3.07)
pt3dadd(456.27, 618.12, -4.7, 3.07)
pt3dadd(456.27, 618.44, -4.7, 3.07)
pt3dadd(456.41, 618.91, -4.7, 3.07)
pt3dadd(456.55, 619.07, -4.7, 3.07)
pt3dadd(456.55, 619.39, -4.7, 3.07)
pt3dadd(456.69, 619.54, -4.7, 3.07)
pt3dadd(456.83, 619.86, -4.7, 3.07)
pt3dadd(456.97, 620.18, -4.7, 3.07)
pt3dadd(457.11, 620.49, -4.7, 3.07)
pt3dadd(457.24, 620.97, -4.7, 3.07)
pt3dadd(457.38, 621.29, -4.7, 3.07)
pt3dadd(457.52, 621.6, -4.7, 3.07)
pt3dadd(457.66, 621.92, -4.7, 3.07)
pt3dadd(457.66, 622.24, -4.7, 3.07)
pt3dadd(457.8, 622.55, -4.7, 3.07)
pt3dadd(458.08, 622.87, -4.7, 3.07)
pt3dadd(458.22, 623.18, -4.7, 3.07)
pt3dadd(458.36, 623.5, -4.7, 3.07)
pt3dadd(458.5, 623.66, -4.7, 3.07)
pt3dadd(458.78, 624.13, -4.7, 3.07)
pt3dadd(458.78, 624.45, -4.7, 3.07)
pt3dadd(458.92, 624.77, -4.7, 3.07)
pt3dadd(459.06, 625.08, -4.7, 3.07)
pt3dadd(459.06, 625.4, -4.7, 3.07)
pt3dadd(459.2, 625.56, -4.7, 3.07)
pt3dadd(459.34, 626.03, -4.7, 3.07)
pt3dadd(459.61, 626.19, -4.7, 3.07)
pt3dadd(459.75, 626.51, -4.7, 3.07)
pt3dadd(459.89, 626.83, -4.7, 3.07)
pt3dadd(460.03, 627.14, -4.7, 3.07)
pt3dadd(460.31, 627.62, -4.7, 3.07)
pt3dadd(460.31, 627.93, -4.7, 3.07)
pt3dadd(460.45, 628.09, -4.7, 3.07)
pt3dadd(460.59, 628.25, -4.7, 3.07)
pt3dadd(460.59, 628.57, -4.7, 3.07)
pt3dadd(460.73, 628.72, -4.7, 3.07)
pt3dadd(460.87, 628.88, -4.7, 3.07)
pt3dadd(460.87, 629.2, -4.7, 3.07)
pt3dadd(461.01, 629.52, -4.7, 3.07)
pt3dadd(461.15, 629.83, -4.7, 3.07)
pt3dadd(461.15, 630.15, -4.7, 3.07)
pt3dadd(461.29, 630.31, -4.7, 3.07)
pt3dadd(461.43, 630.62, -4.7, 3.07)
pt3dadd(461.56, 631.1, -4.7, 3.07)
pt3dadd(461.98, 631.57, -4.7, 3.07)
pt3dadd(462.12, 631.73, -4.7, 3.07)
pt3dadd(462.26, 632.05, -4.7, 3.07)
pt3dadd(462.4, 632.36, -4.7, 3.07)
pt3dadd(462.54, 632.52, -4.7, 3.07)
pt3dadd(462.82, 632.68, -4.7, 3.07)
pt3dadd(462.82, 633, -4.7, 3.07)
pt3dadd(463.1, 633.31, -4.7, 3.07)
pt3dadd(463.24, 633.47, -4.7, 3.07)
pt3dadd(463.38, 633.79, -4.7, 3.07)
pt3dadd(463.52, 633.95, -4.7, 3.07)
pt3dadd(463.66, 634.26, -4.7, 3.07)
pt3dadd(463.79, 634.42, -4.7, 3.07)
pt3dadd(463.79, 634.74, -4.7, 3.07)
pt3dadd(463.93, 634.9, -4.7, 3.07)
pt3dadd(464.21, 635.21, -4.7, 3.07)
pt3dadd(464.35, 635.37, -4.7, 3.07)
pt3dadd(464.35, 635.85, -4.7, 3.07)
pt3dadd(464.49, 636.01, -4.7, 3.07)
pt3dadd(464.63, 636.32, -4.7, 3.07)
pt3dadd(464.77, 636.48, -4.7, 3.07)
pt3dadd(464.91, 636.8, -4.7, 3.07)
pt3dadd(465.05, 637.11, -4.7, 3.07)
pt3dadd(465.19, 637.27, -4.7, 3.07)
pt3dadd(465.19, 637.43, -4.7, 3.07)
pt3dadd(464.63, 636.01, -4.7, 3.07)
pt3dadd(464.77, 636.32, -4.7, 3.07)
pt3dadd(464.91, 636.48, -4.7, 3.07)
pt3dadd(465.19, 636.64, -4.7, 3.07)
pt3dadd(465.33, 636.8, -4.7, 3.07)
pt3dadd(465.47, 637.11, -4.7, 3.07)
pt3dadd(465.61, 637.43, -4.7, 3.07)
pt3dadd(465.75, 637.59, -4.7, 3.07)
pt3dadd(465.88, 637.9, -4.7, 3.07)
pt3dadd(466.02, 638.22, -4.7, 3.07)
pt3dadd(466.16, 638.54, -4.7, 3.07)
pt3dadd(466.3, 638.7, -4.7, 3.07)
pt3dadd(466.44, 639.01, -4.7, 3.07)
pt3dadd(466.58, 639.17, -4.7, 3.07)
pt3dadd(467, 639.49, -4.7, 3.07)
pt3dadd(467.14, 639.8, -4.7, 3.07)
pt3dadd(467.42, 639.96, -4.7, 3.07)
pt3dadd(467.7, 640.12, -4.7, 3.07)
pt3dadd(467.84, 640.28, -4.7, 3.07)
pt3dadd(467.98, 640.6, -4.7, 3.07)
pt3dadd(468.39, 641.07, -4.7, 3.07)
pt3dadd(468.53, 641.23, -4.7, 3.07)
pt3dadd(468.67, 641.55, -4.7, 3.07)
pt3dadd(468.81, 641.7, -4.7, 3.07)
}
}
proc shape3d_186() {
dend[121] { pt3dadd(468.95, 641.86, -4.7, 3.07)
pt3dadd(469.09, 642.02, -4.7, 3.07)
pt3dadd(469.51, 642.49, -4.7, 3.07)
pt3dadd(469.79, 642.97, -4.7, 3.07)
pt3dadd(469.93, 643.13, -4.7, 3.07)
pt3dadd(470.07, 643.44, -4.7, 3.07)
pt3dadd(470.2, 643.76, -4.7, 3.07)
pt3dadd(470.34, 643.92, -4.7, 3.07)
pt3dadd(470.48, 644.24, -4.7, 3.07)
pt3dadd(470.62, 644.55, -4.7, 3.07)
pt3dadd(470.76, 644.87, -4.7, 3.07)
pt3dadd(470.9, 645.19, -4.7, 3.07)
pt3dadd(471.18, 645.5, -4.7, 3.07)
pt3dadd(471.32, 645.82, -4.7, 3.07)
pt3dadd(471.32, 646.14, -4.7, 3.07)
pt3dadd(471.46, 646.29, -4.7, 3.07)
pt3dadd(471.6, 646.61, -4.7, 3.07)
pt3dadd(471.88, 646.77, -4.7, 3.07)
pt3dadd(472.02, 647.08, -4.7, 3.07)
pt3dadd(472.3, 647.4, -4.7, 3.07)
pt3dadd(472.43, 647.72, -4.7, 3.07)
pt3dadd(472.57, 647.88, -4.7, 3.07)
pt3dadd(472.85, 648.19, -4.7, 3.07)
pt3dadd(473.13, 648.67, -4.7, 3.07)
pt3dadd(473.27, 648.98, -4.7, 3.07)
pt3dadd(473.41, 649.14, -4.7, 3.07)
pt3dadd(473.55, 649.46, -4.7, 3.07)
pt3dadd(473.69, 649.62, -4.7, 3.07)
pt3dadd(473.69, 649.93, -4.7, 3.07)
pt3dadd(474.11, 650.41, -4.7, 3.07)
pt3dadd(474.25, 650.88, -4.7, 3.07)
pt3dadd(474.39, 651.2, -4.7, 3.07)
pt3dadd(474.52, 651.36, -4.7, 3.07)
pt3dadd(474.8, 651.83, -4.7, 3.07)
pt3dadd(474.94, 652.15, -4.7, 3.07)
pt3dadd(475.08, 652.62, -4.7, 3.07)
pt3dadd(475.22, 652.78, -4.7, 3.07)
pt3dadd(475.36, 652.94, -4.7, 3.07)
pt3dadd(475.5, 653.26, -4.7, 3.07)
pt3dadd(475.64, 653.57, -4.7, 3.07)
pt3dadd(475.92, 654.05, -4.7, 3.07)
pt3dadd(476.34, 654.52, -4.7, 3.07)
pt3dadd(476.48, 654.84, -4.7, 3.07)
pt3dadd(476.61, 655.16, -4.7, 3.07)
pt3dadd(476.75, 655.47, -4.7, 3.07)
pt3dadd(476.89, 655.63, -4.7, 3.07)
pt3dadd(477.03, 656.11, -4.7, 3.07)
pt3dadd(477.03, 656.42, -4.7, 3.07)
pt3dadd(477.17, 656.58, -4.7, 3.07)
pt3dadd(477.45, 656.9, -4.7, 3.07)
pt3dadd(477.45, 657.21, -4.7, 3.07)
pt3dadd(477.59, 657.37, -4.7, 3.07)
pt3dadd(477.73, 657.53, -4.7, 3.07)
pt3dadd(477.73, 657.85, -4.7, 3.07)
pt3dadd(477.87, 658.01, -4.7, 3.07)
pt3dadd(478.01, 658.48, -4.7, 3.07)
pt3dadd(478.15, 658.8, -4.7, 3.07)
pt3dadd(478.29, 659.27, -4.7, 3.07)
pt3dadd(478.43, 659.59, -4.7, 3.07)
pt3dadd(478.71, 659.91, -4.7, 3.07)
pt3dadd(478.84, 660.22, -4.7, 3.07)
pt3dadd(478.98, 660.54, -4.7, 3.07)
pt3dadd(478.98, 660.85, -4.7, 3.07)
pt3dadd(479.12, 661.17, -4.7, 3.07)
pt3dadd(479.26, 661.49, -4.7, 3.07)
pt3dadd(479.4, 661.65, -4.7, 3.07)
pt3dadd(479.4, 662.12, -4.7, 3.07)
pt3dadd(479.54, 662.28, -4.7, 3.07)
pt3dadd(479.68, 662.6, -4.7, 3.07)
pt3dadd(479.82, 662.91, -4.7, 3.07)
pt3dadd(479.96, 663.23, -4.7, 3.07)
pt3dadd(480.24, 663.55, -4.7, 3.07)
pt3dadd(480.38, 663.86, -4.7, 3.07)
pt3dadd(480.52, 664.18, -4.7, 3.07)
pt3dadd(480.66, 664.5, -4.7, 3.07)
pt3dadd(480.8, 664.65, -4.7, 3.07)
pt3dadd(480.8, 664.97, -4.7, 3.07)
pt3dadd(480.93, 665.13, -4.7, 3.07)
pt3dadd(481.07, 665.29, -4.7, 3.07)
pt3dadd(481.21, 665.45, -4.7, 3.07)
pt3dadd(481.21, 665.92, -4.7, 3.07)
pt3dadd(481.35, 666.24, -4.7, 3.07)
pt3dadd(481.63, 666.55, -4.7, 3.07)
pt3dadd(481.77, 666.87, -4.7, 3.07)
pt3dadd(481.91, 667.19, -4.7, 3.07)
pt3dadd(482.05, 667.5, -4.7, 3.07)
pt3dadd(482.19, 667.82, -4.7, 3.07)
pt3dadd(482.33, 667.98, -4.7, 3.07)
pt3dadd(482.33, 668.93, -4.7, 3.07)
pt3dadd(482.05, 667.66, -4.7, 3.07)
pt3dadd(482.05, 667.98, -4.7, 3.07)
pt3dadd(482.33, 668.29, -4.7, 3.07)
pt3dadd(482.47, 668.61, -4.7, 3.07)
pt3dadd(482.75, 669.09, -4.7, 3.07)
pt3dadd(482.89, 669.24, -4.7, 3.07)
pt3dadd(483.03, 669.56, -4.7, 3.07)
pt3dadd(483.44, 670.04, -4.7, 3.07)
pt3dadd(483.58, 670.35, -4.7, 3.07)
pt3dadd(483.58, 670.98, -4.7, 3.07)
pt3dadd(483.72, 671.14, -4.7, 3.07)
pt3dadd(483.72, 671.62, -4.7, 3.07)
pt3dadd(483.86, 671.78, -4.7, 3.07)
pt3dadd(484.14, 672.25, -4.7, 3.07)
pt3dadd(484.42, 672.57, -4.7, 3.07)
pt3dadd(484.56, 672.73, -4.7, 3.07)
pt3dadd(484.56, 673.04, -4.7, 3.07)
pt3dadd(484.7, 673.2, -4.7, 3.07)
pt3dadd(484.84, 673.52, -4.7, 3.07)
pt3dadd(484.84, 673.83, -4.7, 3.07)
pt3dadd(484.98, 674.31, -4.7, 3.07)
pt3dadd(485.25, 674.63, -4.7, 3.07)
pt3dadd(485.39, 674.94, -4.7, 3.07)
pt3dadd(485.53, 675.26, -4.7, 3.07)
pt3dadd(485.67, 675.57, -4.7, 3.07)
pt3dadd(485.81, 675.89, -4.7, 3.07)
pt3dadd(486.09, 676.37, -4.7, 3.07)
pt3dadd(486.37, 676.68, -4.7, 3.07)
pt3dadd(486.51, 677, -4.7, 3.07)
pt3dadd(486.65, 677.32, -4.7, 3.07)
pt3dadd(486.93, 677.63, -4.7, 3.07)
pt3dadd(487.07, 677.95, -4.7, 3.07)
pt3dadd(487.07, 678.27, -4.7, 3.07)
pt3dadd(487.21, 678.58, -4.7, 3.07)
pt3dadd(487.35, 678.74, -4.7, 3.07)
pt3dadd(487.76, 679.22, -4.7, 3.07)
pt3dadd(487.9, 679.53, -4.7, 3.07)
pt3dadd(488.18, 680.32, -4.7, 3.07)
pt3dadd(488.32, 680.8, -4.7, 3.07)
pt3dadd(488.46, 681.27, -4.7, 3.07)
pt3dadd(488.74, 681.59, -4.7, 3.07)
pt3dadd(489.02, 681.91, -4.7, 3.07)
pt3dadd(489.3, 682.38, -4.7, 3.07)
pt3dadd(489.44, 682.7, -4.7, 3.07)
pt3dadd(489.44, 683.01, -4.7, 3.07)
pt3dadd(489.57, 683.33, -4.7, 3.07)
pt3dadd(489.71, 683.49, -4.7, 3.07)
pt3dadd(489.85, 683.81, -4.7, 3.07)
pt3dadd(489.85, 684.12, -4.7, 3.07)
pt3dadd(489.99, 684.44, -4.7, 3.07)
pt3dadd(489.99, 684.75, -4.7, 3.07)
pt3dadd(490.13, 685.07, -4.7, 3.07)
pt3dadd(490.27, 685.39, -4.7, 3.07)
pt3dadd(490.27, 685.7, -4.7, 3.07)
pt3dadd(490.41, 685.86, -4.7, 3.07)
pt3dadd(490.55, 686.02, -4.7, 3.07)
pt3dadd(490.55, 686.34, -4.7, 3.07)
pt3dadd(490.69, 686.5, -4.7, 3.07)
pt3dadd(490.83, 686.81, -4.7, 3.07)
pt3dadd(490.83, 687.13, -4.7, 3.07)
pt3dadd(490.97, 687.45, -4.7, 3.07)
pt3dadd(491.11, 687.76, -4.7, 3.07)
pt3dadd(491.11, 688.08, -4.7, 3.07)
pt3dadd(491.25, 688.4, -4.7, 3.07)
pt3dadd(491.25, 689.03, -4.7, 3.07)
pt3dadd(491.39, 689.34, -4.7, 3.07)
pt3dadd(491.53, 689.82, -4.7, 3.07)
pt3dadd(491.53, 690.14, -4.7, 3.07)
pt3dadd(491.67, 690.45, -4.7, 3.07)
pt3dadd(491.8, 690.93, -4.7, 3.07)
pt3dadd(491.8, 692.04, -4.7, 3.07)
pt3dadd(491.94, 692.35, -4.7, 3.07)
pt3dadd(491.94, 693.93, -4.7, 3.07)
pt3dadd(492.08, 694.25, -4.7, 3.07)
pt3dadd(492.22, 694.57, -4.7, 3.07)
pt3dadd(492.22, 695.04, -4.7, 3.07)
pt3dadd(492.5, 695.52, -4.7, 3.07)
pt3dadd(492.64, 695.83, -4.7, 3.07)
pt3dadd(492.78, 696.15, -4.7, 3.07)
pt3dadd(492.78, 696.47, -4.7, 3.07)
pt3dadd(492.92, 696.63, -4.7, 3.07)
pt3dadd(492.92, 696.94, -4.7, 3.07)
pt3dadd(493.06, 697.1, -4.7, 3.07)
pt3dadd(493.2, 697.42, -4.7, 3.07)
pt3dadd(493.34, 697.89, -4.7, 3.07)
pt3dadd(493.34, 698.21, -4.7, 3.07)
pt3dadd(493.48, 698.68, -4.7, 3.07)
pt3dadd(493.62, 699, -4.7, 3.07)
pt3dadd(493.76, 699.16, -4.7, 3.07)
pt3dadd(493.89, 699.47, -4.7, 3.07)
pt3dadd(493.89, 700.11, -4.7, 3.07)
pt3dadd(494.03, 700.42, -4.7, 3.07)
pt3dadd(494.31, 700.74, -4.7, 3.07)
pt3dadd(494.31, 701.06, -4.7, 3.07)
pt3dadd(494.45, 701.22, -4.7, 3.07)
pt3dadd(494.45, 701.53, -4.7, 3.07)
pt3dadd(494.59, 701.69, -4.7, 3.07)
pt3dadd(494.59, 702.01, -4.7, 3.07)
pt3dadd(494.73, 702.32, -4.7, 3.07)
pt3dadd(494.87, 702.64, -4.7, 3.07)
pt3dadd(495.01, 702.96, -4.7, 3.07)
pt3dadd(495.15, 703.27, -4.7, 3.07)
pt3dadd(495.29, 703.59, -4.7, 3.07)
pt3dadd(495.29, 703.91, -4.7, 3.07)
pt3dadd(495.43, 704.22, -4.7, 3.07)
pt3dadd(495.57, 704.38, -4.7, 3.07)
pt3dadd(495.85, 704.54, -4.7, 3.07)
pt3dadd(495.99, 704.86, -4.7, 3.07)
pt3dadd(496.12, 705.01, -4.7, 3.07)
pt3dadd(496.26, 705.17, -4.7, 3.07)
pt3dadd(496.4, 705.33, -4.7, 3.07)
}
}
proc shape3d_187() {
dend[121] { pt3dadd(496.4, 705.65, -4.7, 3.07)
pt3dadd(496.68, 705.96, -4.7, 3.07)
pt3dadd(496.82, 706.12, -4.7, 3.07)
pt3dadd(496.82, 706.44, -4.7, 3.07)
pt3dadd(496.96, 706.6, -4.7, 3.07)
pt3dadd(497.24, 706.76, -4.7, 3.07)
pt3dadd(497.38, 707.07, -4.7, 3.07)
pt3dadd(497.66, 707.39, -4.7, 3.07)
pt3dadd(497.94, 707.55, -4.7, 3.07)
pt3dadd(498.08, 707.86, -4.7, 3.07)
pt3dadd(498.63, 708.5, -4.7, 3.07)
pt3dadd(498.77, 708.65, -4.7, 3.07)
pt3dadd(499.05, 708.81, -4.7, 3.07)
pt3dadd(499.19, 708.97, -4.7, 3.07)
pt3dadd(499.33, 709.29, -4.7, 3.07)
pt3dadd(499.61, 709.45, -4.7, 3.07)
pt3dadd(499.75, 709.76, -4.7, 3.07)
pt3dadd(500.03, 710.08, -4.7, 3.07)
pt3dadd(500.31, 710.24, -4.7, 3.07)
pt3dadd(500.44, 710.4, -4.7, 3.07)
pt3dadd(500.58, 710.55, -4.7, 3.07)
pt3dadd(501, 711.03, -4.7, 3.07)
pt3dadd(501.14, 711.19, -4.7, 3.07)
pt3dadd(501.42, 711.5, -4.7, 3.07)
pt3dadd(501.7, 711.66, -4.7, 3.07)
pt3dadd(501.84, 711.82, -4.7, 3.07)
pt3dadd(502.26, 712.14, -4.7, 3.07)
pt3dadd(502.53, 712.3, -4.7, 3.07)
pt3dadd(502.67, 712.45, -4.7, 3.07)
pt3dadd(503.09, 712.77, -4.7, 3.07)
pt3dadd(503.23, 712.93, -4.7, 3.07)
pt3dadd(503.65, 713.25, -4.7, 3.07)
pt3dadd(503.93, 713.4, -4.7, 3.07)
pt3dadd(504.07, 713.56, -4.7, 3.07)
pt3dadd(504.35, 713.72, -4.7, 3.07)
pt3dadd(504.49, 713.88, -4.7, 3.07)
pt3dadd(504.76, 714.04, -4.7, 3.07)
pt3dadd(504.9, 714.35, -4.7, 3.07)
pt3dadd(505.04, 714.51, -4.7, 3.07)
pt3dadd(505.18, 714.67, -4.7, 3.07)
pt3dadd(504.07, 713.88, -4.7, 3.07)
pt3dadd(504.35, 714.19, -4.7, 3.07)
pt3dadd(504.9, 714.35, -4.7, 3.07)
pt3dadd(505.18, 714.67, -4.7, 3.07)
pt3dadd(505.6, 714.83, -4.7, 3.07)
pt3dadd(505.88, 715.14, -4.7, 3.07)
pt3dadd(506.02, 715.46, -4.7, 3.07)
pt3dadd(506.3, 715.62, -4.7, 3.07)
pt3dadd(506.44, 715.78, -4.7, 3.07)
pt3dadd(506.44, 716.09, -4.7, 3.07)
pt3dadd(506.58, 716.41, -4.7, 3.07)
pt3dadd(506.85, 716.57, -4.7, 3.07)
pt3dadd(507.13, 716.73, -4.7, 3.07)
pt3dadd(507.27, 716.89, -4.7, 3.07)
pt3dadd(507.41, 717.2, -4.7, 3.07)
pt3dadd(507.83, 717.52, -4.7, 3.07)
pt3dadd(507.97, 717.83, -4.7, 3.07)
pt3dadd(508.11, 718.15, -4.7, 3.07)
pt3dadd(508.39, 718.31, -4.7, 3.07)
pt3dadd(508.94, 718.94, -4.7, 3.07)
pt3dadd(509.08, 719.1, -4.7, 3.07)
pt3dadd(509.36, 719.58, -4.7, 3.07)
pt3dadd(509.64, 719.73, -4.7, 3.07)
pt3dadd(509.92, 720.05, -4.7, 3.07)
pt3dadd(510.2, 720.37, -4.7, 3.07)
pt3dadd(510.62, 720.68, -4.7, 3.07)
pt3dadd(511.04, 721.16, -4.7, 3.07)
pt3dadd(512.85, 723.22, -4.7, 3.07)
pt3dadd(513.13, 723.69, -4.7, 3.07)
pt3dadd(513.26, 724.17, -4.7, 3.07)
pt3dadd(513.54, 724.48, -4.7, 3.07)
pt3dadd(513.82, 724.8, -4.7, 3.07)
pt3dadd(514.1, 725.12, -4.7, 3.07)
pt3dadd(514.24, 725.59, -4.7, 3.07)
pt3dadd(514.66, 726.07, -4.7, 3.07)
pt3dadd(514.94, 726.54, -4.7, 3.07)
pt3dadd(515.08, 726.86, -4.7, 3.07)
pt3dadd(515.22, 727.17, -4.7, 3.07)
pt3dadd(515.49, 727.33, -4.7, 3.07)
pt3dadd(515.63, 727.65, -4.7, 3.07)
pt3dadd(515.63, 727.96, -4.7, 3.07)
pt3dadd(515.77, 728.12, -4.7, 3.07)
pt3dadd(516.05, 728.6, -4.7, 3.07)
pt3dadd(516.19, 728.76, -4.7, 3.07)
pt3dadd(516.33, 729.07, -4.7, 3.07)
pt3dadd(516.61, 729.39, -4.7, 3.07)
pt3dadd(516.75, 729.55, -4.7, 3.07)
pt3dadd(516.89, 730.02, -4.7, 3.07)
pt3dadd(517.17, 730.34, -4.7, 3.07)
pt3dadd(517.31, 730.5, -4.7, 3.07)
pt3dadd(517.45, 730.97, -4.7, 3.07)
pt3dadd(517.72, 731.45, -4.7, 3.07)
pt3dadd(517.86, 731.61, -4.7, 3.07)
pt3dadd(518, 731.92, -4.7, 3.07)
pt3dadd(518.28, 732.24, -4.7, 3.07)
pt3dadd(518.42, 732.71, -4.7, 3.07)
pt3dadd(518.56, 733.03, -4.7, 3.07)
pt3dadd(518.84, 733.19, -4.7, 3.07)
pt3dadd(518.98, 733.5, -4.7, 3.07)
pt3dadd(519.12, 733.66, -4.7, 3.07)
pt3dadd(519.4, 734.14, -4.7, 3.07)
pt3dadd(519.54, 734.3, -4.7, 3.07)
pt3dadd(519.68, 734.61, -4.7, 3.07)
pt3dadd(519.81, 734.93, -4.7, 3.07)
pt3dadd(519.95, 735.25, -4.7, 3.07)
pt3dadd(520.09, 735.56, -4.7, 3.07)
pt3dadd(520.23, 735.88, -4.7, 3.07)
pt3dadd(520.37, 736.04, -4.7, 3.07)
pt3dadd(520.65, 736.2, -4.7, 3.07)
pt3dadd(520.65, 736.51, -4.7, 3.07)
pt3dadd(520.93, 736.99, -4.7, 3.07)
pt3dadd(521.21, 737.3, -4.7, 3.07)
pt3dadd(521.35, 737.46, -4.7, 3.07)
pt3dadd(521.49, 737.78, -4.7, 3.07)
pt3dadd(521.77, 738.09, -4.7, 3.07)
pt3dadd(521.9, 738.41, -4.7, 3.07)
pt3dadd(522.04, 738.73, -4.7, 3.07)
pt3dadd(522.18, 738.89, -4.7, 3.07)
pt3dadd(522.32, 739.2, -4.7, 3.07)
pt3dadd(522.74, 739.52, -4.7, 3.07)
pt3dadd(522.88, 739.84, -4.7, 3.07)
pt3dadd(523.16, 740.31, -4.7, 3.07)
pt3dadd(523.3, 740.63, -4.7, 3.07)
pt3dadd(523.44, 740.94, -4.7, 3.07)
pt3dadd(523.72, 741.1, -4.7, 3.07)
pt3dadd(523.86, 741.26, -4.7, 3.07)
pt3dadd(524, 741.42, -4.7, 3.07)
pt3dadd(524.13, 741.74, -4.7, 3.07)
pt3dadd(524.41, 741.89, -4.7, 3.07)
pt3dadd(524.69, 742.21, -4.7, 3.07)
pt3dadd(524.83, 742.53, -4.7, 3.07)
pt3dadd(525.11, 742.68, -4.7, 3.07)
pt3dadd(525.25, 743, -4.7, 3.07)
pt3dadd(525.53, 743.16, -4.7, 3.07)
pt3dadd(525.81, 743.32, -4.7, 3.07)
pt3dadd(525.95, 743.48, -4.7, 3.07)
pt3dadd(526.22, 743.63, -4.7, 3.07)
pt3dadd(526.36, 743.79, -4.7, 3.07)
pt3dadd(526.64, 744.11, -4.7, 3.07)
pt3dadd(526.92, 744.27, -4.7, 3.07)
pt3dadd(527.34, 744.43, -4.7, 3.07)
pt3dadd(527.62, 744.74, -4.7, 3.07)
pt3dadd(527.76, 745.06, -4.7, 3.07)
pt3dadd(528.18, 745.22, -4.7, 3.07)
pt3dadd(528.59, 745.53, -4.7, 3.07)
pt3dadd(528.87, 745.69, -4.7, 3.07)
pt3dadd(529.29, 746.17, -4.7, 3.07)
pt3dadd(529.43, 746.33, -4.7, 3.07)
pt3dadd(530.13, 746.8, -4.7, 3.07)
pt3dadd(530.41, 746.8, -4.7, 3.07)
pt3dadd(530.54, 746.96, -4.7, 3.07)
pt3dadd(530.54, 747.27, -4.7, 3.07)
pt3dadd(530.68, 747.43, -4.7, 3.07)
pt3dadd(530.82, 747.59, -4.7, 3.07)
pt3dadd(531.1, 747.75, -4.7, 3.07)
pt3dadd(531.24, 748.07, -4.7, 3.07)
pt3dadd(531.38, 748.22, -4.7, 3.07)
pt3dadd(531.52, 748.54, -4.7, 3.07)
pt3dadd(531.8, 748.7, -4.7, 3.07)
pt3dadd(531.94, 748.86, -4.7, 3.07)
pt3dadd(532.22, 749.02, -4.7, 3.07)
pt3dadd(532.36, 749.17, -4.7, 3.07)
pt3dadd(532.5, 749.33, -4.7, 3.07)
pt3dadd(532.64, 749.49, -4.7, 3.07)
pt3dadd(532.77, 749.65, -4.7, 3.07)
pt3dadd(532.91, 749.81, -4.7, 3.07)
pt3dadd(533.05, 749.97, -4.7, 3.07)
pt3dadd(533.33, 750.12, -4.7, 3.07)
pt3dadd(533.61, 750.28, -4.7, 3.07)
pt3dadd(534.03, 750.76, -4.7, 3.07)
pt3dadd(534.31, 750.76, -4.7, 3.07)
pt3dadd(534.45, 751.07, -4.7, 3.07)
pt3dadd(534.73, 751.23, -4.7, 3.07)
pt3dadd(535, 751.39, -4.7, 3.07)
pt3dadd(535.56, 751.71, -4.7, 3.07)
pt3dadd(535.98, 751.86, -4.7, 3.07)
pt3dadd(536.68, 752.34, -4.7, 3.07)
pt3dadd(536.95, 752.5, -4.7, 3.07)
pt3dadd(537.23, 752.81, -4.7, 3.07)
pt3dadd(537.65, 752.81, -4.7, 3.07)
pt3dadd(537.79, 752.97, -4.7, 3.07)
pt3dadd(538.21, 753.29, -4.7, 3.07)
pt3dadd(538.49, 753.45, -4.7, 3.07)
pt3dadd(538.77, 753.61, -4.7, 3.07)
pt3dadd(539.18, 753.92, -4.7, 3.07)
pt3dadd(539.46, 753.92, -4.7, 3.07)
pt3dadd(540.02, 754.24, -4.7, 3.07)
pt3dadd(540.3, 754.4, -4.7, 3.07)
pt3dadd(540.58, 754.56, -4.7, 3.07)
pt3dadd(540.86, 754.71, -4.7, 3.07)
pt3dadd(541.14, 754.87, -4.7, 3.07)
pt3dadd(541.55, 755.03, -4.7, 3.07)
pt3dadd(541.97, 755.19, -4.7, 3.07)
pt3dadd(542.39, 755.35, -4.7, 3.07)
pt3dadd(542.81, 755.51, -4.7, 3.07)
pt3dadd(542.95, 755.66, -4.7, 3.07)
pt3dadd(543.37, 755.82, -4.7, 3.07)
pt3dadd(543.64, 755.98, -4.7, 3.07)
pt3dadd(543.92, 756.3, -4.7, 3.07)
pt3dadd(544.2, 756.45, -4.7, 3.07)
}
}
proc shape3d_188() {
dend[121] { pt3dadd(544.48, 756.61, -4.7, 3.07)
pt3dadd(544.76, 756.77, -4.7, 3.07)
pt3dadd(545.04, 756.93, -4.7, 3.07)
pt3dadd(545.18, 757.09, -4.7, 3.07)
pt3dadd(545.46, 757.09, -4.7, 3.07)
pt3dadd(545.73, 757.4, -4.7, 3.07)
pt3dadd(546.01, 757.56, -4.7, 3.07)
pt3dadd(546.15, 757.72, -4.7, 3.07)
pt3dadd(546.43, 757.72, -4.7, 3.07)
pt3dadd(546.57, 757.88, -4.7, 3.07)
pt3dadd(546.99, 758.04, -4.7, 3.07)
pt3dadd(547.41, 758.2, -4.7, 3.07)
pt3dadd(547.96, 758.35, -4.7, 3.07)
pt3dadd(548.52, 758.35, -4.7, 3.07)
pt3dadd(548.94, 758.51, -4.7, 3.07)
pt3dadd(549.36, 758.51, -4.7, 3.07)
pt3dadd(548.66, 758.51, -4.7, 3.07)
pt3dadd(548.8, 758.67, -4.7, 3.07)
pt3dadd(549.22, 758.83, -4.7, 3.07)
pt3dadd(549.78, 759.15, -4.7, 3.07)
pt3dadd(550.47, 759.62, -4.7, 3.07)
pt3dadd(551.03, 759.62, -4.7, 3.07)
pt3dadd(551.45, 759.94, -4.7, 3.07)
pt3dadd(551.73, 760.1, -4.7, 3.07)
pt3dadd(552.28, 760.25, -4.7, 3.07)
pt3dadd(552.42, 760.41, -4.7, 3.07)
pt3dadd(552.84, 760.73, -4.7, 3.07)
pt3dadd(553.26, 760.89, -4.7, 3.07)
pt3dadd(553.68, 761.2, -4.7, 3.07)
pt3dadd(553.96, 761.36, -4.7, 3.07)
pt3dadd(554.37, 761.52, -4.7, 3.07)
pt3dadd(554.79, 761.84, -4.7, 3.07)
pt3dadd(555.21, 761.99, -4.7, 3.07)
pt3dadd(555.77, 762.31, -4.7, 3.07)
pt3dadd(556.19, 762.47, -4.7, 3.07)
pt3dadd(556.6, 762.63, -4.7, 3.07)
pt3dadd(557.44, 763.1, -4.7, 3.07)
pt3dadd(558, 763.42, -4.7, 3.07)
pt3dadd(558.83, 763.89, -4.7, 3.07)
pt3dadd(559.25, 764.05, -4.7, 3.07)
pt3dadd(559.67, 764.21, -4.7, 3.07)
pt3dadd(560.23, 764.69, -4.7, 3.07)
pt3dadd(560.51, 764.84, -4.7, 3.07)
pt3dadd(561.06, 765, -4.7, 3.07)
pt3dadd(561.34, 765.32, -4.7, 3.07)
pt3dadd(561.62, 765.48, -4.7, 3.07)
pt3dadd(561.9, 765.63, -4.7, 3.07)
pt3dadd(562.18, 765.79, -4.7, 3.07)
pt3dadd(562.46, 766.11, -4.7, 3.07)
pt3dadd(562.87, 766.27, -4.7, 3.07)
pt3dadd(563.15, 766.43, -4.7, 3.07)
pt3dadd(563.29, 766.74, -4.7, 3.07)
pt3dadd(563.71, 766.9, -4.7, 3.07)
pt3dadd(564.13, 767.06, -4.7, 3.07)
pt3dadd(564.41, 767.22, -4.7, 3.07)
pt3dadd(564.83, 767.53, -4.7, 3.07)
pt3dadd(565.1, 767.69, -4.7, 3.07)
pt3dadd(565.38, 767.85, -4.7, 3.07)
pt3dadd(565.66, 768.17, -4.7, 3.07)
pt3dadd(566.08, 768.33, -4.7, 3.07)
pt3dadd(566.78, 768.8, -4.7, 3.07)
pt3dadd(567.19, 768.96, -4.7, 3.07)
pt3dadd(567.47, 769.28, -4.7, 3.07)
pt3dadd(568.03, 769.59, -4.7, 3.07)
pt3dadd(568.45, 769.91, -4.7, 3.07)
pt3dadd(568.87, 770.07, -4.7, 3.07)
pt3dadd(569.42, 770.54, -4.7, 3.07)
pt3dadd(569.7, 770.86, -4.7, 3.07)
pt3dadd(570.12, 771.02, -4.7, 3.07)
pt3dadd(570.54, 771.33, -4.7, 3.07)
pt3dadd(570.96, 771.65, -4.7, 3.07)
pt3dadd(571.24, 771.81, -4.7, 3.07)
pt3dadd(571.51, 771.97, -4.7, 3.07)
pt3dadd(572.07, 772.44, -4.7, 3.07)
pt3dadd(572.77, 772.92, -4.7, 3.07)
pt3dadd(573.19, 773.39, -4.7, 3.07)
pt3dadd(573.6, 773.55, -4.7, 3.07)
pt3dadd(574.02, 773.87, -4.7, 3.07)
pt3dadd(574.3, 774.02, -4.7, 3.07)
pt3dadd(574.58, 774.34, -4.7, 3.07)
pt3dadd(575.14, 774.82, -4.7, 3.07)
pt3dadd(575.56, 775.29, -4.7, 3.07)
pt3dadd(575.7, 775.45, -4.7, 3.07)
pt3dadd(576.11, 775.61, -4.7, 3.07)
pt3dadd(576.53, 776.08, -4.7, 3.07)
pt3dadd(576.81, 776.24, -4.7, 3.07)
pt3dadd(577.23, 776.56, -4.7, 3.07)
pt3dadd(577.37, 776.71, -4.7, 3.07)
pt3dadd(577.92, 777.35, -4.7, 3.07)
pt3dadd(578.2, 777.51, -4.7, 3.07)
pt3dadd(578.48, 777.82, -4.7, 3.07)
pt3dadd(578.76, 777.98, -4.7, 3.07)
pt3dadd(579.18, 778.3, -4.7, 3.07)
pt3dadd(579.6, 778.77, -4.7, 3.07)
pt3dadd(579.74, 778.93, -4.7, 3.07)
pt3dadd(579.88, 779.09, -4.7, 3.07)
pt3dadd(580.15, 779.25, -4.7, 3.07)
pt3dadd(580.43, 779.56, -4.7, 3.07)
pt3dadd(580.57, 779.72, -4.7, 3.07)
pt3dadd(580.71, 779.88, -4.7, 3.07)
pt3dadd(580.85, 780.2, -4.7, 3.07)
pt3dadd(581.13, 780.35, -4.7, 3.07)
pt3dadd(581.27, 780.51, -4.7, 3.07)
pt3dadd(581.41, 780.83, -4.7, 3.07)
pt3dadd(581.69, 780.99, -4.7, 3.07)
pt3dadd(581.83, 781.3, -4.7, 3.07)
pt3dadd(582.11, 781.62, -4.7, 3.07)
pt3dadd(582.24, 781.78, -4.7, 3.07)
pt3dadd(582.38, 781.94, -4.7, 3.07)
pt3dadd(582.52, 782.1, -4.7, 3.07)
pt3dadd(582.94, 782.41, -4.7, 3.07)
pt3dadd(583.08, 782.73, -4.7, 3.07)
pt3dadd(583.5, 783.05, -4.7, 3.07)
pt3dadd(583.64, 783.2, -4.7, 3.07)
pt3dadd(583.78, 783.52, -4.7, 3.07)
pt3dadd(583.92, 783.68, -4.7, 3.07)
pt3dadd(584.34, 783.84, -4.7, 3.07)
pt3dadd(584.34, 784.15, -4.7, 3.07)
pt3dadd(584.47, 784.31, -4.7, 3.07)
pt3dadd(584.75, 784.63, -4.7, 3.07)
pt3dadd(584.89, 784.79, -4.7, 3.07)
pt3dadd(585.03, 785.1, -4.7, 3.07)
pt3dadd(585.31, 785.26, -4.7, 3.07)
pt3dadd(585.45, 785.42, -4.7, 3.07)
pt3dadd(585.59, 785.74, -4.7, 3.07)
pt3dadd(585.73, 786.05, -4.7, 3.07)
pt3dadd(585.87, 786.21, -4.7, 3.07)
pt3dadd(585.87, 786.37, -4.7, 3.07)
pt3dadd(585.73, 785.26, -7.7, 3.07)
pt3dadd(585.87, 785.42, -7.7, 3.07)
pt3dadd(586.01, 785.58, -7.7, 3.07)
pt3dadd(586.15, 785.74, -7.7, 3.07)
pt3dadd(586.43, 785.74, -7.7, 3.07)
pt3dadd(586.56, 785.89, -7.7, 3.07)
pt3dadd(587.4, 785.89, -7.7, 3.07)
pt3dadd(587.82, 786.05, -7.7, 3.07)
pt3dadd(597.99, 786.05, -7.7, 3.07)
pt3dadd(598.27, 785.89, -7.7, 3.07)
pt3dadd(598.55, 785.74, -7.7, 3.07)
pt3dadd(598.83, 785.58, -7.7, 3.07)
pt3dadd(599.25, 785.42, -7.7, 3.07)
pt3dadd(599.52, 785.26, -7.7, 3.07)
pt3dadd(599.94, 785.1, -7.7, 3.07)
pt3dadd(600.08, 784.95, -7.7, 3.07)
pt3dadd(600.36, 784.79, -7.7, 3.07)
pt3dadd(600.64, 784.63, -7.7, 3.07)
pt3dadd(601.06, 784.47, -7.7, 3.07)
pt3dadd(601.34, 784.31, -7.7, 3.07)
pt3dadd(601.61, 784.15, -7.7, 3.07)
pt3dadd(602.03, 784, -7.7, 3.07)
pt3dadd(602.31, 783.84, -7.7, 3.07)
pt3dadd(602.73, 783.68, -7.7, 3.07)
pt3dadd(603.29, 783.36, -7.7, 3.07)
pt3dadd(603.57, 783.36, -7.7, 3.07)
pt3dadd(603.84, 783.2, -7.7, 3.07)
pt3dadd(604.12, 782.89, -7.7, 3.07)
pt3dadd(604.4, 782.73, -7.7, 3.07)
pt3dadd(604.82, 782.57, -7.7, 3.07)
pt3dadd(604.96, 782.41, -7.7, 3.07)
pt3dadd(605.24, 782.25, -7.7, 3.07)
pt3dadd(605.52, 782.1, -7.7, 3.07)
pt3dadd(605.8, 781.94, -7.7, 3.07)
pt3dadd(606.07, 781.78, -7.7, 3.07)
pt3dadd(606.35, 781.62, -7.7, 3.07)
pt3dadd(606.63, 781.46, -7.7, 3.07)
pt3dadd(607.19, 781.46, -7.7, 3.07)
pt3dadd(607.47, 781.3, -7.7, 3.07)
pt3dadd(607.75, 781.15, -7.7, 3.07)
pt3dadd(608.16, 781.15, -7.7, 3.07)
pt3dadd(608.44, 780.99, -7.7, 3.07)
pt3dadd(615.97, 780.99, -7.7, 3.07)
pt3dadd(616.25, 780.83, -7.7, 3.07)
pt3dadd(616.53, 780.67, -7.7, 3.07)
pt3dadd(616.94, 780.67, -7.7, 3.07)
pt3dadd(617.5, 780.51, -7.7, 3.07)
pt3dadd(617.78, 780.35, -7.7, 3.07)
pt3dadd(618.06, 780.2, -7.7, 3.07)
pt3dadd(618.34, 780.04, -7.7, 3.07)
pt3dadd(618.62, 780.04, -7.7, 3.07)
pt3dadd(618.89, 779.88, -7.7, 3.07)
pt3dadd(619.03, 779.72, -7.7, 3.07)
pt3dadd(619.31, 779.72, -7.7, 3.07)
pt3dadd(619.45, 779.56, -7.7, 3.07)
pt3dadd(619.87, 779.56, -7.7, 3.07)
pt3dadd(619.45, 778.93, -9.7, 3.07)
pt3dadd(619.59, 778.77, -9.7, 3.07)
pt3dadd(620.01, 778.61, -9.7, 3.07)
pt3dadd(620.43, 778.14, -9.7, 3.07)
pt3dadd(620.85, 777.98, -9.7, 3.07)
pt3dadd(621.12, 777.66, -9.7, 3.07)
pt3dadd(621.26, 777.51, -9.7, 3.07)
pt3dadd(621.54, 777.35, -9.7, 3.07)
pt3dadd(621.68, 777.19, -9.7, 3.07)
pt3dadd(621.82, 777.03, -9.7, 3.07)
pt3dadd(621.96, 776.87, -9.7, 3.07)
pt3dadd(622.1, 776.56, -9.7, 3.07)
pt3dadd(622.38, 776.4, -9.7, 3.07)
pt3dadd(622.38, 776.08, -9.7, 3.07)
pt3dadd(622.52, 775.92, -9.7, 3.07)
pt3dadd(622.66, 775.61, -9.7, 3.07)
}
}
proc shape3d_189() {
dend[121] { pt3dadd(622.94, 775.29, -9.7, 3.07)
pt3dadd(623.08, 774.82, -9.7, 3.07)
pt3dadd(623.21, 774.5, -9.7, 3.07)
pt3dadd(623.49, 774.18, -9.7, 3.07)
pt3dadd(623.49, 773.87, -9.7, 3.07)
pt3dadd(623.77, 773.39, -9.7, 3.07)
pt3dadd(624.05, 773.07, -9.7, 3.07)
pt3dadd(624.19, 772.92, -9.7, 3.07)
pt3dadd(624.47, 772.6, -9.7, 3.07)
pt3dadd(624.61, 772.28, -9.7, 3.07)
pt3dadd(624.75, 771.97, -9.7, 3.07)
pt3dadd(625.17, 771.49, -9.7, 3.07)
pt3dadd(625.17, 771.17, -9.7, 3.07)
pt3dadd(625.58, 770.7, -9.7, 3.07)
pt3dadd(625.72, 770.38, -9.7, 3.07)
pt3dadd(625.86, 770.07, -9.7, 3.07)
pt3dadd(626, 769.75, -9.7, 3.07)
pt3dadd(626.14, 769.43, -9.7, 3.07)
pt3dadd(626.28, 769.12, -9.7, 3.07)
pt3dadd(626.56, 768.8, -9.7, 3.07)
pt3dadd(626.84, 768.48, -9.7, 3.07)
pt3dadd(626.98, 768.17, -9.7, 3.07)
pt3dadd(627.12, 767.69, -9.7, 3.07)
pt3dadd(627.4, 767.38, -9.7, 3.07)
pt3dadd(627.53, 767.06, -9.7, 3.07)
pt3dadd(627.81, 766.58, -9.7, 3.07)
pt3dadd(627.81, 766.27, -9.7, 3.07)
pt3dadd(627.95, 765.79, -9.7, 3.07)
pt3dadd(628.23, 765.48, -9.7, 3.07)
pt3dadd(628.23, 765, -9.7, 3.07)
pt3dadd(628.37, 764.69, -9.7, 3.07)
pt3dadd(628.51, 764.21, -9.7, 3.07)
pt3dadd(628.65, 763.89, -9.7, 3.07)
pt3dadd(628.79, 763.58, -9.7, 3.07)
pt3dadd(628.93, 763.1, -9.7, 3.07)
pt3dadd(629.07, 762.79, -9.7, 3.07)
pt3dadd(629.07, 762.47, -9.7, 3.07)
pt3dadd(629.21, 762.15, -9.7, 3.07)
pt3dadd(629.35, 761.84, -9.7, 3.07)
pt3dadd(629.49, 761.52, -9.7, 3.07)
pt3dadd(629.49, 760.89, -9.7, 3.07)
pt3dadd(629.63, 760.41, -9.7, 3.07)
pt3dadd(629.76, 760.1, -9.7, 3.07)
pt3dadd(629.9, 759.78, -9.7, 3.07)
pt3dadd(630.04, 759.46, -9.7, 3.07)
pt3dadd(630.04, 759.15, -9.7, 3.07)
pt3dadd(630.18, 758.83, -9.7, 3.07)
pt3dadd(630.32, 758.51, -9.7, 3.07)
pt3dadd(630.46, 758.35, -9.7, 3.07)
pt3dadd(630.6, 757.88, -9.7, 3.07)
pt3dadd(630.74, 757.56, -9.7, 3.07)
pt3dadd(630.88, 757.25, -9.7, 3.07)
pt3dadd(631.02, 756.93, -9.7, 3.07)
pt3dadd(631.16, 756.61, -9.7, 3.07)
pt3dadd(631.3, 756.14, -9.7, 3.07)
pt3dadd(631.44, 755.82, -9.7, 3.07)
pt3dadd(631.58, 755.51, -9.7, 3.07)
pt3dadd(631.72, 755.19, -9.7, 3.07)
pt3dadd(631.85, 754.87, -9.7, 3.07)
pt3dadd(631.99, 754.4, -9.7, 3.07)
pt3dadd(632.13, 754.08, -9.7, 3.07)
pt3dadd(632.27, 753.76, -9.7, 3.07)
pt3dadd(632.27, 753.45, -9.7, 3.07)
pt3dadd(632.41, 753.13, -9.7, 3.07)
pt3dadd(632.55, 752.97, -9.7, 3.07)
pt3dadd(632.55, 752.66, -9.7, 3.07)
pt3dadd(632.69, 752.5, -9.7, 3.07)
pt3dadd(632.83, 752.18, -9.7, 3.07)
pt3dadd(633.11, 751.86, -9.7, 3.07)
pt3dadd(633.25, 751.55, -9.7, 3.07)
pt3dadd(633.39, 751.23, -9.7, 3.07)
pt3dadd(633.53, 750.92, -9.7, 3.07)
pt3dadd(633.81, 750.6, -9.7, 3.07)
pt3dadd(633.94, 750.28, -9.7, 3.07)
pt3dadd(634.08, 749.97, -9.7, 3.07)
pt3dadd(634.22, 749.81, -9.7, 3.07)
pt3dadd(634.22, 749.33, -9.7, 3.07)
pt3dadd(634.36, 749.17, -9.7, 3.07)
pt3dadd(634.64, 748.86, -9.7, 3.07)
pt3dadd(634.92, 748.38, -9.7, 3.07)
pt3dadd(635.06, 748.07, -9.7, 3.07)
pt3dadd(635.2, 747.91, -9.7, 3.07)
pt3dadd(635.48, 747.59, -9.7, 3.07)
pt3dadd(635.76, 747.27, -9.7, 3.07)
pt3dadd(635.9, 746.96, -9.7, 3.07)
pt3dadd(636.04, 746.48, -9.7, 3.07)
pt3dadd(636.31, 746.17, -9.7, 3.07)
pt3dadd(636.59, 745.69, -9.7, 3.07)
pt3dadd(636.87, 745.53, -9.7, 3.07)
pt3dadd(637.01, 745.22, -9.7, 3.07)
pt3dadd(637.29, 745.06, -9.7, 3.07)
pt3dadd(637.43, 744.74, -9.7, 3.07)
pt3dadd(637.57, 744.27, -9.7, 3.07)
pt3dadd(637.99, 743.79, -9.7, 3.07)
pt3dadd(638.13, 743.63, -9.7, 3.07)
pt3dadd(638.27, 743.32, -9.7, 3.07)
pt3dadd(638.4, 743, -9.7, 3.07)
pt3dadd(638.54, 742.84, -9.7, 3.07)
pt3dadd(638.68, 742.53, -9.7, 3.07)
pt3dadd(639.1, 742.05, -9.7, 3.07)
pt3dadd(639.24, 741.74, -9.7, 3.07)
pt3dadd(639.52, 741.58, -9.7, 3.07)
pt3dadd(639.8, 741.26, -9.7, 3.07)
pt3dadd(639.94, 740.94, -9.7, 3.07)
pt3dadd(640.22, 740.63, -9.7, 3.07)
pt3dadd(640.49, 740.31, -9.7, 3.07)
pt3dadd(640.77, 739.84, -9.7, 3.07)
pt3dadd(640.91, 739.68, -9.7, 3.07)
pt3dadd(641.19, 739.2, -9.7, 3.07)
pt3dadd(641.75, 738.57, -9.7, 3.07)
pt3dadd(642.17, 738.09, -9.7, 3.07)
pt3dadd(642.31, 737.78, -9.7, 3.07)
pt3dadd(642.86, 737.14, -9.7, 3.07)
pt3dadd(643, 736.99, -9.7, 3.07)
pt3dadd(643.28, 736.67, -9.7, 3.07)
pt3dadd(643.42, 736.35, -9.7, 3.07)
pt3dadd(643.56, 736.2, -9.7, 3.07)
pt3dadd(643.84, 735.88, -9.7, 3.07)
pt3dadd(643.98, 735.72, -9.7, 3.07)
pt3dadd(644.12, 735.4, -9.7, 3.07)
pt3dadd(644.26, 735.09, -9.7, 3.07)
pt3dadd(644.4, 734.77, -9.7, 3.07)
pt3dadd(644.54, 734.61, -9.7, 3.07)
pt3dadd(644.68, 734.3, -9.7, 3.07)
pt3dadd(644.81, 734.3, -9.7, 3.07)
pt3dadd(644.54, 734.61, -11.7, 3.07)
pt3dadd(644.81, 734.14, -11.7, 3.07)
pt3dadd(644.95, 733.82, -11.7, 3.07)
pt3dadd(645.23, 733.5, -11.7, 3.07)
pt3dadd(645.51, 733.03, -11.7, 3.07)
pt3dadd(645.79, 732.55, -11.7, 3.07)
pt3dadd(646.07, 732.08, -11.7, 3.07)
pt3dadd(646.21, 731.61, -11.7, 3.07)
pt3dadd(646.35, 731.29, -11.7, 3.07)
pt3dadd(646.63, 730.97, -11.7, 3.07)
pt3dadd(646.9, 730.5, -11.7, 3.07)
pt3dadd(647.04, 730.02, -11.7, 3.07)
pt3dadd(647.18, 729.71, -11.7, 3.07)
pt3dadd(647.46, 729.23, -11.7, 3.07)
pt3dadd(647.6, 728.76, -11.7, 3.07)
pt3dadd(647.74, 728.28, -11.7, 3.07)
pt3dadd(648.02, 727.81, -11.7, 3.07)
pt3dadd(648.3, 727.33, -11.7, 3.07)
pt3dadd(648.58, 726.86, -11.7, 3.07)
pt3dadd(649.13, 725.59, -11.7, 3.07)
pt3dadd(649.41, 724.96, -11.7, 3.07)
pt3dadd(649.69, 724.17, -11.7, 3.07)
pt3dadd(650.39, 722.58, -11.7, 3.07)
pt3dadd(650.81, 721.79, -11.7, 3.07)
pt3dadd(651.09, 721, -11.7, 3.07)
pt3dadd(651.22, 720.37, -11.7, 3.07)
pt3dadd(651.5, 719.73, -11.7, 3.07)
pt3dadd(651.78, 719.26, -11.7, 3.07)
pt3dadd(652.06, 718.31, -11.7, 3.07)
pt3dadd(652.34, 717.84, -11.7, 3.07)
pt3dadd(652.48, 717.52, -11.7, 3.07)
pt3dadd(652.62, 716.89, -11.7, 3.07)
pt3dadd(652.76, 716.09, -11.7, 3.07)
pt3dadd(653.04, 715.46, -11.7, 3.07)
pt3dadd(653.04, 714.83, -11.7, 3.07)
pt3dadd(653.32, 714.35, -11.7, 3.07)
pt3dadd(653.32, 713.72, -11.7, 3.07)
pt3dadd(653.59, 713.25, -11.7, 3.07)
pt3dadd(653.59, 712.61, -11.7, 3.07)
pt3dadd(653.73, 712.14, -11.7, 3.07)
pt3dadd(654.01, 711.5, -11.7, 3.07)
pt3dadd(654.29, 711.19, -11.7, 3.07)
pt3dadd(654.43, 710.55, -11.7, 3.07)
pt3dadd(654.71, 709.92, -11.7, 3.07)
pt3dadd(654.99, 709.29, -11.7, 3.07)
pt3dadd(655.13, 708.65, -11.7, 3.07)
pt3dadd(655.41, 708.02, -11.7, 3.07)
pt3dadd(655.54, 707.55, -11.7, 3.07)
pt3dadd(655.68, 707.23, -11.7, 3.07)
pt3dadd(655.82, 706.76, -11.7, 3.07)
pt3dadd(655.82, 706.12, -11.7, 3.07)
pt3dadd(655.96, 705.65, -11.7, 3.07)
pt3dadd(655.96, 705.17, -11.7, 3.07)
}
dend[122] {pt3dclear()
pt3dadd(386.73, 427.71, -4.7, 6.83)
pt3dadd(387.99, 423.91, -5.7, 6.83)
pt3dadd(388.13, 423.6, -5.7, 6.83)
pt3dadd(388.4, 423.12, -5.7, 6.83)
pt3dadd(388.68, 422.81, -5.7, 1.8)
pt3dadd(388.96, 422.33, -5.7, 6.83)
pt3dadd(389.1, 421.86, -5.7, 6.83)
pt3dadd(389.38, 421.54, -5.7, 6.83)
pt3dadd(389.52, 421.38, -5.7, 6.83)
pt3dadd(389.66, 421.06, -5.7, 6.83)
pt3dadd(389.8, 420.75, -5.7, 6.83)
pt3dadd(389.94, 420.43, -5.7, 6.83)
pt3dadd(389.94, 418.69, -5.7, 6.83)
pt3dadd(390.49, 416.16, -6.7, 4.74)
pt3dadd(390.63, 415.84, -6.7, 4.74)
pt3dadd(390.77, 415.37, -6.7, 4.74)
pt3dadd(390.77, 415.05, -6.7, 4.74)
pt3dadd(390.91, 414.57, -6.7, 4.74)
pt3dadd(391.05, 414.1, -6.7, 4.74)
pt3dadd(391.19, 413.94, -6.7, 4.74)
pt3dadd(391.19, 412.99, -6.7, 4.74)
pt3dadd(391.33, 412.68, -6.7, 4.74)
}
}
proc shape3d_190() {
dend[122] { pt3dadd(391.33, 410.14, -6.7, 4.74)
pt3dadd(391.47, 409.98, -6.7, 4.74)
pt3dadd(391.61, 409.83, -6.7, 4.74)
pt3dadd(391.61, 409.51, -6.7, 4.74)
pt3dadd(391.75, 409.19, -6.7, 4.74)
pt3dadd(391.89, 409.03, -6.7, 4.74)
pt3dadd(392.03, 408.88, -6.7, 4.74)
pt3dadd(392.17, 408.56, -6.7, 4.74)
pt3dadd(392.31, 408.24, -6.7, 4.74)
pt3dadd(392.45, 408.09, -6.7, 4.74)
pt3dadd(392.45, 407.61, -6.7, 4.74)
pt3dadd(392.58, 407.45, -6.7, 4.74)
pt3dadd(392.72, 407.29, -6.7, 4.74)
pt3dadd(392.86, 406.98, -6.7, 4.74)
pt3dadd(392.86, 406.5, -6.7, 4.74)
pt3dadd(393, 406.34, -6.7, 4.74)
pt3dadd(393, 406.03, -6.7, 4.74)
pt3dadd(393.14, 405.87, -6.7, 4.74)
pt3dadd(393.28, 405.71, -6.7, 4.74)
pt3dadd(393.42, 405.39, -6.7, 4.74)
pt3dadd(393.42, 405.08, -6.7, 4.74)
pt3dadd(393.56, 404.76, -6.7, 4.74)
pt3dadd(393.7, 404.44, -6.7, 4.74)
pt3dadd(393.7, 403.81, -6.7, 4.74)
pt3dadd(393.84, 403.5, -6.7, 4.74)
pt3dadd(393.98, 403.34, -6.7, 4.74)
pt3dadd(393.98, 402.39, -6.7, 4.74)
pt3dadd(394.12, 402.23, -6.7, 4.74)
pt3dadd(394.26, 402.07, -6.7, 4.74)
pt3dadd(394.26, 401.6, -6.7, 4.74)
pt3dadd(394.4, 401.44, -6.7, 4.74)
pt3dadd(394.54, 401.28, -6.7, 4.74)
pt3dadd(394.54, 401.12, -6.7, 4.74)
pt3dadd(394.95, 399.7, -7.7, 4.18)
pt3dadd(395.09, 399.38, -7.7, 4.18)
pt3dadd(395.23, 398.91, -7.7, 4.18)
pt3dadd(395.51, 398.27, -7.7, 4.18)
pt3dadd(395.93, 397.64, -7.7, 4.18)
pt3dadd(396.21, 397.32, -7.7, 4.18)
pt3dadd(396.49, 396.85, -7.7, 4.18)
pt3dadd(396.63, 396.37, -7.7, 4.18)
pt3dadd(396.77, 396.06, -7.7, 4.18)
pt3dadd(396.9, 395.74, -7.7, 4.18)
pt3dadd(397.18, 395.58, -7.7, 4.18)
pt3dadd(397.32, 395.26, -7.7, 4.18)
pt3dadd(397.46, 394.95, -7.7, 4.18)
pt3dadd(397.6, 394.63, -7.7, 4.18)
pt3dadd(397.74, 394.47, -7.7, 4.18)
pt3dadd(397.88, 394.16, -7.7, 4.18)
pt3dadd(398.16, 393.68, -7.7, 4.18)
pt3dadd(398.3, 393.37, -7.7, 4.18)
pt3dadd(398.58, 393.05, -7.7, 4.18)
pt3dadd(398.72, 392.89, -7.7, 4.18)
pt3dadd(399, 392.57, -7.7, 4.18)
pt3dadd(399.27, 392.26, -7.7, 4.18)
pt3dadd(399.41, 392.1, -7.7, 4.18)
pt3dadd(399.55, 391.78, -7.7, 4.18)
pt3dadd(399.83, 391.62, -7.7, 4.18)
pt3dadd(399.97, 391.31, -7.7, 4.18)
pt3dadd(400.53, 390.67, -7.7, 4.18)
pt3dadd(400.81, 390.52, -7.7, 4.18)
pt3dadd(401.36, 389.88, -7.7, 4.18)
pt3dadd(401.64, 389.72, -7.7, 4.18)
pt3dadd(401.78, 389.41, -7.7, 4.18)
pt3dadd(402.06, 389.25, -7.7, 4.18)
pt3dadd(402.2, 389.09, -7.7, 4.18)
pt3dadd(402.62, 388.62, -7.7, 4.18)
pt3dadd(402.76, 388.46, -7.7, 4.18)
pt3dadd(403.04, 388.3, -7.7, 4.18)
pt3dadd(403.32, 388.14, -7.7, 4.18)
pt3dadd(403.45, 387.98, -7.7, 4.18)
pt3dadd(403.87, 387.51, -7.7, 4.18)
pt3dadd(404.15, 387.51, -7.7, 4.18)
pt3dadd(404.43, 387.19, -7.7, 4.18)
pt3dadd(404.57, 387.03, -7.7, 4.18)
pt3dadd(404.85, 386.72, -7.7, 4.18)
pt3dadd(405.13, 386.56, -7.7, 4.18)
pt3dadd(405.41, 386.24, -7.7, 4.18)
pt3dadd(405.54, 386.08, -7.7, 4.18)
pt3dadd(405.82, 385.77, -7.7, 4.18)
pt3dadd(405.96, 385.61, -7.7, 4.18)
pt3dadd(406.1, 385.45, -7.7, 4.18)
pt3dadd(406.38, 385.29, -7.7, 4.18)
pt3dadd(406.52, 385.13, -7.7, 4.18)
pt3dadd(406.66, 384.98, -7.7, 4.18)
pt3dadd(406.94, 384.5, -7.7, 4.18)
pt3dadd(407.08, 384.19, -7.7, 4.18)
pt3dadd(407.22, 384.03, -7.7, 4.18)
pt3dadd(407.36, 383.87, -7.7, 4.18)
pt3dadd(407.5, 383.55, -7.7, 4.18)
pt3dadd(407.91, 383.08, -7.7, 4.18)
pt3dadd(408.05, 382.92, -7.7, 4.18)
pt3dadd(408.33, 382.44, -7.7, 4.18)
pt3dadd(408.47, 382.13, -7.7, 4.18)
pt3dadd(408.61, 381.81, -7.7, 4.18)
pt3dadd(408.75, 381.65, -7.7, 4.18)
pt3dadd(409.03, 381.18, -7.7, 4.18)
pt3dadd(409.31, 381.02, -7.7, 4.18)
pt3dadd(409.45, 380.54, -7.7, 4.18)
pt3dadd(409.45, 380.23, -7.7, 4.18)
pt3dadd(409.59, 379.75, -7.7, 4.18)
pt3dadd(409.86, 379.44, -7.7, 4.18)
pt3dadd(410, 378.96, -7.7, 4.18)
pt3dadd(410.28, 378.49, -7.7, 4.18)
pt3dadd(410.28, 377.85, -7.7, 4.18)
pt3dadd(410.42, 377.54, -7.7, 4.18)
pt3dadd(410.56, 377.06, -7.7, 4.18)
pt3dadd(410.7, 376.59, -7.7, 4.18)
pt3dadd(410.84, 376.27, -7.7, 4.18)
pt3dadd(410.84, 375.95, -7.7, 4.18)
pt3dadd(410.98, 375.64, -7.7, 4.18)
pt3dadd(410.98, 373.42, -7.7, 4.18)
pt3dadd(411.12, 372.95, -7.7, 4.18)
pt3dadd(411.12, 368.67, -7.7, 4.18)
pt3dadd(411.26, 368.2, -7.7, 4.18)
pt3dadd(411.26, 367.25, -7.7, 4.18)
pt3dadd(411.4, 367.09, -7.7, 4.18)
pt3dadd(411.4, 366.46, -7.7, 4.18)
pt3dadd(411.68, 365.98, -7.7, 4.18)
pt3dadd(411.82, 365.67, -7.7, 4.18)
pt3dadd(411.95, 365.35, -7.7, 4.18)
pt3dadd(411.95, 365.03, -7.7, 4.18)
pt3dadd(412.09, 364.88, -7.7, 4.18)
pt3dadd(412.23, 364.56, -7.7, 4.18)
pt3dadd(412.37, 364.4, -7.7, 4.18)
pt3dadd(412.51, 364.24, -7.7, 4.18)
pt3dadd(412.65, 363.93, -7.7, 4.18)
pt3dadd(412.79, 363.61, -7.7, 4.18)
pt3dadd(412.93, 363.29, -7.7, 4.18)
pt3dadd(412.93, 362.82, -7.7, 4.18)
pt3dadd(413.07, 362.66, -7.7, 4.18)
pt3dadd(413.21, 362.34, -7.7, 4.18)
pt3dadd(413.21, 362.18, -7.7, 4.18)
pt3dadd(413.21, 361.55, -9.7, 3.76)
pt3dadd(413.21, 360.76, -9.7, 3.76)
pt3dadd(413.35, 360.29, -9.7, 3.76)
pt3dadd(413.49, 359.97, -9.7, 3.76)
pt3dadd(413.63, 359.34, -9.7, 3.76)
pt3dadd(413.77, 358.86, -9.7, 3.76)
pt3dadd(413.77, 354.43, -9.7, 3.76)
pt3dadd(413.91, 353.95, -9.7, 3.76)
pt3dadd(413.91, 353.64, -9.7, 3.76)
pt3dadd(414.05, 353.32, -9.7, 3.76)
pt3dadd(414.18, 352.53, -9.7, 3.76)
pt3dadd(414.46, 352.21, -9.7, 3.76)
pt3dadd(414.46, 351.74, -9.7, 3.76)
pt3dadd(414.74, 351.26, -9.7, 3.76)
pt3dadd(415.02, 350.79, -9.7, 3.76)
pt3dadd(415.3, 350.31, -9.7, 3.76)
pt3dadd(415.44, 349.84, -9.7, 3.76)
pt3dadd(415.72, 349.52, -9.7, 3.76)
pt3dadd(415.86, 349.21, -9.7, 3.76)
pt3dadd(415.86, 348.89, -9.7, 3.76)
pt3dadd(416, 348.57, -9.7, 3.76)
pt3dadd(416.14, 348.26, -9.7, 3.76)
pt3dadd(416.14, 347.78, -9.7, 3.76)
pt3dadd(416.27, 347.46, -9.7, 3.76)
pt3dadd(416.41, 347.15, -9.7, 3.76)
pt3dadd(416.41, 345.25, -9.7, 3.76)
pt3dadd(416.55, 345.09, -9.7, 3.76)
pt3dadd(416.69, 344.77, -9.7, 3.76)
pt3dadd(416.83, 344.46, -9.7, 3.76)
pt3dadd(416.83, 343.67, -9.7, 3.76)
pt3dadd(416.97, 343.51, -9.7, 3.76)
pt3dadd(416.97, 342.87, -9.7, 3.76)
pt3dadd(417.11, 342.72, -9.7, 3.76)
pt3dadd(417.25, 342.56, -9.7, 3.76)
pt3dadd(417.25, 342.08, -9.7, 3.76)
pt3dadd(417.39, 341.92, -9.7, 3.76)
pt3dadd(417.53, 341.77, -9.7, 3.76)
pt3dadd(417.53, 341.45, -9.7, 3.76)
pt3dadd(417.67, 341.29, -9.7, 3.76)
pt3dadd(417.81, 340.82, -9.7, 3.76)
pt3dadd(417.95, 340.5, -9.7, 3.76)
pt3dadd(418.09, 340.03, -9.7, 3.76)
pt3dadd(418.37, 339.71, -9.7, 3.76)
pt3dadd(418.37, 339.39, -9.7, 3.76)
pt3dadd(418.64, 339.08, -9.7, 3.76)
pt3dadd(418.78, 338.6, -9.7, 3.76)
pt3dadd(418.92, 338.28, -9.7, 3.76)
pt3dadd(419.06, 337.97, -9.7, 3.76)
pt3dadd(419.34, 337.49, -9.7, 3.76)
pt3dadd(419.48, 337.18, -9.7, 3.76)
pt3dadd(419.62, 336.86, -9.7, 3.76)
pt3dadd(419.76, 336.7, -9.7, 3.76)
pt3dadd(419.9, 336.39, -9.7, 3.76)
pt3dadd(420.04, 335.91, -9.7, 3.76)
pt3dadd(420.18, 335.59, -9.7, 3.76)
pt3dadd(420.32, 335.12, -9.7, 3.76)
pt3dadd(420.87, 334.49, -9.7, 3.76)
pt3dadd(421.01, 334.17, -9.7, 3.76)
pt3dadd(421.15, 333.85, -9.7, 3.76)
pt3dadd(421.15, 333.54, -9.7, 3.76)
pt3dadd(421.29, 333.22, -9.7, 3.76)
pt3dadd(421.43, 332.9, -9.7, 3.76)
pt3dadd(421.57, 332.59, -9.7, 3.76)
pt3dadd(421.71, 332.27, -9.7, 3.76)
pt3dadd(421.85, 331.95, -9.7, 3.76)
pt3dadd(421.85, 331.48, -9.7, 3.76)
pt3dadd(421.99, 331.32, -9.7, 3.76)
}
}
proc shape3d_191() {
dend[122] { pt3dadd(422.13, 331, -9.7, 3.76)
pt3dadd(422.27, 330.53, -9.7, 3.76)
pt3dadd(422.27, 329.9, -9.7, 3.76)
pt3dadd(422.41, 329.58, -11.7, 3.76)
pt3dadd(422.41, 329.26, -11.7, 3.76)
pt3dadd(422.55, 328.79, -11.7, 3.76)
pt3dadd(422.69, 328.31, -11.7, 3.76)
pt3dadd(422.82, 328, -11.7, 3.76)
pt3dadd(422.96, 327.52, -11.7, 3.76)
pt3dadd(423.1, 327.05, -11.7, 3.76)
pt3dadd(423.1, 325.94, -11.7, 3.76)
pt3dadd(423.24, 325.62, -11.7, 3.76)
pt3dadd(423.24, 324.99, -11.7, 3.76)
pt3dadd(423.38, 324.67, -11.7, 3.76)
pt3dadd(423.38, 324.04, -11.7, 3.76)
pt3dadd(423.52, 323.72, -11.7, 3.76)
pt3dadd(423.66, 323.56, -11.7, 3.76)
pt3dadd(423.66, 323.09, -11.7, 3.76)
pt3dadd(423.8, 322.77, -11.7, 3.76)
pt3dadd(423.94, 322.3, -11.7, 3.76)
pt3dadd(423.94, 321.82, -11.7, 3.76)
pt3dadd(424.08, 321.51, -11.7, 3.76)
pt3dadd(424.08, 321.03, -11.7, 3.76)
pt3dadd(424.22, 320.72, -11.7, 3.76)
pt3dadd(424.36, 320.4, -11.7, 3.76)
pt3dadd(424.5, 320.08, -11.7, 3.76)
pt3dadd(424.78, 319.29, -11.7, 3.76)
pt3dadd(424.91, 318.97, -11.7, 3.76)
pt3dadd(425.05, 318.66, -11.7, 3.76)
pt3dadd(425.19, 318.34, -11.7, 3.76)
pt3dadd(425.33, 318.18, -11.7, 3.76)
pt3dadd(425.47, 317.87, -11.7, 3.76)
pt3dadd(425.47, 317.55, -11.7, 3.76)
pt3dadd(425.61, 317.23, -11.7, 3.76)
pt3dadd(425.89, 316.92, -11.7, 3.76)
pt3dadd(426.03, 316.6, -11.7, 3.76)
pt3dadd(426.03, 316.28, -11.7, 3.76)
pt3dadd(426.17, 315.97, -11.7, 3.76)
pt3dadd(426.31, 315.65, -11.7, 3.76)
pt3dadd(426.45, 315.33, -11.7, 3.76)
pt3dadd(426.45, 314.54, -11.7, 3.76)
}
dend[123] {pt3dclear()
pt3dadd(308.55, 391.41, -2.7, 0.56)
pt3dadd(302.92, 388.82, 0, 0.56)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
shape3d_36()
shape3d_37()
shape3d_38()
shape3d_39()
shape3d_40()
shape3d_41()
shape3d_42()
shape3d_43()
shape3d_44()
shape3d_45()
shape3d_46()
shape3d_47()
shape3d_48()
shape3d_49()
shape3d_50()
shape3d_51()
shape3d_52()
shape3d_53()
shape3d_54()
shape3d_55()
shape3d_56()
shape3d_57()
shape3d_58()
shape3d_59()
shape3d_60()
shape3d_61()
shape3d_62()
shape3d_63()
shape3d_64()
shape3d_65()
shape3d_66()
shape3d_67()
shape3d_68()
shape3d_69()
shape3d_70()
shape3d_71()
shape3d_72()
shape3d_73()
shape3d_74()
shape3d_75()
shape3d_76()
shape3d_77()
shape3d_78()
shape3d_79()
shape3d_80()
shape3d_81()
shape3d_82()
shape3d_83()
shape3d_84()
shape3d_85()
shape3d_86()
shape3d_87()
shape3d_88()
shape3d_89()
shape3d_90()
shape3d_91()
shape3d_92()
shape3d_93()
shape3d_94()
shape3d_95()
shape3d_96()
shape3d_97()
shape3d_98()
shape3d_99()
shape3d_100()
shape3d_101()
shape3d_102()
shape3d_103()
shape3d_104()
shape3d_105()
shape3d_106()
shape3d_107()
shape3d_108()
shape3d_109()
shape3d_110()
shape3d_111()
shape3d_112()
shape3d_113()
shape3d_114()
shape3d_115()
shape3d_116()
shape3d_117()
shape3d_118()
shape3d_119()
shape3d_120()
shape3d_121()
shape3d_122()
shape3d_123()
shape3d_124()
shape3d_125()
shape3d_126()
shape3d_127()
shape3d_128()
shape3d_129()
shape3d_130()
shape3d_131()
shape3d_132()
shape3d_133()
shape3d_134()
shape3d_135()
shape3d_136()
shape3d_137()
shape3d_138()
shape3d_139()
shape3d_140()
shape3d_141()
shape3d_142()
shape3d_143()
shape3d_144()
shape3d_145()
shape3d_146()
shape3d_147()
shape3d_148()
shape3d_149()
shape3d_150()
shape3d_151()
shape3d_152()
shape3d_153()
shape3d_154()
shape3d_155()
shape3d_156()
shape3d_157()
shape3d_158()
shape3d_159()
shape3d_160()
shape3d_161()
shape3d_162()
shape3d_163()
shape3d_164()
shape3d_165()
shape3d_166()
shape3d_167()
shape3d_168()
shape3d_169()
shape3d_170()
shape3d_171()
shape3d_172()
shape3d_173()
shape3d_174()
shape3d_175()
shape3d_176()
shape3d_177()
shape3d_178()
shape3d_179()
shape3d_180()
shape3d_181()
shape3d_182()
shape3d_183()
shape3d_184()
shape3d_185()
shape3d_186()
shape3d_187()
shape3d_188()
shape3d_189()
shape3d_190()
shape3d_191()
}
objref all, somatic, Dendrites, Axon
proc subsets() { local i
objref all, somatic, Dendrites, Axon
all = new SectionList()
soma all.append()
for i=0, 123 dend[i] all.append()
somatic = new SectionList()
soma somatic.append()
Dendrites = new SectionList()
for i=0, 123 dend[i] Dendrites.append()
Axon = new SectionList()
dend[46] Axon.append()
}
proc geom() {
forsec all { }
}
proc geom_nseg() {
forsec all { nseg = int((L/(0.1*lambda_f(100))+.9)/2)*2 + 1 }
}
proc biophys() {
forsec all {
cm = 0.9
insert pas
insert naf
insert kdr
g_pas = 0.001
e_pas = -70
}
forsec Dendrites {
gnabar_naf = 0.125
gkbar_kdr = 0.036
Ra = 250
}
forsec somatic {
Ra = 250
gnabar_naf = 187.5
gkbar_kdr = 0.018
}
forsec Axon {
Ra = 100
gnabar_naf = 400
gkbar_kdr = 0.036
}
}
access soma
celldef()
celsius = 38
load_file("./frb_session.ses")