A Fast Rhythmic Bursting Cell: in vivo cell modeling (Lee 2007)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:125857
One of the cellular mechanisms underlying the generation of gamma oscillations is a type of cortical pyramidal neuron named fast rhythmic bursting (FRB) cells. After cells from cats' primary visual cortices were filled with Neurobiotin, the brains were cut, and the cells were photographed. One FRB cell was chosen to be confocaled, reconstructed with Neurolucida software, and generated a detailed multi-compartmental model in the NEURON program. We explore firing properties of FRB cells and the role of enhanced Na+ conductance.
Reference:
1 . Lee, J (2007) Fast Rhythmic Bursting Cells: The Horizontal Fiber System in the Cat’s Primary Visual Cortex Penn McNair Research Journal 1(1):1
Model Information (Click on a link to find other models with that property)
Model Type: Neuron or other electrically excitable cell;
Brain Region(s)/Organism: Neocortex;
Cell Type(s):
Channel(s): I Na,p; I Na,t; I K,Ca; I Sodium; I Calcium; I Potassium; I_Na,Ca; I_K,Na;
Gap Junctions:
Receptor(s):
Gene(s):
Transmitter(s): Glutamate;
Simulation Environment: NEURON;
Model Concept(s): Activity Patterns; Bursting; Spatio-temporal Activity Patterns; Action Potentials; Vision;
Implementer(s): Lee, Jin [jin3 at sas.upenn.edu];
Search NeuronDB for information about:  I Na,p; I Na,t; I K,Ca; I Sodium; I Calcium; I Potassium; I_Na,Ca; I_K,Na; Glutamate;
/
FRB
readme.html
cacurrent.mod
cadecay.mod
kaf.mod
kahp.mod
kc.mod
kdr.mod
leak.mod
naf.mod
nap.mod
2FRB.hoc
FRB_12_19.hoc
FRB_12_21.hoc
frb_session.ses
FRB3.hoc
kaf_taum.dat *
kaf_vtau.dat *
mosinit.hoc
nap_tauh.dat *
nap_vtau.dat *
NlData.BK1
NlData.BK2
screenshot.jpg
screenshot2.jpg
variable_dt.ses
                            
proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
}

create soma, dend[126]

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)
  connect dend[19](0), dend[18](1)
  connect dend[20](0), dend[14](1)
  for i = 21, 24 connect dend[i](0), dend[i-1](1)
  connect dend[25](0), dend[23](1)
  for i = 26, 27 connect dend[i](0), dend[25](1)
  connect dend[28](0), dend[22](1)
  connect dend[29](0), dend[21](1)
  for i = 30, 32 connect dend[i](0), dend[29](1)
  connect dend[33](0), soma(0.5)
  for i = 34, 35 connect dend[i](0), dend[i-1](1)
  connect dend[36](0), dend[34](1)
  connect dend[37](0), dend[36](1)
  connect dend[38](0), dend[33](1)
  connect dend[39](0), soma(0.5)
  for i = 40, 41 connect dend[i](0), dend[39](1)
  for i = 42, 43 connect dend[i](0), dend[41](1)
  for i = 44, 45 connect dend[i](0), soma(0.5)
  for i = 46, 47 connect dend[i](0), dend[45](1)
  for i = 48, 49 connect dend[i](0), soma(0.5)
  for i = 50, 63 connect dend[i](0), dend[i-1](1)
  connect dend[64](0), dend[62](1)
  connect dend[65](0), dend[61](1)
  connect dend[66](0), dend[60](1)
  for i = 67, 68 connect dend[i](0), dend[i-1](1)
  connect dend[69](0), dend[67](1)
  connect dend[70](0), dend[66](1)
  connect dend[71](0), dend[59](1)
  for i = 72, 73 connect dend[i](0), dend[71](1)
  for i = 74, 75 connect dend[i](0), dend[73](1)
  connect dend[76](0), dend[58](1)
  connect dend[77](0), dend[57](1)
  connect dend[78](0), dend[56](1)
  connect dend[79](0), dend[55](1)
  connect dend[80](0), dend[54](1)
  connect dend[81](0), dend[53](1)
  for i = 82, 83 connect dend[i](0), dend[i-1](1)
  connect dend[84](0), dend[82](1)
  for i = 85, 86 connect dend[i](0), dend[84](1)
  for i = 87, 88 connect dend[i](0), dend[86](1)
  for i = 89, 90 connect dend[i](0), dend[i-1](1)
  connect dend[91](0), dend[89](1)
  for i = 92, 94 connect dend[i](0), dend[i-1](1)
  connect dend[95](0), dend[93](1)
  connect dend[96](0), dend[92](1)
  connect dend[97](0), dend[91](1)
  connect dend[98](0), dend[88](1)
  for i = 99, 100 connect dend[i](0), dend[i-1](1)
  connect dend[101](0), dend[99](1)
  connect dend[102](0), dend[98](1)
  connect dend[103](0), dend[81](1)
  for i = 104, 106 connect dend[i](0), dend[i-1](1)
  for i = 107, 108 connect dend[i](0), dend[105](1)
  connect dend[109](0), dend[103](1)
  connect dend[110](0), dend[52](1)
  connect dend[111](0), dend[51](1)
  connect dend[112](0), dend[50](1)
  for i = 113, 115 connect dend[i](0), dend[i-1](1)
  connect dend[116](0), dend[114](1)
  for i = 117, 119 connect dend[i](0), dend[116](1)
  connect dend[120](0), dend[113](1)
  connect dend[121](0), dend[112](1)
  connect dend[122](0), dend[49](1)
  connect dend[123](0), dend[24](1)
  connect dend[124](0), dend[51](1)
  connect dend[125](0), dend[124](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(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[21] {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)
	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)
  }
}
proc shape3d_28() {
  dend[21] {	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)
	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)
  }
}
proc shape3d_29() {
  dend[21] {	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[22] {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)
	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)
  }
}
proc shape3d_30() {
  dend[22] {	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)
	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)
  }
}
proc shape3d_31() {
  dend[22] {	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)
	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)
  }
}
proc shape3d_32() {
  dend[22] {	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)
	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)
  }
}
proc shape3d_33() {
  dend[22] {	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[23] {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[24] {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)
	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)
  }
}
proc shape3d_34() {
  dend[24] {	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[25] {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[26] {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[27] {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[28] {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)
	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)
  }
}
proc shape3d_35() {
  dend[28] {	pt3dadd(379.01, 328.09, 0, 3.1)
	pt3dadd(384.27, 337.39, 0, 3.1)
  }
  dend[29] {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)
	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)
  }
}
proc shape3d_36() {
  dend[29] {	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[30] {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[31] {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)
	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)
  }
}
proc shape3d_37() {
  dend[31] {	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)
	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)
  }
}
proc shape3d_38() {
  dend[31] {	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[32] {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[33] {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[34] {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)
	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)
  }
}
proc shape3d_39() {
  dend[34] {	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[35] {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)
	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)
  }
}
proc shape3d_40() {
  dend[35] {	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[36] {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[37] {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)
	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)
  }
}
proc shape3d_41() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_42() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_43() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_44() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_45() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_46() {
  dend[37] {	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)
	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)
  }
}
proc shape3d_47() {
  dend[37] {	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[38] {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)
	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)
  }
}
proc shape3d_48() {
  dend[38] {	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)
	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)
  }
}
proc shape3d_49() {
  dend[38] {	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)
	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)
  }
}
proc shape3d_50() {
  dend[38] {	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)
	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)
  }
}
proc shape3d_51() {
  dend[38] {	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)
	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)
  }
}
proc shape3d_52() {
  dend[38] {	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[39] {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[40] {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)
	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)
  }
}
proc shape3d_53() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_54() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_55() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_56() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_57() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_58() {
  dend[40] {	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)
	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)
  }
}
proc shape3d_59() {
  dend[40] {	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[41] {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)
	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)
  }
}
proc shape3d_60() {
  dend[41] {	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[42] {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)
	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)
  }
}
proc shape3d_61() {
  dend[42] {	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)
	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)
  }
}
proc shape3d_62() {
  dend[42] {	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[43] {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)
	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)
  }
}
proc shape3d_63() {
  dend[43] {	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)
	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)
  }
}
proc shape3d_64() {
  dend[43] {	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)
	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)
  }
}
proc shape3d_65() {
  dend[43] {	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[44] {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)
	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)
  }
}
proc shape3d_66() {
  dend[44] {	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)
	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)
  }
}
proc shape3d_67() {
  dend[44] {	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)
	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)
  }
}
proc shape3d_68() {
  dend[44] {	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)
	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)
  }
}
proc shape3d_69() {
  dend[44] {	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)
	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)
  }
}
proc shape3d_70() {
  dend[44] {	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)
  }
  dend[45] {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[46] {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)
  }
}
proc shape3d_71() {
  dend[46] {	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)
	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)
  }
}
proc shape3d_72() {
  dend[46] {	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[47] {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)
	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)
  }
}
proc shape3d_73() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_74() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_75() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_76() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_77() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_78() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_79() {
  dend[47] {	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)
	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)
  }
}
proc shape3d_80() {
  dend[47] {	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[48] {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)
	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)
  }
}
proc shape3d_81() {
  dend[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)
	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)
  }
}
proc shape3d_82() {
  dend[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[49] {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[50] {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[51] {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[52] {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[53] {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)
	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)
  }
}
proc shape3d_83() {
  dend[53] {	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[54] {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)
	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)
  }
}
proc shape3d_84() {
  dend[54] {	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[55] {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[56] {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[57] {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[58] {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[59] {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[60] {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)
	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)
  }
}
proc shape3d_85() {
  dend[60] {	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)
	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)
  }
}
proc shape3d_86() {
  dend[60] {	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[61] {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[62] {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)
	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)
  }
}
proc shape3d_87() {
  dend[62] {	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[63] {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)
	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)
  }
}
proc shape3d_88() {
  dend[63] {	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)
	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)
  }
}
proc shape3d_89() {
  dend[63] {	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)
	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)
  }
}
proc shape3d_90() {
  dend[63] {	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)
	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)
  }
}
proc shape3d_91() {
  dend[63] {	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)
	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)
  }
}
proc shape3d_92() {
  dend[63] {	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)
	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)
  }
}
proc shape3d_93() {
  dend[63] {	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[64] {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)
	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)
  }
}
proc shape3d_94() {
  dend[64] {	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)
	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)
  }
}
proc shape3d_95() {
  dend[64] {	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)
	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)
  }
}
proc shape3d_96() {
  dend[64] {	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)
	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)
  }
}
proc shape3d_97() {
  dend[64] {	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[65] {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[66] {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[67] {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)
	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)
  }
}
proc shape3d_98() {
  dend[67] {	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)
	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)
  }
}
proc shape3d_99() {
  dend[67] {	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)
	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)
  }
}
proc shape3d_100() {
  dend[67] {	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)
	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)
  }
}
proc shape3d_101() {
  dend[67] {	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)
	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)
  }
}
proc shape3d_102() {
  dend[67] {	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)
	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)
  }
}
proc shape3d_103() {
  dend[67] {	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[68] {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)
	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)
  }
}
proc shape3d_104() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_105() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_106() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_107() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_108() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_109() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_110() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_111() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_112() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_113() {
  dend[68] {	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)
	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)
  }
}
proc shape3d_114() {
  dend[68] {	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[69] {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[70] {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)
	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)
  }
}
proc shape3d_115() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_116() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_117() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_118() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_119() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_120() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_121() {
  dend[70] {	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)
	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)
  }
}
proc shape3d_122() {
  dend[70] {	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[71] {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[72] {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[73] {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)
	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)
  }
}
proc shape3d_123() {
  dend[73] {	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[74] {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[75] {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[76] {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[77] {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[78] {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[79] {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[80] {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)
	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)
  }
}
proc shape3d_124() {
  dend[80] {	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[81] {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)
	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)
  }
}
proc shape3d_125() {
  dend[81] {	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[82] {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[83] {pt3dclear()
	pt3dadd(282.61, 287.04, -5.7, 2.72)
	pt3dadd(312.5, 314.81, 0, 2.72)
  }
  dend[84] {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)
	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)
  }
}
proc shape3d_126() {
  dend[84] {	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[85] {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)
	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)
  }
}
proc shape3d_127() {
  dend[85] {	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, 6