proc celldef() {
  topol()
}

create soma[2], dend[80]

proc topol() { local i
  connect soma[1](0), soma(0)
  for i = 0, 1 connect dend[i](0), soma(0)
  for i = 2, 3 connect dend[i](0), dend[1](1)
  for i = 4, 5 connect dend[i](0), dend[3](1)
  connect dend[6](0), soma(0)
  for i = 7, 8 connect dend[i](0), dend[6](1)
  for i = 9, 10 connect dend[i](0), dend[8](1)
  connect dend[11](0), soma(0)
  for i = 12, 14 connect dend[i](0), dend[i-1](1)
  connect dend[15](0), dend[13](1)
  connect dend[16](0), dend[12](1)
  for i = 17, 18 connect dend[i](0), dend[16](1)
  connect dend[19](0), dend[11](1)
  for i = 20, 22 connect dend[i](0), dend[i-1](1)
  connect dend[23](0), dend[21](1)
  connect dend[24](0), dend[20](1)
  connect dend[25](0), dend[19](1)
  for i = 26, 27 connect dend[i](0), dend[25](1)
  connect dend[28](0), soma(0)
  for i = 29, 30 connect dend[i](0), dend[28](1)
  for i = 31, 32 connect dend[i](0), dend[i-1](1)
  connect dend[33](0), dend[31](1)
  connect dend[34](0), dend[30](1)
  for i = 35, 36 connect dend[i](0), dend[i-1](1)
  connect dend[37](0), dend[35](1)
  connect dend[38](0), dend[34](1)
  for i = 39, 40 connect dend[i](0), dend[i-1](1)
  connect dend[41](0), dend[39](1)
  for i = 42, 43 connect dend[i](0), dend[i-1](1)
  connect dend[44](0), dend[42](1)
  connect dend[45](0), dend[41](1)
  connect dend[46](0), dend[38](1)
  for i = 47, 48 connect dend[i](0), dend[i-1](1)
  connect dend[49](0), dend[47](1)
  connect dend[50](0), dend[46](1)
  connect dend[51](0), soma(0)
  for i = 52, 53 connect dend[i](0), dend[51](1)
  for i = 54, 55 connect dend[i](0), dend[i-1](1)
  connect dend[56](0), dend[54](1)
  for i = 57, 58 connect dend[i](0), dend[56](1)
  connect dend[59](0), dend[53](1)
  for i = 60, 61 connect dend[i](0), dend[59](1)
  connect dend[62](0), soma(0)
  for i = 63, 64 connect dend[i](0), dend[62](1)
  connect dend[65](0), soma(0)
  for i = 66, 70 connect dend[i](0), dend[i-1](1)
  connect dend[71](0), dend[69](1)
  connect dend[72](0), dend[68](1)
  connect dend[73](0), dend[67](1)
  for i = 74, 75 connect dend[i](0), dend[73](1)
  connect dend[76](0), dend[66](1)
  connect dend[77](0), dend[65](1)
  for i = 78, 79 connect dend[i](0), soma(0)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 69.676)
	pt3dadd(-8.91, -3.56, 8.01, 69.676)
  }
  soma[1] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 69.676)
	pt3dadd(-8.91, -73.24, 8.01, 69.676)
  }
  dend {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 8.8)
	pt3dadd(-17.5, -45.5, 9, 8.8)
	pt3dadd(-11.5, -45, 24.5, 8.1)
	pt3dadd(-9.5, -45.5, 25, 8.1)
	pt3dadd(-5.5, -45.5, 27.5, 7.6)
	pt3dadd(-1, -46.5, 45, 7.6)
	pt3dadd(1.5, -47, 45.5, 7.4)
	pt3dadd(4, -48.5, 56.5, 7.3)
	pt3dadd(7.5, -50.5, 59, 7.9)
	pt3dadd(10.5, -51.5, 63.5, 7.9)
	pt3dadd(14, -53, 75, 8)
  }
  dend[1] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 12.9)
	pt3dadd(-23, -51.5, 12.5, 12.9)
	pt3dadd(-28, -53.5, 16.5, 12.9)
	pt3dadd(-31, -57.5, 19.5, 11.7)
	pt3dadd(-34.5, -60, 25, 11.2)
	pt3dadd(-36.5, -65.5, 38, 11.7)
  }
  dend[2] {pt3dclear()
	pt3dadd(-36.5, -65.5, 38, 11.7)
	pt3dadd(-30.5, -69, 46, 5.4)
	pt3dadd(-29.5, -72, 47.5, 5.4)
	pt3dadd(-31, -75.5, 51, 4.8)
	pt3dadd(-32, -78, 52, 5.6)
	pt3dadd(-33.5, -80.5, 53.5, 5.6)
	pt3dadd(-34.5, -83, 57.5, 5.6)
	pt3dadd(-34.5, -85, 58.5, 5)
	pt3dadd(-35, -87.5, 64.5, 4.8)
	pt3dadd(-33.5, -91, 66, 4.8)
	pt3dadd(-32.5, -93, 72.5, 5.3)
	pt3dadd(-32.5, -95, 73.5, 6)
	pt3dadd(-31, -98, 75, 6)
  }
  dend[3] {pt3dclear()
	pt3dadd(-36.5, -65.5, 38, 11.7)
	pt3dadd(-38, -72, 36, 8.4)
	pt3dadd(-40, -75, 36, 7.8)
	pt3dadd(-41.5, -78.5, 36, 7.3)
	pt3dadd(-43.5, -82.5, 36, 6.6)
	pt3dadd(-45, -85.5, 36, 6.6)
	pt3dadd(-46.5, -88.5, 38, 7.1)
	pt3dadd(-48, -93, 34, 6.5)
	pt3dadd(-49, -97.5, 31.5, 5.5)
	pt3dadd(-49.5, -102, 31.5, 5.1)
	pt3dadd(-51.5, -105.5, 36, 5.1)
	pt3dadd(-54, -109, 36, 5.3)
	pt3dadd(-56, -112.5, 36, 4.8)
	pt3dadd(-57.5, -116.5, 38.5, 4.5)
	pt3dadd(-59, -118.5, 41, 4.8)
	pt3dadd(-60.5, -122.5, 41, 4.8)
	pt3dadd(-62, -125, 41, 4.8)
	pt3dadd(-64, -128, 43, 4.8)
	pt3dadd(-65.5, -131, 45, 5.2)
	pt3dadd(-67, -134, 45, 5.4)
	pt3dadd(-68.5, -138, 51.5, 6.5)
  }
  dend[4] {pt3dclear()
	pt3dadd(-68.5, -138, 51.5, 6.5)
	pt3dadd(-66, -141.5, 50, 4.1)
	pt3dadd(-65, -143.5, 51, 4.1)
	pt3dadd(-65, -146.5, 52.5, 3.7)
	pt3dadd(-65.5, -148.5, 53.5, 3.3)
	pt3dadd(-66, -150.5, 54, 3.7)
	pt3dadd(-67, -154, 58, 3.4)
	pt3dadd(-68.5, -156, 59, 4.1)
	pt3dadd(-70, -158.5, 63, 4.1)
	pt3dadd(-71, -160.5, 64, 3.7)
	pt3dadd(-71, -163, 65, 4)
	pt3dadd(-71, -165.5, 66, 3.2)
	pt3dadd(-71.5, -167, 66.5, 3.2)
	pt3dadd(-71.5, -169.5, 68, 3.6)
	pt3dadd(-70, -172, 75, 4.2)
  }
  dend[5] {pt3dclear()
	pt3dadd(-68.5, -138, 51.5, 6.5)
	pt3dadd(-71.5, -141.5, 50.5, 3.3)
	pt3dadd(-72.5, -143, 58, 3.3)
	pt3dadd(-72.5, -145.5, 35, 3.3)
	pt3dadd(-73, -148, 35, 3.8)
	pt3dadd(-73.5, -149.5, 38, 3.7)
	pt3dadd(-75, -152.5, 35.5, 3.2)
	pt3dadd(-76, -156, 32.5, 3.2)
	pt3dadd(-77.5, -158.5, 34, 3.4)
	pt3dadd(-79, -161.5, 33.5, 3.7)
	pt3dadd(-80, -165, 33, 3.5)
	pt3dadd(-81, -167.5, 32.5, 4.1)
	pt3dadd(-82, -171, 33.5, 4.1)
	pt3dadd(-83, -175, 33, 4.4)
	pt3dadd(-84.5, -176.5, 30.5, 4.3)
	pt3dadd(-86.5, -178.5, 30, 4.6)
	pt3dadd(-87.5, -179, 25, 5.2)
  }
  dend[6] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 10)
	pt3dadd(10, -21, 17, 10)
	pt3dadd(10, -16, 24, 10)
	pt3dadd(10, -15.5, 15.5, 10)
	pt3dadd(10, -11, 20.5, 10)
	pt3dadd(10, -7, 19.5, 10.8)
	pt3dadd(9.5, -3, 21, 11.4)
	pt3dadd(8.5, 0.5, 21, 12.8)
	pt3dadd(8.5, 2.5, 22.5, 14.1)
  }
  dend[7] {pt3dclear()
	pt3dadd(8.5, 2.5, 22.5, 14.1)
	pt3dadd(5.5, 7, 20.5, 6.1)
	pt3dadd(3.5, 10.5, 25, 5.6)
	pt3dadd(4.5, 13, 28.5, 3)
	pt3dadd(4.5, 16.5, 28, 3)
	pt3dadd(4.5, 18, 28, 3)
	pt3dadd(2.5, 21.5, 27.5, 3.1)
	pt3dadd(1, 24.5, 29.5, 3.1)
	pt3dadd(-0.5, 27, 29.5, 3.1)
	pt3dadd(-0.5, 29.5, 29, 3.3)
	pt3dadd(-2, 33.5, 31, 4)
	pt3dadd(-3, 37, 32.5, 4)
	pt3dadd(-4, 41, 32, 3)
	pt3dadd(-4, 43, 32, 4.8)
	pt3dadd(-4, 46, 34, 5.1)
	pt3dadd(-5, 48, 31, 5.5)
	pt3dadd(-5, 50, 33.5, 6)
	pt3dadd(-5, 53, 33, 4)
	pt3dadd(-5, 55, 35, 3.1)
	pt3dadd(-5, 58, 34.5, 2.8)
	pt3dadd(-5, 61.5, 34.5, 2.8)
	pt3dadd(-5.5, 65, 29.5, 3)
	pt3dadd(-6, 68.5, 29, 2.6)
	pt3dadd(-6, 71.5, 29, 2.6)
	pt3dadd(-6, 74, 24.5, 2.8)
	pt3dadd(-6.5, 77.5, 30, 3.3)
	pt3dadd(-7, 80.5, 30, 3.3)
	pt3dadd(-5.5, 82.5, 29.5, 3.3)
	pt3dadd(-6.5, 85.5, 31.5, 3.2)
	pt3dadd(-8, 88, 31, 3)
	pt3dadd(-9.5, 90, 29, 2.7)
	pt3dadd(-9, 92, 28.5, 3.1)
	pt3dadd(-9, 96, 28.5, 3.2)
	pt3dadd(-9.5, 98.5, 25.5, 3.2)
	pt3dadd(-10.5, 100, 29.5, 3.2)
	pt3dadd(-10.5, 103, 29.5, 2.7)
	pt3dadd(-12.5, 106, 27, 2.8)
	pt3dadd(-13.5, 109.5, 26.5, 3.4)
	pt3dadd(-14.5, 112.5, 26.5, 2.9)
	pt3dadd(-15.5, 116, 26, 2.8)
	pt3dadd(-15.5, 119, 25.5, 2.8)
	pt3dadd(-15.5, 121, 25.5, 2.5)
	pt3dadd(-15.5, 123, 25.5, 2.7)
	pt3dadd(-17.5, 125, 27, 3)
	pt3dadd(-20, 126.5, 25, 3.2)
  }
  dend[8] {pt3dclear()
	pt3dadd(8.5, 2.5, 22.5, 14.1)
	pt3dadd(13.5, 7.5, 23, 9.1)
	pt3dadd(13.5, 10.5, 24, 7.6)
	pt3dadd(13.5, 12.5, 25, 7.6)
	pt3dadd(13.5, 17, 25.5, 7.5)
	pt3dadd(15.5, 20.5, 26.5, 7.5)
	pt3dadd(15.5, 22.5, 31.5, 8.2)
	pt3dadd(15.5, 27.5, 32.5, 7.7)
	pt3dadd(15.5, 30.5, 33, 6.7)
	pt3dadd(15, 33.5, 31.5, 6.7)
	pt3dadd(15, 36.5, 34.5, 6.7)
	pt3dadd(15, 39, 37.5, 6.1)
	pt3dadd(15, 43, 40.5, 5.2)
	pt3dadd(16, 46.5, 39, 5.4)
	pt3dadd(16, 49.5, 39.5, 5.4)
	pt3dadd(16, 50.5, 44.5, 5.9)
  }
  dend[9] {pt3dclear()
	pt3dadd(16, 50.5, 44.5, 5.9)
	pt3dadd(15, 52, 57, 5)
	pt3dadd(15, 55.5, 58.5, 5)
	pt3dadd(18.5, 57.5, 58, 5.1)
	pt3dadd(21.5, 57.5, 62, 6.3)
	pt3dadd(24.5, 58, 63, 6.1)
	pt3dadd(26.5, 60, 62, 5.2)
	pt3dadd(27, 62.5, 75, 4.3)
  }
  dend[10] {pt3dclear()
	pt3dadd(16, 50.5, 44.5, 5.9)
	pt3dadd(16, 56, 45.5, 3.7)
	pt3dadd(16, 59.5, 44, 4)
	pt3dadd(16, 63, 44.5, 4.1)
	pt3dadd(17.5, 67.5, 47.5, 4.1)
	pt3dadd(17.5, 70.5, 48, 4.1)
	pt3dadd(17.5, 73.5, 48.5, 4.1)
	pt3dadd(17.5, 76, 49, 3.8)
	pt3dadd(17.5, 79.5, 47.5, 4.1)
	pt3dadd(17.5, 82, 50, 4.1)
	pt3dadd(17.5, 85, 48.5, 3.8)
	pt3dadd(17.5, 90, 61.5, 3.8)
	pt3dadd(17.5, 93.5, 64, 3.4)
	pt3dadd(18.5, 96.5, 57, 3.4)
	pt3dadd(18.5, 99, 61.5, 3.4)
	pt3dadd(20, 102.5, 62.5, 3.7)
	pt3dadd(20, 104, 62.5, 3.7)
	pt3dadd(20, 107.5, 63, 4)
	pt3dadd(21.5, 111.5, 63.5, 4)
	pt3dadd(23.5, 116, 64.5, 3.4)
	pt3dadd(24.5, 120, 65, 3.4)
	pt3dadd(25.5, 123, 65.5, 3.6)
	pt3dadd(27, 126, 66, 3.6)
	pt3dadd(27, 129, 66.5, 3.6)
	pt3dadd(28, 133, 72, 3.6)
	pt3dadd(28, 136.5, 75, 3.6)
  }
  dend[11] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 13.5)
	pt3dadd(11, 0.5, 1, 13.5)
	pt3dadd(15, 5, 2.5, 10.4)
	pt3dadd(18.5, 8.5, 3, 9.3)
	pt3dadd(22, 13, 3, 8.1)
	pt3dadd(24.5, 17.5, 3, 7.3)
	pt3dadd(27, 22, 1.5, 6.9)
	pt3dadd(29.5, 27, 1.5, 7.3)
	pt3dadd(32, 31, 1.5, 7.6)
  }
}
proc shape3d_2() {
  dend[11] {  }
  dend[12] {pt3dclear()
	pt3dadd(32, 31, 1.5, 7.6)
	pt3dadd(34.5, 38.5, 10, 5.9)
	pt3dadd(36.5, 43, 10.5, 5.9)
	pt3dadd(38, 46.5, 10.5, 5.7)
	pt3dadd(38.5, 50, 11, 5.7)
	pt3dadd(40.5, 53, 16, 5.7)
  }
  dend[13] {pt3dclear()
	pt3dadd(40.5, 53, 16, 5.7)
	pt3dadd(43.5, 54.5, 8, 5)
	pt3dadd(47, 58, 8, 5)
	pt3dadd(51, 60.5, 8, 4.4)
	pt3dadd(53.5, 63.5, 8, 4.4)
	pt3dadd(56.5, 66, 8, 4.4)
	pt3dadd(58.5, 69, 6, 4.7)
	pt3dadd(61.5, 73, 4.5, 5.2)
	pt3dadd(63.5, 76, 8, 5.5)
	pt3dadd(67, 80, 8, 5.5)
	pt3dadd(70, 84, 6, 5.2)
	pt3dadd(72.5, 88.5, 8, 5)
	pt3dadd(75, 92.5, 8, 5.6)
	pt3dadd(77.5, 96, 8, 5)
	pt3dadd(78.5, 99.5, 8, 5)
	pt3dadd(81.5, 102, 6, 4.8)
	pt3dadd(83.5, 105, 6, 5.3)
	pt3dadd(84.5, 107, 4.5, 5.7)
	pt3dadd(87.5, 110.5, 4.5, 5.3)
	pt3dadd(89.5, 113.5, 4.5, 4.7)
	pt3dadd(91.5, 117, 4.5, 4.3)
	pt3dadd(93.5, 119, 4.5, 4.9)
	pt3dadd(95, 123, 3, 5.6)
  }
  dend[14] {pt3dclear()
	pt3dadd(95, 123, 3, 5.6)
	pt3dadd(95.5, 126.5, 4.5, 3.4)
	pt3dadd(98, 130.5, 4, 3.4)
	pt3dadd(100, 133.5, 4, 3.4)
	pt3dadd(101.5, 135.5, 2.5, 3.6)
	pt3dadd(104, 139, 0.5, 3.2)
	pt3dadd(106.5, 142, 0.5, 3.4)
	pt3dadd(109, 147, 0, 3.6)
	pt3dadd(110.5, 151, 0, 3.6)
	pt3dadd(112, 154, 0, 3.7)
	pt3dadd(113.5, 156.5, 0, 3.7)
	pt3dadd(114, 158.5, 0, 3.2)
	pt3dadd(115.5, 160.5, 0, 3.2)
	pt3dadd(116.5, 163, -2.5, 3.5)
	pt3dadd(118, 166.5, -2.5, 3.3)
	pt3dadd(119.5, 168.5, -2.5, 3.7)
	pt3dadd(121, 171, -1, 4)
	pt3dadd(121, 174.5, -3, 3.5)
	pt3dadd(123, 178, -3.5, 3.2)
	pt3dadd(124.5, 182, -5, 3.2)
	pt3dadd(125.5, 186, -2, 3.5)
	pt3dadd(128, 189, -2, 3.5)
	pt3dadd(130, 192.5, -2, 3.5)
	pt3dadd(130, 195, -2.5, 3.5)
	pt3dadd(131.5, 198.5, -4.5, 3.7)
	pt3dadd(133, 202, -4.5, 4.1)
	pt3dadd(135, 205.5, -6.5, 4)
	pt3dadd(136.5, 209, -0.5, 4.8)
	pt3dadd(138, 211, -2, 4.2)
	pt3dadd(141, 216, -6, 3.7)
	pt3dadd(142, 220, -7.5, 4)
	pt3dadd(142.5, 224, -1.5, 4.2)
	pt3dadd(144, 227, -3, 4.6)
	pt3dadd(146, 231, -3.5, 4.5)
	pt3dadd(148.5, 237.5, -5.5, 4.5)
	pt3dadd(150, 241.5, -7.5, 4.5)
	pt3dadd(152, 245.5, -9.5, 4.8)
	pt3dadd(154, 250, -8, 4.7)
	pt3dadd(155.5, 254.5, -12, 4.1)
	pt3dadd(155.5, 259, -10, 4.1)
	pt3dadd(157.5, 263, -10.5, 4.8)
	pt3dadd(159, 267.5, -10.5, 4)
	pt3dadd(161.5, 271, -11, 3.9)
	pt3dadd(163.5, 275, -13, 3.4)
	pt3dadd(163.5, 278, -13, 3.4)
	pt3dadd(166, 281, -13.5, 3.9)
	pt3dadd(167, 284, -13.5, 4.8)
	pt3dadd(168.5, 287.5, -14, 4.8)
	pt3dadd(168.5, 289.5, -14, 3.5)
	pt3dadd(170, 292.5, -14, 3.9)
	pt3dadd(172.5, 296, -14.5, 3.9)
	pt3dadd(173.5, 299.5, -16, 3.8)
	pt3dadd(174.5, 302.5, -17.5, 4.1)
	pt3dadd(175.5, 306.5, -20, 4.1)
	pt3dadd(177.5, 310, -20, 3.7)
	pt3dadd(178, 314, -20.5, 4.1)
	pt3dadd(179, 317.5, -22, 4.1)
	pt3dadd(180.5, 321.5, -17.5, 4.5)
	pt3dadd(182, 326, -17.5, 4.5)
	pt3dadd(183.5, 329.5, -19.5, 3.4)
	pt3dadd(183.5, 333, -19.5, 3.7)
	pt3dadd(184, 334, -25, 3.7)
	pt3dadd(185.5, 337, -22, 3.4)
	pt3dadd(185.5, 340, -25.5, 3.4)
	pt3dadd(185.5, 342.5, -23, 3.9)
	pt3dadd(187.5, 347, -21, 5.4)
	pt3dadd(189, 351, -27, 5)
	pt3dadd(190.5, 355.5, -27.5, 4.4)
	pt3dadd(192.5, 360, -28, 4.5)
	pt3dadd(193.5, 364, -34, 4.1)
	pt3dadd(195, 368.5, -32, 3.8)
	pt3dadd(198, 373.5, -32.5, 4.5)
	pt3dadd(200, 379.5, -33, 3.7)
	pt3dadd(200.5, 384.5, -33.5, 4.1)
	pt3dadd(202, 389.5, -34, 3.4)
	pt3dadd(203.5, 395.5, -34.5, 3.7)
	pt3dadd(205, 400, -44, 3.7)
	pt3dadd(207, 405, -47.5, 4.1)
	pt3dadd(208, 408, -50.5, 4.3)
	pt3dadd(208, 410.5, -50.5, 3.6)
	pt3dadd(208.5, 415, -54, 3.5)
	pt3dadd(210.5, 419, -49.5, 4.1)
	pt3dadd(210.5, 421.5, -49.5, 3.4)
	pt3dadd(212, 424, -50, 4.1)
	pt3dadd(213, 427, -52.5, 3.7)
	pt3dadd(213.5, 430, -53, 3.7)
	pt3dadd(215.5, 432, -53.5, 3.7)
	pt3dadd(216.5, 434.5, -53.5, 4.1)
	pt3dadd(217, 437, -54, 3.7)
	pt3dadd(218, 440, -54, 3.5)
	pt3dadd(220, 442, -54.5, 3.8)
	pt3dadd(221.5, 446, -54.5, 3.8)
	pt3dadd(222.5, 450, -61, 4.3)
	pt3dadd(222, 453.5, -59, 5)
	pt3dadd(222.5, 455.5, -61.5, 5.5)
	pt3dadd(223, 458.5, -65, 5)
	pt3dadd(223.5, 461, -65.5, 4)
	pt3dadd(226, 463.5, -62.5, 4)
	pt3dadd(227.5, 465.5, -63, 4.3)
	pt3dadd(228, 469.5, -63.5, 4.5)
	pt3dadd(229, 471.5, -63.5, 4.5)
	pt3dadd(229.5, 474, -64, 3.8)
	pt3dadd(230, 477, -70, 5.1)
	pt3dadd(230, 479.5, -70, 5.6)
	pt3dadd(231.5, 482.5, -76, 5.3)
	pt3dadd(232.5, 485, -71.5, 4.5)
	pt3dadd(234.5, 488, -75, 4.5)
  }
  dend[15] {pt3dclear()
	pt3dadd(95, 123, 3, 5.6)
	pt3dadd(100, 124, 19.5, 3.5)
	pt3dadd(102, 126, 20.5, 3.3)
	pt3dadd(105, 127.5, 23.5, 2.3)
	pt3dadd(107.5, 128, 25, 2.3)
	pt3dadd(110, 130.5, 25.5, 2.6)
	pt3dadd(111, 132, 26, 2.8)
	pt3dadd(113, 135, 29, 3)
	pt3dadd(114, 136, 29.5, 3)
	pt3dadd(116, 137, 32.5, 3)
	pt3dadd(118, 139, 29.5, 3)
	pt3dadd(119.5, 141, 30, 3)
	pt3dadd(120.5, 143.5, 31, 2.3)
	pt3dadd(121.5, 143.5, 33.5, 2.3)
	pt3dadd(123.5, 144.5, 34, 2.3)
	pt3dadd(125.5, 146.5, 33, 2.5)
	pt3dadd(126.5, 147.5, 33.5, 2.2)
	pt3dadd(128.5, 148.5, 34, 2.4)
	pt3dadd(131, 148.5, 37, 2.4)
	pt3dadd(133.5, 148.5, 37.5, 2.4)
	pt3dadd(135, 148.5, 38, 2.4)
	pt3dadd(137.5, 148, 40.5, 2.5)
	pt3dadd(140, 148, 46.5, 2.5)
	pt3dadd(142.5, 148, 43.5, 2.6)
	pt3dadd(144, 148.5, 46.5, 2.6)
	pt3dadd(147, 150, 47.5, 2.6)
	pt3dadd(148.5, 151.5, 48, 2.2)
	pt3dadd(150.5, 151.5, 50.5, 2.5)
	pt3dadd(152.5, 150.5, 49.5, 3)
	pt3dadd(153, 147, 60.5, 2.8)
	pt3dadd(152.5, 145, 63, 2.8)
	pt3dadd(152.5, 143, 63.5, 2.5)
	pt3dadd(154, 141, 64, 3.2)
	pt3dadd(155.5, 138, 63, 3)
	pt3dadd(157, 136.5, 62, 3)
	pt3dadd(159, 136.5, 62.5, 2.2)
	pt3dadd(161, 135.5, 63, 2.2)
	pt3dadd(163, 135.5, 63.5, 2.6)
	pt3dadd(164.5, 135.5, 64, 2.6)
	pt3dadd(166.5, 136.5, 69, 2.6)
	pt3dadd(168.5, 136.5, 72.5, 3)
	pt3dadd(170.5, 136, 73, 2.6)
	pt3dadd(172.5, 137, 73.5, 2.6)
	pt3dadd(175, 137, 74.5, 2.6)
	pt3dadd(177, 137, 75, 2)
	pt3dadd(178, 135.5, 75, 2.6)
	pt3dadd(179, 132.5, 76, 2.6)
	pt3dadd(180, 131.5, 76.5, 2.6)
	pt3dadd(182, 131.5, 75, 2.9)
  }
  dend[16] {pt3dclear()
	pt3dadd(40.5, 53, 16, 5.7)
	pt3dadd(40.5, 55.5, 25, 6.3)
	pt3dadd(40.5, 60.5, 33, 8.4)
	pt3dadd(42, 64, 28, 10.3)
	pt3dadd(42, 65.5, 34, 11)
  }
  dend[17] {pt3dclear()
	pt3dadd(42, 65.5, 34, 11)
	pt3dadd(38, 69.5, 36, 5.3)
	pt3dadd(36.5, 73, 38, 4.7)
	pt3dadd(36.5, 77.5, 36.5, 4.1)
	pt3dadd(36, 80.5, 34.5, 3.5)
	pt3dadd(35.5, 83, 34.5, 3.6)
	pt3dadd(35.5, 86.5, 34.5, 3.8)
	pt3dadd(34.5, 91, 32.5, 4.2)
	pt3dadd(35, 96, 37, 4.1)
	pt3dadd(35, 100, 35.5, 4.1)
  }
}
proc shape3d_3() {
  dend[17] {	pt3dadd(35, 103.5, 37.5, 3.5)
	pt3dadd(36, 107, 39.5, 3.5)
	pt3dadd(37.5, 111, 39.5, 3.7)
	pt3dadd(38, 114, 40, 3.9)
	pt3dadd(39.5, 117.5, 40, 3.5)
	pt3dadd(39.5, 120, 44.5, 3.2)
	pt3dadd(40.5, 123, 47, 3.4)
	pt3dadd(42, 127, 45, 3.7)
	pt3dadd(43, 131, 47, 3.5)
	pt3dadd(43.5, 135, 47.5, 3.7)
	pt3dadd(45, 138, 47.5, 3.8)
	pt3dadd(46, 141.5, 43.5, 4.5)
	pt3dadd(47, 145, 48, 4.1)
	pt3dadd(47, 148, 48, 4.1)
	pt3dadd(48, 152, 48, 4.1)
	pt3dadd(48.5, 155, 46, 3.5)
	pt3dadd(50, 159.5, 46.5, 3.4)
	pt3dadd(50, 163, 44.5, 3.4)
	pt3dadd(50.5, 166.5, 46.5, 3.4)
	pt3dadd(51.5, 170, 51.5, 3.5)
	pt3dadd(51.5, 172, 51.5, 3.5)
	pt3dadd(52.5, 174.5, 51.5, 3.4)
	pt3dadd(53, 177.5, 51.5, 2.6)
	pt3dadd(53, 180, 52, 3)
	pt3dadd(55, 182, 49.5, 3.7)
	pt3dadd(56, 186, 52, 3.7)
	pt3dadd(57.5, 190, 52, 3.8)
	pt3dadd(58, 193, 50, 4.5)
	pt3dadd(59, 195.5, 54.5, 4.8)
	pt3dadd(61, 199, 54.5, 4.8)
	pt3dadd(62, 201, 55, 4.8)
	pt3dadd(62.5, 205, 53, 3.6)
	pt3dadd(62.5, 207.5, 53, 4.1)
	pt3dadd(64.5, 212, 57.5, 4.7)
	pt3dadd(66, 215.5, 55.5, 4.1)
	pt3dadd(66.5, 217.5, 60, 4.6)
	pt3dadd(67.5, 220.5, 60, 4.2)
	pt3dadd(69, 223, 58, 4)
	pt3dadd(69.5, 226, 56, 3.8)
	pt3dadd(70.5, 227.5, 56, 3.5)
	pt3dadd(71, 229, 56, 3)
	pt3dadd(71.5, 231.5, 56, 2.6)
	pt3dadd(72, 233, 56.5, 2.5)
	pt3dadd(72, 235, 56.5, 2.5)
	pt3dadd(72, 237, 56.5, 3.3)
	pt3dadd(72, 238, 56.5, 4.1)
	pt3dadd(72, 240.5, 56.5, 3.3)
	pt3dadd(72, 242.5, 56.5, 3.9)
	pt3dadd(71.5, 245, 61.5, 5)
	pt3dadd(71.5, 249.5, 61.5, 3.7)
	pt3dadd(72, 254, 61.5, 3.4)
	pt3dadd(72, 256.5, 61.5, 3.3)
	pt3dadd(73.5, 260, 62, 3.8)
	pt3dadd(73.5, 263, 62, 4.1)
	pt3dadd(74, 266.5, 62, 3.5)
	pt3dadd(74.5, 269.5, 62, 4.1)
	pt3dadd(74.5, 273, 62.5, 3.7)
	pt3dadd(75, 275, 62.5, 3.7)
	pt3dadd(75, 277, 62.5, 4)
	pt3dadd(75, 279.5, 62.5, 4.4)
	pt3dadd(75, 282, 60, 3.5)
	pt3dadd(75, 282.5, 60, 3.4)
	pt3dadd(75.5, 285, 63, 3.2)
	pt3dadd(75.5, 287, 63, 3.7)
	pt3dadd(75, 291, 63, 3.9)
	pt3dadd(75.5, 296.5, 67.5, 4)
	pt3dadd(75.5, 300, 67.5, 4)
	pt3dadd(75.5, 303, 67.5, 3.7)
	pt3dadd(75.5, 305.5, 65.5, 3.7)
	pt3dadd(76, 308.5, 64, 3.7)
	pt3dadd(77, 311.5, 61.5, 3)
	pt3dadd(77, 313.5, 59.5, 3)
	pt3dadd(76, 316, 66.5, 3)
	pt3dadd(76.5, 318, 66.5, 3)
	pt3dadd(76.5, 321.5, 64.5, 3)
	pt3dadd(75, 325.5, 66.5, 3)
	pt3dadd(75, 327.5, 67, 2.6)
	pt3dadd(75.5, 330.5, 62.5, 3)
	pt3dadd(75, 334, 65, 2.2)
	pt3dadd(75, 340, 61, 2.6)
	pt3dadd(75, 342, 67.5, 2.6)
	pt3dadd(75, 344, 66, 2.7)
	pt3dadd(75, 347, 66, 2.3)
	pt3dadd(75, 351, 66, 2.3)
	pt3dadd(75, 355, 66, 2.3)
	pt3dadd(75, 360, 66.5, 2.3)
	pt3dadd(75, 363, 66.5, 2.3)
	pt3dadd(75, 366.5, 66.5, 2.3)
	pt3dadd(74.5, 370.5, 67, 2.3)
	pt3dadd(74.5, 376, 64.5, 2.3)
	pt3dadd(73, 381, 62.5, 2.3)
	pt3dadd(73, 385, 67.5, 2.3)
	pt3dadd(73, 388, 69.5, 2.3)
	pt3dadd(71.5, 390.5, 69.5, 2.5)
	pt3dadd(70, 393.5, 70, 2.7)
	pt3dadd(70, 396, 70, 2.9)
	pt3dadd(70, 399, 68, 3.2)
	pt3dadd(70, 401.5, 68, 2.6)
	pt3dadd(70, 404.5, 68, 2.2)
	pt3dadd(68.5, 407.5, 68.5, 2.2)
	pt3dadd(68.5, 409.5, 68.5, 2.5)
	pt3dadd(67, 413, 68.5, 3.1)
	pt3dadd(65.5, 416, 68.5, 2.2)
	pt3dadd(65.5, 417.5, 68.5, 2.6)
	pt3dadd(65.5, 419.5, 69, 3.5)
	pt3dadd(64, 423, 66.5, 2.6)
	pt3dadd(64, 426, 64.5, 2.4)
	pt3dadd(62, 429.5, 64.5, 2.6)
	pt3dadd(60.5, 433.5, 63, 2.6)
	pt3dadd(60.5, 436.5, 63, 2.3)
	pt3dadd(60.5, 439.5, 63, 2.3)
	pt3dadd(60, 443, 61, 2.3)
	pt3dadd(59.5, 447, 63.5, 1.8)
	pt3dadd(58.5, 450.5, 65.5, 1.9)
	pt3dadd(57.5, 453, 63.5, 1.9)
	pt3dadd(57.5, 455.5, 64, 1.9)
	pt3dadd(58, 459, 64, 1.9)
	pt3dadd(58, 461.5, 64, 1.9)
	pt3dadd(56.5, 464, 64, 1.6)
	pt3dadd(58, 466, 64, 2)
	pt3dadd(58, 468.5, 64.5, 2)
	pt3dadd(58, 470.5, 64.5, 2.2)
	pt3dadd(57, 474, 64.5, 1.8)
	pt3dadd(56, 477, 64.5, 1.6)
	pt3dadd(57.5, 480, 71.5, 2.5)
	pt3dadd(58.5, 483, 69, 2.5)
	pt3dadd(58, 485.5, 69, 2.7)
	pt3dadd(56.5, 489.5, 67.5, 2.6)
	pt3dadd(56.5, 493, 67.5, 2)
	pt3dadd(56.5, 494.5, 67.5, 2.6)
	pt3dadd(56.5, 497, 67.5, 2.7)
	pt3dadd(55, 499.5, 69.5, 2.7)
	pt3dadd(55, 502, 68, 2.7)
	pt3dadd(53.5, 506, 68, 2.7)
	pt3dadd(52.5, 509.5, 66, 2.5)
	pt3dadd(52.5, 512, 70.5, 2.5)
	pt3dadd(52, 513.5, 70.5, 2.2)
	pt3dadd(52, 516.5, 70.5, 2)
	pt3dadd(50, 517.5, 70.5, 2)
	pt3dadd(50, 521, 68.5, 2)
	pt3dadd(50, 524, 69, 2)
	pt3dadd(50, 525.5, 69, 2)
	pt3dadd(48, 528.5, 69, 2)
	pt3dadd(45.5, 530.5, 69, 1.7)
	pt3dadd(44, 532.5, 69, 1.7)
	pt3dadd(45.5, 534, 69.5, 1.7)
	pt3dadd(44.5, 537.5, 74, 1.7)
	pt3dadd(43, 540, 74, 2)
	pt3dadd(42.5, 542, 71.5, 2.5)
	pt3dadd(42, 544.5, 74.5, 2.6)
	pt3dadd(41, 546.5, 72, 2)
	pt3dadd(39, 549, 74.5, 1.9)
	pt3dadd(37.5, 551.5, 75, 2.2)
  }
  dend[18] {pt3dclear()
	pt3dadd(42, 65.5, 34, 11)
	pt3dadd(47, 72, 29.5, 4)
	pt3dadd(48, 75, 28.5, 4)
	pt3dadd(49, 79.5, 23.5, 3.5)
	pt3dadd(50.5, 82.5, 22.5, 3.7)
	pt3dadd(51, 86, 22, 3.1)
	pt3dadd(51.5, 87.5, 19, 3.1)
	pt3dadd(53, 90.5, 22, 2.6)
	pt3dadd(55, 93.5, 21.5, 2.6)
	pt3dadd(57, 95, 25, 2.6)
  }
  dend[19] {pt3dclear()
	pt3dadd(32, 31, 1.5, 7.6)
	pt3dadd(36, 36, -1.5, 5)
	pt3dadd(40, 41, -2.5, 4.5)
	pt3dadd(41.5, 45, -4.5, 4.5)
	pt3dadd(42, 47.5, -4.5, 4.8)
	pt3dadd(44.5, 50, -4.5, 6.4)
	pt3dadd(46, 53, -4.5, 8.2)
	pt3dadd(47.5, 55.5, -4.5, 9.5)
  }
  dend[20] {pt3dclear()
	pt3dadd(47.5, 55.5, -4.5, 9.5)
	pt3dadd(53.5, 55.5, 2, 3.4)
	pt3dadd(56, 57, 6, 3)
	pt3dadd(59, 58, 6, 3)
	pt3dadd(61.5, 59.5, 8.5, 3.2)
	pt3dadd(65.5, 60.5, 11.5, 3.1)
	pt3dadd(67, 62.5, 12, 3.1)
	pt3dadd(69, 64, 14, 2.6)
	pt3dadd(72.5, 66, 15.5, 3.2)
	pt3dadd(75.5, 66, 18, 2.7)
	pt3dadd(78.5, 66, 18.5, 2.7)
	pt3dadd(81, 66, 20.5, 2.7)
	pt3dadd(83, 66, 25, 2.8)
	pt3dadd(87, 66, 22.5, 3)
	pt3dadd(91, 68, 22, 2.9)
	pt3dadd(94, 67.5, 22, 2.9)
	pt3dadd(96.5, 67.5, 21.5, 3.3)
	pt3dadd(98.5, 68.5, 24, 3.4)
	pt3dadd(100.5, 68.5, 24, 2.8)
	pt3dadd(102.5, 68.5, 23.5, 2.5)
	pt3dadd(105, 69.5, 23.5, 2.3)
	pt3dadd(107, 70.5, 23.5, 2.6)
	pt3dadd(109.5, 70.5, 23, 2.8)
	pt3dadd(112, 70.5, 23, 3.1)
	pt3dadd(114.5, 70.5, 23, 2.6)
	pt3dadd(117.5, 71.5, 25.5, 2.8)
	pt3dadd(120.5, 73, 25, 3.2)
	pt3dadd(123, 73.5, 23.5, 2.5)
	pt3dadd(126, 76, 22.5, 2.5)
  }
}
proc shape3d_4() {
  dend[20] {	pt3dadd(128.5, 76.5, 22.5, 2.5)
	pt3dadd(131.5, 78, 28, 2.5)
	pt3dadd(134, 80, 27, 3)
	pt3dadd(136, 83, 27, 2.5)
	pt3dadd(138.5, 86, 25.5, 2.5)
	pt3dadd(141, 88, 26, 2.6)
	pt3dadd(142.5, 90.5, 26, 2.8)
	pt3dadd(145.5, 92.5, 26.5, 2.8)
	pt3dadd(146.5, 95, 26.5, 2.9)
	pt3dadd(148, 99, 25.5, 3.1)
	pt3dadd(149.5, 101.5, 31, 2.5)
	pt3dadd(151.5, 103.5, 28, 2.2)
	pt3dadd(153.5, 106.5, 33.5, 2.7)
	pt3dadd(156.5, 108, 32.5, 2.5)
	pt3dadd(159, 110, 31, 2.6)
	pt3dadd(160.5, 113, 33, 2.7)
	pt3dadd(161.5, 116.5, 32, 2.6)
	pt3dadd(160, 119, 37.5, 2.3)
	pt3dadd(158, 121, 35.5, 2.5)
	pt3dadd(156, 122.5, 36, 2.5)
	pt3dadd(153, 124.5, 36, 2.3)
	pt3dadd(150.5, 124.5, 36.5, 1.9)
	pt3dadd(149.5, 126, 36.5, 1.9)
	pt3dadd(149.5, 127.5, 36.5, 2.1)
	pt3dadd(150.5, 129, 37, 2.6)
	pt3dadd(152, 130.5, 37, 3)
	pt3dadd(153.5, 132.5, 39, 3.1)
	pt3dadd(155.5, 135, 39.5, 2.7)
	pt3dadd(155.5, 137.5, 39.5, 2.5)
	pt3dadd(155.5, 139.5, 40, 2.2)
	pt3dadd(155.5, 142.5, 40, 2.5)
	pt3dadd(156, 145, 42, 2.5)
	pt3dadd(155, 146.5, 42, 2.1)
	pt3dadd(153.5, 148, 42.5, 2.1)
	pt3dadd(154, 150, 42.5, 2.5)
	pt3dadd(155, 151, 42.5, 2.7)
	pt3dadd(157, 152.5, 43, 2.5)
	pt3dadd(158, 154, 43, 2)
	pt3dadd(159, 155.5, 43, 2)
	pt3dadd(159.5, 157, 43, 2.3)
	pt3dadd(161, 159.5, 45.5, 2.6)
	pt3dadd(162.5, 162, 46, 3)
	pt3dadd(164, 164, 46, 2.4)
	pt3dadd(165.5, 165, 46, 2.4)
	pt3dadd(167.5, 167, 46.5, 2.7)
	pt3dadd(169.5, 168.5, 46.5, 2.3)
	pt3dadd(171.5, 169.5, 45, 2.6)
	pt3dadd(173, 171.5, 43.5, 3)
	pt3dadd(174.5, 174, 45.5, 2.5)
	pt3dadd(176, 178.5, 48, 2.7)
	pt3dadd(177.5, 180.5, 48, 2.7)
	pt3dadd(179, 183.5, 48.5, 2.7)
	pt3dadd(179, 186.5, 48.5, 2.7)
	pt3dadd(180.5, 188, 50, 2.2)
	pt3dadd(181.5, 190.5, 50, 2.6)
	pt3dadd(182, 193, 50.5, 2.8)
	pt3dadd(183, 195.5, 50.5, 2.8)
	pt3dadd(184, 198.5, 51, 2.3)
	pt3dadd(186, 199.5, 52.5, 2.2)
	pt3dadd(187.5, 201.5, 52.5, 2.5)
	pt3dadd(189.5, 203.5, 53, 2.2)
	pt3dadd(193, 205, 53.5, 2.5)
	pt3dadd(195.5, 206.5, 50.5, 2.5)
	pt3dadd(198.5, 207.5, 54, 3.1)
	pt3dadd(200.5, 208, 54, 2.7)
	pt3dadd(203.5, 210, 54.5, 2.7)
	pt3dadd(205.5, 211.5, 53.5, 2.7)
	pt3dadd(207.5, 213.5, 52, 2.6)
	pt3dadd(209, 216, 52.5, 1.9)
	pt3dadd(209.5, 217.5, 55.5, 2.3)
	pt3dadd(209.5, 220, 56, 2.5)
	pt3dadd(210, 222.5, 53, 2.7)
	pt3dadd(211, 226.5, 51.5, 2.7)
	pt3dadd(212.5, 228.5, 55.5, 2.3)
	pt3dadd(213.5, 229.5, 55.5, 2.2)
	pt3dadd(215.5, 231.5, 56, 1.9)
	pt3dadd(216.5, 234, 56, 1.9)
	pt3dadd(216, 236.5, 59.5, 2.9)
	pt3dadd(217.5, 239, 59.5, 2.9)
	pt3dadd(217.5, 240, 59.5, 2.9)
	pt3dadd(217.5, 242.5, 60, 2.9)
	pt3dadd(216.5, 245, 60, 2.2)
	pt3dadd(216.5, 246, 62.5, 2.5)
	pt3dadd(217, 248.5, 62.5, 2.4)
	pt3dadd(217, 250, 62.5, 2.4)
	pt3dadd(218.5, 252, 63, 2.4)
	pt3dadd(219, 253, 63, 2.4)
	pt3dadd(220, 255, 61.5, 2.5)
	pt3dadd(222, 256.5, 61.5, 2.5)
	pt3dadd(222, 259, 61.5, 3)
	pt3dadd(222, 262.5, 62, 2.9)
	pt3dadd(222, 265, 64.5, 3.1)
	pt3dadd(222, 268, 64.5, 2.5)
	pt3dadd(223, 272.5, 63, 2.5)
	pt3dadd(223, 273.5, 61.5, 1.9)
	pt3dadd(223, 275.5, 62, 1.9)
	pt3dadd(224.5, 277, 67.5, 1.9)
	pt3dadd(227, 280.5, 67.5, 2.5)
	pt3dadd(230, 281.5, 64.5, 3.1)
	pt3dadd(233.5, 280.5, 65, 2.8)
	pt3dadd(237, 279.5, 65, 2.7)
	pt3dadd(239.5, 279, 64, 2.3)
	pt3dadd(243, 278, 69.5, 2.6)
	pt3dadd(246, 277.5, 68.5, 3)
	pt3dadd(249, 280, 66.5, 2.8)
	pt3dadd(251, 282, 64, 2.3)
	pt3dadd(254, 283.5, 63, 2)
	pt3dadd(255.5, 286, 68, 1.6)
	pt3dadd(257, 288.5, 70, 1.9)
	pt3dadd(259.5, 291.5, 68.5, 1.4)
	pt3dadd(261.5, 294.5, 69, 1.4)
	pt3dadd(263, 297, 69, 1.5)
	pt3dadd(263, 299.5, 69.5, 1.6)
	pt3dadd(265, 301.5, 75, 1.6)
	pt3dadd(265, 304, 81.5, 2.5)
	pt3dadd(265, 307, 81.5, 2.5)
	pt3dadd(264, 311, 84, 2.7)
	pt3dadd(264, 314, 84, 2.7)
	pt3dadd(264, 316.5, 84, 2.7)
	pt3dadd(264.5, 318.5, 86, 2.4)
	pt3dadd(267, 322, 86, 2.4)
	pt3dadd(268.5, 325, 86, 2.6)
	pt3dadd(269.5, 328, 84, 2.6)
	pt3dadd(270.5, 330, 84, 2.6)
	pt3dadd(272, 332.5, 84, 2.9)
	pt3dadd(272, 336, 84, 2.5)
	pt3dadd(272.5, 338.5, 88, 2)
	pt3dadd(272.5, 341, 88, 1.9)
	pt3dadd(271.5, 343.5, 88, 1.9)
	pt3dadd(271.5, 345.5, 88, 2.2)
	pt3dadd(272, 349.5, 81.5, 2.6)
  }
  dend[21] {pt3dclear()
	pt3dadd(272, 349.5, 81.5, 2.6)
	pt3dadd(274, 351, 79.5, 1.4)
	pt3dadd(274, 353.5, 88, 1.2)
	pt3dadd(276, 353.5, 86, 1.2)
	pt3dadd(278, 352, 86, 1.2)
	pt3dadd(277.5, 354.5, 86, 1.2)
	pt3dadd(275, 357.5, 86, 1.2)
	pt3dadd(273.5, 360, 86, 1.4)
	pt3dadd(271.5, 360, 94.5, 1)
	pt3dadd(269.5, 362, 94.5, 1.1)
	pt3dadd(268, 362, 94.5, 1.1)
	pt3dadd(266.5, 362.5, 94.5, 1.1)
	pt3dadd(269, 364.5, 94.5, 1.3)
	pt3dadd(269.5, 365.5, 94.5, 1.5)
	pt3dadd(270.5, 366.5, 94.5, 1.6)
	pt3dadd(270.5, 368.5, 94.5, 2)
  }
  dend[22] {pt3dclear()
	pt3dadd(270.5, 368.5, 94.5, 2)
	pt3dadd(269.5, 370.5, 101, 1)
	pt3dadd(267, 373.5, 101, 1)
	pt3dadd(265.5, 374.5, 101, 1)
	pt3dadd(263, 375, 101, 0.9)
	pt3dadd(261.5, 375.5, 101, 0.9)
	pt3dadd(259, 376, 99, 1)
	pt3dadd(258, 378.5, 105.5, 1)
	pt3dadd(258, 381, 105.5, 1)
	pt3dadd(258, 383, 107.5, 1)
	pt3dadd(259, 386, 107.5, 1)
	pt3dadd(260, 386.5, 107.5, 1)
	pt3dadd(260, 388, 107.5, 0.7)
	pt3dadd(261, 390, 107.5, 0.9)
	pt3dadd(260, 391.5, 107.5, 0.9)
	pt3dadd(261.5, 394.5, 110, 1.1)
	pt3dadd(263, 397, 112, 1.1)
  }
  dend[23] {pt3dclear()
	pt3dadd(270.5, 368.5, 94.5, 2)
	pt3dadd(272, 370.5, 94.5, 1.1)
	pt3dadd(274, 371.5, 97, 1.1)
	pt3dadd(274, 372, 105.5, 0.8)
	pt3dadd(274.5, 373, 103.5, 0.9)
	pt3dadd(275.5, 373.5, 103.5, 1.3)
	pt3dadd(276.5, 373.5, 103.5, 1.5)
	pt3dadd(278, 374, 103.5, 0.7)
	pt3dadd(280, 374, 103.5, 0.7)
	pt3dadd(281, 373, 103.5, 0.8)
	pt3dadd(283, 373, 103.5, 1)
	pt3dadd(279.5, 374.5, 105.5, 1)
	pt3dadd(279.5, 376, 105.5, 1)
	pt3dadd(281, 377.5, 103.5, 1)
	pt3dadd(282.5, 379, 99, 1)
  }
  dend[24] {pt3dclear()
	pt3dadd(272, 349.5, 81.5, 2.6)
	pt3dadd(274.5, 352.5, 81, 1.9)
	pt3dadd(277, 354.5, 81, 1.9)
	pt3dadd(278.5, 357, 81, 2.3)
	pt3dadd(279, 359, 81, 1.5)
	pt3dadd(281, 361, 85, 1.6)
	pt3dadd(283.5, 361, 85, 1.6)
	pt3dadd(286.5, 361.5, 83, 1.3)
	pt3dadd(287, 362.5, 87, 1.6)
	pt3dadd(289, 363.5, 86.5, 2.2)
	pt3dadd(291, 363.5, 84.5, 1.7)
	pt3dadd(293, 363.5, 84.5, 0.8)
	pt3dadd(295, 363.5, 86.5, 1.3)
	pt3dadd(297.5, 363, 86.5, 1.7)
	pt3dadd(301, 362.5, 84, 1.7)
	pt3dadd(304, 361, 90.5, 1.2)
	pt3dadd(305.5, 361, 90.5, 1.5)
	pt3dadd(307.5, 360.5, 90.5, 1.9)
	pt3dadd(310, 360.5, 88, 1.8)
	pt3dadd(312.5, 362.5, 88, 1.3)
	pt3dadd(314.5, 363.5, 88, 1.3)
  }
}
proc shape3d_5() {
  dend[24] {	pt3dadd(317, 365.5, 85.5, 1.5)
	pt3dadd(318.5, 365.5, 85, 0.9)
	pt3dadd(320, 366, 85, 0.9)
	pt3dadd(321.5, 368, 85, 1.3)
	pt3dadd(322, 369, 83, 1.6)
	pt3dadd(323.5, 371, 81, 1.8)
	pt3dadd(325.5, 373, 81, 1.2)
	pt3dadd(326, 374.5, 80.5, 1.3)
	pt3dadd(326, 375, 80.5, 1.3)
	pt3dadd(327, 376, 80.5, 1.3)
	pt3dadd(326.5, 377.5, 78, 1.3)
	pt3dadd(327.5, 379, 76, 1.3)
	pt3dadd(327.5, 379.5, 76, 1.3)
	pt3dadd(327, 381, 76, 1.3)
	pt3dadd(327, 382.5, 76, 1.3)
	pt3dadd(327.5, 387, 90, 1.7)
	pt3dadd(327.5, 389, 92.5, 1.8)
	pt3dadd(328, 391.5, 92.5, 1.7)
	pt3dadd(329.5, 394, 92.5, 1.5)
	pt3dadd(329.5, 395.5, 92.5, 1.5)
	pt3dadd(329, 397, 92, 1.5)
	pt3dadd(330.5, 399.5, 92, 1.9)
	pt3dadd(332, 401.5, 89.5, 1.9)
	pt3dadd(332, 404, 89.5, 1.9)
	pt3dadd(332, 405.5, 89.5, 1.5)
	pt3dadd(332.5, 408.5, 89, 1.5)
	pt3dadd(334, 411, 87, 1.5)
	pt3dadd(334, 413.5, 87, 1.5)
	pt3dadd(335, 415.5, 85, 1.9)
	pt3dadd(338, 416.5, 85, 1.5)
	pt3dadd(340, 416, 84.5, 1.4)
	pt3dadd(342, 416, 82, 1.5)
	pt3dadd(343.5, 419, 82, 1.1)
	pt3dadd(343.5, 420, 82, 1.7)
	pt3dadd(343.5, 422.5, 82, 2)
	pt3dadd(343.5, 424, 81.5, 1.6)
	pt3dadd(343.5, 425, 81.5, 1.6)
	pt3dadd(341.5, 425, 81.5, 1.6)
	pt3dadd(340.5, 424.5, 81.5, 1.8)
	pt3dadd(338.5, 424.5, 81.5, 1.8)
	pt3dadd(337, 424.5, 75, 1.4)
  }
  dend[25] {pt3dclear()
	pt3dadd(47.5, 55.5, -4.5, 9.5)
	pt3dadd(48, 61.5, -3.5, 5.5)
	pt3dadd(49.5, 65, -2, 5.4)
	pt3dadd(50.5, 68.5, -0.5, 6.1)
	pt3dadd(51, 71.5, 0.5, 6.4)
	pt3dadd(51.5, 75, 1.5, 6.2)
	pt3dadd(52.5, 78.5, 0.5, 4.8)
	pt3dadd(54, 81.5, 1.5, 4.4)
	pt3dadd(54.5, 84.5, 3, 4.2)
	pt3dadd(55, 87.5, 8, 4.6)
	pt3dadd(56, 90.5, 9.5, 5)
	pt3dadd(55.5, 94.5, 9.5, 5)
	pt3dadd(56, 97.5, 11, 4.6)
	pt3dadd(56, 101, 14, 5)
	pt3dadd(56, 104, 15, 4.6)
	pt3dadd(56, 108, 18, 5)
	pt3dadd(56, 111, 17, 5.2)
	pt3dadd(56.5, 113.5, 15, 5.2)
	pt3dadd(56.5, 116.5, 18, 4.6)
	pt3dadd(56.5, 119.5, 19, 5.3)
	pt3dadd(56, 122.5, 22.5, 6)
	pt3dadd(56, 126, 24, 5.5)
	pt3dadd(56.5, 129, 23.5, 6)
	pt3dadd(57.5, 132, 24.5, 6)
	pt3dadd(59, 135.5, 25, 5.1)
	pt3dadd(59, 137, 24, 4.4)
	pt3dadd(59, 140, 25.5, 3.9)
	pt3dadd(59, 143, 25, 3.4)
	pt3dadd(59, 147, 25, 5)
	pt3dadd(58.5, 152, 24.5, 5.3)
	pt3dadd(59, 154.5, 24.5, 5.4)
	pt3dadd(59, 158, 24, 5)
	pt3dadd(58, 161, 24, 4.5)
	pt3dadd(57.5, 164.5, 20.5, 4.8)
	pt3dadd(56, 167, 20, 5)
	pt3dadd(57, 170.5, 20, 4.8)
	pt3dadd(55, 176, 14, 5)
	pt3dadd(55, 179, 16.5, 4.6)
	pt3dadd(55, 181.5, 16.5, 4.1)
	pt3dadd(55, 184.5, 16, 4.8)
	pt3dadd(54, 188, 16, 5.1)
	pt3dadd(53.5, 191.5, 12.5, 4.3)
	pt3dadd(54, 195.5, 15, 4.6)
	pt3dadd(54, 198.5, 17.5, 4.8)
	pt3dadd(55, 202.5, 17, 5)
	pt3dadd(55.5, 205.5, 7.5, 4.5)
	pt3dadd(57, 210.5, 7.5, 4.8)
	pt3dadd(57, 213.5, 7, 4.6)
	pt3dadd(57, 216.5, 7, 5.3)
	pt3dadd(57, 219, 6.5, 5.7)
	pt3dadd(57, 221, 6.5, 6.4)
	pt3dadd(57, 223.5, 3.5, 7.3)
  }
  dend[26] {pt3dclear()
	pt3dadd(57, 223.5, 3.5, 7.3)
	pt3dadd(51.5, 225, 8, 3.5)
	pt3dadd(50, 228, 8, 3.5)
	pt3dadd(50, 229.5, 4.5, 3.5)
	pt3dadd(48.5, 232, 4, 3.3)
	pt3dadd(47.5, 235, 3.5, 3.1)
	pt3dadd(46, 237, 3, 3.1)
	pt3dadd(45.5, 239, 3, 3.1)
	pt3dadd(44.5, 241, 2.5, 3.4)
	pt3dadd(47, 238.5, -0.5, 3.4)
	pt3dadd(49, 240, -10, 3.2)
	pt3dadd(50.5, 242.5, -7.5, 3.1)
	pt3dadd(53.5, 244.5, -11, 3.1)
	pt3dadd(55, 245.5, -11.5, 3.5)
	pt3dadd(56.5, 248.5, -12, 3.1)
	pt3dadd(56.5, 251, -12, 2.7)
	pt3dadd(57.5, 253.5, -15, 2.6)
	pt3dadd(57, 256, -25, 3)
  }
  dend[27] {pt3dclear()
	pt3dadd(57, 223.5, 3.5, 7.3)
	pt3dadd(59, 228, 0.5, 4.6)
	pt3dadd(59.5, 232.5, 3, 4.5)
	pt3dadd(59.5, 237, 3, 4.2)
	pt3dadd(59.5, 239.5, 2.5, 4.8)
	pt3dadd(59.5, 243, 2.5, 4.8)
	pt3dadd(59.5, 245.5, 2, 5.6)
	pt3dadd(60, 249, 2, 3.9)
	pt3dadd(60, 251.5, 2, 3.6)
	pt3dadd(60, 255.5, 1.5, 4.3)
	pt3dadd(60, 259.5, -1.5, 4.5)
	pt3dadd(61, 264.5, 3.5, 4.6)
	pt3dadd(61, 267, 0.5, 5.3)
	pt3dadd(61, 270, 0.5, 5)
	pt3dadd(61, 273, 0, 4.6)
	pt3dadd(62, 275.5, 0, 3.2)
	pt3dadd(62, 278.5, 0, 3.4)
	pt3dadd(64.5, 282, 5, 3.6)
	pt3dadd(66.5, 284.5, -7, 3.8)
	pt3dadd(68.5, 287.5, -4.5, 4.7)
	pt3dadd(70, 291, -7.5, 5)
	pt3dadd(71.5, 294, -10.5, 5)
	pt3dadd(73.5, 296, -11, 5)
	pt3dadd(74, 299, -11, 4.5)
	pt3dadd(76, 302, -13.5, 4.5)
	pt3dadd(78, 304.5, -14, 3.9)
	pt3dadd(79, 307.5, -14, 4.5)
	pt3dadd(80.5, 311, -17.5, 4.1)
	pt3dadd(82, 313, -14.5, 4)
	pt3dadd(82, 315, -15, 3.7)
	pt3dadd(83.5, 318, -15, 3.7)
	pt3dadd(85.5, 321.5, -21, 3.7)
	pt3dadd(86, 322.5, -21, 4.1)
	pt3dadd(86.5, 325, -27.5, 3.8)
	pt3dadd(87.5, 329.5, -25, 3.8)
  }
  dend[28] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 16.7)
	pt3dadd(13, -34.5, -2.5, 16.7)
	pt3dadd(17.5, -39, -2.5, 13.2)
	pt3dadd(23, -42.5, -6.5, 8.9)
	pt3dadd(26.5, -44, -4.5, 10.1)
	pt3dadd(32, -46, -8.5, 11.6)
  }
  dend[29] {pt3dclear()
	pt3dadd(32, -46, -8.5, 11.6)
	pt3dadd(35.5, -43.5, -13, 4.6)
	pt3dadd(37.5, -42, -15, 3.4)
	pt3dadd(39.5, -40.5, -16.5, 3.4)
	pt3dadd(41.5, -38.5, -18.5, 2.9)
	pt3dadd(42, -38, -25, 2.8)
  }
  dend[30] {pt3dclear()
	pt3dadd(32, -46, -8.5, 11.6)
	pt3dadd(36.5, -49, -8.5, 9.9)
	pt3dadd(39, -53, -1.5, 11.6)
	pt3dadd(41.5, -55.5, -5.5, 12.2)
	pt3dadd(45, -58, -5.5, 10.8)
	pt3dadd(48, -60.5, -4, 12.8)
  }
  dend[31] {pt3dclear()
	pt3dadd(48, -60.5, -4, 12.8)
	pt3dadd(48, -67.5, -10, 8.5)
	pt3dadd(51, -71, -20.5, 6.9)
	pt3dadd(53, -74, -25, 6.5)
	pt3dadd(55, -77.5, -26, 5.2)
	pt3dadd(57, -80.5, -26.5, 5.2)
	pt3dadd(58, -82, -24.5, 5.8)
	pt3dadd(58, -84.5, -25, 5.1)
	pt3dadd(59, -88.5, -26.5, 5.5)
	pt3dadd(59, -92, -27, 4.6)
	pt3dadd(59, -94.5, -31, 3.8)
	pt3dadd(59, -97, -29, 4.5)
	pt3dadd(59, -100, -33, 4.9)
	pt3dadd(61, -103.5, -34.5, 6.7)
  }
  dend[32] {pt3dclear()
	pt3dadd(61, -103.5, -34.5, 6.7)
	pt3dadd(60, -107, -34.5, 3.4)
	pt3dadd(59.5, -108, -34.5, 3)
	pt3dadd(60.5, -111, -31.5, 3.4)
	pt3dadd(62, -113, -37, 3.4)
	pt3dadd(63, -114.5, -34.5, 3.3)
	pt3dadd(63.5, -117.5, -34.5, 3.7)
	pt3dadd(64, -118.5, -34.5, 3.4)
	pt3dadd(65.5, -119.5, -34.5, 3.1)
	pt3dadd(66, -121.5, -34.5, 3.4)
	pt3dadd(66.5, -124.5, -34.5, 3.8)
	pt3dadd(68, -128, -34.5, 3.2)
	pt3dadd(69.5, -130.5, -34.5, 3.1)
	pt3dadd(70.5, -133, -29.5, 3.9)
	pt3dadd(72, -135.5, -29.5, 4.5)
	pt3dadd(74, -137, -29.5, 3.7)
	pt3dadd(74.5, -139.5, -29.5, 3.5)
	pt3dadd(75, -141.5, -32, 3.1)
	pt3dadd(75.5, -144.5, -32, 3.1)
	pt3dadd(75.5, -146.5, -32, 3.1)
	pt3dadd(77, -148, -32, 3)
	pt3dadd(78, -150, -29.5, 2.9)
  }
}
proc shape3d_6() {
  dend[32] {	pt3dadd(79, -151.5, -26.5, 3.7)
	pt3dadd(80.5, -153.5, -32.5, 3.4)
	pt3dadd(81.5, -156.5, -32.5, 2.7)
	pt3dadd(83, -159.5, -30, 3.2)
	pt3dadd(84, -161, -30, 3.5)
	pt3dadd(85.5, -162, -30, 3.5)
	pt3dadd(85.5, -164, -30, 4.3)
	pt3dadd(85.5, -166.5, -30, 3.8)
	pt3dadd(86.5, -168.5, -30, 3.8)
	pt3dadd(86.5, -170.5, -30, 3.4)
	pt3dadd(87.5, -173, -30, 3)
	pt3dadd(89.5, -175, -30, 3.2)
	pt3dadd(91, -177, -30, 3.5)
	pt3dadd(92, -179, -30, 3.5)
	pt3dadd(93.5, -182, -25, 3.5)
	pt3dadd(95, -186.5, -27, 4.1)
	pt3dadd(96.5, -191, -20, 3.8)
	pt3dadd(98, -194.5, -19, 3.8)
	pt3dadd(99.5, -198, -18, 3.8)
	pt3dadd(99.5, -203.5, -15.5, 3.4)
	pt3dadd(99.5, -206, -14.5, 3.5)
	pt3dadd(98.5, -209, -14, 3)
	pt3dadd(98.5, -211.5, -13, 3)
	pt3dadd(97.5, -214.5, -12.5, 3)
	pt3dadd(97.5, -217.5, -11.5, 3)
	pt3dadd(97.5, -220.5, -11, 3)
	pt3dadd(98.5, -222.5, -10.5, 3.2)
	pt3dadd(98.5, -223.5, -10, 3.2)
	pt3dadd(98.5, -225, -10, 3.2)
	pt3dadd(99, -227.5, -7, 3.7)
	pt3dadd(99, -230, -6.5, 4.1)
	pt3dadd(100.5, -232.5, -5.5, 3.4)
	pt3dadd(100.5, -236, -5, 3.4)
	pt3dadd(100, -239, -4, 3.1)
	pt3dadd(99, -241, -3.5, 2.5)
	pt3dadd(97.5, -243, -1.5, 2.3)
	pt3dadd(99, -246, 0.5, 2.5)
	pt3dadd(101, -247.5, 3, 3.5)
	pt3dadd(103, -248, 2, 3.5)
	pt3dadd(104.5, -250, 2.5, 3.5)
	pt3dadd(106.5, -252.5, 3.5, 3.5)
	pt3dadd(109.5, -254, 7.5, 3.5)
	pt3dadd(111.5, -255, 8, 3.5)
	pt3dadd(113.5, -257, 8.5, 3.5)
	pt3dadd(113.5, -258.5, 9, 4)
	pt3dadd(114.5, -261, 9.5, 3.7)
	pt3dadd(115.5, -264, 10.5, 3.4)
	pt3dadd(116.5, -266.5, 11, 3.6)
	pt3dadd(118, -266.5, 14, 4.2)
	pt3dadd(121, -267.5, 16, 3.4)
	pt3dadd(123, -267.5, 15.5, 3.8)
	pt3dadd(126, -269.5, 19.5, 3.5)
	pt3dadd(129.5, -269.5, 20.5, 3.6)
	pt3dadd(132, -270.5, 21, 3.6)
	pt3dadd(133.5, -272.5, 24, 3)
	pt3dadd(135.5, -273.5, 24.5, 3.1)
	pt3dadd(137, -274.5, 25, 3.2)
	pt3dadd(138, -279.5, 27.5, 4.4)
	pt3dadd(139.5, -283, 28, 4.4)
	pt3dadd(142, -284.5, 26, 3.5)
	pt3dadd(145, -285, 26, 3.5)
	pt3dadd(148, -285.5, 26.5, 3.5)
	pt3dadd(152, -287, 25, 3.5)
	pt3dadd(154.5, -289, 27, 3.8)
	pt3dadd(158, -290.5, 23.5, 3.2)
	pt3dadd(159.5, -293, 24, 2.8)
	pt3dadd(162, -297, 31, 3.2)
	pt3dadd(163.5, -302, 31.5, 3.4)
	pt3dadd(165, -307, 32, 3.4)
	pt3dadd(166.5, -309, 32, 2.7)
	pt3dadd(166.5, -310.5, 32, 2.2)
	pt3dadd(167.5, -312.5, 39.5, 2.6)
	pt3dadd(167.5, -315.5, 39.5, 2.7)
	pt3dadd(169.5, -317, 40, 2.9)
	pt3dadd(171, -318.5, 40, 2.9)
	pt3dadd(171, -321, 40, 2.9)
	pt3dadd(171, -323.5, 40.5, 2.9)
	pt3dadd(172.5, -325.5, 40.5, 2.6)
	pt3dadd(174.5, -329.5, 38.5, 2.7)
	pt3dadd(176, -332.5, 39, 2.7)
	pt3dadd(178.5, -335.5, 46, 2.8)
	pt3dadd(181, -338.5, 46.5, 3.3)
	pt3dadd(181, -341, 49, 3.3)
	pt3dadd(181.5, -343.5, 49.5, 2.8)
	pt3dadd(182.5, -345.5, 51.5, 3.1)
	pt3dadd(182.5, -348, 47.5, 3)
	pt3dadd(182, -351, 47.5, 3.2)
	pt3dadd(182, -354, 50.5, 2.6)
	pt3dadd(182, -356.5, 48.5, 2.8)
	pt3dadd(183.5, -358.5, 44.5, 3.2)
	pt3dadd(185, -360.5, 47, 3.7)
	pt3dadd(185, -362, 47, 4.3)
	pt3dadd(185, -363, 47, 3.2)
	pt3dadd(186, -364.5, 47.5, 3)
	pt3dadd(187.5, -366, 47.5, 2.8)
	pt3dadd(187.5, -368, 47.5, 2.8)
	pt3dadd(187.5, -370, 48, 3)
	pt3dadd(189, -371.5, 48, 2.9)
	pt3dadd(190.5, -374, 48.5, 2.7)
	pt3dadd(192, -376, 48.5, 2.4)
	pt3dadd(193.5, -377.5, 48.5, 2.4)
	pt3dadd(195, -378.5, 49, 3)
	pt3dadd(197, -383.5, 51.5, 3.5)
	pt3dadd(200, -387, 50, 3.4)
	pt3dadd(200, -389.5, 50, 2.7)
	pt3dadd(202, -393.5, 50.5, 2.3)
	pt3dadd(204, -395.5, 50.5, 2.3)
	pt3dadd(207, -397.5, 51, 2.1)
	pt3dadd(209, -399.5, 58, 3.2)
	pt3dadd(211.5, -399.5, 56.5, 3.2)
	pt3dadd(211.5, -402, 56.5, 3.2)
	pt3dadd(212.5, -404, 56.5, 2.7)
	pt3dadd(214, -405, 57, 2.7)
	pt3dadd(215.5, -407, 57, 2.6)
	pt3dadd(215.5, -409, 57, 3.2)
	pt3dadd(215.5, -411, 57.5, 3.2)
	pt3dadd(215.5, -413, 57.5, 3)
	pt3dadd(217.5, -415, 58, 3.2)
	pt3dadd(219, -417, 58, 3.2)
	pt3dadd(220.5, -422, 58.5, 2.3)
	pt3dadd(219, -424, 58.5, 2.7)
	pt3dadd(218, -426.5, 56.5, 2.6)
	pt3dadd(218, -428.5, 66.5, 3)
	pt3dadd(218, -430.5, 66.5, 3.2)
	pt3dadd(220, -433, 66.5, 3.3)
	pt3dadd(221.5, -436.5, 74, 3.3)
	pt3dadd(221.5, -438.5, 79, 3.7)
	pt3dadd(223, -442, 75, 3.6)
  }
  dend[33] {pt3dclear()
	pt3dadd(61, -103.5, -34.5, 6.7)
	pt3dadd(64.5, -106, -35, 4.6)
	pt3dadd(66.5, -108, -35.5, 4.5)
	pt3dadd(69, -110, -54.5, 4.3)
	pt3dadd(70.5, -111, -48, 4.6)
	pt3dadd(71.5, -114, -57, 5)
	pt3dadd(72, -115.5, -67, 5)
	pt3dadd(74, -117.5, -70, 3.7)
	pt3dadd(75.5, -120, -68.5, 4.7)
	pt3dadd(77.5, -120, -75, 4.3)
  }
  dend[34] {pt3dclear()
	pt3dadd(48, -60.5, -4, 12.8)
	pt3dadd(52.5, -58.5, -7.5, 9.1)
	pt3dadd(55, -59, -5.5, 7.5)
	pt3dadd(58, -59, -5.5, 6.6)
	pt3dadd(60.5, -59, -5.5, 7.1)
	pt3dadd(62.5, -61, -5.5, 7.7)
	pt3dadd(65.5, -61, -5.5, 7.7)
	pt3dadd(68, -61.5, -5.5, 7.1)
	pt3dadd(72, -63.5, -4, 6.9)
	pt3dadd(74, -64.5, -2, 7.2)
	pt3dadd(77.5, -66, -4, 6.3)
	pt3dadd(80.5, -66, -5.5, 5.5)
	pt3dadd(83, -66.5, -5.5, 5.5)
	pt3dadd(87, -68.5, -6, 5.5)
	pt3dadd(90, -70, -6, 5.2)
	pt3dadd(93, -72, -6, 5.5)
	pt3dadd(97, -72, -8, 7.5)
	pt3dadd(101, -72.5, -6, 6.3)
	pt3dadd(105.5, -72.5, -8, 5.5)
	pt3dadd(109.5, -74.5, -8, 5.6)
	pt3dadd(112.5, -76, -8, 6.4)
	pt3dadd(114.5, -76.5, -13, 6.1)
	pt3dadd(118, -78, -13, 6.6)
	pt3dadd(121, -80, -6, 7.1)
	pt3dadd(122, -80, -9.5, 7)
  }
  dend[35] {pt3dclear()
	pt3dadd(122, -80, -9.5, 7)
	pt3dadd(130, -87, -9.5, 3.4)
	pt3dadd(133, -87, -6, 3.4)
	pt3dadd(138, -90, -6.5, 3.4)
	pt3dadd(141.5, -90, -5, 3.4)
	pt3dadd(145.5, -90, -5, 3.4)
	pt3dadd(148, -91.5, -3, 3.5)
	pt3dadd(152, -92, -3, 3.5)
	pt3dadd(153.5, -92, -6.5, 3.5)
	pt3dadd(154.5, -96, -6.5, 4.7)
	pt3dadd(157, -98, -6.5, 4.3)
	pt3dadd(160, -101, -6.5, 2.7)
	pt3dadd(163, -101, -6.5, 3.3)
	pt3dadd(167.5, -103, -5, 3.3)
	pt3dadd(170.5, -105, -5.5, 5.1)
	pt3dadd(173, -107.5, -5.5, 6.5)
	pt3dadd(177, -108, -7, 5.3)
	pt3dadd(179.5, -108, -5.5, 4.8)
	pt3dadd(183, -110, -5.5, 5)
	pt3dadd(185.5, -111, -2, 4.6)
	pt3dadd(187.5, -112.5, -2, 4.4)
	pt3dadd(188.5, -115, -10.5, 5)
	pt3dadd(191, -118, -10.5, 4.6)
	pt3dadd(193, -120, -10.5, 3.4)
	pt3dadd(194, -121, -12, 4.4)
  }
  dend[36] {pt3dclear()
	pt3dadd(194, -121, -12, 4.4)
	pt3dadd(196.5, -119.5, -3.5, 3.4)
	pt3dadd(199.5, -122, 1, 3.4)
	pt3dadd(203, -123.5, 2, 3.9)
	pt3dadd(206, -123.5, 3, 3.5)
	pt3dadd(209, -124, 3.5, 3.4)
	pt3dadd(212, -125.5, 4.5, 3.2)
	pt3dadd(215, -127, 5.5, 3.7)
	pt3dadd(218.5, -130, 7, 3.4)
	pt3dadd(220, -132.5, 8, 3.5)
	pt3dadd(221.5, -135.5, 7.5, 3.1)
	pt3dadd(221.5, -138.5, 8.5, 3.1)
  }
}
proc shape3d_7() {
  dend[36] {	pt3dadd(224.5, -141, 9.5, 3.2)
	pt3dadd(226.5, -141, 15.5, 3.2)
	pt3dadd(229, -141, 16, 3.4)
	pt3dadd(230.5, -138, 17, 3.4)
	pt3dadd(232.5, -137, 16.5, 3.4)
	pt3dadd(232, -134.5, 18.5, 3)
	pt3dadd(234.5, -135.5, 19.5, 2.4)
	pt3dadd(236.5, -138.5, 22.5, 2.6)
	pt3dadd(240, -140.5, 24, 2.6)
	pt3dadd(244, -140.5, 25, 2.6)
	pt3dadd(247, -143.5, 31.5, 2.8)
	pt3dadd(249.5, -144.5, 27, 3.3)
	pt3dadd(252.5, -144.5, 27.5, 3.2)
	pt3dadd(255.5, -144, 25, 2.7)
	pt3dadd(259.5, -144, 25.5, 4.1)
	pt3dadd(261.5, -146, 26.5, 4.1)
	pt3dadd(263.5, -146.5, 27, 4.1)
	pt3dadd(265.5, -146.5, 25.5, 3.5)
	pt3dadd(267.5, -148.5, 26, 3.4)
	pt3dadd(269.5, -150, 34, 3.4)
	pt3dadd(270, -153, 35, 3.4)
	pt3dadd(272, -155, 35.5, 3.2)
	pt3dadd(273.5, -155, 38, 3.6)
	pt3dadd(276, -155, 37, 3.5)
	pt3dadd(278.5, -155, 47.5, 3.4)
	pt3dadd(281, -155, 48, 3.4)
	pt3dadd(283, -155, 48.5, 3.4)
	pt3dadd(286, -155, 49, 3.4)
	pt3dadd(287.5, -154, 49.5, 3.4)
	pt3dadd(289.5, -154, 50, 3.1)
	pt3dadd(291, -154, 50.5, 3.1)
	pt3dadd(294.5, -154, 49, 3.1)
	pt3dadd(295, -152, 49.5, 3.2)
	pt3dadd(296.5, -150, 50.5, 3.2)
	pt3dadd(298, -148.5, 51, 2.8)
	pt3dadd(298.5, -147.5, 51, 3)
	pt3dadd(300, -146, 51.5, 3)
	pt3dadd(302, -146, 52, 3)
	pt3dadd(303.5, -148.5, 57.5, 3.4)
	pt3dadd(303.5, -150, 60.5, 3.1)
	pt3dadd(304, -150.5, 60.5, 2.8)
	pt3dadd(305.5, -150.5, 61, 2.6)
	pt3dadd(306.5, -150.5, 61, 3.1)
	pt3dadd(308.5, -152, 61.5, 3.1)
	pt3dadd(311, -154, 62.5, 3.1)
	pt3dadd(314.5, -156, 70.5, 3.2)
	pt3dadd(314.5, -158.5, 71, 3.4)
	pt3dadd(315.5, -161.5, 72, 3.4)
	pt3dadd(318, -163.5, 75, 3.2)
  }
  dend[37] {pt3dclear()
	pt3dadd(194, -121, -12, 4.4)
	pt3dadd(195, -121.5, -21, 3.8)
	pt3dadd(197.5, -124, -25, 3.8)
  }
  dend[38] {pt3dclear()
	pt3dadd(122, -80, -9.5, 7)
	pt3dadd(125, -83, -16, 5.5)
	pt3dadd(128, -84, -14.5, 4.7)
	pt3dadd(131.5, -84, -20, 5.1)
	pt3dadd(136.5, -86.5, -23, 4.8)
	pt3dadd(139, -86.5, -24.5, 4.8)
	pt3dadd(141.5, -86.5, -25, 4.8)
	pt3dadd(148, -88, -27, 5)
	pt3dadd(150.5, -88, -25.5, 5.6)
	pt3dadd(152, -88.5, -26, 6)
	pt3dadd(154.5, -90, -27, 6)
	pt3dadd(157.5, -91, -28, 5.9)
	pt3dadd(159.5, -91, -28.5, 5.9)
	pt3dadd(161.5, -91.5, -32, 5.4)
	pt3dadd(164, -92.5, -32.5, 5.4)
	pt3dadd(166, -93.5, -33, 6)
	pt3dadd(168, -95.5, -34, 5.7)
	pt3dadd(170.5, -95.5, -32.5, 6)
	pt3dadd(173, -95.5, -33, 6.6)
	pt3dadd(175.5, -97, -36.5, 9.3)
  }
  dend[39] {pt3dclear()
	pt3dadd(175.5, -97, -36.5, 9.3)
	pt3dadd(181, -94.5, -40, 3.5)
	pt3dadd(183, -93, -40, 3.1)
	pt3dadd(185, -92, -40, 3.3)
	pt3dadd(187, -92, -37, 3.5)
	pt3dadd(190.5, -90.5, -48.5, 3.5)
	pt3dadd(194.5, -90.5, -43, 3.4)
	pt3dadd(197, -90, -43, 3.1)
	pt3dadd(200, -89.5, -43, 3.1)
	pt3dadd(202, -88.5, -45.5, 3.2)
	pt3dadd(204.5, -86.5, -45.5, 3.2)
	pt3dadd(207.5, -84.5, -43, 3.2)
	pt3dadd(209.5, -82, -43, 3.4)
	pt3dadd(212.5, -80, -40, 3.2)
	pt3dadd(214.5, -77.5, -40, 3.4)
	pt3dadd(215.5, -76.5, -40, 3.4)
	pt3dadd(217, -74.5, -45.5, 3.1)
	pt3dadd(218.5, -74, -45.5, 3.3)
	pt3dadd(220.5, -73, -43, 3.4)
	pt3dadd(223.5, -72.5, -40, 3.7)
	pt3dadd(226, -68.5, -48.5, 3.5)
	pt3dadd(227.5, -67, -45.5, 3.3)
	pt3dadd(229.5, -65, -40.5, 3.7)
	pt3dadd(232, -64, -43.5, 3.7)
	pt3dadd(235, -64, -43.5, 3.6)
	pt3dadd(237.5, -62.5, -43.5, 3.6)
	pt3dadd(239.5, -61, -43.5, 3.8)
	pt3dadd(241, -59, -43.5, 3.8)
	pt3dadd(242, -57, -51.5, 3.5)
	pt3dadd(243, -55, -49, 3.5)
	pt3dadd(245, -52.5, -51.5, 4.6)
  }
  dend[40] {pt3dclear()
	pt3dadd(245, -52.5, -51.5, 4.6)
	pt3dadd(245.5, -48, -55.5, 1.6)
	pt3dadd(247.5, -48, -56, 1.6)
	pt3dadd(249, -47, -56, 1.6)
	pt3dadd(251.5, -46.5, -56.5, 1.8)
	pt3dadd(254, -46.5, -57, 1.8)
	pt3dadd(256, -46, -57.5, 1.8)
	pt3dadd(258.5, -46, -58, 1.8)
	pt3dadd(260, -46, -71, 1.8)
	pt3dadd(261.5, -43.5, -67, 2)
	pt3dadd(263, -41.5, -67.5, 2.5)
	pt3dadd(265, -40, -74, 2.2)
	pt3dadd(266.5, -37, -75, 2.2)
  }
  dend[41] {pt3dclear()
	pt3dadd(245, -52.5, -51.5, 4.6)
	pt3dadd(248, -52, -49, 2.7)
	pt3dadd(252, -51, -49, 2.7)
	pt3dadd(255.5, -49.5, -51.5, 2.5)
	pt3dadd(260, -49, -46, 2.6)
	pt3dadd(264, -49, -46, 2.6)
	pt3dadd(267, -49, -46, 2.6)
	pt3dadd(270, -49, -46, 2.9)
	pt3dadd(274, -49, -46, 2.9)
	pt3dadd(277, -49, -49, 3.3)
	pt3dadd(279.5, -49, -51.5, 2.6)
	pt3dadd(282, -48, -51.5, 2.6)
	pt3dadd(283.5, -46, -51.5, 2.3)
	pt3dadd(285.5, -45, -49, 2.8)
	pt3dadd(288.5, -45, -49, 2.8)
	pt3dadd(290.5, -45, -51.5, 2.8)
	pt3dadd(294, -44.5, -49, 2.8)
	pt3dadd(296.5, -43, -48.5, 2.8)
	pt3dadd(299, -42, -48.5, 2.9)
	pt3dadd(303, -42, -48.5, 2.8)
	pt3dadd(306, -42, -48.5, 3)
	pt3dadd(308.5, -40, -45.5, 3)
	pt3dadd(311, -40, -51, 2.5)
	pt3dadd(314, -40, -51, 2.5)
	pt3dadd(316, -40, -51, 2.6)
	pt3dadd(318.5, -39, -51, 2.6)
	pt3dadd(320, -38, -51, 2.6)
	pt3dadd(323, -38, -51, 2.3)
	pt3dadd(326, -36.5, -54, 2.5)
	pt3dadd(327.5, -34.5, -54, 2.8)
	pt3dadd(328.5, -33.5, -54, 2.5)
	pt3dadd(330, -32.5, -51, 2.5)
	pt3dadd(332.5, -31.5, -51, 2.3)
	pt3dadd(335.5, -30, -51, 2.3)
	pt3dadd(337, -28, -51, 2.5)
	pt3dadd(340, -26.5, -48.5, 2.6)
	pt3dadd(344.5, -26.5, -48.5, 3.1)
	pt3dadd(347.5, -26.5, -51, 3.1)
	pt3dadd(349.5, -26.5, -54, 2.8)
	pt3dadd(352.5, -26, -48.5, 2.7)
	pt3dadd(352.5, -24.5, -51, 2.5)
	pt3dadd(354.5, -24, -51, 2.2)
	pt3dadd(356, -24, -51, 2.5)
	pt3dadd(360, -24, -48.5, 2.7)
	pt3dadd(363.5, -21.5, -51, 2.5)
	pt3dadd(365.5, -20.5, -48.5, 2.5)
	pt3dadd(368.5, -19.5, -45.5, 2.5)
	pt3dadd(371, -19.5, -45.5, 2.5)
	pt3dadd(373.5, -19.5, -45.5, 2.5)
	pt3dadd(375.5, -18, -45.5, 3)
	pt3dadd(379, -16.5, -48.5, 2.7)
	pt3dadd(381.5, -15.5, -48.5, 2.3)
	pt3dadd(383.5, -14, -48.5, 2.1)
	pt3dadd(385, -13, -48.5, 2)
	pt3dadd(387, -12, -48.5, 2)
	pt3dadd(389, -12, -48.5, 2.9)
	pt3dadd(391, -10.5, -51, 2.6)
	pt3dadd(392.5, -9.5, -51, 2.3)
	pt3dadd(395.5, -9.5, -48.5, 3.2)
	pt3dadd(397, -9.5, -48.5, 3.5)
	pt3dadd(399, -7, -48.5, 3)
	pt3dadd(401, -6, -51, 2.5)
	pt3dadd(403.5, -5, -51, 2.5)
	pt3dadd(406, -4.5, -48.5, 2.5)
	pt3dadd(407.5, -4.5, -48.5, 2.5)
	pt3dadd(410, -4.5, -48.5, 2.5)
	pt3dadd(412.5, -3, -48, 2.8)
	pt3dadd(415, -2, -48, 2.2)
	pt3dadd(418, -2.5, -45, 2.2)
	pt3dadd(421, -2.5, -48, 2.7)
	pt3dadd(424, -2, -50.5, 2.3)
	pt3dadd(427, -0.5, -50.5, 2.2)
	pt3dadd(429, 0, -50.5, 2.5)
	pt3dadd(430.5, 2, -48, 2.6)
	pt3dadd(432, 4, -50.5, 2)
	pt3dadd(434.5, 4, -50.5, 2)
	pt3dadd(437.5, 4, -53.5, 2.8)
	pt3dadd(440.5, 3.5, -45, 2.8)
	pt3dadd(443.5, 3.5, -45, 2.4)
	pt3dadd(446, 2.5, -48, 2.6)
	pt3dadd(450, 3, -42.5, 2.3)
	pt3dadd(452.5, 4.5, -42.5, 2.3)
	pt3dadd(454.5, 6.5, -42.5, 2.3)
	pt3dadd(457, 8.5, -42.5, 2.3)
  }
}
proc shape3d_8() {
  dend[41] {	pt3dadd(459.5, 10.5, -42.5, 2.2)
	pt3dadd(462.5, 11.5, -42.5, 2.5)
	pt3dadd(462.5, 12.5, -42.5, 2.2)
	pt3dadd(464, 13.5, -42.5, 2)
	pt3dadd(465, 13.5, -42.5, 2)
	pt3dadd(467, 13.5, -42.5, 2.3)
	pt3dadd(469, 12.5, -42.5, 2.9)
	pt3dadd(472.5, 12.5, -42.5, 2.9)
	pt3dadd(474.5, 14, -45, 2.3)
	pt3dadd(476.5, 14, -45, 2.3)
	pt3dadd(479, 13, -45, 2.3)
	pt3dadd(480, 12.5, -36.5, 2.8)
	pt3dadd(482.5, 12.5, -36.5, 3.1)
  }
  dend[42] {pt3dclear()
	pt3dadd(482.5, 12.5, -36.5, 3.1)
	pt3dadd(485, 11.5, -34.5, 1.4)
	pt3dadd(486, 11.5, -35.5, 1.1)
	pt3dadd(491.5, 11.5, -25, 1.1)
	pt3dadd(496, 9.5, -25, 2)
	pt3dadd(499.5, 9, -27, 1.7)
	pt3dadd(503, 9, -27, 1.9)
	pt3dadd(505.5, 10.5, -27, 1.9)
	pt3dadd(507, 10.5, -27, 2.3)
	pt3dadd(509, 10.5, -27, 1.9)
	pt3dadd(510.5, 11, -23.5, 2)
	pt3dadd(513.5, 10.5, -27, 2)
	pt3dadd(515.5, 10, -22, 1.8)
	pt3dadd(517.5, 10.5, -25, 1.8)
	pt3dadd(520.5, 13, -25, 1.8)
	pt3dadd(523, 13, -25, 1.8)
	pt3dadd(525.5, 12.5, -23.5, 1.9)
	pt3dadd(528, 12.5, -23.5, 2)
	pt3dadd(530, 12.5, -25, 1.6)
	pt3dadd(532, 12.5, -25, 1.4)
	pt3dadd(533.5, 12.5, -25, 1.4)
	pt3dadd(536.5, 12.5, -27, 1.4)
	pt3dadd(538, 11.5, -16.5, 1.9)
	pt3dadd(540, 11, -23.5, 2.2)
	pt3dadd(542, 10, -23.5, 2.2)
	pt3dadd(543.5, 10, -22, 2)
	pt3dadd(547.5, 10.5, -20, 1.8)
	pt3dadd(549.5, 10.5, -20, 1.9)
	pt3dadd(550.5, 10.5, -20, 1.9)
	pt3dadd(554, 10.5, -22, 1.9)
	pt3dadd(554.5, 8.5, -22, 1.6)
	pt3dadd(556.5, 8.5, -22, 2.2)
	pt3dadd(559, 8.5, -22, 2.2)
	pt3dadd(561, 9.5, -23.5, 1.8)
	pt3dadd(564, 9.5, -22, 2)
	pt3dadd(566.5, 11.5, -18.5, 2.2)
	pt3dadd(570.5, 12, -18.5, 1.9)
	pt3dadd(572.5, 12, -18.5, 1.7)
	pt3dadd(574.5, 12, -18.5, 1.3)
	pt3dadd(576, 12, -15, 1.7)
	pt3dadd(578.5, 11.5, -15, 1.9)
	pt3dadd(581, 11.5, -16.5, 1.9)
	pt3dadd(582, 13.5, -18.5, 1.6)
	pt3dadd(583.5, 15, -18.5, 1.8)
	pt3dadd(585.5, 15.5, -10, 2.2)
	pt3dadd(587.5, 15.5, -13.5, 1.8)
	pt3dadd(590, 15.5, -13.5, 1.5)
	pt3dadd(591, 17, -15, 1.6)
	pt3dadd(594, 17, -16.5, 1.6)
	pt3dadd(596.5, 17, -16.5, 2.1)
	pt3dadd(599, 16.5, -18.5, 2)
	pt3dadd(600.5, 16.5, -12, 1.8)
	pt3dadd(602.5, 16.5, -13.5, 1.6)
	pt3dadd(604.5, 16.5, -15, 1.9)
	pt3dadd(606.5, 18, -13.5, 1.7)
	pt3dadd(608.5, 19.5, -15, 1.7)
	pt3dadd(610, 19.5, -15, 1.9)
	pt3dadd(613, 20.5, -18.5, 1.9)
	pt3dadd(615.5, 20.5, -15, 1.9)
	pt3dadd(617, 21.5, -15, 1.3)
	pt3dadd(618, 23, -16.5, 1.3)
	pt3dadd(618.5, 24.5, -8.5, 1.9)
	pt3dadd(621, 25.5, -8.5, 2)
	pt3dadd(622.5, 26.5, -8.5, 2)
	pt3dadd(624.5, 26.5, -8.5, 2)
	pt3dadd(626.5, 26.5, -8.5, 2)
	pt3dadd(629, 26.5, -10, 2)
	pt3dadd(630.5, 28, -10, 2)
	pt3dadd(632.5, 29.5, -10, 2)
	pt3dadd(634.5, 29.5, -10, 2.7)
	pt3dadd(637, 29.5, -10, 2)
	pt3dadd(639.5, 30.5, -13.5, 1.6)
	pt3dadd(641.5, 31, -13.5, 1.6)
	pt3dadd(644, 32.5, -15, 1.9)
	pt3dadd(646, 33, -13.5, 1.9)
	pt3dadd(648.5, 33, -10, 1.5)
	pt3dadd(650.5, 33, -10, 1.5)
	pt3dadd(653, 34, -12, 1.5)
	pt3dadd(655, 35, -13.5, 1.5)
	pt3dadd(657.5, 34.5, -13.5, 1.9)
	pt3dadd(660.5, 34.5, -13.5, 2)
	pt3dadd(662.5, 36, -10, 2.3)
	pt3dadd(664, 36.5, -12, 2.4)
	pt3dadd(665.5, 37.5, -10, 1.6)
	pt3dadd(667, 38, -10, 1.6)
	pt3dadd(669, 38, -10, 1.4)
	pt3dadd(671, 38, -10, 1.4)
	pt3dadd(672, 37, -10, 1.4)
	pt3dadd(673.5, 35, -10, 1.2)
	pt3dadd(674.5, 34, -12, 1.2)
	pt3dadd(676.5, 33.5, -15, 1.2)
	pt3dadd(678, 33.5, -16.5, 1.2)
	pt3dadd(679.5, 34, -16.5, 1.2)
	pt3dadd(681, 34, -16.5, 1.2)
	pt3dadd(682, 34, -16.5, 1.2)
	pt3dadd(682.5, 31, -18.5, 1.5)
	pt3dadd(681, 29.5, -18.5, 1.4)
	pt3dadd(681, 28, -16.5, 1.4)
	pt3dadd(681, 26.5, -16.5, 1.4)
	pt3dadd(682.5, 25.5, -16.5, 1.3)
	pt3dadd(683.5, 24.5, -16.5, 1.6)
	pt3dadd(685, 22.5, -16.5, 2.4)
	pt3dadd(686.5, 22.5, -18.5, 1.9)
	pt3dadd(687.5, 22.5, -18.5, 1.5)
	pt3dadd(689, 20.5, -18.5, 1.3)
	pt3dadd(689.5, 19, -18.5, 1.2)
	pt3dadd(690.5, 18.5, -18.5, 1.2)
	pt3dadd(691.5, 18, -18.5, 1.5)
	pt3dadd(693, 15.5, -18.5, 1.5)
	pt3dadd(691, 14, -16.5, 1.7)
	pt3dadd(689.5, 14, -20, 1.7)
	pt3dadd(687.5, 12.5, -20, 1.3)
	pt3dadd(687, 11.5, -20, 1.3)
	pt3dadd(688, 10.5, -22, 1.6)
	pt3dadd(690.5, 9, -22, 1.5)
	pt3dadd(692, 7.5, -22, 1.4)
	pt3dadd(694.5, 7, -22, 1.4)
	pt3dadd(695.5, 5, -22, 2)
	pt3dadd(696.5, 3, -22, 1.5)
	pt3dadd(698, 1, -20, 1.9)
	pt3dadd(700, 0, -22, 2.4)
	pt3dadd(701.5, 0, -22, 2.5)
	pt3dadd(704, -1.5, -22, 2.2)
	pt3dadd(706, -1.5, -27, 1.8)
	pt3dadd(707.5, -3.5, -27, 1.7)
	pt3dadd(709, -4, -25, 1.7)
	pt3dadd(712, -7.5, -25.5, 2.6)
	pt3dadd(714.5, -9, -25.5, 2.6)
	pt3dadd(716, -11, -23, 2.3)
	pt3dadd(718, -12.5, -26.5, 2.3)
	pt3dadd(720.5, -13, -24, 1.9)
	pt3dadd(722.5, -14, -24.5, 1.9)
	pt3dadd(724.5, -15, -27.5, 1.9)
	pt3dadd(725, -16, -34, 1.9)
	pt3dadd(727, -18, -29, 1.4)
	pt3dadd(728.5, -18, -29.5, 1.4)
	pt3dadd(730.5, -17, -26.5, 1.4)
	pt3dadd(731.5, -15, -27, 1.8)
	pt3dadd(733.5, -13.5, -27.5, 1.6)
	pt3dadd(736.5, -11, -27.5, 1.6)
	pt3dadd(738.5, -10.5, -28, 1.4)
	pt3dadd(740, -9.5, -26, 1.2)
	pt3dadd(741.5, -9.5, -26, 1.2)
	pt3dadd(743, -10.5, -32, 1.7)
	pt3dadd(745.5, -11, -25, 2.4)
	pt3dadd(748.5, -12.5, -20, 1.9)
	pt3dadd(750.5, -15, -20.5, 1.9)
	pt3dadd(751.5, -15, -20.5, 1.9)
	pt3dadd(753, -17.5, -20.5, 1.6)
	pt3dadd(753, -20.5, -20.5, 1.6)
	pt3dadd(754.5, -21.5, -21, 1.6)
	pt3dadd(755, -24, -21, 1.3)
	pt3dadd(757.5, -26.5, -21, 1.6)
	pt3dadd(760, -30.5, -21.5, 1.6)
	pt3dadd(760.5, -32, -21.5, 1.6)
	pt3dadd(761, -34, -21.5, 1.4)
	pt3dadd(762, -36.5, -22, 1.3)
	pt3dadd(763, -38.5, -23.5, 1.3)
	pt3dadd(763.5, -40.5, -17.5, 1.3)
	pt3dadd(763, -43.5, -14, 1.3)
	pt3dadd(763, -46, -16, 1.3)
	pt3dadd(764.5, -47.5, -16, 1.3)
	pt3dadd(765, -49, -16, 1.7)
	pt3dadd(766.5, -50.5, -16, 1.7)
	pt3dadd(768.5, -50.5, -16.5, 1.9)
	pt3dadd(769.5, -50.5, -15, 2)
	pt3dadd(771, -50.5, -15, 2.3)
	pt3dadd(773.5, -50.5, -24, 1.7)
	pt3dadd(775, -50.5, -24, 1.4)
	pt3dadd(777.5, -50.5, -26, 1.3)
	pt3dadd(776.5, -52.5, -26, 1.3)
	pt3dadd(774.5, -53, -26, 1.3)
	pt3dadd(773, -53, -24.5, 1.6)
	pt3dadd(772.5, -54, -25, 1.3)
	pt3dadd(774, -53.5, -25, 1.6)
	pt3dadd(774, -56, -28, 1.8)
	pt3dadd(774, -58.5, -25, 1.9)
	pt3dadd(774, -60, -30.5, 1.3)
	pt3dadd(776.5, -62.5, -28, 1.5)
	pt3dadd(777, -63.5, -28, 1.7)
	pt3dadd(778.5, -64.5, -28, 1.8)
	pt3dadd(780, -66, -28, 2.1)
	pt3dadd(781.5, -67, -28, 1.6)
	pt3dadd(782, -68.5, -28, 1.4)
	pt3dadd(783, -70, -33.5, 1)
	pt3dadd(784, -71, -33.5, 1.6)
	pt3dadd(785.5, -72.5, -36, 1.6)
  }
}
proc shape3d_9() {
  dend[42] {	pt3dadd(783.5, -74, -36, 1.5)
	pt3dadd(783.5, -75.5, -36, 1.2)
	pt3dadd(783.5, -77, -36, 1.1)
	pt3dadd(785.5, -78, -36, 1.2)
	pt3dadd(787, -78, -33.5, 1.7)
	pt3dadd(788.5, -78.5, -36, 1.7)
	pt3dadd(789.5, -79, -30.5, 1)
	pt3dadd(791, -80, -33.5, 1.2)
	pt3dadd(792, -81, -30.5, 1.3)
	pt3dadd(793.5, -82, -30.5, 1.4)
	pt3dadd(793.5, -83.5, -33.5, 1.3)
	pt3dadd(794.5, -85, -33.5, 1.2)
	pt3dadd(794.5, -86.5, -33.5, 0.8)
	pt3dadd(795.5, -87.5, -33.5, 0.9)
	pt3dadd(797, -88.5, -30.5, 1.3)
	pt3dadd(798.5, -88.5, -33.5, 1.4)
	pt3dadd(800, -90, -33.5, 1.3)
	pt3dadd(803, -90, -33.5, 1.1)
	pt3dadd(805, -90, -33.5, 0.8)
	pt3dadd(806, -91, -33.5, 1.9)
	pt3dadd(806, -92, -33.5, 1.3)
	pt3dadd(806.5, -94.5, -33.5, 1.2)
	pt3dadd(808, -95.5, -33.5, 1.7)
	pt3dadd(809.5, -97, -33.5, 2.6)
	pt3dadd(810, -98, -36, 2.6)
	pt3dadd(811.5, -99, -36, 2.5)
	pt3dadd(814, -99.5, -30.5, 1.2)
	pt3dadd(813.5, -101.5, -30.5, 1.3)
	pt3dadd(814, -103, -30.5, 1.1)
	pt3dadd(816.5, -104, -36, 1)
	pt3dadd(818.5, -104, -33.5, 0.9)
	pt3dadd(818.5, -105.5, -30.5, 1.1)
	pt3dadd(817, -107.5, -36, 1.4)
	pt3dadd(819, -110, -39, 1.2)
	pt3dadd(820, -110.5, -39, 1.2)
	pt3dadd(822, -112, -39, 2.2)
	pt3dadd(824.5, -112, -39, 1.1)
	pt3dadd(826.5, -112, -39, 1)
	pt3dadd(829, -113, -31, 1.5)
	pt3dadd(831.5, -113, -34, 1.1)
	pt3dadd(834.5, -113, -34, 1.4)
	pt3dadd(835, -115, -36.5, 1)
	pt3dadd(836, -116.5, -39.5, 1.1)
	pt3dadd(836.5, -118, -39.5, 1.7)
	pt3dadd(838, -119, -39.5, 1.6)
	pt3dadd(840.5, -120, -39.5, 0.9)
	pt3dadd(842.5, -121, -39.5, 1.3)
	pt3dadd(844, -122, -39.5, 1.3)
	pt3dadd(845, -123.5, -39.5, 1.1)
	pt3dadd(846, -125, -39.5, 1.1)
	pt3dadd(847.5, -126, -39.5, 1.1)
	pt3dadd(849.5, -127.5, -42.5, 1.1)
	pt3dadd(852, -129, -42.5, 1)
	pt3dadd(853.5, -130, -45, 1.1)
	pt3dadd(853, -132, -48, 0.9)
	pt3dadd(852.5, -133.5, -48, 0.7)
	pt3dadd(850.5, -135, -45, 0.7)
	pt3dadd(851, -137, -45, 0.9)
	pt3dadd(853, -137, -42.5, 0.9)
	pt3dadd(856, -137, -42.5, 0.9)
	pt3dadd(858.5, -137, -42.5, 0.9)
	pt3dadd(861, -140.5, -42.5, 1.1)
	pt3dadd(862, -142.5, -42.5, 1.3)
	pt3dadd(862, -144, -50.5, 1.6)
	pt3dadd(862, -145.5, -50.5, 1)
	pt3dadd(861, -147.5, -50.5, 0.9)
	pt3dadd(862, -149, -50.5, 0.9)
	pt3dadd(863, -150.5, -50.5, 1)
	pt3dadd(863.5, -152, -50.5, 0.8)
	pt3dadd(863.5, -154.5, -50.5, 0.8)
	pt3dadd(865.5, -154.5, -50.5, 1.1)
	pt3dadd(868, -155.5, -45, 1.1)
	pt3dadd(869, -156.5, -45, 1.5)
	pt3dadd(871, -158, -48, 1.1)
	pt3dadd(874, -158.5, -42.5, 1.2)
	pt3dadd(876, -158.5, -42.5, 0.8)
	pt3dadd(878, -158.5, -42.5, 0.8)
	pt3dadd(879.5, -160, -42.5, 0.8)
	pt3dadd(882, -160.5, -42.5, 1.1)
	pt3dadd(883.5, -160.5, -42.5, 1.5)
	pt3dadd(886, -162.5, -42.5, 1.6)
	pt3dadd(887.5, -163.5, -42.5, 1.6)
	pt3dadd(890, -164, -42.5, 0.9)
	pt3dadd(891.5, -164, -39.5, 0.8)
	pt3dadd(893, -164, -39.5, 0.8)
	pt3dadd(896, -165.5, -42.5, 0.8)
	pt3dadd(898, -167, -39.5, 0.8)
	pt3dadd(898.5, -169.5, -39.5, 1.6)
	pt3dadd(897.5, -171, -36.5, 0.9)
	pt3dadd(897.5, -172, -37, 1.1)
	pt3dadd(898, -173.5, -37, 1)
	pt3dadd(900, -175, -37, 1.2)
	pt3dadd(902.5, -179, -37, 1.1)
	pt3dadd(904.5, -181.5, -34.5, 0.9)
	pt3dadd(907.5, -181.5, -29, 1.2)
	pt3dadd(910, -181.5, -34.5, 1)
	pt3dadd(910.5, -181.5, -34.5, 1)
	pt3dadd(913, -183.5, -37, 1)
	pt3dadd(914.5, -183.5, -31.5, 1)
	pt3dadd(916, -183.5, -26, 1)
	pt3dadd(918.5, -182.5, -34.5, 1.5)
	pt3dadd(919.5, -183, -34.5, 1.5)
	pt3dadd(921.5, -183, -31.5, 1.2)
	pt3dadd(922.5, -183, -34.5, 1.3)
	pt3dadd(924.5, -182.5, -34.5, 1)
	pt3dadd(926, -181, -34.5, 1)
	pt3dadd(929, -180, -34.5, 1)
	pt3dadd(931, -180, -23.5, 1.4)
	pt3dadd(934, -180, -29, 1.5)
	pt3dadd(935, -179.5, -31.5, 1.7)
	pt3dadd(936.5, -179.5, -29, 2.1)
	pt3dadd(938.5, -179.5, -29, 1.5)
	pt3dadd(940, -179.5, -29, 1.2)
	pt3dadd(941.5, -178.5, -31.5, 1.3)
	pt3dadd(943, -176.5, -31.5, 1.3)
	pt3dadd(944.5, -175, -31.5, 1.1)
	pt3dadd(947.5, -174.5, -31.5, 1.2)
	pt3dadd(950, -172, -34.5, 1.1)
	pt3dadd(951, -169.5, -34.5, 1.2)
	pt3dadd(953, -169.5, -37, 1.2)
	pt3dadd(954.5, -169, -37, 1.2)
	pt3dadd(956.5, -169, -37, 1)
	pt3dadd(956.5, -170, -34.5, 1)
	pt3dadd(956.5, -171, -37, 1)
	pt3dadd(954.5, -170, -37, 1)
	pt3dadd(958.5, -170, -40, 0.8)
	pt3dadd(961.5, -169, -40, 0.8)
	pt3dadd(964, -167.5, -40, 0.8)
	pt3dadd(966.5, -166.5, -43, 0.6)
	pt3dadd(967.5, -166, -43, 0.8)
	pt3dadd(971.5, -166, -40, 0.8)
	pt3dadd(974, -168, -43.5, 0.8)
	pt3dadd(976, -169.5, -46, 0.8)
	pt3dadd(977.5, -170.5, -40.5, 1.6)
	pt3dadd(979.5, -172.5, -43.5, 1.1)
	pt3dadd(981, -174.5, -43.5, 0.9)
	pt3dadd(981, -177, -43.5, 1.2)
	pt3dadd(982.5, -178.5, -37.5, 1.3)
	pt3dadd(984.5, -181, -37.5, 0.9)
	pt3dadd(987, -181, -40.5, 0.9)
	pt3dadd(989, -183, -40.5, 0.9)
	pt3dadd(989, -185.5, -40.5, 0.7)
	pt3dadd(986.5, -187, -40.5, 0.7)
	pt3dadd(986.5, -188.5, -40.5, 1.1)
	pt3dadd(986.5, -189.5, -37.5, 1.6)
	pt3dadd(986.5, -191, -37.5, 1.6)
	pt3dadd(986.5, -192.5, -40.5, 1.1)
	pt3dadd(985, -194.5, -40.5, 0.8)
	pt3dadd(983, -195.5, -43.5, 0.7)
	pt3dadd(981, -197.5, -40.5, 0.8)
	pt3dadd(981, -198.5, -43.5, 0.8)
	pt3dadd(980.5, -200, -43.5, 0.8)
	pt3dadd(979.5, -202, -35, 0.6)
	pt3dadd(978.5, -203.5, -35, 0.8)
	pt3dadd(978.5, -205.5, -35, 0.8)
	pt3dadd(978.5, -207, -35, 0.6)
	pt3dadd(977, -210, -35, 0.6)
	pt3dadd(976, -211.5, -35, 0.9)
	pt3dadd(975, -212, -40.5, 1.2)
	pt3dadd(973.5, -214.5, -32, 1)
	pt3dadd(971.5, -216, -32, 0.7)
	pt3dadd(971, -219, -26.5, 0.8)
	pt3dadd(968.5, -219.5, -26.5, 0.7)
	pt3dadd(969, -222, -26.5, 0.9)
	pt3dadd(966.5, -224.5, -26.5, 0.9)
	pt3dadd(964, -226, -24, 0.9)
	pt3dadd(961.5, -226, -26.5, 1.1)
	pt3dadd(959.5, -227, -26.5, 1.1)
	pt3dadd(958, -227, -26.5, 0.8)
	pt3dadd(960, -228.5, -26.5, 0.8)
	pt3dadd(960, -230.5, -26.5, 0.8)
	pt3dadd(958, -232, -26.5, 0.8)
	pt3dadd(958, -233.5, -26.5, 0.8)
	pt3dadd(957.5, -235, -24, 1.6)
	pt3dadd(957.5, -236.5, -26.5, 2.5)
	pt3dadd(955, -238, -27, 0.7)
	pt3dadd(953.5, -239.5, -27, 0.5)
	pt3dadd(952, -241, -27, 0.6)
	pt3dadd(951, -243, -27, 0.6)
	pt3dadd(949.5, -244.5, -27, 0.6)
	pt3dadd(949.5, -246, -27, 0.6)
	pt3dadd(948.5, -248.5, -27, 0.6)
	pt3dadd(947.5, -250.5, -27, 0.6)
	pt3dadd(946.5, -253, -27, 0.6)
	pt3dadd(946.5, -255, -30, 0.6)
	pt3dadd(946, -256.5, -30, 0.6)
	pt3dadd(946, -258.5, -24.5, 0.8)
	pt3dadd(945.5, -260, -27, 1.1)
  }
  dend[43] {pt3dclear()
	pt3dadd(945.5, -260, -27, 1.1)
	pt3dadd(946.5, -260.5, -24.5, 0.7)
	pt3dadd(947, -258.5, -27, 0.7)
	pt3dadd(944.5, -258, -30, 0.7)
	pt3dadd(944.5, -255.5, -30, 0.7)
	pt3dadd(945.5, -252, -24.5, 0.9)
	pt3dadd(945.5, -249, -24.5, 0.9)
	pt3dadd(945.5, -247.5, -27, 0.8)
	pt3dadd(945.5, -246, -27, 0.8)
	pt3dadd(943, -246, -27, 0.8)
  }
  dend[44] {pt3dclear()
	pt3dadd(945.5, -260, -27, 1.1)
	pt3dadd(945, -262.5, -21.5, 0.6)
  }
}
proc shape3d_10() {
  dend[44] {	pt3dadd(944, -264.5, -19, 0.8)
	pt3dadd(942.5, -266, -21.5, 0.4)
  }
  dend[45] {pt3dclear()
	pt3dadd(482.5, 12.5, -36.5, 3.1)
	pt3dadd(483, 10, -36.5, 1.5)
	pt3dadd(484, 9.5, -37, 1.5)
	pt3dadd(488.5, 8.5, -37, 1.5)
	pt3dadd(491.5, 7, -37.5, 1.8)
	pt3dadd(493, 7, -37.5, 1.6)
	pt3dadd(494, 6.5, -41, 1.6)
	pt3dadd(495.5, 7.5, -38.5, 2.2)
	pt3dadd(496, 9.5, -36, 2.2)
	pt3dadd(497.5, 7, -39, 1.6)
	pt3dadd(498, 5.5, -51.5, 2.3)
	pt3dadd(500, 4.5, -54.5, 1.8)
	pt3dadd(501.5, 4, -54.5, 1.7)
	pt3dadd(503, 4, -55, 1.6)
	pt3dadd(504, 3, -55, 1.6)
	pt3dadd(503.5, 0.5, -55, 1.8)
	pt3dadd(503.5, -1.5, -53, 1.9)
	pt3dadd(503.5, -4, -53.5, 1.9)
	pt3dadd(505.5, -4, -59.5, 1.8)
	pt3dadd(508, -4, -59.5, 1.7)
	pt3dadd(509, -4, -62.5, 1.9)
	pt3dadd(511, -5, -62.5, 2.6)
	pt3dadd(511.5, -7, -60.5, 2.5)
	pt3dadd(511.5, -8.5, -60.5, 1.1)
	pt3dadd(513.5, -9.5, -63.5, 1.3)
	pt3dadd(515, -9.5, -61, 1.6)
	pt3dadd(516.5, -11.5, -61.5, 2.2)
	pt3dadd(518.5, -11, -64, 1.6)
	pt3dadd(521, -11, -64.5, 1.4)
	pt3dadd(522, -12.5, -64.5, 1.6)
	pt3dadd(523.5, -14, -65, 2.2)
	pt3dadd(524.5, -16, -71, 1.8)
	pt3dadd(525.5, -17.5, -71, 1.3)
	pt3dadd(527.5, -19, -71.5, 1.3)
	pt3dadd(528.5, -21, -75, 1.7)
  }
  dend[46] {pt3dclear()
	pt3dadd(175.5, -97, -36.5, 9.3)
	pt3dadd(179.5, -101, -42.5, 5.4)
	pt3dadd(181, -102, -42, 4.5)
	pt3dadd(183.5, -103, -42, 4.4)
	pt3dadd(186, -103, -42, 4.4)
	pt3dadd(187.5, -103.5, -33, 4.7)
	pt3dadd(189.5, -105, -35, 5.1)
	pt3dadd(191, -106.5, -41, 4.6)
	pt3dadd(191, -107.5, -34.5, 4.1)
	pt3dadd(193, -109.5, -40, 3.5)
	pt3dadd(195, -109.5, -34, 4.1)
	pt3dadd(197.5, -109.5, -33.5, 5)
	pt3dadd(200.5, -110.5, -33.5, 4.6)
	pt3dadd(203, -110.5, -36, 5)
	pt3dadd(204, -110.5, -36, 5)
	pt3dadd(209, -112, -33, 5.8)
	pt3dadd(211.5, -114, -32.5, 5.7)
	pt3dadd(211.5, -115.5, -30, 5.5)
	pt3dadd(215.5, -117, -32, 5.5)
	pt3dadd(217.5, -117.5, -32, 5)
	pt3dadd(219, -119, -37.5, 4.8)
	pt3dadd(220, -119.5, -31.5, 5.2)
	pt3dadd(223, -119.5, -31, 4.2)
	pt3dadd(226.5, -119.5, -37, 3.9)
	pt3dadd(228.5, -119.5, -39, 3.9)
	pt3dadd(230, -119.5, -39, 3.9)
	pt3dadd(232.5, -122, -36.5, 3.5)
	pt3dadd(234.5, -123.5, -38.5, 3.5)
	pt3dadd(237, -123.5, -38.5, 3.9)
	pt3dadd(240.5, -124, -41, 3.9)
	pt3dadd(243, -124.5, -41, 3.9)
	pt3dadd(245, -126, -43.5, 3.9)
	pt3dadd(248, -126.5, -37.5, 4.1)
	pt3dadd(249.5, -126, -40.5, 4.1)
	pt3dadd(251, -126, -28, 4.5)
	pt3dadd(253.5, -127.5, -31, 4.1)
	pt3dadd(256, -128.5, -33.5, 4.1)
	pt3dadd(257.5, -129.5, -25, 4.3)
	pt3dadd(262.5, -131, -26, 4.4)
	pt3dadd(263, -134.5, -30.5, 4.3)
	pt3dadd(265.5, -134.5, -16, 4.5)
	pt3dadd(268.5, -135.5, -16, 4.5)
	pt3dadd(271.5, -137.5, -17.5, 4.5)
	pt3dadd(275.5, -140, -23.5, 4.5)
	pt3dadd(278, -140.5, -23.5, 4.5)
	pt3dadd(281, -146, -14.5, 4.5)
	pt3dadd(285.5, -146, -16, 4.5)
	pt3dadd(287.5, -148.5, -17, 4.6)
	pt3dadd(289.5, -149, -17, 4.4)
	pt3dadd(292.5, -150.5, -19, 4.4)
	pt3dadd(297, -152.5, -16.5, 4.3)
	pt3dadd(299.5, -155, -16, 4.3)
	pt3dadd(301, -157, -18, 4.1)
	pt3dadd(303, -160, -16, 3.8)
	pt3dadd(304.5, -162, -17.5, 3.8)
	pt3dadd(306.5, -163.5, -17.5, 4.3)
	pt3dadd(309, -165, -20, 4.1)
	pt3dadd(311.5, -165, -20, 3.7)
	pt3dadd(313.5, -166.5, -21.5, 3.5)
	pt3dadd(315, -169, -21.5, 3.7)
	pt3dadd(317, -171.5, -17.5, 4.5)
	pt3dadd(319, -174.5, -21, 4.1)
	pt3dadd(321.5, -176, -20.5, 4.1)
	pt3dadd(324, -176, -23.5, 4.1)
	pt3dadd(325.5, -176.5, -18, 4)
	pt3dadd(327.5, -177.5, -18, 4)
	pt3dadd(329, -180.5, -21, 3.5)
	pt3dadd(332.5, -180.5, -16, 3.8)
	pt3dadd(335.5, -180.5, -15.5, 3.8)
	pt3dadd(337, -180.5, -15.5, 4)
	pt3dadd(338.5, -180.5, -17, 4.1)
	pt3dadd(341, -181, -11.5, 4.6)
	pt3dadd(343.5, -181, -13.5, 4.3)
	pt3dadd(348, -179, -13, 3.8)
	pt3dadd(350, -178.5, -13, 4)
	pt3dadd(353, -178.5, -12.5, 4)
	pt3dadd(355.5, -177.5, -12.5, 4.1)
	pt3dadd(359, -177.5, -13.5, 4.6)
	pt3dadd(361, -177.5, -13.5, 4.1)
	pt3dadd(363, -178.5, -13.5, 4.1)
	pt3dadd(364, -179, -15, 4)
	pt3dadd(368.5, -180.5, -5.5, 4.1)
	pt3dadd(370, -180.5, -11, 3.8)
	pt3dadd(373, -183, -12, 3.7)
	pt3dadd(374.5, -184.5, -10.5, 3.7)
	pt3dadd(377, -184.5, -11.5, 4.1)
	pt3dadd(379, -184.5, -11.5, 3.6)
	pt3dadd(382, -184.5, -4, 3.8)
	pt3dadd(384, -185.5, -2.5, 4.4)
	pt3dadd(386.5, -185.5, -3.5, 4.6)
	pt3dadd(390, -185.5, -3.5, 4)
	pt3dadd(392, -185.5, -3.5, 4)
	pt3dadd(395, -187.5, -5, 4)
	pt3dadd(397, -189.5, -5, 4.6)
	pt3dadd(399, -190, -4.5, 5.3)
  }
  dend[47] {pt3dclear()
	pt3dadd(399, -190, -4.5, 5.3)
	pt3dadd(398.5, -195, -4, 2.5)
	pt3dadd(400, -198, -11.5, 2.5)
	pt3dadd(400, -199.5, -13.5, 2.3)
	pt3dadd(402, -203, -14.5, 2.6)
	pt3dadd(403.5, -205.5, -15.5, 2.5)
	pt3dadd(404.5, -207.5, -16, 2.6)
	pt3dadd(406.5, -208.5, -16.5, 2.6)
	pt3dadd(407.5, -210, -17, 2.6)
	pt3dadd(408, -213, -18, 2.3)
	pt3dadd(408.5, -215, -18.5, 2.8)
	pt3dadd(409, -217.5, -15, 2.6)
	pt3dadd(410, -220.5, -21.5, 2.7)
	pt3dadd(411, -222, -22, 2.6)
	pt3dadd(412.5, -223.5, -22.5, 2.3)
	pt3dadd(414, -225.5, -23.5, 2.4)
	pt3dadd(415.5, -227, -25.5, 2.6)
	pt3dadd(417, -228, -25, 1.8)
	pt3dadd(419.5, -231.5, -35, 1.9)
	pt3dadd(421.5, -234, -37, 2.5)
	pt3dadd(421.5, -236.5, -38.5, 2.5)
	pt3dadd(423, -238.5, -37.5, 2.5)
	pt3dadd(423.5, -240, -36.5, 3.2)
  }
  dend[48] {pt3dclear()
	pt3dadd(423.5, -240, -36.5, 3.2)
	pt3dadd(421.5, -243, -36.5, 0.6)
	pt3dadd(420, -245, -37, 1)
	pt3dadd(419, -247, -46, 1)
	pt3dadd(417, -248, -46, 1)
	pt3dadd(415, -249.5, -46.5, 0.7)
	pt3dadd(416, -251.5, -46.5, 0.7)
	pt3dadd(418.5, -252.5, -46.5, 0.9)
	pt3dadd(418.5, -255, -47, 0.9)
	pt3dadd(416.5, -256.5, -47, 1.2)
	pt3dadd(415, -258.5, -47, 1.1)
	pt3dadd(415, -261, -47.5, 1.3)
	pt3dadd(415, -263.5, -53, 1.3)
	pt3dadd(414.5, -265, -53.5, 0.9)
	pt3dadd(415, -267, -53.5, 0.7)
	pt3dadd(414.5, -267.5, -53.5, 0.7)
	pt3dadd(412, -269, -53.5, 1)
	pt3dadd(410.5, -270.5, -54, 1)
	pt3dadd(410.5, -272.5, -59.5, 0.9)
	pt3dadd(409.5, -274.5, -60, 0.8)
	pt3dadd(407, -277, -60, 0.8)
	pt3dadd(406.5, -280, -60, 0.8)
	pt3dadd(406.5, -281.5, -60.5, 0.8)
	pt3dadd(406.5, -283, -60.5, 0.8)
	pt3dadd(408.5, -284.5, -53, 0.8)
	pt3dadd(408, -286.5, -53, 1.1)
	pt3dadd(406.5, -287.5, -56, 1.1)
	pt3dadd(405, -290, -56, 1.1)
	pt3dadd(405, -291.5, -53.5, 1.1)
	pt3dadd(405, -293.5, -54, 0.9)
	pt3dadd(405.5, -295.5, -56.5, 0.8)
	pt3dadd(405, -297, -60, 0.8)
	pt3dadd(405, -298.5, -57, 0.9)
	pt3dadd(405, -299.5, -57, 1)
	pt3dadd(404.5, -301.5, -57, 0.7)
	pt3dadd(405.5, -301.5, -57, 0.5)
	pt3dadd(405.5, -303.5, -57.5, 0.9)
	pt3dadd(404, -305.5, -55, 1.1)
	pt3dadd(404.5, -308, -61, 0.8)
	pt3dadd(405.5, -310, -58, 1.1)
	pt3dadd(407.5, -311.5, -64, 1.3)
	pt3dadd(407.5, -313.5, -64.5, 0.9)
	pt3dadd(406.5, -314.5, -64.5, 0.9)
	pt3dadd(405.5, -315.5, -64.5, 1.3)
	pt3dadd(405.5, -317, -67.5, 0.7)
  }
}
proc shape3d_11() {
  dend[48] {	pt3dadd(406.5, -318.5, -68, 1.1)
	pt3dadd(406, -320, -68, 1.1)
	pt3dadd(406, -321, -68, 1.2)
	pt3dadd(406, -323, -68, 1)
	pt3dadd(406.5, -324, -68, 0.8)
	pt3dadd(406.5, -325.5, -68, 0.8)
	pt3dadd(406.5, -326.5, -68.5, 0.8)
	pt3dadd(406.5, -328, -68.5, 0.7)
	pt3dadd(408.5, -328, -68.5, 0.6)
	pt3dadd(408.5, -329.5, -68.5, 0.6)
	pt3dadd(407, -329.5, -68.5, 0.6)
	pt3dadd(405.5, -330.5, -69, 0.9)
	pt3dadd(407, -332.5, -75, 0.9)
  }
  dend[49] {pt3dclear()
	pt3dadd(423.5, -240, -36.5, 3.2)
	pt3dadd(426, -240, -36.5, 2.5)
	pt3dadd(427.5, -240, -36.5, 2.3)
	pt3dadd(428.5, -242.5, -36.5, 2.5)
	pt3dadd(429.5, -244.5, -40, 2.3)
	pt3dadd(429.5, -246.5, -40, 2)
	pt3dadd(431, -248, -40, 2)
	pt3dadd(433, -249.5, -40, 2)
	pt3dadd(436, -252, -37.5, 2)
	pt3dadd(438, -253.5, -43.5, 1.6)
	pt3dadd(439, -255, -43.5, 1.6)
	pt3dadd(439, -258.5, -43.5, 1.8)
	pt3dadd(439, -261.5, -44, 1.6)
	pt3dadd(440, -263, -41, 2)
	pt3dadd(442.5, -263.5, -41, 1.9)
	pt3dadd(444, -264, -41, 1.9)
	pt3dadd(446, -264, -44, 1.6)
	pt3dadd(448, -264.5, -41.5, 1.7)
	pt3dadd(449.5, -264.5, -44.5, 1.8)
	pt3dadd(451, -265, -44.5, 1.9)
	pt3dadd(452.5, -267, -44.5, 2)
	pt3dadd(453.5, -269, -44.5, 1.7)
	pt3dadd(455.5, -270.5, -47.5, 1.5)
	pt3dadd(457, -271.5, -47.5, 1.8)
	pt3dadd(459.5, -272, -47.5, 2)
	pt3dadd(460.5, -275, -47.5, 1.9)
	pt3dadd(460.5, -276.5, -47.5, 1.5)
	pt3dadd(461, -279.5, -47.5, 1.7)
	pt3dadd(462, -281, -48, 2)
	pt3dadd(462, -282, -48, 1.7)
	pt3dadd(462, -284.5, -48, 1.6)
	pt3dadd(462, -286, -48, 2.4)
	pt3dadd(464.5, -289, -48, 2.1)
	pt3dadd(466, -291.5, -51, 1.8)
	pt3dadd(467.5, -293, -51.5, 1.6)
	pt3dadd(467.5, -295.5, -51.5, 2.2)
	pt3dadd(468.5, -297, -51.5, 2.3)
	pt3dadd(470.5, -299, -51.5, 1.4)
	pt3dadd(470.5, -301, -51.5, 1.3)
	pt3dadd(474.5, -303, -52, 1.8)
	pt3dadd(476.5, -303, -52, 1.9)
	pt3dadd(478.5, -305, -52, 1.3)
	pt3dadd(481.5, -306.5, -52, 1.3)
	pt3dadd(483, -308.5, -52, 1.6)
	pt3dadd(483, -311.5, -52.5, 1.3)
	pt3dadd(484, -314, -41, 2)
	pt3dadd(486.5, -316, -47.5, 1.8)
	pt3dadd(490, -318.5, -47.5, 1.5)
	pt3dadd(492, -320, -50, 1.5)
	pt3dadd(494.5, -321, -48, 1.7)
	pt3dadd(497, -321, -48, 1.9)
	pt3dadd(498.5, -324, -50.5, 1.9)
	pt3dadd(500, -325, -50.5, 1.9)
	pt3dadd(502, -324.5, -50.5, 1.7)
	pt3dadd(503.5, -324.5, -54, 1.5)
	pt3dadd(506.5, -326.5, -42.5, 2.4)
	pt3dadd(509, -328.5, -43, 2.7)
	pt3dadd(511.5, -328.5, -46, 2.5)
	pt3dadd(514, -330, -46, 1.6)
	pt3dadd(514, -331.5, -46, 1.6)
	pt3dadd(517, -331.5, -46, 1.6)
	pt3dadd(518.5, -332.5, -46.5, 1.8)
	pt3dadd(520.5, -334, -46.5, 1.7)
	pt3dadd(522.5, -336, -46.5, 1.9)
	pt3dadd(526.5, -341, -43.5, 1.5)
	pt3dadd(528.5, -344, -41.5, 1.5)
	pt3dadd(530, -346.5, -41.5, 1.5)
	pt3dadd(531, -349, -41.5, 1.5)
	pt3dadd(531.5, -350.5, -44, 1.5)
	pt3dadd(531.5, -353.5, -47.5, 1.6)
	pt3dadd(531.5, -355, -47.5, 1.6)
	pt3dadd(533, -357, -47.5, 1.7)
	pt3dadd(534.5, -358.5, -47.5, 1.7)
	pt3dadd(536, -360, -47.5, 1.5)
	pt3dadd(537, -362, -47.5, 1.2)
	pt3dadd(536.5, -364, -51, 1.8)
	pt3dadd(536, -366, -42.5, 3.4)
	pt3dadd(536, -368, -45.5, 1.7)
	pt3dadd(536.5, -369.5, -45.5, 1.6)
	pt3dadd(536.5, -372, -45.5, 1.6)
	pt3dadd(536.5, -374, -51.5, 1.9)
	pt3dadd(536.5, -376, -51.5, 1.6)
	pt3dadd(538.5, -377.5, -52, 1.3)
	pt3dadd(540, -379, -52, 1.3)
	pt3dadd(540.5, -380.5, -52, 1.7)
	pt3dadd(541, -383.5, -52, 2.2)
	pt3dadd(543, -387, -49, 2.2)
	pt3dadd(545, -389, -52.5, 1.8)
	pt3dadd(546.5, -390.5, -55, 1.6)
	pt3dadd(547.5, -392, -55, 1.5)
	pt3dadd(549.5, -393, -55, 1.7)
	pt3dadd(551, -393, -55, 1.6)
	pt3dadd(552.5, -393, -58.5, 1.2)
	pt3dadd(553, -395.5, -58.5, 1.2)
	pt3dadd(554.5, -397.5, -61, 1)
	pt3dadd(556, -398, -64, 1)
	pt3dadd(556.5, -400.5, -64, 1.1)
	pt3dadd(554, -402.5, -61.5, 1.1)
	pt3dadd(554, -405.5, -59, 1.6)
	pt3dadd(555.5, -408.5, -59, 1.6)
	pt3dadd(558, -410, -59, 1.5)
	pt3dadd(560, -412.5, -62, 1.5)
	pt3dadd(559.5, -415.5, -62, 1.4)
	pt3dadd(557.5, -418.5, -62, 1.5)
	pt3dadd(557.5, -421, -62, 1.4)
	pt3dadd(557.5, -423.5, -62.5, 1.1)
	pt3dadd(557.5, -425, -62.5, 1.1)
	pt3dadd(556, -426, -62.5, 1)
	pt3dadd(553, -427.5, -62.5, 0.8)
	pt3dadd(553, -429, -65.5, 1.6)
	pt3dadd(553.5, -431, -68, 2.1)
	pt3dadd(555.5, -432, -68.5, 1.2)
	pt3dadd(556.5, -432.5, -68.5, 1)
	pt3dadd(559.5, -433, -68.5, 1)
	pt3dadd(562, -433, -71.5, 1)
	pt3dadd(564, -433, -71.5, 1)
	pt3dadd(566, -433.5, -71.5, 1.3)
	pt3dadd(568.5, -435, -72, 2.4)
	pt3dadd(570, -435, -72, 1.6)
	pt3dadd(573, -435, -72, 1)
	pt3dadd(575, -436.5, -72, 1)
	pt3dadd(576, -436.5, -72, 1)
	pt3dadd(577.5, -435.5, -69, 1.6)
	pt3dadd(579, -435.5, -69.5, 1.6)
	pt3dadd(579.5, -438, -75, 1.3)
	pt3dadd(579.5, -440, -75, 0.9)
	pt3dadd(581, -442.5, -75, 0.8)
	pt3dadd(582.5, -444, -78.5, 1.1)
	pt3dadd(584, -445, -78.5, 1.4)
	pt3dadd(583.5, -447.5, -78.5, 1.5)
	pt3dadd(583.5, -448.5, -78.5, 0.9)
	pt3dadd(585, -450, -78.5, 0.9)
	pt3dadd(587, -452.5, -78.5, 1)
	pt3dadd(587, -455, -79, 1.1)
	pt3dadd(587, -457, -79, 1.1)
	pt3dadd(587, -458.5, -79, 2.2)
	pt3dadd(589, -460.5, -65.5, 1)
	pt3dadd(591, -462.5, -65.5, 1.3)
	pt3dadd(593.5, -462.5, -65.5, 1.3)
	pt3dadd(596.5, -464.5, -77, 0.9)
	pt3dadd(598, -467, -74.5, 1.4)
	pt3dadd(600.5, -467, -77, 1.5)
	pt3dadd(601.5, -469, -77.5, 0.9)
	pt3dadd(601.5, -472, -77.5, 1)
	pt3dadd(604, -474, -77.5, 1)
	pt3dadd(606, -474, -77.5, 1.3)
	pt3dadd(607.5, -474.5, -77.5, 1.5)
	pt3dadd(609.5, -476.5, -78, 1.7)
	pt3dadd(612, -478, -78, 1)
	pt3dadd(614.5, -477, -67.5, 1.3)
	pt3dadd(617, -477, -67.5, 1.3)
	pt3dadd(618.5, -477, -67.5, 1.3)
	pt3dadd(618, -478, -67.5, 1.9)
	pt3dadd(620, -478.5, -70.5, 1.6)
	pt3dadd(622, -478.5, -73, 0.9)
	pt3dadd(623.5, -477, -76.5, 1.2)
	pt3dadd(625.5, -476.5, -76.5, 1.2)
	pt3dadd(626, -475.5, -76.5, 1.2)
	pt3dadd(626.5, -475.5, -76.5, 1.2)
	pt3dadd(628.5, -475.5, -79, 1.6)
	pt3dadd(629.5, -476, -79, 1.1)
	pt3dadd(630.5, -477, -76.5, 0.8)
	pt3dadd(633, -477, -79.5, 0.8)
	pt3dadd(634.5, -479, -74, 1)
	pt3dadd(637.5, -481, -74, 0.8)
	pt3dadd(639.5, -481, -74, 0.8)
	pt3dadd(640.5, -482, -74.5, 1.3)
	pt3dadd(642.5, -482, -80, 1.1)
	pt3dadd(644.5, -482.5, -80, 1.1)
	pt3dadd(646.5, -482.5, -75, 1)
  }
  dend[50] {pt3dclear()
	pt3dadd(399, -190, -4.5, 5.3)
	pt3dadd(403, -189.5, -6, 3.1)
	pt3dadd(405.5, -189.5, -5.5, 3.1)
	pt3dadd(407, -190, 0, 3.2)
	pt3dadd(409, -191, -1, 3.6)
	pt3dadd(412, -191, -1, 4.1)
	pt3dadd(413.5, -191, -2.5, 4.1)
	pt3dadd(415.5, -190, -2.5, 2.7)
	pt3dadd(419.5, -188, -3.5, 2.8)
	pt3dadd(420, -188, 3.5, 3.3)
	pt3dadd(423, -188.5, 2, 3.7)
	pt3dadd(425, -188.5, 1, 3.7)
	pt3dadd(427.5, -188.5, 0, 2.9)
	pt3dadd(429.5, -187, 0, 2.4)
	pt3dadd(431.5, -187, 0, 3.4)
	pt3dadd(433.5, -187, 0, 3.4)
	pt3dadd(436, -186.5, 4, 3.2)
  }
}
proc shape3d_12() {
  dend[50] {	pt3dadd(438, -186.5, 7.5, 3.2)
	pt3dadd(440, -187, 7.5, 2.7)
	pt3dadd(441.5, -187, 7.5, 2.7)
	pt3dadd(443.5, -188, 8, 3.2)
	pt3dadd(446.5, -188, 7, 3.2)
	pt3dadd(448.5, -188, 5.5, 3.1)
	pt3dadd(450.5, -188, 9, 2.7)
	pt3dadd(454, -189.5, 8, 3.2)
	pt3dadd(457, -187.5, 8, 2.8)
	pt3dadd(460, -186.5, 8.5, 3.2)
	pt3dadd(462.5, -187, 9, 3)
	pt3dadd(464, -188.5, 13, 2.5)
	pt3dadd(466, -190, 11, 2.9)
	pt3dadd(469, -188, 11.5, 3.2)
	pt3dadd(472, -188, 10.5, 3.2)
	pt3dadd(474, -189, 12, 2.7)
	pt3dadd(475, -190.5, 11, 2.6)
	pt3dadd(477.5, -191, 11, 2.5)
	pt3dadd(479.5, -191, 10, 2.2)
	pt3dadd(483, -191, 10.5, 1.7)
	pt3dadd(486, -191, 13.5, 2)
	pt3dadd(489.5, -191, 14, 2.6)
	pt3dadd(491.5, -190, 13, 3.4)
	pt3dadd(495, -191, 13, 2.9)
	pt3dadd(497.5, -191, 13.5, 2.8)
	pt3dadd(500, -191, 17.5, 2.6)
	pt3dadd(502, -191, 16, 2.6)
	pt3dadd(504, -189.5, 16, 2.2)
	pt3dadd(506.5, -189.5, 15, 2.2)
	pt3dadd(509.5, -188.5, 22, 2.6)
	pt3dadd(510.5, -187, 22.5, 2.5)
	pt3dadd(513, -186, 19.5, 2.5)
	pt3dadd(515.5, -186, 25, 2.2)
	pt3dadd(517.5, -185, 27.5, 3.5)
	pt3dadd(519.5, -185, 27.5, 3.2)
	pt3dadd(521, -185, 25, 2.6)
	pt3dadd(523, -185, 25, 2.5)
	pt3dadd(524.5, -185.5, 25, 2.5)
	pt3dadd(526.5, -186, 27.5, 2.6)
	pt3dadd(528.5, -186, 29.5, 3.1)
	pt3dadd(530.5, -186.5, 31.5, 3.1)
	pt3dadd(532, -188, 29.5, 2.6)
	pt3dadd(534.5, -188, 29.5, 2.5)
	pt3dadd(536, -188.5, 29.5, 2.9)
	pt3dadd(537, -190.5, 29.5, 3)
	pt3dadd(539, -190.5, 29.5, 3.7)
	pt3dadd(541, -190.5, 25, 2.7)
	pt3dadd(543, -190.5, 27.5, 2.7)
	pt3dadd(545.5, -190.5, 29.5, 3.1)
	pt3dadd(546.5, -191.5, 29.5, 3.1)
	pt3dadd(549.5, -192, 29.5, 3.1)
	pt3dadd(551.5, -192, 31.5, 3.2)
	pt3dadd(555, -194.5, 31.5, 3.3)
	pt3dadd(557.5, -196, 31.5, 3.3)
	pt3dadd(559.5, -197.5, 31.5, 3.3)
	pt3dadd(560.5, -199.5, 31.5, 2.9)
	pt3dadd(562.5, -201, 31.5, 2.9)
	pt3dadd(565, -200.5, 34, 2.3)
	pt3dadd(565, -199, 34, 2.3)
	pt3dadd(565, -198, 34, 2.3)
	pt3dadd(565, -197, 34, 2.3)
	pt3dadd(565, -195.5, 34, 2.3)
	pt3dadd(566, -194.5, 34, 2.7)
	pt3dadd(566, -193.5, 34, 2.2)
	pt3dadd(567.5, -192.5, 34, 2)
	pt3dadd(568.5, -191, 34, 2)
	pt3dadd(572, -190, 42.5, 2)
	pt3dadd(572.5, -189, 42.5, 2.6)
	pt3dadd(575, -187.5, 42.5, 2.7)
	pt3dadd(576.5, -185, 40.5, 2.7)
	pt3dadd(578.5, -184, 40.5, 3.1)
	pt3dadd(580, -181.5, 42.5, 2.5)
	pt3dadd(580, -180, 42.5, 2.5)
	pt3dadd(581.5, -178, 40.5, 2.5)
	pt3dadd(583, -177, 44.5, 2.2)
	pt3dadd(584, -176, 44.5, 2.2)
	pt3dadd(585.5, -174.5, 44.5, 2.5)
	pt3dadd(587.5, -174.5, 42.5, 2.8)
	pt3dadd(589.5, -173.5, 42.5, 2.8)
	pt3dadd(592, -173.5, 42.5, 2.5)
	pt3dadd(595, -173.5, 38, 2.2)
	pt3dadd(597, -173.5, 38, 2.2)
	pt3dadd(598.5, -172, 36, 2.2)
	pt3dadd(603, -168.5, 36, 2.2)
	pt3dadd(606, -168.5, 38, 1.9)
	pt3dadd(608.5, -166.5, 38, 2.3)
	pt3dadd(608.5, -164.5, 38, 2.3)
	pt3dadd(610, -163, 38, 2.3)
	pt3dadd(612, -162, 38, 2.3)
	pt3dadd(613, -162, 40.5, 2.8)
	pt3dadd(615, -161.5, 40.5, 3.3)
	pt3dadd(616, -161, 40.5, 3.4)
	pt3dadd(618, -159, 38, 3.8)
	pt3dadd(619.5, -158, 38, 2.8)
	pt3dadd(622, -156.5, 38, 2.8)
	pt3dadd(623, -156, 36, 2.5)
	pt3dadd(624, -154.5, 36, 2.3)
	pt3dadd(626, -153, 34, 2.4)
	pt3dadd(627, -152, 34, 2.3)
	pt3dadd(629.5, -151, 34, 2.1)
	pt3dadd(632, -149.5, 31.5, 2.1)
	pt3dadd(634, -149.5, 34, 2.1)
	pt3dadd(636, -149.5, 34, 2)
	pt3dadd(638.5, -147.5, 34, 2)
	pt3dadd(640.5, -146, 34, 2)
	pt3dadd(642, -144.5, 34, 2)
	pt3dadd(643.5, -143.5, 34, 2.2)
	pt3dadd(646, -142, 34, 2.5)
	pt3dadd(647.5, -142, 31.5, 2.1)
	pt3dadd(649.5, -140.5, 36, 1.9)
	pt3dadd(651.5, -140.5, 36, 2)
	pt3dadd(653, -140.5, 34, 2.2)
	pt3dadd(657, -139, 38, 2.2)
	pt3dadd(659, -137, 36, 2.2)
	pt3dadd(660.5, -137, 36, 2.2)
	pt3dadd(662.5, -136.5, 36, 2.2)
	pt3dadd(664.5, -135, 34, 2.2)
	pt3dadd(665.5, -133.5, 34, 2.2)
	pt3dadd(667, -132.5, 34, 2.2)
	pt3dadd(668.5, -131, 34, 2.2)
	pt3dadd(670.5, -129, 34, 2.2)
	pt3dadd(671, -127.5, 34, 2.4)
	pt3dadd(673, -126, 34, 2.4)
	pt3dadd(674.5, -125, 34, 2.2)
	pt3dadd(676, -124, 34, 2.2)
	pt3dadd(678, -122, 40.5, 2.8)
	pt3dadd(681, -121.5, 36, 2.6)
	pt3dadd(683, -120.5, 36, 2.6)
	pt3dadd(685, -119, 36, 2.6)
	pt3dadd(686.5, -118.5, 36, 2.1)
	pt3dadd(688.5, -117, 36, 2.5)
	pt3dadd(690, -116, 36, 2.5)
	pt3dadd(690.5, -114.5, 36, 2.5)
	pt3dadd(692, -113.5, 34, 2.5)
	pt3dadd(693.5, -112.5, 34, 2.5)
	pt3dadd(694.5, -111, 36, 2.3)
	pt3dadd(695.5, -109.5, 36, 2.5)
	pt3dadd(698, -109.5, 34, 2.5)
	pt3dadd(700, -109.5, 34, 2.5)
	pt3dadd(700.5, -109, 31.5, 2.5)
	pt3dadd(704, -108, 38, 2.5)
	pt3dadd(705.5, -107, 38, 2)
	pt3dadd(706.5, -105.5, 38, 2)
	pt3dadd(708.5, -103.5, 38, 2.5)
	pt3dadd(710.5, -103.5, 38, 2.8)
	pt3dadd(712.5, -102.5, 36, 2.8)
	pt3dadd(714, -101, 36, 2.8)
	pt3dadd(716, -100, 38, 2.8)
	pt3dadd(718, -100, 38, 2.8)
	pt3dadd(721, -98, 38, 2.8)
	pt3dadd(722, -97, 38, 2.3)
	pt3dadd(723.5, -95, 44.5, 3.4)
	pt3dadd(727, -95.5, 42.5, 3.8)
	pt3dadd(728.5, -95.5, 42.5, 2.9)
	pt3dadd(730.5, -95, 42.5, 1.8)
	pt3dadd(732, -93, 42.5, 2.2)
	pt3dadd(733.5, -91.5, 42.5, 2.5)
	pt3dadd(735.5, -90, 42.5, 2.6)
	pt3dadd(737, -89.5, 40.5, 2.3)
	pt3dadd(739, -88.5, 38, 2.3)
	pt3dadd(741, -88.5, 38, 2.3)
	pt3dadd(743.5, -87.5, 38, 2.1)
	pt3dadd(745, -87, 36, 1.9)
	pt3dadd(747.5, -85.5, 36, 1.7)
	pt3dadd(749.5, -84.5, 36, 1.4)
	pt3dadd(751.5, -81.5, 36, 1.4)
	pt3dadd(751.5, -80, 36, 2)
	pt3dadd(751.5, -77, 36, 2)
	pt3dadd(751.5, -75, 36, 2)
	pt3dadd(752, -73, 36, 2)
	pt3dadd(754, -72, 36, 2.2)
	pt3dadd(754, -70, 36, 1.5)
	pt3dadd(754, -69, 36, 1.5)
	pt3dadd(756, -68.5, 36, 1.5)
	pt3dadd(757.5, -69, 38, 1.9)
	pt3dadd(759, -69, 34, 2.1)
	pt3dadd(761.5, -69, 34, 2.2)
	pt3dadd(762.5, -69, 34, 1.8)
	pt3dadd(764.5, -69, 31.5, 1.8)
	pt3dadd(766, -69, 31.5, 1.9)
	pt3dadd(767.5, -69, 31.5, 2.3)
	pt3dadd(768, -69, 31.5, 2.2)
	pt3dadd(769, -69.5, 29.5, 2.2)
	pt3dadd(770.5, -69.5, 27.5, 1.6)
	pt3dadd(772, -69, 27.5, 1.6)
	pt3dadd(773, -69, 25, 1.6)
	pt3dadd(774.5, -67.5, 25, 1.6)
	pt3dadd(776.5, -67.5, 25, 2)
	pt3dadd(778.5, -67, 36, 2.3)
	pt3dadd(780.5, -66.5, 36, 2.5)
	pt3dadd(782.5, -65.5, 34, 2.2)
	pt3dadd(783.5, -64.5, 34, 2.1)
	pt3dadd(785, -64.5, 34, 2.3)
	pt3dadd(786.5, -65, 34, 2.3)
	pt3dadd(788.5, -66.5, 36, 2.7)
	pt3dadd(790.5, -66.5, 34, 2.7)
	pt3dadd(792, -65.5, 27.5, 1.9)
	pt3dadd(793.5, -64, 25, 2.2)
	pt3dadd(796, -62.5, 23, 2.2)
	pt3dadd(797.5, -61.5, 23, 2.2)
  }
}
proc shape3d_13() {
  dend[50] {	pt3dadd(800.5, -60.5, 25, 2.2)
	pt3dadd(803, -60, 29.5, 2.1)
	pt3dadd(805, -59, 29.5, 2.1)
	pt3dadd(805, -56.5, 29.5, 2.1)
	pt3dadd(805.5, -56.5, 25, 2.1)
  }
  dend[51] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 11.6)
	pt3dadd(-3.5, -61.5, 3.5, 11.6)
	pt3dadd(-0.5, -66, 0.5, 10.3)
	pt3dadd(2.5, -68.5, -0.5, 9.5)
	pt3dadd(4.5, -71.5, -3, 9.2)
	pt3dadd(8, -74, -3, 10.1)
	pt3dadd(10.5, -77.5, 0, 12.4)
  }
  dend[52] {pt3dclear()
	pt3dadd(10.5, -77.5, 0, 12.4)
	pt3dadd(15, -75, 8, 5.8)
	pt3dadd(18.5, -73.5, 9, 5.5)
	pt3dadd(22, -71, 4, 4.3)
	pt3dadd(25.5, -69, 5, 3.4)
	pt3dadd(28.5, -67, 4, 3)
	pt3dadd(31, -65, 3, 3)
	pt3dadd(33, -62, 3.5, 2.8)
	pt3dadd(36, -60, 3, 2.2)
	pt3dadd(38.5, -59, 3.5, 2.5)
	pt3dadd(42.5, -56, 10, 2.5)
	pt3dadd(45.5, -54.5, 9, 2.5)
	pt3dadd(47, -53, 13, 2.5)
	pt3dadd(49.5, -51.5, 13.5, 2.9)
	pt3dadd(51.5, -49, 14, 3.2)
	pt3dadd(53, -48, 14.5, 3.2)
	pt3dadd(55, -47, 15, 3)
	pt3dadd(58, -44, 17.5, 3)
	pt3dadd(60.5, -42.5, 16.5, 3.5)
	pt3dadd(63, -39, 17.5, 3)
	pt3dadd(65.5, -36, 18, 2.8)
	pt3dadd(67.5, -33, 19, 2.8)
	pt3dadd(70.5, -30, 17, 2.8)
	pt3dadd(70.5, -30, 25, 2.2)
  }
  dend[53] {pt3dclear()
	pt3dadd(10.5, -77.5, 0, 12.4)
	pt3dadd(13, -84, -1, 8.7)
	pt3dadd(15, -89, 1, 8.7)
	pt3dadd(17, -92.5, 1, 8)
	pt3dadd(20, -96, 0, 7.5)
	pt3dadd(22, -99, 0, 7.8)
	pt3dadd(24, -102, 0, 10)
	pt3dadd(25.5, -103.5, 0, 11)
  }
  dend[54] {pt3dclear()
	pt3dadd(25.5, -103.5, 0, 11)
	pt3dadd(32, -104.5, 1, 5.1)
	pt3dadd(35.5, -107, 1.5, 4)
	pt3dadd(38.5, -107, 1.5, 4.3)
	pt3dadd(40.5, -107.5, 1.5, 4.7)
	pt3dadd(43, -110, 0, 4.1)
	pt3dadd(47, -110, 0.5, 3.6)
	pt3dadd(50.5, -110, -0.5, 3.6)
	pt3dadd(53.5, -110.5, -0.5, 3.6)
	pt3dadd(57, -110.5, -2, 4)
	pt3dadd(60.5, -110.5, -3.5, 3.8)
	pt3dadd(63.5, -110.5, -2, 4.1)
	pt3dadd(66, -110.5, 0, 4.1)
	pt3dadd(69, -111.5, -1.5, 4.1)
	pt3dadd(72, -112.5, 0, 4)
	pt3dadd(73, -115.5, 0, 4.1)
	pt3dadd(74.5, -118, 0, 3.7)
	pt3dadd(76, -119, 0.5, 4)
	pt3dadd(77.5, -120, 0.5, 4.3)
	pt3dadd(80.5, -121.5, -1, 4.5)
	pt3dadd(82, -124, -1, 4.5)
	pt3dadd(84, -126, -2, 3.6)
	pt3dadd(86.5, -126, -2, 3.6)
	pt3dadd(88, -127.5, -0.5, 3.1)
	pt3dadd(90.5, -128, -2, 3)
	pt3dadd(92, -130, -1.5, 3.1)
	pt3dadd(93.5, -132, -1.5, 3.7)
	pt3dadd(95, -134.5, -3.5, 2.9)
	pt3dadd(96.5, -136, 0, 3.7)
	pt3dadd(97.5, -138.5, 2, 4.1)
	pt3dadd(100, -140.5, 0, 3.6)
	pt3dadd(102, -144.5, 0, 3.3)
	pt3dadd(104.5, -147, 0.5, 3.5)
	pt3dadd(107, -148.5, 0.5, 3.5)
	pt3dadd(109, -150.5, -0.5, 4.1)
	pt3dadd(111.5, -152.5, -0.5, 4)
	pt3dadd(113, -154, 0, 4.5)
	pt3dadd(116, -155.5, 0, 3.6)
	pt3dadd(118.5, -155.5, 0, 3.2)
	pt3dadd(120.5, -155.5, 0, 3.8)
	pt3dadd(123.5, -157.5, -1.5, 3.9)
	pt3dadd(125.5, -158, 3.5, 4)
	pt3dadd(128.5, -160, 0, 3.7)
	pt3dadd(128.5, -162.5, 0.5, 3)
	pt3dadd(130.5, -165, 7, 3.5)
	pt3dadd(132.5, -166.5, 4.5, 4.3)
	pt3dadd(135, -168.5, 4.5, 5.2)
	pt3dadd(136, -171.5, 4.5, 4.6)
	pt3dadd(138.5, -174, 4.5, 3.7)
	pt3dadd(141, -175.5, 3, 4.2)
	pt3dadd(142.5, -178.5, 1.5, 4)
	pt3dadd(144, -182.5, 5, 4.1)
	pt3dadd(147, -184.5, 5.5, 3.7)
	pt3dadd(148.5, -186.5, 5.5, 3.3)
	pt3dadd(149.5, -188, 10, 3.9)
	pt3dadd(153, -190, 12.5, 4.3)
	pt3dadd(155.5, -191, 9, 3.4)
	pt3dadd(157.5, -192.5, 6, 4)
	pt3dadd(160, -192.5, 4.5, 3.7)
	pt3dadd(163, -193.5, 4.5, 3.8)
	pt3dadd(166.5, -196.5, 4.5, 3.4)
	pt3dadd(168.5, -199.5, 5, 3.4)
	pt3dadd(169.5, -203, 5, 3.2)
	pt3dadd(172, -205, 5, 4.1)
	pt3dadd(174, -206.5, 5, 4.5)
	pt3dadd(176.5, -210, 12, 4.6)
	pt3dadd(179, -213, 11, 4.6)
	pt3dadd(180.5, -214.5, 12.5, 4.6)
	pt3dadd(183.5, -215, 11, 3.8)
	pt3dadd(186, -215, 9.5, 4.3)
	pt3dadd(188, -218, 10, 4.2)
	pt3dadd(190, -224, 10, 4.5)
	pt3dadd(192.5, -226, 10, 3.7)
	pt3dadd(194.5, -228, 10.5, 3.9)
	pt3dadd(195.5, -231, 15.5, 4.2)
	pt3dadd(197.5, -233, 13.5, 4)
	pt3dadd(199.5, -234, 14, 4.1)
	pt3dadd(202, -234.5, 12.5, 3.4)
	pt3dadd(204.5, -234.5, 12.5, 3)
	pt3dadd(205.5, -236.5, 14, 3)
	pt3dadd(207, -238, 14, 3.3)
	pt3dadd(208.5, -240.5, 14.5, 3.3)
	pt3dadd(210.5, -243, 14.5, 3)
	pt3dadd(212, -243.5, 14.5, 3)
	pt3dadd(214.5, -245.5, 10.5, 3.4)
	pt3dadd(214, -249, 17, 3.2)
	pt3dadd(216, -250.5, 15, 3.1)
	pt3dadd(217.5, -251.5, 14, 3.7)
	pt3dadd(219.5, -254.5, 14, 3.5)
	pt3dadd(220, -256.5, 14, 2.8)
	pt3dadd(221.5, -258, 14, 2.8)
	pt3dadd(223.5, -260, 16, 4.1)
	pt3dadd(225.5, -262.5, 14.5, 3.4)
	pt3dadd(227.5, -264, 16, 3.1)
	pt3dadd(228.5, -266, 16, 4.1)
	pt3dadd(228.5, -268, 16, 3.5)
	pt3dadd(229, -270.5, 16.5, 3.3)
	pt3dadd(230, -272.5, 16.5, 3.3)
	pt3dadd(231.5, -274.5, 16.5, 3.4)
	pt3dadd(233, -277, 15, 3)
	pt3dadd(233.5, -279, 17, 3)
	pt3dadd(233.5, -281.5, 19, 3.2)
	pt3dadd(233.5, -284, 19, 3.7)
	pt3dadd(235.5, -286, 19, 3.4)
	pt3dadd(237.5, -289, 19.5, 3.8)
	pt3dadd(238.5, -291.5, 19.5, 3.7)
	pt3dadd(239.5, -294.5, 19.5, 3.7)
	pt3dadd(240, -297, 19.5, 3.7)
	pt3dadd(241.5, -299, 24.5, 3.8)
	pt3dadd(242, -301.5, 23, 3.5)
	pt3dadd(242.5, -304, 23, 3.7)
	pt3dadd(242.5, -307.5, 23, 3.7)
	pt3dadd(242, -310.5, 23.5, 3.6)
	pt3dadd(243.5, -314, 23.5, 3.5)
	pt3dadd(243.5, -316.5, 23.5, 3.5)
	pt3dadd(244.5, -319.5, 22, 3.4)
	pt3dadd(246.5, -323, 22.5, 3.7)
	pt3dadd(248.5, -326, 22.5, 4.1)
	pt3dadd(250.5, -327.5, 22.5, 4.3)
	pt3dadd(250.5, -330.5, 26, 4)
	pt3dadd(251, -332, 29.5, 3.4)
	pt3dadd(254, -333, 25, 3.2)
	pt3dadd(255.5, -334.5, 27, 3.7)
	pt3dadd(258.5, -336.5, 30, 3.7)
	pt3dadd(258.5, -338.5, 30.5, 3.7)
	pt3dadd(259.5, -341, 32.5, 3.7)
	pt3dadd(261.5, -343, 33, 3.7)
	pt3dadd(262.5, -345.5, 35.5, 3.4)
	pt3dadd(263.5, -347.5, 34, 3.4)
	pt3dadd(265, -349.5, 39, 3)
	pt3dadd(266, -350.5, 35, 2.9)
	pt3dadd(268, -350.5, 37.5, 2.9)
	pt3dadd(269, -353, 35.5, 3.2)
	pt3dadd(270.5, -355, 36, 3.3)
	pt3dadd(270.5, -356, 38, 3.8)
	pt3dadd(272, -357.5, 38.5, 2.8)
	pt3dadd(274, -359, 38.5, 2.8)
	pt3dadd(275, -362, 37, 3.5)
	pt3dadd(276, -365, 33.5, 3.2)
	pt3dadd(275.5, -367, 33.5, 2.8)
	pt3dadd(276, -369.5, 36.5, 2.3)
	pt3dadd(276, -372, 41, 2.8)
	pt3dadd(277.5, -372.5, 41, 2.8)
	pt3dadd(279, -374.5, 41.5, 2.8)
	pt3dadd(281, -376.5, 42, 2.8)
	pt3dadd(283, -377.5, 40, 3.5)
	pt3dadd(285, -379.5, 42.5, 3.8)
	pt3dadd(287, -379.5, 43, 3.7)
	pt3dadd(289.5, -380, 43, 3.7)
	pt3dadd(290, -381.5, 43.5, 3.5)
	pt3dadd(291, -383.5, 43.5, 4.2)
	pt3dadd(291, -385.5, 44, 3.7)
	pt3dadd(291, -387.5, 44, 3.7)
	pt3dadd(291, -389.5, 42.5, 3.4)
	pt3dadd(291.5, -390.5, 40.5, 3.4)
	pt3dadd(293, -392.5, 41, 3.5)
  }
}
proc shape3d_14() {
  dend[54] {	pt3dadd(294.5, -394.5, 41, 3.7)
	pt3dadd(295, -396, 41.5, 3.2)
	pt3dadd(296.5, -397.5, 43.5, 3.2)
	pt3dadd(297.5, -399.5, 44, 4)
	pt3dadd(298.5, -402, 44.5, 3.4)
	pt3dadd(300, -404.5, 44.5, 3.4)
	pt3dadd(301.5, -406, 45, 3.7)
	pt3dadd(301.5, -407.5, 45, 3.2)
	pt3dadd(302, -409, 45, 2.8)
	pt3dadd(303.5, -411, 45.5, 3.4)
	pt3dadd(305, -412.5, 46, 3.1)
	pt3dadd(306, -414.5, 46, 4.1)
  }
  dend[55] {pt3dclear()
	pt3dadd(306, -414.5, 46, 4.1)
	pt3dadd(308, -414.5, 49, 1.3)
	pt3dadd(310, -414.5, 48.5, 1.3)
	pt3dadd(312, -416, 47.5, 1.3)
	pt3dadd(314, -416.5, 47, 1.3)
	pt3dadd(315.5, -417.5, 41, 1.3)
	pt3dadd(317, -417.5, 42, 1.3)
	pt3dadd(319, -417, 39.5, 1.3)
	pt3dadd(320.5, -415, 36.5, 1.3)
	pt3dadd(320.5, -412, 35.5, 1.4)
	pt3dadd(320.5, -410.5, 35, 1.6)
	pt3dadd(320.5, -408.5, 36, 1.2)
	pt3dadd(321, -407, 35.5, 1.5)
	pt3dadd(322, -407, 33, 1.5)
	pt3dadd(324, -405.5, 32, 1.5)
	pt3dadd(327.5, -404.5, 31, 1.6)
	pt3dadd(330.5, -404, 25, 1.6)
  }
  dend[56] {pt3dclear()
	pt3dadd(306, -414.5, 46, 4.1)
	pt3dadd(307, -418.5, 50.5, 3.5)
	pt3dadd(308, -420.5, 50.5, 3.8)
	pt3dadd(308.5, -423.5, 50.5, 3.4)
	pt3dadd(309.5, -425, 46, 3.3)
	pt3dadd(310.5, -426.5, 46, 3.3)
	pt3dadd(311, -428.5, 46, 3.1)
	pt3dadd(311, -430.5, 46, 3.1)
	pt3dadd(312.5, -433, 46, 3.1)
	pt3dadd(314, -435, 46, 3.6)
	pt3dadd(316, -436, 46, 3.6)
	pt3dadd(318.5, -437.5, 46, 3.6)
	pt3dadd(320.5, -438, 48, 3.8)
	pt3dadd(322.5, -439, 48, 3.8)
	pt3dadd(325, -441, 48, 3.9)
	pt3dadd(325, -443.5, 48, 3.6)
	pt3dadd(326, -445, 48, 3.2)
	pt3dadd(327.5, -447.5, 48, 3)
	pt3dadd(327.5, -448.5, 48, 2.7)
	pt3dadd(328.5, -450, 48, 2.7)
	pt3dadd(330.5, -451, 48, 3)
	pt3dadd(331.5, -453.5, 48, 3.3)
	pt3dadd(332.5, -456, 48, 2.7)
	pt3dadd(334, -457, 44.5, 3.3)
	pt3dadd(336, -459, 44.5, 3.2)
	pt3dadd(336.5, -462, 44.5, 3.7)
	pt3dadd(337.5, -466, 40, 3.7)
	pt3dadd(338, -468, 40, 3.3)
	pt3dadd(338.5, -469.5, 40, 3.1)
	pt3dadd(339.5, -471.5, 40, 3)
	pt3dadd(340, -473, 40, 3.5)
	pt3dadd(342, -475, 44.5, 4)
	pt3dadd(343.5, -480, 42, 3.7)
	pt3dadd(344, -482.5, 42, 2.6)
	pt3dadd(345.5, -483.5, 42, 2.4)
	pt3dadd(346.5, -485.5, 42, 3.4)
	pt3dadd(347.5, -486.5, 42, 4.4)
	pt3dadd(349, -486.5, 42, 4.1)
	pt3dadd(350.5, -488.5, 42, 2.6)
	pt3dadd(350.5, -490.5, 38, 3.2)
	pt3dadd(350.5, -493, 38, 3.8)
	pt3dadd(351.5, -495.5, 40, 3.8)
	pt3dadd(354, -496.5, 40, 3.7)
	pt3dadd(356, -498.5, 38, 3.2)
	pt3dadd(358, -500, 44.5, 3.2)
	pt3dadd(360, -502, 44.5, 3.4)
	pt3dadd(361, -505, 44.5, 2.8)
	pt3dadd(361, -507.5, 44.5, 2.8)
	pt3dadd(361, -509.5, 44.5, 2.8)
	pt3dadd(363, -511.5, 46.5, 3.2)
	pt3dadd(364, -513, 46.5, 3)
	pt3dadd(364, -514.5, 46.5, 3.2)
	pt3dadd(364.5, -516, 46.5, 3.5)
	pt3dadd(365.5, -517.5, 46.5, 3.8)
  }
  dend[57] {pt3dclear()
	pt3dadd(365.5, -517.5, 46.5, 3.8)
	pt3dadd(368, -517.5, 44.5, 1.3)
	pt3dadd(371, -517.5, 46.5, 1.3)
	pt3dadd(372, -517.5, 46.5, 1.3)
	pt3dadd(374.5, -519.5, 44.5, 1.3)
	pt3dadd(375, -521, 44.5, 1.3)
	pt3dadd(375, -522.5, 44.5, 1.3)
	pt3dadd(376.5, -524, 44.5, 1.5)
	pt3dadd(378, -524, 44.5, 1.2)
	pt3dadd(379.5, -524, 44.5, 1.2)
	pt3dadd(380.5, -525, 44.5, 1.2)
	pt3dadd(382, -527, 46.5, 1.2)
	pt3dadd(383.5, -527.5, 44.5, 1.1)
	pt3dadd(384, -529.5, 44.5, 0.9)
	pt3dadd(385.5, -529.5, 44.5, 0.9)
	pt3dadd(386, -529.5, 44.5, 1.3)
	pt3dadd(386.5, -529.5, 44.5, 1)
	pt3dadd(388.5, -531, 51, 1.3)
	pt3dadd(390.5, -532, 44, 1.2)
	pt3dadd(391.5, -532, 44, 1.2)
	pt3dadd(392.5, -533, 46, 1.1)
	pt3dadd(392.5, -534.5, 46, 1.3)
	pt3dadd(393.5, -535.5, 48, 1.5)
	pt3dadd(395, -536.5, 48, 1.2)
	pt3dadd(396, -538, 46, 0.8)
	pt3dadd(396.5, -540, 46, 1.1)
	pt3dadd(397, -541.5, 46, 1.1)
	pt3dadd(398, -541.5, 46, 1.6)
	pt3dadd(399, -541.5, 46, 1.2)
	pt3dadd(401, -542.5, 46, 1)
	pt3dadd(401, -544, 46, 1)
	pt3dadd(402.5, -545.5, 46, 1.4)
	pt3dadd(404.5, -545.5, 46, 1.3)
	pt3dadd(405.5, -545, 46, 0.8)
	pt3dadd(407.5, -544, 46, 1)
	pt3dadd(408.5, -543.5, 46, 1)
	pt3dadd(410.5, -543, 46, 1)
	pt3dadd(411.5, -543, 46, 0.9)
	pt3dadd(411, -545.5, 48, 1.5)
	pt3dadd(411, -546.5, 46, 1.8)
	pt3dadd(411, -547.5, 46, 1.8)
	pt3dadd(411, -548, 44, 1.8)
	pt3dadd(411, -549.5, 46, 1.4)
	pt3dadd(411.5, -551.5, 46, 1.3)
	pt3dadd(412, -552.5, 44, 1.9)
	pt3dadd(412, -555.5, 44, 1.5)
	pt3dadd(412, -557.5, 46, 1.5)
	pt3dadd(412, -560, 44, 1.1)
	pt3dadd(412, -561.5, 44, 1.1)
	pt3dadd(410.5, -563, 44, 1.1)
	pt3dadd(410.5, -564.5, 41.5, 1.1)
  }
  dend[58] {pt3dclear()
	pt3dadd(365.5, -517.5, 46.5, 3.8)
	pt3dadd(365.5, -520, 46, 3.7)
	pt3dadd(365.5, -522, 45.5, 3.7)
	pt3dadd(366.5, -523, 47, 3.9)
	pt3dadd(368.5, -523.5, 46.5, 3.5)
	pt3dadd(371, -524.5, 43.5, 3.4)
	pt3dadd(372.5, -526.5, 41, 3.1)
	pt3dadd(374, -528, 42, 3)
	pt3dadd(375.5, -530, 43.5, 3.2)
	pt3dadd(377, -532, 42.5, 3.5)
	pt3dadd(378, -534, 40, 2.7)
	pt3dadd(380, -536, 41, 2.7)
	pt3dadd(382, -538, 38, 3.4)
	pt3dadd(383.5, -540.5, 32.5, 3.5)
	pt3dadd(383.5, -541.5, 32, 2.7)
	pt3dadd(385, -543.5, 31.5, 2.7)
	pt3dadd(386.5, -545.5, 31, 2.6)
	pt3dadd(387.5, -547.5, 26, 2.6)
	pt3dadd(389, -551, 28.5, 3)
	pt3dadd(391, -552, 28, 3.3)
	pt3dadd(392, -555, 27, 2.3)
	pt3dadd(393, -557.5, 26.5, 2.3)
	pt3dadd(393, -559.5, 26, 2.5)
	pt3dadd(392.5, -561.5, 25.5, 2.8)
	pt3dadd(392, -564.5, 25, 2.9)
  }
  dend[59] {pt3dclear()
	pt3dadd(25.5, -103.5, 0, 11)
	pt3dadd(24, -109, -1.5, 5.1)
	pt3dadd(24, -113, -1, 5.4)
	pt3dadd(24, -115.5, -1.5, 5.8)
	pt3dadd(24, -118, -5.5, 5.3)
	pt3dadd(24, -120.5, -6.5, 5.4)
	pt3dadd(24, -123.5, -7, 5.4)
	pt3dadd(24.5, -126, -11.5, 5.7)
	pt3dadd(24, -128, -12, 5)
	pt3dadd(24, -130.5, -12.5, 4.7)
	pt3dadd(24, -133, -13.5, 5.4)
	pt3dadd(24, -135.5, -14, 5.3)
	pt3dadd(24, -138, -14.5, 5)
	pt3dadd(24, -140, -15, 5)
	pt3dadd(24.5, -142, -17.5, 5.6)
	pt3dadd(25.5, -144, -20, 6.3)
	pt3dadd(25.5, -147, -22, 6.3)
	pt3dadd(25.5, -149.5, -23, 6.4)
	pt3dadd(25.5, -151.5, -23.5, 5.4)
	pt3dadd(27, -154.5, -24, 5.5)
	pt3dadd(27, -157, -25, 5.4)
	pt3dadd(28.5, -163, -25.5, 5.7)
	pt3dadd(32, -166.5, -26, 5.8)
	pt3dadd(35.5, -170.5, -18.5, 6.6)
	pt3dadd(39, -173, -31, 5.9)
	pt3dadd(42, -175, -31, 5.9)
	pt3dadd(44.5, -177.5, -31.5, 5.9)
	pt3dadd(46.5, -181, -32, 5.9)
	pt3dadd(48, -184.5, -32.5, 5.1)
	pt3dadd(48, -189, -27.5, 4.8)
	pt3dadd(48.5, -193, -34, 4.7)
	pt3dadd(48, -196.5, -29, 4.5)
	pt3dadd(48.5, -200.5, -29.5, 4.5)
	pt3dadd(51, -205, -39, 3.5)
	pt3dadd(52.5, -207.5, -39.5, 4.1)
	pt3dadd(53.5, -210.5, -37, 4.5)
	pt3dadd(55, -213, -37, 5)
	pt3dadd(56.5, -216.5, -37.5, 6.3)
	pt3dadd(57.5, -219.5, -32.5, 9.1)
  }
  dend[60] {pt3dclear()
	pt3dadd(57.5, -219.5, -32.5, 9.1)
	pt3dadd(63, -222.5, -40, 4.8)
  }
}
proc shape3d_15() {
  dend[60] {	pt3dadd(66, -225, -41, 3.8)
	pt3dadd(69, -226, -42, 3.6)
	pt3dadd(72, -228.5, -43, 3.8)
	pt3dadd(75, -228.5, -43.5, 3.5)
	pt3dadd(76.5, -232, -51, 3.7)
	pt3dadd(79.5, -234.5, -49.5, 3.6)
	pt3dadd(81, -237, -60, 3.6)
	pt3dadd(83, -240, -63.5, 3.7)
	pt3dadd(85.5, -243.5, -64.5, 3)
	pt3dadd(87.5, -245, -65, 3.2)
	pt3dadd(89.5, -246, -65.5, 3.8)
	pt3dadd(91, -250, -66.5, 3.7)
	pt3dadd(93.5, -253, -67.5, 3.4)
	pt3dadd(97.5, -255, -75, 4)
  }
  dend[61] {pt3dclear()
	pt3dadd(57.5, -219.5, -32.5, 9.1)
	pt3dadd(55.5, -225, -47.5, 4.5)
	pt3dadd(54, -227.5, -48, 4.1)
	pt3dadd(52, -231.5, -49, 4.1)
	pt3dadd(50.5, -235.5, -47.5, 4.1)
	pt3dadd(50, -239, -65, 4.1)
	pt3dadd(48.5, -241, -68.5, 3.6)
	pt3dadd(46.5, -243.5, -67, 4)
	pt3dadd(46, -246.5, -67.5, 4)
	pt3dadd(45, -249.5, -75, 4.4)
  }
  dend[62] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 5.2)
	pt3dadd(-24.5, -78.5, 7.5, 5.2)
	pt3dadd(-23, -82, 6.5, 4.3)
	pt3dadd(-23, -84.5, 12.5, 4.5)
	pt3dadd(-23.5, -88.5, 11.5, 3.9)
	pt3dadd(-25, -91, 14, 3.4)
  }
  dend[63] {pt3dclear()
	pt3dadd(-25, -91, 14, 3.4)
	pt3dadd(-25, -93.5, 14.5, 3.1)
	pt3dadd(-23.5, -96.5, 12.5, 3)
	pt3dadd(-23, -100, 13, 3.2)
	pt3dadd(-22, -102.5, 13.5, 3.2)
	pt3dadd(-21.5, -105.5, 14.5, 3.7)
	pt3dadd(-21.5, -107, 14.5, 4.1)
	pt3dadd(-20, -110.5, 15.5, 4)
	pt3dadd(-20, -114, 16, 3.5)
	pt3dadd(-19.5, -117, 18.5, 3.8)
	pt3dadd(-19.5, -120.5, 19, 4.2)
	pt3dadd(-19, -124, 19.5, 4.2)
	pt3dadd(-18, -127, 20.5, 4.2)
	pt3dadd(-17, -129, 21, 3.2)
	pt3dadd(-17, -132, 25, 3.1)
	pt3dadd(-15.5, -135.5, 20.5, 3.9)
	pt3dadd(-13.5, -139, 21, 3.9)
	pt3dadd(-10.5, -141.5, 21, 3.2)
	pt3dadd(-9.5, -143.5, 23.5, 2.6)
	pt3dadd(-8.5, -146.5, 26, 3.3)
	pt3dadd(-7, -149.5, 28.5, 4.1)
	pt3dadd(-7, -152, 26.5, 3.8)
	pt3dadd(-5.5, -154.5, 27, 3.2)
	pt3dadd(-5.5, -157.5, 27, 3.2)
	pt3dadd(-4, -160, 27.5, 3.2)
	pt3dadd(-3, -162.5, 29.5, 3.5)
	pt3dadd(-3, -165.5, 30, 3.5)
	pt3dadd(-3, -168.5, 30, 3.5)
	pt3dadd(-2.5, -171.5, 30, 3.5)
	pt3dadd(-1, -174.5, 30.5, 3.5)
	pt3dadd(-1, -176.5, 35.5, 3.5)
	pt3dadd(-1, -179.5, 35.5, 3.5)
	pt3dadd(0.5, -182.5, 31.5, 3.7)
	pt3dadd(0.5, -185.5, 31.5, 3.7)
	pt3dadd(1.5, -189, 32, 3.7)
	pt3dadd(1.5, -192, 34, 3.7)
	pt3dadd(2.5, -195.5, 37, 3.4)
	pt3dadd(2.5, -198, 34.5, 2.8)
	pt3dadd(2.5, -200.5, 37.5, 3.1)
	pt3dadd(2.5, -203.5, 37.5, 3.4)
	pt3dadd(4, -207, 40, 3.4)
	pt3dadd(4, -210.5, 45, 2.9)
	pt3dadd(4, -212.5, 49, 4.1)
	pt3dadd(3.5, -215.5, 43, 3.1)
	pt3dadd(3.5, -218, 46, 2.7)
	pt3dadd(4.5, -220.5, 50, 3.5)
	pt3dadd(4.5, -222.5, 53, 4.6)
	pt3dadd(6, -224.5, 55, 3.7)
	pt3dadd(7, -227, 43, 4)
	pt3dadd(6.5, -228.5, 43, 4)
	pt3dadd(6.5, -231.5, 48, 4.2)
	pt3dadd(6.5, -234, 48, 4.5)
	pt3dadd(8, -236.5, 48.5, 3.7)
	pt3dadd(8.5, -238.5, 44, 3.7)
	pt3dadd(9, -239.5, 44.5, 3.7)
	pt3dadd(10.5, -241, 44.5, 4.1)
	pt3dadd(12, -242.5, 44.5, 4.3)
	pt3dadd(12.5, -244.5, 43, 3)
	pt3dadd(13.5, -246, 40.5, 2.7)
	pt3dadd(15, -248.5, 45.5, 3)
	pt3dadd(16, -252, 45.5, 3.2)
	pt3dadd(17, -254.5, 48, 3.4)
	pt3dadd(18, -257.5, 48, 3.4)
	pt3dadd(19.5, -261.5, 46.5, 4.5)
	pt3dadd(19.5, -263, 44.5, 3.8)
	pt3dadd(19, -264.5, 56, 4)
	pt3dadd(20.5, -267, 56, 3.7)
	pt3dadd(22.5, -269, 52.5, 3.7)
	pt3dadd(22.5, -271, 54.5, 3.1)
	pt3dadd(22.5, -273, 53, 3.1)
	pt3dadd(23.5, -275, 53, 3.5)
	pt3dadd(24.5, -276.5, 49, 3.4)
	pt3dadd(24.5, -279, 49, 3.2)
	pt3dadd(25.5, -281, 49, 3.4)
	pt3dadd(26, -283.5, 49.5, 3.4)
	pt3dadd(26, -285, 49.5, 3.4)
	pt3dadd(25.5, -287, 49.5, 3.2)
	pt3dadd(26, -288.5, 49.5, 2.8)
	pt3dadd(28, -290, 50, 3.2)
	pt3dadd(30, -292, 54.5, 3)
	pt3dadd(31.5, -292.5, 52.5, 3.2)
	pt3dadd(32.5, -294, 52.5, 3.1)
	pt3dadd(34, -296.5, 52.5, 3.3)
	pt3dadd(36.5, -298, 53, 2.7)
	pt3dadd(36.5, -299.5, 53, 2.9)
	pt3dadd(37.5, -302, 53, 3.1)
	pt3dadd(36.5, -304.5, 58, 3.2)
	pt3dadd(36, -306.5, 60.5, 3.4)
	pt3dadd(36.5, -309.5, 75, 3.5)
  }
  dend[64] {pt3dclear()
	pt3dadd(-25, -91, 14, 3.4)
	pt3dadd(-24, -96.5, 13.5, 7)
	pt3dadd(-22.5, -99, 14, 7)
	pt3dadd(-21.5, -102.5, 16.5, 7)
	pt3dadd(-21.5, -106, 19.5, 7.1)
	pt3dadd(-20.5, -110.5, 20.5, 6.4)
	pt3dadd(-19.5, -114, 21, 5.5)
	pt3dadd(-19.5, -117.5, 24.5, 5.9)
	pt3dadd(-19.5, -121.5, 27.5, 5)
	pt3dadd(-18.5, -124.5, 30.5, 5.4)
	pt3dadd(-18.5, -127.5, 25.5, 5.4)
	pt3dadd(-18.5, -130, 22.5, 5.4)
	pt3dadd(-17, -133, 27.5, 4.5)
	pt3dadd(-15, -135.5, 28, 4.7)
	pt3dadd(-13, -137.5, 29, 5)
	pt3dadd(-10.5, -139.5, 34.5, 5)
	pt3dadd(-9.5, -143, 40, 5.2)
	pt3dadd(-7.5, -147.5, 41.5, 4.1)
	pt3dadd(-6, -150.5, 39.5, 4.8)
	pt3dadd(-4.5, -152, 38.5, 5.1)
	pt3dadd(-1.5, -154, 41, 5.4)
	pt3dadd(-0.5, -155, 39.5, 5.4)
	pt3dadd(2, -158.5, 42.5, 4.3)
	pt3dadd(4, -160.5, 43.5, 4.3)
	pt3dadd(6.5, -162, 42, 4.5)
	pt3dadd(9, -162.5, 47.5, 4.2)
	pt3dadd(11.5, -162.5, 48, 4)
	pt3dadd(14, -162.5, 51, 4.1)
	pt3dadd(16.5, -162.5, 53.5, 4.1)
	pt3dadd(18.5, -162.5, 56.5, 4.1)
	pt3dadd(21, -162.5, 57, 4.5)
	pt3dadd(24, -164.5, 55.5, 5.2)
	pt3dadd(27.5, -165.5, 64, 5.4)
  }
  dend[65] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 7.9)
	pt3dadd(-37, -78.5, 10.5, 7.9)
	pt3dadd(-39.5, -82, 9, 7.8)
	pt3dadd(-41, -85, 9, 7.3)
	pt3dadd(-42.5, -88, 9, 7.9)
	pt3dadd(-45, -91, 10.5, 8.4)
	pt3dadd(-46.5, -95, 7.5, 8.8)
	pt3dadd(-48.5, -97.5, 9, 9.5)
	pt3dadd(-51, -100, 9, 10)
	pt3dadd(-53.5, -102.5, 10.5, 10.9)
	pt3dadd(-54, -104.5, 10.5, 12.2)
  }
  dend[66] {pt3dclear()
	pt3dadd(-54, -104.5, 10.5, 12.2)
	pt3dadd(-51.5, -110.5, 5.5, 5.5)
	pt3dadd(-52, -113.5, 5.5, 5)
	pt3dadd(-53.5, -117, 2, 5.7)
	pt3dadd(-55, -120, 2, 4.5)
	pt3dadd(-55.5, -123.5, 2, 3.2)
	pt3dadd(-57, -126, 2, 3.4)
	pt3dadd(-56.5, -129, 0.5, 4.3)
	pt3dadd(-55.5, -132, 0, 5.4)
	pt3dadd(-55.5, -136, 0, 5.1)
	pt3dadd(-56, -140, 0, 4.5)
	pt3dadd(-57, -143, -1, 4.5)
	pt3dadd(-56, -146.5, -3, 5.1)
	pt3dadd(-56, -150.5, -3, 4.2)
	pt3dadd(-56, -153, -3, 4.2)
	pt3dadd(-55, -155.5, 0, 4.6)
	pt3dadd(-53, -160, -1.5, 4.5)
	pt3dadd(-53, -163, 2.5, 5.7)
	pt3dadd(-53, -167, 2.5, 5.5)
	pt3dadd(-53, -170.5, 2.5, 5.9)
	pt3dadd(-52, -173.5, 1, 5.3)
	pt3dadd(-51.5, -177.5, 1, 5.3)
	pt3dadd(-50, -181.5, 0.5, 5.6)
	pt3dadd(-49, -186, 0.5, 5.4)
	pt3dadd(-47.5, -189.5, 0.5, 5)
	pt3dadd(-45.5, -194, 0.5, 4.5)
	pt3dadd(-45.5, -196, -0.5, 4.8)
	pt3dadd(-45.5, -198.5, -0.5, 3.6)
	pt3dadd(-46.5, -201, -0.5, 4.4)
	pt3dadd(-46, -204, -0.5, 5)
	pt3dadd(-46, -207, -1, 4.4)
	pt3dadd(-46, -210, -1, 4.4)
	pt3dadd(-46, -212.5, -2.5, 5.6)
	pt3dadd(-45.5, -215.5, -2.5, 5.5)
	pt3dadd(-44, -219, -2.5, 4.8)
	pt3dadd(-43, -222, -4.5, 5.7)
	pt3dadd(-42.5, -225.5, -4.5, 7.2)
  }
}
proc shape3d_16() {
  dend[66] {	pt3dadd(-41.5, -226.5, -6, 7.6)
  }
  dend[67] {pt3dclear()
	pt3dadd(-41.5, -226.5, -6, 7.6)
	pt3dadd(-38, -230, -2.5, 4.8)
	pt3dadd(-35, -232, -3, 4.8)
	pt3dadd(-32, -235, -6.5, 3.7)
	pt3dadd(-29.5, -236, -8.5, 3.8)
	pt3dadd(-26.5, -237.5, -8.5, 3)
	pt3dadd(-25.5, -239, -8.5, 3.7)
	pt3dadd(-24, -240, -8.5, 4.4)
	pt3dadd(-21.5, -240.5, -10, 3.8)
	pt3dadd(-19, -242, -3, 4.1)
	pt3dadd(-16.5, -243.5, -5, 4.9)
	pt3dadd(-15, -245.5, -3, 5.5)
	pt3dadd(-12, -248, -5, 4.8)
	pt3dadd(-8.5, -248.5, -8.5, 4.8)
	pt3dadd(-6.5, -250.5, -10, 3.7)
	pt3dadd(-3.5, -252.5, -10, 4.1)
	pt3dadd(-1.5, -253, -10, 3.9)
	pt3dadd(0.5, -255, -10.5, 3.9)
	pt3dadd(3.5, -256.5, -9, 4.5)
	pt3dadd(5.5, -257, -12, 4)
	pt3dadd(7.5, -258.5, -7, 3.3)
	pt3dadd(8.5, -260, -9, 3.6)
	pt3dadd(8.5, -262.5, -9, 4.5)
	pt3dadd(10.5, -266, -10.5, 4)
	pt3dadd(12.5, -269, -9, 4.5)
	pt3dadd(12.5, -273, -9, 3.8)
	pt3dadd(12.5, -275, -9, 4.2)
	pt3dadd(15.5, -279, -3.5, 3.9)
	pt3dadd(17.5, -280.5, -7, 4.5)
	pt3dadd(18, -283.5, -7, 4.3)
	pt3dadd(20.5, -287, -9, 4.6)
	pt3dadd(22, -290.5, -7.5, 4.7)
	pt3dadd(22, -293.5, -6, 5)
	pt3dadd(22, -298, -6, 5)
	pt3dadd(23.5, -302, -7.5, 4.6)
	pt3dadd(25, -306.5, -7.5, 4.6)
	pt3dadd(26.5, -309.5, -7.5, 4.8)
	pt3dadd(28, -313.5, -7.5, 4.6)
	pt3dadd(29, -317.5, -7.5, 4.4)
	pt3dadd(31, -320.5, -7.5, 4.8)
	pt3dadd(31, -322.5, -6, 5)
	pt3dadd(31.5, -326, -7.5, 4.7)
	pt3dadd(33.5, -329, -7.5, 4.2)
	pt3dadd(36, -332, -9.5, 4)
	pt3dadd(38, -334, -9.5, 4)
	pt3dadd(40, -336.5, -11.5, 3.7)
	pt3dadd(43, -340.5, -11.5, 3.5)
	pt3dadd(44, -343, -11.5, 4.2)
	pt3dadd(42.5, -346.5, -13, 6.5)
  }
  dend[68] {pt3dclear()
	pt3dadd(42.5, -346.5, -13, 6.5)
	pt3dadd(40.5, -351, -8, 3.7)
	pt3dadd(39.5, -353.5, -10, 3.2)
	pt3dadd(41, -355.5, -10, 2.9)
	pt3dadd(42.5, -358, -10, 3.3)
	pt3dadd(41, -360, -10, 2.9)
	pt3dadd(38.5, -362.5, -10, 3.2)
	pt3dadd(38.5, -366, -10, 3.2)
	pt3dadd(38.5, -367.5, -10, 2.7)
	pt3dadd(37.5, -370, -10, 2.5)
	pt3dadd(37.5, -374.5, -10, 3.3)
	pt3dadd(38.5, -378.5, -10, 3.1)
	pt3dadd(40, -382.5, -8, 3.2)
	pt3dadd(41, -386.5, -10, 3.2)
	pt3dadd(42.5, -390, -10, 3.2)
	pt3dadd(45.5, -393, -10, 2.6)
	pt3dadd(47.5, -395.5, -10, 3)
	pt3dadd(48, -399.5, -8, 3.3)
	pt3dadd(48, -402, -8, 3.4)
	pt3dadd(51, -405, -10, 2.8)
	pt3dadd(52, -408.5, -10, 3)
	pt3dadd(55, -411, -10, 3.4)
	pt3dadd(56, -413, -10, 2.9)
	pt3dadd(57.5, -415, -10, 3.3)
	pt3dadd(58.5, -417, -10, 4.3)
  }
  dend[69] {pt3dclear()
	pt3dadd(58.5, -417, -10, 4.3)
	pt3dadd(62.5, -417.5, -8.5, 3)
	pt3dadd(64.5, -421, -10.5, 3)
	pt3dadd(66.5, -423.5, -8.5, 2.8)
	pt3dadd(69, -424.5, -7.5, 2.7)
	pt3dadd(71.5, -427, -7.5, 3.1)
	pt3dadd(73.5, -431.5, -7.5, 3.1)
	pt3dadd(75, -436.5, -8, 3.1)
	pt3dadd(75.5, -439, -6, 3.5)
	pt3dadd(76.5, -442, -6, 2.8)
	pt3dadd(76.5, -444.5, -6.5, 2.6)
	pt3dadd(76.5, -447, -5, 3)
	pt3dadd(77.5, -450, -5, 3)
	pt3dadd(79, -452.5, -5, 3.2)
	pt3dadd(77.5, -456, -5.5, 2.9)
	pt3dadd(77, -458, -5.5, 2.5)
	pt3dadd(76, -460, -4, 2.5)
	pt3dadd(76, -462.5, -5.5, 3.2)
	pt3dadd(77.5, -464.5, -5.5, 2.5)
	pt3dadd(78.5, -467, -6, 2.6)
	pt3dadd(78.5, -470.5, -4.5, 2.8)
	pt3dadd(79.5, -474, -6, 2.3)
	pt3dadd(81, -476, -6, 2.6)
	pt3dadd(82.5, -478.5, -5, 3.1)
	pt3dadd(82.5, -481, -5, 2.8)
	pt3dadd(82.5, -484, -5, 2.8)
	pt3dadd(82.5, -487, -5, 3)
	pt3dadd(81, -490, -5.5, 3.1)
	pt3dadd(81, -492.5, -5.5, 3.2)
	pt3dadd(80.5, -495.5, -5.5, 3.2)
	pt3dadd(81, -498, -4, 2.5)
	pt3dadd(82, -500, -4.5, 2.4)
	pt3dadd(82, -501.5, -2.5, 2.7)
	pt3dadd(83.5, -504, -6, 2.7)
	pt3dadd(84, -506.5, -6, 2.9)
	pt3dadd(82.5, -509, -3, 3)
	pt3dadd(82.5, -511, -8, 3.2)
	pt3dadd(83.5, -514, -9.5, 3)
	pt3dadd(85.5, -516.5, -10, 3)
	pt3dadd(86.5, -519, -10, 3)
	pt3dadd(86.5, -521, -10, 3)
	pt3dadd(86, -523, -10, 3)
	pt3dadd(87.5, -524.5, -10, 2.7)
	pt3dadd(89, -525.5, -10.5, 3.1)
	pt3dadd(89.5, -529.5, -12.5, 2.8)
	pt3dadd(91, -534, -10.5, 3)
	pt3dadd(92.5, -537, -13, 2.7)
	pt3dadd(94, -540, -11, 2.5)
	pt3dadd(94.5, -543, -11, 2.4)
	pt3dadd(96, -545, -11, 2.4)
	pt3dadd(97, -547, -11.5, 2.7)
	pt3dadd(97, -550.5, -11.5, 2.7)
	pt3dadd(98.5, -553, -13.5, 2.2)
	pt3dadd(100, -556, -12, 2.5)
	pt3dadd(100, -558.5, -12, 2)
	pt3dadd(100, -561, -10.5, 1.7)
	pt3dadd(100, -564, -10.5, 2.1)
	pt3dadd(102.5, -567.5, -12.5, 2)
	pt3dadd(102.5, -570, -11, 2.5)
	pt3dadd(102.5, -573, -9.5, 3.4)
	pt3dadd(105, -574.5, -9.5, 2.7)
	pt3dadd(107.5, -576.5, -10, 2.3)
	pt3dadd(109.5, -577, -10, 2.8)
	pt3dadd(111, -578, -10, 3.1)
	pt3dadd(113, -580.5, -13, 2.6)
	pt3dadd(115, -581.5, -12, 3.1)
	pt3dadd(115, -585, -13.5, 3.1)
	pt3dadd(115.5, -588, -13.5, 3)
	pt3dadd(117.5, -590, -15.5, 3)
	pt3dadd(118.5, -592.5, -14, 3)
	pt3dadd(120, -594.5, -14, 2.7)
	pt3dadd(120, -597, -14, 2.5)
	pt3dadd(119, -599, -14, 2.5)
	pt3dadd(119, -600.5, -14, 2.2)
	pt3dadd(120, -603, -14.5, 2)
	pt3dadd(120.5, -606, -14.5, 2.2)
	pt3dadd(120.5, -609, -14.5, 2.6)
	pt3dadd(120.5, -610.5, -14.5, 2.6)
	pt3dadd(122.5, -613, -14.5, 2.6)
	pt3dadd(123.5, -616, -15, 2.7)
	pt3dadd(125.5, -619, -15, 2.7)
	pt3dadd(126, -622, -15, 2.8)
	pt3dadd(127.5, -624.5, -15, 3.1)
	pt3dadd(130, -627.5, -15.5, 2.5)
	pt3dadd(132.5, -629.5, -15.5, 2.2)
	pt3dadd(134, -631.5, -17.5, 2.2)
	pt3dadd(136, -633.5, -18, 2.3)
	pt3dadd(134, -635.5, -18, 2.3)
	pt3dadd(134, -637.5, -18, 2.6)
	pt3dadd(134, -640.5, -18, 2.8)
	pt3dadd(135.5, -642.5, -19.5, 2.6)
	pt3dadd(135.5, -645.5, -20, 2.5)
	pt3dadd(134.5, -648.5, -20, 2.2)
	pt3dadd(134.5, -652, -20, 2.2)
	pt3dadd(134.5, -654, -20, 2.4)
	pt3dadd(136, -655.5, -20.5, 2.6)
	pt3dadd(137.5, -658, -20.5, 3)
	pt3dadd(136, -660.5, -19, 2.5)
	pt3dadd(136, -663, -19, 2.7)
	pt3dadd(136, -667, -19.5, 2.6)
	pt3dadd(136, -669.5, -19.5, 2.2)
	pt3dadd(136.5, -672.5, -19.5, 2.3)
	pt3dadd(136.5, -675.5, -19.5, 2.2)
	pt3dadd(136.5, -678, -19.5, 2.5)
	pt3dadd(138, -681.5, -20, 2)
	pt3dadd(138.5, -684, -20, 1.8)
	pt3dadd(141, -687, -20, 2)
	pt3dadd(142.5, -690, -20.5, 2)
	pt3dadd(144, -693, -20.5, 2.3)
	pt3dadd(144, -696.5, -20.5, 2.3)
	pt3dadd(144.5, -699.5, -20.5, 2.8)
	pt3dadd(144.5, -702.5, -21, 2.6)
	pt3dadd(144.5, -705, -21, 2.5)
	pt3dadd(146.5, -708.5, -21, 2.5)
	pt3dadd(149, -713, -23, 2.5)
	pt3dadd(150.5, -715, -23, 2.5)
	pt3dadd(150.5, -716.5, -23, 2.3)
	pt3dadd(152.5, -719, -25, 2.6)
	pt3dadd(153.5, -721, -23.5, 2.6)
	pt3dadd(153.5, -723.5, -23.5, 2)
	pt3dadd(154.5, -726, -25.5, 2)
	pt3dadd(156, -728, -23.5, 2.1)
	pt3dadd(157, -730, -23.5, 1.9)
	pt3dadd(159.5, -731.5, -22.5, 2.2)
	pt3dadd(161, -732.5, -22.5, 2.3)
  }
}
proc shape3d_17() {
  dend[69] {	pt3dadd(163, -733.5, -20.5, 2)
	pt3dadd(164.5, -734.5, -22.5, 2.6)
	pt3dadd(165, -736.5, -24.5, 2.5)
	pt3dadd(165.5, -738.5, -26.5, 2.5)
	pt3dadd(167, -740, -26.5, 2.5)
	pt3dadd(167, -742, -26.5, 2.4)
	pt3dadd(167.5, -744, -26.5, 2.3)
	pt3dadd(168.5, -746, -25, 2.3)
	pt3dadd(171.5, -750, -36, 2.6)
	pt3dadd(172.5, -752.5, -40, 2.6)
	pt3dadd(174, -754, -43, 3.1)
	pt3dadd(176, -755, -46.5, 2.8)
  }
  dend[70] {pt3dclear()
	pt3dadd(176, -755, -46.5, 2.8)
	pt3dadd(178.5, -757.5, -45, 2)
	pt3dadd(180, -758.5, -44, 2)
	pt3dadd(181, -759.5, -43.5, 1.6)
	pt3dadd(182, -761, -42.5, 1.8)
	pt3dadd(183, -764, -37.5, 1.8)
	pt3dadd(183, -766, -33, 2.8)
	pt3dadd(184.5, -768, -34.5, 2.8)
	pt3dadd(186, -769, -33.5, 3.3)
	pt3dadd(187, -771, -32.5, 2.4)
	pt3dadd(187, -772.5, -32, 2.2)
	pt3dadd(188, -773.5, -31.5, 2.6)
	pt3dadd(187, -775.5, -30.5, 2.6)
	pt3dadd(187, -778, -29, 2.2)
	pt3dadd(186.5, -779.5, -25, 2.2)
	pt3dadd(188.5, -784, -18.5, 2.4)
	pt3dadd(190, -788, -19, 2.3)
	pt3dadd(191, -790.5, -27, 2.2)
	pt3dadd(191.5, -793, -24, 2.2)
	pt3dadd(193, -795, -24, 2.2)
	pt3dadd(193, -797.5, -24.5, 2.2)
	pt3dadd(194, -801, -25, 2.2)
	pt3dadd(194.5, -803, -31, 2.5)
	pt3dadd(195.5, -805, -31, 2.5)
	pt3dadd(197, -808.5, -28, 2.8)
	pt3dadd(198, -811, -28, 2.1)
	pt3dadd(198, -813.5, -28, 2.1)
	pt3dadd(199.5, -815.5, -28, 2.4)
	pt3dadd(201.5, -818.5, -28, 2.5)
	pt3dadd(202.5, -820.5, -31, 3)
	pt3dadd(202.5, -823.5, -31.5, 2.7)
	pt3dadd(202, -826, -31.5, 2.7)
	pt3dadd(200.5, -828, -31.5, 2.5)
	pt3dadd(199.5, -830, -31.5, 2.1)
	pt3dadd(198.5, -831.5, -31.5, 2)
	pt3dadd(198, -833.5, -31.5, 2.7)
	pt3dadd(199, -835.5, -31.5, 2.5)
	pt3dadd(200.5, -837.5, -31.5, 2.2)
	pt3dadd(202.5, -840, -31.5, 2.5)
	pt3dadd(203.5, -841.5, -31.5, 2.3)
	pt3dadd(205, -842.5, -31.5, 2.5)
	pt3dadd(206.5, -846, -31.5, 2.9)
	pt3dadd(206.5, -849, -29, 2.5)
	pt3dadd(207.5, -851.5, -29, 2.5)
	pt3dadd(209, -854, -29, 2.2)
	pt3dadd(210, -856, -29, 2.2)
	pt3dadd(209.5, -858.5, -26, 2.5)
	pt3dadd(209, -861, -29, 2.5)
	pt3dadd(208.5, -863, -29, 2.2)
	pt3dadd(208.5, -866, -29, 2.5)
	pt3dadd(210.5, -868.5, -35, 2.8)
	pt3dadd(210.5, -872, -35, 2.3)
	pt3dadd(210.5, -874, -35, 2.3)
	pt3dadd(210.5, -877, -32.5, 2.6)
	pt3dadd(209.5, -880.5, -29.5, 2.3)
	pt3dadd(208, -883.5, -29.5, 2.2)
	pt3dadd(208.5, -886, -29.5, 2.2)
	pt3dadd(207, -888.5, -29.5, 1.9)
	pt3dadd(207, -891.5, -29.5, 1.9)
	pt3dadd(207, -893.5, -29.5, 1.9)
	pt3dadd(205.5, -897, -27, 2.1)
	pt3dadd(204, -899, -27, 2.3)
	pt3dadd(202.5, -900.5, -27, 1.7)
	pt3dadd(201.5, -904, -27, 2)
	pt3dadd(199.5, -906.5, -27, 1.8)
	pt3dadd(198, -908, -27, 1.3)
	pt3dadd(195.5, -909, -27, 1.5)
	pt3dadd(194, -909.5, -27, 1.8)
	pt3dadd(192, -910.5, -27, 1.8)
	pt3dadd(192, -911.5, -27, 1.6)
	pt3dadd(193, -913, -27, 1.3)
	pt3dadd(191.5, -914, -25, 1.1)
	pt3dadd(187.5, -919, -25, 1.7)
	pt3dadd(186.5, -922.5, -23.5, 1.7)
	pt3dadd(184, -926, -23.5, 2.1)
	pt3dadd(181.5, -929, -23.5, 2.1)
	pt3dadd(180, -931, -23.5, 1.5)
	pt3dadd(179.5, -934, -21.5, 1.5)
	pt3dadd(176.5, -935.5, -20, 1.9)
	pt3dadd(174.5, -936, -20, 1.9)
	pt3dadd(172.5, -938.5, -21.5, 1.6)
	pt3dadd(171, -941, -21.5, 1.7)
	pt3dadd(169, -943.5, -21.5, 1.7)
	pt3dadd(167, -946, -21.5, 1.7)
	pt3dadd(165, -948, -20, 1.7)
	pt3dadd(164, -950, -21.5, 1.7)
	pt3dadd(164, -953, -21.5, 1.7)
	pt3dadd(162, -955, -21.5, 1.7)
	pt3dadd(159.5, -956, -23.5, 1.7)
	pt3dadd(157.5, -957.5, -23.5, 1.3)
	pt3dadd(156, -958, -23.5, 1.3)
	pt3dadd(156, -960, -23.5, 1.6)
	pt3dadd(154.5, -962, -21.5, 1.9)
	pt3dadd(153, -964, -21.5, 1.9)
	pt3dadd(151, -966.5, -21.5, 1.4)
	pt3dadd(150.5, -969, -21.5, 1.6)
	pt3dadd(150.5, -971.5, -21.5, 1.3)
	pt3dadd(150.5, -974, -21.5, 1.3)
	pt3dadd(149.5, -976, -21.5, 1.2)
	pt3dadd(149.5, -978.5, -18.5, 1.6)
	pt3dadd(148, -981, -17, 2.1)
	pt3dadd(148, -983.5, -17, 2.2)
	pt3dadd(148, -985.5, -18.5, 1.6)
	pt3dadd(149, -988, -18.5, 1.4)
	pt3dadd(149, -991, -17, 1.6)
	pt3dadd(149, -993, -15, 2)
	pt3dadd(149, -995.5, -15, 1.7)
	pt3dadd(149, -997.5, -15, 2.5)
	pt3dadd(149, -1000, -18.5, 2.4)
	pt3dadd(149, -1002, -18.5, 1.5)
	pt3dadd(149, -1004, -18.5, 1.7)
	pt3dadd(148.5, -1006, -18.5, 1.6)
	pt3dadd(148, -1008.5, -18.5, 1.9)
	pt3dadd(147.5, -1011.5, -15, 2.3)
	pt3dadd(145.5, -1013.5, -18.5, 2.3)
	pt3dadd(144, -1016, -18.5, 1.8)
	pt3dadd(142.5, -1018, -18.5, 1.5)
	pt3dadd(141.5, -1020.5, -17, 1.8)
	pt3dadd(141.5, -1023.5, -17, 1.6)
	pt3dadd(141.5, -1027, -17, 1.3)
	pt3dadd(140, -1029, -17, 1.3)
	pt3dadd(139.5, -1030.5, -21.5, 2.4)
	pt3dadd(138, -1031, -20, 2.7)
	pt3dadd(136, -1032.5, -23.5, 1.7)
	pt3dadd(135, -1033, -23.5, 1.3)
	pt3dadd(133.5, -1036, -23.5, 1.5)
	pt3dadd(132, -1038.5, -23.5, 1.2)
	pt3dadd(130.5, -1040.5, -23.5, 1)
	pt3dadd(129, -1041, -21.5, 1.5)
	pt3dadd(127, -1043, -21.5, 1.1)
	pt3dadd(125.5, -1044.5, -21.5, 0.9)
	pt3dadd(125, -1046.5, -21.5, 1.1)
	pt3dadd(123.5, -1048, -23.5, 1.1)
	pt3dadd(122, -1049.5, -23.5, 1.2)
	pt3dadd(119.5, -1049.5, -23.5, 1.3)
	pt3dadd(117.5, -1049.5, -18.5, 1.3)
	pt3dadd(115, -1049.5, -18.5, 1.1)
	pt3dadd(112, -1049.5, -18.5, 1.1)
	pt3dadd(109, -1050, -18.5, 1.7)
	pt3dadd(106.5, -1051.5, -18.5, 1.7)
	pt3dadd(104.5, -1052.5, -18.5, 1.1)
	pt3dadd(104.5, -1054, -18.5, 1.1)
	pt3dadd(104.5, -1056, -20, 1.1)
	pt3dadd(103, -1056, -20, 1.1)
	pt3dadd(101.5, -1057, -20, 1.1)
	pt3dadd(99.5, -1057, -20, 1.1)
	pt3dadd(97.5, -1057, -20, 1.1)
	pt3dadd(95, -1058, -21.5, 1.1)
	pt3dadd(92, -1059, -23.5, 1.1)
	pt3dadd(91, -1061, -21.5, 2)
	pt3dadd(88, -1062, -23.5, 2)
	pt3dadd(84, -1064, -23.5, 1.2)
	pt3dadd(82.5, -1066, -25, 1)
	pt3dadd(82, -1067.5, -28.5, 0.9)
	pt3dadd(79, -1070.5, -30, 1)
	pt3dadd(77, -1070, -30, 1)
	pt3dadd(76.5, -1067.5, -28.5, 1.3)
	pt3dadd(75.5, -1065, -28.5, 1.3)
	pt3dadd(73.5, -1061.5, -25, 1.6)
  }
  dend[71] {pt3dclear()
	pt3dadd(176, -755, -46.5, 2.8)
	pt3dadd(176, -757.5, -64, 0.9)
	pt3dadd(175.5, -759.5, -75, 0.9)
  }
  dend[72] {pt3dclear()
	pt3dadd(58.5, -417, -10, 4.3)
	pt3dadd(58.5, -420, -14.5, 1.5)
	pt3dadd(59.5, -422.5, -18, 1.4)
	pt3dadd(61.5, -425.5, -25, 1.4)
  }
  dend[73] {pt3dclear()
	pt3dadd(42.5, -346.5, -13, 6.5)
	pt3dadd(47.5, -349, -25, 3.1)
	pt3dadd(50.5, -351.5, -28, 3.3)
	pt3dadd(53.5, -352, -28, 3.1)
	pt3dadd(55, -355.5, -28.5, 2.3)
	pt3dadd(56.5, -357.5, -28.5, 3.1)
	pt3dadd(58.5, -357.5, -28.5, 1.9)
	pt3dadd(60.5, -358, -28.5, 1.9)
	pt3dadd(61.5, -361, -29, 1.9)
	pt3dadd(63, -362, -29, 2.4)
	pt3dadd(64, -365, -29, 2.3)
	pt3dadd(62, -367.5, -26.5, 3.1)
	pt3dadd(61, -370.5, -29.5, 2.3)
	pt3dadd(61.5, -372, -29.5, 1.8)
	pt3dadd(65, -372, -41, 2.2)
	pt3dadd(67, -374, -39, 1.8)
	pt3dadd(69, -374.5, -33.5, 2.7)
	pt3dadd(71, -374.5, -39.5, 2.6)
	pt3dadd(73.5, -374.5, -39.5, 2.3)
	pt3dadd(76.5, -374.5, -42.5, 2.8)
	pt3dadd(78, -374.5, -34.5, 2.8)
	pt3dadd(80.5, -374.5, -37.5, 2.8)
  }
}
proc shape3d_18() {
  dend[73] {	pt3dadd(83.5, -373, -37.5, 2.6)
	pt3dadd(86.5, -373, -35, 2.4)
	pt3dadd(90, -373, -35.5, 2.4)
	pt3dadd(92, -373, -41, 2.6)
	pt3dadd(94.5, -373, -41.5, 2.6)
	pt3dadd(97.5, -373, -44, 2.1)
	pt3dadd(99.5, -374.5, -39, 2.5)
	pt3dadd(103.5, -374.5, -42, 2.3)
	pt3dadd(106.5, -374.5, -42, 2.2)
	pt3dadd(108, -374.5, -42.5, 2.2)
	pt3dadd(110.5, -377, -45, 2)
	pt3dadd(111.5, -379, -42.5, 2.4)
	pt3dadd(114, -380.5, -43, 2.8)
	pt3dadd(116, -380.5, -43, 2.7)
	pt3dadd(118, -380.5, -43, 2.5)
	pt3dadd(120, -381, -40, 2.3)
	pt3dadd(122, -380, -40.5, 2.6)
	pt3dadd(125, -380, -40.5, 2.5)
	pt3dadd(128, -380, -40.5, 2.5)
	pt3dadd(130, -380.5, -44, 2.5)
	pt3dadd(132, -382.5, -41, 2.9)
	pt3dadd(134.5, -382.5, -41, 2.9)
	pt3dadd(136, -379.5, -41.5, 2.9)
	pt3dadd(139.5, -379, -41.5, 2.5)
	pt3dadd(141.5, -379, -44.5, 2.2)
	pt3dadd(143.5, -380.5, -39.5, 2.3)
	pt3dadd(146, -382.5, -39.5, 2.6)
	pt3dadd(147.5, -385.5, -40, 2.6)
	pt3dadd(149.5, -387, -40, 2.7)
	pt3dadd(151, -388.5, -42.5, 2.8)
	pt3dadd(155, -389, -43, 3)
	pt3dadd(159, -388.5, -43, 2.4)
	pt3dadd(162.5, -387.5, -40.5, 2.3)
	pt3dadd(165.5, -387.5, -43.5, 2.3)
	pt3dadd(169, -388.5, -41, 2.8)
	pt3dadd(171, -391, -41.5, 2)
	pt3dadd(173, -391, -44, 1.7)
	pt3dadd(176.5, -389.5, -39, 1.7)
	pt3dadd(178, -389.5, -39, 1.8)
	pt3dadd(179.5, -391, -42, 2.3)
	pt3dadd(181.5, -393, -39.5, 2.4)
	pt3dadd(183, -393.5, -39.5, 2.3)
	pt3dadd(185, -393.5, -42.5, 2.4)
	pt3dadd(188, -393.5, -45.5, 2.3)
	pt3dadd(190, -394, -37, 2.5)
	pt3dadd(193.5, -394, -35, 2.2)
	pt3dadd(195, -394.5, -35, 3.1)
	pt3dadd(197.5, -394.5, -35, 2.8)
	pt3dadd(200, -396, -35.5, 2.4)
	pt3dadd(203, -397.5, -38, 2.9)
	pt3dadd(205, -398.5, -38, 2.3)
	pt3dadd(208.5, -400, -38.5, 2.3)
	pt3dadd(211, -401, -41.5, 3.2)
  }
  dend[74] {pt3dclear()
	pt3dadd(211, -401, -41.5, 3.2)
	pt3dadd(213, -401, -44.5, 1.5)
	pt3dadd(216, -399.5, -44.5, 1.6)
	pt3dadd(218, -399.5, -35.5, 1.8)
	pt3dadd(220.5, -399.5, -35.5, 1.8)
	pt3dadd(222.5, -398, -38, 1.8)
	pt3dadd(225, -398, -32.5, 1.8)
	pt3dadd(226.5, -398.5, -35.5, 1.8)
	pt3dadd(228, -401, -24, 3)
	pt3dadd(231, -401, -29.5, 1.7)
	pt3dadd(233, -400, -32, 1.8)
	pt3dadd(235, -399, -31.5, 1.8)
	pt3dadd(238, -398.5, -29, 1.3)
	pt3dadd(240.5, -398, -29, 1.9)
	pt3dadd(243.5, -398, -31.5, 2)
	pt3dadd(246.5, -398, -31.5, 2)
	pt3dadd(248, -396, -29, 1.7)
	pt3dadd(250, -394.5, -29, 1.8)
	pt3dadd(251.5, -394.5, -31, 1.5)
	pt3dadd(252, -395, -31, 2)
	pt3dadd(254, -395, -31, 2.1)
	pt3dadd(256, -397, -28.5, 2.3)
	pt3dadd(258, -397, -31, 1.6)
	pt3dadd(260.5, -397, -31, 2.2)
	pt3dadd(262.5, -397, -31, 1.6)
	pt3dadd(265, -396.5, -31, 2.3)
	pt3dadd(267.5, -396.5, -31, 2)
	pt3dadd(269.5, -396.5, -33.5, 1.9)
	pt3dadd(271.5, -394.5, -33.5, 1.9)
	pt3dadd(273.5, -394.5, -22.5, 2.1)
	pt3dadd(278.5, -392.5, -25, 2.1)
  }
  dend[75] {pt3dclear()
	pt3dadd(211, -401, -41.5, 3.2)
	pt3dadd(211, -404, -42, 1.9)
	pt3dadd(211, -406.5, -42.5, 2)
	pt3dadd(211, -409, -42.5, 2)
	pt3dadd(213, -411.5, -43, 1.9)
	pt3dadd(214, -414, -40.5, 1.8)
	pt3dadd(217, -415, -41, 1.6)
	pt3dadd(217, -416, -41.5, 1.3)
	pt3dadd(217, -418, -41.5, 1.3)
	pt3dadd(216, -416, -42, 0.8)
	pt3dadd(219, -416.5, -58, 1.1)
	pt3dadd(220, -418, -58, 1.2)
	pt3dadd(221.5, -418.5, -51.5, 1.5)
	pt3dadd(223, -420, -51.5, 1.3)
	pt3dadd(224.5, -421, -58, 1.5)
	pt3dadd(226, -419.5, -61, 1.5)
	pt3dadd(228.5, -417.5, -61.5, 1.9)
	pt3dadd(230, -419, -59.5, 1.5)
	pt3dadd(232.5, -419, -60, 1.5)
	pt3dadd(233.5, -416.5, -69, 1.4)
	pt3dadd(234, -415, -69.5, 1.6)
	pt3dadd(234, -413.5, -69.5, 1.6)
	pt3dadd(234, -411, -70, 2.1)
	pt3dadd(236, -412, -73.5, 1.9)
	pt3dadd(237, -414.5, -76.5, 1.6)
	pt3dadd(240, -414.5, -74.5, 1.6)
	pt3dadd(241.5, -414.5, -75, 2.8)
  }
  dend[76] {pt3dclear()
	pt3dadd(-41.5, -226.5, -6, 7.6)
	pt3dadd(-45, -231, -8, 3.2)
	pt3dadd(-45, -233, -9, 3.2)
	pt3dadd(-46, -235, -10.5, 2.7)
	pt3dadd(-47.5, -236.5, -13.5, 3.2)
	pt3dadd(-49, -238, -14.5, 3.2)
	pt3dadd(-51, -239.5, -16, 3.7)
	pt3dadd(-53, -243, -25, 3.1)
  }
  dend[77] {pt3dclear()
	pt3dadd(-54, -104.5, 10.5, 12.2)
	pt3dadd(-62.5, -107.5, 14, 6.4)
	pt3dadd(-65.5, -110.5, 13.5, 7)
	pt3dadd(-69, -113.5, 12.5, 6.2)
	pt3dadd(-72, -117.5, 16.5, 5.7)
	pt3dadd(-74, -120, 15.5, 6.4)
	pt3dadd(-77, -123, 18.5, 6.7)
	pt3dadd(-79.5, -126, 19, 6.9)
	pt3dadd(-82, -128.5, 20.5, 7.2)
	pt3dadd(-84.5, -131, 22, 5.9)
	pt3dadd(-87.5, -131.5, 21, 6)
	pt3dadd(-89.5, -131.5, 25.5, 7.5)
	pt3dadd(-94, -131, 25, 7.7)
  }
  dend[78] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 7.9)
	pt3dadd(-30.5, -32.5, 4.5, 7.9)
	pt3dadd(-35.5, -32, 9, 6.7)
	pt3dadd(-39.5, -30.5, 7.5, 6)
	pt3dadd(-43, -27, 10, 6.2)
	pt3dadd(-46, -25, 12, 5.4)
	pt3dadd(-48.5, -23.5, 13.5, 5.4)
	pt3dadd(-50, -21.5, 15, 5.7)
	pt3dadd(-53, -19.5, 16.5, 5.7)
	pt3dadd(-55.5, -17.5, 18.5, 5.8)
	pt3dadd(-56.5, -15.5, 19.5, 5.9)
	pt3dadd(-57.5, -12.5, 25, 5.9)
  }
  dend[79] {pt3dclear()
	pt3dadd(-8.91, -38.4, 8.01, 5.8)
	pt3dadd(-3, -3, 0, 5.8)
	pt3dadd(-3.5, -1, 0.5, 4)
	pt3dadd(-5, 1, -3, 3.8)
	pt3dadd(-5, 3, -3.5, 4.5)
	pt3dadd(-5, 6.5, 0, 5.1)
	pt3dadd(-6.5, 10.5, -2, 3.7)
	pt3dadd(-7.5, 13.5, -2.5, 3.5)
	pt3dadd(-9, 19.5, -3.5, 4.5)
	pt3dadd(-10, 22.5, -5.5, 4.5)
	pt3dadd(-10.5, 27, -5, 3.5)
	pt3dadd(-11.5, 29, -7, 3.2)
	pt3dadd(-13, 30.5, -7.5, 3.9)
	pt3dadd(-14.5, 33, -6.5, 3.9)
	pt3dadd(-15, 36, -7, 3.8)
	pt3dadd(-17, 37.5, -6, 3.2)
	pt3dadd(-18.5, 40, -6.5, 4)
	pt3dadd(-18, 42.5, -7, 3.4)
	pt3dadd(-19.5, 44.5, -7.5, 3.9)
	pt3dadd(-21, 46, -8, 3.1)
	pt3dadd(-21.5, 47.5, -8.5, 3.2)
	pt3dadd(-20, 50, -10.5, 4.1)
	pt3dadd(-20, 53, -11, 3.7)
	pt3dadd(-20, 55.5, -13, 3.7)
	pt3dadd(-19.5, 59, -13.5, 3.5)
	pt3dadd(-19, 62, -11.5, 3.8)
	pt3dadd(-19, 64.5, -15, 4.5)
	pt3dadd(-19, 68.5, -16, 4.5)
	pt3dadd(-19, 70.5, -16, 3.7)
	pt3dadd(-17, 73.5, -17, 3.4)
	pt3dadd(-16, 76, -23.5, 3.4)
	pt3dadd(-15, 78.5, -24, 2.8)
	pt3dadd(-15, 80.5, -24.5, 2.1)
	pt3dadd(-15, 83, -25, 1.8)
  }
}
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()
  shape3d_17()
  shape3d_18()
}
access soma

celldef()