proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
}

create soma[3], axon, dend[75]

proc topol() { local i
  for i = 1, 2 connect soma[i](0), soma[i-1](1)
  connect axon(0), soma[1](1)
  connect dend(0), soma[2](0.5)
  for i = 1, 2 connect dend[i](0), dend(1)
  for i = 3, 4 connect dend[i](0), soma[2](0.5)
  for i = 5, 7 connect dend[i](0), dend[i-1](1)
  connect dend[8](0), dend[6](1)
  connect dend[9](0), dend[5](1)
  connect dend[10](0), soma[2](0.5)
  for i = 11, 12 connect dend[i](0), dend[10](1)
  for i = 13, 14 connect dend[i](0), dend[12](1)
  for i = 15, 16 connect dend[i](0), dend[14](1)
  connect dend[17](0), dend[4](1)
  connect dend[18](0), soma[2](0.5)
  for i = 19, 20 connect dend[i](0), dend[i-1](1)
  connect dend[21](0), dend[19](1)
  connect dend[22](0), soma(1)
  for i = 23, 24 connect dend[i](0), dend[22](1)
  connect dend[25](0), soma[2](0.5)
  for i = 26, 27 connect dend[i](0), dend[25](1)
  for i = 28, 29 connect dend[i](0), dend[27](1)
  connect dend[30](0), dend[18](1)
  for i = 31, 32 connect dend[i](0), dend[30](1)
  connect dend[33](0), soma[2](0.5)
  for i = 34, 37 connect dend[i](0), dend[i-1](1)
  connect dend[38](0), dend[36](1)
  connect dend[39](0), dend[35](1)
  for i = 40, 42 connect dend[i](0), dend[i-1](1)
  connect dend[43](0), dend[41](1)
  connect dend[44](0), dend[40](1)
  for i = 45, 46 connect dend[i](0), dend[i-1](1)
  connect dend[47](0), dend[45](1)
  connect dend[48](0), dend[44](1)
  connect dend[49](0), dend[39](1)
  connect dend[50](0), dend[34](1)
  for i = 51, 52 connect dend[i](0), dend[i-1](1)
  connect dend[53](0), dend[51](1)
  for i = 54, 55 connect dend[i](0), dend[53](1)
  for i = 56, 58 connect dend[i](0), dend[i-1](1)
  connect dend[59](0), dend[57](1)
  for i = 60, 61 connect dend[i](0), dend[59](1)
  connect dend[62](0), dend[56](1)
  connect dend[63](0), dend[55](1)
  connect dend[64](0), dend[50](1)
  for i = 65, 66 connect dend[i](0), dend[64](1)
  connect dend[67](0), dend[34](1)
  connect dend[68](0), dend[33](1)
  for i = 69, 70 connect dend[i](0), dend[i-1](1)
  connect dend[71](0), dend[69](1)
  for i = 72, 73 connect dend[i](0), dend[71](1)
  connect dend[74](0), dend[68](1)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(0.29, 7.78, -2, 0.51)
	pt3dadd(-0.59, 7.7, -2, 0.51)
	pt3dadd(-0.87, 7.5, -2, 0.51)
	pt3dadd(-1.17, 7.47, -2.05, 0.51)
	pt3dadd(-1.43, 7.1, -2.05, 0.51)
	pt3dadd(-1.62, 6.75, -2.05, 0.51)
	pt3dadd(-1.98, 6.47, -2.05, 0.51)
	pt3dadd(-2.24, 6.1, -2, 0.51)
	pt3dadd(-2.69, 5.13, -2, 0.51)
	pt3dadd(-3.06, 4.09, -2, 0.51)
	pt3dadd(-3.29, 3.3, -2, 0.51)
	pt3dadd(-3.59, 2.35, -2, 0.51)
	pt3dadd(-3.79, 2.07, -1.7, 0.51)
	pt3dadd(-3.79, 1.99, -1.7, 0.51)
	pt3dadd(-6.04, -0.32, 7.5, 0.51)
	pt3dadd(-6.09, -0.67, 7.5, 0.51)
	pt3dadd(-6.13, -1.09, 8.25, 0.51)
	pt3dadd(-6.19, -1.35, 8.7, 0.51)
	pt3dadd(-6.14, -1.95, 9.05, 0.51)
	pt3dadd(-5.91, -4.19, 9.1, 0.51)
  }
  soma[1] {pt3dclear()
	pt3dadd(-5.91, -4.19, 9.1, 0.51)
	pt3dadd(-5.74, -6.55, 8.3, 0.51)
	pt3dadd(-5.3, -7.42, 7.3, 0.51)
	pt3dadd(-4.52, -8.2, 7.3, 0.51)
	pt3dadd(-4.12, -8.5, 6, 0.51)
	pt3dadd(-3.9, -8.56, 6, 0.51)
	pt3dadd(-3.2, -9.01, 3.75, 0.51)
	pt3dadd(-2.44, -9.27, 3.75, 0.51)
	pt3dadd(-1.62, -9.53, 3.75, 0.51)
	pt3dadd(-0.95, -9.63, 3.75, 0.51)
  }
  soma[2] {pt3dclear()
	pt3dadd(3.68, 11.9229, 1.49812, 1.55086)
	pt3dadd(3.81411, 10.8656, 1.54243, 2.42054)
	pt3dadd(3.94822, 9.80825, 1.58673, 3.86625)
	pt3dadd(4.08233, 8.75093, 1.63103, 4.97757)
	pt3dadd(4.21644, 7.6936, 1.67533, 5.58835)
	pt3dadd(4.35054, 6.63628, 1.71963, 6.09912)
	pt3dadd(4.48465, 5.57896, 1.76394, 6.65683)
	pt3dadd(4.61876, 4.52163, 1.80824, 7.17099)
	pt3dadd(4.75287, 3.46431, 1.85254, 7.6546)
	pt3dadd(4.88698, 2.40699, 1.89684, 8.14398)
	pt3dadd(5.02109, 1.34966, 1.94114, 8.64746)
	pt3dadd(5.1552, 0.292338, 1.98545, 9.21864)
	pt3dadd(5.2893, -0.764985, 2.02975, 9.74649)
	pt3dadd(5.42341, -1.82231, 2.07405, 10.1774)
	pt3dadd(5.55752, -2.87963, 2.11835, 10.2778)
	pt3dadd(5.69163, -3.93696, 2.16265, 10.4104)
	pt3dadd(5.82574, -4.99428, 2.20696, 10.5201)
	pt3dadd(5.95985, -6.0516, 2.25126, 9.49863)
	pt3dadd(6.09396, -7.10893, 2.29556, 8.71682)
	pt3dadd(6.22806, -8.16625, 2.33986, 6.80097)
	pt3dadd(6.36217, -9.22357, 2.38416, 3.7578)
  }
  axon {pt3dclear()
	pt3dadd(-0.95, -9.63, 3.75, 0.95)
	pt3dadd(-0.92, -10.39, 0.1, 0.95)
	pt3dadd(-0.92, -10.99, 0.1, 0.95)
	pt3dadd(-1.06, -11.66, 0.1, 0.95)
	pt3dadd(-1.06, -13.5, 0.1, 0.95)
	pt3dadd(-0.84, -14.26, 0.1, 0.95)
	pt3dadd(-0.84, -16.03, 0.1, 0.95)
	pt3dadd(-0.99, -17.04, 0.1, 0.95)
	pt3dadd(-0.55, -20.49, 0.1, 0.95)
	pt3dadd(-1.14, -24.35, 0.1, 0.95)
	pt3dadd(0.26, -26.8, 0.1, 0.95)
	pt3dadd(0.4, -27.97, 0.1, 0.95)
	pt3dadd(-0.33, -28.72, 0.1, 0.95)
	pt3dadd(-0.7, -29.57, 0.1, 0.95)
	pt3dadd(-0.7, -31.67, 0.1, 0.95)
	pt3dadd(-0.55, -32.34, 0.1, 0.95)
	pt3dadd(-0.55, -34.2, 0.1, 0.95)
	pt3dadd(-0.33, -36.46, 0.1, 0.95)
	pt3dadd(-0.33, -37.22, 0.1, 0.95)
  }
  dend {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(4.97, -0.59, 5.6, 0.44)
	pt3dadd(4.97, -0.59, 5.55, 0.44)
	pt3dadd(8.68, -1.87, 2.45, 0.81)
	pt3dadd(9.65, -1.87, 1.65, 0.81)
	pt3dadd(11.48, -1.86, 0.7, 0.81)
	pt3dadd(11.63, -1.84, 0.7, 0.81)
	pt3dadd(13.51, -0.41, -4, 0.81)
	pt3dadd(14.24, -0.25, -4, 0.81)
	pt3dadd(14.92, 0.49, -4, 0.81)
	pt3dadd(15.54, 1.14, -4, 0.81)
	pt3dadd(17.16, 2.22, -4, 0.81)
	pt3dadd(18.37, 2.83, -4, 0.81)
	pt3dadd(19.6, 4.14, -3.45, 0.81)
	pt3dadd(20.63, 5.16, -3.45, 0.81)
	pt3dadd(21.45, 5.99, -2.7, 0.81)
	pt3dadd(22.94, 6.9, 0.6, 0.81)
	pt3dadd(23.79, 7.31, 0.6, 0.81)
	pt3dadd(24.14, 7.51, 0.5, 0.81)
	pt3dadd(24.11, 7.94, -0.1, 0.81)
  }
  dend[1] {pt3dclear()
	pt3dadd(24.11, 7.94, -0.1, 0.81)
	pt3dadd(25.4, 11.52, -1.3, 0.81)
	pt3dadd(25.85, 12.41, -1.6, 0.81)
	pt3dadd(27.15, 13.71, -1.7, 0.81)
	pt3dadd(28.49, 14.67, -1.75, 0.81)
	pt3dadd(31.15, 15.52, -1.75, 0.81)
	pt3dadd(34.67, 16.69, -1.75, 0.81)
	pt3dadd(35.62, 16.86, -1.75, 0.81)
	pt3dadd(40.58, 17.58, -4.2, 0.81)
	pt3dadd(43.28, 17.91, -4.8, 0.81)
	pt3dadd(45.04, 18.08, -4.9, 0.81)
	pt3dadd(48.38, 18.74, 1.05, 0.81)
	pt3dadd(48.37, 18.91, 1.05, 0.81)
	pt3dadd(51.42, 20.44, 6.3, 0.73)
	pt3dadd(51.88, 21.15, 6.3, 0.73)
	pt3dadd(52.23, 21.36, 6.3, 0.73)
	pt3dadd(52.46, 21.3, 6.3, 0.73)
	pt3dadd(53.3, 20.79, 6.3, 0.73)
	pt3dadd(55.24, 19.44, 6.3, 0.73)
	pt3dadd(56.19, 19.46, 5.85, 0.73)
	pt3dadd(58.9, 19.71, 4.75, 0.73)
	pt3dadd(59.51, 19.5, 4.7, 0.73)
	pt3dadd(60.32, 19.58, 4.8, 0.73)
	pt3dadd(61.3, 19.25, 4.8, 0.73)
	pt3dadd(61.67, 19.21, 5.95, 0.73)
	pt3dadd(62.33, 19.18, 5.95, 0.73)
	pt3dadd(62.74, 19.65, 6.9, 0.73)
	pt3dadd(64.26, 21.14, 7.6, 0.73)
	pt3dadd(66.81, 23.41, 7.6, 0.73)
	pt3dadd(67.83, 23.67, 7.9, 0.73)
	pt3dadd(68.99, 23.78, 7.95, 0.73)
	pt3dadd(71.07, 23.63, 7.95, 0.73)
	pt3dadd(73.22, 24.43, 9.9, 0.73)
	pt3dadd(74.18, 25.44, 10.65, 0.73)
	pt3dadd(74.47, 25.64, 10.65, 0.73)
	pt3dadd(75, 25.35, 10.9, 0.73)
	pt3dadd(76.67, 24.67, 10.95, 0.73)
	pt3dadd(78.69, 24.26, 10.95, 0.73)
	pt3dadd(80.04, 23.88, 11, 0.73)
	pt3dadd(81.33, 23.42, 11, 0.73)
	pt3dadd(81.47, 23.43, 11, 0.73)
	pt3dadd(85.05, 23.85, 10.95, 0.73)
	pt3dadd(86.06, 22.17, 10.95, 0.73)
	pt3dadd(86.72, 22.23, 10.95, 0.73)
	pt3dadd(87.44, 22.55, 10.95, 0.73)
	pt3dadd(89.21, 23.4, 10.95, 0.73)
	pt3dadd(91.48, 23.69, 10.95, 0.73)
	pt3dadd(92.78, 23.05, 10.95, 0.73)
	pt3dadd(93.3, 22.85, 10.95, 0.73)
	pt3dadd(93.7, 22.55, 10.95, 0.73)
	pt3dadd(98.36, 18.36, 13, 0.59)
	pt3dadd(98.4, 17.94, 12, 0.59)
	pt3dadd(98.88, 17.4, 12, 0.59)
	pt3dadd(99.48, 17.2, 10.9, 0.59)
	pt3dadd(101.1, 17.36, 10.05, 0.59)
	pt3dadd(101.11, 17.2, 9.3, 0.59)
	pt3dadd(101.35, 16.87, 8.6, 0.59)
	pt3dadd(102.06, 16.19, 8.6, 0.59)
	pt3dadd(102.37, 15.96, 8.1, 0.59)
	pt3dadd(106.14, 14.79, 7.8, 0.59)
	pt3dadd(107.33, 14.74, 7.8, 0.59)
	pt3dadd(108.29, 14.57, 7.75, 0.59)
	pt3dadd(108.67, 14.53, 7.75, 0.59)
	pt3dadd(110.17, 14.16, 7.7, 0.59)
	pt3dadd(111.23, 13.84, 7.7, 0.59)
	pt3dadd(113.35, 14.04, 7.7, 0.59)
  }
  dend[2] {pt3dclear()
	pt3dadd(24.11, 7.94, -0.1, 0.73)
	pt3dadd(24.61, 7.75, -6, 0.73)
	pt3dadd(24.96, 8.04, -6.05, 0.73)
	pt3dadd(25.75, 8.45, -6.05, 0.73)
	pt3dadd(26.31, 8.74, -6.05, 0.73)
	pt3dadd(26.52, 8.77, -6.05, 0.73)
	pt3dadd(27.95, 8.49, -5.65, 0.73)
	pt3dadd(28.52, 8.79, -4.8, 0.73)
	pt3dadd(29.12, 9.7, -4.8, 0.73)
	pt3dadd(29.88, 10.44, -3.75, 0.73)
	pt3dadd(30.45, 10.5, -2.55, 0.73)
	pt3dadd(31.89, 10.04, -2.55, 0.73)
	pt3dadd(32.79, 9.78, -1.95, 0.73)
	pt3dadd(34.2, 9.65, -2.8, 0.73)
	pt3dadd(34.55, 9.86, -2.8, 0.73)
	pt3dadd(36.18, 10.77, -3.7, 0.73)
	pt3dadd(36.67, 11.08, -4.35, 0.73)
	pt3dadd(37.05, 11.02, -4.7, 0.73)
	pt3dadd(39.55, 9.98, -4.7, 0.73)
	pt3dadd(40.16, 9.79, -4.75, 0.73)
	pt3dadd(40.24, 9.72, -4.1, 0.73)
	pt3dadd(41.06, 9.46, -2.6, 0.73)
	pt3dadd(42.97, 9.63, -1.6, 0.73)
	pt3dadd(43.04, 8.64, -1.3, 0.73)
	pt3dadd(43.56, 8.69, -1.35, 0.73)
	pt3dadd(43.79, 8.54, -1.95, 0.73)
	pt3dadd(43.94, 8.38, -1.95, 0.73)
	pt3dadd(44.82, 8.46, -3.35, 0.73)
	pt3dadd(46.3, 8.42, -3.35, 0.73)
	pt3dadd(46.72, 7.72, -3.4, 0.73)
	pt3dadd(48.2, 7.68, -3.4, 0.73)
	pt3dadd(51.78, 8.01, -2.75, 0.73)
	pt3dadd(52.3, 7.99, -1.95, 0.73)
	pt3dadd(52.3, 7.9, -1.95, 0.73)
	pt3dadd(57.17, 7.86, -0.25, 0.73)
	pt3dadd(57.78, 6.56, -1.1, 0.73)
	pt3dadd(57.87, 6.23, -2.05, 0.73)
	pt3dadd(57.92, 5.65, -2.05, 0.73)
	pt3dadd(58.25, 5.17, -3, 0.73)
	pt3dadd(59.81, 4.99, -3.8, 0.73)
	pt3dadd(60.12, 4.76, -3.8, 0.73)
	pt3dadd(60.77, 3.97, -4.25, 0.73)
	pt3dadd(62.31, 3.02, -4.3, 0.73)
	pt3dadd(63.24, 2.35, -4.3, 0.73)
	pt3dadd(64.39, 1.7, -4.35, 0.73)
  }
}
proc shape3d_2() {
  dend[2] {	pt3dadd(66.34, 1.29, -4.35, 0.73)
	pt3dadd(67.08, 1.35, -4.35, 0.73)
	pt3dadd(71.56, 0.43, -4.35, 0.73)
	pt3dadd(76.33, -0.31, -9.1, 0.59)
	pt3dadd(76.71, -0.44, -9.15, 0.59)
	pt3dadd(77.06, -1.09, -9.15, 0.59)
	pt3dadd(78.2, -1.65, -9.15, 0.59)
	pt3dadd(80.33, -1.55, -9.1, 0.59)
	pt3dadd(81.67, -1.75, -9.1, 0.59)
	pt3dadd(82.73, -3.27, -8.45, 0.59)
	pt3dadd(83.83, -4.17, -7.5, 0.59)
	pt3dadd(84.05, -4.14, -7.5, 0.59)
	pt3dadd(83.81, -3.92, -7.5, 0.59)
	pt3dadd(83.42, -3.53, -4.85, 0.59)
	pt3dadd(83.74, -3.92, -5.45, 0.59)
	pt3dadd(85.23, -4.03, -6.75, 0.59)
	pt3dadd(85.97, -4.21, -6.75, 0.59)
	pt3dadd(86.93, -5.23, -8.1, 0.59)
	pt3dadd(87.76, -6.58, -9.4, 0.59)
	pt3dadd(87.79, -6.92, -9.4, 0.59)
	pt3dadd(87.63, -6.76, -10.6, 0.59)
	pt3dadd(88.78, -5.31, -11.4, 0.59)
	pt3dadd(90, -5.95, -12, 0.59)
	pt3dadd(90.09, -7.13, -13.95, 0.59)
	pt3dadd(90.4, -7.43, -13.95, 0.59)
	pt3dadd(92.17, -8.45, -14.7, 0.59)
	pt3dadd(93.27, -9.36, -14.7, 0.59)
	pt3dadd(93.91, -9.97, -14.9, 0.59)
	pt3dadd(97.46, -13.27, -14.9, 0.59)
	pt3dadd(97.89, -15.07, -14.9, 0.59)
	pt3dadd(97.93, -15.67, -13.95, 0.59)
	pt3dadd(98.12, -16.41, -12.6, 0.59)
	pt3dadd(98.92, -17.18, -12.6, 0.59)
	pt3dadd(99.47, -17.71, -11.8, 0.59)
	pt3dadd(99.61, -18.55, -11.55, 0.59)
	pt3dadd(100.33, -19.24, -11.55, 0.59)
	pt3dadd(101.1, -19.83, -11.4, 0.59)
	pt3dadd(101.69, -19.79, -11.4, 0.59)
  }
  dend[3] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(-1.62, -9.61, 4.7, 1.1)
	pt3dadd(-1.66, -10.03, 5.25, 1.1)
	pt3dadd(-1.78, -10.46, 5.7, 1.1)
	pt3dadd(-1.91, -10.74, 5.7, 1.1)
	pt3dadd(-2.66, -11.57, 6.1, 1.1)
	pt3dadd(-2.86, -11.84, 6.35, 1.1)
	pt3dadd(-3.43, -13.07, 6.35, 1.1)
	pt3dadd(-3.98, -13.71, 6.4, 1.1)
	pt3dadd(-4.3, -14.33, 6.4, 1.1)
	pt3dadd(-5.4, -15.37, 3.65, 1.1)
	pt3dadd(-6.67, -17.26, 3, 1.1)
	pt3dadd(-6.9, -18.12, 2.85, 1.1)
	pt3dadd(-7.42, -19.09, 2.85, 1.1)
	pt3dadd(-7.99, -19.32, 2.9, 1.1)
	pt3dadd(-9.45, -19.54, 3.9, 1.1)
	pt3dadd(-10.15, -20.03, 3.9, 1.1)
	pt3dadd(-10.42, -20.3, 5.3, 1.1)
	pt3dadd(-10.77, -20.67, 6.6, 1.1)
	pt3dadd(-10.68, -20.85, 6.6, 1.1)
	pt3dadd(-12, -23.07, 8.05, 1.1)
	pt3dadd(-12.72, -23.22, 9.4, 1.1)
	pt3dadd(-13.5, -23.63, 9.95, 1.1)
	pt3dadd(-13.56, -23.73, 9.95, 1.1)
	pt3dadd(-13.83, -24.08, 10.1, 1.1)
	pt3dadd(-14.16, -24.62, 10, 1.1)
	pt3dadd(-14.7, -25.43, 10, 1.1)
	pt3dadd(-15.31, -26.08, 9.45, 1.1)
	pt3dadd(-16.3, -26.67, 9.45, 1.1)
	pt3dadd(-17.33, -26.78, 9.45, 1.1)
	pt3dadd(-18.31, -26.37, 9.85, 1.1)
	pt3dadd(-18.48, -26.04, 9.85, 1.1)
	pt3dadd(-21.7, -28.53, 11.3, 1.1)
	pt3dadd(-22.32, -29.02, 10.9, 1.1)
	pt3dadd(-22.64, -29.55, 10.55, 1.1)
	pt3dadd(-23.12, -30.19, 10.55, 1.1)
	pt3dadd(-23.11, -30.28, 10.55, 1.1)
	pt3dadd(-26.42, -33.78, 8.75, 0.95)
	pt3dadd(-26.54, -35.14, 10.2, 0.95)
	pt3dadd(-26.81, -36.52, 11.3, 0.95)
	pt3dadd(-26.99, -36.95, 11.3, 0.95)
	pt3dadd(-29.77, -41.52, 15.25, 0.81)
	pt3dadd(-31.22, -43.76, 15.25, 0.81)
	pt3dadd(-31.81, -44.66, 15.3, 0.81)
	pt3dadd(-32.97, -46.04, 14.85, 0.81)
	pt3dadd(-34.89, -48.08, 13.65, 0.81)
	pt3dadd(-36.18, -49.47, 13.65, 0.81)
	pt3dadd(-36.35, -53.27, 12.55, 0.81)
	pt3dadd(-36.96, -54.17, 12.55, 0.81)
	pt3dadd(-37.4, -55.06, 12.55, 0.81)
	pt3dadd(-37.83, -56.27, 12.55, 0.81)
	pt3dadd(-38.27, -57.33, 13, 0.81)
	pt3dadd(-38.87, -58.15, 13, 0.81)
	pt3dadd(-38.87, -58.23, 13.55, 0.81)
	pt3dadd(-40.24, -59.63, 16.75, 0.81)
	pt3dadd(-41.1, -60.04, 16.8, 0.81)
	pt3dadd(-43.24, -60, 16.8, 0.81)
	pt3dadd(-44.02, -60.32, 16.8, 0.81)
	pt3dadd(-44.98, -61.26, 16.8, 0.81)
	pt3dadd(-45.19, -61.44, 16.8, 0.81)
	pt3dadd(-45.33, -61.53, 16.8, 0.81)
	pt3dadd(-45.4, -61.55, 16.8, 0.81)
	pt3dadd(-49.05, -65.1, 16, 0.59)
	pt3dadd(-49.04, -65.27, 16, 0.59)
	pt3dadd(-49.11, -65.36, 16, 0.59)
	pt3dadd(-50.11, -68.83, 16, 0.59)
	pt3dadd(-55.79, -79.13, 12.2, 0.59)
	pt3dadd(-56.54, -79.87, 12.2, 0.59)
	pt3dadd(-57.62, -80.23, 12.2, 0.59)
	pt3dadd(-58.05, -80.44, 13.35, 0.59)
	pt3dadd(-59.59, -81.43, 13.35, 0.59)
	pt3dadd(-59.89, -81.54, 14.5, 0.59)
	pt3dadd(-60.18, -81.56, 14.5, 0.59)
	pt3dadd(-61.09, -82.07, 16.15, 0.59)
	pt3dadd(-62.13, -83.1, 16.15, 0.59)
	pt3dadd(-63.18, -83.87, 16.4, 0.59)
	pt3dadd(-64.7, -84.18, 16.45, 0.59)
	pt3dadd(-66.46, -84.35, 16.45, 0.59)
	pt3dadd(-67.52, -84.95, 16.45, 0.59)
	pt3dadd(-69.09, -86.61, 16.65, 0.59)
	pt3dadd(-69.69, -87.43, 16.65, 0.59)
	pt3dadd(-71.13, -90.02, 16.8, 0.59)
	pt3dadd(-71.86, -91.1, 16.8, 0.59)
	pt3dadd(-72.29, -92.32, 16.8, 0.59)
	pt3dadd(-74.7, -96.68, 13.35, 0.59)
	pt3dadd(-74.84, -97.79, 13.35, 0.59)
	pt3dadd(-74.88, -99.24, 13.8, 0.59)
	pt3dadd(-74.84, -99.73, 14.65, 0.59)
	pt3dadd(-75.09, -101.45, 14.65, 0.59)
	pt3dadd(-75.4, -102.32, 15.35, 0.59)
	pt3dadd(-76.31, -104.01, 16, 0.59)
	pt3dadd(-76.56, -104.53, 16, 0.59)
	pt3dadd(-76.68, -105.06, 16.5, 0.59)
	pt3dadd(-76.68, -104.97, 16.5, 0.59)
	pt3dadd(-78.74, -107.11, 16.85, 0.59)
	pt3dadd(-79.56, -107.86, 16.85, 0.59)
	pt3dadd(-80.59, -108.96, 16.85, 0.59)
	pt3dadd(-82.41, -110.24, 16.85, 0.59)
	pt3dadd(-82.88, -110.78, 16.85, 0.59)
	pt3dadd(-83.03, -110.8, 16.85, 0.59)
  }
  dend[4] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(5.12, -9.15, 4.5, 1.1)
	pt3dadd(5.16, -9.75, 4.9, 1.1)
	pt3dadd(5.44, -10.56, 5.1, 1.1)
  }
  dend[5] {pt3dclear()
	pt3dadd(5.44, -10.56, 5.1, 1.1)
	pt3dadd(5.69, -11.04, 5.1, 1.1)
	pt3dadd(6.56, -11.73, 5.1, 1.1)
	pt3dadd(7.47, -12.15, 5.1, 1.1)
	pt3dadd(7.48, -12.32, 5.15, 1.1)
	pt3dadd(7.65, -12.55, 5.15, 1.1)
	pt3dadd(9.58, -12.72, 4.4, 1.1)
	pt3dadd(9.87, -12.76, 3.95, 1.1)
	pt3dadd(10.11, -12.99, 3.55, 1.1)
	pt3dadd(10.66, -13.45, 3.3, 1.1)
	pt3dadd(11.19, -13.66, 3.3, 1.1)
	pt3dadd(11.41, -13.64, 3.15, 1.1)
	pt3dadd(11.74, -14.11, 3.1, 1.1)
	pt3dadd(12.99, -15.08, 3.1, 1.1)
	pt3dadd(14.05, -15.41, 3.45, 1.1)
	pt3dadd(15.13, -16.06, 3.45, 1.1)
	pt3dadd(16.34, -16.62, 4.25, 1.1)
	pt3dadd(16.63, -16.6, 4.25, 1.1)
	pt3dadd(18.78, -17.67, 6.05, 1.1)
	pt3dadd(18.85, -17.75, 5.85, 1.1)
  }
  dend[6] {pt3dclear()
	pt3dadd(18.85, -17.75, 5.85, 1.1)
	pt3dadd(21.92, -16.27, 3.3, 1.1)
	pt3dadd(22.76, -15.77, 3.2, 1.1)
	pt3dadd(24.54, -14.85, 3.2, 1.1)
	pt3dadd(25.19, -14.7, 3.4, 1.1)
	pt3dadd(25.49, -14.75, 3.4, 1.1)
	pt3dadd(27.48, -15.84, 4.3, 1.1)
	pt3dadd(28.18, -16.28, 5.5, 1.1)
	pt3dadd(28.19, -16.45, 5.5, 1.1)
	pt3dadd(31.17, -17.85, 7.7, 1.1)
	pt3dadd(32.15, -18.18, 9.25, 1.1)
	pt3dadd(33.26, -18.25, 10.15, 1.1)
	pt3dadd(34, -18.18, 10.6, 1.1)
	pt3dadd(34.08, -18.42, 10.6, 1.1)
	pt3dadd(34.7, -18.7, 10.65, 1.1)
	pt3dadd(34.84, -18.69, 10.65, 1.1)
	pt3dadd(36.39, -17.78, 10.65, 1.1)
	pt3dadd(37.18, -17.45, 10.5, 1.1)
	pt3dadd(39, -17.11, 10, 1.1)
	pt3dadd(39.97, -17.28, 9.7, 1.1)
	pt3dadd(40.05, -17.44, 9.7, 1.1)
	pt3dadd(39.85, -19.82, 9.6, 1.1)
	pt3dadd(39.74, -20.17, 9.85, 1.1)
	pt3dadd(39.38, -20.37, 10.5, 1.1)
	pt3dadd(39.32, -20.54, 10.95, 1.1)
	pt3dadd(39.37, -21.13, 11.1, 1.1)
	pt3dadd(39.24, -21.47, 11.1, 1.1)
  }
  dend[7] {pt3dclear()
	pt3dadd(39.24, -21.47, 11.1, 1.1)
	pt3dadd(39.54, -22.38, 13.55, 1.1)
	pt3dadd(39.57, -22.88, 14, 1.1)
	pt3dadd(41.5, -24.06, 8.4, 0.95)
	pt3dadd(42.38, -24.06, 7.25, 0.95)
	pt3dadd(43.59, -24.37, 6.75, 0.95)
	pt3dadd(43.99, -24.83, 6.75, 0.95)
	pt3dadd(44.39, -25.39, 6.75, 0.95)
	pt3dadd(44.61, -26.3, 7.3, 0.95)
	pt3dadd(44.65, -26.89, 7.3, 0.95)
	pt3dadd(44.84, -27.45, 7.3, 0.95)
  }
}
proc shape3d_3() {
  dend[7] {	pt3dadd(45.27, -28.35, 18.5, 0.81)
	pt3dadd(45.32, -29.1, 19.5, 0.81)
	pt3dadd(45.92, -30.14, 19.95, 0.81)
	pt3dadd(46.43, -31.1, 20.05, 0.81)
	pt3dadd(46.94, -31.98, 20.05, 0.81)
	pt3dadd(48.66, -33.43, 20.05, 0.81)
	pt3dadd(49.83, -34.23, 19.45, 0.81)
	pt3dadd(51.56, -34.92, 19.45, 0.81)
	pt3dadd(52.4, -35.26, 18.45, 0.81)
	pt3dadd(53.01, -35.45, 18.45, 0.81)
	pt3dadd(53.08, -35.54, 17.45, 0.81)
	pt3dadd(53.25, -35.78, 16.4, 0.81)
	pt3dadd(54.03, -36.45, 15.55, 0.81)
	pt3dadd(56.18, -37.52, 15.55, 0.81)
	pt3dadd(57.69, -38.06, 14.7, 0.81)
	pt3dadd(60.27, -39.17, 14.2, 0.81)
	pt3dadd(60.43, -39.24, 14.2, 0.81)
	pt3dadd(63.9, -39.41, 14, 0.51)
	pt3dadd(65.43, -40.12, 14, 0.51)
	pt3dadd(66.26, -40.46, 14, 0.51)
	pt3dadd(66.63, -40.43, 14, 0.51)
	pt3dadd(70.93, -40.87, 14.5, 0.51)
	pt3dadd(74.11, -42, 14.65, 0.51)
	pt3dadd(74.26, -41.99, 14.65, 0.51)
  }
  dend[8] {pt3dclear()
	pt3dadd(39.24, -21.47, 11.1, 0.66)
	pt3dadd(41.55, -18.66, 12.2, 0.66)
	pt3dadd(41.62, -18.56, 12.2, 0.66)
	pt3dadd(42.05, -18.43, 12.25, 0.66)
	pt3dadd(42.51, -18.65, 12.05, 0.66)
	pt3dadd(42.98, -19.02, 11.35, 0.66)
	pt3dadd(43.21, -19.25, 11.35, 0.66)
	pt3dadd(43.62, -19.72, 10.45, 0.66)
	pt3dadd(43.63, -19.89, 10.45, 0.66)
	pt3dadd(44.34, -20.58, 8.95, 0.66)
	pt3dadd(44.71, -20.63, 8.95, 0.66)
	pt3dadd(45.67, -20.54, 8.7, 0.66)
	pt3dadd(46.64, -19.78, 8.7, 0.66)
	pt3dadd(47.49, -19.27, 8.7, 0.66)
	pt3dadd(48.18, -18.7, 9.3, 0.66)
	pt3dadd(49.47, -18.16, 14.25, 0.66)
	pt3dadd(49.62, -18.15, 14.25, 0.66)
	pt3dadd(50.17, -18.77, 14.25, 0.66)
	pt3dadd(51, -18.94, 14.25, 0.66)
	pt3dadd(52.24, -18.83, 14.25, 0.66)
	pt3dadd(52.6, -18.63, 14.25, 0.66)
	pt3dadd(53.41, -17.62, 14.25, 0.66)
	pt3dadd(55.1, -17.46, 14.3, 0.66)
	pt3dadd(55.16, -17.37, 13.8, 0.66)
	pt3dadd(55.37, -17.19, 12.5, 0.66)
	pt3dadd(56.14, -16.6, 11.15, 0.66)
	pt3dadd(56.21, -16.6, 11.15, 0.66)
	pt3dadd(57.41, -15.89, 10.65, 0.66)
	pt3dadd(58.36, -15.89, 10.65, 0.66)
	pt3dadd(59.3, -16.47, 10.65, 0.66)
	pt3dadd(61.84, -17.08, 10.75, 0.66)
	pt3dadd(62.28, -17.04, 11.55, 0.66)
	pt3dadd(62.21, -17.04, 11.55, 0.66)
	pt3dadd(64.61, -15.55, 16.2, 0.66)
	pt3dadd(65.99, -15.43, 16.2, 0.66)
	pt3dadd(66.2, -15.15, 16.2, 0.66)
	pt3dadd(66.81, -14.5, 16.35, 0.66)
	pt3dadd(67.17, -14.39, 16.35, 0.66)
	pt3dadd(68.6, -14.75, 16.65, 0.66)
	pt3dadd(70.84, -15.06, 16.7, 0.66)
	pt3dadd(75.3, -14.64, 16.6, 0.66)
	pt3dadd(76.82, -14.24, 16, 0.66)
	pt3dadd(79.09, -12.17, 18.45, 0.66)
	pt3dadd(81.37, -13.06, 18.65, 0.66)
	pt3dadd(83.34, -13.8, 18.65, 0.66)
	pt3dadd(84.72, -14.61, 18.65, 0.66)
	pt3dadd(86.48, -14.44, 18.4, 0.66)
	pt3dadd(87.63, -14.06, 18.4, 0.66)
	pt3dadd(88.42, -13.74, 18.4, 0.66)
	pt3dadd(96.77, -8.96, 12.15, 0.66)
	pt3dadd(96.95, -8.36, 12.15, 0.66)
	pt3dadd(97.89, -7.17, 12.15, 0.66)
	pt3dadd(99.13, -5.87, 12.85, 0.66)
	pt3dadd(99.77, -5.56, 12.85, 0.66)
	pt3dadd(105.18, -5.05, 14.1, 0.66)
	pt3dadd(106.55, -4.58, 14.1, 0.66)
	pt3dadd(106.9, -4.46, 14.1, 0.66)
  }
  dend[9] {pt3dclear()
	pt3dadd(18.85, -17.75, 5.85, 0.73)
	pt3dadd(18.97, -18.81, -2.15, 0.73)
	pt3dadd(20, -19.73, -2.15, 0.73)
	pt3dadd(21.95, -21.14, -1.7, 0.73)
	pt3dadd(22.41, -21.45, -1.7, 0.73)
	pt3dadd(22.57, -21.69, -1, 0.73)
	pt3dadd(26.39, -22.42, 2.55, 0.73)
	pt3dadd(27.39, -23.17, 2.55, 0.73)
	pt3dadd(27.85, -24.31, 2.55, 0.73)
	pt3dadd(28.84, -25.82, 2.3, 0.73)
	pt3dadd(30.09, -26.8, 1.65, 0.73)
	pt3dadd(30.09, -26.88, 1.65, 0.73)
	pt3dadd(33.47, -28.59, 1, 0.73)
	pt3dadd(37.33, -33.13, 2.1, 0.73)
	pt3dadd(38.79, -35.09, 3.45, 0.73)
	pt3dadd(39.66, -35.85, 3.45, 0.73)
	pt3dadd(40.04, -35.99, 4.4, 0.73)
	pt3dadd(40.5, -36.19, 4.4, 0.73)
	pt3dadd(43.38, -37.27, 5, 0.73)
	pt3dadd(45.93, -39.07, 4.8, 0.73)
	pt3dadd(47.18, -39.96, 4.65, 0.73)
	pt3dadd(48.96, -40.13, 4.65, 0.73)
	pt3dadd(49.42, -40.34, 4.6, 0.73)
	pt3dadd(50.3, -41.27, 4.6, 0.73)
	pt3dadd(50.94, -42.13, 4.6, 0.73)
	pt3dadd(52.36, -44.45, 4.55, 0.73)
	pt3dadd(53, -45.99, 4.55, 0.73)
	pt3dadd(52.88, -46.43, 4.55, 0.73)
	pt3dadd(54.89, -49.86, 4.55, 0.73)
	pt3dadd(55.57, -51.07, 4.55, 0.73)
	pt3dadd(55.93, -52.98, 4.55, 0.73)
	pt3dadd(56.39, -54.11, 4.55, 0.73)
	pt3dadd(61, -59.27, 6.75, 0.73)
	pt3dadd(61.29, -59.23, 6.75, 0.73)
	pt3dadd(63.05, -60.08, 4.85, 0.73)
	pt3dadd(64.18, -61.49, 4, 0.73)
	pt3dadd(66.59, -63.21, 3.15, 0.73)
	pt3dadd(66.63, -63.8, 1.7, 0.73)
	pt3dadd(67.25, -64.16, 1.4, 0.73)
	pt3dadd(67.84, -64.11, 1.35, 0.73)
	pt3dadd(68.72, -64.19, 1.35, 0.73)
	pt3dadd(70.08, -64.57, 1.4, 0.73)
	pt3dadd(70.48, -65.04, 2.1, 0.73)
	pt3dadd(71.41, -65.62, 2.85, 0.73)
	pt3dadd(72.03, -65.99, 2.85, 0.73)
	pt3dadd(73.2, -66.9, 3.8, 0.73)
	pt3dadd(73.86, -67.84, 4.8, 0.73)
	pt3dadd(76.36, -69.89, 6.05, 0.73)
	pt3dadd(77.45, -70.79, 6.05, 0.73)
	pt3dadd(78.23, -72.41, 6.85, 0.73)
	pt3dadd(79.01, -73.93, 7.2, 0.73)
	pt3dadd(81.31, -75.16, 7.2, 0.73)
	pt3dadd(82.04, -75.09, 7.3, 0.73)
	pt3dadd(84.76, -77.03, 2.1, 0.73)
	pt3dadd(86.7, -78.44, 1.75, 0.73)
	pt3dadd(87.41, -78.98, 1.75, 0.73)
	pt3dadd(87.94, -79.26, 1.7, 0.73)
	pt3dadd(89.99, -80.08, 1.7, 0.73)
	pt3dadd(91.22, -80.73, 1.7, 0.73)
	pt3dadd(91.56, -81.54, 1.7, 0.73)
	pt3dadd(91.92, -83.36, 1.7, 0.73)
	pt3dadd(92.04, -83.94, 1.7, 0.73)
	pt3dadd(93.57, -86.83, 2.3, 0.73)
	pt3dadd(93.95, -88.07, 2.4, 0.73)
	pt3dadd(93.99, -88.56, 2.4, 0.73)
	pt3dadd(98.82, -93.47, 6.35, 0.73)
	pt3dadd(99.46, -94.25, 5.1, 0.73)
	pt3dadd(101.42, -95.76, 4.1, 0.73)
	pt3dadd(101.58, -95.9, 3.45, 0.73)
  }
  dend[10] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(7.52, -6.94, -4.05, 1.25)
	pt3dadd(7.91, -7.16, -3.7, 1.25)
	pt3dadd(9.31, -8.13, -2.75, 1.25)
	pt3dadd(9.46, -8.19, -2.75, 1.25)
	pt3dadd(10.89, -9.57, -2.45, 1.4)
	pt3dadd(11.85, -10.75, -3.4, 1.4)
	pt3dadd(12.57, -11.53, -3.4, 1.4)
	pt3dadd(13.05, -11.99, -3.85, 1.4)
	pt3dadd(13.08, -12.41, -4.7, 1.4)
  }
  dend[11] {pt3dclear()
	pt3dadd(13.08, -12.41, -4.7, 1.4)
	pt3dadd(14.16, -15.18, -3.25, 1.4)
	pt3dadd(14.38, -17.01, -3.25, 1.4)
	pt3dadd(14.72, -21.79, -4.8, 1.4)
	pt3dadd(14.98, -27.43, -8.15, 1.25)
	pt3dadd(14.97, -28.27, -8.05, 1.25)
	pt3dadd(15.27, -29.42, -8.05, 1.25)
	pt3dadd(15.91, -30.2, -8.05, 1.25)
	pt3dadd(16.52, -31.41, -7.95, 1.25)
	pt3dadd(16.31, -31.59, -7.95, 1.25)
	pt3dadd(16.96, -33.39, -3.3, 1.25)
	pt3dadd(16.63, -34.94, -3.3, 1.25)
	pt3dadd(16.69, -35.78, -3.25, 1.25)
	pt3dadd(17.86, -36.77, -3.25, 1.25)
	pt3dadd(19.61, -37.46, -3.25, 1.25)
	pt3dadd(21.09, -38.49, -3.25, 1.25)
	pt3dadd(21.56, -38.87, -3.25, 1.25)
	pt3dadd(29.06, -41.7, -3.25, 1.25)
	pt3dadd(30.21, -42.44, -3.25, 1.25)
	pt3dadd(30.98, -42.97, -3.25, 1.25)
	pt3dadd(30.99, -43.05, -3.25, 1.25)
	pt3dadd(33.85, -48.61, 2.3, 1.03)
	pt3dadd(33.87, -48.86, 2.3, 1.03)
	pt3dadd(35.17, -53.46, 2.3, 1.03)
	pt3dadd(35.1, -54.57, 2.3, 1.03)
	pt3dadd(35.5, -56.13, 2.8, 1.03)
	pt3dadd(36.17, -57.25, 2.8, 1.03)
	pt3dadd(36.13, -58.69, 3.95, 1.03)
	pt3dadd(35.9, -59.55, 4.65, 1.03)
	pt3dadd(36.35, -60.7, 4.65, 1.03)
	pt3dadd(37.17, -61.88, 4.85, 1.03)
	pt3dadd(38.33, -66.59, 4.9, 1.03)
	pt3dadd(39, -69.82, 4.85, 1.03)
	pt3dadd(38.91, -70.58, 4.85, 1.03)
	pt3dadd(39.13, -74.69, 1.2, 0.88)
	pt3dadd(38.56, -75.92, 1.2, 0.88)
	pt3dadd(37.96, -77.85, 1.15, 0.88)
	pt3dadd(38.03, -79.78, 1.15, 0.88)
	pt3dadd(38.05, -80.11, 1.15, 0.88)
	pt3dadd(34.05, -85.78, -2.65, 0.66)
  }
}
proc shape3d_4() {
  dend[11] {	pt3dadd(33.9, -85.79, 0.75, 0.66)
	pt3dadd(32.85, -86.57, 2.1, 0.66)
	pt3dadd(31.97, -87.58, 2.5, 0.66)
	pt3dadd(31.83, -87.76, 2.5, 0.66)
	pt3dadd(31.8, -88.26, 2.5, 0.66)
	pt3dadd(31.15, -89.52, 2.5, 0.66)
	pt3dadd(30.47, -90.26, 3.3, 0.66)
	pt3dadd(30.5, -90.76, 3.3, 0.66)
	pt3dadd(31.03, -91.9, 5.05, 0.66)
	pt3dadd(31.15, -92.64, 6.2, 0.66)
	pt3dadd(28.96, -92.84, 6.7, 0.66)
	pt3dadd(28.83, -93.1, 6.85, 0.66)
	pt3dadd(28.51, -93.73, 6.85, 0.66)
	pt3dadd(27.66, -95.26, 6.85, 0.66)
	pt3dadd(27.28, -96.12, 6.2, 0.66)
	pt3dadd(27.24, -96.54, 6.2, 0.66)
	pt3dadd(25.55, -99.66, 1.2, 0.44)
	pt3dadd(25.29, -100.28, 0.9, 0.44)
	pt3dadd(25.11, -100.8, 0.85, 0.44)
	pt3dadd(24.92, -101.24, 0.85, 0.44)
	pt3dadd(24.61, -101.95, 0.85, 0.44)
	pt3dadd(24.01, -102.76, 0.85, 0.44)
	pt3dadd(22.91, -103.87, 0.85, 0.44)
	pt3dadd(22.26, -105.11, 0.85, 0.44)
	pt3dadd(22.31, -105.8, 0.85, 0.44)
	pt3dadd(23.18, -106.72, 0.85, 0.44)
  }
  dend[12] {pt3dclear()
	pt3dadd(13.08, -12.41, -4.7, 0.51)
	pt3dadd(15.23, -10.27, -2.9, 0.51)
	pt3dadd(15.67, -10.23, -2.9, 0.51)
	pt3dadd(16.99, -9.02, -2.9, 0.51)
	pt3dadd(18, -7.73, -2.95, 0.51)
	pt3dadd(19.2, -7.04, -3.45, 0.51)
	pt3dadd(19.41, -6.92, -3.45, 0.51)
	pt3dadd(20.14, -6.77, -4.4, 0.51)
	pt3dadd(21.16, -6.68, -6.25, 0.51)
	pt3dadd(21.71, -7.05, -7.05, 0.51)
	pt3dadd(22.68, -7.29, -7.05, 0.51)
	pt3dadd(23.38, -6.8, -7.2, 0.51)
	pt3dadd(23.66, -6.52, -7.3, 0.51)
	pt3dadd(24.34, -5.87, -7.3, 0.51)
	pt3dadd(26.73, -4.21, -7.35, 0.51)
	pt3dadd(27.29, -3.73, -7.4, 0.51)
	pt3dadd(27.57, -3.63, -7.4, 0.51)
  }
  dend[13] {pt3dclear()
	pt3dadd(27.57, -3.63, -7.4, 0.66)
	pt3dadd(30.44, -2.42, -5.15, 0.66)
	pt3dadd(31.38, -3.28, -5, 0.66)
	pt3dadd(32, -3.72, -5, 0.66)
	pt3dadd(32.85, -4.31, -5, 0.66)
	pt3dadd(33.4, -4.68, -5, 0.66)
	pt3dadd(34.07, -4.79, -5, 0.66)
	pt3dadd(35.42, -3.05, -0.4, 0.66)
	pt3dadd(36.22, -2.98, -0.4, 0.66)
	pt3dadd(38.09, -3.39, -0.4, 0.66)
	pt3dadd(39.1, -4.14, -0.4, 0.66)
	pt3dadd(41.72, -5.75, -0.45, 0.66)
	pt3dadd(42.79, -6.17, -0.45, 0.66)
	pt3dadd(44, -6.73, -1.05, 0.66)
	pt3dadd(44.48, -7.27, -1.85, 0.66)
	pt3dadd(45.07, -8.23, -1.85, 0.66)
	pt3dadd(45.08, -8.32, -1.85, 0.66)
	pt3dadd(47.63, -10.02, -0.4, 0.66)
	pt3dadd(49.03, -10.99, 1.4, 0.66)
	pt3dadd(49.96, -11.65, 1.4, 0.66)
	pt3dadd(51.9, -12.07, 1.75, 0.66)
	pt3dadd(54.33, -11.84, 1.9, 0.66)
	pt3dadd(54.77, -11.87, 1.9, 0.66)
	pt3dadd(56.32, -12.91, 1.95, 0.66)
	pt3dadd(56.89, -12.77, 1.95, 0.66)
	pt3dadd(57.08, -12.33, 1.95, 0.66)
	pt3dadd(57.77, -11.59, 2, 0.66)
	pt3dadd(59.76, -9.55, 2, 0.66)
	pt3dadd(59.96, -9.28, 2, 0.66)
	pt3dadd(59.94, -9.03, 2, 0.66)
	pt3dadd(60.95, -12.1, 6.8, 0.66)
	pt3dadd(61.54, -12.3, 6.8, 0.66)
	pt3dadd(62.19, -13.08, 6.8, 0.66)
	pt3dadd(63.17, -14.34, 6.75, 0.66)
	pt3dadd(63.5, -14.73, 7.4, 0.66)
	pt3dadd(63.65, -14.88, 7.4, 0.66)
	pt3dadd(67.21, -14.13, 11.1, 0.66)
	pt3dadd(68.5, -15.69, 11.1, 0.66)
	pt3dadd(69.71, -17.1, 11.05, 0.66)
	pt3dadd(70.28, -17.89, 11.05, 0.66)
	pt3dadd(70.34, -17.81, 10.65, 0.66)
	pt3dadd(74.5, -20.28, 11.05, 0.66)
	pt3dadd(75.98, -22.34, 11.65, 0.66)
	pt3dadd(76.23, -25.85, 11.7, 0.66)
	pt3dadd(76.67, -26.73, 11.35, 0.66)
	pt3dadd(77.01, -27.38, 11.35, 0.66)
	pt3dadd(77, -27.3, 10.45, 0.66)
	pt3dadd(78.52, -28.85, 7.45, 0.66)
	pt3dadd(80.5, -29.84, 7.5, 0.66)
	pt3dadd(82.17, -30.52, 7.5, 0.66)
	pt3dadd(83.76, -32.15, 7.45, 0.66)
	pt3dadd(84.66, -33.33, 7.45, 0.66)
	pt3dadd(86.2, -36.23, 7.45, 0.66)
	pt3dadd(86.34, -37.22, 7.5, 0.66)
	pt3dadd(86.36, -37.56, 7.5, 0.66)
	pt3dadd(85.89, -42.33, 9.75, 0.66)
	pt3dadd(85.68, -43.35, 10.85, 0.66)
	pt3dadd(85.68, -43.44, 10.85, 0.66)
	pt3dadd(84.34, -49.41, 13.45, 0.44)
	pt3dadd(84.21, -49.51, 11.1, 0.44)
	pt3dadd(84.14, -50.7, 11.1, 0.44)
	pt3dadd(84.59, -51.75, 10.95, 0.44)
	pt3dadd(84.6, -51.93, 10.95, 0.44)
  }
  dend[14] {pt3dclear()
	pt3dadd(27.57, -3.63, -7.4, 0.44)
	pt3dadd(26.43, -5.34, -11.15, 0.44)
	pt3dadd(26.56, -6.17, -11.15, 0.44)
	pt3dadd(27.11, -6.46, -11.1, 0.44)
	pt3dadd(27.62, -6.49, -11.1, 0.44)
	pt3dadd(27.84, -6.48, -11.1, 0.44)
	pt3dadd(29.89, -6.28, -6.7, 0.59)
	pt3dadd(31.24, -5.64, -6.6, 0.59)
	pt3dadd(31.87, -5.16, -6.6, 0.59)
	pt3dadd(32.64, -4.59, -6.6, 0.59)
	pt3dadd(32.63, -4.51, -6.6, 0.59)
	pt3dadd(33.54, -3.75, -14.85, 0.59)
	pt3dadd(34.16, -3.1, -14.85, 0.59)
	pt3dadd(34.69, -2.45, -14.85, 0.59)
	pt3dadd(35.53, -1.7, -14.85, 0.59)
	pt3dadd(37.25, -1.04, -14.85, 0.59)
	pt3dadd(37.74, -0.74, -14.85, 0.59)
	pt3dadd(37.87, -0.46, -14.7, 0.59)
	pt3dadd(37.85, -0.22, -13.9, 0.59)
	pt3dadd(37.91, -0.03, -13.9, 0.59)
  }
  dend[15] {pt3dclear()
	pt3dadd(37.91, -0.03, -13.9, 0.59)
	pt3dadd(38.76, 3.42, -11.5, 0.59)
	pt3dadd(40.04, 4.04, -11.5, 0.59)
	pt3dadd(41.33, 5.68, -11.5, 0.59)
	pt3dadd(42.01, 6.34, -11.45, 0.59)
	pt3dadd(42.82, 7.59, -11.5, 0.59)
	pt3dadd(43.16, 8.98, -11.5, 0.59)
	pt3dadd(43.25, 10.67, -11.6, 0.59)
	pt3dadd(43.33, 11.61, -11.95, 0.59)
	pt3dadd(43.39, 11.87, -11.95, 0.59)
	pt3dadd(44.55, 15.02, -12.9, 0.59)
	pt3dadd(45.8, 18.17, -12.9, 0.59)
	pt3dadd(46.34, 18.9, -12.9, 0.59)
	pt3dadd(46.64, 19.76, -12.9, 0.59)
	pt3dadd(46.6, 20.34, -12.9, 0.59)
	pt3dadd(46.92, 21.05, -12.9, 0.59)
	pt3dadd(47.37, 21.94, -12.9, 0.59)
	pt3dadd(48.23, 22.36, -12.9, 0.59)
	pt3dadd(49.73, 23.85, -12.9, 0.59)
	pt3dadd(49.85, 24.36, -12.9, 0.59)
	pt3dadd(49.66, 24.94, -12.9, 0.59)
	pt3dadd(49.49, 25.35, -12.9, 0.59)
	pt3dadd(49.23, 25.66, -12.9, 0.59)
	pt3dadd(49.16, 25.74, -12.9, 0.59)
	pt3dadd(49.07, 29.96, -19.55, 0.59)
	pt3dadd(48.91, 31.22, -20, 0.59)
	pt3dadd(48.8, 31.72, -20, 0.59)
	pt3dadd(49.35, 33.29, -20.15, 0.59)
	pt3dadd(49.75, 33.9, -20.15, 0.59)
	pt3dadd(49.54, 36.76, -20.15, 0.59)
	pt3dadd(50.56, 38.89, -20.2, 0.59)
	pt3dadd(52.06, 40.62, -20.2, 0.59)
	pt3dadd(52.88, 41.54, -20.2, 0.59)
	pt3dadd(53.24, 41.66, -20.2, 0.59)
	pt3dadd(53.53, 41.69, -20.2, 0.59)
	pt3dadd(53.79, 42.13, -20.2, 0.59)
	pt3dadd(54.72, 44.5, -20.35, 0.59)
	pt3dadd(54.95, 45.54, -20.35, 0.59)
	pt3dadd(55, 45.71, -22.1, 0.59)
	pt3dadd(59.58, 49.06, -27.7, 0.59)
	pt3dadd(60.07, 49.43, -29.7, 0.59)
	pt3dadd(60.87, 50.6, -29.7, 0.59)
	pt3dadd(60.96, 51.38, -30.35, 0.59)
	pt3dadd(60.87, 52.54, -30.65, 0.59)
	pt3dadd(61.19, 53.25, -30.7, 0.59)
	pt3dadd(62.08, 53.17, -30.7, 0.59)
	pt3dadd(63.19, 53.11, -30.7, 0.59)
	pt3dadd(64.18, 53.7, -30.7, 0.59)
	pt3dadd(64.63, 54.59, -30.7, 0.59)
	pt3dadd(65.64, 55.96, -30.75, 0.59)
	pt3dadd(65.84, 57.24, -30.75, 0.59)
	pt3dadd(65.72, 58.9, -30.75, 0.59)
	pt3dadd(65.98, 59.35, -30.75, 0.59)
	pt3dadd(67.36, 60.67, -30.85, 0.59)
	pt3dadd(68.32, 61.68, -30.95, 0.59)
	pt3dadd(68.5, 62.13, -30.95, 0.59)
	pt3dadd(69.68, 63.16, -31.05, 0.59)
	pt3dadd(70.24, 63.72, -31.05, 0.59)
	pt3dadd(71.19, 66.76, -31.05, 0.59)
	pt3dadd(71.21, 68.62, -31, 0.59)
	pt3dadd(71.62, 71.02, -31.05, 0.59)
	pt3dadd(71.6, 71.27, -31.05, 0.59)
	pt3dadd(69.23, 78.2, -36.15, 0.44)
	pt3dadd(69.07, 80.38, -36.15, 0.44)
	pt3dadd(69.12, 82.73, -36.15, 0.44)
	pt3dadd(69.1, 84.09, -36.2, 0.44)
	pt3dadd(69.62, 87.01, -36.2, 0.44)
	pt3dadd(71.4, 89.95, -36.2, 0.44)
	pt3dadd(72.16, 90.61, -36.2, 0.44)
	pt3dadd(72.3, 90.72, -36.2, 0.44)
  }
  dend[16] {pt3dclear()
	pt3dadd(37.91, -0.03, -13.9, 0.51)
	pt3dadd(38.26, -1.68, -12.65, 0.51)
	pt3dadd(39.46, -1.99, -11.05, 0.51)
	pt3dadd(40.51, -2.31, -11.05, 0.51)
  }
}
proc shape3d_5() {
  dend[16] {	pt3dadd(41.94, -2.61, -10.6, 0.51)
	pt3dadd(42.44, -2.47, -10.35, 0.51)
	pt3dadd(42.58, -2.29, -10.35, 0.51)
	pt3dadd(43.78, -1.58, -13.8, 0.51)
	pt3dadd(44.95, -1.48, -14.35, 0.51)
	pt3dadd(47.32, -0.75, -14.35, 0.51)
	pt3dadd(48.18, -0.42, -14.35, 0.51)
	pt3dadd(50.55, 0.57, -14.4, 0.51)
	pt3dadd(51.68, 1.1, -14.4, 0.51)
	pt3dadd(52.46, 1.59, -14.4, 0.51)
	pt3dadd(52.96, 1.8, -14.4, 0.51)
	pt3dadd(56.98, 2.17, -12.9, 0.51)
	pt3dadd(58.11, 1.87, -9.7, 0.51)
	pt3dadd(59.86, 1.18, -9.7, 0.51)
	pt3dadd(60.31, 0.97, -10.2, 0.51)
	pt3dadd(61.49, 1.08, -12.45, 0.51)
	pt3dadd(61.68, 1.45, -12.45, 0.51)
	pt3dadd(62.58, 3.38, -15.95, 0.51)
	pt3dadd(62.87, 3.4, -16.15, 0.51)
	pt3dadd(63.44, 3.63, -16.15, 0.51)
	pt3dadd(63.64, 3.9, -16.35, 0.51)
	pt3dadd(63.93, 4.94, -16.35, 0.51)
	pt3dadd(63.99, 5.2, -16.55, 0.51)
	pt3dadd(64.24, 5.73, -16.95, 0.51)
	pt3dadd(64.59, 6.1, -17.4, 0.51)
	pt3dadd(65.02, 6.23, -17.4, 0.51)
	pt3dadd(66.92, 6.4, -17.55, 0.51)
	pt3dadd(67.53, 7.14, -17.55, 0.51)
	pt3dadd(67.67, 7.24, -17.6, 0.51)
	pt3dadd(67.59, 7.23, -17.65, 0.51)
	pt3dadd(68.3, 9.67, -23.75, 0.51)
	pt3dadd(68.43, 10.01, -23.95, 0.51)
	pt3dadd(68.97, 10.64, -24, 0.51)
	pt3dadd(69.59, 11.21, -24, 0.51)
	pt3dadd(70.28, 11.87, -24, 0.51)
	pt3dadd(70.84, 12.25, -24, 0.51)
	pt3dadd(71.29, 12.22, -24, 0.51)
	pt3dadd(73.4, 11.57, -24, 0.51)
	pt3dadd(74.77, 11.02, -24, 0.51)
	pt3dadd(75.83, 10.62, -24, 0.51)
	pt3dadd(76.96, 10.21, -24, 0.51)
	pt3dadd(77.79, 9.96, -24, 0.51)
	pt3dadd(79.3, 9.43, -24.05, 0.51)
	pt3dadd(79.38, 9.35, -24.05, 0.51)
	pt3dadd(80.05, 9.32, -24, 0.51)
  }
  dend[17] {pt3dclear()
	pt3dadd(5.44, -10.56, 5.1, 0.88)
	pt3dadd(5.38, -10.2, -12.8, 0.88)
	pt3dadd(5.46, -11.29, -12.7, 0.88)
	pt3dadd(5.25, -13.42, -9.3, 1.1)
	pt3dadd(4.97, -14.63, -9.15, 1.1)
	pt3dadd(4.48, -16.03, -9.15, 1.1)
	pt3dadd(4.42, -17.21, -9.15, 1.1)
	pt3dadd(4.56, -19.23, -10.65, 1.1)
	pt3dadd(4.79, -19.29, -10.65, 1.1)
	pt3dadd(6.21, -19.49, -14.25, 1.1)
	pt3dadd(6.38, -21.85, -14.25, 1.1)
	pt3dadd(6.95, -24.57, -14.25, 1.1)
	pt3dadd(7.68, -27.71, -14.25, 1.1)
	pt3dadd(8.3, -31.11, -14.2, 1.1)
	pt3dadd(8.4, -32.45, -13.95, 1.1)
	pt3dadd(8.3, -32.21, -13.95, 1.1)
	pt3dadd(8.5, -33.79, -9.35, 1.1)
	pt3dadd(9.3, -36.84, -9.05, 1.1)
	pt3dadd(9.86, -38.47, -9.05, 1.1)
	pt3dadd(9.86, -41.51, -9.05, 1.1)
	pt3dadd(9.9, -43.11, -9.05, 1.1)
	pt3dadd(9.95, -43.69, -9, 1.1)
	pt3dadd(10.89, -53.42, -12.1, 0.88)
	pt3dadd(10.63, -53.86, -12.05, 0.88)
	pt3dadd(10.31, -54.49, -11.25, 0.88)
	pt3dadd(10.12, -54.93, -11.25, 0.88)
	pt3dadd(10.23, -56.51, -10.25, 0.88)
	pt3dadd(10.1, -58.72, -9.4, 0.88)
	pt3dadd(9.91, -60.18, -8.75, 0.88)
	pt3dadd(9.61, -62.23, -8.75, 0.88)
	pt3dadd(9.41, -64.36, -8.55, 0.88)
	pt3dadd(9.09, -67.18, -8.5, 0.88)
	pt3dadd(8.21, -71.22, -8.5, 0.88)
	pt3dadd(8.14, -73.33, -8.55, 0.88)
	pt3dadd(8.22, -73.5, -8.55, 0.88)
	pt3dadd(8.95, -75.37, -11, 0.88)
	pt3dadd(8.67, -79.61, -11.5, 0.88)
	pt3dadd(8.48, -81.07, -11.5, 0.88)
	pt3dadd(8.4, -82.09, -11.65, 0.88)
	pt3dadd(7.76, -89.82, -6.75, 0.66)
	pt3dadd(7.45, -90.6, -6.75, 0.66)
	pt3dadd(7.39, -90.86, -7.05, 0.66)
	pt3dadd(7.42, -91.2, -7.05, 0.66)
	pt3dadd(5.15, -95.47, -11.8, 0.51)
	pt3dadd(4.23, -97.07, -11.85, 0.51)
	pt3dadd(2.97, -97.94, -11.85, 0.51)
	pt3dadd(0.77, -100.09, -11.65, 0.51)
	pt3dadd(-1.83, -102.86, -11.65, 0.51)
	pt3dadd(-3.11, -104.5, -10.5, 0.51)
	pt3dadd(-3.26, -104.43, -10.5, 0.51)
	pt3dadd(-5.15, -104.78, -5.7, 0.51)
	pt3dadd(-5.71, -106.26, -5.7, 0.51)
	pt3dadd(-5.64, -107.28, -6.1, 0.51)
	pt3dadd(-5.51, -108.02, -6.1, 0.51)
	pt3dadd(-6.02, -109.08, -6.75, 0.51)
	pt3dadd(-6.47, -109.96, -7.7, 0.51)
	pt3dadd(-7.07, -111.8, -7.7, 0.51)
	pt3dadd(-7.35, -113.09, -8.7, 0.51)
	pt3dadd(-7.29, -113.93, -8.7, 0.51)
  }
  dend[18] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(-6.36, -2.66, -13.05, 1.1)
	pt3dadd(-6.94, -2.71, -15.85, 1.1)
	pt3dadd(-7.23, -2.91, -16.8, 1.1)
	pt3dadd(-7.88, -2.97, -17.5, 1.1)
  }
  dend[19] {pt3dclear()
	pt3dadd(-7.88, -2.97, -17.5, 1.1)
	pt3dadd(-8.86, -2.64, -17.7, 1.1)
	pt3dadd(-9.24, -2.5, -17.75, 1.1)
	pt3dadd(-10.2, -2.44, -17.75, 1.1)
	pt3dadd(-11.31, -2.54, -17.75, 1.1)
	pt3dadd(-11.85, -3.1, -17.75, 1.1)
	pt3dadd(-12.66, -4.1, -17.75, 1.1)
	pt3dadd(-12.79, -4.36, -17.7, 1.1)
	pt3dadd(-13.15, -4.49, -17.7, 1.1)
	pt3dadd(-13.81, -4.54, -17.35, 1.1)
	pt3dadd(-15.11, -5.85, -12.35, 1.1)
	pt3dadd(-15.45, -6.22, -12.35, 1.1)
	pt3dadd(-16.63, -6.41, -12.9, 1.1)
	pt3dadd(-17.5, -6.57, -14.05, 1.1)
	pt3dadd(-19.4, -6.75, -15.25, 1.1)
	pt3dadd(-20.2, -6.75, -16.35, 1.1)
	pt3dadd(-20.99, -7.16, -16.85, 1.1)
	pt3dadd(-22.36, -8.55, -16.85, 1.1)
	pt3dadd(-22.77, -8.93, -16.85, 1.1)
	pt3dadd(-22.92, -8.95, -16.85, 1.1)
	pt3dadd(-24.57, -9.69, -15.6, 1.1)
	pt3dadd(-24.57, -9.69, -14.95, 1.1)
	pt3dadd(-26.4, -9.61, -16.85, 1.1)
	pt3dadd(-27.15, -9.44, -18.25, 1.1)
	pt3dadd(-28.35, -9.12, -18.75, 1.1)
	pt3dadd(-29.24, -8.96, -18.75, 1.1)
	pt3dadd(-29.41, -8.8, -18.8, 1.1)
	pt3dadd(-29.95, -8.52, -18.8, 1.1)
	pt3dadd(-30.32, -8.38, -18.8, 1.1)
	pt3dadd(-30.92, -8.27, -18.8, 1.1)
	pt3dadd(-31.99, -8.71, -18.7, 1.1)
	pt3dadd(-32.42, -8.83, -18.7, 1.1)
	pt3dadd(-32.63, -9.02, -18.5, 1.1)
	pt3dadd(-36.01, -9.24, -21.55, 0.88)
	pt3dadd(-36.29, -9.37, -21.65, 0.88)
	pt3dadd(-37.01, -9.69, -21.65, 0.88)
	pt3dadd(-37.64, -10.08, -21.65, 0.88)
	pt3dadd(-38.64, -10.59, -21.65, 0.88)
	pt3dadd(-40.17, -10.83, -21.65, 0.88)
	pt3dadd(-40.6, -10.87, -21.15, 0.88)
  }
  dend[20] {pt3dclear()
	pt3dadd(-40.6, -10.87, -21.15, 0.88)
	pt3dadd(-44.47, -13.42, -22.35, 0.88)
	pt3dadd(-44.67, -13.7, -22.35, 0.88)
	pt3dadd(-44.93, -14.14, -23.1, 0.88)
	pt3dadd(-45, -14.23, -23.1, 0.88)
	pt3dadd(-46.95, -14.83, -23.4, 0.73)
	pt3dadd(-47.6, -15.06, -23.45, 0.73)
	pt3dadd(-48.45, -15.47, -23.4, 0.73)
	pt3dadd(-49.23, -15.97, -23.4, 0.73)
	pt3dadd(-50.43, -16.68, -23.4, 0.73)
	pt3dadd(-51.07, -16.91, -23.45, 0.73)
	pt3dadd(-51.29, -16.93, -23.45, 0.73)
	pt3dadd(-54.6, -18, -21.6, 0.73)
	pt3dadd(-54.74, -18.1, -20.8, 0.73)
	pt3dadd(-54.96, -18.12, -19.85, 0.73)
	pt3dadd(-59.07, -17.93, -22.95, 0.59)
	pt3dadd(-59.21, -17.86, -23, 0.59)
	pt3dadd(-59.96, -17.85, -23, 0.59)
	pt3dadd(-60.83, -17.93, -23, 0.59)
	pt3dadd(-61.53, -18.42, -23, 0.59)
	pt3dadd(-62.17, -18.73, -23, 0.59)
	pt3dadd(-62.61, -18.77, -23, 0.59)
  }
  dend[21] {pt3dclear()
	pt3dadd(-40.6, -10.87, -21.15, 0.73)
	pt3dadd(-40.67, -9.96, -19.35, 0.73)
	pt3dadd(-40.76, -9.64, -19.35, 0.73)
	pt3dadd(-41.09, -9.16, -19.35, 0.73)
	pt3dadd(-42.74, -7.71, -20.35, 0.73)
	pt3dadd(-42.9, -7.55, -20.35, 0.73)
	pt3dadd(-43.28, -7.43, -22.1, 0.73)
	pt3dadd(-44.45, -7.54, -25.85, 0.73)
	pt3dadd(-44.81, -7.73, -26.55, 0.73)
	pt3dadd(-44.95, -7.74, -26.55, 0.73)
	pt3dadd(-46.5, -8.73, -27.35, 0.73)
	pt3dadd(-47.7, -9.44, -27.35, 0.73)
	pt3dadd(-49.03, -9.39, -27.35, 0.73)
	pt3dadd(-50.1, -8.82, -27.35, 0.73)
	pt3dadd(-51.43, -7.78, -28.25, 0.73)
	pt3dadd(-51.93, -6.98, -30.2, 0.73)
	pt3dadd(-52.36, -6.17, -30.2, 0.73)
	pt3dadd(-52.81, -6.03, -31.4, 0.73)
	pt3dadd(-53.25, -6.17, -32.35, 0.73)
	pt3dadd(-54.03, -6.58, -32.45, 0.73)
	pt3dadd(-54.86, -7.25, -32.45, 0.73)
	pt3dadd(-55.13, -7.6, -32.45, 0.73)
	pt3dadd(-55.28, -7.62, -32.45, 0.73)
	pt3dadd(-55.76, -8.08, -32.45, 0.73)
	pt3dadd(-56.08, -8.79, -32.5, 0.73)
	pt3dadd(-56.3, -9.75, -33.2, 0.73)
	pt3dadd(-56.5, -10.02, -34.45, 0.73)
	pt3dadd(-57.16, -10.08, -37.55, 0.73)
	pt3dadd(-57.24, -8.99, -37.7, 0.73)
  }
}
proc shape3d_6() {
  dend[21] {	pt3dadd(-56.86, -8.03, -37.7, 0.73)
	pt3dadd(-56.11, -7.27, -37.95, 0.73)
	pt3dadd(-54.92, -6.41, -37.95, 0.73)
	pt3dadd(-54.36, -6.01, -38.9, 0.73)
	pt3dadd(-52.67, -4.93, -40.25, 0.73)
	pt3dadd(-52.13, -4.2, -40.25, 0.73)
	pt3dadd(-51.47, -2.2, -41.6, 0.73)
	pt3dadd(-51.11, -1.07, -42.45, 0.73)
	pt3dadd(-50.6, 0.08, -42.45, 0.73)
	pt3dadd(-50.48, 0.34, -42.5, 0.73)
	pt3dadd(-48.3, 4.93, -42.65, 0.73)
	pt3dadd(-47.94, 5.98, -42.8, 0.73)
	pt3dadd(-48.19, 7.39, -42.85, 0.73)
	pt3dadd(-49.18, 8.9, -42.85, 0.73)
	pt3dadd(-50.64, 10.69, -42.9, 0.73)
	pt3dadd(-50.9, 11.26, -42.95, 0.73)
	pt3dadd(-51.13, 11.5, -42.95, 0.73)
  }
  dend[22] {pt3dclear()
	pt3dadd(-5.91, -4.19, 9.1, 0.88)
	pt3dadd(-6.74, -4, 0.5, 0.88)
	pt3dadd(-6.95, -4.11, -0.65, 0.88)
	pt3dadd(-7.23, -4.21, -1.2, 0.88)
	pt3dadd(-7.38, -4.24, -1.75, 0.88)
	pt3dadd(-6.05, -3.26, -2.4, 0.88)
	pt3dadd(-6.49, -3.3, -2.4, 0.88)
	pt3dadd(-7.2, -3.62, -2.45, 0.88)
	pt3dadd(-7.86, -3.77, -2.45, 0.88)
	pt3dadd(-8.57, -4, -2.45, 0.88)
	pt3dadd(-9.07, -4.3, -2.45, 0.88)
	pt3dadd(-9.85, -4.63, -1.9, 0.88)
	pt3dadd(-10.47, -5.19, -1.9, 0.88)
	pt3dadd(-11.29, -6.19, -1.15, 0.88)
	pt3dadd(-11.63, -6.57, -0.45, 0.88)
	pt3dadd(-11.9, -6.92, -0.45, 0.88)
	pt3dadd(-12.18, -7.13, -0.05, 0.88)
	pt3dadd(-12.81, -7.6, 0.05, 0.88)
	pt3dadd(-13.67, -8.96, 0.05, 0.88)
	pt3dadd(-13.87, -9.22, -0.15, 0.88)
	pt3dadd(-14.62, -9.97, -1.3, 0.88)
	pt3dadd(-14.91, -10.17, -1.3, 0.88)
	pt3dadd(-15.93, -10.27, -2.65, 0.88)
	pt3dadd(-16.99, -9.77, -3.6, 0.88)
	pt3dadd(-17.95, -9.86, -4.55, 0.88)
	pt3dadd(-18.5, -10.43, -4.55, 0.88)
	pt3dadd(-20.27, -11.43, -5.65, 0.88)
	pt3dadd(-20.97, -12, -6.8, 0.88)
	pt3dadd(-21.32, -12.11, -6.8, 0.88)
	pt3dadd(-21.42, -11.79, -7.55, 0.88)
	pt3dadd(-22.21, -13.13, -5.55, 0.88)
	pt3dadd(-22.46, -13.66, -5.15, 0.88)
	pt3dadd(-23.35, -14.67, -5.15, 0.88)
	pt3dadd(-24.18, -15.43, -5.15, 0.88)
	pt3dadd(-25.67, -16.23, -5.75, 0.88)
	pt3dadd(-27.13, -16.37, -5.75, 0.88)
	pt3dadd(-29.01, -15.8, -7.05, 0.88)
	pt3dadd(-30, -15.47, -8.3, 0.88)
	pt3dadd(-30.14, -15.48, -8.3, 0.88)
	pt3dadd(-30.63, -15.86, -9.35, 0.88)
	pt3dadd(-30.76, -15.96, -9.85, 0.88)
  }
  dend[23] {pt3dclear()
	pt3dadd(-30.76, -15.96, -9.85, 0.88)
	pt3dadd(-32.06, -15.32, -14.05, 0.88)
	pt3dadd(-32.53, -15.03, -14.05, 0.88)
	pt3dadd(-33.07, -14.74, -13.5, 0.88)
	pt3dadd(-34.24, -14.77, -13.5, 0.88)
	pt3dadd(-35.39, -15.21, -12.55, 0.88)
	pt3dadd(-37.25, -17.08, -11.4, 0.88)
	pt3dadd(-38.17, -18.51, -10.45, 0.88)
	pt3dadd(-39.26, -20.8, -10.45, 0.88)
	pt3dadd(-39.45, -22.17, -9.9, 0.88)
	pt3dadd(-39.98, -23.07, -9.9, 0.88)
	pt3dadd(-45.24, -30.37, -5.85, 0.88)
	pt3dadd(-45.25, -31.23, -5.85, 0.88)
	pt3dadd(-45.63, -32.1, -7.15, 0.88)
	pt3dadd(-47.18, -34.11, -8.3, 0.88)
	pt3dadd(-49.17, -36.06, -8.3, 0.88)
	pt3dadd(-49.38, -36.33, -9.15, 0.88)
	pt3dadd(-49.75, -37.31, -10.05, 0.88)
	pt3dadd(-49.94, -37.74, -10.05, 0.88)
	pt3dadd(-50.35, -38.12, -11, 0.88)
	pt3dadd(-50.57, -38.14, -11.6, 0.88)
	pt3dadd(-52.04, -38.2, -11.6, 0.88)
	pt3dadd(-52.26, -38.21, -11.8, 0.95)
	pt3dadd(-52.46, -38.48, -11.85, 0.95)
	pt3dadd(-52.7, -39.17, -11.85, 0.95)
	pt3dadd(-53.06, -41.49, -11.85, 0.95)
	pt3dadd(-52.98, -43.51, -11.85, 0.95)
	pt3dadd(-53.49, -45.66, -11.85, 0.95)
	pt3dadd(-55.07, -49.27, -11.85, 0.95)
	pt3dadd(-55.58, -49.32, -11.85, 0.95)
	pt3dadd(-59.26, -52.37, -9.55, 0.95)
	pt3dadd(-59.51, -53.14, -9.55, 0.95)
	pt3dadd(-59.97, -54.79, -10.5, 0.95)
	pt3dadd(-60.39, -56.19, -10.5, 0.95)
	pt3dadd(-60.37, -57.37, -11.05, 0.95)
	pt3dadd(-60.27, -58.79, -11.5, 0.95)
	pt3dadd(-60.53, -59.23, -11.5, 0.95)
	pt3dadd(-60.72, -59.59, -11.55, 0.95)
	pt3dadd(-60.56, -61.85, -11.65, 0.95)
	pt3dadd(-60.55, -61.94, -11.65, 0.95)
	pt3dadd(-62.33, -64.88, -7.75, 0.81)
	pt3dadd(-62.33, -64.88, -9, 0.81)
	pt3dadd(-63.68, -68.72, -14.6, 0.59)
	pt3dadd(-63.83, -69.58, -14.9, 0.59)
	pt3dadd(-63.75, -70.77, -15, 0.59)
	pt3dadd(-66.12, -73.68, -15, 0.59)
	pt3dadd(-66.58, -74.32, -15, 0.59)
	pt3dadd(-66.5, -75.41, -15.05, 0.59)
	pt3dadd(-66.75, -77.11, -15.05, 0.59)
	pt3dadd(-67.69, -80.33, -15.05, 0.59)
	pt3dadd(-68.13, -81.47, -15.05, 0.59)
	pt3dadd(-69.23, -83.51, -15.05, 0.59)
	pt3dadd(-70.78, -85.51, -15.05, 0.59)
	pt3dadd(-71.18, -86.04, -15.05, 0.59)
	pt3dadd(-71.32, -86.23, -15.05, 0.59)
  }
  dend[24] {pt3dclear()
	pt3dadd(-30.76, -15.96, -9.85, 0.66)
	pt3dadd(-34.33, -15.03, -13.75, 0.66)
	pt3dadd(-34.79, -14.82, -14.65, 0.66)
	pt3dadd(-35.58, -14.05, -15.6, 0.66)
	pt3dadd(-36.2, -13.6, -15.6, 0.66)
	pt3dadd(-36.52, -13.38, -15.7, 0.66)
	pt3dadd(-36.82, -13.24, -15.65, 0.66)
	pt3dadd(-36.98, -13.08, -15.65, 0.66)
	pt3dadd(-38.97, -15.21, -20.45, 0.66)
	pt3dadd(-40.39, -17.87, -18.2, 0.66)
	pt3dadd(-41.04, -19.04, -16.6, 0.66)
	pt3dadd(-41.76, -20.29, -16.6, 0.66)
	pt3dadd(-42.37, -21.02, -15.15, 0.66)
	pt3dadd(-43.09, -21.33, -14.3, 0.66)
	pt3dadd(-44.1, -21.6, -14.3, 0.66)
	pt3dadd(-45.64, -21.74, -13.6, 0.66)
	pt3dadd(-46.38, -21.56, -13.6, 0.66)
	pt3dadd(-48.12, -20.96, -13.45, 0.66)
	pt3dadd(-48.58, -20.67, -13.5, 0.66)
	pt3dadd(-51.07, -18.97, -13.85, 0.66)
	pt3dadd(-52.63, -17.75, -13.85, 0.66)
	pt3dadd(-55.27, -15.98, -15.45, 0.66)
	pt3dadd(-56.78, -15.28, -17, 0.66)
	pt3dadd(-57.04, -14.72, -17, 0.66)
	pt3dadd(-57.18, -12.86, -18.45, 0.66)
	pt3dadd(-56.97, -11.67, -19.7, 0.66)
	pt3dadd(-56.41, -10.35, -20.8, 0.66)
	pt3dadd(-56.28, -10, -20.8, 0.66)
	pt3dadd(-56.1, -9.47, -21.7, 0.66)
	pt3dadd(-56.13, -8.98, -22.2, 0.66)
	pt3dadd(-56.92, -6.34, -29.5, 0.66)
	pt3dadd(-56.72, -6, -29.65, 0.66)
	pt3dadd(-56.76, -4.47, -29.65, 0.66)
	pt3dadd(-57.17, -3.76, -29.6, 0.66)
	pt3dadd(-57.34, -3.52, -29.65, 0.66)
	pt3dadd(-57.41, -3.53, -29.65, 0.66)
	pt3dadd(-60.24, -2.11, -36.5, 0.66)
	pt3dadd(-62.25, -0.87, -36.5, 0.66)
	pt3dadd(-64.29, -0.13, -36.5, 0.66)
	pt3dadd(-64.53, 0.1, -36.5, 0.66)
	pt3dadd(-64.69, 0.26, -36.5, 0.66)
	pt3dadd(-73.36, 1.43, -39.9, 0.51)
	pt3dadd(-76.15, 3.36, -40.1, 0.51)
	pt3dadd(-79.96, 5.03, -40.1, 0.51)
	pt3dadd(-84.23, 7.07, -40.15, 0.51)
	pt3dadd(-84.55, 7.31, -40.15, 0.51)
  }
  dend[25] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(-4.43, 0.87, -1.75, 1.1)
	pt3dadd(-4.58, 0.85, -0.15, 1.1)
	pt3dadd(-5.21, 1.38, 1, 1.1)
	pt3dadd(-5.59, 1.68, 1, 1.1)
	pt3dadd(-6.23, 2.3, 2.55, 1.1)
	pt3dadd(-6.69, 2.58, 2.55, 1.1)
	pt3dadd(-6.85, 2.74, 3, 1.1)
	pt3dadd(-7, 2.9, 3.45, 1.1)
	pt3dadd(-7.33, 3.21, 3.45, 1.1)
	pt3dadd(-7.96, 3.73, 4.05, 1.1)
	pt3dadd(-8.64, 4.02, 4.25, 1.1)
	pt3dadd(-9.01, 4.06, 4.25, 1.1)
	pt3dadd(-9.76, 4.24, 3.85, 1.1)
	pt3dadd(-10.67, 4.67, 2.4, 1.1)
	pt3dadd(-12.01, 4.87, 2.4, 1.1)
	pt3dadd(-12.38, 4.84, 0.85, 1.1)
	pt3dadd(-13.98, 5.53, -2, 1.1)
	pt3dadd(-15.27, 6.09, -2.05, 1.1)
	pt3dadd(-16.17, 6.25, -2, 1.1)
	pt3dadd(-18.51, 6.03, -1.85, 1.1)
	pt3dadd(-19.34, 6.3, -0.85, 1.1)
	pt3dadd(-20.65, 7.1, 0.25, 1.1)
	pt3dadd(-21.6, 8.03, 0.95, 1.1)
	pt3dadd(-23.32, 9.39, 0.95, 1.1)
	pt3dadd(-24.17, 9.89, 1.15, 1.1)
	pt3dadd(-24.9, 10.92, 1.15, 1.1)
	pt3dadd(-25.23, 11.4, 1.2, 1.1)
	pt3dadd(-25.62, 11.69, 1.2, 1.1)
	pt3dadd(-25.94, 12.09, 1.2, 1.1)
	pt3dadd(-26.95, 12.67, 1.2, 1.1)
	pt3dadd(-28.16, 13.23, 1.2, 1.1)
	pt3dadd(-28.39, 13.3, 1.1, 1.1)
  }
  dend[26] {pt3dclear()
	pt3dadd(-28.39, 13.3, 1.1, 1.1)
	pt3dadd(-30.77, 14.15, 1.35, 1.1)
	pt3dadd(-31.01, 14.3, 1.35, 1.1)
	pt3dadd(-32.06, 14.7, 1.35, 1.1)
	pt3dadd(-32.59, 14.74, 1.95, 1.1)
	pt3dadd(-33.54, 14.73, 1.95, 1.1)
	pt3dadd(-34.06, 14.69, 2.9, 1.1)
	pt3dadd(-35.01, 14.69, 3.55, 1.1)
  }
}
proc shape3d_7() {
  dend[26] {	pt3dadd(-35.6, 14.63, 3.75, 1.1)
	pt3dadd(-36.52, 14.2, 3.75, 1.1)
	pt3dadd(-37.23, 13.71, 3.8, 1.1)
	pt3dadd(-38.52, 13.26, 3.25, 1.1)
	pt3dadd(-39.62, 13.16, 3.25, 1.1)
	pt3dadd(-41.97, 13.09, -3.15, 1.1)
	pt3dadd(-43.79, 12.92, -3.15, 1.1)
	pt3dadd(-44.78, 12.33, -3.15, 1.1)
	pt3dadd(-46.02, 11.11, -3.2, 1.1)
	pt3dadd(-46.71, 10.46, -3.2, 1.1)
	pt3dadd(-48.01, 10.01, -3.2, 1.1)
	pt3dadd(-48.96, 10, -2.7, 1.1)
	pt3dadd(-50.82, 10.25, -2.05, 1.1)
	pt3dadd(-56.53, 9.71, -0.35, 1.1)
	pt3dadd(-56.74, 9.52, -0.35, 1.1)
	pt3dadd(-60.15, 7.84, -1.85, 1.03)
	pt3dadd(-60.84, 7.1, -2.1, 1.03)
	pt3dadd(-61.26, 6.74, -2.3, 1.03)
	pt3dadd(-62.14, 5.81, -2.3, 1.03)
	pt3dadd(-62.91, 5.23, -2.35, 1.03)
	pt3dadd(-65.11, 2.99, -2.4, 1.03)
	pt3dadd(-68.5, -0.02, -2.4, 1.03)
	pt3dadd(-70.1, -2.36, -2.4, 1.03)
	pt3dadd(-70.67, -3.61, -2.4, 1.03)
	pt3dadd(-77.21, -9.56, 2.35, 0.81)
	pt3dadd(-78.22, -10.84, 2.3, 0.81)
	pt3dadd(-79.66, -11.32, 2.3, 0.81)
	pt3dadd(-79.94, -11.5, 2.35, 0.81)
	pt3dadd(-81.13, -13.55, 3.4, 0.81)
	pt3dadd(-81.97, -15.07, 3.4, 0.81)
	pt3dadd(-82.43, -15.87, 4.5, 0.81)
	pt3dadd(-83.15, -17.12, 4.5, 0.81)
	pt3dadd(-86.12, -23.82, 3, 0.59)
	pt3dadd(-86.94, -24.74, 1.9, 0.59)
	pt3dadd(-87.3, -24.94, 1.1, 0.59)
	pt3dadd(-88.29, -25.46, 0.6, 0.59)
	pt3dadd(-89.1, -25.54, 0.6, 0.59)
	pt3dadd(-91.21, -25.89, 0.5, 0.59)
	pt3dadd(-93.77, -26.13, 0.4, 0.59)
	pt3dadd(-94.9, -25.81, 0.4, 0.59)
	pt3dadd(-97.19, -25.6, 0.45, 0.59)
	pt3dadd(-98.46, -25.39, 0.45, 0.59)
	pt3dadd(-101.15, -25.05, 0.5, 0.59)
  }
  dend[27] {pt3dclear()
	pt3dadd(-28.39, 13.3, 1.1, 0.59)
	pt3dadd(-30, 13.6, 5.7, 0.59)
	pt3dadd(-30.15, 13.76, 5.25, 0.59)
	pt3dadd(-31.13, 14.09, 4.85, 0.59)
	pt3dadd(-31.95, 14.19, 4.8, 0.59)
	pt3dadd(-33.34, 14.06, 4.8, 0.59)
	pt3dadd(-33.97, 13.65, 4.75, 0.59)
	pt3dadd(-34.63, 12.49, 4.75, 0.59)
	pt3dadd(-35.41, 11.08, 5.7, 0.59)
	pt3dadd(-35.52, 10.64, 5.7, 0.59)
	pt3dadd(-35.72, 10.29, 7.15, 0.59)
	pt3dadd(-36.33, 8.54, 9.6, 0.59)
	pt3dadd(-36.7, 7.58, 10.25, 0.59)
	pt3dadd(-37.09, 6.79, 10.25, 0.59)
	pt3dadd(-37.28, 6.43, 11.4, 0.59)
	pt3dadd(-37.62, 5.98, 12.65, 0.59)
	pt3dadd(-38.1, 5.59, 12.65, 0.59)
	pt3dadd(-38.45, 5.31, 13.5, 0.59)
	pt3dadd(-38.76, 5.52, 13.95, 0.59)
	pt3dadd(-39.87, 6.6, 13.95, 0.59)
	pt3dadd(-40.06, 7.09, 14, 0.59)
	pt3dadd(-40.07, 7.26, 14, 0.59)
	pt3dadd(-40.15, 7.42, 13.7, 0.59)
  }
  dend[28] {pt3dclear()
	pt3dadd(-40.15, 7.42, 13.7, 0.59)
	pt3dadd(-41.26, 6.31, 9.45, 0.59)
	pt3dadd(-42.99, 5.81, 9.45, 0.59)
	pt3dadd(-44.23, 5.61, 8.9, 0.59)
	pt3dadd(-46.26, 4.22, 8.8, 0.59)
	pt3dadd(-48.04, 2.46, 8.8, 0.59)
	pt3dadd(-48.6, 1.99, 9.65, 0.59)
	pt3dadd(-49.15, 2.44, 11.75, 0.59)
	pt3dadd(-49.29, 1.33, 15.95, 0.59)
	pt3dadd(-49.54, 0.72, 17.1, 0.59)
	pt3dadd(-49.8, 0.27, 18, 0.59)
	pt3dadd(-50.3, -0.02, 18.6, 0.59)
	pt3dadd(-51.28, -0.79, 18.6, 0.59)
	pt3dadd(-51.74, -1.42, 18.9, 0.59)
	pt3dadd(-51.78, -1.95, 18.9, 0.59)
	pt3dadd(-51.84, -2.11, 18.9, 0.59)
	pt3dadd(-51.91, -2.12, 18.9, 0.59)
  }
  dend[29] {pt3dclear()
	pt3dadd(-40.15, 7.42, 13.7, 0.59)
	pt3dadd(-39.86, 8.46, 11.6, 0.59)
	pt3dadd(-40.29, 9.35, 11, 0.59)
	pt3dadd(-41.29, 10.94, 10.4, 0.59)
	pt3dadd(-42.26, 13.05, 10.4, 0.59)
	pt3dadd(-42.34, 14.22, 9.95, 0.59)
	pt3dadd(-43.23, 16.33, 9.85, 0.59)
	pt3dadd(-43.94, 17.02, 9.85, 0.59)
	pt3dadd(-44.79, 17.53, 10.3, 0.59)
	pt3dadd(-44.87, 17.53, 10.3, 0.59)
	pt3dadd(-46.26, 18.41, 14.1, 0.59)
	pt3dadd(-46.83, 19.19, 14.15, 0.59)
	pt3dadd(-47.77, 20.04, 14.75, 0.59)
	pt3dadd(-48.59, 21.14, 14.75, 0.59)
	pt3dadd(-49.3, 21.76, 15.2, 0.59)
	pt3dadd(-50.61, 22.55, 15.25, 0.59)
	pt3dadd(-51.09, 23.01, 15.25, 0.59)
	pt3dadd(-52.33, 23.91, 15.25, 0.59)
	pt3dadd(-52.88, 24.36, 15.15, 0.59)
	pt3dadd(-53.46, 25.25, 14.75, 0.59)
	pt3dadd(-53.71, 25.73, 14.75, 0.59)
	pt3dadd(-54.39, 26.92, 14.5, 0.59)
	pt3dadd(-55.18, 27.78, 14.5, 0.59)
	pt3dadd(-58.23, 30.11, 14.45, 0.59)
	pt3dadd(-59.64, 31.24, 14.45, 0.59)
	pt3dadd(-60.25, 31.69, 14.45, 0.59)
	pt3dadd(-60.48, 31.75, 14.45, 0.59)
	pt3dadd(-66.76, 33.57, 16.9, 0.59)
	pt3dadd(-68.61, 34.67, 15.65, 0.59)
	pt3dadd(-71.87, 36.89, 13.95, 0.59)
	pt3dadd(-72.72, 37.57, 13.95, 0.59)
	pt3dadd(-73.05, 37.96, 13.8, 0.59)
	pt3dadd(-74.25, 39.28, 13.95, 0.59)
	pt3dadd(-75.32, 39.85, 13.95, 0.59)
	pt3dadd(-77.06, 40.36, 14.85, 0.59)
	pt3dadd(-78.16, 40.35, 15.6, 0.59)
	pt3dadd(-78.73, 40.2, 15.6, 0.59)
  }
  dend[30] {pt3dclear()
	pt3dadd(-7.88, -2.97, -17.5, 0.73)
	pt3dadd(-7.91, -3.14, 17.35, 0.73)
	pt3dadd(-8.07, -3.06, 17.15, 0.73)
	pt3dadd(-8.45, -2.93, 16.95, 0.73)
	pt3dadd(-8.89, -2.89, 16.65, 0.73)
	pt3dadd(-10.22, -2.83, 16.65, 0.73)
	pt3dadd(-11.17, -2.85, 16.2, 0.73)
	pt3dadd(-11.62, -2.81, 15.8, 0.73)
	pt3dadd(-12.31, -2.54, 15.8, 0.73)
	pt3dadd(-12.84, -2.33, 15.3, 0.73)
	pt3dadd(-13.79, -1.32, 14.95, 0.73)
	pt3dadd(-14.27, -0.77, 14.95, 0.73)
	pt3dadd(-15.38, 0.22, 14.9, 0.73)
	pt3dadd(-15.85, 0.59, 14.85, 0.73)
	pt3dadd(-16.01, 0.75, 14.85, 0.73)
	pt3dadd(-17.74, 1.17, 16.25, 0.73)
	pt3dadd(-18.97, 1.06, 16.3, 0.73)
  }
  dend[31] {pt3dclear()
	pt3dadd(-18.97, 1.06, 16.3, 0.73)
	pt3dadd(-22.4, 4.54, 16.3, 0.73)
	pt3dadd(-23.25, 6.14, 16.3, 0.73)
	pt3dadd(-23.92, 7.34, 16.3, 0.73)
	pt3dadd(-24.6, 8.47, 16.3, 0.73)
	pt3dadd(-24.88, 9.28, 15.65, 0.73)
	pt3dadd(-25.19, 9.59, 15.65, 0.73)
	pt3dadd(-26.8, 12.4, 13.9, 0.73)
	pt3dadd(-27.35, 13.01, 15.05, 0.73)
	pt3dadd(-28.39, 14.01, 15.05, 0.73)
	pt3dadd(-29.25, 14.69, 16.15, 0.73)
	pt3dadd(-29.97, 15.47, 16.95, 0.73)
	pt3dadd(-30.71, 16.5, 16.95, 0.73)
	pt3dadd(-31.03, 16.96, 17.6, 0.73)
	pt3dadd(-31.27, 17.2, 17.85, 0.73)
	pt3dadd(-31.34, 17.19, 17.85, 0.73)
	pt3dadd(-34.57, 21.73, 18.95, 0.44)
	pt3dadd(-36.86, 21.86, 19.9, 0.44)
	pt3dadd(-38, 22.26, 20.55, 0.44)
	pt3dadd(-40.04, 23.08, 20.85, 0.44)
	pt3dadd(-41.75, 24.27, 20.95, 0.44)
	pt3dadd(-45.25, 26.8, 20.95, 0.44)
	pt3dadd(-45.5, 27.21, 20.95, 0.44)
  }
  dend[32] {pt3dclear()
	pt3dadd(-18.97, 1.06, 16.3, 0.51)
	pt3dadd(-19.35, -0.22, 14, 0.51)
	pt3dadd(-19.64, -0.32, 13.75, 0.51)
	pt3dadd(-20.8, -0.43, 13.7, 0.51)
	pt3dadd(-24.12, 0.69, 13.7, 0.51)
	pt3dadd(-25.49, 1.15, 13.7, 0.51)
	pt3dadd(-26.74, 1.21, 13.8, 0.51)
	pt3dadd(-27.64, 1.3, 13.8, 0.51)
	pt3dadd(-28.69, 1.62, 15.65, 0.51)
	pt3dadd(-29.46, 2.05, 17.25, 0.51)
	pt3dadd(-30, 2.42, 17.7, 0.51)
	pt3dadd(-30.87, 3.27, 17.85, 0.51)
	pt3dadd(-31.4, 3.55, 17.9, 0.51)
	pt3dadd(-31.49, 3.63, 17.9, 0.51)
	pt3dadd(-32.88, 3.59, 17.95, 0.51)
	pt3dadd(-33.05, 3.83, 18.3, 0.51)
	pt3dadd(-33.94, 4.92, 19.45, 0.51)
	pt3dadd(-35.07, 6.41, 20.5, 0.51)
	pt3dadd(-35.4, 6.72, 20.5, 0.51)
	pt3dadd(-36.02, 7.08, 21.05, 0.51)
	pt3dadd(-37.2, 7.23, 21.15, 0.51)
	pt3dadd(-39.07, 7.56, 21.15, 0.51)
	pt3dadd(-40.1, 7.72, 21.15, 0.51)
	pt3dadd(-40.12, 7.97, 21.15, 0.51)
	pt3dadd(-41.91, 9.23, 13.1, 0.51)
	pt3dadd(-42.13, 9.21, 12.85, 0.51)
	pt3dadd(-44.64, 10.25, 12.6, 0.51)
	pt3dadd(-46.71, 11.4, 12.6, 0.51)
	pt3dadd(-49.5, 13.33, 12.6, 0.51)
	pt3dadd(-50.83, 14.3, 12.6, 0.51)
	pt3dadd(-52.42, 14.99, 12.6, 0.51)
	pt3dadd(-52.87, 15.12, 12.6, 0.51)
	pt3dadd(-53.03, 15.28, 12.6, 0.51)
  }
  dend[33] {pt3dclear()
	pt3dstyle(1, 1.58853, -0.124842, 2.55213)
	pt3dadd(1.83, 10.96, 0.4, 2.64)
	pt3dadd(1.74, 12.22, 0.45, 2.64)
	pt3dadd(1.58, 12.45, 0.45, 2.64)
	pt3dadd(1.33, 12.93, 0.4, 2.64)
	pt3dadd(1.16, 13.17, 0.4, 2.64)
	pt3dadd(1.05, 13.67, 0.4, 2.64)
  }
}
proc shape3d_8() {
  dend[33] {	pt3dadd(0.96, 14.94, 0.15, 2.64)
	pt3dadd(0.84, 16.6, 1.05, 2.64)
	pt3dadd(0.82, 16.85, 1.45, 2.64)
	pt3dadd(0.48, 17.42, 1.5, 2.64)
	pt3dadd(-0.1, 18.37, 1.5, 2.64)
	pt3dadd(-0.23, 19.11, 1.5, 2.64)
	pt3dadd(-0.34, 20.63, 0.75, 2.64)
	pt3dadd(-0.44, 20.96, -0.2, 2.64)
	pt3dadd(-0.52, 21.11, -0.2, 2.64)
	pt3dadd(-0.88, 24.09, 0.7, 2.42)
	pt3dadd(-1.16, 24.91, 0.25, 2.42)
	pt3dadd(-1.19, 25.33, 0.25, 2.42)
	pt3dadd(-1, 26.7, -0.1, 2.42)
	pt3dadd(-1.14, 28.63, -0.2, 2.42)
	pt3dadd(-0.97, 29.24, -0.2, 2.42)
	pt3dadd(-0.73, 30.1, -0.2, 2.42)
	pt3dadd(-0.64, 30.78, -0.2, 2.42)
	pt3dadd(-0.39, 31.57, -0.2, 2.42)
	pt3dadd(-0.22, 32.17, -0.2, 2.42)
	pt3dadd(-0.19, 32.78, -0.2, 2.42)
	pt3dadd(-0.21, 33.03, -0.2, 2.42)
  }
  dend[34] {pt3dclear()
	pt3dadd(-0.21, 33.03, -0.2, 2.2)
	pt3dadd(1.32, 36.28, 1.95, 2.2)
	pt3dadd(1.22, 37.72, 0.9, 2.2)
	pt3dadd(1.27, 39.14, 0.35, 2.2)
	pt3dadd(1.2, 40.06, -0.2, 2.2)
	pt3dadd(1.11, 40.32, -0.2, 2.2)
	pt3dadd(2.42, 42.81, 2.95, 2.2)
	pt3dadd(2.29, 44.56, -0.3, 2.2)
  }
  dend[35] {pt3dclear()
	pt3dadd(2.29, 44.56, -0.3, 1.62)
	pt3dadd(0.68, 47.45, -2, 1.62)
	pt3dadd(0.52, 47.61, -2.9, 1.62)
	pt3dadd(0.21, 47.92, -3.45, 1.62)
	pt3dadd(0.04, 48.24, -3.45, 1.62)
	pt3dadd(-0.08, 48.82, -3.75, 1.62)
	pt3dadd(-0.14, 49.74, -4.6, 1.62)
	pt3dadd(-0.09, 50, -5.6, 1.62)
	pt3dadd(-0.1, 50.16, -5.6, 1.62)
	pt3dadd(-1.02, 53.62, -8.2, 1.4)
	pt3dadd(-0.92, 54.3, -8.5, 1.4)
	pt3dadd(-0.88, 54.82, -8.5, 1.4)
	pt3dadd(-0.89, 55.83, -8.75, 1.4)
	pt3dadd(-1.09, 56.73, -8.85, 1.4)
	pt3dadd(-1.47, 57.8, -8.85, 1.4)
	pt3dadd(-1.61, 58.72, -8.9, 1.4)
	pt3dadd(-1.67, 59.55, -8.9, 1.4)
  }
  dend[36] {pt3dclear()
	pt3dadd(-1.67, 59.55, -8.9, 1.4)
	pt3dadd(-2.08, 63.01, -11.7, 1.4)
	pt3dadd(-2.21, 63.92, -11.85, 1.4)
	pt3dadd(-1.66, 64.4, -11.85, 1.4)
	pt3dadd(-0.32, 65.2, -11.85, 1.4)
	pt3dadd(-0.11, 65.39, -11.85, 1.4)
	pt3dadd(0.36, 66.11, -11.85, 1.4)
	pt3dadd(0.48, 66.37, -11.85, 1.4)
	pt3dadd(0.53, 66.73, -11.85, 1.4)
	pt3dadd(0.36, 67.98, -12.8, 1.4)
	pt3dadd(-0.18, 69.36, -14.25, 1.4)
	pt3dadd(-0.28, 70.69, -15.1, 1.4)
	pt3dadd(-1.48, 73.11, -17.45, 1.4)
	pt3dadd(-1.5, 73.44, -17.5, 1.4)
	pt3dadd(-1.25, 74.06, -17.5, 1.4)
	pt3dadd(-0.97, 75.28, -17.5, 1.4)
	pt3dadd(-0.87, 75.79, -17.5, 1.4)
	pt3dadd(-0.91, 76.38, -17.5, 1.4)
  }
  dend[37] {pt3dclear()
	pt3dadd(-0.91, 76.38, -17.5, 1.17)
	pt3dadd(-2.29, 80.2, -17.65, 1.17)
	pt3dadd(-2.62, 80.68, -17.65, 1.17)
	pt3dadd(-3.59, 81.94, -18.05, 1.17)
	pt3dadd(-3.84, 82.33, -18.4, 1.17)
	pt3dadd(-4, 82.49, -18.4, 1.17)
	pt3dadd(-4.73, 88.23, -21.45, 1.03)
	pt3dadd(-4.8, 88.31, -21.45, 1.03)
	pt3dadd(-4.33, 88.78, -21.45, 1.03)
	pt3dadd(-3.58, 89.7, -21.45, 1.03)
	pt3dadd(-3.53, 90.12, -21, 1.03)
	pt3dadd(-3.9, 91.09, -21, 1.03)
	pt3dadd(-4.47, 91.89, -20.4, 1.03)
	pt3dadd(-4.66, 92.47, -19.85, 1.03)
	pt3dadd(-4.56, 93.15, -19.85, 1.03)
	pt3dadd(-4.24, 93.76, -19.7, 1.03)
	pt3dadd(-3.61, 95.26, -19.8, 1.03)
	pt3dadd(-3.39, 96.2, -19.8, 1.03)
	pt3dadd(-3.52, 97.03, -20.8, 1.03)
	pt3dadd(-3.99, 97.5, -21.8, 1.03)
	pt3dadd(-4.38, 97.71, -21.8, 1.03)
	pt3dadd(-4.75, 97.84, -22.55, 1.03)
	pt3dadd(-5.18, 98.65, -23.1, 1.03)
	pt3dadd(-5.75, 100.46, -23.1, 1.03)
	pt3dadd(-6.22, 101.77, -23.2, 1.03)
	pt3dadd(-6.45, 104.95, -23.55, 1.03)
	pt3dadd(-6.22, 105.82, -24, 1.03)
	pt3dadd(-5.22, 107.33, -24, 1.03)
	pt3dadd(-4.28, 108.52, -24.35, 1.03)
	pt3dadd(-3.51, 110.03, -24.45, 1.03)
	pt3dadd(-3.45, 110.37, -24.45, 1.03)
	pt3dadd(-3.4, 110.62, -24.45, 1.03)
	pt3dadd(-0.04, 116.83, -28.3, 0.95)
	pt3dadd(0.1, 117.01, -28.3, 0.95)
	pt3dadd(0.73, 118.42, -28.65, 0.95)
	pt3dadd(1.01, 119.63, -28.75, 0.95)
	pt3dadd(1.43, 121.02, -28.75, 0.95)
	pt3dadd(1.76, 121.47, -28.75, 0.95)
	pt3dadd(2.83, 122.92, -28.75, 0.95)
	pt3dadd(3.2, 123.89, -28.75, 0.95)
	pt3dadd(3.3, 125.58, -28.75, 0.95)
	pt3dadd(3.21, 126.85, -28.75, 0.95)
	pt3dadd(3.53, 128.65, -28.75, 0.95)
	pt3dadd(4.02, 129.96, -28.8, 0.95)
	pt3dadd(5.42, 134.05, -28.75, 0.95)
	pt3dadd(5.88, 135.86, -28.75, 0.95)
	pt3dadd(6.05, 136.56, -28.75, 0.95)
	pt3dadd(7.67, 144.56, -33, 0.95)
	pt3dadd(7.94, 145.86, -33.1, 0.95)
	pt3dadd(7.8, 147.86, -33.15, 0.95)
	pt3dadd(7.24, 149.5, -33.15, 0.95)
	pt3dadd(6.82, 151.23, -33.2, 0.95)
	pt3dadd(6.75, 152.25, -33.2, 0.95)
	pt3dadd(6.69, 154.09, -33.2, 0.95)
	pt3dadd(6.5, 156.69, -33.2, 0.95)
	pt3dadd(6.02, 158.17, -33.2, 0.95)
	pt3dadd(5.68, 159.83, -33.2, 0.95)
	pt3dadd(5.58, 161.16, -33.2, 0.95)
	pt3dadd(5.57, 162.42, -33.2, 0.95)
	pt3dadd(5.56, 162.5, -33.2, 0.95)
	pt3dadd(7.94, 168.31, -39.55, 0.73)
	pt3dadd(7.06, 170.42, -39.85, 0.73)
	pt3dadd(7, 171.26, -39.85, 0.73)
	pt3dadd(7.68, 173, -39.9, 0.73)
	pt3dadd(7.85, 173.79, -39.9, 0.73)
	pt3dadd(7.81, 174.37, -40.85, 0.73)
	pt3dadd(8.01, 175.56, -40.85, 0.73)
	pt3dadd(8.39, 176.45, -42.15, 0.73)
	pt3dadd(8.79, 177.92, -43.15, 0.73)
	pt3dadd(9.4, 179.83, -43.15, 0.73)
	pt3dadd(9.88, 181.39, -43.55, 0.73)
	pt3dadd(10.25, 182.36, -43.6, 0.73)
	pt3dadd(10.27, 182.95, -43.6, 0.73)
	pt3dadd(10.27, 183.03, -43.6, 0.73)
	pt3dadd(13.25, 194.45, -46.45, 0.66)
	pt3dadd(13.22, 194.87, -47.55, 0.66)
	pt3dadd(13.64, 196.17, -47.55, 0.66)
	pt3dadd(14.57, 197.61, -47.75, 0.66)
	pt3dadd(15.62, 198.3, -47.8, 0.66)
	pt3dadd(17.79, 199.94, -47.8, 0.66)
	pt3dadd(19.23, 200.49, -47.85, 0.66)
	pt3dadd(23.33, 201.72, -47.8, 0.66)
	pt3dadd(25.21, 202.24, -47.8, 0.66)
	pt3dadd(25.92, 202.73, -47.8, 0.66)
	pt3dadd(25.91, 202.82, -47.8, 0.66)
  }
  dend[38] {pt3dclear()
	pt3dadd(-0.91, 76.38, -17.5, 0.81)
	pt3dadd(0.01, 74.16, -14.45, 0.81)
	pt3dadd(1.09, 74.51, -13.7, 0.81)
	pt3dadd(2.3, 75.13, -13.55, 0.81)
	pt3dadd(3.41, 75.99, -13.55, 0.81)
	pt3dadd(3.87, 76.71, -13.55, 0.81)
	pt3dadd(3.86, 76.88, -13.55, 0.81)
	pt3dadd(5.37, 78.54, -15.05, 0.81)
	pt3dadd(6.36, 79.13, -15.05, 0.81)
	pt3dadd(7.26, 79.82, -15, 0.81)
	pt3dadd(8.17, 80.58, -14.45, 0.81)
	pt3dadd(8.45, 80.68, -14.45, 0.81)
	pt3dadd(9.03, 80.83, -13.85, 0.81)
	pt3dadd(10, 80.58, -13.4, 0.81)
	pt3dadd(11.32, 80.69, -13.4, 0.81)
	pt3dadd(12.13, 80.69, -12.85, 0.81)
	pt3dadd(12.65, 80.74, -12.85, 0.81)
	pt3dadd(13.29, 81.14, -12.5, 0.81)
	pt3dadd(14.14, 82.56, -12.5, 0.81)
	pt3dadd(14.86, 83.72, -12.45, 0.81)
	pt3dadd(15.23, 84.7, -12.55, 0.81)
	pt3dadd(15.23, 84.78, -12.55, 0.81)
	pt3dadd(16.4, 86.91, -17.5, 0.81)
	pt3dadd(16.95, 87.48, -17.5, 0.81)
	pt3dadd(17.77, 88.31, -17.5, 0.81)
	pt3dadd(18.66, 89.23, -17.5, 0.81)
	pt3dadd(19.99, 91.21, -17.55, 0.81)
	pt3dadd(20.56, 92.45, -17.35, 0.81)
	pt3dadd(21.15, 93.43, -17.35, 0.81)
	pt3dadd(21.42, 93.88, -17.25, 0.81)
	pt3dadd(22.16, 94.97, -17.15, 0.81)
	pt3dadd(22.63, 95.44, -17.15, 0.81)
	pt3dadd(23, 95.55, -17.1, 0.81)
	pt3dadd(23.22, 95.57, -17.1, 0.81)
	pt3dadd(24.27, 95.24, -17.1, 0.81)
	pt3dadd(26.31, 94.59, -17.1, 0.81)
	pt3dadd(27.43, 94.37, -17.1, 0.81)
	pt3dadd(28.73, 93.72, -17.1, 0.81)
	pt3dadd(29.41, 93.46, -17.1, 0.81)
	pt3dadd(29.57, 93.38, -17.1, 0.81)
	pt3dadd(32.78, 91.74, -17.1, 0.81)
	pt3dadd(33.96, 92.69, -17.1, 0.81)
	pt3dadd(36.57, 95.38, -17.1, 0.81)
	pt3dadd(37.51, 96.56, -17.1, 0.81)
	pt3dadd(38.63, 98.36, -17.1, 0.81)
	pt3dadd(39.03, 98.91, -17.1, 0.81)
	pt3dadd(46.14, 103.37, -21.75, 0.81)
	pt3dadd(46.4, 103.83, -21.4, 0.81)
	pt3dadd(47.17, 104.41, -20.6, 0.81)
	pt3dadd(48.02, 104.91, -19.75, 0.81)
	pt3dadd(49.53, 105.39, -19.75, 0.81)
  }
}
proc shape3d_9() {
  dend[38] {	pt3dadd(49.95, 105.59, -19.05, 0.81)
	pt3dadd(53.34, 107.77, -18.2, 0.66)
	pt3dadd(53.62, 107.88, -18.2, 0.66)
	pt3dadd(54.56, 109.24, -18.2, 0.66)
	pt3dadd(54.73, 109.93, -18.2, 0.66)
	pt3dadd(54.71, 111.1, -18.2, 0.66)
	pt3dadd(55.1, 111.82, -18.5, 0.66)
	pt3dadd(56.3, 112.61, -18.75, 0.66)
	pt3dadd(57.31, 112.95, -18.75, 0.66)
	pt3dadd(57.52, 113.06, -18.85, 0.66)
  }
  dend[39] {pt3dclear()
	pt3dadd(-1.67, 59.55, -8.9, 0.95)
	pt3dadd(-2.96, 60.01, -5.05, 0.95)
	pt3dadd(-3.18, 59.99, -5.85, 0.95)
	pt3dadd(-3.79, 60.27, -6.6, 0.95)
	pt3dadd(-4.99, 60.58, -7.25, 0.95)
	pt3dadd(-5.29, 60.71, -7.25, 0.95)
	pt3dadd(-5.77, 61.18, -7.9, 0.95)
	pt3dadd(-6.09, 61.49, -8.5, 0.95)
	pt3dadd(-6.39, 61.62, -8.5, 0.95)
	pt3dadd(-7.37, 61.86, -10.8, 0.95)
	pt3dadd(-8.13, 62.22, -10.9, 0.95)
	pt3dadd(-8.67, 62.59, -10.9, 0.95)
	pt3dadd(-9.53, 63.28, -10.9, 0.95)
	pt3dadd(-10.02, 63.9, -10.9, 0.95)
	pt3dadd(-11.13, 64.97, -10.9, 0.95)
	pt3dadd(-11.37, 65.2, -10.9, 0.95)
	pt3dadd(-11.93, 65.84, -10.9, 0.95)
	pt3dadd(-12.24, 66.05, -11.3, 0.95)
	pt3dadd(-12.4, 66.29, -12.45, 0.95)
  }
  dend[40] {pt3dclear()
	pt3dadd(-12.4, 66.29, -12.45, 0.95)
	pt3dadd(-13.82, 68.6, 0.8, 0.95)
	pt3dadd(-14.15, 69, 1.3, 0.95)
	pt3dadd(-14.4, 69.32, 1.6, 0.95)
	pt3dadd(-15.33, 70.06, 1.6, 0.95)
	pt3dadd(-15.57, 70.3, 1.85, 0.95)
	pt3dadd(-15.64, 70.3, 1.85, 0.95)
	pt3dadd(-16.73, 72.04, -2.6, 0.95)
	pt3dadd(-17.68, 72.98, -3.1, 0.95)
	pt3dadd(-18.69, 73.81, -3.1, 0.95)
	pt3dadd(-19.25, 74.25, -3.7, 0.95)
	pt3dadd(-20.41, 74.99, -4.3, 0.95)
	pt3dadd(-20.56, 75.23, -4.3, 0.95)
	pt3dadd(-21.11, 75.51, -4.45, 0.95)
	pt3dadd(-21.34, 75.75, -4.5, 0.95)
	pt3dadd(-22.04, 76.28, -4.5, 0.95)
	pt3dadd(-22.61, 76.97, -4.5, 0.95)
	pt3dadd(-23.11, 77.78, -4.5, 0.95)
	pt3dadd(-23.39, 78.6, -4.5, 0.95)
	pt3dadd(-23.49, 80.01, -4.5, 0.95)
	pt3dadd(-23.66, 80.34, -4.5, 0.95)
  }
  dend[41] {pt3dclear()
	pt3dadd(-23.66, 80.34, -4.5, 0.95)
	pt3dadd(-24.65, 84.95, -4.85, 0.95)
	pt3dadd(-24.71, 85.79, -5.4, 0.95)
	pt3dadd(-24.73, 87.06, -5.4, 0.95)
	pt3dadd(-24.96, 88.22, -5.7, 0.95)
	pt3dadd(-25.48, 89.44, -5.7, 0.95)
	pt3dadd(-25.53, 90.1, -5.7, 0.95)
	pt3dadd(-24.7, 91.7, -5.7, 0.95)
	pt3dadd(-24.56, 91.96, -5.7, 0.95)
	pt3dadd(-24.6, 94.32, -2.2, 0.95)
	pt3dadd(-24.49, 94.92, -2.15, 0.95)
	pt3dadd(-24.55, 95.76, -2.15, 0.95)
	pt3dadd(-25, 96.91, -2.55, 0.95)
	pt3dadd(-25.35, 97.62, -3.2, 0.95)
	pt3dadd(-25.72, 98.77, -3.8, 0.95)
	pt3dadd(-25.85, 99.51, -3.8, 0.95)
	pt3dadd(-26.04, 102.04, -4.25, 0.95)
	pt3dadd(-26, 103.57, -4.4, 0.95)
	pt3dadd(-25.97, 105.24, -4.4, 0.95)
	pt3dadd(-25.97, 105.33, -4.4, 0.95)
	pt3dadd(-27.8, 114.29, -3.85, 0.95)
	pt3dadd(-28.13, 114.68, -5.2, 0.95)
	pt3dadd(-28.42, 115.75, -6.25, 0.95)
	pt3dadd(-28.72, 116.82, -6.25, 0.95)
	pt3dadd(-28.84, 117.48, -6.7, 0.95)
	pt3dadd(-28.68, 118.26, -6.7, 0.95)
	pt3dadd(-28.08, 119.15, -6.8, 0.95)
	pt3dadd(-27.67, 119.54, -6.8, 0.95)
	pt3dadd(-26.95, 119.95, -6.8, 0.95)
	pt3dadd(-26.18, 120.43, -6.75, 0.95)
	pt3dadd(-26.11, 121.45, -6.75, 0.95)
	pt3dadd(-26.22, 123.03, -6.75, 0.95)
	pt3dadd(-26.67, 126.13, -6.75, 0.95)
	pt3dadd(-26.65, 127.89, -6.7, 0.95)
	pt3dadd(-26.37, 129.1, -6.65, 0.95)
	pt3dadd(-26.3, 129.2, -6.5, 0.95)
	pt3dadd(-25.44, 136.81, -2.45, 0.95)
	pt3dadd(-25.03, 137.34, -3.7, 0.95)
	pt3dadd(-24.76, 137.8, -5.15, 0.95)
	pt3dadd(-24.26, 138.86, -5.15, 0.95)
	pt3dadd(-24, 139.39, -6.05, 0.95)
	pt3dadd(-23.46, 140.2, -6.65, 0.95)
	pt3dadd(-22.76, 140.6, -6.85, 0.95)
	pt3dadd(-21.87, 141.45, -6.85, 0.95)
	pt3dadd(-21.82, 141.88, -6.9, 0.95)
	pt3dadd(-21.81, 142.73, -6.9, 0.95)
	pt3dadd(-21.94, 143.55, -6.9, 0.95)
	pt3dadd(-22.59, 145.27, -6.9, 0.95)
	pt3dadd(-22.94, 146.16, -6.9, 0.95)
	pt3dadd(-23.61, 148.36, -6.9, 0.95)
	pt3dadd(-23.81, 149.96, -6.85, 0.95)
	pt3dadd(-23.88, 153, -6.85, 0.95)
	pt3dadd(-23.36, 155.99, -6.75, 0.95)
	pt3dadd(-23.37, 157.26, -6.5, 0.95)
	pt3dadd(-23.61, 157.48, -6.5, 0.95)
	pt3dadd(-24.07, 157.78, -6.3, 0.95)
	pt3dadd(-24.62, 158.14, -6.25, 0.95)
	pt3dadd(-25.1, 158.69, -6.25, 0.95)
	pt3dadd(-25.35, 159.01, -6.1, 0.95)
	pt3dadd(-25.35, 159.09, -6.1, 0.95)
	pt3dadd(-29.63, 165.81, -2.65, 0.81)
	pt3dadd(-30.66, 166.65, -3.45, 0.81)
	pt3dadd(-31.15, 167.35, -3.95, 0.81)
	pt3dadd(-31.45, 168.42, -4.1, 0.81)
	pt3dadd(-31.48, 168.92, -4.1, 0.81)
	pt3dadd(-31.59, 169.43, -4.15, 0.81)
	pt3dadd(-31.61, 169.68, -4.2, 0.81)
  }
  dend[42] {pt3dclear()
	pt3dadd(-31.61, 169.68, -4.2, 0.81)
	pt3dadd(-30.38, 171.99, -4.15, 0.81)
	pt3dadd(-30.5, 173.66, -2.75, 0.81)
	pt3dadd(-31.41, 175.1, -2.35, 0.81)
	pt3dadd(-32.08, 176.13, -2.3, 0.81)
	pt3dadd(-32.25, 177.46, -2.3, 0.81)
	pt3dadd(-32.3, 178.06, -2.7, 0.81)
	pt3dadd(-32.24, 178.39, -4.1, 0.81)
	pt3dadd(-31.76, 182.51, -9.9, 0.59)
	pt3dadd(-31.9, 185.44, -9.8, 0.59)
	pt3dadd(-31.98, 186.54, -8.85, 0.59)
	pt3dadd(-31.47, 187.69, -8.85, 0.59)
	pt3dadd(-31.13, 188.13, -7.9, 0.59)
	pt3dadd(-31.08, 188.47, -7.2, 0.59)
	pt3dadd(-30.51, 189.62, -7.2, 0.59)
	pt3dadd(-30.64, 191.47, -6.45, 0.59)
	pt3dadd(-30.77, 192.31, -6.45, 0.59)
	pt3dadd(-30.82, 193.05, -6.4, 0.59)
	pt3dadd(-30.38, 193.94, -6.35, 0.59)
	pt3dadd(-29.84, 194.76, -6.35, 0.59)
	pt3dadd(-29.01, 195.42, -6.45, 0.59)
	pt3dadd(-28.11, 196.35, -6.85, 0.59)
	pt3dadd(-27.58, 196.99, -6.85, 0.59)
	pt3dadd(-26.39, 197.85, -7.3, 0.59)
	pt3dadd(-25.89, 198.25, -7.7, 0.59)
	pt3dadd(-24.7, 198.96, -7.7, 0.59)
	pt3dadd(-24.56, 199.13, -7.95, 0.59)
	pt3dadd(-24.27, 199.15, -7.95, 0.59)
  }
  dend[43] {pt3dclear()
	pt3dadd(-31.61, 169.68, -4.2, 0.59)
	pt3dadd(-31.51, 170.31, -0.5, 0.59)
	pt3dadd(-32.25, 170.25, -0.35, 0.59)
	pt3dadd(-32.62, 170.3, -0.35, 0.59)
	pt3dadd(-32.77, 170.37, -0.65, 0.59)
	pt3dadd(-33.31, 170.74, -0.65, 0.59)
	pt3dadd(-33.72, 171.29, -1.4, 0.59)
	pt3dadd(-34.66, 172.98, -1.4, 0.59)
	pt3dadd(-34.98, 173.44, -2.05, 0.59)
	pt3dadd(-35.58, 175.58, -2.15, 0.59)
	pt3dadd(-37.34, 177.44, 3.95, 0.73)
	pt3dadd(-37.45, 178.95, 4.7, 0.73)
	pt3dadd(-37.8, 179.76, 5.15, 0.73)
	pt3dadd(-38.24, 180.74, 5.4, 0.73)
	pt3dadd(-39.04, 182.61, 5.5, 0.73)
	pt3dadd(-39.24, 183.34, 5.5, 0.73)
	pt3dadd(-40.29, 184.68, 9.35, 0.73)
	pt3dadd(-40.68, 184.9, 9.55, 0.73)
	pt3dadd(-41.28, 185.09, 9.55, 0.73)
	pt3dadd(-42.23, 185, 9.75, 0.73)
	pt3dadd(-43.1, 184.84, 9.75, 0.73)
	pt3dadd(-44, 185.01, 9.75, 0.73)
	pt3dadd(-45.11, 185.08, 9.75, 0.73)
	pt3dadd(-46.43, 184.95, 9.5, 0.73)
	pt3dadd(-48.1, 184.7, 8.95, 0.73)
	pt3dadd(-49.51, 184.83, 8.95, 0.73)
	pt3dadd(-50.65, 185.23, 8.25, 0.73)
	pt3dadd(-50.81, 185.39, 7.55, 0.73)
	pt3dadd(-51.05, 185.61, 7.55, 0.73)
	pt3dadd(-51.42, 185.83, 6.75, 0.73)
  }
  dend[44] {pt3dclear()
	pt3dadd(-23.66, 80.34, -4.5, 0.81)
	pt3dadd(-24.92, 77.43, -0.35, 0.81)
	pt3dadd(-25.07, 77.4, -0.55, 0.81)
	pt3dadd(-26.27, 77.63, -0.55, 0.81)
	pt3dadd(-27.84, 78.08, -1.3, 0.81)
	pt3dadd(-29.2, 78.54, -2.6, 0.81)
	pt3dadd(-29.27, 78.53, -2.6, 0.81)
	pt3dadd(-29.79, 79.58, -9.1, 0.81)
	pt3dadd(-30.35, 80.11, -9.75, 0.81)
	pt3dadd(-31.14, 80.89, -9.75, 0.81)
	pt3dadd(-31.55, 81.43, -10.1, 0.81)
	pt3dadd(-32.44, 82.53, -10.15, 0.81)
	pt3dadd(-33.3, 83.38, -10.15, 0.81)
	pt3dadd(-34.19, 85.33, -10.15, 0.81)
	pt3dadd(-34.72, 86.63, -10.15, 0.81)
	pt3dadd(-35.1, 87.76, -9.85, 0.81)
	pt3dadd(-35.26, 87.92, -9.3, 0.81)
	pt3dadd(-35.34, 88.08, -9.3, 0.81)
	pt3dadd(-37.11, 89.1, -9.65, 0.81)
	pt3dadd(-37.12, 90.19, -10.95, 0.81)
	pt3dadd(-36.75, 91.16, -11.95, 0.81)
	pt3dadd(-36.86, 92.67, -12.7, 0.81)
	pt3dadd(-37.12, 93.23, -13.4, 0.81)
	pt3dadd(-37.37, 93.63, -13.4, 0.81)
	pt3dadd(-37.88, 93.67, -13.8, 0.81)
  }
}
proc shape3d_10() {
  dend[44] {	pt3dadd(-38.48, 93.78, -14.15, 0.81)
	pt3dadd(-38.88, 94.08, -14.15, 0.81)
	pt3dadd(-39.26, 94.47, -14.3, 0.81)
	pt3dadd(-39.57, 95.62, -14.3, 0.81)
	pt3dadd(-39.85, 96.52, -14.3, 0.81)
	pt3dadd(-40.22, 97.42, -14.35, 0.81)
	pt3dadd(-40.46, 97.65, -14.35, 0.81)
	pt3dadd(-40.6, 97.63, -14.35, 0.81)
	pt3dadd(-41.97, 102.15, -16.95, 0.81)
	pt3dadd(-42.89, 102.73, -17.35, 0.81)
	pt3dadd(-44.14, 103.54, -17.35, 0.81)
	pt3dadd(-44.69, 104.09, -17.8, 0.81)
	pt3dadd(-44.96, 104.82, -18.05, 0.81)
	pt3dadd(-45.17, 105.57, -18.05, 0.81)
	pt3dadd(-45.26, 106.9, -18.1, 0.81)
	pt3dadd(-45.37, 107.39, -18.1, 0.81)
	pt3dadd(-45.64, 108.13, -18.15, 0.81)
	pt3dadd(-45.82, 108.54, -18.15, 0.81)
	pt3dadd(-45.99, 108.94, -18.15, 0.81)
  }
  dend[45] {pt3dclear()
	pt3dadd(-45.99, 108.94, -18.15, 0.81)
	pt3dadd(-45.27, 111.19, -18.1, 0.81)
	pt3dadd(-45.49, 112.12, -18.1, 0.81)
	pt3dadd(-46.18, 113.4, -18.1, 0.81)
	pt3dadd(-46.73, 114.02, -18.1, 0.81)
	pt3dadd(-47.93, 115.26, -18.1, 0.81)
	pt3dadd(-48.35, 116.05, -18.1, 0.81)
	pt3dadd(-49.67, 117.96, -18.55, 0.81)
	pt3dadd(-50.11, 118.94, -20.3, 0.81)
	pt3dadd(-50.44, 119.32, -20.3, 0.81)
	pt3dadd(-53.88, 124.23, -27.5, 0.66)
	pt3dadd(-53.99, 124.74, -27.5, 0.66)
	pt3dadd(-54.33, 125.46, -27.75, 0.66)
	pt3dadd(-55.71, 127.1, -27.8, 0.66)
	pt3dadd(-56.44, 128.05, -27.8, 0.66)
	pt3dadd(-57.17, 129.08, -27.5, 0.66)
	pt3dadd(-57.84, 130.04, -26, 0.66)
	pt3dadd(-58.73, 131.13, -26, 0.66)
	pt3dadd(-59.23, 131.92, -24.55, 0.66)
	pt3dadd(-59.31, 132.08, -23.55, 0.66)
	pt3dadd(-59.53, 133.07, -23.15, 0.66)
	pt3dadd(-59.59, 133.91, -23.15, 0.66)
	pt3dadd(-59.64, 135.59, -23.15, 0.66)
	pt3dadd(-59.76, 136.26, -23.1, 0.66)
	pt3dadd(-59.87, 136.84, -23.1, 0.66)
	pt3dadd(-60.28, 137.39, -23.15, 0.66)
	pt3dadd(-61.38, 138.3, -23.2, 0.66)
	pt3dadd(-62.29, 138.64, -23.2, 0.66)
	pt3dadd(-63.21, 139.05, -23.85, 0.66)
	pt3dadd(-63.67, 139.43, -24.7, 0.66)
	pt3dadd(-64.97, 141, -24.7, 0.66)
	pt3dadd(-65.53, 141.62, -25.5, 0.66)
	pt3dadd(-65.7, 141.94, -25.5, 0.66)
	pt3dadd(-66.18, 142.41, -27.5, 0.66)
	pt3dadd(-66.64, 142.69, -27.8, 0.66)
	pt3dadd(-66.87, 142.84, -27.8, 0.66)
	pt3dadd(-69.19, 146.83, -31.1, 0.66)
	pt3dadd(-70.53, 148.06, -31.1, 0.66)
	pt3dadd(-70.85, 148.44, -31.5, 0.66)
	pt3dadd(-71.61, 148.8, -31.95, 0.66)
	pt3dadd(-72.29, 149.08, -32.75, 0.66)
	pt3dadd(-74.43, 150.05, -32.75, 0.66)
	pt3dadd(-74.78, 150.87, -33.65, 0.66)
	pt3dadd(-75.17, 152.1, -34.05, 0.66)
	pt3dadd(-75.39, 153.09, -34.05, 0.66)
	pt3dadd(-75.8, 153.73, -34.1, 0.66)
	pt3dadd(-76.03, 153.86, -34.1, 0.66)
	pt3dadd(-76.43, 154.25, -34.1, 0.66)
	pt3dadd(-77.11, 155.55, -34.1, 0.66)
	pt3dadd(-77.75, 157.26, -34.1, 0.66)
	pt3dadd(-78.1, 158.14, -34.1, 0.66)
	pt3dadd(-78.48, 159.21, -34.1, 0.66)
	pt3dadd(-78.69, 162.06, -34.1, 0.66)
	pt3dadd(-79.43, 163.16, -34.1, 0.66)
	pt3dadd(-79.85, 163.89, -34.1, 0.66)
	pt3dadd(-80.24, 164.28, -34.1, 0.66)
	pt3dadd(-81.53, 166.39, -40.65, 0.66)
	pt3dadd(-82.01, 166.92, -41.15, 0.66)
	pt3dadd(-82.18, 167.17, -41.5, 0.66)
	pt3dadd(-82.46, 167.99, -41.5, 0.66)
	pt3dadd(-82.63, 168.38, -41.75, 0.66)
	pt3dadd(-83.22, 169.35, -41.8, 0.66)
	pt3dadd(-83.3, 169.51, -41.8, 0.66)
	pt3dadd(-83.47, 169.74, -41.8, 0.66)
	pt3dadd(-83.49, 170, -41.8, 0.66)
  }
  dend[46] {pt3dclear()
	pt3dadd(-83.49, 170, -41.8, 0.66)
	pt3dadd(-83.93, 172.99, -41.85, 0.66)
	pt3dadd(-84.13, 175.76, -43.55, 0.66)
	pt3dadd(-84.41, 177.58, -44.55, 0.66)
	pt3dadd(-85.1, 180.13, -44.55, 0.66)
	pt3dadd(-85.67, 181.77, -45.45, 0.66)
	pt3dadd(-85.81, 183.78, -46.6, 0.66)
	pt3dadd(-82.96, 188.2, -49.85, 0.66)
	pt3dadd(-83.62, 189.16, -49.85, 0.66)
	pt3dadd(-84.16, 190.45, -50.6, 0.66)
	pt3dadd(-84.6, 191.51, -51.3, 0.66)
	pt3dadd(-84.68, 192.53, -51.3, 0.66)
	pt3dadd(-84.94, 194.18, -51.85, 0.66)
	pt3dadd(-85.16, 197.28, -51.95, 0.66)
	pt3dadd(-85.71, 198.75, -51.95, 0.66)
	pt3dadd(-86.28, 199.45, -51.95, 0.66)
	pt3dadd(-86.81, 200.6, -51.95, 0.66)
	pt3dadd(-87.49, 201.87, -51.95, 0.66)
	pt3dadd(-88.8, 203.69, -51.95, 0.66)
	pt3dadd(-89.52, 204.55, -51.95, 0.66)
	pt3dadd(-90.18, 205.5, -51.95, 0.66)
	pt3dadd(-90.74, 206.13, -52, 0.66)
	pt3dadd(-90.95, 206.95, -52.9, 0.66)
	pt3dadd(-89.72, 208.25, -52.9, 0.66)
	pt3dadd(-89.37, 208.53, -53.8, 0.66)
	pt3dadd(-89.44, 209.55, -54.8, 0.66)
	pt3dadd(-89.82, 210.77, -54.8, 0.66)
	pt3dadd(-89.93, 211.17, -55, 0.66)
	pt3dadd(-90.06, 212.94, -55.05, 0.66)
	pt3dadd(-90.06, 217.18, -60.65, 0.51)
	pt3dadd(-90.85, 217.87, -60.95, 0.51)
	pt3dadd(-92.29, 219.42, -60.95, 0.51)
	pt3dadd(-93.17, 220.35, -61.1, 0.51)
	pt3dadd(-93.72, 220.9, -61.1, 0.51)
	pt3dadd(-93.95, 221.12, -61.1, 0.51)
	pt3dadd(-94.13, 221.44, -61.1, 0.51)
  }
  dend[47] {pt3dclear()
	pt3dadd(-83.49, 170, -41.8, 0.51)
	pt3dadd(-83.98, 168.38, -40.85, 0.51)
	pt3dadd(-84.26, 168.18, -40.65, 0.51)
	pt3dadd(-84.75, 167.89, -40.6, 0.51)
	pt3dadd(-85.51, 168.07, -40.6, 0.51)
	pt3dadd(-86.64, 169.4, -40.6, 0.51)
	pt3dadd(-86.78, 170.39, -41.65, 0.51)
	pt3dadd(-86.89, 171.9, -43.35, 0.51)
	pt3dadd(-87.44, 172.44, -44.65, 0.51)
	pt3dadd(-87.59, 172.51, -44.65, 0.51)
	pt3dadd(-87.6, 172.6, -45.75, 0.51)
	pt3dadd(-89.07, 174.65, -49.85, 0.59)
	pt3dadd(-89.38, 174.79, -50.15, 0.59)
	pt3dadd(-89.92, 175.15, -50.15, 0.59)
	pt3dadd(-90.83, 175.49, -51.45, 0.59)
	pt3dadd(-91.75, 176.09, -52.55, 0.59)
	pt3dadd(-92.56, 176.94, -52.55, 0.59)
	pt3dadd(-93.61, 179.19, -53.5, 0.59)
	pt3dadd(-94.04, 180.17, -54.1, 0.59)
	pt3dadd(-94.44, 180.64, -54.2, 0.59)
	pt3dadd(-94.83, 180.87, -54.2, 0.59)
	pt3dadd(-95.51, 182.05, -54.2, 0.59)
	pt3dadd(-95.64, 182.89, -54.3, 0.59)
	pt3dadd(-95.92, 183.71, -54.3, 0.59)
	pt3dadd(-96.24, 184.1, -55.6, 0.59)
	pt3dadd(-96.99, 184.2, -56.75, 0.59)
	pt3dadd(-98.02, 184.18, -56.75, 0.59)
	pt3dadd(-98.77, 184.45, -57.8, 0.59)
	pt3dadd(-99.91, 184.85, -58.5, 0.59)
	pt3dadd(-101.38, 185.81, -58.5, 0.59)
	pt3dadd(-102.57, 187.05, -58.6, 0.59)
	pt3dadd(-102.98, 187.69, -58.6, 0.59)
	pt3dadd(-103.15, 188.01, -58.6, 0.59)
  }
  dend[48] {pt3dclear()
	pt3dadd(-45.99, 108.94, -18.15, 0.81)
	pt3dadd(-46.19, 109.25, -13.75, 0.81)
	pt3dadd(-48.68, 109.02, -13.05, 0.81)
	pt3dadd(-49.58, 109.34, -13.5, 0.81)
	pt3dadd(-50.27, 109.62, -14.55, 0.81)
	pt3dadd(-51.3, 109.6, -14.55, 0.81)
	pt3dadd(-52.01, 109.37, -15.65, 0.81)
	pt3dadd(-52.66, 109.14, -16.55, 0.81)
	pt3dadd(-54.34, 108.98, -17.8, 0.81)
	pt3dadd(-55.62, 109.29, -18, 0.81)
	pt3dadd(-57.31, 110.23, -18, 0.81)
	pt3dadd(-58.71, 111.19, -18.05, 0.81)
	pt3dadd(-60.53, 112.02, -18.05, 0.81)
	pt3dadd(-60.77, 112.26, -18.05, 0.81)
	pt3dadd(-60.9, 113.08, -18.05, 0.81)
	pt3dadd(-61.08, 113.49, -18.05, 0.81)
	pt3dadd(-63.57, 115.29, -16.5, 0.81)
	pt3dadd(-63.98, 115.84, -17.25, 0.81)
	pt3dadd(-64.66, 117.14, -18.3, 0.81)
	pt3dadd(-65.64, 118.39, -18.3, 0.81)
	pt3dadd(-66.18, 118.76, -19.1, 0.81)
	pt3dadd(-66.86, 119.03, -19.35, 0.81)
	pt3dadd(-67.68, 119.05, -19.35, 0.81)
	pt3dadd(-68.85, 119.01, -19.35, 0.81)
	pt3dadd(-69.94, 118.91, -18.65, 0.81)
	pt3dadd(-73.14, 118.18, -14.85, 0.66)
	pt3dadd(-74.8, 117.79, -14.85, 0.66)
	pt3dadd(-75.44, 117.38, -14.7, 0.66)
	pt3dadd(-76.04, 116.48, -14.3, 0.66)
	pt3dadd(-76.86, 115.64, -14.3, 0.66)
	pt3dadd(-79.78, 115.37, -14.45, 0.66)
	pt3dadd(-81.7, 116.36, -14.45, 0.66)
	pt3dadd(-82.78, 116.95, -14.7, 0.66)
	pt3dadd(-84.75, 115.83, -14.7, 0.66)
	pt3dadd(-85.92, 114.71, -14.9, 0.66)
	pt3dadd(-86.34, 114.42, -15, 0.66)
	pt3dadd(-86.57, 114.48, -15, 0.66)
	pt3dadd(-86.66, 114.64, -15, 0.66)
	pt3dadd(-88.06, 119.69, -18.25, 0.51)
	pt3dadd(-88.55, 120.31, -18.25, 0.51)
	pt3dadd(-89.89, 121.46, -17.55, 0.51)
	pt3dadd(-91.37, 122.75, -17.55, 0.51)
	pt3dadd(-94.48, 124.9, -16.55, 0.51)
	pt3dadd(-95.12, 125.61, -15.7, 0.51)
	pt3dadd(-96.23, 126.6, -15.7, 0.51)
	pt3dadd(-97.47, 127.48, -15.2, 0.51)
	pt3dadd(-98.17, 128.02, -15, 0.51)
  }
}
proc shape3d_11() {
  dend[48] {  }
  dend[49] {pt3dclear()
	pt3dadd(-12.4, 66.29, -12.45, 0.73)
	pt3dadd(-13.82, 68.3, -11.25, 0.73)
	pt3dadd(-14.29, 68.67, -11.9, 0.73)
	pt3dadd(-14.98, 69.13, -11.9, 0.73)
	pt3dadd(-16.01, 70.04, -12.95, 0.73)
	pt3dadd(-16.48, 70.33, -13.7, 0.73)
	pt3dadd(-16.78, 70.55, -13.7, 0.73)
	pt3dadd(-17.01, 70.62, -14.3, 0.73)
	pt3dadd(-17.49, 70.15, -14.6, 0.73)
	pt3dadd(-18.1, 69.33, -14.6, 0.73)
	pt3dadd(-18.41, 68.71, -14.7, 0.73)
	pt3dadd(-18.56, 68.62, -14.75, 0.73)
	pt3dadd(-18.7, 68.51, -14.75, 0.73)
	pt3dadd(-20.01, 68.31, -11.2, 0.73)
	pt3dadd(-20.89, 68.23, -11.15, 0.73)
	pt3dadd(-21.36, 68.6, -11.1, 0.73)
	pt3dadd(-22.04, 69.89, -11.65, 0.73)
	pt3dadd(-22.29, 70.21, -11.65, 0.73)
	pt3dadd(-22.42, 71.04, -12.7, 0.73)
	pt3dadd(-22.47, 71.71, -13.8, 0.73)
	pt3dadd(-22.77, 71.94, -14.75, 0.73)
	pt3dadd(-23.09, 72.16, -14.75, 0.73)
	pt3dadd(-23.68, 72.18, -15.7, 0.73)
	pt3dadd(-25.66, 72, -18.3, 0.73)
	pt3dadd(-26.48, 72.18, -18.6, 0.73)
	pt3dadd(-26.93, 72.3, -18.6, 0.73)
	pt3dadd(-27.4, 72.6, -18.6, 0.73)
	pt3dadd(-28.11, 73.28, -18.65, 0.73)
	pt3dadd(-29.24, 74.69, -18.65, 0.73)
	pt3dadd(-29.49, 75.01, -18.65, 0.73)
	pt3dadd(-30.07, 74.97, -18.65, 0.73)
	pt3dadd(-30.85, 74.64, -18.65, 0.73)
	pt3dadd(-31.76, 73.87, -18.65, 0.73)
	pt3dadd(-32.6, 73.2, -18.65, 0.73)
	pt3dadd(-32.58, 72.95, -18.65, 0.73)
	pt3dadd(-34.21, 71.11, -18.75, 0.73)
	pt3dadd(-34.7, 70.81, -18.85, 0.73)
	pt3dadd(-35.92, 71.29, -19.15, 0.73)
	pt3dadd(-38.02, 71.93, -19.45, 0.73)
	pt3dadd(-39.21, 72, -19.45, 0.73)
	pt3dadd(-40.6, 71.86, -19.85, 0.73)
	pt3dadd(-42.15, 71.8, -19.85, 0.73)
	pt3dadd(-43.28, 71.19, -20.05, 0.73)
	pt3dadd(-45.33, 70.99, -20.35, 0.73)
	pt3dadd(-46.46, 70.38, -20.4, 0.73)
	pt3dadd(-47.08, 69.73, -20.4, 0.73)
	pt3dadd(-47.97, 68.73, -20.4, 0.73)
	pt3dadd(-48.44, 68.26, -20.4, 0.73)
	pt3dadd(-49.34, 67.33, -20.4, 0.73)
	pt3dadd(-49.76, 67.03, -20.4, 0.73)
	pt3dadd(-51.14, 66.83, -20.4, 0.73)
	pt3dadd(-52.17, 66.73, -20.4, 0.73)
	pt3dadd(-52.81, 66.5, -20.4, 0.73)
	pt3dadd(-63.08, 68.1, -23.5, 0.73)
	pt3dadd(-63.24, 68.25, -23.5, 0.73)
	pt3dadd(-63.72, 68.72, -23.5, 0.73)
	pt3dadd(-64.11, 69.01, -22.9, 0.73)
	pt3dadd(-66.08, 69.75, -21, 0.73)
	pt3dadd(-66.46, 70.06, -21, 0.73)
	pt3dadd(-67.93, 70.94, -19.6, 0.73)
	pt3dadd(-69.4, 71.89, -19.25, 0.73)
	pt3dadd(-70.24, 72.33, -19.2, 0.73)
	pt3dadd(-72.28, 73.06, -19.2, 0.73)
	pt3dadd(-73.41, 73.46, -19.2, 0.73)
	pt3dadd(-74.67, 74.44, -19.2, 0.73)
	pt3dadd(-75.52, 75.04, -19.2, 0.73)
	pt3dadd(-77.31, 76.3, -19.2, 0.73)
	pt3dadd(-78.15, 76.73, -19.2, 0.73)
	pt3dadd(-78.68, 76.94, -19.2, 0.73)
	pt3dadd(-78.83, 77.07, -19.25, 0.73)
  }
  dend[50] {pt3dclear()
	pt3dadd(2.29, 44.56, -0.3, 1.03)
	pt3dadd(1.94, 47.01, 3.05, 1.03)
	pt3dadd(2, 47.36, 2.4, 1.03)
	pt3dadd(2.09, 48.04, 1.85, 1.03)
	pt3dadd(2.15, 48.29, 1.4, 1.03)
	pt3dadd(2.27, 48.74, 1.4, 1.03)
	pt3dadd(2.32, 48.99, 1, 1.03)
	pt3dadd(2.51, 49.43, 0.4, 1.03)
	pt3dadd(3.27, 50.17, 0.4, 1.03)
	pt3dadd(3.6, 50.55, 0.05, 1.03)
	pt3dadd(3.99, 51.25, -0.1, 1.03)
	pt3dadd(4.11, 51.7, -0.1, 1.03)
	pt3dadd(4.27, 52.46, -0.1, 1.03)
	pt3dadd(4.45, 53.08, -0.1, 1.03)
	pt3dadd(4.5, 53.58, -0.1, 1.03)
	pt3dadd(4.55, 53.76, 0.3, 1.03)
	pt3dadd(5.26, 55.17, 4.25, 1.03)
	pt3dadd(5.18, 56.26, 3.95, 1.03)
	pt3dadd(4.82, 57.16, 3.95, 1.03)
	pt3dadd(4.57, 57.55, 3.25, 1.03)
	pt3dadd(4.61, 58.07, 2.5, 1.03)
	pt3dadd(4.72, 58.51, 2.5, 1.03)
	pt3dadd(4.77, 58.93, 2.05, 1.03)
	pt3dadd(5.09, 59.54, 1.75, 1.03)
	pt3dadd(5.14, 59.88, 1.7, 1.03)
	pt3dadd(5.12, 60.13, 1.7, 1.03)
  }
  dend[51] {pt3dclear()
	pt3dadd(5.12, 60.13, 1.7, 1.03)
	pt3dadd(6.26, 62.77, 2, 1.03)
	pt3dadd(6.43, 63.38, 2, 1.03)
	pt3dadd(6.77, 63.92, 2, 1.03)
	pt3dadd(7.8, 64.87, 2, 1.03)
	pt3dadd(8.62, 65.7, 2.05, 1.03)
	pt3dadd(9.37, 66.61, 2.15, 1.03)
	pt3dadd(9.49, 66.95, 2.15, 1.03)
	pt3dadd(9.81, 67.66, 2.2, 1.03)
	pt3dadd(9.8, 68.67, 2.2, 1.03)
	pt3dadd(10.02, 69.89, 2.2, 1.03)
	pt3dadd(10.31, 70.84, 2.25, 1.03)
	pt3dadd(10.43, 71.27, 2.3, 1.03)
	pt3dadd(13.44, 78.08, -3.3, 0.95)
	pt3dadd(13.66, 78.1, -3.8, 0.95)
	pt3dadd(13.72, 78.35, -3.8, 0.95)
	pt3dadd(14.13, 78.82, -3.8, 0.95)
	pt3dadd(14.6, 79.37, -3.8, 0.95)
	pt3dadd(14.99, 79.99, -3.8, 0.95)
	pt3dadd(15.18, 80.52, -3.45, 0.95)
	pt3dadd(15.24, 80.69, -2.85, 0.95)
	pt3dadd(15.23, 80.94, -2.85, 0.95)
  }
  dend[52] {pt3dclear()
	pt3dadd(15.23, 80.94, -2.85, 0.95)
	pt3dadd(15.74, 82.93, -2, 0.95)
	pt3dadd(15.91, 83.71, -1.85, 0.95)
	pt3dadd(16.41, 84.85, -1.85, 0.95)
	pt3dadd(16.57, 85.62, -1.85, 0.95)
	pt3dadd(16.57, 86.81, -2.55, 0.95)
	pt3dadd(16.18, 87.96, -3.3, 0.95)
	pt3dadd(15.89, 88.94, -3.3, 0.95)
	pt3dadd(15.71, 91.45, -4.6, 0.95)
	pt3dadd(15.38, 91.93, -5.05, 0.95)
	pt3dadd(15.03, 92.75, -5.2, 0.95)
	pt3dadd(14.84, 93.4, -5.2, 0.95)
	pt3dadd(14.66, 94.81, -5.2, 0.95)
	pt3dadd(14.46, 95.47, -5.2, 0.95)
	pt3dadd(14.03, 96.27, -5.2, 0.95)
	pt3dadd(13.87, 96.43, -4.4, 0.95)
	pt3dadd(13.8, 96.43, -4.4, 0.95)
	pt3dadd(12.14, 104.28, 5.15, 0.88)
	pt3dadd(11.64, 105.08, 4.2, 0.88)
	pt3dadd(11.47, 105.41, 4.2, 0.88)
	pt3dadd(11.42, 106, 3.35, 0.88)
	pt3dadd(11.63, 106.28, 2.8, 0.88)
	pt3dadd(11.81, 106.71, 2.8, 0.88)
	pt3dadd(12.02, 106.98, 2.65, 0.88)
	pt3dadd(12.55, 107.71, 2.65, 0.88)
	pt3dadd(12.6, 108.04, 2.65, 0.88)
	pt3dadd(12.19, 109.69, 3.3, 0.88)
	pt3dadd(11.15, 110.94, 3.9, 0.88)
	pt3dadd(10.52, 112.32, 3.9, 0.88)
	pt3dadd(10.21, 113.56, 4.35, 0.88)
	pt3dadd(9.9, 114.79, 4.45, 0.88)
	pt3dadd(9.64, 118.4, 4.4, 0.88)
	pt3dadd(9.41, 119.47, 4.4, 0.88)
	pt3dadd(9.07, 120.21, 3.9, 0.88)
	pt3dadd(8.55, 121.26, 3.65, 0.88)
	pt3dadd(8.09, 122.56, 3.65, 0.88)
	pt3dadd(7.91, 124.99, 3.55, 0.88)
	pt3dadd(8.13, 126.19, 3.55, 0.88)
	pt3dadd(8.3, 126.79, 3.5, 0.88)
	pt3dadd(8.43, 126.97, 3.5, 0.88)
	pt3dadd(10.65, 135.56, 6.05, 0.73)
	pt3dadd(10.33, 136.71, 6.05, 0.73)
	pt3dadd(10.24, 137.97, 5.65, 0.73)
	pt3dadd(9.39, 139.58, 5.65, 0.73)
	pt3dadd(8.8, 140.7, 4.95, 0.73)
	pt3dadd(8.35, 141.75, 4.05, 0.73)
	pt3dadd(7.67, 142.96, 4.05, 0.73)
	pt3dadd(6.45, 144.61, 3.4, 0.73)
	pt3dadd(6, 145.67, 2.95, 0.73)
	pt3dadd(5.73, 146.32, 2.95, 0.73)
	pt3dadd(5.62, 146.98, 2.85, 0.73)
	pt3dadd(5.38, 150.25, 2.85, 0.73)
	pt3dadd(4.84, 151.63, 2.85, 0.73)
	pt3dadd(4.43, 153.28, 2.85, 0.73)
	pt3dadd(4.01, 154.84, 2.85, 0.73)
	pt3dadd(0.97, 161.97, 10.75, 0.73)
	pt3dadd(0.4, 162.75, 10, 0.73)
	pt3dadd(-0.02, 164.41, 10, 0.73)
	pt3dadd(0.44, 166.22, 9.5, 0.73)
	pt3dadd(1.02, 168.39, 9.45, 0.73)
	pt3dadd(1.01, 169.56, 9.45, 0.73)
	pt3dadd(0.97, 171.08, 9.5, 0.73)
	pt3dadd(1.25, 172.28, 9.75, 0.73)
	pt3dadd(1.96, 173.71, 9.75, 0.73)
	pt3dadd(2.34, 174.59, 10.35, 0.73)
	pt3dadd(3.03, 176.26, 10.7, 0.73)
	pt3dadd(3.07, 176.68, 10.7, 0.73)
	pt3dadd(3.05, 176.93, 11, 0.73)
	pt3dadd(7.1, 185.41, 4.45, 0.59)
	pt3dadd(7.2, 185.92, 3.95, 0.59)
	pt3dadd(7.54, 186.38, 3.65, 0.59)
	pt3dadd(8.39, 186.8, 3.65, 0.59)
	pt3dadd(9.64, 186.91, 3.45, 0.59)
	pt3dadd(12.1, 186.47, 3.4, 0.59)
	pt3dadd(14.68, 186.37, 3.4, 0.59)
	pt3dadd(19.15, 186.79, 3.35, 0.59)
  }
  dend[53] {pt3dclear()
	pt3dadd(15.23, 80.94, -2.85, 0.88)
	pt3dadd(16.73, 80.35, 3, 0.88)
	pt3dadd(19.51, 80.61, 1.4, 0.88)
	pt3dadd(19.51, 80.71, 1.4, 0.88)
	pt3dadd(19.88, 81.66, -2.15, 1.03)
	pt3dadd(21.03, 81.95, -2.15, 1.03)
  }
}
proc shape3d_12() {
  dend[53] {	pt3dadd(24.33, 82.25, -1.8, 1.03)
	pt3dadd(25.07, 82.24, -1.4, 1.03)
	pt3dadd(26.01, 82.49, -1.4, 1.03)
	pt3dadd(26.72, 82.81, -1.3, 1.03)
	pt3dadd(27.79, 83.34, -1.3, 1.03)
	pt3dadd(28.44, 83.39, -1.25, 1.03)
	pt3dadd(29.23, 83.81, -1.25, 1.03)
	pt3dadd(29.5, 84.01, -1.25, 1.03)
	pt3dadd(29.57, 84.17, -1.25, 1.03)
	pt3dadd(29.63, 84.27, -1.25, 1.03)
  }
  dend[54] {pt3dclear()
	pt3dadd(29.63, 84.27, -1.25, 1.03)
	pt3dadd(31.65, 85.89, -1.25, 1.03)
	pt3dadd(31.97, 86.68, -1.25, 1.03)
	pt3dadd(32.3, 87.14, -1.25, 1.03)
	pt3dadd(32.67, 88.01, -1.25, 1.03)
	pt3dadd(32.92, 88.79, -1.25, 1.03)
	pt3dadd(33.51, 89.78, -1.25, 1.03)
	pt3dadd(33.75, 90.48, -1.25, 1.03)
	pt3dadd(34.13, 91.27, -1.3, 1.03)
	pt3dadd(34.39, 91.89, -1.35, 1.03)
	pt3dadd(34.66, 93.09, -1.35, 1.03)
	pt3dadd(34.8, 94.2, -1.35, 1.03)
	pt3dadd(34.75, 96.06, -1.4, 1.03)
	pt3dadd(34.56, 98.66, -1.4, 1.03)
	pt3dadd(34.42, 99.57, -1.4, 1.03)
	pt3dadd(34.41, 99.65, -1.4, 1.03)
	pt3dadd(34.95, 106.45, -1.5, 1.03)
	pt3dadd(34.87, 107.54, -1.5, 1.03)
	pt3dadd(34.97, 108.31, -1.45, 1.03)
	pt3dadd(34.9, 109.24, -1.5, 1.03)
	pt3dadd(35.5, 113.46, -4.55, 0.81)
	pt3dadd(35.59, 114.22, -4.55, 0.81)
	pt3dadd(35.68, 114.9, -4.55, 0.81)
	pt3dadd(35.39, 115.98, -4.55, 0.81)
	pt3dadd(34.9, 116.52, -4.55, 0.81)
	pt3dadd(34.12, 117.22, -3.7, 0.81)
	pt3dadd(33.69, 118.01, -2.4, 0.81)
	pt3dadd(33.59, 118.51, -2.4, 0.81)
	pt3dadd(33.54, 119.11, -1.1, 0.81)
	pt3dadd(34.97, 121.76, 0.25, 0.81)
	pt3dadd(34.98, 122.6, 0.4, 0.81)
	pt3dadd(34.82, 123.76, 0.2, 0.81)
	pt3dadd(34.54, 124.58, 0.2, 0.81)
	pt3dadd(34.14, 126.07, -0.5, 0.81)
	pt3dadd(34.1, 126.65, -1.05, 0.81)
	pt3dadd(34.39, 127.78, -1.05, 0.81)
	pt3dadd(34.7, 128.49, -1.3, 0.81)
	pt3dadd(35.01, 129.36, -1.35, 0.81)
	pt3dadd(35.35, 129.82, -1.35, 0.81)
	pt3dadd(36.76, 132.64, -1.35, 0.81)
	pt3dadd(37.49, 133.72, -1.35, 0.81)
	pt3dadd(37.55, 133.81, -1.35, 0.81)
	pt3dadd(40.49, 143.34, 3.65, 0.73)
	pt3dadd(40.46, 143.69, 3.6, 0.73)
	pt3dadd(40.95, 143.98, 2.9, 0.73)
	pt3dadd(41.6, 144.12, 2.9, 0.73)
	pt3dadd(42.18, 144.35, 2.35, 0.73)
	pt3dadd(43.43, 145.31, 1.8, 0.73)
	pt3dadd(43.99, 145.78, 1.6, 0.73)
	pt3dadd(44.41, 146.16, 1.6, 0.73)
	pt3dadd(44.67, 146.6, 1.5, 0.73)
	pt3dadd(45.18, 147.67, 1.5, 0.73)
	pt3dadd(45.49, 148.44, 1.5, 0.73)
	pt3dadd(46.13, 149.78, 1.5, 0.73)
	pt3dadd(46.52, 150.49, 2.05, 0.73)
	pt3dadd(47.19, 151.48, 2.05, 0.73)
	pt3dadd(49.24, 152.69, 2.75, 0.73)
	pt3dadd(49.67, 152.82, 2.75, 0.73)
	pt3dadd(49.75, 152.74, 2.75, 0.73)
	pt3dadd(57.26, 158.85, 2.1, 0.73)
	pt3dadd(57.31, 159.12, 2.1, 0.73)
	pt3dadd(57.3, 159.37, 2.1, 0.73)
	pt3dadd(57.56, 159.9, 2.1, 0.73)
	pt3dadd(57.72, 160.76, 2.1, 0.73)
	pt3dadd(57.76, 161.18, 2.1, 0.73)
	pt3dadd(57.62, 163.11, 2.6, 0.73)
	pt3dadd(58.05, 164.25, 2.6, 0.73)
	pt3dadd(58.52, 164.96, 2.8, 0.73)
	pt3dadd(58.81, 165.92, 2.95, 0.73)
	pt3dadd(59.05, 166.7, 2.95, 0.73)
	pt3dadd(59.26, 167.82, 2.95, 0.73)
	pt3dadd(59.5, 168.69, 2.75, 0.73)
	pt3dadd(59.67, 170.31, 2.75, 0.73)
	pt3dadd(59.68, 171.24, 2.3, 0.73)
	pt3dadd(59.58, 172.57, 2.1, 0.73)
	pt3dadd(59.74, 173.35, 2.1, 0.73)
	pt3dadd(59.94, 173.71, 2.05, 0.73)
	pt3dadd(60.29, 173.99, 2.05, 0.73)
	pt3dadd(60.92, 174.47, 2.05, 0.73)
	pt3dadd(61.85, 174.9, 2.05, 0.73)
	pt3dadd(62.12, 175.25, 2.05, 0.73)
	pt3dadd(62.67, 175.82, 2.05, 0.73)
	pt3dadd(63.14, 176.29, 2.05, 0.73)
	pt3dadd(63.76, 176.93, 2, 0.73)
	pt3dadd(64.16, 177.57, 2, 0.73)
	pt3dadd(64.85, 179.23, 2, 0.73)
	pt3dadd(65.55, 180.73, 2.05, 0.73)
	pt3dadd(67.1, 182.73, 2.05, 0.73)
	pt3dadd(67.83, 183.82, 2.05, 0.73)
	pt3dadd(68.15, 184.51, 2.05, 0.73)
	pt3dadd(70.91, 190.66, 4.45, 0.73)
	pt3dadd(71.36, 191.55, 3.8, 0.73)
	pt3dadd(72.11, 192.46, 3.3, 0.73)
	pt3dadd(72.84, 193.63, 3.3, 0.73)
	pt3dadd(73.11, 195, 2.95, 0.73)
	pt3dadd(73.07, 195.51, 2.75, 0.73)
	pt3dadd(73.54, 196.13, 2.75, 0.73)
	pt3dadd(74.24, 196.54, 2.55, 0.73)
	pt3dadd(74.6, 196.66, 2.45, 0.73)
	pt3dadd(74.66, 196.84, 2.45, 0.73)
	pt3dadd(76.31, 197.41, 2.35, 0.73)
	pt3dadd(80.19, 197.77, 2.3, 0.73)
	pt3dadd(80.69, 198.08, 2.25, 0.73)
	pt3dadd(81.31, 198.64, 2.25, 0.73)
  }
  dend[55] {pt3dclear()
	pt3dadd(29.63, 84.27, -1.25, 0.88)
	pt3dadd(30.62, 82.33, 1.55, 0.88)
	pt3dadd(30.71, 82.17, 1.65, 0.88)
	pt3dadd(31.63, 81.59, 1.65, 0.88)
	pt3dadd(33.29, 80.98, 1.65, 0.88)
	pt3dadd(33.67, 80.93, 1.65, 0.88)
	pt3dadd(35.07, 80.82, 0.9, 0.88)
	pt3dadd(36.54, 80.96, -1.3, 0.88)
	pt3dadd(36.55, 80.79, -2.2, 0.88)
	pt3dadd(36.65, 80.55, -3.05, 0.88)
	pt3dadd(36.79, 80.47, -4.1, 0.88)
	pt3dadd(37.02, 80.41, -5.3, 0.88)
	pt3dadd(37.18, 80.25, -5.55, 0.88)
	pt3dadd(37.7, 80.12, -5.55, 0.88)
	pt3dadd(39.97, 80.34, -6, 0.88)
	pt3dadd(40.54, 80.65, -6, 0.88)
	pt3dadd(41.24, 81.13, -6, 0.88)
	pt3dadd(41.98, 82.14, -6, 0.88)
	pt3dadd(42.58, 83.04, -6, 0.88)
	pt3dadd(42.85, 83.31, -6, 0.88)
	pt3dadd(43.63, 83.72, -6, 0.88)
	pt3dadd(44.21, 83.87, -6, 0.88)
	pt3dadd(45.33, 83.63, -6, 0.88)
	pt3dadd(46.1, 83.28, -6, 0.88)
	pt3dadd(47.73, 83.1, -6, 0.88)
	pt3dadd(48.61, 83.19, -6, 0.88)
	pt3dadd(48.89, 83.37, -5.95, 0.88)
	pt3dadd(49.41, 84.36, -5.95, 0.88)
	pt3dadd(50.51, 85.46, -5.95, 0.88)
	pt3dadd(51.28, 89.07, -10.35, 0.88)
	pt3dadd(51.31, 89.6, -10.4, 0.88)
	pt3dadd(51.63, 90.38, -10.7, 0.88)
	pt3dadd(51.89, 91.75, -10.7, 0.88)
	pt3dadd(52.14, 92.45, -10.9, 0.88)
	pt3dadd(52.74, 93.27, -10.9, 0.88)
	pt3dadd(52.94, 93.54, -11, 0.88)
	pt3dadd(53.48, 94.26, -11, 0.88)
	pt3dadd(53.82, 94.64, -11.05, 0.88)
	pt3dadd(54.14, 95.27, -11.05, 0.88)
	pt3dadd(54.32, 95.86, -11.05, 0.88)
	pt3dadd(54.49, 96.64, -11.05, 0.88)
	pt3dadd(54.52, 97.07, -11.05, 0.88)
	pt3dadd(54.58, 97.41, -11.05, 0.88)
	pt3dadd(54.9, 98.03, -11.05, 0.88)
	pt3dadd(55.1, 98.39, -11.05, 0.88)
	pt3dadd(55.62, 99.19, -11.05, 0.88)
	pt3dadd(56.04, 99.57, -11.05, 0.88)
	pt3dadd(56.51, 100.3, -11.05, 0.88)
	pt3dadd(56.96, 101.1, -11.05, 0.88)
	pt3dadd(57.65, 101.84, -11.05, 0.88)
	pt3dadd(57.92, 102.2, -11, 0.88)
	pt3dadd(58.13, 102.3, -11, 0.88)
	pt3dadd(59.91, 102.04, -11.05, 0.88)
	pt3dadd(60.16, 102.83, -11.05, 0.88)
	pt3dadd(60.34, 103.35, -11.6, 0.88)
	pt3dadd(60.56, 104.39, -11.6, 0.88)
	pt3dadd(60.59, 104.9, -11.95, 0.88)
	pt3dadd(61.02, 106.21, -12.3, 0.88)
	pt3dadd(62.32, 108.52, -12.3, 0.88)
	pt3dadd(62.56, 109.21, -12.45, 0.88)
	pt3dadd(64.32, 111.73, -14.8, 0.88)
	pt3dadd(64.98, 111.8, -15.75, 0.88)
	pt3dadd(65.2, 111.74, -16.4, 0.88)
	pt3dadd(65.95, 111.73, -16.4, 0.88)
	pt3dadd(66.65, 112.05, -16.8, 0.88)
	pt3dadd(67.74, 113.32, -17, 0.88)
	pt3dadd(68.56, 114.32, -17, 0.88)
	pt3dadd(69.39, 115, -17.05, 0.88)
	pt3dadd(70.11, 115.16, -17.05, 0.88)
	pt3dadd(72.07, 115.5, -17.05, 0.88)
	pt3dadd(72.49, 115.88, -17.1, 0.88)
	pt3dadd(72.62, 116.07, -17.15, 0.88)
	pt3dadd(72.76, 116.33, -17.15, 0.88)
	pt3dadd(72.75, 116.41, -17.1, 0.88)
  }
  dend[56] {pt3dclear()
	pt3dadd(72.75, 116.41, -17.1, 0.88)
	pt3dadd(72.21, 117.8, -16.1, 0.88)
	pt3dadd(71.85, 118.51, -16.1, 0.88)
	pt3dadd(71.81, 119.11, -16.15, 0.88)
	pt3dadd(72.86, 120.97, -16.15, 0.88)
	pt3dadd(73.53, 121.8, -16.1, 0.88)
	pt3dadd(74.21, 122.7, -16.1, 0.88)
	pt3dadd(75.27, 124.24, -20.2, 0.88)
	pt3dadd(76.23, 124.33, -20.25, 0.88)
	pt3dadd(77.66, 124.97, -20.25, 0.88)
	pt3dadd(77.78, 125.23, -20.25, 0.88)
	pt3dadd(77.85, 125.33, -20.3, 0.88)
  }
}
proc shape3d_13() {
  dend[56] {	pt3dadd(77.85, 125.41, -20.3, 0.88)
  }
  dend[57] {pt3dclear()
	pt3dadd(77.85, 125.41, -20.3, 0.88)
	pt3dadd(78.9, 127.12, -19.8, 0.88)
	pt3dadd(79.37, 127.67, -19.75, 0.88)
	pt3dadd(80.4, 128.77, -19.75, 0.88)
	pt3dadd(80.54, 128.87, -19.75, 0.88)
	pt3dadd(80.68, 128.96, -19.75, 0.88)
  }
  dend[58] {pt3dclear()
	pt3dadd(80.68, 128.96, -19.75, 0.88)
	pt3dadd(86.1, 131.23, -17, 0.88)
	pt3dadd(86.69, 131.29, -17.55, 0.88)
	pt3dadd(87.49, 131.54, -17.55, 0.88)
	pt3dadd(89.04, 132.36, -18.3, 0.88)
	pt3dadd(89.65, 133.18, -18.9, 0.88)
	pt3dadd(90.22, 134.41, -19.4, 0.88)
	pt3dadd(91.21, 136.1, -19.4, 0.88)
	pt3dadd(92.81, 138.36, -19.85, 0.88)
	pt3dadd(93.54, 139.61, -20.2, 0.88)
	pt3dadd(93.87, 139.99, -20.2, 0.88)
	pt3dadd(94.56, 140.71, -20.4, 0.88)
	pt3dadd(95.1, 141.27, -20.55, 0.88)
	pt3dadd(95.3, 141.64, -20.55, 0.88)
	pt3dadd(95.5, 141.91, -20.6, 0.88)
	pt3dadd(96.21, 142.31, -20.6, 0.88)
	pt3dadd(99.3, 145.38, -20.6, 0.88)
	pt3dadd(99.52, 145.4, -20.6, 0.88)
	pt3dadd(101.03, 144.87, -20.5, 0.88)
	pt3dadd(102.5, 145.01, -20.05, 0.88)
	pt3dadd(103.34, 145.6, -19.95, 0.88)
	pt3dadd(103.89, 146.06, -19.95, 0.88)
	pt3dadd(104.48, 147.13, -19.95, 0.88)
	pt3dadd(104.87, 147.84, -19.95, 0.88)
	pt3dadd(106.14, 149.73, -19.95, 0.88)
	pt3dadd(107.22, 150.94, -20.15, 0.88)
	pt3dadd(108.39, 152.14, -20.45, 0.88)
	pt3dadd(108.45, 152.24, -20.45, 0.88)
	pt3dadd(112.45, 157.77, -23.2, 0.73)
	pt3dadd(113.44, 158.28, -23.25, 0.73)
	pt3dadd(114.43, 158.87, -23.25, 0.73)
	pt3dadd(116.37, 160.5, -23.25, 0.73)
	pt3dadd(116.71, 161.04, -22.85, 0.73)
	pt3dadd(117.34, 162.44, -21.75, 0.73)
	pt3dadd(117.57, 163.3, -21.75, 0.73)
	pt3dadd(118.09, 164.28, -20.85, 0.73)
	pt3dadd(118.62, 165.09, -20.35, 0.73)
	pt3dadd(118.99, 166.06, -20.35, 0.73)
	pt3dadd(119.03, 166.48, -20.05, 0.73)
	pt3dadd(119.36, 167.1, -20, 0.73)
	pt3dadd(119.75, 167.82, -20, 0.73)
	pt3dadd(120.08, 168.34, -20, 0.73)
	pt3dadd(120.41, 168.88, -20, 0.73)
	pt3dadd(120.73, 169.51, -20, 0.73)
	pt3dadd(121.2, 170.22, -19.95, 0.73)
	pt3dadd(121.52, 170.77, -19.95, 0.73)
	pt3dadd(121.87, 171.05, -20, 0.73)
	pt3dadd(122.72, 171.55, -19.95, 0.73)
	pt3dadd(123.13, 171.93, -19.95, 0.73)
	pt3dadd(123.64, 172.15, -19.95, 0.73)
	pt3dadd(123.93, 172.17, -20.05, 0.73)
	pt3dadd(124.69, 172.84, -20.05, 0.73)
	pt3dadd(124.96, 173.11, -20.2, 0.73)
	pt3dadd(126.11, 174.65, -20.25, 0.73)
	pt3dadd(127.65, 175.81, -20.3, 0.73)
	pt3dadd(128.56, 176.32, -20.3, 0.73)
	pt3dadd(130.83, 176.61, -20.3, 0.73)
	pt3dadd(135.47, 181.61, -22.35, 0.73)
	pt3dadd(135.83, 181.73, -22.4, 0.73)
	pt3dadd(137.02, 181.68, -22.4, 0.73)
	pt3dadd(137.32, 181.53, -22.4, 0.73)
	pt3dadd(138.05, 181.52, -21.9, 0.73)
	pt3dadd(138.72, 181.58, -20.7, 0.73)
	pt3dadd(139.64, 181.99, -20.7, 0.73)
	pt3dadd(140.09, 182.88, -19.4, 0.73)
	pt3dadd(140.74, 184.12, -18.55, 0.73)
	pt3dadd(141.18, 185.1, -18.55, 0.73)
	pt3dadd(141.63, 186.15, -18.45, 0.73)
	pt3dadd(141.9, 186.34, -18.45, 0.73)
	pt3dadd(142.26, 186.55, -18.45, 0.73)
	pt3dadd(142.39, 186.64, -18.45, 0.73)
	pt3dadd(142.89, 187.03, -18.45, 0.73)
	pt3dadd(144.3, 187.91, -18.25, 0.73)
	pt3dadd(145, 188.32, -17.8, 0.73)
	pt3dadd(145.64, 188.64, -17.8, 0.73)
	pt3dadd(146.36, 188.96, -16.95, 0.73)
	pt3dadd(147.21, 189.46, -16.1, 0.73)
	pt3dadd(147.89, 190.12, -15.6, 0.73)
	pt3dadd(149.12, 191.41, -15.45, 0.73)
	pt3dadd(150.06, 191.84, -15.45, 0.73)
	pt3dadd(150.98, 192.26, -15.55, 0.73)
	pt3dadd(152.67, 193.27, -16.35, 0.73)
	pt3dadd(152.96, 193.46, -16.35, 0.73)
	pt3dadd(154.65, 193.45, -17.15, 0.73)
	pt3dadd(156.06, 193.25, -17.65, 0.73)
	pt3dadd(156.72, 193.31, -17.65, 0.73)
	pt3dadd(162.14, 193.82, -13.75, 0.73)
	pt3dadd(162.85, 194.14, -13.75, 0.73)
	pt3dadd(163.57, 194.38, -13.75, 0.73)
	pt3dadd(164.89, 194.51, -13.75, 0.73)
	pt3dadd(165.85, 194.49, -13.75, 0.73)
	pt3dadd(167.07, 193.94, -13.85, 0.73)
	pt3dadd(168.38, 193.05, -14, 0.73)
	pt3dadd(170.06, 192.27, -14, 0.73)
	pt3dadd(170.81, 192.09, -14.1, 0.73)
	pt3dadd(173.5, 192.6, -11.65, 0.73)
	pt3dadd(173.89, 192.39, -11.3, 0.73)
	pt3dadd(174.19, 192.24, -11.1, 0.73)
	pt3dadd(174.71, 192.22, -10.95, 0.73)
	pt3dadd(175.22, 192.26, -10.9, 0.73)
  }
  dend[59] {pt3dclear()
	pt3dadd(80.68, 128.96, -19.75, 0.73)
	pt3dadd(81, 129.75, -19.25, 0.73)
	pt3dadd(80.76, 130.15, -17.85, 0.73)
	pt3dadd(80.49, 130.71, -17.65, 0.73)
	pt3dadd(80.15, 131.36, -17.65, 0.73)
	pt3dadd(80.11, 131.86, -17.6, 0.73)
	pt3dadd(80.03, 132.02, -17.6, 0.73)
	pt3dadd(80.16, 133.21, -25.75, 0.95)
	pt3dadd(80.15, 133.38, -25.85, 0.95)
	pt3dadd(79.91, 133.61, -25.85, 0.95)
	pt3dadd(79.74, 133.85, -25.9, 0.95)
	pt3dadd(79.51, 134.08, -26.05, 0.95)
	pt3dadd(79.5, 134.25, -27.15, 0.95)
  }
  dend[60] {pt3dclear()
	pt3dadd(79.5, 134.25, -27.15, 0.95)
	pt3dadd(78.62, 135.26, -27.5, 0.95)
	pt3dadd(78.65, 135.76, -28.5, 0.95)
	pt3dadd(79.18, 136.66, -28.5, 0.95)
	pt3dadd(79.37, 137.1, -29.3, 0.95)
	pt3dadd(79.76, 137.81, -30.4, 0.95)
	pt3dadd(80.08, 138.36, -30.4, 0.95)
	pt3dadd(80.49, 138.89, -31.4, 0.95)
	pt3dadd(79.88, 140.19, -33.8, 0.95)
	pt3dadd(80.05, 140.87, -33.8, 0.95)
	pt3dadd(80.29, 141.66, -33.8, 0.95)
	pt3dadd(80.12, 144.1, -33.8, 0.95)
	pt3dadd(80.48, 145.14, -33.8, 0.95)
	pt3dadd(81.21, 146.13, -34.7, 0.95)
	pt3dadd(81.13, 147.31, -35.15, 0.95)
	pt3dadd(80.53, 148.43, -35.15, 0.95)
	pt3dadd(80.45, 149.53, -35.2, 0.95)
	pt3dadd(80.71, 149.97, -35.2, 0.95)
	pt3dadd(81.11, 150.6, -35.2, 0.95)
	pt3dadd(81.04, 150.58, -35.2, 0.95)
	pt3dadd(81.96, 156.74, -38.1, 0.73)
	pt3dadd(81.86, 158.08, -38.35, 0.73)
	pt3dadd(81.59, 158.82, -38.35, 0.73)
	pt3dadd(81.55, 159.32, -38.3, 0.73)
	pt3dadd(81.73, 159.84, -37.65, 0.73)
	pt3dadd(82.29, 160.31, -36.8, 0.73)
	pt3dadd(82.4, 160.92, -36.8, 0.73)
	pt3dadd(82.32, 162, -36.2, 0.73)
	pt3dadd(82.2, 162.49, -35.85, 0.73)
	pt3dadd(82.05, 163.67, -35.85, 0.73)
	pt3dadd(82.08, 164.27, -35.75, 0.73)
	pt3dadd(82.54, 165.07, -35.7, 0.73)
	pt3dadd(83.03, 165.36, -35.7, 0.73)
	pt3dadd(83.51, 165.91, -36.2, 0.73)
	pt3dadd(83.63, 166.18, -36.2, 0.73)
	pt3dadd(84.46, 168.04, -43.2, 0.73)
	pt3dadd(84.9, 168.15, -43.75, 0.73)
	pt3dadd(85.68, 168.57, -44, 0.73)
	pt3dadd(86.43, 169.22, -44, 0.73)
	pt3dadd(86.49, 169.49, -44.05, 0.73)
	pt3dadd(86.77, 170.69, -44.75, 0.73)
	pt3dadd(86.63, 171.6, -44.75, 0.73)
	pt3dadd(86.62, 171.77, -45.25, 0.73)
	pt3dadd(87.63, 172.12, -45.45, 0.73)
	pt3dadd(87.9, 172.32, -45.45, 0.73)
	pt3dadd(87.97, 172.58, -45.75, 0.73)
	pt3dadd(88.44, 173.05, -45.85, 0.73)
	pt3dadd(89.95, 173.6, -45.85, 0.73)
	pt3dadd(90.01, 173.7, -45.85, 0.73)
	pt3dadd(90.86, 181.12, -49.35, 0.59)
	pt3dadd(91.11, 181.73, -49.5, 0.59)
	pt3dadd(91.11, 182.59, -49.5, 0.59)
	pt3dadd(90.84, 183.32, -49.6, 0.59)
	pt3dadd(90.36, 184.95, -49.7, 0.59)
	pt3dadd(90.35, 186.13, -49.7, 0.59)
	pt3dadd(91, 188.3, -49.7, 0.59)
	pt3dadd(91.08, 189.16, -49.7, 0.59)
	pt3dadd(89.83, 191.15, -49.7, 0.59)
	pt3dadd(89.66, 191.64, -49.7, 0.59)
	pt3dadd(90.14, 192.95, -49.7, 0.59)
	pt3dadd(90.89, 193.86, -49.7, 0.59)
	pt3dadd(91.07, 194.39, -49.7, 0.59)
	pt3dadd(91.01, 195.3, -49.7, 0.59)
  }
  dend[61] {pt3dclear()
	pt3dadd(79.5, 134.25, -27.15, 0.73)
	pt3dadd(78.64, 135.62, -24.85, 0.73)
	pt3dadd(78.35, 135.6, -23.9, 0.73)
	pt3dadd(77.89, 135.89, -23.9, 0.73)
	pt3dadd(77.33, 136.52, -23.55, 0.73)
	pt3dadd(77.16, 136.83, -23.55, 0.73)
	pt3dadd(76.99, 137.07, -23.5, 0.73)
	pt3dadd(76.68, 137.39, -30.85, 0.73)
	pt3dadd(76.53, 137.37, -32.25, 0.73)
	pt3dadd(76.14, 137.66, -33.25, 0.73)
	pt3dadd(75.82, 137.98, -33.25, 0.73)
	pt3dadd(75.79, 138.4, -33.75, 0.73)
	pt3dadd(76.03, 139.1, -34.15, 0.73)
	pt3dadd(76.37, 139.55, -34.15, 0.73)
	pt3dadd(76.34, 139.96, -36, 0.73)
	pt3dadd(76.37, 140.55, -36, 0.73)
	pt3dadd(76.3, 141.49, -38, 0.73)
  }
}
proc shape3d_14() {
  dend[61] {	pt3dadd(76.07, 141.64, -38, 0.73)
	pt3dadd(74.83, 141.52, -38.45, 0.73)
	pt3dadd(74.72, 142.01, -38.45, 0.73)
	pt3dadd(74.82, 142.69, -38.5, 0.73)
	pt3dadd(75.63, 143.7, -38.5, 0.73)
	pt3dadd(75.96, 144.23, -39.9, 0.73)
	pt3dadd(75.91, 144.9, -43.2, 0.73)
	pt3dadd(75.66, 145.31, -43.2, 0.73)
	pt3dadd(74.49, 145.2, -43.55, 0.73)
	pt3dadd(74.17, 145.58, -43.55, 0.73)
	pt3dadd(74.09, 145.67, -43.55, 0.73)
	pt3dadd(73.45, 146.36, -48.95, 0.73)
	pt3dadd(73.36, 146.52, -48.95, 0.73)
	pt3dadd(73.21, 146.68, -49.3, 0.73)
	pt3dadd(72.53, 147.8, -49.3, 0.73)
	pt3dadd(72.28, 148.28, -50.65, 0.73)
	pt3dadd(72.15, 149.02, -52, 0.73)
	pt3dadd(72.13, 149.37, -52, 0.73)
	pt3dadd(72.24, 149.8, -52.6, 0.73)
	pt3dadd(72.57, 150.33, -52.65, 0.73)
	pt3dadd(72.55, 150.58, -52.65, 0.73)
	pt3dadd(72.7, 150.6, -52.7, 0.73)
	pt3dadd(73.4, 150.06, -52.7, 0.73)
	pt3dadd(73.63, 149.92, -58.05, 0.73)
	pt3dadd(73.7, 150.02, -58.5, 0.73)
	pt3dadd(73.89, 150.45, -58.5, 0.73)
	pt3dadd(73.86, 150.87, -58.5, 0.73)
	pt3dadd(74.06, 151.14, -58.5, 0.73)
	pt3dadd(74.41, 151.43, -58.5, 0.73)
	pt3dadd(74.99, 151.56, -58.5, 0.73)
	pt3dadd(75.53, 151.11, -59.8, 0.73)
	pt3dadd(75.78, 150.71, -62, 0.73)
	pt3dadd(75.93, 148.71, -63.75, 0.73)
	pt3dadd(76.15, 148.73, -63.75, 0.73)
	pt3dadd(76.46, 149.5, -63.75, 0.73)
	pt3dadd(76.4, 150.35, -65.35, 0.73)
	pt3dadd(75.81, 151.31, -67.7, 0.73)
	pt3dadd(75.49, 151.7, -69.05, 0.73)
	pt3dadd(75.09, 152.17, -69.05, 0.73)
	pt3dadd(74.84, 152.57, -69.65, 0.73)
	pt3dadd(74.2, 153.27, -69.7, 0.73)
	pt3dadd(73.73, 153.65, -69.7, 0.73)
	pt3dadd(73.58, 153.72, -69.75, 0.73)
	pt3dadd(73.27, 153.93, -69.75, 0.73)
	pt3dadd(73.27, 154.01, -69.75, 0.73)
  }
  dend[62] {pt3dclear()
	pt3dadd(77.85, 125.41, -20.3, 0.73)
	pt3dadd(78.38, 123, -15.8, 0.73)
	pt3dadd(79.41, 123.01, -16.7, 0.73)
	pt3dadd(79.84, 123.14, -17.95, 0.73)
	pt3dadd(80.2, 123.25, -19.3, 0.73)
	pt3dadd(80.42, 123.27, -20.7, 0.73)
	pt3dadd(81.39, 124.21, -23.75, 0.73)
	pt3dadd(81.67, 124.24, -25.95, 0.73)
	pt3dadd(82.1, 124.52, -27.4, 0.73)
	pt3dadd(82.25, 125.39, -28.7, 0.73)
	pt3dadd(82.32, 125.64, -29.45, 0.73)
	pt3dadd(82.75, 125.78, -29.45, 0.73)
	pt3dadd(83.25, 125.9, -29.75, 0.73)
	pt3dadd(83.17, 126.06, -29.75, 0.73)
	pt3dadd(82.92, 126.47, -29.75, 0.73)
	pt3dadd(82.59, 126.86, -29.8, 0.73)
	pt3dadd(82.09, 127.66, -29.9, 0.73)
	pt3dadd(81.91, 128.15, -29.9, 0.73)
	pt3dadd(81.82, 129.4, -32.25, 0.73)
	pt3dadd(81.57, 129.88, -33.1, 0.73)
	pt3dadd(81.25, 130.1, -33.1, 0.73)
	pt3dadd(81.17, 130.26, -33.55, 0.73)
  }
  dend[63] {pt3dclear()
	pt3dadd(72.75, 116.41, -17.1, 0.73)
	pt3dadd(73.76, 114.88, -15.8, 0.73)
	pt3dadd(74.64, 114.96, -18.35, 0.73)
	pt3dadd(74.96, 114.75, -18.35, 0.73)
	pt3dadd(75.64, 114.46, -19.15, 0.73)
	pt3dadd(75.93, 114.5, -19.7, 0.73)
	pt3dadd(75.99, 113.65, -20.05, 0.73)
	pt3dadd(76.17, 113.25, -20.05, 0.73)
	pt3dadd(76.25, 113.17, -20.05, 0.73)
	pt3dadd(76.89, 112.39, -20.05, 0.73)
	pt3dadd(77.14, 111.99, -20.05, 0.73)
	pt3dadd(77.17, 111.57, -19.65, 0.73)
	pt3dadd(78.27, 111.67, -18.35, 0.73)
	pt3dadd(78.78, 111.89, -17.4, 0.73)
	pt3dadd(78.88, 110.48, -17.1, 0.73)
	pt3dadd(79.44, 109.85, -17.1, 0.73)
	pt3dadd(79.67, 109.61, -17.1, 0.73)
	pt3dadd(79.87, 109.04, -16.55, 0.73)
	pt3dadd(79.97, 108.54, -16.55, 0.73)
	pt3dadd(79.98, 108.38, -15.2, 0.73)
	pt3dadd(80.37, 108.15, -15.2, 0.73)
	pt3dadd(81.25, 108.15, -14.05, 0.73)
	pt3dadd(81.45, 108.52, -13.5, 0.73)
	pt3dadd(81.64, 108.95, -13.45, 0.73)
	pt3dadd(81.85, 109.06, -13.45, 0.73)
	pt3dadd(81.95, 108.64, -13.45, 0.73)
	pt3dadd(82.35, 107.33, -13.6, 0.73)
	pt3dadd(82.65, 107.12, -13.6, 0.73)
	pt3dadd(83.29, 107.5, -14.3, 0.73)
	pt3dadd(84.13, 108.09, -15.15, 0.73)
	pt3dadd(85.06, 108.6, -15.95, 0.73)
	pt3dadd(85.34, 108.62, -15.95, 0.73)
	pt3dadd(85.7, 108.83, -16.8, 0.73)
	pt3dadd(85.76, 108.93, -16.8, 0.73)
	pt3dadd(86.47, 109.33, -17.05, 0.73)
	pt3dadd(86.75, 109.52, -17.05, 0.73)
	pt3dadd(87.8, 109.37, -16, 0.73)
	pt3dadd(89.38, 108.84, -16, 0.73)
	pt3dadd(90.45, 109.27, -14.6, 0.73)
	pt3dadd(90.92, 109.91, -13.2, 0.73)
	pt3dadd(91.42, 110.21, -13.2, 0.73)
	pt3dadd(91.62, 110.48, -12.45, 0.73)
	pt3dadd(94.94, 109.44, -9.35, 0.73)
	pt3dadd(95.3, 109.55, -9, 0.73)
	pt3dadd(95.96, 109.62, -8.85, 0.73)
	pt3dadd(96.16, 109.9, -8.8, 0.73)
	pt3dadd(96.33, 109.5, -8.8, 0.73)
	pt3dadd(96.5, 109.25, -9.05, 0.73)
	pt3dadd(97.22, 109.58, -9.05, 0.73)
	pt3dadd(97.83, 110.21, -10.05, 0.73)
	pt3dadd(98.87, 111.16, -10.85, 0.73)
	pt3dadd(99.93, 111.77, -11.35, 0.73)
	pt3dadd(100.49, 112.16, -11.35, 0.73)
	pt3dadd(100.55, 112.24, -11.05, 0.73)
	pt3dadd(101.96, 112.05, -8.55, 0.73)
	pt3dadd(102.33, 112.08, -9.7, 0.73)
	pt3dadd(103.03, 111.64, -10.8, 0.73)
	pt3dadd(103.48, 111.51, -10.8, 0.73)
	pt3dadd(104, 111.56, -11.75, 0.73)
	pt3dadd(104.7, 111.96, -12.15, 0.73)
	pt3dadd(105.6, 112.89, -12.2, 0.73)
	pt3dadd(105.86, 113.25, -11.85, 0.73)
	pt3dadd(106.13, 113.53, -11.85, 0.73)
	pt3dadd(107.18, 113.29, -10.95, 0.73)
	pt3dadd(108.14, 113.38, -9.8, 0.73)
	pt3dadd(107.84, 113.35, -9.8, 0.73)
	pt3dadd(110.42, 113.35, -7.1, 0.73)
	pt3dadd(111.34, 112.84, -7.15, 0.73)
	pt3dadd(112.28, 113.19, -7.25, 0.73)
	pt3dadd(112.63, 113.38, -7.55, 0.73)
	pt3dadd(112.92, 113.4, -7.55, 0.73)
	pt3dadd(113.86, 113.66, -7.95, 0.73)
	pt3dadd(115.2, 114.46, -8.25, 0.73)
	pt3dadd(115.41, 114.65, -8.25, 0.73)
	pt3dadd(116.55, 115.11, -8.5, 0.73)
	pt3dadd(116.77, 115.12, -8.55, 0.73)
	pt3dadd(117.68, 114.87, -8.55, 0.73)
	pt3dadd(117.91, 114.72, -8.55, 0.73)
	pt3dadd(121.25, 113.88, -6.6, 0.73)
	pt3dadd(121.74, 114.26, -6.35, 0.73)
	pt3dadd(122.17, 114.47, -6.4, 0.73)
	pt3dadd(122.9, 114.46, -6.4, 0.73)
	pt3dadd(123.21, 114.23, -7.05, 0.73)
	pt3dadd(123.44, 114.16, -7.95, 0.73)
	pt3dadd(124.98, 114.31, -9.15, 0.73)
	pt3dadd(125.42, 114.27, -9.15, 0.73)
	pt3dadd(125.87, 114.14, -9.15, 0.73)
	pt3dadd(126.68, 114.22, -9.2, 0.73)
	pt3dadd(126.97, 114.24, -8.65, 0.73)
	pt3dadd(127.25, 114.36, -7.85, 0.73)
	pt3dadd(128.5, 114.48, -7.1, 0.73)
	pt3dadd(130.55, 114.68, -5.55, 0.73)
	pt3dadd(130.61, 114.76, -5.3, 0.73)
	pt3dadd(131.22, 114.56, -5.15, 0.73)
	pt3dadd(131.81, 114.62, -5.15, 0.73)
	pt3dadd(131.94, 114.71, -5.15, 0.73)
	pt3dadd(132.9, 114.8, -5.2, 0.73)
	pt3dadd(133.61, 115.12, -5.75, 0.73)
	pt3dadd(135.58, 115.3, -6.3, 0.73)
	pt3dadd(135.59, 115.14, -6.6, 0.73)
	pt3dadd(137.21, 115.29, -6.6, 0.73)
	pt3dadd(137.62, 115.75, -6.6, 0.73)
	pt3dadd(138.71, 116.86, -6.25, 0.73)
	pt3dadd(139.17, 116.74, -5.75, 0.73)
	pt3dadd(139.78, 116.37, -5.6, 0.73)
	pt3dadd(140.6, 116.29, -5.6, 0.73)
	pt3dadd(141.84, 116.41, -5.65, 0.73)
	pt3dadd(142.93, 116.67, -5.65, 0.73)
	pt3dadd(144.38, 116.98, -5.65, 0.73)
	pt3dadd(145.37, 117.58, -6.15, 0.73)
	pt3dadd(146.29, 118.08, -6.65, 0.73)
	pt3dadd(150.68, 118.49, -7.3, 0.73)
	pt3dadd(151.56, 119.6, -4.9, 0.73)
	pt3dadd(151.98, 119.8, -4.85, 0.73)
	pt3dadd(152.22, 119.57, -4.85, 0.73)
	pt3dadd(152.83, 119.29, -4.85, 0.73)
	pt3dadd(153.34, 119.33, -4.85, 0.73)
	pt3dadd(154.14, 119.58, -4.85, 0.73)
	pt3dadd(154.52, 119.45, -4.8, 0.73)
	pt3dadd(155.87, 119.07, -4.8, 0.73)
	pt3dadd(157.18, 119.28, -4.8, 0.73)
	pt3dadd(158.02, 119.87, -4.85, 0.73)
	pt3dadd(158.7, 119.58, -4.85, 0.73)
	pt3dadd(160.45, 118.91, -4.85, 0.73)
	pt3dadd(160.98, 118.79, -4.8, 0.73)
	pt3dadd(162.22, 118.74, -4.8, 0.73)
	pt3dadd(165.9, 117.56, -3.5, 0.66)
	pt3dadd(166.69, 116.79, -3.5, 0.66)
	pt3dadd(168.43, 117.12, -3.25, 0.66)
	pt3dadd(169.05, 117.69, -3.25, 0.66)
	pt3dadd(169.14, 117.61, -1.5, 0.66)
	pt3dadd(169.61, 117.15, -1.2, 0.66)
	pt3dadd(170.34, 117.22, -1.2, 0.66)
  }
}
proc shape3d_15() {
  dend[63] {	pt3dadd(171.37, 117.24, -1.1, 0.66)
	pt3dadd(172.19, 117.15, -1.1, 0.66)
	pt3dadd(174.82, 118.4, -1.1, 0.66)
	pt3dadd(175.44, 119.13, -1.1, 0.66)
	pt3dadd(175.55, 119.56, -1.35, 0.66)
	pt3dadd(177.1, 120.55, -1.7, 0.66)
	pt3dadd(178.34, 120.76, -1.7, 0.66)
	pt3dadd(178.84, 120.96, -1.7, 0.66)
	pt3dadd(181.15, 122.54, -1.55, 0.66)
	pt3dadd(182.12, 122.54, -1.55, 0.66)
	pt3dadd(183.78, 121.85, -1.5, 0.66)
	pt3dadd(186.98, 121.47, -1.5, 0.66)
	pt3dadd(189.8, 121.16, -1.5, 0.66)
	pt3dadd(191.69, 120.65, -1.5, 0.66)
	pt3dadd(192.04, 120.69, -1.5, 0.66)
  }
  dend[64] {pt3dclear()
	pt3dadd(5.12, 60.13, 1.7, 0.81)
	pt3dadd(7.02, 60.81, 4.8, 0.81)
	pt3dadd(7.31, 60.92, 4.9, 0.81)
	pt3dadd(7.52, 60.93, 5, 0.81)
	pt3dadd(7.84, 60.71, 5, 0.81)
	pt3dadd(8.15, 60.49, 5, 0.81)
	pt3dadd(8.55, 60.11, 5.05, 0.81)
	pt3dadd(8.63, 59.94, 5.05, 0.81)
	pt3dadd(9.26, 59.4, 6.7, 0.81)
	pt3dadd(9.56, 59.36, 8.95, 0.81)
	pt3dadd(10.34, 59.68, 8.95, 0.81)
	pt3dadd(10.9, 60.16, 9.25, 0.81)
	pt3dadd(11.33, 60.27, 9.35, 0.81)
	pt3dadd(12.47, 58.86, 9.4, 0.81)
	pt3dadd(13.08, 58.41, 9.4, 0.81)
	pt3dadd(13.89, 58.49, 9.5, 0.81)
	pt3dadd(14.27, 58.36, 10.6, 0.81)
	pt3dadd(14.7, 57.64, 11.6, 0.81)
	pt3dadd(14.95, 57.24, 11.6, 0.81)
	pt3dadd(15.47, 57.05, 11.6, 0.81)
	pt3dadd(15.77, 56.9, 12.65, 0.81)
	pt3dadd(16.14, 56.93, 13, 0.81)
	pt3dadd(16.92, 57.44, 13.15, 0.81)
	pt3dadd(17.41, 57.73, 13.15, 0.81)
	pt3dadd(17.82, 58.11, 13.1, 0.81)
	pt3dadd(18.23, 57.63, 13.2, 0.81)
	pt3dadd(19.19, 56.55, 14, 0.81)
	pt3dadd(19.61, 56.91, 14, 0.81)
	pt3dadd(20.24, 57.32, 14.75, 0.81)
	pt3dadd(20.39, 57.33, 15.2, 0.81)
	pt3dadd(21.01, 56.97, 15.2, 0.81)
	pt3dadd(21.58, 57.2, 15.5, 0.81)
	pt3dadd(22, 57.56, 15.55, 0.81)
	pt3dadd(22.21, 57.67, 15.55, 0.81)
	pt3dadd(24.08, 58.28, 14.55, 0.66)
	pt3dadd(24.1, 58.03, 13.25, 0.66)
	pt3dadd(24.4, 56.96, 13.25, 0.66)
	pt3dadd(25.58, 55.88, 12.75, 0.66)
	pt3dadd(26.16, 55.93, 12.5, 0.66)
	pt3dadd(26.38, 55.96, 12.45, 0.66)
	pt3dadd(26.98, 54.83, 12.45, 0.66)
	pt3dadd(27.37, 54.62, 12.45, 0.66)
	pt3dadd(27.93, 53.99, 12.45, 0.66)
	pt3dadd(29.09, 53.09, 12.85, 0.66)
	pt3dadd(30.27, 53.2, 13.85, 0.66)
	pt3dadd(30.25, 53.45, 13.85, 0.66)
	pt3dadd(30.32, 53.54, 13.85, 0.66)
	pt3dadd(30.44, 53.89, 17.25, 0.66)
	pt3dadd(31.1, 53.95, 17.2, 0.66)
	pt3dadd(32.01, 54.54, 16.35, 0.66)
	pt3dadd(32.14, 54.81, 15.9, 0.66)
	pt3dadd(32.75, 56.47, 15.9, 0.66)
	pt3dadd(33.28, 57.37, 15.9, 0.66)
	pt3dadd(33.83, 57.92, 15.9, 0.66)
	pt3dadd(33.97, 57.94, 15.9, 0.66)
  }
  dend[65] {pt3dclear()
	pt3dadd(33.97, 57.94, 15.9, 0.66)
	pt3dadd(35.48, 60.44, 15.45, 0.66)
	pt3dadd(35.61, 60.78, 15.9, 0.66)
	pt3dadd(35.57, 61.37, 17.35, 0.66)
	pt3dadd(35.48, 61.61, 18.35, 0.66)
	pt3dadd(36.92, 63.1, 21.15, 0.44)
	pt3dadd(36.84, 64.11, 20.25, 0.44)
	pt3dadd(36.51, 64.76, 20.25, 0.44)
	pt3dadd(35.52, 66.01, 19, 0.44)
	pt3dadd(35.05, 66.47, 18.25, 0.44)
	pt3dadd(35.72, 67.37, 17.85, 0.44)
	pt3dadd(36.12, 68.01, 17.75, 0.44)
	pt3dadd(36.15, 69.61, 17.7, 0.44)
	pt3dadd(36.6, 70.58, 17.7, 0.44)
	pt3dadd(38.38, 71.34, 17.7, 0.44)
  }
  dend[66] {pt3dclear()
	pt3dadd(33.97, 57.94, 15.9, 0.44)
	pt3dadd(33.62, 56.64, 16.2, 0.44)
	pt3dadd(33.77, 56.65, 16.2, 0.44)
	pt3dadd(34.29, 56.52, 16.2, 0.44)
	pt3dadd(36.35, 56.72, 16.2, 0.44)
	pt3dadd(36.69, 57.09, 16.2, 0.44)
	pt3dadd(36.68, 57.17, 16.2, 0.44)
	pt3dadd(37.43, 56.99, 10.45, 0.44)
	pt3dadd(38.24, 56.99, 10.2, 0.44)
	pt3dadd(39.64, 57.12, 10.15, 0.44)
	pt3dadd(40.41, 57.53, 10.15, 0.44)
	pt3dadd(40.84, 57.65, 10.15, 0.44)
	pt3dadd(42.24, 58.71, 10.4, 0.44)
	pt3dadd(43.82, 60.38, 10.4, 0.44)
	pt3dadd(44.5, 61.03, 11.25, 0.44)
	pt3dadd(45.22, 62.29, 11.25, 0.44)
	pt3dadd(47.2, 64.58, 11.95, 0.44)
	pt3dadd(47.88, 65.39, 11.95, 0.44)
	pt3dadd(50.57, 66.84, 11.95, 0.44)
	pt3dadd(51.21, 67.15, 11.95, 0.44)
	pt3dadd(51.34, 67.32, 11.95, 0.44)
	pt3dadd(53.54, 71.52, 8.7, 0.44)
	pt3dadd(54.18, 72.84, 8.7, 0.44)
	pt3dadd(55.95, 74.87, 8.7, 0.44)
	pt3dadd(56.56, 75.68, 8.7, 0.44)
	pt3dadd(57.27, 77.02, 8.95, 0.44)
	pt3dadd(57.67, 77.63, 9.65, 0.44)
	pt3dadd(57.93, 78.01, 9.65, 0.44)
	pt3dadd(59.09, 79.38, 13, 0.44)
	pt3dadd(59.73, 79.61, 13, 0.44)
	pt3dadd(60.15, 79.99, 13, 0.44)
	pt3dadd(60.9, 81.74, 12.5, 0.44)
	pt3dadd(61.43, 83.64, 11.8, 0.44)
	pt3dadd(61.81, 85.54, 11.25, 0.44)
	pt3dadd(61.8, 86.64, 11.25, 0.44)
	pt3dadd(61.76, 87.22, 10.9, 0.44)
	pt3dadd(62.13, 88.19, 10.7, 0.44)
	pt3dadd(62.53, 88.81, 10.6, 0.44)
	pt3dadd(63.29, 89.47, 10.6, 0.44)
	pt3dadd(63.71, 89.86, 10.6, 0.44)
	pt3dadd(64.25, 90.48, 10.6, 0.44)
	pt3dadd(64.5, 91.11, 10.55, 0.44)
	pt3dadd(65.12, 92.6, 10.55, 0.44)
	pt3dadd(65.46, 93.14, 10.55, 0.44)
	pt3dadd(65.59, 93.4, 10.55, 0.44)
	pt3dadd(65.72, 93.58, 10.55, 0.44)
	pt3dadd(65.85, 93.85, 10.55, 0.44)
	pt3dadd(65.99, 93.95, 10.55, 0.44)
  }
  dend[67] {pt3dclear()
	pt3dadd(2.29, 44.56, -0.3, 0.66)
	pt3dadd(2.49, 43.16, -1.5, 0.66)
	pt3dadd(3.05, 42.61, -1.55, 0.66)
	pt3dadd(3.51, 42.33, -1.55, 0.66)
	pt3dadd(3.88, 42.28, -1.55, 0.66)
	pt3dadd(4.1, 42.31, 0.15, 0.66)
	pt3dadd(4.37, 41.57, 6.65, 0.88)
	pt3dadd(4.76, 41.27, 7.55, 0.88)
	pt3dadd(5.27, 41.47, 9.15, 0.88)
	pt3dadd(5.69, 41.86, 9.15, 0.88)
	pt3dadd(6.32, 42.25, 10.55, 0.88)
	pt3dadd(7.02, 42.74, 11.5, 0.88)
	pt3dadd(7.73, 43.15, 11.5, 0.88)
	pt3dadd(7.86, 43.24, 11.9, 0.88)
	pt3dadd(7.94, 43.25, 11.9, 0.88)
	pt3dadd(8.87, 43.58, 11.95, 0.88)
	pt3dadd(8.81, 43.42, 16.15, 0.88)
	pt3dadd(8.48, 42.87, 17.25, 0.88)
	pt3dadd(8.03, 42.08, 17.25, 0.88)
	pt3dadd(7.76, 41.55, 17.35, 0.88)
	pt3dadd(7.57, 41.19, 17.4, 0.88)
	pt3dadd(6.99, 40.12, 17.35, 0.88)
	pt3dadd(6.84, 40.03, 17.35, 0.88)
	pt3dadd(5.46, 39.81, 21.95, 0.88)
	pt3dadd(4.79, 38.9, 22.15, 0.88)
	pt3dadd(4.53, 37.44, 22.15, 0.88)
	pt3dadd(4.6, 35.43, 22.15, 0.88)
	pt3dadd(4.68, 34.24, 21.05, 0.88)
	pt3dadd(3.79, 32.48, 19.55, 0.88)
	pt3dadd(3.2, 32.33, 19.55, 0.88)
	pt3dadd(0.39, 28.36, 14.45, 0.73)
	pt3dadd(-0.99, 26.04, 14.45, 0.73)
	pt3dadd(-1.25, 24.75, 14.45, 0.73)
	pt3dadd(-1.49, 22.95, 14.45, 0.73)
	pt3dadd(-1.77, 22.68, 14.95, 0.73)
	pt3dadd(-2.28, 19.5, 17.75, 0.73)
	pt3dadd(-2.7, 18.3, 17.55, 0.73)
	pt3dadd(-2.71, 17.35, 17.05, 0.73)
	pt3dadd(-2.8, 16.59, 16.7, 0.73)
	pt3dadd(-2.8, 16.67, 16.7, 0.73)
  }
  dend[68] {pt3dclear()
	pt3dadd(-0.21, 33.03, -0.2, 0.88)
	pt3dadd(-1.13, 33.2, 1.15, 0.88)
	pt3dadd(-1.43, 33.35, 1.85, 0.88)
	pt3dadd(-1.83, 33.63, 1.85, 0.88)
	pt3dadd(-2.68, 34.15, 1.85, 0.88)
	pt3dadd(-3.16, 34.7, 1.85, 0.88)
	pt3dadd(-3.87, 35.38, 1.85, 0.88)
	pt3dadd(-4.03, 35.54, 1.65, 0.88)
	pt3dadd(-4.19, 35.78, 1.65, 0.88)
	pt3dadd(-4.36, 36.1, 1.3, 0.88)
	pt3dadd(-4.91, 36.65, 1.05, 0.88)
	pt3dadd(-5.4, 37.18, 1.05, 0.88)
	pt3dadd(-5.81, 37.74, 0.8, 0.88)
	pt3dadd(-6.06, 38.22, 0.75, 0.88)
	pt3dadd(-6.14, 38.21, 0.75, 0.88)
  }
  dend[69] {pt3dclear()
	pt3dadd(-6.14, 38.21, 0.75, 0.88)
	pt3dadd(-5.3, 40.9, -1.4, 0.88)
	pt3dadd(-4.97, 41.45, -1.55, 0.88)
	pt3dadd(-5.03, 42.28, -1.55, 0.88)
	pt3dadd(-5.44, 43.93, 6.5, 0.88)
	pt3dadd(-5.44, 43.93, 6.55, 0.88)
  }
  dend[70] {pt3dclear()
	pt3dadd(-5.44, 43.93, 6.55, 0.88)
	pt3dadd(-5.64, 46.61, -0.2, 0.88)
	pt3dadd(-5.65, 47.71, -0.25, 0.88)
	pt3dadd(-5.58, 48.9, -0.25, 0.88)
	pt3dadd(-5.8, 51.91, 0.35, 0.88)
	pt3dadd(-6.67, 53.69, 1.15, 0.88)
  }
}
proc shape3d_16() {
  dend[70] {	pt3dadd(-7.11, 54.66, 2.05, 0.88)
	pt3dadd(-7.44, 55.14, 2.05, 0.88)
	pt3dadd(-7.51, 55.22, 2.05, 0.88)
	pt3dadd(-9.74, 56.43, 3.45, 0.88)
	pt3dadd(-10.88, 57.94, 3.45, 0.88)
	pt3dadd(-12.24, 60.34, 3.3, 0.88)
	pt3dadd(-12.84, 61.62, 2.75, 0.88)
	pt3dadd(-13.36, 63.62, 2.75, 0.88)
	pt3dadd(-13.46, 64.95, 2.25, 0.88)
	pt3dadd(-13.92, 66.43, 2.05, 0.88)
	pt3dadd(-14.07, 66.41, 2.05, 0.88)
	pt3dadd(-14.16, 66.58, 2.05, 0.88)
	pt3dadd(-15.59, 69.83, -4.15, 0.73)
	pt3dadd(-16.81, 71.48, -4.45, 0.73)
	pt3dadd(-17.15, 72.05, -4.45, 0.73)
	pt3dadd(-17.3, 72.2, -4.75, 0.73)
	pt3dadd(-17.45, 72.18, -4.75, 0.73)
	pt3dadd(-18.31, 74.89, -6.7, 0.73)
	pt3dadd(-18.86, 75.43, -7.35, 0.73)
	pt3dadd(-19.1, 75.74, -8, 0.73)
	pt3dadd(-19.89, 76.35, -8.55, 0.73)
	pt3dadd(-20.28, 76.64, -8.55, 0.73)
	pt3dadd(-20.53, 77.05, -9, 0.73)
	pt3dadd(-20.7, 77.45, -9.2, 0.73)
	pt3dadd(-20.81, 77.86, -9.2, 0.73)
  }
  dend[71] {pt3dclear()
	pt3dadd(-5.44, 43.93, 6.55, 0.73)
	pt3dadd(-5.79, 42.32, -0.25, 0.73)
	pt3dadd(-5.74, 41.74, 0.95, 0.73)
	pt3dadd(-6.44, 40.31, 1.9, 0.73)
	pt3dadd(-6.63, 39.79, 2.8, 0.73)
	pt3dadd(-6.97, 39.42, 3.35, 0.73)
	pt3dadd(-7.5, 38.61, 3.35, 0.73)
	pt3dadd(-7.78, 38.42, 3.65, 0.73)
	pt3dadd(-8.21, 38.21, 3.65, 0.73)
	pt3dadd(-8.49, 38.01, 3.85, 0.73)
	pt3dadd(-9.7, 37.31, 0.55, 0.73)
	pt3dadd(-10.86, 37.19, -0.25, 0.73)
	pt3dadd(-11.25, 37.33, -0.7, 0.73)
	pt3dadd(-12.46, 37.89, -0.7, 0.73)
	pt3dadd(-12.84, 38.02, -0.75, 0.73)
	pt3dadd(-13.5, 38.05, -0.75, 0.73)
	pt3dadd(-14.16, 37.98, -0.2, 0.73)
	pt3dadd(-15.23, 37.55, -0.2, 0.73)
	pt3dadd(-16.09, 37.13, 0.95, 0.73)
	pt3dadd(-17.86, 37.06, 1.85, 0.73)
	pt3dadd(-19.86, 37.28, 1.85, 0.73)
	pt3dadd(-25.86, 36.73, 3.85, 0.73)
	pt3dadd(-28.39, 36.99, 3.85, 0.73)
	pt3dadd(-29.13, 37.09, 3.95, 0.73)
	pt3dadd(-30.24, 37.15, 3.95, 0.73)
	pt3dadd(-31.04, 37.07, 3.95, 0.73)
	pt3dadd(-34.72, 36.99, 3.2, 0.73)
	pt3dadd(-35.31, 36.93, 3.2, 0.73)
  }
  dend[72] {pt3dclear()
	pt3dadd(-35.31, 36.93, 3.2, 0.73)
	pt3dadd(-42.69, 43.24, 0.5, 0.73)
	pt3dadd(-42.74, 43.99, 0.45, 0.73)
	pt3dadd(-43.86, 46.08, 0.45, 0.73)
	pt3dadd(-46.06, 49, 0.55, 0.73)
	pt3dadd(-47.29, 51.75, 1.2, 0.73)
	pt3dadd(-47.53, 52.06, 1.2, 0.73)
	pt3dadd(-51.67, 56.11, 2.1, 0.73)
	pt3dadd(-51.79, 57.8, 2.1, 0.73)
	pt3dadd(-52.23, 58.86, 2.3, 0.73)
	pt3dadd(-52.63, 59.31, 3.15, 0.73)
	pt3dadd(-52.7, 59.31, 3.15, 0.73)
	pt3dadd(-53.32, 61.7, 7.1, 0.73)
	pt3dadd(-53.54, 62.7, 7.15, 0.73)
	pt3dadd(-53.65, 64.29, 7.15, 0.73)
	pt3dadd(-53.96, 65.52, 7.25, 0.73)
	pt3dadd(-54.49, 66.74, 7.25, 0.73)
	pt3dadd(-54.85, 67.56, 7.1, 0.73)
	pt3dadd(-55.83, 68.81, 7.1, 0.73)
	pt3dadd(-57, 69.71, 6.6, 0.73)
	pt3dadd(-58.49, 71.01, 6.25, 0.73)
	pt3dadd(-60.04, 72.12, 6.25, 0.73)
	pt3dadd(-60.43, 72.42, 6.1, 0.73)
	pt3dadd(-60.82, 72.55, 6.05, 0.73)
	pt3dadd(-64.8, 75.38, 9.4, 0.59)
	pt3dadd(-66.17, 76.02, 9.4, 0.59)
	pt3dadd(-68.52, 77.98, 9.4, 0.59)
	pt3dadd(-70.49, 78.72, 9, 0.59)
	pt3dadd(-71.09, 78.84, 8.75, 0.59)
	pt3dadd(-71.45, 78.82, 8.75, 0.59)
	pt3dadd(-72.38, 79.31, 8.75, 0.59)
	pt3dadd(-73.55, 80.22, 9.7, 0.59)
	pt3dadd(-74.82, 81.53, 9.7, 0.59)
	pt3dadd(-75.39, 82.23, 10.85, 0.59)
	pt3dadd(-76.04, 83.1, 11.2, 0.59)
	pt3dadd(-76.21, 83.43, 11.25, 0.59)
	pt3dadd(-76.38, 83.65, 11.25, 0.59)
  }
  dend[73] {pt3dclear()
	pt3dadd(-35.31, 36.93, 3.2, 0.66)
	pt3dadd(-37.05, 36.6, 1.85, 0.66)
	pt3dadd(-37.79, 36.53, 3, 0.66)
	pt3dadd(-39.04, 35.57, 3, 0.66)
	pt3dadd(-40.66, 34.48, 3.95, 0.66)
	pt3dadd(-41.23, 34.35, 4.7, 0.66)
	pt3dadd(-44.45, 34.04, 5.45, 0.66)
	pt3dadd(-45.19, 34.06, 5.45, 0.66)
	pt3dadd(-46.07, 33.98, 5.45, 0.66)
	pt3dadd(-46.91, 33.31, 4.9, 0.66)
	pt3dadd(-48.01, 32.2, 4.9, 0.66)
	pt3dadd(-48.7, 31.63, 3.5, 0.66)
	pt3dadd(-51.15, 29.87, -1.85, 0.66)
	pt3dadd(-53, 28.02, -1.85, 0.66)
	pt3dadd(-54.47, 26.87, -1.65, 0.66)
	pt3dadd(-55.15, 26.04, -0.4, 0.66)
	pt3dadd(-55.66, 24.98, -0.4, 0.66)
	pt3dadd(-55.72, 24.73, 0.9, 0.66)
	pt3dadd(-55.72, 24.81, 0.9, 0.66)
	pt3dadd(-54.66, 23.38, 5.55, 0.66)
	pt3dadd(-54.63, 23.05, 6.6, 0.66)
	pt3dadd(-54.82, 22.62, 6.6, 0.66)
	pt3dadd(-54.96, 22.43, 7.8, 0.66)
	pt3dadd(-55.06, 21.82, 8.95, 0.66)
	pt3dadd(-55.84, 20.4, 8.95, 0.66)
	pt3dadd(-56.71, 19.23, 9.7, 0.66)
	pt3dadd(-57.5, 17.71, 9.9, 0.66)
	pt3dadd(-57.73, 16.94, 9.9, 0.66)
	pt3dadd(-57.66, 16.95, 9.9, 0.66)
	pt3dadd(-59.79, 9.82, 8, 0.66)
	pt3dadd(-59.97, 8.21, 7.9, 0.66)
	pt3dadd(-59.91, 7.45, 7.9, 0.66)
	pt3dadd(-59.56, 5.64, 7.85, 0.66)
	pt3dadd(-59.41, 4.54, 7.85, 0.66)
	pt3dadd(-59.38, 3.2, 7.85, 0.66)
	pt3dadd(-59.5, 2.68, 7.85, 0.66)
	pt3dadd(-59.57, 2.68, 7.85, 0.66)
	pt3dadd(-60.18, -2.11, 7.85, 0.66)
	pt3dadd(-60.39, -3.22, 7.85, 0.66)
	pt3dadd(-60.39, -3.31, 7.85, 0.66)
	pt3dadd(-64.07, -8.42, 10.95, 0.59)
	pt3dadd(-64.69, -10, 10.95, 0.59)
	pt3dadd(-65.38, -10.74, 10.5, 0.59)
	pt3dadd(-67.34, -12.1, 9.5, 0.59)
	pt3dadd(-68.21, -13.27, 9.5, 0.59)
	pt3dadd(-68.35, -14.39, 9.35, 0.59)
	pt3dadd(-68.35, -14.48, 9.35, 0.59)
	pt3dadd(-67.64, -18.2, 5.15, 0.59)
	pt3dadd(-68.44, -19.3, 4.1, 0.59)
	pt3dadd(-70.61, -20.85, 3.9, 0.59)
	pt3dadd(-71.21, -21.57, 3.9, 0.59)
	pt3dadd(-72.26, -22.52, 3.9, 0.59)
	pt3dadd(-73.69, -24.17, 3.9, 0.59)
	pt3dadd(-75.38, -26.1, 3.9, 0.59)
	pt3dadd(-75.65, -26.63, 3.9, 0.59)
	pt3dadd(-76.46, -27.55, 4.15, 0.44)
	pt3dadd(-78.02, -29.47, 4.2, 0.44)
	pt3dadd(-78.28, -29.84, 4.25, 0.44)
	pt3dadd(-78.35, -29.92, 4.25, 0.44)
  }
  dend[74] {pt3dclear()
	pt3dadd(-6.14, 38.21, 0.75, 0.44)
	pt3dadd(-5.62, 38.83, 11.05, 0.44)
	pt3dadd(-5.57, 38.99, 9.2, 0.44)
	pt3dadd(-4.94, 39.48, 6.75, 0.44)
	pt3dadd(-4.76, 40.01, 0, 0.44)
	pt3dadd(-4.57, 40.45, -0.35, 0.44)
	pt3dadd(-4.08, 40.92, -0.35, 0.44)
	pt3dadd(-3.33, 41.74, -0.9, 0.44)
	pt3dadd(-0.52, 44.7, -1.55, 0.44)
	pt3dadd(-0.26, 45.07, -1.75, 0.44)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
}

objref all, somatic, axonal, basal
proc subsets() { local i
  objref all, somatic, axonal, basal
  all = new SectionList()
    for i=0, 2 soma[i] all.append()
    axon all.append()
    for i=0, 74 dend[i] all.append()

  somatic = new SectionList()
    for i=0, 2 soma[i] somatic.append()

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

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

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

celldef()