proc celldef() { topol() subsets() geom() biophys() geom_nseg() } create soma, axon[5], dend[22], apic[50] proc topol() { local i connect axon(0), soma(0.5) for i = 1, 2 connect axon[i](0), axon(1) for i = 3, 4 connect axon[i](0), axon[2](1) connect dend(0), soma(0.5) for i = 1, 3 connect dend[i](0), dend[i-1](1) connect dend[4](0), dend[2](1) connect dend[5](0), dend[1](1) for i = 6, 7 connect dend[i](0), dend[i-1](1) connect dend[8](0), dend[6](1) for i = 9, 10 connect dend[i](0), dend[8](1) connect dend[11](0), dend[5](1) connect dend[12](0), dend[1](1) for i = 13, 14 connect dend[i](0), dend[12](1) connect dend[15](0), dend[1](1) connect dend[16](0), dend(1) for i = 17, 18 connect dend[i](0), dend[16](1) for i = 19, 20 connect dend[i](0), dend[18](1) connect dend[21](0), dend(1) connect apic(0), soma(0.5) for i = 1, 4 connect apic[i](0), apic[i-1](1) connect apic[5](0), apic[3](1) connect apic[6](0), apic[2](1) for i = 7, 8 connect apic[i](0), apic[6](1) connect apic[9](0), apic[2](1) connect apic[10](0), apic[1](1) connect apic[11](0), apic(1) for i = 12, 13 connect apic[i](0), apic[11](1) connect apic[14](0), apic(1) for i = 15, 17 connect apic[i](0), apic[i-1](1) connect apic[18](0), apic[16](1) for i = 19, 20 connect apic[i](0), apic[18](1) connect apic[21](0), apic[15](1) for i = 22, 23 connect apic[i](0), apic[21](1) connect apic[24](0), apic[14](1) connect apic[25](0), apic(1) for i = 26, 27 connect apic[i](0), apic[i-1](1) connect apic[28](0), apic[26](1) for i = 29, 30 connect apic[i](0), apic[i-1](1) connect apic[31](0), apic[29](1) for i = 32, 33 connect apic[i](0), apic[i-1](1) connect apic[34](0), apic[32](1) for i = 35, 36 connect apic[i](0), apic[34](1) connect apic[37](0), apic[31](1) connect apic[38](0), apic[28](1) for i = 39, 40 connect apic[i](0), apic[38](1) connect apic[41](0), apic[26](1) connect apic[42](0), apic[25](1) for i = 43, 44 connect apic[i](0), apic[i-1](1) connect apic[45](0), apic[43](1) for i = 46, 47 connect apic[i](0), apic[45](1) for i = 48, 49 connect apic[i](0), apic[42](1) basic_shape() } proc shape3d_1() { soma {pt3dclear() pt3dadd(-229.136, -286.463, 190.693, 2.76009) pt3dadd(-228.463, -286.492, 190.696, 4.78677) pt3dadd(-227.79, -286.522, 190.698, 6.37503) pt3dadd(-227.117, -286.552, 190.701, 7.5654) pt3dadd(-226.444, -286.581, 190.703, 8.25641) pt3dadd(-225.77, -286.611, 190.706, 8.87547) pt3dadd(-225.097, -286.64, 190.708, 9.46834) pt3dadd(-224.424, -286.67, 190.711, 9.88373) pt3dadd(-223.751, -286.7, 190.714, 10.2642) pt3dadd(-223.078, -286.729, 190.716, 10.5598) pt3dadd(-222.404, -286.759, 190.719, 10.5815) pt3dadd(-221.731, -286.789, 190.721, 10.3752) pt3dadd(-221.058, -286.818, 190.724, 10.1793) pt3dadd(-220.385, -286.848, 190.726, 9.95771) pt3dadd(-219.712, -286.877, 190.729, 9.60701) pt3dadd(-219.038, -286.907, 190.731, 9.18949) pt3dadd(-218.365, -286.937, 190.734, 8.55141) pt3dadd(-217.692, -286.966, 190.737, 7.50553) pt3dadd(-217.019, -286.996, 190.739, 6.04032) pt3dadd(-216.346, -287.025, 190.742, 4.40018) pt3dadd(-215.673, -287.055, 190.744, 2.41142) } axon {pt3dclear() pt3dstyle(1, -222.449, -286.757, 190.718) pt3dadd(-217.86, -281.96, 190.89, 1.68) pt3dadd(-218.08, -281.08, 190.89, 1.53) pt3dadd(-218.51, -279.92, 190.89, 1.31) pt3dadd(-218.22, -279.04, 189.64, 1.31) pt3dadd(-217.49, -278.68, 189.24, 1.17) pt3dadd(-216.98, -278.02, 188.64, 1.17) pt3dadd(-216.91, -277.95, 188.64, 1.17) pt3dadd(-216.84, -277.08, 188.64, 1.17) pt3dadd(-216.91, -276.49, 188.59, 1.09) pt3dadd(-216.91, -275.84, 188.24, 1.09) pt3dadd(-216.91, -275.03, 187.74, 1.09) pt3dadd(-216.91, -274.82, 187.74, 1.09) pt3dadd(-217.27, -274.16, 187.74, 1.09) pt3dadd(-217.27, -274.09, 187.74, 1.09) pt3dadd(-217.2, -273.29, 187.74, 1.09) pt3dadd(-217.27, -272.56, 187.74, 0.95) pt3dadd(-217.27, -271.68, 187.49, 0.95) pt3dadd(-217.42, -270.73, 187.19, 0.95) pt3dadd(-217.27, -269.71, 187.19, 0.95) pt3dadd(-217.27, -268.77, 186.84, 0.95) pt3dadd(-217.2, -268.62, 186.84, 0.95) pt3dadd(-217.13, -267.97, 186.84, 0.95) pt3dadd(-216.91, -267.09, 186.04, 0.87) pt3dadd(-216.76, -266.22, 185.54, 0.8) pt3dadd(-216.76, -266.14, 185.54, 0.8) pt3dadd(-216.62, -265.41, 185.54, 0.8) pt3dadd(-216.47, -264.54, 185.04, 0.8) pt3dadd(-216.18, -263.96, 184.69, 0.8) pt3dadd(-216.18, -263.81, 184.69, 0.8) pt3dadd(-216.04, -263.08, 184.69, 0.8) pt3dadd(-215.96, -262.28, 184.69, 0.8) pt3dadd(-215.89, -262.13, 184.69, 0.8) pt3dadd(-215.82, -261.7, 184.69, 0.8) pt3dadd(-215.96, -261.04, 184.69, 0.66) pt3dadd(-215.89, -260.97, 184.69, 0.66) pt3dadd(-216.33, -260.31, 184.69, 0.66) pt3dadd(-216.55, -259.44, 184.29, 0.66) pt3dadd(-216.69, -258.42, 183.94, 0.66) pt3dadd(-216.69, -257.76, 183.94, 0.66) pt3dadd(-216.76, -257.03, 183.94, 0.66) pt3dadd(-217.13, -255.72, 183.94, 0.66) pt3dadd(-217.13, -255.5, 183.94, 0.66) pt3dadd(-217.49, -254.92, 183.94, 0.66) pt3dadd(-217.93, -254.12, 183.74, 0.66) pt3dadd(-218.22, -253.54, 183.74, 0.66) pt3dadd(-218.66, -253.17, 183.39, 0.66) pt3dadd(-218.81, -253.17, 183.39, 0.66) pt3dadd(-219.39, -252.95, 183.34, 0.66) pt3dadd(-219.97, -252.95, 183.34, 0.66) pt3dadd(-220.77, -253.68, 183.24, 0.66) pt3dadd(-221.87, -254.34, 183.24, 0.66) pt3dadd(-222.38, -255.21, 183.24, 0.66) pt3dadd(-222.6, -256.09, 183.24, 0.66) pt3dadd(-223.03, -256.96, 183.24, 0.66) pt3dadd(-223.32, -257.69, 182.64, 0.8) pt3dadd(-223.47, -257.69, 182.64, 0.8) pt3dadd(-223.91, -258.64, 182.64, 0.8) pt3dadd(-223.91, -258.71, 182.64, 0.8) pt3dadd(-224.13, -259.37, 182.64, 0.8) pt3dadd(-224.35, -260.24, 182.64, 0.8) pt3dadd(-224.35, -260.31, 182.64, 0.8) pt3dadd(-224.13, -261.41, 182.64, 0.8) pt3dadd(-223.98, -262.28, 183.89, 0.8) pt3dadd(-223.69, -263.3, 183.89, 0.8) pt3dadd(-223.91, -264.03, 183.89, 0.8) pt3dadd(-224.42, -265.27, 183.89, 0.8) pt3dadd(-224.42, -265.34, 183.89, 0.8) pt3dadd(-224.86, -266.14, 183.89, 0.8) pt3dadd(-225.07, -266.87, 183.89, 0.8) } axon[1] {pt3dclear() pt3dadd(-225.07, -266.87, 183.89, 0.66) pt3dadd(-225.88, -267.46, 183.89, 0.66) pt3dadd(-226.31, -268.04, 183.89, 0.66) pt3dadd(-226.31, -268.11, 183.89, 0.66) pt3dadd(-226.97, -268.91, 183.89, 0.8) pt3dadd(-227.55, -269.93, 183.89, 0.8) pt3dadd(-227.7, -270.88, 183.89, 0.8) pt3dadd(-227.77, -271.1, 183.89, 0.8) pt3dadd(-228.14, -271.83, 183.89, 0.8) pt3dadd(-228.14, -271.9, 183.89, 0.8) pt3dadd(-228.21, -273.21, 183.89, 0.8) pt3dadd(-228.21, -273.29, 183.89, 0.8) pt3dadd(-228.35, -274.89, 183.89, 0.8) pt3dadd(-228.21, -276.42, 183.89, 0.8) pt3dadd(-228.28, -277.59, 183.89, 0.8) pt3dadd(-228.35, -277.73, 183.89, 0.8) pt3dadd(-228.35, -277.8, 183.89, 0.8) pt3dadd(-228.57, -278.9, 183.89, 0.8) pt3dadd(-228.57, -280.65, 183.89, 0.8) } axon[2] {pt3dclear() pt3dadd(-225.07, -266.87, 183.89, 0.66) pt3dadd(-224.86, -267.46, 183.89, 0.66) pt3dadd(-224.78, -267.53, 183.89, 0.66) pt3dadd(-224.13, -268.11, 185.79, 0.66) pt3dadd(-224.13, -268.04, 185.74, 0.66) pt3dadd(-223.25, -267.46, 185.74, 0.66) pt3dadd(-223.47, -266.07, 185.74, 0.66) pt3dadd(-223.62, -265.63, 186.84, 0.66) pt3dadd(-224.42, -263.45, 186.84, 0.66) pt3dadd(-224.71, -262.06, 186.84, 0.66) pt3dadd(-224.64, -260.53, 186.04, 0.66) pt3dadd(-223.25, -259.15, 186.04, 0.66) pt3dadd(-222.6, -258.49, 186.04, 0.66) pt3dadd(-222.52, -258.42, 186.04, 0.66) pt3dadd(-221.94, -257.84, 186.04, 0.66) pt3dadd(-222.01, -256.74, 187.04, 0.66) pt3dadd(-222.52, -256.45, 187.04, 0.66) pt3dadd(-223.83, -257.03, 187.04, 0.66) pt3dadd(-224.71, -257.11, 187.04, 0.66) pt3dadd(-225.66, -256.89, 187.04, 0.66) } axon[3] {pt3dclear() pt3dadd(-225.66, -256.89, 187.04, 0.8) pt3dadd(-226.68, -257.54, 188.04, 0.8) pt3dadd(-227.33, -257.62, 188.04, 0.8) pt3dadd(-228.06, -258.13, 188.04, 0.66) pt3dadd(-228.65, -258.64, 188.04, 0.66) pt3dadd(-229.59, -259.15, 188.04, 0.66) pt3dadd(-230.4, -258.86, 188.04, 0.66) pt3dadd(-232.22, -258.42, 188.34, 0.66) pt3dadd(-233.17, -258.27, 188.34, 0.66) pt3dadd(-233.17, -258.2, 188.34, 0.66) pt3dadd(-233.68, -257.76, 188.34, 0.66) pt3dadd(-234.55, -257.4, 188.34, 0.58) pt3dadd(-235.06, -256.81, 189.29, 0.58) pt3dadd(-235.72, -256.38, 189.29, 0.58) pt3dadd(-236.45, -256.09, 189.29, 0.58) pt3dadd(-237.17, -256.38, 189.29, 0.58) pt3dadd(-237.68, -255.79, 189.24, 0.58) } axon[4] {pt3dclear() pt3dadd(-225.66, -256.89, 187.04, 0.87) pt3dadd(-225.37, -256.3, 187.84, 0.87) pt3dadd(-225.37, -255.14, 187.84, 0.87) pt3dadd(-225, -254.34, 187.84, 1.02) pt3dadd(-224.93, -253.32, 186.89, 1.02) pt3dadd(-225.15, -252, 186.89, 1.02) pt3dadd(-226.02, -251.71, 186.89, 1.02) pt3dadd(-226.6, -251.71, 186.89, 1.02) pt3dadd(-226.68, -251.71, 186.89, 1.02) pt3dadd(-227.41, -252.22, 186.89, 1.02) pt3dadd(-228.14, -253.1, 186.89, 0.95) pt3dadd(-228.5, -253.39, 186.89, 0.95) pt3dadd(-228.94, -254.63, 186.89, 0.95) pt3dadd(-229.59, -254.26, 186.89, 0.95) pt3dadd(-229.59, -254.05, 186.89, 0.95) pt3dadd(-230.25, -253.32, 186.89, 0.95) pt3dadd(-230.54, -252.59, 186.89, 0.95) pt3dadd(-230.25, -252.3, 185.84, 0.95) pt3dadd(-230.18, -251.79, 185.84, 0.95) pt3dadd(-230.03, -251.49, 185.84, 0.95) pt3dadd(-230.4, -250.77, 185.84, 0.95) pt3dadd(-230.4, -250.77, 185.74, 0.95) pt3dadd(-230.25, -250.18, 184.64, 0.87) pt3dadd(-230.47, -249.16, 183.99, 0.8) pt3dadd(-230.47, -248.94, 183.99, 0.8) pt3dadd(-230.47, -247.7, 183.29, 0.8) pt3dadd(-230.47, -247.41, 183.29, 0.8) pt3dadd(-231.2, -246.54, 183.29, 0.8) pt3dadd(-231.78, -245.74, 183.29, 0.8) pt3dadd(-231.78, -245.59, 183.29, 0.8) pt3dadd(-232.87, -244.21, 183.29, 0.8) } dend {pt3dclear() pt3dstyle(1, -222.449, -286.757, 190.718) pt3dadd(-227.92, -291, 193.94, 1.39) pt3dadd(-228.35, -291.21, 193.94, 1.39) pt3dadd(-228.72, -292.02, 194.79, 1.31) pt3dadd(-229.08, -293.25, 194.79, 1.31) pt3dadd(-228.21, -293.4, 195.84, 1.24) pt3dadd(-227.55, -292.67, 195.84, 1.24) pt3dadd(-226.9, -292.82, 195.84, 1.24) pt3dadd(-226.9, -292.89, 195.84, 1.24) pt3dadd(-226.97, -293.84, 196.29, 1.02) pt3dadd(-227.63, -294.42, 196.29, 1.02) pt3dadd(-227.7, -294.57, 196.29, 1.02) pt3dadd(-228.21, -294.79, 196.29, 1.02) pt3dadd(-229.16, -294.93, 196.29, 1.02) pt3dadd(-229.81, -294.93, 196.29, 1.02) pt3dadd(-230.47, -294.93, 196.29, 1.02) pt3dadd(-231.2, -295.22, 196.79, 1.02) pt3dadd(-231.93, -295.59, 197.44, 1.02) pt3dadd(-233.82, -296.68, 197.44, 1.02) pt3dadd(-234.11, -296.9, 198.09, 1.02) pt3dadd(-234.77, -297.47, 198.09, 1.02) pt3dadd(-235.28, -298.2, 198.09, 1.02) pt3dadd(-235.79, -298.56, 198.09, 1.02) } } proc shape3d_2() { dend { pt3dadd(-236.45, -299.73, 198.09, 1.02) pt3dadd(-236.81, -300.38, 198.09, 1.02) pt3dadd(-237.11, -300.75, 198.09, 1.17) pt3dadd(-237.4, -301.99, 198.09, 1.17) pt3dadd(-238.2, -302.79, 199.64, 1.53) } dend[1] {pt3dclear() pt3dadd(-238.2, -302.79, 199.64, 1.31) pt3dadd(-239.44, -303.22, 199.64, 1.31) pt3dadd(-240.53, -303.3, 199.64, 1.09) pt3dadd(-241.41, -303.59, 199.39, 1.09) pt3dadd(-241.99, -303.88, 199.39, 1.02) pt3dadd(-242.94, -304.46, 198.89, 1.02) pt3dadd(-243.08, -304.46, 198.89, 1.02) pt3dadd(-243.59, -305.05, 198.89, 1.02) pt3dadd(-244.32, -305.26, 198.89, 1.02) pt3dadd(-244.91, -305.7, 198.89, 1.02) pt3dadd(-245.78, -306.36, 198.84, 1.68) pt3dadd(-246.95, -307.09, 198.14, 2.41) } dend[2] {pt3dclear() pt3dadd(-246.95, -307.09, 198.14, 0.95) pt3dadd(-247.02, -308.98, 198.09, 0.95) pt3dadd(-246.87, -310.51, 198.89, 0.87) pt3dadd(-247.02, -310.51, 198.89, 0.87) pt3dadd(-247.02, -311.17, 198.89, 0.87) pt3dadd(-247.17, -312.12, 198.89, 0.8) pt3dadd(-247.46, -312.84, 199.49, 0.8) pt3dadd(-247.6, -312.92, 199.49, 0.8) pt3dadd(-247.09, -313.65, 199.49, 0.8) pt3dadd(-247.24, -313.65, 199.49, 0.8) pt3dadd(-247.17, -315.32, 199.49, 0.8) pt3dadd(-246.9, -316.47, 199.49, 0.8) pt3dadd(-246.46, -317.2, 199.49, 0.8) pt3dadd(-246.02, -317.86, 199.49, 0.87) pt3dadd(-245.51, -318.44, 199.49, 0.87) pt3dadd(-244.64, -319.24, 199.49, 0.87) pt3dadd(-243.33, -320.04, 201.34, 1.02) pt3dadd(-242.6, -320.92, 201.89, 0.95) pt3dadd(-242.31, -322.52, 202.44, 0.87) pt3dadd(-242.6, -323.54, 202.44, 0.87) pt3dadd(-242.16, -325, 203.19, 0.8) pt3dadd(-241.65, -325.87, 203.19, 0.8) pt3dadd(-240.85, -327.48, 204.04, 0.73) pt3dadd(-240.34, -328.35, 204.04, 0.66) pt3dadd(-240.85, -328.79, 204.04, 0.66) pt3dadd(-241.29, -328.86, 204.04, 0.66) pt3dadd(-241.5, -329.52, 204.04, 0.66) pt3dadd(-241.43, -330.1, 204.04, 0.66) pt3dadd(-241.29, -331.12, 204.04, 1.09) pt3dadd(-241.21, -332.07, 204.04, 1.09) pt3dadd(-241.36, -332.14, 204.04, 1.09) pt3dadd(-241.36, -332.8, 204.04, 1.09) pt3dadd(-241.14, -333.82, 205.34, 1.17) pt3dadd(-241.21, -334.77, 205.34, 0.8) pt3dadd(-241.29, -334.84, 205.34, 0.8) pt3dadd(-241.43, -335.06, 205.34, 0.8) pt3dadd(-241.43, -335.93, 205.34, 0.8) pt3dadd(-241.43, -336.08, 205.34, 0.8) pt3dadd(-241.65, -336.66, 205.34, 0.8) pt3dadd(-241.94, -337.97, 205.34, 0.95) pt3dadd(-242.16, -339.58, 205.34, 0.95) pt3dadd(-242.31, -341.18, 205.34, 0.95) pt3dadd(-242.6, -343.22, 205.84, 0.95) pt3dadd(-242.67, -343.22, 205.84, 0.95) pt3dadd(-242.89, -344.82, 205.84, 0.95) pt3dadd(-242.6, -345.77, 205.84, 0.95) pt3dadd(-242.67, -346.21, 205.84, 0.95) pt3dadd(-242.75, -348.68, 205.84, 0.95) pt3dadd(-242.68, -350.22, 205.84, 0.95) pt3dadd(-242.68, -351.6, 205.84, 1.09) pt3dadd(-242.75, -351.6, 205.84, 1.09) pt3dadd(-242.75, -352.98, 206.64, 1.75) pt3dadd(-243.11, -353.79, 204.59, 1.75) } dend[3] {pt3dclear() pt3dadd(-243.11, -353.79, 204.59, 0.87) pt3dadd(-243.62, -354.81, 204.59, 0.87) pt3dadd(-244.35, -355.24, 204.59, 0.66) pt3dadd(-245.08, -355.46, 204.59, 0.66) pt3dadd(-245.52, -355.97, 204.59, 0.58) pt3dadd(-245.37, -356.56, 204.59, 0.58) pt3dadd(-244.79, -356.99, 204.59, 0.58) pt3dadd(-244.21, -357.43, 204.59, 0.58) pt3dadd(-243.7, -358.09, 204.59, 0.58) pt3dadd(-243.55, -358.74, 204.59, 0.58) pt3dadd(-243.55, -358.82, 204.59, 0.58) pt3dadd(-243.11, -359.47, 204.59, 0.73) pt3dadd(-242.68, -360.13, 204.59, 0.73) pt3dadd(-242.31, -362.09, 204.29, 0.73) pt3dadd(-241.95, -363.48, 204.29, 0.73) pt3dadd(-241.73, -365.3, 204.89, 0.73) pt3dadd(-241.8, -365.3, 204.89, 0.73) pt3dadd(-241.8, -366.18, 204.89, 0.73) pt3dadd(-241.8, -366.39, 204.89, 0.73) pt3dadd(-241.73, -367.34, 204.89, 0.73) pt3dadd(-241.07, -368, 204.89, 0.73) pt3dadd(-241.14, -368.07, 204.89, 0.73) pt3dadd(-241.36, -369.53, 204.89, 0.73) pt3dadd(-242.02, -370.69, 204.89, 0.73) pt3dadd(-242.16, -372.59, 204.89, 0.73) pt3dadd(-242.09, -373.97, 204.89, 0.66) pt3dadd(-241.8, -375.36, 204.89, 0.66) pt3dadd(-241.51, -376.23, 204.89, 0.66) pt3dadd(-241.29, -377.11, 204.89, 0.66) pt3dadd(-241.08, -377.98, 204.79, 0.66) pt3dadd(-240.5, -378.64, 204.79, 0.66) pt3dadd(-240.5, -378.71, 204.79, 0.66) pt3dadd(-240.64, -379.73, 204.79, 0.66) pt3dadd(-240.64, -380.53, 204.79, 0.66) pt3dadd(-240.72, -380.61, 204.79, 0.66) pt3dadd(-239.77, -381.12, 204.79, 0.66) } dend[4] {pt3dclear() pt3dadd(-243.11, -353.79, 204.59, 0.66) pt3dadd(-242.39, -354.81, 206.29, 0.66) pt3dadd(-242.47, -355.75, 206.29, 0.66) pt3dadd(-242.69, -356.63, 206.34, 0.58) pt3dadd(-242.61, -356.63, 206.34, 0.58) pt3dadd(-242.69, -357.58, 206.69, 0.58) pt3dadd(-241.66, -357.79, 206.94, 0.58) pt3dadd(-241.15, -358.09, 206.94, 0.58) pt3dadd(-241.08, -358.16, 206.94, 0.58) pt3dadd(-240.28, -358.52, 207.29, 0.66) pt3dadd(-239.84, -359.03, 207.74, 0.66) pt3dadd(-239.84, -359.11, 207.74, 0.66) pt3dadd(-239.84, -360.34, 208.44, 0.66) pt3dadd(-240.13, -361.29, 208.44, 0.66) pt3dadd(-240.06, -362.9, 208.79, 0.66) pt3dadd(-239.7, -363.77, 208.79, 0.66) pt3dadd(-239.62, -363.84, 208.79, 0.66) pt3dadd(-239.11, -364.79, 208.79, 0.66) pt3dadd(-238.24, -365.81, 209.44, 0.66) pt3dadd(-237.66, -366.17, 209.44, 0.8) pt3dadd(-237.66, -366.32, 209.44, 0.8) pt3dadd(-236.85, -367.05, 209.44, 0.8) pt3dadd(-236.27, -367.92, 209.44, 0.8) pt3dadd(-236.12, -368.43, 209.84, 0.8) pt3dadd(-236.05, -368.43, 209.84, 0.8) pt3dadd(-235.25, -368.51, 209.84, 0.8) pt3dadd(-234.52, -368.36, 209.84, 0.8) pt3dadd(-233.86, -368.87, 209.84, 0.8) pt3dadd(-233.57, -369.75, 209.84, 0.95) pt3dadd(-232.7, -371.06, 210.79, 0.95) pt3dadd(-231.68, -371.79, 211.49, 1.09) pt3dadd(-230.95, -373.03, 212.09, 1.02) pt3dadd(-230.88, -372.95, 212.09, 1.02) pt3dadd(-230.73, -372.95, 212.09, 1.02) pt3dadd(-229.93, -373.54, 213.34, 0.95) } dend[5] {pt3dclear() pt3dadd(-246.95, -307.09, 198.14, 1.39) pt3dadd(-248.54, -307.03, 198.24, 1.39) pt3dadd(-249.49, -306.96, 198.24, 1.17) pt3dadd(-250.58, -307.11, 197.24, 0.73) pt3dadd(-251.68, -307.4, 197.24, 0.73) pt3dadd(-251.68, -307.47, 197.24, 0.73) pt3dadd(-252.63, -307.76, 197.24, 0.73) pt3dadd(-253.14, -307.98, 197.24, 0.73) pt3dadd(-253.86, -308.42, 196.54, 0.73) pt3dadd(-254.59, -308.78, 196.54, 0.73) pt3dadd(-254.59, -308.78, 196.59, 0.73) pt3dadd(-255.61, -308.42, 197.79, 0.73) pt3dadd(-256.27, -308.05, 197.79, 0.73) pt3dadd(-256.27, -307.98, 198.24, 0.73) pt3dadd(-257.07, -307.76, 198.99, 0.73) pt3dadd(-257.95, -307.98, 198.99, 0.73) pt3dadd(-258.68, -309, 198.99, 0.73) pt3dadd(-258.97, -309, 198.99, 0.73) pt3dadd(-259.62, -309.95, 198.99, 0.73) pt3dadd(-259.62, -310.02, 198.99, 0.73) pt3dadd(-260.13, -310.53, 198.99, 0.73) pt3dadd(-260.21, -310.6, 198.99, 0.73) pt3dadd(-261.59, -310.97, 198.99, 0.73) pt3dadd(-263.27, -311.62, 198.99, 0.73) pt3dadd(-264, -312.28, 199.49, 0.73) pt3dadd(-264.29, -312.94, 199.49, 0.73) pt3dadd(-264.43, -313.23, 199.49, 0.73) pt3dadd(-265.31, -313.96, 199.49, 0.73) pt3dadd(-265.38, -314.68, 199.49, 0.73) pt3dadd(-265.38, -314.83, 199.49, 0.73) pt3dadd(-264.87, -316.14, 199.49, 0.73) pt3dadd(-264.14, -316.43, 199.49, 0.73) pt3dadd(-264.14, -316.58, 199.49, 0.73) pt3dadd(-263.56, -317.45, 199.49, 0.73) pt3dadd(-263.63, -317.6, 199.49, 0.73) pt3dadd(-263.71, -317.67, 199.49, 0.73) pt3dadd(-263.71, -318.47, 199.49, 0.73) pt3dadd(-263.85, -318.47, 199.49, 0.73) pt3dadd(-263.85, -318.55, 199.49, 0.73) pt3dadd(-264.22, -319.71, 199.49, 0.73) pt3dadd(-264.22, -319.71, 199.59, 0.73) pt3dadd(-263.41, -320.59, 199.39, 0.8) pt3dadd(-262.54, -320.95, 198.69, 0.95) pt3dadd(-261.15, -322.41, 198.69, 0.95) pt3dadd(-261.3, -323.21, 198.49, 0.95) pt3dadd(-261.23, -323.21, 198.49, 0.95) pt3dadd(-261.45, -325.11, 197.34, 1.02) pt3dadd(-261.59, -326.27, 197.34, 1.02) pt3dadd(-261.63, -327.16, 197.34, 1.31) pt3dadd(-261.48, -327.37, 197.34, 1.31) pt3dadd(-261.05, -329.12, 197.34, 1.31) pt3dadd(-260.61, -329.92, 197.34, 1.31) pt3dadd(-260.39, -331.38, 197.34, 1.17) pt3dadd(-260.03, -333.79, 195.84, 1.17) pt3dadd(-259.81, -335.17, 195.84, 1.53) pt3dadd(-258.64, -335.97, 195.84, 1.53) pt3dadd(-258.14, -337.2, 195.84, 1.39) } dend[6] {pt3dclear() pt3dadd(-258.14, -337.2, 195.84, 0.95) pt3dadd(-257.41, -339.02, 195.49, 0.95) } } proc shape3d_3() { dend[6] { pt3dadd(-257.41, -339.75, 195.49, 0.58) pt3dadd(-257.19, -340.41, 195.49, 0.58) pt3dadd(-257.19, -340.48, 195.49, 0.58) pt3dadd(-257.19, -341.21, 195.49, 0.58) pt3dadd(-257.19, -341.43, 195.49, 0.58) pt3dadd(-257.12, -342.23, 195.49, 0.58) pt3dadd(-256.75, -343.4, 195.49, 0.58) pt3dadd(-256.68, -343.92, 195.49, 0.8) pt3dadd(-255.7, -343.93, 195.49, 0.8) pt3dadd(-254.76, -343.79, 195.54, 0.8) pt3dadd(-253.86, -344.49, 195.54, 0.8) pt3dadd(-252.76, -345.07, 195.54, 0.8) pt3dadd(-251.97, -346.31, 195.54, 0.8) pt3dadd(-251.79, -347.47, 195.54, 0.8) pt3dadd(-251.88, -349.43, 197.49, 0.8) pt3dadd(-251.73, -350.81, 197.49, 0.8) pt3dadd(-251.63, -352.28, 197.49, 0.8) pt3dadd(-251.26, -353.25, 197.49, 0.8) pt3dadd(-251.26, -353.25, 197.64, 0.8) pt3dadd(-251.1, -353.66, 197.84, 1.09) pt3dadd(-250.7, -354.47, 197.94, 0.87) pt3dadd(-250.54, -355.18, 197.94, 0.87) pt3dadd(-250.27, -356.39, 197.94, 1.24) } dend[7] {pt3dclear() pt3dadd(-250.27, -356.39, 197.94, 0.73) pt3dadd(-249.65, -356.85, 197.99, 0.73) pt3dadd(-248.97, -357.22, 197.99, 0.73) pt3dadd(-248.18, -358.09, 197.99, 0.73) pt3dadd(-247.78, -359.57, 196.39, 0.73) pt3dadd(-247.31, -361.03, 197.29, 0.66) pt3dadd(-246.93, -362.44, 197.29, 0.58) pt3dadd(-247.99, -363.72, 197.29, 0.58) pt3dadd(-248.7, -364.55, 196.54, 0.58) } dend[8] {pt3dclear() pt3dadd(-250.27, -356.39, 197.94, 0.51) pt3dadd(-250.76, -357.91, 197.99, 0.51) pt3dadd(-250.96, -358.7, 197.99, 0.51) pt3dadd(-251.21, -359.28, 197.99, 0.66) } dend[9] {pt3dclear() pt3dadd(-251.21, -359.28, 197.99, 0.44) pt3dadd(-250.47, -359.56, 197.99, 0.44) pt3dadd(-250.07, -360.37, 197.99, 0.44) pt3dadd(-250.14, -360.39, 197.99, 0.44) pt3dadd(-251.53, -361.21, 197.99, 0.44) } dend[10] {pt3dclear() pt3dadd(-251.21, -359.28, 197.99, 0.44) pt3dadd(-252.03, -359.61, 197.99, 0.44) pt3dadd(-252.1, -359.62, 197.99, 0.44) pt3dadd(-252.99, -360.64, 197.99, 0.44) pt3dadd(-253.79, -361.12, 197.99, 0.44) pt3dadd(-253.77, -361.19, 197.99, 0.44) pt3dadd(-255.8, -361.48, 197.99, 0.44) } dend[11] {pt3dclear() pt3dadd(-258.14, -337.2, 195.84, 1.02) pt3dadd(-257.12, -337.2, 194.89, 1.02) pt3dadd(-256.32, -337.64, 194.89, 1.02) pt3dadd(-255.73, -338.66, 194.84, 0.87) pt3dadd(-255.59, -339.83, 193.59, 0.73) pt3dadd(-255.59, -340.55, 193.59, 0.73) pt3dadd(-255.59, -341.21, 193.59, 0.58) pt3dadd(-255.59, -341.28, 193.59, 0.58) pt3dadd(-255.44, -342.16, 193.59, 0.58) pt3dadd(-255.44, -342.23, 193.59, 0.58) pt3dadd(-255.44, -343.32, 193.59, 0.58) pt3dadd(-255.51, -343.69, 193.59, 0.58) pt3dadd(-255.37, -344.64, 193.59, 0.58) pt3dadd(-255.15, -345.51, 193.59, 0.58) pt3dadd(-255.44, -345.95, 193.59, 0.58) pt3dadd(-255.59, -347.19, 193.59, 0.58) pt3dadd(-255.59, -347.26, 193.59, 0.58) pt3dadd(-255.88, -347.84, 193.59, 0.58) pt3dadd(-256.32, -348.86, 193.59, 0.51) pt3dadd(-256.54, -349.3, 193.59, 0.51) pt3dadd(-256.61, -349.37, 193.59, 0.51) pt3dadd(-256.9, -350.25, 193.59, 0.51) pt3dadd(-256.61, -350.76, 193.59, 0.73) pt3dadd(-256.24, -351.7, 193.59, 0.87) pt3dadd(-256.1, -351.78, 193.59, 0.87) pt3dadd(-255.81, -352.36, 193.59, 0.87) pt3dadd(-254.93, -353.24, 193.59, 0.87) pt3dadd(-254.49, -353.53, 193.59, 0.87) pt3dadd(-254.42, -353.53, 193.59, 0.87) pt3dadd(-254.06, -354.26, 192.44, 0.66) pt3dadd(-253.91, -355.2, 192.44, 0.58) pt3dadd(-254.13, -355.28, 192.44, 0.58) pt3dadd(-254.57, -355.71, 192.44, 0.58) pt3dadd(-255.15, -356, 192.44, 0.58) pt3dadd(-255.73, -356.22, 192.44, 0.95) pt3dadd(-256.24, -356.3, 192.44, 0.95) } dend[12] {pt3dclear() pt3dadd(-246.95, -307.09, 198.14, 0.66) pt3dadd(-246.34, -304.85, 198.14, 0.66) pt3dadd(-247.5, -305.14, 198.14, 0.66) pt3dadd(-248.52, -305.07, 198.74, 0.66) pt3dadd(-248.52, -305.14, 198.74, 0.66) pt3dadd(-248.89, -305.43, 197.64, 1.09) pt3dadd(-249.18, -306.38, 197.64, 1.09) pt3dadd(-249.69, -307.26, 197.64, 1.09) pt3dadd(-249.91, -306.24, 197.64, 0.95) pt3dadd(-249.25, -305, 197.64, 0.95) pt3dadd(-250.05, -304.63, 197.64, 0.95) pt3dadd(-250.13, -304.78, 197.64, 0.95) pt3dadd(-250.71, -305.36, 197.64, 0.95) pt3dadd(-251.08, -305.94, 194.54, 0.95) pt3dadd(-251.37, -306.02, 194.54, 0.95) pt3dadd(-252.39, -306.09, 194.54, 0.8) pt3dadd(-253.12, -306.67, 194.54, 0.8) pt3dadd(-253.55, -306.89, 193.74, 0.8) pt3dadd(-254.14, -306.89, 193.89, 0.8) pt3dadd(-254.36, -306.45, 193.89, 0.8) } dend[13] {pt3dclear() pt3dadd(-254.36, -306.45, 193.89, 0.8) pt3dadd(-254.5, -305.65, 192.64, 0.8) pt3dadd(-254.28, -305.07, 192.64, 0.95) pt3dadd(-254.65, -304.49, 191.94, 0.95) pt3dadd(-254.79, -304.49, 191.94, 0.95) pt3dadd(-255.3, -304.27, 191.89, 0.95) pt3dadd(-256.18, -303.76, 191.29, 0.95) pt3dadd(-256.62, -303.25, 190.64, 0.73) pt3dadd(-256.62, -303.03, 190.64, 0.73) pt3dadd(-256.69, -301.86, 190.64, 0.73) pt3dadd(-256.69, -301.28, 190.64, 0.73) pt3dadd(-257.13, -300.26, 190.09, 0.73) pt3dadd(-257.93, -299.38, 189.69, 0.73) pt3dadd(-258, -299.17, 189.69, 0.73) pt3dadd(-258.07, -299.09, 189.69, 0.73) pt3dadd(-258.58, -298.15, 189.64, 0.73) pt3dadd(-258.73, -297.56, 189.14, 0.73) pt3dadd(-258.73, -297.49, 189.14, 0.73) pt3dadd(-258.66, -296.4, 188.84, 0.73) pt3dadd(-258.73, -295.16, 188.19, 0.73) pt3dadd(-258.88, -295.08, 188.19, 0.73) pt3dadd(-258.95, -295.08, 188.19, 0.73) pt3dadd(-259.82, -293.63, 188.19, 0.73) pt3dadd(-259.82, -293.55, 188.19, 0.73) pt3dadd(-260.19, -292.53, 188.19, 0.73) pt3dadd(-260.26, -292.53, 188.19, 0.73) pt3dadd(-260.48, -292.24, 188.14, 0.95) pt3dadd(-260.55, -292.1, 188.14, 0.95) pt3dadd(-261.13, -290.42, 188.14, 0.95) pt3dadd(-261.57, -289.4, 188.19, 0.66) pt3dadd(-262.08, -288.23, 187.19, 0.66) pt3dadd(-262.88, -287.87, 187.19, 0.66) pt3dadd(-263.39, -288.38, 187.19, 0.66) pt3dadd(-264.56, -287.51, 186.44, 0.66) pt3dadd(-264.78, -287.21, 185.54, 0.87) pt3dadd(-265.73, -287.07, 184.34, 0.87) pt3dadd(-266.38, -286.27, 184.34, 0.87) pt3dadd(-266.46, -286.19, 184.34, 0.87) pt3dadd(-267.4, -284.74, 184.34, 0.87) pt3dadd(-267.4, -284.59, 184.34, 0.87) pt3dadd(-267.91, -283.93, 184.34, 0.87) pt3dadd(-267.62, -282.99, 184.34, 0.66) pt3dadd(-267.48, -282.99, 184.34, 0.66) pt3dadd(-267.4, -282.91, 184.34, 0.66) pt3dadd(-267.11, -282.48, 184.34, 0.66) pt3dadd(-267.11, -282.33, 184.34, 0.66) pt3dadd(-267.4, -281.75, 183.04, 0.87) pt3dadd(-267.99, -281.02, 183.04, 0.66) pt3dadd(-268.06, -280.51, 183.04, 0.66) pt3dadd(-268.42, -279.42, 183.04, 0.66) pt3dadd(-268.57, -279.42, 183.04, 0.66) pt3dadd(-268.64, -279.27, 183.04, 0.66) pt3dadd(-268.64, -277.74, 183.04, 0.66) pt3dadd(-268.64, -277.52, 183.04, 0.66) pt3dadd(-268.72, -277.45, 183.04, 0.66) pt3dadd(-268.86, -277.08, 183.04, 0.66) pt3dadd(-268.86, -276.79, 183.04, 0.66) pt3dadd(-269.08, -276.21, 182.99, 1.02) pt3dadd(-269.3, -274.68, 183.69, 1.02) pt3dadd(-269.3, -274.24, 183.69, 1.02) pt3dadd(-268.5, -272.42, 183.69, 0.44) } dend[14] {pt3dclear() pt3dadd(-254.36, -306.45, 193.89, 1.02) pt3dadd(-254.87, -307.55, 191.54, 1.02) pt3dadd(-255.74, -307.69, 191.89, 0.87) pt3dadd(-256.03, -306.96, 187.99, 0.87) pt3dadd(-256.11, -306.24, 187.99, 0.87) pt3dadd(-256.25, -305.87, 189.09, 0.73) pt3dadd(-256.32, -305.8, 189.09, 0.73) pt3dadd(-257.2, -305.8, 189.09, 0.73) pt3dadd(-257.56, -305.51, 189.09, 0.73) pt3dadd(-257.64, -305.51, 189.09, 0.73) pt3dadd(-257.78, -304.92, 189.09, 1.02) pt3dadd(-257.78, -304.85, 189.09, 1.02) pt3dadd(-258.36, -304.41, 189.09, 1.02) pt3dadd(-259.02, -304.12, 189.09, 1.02) pt3dadd(-259.02, -303.98, 189.09, 1.02) pt3dadd(-259.39, -303.47, 189.54, 0.8) pt3dadd(-259.6, -302.81, 187.64, 0.8) pt3dadd(-260.04, -302.08, 187.64, 0.8) pt3dadd(-260.48, -301.79, 187.64, 0.66) pt3dadd(-261.13, -302.01, 187.64, 0.66) pt3dadd(-261.06, -302.37, 187.64, 0.66) pt3dadd(-260.92, -303.03, 187.64, 0.66) pt3dadd(-260.99, -303.61, 186.29, 0.87) pt3dadd(-261.65, -303.25, 186.29, 0.87) pt3dadd(-261.72, -303.25, 186.29, 0.87) pt3dadd(-262.37, -302.88, 185.79, 0.87) pt3dadd(-262.37, -302.88, 185.29, 0.87) pt3dadd(-263.03, -302.45, 185.14, 1.02) pt3dadd(-263.47, -301.5, 185.14, 1.02) pt3dadd(-263.54, -301.5, 185.14, 1.02) pt3dadd(-263.76, -301.06, 184.54, 1.09) pt3dadd(-264.05, -299.75, 184.04, 1.09) pt3dadd(-264.49, -300.7, 182.64, 0.66) pt3dadd(-264.49, -300.62, 182.64, 0.66) pt3dadd(-265, -301.35, 182.64, 0.66) } } proc shape3d_4() { dend[14] { pt3dadd(-265.07, -301.35, 182.64, 0.66) pt3dadd(-265.87, -301.21, 182.64, 0.66) pt3dadd(-265.95, -301.13, 182.64, 0.66) pt3dadd(-266.53, -300.48, 182.64, 0.66) pt3dadd(-266.67, -300.19, 182.64, 0.66) pt3dadd(-266.89, -299.82, 182.64, 0.66) pt3dadd(-266.75, -298.95, 181.94, 0.66) pt3dadd(-266.75, -298.87, 181.94, 0.66) pt3dadd(-266.53, -298.29, 181.94, 0.66) pt3dadd(-266.53, -298.22, 181.94, 0.66) pt3dadd(-266.46, -296.98, 181.94, 0.66) pt3dadd(-266.51, -296.17, 181.94, 0.66) pt3dadd(-267.35, -295.19, 181.94, 0.66) pt3dadd(-267.96, -294.75, 181.94, 0.66) pt3dadd(-267.96, -294.75, 181.84, 0.66) pt3dadd(-268.44, -294.47, 181.34, 0.66) pt3dadd(-269.31, -294.37, 181.34, 0.66) pt3dadd(-269.95, -294.81, 181.34, 0.66) pt3dadd(-270.28, -295.14, 181.34, 0.66) pt3dadd(-271.11, -295.33, 180.89, 0.66) pt3dadd(-271.76, -295.25, 180.54, 0.66) pt3dadd(-271.75, -295.18, 180.54, 0.66) pt3dadd(-271.65, -294.31, 180.54, 0.66) pt3dadd(-271.46, -293.9, 180.54, 0.66) pt3dadd(-271.27, -292.96, 180.54, 0.66) pt3dadd(-271.17, -292.1, 180.09, 0.66) pt3dadd(-271.04, -291.6, 180.04, 0.8) pt3dadd(-271.02, -290.86, 180.04, 0.8) pt3dadd(-271.33, -290.32, 179.39, 0.95) pt3dadd(-271.97, -289.58, 178.39, 0.8) pt3dadd(-272.77, -289.48, 178.39, 0.8) pt3dadd(-273.09, -289.74, 177.79, 0.8) pt3dadd(-273.85, -289.94, 177.79, 0.8) pt3dadd(-274.15, -289.39, 177.79, 0.66) pt3dadd(-274.34, -289.08, 177.14, 0.66) pt3dadd(-274.33, -289.01, 177.14, 0.66) pt3dadd(-274.03, -288.38, 177.14, 0.66) pt3dadd(-273.7, -287.47, 177.14, 0.66) pt3dadd(-272.84, -287.64, 177.14, 0.66) pt3dadd(-272.32, -288.14, 177.19, 0.66) pt3dadd(-272.32, -288.14, 176.99, 0.66) pt3dadd(-274.27, -287.32, 171.54, 0.58) pt3dadd(-274.93, -287.25, 171.54, 0.58) pt3dadd(-275.68, -287.45, 171.54, 0.58) pt3dadd(-276.53, -287.79, 171.54, 0.58) pt3dadd(-276.69, -287.85, 171.54, 0.58) pt3dadd(-277.32, -288.28, 171.54, 0.58) pt3dadd(-277.41, -288.42, 171.54, 0.58) pt3dadd(-278.01, -289.08, 171.54, 0.58) pt3dadd(-278.02, -289.23, 171.54, 0.58) pt3dadd(-278.75, -290.39, 171.54, 0.58) pt3dadd(-279.06, -291.75, 171.54, 0.58) pt3dadd(-279.06, -291.82, 171.54, 0.58) pt3dadd(-279.82, -293.27, 171.54, 0.58) pt3dadd(-280.36, -294.75, 171.49, 0.51) pt3dadd(-280.74, -296.03, 171.49, 0.51) pt3dadd(-281.34, -297.42, 171.49, 0.51) pt3dadd(-281.41, -297.41, 171.49, 0.51) pt3dadd(-281.51, -298.87, 171.49, 0.51) pt3dadd(-281.52, -298.94, 171.49, 0.51) pt3dadd(-281.32, -299.7, 171.49, 0.51) pt3dadd(-281.32, -299.7, 171.54, 0.51) pt3dadd(-280.76, -300.41, 171.49, 0.51) pt3dadd(-280.18, -301.06, 171.49, 0.51) pt3dadd(-280.5, -301.91, 171.49, 0.51) pt3dadd(-280.68, -302.84, 171.49, 0.51) pt3dadd(-280.8, -303.85, 171.49, 0.51) pt3dadd(-280.98, -304.71, 171.49, 0.51) pt3dadd(-281.29, -304.89, 171.49, 0.51) pt3dadd(-281.98, -305.11, 171.49, 0.51) pt3dadd(-281.99, -305.18, 171.49, 0.51) pt3dadd(-283.36, -306.26, 171.54, 0.51) pt3dadd(-283.9, -306.42, 170.94, 0.87) } dend[15] {pt3dclear() pt3dadd(-246.95, -307.09, 198.14, 0.73) pt3dadd(-246.85, -302.81, 198.14, 0.73) pt3dadd(-246.56, -300.99, 198.14, 0.73) pt3dadd(-246.61, -299.25, 198.09, 0.73) pt3dadd(-246.61, -297.72, 198.09, 0.73) pt3dadd(-246.43, -293.75, 198.09, 0.87) pt3dadd(-246.4, -296.19, 198.09, 0.87) pt3dadd(-246.83, -295.09, 196.29, 1.02) pt3dadd(-247.12, -293.93, 196.29, 0.51) pt3dadd(-247.71, -291.96, 195.64, 0.66) pt3dadd(-247.63, -290.94, 195.64, 0.66) pt3dadd(-248.29, -288.02, 194.09, 0.73) pt3dadd(-248.65, -286.27, 193.74, 0.73) pt3dadd(-248.87, -284.82, 193.74, 0.73) pt3dadd(-248.36, -282.05, 193.14, 0.8) pt3dadd(-248.14, -281.1, 193.14, 0.8) pt3dadd(-247.78, -280.15, 193.14, 0.8) pt3dadd(-248, -279.64, 193.14, 0.8) pt3dadd(-248, -279.42, 193.14, 0.8) pt3dadd(-248.36, -278.55, 193.14, 0.8) pt3dadd(-248.44, -278.55, 193.14, 0.8) pt3dadd(-249.09, -277.46, 193.14, 0.87) pt3dadd(-249.17, -277.02, 193.14, 0.87) pt3dadd(-249.46, -275.49, 193.14, 0.87) pt3dadd(-249.89, -273.08, 192.59, 0.87) pt3dadd(-249.89, -272.79, 192.59, 0.87) pt3dadd(-249.97, -271.41, 192.59, 0.87) pt3dadd(-250.84, -270.68, 193.39, 0.87) pt3dadd(-251.21, -269.66, 193.39, 0.87) pt3dadd(-251.11, -268.64, 191.79, 1.02) pt3dadd(-251.26, -268.06, 191.79, 0.66) pt3dadd(-251.33, -267.77, 191.79, 0.66) pt3dadd(-251.33, -267.69, 191.79, 0.66) pt3dadd(-251.33, -267.04, 191.79, 0.66) pt3dadd(-251.33, -266.96, 191.79, 0.66) pt3dadd(-251.62, -265.8, 192.09, 0.66) pt3dadd(-251.55, -265.8, 192.09, 0.66) pt3dadd(-251.62, -265, 192.64, 0.73) pt3dadd(-251.62, -264.92, 192.64, 0.73) pt3dadd(-251.4, -264.05, 192.64, 0.73) pt3dadd(-251.33, -262.81, 193.59, 0.73) pt3dadd(-251.11, -262.15, 193.59, 0.73) pt3dadd(-251.11, -261.93, 193.59, 0.73) pt3dadd(-250.89, -261.57, 193.59, 0.73) pt3dadd(-250.82, -261.5, 193.59, 0.73) pt3dadd(-250.89, -259.97, 193.59, 0.73) pt3dadd(-250.16, -258.15, 193.59, 0.73) pt3dadd(-250.24, -258.15, 193.59, 0.73) pt3dadd(-250.31, -256.91, 193.59, 1.17) pt3dadd(-250.31, -256.1, 193.59, 1.17) pt3dadd(-250.38, -255.45, 193.59, 0.95) pt3dadd(-250.38, -255.52, 193.59, 0.95) pt3dadd(-250.31, -255.23, 193.59, 0.95) pt3dadd(-249.73, -254.72, 193.59, 0.95) pt3dadd(-249.73, -253.99, 193.59, 0.66) pt3dadd(-249.87, -253.99, 193.59, 0.66) pt3dadd(-249.51, -253.7, 193.59, 0.66) pt3dadd(-249.07, -252.24, 193.59, 0.73) pt3dadd(-249.07, -250.71, 193.59, 0.73) pt3dadd(-249.22, -249.18, 193.59, 0.95) pt3dadd(-249.29, -249.18, 193.59, 0.95) pt3dadd(-249.73, -248.09, 193.59, 0.95) pt3dadd(-249.73, -248.01, 193.59, 0.95) pt3dadd(-249.73, -246.99, 193.59, 0.95) pt3dadd(-249.94, -245.83, 193.59, 0.95) pt3dadd(-249.94, -245.76, 193.59, 0.95) pt3dadd(-250.38, -245.1, 193.59, 0.95) pt3dadd(-251.11, -244.08, 193.59, 0.95) pt3dadd(-251.26, -243.42, 193.59, 0.95) pt3dadd(-251.69, -242.99, 193.59, 0.95) pt3dadd(-251.77, -242.69, 193.59, 0.95) pt3dadd(-251.84, -242.55, 193.59, 0.95) pt3dadd(-251.99, -241.97, 193.59, 0.73) pt3dadd(-253.22, -241.75, 193.59, 0.73) pt3dadd(-253.3, -241.75, 193.59, 0.73) pt3dadd(-254.54, -241.16, 193.59, 0.73) pt3dadd(-254.61, -241.16, 193.59, 0.73) pt3dadd(-254.83, -240.73, 193.59, 0.73) pt3dadd(-255.19, -239.85, 193.59, 0.73) pt3dadd(-255.19, -239.12, 193.59, 0.73) pt3dadd(-255.19, -239.05, 193.59, 0.73) pt3dadd(-255.78, -238.1, 193.54, 0.8) pt3dadd(-255.99, -237.52, 193.54, 0.8) pt3dadd(-256.14, -237.08, 193.54, 0.8) pt3dadd(-256.29, -236.43, 193.54, 0.8) pt3dadd(-255.99, -236.43, 193.54, 0.8) pt3dadd(-255.56, -235.63, 193.54, 0.44) pt3dadd(-255.56, -235.7, 193.54, 0.44) pt3dadd(-255.99, -235.19, 193.54, 0.44) pt3dadd(-256.5, -235.04, 193.59, 1.02) pt3dadd(-256.8, -234.82, 193.59, 1.02) pt3dadd(-257.16, -234.39, 193.59, 0.66) pt3dadd(-257.96, -233.66, 193.59, 0.66) pt3dadd(-258.84, -233.07, 193.59, 0.87) pt3dadd(-258.51, -232.69, 193.59, 0.87) pt3dadd(-258.66, -232.08, 193.59, 0.87) pt3dadd(-258.58, -231.43, 193.59, 0.87) pt3dadd(-258.72, -230.76, 192.34, 0.8) pt3dadd(-258.85, -230.01, 192.34, 0.8) pt3dadd(-259.06, -229.91, 191.39, 0.8) pt3dadd(-259.5, -229.93, 190.94, 0.8) pt3dadd(-260.31, -230.57, 190.59, 0.8) pt3dadd(-260.97, -230.56, 190.59, 0.8) pt3dadd(-261.53, -230.28, 190.59, 0.8) pt3dadd(-261.93, -230.01, 190.59, 0.58) pt3dadd(-262.33, -229.67, 190.64, 0.58) pt3dadd(-262.3, -228.79, 190.64, 0.58) pt3dadd(-262.26, -228.43, 190.49, 0.58) pt3dadd(-262.26, -228.43, 190.14, 0.58) pt3dadd(-262.7, -228.38, 190.14, 0.58) pt3dadd(-263.4, -228.73, 190.09, 0.51) pt3dadd(-264.38, -228.98, 189.79, 0.51) pt3dadd(-264.75, -229.01, 189.29, 0.44) pt3dadd(-265.26, -228.95, 189.29, 0.44) pt3dadd(-265.42, -229.67, 188.89, 0.36) pt3dadd(-265.03, -230.08, 188.89, 0.36) pt3dadd(-265.16, -230.58, 187.54, 0.29) pt3dadd(-265.47, -230.76, 187.54, 0.29) pt3dadd(-266.02, -230.41, 187.54, 0.29) pt3dadd(-266.02, -230.41, 187.49, 0.29) pt3dadd(-266.56, -230.05, 187.14, 0.22) pt3dadd(-267.12, -229.76, 187.14, 0.22) pt3dadd(-267.62, -229.63, 186.39, 0.44) pt3dadd(-268.12, -230.16, 186.39, 0.44) pt3dadd(-268.77, -230.67, 186.39, 0.44) pt3dadd(-269.33, -230.45, 186.39, 0.44) pt3dadd(-269.3, -230.24, 186.39, 0.44) } } proc shape3d_5() { dend[15] { pt3dadd(-269.16, -229.67, 186.39, 0.44) pt3dadd(-268.99, -228.88, 186.39, 0.44) pt3dadd(-269.48, -228.6, 185.39, 0.36) pt3dadd(-269.54, -228.52, 185.39, 0.36) pt3dadd(-270.19, -228.44, 185.39, 0.36) pt3dadd(-270.69, -228.97, 184.19, 0.36) pt3dadd(-270.6, -229.42, 183.79, 0.36) pt3dadd(-270.54, -230.16, 183.79, 0.36) pt3dadd(-270.39, -230.77, 183.24, 0.36) pt3dadd(-270.91, -230.78, 181.64, 0.58) pt3dadd(-271.05, -230.76, 181.64, 0.58) pt3dadd(-271.41, -230.65, 181.64, 0.58) pt3dadd(-271.46, -230.5, 181.64, 0.58) pt3dadd(-272.03, -230.35, 182.09, 0.58) pt3dadd(-272.6, -230.21, 182.09, 0.58) pt3dadd(-272.87, -229.96, 181.69, 0.58) pt3dadd(-273.28, -229.69, 181.69, 0.58) pt3dadd(-273.42, -229.68, 181.69, 0.58) pt3dadd(-273.91, -230.13, 181.69, 0.58) pt3dadd(-274.27, -230.68, 181.69, 0.58) pt3dadd(-274.2, -230.69, 181.69, 0.58) } dend[16] {pt3dclear() pt3dadd(-238.2, -302.79, 199.64, 0.73) pt3dadd(-239.07, -301.86, 198.84, 0.73) pt3dadd(-239.72, -300.91, 199.49, 0.73) pt3dadd(-239.72, -300.84, 199.49, 0.73) pt3dadd(-240.45, -299.96, 199.49, 0.73) pt3dadd(-241.33, -298.72, 199.49, 0.73) pt3dadd(-241.55, -297.92, 199.49, 0.95) pt3dadd(-241.4, -297.85, 199.49, 0.95) pt3dadd(-241.98, -296.76, 200.14, 0.95) pt3dadd(-241.98, -296.68, 200.14, 0.95) pt3dadd(-241.98, -296.1, 200.14, 0.95) pt3dadd(-241.62, -295.23, 200.14, 1.24) pt3dadd(-240.74, -293.91, 200.14, 1.24) pt3dadd(-240.01, -292.82, 200.69, 0.95) pt3dadd(-239.5, -292.46, 201.39, 1.09) } dend[17] {pt3dclear() pt3dadd(-239.5, -292.46, 201.39, 0.73) pt3dadd(-238.78, -292.31, 202.14, 0.73) pt3dadd(-238.12, -291.65, 202.14, 0.73) pt3dadd(-237.03, -291.07, 202.14, 0.66) pt3dadd(-236.73, -290.63, 202.99, 0.66) pt3dadd(-236.44, -289.98, 202.99, 0.66) pt3dadd(-237.03, -289.54, 202.99, 0.66) pt3dadd(-237.54, -289.25, 202.99, 0.66) pt3dadd(-237.9, -288.3, 203.44, 0.66) pt3dadd(-238.19, -287.57, 204.24, 0.73) pt3dadd(-238.41, -287.35, 205.44, 0.73) pt3dadd(-238.19, -286.04, 205.44, 0.73) pt3dadd(-238.05, -285.02, 205.44, 0.73) pt3dadd(-238.12, -284, 205.44, 0.73) pt3dadd(-237.9, -282.4, 205.99, 0.73) pt3dadd(-237.9, -281.31, 205.99, 0.73) pt3dadd(-237.9, -280.43, 205.99, 0.73) pt3dadd(-237.9, -280.36, 205.99, 0.73) pt3dadd(-237.61, -279.85, 205.99, 0.8) pt3dadd(-237.46, -278.68, 205.99, 0.8) pt3dadd(-237.39, -278.54, 205.99, 0.8) pt3dadd(-236.22, -276.28, 205.99, 0.8) pt3dadd(-235.88, -274.25, 205.99, 0.66) pt3dadd(-235.66, -272.5, 205.99, 0.66) pt3dadd(-235.15, -271.19, 207.94, 0.66) pt3dadd(-235.15, -271.12, 207.94, 0.66) pt3dadd(-234.93, -270.24, 207.94, 0.66) pt3dadd(-234.86, -270.24, 207.94, 0.66) pt3dadd(-234.57, -269.95, 207.94, 0.66) pt3dadd(-234.64, -269.88, 207.94, 0.66) pt3dadd(-234.71, -269.88, 207.94, 0.66) pt3dadd(-235.37, -269.51, 207.94, 0.66) pt3dadd(-235.73, -269.22, 207.94, 0.66) pt3dadd(-236.46, -269.22, 207.94, 0.66) pt3dadd(-237.05, -268.86, 207.94, 0.66) pt3dadd(-237.41, -268.49, 207.94, 0.95) pt3dadd(-237.77, -267.47, 208.44, 0.95) pt3dadd(-237.56, -266.38, 208.69, 0.95) pt3dadd(-237.26, -265.87, 208.99, 0.95) pt3dadd(-237.26, -265.87, 208.89, 0.95) pt3dadd(-236.83, -265.21, 209.59, 0.8) pt3dadd(-237.12, -264.27, 209.84, 0.8) pt3dadd(-237.48, -263.47, 209.84, 0.8) pt3dadd(-237.7, -262.44, 209.84, 0.8) pt3dadd(-237.7, -262.37, 209.84, 0.8) pt3dadd(-238.21, -258.95, 209.84, 0.8) pt3dadd(-239.23, -256.69, 210.49, 0.8) pt3dadd(-239.45, -255.81, 210.49, 0.8) pt3dadd(-240.11, -254.5, 211.29, 0.8) pt3dadd(-240.11, -254.36, 211.29, 0.8) pt3dadd(-240.76, -253.55, 211.54, 0.8) pt3dadd(-242.08, -251.95, 210.54, 0.8) pt3dadd(-242.88, -251.08, 210.49, 1.02) pt3dadd(-243.83, -249.62, 210.54, 1.02) pt3dadd(-244.12, -248.6, 210.99, 0.8) pt3dadd(-244.55, -247.8, 210.99, 0.8) pt3dadd(-244.92, -247.29, 210.99, 0.8) pt3dadd(-244.77, -245.54, 210.99, 0.8) pt3dadd(-244.4, -243.52, 210.99, 0.8) pt3dadd(-244.18, -241.99, 210.99, 0.8) pt3dadd(-243.67, -240.82, 210.99, 0.8) pt3dadd(-243.67, -240.82, 211.04, 0.8) pt3dadd(-244.03, -239.07, 210.29, 0.95) pt3dadd(-244.32, -238.64, 210.29, 0.95) pt3dadd(-243.59, -237.62, 210.29, 0.8) pt3dadd(-242.65, -237.33, 210.29, 0.8) pt3dadd(-242.65, -237.25, 210.29, 0.8) pt3dadd(-241.92, -236.96, 210.29, 0.8) pt3dadd(-241.84, -236.89, 210.29, 0.8) pt3dadd(-240.61, -236.23, 210.29, 0.8) } dend[18] {pt3dclear() pt3dadd(-239.5, -292.46, 201.39, 0.73) pt3dadd(-239.29, -291.49, 201.44, 0.73) pt3dadd(-239.37, -290.32, 201.44, 0.73) pt3dadd(-239.44, -290.1, 201.44, 0.73) pt3dadd(-240.17, -289.37, 201.44, 0.73) pt3dadd(-241.55, -288.94, 201.44, 0.73) pt3dadd(-242.5, -288.35, 201.44, 0.73) pt3dadd(-243.38, -287.41, 201.44, 0.73) pt3dadd(-243.45, -287.26, 201.44, 0.73) pt3dadd(-243.6, -287.19, 201.44, 0.73) pt3dadd(-244.4, -286.46, 201.44, 0.73) pt3dadd(-245.2, -285.51, 200.04, 0.73) pt3dadd(-245.42, -285.37, 200.04, 0.73) pt3dadd(-245.56, -285.29, 200.04, 0.73) pt3dadd(-245.85, -284.64, 200.04, 0.73) pt3dadd(-246.07, -284.56, 200.04, 0.87) pt3dadd(-246, -283.54, 200.04, 1.02) pt3dadd(-246.29, -282.38, 200.04, 1.02) pt3dadd(-246.95, -281.65, 199.54, 1.02) pt3dadd(-246.95, -280.56, 198.74, 0.95) pt3dadd(-247.02, -280.56, 198.74, 0.95) pt3dadd(-247.9, -279.9, 198.74, 0.95) pt3dadd(-247.9, -279.83, 198.74, 0.95) pt3dadd(-248.48, -279.1, 198.74, 0.73) pt3dadd(-249.57, -276.99, 198.74, 0.73) pt3dadd(-249.57, -276.91, 198.74, 0.73) pt3dadd(-249.57, -276.69, 198.74, 1.02) pt3dadd(-249.43, -275.96, 198.74, 1.02) pt3dadd(-249.43, -275.67, 198.74, 1.02) pt3dadd(-249.79, -274.51, 198.74, 1.02) pt3dadd(-249.57, -273.41, 198.74, 1.02) pt3dadd(-249.65, -273.34, 198.74, 1.02) pt3dadd(-250.08, -271.96, 198.74, 1.02) pt3dadd(-250.74, -270.5, 198.69, 1.68) pt3dadd(-251.03, -270.06, 198.74, 2.11) } dend[19] {pt3dclear() pt3dadd(-251.03, -270.06, 198.74, 1.17) pt3dadd(-250.3, -269.11, 198.39, 1.17) pt3dadd(-249.94, -268.17, 198.44, 0.87) pt3dadd(-250.01, -267.95, 198.44, 0.87) pt3dadd(-250.08, -266.78, 198.44, 0.87) pt3dadd(-250.16, -266.56, 198.44, 0.87) pt3dadd(-250.23, -266.56, 198.44, 0.87) pt3dadd(-250.3, -265.83, 198.44, 0.87) pt3dadd(-250.81, -264.74, 198.54, 0.8) pt3dadd(-251.1, -264.23, 198.59, 0.8) pt3dadd(-251.03, -263.43, 198.59, 0.8) pt3dadd(-250.81, -262.48, 198.64, 0.8) pt3dadd(-249.72, -262.77, 198.54, 0.8) pt3dadd(-249.72, -262.77, 198.74, 0.8) pt3dadd(-250.16, -262.12, 200.24, 0.8) pt3dadd(-250.3, -261.02, 200.24, 0.8) pt3dadd(-249.99, -259.95, 200.24, 0.8) pt3dadd(-249.99, -259.66, 200.24, 0.8) pt3dadd(-249.77, -257.98, 200.24, 0.8) pt3dadd(-249.77, -257.55, 200.24, 0.8) pt3dadd(-249.48, -255.72, 200.24, 0.8) pt3dadd(-249.63, -254.85, 200.24, 0.8) pt3dadd(-249.77, -254.63, 200.24, 0.8) pt3dadd(-250.21, -252.37, 200.24, 0.8) pt3dadd(-250.28, -252.3, 200.24, 0.8) pt3dadd(-250.06, -248.51, 200.24, 0.8) pt3dadd(-249.55, -247.34, 200.24, 0.8) pt3dadd(-249.55, -247.12, 200.24, 0.8) pt3dadd(-249.48, -247.05, 200.24, 0.8) pt3dadd(-249.04, -244.72, 200.24, 0.8) pt3dadd(-249.12, -244.65, 200.24, 0.8) pt3dadd(-249.04, -244.28, 200.24, 0.8) pt3dadd(-249.85, -240.93, 200.24, 0.8) pt3dadd(-249.85, -241, 200.24, 0.8) pt3dadd(-249.92, -240.05, 200.29, 0.51) pt3dadd(-249.77, -239.4, 200.34, 1.09) pt3dadd(-249.55, -238.67, 200.34, 1.09) pt3dadd(-249.55, -238.67, 200.39, 1.09) pt3dadd(-248.83, -237.72, 200.44, 0.87) pt3dadd(-248.83, -237.72, 200.39, 0.87) pt3dadd(-247.22, -235.17, 200.29, 0.87) pt3dadd(-247, -234.95, 200.29, 0.87) pt3dadd(-247, -233.64, 201.04, 0.73) pt3dadd(-247, -233.5, 201.04, 0.73) pt3dadd(-246.86, -232.04, 201.44, 0.73) pt3dadd(-246.86, -232.04, 201.79, 0.73) pt3dadd(-247.29, -230.87, 202.19, 1.24) pt3dadd(-246.94, -229.58, 202.19, 1.02) } dend[20] {pt3dclear() pt3dadd(-251.03, -270.06, 198.74, 0.66) pt3dadd(-252.03, -270.7, 198.74, 0.66) pt3dadd(-252.18, -270.7, 198.74, 0.66) pt3dadd(-252.98, -270.7, 198.74, 0.66) pt3dadd(-253.12, -270.77, 198.74, 0.66) pt3dadd(-253.85, -270.55, 198.74, 0.66) pt3dadd(-254.14, -270.55, 198.74, 0.66) pt3dadd(-254.87, -270.04, 198.74, 0.66) pt3dadd(-256.18, -269.97, 197.69, 0.66) pt3dadd(-257.21, -269.97, 197.69, 0.51) pt3dadd(-256.92, -269.13, 197.69, 0.8) } } proc shape3d_6() { dend[20] { pt3dadd(-257.8, -269.35, 197.69, 0.8) pt3dadd(-258.31, -269.35, 197.69, 0.8) pt3dadd(-259.26, -269.5, 197.69, 0.8) pt3dadd(-259.91, -269.2, 197.69, 0.8) pt3dadd(-260.64, -268.99, 197.69, 0.8) pt3dadd(-261.3, -268.91, 197.69, 0.8) pt3dadd(-262.03, -269.28, 197.69, 0.8) pt3dadd(-261.95, -269.35, 197.69, 0.8) pt3dadd(-262.75, -269.57, 197.34, 0.8) pt3dadd(-263.48, -269.86, 196.94, 0.8) pt3dadd(-264.65, -270.08, 196.39, 0.8) pt3dadd(-265.09, -269.71, 196.39, 0.8) pt3dadd(-265.38, -268.99, 195.89, 0.8) pt3dadd(-265.23, -268.48, 195.89, 0.8) pt3dadd(-265.23, -268.4, 195.89, 0.8) pt3dadd(-264.87, -267.75, 195.89, 0.8) pt3dadd(-264.94, -267.09, 195.59, 0.95) pt3dadd(-265.38, -266.51, 193.69, 1.75) pt3dadd(-265.38, -265.49, 191.69, 1.17) pt3dadd(-264.8, -264.9, 191.69, 1.17) pt3dadd(-264.29, -264.18, 191.69, 1.02) pt3dadd(-264.14, -263.74, 191.69, 1.02) pt3dadd(-263.99, -263.59, 191.69, 1.02) pt3dadd(-263.26, -263.81, 191.69, 1.02) pt3dadd(-262.32, -263.88, 191.59, 1.46) pt3dadd(-263.85, -262.94, 188.99, 0.8) pt3dadd(-264.36, -262.14, 188.99, 0.8) pt3dadd(-264.5, -262.14, 188.99, 0.8) pt3dadd(-265.23, -261.33, 188.99, 0.8) pt3dadd(-265.89, -260.46, 188.79, 0.8) pt3dadd(-266.54, -260.09, 188.79, 1.09) pt3dadd(-266.76, -259.15, 187.94, 1.39) pt3dadd(-267.06, -257.84, 187.94, 1.39) pt3dadd(-268.08, -257.69, 187.94, 0.87) pt3dadd(-268.51, -257.98, 187.09, 0.87) pt3dadd(-268.95, -257.47, 187.09, 0.87) pt3dadd(-268.95, -257.4, 187.09, 0.87) pt3dadd(-268.88, -256.74, 185.94, 0.87) pt3dadd(-268.8, -256.6, 185.94, 0.87) pt3dadd(-268.29, -255.65, 185.94, 0.87) pt3dadd(-268.29, -255.58, 185.94, 0.87) pt3dadd(-268.29, -254.85, 185.49, 0.87) pt3dadd(-268.37, -253.75, 185.49, 0.87) pt3dadd(-268.22, -253.03, 185.49, 0.87) pt3dadd(-267.71, -252.15, 185.49, 1.02) pt3dadd(-267.71, -252.08, 185.49, 1.02) pt3dadd(-267.71, -251.42, 185.49, 1.02) pt3dadd(-267.71, -251.42, 185.44, 1.02) pt3dadd(-267.2, -250.84, 184.84, 0.87) pt3dadd(-267.13, -250.77, 184.84, 0.87) pt3dadd(-266.69, -249.96, 184.84, 0.73) pt3dadd(-266.54, -249.45, 184.84, 0.73) pt3dadd(-266.84, -248.94, 184.84, 0.73) pt3dadd(-267.35, -248.58, 184.84, 0.73) pt3dadd(-267.42, -247.7, 182.09, 0.73) pt3dadd(-267.13, -246.61, 182.09, 0.73) pt3dadd(-267.13, -246.47, 182.09, 0.73) pt3dadd(-267.13, -245.81, 182.09, 0.73) pt3dadd(-267.35, -245.08, 182.09, 0.95) pt3dadd(-267.42, -245.01, 182.09, 0.95) pt3dadd(-267.64, -243.77, 182.09, 0.95) pt3dadd(-267.64, -243.62, 182.09, 0.95) pt3dadd(-267.78, -243.04, 182.09, 0.95) pt3dadd(-267.64, -242.24, 180.69, 0.87) pt3dadd(-267.93, -241.66, 180.69, 0.87) pt3dadd(-267.98, -241.08, 180.59, 0.8) } dend[21] {pt3dclear() pt3dadd(-238.2, -302.79, 199.64, 0.87) pt3dadd(-237.4, -303.75, 199.64, 0.87) pt3dadd(-237.03, -303.74, 199.64, 0.87) pt3dadd(-235.47, -303.7, 200.39, 0.87) pt3dadd(-235.06, -303.54, 200.39, 0.73) pt3dadd(-234.27, -304.04, 200.39, 0.73) pt3dadd(-233.65, -304.49, 200.39, 0.73) pt3dadd(-233.58, -304.48, 200.39, 0.73) pt3dadd(-233.11, -304.23, 201.89, 0.87) pt3dadd(-231.99, -303.91, 201.89, 0.87) pt3dadd(-231.97, -303.98, 201.89, 0.87) pt3dadd(-231.22, -304.33, 202.39, 0.87) pt3dadd(-230.85, -305, 202.39, 0.87) pt3dadd(-230.84, -305.07, 202.39, 0.87) pt3dadd(-230.64, -305.62, 203.19, 0.73) pt3dadd(-231.06, -306.09, 203.19, 0.58) pt3dadd(-231.05, -306.16, 203.19, 0.58) pt3dadd(-230.89, -306.87, 203.19, 0.58) pt3dadd(-230.87, -306.94, 203.19, 0.58) pt3dadd(-230.15, -307.53, 203.19, 0.58) pt3dadd(-230.04, -307.66, 203.19, 0.58) pt3dadd(-229.56, -308.15, 203.19, 0.58) pt3dadd(-229.11, -309.17, 203.19, 0.58) pt3dadd(-228.47, -310.07, 203.19, 0.58) pt3dadd(-228.45, -310.14, 203.19, 0.58) pt3dadd(-227.88, -310.69, 203.34, 0.73) pt3dadd(-227.87, -310.76, 203.34, 0.73) pt3dadd(-227.48, -312.17, 203.34, 0.73) pt3dadd(-227.41, -312.15, 203.34, 0.73) pt3dadd(-227.17, -313.36, 203.34, 0.73) pt3dadd(-226.7, -314.15, 203.34, 0.73) pt3dadd(-226.83, -314.55, 203.34, 0.73) pt3dadd(-227.07, -315.5, 203.34, 0.73) pt3dadd(-227.04, -315.64, 203.34, 0.73) pt3dadd(-227.49, -316.33, 203.34, 0.73) pt3dadd(-227.67, -317.2, 202.84, 0.73) pt3dadd(-227.57, -317.32, 202.84, 0.73) pt3dadd(-227.5, -317.61, 202.99, 0.73) pt3dadd(-227.33, -318.39, 203.14, 0.73) pt3dadd(-227, -319.21, 203.14, 0.66) pt3dadd(-226.62, -320.25, 203.14, 0.66) pt3dadd(-226.82, -321.41, 203.14, 0.66) pt3dadd(-226.58, -322.48, 203.14, 0.66) pt3dadd(-226.77, -324.01, 203.14, 0.66) pt3dadd(-226.84, -324.03, 203.14, 0.66) pt3dadd(-227.14, -324.69, 203.14, 0.66) pt3dadd(-227.16, -325.29, 203.14, 0.66) pt3dadd(-227.21, -325.38, 203.14, 0.66) pt3dadd(-227.28, -326.07, 203.14, 0.66) pt3dadd(-227.86, -327.54, 203.89, 0.66) pt3dadd(-228.37, -328.62, 203.89, 0.66) pt3dadd(-228.22, -329.63, 203.89, 0.95) pt3dadd(-227.49, -330.22, 203.89, 1.17) pt3dadd(-226.42, -331.02, 203.89, 1.17) pt3dadd(-225.29, -331.75, 204.64, 1.17) pt3dadd(-225.4, -332.59, 204.64, 0.66) pt3dadd(-225.56, -333.9, 204.64, 0.66) pt3dadd(-225.49, -334.55, 204.64, 0.73) pt3dadd(-225.15, -335.45, 204.64, 0.73) pt3dadd(-225.18, -335.98, 204.64, 0.58) } apic {pt3dclear() pt3dstyle(1, -222.449, -286.757, 190.718) pt3dadd(-215.59, -284.08, 190.54, 3.21) pt3dadd(-214.28, -283.5, 190.54, 2.55) pt3dadd(-213.11, -282.48, 190.54, 2.7) pt3dadd(-212.75, -281.97, 189.54, 3.06) pt3dadd(-212.16, -280.66, 189.54, 2.62) pt3dadd(-211.8, -280, 189.54, 2.48) pt3dadd(-211, -279.13, 188.89, 2.33) pt3dadd(-209.83, -278.4, 188.44, 2.33) pt3dadd(-209.03, -277.52, 188.44, 2.33) pt3dadd(-208.52, -276.79, 187.99, 2.33) pt3dadd(-207.5, -275.85, 185.64, 2.33) pt3dadd(-206.77, -275.12, 185.59, 2.33) } apic[1] {pt3dclear() pt3dadd(-206.77, -275.12, 185.59, 1.46) pt3dadd(-207.13, -273.22, 185.59, 1.46) pt3dadd(-206.77, -271.91, 185.59, 1.46) pt3dadd(-205.68, -270.74, 185.59, 1.46) pt3dadd(-204.8, -270.45, 185.59, 1.31) pt3dadd(-204, -269.87, 184.64, 1.31) pt3dadd(-203.2, -270.09, 184.64, 1.53) pt3dadd(-201.81, -270.09, 183.84, 2.19) } apic[2] {pt3dclear() pt3dadd(-201.81, -270.09, 183.84, 1.82) pt3dadd(-201.01, -269, 183.84, 1.82) pt3dadd(-199.77, -267.54, 183.84, 1.82) pt3dadd(-198.68, -267.1, 183.84, 1.53) pt3dadd(-198.68, -267.1, 183.54, 1.53) pt3dadd(-197.73, -266.08, 183.24, 1.53) pt3dadd(-196.56, -265.06, 182.64, 1.53) pt3dadd(-195.18, -263.75, 181.99, 1.53) pt3dadd(-195.18, -263.68, 181.99, 1.53) pt3dadd(-194.52, -262.58, 181.99, 1.53) pt3dadd(-194.52, -262.44, 181.99, 1.53) pt3dadd(-193.65, -261.71, 181.99, 1.53) pt3dadd(-192.55, -261.34, 181.94, 1.53) pt3dadd(-192.48, -261.34, 181.94, 1.53) pt3dadd(-190.8, -261.63, 181.49, 1.53) pt3dadd(-190.73, -261.71, 181.49, 1.53) pt3dadd(-189.49, -262.36, 180.99, 1.53) pt3dadd(-188.47, -262.73, 181.39, 1.68) pt3dadd(-187.16, -262.73, 181.39, 1.68) pt3dadd(-186.36, -261.63, 181.39, 1.68) pt3dadd(-185.48, -260.25, 181.39, 1.68) pt3dadd(-185.48, -260.1, 181.39, 1.68) pt3dadd(-184.32, -259.74, 181.39, 1.82) pt3dadd(-183.73, -258.94, 181.39, 1.82) pt3dadd(-182.64, -258.5, 181.19, 1.82) pt3dadd(-182.64, -258.5, 180.94, 1.82) pt3dadd(-181.47, -257.85, 180.29, 1.75) pt3dadd(-181.4, -257.85, 180.29, 1.75) pt3dadd(-180.53, -257.63, 180.29, 1.31) pt3dadd(-180.45, -257.55, 180.29, 1.31) pt3dadd(-179.87, -257.26, 180.34, 1.31) pt3dadd(-178.7, -256.82, 180.34, 1.39) pt3dadd(-178.7, -256.68, 180.34, 1.39) pt3dadd(-177.61, -256.31, 180.34, 1.39) pt3dadd(-176.66, -255.8, 180.34, 1.24) pt3dadd(-176.59, -255.66, 180.34, 1.24) pt3dadd(-175.79, -255, 180.34, 1.24) pt3dadd(-174.69, -253.76, 180.69, 1.39) pt3dadd(-174.62, -253.76, 180.69, 1.39) pt3dadd(-173.6, -252.89, 180.69, 1.39) pt3dadd(-173.53, -252.89, 180.69, 1.39) pt3dadd(-172, -251.87, 180.69, 1.39) pt3dadd(-170.61, -250.41, 179.94, 1.39) pt3dadd(-170.54, -250.34, 179.94, 1.39) pt3dadd(-169.68, -249.9, 179.94, 1.39) pt3dadd(-168.44, -250.05, 179.94, 1.39) pt3dadd(-167.27, -249.98, 180.69, 1.46) pt3dadd(-166.4, -249.98, 180.69, 1.46) pt3dadd(-165.38, -250.56, 180.69, 1.46) pt3dadd(-164.43, -250.85, 180.69, 1.46) pt3dadd(-163.63, -251.36, 179.54, 1.46) pt3dadd(-163.12, -251.43, 179.54, 1.46) pt3dadd(-162.61, -251.51, 179.54, 1.46) } } proc shape3d_7() { apic[2] { pt3dadd(-162.46, -251.51, 179.54, 1.46) pt3dadd(-161.59, -251.8, 179.54, 1.46) pt3dadd(-161.59, -251.87, 179.54, 1.46) pt3dadd(-160.93, -252.16, 179.54, 1.24) pt3dadd(-159.84, -252.23, 179.54, 1.24) pt3dadd(-158.82, -252.31, 179.59, 1.31) pt3dadd(-157.94, -252.38, 179.59, 1.31) pt3dadd(-157.2, -252.46, 179.59, 1.09) pt3dadd(-155.67, -252.56, 179.59, 1.09) pt3dadd(-155.65, -252.42, 179.59, 1.09) pt3dadd(-154.12, -251.87, 179.59, 1.09) pt3dadd(-152.88, -251.94, 179.59, 1.31) pt3dadd(-151.68, -251.79, 177.84, 1.46) pt3dadd(-151.35, -251.46, 177.84, 1.46) pt3dadd(-150.12, -251.61, 178.24, 1.39) pt3dadd(-150.12, -251.61, 178.29, 1.39) pt3dadd(-148.15, -251.69, 177.09, 1.39) pt3dadd(-146.03, -251.72, 177.09, 1.39) pt3dadd(-146.03, -251.72, 176.74, 1.39) pt3dadd(-143.67, -251.71, 177.54, 1.39) pt3dadd(-143.52, -251.65, 177.54, 1.39) pt3dadd(-141.23, -251.48, 177.54, 1.39) pt3dadd(-139.35, -251.12, 177.54, 1.39) pt3dadd(-136.86, -251.19, 176.09, 1.39) pt3dadd(-135.36, -250.93, 176.09, 1.53) pt3dadd(-133.59, -250.85, 176.09, 1.53) pt3dadd(-131.06, -250.56, 176.09, 1.53) pt3dadd(-129.57, -250.96, 176.09, 1.53) pt3dadd(-128.03, -250.99, 175.74, 1.6) pt3dadd(-127.96, -251, 175.74, 1.6) pt3dadd(-127.24, -251.16, 175.74, 1.6) } apic[3] {pt3dclear() pt3dadd(-127.24, -251.16, 175.74, 1.6) pt3dadd(-125.99, -250.5, 175.74, 1.6) pt3dadd(-125.77, -250.52, 175.74, 1.6) pt3dadd(-125.61, -250.4, 175.74, 1.6) pt3dadd(-124.29, -249.16, 175.74, 1.6) pt3dadd(-122.06, -249.57, 166.59, 1.6) pt3dadd(-121.77, -249.6, 166.59, 1.6) pt3dadd(-120.43, -249.4, 166.64, 1.97) pt3dadd(-119.26, -249.46, 166.64, 1.97) pt3dadd(-117.7, -249.28, 166.64, 1.68) pt3dadd(-116.9, -249.42, 166.64, 0.73) pt3dadd(-115.63, -248.28, 166.69, 0.87) pt3dadd(-114.55, -247.95, 166.69, 1.39) pt3dadd(-113.61, -247.62, 166.69, 1.68) pt3dadd(-112.6, -247.51, 166.69, 1.68) pt3dadd(-111.51, -247.33, 166.69, 1.68) pt3dadd(-111.36, -247.32, 166.69, 1.68) pt3dadd(-109.98, -247.34, 166.69, 1.68) pt3dadd(-109.9, -247.34, 166.69, 1.68) pt3dadd(-108.23, -247.35, 166.69, 1.68) pt3dadd(-105.09, -247.38, 166.69, 1.68) pt3dadd(-103.05, -247.31, 166.69, 1.68) pt3dadd(-101.23, -247.24, 166.04, 1.68) pt3dadd(-101.16, -247.09, 166.04, 1.68) pt3dadd(-99.36, -246.44, 166.04, 1.68) pt3dadd(-99.14, -246.44, 166.04, 1.68) pt3dadd(-96.53, -246.05, 166.04, 1.68) pt3dadd(-93.1, -246.07, 165.34, 1.68) pt3dadd(-91.59, -245.51, 165.34, 1.68) pt3dadd(-91.52, -245.43, 165.34, 1.68) pt3dadd(-90.33, -246.12, 165.34, 1.75) pt3dadd(-88.64, -246.42, 164.44, 1.75) pt3dadd(-88.57, -246.42, 164.44, 1.75) pt3dadd(-87.39, -246.67, 164.44, 1.75) pt3dadd(-85.99, -246.91, 164.44, 1.75) pt3dadd(-84.25, -246.84, 162.69, 1.68) pt3dadd(-83.53, -246.67, 162.69, 1.75) pt3dadd(-82.35, -247.14, 162.74, 1.75) pt3dadd(-80.27, -247.94, 160.79, 1.6) pt3dadd(-79.31, -248.27, 160.79, 1.82) pt3dadd(-78.13, -248.59, 160.79, 2.04) pt3dadd(-78.06, -248.59, 160.79, 2.04) pt3dadd(-77.11, -248.62, 160.79, 2.33) pt3dadd(-75.27, -249.14, 160.79, 2.33) } apic[4] {pt3dclear() pt3dadd(-75.27, -249.14, 160.79, 1.82) pt3dadd(-73.78, -248.07, 160.89, 1.82) pt3dadd(-73.7, -248.06, 160.89, 1.82) pt3dadd(-72.88, -246.79, 160.89, 1.82) pt3dadd(-71.73, -246.24, 160.89, 1.82) pt3dadd(-69.56, -245.58, 160.89, 1.82) pt3dadd(-69.49, -245.58, 160.89, 1.82) pt3dadd(-68.27, -244.95, 160.89, 1.82) pt3dadd(-66.76, -244.45, 160.89, 1.82) pt3dadd(-66.69, -244.45, 160.89, 1.82) pt3dadd(-65.04, -243.66, 159.39, 1.68) pt3dadd(-64.03, -243.41, 159.39, 1.39) pt3dadd(-62.82, -242.42, 159.39, 1.39) pt3dadd(-61.76, -241.65, 159.39, 1.39) pt3dadd(-61.68, -241.64, 159.39, 1.39) pt3dadd(-60.39, -241.16, 159.39, 1.39) pt3dadd(-60.24, -241.15, 159.39, 1.39) pt3dadd(-59.59, -240.98, 159.09, 1.39) pt3dadd(-59.45, -240.98, 159.09, 1.39) pt3dadd(-58.58, -240.87, 159.09, 1.39) pt3dadd(-58.51, -240.8, 159.09, 1.39) pt3dadd(-56.68, -240.95, 158.49, 1.39) pt3dadd(-55.95, -240.78, 158.49, 1.39) pt3dadd(-54.71, -240.73, 158.49, 1.39) pt3dadd(-53.25, -240.75, 158.49, 1.39) pt3dadd(-53.25, -240.75, 158.29, 1.39) pt3dadd(-50.55, -240.95, 157.94, 1.39) pt3dadd(-50.48, -240.8, 157.94, 1.39) pt3dadd(-50.34, -240.72, 157.94, 1.39) pt3dadd(-48.59, -240.66, 157.94, 1.39) pt3dadd(-46.47, -240.87, 157.89, 1.39) pt3dadd(-46.39, -240.87, 157.89, 1.39) pt3dadd(-44.93, -240.96, 156.94, 1.46) pt3dadd(-44.86, -240.96, 156.94, 1.46) pt3dadd(-42.87, -241.62, 156.64, 1.46) pt3dadd(-40.99, -241.11, 156.14, 1.46) pt3dadd(-40.48, -241.02, 156.14, 1.46) pt3dadd(-39.75, -240.92, 156.14, 1.17) pt3dadd(-38.07, -241.15, 156.84, 1.17) pt3dadd(-37.85, -241.14, 156.84, 1.17) pt3dadd(-36.91, -240.89, 156.84, 1.17) pt3dadd(-36.62, -240.88, 156.84, 1.17) pt3dadd(-35.37, -241.12, 156.84, 1.17) pt3dadd(-35.3, -241.12, 156.84, 1.17) pt3dadd(-34.56, -241.39, 156.84, 1.09) pt3dadd(-33.01, -241.91, 156.84, 1.09) pt3dadd(-32.8, -241.61, 156.84, 1.09) pt3dadd(-31.55, -242, 155.89, 1.09) pt3dadd(-31.4, -242, 155.89, 1.09) pt3dadd(-30.09, -242.02, 155.89, 1.09) pt3dadd(-30.01, -242.17, 155.89, 1.09) pt3dadd(-29.03, -242.86, 155.89, 1.09) pt3dadd(-28.8, -243.06, 155.89, 0.95) pt3dadd(-28.02, -243.29, 155.89, 1.09) pt3dadd(-27.71, -243.1, 155.89, 1.09) pt3dadd(-27.44, -243.35, 155.89, 1.09) pt3dadd(-26.81, -243.63, 155.89, 1.31) pt3dadd(-26.72, -243.49, 155.89, 1.31) pt3dadd(-26.32, -243.83, 155.89, 1.46) pt3dadd(-26.24, -243.76, 155.89, 1.46) pt3dadd(-25.08, -243.95, 155.89, 1.46) pt3dadd(-24.64, -243.92, 155.89, 1.53) pt3dadd(-24.71, -243.92, 155.89, 1.53) pt3dadd(-23.34, -244.13, 155.94, 1.24) pt3dadd(-22.43, -244.52, 155.94, 1.24) pt3dadd(-20.37, -245.17, 155.94, 1.24) pt3dadd(-18.75, -245.84, 155.94, 1.24) pt3dadd(-18.61, -245.86, 155.94, 1.24) pt3dadd(-17.65, -246.47, 155.94, 1.24) pt3dadd(-17.5, -246.49, 155.94, 1.24) pt3dadd(-15.78, -247.54, 155.04, 1.24) pt3dadd(-15.77, -247.47, 155.04, 1.24) pt3dadd(-14.72, -247.94, 155.04, 1.24) pt3dadd(-14.65, -247.95, 155.04, 1.24) pt3dadd(-13.36, -248.23, 155.04, 1.24) pt3dadd(-11.62, -248.41, 154.24, 1.24) pt3dadd(-11.46, -248.35, 154.24, 1.24) pt3dadd(-10.35, -248.17, 154.24, 1.24) pt3dadd(-8.55, -247.84, 154.69, 1.24) pt3dadd(-6.97, -247.41, 154.69, 1.24) pt3dadd(-5.92, -247.16, 154.69, 0.95) pt3dadd(-5.85, -247.16, 154.69, 0.95) pt3dadd(-4.91, -247.33, 154.69, 0.95) pt3dadd(-3.7, -247.68, 154.69, 0.95) pt3dadd(-2.5, -248.16, 154.69, 0.95) pt3dadd(-2.09, -249.09, 154.69, 0.95) pt3dadd(-1.2, -249.76, 154.69, 1.02) pt3dadd(0.26, -249.77, 154.69, 1.02) pt3dadd(1.38, -249.59, 153.34, 1.09) pt3dadd(1.45, -249.59, 153.34, 1.09) pt3dadd(3.01, -249.46, 153.34, 1.09) pt3dadd(4.7, -249.41, 152.64, 1.17) pt3dadd(5.86, -249.46, 152.64, 1.17) pt3dadd(6.96, -250.16, 152.69, 0.73) pt3dadd(6.97, -250.08, 152.69, 0.73) pt3dadd(8.95, -250.8, 152.69, 0.73) pt3dadd(10.25, -251.67, 152.69, 0.73) pt3dadd(10.32, -251.75, 152.69, 0.73) pt3dadd(11.72, -252.4, 152.69, 0.73) pt3dadd(12.37, -252.47, 152.69, 0.73) pt3dadd(12.44, -252.48, 152.69, 0.73) pt3dadd(13.6, -252.67, 152.69, 0.73) pt3dadd(14.23, -252.95, 152.69, 0.66) } apic[5] {pt3dclear() pt3dadd(-75.27, -249.14, 160.79, 0.95) pt3dadd(-73.89, -250.84, 160.14, 0.95) pt3dadd(-72.7, -251.67, 160.14, 0.95) pt3dadd(-71.95, -252.3, 160.14, 1.09) pt3dadd(-71.72, -252.37, 160.14, 1.09) pt3dadd(-70.55, -252.62, 160.14, 1.09) pt3dadd(-69.5, -253.31, 160.14, 1.09) pt3dadd(-68.18, -253.62, 160.14, 1.24) pt3dadd(-68.17, -253.7, 160.19, 1.24) pt3dadd(-66.94, -253.65, 160.19, 1.24) pt3dadd(-66.8, -253.5, 160.19, 1.24) pt3dadd(-66.73, -253.42, 160.19, 1.24) pt3dadd(-65.56, -253.38, 160.09, 1.24) pt3dadd(-62.65, -253.13, 159.69, 1.24) pt3dadd(-62.29, -253.04, 159.69, 1.24) pt3dadd(-60.98, -252.92, 159.69, 1.24) pt3dadd(-60.02, -253.4, 159.69, 1.24) pt3dadd(-59.87, -253.39, 159.69, 1.24) pt3dadd(-59.2, -253.81, 159.69, 1.39) pt3dadd(-57.21, -254.39, 159.69, 1.39) pt3dadd(-56.3, -255.3, 159.69, 1.39) pt3dadd(-55.02, -256.28, 159.69, 1.39) } } proc shape3d_8() { apic[5] { pt3dadd(-54.88, -256.27, 159.69, 1.39) pt3dadd(-53.6, -257.39, 159.49, 1.31) pt3dadd(-53.6, -257.32, 159.49, 1.31) pt3dadd(-51.46, -257.97, 158.29, 1.31) pt3dadd(-49.17, -258.69, 159.64, 1.31) pt3dadd(-49.1, -258.62, 159.64, 1.31) pt3dadd(-47.55, -259.29, 159.64, 1.31) pt3dadd(-45.38, -260.74, 158.49, 1.31) pt3dadd(-45.23, -260.74, 158.49, 1.31) pt3dadd(-44.25, -261.72, 158.49, 1.46) pt3dadd(-42.82, -262.91, 157.54, 1.46) pt3dadd(-42.11, -264.41, 156.79, 1.46) pt3dadd(-40.87, -266.41, 156.79, 1.46) pt3dadd(-40, -268.28, 156.79, 1.46) pt3dadd(-39.5, -269.93, 156.79, 1.46) pt3dadd(-39.5, -271.83, 155.89, 1.46) pt3dadd(-39.43, -271.97, 155.89, 1.46) pt3dadd(-39.42, -272.05, 155.89, 1.46) } apic[6] {pt3dclear() pt3dadd(-127.24, -251.16, 175.74, 1.53) pt3dadd(-127.06, -252.72, 175.74, 1.53) pt3dadd(-126.09, -253.86, 175.74, 1.53) pt3dadd(-125.19, -254.92, 175.74, 1.53) pt3dadd(-123.47, -255.93, 176.84, 1.53) pt3dadd(-122.06, -256.39, 176.84, 1.53) pt3dadd(-119.82, -257.32, 175.94, 1.53) pt3dadd(-117.86, -258.14, 174.69, 1.53) pt3dadd(-115.36, -258.73, 174.74, 1.53) pt3dadd(-113.02, -258.78, 174.74, 1.53) pt3dadd(-112.8, -258.81, 174.74, 1.53) pt3dadd(-110.81, -258.68, 174.74, 1.53) pt3dadd(-110.81, -258.68, 174.69, 1.53) pt3dadd(-108.85, -258.91, 174.69, 1.53) pt3dadd(-108.78, -258.92, 174.69, 1.53) pt3dadd(-107.69, -259.05, 174.69, 1.53) pt3dadd(-105.99, -259.54, 174.69, 1.53) pt3dadd(-105.99, -259.54, 174.64, 1.53) pt3dadd(-103.97, -260.44, 173.69, 1.53) pt3dadd(-103.02, -260.48, 173.69, 1.53) pt3dadd(-101.68, -260.35, 173.69, 1.53) pt3dadd(-100.28, -259.7, 173.69, 1.53) pt3dadd(-100.28, -259.7, 173.64, 1.53) pt3dadd(-98.53, -259.18, 172.29, 1.53) pt3dadd(-98.32, -259.2, 172.29, 1.53) pt3dadd(-96.52, -259.49, 172.29, 1.53) pt3dadd(-94.56, -260.31, 171.79, 1.53) pt3dadd(-94.42, -260.4, 171.79, 1.53) pt3dadd(-92.4, -260.71, 171.34, 1.53) pt3dadd(-92.11, -260.74, 171.29, 1.53) pt3dadd(-90.12, -260.69, 170.74, 1.53) pt3dadd(-90.05, -260.69, 170.74, 1.53) } apic[7] {pt3dclear() pt3dadd(-90.05, -260.69, 170.74, 1.53) pt3dadd(-89.51, -261.71, 168.89, 1.53) pt3dadd(-88.79, -261.8, 168.89, 1.53) pt3dadd(-86.83, -262.03, 168.89, 1.53) pt3dadd(-86.68, -261.97, 168.89, 1.53) pt3dadd(-84.2, -262.12, 168.89, 1.53) pt3dadd(-84.19, -262.05, 168.89, 1.53) pt3dadd(-81.77, -262.04, 168.04, 1.53) pt3dadd(-81.75, -261.9, 168.04, 1.53) pt3dadd(-80.16, -262.08, 168.04, 1.53) pt3dadd(-78.54, -262.64, 168.04, 1.53) pt3dadd(-78.47, -262.65, 168.04, 1.53) pt3dadd(-76.54, -263.76, 168.04, 1.53) pt3dadd(-74.9, -264.17, 168.04, 1.53) pt3dadd(-74.89, -264.03, 168.04, 1.53) pt3dadd(-73.42, -264.06, 168.04, 1.53) pt3dadd(-72.75, -263.99, 168.04, 1.46) pt3dadd(-71.35, -264.52, 168.04, 1.39) pt3dadd(-70.23, -264.36, 168.04, 1.39) pt3dadd(-70.09, -264.38, 168.04, 1.39) pt3dadd(-68.56, -265.07, 168.04, 1.39) pt3dadd(-66.65, -265.74, 167.29, 1.31) pt3dadd(-66.57, -265.67, 167.29, 1.31) pt3dadd(-64.91, -265.87, 167.29, 1.31) pt3dadd(-63.7, -266.23, 167.29, 1.31) pt3dadd(-61.76, -266.61, 167.29, 1.31) pt3dadd(-61.1, -266.54, 167.29, 1.31) pt3dadd(-60.95, -266.56, 167.29, 1.31) pt3dadd(-59.86, -267.28, 167.29, 1.31) pt3dadd(-59.05, -267.88, 167.29, 1.46) pt3dadd(-56.97, -270.11, 166.59, 1.46) pt3dadd(-56.06, -270.51, 166.59, 1.46) pt3dadd(-56.07, -270.59, 166.59, 1.46) pt3dadd(-54.78, -271.47, 165.64, 1.46) pt3dadd(-53.57, -271.76, 165.64, 1.46) pt3dadd(-52.05, -272.01, 165.64, 1.46) pt3dadd(-52.05, -272.01, 165.54, 1.46) pt3dadd(-51.12, -272.2, 165.14, 1.39) pt3dadd(-49.72, -271.48, 165.14, 1.39) pt3dadd(-49.55, -271.25, 165.14, 1.17) pt3dadd(-49.55, -271.32, 165.14, 1.17) pt3dadd(-47.64, -271.69, 165.14, 1.46) pt3dadd(-46.03, -271.92, 165.14, 1.46) pt3dadd(-43.98, -271.99, 164.24, 1.46) pt3dadd(-43.98, -271.99, 163.99, 1.46) pt3dadd(-41.54, -272.92, 163.99, 1.46) pt3dadd(-40.42, -273.76, 163.99, 1.46) pt3dadd(-39.79, -275.12, 163.99, 1.46) pt3dadd(-39.71, -275.12, 163.99, 1.46) pt3dadd(-38.52, -275.88, 163.99, 1.46) pt3dadd(-37.17, -276.92, 163.24, 1.46) pt3dadd(-36.15, -278.71, 163.24, 1.24) pt3dadd(-34.78, -280.41, 162.54, 1.53) pt3dadd(-33.07, -281.29, 162.59, 1.46) pt3dadd(-32.07, -282.64, 162.59, 1.46) pt3dadd(-30.86, -283.84, 161.64, 1.6) pt3dadd(-28.32, -283.53, 160.94, 1.53) pt3dadd(-26.28, -283.53, 160.94, 1.46) pt3dadd(-26.2, -283.6, 160.94, 1.46) pt3dadd(-24.96, -283.55, 159.94, 1.6) pt3dadd(-23.93, -283.88, 159.94, 1.6) pt3dadd(-22.77, -283.98, 159.79, 1.31) pt3dadd(-20.64, -284.34, 159.79, 1.31) pt3dadd(-18.86, -285.01, 159.79, 1.31) pt3dadd(-18.78, -285.15, 159.79, 1.31) pt3dadd(-17.36, -286.12, 159.84, 1.31) pt3dadd(-17.29, -286.12, 159.84, 1.31) pt3dadd(-15.88, -286.72, 159.89, 1.17) pt3dadd(-14.54, -287.4, 159.89, 1.17) pt3dadd(-13.21, -287.86, 159.94, 0.95) pt3dadd(-12.85, -287.78, 159.94, 0.95) pt3dadd(-12.03, -288.33, 159.94, 0.95) pt3dadd(-11.88, -288.4, 159.94, 1.09) pt3dadd(-10.24, -289.51, 159.94, 1.09) pt3dadd(-8.75, -290.18, 159.94, 1.31) pt3dadd(-7.26, -291.15, 159.94, 1.31) pt3dadd(-7.26, -291.07, 159.94, 1.31) pt3dadd(-5.61, -292.47, 158.14, 1.31) pt3dadd(-3.89, -293.65, 159.34, 1.09) pt3dadd(-2.84, -294.34, 159.34, 1.09) pt3dadd(-1.8, -294.89, 158.04, 1.24) pt3dadd(-0.59, -296.01, 158.04, 1.24) } apic[8] {pt3dclear() pt3dadd(-90.05, -260.69, 170.74, 1.17) pt3dadd(-87.76, -260.52, 168.14, 1.17) pt3dadd(-87.75, -260.45, 168.14, 1.17) pt3dadd(-85.6, -260.27, 168.14, 1.17) pt3dadd(-83.81, -259.97, 168.14, 1.17) pt3dadd(-82.68, -259.73, 168.14, 1.31) pt3dadd(-80.74, -259.45, 167.19, 1.53) pt3dadd(-79.34, -259.47, 167.19, 1.53) pt3dadd(-78.47, -259.57, 167.19, 1.68) pt3dadd(-77.49, -259.91, 167.14, 1.68) pt3dadd(-76.22, -260.35, 166.79, 1.6) pt3dadd(-75.11, -260.92, 166.79, 1.6) pt3dadd(-73.62, -261.32, 166.34, 1.6) pt3dadd(-73.25, -261.36, 166.34, 1.6) pt3dadd(-72.27, -261.7, 165.84, 1.6) pt3dadd(-72.2, -261.78, 165.84, 1.6) pt3dadd(-71.25, -262.41, 165.74, 1.53) pt3dadd(-71.18, -262.41, 165.74, 1.53) pt3dadd(-69.49, -262.39, 165.74, 1.53) pt3dadd(-68.3, -262.9, 165.74, 1.53) pt3dadd(-66.2, -263.81, 166.09, 1.46) pt3dadd(-63.7, -264.4, 166.09, 1.46) pt3dadd(-63.63, -264.41, 166.09, 1.46) pt3dadd(-60.88, -265.32, 166.09, 1.46) pt3dadd(-59.79, -265.45, 166.09, 1.46) pt3dadd(-57, -266.07, 166.09, 1.46) } apic[9] {pt3dclear() pt3dadd(-127.24, -251.16, 175.74, 0.95) pt3dadd(-126.83, -251.33, 175.74, 0.95) pt3dadd(-124.27, -251.46, 175.74, 0.95) pt3dadd(-124.2, -251.46, 175.74, 0.95) pt3dadd(-123.08, -250.1, 175.74, 1.17) pt3dadd(-120.95, -248.42, 175.74, 1.17) pt3dadd(-119.76, -247.14, 175.74, 1.75) pt3dadd(-117.82, -246.26, 173.59, 1.9) pt3dadd(-116.52, -245.85, 173.59, 2.19) pt3dadd(-114.87, -245.21, 172.39, 2.04) pt3dadd(-112.77, -244.62, 172.39, 2.04) pt3dadd(-112.63, -244.54, 172.39, 2.04) pt3dadd(-111.04, -244.05, 172.39, 2.04) pt3dadd(-108.58, -243.59, 171.04, 2.33) pt3dadd(-107.5, -243.34, 171.04, 2.33) pt3dadd(-106.39, -243.59, 171.04, 2.04) pt3dadd(-105.07, -243.83, 171.04, 1.9) pt3dadd(-103.63, -243.2, 171.04, 1.9) pt3dadd(-103.63, -243.34, 171.04, 1.9) pt3dadd(-101.73, -243.42, 171.04, 1.9) pt3dadd(-100.07, -242.85, 171.04, 1.9) pt3dadd(-100.08, -242.77, 171.04, 1.9) pt3dadd(-97.83, -242.4, 170.39, 1.82) pt3dadd(-97.17, -242.38, 170.39, 1.82) pt3dadd(-96, -242.41, 170.39, 1.82) pt3dadd(-95.79, -242.4, 170.39, 1.82) pt3dadd(-93.36, -242.97, 170.39, 1.82) pt3dadd(-88.19, -244.67, 169.39, 1.82) pt3dadd(-87.97, -244.67, 169.39, 1.82) pt3dadd(-86, -244.81, 169.39, 1.82) pt3dadd(-85.85, -244.81, 169.39, 1.82) pt3dadd(-83.72, -245.31, 168.84, 1.82) pt3dadd(-82.92, -245.28, 168.84, 1.82) pt3dadd(-81.75, -245.31, 168.84, 1.82) pt3dadd(-81.6, -245.31, 168.84, 1.82) pt3dadd(-79.92, -245.47, 168.14, 1.82) pt3dadd(-79.92, -245.47, 168.09, 1.82) pt3dadd(-77.86, -245.98, 167.54, 1.75) pt3dadd(-75.8, -246.41, 167.54, 1.75) pt3dadd(-73.93, -247.66, 167.54, 1.75) pt3dadd(-73.86, -247.65, 167.54, 1.75) pt3dadd(-73.03, -248.42, 167.54, 1.75) } } proc shape3d_9() { apic[9] { pt3dadd(-71.63, -248.81, 167.54, 1.6) pt3dadd(-70.07, -249.41, 166.84, 1.53) pt3dadd(-68.82, -249.73, 166.84, 1.53) pt3dadd(-68.14, -250.36, 166.84, 1.53) pt3dadd(-68.07, -250.43, 166.84, 1.53) pt3dadd(-67.16, -251.27, 166.84, 1.53) pt3dadd(-64.7, -252.72, 166.19, 1.46) pt3dadd(-64.63, -252.64, 166.19, 1.46) pt3dadd(-63.43, -253.54, 166.19, 1.46) pt3dadd(-63.12, -254.19, 166.19, 1.46) pt3dadd(-61.38, -255.66, 166.19, 1.46) pt3dadd(-60.26, -256.42, 165.19, 1.68) pt3dadd(-60.19, -256.42, 165.19, 1.68) pt3dadd(-58.98, -257.69, 165.19, 1.68) pt3dadd(-57.66, -257.86, 165.19, 1.68) pt3dadd(-56.1, -258.75, 164.29, 1.24) pt3dadd(-54.94, -258.49, 164.29, 1.24) pt3dadd(-53.5, -258, 164.29, 1.24) pt3dadd(-51.76, -257.86, 163.44, 1.24) pt3dadd(-50.44, -257.88, 163.44, 1.24) pt3dadd(-48.9, -258.05, 162.54, 1.24) pt3dadd(-48.76, -258.04, 162.59, 1.24) pt3dadd(-47.38, -257.92, 162.59, 1.31) pt3dadd(-47.38, -257.92, 162.49, 1.31) pt3dadd(-46.87, -257.83, 162.69, 1.31) pt3dadd(-45.98, -258.16, 162.69, 1.24) pt3dadd(-45.61, -258.22, 162.69, 1.24) pt3dadd(-44.94, -258.85, 162.69, 0.95) } apic[10] {pt3dclear() pt3dadd(-201.81, -270.09, 183.84, 1.17) pt3dadd(-201.24, -271.84, 182.69, 1.17) pt3dadd(-200.3, -272.71, 182.69, 1.17) pt3dadd(-197.89, -274.39, 181.34, 1.17) pt3dadd(-196.58, -275.12, 182.39, 1.17) pt3dadd(-195.7, -275.26, 182.39, 1.17) pt3dadd(-194.24, -275.41, 181.49, 1.09) pt3dadd(-193.15, -275.12, 181.74, 1.17) pt3dadd(-192.06, -274.54, 181.74, 1.17) pt3dadd(-190.89, -273.73, 181.74, 1.17) pt3dadd(-190.38, -273.59, 181.74, 1.17) pt3dadd(-190.31, -273.73, 181.74, 1.17) pt3dadd(-189, -274.17, 182.69, 0.95) pt3dadd(-188.92, -274.17, 182.69, 0.95) pt3dadd(-187.32, -274.03, 182.69, 0.95) pt3dadd(-186.37, -273.95, 182.69, 0.95) pt3dadd(-186.3, -273.88, 182.69, 0.95) pt3dadd(-185.21, -273.73, 182.69, 0.95) pt3dadd(-185.21, -273.66, 182.69, 0.95) pt3dadd(-184.19, -273.22, 183.69, 0.95) pt3dadd(-183.82, -272.35, 183.69, 0.95) pt3dadd(-183.31, -271.91, 183.69, 0.95) pt3dadd(-182.58, -271.84, 183.69, 1.09) pt3dadd(-181.27, -271.98, 183.04, 1.39) pt3dadd(-180.47, -272.2, 183.04, 1.68) pt3dadd(-179.16, -271.18, 183.14, 1.68) pt3dadd(-177.33, -270.82, 183.84, 1.53) pt3dadd(-176.6, -270.75, 180.54, 2.11) pt3dadd(-175.66, -269.29, 180.44, 1.31) pt3dadd(-174.2, -268.12, 180.44, 1.31) pt3dadd(-174.13, -267.98, 180.44, 1.31) pt3dadd(-172.45, -267.9, 180.44, 1.31) pt3dadd(-172.3, -267.9, 180.44, 1.31) pt3dadd(-171.57, -267.83, 180.44, 1.31) pt3dadd(-170.99, -268.05, 180.44, 1.46) pt3dadd(-169.97, -268.19, 180.44, 1.46) } apic[11] {pt3dclear() pt3dadd(-206.77, -275.12, 185.59, 1.68) pt3dadd(-205.17, -275.63, 185.89, 1.68) pt3dadd(-205.09, -275.63, 185.89, 1.68) pt3dadd(-204.22, -275.92, 185.09, 1.46) pt3dadd(-204.14, -275.85, 185.09, 1.46) pt3dadd(-204.07, -275.85, 185.09, 1.46) pt3dadd(-203.56, -276.43, 185.09, 1.39) pt3dadd(-203.2, -277.45, 185.09, 1.24) pt3dadd(-202.98, -278.18, 185.09, 1.24) pt3dadd(-202.91, -278.25, 185.09, 1.24) pt3dadd(-202.83, -279.2, 185.09, 1.24) pt3dadd(-202.76, -279.27, 185.09, 1.24) pt3dadd(-202.47, -279.56, 185.09, 1.17) pt3dadd(-202.25, -280.58, 185.09, 1.17) pt3dadd(-202.03, -280.95, 185.09, 1.17) pt3dadd(-201.59, -282.11, 185.54, 1.17) pt3dadd(-201.45, -282.99, 185.54, 1.17) pt3dadd(-201.23, -283.57, 185.54, 1.02) pt3dadd(-200.57, -284.01, 185.54, 1.02) pt3dadd(-200.06, -284.15, 185.54, 1.02) pt3dadd(-199.7, -283.28, 185.54, 1.02) pt3dadd(-198.75, -283.21, 184.49, 1.02) pt3dadd(-198.17, -283.28, 184.49, 1.17) pt3dadd(-197.22, -283.79, 184.34, 1.17) pt3dadd(-196.71, -284.15, 183.79, 1.17) pt3dadd(-196.05, -284.3, 183.79, 1.39) pt3dadd(-195.54, -284.08, 183.04, 1.31) pt3dadd(-195.47, -284.08, 183.04, 1.31) pt3dadd(-194.52, -283.86, 183.04, 1.31) pt3dadd(-193.43, -283.57, 182.79, 1.31) pt3dadd(-192.63, -283.72, 182.79, 1.31) pt3dadd(-191.46, -284.3, 182.39, 1.31) pt3dadd(-190.29, -284.3, 182.19, 1.31) pt3dadd(-189.82, -284.32, 182.19, 1.17) pt3dadd(-188.62, -284.09, 182.19, 1.17) pt3dadd(-188.39, -284.05, 182.19, 1.17) pt3dadd(-187.09, -284.2, 182.19, 1.17) } apic[12] {pt3dclear() pt3dadd(-187.09, -284.2, 182.19, 1.17) pt3dadd(-186.09, -285.64, 182.19, 1.17) pt3dadd(-185.7, -286.71, 182.19, 1.17) pt3dadd(-185.63, -286.72, 182.19, 1.17) pt3dadd(-184.99, -288.19, 181.69, 1.31) pt3dadd(-184.32, -289.3, 181.69, 1.31) pt3dadd(-183.01, -290.04, 181.09, 1.31) pt3dadd(-183.01, -290.04, 180.74, 1.31) pt3dadd(-182.18, -290.43, 180.74, 1.31) pt3dadd(-181.65, -289.69, 180.19, 1.31) pt3dadd(-181.57, -289.7, 180.19, 1.31) pt3dadd(-180.99, -288.52, 180.19, 1.31) pt3dadd(-180.99, -288.52, 180.04, 1.31) pt3dadd(-180.1, -287.81, 179.64, 1.31) pt3dadd(-180.09, -287.67, 179.64, 1.31) pt3dadd(-178.7, -286.51, 179.64, 1.31) pt3dadd(-178.69, -286.44, 179.64, 1.31) pt3dadd(-177.41, -286.15, 179.64, 1.31) pt3dadd(-177.41, -286.15, 179.59, 1.31) pt3dadd(-176.1, -285.57, 179.14, 1.31) pt3dadd(-176.1, -285.57, 179.09, 1.31) pt3dadd(-175.06, -285.48, 179.09, 1.31) pt3dadd(-174.97, -285.41, 179.09, 1.31) pt3dadd(-174.9, -285.42, 179.04, 1.31) pt3dadd(-173.54, -285.73, 178.89, 1.31) pt3dadd(-173.54, -285.73, 178.79, 1.31) pt3dadd(-172.32, -285.29, 177.89, 1.31) pt3dadd(-171.36, -284.01, 177.04, 1.39) pt3dadd(-170.14, -283.05, 175.59, 1.31) pt3dadd(-169.1, -281.63, 174.74, 1.31) pt3dadd(-169.07, -281.41, 174.74, 1.31) pt3dadd(-168.09, -279.99, 174.74, 1.31) pt3dadd(-168, -279.85, 174.74, 1.31) pt3dadd(-166.3, -278.51, 174.74, 1.31) pt3dadd(-164.9, -276.55, 174.74, 1.31) pt3dadd(-164.18, -275.46, 174.74, 1.31) pt3dadd(-162.55, -274.04, 173.69, 1.24) pt3dadd(-160.45, -273.11, 173.69, 1.24) pt3dadd(-158.16, -272.36, 173.69, 1.24) pt3dadd(-156.48, -271.82, 173.24, 1.24) pt3dadd(-154.7, -271.01, 173.24, 1.24) pt3dadd(-152.66, -270.51, 172.54, 1.24) pt3dadd(-152.59, -270.52, 172.54, 1.24) pt3dadd(-149.54, -270.22, 171.94, 1.24) pt3dadd(-147.76, -269.4, 171.39, 1.24) pt3dadd(-145.83, -268.02, 170.54, 1.24) pt3dadd(-144.34, -267.17, 170.54, 1.24) pt3dadd(-144.25, -267.1, 170.54, 1.24) pt3dadd(-144.24, -266.96, 170.54, 1.24) pt3dadd(-142.53, -266.21, 170.54, 1.24) pt3dadd(-141.94, -265.54, 170.54, 1.31) pt3dadd(-140.31, -264.78, 170.54, 1.31) pt3dadd(-140.23, -264.72, 170.54, 1.31) pt3dadd(-138.79, -263.71, 170.54, 1.31) pt3dadd(-137.41, -262.63, 169.69, 1.31) pt3dadd(-136.77, -262.12, 168.79, 1.31) pt3dadd(-136.62, -262.14, 168.79, 1.31) pt3dadd(-136.61, -262.06, 168.79, 1.31) pt3dadd(-135.63, -261.23, 168.79, 1.31) pt3dadd(-134.81, -260.44, 167.44, 1.24) pt3dadd(-133.3, -259.45, 166.49, 1.24) pt3dadd(-131.4, -258.94, 165.19, 1.24) pt3dadd(-130.22, -258.86, 168.54, 1.24) pt3dadd(-128.29, -258.65, 169.39, 1.24) pt3dadd(-126.1, -258.76, 169.39, 1.24) pt3dadd(-125.01, -258.89, 169.39, 1.24) pt3dadd(-124.94, -258.89, 169.39, 1.24) pt3dadd(-124.09, -259.14, 169.39, 1.39) pt3dadd(-121.34, -260.13, 169.39, 1.39) pt3dadd(-121.32, -259.98, 169.39, 1.39) pt3dadd(-119.18, -260.46, 169.39, 1.39) pt3dadd(-118, -260.45, 169.39, 1.53) pt3dadd(-114.74, -261.42, 170.79, 1.53) pt3dadd(-112.71, -261.66, 168.84, 1.53) pt3dadd(-111.28, -261.32, 167.29, 1.68) pt3dadd(-109.68, -260.85, 167.24, 1.68) pt3dadd(-108.26, -260.57, 167.24, 1.68) } apic[13] {pt3dclear() pt3dadd(-187.09, -284.2, 182.19, 1.24) pt3dadd(-185.21, -284.56, 183.89, 1.24) pt3dadd(-185.2, -284.48, 183.89, 1.24) pt3dadd(-184.11, -284.54, 182.99, 1.24) pt3dadd(-182.21, -284.03, 182.54, 1.24) pt3dadd(-180.95, -283.89, 182.54, 1.24) pt3dadd(-179.26, -283.28, 182.14, 1.24) pt3dadd(-179.26, -283.28, 182.04, 1.24) pt3dadd(-177.97, -282.33, 181.69, 1.24) pt3dadd(-176.7, -282.11, 181.69, 1.24) pt3dadd(-176.12, -281.52, 181.69, 1.24) pt3dadd(-174.98, -281.22, 181.69, 1.24) pt3dadd(-174.91, -281.23, 181.69, 1.24) pt3dadd(-173.53, -281.39, 181.64, 1.24) pt3dadd(-173.53, -281.39, 181.59, 1.24) pt3dadd(-171.3, -281.14, 181.24, 1.24) pt3dadd(-169.67, -281.04, 180.74, 1.24) pt3dadd(-167.56, -280.55, 179.94, 1.24) pt3dadd(-166.08, -279.85, 179.94, 1.24) pt3dadd(-165.93, -279.79, 179.94, 1.24) pt3dadd(-164.72, -280.08, 179.94, 1.24) pt3dadd(-164.64, -280.09, 179.94, 1.24) } } proc shape3d_10() { apic[13] { pt3dadd(-162.79, -280.53, 179.94, 1.24) pt3dadd(-161.55, -280.6, 179.94, 1.24) pt3dadd(-159.87, -280.66, 179.94, 1.24) pt3dadd(-159.85, -280.51, 179.94, 1.24) pt3dadd(-159.26, -279.85, 179.89, 1.24) pt3dadd(-157.88, -279.42, 181.19, 1.31) pt3dadd(-156.53, -279.14, 181.19, 1.31) pt3dadd(-155.05, -279.03, 181.69, 1.24) pt3dadd(-153.16, -279.18, 180.74, 1.17) pt3dadd(-151.49, -279.37, 180.74, 1.17) pt3dadd(-151.42, -279.38, 180.74, 1.17) pt3dadd(-149.86, -278.61, 180.14, 1.17) pt3dadd(-148.53, -278.55, 176.99, 1.09) pt3dadd(-148.45, -278.48, 176.99, 1.09) pt3dadd(-146.97, -278.37, 176.99, 1.09) pt3dadd(-144.69, -278.34, 176.99, 1.09) pt3dadd(-144.68, -278.27, 176.99, 1.09) pt3dadd(-142.9, -278.11, 175.89, 1.09) pt3dadd(-142.82, -278.05, 175.89, 1.09) pt3dadd(-141.34, -277.34, 175.89, 1.09) pt3dadd(-139.61, -276.96, 175.89, 1.09) pt3dadd(-137.88, -277.17, 175.84, 1.09) pt3dadd(-137.81, -277.18, 175.84, 1.09) pt3dadd(-136.2, -276.63, 175.84, 1.09) pt3dadd(-136.13, -276.64, 175.84, 1.09) pt3dadd(-134.78, -276.43, 175.84, 1.09) pt3dadd(-134.7, -276.37, 175.84, 1.09) pt3dadd(-133.29, -276.24, 175.84, 1.09) pt3dadd(-133.29, -276.24, 175.54, 1.09) pt3dadd(-131.09, -276.28, 174.54, 1.09) pt3dadd(-127.35, -277.53, 173.89, 1.09) pt3dadd(-125.23, -277.56, 173.09, 1.09) pt3dadd(-123.71, -277.74, 173.09, 1.09) pt3dadd(-122.49, -278.03, 173.09, 1.09) pt3dadd(-120.67, -278.17, 173.09, 1.09) pt3dadd(-120.53, -278.19, 173.09, 1.09) pt3dadd(-119.67, -278.37, 173.09, 1.09) pt3dadd(-119.61, -278.45, 173.09, 1.09) pt3dadd(-117.79, -279.25, 173.09, 1.09) pt3dadd(-117.73, -279.33, 173.09, 1.09) pt3dadd(-115.69, -280.09, 171.69, 1.09) pt3dadd(-115.62, -280.09, 171.69, 1.09) pt3dadd(-114.45, -280.16, 171.49, 1.09) pt3dadd(-112.07, -280.51, 170.84, 1.09) pt3dadd(-109.42, -281.05, 170.24, 1.09) pt3dadd(-106.7, -281.08, 169.84, 1.09) pt3dadd(-106.7, -281.08, 169.74, 1.09) pt3dadd(-104.7, -280.28, 168.89, 1.09) pt3dadd(-103.65, -280.04, 168.89, 1.09) pt3dadd(-101.85, -279.74, 167.99, 1.09) pt3dadd(-101.57, -279.57, 167.99, 1.24) pt3dadd(-100.7, -279.54, 167.99, 1.24) pt3dadd(-100.55, -279.53, 167.99, 1.24) pt3dadd(-99.46, -279.49, 167.99, 1.24) pt3dadd(-98.29, -279.45, 167.99, 1.24) pt3dadd(-97.5, -279.35, 167.99, 1.24) pt3dadd(-96.19, -279.08, 168.04, 1.24) pt3dadd(-94.95, -279.11, 168.04, 1.53) pt3dadd(-93.21, -278.9, 168.04, 1.53) pt3dadd(-93.21, -278.9, 167.99, 1.53) pt3dadd(-91.23, -279.05, 167.29, 1.53) pt3dadd(-91.16, -278.97, 167.29, 1.53) pt3dadd(-91.02, -278.96, 167.29, 1.53) pt3dadd(-89.93, -278.85, 167.29, 1.53) pt3dadd(-88.48, -278.58, 166.59, 1.6) pt3dadd(-87.02, -278.6, 166.59, 1.6) pt3dadd(-86.58, -278.51, 166.59, 1.6) pt3dadd(-85.12, -278.53, 166.59, 1.6) pt3dadd(-85.05, -278.67, 166.59, 1.6) pt3dadd(-83.44, -278.76, 166.54, 1.6) pt3dadd(-81.84, -278.56, 166.54, 1.6) pt3dadd(-80.61, -278.22, 165.79, 1.6) pt3dadd(-79.59, -278.4, 165.79, 1.75) pt3dadd(-78.42, -278.51, 165.14, 1.75) pt3dadd(-75.35, -278.47, 164.69, 1.75) pt3dadd(-74.41, -278.36, 164.69, 1.75) pt3dadd(-72.88, -278.45, 164.04, 1.75) pt3dadd(-71.55, -278.84, 164.04, 1.75) pt3dadd(-71.33, -278.83, 164.04, 1.75) pt3dadd(-69.96, -278.42, 164.04, 1.75) pt3dadd(-68.2, -278.72, 164.04, 1.6) pt3dadd(-67.3, -279.34, 164.04, 1.6) pt3dadd(-67.16, -279.34, 164.04, 1.6) pt3dadd(-65.46, -279.93, 164.04, 1.6) pt3dadd(-65.38, -280.07, 164.04, 1.6) pt3dadd(-63.89, -280.89, 164.04, 1.6) pt3dadd(-63.75, -280.89, 164.04, 1.6) pt3dadd(-63.08, -281.16, 164.04, 1.6) pt3dadd(-63, -281.23, 164.04, 1.6) pt3dadd(-61.9, -281.62, 164.04, 1.6) pt3dadd(-61.82, -281.62, 164.04, 1.6) pt3dadd(-61.08, -282.03, 164.04, 1.6) pt3dadd(-61, -282.25, 164.04, 1.6) pt3dadd(-59.66, -282.85, 163.79, 1.6) pt3dadd(-57.88, -283.74, 163.79, 1.6) pt3dadd(-56.03, -284.55, 163.79, 1.6) pt3dadd(-54.32, -285.36, 159.04, 1.6) pt3dadd(-52.55, -285.95, 159.04, 1.6) pt3dadd(-50.49, -286.31, 159.04, 1.6) pt3dadd(-48.14, -286.74, 158.49, 1.6) pt3dadd(-46.63, -286.17, 158.49, 1.6) pt3dadd(-45.53, -286.35, 157.84, 1.6) pt3dadd(-44.54, -285.59, 157.84, 1.6) pt3dadd(-42.78, -285.89, 157.84, 1.6) pt3dadd(-41.39, -285.84, 157.09, 1.6) pt3dadd(-41.39, -285.76, 157.09, 1.6) pt3dadd(-40.09, -285.64, 157.09, 1.6) pt3dadd(-39.94, -285.64, 157.09, 1.6) pt3dadd(-38.29, -286.89, 156.54, 1.6) pt3dadd(-37.55, -287.23, 156.54, 1.6) pt3dadd(-36.57, -288.14, 156.54, 1.24) pt3dadd(-35.81, -288.77, 156.54, 1.24) pt3dadd(-35.41, -289.7, 156.54, 1.39) pt3dadd(-35.4, -290.14, 156.54, 1.46) pt3dadd(-34.98, -290.5, 156.54, 1.17) pt3dadd(-34.13, -291.54, 156.54, 1.17) pt3dadd(-32.78, -292.63, 156.54, 1.17) pt3dadd(-32, -293.59, 156.54, 1.17) pt3dadd(-31.13, -294.41, 155.64, 1.17) pt3dadd(-29.81, -295.13, 155.64, 1.17) pt3dadd(-29.82, -295.2, 155.64, 1.17) pt3dadd(-28.53, -296.21, 155.64, 1.17) pt3dadd(-28.45, -296.22, 155.64, 1.17) pt3dadd(-27.05, -297.54, 155.64, 1.17) pt3dadd(-24.46, -300.15, 156.64, 1.17) pt3dadd(-24.17, -300.18, 156.64, 1.17) pt3dadd(-23.35, -300.77, 156.64, 1.17) pt3dadd(-22.48, -301.59, 156.64, 1.17) pt3dadd(-21.58, -302.13, 156.64, 1.17) pt3dadd(-19.46, -303.59, 156.64, 1.17) pt3dadd(-19.39, -303.6, 156.64, 1.17) pt3dadd(-18.01, -304.47, 156.64, 1.17) pt3dadd(-16.66, -304.9, 156.64, 1.17) pt3dadd(-15.48, -305.53, 156.64, 1.17) pt3dadd(-14.86, -305.89, 156.64, 1.17) pt3dadd(-13.26, -306.71, 156.64, 1.17) pt3dadd(-12.59, -307.29, 156.64, 1.17) pt3dadd(-12.51, -307.3, 156.64, 1.17) pt3dadd(-11.8, -308.18, 156.64, 1.09) pt3dadd(-11.33, -308.67, 156.59, 1.02) } apic[14] {pt3dclear() pt3dadd(-206.77, -275.12, 185.59, 1.09) pt3dadd(-204.95, -274.46, 185.09, 1.09) pt3dadd(-203.85, -274.53, 185.09, 1.09) pt3dadd(-202.91, -275.55, 185.09, 1.09) pt3dadd(-201.74, -275.48, 185.09, 1.09) pt3dadd(-201.16, -276.87, 185.09, 1.46) pt3dadd(-201.16, -276.79, 185.09, 1.46) pt3dadd(-200.86, -277.96, 185.09, 1.6) pt3dadd(-200.43, -279.34, 184.29, 1.6) pt3dadd(-200.43, -280.15, 184.29, 1.6) pt3dadd(-200.19, -279.54, 184.29, 1.53) pt3dadd(-200.38, -278.71, 184.29, 1.53) pt3dadd(-200.03, -277.58, 184.29, 1.53) pt3dadd(-200.02, -277.51, 184.29, 1.53) pt3dadd(-199.54, -276.54, 184.29, 1.53) pt3dadd(-198.82, -275.45, 184.29, 1.53) pt3dadd(-198.51, -274.68, 184.29, 1.53) pt3dadd(-198.5, -274.53, 184.29, 1.53) pt3dadd(-198.32, -273.08, 184.29, 1.53) pt3dadd(-197.26, -272.18, 183.94, 1.53) pt3dadd(-196.05, -271.23, 183.49, 1.53) pt3dadd(-195.29, -270.36, 182.44, 1.39) pt3dadd(-194.14, -269.98, 181.94, 1.24) pt3dadd(-193.01, -269.75, 180.19, 1.17) pt3dadd(-192.43, -269.16, 180.19, 1.24) pt3dadd(-192.35, -268.51, 180.19, 1.24) pt3dadd(-192.34, -268.43, 180.19, 1.24) pt3dadd(-191.17, -268.43, 180.19, 1.46) pt3dadd(-190.29, -269.05, 179.39, 1.31) pt3dadd(-189.68, -269.48, 179.39, 1.6) pt3dadd(-189.67, -269.41, 179.39, 1.6) pt3dadd(-189.04, -268.46, 178.24, 1.6) pt3dadd(-188.13, -267.61, 177.74, 1.6) pt3dadd(-187.7, -267.08, 177.74, 1.6) pt3dadd(-186.46, -266.49, 177.14, 1.6) pt3dadd(-186.39, -266.5, 177.14, 1.6) pt3dadd(-186.22, -265.12, 176.69, 1.75) pt3dadd(-186.45, -263.92, 176.69, 1.75) pt3dadd(-186.44, -263.85, 176.69, 1.75) pt3dadd(-185.74, -262.9, 176.69, 1.75) pt3dadd(-185.23, -261.64, 176.19, 1.75) pt3dadd(-184.59, -260.62, 176.19, 1.75) pt3dadd(-183.97, -259.74, 175.69, 1.82) pt3dadd(-183.55, -258.54, 175.69, 1.82) pt3dadd(-182.66, -257.91, 176.04, 1.82) pt3dadd(-181.42, -256.67, 176.04, 1.82) pt3dadd(-180.8, -256.45, 176.04, 1.97) pt3dadd(-179.66, -255.48, 176.04, 1.97) } apic[15] {pt3dclear() pt3dadd(-179.66, -255.48, 176.04, 1.68) pt3dadd(-178.6, -255.24, 177.39, 1.68) pt3dadd(-177.64, -255.13, 176.99, 1.6) pt3dadd(-176.64, -254.81, 176.99, 1.6) pt3dadd(-175.52, -254.65, 176.54, 1.53) pt3dadd(-174.49, -254.55, 176.04, 1.9) pt3dadd(-173.29, -254.4, 175.49, 1.6) pt3dadd(-172.18, -254.31, 175.49, 1.6) pt3dadd(-171.14, -254.21, 174.19, 1.82) pt3dadd(-170.25, -254.1, 174.19, 2.04) pt3dadd(-169.09, -253.65, 173.44, 2.11) pt3dadd(-167.86, -253.79, 174.14, 2.04) } } proc shape3d_11() { apic[15] { } apic[16] {pt3dclear() pt3dadd(-167.86, -253.79, 174.14, 1.97) pt3dadd(-165.85, -254.18, 173.84, 1.97) pt3dadd(-164.37, -254.06, 173.84, 1.97) pt3dadd(-162.83, -254.02, 173.99, 2.11) pt3dadd(-161.12, -253.86, 173.04, 1.9) } apic[17] {pt3dclear() pt3dadd(-161.12, -253.86, 173.04, 2.04) pt3dadd(-159.44, -254.57, 173.04, 2.04) pt3dadd(-159.29, -254.52, 173.04, 2.04) pt3dadd(-157.91, -254.68, 174.99, 1.53) pt3dadd(-156.72, -254.53, 174.99, 1.53) pt3dadd(-155.39, -254.46, 174.99, 1.53) pt3dadd(-153.5, -254.61, 174.49, 1.46) pt3dadd(-151.59, -254.62, 174.49, 1.46) pt3dadd(-150.21, -254.71, 175.89, 1.46) pt3dadd(-148.9, -254.79, 175.89, 1.46) pt3dadd(-147.03, -254.5, 175.89, 1.39) pt3dadd(-145.45, -254.76, 173.64, 1.31) pt3dadd(-145.36, -254.62, 173.64, 1.31) pt3dadd(-143.63, -254.24, 173.64, 1.31) pt3dadd(-141.99, -254.07, 173.64, 1.31) pt3dadd(-140.8, -253.91, 173.64, 1.31) pt3dadd(-138.09, -254.01, 173.64, 1.31) pt3dadd(-137.1, -253.69, 173.64, 1.31) pt3dadd(-136.15, -253.73, 174.19, 1.31) pt3dadd(-134.76, -253.75, 174.19, 1.31) pt3dadd(-133.84, -254, 174.19, 1.31) pt3dadd(-132.45, -254.09, 174.19, 1.31) pt3dadd(-132.29, -253.97, 174.19, 1.31) pt3dadd(-130.81, -253.85, 174.19, 1.31) pt3dadd(-129.52, -253.49, 175.14, 1.31) pt3dadd(-127.41, -253.08, 175.09, 1.31) pt3dadd(-127.27, -253.09, 175.09, 1.31) pt3dadd(-125.57, -252.41, 175.09, 1.31) pt3dadd(-124.47, -251.81, 175.99, 1.31) pt3dadd(-123.47, -251.41, 177.24, 1.31) pt3dadd(-122.44, -250.73, 178.09, 1.31) pt3dadd(-122.29, -250.75, 178.09, 1.31) pt3dadd(-121.11, -250.08, 178.09, 1.31) pt3dadd(-120.03, -249.03, 179.09, 1.31) pt3dadd(-118.56, -248.33, 179.09, 1.39) pt3dadd(-117.06, -248.06, 178.24, 1.39) pt3dadd(-116.06, -248.33, 178.24, 1.46) pt3dadd(-114.27, -248.1, 177.69, 1.46) pt3dadd(-114.12, -248.04, 177.69, 1.46) pt3dadd(-113.07, -247.87, 177.69, 1.46) pt3dadd(-112.11, -247.84, 177.69, 1.46) pt3dadd(-110.68, -248.16, 176.94, 1.53) pt3dadd(-109.43, -248.16, 176.94, 1.53) pt3dadd(-108.48, -248.12, 176.39, 1.53) pt3dadd(-107.14, -247.4, 176.34, 1.68) pt3dadd(-104.9, -247.08, 176.34, 1.82) pt3dadd(-103.71, -246.34, 176.34, 1.82) pt3dadd(-101, -246.95, 176.34, 1.82) pt3dadd(-99.09, -247.55, 175.39, 1.75) pt3dadd(-97.33, -247.61, 175.39, 1.75) pt3dadd(-95.73, -248.31, 175.39, 1.75) pt3dadd(-95.65, -248.32, 175.39, 1.75) pt3dadd(-93.72, -248.7, 174.49, 1.68) pt3dadd(-93.71, -248.62, 174.49, 1.68) pt3dadd(-91.6, -249.39, 174.49, 1.68) pt3dadd(-89.31, -249.95, 174.49, 1.68) pt3dadd(-87.77, -250.57, 174.49, 1.68) pt3dadd(-86.47, -251.32, 174.49, 1.68) pt3dadd(-86.47, -251.32, 174.39, 1.68) pt3dadd(-83.81, -251.85, 173.94, 1.68) pt3dadd(-81.88, -252.3, 173.99, 1.53) pt3dadd(-80.66, -251.86, 173.99, 1.53) pt3dadd(-80.58, -251.86, 173.99, 1.53) pt3dadd(-78.71, -251.5, 173.54, 1.53) pt3dadd(-76.26, -251.28, 172.74, 1.53) pt3dadd(-76.25, -251.2, 172.74, 1.53) pt3dadd(-74.98, -250.99, 172.74, 1.53) pt3dadd(-74.04, -251.17, 172.74, 1.53) pt3dadd(-73.96, -251.11, 172.74, 1.53) pt3dadd(-72.18, -250.95, 172.34, 1.39) pt3dadd(-71.37, -250.9, 172.34, 1.39) pt3dadd(-70.3, -250.59, 172.34, 1.53) pt3dadd(-68.78, -250.11, 172.34, 1.6) pt3dadd(-68.32, -249.94, 172.39, 1.75) pt3dadd(-66.19, -249.9, 172.39, 1.75) pt3dadd(-64.93, -249.75, 172.54, 1.68) pt3dadd(-64.92, -249.68, 172.54, 1.68) pt3dadd(-63.49, -249.41, 172.54, 1.68) pt3dadd(-63.42, -249.42, 172.54, 1.68) pt3dadd(-62.26, -249.56, 172.54, 1.68) pt3dadd(-61.1, -249.69, 172.54, 1.68) pt3dadd(-60.23, -249.8, 172.54, 1.68) pt3dadd(-57.88, -250.37, 171.84, 1.68) pt3dadd(-57.52, -250.41, 171.84, 1.68) pt3dadd(-56.56, -251.04, 171.84, 1.68) pt3dadd(-55.73, -252.02, 171.84, 1.68) pt3dadd(-53.55, -252.86, 171.84, 1.68) pt3dadd(-52.35, -253.3, 171.14, 1.68) pt3dadd(-52.21, -253.31, 171.14, 1.68) pt3dadd(-51.17, -253.22, 171.14, 1.68) pt3dadd(-49.88, -253.44, 170.49, 1.6) pt3dadd(-48.56, -252.86, 170.49, 1.6) pt3dadd(-47.64, -251.95, 170.49, 1.6) pt3dadd(-46.56, -250.9, 169.84, 1.68) pt3dadd(-45.61, -249.69, 169.84, 1.68) pt3dadd(-45.14, -249.38, 168.79, 1.68) pt3dadd(-44.98, -249.32, 168.79, 1.68) pt3dadd(-44.98, -249.25, 168.79, 1.68) pt3dadd(-44.31, -248.6, 168.39, 1.68) pt3dadd(-43.31, -248.2, 168.39, 1.68) pt3dadd(-42.7, -247.98, 168.84, 1.68) pt3dadd(-41.78, -247.72, 168.84, 1.68) pt3dadd(-40.2, -247.39, 168.84, 1.9) pt3dadd(-40.07, -247.31, 168.84, 1.75) pt3dadd(-38.05, -246.65, 168.84, 1.75) pt3dadd(-35.1, -245.6, 168.84, 1.75) pt3dadd(-34.6, -245.36, 168.84, 1.75) pt3dadd(-32.28, -244.99, 168.84, 1.75) pt3dadd(-32.21, -244.98, 168.84, 1.75) pt3dadd(-30.17, -244.76, 166.69, 1.6) pt3dadd(-29.96, -244.61, 166.69, 1.6) pt3dadd(-28.13, -244.76, 166.69, 1.6) pt3dadd(-26.8, -245.08, 166.69, 1.6) pt3dadd(-23.86, -245.92, 166.69, 1.39) pt3dadd(-22.01, -246.8, 165.49, 1.39) pt3dadd(-20.45, -247.4, 165.49, 1.39) pt3dadd(-18.83, -247.92, 165.49, 1.17) pt3dadd(-18.25, -247.9, 165.49, 1.17) pt3dadd(-18.17, -247.9, 165.49, 1.17) pt3dadd(-16.82, -246.98, 165.49, 1.09) pt3dadd(-15.53, -246.34, 165.49, 1.09) pt3dadd(-14.73, -246.39, 165.39, 1.31) pt3dadd(-14.58, -246.31, 164.64, 1.31) pt3dadd(-12.03, -246.29, 163.69, 1.31) pt3dadd(-9.81, -247.16, 165.09, 1.09) pt3dadd(-8.62, -247.92, 165.09, 1.09) pt3dadd(-8.54, -248.06, 165.09, 1.09) pt3dadd(-7.57, -248.61, 165.04, 1.09) pt3dadd(-7.57, -248.61, 164.89, 1.09) pt3dadd(-4.55, -249.45, 163.44, 1.17) pt3dadd(-4.4, -249.44, 163.44, 1.17) pt3dadd(-2.71, -249.89, 163.44, 1.17) pt3dadd(-2.71, -249.96, 163.44, 1.17) pt3dadd(-0.65, -250.4, 162.64, 1.17) pt3dadd(1.18, -250.55, 162.64, 1.17) pt3dadd(1.25, -250.55, 162.64, 1.17) pt3dadd(2.86, -250.71, 162.64, 1.09) pt3dadd(5.16, -251.79, 162.64, 1.09) pt3dadd(5.31, -251.78, 162.64, 1.09) pt3dadd(6.96, -252.96, 161.29, 1.09) pt3dadd(8.38, -254.01, 162.74, 1.6) pt3dadd(9.48, -254.11, 162.74, 1.6) pt3dadd(10.71, -255.82, 162.74, 1.31) pt3dadd(10.82, -256.83, 162.74, 1.31) pt3dadd(11.55, -258.78, 161.09, 1.31) } apic[18] {pt3dclear() pt3dadd(-161.12, -253.86, 173.04, 1.53) pt3dadd(-161.06, -252.25, 174.64, 1.53) pt3dadd(-160.26, -251.69, 173.19, 1.53) pt3dadd(-160.2, -251.77, 173.19, 1.53) pt3dadd(-157.64, -251.85, 173.19, 1.53) pt3dadd(-154.74, -252.19, 173.19, 1.53) pt3dadd(-152.82, -252.05, 172.89, 1.53) pt3dadd(-152.75, -252.06, 172.89, 1.53) pt3dadd(-150.71, -251.57, 174.49, 1.53) pt3dadd(-149.25, -251.01, 174.84, 1.53) pt3dadd(-147.3, -250.06, 174.99, 1.53) pt3dadd(-147.22, -250, 174.99, 1.53) pt3dadd(-145.82, -249.36, 174.99, 1.53) pt3dadd(-145.74, -249.3, 174.99, 1.53) pt3dadd(-144.41, -249.23, 174.99, 1.53) pt3dadd(-142.52, -249.38, 175.19, 1.53) pt3dadd(-141.36, -249.52, 175.19, 1.75) pt3dadd(-141.34, -249.37, 175.19, 1.75) pt3dadd(-140.53, -249.91, 175.19, 1.9) pt3dadd(-138.82, -249.75, 175.19, 1.9) pt3dadd(-138.53, -249.78, 175.19, 1.9) pt3dadd(-136.29, -248.87, 175.19, 1.9) pt3dadd(-136.21, -248.81, 175.19, 1.9) pt3dadd(-135.91, -248.7, 175.19, 1.9) pt3dadd(-134.23, -248.16, 175.19, 1.9) pt3dadd(-132.44, -246.69, 174.49, 1.9) pt3dadd(-130.34, -246.35, 173.94, 1.9) pt3dadd(-128.69, -246.03, 173.44, 1.9) pt3dadd(-127.41, -246.4, 173.44, 1.9) pt3dadd(-126.02, -247, 173.44, 1.75) pt3dadd(-125.05, -247.49, 173.44, 1.75) pt3dadd(-123.98, -247.76, 172.74, 1.75) pt3dadd(-123.76, -247.79, 172.74, 1.75) pt3dadd(-122.46, -247.94, 172.74, 1.97) pt3dadd(-122.46, -247.94, 172.69, 1.97) pt3dadd(-120.2, -248.06, 170.94, 1.82) pt3dadd(-118.62, -247.15, 172.74, 1.75) pt3dadd(-118.25, -247.12, 172.74, 1.75) pt3dadd(-116.87, -246.62, 172.74, 1.75) pt3dadd(-115.83, -246.52, 172.74, 1.6) pt3dadd(-115.61, -246.55, 172.74, 1.6) pt3dadd(-114.36, -246.55, 172.74, 1.6) pt3dadd(-112.76, -246.59, 172.64, 1.53) pt3dadd(-112.75, -246.52, 172.64, 1.53) pt3dadd(-111.03, -246.21, 172.64, 1.53) pt3dadd(-109.53, -245.95, 171.99, 1.53) pt3dadd(-109.53, -245.95, 171.94, 1.53) pt3dadd(-107.58, -245.59, 171.19, 1.53) pt3dadd(-105.37, -244.9, 170.44, 1.53) pt3dadd(-104.03, -244.17, 169.89, 1.68) } } proc shape3d_12() { apic[18] { pt3dadd(-102.91, -244.01, 168.94, 1.82) pt3dadd(-101.41, -243.68, 168.94, 1.82) pt3dadd(-100.8, -243.44, 168.94, 1.46) pt3dadd(-99.8, -242.75, 168.94, 1.46) pt3dadd(-98.71, -242.78, 168.89, 1.46) pt3dadd(-98.63, -242.85, 168.89, 1.46) pt3dadd(-97.45, -243.17, 168.94, 1.46) pt3dadd(-97.45, -243.17, 168.89, 1.46) pt3dadd(-96.06, -243.27, 168.84, 1.46) pt3dadd(-94.59, -243.65, 168.84, 1.46) pt3dadd(-94.08, -243.78, 168.84, 1.6) pt3dadd(-92.18, -243.78, 168.04, 1.6) pt3dadd(-90.21, -243.78, 167.39, 1.6) pt3dadd(-88.67, -243.94, 167.39, 1.6) pt3dadd(-88.6, -243.94, 167.39, 1.6) pt3dadd(-87.3, -243.53, 167.39, 1.6) pt3dadd(-86.06, -243.56, 167.39, 1.6) pt3dadd(-85.99, -243.55, 167.39, 1.6) pt3dadd(-84.59, -243.8, 166.54, 1.6) pt3dadd(-82.76, -244.09, 166.54, 1.68) pt3dadd(-81.86, -244.79, 166.54, 1.75) pt3dadd(-80.46, -245.03, 165.94, 1.75) pt3dadd(-78.25, -245.68, 165.49, 1.75) pt3dadd(-76.57, -245.76, 165.49, 1.75) pt3dadd(-75.99, -245.67, 165.49, 1.97) pt3dadd(-75.34, -245.5, 165.49, 2.11) pt3dadd(-73.45, -245.43, 165.49, 2.33) } apic[19] {pt3dclear() pt3dadd(-73.45, -245.43, 165.49, 1.53) pt3dadd(-72.32, -244.15, 164.84, 1.53) pt3dadd(-71.73, -242.52, 164.84, 1.53) pt3dadd(-71.66, -242.45, 164.84, 1.53) pt3dadd(-71.04, -241.33, 164.74, 1.53) pt3dadd(-69.61, -240.62, 162.99, 1.24) pt3dadd(-69.25, -240.47, 162.99, 1.24) pt3dadd(-68.45, -240.44, 162.94, 1.24) pt3dadd(-68.23, -240.43, 162.94, 1.24) pt3dadd(-67.34, -240.83, 162.94, 1.24) pt3dadd(-66.64, -240.01, 162.94, 1.39) pt3dadd(-65.99, -239.91, 162.99, 1.6) pt3dadd(-65.99, -239.84, 162.99, 1.6) pt3dadd(-64.91, -239.36, 162.99, 1.75) pt3dadd(-63.53, -239.24, 162.99, 1.75) pt3dadd(-62.09, -238.89, 162.19, 1.46) pt3dadd(-61.94, -238.89, 162.19, 1.46) pt3dadd(-60.95, -238.12, 164.09, 1.53) pt3dadd(-60.66, -237.96, 164.09, 1.75) pt3dadd(-59.5, -237.78, 162.94, 1.6) pt3dadd(-59.43, -237.77, 162.94, 1.6) pt3dadd(-58.57, -237.38, 162.94, 1.6) pt3dadd(-58.49, -237.37, 162.94, 1.6) pt3dadd(-57.69, -237.35, 162.94, 1.6) pt3dadd(-57.61, -237.49, 162.94, 1.6) pt3dadd(-56.78, -238.26, 162.94, 1.6) pt3dadd(-55.47, -238.14, 162.04, 1.6) pt3dadd(-54.77, -237.53, 162.04, 1.6) pt3dadd(-54.77, -237.39, 162.04, 1.6) pt3dadd(-54.85, -237.31, 162.04, 1.6) pt3dadd(-54.88, -236.51, 162.04, 1.6) pt3dadd(-54.61, -235.77, 160.44, 1.53) pt3dadd(-54.54, -235.7, 160.44, 1.53) pt3dadd(-54.4, -235.69, 160.44, 1.53) pt3dadd(-53.74, -235.67, 160.44, 1.53) pt3dadd(-53.67, -235.67, 160.44, 1.53) pt3dadd(-52.7, -236.22, 160.44, 1.53) pt3dadd(-52.62, -236.36, 160.44, 1.53) pt3dadd(-51.66, -236.76, 159.79, 1.53) pt3dadd(-50.31, -237.73, 159.19, 1.46) pt3dadd(-49.94, -237.94, 159.19, 1.46) pt3dadd(-48.74, -238.7, 159.19, 1.46) pt3dadd(-47.5, -238.87, 158.54, 1.46) pt3dadd(-46.17, -239.33, 157.79, 1.31) pt3dadd(-44.7, -239.5, 157.39, 1.24) pt3dadd(-43.82, -239.68, 156.69, 1.24) pt3dadd(-42.45, -239.34, 157.64, 1.24) pt3dadd(-41.92, -239.45, 157.64, 1.09) pt3dadd(-40.4, -239.61, 157.64, 1.09) pt3dadd(-39.34, -239.94, 157.64, 1.09) pt3dadd(-38.05, -240.21, 157.64, 1.09) pt3dadd(-37.97, -240.22, 157.64, 1.09) pt3dadd(-36.49, -240.01, 157.64, 1.09) pt3dadd(-34.99, -239.72, 157.19, 1.17) pt3dadd(-34.92, -239.73, 157.19, 1.17) pt3dadd(-33.41, -239.3, 157.19, 1.17) pt3dadd(-31.59, -239.41, 156.64, 1.17) pt3dadd(-30.35, -238.8, 156.09, 1.17) pt3dadd(-30.27, -238.74, 156.09, 1.17) pt3dadd(-29.4, -238.75, 156.09, 1.17) pt3dadd(-28.46, -238.92, 156.09, 1.17) pt3dadd(-28.32, -238.94, 156.09, 1.17) pt3dadd(-27.32, -239.26, 156.09, 1.17) pt3dadd(-27.11, -239.28, 156.09, 1.17) pt3dadd(-26.03, -239.54, 156.09, 1.17) pt3dadd(-26.01, -239.32, 156.09, 1.17) pt3dadd(-23.44, -239.95, 155.29, 1.02) pt3dadd(-22.51, -239.46, 155.29, 1.09) pt3dadd(-21.39, -239.28, 154.89, 1.6) pt3dadd(-20.03, -239.64, 154.89, 1.6) pt3dadd(-18.16, -239.9, 154.59, 1.31) pt3dadd(-17.31, -240.21, 154.59, 1.31) pt3dadd(-15.83, -240.8, 153.09, 1.46) pt3dadd(-15.07, -241.24, 153.09, 1.31) pt3dadd(-13.28, -242.38, 153.09, 1.31) pt3dadd(-12.37, -242.76, 153.09, 1.31) pt3dadd(-11.3, -243.83, 153.09, 1.31) pt3dadd(-9.88, -244.92, 153.09, 1.31) pt3dadd(-8.57, -245.79, 153.09, 1.31) pt3dadd(-7.41, -246.64, 153.09, 1.31) pt3dadd(-7.42, -246.71, 153.09, 1.31) pt3dadd(-5.75, -247.54, 152.14, 1.31) pt3dadd(-4.1, -248.59, 151.59, 1.31) pt3dadd(-2.45, -249.71, 151.59, 1.31) pt3dadd(-2.46, -249.78, 151.59, 1.31) pt3dadd(-1.63, -251.04, 151.59, 1.31) pt3dadd(-1.64, -251.11, 151.59, 1.31) pt3dadd(-0.62, -252.54, 151.59, 1.31) pt3dadd(-0.18, -253.97, 150.94, 1.24) pt3dadd(1.26, -255, 150.94, 1.24) pt3dadd(2.87, -255.75, 150.04, 1.24) pt3dadd(3.92, -256.15, 150.04, 1.24) pt3dadd(3.92, -256.22, 150.04, 1.24) pt3dadd(3.97, -257.84, 151.14, 1.24) pt3dadd(4.25, -259.41, 151.14, 1.24) pt3dadd(5.12, -260.23, 151.14, 1.24) pt3dadd(5.6, -261.23, 151.14, 1.02) } apic[20] {pt3dclear() pt3dadd(-73.45, -245.43, 165.49, 1.02) pt3dadd(-71.67, -246.1, 165.54, 1.02) pt3dadd(-71.52, -246.16, 165.54, 1.02) pt3dadd(-69.54, -246.6, 165.54, 1.02) pt3dadd(-67.7, -246.97, 163.44, 0.95) pt3dadd(-65.87, -247.05, 164.19, 1.24) pt3dadd(-64.7, -247.15, 164.19, 1.24) pt3dadd(-64.26, -247.21, 164.19, 1.24) pt3dadd(-63.24, -247.17, 164.19, 1.24) pt3dadd(-63.1, -247.1, 164.19, 1.24) pt3dadd(-62.23, -246.99, 164.19, 1.24) pt3dadd(-62.08, -246.99, 164.19, 1.24) pt3dadd(-60.53, -247.44, 164.19, 1.24) pt3dadd(-60.47, -247.29, 164.19, 1.24) pt3dadd(-58.84, -247.89, 164.19, 1.24) pt3dadd(-58.68, -248.18, 164.19, 1.39) pt3dadd(-57.81, -248.14, 164.19, 1.39) pt3dadd(-57.66, -248.14, 164.19, 1.39) pt3dadd(-56.64, -248.25, 164.19, 1.39) pt3dadd(-54, -248.66, 164.29, 1.39) pt3dadd(-51.66, -248.79, 164.29, 1.39) pt3dadd(-51.66, -248.65, 164.29, 1.39) pt3dadd(-49.06, -247.97, 164.29, 1.39) pt3dadd(-48.85, -247.89, 164.29, 1.39) pt3dadd(-46.73, -248.03, 164.29, 1.39) pt3dadd(-45.63, -247.99, 164.29, 1.39) pt3dadd(-43.5, -248.57, 163.59, 1.39) pt3dadd(-43.42, -248.57, 163.59, 1.39) pt3dadd(-42.49, -248.17, 163.59, 1.39) pt3dadd(-42.34, -248.16, 163.59, 1.39) pt3dadd(-41.11, -248.05, 163.59, 1.39) pt3dadd(-41.11, -247.97, 163.59, 1.39) pt3dadd(-38.7, -247.96, 162.89, 1.39) pt3dadd(-38.56, -247.95, 162.89, 1.39) pt3dadd(-37.1, -247.9, 162.89, 1.39) pt3dadd(-35.05, -248.26, 162.39, 1.39) pt3dadd(-31.65, -249.52, 161.44, 1.39) pt3dadd(-30.39, -250.06, 161.44, 1.39) pt3dadd(-30.38, -250.13, 161.44, 1.39) pt3dadd(-26.74, -251.9, 160.29, 1.24) pt3dadd(-25.2, -252.35, 160.29, 1.24) pt3dadd(-24.24, -252.68, 160.29, 1.24) pt3dadd(-22.9, -253.22, 159.49, 1.09) pt3dadd(-21.86, -253.83, 159.49, 1.09) pt3dadd(-20.67, -254.37, 159.49, 1.31) pt3dadd(-20.96, -254.6, 159.49, 1.53) pt3dadd(-19.49, -254.7, 159.49, 1.53) pt3dadd(-19.78, -254.85, 159.49, 1.53) pt3dadd(-18.45, -255.31, 159.49, 1.24) pt3dadd(-16.59, -256.41, 159.19, 0.95) pt3dadd(-14.61, -256.85, 159.19, 0.95) pt3dadd(-14.46, -256.85, 159.19, 0.95) pt3dadd(-13.52, -256.59, 159.19, 0.95) pt3dadd(-13.23, -256.58, 159.19, 0.95) pt3dadd(-12.7, -257.07, 159.19, 0.95) pt3dadd(-12.7, -257.22, 159.19, 0.95) pt3dadd(-11.66, -257.69, 159.19, 0.95) pt3dadd(-11.59, -257.69, 159.19, 0.95) pt3dadd(-9.82, -258.06, 159.19, 0.95) pt3dadd(-8.06, -258.44, 159.19, 0.95) pt3dadd(-6.66, -258.9, 159.19, 0.95) pt3dadd(-6.58, -259.04, 159.19, 0.95) pt3dadd(-5.53, -259.66, 159.19, 0.95) pt3dadd(-5.32, -259.65, 159.19, 0.95) pt3dadd(-5.09, -259.79, 159.19, 0.95) pt3dadd(-3.62, -260.17, 159.19, 0.95) pt3dadd(-1.29, -259.94, 159.19, 0.95) pt3dadd(0.03, -260.11, 158.24, 0.87) pt3dadd(0.81, -259.57, 158.24, 0.66) pt3dadd(1.83, -259.68, 158.24, 0.66) pt3dadd(2.05, -259.67, 158.24, 0.66) pt3dadd(3.31, -260.06, 158.24, 0.66) pt3dadd(3.82, -260.12, 158.24, 0.66) pt3dadd(3.89, -260.12, 158.24, 0.66) pt3dadd(4.63, -260.24, 157.64, 0.87) pt3dadd(5.64, -260.13, 157.64, 0.87) } } proc shape3d_13() { apic[20] { pt3dadd(5.72, -260.12, 157.64, 0.87) pt3dadd(6.66, -260.09, 157.64, 0.87) } apic[21] {pt3dclear() pt3dadd(-167.86, -253.79, 174.14, 1.24) pt3dadd(-167.27, -252.69, 177.99, 1.24) pt3dadd(-167.12, -252.63, 177.99, 1.24) pt3dadd(-166.35, -251.7, 177.99, 1.24) pt3dadd(-165.39, -251, 177.99, 1.24) pt3dadd(-165.38, -250.93, 177.99, 1.24) pt3dadd(-164.84, -250.11, 177.99, 1.24) pt3dadd(-164.1, -250.05, 177.99, 1.39) pt3dadd(-164, -249.85, 177.99, 1.39) pt3dadd(-162.95, -249.68, 177.99, 1.39) pt3dadd(-161.52, -249.99, 177.99, 1.39) pt3dadd(-160.93, -250.58, 177.99, 1.39) pt3dadd(-160.93, -250.58, 177.94, 1.39) pt3dadd(-159.05, -250.8, 177.69, 1.39) pt3dadd(-156.91, -251.35, 177.69, 1.6) pt3dadd(-155.74, -251.34, 170.84, 1.24) pt3dadd(-155.66, -251.27, 170.84, 1.24) pt3dadd(-153.51, -251.09, 170.84, 1.24) pt3dadd(-151.72, -250.27, 170.84, 1.24) pt3dadd(-150.78, -249.14, 170.84, 1.46) pt3dadd(-150.44, -248.15, 170.84, 1.6) pt3dadd(-150.12, -247.3, 170.84, 1.9) pt3dadd(-149.73, -246.47, 170.84, 1.9) pt3dadd(-149.63, -246.26, 170.84, 1.9) pt3dadd(-149.27, -245.72, 169.99, 1.97) pt3dadd(-148.74, -244.9, 169.24, 1.97) pt3dadd(-148.07, -243.59, 168.69, 1.97) pt3dadd(-147.45, -242.12, 168.34, 1.97) pt3dadd(-146.12, -241.39, 169.44, 1.9) pt3dadd(-144.8, -240.16, 169.44, 1.9) pt3dadd(-144.35, -240.05, 169.44, 1.53) pt3dadd(-143.34, -239.72, 169.44, 1.53) pt3dadd(-142.54, -239.54, 169.44, 1.68) pt3dadd(-142.33, -239.39, 169.44, 1.68) pt3dadd(-141.31, -239.35, 169.44, 1.68) pt3dadd(-141.16, -239.35, 169.34, 1.68) pt3dadd(-138.71, -238.53, 168.24, 1.68) pt3dadd(-137.36, -237.61, 167.49, 1.68) pt3dadd(-135.08, -236.14, 167.49, 1.68) pt3dadd(-135.02, -235.92, 167.49, 1.68) pt3dadd(-132.99, -235.4, 167.49, 1.68) pt3dadd(-132.99, -235.4, 167.44, 1.68) pt3dadd(-131.19, -234.83, 166.89, 1.9) pt3dadd(-131.04, -234.82, 166.89, 1.9) pt3dadd(-129.83, -234.19, 166.89, 1.9) pt3dadd(-129.83, -234.12, 166.89, 1.9) pt3dadd(-128.47, -233.34, 166.34, 1.75) pt3dadd(-128.4, -233.19, 166.34, 1.75) pt3dadd(-126.82, -232.48, 166.34, 1.75) pt3dadd(-126.75, -232.41, 166.34, 1.75) pt3dadd(-124.86, -232.34, 166.34, 1.75) pt3dadd(-122.54, -231.96, 166.34, 1.75) pt3dadd(-122.39, -231.95, 166.34, 1.75) pt3dadd(-120.64, -232.04, 166.34, 1.75) pt3dadd(-119.78, -231.71, 166.34, 1.75) pt3dadd(-117.83, -231.2, 166.34, 1.75) pt3dadd(-117.75, -231.42, 166.34, 1.75) pt3dadd(-117.53, -231.41, 166.34, 1.75) pt3dadd(-115.77, -231.71, 166.34, 1.75) pt3dadd(-115.69, -231.71, 166.34, 1.75) pt3dadd(-111.96, -232.01, 166.34, 1.75) pt3dadd(-109.91, -232.23, 166.34, 1.75) pt3dadd(-107.8, -232.15, 166.34, 1.75) pt3dadd(-106.03, -232.53, 166.34, 1.75) pt3dadd(-103.41, -232.5, 166.34, 1.75) pt3dadd(-103.34, -232.43, 166.34, 1.75) pt3dadd(-101.53, -232.07, 166.34, 1.75) pt3dadd(-99.7, -230.33, 166.34, 1.75) pt3dadd(-99.56, -230.17, 166.34, 1.75) pt3dadd(-96.85, -228.33, 165.34, 1.75) pt3dadd(-96.7, -228.32, 165.34, 1.75) pt3dadd(-94.67, -228.17, 165.34, 1.75) pt3dadd(-94.67, -228.17, 164.79, 1.75) pt3dadd(-92.85, -227.89, 164.69, 1.75) pt3dadd(-92.78, -227.89, 164.69, 1.75) pt3dadd(-91.48, -227.62, 164.69, 1.75) pt3dadd(-89.49, -228.13, 162.79, 1.6) pt3dadd(-88.47, -228.24, 162.79, 1.82) pt3dadd(-87.29, -228.56, 162.79, 2.04) pt3dadd(-85.51, -229.15, 162.79, 2.04) pt3dadd(-83.61, -229.37, 162.59, 1.75) pt3dadd(-82.88, -229.35, 162.59, 1.75) pt3dadd(-81.14, -228.99, 162.59, 1.75) pt3dadd(-78.66, -229.19, 161.44, 1.75) pt3dadd(-76.69, -229.2, 162.44, 1.6) pt3dadd(-76.1, -229.17, 162.49, 1.6) pt3dadd(-75.52, -229.3, 162.49, 1.6) pt3dadd(-75.44, -229.3, 162.64, 1.6) pt3dadd(-73.25, -229.29, 161.19, 1.6) pt3dadd(-73.18, -229.21, 161.19, 1.6) pt3dadd(-72.97, -229.21, 161.19, 1.6) pt3dadd(-71.29, -229.14, 161.14, 1.6) pt3dadd(-67.72, -229.16, 161.14, 1.6) pt3dadd(-66.62, -229.12, 161.14, 1.46) pt3dadd(-66.69, -229.2, 161.14, 1.46) pt3dadd(-66.69, -229.27, 161.14, 1.46) pt3dadd(-65.69, -228.65, 161.14, 1.46) pt3dadd(-63.8, -228.65, 161.14, 1.46) pt3dadd(-62.57, -228.17, 161.14, 1.68) pt3dadd(-60.51, -228.61, 161.14, 1.68) pt3dadd(-60.59, -228.54, 161.14, 1.68) pt3dadd(-59.22, -228.05, 161.14, 1.68) pt3dadd(-58.26, -228.31, 161.14, 1.68) pt3dadd(-56.24, -228.09, 161.14, 1.82) pt3dadd(-56.23, -228.16, 161.14, 1.82) pt3dadd(-53.68, -228.07, 161.14, 1.82) pt3dadd(-53.47, -227.98, 161.04, 1.82) pt3dadd(-53.4, -227.91, 160.94, 1.82) pt3dadd(-52.16, -227.79, 160.24, 2.11) pt3dadd(-50.86, -227.53, 160.24, 2.11) pt3dadd(-50.78, -227.6, 160.24, 2.11) pt3dadd(-48.84, -227.01, 160.24, 1.82) pt3dadd(-48.69, -227.01, 160.24, 1.82) pt3dadd(-47.09, -226.95, 160.24, 1.82) pt3dadd(-46.22, -226.7, 160.24, 1.53) pt3dadd(-44.6, -227.01, 160.24, 1.53) pt3dadd(-43.95, -226.84, 160.24, 1.53) pt3dadd(-41.96, -227.64, 159.29, 1.53) pt3dadd(-40.43, -227.51, 159.29, 1.53) pt3dadd(-40.13, -227.57, 159.29, 1.53) pt3dadd(-39.84, -227.56, 159.29, 1.53) pt3dadd(-38.46, -227.51, 159.29, 1.53) pt3dadd(-37.94, -227.78, 159.29, 1.75) pt3dadd(-37.87, -227.71, 159.29, 1.75) pt3dadd(-36.32, -228.09, 158.04, 2.11) pt3dadd(-36.32, -228.09, 158.09, 2.11) } apic[22] {pt3dclear() pt3dadd(-36.32, -228.09, 158.09, 1.6) pt3dadd(-35.72, -226.61, 158.09, 1.6) pt3dadd(-35.09, -225.78, 158.09, 1.31) pt3dadd(-35.02, -225.78, 158.09, 1.31) pt3dadd(-33.63, -225.88, 158.09, 1.31) pt3dadd(-33.63, -225.8, 158.09, 1.31) pt3dadd(-32.95, -226.44, 158.24, 1.17) pt3dadd(-32.96, -226.36, 158.24, 1.17) pt3dadd(-32.32, -226.78, 158.24, 1.17) pt3dadd(-31.94, -225.87, 158.24, 1.17) pt3dadd(-30.43, -225.44, 158.24, 1.17) pt3dadd(-29, -225.07, 157.04, 1.17) pt3dadd(-29, -225.07, 157.09, 1.17) pt3dadd(-28.45, -224.03, 157.09, 1.17) pt3dadd(-28.3, -223.97, 157.09, 1.17) pt3dadd(-27.27, -223.2, 157.09, 1.17) pt3dadd(-27.18, -223.06, 157.09, 1.17) pt3dadd(-26.12, -222.07, 156.04, 1.17) pt3dadd(-25.34, -220.83, 155.34, 1.31) pt3dadd(-25.11, -220.71, 155.34, 1.31) pt3dadd(-24.41, -220.34, 155.34, 1.31) pt3dadd(-23.79, -220.04, 155.34, 1.31) pt3dadd(-21.19, -218.98, 154.39, 1.31) pt3dadd(-21.11, -218.92, 154.39, 1.31) pt3dadd(-19.91, -218.6, 154.39, 1.31) pt3dadd(-18.75, -217.99, 153.34, 1.6) pt3dadd(-18.26, -217.52, 153.34, 1.9) pt3dadd(-18.32, -217.44, 153.34, 1.9) pt3dadd(-18, -217.18, 153.34, 1.97) pt3dadd(-18, -217.11, 153.34, 1.97) pt3dadd(-17.27, -216.45, 152.74, 1.75) pt3dadd(-15.4, -215.33, 151.74, 1.75) pt3dadd(-15.25, -215.34, 151.74, 1.75) pt3dadd(-13.82, -215.63, 151.74, 1.75) pt3dadd(-12.02, -215.96, 151.74, 1.46) pt3dadd(-10.23, -216.44, 151.74, 1.46) pt3dadd(-9.34, -217.04, 151.74, 1.46) pt3dadd(-7.95, -217.7, 151.89, 1.39) pt3dadd(-6.02, -218.92, 151.89, 1.39) pt3dadd(-4.48, -219.59, 151.89, 1.39) pt3dadd(-2.37, -220.54, 151.89, 1.39) pt3dadd(-0.61, -221.89, 150.54, 1.39) pt3dadd(-0.6, -221.82, 150.54, 1.39) pt3dadd(0.71, -221.88, 150.54, 1.39) pt3dadd(1.54, -222.4, 150.54, 1.39) pt3dadd(1.53, -222.48, 150.54, 1.39) pt3dadd(2.17, -223.42, 150.54, 1.39) pt3dadd(2.16, -223.49, 150.54, 1.39) pt3dadd(3.55, -224.22, 150.54, 1.39) pt3dadd(3.55, -224.22, 150.59, 1.39) pt3dadd(6.1, -226.53, 150.59, 1.39) pt3dadd(6.25, -226.55, 150.59, 1.39) pt3dadd(7.26, -228.12, 150.59, 1.39) pt3dadd(7.84, -228.84, 150.59, 1.39) pt3dadd(8.93, -229.68, 150.59, 1.39) pt3dadd(9.07, -229.69, 150.59, 1.39) pt3dadd(10.15, -232.81, 149.69, 1.39) pt3dadd(10.33, -233.85, 149.69, 1.09) pt3dadd(11.2, -234.67, 149.69, 1.09) pt3dadd(11.35, -234.69, 149.69, 1.09) pt3dadd(12.2, -234.92, 149.69, 1.09) pt3dadd(12.28, -234.93, 149.69, 1.09) pt3dadd(13.32, -235.48, 149.69, 1.09) pt3dadd(13.75, -235.52, 149.69, 1.09) pt3dadd(15.06, -234.92, 149.69, 1.09) pt3dadd(15.14, -234.86, 149.69, 1.09) pt3dadd(15.79, -234.92, 149.69, 1.09) pt3dadd(15.87, -234.93, 149.69, 1.09) pt3dadd(16.51, -235.8, 149.69, 1.09) pt3dadd(16.96, -237.09, 148.64, 1.09) } apic[23] {pt3dclear() pt3dadd(-36.32, -228.09, 158.09, 1.17) pt3dadd(-35.33, -229.44, 158.09, 1.17) } } proc shape3d_14() { apic[23] { pt3dadd(-32.58, -230.65, 159.09, 1.02) pt3dadd(-31.06, -230.3, 159.09, 1.02) pt3dadd(-28.21, -230.57, 159.09, 1.02) pt3dadd(-28.14, -230.56, 159.09, 1.02) pt3dadd(-26.44, -230.94, 159.09, 1.02) pt3dadd(-24.89, -231.54, 159.09, 1.31) pt3dadd(-21.65, -232.3, 157.59, 1.31) pt3dadd(-21.65, -232.3, 157.64, 1.31) pt3dadd(-20.24, -233.05, 157.59, 1.39) pt3dadd(-19.81, -233.29, 157.59, 0.87) pt3dadd(-19.52, -233.32, 157.59, 0.87) pt3dadd(-18.31, -233.59, 157.59, 0.87) pt3dadd(-18.09, -233.62, 157.59, 0.87) pt3dadd(-16.32, -234.24, 157.59, 0.87) pt3dadd(-16.18, -234.25, 157.59, 0.87) pt3dadd(-14.94, -234.3, 157.59, 0.87) pt3dadd(-14.49, -234.28, 157.59, 0.87) pt3dadd(-13.3, -234.03, 157.59, 0.87) pt3dadd(-13.15, -234.05, 157.59, 0.87) pt3dadd(-13.14, -233.97, 157.59, 0.87) pt3dadd(-12.55, -233.89, 157.59, 0.87) pt3dadd(-12.33, -233.91, 157.59, 0.87) pt3dadd(-10.74, -234.88, 156.44, 0.87) pt3dadd(-10.59, -234.82, 156.44, 0.87) pt3dadd(-9.77, -236.08, 156.44, 0.87) pt3dadd(-9.55, -236.1, 156.44, 0.87) pt3dadd(-8.8, -236.62, 156.44, 0.87) pt3dadd(-7.8, -237.6, 155.64, 0.87) pt3dadd(-6.84, -238.28, 154.74, 0.87) pt3dadd(-5.55, -239.22, 154.74, 0.87) pt3dadd(-5.55, -239.29, 154.74, 0.87) pt3dadd(-4.59, -239.9, 154.19, 0.87) pt3dadd(-4.36, -239.85, 154.19, 0.87) pt3dadd(-2.57, -240.92, 154.19, 0.87) pt3dadd(-1.75, -241.51, 154.19, 0.95) pt3dadd(-0.94, -242.18, 153.54, 0.95) pt3dadd(0.12, -242.58, 153.99, 0.87) pt3dadd(0.26, -242.6, 153.99, 0.87) pt3dadd(1.25, -242.99, 153.99, 0.87) pt3dadd(2.23, -243.46, 152.99, 0.87) pt3dadd(3.26, -244.15, 152.99, 0.87) } apic[24] {pt3dclear() pt3dadd(-179.66, -255.48, 176.04, 1.46) pt3dadd(-179.22, -255.02, 179.59, 1.46) pt3dadd(-179.15, -255.03, 179.59, 1.46) pt3dadd(-179.07, -254.66, 179.59, 1.09) pt3dadd(-178.68, -253.33, 179.59, 1.09) pt3dadd(-178.19, -252.17, 179.59, 1.09) pt3dadd(-177.31, -250.36, 178.94, 1.09) pt3dadd(-177.21, -250.23, 178.94, 1.09) pt3dadd(-176.59, -249.85, 178.94, 1.09) pt3dadd(-176.58, -249.78, 178.94, 1.09) pt3dadd(-175.06, -248.42, 178.94, 1.09) pt3dadd(-173.84, -248.03, 178.94, 1.09) pt3dadd(-173.79, -247.82, 178.94, 1.09) pt3dadd(-172.47, -246.63, 178.94, 1.09) pt3dadd(-171.09, -245.23, 178.39, 1.09) pt3dadd(-171.04, -245.02, 178.39, 1.09) pt3dadd(-170.15, -244.1, 178.39, 1.09) pt3dadd(-170.01, -243.84, 178.39, 1.09) pt3dadd(-169.7, -243.16, 178.39, 1.09) pt3dadd(-169.6, -243.04, 178.29, 1.09) pt3dadd(-169.22, -242.38, 177.89, 1.09) pt3dadd(-169.13, -242.32, 177.89, 1.09) pt3dadd(-168.1, -241.74, 177.84, 1.09) pt3dadd(-167.92, -241.63, 177.84, 1.09) pt3dadd(-166.95, -241.34, 177.34, 1.17) pt3dadd(-166.37, -241.1, 176.74, 1.17) pt3dadd(-165.16, -240.71, 176.09, 1.24) pt3dadd(-164.17, -240.64, 176.09, 1.24) pt3dadd(-162.76, -240.38, 175.64, 1.24) pt3dadd(-162, -239.36, 175.04, 1.24) pt3dadd(-161.42, -238.52, 175.04, 1.39) pt3dadd(-161.03, -237.79, 175.04, 1.39) pt3dadd(-159.28, -236.4, 174.69, 1.39) pt3dadd(-157.92, -236.35, 174.19, 1.46) pt3dadd(-157.38, -235.95, 174.19, 1.46) pt3dadd(-155.99, -235.46, 173.69, 1.46) pt3dadd(-154.78, -234.47, 172.89, 1.53) pt3dadd(-152.76, -233.82, 172.64, 1.6) pt3dadd(-151.12, -234.2, 172.64, 1.6) pt3dadd(-151.12, -234.2, 172.54, 1.6) pt3dadd(-149, -235.37, 172.09, 1.53) pt3dadd(-149.06, -235.29, 172.09, 1.53) pt3dadd(-147.95, -236.3, 172.09, 1.53) pt3dadd(-145.37, -237.43, 171.64, 1.46) pt3dadd(-144.98, -237.37, 171.64, 1.46) pt3dadd(-143.6, -237.24, 171.64, 1.46) pt3dadd(-143.59, -237.17, 171.64, 1.46) pt3dadd(-141.4, -236.49, 171.04, 1.46) pt3dadd(-140.47, -236.33, 169.79, 1.46) pt3dadd(-138.79, -236.2, 169.39, 1.46) pt3dadd(-138.79, -236.2, 169.29, 1.46) pt3dadd(-136.8, -236, 168.74, 1.46) pt3dadd(-136.69, -235.87, 168.74, 1.46) pt3dadd(-135.58, -235.31, 168.74, 1.53) pt3dadd(-134.62, -234.71, 168.09, 1.6) pt3dadd(-133.8, -234.08, 168.09, 1.75) pt3dadd(-132.38, -233.14, 167.54, 1.75) pt3dadd(-131.04, -231.89, 166.94, 1.75) pt3dadd(-129.74, -230.84, 166.94, 1.75) pt3dadd(-128.41, -229.96, 166.94, 1.75) pt3dadd(-127.15, -229.06, 166.94, 1.75) pt3dadd(-126.06, -228.56, 166.94, 1.75) pt3dadd(-125.31, -227.92, 166.94, 1.75) pt3dadd(-124.31, -227.48, 166.94, 1.9) pt3dadd(-123.52, -226.99, 166.94, 1.82) pt3dadd(-122.8, -226.13, 166.94, 1.53) pt3dadd(-122.53, -226.27, 166.94, 1.53) pt3dadd(-120.97, -226.34, 166.94, 1.53) pt3dadd(-120.64, -226.31, 166.94, 1.39) pt3dadd(-120.57, -226.3, 166.94, 1.39) pt3dadd(-118.9, -226.02, 166.99, 1.39) pt3dadd(-118.61, -226.01, 166.99, 1.39) pt3dadd(-116.81, -225.36, 166.99, 1.39) pt3dadd(-113.01, -225.37, 166.99, 1.39) pt3dadd(-113.02, -225.3, 166.99, 1.39) pt3dadd(-111.21, -224.87, 166.99, 1.82) pt3dadd(-111.14, -224.87, 166.99, 1.82) pt3dadd(-109.75, -224.96, 166.99, 1.82) pt3dadd(-109.75, -224.89, 166.99, 1.82) pt3dadd(-108.56, -225.43, 166.99, 1.82) pt3dadd(-106.74, -225.51, 166.64, 1.6) pt3dadd(-104.81, -226.31, 166.64, 1.6) pt3dadd(-104.74, -226.31, 166.64, 1.6) pt3dadd(-102.8, -225.58, 165.34, 1.6) pt3dadd(-102.72, -225.51, 165.29, 1.6) pt3dadd(-102.51, -225.5, 165.29, 1.6) pt3dadd(-100.4, -225.2, 164.69, 1.75) pt3dadd(-99.26, -224.51, 164.69, 1.97) pt3dadd(-99.26, -224.51, 164.54, 1.97) pt3dadd(-97.76, -223.58, 164.14, 1.97) pt3dadd(-96.43, -222.21, 163.39, 2.11) pt3dadd(-95.26, -220.06, 162.64, 2.11) pt3dadd(-93.64, -218.47, 162.64, 2.11) pt3dadd(-92.02, -216.95, 161.94, 2.11) pt3dadd(-90, -216.51, 161.34, 2.04) pt3dadd(-89.3, -217.73, 161.34, 2.04) pt3dadd(-89.45, -219.48, 160.94, 2.19) pt3dadd(-89.44, -221.67, 160.94, 2.19) pt3dadd(-89.37, -221.59, 160.94, 2.19) pt3dadd(-88.57, -221.86, 161.49, 1.82) pt3dadd(-87.35, -221.16, 158.29, 1.6) pt3dadd(-87.21, -221.15, 158.29, 1.6) pt3dadd(-86.08, -220.16, 158.29, 1.6) pt3dadd(-86.08, -220.01, 158.29, 1.6) pt3dadd(-84.82, -218.66, 157.19, 1.6) pt3dadd(-83.99, -217.39, 157.19, 1.46) pt3dadd(-83.4, -217.44, 157.19, 1.02) pt3dadd(-83.4, -217.51, 157.19, 1.02) pt3dadd(-82.23, -217.54, 157.19, 1.02) pt3dadd(-82.16, -217.54, 157.19, 1.02) pt3dadd(-80.84, -217.85, 157.19, 1.02) pt3dadd(-80.33, -217.69, 157.19, 1.24) pt3dadd(-80.26, -217.61, 157.19, 1.24) pt3dadd(-79.24, -217.72, 157.19, 1.46) pt3dadd(-78.52, -217.48, 157.19, 1.68) pt3dadd(-78.52, -217.33, 157.19, 1.68) pt3dadd(-77.71, -217.45, 157.19, 1.68) pt3dadd(-77.64, -217.45, 157.19, 1.68) pt3dadd(-74.89, -216.91, 157.19, 1.68) pt3dadd(-72.33, -217.18, 157.19, 1.68) pt3dadd(-70.08, -216.81, 156.34, 1.68) pt3dadd(-69.57, -216.71, 156.34, 1.68) pt3dadd(-69.35, -216.71, 156.34, 1.68) pt3dadd(-68.1, -217.1, 156.19, 1.68) pt3dadd(-68.1, -216.95, 156.19, 1.68) pt3dadd(-66.57, -217.04, 155.59, 1.68) pt3dadd(-65.26, -216.78, 155.59, 1.68) pt3dadd(-62.98, -217.35, 154.99, 1.68) pt3dadd(-61.89, -217.38, 154.69, 1.46) pt3dadd(-61.81, -217.38, 154.69, 1.46) pt3dadd(-60.57, -217.48, 154.69, 1.46) pt3dadd(-59.84, -217.45, 154.69, 1.02) pt3dadd(-58.75, -217.56, 154.69, 1.02) pt3dadd(-57.86, -217.44, 154.69, 1.75) pt3dadd(-56.66, -217.19, 154.69, 1.75) pt3dadd(-55.14, -216.69, 154.69, 1.75) pt3dadd(-53.4, -216.13, 154.69, 1.75) pt3dadd(-53.32, -216.07, 154.69, 1.75) pt3dadd(-51.69, -215.94, 154.59, 1.75) pt3dadd(-51.69, -215.94, 153.34, 1.75) pt3dadd(-49.68, -216.29, 152.89, 1.75) pt3dadd(-49.61, -216.3, 152.89, 1.75) pt3dadd(-48.47, -216.64, 152.89, 1.75) pt3dadd(-46.77, -217.25, 152.89, 1.75) pt3dadd(-46.7, -217.26, 152.89, 1.75) pt3dadd(-45.72, -216.99, 152.34, 1.75) pt3dadd(-43.47, -217.22, 151.59, 1.75) pt3dadd(-41.59, -216.75, 150.89, 1.75) pt3dadd(-41.52, -216.76, 150.89, 1.75) pt3dadd(-39.92, -216.85, 150.89, 1.75) pt3dadd(-39.84, -216.79, 150.89, 1.75) pt3dadd(-38.76, -216.31, 150.89, 1.75) pt3dadd(-37.84, -215.89, 150.39, 1.75) pt3dadd(-36.37, -215.09, 150.39, 1.75) pt3dadd(-34.44, -214.85, 150.24, 1.53) pt3dadd(-34.07, -214.81, 150.24, 1.53) pt3dadd(-33.07, -215.13, 149.44, 1.53) pt3dadd(-33, -215.14, 149.44, 1.53) pt3dadd(-31.07, -215.63, 148.74, 1.53) } } proc shape3d_15() { apic[24] { pt3dadd(-30.93, -215.65, 148.74, 1.53) pt3dadd(-29.55, -215.79, 148.74, 1.46) pt3dadd(-29.41, -215.87, 148.74, 1.46) pt3dadd(-28.98, -215.99, 148.74, 1.46) pt3dadd(-28.84, -216.01, 148.74, 1.46) pt3dadd(-25.65, -216.33, 148.69, 1.46) pt3dadd(-24.53, -216.15, 148.69, 1.46) pt3dadd(-23.95, -216.21, 148.69, 1.46) pt3dadd(-23.73, -216.23, 148.69, 1.46) pt3dadd(-22.02, -215.97, 148.69, 1.46) pt3dadd(-21.59, -216.01, 148.69, 1.46) pt3dadd(-20.64, -216.11, 148.69, 1.46) pt3dadd(-19.24, -216.03, 148.99, 1.17) pt3dadd(-18.11, -217.1, 148.99, 1.17) pt3dadd(-17.15, -217.79, 148.99, 1.17) pt3dadd(-17.15, -217.79, 148.94, 1.17) pt3dadd(-16.43, -218.66, 147.34, 1.17) pt3dadd(-15.92, -218.64, 147.34, 1.17) pt3dadd(-14.74, -217.89, 147.34, 1.17) pt3dadd(-14.66, -217.75, 147.34, 1.17) pt3dadd(-13.62, -216.24, 146.44, 1.17) pt3dadd(-13.19, -215.55, 144.49, 1.17) pt3dadd(-13.09, -215.34, 144.49, 1.17) pt3dadd(-12.2, -214.48, 144.49, 1.17) pt3dadd(-12.12, -214.49, 144.49, 1.17) pt3dadd(-11.07, -213.5, 144.49, 1.17) pt3dadd(-10.91, -213.37, 144.49, 1.17) pt3dadd(-9.6, -212.77, 144.49, 1.17) pt3dadd(-9.38, -212.72, 144.49, 1.17) pt3dadd(-7.05, -212.15, 144.49, 1.17) pt3dadd(-6.98, -212.16, 144.49, 1.17) pt3dadd(-5.89, -212.27, 144.49, 1.17) pt3dadd(-5.74, -212.28, 144.49, 1.17) pt3dadd(-4.27, -212.88, 144.49, 1.09) pt3dadd(-4.19, -212.88, 144.49, 1.09) pt3dadd(-3.29, -213.41, 144.49, 1.09) pt3dadd(-1.27, -214.43, 143.54, 1.09) pt3dadd(-0.09, -215.06, 143.54, 1.09) pt3dadd(-0.02, -215.07, 143.54, 1.09) pt3dadd(2.14, -216.17, 143.54, 1.09) pt3dadd(3.25, -216.79, 143.54, 1.09) pt3dadd(5.15, -217.57, 143.54, 1.09) pt3dadd(5.8, -217.64, 143.54, 1.09) pt3dadd(6.68, -218.39, 143.54, 1.09) pt3dadd(6.75, -218.4, 143.54, 1.09) pt3dadd(7.38, -219.41, 143.54, 1.09) pt3dadd(7.7, -219.81, 143.54, 1.24) pt3dadd(8.94, -220.6, 143.54, 1.24) pt3dadd(9.01, -220.61, 143.54, 1.24) pt3dadd(10.89, -221.6, 143.54, 1.24) pt3dadd(11.57, -222.11, 143.54, 1.24) pt3dadd(12.47, -222.64, 143.54, 1.24) pt3dadd(12.9, -222.69, 143.54, 1.24) pt3dadd(14.46, -223.21, 144.29, 1.24) pt3dadd(14.97, -223.27, 144.29, 1.24) pt3dadd(15.85, -223.21, 144.29, 1.24) pt3dadd(15.93, -223.22, 144.29, 1.24) pt3dadd(17.11, -223.85, 144.29, 1.24) pt3dadd(17.18, -223.86, 144.29, 1.24) pt3dadd(17.77, -224.5, 144.29, 1.09) pt3dadd(17.77, -224.58, 144.29, 1.09) pt3dadd(19.18, -225.09, 144.29, 1.09) pt3dadd(19.33, -225.1, 144.29, 1.09) pt3dadd(20.51, -225.66, 144.29, 1.09) pt3dadd(20.59, -225.67, 144.29, 1.09) pt3dadd(21.85, -226.24, 144.29, 1.09) } apic[25] {pt3dclear() pt3dadd(-206.77, -275.12, 185.59, 1.09) pt3dadd(-205.31, -274.17, 186.99, 1.09) pt3dadd(-204.22, -273.88, 186.99, 1.09) pt3dadd(-203.05, -273.88, 186.99, 1.09) pt3dadd(-202.1, -273.51, 186.99, 1.09) pt3dadd(-201.16, -273.81, 186.99, 1.09) pt3dadd(-200.06, -273.15, 186.69, 1.09) pt3dadd(-197.95, -272.57, 186.69, 1.09) pt3dadd(-196.34, -272.71, 186.69, 1.09) pt3dadd(-196.34, -272.64, 186.69, 1.09) pt3dadd(-195.91, -272.93, 186.69, 1.09) pt3dadd(-195.11, -273.15, 186.69, 1.09) pt3dadd(-195.03, -273.15, 186.69, 1.09) pt3dadd(-193.72, -273.66, 186.09, 1.09) pt3dadd(-192.63, -273.3, 185.99, 1.09) pt3dadd(-191.68, -272.79, 185.39, 1.09) pt3dadd(-190.44, -271.91, 182.24, 1.31) pt3dadd(-188.76, -271.91, 182.24, 1.31) pt3dadd(-188.69, -271.91, 182.24, 1.31) pt3dadd(-186.94, -272.49, 182.24, 1.31) pt3dadd(-186.94, -272.42, 182.24, 1.31) pt3dadd(-185.19, -272.35, 182.24, 1.31) pt3dadd(-184.89, -272.19, 182.24, 1.02) pt3dadd(-183.87, -271.65, 182.24, 1.17) pt3dadd(-183.08, -271.16, 181.49, 1.75) pt3dadd(-182.87, -270.67, 180.09, 1.82) pt3dadd(-182.74, -269.58, 178.24, 1.46) pt3dadd(-182.82, -269.58, 178.24, 1.46) pt3dadd(-182.9, -268.39, 178.19, 1.46) pt3dadd(-183.21, -267.33, 178.19, 1.24) pt3dadd(-184.08, -267.22, 177.74, 1.24) pt3dadd(-184.8, -267.73, 177.74, 1.24) pt3dadd(-185.01, -268.22, 177.74, 0.95) pt3dadd(-184.59, -269.07, 177.74, 0.95) pt3dadd(-183.98, -270.1, 177.04, 0.95) pt3dadd(-182.47, -271.01, 176.44, 0.95) } apic[26] {pt3dclear() pt3dadd(-182.47, -271.01, 176.44, 0.95) pt3dadd(-181.01, -271.7, 174.84, 0.95) pt3dadd(-179.81, -272.06, 176.09, 0.95) pt3dadd(-178.76, -271.89, 176.09, 1.17) pt3dadd(-177.35, -271.76, 176.84, 1.17) } apic[27] {pt3dclear() pt3dadd(-177.35, -271.76, 176.84, 1.09) pt3dadd(-176.05, -272.58, 177.69, 1.09) pt3dadd(-175, -273.58, 178.49, 1.09) pt3dadd(-173.71, -273.88, 178.49, 1.09) pt3dadd(-172.69, -273.34, 178.49, 1.09) pt3dadd(-171.4, -272.98, 177.69, 1.17) pt3dadd(-170.81, -272.32, 177.69, 1.53) pt3dadd(-169.37, -271.9, 177.04, 1.39) pt3dadd(-168.41, -271.28, 176.64, 1.31) pt3dadd(-168.21, -270.2, 176.64, 1.31) pt3dadd(-167.96, -269.35, 176.64, 1.31) pt3dadd(-167.96, -269.35, 176.59, 1.31) pt3dadd(-166.85, -269.85, 175.54, 1.6) pt3dadd(-165.29, -270.92, 175.54, 1.6) pt3dadd(-163.53, -271.56, 173.94, 1.75) pt3dadd(-162.36, -272.88, 173.94, 1.75) pt3dadd(-161.22, -273.75, 173.94, 1.75) pt3dadd(-160.07, -274.62, 173.94, 1.53) pt3dadd(-158.96, -275.11, 173.39, 1.53) pt3dadd(-158.96, -275.11, 173.09, 1.53) pt3dadd(-157.81, -275.4, 172.49, 1.53) pt3dadd(-157.74, -275.4, 172.49, 1.53) pt3dadd(-156.9, -275.72, 172.49, 1.53) pt3dadd(-156.83, -275.73, 172.49, 1.53) pt3dadd(-155.71, -275.57, 173.34, 1.46) pt3dadd(-154.3, -275.44, 173.34, 1.46) pt3dadd(-152.92, -275.61, 174.59, 1.39) pt3dadd(-151.33, -275.21, 174.59, 1.39) pt3dadd(-149.25, -275.01, 174.84, 1.31) pt3dadd(-147.7, -274.9, 175.29, 1.24) pt3dadd(-145.81, -274.47, 175.29, 1.24) pt3dadd(-144.34, -273.76, 175.29, 1.24) pt3dadd(-143.33, -273.29, 175.29, 1.53) pt3dadd(-141.53, -272.99, 175.29, 1.53) pt3dadd(-141.52, -272.92, 175.29, 1.53) pt3dadd(-140.21, -272.41, 175.29, 1.75) pt3dadd(-139.17, -272.9, 175.34, 1.75) pt3dadd(-138.26, -272.65, 175.34, 1.75) pt3dadd(-138.26, -272.65, 175.09, 1.75) pt3dadd(-137.35, -272.46, 174.04, 1.82) pt3dadd(-135.56, -272.74, 174.04, 1.82) pt3dadd(-134.37, -272.59, 174.04, 1.82) pt3dadd(-134.22, -272.61, 174.04, 1.82) pt3dadd(-133.09, -272.96, 174.04, 1.82) pt3dadd(-132.95, -272.98, 174.04, 1.82) pt3dadd(-131.57, -273.14, 174.04, 1.82) pt3dadd(-130.42, -273.94, 174.04, 1.82) pt3dadd(-128.47, -274.24, 174.04, 1.82) pt3dadd(-126.58, -274.39, 173.39, 2.04) pt3dadd(-125.3, -274.77, 173.34, 2.04) pt3dadd(-123.93, -274.93, 173.34, 2.04) pt3dadd(-122.64, -275.81, 173.34, 2.04) pt3dadd(-122.56, -275.75, 173.34, 2.04) pt3dadd(-121.4, -275.3, 173.34, 2.04) pt3dadd(-119.61, -275.66, 173.34, 1.97) pt3dadd(-117.73, -276.54, 172.64, 1.97) pt3dadd(-117.66, -276.55, 172.64, 1.97) pt3dadd(-115.91, -276.68, 172.64, 1.97) pt3dadd(-114.21, -277.18, 171.99, 1.97) pt3dadd(-114.06, -277.12, 171.99, 1.97) pt3dadd(-113.91, -277.14, 171.99, 1.97) pt3dadd(-112.9, -277.26, 171.99, 1.97) pt3dadd(-111.74, -277.99, 171.99, 1.97) pt3dadd(-110.73, -278.18, 171.29, 1.97) pt3dadd(-109.3, -277.91, 171.14, 1.97) pt3dadd(-107.76, -277.28, 171.14, 1.97) pt3dadd(-106.55, -276.98, 171.14, 1.97) pt3dadd(-105.26, -275.96, 171.14, 1.97) pt3dadd(-104.04, -274.93, 170.64, 1.97) pt3dadd(-101.93, -273.93, 170.09, 1.97) pt3dadd(-100.27, -273.47, 170.09, 1.97) pt3dadd(-98.72, -273.43, 168.94, 1.9) pt3dadd(-98.57, -273.38, 168.89, 1.9) pt3dadd(-96.74, -273.45, 168.89, 1.9) pt3dadd(-95.76, -273.86, 168.89, 1.9) pt3dadd(-94.22, -274.48, 168.89, 1.9) pt3dadd(-92.69, -275.18, 168.89, 1.9) pt3dadd(-92.41, -275.35, 168.89, 1.9) pt3dadd(-90.53, -275.58, 168.04, 1.9) pt3dadd(-90.39, -275.59, 168.04, 1.9) pt3dadd(-87.44, -276.09, 168.04, 1.9) pt3dadd(-86.13, -276.24, 168.04, 1.9) pt3dadd(-86.06, -276.25, 168.04, 1.9) pt3dadd(-84.9, -276.39, 168.04, 1.9) pt3dadd(-84.83, -276.4, 168.04, 1.9) pt3dadd(-83.5, -276.34, 167.34, 1.82) pt3dadd(-82.16, -276.2, 167.34, 1.82) pt3dadd(-80.09, -276.01, 167.34, 1.82) pt3dadd(-80.01, -276.01, 167.34, 1.82) pt3dadd(-78.61, -275.96, 166.84, 1.75) pt3dadd(-77.67, -276.07, 166.84, 1.97) pt3dadd(-76.13, -275.45, 166.84, 1.97) pt3dadd(-76.12, -275.37, 166.84, 1.97) } } proc shape3d_16() { apic[27] { pt3dadd(-74.2, -274.06, 166.84, 1.97) pt3dadd(-73.15, -272.57, 166.84, 1.97) pt3dadd(-72.46, -271.7, 166.29, 1.82) pt3dadd(-72.45, -271.63, 166.29, 1.82) pt3dadd(-71.33, -270.88, 166.29, 1.75) pt3dadd(-70.48, -269.88, 165.14, 1.82) pt3dadd(-70.33, -269.89, 165.14, 1.82) pt3dadd(-69.56, -269.55, 165.14, 1.82) pt3dadd(-69.48, -269.48, 165.14, 1.82) pt3dadd(-69.19, -268.93, 164.19, 1.82) pt3dadd(-69.05, -268.95, 164.19, 1.82) pt3dadd(-68.11, -267.81, 164.19, 1.82) pt3dadd(-67.45, -267.23, 164.19, 1.82) pt3dadd(-67.41, -266.86, 165.19, 1.82) pt3dadd(-66.47, -266.31, 164.24, 1.6) pt3dadd(-66.44, -266.1, 164.24, 1.6) pt3dadd(-66.36, -266.03, 164.24, 1.6) pt3dadd(-65.01, -264.51, 164.24, 1.6) pt3dadd(-64.76, -264.34, 164.24, 1.17) pt3dadd(-63.07, -264.57, 164.24, 1.17) pt3dadd(-61.7, -264.22, 164.24, 1.17) pt3dadd(-61.56, -264.15, 164.24, 1.17) pt3dadd(-60.62, -263.75, 164.24, 1.17) pt3dadd(-58.95, -263.61, 163.49, 1.31) pt3dadd(-58.88, -263.61, 163.49, 1.31) pt3dadd(-57.14, -263.33, 163.39, 1.75) pt3dadd(-55.38, -263.41, 163.44, 1.75) pt3dadd(-55.24, -263.4, 163.44, 1.75) pt3dadd(-54.45, -263.08, 163.44, 1.75) pt3dadd(-53.11, -263.69, 162.69, 1.53) pt3dadd(-53.12, -263.62, 162.69, 1.53) pt3dadd(-50.76, -264.12, 162.69, 1.53) pt3dadd(-50.69, -264.11, 162.69, 1.53) pt3dadd(-49, -264.42, 162.69, 1.53) pt3dadd(-49, -264.49, 162.69, 1.53) pt3dadd(-47.79, -265.54, 161.89, 1.53) pt3dadd(-46.25, -265.99, 161.49, 1.53) pt3dadd(-46.25, -265.99, 161.54, 1.53) pt3dadd(-44.22, -267.52, 161.54, 1.53) pt3dadd(-40.98, -270.4, 161.34, 1.53) pt3dadd(-40.22, -271.32, 161.34, 1.53) pt3dadd(-40.21, -271.39, 161.34, 1.53) pt3dadd(-38.94, -272.22, 160.89, 1.53) pt3dadd(-38.94, -272.22, 160.84, 1.53) pt3dadd(-37.23, -273.32, 160.39, 1.53) pt3dadd(-36.23, -274.6, 160.39, 1.24) pt3dadd(-36.23, -274.6, 160.34, 1.24) pt3dadd(-34.83, -274.91, 160.04, 1.53) pt3dadd(-33.5, -275.45, 160.04, 1.53) pt3dadd(-32.32, -275.92, 159.74, 1.31) pt3dadd(-31.44, -275.96, 159.79, 1.24) pt3dadd(-30.18, -276.57, 159.79, 1.24) pt3dadd(-29.3, -278.5, 159.19, 1.17) pt3dadd(-29.06, -279.3, 159.19, 1.39) pt3dadd(-28.24, -279.78, 159.19, 1.46) pt3dadd(-26.3, -282.99, 158.64, 1.31) pt3dadd(-25.58, -284.64, 158.64, 1.31) pt3dadd(-24.59, -285.7, 158.59, 1.31) pt3dadd(-24.45, -285.69, 158.59, 1.31) pt3dadd(-22.87, -286.8, 158.59, 1.31) pt3dadd(-21.61, -287.56, 158.64, 1.31) pt3dadd(-20.19, -288.45, 158.29, 1.31) pt3dadd(-20.19, -288.45, 158.19, 1.31) pt3dadd(-18.84, -289.5, 158.19, 1.31) pt3dadd(-18.84, -289.5, 158.14, 1.31) pt3dadd(-18.01, -290.2, 158.14, 1.31) pt3dadd(-17.23, -291.56, 158.14, 1.31) pt3dadd(-17.3, -291.63, 158.14, 1.31) pt3dadd(-16.61, -292.48, 158.14, 1.31) pt3dadd(-16.57, -293.65, 158.14, 1.46) pt3dadd(-15.94, -295.08, 157.74, 1.46) pt3dadd(-15.61, -296.02, 157.29, 1.24) pt3dadd(-14.57, -297.94, 157.29, 1.24) pt3dadd(-14.45, -299.1, 157.29, 1.24) pt3dadd(-13.95, -300.91, 157.29, 1.24) pt3dadd(-14.03, -302.59, 157.29, 1.17) pt3dadd(-14.43, -303.7, 156.89, 0.95) pt3dadd(-15.13, -304.6, 157.79, 0.95) pt3dadd(-15.2, -304.53, 157.79, 0.95) } apic[28] {pt3dclear() pt3dadd(-177.35, -271.76, 176.84, 1.24) pt3dadd(-176.48, -271.28, 176.79, 1.24) pt3dadd(-174.97, -271.53, 176.79, 1.24) pt3dadd(-174.9, -271.54, 176.79, 1.24) pt3dadd(-173.5, -270.9, 176.79, 1.24) pt3dadd(-172.83, -270.17, 176.79, 1.24) } apic[29] {pt3dclear() pt3dadd(-172.83, -270.17, 176.79, 1.17) pt3dadd(-172.1, -270.18, 175.94, 1.17) pt3dadd(-170.65, -269.1, 175.94, 1.17) pt3dadd(-169.62, -267.83, 175.94, 1.17) pt3dadd(-168.27, -266.96, 175.94, 1.17) pt3dadd(-166.6, -266.5, 175.94, 1.17) pt3dadd(-166.59, -266.43, 175.94, 1.17) pt3dadd(-165.44, -266.05, 175.94, 1.17) pt3dadd(-164.24, -265.83, 174.94, 1.39) pt3dadd(-163.44, -265.92, 174.94, 1.53) pt3dadd(-162.49, -265.3, 174.94, 1.82) pt3dadd(-160.88, -265.34, 174.94, 2.48) } apic[30] {pt3dclear() pt3dadd(-160.88, -265.34, 174.94, 1.9) pt3dadd(-159.49, -266.61, 173.84, 1.9) pt3dadd(-158.14, -267.65, 173.84, 1.9) pt3dadd(-157.16, -267.99, 173.84, 1.75) pt3dadd(-154.82, -268.11, 173.39, 1.53) pt3dadd(-153.68, -267.74, 172.39, 1.53) pt3dadd(-152.33, -267.53, 171.79, 1.53) pt3dadd(-150.56, -267.44, 171.34, 1.53) pt3dadd(-148.6, -267.68, 170.89, 1.53) pt3dadd(-148.52, -267.61, 170.89, 1.53) pt3dadd(-145.93, -267.99, 170.44, 1.53) pt3dadd(-143.75, -267.59, 169.74, 1.53) pt3dadd(-143.68, -267.6, 169.74, 1.53) pt3dadd(-142.09, -267.79, 169.74, 1.53) pt3dadd(-140.88, -267.49, 168.89, 1.53) pt3dadd(-138.59, -266.81, 168.84, 1.53) pt3dadd(-137.23, -266.45, 168.84, 1.53) pt3dadd(-135.88, -266.25, 168.84, 1.75) pt3dadd(-135.88, -266.17, 168.84, 1.75) pt3dadd(-134.44, -265.83, 168.84, 1.75) pt3dadd(-132.86, -266.09, 167.79, 1.6) pt3dadd(-131.94, -266.42, 167.74, 1.6) pt3dadd(-131.88, -266.5, 167.74, 1.6) pt3dadd(-131.09, -267.33, 167.74, 1.6) pt3dadd(-130.34, -268.37, 167.74, 1.6) pt3dadd(-129.89, -268.94, 167.74, 1.75) pt3dadd(-128.85, -270.01, 165.54, 1.39) pt3dadd(-128.2, -270.75, 165.54, 1.6) pt3dadd(-127.36, -270.48, 165.54, 1.6) pt3dadd(-127.36, -270.48, 165.49, 1.6) pt3dadd(-125.97, -269.84, 164.54, 1.6) pt3dadd(-124.46, -269.51, 164.54, 1.6) pt3dadd(-123.03, -269.23, 164.79, 1.6) pt3dadd(-122.43, -269.09, 164.79, 1.6) pt3dadd(-121.72, -269.05, 164.79, 1.39) pt3dadd(-120.31, -269.88, 164.79, 1.39) pt3dadd(-119.3, -269.55, 164.79, 1.53) pt3dadd(-117.98, -269.65, 164.79, 1.53) pt3dadd(-116.82, -269.46, 164.79, 1.53) pt3dadd(-115.6, -268.98, 164.79, 1.75) pt3dadd(-115.5, -269.11, 164.79, 0.95) pt3dadd(-114.32, -269.11, 164.79, 1.09) pt3dadd(-113.38, -268.56, 164.79, 1.09) pt3dadd(-112.24, -268.25, 164.79, 1.31) pt3dadd(-110.78, -268.35, 164.79, 1.31) pt3dadd(-109.41, -268.51, 163.84, 1.31) pt3dadd(-109.4, -268.44, 163.84, 1.31) pt3dadd(-108.5, -268.25, 163.84, 1.53) pt3dadd(-107.1, -268.2, 163.84, 1.53) pt3dadd(-106.75, -268.39, 163.84, 1.75) pt3dadd(-105.77, -268.14, 163.84, 1.75) pt3dadd(-103.86, -268.14, 162.39, 1.6) pt3dadd(-103.85, -268.07, 162.39, 1.6) pt3dadd(-102.33, -267.66, 162.39, 1.6) pt3dadd(-101.64, -267.38, 162.39, 1.68) pt3dadd(-99.78, -267.16, 161.44, 1.6) pt3dadd(-99.7, -267.09, 161.44, 1.6) pt3dadd(-98.33, -266.67, 161.44, 1.6) pt3dadd(-97.33, -266.27, 161.44, 1.75) pt3dadd(-96.08, -265.69, 160.44, 1.75) pt3dadd(-95.43, -265.76, 160.44, 1.75) pt3dadd(-95.29, -265.78, 160.44, 1.75) pt3dadd(-93.99, -265.42, 160.09, 1.68) pt3dadd(-93.92, -265.43, 160.09, 1.68) pt3dadd(-92.7, -265.65, 160.09, 1.68) pt3dadd(-91.11, -264.59, 158.69, 1.6) pt3dadd(-90.02, -263.47, 159.54, 1.6) pt3dadd(-88.41, -262.26, 159.54, 1.6) pt3dadd(-86.58, -261.67, 159.54, 1.6) pt3dadd(-85.66, -260.75, 159.54, 1.6) pt3dadd(-84.35, -260.25, 159.54, 1.75) pt3dadd(-83.25, -259.57, 159.49, 1.75) pt3dadd(-81.1, -259.39, 158.84, 1.6) pt3dadd(-79.58, -258.98, 158.84, 1.6) pt3dadd(-77.58, -258.85, 157.84, 1.6) pt3dadd(-77.51, -258.86, 157.84, 1.6) pt3dadd(-76.55, -258.82, 157.84, 1.6) pt3dadd(-76.4, -258.77, 157.84, 1.6) pt3dadd(-75.51, -258.07, 157.84, 1.68) pt3dadd(-74.12, -258.08, 157.84, 1.9) pt3dadd(-72.47, -257.84, 157.84, 1.9) pt3dadd(-71.75, -257.92, 157.84, 1.75) pt3dadd(-69.42, -257.47, 157.84, 1.75) pt3dadd(-67.98, -257.12, 157.84, 1.75) pt3dadd(-65.78, -256.5, 157.84, 1.75) pt3dadd(-63.52, -256.04, 157.84, 1.75) pt3dadd(-61.44, -255.77, 156.99, 1.75) pt3dadd(-59.26, -255.95, 156.99, 1.75) pt3dadd(-57.68, -255.7, 156.99, 1.75) pt3dadd(-55.6, -255.43, 156.99, 1.75) pt3dadd(-54.05, -255.39, 156.09, 1.75) pt3dadd(-52.53, -255.57, 156.09, 1.75) pt3dadd(-50.88, -255.92, 156.09, 1.75) pt3dadd(-50.81, -255.92, 156.09, 1.75) pt3dadd(-49.51, -256.08, 156.09, 1.75) pt3dadd(-49.58, -256.07, 156.09, 1.68) pt3dadd(-47.94, -256.41, 155.89, 1.6) pt3dadd(-46.8, -256.69, 155.89, 1.6) pt3dadd(-46.58, -256.72, 155.89, 1.6) pt3dadd(-44.74, -257.3, 155.94, 1.6) pt3dadd(-44.76, -257.45, 155.94, 1.6) pt3dadd(-43.03, -258.39, 155.94, 1.6) pt3dadd(-40.93, -259.22, 155.94, 1.6) } } proc shape3d_17() { apic[30] { pt3dadd(-39.55, -259.97, 155.94, 1.6) pt3dadd(-38, -260.52, 154.94, 1.46) pt3dadd(-37.93, -260.53, 154.94, 1.46) pt3dadd(-36.69, -260.6, 154.94, 1.46) pt3dadd(-35.72, -261.09, 154.94, 1.6) pt3dadd(-34.78, -261.2, 154.94, 1.6) pt3dadd(-33.84, -261.31, 154.94, 1.6) pt3dadd(-32.44, -261.91, 154.94, 1.46) pt3dadd(-31.53, -261.07, 154.94, 1.31) pt3dadd(-31.46, -261.08, 154.94, 1.31) pt3dadd(-30.76, -260.72, 154.94, 1.31) pt3dadd(-30.6, -260.59, 154.49, 1.31) pt3dadd(-28.45, -261.65, 154.74, 1.31) pt3dadd(-26.94, -261.98, 154.74, 1.31) pt3dadd(-25.52, -262.37, 153.79, 1.39) pt3dadd(-25.45, -262.37, 153.79, 1.39) pt3dadd(-24.16, -262.6, 153.79, 1.53) pt3dadd(-22.2, -263.42, 153.34, 1.6) pt3dadd(-21.9, -263.38, 153.34, 1.6) pt3dadd(-21.68, -263.41, 153.34, 1.6) pt3dadd(-20.56, -263.83, 153.34, 1.6) pt3dadd(-18.95, -264.54, 151.99, 1.46) pt3dadd(-17.43, -264.72, 151.99, 1.68) pt3dadd(-17.42, -264.64, 151.99, 1.68) pt3dadd(-15.99, -264.96, 151.99, 1.68) pt3dadd(-15.91, -264.9, 151.99, 1.68) pt3dadd(-14.23, -265.54, 151.34, 1.46) pt3dadd(-13.17, -265.95, 151.34, 1.6) pt3dadd(-11.68, -266.35, 151.34, 1.82) pt3dadd(-10.33, -267.32, 150.84, 1.68) pt3dadd(-9.03, -267.55, 150.84, 1.68) pt3dadd(-8.96, -267.55, 150.84, 1.68) pt3dadd(-7.61, -267.93, 150.84, 1.6) pt3dadd(-7.54, -267.94, 150.84, 1.6) pt3dadd(-5.97, -268.94, 150.89, 1.53) pt3dadd(-4.62, -269.32, 150.89, 1.46) pt3dadd(-3.01, -270.02, 150.89, 1.46) pt3dadd(-2.64, -270.25, 150.89, 0.8) pt3dadd(-1.93, -269.64, 150.89, 0.8) pt3dadd(-1.86, -269.57, 150.89, 0.8) pt3dadd(-1.32, -270.35, 150.89, 0.8) pt3dadd(-1, -271.22, 150.89, 0.8) pt3dadd(-0.74, -272.3, 150.89, 0.8) pt3dadd(-0.74, -272.3, 150.34, 0.8) pt3dadd(0.03, -273.29, 150.09, 0.8) pt3dadd(0.24, -273.28, 150.09, 0.8) pt3dadd(1.27, -273.47, 150.09, 0.8) pt3dadd(1.34, -273.46, 150.09, 0.8) pt3dadd(2.1, -274.17, 149.99, 1.09) pt3dadd(3.08, -274.93, 149.99, 1.09) pt3dadd(3.15, -275, 149.99, 1.09) pt3dadd(3.16, -275.15, 149.99, 1.09) pt3dadd(3.13, -276.53, 149.99, 1.09) pt3dadd(3.14, -276.61, 149.94, 1.09) pt3dadd(2.83, -278.22, 149.44, 1.09) pt3dadd(2.43, -279.11, 149.44, 1.09) pt3dadd(2.43, -279.11, 149.39, 1.09) pt3dadd(2.27, -280.8, 149.09, 1.09) pt3dadd(2.66, -281.44, 148.54, 0.8) } apic[31] {pt3dclear() pt3dadd(-160.88, -265.34, 174.94, 1.46) pt3dadd(-158.93, -264.33, 174.04, 1.46) pt3dadd(-158.71, -264.28, 174.04, 1.46) pt3dadd(-156.97, -263.9, 174.04, 1.46) pt3dadd(-156.96, -263.75, 174.04, 1.46) pt3dadd(-155.23, -263.44, 174.04, 1.46) pt3dadd(-153.06, -262.45, 174.04, 1.46) pt3dadd(-152.98, -262.39, 174.04, 1.46) pt3dadd(-151.04, -262.1, 173.44, 1.46) pt3dadd(-149.67, -261.75, 173.74, 1.31) pt3dadd(-149.66, -261.68, 173.74, 1.31) pt3dadd(-148.03, -261.51, 173.74, 1.31) pt3dadd(-146.84, -260.77, 173.44, 1.24) pt3dadd(-144.55, -260.01, 173.44, 1.24) pt3dadd(-142.86, -259.99, 173.44, 1.24) pt3dadd(-140.88, -259.42, 175.54, 1.24) pt3dadd(-139.75, -259.18, 171.89, 1.24) pt3dadd(-139.74, -259.04, 171.89, 1.24) pt3dadd(-137.5, -258.79, 171.89, 1.24) pt3dadd(-135.36, -258.68, 171.89, 1.24) pt3dadd(-132.52, -258.2, 171.89, 1.24) pt3dadd(-131.04, -257.5, 171.34, 1.39) pt3dadd(-129.39, -257.25, 170.44, 1.6) pt3dadd(-126.14, -257.05, 169.49, 1.6) pt3dadd(-124.19, -256.69, 169.49, 1.82) pt3dadd(-121.28, -256.3, 168.69, 1.82) pt3dadd(-121.06, -256.26, 168.69, 1.82) pt3dadd(-120.84, -256.28, 168.69, 1.82) pt3dadd(-119.35, -256.09, 168.69, 1.82) pt3dadd(-116.85, -256.09, 168.69, 1.82) pt3dadd(-113.74, -255.88, 168.69, 1.82) pt3dadd(-112.38, -256.11, 168.69, 1.82) pt3dadd(-110.5, -256.41, 168.69, 1.75) pt3dadd(-109.54, -256.3, 168.69, 1.75) pt3dadd(-109.46, -256.31, 168.69, 1.75) pt3dadd(-107.75, -256.73, 168.69, 1.75) pt3dadd(-106.37, -256.82, 166.79, 2.77) } apic[32] {pt3dclear() pt3dadd(-106.37, -256.82, 166.79, 1.46) pt3dadd(-104.89, -258.61, 167.14, 1.46) pt3dadd(-103.34, -259.75, 167.14, 1.46) pt3dadd(-102.2, -260.03, 168.84, 1.46) pt3dadd(-102.04, -259.97, 168.84, 1.46) pt3dadd(-100.66, -260.07, 167.69, 1.39) pt3dadd(-99.07, -260.25, 167.69, 1.39) pt3dadd(-96.1, -260.6, 167.69, 1.39) pt3dadd(-94.16, -260.98, 167.69, 1.39) pt3dadd(-92.13, -261.15, 167.69, 1.39) pt3dadd(-89.57, -260.64, 166.74, 1.39) pt3dadd(-89.5, -260.65, 166.74, 1.39) pt3dadd(-88.26, -260.14, 166.74, 1.39) pt3dadd(-88.19, -260.15, 166.74, 1.39) pt3dadd(-86.34, -260, 166.74, 1.39) pt3dadd(-83.88, -259.7, 165.79, 1.53) pt3dadd(-83.02, -259.88, 165.79, 1.53) pt3dadd(-81.64, -260.63, 166.39, 1.53) pt3dadd(-81.63, -260.55, 166.39, 1.53) pt3dadd(-79.72, -261.15, 166.39, 1.53) pt3dadd(-78.17, -261.7, 166.14, 1.53) pt3dadd(-78.16, -261.63, 166.14, 1.53) pt3dadd(-76.54, -262.18, 166.14, 1.53) pt3dadd(-76.47, -262.19, 166.14, 1.53) pt3dadd(-74.05, -262.85, 166.14, 1.53) pt3dadd(-72.3, -264.23, 165.09, 1.53) pt3dadd(-72.23, -264.24, 165.09, 1.53) pt3dadd(-70.57, -264.43, 165.09, 1.53) pt3dadd(-69.34, -264.58, 165.09, 1.53) pt3dadd(-67.18, -264.91, 164.74, 1.53) pt3dadd(-65.97, -265.2, 164.74, 1.53) pt3dadd(-65.82, -265.21, 164.74, 1.53) pt3dadd(-64.51, -265.96, 164.74, 1.53) pt3dadd(-62.79, -266.31, 164.74, 1.53) pt3dadd(-62.65, -266.32, 164.74, 1.53) pt3dadd(-61.77, -266.35, 164.74, 1.53) pt3dadd(-60.83, -266.47, 164.74, 1.53) pt3dadd(-60.82, -266.39, 164.74, 1.53) pt3dadd(-60.55, -266.6, 164.74, 1.09) pt3dadd(-59.39, -267.38, 164.74, 1.09) pt3dadd(-58.69, -267.67, 164.74, 1.09) pt3dadd(-57.71, -268.14, 164.74, 1.02) pt3dadd(-57.35, -268.25, 164.74, 1.02) pt3dadd(-57.37, -268.46, 164.74, 1.02) pt3dadd(-56.98, -268.87, 164.74, 1.02) pt3dadd(-56.9, -268.88, 164.74, 1.02) pt3dadd(-56.11, -269.03, 164.74, 1.02) pt3dadd(-55.16, -269.72, 163.09, 1.02) pt3dadd(-54.19, -270.26, 163.09, 1.02) pt3dadd(-54.11, -270.26, 163.09, 1.02) pt3dadd(-53.12, -270.58, 163.09, 1.02) pt3dadd(-52.07, -270.33, 163.09, 1.02) pt3dadd(-51.32, -270.18, 162.64, 1.31) pt3dadd(-50.28, -270.07, 162.64, 1.53) } apic[33] {pt3dclear() pt3dadd(-50.28, -270.07, 162.64, 1.09) pt3dadd(-50.26, -269.12, 164.34, 1.09) pt3dadd(-49.95, -268.27, 165.44, 1.02) pt3dadd(-49.3, -268.34, 165.49, 0.73) pt3dadd(-48.79, -268.39, 165.49, 0.73) pt3dadd(-48.65, -268.4, 165.49, 0.73) pt3dadd(-48.28, -267.71, 165.49, 0.73) pt3dadd(-47.83, -267.54, 165.49, 0.8) pt3dadd(-47.3, -267.37, 165.49, 0.95) pt3dadd(-47.29, -267.3, 165.49, 0.95) pt3dadd(-46.5, -267.45, 165.49, 0.95) pt3dadd(-45.77, -267.53, 164.54, 1.17) pt3dadd(-45.77, -267.45, 164.54, 1.17) pt3dadd(-45.05, -267.6, 164.54, 1.31) pt3dadd(-44.33, -267.75, 164.54, 1.31) pt3dadd(-43.3, -267.63, 164.54, 1.39) pt3dadd(-42.28, -267.74, 164.54, 1.39) pt3dadd(-40.92, -268.02, 164.54, 1.39) pt3dadd(-39.69, -268.15, 163.84, 1.39) pt3dadd(-39.67, -268, 163.84, 1.39) pt3dadd(-38.24, -268.3, 163.84, 1.39) pt3dadd(-37.04, -268.71, 163.39, 1.39) pt3dadd(-35.24, -269.11, 162.99, 1.39) pt3dadd(-34.48, -269.49, 162.99, 1.39) pt3dadd(-33.66, -270.08, 162.99, 1.39) pt3dadd(-32.53, -270.49, 162.99, 1.39) pt3dadd(-30.47, -271.87, 162.79, 1.39) pt3dadd(-29.25, -272.88, 162.79, 1.39) pt3dadd(-27.66, -273.77, 162.79, 1.39) pt3dadd(-27.67, -273.84, 162.79, 1.39) pt3dadd(-26.31, -275.59, 162.24, 1.39) pt3dadd(-25.13, -276.96, 161.84, 1.39) pt3dadd(-25.06, -277.04, 161.84, 1.39) pt3dadd(-24.09, -278.31, 161.29, 1.39) pt3dadd(-23.8, -278.34, 161.29, 1.39) pt3dadd(-23.1, -278.63, 161.29, 1.39) pt3dadd(-22.07, -279.32, 161.29, 1.39) pt3dadd(-21.52, -279.67, 161.29, 1.39) pt3dadd(-20.49, -280.29, 161.29, 1.24) pt3dadd(-20.47, -280.15, 161.29, 1.24) pt3dadd(-20.05, -281, 161.29, 1.17) pt3dadd(-20.04, -280.92, 161.29, 1.17) pt3dadd(-19.94, -281.45, 161.29, 1.39) pt3dadd(-19.76, -282.49, 161.29, 1.39) pt3dadd(-19.16, -283.8, 160.99, 1.02) pt3dadd(-18.73, -284.65, 160.99, 1.02) pt3dadd(-18.3, -284.69, 160.99, 1.02) pt3dadd(-17.38, -285.01, 160.99, 1.02) pt3dadd(-16.59, -285.16, 160.99, 1.02) pt3dadd(-15.56, -285.12, 160.09, 1.39) } } proc shape3d_18() { apic[33] { pt3dadd(-14.53, -285.15, 160.09, 1.39) pt3dadd(-13.44, -285.92, 160.09, 1.39) pt3dadd(-12.58, -286.08, 160.09, 1.24) pt3dadd(-11.7, -286.83, 159.44, 1.24) pt3dadd(-10.68, -288.25, 159.44, 1.24) pt3dadd(-9.88, -290.53, 159.44, 1.24) pt3dadd(-9.88, -290.53, 159.39, 1.24) pt3dadd(-9.33, -292.27, 159.39, 1.24) pt3dadd(-9.11, -294.49, 159.39, 1.24) pt3dadd(-8.61, -296.01, 159.39, 1.39) pt3dadd(-6.65, -297.6, 158.69, 1.39) pt3dadd(-6.56, -297.47, 158.69, 1.39) pt3dadd(-6.34, -297.49, 158.69, 1.39) pt3dadd(-5.7, -298.36, 158.69, 1.39) pt3dadd(-4.32, -298.5, 158.69, 1.39) pt3dadd(-4.1, -298.52, 158.69, 1.39) pt3dadd(-3.15, -298.47, 158.64, 1.39) } apic[34] {pt3dclear() pt3dadd(-50.28, -270.07, 162.64, 1.39) pt3dadd(-49.14, -270.26, 162.69, 1.39) pt3dadd(-49.06, -270.19, 162.69, 1.39) pt3dadd(-47.48, -270.57, 162.69, 1.39) pt3dadd(-46.18, -270.71, 162.69, 1.39) pt3dadd(-44.88, -270.91, 162.69, 1.39) pt3dadd(-44.38, -271.04, 162.69, 1.53) pt3dadd(-43.74, -271.25, 162.69, 1.53) pt3dadd(-42.92, -271.77, 162.69, 1.6) pt3dadd(-41.79, -272.25, 162.69, 1.6) pt3dadd(-40.28, -272.48, 160.79, 1.6) pt3dadd(-38.8, -273.07, 161.74, 1.75) pt3dadd(-38.44, -273.11, 161.74, 1.75) pt3dadd(-38.66, -273.09, 161.74, 1.75) } apic[35] {pt3dclear() pt3dadd(-38.66, -273.09, 161.74, 1.53) pt3dadd(-39.02, -274.52, 163.14, 1.53) pt3dadd(-39.32, -274.56, 163.14, 1.53) pt3dadd(-40.15, -275.57, 163.14, 1.53) pt3dadd(-40.81, -276.24, 163.14, 1.53) pt3dadd(-41.47, -277.71, 162.64, 1.46) pt3dadd(-41.61, -277.62, 162.64, 1.46) pt3dadd(-42.09, -278.01, 162.64, 1.46) pt3dadd(-42.02, -278.02, 162.64, 1.46) pt3dadd(-42.38, -279.45, 162.09, 1.46) pt3dadd(-42.31, -279.45, 162.09, 1.46) pt3dadd(-41.76, -281.2, 161.59, 1.46) pt3dadd(-41.84, -281.26, 161.59, 1.46) pt3dadd(-41.37, -282.48, 160.64, 1.46) pt3dadd(-41.45, -282.47, 160.64, 1.46) pt3dadd(-41.26, -284.25, 159.59, 1.31) pt3dadd(-40.85, -285.24, 160.14, 1.24) pt3dadd(-39.76, -286.09, 160.14, 1.24) pt3dadd(-39.19, -286.95, 160.14, 1.24) pt3dadd(-39.09, -288.13, 160.14, 1.24) pt3dadd(-38.97, -289.76, 159.09, 1.24) pt3dadd(-37.8, -290.54, 159.09, 1.24) pt3dadd(-36.59, -290.88, 159.09, 1.24) pt3dadd(-35.45, -291.95, 158.29, 1.24) pt3dadd(-34.28, -292.66, 158.04, 1.24) pt3dadd(-34.06, -294.07, 157.29, 1.53) pt3dadd(-35.18, -294.25, 157.29, 1.31) pt3dadd(-36.12, -294.15, 157.29, 0.95) pt3dadd(-36.66, -294.46, 156.29, 0.95) pt3dadd(-37.34, -294.69, 156.29, 0.95) pt3dadd(-37.77, -295.3, 156.29, 0.8) pt3dadd(-37.2, -296.17, 156.29, 0.8) pt3dadd(-36.5, -296.46, 155.24, 0.87) pt3dadd(-35.87, -296.74, 155.24, 1.09) pt3dadd(-35.46, -297, 155.24, 1.24) pt3dadd(-34.62, -297.38, 155.24, 1.09) pt3dadd(-33.94, -297.96, 154.54, 1.02) pt3dadd(-33.04, -298.5, 154.54, 1.02) pt3dadd(-32.02, -298.53, 154.54, 1.02) pt3dadd(-31.09, -298.77, 154.54, 1.02) pt3dadd(-30.36, -299.5, 154.54, 1.17) pt3dadd(-29.14, -299.7, 154.54, 1.17) pt3dadd(-28.19, -299.8, 153.79, 1.17) pt3dadd(-28.14, -299.95, 153.79, 1.17) pt3dadd(-26.73, -300.53, 153.04, 1.17) pt3dadd(-26.04, -300.9, 153.04, 1.17) pt3dadd(-24.49, -301.57, 153.04, 1.17) } apic[36] {pt3dclear() pt3dadd(-38.66, -273.09, 161.74, 2.04) pt3dadd(-37.23, -273.53, 161.64, 2.04) pt3dadd(-36.44, -273.61, 161.64, 1.9) pt3dadd(-35.77, -273.53, 161.64, 1.68) pt3dadd(-34.9, -273.62, 161.64, 1.39) pt3dadd(-34.31, -273.6, 161.64, 1.24) pt3dadd(-33.59, -273.68, 161.64, 1.53) pt3dadd(-33.44, -273.69, 161.64, 1.53) pt3dadd(-32.85, -273.61, 161.64, 1.53) pt3dadd(-31.98, -273.77, 161.64, 1.53) pt3dadd(-30.83, -273.96, 161.64, 1.09) pt3dadd(-29.56, -274.38, 160.39, 1.09) pt3dadd(-28.17, -274.45, 160.39, 1.09) pt3dadd(-26.56, -275.2, 160.34, 1.09) pt3dadd(-25.1, -275.94, 160.34, 1.09) pt3dadd(-23.61, -276.46, 160.34, 1.09) pt3dadd(-22.71, -276.92, 160.34, 1.09) pt3dadd(-22.63, -276.85, 160.34, 1.09) pt3dadd(-21.76, -276.94, 160.34, 1.09) pt3dadd(-21.68, -276.95, 160.34, 1.09) pt3dadd(-20.99, -277.31, 160.34, 1.09) pt3dadd(-20.1, -277.91, 160.34, 1.09) pt3dadd(-18.85, -278.63, 160.34, 1.17) pt3dadd(-18.08, -279, 159.34, 1.24) pt3dadd(-17, -279.84, 159.34, 1.24) pt3dadd(-15.51, -280.36, 158.49, 1.24) pt3dadd(-14.62, -279.57, 158.49, 1.24) pt3dadd(-14.67, -278.61, 158.49, 1.24) pt3dadd(-15.12, -277.98, 158.49, 1.17) pt3dadd(-15.11, -277.91, 158.49, 1.17) pt3dadd(-15.85, -277.91, 158.49, 1.17) pt3dadd(-16.05, -277.74, 158.49, 1.31) pt3dadd(-16.12, -277.73, 158.49, 1.31) pt3dadd(-16.72, -277.09, 158.49, 1.31) pt3dadd(-17.45, -276.35, 158.49, 1.31) pt3dadd(-19.56, -274.82, 157.99, 1.31) pt3dadd(-20.24, -274.31, 157.99, 1.24) pt3dadd(-20.83, -273.59, 157.99, 1.24) pt3dadd(-21.2, -272.89, 157.99, 1.24) pt3dadd(-21.2, -272.89, 157.94, 1.24) pt3dadd(-21.84, -272.02, 156.94, 1.24) pt3dadd(-22.19, -271.11, 156.24, 1.24) pt3dadd(-22.85, -270.45, 156.24, 1.24) pt3dadd(-23.22, -269.76, 155.54, 1.24) pt3dadd(-23.47, -269.29, 154.24, 1.24) pt3dadd(-23.81, -268.38, 155.39, 1.24) pt3dadd(-24.12, -267.83, 155.39, 1.24) pt3dadd(-24.81, -267.4, 155.39, 1.24) pt3dadd(-25.4, -266.75, 155.39, 1.24) pt3dadd(-25.95, -266.33, 155.39, 1.24) pt3dadd(-26.56, -265.83, 155.39, 1.24) pt3dadd(-27.05, -265.63, 155.39, 1.31) pt3dadd(-27.67, -265.27, 154.44, 1.39) pt3dadd(-28.53, -265.04, 154.44, 1.39) pt3dadd(-29.16, -264.75, 154.44, 1.46) pt3dadd(-30.46, -264.55, 153.99, 1.68) } apic[37] {pt3dclear() pt3dadd(-106.37, -256.82, 166.79, 1.17) pt3dadd(-105.97, -254.76, 166.89, 1.17) pt3dadd(-104.6, -253.75, 166.89, 1.17) pt3dadd(-104.53, -253.75, 166.89, 1.17) pt3dadd(-103.12, -253.63, 166.89, 1.17) pt3dadd(-102.8, -253.44, 166.89, 1.39) pt3dadd(-101.52, -253.16, 166.89, 1.39) pt3dadd(-100.12, -253.1, 166.89, 1.53) pt3dadd(-99.25, -253.2, 166.89, 1.53) pt3dadd(-97.14, -253.31, 166.89, 1.53) pt3dadd(-95.8, -253.83, 166.89, 1.53) pt3dadd(-93.45, -254.4, 166.94, 1.39) pt3dadd(-89.43, -253.34, 166.44, 1.31) pt3dadd(-89.43, -253.34, 166.39, 1.31) pt3dadd(-87.4, -252.92, 166.39, 1.31) pt3dadd(-84.79, -252.57, 166.39, 1.31) pt3dadd(-82.46, -252.7, 166.44, 1.31) pt3dadd(-80.11, -253.34, 166.44, 1.31) pt3dadd(-76.67, -254.04, 166.44, 1.31) pt3dadd(-76.52, -253.99, 166.44, 1.31) pt3dadd(-75.38, -253.68, 166.14, 1.31) pt3dadd(-75.38, -253.68, 165.64, 1.31) pt3dadd(-72.61, -254.45, 165.64, 1.31) pt3dadd(-70.98, -254.35, 165.64, 1.31) pt3dadd(-70.91, -254.36, 165.64, 1.31) pt3dadd(-68.49, -254.42, 164.94, 1.31) pt3dadd(-66.4, -254.08, 164.94, 1.31) pt3dadd(-66.32, -254.02, 164.94, 1.31) pt3dadd(-65.01, -254.17, 165.64, 1.31) pt3dadd(-63.32, -254.15, 165.64, 1.31) pt3dadd(-62.9, -254.28, 165.64, 1.31) pt3dadd(-61.26, -254.62, 166.04, 1.46) pt3dadd(-59.46, -254.98, 166.04, 1.46) pt3dadd(-57.69, -255.48, 166.04, 1.46) pt3dadd(-57.69, -255.48, 165.94, 1.46) pt3dadd(-55.35, -256.2, 165.14, 1.39) pt3dadd(-53.84, -256.45, 165.14, 1.39) pt3dadd(-53.06, -256.1, 165.14, 1.39) pt3dadd(-51.08, -256.7, 164.14, 1.31) pt3dadd(-49.88, -257.14, 164.14, 1.68) pt3dadd(-49.67, -257.16, 164.14, 1.68) pt3dadd(-48.66, -257.35, 164.14, 1.68) pt3dadd(-47.44, -257.57, 164.14, 1.68) pt3dadd(-46.27, -257.64, 164.14, 1.68) pt3dadd(-44.07, -258.26, 163.44, 1.53) pt3dadd(-41.52, -259.01, 164.49, 1.53) pt3dadd(-41.23, -259.04, 164.49, 1.53) pt3dadd(-40.06, -259.69, 164.49, 1.53) pt3dadd(-38.12, -260.73, 164.49, 1.53) pt3dadd(-36.52, -261.43, 164.49, 1.53) pt3dadd(-36.17, -261.62, 164.49, 1.53) pt3dadd(-35.4, -261.93, 164.49, 1.53) pt3dadd(-33.95, -262.69, 164.49, 1.39) pt3dadd(-32.68, -261.89, 164.49, 1.39) pt3dadd(-31.99, -261.6, 164.49, 1.39) pt3dadd(-31.63, -262.16, 164.49, 1.68) pt3dadd(-30.6, -262, 164.04, 1.68) pt3dadd(-29.35, -261.93, 163.24, 1.68) pt3dadd(-28.32, -261.85, 163.24, 1.68) pt3dadd(-27.67, -261.89, 163.24, 1.53) pt3dadd(-26.31, -262.34, 163.24, 1.53) pt3dadd(-25.5, -262.31, 163.24, 1.53) pt3dadd(-24.57, -262.51, 163.24, 1.39) pt3dadd(-23.56, -262.79, 162.94, 1.39) pt3dadd(-22.92, -263.05, 162.94, 1.31) pt3dadd(-21.94, -263.7, 162.64, 1.09) } } proc shape3d_19() { apic[37] { pt3dadd(-21.53, -264.23, 162.64, 1.09) pt3dadd(-21.54, -264.31, 162.64, 1.09) pt3dadd(-21.29, -265.12, 162.14, 1.09) pt3dadd(-20.5, -265.24, 162.14, 1.09) pt3dadd(-20.21, -265.26, 161.69, 1.09) pt3dadd(-19.41, -265.31, 161.69, 1.17) pt3dadd(-18.16, -265.17, 160.59, 1.17) pt3dadd(-17.36, -265.36, 160.59, 1.24) pt3dadd(-16.3, -265.94, 159.94, 1.6) pt3dadd(-15.89, -266.4, 159.94, 1.6) pt3dadd(-15.04, -266.82, 159.94, 1.46) pt3dadd(-14.51, -267.72, 159.19, 1.24) pt3dadd(-15.28, -268.26, 159.09, 1.09) pt3dadd(-15.82, -268.81, 159.09, 1.09) pt3dadd(-15.25, -270.31, 158.29, 1.17) pt3dadd(-13.92, -271.12, 157.59, 1.17) pt3dadd(-12.39, -271.21, 156.74, 1.17) pt3dadd(-11.73, -271.18, 155.99, 1.31) pt3dadd(-11.11, -271.8, 155.99, 1.17) pt3dadd(-10.21, -272.59, 155.99, 1.17) pt3dadd(-10.22, -272.88, 155.99, 1.46) pt3dadd(-9.67, -273.42, 155.99, 1.46) pt3dadd(-9.2, -274.11, 155.99, 1.46) pt3dadd(-9.21, -274.25, 155.99, 1.46) pt3dadd(-7.89, -275.28, 155.59, 1.24) pt3dadd(-6.22, -276.62, 154.89, 1.24) pt3dadd(-4.64, -277.16, 154.59, 1.24) pt3dadd(-3.37, -277.89, 154.14, 1.24) pt3dadd(-2.23, -278.33, 153.84, 1.24) pt3dadd(-1.46, -278.88, 153.14, 1.24) pt3dadd(-0.04, -279.48, 152.54, 1.24) pt3dadd(1.17, -280.07, 152.54, 1.24) pt3dadd(1.94, -280.62, 152.54, 1.24) pt3dadd(1.87, -280.62, 152.54, 1.24) pt3dadd(3.13, -281.43, 152.54, 1.02) pt3dadd(4.12, -282, 152.54, 1.02) pt3dadd(4.86, -281.82, 152.54, 1.02) pt3dadd(5.01, -281.83, 152.54, 1.02) pt3dadd(5.89, -282.98, 152.74, 1.02) } apic[38] {pt3dclear() pt3dadd(-172.83, -270.17, 176.79, 1.09) pt3dadd(-173.67, -268.73, 176.79, 1.09) pt3dadd(-173.64, -268.51, 176.79, 1.09) pt3dadd(-172.94, -266.91, 176.79, 1.09) pt3dadd(-172.92, -266.76, 176.79, 1.09) pt3dadd(-172.84, -266.7, 176.79, 1.09) pt3dadd(-171.17, -265.57, 176.79, 1.09) pt3dadd(-169.59, -264.66, 176.79, 1.09) pt3dadd(-168.41, -263.99, 176.79, 1.09) pt3dadd(-168.02, -263.82, 176.79, 1.53) pt3dadd(-168.01, -263.67, 176.79, 1.53) pt3dadd(-167.32, -262.8, 176.79, 1.53) pt3dadd(-166.11, -262.5, 176.79, 1.53) pt3dadd(-165.95, -262.38, 176.79, 1.53) pt3dadd(-164.82, -262.14, 175.89, 1.53) pt3dadd(-163.64, -262.13, 175.89, 1.53) pt3dadd(-161.75, -261.62, 175.74, 1.53) pt3dadd(-161.66, -261.49, 175.74, 1.53) pt3dadd(-160.56, -260.88, 175.74, 1.53) pt3dadd(-159.25, -259.79, 174.99, 1.53) pt3dadd(-159.11, -259.81, 174.99, 1.53) pt3dadd(-159.03, -259.74, 174.99, 1.53) pt3dadd(-157.78, -259.16, 174.99, 1.53) pt3dadd(-157.71, -259.17, 174.99, 1.53) pt3dadd(-156.28, -258.89, 174.04, 1.53) pt3dadd(-155.25, -259.46, 174.04, 1.53) pt3dadd(-155.25, -259.46, 173.74, 1.53) pt3dadd(-154.14, -260.03, 173.29, 1.53) pt3dadd(-152.5, -260.44, 173.14, 1.46) pt3dadd(-150.47, -260.02, 173.14, 1.46) pt3dadd(-150.47, -260.02, 173.19, 1.46) pt3dadd(-148.39, -259.76, 173.19, 1.46) pt3dadd(-146.01, -258.94, 172.39, 1.46) pt3dadd(-145.71, -258.83, 172.39, 1.46) pt3dadd(-145.56, -258.84, 172.39, 1.46) pt3dadd(-143.58, -258.27, 171.74, 1.46) pt3dadd(-141.87, -258.03, 171.74, 1.46) pt3dadd(-138.42, -258.07, 171.19, 1.46) pt3dadd(-138.35, -258.08, 171.19, 1.46) pt3dadd(-135.97, -257.19, 170.49, 1.46) pt3dadd(-133.05, -256.73, 169.94, 1.46) pt3dadd(-131.51, -257.86, 169.24, 1.17) pt3dadd(-129.28, -258.93, 168.04, 1.17) pt3dadd(-129.22, -259.01, 168.04, 1.17) pt3dadd(-126.15, -259.74, 167.44, 1.17) pt3dadd(-124.94, -260.04, 167.04, 1.17) pt3dadd(-124.86, -260.04, 167.04, 1.17) pt3dadd(-123.95, -260.37, 167.04, 1.24) pt3dadd(-122.6, -260.75, 167.04, 1.24) pt3dadd(-121.37, -260.9, 167.04, 1.24) pt3dadd(-121.3, -260.91, 167.04, 1.24) pt3dadd(-120.26, -260.88, 165.99, 1.53) pt3dadd(-118.42, -261.39, 165.49, 1.6) pt3dadd(-116.62, -261.68, 165.49, 1.75) pt3dadd(-116.54, -261.69, 165.49, 1.75) pt3dadd(-114.72, -261.76, 165.49, 1.75) pt3dadd(-114.64, -261.77, 165.49, 1.75) pt3dadd(-113.18, -261.21, 164.64, 1.68) pt3dadd(-113.17, -261.13, 164.64, 1.68) pt3dadd(-112.05, -260.9, 164.64, 1.68) pt3dadd(-110.53, -260.49, 164.09, 1.68) pt3dadd(-109.07, -260.11, 164.09, 1.46) pt3dadd(-107.68, -260.27, 164.14, 1.46) pt3dadd(-106.89, -259.95, 164.14, 1.46) pt3dadd(-105.27, -260.11, 164.14, 1.46) pt3dadd(-103.98, -259.7, 164.14, 1.46) pt3dadd(-103.69, -259.69, 164.14, 1.46) pt3dadd(-101.93, -259.7, 164.14, 1.46) pt3dadd(-100.68, -260.09, 164.14, 1.46) pt3dadd(-98.34, -260.37, 164.14, 1.46) pt3dadd(-98.26, -260.37, 164.14, 1.46) pt3dadd(-97.01, -260.61, 164.14, 1.68) pt3dadd(-94.82, -260.9, 163.54, 1.9) pt3dadd(-94.31, -260.88, 163.54, 1.9) pt3dadd(-92.26, -261.02, 162.99, 1.75) pt3dadd(-90.87, -261.05, 162.99, 1.75) pt3dadd(-88.68, -261.04, 162.24, 1.68) pt3dadd(-86.56, -261.18, 162.24, 1.68) pt3dadd(-84.51, -261.47, 161.49, 1.6) pt3dadd(-81.43, -261.94, 161.49, 1.6) pt3dadd(-81.43, -261.87, 161.49, 1.6) pt3dadd(-79.45, -262.09, 161.49, 1.75) pt3dadd(-78.12, -262.62, 161.34, 1.75) pt3dadd(-78.05, -262.62, 161.34, 1.75) pt3dadd(-76.2, -263.43, 160.59, 1.75) pt3dadd(-74.5, -264.02, 160.59, 1.97) pt3dadd(-72.59, -264.25, 160.59, 1.97) pt3dadd(-70.89, -264.77, 159.44, 2.11) pt3dadd(-70.01, -265.03, 159.44, 2.11) } apic[39] {pt3dclear() pt3dadd(-70.01, -265.03, 159.44, 1.97) pt3dadd(-68.73, -264.25, 160.24, 1.97) pt3dadd(-67.5, -263.77, 158.84, 1.97) pt3dadd(-67.43, -263.69, 158.84, 1.97) pt3dadd(-65.85, -263.05, 158.84, 1.97) pt3dadd(-64.32, -262.92, 158.34, 1.97) pt3dadd(-62.66, -262.43, 158.34, 1.97) pt3dadd(-62.59, -262.42, 158.34, 1.97) pt3dadd(-59.86, -261.3, 157.74, 1.97) pt3dadd(-58.41, -260.96, 157.74, 1.97) pt3dadd(-58.41, -260.96, 157.59, 1.97) pt3dadd(-57.39, -260.99, 157.59, 2.11) pt3dadd(-57.32, -260.99, 157.39, 2.11) pt3dadd(-56.3, -260.88, 156.79, 2.11) pt3dadd(-54.05, -260.73, 156.94, 1.75) pt3dadd(-51.92, -260.94, 156.94, 1.75) pt3dadd(-51.78, -260.93, 156.94, 1.75) pt3dadd(-48.28, -260.73, 156.94, 1.75) pt3dadd(-45, -260.83, 156.94, 1.75) pt3dadd(-44.85, -260.83, 156.94, 1.75) pt3dadd(-42.43, -261.25, 156.94, 1.75) pt3dadd(-42.36, -261.25, 156.94, 1.75) pt3dadd(-38.31, -262.19, 156.94, 1.75) pt3dadd(-37.2, -262.74, 156.94, 1.75) pt3dadd(-35.71, -263.41, 156.94, 1.75) pt3dadd(-35.64, -263.41, 156.94, 1.75) pt3dadd(-34.66, -264.18, 156.94, 1.75) pt3dadd(-33.31, -265.29, 156.94, 1.75) pt3dadd(-33.31, -265.29, 156.89, 1.75) pt3dadd(-32.03, -266.34, 156.19, 1.75) pt3dadd(-31.88, -266.55, 156.19, 1.75) pt3dadd(-30.25, -267.08, 156.19, 1.75) pt3dadd(-29.5, -267.85, 155.69, 1.68) pt3dadd(-28.39, -268.18, 155.19, 1.68) pt3dadd(-27.92, -269.04, 155.19, 1.68) pt3dadd(-26.95, -269.58, 155.19, 1.68) pt3dadd(-26.95, -269.66, 155.19, 1.68) pt3dadd(-25.66, -269.17, 155.19, 1.68) pt3dadd(-24.26, -269.41, 155.19, 1.68) pt3dadd(-24.19, -269.41, 155.19, 1.68) pt3dadd(-23.23, -269.74, 154.44, 1.68) pt3dadd(-23.01, -269.66, 154.44, 1.68) pt3dadd(-21.99, -269.69, 154.44, 1.68) pt3dadd(-21.84, -269.76, 154.44, 1.68) pt3dadd(-21.01, -270.61, 154.44, 1.68) pt3dadd(-20.16, -271.82, 154.44, 1.68) pt3dadd(-19.69, -272.6, 154.44, 1.46) pt3dadd(-19.1, -272.94, 154.44, 1.39) pt3dadd(-17.91, -273.63, 154.44, 1.39) pt3dadd(-17.76, -273.62, 154.44, 1.39) pt3dadd(-16.64, -274.39, 154.44, 1.39) pt3dadd(-15.43, -275.51, 153.79, 1.39) pt3dadd(-15.29, -275.43, 153.79, 1.39) pt3dadd(-13.95, -276.18, 153.79, 1.39) pt3dadd(-12.72, -277.74, 153.24, 1.39) pt3dadd(-11.67, -278.65, 153.19, 1.39) pt3dadd(-11.6, -278.65, 153.19, 1.39) pt3dadd(-9.48, -280.62, 154.24, 1.39) pt3dadd(-9.41, -280.61, 154.24, 1.39) pt3dadd(-8.28, -281.67, 154.29, 1.39) pt3dadd(-6.61, -283.43, 153.44, 1.24) pt3dadd(-3.6, -285.87, 154.19, 1.09) pt3dadd(-2.92, -286.43, 154.24, 1.24) pt3dadd(-2.03, -286.98, 154.24, 1.24) pt3dadd(-0.84, -287.74, 153.89, 1.02) pt3dadd(0.42, -288.42, 153.89, 1.02) } apic[40] {pt3dclear() pt3dadd(-70.01, -265.03, 159.44, 1.17) pt3dadd(-70.66, -267.11, 159.34, 1.17) pt3dadd(-70.1, -268.47, 159.34, 1.17) pt3dadd(-70.03, -268.54, 159.34, 1.17) pt3dadd(-68.83, -269.38, 159.34, 1.17) pt3dadd(-66.93, -269.45, 159.34, 1.17) } } proc shape3d_20() { apic[40] { pt3dadd(-65.11, -269.46, 159.34, 1.17) pt3dadd(-62.41, -269.29, 158.54, 1.17) pt3dadd(-61.1, -269.39, 158.54, 1.17) pt3dadd(-59.17, -270.12, 157.49, 1.17) pt3dadd(-58.07, -270.22, 157.49, 1.17) pt3dadd(-56.97, -270.55, 157.14, 0.95) pt3dadd(-55.11, -271.43, 156.34, 1.02) pt3dadd(-53.98, -272.41, 156.34, 1.02) pt3dadd(-53.24, -272.89, 156.34, 1.17) pt3dadd(-52.26, -273.59, 156.34, 1.17) pt3dadd(-50.33, -274.46, 156.89, 1.17) pt3dadd(-49, -274.93, 156.89, 1.17) pt3dadd(-48.18, -275.55, 156.89, 1.17) pt3dadd(-48.03, -275.69, 156.89, 1.17) pt3dadd(-47.8, -275.9, 156.89, 1.17) pt3dadd(-47.13, -276.32, 156.89, 1.17) pt3dadd(-45.79, -277.07, 156.89, 1.17) pt3dadd(-44.16, -277.74, 156.89, 1.17) pt3dadd(-42.59, -278.7, 156.89, 1.17) pt3dadd(-40.68, -279.22, 156.89, 1.17) pt3dadd(-40.61, -279.21, 156.89, 1.17) pt3dadd(-39.5, -279.47, 156.89, 1.17) pt3dadd(-36.43, -279.79, 155.89, 1.17) pt3dadd(-36.42, -279.86, 155.89, 1.17) pt3dadd(-34.96, -280.03, 155.89, 1.17) pt3dadd(-34.81, -280.02, 155.89, 1.17) pt3dadd(-33.56, -280.34, 155.89, 1.17) pt3dadd(-31.86, -280.94, 154.94, 1.24) pt3dadd(-30.38, -281.54, 154.94, 1.24) pt3dadd(-29.39, -282.6, 154.94, 1.24) pt3dadd(-29.32, -282.6, 154.94, 1.24) pt3dadd(-28.49, -283.44, 154.94, 1.24) pt3dadd(-27.79, -284.58, 154.94, 1.09) pt3dadd(-27.16, -285.94, 154.99, 1.02) pt3dadd(-26.25, -286.93, 154.99, 1.02) pt3dadd(-25.71, -287.86, 154.94, 0.87) pt3dadd(-25.71, -287.93, 154.94, 0.87) pt3dadd(-24.56, -289.28, 154.94, 0.87) pt3dadd(-23.72, -290.34, 154.94, 0.87) pt3dadd(-23.02, -291.7, 154.94, 0.87) pt3dadd(-22.84, -292.42, 154.94, 0.87) pt3dadd(-20.91, -293.52, 155.44, 0.87) pt3dadd(-20.16, -293.93, 155.44, 0.87) pt3dadd(-18.6, -294.75, 155.44, 0.87) pt3dadd(-17.8, -294.26, 155.69, 0.87) pt3dadd(-16.64, -294.15, 155.59, 0.87) pt3dadd(-15.21, -293.51, 155.34, 0.95) pt3dadd(-14.06, -292.96, 156.39, 1.17) pt3dadd(-12.53, -292.83, 156.39, 1.17) pt3dadd(-11.37, -292.64, 156.39, 1.17) pt3dadd(-9.83, -292.81, 156.39, 1.02) pt3dadd(-9.4, -292.72, 156.39, 1.02) } apic[41] {pt3dclear() pt3dadd(-177.35, -271.76, 176.84, 1.24) pt3dadd(-174.56, -271.18, 176.84, 1.24) pt3dadd(-173.03, -271.62, 176.84, 1.24) pt3dadd(-171.36, -271.69, 176.84, 1.24) pt3dadd(-170.12, -271.26, 176.84, 1.24) pt3dadd(-168.95, -270.67, 176.84, 1.24) pt3dadd(-169.02, -270.67, 176.84, 1.24) pt3dadd(-168.37, -270.16, 176.84, 1.17) pt3dadd(-167.05, -269.87, 176.84, 1.17) pt3dadd(-165.82, -269.43, 176.84, 1.17) pt3dadd(-165.67, -269.43, 176.84, 1.17) pt3dadd(-164.58, -269.73, 176.84, 1.17) pt3dadd(-163.34, -269.51, 176.84, 1.17) pt3dadd(-163.41, -269.43, 176.84, 1.17) pt3dadd(-161.73, -269, 176.84, 1.17) pt3dadd(-161.66, -268.92, 176.84, 1.17) pt3dadd(-160.71, -268.78, 176.84, 1.31) pt3dadd(-159.62, -268.19, 176.84, 1.31) pt3dadd(-158.02, -268.27, 177.34, 1.31) pt3dadd(-156.56, -269.29, 177.34, 1.31) pt3dadd(-155.32, -270.38, 177.34, 1.31) pt3dadd(-155.25, -270.38, 177.34, 1.31) pt3dadd(-153.64, -270.82, 175.69, 1.31) pt3dadd(-152.11, -270.75, 175.69, 1.46) pt3dadd(-151.38, -270.75, 175.69, 1.6) pt3dadd(-149.34, -270.67, 175.69, 1.6) pt3dadd(-148.39, -270.24, 175.69, 1.6) pt3dadd(-147.01, -269.43, 175.69, 1.6) pt3dadd(-146.13, -269.22, 175.69, 1.6) pt3dadd(-145.77, -269.36, 175.69, 1.6) pt3dadd(-145.33, -269.73, 175.69, 1.6) pt3dadd(-144.46, -270.16, 175.69, 1.6) pt3dadd(-141.76, -271.26, 174.74, 1.6) pt3dadd(-141.61, -271.18, 174.74, 1.6) pt3dadd(-139.14, -271.26, 174.74, 1.6) pt3dadd(-136.73, -272.06, 174.74, 1.6) pt3dadd(-136.66, -272.06, 174.74, 1.6) pt3dadd(-134.25, -272.64, 174.74, 1.6) pt3dadd(-132.58, -272.64, 174.74, 1.6) pt3dadd(-130.39, -271.91, 174.74, 1.6) pt3dadd(-128.27, -271.69, 174.74, 1.6) pt3dadd(-126.74, -271.4, 174.74, 1.68) pt3dadd(-126.02, -271.4, 174.74, 1.9) pt3dadd(-124.92, -271.33, 174.74, 1.9) pt3dadd(-124.27, -271.18, 174.74, 1.9) pt3dadd(-123.18, -271.26, 174.74, 1.9) pt3dadd(-121.21, -270.96, 174.74, 1.75) pt3dadd(-120.26, -270.6, 174.74, 1.75) pt3dadd(-120.19, -270.6, 174.74, 1.75) pt3dadd(-119.39, -269.87, 174.79, 1.75) pt3dadd(-117.49, -269.29, 174.79, 1.75) pt3dadd(-117.35, -269.22, 174.79, 1.75) pt3dadd(-116.25, -269.14, 174.79, 1.75) pt3dadd(-113.99, -268.49, 174.79, 1.75) pt3dadd(-112.39, -268.41, 174.79, 1.9) pt3dadd(-110.42, -268.49, 174.04, 1.9) pt3dadd(-110.35, -268.49, 174.04, 1.9) pt3dadd(-108.67, -268.49, 174.04, 1.9) pt3dadd(-108.02, -268.05, 174.04, 1.75) pt3dadd(-107.87, -267.98, 174.04, 1.75) pt3dadd(-106.85, -268.05, 174.09, 1.75) pt3dadd(-105.68, -267.9, 172.89, 1.75) pt3dadd(-104.88, -267.39, 172.89, 1.6) pt3dadd(-104.37, -267.03, 172.89, 1.46) } apic[42] {pt3dclear() pt3dadd(-182.47, -271.01, 176.44, 0.87) pt3dadd(-181.18, -270.7, 174.49, 0.87) pt3dadd(-180.26, -270.37, 174.49, 0.87) pt3dadd(-179.95, -270.19, 174.49, 0.87) pt3dadd(-179.18, -269.91, 174.49, 0.87) pt3dadd(-179.09, -269.77, 174.49, 0.87) pt3dadd(-178.31, -269.43, 174.49, 0.87) pt3dadd(-178.23, -269.36, 174.49, 0.87) pt3dadd(-177.65, -269.36, 174.49, 0.87) pt3dadd(-177.57, -269.37, 174.49, 0.87) pt3dadd(-176.92, -269.44, 174.49, 0.87) pt3dadd(-176.48, -270.01, 171.99, 0.73) pt3dadd(-175.07, -271.13, 171.99, 0.73) pt3dadd(-174.09, -272.2, 171.24, 0.73) pt3dadd(-173.62, -273.21, 171.24, 1.09) pt3dadd(-172.77, -274.05, 171.24, 1.09) pt3dadd(-171.66, -274.62, 171.24, 1.09) pt3dadd(-169.78, -274.25, 171.24, 1.09) pt3dadd(-169.06, -272.5, 170.19, 1.24) pt3dadd(-168.76, -271.8, 168.04, 1.24) pt3dadd(-167.98, -270.8, 168.04, 1.24) pt3dadd(-166.66, -270.22, 169.44, 1.24) pt3dadd(-165.82, -269.29, 169.44, 1.24) pt3dadd(-165.6, -269.32, 169.44, 1.24) pt3dadd(-164.73, -269.35, 169.44, 1.24) pt3dadd(-164.53, -269.59, 169.44, 1.24) pt3dadd(-163.44, -270.23, 169.44, 1.24) pt3dadd(-163.36, -270.24, 169.34, 1.24) pt3dadd(-161.75, -271.46, 167.99, 1.24) pt3dadd(-160.49, -271.98, 167.99, 1.24) pt3dadd(-159.52, -272.46, 167.94, 1.24) pt3dadd(-157.82, -272.36, 167.34, 1.24) pt3dadd(-156.02, -272.06, 166.94, 1.24) pt3dadd(-153.37, -271.42, 166.94, 1.24) pt3dadd(-152.45, -271.09, 165.79, 1.24) pt3dadd(-151.7, -270.96, 164.99, 1.24) pt3dadd(-150.41, -270.6, 164.99, 1.24) pt3dadd(-150.41, -270.6, 165.04, 1.24) pt3dadd(-148.91, -270.34, 165.04, 1.31) pt3dadd(-145.68, -269.69, 166.24, 1.17) pt3dadd(-145.09, -269.53, 166.24, 1.09) pt3dadd(-143.99, -269.56, 166.24, 1.09) pt3dadd(-143.26, -269.61, 166.24, 1.31) pt3dadd(-142.6, -269.66, 166.24, 1.31) pt3dadd(-142.08, -270.01, 166.24, 1.39) pt3dadd(-141.42, -270.13, 166.24, 1.39) pt3dadd(-141.49, -270.13, 166.24, 1.39) pt3dadd(-140.15, -270.88, 166.24, 1.39) pt3dadd(-139.71, -270.87, 166.24, 1.39) pt3dadd(-139.13, -270.92, 166.24, 1.39) pt3dadd(-139.06, -270.92, 166.24, 1.39) pt3dadd(-138.54, -271.04, 166.24, 1.46) pt3dadd(-138.1, -271.25, 166.24, 1.6) pt3dadd(-137.28, -271.58, 166.24, 1.6) pt3dadd(-136.02, -272.12, 165.64, 1.75) pt3dadd(-134.98, -272.66, 165.64, 1.82) pt3dadd(-134.08, -273.29, 165.64, 1.82) pt3dadd(-132.96, -273.98, 165.09, 1.82) pt3dadd(-132.22, -274.31, 165.09, 1.75) pt3dadd(-130.98, -274.49, 164.74, 1.75) pt3dadd(-129.81, -274.52, 164.09, 1.68) pt3dadd(-128.27, -274.68, 163.54, 1.6) pt3dadd(-127.54, -274.73, 163.54, 1.6) pt3dadd(-126.81, -274.7, 163.54, 1.6) pt3dadd(-124.62, -274.69, 163.54, 1.6) pt3dadd(-123.61, -274.29, 162.34, 1.9) pt3dadd(-122.76, -273.82, 162.34, 1.9) pt3dadd(-122.76, -273.75, 162.34, 2.11) pt3dadd(-121.75, -273.42, 162.34, 2.11) pt3dadd(-121.75, -273.49, 162.34, 2.11) pt3dadd(-121.04, -272.96, 162.34, 2.11) pt3dadd(-120.25, -272.49, 161.69, 2.33) pt3dadd(-119.11, -271.72, 161.69, 2.55) pt3dadd(-118.48, -271.19, 161.09, 3.21) } apic[43] {pt3dclear() pt3dadd(-118.48, -271.19, 161.09, 1.39) pt3dadd(-116.64, -271.49, 161.49, 1.39) pt3dadd(-116.64, -271.49, 161.44, 1.39) pt3dadd(-115.25, -271.51, 161.44, 1.24) pt3dadd(-114.6, -271.48, 160.79, 1.39) pt3dadd(-113.43, -271.51, 160.79, 1.39) pt3dadd(-112.41, -271.62, 160.79, 1.17) pt3dadd(-111.76, -271.31, 160.79, 1.6) pt3dadd(-110.61, -270.76, 160.34, 1.6) pt3dadd(-110.05, -270.3, 160.34, 1.39) } } proc shape3d_21() { apic[43] { pt3dadd(-109.97, -270.29, 160.34, 1.39) pt3dadd(-109.25, -270.12, 160.34, 1.39) pt3dadd(-108.01, -270.15, 160.34, 1.39) pt3dadd(-107.87, -270.07, 160.34, 1.39) pt3dadd(-106.77, -270.03, 160.34, 1.39) pt3dadd(-105.66, -270.57, 160.34, 1.39) pt3dadd(-104.49, -270.61, 159.84, 1.39) pt3dadd(-103.16, -271.07, 159.84, 1.39) pt3dadd(-102.42, -271.4, 159.84, 1.53) pt3dadd(-101.24, -271.87, 159.19, 1.53) pt3dadd(-100.27, -272.27, 159.19, 1.53) pt3dadd(-98.66, -272.65, 158.84, 1.46) pt3dadd(-98.66, -272.58, 158.84, 1.46) pt3dadd(-96.67, -273.09, 158.84, 1.46) pt3dadd(-95.5, -273.19, 158.84, 1.46) pt3dadd(-94.24, -273.59, 158.84, 1.46) pt3dadd(-92.92, -273.83, 158.84, 1.46) pt3dadd(-91.46, -274.07, 159.19, 1.46) pt3dadd(-89.63, -274.07, 159.19, 1.46) pt3dadd(-88.03, -274.09, 160.44, 1.24) pt3dadd(-85.69, -274, 160.44, 1.24) pt3dadd(-82.99, -274.05, 160.44, 1.24) pt3dadd(-80.81, -273.83, 160.44, 1.24) pt3dadd(-78.63, -273.6, 160.44, 1.09) pt3dadd(-76.97, -273.25, 160.44, 1.09) pt3dadd(-75.06, -273.47, 156.74, 1.09) } apic[44] {pt3dclear() pt3dadd(-75.06, -273.47, 156.74, 1.02) pt3dadd(-73.09, -273.55, 156.29, 1.02) pt3dadd(-71.85, -273.57, 156.29, 1.02) pt3dadd(-70.76, -273.53, 156.29, 1.02) pt3dadd(-69.94, -273.94, 156.29, 1.02) pt3dadd(-68.46, -274.69, 157.64, 1.02) pt3dadd(-68.38, -274.69, 157.64, 1.02) pt3dadd(-66.91, -275.07, 157.64, 1.02) pt3dadd(-64.93, -275.29, 157.64, 1.02) pt3dadd(-64.93, -275.29, 157.39, 1.02) pt3dadd(-63.31, -275.74, 156.54, 1.02) pt3dadd(-60.79, -276.82, 155.79, 1.02) pt3dadd(-59.18, -277.05, 155.79, 1.02) pt3dadd(-58.59, -277.32, 155.79, 1.09) pt3dadd(-57.18, -277.85, 155.79, 1.09) pt3dadd(-57.03, -277.85, 155.79, 1.09) pt3dadd(-55.78, -278.31, 155.79, 1.09) pt3dadd(-54.73, -278.93, 155.79, 1.09) pt3dadd(-53.54, -279.69, 155.79, 0.95) pt3dadd(-53.46, -279.83, 155.79, 0.95) pt3dadd(-53.31, -279.9, 155.79, 0.95) pt3dadd(-52.65, -280.17, 155.79, 0.95) pt3dadd(-51.54, -280.56, 155.79, 0.95) pt3dadd(-49.97, -281.6, 154.99, 0.95) pt3dadd(-49.9, -281.52, 154.99, 0.95) pt3dadd(-48.69, -282.65, 155.29, 0.95) pt3dadd(-48.26, -282.9, 155.29, 1.02) pt3dadd(-47.35, -283.36, 155.29, 1.02) pt3dadd(-46.53, -283.95, 155.29, 1.02) pt3dadd(-45.79, -284.61, 155.29, 1.02) pt3dadd(-45.48, -285.09, 155.29, 1.24) pt3dadd(-45.33, -285.1, 155.29, 1.24) pt3dadd(-44.81, -285.74, 155.29, 1.24) pt3dadd(-42.94, -287.47, 155.29, 1.24) pt3dadd(-42.18, -288.72, 155.29, 1.24) pt3dadd(-42.11, -288.73, 155.29, 1.24) pt3dadd(-41.08, -290.15, 154.39, 1.24) pt3dadd(-40.08, -291.06, 154.39, 1.24) pt3dadd(-39.09, -292.19, 153.69, 1.24) pt3dadd(-37.84, -292.83, 153.69, 1.24) pt3dadd(-36.59, -293.47, 153.69, 1.24) pt3dadd(-35.46, -293.88, 153.69, 1.24) pt3dadd(-35.38, -293.88, 153.69, 1.24) pt3dadd(-34.17, -294.15, 154.39, 1.24) pt3dadd(-34.09, -294.16, 154.39, 1.24) pt3dadd(-32.98, -294.79, 154.39, 1.24) pt3dadd(-32.85, -294.95, 154.39, 1.24) pt3dadd(-32.34, -295.66, 154.39, 1.24) pt3dadd(-31.36, -296.86, 154.39, 1.24) pt3dadd(-30.92, -298.22, 154.39, 1.24) pt3dadd(-30.3, -299.31, 154.39, 1.24) pt3dadd(-30.3, -299.38, 154.39, 1.24) pt3dadd(-29.57, -300.85, 153.29, 1.24) pt3dadd(-28.61, -301.46, 153.29, 1.24) pt3dadd(-27.71, -301.92, 153.29, 1.24) pt3dadd(-26.71, -302.24, 153.29, 1.24) pt3dadd(-26.06, -303.04, 153.29, 1.24) pt3dadd(-26, -303.12, 153.29, 1.24) pt3dadd(-24.9, -303.89, 152.39, 1.24) pt3dadd(-24.32, -304.61, 152.09, 1.24) pt3dadd(-23.77, -305.69, 152.04, 1.24) pt3dadd(-23.74, -306.14, 151.14, 1.24) pt3dadd(-23.41, -306.53, 151.14, 1.24) pt3dadd(-23.39, -307.71, 151.14, 1.24) pt3dadd(-23.31, -307.64, 151.14, 1.24) pt3dadd(-23.03, -308.48, 151.14, 1.24) pt3dadd(-22.95, -309.71, 150.09, 1.31) pt3dadd(-22.79, -311.05, 150.09, 1.31) pt3dadd(-22.22, -312.57, 150.09, 1.17) pt3dadd(-22.15, -312.65, 150.09, 1.17) pt3dadd(-22.16, -314.19, 150.09, 1.02) pt3dadd(-22.26, -315.87, 150.09, 1.02) pt3dadd(-21.46, -316.68, 150.09, 1.17) pt3dadd(-20.54, -316.92, 150.09, 1.17) pt3dadd(-19.3, -317.71, 147.54, 1.24) pt3dadd(-18.49, -318.38, 147.54, 1.24) pt3dadd(-17.71, -319.33, 147.54, 1.09) pt3dadd(-17.08, -320.42, 147.54, 1.09) pt3dadd(-16.5, -321.88, 146.39, 1.02) } apic[45] {pt3dclear() pt3dadd(-75.06, -273.47, 156.74, 1.02) pt3dadd(-73.65, -274.29, 161.74, 1.02) pt3dadd(-72.1, -274.75, 161.74, 1.02) pt3dadd(-71.14, -275.08, 161.74, 1.17) pt3dadd(-69.96, -275.4, 161.74, 1.17) pt3dadd(-69.96, -275.4, 161.49, 1.17) pt3dadd(-68.47, -276.22, 161.04, 1.17) pt3dadd(-67.74, -276.19, 161.04, 1.31) pt3dadd(-66.86, -276.45, 161.04, 1.31) pt3dadd(-65.87, -277.66, 160.24, 1.31) pt3dadd(-64.6, -278.34, 160.64, 1.24) pt3dadd(-63.63, -279.03, 160.64, 1.24) pt3dadd(-62.64, -280.09, 160.64, 0.95) pt3dadd(-61.65, -281.15, 159.34, 1.09) pt3dadd(-60.02, -281.89, 159.34, 1.24) pt3dadd(-58.97, -282.66, 159.34, 1.39) pt3dadd(-57.34, -283.47, 159.34, 1.39) pt3dadd(-55.42, -284.2, 158.64, 1.31) pt3dadd(-53.74, -284.22, 158.64, 1.31) pt3dadd(-53.67, -284.21, 158.64, 1.31) pt3dadd(-51.11, -284.34, 159.94, 1.31) pt3dadd(-49.34, -284.71, 159.94, 1.31) pt3dadd(-49.27, -284.71, 159.94, 1.31) pt3dadd(-48.4, -284.68, 159.94, 1.31) pt3dadd(-47.6, -284.65, 159.94, 1.53) pt3dadd(-46.8, -284.33, 159.94, 1.53) pt3dadd(-46.66, -284.32, 159.94, 1.53) pt3dadd(-45.49, -284.43, 159.94, 1.53) pt3dadd(-44.76, -284.4, 159.94, 1.53) pt3dadd(-43.89, -284.22, 159.94, 1.39) pt3dadd(-42.63, -284.76, 159.94, 1.39) pt3dadd(-41.89, -285.02, 159.99, 1.24) pt3dadd(-40.52, -284.54, 159.99, 1.24) pt3dadd(-39.79, -284.73, 159.99, 1.24) pt3dadd(-39.27, -284.78, 159.99, 1.6) pt3dadd(-38.34, -284.31, 158.89, 1.31) pt3dadd(-38.27, -284.31, 158.89, 1.31) pt3dadd(-37.25, -284.42, 158.89, 1.31) pt3dadd(-36.29, -284.75, 158.89, 1.31) pt3dadd(-35.12, -285, 158.64, 1.24) pt3dadd(-33.8, -284.95, 158.89, 1.24) pt3dadd(-33.81, -284.88, 158.89, 1.24) pt3dadd(-32.85, -285.06, 158.89, 1.24) pt3dadd(-32.49, -285.12, 158.89, 1.24) pt3dadd(-31.65, -285.96, 158.24, 1.02) pt3dadd(-30.69, -286.22, 158.24, 1.02) pt3dadd(-29.36, -286.83, 157.79, 1.02) pt3dadd(-28.36, -288.18, 157.24, 1.02) pt3dadd(-27.62, -288.52, 157.24, 1.02) pt3dadd(-26.14, -289.19, 156.74, 1.02) pt3dadd(-26.06, -289.19, 156.74, 1.02) pt3dadd(-22.74, -290.38, 156.74, 1.02) pt3dadd(-21.62, -290.92, 156.29, 1.02) pt3dadd(-21.55, -290.99, 156.29, 1.02) pt3dadd(-20.01, -291.23, 157.34, 1.02) } apic[46] {pt3dclear() pt3dadd(-20.01, -291.23, 157.34, 0.73) pt3dadd(-19.3, -290.76, 156.34, 0.73) pt3dadd(-18.12, -290.94, 156.34, 0.73) } apic[47] {pt3dclear() pt3dadd(-20.01, -291.23, 157.34, 0.73) pt3dadd(-19.53, -292.45, 156.54, 0.73) pt3dadd(-18.57, -292.56, 156.54, 0.73) pt3dadd(-17.12, -292.51, 156.39, 0.8) pt3dadd(-15.94, -292.76, 156.39, 0.8) pt3dadd(-14.18, -292.91, 156.39, 0.8) pt3dadd(-14.18, -292.99, 156.39, 0.8) pt3dadd(-13.42, -293.76, 156.39, 0.8) pt3dadd(-13.42, -293.83, 156.39, 0.8) pt3dadd(-12.01, -294.51, 156.39, 0.8) pt3dadd(-9.8, -295.23, 156.39, 0.8) pt3dadd(-8.34, -295.25, 157.69, 0.8) pt3dadd(-6.81, -295.12, 157.69, 0.8) pt3dadd(-4.76, -295.34, 157.69, 0.73) } apic[48] {pt3dclear() pt3dadd(-118.48, -271.19, 161.09, 1.9) pt3dadd(-118.03, -268.84, 163.34, 1.9) pt3dadd(-116.67, -268.07, 163.34, 1.9) pt3dadd(-114.99, -268, 162.39, 1.75) pt3dadd(-114.14, -267.54, 162.39, 1.75) pt3dadd(-114.06, -267.53, 162.39, 1.75) pt3dadd(-113.07, -266.84, 162.49, 1.6) pt3dadd(-112.28, -266.37, 162.49, 1.6) pt3dadd(-111.58, -265.47, 162.49, 1.6) pt3dadd(-110.3, -264.77, 162.79, 1.6) pt3dadd(-109.43, -264.67, 161.64, 1.6) pt3dadd(-108.19, -264.62, 161.64, 1.6) pt3dadd(-106.85, -265.37, 161.59, 1.6) pt3dadd(-105.82, -265.63, 161.59, 1.6) pt3dadd(-103.25, -265.97, 161.19, 1.6) pt3dadd(-101.71, -266.21, 161.19, 1.6) pt3dadd(-98.86, -266.47, 160.64, 1.6) pt3dadd(-98.63, -266.53, 160.64, 1.6) pt3dadd(-97.22, -267.28, 160.64, 1.6) pt3dadd(-97.15, -267.28, 160.64, 1.6) pt3dadd(-95.54, -267.44, 160.64, 1.6) pt3dadd(-93.78, -267.67, 160.64, 1.6) pt3dadd(-91.58, -267.95, 159.74, 1.6) } } proc shape3d_22() { apic[48] { pt3dadd(-90.56, -267.84, 159.74, 1.53) pt3dadd(-89.12, -267.35, 159.14, 1.53) pt3dadd(-87.79, -265.77, 158.49, 1.53) pt3dadd(-86.82, -264.5, 157.94, 1.53) pt3dadd(-85.75, -263.88, 158.44, 1.53) pt3dadd(-82.77, -263.4, 158.44, 1.53) pt3dadd(-81.67, -263.8, 157.59, 1.53) pt3dadd(-80.26, -264.26, 160.29, 1.39) pt3dadd(-79.09, -264.51, 160.29, 1.39) pt3dadd(-77.53, -265.11, 160.29, 1.39) pt3dadd(-77.46, -265.11, 160.29, 1.39) pt3dadd(-75.99, -265.42, 160.29, 1.39) pt3dadd(-74.45, -265.73, 161.84, 1.31) pt3dadd(-73.58, -265.69, 161.84, 1.31) pt3dadd(-73.51, -265.69, 161.84, 1.31) pt3dadd(-71.34, -265.03, 166.29, 1.31) pt3dadd(-71.27, -265.03, 166.29, 1.31) pt3dadd(-68.98, -263.7, 166.29, 1.31) pt3dadd(-68.91, -263.7, 166.29, 1.31) pt3dadd(-67.11, -263.12, 166.29, 1.31) pt3dadd(-65.24, -262.4, 166.29, 1.31) pt3dadd(-64.56, -260.99, 166.99, 1.31) pt3dadd(-63.8, -259.94, 166.99, 1.46) pt3dadd(-63.26, -258.75, 166.99, 1.6) pt3dadd(-62.43, -257.48, 167.94, 1.6) pt3dadd(-61.44, -256.5, 165.99, 1.75) pt3dadd(-60.24, -255.44, 165.99, 1.75) pt3dadd(-58.77, -255.75, 165.49, 1.53) pt3dadd(-57.36, -256.35, 164.69, 1.46) pt3dadd(-56.32, -256.82, 164.69, 1.6) pt3dadd(-54.99, -257.5, 163.79, 1.53) pt3dadd(-53.97, -257.32, 162.94, 1.6) pt3dadd(-52.95, -257.36, 162.94, 1.6) pt3dadd(-51.63, -257.6, 162.24, 1.46) pt3dadd(-50.32, -257.55, 162.24, 1.46) pt3dadd(-49.72, -257.97, 162.24, 1.68) pt3dadd(-49.72, -257.97, 162.09, 1.68) pt3dadd(-48.48, -257.92, 161.19, 1.53) pt3dadd(-47.34, -257.08, 160.39, 1.46) pt3dadd(-46.63, -256.54, 160.39, 1.46) pt3dadd(-46.56, -256.54, 160.39, 1.46) pt3dadd(-45.63, -256.14, 160.39, 1.46) pt3dadd(-44.9, -255.97, 160.39, 1.6) pt3dadd(-43.77, -255.05, 160.39, 1.6) pt3dadd(-42.76, -254.58, 160.39, 1.75) pt3dadd(-41.54, -254.1, 159.94, 1.68) pt3dadd(-39.86, -254.18, 159.94, 1.46) pt3dadd(-39.86, -254.11, 159.94, 1.46) pt3dadd(-38.53, -254.57, 159.94, 1.31) pt3dadd(-37.59, -254.54, 158.99, 1.6) pt3dadd(-36.21, -254.34, 158.99, 1.6) pt3dadd(-34.52, -254.5, 158.09, 1.53) pt3dadd(-33.43, -254.6, 157.59, 2.11) pt3dadd(-32.03, -254.92, 156.79, 2.33) pt3dadd(-31.74, -254.91, 156.79, 2.33) pt3dadd(-31, -255.24, 156.79, 2.33) pt3dadd(-29.06, -256.34, 156.29, 2.04) pt3dadd(-27.8, -256.95, 156.49, 1.9) pt3dadd(-27.72, -257.02, 156.49, 1.9) pt3dadd(-26.96, -257.8, 156.49, 1.9) pt3dadd(-25.33, -258.61, 156.49, 1.9) pt3dadd(-23.74, -260.16, 156.34, 1.9) pt3dadd(-23.81, -260.16, 156.34, 1.9) pt3dadd(-22.52, -261.57, 155.49, 1.9) pt3dadd(-21.63, -262.2, 155.49, 1.9) pt3dadd(-20.77, -263.55, 154.69, 1.9) pt3dadd(-20.16, -264.33, 155.09, 1.9) pt3dadd(-19.23, -265.76, 155.09, 1.9) pt3dadd(-18.8, -266.15, 155.09, 1.24) pt3dadd(-18.8, -266.15, 154.79, 1.24) pt3dadd(-17.54, -267.03, 153.24, 1.24) pt3dadd(-16.28, -266.67, 153.84, 1.24) pt3dadd(-15.17, -266.44, 152.89, 1.24) pt3dadd(-14.28, -266.28, 152.89, 1.24) pt3dadd(-13.61, -266.03, 152.34, 1.24) pt3dadd(-12.78, -265.57, 152.34, 1.17) pt3dadd(-12.02, -265.17, 151.49, 1.17) pt3dadd(-11.53, -264.33, 151.49, 1.17) pt3dadd(-11.49, -263.6, 150.44, 1.17) pt3dadd(-11.24, -263.18, 150.44, 1.31) pt3dadd(-11.27, -262.44, 150.44, 1.31) pt3dadd(-10.91, -261.3, 150.44, 1.31) pt3dadd(-10.85, -260.35, 149.84, 1.31) pt3dadd(-9.94, -259.75, 149.39, 1.31) pt3dadd(-8.72, -260.04, 148.14, 1.31) pt3dadd(-7.83, -261.12, 148.19, 1.31) pt3dadd(-7.01, -262.05, 148.19, 1.31) pt3dadd(-6.26, -262.82, 147.34, 1.31) pt3dadd(-5.18, -263.11, 146.79, 1.31) pt3dadd(-4.86, -263.3, 146.79, 1.6) pt3dadd(-3.74, -264.06, 146.84, 1.6) pt3dadd(-2.1, -265.02, 146.84, 1.6) pt3dadd(-1.95, -265.09, 146.84, 1.6) pt3dadd(0.34, -265.81, 146.84, 1.6) pt3dadd(1.53, -266.64, 146.84, 1.6) pt3dadd(1.53, -266.64, 146.79, 1.6) pt3dadd(3.2, -268.18, 146.29, 1.53) pt3dadd(4.16, -268.73, 146.29, 1.53) pt3dadd(5.48, -268.9, 147.19, 1.24) pt3dadd(5.85, -268.89, 147.19, 1.24) pt3dadd(6.59, -269.15, 147.19, 1.24) pt3dadd(6.6, -269.44, 147.19, 1.24) pt3dadd(5.84, -270.71, 147.19, 1.24) pt3dadd(5.13, -271.25, 147.19, 1.24) pt3dadd(5.13, -271.25, 146.89, 1.24) pt3dadd(4.76, -273.16, 146.69, 1.17) pt3dadd(6.03, -273.99, 146.69, 1.09) } apic[49] {pt3dclear() pt3dadd(-118.48, -271.19, 161.09, 1.31) pt3dadd(-118.51, -267.63, 161.14, 1.31) pt3dadd(-117.46, -266.42, 161.14, 1.31) pt3dadd(-116.77, -265.45, 159.99, 1.53) pt3dadd(-116.85, -265.38, 159.99, 1.53) pt3dadd(-115.71, -264.61, 159.99, 1.53) pt3dadd(-114.39, -264.63, 158.74, 1.39) pt3dadd(-113.14, -265.1, 158.24, 1.39) pt3dadd(-111.43, -265.98, 158.24, 1.39) pt3dadd(-110.23, -266.81, 159.14, 1.46) pt3dadd(-108.6, -267.56, 158.34, 1.31) pt3dadd(-108.45, -267.62, 158.34, 1.31) pt3dadd(-106.74, -268.58, 158.34, 1.31) pt3dadd(-106.66, -268.58, 158.34, 1.31) pt3dadd(-105.08, -268.08, 158.34, 1.31) pt3dadd(-103.54, -268.25, 158.34, 1.31) pt3dadd(-103.47, -268.24, 158.34, 1.31) pt3dadd(-101.33, -268.75, 157.74, 1.17) pt3dadd(-101.26, -268.75, 157.74, 1.17) pt3dadd(-99.38, -268.39, 157.74, 1.17) pt3dadd(-97.49, -268.1, 156.79, 1.09) pt3dadd(-95.46, -267.88, 155.59, 0.87) pt3dadd(-93.18, -268.31, 154.74, 1.17) pt3dadd(-92.74, -268.32, 154.74, 1.39) pt3dadd(-92.03, -268.54, 154.74, 1.39) pt3dadd(-90.34, -268.42, 154.74, 1.39) pt3dadd(-89.49, -268.73, 154.74, 1.53) pt3dadd(-88.47, -268.83, 154.74, 1.53) pt3dadd(-87.7, -268.47, 154.74, 1.39) pt3dadd(-86.24, -267.81, 153.69, 1.39) pt3dadd(-85.08, -267.2, 152.94, 1.39) pt3dadd(-85.08, -267.13, 152.94, 1.39) pt3dadd(-84.42, -266.46, 152.94, 1.39) pt3dadd(-83.06, -266.01, 152.94, 1.39) pt3dadd(-82.98, -266.02, 152.94, 1.39) pt3dadd(-81.98, -265.54, 152.94, 1.39) pt3dadd(-79.84, -265.39, 152.29, 1.39) pt3dadd(-78.43, -265.17, 151.64, 1.39) pt3dadd(-78.14, -265.2, 151.64, 1.39) pt3dadd(-77.47, -265.12, 151.64, 1.39) pt3dadd(-76.69, -264.69, 151.64, 1.39) pt3dadd(-75.35, -265.19, 151.04, 1.39) pt3dadd(-73.65, -265.73, 151.04, 1.39) pt3dadd(-72.68, -266.27, 151.04, 1.39) pt3dadd(-71.09, -267.24, 149.59, 1.39) pt3dadd(-70.95, -267.25, 149.59, 1.39) pt3dadd(-70.26, -267.69, 149.59, 1.39) pt3dadd(-70.27, -267.76, 149.59, 1.39) pt3dadd(-69.26, -268.01, 149.59, 1.39) pt3dadd(-68.83, -268.05, 149.09, 1.39) pt3dadd(-68.15, -267.1, 147.99, 1.53) pt3dadd(-68.14, -267.02, 147.99, 1.53) pt3dadd(-67.16, -266.1, 147.99, 1.6) pt3dadd(-66.63, -265.2, 147.99, 1.68) pt3dadd(-65.81, -264.33, 147.99, 1.68) pt3dadd(-64.98, -263.39, 147.99, 1.68) pt3dadd(-64.49, -262.2, 147.99, 1.68) pt3dadd(-64.41, -262.13, 147.99, 1.68) pt3dadd(-63.8, -261.09, 147.99, 1.68) pt3dadd(-63.78, -260.95, 147.99, 1.68) pt3dadd(-63.69, -260.81, 147.99, 1.68) pt3dadd(-63.69, -260.74, 147.99, 1.68) pt3dadd(-63.46, -259.96, 147.99, 1.68) pt3dadd(-63.37, -259.82, 147.99, 1.68) pt3dadd(-62.59, -259.31, 147.99, 1.68) pt3dadd(-62.03, -258.86, 147.99, 1.68) pt3dadd(-60.4, -258.66, 147.99, 1.68) pt3dadd(-59.58, -258.59, 146.84, 1.31) pt3dadd(-58.52, -258.26, 146.84, 1.31) pt3dadd(-58.37, -258.21, 146.84, 1.31) pt3dadd(-57.06, -257.61, 146.84, 1.31) pt3dadd(-56.14, -257.19, 146.84, 1.31) pt3dadd(-54.58, -256.98, 146.29, 1.39) pt3dadd(-54.5, -256.92, 146.29, 1.39) pt3dadd(-53.09, -257.43, 145.69, 1.39) pt3dadd(-51.89, -257.84, 144.84, 1.6) pt3dadd(-50.98, -258.3, 144.84, 1.6) pt3dadd(-49.62, -259.32, 144.84, 1.6) pt3dadd(-48.37, -259.96, 144.84, 1.75) pt3dadd(-47.34, -260.65, 144.84, 1.75) pt3dadd(-46.91, -260.7, 144.84, 1.75) pt3dadd(-46.15, -261.14, 144.84, 1.75) pt3dadd(-46.15, -261.14, 144.69, 1.75) pt3dadd(-45.27, -261.89, 143.99, 1.6) pt3dadd(-44.07, -262.3, 143.99, 1.6) pt3dadd(-43.67, -262.71, 143.99, 1.31) pt3dadd(-42.93, -265.02, 143.99, 1.31) pt3dadd(-42.79, -265.01, 143.99, 1.31) pt3dadd(-41.18, -265.17, 143.99, 1.31) pt3dadd(-41.1, -265.24, 143.99, 1.31) pt3dadd(-39.65, -267.16, 143.99, 1.31) pt3dadd(-39.57, -267.23, 143.99, 1.31) pt3dadd(-37.94, -268.04, 143.99, 1.31) } } proc shape3d_23() { apic[49] { pt3dadd(-37.09, -269.18, 143.99, 1.31) pt3dadd(-35.31, -270.06, 143.99, 1.31) pt3dadd(-32.94, -271, 143.29, 1.31) pt3dadd(-30.94, -271.8, 142.74, 1.31) pt3dadd(-30.87, -271.8, 142.74, 1.31) pt3dadd(-29.98, -272.28, 142.74, 1.31) pt3dadd(-29.9, -272.27, 142.39, 1.31) pt3dadd(-29.06, -273.41, 142.44, 1.31) pt3dadd(-27.91, -274.83, 142.44, 1.31) pt3dadd(-27.84, -274.9, 142.44, 1.31) pt3dadd(-27.22, -275.97, 142.44, 1.31) pt3dadd(-27, -275.96, 142.44, 1.31) pt3dadd(-25.75, -276.06, 142.44, 1.31) pt3dadd(-25.75, -276.06, 142.09, 1.31) pt3dadd(-23.68, -276.93, 141.99, 1.31) pt3dadd(-23.46, -276.92, 141.99, 1.31) pt3dadd(-22.18, -278.12, 141.99, 1.53) pt3dadd(-21.13, -278.74, 142.04, 1.68) pt3dadd(-19.07, -279.24, 142.34, 1.31) pt3dadd(-18.25, -279.72, 142.34, 1.31) pt3dadd(-18.25, -279.8, 142.34, 1.31) pt3dadd(-17.18, -281.22, 142.49, 1.39) pt3dadd(-15.81, -282.77, 143.19, 1.31) pt3dadd(-15.24, -284.43, 143.99, 1.31) pt3dadd(-14.47, -285.57, 143.99, 1.31) pt3dadd(-12.91, -286.31, 144.59, 1.24) pt3dadd(-12.76, -286.31, 144.59, 1.24) pt3dadd(-12.23, -286.94, 144.59, 1.24) pt3dadd(-11.4, -287.72, 144.64, 1.24) pt3dadd(-11.24, -287.93, 144.64, 1.24) pt3dadd(-9.99, -288.32, 144.64, 1.02) } } 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() shape3d_19() shape3d_20() shape3d_21() shape3d_22() shape3d_23() } objref all, somatic, axonal, basal, apical proc subsets() { local i objref all, somatic, axonal, basal, apical all = new SectionList() soma all.append() for i=0, 4 axon[i] all.append() for i=0, 21 dend[i] all.append() for i=0, 49 apic[i] all.append() somatic = new SectionList() soma somatic.append() axonal = new SectionList() for i=0, 4 axon[i] axonal.append() basal = new SectionList() for i=0, 21 dend[i] basal.append() apical = new SectionList() for i=0, 49 apic[i] apical.append() } proc geom() { } proc geom_nseg() { } proc biophys() { } access soma celldef()