Dentate gyrus network model (Tejada et al 2014)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:155568
" ... Here we adapted an existing computational model of the dentate gyrus (J Neurophysiol 93: 437-453, 2005) by replacing the reduced granule cell models with morphologically detailed models coming from (3D) reconstructions of mature cells. ... Different fractions of the mature granule cell models were replaced by morphologically reconstructed models of newborn dentate granule cells from animals with PILO-induced Status Epilepticus, which have apical dendritic alterations and spine loss, and control animals, which do not have these alterations. This complex arrangement of cells and processes allowed us to study the combined effect of mossy fiber sprouting, altered apical dendritic tree and dendritic spine loss in newborn granule cells on the excitability of the dentate gyrus model. Our simulations suggest that alterations in the apical dendritic tree and dendritic spine loss in newborn granule cells have opposing effects on the excitability of the dentate gyrus after Status Epilepticus. Apical dendritic alterations potentiate the increase of excitability provoked by mossy fiber sprouting while spine loss curtails this increase. "
Reference:
1 . Tejada J, Garcia-Cairasco N, Roque AC (2014) Combined role of seizure-induced dendritic morphology alterations and spine loss in newborn granule cells with mossy fiber sprouting on the hyperexcitability of a computer model of the dentate gyrus. PLoS Comput Biol 10:e1003601 [PubMed]
2 . Tejada J, Arisi GM, García-Cairasco N, Roque AC (2012) Morphological alterations in newly born dentate gyrus granule cells that emerge after status epilepticus contribute to make them less excitable. PLoS One 7:e40726 [PubMed]
Citations  Citation Browser
Model Information (Click on a link to find other models with that property)
Model Type: Realistic Network;
Brain Region(s)/Organism: Dentate gyrus;
Cell Type(s): Dentate gyrus granule GLU cell; Dentate gyrus mossy cell; Dentate gyrus basket cell; Dentate gyrus hilar cell;
Channel(s): I L high threshold; I T low threshold; I K; I h; I K,Ca; I Calcium; I Potassium;
Gap Junctions:
Receptor(s):
Gene(s):
Transmitter(s):
Simulation Environment: NEURON;
Model Concept(s): Activity Patterns; Spatio-temporal Activity Patterns; Epilepsy; Neurogenesis;
Implementer(s): Tejada, Julian [julian.tejada at gmail.com];
Search NeuronDB for information about:  Dentate gyrus granule GLU cell; I L high threshold; I T low threshold; I K; I h; I K,Ca; I Calcium; I Potassium;
/
TejadaEtAl2014
readme.html
bgka.mod *
CaBK.mod *
ccanl.mod *
Gfluct2.mod *
gskch.mod *
hyperde3.mod *
ichan2.mod *
LcaMig.mod *
nca.mod *
tca.mod *
BasketCell.hoc
DG.hoc
HIPPCell.hoc
init.hoc
mosinit.hoc
MossyCell.hoc
n01.hoc
n02.hoc
n03.hoc
n04.hoc
n05.hoc
n06.hoc
n07.hoc
n08.hoc
n09.hoc
n10.hoc
n100.hoc
n101.hoc
n102.hoc
n103.hoc
n104.hoc
n105.hoc
n106.hoc
n107.hoc
n108.hoc
n109.hoc
n11.hoc
n110.hoc
n111.hoc
n112.hoc
n113.hoc
n114.hoc
n115.hoc
n116.hoc
n117.hoc
n118.hoc
n12.hoc
n13.hoc
n14.hoc
n15.hoc
n16.hoc
n17.hoc
n18.hoc
n19.hoc
n20.hoc
n21.hoc
n22.hoc
n23.hoc
n24.hoc
n25.hoc
n26.hoc
n27.hoc
n28.hoc
n29.hoc
n30.hoc
n31.hoc
n32.hoc
n33.hoc
n34.hoc
n35.hoc
n36.hoc
n37.hoc
n38.hoc
n39.hoc
n40.hoc
n41.hoc
n42.hoc
n43.hoc
n44.hoc
n45.hoc
n46.hoc
n47.hoc
n48.hoc
n49.hoc
n50.hoc
n51.hoc
n52.hoc
n53.hoc
n54.hoc
n55.hoc
n56.hoc
n57.hoc
n58.hoc
n59.hoc
n60.hoc
n61.hoc
n62.hoc
n63.hoc
n64.hoc
n65.hoc
n66.hoc
n67.hoc
n68.hoc
n69.hoc
n70.hoc
n71.hoc
n72.hoc
n73.hoc
n74.hoc
n75.hoc
n76.hoc
n77.hoc
n78.hoc
n79.hoc
n80.hoc
n81.hoc
n82.hoc
n83.hoc
n84.hoc
n85.hoc
n86.hoc
n87.hoc
n88.hoc
n89.hoc
n90.hoc
n91.hoc
n92.hoc
n93.hoc
n94.hoc
n95.hoc
n96.hoc
n97.hoc
n98.hoc
n99.hoc
NumberOfDendrites.dat
Sample_100A0Y.dat
Sample_50A50P.dat
Sample_50A50Y.dat
screenshot.png
SimCtrl.ses
                            
/* Dentage Gyrus Granule Cell model associated with the papers: 

J. Tejada, G.M. Arisi, N. Garcia-Cairasco, A.C. Roque, Morphological alterations in newly born dentate gyrus granule cells that emerge after status epilepticus contribute to make them less excitable, PLoS ONE. 7 (2012) e40726. doi:10.1371/journal.pone.0040726.

J. Tejada, N. Garcia-Cairasco, A.C. Roque, Combined role of seizure-induced dendritic morphology alterations and spine loss in newborn granule cells with mossy fiber sprouting on the hyperexcitability of a computer model of the dentate gyrus, PLoS Comput. Biol. 10 (2014) e1003601. doi:10.1371/journal.pcbi.1003601.

julian.tejada@gmail.com - 2014  */
//Defining granule cell

	begintemplate GranuleCell84

// Original name on neuroMorpho.org n226.hoc


ndend1=42

  
public  pre_list, connect_pre, subsets, is_art, is_connected
public  vbc2gc, vmc2gc, vhc2gc, vgc2bc, vbc2bc, vmc2bc, vhc2bc, vgc2mc, vbc2mc, vmc2mc, vhc2mc, vgc2hc, vmc2hc
public soma, dend
public all, gcldend, pdend, mdend, ddend, somas

nst=10
	objectvar stim[nst]
double stimdur[nst], stimdel[nst], stimamp[nst]
public stim, stimdur, stimamp, stimdel
create soma[4], dend[ndend1]
objref syn, pre_list


proc init() {
	pre_list = new List()
	subsets()
	gctemp()
	synapse()
}
objref all, gcldend, pdend, mdend, ddend, somas
proc subsets(){ local i
	objref all, gcldend, pdend, mdend, ddend, somas
	all = new SectionList()
		for i=0, 3  soma[i] all.append()
		for i=0, 41 dend[i] all.append()

	somas = new SectionList()
		for i=0, 3  soma[i] somas.append()
	
	gcldend  = new SectionList()
		dend[0] gcldend.append()
		dend[19] gcldend.append()


	pdend  = new SectionList()
		
		dend[1] pdend.append()
		dend[6] pdend.append()
		for i=20, 21  dend[i] pdend.append()
		dend[28] pdend.append()
		for i=34, 36  dend[i] pdend.append()


	mdend  = new SectionList()
		for i=2, 3  dend[i] mdend.append()
		dend[5] mdend.append()
		for i=7, 8  dend[i] mdend.append()
		dend[13] mdend.append()
		dend[16] mdend.append()
		dend[23] mdend.append()      
		dend[29] mdend.append()

	ddend  = new SectionList()
		
		dend[4] ddend.append()
		for i=9, 12 dend[i] ddend.append()
		for i=14, 15 dend[i] ddend.append()
		for i=17, 18 dend[i] ddend.append()
		dend[22] ddend.append()
		for i=24, 27 dend[i] ddend.append()
		for i=30, 33 dend[i] ddend.append()
		for i=37, 41 dend[i] ddend.append()

}
proc gctemp() {

    
	forsec all {
		insert ccanl
	catau_ccanl = 10
	caiinf_ccanl = 0.000005
	Ra=210
	}

	forsec somas {insert ichan2  //ildikos ichan
	gnatbar_ichan2=0.12  //original 0.030 to .055 
	gkfbar_ichan2=0.016  //original 0.015
	gksbar_ichan2=0.006
		insert borgka
	gkabar_borgka=0.012
		insert nca  // HAV-N- Ca channel
	gncabar_nca=0.002  // check to modify- original 0.004
		insert lca 
	glcabar_lca=0.005
		insert cat
	gcatbar_cat=0.000037
		insert gskch
	gskbar_gskch=0.001
		insert cagk
	gkbar_cagk=0.0006
	gl_ichan2 = 0.00004
	cm=1

} 

		forsec gcldend {insert ichan2
	gnatbar_ichan2=0.018  //original 0.015
	gkfbar_ichan2=0.004
	gksbar_ichan2=0.006
		insert nca  // HAV-N- Ca channel
	gncabar_nca=0.003  // check to modify- original 0.004
		insert lca 
	glcabar_lca=0.0075
		insert cat
	gcatbar_cat=0.000075
		insert gskch
	gskbar_gskch=0.0004
		insert cagk
	gkbar_cagk=0.0006
	gl_ichan2 = 0.00004
	cm=1}
		
		forsec pdend {insert ichan2
	gnatbar_ichan2=0.013 
	gkfbar_ichan2=0.004
	gksbar_ichan2=0.006
		insert nca  // HAV-N- Ca channel
	gncabar_nca=0.001  // check to modify- original 0.004
		insert lca 
	glcabar_lca=0.0075
		insert cat
	gcatbar_cat=0.00025
		insert gskch
	gskbar_gskch=0.0002
		insert cagk
	gkbar_cagk=0.001
	gl_ichan2 = 0.000063
	cm=1.0 
        insert pas 
      g_pas = 4e-05
	}
		
	 	forsec mdend {insert ichan2
	gnatbar_ichan2=0.008 
	gkfbar_ichan2=0.001
	gksbar_ichan2=0.006
		insert nca  // HAV-N- Ca channel
	gncabar_nca=0.001  // check to modify- original 0.004
		insert lca 
	glcabar_lca=0.0005
		insert cat
	gcatbar_cat=0.0005
		insert gskch
	gskbar_gskch=0.0
		insert cagk
	gkbar_cagk=0.0024
	gl_ichan2 = 0.000063

	cm=1.0 
        insert pas 
      g_pas = 4e-05}

		forsec ddend {insert ichan2
	gnatbar_ichan2=0.008 
	gkfbar_ichan2=0.001
	gksbar_ichan2=0.008
		insert nca  // HAV-N- Ca channel
	gncabar_nca=0.001  // check to modify- original 0.004
		insert lca 
	glcabar_lca=0.0
		insert cat
	gcatbar_cat=0.001
		insert gskch
	gskbar_gskch=0.0
		insert cagk
	gkbar_cagk=0.0024
	gl_ichan2 = 0.000063
	cm=1.0 
        insert pas 
      g_pas = 4e-05}
		
	
// 	forsec all {
// 		insert ccanl
// 	catau_ccanl = 10
// 	caiinf_ccanl = 0.000005
// 	Ra=210
// 	}

	 forsec all {enat = 45 ekf = -90 eks = -90  ek=-90  elca=130 etca=130	 esk=-90
		 el_ichan2 =-70	cao_ccanl=2 }


  for i = 1, 2 connect soma[i](0), soma(1)
  connect soma[3](0), soma(0)
  connect dend(0), soma[1](1)
  for i = 1, 2 connect dend[i](0), dend[i-1](1)
  connect dend[3](0), dend[1](1)
  for i = 4, 5 connect dend[i](0), dend[3](1)
  connect dend[6](0), dend(1)
  for i = 7, 10 connect dend[i](0), dend[i-1](1)
  connect dend[11](0), dend[9](1)
  connect dend[12](0), dend[8](1)
  connect dend[13](0), dend[7](1)
  for i = 14, 15 connect dend[i](0), dend[13](1)
  connect dend[16](0), dend[6](1)
  for i = 17, 18 connect dend[i](0), dend[16](1)
  connect dend[19](0), soma[2](1)
  for i = 20, 22 connect dend[i](0), dend[i-1](1)
  connect dend[23](0), dend[21](1)
  for i = 24, 25 connect dend[i](0), dend[23](1)
  for i = 26, 27 connect dend[i](0), dend[25](1)
  connect dend[28](0), dend[20](1)
  for i = 29, 31 connect dend[i](0), dend[i-1](1)
  connect dend[32](0), dend[30](1)
  connect dend[33](0), dend[29](1)
  connect dend[34](0), dend[28](1)
  connect dend[35](0), dend[19](1)
  for i = 36, 37 connect dend[i](0), dend[35](1)
  for i = 38, 39 connect dend[i](0), dend[i-1](1)
  connect dend[40](0), dend[38](1)
  connect dend[41](0), dend[37](1)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(1.988, 0.192, 0, 11.82)
	pt3dadd(1.796, 3.536, 0, 11.82)
  }
  soma[1] {pt3dclear()
	pt3dadd(1.796, 3.536, 0, 11.82)
	pt3dadd(1.796, 4.423, 0, 11.82)
	pt3dadd(1.796, 5.311, 0, 11.82)
	pt3dadd(2.065, 5.348, 0.186, 1.774)
  }
  dend {pt3dclear()
	pt3dadd(2.065, 5.348, 0.186, 1.34)
	pt3dadd(3.988, 6.294, 0, 1.34)
  }
  dend[1] {pt3dclear()
	pt3dadd(3.988, 6.294, 0, 1.34)
	pt3dadd(5.39, 6.689, 0, 1.6)
	pt3dadd(6.983, 9.638, 14.8, 0.88)
	pt3dadd(9.175, 11.412, 14.8, 0.88)
	pt3dadd(11.571, 13.763, 14.8, 0.88)
	pt3dadd(12.362, 15.142, 14.8, 0.88)
	pt3dadd(13.559, 15.345, 14.8, 0.88)
  }
  dend[2] {pt3dclear()
	pt3dadd(13.559, 15.345, 14.8, 0.88)
	pt3dadd(13.367, 15.142, 26.72, 0.18)
	pt3dadd(13.164, 15.142, 26.72, 0.18)
	pt3dadd(13.763, 14.554, 26.72, 0.18)
	pt3dadd(15.955, 15.537, 13.92, 0.54)
	pt3dadd(16.554, 16.916, 6.72, 0.18)
	pt3dadd(16.554, 17.108, 6.72, 0.18)
	pt3dadd(15.955, 18.486, 6.72, 0.18)
	pt3dadd(15.752, 18.486, 6.72, 0.18)
	pt3dadd(15.752, 19.074, 6.72, 0.18)
	pt3dadd(15.955, 19.277, 6.72, 0.18)
	pt3dadd(17.153, 20.453, 6.72, 0.18)
	pt3dadd(17.548, 20.656, 6.72, 0.18)
	pt3dadd(18.95, 21.051, 6.72, 0.18)
	pt3dadd(19.142, 21.051, 6.72, 0.18)
	pt3dadd(19.944, 22.034, 6.72, 0.18)
	pt3dadd(20.147, 22.419, 6.72, 0.18)
	pt3dadd(19.944, 23.018, 6.72, 0.18)
	pt3dadd(19.741, 23.402, 6.72, 0.18)
	pt3dadd(19.741, 23.797, 6.72, 0.18)
	pt3dadd(19.549, 24.385, 6.72, 0.18)
	pt3dadd(19.549, 24.588, 6.72, 0.18)
	pt3dadd(19.549, 26.159, 6.72, 0.18)
	pt3dadd(19.549, 26.747, 6.72, 0.18)
	pt3dadd(19.741, 27.73, 6.72, 0.18)
	pt3dadd(19.741, 28.125, 6.72, 0.18)
	pt3dadd(19.549, 28.521, 6.72, 0.18)
	pt3dadd(18.351, 29.899, 6.72, 0.18)
	pt3dadd(18.351, 30.295, 6.72, 0.18)
	pt3dadd(18.147, 30.295, 6.72, 0.18)
	pt3dadd(17.752, 30.882, 6.72, 0.18)
	pt3dadd(17.345, 31.278, 6.72, 0.18)
	pt3dadd(17.153, 31.673, 6.72, 0.18)
	pt3dadd(16.757, 31.865, 6.72, 0.18)
	pt3dadd(16.757, 32.261, 6.72, 0.18)
	pt3dadd(18.351, 32.849, 6.72, 0.18)
	pt3dadd(17.548, 34.024, -17.68, 0.18)
	pt3dadd(17.345, 34.227, -17.68, 0.18)
	pt3dadd(17.153, 35.21, -17.68, 0.18)
	pt3dadd(17.153, 35.402, -17.68, 0.18)
	pt3dadd(18.147, 35.99, -17.68, 0.18)
	pt3dadd(18.351, 35.99, -17.68, 0.18)
	pt3dadd(20.543, 35.99, -17.68, 0.18)
	pt3dadd(20.746, 35.99, -17.68, 0.18)
	pt3dadd(22.136, 36.386, -17.68, 0.18)
	pt3dadd(22.34, 36.589, -17.68, 0.18)
	pt3dadd(22.532, 36.589, -17.68, 0.18)
	pt3dadd(23.131, 36.984, -17.68, 0.18)
	pt3dadd(23.334, 37.176, -17.68, 0.18)
	pt3dadd(23.537, 38.747, -17.68, 0.18)
	pt3dadd(23.537, 39.143, -17.68, 0.18)
	pt3dadd(23.729, 39.73, -17.68, 0.18)
	pt3dadd(23.729, 41.109, -17.68, 0.18)
	pt3dadd(23.729, 41.301, -17.68, 0.18)
	pt3dadd(23.933, 42.092, -17.68, 0.18)
	pt3dadd(24.136, 42.284, -17.68, 0.18)
	pt3dadd(24.328, 42.488, -17.68, 0.18)
	pt3dadd(25.323, 42.883, -17.68, 0.18)
	pt3dadd(25.526, 43.278, -17.68, 0.18)
	pt3dadd(25.922, 44.262, -17.68, 0.18)
	pt3dadd(25.922, 44.454, -17.68, 0.18)
	pt3dadd(25.922, 44.849, -17.68, 0.18)
	pt3dadd(26.521, 46.024, -10.88, 0.18)
	pt3dadd(26.328, 46.228, -10.88, 0.18)
	pt3dadd(26.927, 48.782, -12.88, 0.18)
	pt3dadd(27.119, 48.782, -13.68, 0.18)
	pt3dadd(27.119, 49.573, -40.08, 0.18)
	pt3dadd(28.317, 50.556, -40.08, 0.18)
	pt3dadd(28.521, 50.94, -40.08, 0.18)
	pt3dadd(29.911, 51.923, -40.08, 0.18)
	pt3dadd(30.317, 52.318, -40.08, 0.18)
	pt3dadd(31.108, 52.906, -40.08, 0.18)
	pt3dadd(31.312, 53.302, -40.08, 0.18)
	pt3dadd(32.114, 54.285, -40.08, 0.18)
	pt3dadd(32.306, 54.68, -40.08, 0.18)
	pt3dadd(32.702, 55.268, -40.08, 0.18)
	pt3dadd(32.702, 55.471, -40.08, 0.18)
	pt3dadd(32.702, 55.867, -40.08, 0.18)
	pt3dadd(33.301, 56.251, -40.08, 0.18)
	pt3dadd(33.301, 56.646, -40.08, 0.18)
  }
  dend[3] {pt3dclear()
	pt3dadd(13.559, 15.345, 14.8, 0.88)
	pt3dadd(12.769, 16.328, 14.8, 0.54)
	pt3dadd(13.559, 18.294, 14.8, 0.54)
	pt3dadd(13.559, 18.486, 14.8, 0.54)
	pt3dadd(14.362, 19.277, 14.8, 0.54)
	pt3dadd(14.554, 19.673, 14.8, 0.54)
	pt3dadd(14.757, 19.865, 14.8, 0.54)
	pt3dadd(15.752, 20.26, 14.8, 0.54)
	pt3dadd(15.955, 20.26, 14.8, 0.54)
	pt3dadd(16.554, 20.26, 14.8, 0.54)
	pt3dadd(18.147, 20.453, 14.8, 0.54)
	pt3dadd(18.351, 20.453, 14.8, 0.54)
	pt3dadd(18.543, 20.656, 14.8, 0.54)
	pt3dadd(18.95, 21.051, 14.8, 0.54)
	pt3dadd(19.345, 21.244, 14.8, 0.54)
	pt3dadd(20.543, 22.622, 14.8, 0.54)
	pt3dadd(20.746, 22.814, 14.8, 0.54)
	pt3dadd(20.938, 22.814, 14.8, 0.54)
	pt3dadd(22.939, 24.193, 4.4, 0.54)
	pt3dadd(22.939, 24.385, 4.4, 0.54)
	pt3dadd(24.136, 25.571, 4.4, 0.54)
	pt3dadd(24.328, 25.764, 4.4, 0.54)
	pt3dadd(25.922, 27.73, 4.4, 0.54)
	pt3dadd(26.125, 27.933, 4.4, 0.54)
	pt3dadd(27.119, 29.696, 4.4, 0.54)
	pt3dadd(27.119, 29.899, 4.4, 0.54)
	pt3dadd(28.724, 33.041, 4.4, 0.54)
	pt3dadd(28.724, 33.244, 4.4, 0.54)
	pt3dadd(28.724, 33.64, 4.4, 0.54)
	pt3dadd(29.312, 35.21, 4.4, 0.54)
	pt3dadd(29.312, 35.402, 4.4, 0.54)
	pt3dadd(28.916, 37.572, 4.4, 0.54)
	pt3dadd(29.515, 41.301, 15.12, 0.54)
	pt3dadd(29.718, 41.504, 15.12, 0.54)
	pt3dadd(30.713, 43.866, 15.12, 0.54)
	pt3dadd(30.916, 43.866, 15.12, 0.54)
	pt3dadd(32.51, 47.798, 15.12, 0.54)
	pt3dadd(32.702, 48.194, 15.12, 0.54)
	pt3dadd(33.707, 51.539, 15.12, 0.54)
	pt3dadd(33.707, 51.923, 15.12, 0.54)
	pt3dadd(34.702, 54.68, 15.12, 0.54)
	pt3dadd(34.702, 55.076, 15.12, 0.54)
	pt3dadd(34.905, 55.663, 15.12, 0.54)
	pt3dadd(35.097, 58.421, 14.72, 0.54)
	pt3dadd(35.097, 58.816, 14.72, 0.54)
	pt3dadd(35.301, 59.404, 14.72, 0.54)
	pt3dadd(35.504, 63.336, 14.72, 0.54)
	pt3dadd(35.504, 63.528, 14.32, 0.54)
	pt3dadd(35.301, 67.472, 20.72, 0.54)
	pt3dadd(35.9, 68.059, 20.72, 0.54)
	pt3dadd(36.103, 68.252, 20.72, 0.54)
	pt3dadd(36.295, 69.042, 20.72, 0.54)
	pt3dadd(37.888, 71.404, 20.72, 0.54)
	pt3dadd(38.092, 71.8, 20.72, 0.54)
	pt3dadd(38.487, 72.184, 20.72, 0.54)
	pt3dadd(39.888, 74.353, 20.72, 0.54)
	pt3dadd(40.092, 74.749, 20.72, 0.54)
	pt3dadd(41.278, 79.664, 20.72, 0.54)
	pt3dadd(41.278, 79.857, 20.72, 0.54)
	pt3dadd(41.086, 80.252, 20.72, 0.54)
	pt3dadd(40.679, 82.026, 20.72, 0.54)
	pt3dadd(40.679, 82.422, 20.72, 0.54)
	pt3dadd(40.487, 82.806, 20.72, 0.54)
	pt3dadd(39.685, 85.168, 20.72, 0.54)
	pt3dadd(39.493, 85.563, 20.72, 0.54)
	pt3dadd(38.894, 87.733, 20.72, 0.54)
	pt3dadd(38.894, 88.117, 20.72, 0.54)
	pt3dadd(38.691, 88.512, 20.72, 0.54)
	pt3dadd(38.894, 90.083, 20.72, 0.54)
	pt3dadd(38.894, 90.286, 20.72, 0.54)
	pt3dadd(38.894, 90.682, 20.72, 0.54)
	pt3dadd(39.493, 92.84, 20.72, 0.54)
	pt3dadd(39.685, 93.428, 20.72, 0.54)
	pt3dadd(40.679, 95.993, 27.12, 0.54)
	pt3dadd(40.883, 96.185, 27.12, 0.54)
	pt3dadd(41.086, 97.959, 27.12, 0.54)
	pt3dadd(40.883, 98.547, 27.12, 0.54)
	pt3dadd(40.883, 102.287, 27.12, 0.54)
	pt3dadd(40.883, 102.671, 27.12, 0.54)
	pt3dadd(40.883, 102.875, 27.12, 0.54)
	pt3dadd(40.883, 105.428, 27.12, 0.54)
	pt3dadd(40.883, 106.016, 27.12, 0.54)
	pt3dadd(40.284, 109.564, 27.12, 0.54)
	pt3dadd(40.284, 110.344, 27.12, 0.54)
	pt3dadd(40.284, 110.943, 27.12, 0.54)
	pt3dadd(40.092, 113.293, 27.12, 0.54)
	pt3dadd(39.888, 113.689, 27.12, 0.54)
	pt3dadd(39.888, 114.276, 27.12, 0.54)
	pt3dadd(38.894, 115.655, 27.12, 0.54)
	pt3dadd(38.487, 115.858, 27.12, 0.54)
	pt3dadd(38.295, 116.254, 27.12, 0.54)
	pt3dadd(37.696, 117.825, 27.12, 0.54)
	pt3dadd(37.493, 118.22, 27.12, 0.54)
	pt3dadd(37.29, 118.604, 27.12, 0.54)
	pt3dadd(36.295, 120.774, 26.72, 0.54)
	pt3dadd(36.295, 121.169, 26.72, 0.54)
	pt3dadd(36.103, 123.136, 26.72, 0.54)
	pt3dadd(36.103, 123.328, 26.72, 0.54)
	pt3dadd(36.103, 123.723, 26.72, 0.54)
	pt3dadd(36.498, 125.497, 26.72, 0.54)
	pt3dadd(37.888, 131.192, 19.92, 0.54)
	pt3dadd(37.888, 131.588, 19.92, 0.54)
	pt3dadd(37.888, 135.136, 19.92, 0.54)
	pt3dadd(37.888, 135.52, 19.92, 0.54)
	pt3dadd(37.493, 139.261, 19.92, 0.54)
  }
}
proc shape3d_2() {
  dend[3] {	pt3dadd(37.29, 139.848, 19.92, 0.54)
	pt3dadd(37.29, 140.447, 19.92, 0.54)
	pt3dadd(36.894, 142.798, 19.92, 0.54)
	pt3dadd(36.894, 143.397, 19.92, 0.54)
	pt3dadd(36.894, 143.984, 19.92, 0.54)
	pt3dadd(36.894, 145.95, 19.92, 0.54)
	pt3dadd(36.894, 146.346, 19.92, 0.54)
	pt3dadd(36.894, 149.295, 19.92, 0.54)
	pt3dadd(36.894, 149.691, 19.92, 0.54)
	pt3dadd(37.888, 154.403, 19.92, 0.54)
	pt3dadd(38.092, 155.985, 31.52, 0.54)
	pt3dadd(38.092, 156.177, 31.52, 0.54)
	pt3dadd(38.092, 156.572, 31.52, 0.54)
  }
  dend[4] {pt3dclear()
	pt3dadd(38.092, 156.572, 31.52, 0.54)
	pt3dadd(38.691, 158.539, 28.32, 0.18)
	pt3dadd(38.691, 158.934, 28.32, 0.18)
	pt3dadd(38.295, 160.9, 28.32, 0.18)
	pt3dadd(38.092, 161.092, 28.32, 0.18)
	pt3dadd(37.097, 162.674, 28.32, 0.18)
	pt3dadd(37.097, 162.866, 28.32, 0.18)
	pt3dadd(36.894, 163.262, 28.32, 0.18)
	pt3dadd(36.498, 164.437, 28.32, 0.18)
	pt3dadd(36.498, 164.833, 28.32, 0.18)
	pt3dadd(36.691, 166.008, 28.32, 0.18)
	pt3dadd(36.691, 166.211, 28.32, 0.18)
	pt3dadd(37.888, 167.386, 28.32, 0.18)
	pt3dadd(38.295, 167.59, 28.32, 0.18)
	pt3dadd(39.888, 168.968, 28.32, 0.18)
	pt3dadd(39.888, 169.16, 28.32, 0.18)
	pt3dadd(41.278, 170.935, 28.32, 0.18)
	pt3dadd(41.482, 171.127, 28.32, 0.18)
	pt3dadd(41.278, 170.935, 12.72, 0.18)
	pt3dadd(41.278, 171.127, 12.72, 0.18)
	pt3dadd(41.482, 172.505, 12.72, 0.18)
	pt3dadd(41.482, 172.901, 12.72, 0.18)
	pt3dadd(41.482, 174.076, 12.72, 0.18)
	pt3dadd(41.685, 174.471, 12.72, 0.18)
	pt3dadd(42.476, 175.262, 13.12, 0.18)
	pt3dadd(42.883, 175.455, 13.12, 0.18)
	pt3dadd(44.081, 177.025, 13.12, 0.18)
	pt3dadd(44.273, 177.421, 13.12, 0.18)
	pt3dadd(44.476, 177.816, 13.12, 0.18)
	pt3dadd(44.668, 178.992, 13.12, 0.18)
	pt3dadd(44.668, 179.387, 13.12, 0.18)
	pt3dadd(43.674, 180.766, 13.12, 0.18)
	pt3dadd(43.482, 180.958, 13.12, 0.18)
	pt3dadd(42.284, 181.941, 13.12, 0.18)
	pt3dadd(42.284, 182.144, 13.12, 0.18)
	pt3dadd(42.081, 182.732, 13.12, 0.18)
	pt3dadd(42.68, 183.523, 13.12, 0.18)
	pt3dadd(42.883, 183.907, 13.12, 0.18)
	pt3dadd(42.883, 184.302, 13.12, 0.18)
	pt3dadd(43.482, 185.489, 13.12, 0.18)
	pt3dadd(43.674, 186.077, 13.12, 0.18)
	pt3dadd(43.674, 186.472, 13.12, 0.18)
	pt3dadd(43.877, 187.455, 13.12, 0.18)
	pt3dadd(43.877, 187.851, 13.12, 0.18)
	pt3dadd(42.883, 189.421, 13.12, 0.18)
	pt3dadd(42.883, 189.817, 13.12, 0.18)
	pt3dadd(43.278, 191.195, 13.12, 0.18)
	pt3dadd(43.482, 191.58, 13.12, 0.18)
	pt3dadd(43.674, 191.975, 13.12, 0.18)
	pt3dadd(44.081, 193.162, 13.12, 0.18)
	pt3dadd(44.476, 193.749, 13.12, 0.18)
	pt3dadd(44.668, 194.337, 13.12, 0.18)
	pt3dadd(45.471, 195.128, 13.12, 0.18)
	pt3dadd(45.674, 195.715, 13.12, 0.18)
	pt3dadd(44.872, 197.094, 13.12, 0.18)
	pt3dadd(44.668, 197.49, 13.12, 0.18)
	pt3dadd(43.877, 198.857, 13.12, 0.18)
	pt3dadd(43.877, 199.456, 13.12, 0.18)
	pt3dadd(43.674, 199.84, 13.12, 0.18)
	pt3dadd(44.273, 200.823, 13.12, 0.18)
	pt3dadd(44.273, 201.219, 13.12, 0.18)
	pt3dadd(44.476, 201.614, 13.12, 0.18)
	pt3dadd(44.872, 202.993, 13.12, 0.18)
	pt3dadd(44.872, 203.388, 13.12, 0.18)
	pt3dadd(45.075, 204.959, 13.12, 0.18)
	pt3dadd(44.872, 205.354, 13.12, 0.18)
	pt3dadd(44.872, 205.942, 13.12, 0.18)
	pt3dadd(44.476, 207.129, 13.12, 0.18)
	pt3dadd(44.273, 207.513, 13.12, 0.18)
	pt3dadd(44.668, 209.479, 13.12, 0.18)
	pt3dadd(44.668, 210.27, 13.12, 0.18)
	pt3dadd(45.471, 212.044, 13.12, 0.18)
	pt3dadd(46.668, 214.01, 20.72, 0.18)
	pt3dadd(46.872, 214.406, 20.72, 0.18)
	pt3dadd(47.064, 216.959, 20.72, 0.18)
	pt3dadd(47.064, 217.152, 20.72, 0.18)
	pt3dadd(46.465, 219.513, 20.72, 0.18)
	pt3dadd(46.273, 219.717, 20.72, 0.18)
	pt3dadd(46.668, 221.683, 20.72, 0.18)
	pt3dadd(46.872, 222.067, 20.72, 0.18)
	pt3dadd(48.058, 223.446, 20.72, 0.18)
	pt3dadd(48.262, 224.045, 20.32, 0.18)
	pt3dadd(48.465, 226.011, 2.32, 0.18)
	pt3dadd(48.465, 226.203, 2.32, 0.18)
	pt3dadd(48.058, 228.169, 2.32, 0.18)
	pt3dadd(48.058, 228.565, 2.32, 0.18)
	pt3dadd(48.861, 230.723, 2.32, 0.18)
	pt3dadd(48.861, 231.118, 2.32, 0.18)
	pt3dadd(49.064, 231.514, 2.32, 0.18)
	pt3dadd(49.064, 232.689, 2.32, 0.18)
	pt3dadd(49.256, 233.085, 2.72, 0.18)
	pt3dadd(49.256, 233.288, 2.72, 0.18)
	pt3dadd(49.855, 234.463, 2.72, 0.18)
	pt3dadd(49.855, 234.859, 2.72, 0.18)
	pt3dadd(49.855, 236.237, 2.72, 0.18)
	pt3dadd(49.855, 236.633, 2.72, 0.18)
	pt3dadd(49.855, 237.017, 2.72, 0.18)
	pt3dadd(50.058, 238.203, 2.72, 0.18)
	pt3dadd(50.058, 238.791, 2.72, 0.18)
	pt3dadd(50.058, 239.187, 2.72, 0.18)
	pt3dadd(50.262, 240.362, 2.72, 0.18)
	pt3dadd(50.454, 240.757, 2.72, 0.18)
	pt3dadd(50.861, 244.498, 9.12, 0.18)
	pt3dadd(51.053, 244.69, 9.12, 0.18)
	pt3dadd(51.652, 246.656, 9.12, 0.18)
	pt3dadd(51.652, 246.859, 9.12, 0.18)
	pt3dadd(52.251, 248.238, 9.12, 0.18)
	pt3dadd(52.251, 248.622, 9.12, 0.18)
	pt3dadd(52.85, 250.204, 9.12, 0.18)
	pt3dadd(52.85, 250.588, 9.12, 0.18)
	pt3dadd(52.646, 252.362, 9.12, 0.18)
	pt3dadd(52.646, 252.758, 9.12, 0.18)
	pt3dadd(53.053, 254.329, 9.12, 0.18)
	pt3dadd(53.053, 254.724, 9.12, 0.18)
	pt3dadd(53.053, 255.312, 9.12, 0.18)
	pt3dadd(53.245, 256.103, 9.12, 0.18)
	pt3dadd(53.245, 256.69, 9.12, 0.18)
	pt3dadd(53.652, 258.069, 9.12, 0.18)
	pt3dadd(53.652, 258.656, 9.12, 0.18)
	pt3dadd(53.844, 259.447, 9.12, 0.18)
	pt3dadd(54.047, 259.843, 9.12, 0.18)
	pt3dadd(54.251, 260.227, 9.12, 0.18)
	pt3dadd(54.646, 261.21, 9.12, 0.18)
	pt3dadd(54.85, 261.606, 9.12, 0.18)
	pt3dadd(55.245, 262.397, 9.12, 0.18)
	pt3dadd(55.245, 262.792, 9.12, 0.18)
	pt3dadd(55.042, 263.775, 9.12, 0.18)
	pt3dadd(54.85, 264.363, 9.12, 0.18)
	pt3dadd(54.85, 266.521, 9.12, 0.18)
	pt3dadd(54.85, 266.917, 9.12, 0.18)
	pt3dadd(54.85, 267.312, 9.12, 0.18)
	pt3dadd(55.042, 268.883, 9.12, 0.18)
	pt3dadd(55.245, 269.279, 9.12, 0.18)
	pt3dadd(56.443, 273.606, 9.12, 0.18)
	pt3dadd(56.443, 273.799, 9.12, 0.18)
	pt3dadd(56.036, 275.968, 9.12, 0.18)
	pt3dadd(55.844, 276.364, 9.12, 0.18)
	pt3dadd(55.449, 278.33, 9.12, 0.18)
	pt3dadd(55.449, 278.917, 9.12, 0.18)
	pt3dadd(55.245, 280.692, 9.12, 0.18)
	pt3dadd(55.042, 281.471, 9.12, 0.18)
	pt3dadd(55.042, 283.053, 9.12, 0.18)
	pt3dadd(55.042, 283.641, 9.12, 0.18)
	pt3dadd(56.036, 285.212, 9.12, 0.18)
	pt3dadd(56.036, 285.607, 9.12, 0.18)
	pt3dadd(56.838, 287.178, 9.12, 0.18)
	pt3dadd(56.838, 287.765, 9.12, 0.18)
	pt3dadd(57.437, 289.347, 9.12, 0.18)
	pt3dadd(57.437, 289.732, 9.12, 0.18)
	pt3dadd(57.641, 291.11, 9.12, 0.18)
	pt3dadd(57.641, 291.506, 9.12, 0.18)
	pt3dadd(57.833, 292.093, 9.12, 0.18)
	pt3dadd(57.833, 293.675, 9.12, 0.18)
	pt3dadd(57.833, 294.059, 9.12, 0.18)
	pt3dadd(58.839, 296.421, 9.12, 0.18)
	pt3dadd(58.839, 296.817, 9.12, 0.18)
	pt3dadd(58.839, 298.387, 9.12, 0.18)
	pt3dadd(59.63, 300.749, -4.88, 0.18)
	pt3dadd(59.437, 301.145, -4.88, 0.18)
	pt3dadd(60.025, 304.297, -4.88, 0.18)
	pt3dadd(60.025, 304.489, -4.88, 0.18)
	pt3dadd(61.031, 306.648, -4.88, 0.18)
	pt3dadd(61.223, 307.043, -4.88, 0.18)
	pt3dadd(61.822, 308.625, -4.88, 0.18)
	pt3dadd(61.63, 309.009, -4.88, 0.18)
	pt3dadd(61.426, 310.975, -4.88, 0.18)
	pt3dadd(61.426, 311.574, -4.88, 0.18)
	pt3dadd(61.426, 312.354, -4.88, 0.18)
	pt3dadd(62.229, 314.128, -4.88, 0.18)
	pt3dadd(62.421, 314.716, -4.88, 0.18)
	pt3dadd(63.02, 316.682, -4.88, 0.18)
	pt3dadd(63.223, 317.078, -4.88, 0.18)
	pt3dadd(63.618, 318.852, -4.88, 0.18)
	pt3dadd(63.618, 319.236, -4.88, 0.18)
	pt3dadd(63.618, 319.439, -4.88, 0.18)
	pt3dadd(64.217, 320.614, -4.88, 0.18)
	pt3dadd(64.421, 321.01, -4.88, 0.18)
	pt3dadd(64.613, 321.405, -4.88, 0.18)
	pt3dadd(65.619, 322.784, -4.88, 0.18)
	pt3dadd(66.014, 323.179, -4.88, 0.18)
	pt3dadd(66.41, 323.564, -4.88, 0.18)
	pt3dadd(66.613, 326.909, 13.12, 0.18)
	pt3dadd(67.008, 329.666, 13.12, 0.18)
	pt3dadd(67.008, 330.253, 13.12, 0.18)
	pt3dadd(67.008, 333.203, 13.12, 0.18)
	pt3dadd(67.008, 333.598, 13.12, 0.18)
	pt3dadd(68.602, 336.152, 13.12, 0.18)
  }
}
proc shape3d_3() {
  dend[4] {	pt3dadd(69.009, 336.751, 13.12, 0.18)
	pt3dadd(70.003, 339.113, 13.12, 0.18)
	pt3dadd(70.003, 339.7, 13.12, 0.18)
	pt3dadd(70.003, 343.44, 13.12, 0.18)
	pt3dadd(70.003, 344.028, 13.12, 0.18)
	pt3dadd(70.206, 345.994, 13.12, 0.18)
	pt3dadd(70.206, 346.39, 13.12, 0.18)
	pt3dadd(70.805, 349.734, 13.12, 0.18)
	pt3dadd(71.393, 351.497, 13.12, 0.18)
	pt3dadd(71.596, 351.893, 13.12, 0.18)
	pt3dadd(71.8, 352.085, 13.12, 0.18)
	pt3dadd(72.591, 353.464, 13.12, 0.18)
	pt3dadd(72.794, 353.859, 13.12, 0.18)
	pt3dadd(73.19, 354.447, 13.12, 0.18)
	pt3dadd(74.195, 355.633, 13.12, 0.18)
	pt3dadd(75.789, 358.775, 5.12, 0.18)
	pt3dadd(75.789, 359.373, 5.12, 0.18)
	pt3dadd(77.178, 361.532, 5.12, 0.18)
	pt3dadd(77.178, 361.927, 5.12, 0.18)
	pt3dadd(77.777, 364.085, 5.12, 0.18)
	pt3dadd(77.981, 364.481, 5.12, 0.18)
	pt3dadd(78.772, 366.651, 5.12, 0.18)
	pt3dadd(78.772, 367.238, 5.12, 0.18)
	pt3dadd(78.772, 367.826, 5.12, 0.18)
	pt3dadd(78.975, 369.204, 5.12, 0.18)
	pt3dadd(78.975, 369.792, 5.12, 0.18)
	pt3dadd(78.772, 372.154, 5.12, 0.18)
	pt3dadd(78.772, 372.346, 5.12, 0.18)
	pt3dadd(79.371, 374.312, 5.12, 0.18)
	pt3dadd(79.574, 374.515, 5.12, 0.18)
	pt3dadd(80.173, 376.278, 5.12, 0.18)
	pt3dadd(80.376, 376.877, 5.12, 0.18)
	pt3dadd(80.975, 378.843, 5.12, 0.18)
	pt3dadd(80.975, 379.431, 5.12, 0.18)
	pt3dadd(81.167, 379.826, 5.12, 0.18)
	pt3dadd(81.371, 380.606, 5.12, 0.18)
	pt3dadd(81.371, 381.002, 5.12, 0.18)
	pt3dadd(81.167, 382.584, 5.12, 0.18)
	pt3dadd(80.975, 382.968, 5.12, 0.18)
	pt3dadd(80.772, 383.363, 5.12, 0.18)
	pt3dadd(80.173, 383.759, 5.12, 0.18)
	pt3dadd(80.173, 383.951, 5.12, 0.18)
	pt3dadd(78.975, 383.951, 5.12, 0.18)
	pt3dadd(78.772, 383.951, 5.12, 0.18)
	pt3dadd(78.184, 384.154, 5.12, 0.18)
	pt3dadd(77.777, 385.917, 5.12, 0.18)
	pt3dadd(77.585, 386.313, 5.12, 0.18)
	pt3dadd(77.382, 388.087, 5.12, 0.18)
	pt3dadd(77.382, 388.482, 5.12, 0.18)
	pt3dadd(76.184, 388.878, 5.12, 0.18)
	pt3dadd(75.981, 388.878, 5.12, 0.18)
	pt3dadd(75.19, 388.878, 5.12, 0.18)
	pt3dadd(74.195, 388.878, 5.12, 0.18)
	pt3dadd(73.992, 388.878, 5.12, 0.18)
	pt3dadd(73.393, 389.262, 5.12, 0.18)
	pt3dadd(72.794, 389.657, 5.12, 0.18)
	pt3dadd(71.393, 390.844, 5.12, 0.18)
	pt3dadd(71.201, 391.431, 5.12, 0.18)
	pt3dadd(71.393, 392.607, 5.12, 0.18)
	pt3dadd(71.393, 392.81, 5.12, 0.18)
	pt3dadd(71.393, 393.398, 5.12, 0.18)
	pt3dadd(71.393, 393.59, 5.12, 0.18)
	pt3dadd(70.398, 397.138, 5.12, 0.18)
  }
  dend[5] {pt3dclear()
	pt3dadd(38.092, 156.572, 31.52, 0.54)
	pt3dadd(39.493, 158.934, 31.52, 0.18)
	pt3dadd(39.493, 159.329, 31.52, 0.18)
	pt3dadd(39.29, 160.697, 31.52, 0.18)
	pt3dadd(39.29, 160.9, 31.52, 0.18)
	pt3dadd(39.493, 162.674, 31.52, 0.18)
	pt3dadd(39.493, 162.866, 31.52, 0.18)
	pt3dadd(39.493, 163.059, 31.52, 0.18)
	pt3dadd(39.888, 164.64, 31.52, 0.18)
	pt3dadd(40.092, 165.025, 31.52, 0.18)
	pt3dadd(41.086, 168.369, 31.52, 0.18)
	pt3dadd(41.086, 168.765, 31.52, 0.18)
	pt3dadd(41.278, 169.16, 31.52, 0.18)
	pt3dadd(41.482, 171.918, 31.52, 0.18)
	pt3dadd(41.482, 172.302, 31.52, 0.18)
	pt3dadd(41.685, 172.697, 31.52, 0.18)
	pt3dadd(41.685, 174.076, 31.52, 0.18)
	pt3dadd(41.685, 174.471, 31.52, 0.18)
	pt3dadd(41.482, 176.438, 30.32, 0.18)
	pt3dadd(41.482, 176.63, 30.32, 0.18)
	pt3dadd(41.482, 176.833, 30.32, 0.18)
	pt3dadd(41.685, 178.008, 30.32, 0.18)
	pt3dadd(41.685, 178.212, 30.32, 0.18)
	pt3dadd(41.685, 178.799, 30.32, 0.18)
	pt3dadd(42.476, 180.766, 30.32, 0.18)
	pt3dadd(42.68, 181.161, 30.32, 0.18)
	pt3dadd(42.883, 181.353, 30.32, 0.18)
	pt3dadd(43.877, 183.127, 30.32, 0.18)
	pt3dadd(45.866, 186.868, 32.72, 0.18)
	pt3dadd(45.866, 187.06, 32.72, 0.18)
	pt3dadd(46.668, 189.421, 32.72, 0.18)
  }
  dend[6] {pt3dclear()
	pt3dadd(3.988, 6.294, 0, 1.34)
	pt3dadd(3.389, 7.864, 0, 1.34)
	pt3dadd(3.389, 9.243, 0, 1.34)
	pt3dadd(3.389, 11.209, 0, 1.34)
	pt3dadd(4.192, 11.797, 0, 1.34)
  }
  dend[7] {pt3dclear()
	pt3dadd(4.192, 11.797, 0, 1.34)
	pt3dadd(5.39, 12.192, 1.6, 0.54)
	pt3dadd(5.582, 12.192, 1.6, 0.54)
	pt3dadd(6.983, 13.763, 1.6, 0.54)
	pt3dadd(6.983, 13.966, 1.6, 0.54)
	pt3dadd(7.774, 15.74, 1.6, 0.54)
	pt3dadd(7.774, 16.125, 1.6, 0.54)
	pt3dadd(9.175, 18.091, 1.6, 0.54)
	pt3dadd(9.571, 18.486, 1.6, 0.54)
	pt3dadd(10.972, 20.068, 1.6, 0.54)
	pt3dadd(11.367, 20.656, 1.6, 0.54)
	pt3dadd(13.367, 22.227, 1.6, 0.54)
	pt3dadd(13.559, 22.419, 1.6, 0.54)
	pt3dadd(15.752, 23.402, 1.6, 0.54)
	pt3dadd(16.351, 23.797, 1.6, 0.54)
	pt3dadd(19.345, 24.78, 1.6, 0.54)
	pt3dadd(19.944, 24.984, 1.6, 0.54)
	pt3dadd(22.34, 25.764, 1.6, 0.54)
	pt3dadd(22.735, 25.967, 1.6, 0.54)
	pt3dadd(25.323, 27.142, 1.6, 0.54)
	pt3dadd(25.526, 27.142, 1.6, 0.54)
	pt3dadd(28.521, 29.504, 1.2, 0.54)
	pt3dadd(28.724, 29.696, 1.2, 0.54)
	pt3dadd(31.312, 31.865, 1.2, 0.54)
	pt3dadd(31.515, 32.261, 1.2, 0.54)
	pt3dadd(32.905, 33.832, 1.2, 0.54)
	pt3dadd(33.108, 34.227, 1.2, 0.54)
	pt3dadd(33.707, 35.21, 1.2, 0.54)
	pt3dadd(33.9, 35.798, 1.2, 0.54)
	pt3dadd(35.097, 38.951, 0.4, 0.54)
	pt3dadd(35.097, 39.143, 0.4, 0.54)
	pt3dadd(37.888, 42.488, -1.2, 0.54)
	pt3dadd(40.679, 44.849, -2, 0.54)
	pt3dadd(40.883, 44.849, -2, 0.54)
	pt3dadd(42.081, 47.211, -2, 0.54)
	pt3dadd(42.284, 47.798, -2, 0.54)
	pt3dadd(43.674, 50.556, -2, 0.54)
	pt3dadd(43.877, 51.143, -2, 0.54)
	pt3dadd(45.866, 53.697, -2, 0.54)
	pt3dadd(46.465, 54.488, -2, 0.54)
	pt3dadd(48.465, 56.85, -2, 0.54)
	pt3dadd(48.861, 57.234, -2, 0.54)
	pt3dadd(51.46, 58.613, -2, 0.54)
	pt3dadd(51.855, 58.816, -2, 0.54)
	pt3dadd(54.85, 60.579, -2, 0.54)
	pt3dadd(55.042, 61.178, -2, 0.54)
	pt3dadd(56.838, 63.924, -2.4, 0.54)
	pt3dadd(57.234, 64.715, -2.4, 0.54)
	pt3dadd(57.833, 66.681, -2.8, 0.54)
	pt3dadd(57.833, 67.076, -2.8, 0.54)
	pt3dadd(58.432, 69.235, -2.8, 0.54)
	pt3dadd(58.432, 69.63, -2.8, 0.54)
	pt3dadd(60.025, 71.992, -2.8, 0.54)
	pt3dadd(65.415, 77.89, -22.8, 0.54)
	pt3dadd(65.619, 78.478, -22.8, 0.54)
	pt3dadd(68.206, 81.235, -22.8, 0.54)
	pt3dadd(68.602, 82.026, -22.8, 0.54)
	pt3dadd(69.8, 83.992, -22.8, 0.54)
	pt3dadd(70.003, 84.58, -22.8, 0.54)
	pt3dadd(70.997, 86.738, -22.8, 0.54)
	pt3dadd(70.997, 87.337, -22.8, 0.54)
	pt3dadd(71.393, 90.682, -22.8, 0.54)
	pt3dadd(71.596, 91.27, -22.8, 0.54)
	pt3dadd(71.8, 95.01, -22.8, 0.54)
	pt3dadd(71.8, 95.79, -22.8, 0.54)
	pt3dadd(71.8, 96.773, -22.8, 0.54)
	pt3dadd(72.195, 100.117, -23.2, 0.54)
	pt3dadd(71.992, 100.705, -23.2, 0.54)
	pt3dadd(72.997, 105.824, -6, 0.54)
	pt3dadd(72.997, 106.615, -6, 0.54)
	pt3dadd(72.997, 110.74, -6, 0.54)
	pt3dadd(72.997, 111.135, -6, 0.54)
	pt3dadd(73.992, 113.689, -6, 0.54)
	pt3dadd(74.387, 114.276, -6, 0.54)
	pt3dadd(76.184, 117.237, -6, 0.54)
	pt3dadd(76.58, 117.825, -6, 0.54)
	pt3dadd(76.986, 118.412, -6, 0.54)
	pt3dadd(78.772, 122.74, -6, 0.54)
	pt3dadd(78.772, 123.136, -6, 0.54)
	pt3dadd(78.975, 124.514, -6, 0.54)
	pt3dadd(78.975, 124.706, -6, 0.54)
	pt3dadd(79.371, 124.706, -6, 0.54)
  }
  dend[8] {pt3dclear()
	pt3dadd(79.371, 124.706, -6, 0.54)
	pt3dadd(80.376, 125.497, -6.8, 0.54)
	pt3dadd(80.376, 127.26, -6.8, 0.54)
	pt3dadd(80.376, 127.463, -6.8, 0.54)
	pt3dadd(80.568, 129.622, -6.8, 0.54)
	pt3dadd(80.568, 129.825, -6.8, 0.54)
	pt3dadd(80.568, 131.588, -6.8, 0.54)
	pt3dadd(80.568, 131.791, -6.8, 0.54)
	pt3dadd(80.772, 132.774, -6.8, 0.54)
	pt3dadd(80.975, 132.967, -6.8, 0.54)
	pt3dadd(82.365, 135.136, -12.4, 0.54)
	pt3dadd(82.365, 135.328, -12.4, 0.54)
	pt3dadd(83.563, 136.899, -12.4, 0.54)
	pt3dadd(84.557, 138.673, -12.4, 0.54)
	pt3dadd(84.557, 139.069, -12.4, 0.54)
	pt3dadd(84.964, 141.035, -12.4, 0.54)
	pt3dadd(84.964, 141.227, -12.4, 0.54)
	pt3dadd(85.156, 143.781, -12.4, 0.54)
	pt3dadd(84.964, 143.781, -12.4, 0.54)
  }
}
proc shape3d_4() {
  dend[8] {	pt3dadd(85.156, 145.159, -12.4, 0.54)
	pt3dadd(85.36, 145.555, -12.4, 0.54)
	pt3dadd(85.563, 147.724, -12.4, 0.54)
	pt3dadd(85.959, 148.312, -12.4, 0.54)
  }
  dend[9] {pt3dclear()
	pt3dadd(85.959, 148.312, -12.4, 0.54)
	pt3dadd(85.36, 149.487, -12.4, 0.54)
	pt3dadd(85.156, 150.866, -12.4, 0.18)
	pt3dadd(85.156, 151.069, -12.4, 0.18)
	pt3dadd(84.761, 152.244, -12.4, 0.18)
	pt3dadd(84.761, 152.436, -12.4, 0.18)
	pt3dadd(84.964, 154.019, -12.4, 0.18)
	pt3dadd(84.964, 154.403, -12.4, 0.18)
	pt3dadd(84.365, 156.764, -12.4, 0.18)
	pt3dadd(84.162, 157.363, -12.4, 0.18)
	pt3dadd(84.162, 159.329, -12.4, 0.18)
	pt3dadd(83.958, 159.714, -12.4, 0.18)
	pt3dadd(83.766, 161.296, -12.4, 0.18)
	pt3dadd(83.766, 161.883, -12.4, 0.18)
	pt3dadd(83.958, 163.657, -12.4, 0.18)
	pt3dadd(83.958, 164.245, -12.4, 0.18)
	pt3dadd(82.964, 166.008, -12.4, 0.18)
	pt3dadd(82.761, 166.607, -12.4, 0.18)
	pt3dadd(82.365, 167.985, -12.4, 0.18)
	pt3dadd(82.173, 168.573, -12.4, 0.18)
	pt3dadd(81.766, 170.144, -12.4, 0.18)
	pt3dadd(81.766, 170.731, -12.4, 0.18)
	pt3dadd(81.167, 172.302, -12.4, 0.18)
	pt3dadd(81.167, 172.697, -12.4, 0.18)
	pt3dadd(80.376, 173.68, -12.4, 0.18)
	pt3dadd(80.173, 174.076, -12.4, 0.18)
	pt3dadd(79.574, 177.025, -12.4, 0.18)
	pt3dadd(79.777, 180.178, -12.4, 0.18)
	pt3dadd(79.777, 180.958, -12.4, 0.18)
	pt3dadd(80.376, 183.715, -12.4, 0.18)
	pt3dadd(80.376, 184.302, -12.4, 0.18)
	pt3dadd(80.568, 187.647, -12.4, 0.18)
	pt3dadd(80.568, 188.438, -12.4, 0.18)
	pt3dadd(79.777, 191.388, -12.4, 0.18)
	pt3dadd(79.371, 191.975, -12.4, 0.18)
	pt3dadd(78.58, 194.924, -12.4, 0.18)
	pt3dadd(78.376, 195.715, -12.4, 0.18)
	pt3dadd(78.376, 196.303, -12.4, 0.18)
	pt3dadd(78.975, 198.077, -12.4, 0.18)
	pt3dadd(78.975, 198.473, -12.4, 0.18)
	pt3dadd(78.975, 199.252, -12.4, 0.18)
	pt3dadd(78.975, 201.422, -12.4, 0.18)
	pt3dadd(79.179, 201.422, -12.4, 0.18)
	pt3dadd(79.574, 202.801, -12.4, 0.18)
	pt3dadd(79.574, 203.185, -12.4, 0.18)
	pt3dadd(79.179, 203.976, -12.4, 0.18)
	pt3dadd(78.772, 205.75, -12.4, 0.18)
	pt3dadd(78.772, 205.942, -12.4, 0.18)
	pt3dadd(77.981, 208.112, -12.4, 0.18)
	pt3dadd(77.777, 208.891, -12.4, 0.18)
	pt3dadd(77.585, 210.857, -12.4, 0.18)
	pt3dadd(76.986, 211.649, -12.4, 0.18)
	pt3dadd(75.789, 214.406, -12.4, 0.18)
	pt3dadd(75.585, 214.993, -12.4, 0.18)
	pt3dadd(74.986, 216.959, -12.4, 0.18)
	pt3dadd(74.986, 217.547, -12.4, 0.18)
	pt3dadd(74.986, 219.717, -12.4, 0.18)
	pt3dadd(75.19, 219.909, -12.4, 0.18)
	pt3dadd(75.19, 220.496, -12.4, 0.18)
	pt3dadd(75.981, 222.067, -12.4, 0.18)
	pt3dadd(76.184, 222.666, -12.4, 0.18)
	pt3dadd(75.585, 225.028, -12.4, 0.18)
	pt3dadd(75.382, 225.807, -12.4, 0.18)
	pt3dadd(75.19, 227.774, -12.4, 0.18)
	pt3dadd(74.986, 228.361, -12.4, 0.18)
	pt3dadd(74.986, 228.565, -12.4, 0.18)
	pt3dadd(74.794, 230.135, -12.4, 0.18)
	pt3dadd(74.794, 230.723, -12.4, 0.18)
	pt3dadd(76.387, 233.672, -12.4, 0.18)
	pt3dadd(76.58, 234.271, -12.4, 0.18)
	pt3dadd(77.777, 236.825, -3.2, 0.18)
	pt3dadd(77.777, 237.017, -3.2, 0.18)
	pt3dadd(78.376, 239.582, -3.2, 0.18)
	pt3dadd(78.376, 240.565, -3.2, 0.18)
	pt3dadd(78.184, 243.91, -3.2, 0.18)
	pt3dadd(77.777, 244.498, -3.2, 0.18)
	pt3dadd(76.986, 246.656, -3.6, 0.18)
	pt3dadd(76.783, 247.051, -3.6, 0.18)
	pt3dadd(75.981, 247.842, -4, 0.18)
	pt3dadd(75.789, 248.43, -2.4, 0.18)
	pt3dadd(75.981, 248.43, -2.4, 0.18)
	pt3dadd(77.382, 250.001, -2.8, 0.18)
	pt3dadd(77.585, 250.396, -2.8, 0.18)
	pt3dadd(77.981, 252.17, -2.8, 0.18)
	pt3dadd(77.981, 252.758, -2.8, 0.18)
	pt3dadd(78.184, 254.329, -2.8, 0.18)
	pt3dadd(78.184, 254.916, -2.8, 0.18)
	pt3dadd(78.58, 256.882, -2.8, 0.18)
	pt3dadd(78.58, 257.278, -2.8, 0.18)
	pt3dadd(78.184, 259.843, -2.8, 0.18)
	pt3dadd(77.981, 260.826, -2.8, 0.18)
	pt3dadd(77.981, 263.38, -2.8, 0.18)
	pt3dadd(78.772, 266.521, -2.8, 0.18)
	pt3dadd(78.772, 267.312, -2.8, 0.18)
	pt3dadd(78.975, 267.12, -17.6, 0.18)
	pt3dadd(78.975, 267.312, -17.6, 0.18)
	pt3dadd(79.574, 269.482, -17.6, 0.18)
	pt3dadd(78.376, 270.262, 1.2, 0.18)
	pt3dadd(78.376, 271.053, 1.2, 0.18)
  }
  dend[10] {pt3dclear()
	pt3dadd(78.376, 271.053, 1.2, 0.18)
	pt3dadd(78.975, 271.448, -6.08, 0.18)
	pt3dadd(78.975, 271.64, -6.08, 0.18)
	pt3dadd(80.376, 273.211, -6.08, 0.18)
	pt3dadd(80.772, 273.799, -6.08, 0.18)
	pt3dadd(80.568, 275.573, -6.08, 0.18)
	pt3dadd(80.376, 276.16, -6.08, 0.18)
	pt3dadd(79.777, 277.742, -6.08, 0.18)
	pt3dadd(79.777, 278.33, -6.08, 0.18)
	pt3dadd(79.574, 280.093, -6.08, 0.18)
	pt3dadd(79.574, 280.692, -6.08, 0.18)
	pt3dadd(79.777, 282.262, -6.08, 0.18)
	pt3dadd(79.97, 282.85, -6.08, 0.18)
	pt3dadd(81.167, 284.816, -6.08, 0.18)
	pt3dadd(81.371, 285.404, -6.08, 0.18)
	pt3dadd(81.167, 288.364, -6.08, 0.18)
	pt3dadd(81.167, 289.144, -6.08, 0.18)
	pt3dadd(80.975, 292.093, -6.08, 0.18)
	pt3dadd(80.772, 292.884, -6.08, 0.18)
	pt3dadd(80.975, 295.043, -6.48, 0.18)
	pt3dadd(80.975, 295.641, -6.48, 0.18)
	pt3dadd(80.568, 296.229, -6.48, 0.18)
	pt3dadd(79.371, 297.212, -6.88, 0.18)
	pt3dadd(78.975, 297.404, -6.88, 0.18)
	pt3dadd(78.772, 298.783, -6.88, 0.18)
	pt3dadd(78.975, 299.37, -6.88, 0.18)
	pt3dadd(79.371, 300.161, -6.88, 0.18)
	pt3dadd(79.371, 302.32, -6.88, 0.18)
	pt3dadd(79.179, 303.314, -6.88, 0.18)
	pt3dadd(79.179, 306.06, -6.88, 0.18)
	pt3dadd(79.371, 306.648, -6.88, 0.18)
	pt3dadd(79.777, 307.246, -6.88, 0.18)
	pt3dadd(80.975, 308.625, -6.88, 0.18)
	pt3dadd(80.975, 309.213, -6.88, 0.18)
	pt3dadd(81.371, 311.959, -6.88, 0.18)
	pt3dadd(81.167, 312.75, -6.88, 0.18)
	pt3dadd(81.574, 314.919, -6.88, 0.18)
	pt3dadd(81.766, 315.507, -6.88, 0.18)
	pt3dadd(82.569, 317.473, -6.88, 0.18)
	pt3dadd(82.761, 318.061, -6.88, 0.18)
	pt3dadd(83.167, 318.648, -6.88, 0.18)
	pt3dadd(83.958, 319.835, -6.88, 0.18)
	pt3dadd(84.365, 320.422, -6.88, 0.18)
	pt3dadd(84.557, 321.01, -6.88, 0.18)
	pt3dadd(85.755, 322.976, -6.88, 0.18)
	pt3dadd(85.755, 323.767, -7.28, 0.18)
	pt3dadd(87.156, 326.321, 4.32, 0.18)
	pt3dadd(87.348, 327.112, 4.32, 0.18)
	pt3dadd(88.354, 328.875, 4.32, 0.18)
	pt3dadd(88.546, 329.474, 4.32, 0.18)
	pt3dadd(88.953, 332.219, 4.32, 0.18)
	pt3dadd(88.953, 333.01, 4.32, 0.18)
	pt3dadd(89.145, 335.169, 4.32, 0.18)
	pt3dadd(88.953, 335.96, 4.32, 0.18)
	pt3dadd(87.552, 337.146, 3.92, 0.18)
	pt3dadd(87.348, 337.146, 3.92, 0.18)
	pt3dadd(86.557, 337.53, 3.92, 0.18)
	pt3dadd(84.964, 337.734, 3.92, 0.18)
	pt3dadd(84.761, 337.734, 3.92, 0.18)
	pt3dadd(83.167, 338.129, 3.92, 0.18)
	pt3dadd(82.761, 338.321, 3.92, 0.18)
	pt3dadd(81.167, 339.892, 3.92, 0.18)
	pt3dadd(80.772, 340.48, 3.92, 0.18)
	pt3dadd(79.574, 342.649, 3.92, 0.18)
	pt3dadd(79.179, 343.045, 3.92, 0.18)
	pt3dadd(78.975, 343.633, 3.92, 0.18)
	pt3dadd(78.975, 343.825, 3.92, 0.18)
	pt3dadd(78.58, 343.825, -10.08, 0.18)
  }
  dend[11] {pt3dclear()
	pt3dadd(78.376, 271.053, 1.2, 0.18)
	pt3dadd(78.184, 272.431, 1.2, 0.18)
	pt3dadd(78.184, 272.623, 1.2, 0.18)
	pt3dadd(79.777, 275.177, 1.2, 0.18)
	pt3dadd(79.97, 275.776, 1.2, 0.18)
	pt3dadd(80.568, 276.759, 1.2, 0.18)
	pt3dadd(80.568, 277.539, 1.2, 0.18)
	pt3dadd(80.975, 278.33, 1.2, 0.18)
	pt3dadd(80.975, 278.917, 1.2, 0.18)
	pt3dadd(81.167, 279.313, 1.2, 0.18)
	pt3dadd(81.167, 281.279, 1.2, 0.18)
	pt3dadd(80.772, 281.867, 1.2, 0.18)
	pt3dadd(79.371, 283.641, 1.2, 0.18)
	pt3dadd(78.975, 284.036, 1.2, 0.18)
	pt3dadd(79.179, 285.607, 1.2, 0.18)
	pt3dadd(79.777, 286.398, 1.2, 0.18)
	pt3dadd(81.574, 287.573, 1.2, 0.18)
	pt3dadd(81.766, 287.969, 1.2, 0.18)
	pt3dadd(81.97, 290.715, -1.2, 0.18)
	pt3dadd(82.173, 291.313, -1.2, 0.18)
	pt3dadd(83.167, 294.658, -1.2, 0.18)
	pt3dadd(84.557, 298.003, -1.2, 0.18)
	pt3dadd(84.761, 298.591, -1.2, 0.18)
	pt3dadd(84.761, 301.145, -1.2, 0.18)
	pt3dadd(84.761, 301.54, -1.2, 0.18)
	pt3dadd(84.761, 301.936, -1.2, 0.18)
	pt3dadd(84.761, 303.111, -1.2, 0.18)
	pt3dadd(84.557, 303.698, -1.2, 0.18)
	pt3dadd(84.365, 305.664, -1.2, 0.18)
  }
}
proc shape3d_5() {
  dend[11] {	pt3dadd(84.365, 306.263, -1.2, 0.18)
	pt3dadd(84.557, 307.631, -1.2, 0.18)
	pt3dadd(84.162, 308.422, -1.2, 0.18)
	pt3dadd(83.766, 310.196, -1.2, 0.18)
	pt3dadd(83.563, 310.783, -1.2, 0.18)
	pt3dadd(83.958, 311.574, -1.2, 0.18)
	pt3dadd(84.162, 311.574, -1.2, 0.18)
	pt3dadd(85.563, 311.574, -1.2, 0.18)
	pt3dadd(85.755, 311.574, -1.2, 0.18)
	pt3dadd(85.36, 311.959, -1.2, 0.18)
  }
  dend[12] {pt3dclear()
	pt3dadd(85.959, 148.312, -12.4, 0.54)
	pt3dadd(86.953, 150.278, -12.4, 0.18)
	pt3dadd(86.953, 150.47, -12.4, 0.18)
	pt3dadd(87.348, 151.657, -12.4, 0.18)
	pt3dadd(87.552, 152.052, -12.4, 0.18)
	pt3dadd(88.546, 153.815, -12.4, 0.18)
	pt3dadd(90.343, 156.38, -12.4, 0.18)
	pt3dadd(90.343, 156.572, -12.4, 0.18)
	pt3dadd(91.337, 158.731, -12.4, 0.18)
	pt3dadd(91.337, 159.126, -12.4, 0.18)
	pt3dadd(92.14, 160.697, -12.4, 0.18)
	pt3dadd(92.343, 161.296, -12.4, 0.18)
	pt3dadd(93.733, 162.674, -12.4, 0.18)
	pt3dadd(93.936, 163.059, -12.4, 0.18)
	pt3dadd(94.727, 165.025, -12.4, 0.18)
	pt3dadd(94.535, 165.228, -12.4, 0.18)
	pt3dadd(94.727, 167.59, -12.4, 0.18)
	pt3dadd(94.727, 167.985, -12.4, 0.18)
	pt3dadd(94.931, 170.336, -12.4, 0.18)
	pt3dadd(94.931, 170.731, -12.4, 0.18)
	pt3dadd(95.733, 172.697, -12.4, 0.18)
	pt3dadd(95.925, 173.296, -12.4, 0.18)
	pt3dadd(96.524, 175.059, -12.4, 0.18)
	pt3dadd(96.727, 175.647, -12.4, 0.18)
	pt3dadd(96.931, 177.816, -12.4, 0.18)
	pt3dadd(96.931, 178.404, -12.4, 0.18)
	pt3dadd(96.931, 180.37, -12.4, 0.18)
	pt3dadd(96.727, 180.958, -12.4, 0.18)
	pt3dadd(97.53, 182.732, -12.4, 0.18)
	pt3dadd(99.722, 185.681, -12.4, 0.18)
	pt3dadd(99.722, 185.885, -12.4, 0.18)
	pt3dadd(99.722, 188.438, -12.4, 0.18)
	pt3dadd(99.519, 189.218, -12.4, 0.18)
	pt3dadd(99.315, 191.388, -12.4, 0.18)
	pt3dadd(99.315, 191.975, -12.4, 0.18)
	pt3dadd(100.92, 194.145, -12.4, 0.18)
	pt3dadd(101.112, 194.732, -12.4, 0.18)
	pt3dadd(101.315, 195.128, -12.4, 0.18)
	pt3dadd(102.31, 196.699, -12.4, 0.18)
	pt3dadd(102.513, 197.286, -12.4, 0.18)
	pt3dadd(103.112, 199.06, -12.4, 0.18)
	pt3dadd(103.112, 199.648, -12.4, 0.18)
	pt3dadd(103.507, 201.422, -12.4, 0.18)
	pt3dadd(103.507, 201.817, -12.4, 0.18)
	pt3dadd(104.31, 203.388, -12.4, 0.18)
	pt3dadd(104.502, 203.976, -12.4, 0.18)
	pt3dadd(105.903, 205.75, -12.4, 0.18)
	pt3dadd(106.095, 206.337, -12.4, 0.18)
	pt3dadd(106.299, 206.925, -12.4, 0.18)
	pt3dadd(106.502, 208.112, -12.4, 0.18)
	pt3dadd(106.502, 208.496, -12.4, 0.18)
	pt3dadd(106.694, 210.462, -12.4, 0.18)
	pt3dadd(106.897, 211.253, -12.4, 0.18)
	pt3dadd(108.694, 217.355, -12.4, 0.18)
	pt3dadd(108.694, 217.739, -12.4, 0.18)
	pt3dadd(109.09, 220.496, -12.4, 0.18)
	pt3dadd(109.09, 221.084, -12.4, 0.18)
	pt3dadd(109.689, 223.446, -12.4, 0.18)
	pt3dadd(109.689, 224.237, -12.4, 0.18)
	pt3dadd(110.287, 226.994, -12.4, 0.18)
	pt3dadd(110.491, 227.774, -12.4, 0.18)
	pt3dadd(111.09, 229.74, -12.4, 0.18)
	pt3dadd(111.09, 230.135, -12.4, 0.18)
	pt3dadd(110.886, 231.909, -12.4, 0.18)
	pt3dadd(110.683, 232.497, -12.4, 0.18)
	pt3dadd(111.689, 234.859, -12.4, 0.18)
	pt3dadd(111.689, 235.446, -12.4, 0.18)
	pt3dadd(112.683, 238, -12.4, 0.18)
	pt3dadd(112.887, 238.599, -12.4, 0.18)
	pt3dadd(113.282, 240.757, -12.4, 0.18)
	pt3dadd(115.87, 245.673, -12.4, 0.18)
	pt3dadd(115.87, 245.876, -12.4, 0.18)
	pt3dadd(117.067, 250.204, -12.4, 0.18)
	pt3dadd(117.271, 251.187, -12.4, 0.18)
	pt3dadd(118.661, 255.12, -12.4, 0.18)
	pt3dadd(118.864, 255.899, -12.4, 0.18)
	pt3dadd(119.463, 258.069, -12.4, 0.18)
	pt3dadd(119.667, 258.86, -12.4, 0.18)
	pt3dadd(120.265, 260.431, -12.4, 0.18)
	pt3dadd(120.265, 261.018, -12.4, 0.18)
	pt3dadd(120.062, 262.792, -12.4, 0.18)
	pt3dadd(119.859, 263.188, -12.4, 0.18)
	pt3dadd(120.062, 264.759, -12.4, 0.18)
	pt3dadd(120.062, 265.346, -12.4, 0.18)
	pt3dadd(120.853, 267.312, -12.4, 0.18)
	pt3dadd(121.056, 268.103, -12.4, 0.18)
	pt3dadd(122.051, 271.245, -12.4, 0.18)
	pt3dadd(125.249, 276.759, -17.2, 0.18)
	pt3dadd(125.249, 276.951, -17.2, 0.18)
	pt3dadd(125.644, 279.708, -17.2, 0.18)
	pt3dadd(125.848, 280.104, -17.2, 0.18)
	pt3dadd(127.441, 282.262, -17.2, 0.18)
	pt3dadd(127.644, 282.85, -17.2, 0.18)
	pt3dadd(130.029, 285.212, -17.2, 0.18)
	pt3dadd(130.232, 285.799, -17.2, 0.18)
	pt3dadd(131.43, 287.765, -17.2, 0.18)
	pt3dadd(131.633, 288.364, -17.2, 0.18)
	pt3dadd(133.227, 290.715, -17.2, 0.18)
	pt3dadd(133.227, 291.313, -17.2, 0.18)
	pt3dadd(134.017, 293.675, -17.2, 0.18)
	pt3dadd(134.017, 294.263, -17.2, 0.18)
	pt3dadd(134.616, 296.026, -17.2, 0.18)
	pt3dadd(134.616, 296.421, -17.2, 0.18)
	pt3dadd(135.023, 298.387, -17.2, 0.18)
	pt3dadd(135.215, 298.986, -17.2, 0.18)
	pt3dadd(135.419, 299.574, -17.2, 0.18)
	pt3dadd(136.21, 301.145, -17.2, 0.18)
	pt3dadd(138.605, 305.28, -17.2, 0.18)
	pt3dadd(138.809, 305.664, -17.2, 0.18)
	pt3dadd(141.001, 309.213, -17.2, 0.18)
	pt3dadd(141.396, 309.992, -17.2, 0.18)
	pt3dadd(143.6, 314.128, -17.2, 0.18)
	pt3dadd(143.995, 315.303, -17.2, 0.18)
	pt3dadd(145.589, 318.648, -17.2, 0.18)
	pt3dadd(145.984, 319.439, -17.2, 0.18)
	pt3dadd(147.385, 322.196, -17.2, 0.18)
	pt3dadd(147.589, 323.179, -17.2, 0.18)
	pt3dadd(149.182, 325.733, -17.2, 0.18)
	pt3dadd(149.374, 326.129, -17.2, 0.18)
	pt3dadd(151.171, 328.287, -17.2, 0.18)
	pt3dadd(151.374, 329.078, -17.2, 0.18)
	pt3dadd(152.369, 330.841, -17.2, 0.18)
	pt3dadd(154.369, 334.186, -17.2, 0.18)
	pt3dadd(154.369, 334.977, -17.2, 0.18)
	pt3dadd(156.561, 338.514, -17.2, 0.18)
	pt3dadd(156.957, 339.113, -17.2, 0.18)
	pt3dadd(159.748, 340.683, -17.2, 0.18)
	pt3dadd(160.346, 341.079, -17.2, 0.18)
	pt3dadd(162.742, 342.841, -17.2, 0.18)
	pt3dadd(163.341, 343.237, -17.2, 0.18)
	pt3dadd(165.533, 345.203, -17.2, 0.18)
	pt3dadd(165.929, 345.599, -17.2, 0.18)
	pt3dadd(167.725, 346.39, -40, 0.18)
	pt3dadd(167.725, 346.774, -40, 0.18)
	pt3dadd(168.72, 348.943, -40, 0.18)
	pt3dadd(168.72, 349.339, -40, 0.18)
	pt3dadd(169.522, 351.497, -40, 0.18)
	pt3dadd(169.522, 352.085, -40, 0.18)
	pt3dadd(170.324, 353.859, -40, 0.18)
	pt3dadd(170.517, 354.447, -40, 0.18)
	pt3dadd(171.319, 357.396, -40, 0.18)
	pt3dadd(171.511, 357.995, -40, 0.18)
	pt3dadd(171.714, 358.775, -40, 0.18)
	pt3dadd(172.313, 360.356, -40, 0.18)
	pt3dadd(175.5, 368.809, -40, 0.18)
	pt3dadd(175.703, 369.396, -40, 0.18)
	pt3dadd(177.297, 373.137, -40, 0.18)
	pt3dadd(177.297, 373.724, -40, 0.18)
	pt3dadd(178.494, 377.273, -40, 0.18)
	pt3dadd(178.698, 377.86, -40, 0.18)
	pt3dadd(180.088, 381.002, -40, 0.18)
	pt3dadd(180.291, 381.793, -40, 0.18)
	pt3dadd(181.489, 384.742, -40, 0.18)
	pt3dadd(181.692, 384.934, -40, 0.18)
	pt3dadd(183.478, 389.07, -40, 0.18)
	pt3dadd(185.274, 391.624, -20, 0.18)
	pt3dadd(187.873, 398.709, -20, 0.18)
  }
  dend[13] {pt3dclear()
	pt3dadd(79.371, 124.706, -6, 0.54)
	pt3dadd(78.376, 124.706, -6, 0.18)
	pt3dadd(78.376, 124.898, -6, 0.18)
	pt3dadd(77.981, 126.085, -6, 0.18)
	pt3dadd(77.981, 126.277, -6, 0.18)
	pt3dadd(77.777, 127.463, -6, 0.18)
	pt3dadd(77.777, 127.656, -6, 0.18)
	pt3dadd(77.585, 129.226, -6, 0.18)
	pt3dadd(77.382, 130.017, -8.8, 0.18)
	pt3dadd(77.178, 130.413, -8.8, 0.18)
	pt3dadd(75.981, 131.588, -8.8, 0.18)
	pt3dadd(75.789, 131.588, -8.8, 0.18)
	pt3dadd(75.585, 132.967, -8.8, 0.18)
	pt3dadd(75.585, 133.554, -8.8, 0.18)
	pt3dadd(75.789, 135.328, -8.8, 0.18)
	pt3dadd(75.981, 135.916, -8.8, 0.18)
	pt3dadd(76.387, 136.311, -8.8, 0.18)
	pt3dadd(77.382, 138.085, -8.8, 0.18)
	pt3dadd(77.585, 138.673, -8.8, 0.18)
	pt3dadd(76.184, 140.639, -8.8, 0.18)
	pt3dadd(75.789, 141.227, -8.8, 0.18)
	pt3dadd(75.382, 141.622, -8.8, 0.18)
	pt3dadd(74.591, 142.413, -9.2, 0.18)
	pt3dadd(73.992, 143.001, -9.2, 0.18)
	pt3dadd(73.19, 143.781, -9.2, 0.18)
	pt3dadd(72.997, 143.984, -9.2, 0.18)
	pt3dadd(73.19, 146.346, -29.6, 0.18)
	pt3dadd(73.19, 146.741, -29.6, 0.18)
	pt3dadd(72.997, 148.312, -29.6, 0.18)
	pt3dadd(72.794, 148.9, -29.6, 0.18)
	pt3dadd(71.992, 150.866, -29.6, 0.18)
	pt3dadd(71.992, 151.453, -29.6, 0.18)
	pt3dadd(72.195, 152.436, -29.6, 0.18)
  }
}
proc shape3d_6() {
  dend[13] {	pt3dadd(72.591, 153.035, -29.6, 0.18)
	pt3dadd(72.794, 153.623, -29.6, 0.18)
	pt3dadd(73.596, 154.403, -29.6, 0.18)
	pt3dadd(73.788, 155.002, -29.6, 0.18)
	pt3dadd(74.195, 156.572, -29.6, 0.18)
	pt3dadd(74.195, 156.968, -29.6, 0.18)
	pt3dadd(74.195, 157.555, -29.6, 0.18)
	pt3dadd(74.794, 158.539, -29.6, 0.18)
	pt3dadd(75.382, 160.9, -28.8, 0.18)
	pt3dadd(75.382, 161.488, -28.8, 0.18)
	pt3dadd(75.382, 163.454, -29.2, 0.18)
	pt3dadd(75.19, 163.85, -29.2, 0.18)
	pt3dadd(73.788, 165.228, -29.2, 0.18)
	pt3dadd(73.596, 165.42, -29.2, 0.18)
	pt3dadd(74.986, 167.386, -29.2, 0.18)
	pt3dadd(74.986, 167.782, -29.2, 0.18)
	pt3dadd(75.19, 169.353, -29.2, 0.18)
	pt3dadd(75.19, 170.144, -29.2, 0.18)
	pt3dadd(74.195, 171.714, -29.6, 0.18)
	pt3dadd(73.992, 172.302, -29.6, 0.18)
	pt3dadd(73.19, 174.076, -29.6, 0.18)
	pt3dadd(72.997, 174.867, -29.6, 0.18)
	pt3dadd(74.591, 176.833, -29.6, 0.18)
	pt3dadd(74.794, 177.421, -29.6, 0.18)
	pt3dadd(75.382, 179.195, -29.6, 0.18)
	pt3dadd(75.382, 179.975, -29.6, 0.18)
	pt3dadd(74.986, 182.144, -30, 0.18)
	pt3dadd(74.986, 182.732, -30, 0.18)
	pt3dadd(75.19, 185.286, -52.8, 0.18)
	pt3dadd(75.981, 184.901, -52.8, 0.18)
  }
  dend[14] {pt3dclear()
	pt3dadd(75.981, 184.901, -52.8, 0.18)
	pt3dadd(78.376, 186.472, -54, 0.18)
	pt3dadd(79.371, 187.455, -54, 0.18)
	pt3dadd(79.371, 187.647, -54, 0.18)
	pt3dadd(79.777, 189.026, -54, 0.18)
	pt3dadd(79.777, 189.218, -54, 0.18)
	pt3dadd(79.777, 190.009, -54, 0.18)
	pt3dadd(79.777, 190.212, -54, 0.18)
	pt3dadd(79.777, 190.597, -54, 0.18)
	pt3dadd(80.173, 191.783, -54, 0.18)
	pt3dadd(80.173, 192.179, -54, 0.18)
	pt3dadd(81.167, 193.941, -54, 0.18)
	pt3dadd(81.371, 194.732, -54, 0.18)
	pt3dadd(82.173, 197.094, -54, 0.18)
	pt3dadd(82.365, 197.49, -54, 0.18)
	pt3dadd(83.563, 199.648, -54, 0.18)
	pt3dadd(83.766, 200.235, -54, 0.18)
	pt3dadd(84.365, 202.01, -54, 0.18)
	pt3dadd(84.557, 202.801, -54, 0.18)
	pt3dadd(85.563, 204.959, -54, 0.18)
	pt3dadd(85.755, 205.354, -54, 0.18)
	pt3dadd(85.959, 205.75, -54, 0.18)
	pt3dadd(86.75, 206.925, -54, 0.18)
	pt3dadd(86.75, 207.513, -54, 0.18)
	pt3dadd(87.755, 209.479, -54, 0.18)
	pt3dadd(87.755, 209.682, -54, 0.18)
	pt3dadd(87.947, 211.253, -54, 0.18)
	pt3dadd(87.947, 211.649, -54, 0.18)
	pt3dadd(87.947, 213.615, -54, 0.18)
	pt3dadd(89.552, 216.372, -54, 0.18)
	pt3dadd(89.744, 216.756, -54, 0.18)
	pt3dadd(90.738, 219.909, -54, 0.18)
	pt3dadd(90.942, 220.7, -54, 0.18)
	pt3dadd(92.739, 222.858, -54, 0.18)
	pt3dadd(93.936, 224.429, -52.4, 0.18)
	pt3dadd(94.535, 224.429, -52.4, 0.18)
	pt3dadd(97.123, 225.412, -52.4, 0.18)
	pt3dadd(97.53, 225.807, -52.4, 0.18)
	pt3dadd(99.914, 226.994, -52.4, 0.18)
	pt3dadd(100.117, 227.378, -52.4, 0.18)
	pt3dadd(101.112, 229.548, -52.8, 0.18)
	pt3dadd(100.92, 230.135, -52.8, 0.18)
	pt3dadd(100.92, 232.101, -52.8, 0.18)
	pt3dadd(100.716, 232.689, -52.8, 0.18)
	pt3dadd(100.92, 234.463, -52.8, 0.18)
	pt3dadd(100.92, 234.859, -53.2, 0.18)
	pt3dadd(102.31, 236.429, -53.2, 0.18)
	pt3dadd(102.705, 237.017, -53.2, 0.18)
	pt3dadd(104.106, 238.203, -53.2, 0.18)
	pt3dadd(104.705, 238.791, -53.2, 0.18)
	pt3dadd(105.304, 239.582, -53.2, 0.18)
	pt3dadd(106.694, 240.961, -53.2, 0.18)
	pt3dadd(106.897, 241.548, -53.2, 0.18)
	pt3dadd(109.485, 244.294, -53.2, 0.18)
	pt3dadd(116.672, 251.571, -67.2, 0.18)
	pt3dadd(116.672, 251.775, -67.2, 0.18)
	pt3dadd(117.87, 253.345, -67.2, 0.18)
	pt3dadd(118.062, 253.933, -67.2, 0.18)
	pt3dadd(118.265, 254.532, -67.2, 0.18)
	pt3dadd(118.864, 256.295, -67.2, 0.18)
	pt3dadd(119.068, 257.086, -67.2, 0.18)
	pt3dadd(120.062, 259.843, -67.2, 0.18)
	pt3dadd(120.457, 260.431, -67.2, 0.18)
	pt3dadd(121.452, 263.176, -67.2, 0.18)
	pt3dadd(121.655, 263.775, -67.2, 0.18)
	pt3dadd(123.452, 266.329, -67.2, 0.18)
	pt3dadd(123.655, 266.917, -67.2, 0.18)
	pt3dadd(125.045, 270.465, -75.6, 0.18)
	pt3dadd(125.249, 270.849, -75.6, 0.18)
	pt3dadd(127.441, 274.002, -75.6, 0.18)
	pt3dadd(132.628, 279.109, -75.6, 0.18)
	pt3dadd(133.023, 279.505, -75.6, 0.18)
	pt3dadd(135.215, 280.884, -75.6, 0.18)
	pt3dadd(135.419, 281.087, -75.6, 0.18)
	pt3dadd(137.611, 283.641, -75.6, 0.18)
	pt3dadd(137.814, 284.228, -75.6, 0.18)
	pt3dadd(139.611, 286.782, -75.6, 0.18)
	pt3dadd(140.007, 287.381, -75.6, 0.18)
	pt3dadd(141.396, 289.347, -75.6, 0.18)
	pt3dadd(141.803, 289.935, -75.6, 0.18)
	pt3dadd(144.786, 293.076, -65.6, 0.18)
	pt3dadd(144.786, 293.28, -65.6, 0.18)
	pt3dadd(148.38, 296.229, -65.6, 0.18)
	pt3dadd(148.583, 296.229, -65.6, 0.18)
	pt3dadd(149.182, 297.009, -65.6, 0.18)
  }
  dend[15] {pt3dclear()
	pt3dadd(75.981, 184.901, -52.8, 0.18)
	pt3dadd(74.387, 185.885, -52.8, 0.18)
	pt3dadd(74.387, 186.269, -52.8, 0.18)
	pt3dadd(73.788, 190.212, -52.8, 0.18)
	pt3dadd(72.794, 194.529, -33.2, 0.18)
	pt3dadd(72.794, 194.732, -33.2, 0.18)
	pt3dadd(72.399, 199.252, -33.6, 0.18)
	pt3dadd(72.195, 199.84, -33.6, 0.18)
	pt3dadd(72.195, 204.767, -33.6, 0.18)
	pt3dadd(72.195, 205.354, -33.6, 0.18)
	pt3dadd(71.992, 208.699, -33.6, 0.18)
	pt3dadd(71.8, 209.287, -33.6, 0.18)
	pt3dadd(71.201, 212.236, -33.6, 0.18)
	pt3dadd(70.805, 212.824, -33.6, 0.18)
	pt3dadd(70.206, 215.773, -33.6, 0.18)
	pt3dadd(70.003, 216.564, -33.6, 0.18)
	pt3dadd(69.8, 219.513, -33.6, 0.18)
	pt3dadd(70.003, 225.412, -52, 0.18)
	pt3dadd(69.8, 226.203, -52, 0.18)
	pt3dadd(68.805, 230.723, -52, 0.18)
	pt3dadd(68.805, 231.514, -52, 0.18)
	pt3dadd(68.206, 234.463, -52, 0.18)
	pt3dadd(67.811, 235.254, -52, 0.18)
	pt3dadd(66.816, 238.203, -52, 0.18)
	pt3dadd(66.41, 238.983, -52, 0.18)
	pt3dadd(64.421, 241.944, -52, 0.18)
	pt3dadd(64.014, 242.531, -52, 0.18)
	pt3dadd(62.624, 245.277, -52, 0.18)
	pt3dadd(62.229, 245.876, -52, 0.18)
	pt3dadd(61.031, 248.622, -52, 0.18)
	pt3dadd(59.031, 255.515, -52, 0.18)
	pt3dadd(58.839, 256.295, -52, 0.18)
	pt3dadd(57.437, 260.623, -52, 0.18)
	pt3dadd(57.234, 261.414, -52, 0.18)
	pt3dadd(56.838, 263.775, -52, 0.18)
	pt3dadd(56.838, 264.555, -52, 0.18)
	pt3dadd(56.838, 267.312, -52, 0.18)
	pt3dadd(56.838, 268.103, -52, 0.18)
	pt3dadd(57.042, 271.245, -52, 0.18)
	pt3dadd(56.838, 272.036, -52, 0.18)
	pt3dadd(55.844, 273.414, -52, 0.18)
	pt3dadd(55.641, 274.002, -52, 0.18)
	pt3dadd(54.85, 276.16, -52, 0.18)
	pt3dadd(54.85, 276.951, -52, 0.18)
	pt3dadd(54.646, 277.742, -52, 0.18)
	pt3dadd(55.042, 280.093, -52, 0.18)
	pt3dadd(54.85, 280.488, -52, 0.18)
	pt3dadd(53.844, 282.85, -52, 0.18)
	pt3dadd(53.652, 283.641, -52, 0.18)
	pt3dadd(53.053, 286.195, -52, 0.18)
	pt3dadd(53.053, 287.178, -52, 0.18)
	pt3dadd(52.646, 291.313, -52, 0.18)
	pt3dadd(52.454, 292.489, -52, 0.18)
	pt3dadd(52.047, 295.438, -52, 0.18)
	pt3dadd(51.855, 296.229, -52, 0.18)
	pt3dadd(51.46, 297.404, -52, 0.18)
	pt3dadd(50.058, 299.574, -52, 0.18)
	pt3dadd(49.663, 300.354, -52, 0.18)
	pt3dadd(47.663, 303.111, -52, 0.18)
	pt3dadd(47.064, 303.698, -52, 0.18)
	pt3dadd(46.668, 304.489, -52, 0.18)
	pt3dadd(44.872, 305.868, -52, 0.18)
	pt3dadd(44.273, 306.455, -52, 0.18)
	pt3dadd(41.877, 309.009, -52, 0.18)
	pt3dadd(41.877, 309.213, -52, 0.18)
	pt3dadd(41.086, 309.405, -52, 0.18)
	pt3dadd(40.679, 309.405, -52, 0.18)
	pt3dadd(38.487, 311.371, -52, 0.18)
	pt3dadd(38.295, 311.766, -52, 0.18)
	pt3dadd(36.894, 314.32, -52, 0.18)
	pt3dadd(36.498, 314.919, -52, 0.18)
	pt3dadd(35.504, 316.682, -52, 0.18)
	pt3dadd(35.301, 317.078, -52, 0.18)
	pt3dadd(33.301, 318.852, -52, 0.18)
	pt3dadd(32.905, 319.236, -52, 0.18)
	pt3dadd(28.916, 320.818, -52, 0.18)
	pt3dadd(28.125, 321.01, -52, 0.18)
	pt3dadd(25.526, 321.598, -52, 0.18)
	pt3dadd(25.131, 321.801, -52, 0.18)
	pt3dadd(23.729, 321.801, -52, 0.18)
	pt3dadd(23.537, 321.801, -52, 0.18)
	pt3dadd(21.933, 321.598, -52, 0.18)
	pt3dadd(21.741, 321.598, -52, 0.18)
	pt3dadd(20.339, 322.389, -52, 0.18)
	pt3dadd(20.147, 322.784, -52, 0.18)
  }
}
proc shape3d_7() {
  dend[15] {	pt3dadd(19.741, 324.355, -52, 0.18)
	pt3dadd(19.549, 324.355, -52, 0.18)
	pt3dadd(19.345, 326.129, -52, 0.18)
	pt3dadd(18.95, 326.321, -52, 0.18)
	pt3dadd(18.147, 327.7, -52, 0.18)
	pt3dadd(18.147, 328.095, -52, 0.18)
	pt3dadd(17.944, 329.27, -52, 0.18)
	pt3dadd(17.944, 329.666, -52, 0.18)
	pt3dadd(18.147, 331.236, -52, 0.18)
	pt3dadd(18.351, 331.632, -52, 0.18)
	pt3dadd(18.95, 333.01, -52, 0.18)
	pt3dadd(18.95, 333.406, -52, 0.18)
	pt3dadd(20.147, 335.169, -52, 0.18)
	pt3dadd(20.543, 336.152, -52, 0.18)
	pt3dadd(18.78, 341.587, -52, 0.18)
	pt3dadd(18.78, 341.791, -52, 0.18)
	pt3dadd(17.831, 344.367, -52, 0.18)
	pt3dadd(17.639, 344.763, -52, 0.18)
	pt3dadd(17.277, 347.124, -52, 0.18)
	pt3dadd(17.096, 347.723, -52, 0.18)
	pt3dadd(16.531, 350.096, -52, 0.18)
	pt3dadd(16.543, 350.684, -52, 0.18)
	pt3dadd(15.989, 352.853, -52, 0.18)
	pt3dadd(15.797, 353.452, -52, 0.18)
	pt3dadd(14.249, 355.836, -52, 0.18)
	pt3dadd(13.865, 356.435, -52, 0.18)
	pt3dadd(13.695, 358.605, -52, 0.18)
	pt3dadd(13.91, 359.385, -52, 0.18)
	pt3dadd(14.746, 361.532, -52, 0.18)
	pt3dadd(14.961, 362.311, -52, 0.18)
	pt3dadd(15.594, 363.882, -52, 0.18)
	pt3dadd(15.605, 364.47, -52, 0.18)
	pt3dadd(15.842, 366.436, -52, 0.18)
	pt3dadd(15.65, 367.024, -52, 0.18)
	pt3dadd(15.3, 369.984, -52, 0.18)
	pt3dadd(15.119, 370.775, -52, 0.18)
	pt3dadd(15.164, 373.329, -52, 0.18)
	pt3dadd(15.175, 374.12, -52, 0.18)
	pt3dadd(15.627, 376.47, -52, 0.18)
	pt3dadd(15.831, 377.058, -52, 0.18)
	pt3dadd(16.046, 377.645, -52, 0.18)
	pt3dadd(16.464, 378.809, -52, 0.18)
	pt3dadd(16.678, 379.397, -52, 0.18)
	pt3dadd(17.311, 381.747, -52, 0.18)
	pt3dadd(17.322, 382.335, -52, 0.18)
	pt3dadd(17.56, 384.505, -52, 0.18)
	pt3dadd(17.571, 384.697, -52, 0.18)
	pt3dadd(17.786, 385.872, -52, 0.18)
	pt3dadd(17.797, 386.267, -52, 0.18)
	pt3dadd(17.797, 386.46, -52, 0.18)
  }
  dend[16] {pt3dclear()
	pt3dadd(4.192, 11.797, 0, 1.34)
	pt3dadd(2.192, 12.588, 0, 0.64)
	pt3dadd(1.593, 13.763, 0, 0.64)
	pt3dadd(1.593, 13.966, 0, 0.64)
	pt3dadd(1.401, 15.537, 1.2, 0.64)
	pt3dadd(1.401, 15.74, 1.2, 0.64)
	pt3dadd(1.401, 17.503, 1.2, 0.64)
	pt3dadd(1.401, 17.707, 1.2, 0.64)
	pt3dadd(1.401, 18.294, 1.2, 0.64)
	pt3dadd(1.197, 20.068, 1.2, 0.64)
	pt3dadd(0.994, 22.419, -6.48, 0.18)
	pt3dadd(0.802, 22.814, -6.48, 0.18)
	pt3dadd(-0.598, 25.764, -6.48, 0.18)
	pt3dadd(-0.802, 26.362, -6.48, 0.18)
	pt3dadd(-1.796, 29.108, -6.48, 0.18)
	pt3dadd(-1.988, 29.696, -6.48, 0.18)
	pt3dadd(-2.395, 33.436, -6.48, 0.18)
	pt3dadd(-2.395, 34.024, -6.48, 0.18)
	pt3dadd(-2.395, 34.623, -6.48, 0.18)
	pt3dadd(-2.791, 37.764, -6.48, 0.18)
	pt3dadd(-2.791, 38.352, -6.48, 0.18)
	pt3dadd(-2.791, 41.9, -6.48, 0.18)
	pt3dadd(-2.791, 42.284, -6.48, 0.18)
	pt3dadd(-2.791, 42.68, -6.48, 0.18)
	pt3dadd(-2.994, 45.437, -6.48, 0.18)
	pt3dadd(-3.186, 46.024, -6.48, 0.18)
	pt3dadd(-3.186, 50.16, -6.48, 0.18)
	pt3dadd(-2.791, 57.042, -6.88, 0.18)
	pt3dadd(-2.994, 57.234, -6.88, 0.18)
	pt3dadd(-3.186, 62.545, -6.88, 0.18)
	pt3dadd(-3.186, 62.94, -7.28, 0.18)
	pt3dadd(-3.186, 63.528, -7.28, 0.18)
	pt3dadd(-3.785, 67.472, -7.28, 0.18)
	pt3dadd(-3.988, 68.059, -7.28, 0.18)
	pt3dadd(-4.192, 68.647, -7.28, 0.18)
	pt3dadd(-5.186, 72.387, -7.68, 0.18)
	pt3dadd(-5.39, 72.579, -7.68, 0.18)
	pt3dadd(-6.384, 75.337, -7.68, 0.18)
	pt3dadd(-6.576, 75.529, -7.68, 0.18)
	pt3dadd(-6.779, 79.077, -7.68, 0.18)
	pt3dadd(-6.181, 83.597, -6.08, 0.18)
	pt3dadd(-6.384, 83.992, -6.08, 0.18)
	pt3dadd(-7.582, 88.32, -6.08, 0.18)
	pt3dadd(-7.582, 88.716, -6.08, 0.18)
	pt3dadd(-7.378, 93.032, -6.08, 0.18)
	pt3dadd(-7.378, 93.428, -6.08, 0.18)
	pt3dadd(-8.576, 97.564, -6.08, 0.18)
	pt3dadd(-8.972, 98.343, -6.08, 0.18)
	pt3dadd(-10.768, 103.067, -6.08, 0.18)
	pt3dadd(-10.972, 103.462, -6.08, 0.18)
	pt3dadd(-11.763, 107.982, -6.08, 0.18)
	pt3dadd(-13.367, 114.084, -31.28, 0.18)
	pt3dadd(-13.367, 114.48, -31.28, 0.18)
	pt3dadd(-12.961, 118.017, -30.88, 0.18)
	pt3dadd(-12.769, 118.604, -30.88, 0.18)
	pt3dadd(-12.961, 124.706, -30.88, 0.18)
	pt3dadd(-13.164, 125.497, -30.88, 0.18)
	pt3dadd(-13.955, 129.825, -30.88, 0.18)
	pt3dadd(-14.158, 130.413, -30.88, 0.18)
	pt3dadd(-15.752, 134.741, -31.28, 0.18)
	pt3dadd(-15.955, 135.328, -31.28, 0.18)
	pt3dadd(-16.95, 140.052, -31.28, 0.18)
	pt3dadd(-21.741, 161.691, -31.28, 0.18)
	pt3dadd(-21.933, 166.403, -31.28, 0.18)
	pt3dadd(-21.933, 166.607, -31.28, 0.18)
	pt3dadd(-22.136, 167.386, -31.28, 0.18)
	pt3dadd(-22.939, 173.093, -31.68, 0.18)
	pt3dadd(-23.131, 183.715, -32.08, 0.18)
	pt3dadd(-23.334, 184.506, -32.08, 0.18)
	pt3dadd(-23.729, 191.783, -33.28, 0.18)
	pt3dadd(-23.729, 191.975, -33.28, 0.18)
	pt3dadd(-23.334, 196.111, -33.28, 0.18)
	pt3dadd(-23.334, 196.699, -33.28, 0.18)
	pt3dadd(-24.328, 200.235, -33.28, 0.18)
	pt3dadd(-24.328, 201.027, -33.28, 0.18)
	pt3dadd(-24.927, 205.151, -33.28, 0.18)
	pt3dadd(-24.735, 214.598, -33.28, 0.18)
	pt3dadd(-25.526, 222.27, -33.68, 0.18)
	pt3dadd(-25.526, 223.05, -33.68, 0.18)
	pt3dadd(-25.131, 225.615, -28.48, 0.18)
	pt3dadd(-25.131, 225.807, -28.48, 0.18)
	pt3dadd(-25.73, 227.977, -28.48, 0.18)
	pt3dadd(-25.922, 228.361, -28.48, 0.18)
	pt3dadd(-26.927, 230.926, -28.88, 0.18)
	pt3dadd(-26.927, 231.322, -28.88, 0.18)
	pt3dadd(-27.119, 234.655, -29.68, 0.18)
	pt3dadd(-26.521, 238.599, -30.48, 0.18)
	pt3dadd(-26.521, 239.379, -30.48, 0.18)
	pt3dadd(-26.724, 241.345, -18.08, 0.18)
	pt3dadd(-27.323, 241.944, -22.08, 0.18)
  }
  dend[17] {pt3dclear()
	pt3dadd(-27.323, 241.944, -22.08, 0.18)
	pt3dadd(-29.515, 242.136, -22.08, 0.18)
	pt3dadd(-30.713, 243.311, -22.08, 0.18)
	pt3dadd(-30.114, 244.294, -22.48, 0.18)
	pt3dadd(-29.911, 244.69, -22.48, 0.18)
	pt3dadd(-28.724, 246.068, -22.48, 0.18)
	pt3dadd(-28.521, 246.656, -22.48, 0.18)
	pt3dadd(-27.526, 249.809, -44.88, 0.18)
	pt3dadd(-27.526, 250.204, -44.88, 0.18)
	pt3dadd(-27.526, 253.741, -44.88, 0.18)
	pt3dadd(-27.718, 254.329, -44.88, 0.18)
	pt3dadd(-27.718, 257.877, -45.68, 0.18)
	pt3dadd(-27.718, 258.464, -45.68, 0.18)
	pt3dadd(-27.119, 262.792, -28.88, 0.18)
	pt3dadd(-27.119, 262.984, -28.88, 0.18)
	pt3dadd(-26.328, 265.538, -28.88, 0.18)
	pt3dadd(-23.729, 269.866, -29.28, 0.18)
	pt3dadd(-23.537, 270.465, -29.28, 0.18)
	pt3dadd(-23.334, 271.245, -29.28, 0.18)
	pt3dadd(-22.735, 274.59, -29.68, 0.18)
	pt3dadd(-22.735, 275.381, -29.68, 0.18)
	pt3dadd(-21.142, 279.708, -29.68, 0.18)
	pt3dadd(-20.938, 280.104, -29.68, 0.18)
	pt3dadd(-18.746, 282.85, -29.68, 0.18)
	pt3dadd(-18.351, 283.437, -29.68, 0.18)
	pt3dadd(-18.147, 283.641, -29.68, 0.18)
	pt3dadd(-15.955, 285.404, -29.68, 0.18)
	pt3dadd(-15.56, 285.799, -29.68, 0.18)
	pt3dadd(-13.367, 287.969, -29.68, 0.18)
	pt3dadd(-12.961, 288.364, -29.68, 0.18)
	pt3dadd(-9.379, 293.675, -30.48, 0.18)
	pt3dadd(-9.175, 294.059, -30.48, 0.18)
	pt3dadd(-5.977, 299.37, -28.08, 0.18)
	pt3dadd(-5.977, 299.574, -28.08, 0.18)
	pt3dadd(-3.186, 302.919, -28.08, 0.18)
	pt3dadd(-2.994, 303.314, -28.08, 0.18)
	pt3dadd(-0.994, 306.455, -28.08, 0.18)
	pt3dadd(-0.994, 306.851, -28.08, 0.18)
	pt3dadd(0.598, 309.992, -28.08, 0.18)
	pt3dadd(0.802, 310.388, -28.08, 0.18)
	pt3dadd(1.796, 313.925, -28.08, 0.18)
	pt3dadd(1.593, 314.524, -28.08, 0.18)
	pt3dadd(1.401, 317.27, -28.88, 0.18)
	pt3dadd(1.401, 317.473, -28.88, 0.18)
	pt3dadd(2.192, 320.027, -28.88, 0.18)
	pt3dadd(2.192, 320.614, -28.88, 0.18)
	pt3dadd(2.395, 321.213, -28.88, 0.18)
	pt3dadd(3.593, 323.372, -28.88, 0.18)
	pt3dadd(6.779, 324.942, -28.88, 0.18)
	pt3dadd(7.774, 325.541, -32.08, 0.18)
  }
  dend[18] {pt3dclear()
	pt3dadd(-27.323, 241.944, -22.08, 0.18)
	pt3dadd(-26.521, 241.944, -24.48, 0.18)
	pt3dadd(-26.521, 242.136, -24.48, 0.18)
	pt3dadd(-26.724, 243.91, -24.48, 0.18)
	pt3dadd(-26.927, 244.102, -24.48, 0.18)
	pt3dadd(-27.119, 244.498, -24.48, 0.18)
	pt3dadd(-27.526, 245.876, -24.48, 0.18)
	pt3dadd(-27.718, 246.272, -24.48, 0.18)
	pt3dadd(-28.724, 247.639, -24.48, 0.18)
	pt3dadd(-28.916, 248.034, -24.48, 0.18)
  }
}
proc shape3d_8() {
  dend[18] {	pt3dadd(-29.911, 249.221, -24.48, 0.18)
	pt3dadd(-30.509, 249.809, -24.48, 0.18)
	pt3dadd(-31.911, 250.792, -24.48, 0.18)
	pt3dadd(-32.306, 251.187, -24.48, 0.18)
	pt3dadd(-34.103, 252.566, -24.48, 0.18)
	pt3dadd(-34.702, 253.153, -24.48, 0.18)
	pt3dadd(-34.702, 255.12, -24.48, 0.18)
	pt3dadd(-34.702, 255.707, -24.48, 0.18)
	pt3dadd(-34.702, 256.295, -24.48, 0.18)
	pt3dadd(-34.702, 258.069, -24.48, 0.18)
	pt3dadd(-34.905, 258.656, -24.48, 0.18)
	pt3dadd(-35.696, 260.431, -24.48, 0.18)
	pt3dadd(-36.103, 260.623, -24.48, 0.18)
	pt3dadd(-37.097, 262.193, -24.48, 0.18)
	pt3dadd(-37.493, 262.792, -24.48, 0.18)
	pt3dadd(-37.493, 263.176, -24.48, 0.18)
	pt3dadd(-37.696, 265.154, -24.48, 0.18)
	pt3dadd(-37.696, 265.742, -24.48, 0.18)
	pt3dadd(-37.888, 267.312, -24.48, 0.18)
	pt3dadd(-37.888, 268.103, -24.48, 0.18)
	pt3dadd(-37.493, 269.866, -24.48, 0.18)
	pt3dadd(-37.493, 270.465, -24.48, 0.18)
	pt3dadd(-36.894, 274.985, -8.08, 0.18)
	pt3dadd(-36.894, 275.573, -8.08, 0.18)
	pt3dadd(-37.888, 277.539, -8.08, 0.18)
	pt3dadd(-38.487, 278.126, -8.08, 0.18)
	pt3dadd(-40.679, 280.488, -0.48, 0.18)
	pt3dadd(-40.679, 280.884, -0.48, 0.18)
	pt3dadd(-40.883, 283.437, -0.48, 0.18)
	pt3dadd(-41.086, 284.036, -0.48, 0.18)
	pt3dadd(-42.081, 286.398, -0.48, 0.18)
	pt3dadd(-42.284, 286.986, -0.48, 0.18)
	pt3dadd(-42.68, 288.556, -0.48, 0.18)
	pt3dadd(-42.68, 289.144, -0.48, 0.18)
	pt3dadd(-43.278, 291.11, -0.48, 0.18)
	pt3dadd(-43.674, 291.506, -0.48, 0.18)
	pt3dadd(-43.877, 291.901, -0.48, 0.18)
	pt3dadd(-44.872, 293.28, -0.48, 0.18)
	pt3dadd(-45.471, 293.675, -0.48, 0.18)
	pt3dadd(-45.866, 294.263, -0.48, 0.18)
	pt3dadd(-47.471, 295.438, -0.48, 0.18)
	pt3dadd(-47.663, 295.641, -0.48, 0.18)
	pt3dadd(-48.262, 298.591, -0.48, 0.18)
	pt3dadd(-48.262, 299.178, -0.48, 0.18)
	pt3dadd(-47.866, 303.902, -0.88, 0.18)
	pt3dadd(-47.866, 304.489, -0.88, 0.18)
	pt3dadd(-49.256, 310.388, -0.88, 0.18)
	pt3dadd(-49.46, 310.783, -0.88, 0.18)
	pt3dadd(-50.058, 313.733, -0.88, 0.18)
	pt3dadd(-50.058, 314.128, -0.88, 0.18)
	pt3dadd(-50.454, 314.716, -0.88, 0.18)
	pt3dadd(-52.646, 316.682, -0.88, 0.18)
	pt3dadd(-52.85, 316.885, -0.88, 0.18)
	pt3dadd(-55.245, 318.648, -0.88, 0.18)
	pt3dadd(-56.036, 319.236, -0.88, 0.18)
	pt3dadd(-57.234, 321.598, 6.32, 0.18)
	pt3dadd(-57.234, 321.801, 6.32, 0.18)
	pt3dadd(-58.036, 323.767, 6.32, 0.18)
	pt3dadd(-58.036, 323.959, 6.32, 0.18)
	pt3dadd(-58.036, 325.338, 6.32, 0.18)
	pt3dadd(-58.036, 325.733, 6.32, 0.18)
	pt3dadd(-57.641, 327.507, 6.32, 0.18)
	pt3dadd(-57.437, 327.7, 6.32, 0.18)
	pt3dadd(-55.641, 331.044, 6.32, 0.18)
	pt3dadd(-55.844, 331.236, 6.32, 0.18)
	pt3dadd(-56.838, 333.994, 6.32, 0.18)
	pt3dadd(-56.838, 334.389, 6.32, 0.18)
	pt3dadd(-58.24, 336.547, 6.32, 0.18)
	pt3dadd(-58.839, 337.146, 6.32, 0.18)
	pt3dadd(-63.426, 340.683, 6.32, 0.18)
	pt3dadd(-63.618, 341.463, 6.32, 0.18)
	pt3dadd(-63.822, 344.424, 13.52, 0.18)
	pt3dadd(-63.822, 344.808, 13.52, 0.18)
	pt3dadd(-67.607, 347.373, 13.52, 0.18)
	pt3dadd(-68.003, 347.565, 13.52, 0.18)
	pt3dadd(-69.8, 347.757, 13.52, 0.18)
	pt3dadd(-70.003, 347.757, 13.52, 0.18)
	pt3dadd(-70.398, 347.757, 13.52, 0.18)
	pt3dadd(-70.997, 347.757, 13.52, 0.18)
	pt3dadd(-71.201, 347.757, 13.52, 0.18)
	pt3dadd(-72.195, 348.356, 13.52, 0.18)
	pt3dadd(-72.399, 348.548, 13.52, 0.18)
	pt3dadd(-73.788, 349.136, 13.52, 0.18)
	pt3dadd(-73.992, 349.136, 13.52, 0.18)
	pt3dadd(-74.986, 349.531, 13.52, 0.18)
	pt3dadd(-75.19, 349.531, 13.52, 0.18)
	pt3dadd(-75.585, 348.751, 13.52, 0.18)
	pt3dadd(-75.585, 348.548, 13.52, 0.18)
	pt3dadd(-76.184, 347.96, 13.52, 0.18)
	pt3dadd(-76.387, 347.757, 13.52, 0.18)
	pt3dadd(-77.382, 347.169, 13.52, 0.18)
	pt3dadd(-77.585, 347.169, 13.52, 0.18)
	pt3dadd(-78.184, 346.582, 13.52, 0.18)
	pt3dadd(-78.376, 346.39, 13.52, 0.18)
	pt3dadd(-79.777, 344.808, 13.92, 0.18)
	pt3dadd(-80.568, 344.028, 13.92, 0.18)
	pt3dadd(-80.772, 344.028, 13.92, 0.18)
	pt3dadd(-80.975, 343.44, 13.92, 0.18)
	pt3dadd(-81.167, 343.237, 13.92, 0.18)
	pt3dadd(-82.569, 343.045, 13.92, 0.18)
	pt3dadd(-82.761, 343.045, 13.92, 0.18)
	pt3dadd(-84.162, 343.045, 13.92, 0.18)
	pt3dadd(-84.365, 343.045, 13.92, 0.18)
	pt3dadd(-84.964, 343.633, 13.92, 0.18)
	pt3dadd(-85.36, 344.028, 13.92, 0.18)
	pt3dadd(-86.557, 345.203, 13.92, 0.18)
	pt3dadd(-86.75, 345.407, 13.92, 0.18)
	pt3dadd(-87.947, 346.186, 13.92, 0.18)
	pt3dadd(-88.546, 346.39, 13.92, 0.18)
	pt3dadd(-90.343, 346.977, 13.92, 0.18)
	pt3dadd(-90.546, 346.977, 13.92, 0.18)
	pt3dadd(-91.541, 346.582, 13.52, 0.18)
	pt3dadd(-91.744, 346.582, 13.52, 0.18)
	pt3dadd(-91.936, 346.39, 13.52, 0.18)
	pt3dadd(-93.134, 345.791, 13.52, 0.18)
	pt3dadd(-93.337, 345.599, 13.52, 0.18)
	pt3dadd(-93.541, 345.407, 13.52, 0.18)
	pt3dadd(-94.535, 345.994, 13.52, 0.18)
	pt3dadd(-94.727, 346.39, 13.52, 0.18)
	pt3dadd(-94.931, 347.169, 13.52, 0.18)
	pt3dadd(-94.931, 347.565, 13.52, 0.18)
	pt3dadd(-94.727, 348.751, 13.52, 0.18)
	pt3dadd(-94.727, 349.136, 13.52, 0.18)
	pt3dadd(-96.129, 350.91, 13.52, 0.18)
	pt3dadd(-96.129, 351.102, 13.52, 0.18)
	pt3dadd(-96.332, 351.102, 12.32, 0.18)
  }
  soma[2] {pt3dclear()
	pt3dadd(1.796, 3.536, 0, 11.82)
	pt3dadd(4.655, 0.765, 6.705, 2.82)
  }
  dend[19] {pt3dclear()
	pt3dadd(4.655, 0.765, 6.705, 2.136)
	pt3dadd(-0.994, 3.536, 20, 2.136)
	pt3dadd(-4.192, 3.74, 20, 2.534)
	pt3dadd(-6.779, 4.327, 25.6, 3)
	pt3dadd(-7.582, 4.52, 25.6, 1.94)
	pt3dadd(-7.977, 4.723, 25.6, 1.6)
	pt3dadd(-9.175, 6.101, 25.6, 0.88)
	pt3dadd(-9.774, 6.689, 25.6, 0.88)
	pt3dadd(-9.966, 7.277, 31.2, 0.88)
  }
  dend[20] {pt3dclear()
	pt3dadd(-9.966, 7.277, 31.2, 0.88)
	pt3dadd(-10.565, 7.277, 32.4, 0.54)
  }
  dend[21] {pt3dclear()
	pt3dadd(-10.565, 7.277, 32.4, 0.54)
	pt3dadd(-10.565, 7.469, 32.4, 0.54)
	pt3dadd(-11.571, 8.452, 32.4, 0.54)
	pt3dadd(-11.571, 8.655, 32.4, 0.54)
	pt3dadd(-12.17, 9.83, 19.6, 0.18)
	pt3dadd(-12.362, 10.034, 19.6, 0.18)
	pt3dadd(-14.961, 13.379, 19.6, 0.18)
	pt3dadd(-15.153, 13.571, 19.6, 0.18)
	pt3dadd(-17.752, 16.724, 19.6, 0.18)
	pt3dadd(-18.147, 17.707, 12.8, 0.18)
	pt3dadd(-18.147, 18.294, 12.8, 0.18)
	pt3dadd(-18.351, 18.69, 12.8, 0.18)
	pt3dadd(-18.351, 20.453, 12.8, 0.18)
	pt3dadd(-18.351, 20.656, 12.8, 0.18)
	pt3dadd(-18.147, 22.227, 18.4, 0.18)
	pt3dadd(-17.944, 22.419, 18.4, 0.18)
	pt3dadd(-17.548, 24.193, 18.4, 0.18)
	pt3dadd(-17.548, 24.588, 18.4, 0.18)
	pt3dadd(-18.147, 25.764, 18.4, 0.18)
	pt3dadd(-18.351, 25.967, 18.4, 0.18)
	pt3dadd(-17.548, 25.764, 18.4, 0.18)
  }
  dend[22] {pt3dclear()
	pt3dadd(-17.548, 25.764, 18.4, 0.18)
	pt3dadd(-15.56, 26.95, 13.12, 0.18)
	pt3dadd(-15.56, 28.329, 13.12, 0.18)
	pt3dadd(-15.56, 28.521, 13.12, 0.18)
	pt3dadd(-15.56, 29.899, 13.12, 0.18)
	pt3dadd(-15.56, 30.091, 13.12, 0.18)
	pt3dadd(-15.56, 30.295, 13.12, 0.18)
	pt3dadd(-14.554, 31.47, 13.12, 0.18)
	pt3dadd(-14.362, 31.673, 13.12, 0.18)
	pt3dadd(-13.763, 33.436, 13.12, 0.18)
	pt3dadd(-13.763, 33.832, 13.12, 0.18)
	pt3dadd(-14.362, 34.419, 13.12, 0.18)
	pt3dadd(-15.56, 35.99, 13.12, 0.18)
	pt3dadd(-15.752, 36.386, 13.12, 0.18)
	pt3dadd(-16.351, 38.951, 13.12, 0.18)
	pt3dadd(-16.554, 39.538, 13.12, 0.18)
	pt3dadd(-17.548, 41.504, 12.72, 0.18)
	pt3dadd(-17.752, 42.284, 12.72, 0.18)
	pt3dadd(-17.944, 42.68, 12.72, 0.18)
	pt3dadd(-17.944, 44.058, 12.72, 0.18)
	pt3dadd(-17.752, 44.849, 12.72, 0.18)
	pt3dadd(-17.548, 45.437, 12.72, 0.18)
	pt3dadd(-17.752, 48.386, -1.68, 0.18)
	pt3dadd(-17.944, 49.177, -1.68, 0.18)
	pt3dadd(-17.944, 49.573, -1.68, 0.18)
	pt3dadd(-18.543, 51.731, -1.68, 0.18)
	pt3dadd(-18.746, 52.318, -1.68, 0.18)
	pt3dadd(-18.95, 52.906, -1.68, 0.18)
	pt3dadd(-19.549, 56.059, -1.68, 0.18)
	pt3dadd(-22.532, 66.285, 7.52, 0.18)
	pt3dadd(-22.532, 66.681, 7.52, 0.18)
	pt3dadd(-22.939, 70.613, 7.52, 0.18)
	pt3dadd(-22.939, 71.009, 7.52, 0.18)
	pt3dadd(-23.131, 75.924, 7.52, 0.18)
	pt3dadd(-23.334, 76.715, 7.52, 0.18)
	pt3dadd(-23.537, 77.303, 7.52, 0.18)
	pt3dadd(-24.532, 80.648, 7.52, 0.18)
	pt3dadd(-24.532, 81.427, 7.52, 0.18)
	pt3dadd(-25.922, 87.134, 7.52, 0.18)
	pt3dadd(-27.718, 95.01, 7.52, 0.18)
  }
}
proc shape3d_9() {
  dend[22] {	pt3dadd(-28.125, 95.993, 7.52, 0.18)
	pt3dadd(-29.312, 102.479, 7.52, 0.18)
	pt3dadd(-29.515, 103.067, 7.52, 0.18)
	pt3dadd(-30.114, 106.999, -2.88, 0.18)
	pt3dadd(-30.317, 107.598, -2.88, 0.18)
	pt3dadd(-30.509, 113.497, -2.88, 0.18)
	pt3dadd(-30.509, 113.892, -2.88, 0.18)
	pt3dadd(-30.509, 114.48, -2.88, 0.18)
	pt3dadd(-30.317, 118.412, -2.88, 0.18)
	pt3dadd(-30.509, 129.43, -2.88, 0.18)
	pt3dadd(-30.317, 130.017, -2.88, 0.18)
	pt3dadd(-30.317, 130.605, -2.88, 0.18)
	pt3dadd(-30.713, 135.136, -2.88, 0.18)
	pt3dadd(-30.916, 135.916, -2.88, 0.18)
	pt3dadd(-31.108, 136.899, -2.88, 0.18)
	pt3dadd(-32.306, 140.831, -2.88, 0.18)
	pt3dadd(-32.51, 141.622, -2.88, 0.18)
	pt3dadd(-33.9, 145.95, -2.88, 0.18)
	pt3dadd(-34.306, 146.741, -2.88, 0.18)
	pt3dadd(-35.504, 149.295, -20.88, 0.18)
	pt3dadd(-36.103, 151.849, -8.88, 0.18)
	pt3dadd(-36.103, 152.244, -8.88, 0.18)
	pt3dadd(-37.29, 155.589, -8.88, 0.18)
	pt3dadd(-37.29, 155.985, -8.88, 0.18)
	pt3dadd(-38.092, 159.714, -8.88, 0.18)
	pt3dadd(-38.295, 160.313, -8.88, 0.18)
	pt3dadd(-38.487, 161.092, -8.88, 0.18)
	pt3dadd(-39.29, 164.042, -8.88, 0.18)
	pt3dadd(-39.29, 164.64, -8.88, 0.18)
	pt3dadd(-40.092, 171.319, -8.88, 0.18)
	pt3dadd(-40.092, 171.522, -8.88, 0.18)
	pt3dadd(-41.086, 175.647, -24.88, 0.18)
	pt3dadd(-41.086, 176.246, -24.88, 0.18)
	pt3dadd(-41.685, 180.958, -24.88, 0.18)
	pt3dadd(-41.685, 181.749, -22.08, 0.18)
	pt3dadd(-42.081, 182.732, 2.72, 0.18)
  }
  dend[23] {pt3dclear()
	pt3dadd(-17.548, 25.764, 18.4, 0.18)
	pt3dadd(-18.746, 26.747, 18.4, 0.18)
	pt3dadd(-18.746, 26.95, 18.4, 0.18)
	pt3dadd(-19.741, 29.108, 18.4, 0.18)
	pt3dadd(-19.345, 29.504, 18.4, 0.18)
	pt3dadd(-19.142, 31.278, 18.4, 0.18)
	pt3dadd(-19.142, 31.47, 18.4, 0.18)
	pt3dadd(-20.339, 33.041, 18.4, 0.18)
	pt3dadd(-20.543, 33.244, 18.4, 0.18)
	pt3dadd(-22.939, 34.623, 18.4, 0.18)
	pt3dadd(-23.131, 34.815, 18.4, 0.18)
	pt3dadd(-26.125, 35.798, 18.4, 0.18)
	pt3dadd(-26.328, 35.798, 18.4, 0.18)
	pt3dadd(-27.526, 38.951, 7.2, 0.18)
	pt3dadd(-28.125, 39.335, 7.2, 0.18)
	pt3dadd(-30.114, 42.284, 7.2, 0.18)
	pt3dadd(-30.317, 42.883, 7.2, 0.18)
	pt3dadd(-32.51, 45.437, 7.2, 0.18)
	pt3dadd(-32.905, 45.832, 7.2, 0.18)
	pt3dadd(-36.295, 50.16, 7.2, 0.18)
	pt3dadd(-39.493, 55.268, 7.2, 0.18)
	pt3dadd(-39.685, 55.867, 7.2, 0.18)
	pt3dadd(-41.278, 59.991, 14.8, 0.18)
	pt3dadd(-41.685, 60.579, 14.8, 0.18)
	pt3dadd(-42.883, 66.093, 14.8, 0.18)
	pt3dadd(-42.883, 66.681, 14.8, 0.18)
	pt3dadd(-43.075, 67.664, 14.8, 0.18)
	pt3dadd(-42.476, 72.387, 14.8, 0.18)
	pt3dadd(-42.476, 72.975, 14.8, 0.18)
	pt3dadd(-42.284, 73.766, 14.8, 0.18)
	pt3dadd(-41.482, 78.681, 14.8, 0.18)
	pt3dadd(-39.685, 84.388, 12.4, 0.18)
	pt3dadd(-39.685, 84.772, 12.4, 0.18)
	pt3dadd(-39.29, 90.874, 12.4, 0.18)
	pt3dadd(-39.29, 91.27, 12.4, 0.18)
	pt3dadd(-39.493, 96.581, 12, 0.18)
	pt3dadd(-39.685, 97.168, 12, 0.18)
	pt3dadd(-40.883, 101.496, 12, 0.18)
	pt3dadd(-40.883, 102.084, 12, 0.18)
	pt3dadd(-41.086, 102.875, 12, 0.18)
	pt3dadd(-42.284, 106.615, 11.6, 0.18)
	pt3dadd(-42.476, 106.999, 11.6, 0.18)
	pt3dadd(-42.883, 111.723, 11.6, 0.18)
	pt3dadd(-42.883, 120.966, 5.2, 0.18)
	pt3dadd(-43.075, 121.554, 5.2, 0.18)
	pt3dadd(-42.476, 126.277, 5.2, 0.18)
	pt3dadd(-42.476, 126.48, 5.2, 0.18)
	pt3dadd(-41.877, 130.413, 5.2, 0.18)
	pt3dadd(-41.877, 130.808, 5.2, 0.18)
	pt3dadd(-41.278, 134.741, 5.2, 0.18)
	pt3dadd(-41.086, 135.52, 5.2, 0.18)
	pt3dadd(-40.679, 139.464, 5.2, 0.18)
	pt3dadd(-40.487, 140.244, 5.2, 0.18)
	pt3dadd(-39.493, 145.159, 2.4, 0.18)
	pt3dadd(-39.493, 145.555, 2.4, 0.18)
	pt3dadd(-39.493, 150.47, 2.4, 0.18)
	pt3dadd(-39.493, 150.866, 2.4, 0.18)
	pt3dadd(-39.086, 153.815, 2.4, 0.18)
	pt3dadd(-39.086, 154.211, 2.4, 0.18)
	pt3dadd(-39.493, 157.363, 2.4, 0.18)
	pt3dadd(-39.685, 157.951, 2.4, 0.18)
	pt3dadd(-40.679, 161.691, 2.4, 0.18)
	pt3dadd(-40.679, 162.279, 2.4, 0.18)
	pt3dadd(-40.883, 162.866, 2.4, 0.18)
	pt3dadd(-42.284, 166.211, 2.4, 0.18)
	pt3dadd(-42.284, 166.403, 2.4, 0.18)
	pt3dadd(-42.476, 166.799, 2.4, 0.18)
	pt3dadd(-43.075, 168.968, 2.4, 0.18)
	pt3dadd(-43.674, 177.229, 2.4, 0.18)
	pt3dadd(-43.674, 178.008, 2.4, 0.18)
	pt3dadd(-44.273, 184.302, 2.4, 0.18)
	pt3dadd(-44.476, 184.901, 2.4, 0.18)
	pt3dadd(-44.476, 185.681, 2.4, 0.18)
	pt3dadd(-44.273, 188.834, 2.4, 0.18)
	pt3dadd(-44.273, 189.026, 2.4, 0.18)
	pt3dadd(-44.476, 193.354, 2.4, 0.18)
	pt3dadd(-44.273, 194.529, 2.4, 0.18)
  }
  dend[24] {pt3dclear()
	pt3dadd(-44.273, 194.529, 2.4, 0.18)
	pt3dadd(-44.476, 196.891, -14, 0.18)
	pt3dadd(-44.476, 197.094, -14, 0.18)
	pt3dadd(-43.674, 200.823, -14, 0.18)
	pt3dadd(-43.674, 201.219, -14, 0.18)
	pt3dadd(-44.081, 204.563, -14, 0.18)
	pt3dadd(-44.081, 205.354, -14, 0.18)
	pt3dadd(-44.476, 208.891, -14, 0.18)
	pt3dadd(-44.476, 209.682, -14, 0.18)
	pt3dadd(-43.674, 212.439, -14, 0.18)
	pt3dadd(-43.482, 213.027, -14, 0.18)
	pt3dadd(-41.877, 216.168, -14, 0.18)
	pt3dadd(-41.685, 216.756, -14, 0.18)
	pt3dadd(-40.487, 219.909, -14, 0.18)
	pt3dadd(-40.284, 220.7, -14, 0.18)
	pt3dadd(-39.685, 223.841, -14, 0.18)
	pt3dadd(-37.888, 230.135, -14, 0.18)
	pt3dadd(-37.696, 230.926, -14, 0.18)
	pt3dadd(-36.894, 237.017, 6.8, 0.18)
	pt3dadd(-36.894, 237.808, 6.8, 0.18)
	pt3dadd(-37.493, 241.345, 6.8, 0.18)
	pt3dadd(-37.493, 241.74, 6.8, 0.18)
	pt3dadd(-37.29, 245.085, 6.8, 0.18)
	pt3dadd(-37.29, 245.673, 6.8, 0.18)
	pt3dadd(-38.092, 248.238, 6.8, 0.18)
	pt3dadd(-38.092, 248.622, 6.8, 0.18)
	pt3dadd(-38.691, 251.571, 6.8, 0.18)
	pt3dadd(-38.894, 251.967, 6.8, 0.18)
	pt3dadd(-38.691, 254.329, 6.8, 0.18)
	pt3dadd(-38.092, 256.103, 6.8, 0.18)
	pt3dadd(-37.888, 256.498, 6.8, 0.18)
	pt3dadd(-37.29, 259.052, 6.8, 0.18)
	pt3dadd(-37.29, 259.447, 6.8, 0.18)
	pt3dadd(-37.493, 262.193, 6.8, 0.18)
	pt3dadd(-37.493, 262.792, 6.8, 0.18)
	pt3dadd(-36.691, 265.934, 6.8, 0.18)
	pt3dadd(-36.498, 266.725, 6.8, 0.18)
	pt3dadd(-35.504, 270.262, 6.8, 0.18)
	pt3dadd(-35.097, 271.053, 6.8, 0.18)
	pt3dadd(-34.498, 273.019, 6.8, 0.18)
	pt3dadd(-34.498, 273.414, 6.8, 0.18)
	pt3dadd(-34.306, 275.776, 6.8, 0.18)
	pt3dadd(-34.306, 276.364, 6.8, 0.18)
	pt3dadd(-34.498, 276.951, 6.8, 0.18)
	pt3dadd(-34.498, 279.109, 6.8, 0.18)
	pt3dadd(-34.498, 279.708, 6.8, 0.18)
	pt3dadd(-34.498, 280.692, 6.8, 0.18)
	pt3dadd(-34.103, 283.053, 6.8, 0.18)
	pt3dadd(-33.504, 286.003, 9.6, 0.18)
	pt3dadd(-33.504, 286.782, 9.6, 0.18)
	pt3dadd(-33.108, 289.539, 9.6, 0.18)
	pt3dadd(-32.905, 290.127, 9.6, 0.18)
	pt3dadd(-32.51, 292.297, 9.6, 0.18)
	pt3dadd(-32.713, 292.884, 9.6, 0.18)
	pt3dadd(-32.905, 295.834, 9.6, 0.18)
	pt3dadd(-32.905, 296.421, 9.6, 0.18)
	pt3dadd(-32.905, 299.766, 9.6, 0.18)
	pt3dadd(-32.713, 300.749, 9.6, 0.18)
	pt3dadd(-32.51, 303.506, 9.6, 0.18)
	pt3dadd(-32.51, 304.094, 9.6, 0.18)
	pt3dadd(-32.51, 306.455, 9.6, 0.18)
	pt3dadd(-32.713, 307.043, 9.6, 0.18)
	pt3dadd(-33.108, 308.817, 9.6, 0.18)
	pt3dadd(-33.108, 309.608, 9.6, 0.18)
	pt3dadd(-33.707, 312.354, 9.6, 0.18)
	pt3dadd(-33.504, 315.303, 9.6, 0.18)
	pt3dadd(-33.707, 316.094, 9.6, 0.18)
	pt3dadd(-34.103, 318.852, 9.6, 0.18)
	pt3dadd(-34.103, 319.044, 9.6, 0.18)
	pt3dadd(-34.103, 319.835, 9.6, 0.18)
	pt3dadd(-32.713, 322.389, 9.6, 0.18)
	pt3dadd(-32.51, 322.784, 9.6, 0.18)
	pt3dadd(-32.905, 326.909, 9.6, 0.18)
	pt3dadd(-32.905, 327.507, 9.6, 0.18)
	pt3dadd(-32.51, 330.841, 14.4, 0.18)
	pt3dadd(-32.51, 331.236, 14.4, 0.18)
	pt3dadd(-32.306, 334.389, 14.4, 0.18)
	pt3dadd(-32.306, 334.977, 14.4, 0.18)
	pt3dadd(-32.114, 337.734, 14.4, 0.18)
	pt3dadd(-32.306, 338.514, 14.4, 0.18)
	pt3dadd(-33.108, 341.271, 14.4, 0.18)
	pt3dadd(-32.51, 342.457, 14.4, 0.18)
	pt3dadd(-32.114, 343.045, 14.4, 0.18)
	pt3dadd(-31.108, 345.994, 14.4, 0.18)
	pt3dadd(-31.108, 346.774, 14.4, 0.18)
	pt3dadd(-29.911, 349.927, 14.4, 0.18)
	pt3dadd(-29.718, 350.514, 14.4, 0.18)
  }
}
proc shape3d_10() {
  dend[24] {	pt3dadd(-29.12, 353.859, 14.4, 0.18)
	pt3dadd(-29.12, 354.447, 14.4, 0.18)
	pt3dadd(-28.724, 355.045, 14.4, 0.18)
	pt3dadd(-27.526, 356.808, 14.4, 0.18)
	pt3dadd(-27.323, 357.396, 14.4, 0.18)
	pt3dadd(-25.73, 359.566, 14.4, 0.18)
	pt3dadd(-25.323, 359.961, 14.4, 0.18)
	pt3dadd(-23.334, 360.741, 14.4, 0.18)
	pt3dadd(-22.939, 360.944, 14.4, 0.18)
	pt3dadd(-19.741, 362.515, 14.4, 0.18)
	pt3dadd(-19.345, 362.515, 14.4, 0.18)
	pt3dadd(-17.153, 363.306, 14.4, 0.18)
	pt3dadd(-16.95, 363.498, 14.4, 0.18)
	pt3dadd(-14.961, 365.272, 14.4, 0.18)
	pt3dadd(-14.362, 365.86, 22.4, 0.18)
  }
  dend[25] {pt3dclear()
	pt3dadd(-44.273, 194.529, 2.4, 0.18)
	pt3dadd(-44.668, 193.749, 2.4, 0.18)
	pt3dadd(-44.872, 193.749, 2.4, 0.18)
	pt3dadd(-45.471, 195.715, 2.4, 0.18)
	pt3dadd(-45.471, 195.908, 2.4, 0.18)
	pt3dadd(-46.465, 198.857, 2.4, 0.18)
	pt3dadd(-46.668, 205.75, -16.4, 0.18)
	pt3dadd(-46.668, 205.942, -16.4, 0.18)
	pt3dadd(-47.064, 212.824, -16.4, 0.18)
	pt3dadd(-47.064, 213.423, -16.4, 0.18)
	pt3dadd(-47.866, 218.926, -16.4, 0.18)
	pt3dadd(-47.866, 219.717, -16.4, 0.18)
	pt3dadd(-48.465, 224.045, -16.4, 0.18)
	pt3dadd(-48.657, 224.824, -16.4, 0.18)
	pt3dadd(-49.256, 228.565, -16.4, 0.18)
	pt3dadd(-49.46, 238, -16.4, 0.18)
	pt3dadd(-49.46, 238.203, -16.4, 0.18)
	pt3dadd(-50.657, 246.272, -16.4, 0.18)
	pt3dadd(-50.861, 247.051, -16.4, 0.18)
	pt3dadd(-50.861, 252.17, -16.4, 0.18)
	pt3dadd(-51.053, 252.95, -16.4, 0.18)
	pt3dadd(-51.256, 258.656, -16.4, 0.18)
	pt3dadd(-50.454, 262.193, -4.8, 0.18)
	pt3dadd(-50.454, 262.792, -4.8, 0.18)
	pt3dadd(-50.861, 266.329, -4.8, 0.18)
	pt3dadd(-50.861, 266.917, -4.8, 0.18)
	pt3dadd(-51.46, 268.691, -4.8, 0.18)
	pt3dadd(-51.652, 269.482, -4.8, 0.18)
  }
  dend[26] {pt3dclear()
	pt3dadd(-51.652, 269.482, -4.8, 0.18)
	pt3dadd(-50.861, 272.623, -22, 0.18)
	pt3dadd(-50.861, 273.606, -22, 0.18)
	pt3dadd(-52.251, 281.471, -22, 0.18)
	pt3dadd(-52.251, 282.658, -22, 0.18)
	pt3dadd(-52.85, 288.364, -22, 0.18)
	pt3dadd(-53.053, 289.347, -22, 0.18)
	pt3dadd(-53.448, 294.059, -22, 0.18)
	pt3dadd(-53.448, 294.658, -22, 0.18)
	pt3dadd(-54.251, 298.986, -22, 0.18)
	pt3dadd(-55.042, 302.919, -22, 0.18)
	pt3dadd(-55.042, 303.111, -22, 0.18)
	pt3dadd(-55.245, 307.043, -22, 0.18)
	pt3dadd(-55.245, 307.834, -22, 0.18)
	pt3dadd(-55.245, 312.354, -22, 0.18)
	pt3dadd(-55.449, 313.541, -22, 0.18)
	pt3dadd(-55.042, 317.869, -22, 0.18)
	pt3dadd(-55.042, 318.456, -22, 0.18)
	pt3dadd(-54.443, 321.598, -22, 0.18)
	pt3dadd(-54.443, 322.389, -22, 0.18)
	pt3dadd(-52.454, 326.909, -22, 0.18)
	pt3dadd(-51.855, 327.7, -22, 0.18)
  }
  dend[27] {pt3dclear()
	pt3dadd(-51.652, 269.482, -4.8, 0.18)
	pt3dadd(-52.251, 270.262, -4.8, 0.18)
	pt3dadd(-52.251, 270.465, -4.8, 0.18)
	pt3dadd(-53.652, 273.606, -4.8, 0.18)
	pt3dadd(-54.047, 274.002, -4.8, 0.18)
	pt3dadd(-54.443, 274.793, -4.8, 0.18)
	pt3dadd(-56.036, 277.539, -4.8, 0.18)
	pt3dadd(-56.24, 277.934, -4.8, 0.18)
	pt3dadd(-56.443, 278.522, -4.8, 0.18)
	pt3dadd(-57.641, 281.087, -4.8, 0.18)
	pt3dadd(-57.641, 281.675, -4.8, 0.18)
	pt3dadd(-57.641, 284.624, -4.8, 0.18)
	pt3dadd(-57.641, 285.019, -4.8, 0.18)
	pt3dadd(-59.031, 287.765, -4.8, 0.18)
	pt3dadd(-59.234, 290.523, -12, 0.18)
	pt3dadd(-59.234, 290.918, -12, 0.18)
	pt3dadd(-59.833, 295.834, -12, 0.18)
	pt3dadd(-59.833, 296.421, -12, 0.18)
	pt3dadd(-60.827, 299.969, -12, 0.18)
	pt3dadd(-61.031, 300.749, -12, 0.18)
	pt3dadd(-63.223, 303.902, -12, 0.18)
	pt3dadd(-63.426, 304.489, -12, 0.18)
	pt3dadd(-64.014, 306.648, -12, 0.18)
	pt3dadd(-64.014, 307.246, -12, 0.18)
	pt3dadd(-64.613, 309.8, -12, 0.18)
	pt3dadd(-64.816, 310.388, -12, 0.18)
	pt3dadd(-65.212, 313.145, -12, 0.18)
	pt3dadd(-65.212, 313.733, -12, 0.18)
	pt3dadd(-64.613, 317.078, -12, 0.18)
	pt3dadd(-64.613, 320.23, -12, 0.18)
	pt3dadd(-64.613, 320.422, -12, 0.18)
	pt3dadd(-67.008, 326.909, -12, 0.18)
	pt3dadd(-67.404, 327.304, -12, 0.18)
	pt3dadd(-68.206, 327.892, 4.4, 0.18)
  }
  dend[28] {pt3dclear()
	pt3dadd(-10.565, 7.277, 32.4, 0.54)
	pt3dadd(-10.768, 9.243, 32, 0.18)
  }
  dend[29] {pt3dclear()
	pt3dadd(-10.768, 9.243, 32, 0.18)
	pt3dadd(-11.763, 12.78, 36.8, 0.18)
	pt3dadd(-11.763, 12.983, 36.8, 0.18)
	pt3dadd(-12.961, 14.949, 36.8, 0.18)
	pt3dadd(-13.164, 15.142, 36.8, 0.18)
	pt3dadd(-15.153, 17.311, 36.8, 0.18)
	pt3dadd(-15.356, 17.503, 36.8, 0.18)
	pt3dadd(-15.56, 17.707, 36.8, 0.18)
	pt3dadd(-16.95, 18.882, 36.8, 0.18)
	pt3dadd(-17.345, 19.277, 36.8, 0.18)
	pt3dadd(-19.549, 22.034, 36.8, 0.18)
	pt3dadd(-19.741, 22.419, 36.8, 0.18)
	pt3dadd(-21.334, 24.588, 41.6, 0.18)
	pt3dadd(-22.136, 26.747, 41.52, 0.18)
	pt3dadd(-22.34, 26.95, 41.52, 0.18)
	pt3dadd(-24.532, 30.679, 41.52, 0.18)
	pt3dadd(-25.131, 31.074, 41.52, 0.18)
	pt3dadd(-28.521, 34.227, 41.52, 0.18)
	pt3dadd(-28.916, 34.623, 41.52, 0.18)
	pt3dadd(-29.312, 35.007, 41.52, 0.18)
	pt3dadd(-32.306, 36.193, 41.52, 0.18)
	pt3dadd(-33.301, 36.386, 41.52, 0.18)
	pt3dadd(-36.295, 37.572, 41.52, 0.18)
	pt3dadd(-37.29, 37.968, 41.52, 0.18)
	pt3dadd(-40.284, 39.335, 41.52, 0.18)
	pt3dadd(-41.086, 39.73, 41.52, 0.18)
	pt3dadd(-44.081, 41.301, 41.52, 0.18)
	pt3dadd(-44.668, 41.696, 41.52, 0.18)
	pt3dadd(-46.668, 43.278, 41.52, 0.18)
	pt3dadd(-47.267, 43.663, 41.52, 0.18)
	pt3dadd(-49.256, 46.42, 41.52, 0.18)
	pt3dadd(-49.663, 46.815, 41.52, 0.18)
	pt3dadd(-50.058, 47.211, 41.52, 0.18)
	pt3dadd(-53.448, 51.731, 41.52, 0.18)
	pt3dadd(-53.652, 51.923, 41.52, 0.18)
	pt3dadd(-55.449, 53.505, 41.52, 0.18)
	pt3dadd(-60.432, 57.042, 41.52, 0.18)
	pt3dadd(-60.827, 57.437, 41.52, 0.18)
	pt3dadd(-65.415, 60.195, 41.52, 0.18)
	pt3dadd(-66.014, 60.387, 41.52, 0.18)
	pt3dadd(-66.613, 60.782, 41.52, 0.18)
	pt3dadd(-69.607, 61.957, 41.52, 0.18)
	pt3dadd(-70.206, 62.161, 41.52, 0.18)
	pt3dadd(-73.788, 63.731, 41.52, 0.18)
	pt3dadd(-74.591, 63.924, 41.52, 0.18)
	pt3dadd(-78.376, 65.698, 41.52, 0.18)
	pt3dadd(-78.772, 65.89, 41.52, 0.18)
	pt3dadd(-81.97, 69.63, 41.52, 0.18)
	pt3dadd(-82.173, 70.026, 41.52, 0.18)
	pt3dadd(-84.964, 73.562, 41.52, 0.18)
	pt3dadd(-85.36, 73.958, 41.52, 0.18)
	pt3dadd(-85.959, 75.924, 41.52, 0.18)
	pt3dadd(-85.755, 76.32, 41.52, 0.18)
	pt3dadd(-85.959, 76.715, 41.52, 0.18)
	pt3dadd(-87.156, 78.874, 41.52, 0.18)
	pt3dadd(-87.552, 79.461, 41.52, 0.18)
	pt3dadd(-90.151, 81.043, 41.52, 0.18)
	pt3dadd(-91.145, 81.427, 41.52, 0.18)
	pt3dadd(-91.744, 81.631, 41.52, 0.18)
	pt3dadd(-93.337, 82.422, 41.52, 0.18)
	pt3dadd(-95.53, 84.388, 41.52, 0.18)
	pt3dadd(-96.129, 84.976, 41.52, 0.18)
	pt3dadd(-101.112, 85.959, 41.52, 0.18)
	pt3dadd(-101.519, 86.151, 41.52, 0.18)
	pt3dadd(-101.914, 86.354, 41.52, 0.18)
	pt3dadd(-104.705, 88.512, 41.52, 0.18)
	pt3dadd(-105.101, 88.908, 41.52, 0.18)
	pt3dadd(-106.897, 91.066, 41.52, 0.18)
	pt3dadd(-107.293, 91.462, 41.52, 0.18)
	pt3dadd(-107.892, 91.857, 41.52, 0.18)
	pt3dadd(-108.898, 92.648, 41.52, 0.18)
	pt3dadd(-109.293, 93.032, 41.52, 0.18)
	pt3dadd(-110.886, 94.219, 41.52, 0.18)
	pt3dadd(-111.282, 94.614, 41.52, 0.18)
	pt3dadd(-113.282, 96.377, 41.52, 0.18)
	pt3dadd(-113.677, 96.976, 41.52, 0.18)
	pt3dadd(-114.672, 98.739, 41.52, 0.18)
	pt3dadd(-115.079, 99.134, 41.52, 0.18)
	pt3dadd(-116.469, 100.321, 41.52, 0.18)
	pt3dadd(-117.067, 100.705, 41.52, 0.18)
	pt3dadd(-119.068, 101.304, 41.52, 0.18)
	pt3dadd(-119.667, 101.496, 41.52, 0.18)
	pt3dadd(-122.65, 102.287, 41.52, 0.18)
	pt3dadd(-123.249, 102.287, 41.52, 0.18)
	pt3dadd(-125.441, 102.479, 41.52, 0.18)
	pt3dadd(-126.446, 102.479, 41.52, 0.18)
	pt3dadd(-128.639, 102.875, 41.52, 0.18)
	pt3dadd(-129.238, 102.875, 41.52, 0.18)
	pt3dadd(-130.627, 103.462, 41.52, 0.18)
	pt3dadd(-131.226, 103.654, 41.52, 0.18)
	pt3dadd(-133.023, 105.824, 41.52, 0.18)
	pt3dadd(-133.227, 106.807, 41.52, 0.18)
	pt3dadd(-134.017, 107.598, 41.52, 0.18)
	pt3dadd(-134.82, 107.79, 41.52, 0.18)
	pt3dadd(-135.215, 108.186, 41.52, 0.18)
	pt3dadd(-136.809, 108.965, 41.52, 0.18)
	pt3dadd(-137.408, 109.169, 41.52, 0.18)
	pt3dadd(-139.408, 110.152, 41.52, 0.18)
	pt3dadd(-140.199, 110.547, 41.52, 0.18)
  }
}
proc shape3d_11() {
  dend[29] {	pt3dadd(-141.6, 111.53, 41.52, 0.18)
	pt3dadd(-143.995, 114.672, 45.52, 0.18)
	pt3dadd(-144.188, 114.875, 45.52, 0.18)
	pt3dadd(-144.594, 116.842, 45.12, 0.18)
	pt3dadd(-144.594, 117.429, 45.12, 0.18)
	pt3dadd(-145.589, 119.203, 44.72, 0.18)
	pt3dadd(-145.984, 119.587, 44.72, 0.18)
	pt3dadd(-147.984, 120.571, 44.72, 0.18)
	pt3dadd(-148.775, 120.774, 44.72, 0.18)
	pt3dadd(-151.374, 122.345, 44.72, 0.18)
	pt3dadd(-151.973, 122.932, 44.72, 0.18)
	pt3dadd(-153.77, 125.689, 44.72, 0.18)
	pt3dadd(-154.165, 126.48, 44.72, 0.18)
	pt3dadd(-155.16, 128.639, 44.72, 0.18)
	pt3dadd(-155.363, 129.034, 44.72, 0.18)
	pt3dadd(-156.154, 130.605, 44.72, 0.18)
	pt3dadd(-156.358, 130.808, 44.72, 0.18)
	pt3dadd(-157.951, 131.983, 44.72, 0.18)
	pt3dadd(-158.358, 132.379, 44.72, 0.18)
	pt3dadd(-160.346, 133.17, 44.72, 0.18)
	pt3dadd(-160.742, 133.362, 44.72, 0.18)
	pt3dadd(-162.539, 134.153, 44.72, 0.18)
	pt3dadd(-163.138, 134.345, 44.72, 0.18)
	pt3dadd(-165.138, 135.328, 44.72, 0.18)
	pt3dadd(-165.737, 135.52, 44.72, 0.18)
	pt3dadd(-167.725, 136.504, 44.72, 0.18)
	pt3dadd(-168.121, 136.899, 44.72, 0.18)
	pt3dadd(-168.923, 138.278, 44.72, 0.18)
	pt3dadd(-168.923, 138.673, 44.72, 0.18)
	pt3dadd(-169.522, 141.43, 44.72, 0.18)
	pt3dadd(-169.725, 142.413, 48.32, 0.18)
  }
  dend[30] {pt3dclear()
	pt3dadd(-169.725, 142.413, 48.32, 0.18)
	pt3dadd(-170.121, 145.159, 28.72, 0.18)
	pt3dadd(-170.324, 145.758, 28.72, 0.18)
	pt3dadd(-170.72, 148.312, 28.72, 0.18)
	pt3dadd(-170.912, 149.092, 28.72, 0.18)
	pt3dadd(-171.511, 150.866, 28.72, 0.18)
	pt3dadd(-171.918, 151.657, 28.72, 0.18)
	pt3dadd(-172.709, 153.815, 28.72, 0.18)
	pt3dadd(-173.115, 154.606, 28.72, 0.18)
	pt3dadd(-173.511, 156.38, 28.72, 0.18)
	pt3dadd(-173.906, 157.16, 28.72, 0.18)
	pt3dadd(-174.505, 158.934, 28.72, 0.18)
	pt3dadd(-174.709, 159.522, 28.72, 0.18)
	pt3dadd(-174.709, 161.691, 28.72, 0.18)
	pt3dadd(-174.709, 162.075, 28.72, 0.18)
	pt3dadd(-174.313, 164.042, 28.72, 0.18)
	pt3dadd(-174.313, 164.64, 28.72, 0.18)
	pt3dadd(-174.11, 167.386, 28.72, 0.18)
	pt3dadd(-174.11, 167.985, 28.72, 0.18)
	pt3dadd(-174.11, 169.16, 28.72, 0.18)
	pt3dadd(-174.313, 169.556, 28.72, 0.18)
	pt3dadd(-174.313, 171.522, 28.72, 0.18)
	pt3dadd(-174.505, 172.11, 28.72, 0.18)
	pt3dadd(-174.709, 174.076, 43.92, 0.18)
	pt3dadd(-174.709, 174.471, 43.92, 0.18)
	pt3dadd(-174.709, 176.63, 43.92, 0.18)
	pt3dadd(-174.709, 177.025, 43.92, 0.18)
	pt3dadd(-174.901, 179.195, 43.92, 0.18)
	pt3dadd(-174.901, 179.783, 43.92, 0.18)
	pt3dadd(-175.5, 181.161, 43.92, 0.18)
	pt3dadd(-176.099, 181.941, 43.92, 0.18)
	pt3dadd(-177.104, 183.918, 43.92, 0.18)
	pt3dadd(-177.703, 184.506, 43.92, 0.18)
	pt3dadd(-178.099, 186.472, 43.92, 0.18)
	pt3dadd(-178.099, 188.63, 43.92, 0.18)
	pt3dadd(-178.099, 189.218, 43.92, 0.18)
	pt3dadd(-177.703, 192.179, 43.92, 0.18)
	pt3dadd(-177.703, 192.958, 43.92, 0.18)
	pt3dadd(-177.703, 194.924, 43.92, 0.18)
	pt3dadd(-177.703, 195.908, 43.92, 0.18)
	pt3dadd(-177.297, 197.874, 43.92, 0.18)
	pt3dadd(-177.297, 198.473, 43.92, 0.18)
	pt3dadd(-176.505, 200.235, 43.92, 0.18)
	pt3dadd(-176.505, 200.834, 43.92, 0.18)
	pt3dadd(-174.901, 203.58, 43.92, 0.18)
	pt3dadd(-174.709, 204.168, 43.92, 0.18)
	pt3dadd(-173.308, 207.129, 43.92, 0.18)
	pt3dadd(-173.308, 207.513, 43.92, 0.18)
	pt3dadd(-173.714, 210.078, 43.92, 0.18)
	pt3dadd(-173.906, 210.857, 43.92, 0.18)
	pt3dadd(-173.906, 213.423, 43.92, 0.18)
	pt3dadd(-173.906, 213.807, 43.92, 0.18)
	pt3dadd(-173.308, 219.717, 43.92, 0.18)
	pt3dadd(-173.308, 219.909, 43.92, 0.18)
	pt3dadd(-173.308, 220.7, 43.92, 0.18)
	pt3dadd(-172.008, 224.666, 43.92, 0.18)
	pt3dadd(-173.104, 226.169, 43.92, 0.18)
	pt3dadd(-173.308, 226.146, 43.92, 0.18)
	pt3dadd(-173.432, 227.92, 43.92, 0.18)
	pt3dadd(-173.454, 228.305, 43.92, 0.18)
	pt3dadd(-173.183, 230.101, 43.92, 0.18)
	pt3dadd(-173.432, 230.87, 43.92, 0.18)
	pt3dadd(-172.901, 234.655, 44.32, 0.18)
	pt3dadd(-172.912, 234.847, 44.32, 0.18)
	pt3dadd(-172.743, 235.254, 44.32, 0.18)
	pt3dadd(-172.426, 236.463, 44.32, 0.18)
	pt3dadd(-172.46, 237.051, 44.32, 0.18)
	pt3dadd(-172.98, 238.791, 44.32, 0.18)
	pt3dadd(-173.24, 239.559, 44.32, 0.18)
	pt3dadd(-173.466, 239.944, 44.32, 0.18)
	pt3dadd(-173.782, 241.695, 44.32, 0.18)
	pt3dadd(-174.019, 242.272, 44.32, 0.18)
	pt3dadd(-173.782, 244.656, 44.32, 0.18)
	pt3dadd(-173.341, 246.848, 88.32, 0.18)
	pt3dadd(-173.375, 247.436, 88.32, 0.18)
	pt3dadd(-173.138, 249.82, 88.32, 0.18)
	pt3dadd(-173.161, 250.012, 88.32, 0.18)
	pt3dadd(-173.579, 250.385, 88.32, 0.18)
	pt3dadd(-175.296, 252.035, 88.32, 0.18)
	pt3dadd(-175.726, 252.408, 88.32, 0.18)
	pt3dadd(-175.579, 253.199, 88.32, 0.18)
  }
  dend[31] {pt3dclear()
	pt3dadd(-175.579, 253.199, 88.32, 0.18)
	pt3dadd(-174.607, 253.662, 88.32, 0.18)
	pt3dadd(-174.618, 253.854, 88.32, 0.18)
	pt3dadd(-175.432, 256.962, 88.32, 0.18)
	pt3dadd(-175.466, 257.346, 88.32, 0.18)
	pt3dadd(-174.471, 260.374, 88.32, 0.18)
	pt3dadd(-174.528, 261.165, 88.32, 0.18)
	pt3dadd(-174.697, 263.708, 87.92, 0.18)
	pt3dadd(-174.969, 264.679, 87.92, 0.18)
	pt3dadd(-174.268, 269.064, 103.12, 0.18)
	pt3dadd(-174.291, 269.267, 103.12, 0.18)
	pt3dadd(-174.912, 272.567, 103.12, 0.18)
	pt3dadd(-174.969, 273.358, 103.12, 0.18)
	pt3dadd(-175.138, 275.912, 103.12, 0.18)
	pt3dadd(-175.172, 276.296, 103.12, 0.18)
	pt3dadd(-173.94, 278.748, 103.12, 0.18)
	pt3dadd(-173.579, 279.369, 103.12, 0.18)
	pt3dadd(-173.217, 279.787, 103.12, 0.18)
	pt3dadd(-171.692, 280.872, 103.12, 0.18)
	pt3dadd(-171.522, 281.279, 103.12, 0.18)
	pt3dadd(-170.065, 283.358, 103.12, 0.18)
	pt3dadd(-169.884, 283.765, 103.12, 0.18)
	pt3dadd(-169.409, 285.573, 102.72, 0.18)
	pt3dadd(-169.454, 286.161, 102.32, 0.18)
	pt3dadd(-169.42, 288.522, 102.32, 0.18)
	pt3dadd(-169.477, 289.313, 102.32, 0.18)
	pt3dadd(-169.432, 291.675, 102.32, 0.18)
	pt3dadd(-169.692, 292.455, 102.32, 0.18)
	pt3dadd(-169.624, 294.421, 102.32, 0.18)
	pt3dadd(-169.658, 294.816, 102.32, 0.18)
	pt3dadd(-169.692, 295.404, 102.32, 0.18)
	pt3dadd(-169.375, 296.613, 102.32, 0.18)
	pt3dadd(-169.217, 297.212, 102.32, 0.18)
	pt3dadd(-168.494, 298.252, 102.32, 0.18)
	pt3dadd(-168.313, 298.659, 102.32, 0.18)
	pt3dadd(-167.443, 300.489, 102.32, 0.18)
	pt3dadd(-167.273, 300.896, 102.32, 0.18)
	pt3dadd(-166.189, 302.546, 102.32, 0.18)
	pt3dadd(-163.375, 305.303, 101.92, 0.18)
	pt3dadd(-163.194, 305.518, 101.92, 0.18)
	pt3dadd(-160.697, 309.834, 101.92, 0.18)
	pt3dadd(-160.324, 310.252, 101.92, 0.18)
	pt3dadd(-158.957, 313.699, 101.92, 0.18)
	pt3dadd(-158.821, 314.49, 101.92, 0.18)
	pt3dadd(-158.256, 317.891, 101.92, 0.18)
	pt3dadd(-158.29, 318.479, 101.92, 0.18)
	pt3dadd(-157.94, 322.049, 101.92, 0.18)
	pt3dadd(-157.974, 322.637, 101.92, 0.18)
	pt3dadd(-157.205, 325.846, 101.92, 0.18)
	pt3dadd(-157.228, 326.242, 101.92, 0.18)
	pt3dadd(-157.024, 329.01, 101.52, 0.18)
	pt3dadd(-157.047, 329.406, 101.52, 0.18)
	pt3dadd(-156.392, 331.417, 101.52, 0.18)
	pt3dadd(-156.414, 331.813, 101.52, 0.18)
	pt3dadd(-155.68, 335.609, 101.52, 0.18)
	pt3dadd(-155.51, 336.016, 101.52, 0.18)
	pt3dadd(-153.431, 340.695, 101.52, 0.18)
	pt3dadd(-153.261, 341.101, 101.52, 0.18)
	pt3dadd(-151.295, 344.593, 101.52, 0.18)
	pt3dadd(-151.137, 345.192, 101.52, 0.18)
	pt3dadd(-148.459, 349.712, 101.52, 0.18)
	pt3dadd(-148.482, 350.107, 101.52, 0.18)
	pt3dadd(-146.933, 353.769, 101.52, 0.18)
	pt3dadd(-146.945, 353.961, 101.52, 0.18)
	pt3dadd(-146.56, 354.187, 102.72, 0.18)
  }
  dend[32] {pt3dclear()
	pt3dadd(-175.579, 253.199, 88.32, 0.18)
	pt3dadd(-176.788, 253.312, 88.32, 0.18)
	pt3dadd(-178.087, 254.803, 88.32, 0.18)
	pt3dadd(-178.099, 254.995, 88.32, 0.18)
	pt3dadd(-178.63, 256.939, 88.32, 0.18)
	pt3dadd(-178.664, 257.323, 88.32, 0.18)
	pt3dadd(-178.427, 259.707, 93.92, 0.18)
	pt3dadd(-178.641, 259.888, 93.92, 0.18)
	pt3dadd(-179.715, 260.996, 93.92, 0.18)
	pt3dadd(-180.133, 261.368, 93.92, 0.18)
	pt3dadd(-180.246, 262.939, 93.92, 0.18)
	pt3dadd(-180.268, 263.323, 93.92, 0.18)
	pt3dadd(-180.178, 264.917, 93.92, 0.18)
	pt3dadd(-180.009, 265.312, 93.92, 0.18)
	pt3dadd(-179.918, 266.905, 93.92, 0.18)
	pt3dadd(-179.749, 267.312, 93.92, 0.18)
	pt3dadd(-181.105, 269.584, 93.92, 0.18)
	pt3dadd(-181.545, 270.137, 93.92, 0.18)
	pt3dadd(-181.963, 270.51, 93.92, 0.18)
	pt3dadd(-183.093, 272.397, 93.92, 0.18)
	pt3dadd(-183.297, 272.386, 93.92, 0.18)
	pt3dadd(-183.127, 272.793, 92.72, 0.18)
  }
  dend[33] {pt3dclear()
	pt3dadd(-169.725, 142.413, 48.32, 0.18)
  }
}
proc shape3d_12() {
  dend[33] {	pt3dadd(-169.725, 142.413, 47.92, 0.18)
	pt3dadd(-170.912, 142.21, 47.52, 0.18)
	pt3dadd(-171.115, 142.21, 47.52, 0.18)
	pt3dadd(-172.912, 143.193, 47.12, 0.18)
	pt3dadd(-173.308, 143.589, 47.12, 0.18)
	pt3dadd(-174.313, 144.572, 47.12, 0.18)
	pt3dadd(-174.505, 145.159, 47.12, 0.18)
	pt3dadd(-176.099, 146.741, 47.12, 0.18)
	pt3dadd(-176.698, 147.521, 47.12, 0.18)
	pt3dadd(-177.297, 148.9, 47.12, 0.18)
	pt3dadd(-177.703, 149.487, 47.12, 0.18)
	pt3dadd(-179.297, 150.47, 47.12, 0.18)
	pt3dadd(-179.692, 150.674, 46.72, 0.18)
	pt3dadd(-182.088, 151.261, 46.72, 0.18)
	pt3dadd(-182.687, 151.453, 46.72, 0.18)
	pt3dadd(-183.681, 151.657, 46.72, 0.18)
	pt3dadd(-185.478, 151.849, 46.72, 0.18)
	pt3dadd(-186.472, 152.052, 46.72, 0.18)
	pt3dadd(-188.472, 153.035, 46.72, 0.18)
	pt3dadd(-189.071, 153.42, 46.72, 0.18)
	pt3dadd(-190.258, 154.798, 46.72, 0.18)
	pt3dadd(-190.664, 155.386, 46.72, 0.18)
	pt3dadd(-191.455, 156.177, 46.72, 0.18)
	pt3dadd(-192.054, 156.572, 46.72, 0.18)
	pt3dadd(-192.461, 156.968, 46.72, 0.18)
	pt3dadd(-193.06, 157.363, 46.72, 0.18)
	pt3dadd(-193.455, 157.555, 46.72, 0.18)
	pt3dadd(-195.444, 158.346, 46.72, 0.18)
	pt3dadd(-195.851, 158.346, 46.72, 0.18)
	pt3dadd(-197.049, 158.731, 46.72, 0.18)
	pt3dadd(-197.648, 158.934, 46.72, 0.18)
	pt3dadd(-198.439, 160.109, 46.72, 0.18)
	pt3dadd(-198.439, 160.697, 46.72, 0.18)
	pt3dadd(-198.439, 161.296, 46.72, 0.18)
	pt3dadd(-198.642, 162.471, 46.72, 0.18)
	pt3dadd(-198.834, 163.262, 46.72, 0.18)
	pt3dadd(-199.038, 165.025, 46.72, 0.18)
	pt3dadd(-199.241, 165.624, 46.72, 0.18)
	pt3dadd(-199.433, 167.59, 46.72, 0.18)
	pt3dadd(-199.637, 167.985, 46.72, 0.18)
	pt3dadd(-199.637, 168.369, 46.72, 0.18)
	pt3dadd(-199.637, 169.353, 46.72, 0.18)
	pt3dadd(-199.84, 169.748, 46.72, 0.18)
	pt3dadd(-199.84, 170.144, 46.72, 0.18)
	pt3dadd(-200.032, 172.302, 46.72, 0.18)
	pt3dadd(-200.235, 172.505, 46.72, 0.18)
	pt3dadd(-202.224, 174.076, 46.72, 0.18)
	pt3dadd(-202.823, 174.471, 46.72, 0.18)
	pt3dadd(-203.422, 174.664, 46.72, 0.18)
	pt3dadd(-205.422, 175.455, 46.72, 0.18)
	pt3dadd(-206.021, 175.647, 46.72, 0.18)
	pt3dadd(-208.417, 177.816, 46.72, 0.18)
	pt3dadd(-209.016, 178.607, 46.72, 0.18)
	pt3dadd(-209.603, 180.178, 46.72, 0.18)
	pt3dadd(-209.807, 180.37, 46.72, 0.18)
	pt3dadd(-210.01, 180.958, 46.72, 0.18)
	pt3dadd(-210.202, 181.557, 46.72, 0.18)
	pt3dadd(-210.405, 181.941, 46.72, 0.18)
	pt3dadd(-210.801, 182.732, 46.72, 0.18)
	pt3dadd(-211.999, 183.523, 46.72, 0.18)
	pt3dadd(-212.598, 183.715, 46.72, 0.18)
	pt3dadd(-213.592, 184.302, 46.72, 0.18)
	pt3dadd(-214.394, 184.506, 46.72, 0.18)
	pt3dadd(-215.592, 185.489, 46.72, 0.18)
	pt3dadd(-215.796, 186.269, 46.72, 0.18)
	pt3dadd(-215.796, 187.455, 46.72, 0.18)
	pt3dadd(-215.988, 188.043, 46.72, 0.18)
	pt3dadd(-216.394, 189.026, 46.72, 0.18)
	pt3dadd(-216.79, 189.421, 46.72, 0.18)
	pt3dadd(-217.185, 190.009, 46.72, 0.18)
	pt3dadd(-217.581, 190.212, 46.72, 0.18)
	pt3dadd(-217.581, 190.597, 46.72, 0.18)
	pt3dadd(-216.982, 190.992, 46.72, 0.18)
	pt3dadd(-216.79, 191.58, 46.72, 0.18)
	pt3dadd(-216.587, 191.783, 46.72, 0.18)
	pt3dadd(-216.79, 192.958, 46.72, 0.18)
	pt3dadd(-217.185, 193.546, 46.72, 0.18)
	pt3dadd(-217.389, 195.128, 46.72, 0.18)
	pt3dadd(-217.784, 195.523, 46.72, 0.18)
	pt3dadd(-218.779, 197.286, 46.72, 0.18)
	pt3dadd(-219.378, 197.874, 46.72, 0.18)
	pt3dadd(-220.971, 199.648, 46.72, 0.18)
	pt3dadd(-223.965, 202.01, 46.72, 0.18)
	pt3dadd(-223.965, 202.202, 46.72, 0.18)
	pt3dadd(-225.966, 203.185, 46.72, 0.18)
	pt3dadd(-226.158, 203.388, 46.72, 0.18)
	pt3dadd(-227.163, 203.58, 46.72, 0.18)
	pt3dadd(-228.158, 203.976, 46.72, 0.18)
	pt3dadd(-229.152, 204.959, 46.72, 0.18)
	pt3dadd(-229.548, 205.354, 46.72, 0.18)
	pt3dadd(-229.751, 206.925, 46.72, 0.18)
	pt3dadd(-229.751, 207.321, 46.72, 0.18)
	pt3dadd(-229.954, 208.496, 46.72, 0.18)
	pt3dadd(-230.147, 208.891, 46.72, 0.18)
	pt3dadd(-231.152, 209.874, 46.72, 0.18)
	pt3dadd(-231.548, 210.27, 46.72, 0.18)
	pt3dadd(-231.943, 211.253, 46.72, 0.18)
	pt3dadd(-232.147, 211.445, 46.72, 0.18)
	pt3dadd(-232.746, 212.632, 46.72, 0.18)
	pt3dadd(-233.141, 213.027, 46.72, 0.18)
	pt3dadd(-234.135, 214.01, 46.72, 0.18)
	pt3dadd(-234.734, 214.598, 46.72, 0.18)
	pt3dadd(-235.333, 215.581, 46.72, 0.18)
	pt3dadd(-235.74, 215.976, 46.72, 0.18)
	pt3dadd(-236.531, 216.756, 46.72, 0.18)
	pt3dadd(-236.927, 216.959, 46.72, 0.18)
	pt3dadd(-237.525, 217.943, 46.72, 0.18)
	pt3dadd(-237.525, 218.338, 46.72, 0.18)
	pt3dadd(-237.525, 219.717, 46.72, 0.18)
	pt3dadd(-237.525, 220.101, 46.72, 0.18)
	pt3dadd(-237.525, 221.683, 46.72, 0.18)
	pt3dadd(-237.525, 221.875, 46.72, 0.18)
	pt3dadd(-237.932, 223.254, 46.72, 0.18)
	pt3dadd(-238.124, 223.649, 46.72, 0.18)
	pt3dadd(-238.723, 223.841, 46.72, 0.18)
	pt3dadd(-239.729, 224.045, 46.72, 0.18)
	pt3dadd(-240.124, 224.237, 46.72, 0.18)
	pt3dadd(-241.322, 225.22, 46.72, 0.18)
	pt3dadd(-241.514, 225.412, 46.72, 0.18)
	pt3dadd(-242.113, 226.203, 46.72, 0.18)
	pt3dadd(-242.317, 226.598, 46.72, 0.18)
	pt3dadd(-242.712, 227.186, 46.72, 0.18)
	pt3dadd(-244.712, 228.565, 46.72, 0.18)
	pt3dadd(-244.712, 228.757, 46.72, 0.18)
	pt3dadd(-245.108, 229.548, 46.72, 0.18)
	pt3dadd(-245.108, 229.74, 46.72, 0.18)
	pt3dadd(-246.701, 229.74, 46.72, 0.18)
	pt3dadd(-247.108, 229.74, 46.72, 0.18)
	pt3dadd(-248.893, 229.548, 46.72, 0.18)
	pt3dadd(-249.492, 229.548, 46.72, 0.18)
	pt3dadd(-250.893, 230.339, 46.72, 0.18)
	pt3dadd(-251.684, 230.926, 46.72, 0.18)
	pt3dadd(-252.487, 231.909, 46.72, 0.18)
	pt3dadd(-253.086, 232.305, 46.72, 0.18)
	pt3dadd(-254.283, 232.892, 46.72, 0.18)
	pt3dadd(-255.086, 233.085, 46.72, 0.18)
	pt3dadd(-256.679, 233.288, 46.72, 0.18)
	pt3dadd(-257.075, 233.288, 46.72, 0.18)
	pt3dadd(-259.866, 233.876, 46.72, 0.18)
	pt3dadd(-260.464, 233.876, 46.72, 0.18)
	pt3dadd(-260.464, 234.068, 32.32, 0.18)
	pt3dadd(-260.86, 234.463, 32.32, 0.18)
	pt3dadd(-261.459, 237.616, 32.32, 0.18)
	pt3dadd(-261.662, 237.808, 32.32, 0.18)
	pt3dadd(-261.459, 238.203, 32.32, 0.18)
  }
  dend[34] {pt3dclear()
	pt3dadd(-10.768, 9.243, 32, 0.18)
	pt3dadd(-10.768, 11.209, 32, 0.18)
	pt3dadd(-9.966, 13.763, 32, 0.18)
	pt3dadd(-9.966, 13.966, 32, 0.18)
	pt3dadd(-9.966, 14.949, 36.8, 0.18)
	pt3dadd(-9.966, 15.142, 36.8, 0.18)
	pt3dadd(-9.966, 16.52, 41.2, 0.18)
	pt3dadd(-10.565, 18.486, 42, 0.18)
	pt3dadd(-10.768, 18.486, 42, 0.18)
	pt3dadd(-11.367, 19.277, 24.8, 0.18)
	pt3dadd(-12.961, 22.622, 28.4, 0.18)
	pt3dadd(-13.164, 23.018, 28.4, 0.18)
	pt3dadd(-13.559, 26.362, 37.2, 0.18)
	pt3dadd(-13.559, 26.554, 37.2, 0.18)
	pt3dadd(-12.565, 28.916, 37.2, 0.18)
	pt3dadd(-12.362, 29.312, 37.2, 0.18)
	pt3dadd(-11.367, 31.47, 37.2, 0.18)
	pt3dadd(-11.367, 31.673, 37.2, 0.18)
	pt3dadd(-11.164, 32.261, 37.2, 0.18)
	pt3dadd(-10.373, 34.024, 37.2, 0.18)
	pt3dadd(-10.373, 34.227, 37.2, 0.18)
	pt3dadd(-9.966, 34.419, 35.6, 0.18)
  }
  dend[35] {pt3dclear()
	pt3dadd(-9.966, 7.277, 31.2, 0.88)
	pt3dadd(-9.175, 7.672, 47.2, 0.88)
	pt3dadd(-9.175, 7.864, 47.2, 0.88)
	pt3dadd(-8.181, 9.243, 47.2, 0.88)
	pt3dadd(-7.774, 11.412, 47.2, 0.18)
	pt3dadd(-7.774, 11.605, 47.2, 0.18)
	pt3dadd(-7.582, 13.175, 47.2, 0.18)
	pt3dadd(-7.582, 13.571, 47.2, 0.18)
	pt3dadd(-7.774, 15.932, 44.4, 0.18)
	pt3dadd(-7.977, 16.125, 44.4, 0.18)
	pt3dadd(-8.972, 17.503, 44.4, 0.18)
	pt3dadd(-9.175, 17.899, 44.4, 0.18)
	pt3dadd(-10.373, 18.882, 44.4, 0.18)
	pt3dadd(-10.768, 19.074, 44.4, 0.18)
	pt3dadd(-11.571, 19.865, 44.4, 0.18)
	pt3dadd(-11.763, 20.26, 44.4, 0.18)
	pt3dadd(-11.367, 23.605, 44.4, 0.18)
	pt3dadd(-11.367, 23.797, 44.4, 0.18)
	pt3dadd(-11.164, 24.193, 44.4, 0.18)
	pt3dadd(-11.164, 25.368, 44.4, 0.18)
	pt3dadd(-10.972, 25.764, 44.4, 0.18)
	pt3dadd(-10.972, 26.159, 44.4, 0.18)
	pt3dadd(-10.373, 28.329, 44.4, 0.18)
	pt3dadd(-10.373, 28.521, 44.4, 0.18)
	pt3dadd(-10.972, 29.899, 40.8, 0.18)
	pt3dadd(-10.972, 30.091, 40.8, 0.18)
	pt3dadd(-11.966, 31.074, 40.8, 0.18)
	pt3dadd(-12.17, 32.058, 40.8, 0.18)
  }
  dend[36] {pt3dclear()
	pt3dadd(-12.17, 32.058, 40.8, 0.18)
	pt3dadd(-12.769, 33.244, 47.6, 0.18)
	pt3dadd(-12.769, 33.436, 47.6, 0.18)
	pt3dadd(-14.961, 35.798, 47.6, 0.18)
	pt3dadd(-15.153, 36.193, 47.6, 0.18)
  }
}
proc shape3d_13() {
  dend[36] {	pt3dadd(-16.95, 37.764, 47.6, 0.18)
	pt3dadd(-17.153, 38.16, 47.6, 0.18)
	pt3dadd(-17.548, 39.73, 47.6, 0.18)
	pt3dadd(-17.752, 40.126, 47.6, 0.18)
	pt3dadd(-19.142, 41.504, 47.6, 0.18)
	pt3dadd(-19.741, 41.9, 47.6, 0.18)
	pt3dadd(-20.746, 42.68, 47.6, 0.18)
	pt3dadd(-21.142, 43.075, 47.6, 0.18)
	pt3dadd(-22.136, 44.646, 47.6, 0.18)
	pt3dadd(-22.136, 45.041, 47.6, 0.18)
	pt3dadd(-22.136, 45.437, 47.6, 0.18)
	pt3dadd(-21.933, 47.798, 47.6, 0.18)
	pt3dadd(-21.933, 48.386, 47.6, 0.18)
	pt3dadd(-22.939, 49.765, 47.6, 0.18)
	pt3dadd(-23.537, 50.16, 47.6, 0.18)
	pt3dadd(-23.729, 50.352, 47.6, 0.18)
	pt3dadd(-24.927, 51.539, 47.6, 0.18)
	pt3dadd(-25.323, 51.923, 47.6, 0.18)
	pt3dadd(-27.922, 55.076, 47.6, 0.18)
	pt3dadd(-28.317, 55.663, 47.2, 0.18)
  }
  dend[37] {pt3dclear()
	pt3dadd(-12.17, 32.058, 40.8, 0.18)
	pt3dadd(-13.367, 31.47, 40.8, 0.18)
	pt3dadd(-13.367, 31.673, 40.8, 0.18)
	pt3dadd(-15.56, 33.041, 40.8, 0.18)
	pt3dadd(-15.955, 33.244, 40.8, 0.18)
	pt3dadd(-16.757, 33.64, 40.8, 0.18)
	pt3dadd(-18.543, 35.007, 40.8, 0.18)
	pt3dadd(-19.142, 35.606, 40.8, 0.18)
	pt3dadd(-21.537, 37.572, 40.8, 0.18)
	pt3dadd(-23.537, 40.318, 47.6, 0.18)
	pt3dadd(-23.933, 40.917, 47.6, 0.18)
	pt3dadd(-25.526, 44.058, 47.6, 0.18)
	pt3dadd(-25.73, 44.646, 47.6, 0.18)
	pt3dadd(-26.724, 47.211, 47.6, 0.18)
	pt3dadd(-27.119, 47.798, 47.6, 0.18)
	pt3dadd(-27.323, 48.386, 47.6, 0.18)
	pt3dadd(-28.125, 50.352, 47.6, 0.18)
	pt3dadd(-28.317, 50.748, 47.6, 0.18)
	pt3dadd(-28.521, 51.143, 47.6, 0.18)
	pt3dadd(-30.317, 53.697, 47.6, 0.18)
	pt3dadd(-30.713, 54.093, 47.6, 0.18)
	pt3dadd(-31.108, 54.488, 47.6, 0.18)
	pt3dadd(-32.51, 56.85, 47.6, 0.18)
	pt3dadd(-32.702, 57.234, 47.6, 0.18)
	pt3dadd(-35.504, 60.387, 47.6, 0.18)
	pt3dadd(-35.9, 60.782, 47.6, 0.18)
	pt3dadd(-36.498, 61.37, 47.6, 0.18)
	pt3dadd(-38.487, 63.731, 47.6, 0.18)
	pt3dadd(-38.894, 64.319, 47.6, 0.18)
	pt3dadd(-39.29, 64.715, 47.6, 0.18)
	pt3dadd(-40.284, 66.681, 47.6, 0.18)
	pt3dadd(-40.883, 70.026, 47.6, 0.18)
	pt3dadd(-41.086, 70.817, 47.6, 0.18)
	pt3dadd(-42.68, 75.529, 47.6, 0.18)
	pt3dadd(-42.883, 75.924, 47.6, 0.18)
	pt3dadd(-44.081, 78.874, 47.6, 0.18)
	pt3dadd(-44.476, 79.461, 47.6, 0.18)
	pt3dadd(-46.07, 82.026, 47.6, 0.18)
	pt3dadd(-46.465, 82.614, 47.6, 0.18)
	pt3dadd(-46.872, 83.201, 47.6, 0.18)
	pt3dadd(-48.058, 84.772, 47.6, 0.18)
	pt3dadd(-48.262, 85.168, 47.6, 0.18)
	pt3dadd(-48.861, 85.563, 47.6, 0.18)
	pt3dadd(-50.262, 87.337, 47.6, 0.18)
	pt3dadd(-50.454, 87.529, 47.6, 0.18)
	pt3dadd(-51.652, 89.1, 47.6, 0.18)
	pt3dadd(-51.855, 89.496, 47.6, 0.18)
	pt3dadd(-52.85, 91.27, 47.6, 0.18)
	pt3dadd(-53.053, 91.665, 47.6, 0.18)
	pt3dadd(-53.652, 94.614, 47.6, 0.18)
	pt3dadd(-53.844, 95.01, 47.6, 0.18)
	pt3dadd(-54.047, 95.202, 47.6, 0.18)
	pt3dadd(-56.24, 100.117, 47.6, 0.18)
	pt3dadd(-56.443, 100.908, 47.6, 0.18)
	pt3dadd(-57.833, 104.637, 47.6, 0.18)
	pt3dadd(-58.036, 105.033, 47.6, 0.18)
	pt3dadd(-58.24, 105.236, 47.6, 0.18)
	pt3dadd(-60.228, 108.965, 47.6, 0.18)
	pt3dadd(-60.827, 109.564, 47.6, 0.18)
	pt3dadd(-61.223, 110.152, 47.6, 0.18)
	pt3dadd(-64.014, 113.497, 47.6, 0.18)
	pt3dadd(-64.421, 113.892, 47.6, 0.18)
	pt3dadd(-64.613, 114.084, 47.6, 0.18)
	pt3dadd(-65.415, 114.48, 47.6, 0.18)
	pt3dadd(-66.613, 115.259, 47.6, 0.18)
	pt3dadd(-66.816, 115.655, 47.6, 0.18)
	pt3dadd(-67.404, 117.825, 47.6, 0.18)
	pt3dadd(-67.607, 118.22, 47.6, 0.18)
	pt3dadd(-68.41, 120.378, 47.6, 0.18)
	pt3dadd(-68.805, 121.169, 47.6, 0.18)
	pt3dadd(-70.398, 124.311, 47.6, 0.18)
	pt3dadd(-73.788, 129.825, 47.6, 0.18)
	pt3dadd(-74.195, 130.413, 47.6, 0.18)
	pt3dadd(-76.986, 133.95, 47.6, 0.18)
	pt3dadd(-77.382, 134.537, 47.6, 0.18)
	pt3dadd(-77.777, 135.136, 47.6, 0.18)
	pt3dadd(-80.975, 138.47, 47.6, 0.18)
	pt3dadd(-81.371, 139.069, 47.6, 0.18)
	pt3dadd(-81.766, 139.464, 47.6, 0.18)
	pt3dadd(-85.959, 143.781, 47.6, 0.18)
	pt3dadd(-85.959, 143.984, 47.6, 0.18)
	pt3dadd(-85.959, 144.572, 47.6, 0.18)
	pt3dadd(-85.947, 149.804, 47.6, 0.18)
	pt3dadd(-86.467, 151.544, 47.6, 0.18)
	pt3dadd(-86.682, 151.725, 47.6, 0.18)
	pt3dadd(-88.829, 153.939, 47.6, 0.18)
	pt3dadd(-89.043, 154.12, 47.6, 0.18)
	pt3dadd(-89.202, 156.471, 45.2, 0.18)
	pt3dadd(-89.416, 156.663, 45.2, 0.18)
	pt3dadd(-90.603, 159.341, 45.2, 0.18)
	pt3dadd(-90.829, 159.714, 45.2, 0.18)
	pt3dadd(-91.642, 162.81, 45.2, 0.18)
	pt3dadd(-93.202, 165.07, 93.2, 0.18)
	pt3dadd(-93.654, 165.827, 93.2, 0.18)
	pt3dadd(-96.942, 170.132, 93.2, 0.18)
	pt3dadd(-97.383, 170.697, 93.2, 0.18)
	pt3dadd(-100.445, 174.426, 93.2, 0.18)
	pt3dadd(-100.875, 174.991, 93.2, 0.18)
	pt3dadd(-103.372, 179.161, 93.2, 0.18)
	pt3dadd(-103.801, 179.715, 93.2, 0.18)
	pt3dadd(-105.519, 184.336, 93.2, 0.18)
	pt3dadd(-105.971, 185.094, 93.2, 0.18)
	pt3dadd(-107.643, 188.924, 93.2, 0.18)
	pt3dadd(-107.881, 189.489, 93.2, 0.18)
	pt3dadd(-109.406, 194.314, 93.2, 0.18)
	pt3dadd(-111.271, 198.134, 93.2, 0.18)
	pt3dadd(-111.723, 198.891, 93.2, 0.18)
	pt3dadd(-113.271, 203.908, 93.2, 0.18)
	pt3dadd(-113.7, 204.27, 93.2, 0.18)
	pt3dadd(-115.519, 207.501, 93.2, 0.18)
	pt3dadd(-115.96, 208.066, 93.2, 0.18)
	pt3dadd(-116.593, 208.609, 93.2, 0.18)
	pt3dadd(-117.576, 211.298, 93.2, 0.18)
	pt3dadd(-117.825, 211.874, 93.2, 0.18)
	pt3dadd(-118.051, 215.208, 93.2, 0.18)
	pt3dadd(-118.288, 215.784, 93.2, 0.18)
	pt3dadd(-118.48, 218.53, 93.2, 0.18)
	pt3dadd(-118.503, 218.926, 92.8, 0.18)
	pt3dadd(-118.672, 221.276, 100.8, 0.18)
	pt3dadd(-118.909, 221.852, 100.8, 0.18)
	pt3dadd(-120.096, 224.53, 100.8, 0.18)
	pt3dadd(-122.932, 230.847, 100.8, 0.18)
	pt3dadd(-122.955, 231.243, 100.8, 0.18)
	pt3dadd(-123.588, 234.542, 100.8, 0.18)
	pt3dadd(-123.599, 234.746, 100.8, 0.18)
	pt3dadd(-124.243, 235.492, 100.8, 0.18)
	pt3dadd(-124.232, 235.288, 100.8, 0.18)
  }
  dend[38] {pt3dclear()
	pt3dadd(-124.232, 235.288, 100.8, 0.18)
	pt3dadd(-125.068, 236.486, 100.8, 0.18)
	pt3dadd(-127.26, 239.288, 100.8, 0.18)
	pt3dadd(-127.271, 239.48, 100.8, 0.18)
	pt3dadd(-129.17, 240.927, 100.8, 0.18)
	pt3dadd(-129.384, 241.119, 100.8, 0.18)
	pt3dadd(-131.69, 242.724, 100.8, 0.18)
	pt3dadd(-132.119, 243.096, 100.8, 0.18)
	pt3dadd(-133.43, 244.78, 100.8, 0.18)
	pt3dadd(-133.656, 245.153, 100.8, 0.18)
	pt3dadd(-135.035, 247.628, 100.8, 0.18)
	pt3dadd(-135.046, 247.82, 100.8, 0.18)
	pt3dadd(-135.227, 247.616, 100.8, 0.18)
  }
  dend[39] {pt3dclear()
	pt3dadd(-135.227, 247.616, 100.8, 0.18)
	pt3dadd(-136.232, 247.277, 106, 0.18)
	pt3dadd(-136.424, 247.255, 106, 0.18)
	pt3dadd(-139.408, 249.809, 104.4, 0.18)
	pt3dadd(-139.611, 250.001, 104.4, 0.18)
	pt3dadd(-140.481, 250.927, 104.4, 0.18)
	pt3dadd(-140.888, 251.097, 104.4, 0.18)
	pt3dadd(-141.329, 251.65, 104.4, 0.18)
	pt3dadd(-142.199, 252.577, 104.4, 0.18)
	pt3dadd(-142.82, 252.927, 104.4, 0.18)
	pt3dadd(-144.063, 253.628, 104.4, 0.18)
	pt3dadd(-144.707, 254.182, 104.4, 0.18)
	pt3dadd(-145.024, 255.933, 104.4, 0.18)
	pt3dadd(-145.261, 256.51, 104.4, 0.18)
	pt3dadd(-145.555, 257.866, 104.4, 0.18)
	pt3dadd(-145.792, 258.442, 104.4, 0.18)
	pt3dadd(-146.109, 260.001, 104.4, 0.18)
	pt3dadd(-146.312, 260.182, 104.4, 0.18)
	pt3dadd(-146.753, 260.747, 104.4, 0.18)
	pt3dadd(-148.029, 261.832, 104.4, 0.18)
	pt3dadd(-148.866, 262.374, 104.4, 0.18)
	pt3dadd(-152.086, 265.504, 104.4, 0.18)
	pt3dadd(-152.708, 268.804, 109.2, 0.18)
	pt3dadd(-152.945, 269.38, 109.2, 0.18)
	pt3dadd(-154.075, 271.279, 109.2, 0.18)
	pt3dadd(-154.098, 271.471, 109.2, 0.18)
	pt3dadd(-154.516, 271.844, 109.2, 0.18)
  }
  dend[40] {pt3dclear()
	pt3dadd(-135.227, 247.616, 100.8, 0.18)
	pt3dadd(-135.554, 249.368, 100.8, 0.18)
	pt3dadd(-135.78, 249.741, 100.8, 0.18)
	pt3dadd(-135.995, 252.882, 100.8, 0.18)
	pt3dadd(-136.018, 253.278, 100.8, 0.18)
	pt3dadd(-135.679, 257.041, 100.8, 0.18)
	pt3dadd(-135.227, 259.244, 100.8, 0.18)
	pt3dadd(-135.261, 259.64, 100.8, 0.18)
	pt3dadd(-134.639, 262.239, 100.8, 0.18)
	pt3dadd(-134.662, 262.634, 100.8, 0.18)
	pt3dadd(-134.243, 265.222, 100.8, 0.18)
	pt3dadd(-134.277, 265.617, 100.8, 0.18)
	pt3dadd(-135.023, 267.742, 100.8, 0.18)
  }
}
proc shape3d_14() {
  dend[40] {	pt3dadd(-135.261, 268.307, 100.8, 0.18)
	pt3dadd(-135.633, 270.849, 100.8, 0.18)
	pt3dadd(-135.859, 271.222, 100.8, 0.18)
	pt3dadd(-135.023, 273.652, 100.8, 0.18)
	pt3dadd(-134.865, 274.251, 100.8, 0.18)
	pt3dadd(-134.876, 277.211, 100.8, 0.18)
	pt3dadd(-134.91, 277.799, 100.8, 0.18)
	pt3dadd(-135.068, 279.957, 100.8, 0.18)
	pt3dadd(-135.102, 280.545, 100.8, 0.18)
	pt3dadd(-135.441, 282.5, 100.8, 0.18)
	pt3dadd(-135.667, 282.872, 100.8, 0.18)
	pt3dadd(-136.198, 284.805, 100.8, 0.18)
	pt3dadd(-136.639, 285.37, 100.8, 0.18)
	pt3dadd(-136.899, 286.342, 100.8, 0.18)
	pt3dadd(-136.91, 289.291, 100.8, 0.18)
	pt3dadd(-136.967, 290.082, 100.8, 0.18)
	pt3dadd(-137.012, 290.861, 100.8, 0.18)
	pt3dadd(-137.362, 293.008, 100.8, 0.18)
	pt3dadd(-137.6, 293.585, 100.8, 0.18)
	pt3dadd(-138.956, 295.856, 100.8, 0.18)
	pt3dadd(-139.215, 296.625, 100.8, 0.18)
	pt3dadd(-139.385, 299.178, 100.8, 0.18)
	pt3dadd(-139.645, 299.947, 100.8, 0.18)
	pt3dadd(-139.701, 300.738, 100.8, 0.18)
	pt3dadd(-139.622, 302.512, 100.8, 0.18)
	pt3dadd(-139.453, 302.919, 100.8, 0.18)
	pt3dadd(-139.521, 303.902, 100.8, 0.18)
	pt3dadd(-138.413, 305.359, 100.8, 0.18)
	pt3dadd(-138.458, 305.947, 100.8, 0.18)
	pt3dadd(-138.752, 307.303, 100.8, 0.18)
	pt3dadd(-138.809, 308.094, 100.8, 0.18)
	pt3dadd(-138.673, 309.088, 100.8, 0.18)
	pt3dadd(-138.696, 309.484, 100.8, 0.18)
	pt3dadd(-138.831, 311.439, 100.8, 0.18)
	pt3dadd(-138.876, 312.026, 100.8, 0.18)
	pt3dadd(-138.831, 314.207, 100.8, 0.18)
	pt3dadd(-138.865, 314.795, 100.8, 0.18)
	pt3dadd(-136.944, 318.863, 100.8, 0.18)
	pt3dadd(-137.001, 319.654, 100.8, 0.18)
	pt3dadd(-136.323, 324.23, 100.8, 0.18)
	pt3dadd(-136.379, 325.021, 100.8, 0.18)
	pt3dadd(-135.588, 328.027, 100.8, 0.18)
	pt3dadd(-135.611, 328.423, 100.8, 0.18)
	pt3dadd(-133.532, 330.14, 100.8, 0.18)
	pt3dadd(-133.362, 330.547, 100.8, 0.18)
	pt3dadd(-131.192, 331.09, 100.8, 0.18)
	pt3dadd(-130.831, 331.519, 100.8, 0.18)
	pt3dadd(-129.125, 333.01, 100.8, 0.18)
	pt3dadd(-128.966, 333.609, 100.8, 0.18)
	pt3dadd(-128.447, 334.638, 100.8, 0.18)
	pt3dadd(-128.469, 335.033, 100.8, 0.18)
	pt3dadd(-129.158, 336.355, 100.8, 0.18)
	pt3dadd(-129.384, 336.739, 100.8, 0.18)
	pt3dadd(-129.893, 338.276, 100.8, 0.18)
	pt3dadd(-130.334, 338.841, 100.8, 0.18)
	pt3dadd(-131.848, 340.514, 110.8, 0.18)
	pt3dadd(-131.859, 340.706, 110.8, 0.18)
	pt3dadd(-132.255, 343.44, 110.8, 0.18)
	pt3dadd(-132.277, 343.836, 110.8, 0.18)
	pt3dadd(-132.39, 348.367, 110.8, 0.18)
	pt3dadd(-132.402, 348.559, 110.8, 0.18)
	pt3dadd(-131.678, 352.548, 110.8, 0.18)
	pt3dadd(-131.701, 352.944, 110.8, 0.18)
	pt3dadd(-131.475, 355.328, 110.8, 0.18)
	pt3dadd(-131.712, 355.904, 110.8, 0.18)
	pt3dadd(-134.074, 358.3, 110.8, 0.18)
	pt3dadd(-134.729, 359.046, 110.8, 0.18)
	pt3dadd(-135.893, 361.532, 110.8, 0.18)
	pt3dadd(-136.334, 362.085, 110.8, 0.18)
	pt3dadd(-137.656, 363.769, 110.8, 0.18)
	pt3dadd(-137.893, 364.345, 110.8, 0.18)
	pt3dadd(-138.797, 365.86, 110.8, 0.18)
	pt3dadd(-138.82, 366.255, 110.8, 0.18)
	pt3dadd(-139.498, 367.385, 110.8, 0.18)
	pt3dadd(-139.927, 367.758, 110.8, 0.18)
	pt3dadd(-141.17, 368.459, 110.8, 0.18)
	pt3dadd(-141.611, 369.024, 110.8, 0.18)
	pt3dadd(-143.781, 371.43, 110.8, 0.18)
	pt3dadd(-143.995, 371.611, 110.8, 0.18)
	pt3dadd(-146.255, 372.64, 110.8, 0.18)
	pt3dadd(-146.47, 372.82, 110.8, 0.18)
	pt3dadd(-146.843, 375.363, 110.8, 0.18)
	pt3dadd(-146.685, 375.962, 110.8, 0.18)
	pt3dadd(-146.549, 376.764, 110.8, 0.18)
	pt3dadd(-145.544, 379.589, 110.8, 0.18)
	pt3dadd(-145.397, 380.391, 110.8, 0.18)
	pt3dadd(-145.408, 380.584, 110.8, 0.18)
	pt3dadd(-145.238, 380.99, 110.8, 0.18)
  }
  dend[41] {pt3dclear()
	pt3dadd(-124.232, 235.288, 100.8, 0.18)
	pt3dadd(-125.633, 235.198, 100.8, 0.18)
	pt3dadd(-125.644, 235.39, 100.8, 0.18)
	pt3dadd(-127.509, 236.441, 100.8, 0.18)
	pt3dadd(-127.723, 236.622, 100.8, 0.18)
	pt3dadd(-128.345, 236.983, 100.8, 0.18)
	pt3dadd(-130.243, 238.429, 100.8, 0.18)
	pt3dadd(-130.887, 238.972, 100.8, 0.18)
	pt3dadd(-132.582, 240.43, 100.8, 0.18)
	pt3dadd(-133.215, 240.78, 100.8, 0.18)
	pt3dadd(-134.865, 241.65, 100.8, 0.18)
	pt3dadd(-135.283, 241.819, 100.8, 0.18)
	pt3dadd(-137.543, 242.656, 100.8, 0.18)
	pt3dadd(-137.961, 243.017, 100.8, 0.18)
	pt3dadd(-139.328, 245.492, 100.8, 0.18)
	pt3dadd(-139.554, 245.865, 100.8, 0.18)
	pt3dadd(-139.464, 250.215, 83.2, 0.18)
	pt3dadd(-139.475, 250.407, 83.2, 0.18)
	pt3dadd(-140.255, 253.108, 83.2, 0.18)
	pt3dadd(-140.3, 253.696, 83.2, 0.18)
	pt3dadd(-140.944, 257.21, 83.2, 0.18)
	pt3dadd(-141.182, 257.775, 83.2, 0.18)
	pt3dadd(-142.606, 261.029, 83.2, 0.18)
	pt3dadd(-142.662, 261.82, 83.2, 0.18)
	pt3dadd(-143.487, 265.109, 83.2, 0.18)
	pt3dadd(-143.736, 265.889, 83.2, 0.18)
	pt3dadd(-144.312, 268.408, 83.2, 0.18)
	pt3dadd(-144.741, 268.77, 83.2, 0.18)
	pt3dadd(-145.882, 270.861, 83.2, 0.18)
	pt3dadd(-146.312, 271.233, 83.2, 0.18)
	pt3dadd(-147.894, 273.878, 83.2, 0.18)
	pt3dadd(-148.12, 274.262, 83.2, 0.18)
	pt3dadd(-149.453, 276.33, 83.2, 0.18)
	pt3dadd(-149.894, 276.895, 83.2, 0.18)
	pt3dadd(-151.917, 280.104, 83.2, 0.18)
	pt3dadd(-153.499, 282.759, 83.2, 0.18)
	pt3dadd(-153.725, 283.132, 83.2, 0.18)
	pt3dadd(-157.51, 287.652, 83.2, 0.18)
	pt3dadd(-160.629, 291.246, 164, 0.18)
	pt3dadd(-160.832, 291.449, 164, 0.18)
	pt3dadd(-162.573, 294.037, 164, 0.18)
	pt3dadd(-162.573, 294.24, 164, 0.18)
	pt3dadd(-163.126, 296.602, 164, 0.18)
	pt3dadd(-163.33, 296.805, 164, 0.18)
	pt3dadd(-163.906, 297.608, 163.6, 0.18)
	pt3dadd(-164.302, 297.811, 163.6, 0.18)
	pt3dadd(-166.087, 298.229, 163.6, 0.18)
	pt3dadd(-166.494, 298.24, 163.6, 0.18)
	pt3dadd(-167.68, 298.851, 163.6, 0.18)
	pt3dadd(-168.076, 299.054, 163.6, 0.18)
	pt3dadd(-169.047, 300.455, 163.6, 0.18)
	pt3dadd(-169.432, 300.851, 163.6, 0.18)
	pt3dadd(-170.008, 302.241, 163.6, 0.18)
	pt3dadd(-170.2, 302.636, 163.6, 0.18)
	pt3dadd(-170.776, 303.631, 163.6, 0.18)
	pt3dadd(-170.969, 304.026, 163.6, 0.18)
	pt3dadd(-171.341, 305.8, 163.6, 0.18)
	pt3dadd(-171.522, 306.399, 163.6, 0.18)
	pt3dadd(-171.5, 307.778, 163.6, 0.18)
	pt3dadd(-171.5, 308.173, 163.6, 0.18)
	pt3dadd(-171.466, 309.54, 163.6, 0.18)
	pt3dadd(-171.454, 310.139, 163.6, 0.18)
	pt3dadd(-172.212, 312.309, 163.6, 0.18)
	pt3dadd(-172.607, 312.908, 163.6, 0.18)
	pt3dadd(-172.957, 315.281, 154.8, 0.18)
	pt3dadd(-173.161, 315.473, 154.8, 0.18)
	pt3dadd(-174.325, 317.27, 155.52, 0.18)
	pt3dadd(-174.313, 317.665, 155.52, 0.18)
	pt3dadd(-175.669, 319.654, 155.52, 0.18)
	pt3dadd(-175.873, 319.857, 155.52, 0.18)
	pt3dadd(-176.268, 320.061, 155.52, 0.18)
	pt3dadd(-177.251, 320.468, 155.52, 0.18)
	pt3dadd(-177.455, 320.479, 155.52, 0.18)
	pt3dadd(-178.63, 321.484, 155.52, 0.18)
	pt3dadd(-178.822, 322.072, 155.52, 0.18)
	pt3dadd(-179.59, 323.858, 155.52, 0.18)
	pt3dadd(-179.579, 324.445, 155.52, 0.18)
	pt3dadd(-179.545, 326.027, 155.52, 0.18)
	pt3dadd(-179.534, 326.615, 155.52, 0.18)
	pt3dadd(-180.122, 327.214, 157.92, 0.18)
	pt3dadd(-180.314, 327.609, 157.92, 0.18)
	pt3dadd(-180.709, 328.016, 157.92, 0.18)
	pt3dadd(-181.896, 328.423, 157.92, 0.18)
	pt3dadd(-182.099, 328.434, 157.52, 0.18)
	pt3dadd(-182.291, 328.434, 157.52, 0.18)
	pt3dadd(-182.698, 328.445, 157.52, 0.18)
	pt3dadd(-182.89, 328.445, 157.52, 0.18)
	pt3dadd(-184.291, 328.072, 157.52, 0.18)
	pt3dadd(-184.302, 327.88, 157.52, 0.18)
	pt3dadd(-185.308, 327.304, 157.52, 0.18)
	pt3dadd(-185.512, 327.112, 157.52, 0.18)
	pt3dadd(-186.529, 326.151, 157.52, 0.18)
	pt3dadd(-186.732, 325.959, 157.52, 0.18)
	pt3dadd(-187.534, 325.383, 157.52, 0.18)
	pt3dadd(-187.738, 325.383, 157.52, 0.18)
	pt3dadd(-188.743, 324.818, 157.52, 0.18)
	pt3dadd(-188.947, 324.818, 157.52, 0.18)
	pt3dadd(-189.342, 324.626, 157.52, 0.18)
	pt3dadd(-190.145, 324.445, 157.52, 0.18)
	pt3dadd(-190.156, 324.253, 157.52, 0.18)
	pt3dadd(-190.551, 324.253, 157.52, 0.18)
	pt3dadd(-190.744, 324.264, 157.52, 0.18)
	pt3dadd(-191.15, 324.264, 157.52, 0.18)
	pt3dadd(-191.342, 324.276, 157.52, 0.18)
	pt3dadd(-191.738, 324.479, 157.52, 0.18)
	pt3dadd(-191.738, 324.671, 157.52, 0.18)
	pt3dadd(-191.76, 323.293, 160.72, 0.18)
  }
  soma[3] {pt3dclear()
	pt3dadd(1.988, 0.192, 0, 11.82)
	pt3dadd(2.587, -2.553, 0, 10.76)
	pt3dadd(4.384, -4.52, 0, 8.64)
	pt3dadd(5.186, -5.706, 0, 7.24)
	pt3dadd(5.582, -7.469, 0, 5.48)
  }
}
proc shape3d_15() {
  soma[3] {	pt3dadd(6.181, -9.243, 0.04, 5.48)
  }
}
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()
}

proc connect_pre() {  // $o1 target point process, $o2 returned NetCon
	soma $o2 = new NetCon (&v(1), $o1)
	//alternative statement		$o1.soma pre_list.append(new NetCon(soma.v(1),syn,0,Delsyn,0))
	}

	objref syn
	objref DistalSynapses 
	objref DistalSynapsePositions 
	objref ProximalSynapses 
	objref ProximalSynapsePositions 
	proc synapse() {
	
 
 // //***** PP syn   
 
DistalSynapses = new Vector(0,0) 
DistalSynapses .append(4, 5, 9,10,11,12,13,14,15,16,17,18,22,23,24,25,26,27,29,30,31,32,33,37,38,39,40,41) 
DistalSynapsePositions = new Vector(0,0) 
DistalSynapsePositions .append(0.51736,0.66465,0.56369,    0.5,    0.5,0.53405, 0.7326,    0.5,    0.5,0.89905,    0.5,    0.5,0.79106,0.87287,    0.5,    0.5,    0.5,    0.5,0.91413,    0.5,    0.5,    0.5,    0.5,0.74504,    0.5,    0.5,    0.5,    0.5) 
for i= 0 , 27 { 
dend[DistalSynapses .x[i]] syn = new Exp2Syn(DistalSynapsePositions .x[i]) // PP syn based on Greg and Staley 
syn.tau1 = 1.5	syn.tau2 = 5.5	syn.e = 0  
pre_list.append(syn) // # 0  
} 
 
 // //***** MC syn   
 
ProximalSynapses = new Vector(0,0) 
ProximalSynapses .append(0, 1, 2, 3, 6, 7,16,19,20,21,28,29,34,35) 
ProximalSynapsePositions = new Vector(0,0) 
ProximalSynapsePositions .append(0.5,    0.5,0.12443,    0.092881,    0.5,0.16041,    0.098703,    0.5,    0.5,0.25735,    0.5,    0.045417,0.17435, 0.2567) 
for i= 0 , 13 { 
dend[ProximalSynapses .x[i]] syn = new Exp2Syn(ProximalSynapsePositions .x[i]) // // MC syn *** Estimated 
syn.tau1 = 1.5	syn.tau2 = 5.5	syn.e = 0 
pre_list.append(syn) // #  
} 
 
 // //***** HIPP   
 
for i= 0 , 27 { 
dend[DistalSynapses .x[i]] syn = new Exp2Syn(DistalSynapsePositions .x[i]) // HIPP  
syn.tau1 = 0.5	syn.tau2 = 6	syn.e = -70 
pre_list.append(syn) // # 41 
} 
 
 // //***** BC syn   
 
soma syn = new Exp2Syn(0.5) // BC  syn syn based on Bartos 
syn.tau1 = 0.26	syn.tau2 = 5.5	syn.e = -70 
pre_list.append(syn) // # 42 
 
 // //***** Sprout   
 
for i= 0 , 13 { 
dend[ProximalSynapses .x[i]] syn = new Exp2Syn(ProximalSynapsePositions .x[i]) // // MC syn *** Estimated 
syn.tau1 = 1.5	syn.tau2 = 5.5	syn.e = 0 
pre_list.append(syn) // # 42 
} 

	  
}
	func is_art() { return 0 }

	endtemplate GranuleCell84
//************************************************************************************************************