proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[101], axon
proc topol() { local i
connect dend(0), soma(1)
for i = 1, 9 connect dend[i](0), dend[i-1](1)
connect dend[10](0), soma(1)
for i = 11, 12 connect dend[i](0), dend[i-1](1)
connect dend[13](0), dend[11](1)
for i = 14, 15 connect dend[i](0), dend[13](1)
connect dend[16](0), dend[10](1)
connect dend[17](0), dend[2](1)
connect dend[18](0), dend[17](1)
connect dend[19](0), dend[6](1)
connect dend[20](0), dend[19](1)
connect dend[21](0), dend[5](1)
for i = 22, 23 connect dend[i](0), dend[1](1)
connect dend[24](0), dend(1)
for i = 25, 26 connect dend[i](0), dend[i-1](1)
connect dend[27](0), dend[25](1)
connect dend[28](0), dend[24](1)
connect dend[29](0), soma(1)
for i = 30, 32 connect dend[i](0), dend[i-1](1)
connect dend[33](0), dend[30](1)
connect dend[34](0), dend[8](1)
connect dend[35](0), soma(1)
connect dend[36](0), dend[29](1)
for i = 37, 39 connect dend[i](0), dend[i-1](1)
connect dend[40](0), dend[38](1)
for i = 41, 42 connect dend[i](0), dend[40](1)
connect dend[43](0), dend[37](1)
for i = 44, 45 connect dend[i](0), dend[43](1)
for i = 46, 47 connect dend[i](0), dend[45](1)
connect dend[48](0), dend[36](1)
for i = 49, 51 connect dend[i](0), dend[i-1](1)
connect dend[52](0), dend[50](1)
connect dend[53](0), dend[49](1)
connect dend[54](0), dend[48](1)
for i = 55, 56 connect dend[i](0), dend[54](1)
connect dend[57](0), axon(1)
connect dend[58](0), dend[17](1)
connect dend[59](0), dend[3](1)
connect dend[60](0), soma(1)
for i = 61, 62 connect dend[i](0), dend[i-1](1)
connect dend[63](0), dend[61](1)
for i = 64, 66 connect dend[i](0), dend[i-1](1)
connect dend[67](0), dend[65](1)
for i = 68, 69 connect dend[i](0), dend[67](1)
connect dend[70](0), dend[64](1)
connect dend[71](0), dend[63](1)
for i = 72, 74 connect dend[i](0), dend[i-1](1)
connect dend[75](0), dend[60](1)
for i = 76, 78 connect dend[i](0), dend[i-1](1)
connect dend[79](0), dend[77](1)
connect dend[80](0), dend[76](1)
for i = 81, 82 connect dend[i](0), dend[80](1)
connect dend[83](0), dend[75](1)
connect dend[84](0), dend[7](1)
connect dend[85](0), dend[4](1)
connect dend[86](0), dend[19](1)
for i = 87, 89 connect dend[i](0), dend[i-1](1)
connect dend[90](0), dend[87](1)
connect dend[91](0), dend[90](1)
connect dend[92](0), dend[86](1)
for i = 93, 94 connect dend[i](0), dend[i-21](1)
connect dend[95](0), dend[71](1)
connect dend[96](0), dend[88](1)
connect dend[97](0), dend[90](1)
connect dend[98](0), dend[31](1)
for i = 99, 100 connect dend[i](0), dend[98](1)
connect axon(0), dend[56](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(32.726, -37.079, 65.99, 0.242)
pt3dadd(30.53, -36.196, 65.99, 0.242)
pt3dadd(28.817, -35.302, 65.99, 0.242)
pt3dadd(26.844, -33.486, 65.99, 0.242)
pt3dadd(25.832, -31.416, 65.99, 0.242)
pt3dadd(25.31, -29.569, 65.99, 0.242)
pt3dadd(24.318, -28.429, 65.99, 0.242)
pt3dadd(23.08, -27.061, 65.99, 0.242)
pt3dadd(23.53, -25.426, 65.99, 0.242)
pt3dadd(23.984, -24.023, 65.99, 0.242)
pt3dadd(25.421, -23.296, 65.99, 0.242)
pt3dadd(28.077, -23.009, 65.99, 0.242)
pt3dadd(31.212, -22.479, 65.99, 0.242)
pt3dadd(33.631, -22.429, 65.99, 0.242)
pt3dadd(36.79, -23.059, 65.99, 0.242)
pt3dadd(38.507, -24.185, 65.99, 0.242)
pt3dadd(40.23, -25.542, 65.99, 0.242)
pt3dadd(41.947, -26.668, 65.99, 0.242)
pt3dadd(42.46, -28.051, 65.99, 0.242)
pt3dadd(42.02, -30.15, 65.99, 0.242)
pt3dadd(40.588, -31.109, 65.99, 0.242)
pt3dadd(39.881, -32.053, 65.99, 0.242)
pt3dadd(38.701, -33.471, 65.99, 0.242)
pt3dadd(37.042, -35.131, 65.99, 0.242)
pt3dadd(36.34, -36.307, 65.99, 0.242)
pt3dadd(34.657, -36.806, 65.99, 0.242)
}
dend {pt3dclear()
pt3dadd(34.657, -36.806, 65.99, 2.42)
pt3dadd(24.099, -24.926, 65.982, 2.42)
pt3dadd(22.648, -24.956, 63.41, 2.42)
pt3dadd(20.698, -24.3, 62.368, 2.42)
pt3dadd(19.233, -23.634, 62.368, 2.178)
pt3dadd(17.041, -22.983, 61.102, 2.178)
pt3dadd(14.85, -22.332, 60.118, 2.178)
pt3dadd(13.147, -21.903, 58.567, 2.178)
pt3dadd(11.695, -21.933, 57.352, 2.178)
pt3dadd(10.002, -21.968, 55.85, 2.178)
}
dend[1] {pt3dclear()
pt3dadd(10.002, -21.968, 55.85, 2.178)
pt3dadd(8.067, -22.009, 55.385, 1.936)
pt3dadd(6.625, -22.503, 56.64, 1.452)
pt3dadd(4.695, -22.776, 57.227, 1.452)
pt3dadd(3.224, -21.877, 59.637, 1.452)
pt3dadd(1.749, -20.747, 59.637, 1.452)
pt3dadd(0.51, -19.379, 59.637, 1.452)
pt3dadd(-0.97, -18.017, 60.2, 1.452)
pt3dadd(-2.697, -16.427, 60.2, 1.452)
pt3dadd(-3.926, -15.524, 60.2, 1.452)
}
dend[2] {pt3dclear()
pt3dadd(-3.926, -15.524, 60.2, 1.452)
pt3dadd(-5.397, -14.625, 60.2, 1.694)
pt3dadd(-7.835, -13.747, 60.2, 1.694)
pt3dadd(-9.069, -12.612, 61.14, 1.21)
pt3dadd(-10.539, -11.713, 61.14, 1.21)
}
dend[3] {pt3dclear()
pt3dadd(-10.539, -11.713, 61.14, 1.21)
pt3dadd(-12.697, -12.687, 61.14, 0.968)
pt3dadd(-14.874, -12.733, 61.14, 0.968)
pt3dadd(-17.07, -11.849, 61.14, 0.968)
pt3dadd(-18.531, -11.415, 61.14, 0.968)
pt3dadd(-19.992, -10.981, 61.14, 0.968)
pt3dadd(-21.681, -11.249, 61.14, 0.968)
pt3dadd(-22.914, -10.113, 61.14, 0.968)
pt3dadd(-24.138, -9.442, 63.002, 0.968)
pt3dadd(-26.088, -8.786, 65.243, 0.968)
pt3dadd(-27.549, -8.352, 65.243, 0.968)
pt3dadd(-29.237, -8.619, 64.75, 0.968)
pt3dadd(-30.461, -7.948, 64.75, 0.968)
pt3dadd(-32.392, -8.221, 64.493, 0.968)
pt3dadd(-34.806, -8.503, 64.493, 0.968)
pt3dadd(-36.75, -8.079, 64.493, 0.968)
pt3dadd(-38.928, -8.124, 64.493, 0.968)
pt3dadd(-40.122, -8.846, 64.493, 0.968)
}
dend[4] {pt3dclear()
pt3dadd(-40.122, -8.846, 64.493, 0.968)
pt3dadd(-41.545, -10.269, 62.94, 1.21)
pt3dadd(-42.977, -11.228, 62.94, 0.968)
pt3dadd(-44.414, -11.955, 62.94, 0.968)
pt3dadd(-46.329, -12.924, 62.94, 0.726)
pt3dadd(-48.008, -13.655, 62.94, 0.968)
pt3dadd(-49.706, -13.458, 62.94, 0.968)
pt3dadd(-51.636, -13.731, 62.94, 0.726)
pt3dadd(-53.809, -14.008, 64.037, 0.726)
pt3dadd(-55.981, -14.286, 64.037, 0.726)
pt3dadd(-58.39, -14.801, 64.037, 0.726)
pt3dadd(-61.269, -16.022, 64.037, 0.726)
pt3dadd(-64.147, -17.243, 64.037, 0.726)
pt3dadd(-65.821, -18.207, 65.158, 0.968)
}
dend[5] {pt3dclear()
pt3dadd(-65.821, -18.207, 65.158, 0.968)
pt3dadd(-67.746, -18.712, 65.158, 0.968)
pt3dadd(-69.203, -18.51, 65.158, 0.968)
pt3dadd(-70.175, -18.298, 65.158, 0.726)
pt3dadd(-71.399, -17.626, 65.158, 0.484)
pt3dadd(-73.576, -17.672, 64.507, 0.484)
pt3dadd(-74.79, -17.465, 64.57, 0.484)
}
dend[6] {pt3dclear()
pt3dadd(-74.79, -17.465, 64.57, 0.484)
pt3dadd(-76.701, -18.666, 63.105, 0.726)
pt3dadd(-78.612, -19.867, 63.105, 0.726)
pt3dadd(-80.794, -19.68, 63.105, 0.726)
pt3dadd(-82.985, -19.029, 63.105, 0.726)
pt3dadd(-84.925, -18.837, 63.105, 0.484)
}
dend[7] {pt3dclear()
pt3dadd(-84.925, -18.837, 63.105, 0.484)
pt3dadd(-89.647, -14.123, 74.925, 0.484)
pt3dadd(-90.156, -12.852, 74.925, 0.484)
pt3dadd(-90.748, -12.039, 76.895, 0.484)
pt3dadd(-92.054, -11.097, 76.895, 0.484)
pt3dadd(-93.36, -10.156, 76.895, 0.484)
pt3dadd(-94.231, -9.528, 76.895, 0.484)
pt3dadd(-94.864, -8.943, 76.895, 0.242)
pt3dadd(-95.537, -8.586, 76.895, 0.242)
pt3dadd(-96.49, -8.416, 76.895, 0.242)
pt3dadd(-97.558, -7.517, 76.895, 0.242)
}
dend[8] {pt3dclear()
pt3dadd(-97.558, -7.517, 76.895, 0.242)
pt3dadd(-99.504, -7.404, 77.853, 0.484)
pt3dadd(-100.22, -7.276, 77.853, 0.484)
pt3dadd(-102.36, -6.892, 77.853, 0.484)
pt3dadd(-103.91, -7.322, 77.853, 0.484)
pt3dadd(-105.46, -7.752, 77.853, 0.484)
pt3dadd(-107.57, -8.553, 79.132, 0.484)
pt3dadd(-109.6, -8.898, 79.132, 0.484)
pt3dadd(-111.59, -9.014, 79.918, 0.484)
pt3dadd(-114.05, -9.044, 79.918, 0.484)
pt3dadd(-116.04, -9.16, 78.268, 0.484)
pt3dadd(-117.55, -9.361, 79.607, 0.484)
pt3dadd(-118.78, -9.377, 78.975, 0.484)
pt3dadd(-120.85, -9.95, 80.715, 0.484)
pt3dadd(-123.51, -9.709, 80.715, 0.484)
pt3dadd(-125.78, -10.011, 82.415, 0.726)
pt3dadd(-129.04, -10.371, 78.482, 0.484)
pt3dadd(-130.55, -10.572, 78.482, 0.484)
pt3dadd(-132.82, -10.874, 78.482, 0.484)
pt3dadd(-134.17, -11.575, 76.332, 0.484)
pt3dadd(-136.63, -11.605, 78.365, 0.484)
pt3dadd(-138.62, -11.721, 76.043, 0.484)
pt3dadd(-140.76, -11.337, 76.043, 0.484)
pt3dadd(-142.12, -12.038, 75.808, 0.484)
pt3dadd(-144.15, -12.383, 75.808, 0.484)
pt3dadd(-146.33, -12.227, 75.795, 0.484)
pt3dadd(-150.15, -10.568, 62.885, 0.242)
pt3dadd(-151.59, -11.062, 62.885, 0.242)
pt3dadd(-153.52, -11.335, 62.885, 0.242)
pt3dadd(-155.45, -11.84, 62.885, 0.242)
pt3dadd(-157.15, -11.643, 62.885, 0.484)
pt3dadd(-158.35, -11.9, 62.885, 0.484)
pt3dadd(-159.8, -12.162, 62.885, 0.242)
pt3dadd(-161.49, -12.198, 62.885, 0.242)
pt3dadd(-164.62, -12.96, 62.885, 0.242)
}
dend[9] {pt3dclear()
pt3dadd(-164.62, -12.96, 62.885, 0.242)
pt3dadd(-166.32, -12.763, 62.885, 0.242)
}
dend[10] {pt3dclear()
pt3dadd(34.657, -36.806, 65.99, 1.21)
pt3dadd(34.889, -36.337, 65.99, 1.21)
pt3dadd(35.411, -38.184, 62.767, 1.21)
pt3dadd(36.418, -40.021, 62.688, 1.21)
pt3dadd(36.959, -42.797, 62.217, 1.21)
pt3dadd(36.761, -44.891, 62.217, 1.21)
pt3dadd(35.358, -47.243, 62.217, 1.21)
pt3dadd(33.931, -48.434, 61.415, 1.21)
pt3dadd(32.523, -50.553, 61.415, 0.968)
pt3dadd(32.315, -52.183, 59.657, 0.968)
pt3dadd(32.842, -54.262, 59.657, 0.968)
pt3dadd(32.905, -57.28, 58.705, 0.968)
pt3dadd(32.46, -59.148, 57.395, 0.968)
pt3dadd(32.484, -60.308, 56.743, 0.968)
pt3dadd(32.276, -61.938, 56.743, 0.968)
pt3dadd(32.557, -63.79, 55.702, 0.968)
pt3dadd(31.87, -65.663, 54.755, 0.968)
pt3dadd(30.941, -67.54, 53.857, 1.21)
pt3dadd(29.78, -69.887, 52.21, 1.21)
pt3dadd(28.861, -72.228, 50.868, 1.21)
pt3dadd(28.421, -74.328, 50.06, 0.968)
pt3dadd(27.995, -77.123, 47.9, 0.968)
pt3dadd(28.271, -78.743, 47.9, 0.968)
pt3dadd(28.788, -80.358, 47.9, 0.968)
pt3dadd(27.603, -81.544, 45.835, 0.968)
pt3dadd(27.419, -84.335, 44.94, 1.21)
pt3dadd(27.947, -86.414, 43.16, 1.21)
pt3dadd(28, -88.968, 41.56, 1.21)
pt3dadd(28.048, -91.289, 38.842, 1.21)
pt3dadd(28.097, -93.611, 37.513, 1.21)
}
dend[11] {pt3dclear()
pt3dadd(28.097, -93.611, 37.513, 1.21)
pt3dadd(26.926, -95.493, 35.097, 0.726)
pt3dadd(26.229, -96.901, 34.677, 0.726)
pt3dadd(25.049, -98.319, 34.677, 0.726)
pt3dadd(24.367, -100.42, 33.51, 0.726)
pt3dadd(24.637, -101.81, 32.252, 0.726)
pt3dadd(24.686, -104.13, 29.81, 0.726)
pt3dadd(24.502, -106.92, 29.122, 0.726)
pt3dadd(23.81, -108.56, 27.97, 0.726)
pt3dadd(22.165, -110.92, 27.97, 0.726)
pt3dadd(21.232, -112.57, 25.912, 0.726)
pt3dadd(20.549, -114.67, 25.912, 0.726)
pt3dadd(20.598, -116.99, 25.912, 0.726)
pt3dadd(20.646, -119.31, 25.912, 0.726)
pt3dadd(20.453, -121.64, 23.917, 0.726)
pt3dadd(20.496, -123.73, 23.917, 0.726)
pt3dadd(19.804, -125.37, 23.917, 0.726)
pt3dadd(19.601, -127.23, 23.917, 0.726)
}
dend[12] {pt3dclear()
pt3dadd(19.601, -127.23, 23.917, 0.726)
pt3dadd(20.55, -128.85, 26.097, 0.726)
pt3dadd(21.794, -130.45, 26.097, 0.726)
pt3dadd(23.293, -132.74, 26.097, 0.726)
pt3dadd(24.275, -133.42, 23.347, 0.726)
pt3dadd(25.751, -134.55, 23.347, 0.726)
pt3dadd(27.701, -135.2, 23.347, 0.726)
pt3dadd(29.641, -135.39, 21.14, 0.726)
}
}
proc shape3d_2() {
dend[12] { pt3dadd(30.647, -137.23, 21.14, 0.726)
pt3dadd(31.663, -139.53, 21.14, 0.726)
pt3dadd(32.437, -141.84, 21.14, 0.726)
pt3dadd(33.433, -143.21, 19.52, 0.726)
pt3dadd(34.914, -144.57, 18.855, 0.484)
pt3dadd(36.143, -145.48, 18.855, 0.484)
pt3dadd(36.931, -148.48, 18.855, 0.484)
pt3dadd(37.676, -149.39, 17.927, 0.484)
pt3dadd(38.673, -150.77, 17.927, 0.484)
pt3dadd(40.39, -151.89, 17.927, 0.726)
pt3dadd(42.606, -153.7, 17.927, 0.726)
pt3dadd(44.328, -155.06, 17.927, 0.726)
pt3dadd(45.571, -156.66, 16.417, 0.726)
pt3dadd(46.084, -158.04, 15.217, 0.726)
pt3dadd(47.811, -159.63, 15.217, 0.484)
pt3dadd(48.813, -161.24, 15.217, 0.726)
pt3dadd(49.819, -163.07, 15.217, 0.726)
pt3dadd(50.574, -164.45, 15.217, 0.726)
pt3dadd(52.286, -165.35, 15.217, 0.726)
pt3dadd(54.255, -166.93, 15.217, 0.726)
pt3dadd(55.992, -168.99, 15.217, 0.726)
pt3dadd(57.473, -170.35, 15.217, 0.484)
pt3dadd(58.217, -171.26, 15.217, 0.484)
pt3dadd(57.782, -173.59, 15.217, 0.484)
}
dend[13] {pt3dclear()
pt3dadd(19.601, -127.23, 23.917, 0.726)
pt3dadd(18.596, -127.96, 24.153, 0.726)
pt3dadd(18.151, -129.83, 24.153, 0.726)
pt3dadd(17.706, -131.7, 24.153, 0.726)
pt3dadd(18.243, -134.24, 24.153, 0.726)
pt3dadd(18.267, -135.4, 22.198, 0.484)
pt3dadd(17.082, -136.59, 22.198, 0.484)
pt3dadd(15.906, -138.24, 22.198, 0.484)
}
dend[14] {pt3dclear()
pt3dadd(15.906, -138.24, 22.198, 0.484)
pt3dadd(15.224, -140.34, 21.14, 0.242)
pt3dadd(15.016, -141.97, 21.14, 0.242)
pt3dadd(15.035, -142.9, 20.163, 0.242)
pt3dadd(14.808, -143.6, 20.163, 0.242)
pt3dadd(13.603, -143.86, 20.163, 0.242)
pt3dadd(13.642, -145.71, 19.157, 0.484)
pt3dadd(13.671, -147.11, 17.645, 0.484)
pt3dadd(13.937, -148.26, 17.425, 0.484)
pt3dadd(13.724, -149.66, 16.97, 0.484)
pt3dadd(12.287, -150.39, 16.97, 0.484)
pt3dadd(11.837, -152.02, 15.432, 0.484)
pt3dadd(11.392, -153.89, 15.432, 0.484)
pt3dadd(10.957, -156.22, 14.735, 0.484)
pt3dadd(10.522, -158.55, 13.925, 0.484)
pt3dadd(10.304, -159.72, 12.54, 0.484)
pt3dadd(9.849, -161.12, 12.54, 0.484)
pt3dadd(10.13, -162.97, 11.355, 0.484)
pt3dadd(10.405, -164.59, 11.355, 0.484)
pt3dadd(9.96, -166.46, 10.455, 0.484)
pt3dadd(9.506, -167.86, 9.59, 0.484)
pt3dadd(9.535, -169.26, 9.59, 0.484)
pt3dadd(9.559, -170.42, 7.835, 0.484)
pt3dadd(8.867, -172.06, 7.835, 0.484)
pt3dadd(7.938, -173.93, 6.407, 0.484)
pt3dadd(8.228, -176.25, 4.432, 0.484)
pt3dadd(8.011, -177.42, 4.432, 0.484)
pt3dadd(6.114, -179.31, 4.432, 0.484)
}
dend[15] {pt3dclear()
pt3dadd(15.906, -138.24, 22.198, 0.484)
pt3dadd(14.721, -139.42, 22.198, 0.484)
pt3dadd(13.777, -140.6, 22.198, 0.484)
pt3dadd(13.1, -142.94, 22.198, 0.484)
pt3dadd(11.929, -144.82, 22.198, 0.484)
pt3dadd(11.237, -146.46, 23.12, 0.484)
pt3dadd(10.304, -148.11, 23.12, 0.484)
pt3dadd(8.877, -149.3, 23.12, 0.484)
pt3dadd(7.198, -150.03, 23.12, 0.484)
pt3dadd(5.287, -151.23, 23.12, 0.484)
pt3dadd(3.376, -152.43, 23.12, 0.484)
pt3dadd(2.442, -154.08, 23.12, 0.484)
pt3dadd(1.489, -154.79, 23.12, 0.484)
pt3dadd(-0.446, -154.83, 23.12, 0.484)
pt3dadd(-1.142, -156.24, 23.74, 0.484)
pt3dadd(-2.342, -156.73, 23.74, 0.484)
pt3dadd(-4.277, -156.77, 23.74, 0.484)
pt3dadd(-4.984, -157.71, 23.74, 0.484)
pt3dadd(-6.406, -159.14, 23.74, 0.484)
pt3dadd(-8.81, -159.88, 23.74, 0.484)
pt3dadd(-10.494, -160.38, 24.49, 0.484)
pt3dadd(-11.703, -160.41, 24.49, 0.484)
pt3dadd(-12.898, -161.13, 24.49, 0.242)
pt3dadd(-13.847, -162.08, 24.49, 0.242)
pt3dadd(-15.032, -163.26, 24.49, 0.242)
pt3dadd(-16.691, -164.93, 24.49, 0.242)
pt3dadd(-18.597, -166.36, 23, 0.242)
}
dend[16] {pt3dclear()
pt3dadd(28.097, -93.611, 37.513, 1.21)
pt3dadd(28.629, -95.922, 37.032, 0.968)
pt3dadd(28.435, -98.248, 35.73, 0.968)
pt3dadd(28.948, -99.631, 35.73, 0.968)
pt3dadd(29.466, -101.25, 35.73, 0.968)
pt3dadd(30.714, -103.08, 35.438, 0.726)
pt3dadd(31.715, -104.68, 35.052, 0.484)
pt3dadd(32.954, -106.05, 35.052, 0.484)
pt3dadd(33.95, -107.42, 35.052, 0.484)
pt3dadd(34.952, -109.03, 35.052, 0.484)
pt3dadd(35.958, -110.86, 35.052, 0.484)
pt3dadd(36.945, -111.77, 35.052, 0.484)
pt3dadd(37.472, -113.85, 35.052, 0.242)
pt3dadd(37.506, -115.48, 35.052, 0.242)
pt3dadd(37.787, -117.33, 35.052, 0.242)
pt3dadd(37.811, -118.49, 35.052, 0.242)
pt3dadd(37.593, -119.66, 35.052, 0.242)
pt3dadd(37.632, -121.51, 36.272, 0.242)
pt3dadd(37.167, -122.45, 36.272, 0.242)
pt3dadd(36.95, -123.62, 36.272, 0.242)
pt3dadd(36.751, -125.71, 36.272, 0.242)
pt3dadd(36.539, -127.11, 37.5, 0.242)
pt3dadd(36.572, -128.74, 37.5, 0.242)
pt3dadd(37.08, -129.89, 37.5, 0.242)
pt3dadd(36.863, -131.05, 37.5, 0.242)
}
dend[17] {pt3dclear()
pt3dadd(-10.539, -11.713, 61.14, 1.21)
pt3dadd(-10.104, -9.382, 61.21, 0.968)
pt3dadd(-9.659, -7.515, 64.15, 0.968)
pt3dadd(-9.693, -5.89, 64.507, 0.968)
pt3dadd(-9.722, -4.497, 65.065, 0.968)
pt3dadd(-9.775, -1.943, 67.005, 0.968)
pt3dadd(-9.562, -0.545, 67.005, 0.726)
pt3dadd(-8.865, 0.863, 67.005, 0.726)
pt3dadd(-9.156, 3.179, 67.005, 0.726)
pt3dadd(-9.199, 5.268, 67.005, 0.726)
pt3dadd(-9.499, 8.049, 67.005, 0.726)
pt3dadd(-9.31, 10.608, 67.005, 0.726)
pt3dadd(-9.359, 12.929, 67.005, 0.726)
pt3dadd(-9.17, 15.488, 67.005, 0.726)
pt3dadd(-9.446, 17.108, 67.783, 0.484)
pt3dadd(-9.963, 18.723, 67.783, 0.726)
pt3dadd(-10.733, 20.797, 67.783, 0.726)
pt3dadd(-10.757, 21.958, 68.55, 0.484)
pt3dadd(-10.055, 23.133, 68.55, 0.484)
pt3dadd(-9.852, 24.996, 68.55, 0.726)
pt3dadd(-9.663, 27.554, 68.55, 0.726)
pt3dadd(-9.697, 29.179, 70.938, 0.726)
pt3dadd(-9.973, 30.799, 70.877, 0.242)
pt3dadd(-10.491, 32.414, 70.877, 0.242)
pt3dadd(-11.004, 33.797, 70.877, 0.242)
pt3dadd(-10.791, 35.195, 70.877, 0.242)
pt3dadd(-10.578, 36.593, 72.673, 0.242)
pt3dadd(-10.854, 38.213, 72.673, 0.242)
pt3dadd(-11.115, 39.136, 72.673, 0.484)
pt3dadd(-11.395, 40.988, 72.673, 0.484)
pt3dadd(-11.187, 42.618, 72.673, 0.484)
pt3dadd(-10.979, 44.248, 72.673, 0.484)
pt3dadd(-10.776, 46.11, 72.673, 0.484)
pt3dadd(-10.796, 47.039, 72.673, 0.484)
pt3dadd(-11.071, 48.659, 72.673, 0.484)
pt3dadd(-10.123, 49.608, 72.673, 0.484)
pt3dadd(-9.91, 51.006, 73.757, 0.242)
pt3dadd(-10.172, 51.929, 73.757, 0.242)
}
dend[18] {pt3dclear()
pt3dadd(-10.172, 51.929, 73.757, 0.242)
pt3dadd(-9.722, 53.564, 73.757, 0.242)
pt3dadd(-9.518, 55.426, 73.757, 0.242)
pt3dadd(-9.552, 57.051, 73.757, 0.242)
pt3dadd(-9.127, 59.847, 73.757, 0.242)
}
dend[19] {pt3dclear()
pt3dadd(-84.925, -18.837, 63.105, 0.484)
pt3dadd(-86.609, -19.337, 63.105, 0.726)
pt3dadd(-88.041, -20.296, 63.105, 0.726)
pt3dadd(-90.199, -21.27, 64.188, 0.726)
pt3dadd(-91.635, -21.996, 64.335, 0.726)
pt3dadd(-92.608, -21.784, 64.335, 0.484)
pt3dadd(-93.817, -21.81, 64.335, 0.484)
pt3dadd(-95.264, -22.072, 64.335, 0.484)
pt3dadd(-97.436, -22.349, 64.335, 0.726)
pt3dadd(-98.626, -23.303, 62.967, 0.726)
}
dend[20] {pt3dclear()
pt3dadd(-98.626, -23.303, 62.967, 0.726)
pt3dadd(-101.04, -23.354, 61.82, 0.484)
pt3dadd(-102.97, -23.626, 61.82, 0.484)
pt3dadd(-104.65, -24.59, 61.82, 0.484)
pt3dadd(-106.79, -26.492, 61.82, 0.484)
pt3dadd(-108.49, -26.063, 61.82, 0.484)
pt3dadd(-110.41, -26.8, 61.82, 0.484)
pt3dadd(-111.38, -26.82, 61.82, 0.484)
pt3dadd(-112.83, -26.618, 59.52, 0.484)
pt3dadd(-114.75, -27.82, 59.52, 0.484)
pt3dadd(-116.66, -28.788, 59.52, 0.484)
pt3dadd(-119.05, -30.464, 59.52, 0.484)
}
dend[21] {pt3dclear()
pt3dadd(-74.79, -17.465, 64.57, 0.484)
pt3dadd(-75.782, -16.324, 65.063, 0.726)
pt3dadd(-77.257, -15.194, 65.063, 0.726)
pt3dadd(-78.733, -14.063, 65.063, 0.726)
pt3dadd(-80.208, -12.933, 65.573, 0.726)
pt3dadd(-81.679, -12.035, 66.33, 0.726)
pt3dadd(-82.903, -11.363, 67.362, 0.726)
pt3dadd(-84.127, -10.692, 68.533, 0.484)
pt3dadd(-84.867, -10.011, 68.533, 0.484)
pt3dadd(-84.877, -9.546, 68.533, 0.484)
}
dend[22] {pt3dclear()
pt3dadd(-3.926, -15.524, 60.2, 1.452)
pt3dadd(-5.358, -16.482, 60.2, 0.484)
pt3dadd(-6.064, -17.426, 60.2, 0.484)
pt3dadd(-6.272, -19.056, 60.2, 0.484)
}
dend[23] {pt3dclear()
pt3dadd(-3.926, -15.524, 60.2, 1.452)
pt3dadd(-3.718, -13.894, 60.2, 0.726)
pt3dadd(-3.5, -12.728, 60.2, 0.726)
pt3dadd(-2.818, -10.623, 60.2, 0.726)
}
dend[24] {pt3dclear()
pt3dadd(10.002, -21.968, 55.85, 2.178)
pt3dadd(9.484, -20.354, 53.712, 1.21)
pt3dadd(9.688, -18.491, 52.335, 1.21)
pt3dadd(9.649, -16.634, 51.065, 1.21)
pt3dadd(9.61, -14.777, 49.31, 1.21)
}
}
proc shape3d_3() {
dend[24] { pt3dadd(10.08, -14.071, 47.452, 1.21)
pt3dadd(9.325, -12.693, 47.452, 0.968)
pt3dadd(9.301, -11.532, 46.005, 0.968)
pt3dadd(9.272, -10.139, 44.107, 0.968)
pt3dadd(9.068, -12.001, 36.225, 0.968)
pt3dadd(7.888, -13.42, 34.36, 0.968)
pt3dadd(7.191, -14.827, 31.597, 0.968)
pt3dadd(6.988, -16.69, 25.44, 0.968)
}
dend[25] {pt3dclear()
pt3dadd(6.988, -16.69, 25.44, 0.968)
pt3dadd(5.058, -16.962, 22.927, 0.968)
}
dend[26] {pt3dclear()
pt3dadd(5.058, -16.962, 22.927, 0.968)
pt3dadd(5.271, -15.564, 22.12, 0.726)
pt3dadd(5.963, -13.924, 20.887, 0.726)
pt3dadd(6.422, -12.753, 19.97, 0.726)
pt3dadd(7.114, -11.113, 20.135, 0.726)
pt3dadd(7.811, -9.705, 19.57, 0.726)
pt3dadd(8.502, -8.065, 19.57, 0.726)
pt3dadd(10.152, -5.94, 19.57, 0.726)
pt3dadd(10.621, -5.234, 17.605, 0.726)
pt3dadd(11.091, -4.527, 17.605, 0.726)
pt3dadd(12.276, -3.342, 17.605, 0.726)
pt3dadd(13.229, -2.625, 15.602, 0.726)
pt3dadd(13.679, -0.99, 15.602, 0.726)
pt3dadd(14.129, 0.645, 15.602, 0.726)
pt3dadd(14.579, 2.28, 15.602, 0.726)
pt3dadd(15.754, 3.93, 14.395, 0.726)
pt3dadd(16.688, 5.576, 13.89, 0.726)
pt3dadd(16.398, 7.892, 13.592, 0.726)
pt3dadd(16.122, 9.512, 11.39, 0.726)
pt3dadd(15.846, 11.132, 11.39, 0.484)
pt3dadd(16.306, 12.303, 11.39, 0.484)
pt3dadd(17.491, 13.489, 10.7, 0.484)
pt3dadd(18.188, 14.897, 8.825, 0.484)
pt3dadd(18.144, 16.986, 8.825, 0.726)
pt3dadd(18.352, 18.616, 8.825, 0.726)
pt3dadd(19.039, 20.488, 8.825, 0.726)
pt3dadd(19.499, 21.659, 7.065, 0.726)
pt3dadd(20.428, 23.536, 7.065, 0.726)
pt3dadd(21.356, 25.414, 7.065, 0.484)
pt3dadd(22.039, 27.518, 7.065, 0.484)
pt3dadd(22.711, 30.087, 7.065, 0.484)
pt3dadd(23.398, 31.959, 7.065, 0.484)
pt3dadd(23.843, 33.826, 5.592, 0.484)
pt3dadd(24.066, 34.76, 5.592, 0.484)
pt3dadd(24.269, 36.622, 5.265, 0.484)
}
dend[27] {pt3dclear()
pt3dadd(5.058, -16.962, 22.927, 0.968)
pt3dadd(4.608, -18.597, 20.972, 0.726)
pt3dadd(3.674, -20.242, 19.67, 0.726)
pt3dadd(2.252, -21.665, 18.243, 0.726)
pt3dadd(0.578, -22.629, 17.25, 0.726)
pt3dadd(-0.868, -22.892, 15.608, 0.726)
pt3dadd(-2.068, -23.381, 13.4, 0.726)
pt3dadd(-2.276, -25.011, 12.212, 0.726)
pt3dadd(-2.978, -26.187, 10.412, 0.484)
pt3dadd(-4.656, -26.919, 8.068, 0.484)
pt3dadd(-5.614, -27.403, 7.465, 0.484)
pt3dadd(-6.819, -27.661, 6.267, 0.484)
pt3dadd(-7.767, -28.609, 4.94, 0.484)
pt3dadd(-8.735, -28.629, 3.9, 0.484)
pt3dadd(-9.944, -28.655, 1.445, 0.484)
pt3dadd(-11.154, -28.68, -0.273, 0.484)
pt3dadd(-12.353, -29.169, -0.273, 0.484)
pt3dadd(-13.534, -30.587, -0.273, 0.484)
}
dend[28] {pt3dclear()
pt3dadd(6.988, -16.69, 25.44, 0.968)
pt3dadd(6.79, -18.784, 25.44, 0.968)
pt3dadd(6.596, -21.11, 24.582, 0.968)
pt3dadd(6.645, -23.432, 24.582, 0.968)
pt3dadd(6.446, -25.526, 22.975, 0.968)
pt3dadd(6.243, -27.388, 22.975, 0.968)
pt3dadd(6.756, -28.771, 21.905, 0.968)
pt3dadd(6.804, -31.093, 21.285, 0.968)
pt3dadd(5.614, -32.046, 21.285, 0.726)
pt3dadd(4.414, -32.536, 21.285, 0.726)
pt3dadd(3.713, -33.712, 21.285, 0.968)
pt3dadd(3.268, -35.579, 19.877, 0.968)
pt3dadd(3.558, -37.895, 17.795, 0.968)
pt3dadd(3.597, -39.753, 16.16, 0.968)
pt3dadd(3.394, -41.615, 14.467, 0.968)
pt3dadd(4.168, -43.921, 13.815, 0.726)
pt3dadd(4.695, -46, 13.023, 0.726)
pt3dadd(5.484, -49.003, 13.023, 0.726)
pt3dadd(5.755, -50.391, 11.532, 0.484)
pt3dadd(6.035, -52.243, 10.332, 0.484)
pt3dadd(5.092, -53.424, 9.075, 0.484)
pt3dadd(4.385, -54.367, 9.075, 0.484)
pt3dadd(3.437, -55.316, 9.075, 0.484)
pt3dadd(2.489, -56.265, 8.847, 0.484)
pt3dadd(1.792, -57.673, 7.17, 0.484)
pt3dadd(1.101, -59.313, 6.407, 0.484)
pt3dadd(1.13, -60.706, 5.742, 0.484)
pt3dadd(-0.046, -62.356, 5.335, 0.484)
pt3dadd(-1.473, -63.547, 3.965, 0.484)
pt3dadd(-2.886, -65.434, 3.002, 0.484)
pt3dadd(-3.578, -67.075, 3.002, 0.484)
pt3dadd(-4.502, -69.184, 1.767, 0.484)
pt3dadd(-4.942, -71.283, 0.837, 0.484)
pt3dadd(-4.923, -72.212, 0.475, 0.484)
pt3dadd(-5.861, -73.625, 0.442, 0.484)
}
dend[29] {pt3dclear()
pt3dadd(34.657, -36.806, 65.99, 2.662)
pt3dadd(42.072, -28.035, 65.993, 2.662)
pt3dadd(42.793, -27.788, 65.993, 2.662)
pt3dadd(44.234, -27.293, 67.34, 2.662)
pt3dadd(45.928, -27.258, 69.38, 2.904)
pt3dadd(48.1, -26.981, 69.448, 2.904)
pt3dadd(50.03, -26.708, 70.205, 2.904)
}
dend[30] {pt3dclear()
pt3dadd(50.03, -26.708, 70.205, 2.904)
pt3dadd(50.969, -25.295, 70.205, 1.936)
pt3dadd(52.633, -23.867, 70.472, 1.694)
pt3dadd(54.06, -22.676, 71.372, 1.694)
pt3dadd(55.482, -21.253, 71.372, 1.694)
pt3dadd(56.658, -19.603, 72.438, 1.694)
pt3dadd(57.838, -18.185, 73.19, 1.452)
pt3dadd(59.493, -16.292, 73.887, 1.452)
pt3dadd(60.915, -14.869, 74.265, 1.21)
pt3dadd(61.844, -12.992, 74.265, 1.21)
pt3dadd(63.257, -11.104, 74.265, 1.21)
pt3dadd(64.674, -9.449, 74.338, 1.21)
pt3dadd(66.338, -8.021, 74.03, 1.21)
pt3dadd(67.538, -7.532, 74.03, 0.968)
pt3dadd(69.198, -5.871, 73.435, 0.968)
pt3dadd(69.943, -6.785, 73.435, 0.968)
pt3dadd(71.36, -5.129, 70.575, 1.21)
pt3dadd(72.299, -3.716, 70.575, 1.21)
pt3dadd(72.99, -2.076, 70.575, 1.21)
pt3dadd(74.151, 0.27, 69.29, 1.21)
pt3dadd(75.806, 2.163, 67.8, 1.21)
pt3dadd(77.228, 3.586, 67.8, 1.21)
pt3dadd(78.414, 4.772, 65.74, 1.21)
pt3dadd(78.883, 5.478, 65.74, 1.21)
}
dend[31] {pt3dclear()
pt3dadd(78.883, 5.478, 65.74, 1.21)
pt3dadd(79.318, 7.81, 67.923, 1.452)
pt3dadd(80.005, 9.682, 67.923, 1.452)
pt3dadd(80.117, 11.287, 66.885, 0.968)
pt3dadd(80.321, 13.149, 64.813, 0.968)
pt3dadd(81.008, 15.021, 63.622, 0.968)
pt3dadd(80.964, 17.11, 63.622, 0.968)
pt3dadd(80.451, 18.493, 62.62, 0.968)
pt3dadd(79.963, 18.715, 62.62, 0.968)
}
dend[32] {pt3dclear()
pt3dadd(79.963, 18.715, 62.62, 0.968)
pt3dadd(78.057, 17.282, 62.677, 0.484)
pt3dadd(77.094, 17.03, 62.677, 0.484)
pt3dadd(75.657, 16.303, 62.677, 0.484)
pt3dadd(74.951, 15.359, 62.677, 0.484)
pt3dadd(74.003, 14.411, 62.677, 0.484)
pt3dadd(72.793, 14.385, 62.677, 0.484)
pt3dadd(71.826, 14.365, 61.675, 0.484)
pt3dadd(71.134, 12.725, 61.622, 0.484)
pt3dadd(70.93, 10.863, 61.622, 0.484)
pt3dadd(69.997, 9.218, 60.627, 0.484)
pt3dadd(68.579, 7.562, 60.145, 0.484)
pt3dadd(67.641, 6.149, 58.455, 0.484)
pt3dadd(66.455, 4.964, 58.455, 0.484)
pt3dadd(65.27, 3.778, 58.455, 0.484)
pt3dadd(63.833, 3.051, 57.725, 0.484)
pt3dadd(63.156, 0.714, 57.725, 0.484)
pt3dadd(61.976, -0.704, 57.725, 0.484)
pt3dadd(60.8, -2.354, 57.725, 0.484)
pt3dadd(59.378, -3.777, 57.132, 0.484)
pt3dadd(57.951, -4.968, 57.132, 0.484)
pt3dadd(57.249, -6.144, 57.132, 0.484)
pt3dadd(55.822, -7.335, 57.132, 0.484)
pt3dadd(54.879, -8.516, 57.132, 0.484)
pt3dadd(53.456, -9.939, 55.977, 0.484)
pt3dadd(52.513, -11.12, 55.977, 0.484)
pt3dadd(52.053, -12.29, 55.977, 0.484)
pt3dadd(51.599, -13.693, 55.977, 0.484)
pt3dadd(50.665, -15.338, 55.01, 0.484)
pt3dadd(48.991, -16.302, 55.01, 0.484)
pt3dadd(48.048, -17.483, 55.01, 0.484)
pt3dadd(47.361, -19.356, 53.2, 0.484)
pt3dadd(47.138, -20.289, 53.2, 0.484)
pt3dadd(45.948, -21.243, 53.2, 0.484)
pt3dadd(44.511, -21.97, 51.58, 0.484)
pt3dadd(43.548, -22.222, 51.237, 0.484)
pt3dadd(42.363, -23.408, 50.645, 0.484)
pt3dadd(41.434, -25.285, 49.852, 0.484)
pt3dadd(40.501, -26.93, 49.852, 0.484)
pt3dadd(39.315, -28.116, 48.88, 0.484)
pt3dadd(39.557, -28.111, 49.548, 0.484)
pt3dadd(38.13, -29.302, 47.52, 0.484)
pt3dadd(37.429, -30.478, 47.52, 0.484)
pt3dadd(36.732, -31.886, 47.52, 0.484)
pt3dadd(36.268, -32.825, 47.52, 0.484)
pt3dadd(35.068, -33.314, 47.52, 0.484)
pt3dadd(34.105, -33.566, 47.52, 0.484)
pt3dadd(33.873, -34.036, 47.52, 0.484)
pt3dadd(33.887, -34.732, 47.52, 0.484)
pt3dadd(33.423, -35.671, 47.52, 0.484)
pt3dadd(32.717, -36.614, 45.91, 0.484)
pt3dadd(32.741, -37.775, 45.91, 0.484)
pt3dadd(32.77, -39.168, 45.91, 0.484)
pt3dadd(32.557, -40.566, 43.912, 0.484)
pt3dadd(31.599, -41.05, 43.912, 0.484)
pt3dadd(30.172, -42.241, 43.912, 0.484)
pt3dadd(28.508, -43.67, 43.497, 0.484)
pt3dadd(27.327, -45.088, 42.57, 0.484)
pt3dadd(26.384, -46.268, 40.745, 0.484)
pt3dadd(25.199, -47.454, 40.745, 0.484)
pt3dadd(24.734, -48.393, 40.745, 0.484)
pt3dadd(24.773, -50.25, 39.412, 0.484)
}
}
proc shape3d_4() {
dend[32] { pt3dadd(24.323, -51.885, 38.545, 0.484)
pt3dadd(23.157, -54, 38.545, 0.484)
pt3dadd(22.219, -55.413, 37.872, 0.484)
pt3dadd(20.559, -57.073, 36.48, 0.484)
pt3dadd(18.905, -58.966, 36.48, 0.484)
pt3dadd(18.934, -60.358, 36.605, 0.484)
pt3dadd(17.274, -62.019, 35.743, 0.484)
pt3dadd(16.089, -63.205, 33.818, 0.484)
pt3dadd(14.667, -64.628, 31.475, 0.484)
pt3dadd(13.467, -65.117, 30.23, 0.484)
pt3dadd(12.732, -64.668, 30.227, 0.484)
pt3dadd(13.907, -63.018, 29.147, 0.484)
pt3dadd(14.13, -62.084, 28.97, 0.484)
}
dend[33] {pt3dclear()
pt3dadd(78.883, 5.478, 65.74, 1.21)
pt3dadd(79.87, 4.57, 65.722, 0.484)
pt3dadd(80.595, 4.585, 65.722, 0.484)
pt3dadd(81.824, 3.682, 62.505, 0.484)
pt3dadd(82.327, 2.763, 62.505, 0.484)
pt3dadd(83.542, 2.556, 62.493, 0.484)
pt3dadd(84.761, 2.117, 61.25, 0.484)
pt3dadd(86.706, 1.693, 59.993, 0.484)
pt3dadd(87.451, 0.78, 59.995, 0.484)
pt3dadd(88.931, -0.583, 59.995, 0.484)
pt3dadd(90.16, -1.486, 59.995, 0.484)
pt3dadd(91.635, -2.617, 59.995, 0.484)
pt3dadd(92.869, -3.752, 56.375, 0.484)
pt3dadd(94.112, -5.352, 52.118, 0.484)
pt3dadd(95.099, -6.26, 52.118, 0.484)
pt3dadd(96.091, -7.401, 52.118, 0.484)
pt3dadd(98.055, -8.754, 51.313, 0.484)
pt3dadd(98.805, -9.899, 49.942, 0.726)
pt3dadd(100.3, -11.958, 48.167, 0.726)
pt3dadd(101.07, -14.032, 45.015, 0.726)
pt3dadd(102.78, -14.926, 43.595, 0.726)
pt3dadd(104.25, -15.592, 41.112, 0.726)
pt3dadd(105.96, -16.253, 39.605, 0.484)
pt3dadd(106.92, -16.233, 39.605, 0.484)
pt3dadd(107.42, -16.687, 39.605, 0.484)
pt3dadd(107.68, -17.843, 39.605, 0.484)
pt3dadd(108.68, -19.448, 35.432, 0.726)
pt3dadd(109.45, -21.29, 34.38, 0.726)
pt3dadd(110.94, -23.116, 33.515, 0.726)
pt3dadd(111.69, -24.494, 33.475, 0.726)
pt3dadd(112.93, -25.862, 30.995, 0.726)
pt3dadd(113.91, -26.538, 29.252, 0.726)
pt3dadd(115.14, -27.441, 28.172, 0.484)
pt3dadd(115.42, -29.294, 25.78, 0.484)
pt3dadd(114.73, -30.934, 23.052, 0.484)
pt3dadd(114.27, -31.872, 23.052, 0.484)
pt3dadd(114.78, -33.255, 23.052, 0.484)
pt3dadd(115.07, -35.339, 22.487, 0.484)
pt3dadd(114.37, -36.979, 21.927, 0.484)
pt3dadd(115.14, -38.822, 19.108, 0.484)
pt3dadd(116.86, -40.179, 17.045, 0.484)
pt3dadd(117.37, -41.33, 17.045, 0.484)
pt3dadd(117.64, -42.95, 17.045, 0.484)
pt3dadd(116.97, -45.286, 15.39, 0.484)
pt3dadd(116.28, -47.391, 15.39, 0.484)
pt3dadd(116.33, -49.712, 15.39, 0.484)
pt3dadd(115.14, -50.434, 14.87, 0.484)
pt3dadd(113.47, -51.63, 14.87, 0.484)
pt3dadd(111.56, -53.063, 14.87, 0.484)
pt3dadd(110.37, -54.017, 14.87, 0.484)
pt3dadd(109.67, -55.193, 14.87, 0.484)
pt3dadd(108.48, -56.146, 13.71, 0.484)
pt3dadd(107.76, -56.626, 13.71, 0.484)
}
dend[34] {pt3dclear()
pt3dadd(-164.62, -12.96, 62.885, 0.242)
pt3dadd(-164.17, -11.325, 62.885, 0.484)
pt3dadd(-163.96, -9.927, 62.885, 0.484)
pt3dadd(-163.74, -8.529, 62.885, 0.484)
pt3dadd(-163.52, -7.595, 62.885, 0.484)
pt3dadd(-163.55, -6.202, 62.885, 0.484)
pt3dadd(-163.82, -4.582, 62.885, 0.484)
pt3dadd(-164.09, -3.427, 62.885, 0.484)
pt3dadd(-164.12, -2.266, 62.885, 0.484)
pt3dadd(-164.39, -0.878, 62.885, 0.242)
pt3dadd(-163.94, 0.989, 62.885, 0.242)
pt3dadd(-164.22, 2.841, 62.885, 0.484)
pt3dadd(-164.5, 4.693, 62.885, 0.484)
pt3dadd(-164.31, 7.02, 62.885, 0.242)
pt3dadd(-164.09, 7.953, 62.885, 0.242)
pt3dadd(-164.36, 9.573, 61.23, 0.484)
pt3dadd(-164.39, 10.734, 61.23, 0.484)
pt3dadd(-164.66, 12.354, 61.23, 0.484)
pt3dadd(-165.42, 13.964, 61.23, 0.484)
pt3dadd(-166.66, 15.332, 60.607, 0.484)
pt3dadd(-168.14, 16.462, 59.56, 0.484)
pt3dadd(-169.62, 18.057, 59.56, 0.484)
pt3dadd(-171.12, 20.116, 59.56, 0.484)
pt3dadd(-171.41, 22.664, 59.56, 0.484)
pt3dadd(-171.71, 25.213, 59.56, 0.484)
pt3dadd(-171.97, 26.369, 59.95, 0.484)
pt3dadd(-172.48, 27.287, 59.95, 0.484)
pt3dadd(-173.95, 28.418, 61.572, 0.484)
pt3dadd(-174.22, 29.805, 60.69, 0.484)
pt3dadd(-174.03, 32.364, 60.69, 0.484)
pt3dadd(-173.6, 34.695, 60.69, 0.484)
pt3dadd(-173.62, 35.856, 60.69, 0.484)
pt3dadd(-174.15, 37.935, 60.69, 0.484)
pt3dadd(-174.43, 39.555, 60.69, 0.484)
pt3dadd(-174.96, 42.099, 60.69, 0.484)
pt3dadd(-175.23, 43.487, 60.69, 0.484)
pt3dadd(-175.01, 44.42, 60.69, 0.484)
pt3dadd(-174.32, 46.292, 60.69, 0.484)
pt3dadd(-174.11, 47.69, 60.69, 0.484)
pt3dadd(-173.91, 49.785, 58.907, 0.484)
pt3dadd(-173.71, 51.647, 58.907, 0.484)
pt3dadd(-173.28, 54.211, 58.907, 0.484)
pt3dadd(-172.58, 55.619, 58.907, 0.484)
pt3dadd(-171.15, 56.345, 58.907, 0.484)
pt3dadd(-170.68, 57.284, 58.907, 0.484)
pt3dadd(-170.24, 59.383, 58.907, 0.484)
pt3dadd(-168.83, 61.503, 58.907, 0.484)
pt3dadd(-167.67, 63.849, 58.907, 0.484)
pt3dadd(-166.73, 65.262, 60.035, 0.484)
pt3dadd(-166.04, 66.903, 60.035, 0.242)
pt3dadd(-165.58, 68.073, 60.035, 0.242)
pt3dadd(-165.61, 69.234, 60.035, 0.242)
pt3dadd(-164.91, 70.874, 60.035, 0.242)
}
dend[35] {pt3dclear()
pt3dadd(34.657, -36.806, 65.99, 2.904)
pt3dadd(33.1, -23.827, 65.993, 2.904)
pt3dadd(33.086, -23.131, 64.71, 2.904)
pt3dadd(33.076, -22.667, 63.208, 2.904)
pt3dadd(33.541, -21.728, 58.96, 3.388)
pt3dadd(33.758, -20.562, 58.135, 3.388)
pt3dadd(33.739, -19.634, 57.732, 3.146)
pt3dadd(33.961, -18.7, 57.493, 2.904)
pt3dadd(34.411, -17.065, 56.427, 2.662)
pt3dadd(34.629, -15.899, 54.6, 2.178)
pt3dadd(34.852, -14.966, 53.423, 1.936)
pt3dadd(35.311, -13.795, 53.3, 1.452)
pt3dadd(35.756, -11.928, 53.3, 1.452)
pt3dadd(36.685, -10.05, 52.045, 1.21)
pt3dadd(36.898, -8.652, 52.045, 1.21)
pt3dadd(37.822, -6.543, 50.993, 0.968)
pt3dadd(38.291, -5.836, 50.993, 0.968)
}
dend[36] {pt3dclear()
pt3dadd(50.03, -26.708, 70.205, 2.904)
pt3dadd(51.183, -28.566, 69.982, 1.21)
pt3dadd(55.092, -30.342, 69.982, 0.968)
pt3dadd(56.567, -31.473, 69.982, 0.968)
pt3dadd(58.773, -32.82, 69.982, 0.968)
pt3dadd(60.263, -34.647, 69.982, 0.968)
pt3dadd(61.274, -36.716, 69.982, 0.726)
pt3dadd(62.029, -38.094, 69.982, 0.726)
pt3dadd(63.011, -38.77, 69.905, 0.484)
pt3dadd(64.472, -39.204, 69.905, 0.484)
pt3dadd(66.393, -38.467, 69.905, 0.484)
pt3dadd(67.578, -37.281, 71.335, 0.484)
pt3dadd(68.749, -35.399, 73.445, 0.484)
pt3dadd(70.408, -33.739, 74.478, 0.484)
pt3dadd(72.077, -32.543, 74.728, 0.484)
pt3dadd(73.993, -31.574, 75.202, 0.484)
pt3dadd(76.141, -30.136, 73.842, 0.484)
pt3dadd(77.563, -28.713, 73.842, 0.484)
pt3dadd(79.726, -27.971, 73.842, 0.484)
pt3dadd(82.86, -27.441, 73.06, 0.484)
pt3dadd(84.302, -26.946, 73.06, 0.484)
pt3dadd(86.455, -25.74, 73.06, 0.484)
pt3dadd(87.669, -25.947, 72.145, 0.484)
pt3dadd(88.879, -25.922, 72.145, 0.484)
pt3dadd(89.58, -24.746, 69.98, 0.484)
pt3dadd(90.77, -23.792, 69.182, 0.484)
pt3dadd(92.217, -23.53, 68.063, 0.484)
pt3dadd(94.128, -22.329, 66.927, 0.484)
pt3dadd(96.276, -20.891, 64.868, 0.484)
pt3dadd(97.466, -19.937, 63.403, 0.484)
pt3dadd(98.661, -19.215, 63.403, 0.484)
}
dend[37] {pt3dclear()
pt3dadd(98.661, -19.215, 63.403, 0.484)
pt3dadd(100.35, -19.18, 59.96, 0.484)
pt3dadd(101.09, -19.629, 59.96, 0.484)
pt3dadd(102.06, -19.841, 59.182, 0.484)
pt3dadd(103.76, -20.038, 57.155, 0.484)
pt3dadd(105.45, -20.003, 56.252, 0.484)
pt3dadd(107.14, -19.735, 56.125, 0.484)
pt3dadd(108.61, -20.634, 50.442, 0.484)
pt3dadd(109.84, -21.305, 48.653, 0.484)
pt3dadd(110.8, -21.285, 48.525, 0.484)
pt3dadd(111.75, -20.336, 47.305, 0.484)
pt3dadd(113.67, -19.599, 46.872, 0.484)
pt3dadd(117.03, -18.136, 45.772, 0.484)
pt3dadd(118.23, -17.646, 45.772, 0.484)
pt3dadd(119.91, -16.915, 47.26, 0.484)
pt3dadd(120.86, -15.966, 47.26, 0.484)
pt3dadd(121.81, -15.017, 47.26, 0.484)
pt3dadd(123.49, -14.518, 48.38, 0.484)
pt3dadd(125.41, -14.013, 48.8, 0.484)
pt3dadd(126.36, -12.832, 48.8, 0.484)
pt3dadd(128.5, -11.162, 49.442, 0.484)
}
dend[38] {pt3dclear()
pt3dadd(128.5, -11.162, 49.442, 0.484)
pt3dadd(131.37, -9.476, 50.927, 0.484)
pt3dadd(133.05, -8.745, 50.927, 0.484)
}
dend[39] {pt3dclear()
pt3dadd(133.05, -8.745, 50.927, 0.484)
pt3dadd(134.53, -10.107, 49.392, 0.242)
pt3dadd(135.03, -10.794, 48.765, 0.242)
pt3dadd(135.79, -12.403, 48.122, 0.242)
pt3dadd(135.77, -11.707, 42.712, 0.242)
pt3dadd(136.49, -11.46, 42.712, 0.242)
pt3dadd(138.43, -11.419, 42.712, 0.242)
pt3dadd(138.17, -10.728, 39.597, 0.242)
pt3dadd(138.16, -10.264, 36.59, 0.242)
}
}
proc shape3d_5() {
dend[39] { pt3dadd(139.11, -9.315, 35.425, 0.242)
pt3dadd(139.83, -9.068, 33.607, 0.242)
pt3dadd(140.54, -8.356, 30.225, 0.242)
pt3dadd(139.32, -7.685, 30.225, 0.242)
pt3dadd(138.34, -7.241, 30.225, 0.242)
pt3dadd(137.59, -6.095, 28.75, 0.242)
pt3dadd(136.35, -4.495, 26.765, 0.242)
pt3dadd(137.07, -4.48, 21.25, 0.242)
pt3dadd(137.32, -4.475, 19.667, 0.242)
pt3dadd(136.84, -4.95, 17.722, 0.242)
pt3dadd(135.66, -6.136, 16.005, 0.242)
pt3dadd(134.97, -8.008, 14.34, 0.242)
pt3dadd(134.76, -9.406, 13.502, 0.242)
pt3dadd(134.04, -9.885, 10.702, 0.242)
pt3dadd(134.28, -9.648, 8.88, 0.242)
pt3dadd(134.76, -9.638, 6.875, 0.242)
pt3dadd(135.49, -9.623, 2.082, 0.242)
pt3dadd(134.75, -9.174, -0.225, 0.242)
pt3dadd(133.07, -9.673, -0.225, 0.242)
pt3dadd(131.89, -11.091, -3.725, 0.242)
pt3dadd(130.93, -11.576, -3.725, 0.484)
pt3dadd(129.24, -12.075, -3.725, 0.484)
pt3dadd(127.31, -11.883, -3.725, 0.484)
pt3dadd(125.38, -12.388, -3.725, 0.484)
pt3dadd(123.68, -12.191, -3.725, 0.484)
pt3dadd(121.5, -12.004, -4.467, 0.484)
pt3dadd(120.29, -12.03, -3.772, 0.484)
pt3dadd(118.38, -13.231, -2.533, 0.484)
pt3dadd(116.94, -13.725, -2.533, 0.484)
pt3dadd(115.26, -14.457, -1.022, 0.484)
pt3dadd(113.58, -15.189, -1.022, 0.484)
pt3dadd(111.13, -13.846, -1.022, 0.484)
pt3dadd(108.93, -12.499, -1.022, 0.484)
pt3dadd(106.73, -11.615, -1.022, 0.484)
pt3dadd(104.55, -11.661, -1.022, 0.484)
pt3dadd(102.85, -11, -1.022, 0.484)
pt3dadd(100.91, -10.808, -1.022, 0.484)
pt3dadd(98.961, -10.384, -1.022, 0.484)
pt3dadd(97.011, -9.728, -1.022, 0.726)
pt3dadd(95.299, -8.835, -1.022, 0.968)
pt3dadd(93.591, -8.173, -1.022, 0.968)
pt3dadd(92.13, -7.739, -1.022, 0.968)
pt3dadd(90.669, -7.305, -1.022, 0.968)
pt3dadd(89.445, -6.634, -1.413, 0.968)
pt3dadd(87.722, -5.276, -1.992, 0.968)
pt3dadd(86.982, -4.595, -1.992, 0.968)
}
dend[40] {pt3dclear()
pt3dadd(133.05, -8.745, 50.927, 0.484)
pt3dadd(133.73, -6.64, 50.927, 0.484)
pt3dadd(134.91, -5.454, 53.592, 0.484)
pt3dadd(135.86, -4.273, 54.425, 0.484)
pt3dadd(137.04, -3.087, 54.425, 0.484)
pt3dadd(137.76, -2.84, 54.425, 0.484)
pt3dadd(138.96, -1.886, 54.425, 0.484)
pt3dadd(140.38, -0.463, 56.42, 0.484)
pt3dadd(141.79, 1.192, 56.42, 0.484)
pt3dadd(143.22, 2.383, 58.315, 0.484)
pt3dadd(144.89, 3.811, 58.315, 0.484)
pt3dadd(146.07, 5.229, 59.43, 0.484)
pt3dadd(146.78, 5.708, 59.43, 0.484)
pt3dadd(147.98, 6.43, 60.493, 0.484)
pt3dadd(149.89, 7.631, 60.493, 0.484)
pt3dadd(151.58, 7.899, 61.607, 0.484)
pt3dadd(153.28, 7.237, 61.76, 0.484)
pt3dadd(155.23, 6.581, 62.96, 0.484)
pt3dadd(156.7, 5.915, 62.96, 0.484)
pt3dadd(159.37, 5.738, 62.96, 0.484)
pt3dadd(160.82, 5.537, 63.91, 0.484)
pt3dadd(163.5, 4.896, 63.91, 0.484)
pt3dadd(164.97, 3.997, 62.397, 0.484)
pt3dadd(166.2, 2.862, 61.75, 0.484)
pt3dadd(167.68, 1.731, 61.75, 0.484)
pt3dadd(168.9, 1.06, 60.743, 0.484)
pt3dadd(170.12, 0.621, 60.743, 0.484)
pt3dadd(171.34, 0.414, 60.743, 0.484)
pt3dadd(172.56, -0.489, 60.743, 0.484)
pt3dadd(174.52, -1.378, 60.743, 0.484)
pt3dadd(176.96, -2.488, 62.368, 0.484)
pt3dadd(178.65, -2.453, 59.567, 0.484)
pt3dadd(179.64, -3.129, 59.567, 0.484)
pt3dadd(182.32, -4.002, 59.567, 0.484)
pt3dadd(183.55, -5.137, 57.257, 0.484)
pt3dadd(185.77, -6.949, 57.257, 0.484)
pt3dadd(186.75, -7.626, 55, 0.484)
pt3dadd(188.46, -8.287, 54.993, 0.484)
pt3dadd(190.16, -8.716, 54.993, 0.484)
pt3dadd(191.63, -9.614, 54.993, 0.484)
pt3dadd(192.63, -11.451, 54.993, 0.484)
pt3dadd(193.15, -13.066, 54.993, 0.484)
pt3dadd(194.86, -13.727, 55.575, 0.484)
pt3dadd(197.05, -14.146, 55.575, 0.484)
pt3dadd(198.99, -14.57, 56.162, 0.484)
pt3dadd(200, -16.407, 54.285, 0.484)
pt3dadd(200.74, -17.32, 53.502, 0.484)
pt3dadd(201.97, -18.224, 53.502, 0.484)
pt3dadd(202.95, -18.9, 51.458, 0.484)
pt3dadd(203.24, -20.752, 51.458, 0.484)
pt3dadd(203.03, -22.614, 51.458, 0.484)
pt3dadd(202.34, -24.254, 51.458, 0.484)
pt3dadd(202.37, -25.879, 49.862, 0.484)
pt3dadd(203.38, -27.949, 49.862, 0.484)
pt3dadd(204.4, -30.018, 49.778, 0.484)
pt3dadd(205.4, -31.855, 49.778, 0.484)
pt3dadd(205.91, -33.237, 49.778, 0.484)
pt3dadd(206.19, -34.625, 49.778, 0.484)
pt3dadd(206.7, -36.008, 49.778, 0.484)
pt3dadd(206.26, -38.107, 49.778, 0.484)
pt3dadd(206.52, -39.263, 50.903, 0.484)
pt3dadd(206.81, -41.347, 50.903, 0.484)
pt3dadd(207.82, -43.184, 50.28, 0.484)
pt3dadd(209.06, -44.784, 50.28, 0.484)
pt3dadd(210.32, -47.312, 50.28, 0.484)
pt3dadd(211.33, -49.149, 50.237, 0.484)
}
dend[41] {pt3dclear()
pt3dadd(211.33, -49.149, 50.237, 0.484)
pt3dadd(213.48, -47.943, 48.612, 0.242)
pt3dadd(215.41, -47.671, 48.612, 0.242)
pt3dadd(216.11, -46.263, 48.612, 0.242)
pt3dadd(217.81, -46.46, 47.042, 0.242)
pt3dadd(219.5, -46.657, 47.042, 0.242)
pt3dadd(220.94, -45.93, 45.857, 0.242)
pt3dadd(222.61, -44.734, 44.215, 0.242)
pt3dadd(223.8, -43.548, 44.215, 0.242)
pt3dadd(225.95, -42.342, 44.215, 0.242)
pt3dadd(227.61, -40.914, 44.215, 0.242)
pt3dadd(229.04, -39.955, 44.215, 0.242)
pt3dadd(229.5, -38.784, 44.215, 0.242)
pt3dadd(229.97, -37.846, 41.708, 0.242)
pt3dadd(230.68, -36.902, 41.708, 0.242)
pt3dadd(231.87, -36.18, 41.708, 0.242)
pt3dadd(233.06, -35.226, 41.708, 0.242)
pt3dadd(233.76, -34.051, 41.708, 0.242)
pt3dadd(234.45, -32.41, 41.708, 0.242)
pt3dadd(235.65, -31.921, 41.708, 0.242)
pt3dadd(237.35, -32.118, 41.708, 0.242)
pt3dadd(238.55, -31.396, 41.708, 0.242)
pt3dadd(239.72, -29.514, 41.708, 0.242)
pt3dadd(240.91, -28.792, 41.708, 0.242)
pt3dadd(241.85, -27.379, 41.708, 0.242)
pt3dadd(243.03, -25.729, 41.708, 0.242)
pt3dadd(243.73, -24.785, 41.708, 0.242)
pt3dadd(245.16, -23.826, 41.708, 0.242)
pt3dadd(247.08, -22.858, 41.708, 0.242)
pt3dadd(249.23, -21.419, 41.708, 0.242)
pt3dadd(251.63, -20.44, 40.28, 0.242)
pt3dadd(254.25, -18.76, 40.28, 0.242)
pt3dadd(256.41, -17.786, 40.28, 0.242)
pt3dadd(257.62, -17.529, 40.28, 0.242)
pt3dadd(259.08, -17.963, 40.28, 0.242)
pt3dadd(260.31, -19.098, 39.447, 0.484)
pt3dadd(261.79, -20.229, 39.447, 0.484)
pt3dadd(263.02, -21.364, 39.447, 0.484)
pt3dadd(264.02, -22.969, 39.447, 0.484)
pt3dadd(265.25, -23.872, 37.952, 0.484)
pt3dadd(267.45, -24.756, 37.952, 0.726)
pt3dadd(270.12, -25.397, 37.952, 0.968)
pt3dadd(273.28, -26.027, 35.695, 1.21)
pt3dadd(276.44, -26.426, 34.693, 1.452)
pt3dadd(278.37, -26.386, 34.693, 1.452)
pt3dadd(280.07, -26.815, 34.693, 1.452)
}
dend[42] {pt3dclear()
pt3dadd(211.33, -49.149, 50.237, 0.484)
pt3dadd(210.39, -50.562, 48.427, 0.242)
pt3dadd(210.41, -51.491, 48.427, 0.242)
pt3dadd(209.47, -52.904, 48.427, 0.242)
pt3dadd(209.01, -53.843, 48.427, 0.242)
pt3dadd(209.04, -55.468, 46.12, 0.242)
pt3dadd(209.57, -57.547, 46.12, 0.242)
pt3dadd(209.85, -59.631, 44.635, 0.242)
pt3dadd(208.68, -61.281, 44.635, 0.242)
pt3dadd(208.72, -63.139, 44.635, 0.242)
pt3dadd(208.52, -65.233, 44.635, 0.242)
pt3dadd(208.31, -66.863, 44.635, 0.242)
pt3dadd(208.57, -67.787, 44.635, 0.242)
pt3dadd(208.87, -70.335, 44.635, 0.242)
pt3dadd(209.14, -71.723, 43.235, 0.242)
pt3dadd(209.4, -72.646, 43.235, 0.242)
pt3dadd(208.7, -73.822, 43.235, 0.242)
pt3dadd(207.99, -74.998, 41.955, 0.242)
pt3dadd(208.29, -77.315, 41.955, 0.242)
pt3dadd(208.57, -79.166, 41.955, 0.242)
pt3dadd(209.11, -81.942, 41.955, 0.242)
pt3dadd(208.42, -83.582, 41.955, 0.242)
pt3dadd(207.48, -84.995, 41.955, 0.242)
pt3dadd(207.27, -86.625, 41.597, 0.242)
pt3dadd(208.29, -88.927, 41.597, 0.242)
pt3dadd(208.57, -90.779, 41.597, 0.242)
pt3dadd(207.88, -92.883, 41.597, 0.242)
pt3dadd(206.24, -95.24, 41.597, 0.242)
pt3dadd(205.8, -97.339, 40.71, 0.242)
pt3dadd(205.11, -98.979, 40.71, 0.242)
pt3dadd(203.67, -99.706, 40.71, 0.242)
pt3dadd(202.98, -101.58, 40.71, 0.242)
pt3dadd(202.06, -103.92, 40.71, 0.242)
pt3dadd(200.66, -106.27, 40.71, 0.242)
pt3dadd(199.72, -107.68, 43.247, 0.242)
}
dend[43] {pt3dclear()
pt3dadd(128.5, -11.162, 49.442, 0.484)
pt3dadd(127.49, -9.325, 54.597, 0.242)
pt3dadd(127.23, -8.401, 54.597, 0.242)
pt3dadd(126.98, -7.71, 54.597, 0.242)
pt3dadd(126.24, -7.029, 56.403, 0.242)
pt3dadd(125.5, -6.347, 56.403, 0.242)
pt3dadd(125.48, -5.651, 56.403, 0.242)
}
}
proc shape3d_6() {
dend[43] { pt3dadd(124.27, -5.444, 55.94, 0.242)
pt3dadd(123.29, -4.768, 55.94, 0.242)
}
dend[44] {pt3dclear()
pt3dadd(123.29, -4.768, 55.94, 0.242)
pt3dadd(123.01, -3.38, 56.72, 0.242)
pt3dadd(122.03, -2.704, 56.72, 0.242)
pt3dadd(121.76, -1.316, 56.72, 0.242)
pt3dadd(122.22, -0.145, 56.72, 0.242)
pt3dadd(121.71, 1.238, 56.917, 0.242)
pt3dadd(120.71, 2.843, 56.917, 0.242)
pt3dadd(120.46, 3.07, 55.897, 0.242)
pt3dadd(120.43, 4.463, 59.887, 0.242)
pt3dadd(122.09, 6.123, 60.38, 0.242)
pt3dadd(123.03, 7.536, 61.65, 0.242)
pt3dadd(122.99, 9.393, 61.69, 0.242)
pt3dadd(123.44, 10.796, 61.69, 0.242)
pt3dadd(122.93, 12.179, 62.875, 0.242)
pt3dadd(122.42, 13.562, 62.875, 0.242)
pt3dadd(122.16, 14.485, 63.567, 0.242)
pt3dadd(121.17, 15.394, 64.103, 0.242)
pt3dadd(120.92, 16.085, 65.11, 0.242)
pt3dadd(120.89, 17.013, 65.11, 0.242)
pt3dadd(120.63, 18.169, 65.11, 0.242)
pt3dadd(120.61, 19.098, 65.375, 0.242)
pt3dadd(120.34, 20.253, 65.438, 0.242)
pt3dadd(120.33, 20.95, 65.645, 0.242)
pt3dadd(120.3, 22.343, 65.645, 0.242)
pt3dadd(119.56, 23.256, 65.76, 0.242)
pt3dadd(118.81, 24.402, 66.525, 0.242)
pt3dadd(118.78, 25.562, 67.48, 0.242)
pt3dadd(118.99, 27.193, 68.948, 0.242)
pt3dadd(118.97, 27.889, 69.222, 0.242)
pt3dadd(118.7, 29.509, 69.9, 0.242)
pt3dadd(118.43, 30.897, 71.245, 0.242)
pt3dadd(118.14, 32.981, 71.975, 0.242)
pt3dadd(118.12, 33.91, 74.69, 0.242)
pt3dadd(118.58, 35.08, 74.015, 0.242)
pt3dadd(118.57, 35.545, 74.925, 0.242)
pt3dadd(118.81, 36.014, 75.692, 0.242)
pt3dadd(118.54, 36.938, 76.667, 0.242)
pt3dadd(117.8, 37.851, 77.688, 0.242)
pt3dadd(118.18, 38.674, 77.688, 0.242)
pt3dadd(118.31, 39.359, 77.688, 0.242)
pt3dadd(118.07, 40.816, 77.688, 0.242)
pt3dadd(117.05, 41.943, 77.688, 0.242)
pt3dadd(116.78, 43.171, 79.495, 0.242)
pt3dadd(116.78, 44.585, 80.905, 0.242)
pt3dadd(116.39, 45.128, 84.135, 0.242)
pt3dadd(117.27, 45.914, 84.135, 0.242)
pt3dadd(117.51, 47.285, 84.135, 0.242)
pt3dadd(116.36, 47.727, 84.135, 0.242)
pt3dadd(115.73, 48.312, 84.31, 0.242)
pt3dadd(115.89, 49.227, 84.368, 0.242)
pt3dadd(115.34, 50.269, 84.368, 0.242)
pt3dadd(114.75, 51.082, 85.94, 0.242)
pt3dadd(114.28, 52.582, 80.342, 0.242)
pt3dadd(113.93, 53.353, 80.342, 0.242)
pt3dadd(114.09, 54.267, 81.717, 0.242)
pt3dadd(113.71, 56.223, 83.353, 0.242)
pt3dadd(113.28, 57.951, 84.438, 0.242)
pt3dadd(112.81, 59.451, 85.345, 0.242)
pt3dadd(112.14, 61.221, 89.003, 0.242)
pt3dadd(112.39, 62.592, 89.393, 0.242)
pt3dadd(111.96, 64.32, 89.628, 0.242)
pt3dadd(111.41, 65.363, 90.375, 0.242)
pt3dadd(111.26, 67.276, 90.848, 0.242)
pt3dadd(110.04, 68.675, 92.49, 0.242)
pt3dadd(109.68, 69.446, 92.993, 0.242)
pt3dadd(109.49, 71.131, 92.993, 0.242)
pt3dadd(108.79, 72.673, 94.25, 0.242)
pt3dadd(108.28, 73.944, 93.527, 0.242)
pt3dadd(108.68, 74.815, 93.713, 0.242)
pt3dadd(108.61, 75.772, 95.387, 0.242)
pt3dadd(109.16, 76.144, 97.645, 0.242)
pt3dadd(110.04, 76.93, 97.645, 0.242)
pt3dadd(110.48, 78.03, 99.335, 0.242)
pt3dadd(110.8, 78.445, 101.37, 0.242)
pt3dadd(111.52, 78.317, 101.37, 0.242)
pt3dadd(113.35, 78.933, 103.42, 0.242)
pt3dadd(114.15, 79.262, 105.79, 0.242)
pt3dadd(114.94, 79.591, 105.79, 0.242)
pt3dadd(115.58, 80.42, 105.79, 0.242)
pt3dadd(115.66, 80.877, 105.79, 0.242)
pt3dadd(115.79, 81.563, 109.6, 0.242)
pt3dadd(115.67, 82.291, 109.6, 0.242)
}
dend[45] {pt3dclear()
pt3dadd(123.29, -4.768, 55.94, 0.242)
pt3dadd(121.36, -5.504, 52.41, 0.242)
pt3dadd(119.68, -6.004, 51.757, 0.242)
pt3dadd(117.5, -6.049, 51.757, 0.242)
pt3dadd(116.29, -5.61, 50.292, 0.242)
pt3dadd(115.56, -5.625, 50.292, 0.242)
pt3dadd(114.6, -5.878, 50.455, 0.242)
}
dend[46] {pt3dclear()
pt3dadd(114.6, -5.878, 50.455, 0.242)
pt3dadd(112.91, -6.377, 49.188, 0.242)
pt3dadd(111.71, -6.635, 47.252, 0.242)
pt3dadd(110.97, -6.185, 45.182, 0.242)
pt3dadd(110.24, -5.736, 42.23, 0.242)
pt3dadd(109.51, -5.519, 42.192, 0.242)
pt3dadd(108.77, -4.838, 40.647, 0.242)
pt3dadd(108.03, -4.157, 36.257, 0.242)
pt3dadd(107.06, -4.409, 36.257, 0.242)
pt3dadd(105.86, -4.898, 36.257, 0.242)
pt3dadd(104.67, -5.62, 35.565, 0.242)
pt3dadd(102.27, -6.599, 35.563, 0.242)
pt3dadd(101.07, -7.321, 35.563, 0.242)
pt3dadd(100.6, -7.563, 35.563, 0.242)
pt3dadd(99.391, -7.82, 35.087, 0.242)
pt3dadd(98.182, -7.845, 35.087, 0.242)
pt3dadd(97.224, -8.33, 35.087, 0.242)
pt3dadd(96.276, -9.279, 35.087, 0.242)
pt3dadd(95.071, -9.536, 35.087, 0.242)
pt3dadd(94.345, -9.551, 35.087, 0.242)
pt3dadd(93.363, -8.875, 35.087, 0.242)
pt3dadd(92.154, -8.9, 35.087, 0.242)
pt3dadd(91.641, -7.517, 35.087, 0.242)
pt3dadd(90.649, -6.377, 35.087, 0.242)
pt3dadd(89.9, -5.231, 36.1, 0.242)
pt3dadd(89.396, -4.313, 37.747, 0.242)
pt3dadd(89.382, -3.616, 37.747, 0.242)
pt3dadd(89.59, -1.986, 37.772, 0.242)
pt3dadd(90.77, -0.568, 39.813, 0.242)
pt3dadd(91.723, 0.149, 39.813, 0.242)
pt3dadd(92.188, 1.087, 39.813, 0.242)
pt3dadd(93.136, 2.036, 39.813, 0.242)
pt3dadd(93.571, 4.367, 39.813, 0.242)
pt3dadd(93.784, 5.765, 39.813, 0.242)
pt3dadd(93.765, 6.694, 40.778, 0.242)
pt3dadd(93.958, 9.02, 40.778, 0.242)
pt3dadd(94.176, 10.186, 41.21, 0.242)
pt3dadd(93.9, 11.806, 41.732, 0.242)
pt3dadd(93.625, 13.426, 41.732, 0.242)
pt3dadd(93.359, 14.582, 41.732, 0.242)
pt3dadd(93.581, 15.515, 43.042, 0.242)
pt3dadd(94.06, 15.758, 42.675, 0.242)
pt3dadd(94.282, 16.691, 43.9, 0.242)
pt3dadd(94.737, 18.094, 43.9, 0.242)
pt3dadd(94.723, 18.791, 46.067, 0.242)
pt3dadd(94.703, 19.719, 46.745, 0.242)
pt3dadd(94.679, 20.88, 46.745, 0.242)
pt3dadd(94.892, 22.278, 48.395, 0.242)
pt3dadd(95.105, 23.676, 49.833, 0.242)
pt3dadd(95.086, 24.604, 49.833, 0.242)
pt3dadd(95.066, 25.533, 49.833, 0.242)
pt3dadd(95.052, 26.229, 49.833, 0.242)
pt3dadd(95.26, 27.859, 49.833, 0.242)
pt3dadd(95.473, 29.257, 49.833, 0.242)
pt3dadd(95.207, 30.413, 49.833, 0.242)
pt3dadd(95.661, 31.816, 49.833, 0.242)
pt3dadd(96.372, 32.527, 51.528, 0.242)
pt3dadd(97.543, 34.41, 51.41, 0.242)
pt3dadd(97.756, 35.808, 52.165, 0.242)
pt3dadd(97.959, 37.67, 53.173, 0.242)
pt3dadd(97.925, 39.295, 53.173, 0.242)
pt3dadd(98.361, 41.626, 53.507, 0.242)
pt3dadd(98.569, 43.256, 53.507, 0.242)
pt3dadd(98.549, 44.185, 53.525, 0.242)
pt3dadd(99.232, 46.289, 54.102, 0.242)
pt3dadd(99.202, 47.682, 55.42, 0.242)
pt3dadd(100.39, 48.868, 55.54, 0.242)
pt3dadd(100.61, 49.802, 56.462, 0.242)
pt3dadd(101.32, 50.745, 58.162, 0.242)
pt3dadd(101.54, 51.679, 58.162, 0.242)
pt3dadd(101.52, 52.608, 59.622, 0.242)
pt3dadd(101.02, 53.294, 59.622, 0.242)
pt3dadd(101.49, 54.233, 60.305, 0.242)
pt3dadd(102.19, 55.176, 61.118, 0.242)
pt3dadd(102.4, 56.574, 62.305, 0.242)
pt3dadd(102.63, 57.276, 64.552, 0.242)
pt3dadd(102.86, 58.209, 64.552, 0.242)
pt3dadd(103.32, 58.916, 64.557, 0.242)
pt3dadd(103.55, 59.849, 64.557, 0.242)
pt3dadd(104, 61.252, 65.938, 0.242)
pt3dadd(104.22, 62.418, 65.938, 0.242)
pt3dadd(104.43, 64.048, 67.732, 0.242)
pt3dadd(105.38, 64.997, 67.732, 0.242)
pt3dadd(105.11, 66.385, 68.385, 0.242)
pt3dadd(105.54, 68.484, 68.385, 0.242)
pt3dadd(105.04, 69.635, 69.55, 0.242)
pt3dadd(105.98, 70.816, 70.463, 0.242)
pt3dadd(106.93, 71.764, 70.967, 0.242)
pt3dadd(107.39, 72.703, 73.103, 0.242)
pt3dadd(108.57, 74.353, 74.11, 0.242)
pt3dadd(109.05, 74.595, 76.957, 0.242)
pt3dadd(109.27, 75.529, 79.105, 0.242)
pt3dadd(109.24, 76.922, 79.105, 0.242)
pt3dadd(109.94, 78.33, 79.105, 0.242)
pt3dadd(110.64, 79.274, 79.105, 0.242)
pt3dadd(111.36, 79.985, 79.105, 0.242)
pt3dadd(111.35, 80.449, 78.3, 0.242)
}
dend[47] {pt3dclear()
pt3dadd(114.6, -5.878, 50.455, 0.242)
pt3dadd(112.14, -4.303, 49.41, 0.242)
pt3dadd(110.93, -3.864, 48.295, 0.242)
pt3dadd(109.45, -2.734, 48.295, 0.242)
pt3dadd(108.47, -2.289, 47.245, 0.242)
pt3dadd(107.27, -2.547, 47.243, 0.242)
pt3dadd(105.82, -2.577, 44.835, 0.242)
pt3dadd(104.83, -1.669, 44.835, 0.242)
pt3dadd(103.85, -1.224, 43.85, 0.242)
pt3dadd(102.14, -0.563, 43.435, 0.242)
pt3dadd(99.967, -0.609, 41.215, 0.242)
pt3dadd(98.516, -0.639, 41.215, 0.242)
}
}
proc shape3d_7() {
dend[47] { pt3dadd(97.292, 0.032, 40.097, 0.242)
pt3dadd(95.806, 1.627, 40.097, 0.242)
pt3dadd(95.061, 2.541, 38.15, 0.242)
}
dend[48] {pt3dclear()
pt3dadd(98.661, -19.215, 63.403, 0.484)
pt3dadd(98.632, -17.823, 62.755, 0.242)
pt3dadd(99.59, -17.338, 62.755, 0.242)
pt3dadd(100.29, -16.162, 62.755, 0.242)
pt3dadd(99.788, -15.244, 62.755, 0.242)
pt3dadd(99.27, -13.629, 62.755, 0.242)
pt3dadd(99.236, -12.004, 62.755, 0.242)
pt3dadd(99.943, -11.06, 62.755, 0.242)
pt3dadd(99.909, -9.435, 62.755, 0.242)
pt3dadd(99.638, -8.047, 62.755, 0.242)
pt3dadd(99.614, -6.887, 63.445, 0.242)
pt3dadd(99.086, -4.807, 63.445, 0.242)
pt3dadd(99.29, -2.945, 63.445, 0.242)
pt3dadd(99.512, -2.012, 64.552, 0.242)
pt3dadd(98.985, 0.068, 64.552, 0.242)
pt3dadd(98.225, 1.677, 64.552, 0.242)
}
dend[49] {pt3dclear()
pt3dadd(98.225, 1.677, 64.552, 0.242)
pt3dadd(97.224, 3.282, 66.652, 0.242)
pt3dadd(96.725, 3.969, 66.652, 0.242)
pt3dadd(95.99, 4.418, 66.652, 0.242)
pt3dadd(95.719, 5.806, 66.652, 0.242)
pt3dadd(94.254, 6.472, 66.652, 0.242)
pt3dadd(93.745, 7.622, 66.652, 0.242)
pt3dadd(93.005, 8.304, 66.652, 0.242)
pt3dadd(91.791, 8.511, 66.652, 0.242)
}
dend[50] {pt3dclear()
pt3dadd(91.791, 8.511, 66.652, 0.242)
pt3dadd(90.083, 9.172, 68.332, 0.242)
pt3dadd(89.343, 9.853, 68.332, 0.242)
pt3dadd(88.603, 10.534, 69.73, 0.242)
pt3dadd(88.588, 11.231, 71.817, 0.242)
pt3dadd(88.095, 11.685, 72.682, 0.242)
pt3dadd(87.36, 12.134, 72.682, 0.242)
pt3dadd(87.108, 12.594, 72.682, 0.242)
pt3dadd(85.642, 13.26, 72.682, 0.242)
pt3dadd(84.408, 14.395, 72.682, 0.242)
pt3dadd(83.668, 15.076, 73.53, 0.242)
pt3dadd(82.923, 15.99, 73.53, 0.242)
pt3dadd(81.704, 16.429, 74.795, 0.242)
pt3dadd(80.969, 16.878, 75.385, 0.242)
pt3dadd(79.766, 16.304, 75.385, 0.242)
pt3dadd(78.14, 16.831, 75.385, 0.242)
pt3dadd(77.113, 17.958, 75.385, 0.242)
pt3dadd(76.8, 18.958, 76.832, 0.242)
pt3dadd(76.331, 20.457, 79.35, 0.242)
pt3dadd(74.787, 21.441, 79.35, 0.242)
pt3dadd(73.916, 22.069, 82.035, 0.242)
pt3dadd(73.243, 22.426, 82.035, 0.242)
pt3dadd(71.97, 22.182, 82.035, 0.242)
pt3dadd(71.297, 22.538, 82.035, 0.242)
pt3dadd(70.426, 23.166, 80.503, 0.242)
pt3dadd(69.44, 24.522, 82.202, 0.242)
pt3dadd(68.011, 24.778, 85.613, 0.242)
pt3dadd(66.582, 25.034, 85.613, 0.242)
pt3dadd(67.025, 26.134, 87.27, 0.242)
pt3dadd(65.637, 26.619, 90.045, 0.242)
pt3dadd(65.562, 27.575, 90.89, 0.242)
pt3dadd(64.412, 28.017, 92.025, 0.242)
pt3dadd(63.616, 27.688, 93.063, 0.242)
}
dend[51] {pt3dclear()
pt3dadd(63.616, 27.688, 93.063, 0.242)
pt3dadd(62.861, 27.588, 95.17, 0.242)
pt3dadd(61.357, 28.8, 95.17, 0.242)
pt3dadd(59.847, 28.599, 96.708, 0.242)
}
dend[52] {pt3dclear()
pt3dadd(63.616, 27.688, 93.063, 0.242)
pt3dadd(62.63, 29.044, 95.35, 0.242)
pt3dadd(62.038, 29.858, 95.35, 0.242)
pt3dadd(61.447, 30.671, 95.35, 0.242)
pt3dadd(60.855, 31.485, 98.41, 0.242)
pt3dadd(60.107, 32.798, 98.41, 0.242)
pt3dadd(59.121, 34.154, 98.41, 0.242)
pt3dadd(58.094, 35.282, 98.41, 0.242)
pt3dadd(56.632, 36.723, 98.41, 0.242)
pt3dadd(56.163, 38.223, 99.66, 0.242)
pt3dadd(55.02, 40.078, 99.66, 0.242)
pt3dadd(55.15, 42.178, 100.1, 0.242)
pt3dadd(55.199, 43.821, 100.1, 0.242)
pt3dadd(55.608, 46.106, 100.32, 0.242)
pt3dadd(55.377, 47.563, 100.32, 0.242)
pt3dadd(55.549, 49.891, 100.32, 0.242)
pt3dadd(55.005, 52.347, 100.32, 0.242)
pt3dadd(53.509, 54.974, 100.32, 0.242)
pt3dadd(52.047, 56.415, 100.32, 0.242)
pt3dadd(51.299, 57.729, 100.04, 0.242)
pt3dadd(50.428, 58.356, 100.97, 0.242)
pt3dadd(49.319, 59.027, 103.83, 0.242)
pt3dadd(47.258, 59.868, 104.71, 0.242)
pt3dadd(45.04, 61.209, 106.17, 0.242)
pt3dadd(43.176, 61.778, 106.17, 0.242)
pt3dadd(41.985, 61.992, 108.22, 0.242)
pt3dadd(40.72, 63.162, 108.22, 0.242)
pt3dadd(39.767, 63.332, 109.75, 0.242)
pt3dadd(38.617, 63.774, 111.48, 0.242)
pt3dadd(37.542, 63.259, 110.84, 0.242)
pt3dadd(36.548, 63.201, 113.55, 0.242)
pt3dadd(36.228, 62.787, 113.55, 0.242)
pt3dadd(35.079, 63.229, 115.58, 0.242)
pt3dadd(34.241, 62.671, 115.58, 0.242)
pt3dadd(33.363, 61.885, 117.59, 0.242)
pt3dadd(31.737, 62.412, 118.86, 0.242)
pt3dadd(31.581, 62.911, 121.4, 0.242)
pt3dadd(30.505, 62.396, 122.17, 0.242)
}
dend[53] {pt3dclear()
pt3dadd(91.791, 8.511, 66.652, 0.242)
pt3dadd(90.828, 8.258, 65.515, 0.242)
pt3dadd(89.856, 8.47, 64.118, 0.242)
pt3dadd(88.651, 8.213, 64.118, 0.242)
pt3dadd(88.429, 7.279, 64.118, 0.242)
pt3dadd(86.494, 7.239, 61.872, 0.242)
pt3dadd(85.773, 6.992, 61.05, 0.242)
pt3dadd(85.541, 6.522, 60.882, 0.242)
pt3dadd(84.312, 7.426, 60.425, 0.242)
pt3dadd(82.851, 7.86, 59.612, 0.242)
pt3dadd(81.632, 8.299, 59.605, 0.242)
pt3dadd(80.18, 8.269, 58.135, 0.242)
pt3dadd(78.472, 8.93, 58.135, 0.242)
pt3dadd(76.276, 9.813, 58.135, 0.242)
pt3dadd(75.531, 10.727, 58.135, 0.242)
pt3dadd(74.298, 11.862, 58.135, 0.242)
pt3dadd(73.543, 13.24, 58.135, 0.242)
pt3dadd(72.793, 14.385, 58.135, 0.242)
pt3dadd(72.048, 15.299, 58.607, 0.242)
pt3dadd(72.275, 16, 58.76, 0.242)
pt3dadd(72.004, 17.388, 58.76, 0.242)
pt3dadd(71.25, 18.766, 60.025, 0.242)
pt3dadd(70.993, 19.457, 60.66, 0.242)
pt3dadd(70.244, 20.603, 60.66, 0.242)
pt3dadd(69.987, 21.294, 60.662, 0.242)
pt3dadd(69.484, 22.213, 63.112, 0.242)
pt3dadd(69.455, 23.606, 63.112, 0.242)
pt3dadd(69.421, 25.231, 63.112, 0.242)
pt3dadd(70.137, 25.71, 63.112, 0.242)
pt3dadd(70.834, 27.118, 63.112, 0.242)
pt3dadd(70.103, 27.335, 63.112, 0.242)
pt3dadd(69.368, 27.784, 63.112, 0.242)
pt3dadd(69.111, 28.476, 64.625, 0.242)
pt3dadd(69.092, 29.404, 64.625, 0.242)
pt3dadd(68.836, 30.095, 64.625, 0.242)
pt3dadd(68.337, 30.782, 66.2, 0.242)
pt3dadd(68.076, 31.705, 66.2, 0.242)
pt3dadd(68.768, 33.346, 66.2, 0.242)
pt3dadd(68.976, 34.976, 67.145, 0.242)
pt3dadd(68.212, 36.818, 67.145, 0.242)
pt3dadd(67.931, 38.67, 68.518, 0.242)
pt3dadd(67.418, 40.052, 68.518, 0.242)
pt3dadd(67.404, 40.749, 68.518, 0.242)
pt3dadd(67.379, 41.91, 68.518, 0.242)
pt3dadd(66.141, 43.277, 69.798, 0.242)
pt3dadd(65.648, 43.731, 69.798, 0.242)
pt3dadd(65.623, 44.892, 69.798, 0.242)
pt3dadd(64.622, 46.497, 69.798, 0.242)
pt3dadd(63.862, 48.107, 71.807, 0.242)
pt3dadd(63.591, 49.495, 71.807, 0.242)
pt3dadd(63.093, 50.181, 71.807, 0.242)
pt3dadd(62.59, 51.1, 71.807, 0.242)
pt3dadd(62.329, 52.023, 71.807, 0.242)
pt3dadd(62.058, 53.411, 71.807, 0.242)
pt3dadd(60.824, 54.546, 71.807, 0.242)
pt3dadd(60.07, 55.924, 72.728, 0.242)
pt3dadd(60.05, 56.853, 73.423, 0.242)
pt3dadd(59.542, 58.003, 74.542, 0.242)
pt3dadd(59.039, 58.922, 76.217, 0.242)
pt3dadd(58.526, 60.305, 76.237, 0.242)
pt3dadd(57.283, 61.904, 76.237, 0.242)
pt3dadd(56.371, 62.718, 75, 0.242)
pt3dadd(55.344, 63.845, 75, 0.242)
pt3dadd(54.678, 65.616, 75, 0.242)
pt3dadd(54.012, 67.386, 75, 0.242)
pt3dadd(53.699, 68.386, 76.585, 0.242)
pt3dadd(53.271, 70.114, 76.585, 0.242)
pt3dadd(53.082, 71.799, 76.585, 0.242)
pt3dadd(52.531, 72.841, 77.42, 0.242)
pt3dadd(52.103, 74.569, 78.655, 0.242)
pt3dadd(51.593, 75.84, 80.368, 0.242)
}
dend[54] {pt3dclear()
pt3dadd(98.225, 1.677, 64.552, 0.242)
pt3dadd(99.401, 3.328, 67.022, 0.242)
pt3dadd(99.382, 4.256, 67.022, 0.242)
pt3dadd(99.353, 5.649, 67.022, 0.242)
}
dend[55] {pt3dclear()
pt3dadd(99.353, 5.649, 67.022, 0.242)
pt3dadd(100.29, 7.294, 66.368, 0.242)
pt3dadd(100.75, 8.465, 67.77, 0.242)
pt3dadd(101.7, 9.182, 70.198, 0.242)
pt3dadd(102.88, 10.6, 70.198, 0.242)
pt3dadd(103.59, 11.543, 70.198, 0.242)
pt3dadd(104.31, 11.791, 71.607, 0.242)
pt3dadd(105.25, 12.972, 73.487, 0.242)
pt3dadd(106.2, 13.688, 74.522, 0.242)
pt3dadd(106.92, 14.168, 74.67, 0.242)
pt3dadd(108.33, 15.199, 74.67, 0.242)
pt3dadd(109.72, 16.129, 74.67, 0.242)
pt3dadd(110.76, 16.415, 78.372, 0.242)
pt3dadd(112.07, 16.887, 80.77, 0.242)
pt3dadd(113.34, 17.131, 80.77, 0.242)
pt3dadd(113.9, 17.503, 80.177, 0.242)
pt3dadd(115.17, 17.747, 83.715, 0.242)
pt3dadd(116.21, 18.033, 83.715, 0.242)
pt3dadd(117.28, 18.549, 84.183, 0.242)
pt3dadd(118.04, 18.649, 85.89, 0.242)
pt3dadd(118.92, 19.435, 86.27, 0.242)
pt3dadd(119.36, 20.536, 88.225, 0.242)
}
}
proc shape3d_8() {
dend[55] { pt3dadd(119.68, 20.95, 92.482, 0.242)
pt3dadd(121.51, 21.566, 95.037, 0.242)
pt3dadd(122.54, 21.852, 95.037, 0.242)
pt3dadd(122.75, 22.995, 98.128, 0.242)
pt3dadd(123.31, 23.367, 98.463, 0.242)
pt3dadd(123.67, 24.01, 103.71, 0.242)
pt3dadd(124.99, 25.896, 105.28, 0.242)
pt3dadd(125.39, 26.768, 108.12, 0.242)
pt3dadd(127.1, 26.698, 108.82, 0.242)
pt3dadd(128.49, 26.213, 108.82, 0.242)
pt3dadd(129.64, 25.771, 108.82, 0.242)
pt3dadd(131.23, 26.43, 109.61, 0.242)
pt3dadd(132.46, 26.445, 110.16, 0.242)
pt3dadd(133.65, 26.232, 110.16, 0.242)
pt3dadd(135.24, 25.476, 111.18, 0.242)
pt3dadd(137.18, 25.363, 112.24, 0.242)
pt3dadd(138.77, 24.608, 113.02, 0.242)
pt3dadd(140.48, 24.538, 115.19, 0.242)
pt3dadd(141.46, 23.182, 115.19, 0.242)
pt3dadd(143.33, 22.612, 116.29, 0.242)
pt3dadd(144.63, 21.67, 118.15, 0.242)
pt3dadd(145.03, 21.128, 118.15, 0.242)
pt3dadd(146.78, 21.287, 118.15, 0.242)
pt3dadd(148.4, 20.759, 120.17, 0.242)
pt3dadd(150.23, 21.375, 121.36, 0.242)
pt3dadd(151.42, 21.162, 123.75, 0.242)
pt3dadd(152.42, 21.22, 125.6, 0.242)
pt3dadd(153.29, 20.592, 125.97, 0.242)
pt3dadd(153.53, 20.549, 125.97, 0.242)
pt3dadd(154.09, 20.921, 125.97, 0.242)
pt3dadd(154.64, 21.293, 125.97, 0.242)
pt3dadd(155.83, 21.08, 126.93, 0.242)
pt3dadd(157.06, 19.681, 129.58, 0.242)
pt3dadd(157.89, 18.825, 129.58, 0.242)
pt3dadd(159.32, 18.569, 129.84, 0.242)
pt3dadd(160.11, 18.898, 131.16, 0.242)
pt3dadd(160.43, 17.898, 132.94, 0.242)
pt3dadd(161.34, 17.499, 132.94, 0.242)
pt3dadd(162.64, 16.558, 133.91, 0.242)
pt3dadd(163.75, 15.887, 134.66, 0.242)
pt3dadd(164.9, 15.446, 138.68, 0.242)
pt3dadd(165.58, 15.089, 138.68, 0.242)
pt3dadd(166.21, 14.504, 138.68, 0.242)
pt3dadd(166.84, 13.919, 140.07, 0.242)
pt3dadd(167.47, 11.92, 142.37, 0.242)
}
dend[56] {pt3dclear()
pt3dadd(99.353, 5.649, 67.022, 0.242)
pt3dadd(98.835, 7.264, 67.022, 0.242)
pt3dadd(98.337, 7.95, 67.022, 0.242)
pt3dadd(99.033, 9.358, 67.022, 0.242)
pt3dadd(99.972, 10.771, 67.022, 0.242)
pt3dadd(99.948, 11.932, 67.022, 0.242)
pt3dadd(100.18, 12.634, 67.022, 0.242)
pt3dadd(99.904, 14.021, 67.022, 0.242)
pt3dadd(100.13, 14.955, 67.022, 0.242)
pt3dadd(99.614, 16.338, 67.022, 0.242)
pt3dadd(99.353, 17.261, 67.022, 0.242)
pt3dadd(99.338, 17.958, 67.022, 0.242)
pt3dadd(99.807, 18.664, 67.022, 0.242)
pt3dadd(99.773, 20.289, 67.022, 0.242)
pt3dadd(99.019, 21.667, 67.022, 0.242)
pt3dadd(99.241, 22.601, 67.022, 0.242)
pt3dadd(99.948, 23.544, 67.022, 0.242)
pt3dadd(99.928, 24.473, 67.022, 0.242)
pt3dadd(99.411, 26.088, 67.022, 0.242)
pt3dadd(99.856, 27.955, 67.022, 0.242)
pt3dadd(100.08, 28.889, 67.022, 0.242)
pt3dadd(99.575, 29.807, 65.842, 0.242)
pt3dadd(99.807, 30.276, 65.842, 0.242)
pt3dadd(100.03, 31.21, 65.842, 0.242)
pt3dadd(100.01, 31.906, 65.842, 0.242)
pt3dadd(100.24, 32.84, 65.842, 0.242)
pt3dadd(100.2, 34.465, 65.842, 0.242)
pt3dadd(100.18, 35.626, 65.842, 0.242)
pt3dadd(100.89, 36.337, 65.842, 0.242)
pt3dadd(101.61, 36.817, 65.842, 0.242)
pt3dadd(100.63, 37.493, 65.93, 0.242)
pt3dadd(100.61, 38.189, 66.423, 0.242)
pt3dadd(100.35, 39.113, 66.423, 0.242)
pt3dadd(100.8, 40.516, 66.423, 0.242)
pt3dadd(100.06, 41.429, 66.423, 0.242)
pt3dadd(100.03, 42.822, 66.728, 0.242)
pt3dadd(99.773, 43.514, 66.728, 0.242)
pt3dadd(99.754, 44.442, 66.728, 0.242)
pt3dadd(100.7, 45.623, 66.728, 0.242)
pt3dadd(100.69, 46.087, 67.28, 0.242)
pt3dadd(100.92, 46.789, 67.28, 0.242)
pt3dadd(100.65, 47.712, 67.28, 0.242)
pt3dadd(100.63, 48.873, 67.342, 0.242)
pt3dadd(101.56, 50.518, 67.735, 0.242)
}
axon {pt3dclear()
pt3dadd(101.56, 50.518, 67.735, 0.242)
pt3dadd(101.6, 60.273, 70.192, 0.242)
pt3dadd(101.09, 61.424, 70.192, 0.242)
pt3dadd(101.55, 62.827, 70.192, 0.242)
pt3dadd(101.77, 63.761, 70.192, 0.242)
pt3dadd(102.24, 64.467, 70.192, 0.242)
pt3dadd(101.73, 65.618, 70.192, 0.242)
pt3dadd(101.47, 66.541, 70.192, 0.242)
pt3dadd(101.69, 67.707, 70.192, 0.242)
pt3dadd(101.4, 69.791, 72.917, 0.242)
pt3dadd(101.39, 70.72, 72.917, 0.242)
pt3dadd(101.84, 71.891, 72.917, 0.242)
pt3dadd(101.82, 73.051, 72.917, 0.242)
pt3dadd(102.04, 74.217, 72.917, 0.242)
pt3dadd(102.01, 75.61, 72.917, 0.242)
pt3dadd(101.26, 76.755, 72.917, 0.242)
pt3dadd(101.24, 77.916, 72.917, 0.242)
pt3dadd(101.21, 78.845, 72.917, 0.242)
pt3dadd(101.68, 79.783, 72.917, 0.242)
pt3dadd(101.66, 80.712, 72.917, 0.242)
pt3dadd(101.63, 82.105, 72.917, 0.242)
pt3dadd(101.36, 83.261, 72.917, 0.242)
pt3dadd(101.58, 84.426, 72.917, 0.242)
pt3dadd(101.31, 86.046, 72.917, 0.242)
pt3dadd(101.51, 87.676, 72.917, 0.242)
pt3dadd(101.24, 89.064, 73.327, 0.242)
pt3dadd(101.22, 89.993, 73.368, 0.242)
pt3dadd(100.96, 91.148, 75.1, 0.242)
pt3dadd(100.94, 92.077, 75.1, 0.242)
pt3dadd(101.16, 93.243, 75.1, 0.242)
pt3dadd(101.13, 94.403, 75.1, 0.242)
pt3dadd(101.36, 95.337, 75.1, 0.242)
pt3dadd(101.34, 96.266, 75.1, 0.242)
pt3dadd(100.59, 97.411, 75.1, 0.242)
pt3dadd(100.81, 98.345, 75.938, 0.242)
pt3dadd(100.55, 99.268, 75.938, 0.242)
}
dend[57] {pt3dclear()
pt3dadd(100.55, 99.268, 75.938, 0.242)
pt3dadd(101.52, 122.86, 75, 0.242)
pt3dadd(101.33, 124.55, 75, 0.242)
pt3dadd(100.54, 125.63, 76.15, 0.242)
pt3dadd(100.27, 126.86, 76.15, 0.242)
pt3dadd(99.96, 127.86, 76.15, 0.242)
pt3dadd(100.17, 129, 76.15, 0.242)
pt3dadd(99.893, 130.23, 76.15, 0.242)
pt3dadd(99.778, 130.96, 77.217, 0.242)
pt3dadd(98.669, 131.63, 78.192, 0.242)
pt3dadd(97.954, 131.76, 80.827, 0.242)
pt3dadd(97.24, 131.89, 80.827, 0.242)
pt3dadd(96.451, 132.97, 81.13, 0.242)
pt3dadd(96.377, 133.93, 81.13, 0.242)
pt3dadd(96.663, 135.53, 83.012, 0.242)
pt3dadd(97.303, 136.36, 83.012, 0.242)
pt3dadd(97.508, 137.5, 83.012, 0.242)
pt3dadd(97.474, 138.68, 83.065, 0.242)
pt3dadd(96.965, 139.96, 83.582, 0.242)
pt3dadd(95.978, 141.31, 80.582, 0.242)
pt3dadd(94.877, 143.4, 87.417, 0.242)
pt3dadd(95.041, 144.31, 87.417, 0.242)
pt3dadd(95.484, 145.41, 88.22, 0.242)
pt3dadd(95.729, 146.78, 88.938, 0.242)
pt3dadd(96.09, 147.42, 88.938, 0.242)
pt3dadd(96.574, 148.75, 88.938, 0.242)
pt3dadd(96.942, 150.81, 88.938, 0.242)
pt3dadd(97.27, 152.64, 88.938, 0.242)
pt3dadd(97.475, 153.78, 88.938, 0.242)
pt3dadd(96.127, 154.49, 90.965, 0.242)
pt3dadd(96.019, 156.64, 91.5, 0.242)
pt3dadd(96.823, 158.38, 91.5, 0.242)
pt3dadd(98.301, 159.77, 91.5, 0.242)
pt3dadd(99.465, 162.15, 91.5, 0.242)
pt3dadd(101.26, 163.95, 94.595, 0.242)
pt3dadd(102.14, 164.74, 94.595, 0.242)
pt3dadd(102.31, 165.65, 94.595, 0.242)
pt3dadd(102.79, 166.98, 95.535, 0.242)
pt3dadd(102.84, 168.63, 95.535, 0.242)
pt3dadd(102.96, 169.31, 95.535, 0.242)
pt3dadd(102.93, 170.5, 97.725, 0.242)
pt3dadd(103.17, 171.87, 98.585, 0.242)
pt3dadd(103.01, 172.37, 105.09, 0.242)
pt3dadd(102.23, 173.45, 103.54, 0.242)
pt3dadd(101.64, 174.27, 104.83, 0.242)
pt3dadd(101.04, 175.08, 104.83, 0.242)
pt3dadd(100.81, 176.54, 104.83, 0.242)
pt3dadd(100.5, 177.54, 104.83, 0.242)
pt3dadd(100.47, 178.72, 104.83, 0.242)
pt3dadd(100.15, 179.72, 104.83, 0.242)
pt3dadd(100.6, 180.82, 104.83, 0.242)
pt3dadd(100.72, 181.51, 106.15, 0.242)
pt3dadd(100, 181.63, 107.09, 0.242)
}
dend[58] {pt3dclear()
pt3dadd(-10.172, 51.929, 73.757, 0.242)
pt3dadd(-12.459, 58.996, 75, 0.484)
pt3dadd(-12.255, 60.139, 75, 0.484)
pt3dadd(-12.009, 61.51, 75, 0.484)
pt3dadd(-12.043, 62.695, 75, 0.484)
pt3dadd(-12.192, 64.609, 75, 0.484)
}
dend[59] {pt3dclear()
pt3dadd(-40.122, -8.846, 64.493, 0.968)
pt3dadd(-40.887, -7.004, 62.802, 0.484)
pt3dadd(-42.12, -5.869, 62.802, 0.484)
pt3dadd(-43.596, -4.738, 62.802, 0.484)
pt3dadd(-44.36, -2.896, 62.802, 0.484)
pt3dadd(-45.831, -1.998, 62.802, 0.484)
pt3dadd(-47.05, -1.559, 62.802, 0.726)
pt3dadd(-48.748, -1.362, 62.802, 0.726)
pt3dadd(-50.456, -0.701, 62.802, 0.726)
pt3dadd(-51.685, 0.203, 62.802, 0.726)
pt3dadd(-52.667, 0.879, 62.802, 0.484)
pt3dadd(-53.654, 1.787, 62.802, 0.484)
pt3dadd(-54.902, 3.619, 62.802, 0.484)
pt3dadd(-55.908, 5.456, 62.802, 0.484)
pt3dadd(-57.63, 6.814, 62.802, 0.726)
pt3dadd(-58.622, 7.954, 62.802, 0.484)
}
}
proc shape3d_9() {
dend[59] { pt3dadd(-59.856, 9.09, 62.802, 0.484)
pt3dadd(-61.094, 10.458, 62.802, 0.484)
pt3dadd(-61.109, 11.154, 63.745, 0.484)
pt3dadd(-62.831, 12.512, 63.745, 0.484)
pt3dadd(-64.553, 13.869, 65.597, 0.484)
pt3dadd(-65.555, 15.474, 65.597, 0.726)
pt3dadd(-66.319, 17.316, 65.597, 0.726)
pt3dadd(-67.316, 18.689, 67.87, 0.726)
pt3dadd(-68.806, 20.516, 68.448, 0.484)
pt3dadd(-69.802, 21.888, 68.448, 0.484)
pt3dadd(-70.562, 23.498, 68.448, 0.484)
pt3dadd(-71.558, 24.871, 68.448, 0.484)
pt3dadd(-72.318, 26.481, 68.448, 0.484)
pt3dadd(-73.082, 28.323, 68.448, 0.484)
pt3dadd(-73.832, 29.468, 69.438, 0.484)
pt3dadd(-74.592, 31.078, 69.438, 0.484)
pt3dadd(-74.848, 31.77, 69.438, 0.484)
pt3dadd(-75.105, 32.461, 69.438, 0.484)
pt3dadd(-76.096, 33.602, 69.438, 0.484)
pt3dadd(-77.098, 35.206, 69.438, 0.484)
pt3dadd(-77.596, 35.893, 68.735, 0.484)
pt3dadd(-78.36, 37.735, 68.29, 0.484)
pt3dadd(-79.609, 39.567, 68.29, 0.484)
pt3dadd(-80.112, 40.485, 66.967, 0.484)
pt3dadd(-81.592, 41.848, 66.595, 0.484)
pt3dadd(-83.063, 42.746, 66.595, 0.484)
pt3dadd(-85.017, 43.634, 66.595, 0.484)
pt3dadd(-86.024, 45.471, 66.595, 0.484)
pt3dadd(-87.015, 46.612, 66.595, 0.484)
pt3dadd(-88.259, 48.212, 66.595, 0.484)
pt3dadd(-88.776, 49.827, 66.595, 0.484)
pt3dadd(-88.094, 51.931, 66.595, 0.484)
pt3dadd(-87.397, 53.339, 66.595, 0.484)
pt3dadd(-87.673, 54.959, 66.595, 0.484)
pt3dadd(-88.438, 56.801, 66.595, 0.484)
pt3dadd(-89.449, 58.87, 66.595, 0.484)
pt3dadd(-89.478, 60.263, 68.033, 0.484)
pt3dadd(-90.237, 61.873, 68.033, 0.484)
pt3dadd(-90.736, 62.559, 68.08, 0.484)
pt3dadd(-91.243, 63.71, 69.1, 0.242)
pt3dadd(-91.519, 65.33, 69.1, 0.242)
pt3dadd(-92.018, 66.016, 69.1, 0.242)
pt3dadd(-92.516, 66.703, 71.457, 0.242)
pt3dadd(-93.266, 67.848, 71.457, 0.242)
pt3dadd(-93.299, 69.473, 71.457, 0.242)
pt3dadd(-95.065, 72.611, 76.64, 0.484)
pt3dadd(-94.861, 73.754, 76.64, 0.484)
pt3dadd(-95.173, 74.753, 77.118, 0.484)
pt3dadd(-94.689, 76.082, 77.287, 0.242)
pt3dadd(-94.723, 77.267, 78.905, 0.242)
pt3dadd(-94.198, 78.824, 78.905, 0.242)
pt3dadd(-93, 80.025, 78.905, 0.242)
pt3dadd(-91.285, 81.369, 79.412, 0.242)
pt3dadd(-90.086, 82.57, 81.115, 0.242)
pt3dadd(-89.603, 83.899, 81.115, 0.242)
pt3dadd(-88.445, 84.871, 81.115, 0.242)
pt3dadd(-87.567, 85.657, 81.115, 0.242)
pt3dadd(-87.683, 86.385, 81.915, 0.242)
pt3dadd(-87.56, 87.071, 82.34, 0.242)
pt3dadd(-86.6, 88.314, 83.285, 0.242)
pt3dadd(-86.477, 89, 83.285, 0.242)
}
dend[60] {pt3dclear()
pt3dadd(34.657, -36.806, 65.99, 0.968)
pt3dadd(28.213, -30.982, 75, 0.968)
pt3dadd(26.825, -30.497, 75, 0.968)
pt3dadd(26.11, -30.369, 75, 1.694)
pt3dadd(25.634, -30.284, 76.247, 2.42)
pt3dadd(23.688, -30.171, 76.247, 2.42)
pt3dadd(21.701, -30.287, 78.118, 2.42)
pt3dadd(19.557, -29.903, 80.385, 2.178)
pt3dadd(17.373, -29.748, 80.385, 2.178)
pt3dadd(15.148, -29.821, 82.948, 2.178)
pt3dadd(13.317, -30.437, 84.582, 1.936)
pt3dadd(11.371, -30.324, 85.48, 1.936)
pt3dadd(9.261, -31.126, 87.232, 1.936)
pt3dadd(7.389, -31.97, 89.598, 1.936)
pt3dadd(5.082, -32.5, 92.323, 1.936)
pt3dadd(3.769, -32.973, 92.323, 1.936)
pt3dadd(1.897, -33.817, 92.323, 1.936)
pt3dadd(-0.369, -34.119, 94.887, 1.936)
pt3dadd(-2.677, -34.649, 94.887, 1.936)
}
dend[61] {pt3dclear()
pt3dadd(-2.677, -34.649, 94.887, 1.936)
pt3dadd(-4.656, -33.351, 97.38, 1.21)
pt3dadd(-6.759, -32.739, 99.658, 1.21)
pt3dadd(-7.67, -32.34, 101.15, 1.21)
pt3dadd(-9.174, -31.127, 103.32, 1.21)
pt3dadd(-9.125, -29.484, 107.5, 1.21)
pt3dadd(-9.036, -27.613, 110.28, 1.21)
pt3dadd(-9.94, -25.8, 111.47, 1.21)
pt3dadd(-10.647, -24.258, 116.93, 0.968)
pt3dadd(-11.674, -23.13, 119.45, 0.968)
pt3dadd(-12.545, -22.503, 121.74, 0.968)
}
dend[62] {pt3dclear()
pt3dadd(-12.545, -22.503, 121.74, 0.968)
pt3dadd(-13.948, -24.846, 119.96, 0.484)
pt3dadd(-13.996, -26.489, 123.21, 0.726)
pt3dadd(-13.248, -27.802, 125.98, 0.726)
pt3dadd(-12.779, -29.302, 128.06, 0.726)
pt3dadd(-14.528, -29.46, 132.85, 0.484)
pt3dadd(-15.76, -29.475, 135.86, 0.484)
pt3dadd(-17.115, -30.176, 138.36, 0.484)
pt3dadd(-17.985, -29.549, 140.72, 0.484)
pt3dadd(-17.822, -28.634, 144.15, 0.484)
pt3dadd(-17.617, -27.492, 148.39, 0.484)
pt3dadd(-18.105, -26.543, 148.47, 0.484)
pt3dadd(-18.344, -25.614, 150.1, 0.484)
pt3dadd(-18.34, -24.221, 151.99, 0.484)
pt3dadd(-17.853, -23.293, 155, 0.484)
pt3dadd(-18.335, -22.363, 155, 0.484)
pt3dadd(-17.364, -21.437, 157.13, 0.242)
pt3dadd(-16.393, -20.279, 158.3, 0.484)
pt3dadd(-15.664, -19.12, 158.3, 0.484)
pt3dadd(-17.113, -18.187, 161.74, 0.484)
pt3dadd(-17.111, -17.491, 164.38, 0.484)
pt3dadd(-15.897, -16.101, 164.38, 0.484)
pt3dadd(-14.926, -14.943, 166.91, 0.484)
pt3dadd(-14.68, -13.55, 167.7, 0.484)
pt3dadd(-14.192, -12.391, 169.59, 0.484)
pt3dadd(-13.947, -11.231, 171.19, 0.484)
pt3dadd(-15.154, -10.298, 173.87, 0.484)
pt3dadd(-14.668, -9.603, 176.86, 0.484)
pt3dadd(-13.458, -9.374, 182.74, 0.484)
pt3dadd(-13.938, -7.98, 182.74, 0.484)
pt3dadd(-13.692, -6.82, 185.29, 0.484)
pt3dadd(-13.447, -5.659, 187.02, 0.484)
pt3dadd(-12.236, -5.198, 190.27, 0.484)
pt3dadd(-12.723, -6.126, 196.18, 0.484)
pt3dadd(-12.725, -7.055, 196.2, 0.484)
pt3dadd(-11.996, -5.896, 200.32, 0.484)
pt3dadd(-11.751, -4.968, 204.01, 0.484)
pt3dadd(-11.507, -4.04, 204.01, 0.484)
pt3dadd(-10.294, -3.114, 207.27, 0.484)
}
dend[63] {pt3dclear()
pt3dadd(-12.545, -22.503, 121.74, 0.968)
pt3dadd(-14.246, -21.019, 121.21, 0.968)
pt3dadd(-15.273, -19.891, 121.04, 0.968)
pt3dadd(-16.381, -19.221, 123.44, 0.968)
pt3dadd(-18.722, -18.566, 123.44, 0.968)
pt3dadd(-20.586, -17.996, 126.51, 0.968)
pt3dadd(-21.736, -17.554, 128.04, 0.968)
}
dend[64] {pt3dclear()
pt3dadd(-21.736, -17.554, 128.04, 0.968)
pt3dadd(-21.885, -15.64, 127.5, 1.21)
pt3dadd(-22.034, -13.727, 129.04, 1.21)
pt3dadd(-22.544, -12.456, 130.45, 0.726)
pt3dadd(-23.414, -11.828, 131.34, 0.726)
pt3dadd(-24.721, -10.887, 131.34, 0.726)
pt3dadd(-26.265, -9.902, 131.34, 0.726)
pt3dadd(-27.53, -8.732, 132.4, 0.726)
pt3dadd(-27.72, -7.047, 134.14, 0.726)
pt3dadd(-27.712, -5.633, 135.56, 0.726)
}
dend[65] {pt3dclear()
pt3dadd(-27.712, -5.633, 135.56, 0.726)
pt3dadd(-28.978, -4.463, 135.56, 0.726)
pt3dadd(-30.325, -3.75, 135.56, 0.726)
pt3dadd(-32.468, -3.366, 135.56, 0.726)
pt3dadd(-33.577, -2.696, 135.56, 0.726)
pt3dadd(-35.121, -1.711, 135.56, 0.726)
pt3dadd(-36.706, -0.956, 135.56, 0.726)
pt3dadd(-37.733, 0.172, 137.63, 0.484)
pt3dadd(-38.563, 1.028, 138.96, 0.484)
pt3dadd(-39.393, 1.884, 138.96, 0.484)
pt3dadd(-39.706, 2.884, 140.16, 0.484)
pt3dadd(-40.297, 3.697, 140.46, 0.484)
pt3dadd(-41.644, 4.41, 140.46, 0.484)
pt3dadd(-43.073, 4.666, 141.38, 0.484)
pt3dadd(-43.944, 5.294, 141.38, 0.484)
pt3dadd(-44.774, 6.15, 141.38, 0.484)
pt3dadd(-46.08, 7.092, 141.38, 0.484)
pt3dadd(-46.631, 8.134, 141.38, 0.484)
pt3dadd(-47.338, 9.676, 141.38, 0.484)
pt3dadd(-48.011, 10.033, 142.29, 0.484)
pt3dadd(-49.317, 10.974, 142.29, 0.484)
pt3dadd(-49.909, 11.788, 142.29, 0.484)
pt3dadd(-50.698, 12.873, 142.29, 0.484)
pt3dadd(-51.528, 13.729, 142.29, 0.484)
pt3dadd(-53.113, 14.485, 142.29, 0.484)
pt3dadd(-55.372, 15.597, 143.25, 0.484)
pt3dadd(-56.522, 16.039, 143.25, 0.484)
}
dend[66] {pt3dclear()
pt3dadd(-56.522, 16.039, 143.25, 0.484)
pt3dadd(-60.224, 14.579, 143.25, 0.484)
pt3dadd(-63.409, 13.262, 143.25, 0.484)
pt3dadd(-65.002, 12.604, 143.25, 0.484)
pt3dadd(-66.513, 12.403, 142.83, 0.484)
pt3dadd(-68.377, 12.972, 143.33, 0.484)
pt3dadd(-69.691, 12.5, 144, 0.484)
pt3dadd(-70.963, 12.256, 142.13, 0.484)
pt3dadd(-71.916, 12.427, 141.06, 0.484)
pt3dadd(-73.148, 12.411, 141.06, 0.484)
pt3dadd(-74.658, 12.21, 141.06, 0.484)
pt3dadd(-75.496, 11.652, 137.71, 0.484)
pt3dadd(-76.571, 11.137, 137.71, 0.484)
pt3dadd(-77.047, 11.223, 137.71, 0.484)
pt3dadd(-78.837, 10.836, 137.71, 0.484)
pt3dadd(-79.872, 10.549, 137.71, 0.484)
pt3dadd(-82.212, 11.204, 137.71, 0.242)
pt3dadd(-83.608, 10.275, 135.51, 0.242)
pt3dadd(-84.363, 10.174, 135.51, 0.242)
pt3dadd(-85.323, 8.931, 135.51, 0.242)
pt3dadd(-85.963, 8.102, 135.51, 0.242)
pt3dadd(-87.08, 7.358, 134.17, 0.484)
pt3dadd(-88.754, 6.243, 133.1, 0.484)
pt3dadd(-90.667, 5.17, 133.1, 0.484)
pt3dadd(-92.498, 4.554, 133.1, 0.484)
pt3dadd(-93.968, 4.582, 133.1, 0.484)
}
}
proc shape3d_10() {
dend[66] { pt3dadd(-95.757, 4.195, 133.1, 0.484)
pt3dadd(-97.145, 4.679, 132.97, 0.484)
pt3dadd(-98.221, 4.164, 132.97, 0.242)
pt3dadd(-99.575, 3.463, 132.97, 0.242)
pt3dadd(-100.86, 1.805, 132.97, 0.242)
pt3dadd(-101.5, 0.976, 132.97, 0.242)
pt3dadd(-102.89, 0.047, 132.97, 0.242)
pt3dadd(-104.29, -0.883, 132.97, 0.242)
pt3dadd(-105.88, -1.541, 132.97, 0.242)
pt3dadd(-107, -2.285, 132.97, 0.242)
pt3dadd(-108.19, -3.486, 132.97, 0.242)
pt3dadd(-109.15, -3.315, 133.11, 0.484)
pt3dadd(-110.81, -3.016, 133.38, 0.484)
pt3dadd(-112.16, -2.303, 133.38, 0.484)
pt3dadd(-113.79, -1.776, 133.38, 0.484)
pt3dadd(-114.89, -1.106, 133.38, 0.484)
pt3dadd(-116.2, -0.164, 133.38, 0.484)
pt3dadd(-117.51, 0.777, 133.38, 0.484)
pt3dadd(-118.22, 0.905, 133.38, 0.484)
pt3dadd(-118.98, 0.805, 133.38, 0.242)
pt3dadd(-119.3, 0.39, 133.38, 0.242)
pt3dadd(-120.49, 0.603, 133.38, 0.242)
pt3dadd(-121.4, 1.003, 133.38, 0.242)
pt3dadd(-122.59, 1.216, 133.38, 0.242)
pt3dadd(-123.94, 0.515, 133.38, 0.242)
pt3dadd(-125.46, 0.314, 133.38, 0.242)
pt3dadd(-126.97, 0.113, 133.38, 0.242)
pt3dadd(-127.72, 0.012, 133.38, 0.242)
pt3dadd(-129.15, 0.268, 133.38, 0.242)
pt3dadd(-130.3, 0.71, 133.38, 0.242)
pt3dadd(-131.45, 1.151, 133.38, 0.242)
pt3dadd(-131.97, 1.008, 133.38, 0.242)
pt3dadd(-133.4, 1.264, 134.15, 0.242)
pt3dadd(-135.02, 1.791, 134.15, 0.242)
pt3dadd(-135.74, 1.919, 134.15, 0.242)
pt3dadd(-136.93, 2.132, 134.15, 0.242)
pt3dadd(-138.72, 1.745, 134.15, 0.242)
pt3dadd(-141.3, 2.443, 134.15, 0.242)
pt3dadd(-142.21, 2.842, 134.15, 0.242)
pt3dadd(-144.47, 3.954, 134.15, 0.242)
pt3dadd(-147.01, 3.467, 132.22, 0.242)
}
dend[67] {pt3dclear()
pt3dadd(-56.522, 16.039, 143.25, 0.484)
pt3dadd(-57.269, 17.352, 144.51, 0.484)
pt3dadd(-58.378, 18.022, 144.51, 0.484)
pt3dadd(-59.725, 18.735, 144.51, 0.484)
pt3dadd(-60.875, 19.177, 144.51, 0.484)
pt3dadd(-61.984, 19.848, 144.51, 0.484)
pt3dadd(-62.814, 20.704, 144.51, 0.484)
pt3dadd(-64.358, 21.688, 144.51, 0.484)
pt3dadd(-65.746, 22.173, 145.48, 0.484)
pt3dadd(-67.57, 22.971, 145.48, 0.484)
pt3dadd(-68.764, 24.687, 146.44, 0.726)
pt3dadd(-69.727, 26.083, 147.63, 0.726)
pt3dadd(-70.209, 26.781, 148.5, 0.726)
pt3dadd(-70.934, 27.248, 149.57, 0.484)
pt3dadd(-72.869, 27.486, 150.13, 0.484)
pt3dadd(-74.559, 28.651, 151.34, 0.484)
pt3dadd(-75.764, 30.048, 152.29, 0.484)
pt3dadd(-76.49, 30.282, 153.16, 0.484)
pt3dadd(-77.697, 30.983, 153.16, 0.242)
pt3dadd(-78.664, 31.45, 154.72, 0.242)
pt3dadd(-79.629, 32.149, 154.72, 0.242)
pt3dadd(-81.562, 33.084, 154.72, 0.242)
pt3dadd(-82.77, 33.784, 154.72, 0.242)
pt3dadd(-83.736, 34.483, 155.03, 0.242)
pt3dadd(-84.942, 35.648, 156.53, 0.242)
pt3dadd(-85.648, 36.775, 158.55, 0.242)
}
dend[68] {pt3dclear()
pt3dadd(-85.648, 36.775, 158.55, 0.242)
pt3dadd(-86.147, 37.276, 156.66, 0.242)
pt3dadd(-87.112, 38.208, 157.59, 0.242)
pt3dadd(-89.046, 38.91, 157.59, 0.242)
pt3dadd(-90.978, 39.845, 157.59, 0.484)
pt3dadd(-93.152, 41.012, 158.49, 0.484)
pt3dadd(-95.085, 41.946, 158.49, 0.484)
pt3dadd(-96.05, 42.878, 158.49, 0.242)
pt3dadd(-97.743, 43.347, 158.49, 0.242)
pt3dadd(-99.434, 44.049, 158.49, 0.242)
pt3dadd(-101.37, 44.751, 158.49, 0.242)
pt3dadd(-102.09, 44.985, 158.49, 0.242)
pt3dadd(-103.06, 45.685, 158.49, 0.484)
pt3dadd(-104.26, 46.849, 158.49, 0.484)
pt3dadd(-105.96, 47.783, 158.49, 0.484)
pt3dadd(-107.89, 48.021, 158.49, 0.484)
pt3dadd(-109.83, 47.562, 158.49, 0.484)
pt3dadd(-110.79, 47.797, 158.49, 0.484)
pt3dadd(-111.76, 49.193, 158.49, 0.484)
pt3dadd(-112.95, 49.857, 160.92, 0.484)
pt3dadd(-114.88, 50.327, 160.92, 0.484)
pt3dadd(-116.57, 51.261, 160.92, 0.484)
pt3dadd(-118.51, 51.731, 160.92, 0.484)
pt3dadd(-120.44, 52.433, 160.92, 0.484)
pt3dadd(-121.89, 52.902, 160.92, 0.484)
pt3dadd(-123.35, 52.674, 160.92, 0.484)
pt3dadd(-123.83, 52.211, 160.92, 0.484)
pt3dadd(-125.52, 53.841, 160.92, 0.484)
pt3dadd(-127.21, 54.775, 160.92, 0.242)
pt3dadd(-128.42, 55.939, 160.92, 0.242)
pt3dadd(-129.62, 56.872, 160.92, 0.242)
pt3dadd(-131.8, 58.271, 160.92, 0.242)
pt3dadd(-132.76, 58.738, 160.92, 0.242)
}
dend[69] {pt3dclear()
pt3dadd(-85.648, 36.775, 158.55, 0.242)
pt3dadd(-85.161, 37.934, 159.13, 0.242)
pt3dadd(-86.125, 39.098, 162.35, 0.242)
pt3dadd(-87.332, 40.262, 164.52, 0.242)
pt3dadd(-88.297, 40.962, 166.5, 0.242)
pt3dadd(-88.296, 41.426, 166.82, 0.242)
pt3dadd(-87.327, 41.888, 169.93, 0.242)
pt3dadd(-87.329, 40.959, 171.19, 0.242)
pt3dadd(-86.846, 40.958, 172.42, 0.242)
pt3dadd(-86.841, 42.583, 172.8, 0.242)
pt3dadd(-87.078, 44.209, 173.97, 0.242)
pt3dadd(-87.075, 45.37, 174.79, 0.242)
pt3dadd(-86.829, 46.762, 174.92, 0.242)
pt3dadd(-87.069, 47.46, 177.18, 0.484)
pt3dadd(-87.79, 49.087, 179.63, 0.484)
pt3dadd(-87.544, 50.247, 179.63, 0.484)
pt3dadd(-87.782, 51.641, 182.07, 0.484)
pt3dadd(-87.052, 53.264, 182.07, 0.484)
pt3dadd(-86.806, 54.657, 184.52, 0.242)
pt3dadd(-87.044, 56.051, 184.52, 0.242)
pt3dadd(-87.765, 57.678, 184.52, 0.242)
pt3dadd(-87.278, 58.606, 185.68, 0.242)
pt3dadd(-87.031, 60.463, 185.68, 0.242)
pt3dadd(-88.482, 60.699, 186.96, 0.242)
pt3dadd(-89.207, 60.933, 189.64, 0.242)
pt3dadd(-89.203, 62.326, 189.68, 0.242)
pt3dadd(-88.958, 63.254, 189.68, 0.242)
pt3dadd(-88.472, 63.95, 189.68, 0.242)
pt3dadd(-88.712, 64.647, 190.89, 0.242)
pt3dadd(-88.71, 65.343, 191.86, 0.242)
pt3dadd(-88.707, 66.504, 191.86, 0.242)
pt3dadd(-88.459, 68.361, 193.43, 0.242)
pt3dadd(-88.458, 68.826, 195.45, 0.242)
pt3dadd(-88.694, 70.916, 195.45, 0.242)
pt3dadd(-88.933, 71.846, 196.3, 0.242)
pt3dadd(-88.928, 73.471, 196.3, 0.242)
pt3dadd(-89.65, 74.866, 197.57, 0.242)
pt3dadd(-89.405, 75.794, 197.84, 0.242)
pt3dadd(-89.161, 76.722, 199.96, 0.242)
pt3dadd(-89.157, 77.883, 199.96, 0.242)
pt3dadd(-89.634, 80.439, 199.96, 0.242)
pt3dadd(-89.633, 80.903, 203.16, 0.242)
pt3dadd(-90.114, 81.601, 203.16, 0.242)
pt3dadd(-88.902, 82.526, 204.93, 0.242)
}
dend[70] {pt3dclear()
pt3dadd(-27.712, -5.633, 135.56, 0.726)
pt3dadd(-26.235, -4.246, 135.85, 0.242)
pt3dadd(-26.03, -3.104, 138.63, 0.242)
pt3dadd(-25.588, -2.004, 141.07, 0.484)
pt3dadd(-25.342, -0.632, 142.11, 0.484)
pt3dadd(-24.94, 0.239, 143.1, 0.484)
pt3dadd(-24.974, 1.425, 143.56, 0.484)
pt3dadd(-24.531, 2.525, 147.45, 0.484)
pt3dadd(-23.85, 3.582, 147.45, 0.484)
pt3dadd(-24.549, 3.893, 147.45, 0.242)
pt3dadd(-24.546, 4.822, 147.45, 0.242)
pt3dadd(-24.3, 6.214, 147.45, 0.242)
pt3dadd(-24.056, 6.91, 147.45, 0.242)
pt3dadd(-23.568, 8.302, 147.45, 0.242)
pt3dadd(-23.563, 9.927, 150.02, 0.242)
pt3dadd(-23.318, 11.087, 150.02, 0.242)
pt3dadd(-22.834, 11.086, 150.02, 0.242)
pt3dadd(-22.347, 12.013, 150.02, 0.242)
pt3dadd(-22.587, 12.943, 150.02, 0.242)
pt3dadd(-23.067, 14.105, 151.62, 0.242)
pt3dadd(-23.547, 15.5, 153.59, 0.242)
pt3dadd(-22.577, 16.194, 156.6, 0.484)
pt3dadd(-22.332, 17.354, 156.6, 0.484)
pt3dadd(-22.33, 18.05, 158.05, 0.484)
pt3dadd(-21.842, 19.442, 158.05, 0.484)
pt3dadd(-21.597, 20.37, 161.27, 0.484)
pt3dadd(-21.353, 21.066, 161.27, 0.484)
pt3dadd(-21.109, 21.762, 161.27, 0.484)
pt3dadd(-21.348, 22.691, 161.27, 0.484)
pt3dadd(-21.344, 24.317, 164.16, 0.242)
pt3dadd(-20.615, 25.476, 164.16, 0.242)
pt3dadd(-20.127, 26.635, 167.1, 0.242)
pt3dadd(-19.881, 28.028, 167.1, 0.242)
pt3dadd(-18.91, 29.186, 167.1, 0.484)
pt3dadd(-18.18, 30.577, 170.23, 0.484)
pt3dadd(-17.451, 31.736, 170.23, 0.484)
pt3dadd(-16.722, 32.894, 173.27, 0.484)
pt3dadd(-15.507, 34.749, 173.89, 0.484)
pt3dadd(-15.019, 35.908, 175.76, 0.484)
pt3dadd(-14.29, 37.067, 175.76, 0.242)
}
dend[71] {pt3dclear()
pt3dadd(-21.736, -17.554, 128.04, 0.968)
pt3dadd(-23.649, -18.627, 128.49, 0.726)
pt3dadd(-25.003, -19.328, 128.49, 0.726)
pt3dadd(-26.324, -21.214, 128.49, 0.726)
pt3dadd(-28.04, -22.558, 128.49, 0.726)
pt3dadd(-29.64, -24.631, 129.53, 0.726)
pt3dadd(-31.798, -27.075, 129.53, 0.726)
pt3dadd(-32.996, -28.276, 127.18, 0.726)
pt3dadd(-33.48, -29.604, 128.07, 0.726)
pt3dadd(-34.645, -31.99, 130.54, 0.726)
pt3dadd(-35.408, -33.505, 131.01, 0.726)
pt3dadd(-36.532, -35.663, 131.01, 0.726)
pt3dadd(-37.458, -38.091, 132.44, 0.726)
pt3dadd(-38.541, -40.02, 133.82, 0.484)
pt3dadd(-38.705, -40.935, 133.82, 0.484)
pt3dadd(-39.386, -41.992, 133.82, 0.484)
}
}
proc shape3d_11() {
dend[71] { pt3dadd(-40.937, -42.422, 136.64, 0.726)
pt3dadd(-42.169, -42.437, 137.22, 0.726)
pt3dadd(-44.082, -43.51, 138.31, 0.726)
pt3dadd(-45.682, -45.582, 139.59, 0.726)
pt3dadd(-46.445, -47.097, 139.65, 0.726)
pt3dadd(-47.446, -48.569, 139.65, 0.726)
pt3dadd(-48.249, -50.312, 140.97, 0.726)
pt3dadd(-49.53, -51.97, 140.97, 0.484)
pt3dadd(-51.68, -53, 142.75, 0.726)
pt3dadd(-52.879, -54.201, 142.75, 0.726)
}
dend[72] {pt3dclear()
pt3dadd(-52.879, -54.201, 142.75, 0.726)
pt3dadd(-53.397, -54.519, 147.03, 1.21238)
}
dend[73] {pt3dclear()
pt3dadd(-53.397, -54.519, 147.03, 1.21238)
pt3dadd(-54.664, -54.974, 147, 0.484)
}
dend[74] {pt3dclear()
pt3dadd(-54.664, -54.974, 147, 0.484)
pt3dadd(-55.874, -57.203, 148.07, 0.484)
pt3dadd(-55.841, -58.388, 149.53, 0.484)
pt3dadd(-54.657, -60.015, 149.53, 0.484)
}
dend[75] {pt3dclear()
pt3dadd(-2.677, -34.649, 94.887, 1.936)
pt3dadd(-3.48, -36.392, 93.795, 0.968)
pt3dadd(-4.917, -37.55, 94.792, 0.968)
pt3dadd(-6.829, -38.623, 94.792, 0.968)
pt3dadd(-7.864, -38.91, 94.792, 0.968)
}
dend[76] {pt3dclear()
pt3dadd(-7.864, -38.91, 94.792, 0.968)
pt3dadd(-10.483, -38.441, 96.455, 0.968)
pt3dadd(-11.953, -38.413, 96.455, 0.968)
pt3dadd(-14.342, -39.401, 96.802, 0.968)
pt3dadd(-16.017, -40.516, 98.185, 0.968)
pt3dadd(-18.603, -41.232, 100.56, 0.968)
pt3dadd(-19.317, -41.104, 100.56, 0.968)
pt3dadd(-20.787, -41.077, 100.56, 0.726)
pt3dadd(-21.747, -42.32, 100.56, 0.726)
pt3dadd(-22.272, -43.878, 101.99, 0.968)
pt3dadd(-23.947, -44.993, 101.99, 0.968)
pt3dadd(-24.907, -46.236, 101.99, 0.968)
pt3dadd(-26.105, -47.437, 104.53, 0.968)
pt3dadd(-28.14, -49.196, 104.53, 0.726)
pt3dadd(-29.848, -49.126, 106.13, 0.726)
pt3dadd(-32.115, -49.428, 106.13, 0.726)
pt3dadd(-33.945, -50.043, 106.81, 0.726)
pt3dadd(-36.532, -50.759, 108.22, 0.726)
pt3dadd(-37.369, -51.317, 108.22, 0.726)
pt3dadd(-38.295, -53.746, 112.05, 0.726)
pt3dadd(-38.976, -54.803, 112.05, 0.726)
pt3dadd(-39.304, -56.632, 112.05, 0.726)
pt3dadd(-41.176, -57.476, 113.11, 0.726)
pt3dadd(-43.606, -58.692, 114.55, 0.726)
pt3dadd(-46.117, -60.365, 116.04, 0.726)
pt3dadd(-47.193, -60.88, 116.04, 0.726)
pt3dadd(-48.942, -61.039, 116.93, 0.484)
pt3dadd(-50.337, -61.968, 118.13, 0.484)
pt3dadd(-51.855, -63.584, 120.78, 0.484)
pt3dadd(-52.856, -65.056, 121.53, 0.484)
pt3dadd(-53.816, -66.299, 121.53, 0.484)
pt3dadd(-55.294, -67.686, 123.02, 0.484)
pt3dadd(-56.131, -68.243, 123.99, 0.484)
pt3dadd(-58.2, -68.816, 123.99, 0.484)
pt3dadd(-59.439, -70.246, 123.99, 0.484)
pt3dadd(-60.44, -71.718, 125.3, 0.484)
pt3dadd(-61.359, -72.732, 125.3, 0.484)
pt3dadd(-62.476, -73.476, 125.87, 0.484)
pt3dadd(-64.905, -74.692, 125.87, 0.484)
pt3dadd(-65.825, -75.707, 126.52, 0.726)
pt3dadd(-66.826, -77.179, 127, 0.726)
pt3dadd(-67.983, -78.151, 127, 0.484)
pt3dadd(-68.868, -80.351, 127, 0.484)
pt3dadd(-69.393, -81.909, 127.32, 0.484)
pt3dadd(-71.47, -83.896, 128.43, 0.484)
pt3dadd(-72.947, -85.282, 128.43, 0.484)
pt3dadd(-74.941, -86.812, 128.43, 0.484)
pt3dadd(-75.622, -87.869, 129.23, 0.484)
pt3dadd(-76.541, -88.884, 129.23, 0.484)
pt3dadd(-77.461, -89.899, 129.23, 0.484)
pt3dadd(-79.176, -91.243, 129.23, 0.484)
}
dend[77] {pt3dclear()
pt3dadd(-79.176, -91.243, 129.23, 0.484)
pt3dadd(-78.633, -93.699, 131.49, 0.484)
pt3dadd(-78.599, -94.885, 131.49, 0.484)
pt3dadd(-80.036, -96.043, 132.37, 0.484)
pt3dadd(-81.078, -97.743, 132.8, 0.484)
pt3dadd(-81.759, -98.801, 134.48, 0.484)
pt3dadd(-82.12, -99.444, 134.48, 0.484)
}
dend[78] {pt3dclear()
pt3dadd(-82.12, -99.444, 134.48, 0.484)
pt3dadd(-82.882, -100.96, 134.48, 0.242)
pt3dadd(-83.325, -102.06, 134.48, 0.242)
pt3dadd(-84.408, -103.99, 134.48, 0.242)
pt3dadd(-85.245, -104.54, 134.48, 0.242)
pt3dadd(-85.729, -105.87, 134.48, 0.242)
pt3dadd(-86.533, -107.62, 134.48, 0.242)
pt3dadd(-88.174, -109.92, 133.74, 0.242)
pt3dadd(-89.175, -111.39, 133.74, 0.242)
pt3dadd(-90.652, -112.78, 134.8, 0.242)
pt3dadd(-91.177, -114.33, 135.99, 0.242)
pt3dadd(-92.416, -115.76, 136.51, 0.242)
pt3dadd(-93.179, -117.28, 138.37, 0.242)
pt3dadd(-94.105, -119.71, 138.81, 0.242)
}
dend[79] {pt3dclear()
pt3dadd(-82.12, -99.444, 134.48, 0.484)
pt3dadd(-82.447, -101.27, 135.17, 0.242)
pt3dadd(-82.693, -102.64, 136.98, 0.242)
pt3dadd(-84.442, -102.8, 138.49, 0.242)
pt3dadd(-84.687, -104.17, 139.26, 0.242)
pt3dadd(-85.048, -104.82, 139.26, 0.242)
pt3dadd(-87.798, -106.45, 139.26, 0.242)
pt3dadd(-89.432, -107.33, 141.16, 0.242)
pt3dadd(-90.63, -108.54, 142.87, 0.242)
pt3dadd(-91.311, -109.59, 145.34, 0.242)
pt3dadd(-92.673, -111.71, 147.32, 0.242)
pt3dadd(-93.034, -112.35, 147.32, 0.242)
}
dend[80] {pt3dclear()
pt3dadd(-79.176, -91.243, 129.23, 0.484)
pt3dadd(-81.171, -92.773, 128.61, 0.242)
pt3dadd(-82.09, -93.788, 128.61, 0.242)
pt3dadd(-83.288, -94.989, 128.61, 0.242)
pt3dadd(-85.242, -96.29, 128.61, 0.242)
pt3dadd(-86.555, -96.762, 128.61, 0.242)
pt3dadd(-87.311, -96.863, 128.61, 0.242)
pt3dadd(-87.433, -97.549, 128.61, 0.242)
pt3dadd(-88.032, -98.149, 128.61, 0.242)
pt3dadd(-90.101, -98.722, 128.61, 0.242)
pt3dadd(-91.456, -99.423, 128.61, 0.242)
pt3dadd(-92.851, -100.35, 128.61, 0.242)
pt3dadd(-94.165, -100.82, 129.03, 0.242)
pt3dadd(-94.682, -100.97, 129.03, 0.242)
pt3dadd(-95.166, -102.3, 129.03, 0.242)
pt3dadd(-95.568, -103.17, 129.03, 0.242)
pt3dadd(-95.813, -104.54, 129.03, 0.242)
pt3dadd(-97.964, -105.57, 129.03, 0.242)
pt3dadd(-100.03, -106.14, 126.74, 0.242)
pt3dadd(-101.26, -106.16, 126.74, 0.242)
pt3dadd(-103.49, -106.23, 126.74, 0.242)
pt3dadd(-104.44, -106.06, 126.74, 0.242)
}
dend[81] {pt3dclear()
pt3dadd(-104.44, -106.06, 126.74, 0.242)
pt3dadd(-105.01, -107.85, 125.05, 0.484)
pt3dadd(-106.01, -109.32, 125.05, 0.484)
pt3dadd(-106.97, -110.56, 125.05, 0.484)
pt3dadd(-109.32, -111.32, 122.91, 0.484)
pt3dadd(-112.1, -111.77, 122.91, 0.484)
pt3dadd(-113.22, -112.51, 122.91, 0.484)
pt3dadd(-114.69, -112.48, 122.91, 0.484)
pt3dadd(-116.71, -112.83, 122.91, 0.484)
pt3dadd(-118.59, -113.67, 122.91, 0.484)
pt3dadd(-120.22, -114.56, 122.91, 0.484)
pt3dadd(-122.05, -115.17, 122.01, 0.484)
pt3dadd(-124.48, -116.39, 122.01, 0.484)
pt3dadd(-126.43, -117.69, 122.01, 0.484)
pt3dadd(-128.43, -119.22, 120.07, 0.484)
pt3dadd(-128.72, -120.82, 119.24, 0.484)
pt3dadd(-128.92, -121.96, 119.24, 0.484)
}
dend[82] {pt3dclear()
pt3dadd(-104.44, -106.06, 126.74, 0.242)
pt3dadd(-103.96, -104.73, 127.55, 0.484)
pt3dadd(-103.91, -103.09, 127.55, 0.484)
pt3dadd(-104.86, -101.5, 127.55, 0.484)
pt3dadd(-105.37, -100.23, 129.02, 0.484)
pt3dadd(-106.11, -98.921, 130.29, 0.484)
pt3dadd(-107.03, -98.522, 133.18, 0.484)
pt3dadd(-108.37, -97.809, 134.78, 0.484)
pt3dadd(-109.19, -95.538, 135.87, 0.484)
pt3dadd(-109.94, -94.225, 136.93, 0.484)
pt3dadd(-109.78, -93.311, 136.93, 0.484)
pt3dadd(-110.4, -91.312, 137.83, 0.484)
pt3dadd(-111.67, -90.142, 140.57, 0.484)
pt3dadd(-111.74, -89.185, 141.27, 0.484)
pt3dadd(-112.33, -86.957, 141.27, 0.242)
pt3dadd(-113.27, -85.373, 142.16, 0.242)
pt3dadd(-114.54, -84.202, 144.08, 0.242)
pt3dadd(-115.37, -83.346, 144.85, 0.242)
pt3dadd(-115.12, -81.975, 146.51, 0.242)
pt3dadd(-114.92, -80.832, 147.95, 0.242)
pt3dadd(-114.87, -79.189, 147.95, 0.242)
}
dend[83] {pt3dclear()
pt3dadd(-7.864, -38.91, 94.792, 0.968)
pt3dadd(-8.109, -40.281, 94.48, 0.484)
pt3dadd(-8.232, -40.967, 94.48, 0.484)
pt3dadd(-7.6, -41.552, 94.48, 0.484)
pt3dadd(-7.927, -43.38, 92.463, 0.484)
pt3dadd(-8.69, -44.895, 92.463, 0.484)
pt3dadd(-9.371, -45.952, 92.463, 0.484)
pt3dadd(-9.936, -47.738, 92.463, 0.484)
pt3dadd(-10.461, -49.295, 92.463, 0.484)
pt3dadd(-11.7, -50.725, 92.463, 0.484)
pt3dadd(-11.633, -53.096, 92.463, 0.484)
}
dend[84] {pt3dclear()
pt3dadd(-97.558, -7.517, 76.895, 0.242)
pt3dadd(-97.074, -6.188, 78.973, 0.726)
pt3dadd(-96.788, -4.588, 78.973, 0.726)
pt3dadd(-96.419, -2.531, 78.973, 0.726)
pt3dadd(-96.453, -1.346, 78.973, 0.726)
pt3dadd(-96.84, 0.611, 79.885, 0.484)
pt3dadd(-97.309, 2.11, 81.315, 0.484)
pt3dadd(-97.424, 2.838, 81.315, 0.484)
pt3dadd(-97.967, 5.295, 81.315, 0.484)
pt3dadd(-98.198, 6.751, 83.027, 0.484)
pt3dadd(-98.109, 8.622, 83.03, 0.484)
pt3dadd(-97.781, 10.451, 83.03, 0.484)
pt3dadd(-98.053, 11.679, 83.03, 0.484)
pt3dadd(-97.487, 13.465, 83.03, 0.484)
pt3dadd(-96.65, 14.022, 83.03, 0.484)
pt3dadd(-96.248, 14.894, 83.03, 0.484)
pt3dadd(-96.125, 15.58, 83.372, 0.484)
pt3dadd(-95.757, 17.637, 83.372, 0.484)
pt3dadd(-95.47, 19.237, 84.308, 0.484)
}
dend[85] {pt3dclear()
pt3dadd(-65.821, -18.207, 65.158, 0.968)
pt3dadd(-66.513, -19.847, 65.158, 0.726)
pt3dadd(-67.19, -22.184, 66.99, 0.726)
}
}
proc shape3d_12() {
dend[85] { pt3dadd(-68.849, -23.844, 67.397, 0.726)
pt3dadd(-70.514, -25.272, 67.397, 0.726)
pt3dadd(-72.192, -26.004, 67.397, 0.726)
pt3dadd(-75.508, -30.896, 75, 0.484)
pt3dadd(-76.311, -32.639, 75, 0.484)
pt3dadd(-77.55, -34.068, 75, 0.484)
pt3dadd(-78.831, -35.726, 75, 0.484)
pt3dadd(-80.587, -37.298, 75.645, 0.484)
pt3dadd(-81.145, -37.67, 75.645, 0.484)
pt3dadd(-82.622, -39.057, 76.355, 0.484)
pt3dadd(-84.1, -40.444, 76.355, 0.484)
pt3dadd(-85.298, -41.644, 76.355, 0.484)
pt3dadd(-86.932, -42.531, 77.238, 0.484)
pt3dadd(-88.885, -43.833, 78.375, 0.484)
pt3dadd(-89.722, -44.39, 78.375, 0.484)
pt3dadd(-90.601, -45.176, 78.375, 0.484)
pt3dadd(-91.873, -45.42, 78.375, 0.484)
pt3dadd(-92.792, -46.435, 78.467, 0.484)
pt3dadd(-93.868, -46.95, 79.177, 0.484)
pt3dadd(-95.501, -47.837, 79.177, 0.242)
pt3dadd(-96.339, -48.395, 81.48, 0.484)
pt3dadd(-97.135, -48.724, 81.48, 0.484)
pt3dadd(-97.734, -49.324, 82.747, 0.484)
pt3dadd(-98.973, -50.754, 82.75, 0.484)
pt3dadd(-100.41, -51.912, 83.287, 0.484)
pt3dadd(-101.81, -52.841, 84.455, 0.242)
pt3dadd(-103.12, -53.314, 84.455, 0.242)
pt3dadd(-104.43, -53.786, 85.857, 0.242)
pt3dadd(-105.59, -54.758, 87.76, 0.484)
pt3dadd(-106.75, -55.73, 87.76, 0.484)
pt3dadd(-107.47, -57.016, 90.438, 0.484)
pt3dadd(-108.27, -58.76, 90.438, 0.484)
pt3dadd(-109.27, -60.232, 90.815, 0.242)
pt3dadd(-110.6, -62.118, 91.81, 0.242)
pt3dadd(-110.17, -63.846, 92.82, 0.484)
pt3dadd(-109.89, -65.074, 93.677, 0.484)
pt3dadd(-109.63, -67.716, 96.033, 0.484)
pt3dadd(-110.83, -68.917, 98.673, 0.484)
pt3dadd(-109.84, -70.273, 102.52, 0.484)
pt3dadd(-108.62, -71.671, 105.78, 0.484)
pt3dadd(-108.86, -73.043, 109.04, 0.484)
pt3dadd(-109.39, -74.6, 112.14, 0.484)
pt3dadd(-109.78, -74.058, 114.16, 0.484)
pt3dadd(-109.62, -73.143, 114.16, 0.484)
pt3dadd(-108.87, -74.457, 116.68, 0.484)
pt3dadd(-109.71, -75.014, 116.68, 0.484)
pt3dadd(-110.27, -75.386, 120.58, 0.484)
pt3dadd(-108.91, -74.685, 120.6, 0.484)
pt3dadd(-108.27, -73.856, 120.6, 0.484)
pt3dadd(-108.15, -73.171, 120.6, 0.484)
}
dend[86] {pt3dclear()
pt3dadd(-98.626, -23.303, 62.967, 0.726)
pt3dadd(-100.05, -24.726, 62.962, 0.726)
pt3dadd(-101.47, -26.149, 62.962, 0.726)
pt3dadd(-103.37, -28.047, 62.962, 0.726)
pt3dadd(-104.79, -29.702, 64.795, 0.726)
pt3dadd(-108.93, -33.637, 75, 0.484)
pt3dadd(-110.73, -35.438, 76.455, 0.726)
pt3dadd(-113.24, -37.111, 78.177, 0.726)
pt3dadd(-115.04, -38.912, 76.978, 0.726)
pt3dadd(-116.87, -39.528, 79.915, 0.726)
pt3dadd(-118.55, -40.643, 81.063, 0.726)
pt3dadd(-120.26, -41.987, 82.418, 0.726)
pt3dadd(-121.54, -42.231, 84.825, 0.726)
pt3dadd(-123.14, -44.304, 86.027, 0.726)
pt3dadd(-124.65, -45.919, 87.302, 0.726)
pt3dadd(-126.13, -47.305, 85.863, 0.484)
pt3dadd(-126.81, -48.363, 87.128, 0.484)
pt3dadd(-127.57, -49.877, 87.27, 0.484)
pt3dadd(-128.69, -50.621, 87.27, 0.484)
pt3dadd(-129.93, -52.05, 87.27, 0.484)
pt3dadd(-130.97, -53.751, 88.72, 0.484)
pt3dadd(-131.97, -55.223, 88.72, 0.484)
pt3dadd(-133.57, -55.881, 89.515, 0.484)
pt3dadd(-134.64, -56.396, 89.908, 0.484)
pt3dadd(-136.27, -57.283, 92.305, 0.484)
pt3dadd(-138.94, -58.456, 92.305, 0.484)
pt3dadd(-140.25, -59.323, 92.817, 0.484)
pt3dadd(-141.56, -59.796, 92.817, 0.484)
pt3dadd(-141.96, -59.253, 92.817, 0.484)
pt3dadd(-143.87, -60.326, 93.725, 0.484)
pt3dadd(-145.34, -61.713, 95.823, 0.484)
}
dend[87] {pt3dclear()
pt3dadd(-145.34, -61.713, 95.823, 0.484)
pt3dadd(-148.49, -62.801, 97.69, 0.484)
pt3dadd(-151.16, -63.974, 100.15, 0.484)
pt3dadd(-153.31, -65.004, 100.15, 0.484)
pt3dadd(-155.18, -65.848, 101.62, 0.484)
pt3dadd(-157.17, -65.964, 101.62, 0.484)
pt3dadd(-158.47, -65.023, 102.48, 0.484)
pt3dadd(-159.46, -63.667, 105.3, 0.484)
pt3dadd(-160.49, -62.539, 106.23, 0.484)
pt3dadd(-162.07, -61.784, 107.87, 0.484)
pt3dadd(-163.78, -61.713, 108.52, 0.484)
pt3dadd(-166.37, -62.43, 109.28, 0.484)
pt3dadd(-168.2, -63.045, 110.11, 0.484)
pt3dadd(-169.71, -63.247, 111.1, 0.484)
pt3dadd(-171.61, -62.905, 112.37, 0.242)
pt3dadd(-172.65, -63.192, 112.37, 0.242)
pt3dadd(-174.16, -63.393, 112.37, 0.242)
pt3dadd(-175.55, -64.323, 114.14, 0.242)
pt3dadd(-176.27, -64.195, 115.96, 0.242)
pt3dadd(-177.29, -63.067, 115.96, 0.484)
pt3dadd(-178.68, -62.583, 119.6, 0.484)
pt3dadd(-180.83, -62.199, 121.93, 0.484)
pt3dadd(-182.73, -61.858, 123.06, 0.484)
pt3dadd(-184.76, -62.202, 123.81, 0.484)
pt3dadd(-186.78, -61.133, 125.82, 0.484)
pt3dadd(-188.13, -60.42, 128.87, 0.484)
pt3dadd(-189.32, -60.206, 129.15, 0.484)
pt3dadd(-189.28, -61.392, 129.15, 0.484)
pt3dadd(-190.91, -60.865, 133.58, 0.484)
pt3dadd(-192.58, -60.566, 133.58, 0.484)
pt3dadd(-194.16, -59.81, 135.71, 0.484)
pt3dadd(-194.95, -58.726, 135.71, 0.484)
pt3dadd(-196.18, -57.327, 137.02, 0.484)
pt3dadd(-198.2, -56.257, 138.68, 0.484)
pt3dadd(-200.1, -55.916, 139.96, 0.484)
pt3dadd(-201.77, -55.618, 140.43, 0.484)
}
dend[88] {pt3dclear()
pt3dadd(-201.77, -55.618, 140.43, 0.484)
pt3dadd(-202.87, -53.533, 143.31, 0.242)
pt3dadd(-204.13, -52.363, 144.33, 0.242)
pt3dadd(-205.84, -50.879, 146.1, 0.242)
pt3dadd(-206.51, -50.522, 147.41, 0.242)
}
dend[89] {pt3dclear()
pt3dadd(-206.51, -50.522, 147.41, 0.242)
pt3dadd(-207.94, -50.267, 147.41, 0.242)
pt3dadd(-209.84, -49.925, 149.38, 0.242)
pt3dadd(-212.23, -49.499, 149.38, 0.242)
pt3dadd(-213.81, -48.743, 149.38, 0.242)
}
dend[90] {pt3dclear()
pt3dadd(-201.77, -55.618, 140.43, 0.484)
pt3dadd(-203.76, -55.733, 142.98, 0.242)
pt3dadd(-205.54, -56.12, 145.26, 0.242)
pt3dadd(-206.54, -56.178, 146.69, 0.242)
}
dend[91] {pt3dclear()
pt3dadd(-206.54, -56.178, 146.69, 0.242)
pt3dadd(-208.32, -55.152, 146.69, 0.242)
pt3dadd(-210.31, -55.267, 148.23, 0.242)
pt3dadd(-211.82, -55.469, 148.23, 0.242)
pt3dadd(-213.13, -55.941, 148.23, 0.242)
pt3dadd(-214.56, -55.685, 148.23, 0.242)
pt3dadd(-215.88, -56.158, 149.05, 0.242)
pt3dadd(-217.15, -56.401, 149.05, 0.242)
pt3dadd(-218.66, -56.603, 151.05, 0.242)
pt3dadd(-219.53, -55.975, 152.62, 0.242)
pt3dadd(-221.04, -56.176, 152.62, 0.242)
}
dend[92] {pt3dclear()
pt3dadd(-145.34, -61.713, 95.823, 0.484)
pt3dadd(-145.2, -63.626, 97.387, 0.484)
pt3dadd(-146, -65.369, 98.01, 0.484)
pt3dadd(-146.61, -67.384, 98.48, 0.484)
pt3dadd(-147.49, -69.584, 96.715, 0.484)
pt3dadd(-148.46, -72.242, 94.925, 0.484)
pt3dadd(-150.26, -75.457, 94.198, 0.484)
pt3dadd(-151.67, -77.8, 94.198, 0.484)
pt3dadd(-152.47, -79.543, 92.228, 0.484)
pt3dadd(-152.76, -81.143, 92.228, 0.484)
pt3dadd(-153.56, -82.886, 91.43, 0.484)
pt3dadd(-153.69, -84.986, 91.43, 0.484)
pt3dadd(-154.58, -87.186, 90.51, 0.484)
pt3dadd(-154.98, -88.058, 90.51, 0.484)
pt3dadd(-155.67, -90.529, 90.51, 0.484)
pt3dadd(-156.39, -91.815, 89.845, 0.484)
pt3dadd(-157.43, -93.516, 89.845, 0.484)
pt3dadd(-157.32, -95.658, 89.845, 0.484)
pt3dadd(-157.65, -97.487, 89.085, 0.484)
pt3dadd(-159.17, -99.102, 89.085, 0.484)
pt3dadd(-160.88, -100.45, 89.085, 0.484)
pt3dadd(-161.61, -101.73, 89.085, 0.484)
pt3dadd(-162.49, -103.93, 89.085, 0.484)
pt3dadd(-163.02, -106.9, 89.085, 0.484)
pt3dadd(-164.27, -109.75, 88.317, 0.484)
pt3dadd(-166.12, -113.19, 88.317, 0.484)
pt3dadd(-167, -115.39, 88.317, 0.484)
pt3dadd(-168.28, -117.05, 88.317, 0.484)
pt3dadd(-169.09, -118.79, 88.317, 0.484)
pt3dadd(-169.93, -120.76, 87.348, 0.484)
pt3dadd(-169.67, -123.4, 87.348, 0.484)
}
dend[93] {pt3dclear()
pt3dadd(-53.397, -54.519, 147.03, 1.21238)
pt3dadd(-53.94, -55.44, 147, 0.242)
pt3dadd(-53.942, -56.369, 147, 0.242)
}
dend[94] {pt3dclear()
pt3dadd(-54.664, -54.974, 147, 0.484)
pt3dadd(-56.118, -55.666, 147, 0.484)
pt3dadd(-57.572, -56.59, 148.55, 0.484)
pt3dadd(-59.269, -57.514, 150.54, 0.484)
pt3dadd(-59.757, -59.138, 152.34, 0.484)
pt3dadd(-60.244, -60.066, 152.45, 0.484)
pt3dadd(-60.731, -61.225, 153.55, 0.484)
pt3dadd(-60.497, -63.78, 154.99, 0.484)
pt3dadd(-61.466, -64.241, 157.75, 0.484)
pt3dadd(-61.949, -64.008, 158.86, 0.484)
pt3dadd(-63.403, -64.7, 159.98, 0.484)
pt3dadd(-65.827, -66.551, 162.42, 0.484)
pt3dadd(-66.313, -67.014, 162.45, 0.484)
pt3dadd(-68.008, -67.705, 164.18, 0.484)
pt3dadd(-69.462, -68.398, 164.18, 0.484)
pt3dadd(-70.916, -69.322, 164.18, 0.484)
pt3dadd(-71.646, -70.713, 165.62, 0.484)
pt3dadd(-71.894, -72.57, 167.93, 0.484)
pt3dadd(-72.863, -73.264, 167.93, 0.484)
pt3dadd(-74.559, -73.955, 168.88, 0.484)
pt3dadd(-75.768, -73.72, 171.57, 0.484)
pt3dadd(-76.978, -73.948, 171.62, 0.484)
pt3dadd(-77.947, -74.178, 173.71, 0.484)
pt3dadd(-78.43, -73.944, 175.31, 0.484)
}
}
proc shape3d_13() {
dend[94] { pt3dadd(-79.155, -73.478, 177.35, 0.484)
pt3dadd(-79.637, -73.012, 180.15, 0.484)
pt3dadd(-80.605, -73.009, 180.15, 0.484)
pt3dadd(-81.573, -73.006, 181.83, 0.484)
pt3dadd(-83.023, -72.538, 181.83, 0.484)
pt3dadd(-84.231, -72.07, 181.85, 0.484)
pt3dadd(-86.167, -72.064, 185.47, 0.484)
pt3dadd(-87.616, -71.131, 187.99, 0.484)
pt3dadd(-89.067, -71.127, 188.16, 0.484)
pt3dadd(-90.762, -71.586, 188.46, 0.484)
pt3dadd(-92.7, -72.277, 190.31, 0.484)
pt3dadd(-94.153, -72.737, 192.07, 0.484)
pt3dadd(-94.88, -73.2, 192.07, 0.484)
pt3dadd(-95.608, -73.894, 192.07, 0.242)
pt3dadd(-96.816, -73.426, 192.32, 0.484)
pt3dadd(-97.783, -73.191, 195, 0.484)
pt3dadd(-98.751, -72.956, 195.13, 0.484)
pt3dadd(-99.236, -73.419, 195.82, 0.484)
pt3dadd(-98.749, -72.26, 200.49, 0.484)
pt3dadd(-99.959, -72.488, 203.09, 0.484)
pt3dadd(-102.14, -72.714, 203.09, 0.484)
pt3dadd(-102.86, -72.944, 204.02, 0.484)
pt3dadd(-103.83, -72.477, 204.02, 0.484)
pt3dadd(-104.8, -72.938, 206.43, 0.484)
pt3dadd(-105.53, -73.169, 206.85, 0.484)
pt3dadd(-106.98, -72.932, 207.34, 0.484)
pt3dadd(-108.67, -73.856, 208.56, 0.484)
pt3dadd(-109.88, -74.085, 211.23, 0.484)
pt3dadd(-111.09, -73.617, 211.23, 0.484)
}
dend[95] {pt3dclear()
pt3dadd(-52.879, -54.201, 142.75, 0.726)
pt3dadd(-53.764, -56.401, 142.75, 0.726)
pt3dadd(-54.371, -58.415, 142.75, 0.726)
pt3dadd(-54.977, -60.43, 142.75, 0.726)
pt3dadd(-55.584, -62.444, 143.6, 0.726)
pt3dadd(-56.667, -64.373, 144.11, 0.726)
pt3dadd(-57.865, -65.574, 145.24, 0.726)
pt3dadd(-57.988, -66.259, 145.24, 0.726)
pt3dadd(-59.063, -66.775, 145.24, 0.484)
pt3dadd(-59.785, -68.061, 145.24, 0.484)
pt3dadd(-60.31, -69.618, 145.79, 0.484)
pt3dadd(-60.875, -71.404, 145.79, 0.484)
pt3dadd(-61.638, -72.918, 146.77, 0.484)
pt3dadd(-63.428, -73.305, 146.77, 0.484)
pt3dadd(-64.306, -74.092, 147.51, 0.484)
pt3dadd(-65.947, -76.393, 147.51, 0.484)
pt3dadd(-66.628, -77.45, 147.51, 0.484)
pt3dadd(-68.228, -79.522, 147.51, 0.484)
pt3dadd(-69.189, -80.766, 147.51, 0.484)
pt3dadd(-69.754, -82.552, 147.51, 0.484)
pt3dadd(-70.673, -83.566, 147.51, 0.484)
pt3dadd(-71.231, -83.938, 147.51, 0.484)
pt3dadd(-72.307, -84.453, 147.51, 0.484)
pt3dadd(-73.308, -85.925, 148.44, 0.242)
pt3dadd(-73.71, -86.797, 148.44, 0.242)
pt3dadd(-74.67, -88.04, 148.44, 0.242)
pt3dadd(-75.392, -89.326, 148.44, 0.242)
pt3dadd(-75.753, -89.969, 148.44, 0.242)
pt3dadd(-80.903, -92.28, 149.93, 0.484)
pt3dadd(-81.389, -92.976, 149.93, 0.484)
pt3dadd(-83.084, -93.435, 149.93, 0.484)
pt3dadd(-83.572, -94.827, 151.18, 0.484)
pt3dadd(-84.786, -96.216, 151.18, 0.484)
pt3dadd(-85.756, -97.142, 152.21, 0.484)
pt3dadd(-87.212, -98.531, 152.74, 0.484)
pt3dadd(-88.67, -100.62, 152.74, 0.484)
pt3dadd(-89.641, -102.01, 153.52, 0.484)
pt3dadd(-90.609, -102, 153.52, 0.484)
pt3dadd(-91.097, -103.4, 153.52, 0.484)
pt3dadd(-91.828, -105.02, 154.53, 0.484)
pt3dadd(-92.557, -106.18, 154.78, 0.484)
pt3dadd(-93.287, -107.8, 155.22, 0.484)
pt3dadd(-94.502, -109.42, 156.28, 0.484)
pt3dadd(-95.472, -110.35, 156.28, 0.484)
pt3dadd(-96.442, -111.04, 157.34, 0.484)
}
dend[96] {pt3dclear()
pt3dadd(-206.51, -50.522, 147.41, 0.242)
pt3dadd(-207.61, -49.371, 148.75, 0.484)
pt3dadd(-208.58, -48.672, 148.75, 0.484)
pt3dadd(-209.79, -48.436, 149.54, 0.484)
pt3dadd(-211, -47.968, 150.24, 0.484)
pt3dadd(-211.48, -47.967, 153.06, 0.484)
pt3dadd(-212.93, -47.731, 153.06, 0.242)
pt3dadd(-214.14, -47.263, 153.33, 0.242)
pt3dadd(-214.62, -46.565, 154.71, 0.242)
pt3dadd(-215.35, -45.866, 154.71, 0.242)
pt3dadd(-215.83, -44.704, 154.71, 0.242)
pt3dadd(-217.04, -44.7, 154.71, 0.242)
pt3dadd(-218, -43.536, 154.79, 0.242)
pt3dadd(-218.72, -42.141, 155.79, 0.242)
pt3dadd(-219.21, -41.675, 155.79, 0.242)
pt3dadd(-219.93, -41.673, 155.79, 0.242)
pt3dadd(-221.62, -40.972, 155.79, 0.242)
pt3dadd(-223.55, -39.805, 155.79, 0.242)
pt3dadd(-224.52, -38.177, 155.79, 0.484)
pt3dadd(-225, -36.782, 156.59, 0.484)
pt3dadd(-224.75, -35.39, 156.59, 0.484)
pt3dadd(-225.47, -33.762, 156.59, 0.484)
pt3dadd(-226.44, -32.831, 159.28, 0.484)
pt3dadd(-227.4, -31.203, 159.28, 0.484)
pt3dadd(-228.12, -29.575, 161.66, 0.484)
pt3dadd(-229.08, -27.947, 161.66, 0.484)
pt3dadd(-229.32, -26.321, 162.46, 0.484)
pt3dadd(-230.28, -23.996, 162.46, 0.484)
pt3dadd(-231.49, -22.832, 163.37, 0.484)
pt3dadd(-232.21, -21.436, 164.15, 0.484)
pt3dadd(-232.21, -20.275, 164.15, 0.484)
pt3dadd(-231.96, -17.49, 164.71, 0.484)
pt3dadd(-231.71, -15.865, 164.98, 0.484)
pt3dadd(-232.19, -13.31, 166.71, 0.484)
pt3dadd(-232.42, -11.219, 169.18, 0.726)
pt3dadd(-232.9, -9.128, 170.48, 0.726)
pt3dadd(-233.14, -7.038, 171.85, 0.726)
pt3dadd(-233.86, -5.41, 175.96, 0.968)
pt3dadd(-234.82, -4.014, 177.75, 0.968)
pt3dadd(-236.75, -2.848, 177.75, 0.968)
pt3dadd(-237.96, -1.915, 179.08, 0.726)
pt3dadd(-239.17, -0.519, 180.62, 0.726)
pt3dadd(-239.4, 0.875, 182.49, 0.726)
pt3dadd(-239.4, 2.036, 182.49, 0.484)
pt3dadd(-240.12, 3.896, 183.38, 0.484)
pt3dadd(-239.15, 4.59, 185.01, 0.484)
pt3dadd(-238.43, 4.588, 185.01, 0.484)
}
dend[97] {pt3dclear()
pt3dadd(-206.54, -56.178, 146.69, 0.242)
pt3dadd(-214.9, -57.245, 147, 0.484)
pt3dadd(-216.11, -58.17, 148.35, 0.484)
pt3dadd(-216.83, -58.4, 148.35, 0.484)
pt3dadd(-218.04, -57.932, 148.35, 0.484)
pt3dadd(-218.53, -58.627, 150.01, 0.484)
pt3dadd(-220.22, -59.319, 150.01, 0.484)
pt3dadd(-221.43, -59.316, 152.67, 0.484)
pt3dadd(-224.1, -59.308, 154.93, 0.484)
pt3dadd(-224.82, -59.538, 154.93, 0.484)
pt3dadd(-225.54, -58.607, 154.93, 0.484)
pt3dadd(-226.75, -58.371, 155.52, 0.484)
pt3dadd(-229.17, -58.132, 156.4, 0.484)
pt3dadd(-230.62, -58.128, 156.4, 0.484)
pt3dadd(-231.35, -58.822, 159.66, 0.484)
pt3dadd(-232.56, -58.819, 159.66, 0.484)
pt3dadd(-233.29, -59.513, 160.82, 0.484)
pt3dadd(-234.74, -59.509, 161.21, 0.484)
pt3dadd(-236.68, -59.968, 162.46, 0.484)
pt3dadd(-239.1, -60.425, 163.98, 0.484)
pt3dadd(-239.82, -60.423, 164.09, 0.484)
pt3dadd(-240.55, -61.117, 164.19, 0.484)
pt3dadd(-241.76, -61.346, 164.19, 0.484)
pt3dadd(-243.21, -60.645, 164.19, 0.484)
pt3dadd(-244.67, -61.105, 164.19, 0.484)
pt3dadd(-245.88, -61.334, 165.56, 0.484)
pt3dadd(-248.05, -61.56, 165.56, 0.484)
pt3dadd(-249.02, -61.789, 165.58, 0.484)
pt3dadd(-250.96, -61.087, 166.66, 0.484)
pt3dadd(-252.16, -60.619, 167.74, 0.484)
pt3dadd(-252.89, -60.385, 169.16, 0.484)
pt3dadd(-254.58, -60.844, 171.45, 0.484)
pt3dadd(-255.07, -60.378, 171.45, 0.484)
pt3dadd(-255.79, -60.609, 172.96, 0.484)
pt3dadd(-258.21, -61.066, 174.47, 0.484)
pt3dadd(-258.94, -61.76, 174.88, 0.242)
pt3dadd(-259.91, -62.222, 174.88, 0.242)
pt3dadd(-260.4, -63.149, 175.74, 0.242)
}
dend[98] {pt3dclear()
pt3dadd(79.963, 18.715, 62.62, 0.968)
pt3dadd(79.909, 21.269, 62.55, 1.21)
pt3dadd(79.871, 23.126, 62.55, 1.21)
pt3dadd(81.027, 25.705, 62.55, 0.968)
pt3dadd(81.467, 27.804, 62.55, 0.968)
pt3dadd(82.382, 30.378, 62.55, 0.968)
pt3dadd(83.533, 33.189, 62.55, 0.968)
pt3dadd(84.704, 35.071, 62.55, 0.968)
pt3dadd(85.637, 36.716, 61.912, 0.968)
pt3dadd(86.339, 37.892, 61.912, 0.968)
pt3dadd(86.305, 39.517, 61.912, 0.968)
pt3dadd(87.742, 40.244, 63.127, 0.968)
pt3dadd(89.411, 41.44, 64.135, 0.968)
pt3dadd(90.34, 43.317, 64.135, 0.726)
pt3dadd(91.036, 44.725, 64.563, 0.726)
pt3dadd(92.212, 46.375, 64.563, 0.968)
pt3dadd(93.146, 48.02, 65.83, 0.968)
pt3dadd(94.558, 49.908, 64.8, 0.968)
pt3dadd(95.497, 51.321, 64.8, 0.968)
pt3dadd(96.174, 53.657, 64.8, 0.968)
pt3dadd(96.852, 55.994, 66.005, 0.968)
pt3dadd(97.524, 58.563, 66.393, 0.968)
pt3dadd(97.718, 60.889, 67.08, 0.968)
pt3dadd(97.925, 62.519, 67.455, 0.968)
pt3dadd(98.603, 64.856, 67.455, 0.968)
pt3dadd(99.532, 66.733, 67.455, 0.968)
pt3dadd(100.21, 69.07, 69.357, 0.968)
pt3dadd(100.91, 70.245, 70.222, 0.968)
pt3dadd(101.84, 72.123, 70.222, 0.968)
pt3dadd(102.54, 73.531, 71.095, 0.968)
pt3dadd(102.25, 75.383, 71.095, 0.968)
pt3dadd(101.73, 77.23, 71.095, 0.726)
pt3dadd(101.7, 78.855, 71.667, 0.484)
pt3dadd(102.15, 80.258, 71.667, 0.484)
pt3dadd(103.56, 82.377, 73.125, 0.726)
pt3dadd(104.26, 83.553, 73.125, 0.726)
pt3dadd(105.68, 85.208, 73.125, 0.726)
pt3dadd(106.86, 86.859, 73.125, 0.726)
pt3dadd(107.53, 89.195, 73.125, 0.726)
pt3dadd(108.45, 91.769, 73.125, 0.726)
pt3dadd(109.13, 93.873, 73.125, 0.726)
}
}
proc shape3d_14() {
dend[98] { pt3dadd(109.57, 95.973, 71.052, 0.726)
pt3dadd(110.24, 98.541, 71.052, 0.726)
pt3dadd(111.65, 100.66, 71.052, 0.726)
pt3dadd(112.82, 102.54, 72.002, 0.726)
pt3dadd(113.5, 104.65, 72.002, 0.726)
pt3dadd(114.68, 106.3, 73.557, 0.726)
pt3dadd(116.81, 108.67, 73.557, 0.726)
pt3dadd(117.98, 110.32, 74.14, 0.726)
pt3dadd(120.12, 112.45, 74.14, 0.726)
pt3dadd(120.8, 114.32, 73.577, 0.968)
pt3dadd(120.52, 116.17, 71.54, 0.968)
pt3dadd(120.49, 117.57, 71.54, 0.968)
pt3dadd(120.7, 119.2, 71.54, 0.968)
pt3dadd(122.11, 121.32, 71.54, 0.968)
pt3dadd(123.76, 123.44, 69.772, 0.968)
pt3dadd(124.7, 124.85, 69.772, 0.968)
pt3dadd(125.39, 126.26, 69.772, 0.968)
pt3dadd(126.83, 127.22, 69.772, 0.726)
pt3dadd(128.01, 128.64, 69.772, 0.484)
pt3dadd(128.23, 129.34, 69.772, 0.484)
pt3dadd(127.71, 131.42, 69.772, 0.484)
pt3dadd(127.44, 132.81, 69.772, 0.726)
pt3dadd(126.92, 134.19, 69.772, 0.726)
pt3dadd(126.91, 134.89, 68.58, 0.726)
pt3dadd(125.91, 136.49, 68.58, 0.726)
pt3dadd(125.89, 137.42, 68.58, 0.726)
pt3dadd(125.12, 139.49, 68.58, 0.726)
pt3dadd(125.79, 142.06, 67.037, 0.726)
pt3dadd(126.7, 145.1, 67.037, 0.726)
pt3dadd(127.58, 147.05, 65.077, 0.726)
pt3dadd(128.75, 148.7, 63.677, 0.726)
pt3dadd(130.16, 150.82, 63.677, 0.726)
pt3dadd(131.55, 153.63, 63.677, 0.726)
pt3dadd(132.24, 155.74, 63.677, 0.726)
pt3dadd(132.68, 157.84, 63.677, 0.726)
pt3dadd(133.6, 159.95, 63.677, 0.726)
pt3dadd(134.04, 162.28, 63.677, 0.726)
pt3dadd(134.24, 164.14, 63.577, 0.726)
pt3dadd(134.94, 165.32, 62.175, 0.484)
pt3dadd(135.39, 166.95, 62.175, 0.484)
pt3dadd(135.83, 169.29, 62.175, 0.484)
pt3dadd(135.79, 171.14, 59.965, 0.484)
pt3dadd(135.26, 173.22, 59.965, 0.484)
pt3dadd(135.71, 175.09, 59.965, 0.484)
pt3dadd(135.43, 176.71, 59.942, 0.484)
pt3dadd(134.68, 177.62, 55.057, 0.726)
pt3dadd(133.7, 178.3, 51.75, 0.726)
pt3dadd(133.45, 178.76, 47.688, 0.726)
pt3dadd(133.91, 180.16, 45.702, 0.726)
pt3dadd(135.33, 181.58, 43.495, 0.726)
pt3dadd(136.51, 183, 43.495, 0.968)
pt3dadd(137.44, 184.65, 42.385, 0.968)
pt3dadd(138.36, 186.99, 42.295, 0.968)
pt3dadd(139.77, 189.11, 42.295, 0.968)
pt3dadd(140.71, 190.52, 42.295, 0.968)
pt3dadd(141.38, 193.09, 42.295, 0.726)
pt3dadd(141.59, 194.72, 42.295, 0.726)
pt3dadd(142.02, 197.05, 44.74, 0.726)
pt3dadd(142.22, 199.15, 44.74, 0.968)
pt3dadd(142.9, 201.71, 44.74, 0.968)
pt3dadd(143.33, 204.04, 45.807, 0.968)
pt3dadd(143.28, 206.6, 45.807, 0.726)
pt3dadd(143.72, 208.47, 45.807, 0.726)
pt3dadd(144.15, 211.26, 46.2, 0.726)
pt3dadd(145.06, 214.07, 46.2, 0.726)
pt3dadd(145.49, 216.63, 46.2, 0.726)
pt3dadd(146.41, 218.97, 45.333, 0.726)
pt3dadd(147.1, 220.61, 44.557, 0.726)
pt3dadd(147.78, 222.95, 45.395, 0.726)
pt3dadd(148.45, 225.29, 46.345, 0.726)
pt3dadd(148.4, 227.84, 47.257, 0.726)
pt3dadd(149.33, 229.72, 49.47, 0.726)
pt3dadd(150.49, 232.06, 50.27, 0.726)
pt3dadd(152.13, 234.65, 50.27, 0.726)
pt3dadd(154.01, 237.25, 50.27, 0.726)
pt3dadd(154.46, 238.88, 50.3, 0.484)
pt3dadd(155.16, 240.29, 50.3, 0.484)
pt3dadd(155.12, 242.15, 50.3, 0.484)
pt3dadd(155.81, 243.79, 50.3, 0.726)
pt3dadd(156.73, 246.13, 50.3, 0.726)
pt3dadd(157.67, 247.54, 50.3, 0.726)
pt3dadd(158.61, 248.72, 50.3, 0.484)
pt3dadd(159.31, 250.13, 50.3, 0.484)
pt3dadd(159.99, 252.24, 50.3, 0.726)
pt3dadd(160.91, 254.58, 50.3, 0.726)
pt3dadd(161.83, 256.92, 50.3, 0.726)
pt3dadd(162.76, 259.03, 50.3, 0.726)
pt3dadd(162.98, 259.96, 50.3, 0.726)
}
dend[99] {pt3dclear()
pt3dadd(162.98, 259.96, 50.3, 0.726)
pt3dadd(163.16, 262.75, 50.3, 0.484)
pt3dadd(163.37, 264.38, 50.3, 0.484)
pt3dadd(164.04, 266.95, 50.3, 0.484)
pt3dadd(165.28, 269.78, 50, 0.484)
pt3dadd(166.24, 269.62, 50, 0.484)
pt3dadd(167.1, 270.42, 50, 0.484)
pt3dadd(167.69, 272.44, 50, 0.484)
pt3dadd(168.51, 274.42, 50, 0.726)
pt3dadd(168.74, 275.79, 50, 0.726)
pt3dadd(169.29, 277.59, 50, 0.726)
pt3dadd(170.35, 279.53, 50, 0.484)
pt3dadd(171.09, 281.05, 51.752, 0.484)
pt3dadd(172.07, 282.54, 52.857, 0.484)
pt3dadd(172.82, 284.06, 52.857, 0.484)
pt3dadd(173.49, 285.12, 52.857, 0.484)
pt3dadd(173.96, 286.46, 52.857, 0.484)
pt3dadd(174.74, 288.21, 52.857, 0.484)
pt3dadd(175.76, 289.92, 56.28, 0.484)
pt3dadd(176.99, 291.37, 56.28, 0.484)
pt3dadd(178.45, 292.77, 58.08, 0.484)
pt3dadd(179.59, 293.76, 58.08, 0.484)
pt3dadd(180.9, 294.24, 60.215, 0.484)
pt3dadd(182.05, 295.23, 61.835, 0.484)
pt3dadd(182.16, 295.92, 61.835, 0.484)
pt3dadd(181.64, 297.18, 61.835, 0.484)
pt3dadd(181.7, 299.05, 61.835, 0.484)
pt3dadd(182.73, 300.77, 61.835, 0.484)
pt3dadd(183.63, 301.79, 63.44, 0.484)
pt3dadd(184.93, 303.69, 64.05, 0.484)
pt3dadd(185.88, 304.95, 65.323, 0.484)
pt3dadd(186.35, 306.28, 66.65, 0.484)
pt3dadd(186.82, 307.61, 66.65, 0.484)
pt3dadd(187.8, 309.1, 66.65, 0.484)
pt3dadd(187.99, 310.24, 70.103, 0.484)
pt3dadd(188.7, 311.54, 69.948, 0.484)
pt3dadd(189.29, 312.14, 73.625, 0.484)
pt3dadd(189, 313.37, 73.625, 0.242)
pt3dadd(187.53, 313.38, 73.625, 0.242)
pt3dadd(186.89, 313.96, 73.625, 0.242)
pt3dadd(187.49, 314.57, 73.625, 0.242)
pt3dadd(187.72, 315.94, 73.625, 0.242)
}
dend[100] {pt3dclear()
pt3dadd(162.98, 259.96, 50.3, 0.726)
pt3dadd(165.61, 261.18, 50.64, 0.484)
pt3dadd(167.03, 263.07, 50.64, 0.484)
pt3dadd(171.98, 265.84, 50, 0.242)
pt3dadd(171.1, 266.45, 50, 0.242)
pt3dadd(169.95, 266.88, 50, 0.242)
pt3dadd(169.86, 267.84, 50, 0.242)
pt3dadd(171.01, 268.82, 50, 0.242)
pt3dadd(172.39, 269.77, 50, 0.242)
pt3dadd(173.54, 270.76, 50, 0.484)
pt3dadd(175, 272.16, 50, 0.484)
pt3dadd(176.42, 273.33, 50, 0.484)
pt3dadd(178.17, 273.51, 51.818, 0.242)
pt3dadd(179.44, 273.77, 51.818, 0.242)
pt3dadd(180.91, 273.76, 51.818, 0.242)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
}
objref all, somatic, axonal, basal
proc subsets() { local i
objref all, somatic, axonal, basal
all = new SectionList()
soma all.append()
for i=0, 100 dend[i] all.append()
axon all.append()
somatic = new SectionList()
soma somatic.append()
axonal = new SectionList()
axon axonal.append()
basal = new SectionList()
for i=0, 100 dend[i] basal.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()