Determinants of the intracellular and extracellular waveforms in DA neurons (Lopez-Jury et al 2018)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:244599
To systematically address the contribution of AIS, dendritic and somatic compartments to shaping the two-component action potentials (APs), we modeled APs of male mouse and rat dopaminergic neurons. A parsimonious two-domain model, with high (AIS) and lower (dendro-somatic) Na+ conductance, reproduced the notch in the temporal derivatives, but not in the extracellular APs, regardless of morphology. The notch was only revealed when somatic active currents were reduced, constraining the model to three domains. Thus, an initial AIS spike is followed by an actively generated spike by the axon-bearing dendrite (ABD), in turn followed mostly passively by the soma. Larger AISs and thinner ABD (but not soma-to-AIS distance) accentuate the AIS component.
Reference:
1 . López-Jury L, Meza RC, Brown MTC, Henny P, Canavier CC (2018) Morphological and Biophysical Determinants of the Intracellular and Extracellular Waveforms in Nigral Dopaminergic Neurons: A Computational Study. J Neurosci 38:8295-8310 [PubMed]
Citations  Citation Browser
Model Information (Click on a link to find other models with that property)
Model Type: Extracellular; Dendrite; Neuron or other electrically excitable cell;
Brain Region(s)/Organism: Basal ganglia;
Cell Type(s): Substantia nigra pars compacta DA cell;
Channel(s): I Calcium; I K,Ca; Na/K pump; I L high threshold; I T low threshold; I A; I N; I Na,t; I K;
Gap Junctions:
Receptor(s):
Gene(s):
Transmitter(s):
Simulation Environment: NEURON;
Model Concept(s): Action Potential Initiation; Pacemaking mechanism; Temporal Pattern Generation; Oscillations; Extracellular Fields;
Implementer(s): Lopez-Jury, Luciana [lucianalopezjury at gmail.com]; Canavier, CC;
Search NeuronDB for information about:  Substantia nigra pars compacta DA cell; I Na,t; I L high threshold; I N; I T low threshold; I A; I K; I K,Ca; I Calcium; Na/K pump;
/
DAnotch_AIS
images
README.html
cabal.mod *
nabalan.mod *
newcachan.mod *
newkca.mod *
newleak.mod
pump.mod *
slowhh3.mod
xtra.mod
anatscale.hoc *
calcrxc.hoc
cellrig.ses
field.hoc *
fixnseg.hoc *
iclampc.ses
initxrec.hoc
interpxyz.hoc *
morph_mouse.hoc
morph_rat.hoc
mosinit.hoc
msgic.hoc
parameters.hoc
rigc.ses
setpointers.hoc *
varstep.ses
vrecc.ses
                            
proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
}

create soma, dend[30], preAIS, ais, axon

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)
  connect dend[19](0), dend[3](1)
  connect dend[4](0), dend(1)
  for i = 5, 6 connect dend[i](0), dend[4](1)
  connect dend[18](0), dend[6](1)
  for i = 7, 8 connect dend[i](0), dend[18](1)
  for i = 9, 10 connect dend[i](0), dend[8](1)
  connect dend[11](0), soma(0.5)
  connect dend[12](0), dend[11](1)
  connect dend[17](0), dend[12](1)
  connect dend[13](0), dend[17](1)
  connect dend[14](0), dend[13](1)
  connect dend[15](0), dend[13](1)
  connect dend[16](0), dend[17](1)
  connect preAIS(0), dend[11](1)
  connect ais(0), preAIS(1)
  connect axon(0), ais(1)
  connect dend[20](0), soma(0.5)
  for i = 21, 22 connect dend[i](0), dend[i-1](1)
  connect dend[23](0), dend[21](1)
  connect dend[24](0), dend[20](1)
  for i = 25, 26 connect dend[i](0), dend[24](1)
  for i = 27, 28 connect dend[i](0), dend[26](1)
  connect dend[29](0), soma(0.5)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(-1040.15, 877.181, 26.09, 4.43206)
	pt3dadd(-1040.43, 876.228, 23.91, 4.99386)
	pt3dadd(-1041.35, 874.94, 21.79, 5.63484)
	pt3dadd(-1040.88, 873.992, 19.57, 6.48027)
	pt3dadd(-1040.88, 872.545, 17.3674, 9.8094)
	pt3dadd(-1040.52, 871.443, 15.217, 12.036)
	pt3dadd(-1039.38, 870.425, 12.99, 11.5741)
	pt3dadd(-1038.74, 870.156, 10.87, 11.835)
	pt3dadd(-1037.86, 868.486, 8.73247, 12.6173)
	pt3dadd(-1036.66, 867.416, 6.52, 11.4627)
	pt3dadd(-1032.5, 864.87, 5.43, 6.3052)
  }
  dend {pt3dclear()
	pt3dstyle(1, -1039.9, 870.89, 14.0078)
	pt3dadd(-1040.1, 878.1, 26.72, 3.83)
	pt3dadd(-1039.96, 878.83, 26.72, 3.46)
	pt3dadd(-1039.47, 880.58, 28.3, 2.92)
	pt3dadd(-1039.18, 882.01, 29.55, 2.92)
	pt3dadd(-1038.67, 883.53, 33.41, 2.73)
	pt3dadd(-1038.98, 884.74, 34.66, 2.92)
  }
  dend[1] {pt3dclear()
	pt3dadd(-1038.98, 884.74, 34.66, 2.19)
	pt3dadd(-1040.98, 885.58, 36.78, 2.19)
	pt3dadd(-1042.61, 886.7, 39.87, 2.01)
	pt3dadd(-1044.02, 887.54, 44.06, 1.64)
	pt3dadd(-1045.06, 888.21, 46.01, 1.46)
	pt3dadd(-1045.06, 888.21, 47.86, 1.46)
	pt3dadd(-1045.31, 887.8, 47.86, 1.28)
	pt3dadd(-1045.34, 888.4, 47.81, 1.28)
	pt3dadd(-1046.73, 888.77, 47.81, 1.28)
	pt3dadd(-1047.76, 889.44, 49.93, 1.09)
	pt3dadd(-1048.71, 889.36, 51.67, 1.28)
	pt3dadd(-1049.55, 890.26, 53.41, 1.09)
	pt3dadd(-1050.31, 889.73, 55.85, 1.09)
	pt3dadd(-1051.08, 889.66, 58.08, 0.91)
	pt3dadd(-1052.25, 889.84, 59.55, 0.73)
	pt3dadd(-1053.48, 890.47, 60.36, 0.73)
	pt3dadd(-1053.34, 891.21, 61.4, 0.55)
	pt3dadd(-1054.51, 890.88, 63.03, 0.73)
	pt3dadd(-1055.88, 891.03, 63.46, 0.91)
	pt3dadd(-1056.85, 890.95, 65.25, 0.91)
	pt3dadd(-1057.67, 891.63, 66.56, 0.91)
	pt3dadd(-1058.47, 892.06, 67.75, 0.91)
	pt3dadd(-1058.86, 892.05, 69.22, 0.91)
	pt3dadd(-1059.4, 891.48, 70.8, 0.91)
	pt3dadd(-1059.34, 890.53, 71.94, 1.09)
	pt3dadd(-1059.69, 890.25, 73.84, 1.09)
	pt3dadd(-1060.22, 889.24, 75.04, 1.09)
	pt3dadd(-1058.88, 889.57, 77.16, 1.09)
	pt3dadd(-1058.69, 889.59, 79.06, 1.09)
	pt3dadd(-1057.95, 890.13, 81.23, 1.09)
	pt3dadd(-1057.69, 889.42, 83.19, 1.09)
	pt3dadd(-1057.86, 888.94, 84.82, 1.09)
	pt3dadd(-1057.64, 888.71, 86.89, 1.09)
	pt3dadd(-1057.64, 888.71, 88.08, 1.09)
	pt3dadd(-1057.55, 887.5, 89.98, 1.09)
	pt3dadd(-1057.3, 886.77, 92.81, 1.09)
	pt3dadd(-1057.01, 885.59, 94.22, 1.09)
	pt3dadd(-1056.82, 885.6, 95.69, 1.09)
	pt3dadd(-1056.33, 885.17, 95.69, 0.73)
	pt3dadd(-1055.16, 884.74, 95.69, 0.73)
	pt3dadd(-1054.93, 884.01, 99.06, 0.91)
	pt3dadd(-1055.49, 883.25, 101.45, 0.91)
	pt3dadd(-1055.72, 883.75, 105.8, 0.91)
	pt3dadd(-1054.36, 883.5, 107.59, 0.91)
	pt3dadd(-1054.12, 882.58, 110.37, 0.91)
  }
  dend[2] {pt3dclear()
	pt3dadd(-1054.12, 882.58, 110.37, 0.73)
	pt3dadd(-1053.19, 884.02, 112.87, 0.73)
	pt3dadd(-1052.42, 885.26, 113.63, 0.55)
	pt3dadd(-1051.66, 886.49, 114.44, 0.55)
	pt3dadd(-1050.74, 887.75, 115.69, 0.36)
	pt3dadd(-1050.76, 888.46, 116.51, 0.36)
	pt3dadd(-1049.01, 889.22, 118.35, 0.36)
	pt3dadd(-1048.84, 889.96, 117.97, 0.55)
	pt3dadd(-1048.47, 890.69, 119.33, 0.55)
	pt3dadd(-1047.69, 891.44, 120.53, 0.55)
  }
  dend[3] {pt3dclear()
	pt3dadd(-1054.12, 882.58, 110.37, 0.91)
	pt3dadd(-1053.72, 882.32, 113.08, 0.91)
	pt3dadd(-1053.34, 882.59, 115.42, 0.91)
	pt3dadd(-1054.51, 881.6, 118.41, 0.91)
	pt3dadd(-1053.71, 881.36, 121.34, 0.91)
	pt3dadd(-1052.94, 881.86, 123.63, 0.91)
	pt3dadd(-1053.14, 881.61, 125.75, 0.91)
	pt3dadd(-1052.17, 881.88, 129.17, 0.91)
	pt3dadd(-1051.56, 881.14, 130.64, 0.73)
	pt3dadd(-1051.16, 880.92, 132.81, 0.73)
	pt3dadd(-1051.94, 880.92, 133.08, 0.73)
	pt3dadd(-1051.76, 881.41, 134.99, 0.73)
	pt3dadd(-1052.71, 881.13, 137.11, 0.73)
	pt3dadd(-1052.53, 880.9, 138.9, 0.73)
	pt3dadd(-1053.1, 880.15, 140.53, 0.73)
	pt3dadd(-1053.69, 880.37, 142.54, 0.73)
	pt3dadd(-1054.27, 880.62, 144.06, 0.73)
	pt3dadd(-1055.23, 880.58, 145.2, 0.91)
	pt3dadd(-1055.02, 879.86, 146.78, 0.91)
	pt3dadd(-1054.9, 879.53, 146.78, 0.91)
	pt3dadd(-1056.07, 880.24, 146.78, 0.73)
	pt3dadd(-1057.04, 880.2, 149.01, 0.73)
	pt3dadd(-1057.44, 879.94, 150.2, 0.73)
	pt3dadd(-1058.39, 879.67, 150.64, 0.91)
	pt3dadd(-1058.78, 879.68, 152.6, 0.73)
	pt3dadd(-1059.37, 879.9, 153.25, 0.73)
	pt3dadd(-1059.2, 880.39, 154.17, 0.73)
	pt3dadd(-1059.41, 880.61, 155.37, 0.73)
	pt3dadd(-1059.41, 880.61, 155.42, 0.73)
	pt3dadd(-1059.98, 880.35, 156.51, 0.73)
	pt3dadd(-1060.74, 879.62, 157.32, 0.73)
	pt3dadd(-1061.7, 879.59, 158.14, 0.91)
	pt3dadd(-1062.48, 879.82, 158.68, 0.91)
	pt3dadd(-1063.48, 880.27, 160.04, 0.91)
	pt3dadd(-1063.9, 880.5, 161.13, 0.91)
	pt3dadd(-1064.46, 880.98, 162.22, 0.91)
	pt3dadd(-1064.89, 881.73, 163.19, 0.91)
	pt3dadd(-1065.46, 881.94, 164.12, 0.91)
	pt3dadd(-1065.86, 882.15, 165.04, 0.91)
	pt3dadd(-1066.62, 882.4, 165.75, 0.91)
	pt3dadd(-1067.25, 882.86, 166.45, 0.73)
	pt3dadd(-1067.62, 883.57, 167.6, 0.73)
	pt3dadd(-1068.06, 884.28, 168.52, 0.73)
	pt3dadd(-1067.67, 885.5, 169.44, 0.73)
	pt3dadd(-1068.68, 885.72, 170.86, 0.73)
	pt3dadd(-1069.06, 885.72, 172.49, 0.73)
	pt3dadd(-1070.25, 886.65, 173.57, 0.73)
	pt3dadd(-1070.25, 886.65, 175.48, 0.73)
	pt3dadd(-1070.45, 886.66, 177.22, 0.73)
	pt3dadd(-1071.04, 887.35, 178.68, 0.73)
	pt3dadd(-1071.24, 886.65, 180.53, 0.73)
	pt3dadd(-1071.42, 886.88, 182, 0.73)
	pt3dadd(-1071.82, 887.32, 183.47, 0.91)
	pt3dadd(-1072.21, 887.33, 184.72, 0.91)
	pt3dadd(-1072.05, 888.56, 186.46, 0.73)
	pt3dadd(-1072.66, 888.78, 187.71, 0.73)
	pt3dadd(-1073.06, 889.26, 188.96, 0.55)
	pt3dadd(-1073.23, 889.74, 190.04, 0.55)
	pt3dadd(-1073.49, 890.46, 191.18, 0.73)
	pt3dadd(-1073.68, 890.7, 192.33, 0.73)
	pt3dadd(-1073.86, 891.17, 193.25, 0.91)
	pt3dadd(-1074.13, 891.55, 193.25, 0.91)
	pt3dadd(-1075.53, 892.19, 193.25, 0.73)
	pt3dadd(-1076.38, 893.12, 196.51, 0.73)
	pt3dadd(-1076.75, 893.33, 198.63, 0.73)
	pt3dadd(-1077.36, 893.54, 200.15, 0.73)
	pt3dadd(-1077.41, 894.5, 201.46, 0.55)
	pt3dadd(-1078.25, 895.7, 202.81, 0.55)
	pt3dadd(-1079.28, 896.58, 204.17, 0.73)
	pt3dadd(-1080.11, 897.52, 206.13, 0.91)
	pt3dadd(-1080.13, 897.76, 208.14, 0.91)
	pt3dadd(-1080.94, 898.19, 210.04, 0.73)
	pt3dadd(-1080.95, 898.43, 212.11, 0.73)
	pt3dadd(-1080.96, 898.69, 213.36, 0.55)
	pt3dadd(-1081.58, 899.14, 214.34, 0.36)
	pt3dadd(-1081.79, 899.37, 215.15, 0.36)
	pt3dadd(-1081.79, 899.37, 215.91, 0.36)
	pt3dadd(-1081.84, 900.36, 216.67, 0.55)
	pt3dadd(-1081.7, 901.58, 218.2, 0.73)
	pt3dadd(-1082.32, 902.02, 219.88, 0.55)
	pt3dadd(-1083.15, 902.94, 221.51, 0.36)
	pt3dadd(-1082.99, 903.44, 223.36, 0.55)
	pt3dadd(-1084.21, 904.34, 224.61, 0.73)
	pt3dadd(-1084.81, 904.55, 225.8, 0.73)
	pt3dadd(-1084.67, 905.54, 229.28, 0.73)
	pt3dadd(-1085.48, 905.75, 230.32, 0.73)
	pt3dadd(-1086, 905.45, 231.29, 0.55)
	pt3dadd(-1086.6, 905.4, 232.65, 0.36)
	pt3dadd(-1087.59, 906.07, 233.69, 0.36)
	pt3dadd(-1088.44, 906.52, 235.42, 0.55)
	pt3dadd(-1089.61, 906.96, 236.46, 0.73)
	pt3dadd(-1090.4, 907.4, 237.6, 0.73)
	pt3dadd(-1090.67, 908.12, 239.12, 0.73)
  }
  dend[19] {pt3dclear()
	pt3dadd(-1091.07, 908.56, 240.59, 0.73)
	pt3dadd(-1092.86, 909.17, 241.84, 0.73)
	pt3dadd(-1093.03, 909.58, 241.84, 0.73)
	pt3dadd(-1093.84, 910.46, 241.84, 0.73)
	pt3dadd(-1094.58, 910.85, 245.26, 0.55)
	pt3dadd(-1094.68, 911.36, 247.54, 0.55)
	pt3dadd(-1095.24, 911.43, 249.28, 0.55)
	pt3dadd(-1096.83, 911.49, 250.43, 0.55)
	pt3dadd(-1097.44, 911.37, 252, 0.55)
	pt3dadd(-1096.57, 911.91, 254.77, 0.73)
	pt3dadd(-1097.84, 912.42, 257.38, 0.55)
	pt3dadd(-1098.52, 913.02, 259.83, 0.55)
	pt3dadd(-1098.15, 912.97, 262.6, 0.55)
	pt3dadd(-1097.17, 914.03, 262.6, 0.55)
	pt3dadd(-1096.44, 913.61, 265.05, 0.73)
	pt3dadd(-1097.08, 913.51, 266.95, 0.73)
	pt3dadd(-1097.56, 912.86, 268.36, 0.55)
	pt3dadd(-1098.66, 912.32, 268.36, 0.55)
	pt3dadd(-1100.05, 912.31, 269.99, 0.55)
	pt3dadd(-1100.45, 912.16, 271.78, 0.55)
	pt3dadd(-1101.51, 911.85, 271.95, 0.55)
	pt3dadd(-1102.25, 911.01, 273.58, 0.55)
	pt3dadd(-1102.76, 910.34, 275.26, 0.55)
	pt3dadd(-1103.5, 910.72, 277, 0.36)
	pt3dadd(-1103.63, 909.98, 277.76, 0.36)
	pt3dadd(-1104.71, 909.45, 278.31, 0.55)
	pt3dadd(-1105.21, 908.83, 279.07, 0.55)
	pt3dadd(-1106.26, 908.51, 280.1, 0.55)
	pt3dadd(-1107.31, 908.22, 280.7, 0.55)
	pt3dadd(-1107.73, 908.04, 281.57, 0.55)
	pt3dadd(-1107.59, 907.75, 282.87, 0.55)
	pt3dadd(-1107.8, 908.78, 284.5, 0.55)
	pt3dadd(-1107.8, 908.78, 284.56, 0.55)
	pt3dadd(-1107.39, 908.93, 286.3, 0.55)
	pt3dadd(-1107, 909.88, 286.35, 0.73)
  }
}
proc shape3d_2() {
  dend[19] {	pt3dadd(-1106.48, 910.53, 287.55, 0.73)
	pt3dadd(-1105.67, 911.86, 289.01, 0.91)
	pt3dadd(-1104, 912.29, 291.13, 0.91)
	pt3dadd(-1104.04, 912.03, 291.13, 0.91)
	pt3dadd(-1103.46, 911.97, 291.13, 0.91)
	pt3dadd(-1102.97, 911.94, 291.13, 0.73)
	pt3dadd(-1102, 912.47, 291.13, 0.73)
	pt3dadd(-1102.22, 913.27, 294.83, 0.55)
	pt3dadd(-1102.04, 913.97, 296.08, 0.55)
	pt3dadd(-1101.87, 914.67, 297.44, 0.55)
	pt3dadd(-1101.31, 915.3, 299.88, 0.55)
	pt3dadd(-1100.94, 915.2, 301.46, 0.55)
	pt3dadd(-1101.34, 913.54, 303.09, 0.36)
	pt3dadd(-1102.63, 912.37, 304.18, 0.36)
	pt3dadd(-1102.61, 911.64, 305.32, 0.55)
	pt3dadd(-1103.61, 910.85, 306.89, 0.36)
	pt3dadd(-1104.35, 910.26, 307.82, 0.36)
	pt3dadd(-1105.68, 909.61, 308.96, 0.36)
	pt3dadd(-1106.17, 908.48, 309.72, 0.18)
	pt3dadd(-1106.78, 907.61, 310.32, 0.18)
	pt3dadd(-1106.8, 905.88, 311.51, 0.36)
	pt3dadd(-1106.88, 906.4, 313.2, 0.36)
	pt3dadd(-1107.26, 906.49, 315.1, 0.18)
	pt3dadd(-1108.24, 905.72, 315.92, 0.18)
	pt3dadd(-1108.98, 904.39, 316.62, 0.36)
	pt3dadd(-1109.38, 903.47, 316.73, 0.36)
	pt3dadd(-1109.49, 903.03, 318.42, 0.55)
	pt3dadd(-1110.11, 903.66, 320.1, 0.55)
	pt3dadd(-1110.11, 903.66, 320.16, 0.55)
	pt3dadd(-1111.22, 903.2, 321.52, 0.55)
	pt3dadd(-1111.22, 903.2, 321.57, 0.55)
	pt3dadd(-1108.99, 902.63, 324.72, 0.55)
	pt3dadd(-1108.78, 902.62, 326.08, 0.55)
	pt3dadd(-1108.75, 901.1, 328.04, 0.55)
	pt3dadd(-1109.18, 900.21, 329.29, 0.55)
	pt3dadd(-1109.57, 899.31, 330.59, 0.55)
	pt3dadd(-1110.58, 899.3, 331.79, 0.36)
	pt3dadd(-1111.52, 899.54, 333.42, 0.36)
	pt3dadd(-1113.02, 899.13, 334.5, 0.36)
	pt3dadd(-1113.6, 899.27, 335.92, 0.55)
	pt3dadd(-1114.84, 899.06, 337.39, 0.55)
	pt3dadd(-1115.78, 899.29, 338.74, 0.55)
	pt3dadd(-1115.71, 898.78, 340.48, 0.55)
	pt3dadd(-1116.31, 899.03, 340.48, 0.73)
	pt3dadd(-1116.83, 898.43, 340.48, 0.73)
	pt3dadd(-1117.68, 897.59, 343.53, 0.55)
	pt3dadd(-1118.54, 896.72, 345.16, 0.55)
	pt3dadd(-1118.25, 896.02, 346.95, 0.55)
	pt3dadd(-1118.22, 895.78, 349.34, 0.55)
	pt3dadd(-1119.08, 894.92, 350.59, 0.36)
	pt3dadd(-1120.21, 895.97, 352.01, 0.36)
	pt3dadd(-1120.4, 895.95, 353.47, 0.36)
	pt3dadd(-1120.98, 895.87, 354.67, 0.36)
	pt3dadd(-1121.51, 895.54, 355.48, 0.36)
	pt3dadd(-1121.56, 894.55, 355.92, 0.36)
	pt3dadd(-1121.87, 894.02, 357.01, 0.36)
	pt3dadd(-1122.48, 894.16, 357.88, 0.36)
	pt3dadd(-1123.01, 895.07, 359.02, 0.36)
	pt3dadd(-1122.58, 896.1, 360.48, 0.18)
	pt3dadd(-1123.23, 896.52, 361.35, 0.18)
	pt3dadd(-1124.2, 896.36, 362.17, 0.18)
	pt3dadd(-1124.68, 897.04, 363.91, 0.36)
	pt3dadd(-1125.87, 897.09, 365, 0.18)
	pt3dadd(-1127.07, 897.18, 366.03, 0.18)
	pt3dadd(-1127.07, 897.18, 366.08, 0.18)
	pt3dadd(-1127.32, 897.61, 367.44, 0.18)
	pt3dadd(-1128.19, 898.22, 367.44, 0.18)
	pt3dadd(-1129.55, 898.04, 368.96, 0.36)
	pt3dadd(-1130.24, 898.67, 371.52, 0.36)
	pt3dadd(-1129.97, 899.43, 373.31, 0.36)
	pt3dadd(-1129.82, 899.95, 374.89, 0.36)
	pt3dadd(-1130.28, 900.38, 376.41, 0.18)
	pt3dadd(-1131.13, 900.74, 377.77, 0.18)
	pt3dadd(-1132.68, 899.27, 378.85, 0.18)
	pt3dadd(-1132.77, 899.75, 380.54, 0.36)
	pt3dadd(-1133.16, 899.7, 382.82, 0.36)
	pt3dadd(-1134.38, 900.01, 384.62, 0.36)
	pt3dadd(-1136.18, 900.22, 387.28, 0.36)
	pt3dadd(-1136.6, 900.4, 389.45, 0.36)
	pt3dadd(-1136.95, 900.11, 390.16, 0.36)
	pt3dadd(-1136.95, 900.11, 390.05, 0.36)
	pt3dadd(-1137.52, 900.4, 390.05, 0.73)
	pt3dadd(-1138.2, 901, 390.05, 0.73)
	pt3dadd(-1138.82, 900.85, 391.63, 0.55)
	pt3dadd(-1139.5, 900.23, 392.44, 0.55)
	pt3dadd(-1139.95, 899.78, 393.26, 0.55)
	pt3dadd(-1140.58, 899.63, 393.85, 0.55)
	pt3dadd(-1140.58, 899.63, 393.91, 0.55)
	pt3dadd(-1141.48, 898.78, 394.78, 0.55)
	pt3dadd(-1141.91, 898.59, 395.87, 0.73)
	pt3dadd(-1142.5, 898.44, 396.84, 0.73)
	pt3dadd(-1143.29, 898.56, 396.84, 0.73)
	pt3dadd(-1143.66, 898.6, 397.5, 0.55)
	pt3dadd(-1143.7, 898.38, 397.5, 0.55)
	pt3dadd(-1144.62, 898.74, 398.86, 0.55)
	pt3dadd(-1145.28, 898.36, 399.72, 0.55)
	pt3dadd(-1144.92, 898.06, 401.14, 0.55)
	pt3dadd(-1145.12, 898.08, 403.42, 0.55)
	pt3dadd(-1145.35, 897.86, 404.29, 0.55)
	pt3dadd(-1145.77, 897.68, 405.21, 0.55)
	pt3dadd(-1146.34, 897.76, 407.23, 0.55)
	pt3dadd(-1146.31, 898.02, 407.23, 0.55)
	pt3dadd(-1146.81, 898.57, 407.23, 0.36)
	pt3dadd(-1147.97, 898.73, 408.91, 0.36)
	pt3dadd(-1148.77, 898.6, 411.52, 0.55)
	pt3dadd(-1149.35, 898.71, 412.93, 0.55)
	pt3dadd(-1150.03, 898.07, 413.86, 0.55)
	pt3dadd(-1150.03, 898.07, 413.91, 0.55)
	pt3dadd(-1150.83, 897.92, 414.67, 0.55)
	pt3dadd(-1151.61, 898.05, 416.25, 0.55)
	pt3dadd(-1151.61, 898.05, 416.3, 0.55)
	pt3dadd(-1153.94, 898.37, 416.57, 0.55)
	pt3dadd(-1154.44, 898.94, 419.4, 0.55)
	pt3dadd(-1155.4, 899.07, 420.81, 0.55)
	pt3dadd(-1156.39, 898.97, 421.25, 0.36)
	pt3dadd(-1157.4, 898.86, 422.93, 0.36)
	pt3dadd(-1157.43, 898.62, 422.93, 0.36)
	pt3dadd(-1158.2, 898.75, 422.93, 0.36)
	pt3dadd(-1159.7, 899.22, 423.96, 0.36)
	pt3dadd(-1160.59, 898.37, 425.21, 0.55)
	pt3dadd(-1161.38, 897.25, 426.57, 0.73)
	pt3dadd(-1161.38, 897.25, 426.52, 0.73)
	pt3dadd(-1162.36, 897.14, 428.48, 0.55)
	pt3dadd(-1162.81, 896.73, 427.77, 0.55)
	pt3dadd(-1164.62, 896.48, 428.26, 0.55)
	pt3dadd(-1166.08, 895.96, 428.96, 0.36)
	pt3dadd(-1166.78, 895.09, 430.7, 0.36)
	pt3dadd(-1167.27, 894.42, 430.7, 0.55)
	pt3dadd(-1167.69, 894.25, 431.03, 0.55)
	pt3dadd(-1168.51, 893.88, 433.37, 0.36)
	pt3dadd(-1168.92, 893.93, 434.45, 0.36)
	pt3dadd(-1169.72, 893.79, 435.43, 0.55)
	pt3dadd(-1170.31, 893.88, 437.39, 0.55)
	pt3dadd(-1170.92, 893.29, 437.39, 0.55)
	pt3dadd(-1171.77, 892.34, 437.39, 0.55)
	pt3dadd(-1172.61, 891.19, 438.2, 0.55)
	pt3dadd(-1173.83, 890.26, 439.45, 0.73)
	pt3dadd(-1174.28, 889.07, 441.19, 0.55)
	pt3dadd(-1174.91, 887.89, 443.48, 0.55)
	pt3dadd(-1174.91, 887.89, 443.53, 0.55)
	pt3dadd(-1175.68, 887.71, 444.67, 0.55)
	pt3dadd(-1175.93, 887.45, 443.37, 0.73)
	pt3dadd(-1177.32, 886.56, 444.51, 0.55)
	pt3dadd(-1177.39, 885.1, 445.11, 0.36)
	pt3dadd(-1178.26, 883.19, 448.37, 0.73)
	pt3dadd(-1179.05, 883.25, 448.37, 0.73)
	pt3dadd(-1179.82, 883.02, 449.29, 0.55)
	pt3dadd(-1180.8, 883.33, 450.27, 0.55)
	pt3dadd(-1180.64, 882.82, 451.03, 0.55)
	pt3dadd(-1181.6, 882.63, 452.01, 0.36)
	pt3dadd(-1182.6, 881.94, 452.82, 0.55)
	pt3dadd(-1183.39, 882.24, 454.07, 0.55)
	pt3dadd(-1184.35, 882.28, 454.56, 0.36)
	pt3dadd(-1184.57, 881.81, 455.49, 0.36)
	pt3dadd(-1185.32, 881.84, 456.03, 0.36)
	pt3dadd(-1185.92, 882.36, 456.9, 0.36)
	pt3dadd(-1186.9, 881.67, 458.37, 0.36)
	pt3dadd(-1187.08, 880.59, 458.53, 0.55)
	pt3dadd(-1187.53, 879.63, 459.13, 0.55)
	pt3dadd(-1188.51, 879.44, 460.54, 0.36)
	pt3dadd(-1188.66, 880.16, 461.52, 0.36)
	pt3dadd(-1189.28, 879.48, 462.93, 0.36)
	pt3dadd(-1189.87, 879.99, 464.35, 0.36)
	pt3dadd(-1190.43, 880.03, 466.03, 0.36)
	pt3dadd(-1191.24, 879.58, 467.5, 0.36)
	pt3dadd(-1192.21, 879.63, 468.1, 0.55)
	pt3dadd(-1192.64, 878.66, 468.91, 0.55)
	pt3dadd(-1193.24, 878.72, 469.94, 0.55)
	pt3dadd(-1194.36, 879, 471.96, 0.55)
	pt3dadd(-1195.34, 879.3, 473.31, 0.55)
	pt3dadd(-1195.87, 880.05, 474.84, 0.36)
	pt3dadd(-1196.43, 880.82, 475.98, 0.36)
	pt3dadd(-1196.76, 881.8, 476.85, 0.36)
	pt3dadd(-1197.74, 882.09, 477.72, 0.55)
	pt3dadd(-1198.26, 883.07, 479.18, 0.55)
	pt3dadd(-1198.81, 883.84, 480.16, 0.36)
	pt3dadd(-1200.12, 884.89, 481.09, 0.18)
	pt3dadd(-1200.68, 885.4, 482.23, 0.18)
	pt3dadd(-1201.25, 885.66, 484.62, 0.18)
	pt3dadd(-1201.41, 886.16, 482.88, 0.36)
	pt3dadd(-1201.21, 886.4, 483.97, 0.36)
	pt3dadd(-1201.71, 886.71, 483.97, 0.36)
	pt3dadd(-1202.52, 886.26, 483.97, 0.36)
	pt3dadd(-1203.33, 885.57, 486.36, 0.55)
	pt3dadd(-1203.86, 886.57, 488.59, 0.55)
	pt3dadd(-1203.86, 886.57, 488.53, 0.55)
	pt3dadd(-1205.03, 886.38, 490.87, 0.36)
	pt3dadd(-1205.87, 885.44, 492.39, 0.55)
	pt3dadd(-1206.46, 884.74, 493.15, 0.36)
	pt3dadd(-1207.31, 883.31, 494.35, 0.36)
	pt3dadd(-1207.71, 883.34, 495.98, 0.36)
	pt3dadd(-1207.88, 883.58, 497.88, 0.55)
	pt3dadd(-1207.91, 882.85, 500.33, 0.55)
	pt3dadd(-1206.58, 882.3, 502.01, 0.55)
	pt3dadd(-1205.99, 882.51, 503.7, 0.36)
	pt3dadd(-1206.01, 882.02, 506.03, 0.36)
	pt3dadd(-1205.25, 881.77, 507.72, 0.36)
	pt3dadd(-1203.94, 880.49, 509.57, 0.36)
	pt3dadd(-1203.18, 879.98, 510.76, 0.36)
	pt3dadd(-1201.78, 880.65, 512.77, 0.55)
  }
}
proc shape3d_3() {
  dend[19] {	pt3dadd(-1200.43, 880.59, 514.13, 0.55)
	pt3dadd(-1200.78, 881.33, 515.54, 0.55)
	pt3dadd(-1200.59, 881.57, 517.99, 0.55)
	pt3dadd(-1200.36, 882.05, 521.41, 0.55)
	pt3dadd(-1200.52, 883.26, 523.1, 0.36)
	pt3dadd(-1200.1, 883.74, 524.62, 0.36)
	pt3dadd(-1199.87, 884.45, 524.62, 0.36)
	pt3dadd(-1199.09, 884.19, 525, 0.55)
	pt3dadd(-1197.71, 884.6, 527.23, 0.55)
	pt3dadd(-1196.92, 885.05, 527.88, 0.55)
	pt3dadd(-1196.47, 886.48, 527.88, 0.55)
  }
  dend[4] {pt3dclear()
	pt3dadd(-1038.98, 884.74, 34.66, 2.55)
	pt3dadd(-1038.47, 885.97, 36.5, 2.55)
	pt3dadd(-1038.88, 886.91, 37.7, 2.19)
	pt3dadd(-1038.64, 888.9, 39.6, 2.01)
	pt3dadd(-1037.8, 890.87, 41.07, 2.01)
	pt3dadd(-1037.37, 893.09, 43.19, 2.01)
	pt3dadd(-1037.47, 894.29, 45.09, 2.01)
	pt3dadd(-1036.75, 895.56, 47.54, 1.64)
	pt3dadd(-1036.72, 896.25, 47.54, 1.64)
	pt3dadd(-1036.63, 897.95, 47.54, 1.64)
	pt3dadd(-1036.22, 900.15, 49.33, 1.82)
	pt3dadd(-1036.14, 901.87, 51.4, 1.46)
	pt3dadd(-1035.64, 902.89, 53.35, 1.46)
	pt3dadd(-1035.64, 902.89, 53.3, 1.46)
	pt3dadd(-1035.13, 904.12, 55.04, 1.46)
	pt3dadd(-1034.63, 905.16, 56.83, 1.46)
	pt3dadd(-1034.31, 905.9, 58.41, 1.46)
	pt3dadd(-1034.73, 906.61, 61.89, 1.46)
	pt3dadd(-1034.25, 908.08, 63.84, 1.46)
	pt3dadd(-1034.18, 909.57, 65.8, 1.46)
	pt3dadd(-1034.26, 910.75, 66.4, 1.46)
	pt3dadd(-1033.78, 912.03, 66.4, 1.46)
	pt3dadd(-1033.87, 913.26, 66.94, 1.46)
	pt3dadd(-1033.57, 914.49, 67.81, 1.46)
	pt3dadd(-1034, 915.42, 68.79, 1.28)
	pt3dadd(-1033.51, 916.41, 69.66, 1.28)
	pt3dadd(-1033.94, 917.14, 70.96, 1.28)
	pt3dadd(-1033.88, 917.29, 70.96, 1.28)
  }
  dend[5] {pt3dclear()
	pt3dadd(-1033.88, 917.29, 70.96, 1.09)
	pt3dadd(-1033.45, 918.14, 72.59, 1.09)
	pt3dadd(-1033.35, 919.58, 73.68, 1.09)
	pt3dadd(-1032.65, 920.63, 75.47, 1.09)
	pt3dadd(-1031.74, 921.67, 76.29, 0.91)
	pt3dadd(-1030.9, 923.2, 77.48, 0.91)
	pt3dadd(-1030.35, 923.98, 77.48, 0.91)
	pt3dadd(-1030.35, 923.98, 77.54, 0.91)
	pt3dadd(-1029.66, 924.74, 78.24, 0.73)
	pt3dadd(-1029.52, 925.23, 78.3, 0.73)
	pt3dadd(-1029.57, 925.95, 79.71, 0.73)
	pt3dadd(-1030.05, 927.63, 80.36, 0.91)
	pt3dadd(-1029.16, 928.91, 81.72, 0.91)
	pt3dadd(-1028.12, 930.46, 83.3, 1.09)
	pt3dadd(-1028.13, 932.05, 84.6, 1.09)
	pt3dadd(-1027.3, 933.8, 85.36, 1.09)
	pt3dadd(-1027.04, 935.53, 85.96, 1.09)
	pt3dadd(-1026.91, 936.73, 86.61, 1.09)
	pt3dadd(-1027.02, 937.97, 88.73, 1.09)
	pt3dadd(-1026.58, 939.96, 89.49, 1.09)
	pt3dadd(-1025.64, 940.74, 91.61, 0.73)
	pt3dadd(-1025.33, 941.73, 91.78, 0.73)
	pt3dadd(-1024.87, 943.24, 93.3, 0.73)
	pt3dadd(-1024.79, 944.69, 93.84, 0.73)
	pt3dadd(-1024.31, 945.94, 94.17, 0.73)
	pt3dadd(-1023.97, 946.94, 95.42, 0.91)
	pt3dadd(-1023.48, 948.19, 95.91, 0.91)
	pt3dadd(-1023.77, 949.4, 95.96, 0.91)
	pt3dadd(-1023.88, 950.84, 95.96, 0.91)
	pt3dadd(-1023.58, 952.09, 96.83, 0.73)
	pt3dadd(-1022.31, 953.15, 98.14, 0.73)
	pt3dadd(-1021.07, 954.95, 99.33, 0.73)
	pt3dadd(-1020.89, 955.44, 99.5, 0.73)
	pt3dadd(-1020.76, 956.2, 99.5, 0.73)
	pt3dadd(-1020.37, 958.64, 99.17, 0.91)
	pt3dadd(-1020.48, 960.35, 100.58, 0.91)
	pt3dadd(-1020.39, 960.62, 100.58, 0.91)
	pt3dadd(-1019.84, 961.86, 100.58, 0.91)
	pt3dadd(-1019.51, 964.05, 102.48, 0.73)
	pt3dadd(-1018.17, 965.77, 103.95, 0.73)
	pt3dadd(-1016.86, 967.52, 104.12, 0.91)
	pt3dadd(-1015.73, 969.74, 106.07, 0.73)
	pt3dadd(-1015.21, 971.21, 106.02, 0.91)
	pt3dadd(-1015.24, 973.37, 105.96, 0.73)
	pt3dadd(-1014.88, 974.34, 105.96, 0.73)
	pt3dadd(-1013.53, 975.83, 106.56, 0.55)
	pt3dadd(-1011.85, 978.04, 106.56, 0.73)
	pt3dadd(-1010.52, 979.54, 106.89, 0.73)
	pt3dadd(-1010, 981.5, 106.89, 0.73)
	pt3dadd(-1009.03, 982.5, 109.17, 0.73)
	pt3dadd(-1008.28, 984.44, 109.88, 0.73)
	pt3dadd(-1007.56, 985.91, 109.66, 1.09)
	pt3dadd(-1007, 988.36, 109.66, 1.09)
	pt3dadd(-1005.9, 990.85, 109.66, 0.91)
	pt3dadd(-1005.56, 992.03, 111.56, 0.91)
	pt3dadd(-1005.22, 994.23, 112.48, 0.91)
	pt3dadd(-1004.11, 996.41, 113.46, 0.73)
	pt3dadd(-1003.16, 998.4, 115.31, 0.73)
	pt3dadd(-1002.44, 1000.84, 116.07, 0.73)
	pt3dadd(-1002.06, 1003.2, 116.29, 0.91)
	pt3dadd(-1002.13, 1005.87, 117.16, 0.91)
	pt3dadd(-1003.16, 1008.26, 117.16, 0.73)
	pt3dadd(-1003.01, 1010.21, 118.25, 0.73)
	pt3dadd(-1002.48, 1013.37, 118.3, 0.91)
	pt3dadd(-1001.41, 1016.31, 119.22, 0.91)
	pt3dadd(-999.92, 1019.75, 119.22, 0.91)
	pt3dadd(-998.05, 1022.7, 119.33, 0.91)
	pt3dadd(-996.56, 1026.62, 120.42, 0.91)
	pt3dadd(-996.56, 1026.62, 120.37, 0.91)
	pt3dadd(-996.2, 1028.31, 120.09, 0.73)
	pt3dadd(-995.87, 1030.02, 120.31, 0.73)
	pt3dadd(-994.71, 1031.02, 120.04, 0.55)
	pt3dadd(-993.97, 1032.49, 120.91, 0.73)
	pt3dadd(-992.84, 1034.23, 120.09, 0.55)
	pt3dadd(-991.93, 1035.7, 119.82, 0.55)
	pt3dadd(-989.58, 1036.26, 117.97, 0.73)
	pt3dadd(-989.27, 1037.94, 118.68, 0.73)
	pt3dadd(-986.56, 1039.44, 117.81, 0.91)
	pt3dadd(-984.88, 1039.91, 118.46, 1.09)
	pt3dadd(-983.93, 1040.93, 117.87, 0.91)
	pt3dadd(-982.42, 1041.93, 116.89, 0.73)
	pt3dadd(-981.3, 1043.66, 115.75, 0.73)
	pt3dadd(-980.55, 1045.6, 114.88, 0.55)
	pt3dadd(-979.83, 1047.33, 114.71, 0.55)
	pt3dadd(-979.48, 1050.01, 114.28, 0.36)
	pt3dadd(-977.78, 1051.5, 115.42, 0.36)
	pt3dadd(-977.22, 1052.7, 115.2, 0.55)
	pt3dadd(-977.08, 1054.68, 114.82, 0.73)
	pt3dadd(-977.06, 1054.9, 114.82, 0.73)
	pt3dadd(-977.11, 1056.62, 115.64, 0.55)
	pt3dadd(-977.15, 1058.55, 115.15, 0.55)
	pt3dadd(-976.79, 1059.29, 115.53, 0.55)
	pt3dadd(-976.41, 1060.27, 115.96, 0.55)
	pt3dadd(-976.26, 1062.2, 115.85, 0.55)
	pt3dadd(-976.29, 1063.9, 116.07, 0.55)
	pt3dadd(-975.56, 1065.63, 116.34, 0.36)
	pt3dadd(-975.57, 1066.12, 116.67, 0.36)
	pt3dadd(-975.81, 1068.04, 116.67, 0.36)
	pt3dadd(-975.84, 1068.77, 116.67, 0.55)
	pt3dadd(-975.48, 1070.46, 116.67, 0.55)
	pt3dadd(-974.94, 1071.94, 117.54, 0.73)
	pt3dadd(-973.8, 1074.15, 118.08, 0.55)
	pt3dadd(-972.11, 1076.36, 117.81, 0.73)
	pt3dadd(-971.34, 1077.6, 117.65, 0.55)
	pt3dadd(-970.18, 1079.61, 116.78, 0.73)
	pt3dadd(-971.18, 1082.02, 117.16, 0.73)
	pt3dadd(-971.64, 1084.21, 115.96, 0.55)
	pt3dadd(-970.87, 1085.17, 114.12, 0.55)
	pt3dadd(-970.72, 1086.62, 113.68, 0.73)
	pt3dadd(-970.18, 1089.07, 113.46, 0.73)
	pt3dadd(-970.05, 1091.52, 110.91, 0.73)
	pt3dadd(-967.17, 1093.52, 110.42, 0.55)
	pt3dadd(-965.7, 1096.69, 109.77, 0.55)
	pt3dadd(-964, 1099.4, 109.6, 0.73)
	pt3dadd(-963.47, 1101.61, 109.17, 0.73)
	pt3dadd(-962.54, 1103.31, 108.9, 0.73)
	pt3dadd(-961.22, 1104.33, 108.41, 0.55)
	pt3dadd(-960.63, 1104.83, 107.76, 0.55)
	pt3dadd(-959.69, 1106.05, 107.76, 0.55)
	pt3dadd(-958.38, 1108.02, 105.8, 0.55)
	pt3dadd(-957.4, 1109.03, 104.17, 0.73)
	pt3dadd(-956.29, 1110.01, 102.43, 0.55)
	pt3dadd(-956.12, 1112.2, 102.43, 0.73)
	pt3dadd(-954.21, 1113.22, 101.72, 0.91)
	pt3dadd(-952.48, 1113.97, 101.23, 0.73)
	pt3dadd(-950.93, 1114.74, 101.23, 0.55)
	pt3dadd(-948.64, 1117.01, 101.13, 0.55)
	pt3dadd(-948.64, 1117.01, 101.07, 0.55)
	pt3dadd(-947.67, 1118.66, 101.23, 0.73)
	pt3dadd(-946.76, 1120.36, 100.85, 0.73)
	pt3dadd(-945.05, 1122.84, 102.05, 0.55)
	pt3dadd(-943.14, 1124.32, 102.38, 0.73)
	pt3dadd(-941.22, 1125.57, 103.41, 0.91)
	pt3dadd(-940.66, 1127.31, 104.22, 0.73)
	pt3dadd(-940.12, 1129.72, 105.04, 0.55)
	pt3dadd(-939.4, 1131.21, 106.23, 0.36)
	pt3dadd(-938.27, 1132.96, 106.4, 0.36)
	pt3dadd(-935.77, 1133.95, 107.92, 0.36)
	pt3dadd(-934.99, 1134.49, 108.25, 0.55)
	pt3dadd(-934.24, 1135.45, 107.65, 0.55)
	pt3dadd(-930.91, 1135.3, 108.84, 0.55)
	pt3dadd(-928.24, 1136.33, 109.33, 0.55)
	pt3dadd(-927.49, 1137.08, 109.44, 0.55)
	pt3dadd(-925.56, 1138.32, 111.13, 0.55)
	pt3dadd(-923.45, 1139.61, 111.34, 0.36)
	pt3dadd(-921.7, 1140.33, 112, 0.36)
	pt3dadd(-920.76, 1140.85, 112, 0.36)
	pt3dadd(-919.42, 1142.83, 112, 0.55)
	pt3dadd(-918.45, 1143.33, 112, 0.55)
	pt3dadd(-916.7, 1144.1, 112, 0.55)
	pt3dadd(-915.39, 1145.35, 108.95, 0.36)
	pt3dadd(-914.25, 1146.33, 108.41, 0.36)
	pt3dadd(-914.25, 1146.33, 108.46, 0.36)
	pt3dadd(-912.89, 1146.37, 108.46, 0.36)
	pt3dadd(-910.94, 1146.43, 108.14, 0.55)
	pt3dadd(-909.22, 1147.18, 106.56, 0.55)
	pt3dadd(-907.07, 1147.47, 104.88, 0.36)
	pt3dadd(-904.73, 1148.02, 103.25, 0.36)
	pt3dadd(-900.71, 1149.31, 101.67, 0.36)
	pt3dadd(-898.98, 1150.58, 101.07, 0.55)
	pt3dadd(-896.66, 1152.33, 100.42, 0.73)
  }
}
proc shape3d_4() {
  dend[5] {	pt3dadd(-894.36, 1153.22, 95.15, 0.73)
	pt3dadd(-893.03, 1154.22, 94.82, 0.73)
	pt3dadd(-892.45, 1154.71, 93.73, 0.55)
	pt3dadd(-891.32, 1155.71, 93.46, 0.55)
	pt3dadd(-890.33, 1156.04, 93.46, 0.73)
	pt3dadd(-889.96, 1156.29, 93.46, 0.73)
	pt3dadd(-888.67, 1157.37, 92.27, 0.36)
	pt3dadd(-887.31, 1157.69, 92, 0.55)
	pt3dadd(-886.6, 1158.94, 91.02, 0.36)
	pt3dadd(-885.87, 1159.72, 90.8, 0.36)
	pt3dadd(-885.14, 1160.49, 90.42, 0.36)
	pt3dadd(-884.81, 1161.25, 90.42, 0.36)
	pt3dadd(-884.41, 1161.52, 90.31, 0.55)
	pt3dadd(-884.09, 1162.26, 89.33, 0.36)
	pt3dadd(-882.43, 1164.07, 89.33, 0.36)
	pt3dadd(-881.88, 1164.56, 87.54, 0.55)
	pt3dadd(-881.33, 1165.35, 87.92, 0.73)
	pt3dadd(-880.39, 1165.88, 87.92, 0.73)
	pt3dadd(-879.29, 1166.92, 85.04, 0.55)
	pt3dadd(-878.94, 1167.2, 85.04, 0.55)
	pt3dadd(-878.19, 1167.96, 84.39, 0.36)
	pt3dadd(-877.44, 1168.27, 83.52, 0.36)
	pt3dadd(-876.87, 1168.75, 83.24, 0.36)
	pt3dadd(-877.07, 1169.24, 82.7, 0.55)
	pt3dadd(-876.95, 1169.96, 82.7, 0.55)
	pt3dadd(-875.87, 1171.25, 81.94, 0.36)
	pt3dadd(-874.9, 1171.8, 82.16, 0.36)
	pt3dadd(-874.57, 1172.53, 82.05, 0.55)
	pt3dadd(-872.85, 1173.39, 82.81, 0.55)
	pt3dadd(-872.16, 1174.15, 83.35, 0.55)
	pt3dadd(-871.64, 1175.65, 83.14, 0.55)
	pt3dadd(-870.05, 1175.49, 84.01, 0.36)
	pt3dadd(-869.55, 1176.73, 84.01, 0.36)
	pt3dadd(-869.4, 1177.23, 84.28, 0.36)
	pt3dadd(-867.42, 1176.85, 84.66, 0.55)
	pt3dadd(-866.27, 1177.18, 84.88, 0.55)
	pt3dadd(-864.37, 1177.79, 84.49, 0.55)
	pt3dadd(-863.03, 1178.11, 83.24, 0.36)
	pt3dadd(-862.06, 1178.41, 81.89, 0.36)
	pt3dadd(-861.47, 1178.21, 81.89, 0.55)
	pt3dadd(-861.13, 1178.95, 80.58, 0.55)
	pt3dadd(-859.39, 1179.55, 80.2, 0.36)
	pt3dadd(-858.48, 1180.32, 78.35, 0.36)
	pt3dadd(-857.7, 1180.37, 76.99, 0.36)
	pt3dadd(-856.98, 1181.14, 76.18, 0.36)
	pt3dadd(-856.24, 1181.68, 74.6, 0.36)
	pt3dadd(-855.87, 1182.41, 72.97, 0.55)
	pt3dadd(-856.03, 1184.84, 70.31, 0.73)
	pt3dadd(-855.9, 1186.31, 71.89, 0.73)
	pt3dadd(-855.83, 1187.78, 72.32, 0.73)
	pt3dadd(-855.69, 1189.01, 72.27, 0.55)
	pt3dadd(-855.7, 1189.25, 72.27, 0.55)
	pt3dadd(-855.39, 1190.7, 72.37, 0.36)
	pt3dadd(-855.08, 1191.97, 71.67, 0.36)
	pt3dadd(-855.56, 1193.37, 71.67, 0.36)
	pt3dadd(-855.86, 1195.32, 72.81, 0.36)
	pt3dadd(-855.57, 1196.53, 73.14, 0.55)
	pt3dadd(-855.82, 1197.73, 73.46, 0.55)
	pt3dadd(-856.31, 1199.18, 74.71, 0.36)
	pt3dadd(-855.81, 1201.19, 74.55, 0.36)
	pt3dadd(-855.69, 1202.64, 75.36, 0.36)
	pt3dadd(-856.13, 1203.59, 76.78, 0.18)
	pt3dadd(-855.63, 1204.82, 77.86, 0.36)
	pt3dadd(-856.34, 1206.74, 78.35, 0.18)
	pt3dadd(-856.59, 1207.94, 78.84, 0.18)
	pt3dadd(-855.26, 1208.5, 80.31, 0.18)
	pt3dadd(-855.17, 1209.97, 81.61, 0.18)
	pt3dadd(-854.81, 1210.73, 81.61, 0.18)
	pt3dadd(-854.6, 1210.73, 82.7, 0.18)
	pt3dadd(-854.06, 1211, 82.7, 0.18)
	pt3dadd(-853.7, 1211.52, 82.7, 0.18)
	pt3dadd(-852.81, 1213.03, 84.17, 0.18)
	pt3dadd(-850.88, 1213.14, 84.6, 0.18)
	pt3dadd(-848.75, 1213.75, 84.82, 0.18)
	pt3dadd(-848.75, 1213.75, 84.88, 0.18)
	pt3dadd(-847.85, 1214.53, 84.82, 0.18)
	pt3dadd(-846.87, 1214.6, 84.93, 0.18)
	pt3dadd(-845.48, 1214.22, 84.11, 0.18)
	pt3dadd(-845.11, 1214.46, 84.11, 0.18)
	pt3dadd(-843.22, 1215.56, 81.67, 0.36)
	pt3dadd(-842.27, 1215.84, 80.26, 0.18)
	pt3dadd(-840.42, 1217.66, 80.26, 0.18)
	pt3dadd(-840.09, 1218.65, 78.79, 0.36)
	pt3dadd(-839.63, 1220.62, 79.11, 0.18)
	pt3dadd(-839.95, 1222.81, 78.95, 0.18)
	pt3dadd(-840.48, 1224.69, 79.39, 0.18)
	pt3dadd(-840.34, 1225.7, 79.44, 0.18)
	pt3dadd(-839.46, 1227.66, 80.36, 0.18)
	pt3dadd(-838.33, 1227.99, 81.02, 0.18)
	pt3dadd(-836.79, 1228.58, 82.32, 0.18)
	pt3dadd(-836.89, 1230.03, 82.86, 0.18)
	pt3dadd(-836.95, 1231.25, 82.86, 0.18)
	pt3dadd(-837.79, 1232.17, 84.49, 0.18)
	pt3dadd(-838.1, 1233.84, 84.33, 0.18)
	pt3dadd(-838.37, 1235.04, 84.28, 0.18)
	pt3dadd(-838.42, 1236, 85.36, 0.18)
  }
  dend[6] {pt3dclear()
	pt3dadd(-1033.88, 917.29, 70.96, 0.91)
	pt3dadd(-1034.48, 917.68, 73.24, 0.91)
	pt3dadd(-1034.73, 918.41, 73.24, 0.91)
	pt3dadd(-1035.15, 918.89, 74.39, 0.91)
	pt3dadd(-1034.44, 919.67, 77.48, 0.91)
	pt3dadd(-1035.04, 920.09, 78.84, 0.91)
	pt3dadd(-1035.46, 920.32, 80.53, 0.91)
	pt3dadd(-1036.36, 919.29, 82.1, 1.09)
	pt3dadd(-1037.16, 919.21, 84.01, 0.91)
	pt3dadd(-1037.17, 919.7, 85.91, 0.91)
	pt3dadd(-1036.78, 919.76, 88.24, 0.91)
	pt3dadd(-1036.71, 918.52, 90.04, 0.91)
	pt3dadd(-1037.26, 918.46, 90.04, 0.91)
	pt3dadd(-1036.52, 918.55, 92.21, 0.91)
	pt3dadd(-1036.59, 917.32, 94.06, 0.91)
	pt3dadd(-1036.4, 916.86, 95.58, 0.91)
	pt3dadd(-1037.01, 917.54, 97.76, 1.09)
	pt3dadd(-1037.98, 917.7, 98.9, 1.09)
	pt3dadd(-1038.05, 917.7, 98.9, 1.09)
	pt3dadd(-1038.03, 917.46, 98.9, 1.09)
	pt3dadd(-1037.66, 917.47, 100.8, 1.09)
	pt3dadd(-1037.47, 917.69, 102.05, 1.09)
	pt3dadd(-1037.84, 917.69, 103.46, 1.09)
	pt3dadd(-1038.65, 918.17, 105.53, 0.73)
	pt3dadd(-1039.02, 917.68, 107.21, 0.73)
	pt3dadd(-1039.19, 917.42, 108.57, 0.73)
	pt3dadd(-1040.37, 916.9, 109.55, 0.91)
	pt3dadd(-1041.14, 916.66, 110.26, 0.73)
	pt3dadd(-1041.9, 915.66, 111.07, 0.55)
	pt3dadd(-1041.87, 914.44, 112.1, 0.73)
	pt3dadd(-1042.42, 913.48, 112.76, 0.73)
	pt3dadd(-1041.82, 912.98, 113.3, 0.73)
	pt3dadd(-1041.83, 912.25, 114.22, 0.73)
	pt3dadd(-1042.76, 911.28, 115.2, 0.73)
	pt3dadd(-1043.34, 910.56, 118.46, 1.09)
	pt3dadd(-1042.75, 910.32, 119.6, 1.09)
	pt3dadd(-1042.16, 909.84, 121.13, 0.91)
	pt3dadd(-1041.78, 909.83, 123.25, 0.91)
	pt3dadd(-1041.19, 910.09, 125.31, 0.91)
	pt3dadd(-1040.98, 909.87, 127.54, 0.91)
	pt3dadd(-1041.21, 909.86, 129.61, 0.91)
	pt3dadd(-1041.56, 910.34, 131.67, 0.91)
	pt3dadd(-1040.79, 910.84, 133.36, 0.91)
	pt3dadd(-1041.21, 911.31, 135.2, 0.91)
	pt3dadd(-1041.22, 912.05, 136.73, 0.91)
	pt3dadd(-1040.28, 912.31, 138.68, 0.73)
	pt3dadd(-1039.68, 912.79, 140.15, 0.55)
	pt3dadd(-1039.1, 913.28, 141.89, 0.55)
	pt3dadd(-1038.74, 913.05, 143.3, 0.55)
	pt3dadd(-1038.94, 913.78, 144.66, 0.55)
	pt3dadd(-1038.75, 914.28, 145.69, 0.73)
	pt3dadd(-1037.99, 914.77, 146.89, 0.91)
	pt3dadd(-1037.2, 914.32, 148.25, 0.91)
	pt3dadd(-1036.94, 914.15, 148.25, 0.73)
	pt3dadd(-1036.17, 914.16, 148.25, 0.73)
	pt3dadd(-1035.19, 914.18, 149.88, 0.91)
	pt3dadd(-1035.38, 914.67, 152.27, 0.73)
	pt3dadd(-1035.76, 914.66, 153.85, 0.73)
	pt3dadd(-1035.37, 913.21, 155.04, 0.73)
	pt3dadd(-1035.16, 913.44, 156.83, 0.73)
	pt3dadd(-1034.76, 912.47, 158.52, 0.73)
	pt3dadd(-1033.96, 911.27, 160.64, 0.55)
	pt3dadd(-1033.37, 911.05, 162.16, 0.73)
	pt3dadd(-1031.81, 911.08, 163.9, 0.73)
	pt3dadd(-1030.65, 911.1, 164.33, 0.55)
	pt3dadd(-1029.64, 909.9, 165.53, 0.73)
	pt3dadd(-1029.3, 910.16, 167.16, 0.73)
	pt3dadd(-1029.11, 911.11, 168.47, 0.73)
	pt3dadd(-1028.14, 911.62, 170.75, 0.73)
	pt3dadd(-1026.81, 911.66, 172.76, 0.73)
	pt3dadd(-1026.36, 910.68, 174.06, 0.73)
	pt3dadd(-1025.79, 909.96, 176.18, 0.73)
	pt3dadd(-1026.35, 909.22, 178.09, 0.73)
	pt3dadd(-1027.33, 909.69, 180.15, 0.73)
	pt3dadd(-1026.14, 910.19, 182.98, 0.73)
	pt3dadd(-1025.98, 910.92, 184.39, 0.73)
	pt3dadd(-1025.19, 909.96, 186.24, 0.73)
	pt3dadd(-1025.79, 909.96, 188.19, 0.73)
	pt3dadd(-1025.77, 909.46, 190.04, 0.73)
	pt3dadd(-1025.96, 909.23, 190.86, 0.73)
	pt3dadd(-1025.56, 908.78, 192.11, 0.73)
	pt3dadd(-1026.16, 908.51, 193.3, 0.73)
	pt3dadd(-1025.74, 907.29, 194.72, 0.73)
	pt3dadd(-1025.59, 907.11, 194.72, 0.91)
	pt3dadd(-1024.98, 906.68, 194.72, 0.91)
	pt3dadd(-1023.81, 906.5, 196.94, 0.73)
	pt3dadd(-1023.39, 906.27, 198.9, 0.55)
	pt3dadd(-1022.76, 905.82, 200.21, 0.55)
	pt3dadd(-1022.74, 905.34, 201.95, 0.55)
	pt3dadd(-1022.28, 903.91, 203.85, 0.36)
	pt3dadd(-1020.71, 903.75, 206.08, 0.36)
	pt3dadd(-1020.09, 903.07, 207.6, 0.36)
	pt3dadd(-1019.64, 901.89, 207.6, 0.36)
	pt3dadd(-1018.37, 900.03, 207.76, 0.55)
	pt3dadd(-1018.3, 899.04, 210.04, 0.73)
	pt3dadd(-1018.47, 898.55, 212.38, 0.73)
	pt3dadd(-1017.65, 897.86, 213.74, 0.73)
	pt3dadd(-1017.2, 896.92, 214.66, 0.73)
	pt3dadd(-1016.98, 896.43, 216.24, 0.73)
	pt3dadd(-1015.59, 895.77, 218.36, 0.36)
	pt3dadd(-1015.33, 894.58, 219.61, 0.55)
	pt3dadd(-1015.45, 893.36, 222.11, 0.73)
	pt3dadd(-1015.38, 892.63, 224.17, 0.55)
	pt3dadd(-1015.94, 891.65, 224.28, 0.55)
  }
}
proc shape3d_5() {
  dend[6] {	pt3dadd(-1016.32, 891.61, 224.28, 0.55)
	pt3dadd(-1017.12, 891.8, 225.21, 0.55)
	pt3dadd(-1018.28, 892.02, 225.75, 0.36)
	pt3dadd(-1019.07, 892.17, 226.95, 0.55)
	pt3dadd(-1019.83, 891.7, 227.98, 0.73)
	pt3dadd(-1020.43, 891.86, 230.04, 0.73)
	pt3dadd(-1020.47, 892.36, 231.95, 0.73)
	pt3dadd(-1020.05, 892.36, 234.56, 0.73)
	pt3dadd(-1019.83, 891.7, 236.35, 0.73)
	pt3dadd(-1019.76, 890.95, 238.25, 0.73)
	pt3dadd(-1020.17, 890.91, 239.72, 0.73)
	pt3dadd(-1020.59, 891.38, 241.46, 0.73)
  }
  dend[18] {pt3dclear()
	pt3dadd(-1021, 891.6, 242.54, 0.73)
	pt3dadd(-1021.03, 892.09, 243.85, 0.73)
	pt3dadd(-1021.18, 892.25, 243.85, 0.55)
	pt3dadd(-1022.26, 892.94, 243.85, 0.55)
	pt3dadd(-1021.4, 893.26, 246.24, 0.55)
	pt3dadd(-1021.64, 894.07, 246.24, 0.55)
	pt3dadd(-1022.84, 894.04, 247.27, 0.55)
	pt3dadd(-1022.79, 894.27, 249.94, 0.55)
	pt3dadd(-1023.83, 893.96, 251.4, 0.55)
	pt3dadd(-1023.64, 892.94, 251.4, 0.55)
	pt3dadd(-1024.29, 892.55, 251.4, 0.55)
	pt3dadd(-1024.53, 893.37, 252.06, 0.55)
	pt3dadd(-1022.77, 893.27, 254.66, 0.55)
	pt3dadd(-1023.06, 892.81, 256.3, 0.55)
	pt3dadd(-1022.72, 892.52, 259.07, 0.55)
	pt3dadd(-1023.72, 893.45, 260.81, 0.55)
	pt3dadd(-1024.01, 894.25, 262.65, 0.55)
	pt3dadd(-1023.26, 894.87, 262.65, 0.55)
	pt3dadd(-1023.72, 893.45, 264.07, 0.55)
	pt3dadd(-1024.01, 894.25, 265.81, 0.55)
	pt3dadd(-1023.58, 893.2, 267.55, 0.55)
	pt3dadd(-1022.43, 892.96, 268.85, 0.55)
	pt3dadd(-1020.98, 893.23, 270.05, 0.55)
	pt3dadd(-1020.97, 893.44, 271.24, 0.55)
	pt3dadd(-1020.64, 894.14, 272.98, 0.55)
	pt3dadd(-1021.25, 893.99, 274.88, 0.55)
	pt3dadd(-1020.03, 894.27, 276.68, 0.55)
	pt3dadd(-1019.99, 894.52, 278.2, 0.55)
	pt3dadd(-1018.66, 895.26, 279.77, 0.55)
	pt3dadd(-1018.78, 894.53, 279.77, 0.55)
	pt3dadd(-1018.24, 894.45, 281.13, 0.55)
	pt3dadd(-1017.42, 894.54, 283.36, 0.55)
	pt3dadd(-1016.68, 894.16, 284.34, 0.55)
	pt3dadd(-1016.57, 893.64, 285.37, 0.73)
	pt3dadd(-1015.62, 893.46, 286.73, 0.73)
	pt3dadd(-1014.49, 894.26, 288.42, 0.73)
	pt3dadd(-1013.74, 894.11, 289.67, 0.55)
	pt3dadd(-1013.33, 894.07, 291.57, 0.55)
	pt3dadd(-1013.36, 895.06, 293.42, 0.55)
	pt3dadd(-1013.37, 895.16, 293.42, 0.73)
	pt3dadd(-1013.01, 895.85, 293.42, 0.73)
	pt3dadd(-1012.55, 895.23, 295.32, 0.73)
	pt3dadd(-1011.89, 895.57, 297.66, 0.73)
	pt3dadd(-1011.45, 895.72, 299.56, 0.55)
	pt3dadd(-1011.06, 896.37, 301.19, 0.55)
	pt3dadd(-1011.36, 896.94, 303.25, 0.55)
	pt3dadd(-1010.77, 896.79, 305.26, 0.55)
	pt3dadd(-1010.59, 896.74, 307.22, 0.55)
	pt3dadd(-1010.91, 897.07, 309.07, 0.55)
	pt3dadd(-1010.42, 897.44, 310.92, 0.55)
	pt3dadd(-1009.78, 897.56, 312.87, 0.55)
	pt3dadd(-1009.69, 898.76, 315.16, 0.18)
	pt3dadd(-1008.99, 899.36, 316.57, 0.36)
	pt3dadd(-1008.03, 899.88, 317.66, 0.36)
	pt3dadd(-1007.41, 899.97, 319.4, 0.18)
	pt3dadd(-1007.03, 900.64, 321.68, 0.18)
	pt3dadd(-1006.69, 901.29, 322.82, 0.36)
	pt3dadd(-1005.81, 901.59, 323.42, 0.36)
	pt3dadd(-1005.71, 902.07, 324.83, 0.36)
	pt3dadd(-1005.47, 902.26, 326.08, 0.36)
	pt3dadd(-1005.24, 903.21, 326.08, 0.36)
	pt3dadd(-1005.68, 903.83, 327.44, 0.36)
	pt3dadd(-1005.53, 904.52, 329.12, 0.36)
	pt3dadd(-1006.21, 904.91, 330.54, 0.36)
	pt3dadd(-1007.02, 904.89, 332.22, 0.36)
	pt3dadd(-1007.05, 905.63, 333.74, 0.36)
	pt3dadd(-1008.12, 906.16, 334.94, 0.36)
	pt3dadd(-1009.57, 905.99, 335.81, 0.18)
	pt3dadd(-1010.4, 906.69, 337.66, 0.18)
	pt3dadd(-1010.59, 907.49, 338.42, 0.36)
	pt3dadd(-1010.94, 908.57, 340.21, 0.55)
	pt3dadd(-1010.96, 908.65, 340.21, 0.55)
	pt3dadd(-1010.85, 910.61, 341.14, 0.36)
	pt3dadd(-1010.65, 911.88, 341.46, 0.36)
	pt3dadd(-1010.6, 912.86, 341.46, 0.55)
	pt3dadd(-1009.9, 913.47, 343.09, 0.55)
	pt3dadd(-1010.71, 914.84, 343.09, 0.73)
	pt3dadd(-1010.88, 916.02, 345.81, 0.73)
	pt3dadd(-1010.87, 917.25, 347.11, 0.55)
	pt3dadd(-1010.27, 918.57, 348.04, 0.55)
	pt3dadd(-1010.15, 919.06, 349.34, 0.55)
	pt3dadd(-1011.24, 919.64, 350.97, 0.36)
	pt3dadd(-1012.56, 919.43, 352.49, 0.36)
	pt3dadd(-1012.56, 919.43, 352.55, 0.36)
	pt3dadd(-1012.69, 918.93, 353.96, 0.55)
	pt3dadd(-1012.85, 919.9, 354.99, 0.55)
	pt3dadd(-1013.43, 919.8, 355.54, 0.73)
	pt3dadd(-1013.4, 921.01, 357.6, 0.73)
	pt3dadd(-1013.51, 921.75, 357.6, 0.73)
	pt3dadd(-1013.69, 922.96, 358.69, 0.73)
	pt3dadd(-1013.59, 924.24, 360.32, 0.55)
	pt3dadd(-1014.22, 924.65, 361.19, 0.55)
	pt3dadd(-1014.32, 924.14, 362.77, 0.55)
	pt3dadd(-1015.21, 924.73, 364.18, 0.55)
	pt3dadd(-1015.88, 923.9, 365.43, 0.55)
	pt3dadd(-1016.67, 924.03, 366.08, 0.73)
	pt3dadd(-1017.51, 924.38, 367.98, 0.55)
	pt3dadd(-1018.14, 924.55, 369.61, 0.55)
	pt3dadd(-1018.65, 925.46, 371.3, 0.55)
	pt3dadd(-1017.81, 926.31, 373.15, 0.36)
	pt3dadd(-1017.04, 926.42, 374.51, 0.36)
	pt3dadd(-1017.54, 927.08, 376.25, 0.36)
	pt3dadd(-1018.02, 927.78, 376.25, 0.36)
	pt3dadd(-1018.06, 928.01, 377.77, 0.36)
	pt3dadd(-1018.61, 927.65, 379.02, 0.36)
	pt3dadd(-1019.11, 927.1, 380.38, 0.36)
	pt3dadd(-1019.39, 927.55, 381.57, 0.55)
	pt3dadd(-1019.58, 927.53, 381.57, 0.55)
	pt3dadd(-1019.68, 928.27, 382.93, 0.73)
	pt3dadd(-1020.71, 928.57, 384.78, 0.55)
	pt3dadd(-1020.97, 929.04, 385.43, 0.55)
	pt3dadd(-1021.17, 929.29, 385.43, 0.55)
	pt3dadd(-1020.33, 929.65, 386.79, 0.55)
	pt3dadd(-1020.24, 930.11, 387.6, 0.36)
	pt3dadd(-1020.23, 930.37, 389.56, 0.36)
	pt3dadd(-1020.95, 930.72, 390.76, 0.18)
	pt3dadd(-1021.08, 931.22, 391.79, 0.36)
	pt3dadd(-1022.19, 931.89, 394.45, 0.18)
	pt3dadd(-1022.26, 932.62, 395.16, 0.18)
	pt3dadd(-1022.82, 932.96, 395.65, 0.36)
	pt3dadd(-1023.72, 933.34, 396.52, 0.36)
	pt3dadd(-1023.46, 933.78, 397.71, 0.36)
	pt3dadd(-1023.42, 934.02, 398.47, 0.36)
	pt3dadd(-1022.88, 933.69, 400.92, 0.36)
	pt3dadd(-1023.01, 934.21, 407.23, 0.36)
	pt3dadd(-1022.98, 934.44, 407.23, 0.36)
	pt3dadd(-1023.13, 934.72, 408.53, 0.36)
	pt3dadd(-1023.85, 935.08, 409.29, 0.36)
	pt3dadd(-1024.43, 935.15, 410.49, 0.36)
	pt3dadd(-1025.08, 936.22, 411.57, 0.36)
	pt3dadd(-1025.12, 937.21, 412.71, 0.36)
	pt3dadd(-1025.5, 937.28, 415, 0.36)
	pt3dadd(-1026.11, 935.91, 416.25, 0.36)
	pt3dadd(-1025.23, 935.26, 417.5, 0.36)
	pt3dadd(-1025.35, 934.3, 418.48, 0.36)
	pt3dadd(-1024.09, 933.64, 420.7, 0.36)
	pt3dadd(-1022.82, 932.96, 422.23, 0.36)
	pt3dadd(-1022.28, 932.4, 424.02, 0.36)
	pt3dadd(-1022.08, 932.37, 425.65, 0.36)
	pt3dadd(-1021.81, 933.06, 427.44, 0.36)
	pt3dadd(-1021.59, 933.28, 428.96, 0.36)
	pt3dadd(-1021.24, 931.51, 429.89, 0.36)
	pt3dadd(-1020.69, 931.17, 431.47, 0.55)
	pt3dadd(-1020.49, 931.18, 432.93, 0.55)
	pt3dadd(-1020.03, 930.34, 432.93, 0.55)
	pt3dadd(-1019.45, 930.27, 433.31, 0.55)
	pt3dadd(-1019.06, 930.64, 433.31, 0.55)
	pt3dadd(-1018.86, 931.35, 433.31, 0.55)
	pt3dadd(-1018.42, 932.05, 435.65, 0.55)
	pt3dadd(-1018, 932.52, 436.95, 0.36)
	pt3dadd(-1017.03, 932.23, 438.1, 0.36)
  }
  dend[7] {pt3dclear()
	pt3dadd(-1017.03, 932.23, 438.1, 0.18)
	pt3dadd(-1017.96, 933.48, 439.67, 0.18)
	pt3dadd(-1018.71, 934.26, 439.67, 0.18)
	pt3dadd(-1019.06, 935.01, 440.22, 0.36)
	pt3dadd(-1019.4, 936.01, 437.61, 0.55)
	pt3dadd(-1020.15, 936.51, 437.61, 0.55)
	pt3dadd(-1020.71, 936.79, 437.23, 0.55)
	pt3dadd(-1021.68, 936.83, 437.44, 0.73)
  }
  dend[8] {pt3dclear()
	pt3dadd(-1017.03, 932.23, 438.1, 0.18)
	pt3dadd(-1017.12, 930.79, 440.49, 0.18)
	pt3dadd(-1017.95, 929.85, 440.98, 0.36)
	pt3dadd(-1018.78, 928.45, 442.5, 0.36)
	pt3dadd(-1018.79, 928.68, 442.5, 0.36)
	pt3dadd(-1020.18, 927.54, 443.64, 0.36)
	pt3dadd(-1021.03, 926.84, 444.24, 0.18)
	pt3dadd(-1021.63, 926.38, 444.45, 0.18)
	pt3dadd(-1022.6, 926.2, 444.73, 0.18)
	pt3dadd(-1022.44, 925.71, 445.43, 0.18)
	pt3dadd(-1022.87, 925, 446.74, 0.36)
	pt3dadd(-1023.32, 923.79, 447.23, 0.18)
	pt3dadd(-1023.53, 923.34, 447.06, 0.18)
	pt3dadd(-1023.78, 922.36, 447.93, 0.18)
	pt3dadd(-1024.58, 922.16, 447.77, 0.18)
	pt3dadd(-1024.95, 922.18, 448.97, 0.18)
	pt3dadd(-1025.74, 921.74, 449.18, 0.36)
	pt3dadd(-1026.34, 921.76, 449.4, 0.36)
	pt3dadd(-1026.76, 921.07, 451.25, 0.18)
	pt3dadd(-1026.94, 920.85, 451.41, 0.18)
	pt3dadd(-1027.18, 920.33, 450.65, 0.18)
	pt3dadd(-1027.82, 919.41, 451.41, 0.18)
	pt3dadd(-1027.82, 919.41, 451.36, 0.18)
	pt3dadd(-1027.85, 918.7, 452.34, 0.18)
	pt3dadd(-1027.71, 917.94, 453.86, 0.18)
	pt3dadd(-1028.11, 917.72, 455.22, 0.36)
	pt3dadd(-1028.14, 917, 456.09, 0.36)
  }
  dend[9] {pt3dclear()
	pt3dadd(-1028.14, 917, 456.09, 0.36)
	pt3dadd(-1028.36, 916.27, 456.68, 0.36)
  }
}
proc shape3d_6() {
  dend[9] {	pt3dadd(-1028.17, 915.8, 457.34, 0.36)
	pt3dadd(-1029.41, 914.88, 458.91, 0.36)
  }
  dend[10] {pt3dclear()
	pt3dadd(-1028.14, 917, 456.09, 0.36)
	pt3dadd(-1026.32, 918.11, 458.48, 0.36)
	pt3dadd(-1025.71, 918.58, 458.48, 0.36)
	pt3dadd(-1024.55, 918.53, 460.11, 0.36)
	pt3dadd(-1022.79, 918.43, 461.3, 0.18)
	pt3dadd(-1021.99, 918.87, 462.83, 0.18)
	pt3dadd(-1020.08, 918.29, 462.99, 0.18)
	pt3dadd(-1019.33, 917.77, 463.1, 0.36)
	pt3dadd(-1017.77, 917.69, 464.46, 0.36)
	pt3dadd(-1016.22, 917.87, 465.81, 0.18)
	pt3dadd(-1015.04, 917.8, 465.38, 0.18)
	pt3dadd(-1013.5, 917.48, 465.43, 0.18)
	pt3dadd(-1013.5, 917.48, 465.38, 0.18)
	pt3dadd(-1012.52, 917.66, 466.36, 0.36)
	pt3dadd(-1011.29, 918.6, 467.5, 0.18)
	pt3dadd(-1010.83, 920.03, 467.83, 0.18)
	pt3dadd(-1010.83, 920.03, 467.77, 0.18)
	pt3dadd(-1010.79, 921.02, 467.77, 0.18)
	pt3dadd(-1011.05, 923.67, 470.22, 0.18)
	pt3dadd(-1010.95, 925.38, 470.16, 0.18)
	pt3dadd(-1011.09, 927.08, 471.03, 0.18)
	pt3dadd(-1011.09, 927.08, 470.98, 0.18)
	pt3dadd(-1009.97, 929.7, 470.98, 0.18)
	pt3dadd(-1009.37, 930.4, 470.81, 0.18)
	pt3dadd(-1009.24, 932.57, 470.81, 0.18)
	pt3dadd(-1007.8, 933.97, 470.81, 0.18)
	pt3dadd(-1007.19, 934.92, 470.92, 0.18)
	pt3dadd(-1007.12, 936.12, 471.96, 0.18)
	pt3dadd(-1006.87, 936.82, 472.77, 0.18)
	pt3dadd(-1006.08, 937.51, 472.77, 0.18)
	pt3dadd(-1005.85, 938.01, 474.35, 0.36)
	pt3dadd(-1005.99, 939.22, 475.11, 0.18)
	pt3dadd(-1005.97, 939.47, 476.47, 0.18)
	pt3dadd(-1005.54, 940.9, 476.47, 0.18)
	pt3dadd(-1005.09, 941.61, 478.1, 0.18)
	pt3dadd(-1004.62, 943.01, 479.51, 0.18)
	pt3dadd(-1003.8, 943.96, 480.38, 0.18)
	pt3dadd(-1003.72, 945.42, 480.38, 0.18)
  }
  dend[11] {pt3dclear()
	pt3dstyle(1, -1039.9, 870.89, 14.0078)
	pt3dadd(-1049.1, 875.57, 14.95, 1.64)
	pt3dadd(-1049.93, 876.26, 16.41, 1.64)
	pt3dadd(-1051.41, 877.82, 17.72, 1.64)
	pt3dadd(-1052.62, 878.96, 19.02, 1.64)
	pt3dadd(-1053.67, 880.13, 20.06, 1.46)
	pt3dadd(-1054.73, 881.75, 21.41, 1.46)
	pt3dadd(-1055.64, 883.14, 22.01, 1.46)
	pt3dadd(-1057.06, 884.28, 22.99, 1.46)
	pt3dadd(-1058.28, 885.18, 24.19, 1.64)
	pt3dadd(-1059.02, 885.37, 24.19, 1.64)
  }
  dend[12] {pt3dclear()
	pt3dadd(-1059.02, 885.37, 24.19, 1.64)
	pt3dadd(-1059.07, 885.37, 26.14, 1.64)
	pt3dadd(-1060.29, 886.02, 26.58, 1.28)
	pt3dadd(-1061.71, 886.41, 28.15, 1.09)
	pt3dadd(-1062.7, 886.84, 29.89, 1.09)
	pt3dadd(-1063.63, 886.54, 30.87, 1.09)
	pt3dadd(-1064.82, 886.95, 31.25, 1.09)
	pt3dadd(-1067, 887.27, 31.47, 1.09)
	pt3dadd(-1068.01, 887.95, 32.07, 1.09)
	pt3dadd(-1069.04, 888.61, 32.12, 1.09)
	pt3dadd(-1070.39, 888.76, 33.64, 1.28)
	pt3dadd(-1072.43, 889.37, 35.11, 1.28)
	pt3dadd(-1074.19, 889.74, 36.74, 1.09)
	pt3dadd(-1075.19, 889.9, 37.28, 1.09)
	pt3dadd(-1077.51, 890.26, 37.45, 1.09)
	pt3dadd(-1078.53, 890.69, 38.05, 1.09)
	pt3dadd(-1080.44, 890.04, 38.05, 1.09)
	pt3dadd(-1081.62, 890.01, 38.7, 1.09)
	pt3dadd(-1082.45, 890.67, 40.22, 1.09)
	pt3dadd(-1083.68, 891.57, 41.8, 1.09)
	pt3dadd(-1084.83, 891.48, 43.05, 1.09)
	pt3dadd(-1086.41, 891.62, 44.13, 1.28)
	pt3dadd(-1088.2, 892.48, 45.11, 1.09)
	pt3dadd(-1089.62, 893.12, 46.09, 1.09)
	pt3dadd(-1089.87, 893.62, 46.09, 1.09)
	pt3dadd(-1091.31, 894.76, 46.09, 1.09)
	pt3dadd(-1092.76, 895.87, 47.12, 1.28)
	pt3dadd(-1094.36, 896.72, 47.12, 0.91)
	pt3dadd(-1096.24, 897.79, 48.1, 0.91)
	pt3dadd(-1097.43, 898.43, 49.35, 0.91)
	pt3dadd(-1099.01, 898.82, 50.44, 1.09)
	pt3dadd(-1100.26, 898.99, 52.07, 0.91)
	pt3dadd(-1101.28, 899.42, 53.7, 0.91)
	pt3dadd(-1101.52, 899.89, 53.92, 0.91)
	pt3dadd(-1102.13, 900.55, 54.13, 0.91)
	pt3dadd(-1103.18, 901.43, 55, 0.91)
	pt3dadd(-1104.02, 902.13, 55.49, 0.91)
	pt3dadd(-1105.02, 902.53, 55.55, 0.91)
	pt3dadd(-1106.23, 903.17, 56.96, 0.91)
	pt3dadd(-1107.29, 904.31, 58.75, 0.91)
	pt3dadd(-1108.46, 904.22, 60.82, 1.09)
	pt3dadd(-1110, 904.1, 62.12, 1.09)
	pt3dadd(-1110.83, 905.03, 64.02, 1.09)
	pt3dadd(-1111.79, 904.71, 65.76, 0.91)
	pt3dadd(-1112.98, 904.64, 67.01, 0.91)
	pt3dadd(-1114.13, 904.3, 68.21, 1.09)
	pt3dadd(-1115.67, 904.19, 68.54, 1.09)
	pt3dadd(-1116.24, 904.14, 68.54, 1.09)
	pt3dadd(-1117.59, 903.8, 69.35, 1.09)
	pt3dadd(-1119.02, 904.67, 71.85, 1.09)
	pt3dadd(-1120.26, 905.3, 72.45, 0.91)
	pt3dadd(-1121.44, 905.71, 73.37, 0.91)
	pt3dadd(-1122.45, 906.1, 74.35, 1.09)
	pt3dadd(-1124.47, 906.92, 75.55, 1.09)
	pt3dadd(-1125.29, 907.59, 76.63, 1.09)
	pt3dadd(-1125.48, 907.6, 76.63, 1.09)
	pt3dadd(-1126.47, 908.01, 78.26, 0.91)
	pt3dadd(-1127.32, 908.41, 79.13, 0.91)
	pt3dadd(-1128.3, 908.6, 80.06, 0.91)
	pt3dadd(-1129.62, 908.25, 80.33, 0.91)
	pt3dadd(-1131.54, 907.66, 81.2, 1.09)
	pt3dadd(-1131.54, 907.66, 81.14, 1.09)
	pt3dadd(-1132.48, 907.07, 82.39, 1.09)
	pt3dadd(-1133.58, 906.24, 83.37, 1.09)
	pt3dadd(-1135.5, 905.64, 84.41, 1.28)
	pt3dadd(-1137.16, 904.55, 84.73, 1.28)
	pt3dadd(-1138.48, 903.95, 85.28, 1.28)
	pt3dadd(-1139.97, 903.11, 85.28, 1.09)
	pt3dadd(-1141.52, 902.77, 85.44, 0.91)
	pt3dadd(-1143.6, 901.9, 86.42, 0.91)
	pt3dadd(-1145.29, 901.04, 87.61, 0.73)
	pt3dadd(-1146.98, 899.92, 88.26, 0.73)
	pt3dadd(-1148.49, 899.56, 89.03, 0.91)
	pt3dadd(-1150.25, 899.69, 90.33, 0.73)
	pt3dadd(-1151.44, 899.84, 90.98, 0.73)
	pt3dadd(-1153.15, 899.02, 91.96, 0.91)
	pt3dadd(-1155.03, 897.66, 93.05, 0.91)
	pt3dadd(-1156.68, 896.57, 95.22, 0.91)
	pt3dadd(-1158.05, 896.72, 95.22, 0.91)
	pt3dadd(-1159.06, 897.12, 96.69, 0.91)
	pt3dadd(-1160.45, 897.26, 96.96, 1.09)
	pt3dadd(-1161.05, 897.11, 96.96, 0.73)
	pt3dadd(-1161.79, 896.61, 96.96, 0.73)
	pt3dadd(-1163.58, 896.8, 98.86, 0.91)
	pt3dadd(-1165.11, 896.76, 100.33, 0.55)
	pt3dadd(-1166.28, 896.75, 101.47, 0.55)
	pt3dadd(-1168.03, 896.46, 103.05, 0.73)
	pt3dadd(-1169.4, 895.94, 102.88, 0.73)
	pt3dadd(-1169.4, 895.94, 102.94, 0.73)
	pt3dadd(-1170.34, 895.44, 104.41, 0.73)
	pt3dadd(-1171.69, 894.92, 105.17, 0.73)
	pt3dadd(-1173.44, 895.12, 106.36, 0.55)
	pt3dadd(-1174.59, 894.13, 107.99, 0.55)
	pt3dadd(-1175.35, 893.62, 109.08, 0.73)
	pt3dadd(-1176.35, 893.12, 110.17, 0.55)
	pt3dadd(-1176.71, 892.83, 111.04, 0.55)
	pt3dadd(-1177.3, 892.38, 111.8, 0.55)
	pt3dadd(-1178.25, 892.36, 112.29, 0.73)
	pt3dadd(-1178.46, 892.36, 112.29, 0.73)
	pt3dadd(-1179.24, 892.81, 112.4, 0.73)
	pt3dadd(-1179.43, 893.31, 114.24, 0.73)
	pt3dadd(-1180.8, 893.28, 116.42, 0.73)
	pt3dadd(-1182.95, 893.69, 116.91, 0.73)
	pt3dadd(-1184.44, 893.24, 117.83, 0.91)
	pt3dadd(-1185.59, 892.23, 119.41, 0.73)
	pt3dadd(-1187.35, 891.95, 120.82, 0.73)
	pt3dadd(-1188.49, 890.73, 122.29, 0.73)
	pt3dadd(-1189.63, 890.45, 124.41, 0.91)
	pt3dadd(-1191.2, 890.65, 127.51, 0.91)
	pt3dadd(-1192, 890.91, 128.97, 0.73)
	pt3dadd(-1192.59, 891.1, 130.06, 0.73)
	pt3dadd(-1193.75, 890.6, 130.55, 0.73)
	pt3dadd(-1194.7, 890.33, 131.15, 0.73)
	pt3dadd(-1195.86, 890.32, 131.69, 0.73)
	pt3dadd(-1197.43, 890.03, 133.76, 0.55)
	pt3dadd(-1198.79, 890, 135.17, 0.73)
	pt3dadd(-1200.15, 890.21, 136.8, 0.73)
	pt3dadd(-1201.1, 889.93, 138.38, 0.73)
	pt3dadd(-1202.5, 889.67, 140.28, 0.73)
	pt3dadd(-1204.22, 890.13, 142.29, 0.73)
	pt3dadd(-1205.6, 890.33, 142.72, 0.73)
	pt3dadd(-1206.96, 890.31, 144.14, 0.73)
	pt3dadd(-1207.34, 890.54, 145.6, 0.73)
	pt3dadd(-1207.74, 890.03, 147.61, 0.73)
	pt3dadd(-1208.13, 890.54, 147.61, 0.73)
	pt3dadd(-1208.95, 891.75, 147.61, 0.73)
	pt3dadd(-1210.72, 891.93, 149.3, 0.55)
	pt3dadd(-1211.91, 892.88, 150.6, 0.55)
	pt3dadd(-1211.93, 894.31, 152.34, 0.55)
	pt3dadd(-1213.31, 894.06, 154.63, 0.73)
	pt3dadd(-1213.32, 894.55, 156.36, 0.73)
	pt3dadd(-1213.9, 895.03, 157.78, 0.55)
	pt3dadd(-1215.47, 895.95, 159.14, 0.55)
	pt3dadd(-1217.07, 896.86, 160.77, 0.55)
	pt3dadd(-1218.46, 897.82, 162.18, 0.73)
	pt3dadd(-1219.84, 898.52, 163, 0.55)
	pt3dadd(-1221.97, 898.44, 163.59, 0.55)
	pt3dadd(-1224.11, 897.91, 164.19, 0.73)
	pt3dadd(-1225.85, 897.87, 164.84, 0.73)
	pt3dadd(-1227.21, 897.6, 166.42, 0.73)
	pt3dadd(-1227.97, 897.32, 167.62, 0.55)
	pt3dadd(-1229.37, 897.54, 168.16, 0.55)
	pt3dadd(-1229.93, 897.54, 168.05, 0.55)
	pt3dadd(-1231.13, 898.22, 170.93, 0.55)
	pt3dadd(-1231.88, 898.2, 172.07, 0.55)
	pt3dadd(-1232.09, 898.19, 172.07, 0.55)
	pt3dadd(-1233.25, 898.15, 173.54, 0.55)
	pt3dadd(-1233.81, 897.19, 175.17, 0.55)
	pt3dadd(-1234.22, 898.14, 175.17, 0.55)
  }
}
proc shape3d_7() {
  dend[12] {	pt3dadd(-1233.87, 898.63, 176.04, 0.55)
	pt3dadd(-1233.87, 899.62, 176.09, 0.55)
	pt3dadd(-1234.28, 899.84, 177.67, 0.55)
	pt3dadd(-1235.02, 899.59, 179.41, 0.73)
	pt3dadd(-1235.65, 900.53, 180.77, 0.73)
	pt3dadd(-1235.86, 901, 182.62, 0.73)
	pt3dadd(-1236.64, 901.25, 184.63, 0.55)
	pt3dadd(-1237.82, 901.45, 185.61, 0.55)
	pt3dadd(-1238.01, 900.95, 186.91, 0.55)
	pt3dadd(-1238.79, 900.94, 187.72, 0.55)
	pt3dadd(-1238.79, 900.94, 187.78, 0.55)
	pt3dadd(-1240.92, 901.6, 188.59, 0.73)
	pt3dadd(-1242.91, 902.06, 189.41, 0.55)
	pt3dadd(-1243.64, 901.79, 190.66, 0.55)
	pt3dadd(-1245.62, 901.97, 191.69, 0.73)
	pt3dadd(-1246.59, 901.94, 192.73, 0.73)
	pt3dadd(-1246.6, 902.43, 194.63, 0.73)
	pt3dadd(-1247.24, 902.19, 194.63, 0.91)
	pt3dadd(-1248.83, 902.58, 194.63, 0.91)
	pt3dadd(-1250.23, 903.46, 195.99, 0.73)
  }
  dend[17] {pt3dclear()
	pt3dadd(-1251.22, 903.43, 197.02, 0.55)
	pt3dadd(-1252.78, 903.31, 197.94, 0.55)
	pt3dadd(-1253.98, 903.99, 199.3, 0.55)
	pt3dadd(-1254.97, 903.93, 200.39, 0.55)
	pt3dadd(-1255.92, 903.64, 201.53, 0.73)
	pt3dadd(-1257.44, 903.3, 202.62, 0.91)
	pt3dadd(-1257.62, 903.29, 202.62, 0.91)
	pt3dadd(-1258.8, 902.97, 203.21, 0.73)
	pt3dadd(-1259.69, 901.96, 204.63, 0.73)
	pt3dadd(-1260.69, 902.4, 206.37, 0.55)
	pt3dadd(-1260.92, 902.63, 206.91, 0.55)
	pt3dadd(-1260.92, 902.63, 206.86, 0.55)
	pt3dadd(-1261.66, 902.56, 206.91, 0.55)
	pt3dadd(-1261.66, 902.56, 206.86, 0.55)
	pt3dadd(-1262.67, 902.52, 207.73, 0.73)
	pt3dadd(-1263.81, 902.21, 209.03, 0.55)
	pt3dadd(-1264.79, 902.4, 209.9, 0.55)
	pt3dadd(-1264.6, 902.17, 211.1, 0.91)
	pt3dadd(-1265.44, 899.94, 211.31, 0.73)
	pt3dadd(-1266.55, 898.92, 212.83, 0.55)
	pt3dadd(-1267.27, 898.14, 213.87, 0.55)
	pt3dadd(-1268.4, 897.35, 213.92, 0.55)
	pt3dadd(-1269.94, 897.25, 213.87, 0.73)
	pt3dadd(-1271.73, 897.65, 215.82, 0.55)
	pt3dadd(-1272.5, 897.58, 215.93, 0.55)
	pt3dadd(-1274.87, 898.21, 214.14, 0.73)
	pt3dadd(-1276.91, 899.29, 213.98, 0.91)
	pt3dadd(-1278.1, 899.7, 215.12, 0.73)
	pt3dadd(-1278.92, 900.4, 216.1, 0.73)
	pt3dadd(-1279.29, 900.37, 217.62, 0.73)
	pt3dadd(-1279.86, 899.86, 219.14, 0.55)
	pt3dadd(-1280.23, 899.59, 220.23, 0.55)
	pt3dadd(-1281, 899.55, 220.77, 0.55)
	pt3dadd(-1281.58, 899.27, 221.8, 0.73)
	pt3dadd(-1282.17, 899.23, 222.84, 0.73)
	pt3dadd(-1282.48, 898.46, 224.68, 0.55)
	pt3dadd(-1283.07, 898.21, 224.68, 0.55)
	pt3dadd(-1284.06, 898.4, 225.39, 0.73)
	pt3dadd(-1284.47, 898.88, 226.48, 0.73)
	pt3dadd(-1284.6, 897.89, 228.65, 0.55)
	pt3dadd(-1285.96, 897.55, 229.47, 0.55)
	pt3dadd(-1287.08, 896.78, 229.63, 0.55)
	pt3dadd(-1287.8, 896.02, 230.28, 0.55)
	pt3dadd(-1288.54, 895.23, 231.75, 0.36)
	pt3dadd(-1288.91, 894.74, 233.27, 0.55)
	pt3dadd(-1289.51, 894.93, 233.6, 0.73)
	pt3dadd(-1290.85, 894.61, 233.76, 0.91)
	pt3dadd(-1291.62, 894.82, 234.47, 0.73)
	pt3dadd(-1292.62, 895.02, 234.74, 0.55)
	pt3dadd(-1293.43, 895.19, 235.17, 0.36)
	pt3dadd(-1294.21, 895.14, 235.34, 0.36)
	pt3dadd(-1294.96, 894.87, 235.55, 0.36)
	pt3dadd(-1295.55, 895.08, 236.26, 0.55)
	pt3dadd(-1296.14, 895.04, 236.8, 0.55)
	pt3dadd(-1296.51, 894.77, 236.69, 0.55)
	pt3dadd(-1297.71, 895.21, 237.89, 0.73)
	pt3dadd(-1298.27, 895.15, 239.19, 0.91)
	pt3dadd(-1298.69, 895.47, 239.19, 0.55)
	pt3dadd(-1299.73, 896.42, 239.19, 0.55)
	pt3dadd(-1300.1, 897.48, 241.1, 0.55)
	pt3dadd(-1299.47, 897.84, 242.62, 0.73)
	pt3dadd(-1298.83, 897.98, 243.76, 0.73)
	pt3dadd(-1299.63, 897.87, 246.04, 0.73)
	pt3dadd(-1299.6, 898.12, 247.84, 0.73)
	pt3dadd(-1300.81, 898.08, 250.12, 0.55)
	pt3dadd(-1301.37, 898.2, 251.48, 0.36)
	pt3dadd(-1302.01, 899.03, 253.38, 0.36)
	pt3dadd(-1302.97, 899.22, 253.38, 0.36)
	pt3dadd(-1303.85, 899.87, 254.96, 0.55)
	pt3dadd(-1304.13, 900.42, 255.88, 0.73)
	pt3dadd(-1304.19, 901.17, 257.46, 0.73)
	pt3dadd(-1305.35, 901.36, 258.49, 0.55)
	pt3dadd(-1306.13, 901.53, 259.85, 0.55)
	pt3dadd(-1307.11, 902.42, 260.06, 0.55)
	pt3dadd(-1307.44, 902.98, 261.15, 0.55)
	pt3dadd(-1307.94, 902.33, 262.67, 0.55)
	pt3dadd(-1308.27, 901.65, 263.76, 0.55)
	pt3dadd(-1308.28, 902.64, 265.77, 0.73)
	pt3dadd(-1308.23, 902.88, 267.62, 0.73)
	pt3dadd(-1308.64, 903.93, 269.79, 0.73)
	pt3dadd(-1308.9, 904.72, 271.1, 0.73)
	pt3dadd(-1309.48, 904.84, 273.38, 0.73)
	pt3dadd(-1310.28, 904.72, 274.3, 0.73)
	pt3dadd(-1310.52, 905.51, 274.3, 0.73)
	pt3dadd(-1311.48, 905.68, 276.32, 0.55)
	pt3dadd(-1311.45, 906.91, 278.6, 0.55)
	pt3dadd(-1312.13, 907.53, 278.6, 0.55)
	pt3dadd(-1313.83, 908.07, 279.41, 0.73)
	pt3dadd(-1313.83, 908.07, 279.36, 0.73)
	pt3dadd(-1314.09, 908.87, 280.94, 0.73)
	pt3dadd(-1314.94, 909.5, 282.84, 0.73)
	pt3dadd(-1316.43, 910.03, 284.74, 0.73)
	pt3dadd(-1317.01, 910.12, 284.74, 0.73)
	pt3dadd(-1317.3, 910.66, 287.13, 0.73)
	pt3dadd(-1317.78, 911, 287.13, 0.73)
	pt3dadd(-1319.12, 912.08, 287.13, 0.73)
	pt3dadd(-1317.86, 913.02, 289.14, 0.73)
	pt3dadd(-1316.92, 913.54, 290.99, 0.91)
	pt3dadd(-1316.92, 913.54, 290.94, 0.91)
	pt3dadd(-1315.88, 913.78, 291.48, 0.73)
	pt3dadd(-1314.93, 914.32, 292.13, 0.73)
	pt3dadd(-1313.81, 914.76, 292.84, 0.55)
	pt3dadd(-1312.89, 915.31, 294.96, 0.55)
	pt3dadd(-1312.95, 915.82, 296.91, 0.36)
	pt3dadd(-1312.32, 915.9, 297.29, 0.36)
	pt3dadd(-1312.23, 916.37, 298.16, 0.36)
	pt3dadd(-1311.79, 916.52, 299.36, 0.36)
	pt3dadd(-1311.41, 917.17, 300.12, 0.36)
	pt3dadd(-1311.7, 917.74, 301.48, 0.36)
	pt3dadd(-1311.8, 918.03, 302.62, 0.55)
	pt3dadd(-1312.24, 918.64, 303.93, 0.73)
	pt3dadd(-1313.01, 919.57, 305.28, 0.73)
	pt3dadd(-1312.22, 921.14, 307.13, 0.55)
	pt3dadd(-1311.38, 922.17, 309.25, 0.55)
	pt3dadd(-1310.91, 924.04, 310.45, 0.73)
	pt3dadd(-1311.48, 924.95, 311.48, 0.73)
	pt3dadd(-1311.75, 925.52, 313.87, 0.73)
	pt3dadd(-1312.25, 926.17, 315.34, 0.73)
  }
  dend[13] {pt3dclear()
	pt3dadd(-1312.25, 926.17, 315.34, 0.73)
	pt3dadd(-1313.22, 927.17, 315.34, 0.73)
	pt3dadd(-1314.12, 928.38, 316.59, 0.55)
	pt3dadd(-1314.07, 929.35, 317.35, 0.73)
	pt3dadd(-1313.66, 931.02, 318.27, 0.73)
	pt3dadd(-1313.18, 932.15, 321.32, 0.73)
	pt3dadd(-1312.61, 932.76, 322.3, 0.55)
	pt3dadd(-1313.06, 934.11, 322.24, 0.55)
	pt3dadd(-1313.08, 934.86, 323.93, 0.73)
	pt3dadd(-1314.23, 935.14, 325.39, 0.73)
	pt3dadd(-1312.86, 935.84, 327.89, 0.73)
	pt3dadd(-1313.19, 936.91, 329.63, 0.73)
	pt3dadd(-1313.94, 937.09, 332.62, 0.73)
	pt3dadd(-1314.06, 937.15, 332.62, 0.73)
	pt3dadd(-1314.53, 937.82, 334.31, 0.73)
	pt3dadd(-1315.05, 937.26, 337.13, 0.91)
	pt3dadd(-1314.45, 937.1, 339.52, 0.91)
	pt3dadd(-1313.74, 937.68, 341.54, 0.91)
	pt3dadd(-1313.31, 938.76, 344.04, 0.73)
	pt3dadd(-1312.02, 940.66, 345.01, 0.55)
	pt3dadd(-1311.89, 942.41, 345.99, 0.55)
	pt3dadd(-1311.89, 942.41, 345.94, 0.55)
	pt3dadd(-1311.56, 942.67, 346.75, 0.73)
	pt3dadd(-1311.02, 943.25, 348.17, 0.91)
	pt3dadd(-1310.65, 944.78, 349.47, 0.73)
	pt3dadd(-1310.75, 945.26, 349.47, 0.73)
  }
  dend[14] {pt3dclear()
	pt3dadd(-1310.75, 945.26, 349.47, 0.73)
	pt3dadd(-1310.57, 945.47, 349.47, 0.73)
	pt3dadd(-1310.3, 946.31, 350.5, 0.73)
	pt3dadd(-1310.43, 947.72, 350.88, 0.73)
	pt3dadd(-1310.63, 949.15, 350.88, 0.73)
	pt3dadd(-1311.92, 949.94, 352.41, 0.73)
	pt3dadd(-1310.61, 951.84, 353.49, 0.73)
	pt3dadd(-1310.67, 953.55, 354.47, 0.73)
	pt3dadd(-1309.61, 955.7, 354.63, 0.73)
	pt3dadd(-1308.94, 957.51, 354.74, 0.36)
	pt3dadd(-1307.97, 959.13, 355.61, 0.55)
	pt3dadd(-1307.51, 959.93, 357.19, 0.55)
	pt3dadd(-1306.85, 960.76, 357.08, 0.36)
	pt3dadd(-1305.88, 962.14, 357.84, 0.55)
	pt3dadd(-1305.63, 963.14, 358.38, 0.55)
	pt3dadd(-1304.86, 964.49, 358.6, 0.55)
	pt3dadd(-1304.24, 965.55, 359.25, 0.36)
	pt3dadd(-1304.24, 965.55, 359.2, 0.36)
	pt3dadd(-1304, 966.59, 360.45, 0.36)
	pt3dadd(-1304.08, 968.54, 360.94, 0.55)
	pt3dadd(-1302.94, 969.94, 361.97, 0.36)
	pt3dadd(-1302.05, 972.02, 363.22, 0.36)
	pt3dadd(-1301.28, 973.61, 363.66, 0.36)
	pt3dadd(-1300.72, 974.91, 365.01, 0.36)
	pt3dadd(-1300.51, 977.4, 365.88, 0.36)
	pt3dadd(-1299.77, 979.22, 366.21, 0.36)
	pt3dadd(-1300.59, 980.58, 366.75, 0.36)
	pt3dadd(-1300.69, 981.31, 367.03, 0.18)
	pt3dadd(-1301.57, 984.59, 366.75, 0.36)
	pt3dadd(-1301.05, 987.62, 366.48, 0.36)
	pt3dadd(-1300.75, 990.73, 366.86, 0.36)
	pt3dadd(-1299.87, 992.81, 367.46, 0.36)
	pt3dadd(-1299.87, 992.81, 367.35, 0.36)
	pt3dadd(-1300.72, 994.41, 368.6, 0.36)
	pt3dadd(-1300.67, 996.87, 370.34, 0.36)
	pt3dadd(-1302.41, 997.84, 370.34, 0.36)
  }
}
proc shape3d_8() {
  dend[14] {	pt3dadd(-1303.15, 998.94, 371.48, 0.55)
	pt3dadd(-1303.8, 1000.59, 373.17, 0.55)
	pt3dadd(-1303.56, 1004.29, 372.95, 0.55)
	pt3dadd(-1303.56, 1008.21, 373.06, 0.36)
	pt3dadd(-1303.37, 1009.47, 373.66, 0.36)
	pt3dadd(-1304.08, 1011.57, 373.76, 0.36)
	pt3dadd(-1305.13, 1012.16, 374.42, 0.36)
	pt3dadd(-1305.2, 1012.52, 374.42, 0.73)
	pt3dadd(-1305.07, 1013.46, 374.42, 0.73)
	pt3dadd(-1304.31, 1014.6, 375.5, 0.55)
	pt3dadd(-1304.14, 1015.8, 376.27, 0.55)
	pt3dadd(-1303.2, 1016.91, 376.86, 0.36)
	pt3dadd(-1303.13, 1018.58, 378.22, 0.36)
	pt3dadd(-1302.73, 1018.75, 379.63, 0.36)
	pt3dadd(-1301.78, 1019.87, 380.88, 0.36)
	pt3dadd(-1301.07, 1020.76, 381.92, 0.36)
	pt3dadd(-1301.04, 1022.22, 383.33, 0.36)
	pt3dadd(-1301.16, 1022.72, 383.38, 0.18)
	pt3dadd(-1301.32, 1024.44, 385.5, 0.18)
	pt3dadd(-1301.37, 1025.45, 385.94, 0.18)
	pt3dadd(-1301.07, 1026.14, 386.97, 0.18)
	pt3dadd(-1300.64, 1026.33, 387.68, 0.36)
	pt3dadd(-1300.53, 1027.04, 387.68, 0.36)
	pt3dadd(-1299.9, 1027.45, 387.68, 0.36)
	pt3dadd(-1298.88, 1029.02, 388.17, 0.36)
	pt3dadd(-1298.66, 1030.44, 389.2, 0.18)
	pt3dadd(-1298.09, 1031.59, 389.74, 0.18)
	pt3dadd(-1297.47, 1031.99, 390.72, 0.18)
	pt3dadd(-1296.66, 1032.11, 391.81, 0.18)
	pt3dadd(-1296.85, 1033.38, 392.57, 0.18)
	pt3dadd(-1296.89, 1034.61, 392.57, 0.18)
	pt3dadd(-1296.46, 1034.8, 394.69, 0.18)
	pt3dadd(-1295.85, 1036.41, 394.69, 0.18)
	pt3dadd(-1295.85, 1036.41, 394.64, 0.18)
	pt3dadd(-1295.78, 1038.12, 395.83, 0.18)
	pt3dadd(-1295.65, 1039.06, 395.94, 0.18)
	pt3dadd(-1295.62, 1039.32, 395.99, 0.18)
	pt3dadd(-1295.49, 1041.51, 395.99, 0.18)
	pt3dadd(-1296.44, 1043.12, 397.24, 0.18)
	pt3dadd(-1296.13, 1045.26, 397.24, 0.18)
	pt3dadd(-1296.5, 1046.8, 397.95, 0.36)
	pt3dadd(-1296.65, 1047.07, 397.95, 0.36)
	pt3dadd(-1296.34, 1049.22, 398.44, 0.36)
	pt3dadd(-1296.04, 1051.59, 399.09, 0.36)
	pt3dadd(-1295.1, 1052.69, 399.09, 0.36)
	pt3dadd(-1294.63, 1053.1, 400.02, 0.36)
	pt3dadd(-1294.58, 1054.82, 400.89, 0.36)
	pt3dadd(-1294.36, 1056.51, 400.89, 0.36)
	pt3dadd(-1296.37, 1057.3, 402.57, 0.18)
	pt3dadd(-1296.52, 1057.8, 402.46, 0.18)
	pt3dadd(-1296.86, 1058.12, 403.55, 0.18)
	pt3dadd(-1297.4, 1058.42, 402.79, 0.18)
	pt3dadd(-1298.87, 1059.12, 403.39, 0.18)
	pt3dadd(-1300.72, 1058.65, 403.6, 0.18)
	pt3dadd(-1301.51, 1058.52, 405.61, 0.18)
	pt3dadd(-1301.51, 1058.52, 405.56, 0.18)
	pt3dadd(-1302.85, 1058.71, 405.99, 0.18)
	pt3dadd(-1302.85, 1058.71, 406.05, 0.18)
	pt3dadd(-1304.29, 1058.42, 406.05, 0.18)
	pt3dadd(-1305.49, 1058.37, 407.3, 0.18)
	pt3dadd(-1305.67, 1058.39, 407.3, 0.18)
	pt3dadd(-1306.82, 1058.54, 407.3, 0.18)
	pt3dadd(-1307.9, 1057.73, 407.73, 0.18)
	pt3dadd(-1309.16, 1057.41, 408.06, 0.36)
	pt3dadd(-1310.86, 1057.67, 407.95, 0.18)
	pt3dadd(-1312.19, 1058.12, 407.73, 0.18)
	pt3dadd(-1312.95, 1058.22, 409.31, 0.18)
	pt3dadd(-1314.36, 1059.38, 409.15, 0.36)
	pt3dadd(-1314.46, 1061.37, 409.96, 0.36)
	pt3dadd(-1313, 1063.38, 409.96, 0.36)
	pt3dadd(-1312.94, 1065.05, 409.85, 0.18)
	pt3dadd(-1313.2, 1066.1, 410.18, 0.18)
	pt3dadd(-1312.39, 1067.47, 410.67, 0.18)
	pt3dadd(-1312.07, 1068.38, 411.59, 0.36)
	pt3dadd(-1312.1, 1069.61, 411.7, 0.36)
	pt3dadd(-1310.96, 1071.89, 412.73, 0.18)
	pt3dadd(-1310.24, 1072.77, 414.04, 0.18)
	pt3dadd(-1309.27, 1074.12, 415.89, 0.18)
	pt3dadd(-1309.27, 1074.12, 415.94, 0.18)
	pt3dadd(-1308.38, 1074.95, 415.94, 0.18)
	pt3dadd(-1308.57, 1076.23, 415.99, 0.18)
	pt3dadd(-1308.17, 1078.16, 414.31, 0.18)
	pt3dadd(-1306.65, 1080.38, 414.31, 0.18)
	pt3dadd(-1305.77, 1082.45, 415.83, 0.18)
	pt3dadd(-1304.58, 1085.23, 415.83, 0.18)
	pt3dadd(-1303.98, 1086.6, 418.01, 0.18)
	pt3dadd(-1302.95, 1088.42, 418.01, 0.18)
	pt3dadd(-1302.95, 1088.42, 417.95, 0.18)
	pt3dadd(-1303.16, 1089.68, 418.49, 0.55)
	pt3dadd(-1301.81, 1090.71, 418.66, 0.55)
  }
  dend[15] {pt3dclear()
	pt3dadd(-1310.75, 945.26, 349.47, 0.55)
	pt3dadd(-1311.19, 945.68, 351.86, 0.55)
	pt3dadd(-1311.95, 945.58, 351.97, 0.55)
	pt3dadd(-1312.83, 946.18, 350.83, 0.36)
	pt3dadd(-1313.4, 947.31, 351.26, 0.36)
	pt3dadd(-1313.55, 948.29, 352.62, 0.36)
	pt3dadd(-1313.65, 949.01, 351.75, 0.36)
	pt3dadd(-1314.26, 950.39, 353.27, 0.18)
	pt3dadd(-1315.13, 950.99, 354.47, 0.18)
	pt3dadd(-1315.79, 951.39, 355.29, 0.55)
	pt3dadd(-1316.28, 952.04, 355.29, 0.55)
	pt3dadd(-1316.16, 952.56, 356.64, 0.55)
	pt3dadd(-1316.73, 953.7, 357.41, 0.36)
	pt3dadd(-1317.08, 954.63, 357.51, 0.36)
	pt3dadd(-1317.7, 956.25, 358.55, 0.36)
	pt3dadd(-1318.6, 958.33, 358.55, 0.36)
	pt3dadd(-1319.07, 958.74, 359.25, 0.18)
	pt3dadd(-1320.3, 960.52, 359.63, 0.18)
	pt3dadd(-1320.84, 961.42, 360.23, 0.18)
	pt3dadd(-1322.21, 962.69, 360.61, 0.36)
	pt3dadd(-1324.13, 963.63, 361.37, 0.18)
	pt3dadd(-1325, 964.23, 361.75, 0.55)
	pt3dadd(-1325.48, 964.91, 362.73, 0.55)
	pt3dadd(-1326.53, 965.23, 363.28, 0.36)
	pt3dadd(-1327.25, 964.89, 363.98, 0.36)
	pt3dadd(-1328.33, 965.46, 363.6, 0.18)
	pt3dadd(-1329.45, 966.28, 364.58, 0.18)
	pt3dadd(-1329.27, 966.54, 365.61, 0.18)
	pt3dadd(-1329.77, 967.21, 365.72, 0.55)
	pt3dadd(-1330.47, 968.08, 366.54, 0.55)
	pt3dadd(-1330.58, 968.79, 367.51, 0.36)
	pt3dadd(-1331.63, 969.12, 367.51, 0.36)
	pt3dadd(-1332.52, 969.75, 368, 0.55)
	pt3dadd(-1333.81, 970.53, 368, 0.55)
	pt3dadd(-1334.66, 970.89, 368.82, 0.36)
	pt3dadd(-1335.85, 970.96, 369.25, 0.36)
	pt3dadd(-1336.36, 971.88, 369.85, 0.18)
	pt3dadd(-1336.49, 972.82, 371.1, 0.18)
	pt3dadd(-1337.91, 973.11, 372.08, 0.18)
	pt3dadd(-1338.03, 975.05, 372.79, 0.36)
	pt3dadd(-1339.07, 976.86, 373.06, 0.36)
	pt3dadd(-1340.26, 978.14, 372.95, 0.36)
	pt3dadd(-1340.88, 979.53, 373.17, 0.36)
	pt3dadd(-1341.98, 980.35, 372.79, 0.36)
	pt3dadd(-1343.99, 982.02, 372.13, 0.18)
	pt3dadd(-1344.84, 982.38, 372.79, 0.18)
  }
  dend[16] {pt3dclear()
	pt3dadd(-1312.25, 926.17, 315.34, 0.55)
	pt3dadd(-1312.66, 927.02, 317.3, 0.55)
	pt3dadd(-1311.67, 927.77, 317.3, 0.55)
	pt3dadd(-1311.1, 927.64, 319.52, 0.36)
	pt3dadd(-1311.54, 927.5, 320.77, 0.36)
	pt3dadd(-1311.84, 927.07, 322.19, 0.36)
	pt3dadd(-1312.06, 926.14, 323.71, 0.36)
	pt3dadd(-1312.25, 926.17, 324.85, 0.36)
	pt3dadd(-1312.35, 925.94, 326.21, 0.36)
	pt3dadd(-1313.06, 926.13, 327.68, 0.36)
	pt3dadd(-1313.74, 925.79, 328.82, 0.36)
	pt3dadd(-1314.14, 925.88, 330.12, 0.36)
	pt3dadd(-1313.95, 925.82, 330.12, 0.36)
	pt3dadd(-1314.14, 925.88, 331.15, 0.36)
	pt3dadd(-1313.87, 925.35, 332.57, 0.36)
	pt3dadd(-1314.12, 924.39, 333.98, 0.36)
	pt3dadd(-1313.33, 923.45, 333.98, 0.36)
	pt3dadd(-1312.95, 923.36, 333.98, 0.36)
	pt3dadd(-1312.85, 922.65, 333.98, 0.36)
	pt3dadd(-1313.5, 921.8, 333.98, 0.36)
	pt3dadd(-1313.02, 922.61, 335.23, 0.55)
	pt3dadd(-1313.72, 922.01, 336.37, 0.55)
	pt3dadd(-1314.23, 921.43, 337.89, 0.55)
	pt3dadd(-1314.52, 920.67, 338.82, 0.55)
	pt3dadd(-1314.47, 919.73, 338.93, 0.55)
	pt3dadd(-1314.76, 919.18, 339.58, 0.55)
	pt3dadd(-1314.65, 918.47, 340.88, 0.36)
	pt3dadd(-1314.77, 917.96, 341.81, 0.55)
	pt3dadd(-1315.03, 918.4, 343.22, 0.73)
	pt3dadd(-1315.09, 918.65, 344.2, 0.73)
	pt3dadd(-1315.65, 918.55, 345.5, 0.55)
	pt3dadd(-1316.04, 918.49, 346.26, 0.55)
	pt3dadd(-1316.42, 918.44, 347.19, 0.36)
	pt3dadd(-1316.36, 917.97, 347.57, 0.36)
	pt3dadd(-1317.17, 918.09, 348.17, 0.36)
	pt3dadd(-1317.77, 918.25, 349.04, 0.18)
	pt3dadd(-1317.67, 918.99, 349.96, 0.36)
	pt3dadd(-1317.5, 919.24, 350.94, 0.55)
	pt3dadd(-1317.99, 918.44, 351.86, 0.36)
	pt3dadd(-1318.33, 918.16, 352.46, 0.18)
	pt3dadd(-1319.12, 918.05, 352.89, 0.18)
	pt3dadd(-1319.91, 918.17, 354.2, 0.36)
	pt3dadd(-1319.81, 918.7, 355.29, 0.36)
	pt3dadd(-1320.28, 919.34, 356.21, 0.36)
	pt3dadd(-1320.92, 919.49, 357.03, 0.36)
	pt3dadd(-1321.68, 919.37, 357.46, 0.36)
	pt3dadd(-1321.15, 919.7, 358.93, 0.36)
	pt3dadd(-1321.49, 919.4, 360.29, 0.36)
	pt3dadd(-1322.41, 919.01, 361.75, 0.18)
	pt3dadd(-1323.6, 919.08, 363.06, 0.36)
	pt3dadd(-1324.64, 919.42, 364.25, 0.55)
	pt3dadd(-1325.63, 919.52, 365.88, 0.36)
	pt3dadd(-1326.6, 919.37, 366.86, 0.55)
	pt3dadd(-1327.17, 919.3, 368.44, 0.55)
	pt3dadd(-1328.7, 919.06, 369.91, 0.55)
	pt3dadd(-1329.06, 919.99, 371.59, 0.55)
	pt3dadd(-1330.35, 920.79, 373.87, 0.73)
	pt3dadd(-1331.84, 921.54, 373.66, 0.73)
	pt3dadd(-1333.7, 922.23, 375.07, 0.91)
	pt3dadd(-1335.33, 922.49, 375.94, 0.73)
	pt3dadd(-1336.61, 923.28, 376.32, 0.55)
	pt3dadd(-1337, 923.21, 376.32, 0.55)
	pt3dadd(-1337.39, 923.17, 376.32, 0.55)
	pt3dadd(-1338.22, 923.53, 376.65, 0.55)
  }
}
proc shape3d_9() {
  dend[16] {	pt3dadd(-1339.22, 923.64, 377.46, 0.55)
	pt3dadd(-1340.88, 924.13, 378.22, 0.36)
	pt3dadd(-1341.85, 924.21, 378.44, 0.55)
	pt3dadd(-1343.26, 924.26, 379.2, 0.73)
	pt3dadd(-1344.22, 924.12, 379.2, 0.55)
	pt3dadd(-1345.2, 923.96, 379.58, 0.55)
	pt3dadd(-1346.14, 923.83, 379.58, 0.55)
	pt3dadd(-1348.03, 924.78, 379.63, 0.73)
	pt3dadd(-1349.14, 925.34, 380.4, 0.55)
	pt3dadd(-1349.14, 925.34, 380.34, 0.55)
	pt3dadd(-1351.2, 926.02, 380.67, 0.55)
	pt3dadd(-1352.21, 926.36, 380.99, 0.55)
	pt3dadd(-1352.76, 927.24, 380.99, 0.55)
	pt3dadd(-1353.55, 927.38, 382.24, 0.55)
	pt3dadd(-1354.41, 927.75, 383.33, 0.55)
	pt3dadd(-1354.94, 928.13, 383.33, 0.55)
	pt3dadd(-1356.27, 928.56, 383.33, 0.55)
	pt3dadd(-1357.26, 928.46, 384.53, 0.36)
	pt3dadd(-1357.7, 928.03, 384.91, 0.36)
	pt3dadd(-1359.24, 928.25, 384.91, 0.36)
	pt3dadd(-1360.33, 928.89, 385.29, 0.55)
	pt3dadd(-1360.53, 928.93, 385.29, 0.55)
	pt3dadd(-1361.24, 929.52, 385.18, 0.55)
	pt3dadd(-1362.95, 929.76, 386.7, 0.55)
	pt3dadd(-1365, 930.55, 388, 0.55)
	pt3dadd(-1366.31, 931, 389.04, 0.36)
	pt3dadd(-1367.94, 931.96, 388.87, 0.18)
	pt3dadd(-1368.57, 931.81, 389.04, 0.18)
	pt3dadd(-1371.17, 931.46, 389.04, 0.18)
	pt3dadd(-1372.84, 931.93, 390.4, 0.18)
	pt3dadd(-1374.59, 932.18, 390.4, 0.18)
	pt3dadd(-1376.48, 932.7, 391.86, 0.18)
	pt3dadd(-1377.59, 933.11, 393.22, 0.18)
	pt3dadd(-1379.08, 932.59, 394.09, 0.18)
	pt3dadd(-1379.63, 932.68, 394.91, 0.18)
	pt3dadd(-1381.12, 931.9, 396.05, 0.18)
	pt3dadd(-1381.82, 931.28, 397.79, 0.18)
	pt3dadd(-1382.31, 931.84, 397.79, 0.18)
	pt3dadd(-1383.81, 931.06, 399.26, 0.36)
	pt3dadd(-1384.82, 930.99, 401.32, 0.36)
	pt3dadd(-1385.38, 931.06, 402.57, 0.36)
	pt3dadd(-1386.96, 931.03, 402.52, 0.18)
	pt3dadd(-1388.72, 931.05, 404.15, 0.18)
	pt3dadd(-1390.1, 930.99, 404.69, 0.36)
	pt3dadd(-1390.1, 930.99, 406.48, 0.36)
	pt3dadd(-1391.02, 930.15, 407.08, 0.36)
	pt3dadd(-1390.63, 930.07, 407.08, 0.36)
	pt3dadd(-1391.75, 930.49, 408.28, 0.36)
	pt3dadd(-1393.32, 930.48, 408.28, 0.36)
	pt3dadd(-1394.52, 930.4, 409.31, 0.36)
	pt3dadd(-1395.29, 930.53, 411.21, 0.36)
	pt3dadd(-1395.29, 930.53, 411.16, 0.36)
	pt3dadd(-1395.92, 930.14, 411.21, 0.36)
	pt3dadd(-1397.18, 929.58, 412.41, 0.18)
	pt3dadd(-1397.57, 928.4, 413.82, 0.18)
	pt3dadd(-1398.48, 927.57, 413.98, 0.18)
	pt3dadd(-1400.45, 928.81, 416.92, 0.18)
	pt3dadd(-1402.21, 928.82, 416.92, 0.18)
	pt3dadd(-1402.72, 929.41, 418.93, 0.18)
	pt3dadd(-1404.23, 929.86, 421.97, 0.18)
	pt3dadd(-1405.56, 930.05, 421.97, 0.36)
	pt3dadd(-1407.84, 930.63, 423.5, 0.36)
	pt3dadd(-1409.61, 930.63, 423.55, 0.36)
	pt3dadd(-1411.1, 931.11, 424.26, 0.36)
	pt3dadd(-1412.59, 931.6, 424.09, 0.36)
	pt3dadd(-1414.59, 932.86, 424.09, 0.36)
	pt3dadd(-1415.42, 932.48, 424.91, 0.36)
	pt3dadd(-1415.61, 932.49, 424.91, 0.36)
	pt3dadd(-1416.86, 933.4, 424.91, 0.36)
	pt3dadd(-1418.89, 934.21, 426.16, 0.36)
	pt3dadd(-1421.44, 934.32, 427.57, 0.36)
	pt3dadd(-1422, 934.59, 427.57, 0.36)
	pt3dadd(-1422.54, 935.32, 427.57, 0.36)
	pt3dadd(-1423.5, 935.37, 429.53, 0.36)
	pt3dadd(-1424.69, 935.19, 432.14, 0.36)
	pt3dadd(-1425.87, 934.76, 432.14, 0.36)
	pt3dadd(-1426.05, 935.01, 434.15, 0.55)
	pt3dadd(-1427.42, 934.6, 435.67, 0.36)
	pt3dadd(-1427.85, 934.38, 436.1, 0.36)
	pt3dadd(-1427.85, 934.38, 436.16, 0.36)
	pt3dadd(-1429.2, 933.96, 436.38, 0.36)
	pt3dadd(-1430.64, 932.81, 436.38, 0.36)
	pt3dadd(-1431.65, 932.37, 437.52, 0.36)
	pt3dadd(-1432.64, 931.95, 437.79, 0.18)
	pt3dadd(-1434.2, 931.78, 437.79, 0.18)
	pt3dadd(-1434.65, 930.83, 438.82, 0.18)
	pt3dadd(-1434.88, 929.85, 438.82, 0.18)
	pt3dadd(-1435.51, 928.93, 439.2, 0.36)
	pt3dadd(-1435.72, 928.7, 440.02, 0.36)
	pt3dadd(-1436.95, 927.3, 440.4, 0.18)
	pt3dadd(-1437.74, 927.07, 441.16, 0.36)
	pt3dadd(-1438.36, 926.64, 441.49, 0.36)
	pt3dadd(-1439.58, 925.73, 441.92, 0.18)
	pt3dadd(-1440.38, 925.02, 441.97, 0.18)
	pt3dadd(-1440.38, 925.27, 441.97, 0.18)
	pt3dadd(-1441.53, 925.33, 442.41, 0.36)
	pt3dadd(-1442.93, 924.91, 441.21, 0.18)
	pt3dadd(-1444.08, 924.98, 441.21, 0.18)
	pt3dadd(-1444.49, 924.5, 441.32, 0.18)
	pt3dadd(-1446.04, 924.58, 441.32, 0.18)
	pt3dadd(-1447.03, 924.15, 440.94, 0.18)
	pt3dadd(-1448.62, 923.98, 441.05, 0.36)
	pt3dadd(-1449.96, 924.31, 440.78, 0.36)
	pt3dadd(-1450.33, 924.79, 441.16, 0.36)
	pt3dadd(-1451.71, 924.39, 441.05, 0.55)
	pt3dadd(-1452.87, 924.2, 441.38, 0.36)
	pt3dadd(-1453.64, 924.71, 441.87, 0.36)
	pt3dadd(-1455, 924.81, 440.67, 0.36)
	pt3dadd(-1456.51, 925.85, 440.67, 0.36)
	pt3dadd(-1457.63, 926.37, 440.56, 0.36)
	pt3dadd(-1459.07, 928.87, 440.89, 0.18)
	pt3dadd(-1460.36, 930.16, 440.24, 0.18)
  }
  preAIS {pt3dclear()
	pt3dadd(-1059.02, 885.37, 24.19, 1.28)
	pt3dadd(-1059.24, 885.29, 24.19, 1.28)
	pt3dadd(-1060.4, 884.96, 27.88, 1.09)
	pt3dadd(-1061.53, 884.63, 28.04, 0.91)
	pt3dadd(-1062.52, 884.81, 29.62, 0.91)
	pt3dadd(-1063.47, 884.28, 29.4, 0.91)
	pt3dadd(-1064.64, 884.17, 30.11, 0.91)
	pt3dadd(-1066.23, 884.33, 31.96, 0.73)
	pt3dadd(-1067.19, 884.52, 32.12, 0.73)
	pt3dadd(-1068.77, 884.64, 34.57, 0.73)
	pt3dadd(-1069.11, 884.16, 37.23, 0.73)
	pt3dadd(-1069.29, 884.14, 39.51, 0.55)
	pt3dadd(-1069.51, 884.12, 39.51, 0.55)
	pt3dadd(-1068.87, 883.45, 42.45, 0.55)
	pt3dadd(-1068.54, 882.92, 42.45, 0.91)
	pt3dadd(-1068.54, 882.92, 42.45, 0.91)
	pt3dadd(-1067.91, 882.47, 43.64, 0.73)
	pt3dadd(-1067.5, 882.28, 45.22, 0.73)
	pt3dadd(-1068.03, 881.49, 46.8, 0.36)
	pt3dadd(-1068.54, 880.47, 48.75, 0.36)
  }
  ais {pt3dclear()
	pt3dadd(-1068.48, 880.02, 50.55, 0.36)
	pt3dadd(-1067.38, 880.56, 52.77, 0.36)
	pt3dadd(-1067.4, 881.05, 54.62, 0.36)
	pt3dadd(-1067.78, 880.8, 56.69, 0.36)
	pt3dadd(-1065.73, 879.23, 56.69, 0.36)
	pt3dadd(-1064.07, 878.14, 56.09, 0.36)
	pt3dadd(-1063, 876.74, 54.4, 0.36)
	pt3dadd(-1062.67, 874.85, 53.32, 0.36)
	pt3dadd(-1062.26, 874.61, 52.5, 0.36)
	pt3dadd(-1061.61, 873.69, 51.58, 0.36)
	pt3dadd(-1060.9, 872.54, 50.06, 0.36)
	pt3dadd(-1060.62, 871.09, 49.35, 0.36)
	pt3dadd(-1060.54, 869.64, 48.43, 0.36)
	pt3dadd(-1059.98, 867.97, 47.39, 0.36)
	pt3dadd(-1059.31, 866.8, 46.31, 0.36)
	pt3dadd(-1059.11, 866.34, 45, 0.36)
	pt3dadd(-1058.66, 865.89, 44.95, 0.55)
	pt3dadd(-1057.83, 864.97, 43.48, 0.55)
	pt3dadd(-1057.21, 864.53, 41.79, 0.55)
	pt3dadd(-1056.41, 864.27, 41.79, 0.37)
	pt3dadd(-1055.5, 864.78, 39.46, 0.37)
	pt3dadd(-1054.48, 864.13, 39.35, 0.37)
	pt3dadd(-1053.58, 863, 39.35, 0.37)
	pt3dadd(-1053.34, 861.74, 39.46, 0.91)
	pt3dadd(-1052.31, 861.33, 38.75, 0.73)
	pt3dadd(-1051.31, 860.7, 37.88, 0.73)
	pt3dadd(-1051.28, 859.96, 35.98, 0.73)
	pt3dadd(-1050.44, 859.06, 34.51, 0.73)
	pt3dadd(-1050.01, 858.57, 34.51, 0.73)
	pt3dadd(-1049.4, 857.87, 33.04, 0.73)
	pt3dadd(-1048.74, 857.22, 30.44, 0.91)
	pt3dadd(-1048.13, 856.75, 28.81, 0.91)
	pt3dadd(-1047.5, 856.33, 28.21, 0.73)
	pt3dadd(-1047.4, 854.38, 27.01, 0.36)
	pt3dadd(-1046.58, 853.92, 24.46, 0.36)
	pt3dadd(-1045.94, 853, 22.83, 0.36)
	pt3dadd(-1045.12, 852.34, 21.58, 0.36)
	pt3dadd(-1044.26, 850.92, 20.22, 0.36)
	pt3dadd(-1043.23, 850.28, 18.48, 0.36)
	pt3dadd(-1042.6, 849.56, 18.48, 0.36)
  }
  axon {pt3dclear()
	pt3dadd(-1041.97, 848.9, 16.9, 0.36)
	pt3dadd(-1040.54, 848.24, 16.9, 0.36)
	pt3dadd(-1038.99, 848.1, 15.65, 0.36)
	pt3dadd(-1037.94, 847.2, 15.44, 0.36)
	pt3dadd(-1036.97, 847.06, 14.62, 0.36)
	pt3dadd(-1036.15, 846.11, 13.53, 0.91)
	pt3dadd(-1035.33, 846.16, 12.55, 0.91)
	pt3dadd(-1034.58, 845.95, 12.07, 0.55)
	pt3dadd(-1033.41, 846.04, 10.22, 0.36)
	pt3dadd(-1033.41, 845.79, 10.22, 0.36)
	pt3dadd(-1032.59, 845.61, 8.37, 0.36)
	pt3dadd(-1032.13, 844.42, 8.37, 0.36)
	pt3dadd(-1031.15, 844.25, 7.01, 0.55)
	pt3dadd(-1029.75, 843.87, 5.38, 0.18)
	pt3dadd(-1029.67, 842.88, 3.7, 0.18)
	pt3dadd(-1028.7, 842.94, 2.39, 0.18)
	pt3dadd(-1028.05, 842.05, 1.79, 0.36)
	pt3dadd(-1026.84, 840.87, 1.79, 0.55)
	pt3dadd(-1025.97, 840.36, 1.79, 0.36)
	pt3dadd(-1024.78, 840.28, 1.79, 0.36)
	pt3dadd(-1023.67, 839.71, 0.27, 0.55)
	pt3dadd(-1022.32, 839.61, -1.79, 0.55)
	pt3dadd(-1021.33, 838.98, 0.05, 0.55)
	pt3dadd(-1020.37, 838.91, -1.52, 0.55)
	pt3dadd(-1019.19, 838.86, -2.83, 0.36)
	pt3dadd(-1018.26, 838.05, -4.19, 0.36)
	pt3dadd(-1017.35, 837.01, -5.38, 0.36)
	pt3dadd(-1016.1, 835.24, -6.52, 0.36)
  }
}
proc shape3d_10() {
  axon {	pt3dadd(-1015.9, 835.22, -7.66, 0.36)
	pt3dadd(-1013.46, 833.84, -9.19, 0.36)
	pt3dadd(-1011.7, 833.95, -10.65, 0.36)
	pt3dadd(-1010.55, 833.64, -12.28, 0.36)
	pt3dadd(-1008.94, 831.81, -13.59, 0.55)
	pt3dadd(-1007.43, 830.76, -14.89, 0.55)
	pt3dadd(-1005.93, 829.95, -15.6, 0.55)
	pt3dadd(-1004.93, 827.69, -16.96, 0.36)
	pt3dadd(-1003.22, 826.37, -18.97, 0.36)
	pt3dadd(-1002.13, 825.77, -20.06, 0.36)
	pt3dadd(-1001.58, 825.04, -21.31, 0.36)
	pt3dadd(-1001.62, 824.3, -22.83, 0.36)
	pt3dadd(-1000.53, 823.26, -25.22, 0.36)
	pt3dadd(-999.94, 822.97, -27.07, 0.36)
	pt3dadd(-999.42, 821.95, -29.13, 0.55)
	pt3dadd(-1000.1, 821.03, -33.86, 0.55)
	pt3dadd(-1000.17, 820.08, -35.55, 0.55)
	pt3dadd(-999.57, 819.81, -38.59, 0.55)
	pt3dadd(-999.65, 819.05, -40.65, 0.55)
	pt3dadd(-999.3, 818.06, -40.65, 0.55)
	pt3dadd(-998.77, 817.09, -42.23, 0.55)
	pt3dadd(-998.67, 816.09, -44.19, 0.55)
	pt3dadd(-998.38, 814.35, -44.4, 0.36)
	pt3dadd(-998.08, 813.61, -45.76, 0.36)
	pt3dadd(-996.57, 812.52, -47.28, 0.36)
	pt3dadd(-996.26, 811.34, -48.7, 0.36)
	pt3dadd(-996.11, 810.31, -50.65, 0.36)
	pt3dadd(-995.91, 809.75, -50.65, 0.73)
	pt3dadd(-995.11, 808.81, -51.85, 0.73)
	pt3dadd(-994.23, 807.17, -53.43, 0.73)
	pt3dadd(-993.79, 805.99, -55, 0.55)
	pt3dadd(-993.76, 804.99, -56.52, 0.55)
	pt3dadd(-993.89, 804.03, -57.83, 0.55)
	pt3dadd(-993.89, 804.03, -57.77, 0.55)
	pt3dadd(-993.25, 802.85, -59.08, 0.55)
	pt3dadd(-992.26, 802.4, -61.14, 0.55)
	pt3dadd(-991.46, 802.21, -63.21, 0.55)
	pt3dadd(-991.43, 801.44, -64.62, 0.55)
	pt3dadd(-991.16, 800.27, -65.71, 0.55)
	pt3dadd(-990, 800.33, -65.71, 0.55)
	pt3dadd(-989.62, 799.37, -67.72, 0.55)
	pt3dadd(-989.33, 798.17, -69.35, 0.55)
	pt3dadd(-989.25, 796.97, -70.98, 0.55)
	pt3dadd(-987.46, 796.56, -72.72, 0.55)
	pt3dadd(-987.03, 795.38, -74.57, 0.55)
	pt3dadd(-985.83, 794.21, -76.25, 0.55)
	pt3dadd(-984.62, 793.56, -78.1, 0.55)
	pt3dadd(-984.53, 792.11, -79.95, 0.55)
	pt3dadd(-984.55, 792.35, -79.95, 0.55)
	pt3dadd(-984.11, 791.16, -81.36, 0.55)
	pt3dadd(-982.7, 790, -82.94, 0.55)
	pt3dadd(-981.45, 789.1, -84.03, 0.55)
	pt3dadd(-981.21, 788.37, -85.71, 0.36)
	pt3dadd(-980.77, 786.93, -85.93, 0.36)
	pt3dadd(-980.32, 786.96, -84.73, 0.36)
	pt3dadd(-980.28, 786, -85.98, 0.36)
	pt3dadd(-978.27, 785.11, -87.83, 0.36)
	pt3dadd(-977.89, 785.11, -89.35, 0.36)
	pt3dadd(-977.44, 783.72, -90.87, 0.36)
	pt3dadd(-977.61, 783.71, -90.87, 0.36)
	pt3dadd(-975.89, 784.24, -92.56, 0.36)
	pt3dadd(-975.07, 783.35, -92.56, 0.36)
	pt3dadd(-974.84, 782.35, -94.19, 0.36)
	pt3dadd(-974.6, 781.64, -96.31, 0.36)
	pt3dadd(-972.22, 780.57, -98.81, 0.36)
	pt3dadd(-970.85, 780.37, -98.81, 0.36)
	pt3dadd(-970.85, 780.37, -98.86, 0.36)
	pt3dadd(-970.64, 780.96, -98.86, 0.18)
	pt3dadd(-970.63, 780.46, -98.86, 0.18)
	pt3dadd(-970.62, 779.96, -100.33, 0.18)
	pt3dadd(-968.65, 779.05, -101.85, 0.55)
	pt3dadd(-967.48, 778.86, -103.27, 0.55)
	pt3dadd(-967.04, 778.13, -104.3, 0.55)
	pt3dadd(-966.82, 777.39, -104.9, 0.36)
	pt3dadd(-966.64, 777.15, -106.42, 0.55)
	pt3dadd(-965.66, 776.94, -107.72, 0.55)
	pt3dadd(-965.26, 776.21, -109.03, 0.55)
	pt3dadd(-964.48, 775.99, -110.17, 0.55)
	pt3dadd(-964.82, 774.79, -111.74, 0.36)
	pt3dadd(-965.02, 774.52, -113.16, 0.36)
	pt3dadd(-964.8, 773.56, -114.35, 0.36)
	pt3dadd(-964.79, 773.32, -115.49, 0.36)
	pt3dadd(-964.36, 772.83, -116.91, 0.36)
	pt3dadd(-964.16, 772.15, -116.91, 0.18)
	pt3dadd(-962.76, 770.71, -118.16, 0.18)
	pt3dadd(-962.76, 770.71, -119.46, 0.36)
	pt3dadd(-961.97, 769.77, -120.71, 0.36)
	pt3dadd(-961.17, 769.8, -122.07, 0.36)
	pt3dadd(-960.61, 769.81, -123.16, 0.36)
	pt3dadd(-960.75, 768.58, -124.35, 0.36)
	pt3dadd(-961.15, 768.07, -124.35, 0.36)
	pt3dadd(-960.53, 767.12, -125.49, 0.36)
	pt3dadd(-959.92, 766.42, -126.47, 0.18)
	pt3dadd(-958.95, 765.72, -127.45, 0.18)
	pt3dadd(-957.56, 765.27, -128.59, 0.18)
	pt3dadd(-956.94, 764.32, -129.73, 0.18)
	pt3dadd(-956.33, 762.89, -130.55, 0.18)
	pt3dadd(-956.12, 761.93, -131.15, 0.36)
	pt3dadd(-955.49, 760.96, -132.02, 0.36)
	pt3dadd(-955.65, 759.99, -132.83, 0.36)
	pt3dadd(-954.89, 760.02, -133.97, 0.36)
	pt3dadd(-954.85, 759.02, -135.01, 0.36)
	pt3dadd(-955.22, 757.8, -135.66, 0.55)
	pt3dadd(-955.19, 757.09, -136.91, 0.55)
	pt3dadd(-955.23, 757.32, -136.91, 0.55)
	pt3dadd(-954.78, 756.35, -138.48, 0.36)
	pt3dadd(-954.38, 755.66, -139.73, 0.36)
	pt3dadd(-954.17, 755.14, -140.98, 0.36)
	pt3dadd(-954.5, 753.95, -140.98, 0.36)
	pt3dadd(-954.15, 753.46, -142.45, 0.36)
	pt3dadd(-953.5, 752.05, -142.45, 0.36)
	pt3dadd(-953.08, 751.31, -143.59, 0.36)
	pt3dadd(-952.05, 749.39, -145.33, 0.36)
	pt3dadd(-951.65, 748.7, -147.13, 0.36)
	pt3dadd(-951.3, 748.23, -147.13, 0.91)
	pt3dadd(-951.37, 747.26, -147.13, 0.91)
	pt3dadd(-950.72, 745.74, -149.73, 0.55)
	pt3dadd(-949.71, 744.4, -149.73, 0.55)
	pt3dadd(-949.07, 743.11, -151.26, 0.55)
	pt3dadd(-948.77, 742.13, -152.62, 0.36)
	pt3dadd(-948.58, 740.15, -154.35, 0.36)
	pt3dadd(-947.36, 738.55, -155.88, 0.55)
	pt3dadd(-946.72, 737.29, -157.34, 0.55)
	pt3dadd(-946.23, 736.24, -158.38, 0.55)
	pt3dadd(-945.82, 734.76, -159.73, 0.55)
	pt3dadd(-945.35, 733.69, -160.55, 0.36)
	pt3dadd(-944.86, 732.94, -161.91, 0.55)
	pt3dadd(-943.31, 732.54, -163.27, 0.36)
	pt3dadd(-941.57, 732.34, -163.27, 0.36)
	pt3dadd(-939.79, 730.72, -163.32, 0.36)
	pt3dadd(-938.88, 729.87, -164.52, 0.36)
	pt3dadd(-937.69, 728.31, -165.39, 0.55)
	pt3dadd(-937.54, 728.06, -166.85, 0.55)
	pt3dadd(-937.63, 726.82, -168.59, 0.55)
	pt3dadd(-938.09, 724.44, -170.99, 0.55)
	pt3dadd(-938.77, 723.26, -175.5, 0.55)
	pt3dadd(-938.97, 723.34, -175.5, 0.55)
	pt3dadd(-938.97, 723.09, -176.96, 0.55)
	pt3dadd(-940.26, 722.21, -178.43, 0.55)
	pt3dadd(-940.95, 721.3, -179.36, 0.36)
	pt3dadd(-941.15, 721.33, -180.88, 0.36)
	pt3dadd(-942.59, 720.53, -182.24, 0.36)
	pt3dadd(-942.37, 720.72, -183.65, 0.36)
	pt3dadd(-942.52, 720.99, -184.9, 0.36)
	pt3dadd(-943.13, 718.86, -186.26, 0.36)
	pt3dadd(-943.57, 718.19, -186.69, 0.36)
	pt3dadd(-944.31, 717.04, -188.49, 0.36)
	pt3dadd(-943.87, 715.52, -189.95, 0.36)
	pt3dadd(-943.86, 713.82, -191.26, 0.36)
	pt3dadd(-942.91, 713.47, -192.62, 0.36)
	pt3dadd(-943.49, 711.61, -193.49, 0.36)
	pt3dadd(-943.49, 711.82, -193.54, 0.36)
	pt3dadd(-943.43, 710.88, -193.54, 0.73)
	pt3dadd(-942.61, 710.43, -193.54, 0.91)
	pt3dadd(-941.41, 709.76, -195.66, 0.73)
	pt3dadd(-940.77, 708.09, -198.16, 0.55)
	pt3dadd(-940.34, 707.15, -200.01, 0.55)
	pt3dadd(-939, 707.44, -202.78, 0.55)
	pt3dadd(-937.64, 707.49, -202.78, 0.18)
	pt3dadd(-936.76, 705.59, -203.98, 0.18)
	pt3dadd(-936.12, 704.66, -205.5, 0.18)
	pt3dadd(-935.95, 704.67, -205.5, 0.18)
	pt3dadd(-935.17, 704.68, -206.69, 0.36)
	pt3dadd(-934.55, 703.76, -208.05, 0.36)
	pt3dadd(-934.48, 702.54, -209.57, 0.36)
	pt3dadd(-934.43, 701.57, -210.93, 0.36)
	pt3dadd(-934.8, 700.81, -212.18, 0.55)
	pt3dadd(-933.94, 698.91, -213.49, 0.36)
	pt3dadd(-933.55, 698.46, -214.36, 0.36)
	pt3dadd(-933.48, 696.99, -214.68, 0.36)
	pt3dadd(-934.4, 696.46, -214.9, 0.36)
	pt3dadd(-934.38, 695.51, -218.49, 0.36)
	pt3dadd(-934.54, 695, -219.85, 0.18)
	pt3dadd(-934.91, 694.26, -221.69, 0.18)
	pt3dadd(-934.88, 693.53, -223.6, 0.36)
	pt3dadd(-934.83, 692.8, -225.06, 0.36)
	pt3dadd(-934.83, 692.8, -225.01, 0.36)
	pt3dadd(-934.81, 692.33, -226.64, 0.36)
	pt3dadd(-934.58, 691.59, -228.43, 0.18)
	pt3dadd(-934.17, 691.12, -229.96, 0.18)
	pt3dadd(-933.19, 690.94, -229.96, 0.18)
	pt3dadd(-932.22, 690.73, -231.8, 0.18)
	pt3dadd(-931.05, 690.77, -233.49, 0.18)
	pt3dadd(-930.29, 690.55, -234.96, 0.36)
	pt3dadd(-929.47, 689.88, -236.21, 0.36)
	pt3dadd(-929.28, 689.91, -238.33, 0.36)
	pt3dadd(-929.2, 688.93, -239.09, 0.36)
	pt3dadd(-929.58, 687.94, -239.09, 0.36)
	pt3dadd(-929.92, 687.17, -240.39, 0.36)
	pt3dadd(-930.28, 686.44, -240.72, 0.36)
	pt3dadd(-930.43, 685.82, -240.72, 0.55)
	pt3dadd(-930.35, 684.36, -240.72, 0.55)
	pt3dadd(-930.47, 682.88, -242.24, 0.55)
	pt3dadd(-930.11, 681.96, -242.94, 0.55)
	pt3dadd(-929.04, 680.41, -244.68, 0.55)
	pt3dadd(-928.1, 679.6, -245.39, 0.55)
	pt3dadd(-927.35, 678.5, -246.42, 0.36)
	pt3dadd(-926.33, 678.41, -248.05, 0.36)
	pt3dadd(-925.45, 676.85, -249.25, 0.36)
	pt3dadd(-924.4, 675.32, -250.77, 0.55)
  }
}
proc shape3d_11() {
  axon {	pt3dadd(-922.92, 673.59, -251.8, 0.55)
	pt3dadd(-922.1, 672.26, -252.95, 0.55)
	pt3dadd(-921.82, 671.83, -254.3, 0.55)
	pt3dadd(-921.86, 671.06, -255.61, 0.55)
	pt3dadd(-922.1, 670.05, -256.86, 0.36)
	pt3dadd(-922.5, 669, -258.22, 0.36)
	pt3dadd(-923.56, 668.32, -259.74, 0.36)
	pt3dadd(-923.84, 667.53, -260.93, 0.36)
	pt3dadd(-923.94, 667.03, -262.13, 0.36)
	pt3dadd(-923.86, 666.54, -263.43, 0.36)
	pt3dadd(-924.12, 666.01, -264.74, 0.36)
	pt3dadd(-924.02, 665.25, -266.04, 0.36)
	pt3dadd(-923.95, 664.81, -266.97, 0.36)
	pt3dadd(-923.01, 663.99, -268.27, 0.36)
	pt3dadd(-922.77, 662.78, -269.2, 0.36)
	pt3dadd(-921.98, 662.67, -270.5, 0.36)
	pt3dadd(-921.22, 661.85, -271.8, 0.36)
	pt3dadd(-920.07, 660.82, -273.05, 0.36)
	pt3dadd(-919.2, 660.45, -273.05, 0.36)
	pt3dadd(-918.63, 659.33, -273.05, 0.36)
	pt3dadd(-917.84, 659.48, -273.76, 0.36)
  }
  axon {pt3dclear()
	pt3dadd(-917.84, 659.48, -273.76, 0.55)
	pt3dadd(-916.95, 658.85, -275.94, 0.55)
	pt3dadd(-915.69, 658.38, -275.94, 0.55)
	pt3dadd(-914.94, 657.53, -277.29, 0.36)
	pt3dadd(-914.56, 656.58, -278.33, 0.36)
	pt3dadd(-914.02, 655.71, -279.52, 0.36)
	pt3dadd(-913.25, 654.61, -281.7, 0.36)
	pt3dadd(-912.11, 652.59, -283.16, 0.36)
	pt3dadd(-912.14, 652.83, -283.16, 0.36)
	pt3dadd(-911.84, 651.14, -284.52, 0.55)
	pt3dadd(-910.8, 649.62, -286.37, 0.73)
	pt3dadd(-910.69, 649.21, -286.37, 0.36)
	pt3dadd(-909.88, 648.27, -286.37, 0.36)
	pt3dadd(-909.1, 647.28, -289.25, 0.36)
	pt3dadd(-908.48, 645.35, -291.21, 0.36)
	pt3dadd(-907.31, 644.15, -292.78, 0.36)
	pt3dadd(-905.16, 643.69, -294.58, 0.36)
	pt3dadd(-904.37, 643.23, -294.58, 0.36)
	pt3dadd(-903.77, 642.03, -296.7, 0.55)
	pt3dadd(-903.57, 640.82, -298.44, 0.55)
	pt3dadd(-903.18, 639.09, -300.5, 0.55)
	pt3dadd(-902.57, 637.64, -301.64, 0.55)
	pt3dadd(-902.18, 636.92, -303.22, 0.55)
	pt3dadd(-902.18, 636.92, -303.16, 0.55)
	pt3dadd(-901.96, 636.43, -302.84, 0.55)
	pt3dadd(-901.39, 636.45, -304.52, 0.55)
	pt3dadd(-900.59, 635.48, -305.07, 0.55)
	pt3dadd(-901.15, 634.51, -307.84, 0.55)
	pt3dadd(-901.16, 634.02, -309.03, 0.55)
	pt3dadd(-900.76, 633.3, -309.03, 0.55)
	pt3dadd(-899.21, 632.59, -310.34, 0.55)
	pt3dadd(-898.61, 631.64, -311.26, 0.36)
	pt3dadd(-898.02, 630.89, -312.57, 0.36)
	pt3dadd(-897.84, 630.44, -314.69, 0.18)
	pt3dadd(-898.38, 628.72, -314.69, 0.18)
	pt3dadd(-898.56, 627.98, -316.7, 0.18)
	pt3dadd(-898.17, 627.3, -318.49, 0.18)
	pt3dadd(-897.79, 626.54, -318.49, 0.18)
	pt3dadd(-896.79, 625.59, -319.85, 0.36)
	pt3dadd(-896.79, 625.59, -319.8, 0.36)
	pt3dadd(-897.56, 625.09, -323.22, 0.55)
	pt3dadd(-896.96, 622.93, -325.39, 0.36)
	pt3dadd(-895.58, 621.48, -326.59, 0.55)
	pt3dadd(-895.54, 619.77, -328, 0.55)
	pt3dadd(-894.76, 618.33, -329.63, 0.55)
	pt3dadd(-894.76, 618.33, -329.47, 0.55)
	pt3dadd(-894.34, 617.61, -331.32, 0.55)
	pt3dadd(-893.38, 616.16, -332.62, 0.55)
	pt3dadd(-892.4, 615.69, -332.62, 0.55)
	pt3dadd(-891.42, 615.22, -334.36, 0.55)
	pt3dadd(-890.44, 615.21, -334.42, 0.55)
	pt3dadd(-889.26, 614.03, -334.42, 0.55)
	pt3dadd(-889.06, 613.06, -336.43, 0.55)
	pt3dadd(-888.64, 612.3, -336.43, 0.55)
	pt3dadd(-887.48, 612.35, -337.68, 0.55)
	pt3dadd(-884.55, 611.64, -337.68, 0.55)
	pt3dadd(-883.95, 611.01, -337.68, 0.36)
	pt3dadd(-883.55, 610.05, -337.68, 0.36)
	pt3dadd(-882.94, 608.59, -339.25, 0.36)
	pt3dadd(-881.93, 607.66, -339.91, 0.36)
	pt3dadd(-880.95, 606.95, -341.37, 0.18)
	pt3dadd(-879.96, 605.76, -342.24, 0.18)
	pt3dadd(-879.37, 605.3, -343.06, 0.18)
	pt3dadd(-878.37, 603.85, -343.06, 0.18)
	pt3dadd(-876.81, 603.39, -344.36, 0.18)
	pt3dadd(-876.98, 602.43, -345.34, 0.18)
	pt3dadd(-876.18, 601.22, -346.1, 0.18)
	pt3dadd(-875.62, 601, -346.97, 0.18)
	pt3dadd(-874.99, 600.75, -347.89, 0.18)
	pt3dadd(-874.21, 599.57, -349.14, 0.18)
	pt3dadd(-873.42, 599.08, -350.88, 0.18)
	pt3dadd(-873.79, 597.63, -351.43, 0.18)
	pt3dadd(-873.39, 596.89, -352.79, 0.18)
	pt3dadd(-872.16, 595.47, -353.93, 0.18)
	pt3dadd(-871.77, 593.78, -353.87, 0.18)
	pt3dadd(-871.15, 592.34, -354.63, 0.18)
	pt3dadd(-870.19, 592.12, -355.5, 0.18)
	pt3dadd(-869.73, 589.95, -356.97, 0.18)
	pt3dadd(-869.31, 588.01, -357.95, 0.36)
	pt3dadd(-869.27, 586.78, -358.76, 0.36)
	pt3dadd(-869.66, 585.81, -359.91, 0.36)
	pt3dadd(-869.24, 584.14, -361.1, 0.18)
	pt3dadd(-869.42, 584.12, -361.1, 0.18)
	pt3dadd(-869.58, 582.43, -362.19, 0.18)
	pt3dadd(-869.6, 582.67, -362.19, 0.18)
	pt3dadd(-869.19, 581.71, -363.82, 0.36)
	pt3dadd(-868.03, 581.71, -365.12, 0.36)
	pt3dadd(-868.01, 580.26, -366.37, 0.36)
	pt3dadd(-866.62, 579.58, -367.46, 0.36)
	pt3dadd(-865.82, 578.36, -368.55, 0.36)
	pt3dadd(-865.63, 577.16, -370.02, 0.36)
	pt3dadd(-864.98, 575.23, -371.97, 0.18)
	pt3dadd(-864.18, 574.05, -373.33, 0.18)
	pt3dadd(-863.77, 573.06, -374.58, 0.18)
	pt3dadd(-863.73, 570.87, -374.58, 0.18)
	pt3dadd(-862.74, 569.68, -375.99, 0.18)
	pt3dadd(-862.9, 568.23, -378, 0.18)
	pt3dadd(-862.9, 568.23, -377.95, 0.18)
	pt3dadd(-862.5, 567.04, -379.69, 0.18)
	pt3dadd(-862.49, 567.25, -379.69, 0.18)
	pt3dadd(-861.75, 565.4, -379.69, 0.36)
	pt3dadd(-861.85, 565.1, -382.19, 0.18)
	pt3dadd(-861.26, 564.56, -384.85, 0.18)
	pt3dadd(-860.93, 565.42, -386.81, 0.18)
	pt3dadd(-860.25, 564.63, -389.53, 0.18)
	pt3dadd(-860.17, 563.88, -391.97, 0.18)
	pt3dadd(-859.38, 562.85, -393.11, 0.18)
	pt3dadd(-859.16, 562.17, -394.15, 0.18)
	pt3dadd(-859.62, 561.77, -395.18, 0.18)
	pt3dadd(-859.62, 561.77, -396.43, 0.18)
	pt3dadd(-859.75, 560.95, -396.43, 0.18)
	pt3dadd(-859.13, 560.91, -398.22, 0.18)
	pt3dadd(-858.67, 560.3, -398.22, 0.18)
	pt3dadd(-857.89, 559.79, -399.8, 0.18)
	pt3dadd(-857.76, 558.83, -401.54, 0.36)
	pt3dadd(-857.23, 557.98, -403.22, 0.36)
	pt3dadd(-857.23, 557.98, -403.28, 0.36)
	pt3dadd(-857.29, 556.93, -404.36, 0.18)
	pt3dadd(-856.49, 556.45, -405.18, 0.18)
	pt3dadd(-855.8, 556.19, -405.23, 0.18)
	pt3dadd(-854.91, 555.47, -407.14, 0.18)
	pt3dadd(-854.2, 554.68, -408.82, 0.18)
	pt3dadd(-854, 554.74, -408.82, 0.18)
	pt3dadd(-854.07, 553.69, -410.23, 0.18)
	pt3dadd(-853.73, 552.77, -411.76, 0.18)
	pt3dadd(-853.83, 553.02, -411.76, 0.18)
	pt3dadd(-852.82, 551.31, -413.88, 0.18)
	pt3dadd(-852.9, 551.53, -413.88, 0.18)
	pt3dadd(-851.73, 551.19, -416, 0.18)
	pt3dadd(-851.59, 549.7, -416, 0.18)
	pt3dadd(-851.86, 549.84, -416, 0.18)
	pt3dadd(-851.47, 548.68, -418.11, 0.18)
	pt3dadd(-851.47, 548.68, -418.17, 0.18)
	pt3dadd(-850.26, 547.06, -421.97, 0.18)
	pt3dadd(-849.44, 547.1, -424.42, 0.18)
	pt3dadd(-848.72, 546.78, -424.42, 0.18)
	pt3dadd(-848.54, 546.79, -424.42, 0.18)
	pt3dadd(-847.66, 546.48, -426.21, 0.18)
	pt3dadd(-847.63, 545.24, -428.44, 0.18)
	pt3dadd(-847.98, 544.17, -430.18, 0.18)
	pt3dadd(-847.93, 543.91, -430.18, 0.18)
	pt3dadd(-847.53, 543.03, -430.23, 0.18)
	pt3dadd(-846.52, 542.01, -432.3, 0.18)
	pt3dadd(-846.33, 541.05, -433.93, 0.18)
	pt3dadd(-845.36, 539.28, -436.05, 0.18)
	pt3dadd(-844.89, 538.13, -437.84, 0.18)
	pt3dadd(-844.89, 538.13, -437.9, 0.18)
	pt3dadd(-844.5, 537.23, -438.6, 0.18)
	pt3dadd(-843.15, 534.54, -438.6, 0.18)
	pt3dadd(-842.46, 534.18, -441, 0.18)
	pt3dadd(-842.3, 533.47, -443.12, 0.18)
	pt3dadd(-841.14, 531.76, -443.12, 0.18)
	pt3dadd(-841.08, 531.49, -443.12, 0.18)
	pt3dadd(-839.96, 530.02, -442.9, 0.18)
	pt3dadd(-839.72, 528.82, -445.13, 0.18)
	pt3dadd(-840.21, 527.46, -445.72, 0.18)
	pt3dadd(-839.78, 526.33, -447.14, 0.18)
	pt3dadd(-839.87, 525.81, -447.19, 0.18)
	pt3dadd(-839.78, 525.33, -447.19, 0.18)
	pt3dadd(-838.33, 525.13, -447.19, 0.18)
	pt3dadd(-837.5, 525.07, -449.31, 0.18)
	pt3dadd(-836.93, 524.21, -449.31, 0.18)
	pt3dadd(-835.45, 523.78, -451.65, 0.18)
	pt3dadd(-834.92, 524.15, -451.65, 0.18)
	pt3dadd(-835, 523.39, -453.71, 0.18)
	pt3dadd(-834.86, 522.89, -453.71, 0.18)
	pt3dadd(-834.02, 523.58, -453.71, 0.18)
	pt3dadd(-833.99, 521.61, -457.14, 0.36)
	pt3dadd(-833.78, 520.66, -456.76, 0.36)
	pt3dadd(-833.59, 519.68, -457.9, 0.18)
	pt3dadd(-833.41, 519, -458.23, 0.18)
	pt3dadd(-833.34, 517.53, -458.93, 0.18)
	pt3dadd(-832.98, 516.85, -459.31, 0.18)
	pt3dadd(-831.33, 515.72, -459.8, 0.18)
	pt3dadd(-830.75, 514.85, -459.8, 0.18)
  }
}
proc shape3d_12() {
  axon {	pt3dadd(-830.48, 514.41, -462.74, 0.18)
	pt3dadd(-831.31, 513.75, -465.18, 0.18)
	pt3dadd(-832.34, 513.01, -465.4, 0.18)
	pt3dadd(-832.46, 512.53, -469.37, 0.18)
	pt3dadd(-832.29, 511.78, -469.37, 0.18)
	pt3dadd(-831.96, 511.42, -469.37, 0.36)
	pt3dadd(-831.36, 510.23, -469.37, 0.18)
	pt3dadd(-830.93, 509.03, -469.26, 0.18)
	pt3dadd(-830.9, 508.32, -470.83, 0.18)
	pt3dadd(-830.48, 507.34, -472.25, 0.18)
	pt3dadd(-830.1, 507.37, -473.44, 0.18)
	pt3dadd(-830.48, 506.62, -474.69, 0.18)
	pt3dadd(-829.67, 505.92, -475.73, 0.18)
	pt3dadd(-829.09, 505.43, -477.95, 0.18)
	pt3dadd(-828.49, 504.49, -479.48, 0.18)
	pt3dadd(-829.01, 503.25, -481.27, 0.18)
	pt3dadd(-829.02, 502.76, -481.27, 0.18)
	pt3dadd(-828.84, 502.31, -481.27, 0.18)
	pt3dadd(-828.62, 502.28, -481.27, 0.18)
	pt3dadd(-827.62, 501.83, -481.87, 0.18)
	pt3dadd(-827.02, 500.86, -483.5, 0.18)
	pt3dadd(-826.41, 499.94, -486.22, 0.18)
	pt3dadd(-824.83, 498.99, -489.04, 0.18)
	pt3dadd(-824.78, 497.55, -490.73, 0.18)
	pt3dadd(-823.23, 497.11, -492.52, 0.18)
	pt3dadd(-822.65, 496.62, -492.52, 0.18)
	pt3dadd(-822.04, 495.66, -493.01, 0.18)
	pt3dadd(-821.99, 495.19, -493.66, 0.18)
	pt3dadd(-821.57, 493.74, -495.78, 0.18)
	pt3dadd(-821.4, 493.01, -495.78, 0.18)
	pt3dadd(-820.42, 493.06, -497.03, 0.18)
	pt3dadd(-819.23, 492.58, -498.5, 0.18)
	pt3dadd(-819.42, 492.35, -499.91, 0.18)
	pt3dadd(-819.39, 491.61, -499.91, 0.18)
	pt3dadd(-818.99, 490.66, -501.54, 0.18)
	pt3dadd(-817.63, 491.41, -502.96, 0.18)
	pt3dadd(-817.63, 491.41, -503.01, 0.18)
	pt3dadd(-817.62, 490.67, -503.93, 0.18)
	pt3dadd(-817.57, 489.47, -505.24, 0.18)
	pt3dadd(-817.58, 488.49, -505.24, 0.18)
	pt3dadd(-816.57, 488.29, -506.71, 0.18)
	pt3dadd(-816.18, 487.8, -507.74, 0.18)
	pt3dadd(-815.77, 487.09, -508.99, 0.36)
	pt3dadd(-814.22, 487.37, -510.18, 0.36)
	pt3dadd(-813.04, 485.95, -512.25, 0.36)
	pt3dadd(-813.04, 485.95, -512.19, 0.36)
	pt3dadd(-812.98, 484.71, -512.19, 0.36)
	pt3dadd(-812.98, 483.76, -514.26, 0.36)
	pt3dadd(-812.95, 483.29, -516.05, 0.36)
	pt3dadd(-813.29, 481.07, -517.25, 0.36)
	pt3dadd(-812.66, 479.66, -517.25, 0.36)
  }
  dend[20] {pt3dclear()
	pt3dstyle(1, -1039.9, 870.89, 14.0078)
	pt3dadd(-1031.07, 863.43, 5.71, 2.73)
	pt3dadd(-1029.85, 862.76, 5.71, 2.73)
	pt3dadd(-1029.4, 861.8, 4.18, 2.73)
	pt3dadd(-1028.25, 861.64, 1.47, 2.55)
	pt3dadd(-1027.6, 860.82, 1.47, 2.01)
	pt3dadd(-1026.82, 860.28, 1.47, 2.01)
	pt3dadd(-1025.54, 859.22, 1.47, 1.64)
	pt3dadd(-1024.06, 858.15, -0.05, 1.46)
	pt3dadd(-1023.03, 856.38, -1.85, 1.46)
	pt3dadd(-1022.32, 854.9, -2.39, 1.82)
  }
  dend[21] {pt3dclear()
	pt3dadd(-1022.32, 854.9, -2.39, 1.64)
	pt3dadd(-1022.85, 852.99, -6.03, 1.64)
	pt3dadd(-1021.77, 851.45, -10.11, 1.28)
	pt3dadd(-1020.82, 851.13, -12.07, 1.09)
	pt3dadd(-1020.56, 849.43, -13.91, 1.28)
	pt3dadd(-1019.86, 847.42, -15.05, 1.46)
	pt3dadd(-1019.43, 845.69, -16.31, 1.64)
	pt3dadd(-1018.53, 844.65, -19.35, 1.28)
	pt3dadd(-1017.83, 843.15, -21.2, 1.28)
	pt3dadd(-1016.99, 841.41, -21.14, 0.91)
	pt3dadd(-1017.09, 839.96, -22.07, 0.91)
	pt3dadd(-1016.74, 839.19, -23.64, 0.91)
	pt3dadd(-1015.55, 839.35, -24.95, 1.09)
	pt3dadd(-1014.34, 840.02, -25.76, 0.91)
	pt3dadd(-1013, 839.92, -26.58, 1.28)
	pt3dadd(-1011.71, 838.61, -29.84, 0.91)
	pt3dadd(-1011.54, 838.64, -29.84, 0.91)
	pt3dadd(-1009.98, 838.3, -30, 1.09)
	pt3dadd(-1008.76, 836.28, -31.52, 1.09)
	pt3dadd(-1008.09, 834.27, -33.04, 1.09)
	pt3dadd(-1007.64, 832.54, -34.73, 1.09)
	pt3dadd(-1005.82, 830.72, -35.93, 1.09)
	pt3dadd(-1004.22, 828.43, -37.12, 1.09)
	pt3dadd(-1003.75, 826.47, -38.86, 1.09)
	pt3dadd(-1002.71, 824.67, -40.55, 1.09)
	pt3dadd(-1001.44, 822.88, -41.36, 1.09)
	pt3dadd(-1000.57, 821.39, -42.88, 1.09)
	pt3dadd(-1000.1, 819.64, -44.73, 1.28)
	pt3dadd(-999.4, 818.41, -46.63, 1.09)
	pt3dadd(-998.12, 817.33, -49.35, 1.09)
	pt3dadd(-997.01, 816.53, -51.47, 1.09)
	pt3dadd(-996.57, 816.02, -51.47, 1.09)
	pt3dadd(-995.76, 814.84, -51.47, 1.09)
	pt3dadd(-995.08, 813.39, -52.77, 1.09)
	pt3dadd(-994.86, 812.43, -54.68, 1.09)
	pt3dadd(-993.8, 811.31, -55.93, 1.09)
	pt3dadd(-993.76, 810.09, -57.72, 1.09)
	pt3dadd(-993.85, 808.38, -59.46, 1.09)
	pt3dadd(-994.2, 806.9, -61.14, 1.09)
	pt3dadd(-994.34, 805.68, -62.99, 1.09)
	pt3dadd(-994.09, 804.95, -64.89, 0.91)
	pt3dadd(-993.26, 803.77, -66.52, 0.91)
	pt3dadd(-994.19, 803.02, -68.32, 0.91)
	pt3dadd(-995.1, 802.24, -70.82, 0.91)
	pt3dadd(-995.49, 801.49, -72.56, 0.91)
	pt3dadd(-995.36, 799.31, -71.69, 0.91)
	pt3dadd(-993.93, 797.91, -73.54, 1.09)
	pt3dadd(-993.87, 796.47, -75.49, 1.09)
	pt3dadd(-994.54, 794.24, -77.34, 0.91)
	pt3dadd(-993.65, 792.12, -79.08, 0.91)
	pt3dadd(-992.81, 790.68, -80.71, 0.91)
	pt3dadd(-992.81, 790.68, -80.76, 0.91)
	pt3dadd(-992.52, 789.26, -83.59, 0.91)
	pt3dadd(-992.65, 787.3, -86.31, 1.09)
	pt3dadd(-992.54, 785.34, -87.83, 1.09)
	pt3dadd(-992.28, 784.15, -89.84, 0.91)
	pt3dadd(-992.45, 783.2, -91.53, 0.91)
	pt3dadd(-992.77, 781.98, -93.97, 0.91)
	pt3dadd(-992.9, 780.96, -96.69, 0.91)
	pt3dadd(-993.24, 779.75, -99.35, 1.09)
	pt3dadd(-993.75, 778.27, -99.68, 1.09)
	pt3dadd(-993.75, 778.27, -99.73, 1.09)
	pt3dadd(-993.12, 776.66, -101.36, 1.09)
	pt3dadd(-993.84, 775.17, -101.36, 1.09)
	pt3dadd(-993.93, 774.31, -101.36, 1.09)
	pt3dadd(-993.93, 773.83, -101.36, 1.09)
	pt3dadd(-993.68, 772.14, -104.79, 1.09)
	pt3dadd(-994.43, 770.67, -105.55, 1.09)
	pt3dadd(-994.38, 769.45, -105.71, 1.09)
	pt3dadd(-993.95, 768, -107.5, 1.09)
	pt3dadd(-993.72, 766.28, -108.75, 1.09)
	pt3dadd(-994.03, 764.11, -109.79, 1.09)
	pt3dadd(-993.82, 763.15, -112.23, 1.09)
	pt3dadd(-993.82, 763.15, -112.18, 1.09)
	pt3dadd(-994, 762.18, -113.86, 1.09)
	pt3dadd(-994.55, 760.46, -114.3, 1.09)
	pt3dadd(-994.49, 759.26, -116.58, 1.09)
	pt3dadd(-994.28, 758.04, -120, 1.09)
	pt3dadd(-994.23, 756.83, -122.02, 1.09)
	pt3dadd(-994.59, 755.6, -125.28, 0.91)
	pt3dadd(-995.35, 754.62, -126.91, 0.91)
	pt3dadd(-994.77, 753.89, -128.32, 0.73)
	pt3dadd(-993.57, 753.67, -129.68, 0.73)
	pt3dadd(-992.76, 753.23, -130.87, 0.73)
	pt3dadd(-992.18, 752.51, -132.02, 0.73)
	pt3dadd(-992.35, 751.5, -134.84, 0.73)
	pt3dadd(-993.31, 750.3, -136.53, 0.91)
	pt3dadd(-994.03, 749.08, -137.72, 0.91)
	pt3dadd(-994.79, 748.33, -137.72, 0.91)
	pt3dadd(-995.52, 746.36, -138.43, 0.91)
	pt3dadd(-995.62, 744.38, -140.77, 0.91)
	pt3dadd(-996.19, 742.42, -142.07, 0.91)
	pt3dadd(-996.52, 741.21, -143.97, 0.91)
	pt3dadd(-997.25, 739.72, -144.84, 0.91)
	pt3dadd(-997.57, 738.03, -146.09, 0.91)
	pt3dadd(-998.16, 736.8, -147.23, 0.91)
	pt3dadd(-998.11, 735.08, -148.92, 0.91)
	pt3dadd(-997.88, 734.34, -148.92, 0.73)
	pt3dadd(-998.07, 732.63, -148.92, 0.73)
	pt3dadd(-998.25, 730.92, -152.94, 0.91)
	pt3dadd(-998.19, 729.71, -153.86, 0.91)
	pt3dadd(-997.49, 726.95, -154.46, 0.91)
	pt3dadd(-997.3, 724.99, -156.31, 0.91)
	pt3dadd(-997.08, 723.24, -158.48, 0.73)
	pt3dadd(-997.09, 721.05, -160.17, 0.73)
	pt3dadd(-996.08, 719.51, -161.04, 0.73)
	pt3dadd(-994.25, 718.34, -160.98, 0.73)
	pt3dadd(-993.21, 717.04, -162.72, 0.73)
	pt3dadd(-992.95, 715.5, -163.87, 0.73)
	pt3dadd(-991.76, 714.17, -167.18, 0.73)
	pt3dadd(-990.51, 712.42, -168.32, 0.73)
	pt3dadd(-989.28, 711.08, -168.32, 0.73)
	pt3dadd(-989.24, 711.3, -168.32, 0.73)
	pt3dadd(-988.26, 709.52, -170.93, 0.73)
	pt3dadd(-988.26, 709.52, -170.99, 0.73)
	pt3dadd(-987.79, 708.47, -170.77, 0.73)
	pt3dadd(-987.79, 708.47, -170.82, 0.73)
	pt3dadd(-986.56, 707.14, -172.83, 0.55)
	pt3dadd(-986.63, 706.42, -172.83, 0.55)
	pt3dadd(-986.48, 705.9, -175.12, 0.55)
	pt3dadd(-985.62, 704.85, -175.12, 0.55)
	pt3dadd(-984.34, 704, -176.26, 0.55)
	pt3dadd(-983.76, 701.97, -176.31, 0.91)
	pt3dadd(-983.51, 700.75, -178.16, 0.73)
	pt3dadd(-983.41, 699.73, -181.8, 0.73)
	pt3dadd(-982.24, 697.68, -183, 0.73)
	pt3dadd(-981.4, 696.36, -183, 0.91)
	pt3dadd(-981.22, 696.35, -183, 0.91)
	pt3dadd(-979.89, 693.76, -185.61, 1.28)
	pt3dadd(-978.21, 691.64, -189.25, 1.09)
	pt3dadd(-976, 689.98, -190.55, 1.09)
	pt3dadd(-975.98, 690.23, -190.55, 1.09)
	pt3dadd(-975.37, 689.41, -190.55, 0.73)
	pt3dadd(-973.95, 688.29, -190.55, 0.73)
	pt3dadd(-972.96, 687.83, -191.75, 0.91)
	pt3dadd(-971.9, 685.95, -193, 0.91)
	pt3dadd(-970.68, 684.79, -194.74, 0.73)
	pt3dadd(-969.67, 683.6, -196.31, 0.73)
  }
}
proc shape3d_13() {
  dend[21] {	pt3dadd(-967.85, 682.23, -196.8, 0.73)
	pt3dadd(-966.8, 681.08, -198.27, 0.73)
	pt3dadd(-965.98, 679.65, -199.19, 0.73)
	pt3dadd(-964.96, 678.71, -199.52, 0.73)
	pt3dadd(-963.74, 677.06, -201.26, 0.91)
	pt3dadd(-963.47, 675.87, -202.56, 0.91)
	pt3dadd(-963.47, 675.87, -202.51, 0.91)
	pt3dadd(-962.79, 673.95, -203.76, 0.73)
	pt3dadd(-961.57, 672.76, -203.76, 0.55)
	pt3dadd(-960.4, 672.6, -204.41, 0.55)
	pt3dadd(-958.63, 671.94, -203.7, 0.73)
	pt3dadd(-956.86, 671.55, -203.76, 0.73)
	pt3dadd(-955.62, 670.4, -204.63, 0.91)
	pt3dadd(-955.62, 670.4, -204.57, 0.91)
	pt3dadd(-954.8, 668.97, -205.23, 0.73)
	pt3dadd(-953.79, 668.28, -205.71, 0.73)
	pt3dadd(-952.15, 666.89, -205.82, 0.73)
	pt3dadd(-950.75, 665.51, -206.86, 0.73)
	pt3dadd(-948.36, 664.14, -207.89, 0.55)
	pt3dadd(-946.53, 662.53, -208.65, 0.55)
	pt3dadd(-946.09, 661.32, -208.87, 0.36)
	pt3dadd(-945.09, 660.65, -209.25, 0.36)
	pt3dadd(-945.04, 659.66, -210.44, 0.36)
	pt3dadd(-944.78, 658.25, -210.55, 0.55)
	pt3dadd(-942.95, 656.62, -211.15, 0.55)
	pt3dadd(-941.51, 654.52, -212.45, 0.55)
	pt3dadd(-940.05, 652.83, -213.54, 0.73)
	pt3dadd(-939.41, 650.93, -215.72, 0.73)
	pt3dadd(-938.49, 649.12, -217.18, 0.73)
	pt3dadd(-937.66, 647.93, -219.08, 0.55)
	pt3dadd(-936.08, 647.5, -218.92, 0.55)
	pt3dadd(-934.72, 647.1, -220.93, 0.36)
	pt3dadd(-934.07, 645.67, -222.07, 0.55)
	pt3dadd(-933.6, 643.99, -221.86, 0.73)
	pt3dadd(-932.54, 642.82, -222.35, 0.91)
	pt3dadd(-931.89, 640.65, -223.16, 0.55)
	pt3dadd(-931.89, 640.44, -223.16, 0.55)
	pt3dadd(-930.27, 639.26, -223.16, 0.55)
	pt3dadd(-929.63, 637.34, -224.74, 0.73)
	pt3dadd(-928, 636.44, -226.2, 0.73)
	pt3dadd(-926.6, 635.07, -226.26, 0.91)
	pt3dadd(-925.38, 634.39, -226.64, 0.73)
	pt3dadd(-924.42, 633.93, -226.2, 0.55)
	pt3dadd(-922.98, 632.78, -227.02, 0.73)
	pt3dadd(-922.33, 631.37, -227.84, 0.91)
	pt3dadd(-922.08, 629.92, -228, 0.73)
	pt3dadd(-920.87, 628.52, -229.85, 0.55)
	pt3dadd(-919.45, 627.86, -230.44, 0.73)
	pt3dadd(-918.05, 627.17, -230.88, 0.73)
	pt3dadd(-916.68, 626.77, -231.2, 0.73)
	pt3dadd(-915.85, 625.35, -230.99, 0.91)
	pt3dadd(-914.17, 622.97, -231.53, 1.09)
	pt3dadd(-913.15, 621.57, -233.05, 0.91)
	pt3dadd(-912.95, 621.22, -233.05, 1.09)
	pt3dadd(-910.41, 620.21, -233.05, 0.91)
	pt3dadd(-907.89, 619.41, -233.05, 0.73)
	pt3dadd(-906.3, 618.2, -233.92, 0.73)
	pt3dadd(-904.76, 617.25, -234.52, 0.91)
	pt3dadd(-903.98, 615.19, -235.5, 0.91)
	pt3dadd(-903.17, 613.85, -233.11, 0.73)
	pt3dadd(-902.32, 611.27, -232.73, 0.73)
	pt3dadd(-901.63, 609.69, -232.73, 0.73)
	pt3dadd(-901.42, 609.2, -232.73, 0.73)
	pt3dadd(-900.48, 605.13, -232.73, 0.73)
	pt3dadd(-899.58, 602.76, -232.89, 0.73)
	pt3dadd(-898.92, 601.07, -233.11, 0.91)
	pt3dadd(-898.27, 599.89, -232.78, 0.73)
	pt3dadd(-897.24, 598.51, -231.04, 0.55)
	pt3dadd(-896.04, 597.55, -231.26, 0.55)
	pt3dadd(-895.61, 597.1, -231.26, 0.73)
	pt3dadd(-894.84, 596.41, -231.26, 0.55)
	pt3dadd(-893.03, 595.77, -230.55, 0.55)
	pt3dadd(-891.47, 595.58, -230.5, 0.55)
	pt3dadd(-890.27, 594.93, -228.54, 0.55)
	pt3dadd(-889.06, 593.98, -227.13, 0.55)
	pt3dadd(-888.06, 593.54, -226.59, 0.55)
	pt3dadd(-887.64, 592.59, -226.59, 0.36)
	pt3dadd(-887.8, 591.87, -226.31, 0.36)
	pt3dadd(-887.38, 591.38, -226.04, 0.36)
	pt3dadd(-885.55, 589.29, -225.93, 0.55)
	pt3dadd(-884.75, 588.83, -223.87, 0.55)
	pt3dadd(-883.97, 588.14, -224.19, 0.55)
	pt3dadd(-883.34, 587.91, -223.87, 0.55)
	pt3dadd(-882.69, 586.73, -223.22, 0.55)
	pt3dadd(-883.02, 585.01, -222.84, 0.36)
	pt3dadd(-881.99, 583.6, -222.62, 0.55)
	pt3dadd(-882, 583.35, -222.62, 0.55)
	pt3dadd(-880.33, 581.74, -222.51, 0.55)
	pt3dadd(-879.09, 579.36, -221.86, 0.73)
	pt3dadd(-877.63, 577.5, -219.79, 0.73)
	pt3dadd(-877.01, 576.3, -219.63, 0.91)
	pt3dadd(-876.36, 575.11, -220.06, 0.73)
	pt3dadd(-875.68, 572.96, -219.36, 0.55)
	pt3dadd(-875.44, 571.51, -219.63, 0.36)
	pt3dadd(-874.25, 571.34, -217.62, 0.36)
	pt3dadd(-873.17, 569.42, -215.39, 0.73)
	pt3dadd(-872.56, 568.71, -214.68, 0.73)
	pt3dadd(-872.34, 567.74, -214.08, 0.55)
	pt3dadd(-870.96, 567.36, -214.3, 0.55)
	pt3dadd(-869.74, 566.67, -213.16, 0.36)
	pt3dadd(-868.78, 566.21, -212.67, 0.36)
	pt3dadd(-867.75, 565.03, -211.64, 0.55)
	pt3dadd(-867.7, 564.3, -209.63, 0.55)
	pt3dadd(-866.47, 562.66, -208.49, 0.73)
	pt3dadd(-865.07, 561.76, -208.32, 0.73)
	pt3dadd(-864.04, 560.59, -208.11, 0.73)
	pt3dadd(-863.17, 558.93, -208.21, 0.91)
	pt3dadd(-862.18, 558.27, -208.32, 0.73)
	pt3dadd(-861.93, 557.06, -208.32, 0.55)
	pt3dadd(-860.53, 556.38, -207.73, 0.36)
	pt3dadd(-860.53, 556.38, -207.78, 0.36)
	pt3dadd(-861.05, 554.91, -206.53, 0.55)
	pt3dadd(-861.06, 555.39, -206.53, 0.55)
	pt3dadd(-860.78, 552.92, -205.55, 0.55)
	pt3dadd(-860.19, 552, -204.63, 0.36)
	pt3dadd(-858.94, 551.33, -203.05, 0.36)
	pt3dadd(-856.84, 551.41, -202.18, 0.55)
	pt3dadd(-854.81, 549.31, -201.58, 0.73)
	pt3dadd(-852.74, 547.46, -200.23, 0.55)
	pt3dadd(-851.11, 545.58, -199.84, 0.55)
	pt3dadd(-850.43, 543.65, -199.46, 0.55)
	pt3dadd(-849.99, 542.49, -198.98, 0.55)
	pt3dadd(-849.13, 540.32, -198.87, 0.36)
	pt3dadd(-849.27, 538.88, -198.49, 0.55)
	pt3dadd(-848.77, 536.69, -197.78, 0.73)
	pt3dadd(-848.11, 535.03, -196.75, 0.73)
	pt3dadd(-846.48, 533.62, -195.01, 0.55)
	pt3dadd(-844.49, 532.29, -194.57, 0.73)
	pt3dadd(-843.5, 531.57, -193.98, 0.73)
	pt3dadd(-842.42, 529.68, -193, 0.91)
	pt3dadd(-841.57, 528.26, -192.56, 0.91)
	pt3dadd(-840.96, 527.36, -192.56, 0.73)
	pt3dadd(-840.78, 527.8, -192.56, 0.73)
	pt3dadd(-840.88, 526.11, -191.8, 0.55)
	pt3dadd(-841.2, 524.65, -190.71, 0.55)
	pt3dadd(-841.26, 525.13, -190.71, 0.55)
	pt3dadd(-841.13, 522.93, -190.88, 0.36)
	pt3dadd(-839.95, 522.27, -190.44, 0.55)
	pt3dadd(-837.4, 521.65, -189.74, 0.55)
	pt3dadd(-836.34, 519.51, -188.81, 0.73)
	pt3dadd(-835.42, 517.02, -188.65, 0.73)
	pt3dadd(-833.53, 513.97, -188.59, 0.73)
	pt3dadd(-832.33, 513.05, -189.3, 0.55)
	pt3dadd(-831.52, 512.1, -189.3, 0.73)
	pt3dadd(-830.25, 509.99, -189.19, 0.91)
	pt3dadd(-828.85, 509.56, -188.87, 0.73)
	pt3dadd(-826.69, 508.68, -189.25, 0.55)
	pt3dadd(-825.08, 508.01, -188.97, 0.55)
	pt3dadd(-824.46, 506.83, -188.81, 0.55)
	pt3dadd(-824.46, 507.07, -188.81, 0.55)
	pt3dadd(-823.65, 505.91, -188.54, 0.55)
	pt3dadd(-821.88, 504.98, -187.67, 0.73)
	pt3dadd(-820.82, 503.58, -186.64, 0.73)
	pt3dadd(-819.41, 502.93, -186.42, 0.91)
	pt3dadd(-818.2, 501.53, -185.61, 0.73)
	pt3dadd(-816.35, 500.13, -184.79, 0.91)
	pt3dadd(-815.12, 498.02, -184.68, 0.73)
	pt3dadd(-814.28, 497.29, -185.06, 0.73)
	pt3dadd(-813.89, 496.62, -185.99, 0.73)
	pt3dadd(-813.41, 495.16, -186.53, 0.55)
	pt3dadd(-812.2, 494.02, -186.58, 0.55)
	pt3dadd(-810.82, 493.1, -186.31, 0.55)
	pt3dadd(-809.62, 492.65, -186.53, 0.73)
	pt3dadd(-808.83, 492.45, -186.37, 0.55)
	pt3dadd(-807.64, 491.75, -185.39, 0.36)
	pt3dadd(-805.87, 490.66, -184.79, 0.36)
	pt3dadd(-804.24, 490.24, -184.79, 0.55)
	pt3dadd(-801.92, 490.32, -184.36, 0.55)
	pt3dadd(-801.7, 489.84, -184.36, 0.55)
	pt3dadd(-800.88, 488.9, -183.76, 0.73)
	pt3dadd(-798.29, 488.07, -182.62, 0.73)
	pt3dadd(-796.12, 486.92, -182.62, 0.73)
	pt3dadd(-794.54, 486.3, -182.24, 0.55)
	pt3dadd(-792.13, 484.93, -181.69, 0.73)
	pt3dadd(-789.55, 483, -182.67, 0.73)
	pt3dadd(-788.56, 482.05, -182.56, 0.55)
  }
  dend[22] {pt3dclear()
	pt3dadd(-788.56, 482.05, -182.56, 0.55)
	pt3dadd(-787, 482.12, -182.45, 0.55)
	pt3dadd(-785.24, 482.19, -182.56, 0.73)
	pt3dadd(-783.5, 482.8, -182.83, 0.55)
	pt3dadd(-781.61, 484.05, -182.72, 0.55)
	pt3dadd(-781.06, 484.79, -182.02, 0.36)
	pt3dadd(-780.29, 485.33, -182.24, 0.55)
	pt3dadd(-779.16, 485.63, -181.86, 0.55)
	pt3dadd(-777.82, 486.9, -181.2, 0.36)
	pt3dadd(-776.7, 487.67, -180.77, 0.36)
	pt3dadd(-775.61, 488.21, -179.84, 0.55)
	pt3dadd(-775.79, 488.69, -179.52, 0.55)
	pt3dadd(-775.43, 489.45, -179.52, 0.55)
	pt3dadd(-774.87, 489.69, -178.65, 0.55)
	pt3dadd(-774.34, 490.7, -178, 0.36)
	pt3dadd(-773.95, 491.19, -178, 0.36)
	pt3dadd(-773.58, 491.71, -177.72, 0.55)
	pt3dadd(-773.01, 492.23, -177.72, 0.73)
	pt3dadd(-772.69, 493.19, -175.82, 0.73)
	pt3dadd(-772.69, 493.46, -175.44, 0.73)
	pt3dadd(-772.32, 493.7, -175.44, 0.36)
	pt3dadd(-770.9, 495.46, -175.44, 0.55)
	pt3dadd(-768.24, 496.32, -175.28, 0.55)
	pt3dadd(-766.14, 497.28, -175.28, 0.36)
  }
}
proc shape3d_14() {
  dend[22] {	pt3dadd(-764.67, 498.03, -174.68, 0.55)
	pt3dadd(-761.79, 498.86, -175.39, 0.55)
	pt3dadd(-758.98, 499.23, -175.39, 0.55)
	pt3dadd(-758.31, 499.25, -175.39, 0.55)
	pt3dadd(-756.95, 499.3, -175.39, 0.55)
	pt3dadd(-755.58, 499.36, -176.85, 0.73)
	pt3dadd(-755.58, 499.36, -176.91, 0.73)
	pt3dadd(-753.47, 499.96, -177.34, 0.55)
	pt3dadd(-751.51, 500.09, -177.78, 0.73)
	pt3dadd(-750.56, 500.11, -178.21, 0.73)
	pt3dadd(-749.02, 500.44, -178.21, 0.55)
	pt3dadd(-747.26, 500.52, -178.59, 0.73)
	pt3dadd(-745.94, 501.31, -178.1, 0.55)
	pt3dadd(-743.84, 502.15, -177.89, 0.55)
	pt3dadd(-743.26, 502.43, -177.51, 0.73)
	pt3dadd(-741.94, 503.22, -177.89, 0.73)
	pt3dadd(-741.22, 504.46, -177.72, 0.55)
	pt3dadd(-740.31, 505.49, -177.94, 0.55)
	pt3dadd(-738.77, 506.03, -178.38, 0.36)
	pt3dadd(-738, 506.32, -178.38, 0.36)
	pt3dadd(-736.55, 508.11, -178.38, 0.36)
	pt3dadd(-735.18, 508.18, -178.05, 0.55)
	pt3dadd(-734.48, 509.65, -178.21, 0.55)
	pt3dadd(-735.03, 509.14, -177.94, 0.55)
	pt3dadd(-732.58, 510.5, -177.29, 0.55)
	pt3dadd(-731.4, 510.79, -177.45, 0.36)
	pt3dadd(-729.68, 511.62, -177.24, 0.36)
	pt3dadd(-727.8, 513.17, -175.71, 0.36)
	pt3dadd(-726.64, 513.22, -175.71, 0.55)
	pt3dadd(-725.5, 513.52, -175.77, 0.73)
	pt3dadd(-723.6, 514.59, -175.28, 0.55)
	pt3dadd(-722.67, 515.37, -175.33, 0.36)
	pt3dadd(-720.93, 515.71, -175.22, 0.36)
	pt3dadd(-719.2, 516.27, -175.44, 0.36)
	pt3dadd(-717.1, 517.09, -175.82, 0.55)
	pt3dadd(-714.36, 516.74, -176.09, 0.73)
	pt3dadd(-712.98, 516.82, -176.09, 0.73)
	pt3dadd(-711.86, 515.35, -171.53, 0.36)
	pt3dadd(-710.88, 514.63, -171.53, 0.18)
	pt3dadd(-709.7, 513.18, -171.8, 0.18)
	pt3dadd(-708.9, 511.76, -172.83, 0.18)
	pt3dadd(-708.89, 511.51, -172.94, 0.18)
	pt3dadd(-708.27, 509.82, -173, 0.18)
	pt3dadd(-707.67, 509.11, -173, 0.18)
	pt3dadd(-707.34, 508.75, -173, 0.36)
	pt3dadd(-705.66, 507.86, -173, 0.36)
	pt3dadd(-703.38, 509.32, -171.15, 0.36)
	pt3dadd(-702.38, 509.24, -170.88, 0.36)
	pt3dadd(-700.4, 509.52, -169.3, 0.36)
	pt3dadd(-699.05, 509.37, -169.3, 0.36)
	pt3dadd(-697.18, 508.66, -168.05, 0.36)
	pt3dadd(-696.56, 508.86, -168.05, 0.36)
	pt3dadd(-694.99, 508.98, -166.8, 0.36)
	pt3dadd(-693.3, 508.06, -165.06, 0.36)
	pt3dadd(-691.23, 507.59, -164.14, 0.36)
	pt3dadd(-690.23, 507.49, -162.51, 0.55)
	pt3dadd(-689.52, 507.18, -161.04, 0.36)
	pt3dadd(-688.16, 507.04, -160.28, 0.36)
	pt3dadd(-686.02, 506.81, -160.01, 0.36)
	pt3dadd(-685.37, 507.47, -159.03, 0.36)
	pt3dadd(-684.43, 507.39, -158.87, 0.36)
	pt3dadd(-683.03, 507.46, -158.87, 0.36)
	pt3dadd(-681.78, 508.09, -158.38, 0.36)
	pt3dadd(-679.98, 508.43, -157.07, 0.55)
	pt3dadd(-679.59, 508.62, -156.8, 0.36)
	pt3dadd(-678.6, 508.73, -156.8, 0.36)
	pt3dadd(-677.39, 508.86, -155.5, 0.55)
	pt3dadd(-675.86, 508.69, -158.97, 0.36)
	pt3dadd(-675.42, 509.14, -152.83, 0.36)
	pt3dadd(-672.47, 509.33, -152.83, 0.36)
	pt3dadd(-670.94, 510.67, -151.04, 0.55)
	pt3dadd(-668.94, 511.17, -148.32, 0.36)
	pt3dadd(-667.5, 512.25, -148.32, 0.36)
	pt3dadd(-666.49, 514.32, -146.15, 0.36)
	pt3dadd(-666.23, 515.02, -145.11, 0.36)
	pt3dadd(-665.18, 515.45, -143.54, 0.36)
	pt3dadd(-663.23, 515.72, -142.07, 0.36)
	pt3dadd(-660.99, 514.91, -142.13, 0.36)
	pt3dadd(-658.7, 514.19, -142.13, 0.36)
	pt3dadd(-656.63, 513.26, -142.07, 0.36)
	pt3dadd(-654.94, 512.57, -142.07, 0.36)
	pt3dadd(-653.06, 511.92, -142.4, 0.36)
	pt3dadd(-653.06, 511.92, -142.45, 0.36)
	pt3dadd(-651.17, 511.5, -143.76, 0.36)
	pt3dadd(-650.65, 510.93, -144.57, 0.36)
	pt3dadd(-648.94, 512, -144.14, 0.55)
	pt3dadd(-648.28, 512.89, -144.14, 0.55)
	pt3dadd(-647.42, 513.52, -144.14, 0.36)
	pt3dadd(-646.64, 513.72, -142.78, 0.36)
	pt3dadd(-645.69, 515.3, -142.78, 0.36)
	pt3dadd(-645.98, 516.28, -142.29, 0.36)
	pt3dadd(-645.99, 517.77, -142.4, 0.55)
	pt3dadd(-646.74, 518.58, -139.46, 0.36)
	pt3dadd(-647.51, 518.4, -139.46, 0.36)
	pt3dadd(-649.16, 517.61, -139.46, 0.36)
  }
  dend[23] {pt3dclear()
	pt3dadd(-788.56, 482.05, -182.56, 0.73)
	pt3dadd(-787.74, 481.11, -182.29, 0.73)
	pt3dadd(-787.47, 479.19, -182.34, 0.73)
	pt3dadd(-787.19, 477.76, -182.13, 0.55)
	pt3dadd(-786.8, 477.78, -182.13, 0.55)
	pt3dadd(-785.77, 476.85, -180.55, 0.55)
	pt3dadd(-785.17, 476.11, -180.66, 0.55)
	pt3dadd(-784.71, 474.21, -179.9, 0.36)
	pt3dadd(-783.68, 473.29, -179.68, 0.36)
	pt3dadd(-782.46, 472.37, -179.41, 0.36)
	pt3dadd(-780.67, 471.48, -178.65, 0.18)
	pt3dadd(-779.46, 470.35, -178.49, 0.36)
	pt3dadd(-778.02, 468.71, -178.49, 0.36)
	pt3dadd(-777.59, 467.25, -177.94, 0.36)
	pt3dadd(-776.86, 464.87, -178.05, 0.55)
	pt3dadd(-775.07, 463.72, -177.89, 0.55)
	pt3dadd(-773.45, 462.34, -177.56, 0.36)
	pt3dadd(-772.29, 461.9, -176.64, 0.36)
	pt3dadd(-771.84, 460.46, -176.75, 0.18)
	pt3dadd(-770.38, 458.8, -176.85, 0.18)
	pt3dadd(-769.36, 457.88, -176.64, 0.18)
	pt3dadd(-768.37, 456.97, -176.69, 0.36)
	pt3dadd(-767.35, 456.05, -176.47, 0.18)
  }
  dend[24] {pt3dclear()
	pt3dadd(-1022.32, 854.9, -2.39, 1.46)
	pt3dadd(-1020.83, 854.31, -0.33, 1.46)
	pt3dadd(-1019.14, 853.23, -0.33, 1.28)
	pt3dadd(-1017.06, 852.15, -0.54, 0.91)
	pt3dadd(-1015.97, 850.87, -2.34, 1.09)
	pt3dadd(-1016.02, 850.39, -1.58, 1.28)
	pt3dadd(-1016.02, 850.39, -1.52, 1.28)
	pt3dadd(-1015.16, 848.34, -1.52, 0.91)
	pt3dadd(-1012.94, 846.77, -2.34, 0.91)
	pt3dadd(-1011.4, 845.92, -3.7, 0.91)
	pt3dadd(-1009.52, 844.83, -4.29, 1.09)
	pt3dadd(-1009.75, 844.82, -4.29, 1.09)
	pt3dadd(-1008.16, 843.03, -4.29, 1.09)
	pt3dadd(-1007.01, 841.76, -5.27, 0.91)
	pt3dadd(-1005.59, 839.94, -5.38, 0.91)
	pt3dadd(-1003.71, 838.62, -5.98, 0.73)
	pt3dadd(-1001.23, 837.7, -7.34, 0.91)
	pt3dadd(-998.7, 837.77, -7.99, 0.73)
	pt3dadd(-995.24, 836.84, -8.7, 0.73)
	pt3dadd(-994.23, 834.58, -9.51, 0.91)
	pt3dadd(-992.79, 833.01, -8.97, 1.09)
	pt3dadd(-992.79, 833.01, -9.02, 1.09)
	pt3dadd(-991.9, 831.75, -9.02, 1.09)
	pt3dadd(-990.16, 831.39, -9.02, 0.91)
	pt3dadd(-988.07, 830.52, -9.4, 0.73)
	pt3dadd(-986.4, 829.42, -9.78, 0.55)
	pt3dadd(-984.83, 829.07, -10.11, 0.55)
	pt3dadd(-983.58, 827.8, -10.76, 0.55)
	pt3dadd(-981.92, 826.47, -11.52, 0.55)
	pt3dadd(-980.74, 826.39, -12.07, 0.55)
	pt3dadd(-978.66, 825.77, -12.01, 0.73)
	pt3dadd(-977.52, 824.97, -12.83, 0.91)
	pt3dadd(-976.4, 824.39, -13.8, 0.73)
	pt3dadd(-974.7, 823.54, -14.57, 0.73)
	pt3dadd(-972.84, 822.22, -15.44, 0.73)
	pt3dadd(-969.76, 822.02, -15.82, 0.91)
	pt3dadd(-968.02, 821.4, -16.31, 0.73)
	pt3dadd(-966.12, 820.8, -17.17, 0.73)
	pt3dadd(-964.2, 820.45, -18.04, 0.73)
	pt3dadd(-962.31, 819.34, -18.48, 0.55)
	pt3dadd(-960.01, 818.72, -19.19, 0.73)
	pt3dadd(-958.28, 818.57, -19.78, 0.73)
	pt3dadd(-955.88, 817.82, -19.35, 0.73)
	pt3dadd(-952.83, 816.38, -19.89, 0.73)
	pt3dadd(-950.34, 815.99, -19.89, 0.73)
	pt3dadd(-947.89, 814.85, -19.62, 0.55)
	pt3dadd(-944.83, 813.91, -20.87, 0.55)
	pt3dadd(-943.67, 813.59, -21.79, 0.55)
	pt3dadd(-940.71, 814.36, -21.9, 0.73)
	pt3dadd(-937.16, 814.59, -21.63, 0.73)
	pt3dadd(-933.89, 814.16, -21.41, 0.73)
	pt3dadd(-931.4, 813.53, -23.15, 0.73)
	pt3dadd(-929.18, 811.66, -24.08, 0.73)
	pt3dadd(-926.42, 809.3, -24.67, 0.73)
	pt3dadd(-924.79, 807, -23.86, 0.73)
	pt3dadd(-921.4, 805.55, -24.02, 0.91)
	pt3dadd(-919.17, 803.7, -24.4, 0.91)
	pt3dadd(-918.46, 802.44, -24.51, 0.73)
	pt3dadd(-916.89, 800.13, -24.24, 0.91)
	pt3dadd(-913.9, 798.01, -24.46, 0.91)
	pt3dadd(-913.3, 795.54, -25.33, 0.73)
	pt3dadd(-910.71, 793.19, -24.84, 0.91)
	pt3dadd(-909.78, 792.87, -25.16, 0.73)
	pt3dadd(-908.28, 791.78, -25.11, 0.73)
	pt3dadd(-906.96, 790.59, -25.92, 0.91)
	pt3dadd(-905.13, 789.03, -25.38, 0.91)
	pt3dadd(-903.72, 786.49, -25.16, 0.91)
	pt3dadd(-902.38, 785.94, -25.44, 0.91)
	pt3dadd(-902.38, 785.94, -25.38, 0.91)
	pt3dadd(-899.49, 785.03, -25.16, 0.73)
	pt3dadd(-897.4, 784.61, -25.98, 0.55)
	pt3dadd(-896.29, 783.57, -26.2, 0.55)
	pt3dadd(-894.41, 780.51, -27.28, 0.73)
	pt3dadd(-893.22, 779.95, -27.94, 0.73)
	pt3dadd(-891.61, 778.17, -27.61, 0.91)
	pt3dadd(-890.28, 777.8, -27.77, 0.91)
	pt3dadd(-888.78, 776.28, -29.4, 0.73)
	pt3dadd(-887.92, 774.75, -30.44, 0.73)
	pt3dadd(-887.22, 773.01, -30.06, 0.73)
	pt3dadd(-886.17, 771.46, -32.28, 0.73)
	pt3dadd(-884.88, 770.65, -32.18, 0.73)
	pt3dadd(-883.12, 767.86, -32.28, 0.91)
  }
}
proc shape3d_15() {
  dend[24] {	pt3dadd(-882.21, 766.83, -32.99, 0.91)
	pt3dadd(-881.88, 762.92, -33.04, 1.09)
	pt3dadd(-881.27, 760.69, -34.13, 1.09)
	pt3dadd(-880.17, 759.4, -35.11, 0.91)
	pt3dadd(-879.04, 758.6, -35.11, 0.91)
	pt3dadd(-877.61, 757.29, -35.44, 0.73)
	pt3dadd(-876.71, 755.5, -35.65, 0.91)
	pt3dadd(-876.07, 753.53, -37.5, 0.91)
	pt3dadd(-874.67, 751.32, -37.56, 0.91)
	pt3dadd(-873.47, 748.8, -38.15, 0.73)
	pt3dadd(-871.86, 746.75, -39.35, 0.91)
	pt3dadd(-871.18, 745.23, -40.82, 0.73)
	pt3dadd(-870.77, 742.76, -41.96, 0.91)
	pt3dadd(-869.49, 741.49, -43.1, 0.91)
	pt3dadd(-869.2, 739.76, -42.23, 0.73)
	pt3dadd(-869.33, 737.82, -42.77, 0.55)
	pt3dadd(-868.46, 736.29, -44.4, 0.55)
	pt3dadd(-867.21, 734.52, -45.44, 0.73)
	pt3dadd(-866.52, 733.03, -45.87, 0.73)
	pt3dadd(-865.24, 731.94, -46.25, 0.73)
	pt3dadd(-865.02, 729.26, -46.63, 0.91)
	pt3dadd(-862.79, 727.88, -46.74, 0.73)
	pt3dadd(-862.11, 726.39, -46.8, 0.73)
	pt3dadd(-860.1, 724.08, -47.99, 0.73)
	pt3dadd(-860.03, 722.62, -49.19, 0.73)
	pt3dadd(-859.71, 721.64, -49.19, 0.73)
	pt3dadd(-859.11, 720.94, -49.19, 0.91)
	pt3dadd(-857.52, 719.77, -49.19, 0.91)
	pt3dadd(-855.74, 718.37, -51.03, 0.73)
	pt3dadd(-854.73, 717.67, -52.23, 0.73)
	pt3dadd(-853.55, 716.47, -52.45, 0.91)
	pt3dadd(-852.7, 714.32, -52.99, 0.73)
	pt3dadd(-851.12, 712.68, -54.51, 0.73)
	pt3dadd(-850.31, 711.73, -55.44, 0.73)
	pt3dadd(-849.12, 711.5, -55.44, 0.55)
	pt3dadd(-848.16, 711.27, -56.03, 0.55)
	pt3dadd(-848.31, 710.56, -56.03, 0.55)
	pt3dadd(-847.14, 709.12, -55.87, 0.73)
	pt3dadd(-845.72, 707.7, -56.85, 0.91)
	pt3dadd(-844.51, 706.27, -57.34, 0.73)
	pt3dadd(-843.53, 705.59, -58.21, 0.73)
	pt3dadd(-841.36, 704.43, -58.1, 0.55)
	pt3dadd(-840.17, 703.01, -58.1, 0.55)
	pt3dadd(-839.15, 701.81, -59.24, 0.55)
	pt3dadd(-838.31, 700.88, -60.71, 0.55)
	pt3dadd(-836.55, 699.93, -61.2, 0.55)
	pt3dadd(-835.2, 699.27, -62.29, 0.55)
	pt3dadd(-833.94, 697.34, -62.39, 0.73)
	pt3dadd(-832.34, 695.45, -63.64, 0.73)
	pt3dadd(-830.93, 693.79, -64.84, 0.73)
	pt3dadd(-829.73, 692.61, -65.38, 0.73)
	pt3dadd(-829.33, 691.66, -66.04, 0.73)
	pt3dadd(-827.76, 691.45, -68.21, 0.73)
	pt3dadd(-826.79, 690.73, -68.21, 0.73)
	pt3dadd(-826.76, 689.79, -70.27, 0.55)
	pt3dadd(-825.58, 688.58, -70.87, 0.55)
	pt3dadd(-824.76, 688.36, -71.74, 0.55)
	pt3dadd(-824.75, 686.9, -71.74, 0.55)
	pt3dadd(-824.53, 686.18, -72.83, 0.55)
	pt3dadd(-823.72, 685, -74.19, 0.73)
	pt3dadd(-822.31, 684.33, -75.38, 0.91)
	pt3dadd(-821.13, 684.1, -77.5, 0.73)
	pt3dadd(-818.75, 682.93, -77.67, 0.55)
	pt3dadd(-817.3, 681.99, -76.25, 0.36)
	pt3dadd(-815.72, 680.58, -76.25, 0.55)
	pt3dadd(-815.08, 679.14, -77.12, 0.55)
	pt3dadd(-813.48, 677.47, -79.79, 0.36)
	pt3dadd(-813.46, 676.73, -80.87, 0.36)
	pt3dadd(-813.46, 676.73, -80.82, 0.36)
	pt3dadd(-813.25, 674.57, -82.61, 0.55)
	pt3dadd(-811.23, 672.93, -83.75, 0.55)
	pt3dadd(-810.42, 671.5, -84.3, 0.55)
	pt3dadd(-809.77, 670.05, -84.3, 0.55)
	pt3dadd(-809.19, 668.38, -85.66, 0.73)
	pt3dadd(-808.36, 667.41, -87.61, 0.73)
	pt3dadd(-807.17, 666.47, -90.28, 0.73)
	pt3dadd(-805.79, 665.77, -90.28, 0.55)
	pt3dadd(-804.39, 664.86, -92.34, 0.55)
	pt3dadd(-802.41, 663.21, -92.18, 0.55)
	pt3dadd(-799.83, 661.81, -93.1, 0.36)
	pt3dadd(-798.84, 661.61, -93.81, 0.36)
	pt3dadd(-798.42, 659.68, -93.43, 0.36)
	pt3dadd(-797.41, 658.72, -94.03, 0.55)
	pt3dadd(-795.83, 658.06, -93.54, 0.55)
	pt3dadd(-795.12, 657.37, -93.54, 0.55)
	pt3dadd(-794.68, 655.43, -93.54, 0.55)
	pt3dadd(-794.47, 653.74, -95.93, 0.55)
	pt3dadd(-793.86, 652.53, -95.93, 0.55)
	pt3dadd(-792.66, 650.11, -97.29, 0.55)
	pt3dadd(-792.04, 648.45, -97.45, 0.55)
	pt3dadd(-791.25, 647.25, -98.37, 0.55)
	pt3dadd(-790.03, 645.56, -98.37, 0.36)
	pt3dadd(-789.27, 645.32, -100.11, 0.36)
	pt3dadd(-788.65, 644.62, -100.38, 0.73)
	pt3dadd(-788.24, 642.45, -100.38, 0.91)
	pt3dadd(-787.03, 640.31, -100.98, 0.91)
	pt3dadd(-785.83, 638.35, -102.12, 0.73)
	pt3dadd(-785.39, 636.18, -101.85, 0.55)
	pt3dadd(-783.79, 634.04, -102.01, 0.55)
	pt3dadd(-783.37, 631.85, -102.99, 0.55)
	pt3dadd(-781.59, 630.45, -103.26, 0.36)
	pt3dadd(-781.59, 630.45, -103.32, 0.36)
	pt3dadd(-779.79, 628.51, -103.48, 0.55)
	pt3dadd(-779.02, 627.82, -103.86, 0.55)
	pt3dadd(-777.22, 625.4, -103.92, 0.55)
	pt3dadd(-775.67, 623.16, -102.61, 0.55)
	pt3dadd(-774.3, 622.2, -102.78, 0.55)
	pt3dadd(-773.06, 620.32, -102.07, 0.73)
	pt3dadd(-771.11, 618.39, -102.12, 0.73)
	pt3dadd(-770.48, 616.2, -102.34, 0.73)
	pt3dadd(-770.05, 614.26, -102.83, 0.91)
	pt3dadd(-769.65, 612.86, -103.21, 0.91)
	pt3dadd(-769.82, 611.15, -104.84, 0.73)
	pt3dadd(-769.95, 609.2, -105.66, 0.73)
	pt3dadd(-769.56, 607.74, -106.85, 0.73)
	pt3dadd(-767.73, 604.87, -107.99, 0.73)
	pt3dadd(-766.92, 601.99, -108.16, 0.55)
	pt3dadd(-765.13, 600.78, -108.81, 0.36)
	pt3dadd(-764.16, 599.83, -109.46, 0.36)
	pt3dadd(-763.14, 598.9, -109.68, 0.55)
	pt3dadd(-761.76, 596.5, -109.62, 0.55)
	pt3dadd(-760.56, 595.08, -109.68, 0.73)
	pt3dadd(-760.33, 593.6, -109.62, 0.73)
	pt3dadd(-758.95, 591.71, -109.79, 0.55)
	pt3dadd(-757.37, 591.21, -110.22, 0.55)
	pt3dadd(-756.16, 589.06, -108.86, 0.73)
	pt3dadd(-754.49, 586.74, -108.75, 0.55)
	pt3dadd(-753.09, 584.8, -109.13, 0.55)
	pt3dadd(-753.03, 581.65, -108.48, 0.55)
	pt3dadd(-753.03, 581.65, -108.43, 0.55)
	pt3dadd(-752.84, 580.45, -108.75, 0.36)
	pt3dadd(-752.63, 579.26, -108.43, 0.36)
	pt3dadd(-752, 576.33, -108.48, 0.36)
	pt3dadd(-751.56, 575.39, -108.27, 0.36)
	pt3dadd(-750.98, 574.44, -108.54, 0.36)
	pt3dadd(-751.33, 574.18, -108.05, 0.36)
	pt3dadd(-751.12, 572.74, -108.81, 0.55)
	pt3dadd(-751.27, 570.79, -108.05, 0.73)
	pt3dadd(-751.27, 569.58, -108.7, 0.73)
  }
  dend[25] {pt3dclear()
	pt3dadd(-751.27, 569.58, -108.7, 0.36)
	pt3dadd(-749.06, 566.93, -108.59, 0.36)
	pt3dadd(-748.28, 566.47, -108.86, 0.36)
	pt3dadd(-747.67, 564.76, -108.86, 0.18)
	pt3dadd(-746.47, 562.62, -111.09, 0.18)
	pt3dadd(-744.67, 559.98, -111.74, 0.18)
	pt3dadd(-743.49, 559.52, -112.72, 0.18)
	pt3dadd(-742.88, 559.01, -113.21, 0.18)
	pt3dadd(-743.03, 557.11, -113.59, 0.36)
	pt3dadd(-743.03, 555.89, -113.59, 0.36)
	pt3dadd(-743.77, 554.67, -114.68, 0.36)
	pt3dadd(-745.12, 552.95, -114.9, 0.36)
	pt3dadd(-745.55, 551.4, -115.82, 0.36)
	pt3dadd(-746.74, 550.41, -115.77, 0.55)
	pt3dadd(-748.64, 549.64, -115.6, 0.36)
	pt3dadd(-749.99, 548.4, -116.8, 0.36)
	pt3dadd(-751.11, 546.67, -116.8, 0.36)
	pt3dadd(-751.28, 544.01, -118.32, 0.55)
	pt3dadd(-751.46, 543.28, -119.52, 0.55)
	pt3dadd(-751.62, 541.81, -120, 0.55)
	pt3dadd(-752.34, 540.14, -120.49, 0.55)
	pt3dadd(-752.31, 538.19, -120.82, 0.36)
	pt3dadd(-752.89, 536, -121.85, 0.36)
	pt3dadd(-752.86, 534.29, -124.14, 0.36)
	pt3dadd(-752.82, 532.59, -124.57, 0.36)
	pt3dadd(-752.96, 531.1, -126.26, 0.36)
	pt3dadd(-752.96, 531.1, -126.31, 0.36)
	pt3dadd(-751.75, 528.97, -126.31, 0.55)
	pt3dadd(-750.98, 527.76, -127.34, 0.55)
	pt3dadd(-750.98, 527.76, -127.29, 0.55)
	pt3dadd(-750.93, 526.29, -128.54, 0.55)
	pt3dadd(-751.69, 524.35, -128.54, 0.36)
	pt3dadd(-750.88, 523.41, -128.92, 0.36)
	pt3dadd(-750.49, 522.92, -130.11, 0.36)
	pt3dadd(-750.49, 522.92, -130.17, 0.36)
	pt3dadd(-749.66, 520.49, -130.49, 0.36)
	pt3dadd(-749.63, 519.78, -131.96, 0.36)
	pt3dadd(-750.39, 518.08, -132.94, 0.36)
	pt3dadd(-750.39, 518.08, -132.99, 0.36)
	pt3dadd(-750.96, 517.31, -133.81, 0.36)
	pt3dadd(-750.96, 517.31, -133.86, 0.36)
	pt3dadd(-752.28, 515.11, -131.64, 0.36)
  }
  dend[26] {pt3dclear()
	pt3dadd(-751.27, 569.58, -108.7, 0.36)
	pt3dadd(-752.06, 566.59, -109.19, 0.36)
  }
  dend[27] {pt3dclear()
	pt3dadd(-752.06, 566.59, -109.19, 0.36)
	pt3dadd(-752.61, 565.82, -110.28, 0.36)
	pt3dadd(-753.39, 564.62, -110.28, 0.36)
	pt3dadd(-751.63, 563.67, -110.28, 0.36)
	pt3dadd(-750.82, 562.98, -110.66, 0.36)
	pt3dadd(-749.87, 562.72, -109.46, 0.36)
	pt3dadd(-748.88, 562.5, -108.27, 0.36)
	pt3dadd(-748.66, 562.28, -109.08, 0.36)
  }
  dend[28] {pt3dclear()
	pt3dadd(-752.06, 566.59, -109.19, 0.36)
	pt3dadd(-751.27, 564.63, -110.28, 0.36)
	pt3dadd(-750.25, 564.18, -111.53, 0.36)
	pt3dadd(-751.04, 562.49, -111.53, 0.36)
	pt3dadd(-751.17, 560.27, -111.91, 0.55)
	pt3dadd(-750.8, 560.53, -111.91, 0.55)
	pt3dadd(-752.31, 558.81, -112.72, 0.55)
	pt3dadd(-754.02, 557.79, -112.72, 0.55)
	pt3dadd(-754.63, 557.07, -114.41, 0.36)
  }
}
proc shape3d_16() {
  dend[28] {	pt3dadd(-755.18, 556.06, -115.11, 0.36)
	pt3dadd(-756.13, 555.34, -116.8, 0.36)
	pt3dadd(-757.09, 554.59, -119.3, 0.36)
	pt3dadd(-758.62, 553.11, -119.3, 0.36)
	pt3dadd(-758.6, 552.85, -120, 0.36)
	pt3dadd(-759, 551.89, -120.44, 0.36)
	pt3dadd(-760.11, 549.96, -120.49, 0.36)
	pt3dadd(-761.45, 548.47, -122.23, 0.36)
	pt3dadd(-762.8, 548.41, -122.61, 0.36)
	pt3dadd(-763.94, 546.47, -123.1, 0.55)
	pt3dadd(-764.5, 545.25, -123.54, 0.36)
	pt3dadd(-766.79, 543.73, -126.04, 0.36)
	pt3dadd(-767.56, 542.27, -126.04, 0.36)
	pt3dadd(-767.56, 541.06, -129.24, 0.36)
	pt3dadd(-767.71, 539.36, -131.42, 0.36)
	pt3dadd(-767.33, 539.12, -134.57, 0.36)
	pt3dadd(-766.69, 538.41, -134.57, 0.36)
	pt3dadd(-764.94, 537.23, -136.53, 0.36)
	pt3dadd(-764.91, 536.02, -136.47, 0.55)
  }
  dend[29] {pt3dclear()
	pt3dstyle(1, -1039.9, 870.89, 14.0078)
	pt3dadd(-1034.72, 866.32, 12.99, 2.92)
	pt3dadd(-1034.72, 866.32, 12.99, 2.92)
	pt3dadd(-1034.68, 865.58, 12.99, 2.55)
	pt3dadd(-1034.59, 864.12, 12.5, 2.19)
	pt3dadd(-1034.86, 862.38, 12.5, 1.64)
	pt3dadd(-1034.92, 860.46, 13.91, 1.09)
	pt3dadd(-1035.42, 858.99, 13.48, 1.09)
	pt3dadd(-1034.91, 857.31, 13.59, 1.09)
	pt3dadd(-1034.78, 855.59, 13.75, 1.28)
	pt3dadd(-1034.96, 854.85, 13.91, 1.46)
	pt3dadd(-1034.46, 853.44, 13.91, 0.91)
	pt3dadd(-1034.86, 850.74, 13.86, 0.73)
	pt3dadd(-1034.95, 849.03, 13.91, 0.91)
	pt3dadd(-1035.18, 846.82, 14.67, 1.28)
	pt3dadd(-1035.58, 845.4, 14.67, 0.36)
	pt3dadd(-1035.25, 843.2, 14.67, 0.36)
	pt3dadd(-1034.94, 841.55, 14.35, 0.18)
	pt3dadd(-1035.45, 840.52, 15.44, 0.18)
	pt3dadd(-1035.39, 839.3, 14.62, 0.18)
	pt3dadd(-1035.28, 837.86, 15.76, 0.55)
	pt3dadd(-1035.39, 836.4, 15.76, 0.18)
	pt3dadd(-1035.7, 835.41, 15.6, 0.18)
	pt3dadd(-1035.62, 834.45, 15.65, 0.18)
	pt3dadd(-1035.59, 833.74, 15.76, 0.18)
	pt3dadd(-1036.27, 831.96, 16.36, 0.36)
	pt3dadd(-1036.56, 830.25, 16.58, 0.18)
	pt3dadd(-1036.27, 829.05, 17.23, 0.18)
	pt3dadd(-1036.18, 827.39, 17.23, 0.36)
	pt3dadd(-1035.75, 826.91, 16.79, 0.18)
	pt3dadd(-1036.26, 825.65, 17.56, 0.18)
	pt3dadd(-1036.33, 824.21, 18.75, 0.18)
	pt3dadd(-1036.06, 823.01, 18.81, 0.55)
	pt3dadd(-1036.1, 823.71, 18.81, 0.55)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
}

objref all, somatodendritic, somatic, basal, pez, excitozone, axonal, compacta, reticulata
proc subsets() { local i
  objref all, somatodendritic, somatic, basal, pez, excitozone, axonal, compacta, reticulata
  all = new SectionList()
    soma all.append()
    for i=0, 29 dend[i] all.append()
    ais all.append()
    preAIS all.append()
    axon all.append()

  somatodendritic = new SectionList()
    soma somatodendritic.append()
    for i=0, 29 dend[i] somatodendritic.append()
    preAIS somatodendritic.append()

  somatic = new SectionList()
    soma somatic.append()

  basal = new SectionList()
    for i=0, 29 dend[i] basal.append()
    preAIS basal.append()

  pez = new SectionList()
    preAIS pez.append()

  excitozone = new SectionList()
    ais excitozone.append()

  axonal = new SectionList()
    axon axonal.append()

  compacta = new SectionList()
    soma compacta.append()
    for i=0, 6 dend[i] compacta.append()
    for i=11, 12 dend[i] compacta.append()
    for i=20, 28 dend[i] compacta.append()
    dend[29] compacta.append()

  reticulata = new SectionList()
    dend[17] reticulata.append()
    dend[18] reticulata.append()
    dend[19] reticulata.append()
    for i=7, 10 dend[i] reticulata.append()
    for i=13, 16 dend[i] reticulata.append()


   
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma

celldef()

ais.L = 37
preAIS.L = 13.91