//this is C3_5 cell from smith

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

create soma[1], axon[1], dend[18], apic[25]

proc topol() { local i
  connect axon[0](0), soma[0](0.5)
  connect dend(0), soma[0](0.5)
  for i = 1, 2 connect dend[i](0), dend[i-1](1)
  connect dend[3](0), dend[1](1)
  for i = 4, 5 connect dend[i](0), dend[3](1)
  connect dend[6](0), dend(1)
  for i = 7, 8 connect dend[i](0), dend[6](1)
  for i = 9, 12 connect dend[i](0), soma[0](0.5)
  for i = 13, 14 connect dend[i](0), dend[12](1)
  for i = 15, 16 connect dend[i](0), dend[14](1)
  connect dend[17](0), soma[0](0.5)
  connect apic(0), soma[0](0.5)
  for i = 1, 2 connect apic[i](0), apic(1)
  for i = 3, 4 connect apic[i](0), apic[2](1)
  for i = 5, 7 connect apic[i](0), apic[i-1](1)
  connect apic[8](0), apic[6](1)
  connect apic[9](0), apic[5](1)
  connect apic[10](0), apic[4](1)
  for i = 11, 12 connect apic[i](0), apic[i-1](1)
  connect apic[13](0), apic[11](1)
  for i = 14, 16 connect apic[i](0), apic[i-1](1)
  connect apic[17](0), apic[15](1)
  for i = 18, 19 connect apic[i](0), apic[17](1)
  connect apic[20](0), apic[14](1)
  connect apic[21](0), apic[13](1)
  for i = 22, 23 connect apic[i](0), apic[21](1)
  connect apic[24](0), apic[10](1)
  basic_shape()
}
proc shape3d_1() {
  soma[0] {pt3dclear()
	pt3dadd(19.4126, 3.28835, 11.1, 3.71981)
	pt3dadd(20.2648, 2.257, 11.1, 6.04344)
	pt3dadd(21.117, 1.22565, 11.1, 7.99126)
	pt3dadd(21.9693, 0.194302, 11.1, 9.25611)
	pt3dadd(22.8215, -0.837048, 11.1, 10.5557)
	pt3dadd(23.6737, -1.8684, 11.1, 12.0145)
	pt3dadd(24.5259, -2.89975, 11.1, 13.4174)
	pt3dadd(25.3782, -3.9311, 11.1, 14.7863)
	pt3dadd(26.2304, -4.96245, 11.1, 15.8521)
	pt3dadd(27.0826, -5.9938, 11.1, 16.6723)
	pt3dadd(27.9348, -7.02515, 11.1, 17.2499)
	pt3dadd(28.7871, -8.0565, 11.1, 17.6907)
	pt3dadd(29.6393, -9.08785, 11.1, 17.7061)
	pt3dadd(30.4915, -10.1192, 11.1, 17.517)
	pt3dadd(31.3438, -11.1506, 11.1, 16.6313)
	pt3dadd(32.196, -12.1819, 11.1, 15.2248)
	pt3dadd(33.0482, -13.2133, 11.1, 13.1964)
	pt3dadd(33.9004, -14.2446, 11.1, 10.2268)
	pt3dadd(34.7527, -15.276, 11.1, 7.33048)
	pt3dadd(35.6049, -16.3073, 11.1, 4.70386)
	pt3dadd(36.4571, -17.3387, 11.1, 2.99886)
  }
  axon[0] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(32.16, -18.62, 11.03, 1.09)
	pt3dadd(32.16, -18.8, 10.95, 1.09)
	pt3dadd(32.16, -18.99, 10.73, 1.09)
	pt3dadd(32.34, -19.35, 10.57, 1.09)
	pt3dadd(32.34, -19.71, 10.35, 1.09)
	pt3dadd(32.34, -20.26, 9.59, 1.09)
	pt3dadd(32.34, -20.62, 9.44, 1.09)
	pt3dadd(32.53, -20.99, 9.36, 1.09)
	pt3dadd(32.71, -21.54, 9.21, 1.09)
	pt3dadd(32.71, -21.9, 9.14, 1.09)
	pt3dadd(32.89, -22.26, 9.06, 1.09)
	pt3dadd(33.07, -22.63, 8.98, 1.09)
	pt3dadd(33.26, -23.18, 8.98, 1.09)
	pt3dadd(33.26, -23.9, 8.91, 1.09)
	pt3dadd(33.26, -24.82, 8.76, 1.09)
	pt3dadd(33.26, -25.18, 8.68, 1.09)
	pt3dadd(33.26, -25.91, 8.68, 1.09)
	pt3dadd(32.89, -27.18, 8.45, 1.09)
	pt3dadd(32.89, -27.73, 8.38, 1.09)
	pt3dadd(32.53, -29.01, 8.38, 1.09)
	pt3dadd(32.34, -29.73, 8.3, 1.09)
	pt3dadd(32.34, -30.83, 8.23, 1.09)
	pt3dadd(32.16, -31.56, 8.15, 1.09)
	pt3dadd(31.98, -32.47, 8.07, 1.09)
	pt3dadd(31.61, -33.01, 8.07, 1.09)
	pt3dadd(31.25, -34.11, 8.07, 1.09)
	pt3dadd(30.88, -35.02, 7.77, 1.09)
	pt3dadd(30.7, -35.93, 7.62, 1.09)
	pt3dadd(30.7, -36.29, 7.62, 1.09)
	pt3dadd(30.34, -37.21, 7.62, 1.09)
	pt3dadd(30.15, -37.75, 7.17, 1.09)
	pt3dadd(30.15, -38.3, 6.94, 1.09)
	pt3dadd(30.15, -39.39, 6.79, 1.09)
	pt3dadd(29.97, -40.12, 6.71, 1.09)
	pt3dadd(29.79, -41.21, 6.64, 1.09)
	pt3dadd(29.79, -42.49, 6.64, 0.91)
	pt3dadd(29.79, -42.49, 6.86, 0.91)
	pt3dadd(29.97, -42.85, 7.09, 0.91)
	pt3dadd(30.15, -43.76, 7.62, 0.91)
	pt3dadd(30.52, -44.86, 7.92, 0.91)
	pt3dadd(30.52, -45.77, 8.45, 0.91)
	pt3dadd(30.7, -46.86, 8.53, 0.91)
	pt3dadd(30.88, -47.41, 8.68, 0.91)
	pt3dadd(30.88, -47.95, 8.83, 0.91)
	pt3dadd(31.25, -48.87, 8.98, 0.91)
	pt3dadd(31.25, -49.41, 9.14, 0.91)
	pt3dadd(31.25, -50.14, 9.29, 0.91)
	pt3dadd(31.25, -50.87, 9.36, 0.91)
	pt3dadd(31.25, -51.6, 9.51, 0.91)
	pt3dadd(31.25, -52.15, 9.74, 0.91)
	pt3dadd(31.25, -53.06, 9.89, 0.91)
	pt3dadd(31.07, -53.79, 10.04, 0.91)
	pt3dadd(30.88, -54.88, 10.12, 0.91)
	pt3dadd(30.88, -55.79, 10.2, 0.91)
	pt3dadd(31.07, -57.06, 10.2, 0.91)
	pt3dadd(31.43, -58.52, 10.27, 0.91)
	pt3dadd(31.43, -60.16, 10.65, 0.91)
	pt3dadd(31.43, -61.26, 10.88, 0.91)
	pt3dadd(31.61, -62.35, 10.95, 0.91)
	pt3dadd(31.98, -63.26, 11.1, 0.91)
	pt3dadd(32.16, -64.54, 11.18, 0.91)
	pt3dadd(32.53, -65.81, 11.33, 0.91)
	pt3dadd(32.71, -66.9, 11.56, 0.91)
	pt3dadd(32.89, -68.36, 11.71, 0.91)
	pt3dadd(33.07, -70.73, 11.86, 0.91)
	pt3dadd(33.07, -71.09, 11.94, 0.91)
	pt3dadd(33.07, -72.01, 12.17, 0.91)
	pt3dadd(33.07, -72.92, 12.39, 0.91)
	pt3dadd(33.44, -73.83, 12.54, 0.91)
	pt3dadd(33.44, -74.56, 12.77, 0.91)
	pt3dadd(33.62, -75.83, 13, 0.91)
	pt3dadd(33.8, -76.74, 13.15, 0.91)
	pt3dadd(34.17, -77.84, 13.3, 0.91)
	pt3dadd(34.35, -78.75, 13.45, 0.91)
	pt3dadd(34.53, -79.84, 13.6, 0.91)
	pt3dadd(34.35, -81.12, 13.83, 0.91)
	pt3dadd(34.35, -82.75, 13.91, 0.91)
	pt3dadd(34.72, -84.39, 14.06, 0.91)
	pt3dadd(35.08, -85.85, 14.21, 0.91)
	pt3dadd(35.26, -86.95, 14.36, 0.91)
	pt3dadd(35.63, -88.04, 14.51, 0.91)
	pt3dadd(35.99, -89.13, 14.67, 0.91)
	pt3dadd(36.36, -90.23, 14.89, 0.91)
	pt3dadd(36.54, -91.14, 15.12, 0.91)
	pt3dadd(36.91, -91.68, 15.27, 0.91)
	pt3dadd(37.27, -92.41, 15.57, 0.91)
	pt3dadd(37.82, -93.14, 15.65, 0.91)
	pt3dadd(38, -93.5, 15.65, 0.91)
	pt3dadd(38.18, -93.87, 15.65, 0.91)
	pt3dadd(38.37, -94.42, 15.8, 0.91)
	pt3dadd(38.73, -94.78, 16.1, 0.91)
	pt3dadd(39.1, -95.51, 16.41, 0.91)
	pt3dadd(39.64, -96.24, 16.56, 0.91)
	pt3dadd(40.19, -96.78, 16.79, 0.91)
	pt3dadd(40.74, -97.51, 16.86, 0.91)
	pt3dadd(41.65, -98.24, 17.16, 0.91)
	pt3dadd(41.83, -98.61, 17.32, 0.91)
	pt3dadd(42.2, -99.34, 17.47, 0.91)
	pt3dadd(42.74, -100.06, 17.47, 0.91)
	pt3dadd(43.29, -100.97, 17.09, 0.91)
	pt3dadd(43.66, -101.52, 16.94, 0.91)
	pt3dadd(44.02, -102.25, 16.79, 0.91)
	pt3dadd(44.02, -102.61, 16.71, 0.91)
	pt3dadd(44.2, -102.98, 16.56, 0.91)
	pt3dadd(44.57, -103.89, 16.33, 0.91)
	pt3dadd(45.12, -105.17, 16.1, 0.91)
	pt3dadd(45.48, -106.44, 15.88, 0.91)
	pt3dadd(45.66, -107.53, 15.65, 0.91)
	pt3dadd(46.21, -108.81, 15.42, 0.91)
	pt3dadd(46.58, -109.36, 15.35, 0.91)
	pt3dadd(46.94, -110.45, 15.2, 0.91)
	pt3dadd(47.12, -111.36, 14.97, 0.91)
	pt3dadd(47.67, -112.45, 14.82, 0.91)
	pt3dadd(47.85, -113.36, 14.59, 0.91)
	pt3dadd(48.04, -114.28, 14.51, 0.91)
	pt3dadd(48.77, -115.37, 14.29, 0.91)
	pt3dadd(49.13, -116.28, 14.21, 0.91)
	pt3dadd(49.49, -117.19, 14.06, 0.91)
	pt3dadd(49.49, -117.56, 13.98, 0.91)
	pt3dadd(49.49, -118.47, 13.98, 0.91)
	pt3dadd(49.68, -119.38, 13.76, 0.91)
	pt3dadd(49.49, -120.47, 13.76, 0.91)
	pt3dadd(49.68, -121.75, 13.76, 0.91)
	pt3dadd(50.04, -122.11, 13.76, 0.91)
	pt3dadd(49.68, -122.84, 13.68, 0.91)
	pt3dadd(49.68, -123.2, 13.6, 0.91)
	pt3dadd(49.68, -124.11, 13.53, 0.91)
	pt3dadd(49.68, -124.84, 13.38, 0.91)
	pt3dadd(49.49, -125.94, 13.3, 0.91)
	pt3dadd(49.13, -126.67, 13.15, 0.91)
	pt3dadd(48.95, -127.21, 13, 0.91)
	pt3dadd(48.95, -127.94, 12.85, 0.91)
	pt3dadd(48.77, -128.67, 12.77, 0.91)
	pt3dadd(48.58, -129.22, 12.62, 0.91)
	pt3dadd(48.4, -129.94, 12.47, 0.91)
	pt3dadd(48.22, -130.67, 12.32, 0.91)
	pt3dadd(47.85, -131.58, 12.24, 0.91)
	pt3dadd(47.85, -133.04, 12.17, 0.91)
	pt3dadd(47.85, -134.5, 12.17, 0.91)
	pt3dadd(47.85, -136.14, 12.17, 0.91)
	pt3dadd(48.04, -137.23, 12.09, 0.91)
	pt3dadd(48.77, -138.51, 12.01, 0.91)
	pt3dadd(48.95, -139.6, 11.86, 0.91)
	pt3dadd(48.95, -140.88, 11.79, 0.91)
	pt3dadd(48.95, -143.06, 11.79, 0.91)
	pt3dadd(48.77, -145.43, 11.71, 0.91)
	pt3dadd(47.76, -146.3, 11.71, 0.91)
	pt3dadd(47.76, -147.21, 11.64, 0.91)
	pt3dadd(47.58, -147.94, 11.64, 0.91)
	pt3dadd(47.4, -149.03, 11.56, 0.91)
	pt3dadd(47.21, -149.76, 11.56, 0.91)
	pt3dadd(47.03, -150.12, 11.33, 0.91)
	pt3dadd(47.03, -150.49, 11.26, 0.91)
	pt3dadd(47.03, -151.03, 11.18, 0.91)
	pt3dadd(47.03, -151.4, 10.95, 0.91)
	pt3dadd(47.03, -152.13, 10.8, 0.91)
	pt3dadd(47.03, -152.49, 10.65, 0.91)
	pt3dadd(47.03, -152.86, 10.5, 0.91)
	pt3dadd(47.03, -153.77, 10.2, 0.91)
	pt3dadd(46.85, -154.31, 9.89, 0.91)
	pt3dadd(46.85, -155.04, 9.67, 0.91)
	pt3dadd(46.85, -155.59, 9.59, 0.91)
	pt3dadd(47.03, -156.68, 9.44, 0.91)
	pt3dadd(47.4, -157.41, 9.29, 0.91)
	pt3dadd(48.13, -158.69, 9.06, 0.91)
	pt3dadd(48.67, -159.78, 8.91, 0.91)
	pt3dadd(49.04, -161.24, 8.83, 0.91)
	pt3dadd(49.22, -162.51, 8.68, 0.91)
	pt3dadd(49.22, -163.97, 8.61, 0.91)
	pt3dadd(49.59, -166.7, 8.61, 0.91)
	pt3dadd(49.59, -169.25, 8.61, 0.91)
	pt3dadd(49.59, -172.72, 8.61, 0.91)
	pt3dadd(50.13, -174.54, 8.61, 0.91)
	pt3dadd(50.13, -176.72, 8.53, 0.91)
	pt3dadd(50.32, -178.91, 8.53, 0.91)
	pt3dadd(50.5, -180.73, 8.53, 0.91)
	pt3dadd(50.68, -182.55, 8.53, 0.91)
	pt3dadd(50.86, -184.01, 8.53, 0.91)
  }
}
proc shape3d_2() {
  axon[0] {	pt3dadd(51.05, -185.83, 8.53, 0.91)
	pt3dadd(52.51, -192.03, 8.53, 0.91)
	pt3dadd(52.69, -193.12, 8.53, 0.91)
	pt3dadd(52.69, -194.4, 8.53, 0.91)
	pt3dadd(52.87, -195.13, 8.53, 0.91)
	pt3dadd(52.87, -195.85, 8.53, 0.91)
	pt3dadd(53.05, -196.4, 8.38, 0.91)
	pt3dadd(53.42, -197.68, 8.3, 0.91)
	pt3dadd(53.6, -198.95, 8.15, 0.91)
	pt3dadd(53.6, -200.23, 8, 0.91)
	pt3dadd(53.96, -202.05, 7.85, 0.91)
	pt3dadd(53.96, -202.96, 7.77, 0.91)
	pt3dadd(53.96, -204.6, 7.7, 0.91)
	pt3dadd(54.15, -207.52, 7.62, 0.91)
	pt3dadd(54.15, -209.7, 7.62, 0.91)
	pt3dadd(54.69, -213.89, 7.62, 0.91)
	pt3dadd(54.88, -215.71, 7.62, 0.91)
	pt3dadd(55.24, -217.9, 7.62, 0.91)
	pt3dadd(55.61, -219.54, 7.47, 0.91)
	pt3dadd(55.97, -221, 7.39, 0.91)
	pt3dadd(56.52, -222.82, 7.39, 0.91)
	pt3dadd(57.07, -225.01, 7.39, 0.91)
	pt3dadd(57.61, -227.01, 7.39, 0.91)
	pt3dadd(58.34, -230.11, 7.39, 0.91)
	pt3dadd(58.53, -233.39, 7.39, 0.91)
	pt3dadd(59.26, -236.49, 7.39, 0.91)
	pt3dadd(61.26, -241.04, 7.39, 0.91)
	pt3dadd(61.27, -241.55, 7.39, 0.55)
	pt3dadd(61.09, -242.64, 7.39, 0.55)
	pt3dadd(61.27, -243.73, 7.32, 0.55)
	pt3dadd(61.46, -244.64, 7.24, 0.55)
	pt3dadd(61.64, -245.19, 7.24, 0.55)
	pt3dadd(61.82, -246.1, 7.09, 0.55)
	pt3dadd(62, -247.2, 7.01, 0.55)
	pt3dadd(62, -247.92, 6.94, 0.55)
	pt3dadd(62.19, -248.65, 6.86, 0.55)
	pt3dadd(62.19, -249.75, 6.71, 0.55)
	pt3dadd(62.19, -251.39, 6.56, 0.55)
	pt3dadd(61.82, -252.84, 6.48, 0.55)
	pt3dadd(62, -254.12, 6.41, 0.73)
	pt3dadd(62, -254.67, 6.41, 0.73)
	pt3dadd(61.82, -255.58, 6.33, 0.73)
	pt3dadd(62, -257.58, 6.26, 0.73)
	pt3dadd(61.82, -259.95, 6.18, 0.73)
	pt3dadd(61.64, -261.59, 6.11, 0.73)
	pt3dadd(61.64, -263.05, 6.11, 0.73)
	pt3dadd(62, -264.87, 6.11, 0.73)
	pt3dadd(62.73, -266.87, 6.11, 0.73)
	pt3dadd(63.1, -268.51, 6.11, 0.73)
	pt3dadd(63.46, -270.33, 6.11, 0.73)
	pt3dadd(63.83, -272.16, 6.11, 0.73)
	pt3dadd(64.56, -274.34, 6.03, 0.73)
	pt3dadd(64.74, -275.44, 5.88, 0.73)
	pt3dadd(64.92, -276.71, 5.88, 0.73)
	pt3dadd(65.11, -277.8, 5.8, 0.73)
	pt3dadd(65.11, -278.72, 5.8, 0.73)
	pt3dadd(64.92, -279.63, 5.73, 0.73)
	pt3dadd(64.56, -280.9, 5.65, 0.73)
	pt3dadd(64.38, -281.45, 5.65, 0.73)
	pt3dadd(64.38, -281.81, 5.95, 0.73)
	pt3dadd(64.19, -282.54, 6.33, 0.73)
	pt3dadd(64.19, -283.27, 6.48, 0.73)
	pt3dadd(63.83, -284, 6.71, 0.73)
	pt3dadd(63.65, -284.73, 6.86, 0.73)
	pt3dadd(63.46, -285.46, 7.01, 0.73)
	pt3dadd(62.92, -286.91, 7.17, 0.73)
	pt3dadd(62.55, -287.83, 7.39, 0.73)
	pt3dadd(62.19, -288.74, 7.7, 0.73)
	pt3dadd(61.09, -290.38, 7.85, 0.73)
	pt3dadd(60, -292.2, 8.07, 0.73)
	pt3dadd(58.9, -293.66, 8.23, 0.73)
	pt3dadd(58.35, -294.38, 8.3, 0.73)
	pt3dadd(57.62, -295.3, 8.53, 0.73)
	pt3dadd(56.89, -296.39, 8.68, 0.73)
	pt3dadd(56.17, -297.12, 8.91, 0.73)
	pt3dadd(54.71, -298.21, 9.06, 0.73)
	pt3dadd(53.43, -299.49, 9.14, 0.73)
	pt3dadd(52.33, -300.4, 9.14, 0.73)
	pt3dadd(51.6, -301.49, 9.14, 0.73)
	pt3dadd(51.24, -304.59, 9.14, 0.73)
  }
  dend {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(20.93, -15.26, 10.5, 2.01)
	pt3dadd(20.93, -15.26, 10.42, 2.01)
	pt3dadd(20.38, -15.44, 10.42, 2.01)
	pt3dadd(20.02, -16.17, 10.27, 2.01)
	pt3dadd(19.83, -16.54, 10.2, 2.01)
	pt3dadd(19.47, -17.26, 10.12, 2.01)
	pt3dadd(19.29, -17.81, 10.12, 2.01)
	pt3dadd(18.92, -18.72, 10.12, 2.01)
	pt3dadd(18.74, -19.27, 10.04, 2.01)
	pt3dadd(18.19, -20, 9.97, 2.01)
	pt3dadd(17.83, -20.54, 9.97, 2.01)
	pt3dadd(17.28, -21.64, 9.97, 2.01)
	pt3dadd(17.1, -22, 9.97, 2.01)
	pt3dadd(17.1, -22.37, 9.97, 2.01)
  }
  dend[1] {pt3dclear()
	pt3dadd(17.1, -22.37, 9.97, 1.64)
	pt3dadd(16.31, -23.51, 10.27, 1.64)
	pt3dadd(16.13, -23.51, 10.27, 1.64)
	pt3dadd(15.95, -23.88, 10.27, 1.64)
	pt3dadd(15.95, -24.24, 10.27, 1.64)
	pt3dadd(15.95, -24.79, 10.27, 1.64)
	pt3dadd(15.95, -25.34, 10.2, 1.64)
	pt3dadd(15.95, -25.7, 10.12, 1.64)
	pt3dadd(16.31, -26.25, 10.04, 1.64)
	pt3dadd(16.49, -26.98, 9.97, 1.64)
  }
  dend[2] {pt3dclear()
	pt3dadd(16.49, -26.98, 9.97, 0.91)
	pt3dadd(16.65, -27.18, 10.04, 0.91)
	pt3dadd(16.84, -28.64, 9.89, 0.91)
	pt3dadd(17.02, -29.19, 9.82, 0.91)
	pt3dadd(17.2, -30.1, 9.67, 0.91)
	pt3dadd(17.38, -31.01, 9.51, 0.91)
	pt3dadd(17.93, -31.56, 9.44, 0.91)
	pt3dadd(18.11, -32.29, 9.36, 0.91)
	pt3dadd(18.66, -33.2, 9.21, 0.91)
	pt3dadd(18.84, -33.93, 9.06, 0.91)
	pt3dadd(19.03, -34.65, 8.98, 0.91)
	pt3dadd(19.39, -35.38, 8.83, 0.91)
	pt3dadd(19.57, -36.11, 8.83, 0.91)
	pt3dadd(19.76, -36.48, 8.68, 0.91)
	pt3dadd(20.3, -36.84, 8.68, 0.91)
	pt3dadd(20.67, -37.21, 8.61, 0.91)
	pt3dadd(21.03, -37.57, 8.83, 0.91)
	pt3dadd(21.58, -37.93, 9.36, 0.91)
	pt3dadd(22.13, -38.12, 9.67, 0.91)
	pt3dadd(22.86, -38.3, 9.82, 0.91)
	pt3dadd(23.22, -38.3, 9.89, 0.91)
	pt3dadd(23.77, -38.66, 10.12, 0.91)
	pt3dadd(24.5, -39.03, 10.35, 0.91)
	pt3dadd(25.41, -39.76, 10.5, 0.91)
	pt3dadd(25.78, -40.12, 10.65, 0.91)
	pt3dadd(26.32, -40.67, 10.8, 0.91)
	pt3dadd(26.69, -41.03, 10.88, 0.91)
	pt3dadd(26.87, -41.76, 11.03, 0.91)
	pt3dadd(27.05, -42.49, 11.18, 0.55)
	pt3dadd(27.42, -43.04, 11.33, 0.55)
	pt3dadd(27.6, -43.58, 11.48, 0.55)
	pt3dadd(27.78, -44.13, 11.71, 0.55)
	pt3dadd(27.97, -45.22, 11.94, 0.55)
	pt3dadd(28.33, -45.77, 12.09, 0.55)
	pt3dadd(28.7, -46.13, 12.17, 0.55)
	pt3dadd(29.43, -46.86, 12.32, 0.55)
	pt3dadd(29.97, -47.41, 12.54, 0.55)
	pt3dadd(30.34, -47.95, 12.7, 0.55)
	pt3dadd(30.88, -48.32, 12.85, 0.55)
	pt3dadd(31.07, -48.87, 13, 0.55)
	pt3dadd(31.25, -49.23, 13.07, 0.55)
	pt3dadd(31.61, -49.78, 13.3, 0.55)
	pt3dadd(32.16, -50.14, 13.45, 0.55)
	pt3dadd(32.34, -50.51, 13.6, 0.55)
	pt3dadd(33.07, -51.05, 13.68, 0.55)
	pt3dadd(33.62, -51.42, 13.83, 0.55)
	pt3dadd(33.8, -51.78, 13.6, 0.55)
	pt3dadd(34.17, -52.15, 13.38, 0.55)
	pt3dadd(34.53, -52.87, 12.92, 0.55)
	pt3dadd(34.72, -53.24, 12.77, 0.55)
	pt3dadd(35.08, -53.42, 12.54, 0.55)
	pt3dadd(35.08, -53.79, 12.32, 0.55)
	pt3dadd(35.45, -54.33, 12.09, 0.55)
	pt3dadd(35.81, -54.88, 11.94, 0.55)
	pt3dadd(35.81, -55.43, 11.79, 0.55)
	pt3dadd(35.99, -56.15, 11.64, 0.55)
	pt3dadd(36.54, -56.88, 11.48, 0.55)
	pt3dadd(36.91, -57.61, 11.33, 0.55)
	pt3dadd(37.27, -58.34, 11.26, 0.55)
	pt3dadd(37.64, -58.7, 11.26, 0.55)
  }
  dend[3] {pt3dclear()
	pt3dadd(16.49, -26.98, 9.97, 0.91)
	pt3dadd(15.58, -26.98, 9.97, 0.91)
	pt3dadd(15.4, -27.34, 9.97, 0.91)
	pt3dadd(15.22, -27.7, 9.97, 0.91)
	pt3dadd(15.04, -28.25, 9.97, 0.91)
	pt3dadd(14.85, -28.8, 9.82, 0.91)
	pt3dadd(14.85, -29.16, 9.74, 0.91)
	pt3dadd(14.67, -29.71, 9.67, 0.55)
	pt3dadd(14.49, -30.07, 9.44, 0.55)
	pt3dadd(14.49, -30.44, 9.44, 0.55)
	pt3dadd(14.31, -30.8, 9.44, 0.55)
	pt3dadd(14.31, -31.35, 10.04, 0.55)
	pt3dadd(14.31, -31.89, 10.27, 0.55)
	pt3dadd(14.31, -32.26, 10.5, 0.55)
	pt3dadd(14.12, -32.81, 10.65, 0.55)
	pt3dadd(13.94, -33.35, 10.8, 0.55)
	pt3dadd(13.76, -34.26, 10.88, 0.55)
	pt3dadd(13.58, -34.81, 11.1, 0.55)
	pt3dadd(13.39, -35.54, 11.41, 0.55)
	pt3dadd(13.21, -36.45, 11.48, 0.55)
	pt3dadd(13.03, -37.18, 11.56, 0.55)
	pt3dadd(12.85, -37.91, 11.64, 0.55)
	pt3dadd(12.66, -38.27, 11.64, 0.55)
  }
  dend[4] {pt3dclear()
	pt3dadd(12.66, -38.27, 11.64, 0.55)
	pt3dadd(13.03, -38.45, 11.56, 0.55)
	pt3dadd(13.03, -38.45, 11.56, 0.55)
	pt3dadd(13.39, -39.18, 11.48, 0.55)
	pt3dadd(13.94, -40.09, 11.33, 0.55)
	pt3dadd(14.12, -40.46, 11.33, 0.55)
	pt3dadd(14.67, -41.37, 11.26, 0.55)
	pt3dadd(15.22, -41.73, 11.26, 0.55)
	pt3dadd(16.31, -42.83, 11.18, 0.55)
	pt3dadd(16.68, -43.56, 11.1, 0.55)
	pt3dadd(17.22, -44.28, 11.1, 0.55)
	pt3dadd(18.32, -45.2, 11.03, 0.55)
  }
}
proc shape3d_3() {
  dend[4] {	pt3dadd(18.87, -45.56, 10.88, 0.55)
	pt3dadd(19.41, -46.29, 10.88, 0.55)
	pt3dadd(19.78, -46.65, 10.8, 0.55)
	pt3dadd(20.33, -47.2, 10.8, 0.55)
	pt3dadd(20.87, -47.38, 10.73, 0.55)
	pt3dadd(21.79, -47.38, 10.73, 0.55)
	pt3dadd(23.06, -47.75, 10.65, 0.55)
	pt3dadd(23.98, -47.93, 10.57, 0.55)
	pt3dadd(25.25, -48.29, 10.5, 0.55)
	pt3dadd(25.98, -48.66, 10.42, 0.55)
	pt3dadd(26.89, -49.02, 10.35, 0.55)
	pt3dadd(27.99, -49.39, 10.35, 0.55)
	pt3dadd(30, -50.3, 10.35, 0.55)
	pt3dadd(31.82, -50.84, 10.27, 0.55)
	pt3dadd(33.1, -51.94, 10.2, 0.55)
	pt3dadd(34.74, -53.21, 10.2, 0.55)
	pt3dadd(35.11, -53.76, 10.2, 0.55)
	pt3dadd(35.84, -54.12, 10.2, 0.55)
	pt3dadd(36.75, -54.67, 9.97, 0.55)
	pt3dadd(38.02, -55.4, 9.97, 0.55)
  }
  dend[5] {pt3dclear()
	pt3dadd(12.66, -38.27, 11.64, 0.36)
	pt3dadd(12.3, -38.09, 11.64, 0.36)
	pt3dadd(11.75, -38.64, 11.64, 0.36)
	pt3dadd(11.39, -39, 11.71, 0.36)
	pt3dadd(11.2, -39.36, 11.86, 0.36)
	pt3dadd(10.66, -39.55, 12.01, 0.36)
	pt3dadd(10.11, -40.28, 12.17, 0.36)
	pt3dadd(9.56, -40.82, 12.32, 0.36)
	pt3dadd(9.01, -41.55, 12.39, 0.36)
	pt3dadd(7.74, -42.46, 12.62, 0.36)
	pt3dadd(6.82, -42.64, 12.77, 0.36)
	pt3dadd(6.28, -43.01, 12.92, 0.36)
	pt3dadd(5.55, -43.19, 12.92, 0.36)
	pt3dadd(5, -43.19, 12.92, 0.36)
	pt3dadd(4.27, -43.19, 12.92, 0.36)
	pt3dadd(3.54, -43.19, 13, 0.36)
	pt3dadd(1.53, -42.83, 13.15, 0.36)
	pt3dadd(0.99, -42.64, 13.23, 0.36)
	pt3dadd(0.44, -42.28, 13.3, 0.36)
	pt3dadd(-0.11, -41.92, 13.45, 0.36)
	pt3dadd(-0.66, -41.55, 13.6, 0.36)
	pt3dadd(-1.39, -41, 13.76, 0.36)
	pt3dadd(-1.93, -40.64, 13.83, 0.36)
	pt3dadd(-2.66, -40.64, 13.83, 0.36)
	pt3dadd(-3.76, -40.46, 13.83, 0.36)
	pt3dadd(-4.67, -40.46, 13.91, 0.36)
	pt3dadd(-5.4, -40.46, 13.91, 0.36)
	pt3dadd(-6.31, -40.46, 13.91, 0.36)
	pt3dadd(-7.77, -40.28, 13.83, 0.36)
	pt3dadd(-8.5, -40.28, 13.76, 0.36)
	pt3dadd(-9.41, -40.09, 13.6, 0.36)
	pt3dadd(-10.51, -40.09, 13.45, 0.36)
	pt3dadd(-11.97, -40.09, 13.38, 0.36)
	pt3dadd(-13.43, -39.91, 13.23, 0.36)
	pt3dadd(-14.7, -39.91, 13.15, 0.36)
	pt3dadd(-15.8, -39.91, 13.07, 0.36)
	pt3dadd(-17.81, -39.36, 12.92, 0.36)
	pt3dadd(-19.08, -38.82, 12.85, 0.36)
	pt3dadd(-20.73, -38.64, 12.77, 0.36)
	pt3dadd(-21.82, -38.09, 12.7, 0.36)
	pt3dadd(-22.55, -38.09, 12.7, 0.36)
	pt3dadd(-23.28, -37.72, 12.7, 0.55)
	pt3dadd(-23.64, -37, 12.7, 0.55)
	pt3dadd(-24.19, -36.63, 12.7, 0.55)
	pt3dadd(-24.92, -36.45, 12.62, 0.55)
	pt3dadd(-25.83, -35.9, 12.62, 0.55)
	pt3dadd(-27.11, -34.81, 12.62, 0.55)
	pt3dadd(-28.02, -34.26, 12.62, 0.55)
	pt3dadd(-29.67, -33.72, 12.62, 0.55)
	pt3dadd(-29.85, -33.72, 12.62, 0.55)
	pt3dadd(-30.4, -33.35, 12.62, 0.55)
	pt3dadd(-30.94, -33.17, 12.85, 0.55)
	pt3dadd(-31.86, -32.08, 13.3, 0.55)
	pt3dadd(-32.4, -31.89, 13.6, 0.55)
	pt3dadd(-32.95, -31.89, 13.76, 0.55)
	pt3dadd(-33.5, -31.89, 13.98, 0.55)
	pt3dadd(-34.23, -31.53, 14.06, 0.55)
	pt3dadd(-35.69, -31.17, 14.29, 0.55)
	pt3dadd(-36.78, -30.98, 14.51, 0.55)
	pt3dadd(-37.69, -30.62, 14.67, 0.55)
	pt3dadd(-38.42, -30.62, 14.74, 0.55)
	pt3dadd(-39.88, -30.44, 14.74, 0.55)
	pt3dadd(-40.8, -30.25, 14.74, 0.55)
	pt3dadd(-41.71, -29.89, 15.12, 0.55)
	pt3dadd(-42.44, -29.89, 15.35, 0.55)
	pt3dadd(-43.53, -29.89, 15.57, 0.55)
	pt3dadd(-44.26, -29.89, 15.73, 0.55)
	pt3dadd(-44.99, -29.71, 16.03, 0.55)
	pt3dadd(-46.09, -29.71, 16.26, 0.55)
	pt3dadd(-47.18, -29.71, 16.41, 0.55)
	pt3dadd(-47.73, -29.71, 16.56, 0.55)
	pt3dadd(-48.64, -29.71, 16.71, 0.55)
	pt3dadd(-49.19, -29.53, 16.86, 0.55)
	pt3dadd(-50.1, -29.53, 16.94, 0.55)
	pt3dadd(-51.56, -29.53, 17.16, 0.55)
	pt3dadd(-52.11, -29.53, 17.24, 0.55)
	pt3dadd(-52.84, -29.53, 17.24, 0.55)
	pt3dadd(-53.75, -29.53, 17.09, 0.55)
	pt3dadd(-54.48, -29.53, 16.63, 0.55)
	pt3dadd(-55.21, -29.53, 16.26, 0.55)
	pt3dadd(-55.39, -29.53, 15.88, 0.55)
	pt3dadd(-55.39, -29.53, 15.42, 0.55)
	pt3dadd(-55.57, -29.71, 15.12, 0.55)
	pt3dadd(-56.3, -29.53, 14.89, 0.55)
	pt3dadd(-57.03, -29.53, 14.82, 0.55)
	pt3dadd(-57.58, -29.34, 14.67, 0.55)
	pt3dadd(-58.13, -29.34, 14.59, 0.55)
	pt3dadd(-58.49, -29.53, 14.36, 0.55)
	pt3dadd(-59.59, -29.71, 14.21, 0.55)
	pt3dadd(-59.77, -29.89, 13.98, 0.55)
	pt3dadd(-60.32, -29.89, 13.68, 0.55)
	pt3dadd(-60.68, -30.25, 13.53, 0.55)
	pt3dadd(-61.05, -30.25, 13.23, 0.55)
	pt3dadd(-61.41, -30.44, 13, 0.55)
	pt3dadd(-61.96, -30.44, 12.77, 0.55)
	pt3dadd(-62.14, -30.44, 12.54, 0.55)
	pt3dadd(-62.87, -30.44, 12.47, 0.55)
	pt3dadd(-63.05, -30.62, 12.39, 0.55)
	pt3dadd(-65.24, -30.8, 12.09, 0.55)
	pt3dadd(-65.97, -30.8, 11.94, 0.55)
	pt3dadd(-67.62, -30.8, 11.79, 0.55)
	pt3dadd(-69.26, -30.62, 11.56, 0.55)
	pt3dadd(-70.72, -30.62, 11.41, 0.55)
	pt3dadd(-71.99, -30.62, 11.33, 0.55)
	pt3dadd(-73.82, -30.44, 11.18, 0.55)
	pt3dadd(-75.46, -30.44, 11.1, 0.55)
	pt3dadd(-76.37, -30.44, 10.95, 0.55)
	pt3dadd(-77.47, -30.44, 10.95, 0.55)
	pt3dadd(-78.75, -30.44, 10.88, 0.55)
	pt3dadd(-79.48, -30.8, 10.73, 0.55)
	pt3dadd(-80.21, -31.35, 10.73, 0.55)
	pt3dadd(-80.93, -31.89, 10.65, 0.55)
	pt3dadd(-81.3, -32.26, 10.57, 0.55)
	pt3dadd(-82.21, -32.81, 10.5, 0.55)
	pt3dadd(-82.39, -33.17, 10.42, 0.55)
  }
  dend[6] {pt3dclear()
	pt3dadd(17.1, -22.37, 9.97, 1.28)
	pt3dadd(16.55, -22.37, 9.97, 1.28)
	pt3dadd(16.55, -22.37, 9.74, 1.28)
	pt3dadd(15.64, -22.37, 9.29, 1.28)
	pt3dadd(14.54, -22.37, 9.06, 1.28)
	pt3dadd(13.63, -22.37, 8.91, 1.28)
	pt3dadd(12.54, -22.37, 8.68, 1.28)
	pt3dadd(11.62, -22.55, 8.53, 1.28)
	pt3dadd(10.53, -23.09, 8.45, 1.28)
	pt3dadd(9.8, -23.46, 8.38, 1.28)
	pt3dadd(9.25, -23.82, 8.38, 1.28)
	pt3dadd(8.7, -24.37, 8.38, 1.28)
  }
  dend[7] {pt3dclear()
	pt3dadd(8.7, -24.37, 8.38, 0.73)
	pt3dadd(8.52, -24.55, 8.61, 0.73)
	pt3dadd(7.61, -25.1, 8.45, 0.73)
	pt3dadd(6.7, -25.65, 8.3, 0.73)
	pt3dadd(5.97, -26.19, 8.23, 0.73)
	pt3dadd(4.87, -27.1, 8, 0.73)
	pt3dadd(3.96, -27.83, 7.85, 0.73)
	pt3dadd(2.32, -28.38, 7.7, 0.73)
	pt3dadd(1.04, -28.92, 7.62, 0.73)
	pt3dadd(-0.24, -29.29, 7.54, 0.73)
	pt3dadd(-1.7, -29.65, 7.47, 0.73)
	pt3dadd(-2.97, -30.56, 7.39, 0.73)
	pt3dadd(-4.25, -31.66, 7.32, 0.73)
	pt3dadd(-6.26, -33.12, 7.32, 0.73)
	pt3dadd(-7.9, -34.03, 7.32, 0.73)
	pt3dadd(-11, -34.39, 7.24, 0.73)
	pt3dadd(-13.55, -34.39, 7.24, 0.73)
	pt3dadd(-17.02, -35.67, 7.54, 0.73)
	pt3dadd(-17.75, -36.94, 7.62, 0.73)
	pt3dadd(-18.48, -38.4, 7.62, 0.73)
	pt3dadd(-21.04, -40.77, 7.62, 0.73)
	pt3dadd(-22.68, -41.13, 7.7, 0.73)
	pt3dadd(-23.59, -44.41, 7.7, 0.73)
	pt3dadd(-23.95, -44.78, 7.7, 0.73)
	pt3dadd(-24.32, -45.32, 7.7, 0.73)
	pt3dadd(-25.6, -46.42, 7.7, 0.73)
	pt3dadd(-27.06, -47.14, 7.7, 0.73)
	pt3dadd(-27.97, -47.51, 7.54, 0.73)
	pt3dadd(-29.06, -47.69, 7.47, 0.73)
	pt3dadd(-29.79, -48.6, 7.47, 0.73)
	pt3dadd(-30.34, -50.06, 7.39, 0.73)
	pt3dadd(-30.89, -51.7, 7.24, 0.73)
	pt3dadd(-31.8, -53.16, 7.17, 0.73)
	pt3dadd(-32.35, -54.43, 7.01, 0.73)
	pt3dadd(-32.71, -55.53, 6.94, 0.73)
	pt3dadd(-33.81, -56.44, 6.79, 0.73)
	pt3dadd(-34.54, -57.35, 6.71, 0.73)
	pt3dadd(-35.45, -58.62, 6.64, 0.73)
	pt3dadd(-36.36, -59.53, 6.56, 0.73)
	pt3dadd(-37.46, -60.45, 6.48, 0.73)
	pt3dadd(-38.37, -61.54, 6.41, 0.73)
	pt3dadd(-39.1, -62.45, 6.33, 0.73)
	pt3dadd(-40.19, -63, 6.33, 0.73)
	pt3dadd(-41.29, -63.72, 6.33, 0.73)
	pt3dadd(-42.38, -64.64, 6.79, 0.73)
	pt3dadd(-43.48, -65.36, 7.24, 0.73)
	pt3dadd(-45.48, -66.64, 7.32, 0.73)
	pt3dadd(-46.21, -67, 7.24, 0.73)
	pt3dadd(-47.31, -67.55, 7.09, 0.73)
	pt3dadd(-48.59, -67.92, 6.94, 0.73)
	pt3dadd(-49.86, -68.28, 6.79, 0.73)
	pt3dadd(-50.96, -68.83, 6.71, 0.73)
	pt3dadd(-52.05, -69.56, 6.64, 0.73)
  }
}
proc shape3d_4() {
  dend[7] {	pt3dadd(-52.6, -70.28, 6.41, 0.73)
	pt3dadd(-53.69, -71.01, 6.26, 0.73)
	pt3dadd(-54.61, -71.74, 6.11, 0.73)
	pt3dadd(-56.25, -72.29, 6.03, 0.73)
	pt3dadd(-57.16, -72.65, 5.88, 0.73)
	pt3dadd(-58.8, -73.38, 5.8, 0.73)
	pt3dadd(-59.53, -73.56, 5.65, 0.73)
	pt3dadd(-60.81, -74.29, 5.58, 0.73)
	pt3dadd(-62.45, -75.02, 5.35, 0.73)
	pt3dadd(-64.46, -75.93, 5.27, 0.73)
	pt3dadd(-66.83, -77.03, 5.12, 0.73)
	pt3dadd(-67.74, -77.57, 4.97, 0.73)
	pt3dadd(-70.12, -78.85, 4.97, 0.73)
	pt3dadd(-70.85, -79.21, 4.97, 0.73)
	pt3dadd(-71.94, -79.76, 4.97, 0.73)
	pt3dadd(-72.67, -80.3, 4.82, 0.73)
	pt3dadd(-73.4, -80.49, 4.59, 0.73)
	pt3dadd(-74.68, -80.67, 4.51, 0.73)
	pt3dadd(-75.41, -80.67, 4.36, 0.73)
	pt3dadd(-74.91, -80.91, 4.29, 0.73)
	pt3dadd(-75.83, -80.72, 4.29, 0.73)
	pt3dadd(-76.92, -80.91, 4.21, 0.73)
	pt3dadd(-78.02, -81.09, 4.06, 0.73)
	pt3dadd(-79.29, -80.54, 3.91, 0.73)
	pt3dadd(-79.66, -80, 3.76, 0.73)
	pt3dadd(-79.84, -79.45, 3.76, 0.73)
	pt3dadd(-79.84, -78.9, 3.68, 0.73)
  }
  dend[8] {pt3dclear()
	pt3dadd(8.7, -24.37, 8.38, 0.91)
	pt3dadd(8.34, -24.01, 8.38, 0.91)
	pt3dadd(6.88, -23.64, 8.38, 0.91)
	pt3dadd(5.79, -23.46, 8.15, 0.91)
	pt3dadd(5.42, -23.46, 8.07, 0.91)
	pt3dadd(4.87, -23.46, 8.53, 0.91)
	pt3dadd(4.33, -23.28, 8.68, 0.91)
	pt3dadd(3.23, -23.09, 8.91, 0.91)
	pt3dadd(2.5, -22.73, 9.06, 0.91)
	pt3dadd(0.68, -22.37, 9.44, 0.91)
	pt3dadd(-0.78, -22, 9.67, 0.91)
	pt3dadd(-2.06, -21.82, 9.82, 0.91)
	pt3dadd(-2.97, -21.27, 9.97, 0.91)
	pt3dadd(-4.43, -21.09, 10.2, 0.91)
	pt3dadd(-5.71, -20.73, 10.2, 0.91)
	pt3dadd(-6.44, -20.54, 10.27, 0.91)
	pt3dadd(-7.53, -20.36, 10.35, 0.91)
	pt3dadd(-9.36, -20, 10.73, 0.91)
	pt3dadd(-10.09, -20, 10.95, 0.91)
	pt3dadd(-11, -19.81, 11.1, 0.91)
	pt3dadd(-12.28, -19.63, 11.18, 0.91)
	pt3dadd(-13.01, -19.45, 11.03, 0.91)
	pt3dadd(-13.55, -19.27, 10.73, 0.91)
	pt3dadd(-14.28, -19.09, 10.5, 0.91)
	pt3dadd(-15.2, -18.9, 10.12, 0.91)
	pt3dadd(-16.47, -18.72, 9.97, 0.91)
	pt3dadd(-17.39, -18.72, 9.82, 0.91)
	pt3dadd(-18.12, -18.54, 9.74, 0.91)
	pt3dadd(-18.66, -18.36, 9.51, 0.91)
	pt3dadd(-19.76, -17.99, 9.44, 0.91)
	pt3dadd(-21.22, -17.63, 8.83, 0.91)
	pt3dadd(-21.95, -17.45, 8.45, 0.91)
	pt3dadd(-22.5, -17.26, 8.23, 0.91)
	pt3dadd(-23.04, -17.08, 7.62, 0.91)
	pt3dadd(-23.59, -16.9, 7.47, 0.91)
	pt3dadd(-24.32, -16.54, 7.17, 0.91)
	pt3dadd(-25.05, -16.17, 6.94, 0.91)
	pt3dadd(-26.33, -15.81, 6.79, 0.91)
	pt3dadd(-27.79, -15.44, 6.48, 0.91)
	pt3dadd(-29.25, -15.26, 6.26, 0.91)
	pt3dadd(-31.44, -14.35, 6.03, 0.91)
	pt3dadd(-32.17, -13.98, 6.03, 0.91)
	pt3dadd(-33.08, -13.44, 5.88, 0.91)
	pt3dadd(-33.81, -13.07, 5.88, 0.91)
	pt3dadd(-34.35, -12.71, 5.88, 0.91)
  }
  dend[9] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(35.45, -16.43, 11.1, 2.19)
	pt3dadd(35.81, -16.62, 11.1, 2.19)
	pt3dadd(35.99, -16.98, 11.1, 2.19)
	pt3dadd(36.54, -17.53, 11.1, 2.19)
	pt3dadd(36.91, -17.53, 11.1, 2.19)
	pt3dadd(37.27, -17.89, 11.18, 2.19)
	pt3dadd(37.82, -18.26, 11.48, 2.19)
	pt3dadd(38.18, -18.26, 11.71, 2.19)
	pt3dadd(38.73, -18.8, 11.86, 2.19)
	pt3dadd(39.46, -18.8, 12.17, 2.19)
	pt3dadd(40.19, -18.99, 12.32, 2.19)
	pt3dadd(41.65, -19.71, 12.7, 2.19)
	pt3dadd(42.74, -20.62, 13, 2.19)
	pt3dadd(43.11, -20.81, 13.15, 2.19)
	pt3dadd(44.2, -21.17, 13.38, 2.19)
	pt3dadd(44.75, -21.54, 13.53, 2.19)
	pt3dadd(46.03, -22.08, 13.76, 2.19)
	pt3dadd(46.94, -22.45, 13.91, 2.19)
	pt3dadd(47.49, -22.45, 13.98, 2.19)
	pt3dadd(48.22, -22.81, 14.06, 2.19)
	pt3dadd(49.13, -23.36, 14.06, 2.19)
	pt3dadd(49.49, -23.9, 14.06, 2.19)
	pt3dadd(50.22, -24.45, 14.06, 2.19)
	pt3dadd(50.77, -25.18, 14.06, 2.19)
	pt3dadd(51.32, -25.54, 14.06, 2.19)
	pt3dadd(51.68, -25.18, 14.06, 2.74)
	pt3dadd(51.87, -25, 14.06, 2.74)
	pt3dadd(52.05, -25, 14.06, 2.74)
	pt3dadd(52.05, -25.91, 14.06, 1.09)
	pt3dadd(51.68, -26.27, 14.06, 1.09)
	pt3dadd(51.68, -26.82, 14.21, 1.09)
	pt3dadd(51.68, -27.37, 14.44, 1.09)
	pt3dadd(52.41, -27.91, 14.59, 1.09)
	pt3dadd(52.78, -28.1, 14.67, 1.09)
	pt3dadd(52.96, -28.46, 14.97, 1.09)
	pt3dadd(53.14, -28.82, 15.12, 1.09)
	pt3dadd(53.51, -29.19, 15.2, 1.09)
	pt3dadd(53.69, -29.92, 15.35, 1.09)
	pt3dadd(53.87, -30.65, 15.88, 1.09)
	pt3dadd(54.24, -31.19, 16.1, 1.09)
	pt3dadd(54.97, -31.92, 16.56, 1.09)
	pt3dadd(55.15, -32.29, 16.63, 1.09)
	pt3dadd(55.52, -32.65, 16.79, 1.09)
	pt3dadd(56.06, -33.01, 17.09, 1.09)
	pt3dadd(56.79, -33.93, 17.16, 1.09)
	pt3dadd(56.98, -34.47, 17.54, 1.09)
	pt3dadd(57.16, -34.84, 17.7, 1.09)
	pt3dadd(57.34, -35.2, 17.85, 1.09)
	pt3dadd(58.07, -35.38, 18.45, 1.09)
	pt3dadd(58.8, -35.38, 18.68, 1.09)
	pt3dadd(59.71, -35.57, 18.98, 1.09)
	pt3dadd(60.08, -35.57, 19.21, 1.09)
	pt3dadd(60.62, -35.75, 19.66, 1.09)
	pt3dadd(60.62, -35.93, 19.97, 1.09)
	pt3dadd(60.99, -35.93, 20.12, 1.09)
	pt3dadd(61.35, -36.11, 20.35, 1.09)
	pt3dadd(61.35, -36.11, 20.27, 1.09)
	pt3dadd(61.54, -36.11, 20.12, 1.09)
	pt3dadd(62.08, -36.29, 19.97, 1.09)
	pt3dadd(62.63, -36.29, 19.74, 1.09)
	pt3dadd(63.18, -36.48, 19.51, 1.09)
	pt3dadd(63.36, -36.48, 19.21, 1.09)
	pt3dadd(63.73, -36.48, 18.98, 1.09)
	pt3dadd(63.73, -36.84, 18.76, 1.09)
	pt3dadd(64.09, -37.02, 18.53, 1.09)
	pt3dadd(64.09, -37.39, 18.3, 1.09)
	pt3dadd(64.27, -37.57, 17.7, 1.09)
	pt3dadd(64.46, -37.57, 17.47, 1.09)
	pt3dadd(64.64, -37.57, 17.01, 1.09)
	pt3dadd(64.64, -37.57, 16.71, 1.09)
	pt3dadd(64.64, -37.75, 16.33, 1.09)
	pt3dadd(65, -38.12, 16.1, 1.09)
	pt3dadd(65.19, -38.48, 15.88, 1.09)
	pt3dadd(65.55, -38.66, 15.73, 0.91)
	pt3dadd(65.73, -38.84, 15.57, 0.91)
	pt3dadd(65.92, -39.21, 15.35, 0.91)
	pt3dadd(65.92, -39.39, 15.04, 0.91)
	pt3dadd(66.28, -39.76, 14.82, 0.91)
	pt3dadd(66.46, -40.3, 14.59, 0.91)
	pt3dadd(66.83, -40.67, 14.51, 0.91)
	pt3dadd(67.01, -41.03, 14.36, 0.91)
	pt3dadd(67.38, -41.58, 14.21, 0.91)
	pt3dadd(67.92, -42.12, 14.06, 0.91)
	pt3dadd(68.29, -42.67, 13.98, 0.91)
	pt3dadd(68.83, -43.4, 13.91, 0.91)
	pt3dadd(69.38, -43.95, 13.83, 0.91)
	pt3dadd(69.56, -44.49, 13.53, 0.91)
	pt3dadd(70.11, -45.04, 13.45, 0.91)
	pt3dadd(70.48, -45.59, 13.3, 0.91)
	pt3dadd(70.84, -45.95, 13.15, 0.91)
	pt3dadd(71.02, -46.13, 13.15, 0.73)
	pt3dadd(71.02, -46.32, 13.15, 0.73)
	pt3dadd(71.02, -46.5, 13, 0.73)
	pt3dadd(71.21, -46.86, 12.85, 0.73)
	pt3dadd(71.57, -47.04, 12.7, 0.73)
	pt3dadd(71.94, -47.41, 12.47, 0.73)
	pt3dadd(71.94, -47.77, 12.39, 0.73)
	pt3dadd(72.48, -48.14, 12.01, 0.73)
	pt3dadd(72.48, -48.5, 11.86, 0.73)
	pt3dadd(72.67, -48.87, 11.71, 0.73)
	pt3dadd(73.21, -49.41, 11.56, 0.73)
	pt3dadd(73.58, -50.14, 11.48, 0.73)
	pt3dadd(73.94, -50.69, 11.33, 0.73)
	pt3dadd(74.13, -51.05, 11.18, 0.73)
	pt3dadd(74.67, -51.6, 11.1, 0.73)
	pt3dadd(75.4, -51.96, 11.03, 0.73)
	pt3dadd(76.5, -52.69, 11.03, 0.73)
	pt3dadd(77.23, -53.24, 10.95, 0.73)
	pt3dadd(77.96, -54.33, 10.95, 0.73)
	pt3dadd(77.96, -54.33, 10.95, 0.73)
	pt3dadd(78.14, -54.7, 10.95, 0.73)
	pt3dadd(78.5, -55.24, 10.57, 0.73)
	pt3dadd(79.23, -56.15, 10.5, 0.73)
	pt3dadd(79.6, -56.7, 10.42, 0.73)
	pt3dadd(80.15, -57.61, 10.35, 0.73)
	pt3dadd(80.69, -58.34, 10.27, 0.73)
	pt3dadd(81.06, -58.7, 10.27, 0.73)
	pt3dadd(81.42, -59.25, 10.12, 0.73)
	pt3dadd(81.79, -59.8, 9.97, 0.73)
	pt3dadd(82.15, -60.71, 9.89, 0.73)
	pt3dadd(82.88, -61.44, 9.67, 0.73)
	pt3dadd(83.25, -62.17, 9.59, 0.73)
	pt3dadd(83.61, -62.35, 9.44, 0.73)
	pt3dadd(83.98, -62.71, 9.36, 0.73)
	pt3dadd(84.89, -63.26, 9.29, 0.73)
	pt3dadd(85.62, -63.62, 9.29, 0.73)
	pt3dadd(86.9, -64.35, 9.21, 0.73)
  }
}
proc shape3d_5() {
  dend[9] {	pt3dadd(87.81, -64.72, 9.14, 0.73)
	pt3dadd(89.09, -65.26, 9.06, 0.73)
	pt3dadd(90, -65.81, 9.06, 0.73)
	pt3dadd(90.73, -66.54, 8.98, 0.73)
	pt3dadd(91.82, -67.09, 8.91, 0.73)
	pt3dadd(92.74, -68, 8.91, 0.73)
	pt3dadd(93.28, -68.36, 8.83, 0.73)
	pt3dadd(93.47, -68.54, 8.76, 0.73)
	pt3dadd(93.65, -68.73, 8.76, 0.73)
	pt3dadd(93.65, -68.73, 8.53, 0.73)
	pt3dadd(94.2, -69.09, 8.15, 0.73)
	pt3dadd(94.93, -69.27, 8, 0.73)
	pt3dadd(95.29, -69.64, 7.7, 0.73)
	pt3dadd(96.2, -70.18, 7.62, 0.73)
	pt3dadd(96.57, -70.55, 7.54, 0.73)
	pt3dadd(96.93, -70.73, 7.39, 0.73)
	pt3dadd(97.3, -71.09, 7.32, 0.73)
	pt3dadd(97.84, -71.46, 7.24, 0.73)
	pt3dadd(98.21, -72.01, 7.17, 0.73)
	pt3dadd(98.76, -72.55, 7.09, 0.73)
	pt3dadd(99.3, -72.92, 6.86, 0.73)
	pt3dadd(99.49, -73.46, 6.79, 0.73)
	pt3dadd(99.67, -74.01, 6.71, 0.73)
	pt3dadd(100.03, -74.56, 6.56, 0.73)
	pt3dadd(100.4, -75.28, 6.56, 0.73)
	pt3dadd(100.58, -75.83, 6.48, 0.73)
	pt3dadd(100.95, -76.38, 6.26, 0.73)
	pt3dadd(101.49, -77.11, 6.03, 0.73)
	pt3dadd(101.86, -77.29, 5.95, 0.73)
	pt3dadd(101.86, -77.84, 5.88, 0.73)
	pt3dadd(102.04, -78.02, 5.88, 0.73)
	pt3dadd(102.22, -78.56, 5.73, 0.73)
	pt3dadd(102.41, -79.29, 5.58, 0.73)
	pt3dadd(102.77, -79.66, 5.5, 0.73)
	pt3dadd(102.95, -80.2, 5.35, 0.73)
	pt3dadd(103.32, -81.3, 5.2, 0.73)
	pt3dadd(103.68, -81.84, 5.04, 0.73)
	pt3dadd(104.05, -82.57, 5.04, 0.73)
	pt3dadd(104.41, -83.12, 4.89, 0.73)
	pt3dadd(104.96, -83.85, 4.82, 0.73)
	pt3dadd(105.51, -84.76, 4.67, 0.73)
	pt3dadd(105.87, -85.49, 4.51, 0.73)
	pt3dadd(106.42, -86.03, 4.44, 0.73)
	pt3dadd(107.15, -87.13, 4.29, 0.73)
	pt3dadd(107.7, -87.67, 4.21, 0.73)
	pt3dadd(108.06, -88.04, 4.06, 0.73)
	pt3dadd(108.61, -88.59, 3.91, 0.73)
	pt3dadd(108.97, -88.77, 3.83, 0.73)
	pt3dadd(109.34, -89.13, 3.83, 0.73)
	pt3dadd(109.7, -89.31, 3.83, 0.73)
	pt3dadd(110.25, -89.68, 3.76, 0.73)
	pt3dadd(110.62, -89.86, 3.68, 0.73)
	pt3dadd(110.98, -89.86, 3.45, 0.73)
	pt3dadd(111.53, -89.86, 3.3, 0.73)
	pt3dadd(112.08, -89.86, 3.3, 0.73)
	pt3dadd(112.62, -89.86, 3.23, 0.73)
	pt3dadd(113.54, -90.23, 3.08, 0.73)
	pt3dadd(114.45, -90.77, 3, 0.73)
	pt3dadd(115.36, -91.14, 2.92, 0.73)
	pt3dadd(116.46, -91.68, 2.77, 0.73)
	pt3dadd(117.18, -92.23, 2.7, 0.73)
	pt3dadd(117.55, -92.96, 2.62, 0.73)
	pt3dadd(118.1, -93.5, 2.55, 0.73)
	pt3dadd(118.83, -94.42, 2.55, 0.73)
	pt3dadd(119.92, -95.51, 2.47, 0.73)
	pt3dadd(120.47, -96.24, 2.39, 0.73)
	pt3dadd(121.2, -97.33, 2.39, 0.73)
	pt3dadd(121.75, -98.06, 2.32, 0.73)
	pt3dadd(123.02, -99.15, 2.24, 0.73)
	pt3dadd(124.12, -99.88, 2.17, 0.73)
	pt3dadd(125.21, -100.61, 2.09, 0.73)
	pt3dadd(125.58, -100.79, 2.01, 0.73)
	pt3dadd(126.13, -101.16, 1.94, 0.73)
	pt3dadd(127.04, -101.52, 1.94, 0.73)
	pt3dadd(128.31, -102.25, 1.71, 0.73)
	pt3dadd(128.68, -102.61, 1.64, 0.73)
	pt3dadd(129.59, -103.34, 1.56, 0.73)
	pt3dadd(130.14, -104.07, 1.48, 0.73)
	pt3dadd(130.5, -104.62, 1.48, 0.73)
	pt3dadd(130.69, -104.98, 1.41, 0.73)
	pt3dadd(131.05, -105.35, 1.41, 0.73)
	pt3dadd(131.42, -105.71, 1.33, 0.73)
	pt3dadd(132.69, -106.99, 1.18, 0.73)
	pt3dadd(133.24, -107.72, 1.11, 0.73)
	pt3dadd(135.07, -109.17, 1.11, 0.73)
	pt3dadd(136.34, -110.45, 1.03, 0.73)
	pt3dadd(137.62, -111.72, 1.03, 0.73)
	pt3dadd(138.71, -113, 1.03, 0.73)
	pt3dadd(139.26, -113.55, 1.03, 0.73)
  }
  dend[10] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(21.76, -15.71, 18.23, 1.46)
	pt3dadd(21.94, -16.25, 17.85, 1.46)
	pt3dadd(21.94, -16.98, 17.77, 1.46)
	pt3dadd(21.94, -17.35, 17.7, 1.46)
	pt3dadd(21.76, -17.71, 17.62, 1.46)
	pt3dadd(21.58, -18.44, 17.24, 1.46)
	pt3dadd(21.21, -19.17, 17.09, 1.46)
	pt3dadd(21.03, -19.71, 17.01, 1.46)
	pt3dadd(20.67, -20.62, 16.79, 1.46)
	pt3dadd(20.48, -21.35, 16.63, 1.46)
	pt3dadd(20.48, -22.26, 16.56, 1.46)
	pt3dadd(20.3, -22.99, 16.41, 1.46)
	pt3dadd(19.94, -23.9, 16.33, 1.46)
	pt3dadd(19.76, -24.63, 16.26, 1.46)
	pt3dadd(19.76, -25, 16.1, 1.46)
	pt3dadd(19.76, -25.36, 16.03, 1.46)
	pt3dadd(19.57, -26.09, 15.65, 1.46)
	pt3dadd(19.57, -26.46, 15.5, 1.46)
	pt3dadd(19.21, -27.18, 15.35, 1.46)
	pt3dadd(19.03, -28.28, 15.12, 1.46)
	pt3dadd(19.03, -28.82, 14.97, 1.46)
	pt3dadd(18.84, -29.55, 14.97, 1.46)
	pt3dadd(19.03, -30.46, 14.74, 1.46)
	pt3dadd(19.03, -30.83, 14.51, 1.46)
	pt3dadd(19.21, -31.74, 14.44, 1.46)
	pt3dadd(19.76, -33.01, 14.06, 1.46)
	pt3dadd(19.94, -34.11, 13.91, 1.46)
	pt3dadd(20.48, -34.65, 13.83, 1.46)
	pt3dadd(20.85, -35.2, 13.76, 1.46)
	pt3dadd(21.4, -35.75, 13.68, 1.46)
	pt3dadd(21.58, -36.11, 13.6, 1.46)
	pt3dadd(21.76, -36.66, 13.6, 1.46)
	pt3dadd(21.94, -37.57, 13.6, 1.28)
	pt3dadd(21.76, -38.3, 13.53, 1.28)
	pt3dadd(21.76, -39.57, 13.23, 1.28)
	pt3dadd(21.21, -41.4, 13.15, 0.91)
	pt3dadd(21.21, -42.12, 12.92, 0.91)
	pt3dadd(21.21, -42.85, 12.7, 0.91)
	pt3dadd(21.21, -43.58, 12.47, 0.91)
	pt3dadd(21.21, -44.86, 12.39, 0.91)
	pt3dadd(21.21, -45.77, 12.24, 0.91)
	pt3dadd(21.21, -45.95, 12.39, 0.91)
	pt3dadd(21.03, -46.32, 12.85, 0.91)
	pt3dadd(21.03, -47.23, 13.07, 0.91)
	pt3dadd(21.21, -47.59, 13.23, 0.91)
	pt3dadd(21.21, -48.14, 13.53, 0.91)
	pt3dadd(21.21, -48.87, 13.68, 0.91)
	pt3dadd(21.4, -49.41, 13.91, 0.91)
	pt3dadd(21.4, -49.78, 14.06, 0.91)
	pt3dadd(21.76, -50.32, 14.21, 0.91)
	pt3dadd(21.76, -50.69, 14.36, 0.91)
	pt3dadd(21.94, -51.05, 14.51, 0.91)
	pt3dadd(21.94, -51.78, 14.82, 0.91)
	pt3dadd(22.13, -52.15, 15.12, 0.91)
	pt3dadd(22.13, -52.51, 15.42, 0.91)
	pt3dadd(22.31, -53.06, 15.95, 0.91)
	pt3dadd(22.49, -53.42, 16.1, 0.91)
	pt3dadd(22.49, -53.97, 16.18, 0.91)
	pt3dadd(22.49, -54.88, 16.56, 0.73)
	pt3dadd(22.13, -55.24, 16.86, 0.73)
	pt3dadd(22.13, -55.61, 16.94, 0.73)
	pt3dadd(21.76, -56.7, 17.24, 0.73)
	pt3dadd(21.76, -57.25, 17.39, 0.73)
	pt3dadd(21.4, -57.98, 17.7, 0.73)
	pt3dadd(21.4, -58.52, 17.85, 0.73)
	pt3dadd(21.03, -59.62, 18.07, 0.73)
	pt3dadd(20.67, -60.71, 18.23, 0.73)
	pt3dadd(20.67, -61.44, 18.45, 0.73)
	pt3dadd(20.67, -62.35, 18.53, 0.73)
	pt3dadd(20.67, -64.35, 18.68, 0.73)
	pt3dadd(20.67, -66.54, 18.83, 0.73)
	pt3dadd(21.03, -68.54, 18.91, 0.73)
	pt3dadd(21.21, -70.55, 19.06, 0.73)
	pt3dadd(21.21, -71.46, 19.13, 0.73)
	pt3dadd(21.21, -73.1, 19.21, 0.73)
	pt3dadd(21.03, -75.28, 19.29, 0.73)
	pt3dadd(20.48, -76.2, 19.36, 0.73)
	pt3dadd(19.94, -76.2, 19.36, 0.73)
	pt3dadd(19.76, -76.56, 19.36, 0.73)
	pt3dadd(18.84, -77.11, 19.51, 0.73)
	pt3dadd(18.48, -77.65, 19.66, 0.91)
	pt3dadd(18.11, -78.02, 19.89, 0.91)
	pt3dadd(17.2, -78.93, 20.35, 0.91)
	pt3dadd(16.84, -79.48, 20.57, 0.91)
	pt3dadd(16.11, -80.02, 20.8, 0.91)
	pt3dadd(15.56, -80.57, 21.1, 0.91)
	pt3dadd(15.01, -81.66, 21.26, 0.91)
	pt3dadd(14.46, -82.21, 21.41, 0.91)
	pt3dadd(14.1, -83.3, 21.48, 0.91)
	pt3dadd(13.55, -84.39, 21.63, 0.91)
	pt3dadd(13.19, -85.67, 21.79, 0.91)
	pt3dadd(12.82, -86.95, 21.86, 0.91)
	pt3dadd(12.82, -87.86, 21.94, 0.91)
  }
  dend[11] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(31.07, -2.04, 18.3, 0.91)
	pt3dadd(31.43, -1.68, 18.38, 0.91)
	pt3dadd(31.61, -1.68, 18.53, 0.91)
	pt3dadd(32.34, -1.68, 18.83, 0.91)
	pt3dadd(32.71, -1.49, 19.06, 0.91)
	pt3dadd(33.07, -1.31, 19.13, 0.91)
	pt3dadd(33.62, -1.13, 19.29, 0.91)
	pt3dadd(34.9, -0.4, 19.74, 0.91)
	pt3dadd(35.45, -0.04, 19.89, 0.91)
	pt3dadd(35.99, 0.33, 20.04, 0.91)
	pt3dadd(36.54, 0.69, 20.27, 0.91)
	pt3dadd(37.45, 1.97, 20.5, 0.91)
	pt3dadd(38, 2.33, 20.73, 0.91)
	pt3dadd(38.37, 2.51, 20.8, 0.91)
	pt3dadd(38.73, 2.7, 21.03, 0.91)
	pt3dadd(39.1, 3.06, 21.18, 0.91)
  }
}
proc shape3d_6() {
  dend[11] {	pt3dadd(39.82, 3.61, 21.33, 0.91)
	pt3dadd(40.19, 4.15, 21.41, 0.91)
	pt3dadd(40.55, 4.34, 21.48, 0.91)
	pt3dadd(41.1, 4.88, 21.56, 0.91)
	pt3dadd(41.47, 5.61, 21.63, 0.91)
  }
  dend[12] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(37.64, -11.33, 6.11, 2.01)
	pt3dadd(37.82, -11.33, 6.11, 2.01)
	pt3dadd(38.55, -11.51, 6.11, 2.01)
	pt3dadd(39.46, -11.88, 6.11, 2.01)
	pt3dadd(39.82, -11.88, 6.11, 2.01)
	pt3dadd(40.19, -11.88, 6.11, 2.01)
	pt3dadd(40.92, -12.06, 6.11, 2.01)
	pt3dadd(41.28, -12.06, 6.11, 2.01)
	pt3dadd(42.01, -12.24, 6.11, 2.01)
	pt3dadd(42.74, -12.61, 6.11, 2.01)
	pt3dadd(43.66, -12.79, 6.11, 2.01)
	pt3dadd(44.2, -12.97, 6.11, 2.01)
	pt3dadd(44.57, -12.97, 6.11, 2.01)
	pt3dadd(45.3, -12.97, 6.11, 2.01)
	pt3dadd(45.66, -12.97, 6.11, 2.01)
  }
  dend[13] {pt3dclear()
	pt3dadd(45.66, -12.97, 6.11, 0.73)
	pt3dadd(46.03, -12.43, 4.74, 0.73)
	pt3dadd(46.39, -12.43, 4.97, 0.73)
	pt3dadd(46.94, -12.06, 5.12, 0.73)
	pt3dadd(47.31, -11.33, 5.5, 0.73)
	pt3dadd(47.31, -10.06, 5.73, 0.73)
	pt3dadd(46.94, -9.15, 5.95, 0.73)
	pt3dadd(46.94, -8.6, 6.11, 0.73)
	pt3dadd(46.58, -7.69, 6.26, 0.73)
	pt3dadd(46.03, -6.96, 6.41, 0.73)
	pt3dadd(45.3, -6.05, 6.56, 0.73)
	pt3dadd(44.75, -5.68, 6.64, 0.73)
	pt3dadd(44.2, -5.14, 6.64, 0.73)
	pt3dadd(43.84, -4.59, 6.64, 0.73)
	pt3dadd(43.29, -4.23, 6.64, 0.73)
  }
  dend[14] {pt3dclear()
	pt3dadd(45.66, -12.97, 6.11, 2.01)
	pt3dadd(45.85, -13.34, 6.11, 2.01)
	pt3dadd(46.39, -13.88, 6.11, 2.01)
	pt3dadd(47.12, -14.43, 6.11, 2.01)
	pt3dadd(47.85, -14.79, 6.11, 2.01)
	pt3dadd(48.4, -14.79, 6.11, 2.01)
	pt3dadd(49.31, -15.16, 6.11, 1.46)
	pt3dadd(50.59, -15.52, 6.11, 1.46)
	pt3dadd(51.14, -15.71, 6.11, 1.46)
	pt3dadd(51.87, -15.89, 6.11, 1.46)
	pt3dadd(52.41, -16.43, 6.11, 1.46)
	pt3dadd(52.96, -16.98, 6.11, 1.46)
	pt3dadd(53.51, -17.53, 6.11, 1.46)
	pt3dadd(53.87, -17.89, 6.11, 1.46)
  }
  dend[15] {pt3dclear()
	pt3dadd(53.87, -17.89, 6.11, 0.36)
	pt3dadd(53.87, -17.89, 5.65, 0.36)
	pt3dadd(54.6, -18.07, 5.65, 0.36)
	pt3dadd(55.15, -18.26, 5.73, 0.36)
	pt3dadd(55.33, -17.89, 5.95, 0.36)
	pt3dadd(55.88, -17.89, 6.11, 0.36)
	pt3dadd(56.25, -17.89, 6.33, 0.36)
	pt3dadd(56.79, -17.89, 6.56, 0.36)
	pt3dadd(57.34, -18.07, 6.71, 0.36)
	pt3dadd(58.07, -18.07, 6.86, 0.36)
	pt3dadd(58.44, -18.26, 7.01, 0.36)
	pt3dadd(58.98, -18.26, 7.24, 0.36)
	pt3dadd(59.71, -18.26, 7.39, 0.36)
	pt3dadd(60.62, -18.26, 7.54, 0.36)
	pt3dadd(61.35, -18.26, 7.77, 0.36)
	pt3dadd(62.08, -18.26, 7.92, 0.36)
	pt3dadd(62.27, -18.26, 8, 0.91)
	pt3dadd(62.81, -18.07, 8, 0.91)
	pt3dadd(63.18, -17.89, 8, 0.91)
	pt3dadd(63.54, -17.71, 7.85, 0.91)
	pt3dadd(64.09, -17.53, 7.47, 0.91)
	pt3dadd(65, -17.16, 7.24, 0.91)
	pt3dadd(65.19, -17.16, 6.86, 0.91)
	pt3dadd(65.37, -17.16, 6.48, 1.64)
	pt3dadd(65.73, -17.16, 6.26, 1.64)
	pt3dadd(66.28, -17.16, 5.88, 1.64)
	pt3dadd(66.65, -16.98, 5.42, 1.64)
	pt3dadd(67.01, -16.8, 5.04, 1.64)
	pt3dadd(67.38, -16.62, 4.51, 1.64)
	pt3dadd(67.56, -16.62, 4.14, 1.64)
	pt3dadd(67.74, -16.62, 4.06, 1.64)
	pt3dadd(68.11, -16.43, 4.06, 1.64)
	pt3dadd(68.83, -16.07, 3.76, 1.64)
	pt3dadd(69.38, -15.89, 3.53, 1.64)
	pt3dadd(69.75, -15.71, 3.45, 1.64)
	pt3dadd(70.11, -15.71, 3.38, 1.64)
	pt3dadd(70.66, -15.52, 3.3, 1.64)
	pt3dadd(71.02, -15.52, 3.3, 1.64)
	pt3dadd(71.57, -15.34, 3.08, 1.64)
	pt3dadd(72.48, -15.16, 3, 1.64)
	pt3dadd(72.85, -14.98, 2.92, 1.64)
	pt3dadd(73.58, -14.79, 2.85, 1.64)
	pt3dadd(74.67, -14.25, 2.85, 1.28)
	pt3dadd(74.86, -14.25, 2.77, 1.28)
	pt3dadd(75.4, -14.25, 2.62, 1.28)
	pt3dadd(75.95, -13.88, 2.55, 1.28)
	pt3dadd(76.68, -13.88, 2.47, 1.28)
	pt3dadd(76.86, -13.52, 2.39, 1.28)
	pt3dadd(77.23, -13.52, 2.24, 1.28)
	pt3dadd(77.41, -13.34, 2.09, 0.91)
	pt3dadd(78.32, -13.34, 1.94, 0.91)
	pt3dadd(79.05, -13.15, 1.79, 0.91)
	pt3dadd(79.6, -12.79, 1.48, 0.91)
	pt3dadd(80.15, -12.79, 1.26, 0.91)
	pt3dadd(80.69, -12.79, 1.26, 0.91)
	pt3dadd(81.06, -12.79, 1.18, 0.91)
	pt3dadd(81.42, -12.61, 1.11, 0.91)
	pt3dadd(81.79, -12.61, 0.95, 0.91)
	pt3dadd(82.7, -12.97, 0.8, 0.91)
	pt3dadd(83.25, -13.15, 0.58, 0.91)
	pt3dadd(83.61, -13.15, 0.5, 0.91)
	pt3dadd(83.98, -13.34, 0.42, 0.91)
	pt3dadd(84.34, -13.15, 0.27, 0.91)
	pt3dadd(84.71, -12.61, 0.12, 0.91)
	pt3dadd(85.07, -12.43, -0.11, 0.91)
	pt3dadd(85.44, -11.7, -0.26, 0.91)
	pt3dadd(85.62, -10.97, -0.41, 0.91)
	pt3dadd(85.8, -10.42, -0.48, 0.91)
	pt3dadd(85.99, -9.69, -0.64, 0.91)
	pt3dadd(86.17, -9.15, -0.79, 0.91)
	pt3dadd(86.53, -7.87, -0.94, 0.91)
	pt3dadd(87.08, -6.96, -0.94, 0.91)
	pt3dadd(87.26, -6.05, -0.94, 0.91)
	pt3dadd(87.63, -5.68, -0.94, 0.55)
	pt3dadd(87.63, -5.68, -0.94, 0.55)
	pt3dadd(87.63, -5.68, -1.32, 0.55)
	pt3dadd(87.99, -5.68, -1.55, 0.55)
	pt3dadd(87.99, -5.68, -1.02, 0.73)
	pt3dadd(88.17, -5.68, -1.02, 0.73)
	pt3dadd(88.17, -5.68, -1.24, 0.73)
	pt3dadd(88.17, -5.68, -1.47, 0.73)
	pt3dadd(88.54, -5.68, -1.55, 0.73)
	pt3dadd(88.72, -5.68, -1.7, 0.73)
	pt3dadd(88.9, -5.68, -1.77, 0.73)
	pt3dadd(88.9, -5.68, -2.08, 0.73)
	pt3dadd(89.09, -5.5, -2.38, 0.73)
	pt3dadd(89.27, -5.32, -2.61, 0.73)
	pt3dadd(89.45, -5.14, -2.98, 0.73)
	pt3dadd(89.45, -4.96, -3.21, 0.73)
	pt3dadd(89.63, -4.96, -3.44, 0.73)
	pt3dadd(89.63, -4.96, -3.74, 0.73)
	pt3dadd(89.82, -4.77, -3.82, 0.73)
	pt3dadd(90, -4.77, -3.89, 0.73)
	pt3dadd(90.18, -5.14, -4.27, 0.73)
	pt3dadd(90.36, -5.5, -4.35, 0.73)
	pt3dadd(90.73, -5.5, -4.42, 0.73)
	pt3dadd(90.73, -5.32, -4.5, 0.73)
	pt3dadd(91.09, -4.96, -4.88, 0.73)
	pt3dadd(91.46, -4.77, -5.03, 0.73)
	pt3dadd(91.82, -4.77, -5.26, 0.73)
	pt3dadd(92.01, -4.77, -5.41, 0.73)
	pt3dadd(92.37, -4.59, -5.56, 0.73)
	pt3dadd(92.55, -4.59, -5.64, 0.73)
	pt3dadd(92.92, -4.41, -5.79, 0.73)
	pt3dadd(93.1, -4.41, -6.01, 0.73)
	pt3dadd(93.1, -4.41, -6.24, 0.73)
	pt3dadd(93.65, -4.23, -6.32, 0.73)
	pt3dadd(93.83, -4.23, -6.54, 0.73)
	pt3dadd(94.56, -4.04, -6.7, 0.73)
	pt3dadd(94.93, -3.86, -6.85, 0.73)
	pt3dadd(95.29, -3.68, -6.92, 0.73)
	pt3dadd(95.66, -3.5, -7.3, 0.73)
	pt3dadd(95.66, -3.5, -7.68, 0.73)
	pt3dadd(96.2, -3.32, -8.14, 0.73)
	pt3dadd(96.57, -2.77, -8.51, 0.73)
	pt3dadd(96.93, -2.59, -8.67, 0.73)
	pt3dadd(97.3, -2.4, -8.74, 0.73)
	pt3dadd(97.66, -2.4, -8.82, 0.73)
	pt3dadd(98.03, -2.59, -9.04, 0.73)
	pt3dadd(98.57, -2.77, -9.2, 0.73)
	pt3dadd(98.94, -2.95, -9.2, 0.73)
	pt3dadd(99.49, -3.32, -9.27, 0.73)
	pt3dadd(99.85, -3.5, -9.42, 0.73)
	pt3dadd(100.22, -3.68, -9.73, 0.73)
	pt3dadd(100.22, -3.68, -9.88, 0.73)
	pt3dadd(100.22, -3.86, -10.03, 0.73)
	pt3dadd(100.95, -4.23, -10.03, 0.73)
	pt3dadd(101.31, -4.59, -10.18, 0.73)
	pt3dadd(101.49, -4.96, -10.48, 0.73)
	pt3dadd(102.04, -4.96, -10.56, 0.73)
	pt3dadd(102.77, -5.5, -10.64, 0.73)
	pt3dadd(103.5, -5.87, -10.86, 0.73)
	pt3dadd(103.87, -6.05, -11.01, 0.73)
	pt3dadd(104.41, -6.23, -11.17, 0.73)
	pt3dadd(105.14, -6.41, -11.47, 0.73)
	pt3dadd(105.51, -6.6, -11.62, 0.73)
	pt3dadd(106.24, -6.96, -11.77, 0.73)
	pt3dadd(106.6, -6.96, -11.85, 0.73)
	pt3dadd(106.97, -7.14, -12, 0.73)
	pt3dadd(107.33, -7.14, -12.15, 0.73)
	pt3dadd(107.7, -7.14, -12.3, 0.73)
	pt3dadd(108.24, -7.32, -12.53, 0.73)
	pt3dadd(108.79, -7.51, -12.68, 0.73)
	pt3dadd(109.16, -7.51, -12.83, 0.73)
	pt3dadd(109.89, -7.51, -13.06, 0.73)
	pt3dadd(110.62, -7.69, -13.29, 0.73)
	pt3dadd(111.71, -7.87, -13.59, 0.73)
	pt3dadd(112.26, -7.87, -13.74, 0.73)
	pt3dadd(112.81, -7.87, -13.82, 0.73)
	pt3dadd(113.54, -7.87, -14.04, 0.73)
  }
}
proc shape3d_7() {
  dend[15] {	pt3dadd(113.72, -7.87, -14.65, 0.73)
	pt3dadd(114.27, -7.87, -14.88, 0.73)
	pt3dadd(115, -7.69, -15.41, 0.73)
	pt3dadd(115.36, -7.69, -15.71, 0.73)
	pt3dadd(115.73, -7.69, -15.94, 0.73)
	pt3dadd(116.27, -7.87, -16.32, 0.73)
	pt3dadd(116.64, -7.87, -16.54, 0.73)
	pt3dadd(117.18, -7.87, -16.85, 0.73)
	pt3dadd(117.73, -7.87, -17.15, 0.73)
	pt3dadd(118.46, -7.87, -17.23, 0.73)
	pt3dadd(118.83, -8.05, -17.3, 0.73)
	pt3dadd(119.56, -8.05, -17.45, 0.73)
	pt3dadd(119.92, -8.05, -18.13, 0.73)
	pt3dadd(120.47, -7.87, -18.66, 0.73)
	pt3dadd(121.02, -7.69, -18.97, 0.73)
	pt3dadd(121.56, -7.32, -19.12, 0.73)
	pt3dadd(122.29, -7.14, -19.35, 0.73)
	pt3dadd(123.02, -6.78, -19.5, 0.73)
	pt3dadd(123.57, -6.6, -19.73, 0.73)
	pt3dadd(124.3, -6.23, -19.88, 0.73)
	pt3dadd(125.4, -5.87, -19.95, 0.73)
	pt3dadd(125.94, -5.5, -19.95, 0.73)
	pt3dadd(127.22, -4.96, -20.33, 0.73)
	pt3dadd(127.58, -4.96, -20.56, 0.73)
	pt3dadd(127.95, -4.96, -20.63, 0.73)
	pt3dadd(128.5, -5.14, -20.86, 0.73)
	pt3dadd(129.41, -5.5, -21.01, 0.73)
	pt3dadd(129.96, -5.87, -21.09, 0.73)
	pt3dadd(131.05, -6.41, -21.24, 0.73)
	pt3dadd(132.15, -7.32, -21.47, 0.73)
	pt3dadd(132.88, -7.69, -21.69, 0.73)
	pt3dadd(133.42, -8.24, -21.92, 0.73)
	pt3dadd(134.15, -8.96, -22.07, 0.73)
	pt3dadd(134.34, -9.69, -22.15, 0.73)
	pt3dadd(134.15, -10.24, -22.3, 0.73)
	pt3dadd(133.79, -10.97, -22.38, 0.73)
	pt3dadd(133.42, -11.51, -22.45, 0.73)
	pt3dadd(133.42, -11.88, -22.45, 0.73)
	pt3dadd(133.24, -12.43, -22.53, 0.73)
  }
  dend[16] {pt3dclear()
	pt3dadd(53.87, -17.89, 6.11, 0.73)
	pt3dadd(54.6, -18.44, 6.11, 0.73)
	pt3dadd(54.97, -19.17, 6.11, 0.73)
	pt3dadd(55.15, -19.71, 5.95, 0.73)
	pt3dadd(55.52, -20.26, 5.88, 0.73)
	pt3dadd(55.7, -20.99, 5.65, 0.73)
	pt3dadd(55.88, -21.35, 5.5, 0.73)
	pt3dadd(55.88, -21.72, 5.35, 0.73)
	pt3dadd(56.25, -22.26, 5.2, 0.73)
	pt3dadd(56.43, -22.81, 5.12, 0.73)
	pt3dadd(56.43, -23.36, 4.97, 0.73)
	pt3dadd(56.61, -23.72, 4.82, 0.73)
	pt3dadd(56.61, -24.09, 4.67, 0.73)
	pt3dadd(56.61, -24.45, 4.51, 0.73)
	pt3dadd(56.43, -25.18, 4.21, 0.73)
	pt3dadd(56.25, -25.54, 3.83, 0.73)
	pt3dadd(56.25, -25.91, 3.76, 0.73)
	pt3dadd(56.06, -26.64, 3.53, 0.73)
	pt3dadd(55.88, -27.18, 3.3, 0.73)
	pt3dadd(55.7, -27.73, 3.15, 0.73)
	pt3dadd(55.7, -28.1, 3, 0.73)
	pt3dadd(55.7, -28.64, 2.85, 0.73)
	pt3dadd(56.06, -29.01, 2.77, 0.73)
	pt3dadd(56.61, -29.55, 2.7, 0.73)
	pt3dadd(56.98, -29.73, 2.39, 0.73)
	pt3dadd(57.52, -30.1, 2.24, 0.73)
	pt3dadd(57.89, -30.46, 2.09, 0.73)
	pt3dadd(59.16, -31.56, 1.86, 0.73)
	pt3dadd(60.81, -32.47, 1.79, 0.73)
	pt3dadd(61.54, -33.01, 2.24, 0.73)
	pt3dadd(62.45, -33.38, 2.62, 0.73)
	pt3dadd(63.18, -33.74, 2.92, 0.73)
	pt3dadd(63.73, -33.93, 3.08, 0.73)
	pt3dadd(64.64, -34.11, 3.23, 0.55)
	pt3dadd(65, -34.29, 3.23, 0.55)
	pt3dadd(65.37, -34.65, 3.3, 0.55)
	pt3dadd(65.73, -34.84, 3.61, 0.55)
	pt3dadd(66.28, -35.02, 3.98, 0.55)
	pt3dadd(66.83, -35.38, 4.14, 0.55)
	pt3dadd(67.19, -35.57, 4.14, 0.55)
	pt3dadd(67.92, -35.93, 4.44, 0.55)
	pt3dadd(68.29, -36.11, 4.67, 0.55)
	pt3dadd(69.2, -36.48, 4.97, 0.55)
	pt3dadd(69.75, -36.66, 5.04, 0.55)
	pt3dadd(70.29, -36.84, 5.27, 0.55)
	pt3dadd(70.84, -37.21, 5.42, 0.55)
	pt3dadd(71.21, -37.21, 5.58, 0.55)
	pt3dadd(71.75, -37.39, 5.88, 0.55)
	pt3dadd(72.3, -37.57, 5.88, 0.55)
	pt3dadd(72.85, -37.57, 6.33, 0.55)
	pt3dadd(73.21, -37.57, 6.56, 0.55)
	pt3dadd(73.94, -37.57, 7.01, 0.55)
	pt3dadd(74.49, -37.75, 7.32, 0.55)
	pt3dadd(75.04, -37.75, 7.54, 0.55)
	pt3dadd(75.95, -37.93, 8.07, 0.55)
	pt3dadd(75.95, -37.93, 8.61, 0.55)
	pt3dadd(76.32, -38.12, 8.83, 0.55)
	pt3dadd(76.5, -38.3, 9.14, 0.55)
	pt3dadd(76.68, -38.3, 10.04, 0.55)
	pt3dadd(77.05, -37.93, 10.27, 0.55)
	pt3dadd(77.05, -37.93, 10.2, 0.55)
	pt3dadd(77.05, -37.93, 9.97, 0.55)
	pt3dadd(77.05, -37.93, 9.82, 0.55)
	pt3dadd(77.05, -37.93, 9.67, 0.55)
	pt3dadd(77.05, -37.93, 9.51, 0.55)
	pt3dadd(77.41, -37.93, 9.29, 0.55)
	pt3dadd(77.41, -37.93, 9.14, 0.55)
	pt3dadd(77.59, -37.93, 8.98, 0.55)
	pt3dadd(77.59, -37.93, 8.76, 0.55)
	pt3dadd(77.59, -37.93, 8.45, 0.55)
	pt3dadd(77.59, -37.93, 8.3, 0.55)
	pt3dadd(77.96, -37.93, 8.23, 0.55)
	pt3dadd(77.96, -37.93, 8.15, 0.55)
	pt3dadd(77.96, -37.93, 8.07, 0.55)
	pt3dadd(78.14, -37.93, 8, 0.55)
	pt3dadd(78.32, -37.93, 7.92, 0.55)
	pt3dadd(78.5, -37.93, 7.77, 0.55)
	pt3dadd(78.69, -37.93, 7.54, 0.55)
	pt3dadd(78.69, -37.93, 7.47, 0.55)
	pt3dadd(78.87, -37.93, 7.32, 0.55)
	pt3dadd(79.6, -37.93, 7.24, 0.55)
	pt3dadd(79.6, -37.93, 7.24, 0.55)
	pt3dadd(79.78, -38.12, 7.24, 0.55)
	pt3dadd(80.15, -38.3, 7.24, 0.55)
	pt3dadd(80.33, -38.3, 7.17, 0.55)
	pt3dadd(80.51, -38.3, 7.01, 0.55)
	pt3dadd(80.88, -38.12, 6.94, 0.55)
	pt3dadd(81.06, -38.12, 6.86, 0.55)
	pt3dadd(81.24, -37.93, 6.79, 0.55)
	pt3dadd(81.61, -37.93, 6.56, 0.55)
	pt3dadd(81.79, -37.93, 6.48, 0.55)
	pt3dadd(81.79, -37.93, 6.41, 0.55)
	pt3dadd(81.97, -37.75, 6.41, 0.55)
	pt3dadd(82.15, -37.75, 6.33, 0.55)
	pt3dadd(82.15, -37.75, 6.26, 0.55)
	pt3dadd(82.52, -37.75, 6.26, 0.55)
	pt3dadd(82.7, -37.75, 6.18, 0.55)
	pt3dadd(82.7, -37.75, 6.11, 0.55)
	pt3dadd(82.7, -37.57, 6.11, 0.55)
	pt3dadd(82.88, -37.75, 6.11, 0.55)
	pt3dadd(83.07, -37.75, 5.95, 0.55)
	pt3dadd(83.25, -37.75, 5.8, 0.55)
	pt3dadd(83.43, -37.93, 5.73, 0.55)
	pt3dadd(83.8, -37.93, 5.65, 0.55)
	pt3dadd(83.98, -37.93, 5.5, 0.55)
	pt3dadd(84.16, -37.93, 5.5, 0.55)
	pt3dadd(84.71, -37.75, 5.35, 0.55)
	pt3dadd(84.71, -37.75, 5.35, 0.55)
	pt3dadd(84.89, -37.75, 5.27, 0.55)
	pt3dadd(84.89, -37.75, 5.2, 0.55)
	pt3dadd(84.89, -37.75, 5.12, 0.55)
	pt3dadd(85.07, -37.75, 5.04, 0.55)
	pt3dadd(85.26, -37.75, 4.97, 0.55)
	pt3dadd(85.26, -37.75, 4.82, 0.55)
	pt3dadd(85.44, -37.75, 4.74, 0.55)
	pt3dadd(85.8, -37.75, 4.74, 0.55)
	pt3dadd(86.17, -37.75, 4.67, 0.55)
	pt3dadd(86.53, -37.75, 4.67, 0.55)
	pt3dadd(86.53, -37.93, 4.67, 0.55)
	pt3dadd(86.9, -37.75, 4.67, 0.55)
	pt3dadd(86.9, -37.75, 4.67, 0.55)
	pt3dadd(86.9, -37.75, 4.59, 0.55)
	pt3dadd(86.9, -37.75, 4.44, 0.55)
	pt3dadd(86.9, -37.75, 4.36, 0.55)
	pt3dadd(87.08, -37.75, 4.21, 0.55)
	pt3dadd(87.26, -37.75, 4.21, 0.55)
	pt3dadd(87.45, -37.93, 4.06, 0.55)
	pt3dadd(87.45, -37.93, 3.91, 0.55)
	pt3dadd(87.63, -38.12, 3.83, 0.55)
	pt3dadd(87.99, -38.12, 3.68, 0.55)
	pt3dadd(88.17, -38.12, 3.61, 0.55)
	pt3dadd(88.36, -38.12, 3.45, 0.55)
	pt3dadd(88.72, -38.3, 3.3, 0.55)
	pt3dadd(88.9, -38.3, 3.23, 0.55)
	pt3dadd(89.27, -38.48, 3.08, 0.55)
	pt3dadd(89.45, -38.48, 3, 0.55)
	pt3dadd(89.63, -38.48, 2.85, 0.55)
	pt3dadd(90, -38.48, 2.7, 0.55)
	pt3dadd(90.36, -38.48, 2.55, 0.55)
	pt3dadd(90.36, -38.48, 2.39, 0.55)
	pt3dadd(90.73, -38.66, 2.24, 0.55)
	pt3dadd(91.09, -38.66, 2.09, 0.55)
	pt3dadd(91.28, -38.66, 1.94, 0.55)
	pt3dadd(91.64, -38.66, 1.71, 0.55)
	pt3dadd(92.19, -38.66, 1.41, 0.55)
	pt3dadd(92.37, -38.66, 1.18, 0.55)
	pt3dadd(92.74, -38.84, 1.18, 0.55)
	pt3dadd(92.92, -38.84, 1.18, 0.55)
	pt3dadd(93.65, -38.84, 1.03, 0.55)
	pt3dadd(94.38, -38.84, 0.8, 0.55)
	pt3dadd(94.93, -39.03, 0.65, 0.55)
	pt3dadd(95.29, -39.03, 0.5, 0.55)
	pt3dadd(95.66, -39.39, 0.35, 0.55)
	pt3dadd(95.84, -39.39, 0.2, 0.55)
	pt3dadd(96.02, -39.39, -0.03, 0.55)
	pt3dadd(96.57, -39.39, -0.26, 0.55)
	pt3dadd(97.12, -39.39, -0.41, 0.55)
	pt3dadd(97.48, -39.39, -0.48, 0.55)
	pt3dadd(98.21, -39.39, -0.64, 0.55)
	pt3dadd(98.57, -39.39, -0.79, 0.55)
	pt3dadd(99.67, -39.39, -1.09, 0.55)
  }
}
proc shape3d_8() {
  dend[16] {	pt3dadd(100.03, -39.39, -1.24, 0.55)
	pt3dadd(100.58, -39.39, -1.47, 0.55)
	pt3dadd(101.68, -38.84, -1.55, 0.55)
	pt3dadd(102.41, -38.84, -1.77, 0.55)
	pt3dadd(103.87, -38.48, -2.23, 0.55)
	pt3dadd(104.23, -38.48, -2.45, 0.55)
	pt3dadd(104.78, -38.48, -2.68, 0.55)
	pt3dadd(106.06, -38.48, -2.83, 0.55)
	pt3dadd(106.97, -38.48, -2.83, 0.55)
	pt3dadd(108.61, -38.48, -2.83, 0.55)
	pt3dadd(108.97, -38.48, -2.91, 0.55)
	pt3dadd(110.07, -38.84, -3.06, 0.55)
	pt3dadd(112.62, -39.57, -3.36, 0.55)
	pt3dadd(113.17, -39.76, -3.59, 0.55)
	pt3dadd(114.08, -39.94, -3.74, 0.55)
	pt3dadd(114.63, -40.12, -3.82, 0.55)
	pt3dadd(115.91, -40.3, -3.97, 0.55)
	pt3dadd(116.27, -40.3, -4.2, 0.55)
	pt3dadd(116.82, -40.3, -4.35, 0.55)
	pt3dadd(117.18, -40.3, -4.5, 0.55)
	pt3dadd(118.1, -40.12, -4.65, 0.55)
	pt3dadd(118.46, -40.12, -4.8, 0.55)
	pt3dadd(118.83, -39.94, -4.95, 0.55)
	pt3dadd(119.19, -39.94, -5.11, 0.55)
	pt3dadd(119.56, -39.94, -5.26, 0.55)
	pt3dadd(119.92, -39.94, -5.33, 0.55)
	pt3dadd(121.38, -39.76, -5.41, 0.55)
	pt3dadd(122.84, -39.21, -5.56, 0.55)
	pt3dadd(123.57, -38.84, -5.64, 0.55)
	pt3dadd(124.48, -38.84, -5.71, 0.55)
	pt3dadd(125.94, -38.84, -5.79, 0.55)
	pt3dadd(126.67, -38.84, -5.79, 0.55)
	pt3dadd(127.77, -38.84, -5.79, 0.55)
	pt3dadd(128.68, -39.03, -5.79, 0.55)
	pt3dadd(130.14, -39.39, -5.79, 0.55)
	pt3dadd(131.23, -39.57, -5.79, 0.55)
	pt3dadd(132.15, -39.76, -5.86, 0.55)
	pt3dadd(132.69, -39.94, -6.01, 0.55)
	pt3dadd(133.42, -40.3, -6.09, 0.55)
	pt3dadd(134.34, -40.67, -6.24, 0.55)
	pt3dadd(135.8, -40.67, -6.54, 0.55)
	pt3dadd(136.89, -40.67, -6.77, 0.55)
	pt3dadd(137.8, -40.3, -7, 0.55)
	pt3dadd(138.53, -40.12, -7.23, 0.55)
	pt3dadd(138.9, -39.57, -7.3, 0.55)
	pt3dadd(139.63, -39.39, -7.3, 0.55)
	pt3dadd(140.54, -39.03, -7.38, 0.55)
	pt3dadd(141.09, -38.66, -7.38, 0.55)
	pt3dadd(142.55, -38.12, -7.38, 0.55)
	pt3dadd(143.28, -37.93, -7.38, 0.55)
	pt3dadd(144.37, -37.21, -7.38, 0.55)
	pt3dadd(146.56, -36.29, -7.45, 0.55)
	pt3dadd(146.92, -35.75, -7.45, 3.1)
	pt3dadd(147.84, -35.2, -7.45, 3.1)
	pt3dadd(149.11, -34.47, -7.45, 3.1)
	pt3dadd(149.66, -34.11, -7.45, 3.1)
  }
  dend[17] {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(36.91, -8.78, 12.47, 1.46)
	pt3dadd(37.45, -8.6, 12.85, 1.46)
	pt3dadd(37.45, -8.6, 13.15, 1.28)
	pt3dadd(37.64, -8.42, 13.6, 1.28)
	pt3dadd(37.82, -8.24, 13.98, 1.28)
	pt3dadd(38.18, -8.05, 14.21, 1.28)
	pt3dadd(38.18, -7.87, 14.36, 1.28)
	pt3dadd(38.91, -7.51, 14.67, 0.91)
	pt3dadd(39.46, -7.14, 15.12, 0.91)
	pt3dadd(40.37, -6.78, 15.65, 0.91)
	pt3dadd(40.74, -6.6, 15.88, 0.91)
	pt3dadd(41.47, -6.41, 16.1, 0.91)
	pt3dadd(42.01, -6.41, 16.33, 0.91)
	pt3dadd(42.74, -6.6, 16.41, 0.91)
	pt3dadd(43.47, -6.41, 16.63, 0.91)
	pt3dadd(44.02, -6.23, 16.79, 0.91)
	pt3dadd(44.39, -6.23, 16.94, 0.91)
	pt3dadd(44.75, -6.23, 17.09, 0.91)
	pt3dadd(45.85, -6.23, 17.32, 0.91)
	pt3dadd(46.21, -6.23, 17.47, 0.91)
	pt3dadd(47.12, -6.23, 17.54, 0.55)
	pt3dadd(47.49, -6.6, 17.62, 0.55)
	pt3dadd(48.22, -6.96, 18.3, 0.55)
	pt3dadd(50.41, -7.14, 18.83, 0.55)
	pt3dadd(50.95, -7.32, 19.36, 0.55)
	pt3dadd(51.32, -7.51, 19.51, 0.55)
	pt3dadd(51.87, -7.69, 19.74, 0.55)
	pt3dadd(52.41, -8.05, 19.89, 0.55)
	pt3dadd(52.96, -8.42, 20.04, 0.55)
	pt3dadd(53.87, -9.15, 20.42, 0.55)
	pt3dadd(54.6, -9.88, 20.57, 0.55)
	pt3dadd(55.52, -10.42, 20.65, 0.55)
	pt3dadd(55.7, -10.6, 20.65, 0.55)
	pt3dadd(56.06, -10.79, 20.65, 0.55)
	pt3dadd(56.43, -10.97, 20.5, 0.55)
	pt3dadd(56.79, -11.15, 20.35, 0.55)
	pt3dadd(57.52, -11.33, 20.12, 0.55)
	pt3dadd(58.25, -11.51, 19.74, 0.55)
	pt3dadd(58.98, -11.7, 19.59, 0.55)
	pt3dadd(60.08, -12.24, 19.36, 0.55)
	pt3dadd(60.99, -12.61, 19.06, 0.55)
	pt3dadd(61.54, -12.97, 18.83, 0.55)
	pt3dadd(62.08, -13.34, 18.68, 0.55)
	pt3dadd(63.18, -13.88, 18.38, 0.55)
	pt3dadd(64.46, -14.61, 18.23, 0.55)
	pt3dadd(65.55, -14.98, 18.23, 0.55)
	pt3dadd(66.46, -15.52, 18.23, 0.55)
	pt3dadd(68.29, -16.07, 18, 0.55)
	pt3dadd(69.38, -16.62, 17.85, 0.55)
	pt3dadd(70.48, -16.98, 17.62, 0.55)
	pt3dadd(71.21, -17.35, 17.47, 0.55)
	pt3dadd(71.57, -17.53, 17.16, 0.55)
	pt3dadd(72.67, -18.44, 17.01, 0.55)
	pt3dadd(73.76, -18.8, 16.79, 0.55)
	pt3dadd(75.22, -19.71, 16.56, 0.55)
	pt3dadd(75.95, -19.71, 16.33, 0.55)
	pt3dadd(76.68, -20.08, 16.26, 0.55)
	pt3dadd(77.41, -20.62, 16.1, 0.55)
	pt3dadd(78.87, -21.35, 16.03, 0.55)
	pt3dadd(79.6, -21.35, 15.95, 0.55)
	pt3dadd(81.06, -21.9, 15.88, 0.55)
	pt3dadd(81.06, -22.08, 15.8, 0.55)
	pt3dadd(81.79, -22.08, 15.8, 0.55)
	pt3dadd(82.88, -22.26, 15.73, 0.55)
	pt3dadd(83.8, -22.45, 15.57, 0.55)
	pt3dadd(84.53, -22.63, 15.42, 0.55)
	pt3dadd(85.07, -22.63, 15.27, 0.55)
	pt3dadd(86.17, -22.99, 15.12, 0.55)
	pt3dadd(86.72, -23.36, 14.89, 0.55)
	pt3dadd(88.54, -24.09, 14.67, 0.55)
	pt3dadd(90.36, -25.36, 14.36, 0.55)
	pt3dadd(92.55, -26.46, 14.06, 0.55)
	pt3dadd(94.38, -27.18, 14.06, 0.55)
	pt3dadd(95.84, -27.73, 14.06, 0.55)
	pt3dadd(97.66, -29.01, 14.13, 0.55)
	pt3dadd(98.39, -29.55, 14.13, 0.55)
	pt3dadd(100.58, -30.65, 14.13, 0.55)
	pt3dadd(101.49, -30.83, 14.13, 0.55)
	pt3dadd(103.32, -31.19, 14.13, 0.55)
	pt3dadd(104.05, -31.01, 14.13, 0.55)
	pt3dadd(105.33, -30.83, 14.13, 0.55)
	pt3dadd(106.42, -30.65, 14.13, 0.55)
	pt3dadd(107.51, -30.46, 14.13, 0.55)
	pt3dadd(114.08, -31.74, 14.13, 0.55)
	pt3dadd(117.18, -31.56, 14.13, 0.55)
	pt3dadd(119.19, -31.56, 14.13, 0.55)
	pt3dadd(120.65, -31.37, 14.13, 0.55)
	pt3dadd(124.12, -30.83, 14.13, 0.55)
	pt3dadd(125.58, -30.46, 14.13, 0.55)
	pt3dadd(126.85, -29.92, 14.13, 0.55)
	pt3dadd(128.13, -29.01, 14.13, 0.55)
	pt3dadd(130.32, -28.82, 14.13, 0.55)
	pt3dadd(132.15, -29.01, 14.13, 0.55)
	pt3dadd(133.97, -29.73, 14.13, 0.55)
	pt3dadd(135.07, -29.73, 14.13, 0.55)
	pt3dadd(136.16, -29.55, 14.13, 0.55)
	pt3dadd(137.25, -29.19, 14.13, 0.55)
	pt3dadd(137.8, -28.64, 14.13, 0.55)
	pt3dadd(138.35, -28.1, 14.29, 0.55)
	pt3dadd(139.08, -27.73, 14.44, 0.55)
	pt3dadd(139.81, -27, 14.59, 1.09)
	pt3dadd(139.63, -25.91, 14.67, 1.09)
	pt3dadd(139.63, -25.18, 14.67, 1.09)
	pt3dadd(139.81, -24.27, 14.74, 1.09)
	pt3dadd(139.99, -23.72, 14.82, 1.09)
	pt3dadd(140.54, -23.18, 14.89, 1.09)
	pt3dadd(141.09, -22.08, 15.04, 1.82)
	pt3dadd(140.9, -20.81, 15.04, 1.82)
  }
  apic {pt3dclear()
	pt3dstyle(1, 27.8031, -6.86575, 11.1)
	pt3dadd(22.08, 2.19, -0.79, 6.57)
	pt3dadd(22.08, 2.19, -0.79, 6.57)
	pt3dadd(21.53, 3.83, -0.79, 5.84)
	pt3dadd(21.16, 5.65, -0.79, 5.29)
	pt3dadd(20.62, 7.47, -0.79, 4.93)
	pt3dadd(20.07, 8.93, -0.79, 4.93)
	pt3dadd(18.98, 11.84, -0.79, 4.56)
	pt3dadd(18.61, 12.39, -0.79, 4.56)
	pt3dadd(18.25, 13.3, -0.79, 4.56)
	pt3dadd(18.06, 14.21, -0.79, 4.56)
	pt3dadd(18.06, 14.76, -0.79, 4.56)
  }
  apic[1] {pt3dclear()
	pt3dadd(18.06, 14.76, -0.79, 0.73)
	pt3dadd(15.57, 15.84, -0.94, 0.73)
	pt3dadd(14.47, 16.75, -0.94, 0.73)
	pt3dadd(13.38, 17.12, -0.56, 0.73)
	pt3dadd(11.74, 18.03, -0.48, 0.73)
	pt3dadd(11.01, 18.03, -0.26, 0.73)
	pt3dadd(9.91, 18.21, -0.18, 0.73)
	pt3dadd(8.82, 18.57, -0.11, 0.73)
	pt3dadd(8.09, 18.76, 0.05, 0.73)
	pt3dadd(6.44, 18.39, 0.05, 0.73)
	pt3dadd(5.17, 17.84, 0.12, 0.73)
	pt3dadd(4.44, 17.12, 0.12, 0.73)
	pt3dadd(3.52, 16.39, 0.12, 0.73)
	pt3dadd(2.43, 14.93, 0.12, 0.73)
	pt3dadd(1.52, 14.2, 0.12, 0.73)
	pt3dadd(0.06, 12.74, 0.12, 0.73)
	pt3dadd(-1.22, 12.56, 0.12, 0.73)
	pt3dadd(-2.5, 11.83, 0.12, 0.73)
	pt3dadd(-4.14, 11.47, 0.2, 0.73)
	pt3dadd(-6.33, 11.29, 0.42, 0.73)
	pt3dadd(-7.42, 11.29, 0.65, 0.73)
	pt3dadd(-9.06, 11.29, 0.8, 0.73)
	pt3dadd(-10.52, 11.1, 0.95, 0.73)
  }
}
proc shape3d_9() {
  apic[1] {	pt3dadd(-11.25, 11.1, 1.03, 0.73)
	pt3dadd(-13.63, 11.29, 1.18, 0.73)
	pt3dadd(-17.27, 11.1, 1.33, 0.73)
	pt3dadd(-18.19, 11.1, 1.48, 0.73)
	pt3dadd(-19.65, 11.1, 1.56, 0.73)
	pt3dadd(-21.11, 11.1, 1.71, 0.73)
	pt3dadd(-22.93, 11.47, 1.71, 0.73)
	pt3dadd(-24.03, 11.65, 1.79, 0.73)
	pt3dadd(-26.76, 11.65, 1.94, 0.73)
	pt3dadd(-29.68, 11.65, 2.01, 0.73)
	pt3dadd(-31.32, 11.65, 2.01, 0.73)
	pt3dadd(-34.43, 12.01, 2.01, 0.73)
	pt3dadd(-35.7, 12.2, 2.01, 0.73)
	pt3dadd(-36.98, 12.2, 2.39, 0.73)
	pt3dadd(-38.26, 12.2, 2.62, 0.73)
	pt3dadd(-39.35, 12.2, 2.85, 0.73)
	pt3dadd(-40.99, 12.2, 3.23, 0.73)
	pt3dadd(-42.27, 12.01, 3.45, 0.73)
	pt3dadd(-43.91, 11.47, 3.53, 0.73)
	pt3dadd(-45.01, 11.29, 3.83, 0.73)
	pt3dadd(-46.47, 10.56, 4.06, 0.73)
	pt3dadd(-47.56, 10.01, 4.21, 0.73)
	pt3dadd(-49.02, 9.46, 4.36, 0.73)
	pt3dadd(-50.12, 9.1, 4.59, 0.73)
	pt3dadd(-50.85, 8.92, 4.67, 0.73)
	pt3dadd(-51.39, 8.55, 4.44, 0.73)
	pt3dadd(-52.12, 8.55, 4.21, 0.73)
	pt3dadd(-52.67, 8.37, 3.91, 0.73)
	pt3dadd(-52.85, 8.37, 3.3, 0.73)
	pt3dadd(-53.77, 7.82, 2.85, 0.73)
	pt3dadd(-54.31, 7.64, 2.62, 0.73)
	pt3dadd(-55.04, 7.64, 2.47, 0.73)
	pt3dadd(-55.95, 7.46, 2.32, 0.73)
	pt3dadd(-56.68, 7.64, 2.09, 0.73)
	pt3dadd(-57.78, 7.64, 1.86, 0.73)
	pt3dadd(-58.51, 8.01, 1.71, 0.73)
	pt3dadd(-59.42, 8.19, 1.56, 0.73)
	pt3dadd(-60.52, 8.37, 1.33, 0.73)
	pt3dadd(-61.98, 8.37, 1.11, 0.73)
	pt3dadd(-63.07, 8.55, 1.03, 0.73)
	pt3dadd(-64.17, 8.92, 0.65, 0.73)
	pt3dadd(-65.08, 9.1, 0.42, 0.73)
  }
  apic[2] {pt3dclear()
	pt3dadd(18.06, 14.76, -0.79, 4.01)
	pt3dadd(18.25, 16.94, -0.79, 4.01)
	pt3dadd(18.25, 16.94, -0.79, 4.01)
	pt3dadd(18.43, 17.86, -0.79, 4.01)
	pt3dadd(18.25, 19.31, -0.64, 4.01)
	pt3dadd(18.25, 19.86, -0.56, 4.01)
	pt3dadd(18.25, 20.59, -0.48, 4.01)
	pt3dadd(18.25, 22.05, -0.33, 4.01)
	pt3dadd(18.43, 22.77, -0.26, 4.01)
	pt3dadd(18.61, 23.69, -0.03, 4.01)
	pt3dadd(18.79, 24.41, 0.2, 4.01)
	pt3dadd(18.98, 25.14, 0.2, 4.01)
	pt3dadd(18.98, 26.42, 0.35, 4.01)
	pt3dadd(18.98, 27.15, 0.42, 4.01)
	pt3dadd(19.16, 27.69, 0.58, 4.01)
	pt3dadd(19.52, 28.42, 0.65, 4.01)
	pt3dadd(19.52, 28.97, 0.73, 4.01)
	pt3dadd(19.7, 29.52, 0.73, 4.01)
	pt3dadd(19.7, 30.43, 0.42, 4.01)
	pt3dadd(19.7, 30.97, 0.35, 4.01)
	pt3dadd(19.7, 31.7, 0.2, 4.01)
	pt3dadd(19.52, 32.25, 0.05, 4.01)
	pt3dadd(19.34, 33.34, -0.11, 4.01)
	pt3dadd(19.34, 34.07, -0.18, 4.01)
	pt3dadd(19.34, 34.98, -0.41, 4.01)
	pt3dadd(19.16, 35.53, -0.64, 4.01)
	pt3dadd(19.16, 35.89, -0.86, 4.01)
	pt3dadd(19.52, 36.44, -1.02, 4.01)
	pt3dadd(19.52, 36.99, -1.17, 4.01)
	pt3dadd(19.52, 37.53, -1.39, 4.01)
	pt3dadd(19.52, 37.9, -1.47, 4.01)
	pt3dadd(19.52, 37.9, -1.55, 4.01)
	pt3dadd(19.52, 37.9, -1.55, 4.01)
	pt3dadd(19.52, 38.44, -1.55, 4.01)
	pt3dadd(19.52, 38.81, -1.55, 4.01)
	pt3dadd(19.52, 39.17, -1.55, 4.01)
	pt3dadd(19.7, 39.72, -1.55, 4.01)
	pt3dadd(19.7, 40.27, -1.7, 4.01)
	pt3dadd(19.7, 40.81, -1.85, 4.01)
	pt3dadd(19.7, 41.54, -1.92, 4.01)
	pt3dadd(19.7, 42.27, -2, 4.01)
	pt3dadd(19.89, 43.18, -2.15, 4.01)
	pt3dadd(20.07, 43.91, -2.23, 4.01)
	pt3dadd(20.07, 44.46, -2.3, 4.01)
	pt3dadd(20.25, 45.37, -2.45, 4.01)
	pt3dadd(20.25, 46.1, -2.45, 4.01)
	pt3dadd(20.25, 47.01, -2.68, 4.01)
	pt3dadd(20.25, 47.92, -2.68, 4.01)
	pt3dadd(20.25, 49.19, -2.76, 4.01)
	pt3dadd(20.43, 49.92, -2.76, 4.01)
	pt3dadd(20.8, 52.11, -2.83, 4.01)
	pt3dadd(20.8, 53.2, -2.83, 4.01)
	pt3dadd(20.8, 54.66, -2.83, 4.01)
	pt3dadd(20.8, 56.3, -2.83, 4.01)
	pt3dadd(20.8, 58.12, -2.83, 4.01)
	pt3dadd(20.62, 61.77, -2.76, 4.01)
	pt3dadd(19.89, 66.69, -2.76, 3.65)
	pt3dadd(19.7, 67.41, -2.76, 3.65)
	pt3dadd(19.52, 69.24, -2.76, 3.65)
	pt3dadd(19.16, 71.06, -2.76, 3.65)
	pt3dadd(18.43, 73.61, -2.76, 3.65)
	pt3dadd(18.37, 78.81, -2.83, 3.65)
	pt3dadd(18.19, 79.17, -2.83, 3.65)
	pt3dadd(17.82, 80.63, -2.83, 3.65)
	pt3dadd(17.09, 82.08, -2.83, 3.65)
	pt3dadd(16.55, 83.36, -2.83, 3.65)
	pt3dadd(16, 84.82, -2.83, 3.65)
	pt3dadd(15.45, 86.82, -2.83, 3.65)
	pt3dadd(14.72, 89.01, -2.83, 3.65)
	pt3dadd(14.54, 91.38, -2.83, 3.65)
	pt3dadd(14.36, 93.38, -2.83, 3.65)
	pt3dadd(14.17, 96.3, -2.68, 3.65)
	pt3dadd(14.17, 97.21, -2.61, 3.65)
	pt3dadd(14.17, 98.12, -2.53, 3.65)
	pt3dadd(13.99, 99.21, -2.45, 3.65)
	pt3dadd(13.99, 99.94, -2.3, 3.65)
	pt3dadd(13.81, 101.03, -2.3, 3.65)
	pt3dadd(13.81, 101.94, -2.3, 3.65)
	pt3dadd(13.81, 102.67, -2.15, 3.65)
	pt3dadd(13.81, 105.04, -2.15, 3.28)
	pt3dadd(13.26, 105.41, -1.92, 3.28)
	pt3dadd(13.08, 105.95, -1.85, 3.28)
	pt3dadd(13.08, 106.5, -1.85, 3.28)
	pt3dadd(12.9, 107.23, -1.77, 3.28)
	pt3dadd(12.53, 109.05, -1.39, 2.92)
	pt3dadd(12.35, 109.6, -1.32, 2.92)
	pt3dadd(12.35, 110.33, -1.32, 2.92)
	pt3dadd(12.17, 111.24, -1.17, 2.92)
	pt3dadd(12.17, 111.78, -1.02, 2.92)
	pt3dadd(12.17, 112.15, -0.71, 2.92)
	pt3dadd(12.17, 112.69, -0.64, 2.92)
	pt3dadd(12.17, 113.24, -0.48, 2.92)
	pt3dadd(11.98, 114.15, -0.18, 2.92)
	pt3dadd(11.8, 114.7, -0.03, 2.92)
	pt3dadd(11.8, 115.43, 0.05, 2.92)
	pt3dadd(11.8, 116.16, 0.12, 2.92)
	pt3dadd(11.62, 117.07, 0.2, 2.92)
	pt3dadd(11.44, 117.8, 0.42, 2.92)
	pt3dadd(10.89, 118.52, 0.73, 2.92)
	pt3dadd(10.71, 118.89, 1.03, 2.92)
	pt3dadd(10.52, 119.44, 1.11, 2.92)
	pt3dadd(10.34, 120.16, 1.41, 2.92)
	pt3dadd(10.16, 120.89, 1.71, 2.92)
	pt3dadd(9.98, 121.08, 1.71, 2.92)
	pt3dadd(9.98, 122.9, 1.26, 3.47)
	pt3dadd(9.98, 122.9, 1.26, 3.47)
	pt3dadd(9.98, 123.26, 1.11, 3.47)
	pt3dadd(9.98, 123.63, 0.95, 3.47)
	pt3dadd(9.98, 123.63, 0.58, 3.47)
	pt3dadd(9.79, 123.99, 0.42, 3.47)
	pt3dadd(9.79, 124.17, 0.27, 3.47)
	pt3dadd(9.79, 124.36, 0.12, 3.47)
	pt3dadd(9.79, 124.54, -0.18, 3.47)
	pt3dadd(9.79, 124.72, -0.48, 3.47)
	pt3dadd(9.79, 124.9, -0.86, 3.47)
	pt3dadd(9.79, 124.9, -1.09, 3.47)
	pt3dadd(9.79, 125.45, -1.24, 3.47)
	pt3dadd(9.79, 125.63, -1.47, 3.47)
	pt3dadd(9.79, 125.81, -1.7, 3.47)
	pt3dadd(9.79, 125.81, -2, 3.47)
	pt3dadd(9.79, 125.99, -2.3, 3.47)
	pt3dadd(9.79, 126.18, -2.45, 3.47)
	pt3dadd(9.79, 126.36, -2.68, 3.47)
	pt3dadd(9.79, 126.91, -2.98, 3.47)
	pt3dadd(9.79, 127.09, -3.06, 3.47)
	pt3dadd(9.61, 127.27, -3.21, 3.47)
	pt3dadd(9.61, 127.82, -3.51, 3.47)
	pt3dadd(9.61, 128.18, -3.74, 3.47)
	pt3dadd(9.43, 128.91, -3.97, 3.47)
	pt3dadd(9.43, 129.46, -4.12, 3.47)
	pt3dadd(9.43, 130, -4.27, 3.47)
	pt3dadd(9.61, 130.91, -4.58, 3.47)
	pt3dadd(9.79, 131.46, -4.88, 3.47)
	pt3dadd(9.79, 131.83, -5.11, 3.47)
	pt3dadd(9.98, 132.19, -5.33, 3.47)
	pt3dadd(9.98, 133.1, -5.56, 3.47)
	pt3dadd(10.16, 133.65, -5.71, 3.47)
	pt3dadd(10.16, 134.19, -5.86, 3.47)
	pt3dadd(10.34, 134.74, -6.09, 3.47)
	pt3dadd(10.34, 135.47, -6.32, 3.47)
	pt3dadd(10.34, 135.65, -6.47, 3.47)
	pt3dadd(10.34, 135.65, -6.62, 3.47)
	pt3dadd(10.34, 136.02, -6.92, 3.47)
	pt3dadd(10.52, 137.11, -7.08, 3.47)
	pt3dadd(10.34, 137.84, -7.08, 3.47)
  }
  apic[3] {pt3dclear()
	pt3dadd(10.34, 137.84, -7.08, 0.91)
	pt3dadd(11.63, 138.69, -7.91, 0.91)
	pt3dadd(11.82, 139.24, -7.76, 0.91)
	pt3dadd(12.73, 139.79, -7.68, 0.91)
	pt3dadd(13.28, 139.97, -7.53, 0.91)
	pt3dadd(14.37, 140.7, -7.53, 0.91)
	pt3dadd(15.83, 141.24, -7.45, 0.91)
	pt3dadd(17.11, 141.61, -7.45, 0.91)
	pt3dadd(18.75, 141.61, -7.45, 0.91)
	pt3dadd(20.76, 141.61, -7.45, 0.91)
	pt3dadd(23.68, 141.61, -7.45, 0.91)
	pt3dadd(27.14, 141.06, -7.45, 0.91)
	pt3dadd(31.16, 140.15, -7.45, 0.73)
  }
}
proc shape3d_10() {
  apic[3] {	pt3dadd(33.16, 139.6, -7.45, 0.73)
	pt3dadd(35.17, 139.97, -7.45, 0.73)
	pt3dadd(37.54, 141.06, -7.45, 0.73)
	pt3dadd(39.55, 141.79, -7.45, 0.73)
	pt3dadd(41.37, 142.7, -7.45, 0.73)
	pt3dadd(43.38, 143.8, -7.45, 0.73)
	pt3dadd(46.12, 145.07, -7.45, 0.73)
	pt3dadd(48.67, 146.35, -7.45, 0.73)
	pt3dadd(50.86, 147.62, -7.45, 0.73)
	pt3dadd(52.69, 148.9, -7.45, 0.73)
	pt3dadd(56.33, 149.44, -7.38, 0.73)
	pt3dadd(57.61, 149.99, -7.38, 0.73)
	pt3dadd(58.71, 150.54, -7.38, 0.73)
	pt3dadd(60.17, 151.08, -7.38, 0.73)
	pt3dadd(62.17, 151.27, -7.38, 0.73)
	pt3dadd(64.91, 152.18, -7.38, 0.73)
	pt3dadd(66.73, 152.91, -7.38, 0.73)
	pt3dadd(68.56, 153.09, -7.38, 0.73)
	pt3dadd(70.38, 153.63, -7.38, 0.73)
	pt3dadd(71.48, 154, -7.38, 0.73)
	pt3dadd(72.57, 154.36, -7.38, 0.73)
	pt3dadd(73.12, 155.09, -7.23, 0.73)
	pt3dadd(73.48, 155.46, -7.15, 0.73)
	pt3dadd(74.21, 156.18, -7.08, 0.73)
	pt3dadd(74.94, 157.1, -6.92, 0.73)
	pt3dadd(76.04, 157.82, -6.77, 0.73)
	pt3dadd(76.95, 158.55, -6.54, 0.73)
	pt3dadd(78.05, 159.65, -6.47, 0.73)
	pt3dadd(78.41, 160.92, -6.32, 0.73)
	pt3dadd(78.78, 162.2, -6.24, 0.73)
	pt3dadd(79.69, 164.2, -6.01, 0.73)
	pt3dadd(79.87, 165.66, -5.86, 0.73)
	pt3dadd(80.24, 166.93, -5.71, 0.73)
	pt3dadd(80.42, 168.57, -5.64, 0.73)
	pt3dadd(81.88, 170.58, -5.64, 0.73)
	pt3dadd(82.79, 172.22, -5.56, 0.73)
	pt3dadd(84.25, 174.77, -5.33, 0.73)
	pt3dadd(84.61, 174.95, -5.33, 0.73)
	pt3dadd(85.16, 175.32, -5.33, 0.73)
	pt3dadd(86.62, 176.23, -5.33, 0.73)
	pt3dadd(87.9, 177.5, -5.18, 0.73)
	pt3dadd(89.18, 178.6, -5.03, 0.73)
	pt3dadd(89.72, 179.32, -4.88, 0.73)
	pt3dadd(90.45, 180.05, -4.65, 0.73)
	pt3dadd(91.37, 180.6, -4.5, 0.73)
	pt3dadd(92.1, 181.15, -4.35, 0.73)
	pt3dadd(93.01, 181.69, -4.2, 0.73)
	pt3dadd(93.74, 182.42, -4.05, 0.73)
	pt3dadd(94.47, 182.42, -3.97, 0.73)
	pt3dadd(95.56, 182.6, -3.82, 0.73)
	pt3dadd(96.66, 183.15, -3.59, 0.73)
	pt3dadd(97.57, 183.51, -3.44, 0.73)
	pt3dadd(98.85, 184.24, -3.36, 0.73)
	pt3dadd(100.85, 185.52, -3.21, 0.73)
	pt3dadd(102.31, 186.79, -3.14, 0.73)
	pt3dadd(103.77, 188.25, -3.06, 0.73)
	pt3dadd(104.68, 188.98, -2.98, 0.73)
	pt3dadd(105.05, 189.35, -2.98, 0.73)
  }
  apic[4] {pt3dclear()
	pt3dadd(10.34, 137.84, -7.08, 3.47)
	pt3dadd(10.16, 139.66, -7.08, 3.47)
	pt3dadd(10.16, 139.66, -7.08, 3.47)
	pt3dadd(10.16, 139.66, -7.15, 3.47)
	pt3dadd(9.98, 140.21, -7.23, 3.47)
	pt3dadd(9.61, 140.94, -7.23, 3.47)
	pt3dadd(9.61, 141.48, -7.3, 3.47)
	pt3dadd(9.61, 142.39, -7.3, 3.47)
	pt3dadd(9.07, 143.49, -7.3, 3.28)
	pt3dadd(8.88, 144.4, -7.3, 3.28)
	pt3dadd(8.7, 144.94, -7.38, 3.28)
	pt3dadd(8.7, 145.49, -7.38, 3.28)
	pt3dadd(9.07, 146.4, -7.61, 3.28)
	pt3dadd(9.07, 146.95, -7.61, 3.28)
	pt3dadd(9.25, 147.68, -7.76, 3.28)
	pt3dadd(9.25, 148.77, -7.83, 3.28)
	pt3dadd(9.07, 149.32, -7.91, 3.28)
	pt3dadd(9.07, 150.23, -7.98, 3.28)
	pt3dadd(9.07, 150.77, -7.98, 3.28)
	pt3dadd(9.07, 151.5, -7.98, 3.28)
	pt3dadd(9.07, 152.23, -8.06, 3.28)
	pt3dadd(9.07, 152.96, -8.14, 3.28)
	pt3dadd(9.07, 153.87, -8.21, 3.28)
	pt3dadd(8.88, 154.6, -8.29, 3.28)
	pt3dadd(8.7, 155.51, -8.36, 3.28)
	pt3dadd(8.7, 156.06, -8.36, 3.28)
	pt3dadd(8.7, 157.15, -8.51, 3.28)
	pt3dadd(8.7, 157.7, -8.59, 3.28)
	pt3dadd(8.52, 157.88, -8.59, 3.28)
	pt3dadd(8.34, 158.61, -8.74, 3.28)
	pt3dadd(8.34, 159.52, -8.82, 3.28)
	pt3dadd(7.97, 160.61, -8.89, 3.28)
	pt3dadd(7.97, 161.89, -8.97, 3.28)
	pt3dadd(7.79, 162.62, -9.04, 3.28)
	pt3dadd(7.79, 164.26, -9.12, 3.28)
	pt3dadd(7.79, 164.99, -9.2, 3.28)
	pt3dadd(7.42, 167.9, -9.2, 3.1)
	pt3dadd(7.24, 168.45, -9.2, 3.1)
	pt3dadd(7.06, 169.72, -9.27, 3.1)
	pt3dadd(6.69, 170.63, -9.27, 3.1)
	pt3dadd(5.96, 173.37, -9.27, 2.74)
	pt3dadd(5.6, 173.91, -9.27, 2.74)
	pt3dadd(5.23, 175.01, -9.27, 2.74)
	pt3dadd(4.69, 176.1, -9.27, 2.74)
	pt3dadd(3.96, 177.19, -9.27, 2.74)
	pt3dadd(3.59, 177.92, -9.35, 2.74)
	pt3dadd(3.23, 178.65, -9.5, 2.74)
	pt3dadd(2.68, 179.74, -9.57, 2.74)
	pt3dadd(1.95, 180.84, -9.65, 2.74)
	pt3dadd(1.4, 184.3, -9.73, 2.74)
	pt3dadd(1.58, 185.03, -9.73, 2.74)
	pt3dadd(1.4, 186.12, -9.73, 2.74)
	pt3dadd(0.85, 187.21, -9.73, 2.74)
	pt3dadd(0.85, 188.85, -9.73, 2.74)
	pt3dadd(0.85, 190.31, -9.73, 2.74)
	pt3dadd(1.04, 191.95, -9.73, 2.74)
	pt3dadd(1.4, 193.23, -9.73, 2.74)
	pt3dadd(2.63, 193.04, -9.73, 2.74)
	pt3dadd(2.45, 193.4, -9.73, 2.74)
	pt3dadd(2.45, 193.77, -9.73, 2.74)
	pt3dadd(2.82, 194.5, -9.73, 2.74)
	pt3dadd(3.18, 194.68, -9.73, 2.74)
	pt3dadd(3.18, 195.41, -9.73, 2.74)
	pt3dadd(3.36, 197.05, -9.73, 2.92)
	pt3dadd(3, 198.14, -9.73, 2.92)
	pt3dadd(3, 199.24, -9.73, 2.92)
	pt3dadd(2.82, 200.33, -9.73, 2.92)
	pt3dadd(2.82, 201.24, -9.73, 2.92)
	pt3dadd(2.82, 202.33, -9.73, 2.92)
	pt3dadd(2.63, 203.24, -9.73, 3.1)
	pt3dadd(2.45, 203.79, -9.73, 3.1)
	pt3dadd(2.27, 204.34, -9.73, 3.1)
	pt3dadd(2.27, 205.43, -9.73, 3.1)
	pt3dadd(2.09, 206.16, -9.73, 3.1)
	pt3dadd(2.09, 207.07, -9.73, 3.1)
	pt3dadd(2.09, 207.98, -9.73, 3.1)
	pt3dadd(2.27, 208.71, -9.73, 3.1)
	pt3dadd(2.09, 209.62, -9.73, 3.1)
	pt3dadd(1.9, 210.53, -9.73, 3.1)
	pt3dadd(1.9, 211.26, -9.73, 3.1)
	pt3dadd(1.54, 211.81, -9.73, 3.1)
	pt3dadd(1.36, 212.54, -9.73, 3.1)
	pt3dadd(1.36, 213.08, -9.73, 3.1)
	pt3dadd(1.36, 213.63, -9.73, 3.1)
	pt3dadd(1.17, 214.36, -9.73, 3.47)
	pt3dadd(0.99, 215.09, -9.73, 3.47)
	pt3dadd(0.81, 215.63, -9.73, 3.47)
	pt3dadd(0.81, 216.73, -9.73, 3.47)
	pt3dadd(0.81, 217.27, -9.73, 3.47)
	pt3dadd(0.63, 218.18, -9.73, 3.47)
	pt3dadd(0.63, 218.73, -9.73, 3.47)
	pt3dadd(0.63, 219.28, -9.73, 3.47)
	pt3dadd(0.63, 220.01, -9.73, 3.47)
	pt3dadd(0.44, 220.55, -9.73, 3.47)
	pt3dadd(0.44, 221.46, -9.73, 3.47)
	pt3dadd(0.44, 222.01, -9.73, 3.47)
	pt3dadd(0.44, 222.56, -9.73, 3.65)
	pt3dadd(0.44, 222.74, -9.73, 3.65)
	pt3dadd(0.44, 223.65, -9.73, 3.65)
	pt3dadd(0.44, 224.2, -9.73, 3.65)
	pt3dadd(0.44, 225.29, -9.73, 3.65)
	pt3dadd(0.44, 226.57, -9.73, 3.65)
	pt3dadd(0.44, 227.11, -9.73, 3.65)
	pt3dadd(0.63, 228.02, -9.73, 3.65)
	pt3dadd(0.63, 228.75, -9.73, 3.65)
	pt3dadd(0.81, 230.21, -9.73, 3.1)
	pt3dadd(0.63, 231.67, -9.73, 3.1)
	pt3dadd(0.63, 232.4, -9.73, 3.1)
	pt3dadd(0.63, 233.31, -9.73, 3.1)
	pt3dadd(0.44, 234.58, -9.73, 3.1)
	pt3dadd(0.26, 235.68, -9.73, 3.1)
	pt3dadd(-0.1, 236.77, -9.73, 3.1)
	pt3dadd(-0.1, 237.86, -9.73, 3.1)
	pt3dadd(-0.29, 238.59, -9.73, 3.1)
	pt3dadd(-0.29, 239.32, -9.73, 3.1)
	pt3dadd(-0.29, 240.05, -9.73, 3.1)
	pt3dadd(-0.29, 240.59, -9.73, 3.1)
	pt3dadd(-0.47, 241.32, -9.73, 3.1)
	pt3dadd(-0.47, 242.23, -9.73, 3.1)
	pt3dadd(-0.65, 243.33, -9.73, 3.1)
	pt3dadd(-0.83, 244.6, -9.73, 3.1)
	pt3dadd(-0.83, 245.33, -9.73, 3.1)
	pt3dadd(-0.83, 246.06, -9.5, 3.1)
	pt3dadd(-0.83, 247.34, -9.42, 3.1)
	pt3dadd(-0.83, 247.88, -9.35, 3.1)
	pt3dadd(-0.83, 248.98, -9.35, 3.1)
	pt3dadd(-0.83, 249.89, -9.35, 3.1)
	pt3dadd(-0.83, 250.62, -9.5, 3.1)
	pt3dadd(-1.02, 251.34, -9.57, 3.83)
	pt3dadd(-1.2, 251.89, -9.57, 3.83)
	pt3dadd(-1.2, 252.62, -9.57, 3.83)
	pt3dadd(-1.38, 253.35, -9.57, 3.83)
	pt3dadd(-1.38, 254.08, -9.57, 3.83)
	pt3dadd(-1.38, 254.62, -9.65, 3.83)
	pt3dadd(-1.38, 255.17, -9.73, 3.83)
	pt3dadd(-1.38, 255.9, -9.88, 3.83)
	pt3dadd(-1.38, 256.63, -9.88, 3.83)
	pt3dadd(-1.56, 257.17, -9.95, 3.83)
	pt3dadd(-1.56, 257.72, -10.11, 3.83)
	pt3dadd(-1.56, 258.63, -10.33, 3.83)
	pt3dadd(-1.38, 260.64, -10.41, 3.47)
	pt3dadd(-1.2, 261, -10.41, 3.47)
  }
}
proc shape3d_11() {
  apic[4] {	pt3dadd(-1.2, 261.73, -10.33, 3.47)
	pt3dadd(-1.2, 262.28, -10.26, 3.47)
	pt3dadd(-1.2, 263.19, -9.95, 3.47)
	pt3dadd(-1.38, 263.73, -9.73, 3.47)
	pt3dadd(-1.56, 264.46, -9.65, 3.47)
	pt3dadd(-1.56, 265.19, -9.5, 3.47)
	pt3dadd(-1.75, 265.74, -9.35, 3.47)
	pt3dadd(-1.75, 266.28, -9.27, 3.47)
	pt3dadd(-1.75, 267.2, -9.2, 3.47)
	pt3dadd(-1.75, 267.74, -9.12, 3.47)
	pt3dadd(-1.75, 268.84, -8.97, 3.47)
	pt3dadd(-1.75, 269.75, -8.89, 3.47)
	pt3dadd(-1.93, 270.66, -8.67, 3.47)
	pt3dadd(-2.11, 271.2, -8.51, 3.47)
	pt3dadd(-2.11, 272.48, -8.44, 3.47)
	pt3dadd(-2.11, 274.12, -8.36, 3.47)
	pt3dadd(-2.11, 275.39, -8.29, 3.47)
  }
  apic[5] {pt3dclear()
	pt3dadd(-2.11, 275.39, -8.29, 1.46)
	pt3dadd(-3.34, 275.53, -8.21, 1.46)
	pt3dadd(-3.34, 275.53, -8.21, 1.46)
	pt3dadd(-3.52, 275.71, -8.59, 1.46)
	pt3dadd(-4.07, 276.26, -8.82, 1.46)
	pt3dadd(-4.07, 276.8, -8.97, 1.46)
	pt3dadd(-4.25, 277.72, -9.2, 1.46)
	pt3dadd(-4.62, 278.63, -9.35, 1.46)
	pt3dadd(-4.8, 279.17, -9.42, 1.46)
	pt3dadd(-4.98, 280.08, -9.65, 1.46)
	pt3dadd(-5.53, 281.18, -9.88, 1.46)
	pt3dadd(-5.53, 281.91, -10.11, 1.46)
	pt3dadd(-5.71, 282.45, -10.26, 1.46)
	pt3dadd(-5.89, 283, -10.33, 1.46)
	pt3dadd(-6.44, 283.91, -10.56, 1.46)
	pt3dadd(-6.62, 284.27, -10.71, 1.46)
	pt3dadd(-6.81, 285, -10.71, 1.46)
	pt3dadd(-6.81, 285.55, -10.71, 1.46)
	pt3dadd(-7.53, 286.64, -11.01, 1.46)
	pt3dadd(-7.9, 287.55, -11.17, 1.46)
	pt3dadd(-7.9, 288.47, -11.32, 1.46)
	pt3dadd(-8.08, 289.01, -11.39, 1.46)
	pt3dadd(-8.08, 289.56, -11.47, 1.46)
	pt3dadd(-8.08, 290.29, -11.62, 1.46)
	pt3dadd(-8.26, 291.02, -11.77, 1.46)
	pt3dadd(-8.45, 291.75, -11.85, 1.46)
	pt3dadd(-8.63, 292.66, -11.92, 1.46)
	pt3dadd(-8.63, 293.75, -12, 1.46)
	pt3dadd(-8.63, 294.48, -12, 1.46)
	pt3dadd(-7.9, 295.21, -12.07, 1.46)
	pt3dadd(-8.08, 295.57, -12.07, 1.46)
	pt3dadd(-8.26, 295.57, -12.07, 1.46)
	pt3dadd(-8.45, 296.12, -12.07, 1.46)
	pt3dadd(-8.45, 296.3, -12.07, 1.46)
	pt3dadd(-8.45, 297.03, -12.07, 1.46)
	pt3dadd(-8.45, 297.94, -12.07, 1.46)
	pt3dadd(-8.81, 298.85, -12.07, 1.82)
	pt3dadd(-8.81, 299.76, -12.15, 1.82)
	pt3dadd(-8.81, 299.94, -12.15, 2.55)
	pt3dadd(-8.81, 300.49, -12.15, 2.55)
	pt3dadd(-8.81, 301.58, -12.15, 2.55)
	pt3dadd(-8.81, 302.86, -12.15, 2.55)
	pt3dadd(-8.63, 304.68, -12.15, 2.55)
	pt3dadd(-8.63, 305.77, -12.15, 2.55)
  }
  apic[6] {pt3dclear()
	pt3dadd(-8.63, 305.77, -12.15, 1.82)
	pt3dadd(-8.45, 306.69, -12.23, 1.82)
	pt3dadd(-8.63, 307.41, -12.23, 1.82)
	pt3dadd(-8.81, 308.14, -12.23, 1.82)
	pt3dadd(-9.18, 308.87, -12.23, 1.82)
	pt3dadd(-9.18, 309.78, -12.3, 1.82)
	pt3dadd(-9.36, 310.88, -12.3, 1.82)
	pt3dadd(-9.54, 311.42, -12.3, 1.82)
	pt3dadd(-9.91, 312.15, -12.3, 1.82)
	pt3dadd(-10.09, 312.7, -12.3, 1.82)
  }
  apic[7] {pt3dclear()
	pt3dadd(-10.09, 312.7, -12.3, 1.09)
	pt3dadd(-10.26, 313.26, -12.3, 1.09)
	pt3dadd(-10.26, 313.44, -12.3, 1.09)
	pt3dadd(-10.26, 313.62, -11.85, 1.09)
	pt3dadd(-10.26, 313.8, -11.47, 1.09)
	pt3dadd(-10.08, 313.8, -11.01, 1.09)
	pt3dadd(-9.89, 313.99, -10.56, 1.09)
	pt3dadd(-9.89, 314.17, -10.48, 1.09)
	pt3dadd(-9.89, 314.17, -10.48, 1.09)
	pt3dadd(-9.89, 314.53, -10.26, 1.09)
	pt3dadd(-9.89, 314.72, -10.03, 1.09)
	pt3dadd(-9.71, 314.9, -9.73, 1.09)
	pt3dadd(-9.71, 315.44, -9.57, 1.09)
	pt3dadd(-9.71, 315.63, -9.2, 1.09)
	pt3dadd(-9.53, 315.81, -8.89, 1.09)
	pt3dadd(-9.53, 316.36, -8.59, 1.09)
	pt3dadd(-9.53, 316.54, -8.21, 1.09)
	pt3dadd(-9.71, 316.9, -7.83, 1.09)
	pt3dadd(-9.71, 317.08, -7.45, 1.09)
	pt3dadd(-9.89, 317.63, -7, 1.09)
	pt3dadd(-9.89, 317.81, -6.85, 1.09)
	pt3dadd(-9.89, 317.81, -6.47, 1.09)
	pt3dadd(-9.89, 318.18, -5.94, 1.09)
	pt3dadd(-10.08, 318.36, -5.56, 1.09)
	pt3dadd(-10.08, 318.36, -6.01, 1.09)
	pt3dadd(-10.08, 318.54, -6.32, 1.09)
	pt3dadd(-10.08, 318.54, -6.54, 1.09)
	pt3dadd(-10.08, 318.54, -6.62, 1.09)
	pt3dadd(-10.08, 318.54, -6.62, 1.09)
	pt3dadd(-10.08, 318.54, -6.7, 1.09)
	pt3dadd(-10.08, 318.54, -6.85, 1.09)
	pt3dadd(-10.08, 319.09, -7.23, 1.09)
	pt3dadd(-10.08, 319.09, -7.38, 1.09)
	pt3dadd(-10.08, 319.27, -7.53, 1.09)
	pt3dadd(-10.08, 319.27, -7.61, 1.09)
	pt3dadd(-10.08, 319.27, -7.76, 1.09)
	pt3dadd(-10.08, 319.45, -8.06, 1.09)
	pt3dadd(-10.08, 319.82, -8.29, 1.09)
	pt3dadd(-10.08, 320, -8.44, 1.09)
	pt3dadd(-10.26, 320.18, -8.59, 1.09)
	pt3dadd(-10.26, 320.18, -8.82, 1.09)
	pt3dadd(-10.26, 320.18, -8.89, 1.09)
	pt3dadd(-10.26, 320.55, -9.04, 1.09)
	pt3dadd(-10.44, 320.55, -9.27, 1.09)
	pt3dadd(-10.44, 320.91, -9.5, 1.09)
	pt3dadd(-10.44, 321.27, -9.73, 1.09)
	pt3dadd(-10.26, 321.46, -9.88, 1.09)
	pt3dadd(-10.26, 321.46, -10.18, 1.09)
	pt3dadd(-10.08, 321.64, -10.33, 1.09)
	pt3dadd(-10.08, 321.64, -10.56, 1.09)
	pt3dadd(-10.08, 322.19, -10.79, 1.09)
	pt3dadd(-10.26, 322.37, -11.09, 1.09)
	pt3dadd(-10.26, 322.37, -11.09, 1.09)
	pt3dadd(-10.26, 322.91, -11.24, 1.09)
	pt3dadd(-10.44, 323.1, -11.32, 1.09)
	pt3dadd(-10.62, 323.28, -11.39, 1.09)
	pt3dadd(-10.62, 323.83, -11.62, 1.09)
	pt3dadd(-10.8, 324.37, -11.77, 1.09)
	pt3dadd(-10.8, 324.74, -11.92, 1.09)
	pt3dadd(-10.99, 325.28, -12, 1.09)
	pt3dadd(-10.99, 325.47, -12.07, 1.09)
	pt3dadd(-10.99, 326.01, -12.23, 1.09)
	pt3dadd(-11.17, 326.74, -12.45, 1.09)
	pt3dadd(-10.99, 326.92, -12.6, 1.09)
	pt3dadd(-10.62, 327.29, -12.83, 1.09)
	pt3dadd(-10.99, 327.83, -12.91, 1.64)
	pt3dadd(-10.99, 328.02, -13.36, 1.64)
	pt3dadd(-10.99, 328.38, -13.59, 1.64)
	pt3dadd(-10.99, 328.93, -13.82, 1.64)
	pt3dadd(-10.99, 329.66, -13.97, 1.64)
	pt3dadd(-10.99, 330.2, -14.2, 1.64)
	pt3dadd(-10.99, 330.57, -14.42, 1.64)
	pt3dadd(-10.99, 330.75, -14.57, 1.64)
	pt3dadd(-10.99, 331.11, -14.73, 1.64)
	pt3dadd(-10.99, 331.48, -14.88, 1.64)
	pt3dadd(-11.17, 331.84, -15.18, 1.64)
	pt3dadd(-11.17, 332.02, -15.41, 1.64)
	pt3dadd(-11.35, 332.21, -15.63, 1.64)
	pt3dadd(-11.35, 332.21, -16.09, 1.64)
	pt3dadd(-11.35, 332.21, -16.39, 1.64)
	pt3dadd(-11.35, 332.39, -16.7, 1.64)
	pt3dadd(-11.35, 332.94, -16.77, 1.64)
	pt3dadd(-11.35, 333.3, -16.77, 1.64)
	pt3dadd(-11.17, 333.66, -17, 1.64)
	pt3dadd(-11.17, 333.85, -17.53, 1.64)
	pt3dadd(-11.17, 334.58, -17.76, 1.64)
	pt3dadd(-11.17, 335.12, -17.98, 1.64)
	pt3dadd(-11.17, 335.85, -18.36, 1.64)
	pt3dadd(-11.17, 337.31, -18.51, 1.28)
	pt3dadd(-11.35, 337.86, -18.74, 1.28)
	pt3dadd(-11.53, 338.77, -18.89, 1.28)
	pt3dadd(-11.9, 339.31, -19.04, 1.28)
	pt3dadd(-12.08, 339.86, -19.12, 1.28)
	pt3dadd(-12.08, 340.59, -19.35, 1.28)
	pt3dadd(-12.08, 341.5, -19.65, 1.28)
	pt3dadd(-12.08, 342.23, -19.8, 1.28)
	pt3dadd(-12.26, 343.14, -19.88, 1.28)
	pt3dadd(-12.26, 344.41, -19.95, 1.28)
	pt3dadd(-12.26, 344.6, -20.1, 1.28)
	pt3dadd(-12.63, 345.69, -20.41, 1.28)
	pt3dadd(-12.81, 346.42, -20.56, 1.28)
	pt3dadd(-12.99, 347.15, -20.71, 1.28)
	pt3dadd(-12.81, 347.88, -20.86, 1.28)
	pt3dadd(-12.99, 348.42, -21.01, 1.28)
	pt3dadd(-13.91, 349.33, -21.09, 1.28)
	pt3dadd(-14.27, 349.88, -21.24, 1.28)
	pt3dadd(-14.45, 350.43, -21.39, 1.28)
	pt3dadd(-14.45, 351.16, -21.47, 1.82)
	pt3dadd(-14.45, 351.52, -21.54, 1.82)
	pt3dadd(-14.45, 352.25, -21.62, 1.82)
	pt3dadd(-14.45, 352.61, -21.62, 2.19)
	pt3dadd(-14.45, 352.8, -21.62, 2.19)
	pt3dadd(-14.27, 354.07, -21.69, 2.19)
	pt3dadd(-14.82, 354.44, -21.92, 2.19)
	pt3dadd(-15, 355.16, -22.15, 2.19)
	pt3dadd(-15, 356.08, -22.38, 2.19)
	pt3dadd(-15.37, 357.17, -22.45, 2.19)
	pt3dadd(-15.73, 358.08, -22.45, 2.19)
	pt3dadd(-15.91, 358.99, -22.53, 2.19)
	pt3dadd(-16.1, 359.54, -22.53, 2.19)
	pt3dadd(-16.64, 360.99, -22.53, 1.64)
	pt3dadd(-17.19, 361.91, -22.6, 1.64)
	pt3dadd(-17.37, 362.82, -22.6, 1.28)
	pt3dadd(-17.74, 363.73, -22.76, 1.28)
	pt3dadd(-17.74, 364.46, -22.76, 1.28)
	pt3dadd(-17.56, 365.37, -22.76, 1.28)
	pt3dadd(-17.56, 366.64, -22.76, 0.91)
	pt3dadd(-17.74, 367.19, -22.76, 0.91)
	pt3dadd(-18.1, 368.1, -23.06, 0.91)
  }
}
proc shape3d_12() {
  apic[7] {	pt3dadd(-18.1, 369.01, -23.06, 0.91)
	pt3dadd(-18.1, 369.74, -23.13, 0.91)
	pt3dadd(-18.29, 370.65, -23.13, 0.91)
	pt3dadd(-18.65, 371.74, -23.13, 0.91)
	pt3dadd(-18.83, 372.66, -23.13, 0.91)
	pt3dadd(-19.02, 373.38, -23.13, 0.91)
	pt3dadd(-19.38, 374.3, -23.13, 0.91)
	pt3dadd(-19.38, 375.21, -23.13, 0.91)
	pt3dadd(-19.38, 375.93, -23.13, 0.91)
	pt3dadd(-19.38, 376.48, -23.13, 0.91)
	pt3dadd(-19.56, 377.21, -23.21, 0.91)
	pt3dadd(-19.75, 377.76, -23.29, 0.91)
	pt3dadd(-20.11, 378.49, -23.36, 0.91)
	pt3dadd(-20.29, 379.03, -23.51, 0.91)
	pt3dadd(-20.29, 380.31, -23.59, 0.91)
	pt3dadd(-20.29, 380.67, -23.66, 0.91)
	pt3dadd(-20.29, 381.22, -23.66, 0.91)
	pt3dadd(-20.29, 381.4, -23.66, 0.91)
	pt3dadd(-20.29, 382.31, -23.66, 0.91)
	pt3dadd(-20.66, 383.04, -23.74, 0.91)
	pt3dadd(-21.02, 384.5, -23.74, 0.91)
	pt3dadd(-21.57, 385.23, -23.82, 0.91)
	pt3dadd(-21.93, 385.96, -23.89, 0.91)
	pt3dadd(-22.3, 386.87, -23.97, 0.91)
	pt3dadd(-22.66, 388.51, -24.04, 0.91)
	pt3dadd(-22.85, 389.78, -24.19, 0.91)
	pt3dadd(-23.03, 390.88, -24.27, 0.91)
	pt3dadd(-23.21, 391.79, -24.35, 0.91)
	pt3dadd(-22.85, 392.33, -24.42, 0.91)
	pt3dadd(-22.3, 392.7, -24.5, 0.91)
	pt3dadd(-21.57, 393.24, -24.57, 0.91)
	pt3dadd(-21.02, 393.43, -24.65, 0.91)
	pt3dadd(-20.29, 393.79, -24.72, 0.91)
	pt3dadd(-19.56, 393.97, -24.88, 0.91)
	pt3dadd(-18.65, 394.15, -25.03, 0.91)
	pt3dadd(-17.19, 394.88, -25.1, 0.91)
	pt3dadd(-16.64, 395.43, -25.1, 0.91)
	pt3dadd(-16.64, 396.34, -25.1, 0.91)
	pt3dadd(-17.19, 397.07, -25.18, 0.91)
	pt3dadd(-18.1, 397.98, -25.18, 0.91)
	pt3dadd(-17.74, 398.71, -25.18, 0.91)
	pt3dadd(-16.46, 400.17, -25.18, 0.91)
	pt3dadd(-15.73, 400.71, -25.18, 0.91)
	pt3dadd(-15, 401.44, -25.18, 0.91)
	pt3dadd(-14.64, 401.99, -25.18, 0.91)
  }
  apic[8] {pt3dclear()
	pt3dadd(-10.09, 312.7, -12.3, 1.46)
	pt3dadd(-10.64, 312.88, -12.3, 1.46)
	pt3dadd(-11.55, 313.61, -12.3, 1.46)
	pt3dadd(-13.01, 314.34, -12.3, 1.09)
	pt3dadd(-14.47, 314.7, -12.3, 1.09)
	pt3dadd(-15.38, 315.07, -12.3, 1.09)
	pt3dadd(-16.84, 315.61, -12.23, 1.09)
	pt3dadd(-17.39, 315.61, -12.07, 1.09)
	pt3dadd(-18.3, 315.98, -11.85, 1.09)
	pt3dadd(-19.03, 316.16, -11.7, 1.09)
	pt3dadd(-19.76, 316.52, -11.62, 1.09)
	pt3dadd(-20.67, 317.07, -11.47, 1.09)
	pt3dadd(-21.4, 317.44, -11.32, 1.09)
	pt3dadd(-22.13, 318.35, -11.24, 1.09)
	pt3dadd(-23.04, 318.89, -11.09, 1.09)
	pt3dadd(-23.77, 319.44, -10.94, 1.09)
	pt3dadd(-24.5, 319.99, -10.86, 1.09)
	pt3dadd(-26.33, 320.53, -10.79, 1.09)
	pt3dadd(-27.06, 320.71, -10.71, 1.09)
	pt3dadd(-29.79, 321.44, -10.71, 1.09)
	pt3dadd(-30.89, 321.44, -10.71, 1.09)
	pt3dadd(-31.98, 321.44, -10.71, 1.09)
	pt3dadd(-34.17, 321.63, -10.71, 1.09)
	pt3dadd(-36.18, 321.81, -10.79, 1.09)
	pt3dadd(-36.91, 321.99, -10.86, 1.09)
	pt3dadd(-38.73, 321.99, -11.09, 1.09)
	pt3dadd(-39.65, 322.35, -11.32, 1.09)
	pt3dadd(-40.92, 322.9, -11.54, 1.09)
	pt3dadd(-41.65, 323.08, -11.62, 1.09)
	pt3dadd(-43.11, 323.63, -11.7, 1.09)
	pt3dadd(-43.84, 323.81, -11.77, 1.09)
	pt3dadd(-46.58, 324.36, -11.92, 1.09)
	pt3dadd(-48.77, 324.36, -11.92, 1.09)
	pt3dadd(-50.96, 323.99, -12, 1.09)
	pt3dadd(-53.88, 323.45, -12.07, 1.09)
	pt3dadd(-54.97, 322.9, -12.15, 1.09)
	pt3dadd(-56.43, 322.35, -12.23, 1.09)
	pt3dadd(-56.98, 321.99, -12.3, 1.09)
	pt3dadd(-57.89, 321.44, -12.38, 1.09)
	pt3dadd(-58.26, 320.9, -12.45, 1.09)
	pt3dadd(-60.08, 319.62, -12.76, 1.09)
	pt3dadd(-60.99, 318.89, -12.83, 1.09)
	pt3dadd(-61.91, 318.53, -12.98, 1.09)
	pt3dadd(-63, 317.8, -12.98, 1.09)
	pt3dadd(-65.19, 317.25, -13.06, 1.09)
	pt3dadd(-67.38, 317.25, -13.14, 1.09)
	pt3dadd(-69.75, 317.44, -13.14, 1.09)
	pt3dadd(-71.39, 317.98, -13.21, 1.09)
	pt3dadd(-72.85, 319.26, -13.29, 1.09)
	pt3dadd(-74.31, 320.53, -13.44, 1.09)
	pt3dadd(-75.95, 321.81, -13.44, 1.09)
	pt3dadd(-77.6, 323.08, -13.44, 1.09)
	pt3dadd(-78.69, 324.36, -13.51, 1.09)
	pt3dadd(-80.88, 325.63, -13.51, 1.09)
	pt3dadd(-83.98, 326.91, -13.44, 1.09)
	pt3dadd(-85.62, 327.46, -13.51, 1.09)
	pt3dadd(-86.17, 329.1, -13.44, 1.09)
	pt3dadd(-88.18, 329.46, -13.44, 1.09)
	pt3dadd(-88.36, 330.37, -13.51, 1.09)
	pt3dadd(-90.55, 334.2, -13.67, 1.09)
	pt3dadd(-90.92, 335.29, -13.67, 1.09)
	pt3dadd(-91.65, 336.38, -13.67, 1.09)
	pt3dadd(-92.19, 337.48, -13.67, 1.09)
	pt3dadd(-92.74, 338.57, -13.67, 1.09)
	pt3dadd(-93.84, 340.03, -13.67, 1.09)
	pt3dadd(-94.93, 341.67, -13.67, 1.09)
	pt3dadd(-96.21, 342.94, -13.67, 1.09)
	pt3dadd(-97.67, 344.04, -13.67, 1.09)
	pt3dadd(-100.04, 344.95, -13.67, 1.09)
	pt3dadd(-102.59, 346.04, -13.67, 1.09)
	pt3dadd(-105.15, 346.77, -13.67, 1.09)
	pt3dadd(-105.51, 346.77, -13.67, 1.09)
	pt3dadd(-105.51, 346.95, -13.82, 1.09)
	pt3dadd(-105.69, 347.5, -13.97, 1.09)
	pt3dadd(-106.61, 348.41, -14.35, 1.09)
	pt3dadd(-107.52, 349.14, -14.42, 1.09)
	pt3dadd(-108.43, 349.5, -14.57, 1.09)
	pt3dadd(-109.34, 350.05, -14.73, 1.09)
	pt3dadd(-111.17, 350.6, -14.88, 1.09)
	pt3dadd(-114.45, 350.96, -15.03, 1.09)
	pt3dadd(-115.36, 350.96, -15.26, 1.09)
	pt3dadd(-117.19, 350.78, -15.33, 1.09)
	pt3dadd(-118.65, 350.78, -15.33, 1.09)
	pt3dadd(-121.02, 350.23, -15.48, 1.09)
	pt3dadd(-121.93, 349.87, -15.48, 1.09)
	pt3dadd(-123.21, 349.32, -15.48, 1.09)
	pt3dadd(-124.49, 348.96, -15.48, 1.09)
	pt3dadd(-126.13, 348.77, -15.48, 1.09)
	pt3dadd(-127.41, 348.77, -15.48, 1.09)
	pt3dadd(-128.87, 348.96, -15.48, 1.09)
  }
  apic[9] {pt3dclear()
	pt3dadd(-8.63, 305.77, -12.15, 0.91)
	pt3dadd(-9.54, 306.69, -12.6, 0.91)
	pt3dadd(-9.54, 306.69, -12.6, 0.91)
	pt3dadd(-10.09, 306.69, -12.68, 0.91)
	pt3dadd(-10.82, 306.32, -12.76, 0.91)
	pt3dadd(-11.55, 306.14, -12.76, 0.91)
	pt3dadd(-12.46, 305.77, -12.76, 0.91)
	pt3dadd(-13.37, 305.59, -12.76, 0.91)
	pt3dadd(-14.65, 305.05, -12.83, 0.91)
	pt3dadd(-15.38, 304.32, -12.83, 0.91)
	pt3dadd(-16.66, 303.22, -12.91, 0.91)
	pt3dadd(-17.2, 302.31, -12.91, 0.91)
	pt3dadd(-17.75, 301.22, -12.98, 0.91)
	pt3dadd(-18.12, 300.49, -12.98, 0.91)
	pt3dadd(-18.66, 299.76, -12.98, 0.91)
	pt3dadd(-19.76, 298.67, -13.14, 0.91)
	pt3dadd(-20.49, 298.3, -13.14, 0.91)
	pt3dadd(-21.4, 298.12, -13.29, 0.91)
	pt3dadd(-22.68, 298.12, -13.44, 0.91)
	pt3dadd(-23.41, 297.94, -13.51, 0.91)
	pt3dadd(-24.5, 297.76, -13.67, 0.91)
	pt3dadd(-25.42, 296.85, -13.82, 0.91)
	pt3dadd(-25.96, 296.3, -13.89, 0.91)
	pt3dadd(-26.69, 295.39, -14.04, 0.91)
	pt3dadd(-26.87, 294.84, -14.2, 0.91)
	pt3dadd(-27.06, 293.38, -14.35, 0.91)
	pt3dadd(-27.24, 292.29, -14.5, 0.91)
	pt3dadd(-27.79, 291.2, -14.57, 0.91)
	pt3dadd(-28.33, 290.29, -14.73, 0.91)
	pt3dadd(-29.25, 289.56, -14.8, 0.91)
	pt3dadd(-30.89, 288.83, -14.88, 0.91)
	pt3dadd(-32.17, 288.28, -14.95, 0.91)
	pt3dadd(-32.9, 288.1, -14.95, 0.91)
	pt3dadd(-34.54, 287.74, -15.03, 0.91)
	pt3dadd(-35.82, 287.74, -15.03, 0.91)
	pt3dadd(-36.54, 287.92, -15.1, 0.91)
  }
  apic[10] {pt3dclear()
	pt3dadd(-2.11, 275.39, -8.29, 3.1)
	pt3dadd(-2.11, 276.31, -7.76, 3.1)
	pt3dadd(-2.11, 276.85, -7.76, 3.1)
	pt3dadd(-2.29, 277.4, -7.61, 3.1)
	pt3dadd(-2.29, 278.13, -7.23, 3.1)
	pt3dadd(-2.48, 278.86, -6.92, 3.1)
	pt3dadd(-2.66, 279.4, -6.7, 3.1)
	pt3dadd(-2.66, 280.31, -6.47, 3.1)
	pt3dadd(-2.66, 280.86, -6.32, 3.1)
	pt3dadd(-2.66, 281.59, -6.17, 3.1)
	pt3dadd(-2.66, 282.14, -6.01, 3.1)
	pt3dadd(-2.66, 283.23, -5.86, 3.1)
	pt3dadd(-2.84, 284.69, -5.79, 3.1)
	pt3dadd(-3.02, 287.06, -5.79, 3.1)
	pt3dadd(-1.97, 287.89, -5.79, 3.1)
	pt3dadd(-2.33, 288.62, -5.71, 3.1)
	pt3dadd(-2.33, 289.16, -5.56, 3.1)
	pt3dadd(-2.51, 289.71, -5.33, 3.1)
	pt3dadd(-2.51, 290.44, -5.18, 3.1)
	pt3dadd(-2.7, 291.17, -4.95, 3.1)
	pt3dadd(-2.7, 291.35, -4.73, 3.1)
	pt3dadd(-2.51, 291.9, -4.42, 3.1)
	pt3dadd(-2.51, 292.26, -4.27, 3.1)
	pt3dadd(-2.33, 292.99, -4.05, 3.1)
	pt3dadd(-2.33, 293.72, -3.89, 3.1)
	pt3dadd(-2.15, 294.26, -3.74, 3.1)
	pt3dadd(-1.78, 295.17, -3.59, 3.1)
	pt3dadd(-1.78, 295.54, -3.51, 3.1)
	pt3dadd(-1.78, 295.9, -3.21, 3.1)
  }
}
proc shape3d_13() {
  apic[10] {	pt3dadd(-1.6, 296.45, -2.76, 3.1)
	pt3dadd(-1.6, 297, -2.61, 3.1)
	pt3dadd(-1.6, 297.73, -2.23, 3.1)
	pt3dadd(-1.42, 298.27, -2.08, 3.1)
	pt3dadd(-1.42, 298.82, -2, 3.1)
	pt3dadd(-1.42, 299.55, -2, 3.1)
	pt3dadd(-1.42, 299.73, -2, 3.1)
	pt3dadd(-1.42, 300.28, -2.08, 3.1)
	pt3dadd(-1.42, 300.46, -2.53, 3.1)
	pt3dadd(-1.42, 300.64, -2.83, 3.1)
	pt3dadd(-1.42, 300.82, -3.14, 3.1)
	pt3dadd(-1.42, 301.19, -3.29, 3.1)
	pt3dadd(-1.24, 301.73, -3.51, 3.1)
	pt3dadd(-1.24, 302.1, -3.67, 3.1)
	pt3dadd(-1.24, 302.28, -3.89, 3.1)
	pt3dadd(-1.05, 302.83, -4.12, 3.1)
	pt3dadd(-1.05, 303.56, -4.65, 3.1)
	pt3dadd(-0.87, 304.1, -4.88, 3.1)
	pt3dadd(-0.87, 304.83, -5.18, 3.1)
	pt3dadd(-0.87, 305.74, -5.41, 3.1)
	pt3dadd(-0.69, 306.47, -5.71, 3.1)
	pt3dadd(-0.69, 307.02, -5.71, 3.1)
	pt3dadd(-0.69, 307.56, -5.86, 3.1)
	pt3dadd(-0.51, 307.93, -6.01, 3.1)
	pt3dadd(-0.51, 308.29, -6.24, 3.1)
	pt3dadd(-0.32, 309.2, -6.32, 3.1)
	pt3dadd(-0.32, 309.93, -6.47, 3.1)
	pt3dadd(-0.32, 311.21, -6.62, 3.1)
	pt3dadd(-0.32, 311.76, -6.7, 3.1)
	pt3dadd(-0.32, 311.76, -6.7, 3.1)
	pt3dadd(-0.32, 311.76, -6.7, 3.1)
	pt3dadd(-0.51, 312.3, -6.85, 3.1)
	pt3dadd(-0.87, 313.21, -7.08, 3.1)
	pt3dadd(-0.87, 314.12, -7.3, 3.1)
	pt3dadd(-0.87, 314.67, -7.45, 3.1)
	pt3dadd(-1.05, 315.58, -7.53, 3.1)
	pt3dadd(-1.42, 317.95, -7.76, 3.1)
	pt3dadd(-1.6, 318.68, -7.76, 3.1)
	pt3dadd(-1.97, 319.59, -7.83, 3.1)
	pt3dadd(-2.15, 320.32, -7.98, 3.1)
	pt3dadd(-2.33, 321.23, -8.14, 3.1)
	pt3dadd(-2.33, 321.96, -8.21, 3.1)
	pt3dadd(-2.33, 322.5, -8.29, 3.1)
	pt3dadd(-2.33, 323.23, -8.36, 3.1)
	pt3dadd(-2.51, 323.78, -8.44, 3.1)
	pt3dadd(-2.7, 324.51, -8.44, 3.1)
	pt3dadd(-2.88, 325.24, -8.59, 3.1)
	pt3dadd(-2.88, 325.97, -8.59, 3.1)
	pt3dadd(-2.88, 326.7, -8.74, 3.1)
	pt3dadd(-3.06, 327.24, -8.82, 3.1)
	pt3dadd(-3.06, 327.97, -8.82, 3.1)
	pt3dadd(-3.24, 328.52, -8.82, 3.1)
	pt3dadd(-3.24, 329.25, -8.89, 3.1)
	pt3dadd(-3.24, 329.98, -8.97, 3.1)
	pt3dadd(-3.24, 330.52, -9.04, 3.1)
	pt3dadd(-3.43, 331.43, -9.12, 3.1)
	pt3dadd(-3.61, 332.16, -9.27, 3.1)
	pt3dadd(-3.79, 333.25, -9.42, 3.1)
	pt3dadd(-4.16, 334.35, -9.65, 3.1)
	pt3dadd(-4.34, 335.08, -9.65, 3.1)
	pt3dadd(-4.52, 335.62, -9.88, 3.1)
	pt3dadd(-4.89, 336.72, -10.03, 3.1)
	pt3dadd(-5.07, 337.26, -10.11, 3.1)
	pt3dadd(-5.07, 337.81, -10.26, 3.1)
	pt3dadd(-5.07, 338.36, -10.41, 3.1)
	pt3dadd(-5.25, 339.09, -10.48, 3.1)
	pt3dadd(-5.43, 339.63, -10.48, 3.1)
	pt3dadd(-5.8, 340.54, -10.64, 3.1)
	pt3dadd(-5.8, 340.54, -10.64, 2.92)
	pt3dadd(-5.8, 341.09, -10.71, 2.92)
	pt3dadd(-5.8, 341.82, -10.79, 2.92)
	pt3dadd(-5.98, 342.55, -10.86, 2.92)
	pt3dadd(-6.16, 343.28, -11.01, 2.92)
	pt3dadd(-6.53, 344, -11.09, 2.92)
	pt3dadd(-6.71, 344.73, -11.17, 2.92)
	pt3dadd(-6.89, 345.64, -11.17, 2.92)
	pt3dadd(-6.89, 346.37, -11.32, 2.92)
	pt3dadd(-7.08, 346.92, -11.39, 2.92)
	pt3dadd(-7.08, 347.65, -11.7, 2.92)
	pt3dadd(-7.26, 348.01, -11.92, 2.92)
	pt3dadd(-7.26, 348.38, -12.15, 2.92)
	pt3dadd(-7.26, 348.92, -12.45, 2.92)
	pt3dadd(-7.26, 350.02, -12.68, 2.92)
	pt3dadd(-7.26, 350.38, -12.83, 2.92)
	pt3dadd(-7.26, 351.29, -12.98, 2.92)
	pt3dadd(-7.44, 351.84, -12.98, 2.92)
	pt3dadd(-7.44, 352.75, -13.06, 2.92)
	pt3dadd(-7.99, 354.03, -13.14, 2.92)
	pt3dadd(-8.17, 354.94, -13.29, 2.92)
	pt3dadd(-8.17, 355.48, -13.29, 2.92)
	pt3dadd(-8.17, 356.03, -13.36, 2.92)
	pt3dadd(-8.17, 356.39, -13.36, 2.92)
  }
  apic[11] {pt3dclear()
	pt3dadd(-8.17, 356.39, -13.36, 2.01)
	pt3dadd(-7.68, 356.68, -14.2, 2.01)
	pt3dadd(-7.68, 356.86, -14.42, 2.01)
	pt3dadd(-7.5, 357.04, -14.57, 2.01)
	pt3dadd(-7.13, 357.04, -14.65, 2.01)
	pt3dadd(-6.95, 357.04, -14.8, 2.01)
	pt3dadd(-6.77, 357.04, -15.03, 2.01)
	pt3dadd(-6.77, 357.04, -15.1, 1.64)
	pt3dadd(-6.4, 357.41, -15.63, 1.64)
	pt3dadd(-6.22, 357.96, -15.94, 1.64)
	pt3dadd(-5.86, 358.14, -16.09, 1.64)
	pt3dadd(-5.49, 358.68, -16.47, 1.64)
	pt3dadd(-5.31, 359.41, -16.77, 1.64)
	pt3dadd(-4.94, 359.78, -17, 1.64)
	pt3dadd(-4.76, 360.32, -17.07, 1.64)
	pt3dadd(-4.4, 361.24, -17.3, 1.64)
	pt3dadd(-4.58, 362.51, -17.45, 1.09)
	pt3dadd(-4.76, 363.24, -17.68, 1.09)
	pt3dadd(-4.76, 363.79, -17.91, 1.09)
	pt3dadd(-4.76, 364.51, -18.06, 1.09)
	pt3dadd(-4.58, 367.43, -18.13, 1.09)
	pt3dadd(-4.58, 367.61, -18.13, 1.09)
	pt3dadd(-4.58, 368.34, -18.21, 1.09)
	pt3dadd(-4.58, 368.89, -18.36, 1.09)
	pt3dadd(-4.94, 369.98, -18.51, 1.09)
	pt3dadd(-5.49, 370.53, -18.82, 1.09)
	pt3dadd(-5.67, 370.89, -18.89, 1.28)
	pt3dadd(-6.04, 371.98, -19.04, 1.28)
	pt3dadd(-6.22, 372.71, -19.27, 1.28)
	pt3dadd(-6.4, 373.62, -19.42, 1.28)
	pt3dadd(-6.4, 374.35, -19.42, 1.28)
	pt3dadd(-6.59, 374.9, -19.57, 1.28)
	pt3dadd(-6.59, 375.81, -19.57, 1.64)
	pt3dadd(-6.59, 375.99, -19.88, 1.64)
	pt3dadd(-6.59, 376.54, -20.1, 1.64)
	pt3dadd(-6.59, 377.09, -20.1, 1.64)
	pt3dadd(-6.22, 379.45, -20.26, 2.55)
	pt3dadd(-6.22, 379.45, -20.63, 2.55)
	pt3dadd(-6.22, 379.82, -20.94, 2.55)
	pt3dadd(-6.22, 380.37, -21.01, 2.55)
	pt3dadd(-6.22, 380.91, -21.16, 2.55)
	pt3dadd(-6.22, 381.64, -21.32, 2.55)
	pt3dadd(-6.22, 382.19, -21.32, 2.55)
	pt3dadd(-6.04, 383.28, -21.39, 2.55)
	pt3dadd(-5.86, 384.01, -21.39, 2.55)
	pt3dadd(-5.86, 384.92, -21.39, 2.55)
	pt3dadd(-5.86, 385.83, -21.39, 2.55)
  }
  apic[12] {pt3dclear()
	pt3dadd(-5.86, 385.83, -21.39, 1.82)
	pt3dadd(-4.82, 386.02, -21.92, 1.82)
	pt3dadd(-4.28, 386.57, -21.92, 1.82)
	pt3dadd(-3.18, 387.3, -21.92, 1.82)
	pt3dadd(-1.72, 388.39, -21.92, 1.82)
	pt3dadd(-1.18, 388.76, -21.92, 1.82)
	pt3dadd(-1.18, 389.3, -22.07, 1.82)
	pt3dadd(-0.99, 390.22, -22.15, 1.28)
	pt3dadd(-0.63, 390.22, -22.15, 1.28)
	pt3dadd(-0.26, 390.94, -22.3, 1.28)
	pt3dadd(0.1, 391.31, -22.45, 1.28)
	pt3dadd(0.65, 392.4, -22.76, 1.28)
	pt3dadd(1.01, 392.58, -22.91, 1.28)
	pt3dadd(1.93, 393.31, -22.98, 1.28)
	pt3dadd(2.66, 393.68, -23.13, 1.28)
	pt3dadd(3.57, 394.59, -23.29, 1.28)
	pt3dadd(4.3, 395.5, -23.36, 1.28)
	pt3dadd(5.03, 396.77, -23.51, 1.28)
	pt3dadd(5.76, 397.87, -23.59, 1.28)
	pt3dadd(6.31, 398.78, -23.51, 1.28)
	pt3dadd(6.67, 399.33, -23.29, 1.28)
	pt3dadd(7.03, 399.87, -23.06, 1.28)
	pt3dadd(7.4, 400.42, -22.91, 1.28)
	pt3dadd(7.76, 400.96, -22.76, 1.28)
	pt3dadd(8.13, 401.51, -22.6, 1.28)
	pt3dadd(8.49, 401.88, -22.45, 1.28)
	pt3dadd(8.68, 402.42, -22.38, 1.28)
	pt3dadd(8.68, 403.15, -22.07, 1.28)
	pt3dadd(8.86, 403.7, -22, 1.28)
	pt3dadd(9.22, 404.43, -21.85, 1.28)
	pt3dadd(9.77, 405.16, -21.69, 1.28)
	pt3dadd(10.14, 405.88, -21.47, 1.28)
	pt3dadd(10.87, 406.8, -21.24, 1.28)
	pt3dadd(11.23, 407.52, -21.01, 1.28)
	pt3dadd(11.6, 408.07, -20.86, 1.28)
	pt3dadd(11.96, 408.44, -20.79, 1.28)
	pt3dadd(12.51, 409.16, -20.71, 1.28)
	pt3dadd(13.06, 410.07, -20.56, 1.28)
	pt3dadd(13.24, 410.62, -20.48, 1.28)
	pt3dadd(13.42, 411.17, -20.48, 1.28)
	pt3dadd(13.79, 411.71, -20.41, 1.28)
	pt3dadd(13.79, 412.63, -20.26, 1.28)
	pt3dadd(13.79, 412.99, -20.1, 1.28)
	pt3dadd(13.79, 413.54, -19.88, 1.28)
	pt3dadd(13.6, 414.27, -19.57, 1.28)
	pt3dadd(13.6, 414.81, -19.27, 1.28)
	pt3dadd(13.6, 415.54, -18.97, 1.28)
	pt3dadd(13.79, 415.91, -18.74, 1.28)
	pt3dadd(13.79, 415.91, -18.51, 1.28)
	pt3dadd(13.79, 416.45, -18.36, 1.28)
	pt3dadd(13.97, 416.63, -18.06, 1.28)
	pt3dadd(13.97, 416.82, -17.91, 1.28)
	pt3dadd(14.15, 417.18, -17.6, 1.28)
	pt3dadd(14.33, 417.73, -17.3, 1.28)
	pt3dadd(14.7, 418.09, -17.15, 1.28)
	pt3dadd(15.06, 418.64, -16.7, 1.28)
	pt3dadd(15.43, 418.82, -16.62, 1.28)
	pt3dadd(15.79, 419.37, -16.32, 1.28)
	pt3dadd(16.34, 420.1, -16.01, 1.28)
	pt3dadd(16.89, 420.82, -15.86, 1.28)
	pt3dadd(17.62, 422.1, -15.71, 1.28)
  }
}
proc shape3d_14() {
  apic[12] {	pt3dadd(18.16, 423.01, -15.63, 1.28)
	pt3dadd(18.53, 423.92, -15.48, 1.09)
	pt3dadd(19.26, 424.83, -15.1, 1.09)
	pt3dadd(19.62, 425.38, -14.95, 1.09)
	pt3dadd(19.99, 426.11, -14.73, 1.09)
	pt3dadd(20.35, 426.65, -14.57, 1.09)
	pt3dadd(20.9, 427.57, -14.27, 1.09)
	pt3dadd(21.08, 428.11, -14.12, 1.09)
	pt3dadd(21.27, 428.66, -14.12, 1.09)
	pt3dadd(21.45, 429.02, -13.97, 1.09)
	pt3dadd(21.63, 429.39, -13.82, 1.09)
	pt3dadd(21.63, 429.39, -13.74, 1.09)
	pt3dadd(21.63, 429.57, -13.59, 1.09)
	pt3dadd(21.81, 429.75, -13.44, 1.09)
	pt3dadd(22.18, 430.85, -13.44, 1.09)
	pt3dadd(22.18, 430.85, -13.29, 1.09)
	pt3dadd(22.18, 431.39, -13.06, 1.09)
	pt3dadd(22.18, 431.94, -12.98, 1.09)
	pt3dadd(22.54, 432.85, -12.91, 1.09)
	pt3dadd(23.09, 433.4, -12.83, 1.09)
	pt3dadd(23.46, 434.13, -12.83, 1.09)
	pt3dadd(23.82, 434.67, -12.76, 1.09)
	pt3dadd(24.19, 435.4, -12.68, 1.09)
	pt3dadd(24.73, 435.95, -12.6, 1.09)
	pt3dadd(25.46, 436.68, -12.53, 1.09)
	pt3dadd(25.83, 437.04, -12.45, 1.09)
	pt3dadd(26.19, 437.59, -12.38, 1.09)
	pt3dadd(26.19, 438.68, -12.3, 1.09)
	pt3dadd(26.56, 440.32, -12.23, 1.09)
	pt3dadd(26.56, 441.6, -12.15, 1.09)
	pt3dadd(26.56, 442.51, -12, 1.09)
	pt3dadd(26.37, 443.6, -11.92, 1.09)
	pt3dadd(26.19, 444.87, -11.77, 1.09)
	pt3dadd(26.37, 447.43, -11.7, 1.09)
	pt3dadd(26.56, 447.97, -11.62, 1.09)
	pt3dadd(26.56, 448.88, -11.24, 1.09)
	pt3dadd(26.37, 449.43, -11.09, 1.09)
	pt3dadd(26.19, 449.98, -10.94, 1.09)
	pt3dadd(26.37, 450.52, -10.79, 1.09)
	pt3dadd(26.37, 451.07, -10.71, 1.09)
	pt3dadd(26.19, 451.8, -10.64, 1.09)
	pt3dadd(26.19, 452.53, -10.48, 1.09)
	pt3dadd(26.01, 453.44, -10.26, 1.09)
	pt3dadd(26.01, 453.98, -10.11, 1.09)
	pt3dadd(26.01, 454.17, -9.95, 1.09)
	pt3dadd(25.83, 454.9, -9.73, 1.09)
	pt3dadd(25.83, 455.26, -9.42, 1.09)
	pt3dadd(25.83, 455.81, -9.35, 1.09)
	pt3dadd(25.83, 456.17, -8.97, 1.09)
	pt3dadd(25.65, 456.54, -8.89, 1.09)
	pt3dadd(25.65, 457.45, -8.89, 1.09)
	pt3dadd(25.65, 457.99, -8.89, 1.09)
	pt3dadd(25.28, 458.54, -8.89, 1.09)
	pt3dadd(25.1, 459.09, -8.74, 1.09)
	pt3dadd(24.92, 459.82, -8.51, 1.09)
	pt3dadd(24.55, 460.54, -8.21, 1.09)
	pt3dadd(24, 461.82, -7.98, 1.09)
	pt3dadd(23.46, 464.01, -7.83, 1.09)
	pt3dadd(23.27, 464.55, -7.83, 1.09)
	pt3dadd(23.27, 465.1, -7.68, 1.09)
	pt3dadd(23.09, 466.37, -7.53, 1.09)
	pt3dadd(22.73, 467.1, -7.38, 1.09)
	pt3dadd(22.54, 467.83, -7.23, 1.09)
	pt3dadd(22, 468.93, -7.15, 1.09)
	pt3dadd(22, 469.84, -7, 1.09)
	pt3dadd(21.81, 470.75, -6.85, 1.09)
	pt3dadd(21.45, 471.29, -6.77, 1.09)
	pt3dadd(21.27, 471.66, -6.77, 1.09)
  }
  apic[13] {pt3dclear()
	pt3dadd(-5.86, 385.83, -21.39, 2.01)
	pt3dadd(-7.5, 386.2, -21.39, 2.01)
	pt3dadd(-7.5, 386.93, -21.39, 2.01)
	pt3dadd(-7.68, 387.65, -21.39, 2.01)
	pt3dadd(-7.68, 387.84, -21.77, 2.01)
	pt3dadd(-7.86, 388.38, -21.92, 2.01)
	pt3dadd(-8.05, 388.75, -22.07, 2.01)
	pt3dadd(-8.23, 389.66, -22.23, 2.01)
	pt3dadd(-8.41, 390.39, -22.3, 2.01)
	pt3dadd(-8.59, 390.93, -22.38, 2.01)
	pt3dadd(-8.59, 391.48, -22.45, 2.01)
	pt3dadd(-8.78, 392.39, -22.53, 2.01)
	pt3dadd(-8.96, 392.76, -22.68, 2.01)
	pt3dadd(-8.96, 393.48, -22.76, 2.01)
	pt3dadd(-8.96, 393.85, -22.98, 2.01)
	pt3dadd(-8.96, 394.4, -22.98, 2.01)
	pt3dadd(-9.14, 395.31, -23.13, 2.01)
	pt3dadd(-9.14, 396.22, -23.13, 2.01)
	pt3dadd(-9.14, 396.76, -23.21, 2.01)
	pt3dadd(-9.69, 397.67, -23.21, 2.19)
	pt3dadd(-10.23, 398.4, -23.21, 2.19)
	pt3dadd(-10.23, 398.95, -23.29, 2.19)
	pt3dadd(-9.69, 399.86, -23.44, 2.92)
	pt3dadd(-10.05, 400.23, -23.51, 2.92)
	pt3dadd(-10.05, 400.77, -23.59, 2.92)
	pt3dadd(-10.23, 401.5, -23.59, 2.92)
  }
  apic[14] {pt3dclear()
	pt3dadd(-10.23, 401.5, -23.59, 2.19)
	pt3dadd(-10.23, 402.96, -23.51, 2.19)
	pt3dadd(-10.05, 403.87, -23.59, 2.19)
	pt3dadd(-10.05, 404.42, -23.74, 2.19)
	pt3dadd(-10.05, 404.96, -23.89, 2.19)
	pt3dadd(-10.05, 405.51, -23.97, 2.19)
	pt3dadd(-10.23, 406.42, -24.27, 2.19)
	pt3dadd(-10.42, 407.15, -24.5, 2.19)
	pt3dadd(-10.78, 408.06, -24.65, 2.74)
	pt3dadd(-10.78, 408.79, -24.72, 2.74)
	pt3dadd(-11.15, 409.88, -24.95, 2.74)
	pt3dadd(-11.15, 410.61, -25.1, 2.74)
	pt3dadd(-11.15, 411.7, -25.33, 2.74)
	pt3dadd(-11.51, 412.62, -25.41, 2.74)
	pt3dadd(-11.51, 413.53, -25.56, 2.74)
	pt3dadd(-11.51, 414.26, -25.79, 2.74)
	pt3dadd(-11.69, 415.35, -25.86, 2.74)
	pt3dadd(-11.69, 416.44, -26.01, 2.74)
	pt3dadd(-11.88, 417.35, -26.16, 2.74)
	pt3dadd(-11.88, 418.08, -26.32, 2.74)
	pt3dadd(-11.88, 418.81, -26.54, 2.74)
	pt3dadd(-11.88, 419.36, -26.77, 2.74)
	pt3dadd(-11.88, 420.09, -27, 2.74)
	pt3dadd(-11.88, 420.63, -27.22, 2.74)
	pt3dadd(-11.69, 421.18, -27.38, 2.74)
	pt3dadd(-11.69, 422.09, -27.6, 2.74)
	pt3dadd(-11.51, 423, -27.75, 2.74)
	pt3dadd(-11.51, 423.91, -27.98, 2.74)
	pt3dadd(-11.33, 424.64, -28.21, 2.74)
	pt3dadd(-11.15, 425.19, -28.21, 2.74)
	pt3dadd(-11.15, 425.92, -28.36, 2.74)
	pt3dadd(-10.96, 426.64, -28.44, 2.74)
  }
  apic[15] {pt3dclear()
	pt3dadd(-10.96, 426.64, -28.44, 1.46)
	pt3dadd(-10.42, 427.74, -28.44, 1.46)
	pt3dadd(-10.23, 428.1, -28.51, 1.46)
	pt3dadd(-10.05, 428.65, -28.74, 1.46)
	pt3dadd(-9.87, 429.38, -28.89, 1.46)
	pt3dadd(-9.87, 430.29, -28.97, 1.46)
	pt3dadd(-9.32, 431.38, -29.04, 1.46)
	pt3dadd(-8.78, 432.48, -29.12, 1.46)
	pt3dadd(-8.23, 433.39, -29.19, 1.46)
	pt3dadd(-7.5, 434.48, -29.19, 1.46)
	pt3dadd(-6.95, 435.39, -29.27, 1.46)
  }
  apic[16] {pt3dclear()
	pt3dadd(-6.95, 435.39, -29.27, 0.36)
	pt3dadd(-6.65, 435.22, -30.41, 0.36)
	pt3dadd(-5.74, 435.76, -30.41, 0.36)
	pt3dadd(-5.01, 436.13, -30.63, 0.36)
	pt3dadd(-4.46, 436.49, -30.71, 0.36)
	pt3dadd(-3.73, 437.04, -30.86, 0.36)
	pt3dadd(-3.18, 437.59, -30.86, 0.36)
	pt3dadd(-2.82, 438.13, -30.94, 0.36)
	pt3dadd(-1.72, 438.5, -31.09, 0.55)
	pt3dadd(-1.18, 438.86, -31.09, 0.55)
	pt3dadd(-0.81, 439.04, -31.16, 0.55)
	pt3dadd(-0.45, 439.41, -31.16, 0.55)
	pt3dadd(0.1, 439.59, -31.16, 0.55)
	pt3dadd(1.01, 439.96, -31.16, 0.55)
	pt3dadd(1.38, 440.5, -31.16, 0.55)
	pt3dadd(1.93, 441.23, -31.24, 0.55)
	pt3dadd(2.47, 441.96, -31.32, 0.55)
	pt3dadd(2.84, 442.69, -31.39, 0.55)
	pt3dadd(3.39, 443.6, -31.39, 0.55)
	pt3dadd(4.48, 444.69, -31.47, 0.55)
	pt3dadd(5.39, 445.79, -31.47, 0.55)
	pt3dadd(6.12, 446.7, -31.47, 0.55)
	pt3dadd(6.49, 447.24, -31.47, 0.55)
	pt3dadd(7.22, 448.15, -31.47, 0.55)
	pt3dadd(7.58, 449.07, -31.47, 0.55)
	pt3dadd(8.68, 449.79, -31.47, 0.55)
	pt3dadd(9.22, 450.89, -31.47, 0.55)
	pt3dadd(9.59, 452.16, -31.47, 0.55)
	pt3dadd(10.14, 453.44, -31.47, 0.55)
	pt3dadd(10.68, 454.71, -31.47, 0.55)
	pt3dadd(11.23, 455.81, -31.47, 0.55)
	pt3dadd(12.51, 457.26, -31.47, 0.55)
	pt3dadd(13.6, 458.18, -31.47, 0.55)
	pt3dadd(14.52, 459.09, -31.47, 0.55)
	pt3dadd(15.98, 460.36, -31.47, 0.55)
	pt3dadd(16.34, 461.46, -31.47, 0.55)
	pt3dadd(16.89, 461.82, -31.47, 0.55)
	pt3dadd(18.16, 462.18, -31.47, 0.55)
	pt3dadd(21.27, 462.91, -31.47, 0.55)
	pt3dadd(23.09, 463.28, -31.47, 0.55)
	pt3dadd(24.19, 464.01, -31.47, 0.55)
	pt3dadd(25.1, 464.92, -31.47, 0.55)
	pt3dadd(26.74, 465.28, -31.47, 0.55)
	pt3dadd(27.47, 466.37, -31.47, 0.55)
	pt3dadd(28.2, 467.29, -31.47, 0.55)
	pt3dadd(28.75, 468.93, -31.47, 0.55)
	pt3dadd(29.29, 469.65, -31.47, 0.55)
	pt3dadd(29.84, 470.57, -31.47, 0.55)
	pt3dadd(30.75, 470.93, -31.47, 0.55)
	pt3dadd(32.76, 471.48, -31.47, 0.55)
	pt3dadd(34.4, 472.2, -31.47, 0.55)
	pt3dadd(35.5, 473.12, -31.47, 0.55)
	pt3dadd(37.14, 475.67, -31.47, 0.55)
	pt3dadd(37.69, 476.76, -31.47, 0.55)
	pt3dadd(38.96, 477.85, -31.47, 0.55)
	pt3dadd(40.24, 478.95, -31.47, 0.55)
	pt3dadd(41.88, 480.22, -31.47, 0.55)
	pt3dadd(42.98, 480.95, -31.47, 0.55)
	pt3dadd(44.26, 481.68, -31.47, 0.55)
	pt3dadd(45.71, 482.41, -31.47, 0.55)
	pt3dadd(47.36, 482.59, -31.47, 0.55)
	pt3dadd(47.9, 482.95, -31.47, 0.55)
	pt3dadd(48.45, 482.95, -31.47, 0.55)
  }
}
proc shape3d_15() {
  apic[16] {	pt3dadd(49.18, 483.14, -31.47, 0.55)
  }
  apic[17] {pt3dclear()
	pt3dadd(-6.95, 435.39, -29.27, 0.91)
	pt3dadd(-6.95, 435.57, -29.35, 0.91)
	pt3dadd(-7.13, 436.67, -29.35, 0.91)
	pt3dadd(-7.13, 437.39, -29.5, 0.91)
	pt3dadd(-6.95, 438.12, -29.57, 0.91)
	pt3dadd(-6.59, 438.67, -29.65, 0.91)
	pt3dadd(-6.22, 439.4, -29.72, 0.91)
	pt3dadd(-6.04, 439.95, -29.72, 0.91)
	pt3dadd(-5.86, 440.49, -29.8, 0.91)
	pt3dadd(-5.49, 441.22, -30.03, 0.91)
	pt3dadd(-5.31, 441.77, -30.18, 0.91)
	pt3dadd(-4.76, 442.68, -30.25, 0.91)
	pt3dadd(-4.4, 443.41, -30.41, 0.91)
	pt3dadd(-4.21, 443.95, -30.48, 0.91)
	pt3dadd(-3.85, 444.68, -30.63, 0.91)
	pt3dadd(-3.48, 445.41, -30.71, 0.91)
	pt3dadd(-2.75, 445.78, -30.94, 0.91)
	pt3dadd(-2.02, 446.14, -31.01, 0.91)
	pt3dadd(-1.48, 446.5, -31.09, 0.91)
	pt3dadd(-1.11, 447.05, -31.09, 0.91)
	pt3dadd(-0.56, 447.78, -31.16, 0.91)
	pt3dadd(0.17, 448.87, -31.32, 0.91)
	pt3dadd(0.35, 449.78, -31.39, 0.91)
	pt3dadd(0.53, 450.7, -31.39, 0.91)
	pt3dadd(0.35, 451.42, -31.39, 0.91)
	pt3dadd(-0.02, 452.52, -31.39, 0.91)
	pt3dadd(-0.2, 453.43, -31.39, 0.91)
	pt3dadd(-0.93, 454.7, -31.39, 0.91)
	pt3dadd(-1.11, 455.43, -31.39, 0.91)
	pt3dadd(-1.66, 456.89, -31.47, 0.91)
	pt3dadd(-2.21, 457.62, -31.69, 0.91)
	pt3dadd(-2.75, 458.53, -31.85, 0.91)
	pt3dadd(-3.48, 459.8, -31.85, 0.91)
	pt3dadd(-4.03, 460.53, -32, 0.91)
	pt3dadd(-4.76, 461.26, -32.15, 0.91)
	pt3dadd(-6.04, 461.99, -32.3, 0.91)
	pt3dadd(-6.95, 462.72, -32.3, 0.91)
	pt3dadd(-7.68, 463.63, -32.38, 0.91)
	pt3dadd(-8.05, 464.36, -32.38, 0.91)
	pt3dadd(-8.41, 465.45, -32.38, 0.91)
	pt3dadd(-8.96, 466, -32.45, 0.91)
	pt3dadd(-9.5, 466.73, -32.53, 0.91)
	pt3dadd(-10.6, 467.64, -32.6, 0.91)
	pt3dadd(-13.15, 468.73, -32.68, 0.91)
	pt3dadd(-13.7, 469.1, -32.68, 0.91)
	pt3dadd(-14.07, 470.19, -32.68, 0.91)
	pt3dadd(-14.61, 471.1, -32.68, 0.91)
	pt3dadd(-15.16, 472.01, -32.68, 0.91)
	pt3dadd(-15.71, 472.74, -32.75, 0.91)
	pt3dadd(-16.26, 473.47, -32.75, 0.91)
	pt3dadd(-16.8, 474.02, -32.83, 0.91)
	pt3dadd(-17.53, 474.56, -32.91, 0.91)
	pt3dadd(-18.26, 474.56, -32.98, 0.91)
	pt3dadd(-18.81, 474.75, -32.98, 0.91)
	pt3dadd(-19.54, 475.47, -32.98, 0.91)
	pt3dadd(-20.09, 476.02, -32.98, 0.91)
	pt3dadd(-20.63, 476.93, -32.98, 0.91)
	pt3dadd(-21.36, 478.02, -32.98, 0.91)
	pt3dadd(-22.09, 479.48, -32.98, 0.91)
	pt3dadd(-22.64, 480.76, -33.06, 0.91)
	pt3dadd(-23.55, 482.22, -33.13, 0.91)
	pt3dadd(-24.28, 483.13, -33.13, 0.91)
	pt3dadd(-26.83, 490.94, -33.13, 0.91)
	pt3dadd(-27.38, 491.67, -33.13, 0.91)
	pt3dadd(-28.11, 492.4, -33.28, 0.91)
	pt3dadd(-28.65, 493.13, -33.44, 0.91)
	pt3dadd(-29.2, 493.67, -33.66, 0.91)
	pt3dadd(-29.75, 494.04, -33.74, 0.91)
	pt3dadd(-30.11, 494.58, -33.89, 0.91)
	pt3dadd(-30.48, 495.13, -34.12, 0.91)
	pt3dadd(-31.02, 495.86, -34.27, 0.91)
	pt3dadd(-31.57, 496.59, -34.35, 0.91)
	pt3dadd(-31.94, 497.32, -34.5, 0.91)
	pt3dadd(-32.12, 497.86, -34.57, 0.91)
	pt3dadd(-32.85, 498.77, -34.65, 0.91)
	pt3dadd(-33.58, 499.68, -34.72, 0.91)
	pt3dadd(-34.31, 500.41, -34.8, 0.91)
	pt3dadd(-35.22, 501.69, -34.88, 0.91)
  }
  apic[18] {pt3dclear()
	pt3dadd(-35.22, 501.69, -34.88, 0.73)
	pt3dadd(-35.22, 502.05, -34.95, 0.73)
	pt3dadd(-35.22, 502.05, -34.95, 0.73)
	pt3dadd(-34.86, 502.24, -35.03, 0.73)
	pt3dadd(-34.67, 502.6, -35.25, 0.73)
	pt3dadd(-34.49, 504.06, -35.48, 0.73)
	pt3dadd(-34.31, 504.6, -35.56, 0.73)
	pt3dadd(-34.31, 505.7, -35.71, 0.73)
	pt3dadd(-34.31, 506.61, -35.86, 0.73)
	pt3dadd(-35.04, 507.16, -35.94, 0.73)
	pt3dadd(-35.77, 507.88, -36.16, 0.73)
	pt3dadd(-36.5, 508.61, -36.47, 0.73)
	pt3dadd(-37.05, 508.98, -36.54, 0.73)
	pt3dadd(-37.23, 509.52, -36.69, 0.73)
	pt3dadd(-37.59, 510.25, -36.77, 0.73)
	pt3dadd(-37.96, 510.8, -37, 0.73)
	pt3dadd(-38.32, 511.71, -37.22, 0.73)
	pt3dadd(-38.5, 512.26, -37.45, 0.73)
	pt3dadd(-38.69, 512.44, -37.53, 0.73)
	pt3dadd(-38.87, 512.8, -37.68, 0.73)
	pt3dadd(-39.42, 513.53, -37.68, 0.73)
	pt3dadd(-40.15, 514.63, -37.91, 0.73)
	pt3dadd(-40.51, 515.17, -38.06, 0.73)
	pt3dadd(-40.69, 515.72, -38.28, 0.73)
	pt3dadd(-40.88, 516.45, -38.44, 0.73)
	pt3dadd(-41.06, 516.81, -38.59, 0.73)
	pt3dadd(-41.42, 517.36, -38.74, 0.73)
	pt3dadd(-41.42, 517.72, -38.97, 0.73)
	pt3dadd(-41.61, 518.09, -39.12, 0.73)
	pt3dadd(-42.15, 518.82, -39.42, 0.73)
	pt3dadd(-42.34, 519.36, -39.65, 0.73)
	pt3dadd(-43.07, 519.91, -39.65, 0.73)
	pt3dadd(-43.07, 519.91, -39.72, 0.73)
	pt3dadd(-42.88, 520.09, -39.8, 0.73)
	pt3dadd(-42.88, 520.27, -39.95, 0.73)
	pt3dadd(-43.07, 520.64, -40.1, 0.73)
	pt3dadd(-43.25, 521, -40.18, 0.73)
	pt3dadd(-43.43, 521.18, -40.33, 0.73)
	pt3dadd(-43.98, 521.55, -40.41, 0.73)
	pt3dadd(-44.16, 522.1, -40.48, 0.73)
	pt3dadd(-44.71, 523.01, -40.56, 0.73)
	pt3dadd(-45.26, 523.74, -40.63, 0.73)
	pt3dadd(-45.62, 524.46, -40.71, 0.73)
	pt3dadd(-46.35, 525.19, -40.86, 0.73)
	pt3dadd(-46.72, 525.92, -40.94, 0.73)
	pt3dadd(-47.08, 526.29, -41.09, 0.73)
	pt3dadd(-47.45, 526.83, -41.16, 0.73)
	pt3dadd(-48.17, 527.93, -41.24, 0.73)
	pt3dadd(-48.54, 528.47, -41.24, 0.73)
	pt3dadd(-49.27, 529.2, -41.31, 0.73)
	pt3dadd(-49.63, 529.75, -41.31, 0.73)
	pt3dadd(-50.55, 530.48, -41.31, 0.73)
	pt3dadd(-51.46, 531.39, -41.39, 0.73)
	pt3dadd(-51.82, 531.93, -41.47, 0.73)
	pt3dadd(-52.19, 532.66, -41.54, 0.73)
	pt3dadd(-52.92, 533.39, -41.62, 0.73)
	pt3dadd(-53.47, 534.3, -41.92, 0.73)
	pt3dadd(-53.83, 534.85, -42.07, 0.73)
	pt3dadd(-54.01, 535.21, -42.22, 0.73)
	pt3dadd(-54.2, 535.94, -42.37, 0.73)
	pt3dadd(-54.2, 536.49, -42.37, 0.73)
	pt3dadd(-54.38, 537.22, -42.45, 0.73)
	pt3dadd(-54.38, 537.58, -42.45, 0.73)
	pt3dadd(-54.38, 538.13, -42.45, 0.73)
	pt3dadd(-54.93, 538.86, -42.68, 0.73)
	pt3dadd(-55.11, 539.04, -42.9, 0.73)
	pt3dadd(-55.11, 539.4, -42.98, 0.73)
	pt3dadd(-55.11, 539.77, -43.21, 0.73)
	pt3dadd(-55.11, 539.95, -43.28, 0.73)
	pt3dadd(-55.11, 540.13, -43.44, 0.73)
	pt3dadd(-55.11, 540.5, -43.59, 0.73)
	pt3dadd(-55.11, 540.86, -43.59, 0.73)
	pt3dadd(-54.93, 541.23, -43.66, 0.73)
	pt3dadd(-54.93, 541.77, -43.74, 0.73)
	pt3dadd(-54.93, 542.32, -43.81, 0.73)
	pt3dadd(-54.93, 543.23, -43.97, 0.73)
	pt3dadd(-55.11, 543.96, -44.04, 0.73)
	pt3dadd(-55.47, 544.69, -44.19, 0.73)
	pt3dadd(-55.47, 545.23, -44.27, 0.73)
	pt3dadd(-55.66, 545.78, -44.34, 0.73)
	pt3dadd(-55.84, 546.51, -44.42, 0.73)
	pt3dadd(-55.84, 547.06, -44.5, 0.73)
	pt3dadd(-55.84, 547.6, -44.72, 0.73)
	pt3dadd(-55.84, 548.51, -44.8, 0.73)
	pt3dadd(-55.84, 548.7, -44.87, 0.73)
	pt3dadd(-55.84, 549.43, -45.25, 0.73)
	pt3dadd(-56.02, 550.15, -45.48, 0.73)
	pt3dadd(-56.02, 550.7, -45.78, 0.73)
	pt3dadd(-56.02, 551.43, -45.93, 0.73)
	pt3dadd(-55.84, 551.61, -46.24, 0.73)
	pt3dadd(-55.84, 552.16, -46.47, 0.73)
	pt3dadd(-55.47, 552.52, -46.54, 0.73)
	pt3dadd(-55.29, 553.07, -46.69, 0.73)
	pt3dadd(-55.11, 553.8, -46.69, 0.91)
	pt3dadd(-54.93, 554.16, -46.84, 0.91)
	pt3dadd(-54.74, 554.89, -47.22, 0.91)
	pt3dadd(-54.74, 555.26, -47.45, 0.91)
	pt3dadd(-54.56, 555.98, -47.68, 0.91)
	pt3dadd(-54.2, 556.35, -47.9, 0.91)
	pt3dadd(-53.83, 556.9, -48.13, 0.91)
	pt3dadd(-53.47, 557.62, -48.51, 0.91)
	pt3dadd(-53.28, 557.99, -48.81, 0.91)
	pt3dadd(-52.92, 558.54, -49.04, 0.91)
	pt3dadd(-52.92, 559.08, -49.19, 0.91)
	pt3dadd(-52.74, 559.81, -49.42, 0.91)
	pt3dadd(-52.37, 560.36, -49.65, 0.91)
	pt3dadd(-52.19, 561.09, -49.87, 0.91)
	pt3dadd(-51.46, 562, -50.1, 0.91)
	pt3dadd(-51.09, 562.54, -50.18, 0.91)
	pt3dadd(-50.91, 563.09, -50.33, 0.91)
	pt3dadd(-50.73, 563.82, -50.56, 0.91)
	pt3dadd(-50.91, 564.73, -50.71, 0.91)
	pt3dadd(-51.28, 566.01, -50.93, 0.91)
	pt3dadd(-51.28, 566.92, -51.24, 0.91)
	pt3dadd(-51.28, 568.01, -51.54, 0.91)
	pt3dadd(-51.09, 568.74, -51.69, 0.91)
	pt3dadd(-50.73, 569.47, -51.84, 0.91)
	pt3dadd(-50.55, 570.38, -51.92, 0.91)
	pt3dadd(-50.18, 571.29, -52.07, 0.91)
	pt3dadd(-50, 572.02, -52.15, 0.91)
	pt3dadd(-49.82, 573.29, -52.22, 0.91)
  }
}
proc shape3d_16() {
  apic[18] {	pt3dadd(-49.45, 575.12, -52.3, 0.91)
	pt3dadd(-48.9, 576.21, -52.3, 0.91)
	pt3dadd(-47.81, 577.53, -52.3, 0.36)
	pt3dadd(-47.45, 578.44, -52.3, 0.36)
	pt3dadd(-47.08, 578.63, -52.37, 0.36)
	pt3dadd(-46.9, 579.17, -52.53, 0.36)
	pt3dadd(-46.9, 579.72, -52.68, 0.36)
	pt3dadd(-47.08, 580.27, -52.75, 0.36)
	pt3dadd(-47.08, 580.81, -52.83, 0.36)
	pt3dadd(-47.27, 581.72, -52.83, 0.36)
	pt3dadd(-47.27, 583.18, -53.06, 0.36)
	pt3dadd(-47.27, 583.91, -53.28, 0.36)
	pt3dadd(-46.9, 584.82, -53.43, 0.36)
	pt3dadd(-45.99, 585.91, -53.59, 0.36)
	pt3dadd(-45.62, 586.28, -53.74, 0.36)
	pt3dadd(-45.62, 586.83, -53.89, 0.36)
	pt3dadd(-45.99, 587.55, -53.96, 0.36)
	pt3dadd(-46.54, 588.28, -54.12, 0.36)
	pt3dadd(-46.9, 589.01, -54.27, 0.36)
	pt3dadd(-47.08, 589.92, -54.34, 0.36)
	pt3dadd(-47.45, 591.2, -54.42, 0.36)
	pt3dadd(-48.18, 592.84, -54.49, 0.36)
	pt3dadd(-48.73, 593.93, -54.49, 0.36)
	pt3dadd(-49.82, 595.02, -54.49, 0.36)
	pt3dadd(-50.55, 595.57, -54.49, 0.36)
	pt3dadd(-51.1, 595.94, -54.49, 0.36)
  }
  apic[19] {pt3dclear()
	pt3dadd(-35.22, 501.69, -34.88, 0.91)
	pt3dadd(-35.77, 501.69, -34.88, 0.91)
	pt3dadd(-35.95, 502.24, -35.1, 0.91)
	pt3dadd(-36.32, 502.42, -35.41, 0.91)
	pt3dadd(-36.68, 502.96, -35.56, 0.91)
	pt3dadd(-37.41, 503.33, -35.86, 0.91)
	pt3dadd(-37.96, 503.51, -36.09, 0.91)
	pt3dadd(-38.14, 503.69, -36.39, 0.91)
	pt3dadd(-38.87, 504.06, -36.69, 0.91)
	pt3dadd(-39.05, 504.06, -37.22, 0.91)
	pt3dadd(-39.6, 504.42, -37.38, 0.91)
	pt3dadd(-40.15, 504.42, -37.45, 0.91)
	pt3dadd(-40.51, 504.6, -37.45, 0.91)
	pt3dadd(-41.06, 504.97, -38.06, 0.91)
	pt3dadd(-41.61, 505.33, -38.36, 0.91)
	pt3dadd(-42.52, 505.88, -38.74, 0.91)
	pt3dadd(-43.07, 506.06, -39.19, 0.91)
	pt3dadd(-43.61, 506.24, -39.34, 0.91)
	pt3dadd(-44.16, 506.43, -39.5, 0.91)
	pt3dadd(-44.89, 506.61, -39.8, 0.91)
	pt3dadd(-45.62, 506.79, -39.95, 0.91)
	pt3dadd(-46.35, 507.52, -40.1, 0.91)
	pt3dadd(-47.08, 508.07, -40.18, 0.91)
	pt3dadd(-47.63, 508.79, -40.33, 0.91)
	pt3dadd(-48.36, 509.52, -40.41, 0.91)
	pt3dadd(-49.27, 510.07, -40.56, 0.91)
	pt3dadd(-49.82, 510.8, -40.78, 0.91)
	pt3dadd(-50.18, 511.16, -40.94, 0.91)
	pt3dadd(-50.91, 511.89, -40.94, 0.91)
	pt3dadd(-51.46, 511.89, -41.01, 0.73)
	pt3dadd(-51.82, 512.07, -41.09, 0.73)
	pt3dadd(-52.37, 512.44, -41.39, 0.73)
	pt3dadd(-52.92, 512.8, -41.69, 0.73)
	pt3dadd(-53.47, 513.17, -41.84, 0.73)
	pt3dadd(-53.83, 513.53, -42.22, 0.73)
	pt3dadd(-54.56, 513.9, -42.45, 0.73)
	pt3dadd(-55.47, 514.44, -42.6, 0.73)
	pt3dadd(-55.84, 514.63, -42.83, 0.73)
	pt3dadd(-56.2, 514.99, -42.98, 0.73)
	pt3dadd(-56.39, 514.99, -43.13, 0.73)
	pt3dadd(-57.48, 515.72, -43.21, 0.73)
	pt3dadd(-58.39, 516.27, -43.66, 0.73)
	pt3dadd(-59.3, 517.18, -43.89, 0.73)
	pt3dadd(-59.85, 517.54, -43.97, 0.73)
	pt3dadd(-60.4, 518.09, -44.04, 0.73)
	pt3dadd(-60.95, 518.45, -44.04, 0.73)
	pt3dadd(-61.86, 519, -44.04, 0.73)
	pt3dadd(-63.14, 519.54, -44.19, 0.73)
	pt3dadd(-63.68, 519.91, -44.34, 0.73)
	pt3dadd(-64.41, 520.46, -44.65, 0.73)
	pt3dadd(-64.96, 521, -44.72, 0.73)
	pt3dadd(-65.69, 521.55, -44.8, 0.73)
	pt3dadd(-66.24, 522.28, -44.95, 0.73)
	pt3dadd(-67.15, 523.19, -45.18, 0.73)
	pt3dadd(-68.06, 523.92, -45.25, 0.73)
	pt3dadd(-68.79, 524.46, -45.48, 0.73)
	pt3dadd(-69.34, 524.65, -45.78, 0.73)
	pt3dadd(-70.07, 525.01, -46.16, 0.73)
	pt3dadd(-70.62, 525.56, -46.31, 0.73)
	pt3dadd(-71.53, 526.1, -46.31, 0.73)
  }
  apic[20] {pt3dclear()
	pt3dadd(-10.96, 426.64, -28.44, 1.28)
	pt3dadd(-11.88, 427.92, -28.89, 1.28)
	pt3dadd(-11.88, 428.1, -28.89, 1.28)
	pt3dadd(-11.88, 428.65, -29.04, 1.28)
	pt3dadd(-11.88, 429.74, -29.27, 1.28)
	pt3dadd(-12.24, 430.47, -29.42, 1.28)
	pt3dadd(-12.24, 431.38, -29.57, 1.28)
	pt3dadd(-12.42, 432.11, -29.65, 1.28)
	pt3dadd(-12.61, 432.84, -29.72, 1.28)
	pt3dadd(-12.61, 433.57, -29.8, 1.28)
	pt3dadd(-12.79, 434.11, -29.88, 1.28)
	pt3dadd(-12.97, 434.84, -29.95, 1.28)
	pt3dadd(-13.15, 435.75, -30.33, 1.28)
	pt3dadd(-13.7, 436.67, -30.48, 1.28)
	pt3dadd(-13.88, 437.21, -30.56, 1.28)
	pt3dadd(-14.43, 438.31, -30.63, 1.28)
	pt3dadd(-14.98, 438.67, -30.63, 1.28)
	pt3dadd(-16.26, 439.95, -30.63, 1.28)
	pt3dadd(-16.62, 440.86, -30.63, 1.28)
	pt3dadd(-16.8, 441.59, -30.63, 1.28)
  }
  apic[21] {pt3dclear()
	pt3dadd(-10.23, 401.5, -23.59, 1.46)
	pt3dadd(-8.96, 401.5, -23.59, 1.46)
	pt3dadd(-8.78, 402.59, -23.59, 0.91)
	pt3dadd(-8.78, 402.96, -23.82, 0.91)
	pt3dadd(-8.05, 403.51, -24.12, 0.91)
	pt3dadd(-7.32, 404.96, -24.27, 0.91)
	pt3dadd(-7.32, 406.06, -24.35, 0.91)
	pt3dadd(-7.32, 407.51, -24.35, 0.91)
	pt3dadd(-7.32, 408.79, -24.35, 0.91)
	pt3dadd(-7.13, 409.7, -24.42, 0.91)
	pt3dadd(-7.13, 410.61, -24.42, 0.91)
	pt3dadd(-7.13, 411.89, -24.5, 0.91)
	pt3dadd(-7.13, 413.16, -24.5, 0.91)
	pt3dadd(-7.13, 414.26, -24.57, 0.91)
	pt3dadd(-7.13, 414.8, -24.57, 0.91)
	pt3dadd(-7.68, 415.35, -24.65, 0.91)
	pt3dadd(-8.23, 415.89, -24.88, 0.91)
	pt3dadd(-8.59, 416.99, -24.88, 0.91)
	pt3dadd(-8.78, 417.72, -24.95, 0.91)
	pt3dadd(-9.14, 418.45, -25.03, 0.91)
	pt3dadd(-9.32, 419.17, -25.1, 0.91)
	pt3dadd(-10.23, 419.9, -25.18, 0.91)
	pt3dadd(-11.33, 420.63, -25.26, 0.91)
	pt3dadd(-12.24, 421.36, -25.26, 0.91)
	pt3dadd(-12.24, 422.09, -25.48, 0.91)
  }
  apic[22] {pt3dclear()
	pt3dadd(-12.24, 422.09, -25.48, 0.91)
	pt3dadd(-11.69, 422.82, -25.33, 0.91)
	pt3dadd(-11.51, 422.82, -25.41, 0.91)
	pt3dadd(-11.33, 423.18, -25.63, 0.91)
	pt3dadd(-11.15, 423.55, -26.09, 0.91)
	pt3dadd(-10.78, 424.09, -26.39, 0.91)
	pt3dadd(-10.42, 424.64, -26.62, 0.91)
	pt3dadd(-10.05, 425, -26.77, 0.91)
	pt3dadd(-9.69, 425.37, -27, 0.91)
	pt3dadd(-9.14, 425.92, -27.3, 0.91)
	pt3dadd(-8.96, 426.64, -27.53, 0.91)
	pt3dadd(-8.59, 427.37, -27.68, 0.91)
	pt3dadd(-8.59, 427.92, -27.91, 0.91)
	pt3dadd(-8.23, 428.28, -28.06, 0.91)
	pt3dadd(-7.86, 428.65, -28.29, 0.91)
	pt3dadd(-7.32, 429.2, -28.44, 0.91)
	pt3dadd(-6.77, 429.74, -28.59, 0.91)
	pt3dadd(-6.04, 430.47, -28.89, 0.91)
	pt3dadd(-5.67, 431.2, -29.12, 0.91)
	pt3dadd(-5.49, 432.29, -29.27, 0.91)
	pt3dadd(-5.31, 433.02, -29.27, 0.91)
	pt3dadd(-5.13, 433.75, -29.35, 0.91)
	pt3dadd(-5.31, 434.48, -29.65, 0.91)
	pt3dadd(-5.31, 435.21, -29.8, 0.91)
	pt3dadd(-5.31, 435.57, -29.88, 0.91)
	pt3dadd(-5.49, 436.3, -29.88, 0.91)
	pt3dadd(-5.86, 436.85, -29.88, 0.91)
	pt3dadd(-5.86, 437.76, -29.88, 0.91)
	pt3dadd(-5.86, 438.31, -29.88, 0.91)
	pt3dadd(-6.22, 439.22, -29.88, 0.91)
	pt3dadd(-6.4, 439.95, -29.88, 0.91)
	pt3dadd(-6.59, 440.67, -29.88, 0.91)
	pt3dadd(-6.77, 441.4, -29.95, 0.91)
	pt3dadd(-6.95, 442.13, -30.03, 0.91)
	pt3dadd(-7.32, 443.04, -30.1, 0.91)
	pt3dadd(-7.5, 443.95, -30.18, 0.91)
	pt3dadd(-7.68, 444.86, -30.18, 0.91)
	pt3dadd(-7.86, 445.78, -30.25, 0.91)
	pt3dadd(-8.41, 447.23, -30.41, 0.91)
	pt3dadd(-9.14, 448.33, -30.48, 0.91)
	pt3dadd(-9.87, 449.6, -30.48, 0.91)
	pt3dadd(-10.42, 450.88, -30.48, 0.91)
	pt3dadd(-10.6, 451.97, -30.48, 0.91)
	pt3dadd(-11.15, 453.43, -30.48, 0.91)
	pt3dadd(-11.88, 455.43, -30.48, 0.91)
	pt3dadd(-12.79, 456.34, -30.48, 0.91)
	pt3dadd(-13.7, 457.62, -30.48, 0.91)
	pt3dadd(-14.07, 459.08, -30.48, 0.91)
	pt3dadd(-14.25, 460.72, -30.48, 0.91)
	pt3dadd(-14.43, 462.72, -30.48, 0.91)
	pt3dadd(-14.43, 463.63, -30.48, 0.91)
  }
  apic[23] {pt3dclear()
	pt3dadd(-12.24, 422.09, -25.48, 0.36)
	pt3dadd(-12.42, 422.45, -25.56, 0.36)
	pt3dadd(-12.79, 423.37, -25.79, 0.36)
	pt3dadd(-12.97, 423.91, -25.86, 0.36)
	pt3dadd(-12.97, 425, -25.94, 0.36)
	pt3dadd(-12.97, 425.73, -25.56, 0.36)
	pt3dadd(-13.15, 426.83, -24.8, 0.36)
	pt3dadd(-13.34, 427.56, -24.42, 0.36)
	pt3dadd(-13.52, 428.28, -24.19, 0.36)
	pt3dadd(-13.7, 428.83, -24.04, 0.36)
	pt3dadd(-13.88, 429.01, -23.97, 0.73)
	pt3dadd(-14.43, 429.92, -23.74, 0.73)
	pt3dadd(-14.61, 430.47, -23.51, 0.73)
	pt3dadd(-15.16, 431.02, -23.36, 0.73)
	pt3dadd(-15.53, 431.75, -23.21, 0.73)
	pt3dadd(-15.89, 432.48, -23.13, 0.73)
	pt3dadd(-16.26, 433.02, -22.83, 0.73)
	pt3dadd(-16.8, 433.75, -22.68, 0.73)
  }
}
proc shape3d_17() {
  apic[23] {	pt3dadd(-17.17, 434.48, -22.53, 0.73)
	pt3dadd(-17.72, 435.57, -22.45, 0.73)
	pt3dadd(-17.9, 436.48, -22.23, 0.73)
	pt3dadd(-18.26, 437.39, -22, 0.73)
	pt3dadd(-18.26, 438.49, -22, 0.73)
	pt3dadd(-18.45, 439.58, -21.92, 0.73)
	pt3dadd(-18.45, 440.31, -22, 0.73)
	pt3dadd(-18.45, 441.22, -22.15, 0.73)
	pt3dadd(-18.63, 442.31, -22.38, 0.73)
	pt3dadd(-18.63, 443.22, -22.6, 0.73)
	pt3dadd(-18.81, 443.95, -22.83, 0.73)
	pt3dadd(-18.99, 444.5, -22.98, 0.73)
	pt3dadd(-18.99, 444.32, -22.98, 0.73)
	pt3dadd(-19.9, 444.68, -22.98, 0.73)
	pt3dadd(-20.63, 445.05, -23.06, 0.73)
	pt3dadd(-21.18, 445.23, -23.13, 0.73)
	pt3dadd(-21.91, 445.78, -23.29, 0.73)
	pt3dadd(-22.28, 446.32, -23.36, 0.73)
	pt3dadd(-22.82, 447.05, -23.51, 0.73)
	pt3dadd(-23.37, 447.78, -23.89, 0.73)
	pt3dadd(-23.55, 448.51, -23.97, 0.73)
	pt3dadd(-23.92, 449.06, -24.12, 0.73)
	pt3dadd(-24.47, 449.6, -24.27, 0.73)
	pt3dadd(-25.2, 449.97, -24.5, 0.73)
	pt3dadd(-25.93, 450.51, -24.88, 0.73)
	pt3dadd(-26.47, 450.88, -25.03, 0.73)
	pt3dadd(-27.02, 451.42, -25.63, 0.73)
	pt3dadd(-27.39, 452.15, -26.09, 0.73)
	pt3dadd(-27.57, 452.52, -26.32, 0.73)
	pt3dadd(-27.93, 452.88, -26.69, 0.73)
	pt3dadd(-28.66, 453.43, -26.85, 0.73)
	pt3dadd(-29.21, 453.79, -27, 0.73)
	pt3dadd(-29.21, 453.97, -27.22, 0.73)
	pt3dadd(-29.76, 454.52, -27.38, 0.73)
	pt3dadd(-30.3, 455.25, -27.45, 0.73)
  }
  apic[24] {pt3dclear()
	pt3dadd(-8.17, 356.39, -13.36, 1.82)
	pt3dadd(-9.08, 356.39, -13.36, 1.82)
	pt3dadd(-9.26, 356.94, -13.36, 1.82)
	pt3dadd(-9.63, 357.49, -13.44, 1.82)
	pt3dadd(-10.54, 358.22, -13.59, 1.82)
	pt3dadd(-11.64, 359.86, -13.67, 1.46)
	pt3dadd(-11.64, 360.04, -13.67, 1.46)
	pt3dadd(-11.82, 360.58, -13.67, 1.46)
	pt3dadd(-12.18, 361.13, -13.74, 1.46)
	pt3dadd(-12.37, 362.04, -13.89, 1.46)
	pt3dadd(-12.91, 362.95, -13.97, 1.46)
	pt3dadd(-13.46, 363.68, -13.97, 1.46)
	pt3dadd(-13.83, 364.23, -14.04, 1.46)
	pt3dadd(-14.37, 364.78, -14.12, 1.46)
	pt3dadd(-14.74, 365.5, -14.12, 1.46)
	pt3dadd(-14.92, 366.05, -14.2, 1.46)
	pt3dadd(-15.47, 367.14, -14.2, 1.09)
	pt3dadd(-16.02, 368.05, -14.2, 1.09)
	pt3dadd(-16.75, 368.6, -14.27, 1.09)
	pt3dadd(-16.93, 369.15, -14.42, 1.09)
	pt3dadd(-17.11, 370.24, -14.42, 1.09)
	pt3dadd(-17.29, 370.97, -14.5, 1.09)
	pt3dadd(-17.66, 371.88, -14.5, 1.09)
	pt3dadd(-18.02, 372.79, -14.5, 1.09)
	pt3dadd(-18.57, 373.34, -14.57, 1.09)
	pt3dadd(-19.3, 374.25, -14.57, 1.09)
	pt3dadd(-19.66, 374.98, -14.57, 1.09)
	pt3dadd(-20.39, 376.07, -14.57, 1.09)
	pt3dadd(-20.94, 376.98, -14.57, 1.09)
	pt3dadd(-21.67, 378.08, -14.65, 1.09)
	pt3dadd(-22.04, 378.99, -14.65, 1.09)
	pt3dadd(-22.4, 379.9, -14.65, 1.09)
	pt3dadd(-22.95, 381.17, -14.65, 1.09)
	pt3dadd(-23.76, 383.02, -14.65, 2.19)
	pt3dadd(-24.49, 383.93, -14.65, 2.19)
	pt3dadd(-25.03, 384.47, -14.65, 2.19)
	pt3dadd(-25.4, 385.2, -14.73, 2.19)
	pt3dadd(-25.4, 386.3, -14.73, 2.19)
	pt3dadd(-26.13, 387.21, -14.73, 2.19)
	pt3dadd(-26.68, 387.94, -14.73, 2.19)
	pt3dadd(-26.86, 388.48, -14.73, 2.19)
	pt3dadd(-27.22, 389.21, -14.8, 2.19)
	pt3dadd(-27.41, 390.12, -14.88, 2.19)
	pt3dadd(-27.59, 390.67, -14.95, 2.19)
	pt3dadd(-28.13, 391.4, -15.03, 2.19)
	pt3dadd(-28.86, 392.13, -15.03, 2.19)
	pt3dadd(-29.23, 392.67, -15.18, 2.19)
	pt3dadd(-30.14, 393.58, -15.26, 2.19)
	pt3dadd(-31.24, 395.04, -15.33, 2.19)
	pt3dadd(-31.78, 395.77, -15.41, 2.19)
	pt3dadd(-32.33, 396.5, -15.48, 2.19)
	pt3dadd(-32.88, 397.41, -15.48, 2.19)
	pt3dadd(-33.43, 398.14, -15.56, 2.19)
	pt3dadd(-34.16, 398.87, -15.63, 2.19)
	pt3dadd(-34.7, 399.6, -15.71, 2.19)
	pt3dadd(-35.07, 400.32, -15.86, 2.19)
	pt3dadd(-35.62, 401.05, -15.94, 2.19)
	pt3dadd(-36.16, 401.96, -16.09, 2.19)
	pt3dadd(-36.53, 402.69, -16.09, 2.19)
	pt3dadd(-37.26, 403.79, -16.17, 2.19)
	pt3dadd(-37.99, 404.33, -16.17, 2.19)
	pt3dadd(-38.9, 405.43, -16.32, 2.19)
	pt3dadd(-39.63, 406.52, -16.39, 2.19)
	pt3dadd(-40.18, 407.43, -16.47, 2.19)
	pt3dadd(-40.36, 408.16, -16.54, 2.19)
	pt3dadd(-40.54, 408.89, -16.54, 2.19)
	pt3dadd(-40.91, 409.8, -16.54, 2.19)
	pt3dadd(-41.27, 410.71, -16.54, 2.19)
	pt3dadd(-41.82, 411.62, -16.54, 2.19)
	pt3dadd(-42, 412.35, -16.92, 2.19)
	pt3dadd(-42.37, 412.9, -17, 2.19)
	pt3dadd(-42.55, 413.81, -17.07, 2.19)
	pt3dadd(-42.73, 414.72, -17.15, 2.19)
	pt3dadd(-42.91, 415.27, -17.15, 2.19)
	pt3dadd(-43.46, 416.18, -17.23, 2.74)
	pt3dadd(-44.01, 417.63, -17.38, 2.74)
	pt3dadd(-44.19, 418.36, -17.45, 2.74)
	pt3dadd(-44.19, 419.27, -17.45, 2.74)
	pt3dadd(-44.37, 420, -17.6, 2.74)
	pt3dadd(-44.74, 420.91, -17.68, 2.74)
	pt3dadd(-45.1, 422.01, -17.76, 2.74)
	pt3dadd(-45.47, 422.74, -17.76, 2.74)
	pt3dadd(-46.2, 423.65, -17.83, 2.74)
	pt3dadd(-46.75, 424.56, -17.83, 2.74)
	pt3dadd(-47.47, 425.47, -17.83, 2.74)
	pt3dadd(-47.84, 426.74, -17.91, 2.74)
	pt3dadd(-48.2, 427.65, -18.06, 2.74)
	pt3dadd(-48.39, 428.38, -18.06, 2.74)
	pt3dadd(-48.57, 428.93, -18.13, 2.74)
	pt3dadd(-48.57, 429.66, -18.21, 2.74)
	pt3dadd(-50.76, 433.67, -18.21, 2.74)
	pt3dadd(-51.12, 434.76, -18.36, 2.74)
	pt3dadd(-51.49, 435.49, -18.44, 2.74)
	pt3dadd(-52.04, 436.58, -18.51, 2.74)
	pt3dadd(-52.22, 437.49, -18.59, 2.74)
	pt3dadd(-52.77, 438.4, -18.59, 2.74)
	pt3dadd(-53.5, 440.77, -18.66, 2.19)
	pt3dadd(-54.23, 441.87, -18.74, 2.19)
	pt3dadd(-54.96, 442.78, -18.89, 2.19)
	pt3dadd(-55.5, 443.51, -18.97, 2.19)
	pt3dadd(-56.23, 444.6, -19.04, 2.19)
	pt3dadd(-57.33, 445.69, -19.12, 2.19)
	pt3dadd(-60.43, 446.6, -19.12, 1.64)
	pt3dadd(-61.34, 446.97, -19.2, 1.64)
	pt3dadd(-62.8, 448.24, -19.2, 1.64)
	pt3dadd(-63.53, 448.79, -19.35, 1.64)
	pt3dadd(-64.81, 449.52, -19.5, 1.64)
	pt3dadd(-65.54, 449.7, -19.57, 1.64)
	pt3dadd(-66.45, 450.25, -19.65, 1.64)
	pt3dadd(-67.36, 450.61, -19.8, 1.64)
	pt3dadd(-67.91, 450.98, -19.88, 1.64)
	pt3dadd(-68.64, 451.34, -19.88, 1.64)
	pt3dadd(-69.37, 451.7, -19.8, 1.64)
	pt3dadd(-69.92, 451.89, -19.57, 1.64)
	pt3dadd(-70.65, 452.07, -19.35, 1.64)
	pt3dadd(-71.19, 452.07, -19.2, 1.64)
	pt3dadd(-72.11, 452.25, -18.89, 1.64)
	pt3dadd(-72.65, 452.25, -18.74, 1.64)
	pt3dadd(-73.2, 452.43, -18.59, 1.64)
	pt3dadd(-74.3, 452.8, -18.21, 1.64)
	pt3dadd(-75.03, 452.98, -18.06, 1.64)
	pt3dadd(-75.94, 453.34, -17.76, 1.64)
	pt3dadd(-76.48, 453.53, -17.6, 1.64)
	pt3dadd(-77.4, 453.71, -17.45, 1.64)
	pt3dadd(-78.49, 454.07, -17.3, 1.64)
	pt3dadd(-79.22, 454.26, -17.23, 1.64)
	pt3dadd(-79.95, 454.62, -16.85, 1.64)
	pt3dadd(-81.05, 454.98, -16.47, 1.64)
	pt3dadd(-83.24, 456.08, -16.32, 1.28)
	pt3dadd(-83.97, 456.62, -16.01, 1.28)
	pt3dadd(-85.79, 457.17, -15.71, 1.28)
	pt3dadd(-86.34, 457.54, -15.63, 1.28)
	pt3dadd(-87.07, 457.72, -15.56, 1.28)
	pt3dadd(-88.16, 458.45, -15.41, 1.28)
	pt3dadd(-89.07, 458.81, -15.26, 1.28)
	pt3dadd(-89.8, 458.99, -15.18, 1.28)
	pt3dadd(-90.35, 459.18, -15.1, 1.28)
	pt3dadd(-91.08, 459.36, -15.1, 1.28)
	pt3dadd(-91.45, 459.54, -15.1, 1.28)
	pt3dadd(-91.81, 459.72, -15.33, 1.28)
	pt3dadd(-92.18, 459.9, -15.48, 1.28)
	pt3dadd(-92.36, 459.9, -15.71, 1.28)
	pt3dadd(-92.54, 460.09, -15.86, 1.28)
	pt3dadd(-92.54, 460.09, -16.09, 1.28)
	pt3dadd(-92.72, 460.27, -16.24, 1.28)
	pt3dadd(-92.91, 460.27, -16.32, 1.28)
	pt3dadd(-92.91, 460.27, -16.47, 1.28)
	pt3dadd(-92.91, 460.27, -16.77, 1.28)
	pt3dadd(-93.27, 460.45, -16.92, 1.28)
	pt3dadd(-93.45, 460.63, -17.15, 1.28)
	pt3dadd(-93.64, 460.63, -17.3, 1.28)
	pt3dadd(-93.82, 460.45, -17.45, 1.28)
	pt3dadd(-94, 460.45, -17.6, 1.28)
	pt3dadd(-94.18, 460.45, -17.76, 1.28)
	pt3dadd(-94.55, 460.45, -17.98, 1.28)
	pt3dadd(-94.55, 460.45, -18.21, 1.28)
	pt3dadd(-95.1, 460.63, -18.51, 1.28)
	pt3dadd(-96.01, 460.63, -18.74, 1.28)
	pt3dadd(-96.37, 460.63, -18.97, 1.28)
	pt3dadd(-96.74, 460.63, -19.12, 1.28)
	pt3dadd(-97.28, 461, -19.2, 1.28)
	pt3dadd(-97.47, 461, -19.27, 1.28)
	pt3dadd(-97.83, 461, -19.73, 1.28)
	pt3dadd(-98.56, 461.18, -20.03, 1.28)
	pt3dadd(-99.11, 461.18, -20.18, 1.28)
  }
}
proc shape3d_18() {
  apic[24] {	pt3dadd(-99.84, 461.18, -20.26, 1.28)
	pt3dadd(-100.39, 461.36, -20.41, 1.28)
	pt3dadd(-101.48, 461.91, -20.56, 1.28)
	pt3dadd(-102.58, 461.91, -20.56, 1.28)
	pt3dadd(-103.49, 462.27, -20.63, 1.28)
	pt3dadd(-104.58, 462.64, -20.79, 1.28)
	pt3dadd(-105.49, 462.82, -21.01, 1.28)
	pt3dadd(-106.95, 463, -21.24, 1.28)
	pt3dadd(-108.78, 463.18, -21.39, 1.28)
	pt3dadd(-110.6, 463.73, -21.54, 1.28)
	pt3dadd(-111.88, 463.91, -21.62, 1.28)
	pt3dadd(-113.52, 464.46, -21.85, 1.28)
	pt3dadd(-115.53, 465.01, -22, 1.28)
	pt3dadd(-117.17, 465.55, -22, 1.28)
	pt3dadd(-118.08, 465.73, -21.62, 1.28)
	pt3dadd(-119.18, 466.1, -21.32, 1.28)
	pt3dadd(-120.09, 466.28, -21.09, 1.28)
	pt3dadd(-121, 466.46, -20.94, 1.28)
	pt3dadd(-121.55, 466.83, -20.71, 1.28)
	pt3dadd(-122.46, 467.19, -20.56, 1.28)
	pt3dadd(-123.19, 467.74, -20.41, 1.28)
	pt3dadd(-123.74, 468.47, -20.18, 1.28)
	pt3dadd(-124.29, 469.74, -19.73, 1.28)
	pt3dadd(-124.29, 470.65, -19.42, 1.28)
	pt3dadd(-124.84, 472.11, -19.27, 1.28)
	pt3dadd(-125.38, 473.2, -19.2, 1.28)
	pt3dadd(-125.38, 474.12, -19.12, 1.28)
	pt3dadd(-125.38, 475.03, -19.12, 1.28)
	pt3dadd(-124.96, 479.13, -19.12, 1.28)
	pt3dadd(-125.87, 480.22, -19.12, 1.28)
	pt3dadd(-125.87, 480.77, -19.12, 1.28)
	pt3dadd(-125.87, 481.68, -19.12, 1.28)
	pt3dadd(-125.87, 482.23, -19.12, 1.28)
	pt3dadd(-125.51, 483.14, -19.12, 1.28)
	pt3dadd(-125.51, 484.05, -18.97, 1.28)
	pt3dadd(-124.96, 485.51, -18.82, 1.28)
	pt3dadd(-124.78, 486.6, -18.66, 1.28)
	pt3dadd(-124.41, 487.69, -18.59, 1.28)
	pt3dadd(-124.23, 489.15, -18.51, 1.28)
	pt3dadd(-124.41, 491.16, -18.36, 1.28)
	pt3dadd(-124.6, 493.16, -18.21, 1.28)
	pt3dadd(-124.6, 494.98, -18.13, 1.28)
	pt3dadd(-124.6, 496.26, -17.98, 1.28)
	pt3dadd(-124.41, 497.53, -17.83, 1.28)
	pt3dadd(-123.68, 499.36, -17.68, 1.28)
	pt3dadd(-123.5, 500.63, -17.53, 1.28)
	pt3dadd(-123.14, 501.72, -17.38, 1.28)
	pt3dadd(-122.77, 502.63, -17.45, 1.28)
	pt3dadd(-122.22, 503.36, -17.91, 1.28)
	pt3dadd(-121.68, 504.09, -18.13, 1.28)
	pt3dadd(-121.31, 504.46, -18.29, 1.28)
	pt3dadd(-120.95, 504.82, -18.51, 1.28)
	pt3dadd(-120.58, 505.37, -18.59, 1.28)
	pt3dadd(-120.04, 506.28, -18.59, 0.73)
	pt3dadd(-120.76, 507.37, -18.51, 0.73)
	pt3dadd(-121.13, 508.65, -18.21, 0.73)
	pt3dadd(-121.13, 509.92, -18.13, 0.73)
	pt3dadd(-121.13, 510.83, -17.98, 0.73)
	pt3dadd(-121.13, 511.93, -17.91, 0.73)
	pt3dadd(-120.76, 513.02, -17.68, 0.73)
	pt3dadd(-120.76, 513.75, -17.53, 0.73)
	pt3dadd(-120.76, 514.66, -17.38, 0.73)
	pt3dadd(-120.76, 515.75, -17.07, 0.73)
	pt3dadd(-120.95, 516.66, -16.92, 0.73)
	pt3dadd(-121.49, 517.58, -16.92, 0.73)
	pt3dadd(-121.68, 518.3, -16.92, 0.73)
	pt3dadd(-121.86, 519.03, -16.85, 0.73)
	pt3dadd(-122.04, 519.58, -16.47, 0.73)
	pt3dadd(-122.22, 520.13, -16.32, 0.73)
	pt3dadd(-122.22, 520.67, -16.09, 0.73)
	pt3dadd(-122.41, 521.4, -15.71, 0.73)
	pt3dadd(-122.41, 521.95, -15.56, 0.73)
	pt3dadd(-122.41, 521.95, -15.41, 0.73)
	pt3dadd(-122.41, 522.68, -15.26, 0.73)
	pt3dadd(-122.41, 523.77, -15.1, 0.73)
	pt3dadd(-122.41, 524.32, -14.95, 0.73)
	pt3dadd(-122.41, 525.05, -14.95, 0.73)
	pt3dadd(-122.41, 526.14, -15.41, 0.73)
	pt3dadd(-122.41, 526.68, -15.56, 0.73)
	pt3dadd(-122.41, 527.6, -15.71, 0.73)
	pt3dadd(-122.41, 528.32, -15.79, 0.73)
	pt3dadd(-122.59, 529.05, -15.86, 0.73)
	pt3dadd(-122.41, 529.24, -15.18, 0.73)
	pt3dadd(-122.41, 529.6, -15.26, 0.73)
	pt3dadd(-122.41, 529.6, -15.48, 0.73)
	pt3dadd(-122.22, 529.96, -15.86, 0.73)
	pt3dadd(-121.86, 530.15, -16.01, 0.73)
	pt3dadd(-121.49, 530.88, -16.77, 0.73)
	pt3dadd(-121.31, 531.6, -17.23, 0.73)
	pt3dadd(-121.31, 532.15, -17.53, 0.73)
	pt3dadd(-121.49, 532.88, -17.68, 0.73)
	pt3dadd(-122.04, 534.34, -17.91, 0.73)
	pt3dadd(-122.41, 535.25, -18.13, 0.73)
	pt3dadd(-122.59, 536.16, -18.51, 0.73)
	pt3dadd(-122.95, 537.07, -18.74, 0.73)
	pt3dadd(-123.14, 537.98, -19.04, 0.73)
	pt3dadd(-123.14, 538.71, -19.2, 0.73)
	pt3dadd(-123.5, 539.44, -19.27, 0.73)
	pt3dadd(-123.5, 539.99, -19.35, 0.73)
	pt3dadd(-123.32, 540.71, -19.5, 0.73)
	pt3dadd(-123.14, 541.26, -19.65, 0.73)
	pt3dadd(-122.95, 541.26, -19.65, 0.73)
	pt3dadd(-122.77, 541.81, -19.73, 0.73)
	pt3dadd(-122.95, 542.72, -19.88, 0.73)
	pt3dadd(-123.14, 543.27, -19.95, 0.73)
	pt3dadd(-123.5, 544.18, -20.18, 0.73)
	pt3dadd(-123.5, 544.9, -20.33, 0.73)
	pt3dadd(-123.68, 545.82, -20.63, 0.73)
	pt3dadd(-123.68, 546.73, -20.79, 0.73)
	pt3dadd(-123.87, 547.64, -20.94, 0.73)
	pt3dadd(-123.87, 548.91, -21.01, 0.73)
	pt3dadd(-123.87, 549.46, -21.16, 0.73)
  }
}
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()
}

objref all, somatic, axonal, basal, apical
proc subsets() { local i
  objref all, somatic, axonal, basal, apical
  all = new SectionList()
    soma[0] all.append()
   // axon[0] all.append()
    for i=0, 17 dend[i] all.append()
    for i=0, 24 apic[i] all.append()

  somatic = new SectionList()
    soma[0] somatic.append()

  axonal = new SectionList()
    axon[0] axonal.append()

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

  apical = new SectionList()
    for i=0, 24 apic[i] apical.append()

}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma[0]

celldef()