Four cortical interneuron subtypes (Kubota et al. 2011)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:140299
" ... Using electron microscopy and serial reconstructions, we analyzed the dendritic trees of four morphologically distinct neocortical interneuron subtypes to reveal two underlying organizational principles common to all. First, cross-sectional areas at any given point within a dendrite were proportional to the summed length of all dendritic segments distal to that point. ... Second, dendritic cross-sections became progressively more elliptical at more proximal, larger diameter, dendritic locations. Finally, computer simulations revealed that these conserved morphological features limit distance dependent filtering of somatic EPSPs and facilitate distribution of somatic depolarization into all dendritic compartments. ..."
Reference:
1 . Kubota Y,Karube F, Nomura M, Gulledge AT, Mochizuki A, Schertel A, Kawaguchi Y (2011) Conserved properties of dendritic trees in four cortical interneuron subtypes Scientific Reports 1:89 [PubMed]
Model Information (Click on a link to find other models with that property)
Model Type: Dendrite;
Brain Region(s)/Organism: Neocortex;
Cell Type(s):
Channel(s):
Gap Junctions:
Receptor(s):
Gene(s):
Transmitter(s):
Simulation Environment: NEURON;
Model Concept(s):
Implementer(s): Nomura, Masaki [nomura at rcai.riken.jp];
proc celldef() {
    topol()
    subsets()
    geomL()
    geom_nseg()
    geom()
    biophys()
//    geom_nseg()
}

create soma, dend[55]
strdef celltype
celltype="LV38E"
numTree=30
shortR=8.59

proc topol() { local i
    connect dend[0](0), soma(0.5) //dend1
    connect dend[1](0), soma(0.5) //dend2
    connect dend[2](0), soma(0.1) //dend3
    connect dend[3](0), soma(0.2) //dend4
    connect dend[4](0), soma(0.5) //dend5
    for i = 5, 6 connect dend[i](0), dend[0](1)
    for i = 7, 8 connect dend[i](0), dend[1](1)
    for i = 9, 10 connect dend[i](0), dend[2](1)
    for i = 11, 12 connect dend[i](0), dend[4](1)
    for i = 13, 14 connect dend[i](0), dend[5](1)
    for i = 15, 16 connect dend[i](0), dend[6](1)
    for i = 17, 18 connect dend[i](0), dend[7](1)
    for i = 19, 20 connect dend[i](0), dend[9](1)
    for i = 21, 22 connect dend[i](0), dend[10](1)
    for i = 23, 24 connect dend[i](0), dend[11](1)
    for i = 25, 26 connect dend[i](0), dend[12](1)
    for i = 27, 28 connect dend[i](0), dend[13](1)
    for i = 29, 30 connect dend[i](0), dend[18](1)
    for i = 31, 32 connect dend[i](0), dend[21](1)
    for i = 33, 34 connect dend[i](0), dend[23](1)
    for i = 35, 36 connect dend[i](0), dend[25](1)
    for i = 37, 38 connect dend[i](0), dend[26](1)
    for i = 39, 40 connect dend[i](0), dend[27](1)
    for i = 41, 42 connect dend[i](0), dend[29](1)
    for i = 43, 44 connect dend[i](0), dend[32](1)
    for i = 45, 46 connect dend[i](0), dend[38](1)
    for i = 47, 48 connect dend[i](0), dend[44](1)
    for i = 49, 50 connect dend[i](0), dend[48](1)
    for i = 51, 52 connect dend[i](0), dend[33](1)
    for i = 53, 54 connect dend[i](0), dend[51](1)
    basic_shape()
}

proc shape3d_soma() {
    soma {pt3dclear()
	pt3dadd(0,0,0,0)
	pt3dadd(0,0,0.005,0.730266668744064)
	pt3dadd(0,0,0.295,5.513730438718289)
	pt3dadd(0,0,0.795,8.774410549892858)
	pt3dadd(0,0,1.295,10.833626510037959)
	pt3dadd(0,0,1.795,12.309864821907146)
	pt3dadd(0,0,2.295,13.397246217859871)
	pt3dadd(0,0,2.795,14.185477299830195)
	pt3dadd(0,0,3.295,14.722684943302244)
	pt3dadd(0,0,3.795,15.035799392422842)
	pt3dadd(0,0,4.295,15.1387318)
	pt3dadd(0,0,4.795,15.035799392422842)
	pt3dadd(0,0,5.295,14.722684943302244)
	pt3dadd(0,0,5.795,14.185477299830195)
	pt3dadd(0,0,6.295,13.397246217859871)
	pt3dadd(0,0,6.795,12.309864821907146)
	pt3dadd(0,0,7.295,10.833626510037959)
	pt3dadd(0,0,7.795,8.774410549892858)
	pt3dadd(0,0,8.295,5.513730438718289)
	pt3dadd(0,0,8.585,0.730266668744064)
	pt3dadd(0,0,8.59,0)
    }
}

proc shape3d_dend1_1() {
    dend[0] {pt3dclear()
//	pt3dstyle(1, -5.9907, -2.34415, 2.43116)
	pt3dadd(-4.21733, 14.309, 4.56039, 2.27)
	pt3dadd(-3.89733, 16.899, 4.56039, 1.94)
	pt3dadd(-3.24733, 19.489, 4.56039, 1.94)
	pt3dadd(-2.59733, 21.749, 4.56039, 1.94)
	pt3dadd(-0.657335, 24.019, 4.56039, 1.94)
	pt3dadd(0.642665, 24.989, 6.41039, 1.94)
	pt3dadd(3.23267, 25.639, 7.05039, 1.94)
    }
}

proc shape3d_dend2_1() {
    dend[1] {pt3dclear()
//	pt3dstyle(1, -5.9907, -2.34415, 2.43116)
	pt3dadd(-9.39734, -8.52099, -2.27961, 1.62)
	pt3dadd(-11.3473, -8.84099, -3.54961, 1.62)
	pt3dadd(-12.9673, -10.461, -4.81961, 1.62)
	pt3dadd(-15.5573, -10.461, -5.29961, 1.62)
	pt3dadd(-17.1773, -10.781, -5.93961, 1.62)
	pt3dadd(-19.1173, -12.081, -6.24961, 1.62)
	pt3dadd(-22.0273, -13.701, -6.93961, 1.62)
	pt3dadd(-23.0073, -14.341, -7.99961, 1.62)
	pt3dadd(-25.2673, -14.671, -8.63962, 1.62)
	pt3dadd(-27.5373, -14.671, -9.48961, 1.62)
	pt3dadd(-28.1873, -15.641, -10.8096, 1.62)
	pt3dadd(-28.1873, -16.931, -10.9196, 1.62)
	pt3dadd(-30.1273, -17.261, -12.3496, 1.62)
	pt3dadd(-31.7473, -17.901, -13.6696, 1.62)
	pt3dadd(-33.3673, -18.871, -14.7296, 1.62)
	pt3dadd(-33.6873, -19.851, -14.7296, 1.62)
    }
}

proc shape3d_dend3_1() {
    dend[2] {pt3dclear()
//	pt3dstyle(1, -5.9907, -2.34415, 2.43116)
	pt3dadd(-0.327335, 5.07901, -5.18961, 2.27)
	pt3dadd(2.26267, 6.37901, -5.87961, 2.27)
	pt3dadd(2.58267, 6.37901, -6.03961, 2.27)
	pt3dadd(3.55267, 6.04901, -7.89961, 2.27)
	pt3dadd(4.85267, 6.69901, -9.32961, 2.27)
	pt3dadd(6.47267, 7.01901, -9.32961, 2.27)
	pt3dadd(7.12267, 7.01901, -9.64961, 2.27)
	pt3dadd(8.74267, 6.37901, -10.2796, 2.27)
    }
}

proc shape3d_dend4() {
    dend[3] {pt3dclear()
//	pt3dstyle(1, -5.9907, -2.34415, 2.43116)
	pt3dadd(-6.48733, -19.201, 2.76039, 1.62)
	pt3dadd(-7.13733, -20.171, 4.51039, 1.62)
	pt3dadd(-7.45733, -21.791, 4.51039, 1.62)
	pt3dadd(-7.77733, -23.081, 7.68039, 1.62)
	pt3dadd(-8.10734, -24.051, 8.74039, 1.62)
	pt3dadd(-7.77733, -25.671, 10.8104, 1.62)
	pt3dadd(-7.45733, -27.941, 13.1404, 1.62)
	pt3dadd(-7.45733, -29.561, 13.7804, 1.62)
	pt3dadd(-6.80733, -31.181, 14.6804, 1.62)
	pt3dadd(-6.80733, -32.151, 16.6404, 1.62)
	pt3dadd(-6.48733, -33.121, 18.0204, 1.62)
	pt3dadd(-6.48733, -34.091, 19.8204, 1.62)
	pt3dadd(-6.80733, -34.741, 21.1504, 1.62)
    }
}

proc shape3d_dend5_1() {
    dend[4] {pt3dclear()
//	pt3dstyle(1, -5.9907, -2.34415, 2.43116)
	pt3dadd(-4.53733, -18.711, 1.86039, 1.62)
	pt3dadd(-3.89733, -20.011, 1.86039, 1.62)
	pt3dadd(-3.24733, -21.631, 0.640385, 1.62)
	pt3dadd(-2.59733, -23.571, 0.640385, 1.62)
	pt3dadd(-1.94733, -25.191, 0.640385, 1.62)
	pt3dadd(-0.977335, -27.451, 0.640385, 1.62)
	pt3dadd(-0.327335, -28.751, 0.640385, 1.62)
	pt3dadd(-0.00733471, -29.721, 0.640385, 1.62)
    }
}

proc shape3d_dend1_2() {
    dend[5] {pt3dclear()
	pt3dadd(3.23267, 25.639, 7.05039, 1.62)
	pt3dadd(3.55267, 27.739, 8.06039, 1.62)
	pt3dadd(4.52267, 28.709, 10.9204, 1.62)
	pt3dadd(5.17267, 28.709, 10.9704, 1.62)
	pt3dadd(6.14267, 29.359, 10.7104, 1.62)
    }
}

proc shape3d_dend1_3() {
    dend[6] {pt3dclear()
	pt3dadd(3.23267, 25.639, 7.05039, 1.3)
	pt3dadd(5.82267, 24.989, 6.94039, 1.3)
	pt3dadd(6.47267, 23.699, 8.00039, 1.3)
	pt3dadd(8.09267, 24.019, 6.41039, 1.3)
	pt3dadd(10.0327, 24.339, 4.51039, 1.3)
	pt3dadd(11.9727, 24.019, 4.40039, 1.3)
	pt3dadd(13.2727, 24.019, 3.55039, 1.3)
	pt3dadd(14.8927, 25.319, 3.55039, 1.3)
	pt3dadd(17.8027, 25.959, 1.54039, 1.3)
	pt3dadd(18.4527, 25.959, 1.38039, 1.3)
	pt3dadd(19.7527, 26.289, 0.000385284, 1.3)
	pt3dadd(22.0127, 27.909, 0.370385, 1.3)
	pt3dadd(23.6327, 28.879, 0.370385, 1.3)
	pt3dadd(26.2327, 28.879, -0.369615, 1.3)
	pt3dadd(28.8227, 28.879, -0.479615, 1.3)
	pt3dadd(30.7627, 29.519, -1.58961, 1.3)
	pt3dadd(32.0627, 28.879, -4.55961, 1.3)
	pt3dadd(34.0027, 28.229, -4.60961, 1.3)
	pt3dadd(34.6527, 27.259, -5.82961, 1.3)
	pt3dadd(36.5927, 26.609, -6.99961, 1.3)
	pt3dadd(36.2727, 25.639, -9.11961, 1.3)
	pt3dadd(35.6227, 24.669, -9.48961, 1.3)
	pt3dadd(37.5627, 24.669, -10.2796, 1.3)
	pt3dadd(38.5327, 23.699, -11.5496, 1.3)
	pt3dadd(39.8327, 22.399, -11.6596, 1.3)
	pt3dadd(41.4527, 21.429, -12.3496, 1.3)
	pt3dadd(42.4227, 22.399, -14.0996, 1.3)
	pt3dadd(43.0727, 22.399, -14.8896, 1.3)
	pt3dadd(43.7227, 21.749, -16.0596, 1.3)
    }
}

proc shape3d_dend2_2() {
    dend[7] {pt3dclear()
	pt3dadd(-33.6873, -19.851, -14.7296, 1.3)
	pt3dadd(-34.0173, -21.791, -13.0396, 1.3)
	pt3dadd(-34.3373, -23.081, -13.7796, 1.3)
	pt3dadd(-36.2873, -24.051, -14.9996, 1.3)
	pt3dadd(-36.6073, -25.031, -14.9996, 1.3)
	pt3dadd(-36.2873, -26.001, -14.9996, 1.3)
	pt3dadd(-35.9573, -26.971, -15.3696, 1.3)
	pt3dadd(-36.6073, -27.621, -15.5796, 1.3)
	pt3dadd(-37.5773, -27.621, -15.6396, 1.3)
	pt3dadd(-38.5473, -27.621, -16.2696, 1.3)
	pt3dadd(-39.8473, -28.911, -16.2696, 1.3)
	pt3dadd(-40.4973, -29.561, -16.2696, 1.3)
	pt3dadd(-42.1173, -30.531, -16.4296, 1.3)
	pt3dadd(-42.4373, -31.501, -17.4896, 1.3)
	pt3dadd(-42.4373, -32.801, -18.2296, 1.3)
    }
}

proc shape3d_dend2_3() {
    dend[8] {pt3dclear()
	pt3dadd(-33.6873, -19.851, -14.7296, 0.97)
	pt3dadd(-36.2873, -18.551, -14.7296, 0.97)
	pt3dadd(-37.5773, -18.871, -16.0096, 0.97)
	pt3dadd(-38.2273, -19.521, -17.3796, 0.97)
	pt3dadd(-39.5173, -19.521, -19.0296, 0.97)
	pt3dadd(-40.1673, -19.521, -19.1296, 0.97)
	pt3dadd(-41.4673, -18.871, -19.4996, 1.3)
	pt3dadd(-43.0873, -18.871, -20.6696, 1.3)
	pt3dadd(-44.0573, -18.551, -20.6696, 1.3)
	pt3dadd(-45.3473, -19.201, -20.9296, 1.3)
	pt3dadd(-46.3273, -18.871, -21.4696, 1.3)
	pt3dadd(-47.9473, -17.901, -23.3696, 1.3)
	pt3dadd(-49.5673, -17.901, -24.2696, 1.3)
	pt3dadd(-52.7973, -17.261, -24.2696, 1.3)
	pt3dadd(-54.0973, -16.611, -29.4096, 1.3)
	pt3dadd(-54.0973, -15.311, -32.7496, 1.3)
	pt3dadd(-55.7173, -15.961, -33.3396, 1.3)
	pt3dadd(-56.6873, -15.641, -32.6496, 1.3)
	pt3dadd(-57.0073, -14.341, -33.5496, 1.3)
	pt3dadd(-57.0073, -13.051, -33.5996, 1.3)
	pt3dadd(-59.2773, -12.721, -34.1296, 1.3)
	pt3dadd(-59.6073, -11.751, -34.4496, 1.3)
	pt3dadd(-59.9273, -10.781, -34.6096, 1.3)
	pt3dadd(-60.8973, -10.781, -35.7196, 1.3)
	pt3dadd(-62.1973, -9.81099, -36.6796, 1.3)
	pt3dadd(-62.8373, -8.84099, -37.9996, 1.3)
	pt3dadd(-64.7873, -10.131, -39.6996, 1.3)
	pt3dadd(-65.4373, -9.16099, -39.7996, 1.3)
	pt3dadd(-66.4073, -8.52099, -40.4896, 1.3)
	pt3dadd(-67.0573, -8.19099, -41.3396, 1.3)
	pt3dadd(-69.9673, -8.19099, -41.5996, 1.3)
	pt3dadd(-71.2673, -5.93099, -42.0796, 1.3)
	pt3dadd(-71.5873, -4.63099, -43.9896, 1.3)
	pt3dadd(-71.5873, -2.36099, -45.5796, 1.3)
	pt3dadd(-71.5873, -1.39099, -46.6896, 1.3)
	pt3dadd(-72.5573, -1.07099, -52.8396, 1.3)
	pt3dadd(-72.8873, -0.10099, -53.4796, 1.3)
	pt3dadd(-71.5873, 1.19901, -55.0096, 1.3)
	pt3dadd(-71.9073, 2.81901, -57.9796, 1.3)
	pt3dadd(-71.9073, 3.45901, -63.5996, 1.3)
	pt3dadd(-72.2373, 3.78901, -64.7696, 1.3)
	pt3dadd(-73.2073, 3.78901, -65.3996, 1.3)
	pt3dadd(-72.8873, 4.75901, -66.0396, 1.3)
	pt3dadd(-74.8273, 5.40901, -67.9496, 1.3)
	pt3dadd(-73.8573, 5.72901, -69.0096, 1.3)
	pt3dadd(-74.4973, 6.04901, -71.4996, 1.3)
	pt3dadd(-73.5273, 6.04901, -76.2096, 1.3)
	pt3dadd(-73.5273, 5.40901, -82.5196, 1.3)
	pt3dadd(-74.8273, 6.37901, -86.4396, 1.3)
	pt3dadd(-75.4773, 6.37901, -88.1896, 1.3)
    }
}

proc shape3d_dend3_2() {
    dend[9] {pt3dclear()
	pt3dadd(8.74267, 6.37901, -10.2796, 1.3)
	pt3dadd(11.3327, 5.23901, -10.8096, 1.3)
	pt3dadd(13.5927, 5.23901, -10.7096, 1.3)
	pt3dadd(14.8927, 5.23901, -9.85961, 1.3)
	pt3dadd(16.5127, 3.94901, -9.37961, 1.3)
	pt3dadd(17.8027, 3.61901, -9.11961, 1.3)
	pt3dadd(19.7527, 1.67901, -8.68961, 1.3)
	pt3dadd(21.3727, 1.35901, -8.58961, 1.3)
	pt3dadd(23.3127, 0.389009, -6.77961, 1.3)
	pt3dadd(25.5827, -1.55099, -6.19961, 1.3)
	pt3dadd(26.8727, -2.20099, -5.93961, 1.3)
	pt3dadd(28.1727, -2.20099, -5.50961, 1.3)
	pt3dadd(29.4627, -2.85099, -5.13961, 1.3)
	pt3dadd(31.4127, -3.50099, -4.71961, 1.3)
	pt3dadd(32.0627, -4.14099, -4.71961, 1.3)
	pt3dadd(32.3827, -4.47099, -4.71961, 1.3)
	pt3dadd(34.0027, -5.44099, -4.65961, 1.3)
	pt3dadd(35.2927, -6.73099, -4.65961, 1.3)
	pt3dadd(36.2727, -9.00099, -5.45961, 1.3)
	pt3dadd(38.5327, -9.97099, -5.13961, 1.3)
	pt3dadd(38.2127, -11.591, -4.60961, 1.3)
	pt3dadd(39.5027, -12.561, -4.60961, 1.3)
	pt3dadd(40.1527, -13.531, -3.91961, 1.3)
	pt3dadd(42.1027, -16.121, -3.81961, 1.3)
	pt3dadd(42.7427, -16.451, -3.81961, 1.3)
	pt3dadd(45.3327, -17.741, -4.50961, 1.3)
	pt3dadd(47.9327, -18.711, -4.02961, 1.3)
	pt3dadd(48.5727, -21.631, -1.85961, 1.3)
	pt3dadd(49.2227, -22.601, -1.16961, 1.3)
	pt3dadd(50.1927, -23.571, -1.16961, 1.3)
	pt3dadd(52.1427, -23.891, -1.00961, 1.3)
	pt3dadd(53.7627, -25.511, -1.53961, 1.3)
	pt3dadd(55.0527, -28.101, -2.16961, 1.3)
	pt3dadd(57.3227, -31.021, -2.06961, 1.3)
	pt3dadd(56.9927, -32.311, -1.95961, 1.3)
	pt3dadd(56.6727, -32.311, -2.00961, 1.3)
	pt3dadd(58.6127, -32.631, -1.95961, 1.3)
	pt3dadd(59.2627, -33.281, -1.95961, 1.3)
	pt3dadd(61.2127, -33.281, -1.47961, 1.3)
	pt3dadd(60.2327, -34.901, -1.47961, 1.3)
	pt3dadd(61.2127, -34.901, -1.47961, 1.3)
	pt3dadd(61.5327, -36.841, -0.799615, 1.3)
	pt3dadd(63.1527, -36.201, -0.799615, 1.3)
	pt3dadd(63.8027, -37.171, -0.799615, 1.3)
	pt3dadd(65.7427, -38.141, -0.739615, 1.3)
	pt3dadd(66.0627, -40.731, 0.740385, 1.3)
	pt3dadd(65.0927, -41.371, 2.49039, 1.3)
	pt3dadd(65.4227, -41.701, 3.34039, 1.3)
	pt3dadd(68.0127, -43.321, 5.35039, 1.3)
	pt3dadd(68.3327, -45.911, 6.04039, 1.3)
	pt3dadd(69.9527, -46.231, 7.74039, 0.97)
	pt3dadd(70.6027, -49.471, 8.16039, 0.97)
	pt3dadd(72.2227, -51.731, 8.43039, 0.97)
	pt3dadd(74.1627, -52.381, 8.43039, 0.97)
	pt3dadd(75.1327, -53.681, 8.96039, 0.97)
	pt3dadd(77.4027, -56.911, 8.96039, 0.97)
	pt3dadd(79.6727, -59.181, 9.01039, 0.97)
	pt3dadd(79.9927, -60.481, 9.01039, 0.97)
	pt3dadd(81.6127, -61.451, 9.49039, 0.97)
	pt3dadd(83.2327, -63.071, 9.49039, 0.97)
	pt3dadd(84.2027, -65.331, 9.49039, 0.97)
	pt3dadd(85.5027, -67.271, 9.49039, 0.97)
	pt3dadd(86.1427, -69.221, 9.49039, 0.97)
	pt3dadd(88.4127, -70.841, 9.49039, 0.97)
	pt3dadd(89.7127, -74.721, 9.75039, 0.97)
	pt3dadd(92.3027, -75.371, 9.86038, 0.97)
	pt3dadd(92.6227, -76.661, 9.86038, 0.97)
	pt3dadd(93.5927, -78.281, 10.1804, 0.97)
	pt3dadd(94.2427, -79.901, 10.1804, 0.97)
	pt3dadd(96.5127, -82.171, 8.74039, 0.97)
	pt3dadd(97.4827, -84.431, 4.24039, 0.97)
	pt3dadd(97.1627, -85.731, 3.97039, 0.97)
	pt3dadd(99.4227, -87.351, 2.70039, 0.97)
	pt3dadd(100.403, -88.321, 2.07039, 0.97)
	pt3dadd(101.693, -90.261, 1.64039, 0.97)
	pt3dadd(102.663, -91.881, 0.160385, 0.97)
	pt3dadd(104.613, -93.821, -0.259615, 0.97)
	pt3dadd(105.903, -96.731, -2.69961, 0.97)
	pt3dadd(106.873, -98.351, -2.69961, 0.97)
	pt3dadd(109.793, -99.971, -3.06961, 0.97)
	pt3dadd(111.733, -101.911, -4.28961, 0.97)
	pt3dadd(114.973, -103.861, -4.39961, 0.97)
	pt3dadd(118.533, -105.481, -5.24961, 0.97)
	pt3dadd(120.483, -105.801, -5.77961, 0.97)
	pt3dadd(123.393, -105.801, -6.72961, 0.97)
	pt3dadd(125.983, -106.121, -6.99961, 0.97)
	pt3dadd(127.933, -106.121, -8.63962, 0.97)
	pt3dadd(131.493, -106.121, -10.9696, 0.97)
	pt3dadd(134.083, -107.421, -12.5096, 0.97)
	pt3dadd(135.703, -107.421, -14.1496, 0.97)
	pt3dadd(134.733, -107.421, -18.4996, 0.97)
	pt3dadd(132.143, -108.391, -18.4996, 0.97)
	pt3dadd(132.143, -107.091, -18.9196, 0.97)
	pt3dadd(132.783, -106.451, -20.2496, 0.97)
	pt3dadd(132.783, -106.771, -20.1396, 0.97)
	pt3dadd(133.763, -108.711, -22.3096, 0.97)
	pt3dadd(134.733, -110.981, -24.5396, 0.97)
	pt3dadd(134.733, -112.601, -26.2896, 0.97)
	pt3dadd(135.383, -113.571, -27.8796, 0.97)
	pt3dadd(134.733, -116.161, -28.6196, 0.97)
	pt3dadd(135.053, -117.781, -31.4296, 0.97)
	pt3dadd(135.053, -119.401, -34.3996, 0.97)
	pt3dadd(134.403, -120.041, -36.7296, 0.97)
	pt3dadd(134.733, -123.931, -36.8296, 0.97)
	pt3dadd(133.763, -126.521, -37.9996, 0.97)
	pt3dadd(132.783, -128.461, -38.8496, 0.97)
	pt3dadd(132.783, -130.081, -38.8496, 0.97)
	pt3dadd(132.783, -132.991, -38.8496, 0.97)
	pt3dadd(131.493, -134.291, -38.8496, 0.97)
	pt3dadd(130.193, -136.551, -39.0096, 0.97)
	pt3dadd(129.223, -137.201, -39.3796, 0.97)
    }
}

proc shape3d_dend3_3() {
    dend[10] {pt3dclear()
	pt3dadd(8.74267, 6.37901, -10.2796, 1.94)
	pt3dadd(11.6527, 7.01901, -11.4496, 1.94)
	pt3dadd(13.2727, 7.01901, -12.2996, 1.94)
	pt3dadd(15.2127, 7.66901, -13.0396, 1.94)
	pt3dadd(15.2127, 8.96901, -16.6396, 1.94)
	pt3dadd(16.8327, 10.589, -20.7796, 1.94)
	pt3dadd(17.4827, 10.909, -23.1596, 1.94)
	pt3dadd(17.8027, 10.259, -26.2896, 1.94)
	pt3dadd(18.7827, 10.259, -26.5496, 1.94)
	pt3dadd(20.0727, 11.229, -29.0396, 1.94)
	pt3dadd(20.4027, 12.199, -30.2096, 1.94)
	pt3dadd(20.7227, 12.199, -30.2096, 1.94)
    }
}

proc shape3d_dend5_2() {
    dend[11] {pt3dclear()
	pt3dadd(-0.00733471, -29.721, 0.640385, 1.3)
	pt3dadd(0.642665, -32.471, -0.639615, 1.3)
	pt3dadd(0.642665, -33.771, -0.639615, 1.3)
	pt3dadd(1.29267, -35.061, -0.639615, 1.3)
	pt3dadd(0.312665, -36.681, -0.639615, 1.3)
	pt3dadd(1.61267, -37.331, -0.479615, 1.3)
	pt3dadd(1.93267, -39.271, 0.210385, 1.3)
	pt3dadd(2.26267, -40.571, 0.370385, 1.3)
	pt3dadd(2.26267, -42.181, 0.530385, 1.3)
	pt3dadd(3.23267, -45.751, 1.38039, 1.3)
    }
}

proc shape3d_dend5_3() {
    dend[12] {pt3dclear()
	pt3dadd(-0.00733471, -29.721, 0.640385, 1.62)
	pt3dadd(2.58267, -32.311, -1.63961, 1.62)
	pt3dadd(3.88267, -33.931, -2.90961, 1.62)
	pt3dadd(4.20267, -34.901, -4.07961, 1.62)
	pt3dadd(4.85267, -35.221, -4.07961, 1.62)
	pt3dadd(5.17267, -36.521, -4.07961, 1.62)
	pt3dadd(5.17267, -38.461, -4.71961, 1.62)
	pt3dadd(5.50267, -39.431, -5.18961, 1.62)
	pt3dadd(6.79267, -39.761, -5.40961, 1.62)
	pt3dadd(8.41267, -41.051, -7.99961, 1.62)
	pt3dadd(10.6827, -41.701, -9.32961, 1.62)
	pt3dadd(11.6527, -42.351, -9.37961, 1.62)
	pt3dadd(13.9227, -42.991, -9.37961, 1.62)
	pt3dadd(13.5927, -44.611, -10.5996, 1.62)
	pt3dadd(13.9227, -46.881, -12.6096, 1.62)
	pt3dadd(14.5727, -48.171, -12.7196, 1.62)
    }
}

proc shape3d_dend1_4() {
    dend[13] {pt3dclear()
	pt3dadd(6.14267, 29.359, 10.7104, 0.97)
	pt3dadd(5.50267, 31.949, 10.7604, 0.97)
	pt3dadd(4.85267, 33.249, 10.7604, 0.97)
	pt3dadd(4.85267, 34.539, 10.7604, 0.97)
	pt3dadd(5.82267, 35.839, 10.7604, 0.97)
	pt3dadd(6.14267, 37.779, 11.9804, 0.97)
	pt3dadd(5.82267, 39.719, 11.3904, 0.97)
	pt3dadd(5.82267, 41.659, 11.3904, 0.97)
	pt3dadd(5.17267, 42.959, 11.6104, 0.97)
	pt3dadd(5.50267, 45.229, 10.6504, 0.97)
	pt3dadd(5.50267, 46.199, 8.96039, 0.97)
	pt3dadd(5.50267, 46.839, 7.79039, 0.97)
	pt3dadd(5.17267, 48.139, 7.74039, 0.97)
	pt3dadd(4.85267, 50.409, 7.63039, 0.97)
	pt3dadd(4.52267, 52.349, 6.94039, 0.97)
	pt3dadd(4.52267, 53.319, 6.94039, 0.97)
	pt3dadd(3.55267, 54.939, 6.73039, 0.97)
	pt3dadd(2.58267, 56.879, 6.41039, 0.97)
	pt3dadd(1.29267, 57.199, 6.41039, 0.97)
	pt3dadd(1.29267, 58.499, 6.41039, 0.97)
	pt3dadd(0.642665, 59.469, 6.41039, 0.97)
	pt3dadd(-1.62733, 61.089, 6.41039, 0.97)
	pt3dadd(-1.62733, 63.349, 4.61039, 0.97)
	pt3dadd(-2.59733, 64.329, 4.61039, 0.97)
	pt3dadd(-4.53733, 66.589, 4.51039, 0.97)
	pt3dadd(-5.18733, 67.559, 4.61039, 0.97)
	pt3dadd(-4.21733, 69.179, 3.97039, 1.3)
	pt3dadd(-5.18733, 71.449, 3.87039, 1.3)
	pt3dadd(-5.83733, 72.739, 3.71039, 1.3)
	pt3dadd(-5.83733, 74.039, 3.29039, 1.3)
	pt3dadd(-6.15733, 75.329, 3.29039, 1.3)
	pt3dadd(-6.48733, 76.629, 3.39039, 1.3)
    }
}

proc shape3d_dend1_5() {
    dend[14] {pt3dclear()
	pt3dadd(6.15, 29.62, 10.71, 0.97)
	pt3dadd(8.42, 28.65, 13.2, 0.97)
	pt3dadd(8.42, 28, 16.27, 0.97)
	pt3dadd(8.42, 28, 18.5, 0.97)
	pt3dadd(9.07, 28, 19.77, 0.97)
	pt3dadd(9.39, 28, 23.37, 0.97)
	pt3dadd(9.7, 28.68, 23.37, 0.97)
	pt3dadd(9.67, 30.13, 24.06, 0.97)
	pt3dadd(8.76, 31.84, 24.06, 0.97)
	pt3dadd(8.86, 33.73, 22, 0.97)
	pt3dadd(9.4, 35.48, 21.78, 0.97)
	pt3dadd(10.39, 36.37, 20.56, 0.97)
	pt3dadd(12.09, 38, 20.3, 0.97)
	pt3dadd(13.36, 39.77, 17.6, 0.97)
	pt3dadd(13.91, 40.8, 17.17, 0.97)
	pt3dadd(15.73, 43.59, 14.42, 0.97)
	pt3dadd(16.71, 45.21, 11.87, 0.97)
	pt3dadd(16.8, 47.82, 9.59, 0.97)
	pt3dadd(18.2, 50.02, 6.1, 0.97)
	pt3dadd(18.11, 53.64, 4.24, 0.97)
	pt3dadd(18.06, 55.81, 2.7, 0.97)
	pt3dadd(17.85, 58.99, 2.17, 0.97)
	pt3dadd(18.27, 65.81, 2.6, 0.97)
	pt3dadd(18.73, 71.18, 2.54, 0.97)
	pt3dadd(20.04, 77, 2.39, 0.97)
	pt3dadd(21.97, 81.68, -0.16, 0.97)
    }
}

proc shape3d_dend1_6() {
    dend[15] {pt3dclear()
	pt3dadd(43.7227, 21.749, -16.0596, 1.3)
	pt3dadd(46.6327, 21.269, -16.3796, 1.3)
	pt3dadd(47.2827, 21.589, -17.4896, 1.3)
	pt3dadd(48.5727, 22.239, -17.8096, 1.3)
	pt3dadd(49.8727, 22.889, -18.0196, 1.3)
	pt3dadd(50.8427, 23.209, -18.5996, 1.3)
	pt3dadd(51.4927, 24.829, -18.6596, 1.3)
	pt3dadd(52.1427, 25.479, -19.1896, 1.3)
	pt3dadd(54.7327, 25.799, -18.6596, 1.3)
	pt3dadd(56.6727, 25.479, -18.7596, 1.3)
	pt3dadd(58.2927, 25.479, -18.7596, 1.3)
	pt3dadd(60.2327, 26.119, -18.7596, 1.3)
	pt3dadd(61.2127, 27.419, -18.7596, 1.3)
	pt3dadd(62.1827, 26.769, -18.7596, 1.3)
	pt3dadd(63.4727, 27.419, -18.7596, 1.3)
	pt3dadd(64.4427, 28.069, -18.7596, 1.3)
	pt3dadd(65.7427, 29.359, -19.4996, 1.3)
	pt3dadd(68.0127, 30.329, -19.5596, 1.3)
	pt3dadd(68.3327, 31.629, -19.5596, 1.3)
	pt3dadd(68.6527, 32.919, -20.5096, 1.3)
	pt3dadd(70.6027, 33.569, -20.5096, 1.3)
	pt3dadd(71.2527, 34.869, -21.2496, 1.3)
	pt3dadd(71.8927, 35.839, -20.9296, 1.3)
	pt3dadd(72.5427, 36.479, -22.8396, 1.3)
	pt3dadd(71.8927, 37.459, -22.8396, 1.3)
	pt3dadd(73.1927, 38.429, -23.4796, 1.3)
	pt3dadd(73.5127, 39.399, -24.1096, 1.3)
	pt3dadd(73.8427, 41.019, -24.4896, 1.3)
	pt3dadd(74.8127, 41.659, -24.4896, 1.3)
	pt3dadd(75.1327, 41.659, -24.4896, 1.3)
	pt3dadd(74.8127, 43.279, -25.9196, 1.3)
	pt3dadd(74.1627, 44.739, -29.3096, 1.3)
	pt3dadd(75.7827, 46.029, -32.6996, 1.3)
	pt3dadd(76.4327, 47.329, -35.3996, 1.3)
	pt3dadd(76.7527, 48.619, -36.0396, 1.3)
	pt3dadd(79.0227, 50.889, -37.9996, 1.3)
	pt3dadd(77.7227, 52.189, -39.1096, 1.3)
	pt3dadd(78.7027, 53.799, -40.7596, 1.3)
	pt3dadd(80.6427, 54.449, -42.1296, 1.3)
	pt3dadd(80.6427, 55.749, -42.1296, 1.3)
	pt3dadd(80.6427, 57.039, -42.8796, 1.3)
	pt3dadd(80.3127, 59.629, -42.7696, 1.3)
	pt3dadd(80.3127, 60.599, -42.7696, 1.3)
	pt3dadd(79.6727, 61.899, -43.5696, 0.97)
	pt3dadd(80.9627, 62.869, -43.5696, 0.97)
	pt3dadd(80.9627, 64.489, -43.5696, 0.97)
	pt3dadd(81.9327, 65.459, -43.9896, 0.97)
	pt3dadd(81.9327, 66.749, -43.9896, 0.97)
	pt3dadd(82.5827, 68.369, -43.9896, 0.97)
	pt3dadd(83.2327, 69.019, -43.9896, 0.97)
	pt3dadd(82.9127, 69.989, -44.0996, 0.97)
	pt3dadd(82.5827, 70.959, -44.8896, 0.97)
	pt3dadd(82.5827, 72.259, -44.8896, 0.97)
	pt3dadd(82.2627, 73.229, -45.8996, 0.97)
	pt3dadd(81.6127, 74.519, -47.6496, 0.97)
	pt3dadd(81.2927, 76.469, -48.1796, 0.97)
	pt3dadd(80.6427, 77.439, -48.4896, 0.97)
	pt3dadd(79.6727, 79.059, -49.6096, 0.97)
	pt3dadd(79.9927, 80.999, -51.3596, 0.97)
	pt3dadd(80.3127, 82.289, -51.9396, 0.97)
	pt3dadd(80.6427, 83.259, -53.2596, 0.97)
	pt3dadd(81.2927, 84.239, -53.2596, 0.97)
	pt3dadd(81.9327, 85.529, -52.5796, 0.97)
	pt3dadd(81.9327, 87.469, -52.5796, 0.97)
	pt3dadd(82.9127, 89.089, -54.6396, 0.97)
	pt3dadd(84.2027, 90.389, -54.8496, 0.97)
	pt3dadd(85.5027, 90.709, -56.0696, 0.97)
	pt3dadd(87.7627, 91.359, -56.3396, 0.97)
	pt3dadd(89.7127, 92.329, -59.0396, 0.97)
	pt3dadd(90.6827, 92.979, -59.4696, 0.97)
	pt3dadd(93.5927, 94.599, -62.2196, 0.97)
	pt3dadd(95.2127, 95.569, -64.7696, 0.97)
	pt3dadd(96.5127, 97.829, -67.0396, 0.97)
	pt3dadd(98.7827, 99.129, -70.5396, 0.97)
	pt3dadd(100.403, 102.369, -72.3996, 0.97)
	pt3dadd(101.373, 104.309, -73.9296, 0.97)
	pt3dadd(102.663, 107.219, -74.4596, 0.97)
	pt3dadd(103.963, 109.159, -74.0396, 0.97)
	pt3dadd(106.233, 113.049, -74.0396, 0.97)
	pt3dadd(109.143, 117.579, -74.0896, 0.97)
	pt3dadd(113.033, 122.109, -74.2496, 0.97)
	pt3dadd(116.913, 125.349, -76.7996, 0.97)
    }
}

proc shape3d_dend1_7() {
    dend[16] {pt3dclear()
	pt3dadd(43.7227, 21.749, -16.0596, 1.3)
	pt3dadd(45.3327, 19.809, -16.9096, 1.3)
	pt3dadd(46.6327, 18.839, -17.9696, 1.3)
	pt3dadd(47.6027, 18.839, -19.4996, 1.3)
	pt3dadd(48.2527, 18.839, -19.6096, 1.3)
	pt3dadd(48.5727, 19.159, -19.8796, 1.3)
	pt3dadd(50.5227, 19.159, -21.1996, 1.3)
	pt3dadd(50.8427, 18.189, -21.6796, 1.3)
	pt3dadd(51.4927, 18.189, -23.9596, 1.3)
	pt3dadd(52.4627, 18.839, -24.1096, 1.3)
	pt3dadd(53.1127, 18.839, -26.0196, 1.3)
	pt3dadd(54.0827, 17.869, -27.2996, 1.3)
	pt3dadd(55.3827, 17.869, -28.1996, 1.3)
	pt3dadd(55.7027, 17.219, -30.0996, 1.3)
	pt3dadd(56.9927, 17.549, -33.7096, 1.3)
	pt3dadd(59.5927, 16.899, -35.9896, 1.3)
	pt3dadd(60.5627, 16.899, -35.9896, 1.3)
	pt3dadd(61.5327, 16.899, -36.1996, 1.3)
	pt3dadd(62.5027, 16.569, -37.2596, 1.3)
	pt3dadd(64.4427, 17.869, -38.5796, 1.3)
	pt3dadd(66.0627, 14.959, -39.6996, 1.3)
	pt3dadd(68.6527, 15.119, -39.7496, 1.3)
	pt3dadd(69.3027, 13.499, -42.2396, 1.3)
	pt3dadd(69.9527, 12.529, -43.9896, 1.3)
	pt3dadd(70.2727, 11.879, -44.8396, 1.3)
	pt3dadd(68.9827, 11.559, -47.7496, 1.3)
	pt3dadd(68.6527, 10.909, -47.8096, 1.3)
	pt3dadd(70.9227, 8.63901, -49.2896, 1.3)
	pt3dadd(71.8927, 8.63901, -52.2596, 1.3)
	pt3dadd(73.5127, 7.99901, -53.8996, 1.3)
	pt3dadd(76.1027, 7.99901, -56.7096, 1.3)
	pt3dadd(77.7227, 7.99901, -59.0896, 1.3)
	pt3dadd(79.0227, 6.37901, -60.5296, 1.3)
	pt3dadd(80.3127, 5.72901, -62.9096, 1.3)
	pt3dadd(81.2927, 5.40901, -64.1796, 1.3)
	pt3dadd(82.5827, 5.40901, -65.5096, 1.3)
	pt3dadd(84.5327, 5.40901, -65.6696, 1.3)
	pt3dadd(85.5027, 5.40901, -67.2596, 1.3)
	pt3dadd(86.1427, 5.40901, -69.4796, 1.3)
	pt3dadd(86.7927, 5.40901, -71.7096, 1.3)
	pt3dadd(89.0627, 5.40901, -72.5596, 1.3)
	pt3dadd(89.7127, 5.40901, -74.5196, 1.3)
	pt3dadd(90.6827, 5.40901, -75.3096, 1.3)
	pt3dadd(91.3327, 5.40901, -75.6796, 1.3)
	pt3dadd(95.5427, 5.23901, -77.0596, 1.3)
	pt3dadd(97.4827, 4.91901, -77.8596, 1.3)
	pt3dadd(99.7527, 4.91901, -80.3496, 1.3)
	pt3dadd(101.043, 5.23901, -83.1596, 1.3)
	pt3dadd(101.693, 5.23901, -84.2196, 1.3)
	pt3dadd(102.343, 4.91901, -86.2296, 1.3)
	pt3dadd(104.283, 3.94901, -88.4596, 1.3)
	pt3dadd(104.933, 3.29901, -90.3096, 1.3)
	pt3dadd(107.523, 2.32901, -92.0596, 1.3)
	pt3dadd(107.523, 2.32901, -95.0296, 1.3)
	pt3dadd(110.113, 1.02901, -95.2396, 1.3)
	pt3dadd(114.323, -1.23099, -95.5596, 1.3)
	pt3dadd(116.593, -1.88099, -96.0396, 1.3)
	pt3dadd(121.453, -4.31099, -96.4096, 1.3)
	pt3dadd(123.723, -6.25099, -97.4096, 1.3)
	pt3dadd(128.253, -8.19099, -98.8496, 1.3)
	pt3dadd(131.813, -9.16099, -99.5296, 1.3)
	pt3dadd(133.763, -10.131, -100.28, 1.3)
    }
}

proc shape3d_dend2_4() {
    dend[17] {pt3dclear()
	pt3dadd(-42.4373, -32.801, -18.2296, 1.3)
	pt3dadd(-45.6773, -32.631, -20.0296, 1.3)
	pt3dadd(-46.3273, -33.611, -20.0296, 1.3)
	pt3dadd(-48.2673, -34.581, -21.0396, 1.3)
	pt3dadd(-49.5573, -35.551, -20.6696, 1.3)
	pt3dadd(-49.2373, -37.171, -20.6196, 1.3)
	pt3dadd(-50.8573, -38.141, -20.7796, 1.3)
	pt3dadd(-51.1773, -39.111, -20.7196, 1.3)
	pt3dadd(-51.8273, -40.401, -21.3096, 1.3)
	pt3dadd(-51.8273, -41.051, -21.2496, 1.3)
	pt3dadd(-53.4473, -41.371, -20.5096, 1.3)
	pt3dadd(-54.7473, -42.021, -20.5096, 1.3)
	pt3dadd(-55.3873, -43.321, -19.6596, 1.62)
	pt3dadd(-56.3673, -44.941, -20.0296, 1.62)
	pt3dadd(-57.3373, -46.231, -21.1996, 1.62)
	pt3dadd(-59.2773, -46.881, -21.1996, 1.62)
	pt3dadd(-58.9573, -48.501, -20.6696, 1.62)
	pt3dadd(-60.2473, -49.791, -20.6196, 1.62)
	pt3dadd(-61.5473, -49.791, -20.6196, 1.62)
	pt3dadd(-62.8373, -49.791, -20.9896, 1.62)
	pt3dadd(-63.8173, -51.731, -21.0896, 1.62)
	pt3dadd(-64.7873, -52.711, -20.0896, 1.62)
	pt3dadd(-65.7573, -53.681, -19.4996, 1.62)
	pt3dadd(-66.7273, -55.301, -19.4996, 1.62)
	pt3dadd(-68.3473, -54.971, -19.4996, 1.62)
	pt3dadd(-69.3173, -54.971, -19.4996, 1.62)
	pt3dadd(-69.9673, -58.211, -18.5996, 1.3)
	pt3dadd(-70.6173, -58.211, -18.0196, 1.3)
	pt3dadd(-71.9073, -58.861, -18.0196, 1.3)
	pt3dadd(-74.1773, -58.861, -17.8596, 1.3)
	pt3dadd(-75.7973, -60.151, -17.8096, 1.3)
	pt3dadd(-77.0973, -61.771, -17.8096, 1.3)
	pt3dadd(-78.3873, -62.421, -17.7496, 1.3)
	pt3dadd(-79.3573, -62.741, -17.7496, 1.3)
	pt3dadd(-80.3273, -64.361, -17.8096, 1.3)
	pt3dadd(-82.2773, -62.741, -19.2396, 0.97)
	pt3dadd(-83.2473, -63.391, -19.6096, 0.97)
	pt3dadd(-84.5473, -63.391, -19.2896, 0.97)
	pt3dadd(-86.4873, -63.711, -19.1896, 0.97)
	pt3dadd(-87.4573, -65.331, -18.3896, 0.97)
	pt3dadd(-89.7273, -65.331, -20.4596, 0.97)
	pt3dadd(-91.0173, -66.301, -22.3696, 0.97)
	pt3dadd(-91.3473, -66.951, -22.0496, 0.97)
	pt3dadd(-93.9373, -67.271, -22.0496, 0.97)
	pt3dadd(-96.2073, -67.271, -24.1696, 0.97)
	pt3dadd(-97.8173, -67.271, -24.4296, 0.97)
	pt3dadd(-99.1173, -66.951, -25.2296, 0.97)
	pt3dadd(-100.417, -66.951, -25.3296, 0.97)
	pt3dadd(-101.387, -67.271, -26.6096, 0.97)
	pt3dadd(-102.357, -67.601, -27.6096, 0.97)
	pt3dadd(-102.357, -68.251, -29.8896, 0.97)
	pt3dadd(-103.327, -68.571, -30.7396, 0.97)
	pt3dadd(-104.627, -68.891, -31.6396, 0.97)
	pt3dadd(-105.917, -69.541, -32.1196, 0.97)
	pt3dadd(-106.887, -69.861, -33.6496, 0.97)
	pt3dadd(-109.157, -70.511, -33.7596, 0.97)
	pt3dadd(-110.777, -70.841, -33.7596, 0.97)
	pt3dadd(-111.427, -71.481, -33.7596, 0.97)
	pt3dadd(-112.397, -73.751, -33.7596, 0.97)
	pt3dadd(-113.367, -74.721, -34.3396, 0.97)
	pt3dadd(-112.077, -76.661, -34.9296, 0.97)
	pt3dadd(-112.717, -79.251, -36.0896, 0.97)
	pt3dadd(-113.047, -81.191, -37.8996, 0.97)
	pt3dadd(-113.367, -82.491, -37.8996, 0.97)
	pt3dadd(-112.077, -84.431, -38.6396, 0.97)
	pt3dadd(-112.397, -85.731, -38.6396, 0.97)
	pt3dadd(-112.077, -87.021, -38.6396, 0.97)
	pt3dadd(-113.697, -88.961, -38.7396, 0.97)
	pt3dadd(-113.047, -90.581, -38.7396, 0.97)
	pt3dadd(-113.367, -92.531, -38.7396, 0.97)
	pt3dadd(-111.747, -94.471, -39.3296, 0.97)
	pt3dadd(-112.077, -97.061, -39.3296, 0.97)
	pt3dadd(-112.397, -99.001, -39.3796, 0.97)
	pt3dadd(-113.047, -99.971, -39.4296, 0.97)
	pt3dadd(-111.747, -100.941, -40.4396, 0.97)
	pt3dadd(-112.397, -104.181, -41.0796, 0.97)
	pt3dadd(-111.747, -107.091, -41.0796, 0.97)
	pt3dadd(-112.397, -108.071, -41.0796, 0.97)
	pt3dadd(-112.077, -110.661, -41.6596, 0.97)
	pt3dadd(-112.397, -113.571, -41.6596, 0.97)
	pt3dadd(-112.717, -114.861, -41.6596, 0.97)
	pt3dadd(-113.697, -115.831, -42.0796, 0.97)
	pt3dadd(-114.667, -119.401, -42.6696, 0.97)
	pt3dadd(-114.667, -120.371, -42.6696, 0.97)
	pt3dadd(-114.987, -122.961, -43.3496, 0.97)
	pt3dadd(-115.637, -124.901, -43.6696, 0.97)
	pt3dadd(-116.607, -129.111, -43.4096, 0.97)
	pt3dadd(-117.257, -131.371, -47.0096, 0.97)
	pt3dadd(-116.927, -134.291, -47.0096, 0.97)
	pt3dadd(-116.287, -136.881, -47.6496, 0.97)
	pt3dadd(-115.957, -138.821, -48.3396, 0.97)
	pt3dadd(-114.337, -140.441, -51.5196, 0.97)
	pt3dadd(-113.697, -144.651, -55.1696, 0.97)
	pt3dadd(-112.717, -146.911, -57.7196, 0.97)
	pt3dadd(-113.047, -149.501, -59.6296, 0.97)
	pt3dadd(-115.307, -153.711, -60.3696, 0.97)
	pt3dadd(-115.307, -155.651, -61.5896, 0.97)
	pt3dadd(-115.637, -159.221, -62.8596, 0.97)
	pt3dadd(-115.307, -161.481, -65.0296, 0.97)
	pt3dadd(-114.337, -164.071, -65.5596, 0.97)
	pt3dadd(-111.427, -167.961, -68.1596, 0.97)
	pt3dadd(-109.807, -170.551, -68.9496, 0.97)
	pt3dadd(-108.837, -172.811, -72.3496, 0.97)
	pt3dadd(-106.247, -177.991, -73.5596, 0.97)
	pt3dadd(-104.627, -183.171, -75.1496, 0.97)
	pt3dadd(-104.297, -186.091, -72.6596, 0.97)
	pt3dadd(-103.007, -188.351, -75.1496, 0.97)
	pt3dadd(-102.037, -190.941, -76.0596, 0.97)
	pt3dadd(-102.677, -193.211, -77.7496, 0.97)
	pt3dadd(-103.647, -198.061, -83.6296, 0.97)
	pt3dadd(-105.597, -203.891, -83.6296, 0.97)
    }
}

proc shape3d_dend2_5() {
    dend[18] {pt3dclear()
	pt3dadd(-42.4373, -32.801, -18.2296, 1.3)
	pt3dadd(-40.4973, -34.091, -21.3096, 1.3)
	pt3dadd(-40.1673, -36.031, -22.0496, 1.3)
	pt3dadd(-40.1673, -37.331, -22.4696, 1.3)
	pt3dadd(-39.8473, -39.591, -23.0596, 1.3)
	pt3dadd(-39.5173, -40.241, -23.1596, 1.3)
	pt3dadd(-38.2273, -41.861, -23.5796, 1.3)
	pt3dadd(-38.5473, -43.481, -24.0096, 1.3)
	pt3dadd(-38.5473, -45.751, -24.1096, 1.3)
	pt3dadd(-36.9273, -47.041, -24.4896, 1.3)
	pt3dadd(-36.6073, -48.981, -24.4896, 1.3)
	pt3dadd(-34.6673, -49.951, -25.1196, 1.3)
	pt3dadd(-34.3373, -51.571, -25.1196, 1.3)
	pt3dadd(-34.3373, -53.191, -25.9196, 1.3)
	pt3dadd(-32.3973, -55.781, -27.3996, 1.3)
	pt3dadd(-31.4273, -57.721, -28.2996, 1.3)
	pt3dadd(-31.4273, -59.021, -30.5796, 1.3)
	pt3dadd(-31.7473, -60.641, -31.5896, 1.3)
	pt3dadd(-31.7473, -61.611, -32.1196, 1.3)
	pt3dadd(-30.1273, -63.551, -34.2896, 1.3)
	pt3dadd(-30.1273, -64.521, -35.5596, 1.3)
	pt3dadd(-29.8073, -65.491, -38.5296, 1.3)
	pt3dadd(-28.8373, -66.141, -38.6396, 1.3)
	pt3dadd(-30.4573, -67.441, -40.3896, 1.3)
	pt3dadd(-31.7473, -68.411, -40.8096, 1.3)
	pt3dadd(-31.4273, -69.701, -41.7096, 1.3)
	pt3dadd(-31.7473, -72.291, -42.6696, 1.3)
	pt3dadd(-30.4573, -74.561, -42.7196, 1.3)
	pt3dadd(-30.1273, -75.851, -43.6696, 1.3)
	pt3dadd(-30.7773, -77.801, -44.3096, 1.3)
	pt3dadd(-31.0973, -79.411, -44.4696, 1.3)
	pt3dadd(-32.0673, -79.411, -44.9996, 1.3)
	pt3dadd(-31.4273, -81.361, -45.6896, 1.3)
	pt3dadd(-31.4273, -83.951, -46.6396, 1.3)
	pt3dadd(-31.0973, -86.211, -46.8496, 1.3)
	pt3dadd(-30.1273, -86.861, -47.2196, 1.3)
	pt3dadd(-30.4573, -89.451, -47.2196, 1.3)
	pt3dadd(-31.4273, -91.391, -48.1796, 1.3)
	pt3dadd(-32.3973, -91.721, -48.5496, 1.3)
	pt3dadd(-32.7173, -93.331, -49.3396, 1.3)
	pt3dadd(-32.3973, -94.951, -49.3996, 1.3)
	pt3dadd(-32.3973, -97.221, -50.1896, 0.97)
	pt3dadd(-33.3673, -97.871, -50.1396, 0.97)
	pt3dadd(-33.3673, -98.841, -50.1896, 0.97)
	pt3dadd(-32.7173, -100.461, -50.1396, 0.97)
	pt3dadd(-33.3673, -103.371, -50.8296, 0.97)
	pt3dadd(-32.0673, -104.991, -50.9296, 0.97)
	pt3dadd(-30.7773, -108.231, -53.9496, 0.97)
	pt3dadd(-29.8073, -109.851, -54.4296, 0.97)
	pt3dadd(-29.8073, -111.791, -56.9196, 0.97)
	pt3dadd(-29.8073, -113.411, -57.5096, 0.97)
	pt3dadd(-29.1573, -114.381, -58.4096, 0.97)
	pt3dadd(-28.8373, -116.641, -59.0396, 0.97)
	pt3dadd(-28.8373, -118.591, -59.1496, 0.97)
	pt3dadd(-27.8573, -120.211, -59.3596, 0.97)
	pt3dadd(-27.5373, -123.771, -59.8896, 0.97)
	pt3dadd(-27.8573, -125.711, -60.2096, 0.97)
	pt3dadd(-27.5373, -127.331, -60.2096, 0.97)
	pt3dadd(-26.2373, -128.621, -60.3096, 0.97)
	pt3dadd(-26.5673, -132.831, -61.3696, 0.97)
	pt3dadd(-26.5673, -135.421, -63.5996, 0.97)
	pt3dadd(-26.2373, -137.691, -64.4496, 0.97)
	pt3dadd(-27.5373, -139.951, -65.0796, 0.97)
	pt3dadd(-28.1873, -141.901, -64.1296, 0.97)
	pt3dadd(-29.1573, -143.191, -64.1296, 0.97)
	pt3dadd(-29.1573, -145.461, -64.2396, 0.97)
	pt3dadd(-29.4773, -147.081, -64.4996, 0.97)
	pt3dadd(-30.1273, -148.051, -64.4996, 0.97)
    }
}

proc shape3d_dend3_4() {
    dend[19] {pt3dclear()
	pt3dadd(129.223, -137.201, -39.3796, 0.97)
	pt3dadd(128.573, -140.121, -37.7396, 0.97)
	pt3dadd(126.313, -144.001, -42.6696, 0.97)
	pt3dadd(125.013, -147.891, -41.5996, 0.97)
	pt3dadd(124.693, -150.151, -41.2896, 0.97)
	pt3dadd(124.043, -152.421, -36.8896, 0.97)
	pt3dadd(123.073, -155.011, -36.6796, 0.97)
	pt3dadd(122.743, -156.301, -34.3996, 0.97)
	pt3dadd(123.073, -160.511, -29.1496, 0.97)
    }
}

proc shape3d_dend3_5() {
    dend[20] {pt3dclear()
	pt3dadd(129.223, -137.201, -39.3796, 0.97)
	pt3dadd(127.283, -137.531, -41.0196, 0.97)
	pt3dadd(124.693, -136.231, -41.8696, 0.97)
	pt3dadd(122.103, -133.321, -44.7296, 0.97)
	pt3dadd(120.153, -132.021, -46.4796, 0.97)
	pt3dadd(119.183, -130.401, -49.0196, 0.97)
	pt3dadd(119.183, -129.431, -50.8796, 0.97)
    }
}

proc shape3d_dend3_6() {
    dend[21] {pt3dclear()
	pt3dadd(20.7227, 12.199, -30.2096, 1.3)
	pt3dadd(21.3727, 12.849, -32.3796, 1.3)
	pt3dadd(21.3727, 13.179, -34.1296, 1.3)
	pt3dadd(20.4027, 12.529, -37.1496, 1.3)
	pt3dadd(20.7227, 11.559, -38.5796, 1.3)
	pt3dadd(21.3727, 10.909, -38.7396, 1.3)
	pt3dadd(21.6927, 11.879, -39.7496, 1.3)
	pt3dadd(21.6927, 13.179, -41.2296, 1.3)
	pt3dadd(22.0127, 13.819, -43.2496, 1.3)
	pt3dadd(22.0127, 13.179, -45.2096, 1.3)
	pt3dadd(21.6927, 11.559, -46.2696, 1.3)
	pt3dadd(22.6627, 10.909, -47.6996, 1.3)
	pt3dadd(24.2827, 10.909, -47.9696, 1.3)
	pt3dadd(26.2327, 9.28901, -50.8796, 1.3)
	pt3dadd(26.2327, 8.96901, -52.3096, 1.3)
	pt3dadd(26.2327, 7.99901, -53.8496, 1.3)
    }
}

proc shape3d_dend3_7() {
    dend[22] {pt3dclear()
	pt3dadd(20.7227, 12.199, -30.2096, 1.94)
	pt3dadd(20.4027, 13.819, -30.2596, 1.94)
	pt3dadd(19.7527, 15.439, -30.2596, 1.94)
	pt3dadd(19.7527, 17.379, -30.4796, 1.94)
	pt3dadd(19.4227, 18.349, -30.6296, 1.3)
	pt3dadd(20.0727, 19.969, -31.6896, 1.3)
	pt3dadd(20.7227, 21.919, -31.6896, 1.3)
	pt3dadd(19.7527, 23.529, -31.9096, 1.3)
	pt3dadd(20.4027, 26.119, -32.0096, 1.3)
	pt3dadd(21.0427, 26.119, -32.0096, 1.3)
	pt3dadd(21.6927, 27.099, -32.0096, 1.3)
	pt3dadd(21.3727, 28.069, -32.0096, 1.3)
	pt3dadd(22.0127, 28.389, -32.0096, 1.3)
	pt3dadd(22.6627, 29.039, -32.0096, 1.3)
	pt3dadd(22.6627, 30.329, -32.0096, 1.3)
	pt3dadd(22.0127, 32.279, -32.0096, 1.3)
	pt3dadd(22.9927, 33.249, -32.0096, 1.3)
	pt3dadd(25.2527, 34.869, -32.0096, 1.3)
	pt3dadd(25.2527, 35.839, -32.0096, 1.3)
	pt3dadd(25.9027, 37.129, -30.8496, 1.3)
	pt3dadd(25.5827, 40.049, -30.8496, 1.3)
	pt3dadd(25.2527, 41.019, -30.7896, 1.3)
	pt3dadd(25.9027, 42.959, -30.5296, 1.3)
	pt3dadd(26.8727, 43.929, -30.5296, 1.3)
	pt3dadd(27.8427, 45.549, -30.8496, 1.3)
	pt3dadd(28.1727, 46.519, -30.8496, 1.3)
	pt3dadd(28.4927, 48.459, -30.8496, 1.3)
	pt3dadd(29.4627, 49.759, -30.0996, 1.3)
	pt3dadd(30.1127, 50.729, -30.9996, 1.3)
	pt3dadd(31.0827, 51.699, -32.1196, 1.3)
	pt3dadd(31.0827, 52.349, -33.7596, 1.3)
	pt3dadd(30.4427, 53.319, -33.7596, 1.3)
	pt3dadd(29.7927, 54.609, -33.7596, 1.3)
	pt3dadd(30.4427, 55.259, -33.9696, 1.3)
	pt3dadd(32.0627, 55.909, -32.9096, 1.3)
	pt3dadd(31.7327, 57.849, -32.2796, 1.3)
	pt3dadd(32.7027, 58.819, -32.3296, 1.3)
	pt3dadd(33.3527, 59.789, -33.4396, 1.3)
	pt3dadd(33.0327, 61.409, -33.5996, 1.3)
	pt3dadd(33.0327, 63.029, -34.7196, 1.3)
	pt3dadd(32.7027, 64.969, -35.3496, 1.3)
	pt3dadd(32.7027, 66.589, -35.3496, 1.3)
	pt3dadd(33.3527, 67.889, -35.3496, 1.3)
	pt3dadd(33.0327, 69.509, -35.3496, 1.3)
	pt3dadd(33.3527, 71.769, -35.5096, 1.3)
	pt3dadd(33.6727, 73.709, -35.8796, 1.3)
	pt3dadd(33.6727, 74.689, -36.4096, 1.3)
	pt3dadd(33.6727, 75.659, -37.2096, 1.3)
	pt3dadd(33.0327, 77.279, -37.0496, 1.3)
	pt3dadd(34.0027, 78.569, -37.0496, 1.3)
	pt3dadd(32.7027, 80.509, -36.9896, 0.97)
	pt3dadd(34.0027, 82.779, -36.9896, 0.97)
	pt3dadd(33.3527, 84.399, -37.0496, 0.97)
	pt3dadd(33.0327, 85.369, -37.5196, 0.97)
	pt3dadd(33.0327, 86.339, -37.5196, 0.97)
	pt3dadd(33.6727, 86.989, -37.5196, 0.97)
	pt3dadd(33.6727, 89.579, -38.0496, 0.97)
	pt3dadd(34.9727, 92.489, -36.9396, 1.3)
	pt3dadd(34.6527, 93.789, -37.6796, 1.3)
	pt3dadd(35.2927, 95.729, -36.2496, 1.3)
	pt3dadd(35.6227, 97.019, -36.2496, 1.3)
	pt3dadd(36.2727, 97.989, -36.2496, 1.3)
	pt3dadd(36.2727, 99.289, -36.0896, 1.3)
	pt3dadd(35.6227, 100.259, -36.0396, 1.3)
	pt3dadd(37.5627, 103.499, -36.0396, 1.3)
	pt3dadd(36.9127, 104.149, -37.4196, 1.3)
	pt3dadd(36.5927, 105.439, -35.5096, 1.3)
	pt3dadd(36.5927, 107.059, -35.5596, 1.3)
	pt3dadd(36.2727, 108.679, -35.5596, 1.3)
	pt3dadd(37.2427, 110.299, -35.3496, 1.3)
	pt3dadd(37.2427, 111.919, -34.2396, 1.3)
	pt3dadd(37.2427, 113.209, -34.2396, 1.3)
	pt3dadd(38.2127, 114.509, -33.8696, 1.3)
	pt3dadd(38.2127, 115.799, -32.8096, 1.3)
	pt3dadd(38.2127, 116.769, -33.7096, 1.3)
	pt3dadd(38.5327, 118.069, -33.6496, 1.3)
	pt3dadd(37.8927, 119.359, -33.0696, 1.3)
	pt3dadd(37.5627, 121.299, -33.0696, 1.3)
	pt3dadd(37.5627, 122.279, -33.0696, 1.3)
	pt3dadd(37.8927, 123.889, -33.0696, 1.3)
	pt3dadd(37.5627, 124.539, -33.0696, 1.3)
	pt3dadd(37.8927, 126.159, -33.0696, 1.3)
	pt3dadd(37.8927, 127.459, -32.2796, 1.3)
	pt3dadd(37.2427, 127.779, -32.3296, 1.3)
	pt3dadd(36.5927, 130.039, -34.1296, 1.3)
	pt3dadd(35.6227, 132.309, -34.1296, 1.3)
	pt3dadd(36.9127, 133.609, -34.2396, 1.3)
	pt3dadd(37.8927, 135.219, -33.8696, 1.3)
	pt3dadd(38.2127, 136.839, -33.8696, 1.3)
	pt3dadd(37.8927, 137.809, -33.8696, 1.3)
	pt3dadd(37.8927, 139.109, -33.9196, 1.3)
	pt3dadd(39.5027, 140.729, -33.9196, 1.3)
	pt3dadd(39.5027, 143.319, -33.9696, 1.3)
	pt3dadd(38.5327, 144.289, -33.9696, 1.3)
	pt3dadd(38.2127, 145.909, -34.8696, 1.3)
	pt3dadd(37.8927, 147.529, -32.8096, 1.3)
	pt3dadd(37.5627, 150.119, -32.1196, 1.3)
	pt3dadd(36.9127, 152.059, -32.1196, 1.3)
	pt3dadd(36.5927, 153.679, -32.1196, 1.3)
	pt3dadd(36.2727, 154.649, -32.1196, 1.3)
	pt3dadd(36.2727, 155.939, -32.1196, 1.3)
	pt3dadd(36.5927, 157.239, -32.1196, 1.3)
	pt3dadd(35.9427, 158.859, -32.1196, 1.3)
	pt3dadd(35.9427, 160.149, -32.1196, 1.3)
	pt3dadd(34.9727, 161.119, -32.1696, 1.3)
	pt3dadd(33.6727, 162.739, -32.3296, 1.3)
	pt3dadd(31.7327, 165.659, -32.9096, 1.3)
	pt3dadd(31.0827, 168.889, -33.4996, 1.3)
	pt3dadd(31.0827, 170.189, -33.4996, 1.3)
	pt3dadd(31.0827, 172.779, -33.4996, 1.3)
	pt3dadd(31.0827, 176.659, -34.2396, 0.65)
	pt3dadd(31.7327, 179.579, -36.3596, 0.65)
	pt3dadd(32.7027, 183.789, -36.5696, 0.65)
	pt3dadd(32.7027, 185.079, -36.7296, 0.65)
	pt3dadd(32.3827, 186.699, -37.0496, 0.65)
	pt3dadd(32.0627, 190.579, -37.9996, 0.65)
	pt3dadd(29.7927, 195.759, -37.9996, 0.65)
	pt3dadd(30.7627, 198.029, -38.3196, 0.65)
	pt3dadd(28.4927, 200.299, -38.6396, 0.65)
	pt3dadd(28.4927, 201.919, -38.6396, 0.65)
	pt3dadd(28.1727, 202.889, -38.7996, 0.65)
	pt3dadd(26.8727, 205.799, -40.3896, 0.65)
	pt3dadd(26.8727, 207.419, -40.3896, 0.65)
    }
}

proc shape3d_dend5_4() {
    dend[23] {pt3dclear()
	pt3dadd(3.23267, -45.751, 1.38039, 0.65)
	pt3dadd(2.90267, -48.341, 1.38039, 0.65)
	pt3dadd(3.23267, -51.571, 1.43039, 0.65)
	pt3dadd(2.58267, -52.541, 1.43039, 0.65)
	pt3dadd(2.26267, -53.521, 1.43039, 0.65)
	pt3dadd(3.55267, -54.491, 1.43039, 0.65)
	pt3dadd(4.20267, -56.431, 2.44039, 0.65)
    }
}

proc shape3d_dend5_5() {
    dend[24] {pt3dclear()
	pt3dadd(3.24, -45.49, 1.38, 0.97)
	pt3dadd(5.83, -47.1, 1.8, 0.97)
	pt3dadd(5.18, -48.4, 1.91, 0.97)
	pt3dadd(7.77, -49.05, 2.91, 0.97)
	pt3dadd(8.74, -50.02, 3.87, 0.97)
	pt3dadd(11.01, -52.61, 4.03, 0.97)
	pt3dadd(11.66, -54.55, 5.51, 0.97)
	pt3dadd(11.66, -55.84, 5.78, 0.97)
	pt3dadd(13.28, -57.46, 7, 0.97)
	pt3dadd(14.57, -59.08, 7.05, 0.65)
	pt3dadd(14.9, -61.02, 9.22, 0.65)
	pt3dadd(15.55, -62.32, 10.18, 0.65)
	pt3dadd(15.55, -63.61, 12.56, 0.65)
	pt3dadd(16.19, -65.23, 12.56, 0.65)
	pt3dadd(18.46, -66.53, 14.2, 0.65)
	pt3dadd(19.11, -67.18, 14.42, 0.65)
	pt3dadd(18.46, -68.15, 16.16, 0.65)
	pt3dadd(19.76, -70.09, 17.81, 0.65)
	pt3dadd(23, -72.36, 18.6, 0.65)
	pt3dadd(25.26, -74.95, 19.45, 0.65)
	pt3dadd(25.71, -75.92, 21.41, 0.65)
	pt3dadd(27.21, -77.54, 21.84, 0.65)
	pt3dadd(29.62, -79.91, 21.84, 0.97)
	pt3dadd(31.27, -82.39, 21.84, 0.97)
	pt3dadd(31.02, -83.53, 21.84, 0.97)
	pt3dadd(32.25, -85.83, 21.25, 0.97)
	pt3dadd(32.99, -88.67, 21.25, 0.97)
	pt3dadd(33.16, -90, 21.25, 0.97)
	pt3dadd(32.6, -91.25, 20.83, 0.97)
	pt3dadd(32.97, -94.92, 20.25, 0.97)
	pt3dadd(33.32, -95.83, 20.25, 0.97)
	pt3dadd(33.94, -98.36, 19.56, 0.97)
	pt3dadd(34.04, -100.41, 19.24, 0.97)
	pt3dadd(34.64, -104.69, 19.5, 0.97)
	pt3dadd(34.85, -107.03, 15.9, 0.97)
	pt3dadd(36.2, -109.64, 15.9, 0.97)
	pt3dadd(37.73, -111.82, 15.26, 0.97)
	pt3dadd(38.73, -113.52, 14.58, 0.97)
	pt3dadd(40.82, -114.45, 11.4, 0.97)
	pt3dadd(42.94, -118.14, 7.74, 0.97)
	pt3dadd(44.66, -119.91, 5.19, 0.97)
	pt3dadd(45.28, -122.44, 3.29, 0.97)
	pt3dadd(44.68, -127.19, 2.54, 0.97)
	pt3dadd(45.37, -129, 1.33, 0.97)
	pt3dadd(46.35, -132.44, 0.05, 0.97)
	pt3dadd(47.47, -134.44, -2.12, 0.97)
	pt3dadd(49.3, -136.51, -2.65, 0.97)
	pt3dadd(53.42, -139.09, -5.25, 0.97)
	pt3dadd(55.86, -140.92, -6.04, 0.97)
	pt3dadd(57.58, -142.69, -9.43, 0.97)
	pt3dadd(61.86, -146.6, -10.65, 0.97)
	pt3dadd(65.23, -150.85, -12.24, 0.97)
	pt3dadd(66.57, -153.45, -9.75, 0.97)
	pt3dadd(68.6, -155.1, -12.24, 0.97)
	pt3dadd(70.43, -157.17, -13.14, 0.97)
	pt3dadd(70.64, -159.52, -14.84, 0.97)
	pt3dadd(71.48, -164.4, -20.72, 0.97)
	pt3dadd(71.75, -170.54, -20.72, 0.97)
    }
}

proc shape3d_dend5_6() {
    dend[25] {pt3dclear()
	pt3dadd(14.5727, -48.171, -12.7196, 1.3)
	pt3dadd(13.5927, -49.951, -12.5096, 1.3)
	pt3dadd(13.9227, -51.251, -15.0496, 1.3)
	pt3dadd(14.2427, -51.901, -15.2596, 1.3)
	pt3dadd(13.9227, -53.841, -16.3796, 1.3)
    }
}

proc shape3d_dend5_7() {
    dend[26] {pt3dclear()
	pt3dadd(14.5727, -48.171, -12.7196, 1.62)
	pt3dadd(16.1827, -49.791, -13.9896, 1.62)
	pt3dadd(17.4827, -49.791, -15.3196, 1.62)
	pt3dadd(18.7827, -50.441, -15.7396, 1.62)
	pt3dadd(20.4027, -52.711, -17.6996, 1.62)
	pt3dadd(20.4027, -54.321, -18.1296, 1.62)
	pt3dadd(20.7227, -56.271, -18.8196, 1.62)
	pt3dadd(22.0127, -59.501, -18.9196, 1.62)
	pt3dadd(23.9627, -62.421, -19.4996, 1.62)
	pt3dadd(27.2027, -61.771, -22.1496, 1.62)
	pt3dadd(27.8427, -62.741, -23.2096, 1.62)
	pt3dadd(28.1727, -64.361, -23.2096, 1.62)
	pt3dadd(28.1727, -65.331, -23.4296, 1.62)
	pt3dadd(29.7927, -65.661, -25.6996, 1.62)
	pt3dadd(32.7027, -66.631, -26.0796, 1.62)
	pt3dadd(34.3227, -67.601, -26.0796, 1.62)
	pt3dadd(34.9727, -68.251, -26.2896, 1.62)
	pt3dadd(35.9427, -68.571, -25.3296, 1.62)
    }
}

proc shape3d_dend1_8() {
    dend[27] {pt3dclear()
	pt3dadd(-6.48733, 76.629, 3.39039, 0.97)
	pt3dadd(-8.10734, 77.279, 3.44039, 0.97)
	pt3dadd(-8.42733, 78.249, 3.44039, 0.97)
	pt3dadd(-9.72733, 78.889, 1.91039, 0.97)
	pt3dadd(-9.72733, 81.479, 1.70039, 0.97)
	pt3dadd(-9.72733, 82.779, 0.950385, 0.97)
	pt3dadd(-11.3473, 84.069, 0.800385, 0.97)
	pt3dadd(-11.3473, 85.049, -0.799615, 0.97)
	pt3dadd(-11.3473, 87.639, -0.799615, 0.97)
	pt3dadd(-12.3173, 87.639, -0.689615, 0.97)
	pt3dadd(-13.6073, 88.279, -0.639615, 0.97)
	pt3dadd(-13.9373, 89.579, -0.109615, 0.97)
	pt3dadd(-13.9373, 90.549, -0.109615, 0.97)
	pt3dadd(-15.5573, 92.169, -0.949615, 0.97)
	pt3dadd(-16.8473, 92.169, -0.949615, 0.97)
    }
}

proc shape3d_dend1_9() {
    dend[28] {pt3dclear()
	pt3dadd(-6.48733, 76.629, 3.39039, 0.97)
	pt3dadd(-8.10734, 79.539, 4.08039, 0.97)
	pt3dadd(-7.77733, 81.809, 4.77039, 0.97)
	pt3dadd(-8.42733, 83.749, 5.94039, 0.97)
	pt3dadd(-8.42733, 85.049, 5.94039, 0.97)
	pt3dadd(-8.75733, 86.659, 6.57039, 0.97)
	pt3dadd(-8.75733, 88.609, 7.37039, 0.97)
	pt3dadd(-8.75733, 90.549, 7.53039, 0.97)
	pt3dadd(-8.75733, 92.489, 8.11038, 0.97)
	pt3dadd(-8.10734, 95.399, 8.11038, 0.97)
	pt3dadd(-9.39734, 99.289, 8.27039, 0.97)
	pt3dadd(-8.75733, 102.199, 8.53039, 0.97)
	pt3dadd(-8.10734, 105.119, 9.06039, 0.97)
	pt3dadd(-7.13733, 107.059, 8.00039, 0.97)
	pt3dadd(-6.15733, 108.349, 8.00039, 0.97)
	pt3dadd(-5.51733, 110.939, 6.04039, 0.65)
	pt3dadd(-4.21733, 112.559, 5.62039, 0.65)
	pt3dadd(-2.92733, 116.119, 4.93039, 0.65)
	pt3dadd(-2.27733, 119.039, 3.76039, 0.65)
	pt3dadd(-1.94733, 121.299, 2.86039, 0.65)
	pt3dadd(-2.27733, 124.869, 1.91039, 0.65)
	pt3dadd(-0.657335, 125.839, 1.06039, 0.65)
	pt3dadd(-0.657335, 126.479, -0.0496147, 0.65)
    }
}

proc shape3d_dend2_6() {
    dend[29] {pt3dclear()
	pt3dadd(-30.1273, -148.051, -64.4996, 0.97)
	pt3dadd(-33.0473, -149.991, -63.8596, 0.97)
	pt3dadd(-34.3373, -150.641, -65.4596, 0.97)
	pt3dadd(-35.3073, -151.611, -66.2496, 0.97)
	pt3dadd(-35.9573, -153.551, -65.6696, 0.97)
	pt3dadd(-36.6073, -154.851, -63.9696, 0.97)
	pt3dadd(-37.9073, -156.461, -65.9296, 0.97)
	pt3dadd(-38.8773, -158.411, -66.2996, 0.97)
	pt3dadd(-39.8473, -159.701, -66.2996, 0.97)
	pt3dadd(-40.8173, -160.351, -66.6196, 0.97)
	pt3dadd(-42.7573, -161.001, -67.3596, 0.97)
	pt3dadd(-44.7073, -161.971, -67.7296, 0.97)
	pt3dadd(-46.6473, -161.641, -68.2596, 0.97)
	pt3dadd(-48.9173, -161.001, -68.7396, 0.97)
	pt3dadd(-50.8573, -161.321, -71.2796, 0.97)
	pt3dadd(-53.1273, -161.001, -71.6596, 0.97)
	pt3dadd(-55.3973, -161.001, -71.5996, 0.97)
	pt3dadd(-56.0373, -162.291, -72.0796, 0.97)
	pt3dadd(-58.3073, -162.291, -71.1296, 0.97)
	pt3dadd(-60.2473, -162.941, -71.9196, 0.97)
	pt3dadd(-60.8973, -165.851, -72.9796, 0.97)
	pt3dadd(-60.8973, -167.471, -71.4396, 0.97)
	pt3dadd(-62.5173, -168.121, -71.3896, 0.97)
	pt3dadd(-64.1373, -169.741, -71.3896, 0.97)
	pt3dadd(-66.0773, -171.681, -71.3896, 0.97)
	pt3dadd(-67.0573, -172.651, -71.3896, 0.97)
	pt3dadd(-67.6973, -173.621, -71.2296, 0.97)
	pt3dadd(-68.6673, -173.951, -71.2296, 0.97)
    }
}

proc shape3d_dend2_7() {
    dend[30] {pt3dclear()
	pt3dadd(-30.1273, -148.051, -64.4996, 0.97)
	pt3dadd(-30.7773, -151.281, -64.2396, 0.97)
	pt3dadd(-29.1573, -152.901, -64.2396, 0.97)
	pt3dadd(-27.8573, -155.491, -65.9896, 0.97)
	pt3dadd(-25.2673, -158.731, -63.2796, 0.97)
	pt3dadd(-23.9773, -161.001, -59.2496, 0.97)
	pt3dadd(-22.6773, -162.291, -58.7796, 0.97)
	pt3dadd(-22.3573, -164.881, -56.8196, 0.97)
	pt3dadd(-22.0273, -166.501, -54.8496, 0.97)
	pt3dadd(-20.4073, -169.741, -53.2096, 0.97)
	pt3dadd(-19.1173, -172.971, -52.5196, 0.97)
	pt3dadd(-19.4373, -175.891, -51.6696, 0.97)
	pt3dadd(-17.8173, -177.181, -51.6696, 0.97)
	pt3dadd(-17.4973, -178.151, -52.8896, 0.97)
	pt3dadd(-17.1773, -180.741, -52.6296, 0.97)
	pt3dadd(-19.1173, -183.331, -52.5796, 0.97)
	pt3dadd(-18.7973, -184.951, -52.9496, 0.97)
	pt3dadd(-21.0573, -187.871, -53.5796, 0.97)
	pt3dadd(-21.7073, -191.751, -54.9096, 0.97)
	pt3dadd(-23.3273, -194.021, -57.5096, 0.97)
	pt3dadd(-23.9773, -196.281, -58.4596, 0.97)
	pt3dadd(-24.6273, -197.901, -60.3096, 0.97)
	pt3dadd(-24.6273, -200.491, -62.4296, 0.97)
	pt3dadd(-24.2973, -203.081, -64.2896, 0.97)
	pt3dadd(-22.0273, -206.641, -66.7296, 0.97)
	pt3dadd(-21.0573, -208.261, -68.1596, 0.97)
	pt3dadd(-19.7673, -211.181, -70.4896, 0.97)
	pt3dadd(-16.5273, -213.771, -71.3896, 0.97)
	pt3dadd(-14.2573, -215.381, -74.4096, 0.97)
	pt3dadd(-11.3473, -218.951, -77.6396, 0.97)
	pt3dadd(-8.42734, -220.561, -80.3996, 0.97)
    }
}

proc shape3d_dend3_8() {
    dend[31] {pt3dclear()
	pt3dadd(26.2327, 7.99901, -53.8496, 1.3)
	pt3dadd(24.9327, 7.82901, -55.4896, 1.3)
	pt3dadd(23.9627, 7.50901, -58.5596, 1.3)
	pt3dadd(24.6127, 7.82901, -62.3796, 1.3)
	pt3dadd(23.3127, 8.47901, -63.3296, 1.3)
	pt3dadd(22.3427, 8.47901, -63.7596, 1.3)
	pt3dadd(22.3427, 7.82901, -67.0396, 1.3)
	pt3dadd(21.0427, 8.15901, -68.8496, 1.3)
	pt3dadd(21.0427, 9.12901, -71.1296, 1.3)
	pt3dadd(20.7227, 9.44901, -72.9296, 1.3)
	pt3dadd(20.4027, 10.099, -73.1396, 1.3)
	pt3dadd(18.1327, 10.419, -75.5296, 1.3)
	pt3dadd(16.5127, 10.749, -76.6896, 1.3)
	pt3dadd(15.5427, 10.749, -77.6996, 1.3)
	pt3dadd(14.8927, 11.719, -79.1296, 1.3)
	pt3dadd(14.2427, 12.689, -80.8196, 1.3)
	pt3dadd(12.6227, 13.339, -82.6796, 1.3)
    }
}

proc shape3d_dend3_9() {
    dend[32] {pt3dclear()
	pt3dadd(26.2327, 7.99901, -53.8496, 1.3)
	pt3dadd(26.2327, 6.69901, -55.0696, 1.3)
	pt3dadd(26.8727, 5.72901, -54.4296, 1.3)
	pt3dadd(27.8427, 5.07901, -54.4296, 1.3)
	pt3dadd(29.7927, 4.75901, -55.2296, 1.3)
	pt3dadd(30.7627, 4.10901, -56.0696, 1.3)
	pt3dadd(31.7327, 3.13901, -56.0196, 1.3)
	pt3dadd(31.0827, 1.83901, -56.0196, 1.3)
	pt3dadd(33.0327, -1.07099, -56.9196, 1.3)
	pt3dadd(35.6227, -1.72099, -58.3496, 1.3)
	pt3dadd(36.5927, -2.69099, -58.6196, 1.3)
	pt3dadd(36.9127, -4.95099, -59.5696, 1.3)
	pt3dadd(37.8927, -6.57099, -59.9996, 1.3)
	pt3dadd(39.1827, -6.90099, -60.0496, 1.3)
	pt3dadd(40.4827, -8.19099, -60.2096, 1.3)
	pt3dadd(41.1227, -10.781, -60.6796, 1.3)
	pt3dadd(43.7227, -12.081, -60.7396, 1.3)
	pt3dadd(45.9827, -15.641, -62.1696, 1.3)
	pt3dadd(47.2827, -16.611, -62.2196, 1.3)
	pt3dadd(48.2527, -18.231, -62.9596, 1.3)
	pt3dadd(48.9027, -18.871, -64.1796, 1.3)
	pt3dadd(51.4927, -19.201, -66.1396, 1.3)
	pt3dadd(51.4927, -20.171, -66.5096, 1.3)
	pt3dadd(52.4627, -21.791, -67.4696, 1.3)
	pt3dadd(54.4027, -23.731, -67.5196, 1.3)
	pt3dadd(53.7627, -26.001, -69.6396, 1.3)
	pt3dadd(54.7327, -27.941, -69.6896, 1.3)
	pt3dadd(56.0227, -29.561, -71.5496, 1.62)
	pt3dadd(58.2927, -30.851, -75.4196, 1.62)
	pt3dadd(58.6127, -33.771, -77.7996, 1.62)
	pt3dadd(60.2327, -36.361, -79.2896, 1.62)
	pt3dadd(61.5327, -37.651, -80.9296, 1.62)
	pt3dadd(62.1827, -38.621, -81.5696, 1.62)
	pt3dadd(62.5027, -38.951, -81.3496, 1.62)
    }
}

proc shape3d_dend5_8() {
    dend[33] {pt3dclear()
		pt3dadd(4.21, -56.17, 2.44, 1.3)
	pt3dadd(5.18, -59.08, 2.49, 1.3)
	pt3dadd(5.83, -60.05, 2.49, 1.3)
	pt3dadd(8.74, -61.35, 2.7, 1.3)
	pt3dadd(8.74, -62.64, 1.7, 1.3)
	pt3dadd(8.74, -64.59, 0.8, 1.3)
	pt3dadd(9.07, -65.56, 0.8, 1.3)
	pt3dadd(10.04, -67.5, 0.8, 1.3)
	pt3dadd(10.36, -67.82, -0.69, 1.3)
	pt3dadd(11.01, -70.74, -0.64, 1.3)
	pt3dadd(11.34, -72.68, -0.64, 1.3)
	pt3dadd(10.69, -74.95, -0.37, 1.3)
	pt3dadd(10.36, -76.89, -0.69, 1.3)
	pt3dadd(9.39, -77.86, -0.69, 1.3)
	pt3dadd(11.01, -81.42, -1.75, 1.3)
	pt3dadd(10.69, -82.07, -1.96, 1.3)
	pt3dadd(10.69, -84.33, -2.86, 1.3)
	pt3dadd(10.36, -85.31, -2.49, 1.3)
	pt3dadd(9.07, -87.25, -1.75, 1.3)
	pt3dadd(10.69, -88.22, -1.22, 1.3)
	pt3dadd(11.34, -88.87, -1.22, 1.3)
	pt3dadd(11.98, -90.81, -0.05, 1.3)
	pt3dadd(11.66, -92.75, -0.05, 1.3)
	pt3dadd(13.28, -95.34, -0.05, 1.3)
	pt3dadd(13.28, -96.96, 0.37, 1.3)
	pt3dadd(13.93, -97.61, 0.42, 0.97)
	pt3dadd(13.28, -98.9, 1.43, 0.97)
	pt3dadd(14.57, -99.87, 1.43, 0.97)
	pt3dadd(14.57, -100.2, 1.43, 0.97)
	pt3dadd(13.28, -103.11, 1.91, 0.97)
	pt3dadd(13.93, -103.76, 1.91, 0.97)
	pt3dadd(14.25, -105.7, 1.91, 0.97)
	pt3dadd(15.55, -108.29, 0.37, 0.97)
	pt3dadd(14.9, -109.59, 0.8, 0.97)
	pt3dadd(14.25, -110.88, 2.12, 0.97)
	pt3dadd(14.9, -112.82, 3.76, 0.97)
	pt3dadd(15.22, -113.79, 3.76, 0.97)
	pt3dadd(14.25, -116.38, 2.7, 0.97)
	pt3dadd(14.25, -117.68, 2.7, 0.97)
	pt3dadd(14.57, -120.27, 2.7, 0.97)
	pt3dadd(16.52, -123.18, 2.7, 0.97)
	pt3dadd(19.76, -125.77, 1.7, 0.97)
	pt3dadd(20.08, -128.69, 1.91, 0.97)
	pt3dadd(21.38, -130.3, 2.17, 0.97)
	pt3dadd(20.73, -132.89, 2.44, 0.97)
	pt3dadd(22.02, -133.87, 2.49, 0.97)
	pt3dadd(22.02, -136.13, 3.07, 0.97)
	pt3dadd(22.35, -138.72, 3.29, 0.97)
	pt3dadd(23.64, -140.99, 3.29, 0.97)
	pt3dadd(23.97, -143.9, 3.29, 0.97)
	pt3dadd(24.62, -146.49, 3.39, 0.97)
	pt3dadd(26.88, -147.14, 3.39, 0.97)
	pt3dadd(27.53, -148.11, 3.39, 0.97)
	pt3dadd(28.18, -150.38, 3.92, 0.97)
	pt3dadd(30.45, -153.61, 4.13, 0.97)
	pt3dadd(32.07, -156.53, 4.19, 0.97)
	pt3dadd(32.71, -157.82, 4.19, 0.97)
	pt3dadd(33.36, -160.74, 4.19, 0.97)
	pt3dadd(34.98, -164.62, 4.51, 0.97)
	pt3dadd(37.25, -167.53, 5.72, 0.97)
	pt3dadd(37.9, -168.18, 5.72, 0.97)
	pt3dadd(39.51, -169.8, 6.73, 0.97)
	pt3dadd(42.75, -171.1, 9.49, 0.97)
	pt3dadd(43.4, -172.71, 10.34, 0.97)
	pt3dadd(43.73, -174.01, 13.67, 0.97)
	pt3dadd(45.34, -174.66, 17.65, 0.97)
	pt3dadd(45.99, -175.3, 19.61, 0.97)
	pt3dadd(45.75, -176.61, 19.61, 0.97)
	pt3dadd(45.42, -178.56, 19.29, 0.97)
	pt3dadd(45.49, -179.03, 19.29, 1.62)
	pt3dadd(45.89, -180.02, 19.18, 1.62)
	pt3dadd(45.68, -181.13, 17.75, 1.62)
	pt3dadd(45.86, -183.07, 16.43, 1.62)
	pt3dadd(46.15, -184.9, 15.37, 1.62)
	pt3dadd(47, -185.47, 15.37, 1.62)
    }
}

proc shape3d_dend5_9() {
    dend[34] {pt3dclear()
		pt3dadd(4.21, -56.17, 2.44, 0.65)
	pt3dadd(5.83, -58.43, 4.45, 0.65)
	pt3dadd(6.8, -58.76, 4.88, 0.65)
	pt3dadd(6.8, -59.73, 6.09, 0.65)
	pt3dadd(7.13, -62.64, 6.31, 0.65)
	pt3dadd(8.1, -64.26, 8, 0.65)
	pt3dadd(8.74, -66.53, 8.37, 0.65)
	pt3dadd(7.77, -67.82, 9.01, 0.65)
	pt3dadd(7.77, -69.44, 10.55, 0.65)
	pt3dadd(8.1, -70.09, 12.67, 0.65)
	pt3dadd(7.77, -72.03, 13.36, 0.65)
	pt3dadd(6.48, -73.65, 15.9, 0.65)
	pt3dadd(5.51, -75.59, 17.6, 0.65)
	pt3dadd(8.1, -76.24, 19.03, 0.65)
	pt3dadd(9.72, -77.21, 21.15, 0.65)
	pt3dadd(10.36, -78.18, 21.73, 0.65)
	pt3dadd(8.48, -84.09, 21.73, 1.3)
	pt3dadd(7.5, -85.89, 21.09, 1.3)
	pt3dadd(6.9, -87.43, 20.94, 1.3)
	pt3dadd(5.94, -87.26, 20.41, 1.3)
	pt3dadd(6.24, -89.29, 20.41, 1.3)
	pt3dadd(5.79, -91.84, 19.45, 1.3)
	pt3dadd(5.71, -94.12, 19.24, 1.3)
	pt3dadd(6.56, -94.93, 18.87, 1.3)
	pt3dadd(5.79, -97.43, 18.87, 1.3)
	pt3dadd(4.49, -99.17, 17.91, 1.3)
	pt3dadd(3.48, -99.32, 17.54, 1.3)
	pt3dadd(2.88, -100.86, 16.75, 1.3)
	pt3dadd(2.91, -102.51, 16.7, 1.3)
	pt3dadd(2.52, -104.74, 15.9, 0.97)
	pt3dadd(1.45, -105.21, 15.95, 0.97)
	pt3dadd(1.28, -106.16, 15.9, 0.97)
	pt3dadd(1.64, -107.87, 15.95, 0.97)
	pt3dadd(0.49, -110.62, 15.26, 0.97)
	pt3dadd(1.48, -112.44, 15.16, 0.97)
	pt3dadd(2.19, -115.86, 12.14, 0.97)
	pt3dadd(2.87, -117.62, 11.66, 0.97)
    }
}

proc shape3d_dend5_10() {
    dend[35] {pt3dclear()
	pt3dadd(13.9227, -53.841, -16.3796, 1.3)
	pt3dadd(12.9527, -55.461, -16.2196, 1.3)
	pt3dadd(13.2727, -56.751, -16.2196, 1.3)
	pt3dadd(11.9727, -59.671, -16.6396, 1.3)
	pt3dadd(11.3327, -59.991, -17.3796, 1.3)
	pt3dadd(9.38267, -60.311, -18.9196, 1.3)
	pt3dadd(8.41267, -60.311, -18.9696, 1.3)
	pt3dadd(7.44267, -61.281, -19.6596, 1.3)
	pt3dadd(4.85267, -61.281, -19.7696, 1.3)
	pt3dadd(3.23267, -61.281, -21.8396, 1.3)
	pt3dadd(2.26267, -60.961, -21.9896, 1.3)
	pt3dadd(0.962665, -59.991, -22.8396, 1.3)
	pt3dadd(-0.00733471, -59.671, -24.2696, 1.3)
	pt3dadd(-0.977335, -59.341, -24.2196, 1.3)
	pt3dadd(-2.27733, -58.691, -25.3296, 1.3)
	pt3dadd(-3.24733, -58.051, -26.3896, 1.3)
	pt3dadd(-4.86733, -57.721, -26.6596, 1.3)
	pt3dadd(-5.83733, -57.401, -27.1396, 1.3)
	pt3dadd(-7.13733, -57.081, -27.6096, 1.3)
	pt3dadd(-8.42733, -57.401, -28.5096, 1.3)
	pt3dadd(-9.72733, -57.721, -28.5096, 1.3)
	pt3dadd(-11.3473, -58.051, -28.8296, 1.3)
	pt3dadd(-12.3173, -58.691, -29.3596, 1.3)
	pt3dadd(-13.6073, -58.691, -29.5196, 1.3)
	pt3dadd(-14.2573, -59.341, -29.7896, 1.3)
	pt3dadd(-15.2273, -60.641, -29.8396, 1.3)
	pt3dadd(-16.1973, -60.641, -29.8396, 1.3)
	pt3dadd(-17.4973, -60.641, -29.8396, 1.3)
	pt3dadd(-18.4673, -61.281, -29.8896, 1.3)
	pt3dadd(-19.7673, -61.931, -30.4796, 1.3)
	pt3dadd(-20.7373, -62.581, -31.1596, 1.3)
	pt3dadd(-22.3573, -63.231, -31.1596, 1.3)
	pt3dadd(-23.3273, -65.171, -31.4796, 1.3)
	pt3dadd(-24.9473, -65.171, -30.7896, 1.3)
	pt3dadd(-26.8873, -65.491, -30.7896, 1.3)
	pt3dadd(-29.1573, -64.851, -30.6296, 0.97)
	pt3dadd(-31.0973, -67.111, -30.3696, 0.97)
	pt3dadd(-32.7173, -66.461, -31.7496, 0.65)
	pt3dadd(-33.3673, -67.441, -31.7496, 0.65)
	pt3dadd(-34.6673, -67.441, -32.1696, 0.65)
	pt3dadd(-35.9573, -67.441, -33.2796, 0.65)
	pt3dadd(-36.9273, -67.761, -33.2796, 0.65)
	pt3dadd(-37.9073, -68.731, -33.2796, 0.65)
	pt3dadd(-40.1673, -69.701, -35.0296, 0.65)
	pt3dadd(-41.7873, -70.031, -37.2596, 0.65)
	pt3dadd(-42.7573, -70.031, -37.7896, 0.65)
	pt3dadd(-44.7073, -70.351, -38.1096, 0.65)
	pt3dadd(-46.3273, -70.351, -38.4196, 0.65)
	pt3dadd(-47.2973, -70.031, -39.0096, 0.65)
	pt3dadd(-48.5873, -69.381, -39.1696, 0.65)
	pt3dadd(-49.5673, -68.731, -39.4896, 0.65)
	pt3dadd(-52.1573, -68.731, -39.8596, 0.65)
	pt3dadd(-53.1273, -69.051, -39.8596, 0.65)
	pt3dadd(-54.4173, -69.051, -40.6496, 0.65)
	pt3dadd(-55.0673, -68.081, -42.1896, 0.65)
	pt3dadd(-56.0373, -67.761, -42.7196, 0.65)
	pt3dadd(-58.6273, -68.411, -44.7796, 0.65)
	pt3dadd(-59.2773, -67.761, -46.7996, 0.65)
	pt3dadd(-61.2273, -67.111, -48.5996, 0.65)
	pt3dadd(-62.5173, -66.791, -49.3996, 0.65)
	pt3dadd(-65.7573, -66.461, -50.3496, 0.65)
	pt3dadd(-68.0273, -65.821, -52.8396, 0.65)
	pt3dadd(-69.3173, -66.461, -54.9596, 0.65)
	pt3dadd(-70.2873, -67.441, -58.2996, 0.65)
	pt3dadd(-70.9373, -67.441, -61.3196, 0.65)
	pt3dadd(-72.8873, -67.761, -63.0696, 0.65)
	pt3dadd(-74.4973, -66.791, -70.4896, 0.65)
	pt3dadd(-75.4773, -66.461, -71.7596, 0.65)
	pt3dadd(-77.7373, -66.791, -74.0896, 0.65)
	pt3dadd(-79.3573, -67.111, -77.4296, 0.65)
	pt3dadd(-80.0073, -67.111, -78.0196, 0.65)
    }
}

proc shape3d_dend5_11() {
    dend[36] {pt3dclear()
	pt3dadd(13.9227, -53.841, -16.3796, 1.3)
	pt3dadd(14.8927, -56.431, -17.0096, 1.3)
	pt3dadd(14.8927, -57.721, -17.9696, 1.3)
	pt3dadd(13.9227, -59.021, -19.1296, 1.3)
	pt3dadd(12.6227, -59.991, -20.1896, 1.3)
	pt3dadd(11.9727, -61.611, -21.4096, 1.3)
	pt3dadd(11.0027, -62.901, -24.9596, 1.3)
	pt3dadd(9.71267, -63.551, -25.4396, 1.3)
	pt3dadd(8.74267, -63.871, -27.8196, 1.3)
	pt3dadd(7.12267, -64.521, -29.3596, 1.3)
	pt3dadd(7.12267, -65.491, -30.7896, 1.3)
	pt3dadd(8.09267, -67.761, -31.7996, 1.3)
	pt3dadd(7.44267, -69.051, -36.4596, 1.3)
	pt3dadd(8.09267, -70.671, -37.0996, 1.3)
	pt3dadd(7.12267, -71.641, -39.3296, 1.3)
	pt3dadd(6.79267, -72.291, -39.2196, 1.3)
	pt3dadd(7.76267, -73.261, -41.7096, 1.3)
	pt3dadd(7.44267, -74.231, -41.7096, 1.3)
	pt3dadd(6.79267, -76.181, -43.0396, 0.97)
	pt3dadd(6.79267, -76.181, -45.3096, 0.97)
	pt3dadd(7.76267, -76.501, -45.9996, 0.97)
	pt3dadd(7.76267, -77.151, -46.8496, 0.97)
	pt3dadd(7.12267, -79.411, -49.0796, 1.3)
	pt3dadd(5.82267, -78.771, -52.0496, 1.3)
	pt3dadd(4.52267, -79.091, -55.4396, 1.3)
	pt3dadd(4.52267, -79.741, -57.1896, 1.3)
	pt3dadd(4.20267, -81.031, -59.1496, 1.3)
	pt3dadd(4.20267, -81.681, -59.3096, 1.3)
	pt3dadd(4.20267, -82.651, -60.9996, 1.3)
	pt3dadd(3.23267, -83.301, -62.2696, 1.3)
	pt3dadd(2.91267, -83.621, -63.9696, 1.3)
	pt3dadd(2.91267, -83.621, -65.7196, 1.3)
	pt3dadd(3.88267, -83.301, -67.2596, 1.3)
	pt3dadd(4.52267, -82.981, -67.9996, 1.3)
	pt3dadd(5.17267, -82.981, -69.8496, 1.3)
	pt3dadd(5.17267, -83.951, -73.0896, 1.3)
	pt3dadd(5.82267, -83.301, -74.2496, 1.3)
	pt3dadd(6.79267, -83.951, -74.4096, 1.3)
	pt3dadd(7.12267, -83.621, -76.3696, 1.3)
	pt3dadd(8.09267, -83.301, -79.4996, 1.3)
	pt3dadd(8.41267, -83.951, -79.4996, 1.3)
	pt3dadd(9.06266, -84.591, -81.4596, 1.3)
	pt3dadd(9.71267, -85.571, -83.0996, 1.3)
	pt3dadd(10.3527, -87.511, -85.6496, 1.3)
	pt3dadd(9.06266, -90.101, -89.6196, 1.3)
	pt3dadd(9.06266, -92.361, -92.1696, 0.97)
	pt3dadd(8.74267, -93.331, -92.2696, 0.97)
	pt3dadd(7.44267, -94.631, -94.8696, 0.97)
    }
}

proc shape3d_dend5_12() {
    dend[37] {pt3dclear()
	pt3dadd(35.9427, -68.571, -25.3296, 0.97)
	pt3dadd(37.5627, -66.791, -26.2396, 0.97)
	pt3dadd(37.8927, -65.491, -26.3396, 0.97)
	pt3dadd(39.8327, -65.821, -26.8196, 0.97)
	pt3dadd(40.8027, -65.491, -26.8196, 0.97)
	pt3dadd(42.1027, -65.491, -26.8196, 0.97)
	pt3dadd(43.7227, -65.821, -26.8196, 0.97)
	pt3dadd(44.3627, -65.171, -26.8196, 0.97)
	pt3dadd(45.9827, -64.201, -26.8196, 0.97)
	pt3dadd(46.9527, -64.201, -26.8196, 0.97)
	pt3dadd(47.2827, -65.171, -27.8196, 0.97)
	pt3dadd(49.5527, -64.201, -29.9396, 0.97)
	pt3dadd(50.5227, -64.201, -31.6396, 0.97)
	pt3dadd(52.1427, -63.871, -31.6896, 0.97)
	pt3dadd(52.4627, -63.231, -31.6896, 0.97)
	pt3dadd(52.7827, -63.231, -33.1296, 0.97)
	pt3dadd(54.4027, -62.901, -33.4396, 0.97)
	pt3dadd(55.3827, -62.901, -33.7096, 0.97)
	pt3dadd(56.0227, -62.581, -34.3996, 0.97)
	pt3dadd(56.6727, -62.581, -34.7696, 0.97)
	pt3dadd(57.6427, -61.281, -35.0296, 0.97)
	pt3dadd(58.2927, -60.961, -36.0396, 0.97)
	pt3dadd(59.9127, -60.961, -36.7796, 0.97)
	pt3dadd(61.5327, -59.991, -37.6796, 0.97)
	pt3dadd(63.4727, -59.991, -37.7896, 0.97)
	pt3dadd(65.4227, -59.991, -40.0696, 0.97)
	pt3dadd(66.3927, -59.991, -40.0696, 0.97)
	pt3dadd(67.6827, -59.341, -40.0696, 0.97)
	pt3dadd(68.6527, -59.021, -40.1696, 0.97)
	pt3dadd(69.9527, -59.021, -41.6596, 0.97)
	pt3dadd(71.2527, -57.401, -42.6096, 0.97)
	pt3dadd(72.5427, -56.751, -43.2996, 0.97)
	pt3dadd(74.4827, -54.811, -43.4596, 0.97)
	pt3dadd(75.4627, -53.841, -43.4596, 0.97)
	pt3dadd(78.3727, -52.871, -44.5696, 0.97)
	pt3dadd(79.9927, -51.571, -44.5696, 0.97)
	pt3dadd(82.2627, -49.951, -45.6296, 0.97)
	pt3dadd(85.5027, -49.631, -45.6296, 0.97)
	pt3dadd(88.0927, -49.631, -45.6296, 0.97)
	pt3dadd(92.6227, -48.981, -47.2796, 0.97)
	pt3dadd(95.2127, -48.341, -49.3996, 0.97)
	pt3dadd(97.4827, -47.041, -51.2996, 0.97)
	pt3dadd(100.073, -46.071, -54.5396, 0.97)
	pt3dadd(101.043, -44.451, -55.1696, 0.97)
	pt3dadd(102.993, -42.831, -56.9696, 0.97)
	pt3dadd(107.853, -40.891, -58.8296, 0.97)
	pt3dadd(110.443, -40.241, -58.8296, 0.97)
	pt3dadd(113.353, -38.621, -64.6096, 0.97)
	pt3dadd(115.943, -36.681, -70.2796, 0.97)
	pt3dadd(117.243, -37.001, -70.4396, 0.97)
    }
}

proc shape3d_dend5_13() {
    dend[38] {pt3dclear()
	pt3dadd(35.9427, -68.571, -25.3296, 1.3)
	pt3dadd(37.8927, -70.841, -25.4396, 1.3)
	pt3dadd(40.1527, -72.131, -27.3496, 1.3)
	pt3dadd(41.7727, -72.781, -27.5596, 1.3)
	pt3dadd(42.1027, -74.071, -27.6096, 1.3)
	pt3dadd(43.0727, -74.721, -27.6096, 1.3)
	pt3dadd(45.6627, -76.011, -27.6096, 1.3)
	pt3dadd(47.6027, -76.011, -27.6696, 1.3)
	pt3dadd(48.2527, -77.631, -27.7696, 1.3)
	pt3dadd(48.5727, -78.281, -28.1396, 1.3)
	pt3dadd(50.5227, -78.281, -28.2496, 1.3)
	pt3dadd(50.5227, -78.931, -28.2496, 1.3)
	pt3dadd(51.4927, -80.871, -28.8896, 1.3)
	pt3dadd(52.1427, -81.521, -29.3596, 1.3)
	pt3dadd(53.7627, -82.811, -30.3696, 1.3)
	pt3dadd(55.7027, -82.811, -32.0596, 1.3)
	pt3dadd(56.0227, -84.431, -34.7696, 1.3)
	pt3dadd(57.3227, -85.731, -36.9396, 1.3)
	pt3dadd(59.5927, -87.991, -39.0096, 1.3)
	pt3dadd(59.5927, -89.291, -39.6396, 1.3)
	pt3dadd(61.5327, -89.611, -41.3396, 1.3)
	pt3dadd(62.1827, -90.911, -41.3396, 1.3)
	pt3dadd(63.4727, -93.501, -42.3496, 1.3)
	pt3dadd(65.4227, -94.791, -43.0896, 1.3)
	pt3dadd(67.3627, -95.761, -43.5696, 1.3)
	pt3dadd(67.6827, -98.681, -43.4096, 0.97)
	pt3dadd(68.9827, -99.651, -43.4596, 0.97)
	pt3dadd(70.2727, -101.271, -43.4596, 0.97)
	pt3dadd(71.8927, -101.271, -45.5296, 0.97)
	pt3dadd(72.5427, -103.531, -45.6296, 0.97)
	pt3dadd(73.5127, -105.151, -45.7896, 0.97)
	pt3dadd(74.4827, -106.121, -45.7896, 0.97)
	pt3dadd(74.8127, -108.391, -45.8996, 0.97)
	pt3dadd(76.1027, -110.011, -45.8996, 0.97)
	pt3dadd(77.7227, -112.601, -46.3796, 0.97)
	pt3dadd(79.3427, -114.541, -48.4896, 0.97)
	pt3dadd(79.6727, -118.101, -48.4896, 0.97)
	pt3dadd(81.2927, -121.341, -48.0696, 0.97)
	pt3dadd(82.5827, -121.991, -48.0196, 0.65)
	pt3dadd(84.2027, -124.251, -48.3896, 0.65)
	pt3dadd(87.7627, -125.551, -47.9096, 0.65)
	pt3dadd(88.4127, -126.191, -47.9096, 0.65)
	pt3dadd(90.6827, -126.841, -49.1796, 0.65)
	pt3dadd(91.6527, -128.461, -48.3396, 0.65)
	pt3dadd(93.2727, -129.431, -48.3396, 0.65)
	pt3dadd(94.8927, -130.401, -48.5496, 0.65)
	pt3dadd(95.5427, -132.021, -50.6696, 0.65)
	pt3dadd(96.1927, -133.641, -50.9296, 0.65)
	pt3dadd(97.4827, -134.611, -52.5196, 0.65)
	pt3dadd(98.4527, -135.911, -53.4796, 0.65)
	pt3dadd(99.4227, -136.551, -54.5396, 0.65)
	pt3dadd(101.043, -138.501, -58.6196, 0.65)
	pt3dadd(102.023, -140.441, -59.4696, 0.65)
	pt3dadd(103.313, -142.061, -60.3096, 0.65)
	pt3dadd(105.253, -144.001, -65.5596, 0.65)
	pt3dadd(107.203, -146.591, -69.1096, 0.65)
	pt3dadd(106.873, -147.891, -69.9596, 0.65)
	pt3dadd(106.873, -148.861, -70.9096, 0.65)
	pt3dadd(107.203, -150.151, -72.2396, 0.65)
	pt3dadd(107.523, -151.771, -76.4796, 0.65)
	pt3dadd(108.653, -152.171, -76.4796, 0.65)
    }
}

proc shape3d_dend1_10() {
    dend[39] {pt3dclear()
	pt3dadd(-16.8473, 92.169, -0.949615, 1.3)
	pt3dadd(-16.8473, 94.599, -0.899615, 1.3)
	pt3dadd(-18.1473, 95.889, -0.529615, 1.3)
	pt3dadd(-18.7973, 96.859, -0.479615, 1.3)
	pt3dadd(-19.7673, 98.159, -0.479615, 1.3)
	pt3dadd(-21.3873, 100.419, 0.640385, 1.3)
	pt3dadd(-22.0273, 103.659, -0.689615, 1.3)
	pt3dadd(-23.0073, 106.569, -2.11961, 1.3)
	pt3dadd(-23.6473, 107.549, -2.11961, 1.3)
	pt3dadd(-23.9773, 108.839, -1.21961, 1.3)
	pt3dadd(-24.2973, 110.459, -1.10961, 1.3)
	pt3dadd(-24.6273, 111.429, -1.00961, 1.3)
	pt3dadd(-24.6273, 112.399, -0.899615, 1.3)
	pt3dadd(-24.2973, 113.699, -0.739615, 1.3)
	pt3dadd(-24.6273, 116.289, -0.529615, 1.3)
	pt3dadd(-25.2673, 118.879, -0.0496147, 1.3)
	pt3dadd(-25.9173, 120.489, -2.64961, 1.3)
	pt3dadd(-26.5673, 123.079, -4.02961, 1.3)
	pt3dadd(-26.8873, 124.059, -4.65961, 1.3)
	pt3dadd(-27.2173, 125.669, -6.03961, 1.3)
	pt3dadd(-27.8573, 126.649, -6.35961, 1.3)
	pt3dadd(-28.8373, 127.939, -8.26962, 1.3)
	pt3dadd(-28.8373, 129.559, -8.84962, 1.3)
	pt3dadd(-28.5073, 130.849, -13.1396, 1.3)
	pt3dadd(-29.4773, 131.179, -14.4696, 1.3)
	pt3dadd(-29.1573, 133.439, -14.7896, 1.3)
	pt3dadd(-29.4773, 134.739, -14.8896, 1.3)
	pt3dadd(-30.7773, 135.709, -16.1596, 1.3)
	pt3dadd(-30.4573, 137.009, -16.6896, 1.3)
	pt3dadd(-31.7473, 140.079, -18.7096, 1.3)
	pt3dadd(-32.7173, 141.379, -19.0796, 1.3)
	pt3dadd(-32.7173, 142.349, -19.3996, 1.3)
	pt3dadd(-32.7173, 143.319, -20.8796, 1.3)
	pt3dadd(-32.7173, 144.289, -21.6196, 1.3)
	pt3dadd(-32.7173, 145.259, -22.6296, 1.3)
	pt3dadd(-33.3673, 146.559, -23.3696, 1.3)
	pt3dadd(-33.6873, 147.529, -25.4396, 1.3)
	pt3dadd(-35.3073, 148.169, -27.9296, 1.3)
	pt3dadd(-35.3073, 149.149, -28.1396, 1.3)
	pt3dadd(-36.2873, 150.759, -28.9396, 1.3)
	pt3dadd(-37.2573, 151.409, -28.4596, 1.3)
	pt3dadd(-37.2573, 152.379, -28.8296, 1.3)
	pt3dadd(-37.5773, 153.679, -28.8296, 1.3)
	pt3dadd(-38.8773, 154.649, -29.3596, 1.3)
	pt3dadd(-38.8773, 155.939, -29.3596, 1.3)
	pt3dadd(-39.5173, 156.919, -29.5696, 1.3)
	pt3dadd(-40.4973, 157.889, -29.5696, 1.3)
	pt3dadd(-41.7873, 158.209, -30.2096, 1.3)
	pt3dadd(-41.7873, 159.509, -30.7896, 1.3)
	pt3dadd(-42.4373, 162.099, -31.8496, 1.3)
	pt3dadd(-42.7573, 163.709, -32.6496, 1.3)
	pt3dadd(-43.0873, 165.329, -33.7096, 1.3)
	pt3dadd(-43.4073, 166.299, -34.4996, 1.3)
	pt3dadd(-44.3773, 166.949, -34.8696, 1.3)
	pt3dadd(-45.9973, 168.569, -36.4096, 1.3)
	pt3dadd(-46.3273, 170.189, -38.1596, 1.3)
	pt3dadd(-47.9473, 170.839, -38.5796, 1.3)
	pt3dadd(-49.2373, 171.159, -38.6896, 1.3)
	pt3dadd(-49.5673, 172.129, -40.4896, 1.3)
	pt3dadd(-50.5373, 173.749, -40.4896, 1.3)
	pt3dadd(-50.2073, 175.369, -42.3996, 1.3)
	pt3dadd(-51.5073, 176.989, -45.6896, 1.3)
	pt3dadd(-51.5073, 178.279, -45.8996, 1.3)
	pt3dadd(-50.8573, 179.579, -49.3996, 1.3)
	pt3dadd(-50.8573, 181.199, -52.6296, 1.3)
	pt3dadd(-51.8273, 182.329, -52.0496, 1.3)
	pt3dadd(-51.8273, 183.949, -54.4796, 1.3)
	pt3dadd(-53.7773, 185.569, -55.3796, 1.3)
	pt3dadd(-54.7473, 186.539, -56.8196, 1.3)
	pt3dadd(-57.0073, 188.799, -58.0296, 1.3)
	pt3dadd(-57.9873, 189.449, -58.4096, 1.3)
	pt3dadd(-57.9873, 191.389, -58.7196, 1.3)
	pt3dadd(-59.2773, 193.339, -59.2496, 0.97)
	pt3dadd(-58.9573, 194.629, -62.6996, 0.97)
	pt3dadd(-60.2473, 195.929, -64.1796, 0.97)
	pt3dadd(-61.8673, 197.869, -65.6696, 0.97)
	pt3dadd(-62.1973, 199.809, -66.6696, 0.97)
	pt3dadd(-61.5473, 201.749, -67.6296, 0.97)
	pt3dadd(-62.1973, 203.699, -70.8596, 0.97)
	pt3dadd(-63.4873, 206.609, -72.0296, 0.97)
	pt3dadd(-63.1673, 210.169, -72.0296, 0.97)
	pt3dadd(-64.1373, 212.759, -75.4196, 0.97)
	pt3dadd(-64.4573, 215.349, -77.9096, 0.97)
	pt3dadd(-66.7273, 218.259, -78.8096, 0.97)
	pt3dadd(-68.9973, 221.179, -77.9596, 0.97)
	pt3dadd(-71.2673, 223.119, -77.9596, 0.97)
	pt3dadd(-74.4973, 225.059, -77.9596, 0.97)
	pt3dadd(-74.8273, 228.139, -78.0196, 0.97)
	pt3dadd(-75.4773, 229.759, -78.4396, 0.97)
	pt3dadd(-76.7673, 230.729, -80.6696, 0.97)
	pt3dadd(-78.0673, 233.319, -80.7196, 0.97)
	pt3dadd(-79.6873, 235.909, -82.3596, 0.97)
    }
}

proc shape3d_dend1_11() {
    dend[40] {pt3dclear()
	pt3dadd(-16.8473, 92.169, -0.949615, 0.97)
	pt3dadd(-18.1473, 92.489, -6.08961, 0.97)
	pt3dadd(-17.4973, 91.519, -7.94961, 0.97)
	pt3dadd(-17.4973, 90.869, -9.37961, 0.97)
	pt3dadd(-17.8173, 89.899, -11.0796, 0.97)
	pt3dadd(-17.8173, 88.279, -14.0496, 0.97)
	pt3dadd(-19.1173, 87.639, -16.0596, 0.97)
	pt3dadd(-19.4373, 86.659, -16.3196, 0.97)
	pt3dadd(-19.1173, 83.749, -17.2796, 0.97)
	pt3dadd(-19.7673, 82.459, -18.8696, 0.97)
	pt3dadd(-21.0573, 80.839, -18.9196, 0.97)
	pt3dadd(-21.0573, 78.889, -19.4496, 0.97)
	pt3dadd(-23.0073, 76.629, -21.3096, 0.97)
	pt3dadd(-23.3273, 75.329, -22.5796, 0.97)
	pt3dadd(-23.9773, 73.709, -23.4796, 0.97)
	pt3dadd(-25.9173, 73.709, -26.9196, 0.97)
	pt3dadd(-26.5673, 72.739, -31.5296, 0.97)
	pt3dadd(-27.5373, 72.739, -33.0196, 0.97)
	pt3dadd(-27.8573, 72.739, -33.3396, 0.97)
	pt3dadd(-30.1273, 72.739, -36.4596, 0.97)
	pt3dadd(-31.7473, 71.769, -37.0996, 0.97)
	pt3dadd(-33.3673, 71.449, -38.8496, 0.97)
	pt3dadd(-35.9573, 71.769, -40.8096, 0.97)
	pt3dadd(-38.2273, 71.119, -44.4096, 0.97)
	pt3dadd(-39.5173, 71.769, -45.7396, 0.97)
	pt3dadd(-40.8173, 72.419, -47.0096, 0.97)
	pt3dadd(-44.3773, 72.739, -47.2796, 0.97)
	pt3dadd(-45.3473, 72.419, -49.7096, 0.97)
	pt3dadd(-48.2673, 71.769, -51.6196, 0.97)
	pt3dadd(-51.5073, 69.829, -51.9396, 0.97)
	pt3dadd(-56.6873, 69.339, -51.9396, 0.97)
	pt3dadd(-59.9273, 69.019, -56.8196, 0.97)
	pt3dadd(-60.8973, 69.989, -62.1696, 0.97)
    }
}

proc shape3d_dend2_8() {
    dend[41] {pt3dclear()
	pt3dadd(-68.6673, -173.951, -71.2296, 0.97)
	pt3dadd(-72.2373, -173.621, -71.2796, 0.97)
	pt3dadd(-75.4773, -173.621, -70.4396, 0.97)
	pt3dadd(-77.0973, -173.301, -71.1796, 0.97)
	pt3dadd(-78.7173, -173.621, -71.1796, 0.97)
	pt3dadd(-81.3073, -174.271, -70.6496, 0.97)
	pt3dadd(-82.5973, -174.921, -70.1196, 0.97)
	pt3dadd(-85.1873, -175.241, -69.6396, 0.97)
	pt3dadd(-88.1073, -174.591, -69.6396, 0.97)
	pt3dadd(-91.9873, -173.621, -69.6396, 0.97)
	pt3dadd(-94.2573, -173.621, -69.0596, 0.97)
	pt3dadd(-95.2273, -172.971, -68.8996, 0.97)
	pt3dadd(-97.1773, -174.271, -67.9996, 0.97)
	pt3dadd(-98.4673, -173.301, -67.1996, 0.97)
	pt3dadd(-99.7673, -172.971, -66.4096, 0.97)
	pt3dadd(-101.387, -173.301, -65.2996, 0.97)
	pt3dadd(-103.977, -172.971, -64.7696, 0.97)
	pt3dadd(-106.567, -172.971, -64.7696, 0.97)
	pt3dadd(-107.867, -173.621, -64.7696, 0.97)
    }
}

proc shape3d_dend2_9() {
    dend[42] {pt3dclear()
	pt3dadd(-68.6673, -173.951, -71.2296, 0.97)
	pt3dadd(-69.3173, -177.511, -68.7396, 0.97)
	pt3dadd(-70.9373, -179.131, -68.7396, 0.97)
	pt3dadd(-71.5873, -181.391, -67.6796, 0.97)
	pt3dadd(-74.8273, -183.331, -61.6896, 0.97)
	pt3dadd(-74.8273, -184.951, -59.0396, 0.97)
	pt3dadd(-75.4773, -186.251, -56.8696, 0.97)
	pt3dadd(-76.4473, -188.191, -54.2696, 0.97)
	pt3dadd(-75.4773, -191.431, -45.5296, 0.97)
	pt3dadd(-78.3873, -194.341, -45.3096, 0.97)
	pt3dadd(-80.0073, -196.281, -44.5696, 0.97)
	pt3dadd(-81.9473, -197.581, -43.0396, 0.97)
	pt3dadd(-82.5973, -199.851, -47.2796, 0.97)
	pt3dadd(-83.2473, -202.441, -47.4296, 0.97)
	pt3dadd(-84.5473, -206.971, -48.3396, 0.97)
	pt3dadd(-84.8673, -210.531, -48.7096, 0.97)
	pt3dadd(-84.2173, -213.771, -48.7096, 0.97)
	pt3dadd(-83.5673, -215.711, -50.2396, 0.97)
	pt3dadd(-83.5673, -218.951, -47.5396, 0.97)
	pt3dadd(-82.9273, -222.511, -47.1696, 0.97)
    }
}

proc shape3d_dend3_10() {
    dend[43] {pt3dclear()
	pt3dadd(62.5027, -38.951, -81.3496, 1.3)
	pt3dadd(65.4227, -39.921, -81.2496, 1.3)
	pt3dadd(67.6827, -41.861, -83.0496, 1.3)
	pt3dadd(69.9527, -43.801, -83.0996, 1.3)
	pt3dadd(71.8927, -44.131, -83.3196, 1.3)
	pt3dadd(72.8727, -44.771, -84.3796, 1.3)
	pt3dadd(76.4327, -46.071, -84.4296, 1.3)
	pt3dadd(79.9927, -48.011, -85.6996, 1.3)
	pt3dadd(82.2627, -50.601, -88.5596, 1.3)
	pt3dadd(84.2027, -51.901, -89.8296, 1.3)
	pt3dadd(86.1427, -51.901, -89.8296, 1.3)
	pt3dadd(88.4127, -50.931, -90.8896, 1.3)
	pt3dadd(90.3627, -49.951, -92.4896, 1.3)
	pt3dadd(91.9727, -50.281, -96.9896, 1.3)
	pt3dadd(93.5927, -50.601, -98.9496, 1.3)
	pt3dadd(96.1927, -52.541, -99.5896, 1.3)
	pt3dadd(97.4827, -53.521, -100.75, 1.3)
	pt3dadd(99.4227, -53.521, -102.93, 1.3)
	pt3dadd(99.4227, -54.811, -103.08, 1.3)
	pt3dadd(100.403, -55.781, -105.95, 1.3)
    }
}

proc shape3d_dend3_11() {
    dend[44] {pt3dclear()
	pt3dadd(62.51, -38.69, -81.35, 1.3)
	pt3dadd(61.86, -38.69, -82.52, 1.3)
	pt3dadd(62.19, -40.63, -83.9, 1.3)
	pt3dadd(62.83, -42.9, -84.48, 1.3)
	pt3dadd(62.19, -44.19, -85.65, 1.3)
	pt3dadd(61.54, -45.16, -85.7, 1.3)
	pt3dadd(62.19, -46.13, -85.75, 1.3)
	pt3dadd(62.19, -47.75, -86.07, 1.3)
	pt3dadd(62.51, -50.02, -87.5, 1.3)
	pt3dadd(62.83, -52.28, -88.4, 1.3)
	pt3dadd(63.48, -54.87, -89.46, 1.3)
	pt3dadd(63.48, -57.14, -90.52, 1.3)
	pt3dadd(65.75, -59.41, -90.26, 1.3)
	pt3dadd(68.02, -59.41, -92.59, 1.3)
	pt3dadd(69.96, -59.41, -99.69, 1.3)
	pt3dadd(71.26, -61.02, -102.08, 1.3)
	pt3dadd(72.88, -61.35, -103.51, 1.3)
	pt3dadd(74.82, -64.91, -105.68, 1.3)
	pt3dadd(76.76, -65.23, -109.87, 1.3)
	pt3dadd(78.71, -66.53, -107.85, 1.3)
	pt3dadd(80, -70.09, -118.4, 1.3)
	pt3dadd(80.39, -71.29, -118.4, 1.3)
	pt3dadd(80.8, -70.78, -118.4, 0.97)
	pt3dadd(82.34, -71.37, -118.67, 0.97)
	pt3dadd(83.19, -72.17, -118.67, 0.97)
    }
}

proc shape3d_dend5_14() {
    dend[45] {pt3dclear()
	pt3dadd(108.653, -152.171, -76.4796, 0.65)
	pt3dadd(109.793, -151.771, -77.1696, 0.65)
	pt3dadd(111.083, -153.061, -78.2796, 0.65)
	pt3dadd(113.683, -154.681, -78.4396, 0.65)
	pt3dadd(115.623, -155.331, -78.5496, 0.65)
	pt3dadd(117.893, -156.631, -80.0296, 0.65)
	pt3dadd(118.213, -158.241, -81.6196, 0.65)
	pt3dadd(118.213, -158.891, -82.7896, 0.65)
	pt3dadd(118.213, -161.161, -83.6896, 0.65)
	pt3dadd(118.863, -163.101, -86.7096, 0.65)
	pt3dadd(115.943, -165.371, -89.7296, 0.65)
	pt3dadd(114.003, -166.991, -93.4396, 0.65)
	pt3dadd(112.063, -169.581, -95.2896, 0.65)
	pt3dadd(111.413, -171.191, -95.2896, 0.65)
    }
}

proc shape3d_dend5_15() {
    dend[46] {pt3dclear()
	pt3dadd(108.653, -152.171, -76.4796, 1.3)
	pt3dadd(108.983, -152.171, -76.3196, 1.3)
	pt3dadd(108.653, -152.501, -81.7796, 1.3)
	pt3dadd(109.633, -154.441, -81.7796, 1.3)
	pt3dadd(109.303, -155.411, -82.8896, 1.3)
	pt3dadd(109.953, -156.061, -88.1896, 1.3)
	pt3dadd(109.953, -158.001, -88.3496, 1.3)
	pt3dadd(110.603, -159.621, -90.5796, 1.3)
	pt3dadd(111.573, -161.241, -90.7396, 1.3)
	pt3dadd(111.893, -162.531, -93.5996, 1.3)
	pt3dadd(112.223, -165.121, -90.7896, 0.97)
	pt3dadd(112.223, -167.071, -95.6696, 0.97)
	pt3dadd(113.193, -169.011, -103.03, 0.97)
	pt3dadd(111.893, -170.631, -105.74, 0.97)
	pt3dadd(110.923, -170.631, -108.44, 0.97)
	pt3dadd(109.303, -171.921, -112.78, 0.97)
	pt3dadd(107.043, -172.891, -109.5, 0.97)
	pt3dadd(105.743, -173.871, -116.28, 0.97)
    }
}

proc shape3d_dend3_12() {
    dend[47] {pt3dclear()
	pt3dadd(83.19, -72.17, -118.67, 0.97)
	pt3dadd(86.28, -73.34, -118.4, 0.97)
	pt3dadd(88.14, -72.02, -118.4, 0.97)
	pt3dadd(90.91, -71.17, -120.15, 0.97)
	pt3dadd(94.54, -69.15, -117.45, 0.97)
	pt3dadd(96.99, -68.25, -113.42, 0.97)
	pt3dadd(98.48, -67.19, -112.94, 0.97)
	pt3dadd(101.09, -67.3, -110.98, 0.97)
	pt3dadd(102.74, -67.25, -109.02, 0.97)
	pt3dadd(106.2, -66.2, -107.38, 0.97)
	pt3dadd(109.61, -65.46, -106.69, 0.97)
	pt3dadd(112.42, -66.26, -105.84, 0.97)
	pt3dadd(113.97, -64.88, -105.84, 0.97)
	pt3dadd(114.98, -64.72, -107.06, 0.97)
	pt3dadd(117.59, -64.84, -106.79, 0.97)
	pt3dadd(119.82, -67.18, -106.74, 0.97)
	pt3dadd(121.47, -67.13, -107.11, 0.97)
	pt3dadd(123.97, -69.85, -107.75, 0.97)
	pt3dadd(127.69, -71.14, -109.07, 0.97)
	pt3dadd(129.65, -73.11, -111.67, 0.97)
	pt3dadd(131.78, -74.13, -112.63, 0.97)
	pt3dadd(133.27, -75.04, -114.48, 0.97)
	pt3dadd(135.82, -75.47, -116.6, 0.97)
	pt3dadd(138.43, -75.58, -118.46, 0.97)
	pt3dadd(142.32, -73.94, -120.89, 0.97)
	pt3dadd(144.08, -73.25, -122.32, 0.97)
	pt3dadd(147.17, -72.46, -124.66, 0.97)
	pt3dadd(150.26, -69.7, -125.56, 0.97)
	pt3dadd(152.23, -67.73, -128.58, 0.97)
	pt3dadd(156.23, -65.45, -131.81, 0.97)
	pt3dadd(158.31, -62.84, -134.57, 0.97)
    }
}

proc shape3d_dend3_13() {
    dend[48] {pt3dclear()
	pt3dadd(83.19, -72.17, -118.67, 0.97)
	pt3dadd(84.62, -75.36, -118.03, 0.97)
	pt3dadd(85.04, -76.75, -119.62, 0.97)
	pt3dadd(85.84, -77.87, -120.42, 0.97)
	pt3dadd(87.65, -78.83, -119.83, 0.97)
	pt3dadd(88.82, -79.69, -118.14, 0.97)
	pt3dadd(90.2, -81.23, -120.1, 0.97)
	pt3dadd(91.95, -82.51, -120.47, 0.97)
	pt3dadd(93.07, -83.69, -120.47, 0.97)
	pt3dadd(93.54, -84.75, -120.79, 0.97)
	pt3dadd(93.86, -86.78, -121.53, 0.97)
	pt3dadd(94.49, -88.86, -121.9, 0.97)
	pt3dadd(93.85, -90.72, -122.43, 0.97)
	pt3dadd(92.83, -92.85, -122.91, 0.97)
	pt3dadd(92.83, -94.82, -125.45, 0.97)
	pt3dadd(92.13, -97, -125.82, 0.97)
	pt3dadd(91.75, -99.23, -125.77, 0.97)
	pt3dadd(92.92, -100.09, -126.25, 0.97)
	pt3dadd(92.55, -102.32, -125.29, 0.97)
	pt3dadd(92.86, -104.35, -126.09, 0.97)
	pt3dadd(95.63, -105.47, -127.15, 0.97)
	pt3dadd(97.22, -105.74, -125.61, 0.97)
	pt3dadd(97.59, -107.44, -125.56, 0.97)
	pt3dadd(98.92, -109.31, -125.56, 0.97)
	pt3dadd(100.51, -111.55, -125.56, 0.97)
	pt3dadd(101.3, -112.67, -125.56, 0.97)
	pt3dadd(102.15, -113.47, -125.4, 0.97)
	pt3dadd(102.31, -114.48, -125.4, 0.97)
    }
}

proc shape3d_dend3_14() {
    dend[49] {pt3dclear()
	pt3dadd(102.31, -114.48, -125.4, 0.97)
	pt3dadd(105.72, -115.71, -122.91, 0.97)
	pt3dadd(107.04, -117.58, -122.91, 0.97)
	pt3dadd(109.17, -118.6, -121.85, 0.97)
	pt3dadd(110.54, -122.11, -115.86, 0.97)
	pt3dadd(112.14, -122.38, -113.21, 0.97)
	pt3dadd(113.31, -123.24, -111.04, 0.97)
	pt3dadd(115.06, -124.52, -108.44, 0.97)
	pt3dadd(118.42, -124.1, -99.69, 0.97)
	pt3dadd(120.81, -127.46, -99.48, 0.97)
	pt3dadd(122.45, -129.38, -98.74, 0.97)
	pt3dadd(123.4, -131.51, -97.2, 0.97)
	pt3dadd(125.53, -132.53, -101.44, 0.97)
	pt3dadd(127.98, -133.6, -101.6, 0.97)
	pt3dadd(132.23, -135.63, -102.5, 0.97)
	pt3dadd(138.99, -136.44, -102.5, 0.97)
    }
}

proc shape3d_dend3_15() {
    dend[50] {pt3dclear()
	pt3dadd(102.31, -114.48, -125.4, 0.97)
	pt3dadd(101.4, -117.94, -125.45, 0.97)
	pt3dadd(100.86, -121.14, -124.6, 0.97)
	pt3dadd(100.27, -122.68, -125.35, 0.97)
	pt3dadd(100.32, -124.33, -125.35, 0.97)
	pt3dadd(100.53, -126.99, -124.82, 0.97)
	pt3dadd(100.95, -128.38, -124.28, 0.97)
	pt3dadd(100.84, -130.99, -123.81, 0.97)
	pt3dadd(99.71, -133.75, -123.81, 0.97)
	pt3dadd(98.11, -137.42, -123.81, 0.97)
	pt3dadd(97.73, -139.66, -123.22, 0.97)
	pt3dadd(96.93, -140.51, -123.07, 0.97)
	pt3dadd(97.89, -142.64, -122.17, 0.97)
	pt3dadd(96.71, -143.76, -121.37, 0.97)
	pt3dadd(96.18, -144.98, -120.57, 0.97)
	pt3dadd(96.23, -146.63, -119.46, 0.97)
	pt3dadd(95.48, -149.13, -118.93, 0.97)
	pt3dadd(95.04, -151.69, -118.93, 0.97)
	pt3dadd(95.47, -153.07, -118.93, 0.97)
    }
}

proc shape3d_dend5_16() {
    dend[51] {pt3dclear()
	pt3dadd(47, -185.47, 15.37, 1.3)
	pt3dadd(48.78, -186.31, 17.06, 1.3)
	pt3dadd(49.94, -186.97, 16.32, 1.3)
	pt3dadd(50.34, -189.11, 15.1, 1.3)
	pt3dadd(51.2, -189.68, 15.1, 1.3)
	pt3dadd(52.22, -189.64, 15.1, 1.3)
	pt3dadd(53.24, -189.58, 14.73, 1.3)
	pt3dadd(53.69, -190.38, 14.52, 1.3)
	pt3dadd(53.43, -191.32, 14.46, 1.3)
	pt3dadd(53.17, -192.25, 13.83, 1.3)
	pt3dadd(54.06, -193.85, 13.83, 1.3)
	pt3dadd(54.51, -194.65, 13.83, 1.3)
	pt3dadd(55, -196.48, 13.67, 1.3)
	pt3dadd(55.85, -197.05, 12.61, 1.3)
	pt3dadd(57.1, -197.4, 11.87, 1.3)
    }
}

proc shape3d_dend5_17() {
    dend[52] {pt3dclear()
	pt3dadd(47, -185.47, 15.37, 0.97)
	pt3dadd(45.05, -187.62, 15.37, 0.97)
	pt3dadd(45.01, -188.95, 14.09, 0.97)
	pt3dadd(45.46, -189.75, 12.72, 0.97)
	pt3dadd(45.11, -190.99, 11.07, 0.97)
	pt3dadd(44.93, -191.62, 10.97, 0.97)
	pt3dadd(43.95, -192.69, 10.6, 1.3)
	pt3dadd(43.51, -194.25, 9.43, 1.3)
	pt3dadd(42.94, -195.1, 9.43, 1.3)
	pt3dadd(43.22, -196.52, 9.17, 1.3)
	pt3dadd(42.64, -197.37, 8.63, 1.3)
	pt3dadd(41.26, -198.67, 6.73, 1.3)
	pt3dadd(40.83, -200.23, 5.83, 1.3)
	pt3dadd(39.34, -203.16, 5.83, 1.3)
	pt3dadd(38.36, -204.24, 0.69, 1.3)
	pt3dadd(37.11, -203.89, -2.65, 1.3)
	pt3dadd(37.29, -205.62, -3.24, 1.3)
	pt3dadd(36.72, -206.47, -2.55, 1.3)
	pt3dadd(35.38, -206.43, -3.45, 1.3)
	pt3dadd(34.14, -206.08, -3.5, 1.3)
	pt3dadd(33.21, -208.17, -4.03, 1.3)
	pt3dadd(32.19, -208.23, -4.35, 1.3)
	pt3dadd(31.17, -208.27, -4.51, 1.3)
	pt3dadd(30.9, -209.21, -5.62, 1.3)
	pt3dadd(29.62, -210.2, -6.58, 1.3)
	pt3dadd(28.51, -210.55, -7.9, 1.3)
	pt3dadd(29.23, -212.78, -9.6, 1.3)
	pt3dadd(28.12, -213.14, -9.7, 1.3)
	pt3dadd(27.24, -213.9, -10.39, 1.3)
	pt3dadd(26.74, -214.44, -11.24, 1.3)
	pt3dadd(25.96, -217.24, -11.5, 1.3)
	pt3dadd(23.43, -217.88, -11.98, 1.3)
	pt3dadd(22.09, -217.83, -13.89, 1.3)
	pt3dadd(19.9, -217.22, -15.48, 1.3)
	pt3dadd(18.97, -216.96, -16.59, 1.3)
	pt3dadd(18.4, -217.8, -22.74, 1.3)
	pt3dadd(17.38, -217.86, -23.38, 1.3)
	pt3dadd(16.48, -216.25, -24.91, 1.3)
	pt3dadd(14.83, -216.12, -27.88, 1.3)
	pt3dadd(14.22, -215.95, -33.5, 1.3)
	pt3dadd(13.81, -216.18, -34.67, 1.3)
	pt3dadd(13.55, -217.11, -35.3, 1.3)
	pt3dadd(12.7, -216.54, -35.94, 1.3)
	pt3dadd(11.55, -218.23, -37.85, 1.3)
	pt3dadd(11.5, -217.21, -38.91, 1.3)
	pt3dadd(11.02, -217.74, -41.4, 1.3)
	pt3dadd(11.28, -216.81, -46.11, 1.3)
	pt3dadd(11.9, -216.98, -52.42, 1.3)
	pt3dadd(10.61, -217.97, -56.34, 1.3)
	pt3dadd(10.44, -218.6, -58.09, 1.3)
    }
}

proc shape3d_dend5_18() {
    dend[53] {pt3dclear()
	pt3dadd(57.1, -197.4, 11.87, 1.3)
	pt3dadd(58.87, -195.88, 8.79, 1.3)
	pt3dadd(60.82, -196.09, 8.05, 1.3)
	pt3dadd(62.08, -196.44, 7.63, 1.3)
	pt3dadd(64.34, -196.74, 7.04, 1.3)
	pt3dadd(65.05, -196.6, 6.94, 1.3)
	pt3dadd(66.96, -195.8, 6.52, 1.3)
	pt3dadd(68.43, -196.55, 6.09, 1.3)
	pt3dadd(70.62, -197.16, 5.99, 1.3)
	pt3dadd(72.3, -195.95, 5.61, 1.3)
	pt3dadd(74.25, -196.17, 5.61, 1.3)
	pt3dadd(75.71, -194.56, 4.98, 1.3)
	pt3dadd(77.36, -194.68, 4.98, 1.3)
	pt3dadd(78.92, -195.12, 4.18, 1.3)
	pt3dadd(81.94, -193.96, 2.7, 1.3)
	pt3dadd(84.07, -193.55, 1.8, 1.3)
	pt3dadd(85.32, -193.9, -0.48, 1.3)
	pt3dadd(86.79, -194.65, -1.49, 1.3)
	pt3dadd(87.73, -194.91, -2.02, 1.3)
	pt3dadd(90.03, -193.87, -4.19, 1.3)
	pt3dadd(90.97, -194.14, -5.46, 1.3)
	pt3dadd(91.99, -194.09, -8.43, 1.3)
	pt3dadd(92.88, -193.33, -8.54, 1.3)
	pt3dadd(93.69, -195.24, -10.29, 1.3)
	pt3dadd(94.27, -196.75, -10.71, 1.3)
	pt3dadd(95.6, -196.79, -11.61, 1.3)
	pt3dadd(98.01, -197.8, -11.61, 1.3)
	pt3dadd(100.54, -197.17, -11.66, 1.3)
	pt3dadd(101.88, -197.2, -12.61, 1.3)
	pt3dadd(103.58, -198.36, -13.25, 1.3)
	pt3dadd(105.04, -199.1, -13.41, 1.3)
	pt3dadd(104.78, -200.04, -13.94, 1.3)
	pt3dadd(106.83, -199.95, -14.63, 1.3)
	pt3dadd(109.32, -200.65, -14.63, 1.3)
    }
}

proc shape3d_dend5_19() {
    dend[54] {pt3dclear()
	pt3dadd(57.1, -197.4, 11.87, 1.3)
	pt3dadd(56.06, -200.47, 10.07, 1.3)
	pt3dadd(56.83, -201.36, 10.07, 1.3)
	pt3dadd(57.24, -203.49, 9.06, 1.3)
	pt3dadd(57.82, -205, 9.43, 1.3)
	pt3dadd(59.47, -205.13, 9.48, 1.3)
	pt3dadd(59.96, -206.95, 9.32, 1.3)
	pt3dadd(60.81, -207.52, 9.38, 1.3)
	pt3dadd(61.87, -208.5, 8.79, 1.3)
	pt3dadd(62.5, -208.67, 8.85, 1.3)
	pt3dadd(62.37, -210.32, 9.59, 1.3)
	pt3dadd(62.64, -211.74, 9.59, 1.3)
	pt3dadd(63.72, -212.71, 10.44, 1.62)
	pt3dadd(65.02, -214.09, 10.07, 1.62)
	pt3dadd(65.99, -215.38, 8.9, 1.62)
	pt3dadd(66.09, -217.42, 8.9, 1.62)
	pt3dadd(67.74, -217.55, 9.43, 1.62)
    }
}

proc shape3d_dend1() {
    shape3d_dend1_1()
    shape3d_dend1_2()
    shape3d_dend1_3()
    shape3d_dend1_4()
    shape3d_dend1_5()
    shape3d_dend1_6()
    shape3d_dend1_7()
    shape3d_dend1_8()
    shape3d_dend1_9()
    shape3d_dend1_10()
    shape3d_dend1_11()
}

proc shape3d_dend2() {
    shape3d_dend2_1()
    shape3d_dend2_2()
    shape3d_dend2_3()
    shape3d_dend2_4()
    shape3d_dend2_5()
    shape3d_dend2_6()
    shape3d_dend2_7()
    shape3d_dend2_8()
    shape3d_dend2_9()
}

proc shape3d_dend3() {
    shape3d_dend3_1()
    shape3d_dend3_2()
    shape3d_dend3_3()
    shape3d_dend3_4()
    shape3d_dend3_5()
    shape3d_dend3_6()
    shape3d_dend3_7()
    shape3d_dend3_8()
    shape3d_dend3_9()
    shape3d_dend3_10()
    shape3d_dend3_11()
    shape3d_dend3_12()
    shape3d_dend3_13()
    shape3d_dend3_14()
    shape3d_dend3_15()
}

proc shape3d_dend5() {
    shape3d_dend5_1()
    shape3d_dend5_2()
    shape3d_dend5_3()
    shape3d_dend5_4()
    shape3d_dend5_5()
    shape3d_dend5_6()
    shape3d_dend5_7()
    shape3d_dend5_8()
    shape3d_dend5_9()
    shape3d_dend5_10()
    shape3d_dend5_11()
    shape3d_dend5_12()
    shape3d_dend5_13()
    shape3d_dend5_14()
    shape3d_dend5_15()
    shape3d_dend5_16()
    shape3d_dend5_17()
    shape3d_dend5_18()
    shape3d_dend5_19()
}

proc basic_shape() {
    shape3d_soma()
    shape3d_dend1()
    shape3d_dend2()
    shape3d_dend3()
    shape3d_dend4()
    shape3d_dend5()
}

objref all
proc subset_all() { local i
    objref all
    all = new SectionList()
    soma all.append()
    for i=0, 54 dend[i] all.append()
}

objref dendall
proc subset_dendall() {local i
    objref dendall
    dendall = new SectionList()
    for i=0, 54 dend[i] dendall.append()
}

objref dend1
proc subset_dend1() {
    objref dend1
    dend1 = new SectionList()
    dend[0] dend1.append()
    dend[5] dend1.append()
    dend[6] dend1.append()
    dend[13] dend1.append()
    dend[14] dend1.append()
    dend[15] dend1.append()
    dend[16] dend1.append()
    dend[27] dend1.append()
    dend[28] dend1.append()
    dend[39] dend1.append()
    dend[40] dend1.append()
}

objref dend2
proc subset_dend2() {
    objref dend2
    dend2 = new SectionList()
    dend[1] dend2.append()
    dend[7] dend2.append()
    dend[8] dend2.append()
    dend[17] dend2.append()
    dend[18] dend2.append()
    dend[29] dend2.append()
    dend[30] dend2.append()
    dend[41] dend2.append()
    dend[42] dend2.append()
}

objref dend3
proc subset_dend3() {
    objref dend3
    dend3 = new SectionList()
    dend[2] dend3.append()
    dend[9] dend3.append()
    dend[10] dend3.append()
    dend[19] dend3.append()
    dend[20] dend3.append()
    dend[21] dend3.append()
    dend[22] dend3.append()
    dend[31] dend3.append()
    dend[32] dend3.append()
    dend[43] dend3.append()
    dend[44] dend3.append()
    dend[47] dend3.append()
    dend[48] dend3.append()
    dend[49] dend3.append()
    dend[50] dend3.append()
}

objref dend4
proc subset_dend4() {
    objref dend4
    dend4 = new SectionList()
    dend[3] dend4.append()
}

objref dend5
proc subset_dend5() {
    objref dend5
    dend5 = new SectionList()
    dend[4] dend5.append()
    dend[11] dend5.append()
    dend[12] dend5.append()
    dend[23] dend5.append()
    dend[24] dend5.append()
    dend[25] dend5.append()
    dend[26] dend5.append()
    dend[33] dend5.append()
    dend[34] dend5.append()
    dend[35] dend5.append()
    dend[36] dend5.append()
    dend[37] dend5.append()
    dend[38] dend5.append()
    dend[45] dend5.append()
    dend[46] dend5.append()
    dend[51] dend5.append()
    dend[52] dend5.append()
    dend[53] dend5.append()
    dend[54] dend5.append()
}

proc subsets() {
    subset_all()
    subset_dendall()
    subset_dend1()
    subset_dend2()
    subset_dend3()
    subset_dend4()
    subset_dend5()
}

proc geomL() {
    soma.L=shortR
}

proc geom() {
    //soma
    soma.diam(0:0.000582072)=0:0.730266669
    soma.diam(0.000582072:0.034342258)=0.730266669:5.513730439
    soma.diam(0.034342258:0.092549476)=5.513730439:8.77441055
    soma.diam(0.092549476:0.150756694)=8.77441055:10.83362651
    soma.diam(0.150756694:0.208963912)=10.83362651:12.30986482
    soma.diam(0.208963912:0.267171129)=12.30986482:13.39724622
    soma.diam(0.267171129:0.325378347)=13.39724622:14.1854773
    soma.diam(0.325378347:0.383585565)=14.1854773:14.72268494
    soma.diam(0.383585565:0.441792782)=14.72268494:15.03579939
    soma.diam(0.441792782:0.5)=15.03579939:15.1387318
    soma.diam(0.5:0.558207218)=15.1387318:15.03579939
    soma.diam(0.558207218:0.616414435)=15.03579939:14.72268494
    soma.diam(0.616414435:0.674621653)=14.72268494:14.1854773
    soma.diam(0.674621653:0.732828871)=14.1854773:13.39724622
    soma.diam(0.732828871:0.791036088)=13.39724622:12.30986482
    soma.diam(0.791036088:0.849243306)=12.30986482:10.83362651
    soma.diam(0.849243306:0.907450524)=10.83362651:8.77441055
    soma.diam(0.907450524:0.965657742)=8.77441055:5.513730439
    soma.diam(0.965657742:0.999417928)=5.513730439:0.730266669
    soma.diam(0.999417928:1)=0.730266669:0
    //dend1
    dend[0].diam(0:1)=1.051236835:1.214227215
    dend[5].diam(0:1)=0.807523824:0.802934085
    dend[6].diam(0:1)=0.847257983:0.649663961
    dend[13].diam(0:0.475852237)=0.743625135:0.633109207
    dend[13].diam(0.475852237:1)=0.633109207:0.699361307
    dend[14].diam(0:1)=0.383055217:0.234534635
    dend[15].diam(0:1)=0.50294183:0.234534635
    dend[16].diam(0:1)=0.47341237:0.234534635
    dend[27].diam(0:1)=0.651997474:0.630713743
    dend[28].diam(0:1)=0.344981198:0.234534635
    dend[39].diam(0:1)=0.538121671:0.234534635
    dend[40].diam(0:1)=0.404019044:0.234534635
    //dend2
    dend[1].diam(0:1)=1.009569093:1.163002623
    dend[7].diam(0:1)=0.706358148:0.717483245
    dend[8].diam(0:0.154677997)=0.426612393:0.360693245
    dend[8].diam(0.154677997:0.611083384)=0.360693245:0.382923081
    dend[8].diam(0.611083384:1)=0.382923081:0.234534635
    dend[17].diam(0:0.201923492)=0.620352039:0.483183501
    dend[17].diam(0.201923492:0.376568599)=0.483183501:0.437668592
    dend[17].diam(0.376568599:0.551213706)=0.437668592:0.234000104
    dend[17].diam(0.551213706:0.757370864)=0.234000104:0.294080377
    dend[17].diam(0.757370864:1)=0.294080377:0.234534635
    dend[18].diam(0:0.430085029)=0.645083623:0.543420893
    dend[18].diam(0.430085029:0.672153098)=0.543420893:0.472576727
    dend[18].diam(0.672153098:1)=0.472576727:0.60623949
    dend[29].diam(0:1)=0.50287265:0.432414704
    dend[30].diam(0:1)=0.411888228:0.234534635
    dend[41].diam(0:1)=0.321047185:0.234534635
    dend[42].diam(0:1)=0.372716616:0.234534635
    //dend3
    dend[2].diam(0:1)=1.146045537:1.498043934
    dend[9].diam(0:1)=0.798419762:0.338215718
    dend[10].diam(0:1)=1.229907412:0.918062494
    dend[19].diam(0:1)=0.305444515:0.234534635
    dend[20].diam(0:1)=0.275862312:0.234534635
    dend[21].diam(0:1)=0.811208099:0.789860313
    dend[22].diam(0:1)=0.594439527:0.234534635
    dend[31].diam(0:1)=0.309356077:0.234534635
    dend[32].diam(0:1)=0.763665258:0.705803999
    dend[43].diam(0:1)=0.343695453:0.234534635
    dend[44].diam(0:1)=0.659575026:0.59636197
    dend[47].diam(0:1)=0.411877505:0.234534635
    dend[48].diam(0:1)=0.490928727:0.418466902
    dend[49].diam(0:1)=0.356430784:0.234534635
    dend[50].diam(0:1)=0.321057844:0.234534635
    //dend4
    dend[3].diam(0:1)=0.290188003:0.234534635
    //dend5
    dend[4].diam(0:1)=1.270580641:1.320743594
    dend[11].diam(0:1)=1.141443513:0.768999302
    dend[12].diam(0:1)=0.974730866:0.98572042
    dend[23].diam(0:1)=0.481405486:0.710743636
    dend[24].diam(0:1)=0.50552646:0.234534635
    dend[25].diam(0:1)=0.744201776:0.748993068
    dend[26].diam(0:0.131604218)=0.599432781:0.479428377
    dend[26].diam(0.131604218:1)=0.479428377:0.675859049
    dend[33].diam(0:1)=0.711012298:0.56437725
    dend[34].diam(0:1)=0.388903046:0.234534635
    dend[35].diam(0:0.296722685)=0.541348064:0.33354056
    dend[35].diam(0.296722685:0.711551642)=0.33354056:0.289270734
    dend[35].diam(0.711551642:1)=0.289270734:0.234534635
    dend[36].diam(0:0.48652424)=0.374508009:0.546821672
    dend[36].diam(0.48652424:1)=0.546821672:0.234534635
    dend[37].diam(0:0.133765862)=0.426034166:0.407800977
    dend[37].diam(0.133765862:1)=0.407800977:0.234534635
    dend[38].diam(0:0.102947875)=0.574705871:0.583048922
    dend[38].diam(0.102947875:0.453972819)=0.583048922:0.414760318
    dend[38].diam(0.453972819:1)=0.414760318:0.410028204
    dend[45].diam(0:1)=0.309726085:0.234534635
    dend[46].diam(0:1)=0.356650215:0.234534635
    dend[51].diam(0:1)=0.435121591:0.407612789
    dend[52].diam(0:1)=0.429182218:0.234534635
    dend[53].diam(0:1)=0.366030525:0.234534635
    dend[54].diam(0:1)=0.295256389:0.234534635
}

proc geom_nseg() {
    soma area(0.5) // make sure diam reflects 3d points
    //    forsec all { nseg = int((L/(0.1*lambda_f(100))+.9)/2)*2 + 1  }
    forsec dendall { nseg = int((L/1 + .9)/2)*2 + 1  }
    soma {nseg = (int((L/1 + .9)/2)*2 + 1)*10 }
}

proc biophys() {
    e_pas_default = -63
    forsec all {
	Ra = Ra_default
	insert pas
	e_pas=e_pas_default
    }
    //soma
    soma.g_pas=g_pas_default*1.242647966
    soma.cm=cm_default*1.242647966
    //dend1
    dend[0].g_pas(0:1)=g_pas_default*1.501612189:g_pas_default*1.327722516
    dend[5].g_pas(0:1)=g_pas_default*1.442660041:g_pas_default*1.305854614
    dend[6].g_pas(0:1)=g_pas_default*1.244896451:g_pas_default*1.219398021
    dend[13].g_pas(0:0.475852237)=g_pas_default*1.267999296:g_pas_default*1.084309297
    dend[13].g_pas(0.475852237:1)=g_pas_default*1.084309297:g_pas_default*1.24310966
    dend[14].g_pas(0:1)=g_pas_default*1.240605664:g_pas_default*1.575978066
    dend[15].g_pas(0:1)=g_pas_default*1.188022667:g_pas_default*1.575978066
    dend[16].g_pas(0:1)=g_pas_default*1.192013833:g_pas_default*1.575978066
    dend[27].g_pas(0:1)=g_pas_default*1.220397112:g_pas_default*1.211746931
    dend[28].g_pas(0:1)=g_pas_default*1.285021924:g_pas_default*1.575978066
    dend[39].g_pas(0:1)=g_pas_default*1.188709849:g_pas_default*1.575978066
    dend[40].g_pas(0:1)=g_pas_default*1.22325014:g_pas_default*1.575978066
    dend[0].cm(0:1)=cm_default*1.501612189:cm_default*1.327722516
    dend[5].cm(0:1)=cm_default*1.442660041:cm_default*1.305854614
    dend[6].cm(0:1)=cm_default*1.244896451:cm_default*1.219398021
    dend[13].cm(0:0.475852237)=cm_default*1.267999296:cm_default*1.084309297
    dend[13].cm(0.475852237:1)=cm_default*1.084309297:cm_default*1.24310966
    dend[14].cm(0:1)=cm_default*1.240605664:cm_default*1.575978066
    dend[15].cm(0:1)=cm_default*1.188022667:cm_default*1.575978066
    dend[16].cm(0:1)=cm_default*1.192013833:cm_default*1.575978066
    dend[27].cm(0:1)=cm_default*1.220397112:cm_default*1.211746931
    dend[28].cm(0:1)=cm_default*1.285021924:cm_default*1.575978066
    dend[39].cm(0:1)=cm_default*1.188709849:cm_default*1.575978066
    dend[40].cm(0:1)=cm_default*1.22325014:cm_default*1.575978066
    //dend2
    dend[1].g_pas(0:1)=g_pas_default*1.465667306:g_pas_default*1.406959368
    dend[7].g_pas(0:1)=g_pas_default*1.132649188:g_pas_default*1.470350954
    dend[8].g_pas(0:0.154677997)=g_pas_default*1.204879094:g_pas_default*1.095934901
    dend[8].g_pas(0.154677997:0.611083384)=g_pas_default*1.095934901:g_pas_default*1.092155227
    dend[8].g_pas(0.611083384:1)=g_pas_default*1.092155227:g_pas_default*1.575978066
    dend[17].g_pas(0:0.201923492)=g_pas_default*1.470208677:g_pas_default*1.522293911
    dend[17].g_pas(0.201923492:0.376568599)=g_pas_default*1.522293911:g_pas_default*1.099735212
    dend[17].g_pas(0.376568599:0.551213706)=g_pas_default*1.099735212:g_pas_default*1.13536325
    dend[17].g_pas(0.551213706:0.757370864)=g_pas_default*1.13536325:g_pas_default*1.134497063
    dend[17].g_pas(0.757370864:1)=g_pas_default*1.134497063:g_pas_default*1.575978066
    dend[18].g_pas(0:0.430085029)=g_pas_default*1.296123063:g_pas_default*1.117597282
    dend[18].g_pas(0.430085029:0.672153098)=g_pas_default*1.117597282:g_pas_default*1.560421668
    dend[18].g_pas(0.672153098:1)=g_pas_default*1.560421668:g_pas_default*1.203175971
    dend[29].g_pas(0:1)=g_pas_default*1.188026804:g_pas_default*1.206156979
    dend[30].g_pas(0:1)=g_pas_default*1.217825629:g_pas_default*1.575978066
    dend[41].g_pas(0:1)=g_pas_default*1.323657416:g_pas_default*1.575978066
    dend[42].g_pas(0:1)=g_pas_default*1.250883232:g_pas_default*1.575978066
    dend[1].cm(0:1)=cm_default*1.465667306:cm_default*1.406959368
    dend[7].cm(0:1)=cm_default*1.132649188:cm_default*1.470350954
    dend[8].cm(0:0.154677997)=cm_default*1.204879094:cm_default*1.095934901
    dend[8].cm(0.154677997:0.611083384)=cm_default*1.095934901:cm_default*1.092155227
    dend[8].cm(0.611083384:1)=cm_default*1.092155227:cm_default*1.575978066
    dend[17].cm(0:0.201923492)=cm_default*1.470208677:cm_default*1.522293911
    dend[17].cm(0.201923492:0.376568599)=cm_default*1.522293911:cm_default*1.099735212
    dend[17].cm(0.376568599:0.551213706)=cm_default*1.099735212:cm_default*1.13536325
    dend[17].cm(0.551213706:0.757370864)=cm_default*1.13536325:cm_default*1.134497063
    dend[17].cm(0.757370864:1)=cm_default*1.134497063:cm_default*1.575978066
    dend[18].cm(0:0.430085029)=cm_default*1.296123063:cm_default*1.117597282
    dend[18].cm(0.430085029:0.672153098)=cm_default*1.117597282:cm_default*1.560421668
    dend[18].cm(0.672153098:1)=cm_default*1.560421668:cm_default*1.203175971
    dend[29].cm(0:1)=cm_default*1.188026804:cm_default*1.206156979
    dend[30].cm(0:1)=cm_default*1.217825629:cm_default*1.575978066
    dend[41].cm(0:1)=cm_default*1.323657416:cm_default*1.575978066
    dend[42].cm(0:1)=cm_default*1.250883232:cm_default*1.575978066
    //dend3
    dend[2].g_pas(0:1)=g_pas_default*1.586657802:g_pas_default*1.614406371
    dend[9].g_pas(0:1)=g_pas_default*1.634626724:g_pas_default*1.294993344
    dend[10].g_pas(0:1)=g_pas_default*1.242493245:g_pas_default*1.167927066
    dend[19].g_pas(0:1)=g_pas_default*1.354429275:g_pas_default*1.575978066
    dend[20].g_pas(0:1)=g_pas_default*1.427906364:g_pas_default*1.575978066
    dend[21].g_pas(0:1)=g_pas_default*1.359144531:g_pas_default*1.297117394
    dend[22].g_pas(0:1)=g_pas_default*1.240597758:g_pas_default*1.575978066
    dend[31].g_pas(0:1)=g_pas_default*1.346253095:g_pas_default*1.575978066
    dend[32].g_pas(0:1)=g_pas_default*1.280261743:g_pas_default*1.246529068
    dend[43].g_pas(0:1)=g_pas_default*1.286863127:g_pas_default*1.575978066
    dend[44].g_pas(0:1)=g_pas_default*1.223723766:g_pas_default*1.200172607
    dend[47].g_pas(0:1)=g_pas_default*1.217832644:g_pas_default*1.575978066
    dend[48].g_pas(0:1)=g_pas_default*1.189094949:g_pas_default*1.213708773
    dend[49].g_pas(0:1)=g_pas_default*1.269682766:g_pas_default*1.575978066
    dend[50].g_pas(0:1)=g_pas_default*1.323638012:g_pas_default*1.575978066
    dend[2].cm(0:1)=cm_default*1.586657802:cm_default*1.614406371
    dend[9].cm(0:1)=cm_default*1.634626724:cm_default*1.294993344
    dend[10].cm(0:1)=cm_default*1.242493245:cm_default*1.167927066
    dend[19].cm(0:1)=cm_default*1.354429275:cm_default*1.575978066
    dend[20].cm(0:1)=cm_default*1.427906364:cm_default*1.575978066
    dend[21].cm(0:1)=cm_default*1.359144531:cm_default*1.297117394
    dend[22].cm(0:1)=cm_default*1.240597758:cm_default*1.575978066
    dend[31].cm(0:1)=cm_default*1.346253095:cm_default*1.575978066
    dend[32].cm(0:1)=cm_default*1.280261743:cm_default*1.246529068
    dend[43].cm(0:1)=cm_default*1.286863127:cm_default*1.575978066
    dend[44].cm(0:1)=cm_default*1.223723766:cm_default*1.200172607
    dend[47].cm(0:1)=cm_default*1.217832644:cm_default*1.575978066
    dend[48].cm(0:1)=cm_default*1.189094949:cm_default*1.213708773
    dend[49].cm(0:1)=cm_default*1.269682766:cm_default*1.575978066
    dend[50].cm(0:1)=cm_default*1.323638012:cm_default*1.575978066
    //dend4
    dend[3].g_pas(0:1)=g_pas_default*1.38958599:g_pas_default*1.575978066
    dend[3].cm(0:1)=cm_default*1.38958599:cm_default*1.575978066
    //dend5
    dend[4].g_pas(0:1)=g_pas_default*1.703834467:g_pas_default*1.370767232
    dend[11].g_pas(0:1)=g_pas_default*1.282984784:g_pas_default*1.299943158
    dend[12].g_pas(0:1)=g_pas_default*1.526042981:g_pas_default*1.251994025
    dend[23].g_pas(0:1)=g_pas_default*1.278514711:g_pas_default*1.26081402
    dend[24].g_pas(0:1)=g_pas_default*1.73265483:g_pas_default*1.575978066
    dend[25].g_pas(0:1)=g_pas_default*1.696816047:g_pas_default*1.18738336
    dend[26].g_pas(0:0.131604218)=g_pas_default*1.355063586:g_pas_default*1.137654791
    dend[26].g_pas(0.131604218:1)=g_pas_default*1.137654791:g_pas_default*1.231282167
    dend[33].g_pas(0:1)=g_pas_default*1.430784906:g_pas_default*1.192457247
    dend[34].g_pas(0:1)=g_pas_default*1.209412583:g_pas_default*1.575978066
    dend[35].g_pas(0:0.296722685)=g_pas_default*1.049212172:g_pas_default*1.027352642
    dend[35].g_pas(0.296722685:0.711551642)=g_pas_default*1.027352642:g_pas_default*1.08038351
    dend[35].g_pas(0.711551642:1)=g_pas_default*1.08038351:g_pas_default*1.575978066
    dend[36].g_pas(0:0.48652424)=g_pas_default*1.280997781:g_pas_default*1.159817509
    dend[36].g_pas(0.48652424:1)=g_pas_default*1.159817509:g_pas_default*1.575978066
    dend[37].g_pas(0:0.133765862)=g_pas_default*1.209419774:g_pas_default*1.096589762
    dend[37].g_pas(0.133765862:1)=g_pas_default*1.096589762:g_pas_default*1.575978066
    dend[38].g_pas(0:0.102947875)=g_pas_default*1.194594529:g_pas_default*1.10413144
    dend[38].g_pas(0.102947875:0.453972819)=g_pas_default*1.10413144:g_pas_default*1.274266957
    dend[38].g_pas(0.453972819:1)=g_pas_default*1.274266957:g_pas_default*1.219057636
    dend[45].g_pas(0:1)=g_pas_default*1.345496264:g_pas_default*1.575978066
    dend[46].g_pas(0:1)=g_pas_default*1.269406676:g_pas_default*1.575978066
    dend[51].g_pas(0:1)=g_pas_default*1.204866759:g_pas_default*1.220703462
    dend[52].g_pas(0:1)=g_pas_default*1.207770543:g_pas_default*1.575978066
    dend[53].g_pas(0:1)=g_pas_default*1.258197019:g_pas_default*1.575978066
    dend[54].g_pas(0:1)=g_pas_default*1.377302176:g_pas_default*1.575978066
    dend[4].cm(0:1)=cm_default*1.703834467:cm_default*1.370767232
    dend[11].cm(0:1)=cm_default*1.282984784:cm_default*1.299943158
    dend[12].cm(0:1)=cm_default*1.526042981:cm_default*1.251994025
    dend[23].cm(0:1)=cm_default*1.278514711:cm_default*1.26081402
    dend[24].cm(0:1)=cm_default*1.73265483:cm_default*1.575978066
    dend[25].cm(0:1)=cm_default*1.696816047:cm_default*1.18738336
    dend[26].cm(0:0.131604218)=cm_default*1.355063586:cm_default*1.137654791
    dend[26].cm(0.131604218:1)=cm_default*1.137654791:cm_default*1.231282167
    dend[33].cm(0:1)=cm_default*1.430784906:cm_default*1.192457247
    dend[34].cm(0:1)=cm_default*1.209412583:cm_default*1.575978066
    dend[35].cm(0:0.296722685)=cm_default*1.049212172:cm_default*1.027352642
    dend[35].cm(0.296722685:0.711551642)=cm_default*1.027352642:cm_default*1.08038351
    dend[35].cm(0.711551642:1)=cm_default*1.08038351:cm_default*1.575978066
    dend[36].cm(0:0.48652424)=cm_default*1.280997781:cm_default*1.159817509
    dend[36].cm(0.48652424:1)=cm_default*1.159817509:cm_default*1.575978066
    dend[37].cm(0:0.133765862)=cm_default*1.209419774:cm_default*1.096589762
    dend[37].cm(0.133765862:1)=cm_default*1.096589762:cm_default*1.575978066
    dend[38].cm(0:0.102947875)=cm_default*1.194594529:cm_default*1.10413144
    dend[38].cm(0.102947875:0.453972819)=cm_default*1.10413144:cm_default*1.274266957
    dend[38].cm(0.453972819:1)=cm_default*1.274266957:cm_default*1.219057636
    dend[45].cm(0:1)=cm_default*1.345496264:cm_default*1.575978066
    dend[46].cm(0:1)=cm_default*1.269406676:cm_default*1.575978066
    dend[51].cm(0:1)=cm_default*1.204866759:cm_default*1.220703462
    dend[52].cm(0:1)=cm_default*1.207770543:cm_default*1.575978066
    dend[53].cm(0:1)=cm_default*1.258197019:cm_default*1.575978066
    dend[54].cm(0:1)=cm_default*1.377302176:cm_default*1.575978066
}

proc setall() {
    forsec all {
	Ra = $1
	e_pas = $4
    }
    //soma
    soma.g_pas=$3*1.242647966
    soma.cm=$2*1.242647966
    //dend1
    dend[0].g_pas(0:1)=$3*1.501612189:$3*1.327722516
    dend[5].g_pas(0:1)=$3*1.442660041:$3*1.305854614
    dend[6].g_pas(0:1)=$3*1.244896451:$3*1.219398021
    dend[13].g_pas(0:0.475852237)=$3*1.267999296:$3*1.084309297
    dend[13].g_pas(0.475852237:1)=$3*1.084309297:$3*1.24310966
    dend[14].g_pas(0:1)=$3*1.240605664:$3*1.575978066
    dend[15].g_pas(0:1)=$3*1.188022667:$3*1.575978066
    dend[16].g_pas(0:1)=$3*1.192013833:$3*1.575978066
    dend[27].g_pas(0:1)=$3*1.220397112:$3*1.211746931
    dend[28].g_pas(0:1)=$3*1.285021924:$3*1.575978066
    dend[39].g_pas(0:1)=$3*1.188709849:$3*1.575978066
    dend[40].g_pas(0:1)=$3*1.22325014:$3*1.575978066
    dend[0].cm(0:1)=$2*1.501612189:$2*1.327722516
    dend[5].cm(0:1)=$2*1.442660041:$2*1.305854614
    dend[6].cm(0:1)=$2*1.244896451:$2*1.219398021
    dend[13].cm(0:0.475852237)=$2*1.267999296:$2*1.084309297
    dend[13].cm(0.475852237:1)=$2*1.084309297:$2*1.24310966
    dend[14].cm(0:1)=$2*1.240605664:$2*1.575978066
    dend[15].cm(0:1)=$2*1.188022667:$2*1.575978066
    dend[16].cm(0:1)=$2*1.192013833:$2*1.575978066
    dend[27].cm(0:1)=$2*1.220397112:$2*1.211746931
    dend[28].cm(0:1)=$2*1.285021924:$2*1.575978066
    dend[39].cm(0:1)=$2*1.188709849:$2*1.575978066
    dend[40].cm(0:1)=$2*1.22325014:$2*1.575978066
    //dend2
    dend[1].g_pas(0:1)=$3*1.465667306:$3*1.406959368
    dend[7].g_pas(0:1)=$3*1.132649188:$3*1.470350954
    dend[8].g_pas(0:0.154677997)=$3*1.204879094:$3*1.095934901
    dend[8].g_pas(0.154677997:0.611083384)=$3*1.095934901:$3*1.092155227
    dend[8].g_pas(0.611083384:1)=$3*1.092155227:$3*1.575978066
    dend[17].g_pas(0:0.201923492)=$3*1.470208677:$3*1.522293911
    dend[17].g_pas(0.201923492:0.376568599)=$3*1.522293911:$3*1.099735212
    dend[17].g_pas(0.376568599:0.551213706)=$3*1.099735212:$3*1.13536325
    dend[17].g_pas(0.551213706:0.757370864)=$3*1.13536325:$3*1.134497063
    dend[17].g_pas(0.757370864:1)=$3*1.134497063:$3*1.575978066
    dend[18].g_pas(0:0.430085029)=$3*1.296123063:$3*1.117597282
    dend[18].g_pas(0.430085029:0.672153098)=$3*1.117597282:$3*1.560421668
    dend[18].g_pas(0.672153098:1)=$3*1.560421668:$3*1.203175971
    dend[29].g_pas(0:1)=$3*1.188026804:$3*1.206156979
    dend[30].g_pas(0:1)=$3*1.217825629:$3*1.575978066
    dend[41].g_pas(0:1)=$3*1.323657416:$3*1.575978066
    dend[42].g_pas(0:1)=$3*1.250883232:$3*1.575978066
    dend[1].cm(0:1)=$2*1.465667306:$2*1.406959368
    dend[7].cm(0:1)=$2*1.132649188:$2*1.470350954
    dend[8].cm(0:0.154677997)=$2*1.204879094:$2*1.095934901
    dend[8].cm(0.154677997:0.611083384)=$2*1.095934901:$2*1.092155227
    dend[8].cm(0.611083384:1)=$2*1.092155227:$2*1.575978066
    dend[17].cm(0:0.201923492)=$2*1.470208677:$2*1.522293911
    dend[17].cm(0.201923492:0.376568599)=$2*1.522293911:$2*1.099735212
    dend[17].cm(0.376568599:0.551213706)=$2*1.099735212:$2*1.13536325
    dend[17].cm(0.551213706:0.757370864)=$2*1.13536325:$2*1.134497063
    dend[17].cm(0.757370864:1)=$2*1.134497063:$2*1.575978066
    dend[18].cm(0:0.430085029)=$2*1.296123063:$2*1.117597282
    dend[18].cm(0.430085029:0.672153098)=$2*1.117597282:$2*1.560421668
    dend[18].cm(0.672153098:1)=$2*1.560421668:$2*1.203175971
    dend[29].cm(0:1)=$2*1.188026804:$2*1.206156979
    dend[30].cm(0:1)=$2*1.217825629:$2*1.575978066
    dend[41].cm(0:1)=$2*1.323657416:$2*1.575978066
    dend[42].cm(0:1)=$2*1.250883232:$2*1.575978066
    //dend3
    dend[2].g_pas(0:1)=$3*1.586657802:$3*1.614406371
    dend[9].g_pas(0:1)=$3*1.634626724:$3*1.294993344
    dend[10].g_pas(0:1)=$3*1.242493245:$3*1.167927066
    dend[19].g_pas(0:1)=$3*1.354429275:$3*1.575978066
    dend[20].g_pas(0:1)=$3*1.427906364:$3*1.575978066
    dend[21].g_pas(0:1)=$3*1.359144531:$3*1.297117394
    dend[22].g_pas(0:1)=$3*1.240597758:$3*1.575978066
    dend[31].g_pas(0:1)=$3*1.346253095:$3*1.575978066
    dend[32].g_pas(0:1)=$3*1.280261743:$3*1.246529068
    dend[43].g_pas(0:1)=$3*1.286863127:$3*1.575978066
    dend[44].g_pas(0:1)=$3*1.223723766:$3*1.200172607
    dend[47].g_pas(0:1)=$3*1.217832644:$3*1.575978066
    dend[48].g_pas(0:1)=$3*1.189094949:$3*1.213708773
    dend[49].g_pas(0:1)=$3*1.269682766:$3*1.575978066
    dend[50].g_pas(0:1)=$3*1.323638012:$3*1.575978066
    dend[2].cm(0:1)=$2*1.586657802:$2*1.614406371
    dend[9].cm(0:1)=$2*1.634626724:$2*1.294993344
    dend[10].cm(0:1)=$2*1.242493245:$2*1.167927066
    dend[19].cm(0:1)=$2*1.354429275:$2*1.575978066
    dend[20].cm(0:1)=$2*1.427906364:$2*1.575978066
    dend[21].cm(0:1)=$2*1.359144531:$2*1.297117394
    dend[22].cm(0:1)=$2*1.240597758:$2*1.575978066
    dend[31].cm(0:1)=$2*1.346253095:$2*1.575978066
    dend[32].cm(0:1)=$2*1.280261743:$2*1.246529068
    dend[43].cm(0:1)=$2*1.286863127:$2*1.575978066
    dend[44].cm(0:1)=$2*1.223723766:$2*1.200172607
    dend[47].cm(0:1)=$2*1.217832644:$2*1.575978066
    dend[48].cm(0:1)=$2*1.189094949:$2*1.213708773
    dend[49].cm(0:1)=$2*1.269682766:$2*1.575978066
    dend[50].cm(0:1)=$2*1.323638012:$2*1.575978066
    //dend4
    dend[3].g_pas(0:1)=$3*1.38958599:$3*1.575978066
    dend[3].cm(0:1)=$2*1.38958599:$2*1.575978066
    //dend5
    dend[4].g_pas(0:1)=$3*1.703834467:$3*1.370767232
    dend[11].g_pas(0:1)=$3*1.282984784:$3*1.299943158
    dend[12].g_pas(0:1)=$3*1.526042981:$3*1.251994025
    dend[23].g_pas(0:1)=$3*1.278514711:$3*1.26081402
    dend[24].g_pas(0:1)=$3*1.73265483:$3*1.575978066
    dend[25].g_pas(0:1)=$3*1.696816047:$3*1.18738336
    dend[26].g_pas(0:0.131604218)=$3*1.355063586:$3*1.137654791
    dend[26].g_pas(0.131604218:1)=$3*1.137654791:$3*1.231282167
    dend[33].g_pas(0:1)=$3*1.430784906:$3*1.192457247
    dend[34].g_pas(0:1)=$3*1.209412583:$3*1.575978066
    dend[35].g_pas(0:0.296722685)=$3*1.049212172:$3*1.027352642
    dend[35].g_pas(0.296722685:0.711551642)=$3*1.027352642:$3*1.08038351
    dend[35].g_pas(0.711551642:1)=$3*1.08038351:$3*1.575978066
    dend[36].g_pas(0:0.48652424)=$3*1.280997781:$3*1.159817509
    dend[36].g_pas(0.48652424:1)=$3*1.159817509:$3*1.575978066
    dend[37].g_pas(0:0.133765862)=$3*1.209419774:$3*1.096589762
    dend[37].g_pas(0.133765862:1)=$3*1.096589762:$3*1.575978066
    dend[38].g_pas(0:0.102947875)=$3*1.194594529:$3*1.10413144
    dend[38].g_pas(0.102947875:0.453972819)=$3*1.10413144:$3*1.274266957
    dend[38].g_pas(0.453972819:1)=$3*1.274266957:$3*1.219057636
    dend[45].g_pas(0:1)=$3*1.345496264:$3*1.575978066
    dend[46].g_pas(0:1)=$3*1.269406676:$3*1.575978066
    dend[51].g_pas(0:1)=$3*1.204866759:$3*1.220703462
    dend[52].g_pas(0:1)=$3*1.207770543:$3*1.575978066
    dend[53].g_pas(0:1)=$3*1.258197019:$3*1.575978066
    dend[54].g_pas(0:1)=$3*1.377302176:$3*1.575978066
    dend[4].cm(0:1)=$2*1.703834467:$2*1.370767232
    dend[11].cm(0:1)=$2*1.282984784:$2*1.299943158
    dend[12].cm(0:1)=$2*1.526042981:$2*1.251994025
    dend[23].cm(0:1)=$2*1.278514711:$2*1.26081402
    dend[24].cm(0:1)=$2*1.73265483:$2*1.575978066
    dend[25].cm(0:1)=$2*1.696816047:$2*1.18738336
    dend[26].cm(0:0.131604218)=$2*1.355063586:$2*1.137654791
    dend[26].cm(0.131604218:1)=$2*1.137654791:$2*1.231282167
    dend[33].cm(0:1)=$2*1.430784906:$2*1.192457247
    dend[34].cm(0:1)=$2*1.209412583:$2*1.575978066
    dend[35].cm(0:0.296722685)=$2*1.049212172:$2*1.027352642
    dend[35].cm(0.296722685:0.711551642)=$2*1.027352642:$2*1.08038351
    dend[35].cm(0.711551642:1)=$2*1.08038351:$2*1.575978066
    dend[36].cm(0:0.48652424)=$2*1.280997781:$2*1.159817509
    dend[36].cm(0.48652424:1)=$2*1.159817509:$2*1.575978066
    dend[37].cm(0:0.133765862)=$2*1.209419774:$2*1.096589762
    dend[37].cm(0.133765862:1)=$2*1.096589762:$2*1.575978066
    dend[38].cm(0:0.102947875)=$2*1.194594529:$2*1.10413144
    dend[38].cm(0.102947875:0.453972819)=$2*1.10413144:$2*1.274266957
    dend[38].cm(0.453972819:1)=$2*1.274266957:$2*1.219057636
    dend[45].cm(0:1)=$2*1.345496264:$2*1.575978066
    dend[46].cm(0:1)=$2*1.269406676:$2*1.575978066
    dend[51].cm(0:1)=$2*1.204866759:$2*1.220703462
    dend[52].cm(0:1)=$2*1.207770543:$2*1.575978066
    dend[53].cm(0:1)=$2*1.258197019:$2*1.575978066
    dend[54].cm(0:1)=$2*1.377302176:$2*1.575978066
}

access soma

celldef()
setall( Ra_default, cm_default, g_pas_default, e_pas_default )
//forsec dend4 delete_section() // delete non-well-defined section

Loading data, please wait...