proc celldef() {
topol()
}
create soma[2], dend[149]
proc topol() { local i
connect soma[1](0), soma(0)
connect dend(0), soma(0)
for i = 1, 2 connect dend[i](0), dend[i-1](1)
connect dend[3](0), dend[1](1)
connect dend[4](0), dend(1)
connect dend[5](0), soma(0)
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[i-1](1)
connect dend[11](0), dend[9](1)
connect dend[12](0), dend[8](1)
connect dend[13](0), dend[5](1)
for i = 14, 15 connect dend[i](0), dend[13](1)
connect dend[16](0), soma(0)
for i = 17, 18 connect dend[i](0), dend[i-1](1)
connect dend[19](0), dend[17](1)
connect dend[20](0), dend[16](1)
for i = 21, 22 connect dend[i](0), dend[20](1)
for i = 23, 24 connect dend[i](0), dend[22](1)
for i = 25, 26 connect dend[i](0), dend[24](1)
connect dend[27](0), soma(0)
for i = 28, 29 connect dend[i](0), dend[i-1](1)
connect dend[30](0), dend[28](1)
for i = 31, 32 connect dend[i](0), dend[i-1](1)
connect dend[33](0), dend[31](1)
connect dend[34](0), dend[30](1)
for i = 35, 36 connect dend[i](0), dend[34](1)
connect dend[37](0), dend[27](1)
for i = 38, 40 connect dend[i](0), dend[i-1](1)
connect dend[41](0), dend[39](1)
connect dend[42](0), dend[38](1)
for i = 43, 44 connect dend[i](0), dend[i-1](1)
connect dend[45](0), dend[43](1)
connect dend[46](0), dend[42](1)
connect dend[47](0), dend[37](1)
connect dend[48](0), soma(0)
for i = 49, 51 connect dend[i](0), dend[i-1](1)
connect dend[52](0), dend[50](1)
connect dend[53](0), dend[49](1)
connect dend[54](0), dend[48](1)
for i = 55, 56 connect dend[i](0), soma(0)
for i = 57, 60 connect dend[i](0), dend[i-1](1)
connect dend[61](0), dend[59](1)
connect dend[62](0), dend[58](1)
for i = 63, 64 connect dend[i](0), dend[62](1)
connect dend[65](0), dend[57](1)
for i = 66, 67 connect dend[i](0), dend[65](1)
for i = 68, 69 connect dend[i](0), dend[i-1](1)
connect dend[70](0), dend[68](1)
for i = 71, 72 connect dend[i](0), dend[70](1)
for i = 73, 74 connect dend[i](0), dend[72](1)
connect dend[75](0), dend[67](1)
for i = 76, 77 connect dend[i](0), dend[i-1](1)
connect dend[78](0), dend[76](1)
for i = 79, 80 connect dend[i](0), dend[78](1)
connect dend[81](0), dend[75](1)
connect dend[82](0), dend[56](1)
for i = 83, 84 connect dend[i](0), dend[i-1](1)
connect dend[85](0), dend[83](1)
connect dend[86](0), dend[82](1)
for i = 87, 88 connect dend[i](0), dend[86](1)
connect dend[89](0), soma(0)
for i = 90, 91 connect dend[i](0), dend[89](1)
connect dend[92](0), soma(0)
for i = 93, 94 connect dend[i](0), dend[i-1](1)
connect dend[95](0), dend[93](1)
for i = 96, 97 connect dend[i](0), dend[95](1)
for i = 98, 99 connect dend[i](0), dend[97](1)
connect dend[100](0), dend[92](1)
connect dend[101](0), soma(0)
for i = 102, 103 connect dend[i](0), dend[i-1](1)
connect dend[104](0), dend[102](1)
for i = 105, 106 connect dend[i](0), dend[104](1)
for i = 107, 108 connect dend[i](0), dend[i-1](1)
connect dend[109](0), dend[107](1)
connect dend[110](0), dend[106](1)
connect dend[111](0), dend[101](1)
for i = 112, 114 connect dend[i](0), dend[i-1](1)
connect dend[115](0), dend[113](1)
connect dend[116](0), dend[112](1)
connect dend[117](0), dend[111](1)
for i = 118, 119 connect dend[i](0), dend[117](1)
connect dend[120](0), soma(0)
for i = 121, 122 connect dend[i](0), dend[120](1)
connect dend[123](0), soma(0)
for i = 124, 125 connect dend[i](0), dend[i-1](1)
connect dend[126](0), dend[124](1)
connect dend[127](0), dend[123](1)
connect dend[128](0), soma(0)
for i = 129, 131 connect dend[i](0), dend[i-1](1)
connect dend[132](0), dend[130](1)
connect dend[133](0), dend[129](1)
for i = 134, 136 connect dend[i](0), dend[i-1](1)
connect dend[137](0), dend[135](1)
for i = 138, 139 connect dend[i](0), dend[137](1)
connect dend[140](0), dend[134](1)
for i = 141, 142 connect dend[i](0), dend[140](1)
for i = 143, 144 connect dend[i](0), dend[142](1)
connect dend[145](0), dend[133](1)
connect dend[146](0), dend[128](1)
for i = 147, 148 connect dend[i](0), dend[146](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 52.822)
pt3dadd(-3.12, 54.7, -10.92, 52.822)
}
soma[1] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 52.822)
pt3dadd(-3.12, 1.87, -10.92, 52.822)
}
dend {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 5.5)
pt3dadd(-16.5, 13.5, -8, 5.5)
pt3dadd(-19.5, 12, -5, 4.5)
pt3dadd(-22.5, 9.5, -5, 4.5)
pt3dadd(-26, 8.5, -5, 3.7)
pt3dadd(-31, 6, 1.5, 4)
pt3dadd(-34.5, 3.5, 5, 3.1)
pt3dadd(-39, 1, 1.5, 3.6)
pt3dadd(-43.5, -2, 1.5, 4.1)
pt3dadd(-48.5, -4.5, 1.5, 4.2)
pt3dadd(-52.5, -6, 1.5, 3.8)
pt3dadd(-58.5, -9.5, 5, 3.7)
pt3dadd(-61.5, -9.5, 5, 3.7)
pt3dadd(-64, -10.5, 5, 3.7)
pt3dadd(-66.5, -11, 5, 3.3)
pt3dadd(-69.5, -11, 15, 3.8)
pt3dadd(-72.5, -12, 11.5, 3.6)
pt3dadd(-78.5, -12, 11.5, 3.8)
pt3dadd(-81.5, -12, 11.5, 4)
pt3dadd(-84.5, -12, 15, 4)
pt3dadd(-88, -12, 15, 4)
pt3dadd(-92, -12, 11.5, 4.1)
pt3dadd(-95.5, -12, 11.5, 2.9)
pt3dadd(-100.5, -12, 11.5, 3.4)
pt3dadd(-118, -11, 11.5, 3.4)
pt3dadd(-123.5, -11, 15, 3.4)
pt3dadd(-129, -9.5, 15, 3.4)
pt3dadd(-136.5, -8.5, 22.5, 3.5)
pt3dadd(-139.5, -8, 22.5, 3.1)
pt3dadd(-142.5, -8, 22.5, 3.1)
pt3dadd(-146, -7, 22.5, 3.6)
pt3dadd(-150, -6, 22.5, 3.8)
pt3dadd(-152, -4.5, 22.5, 4)
pt3dadd(-157.5, -3, 22.5, 2.7)
pt3dadd(-162.5, -3, 22.5, 2.9)
pt3dadd(-168, -3, 26, 3.3)
}
dend[1] {pt3dclear()
pt3dadd(-168, -3, 26, 3.3)
pt3dadd(-174.5, -3.5, 26, 2.4)
pt3dadd(-181, -3.5, 29.5, 2.1)
pt3dadd(-183.5, -3.5, 29.5, 2.3)
pt3dadd(-189, -3.5, 26, 2)
pt3dadd(-193, -3.5, 26, 2.2)
pt3dadd(-195, -3.5, 26, 2.4)
pt3dadd(-203.5, -2, 22.5, 2.4)
pt3dadd(-205.5, -2.5, 29.5, 2.5)
pt3dadd(-208.5, -3.5, 26, 2.7)
pt3dadd(-212.5, -5.5, 26, 2.8)
pt3dadd(-217, -6.5, 22.5, 2.9)
pt3dadd(-222.5, -8, 18.5, 2.9)
pt3dadd(-225.5, -10, 18.5, 2.7)
pt3dadd(-232, -12, 22.5, 4.7)
}
dend[2] {pt3dclear()
pt3dadd(-232, -12, 22.5, 4.7)
pt3dadd(-235, -11, 26, 1.3)
pt3dadd(-239.5, -11, 29.5, 0.7)
pt3dadd(-243, -10.5, 29.5, 0.9)
pt3dadd(-245.5, -9.5, 29.5, 0.9)
pt3dadd(-249, -7.5, 29.5, 1)
pt3dadd(-254, -6.5, 29.5, 1.1)
pt3dadd(-256, -6, 29.5, 1.1)
pt3dadd(-260.5, -5, 29.5, 1.1)
pt3dadd(-263.5, -4, 33, 1.1)
pt3dadd(-265, -4, 36.5, 1)
pt3dadd(-268, -3, 29.5, 0.9)
pt3dadd(-271, -1, 36.5, 0.9)
pt3dadd(-273.5, 1, 36.5, 0.9)
pt3dadd(-279, 2, 36.5, 0.9)
pt3dadd(-280.5, 3, 36.5, 0.9)
pt3dadd(-285, 4.5, 36.5, 0.9)
pt3dadd(-288, 5.5, 36.5, 0.9)
pt3dadd(-291, 7, 36.5, 0.9)
pt3dadd(-293.5, 7, 36.5, 0.9)
pt3dadd(-301.5, 7, 36.5, 1.2)
pt3dadd(-303.5, 8.5, 40, 1.2)
pt3dadd(-306.5, 9.5, 40, 1.1)
pt3dadd(-309.5, 10.5, 40, 1.1)
pt3dadd(-312, 11.5, 40, 1.1)
pt3dadd(-313.5, 12.5, 40, 1.1)
pt3dadd(-315.5, 13.5, 43.5, 1.1)
pt3dadd(-317.5, 13.5, 43.5, 1.1)
pt3dadd(-321, 13.5, 43.5, 0.9)
}
dend[3] {pt3dclear()
pt3dadd(-232, -12, 22.5, 4.7)
pt3dadd(-235.5, -17, 26, 2.6)
pt3dadd(-239.5, -19.5, 26, 2.4)
pt3dadd(-243, -22, 29.5, 2.6)
pt3dadd(-245, -25, 29.5, 2.8)
pt3dadd(-246.5, -26.5, 29.5, 2.8)
pt3dadd(-249.5, -30.5, 36.5, 2.9)
pt3dadd(-253.5, -31.5, 36.5, 2.8)
pt3dadd(-261, -33, 43.5, 3.6)
pt3dadd(-264.5, -33, 43.5, 3.9)
pt3dadd(-268, -33, 43.5, 3.7)
pt3dadd(-272.5, -35, 40, 3.7)
pt3dadd(-275.5, -35.5, 43.5, 3.7)
pt3dadd(-279, -37.5, 43.5, 2.3)
pt3dadd(-286, -37.5, 43.5, 2.3)
pt3dadd(-291.5, -38, 43.5, 2.1)
pt3dadd(-294.5, -40, 39.5, 2)
pt3dadd(-298, -40.5, 43.5, 2)
pt3dadd(-301, -42, 51, 2.4)
pt3dadd(-305, -43, 55, 2.4)
pt3dadd(-308, -44, 47, 2)
pt3dadd(-311.5, -44, 51, 2.2)
pt3dadd(-314, -44.5, 51, 2.4)
pt3dadd(-319.5, -45.5, 43.5, 1.6)
pt3dadd(-324, -45.5, 43.5, 1.6)
pt3dadd(-327.5, -46.5, 43.5, 1.2)
pt3dadd(-333, -47, 47, 1.4)
pt3dadd(-337, -47, 47, 1.3)
pt3dadd(-339.5, -48.5, 47, 1.5)
pt3dadd(-342.5, -49, 47, 2.2)
pt3dadd(-346, -50.5, 47, 2.3)
pt3dadd(-351, -51.5, 47, 2.6)
pt3dadd(-358.5, -54, 47, 1.8)
pt3dadd(-361, -54, 47, 1.4)
pt3dadd(-363.5, -54.5, 58.5, 1.2)
pt3dadd(-365.5, -54.5, 62.5, 1.2)
pt3dadd(-368.5, -56, 55, 1.2)
pt3dadd(-372.5, -57, 55, 1.2)
pt3dadd(-376.5, -58.5, 58.5, 1.2)
pt3dadd(-380.5, -60, 58.5, 1.2)
pt3dadd(-384.5, -61, 58.5, 1.2)
pt3dadd(-386.5, -62.5, 58.5, 1.2)
pt3dadd(-389.5, -64, 62.5, 1.2)
pt3dadd(-391.5, -65.5, 62.5, 1.2)
pt3dadd(-393, -65, 62.5, 1.2)
pt3dadd(-395, -68, 62.5, 1.4)
pt3dadd(-395, -69, 62.5, 1.4)
pt3dadd(-397, -69, 66.5, 1.4)
pt3dadd(-403.5, -70, 66.5, 1.6)
pt3dadd(-406, -71.5, 70, 1.6)
pt3dadd(-408.5, -73.5, 70, 1.6)
pt3dadd(-410.5, -74.5, 70, 1.6)
pt3dadd(-412, -77, 70, 1.6)
pt3dadd(-412, -78.5, 66.5, 1.6)
pt3dadd(-412.5, -81.5, 70, 1.6)
pt3dadd(-413, -83.5, 70, 1.6)
pt3dadd(-416, -86, 58.5, 1.9)
pt3dadd(-419, -86.5, 58.5, 1.5)
pt3dadd(-421, -88, 58.5, 1.5)
pt3dadd(-423, -88.5, 58.5, 1.7)
pt3dadd(-425.5, -88.5, 58.5, 1.7)
pt3dadd(-427.5, -89, 58.5, 1.6)
pt3dadd(-433.5, -89.5, 62.5, 1.6)
pt3dadd(-438, -90.5, 62.5, 1.6)
pt3dadd(-441.5, -90.5, 62.5, 1.6)
pt3dadd(-445.5, -92.5, 62.5, 1.6)
pt3dadd(-449, -92.5, 62.5, 1.6)
pt3dadd(-457, -94.5, 62.5, 1.5)
pt3dadd(-463, -95.5, 62.5, 1.5)
pt3dadd(-467, -96.5, 62.5, 1.5)
pt3dadd(-471, -96.5, 62.5, 1.7)
pt3dadd(-477.5, -95, 62.5, 1.6)
pt3dadd(-480, -95, 62.5, 1.4)
pt3dadd(-482.5, -95, 62.5, 1.2)
pt3dadd(-484.5, -95, 62.5, 1.6)
pt3dadd(-487.5, -95, 66.5, 1.3)
pt3dadd(-492.5, -95.5, 58.5, 1.6)
pt3dadd(-496.5, -95.5, 58.5, 1.6)
pt3dadd(-504.5, -98, 62.5, 1.6)
pt3dadd(-507.5, -98, 70, 2)
pt3dadd(-510.5, -98, 66.5, 2)
pt3dadd(-512.5, -98, 66.5, 2)
pt3dadd(-515.5, -98, 70, 2)
pt3dadd(-518, -99.5, 70, 1.2)
pt3dadd(-520.5, -100, 70, 1)
pt3dadd(-522.5, -100.5, 70, 1)
pt3dadd(-526.5, -100, 70, 1.3)
pt3dadd(-528.5, -100, 70, 1.3)
pt3dadd(-530, -101.5, 70, 1.1)
pt3dadd(-532.5, -101.5, 74, 1.4)
pt3dadd(-535.5, -101.5, 70, 1.4)
pt3dadd(-538, -100, 78, 1.8)
pt3dadd(-542.5, -100, 70, 2)
pt3dadd(-545.5, -101.5, 78, 1.4)
pt3dadd(-551.5, -101.5, 82, 1.4)
pt3dadd(-556, -102, 74, 1.4)
pt3dadd(-562, -102, 74, 1.4)
pt3dadd(-566.5, -102, 74, 1.4)
pt3dadd(-569, -102, 74, 1.4)
pt3dadd(-573.5, -102, 74, 1.4)
pt3dadd(-579.5, -102, 78, 1.5)
pt3dadd(-584.5, -102, 78, 1.5)
pt3dadd(-589, -103, 78, 1.4)
pt3dadd(-594.5, -103.5, 78, 1.4)
pt3dadd(-599.5, -104, 78, 1.4)
pt3dadd(-603, -105.5, 78, 1.4)
pt3dadd(-609.5, -107.5, 78, 1.4)
pt3dadd(-611.5, -107.5, 78, 1.4)
pt3dadd(-614, -109, 74, 1.1)
pt3dadd(-616.5, -109.5, 74, 1.4)
pt3dadd(-621.5, -113, 66.5, 1)
pt3dadd(-623.5, -114, 66.5, 1)
pt3dadd(-629, -117, 66.5, 1.2)
pt3dadd(-632, -118.5, 66.5, 1.2)
pt3dadd(-635, -120.5, 70, 1.2)
pt3dadd(-638, -122.5, 70, 1.3)
}
}
proc shape3d_2() {
dend[3] { pt3dadd(-642, -125.5, 70, 1.3)
pt3dadd(-644.5, -126, 70, 1.1)
pt3dadd(-649, -127, 74, 1.1)
pt3dadd(-652.5, -128, 62.5, 0.9)
pt3dadd(-658.5, -130, 58.5, 0.9)
pt3dadd(-666, -132.5, 62.5, 1.2)
pt3dadd(-672.5, -135, 62.5, 1.4)
pt3dadd(-675.5, -137, 55, 1.5)
pt3dadd(-678.5, -138, 66.5, 1.1)
pt3dadd(-681, -138, 66.5, 1)
pt3dadd(-683, -139, 66.5, 1.1)
pt3dadd(-685, -140, 62.5, 1.2)
pt3dadd(-687.5, -140, 66.5, 1.2)
pt3dadd(-692, -140.5, 55, 1.2)
pt3dadd(-693.5, -141.5, 55, 1.2)
pt3dadd(-695.5, -141.5, 51, 1.2)
pt3dadd(-697.5, -142, 55, 1.3)
pt3dadd(-700.5, -144, 55, 1.4)
pt3dadd(-703, -144, 55, 1.4)
pt3dadd(-709, -144, 55, 1.2)
pt3dadd(-712.5, -144, 55, 1.2)
pt3dadd(-718.5, -146, 55, 1.2)
pt3dadd(-722, -146, 55, 1.2)
pt3dadd(-725.5, -148, 47, 1)
pt3dadd(-728.5, -150.5, 51, 0.9)
pt3dadd(-734.5, -152, 51, 0.9)
pt3dadd(-737.5, -152, 55, 0.9)
pt3dadd(-740, -153.5, 58.5, 1.1)
pt3dadd(-754, -156, 58.5, 1.1)
pt3dadd(-760, -158, 66.5, 1.1)
pt3dadd(-764.5, -160, 62.5, 1.1)
pt3dadd(-766.5, -163, 58.5, 1.1)
pt3dadd(-767, -165, 58.5, 1.1)
pt3dadd(-768, -167, 58.5, 1.1)
pt3dadd(-769.5, -168.5, 62.5, 1.1)
pt3dadd(-771.5, -170.5, 66.5, 1.1)
pt3dadd(-774, -171, 74, 1.1)
pt3dadd(-777.5, -174, 62.5, 0.8)
pt3dadd(-782, -177, 66.5, 0.8)
pt3dadd(-784.5, -179.5, 66.5, 0.8)
pt3dadd(-788, -181, 74, 0.8)
pt3dadd(-793, -182.5, 62.5, 0.9)
pt3dadd(-795.5, -184.5, 70, 0.9)
pt3dadd(-798.5, -186.5, 74, 0.9)
pt3dadd(-801, -189, 74, 0.9)
pt3dadd(-804, -193, 66.5, 0.7)
pt3dadd(-805.5, -196.5, 66.5, 0.7)
pt3dadd(-809, -200, 47, 0.6)
pt3dadd(-811.5, -201.5, 55, 0.7)
pt3dadd(-815.5, -202, 51, 0.7)
pt3dadd(-819, -204, 70, 0.7)
pt3dadd(-823, -204, 74, 0.7)
pt3dadd(-826, -204, 78, 0.7)
pt3dadd(-830.5, -206, 66.5, 0.7)
}
dend[4] {pt3dclear()
pt3dadd(-168, -3, 26, 3.3)
pt3dadd(-172.5, -0.5, 33, 2.4)
pt3dadd(-175, 1, 33, 2.6)
pt3dadd(-180, 3.5, 36.5, 2.4)
pt3dadd(-185, 4.5, 43.5, 2.2)
pt3dadd(-189.5, 5, 40, 2.2)
pt3dadd(-193.5, 6.5, 36.5, 2.2)
pt3dadd(-196.5, 7, 40, 2.4)
pt3dadd(-200.5, 9, 40, 2.8)
pt3dadd(-203, 9, 40, 2.4)
pt3dadd(-205, 9, 43.5, 2.2)
pt3dadd(-208.5, 10, 40, 1.9)
pt3dadd(-211, 11.5, 40, 1.9)
pt3dadd(-213.5, 13, 40, 1.9)
pt3dadd(-217, 15.5, 43.5, 2.1)
pt3dadd(-223.5, 17.5, 33, 2.1)
pt3dadd(-226.5, 18.5, 40, 2)
pt3dadd(-229.5, 21, 40, 2.1)
pt3dadd(-237, 24.5, 36.5, 2.1)
pt3dadd(-240.5, 26, 36.5, 2.1)
pt3dadd(-244, 27, 36.5, 2.1)
pt3dadd(-248, 30, 36.5, 2.1)
pt3dadd(-251, 31, 36.5, 2.1)
pt3dadd(-256, 32.5, 36.5, 2.1)
pt3dadd(-259.5, 33.5, 36.5, 2.1)
pt3dadd(-266.5, 35.5, 33, 2.1)
pt3dadd(-271.5, 36.5, 33, 1.8)
pt3dadd(-273.5, 37, 40.5, 1.8)
pt3dadd(-276, 37.5, 40.5, 1.4)
pt3dadd(-282, 37, 37, 1.4)
pt3dadd(-284.5, 38, 33, 1.6)
pt3dadd(-288.5, 40, 40.5, 1.5)
pt3dadd(-290.5, 41.5, 37, 1.5)
pt3dadd(-293, 41.5, 37, 1.6)
pt3dadd(-295, 41.5, 37, 1.6)
pt3dadd(-299.5, 40.5, 40.5, 1.6)
pt3dadd(-304, 39, 40.5, 1)
pt3dadd(-306.5, 38, 40.5, 1)
pt3dadd(-308, 38, 40.5, 1.2)
pt3dadd(-310.5, 37.5, 48.5, 1.3)
pt3dadd(-312, 37.5, 44.5, 1.3)
pt3dadd(-316.5, 40, 48.5, 1.5)
pt3dadd(-320.5, 41.5, 56, 1.8)
pt3dadd(-327.5, 43.5, 48.5, 1.9)
pt3dadd(-330.5, 44, 48.5, 1.9)
pt3dadd(-333.5, 45.5, 48.5, 1.9)
pt3dadd(-336, 47, 48.5, 1.9)
pt3dadd(-338.5, 49.5, 48.5, 1.8)
pt3dadd(-341, 49.5, 48.5, 1.7)
pt3dadd(-343.5, 50, 56, 1.7)
pt3dadd(-346.5, 50, 56, 1.6)
pt3dadd(-349, 50, 56, 1.4)
pt3dadd(-350.5, 51, 56, 1.3)
pt3dadd(-352, 52.5, 56, 1.4)
pt3dadd(-354, 54.5, 56, 1.4)
pt3dadd(-357.5, 56, 56, 1.4)
pt3dadd(-362, 58, 60, 1.7)
pt3dadd(-365.5, 58, 60, 1.9)
pt3dadd(-372.5, 58, 63.5, 1.9)
pt3dadd(-376, 58, 63.5, 1.9)
pt3dadd(-381, 57, 57, 2.3)
pt3dadd(-383, 57, 66.5, 2.3)
pt3dadd(-385.5, 57.5, 60.5, 2.1)
pt3dadd(-389.5, 58.5, 66.5, 1.9)
pt3dadd(-391, 59, 66.5, 2)
pt3dadd(-393, 59.5, 69.5, 2)
pt3dadd(-395.5, 60, 69.5, 2)
pt3dadd(-397.5, 60, 69.5, 1.7)
pt3dadd(-399.5, 61, 69.5, 1.6)
pt3dadd(-402, 61, 69.5, 1.9)
pt3dadd(-404.5, 61, 69.5, 2.1)
pt3dadd(-407.5, 62, 73, 2.1)
pt3dadd(-409.5, 63, 73, 2.1)
pt3dadd(-411.5, 63.5, 73, 1.8)
pt3dadd(-413.5, 64, 69.5, 1.3)
pt3dadd(-415.5, 63.5, 76, 1.5)
pt3dadd(-419.5, 63, 76, 1.9)
pt3dadd(-423, 62.5, 79, 2.1)
pt3dadd(-425.5, 62.5, 73, 2.1)
pt3dadd(-428.5, 63, 79, 2.5)
pt3dadd(-431, 63, 76, 2.5)
pt3dadd(-432.5, 61, 79, 2.5)
pt3dadd(-434, 60.5, 76, 2.5)
pt3dadd(-436.5, 61.5, 82, 2.1)
pt3dadd(-439.5, 63, 82, 2.1)
pt3dadd(-441.5, 63.5, 82, 2.1)
pt3dadd(-444, 63.5, 82, 2.1)
pt3dadd(-447, 63.5, 82, 2.1)
pt3dadd(-449.5, 63.5, 79, 2)
pt3dadd(-452.5, 62, 85.5, 2)
pt3dadd(-456, 62, 88.5, 2)
pt3dadd(-458, 62, 82, 2)
pt3dadd(-460, 62, 82, 1.6)
pt3dadd(-463, 63.5, 85.5, 1.7)
pt3dadd(-466.5, 62.5, 92, 1.8)
pt3dadd(-469, 62.5, 92, 1.4)
pt3dadd(-471.5, 62.5, 92, 1)
pt3dadd(-474, 62.5, 92, 1.1)
pt3dadd(-476.5, 62.5, 95.5, 1.2)
pt3dadd(-478, 61.5, 95.5, 1.4)
pt3dadd(-479, 60.5, 95.5, 1.4)
pt3dadd(-480, 59.5, 95.5, 1.3)
pt3dadd(-482.5, 59.5, 95.5, 1.2)
pt3dadd(-486, 58.5, 95.5, 1.2)
pt3dadd(-487.5, 58.5, 99, 1)
pt3dadd(-489, 58.5, 99, 1)
pt3dadd(-493.5, 55.5, 105.5, 1.2)
pt3dadd(-495, 54, 105.5, 1.3)
pt3dadd(-496.5, 54, 105.5, 1.3)
pt3dadd(-498.5, 54, 105.5, 1.1)
pt3dadd(-500.5, 54, 105.5, 0.9)
pt3dadd(-502.5, 54, 105.5, 0.9)
pt3dadd(-505, 53.5, 105.5, 0.9)
pt3dadd(-506, 53, 105.5, 1)
pt3dadd(-508.5, 53, 105.5, 1.1)
pt3dadd(-510, 52.5, 105.5, 0.9)
pt3dadd(-512.5, 52.5, 105.5, 0.7)
pt3dadd(-514, 52.5, 105.5, 0.7)
pt3dadd(-515.5, 52.5, 105.5, 0.9)
pt3dadd(-517, 51.5, 109, 1.2)
pt3dadd(-519.5, 51, 105.5, 1.1)
pt3dadd(-521, 49.5, 105.5, 1.1)
pt3dadd(-525, 47.5, 112, 2.1)
pt3dadd(-527.5, 47.5, 112, 1.9)
pt3dadd(-529, 47.5, 112, 1.6)
pt3dadd(-530.5, 48.5, 115.5, 1.6)
pt3dadd(-533, 48.5, 115.5, 1.8)
pt3dadd(-535, 48.5, 115.5, 1.7)
pt3dadd(-536.5, 51, 119, 1.5)
pt3dadd(-538.5, 51, 119, 1.5)
pt3dadd(-540.5, 51, 119, 1.6)
pt3dadd(-542.5, 52, 115.5, 2)
pt3dadd(-544, 52, 119, 2.1)
pt3dadd(-547, 52, 119, 2)
pt3dadd(-550.5, 54.5, 119, 1.2)
pt3dadd(-552.5, 56, 122, 0.8)
pt3dadd(-555.5, 57, 125.5, 0.7)
pt3dadd(-558, 58, 122, 0.7)
pt3dadd(-561, 58, 122, 0.7)
pt3dadd(-563, 58, 122, 0.7)
pt3dadd(-564.5, 56.5, 119, 0.8)
pt3dadd(-566, 56, 129, 0.8)
pt3dadd(-568, 53.5, 129, 1.2)
pt3dadd(-569.5, 51.5, 132, 1.4)
pt3dadd(-571, 49.5, 132, 1.4)
pt3dadd(-571.5, 48, 129, 1.4)
}
}
proc shape3d_3() {
dend[4] { pt3dadd(-573.5, 48, 129, 1.5)
pt3dadd(-576, 48, 129, 1.5)
pt3dadd(-578.5, 48, 129, 1.2)
pt3dadd(-583.5, 45.5, 132, 0.8)
pt3dadd(-586.5, 45.5, 132, 0.9)
pt3dadd(-591, 45.5, 135.5, 0.9)
pt3dadd(-593, 45.5, 139, 0.9)
pt3dadd(-597, 45.5, 139, 1.1)
pt3dadd(-599.5, 45.5, 132, 1)
pt3dadd(-604.5, 44.5, 135.5, 1.1)
pt3dadd(-607.5, 44.5, 135.5, 1.2)
pt3dadd(-610, 44.5, 139, 1.2)
pt3dadd(-612.5, 44.5, 139, 1.2)
pt3dadd(-617.5, 43.5, 139, 1.1)
pt3dadd(-620, 43.5, 139, 1.1)
pt3dadd(-622.5, 43.5, 139, 0.8)
pt3dadd(-626, 43.5, 142, 0.7)
pt3dadd(-630, 41.5, 139, 0.7)
pt3dadd(-635, 41.5, 142, 0.9)
pt3dadd(-637.5, 41.5, 142, 0.9)
pt3dadd(-640, 41.5, 145.5, 1)
pt3dadd(-641.5, 40, 145.5, 1)
pt3dadd(-644, 39, 149, 1.1)
pt3dadd(-646.5, 38, 142, 1.2)
pt3dadd(-648.5, 38, 145.5, 1.3)
pt3dadd(-649.5, 39.5, 145.5, 1.3)
pt3dadd(-651, 41.5, 145.5, 1.7)
pt3dadd(-653.5, 42, 145.5, 1.4)
pt3dadd(-656, 42, 145.5, 1.1)
pt3dadd(-658, 42, 145.5, 1)
pt3dadd(-659.5, 40.5, 145.5, 1.1)
pt3dadd(-661.5, 40.5, 149, 1.1)
pt3dadd(-663.5, 41.5, 149, 1.1)
pt3dadd(-665, 43, 142, 1.5)
pt3dadd(-667, 44.5, 142, 1.5)
pt3dadd(-669, 46.5, 142, 1.5)
pt3dadd(-672.5, 48, 142, 1.5)
pt3dadd(-675, 50, 142, 1.5)
}
dend[5] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 9.2)
pt3dadd(-22.5, 25, -18, 9.2)
pt3dadd(-24.5, 25, -21.5, 7.6)
pt3dadd(-27, 24, -21.5, 5.6)
pt3dadd(-30, 23.5, -21.5, 4.4)
pt3dadd(-34.5, 22, -21.5, 3.1)
pt3dadd(-37.5, 20.5, -18, 2.7)
pt3dadd(-42.5, 20, -15, 2.7)
pt3dadd(-45, 19.5, -15, 2.7)
pt3dadd(-47.5, 19.5, -15, 3)
pt3dadd(-51, 18.5, -11.5, 3.2)
pt3dadd(-55.5, 18.5, -11.5, 2.9)
pt3dadd(-58.5, 18, -5, 2.5)
pt3dadd(-60.5, 17.5, -5, 2.5)
pt3dadd(-62, 17.5, -5, 2.5)
pt3dadd(-67.5, 15, -1.5, 3.4)
pt3dadd(-69.5, 15, -8, 3.8)
pt3dadd(-72, 15, -5, 4.1)
pt3dadd(-74.5, 15, -1.5, 4.1)
pt3dadd(-78, 15, -1.5, 3.6)
pt3dadd(-83.5, 15, -1.5, 3.8)
pt3dadd(-88, 14.5, 1.5, 4)
pt3dadd(-94.5, 14.5, 11.5, 3.8)
pt3dadd(-101, 15, 8, 4.7)
pt3dadd(-105.5, 15.5, 8, 4.7)
pt3dadd(-108, 16, 8, 4.3)
pt3dadd(-112, 16, 8, 4.5)
pt3dadd(-115, 16, 8, 4.9)
pt3dadd(-119, 17, 8, 4.8)
pt3dadd(-122, 17, 8, 4.7)
pt3dadd(-125, 17.5, 8, 4.7)
pt3dadd(-129, 17.5, 8, 4.7)
pt3dadd(-133.5, 18, 8, 3.9)
pt3dadd(-141, 18, 5, 3.9)
pt3dadd(-144, 18, 5, 3.9)
pt3dadd(-147.5, 18.5, 5, 3.9)
pt3dadd(-154.5, 19.5, 8, 4)
pt3dadd(-161, 21.5, 11.5, 4)
pt3dadd(-166.5, 23, 11.5, 4.4)
pt3dadd(-171.5, 24, 11.5, 4)
pt3dadd(-174.5, 24, 11.5, 4.3)
pt3dadd(-177, 24, 11.5, 4.7)
pt3dadd(-179, 24, 15, 5.2)
}
dend[6] {pt3dclear()
pt3dadd(-179, 24, 15, 5.2)
pt3dadd(-199, 23.5, 5, 4.2)
pt3dadd(-206, 23.5, 1.5, 4.6)
pt3dadd(-212, 23.5, 5, 4.9)
pt3dadd(-217, 24, 1.5, 3.4)
pt3dadd(-224, 24, -11.5, 3.3)
pt3dadd(-226, 24, -11.5, 3)
pt3dadd(-228.5, 24, -11.5, 3.1)
pt3dadd(-230.5, 24, -5, 2.8)
pt3dadd(-233.5, 22.5, -1.5, 2.9)
pt3dadd(-237.5, 21.5, -5.5, 2.7)
pt3dadd(-244, 21.5, -5.5, 2.9)
pt3dadd(-251.5, 21.5, -5.5, 2.9)
pt3dadd(-258, 21, -5.5, 2.9)
pt3dadd(-263.5, 21, -5.5, 3.4)
pt3dadd(-266, 21, -14, 3.8)
}
dend[7] {pt3dclear()
pt3dadd(-266, 21, -14, 3.8)
pt3dadd(-269.5, 22.5, -9.5, 1.6)
pt3dadd(-273, 22.5, -14, 1.8)
pt3dadd(-279, 22.5, -18, 1.6)
pt3dadd(-282, 22, -18, 1.5)
pt3dadd(-285.5, 22, -14, 1.9)
pt3dadd(-288.5, 22, -14, 2.4)
pt3dadd(-294.5, 22, -14, 1.6)
pt3dadd(-298, 22.5, -14, 1.6)
pt3dadd(-306, 24, -14, 1.4)
pt3dadd(-310, 25, -9.5, 1.6)
pt3dadd(-316.5, 26.5, -14, 1.6)
pt3dadd(-319, 26.5, -14, 2.3)
pt3dadd(-321, 26.5, -14, 2.3)
pt3dadd(-323, 27, -18, 2)
pt3dadd(-325.5, 27, -18, 1.9)
pt3dadd(-327, 28.5, -18, 1.8)
pt3dadd(-330, 28.5, -26.5, 1.6)
pt3dadd(-332, 28, -26.5, 1.9)
pt3dadd(-335, 26, -22, 1.8)
pt3dadd(-338.5, 26, -26.5, 1.4)
pt3dadd(-340.5, 26, -30.5, 1.6)
pt3dadd(-342.5, 25.5, -26.5, 2)
pt3dadd(-346.5, 25.5, -26.5, 1.6)
pt3dadd(-350, 26, -22, 1.6)
pt3dadd(-353, 26, -26.5, 2.2)
pt3dadd(-356.5, 26, -26.5, 2.8)
pt3dadd(-363.5, 26.5, -26.5, 1.6)
pt3dadd(-366.5, 26.5, -34.5, 2)
pt3dadd(-370, 25, -34.5, 1.8)
pt3dadd(-373.5, 25, -30.5, 2.1)
pt3dadd(-377.5, 25.5, -30.5, 2.1)
pt3dadd(-381, 29.5, -30.5, 1.9)
pt3dadd(-383.5, 29.5, -30.5, 1.7)
pt3dadd(-386.5, 29.5, -38, 1.9)
pt3dadd(-388, 29.5, -42, 2)
pt3dadd(-390.5, 30, -42, 2.5)
pt3dadd(-392.5, 30, -38, 2.7)
pt3dadd(-397, 30, -46, 1.9)
pt3dadd(-398.5, 30, -46, 2.1)
pt3dadd(-403, 28.5, -46, 1.9)
pt3dadd(-405.5, 28.5, -46, 2)
pt3dadd(-408, 28.5, -42, 2.2)
pt3dadd(-410, 28.5, -49.5, 2.5)
pt3dadd(-413.5, 28.5, -49.5, 2.3)
pt3dadd(-418.5, 27.5, -49.5, 2)
pt3dadd(-421, 27, -53.5, 2)
pt3dadd(-424.5, 25.5, -53.5, 2.2)
pt3dadd(-427.5, 22.5, -46, 1.6)
pt3dadd(-430, 22.5, -46, 1.6)
pt3dadd(-431.5, 22.5, -46, 2)
pt3dadd(-434, 22, -42, 2.5)
pt3dadd(-436, 22, -46, 2.3)
pt3dadd(-438.5, 22, -46, 2)
pt3dadd(-440.5, 20.5, -46, 2.4)
pt3dadd(-442.5, 20.5, -49.5, 2.6)
pt3dadd(-444.5, 19.5, -49.5, 2.6)
pt3dadd(-447.5, 19, -49.5, 2.6)
pt3dadd(-450, 18, -49.5, 2.2)
pt3dadd(-452.5, 17.5, -57.5, 2.2)
pt3dadd(-454.5, 16.5, -57.5, 2.2)
pt3dadd(-458.5, 16, -57.5, 1.7)
pt3dadd(-460.5, 15, -57.5, 1.7)
pt3dadd(-462.5, 13, -57.5, 1.7)
pt3dadd(-467.5, 12, -57.5, 1.6)
pt3dadd(-469, 11, -57.5, 1.9)
pt3dadd(-472, 9.5, -57.5, 2.3)
pt3dadd(-474, 9.5, -57.5, 2)
pt3dadd(-476.5, 10, -49.5, 2.1)
pt3dadd(-477.5, 11.5, -57.5, 2.3)
pt3dadd(-480, 11.5, -57.5, 2.5)
pt3dadd(-482.5, 11.5, -57.5, 2.5)
pt3dadd(-484.5, 11.5, -57.5, 2.1)
pt3dadd(-485.5, 13, -57.5, 1.3)
pt3dadd(-487, 14, -61, 1.3)
pt3dadd(-488, 13.5, -61, 2.6)
pt3dadd(-490.5, 14, -61, 2)
pt3dadd(-491.5, 14, -57.5, 2)
pt3dadd(-493.5, 14, -61, 2.4)
pt3dadd(-498, 14, -61, 2.1)
pt3dadd(-500.5, 14, -61, 1.9)
pt3dadd(-502, 15, -61, 1.9)
pt3dadd(-503.5, 16.5, -65, 1.8)
pt3dadd(-505.5, 18, -65, 1.8)
pt3dadd(-506, 19, -65, 1.6)
pt3dadd(-507.5, 20, -65, 1.6)
pt3dadd(-509.5, 20, -65, 1.9)
pt3dadd(-511.5, 20, -65, 1.6)
pt3dadd(-513, 21, -65, 1.8)
pt3dadd(-515, 21.5, -69, 1.9)
pt3dadd(-518, 21.5, -69, 1.5)
pt3dadd(-520, 23.5, -69, 1.5)
pt3dadd(-522, 23.5, -69, 1.5)
pt3dadd(-527, 26, -69, 1.8)
pt3dadd(-529, 26.5, -76.5, 1.8)
pt3dadd(-532, 27, -76.5, 1.8)
pt3dadd(-534, 28, -76.5, 1.8)
pt3dadd(-541.5, 30.5, -76.5, 1.5)
pt3dadd(-544, 31, -76.5, 1.5)
pt3dadd(-546, 32, -84, 1.4)
pt3dadd(-548, 32.5, -84, 1.5)
pt3dadd(-550, 32.5, -84, 1.7)
pt3dadd(-552, 33.5, -84, 1.7)
}
}
proc shape3d_4() {
dend[7] { pt3dadd(-554.5, 34, -88, 1.7)
pt3dadd(-558.5, 36.5, -88, 1.8)
pt3dadd(-561.5, 37, -92.5, 1.8)
pt3dadd(-563, 37.5, -88, 1.9)
pt3dadd(-566.5, 38.5, -88, 2.2)
pt3dadd(-570, 38.5, -88, 1.9)
pt3dadd(-576, 38.5, -92.5, 2)
pt3dadd(-582, 37, -96.5, 2.8)
pt3dadd(-584.5, 37, -96.5, 2.9)
pt3dadd(-591, 35.5, -88, 2.5)
pt3dadd(-593.5, 35.5, -96.5, 2.7)
pt3dadd(-597.5, 35.5, -96.5, 2.5)
pt3dadd(-600, 35.5, -96.5, 2.5)
pt3dadd(-601.5, 35.5, -96.5, 2.6)
pt3dadd(-606, 35.5, -100.5, 1.7)
pt3dadd(-608.5, 35, -100.5, 1.9)
pt3dadd(-614, 34.5, -96.5, 1.9)
pt3dadd(-616.5, 34.5, -96.5, 1.9)
pt3dadd(-618, 34.5, -96.5, 1.8)
pt3dadd(-621, 34, -92.5, 1.8)
pt3dadd(-623, 34, -92.5, 1.6)
pt3dadd(-625.5, 33.5, -92.5, 1.8)
pt3dadd(-627.5, 33.5, -92.5, 2.3)
pt3dadd(-629.5, 33.5, -92.5, 2.3)
pt3dadd(-633, 33.5, -92.5, 2.3)
pt3dadd(-634.5, 32.5, -92.5, 2.3)
pt3dadd(-636.5, 32, -92.5, 2.3)
pt3dadd(-638, 31, -92.5, 2.1)
pt3dadd(-640.5, 31, -92.5, 1.8)
pt3dadd(-642, 30, -92.5, 2.1)
pt3dadd(-647, 28, -92.5, 1.5)
pt3dadd(-649.5, 26.5, -92.5, 1.5)
pt3dadd(-651.5, 26.5, -88, 2)
pt3dadd(-656, 26.5, -96.5, 1.9)
pt3dadd(-659.5, 26.5, -96.5, 1.6)
pt3dadd(-662, 26.5, -96.5, 1.6)
pt3dadd(-665, 26, -96.5, 1.6)
pt3dadd(-667.5, 26, -100.5, 1.8)
pt3dadd(-672.5, 24.5, -100.5, 1.8)
pt3dadd(-675, 24.5, -100.5, 1.8)
pt3dadd(-680.5, 24.5, -100.5, 1.9)
pt3dadd(-683, 25.5, -100.5, 1.8)
pt3dadd(-686.5, 25.5, -100.5, 1.8)
pt3dadd(-692.5, 25.5, -105, 1.5)
pt3dadd(-695, 25.5, -109, 1.5)
pt3dadd(-698, 27, -105, 1.5)
pt3dadd(-699, 28, -105, 1.5)
pt3dadd(-701, 27.5, -109, 1.7)
pt3dadd(-707.5, 27, -109, 1.3)
pt3dadd(-710.5, 27, -109, 1.5)
pt3dadd(-713.5, 26, -109, 1.5)
pt3dadd(-718, 25, -109, 1.4)
pt3dadd(-723.5, 27, -100.5, 1.6)
pt3dadd(-726, 27.5, -105, 1.4)
pt3dadd(-727.5, 28, -105, 1.4)
pt3dadd(-730, 27.5, -105, 1.8)
pt3dadd(-733, 27.5, -105, 1.6)
pt3dadd(-735, 27.5, -105, 1.5)
pt3dadd(-741.5, 29, -109, 1.7)
pt3dadd(-746.5, 29.5, -109, 1.4)
pt3dadd(-750.5, 28.5, -105, 1.9)
pt3dadd(-754.5, 27.5, -100.5, 1.1)
pt3dadd(-756.5, 27, -100.5, 1.3)
pt3dadd(-760, 26, -100.5, 1.2)
pt3dadd(-764, 25, -100.5, 1.1)
pt3dadd(-766.5, 24, -100.5, 1.1)
pt3dadd(-768.5, 23, -96.5, 1.4)
pt3dadd(-770.5, 22, -96.5, 1.4)
pt3dadd(-773, 20, -100.5, 0.9)
pt3dadd(-775, 19.5, -96.5, 0.9)
pt3dadd(-777.5, 18.5, -96.5, 1.2)
pt3dadd(-780, 18.5, -92.5, 1.4)
pt3dadd(-784, 20, -100.5, 1.5)
pt3dadd(-787.5, 20, -96.5, 1.5)
pt3dadd(-790, 20, -96.5, 1.5)
pt3dadd(-791, 19.5, -96.5, 1.8)
pt3dadd(-794, 18, -96.5, 1.8)
pt3dadd(-797, 16.5, -92.5, 1.6)
pt3dadd(-799.5, 16.5, -92.5, 1.1)
pt3dadd(-802, 16.5, -92.5, 1.1)
pt3dadd(-804.5, 16.5, -92.5, 1.2)
pt3dadd(-807.5, 16.5, -92.5, 1.2)
pt3dadd(-812, 17, -96.5, 1)
pt3dadd(-814.5, 17, -96.5, 1.1)
pt3dadd(-818.5, 17, -92.5, 1.3)
pt3dadd(-822.5, 17, -92.5, 1.6)
pt3dadd(-829, 19.5, -92.5, 2.1)
pt3dadd(-832, 21.5, -96.5, 1.8)
pt3dadd(-834.5, 23, -96.5, 1.4)
pt3dadd(-837.5, 22, -92.5, 1.9)
pt3dadd(-845, 21, -100.5, 2.4)
pt3dadd(-848.5, 19.5, -113, 1.9)
pt3dadd(-850.5, 19.5, -100.5, 1.2)
pt3dadd(-855, 20, -100.5, 1.3)
pt3dadd(-857, 21, -100.5, 1.1)
pt3dadd(-860, 21.5, -100.5, 1.1)
pt3dadd(-862.5, 21.5, -100.5, 1.1)
pt3dadd(-866.5, 21.5, -88, 1.3)
pt3dadd(-867.5, 21.5, -88, 1.4)
pt3dadd(-873, 21.5, -96.5, 1.3)
pt3dadd(-877, 22.5, -100.5, 1.3)
pt3dadd(-881, 22.5, -100.5, 1.3)
pt3dadd(-882.5, 22.5, -96.5, 1.4)
pt3dadd(-884, 23.5, -96.5, 1.4)
pt3dadd(-887, 23.5, -96.5, 1.4)
pt3dadd(-888.5, 23.5, -100.5, 1.1)
pt3dadd(-890.5, 23.5, -100.5, 1.2)
pt3dadd(-892.5, 24, -100.5, 1.2)
pt3dadd(-897, 25.5, -96.5, 1.4)
pt3dadd(-898.5, 25.5, -96.5, 1.2)
pt3dadd(-900, 25.5, -100.5, 1)
pt3dadd(-902.5, 26.5, -100.5, 1.9)
pt3dadd(-905.5, 28, -105, 1.4)
pt3dadd(-908.5, 29, -105, 1.1)
pt3dadd(-911, 29, -100.5, 1.4)
pt3dadd(-914, 29, -105, 1.6)
pt3dadd(-920.5, 28, -96.5, 1.3)
pt3dadd(-923.5, 28, -100.5, 1.3)
pt3dadd(-926.5, 28, -92.5, 1.6)
pt3dadd(-929, 29, -100.5, 1.6)
pt3dadd(-932.5, 30.5, -96.5, 1.9)
pt3dadd(-936, 30.5, -92.5, 1.6)
pt3dadd(-938.5, 30.5, -92.5, 1.4)
pt3dadd(-941, 30.5, -92.5, 1.4)
pt3dadd(-946, 30.5, -92.5, 1.4)
pt3dadd(-948.5, 30.5, -92.5, 1.4)
pt3dadd(-952, 30.5, -88, 1.4)
pt3dadd(-957, 31.5, -96.5, 1.5)
pt3dadd(-961, 32.5, -96.5, 1.5)
pt3dadd(-963, 32.5, -96.5, 1.5)
pt3dadd(-965.5, 32.5, -92.5, 1.5)
pt3dadd(-968.5, 32, -92.5, 1.5)
pt3dadd(-971, 32, -92.5, 1.5)
pt3dadd(-973, 32, -92.5, 1.5)
pt3dadd(-976, 32, -88, 1.4)
pt3dadd(-978, 31.5, -88, 1.5)
pt3dadd(-980.5, 31.5, -92.5, 1.8)
pt3dadd(-984, 30, -88, 1.5)
pt3dadd(-985.5, 29, -88, 1.3)
pt3dadd(-988, 28.5, -88, 1.3)
pt3dadd(-989.5, 28.5, -88, 1.4)
pt3dadd(-991.5, 28.5, -84, 1.4)
pt3dadd(-993.5, 30.5, -92.5, 1.3)
pt3dadd(-996, 31.5, -96.5, 1.6)
pt3dadd(-998.5, 32.5, -96.5, 2.1)
pt3dadd(-1002, 34, -96.5, 2.3)
pt3dadd(-1005.5, 35.5, -96.5, 2)
pt3dadd(-1008.5, 35.5, -92.5, 1.7)
pt3dadd(-1010.5, 35.5, -92.5, 1.4)
pt3dadd(-1012.5, 35, -92.5, 1.6)
pt3dadd(-1015, 34.5, -88, 1.6)
}
dend[8] {pt3dclear()
pt3dadd(-266, 21, -14, 3.8)
pt3dadd(-270, 19, -5.5, 3.1)
pt3dadd(-274.5, 19, -1.5, 2.8)
pt3dadd(-279.5, 17.5, -1.5, 2.9)
pt3dadd(-286, 16, -1.5, 3.3)
pt3dadd(-290.5, 15.5, -5.5, 2.1)
pt3dadd(-292.5, 14.5, -5.5, 2.3)
pt3dadd(-294.5, 14.5, -1.5, 2.3)
pt3dadd(-297.5, 14, 2, 2.2)
pt3dadd(-302, 12.5, 5.5, 2.2)
pt3dadd(-307.5, 10, 8.5, 2.1)
pt3dadd(-310, 8.5, 8.5, 2.5)
pt3dadd(-312.5, 8.5, 8.5, 2.9)
pt3dadd(-315, 8, 12, 3.7)
pt3dadd(-317, 7.5, 8.5, 3.1)
pt3dadd(-317.5, 7, 5.5, 3.1)
pt3dadd(-318.5, 5.5, 8.5, 3.1)
pt3dadd(-321.5, 4.5, 8.5, 3.1)
pt3dadd(-324.5, 3, 12, 2.7)
pt3dadd(-326.5, 2, 8.5, 3)
pt3dadd(-329, 2, 12, 3.1)
pt3dadd(-331.5, 0.5, 15, 3.3)
pt3dadd(-335.5, 0, 8.5, 3.6)
pt3dadd(-338, -1, 8.5, 3.6)
pt3dadd(-341, -2, 8.5, 3.6)
pt3dadd(-344, -3, 12, 3.6)
pt3dadd(-349, -3, 8.5, 2.7)
pt3dadd(-352, -3, 8.5, 2.5)
pt3dadd(-354.5, -3, 12, 2.8)
pt3dadd(-360, -5, 5.5, 3.3)
pt3dadd(-362.5, -5, 5.5, 2.9)
pt3dadd(-364, -5, 8.5, 3.5)
}
dend[9] {pt3dclear()
pt3dadd(-364, -5, 8.5, 3.5)
pt3dadd(-367.5, -5, 5.5, 2.2)
pt3dadd(-369, -5, 5.5, 2.2)
pt3dadd(-372.5, -5, 5.5, 2.9)
pt3dadd(-377, -5, 5.5, 2.2)
pt3dadd(-379.5, -5, 5.5, 1.8)
pt3dadd(-381, -5, 5.5, 1.8)
pt3dadd(-383, -5, 5.5, 2.1)
pt3dadd(-385.5, -5.5, 12, 2.2)
pt3dadd(-389.5, -7, 5.5, 2.4)
pt3dadd(-392, -7, 5.5, 2)
pt3dadd(-393.5, -8, 5.5, 2.1)
pt3dadd(-396.5, -9, 5.5, 2.1)
pt3dadd(-399, -10, 5.5, 2.1)
pt3dadd(-401.5, -10, 12, 2.1)
pt3dadd(-408, -14.5, 5.5, 2.3)
pt3dadd(-409.5, -15, 5.5, 2.3)
}
}
proc shape3d_5() {
dend[9] { pt3dadd(-414, -15.5, 5.5, 1.8)
pt3dadd(-416.5, -16.5, 5.5, 2.2)
pt3dadd(-419, -16.5, 5.5, 2.2)
pt3dadd(-421.5, -18.5, -1.5, 2.2)
pt3dadd(-425.5, -18.5, -1.5, 2)
pt3dadd(-429, -18.5, -9.5, 2)
pt3dadd(-434, -20, -9.5, 2)
pt3dadd(-436.5, -21, -9.5, 2.3)
pt3dadd(-440.5, -22, -9.5, 2.2)
pt3dadd(-443, -22, -9.5, 2.3)
pt3dadd(-448, -22.5, -9.5, 2.2)
pt3dadd(-451, -22.5, -9.5, 2.2)
pt3dadd(-454, -23.5, -5.5, 2.2)
pt3dadd(-456.5, -23.5, -5.5, 1.8)
pt3dadd(-464, -22.5, -1.5, 1.6)
pt3dadd(-466.5, -22.5, -1.5, 1.6)
pt3dadd(-468.5, -22, -1.5, 1.6)
pt3dadd(-470.5, -22, -9.5, 1.6)
pt3dadd(-473, -22.5, -5.5, 1.6)
pt3dadd(-475, -23, -14, 1.6)
pt3dadd(-478, -23, -14, 1.9)
pt3dadd(-480, -23, -9.5, 2.1)
pt3dadd(-481.5, -23, -14, 1.6)
pt3dadd(-488.5, -24.5, -9.5, 1.9)
pt3dadd(-491, -24.5, -9.5, 1.9)
pt3dadd(-494, -25, -5.5, 2.1)
pt3dadd(-500.5, -26, -1.5, 1.7)
pt3dadd(-503, -26, -9.5, 2.3)
pt3dadd(-506, -26, -9.5, 2.3)
pt3dadd(-508, -26, -9.5, 2)
pt3dadd(-512, -26.5, -14, 1.9)
pt3dadd(-516, -26.5, -14, 1.9)
pt3dadd(-521, -26.5, -14, 2.3)
pt3dadd(-524, -26.5, -14, 1.8)
pt3dadd(-526.5, -25.5, -14, 1.5)
pt3dadd(-529.5, -25.5, -14, 1.6)
pt3dadd(-535, -25.5, -14, 1.9)
pt3dadd(-536.5, -24.5, -14, 1.7)
pt3dadd(-540, -24.5, -14, 1.9)
pt3dadd(-543, -24.5, -14, 1.9)
pt3dadd(-546, -24.5, -14, 2)
pt3dadd(-549, -24.5, -9.5, 2)
pt3dadd(-554.5, -25, -9.5, 2)
pt3dadd(-559, -25, -9.5, 2)
pt3dadd(-562.5, -25, -1.5, 2.1)
}
dend[10] {pt3dclear()
pt3dadd(-562.5, -25, -1.5, 2.1)
pt3dadd(-566, -24, -9.5, 1.4)
pt3dadd(-571.5, -24, -5.5, 1)
pt3dadd(-575, -24.5, -9.5, 1)
pt3dadd(-578, -25.5, -9.5, 1.3)
pt3dadd(-580.5, -25.5, -18, 0.9)
pt3dadd(-583.5, -26, -9.5, 1.4)
pt3dadd(-586, -27.5, -9.5, 1.4)
pt3dadd(-590, -27.5, -9.5, 1.4)
pt3dadd(-592.5, -27.5, -14, 1.4)
pt3dadd(-595, -27.5, -22, 1.4)
pt3dadd(-598, -27.5, -14, 1.5)
pt3dadd(-602, -28.5, -14, 1.4)
pt3dadd(-605.5, -28.5, -14, 1.6)
pt3dadd(-609.5, -28.5, -5.5, 1.6)
pt3dadd(-612.5, -28.5, -14, 1.6)
pt3dadd(-616.5, -28.5, -14, 1.9)
pt3dadd(-622.5, -28.5, -9.5, 1.5)
pt3dadd(-625, -29, -18, 1.8)
pt3dadd(-626.5, -28, -14, 1.5)
pt3dadd(-629, -28, -14, 1.5)
pt3dadd(-631.5, -29, -14, 1.5)
pt3dadd(-635, -29, -9.5, 1.5)
pt3dadd(-638, -29, -18, 1.6)
pt3dadd(-645, -28, -14, 1.6)
pt3dadd(-648, -28, -9.5, 1.2)
pt3dadd(-651, -28, -18, 1.8)
pt3dadd(-654.5, -29, -26.5, 1.8)
pt3dadd(-659, -30, -22, 1.8)
pt3dadd(-661.5, -30.5, -22, 1.6)
pt3dadd(-664.5, -30.5, -26.5, 1.7)
pt3dadd(-668.5, -30.5, -26.5, 1.5)
pt3dadd(-671.5, -30.5, -26.5, 1.5)
pt3dadd(-675, -32.5, -26.5, 1.7)
pt3dadd(-682.5, -34.5, -22, 1.8)
pt3dadd(-684.5, -36.5, -22, 1.8)
pt3dadd(-685.5, -38, -22, 1.4)
pt3dadd(-685.5, -40.5, -22, 1.1)
pt3dadd(-689, -45, -30.5, 1.5)
pt3dadd(-690, -46.5, -30.5, 1.8)
pt3dadd(-693, -48.5, -30.5, 1.6)
pt3dadd(-695, -49.5, -30.5, 1.6)
pt3dadd(-696.5, -50, -30.5, 1.1)
pt3dadd(-699, -51, -26.5, 1.3)
pt3dadd(-701, -52, -26.5, 1.5)
pt3dadd(-704, -53, -34.5, 1.4)
pt3dadd(-706.5, -54.5, -30.5, 1.8)
pt3dadd(-709, -55, -34.5, 1.8)
pt3dadd(-712, -56, -34.5, 2.2)
pt3dadd(-714, -56, -34.5, 2.1)
pt3dadd(-716, -56, -34.5, 1.6)
pt3dadd(-719, -56, -38.5, 1.3)
pt3dadd(-721, -56, -38.5, 1.3)
pt3dadd(-724.5, -56, -42, 1.2)
pt3dadd(-726, -56.5, -42, 1.2)
pt3dadd(-726.5, -57.5, -38.5, 1.4)
pt3dadd(-728, -57.5, -46, 1.4)
pt3dadd(-730, -57, -46, 1.8)
pt3dadd(-732, -57, -46, 1.4)
pt3dadd(-735, -57, -46, 1.4)
pt3dadd(-737, -57, -50, 1.4)
pt3dadd(-738.5, -57, -50, 1.2)
pt3dadd(-742, -58.5, -53.5, 1.2)
pt3dadd(-744, -59.5, -53.5, 1.1)
pt3dadd(-746.5, -61, -57.5, 1.3)
pt3dadd(-749.5, -61.5, -57.5, 1.5)
pt3dadd(-753, -62, -57.5, 1.5)
pt3dadd(-756.5, -63, -57.5, 1.5)
pt3dadd(-758, -64, -53.5, 1.4)
pt3dadd(-759, -65.5, -57.5, 1.4)
pt3dadd(-759, -66.5, -57.5, 1.4)
pt3dadd(-761, -66, -50, 1.4)
pt3dadd(-762.5, -66, -57.5, 2)
pt3dadd(-765, -64.5, -61.5, 1.8)
pt3dadd(-765.5, -66, -53.5, 1.6)
pt3dadd(-768.5, -66, -57.5, 1.4)
pt3dadd(-770.5, -66.5, -53.5, 1.3)
pt3dadd(-773, -67.5, -53.5, 1.3)
pt3dadd(-775, -69, -61.5, 1.2)
pt3dadd(-778, -71.5, -61.5, 1.5)
pt3dadd(-780.5, -73, -61.5, 1.5)
pt3dadd(-781.5, -74, -61.5, 1.1)
pt3dadd(-783.5, -74.5, -61.5, 1.1)
pt3dadd(-783, -76, -61.5, 1.3)
pt3dadd(-783, -77.5, -61.5, 1.6)
pt3dadd(-785, -78.5, -61.5, 1.6)
pt3dadd(-787.5, -80, -57.5, 1.4)
pt3dadd(-789.5, -81.5, -57.5, 1.2)
pt3dadd(-791.5, -83.5, -61.5, 1.2)
pt3dadd(-793.5, -85, -65.5, 1)
pt3dadd(-794.5, -86, -57.5, 0.7)
pt3dadd(-795.5, -88, -57.5, 1)
pt3dadd(-796, -89, -57.5, 0.8)
pt3dadd(-798, -89.5, -57.5, 0.8)
pt3dadd(-799.5, -89.5, -61.5, 1.1)
pt3dadd(-802, -88.5, -65.5, 1.1)
pt3dadd(-804.5, -87.5, -65.5, 1.2)
pt3dadd(-806.5, -87, -65.5, 1)
pt3dadd(-808, -87, -65.5, 1.3)
pt3dadd(-810.5, -87, -65.5, 1.3)
pt3dadd(-812.5, -87, -65.5, 1.4)
pt3dadd(-814.5, -86.5, -65.5, 1.5)
pt3dadd(-815.5, -86, -73, 1.8)
pt3dadd(-817.5, -85.5, -77, 1.7)
pt3dadd(-817.5, -83.5, -80.5, 1.5)
pt3dadd(-816, -85.5, -84.5, 1.4)
pt3dadd(-818.5, -86.5, -84.5, 1.4)
pt3dadd(-819, -88, -84.5, 1.3)
pt3dadd(-819.5, -89, -84.5, 1.1)
pt3dadd(-818, -89, -88.5, 1.1)
pt3dadd(-821, -87.5, -88.5, 1.1)
pt3dadd(-822.5, -88.5, -92, 1)
pt3dadd(-824, -90, -92, 1)
pt3dadd(-825, -91.5, -92, 1.3)
pt3dadd(-827.5, -91.5, -92, 1.4)
}
dend[11] {pt3dclear()
pt3dadd(-562.5, -25, -1.5, 2.1)
pt3dadd(-564, -26, -5.5, 1.2)
pt3dadd(-566, -27, -5.5, 1.2)
pt3dadd(-568.5, -27, -1.5, 1.2)
pt3dadd(-569.5, -27, -1.5, 1.3)
pt3dadd(-573.5, -26.5, -1.5, 0.9)
pt3dadd(-577, -25.5, 2, 0.9)
pt3dadd(-580.5, -25.5, 5, 0.9)
pt3dadd(-583, -25.5, 2, 0.6)
pt3dadd(-585.5, -25.5, 2, 0.6)
pt3dadd(-588.5, -27, 5, 0.9)
pt3dadd(-590.5, -27, 5, 1)
pt3dadd(-592.5, -27, 5, 1)
pt3dadd(-595.5, -27.5, 5, 1)
pt3dadd(-597.5, -27.5, 5, 1)
pt3dadd(-601, -27, 15, 0.7)
pt3dadd(-604, -27, 15, 0.7)
pt3dadd(-608.5, -27, 15, 1.1)
pt3dadd(-609.5, -25.5, 11.5, 1.1)
pt3dadd(-612, -25.5, 18, 0.9)
pt3dadd(-614.5, -25.5, 18, 0.9)
pt3dadd(-619, -25.5, 15, 0.6)
pt3dadd(-621.5, -25.5, 15, 0.6)
pt3dadd(-625.5, -24.5, 18, 1.1)
pt3dadd(-629, -24.5, 21.5, 1.1)
pt3dadd(-631, -24.5, 18, 1.6)
pt3dadd(-633, -24.5, 18, 1.9)
pt3dadd(-636, -24.5, 18, 1.8)
pt3dadd(-641, -23, 18, 0.6)
pt3dadd(-643, -21.5, 18, 0.7)
pt3dadd(-644, -21.5, 18, 0.9)
pt3dadd(-645, -21, 21.5, 1.4)
pt3dadd(-647, -20.5, 21.5, 1.4)
pt3dadd(-648.5, -19.5, 21.5, 0.9)
pt3dadd(-650, -19, 21.5, 0.9)
pt3dadd(-652, -19, 21.5, 0.7)
pt3dadd(-654.5, -18.5, 21.5, 0.7)
pt3dadd(-659, -16, 21.5, 0.9)
pt3dadd(-661, -16, 21.5, 0.9)
pt3dadd(-662.5, -15, 21.5, 0.9)
}
}
proc shape3d_6() {
dend[11] { pt3dadd(-664.5, -14.5, 21.5, 1.4)
pt3dadd(-666.5, -13.5, 25, 1.2)
pt3dadd(-668.5, -13.5, 25, 1.1)
pt3dadd(-669.5, -13.5, 25, 0.7)
pt3dadd(-671.5, -13.5, 25, 0.7)
pt3dadd(-673.5, -13.5, 25, 0.9)
pt3dadd(-675.5, -12, 21.5, 0.9)
pt3dadd(-677.5, -12, 21.5, 1.1)
pt3dadd(-680, -12, 21.5, 1.1)
pt3dadd(-682.5, -11.5, 25, 1.1)
pt3dadd(-684.5, -11, 25, 0.8)
pt3dadd(-686.5, -10, 25, 0.7)
pt3dadd(-689.5, -10, 25, 0.7)
pt3dadd(-692.5, -10, 21.5, 0.7)
pt3dadd(-695, -10, 25, 0.9)
pt3dadd(-697.5, -10, 11.5, 0.9)
pt3dadd(-700.5, -11, 21.5, 0.9)
}
dend[12] {pt3dclear()
pt3dadd(-364, -5, 8.5, 3.5)
pt3dadd(-364.5, -7.5, 8.5, 1.9)
pt3dadd(-366.5, -8.5, 8.5, 2)
pt3dadd(-370.5, -9, 4, 1.1)
pt3dadd(-374, -9, 0, 1.1)
pt3dadd(-375.5, -10, -4, 1)
pt3dadd(-377.5, -10.5, -4, 0.7)
pt3dadd(-378.5, -10.5, -8.5, 0.9)
pt3dadd(-379.5, -10.5, -8.5, 0.7)
pt3dadd(-381, -10.5, -8.5, 0.9)
pt3dadd(-382.5, -11.5, -8.5, 0.9)
pt3dadd(-384, -12, -8.5, 0.9)
pt3dadd(-384.5, -11, -4, 0.8)
pt3dadd(-386, -11.5, -4, 0.8)
pt3dadd(-387, -12, -12.5, 1)
pt3dadd(-388, -13, -12.5, 1.1)
pt3dadd(-389.5, -14, -12.5, 0.8)
pt3dadd(-391, -14.5, -12.5, 0.7)
pt3dadd(-392.5, -15, -12.5, 0.8)
pt3dadd(-396, -15, -12.5, 0.7)
pt3dadd(-397.5, -15, -21, 0.8)
pt3dadd(-398.5, -16, -21, 0.8)
pt3dadd(-399.5, -17.5, -21, 0.9)
pt3dadd(-400.5, -18, -21, 0.9)
pt3dadd(-401.5, -18, -21, 0.9)
pt3dadd(-402.5, -18.5, -16.5, 0.7)
pt3dadd(-403, -19.5, -16.5, 0.7)
pt3dadd(-404.5, -19.5, -16.5, 0.7)
pt3dadd(-406.5, -20.5, -16.5, 0.7)
pt3dadd(-407.5, -21, -16.5, 0.7)
pt3dadd(-408.5, -22, -16.5, 0.9)
pt3dadd(-410, -23, -16.5, 0.9)
pt3dadd(-411.5, -24, -16.5, 0.9)
pt3dadd(-412.5, -24.5, -16.5, 0.9)
pt3dadd(-413, -25.5, -25, 0.9)
pt3dadd(-413, -26.5, -25, 0.9)
pt3dadd(-415, -27.5, -25, 0.9)
pt3dadd(-419, -30.5, -25, 1)
pt3dadd(-420.5, -30.5, -29, 1)
pt3dadd(-423, -30.5, -29, 1)
pt3dadd(-424.5, -31.5, -29, 1)
pt3dadd(-425.5, -33, -33.5, 0.9)
pt3dadd(-427, -34.5, -29, 0.8)
pt3dadd(-428.5, -34.5, -29, 0.6)
pt3dadd(-431, -36, -33.5, 0.6)
pt3dadd(-432.5, -37.5, -37, 0.9)
pt3dadd(-433.5, -39, -37, 0.9)
pt3dadd(-434.5, -40.5, -33.5, 0.9)
pt3dadd(-434.5, -42, -33.5, 1.1)
pt3dadd(-436, -43.5, -33.5, 1.1)
pt3dadd(-437.5, -44, -33.5, 0.9)
pt3dadd(-438, -46, -25.5, 1.2)
pt3dadd(-439, -47.5, -29.5, 0.8)
pt3dadd(-441, -48.5, -29.5, 0.9)
pt3dadd(-441.5, -50.5, -29.5, 0.7)
pt3dadd(-441.5, -51.5, -29.5, 0.8)
pt3dadd(-442, -53, -25.5, 1.2)
pt3dadd(-442.5, -55, -22, 1.4)
pt3dadd(-443, -57.5, -29.5, 1.4)
pt3dadd(-442.5, -58.5, -29.5, 0.9)
pt3dadd(-442.5, -59.5, -29.5, 0.8)
pt3dadd(-443.5, -59.5, -25.5, 0.6)
pt3dadd(-444.5, -59.5, -25.5, 0.6)
pt3dadd(-446.5, -59.5, -25.5, 0.6)
pt3dadd(-445.5, -58.5, -22, 1.5)
pt3dadd(-446.5, -58.5, -33.5, 0.8)
pt3dadd(-447, -58.5, -37, 0.7)
pt3dadd(-448, -60, -33.5, 1)
pt3dadd(-449.5, -61.5, -33.5, 1)
pt3dadd(-451.5, -61.5, -33.5, 0.8)
pt3dadd(-453, -62, -37, 0.8)
pt3dadd(-455.5, -63, -33.5, 0.9)
pt3dadd(-459, -64.5, -41, 0.7)
pt3dadd(-460.5, -65, -41, 0.7)
pt3dadd(-462, -65, -41, 0.7)
pt3dadd(-464, -66, -37, 0.7)
pt3dadd(-465, -66.5, -37, 0.7)
pt3dadd(-465.5, -67.5, -37, 0.7)
pt3dadd(-467.5, -69, -37, 0.8)
pt3dadd(-469, -69, -37, 0.8)
pt3dadd(-471, -69, -37, 0.8)
pt3dadd(-473, -69, -37, 0.8)
pt3dadd(-475.5, -70, -45, 1)
pt3dadd(-478.5, -70, -45, 1)
pt3dadd(-480.5, -70, -45, 1)
pt3dadd(-482.5, -70, -41, 1)
pt3dadd(-484.5, -71, -48.5, 0.9)
pt3dadd(-487.5, -71, -45, 0.8)
pt3dadd(-489.5, -70.5, -52.5, 0.8)
pt3dadd(-491, -71.5, -56.5, 0.7)
pt3dadd(-493, -72.5, -56.5, 0.7)
pt3dadd(-495, -74.5, -52.5, 0.9)
pt3dadd(-497, -76, -52.5, 0.9)
pt3dadd(-498, -78, -52.5, 0.7)
pt3dadd(-498, -80.5, -52.5, 0.7)
pt3dadd(-501.5, -82.5, -52.5, 0.8)
pt3dadd(-502, -82.5, -52.5, 0.8)
pt3dadd(-504, -84, -52.5, 0.7)
pt3dadd(-505.5, -84, -52.5, 0.7)
pt3dadd(-506, -85, -60, 0.7)
pt3dadd(-508, -86.5, -60, 0.7)
pt3dadd(-509.5, -86.5, -56.5, 0.7)
pt3dadd(-511.5, -87, -52.5, 0.7)
pt3dadd(-513.5, -89, -52.5, 0.6)
pt3dadd(-515.5, -89, -52.5, 0.6)
pt3dadd(-518.5, -90.5, -60, 0.6)
pt3dadd(-523.5, -92.5, -60, 0.8)
pt3dadd(-525.5, -93.5, -71.5, 0.8)
pt3dadd(-525.5, -94.5, -71.5, 0.8)
pt3dadd(-527, -95.5, -71.5, 0.8)
pt3dadd(-528.5, -95.5, -71.5, 0.8)
pt3dadd(-530.5, -96.5, -71.5, 0.8)
pt3dadd(-532, -97.5, -71.5, 0.8)
pt3dadd(-533.5, -98, -71.5, 0.7)
pt3dadd(-535, -99, -71.5, 0.7)
pt3dadd(-538.5, -100.5, -75.5, 1.1)
pt3dadd(-540, -100.5, -71.5, 1.1)
pt3dadd(-543, -102.5, -71.5, 1.1)
pt3dadd(-544.5, -104.5, -79.5, 1.1)
}
dend[13] {pt3dclear()
pt3dadd(-179, 24, 15, 5.2)
pt3dadd(-185.5, 26, 18, 4.1)
pt3dadd(-189, 28.5, 8, 2.8)
pt3dadd(-193.5, 30.5, 11.5, 2.9)
pt3dadd(-201, 33, 15, 2.9)
pt3dadd(-202, 33.5, 15, 2.5)
pt3dadd(-207.5, 37, 11.5, 2.5)
pt3dadd(-209.5, 38, 18.5, 2.9)
pt3dadd(-210.5, 40, 15, 2.9)
pt3dadd(-215, 43, 18.5, 3.1)
pt3dadd(-217, 44, 18.5, 2.8)
pt3dadd(-222, 47, 18.5, 2.9)
pt3dadd(-225.5, 50, 26, 2.8)
pt3dadd(-226.5, 51.5, 26, 2.6)
pt3dadd(-230, 55.5, 26, 2.7)
pt3dadd(-232.5, 57.5, 26, 2.7)
pt3dadd(-234, 59.5, 26, 2.7)
pt3dadd(-235.5, 61.5, 33, 3.2)
pt3dadd(-238, 67, 33, 3.2)
pt3dadd(-239.5, 69.5, 33, 3.2)
pt3dadd(-241.5, 73.5, 29.5, 3.2)
pt3dadd(-246, 80, 36.5, 2.7)
pt3dadd(-248, 81, 36.5, 2.7)
pt3dadd(-253, 87, 36.5, 2.8)
pt3dadd(-256, 92, 43.5, 2.9)
pt3dadd(-261, 95, 43.5, 3.4)
pt3dadd(-264, 97, 43.5, 3.5)
pt3dadd(-267.5, 98, 43.5, 3.8)
pt3dadd(-270.5, 97.5, 43.5, 2.4)
pt3dadd(-273.5, 96, 51, 2.6)
pt3dadd(-275, 100, 47.5, 2.5)
pt3dadd(-276.5, 102, 43.5, 2.5)
pt3dadd(-278, 99, 55, 2.7)
pt3dadd(-283, 97.5, 59, 2.3)
pt3dadd(-286, 98, 74, 1.8)
pt3dadd(-289, 99, 74, 1.7)
pt3dadd(-291.5, 100.5, 70.5, 2)
pt3dadd(-291.5, 103, 66.5, 1.8)
pt3dadd(-291.5, 104.5, 66.5, 1.8)
pt3dadd(-295, 104.5, 74, 2)
pt3dadd(-297, 104.5, 74, 2.2)
pt3dadd(-302, 107, 78, 2.8)
pt3dadd(-304, 108, 74, 2.8)
pt3dadd(-306.5, 108, 74, 2.8)
pt3dadd(-312.5, 109, 74, 2.8)
pt3dadd(-315, 110, 74, 2.4)
pt3dadd(-317, 110, 80, 2.3)
pt3dadd(-320.5, 111, 80, 2)
pt3dadd(-322.5, 111.5, 80, 2)
pt3dadd(-327, 111.5, 86.5, 2.4)
pt3dadd(-329.5, 110, 86.5, 2.6)
pt3dadd(-335.5, 110, 83, 2.2)
pt3dadd(-337.5, 110, 83, 1.6)
pt3dadd(-339.5, 110, 86.5, 2)
pt3dadd(-342, 110, 83, 2)
pt3dadd(-344.5, 110, 86.5, 2)
pt3dadd(-345.5, 110.5, 86.5, 2.5)
}
dend[14] {pt3dclear()
pt3dadd(-345.5, 110.5, 86.5, 2.5)
pt3dadd(-349.5, 110.5, 86.5, 1.3)
pt3dadd(-351.5, 110.5, 83, 1.3)
pt3dadd(-353.5, 110, 83, 1.4)
pt3dadd(-354.5, 110, 83, 2.8)
pt3dadd(-357, 110, 83, 2.3)
pt3dadd(-360, 110, 83, 1.7)
}
}
proc shape3d_7() {
dend[14] { pt3dadd(-362.5, 110, 83, 1.4)
pt3dadd(-365.5, 110, 86.5, 1.2)
pt3dadd(-368, 108.5, 83, 1.1)
pt3dadd(-371.5, 108.5, 89.5, 1.1)
pt3dadd(-373, 108.5, 92.5, 1.1)
pt3dadd(-374.5, 109.5, 86.5, 1.1)
pt3dadd(-376, 108, 86.5, 1)
pt3dadd(-378.5, 107, 89.5, 1.1)
pt3dadd(-380.5, 107, 92.5, 1.3)
pt3dadd(-382.5, 107, 92.5, 1.3)
pt3dadd(-384.5, 106, 92.5, 1.3)
pt3dadd(-387, 106, 95.5, 1.5)
pt3dadd(-390, 106, 95.5, 1.5)
pt3dadd(-392.5, 106, 95.5, 1.5)
pt3dadd(-394.5, 106, 99, 1.3)
pt3dadd(-396.5, 106, 99, 1.1)
pt3dadd(-397.5, 107.5, 99, 0.7)
pt3dadd(-399, 107.5, 99, 0.7)
pt3dadd(-401.5, 107.5, 99, 1.1)
pt3dadd(-403, 106.5, 95.5, 1.1)
pt3dadd(-406.5, 105.5, 102, 1.2)
pt3dadd(-408, 105.5, 92.5, 1)
pt3dadd(-410, 105.5, 92.5, 1)
pt3dadd(-412, 105.5, 89.5, 2.2)
pt3dadd(-415, 104.5, 95.5, 1.2)
pt3dadd(-417, 104.5, 95.5, 1.5)
pt3dadd(-419.5, 105, 92.5, 1.6)
pt3dadd(-422, 105, 92.5, 1.7)
pt3dadd(-424, 105, 99, 2)
pt3dadd(-426, 103.5, 99, 2)
pt3dadd(-429, 103.5, 92.5, 2)
pt3dadd(-435, 101.5, 92.5, 2.1)
pt3dadd(-437.5, 99.5, 92.5, 2.2)
pt3dadd(-440, 99.5, 95.5, 2.2)
pt3dadd(-441.5, 99.5, 95.5, 1.7)
pt3dadd(-443.5, 99.5, 95.5, 1.3)
pt3dadd(-445.5, 98.5, 95.5, 1.3)
pt3dadd(-447, 98.5, 99, 1.1)
pt3dadd(-448.5, 98.5, 99, 0.9)
pt3dadd(-451.5, 97.5, 99, 1.2)
pt3dadd(-454.5, 97.5, 92.5, 1.1)
pt3dadd(-458.5, 97, 92.5, 1.1)
pt3dadd(-461.5, 97, 92.5, 1.1)
pt3dadd(-465, 97, 92.5, 1.1)
pt3dadd(-468.5, 96, 92.5, 1)
pt3dadd(-474, 95, 95.5, 1.1)
pt3dadd(-477.5, 96, 92.5, 1.3)
pt3dadd(-480, 96.5, 95.5, 1.3)
pt3dadd(-483, 97.5, 95.5, 1.3)
pt3dadd(-488, 98, 95.5, 1.3)
pt3dadd(-490.5, 98, 99, 1.1)
pt3dadd(-492.5, 99, 99, 1.1)
pt3dadd(-497.5, 99, 95.5, 1.1)
pt3dadd(-500, 98.5, 95.5, 0.9)
pt3dadd(-503, 98, 95.5, 1)
pt3dadd(-504.5, 96, 99, 0.7)
pt3dadd(-506.5, 94.5, 99, 0.9)
pt3dadd(-508.5, 94.5, 102.5, 0.9)
pt3dadd(-510, 94.5, 95.5, 0.9)
pt3dadd(-512.5, 96, 95.5, 1)
pt3dadd(-519.5, 95, 99, 1.1)
pt3dadd(-523, 93.5, 95.5, 1.3)
pt3dadd(-526, 93.5, 99, 1.4)
pt3dadd(-529, 93.5, 99, 1.1)
pt3dadd(-530.5, 93.5, 102.5, 1.3)
pt3dadd(-534, 92, 105.5, 1.3)
pt3dadd(-536.5, 91, 105.5, 1.3)
pt3dadd(-537.5, 91, 109, 1.6)
pt3dadd(-538, 89, 109, 1.8)
pt3dadd(-540, 87, 109, 1.1)
pt3dadd(-542.5, 86, 109, 0.9)
pt3dadd(-545, 83.5, 109, 0.8)
pt3dadd(-546.5, 83.5, 109, 0.7)
pt3dadd(-548.5, 83.5, 109, 0.7)
pt3dadd(-550.5, 83.5, 109, 0.7)
pt3dadd(-552, 84.5, 105.5, 0.8)
pt3dadd(-554.5, 83.5, 115.5, 0.9)
pt3dadd(-556.5, 83.5, 115.5, 0.9)
pt3dadd(-559, 83, 115.5, 1.2)
pt3dadd(-560.5, 82, 115.5, 1.2)
pt3dadd(-562, 80.5, 115.5, 0.9)
pt3dadd(-567, 78.5, 115.5, 0.6)
pt3dadd(-568, 77.5, 115.5, 0.6)
pt3dadd(-569.5, 75.5, 119, 1.4)
pt3dadd(-572, 75.5, 115.5, 1.4)
pt3dadd(-573.5, 74.5, 115.5, 0.7)
pt3dadd(-576, 73.5, 115.5, 0.8)
pt3dadd(-579.5, 73.5, 115.5, 1.1)
pt3dadd(-581.5, 72.5, 115.5, 1.2)
pt3dadd(-584.5, 71.5, 115.5, 1.4)
pt3dadd(-587.5, 71, 115.5, 1.2)
pt3dadd(-588.5, 68, 125.5, 1.4)
pt3dadd(-591, 67.5, 122.5, 1.4)
pt3dadd(-594, 67, 122.5, 1.4)
pt3dadd(-596, 65.5, 122.5, 1.6)
pt3dadd(-600, 64, 122.5, 1.1)
}
dend[15] {pt3dclear()
pt3dadd(-345.5, 110.5, 86.5, 2.5)
pt3dadd(-348, 112.5, 89.5, 1.7)
pt3dadd(-348.5, 114, 89.5, 2.7)
pt3dadd(-351.5, 114.5, 89.5, 1.8)
pt3dadd(-353, 116.5, 89.5, 1.8)
pt3dadd(-355.5, 120, 95.5, 1.5)
pt3dadd(-357, 120.5, 95.5, 1.3)
pt3dadd(-359, 121.5, 95.5, 1.6)
pt3dadd(-361, 123, 95.5, 2.1)
pt3dadd(-362.5, 128, 89.5, 2.1)
pt3dadd(-363.5, 129, 105, 2.1)
pt3dadd(-362.5, 133, 92.5, 2.2)
pt3dadd(-362.5, 135, 95.5, 2.3)
pt3dadd(-362.5, 138, 92.5, 1.3)
pt3dadd(-362.5, 140, 102.5, 1.1)
pt3dadd(-363, 141, 102.5, 0.9)
pt3dadd(-364.5, 142, 102.5, 0.9)
pt3dadd(-367.5, 144.5, 102.5, 0.9)
pt3dadd(-369.5, 145.5, 99, 0.9)
pt3dadd(-371.5, 146.5, 99, 0.9)
pt3dadd(-373.5, 148, 99, 1.1)
pt3dadd(-374.5, 148.5, 99, 1.1)
pt3dadd(-376, 149.5, 99, 1.1)
pt3dadd(-381.5, 152, 109, 1.1)
pt3dadd(-383, 152.5, 109, 1.1)
pt3dadd(-387.5, 153.5, 105.5, 0.7)
pt3dadd(-390.5, 153.5, 105.5, 0.7)
pt3dadd(-393, 153.5, 102.5, 1.1)
pt3dadd(-393.5, 156.5, 105.5, 1.3)
pt3dadd(-393, 158, 105.5, 1)
pt3dadd(-393, 160, 115.5, 0.9)
pt3dadd(-395, 164, 115.5, 0.6)
pt3dadd(-395, 166, 115.5, 0.6)
pt3dadd(-396.5, 166.5, 115.5, 0.7)
pt3dadd(-398.5, 167, 115.5, 0.7)
pt3dadd(-399.5, 168, 115.5, 0.7)
pt3dadd(-401, 169.5, 115.5, 0.8)
pt3dadd(-402.5, 170.5, 115.5, 0.8)
pt3dadd(-404.5, 171.5, 119, 0.7)
pt3dadd(-406, 172, 115.5, 0.6)
pt3dadd(-410, 174, 115.5, 0.7)
pt3dadd(-412.5, 175.5, 115.5, 0.7)
pt3dadd(-414, 179, 115.5, 0.8)
pt3dadd(-416, 180.5, 115.5, 0.8)
pt3dadd(-416.5, 182, 115.5, 0.8)
pt3dadd(-417.5, 184, 115.5, 0.7)
pt3dadd(-418.5, 185, 115.5, 0.7)
pt3dadd(-419.5, 186, 115.5, 0.7)
pt3dadd(-421, 189, 115.5, 0.7)
pt3dadd(-422.5, 190.5, 112.5, 0.7)
pt3dadd(-428.5, 191.5, 119, 0.9)
}
dend[16] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 7.6)
pt3dadd(-24, 36.5, 8, 7.6)
pt3dadd(-30.5, 36.5, 8, 6)
pt3dadd(-33.5, 36.5, 11.5, 5.5)
pt3dadd(-36, 37, 8, 4.9)
pt3dadd(-37.5, 37.5, 8, 4.2)
pt3dadd(-39.5, 37.5, 8, 4.6)
pt3dadd(-44, 37.5, 15, 4.6)
pt3dadd(-48.5, 37.5, 11.5, 4.3)
pt3dadd(-50.5, 38, 11.5, 4)
pt3dadd(-53.5, 40, 15, 3.3)
pt3dadd(-55.5, 40, 22, 3.3)
pt3dadd(-54.5, 37.5, 22, 4.2)
pt3dadd(-56.5, 37.5, 22, 4.6)
pt3dadd(-59, 37.5, 18.5, 4.9)
pt3dadd(-63, 39, 15, 4.9)
pt3dadd(-65, 39, 15, 4.9)
pt3dadd(-68.5, 39, 22, 6.3)
pt3dadd(-72, 38.5, 36.5, 7.3)
}
dend[17] {pt3dclear()
pt3dadd(-72, 38.5, 36.5, 7.3)
pt3dadd(-69, 33.5, 40, 2.6)
pt3dadd(-68, 32, 40, 2.8)
pt3dadd(-65, 28, 40, 2.8)
pt3dadd(-66, 32, 43.5, 2.8)
pt3dadd(-68, 35, 40, 2.8)
pt3dadd(-72.5, 40.5, 29.5, 2.8)
pt3dadd(-76, 44.5, 26, 3)
pt3dadd(-79, 47, 26, 2.7)
pt3dadd(-84, 50, 33, 2.7)
pt3dadd(-89, 50, 33, 2.7)
pt3dadd(-92, 51.5, 47, 2.7)
pt3dadd(-98, 51.5, 47, 2.7)
pt3dadd(-101, 53.5, 43, 3.5)
}
dend[18] {pt3dclear()
pt3dadd(-101, 53.5, 43, 3.5)
pt3dadd(-105, 54, 51, 2.2)
pt3dadd(-109.5, 55.5, 43, 2.3)
pt3dadd(-113.5, 57, 51, 1.6)
pt3dadd(-115.5, 57.5, 47, 1.6)
pt3dadd(-121.5, 59.5, 47, 1.8)
pt3dadd(-124.5, 60.5, 51, 1.6)
pt3dadd(-126.5, 62, 51, 1.6)
pt3dadd(-128.5, 62, 51, 1.6)
pt3dadd(-131.5, 62, 51, 1.6)
pt3dadd(-134, 62, 51, 1.6)
pt3dadd(-135.5, 62, 51, 1.6)
pt3dadd(-140.5, 63.5, 58.5, 1.7)
pt3dadd(-144.5, 63.5, 58.5, 1.7)
pt3dadd(-147, 63.5, 58.5, 1.7)
pt3dadd(-153, 64.5, 54.5, 1.7)
pt3dadd(-155.5, 64.5, 54.5, 1.6)
pt3dadd(-157.5, 64.5, 66, 1.6)
pt3dadd(-160.5, 65.5, 62.5, 1.6)
pt3dadd(-164, 66.5, 62.5, 1.6)
}
}
proc shape3d_8() {
dend[18] { pt3dadd(-172, 67.5, 70, 1.6)
pt3dadd(-174, 67.5, 70, 1.6)
pt3dadd(-178, 67.5, 66, 1.6)
pt3dadd(-181.5, 68.5, 66, 1.8)
pt3dadd(-185, 69.5, 66, 1.8)
pt3dadd(-194, 72.5, 58.5, 2)
pt3dadd(-196.5, 73.5, 58.5, 2)
pt3dadd(-202.5, 78, 58.5, 2)
pt3dadd(-204, 79.5, 66, 2.3)
pt3dadd(-204, 81, 66, 2.3)
pt3dadd(-206.5, 81, 62.5, 2.3)
pt3dadd(-209, 81, 58.5, 2)
pt3dadd(-210.5, 82.5, 58.5, 2.1)
pt3dadd(-215.5, 84, 66, 1.8)
pt3dadd(-217.5, 85, 70, 1.4)
pt3dadd(-221, 88, 70, 1.7)
pt3dadd(-223, 89, 70, 1.8)
pt3dadd(-225.5, 89, 70, 1.8)
pt3dadd(-228, 90, 74, 1.6)
pt3dadd(-230.5, 91.5, 74, 1.4)
pt3dadd(-231.5, 93.5, 74, 1.4)
pt3dadd(-236.5, 97, 77.5, 1.4)
pt3dadd(-240, 101, 70, 1.6)
pt3dadd(-244, 104.5, 70, 1.6)
pt3dadd(-246.5, 106.5, 66, 1.6)
pt3dadd(-248, 108.5, 66, 1.6)
pt3dadd(-249, 111, 66, 1.9)
pt3dadd(-250.5, 113.5, 74, 1.9)
pt3dadd(-253, 116.5, 70, 1.9)
pt3dadd(-255, 120, 70, 1.9)
pt3dadd(-257, 121.5, 70, 1.8)
pt3dadd(-261, 123.5, 70, 2)
pt3dadd(-261, 125, 70, 2)
pt3dadd(-262.5, 126, 70, 2.1)
pt3dadd(-268, 128.5, 70, 2)
pt3dadd(-270, 130, 70, 1.8)
pt3dadd(-271.5, 131.5, 70, 1.9)
pt3dadd(-273, 134.5, 66, 1.6)
pt3dadd(-274.5, 137.5, 66, 1.9)
pt3dadd(-276, 139.5, 70, 1.8)
pt3dadd(-278, 141.5, 70, 1.6)
pt3dadd(-280, 143.5, 70, 1.6)
pt3dadd(-283, 145.5, 70, 1.5)
pt3dadd(-285, 147.5, 74, 1.3)
pt3dadd(-287, 148.5, 74, 1.3)
pt3dadd(-289.5, 151, 62.5, 1.8)
pt3dadd(-291.5, 152.5, 66, 1.8)
pt3dadd(-294.5, 155, 62.5, 1.8)
pt3dadd(-296.5, 157, 58.5, 1.8)
pt3dadd(-298.5, 157.5, 62.5, 1.4)
pt3dadd(-300.5, 158.5, 62.5, 1.4)
pt3dadd(-302, 159.5, 62.5, 1.6)
pt3dadd(-303.5, 161.5, 58.5, 1.3)
pt3dadd(-305.5, 163, 58.5, 1.3)
pt3dadd(-310, 164.5, 58.5, 1.2)
pt3dadd(-311, 165, 58.5, 1.2)
pt3dadd(-315, 166.5, 58.5, 1.3)
pt3dadd(-315, 168, 58.5, 1.9)
pt3dadd(-315.5, 173.5, 58.5, 1.7)
pt3dadd(-316, 176, 51, 1.5)
pt3dadd(-316, 178, 51, 1.2)
pt3dadd(-316.5, 179.5, 51, 1.6)
pt3dadd(-317, 181, 51, 1.7)
pt3dadd(-318, 183, 51, 1.2)
pt3dadd(-318, 184.5, 51, 0.8)
pt3dadd(-319.5, 186.5, 51, 0.8)
pt3dadd(-321.5, 188.5, 51, 1)
pt3dadd(-324, 190, 47, 1.2)
pt3dadd(-328.5, 191.5, 43, 1.2)
pt3dadd(-332.5, 194, 43, 1.1)
pt3dadd(-338, 196.5, 50, 0.9)
pt3dadd(-340.5, 198.5, 43, 1.1)
pt3dadd(-342, 202, 46.5, 0.9)
pt3dadd(-344, 204, 39.5, 0.9)
pt3dadd(-345, 205.5, 46.5, 1.4)
pt3dadd(-349, 206.5, 46.5, 1.1)
pt3dadd(-351.5, 208, 46.5, 0.9)
pt3dadd(-356, 209, 46.5, 0.9)
pt3dadd(-360.5, 212, 50, 0.7)
pt3dadd(-363, 213, 50, 0.7)
pt3dadd(-366.5, 215, 50, 0.7)
pt3dadd(-368.5, 217, 50, 0.7)
pt3dadd(-369, 219, 50, 0.7)
pt3dadd(-369.5, 220.5, 46.5, 0.7)
pt3dadd(-372, 224, 46.5, 0.7)
pt3dadd(-373, 225, 46.5, 0.9)
pt3dadd(-374.5, 227, 50, 0.9)
pt3dadd(-375.5, 229.5, 50, 0.9)
pt3dadd(-376, 232.5, 53.5, 0.6)
pt3dadd(-376, 234, 46.5, 0.6)
pt3dadd(-379, 236.5, 46.5, 0.6)
pt3dadd(-381, 237.5, 46.5, 0.6)
pt3dadd(-381.5, 238, 46.5, 1)
pt3dadd(-383.5, 239, 43, 1)
pt3dadd(-383.5, 241, 46.5, 0.8)
pt3dadd(-384.5, 242.5, 43, 0.4)
pt3dadd(-386.5, 246, 46.5, 0.4)
pt3dadd(-388, 248, 46.5, 0.6)
pt3dadd(-390, 249.5, 43, 0.6)
pt3dadd(-393.5, 252.5, 46.5, 0.9)
pt3dadd(-395, 254, 43, 0.9)
pt3dadd(-397, 255.5, 46.5, 0.9)
pt3dadd(-398, 256.5, 46.5, 0.9)
pt3dadd(-399, 258, 46.5, 0.9)
pt3dadd(-399.5, 259.5, 46.5, 0.4)
pt3dadd(-401, 261, 46.5, 0.4)
pt3dadd(-402, 264, 36, 0.6)
pt3dadd(-404.5, 265.5, 46.5, 0.7)
pt3dadd(-407.5, 267.5, 43, 0.7)
pt3dadd(-408.5, 268.5, 43, 0.7)
pt3dadd(-410.5, 270, 39.5, 0.7)
}
dend[19] {pt3dclear()
pt3dadd(-101, 53.5, 43, 3.5)
pt3dadd(-100, 54.5, 54.5, 2.6)
pt3dadd(-100, 56, 54.5, 2.6)
pt3dadd(-101, 57, 54.5, 2.3)
pt3dadd(-104, 57.5, 62.5, 2.5)
pt3dadd(-106, 59.5, 58.5, 2.5)
pt3dadd(-107, 60.5, 62.5, 2.6)
pt3dadd(-106.5, 59, 70, 2.6)
pt3dadd(-107, 56, 70, 2.6)
pt3dadd(-109, 56, 66, 2.6)
pt3dadd(-109.5, 57, 66, 2.6)
pt3dadd(-114, 57.5, 66, 2.7)
pt3dadd(-114.5, 58, 77.5, 2.9)
pt3dadd(-113, 64, 81.5, 2.9)
pt3dadd(-113, 65.5, 77.5, 2.9)
pt3dadd(-115, 63.5, 77.5, 1.2)
pt3dadd(-117, 61.5, 77.5, 1.2)
pt3dadd(-119, 61.5, 81, 1.5)
pt3dadd(-120, 59, 77.5, 1.5)
pt3dadd(-120, 57, 77.5, 0.9)
pt3dadd(-121, 61, 74.5, 1.1)
pt3dadd(-120.5, 62, 74.5, 1.1)
pt3dadd(-122, 63.5, 77.5, 2)
pt3dadd(-124.5, 68, 81, 2.5)
pt3dadd(-125, 69.5, 81, 2)
pt3dadd(-128.5, 72.5, 84, 2.4)
pt3dadd(-131, 73, 87, 1.6)
pt3dadd(-133, 73, 90, 1.6)
pt3dadd(-134.5, 72, 90, 1.6)
pt3dadd(-134, 74.5, 87, 1.7)
pt3dadd(-134.5, 76.5, 87, 1.9)
pt3dadd(-136.5, 78, 93.5, 1.6)
pt3dadd(-138, 79.5, 93.5, 1.9)
pt3dadd(-140, 80.5, 93.5, 1.9)
pt3dadd(-141.5, 79, 96.5, 1.6)
pt3dadd(-143.5, 79.5, 96.5, 2)
pt3dadd(-145.5, 80.5, 96.5, 2)
pt3dadd(-150.5, 84, 99.5, 2)
pt3dadd(-152, 85.5, 96.5, 1.7)
pt3dadd(-154, 86, 96.5, 2.2)
pt3dadd(-156, 86, 99.5, 2.3)
pt3dadd(-157, 86, 102.5, 2)
pt3dadd(-159, 86, 102.5, 1.8)
pt3dadd(-161, 86, 102.5, 1.8)
pt3dadd(-163, 86.5, 99.5, 1.7)
pt3dadd(-164.5, 88, 99.5, 1.7)
pt3dadd(-166.5, 88.5, 106, 1.6)
pt3dadd(-170.5, 88.5, 102.5, 3)
pt3dadd(-173, 90, 106, 3.7)
pt3dadd(-181, 90, 109.5, 2.1)
pt3dadd(-183.5, 90, 112.5, 1.6)
pt3dadd(-186, 90.5, 112.5, 1.3)
pt3dadd(-187.5, 91, 112.5, 1)
pt3dadd(-190, 92, 112.5, 1)
pt3dadd(-193, 92, 112.5, 1.3)
pt3dadd(-195, 91.5, 109.5, 1.4)
pt3dadd(-198.5, 91.5, 109.5, 1.6)
pt3dadd(-200.5, 91.5, 109.5, 2.1)
pt3dadd(-203, 92, 109.5, 1.9)
pt3dadd(-207, 94, 112.5, 1.9)
pt3dadd(-208.5, 94, 112.5, 1.3)
pt3dadd(-211.5, 94, 112.5, 1.2)
pt3dadd(-214, 94, 116, 1.8)
pt3dadd(-217, 94, 116, 1.8)
pt3dadd(-219.5, 94, 116, 2)
pt3dadd(-220.5, 94, 112.5, 1.7)
pt3dadd(-221.5, 95, 119.5, 1.8)
pt3dadd(-223.5, 95, 119.5, 1.4)
pt3dadd(-227.5, 95, 116, 1.7)
pt3dadd(-229.5, 96.5, 116, 1.7)
pt3dadd(-232.5, 95.5, 116, 1.3)
pt3dadd(-234, 96, 116, 1.4)
pt3dadd(-235.5, 98.5, 116, 1.6)
pt3dadd(-237, 99.5, 122.5, 1.4)
pt3dadd(-238.5, 100, 122.5, 1.4)
pt3dadd(-241.5, 101.5, 122.5, 1.4)
pt3dadd(-245, 102, 132.5, 1.4)
pt3dadd(-248.5, 102, 129.5, 1.6)
pt3dadd(-254, 103.5, 129.5, 1.6)
pt3dadd(-256.5, 104, 129.5, 1.6)
pt3dadd(-258, 105.5, 129.5, 1.9)
pt3dadd(-261, 105.5, 129.5, 1.6)
pt3dadd(-264, 105.5, 126, 1.6)
pt3dadd(-265.5, 105, 129.5, 1.6)
pt3dadd(-268, 105, 129.5, 1.6)
pt3dadd(-270, 103.5, 132.5, 1.8)
pt3dadd(-272, 102.5, 136, 1.8)
pt3dadd(-273.5, 103, 132.5, 1.8)
pt3dadd(-275, 104.5, 132.5, 1.8)
}
}
proc shape3d_9() {
dend[19] { pt3dadd(-277, 104.5, 142.5, 2.5)
pt3dadd(-279, 104.5, 146, 2.5)
pt3dadd(-281, 104.5, 136, 2.6)
pt3dadd(-283.5, 104.5, 142.5, 2.6)
pt3dadd(-287, 102.5, 139.5, 1.1)
pt3dadd(-290, 101, 142.5, 1.1)
pt3dadd(-292.5, 99, 146, 1.1)
pt3dadd(-294, 99.5, 146, 1.1)
pt3dadd(-294.5, 100.5, 149.5, 1.1)
pt3dadd(-295, 103, 149.5, 1.1)
pt3dadd(-296, 101.5, 152.5, 1.1)
pt3dadd(-297.5, 102.5, 152.5, 0.9)
pt3dadd(-298.5, 103.5, 152.5, 0.7)
pt3dadd(-299.5, 104, 152.5, 0.7)
pt3dadd(-302, 106, 152.5, 1.2)
pt3dadd(-303.5, 109, 152.5, 1.6)
pt3dadd(-304, 113, 162.5, 1.3)
pt3dadd(-307, 114.5, 162.5, 1.4)
pt3dadd(-308.5, 115, 169.5, 1.4)
pt3dadd(-310, 117, 169.5, 1.4)
pt3dadd(-310, 118.5, 169.5, 1.4)
pt3dadd(-311, 121.5, 162.5, 1.4)
pt3dadd(-313.5, 124, 166, 1.6)
pt3dadd(-315.5, 125.5, 169.5, 1.7)
pt3dadd(-316.5, 127, 169.5, 1.7)
pt3dadd(-318.5, 128, 176, 1.6)
pt3dadd(-322, 129.5, 176, 1.6)
pt3dadd(-323, 132.5, 176, 1.6)
pt3dadd(-323.5, 134.5, 166, 1.6)
pt3dadd(-326, 136.5, 166, 2.2)
pt3dadd(-327.5, 136.5, 166, 2)
pt3dadd(-330, 136.5, 166, 1.9)
pt3dadd(-330.5, 140.5, 175, 2.4)
pt3dadd(-330.5, 142, 175, 2)
pt3dadd(-332, 143, 175, 1.9)
pt3dadd(-330, 144.5, 188.5, 2.3)
pt3dadd(-332, 147.5, 179.5, 1.7)
pt3dadd(-332, 149.5, 184, 1.7)
pt3dadd(-332, 151, 184, 1.7)
pt3dadd(-336.5, 154, 184, 1.5)
pt3dadd(-337, 157, 184, 1.5)
pt3dadd(-337.5, 158, 184, 1.5)
pt3dadd(-340.5, 159, 184, 1.5)
pt3dadd(-342, 161.5, 197.5, 1.7)
pt3dadd(-343.5, 164, 193, 1.8)
pt3dadd(-345.5, 168, 193, 1.6)
pt3dadd(-345, 170.5, 193, 1.8)
pt3dadd(-347, 170.5, 193, 1.8)
pt3dadd(-349.5, 171.5, 193, 1.8)
pt3dadd(-352, 173.5, 193, 1.8)
pt3dadd(-353.5, 175.5, 193, 1.8)
pt3dadd(-355, 177, 193, 1.8)
pt3dadd(-357, 178.5, 193, 1.8)
pt3dadd(-357.5, 181, 193, 1.5)
pt3dadd(-359, 181, 202, 1.2)
pt3dadd(-360.5, 181, 202, 1.4)
pt3dadd(-360.5, 183.5, 202, 1.5)
pt3dadd(-360.5, 185, 202, 1.7)
pt3dadd(-361.5, 185.5, 207, 1.7)
pt3dadd(-363, 185.5, 207, 1.7)
pt3dadd(-364, 187, 207, 1.3)
pt3dadd(-365, 188.5, 202, 1.2)
}
dend[20] {pt3dclear()
pt3dadd(-72, 38.5, 36.5, 7.3)
pt3dadd(-78, 38.5, 33, 5.4)
pt3dadd(-85, 37, 36.5, 5.4)
pt3dadd(-92.5, 35, 33, 5.4)
pt3dadd(-96.5, 33.5, 36.5, 5.3)
pt3dadd(-101, 33, 43.5, 5.2)
pt3dadd(-103, 33, 43.5, 4.5)
}
dend[21] {pt3dclear()
pt3dadd(-103, 33, 43.5, 4.5)
pt3dadd(-110, 32.5, 43.5, 1.4)
pt3dadd(-111, 31, 39.5, 1.4)
pt3dadd(-113.5, 31, 39.5, 1.6)
pt3dadd(-115.5, 31, 51, 1.4)
pt3dadd(-117.5, 31, 51, 1.4)
pt3dadd(-119, 31, 51, 1.5)
pt3dadd(-122.5, 28, 43.5, 1.8)
pt3dadd(-124.5, 27, 51, 1.8)
pt3dadd(-126.5, 25, 51, 1.5)
pt3dadd(-130, 22.5, 51, 1.4)
pt3dadd(-133, 22.5, 51, 1.4)
pt3dadd(-138.5, 20.5, 51, 1.4)
pt3dadd(-141.5, 18.5, 55, 1.2)
pt3dadd(-147.5, 16, 55, 1.2)
pt3dadd(-150.5, 13, 51, 1.6)
pt3dadd(-155, 11, 51, 1.4)
pt3dadd(-158.5, 10, 51, 1.4)
pt3dadd(-162, 7.5, 55, 1.4)
pt3dadd(-168, 7, 55, 1.1)
pt3dadd(-170, 5.5, 55, 1.2)
pt3dadd(-173, 4, 55, 1.2)
pt3dadd(-174.5, 2.5, 55, 1.2)
pt3dadd(-177, 0, 55, 1.4)
pt3dadd(-179, -3, 62.5, 1.3)
pt3dadd(-180.5, -3.5, 62.5, 1.3)
pt3dadd(-186.5, -6.5, 62.5, 1.4)
pt3dadd(-190, -8.5, 62.5, 1.4)
pt3dadd(-191.5, -10.5, 62.5, 1.4)
pt3dadd(-194.5, -10.5, 62.5, 1.4)
pt3dadd(-196.5, -10.5, 62.5, 1.4)
pt3dadd(-198.5, -12, 62.5, 1.2)
pt3dadd(-202, -12, 62.5, 1.2)
pt3dadd(-204, -12, 62.5, 1.4)
pt3dadd(-205.5, -13.5, 62.5, 1.5)
pt3dadd(-207, -14, 70, 1.5)
pt3dadd(-208.5, -15.5, 70, 1.2)
pt3dadd(-212.5, -17.5, 70, 1.3)
pt3dadd(-215, -18, 62.5, 1.3)
pt3dadd(-218.5, -23, 62.5, 0.9)
pt3dadd(-220.5, -26, 62.5, 1.2)
pt3dadd(-223.5, -27, 62.5, 1.4)
pt3dadd(-228, -28, 62.5, 1.4)
pt3dadd(-230, -30, 62.5, 1.2)
pt3dadd(-232, -33.5, 66.5, 0.9)
pt3dadd(-234, -38.5, 66.5, 1.1)
pt3dadd(-235.5, -39, 66.5, 1.1)
pt3dadd(-238.5, -40.5, 66.5, 1.3)
pt3dadd(-241, -43.5, 66.5, 1.3)
pt3dadd(-242, -45, 66.5, 1.3)
pt3dadd(-242.5, -48, 66.5, 1.3)
pt3dadd(-244.5, -48.5, 66.5, 1.1)
pt3dadd(-247.5, -50.5, 66.5, 1.2)
pt3dadd(-250, -51.5, 66.5, 1.2)
pt3dadd(-253.5, -54, 66.5, 1.4)
pt3dadd(-258, -57.5, 66.5, 1.6)
pt3dadd(-259.5, -59.5, 66.5, 1.6)
pt3dadd(-261, -62, 62.5, 1.2)
pt3dadd(-262, -64, 74, 1.2)
pt3dadd(-264, -67.5, 70, 1.2)
pt3dadd(-262, -69, 70, 1.6)
pt3dadd(-261, -70.5, 70, 1.6)
pt3dadd(-261, -71.5, 70, 1.6)
pt3dadd(-263, -72.5, 76.5, 1.3)
pt3dadd(-264, -73.5, 76.5, 1.4)
pt3dadd(-264.5, -74.5, 73.5, 1.9)
pt3dadd(-266, -76, 73.5, 1.9)
pt3dadd(-269.5, -78, 76.5, 1.4)
pt3dadd(-271.5, -79.5, 76.5, 1.2)
pt3dadd(-274.5, -80.5, 76.5, 1.5)
pt3dadd(-276.5, -81, 76.5, 1.1)
pt3dadd(-278.5, -81, 76.5, 1.2)
pt3dadd(-283.5, -84, 76.5, 1.6)
pt3dadd(-287.5, -85, 79.5, 1.6)
pt3dadd(-288.5, -86, 79.5, 1.3)
pt3dadd(-289.5, -87, 79.5, 1.1)
pt3dadd(-291, -89, 79.5, 1.3)
pt3dadd(-294.5, -91.5, 79.5, 1.4)
pt3dadd(-296, -91.5, 79.5, 1.9)
pt3dadd(-298, -91.5, 79.5, 2)
pt3dadd(-302.5, -91, 79.5, 1.5)
pt3dadd(-304.5, -91, 79.5, 1.6)
pt3dadd(-309, -92.5, 86, 2.2)
pt3dadd(-310.5, -94, 86, 1.8)
pt3dadd(-312.5, -94, 82.5, 1.8)
pt3dadd(-314, -95.5, 86, 1.8)
pt3dadd(-316.5, -97.5, 86, 1.7)
pt3dadd(-319.5, -97.5, 86, 1.6)
pt3dadd(-321, -97.5, 89, 1.5)
pt3dadd(-324.5, -101, 95, 1.6)
pt3dadd(-328, -102, 92, 1.6)
pt3dadd(-330.5, -102, 92, 2)
pt3dadd(-333, -102.5, 92, 1.4)
pt3dadd(-334.5, -103.5, 92, 1.4)
pt3dadd(-336.5, -105, 92, 1.4)
pt3dadd(-340, -105, 92, 1.1)
pt3dadd(-342, -105, 92, 1.1)
pt3dadd(-344, -106, 92, 1.1)
pt3dadd(-346.5, -106, 92, 1.1)
pt3dadd(-347, -107.5, 92, 0.7)
pt3dadd(-348, -109, 92, 1.1)
pt3dadd(-351.5, -107.5, 95, 1.6)
pt3dadd(-351.5, -107.5, 92, 1.6)
pt3dadd(-353, -110, 92, 1.6)
pt3dadd(-354, -111, 92, 1.6)
pt3dadd(-356.5, -112, 92, 1.6)
pt3dadd(-359.5, -112, 92, 1.5)
pt3dadd(-361.5, -113, 92, 1.5)
pt3dadd(-363, -115, 92, 1.5)
pt3dadd(-364.5, -117, 95, 1.5)
pt3dadd(-366.5, -118, 95, 1.6)
pt3dadd(-369, -120.5, 98.5, 1.8)
pt3dadd(-371, -122, 98.5, 1.2)
pt3dadd(-372, -126.5, 98.5, 1.2)
pt3dadd(-374, -126.5, 98.5, 1.1)
pt3dadd(-376, -127.5, 105, 1.2)
pt3dadd(-376.5, -129.5, 105, 1.4)
pt3dadd(-376.5, -130.5, 105, 1.2)
pt3dadd(-378, -131, 108.5, 0.8)
pt3dadd(-379, -131, 108.5, 0.6)
pt3dadd(-380.5, -132.5, 108.5, 0.6)
pt3dadd(-382, -133, 108.5, 0.6)
pt3dadd(-383, -133.5, 108.5, 0.8)
pt3dadd(-385, -135.5, 108.5, 0.8)
pt3dadd(-387, -137, 108.5, 0.9)
pt3dadd(-389, -137, 112, 0.9)
pt3dadd(-391.5, -137, 112, 0.9)
pt3dadd(-393, -137, 112, 0.9)
pt3dadd(-394.5, -138.5, 108.5, 0.9)
pt3dadd(-396, -138.5, 108.5, 0.9)
pt3dadd(-400.5, -139, 108.5, 0.9)
}
}
proc shape3d_10() {
dend[21] { pt3dadd(-403, -140, 108.5, 0.7)
pt3dadd(-405.5, -140, 108.5, 0.7)
pt3dadd(-406.5, -140, 108.5, 0.7)
pt3dadd(-409, -140.5, 112, 0.7)
pt3dadd(-409.5, -142.5, 112, 0.9)
pt3dadd(-413, -145.5, 112, 1)
pt3dadd(-414.5, -146, 112, 0.9)
pt3dadd(-417.5, -147, 112, 0.7)
pt3dadd(-420.5, -149.5, 115, 0.7)
pt3dadd(-420.5, -148, 118.5, 1.1)
pt3dadd(-422, -150, 122, 0.7)
pt3dadd(-423.5, -151, 125, 1)
pt3dadd(-427, -151, 132, 1.5)
pt3dadd(-429.5, -151, 122, 1.4)
pt3dadd(-432, -151, 128.5, 1.4)
pt3dadd(-433.5, -153, 132, 2)
pt3dadd(-436, -154, 132, 1.5)
pt3dadd(-440, -155, 132, 1)
pt3dadd(-445, -158.5, 128.5, 1.2)
pt3dadd(-447.5, -160.5, 132, 1.2)
pt3dadd(-448.5, -163, 128.5, 1.2)
pt3dadd(-450.5, -163, 132, 0.7)
pt3dadd(-452.5, -163, 132, 0.7)
pt3dadd(-455.5, -164, 132, 0.7)
pt3dadd(-457, -165, 132, 0.7)
pt3dadd(-457, -166.5, 132, 0.7)
pt3dadd(-458.5, -168.5, 135, 0.8)
pt3dadd(-460.5, -169, 135, 1.2)
pt3dadd(-464.5, -173.5, 132, 1.1)
pt3dadd(-467, -175, 135, 0.7)
pt3dadd(-471.5, -177.5, 135, 0.9)
pt3dadd(-474, -178.5, 135, 0.7)
pt3dadd(-476, -179, 135, 0.6)
pt3dadd(-477.5, -180.5, 135, 0.6)
pt3dadd(-479.5, -181.5, 135, 0.6)
pt3dadd(-479.5, -182.5, 138.5, 0.7)
pt3dadd(-479.5, -183.5, 138.5, 0.7)
pt3dadd(-482, -184.5, 138.5, 0.7)
pt3dadd(-484, -185.5, 138.5, 0.8)
pt3dadd(-485, -186.5, 138.5, 0.8)
pt3dadd(-486, -188, 138.5, 1.1)
pt3dadd(-487.5, -189, 138.5, 1.1)
pt3dadd(-489, -191.5, 142, 1.1)
pt3dadd(-489.5, -193, 138.5, 1.1)
pt3dadd(-490, -195.5, 132, 1)
pt3dadd(-490.5, -196, 132, 0.7)
pt3dadd(-491, -197.5, 135, 0.7)
pt3dadd(-489, -198, 135, 0.7)
pt3dadd(-487.5, -198, 135, 0.9)
pt3dadd(-487.5, -200, 135, 0.6)
pt3dadd(-486, -201.5, 135, 0.7)
pt3dadd(-484.5, -201.5, 138.5, 0.8)
pt3dadd(-483.5, -201.5, 138.5, 0.7)
pt3dadd(-487, -201.5, 145, 1.4)
pt3dadd(-489, -202, 145, 1.1)
pt3dadd(-494, -204, 151.5, 1.5)
pt3dadd(-498, -204, 151.5, 1.5)
pt3dadd(-501, -204, 151.5, 1.2)
pt3dadd(-504.5, -204, 155, 1.2)
pt3dadd(-508, -204, 161.5, 1.2)
pt3dadd(-510.5, -206, 161.5, 1.2)
pt3dadd(-517.5, -208.5, 161.5, 1.2)
pt3dadd(-520, -210, 161.5, 0.6)
pt3dadd(-522, -211, 161.5, 0.6)
pt3dadd(-524.5, -212, 161.5, 0.6)
pt3dadd(-527, -213.5, 161.5, 0.6)
pt3dadd(-529.5, -215, 161.5, 0.3)
pt3dadd(-533, -215.5, 161.5, 0.3)
pt3dadd(-535.5, -217.5, 161.5, 0.3)
pt3dadd(-535.5, -219.5, 161.5, 0.5)
pt3dadd(-535.5, -221.5, 161.5, 0.6)
pt3dadd(-537.5, -223, 161.5, 0.7)
pt3dadd(-538.5, -224.5, 168.5, 0.7)
pt3dadd(-537.5, -226, 168.5, 0.7)
pt3dadd(-538, -227.5, 168.5, 0.7)
pt3dadd(-539.5, -229, 168.5, 0.7)
pt3dadd(-541, -230.5, 168.5, 0.7)
pt3dadd(-541, -232.5, 168.5, 0.8)
pt3dadd(-542.5, -234, 168.5, 0.6)
pt3dadd(-544.5, -234, 168.5, 0.6)
pt3dadd(-546.5, -236, 171.5, 0.6)
pt3dadd(-548, -238, 178.5, 0.1)
pt3dadd(-551.5, -240.5, 178.5, 0.1)
pt3dadd(-554, -242, 168.5, 0.1)
pt3dadd(-556.5, -243.5, 168.5, 0.1)
pt3dadd(-558.5, -246.5, 168.5, 0.1)
pt3dadd(-561.5, -248.5, 171.5, 0.1)
}
dend[22] {pt3dclear()
pt3dadd(-103, 33, 43.5, 4.5)
pt3dadd(-108.5, 33.5, 43.5, 4.9)
pt3dadd(-118.5, 34.5, 51, 6.6)
}
dend[23] {pt3dclear()
pt3dadd(-118.5, 34.5, 51, 6.6)
pt3dadd(-119.5, 33, 43.5, 2.4)
pt3dadd(-119.5, 30, 47, 2.4)
pt3dadd(-123, 31.5, 43.5, 2.4)
pt3dadd(-127.5, 29.5, 43.5, 2)
pt3dadd(-134.5, 26, 39.5, 2.1)
pt3dadd(-139, 25.5, 39.5, 2.3)
pt3dadd(-143, 25, 39.5, 1.6)
pt3dadd(-147, 23.5, 39.5, 1.6)
pt3dadd(-152.5, 21.5, 47, 1.8)
pt3dadd(-156, 21.5, 47, 2.1)
pt3dadd(-160, 21, 47, 2.2)
pt3dadd(-166, 17.5, 55, 1.6)
pt3dadd(-170, 16.5, 55, 2)
pt3dadd(-173, 15, 55, 2)
pt3dadd(-175, 13.5, 55, 2)
pt3dadd(-179.5, 12.5, 55, 2.2)
pt3dadd(-182.5, 11, 55, 2.1)
pt3dadd(-186, 9, 55, 1.9)
pt3dadd(-189, 7.5, 62.5, 1.7)
pt3dadd(-191.5, 5.5, 62.5, 1.4)
pt3dadd(-194, 5.5, 58.5, 1.3)
pt3dadd(-198, 5.5, 58.5, 1.6)
pt3dadd(-200.5, 5.5, 58.5, 1.6)
pt3dadd(-203.5, 4, 66.5, 2.5)
pt3dadd(-205.5, 2, 66.5, 2.3)
pt3dadd(-208.5, 2, 66.5, 2.3)
pt3dadd(-211.5, 0.5, 66.5, 2.3)
pt3dadd(-214.5, -0.5, 66.5, 2.3)
pt3dadd(-216.5, -1.5, 66.5, 2.3)
pt3dadd(-219, -2, 66.5, 2.3)
pt3dadd(-221, -2, 70, 1.8)
pt3dadd(-224, -2, 70, 1.6)
pt3dadd(-226.5, -3, 74, 1.9)
pt3dadd(-230.5, -3.5, 62.5, 2)
pt3dadd(-233, -4.5, 62.5, 2.1)
pt3dadd(-236, -4.5, 66.5, 2.3)
pt3dadd(-240, -5, 70, 2.3)
pt3dadd(-243.5, -5, 74, 2.5)
pt3dadd(-248.5, -6, 74, 1.9)
pt3dadd(-251.5, -6, 74, 1.8)
pt3dadd(-254.5, -6, 70, 1.8)
pt3dadd(-258, -6, 70, 1.8)
pt3dadd(-260.5, -6, 74, 1.8)
pt3dadd(-264, -6, 66.5, 2.2)
pt3dadd(-267.5, -6, 66.5, 2.2)
pt3dadd(-274, -7.5, 58.5, 1.9)
pt3dadd(-282, -9.5, 58.5, 1.9)
pt3dadd(-285, -9.5, 58.5, 1.6)
pt3dadd(-288, -9.5, 58.5, 1.8)
pt3dadd(-291.5, -9.5, 62.5, 1.8)
pt3dadd(-297.5, -9.5, 62.5, 1.8)
pt3dadd(-300.5, -9.5, 62.5, 2)
pt3dadd(-305, -8.5, 62.5, 1.8)
pt3dadd(-307, -8.5, 62.5, 2.1)
pt3dadd(-312.5, -9.5, 55, 1.5)
pt3dadd(-316, -8, 55, 1.5)
pt3dadd(-318, -6.5, 58.5, 1.5)
pt3dadd(-323, -5, 55, 1.7)
pt3dadd(-328, -5.5, 55, 1.4)
pt3dadd(-330.5, -6, 55, 1.4)
pt3dadd(-336, -8.5, 55, 1.3)
pt3dadd(-339.5, -10, 55, 1.1)
pt3dadd(-341.5, -10, 55, 1.1)
pt3dadd(-348.5, -11.5, 55, 1.3)
pt3dadd(-349.5, -12, 55, 1.3)
pt3dadd(-353.5, -12.5, 55, 1.1)
pt3dadd(-355.5, -14.5, 55, 1.1)
pt3dadd(-357, -15.5, 47, 1.4)
pt3dadd(-359.5, -16.5, 47, 1.6)
pt3dadd(-363.5, -16.5, 47, 2.1)
pt3dadd(-372, -19, 47, 1.7)
pt3dadd(-376, -20, 47, 1.7)
pt3dadd(-379, -21, 51, 1.8)
pt3dadd(-382.5, -22, 47, 1.8)
pt3dadd(-385.5, -23, 51, 2)
pt3dadd(-389, -23, 43.5, 2)
pt3dadd(-392.5, -23, 43.5, 2.2)
pt3dadd(-395.5, -24, 43.5, 2.2)
pt3dadd(-398.5, -25, 43.5, 2.2)
pt3dadd(-401, -28.5, 47, 2.1)
pt3dadd(-401, -30.5, 47, 1.8)
pt3dadd(-403.5, -33, 47, 2.3)
pt3dadd(-404.5, -31.5, 47, 1.8)
pt3dadd(-405.5, -34, 43, 1.7)
pt3dadd(-405.5, -37.5, 43, 1.9)
pt3dadd(-405.5, -39, 43, 1.9)
pt3dadd(-406.5, -41, 36, 1.9)
pt3dadd(-409.5, -41, 36, 1.9)
pt3dadd(-413.5, -44, 39.5, 2.1)
pt3dadd(-413.5, -46, 43, 2.2)
pt3dadd(-415.5, -46, 43, 2.2)
pt3dadd(-416, -46, 43, 0.9)
pt3dadd(-417, -44.5, 43, 0.9)
pt3dadd(-417, -43, 43, 1)
pt3dadd(-419, -42, 36, 1.7)
pt3dadd(-421.5, -43.5, 36, 1.2)
pt3dadd(-423, -44.5, 32.5, 0.8)
pt3dadd(-425, -46, 32.5, 0.9)
pt3dadd(-426.5, -46, 32.5, 1.2)
pt3dadd(-427.5, -45.5, 32.5, 1.2)
pt3dadd(-428, -47.5, 32.5, 1.2)
pt3dadd(-429, -47.5, 25.5, 1)
pt3dadd(-431.5, -49, 32.5, 1.2)
pt3dadd(-432, -47, 25.5, 1.4)
pt3dadd(-433.5, -47, 25.5, 1.4)
pt3dadd(-436, -49, 18, 1.1)
pt3dadd(-439.5, -48.5, 22, 1.4)
pt3dadd(-440, -49.5, 18, 0.7)
pt3dadd(-443, -50, 18, 0.7)
}
}
proc shape3d_11() {
dend[23] { pt3dadd(-444.5, -51, 18, 0.9)
pt3dadd(-446.5, -51, 18, 0.9)
pt3dadd(-450, -55, 18, 1.3)
pt3dadd(-450.5, -56, 18, 1.3)
pt3dadd(-451, -56.5, 18, 0.9)
pt3dadd(-454, -56.5, 18, 0.9)
pt3dadd(-455.5, -56.5, 21.5, 1.3)
pt3dadd(-456.5, -57.5, 21.5, 1.1)
pt3dadd(-457.5, -57.5, 14.5, 1.3)
pt3dadd(-458, -57.5, 14.5, 1.2)
pt3dadd(-459.5, -59, 14.5, 0.8)
pt3dadd(-460, -59.5, 18, 0.7)
pt3dadd(-460.5, -61, 18, 0.8)
pt3dadd(-462.5, -62.5, 24.5, 0.9)
pt3dadd(-464, -63, 18, 1)
pt3dadd(-465, -64.5, 18, 1)
pt3dadd(-466, -65.5, 18, 0.8)
pt3dadd(-467, -66, 18, 0.7)
pt3dadd(-468, -67, 14.5, 0.9)
pt3dadd(-470, -68.5, 18, 0.4)
pt3dadd(-471.5, -69, 11.5, 0.4)
pt3dadd(-473, -70, 11.5, 0.7)
pt3dadd(-474.5, -70.5, 11.5, 0.7)
pt3dadd(-476.5, -71, 11.5, 0.7)
pt3dadd(-477, -72, 11.5, 0.7)
pt3dadd(-477, -73, 11.5, 0.9)
pt3dadd(-479.5, -74, 14.5, 0.5)
pt3dadd(-480.5, -75, 14.5, 0.6)
pt3dadd(-481, -76, 11.5, 0.8)
pt3dadd(-482.5, -77.5, 11.5, 0.9)
pt3dadd(-484, -79.5, 8, 0.9)
pt3dadd(-485, -79.5, 8, 0.8)
pt3dadd(-486.5, -80.5, 11.5, 0.9)
pt3dadd(-487, -82, 8, 1.1)
pt3dadd(-486.5, -82.5, 8, 0.9)
pt3dadd(-485.5, -82.5, 8, 0.8)
pt3dadd(-484, -82.5, 8, 1)
pt3dadd(-485.5, -83, 11.5, 0.8)
pt3dadd(-484, -83.5, 5, 1.5)
pt3dadd(-484, -85, 8, 1.1)
pt3dadd(-484, -86, 1.5, 1.1)
pt3dadd(-486, -86.5, 1.5, 1.2)
pt3dadd(-487, -88, 1.5, 1.4)
pt3dadd(-489.5, -88.5, 1.5, 1.4)
pt3dadd(-490, -90.5, 1.5, 1.6)
pt3dadd(-490, -92, 1.5, 1.1)
pt3dadd(-491, -93, 1.5, 1.1)
pt3dadd(-491.5, -94.5, 1.5, 1.1)
pt3dadd(-492.5, -95.5, 1.5, 1.1)
pt3dadd(-493, -97, 1.5, 0.9)
pt3dadd(-495, -98, 1.5, 0.9)
pt3dadd(-498, -100.5, -2.5, 0.9)
pt3dadd(-500, -102, 1.5, 1.3)
pt3dadd(-505, -101.5, 1.5, 1.1)
pt3dadd(-506.5, -101.5, 1.5, 1)
pt3dadd(-509.5, -101.5, 1.5, 1)
pt3dadd(-512, -102, 1.5, 0.9)
pt3dadd(-515, -103.5, -2.5, 1.1)
pt3dadd(-517, -104, -6.5, 1)
pt3dadd(-520, -105.5, 1.5, 1)
pt3dadd(-522, -106, 1.5, 1.1)
pt3dadd(-527, -108, -2.5, 1.1)
pt3dadd(-530, -108, 1.5, 0.9)
pt3dadd(-532, -109.5, -2.5, 1.1)
pt3dadd(-534, -111.5, -2.5, 1.1)
pt3dadd(-536, -112.5, -2.5, 1.1)
pt3dadd(-536.5, -113.5, -2.5, 0.9)
pt3dadd(-538, -114, -2.5, 0.7)
pt3dadd(-538, -116, -2.5, 0.7)
pt3dadd(-539.5, -116.5, -2.5, 0.7)
pt3dadd(-542.5, -117.5, 1.5, 0.7)
pt3dadd(-543.5, -118.5, 1.5, 0.7)
pt3dadd(-545, -120, -2.5, 0.7)
pt3dadd(-545.5, -121.5, -2.5, 0.7)
pt3dadd(-547, -123, -2.5, 0.7)
pt3dadd(-549, -124.5, -2.5, 0.7)
pt3dadd(-551, -127.5, -11, 0.7)
pt3dadd(-553, -128.5, -11, 0.7)
pt3dadd(-555, -130.5, -11, 0.7)
pt3dadd(-556.5, -132.5, -11, 0.9)
pt3dadd(-557.5, -133.5, -19, 0.9)
pt3dadd(-559, -135.5, -15, 0.9)
pt3dadd(-564.5, -139.5, -15, 0.9)
pt3dadd(-567.5, -140, -15, 1)
pt3dadd(-569.5, -141.5, -15, 1.2)
pt3dadd(-570, -143, -15, 0.9)
pt3dadd(-572, -144, -15, 0.7)
pt3dadd(-574.5, -144, -15, 0.9)
pt3dadd(-576.5, -144, -15, 0.9)
pt3dadd(-578, -145, -15, 0.8)
pt3dadd(-583, -148, -15, 0.8)
pt3dadd(-583, -149.5, -15, 0.8)
pt3dadd(-587, -153.5, -15, 1.1)
pt3dadd(-590.5, -154, -15, 1.3)
pt3dadd(-592.5, -155, -15, 1.3)
pt3dadd(-597, -159, -15, 0.9)
pt3dadd(-599, -161, -15, 0.9)
pt3dadd(-602, -163, -19, 0.9)
pt3dadd(-606.5, -164.5, -19, 0.9)
pt3dadd(-608.5, -166, -23.5, 0.9)
pt3dadd(-609, -168, -27.5, 0.9)
pt3dadd(-610.5, -170, -31.5, 0.9)
pt3dadd(-611.5, -171.5, -27.5, 0.7)
pt3dadd(-612, -172.5, -27.5, 0.7)
pt3dadd(-612, -174, -23.5, 0.7)
pt3dadd(-612.5, -175.5, -27.5, 0.7)
pt3dadd(-613, -178, -36, 1.1)
pt3dadd(-615.5, -178.5, -36, 1.3)
pt3dadd(-618, -179, -36, 1.3)
pt3dadd(-620.5, -179.5, -36, 0.8)
pt3dadd(-622, -181.5, -36, 0.9)
pt3dadd(-624, -183, -36, 1.3)
pt3dadd(-629.5, -184, -36, 1.4)
pt3dadd(-632.5, -184, -43.5, 1.4)
pt3dadd(-634, -184, -43.5, 1.2)
pt3dadd(-635, -185.5, -43.5, 0.9)
pt3dadd(-636.5, -186.5, -43.5, 0.9)
pt3dadd(-638, -186.5, -43.5, 0.9)
pt3dadd(-640.5, -186.5, -43.5, 1.2)
pt3dadd(-642, -188, -43.5, 1.4)
pt3dadd(-644, -188.5, -43.5, 1.1)
pt3dadd(-646, -189, -40, 1.2)
pt3dadd(-650, -190.5, -43.5, 1.6)
pt3dadd(-651.5, -190.5, -47.5, 0.9)
pt3dadd(-654, -190.5, -47.5, 1.1)
pt3dadd(-656.5, -191.5, -47.5, 1.1)
pt3dadd(-658, -191.5, -47.5, 0.8)
pt3dadd(-660, -191.5, -47.5, 0.7)
pt3dadd(-664, -192.5, -43.5, 0.9)
pt3dadd(-665, -193.5, -43.5, 0.9)
pt3dadd(-667, -193.5, -43.5, 0.9)
pt3dadd(-669, -195.5, -43.5, 0.7)
pt3dadd(-672.5, -196.5, -40, 0.8)
pt3dadd(-674, -197.5, -47.5, 0.8)
pt3dadd(-675, -198.5, -47.5, 0.8)
pt3dadd(-676.5, -199.5, -47.5, 0.8)
pt3dadd(-677.5, -200, -47.5, 0.8)
pt3dadd(-679, -202, -47.5, 0.8)
pt3dadd(-680, -202, -47.5, 0.8)
pt3dadd(-681.5, -203, -47.5, 0.8)
pt3dadd(-684, -203.5, -47.5, 0.8)
pt3dadd(-686.5, -204.5, -47.5, 0.8)
pt3dadd(-688.5, -207.5, -66.5, 0.7)
pt3dadd(-690.5, -209.5, -63, 0.7)
}
dend[24] {pt3dclear()
pt3dadd(-118.5, 34.5, 51, 6.6)
pt3dadd(-123.5, 40, 43.5, 3.6)
pt3dadd(-128, 42, 43.5, 3.6)
pt3dadd(-130.5, 42, 47, 3.8)
pt3dadd(-137.5, 43.5, 51, 3.8)
pt3dadd(-141, 43, 47, 3.6)
pt3dadd(-146.5, 43, 47, 3.6)
pt3dadd(-151.5, 42.5, 47, 3.3)
pt3dadd(-156, 43.5, 51, 2.7)
pt3dadd(-159.5, 44, 55, 2.7)
pt3dadd(-166.5, 43, 58.5, 3)
pt3dadd(-170, 43, 58.5, 3)
pt3dadd(-173.5, 43, 58.5, 3.3)
pt3dadd(-177, 43, 58.5, 3.3)
pt3dadd(-181.5, 41.5, 66.5, 3.1)
pt3dadd(-185, 41.5, 62.5, 3.1)
pt3dadd(-190, 43, 66.5, 3.7)
pt3dadd(-193.5, 43, 66.5, 3.7)
pt3dadd(-196, 43, 66.5, 3.7)
pt3dadd(-198.5, 43, 58.5, 3.3)
pt3dadd(-202, 43, 66.5, 3)
pt3dadd(-204.5, 43, 66.5, 3.3)
pt3dadd(-208.5, 43, 66.5, 3.1)
pt3dadd(-211.5, 43, 70, 3.2)
pt3dadd(-214.5, 43, 66.5, 3.2)
pt3dadd(-217.5, 43, 66.5, 3.3)
pt3dadd(-220.5, 43, 66.5, 3.3)
pt3dadd(-223.5, 42, 66.5, 3.3)
pt3dadd(-227, 42, 66.5, 3.3)
pt3dadd(-231.5, 42, 70, 3.8)
pt3dadd(-235.5, 43.5, 70, 3.8)
pt3dadd(-238.5, 43.5, 70, 3.8)
pt3dadd(-242.5, 44, 70, 3.6)
pt3dadd(-245.5, 44, 70, 3.6)
pt3dadd(-247.5, 44.5, 66.5, 3.6)
pt3dadd(-250, 44.5, 70, 3.7)
pt3dadd(-254, 44, 70, 3)
pt3dadd(-256.5, 43, 70, 2.8)
pt3dadd(-259.5, 43, 74, 2.9)
pt3dadd(-261.5, 42.5, 70, 3.3)
pt3dadd(-262.5, 43.5, 70, 3.3)
pt3dadd(-265, 43.5, 70, 2.5)
pt3dadd(-268.5, 43.5, 66.5, 1.9)
pt3dadd(-274, 42, 66.5, 3.6)
pt3dadd(-277.5, 42, 63, 3.7)
pt3dadd(-283, 41.5, 69.5, 3.7)
pt3dadd(-286.5, 40, 66.5, 4.2)
pt3dadd(-294.5, 39, 69.5, 4)
pt3dadd(-298, 38.5, 69.5, 3.8)
pt3dadd(-302.5, 37, 66.5, 3.8)
pt3dadd(-307, 37, 66.5, 3.6)
pt3dadd(-310.5, 36, 69.5, 3.3)
pt3dadd(-317, 34.5, 66.5, 3.6)
pt3dadd(-319.5, 34.5, 72.5, 3.1)
pt3dadd(-322, 35, 72.5, 3.1)
pt3dadd(-323.5, 36, 72.5, 3.6)
}
}
proc shape3d_12() {
dend[24] { pt3dadd(-327, 36, 72.5, 3.3)
pt3dadd(-330.5, 36.5, 69.5, 3.1)
pt3dadd(-334.5, 37, 79, 3.1)
pt3dadd(-338.5, 38, 79, 2.8)
pt3dadd(-342, 39.5, 79, 3.3)
pt3dadd(-345, 39.5, 79, 3.2)
pt3dadd(-348, 39.5, 79, 3.3)
pt3dadd(-350.5, 39.5, 79, 3.3)
pt3dadd(-357, 38, 79, 3.3)
pt3dadd(-359, 38, 79, 3.3)
pt3dadd(-362, 38, 79, 2.9)
pt3dadd(-365, 38, 79, 2.9)
pt3dadd(-367.5, 38, 79, 2.9)
pt3dadd(-370, 39, 79, 3.4)
pt3dadd(-373, 39, 75.5, 3.4)
pt3dadd(-375, 39, 75.5, 3.2)
pt3dadd(-377.5, 39, 75.5, 3.3)
pt3dadd(-381.5, 41, 75.5, 3.5)
pt3dadd(-391, 42.5, 82, 3.5)
pt3dadd(-394, 43, 82, 3.5)
pt3dadd(-397, 43, 82, 3.4)
pt3dadd(-400, 43, 82, 3.4)
pt3dadd(-402, 44.5, 82, 3.2)
pt3dadd(-405, 47, 79, 3.2)
pt3dadd(-407, 48, 79, 3.2)
pt3dadd(-411, 52.5, 75.5, 3.2)
pt3dadd(-412.5, 54.5, 79, 3.2)
pt3dadd(-415.5, 56, 75.5, 3.2)
pt3dadd(-419.5, 59, 75.5, 3.6)
pt3dadd(-422.5, 60.5, 79, 6)
}
dend[25] {pt3dclear()
pt3dadd(-422.5, 60.5, 79, 6)
pt3dadd(-425, 63, 82, 4.3)
pt3dadd(-426.5, 65.5, 82, 3.4)
pt3dadd(-427.5, 67.5, 82, 2.7)
pt3dadd(-430.5, 67.5, 82, 3.1)
pt3dadd(-433, 69.5, 82, 2.7)
pt3dadd(-434.5, 71, 82, 2.6)
pt3dadd(-436.5, 72.5, 79, 2.5)
pt3dadd(-438.5, 74.5, 79, 3.2)
pt3dadd(-440.5, 74.5, 79, 3.4)
pt3dadd(-445, 75, 79, 2.8)
pt3dadd(-447.5, 76, 79, 2.4)
pt3dadd(-450, 77.5, 79, 2.7)
pt3dadd(-451.5, 78.5, 79, 2.1)
pt3dadd(-454, 80, 82, 2.1)
pt3dadd(-455.5, 81, 82, 1.9)
pt3dadd(-458, 82, 82, 1.5)
pt3dadd(-460, 83.5, 82, 1.5)
pt3dadd(-463.5, 84.5, 75.5, 2.3)
pt3dadd(-465, 86, 75.5, 2.3)
pt3dadd(-466.5, 87.5, 79, 2.6)
pt3dadd(-468.5, 88.5, 75.5, 2.6)
pt3dadd(-469.5, 90, 75.5, 2.9)
pt3dadd(-471.5, 92, 72.5, 3.6)
pt3dadd(-474, 93, 69.5, 3.6)
pt3dadd(-476.5, 93.5, 69.5, 3.6)
pt3dadd(-480.5, 94, 69.5, 2.6)
pt3dadd(-483, 96, 69.5, 2.9)
pt3dadd(-487.5, 98, 69.5, 2.5)
pt3dadd(-489, 100.5, 69.5, 3.1)
pt3dadd(-490, 102, 69.5, 3.3)
pt3dadd(-491, 103.5, 69.5, 3.3)
pt3dadd(-493, 104.5, 69.5, 3.4)
pt3dadd(-494.5, 106, 69.5, 3.4)
pt3dadd(-496.5, 106.5, 69.5, 3.3)
pt3dadd(-498.5, 108, 65.5, 3.4)
pt3dadd(-499.5, 109.5, 65.5, 3.3)
pt3dadd(-501.5, 111.5, 65.5, 3.1)
pt3dadd(-503, 114.5, 62, 2.5)
pt3dadd(-504, 115.5, 62, 2.6)
pt3dadd(-506, 116, 58, 2.5)
pt3dadd(-508, 117.5, 58, 2.5)
pt3dadd(-510.5, 118, 50.5, 2.5)
pt3dadd(-513, 119.5, 54, 2.5)
pt3dadd(-515, 120, 54, 2.5)
pt3dadd(-518.5, 122, 54, 2.5)
pt3dadd(-519.5, 124, 50.5, 2.5)
pt3dadd(-522, 125, 50.5, 2.2)
pt3dadd(-523.5, 126, 50.5, 2.4)
pt3dadd(-528.5, 127, 46.5, 2.2)
pt3dadd(-530, 128.5, 46.5, 2.4)
pt3dadd(-531.5, 130, 50.5, 2.8)
pt3dadd(-533, 131, 50.5, 2.8)
pt3dadd(-535.5, 133.5, 50.5, 2.8)
pt3dadd(-541.5, 134, 47, 1.9)
pt3dadd(-544.5, 135, 40, 1.6)
pt3dadd(-548.5, 137, 43.5, 1.6)
pt3dadd(-550, 137, 43.5, 1.7)
pt3dadd(-552.5, 137, 43.5, 1.9)
pt3dadd(-553.5, 138.5, 43.5, 1.6)
pt3dadd(-554.5, 138.5, 43.5, 1.1)
pt3dadd(-556, 138.5, 43.5, 0.6)
pt3dadd(-558, 138.5, 43.5, 0.7)
pt3dadd(-558, 140, 43.5, 0.7)
pt3dadd(-559, 141.5, 43.5, 0.7)
pt3dadd(-562, 142.5, 43.5, 1.4)
pt3dadd(-564.5, 144, 43.5, 1)
pt3dadd(-566, 145, 43.5, 1.2)
pt3dadd(-567.5, 146, 43.5, 1.4)
pt3dadd(-571, 148, 43.5, 1.4)
pt3dadd(-572.5, 148, 43.5, 1.4)
pt3dadd(-574, 149.5, 43.5, 1.4)
pt3dadd(-576, 150.5, 43.5, 1.4)
pt3dadd(-577, 152, 43.5, 1.4)
pt3dadd(-578.5, 152, 43.5, 1.4)
pt3dadd(-580, 153, 43.5, 1.4)
pt3dadd(-582, 153, 43.5, 1.4)
pt3dadd(-584.5, 153, 43.5, 1.6)
pt3dadd(-586.5, 153.5, 43.5, 1.7)
pt3dadd(-588, 155, 43.5, 1.7)
pt3dadd(-589, 156, 40, 1.1)
pt3dadd(-591.5, 157, 43.5, 1)
pt3dadd(-595.5, 159.5, 43.5, 0.8)
pt3dadd(-597.5, 161, 43.5, 0.9)
pt3dadd(-599, 162, 43.5, 1.1)
pt3dadd(-600.5, 163.5, 43.5, 1)
pt3dadd(-602, 164.5, 43.5, 1)
pt3dadd(-604, 167, 40, 0.9)
pt3dadd(-608, 169.5, 40, 0.9)
pt3dadd(-609.5, 170.5, 40, 0.9)
pt3dadd(-612.5, 172, 40, 0.9)
pt3dadd(-614, 173, 40, 1.2)
pt3dadd(-615, 174.5, 40, 1.1)
pt3dadd(-616.5, 175.5, 40, 0.9)
pt3dadd(-619, 176.5, 40, 0.9)
pt3dadd(-621, 176.5, 40, 1)
pt3dadd(-621, 177.5, 40, 1.1)
pt3dadd(-621.5, 179, 40, 1.2)
pt3dadd(-626.5, 180.5, 40, 1.2)
pt3dadd(-629.5, 181.5, 40, 1.2)
pt3dadd(-633, 183, 43.5, 1.2)
pt3dadd(-636, 183, 43.5, 1.1)
pt3dadd(-637.5, 183, 40, 0.9)
pt3dadd(-640, 184, 43.5, 1.3)
pt3dadd(-643, 184.5, 43.5, 1.2)
pt3dadd(-645, 185, 43.5, 1.3)
pt3dadd(-646.5, 186, 43.5, 1.1)
pt3dadd(-648, 187, 43.5, 1.1)
pt3dadd(-650, 188.5, 43.5, 1.1)
pt3dadd(-651.5, 189.5, 43.5, 0.9)
pt3dadd(-653.5, 190, 43.5, 1.1)
pt3dadd(-656, 190.5, 43.5, 1.1)
pt3dadd(-658, 190.5, 43.5, 1.2)
pt3dadd(-660.5, 191, 43.5, 1.2)
pt3dadd(-665, 192, 43.5, 1.2)
pt3dadd(-666, 192, 43.5, 0.9)
pt3dadd(-667.5, 192, 47, 1.3)
pt3dadd(-670, 192, 47, 1.4)
pt3dadd(-672, 193.5, 40, 1.1)
pt3dadd(-674, 193.5, 40, 1.1)
pt3dadd(-676, 194.5, 40, 1.4)
pt3dadd(-678.5, 195, 40, 1.6)
pt3dadd(-686, 197.5, 40, 1.6)
pt3dadd(-689.5, 197.5, 40, 1.6)
pt3dadd(-693.5, 197.5, 40, 1.6)
pt3dadd(-699.5, 197.5, 40, 1.6)
pt3dadd(-703.5, 197.5, 43.5, 1.6)
pt3dadd(-709.5, 199.5, 40, 1.6)
pt3dadd(-712.5, 201, 40, 1.6)
pt3dadd(-715.5, 202.5, 40, 1.6)
pt3dadd(-717.5, 204.5, 40, 1.6)
pt3dadd(-718, 205.5, 40, 1.6)
pt3dadd(-720.5, 206.5, 40, 1.6)
pt3dadd(-724, 208.5, 40, 1.6)
pt3dadd(-725.5, 211, 40, 1.6)
pt3dadd(-731.5, 213, 40, 1.6)
pt3dadd(-734.5, 214, 40, 1.6)
pt3dadd(-736.5, 216, 40, 1.6)
pt3dadd(-741, 217, 43.5, 1.6)
pt3dadd(-744.5, 219, 43.5, 1.6)
pt3dadd(-747.5, 219.5, 43.5, 1.6)
pt3dadd(-752.5, 220.5, 43.5, 1.6)
pt3dadd(-754.5, 221.5, 43.5, 1.6)
pt3dadd(-758, 222.5, 43.5, 1.6)
pt3dadd(-760, 223.5, 43.5, 1.6)
pt3dadd(-762.5, 223.5, 43.5, 1.6)
pt3dadd(-765.5, 224.5, 43.5, 1.6)
pt3dadd(-767, 225, 43.5, 1.6)
pt3dadd(-769, 225, 43.5, 1.4)
pt3dadd(-771, 226.5, 43.5, 1.2)
pt3dadd(-773, 227, 43.5, 1.2)
pt3dadd(-774, 227, 43.5, 1.2)
pt3dadd(-780, 229, 40, 1.4)
pt3dadd(-783, 229, 40, 1.4)
pt3dadd(-785.5, 229, 43.5, 1.4)
pt3dadd(-787.5, 229.5, 43.5, 1)
pt3dadd(-790, 230.5, 47, 1)
pt3dadd(-793, 231, 43.5, 1)
pt3dadd(-795.5, 231.5, 43.5, 1)
pt3dadd(-797.5, 233, 43.5, 1)
pt3dadd(-800, 233.5, 43.5, 1)
pt3dadd(-802.5, 234.5, 43.5, 1)
pt3dadd(-805, 234.5, 43.5, 1)
pt3dadd(-808, 234.5, 43.5, 1)
pt3dadd(-811, 234.5, 43.5, 1)
pt3dadd(-814, 234.5, 47, 1)
pt3dadd(-814.5, 234.5, 43.5, 1.7)
pt3dadd(-816, 234.5, 43.5, 1.4)
pt3dadd(-820, 234.5, 43.5, 0.9)
pt3dadd(-821.5, 234.5, 43.5, 0.9)
}
}
proc shape3d_13() {
dend[25] { pt3dadd(-823, 235.5, 43.5, 0.9)
pt3dadd(-824, 237, 43.5, 0.9)
pt3dadd(-825.5, 238.5, 43.5, 0.9)
pt3dadd(-827, 240, 43.5, 1)
pt3dadd(-828, 241, 36.5, 0.9)
pt3dadd(-829.5, 242.5, 36.5, 0.7)
pt3dadd(-831.5, 244, 36.5, 0.7)
pt3dadd(-836, 247, 43.5, 0.9)
pt3dadd(-839, 248, 40, 1)
pt3dadd(-845.5, 251, 40, 0.8)
pt3dadd(-850, 252, 43.5, 1)
pt3dadd(-852, 253, 43.5, 0.9)
pt3dadd(-855, 254.5, 43.5, 0.8)
pt3dadd(-858, 255, 43.5, 0.8)
pt3dadd(-864, 256.5, 43.5, 0.8)
pt3dadd(-866.5, 256.5, 43.5, 0.8)
pt3dadd(-869, 257, 43.5, 0.8)
pt3dadd(-871.5, 257, 43.5, 0.8)
pt3dadd(-873, 257, 36.5, 0.8)
pt3dadd(-876.5, 257, 43.5, 0.8)
pt3dadd(-877, 257.5, 36.5, 0.8)
pt3dadd(-880, 257.5, 36.5, 0.8)
pt3dadd(-885, 260, 36.5, 0.8)
pt3dadd(-885.5, 260, 29.5, 0.8)
pt3dadd(-887.5, 261.5, 29.5, 0.8)
pt3dadd(-889.5, 263, 29.5, 0.8)
pt3dadd(-890.5, 264, 33, 0.9)
pt3dadd(-894, 267, 36.5, 0.9)
pt3dadd(-898, 268.5, 36.5, 0.9)
pt3dadd(-902, 268.5, 36.5, 0.9)
}
dend[26] {pt3dclear()
pt3dadd(-422.5, 60.5, 79, 6)
pt3dadd(-426.5, 57, 79, 0.9)
pt3dadd(-429.5, 57, 79, 0.9)
pt3dadd(-432, 56, 75.5, 0.9)
pt3dadd(-434.5, 55, 82, 0.9)
pt3dadd(-437, 55, 82, 1.2)
pt3dadd(-440, 53.5, 75.5, 1.2)
pt3dadd(-444, 52.5, 75.5, 1.2)
pt3dadd(-446.5, 52.5, 75.5, 0.9)
pt3dadd(-448, 52.5, 75.5, 0.9)
pt3dadd(-449, 51.5, 75.5, 0.9)
pt3dadd(-451, 49, 75.5, 1.2)
pt3dadd(-453, 49, 75.5, 1.2)
pt3dadd(-457.5, 48.5, 85, 1.2)
pt3dadd(-460.5, 48.5, 79, 1.6)
pt3dadd(-463, 48.5, 79, 1.8)
pt3dadd(-466, 48.5, 79, 1.7)
pt3dadd(-468.5, 49, 79, 1.7)
pt3dadd(-471.5, 49, 79, 1.7)
pt3dadd(-474, 49, 85, 1.4)
pt3dadd(-476.5, 49, 85, 1.7)
pt3dadd(-480, 49, 85, 1.4)
pt3dadd(-483.5, 49, 82, 1.4)
pt3dadd(-486, 50, 91.5, 1.6)
pt3dadd(-489.5, 50.5, 88, 1.3)
pt3dadd(-491, 51, 88, 1.3)
pt3dadd(-493, 51, 88, 1.3)
pt3dadd(-495.5, 52.5, 94.5, 1.3)
pt3dadd(-497.5, 52.5, 91.5, 1.3)
pt3dadd(-499.5, 52.5, 88, 1)
pt3dadd(-502.5, 50, 88, 1)
pt3dadd(-504, 48, 91.5, 1)
pt3dadd(-505.5, 47, 91.5, 1)
pt3dadd(-508.5, 46.5, 91.5, 1.5)
pt3dadd(-512, 45, 91.5, 1.5)
pt3dadd(-515, 45, 91.5, 1.5)
pt3dadd(-517.5, 45, 91.5, 1.9)
pt3dadd(-520, 43.5, 91.5, 1.4)
pt3dadd(-522, 42, 91.5, 1)
pt3dadd(-524.5, 41.5, 95, 1.1)
pt3dadd(-526.5, 41.5, 95, 1.2)
pt3dadd(-527.5, 41.5, 95, 1.2)
pt3dadd(-529.5, 41, 95, 1)
pt3dadd(-531, 40.5, 95, 1.1)
pt3dadd(-533.5, 40.5, 95, 1.1)
pt3dadd(-535.5, 40.5, 98.5, 1.3)
pt3dadd(-538, 40.5, 91.5, 1.3)
pt3dadd(-540, 40.5, 95, 1.6)
pt3dadd(-540.5, 39, 95, 1.6)
pt3dadd(-542.5, 39, 95, 1.6)
pt3dadd(-544, 39, 98.5, 1.6)
pt3dadd(-546, 38, 98.5, 1.2)
pt3dadd(-549.5, 37.5, 101.5, 1.3)
pt3dadd(-552, 37.5, 101.5, 1.3)
pt3dadd(-555, 37.5, 101.5, 1.3)
pt3dadd(-557, 37.5, 101.5, 1.4)
pt3dadd(-559, 37.5, 105, 1.4)
pt3dadd(-562.5, 37.5, 101.5, 1)
pt3dadd(-565.5, 37, 101.5, 1.4)
pt3dadd(-567, 36.5, 101.5, 1.1)
pt3dadd(-570.5, 36.5, 101.5, 1.1)
pt3dadd(-573.5, 34.5, 101.5, 1.1)
pt3dadd(-575.5, 34.5, 101.5, 1.1)
pt3dadd(-581.5, 33.5, 105, 1.1)
pt3dadd(-584, 33.5, 108.5, 1.1)
pt3dadd(-587, 32.5, 105, 1.3)
pt3dadd(-590, 31, 105, 1.5)
pt3dadd(-594, 28.5, 105, 1.5)
pt3dadd(-596, 28.5, 105, 1.2)
pt3dadd(-600.5, 27.5, 111.5, 1.5)
pt3dadd(-603.5, 26.5, 111.5, 1.5)
pt3dadd(-607, 26, 105, 1.5)
pt3dadd(-609, 26, 105, 1.8)
pt3dadd(-616.5, 24.5, 111.5, 2.4)
pt3dadd(-619.5, 24.5, 111.5, 2)
pt3dadd(-622, 24.5, 111.5, 2)
pt3dadd(-624.5, 23.5, 108.5, 1.4)
pt3dadd(-627.5, 23.5, 108.5, 0.9)
pt3dadd(-629, 22.5, 108.5, 2.3)
pt3dadd(-631.5, 22, 108.5, 2.3)
pt3dadd(-634.5, 20.5, 108.5, 1.6)
pt3dadd(-637, 20.5, 108.5, 1.1)
pt3dadd(-639.5, 21.5, 115, 1.1)
pt3dadd(-641.5, 21.5, 115, 0.9)
pt3dadd(-644.5, 21, 111.5, 0.9)
pt3dadd(-648.5, 20, 111.5, 1.2)
pt3dadd(-651, 20, 111.5, 1.4)
pt3dadd(-653.5, 19, 118.5, 1.8)
pt3dadd(-655.5, 19, 115, 2.2)
pt3dadd(-659.5, 18, 111.5, 0.9)
pt3dadd(-661.5, 18, 115, 0.9)
pt3dadd(-664, 18, 115, 0.9)
pt3dadd(-665.5, 17.5, 121.5, 1)
pt3dadd(-668, 17, 118.5, 1.1)
pt3dadd(-670, 17, 115, 1.1)
pt3dadd(-673, 17, 118.5, 1.1)
pt3dadd(-675, 17.5, 118.5, 1.1)
pt3dadd(-679.5, 19.5, 115, 1.1)
pt3dadd(-682.5, 19.5, 115, 1.1)
pt3dadd(-685.5, 19.5, 118.5, 1.1)
pt3dadd(-689.5, 19.5, 115, 1.1)
pt3dadd(-694.5, 19.5, 121.5, 1.4)
pt3dadd(-697.5, 19.5, 121.5, 1.2)
pt3dadd(-703, 18.5, 121.5, 1.2)
pt3dadd(-705.5, 18.5, 121.5, 1.2)
pt3dadd(-709, 19, 118.5, 1.2)
pt3dadd(-711.5, 19.5, 118.5, 1.2)
pt3dadd(-714.5, 21, 121.5, 1.5)
pt3dadd(-721.5, 21, 118.5, 1.2)
pt3dadd(-725, 22, 118.5, 1)
pt3dadd(-727.5, 22, 118.5, 0.8)
pt3dadd(-730.5, 22, 118.5, 0.8)
pt3dadd(-734.5, 22, 121.5, 0.8)
pt3dadd(-739, 21, 111.5, 0.8)
pt3dadd(-741, 21, 115, 0.8)
pt3dadd(-742, 21, 115, 0.8)
pt3dadd(-743, 18.5, 108.5, 0.8)
pt3dadd(-746, 18.5, 115, 1)
pt3dadd(-748, 20.5, 105, 1.3)
pt3dadd(-749.5, 22.5, 115, 1)
pt3dadd(-751.5, 22.5, 108.5, 0.8)
pt3dadd(-756.5, 21.5, 111.5, 0.8)
pt3dadd(-757, 22.5, 105, 0.8)
pt3dadd(-760, 22.5, 105, 0.8)
pt3dadd(-763.5, 22.5, 105, 0.8)
pt3dadd(-765.5, 22.5, 108.5, 0.8)
pt3dadd(-771.5, 24, 105, 0.8)
pt3dadd(-773.5, 26.5, 105, 0.8)
pt3dadd(-774, 27, 98.5, 0.8)
pt3dadd(-778.5, 28.5, 111.5, 0.8)
pt3dadd(-780.5, 29, 115, 0.8)
pt3dadd(-782, 30, 115, 0.8)
pt3dadd(-789, 33.5, 98.5, 0.8)
pt3dadd(-793.5, 33.5, 98.5, 0.8)
}
dend[27] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 12.4)
pt3dadd(-20.5, 50, -11.5, 12.4)
pt3dadd(-23.5, 50, -15, 10.8)
pt3dadd(-41, 61.5, -11.5, 6.9)
}
dend[28] {pt3dclear()
pt3dadd(-41, 61.5, -11.5, 6.9)
pt3dadd(-45.5, 68.5, -8, 5)
pt3dadd(-47.5, 71.5, -8, 5)
pt3dadd(-52.5, 80.5, -8, 4.6)
pt3dadd(-61.5, 91, 5, 5)
pt3dadd(-66, 95.5, 5, 8.4)
}
dend[29] {pt3dclear()
pt3dadd(-66, 95.5, 5, 8.4)
pt3dadd(-65.5, 100, -1.5, 4.1)
pt3dadd(-66.5, 102.5, 8, 3.6)
pt3dadd(-67, 106, 8, 2.6)
pt3dadd(-67.5, 107, 1.5, 2.5)
pt3dadd(-68.5, 108.5, 5, 2.2)
pt3dadd(-68.5, 112, 8, 2.3)
pt3dadd(-67.5, 116.5, 8, 2)
pt3dadd(-67.5, 118, 11.5, 2.3)
pt3dadd(-68, 122.5, 8, 2.3)
pt3dadd(-68.5, 124.5, 1.5, 2.3)
pt3dadd(-68.5, 126, 5, 2.3)
pt3dadd(-66, 130, 8, 3.1)
pt3dadd(-66, 132, 8, 3.5)
pt3dadd(-66, 136, 8, 3.3)
pt3dadd(-65.5, 138, 5, 2.7)
pt3dadd(-66, 140.5, 1.5, 1)
pt3dadd(-68, 142, 1.5, 1.1)
pt3dadd(-69.5, 143, 1.5, 1.1)
pt3dadd(-70, 145, 1.5, 1.6)
pt3dadd(-72, 145, 5, 1.6)
pt3dadd(-74, 145, 5, 1.3)
pt3dadd(-75.5, 146, 5, 0.9)
pt3dadd(-76.5, 148, 5, 1.5)
pt3dadd(-78, 152.5, 5, 1.3)
pt3dadd(-78.5, 155, 5, 1.3)
}
}
proc shape3d_14() {
dend[29] { pt3dadd(-80.5, 157.5, 5, 1.2)
pt3dadd(-81.5, 163, 8, 1.3)
pt3dadd(-82.5, 166, 11.5, 1.3)
pt3dadd(-83, 169, 15, 1.5)
pt3dadd(-84.5, 172.5, -5, 1.5)
pt3dadd(-84.5, 175.5, -5, 1.5)
pt3dadd(-84.5, 178.5, -5, 1.5)
pt3dadd(-84.5, 181, -5, 1.5)
pt3dadd(-86, 183.5, -5, 1.5)
pt3dadd(-85.5, 190, -1.5, 1.5)
pt3dadd(-81.5, 193, -8, 1.5)
pt3dadd(-83, 199.5, -8, 1.5)
pt3dadd(-83, 203, -8, 1.5)
pt3dadd(-83, 205.5, -8, 1.8)
pt3dadd(-83, 207.5, -8, 1.8)
pt3dadd(-83, 209, -8, 1.8)
pt3dadd(-82.5, 210.5, -8, 1.2)
pt3dadd(-82.5, 212.5, -8, 1.3)
pt3dadd(-81.5, 214.5, -8, 1.3)
pt3dadd(-80, 217, -16.5, 1.3)
pt3dadd(-80, 220.5, -16.5, 1.3)
pt3dadd(-80.5, 222, -16.5, 1.3)
pt3dadd(-80.5, 223.5, -16.5, 1.3)
pt3dadd(-80.5, 225.5, -12.5, 1.3)
pt3dadd(-79.5, 229, -12.5, 1.7)
pt3dadd(-79.5, 231, -12.5, 1.6)
pt3dadd(-79, 232.5, -12.5, 1.3)
pt3dadd(-77.5, 234, -16.5, 0.8)
pt3dadd(-76.5, 235, -16.5, 1)
pt3dadd(-74, 239, -16.5, 1)
pt3dadd(-74, 241, -16.5, 0.8)
pt3dadd(-74, 243, -16.5, 0.8)
pt3dadd(-74, 247, -16.5, 1.1)
pt3dadd(-72.5, 252, -16.5, 0.7)
pt3dadd(-71.5, 256.5, -16.5, 0.6)
pt3dadd(-72, 259, -12.5, 0.9)
pt3dadd(-71.5, 262, -20.5, 0.9)
pt3dadd(-75, 265.5, -25, 1)
pt3dadd(-75.5, 268.5, -25, 1)
pt3dadd(-75, 274.5, -20.5, 1)
pt3dadd(-75, 276.5, -20.5, 1)
pt3dadd(-75, 279.5, -20.5, 1)
pt3dadd(-74.5, 282.5, -20.5, 1.1)
pt3dadd(-74.5, 285, -20.5, 1.1)
pt3dadd(-72, 287, -20.5, 1.1)
pt3dadd(-70.5, 289, -20.5, 0.9)
pt3dadd(-69.5, 291.5, -20.5, 0.9)
pt3dadd(-69.5, 293.5, -20.5, 0.9)
pt3dadd(-69, 295, -20.5, 0.9)
pt3dadd(-69, 296.5, -20.5, 1.1)
pt3dadd(-70, 303, -25, 1.1)
pt3dadd(-69.5, 305.5, -16.5, 1)
pt3dadd(-69.5, 307.5, -16.5, 0.6)
pt3dadd(-69, 311, -25, 0.6)
pt3dadd(-67.5, 314, -25, 0.6)
pt3dadd(-67.5, 316, -25, 0.6)
pt3dadd(-67.5, 318, -25, 0.7)
pt3dadd(-67.5, 320, -25, 0.7)
pt3dadd(-65.5, 322, -29, 0.9)
pt3dadd(-64.5, 323, -16.5, 0.6)
pt3dadd(-63, 326, -20.5, 0.9)
pt3dadd(-63, 327.5, -20.5, 0.9)
pt3dadd(-62.5, 329, -20.5, 0.9)
pt3dadd(-62, 331, -20.5, 0.9)
pt3dadd(-61, 332, -25, 0.9)
pt3dadd(-61, 334, -16.5, 0.9)
pt3dadd(-60.5, 336, -20.5, 0.8)
pt3dadd(-60.5, 338.5, -20.5, 0.8)
pt3dadd(-60.5, 339.5, -20.5, 0.8)
pt3dadd(-59, 341.5, -20.5, 0.8)
pt3dadd(-58.5, 343, -20.5, 0.7)
pt3dadd(-58, 344.5, -20.5, 0.7)
pt3dadd(-57.5, 346.5, -20.5, 0.7)
pt3dadd(-57.5, 348, -20.5, 0.7)
pt3dadd(-58.5, 349, -20.5, 0.7)
pt3dadd(-60, 349, -20.5, 0.9)
pt3dadd(-61.5, 351, -20.5, 0.9)
pt3dadd(-61, 353, -20.5, 0.9)
pt3dadd(-59.5, 355, -20.5, 0.9)
pt3dadd(-58, 358.5, -20.5, 1)
pt3dadd(-57.5, 360.5, -20.5, 1.2)
pt3dadd(-57.5, 362.5, -20.5, 1)
pt3dadd(-57.5, 364, -20.5, 0.7)
pt3dadd(-57, 365, -20.5, 0.7)
pt3dadd(-55.5, 368, -20.5, 0.7)
pt3dadd(-52.5, 371, -25, 0.8)
pt3dadd(-50, 372.5, -25, 1.3)
pt3dadd(-48.5, 376, -16.5, 0.8)
pt3dadd(-47, 378.5, -20.5, 0.8)
pt3dadd(-47, 379.5, -25, 0.8)
pt3dadd(-46.5, 381, -25, 1.2)
pt3dadd(-44.5, 382, -25, 1.4)
pt3dadd(-42.5, 384, -25, 1.2)
pt3dadd(-40.5, 386, -12.5, 0.9)
pt3dadd(-38.5, 388, -16.5, 0.9)
pt3dadd(-37, 390, -16.5, 0.9)
pt3dadd(-36, 391, -16.5, 0.9)
pt3dadd(-34.5, 393.5, -8, 0.9)
pt3dadd(-35.5, 397, -12.5, 0.9)
pt3dadd(-34, 399.5, -12.5, 0.9)
pt3dadd(-31, 401, -12.5, 1.2)
pt3dadd(-28, 403, -12.5, 1.2)
pt3dadd(-25.5, 405, -12.5, 0.9)
pt3dadd(-25, 407, -16.5, 0.9)
pt3dadd(-24, 409, -20.5, 0.7)
pt3dadd(-21, 411.5, -20.5, 0.6)
pt3dadd(-21.5, 414.5, -12.5, 0.6)
pt3dadd(-21.5, 416, -12.5, 0.7)
pt3dadd(-21.5, 417.5, -12.5, 0.7)
pt3dadd(-20.5, 418.5, -12.5, 0.7)
pt3dadd(-19, 420, -12.5, 0.7)
pt3dadd(-19, 421.5, -12.5, 0.7)
pt3dadd(-20.5, 422.5, -12.5, 0.7)
pt3dadd(-22, 424.5, -16.5, 0.7)
pt3dadd(-21.5, 427.5, -16.5, 0.9)
pt3dadd(-19.5, 430.5, -16.5, 0.9)
pt3dadd(-18, 433.5, -16.5, 1.3)
pt3dadd(-17.5, 435, -23, 1.4)
pt3dadd(-16.5, 437, -10, 1.2)
pt3dadd(-16.5, 438.5, -10, 1.2)
pt3dadd(-16.5, 441, -10, 1)
pt3dadd(-16.5, 442.5, -10, 1)
pt3dadd(-17, 445.5, -10, 1)
pt3dadd(-17.5, 449.5, -13, 1)
pt3dadd(-21, 452.5, -10, 1)
pt3dadd(-22, 455, -10, 1)
pt3dadd(-23.5, 457.5, -10, 0.6)
pt3dadd(-24.5, 459.5, -10, 0.7)
pt3dadd(-24.5, 461.5, -10, 0.7)
pt3dadd(-24.5, 465, -10, 0.9)
pt3dadd(-24.5, 467.5, -10, 0.9)
pt3dadd(-26.5, 469.5, -10, 0.9)
pt3dadd(-28, 472.5, -10, 0.9)
pt3dadd(-28.5, 475, -10, 0.9)
pt3dadd(-30.5, 476.5, -10, 0.9)
pt3dadd(-32.5, 478, -10, 0.9)
pt3dadd(-35, 480.5, -10, 0.9)
pt3dadd(-36.5, 481.5, 13, 0.9)
}
dend[30] {pt3dclear()
pt3dadd(-66, 95.5, 5, 8.4)
pt3dadd(-73.5, 96, 5, 3.3)
pt3dadd(-80, 97, 8, 2.9)
pt3dadd(-83, 97, 11.5, 3.1)
pt3dadd(-89.5, 97, 8, 3.3)
pt3dadd(-92, 97, 11.5, 3.3)
pt3dadd(-97, 97.5, 11.5, 3.4)
pt3dadd(-99, 98.5, 15, 2.8)
pt3dadd(-101, 100, 18, 3.3)
pt3dadd(-104.5, 100, 15, 3.3)
pt3dadd(-110, 101.5, 15, 2.9)
pt3dadd(-112.5, 101.5, 15, 2.9)
pt3dadd(-115.5, 101.5, 18.5, 2.8)
pt3dadd(-121.5, 103.5, 18.5, 2.6)
pt3dadd(-123.5, 103.5, 15, 2.6)
pt3dadd(-126.5, 103.5, 22, 2.9)
pt3dadd(-131.5, 103.5, 29, 2.7)
pt3dadd(-134, 104, 25.5, 2.8)
pt3dadd(-137, 104, 29, 2.8)
pt3dadd(-143, 103.5, 33, 3)
pt3dadd(-149, 106, 33, 2.5)
pt3dadd(-153, 107.5, 36.5, 2.8)
pt3dadd(-155.5, 107.5, 36.5, 2.9)
pt3dadd(-160.5, 109, 36.5, 2.9)
pt3dadd(-162, 110.5, 36.5, 2.7)
pt3dadd(-164, 111.5, 36.5, 2.5)
pt3dadd(-166.5, 111.5, 36.5, 2.5)
pt3dadd(-171.5, 111.5, 36.5, 4)
pt3dadd(-174.5, 111.5, 47, 3.9)
pt3dadd(-181, 111.5, 40, 3.8)
pt3dadd(-188, 110.5, 40, 2.8)
pt3dadd(-191.5, 110.5, 40, 2.8)
pt3dadd(-194.5, 110.5, 40, 2.8)
pt3dadd(-200.5, 111, 47, 2.9)
pt3dadd(-203, 111, 47, 2.8)
pt3dadd(-207, 110.5, 47, 2.7)
pt3dadd(-212.5, 110.5, 47, 2.8)
pt3dadd(-215.5, 110, 47, 2.8)
pt3dadd(-221, 110, 43, 3.6)
pt3dadd(-225, 110, 54.5, 3.3)
pt3dadd(-230, 109.5, 50.5, 3.6)
pt3dadd(-233.5, 109.5, 54.5, 3.6)
pt3dadd(-238.5, 109, 50.5, 3.1)
pt3dadd(-245, 109, 58.5, 3.3)
pt3dadd(-248.5, 109, 58.5, 3.3)
pt3dadd(-253.5, 110, 62, 2.4)
pt3dadd(-256.5, 110.5, 66, 2.8)
pt3dadd(-259.5, 110.5, 66, 3.3)
pt3dadd(-262, 110.5, 73.5, 4.4)
}
dend[31] {pt3dclear()
pt3dadd(-262, 110.5, 73.5, 4.4)
pt3dadd(-270, 108, 62, 2.6)
pt3dadd(-272.5, 108, 62, 2.6)
pt3dadd(-274.5, 108, 66, 2.6)
pt3dadd(-280, 109, 66, 2.8)
pt3dadd(-282, 109, 66, 2.8)
pt3dadd(-284, 109.5, 66, 2.8)
pt3dadd(-289, 110, 70, 2.9)
pt3dadd(-292.5, 111, 66, 2.4)
pt3dadd(-295, 111.5, 66, 2.1)
pt3dadd(-299, 111.5, 58.5, 1.9)
pt3dadd(-302, 111, 66, 2.1)
pt3dadd(-305.5, 111, 70, 2.4)
}
}
proc shape3d_15() {
dend[31] { pt3dadd(-307.5, 111, 70, 2.4)
pt3dadd(-311.5, 113, 62, 2.2)
pt3dadd(-315.5, 113.5, 66, 2.2)
pt3dadd(-319, 115, 62, 2.1)
pt3dadd(-323, 115, 62, 2.2)
pt3dadd(-327, 115, 62, 2.1)
pt3dadd(-330.5, 116.5, 70, 2.4)
pt3dadd(-337.5, 116.5, 66, 2.6)
pt3dadd(-340, 116.5, 62, 2.6)
pt3dadd(-345.5, 117.5, 62, 2.2)
pt3dadd(-348.5, 119, 62, 2.4)
pt3dadd(-351.5, 119, 62, 2.5)
pt3dadd(-355.5, 119, 62, 2.4)
pt3dadd(-358, 119, 62, 2.4)
pt3dadd(-360, 119, 62, 2.4)
pt3dadd(-365.5, 119, 58.5, 2.5)
pt3dadd(-372, 119.5, 66, 2.6)
pt3dadd(-378, 119.5, 58.5, 2.2)
pt3dadd(-380.5, 119.5, 54.5, 2.1)
pt3dadd(-384.5, 119.5, 54.5, 2)
pt3dadd(-388.5, 119.5, 54.5, 2)
pt3dadd(-391.5, 119.5, 54.5, 2.2)
pt3dadd(-395, 119.5, 54.5, 2.2)
pt3dadd(-397, 120.5, 54.5, 2.3)
pt3dadd(-402.5, 120.5, 47, 2.7)
pt3dadd(-410, 120.5, 47, 2.8)
pt3dadd(-415, 120, 50.5, 3.5)
}
dend[32] {pt3dclear()
pt3dadd(-415, 120, 50.5, 3.5)
pt3dadd(-417, 121, 43, 1.2)
pt3dadd(-419.5, 121, 43, 1.2)
pt3dadd(-422, 120.5, 54.5, 1.2)
pt3dadd(-424, 119, 54.5, 1.1)
pt3dadd(-426, 118, 54.5, 1.2)
pt3dadd(-428, 117.5, 50.5, 1.2)
pt3dadd(-432, 116, 50.5, 1.3)
pt3dadd(-437, 114, 50.5, 1.3)
pt3dadd(-439, 113.5, 50.5, 1.3)
pt3dadd(-443, 111, 50.5, 1.3)
pt3dadd(-447.5, 108, 54.5, 1.3)
pt3dadd(-449, 106.5, 54.5, 1.2)
pt3dadd(-455, 106, 58.5, 1.3)
pt3dadd(-457.5, 105.5, 58.5, 1.3)
pt3dadd(-460.5, 105, 58.5, 1.3)
pt3dadd(-464, 105, 62, 1.3)
pt3dadd(-466.5, 105.5, 62, 1.4)
pt3dadd(-469, 105.5, 66, 1.4)
pt3dadd(-472.5, 104, 66, 1.4)
pt3dadd(-475.5, 103.5, 66, 1.3)
pt3dadd(-477.5, 103, 66, 0.7)
pt3dadd(-480.5, 103, 66, 0.7)
pt3dadd(-484.5, 102.5, 66, 0.8)
pt3dadd(-486, 102, 66, 0.8)
pt3dadd(-488, 101, 70, 0.8)
pt3dadd(-490.5, 101, 70, 0.9)
pt3dadd(-492.5, 101, 70, 0.7)
pt3dadd(-494, 101, 70, 0.7)
pt3dadd(-495.5, 101, 70, 0.7)
pt3dadd(-497, 100, 70, 0.9)
pt3dadd(-499.5, 98.5, 70, 1)
pt3dadd(-500, 97.5, 70, 1)
pt3dadd(-501, 97, 70, 1)
pt3dadd(-502.5, 96.5, 70, 0.9)
pt3dadd(-504, 96.5, 70, 0.9)
pt3dadd(-506.5, 95, 73.5, 0.9)
pt3dadd(-509, 95, 73.5, 0.9)
pt3dadd(-511.5, 95, 73.5, 0.9)
pt3dadd(-518, 94, 73.5, 1)
pt3dadd(-520.5, 92.5, 73.5, 1.4)
pt3dadd(-523, 91.5, 73.5, 1)
pt3dadd(-524, 91, 73.5, 0.6)
pt3dadd(-525, 89.5, 73.5, 0.7)
pt3dadd(-526, 89, 73.5, 1.2)
pt3dadd(-526.5, 89, 73.5, 1.9)
pt3dadd(-526.5, 86.5, 73.5, 2)
pt3dadd(-528, 85, 76.5, 2)
pt3dadd(-528, 83.5, 82.5, 2)
pt3dadd(-529.5, 82, 82.5, 1.4)
pt3dadd(-531, 81.5, 82.5, 1.4)
pt3dadd(-532.5, 81.5, 82.5, 1.4)
pt3dadd(-533, 80, 82.5, 1.3)
pt3dadd(-533, 78.5, 82.5, 1.3)
pt3dadd(-535.5, 78.5, 82.5, 0.9)
pt3dadd(-537, 78.5, 82.5, 0.9)
pt3dadd(-538.5, 78, 82.5, 0.9)
pt3dadd(-541, 78, 82.5, 0.6)
pt3dadd(-540.5, 76, 82.5, 0.3)
pt3dadd(-542, 76, 82.5, 0.5)
pt3dadd(-543, 75.5, 82.5, 0.9)
pt3dadd(-544.5, 74.5, 82.5, 1)
pt3dadd(-545.5, 74, 82.5, 0.9)
pt3dadd(-547.5, 72.5, 82.5, 0.9)
pt3dadd(-547.5, 71.5, 82.5, 0.6)
pt3dadd(-549, 70, 82.5, 0.7)
pt3dadd(-551, 69, 82.5, 0.8)
pt3dadd(-552.5, 68, 82.5, 0.8)
pt3dadd(-554.5, 67, 82.5, 0.7)
pt3dadd(-556, 66, 82.5, 0.7)
pt3dadd(-557, 65, 86, 0.7)
pt3dadd(-560, 64.5, 86, 0.7)
pt3dadd(-562, 63, 86, 0.7)
pt3dadd(-563.5, 61.5, 95, 0.9)
pt3dadd(-565.5, 60, 95, 0.9)
pt3dadd(-568, 58.5, 95, 0.6)
pt3dadd(-571.5, 57, 101.5, 0.9)
pt3dadd(-573.5, 57, 101.5, 0.9)
pt3dadd(-576.5, 57, 101.5, 1.1)
pt3dadd(-580.5, 55.5, 104.5, 1.1)
pt3dadd(-582, 55.5, 104.5, 1.1)
pt3dadd(-585.5, 54.5, 101.5, 1.1)
pt3dadd(-587.5, 53.5, 101.5, 1.1)
pt3dadd(-589.5, 52.5, 101.5, 1.1)
pt3dadd(-592.5, 50, 92, 1.4)
pt3dadd(-596, 48.5, 88.5, 0.5)
pt3dadd(-598.5, 48, 92, 0.7)
pt3dadd(-600.5, 46, 92, 1.1)
pt3dadd(-603, 46, 92, 1.1)
pt3dadd(-604.5, 46, 95, 0.9)
pt3dadd(-606.5, 46, 95, 0.6)
pt3dadd(-607.5, 45.5, 95, 0.6)
pt3dadd(-609.5, 45.5, 95, 0.6)
pt3dadd(-611, 44.5, 95, 0.6)
pt3dadd(-613, 42.5, 95, 0.6)
pt3dadd(-616, 40.5, 102, 0.6)
pt3dadd(-618, 40.5, 102, 0.7)
pt3dadd(-621, 39.5, 102, 0.7)
pt3dadd(-624.5, 39.5, 102, 0.7)
pt3dadd(-626.5, 39.5, 102, 0.7)
pt3dadd(-631, 39, 95, 0.7)
pt3dadd(-633.5, 38.5, 95, 0.7)
pt3dadd(-638, 36.5, 98.5, 0.8)
pt3dadd(-641, 36.5, 102, 0.8)
pt3dadd(-644.5, 35, 105, 0.8)
pt3dadd(-649.5, 32.5, 98.5, 0.7)
pt3dadd(-652, 31, 102, 0.7)
pt3dadd(-653.5, 30, 102, 0.7)
pt3dadd(-655.5, 28, 98.5, 0.7)
pt3dadd(-662.5, 26, 108.5, 0.9)
pt3dadd(-664.5, 26, 105, 0.8)
pt3dadd(-666.5, 26, 105, 0.7)
pt3dadd(-669, 25.5, 108.5, 0.6)
pt3dadd(-671.5, 24.5, 108.5, 0.6)
pt3dadd(-674, 22.5, 112, 0.6)
pt3dadd(-676, 20.5, 112, 0.6)
pt3dadd(-678.5, 18.5, 112, 0.6)
pt3dadd(-680, 18, 112, 0.6)
pt3dadd(-682, 17, 115, 0.6)
pt3dadd(-684.5, 16, 115, 0.6)
pt3dadd(-685, 14, 118.5, 0.8)
pt3dadd(-686, 12, 118.5, 0.8)
pt3dadd(-686, 10.5, 122, 1)
pt3dadd(-688, 9.5, 122, 0.6)
pt3dadd(-688.5, 8.5, 118.5, 0.6)
pt3dadd(-689, 6, 122, 0.6)
pt3dadd(-690, 4, 122, 0.6)
pt3dadd(-693, 3, 112, 0.6)
pt3dadd(-696, 1, 115, 0.6)
pt3dadd(-698.5, -0.5, 118.5, 0.6)
pt3dadd(-700.5, -0.5, 118.5, 0.6)
pt3dadd(-702, -1, 122, 0.7)
pt3dadd(-705.5, -3, 122, 0.7)
pt3dadd(-708.5, -5, 122, 0.7)
pt3dadd(-710, -6.5, 122, 0.7)
pt3dadd(-713, -7, 122, 0.7)
pt3dadd(-715.5, -7.5, 125, 0.7)
pt3dadd(-717.5, -9.5, 125, 0.7)
pt3dadd(-718.5, -11.5, 125, 0.7)
pt3dadd(-720.5, -13, 125, 0.7)
pt3dadd(-722.5, -14, 125, 0.7)
pt3dadd(-724.5, -15, 125, 0.7)
pt3dadd(-730.5, -18, 122, 1.2)
pt3dadd(-734, -18.5, 122, 1.2)
pt3dadd(-741.5, -21, 122, 1.2)
pt3dadd(-743.5, -21.5, 125, 1.2)
pt3dadd(-748.5, -23, 125, 0.9)
pt3dadd(-751.5, -23, 125, 0.9)
pt3dadd(-757.5, -24.5, 132, 1)
pt3dadd(-760, -24.5, 128.5, 1)
pt3dadd(-762.5, -25, 122, 1)
pt3dadd(-766.5, -26, 122, 1)
pt3dadd(-769, -26, 118.5, 1)
pt3dadd(-771, -26.5, 118.5, 1)
pt3dadd(-775, -29, 118.5, 0.7)
}
dend[33] {pt3dclear()
pt3dadd(-415, 120, 50.5, 3.5)
pt3dadd(-417, 117.5, 54.5, 1.9)
pt3dadd(-419.5, 117.5, 54.5, 1.9)
pt3dadd(-421.5, 116.5, 43, 2.1)
}
dend[34] {pt3dclear()
pt3dadd(-262, 110.5, 73.5, 4.4)
pt3dadd(-264.5, 110.5, 62, 1.9)
pt3dadd(-272.5, 112, 70, 2)
pt3dadd(-282.5, 114, 70, 3.3)
pt3dadd(-285, 114, 70, 2.7)
pt3dadd(-288, 114, 73, 2.8)
pt3dadd(-292.5, 115, 70, 2.9)
pt3dadd(-295.5, 117, 76, 2.9)
pt3dadd(-298, 119, 76, 2.9)
pt3dadd(-300.5, 119, 76, 3.1)
pt3dadd(-305, 120, 76, 3.4)
pt3dadd(-307.5, 122, 76, 3.8)
pt3dadd(-309.5, 122, 76, 3.2)
pt3dadd(-312, 122, 85.5, 2.9)
}
}
proc shape3d_16() {
dend[34] { pt3dadd(-315.5, 123.5, 88.5, 2.4)
pt3dadd(-317.5, 124.5, 85.5, 2.6)
pt3dadd(-318, 121, 88.5, 2.7)
pt3dadd(-319.5, 123, 85.5, 2.7)
pt3dadd(-322.5, 124, 91.5, 2.8)
pt3dadd(-327, 123.5, 95, 3.8)
pt3dadd(-330, 122.5, 95, 3.6)
pt3dadd(-332.5, 120.5, 98.5, 2.9)
pt3dadd(-335, 119.5, 101.5, 2.8)
pt3dadd(-337, 119.5, 101.5, 2.8)
pt3dadd(-338.5, 121, 101.5, 2.5)
pt3dadd(-340.5, 121.5, 108.5, 2.1)
pt3dadd(-342.5, 121.5, 108.5, 2.1)
pt3dadd(-344.5, 121.5, 105, 2.3)
pt3dadd(-348, 122.5, 105, 2.3)
pt3dadd(-349.5, 123.5, 101.5, 2.3)
pt3dadd(-352, 124.5, 111.5, 3.3)
}
dend[35] {pt3dclear()
pt3dadd(-352, 124.5, 111.5, 3.3)
pt3dadd(-353, 126.5, 108.5, 1.4)
pt3dadd(-355, 129.5, 115, 1.5)
pt3dadd(-355, 131.5, 115, 1.5)
pt3dadd(-355, 132.5, 115, 1.5)
pt3dadd(-356.5, 132.5, 121.5, 1.3)
pt3dadd(-358, 133.5, 125, 0.9)
pt3dadd(-359.5, 134.5, 125, 0.9)
pt3dadd(-361.5, 134.5, 125, 1)
pt3dadd(-364, 135, 128.5, 1)
pt3dadd(-365, 136, 128.5, 1.2)
pt3dadd(-366, 137.5, 125, 1.3)
pt3dadd(-369.5, 139.5, 125, 1.5)
pt3dadd(-371, 141, 125, 1.6)
pt3dadd(-374, 141.5, 125, 1.6)
pt3dadd(-377.5, 142, 128, 1.4)
pt3dadd(-380, 142.5, 125, 1.1)
pt3dadd(-382, 142.5, 125, 1.1)
pt3dadd(-384, 143.5, 128, 0.9)
pt3dadd(-385, 145.5, 128, 0.9)
pt3dadd(-385, 147.5, 128, 0.9)
pt3dadd(-386, 151, 128, 0.7)
pt3dadd(-387, 153.5, 128, 0.7)
pt3dadd(-389.5, 154.5, 128, 0.9)
pt3dadd(-391.5, 155.5, 135, 2.5)
pt3dadd(-393, 157.5, 135, 2.5)
pt3dadd(-395.5, 160.5, 138, 1.5)
pt3dadd(-395.5, 162.5, 138, 1.4)
pt3dadd(-397, 164.5, 138, 1.4)
pt3dadd(-399.5, 165.5, 138, 1.4)
pt3dadd(-401.5, 167, 138, 1.3)
pt3dadd(-403.5, 168, 145, 1.3)
pt3dadd(-407.5, 171, 148, 1.3)
pt3dadd(-411, 172, 141.5, 1.3)
pt3dadd(-415, 174, 141.5, 1.3)
pt3dadd(-418.5, 175, 141.5, 1)
pt3dadd(-421.5, 176.5, 141.5, 1)
pt3dadd(-423.5, 178, 141.5, 0.9)
pt3dadd(-423.5, 180.5, 141.5, 0.9)
pt3dadd(-428, 183, 148, 1.2)
pt3dadd(-434.5, 187.5, 148, 1.2)
pt3dadd(-436.5, 190.5, 148, 1.2)
pt3dadd(-437.5, 192.5, 148, 1.2)
pt3dadd(-439.5, 195.5, 155, 1.1)
pt3dadd(-443.5, 198.5, 151.5, 1.1)
pt3dadd(-447.5, 201.5, 156, 1.1)
pt3dadd(-451, 204, 160.5, 0.9)
pt3dadd(-452.5, 205, 165, 0.7)
pt3dadd(-452.5, 206.5, 160.5, 0.7)
pt3dadd(-453, 208.5, 165, 0.8)
pt3dadd(-454, 209.5, 165, 0.8)
pt3dadd(-455.5, 209.5, 160.5, 0.8)
pt3dadd(-457, 209.5, 160.5, 0.8)
pt3dadd(-457.5, 210.5, 160.5, 0.8)
pt3dadd(-458, 211.5, 160.5, 0.6)
pt3dadd(-458, 213.5, 160.5, 0.7)
pt3dadd(-459, 216.5, 160.5, 0.9)
pt3dadd(-461, 217, 160.5, 0.9)
pt3dadd(-462, 219, 160.5, 0.6)
pt3dadd(-463.5, 221, 156, 0.7)
pt3dadd(-465, 222.5, 156, 0.7)
pt3dadd(-465, 224, 151.5, 1.1)
pt3dadd(-466, 227, 165, 1.1)
pt3dadd(-466, 229, 165, 1.1)
pt3dadd(-468, 232, 165, 1.1)
pt3dadd(-468, 234.5, 165, 1.1)
pt3dadd(-468, 235.5, 165, 1.1)
pt3dadd(-468, 236.5, 169.5, 1.1)
pt3dadd(-468, 238.5, 169.5, 1.1)
pt3dadd(-469.5, 239.5, 169.5, 1.1)
pt3dadd(-471, 241.5, 169.5, 1.3)
pt3dadd(-472, 242.5, 169.5, 1.1)
pt3dadd(-472, 245.5, 169.5, 1.1)
pt3dadd(-472.5, 247.5, 169.5, 0.8)
pt3dadd(-473.5, 249.5, 169.5, 0.8)
pt3dadd(-475.5, 253, 174, 0.8)
pt3dadd(-477, 255, 178.5, 1.1)
pt3dadd(-479.5, 258.5, 178.5, 1.2)
pt3dadd(-482, 259.5, 178.5, 1.3)
pt3dadd(-483.5, 260, 178.5, 1.6)
pt3dadd(-484.5, 262, 178.5, 1.8)
pt3dadd(-484, 265, 183, 1.8)
pt3dadd(-484, 268, 178.5, 1.8)
pt3dadd(-485.5, 271, 187.5, 1.8)
pt3dadd(-487, 274.5, 187.5, 1.8)
pt3dadd(-487, 276.5, 187.5, 1.8)
pt3dadd(-488, 280, 187.5, 1.8)
pt3dadd(-489.5, 283, 183, 1.8)
pt3dadd(-490.5, 285.5, 183, 1.8)
pt3dadd(-492.5, 288.5, 183, 1.7)
pt3dadd(-494, 292.5, 187.5, 1.5)
pt3dadd(-494, 296.5, 187.5, 1.5)
pt3dadd(-494, 298.5, 192, 1.5)
pt3dadd(-493.5, 300.5, 192, 1.5)
pt3dadd(-494.5, 304, 187.5, 1.2)
}
dend[36] {pt3dclear()
pt3dadd(-352, 124.5, 111.5, 3.3)
pt3dadd(-354.5, 124, 111.5, 1.6)
pt3dadd(-357, 123, 111.5, 1.7)
pt3dadd(-359, 122, 111.5, 1.7)
pt3dadd(-363.5, 122.5, 118.5, 1.6)
pt3dadd(-365.5, 123, 118.5, 1.7)
pt3dadd(-370.5, 123, 118.5, 1.9)
pt3dadd(-373, 123, 118.5, 1.6)
pt3dadd(-376, 122.5, 125, 1.4)
pt3dadd(-379, 121.5, 118.5, 1.3)
pt3dadd(-381, 121.5, 118.5, 1.3)
pt3dadd(-385, 121.5, 118.5, 1.6)
pt3dadd(-387, 121.5, 121.5, 2)
pt3dadd(-392, 121.5, 125, 1.7)
pt3dadd(-393.5, 121.5, 125, 1.6)
pt3dadd(-395, 121, 135, 1.8)
pt3dadd(-395.5, 119.5, 121.5, 1.8)
pt3dadd(-397.5, 119.5, 121.5, 1.9)
pt3dadd(-400, 119, 125, 2.3)
pt3dadd(-401.5, 119, 125, 1.8)
pt3dadd(-404, 119, 125, 1.8)
pt3dadd(-405.5, 119, 128.5, 1.9)
pt3dadd(-407, 118.5, 128.5, 2.2)
pt3dadd(-409, 117.5, 131.5, 2.4)
pt3dadd(-412.5, 117.5, 125, 2.1)
pt3dadd(-415, 115, 125, 1.4)
pt3dadd(-417, 113, 118.5, 1.4)
pt3dadd(-421, 111, 125, 1.3)
pt3dadd(-423.5, 110, 125, 1.3)
pt3dadd(-425.5, 109, 125, 1.3)
pt3dadd(-429, 107, 125, 1.4)
pt3dadd(-432, 106, 125, 1.4)
pt3dadd(-434.5, 105.5, 131.5, 1.3)
pt3dadd(-436.5, 105.5, 131.5, 1.1)
pt3dadd(-441.5, 107, 125, 1.2)
pt3dadd(-443.5, 108.5, 128.5, 1.4)
pt3dadd(-445.5, 109.5, 128.5, 1.4)
pt3dadd(-451, 112, 138.5, 1.2)
pt3dadd(-453.5, 112, 138.5, 0.9)
pt3dadd(-456.5, 112.5, 138.5, 0.9)
pt3dadd(-460.5, 111.5, 141.5, 0.9)
pt3dadd(-463, 110.5, 138.5, 0.9)
pt3dadd(-466, 109, 141.5, 0.9)
pt3dadd(-471, 108, 145, 0.9)
pt3dadd(-474, 108, 145, 0.9)
pt3dadd(-476.5, 108, 145, 1.1)
pt3dadd(-480, 107.5, 141.5, 1.3)
pt3dadd(-483, 107.5, 145, 1.3)
pt3dadd(-485.5, 107.5, 145, 1.4)
pt3dadd(-488.5, 107, 145, 1.4)
pt3dadd(-493.5, 105.5, 145, 1.3)
pt3dadd(-496, 105, 145, 1.3)
pt3dadd(-499, 104, 151.5, 1.3)
pt3dadd(-501.5, 103.5, 155, 1.3)
pt3dadd(-506.5, 101, 155, 1.3)
pt3dadd(-506.5, 102.5, 155, 1.8)
pt3dadd(-511, 104, 155, 1.8)
pt3dadd(-513.5, 104, 159.5, 1.8)
pt3dadd(-515.5, 104, 159.5, 1.4)
pt3dadd(-517.5, 104, 159.5, 1.3)
pt3dadd(-519, 105, 159.5, 1.2)
pt3dadd(-522.5, 106.5, 159.5, 1)
pt3dadd(-524.5, 107, 164, 1)
pt3dadd(-527, 107, 173, 1)
pt3dadd(-530.5, 108.5, 168.5, 0.8)
pt3dadd(-533.5, 108.5, 168.5, 1.2)
pt3dadd(-536.5, 108.5, 168.5, 1.1)
pt3dadd(-538.5, 108.5, 173, 0.7)
pt3dadd(-543.5, 109, 159.5, 1.3)
pt3dadd(-546.5, 110.5, 159.5, 1.4)
pt3dadd(-549.5, 110.5, 164, 1.4)
pt3dadd(-553, 110.5, 164, 1.2)
pt3dadd(-556.5, 110.5, 164, 1.2)
pt3dadd(-560, 110, 164, 1.2)
pt3dadd(-563.5, 109.5, 159.5, 1.2)
pt3dadd(-566.5, 108.5, 159.5, 1.2)
pt3dadd(-569.5, 108.5, 164, 1.2)
pt3dadd(-571.5, 108.5, 177.5, 1.3)
pt3dadd(-576, 108.5, 173, 1.3)
pt3dadd(-579, 108.5, 177.5, 1.3)
pt3dadd(-580.5, 108.5, 168.5, 1.7)
pt3dadd(-581, 110, 168.5, 1.5)
pt3dadd(-582.5, 110.5, 182, 1.5)
}
dend[37] {pt3dclear()
pt3dadd(-41, 61.5, -11.5, 6.9)
pt3dadd(-43.5, 62.5, -11.5, 4.4)
pt3dadd(-46.5, 63, -11.5, 4.3)
pt3dadd(-52, 66.5, -11.5, 5.7)
pt3dadd(-57, 70, -11.5, 4.8)
}
}
proc shape3d_17() {
dend[37] { pt3dadd(-61.5, 73.5, -11.5, 6.3)
pt3dadd(-64.5, 75, -20, 6)
pt3dadd(-68.5, 78, -24, 4.3)
pt3dadd(-71, 78.5, -28, 3.4)
pt3dadd(-75.5, 78.5, -28, 4.2)
pt3dadd(-77.5, 79, -28, 4.2)
pt3dadd(-82.5, 80, -28, 4.3)
pt3dadd(-85.5, 80.5, -32.5, 4)
pt3dadd(-90.5, 81, -32.5, 3.8)
pt3dadd(-95.5, 81.5, -36.5, 3.4)
pt3dadd(-101, 83, -36.5, 3.4)
pt3dadd(-107.5, 83.5, -32.5, 3.6)
pt3dadd(-111.5, 85, -36.5, 3.9)
pt3dadd(-114, 86.5, -45, 3.9)
pt3dadd(-122, 89, -49, 4.6)
pt3dadd(-124, 89, -49, 4.6)
pt3dadd(-126.5, 90, -53, 4.6)
pt3dadd(-132, 92, -53, 3.7)
pt3dadd(-133.5, 92.5, -53, 3.2)
pt3dadd(-135.5, 90, -53, 3.2)
pt3dadd(-137, 92.5, -53, 4.3)
pt3dadd(-139, 94.5, -56.5, 4.3)
pt3dadd(-143, 95.5, -56.5, 3.6)
pt3dadd(-145, 94, -56.5, 3.6)
pt3dadd(-147.5, 95.5, -60.5, 3.6)
pt3dadd(-153.5, 97, -56.5, 4)
pt3dadd(-159, 95.5, -64.5, 3.4)
pt3dadd(-160.5, 95.5, -64.5, 2.7)
pt3dadd(-166.5, 95.5, -64.5, 3.7)
pt3dadd(-170, 93.5, -76, 3.4)
pt3dadd(-175, 93.5, -84, 4.6)
pt3dadd(-181, 92.5, -80, 4.4)
pt3dadd(-184, 90.5, -80, 3.8)
pt3dadd(-185.5, 90.5, -80, 3.9)
pt3dadd(-187.5, 89, -72.5, 3.5)
pt3dadd(-192.5, 89, -87.5, 4)
pt3dadd(-201, 89, -80, 3.6)
pt3dadd(-210, 86, -87.5, 3.7)
pt3dadd(-212, 86, -87.5, 3.3)
pt3dadd(-215, 84.5, -87.5, 3.3)
pt3dadd(-221.5, 84, -87.5, 2.8)
pt3dadd(-229.5, 86.5, -95.5, 3.2)
pt3dadd(-233, 86, -91.5, 3.2)
pt3dadd(-236.5, 85.5, -91.5, 3)
pt3dadd(-243, 84, -99, 3.2)
pt3dadd(-249, 84, -103, 3.2)
pt3dadd(-252, 84, -103, 3.4)
pt3dadd(-255, 84, -107, 4)
}
dend[38] {pt3dclear()
pt3dadd(-255, 84, -107, 4)
pt3dadd(-262.5, 83.5, -107, 3.3)
pt3dadd(-265.5, 83.5, -103, 2.3)
pt3dadd(-267.5, 83.5, -103, 2.9)
pt3dadd(-270.5, 83.5, -99, 4.7)
}
dend[39] {pt3dclear()
pt3dadd(-270.5, 83.5, -99, 4.7)
pt3dadd(-272.5, 80.5, -107, 0.7)
pt3dadd(-273.5, 79, -107, 0.7)
pt3dadd(-276, 75.5, -107, 0.6)
pt3dadd(-277.5, 74.5, -107, 0.7)
pt3dadd(-279.5, 73.5, -107, 0.9)
pt3dadd(-281.5, 73, -103, 1.8)
pt3dadd(-283, 71, -103, 0.7)
pt3dadd(-285.5, 69.5, -103, 0.7)
pt3dadd(-287, 69.5, -103, 1.3)
pt3dadd(-289.5, 68.5, -103, 1.5)
}
dend[40] {pt3dclear()
pt3dadd(-289.5, 68.5, -103, 1.5)
pt3dadd(-291.5, 68.5, -95.5, 0.7)
pt3dadd(-293, 68, -99, 0.7)
pt3dadd(-295, 67.5, -99, 0.7)
pt3dadd(-300.5, 67.5, -99, 0.6)
pt3dadd(-303, 67, -91.5, 0.6)
pt3dadd(-305.5, 65.5, -87.5, 0.6)
pt3dadd(-307.5, 65, -84, 0.6)
pt3dadd(-310, 65, -84, 0.8)
pt3dadd(-314, 65, -84, 0.7)
pt3dadd(-315.5, 64, -84, 0.7)
pt3dadd(-318.5, 61.5, -84, 0.8)
pt3dadd(-320, 60.5, -80, 0.7)
pt3dadd(-325.5, 57.5, -80, 0.5)
pt3dadd(-327.5, 56.5, -80, 0.5)
pt3dadd(-329, 55, -80, 0.5)
pt3dadd(-331, 55, -80, 0.5)
pt3dadd(-334, 56, -76, 0.5)
pt3dadd(-336, 56, -76, 0.5)
pt3dadd(-337.5, 54.5, -76, 0.5)
pt3dadd(-339.5, 52.5, -76, 0.5)
pt3dadd(-341.5, 52.5, -76, 0.5)
pt3dadd(-343.5, 52, -76, 0.5)
pt3dadd(-347.5, 50.5, -76, 0.5)
pt3dadd(-352.5, 49, -72.5, 0.6)
pt3dadd(-354, 47.5, -72.5, 0.6)
pt3dadd(-354.5, 46.5, -72.5, 0.3)
pt3dadd(-356.5, 46.5, -72.5, 0.3)
pt3dadd(-357.5, 45.5, -72.5, 0.3)
pt3dadd(-359.5, 44.5, -72.5, 0.3)
}
dend[41] {pt3dclear()
pt3dadd(-289.5, 68.5, -103, 1.5)
pt3dadd(-291, 64, -103, 1.5)
pt3dadd(-293.5, 63.5, -107.5, 0.8)
pt3dadd(-295.5, 61.5, -107.5, 0.8)
pt3dadd(-297, 60.5, -107.5, 0.7)
pt3dadd(-299, 59.5, -107.5, 0.6)
pt3dadd(-300, 58, -107.5, 0.6)
pt3dadd(-301.5, 58, -107.5, 0.7)
pt3dadd(-303, 58, -103, 0.6)
pt3dadd(-304, 57, -107.5, 0.6)
pt3dadd(-306, 57, -107.5, 0.7)
pt3dadd(-307, 55.5, -111.5, 0.7)
pt3dadd(-309.5, 55.5, -115.5, 0.7)
pt3dadd(-313, 55.5, -107.5, 0.7)
pt3dadd(-316, 55.5, -111.5, 0.7)
pt3dadd(-318.5, 55.5, -111.5, 0.7)
pt3dadd(-320, 54, -111.5, 0.7)
pt3dadd(-322.5, 53, -111.5, 0.7)
}
dend[42] {pt3dclear()
pt3dadd(-270.5, 83.5, -99, 4.7)
pt3dadd(-273, 85, -107, 2.5)
pt3dadd(-275.5, 86.5, -95.5, 2.2)
pt3dadd(-277.5, 88, -95.5, 1.9)
pt3dadd(-279.5, 89, -95.5, 1.9)
pt3dadd(-283, 90, -95.5, 2)
pt3dadd(-290, 92.5, -99, 2)
pt3dadd(-292.5, 92.5, -103, 2)
pt3dadd(-295, 92.5, -99, 2)
pt3dadd(-299, 94.5, -103, 1.8)
pt3dadd(-301, 95.5, -99, 2.1)
pt3dadd(-303.5, 96.5, -99, 2.5)
pt3dadd(-306, 97.5, -99, 2)
pt3dadd(-308, 98.5, -99, 1.7)
pt3dadd(-313, 99, -103, 1.5)
pt3dadd(-316.5, 100.5, -103, 1.5)
pt3dadd(-319, 101.5, -103, 1.6)
pt3dadd(-321, 101.5, -103, 1.6)
pt3dadd(-323, 101.5, -110.5, 1.8)
pt3dadd(-325, 102, -110.5, 1.9)
pt3dadd(-330.5, 104, -114.5, 3.2)
pt3dadd(-333, 104, -110.5, 3.2)
pt3dadd(-335, 104, -110.5, 2.9)
pt3dadd(-338.5, 104, -114.5, 3.4)
pt3dadd(-341, 104, -114.5, 3.4)
pt3dadd(-345.5, 104, -114.5, 3.5)
pt3dadd(-349, 104.5, -123, 3.3)
pt3dadd(-351, 104.5, -123, 2.9)
pt3dadd(-352.5, 104, -123, 2.7)
pt3dadd(-355, 103, -123, 1.9)
pt3dadd(-357.5, 102, -123, 1.6)
pt3dadd(-360.5, 99.5, -123, 1.6)
pt3dadd(-364, 97, -123, 1.7)
pt3dadd(-369, 95, -119, 1.7)
pt3dadd(-372, 94, -114.5, 1.7)
pt3dadd(-375, 93, -123, 2.2)
pt3dadd(-379, 91.5, -123, 2.7)
pt3dadd(-381.5, 90, -123, 1.6)
pt3dadd(-383.5, 89.5, -119, 1.5)
pt3dadd(-385, 87.5, -123, 1.8)
pt3dadd(-386.5, 85, -123, 2)
pt3dadd(-386.5, 82, -123, 2.8)
pt3dadd(-387, 79.5, -123, 3.1)
pt3dadd(-388, 77.5, -123, 3.1)
pt3dadd(-390.5, 76.5, -123, 2.7)
pt3dadd(-392.5, 75, -123, 2.7)
pt3dadd(-396, 71.5, -123, 2.7)
pt3dadd(-400.5, 69, -119, 3.1)
pt3dadd(-405, 68.5, -119, 2.4)
pt3dadd(-407.5, 67, -119, 2.7)
pt3dadd(-414, 65, -119, 2.5)
pt3dadd(-416.5, 64.5, -119, 2.2)
pt3dadd(-420.5, 63.5, -114.5, 2.3)
pt3dadd(-425, 62.5, -114.5, 1.9)
pt3dadd(-427.5, 62.5, -114.5, 2.2)
pt3dadd(-429, 62.5, -114.5, 3.1)
pt3dadd(-430, 61.5, -123, 1.6)
pt3dadd(-431.5, 61.5, -123, 1.3)
pt3dadd(-433.5, 61.5, -123, 1.7)
pt3dadd(-435.5, 59.5, -123, 2.5)
pt3dadd(-438, 59.5, -135.5, 2.2)
pt3dadd(-442, 58, -127, 2.5)
pt3dadd(-443.5, 58.5, -135.5, 2.4)
pt3dadd(-448, 57.5, -131.5, 2.2)
pt3dadd(-450, 57, -135.5, 1.6)
pt3dadd(-451.5, 56, -135.5, 1.6)
pt3dadd(-453.5, 54.5, -135.5, 1.9)
pt3dadd(-454.5, 54.5, -135.5, 2.1)
pt3dadd(-456.5, 54, -135.5, 2.7)
pt3dadd(-458, 52, -135.5, 2.3)
pt3dadd(-459.5, 51, -135.5, 1.9)
pt3dadd(-460.5, 50.5, -135.5, 1.8)
pt3dadd(-462.5, 49, -144, 2.1)
pt3dadd(-466, 47.5, -144, 2.1)
pt3dadd(-467.5, 46, -144, 1.9)
pt3dadd(-469, 46, -144, 1.8)
pt3dadd(-471.5, 44.5, -144, 1.8)
pt3dadd(-473.5, 44, -144, 1.8)
pt3dadd(-474.5, 43.5, -144, 1.8)
pt3dadd(-477, 42.5, -144, 1.8)
pt3dadd(-478.5, 40.5, -144, 1.8)
pt3dadd(-486, 37.5, -141.5, 2.1)
pt3dadd(-491.5, 36.5, -141.5, 2.6)
pt3dadd(-496, 36.5, -141.5, 2.3)
pt3dadd(-500.5, 35, -147, 2.5)
pt3dadd(-503, 34, -144, 2.5)
pt3dadd(-506, 34, -144, 2.2)
pt3dadd(-508.5, 32, -147, 2.2)
}
}
proc shape3d_18() {
dend[42] { pt3dadd(-511, 32, -147, 2.5)
pt3dadd(-528.5, 31, -147, 3.6)
}
dend[43] {pt3dclear()
pt3dadd(-528.5, 31, -147, 3.6)
pt3dadd(-532, 28.5, -141.5, 2.2)
pt3dadd(-534, 27.5, -144, 2.8)
pt3dadd(-537, 26, -141.5, 2.7)
pt3dadd(-539.5, 25.5, -144, 2.7)
pt3dadd(-541.5, 24.5, -144, 2)
pt3dadd(-543, 23, -144, 2)
pt3dadd(-547.5, 23, -144, 2.2)
pt3dadd(-550.5, 23, -139.5, 2.2)
pt3dadd(-552.5, 23, -139.5, 2.7)
pt3dadd(-553.5, 23, -139.5, 2)
pt3dadd(-555.5, 23, -139.5, 1.7)
pt3dadd(-559.5, 23, -139.5, 1.9)
pt3dadd(-562, 22.5, -139.5, 2.5)
pt3dadd(-564, 22, -139.5, 2.3)
pt3dadd(-566.5, 21, -139.5, 2)
pt3dadd(-569, 21, -139.5, 1.8)
pt3dadd(-571, 20, -139.5, 1.6)
pt3dadd(-573, 20, -139.5, 1.6)
pt3dadd(-577.5, 18.5, -139.5, 1.6)
pt3dadd(-579, 17, -139.5, 1.6)
pt3dadd(-581, 16.5, -131.5, 1.8)
pt3dadd(-583, 16.5, -131.5, 1.8)
pt3dadd(-586.5, 15, -131.5, 1.8)
pt3dadd(-588.5, 16, -135.5, 1.8)
pt3dadd(-591, 16, -135.5, 1.8)
pt3dadd(-594.5, 13.5, -131.5, 1.4)
pt3dadd(-598, 12.5, -131.5, 1.3)
pt3dadd(-599, 12.5, -131.5, 1.3)
pt3dadd(-600.5, 11.5, -131.5, 1.6)
pt3dadd(-601.5, 11, -131.5, 1.6)
pt3dadd(-603, 9.5, -131.5, 1.5)
pt3dadd(-602, 8.5, -131.5, 1.5)
pt3dadd(-603, 8, -131.5, 1.5)
pt3dadd(-605.5, 7, -135.5, 1.5)
pt3dadd(-605, 5.5, -135.5, 1.5)
pt3dadd(-605.5, 9, -127, 2.8)
pt3dadd(-610.5, 8.5, -123, 2.3)
pt3dadd(-613.5, 7, -123, 2.5)
pt3dadd(-616.5, 6.5, -123, 2.5)
pt3dadd(-619, 5.5, -114.5, 1.9)
pt3dadd(-621.5, 5.5, -114.5, 1.6)
pt3dadd(-624, 5.5, -114.5, 2.5)
pt3dadd(-628.5, 2.5, -110.5, 2.3)
pt3dadd(-634, 2.5, -114.5, 1.7)
pt3dadd(-639.5, 2.5, -119, 2.5)
pt3dadd(-643, 3, -119, 2.2)
pt3dadd(-649.5, -0.5, -110.5, 1.7)
pt3dadd(-652.5, -0.5, -106.5, 1.7)
pt3dadd(-657.5, -1.5, -110.5, 1.7)
pt3dadd(-661, -1.5, -106.5, 1.9)
pt3dadd(-663.5, -2, -110.5, 1.9)
pt3dadd(-666, -2, -110.5, 2)
pt3dadd(-668, -2, -110.5, 2)
pt3dadd(-669.5, -1, -114.5, 2.1)
pt3dadd(-674.5, -2.5, -114.5, 1.6)
pt3dadd(-677, -2.5, -114.5, 1.8)
pt3dadd(-678.5, -3.5, -110.5, 1.8)
pt3dadd(-680.5, -3.5, -110.5, 1.5)
pt3dadd(-682, -3.5, -110.5, 1.5)
pt3dadd(-684, -4, -110.5, 1.7)
pt3dadd(-685.5, -5, -110.5, 1.7)
pt3dadd(-687.5, -5.5, -110.5, 1.5)
pt3dadd(-690.5, -6, -114.5, 1.6)
pt3dadd(-694, -6, -118.5, 1.4)
pt3dadd(-696.5, -6, -118.5, 1.9)
pt3dadd(-698.5, -7, -118.5, 1.9)
pt3dadd(-700.5, -8, -118.5, 1.1)
pt3dadd(-703, -8, -118.5, 0.9)
pt3dadd(-705, -8, -118.5, 0.7)
pt3dadd(-707, -8, -118.5, 0.7)
pt3dadd(-709, -8, -118.5, 1)
pt3dadd(-711, -8, -114.5, 1.2)
pt3dadd(-715.5, -8.5, -111, 1.6)
pt3dadd(-717.5, -8.5, -107, 1.6)
pt3dadd(-719.5, -8.5, -107, 1.1)
pt3dadd(-724, -8.5, -107, 1.3)
pt3dadd(-726, -8.5, -107, 1.1)
pt3dadd(-727, -8.5, -107, 1)
pt3dadd(-728.5, -8.5, -107, 0.9)
pt3dadd(-731, -9, -107, 1.2)
pt3dadd(-733, -9, -99.5, 2.2)
pt3dadd(-735.5, -10.5, -99.5, 4.9)
}
dend[44] {pt3dclear()
pt3dadd(-735.5, -10.5, -99.5, 4.9)
pt3dadd(-739.5, -13.5, -103, 1.1)
pt3dadd(-742, -13.5, -99.5, 0.9)
pt3dadd(-744, -13.5, -99.5, 0.9)
pt3dadd(-749, -14, -99.5, 1.1)
pt3dadd(-751, -15, -99.5, 0.8)
pt3dadd(-755, -15, -99.5, 0.9)
pt3dadd(-756.5, -16, -95.5, 0.8)
pt3dadd(-758.5, -18.5, -95.5, 0.8)
pt3dadd(-762, -21.5, -103, 1)
pt3dadd(-763.5, -22.5, -103, 1)
pt3dadd(-765, -24, -103, 1.1)
pt3dadd(-769, -26, -103, 1)
pt3dadd(-771.5, -26.5, -103, 0.9)
pt3dadd(-775, -28, -103, 0.8)
pt3dadd(-778, -29.5, -103, 0.8)
pt3dadd(-780.5, -31, -103, 0.9)
pt3dadd(-786, -35, -103, 1)
pt3dadd(-788.5, -36.5, -107, 1)
pt3dadd(-791, -38.5, -103, 1.3)
pt3dadd(-793, -38.5, -103, 1.3)
pt3dadd(-793.5, -40.5, -103, 1.3)
pt3dadd(-793.5, -42, -107, 1.1)
pt3dadd(-794.5, -47.5, -95.5, 1.1)
pt3dadd(-794.5, -49.5, -103, 1.1)
pt3dadd(-796.5, -51, -103, 1.8)
pt3dadd(-797.5, -53, -107.5, 1.9)
pt3dadd(-799.5, -54.5, -107.5, 1.9)
pt3dadd(-801.5, -55.5, -107.5, 1.9)
pt3dadd(-804, -59, -103, 1.7)
pt3dadd(-805.5, -59, -103, 1.4)
pt3dadd(-806.5, -60, -103, 1.4)
pt3dadd(-806.5, -62, -107.5, 1.1)
pt3dadd(-806.5, -63.5, -107.5, 1.1)
pt3dadd(-806.5, -65, -107.5, 1.4)
pt3dadd(-807, -66.5, -107.5, 1.2)
pt3dadd(-807.5, -68.5, -107.5, 1.2)
pt3dadd(-807, -70.5, -107.5, 1.2)
pt3dadd(-807, -72, -107.5, 1.2)
pt3dadd(-807, -73.5, -115.5, 1.1)
pt3dadd(-808.5, -74.5, -107.5, 1.1)
pt3dadd(-810, -75.5, -107.5, 1.1)
pt3dadd(-812.5, -77.5, -107.5, 1.1)
pt3dadd(-815.5, -80, -103, 1.1)
pt3dadd(-818, -80, -103, 1.1)
pt3dadd(-820, -81.5, -107.5, 1)
pt3dadd(-823, -81.5, -107.5, 0.8)
pt3dadd(-825, -83, -107.5, 0.8)
pt3dadd(-828, -86.5, -107.5, 0.9)
pt3dadd(-831.5, -90, -111.5, 1.1)
pt3dadd(-833, -91.5, -111.5, 1.1)
pt3dadd(-835, -93.5, -111.5, 1.1)
pt3dadd(-838.5, -93.5, -111.5, 1.1)
pt3dadd(-841, -94, -111.5, 1.1)
pt3dadd(-846.5, -96, -111.5, 1.1)
pt3dadd(-849.5, -96, -111.5, 1.1)
pt3dadd(-853, -96.5, -111.5, 1.1)
pt3dadd(-856, -98, -107.5, 1.1)
pt3dadd(-862, -101, -111.5, 1.2)
pt3dadd(-864.5, -101, -115.5, 1.2)
pt3dadd(-868, -103, -115.5, 1.2)
pt3dadd(-872.5, -104.5, -115.5, 1.2)
pt3dadd(-875, -104.5, -115.5, 1.2)
pt3dadd(-877, -106.5, -107.5, 1.2)
pt3dadd(-880.5, -108, -107.5, 1.2)
pt3dadd(-883.5, -109, -107.5, 1.2)
pt3dadd(-888, -110, -111.5, 1.5)
pt3dadd(-892, -110, -111.5, 1.5)
pt3dadd(-897, -112, -107.5, 1.4)
pt3dadd(-899.5, -112, -107.5, 1.4)
pt3dadd(-903, -112, -107.5, 1.2)
pt3dadd(-906.5, -112, -103, 1.2)
pt3dadd(-917.5, -111.5, -103, 1.2)
pt3dadd(-919.5, -111.5, -103, 1.2)
pt3dadd(-922, -111.5, -95, 1.4)
pt3dadd(-925.5, -111.5, -103, 1)
pt3dadd(-929.5, -111, -103, 1.1)
pt3dadd(-932.5, -111, -103, 1.1)
pt3dadd(-935, -110, -99, 1.1)
pt3dadd(-939.5, -110, -103, 1.3)
pt3dadd(-944, -110, -107.5, 1.3)
pt3dadd(-948.5, -110, -107.5, 1.3)
pt3dadd(-952.5, -110, -107.5, 1.3)
pt3dadd(-956.5, -110, -107.5, 1.3)
pt3dadd(-961.5, -110.5, -107.5, 1.3)
pt3dadd(-966.5, -113, -107.5, 1.3)
pt3dadd(-970.5, -113, -107.5, 1.3)
pt3dadd(-975, -113.5, -111.5, 1.4)
pt3dadd(-977.5, -114, -111.5, 1.4)
pt3dadd(-981, -116, -111.5, 1.4)
pt3dadd(-983.5, -119, -107.5, 0.9)
pt3dadd(-985, -119.5, -103, 0.9)
pt3dadd(-985, -121.5, -107.5, 0.9)
pt3dadd(-986, -123, -103, 0.9)
pt3dadd(-986.5, -125.5, -103, 1.1)
pt3dadd(-988.5, -127, -103, 1.3)
pt3dadd(-989, -128, -103, 1.1)
pt3dadd(-989.5, -130.5, -103, 0.6)
pt3dadd(-989.5, -132.5, -103, 0.6)
pt3dadd(-991, -135, -103, 0.6)
pt3dadd(-991, -137, -103, 0.6)
pt3dadd(-991, -138.5, -99, 0.6)
pt3dadd(-991, -139.5, -99, 0.6)
pt3dadd(-992, -141.5, -103, 0.7)
pt3dadd(-992, -142.5, -103, 0.7)
pt3dadd(-991.5, -145, -107.5, 0.7)
pt3dadd(-993, -147.5, -103, 0.6)
pt3dadd(-995.5, -152, -99, 0.6)
pt3dadd(-998.5, -154, -99, 0.6)
pt3dadd(-1001, -156, -99, 0.6)
pt3dadd(-1002.5, -158.5, -99, 0.7)
pt3dadd(-1003, -160.5, -107.5, 0.7)
pt3dadd(-1003, -162, -107.5, 0.7)
pt3dadd(-1003, -163.5, -107.5, 0.7)
pt3dadd(-1004.5, -166, -107.5, 0.6)
}
}
proc shape3d_19() {
dend[44] { pt3dadd(-1004.5, -168, -107.5, 0.6)
pt3dadd(-1006, -169, -107.5, 0.6)
pt3dadd(-1007, -172, -107.5, 0.6)
pt3dadd(-1007, -173.5, -103, 0.9)
pt3dadd(-1006.5, -177, -103, 0.9)
}
dend[45] {pt3dclear()
pt3dadd(-735.5, -10.5, -99.5, 4.9)
pt3dadd(-738.5, -10.5, -103, 0.6)
pt3dadd(-743, -10.5, -99.5, 0.7)
pt3dadd(-749, -11, -111, 0.7)
pt3dadd(-751.5, -11, -111, 0.7)
pt3dadd(-755, -13, -111, 0.7)
pt3dadd(-757, -15, -107, 0.7)
pt3dadd(-761, -17.5, -107, 0.8)
pt3dadd(-764, -18.5, -107, 0.8)
pt3dadd(-768, -20.5, -107, 0.8)
}
dend[46] {pt3dclear()
pt3dadd(-528.5, 31, -147, 3.6)
pt3dadd(-533.5, 31, -149.5, 0.7)
pt3dadd(-539.5, 32.5, -147, 0.8)
pt3dadd(-542.5, 33, -147, 0.8)
pt3dadd(-546, 34.5, -147, 0.8)
pt3dadd(-550, 39.5, -147, 0.8)
pt3dadd(-554, 43.5, -141.5, 0.8)
}
dend[47] {pt3dclear()
pt3dadd(-255, 84, -107, 4)
pt3dadd(-258, 84, -107, 2.9)
pt3dadd(-260, 84.5, -103, 2.6)
pt3dadd(-262, 87, -107, 2.5)
pt3dadd(-267, 85.5, -107, 3.6)
pt3dadd(-272, 83.5, -111, 4)
pt3dadd(-270.5, 85, -115, 3.5)
pt3dadd(-269, 87, -115, 3.2)
pt3dadd(-267.5, 87, -115, 2.8)
pt3dadd(-265.5, 87, -123.5, 2.8)
pt3dadd(-265.5, 89, -127.5, 2.8)
pt3dadd(-267.5, 87.5, -127.5, 2.8)
pt3dadd(-269.5, 88.5, -119.5, 2.2)
pt3dadd(-271.5, 89.5, -123.5, 2.2)
pt3dadd(-275.5, 90.5, -115, 2.2)
pt3dadd(-277.5, 90.5, -115, 2)
pt3dadd(-278, 90.5, -123.5, 2)
pt3dadd(-280.5, 93, -111, 1.8)
pt3dadd(-280.5, 94.5, -123.5, 1.8)
pt3dadd(-283.5, 98.5, -123.5, 2)
pt3dadd(-285.5, 99.5, -123.5, 2.2)
pt3dadd(-287, 100.5, -123.5, 2.2)
pt3dadd(-288.5, 100.5, -132, 1.6)
pt3dadd(-293, 102, -123.5, 2.4)
pt3dadd(-295, 102, -123.5, 2.1)
pt3dadd(-297.5, 102.5, -123.5, 2.1)
pt3dadd(-301, 103.5, -119.5, 1.5)
pt3dadd(-303, 105.5, -123.5, 1.5)
pt3dadd(-307.5, 105.5, -123.5, 1.7)
pt3dadd(-309, 105.5, -123.5, 1.7)
pt3dadd(-311, 106.5, -123.5, 1.9)
pt3dadd(-312.5, 109, -123.5, 2.2)
pt3dadd(-314, 111, -126, 2.2)
pt3dadd(-314.5, 112.5, -126, 1.9)
pt3dadd(-316, 114, -126, 1.1)
pt3dadd(-317.5, 114, -123.5, 1.1)
pt3dadd(-322, 116.5, -123.5, 2.3)
pt3dadd(-322.5, 118, -121, 2.3)
pt3dadd(-323, 119.5, -129, 2.3)
pt3dadd(-324.5, 119.5, -131.5, 1.7)
pt3dadd(-328, 119.5, -129, 2)
pt3dadd(-329.5, 119.5, -129, 2)
pt3dadd(-328.5, 122.5, -129, 2.1)
pt3dadd(-329, 124, -129, 1.9)
pt3dadd(-331, 126, -134, 1.4)
pt3dadd(-333.5, 127, -134, 1.4)
pt3dadd(-336, 127, -136.5, 1.4)
pt3dadd(-339.5, 127, -136.5, 1.5)
pt3dadd(-342, 127, -136.5, 1.5)
pt3dadd(-343.5, 127, -136.5, 1.5)
pt3dadd(-344.5, 127, -136.5, 1.5)
pt3dadd(-346, 128.5, -136.5, 1.5)
pt3dadd(-347.5, 129.5, -136.5, 1.8)
pt3dadd(-350, 129.5, -136.5, 1.8)
pt3dadd(-352, 129.5, -136.5, 1.3)
pt3dadd(-354, 129.5, -136.5, 1.4)
pt3dadd(-356.5, 129.5, -136.5, 1.4)
pt3dadd(-359.5, 130, -136.5, 1.6)
pt3dadd(-363, 132, -134, 1.6)
pt3dadd(-365.5, 132, -139.5, 1.6)
pt3dadd(-367.5, 132, -139.5, 1.5)
pt3dadd(-371, 132.5, -139.5, 1.3)
pt3dadd(-373.5, 133, -139.5, 1.2)
pt3dadd(-376.5, 134, -136.5, 1)
pt3dadd(-378.5, 134, -147, 1.4)
pt3dadd(-381, 134, -147, 1.4)
pt3dadd(-383.5, 134, -144.5, 1.4)
pt3dadd(-388, 134, -139.5, 1.4)
pt3dadd(-390.5, 134, -142, 1.3)
pt3dadd(-393, 134, -142, 1.3)
pt3dadd(-396.5, 134, -142, 1.3)
pt3dadd(-401.5, 137, -139.5, 1.7)
pt3dadd(-404.5, 138, -147, 1.7)
pt3dadd(-407.5, 140.5, -144.5, 1.9)
pt3dadd(-409, 142, -142, 1.9)
pt3dadd(-411, 144, -142, 1.9)
pt3dadd(-414.5, 145.5, -142, 1.9)
pt3dadd(-417.5, 145.5, -147, 2)
pt3dadd(-421, 146.5, -147, 2.1)
pt3dadd(-425, 148.5, -147, 1.9)
pt3dadd(-427.5, 151, -147, 1.8)
pt3dadd(-428.5, 153, -147, 1.8)
pt3dadd(-430, 153, -147, 1.6)
pt3dadd(-433, 153, -155, 1.3)
pt3dadd(-437.5, 153, -155, 0.7)
pt3dadd(-439.5, 152, -163.5, 0.9)
pt3dadd(-440.5, 152.5, -147, 0.7)
pt3dadd(-440.5, 153.5, -147, 0.7)
pt3dadd(-441.5, 155.5, -159.5, 1.2)
pt3dadd(-443, 156, -159.5, 1.2)
pt3dadd(-444.5, 155.5, -159.5, 1.2)
pt3dadd(-446.5, 155, -155, 1.3)
pt3dadd(-449.5, 155, -159.5, 1.3)
pt3dadd(-451.5, 155.5, -167.5, 1.1)
pt3dadd(-452.5, 157.5, -159.5, 1.1)
pt3dadd(-454, 159, -159.5, 1.3)
pt3dadd(-455.5, 160.5, -159.5, 1.3)
pt3dadd(-457.5, 161, -151, 1.2)
pt3dadd(-459, 161.5, -151, 1.5)
pt3dadd(-461.5, 162, -159.5, 1.2)
pt3dadd(-463.5, 163.5, -167.5, 1.6)
pt3dadd(-464.5, 163.5, -159.5, 1.6)
pt3dadd(-467, 165, -159.5, 1.6)
pt3dadd(-470, 166, -159.5, 1.4)
pt3dadd(-472, 166, -159.5, 1.4)
pt3dadd(-473.5, 168, -155, 1.4)
pt3dadd(-476.5, 170, -163.5, 1.8)
pt3dadd(-479, 171, -163.5, 1.7)
pt3dadd(-482.5, 173, -159.5, 1.4)
pt3dadd(-487, 173.5, -155, 1.4)
pt3dadd(-489, 174, -155, 1.4)
pt3dadd(-492.5, 175.5, -159.5, 1.4)
pt3dadd(-495.5, 175.5, -163.5, 1.2)
pt3dadd(-497.5, 176, -163.5, 1.3)
pt3dadd(-499.5, 176, -163.5, 1.4)
pt3dadd(-503.5, 177, -163.5, 1.7)
pt3dadd(-505.5, 178.5, -163.5, 1.7)
pt3dadd(-507.5, 179.5, -163.5, 1.5)
pt3dadd(-509.5, 180.5, -163.5, 1.2)
pt3dadd(-512, 180.5, -163.5, 0.9)
pt3dadd(-513.5, 180.5, -159.5, 1.1)
pt3dadd(-515, 180.5, -159.5, 1.1)
pt3dadd(-517, 182, -159.5, 0.8)
pt3dadd(-518.5, 182.5, -163.5, 0.8)
pt3dadd(-520.5, 184, -163.5, 0.9)
pt3dadd(-523, 184.5, -167.5, 1.6)
pt3dadd(-524.5, 186, -167.5, 0.9)
pt3dadd(-527, 186, -167.5, 1.4)
pt3dadd(-530.5, 186.5, -167.5, 1.4)
pt3dadd(-532, 188, -159.5, 1.1)
pt3dadd(-537, 189, -167.5, 1.1)
pt3dadd(-540, 188, -167.5, 1.1)
pt3dadd(-543.5, 188, -167.5, 1.1)
pt3dadd(-546.5, 188, -167.5, 0.9)
pt3dadd(-551, 188.5, -172, 1.1)
pt3dadd(-553, 188.5, -172, 1)
pt3dadd(-554.5, 188.5, -172, 0.9)
pt3dadd(-556, 187.5, -167.5, 0.9)
pt3dadd(-557.5, 187.5, -172, 0.9)
pt3dadd(-559.5, 187, -172, 1)
pt3dadd(-561, 187, -167.5, 1.3)
pt3dadd(-563.5, 187, -176, 1.3)
pt3dadd(-566, 186, -176, 1.4)
pt3dadd(-569.5, 184.5, -176, 1.4)
pt3dadd(-572, 183.5, -172, 1.1)
pt3dadd(-574.5, 183.5, -172, 0.9)
pt3dadd(-575, 182, -172, 0.9)
pt3dadd(-576, 181, -167.5, 1.1)
pt3dadd(-580, 178, -167.5, 1.1)
pt3dadd(-581.5, 177, -167.5, 0.9)
pt3dadd(-584.5, 176.5, -167.5, 0.8)
pt3dadd(-586, 176.5, -167.5, 0.8)
pt3dadd(-587.5, 175, -176, 0.8)
pt3dadd(-589.5, 173.5, -172, 0.8)
pt3dadd(-591, 172.5, -172, 0.8)
pt3dadd(-596.5, 171.5, -176, 0.8)
pt3dadd(-599.5, 169.5, -176, 0.9)
pt3dadd(-600.5, 168.5, -176, 0.9)
pt3dadd(-606.5, 167.5, -172, 1.1)
pt3dadd(-607, 166, -172, 1.1)
pt3dadd(-608.5, 165, -172, 1)
pt3dadd(-610, 164, -172, 0.9)
pt3dadd(-612.5, 164, -172, 0.9)
pt3dadd(-615, 164, -172, 0.9)
pt3dadd(-618, 163, -172, 0.9)
pt3dadd(-621.5, 162.5, -172, 0.9)
pt3dadd(-627, 159.5, -172, 1)
pt3dadd(-629, 159.5, -172, 1)
pt3dadd(-631.5, 159.5, -172, 1)
pt3dadd(-635.5, 157.5, -176, 1)
pt3dadd(-637, 157.5, -172, 1.4)
pt3dadd(-638.5, 157.5, -172, 1.3)
pt3dadd(-640.5, 156, -172, 1.1)
pt3dadd(-642, 154.5, -172, 1.1)
pt3dadd(-644, 152.5, -176, 1.1)
pt3dadd(-645.5, 151, -176, 1.1)
pt3dadd(-650, 149.5, -172, 1.1)
pt3dadd(-652, 149.5, -172, 0.9)
}
}
proc shape3d_20() {
dend[47] { pt3dadd(-653.5, 149.5, -172, 0.9)
pt3dadd(-655, 149.5, -172, 0.9)
pt3dadd(-655, 148.5, -167.5, 1.1)
pt3dadd(-657, 146, -172, 1.1)
pt3dadd(-662, 143.5, -172, 1.2)
pt3dadd(-664, 143.5, -172, 1.2)
pt3dadd(-670, 142.5, -176, 1.3)
pt3dadd(-673, 142, -176, 1.3)
pt3dadd(-677, 139.5, -176, 1.3)
pt3dadd(-679, 138.5, -176, 1.1)
pt3dadd(-681, 138.5, -176, 1)
pt3dadd(-683, 136.5, -176, 0.9)
pt3dadd(-684.5, 136.5, -176, 0.9)
pt3dadd(-686.5, 135.5, -176, 0.9)
pt3dadd(-693, 133, -176, 1.1)
pt3dadd(-695, 132, -176, 1.1)
pt3dadd(-696.5, 131.5, -172, 1.1)
pt3dadd(-700.5, 131.5, -167.5, 1.1)
pt3dadd(-704.5, 131.5, -167.5, 1.1)
pt3dadd(-708.5, 131, -172, 0.8)
pt3dadd(-712, 133, -163.5, 1)
pt3dadd(-713.5, 135.5, -159.5, 1)
pt3dadd(-715.5, 136.5, -159.5, 0.7)
pt3dadd(-717.5, 136.5, -159.5, 0.7)
pt3dadd(-719.5, 136.5, -159.5, 0.7)
pt3dadd(-721.5, 138, -159.5, 0.7)
pt3dadd(-725.5, 139, -159.5, 0.7)
pt3dadd(-729.5, 139, -159.5, 0.7)
pt3dadd(-733, 139, -163.5, 0.9)
pt3dadd(-735, 139, -163.5, 0.9)
pt3dadd(-737, 138.5, -163.5, 0.8)
pt3dadd(-740.5, 137.5, -163.5, 0.8)
pt3dadd(-744, 137.5, -163.5, 0.8)
pt3dadd(-748.5, 138.5, -167.5, 0.9)
pt3dadd(-753.5, 138, -167.5, 0.9)
pt3dadd(-756, 140, -167.5, 1.1)
pt3dadd(-759.5, 140, -167.5, 1.1)
pt3dadd(-763.5, 142, -167.5, 1.1)
pt3dadd(-765.5, 144, -167.5, 1.1)
pt3dadd(-768, 145, -176, 1.1)
pt3dadd(-772, 143, -172, 1.1)
pt3dadd(-774, 143, -176, 1.1)
pt3dadd(-776, 144.5, -176, 1.1)
pt3dadd(-778, 145.5, -176, 1.3)
pt3dadd(-780, 146.5, -176, 1.3)
pt3dadd(-783, 147, -176, 1.3)
}
dend[48] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 5.4)
pt3dadd(-14, 52, -15, 5.4)
pt3dadd(-16.5, 55, -8, 4.8)
pt3dadd(-17, 58, -21.5, 2.7)
pt3dadd(-18, 60.5, -26, 3.1)
pt3dadd(-18.5, 62.5, -21.5, 3.4)
pt3dadd(-19, 64.5, -21.5, 3.2)
pt3dadd(-19.5, 66, -21.5, 3.6)
pt3dadd(-20.5, 68, -21.5, 4.6)
pt3dadd(-21.5, 70.5, -21.5, 4.9)
pt3dadd(-22.5, 72.5, -26, 4.9)
pt3dadd(-24, 75, -30, 4.9)
pt3dadd(-25.5, 77.5, -33.5, 6.1)
pt3dadd(-27, 79.5, -30, 5.9)
pt3dadd(-28, 83, -30, 3.4)
pt3dadd(-29, 84, -30, 2.9)
pt3dadd(-31.5, 87, -33.5, 4)
pt3dadd(-32.5, 90, -41.5, 4.9)
pt3dadd(-36, 96, -45, 5.6)
pt3dadd(-36, 98, -41.5, 5)
pt3dadd(-36.5, 99.5, -41.5, 4.3)
pt3dadd(-39, 100.5, -49, 3.8)
pt3dadd(-43.5, 102.5, -45, 4)
pt3dadd(-46, 104, -53, 3.8)
pt3dadd(-48.5, 106.5, -45, 3.4)
pt3dadd(-52.5, 108.5, -45, 2.1)
pt3dadd(-54.5, 110, -53, 2.1)
pt3dadd(-57, 112, -49, 1.8)
pt3dadd(-59.5, 113.5, -49, 1.6)
pt3dadd(-61.5, 114, -60.5, 2.7)
}
dend[49] {pt3dclear()
pt3dadd(-61.5, 114, -60.5, 2.7)
pt3dadd(-69.5, 115.5, -53, 2.8)
pt3dadd(-74.5, 117.5, -53, 2.9)
pt3dadd(-80, 119, -56.5, 2.5)
pt3dadd(-82.5, 120.5, -56.5, 2.5)
pt3dadd(-85.5, 122, -56.5, 2.5)
pt3dadd(-90, 123.5, -53, 2.5)
pt3dadd(-93, 123.5, -53, 2.5)
pt3dadd(-96, 126, -53, 2.9)
pt3dadd(-99.5, 127, -56.5, 2.9)
pt3dadd(-104.5, 129.5, -53, 3.2)
pt3dadd(-109.5, 130, -53, 2.7)
pt3dadd(-115.5, 133, -53, 2.8)
pt3dadd(-122.5, 137, -53, 2.6)
pt3dadd(-129, 140.5, -53, 2.6)
pt3dadd(-138.5, 143, -64.5, 3)
pt3dadd(-141, 143.5, -64.5, 3.6)
pt3dadd(-146.5, 145.5, -64.5, 3.9)
pt3dadd(-150.5, 147, -68.5, 4)
pt3dadd(-153, 147, -64.5, 3.1)
pt3dadd(-155.5, 147.5, -64.5, 3.1)
pt3dadd(-161, 149, -64.5, 3.4)
pt3dadd(-166, 151, -64.5, 2.9)
pt3dadd(-170, 153.5, -60.5, 3.2)
pt3dadd(-173.5, 156, -68.5, 2.8)
pt3dadd(-175.5, 157.5, -68.5, 2.8)
pt3dadd(-179.5, 159.5, -68.5, 2.8)
pt3dadd(-184.5, 159.5, -60.5, 2.6)
pt3dadd(-188.5, 161, -64.5, 2.2)
pt3dadd(-191, 165.5, -68.5, 2.8)
pt3dadd(-193, 167.5, -68.5, 2.7)
pt3dadd(-196, 168.5, -68.5, 2.7)
pt3dadd(-198, 169.5, -68.5, 3.6)
pt3dadd(-200, 170, -64.5, 4.4)
}
dend[50] {pt3dclear()
pt3dadd(-200, 170, -64.5, 4.4)
pt3dadd(-201.5, 171.5, -68.5, 1.6)
pt3dadd(-203, 172.5, -68.5, 1.6)
pt3dadd(-205, 175, -68.5, 1.7)
pt3dadd(-206.5, 178.5, -64.5, 2)
pt3dadd(-208, 180.5, -64.5, 2.1)
pt3dadd(-208.5, 182, -64.5, 2.1)
pt3dadd(-211.5, 186.5, -64.5, 2.2)
pt3dadd(-213, 188.5, -64.5, 2.2)
pt3dadd(-214, 190, -64.5, 2.3)
pt3dadd(-216.5, 194.5, -64.5, 1.9)
pt3dadd(-218.5, 196, -64.5, 1.7)
pt3dadd(-219.5, 196.5, -64.5, 2.5)
pt3dadd(-223, 201.5, -60.5, 1.3)
pt3dadd(-225, 201.5, -68.5, 1.2)
pt3dadd(-226.5, 203, -68.5, 1.4)
pt3dadd(-229, 206, -64.5, 1.4)
pt3dadd(-229, 208.5, -64.5, 1.6)
pt3dadd(-230.5, 210, -64.5, 1.7)
pt3dadd(-232, 212, -60.5, 1.7)
pt3dadd(-233.5, 212.5, -64.5, 1.7)
pt3dadd(-238, 213.5, -68.5, 1.5)
pt3dadd(-240, 214, -64.5, 1.4)
pt3dadd(-242.5, 215, -60.5, 1.3)
pt3dadd(-244.5, 215.5, -60.5, 1.4)
pt3dadd(-247, 216.5, -60.5, 1.4)
pt3dadd(-249.5, 216, -64.5, 1.4)
pt3dadd(-251, 216, -68.5, 1.4)
pt3dadd(-253.5, 216, -64.5, 1.3)
pt3dadd(-255.5, 217, -64.5, 1.3)
pt3dadd(-257, 218.5, -64.5, 1.5)
pt3dadd(-259, 220.5, -64.5, 1.9)
pt3dadd(-260.5, 222, -64.5, 1.6)
pt3dadd(-262, 224, -68.5, 1.7)
pt3dadd(-264, 225.5, -64.5, 2.2)
}
dend[51] {pt3dclear()
pt3dadd(-264, 225.5, -64.5, 2.2)
pt3dadd(-267.5, 229.5, -68.5, 0.9)
pt3dadd(-270.5, 233.5, -72, 1.1)
pt3dadd(-271.5, 235, -72, 1.3)
pt3dadd(-274.5, 239, -68.5, 1.1)
pt3dadd(-278, 242.5, -68.5, 0.9)
pt3dadd(-280.5, 243.5, -68.5, 1.4)
pt3dadd(-282.5, 245, -68.5, 1.5)
pt3dadd(-286.5, 247.5, -68.5, 0.8)
pt3dadd(-287.5, 248.5, -68.5, 0.8)
pt3dadd(-289, 249.5, -68.5, 0.8)
pt3dadd(-292, 253, -68.5, 1.2)
pt3dadd(-293.5, 254.5, -68.5, 1.4)
pt3dadd(-295, 255.5, -68.5, 1.4)
pt3dadd(-297.5, 257.5, -68.5, 1.1)
pt3dadd(-299.5, 259, -68.5, 0.8)
pt3dadd(-301.5, 259.5, -68.5, 0.7)
pt3dadd(-304.5, 262.5, -72, 0.8)
pt3dadd(-306.5, 264, -72, 0.8)
pt3dadd(-308, 265.5, -72, 1)
pt3dadd(-310.5, 266.5, -72, 0.9)
pt3dadd(-312, 268.5, -72, 0.8)
pt3dadd(-313.5, 269, -72, 1)
pt3dadd(-316, 271, -76, 1)
pt3dadd(-318, 271, -64.5, 0.7)
pt3dadd(-321, 271.5, -64.5, 0.9)
pt3dadd(-326, 271.5, -64.5, 0.5)
pt3dadd(-328, 271.5, -64.5, 0.7)
pt3dadd(-330.5, 271.5, -72, 0.8)
pt3dadd(-333, 271.5, -68.5, 0.8)
pt3dadd(-336, 271.5, -68.5, 0.9)
pt3dadd(-343.5, 271.5, -72, 1.2)
pt3dadd(-347, 271, -64.5, 0.9)
pt3dadd(-350, 270, -64.5, 1.1)
pt3dadd(-352.5, 268.5, -64.5, 1.1)
pt3dadd(-354.5, 268.5, -60.5, 1.3)
pt3dadd(-357.5, 268.5, -64.5, 1.1)
pt3dadd(-359.5, 267.5, -64.5, 0.9)
pt3dadd(-362, 267.5, -64.5, 0.9)
pt3dadd(-363, 267.5, -64.5, 0.9)
pt3dadd(-367, 271, -64.5, 1.1)
pt3dadd(-370, 271, -64.5, 1.2)
pt3dadd(-372, 271, -64.5, 1.3)
pt3dadd(-377, 272, -64.5, 1.3)
pt3dadd(-379, 274, -60.5, 1.6)
pt3dadd(-382, 274.5, -60.5, 1.6)
pt3dadd(-384.5, 276, -60.5, 1.4)
pt3dadd(-388.5, 277.5, -60.5, 1.2)
pt3dadd(-392, 278, -60.5, 1.2)
pt3dadd(-395, 278, -68.5, 1)
pt3dadd(-397.5, 278, -68.5, 1.3)
pt3dadd(-399.5, 279, -68.5, 0.8)
pt3dadd(-401, 280, -68.5, 0.8)
pt3dadd(-402.5, 281.5, -68.5, 0.9)
pt3dadd(-405.5, 285, -72, 0.8)
}
}
proc shape3d_21() {
dend[51] { pt3dadd(-408, 285, -72, 0.8)
pt3dadd(-409.5, 285, -72, 0.8)
pt3dadd(-412, 287, -72, 0.8)
pt3dadd(-413.5, 288, -76, 0.8)
pt3dadd(-417, 288, -76, 1)
pt3dadd(-419, 288, -76, 1)
pt3dadd(-421, 289.5, -76, 1.1)
pt3dadd(-423.5, 290.5, -76, 1)
pt3dadd(-426, 290.5, -76, 1)
pt3dadd(-427.5, 291.5, -68.5, 0.9)
pt3dadd(-429, 291.5, -76, 0.8)
pt3dadd(-431.5, 293, -76, 0.8)
pt3dadd(-434.5, 292.5, -83.5, 0.8)
pt3dadd(-437.5, 292.5, -87.5, 0.8)
pt3dadd(-440, 294, -87.5, 0.7)
pt3dadd(-442, 294, -87.5, 0.7)
pt3dadd(-445, 294, -87.5, 0.7)
pt3dadd(-448, 293, -95, 0.9)
pt3dadd(-450.5, 293, -87.5, 1)
pt3dadd(-457, 292.5, -91.5, 1)
pt3dadd(-460, 292.5, -91.5, 1)
pt3dadd(-462.5, 292, -91.5, 0.8)
pt3dadd(-464, 292, -95, 0.8)
pt3dadd(-465, 292.5, -95, 0.9)
pt3dadd(-467.5, 292.5, -95, 1.1)
pt3dadd(-469.5, 292.5, -95, 1.1)
pt3dadd(-471, 293.5, -91.5, 0.7)
pt3dadd(-475.5, 293.5, -91.5, 0.9)
pt3dadd(-479.5, 291.5, -95.5, 1.2)
pt3dadd(-483, 291.5, -95.5, 1.5)
pt3dadd(-485.5, 291.5, -99.5, 1.3)
pt3dadd(-489, 291.5, -95.5, 1.3)
pt3dadd(-490.5, 291.5, -95.5, 1.3)
pt3dadd(-492.5, 291.5, -95.5, 1)
pt3dadd(-494.5, 291.5, -95.5, 1.2)
pt3dadd(-496.5, 292.5, -99.5, 1)
pt3dadd(-498, 293, -99.5, 0.9)
pt3dadd(-502, 293, -99.5, 1.2)
pt3dadd(-504, 295, -95.5, 1.1)
pt3dadd(-504, 297.5, -99.5, 1.1)
pt3dadd(-506.5, 298, -99.5, 1.1)
pt3dadd(-508.5, 298, -104, 1.1)
pt3dadd(-509.5, 298, -104, 1.1)
pt3dadd(-510.5, 299, -104, 1.1)
pt3dadd(-512.5, 299, -104, 1.1)
pt3dadd(-513, 300.5, -104, 1.1)
pt3dadd(-517.5, 301.5, -108, 1.1)
pt3dadd(-519.5, 301, -108, 0.9)
pt3dadd(-521.5, 300.5, -104, 0.7)
pt3dadd(-524, 300.5, -104, 0.7)
pt3dadd(-525.5, 301.5, -108, 0.7)
pt3dadd(-527.5, 301, -104, 0.7)
pt3dadd(-529, 301, -104, 0.7)
pt3dadd(-531, 301, -104, 0.7)
pt3dadd(-533, 300.5, -104, 0.9)
pt3dadd(-534, 301, -108, 0.9)
pt3dadd(-537.5, 303.5, -104, 0.9)
pt3dadd(-539.5, 303.5, -104, 0.9)
pt3dadd(-542, 302.5, -104, 1.1)
pt3dadd(-544.5, 302, -104, 1.1)
pt3dadd(-547, 301, -104, 0.9)
pt3dadd(-548, 301, -104, 0.9)
pt3dadd(-549, 300, -104, 0.9)
pt3dadd(-550, 298.5, -104, 1.5)
pt3dadd(-551.5, 298.5, -104, 1.7)
pt3dadd(-553, 298.5, -104, 1.3)
pt3dadd(-553.5, 298.5, -104, 0.7)
pt3dadd(-554.5, 298.5, -104, 0.7)
pt3dadd(-556, 299.5, -108, 0.7)
pt3dadd(-559.5, 299.5, -104, 1.3)
pt3dadd(-561.5, 299.5, -99.5, 1.5)
pt3dadd(-562.5, 298.5, -104, 1.1)
pt3dadd(-564, 298, -104, 1.1)
pt3dadd(-566, 296.5, -104, 1.4)
pt3dadd(-567, 294.5, -104, 0.9)
pt3dadd(-568.5, 293.5, -104, 1)
pt3dadd(-569.5, 291, -104, 1)
pt3dadd(-572.5, 288.5, -104, 1)
pt3dadd(-575.5, 288.5, -104, 1.2)
pt3dadd(-580, 287, -116.5, 1.7)
}
dend[52] {pt3dclear()
pt3dadd(-264, 225.5, -64.5, 2.2)
pt3dadd(-265.5, 229, -68.5, 1)
pt3dadd(-265, 230.5, -76, 1)
pt3dadd(-266, 233.5, -72, 1)
pt3dadd(-268.5, 232.5, -76, 0.8)
pt3dadd(-270, 230.5, -76, 0.8)
pt3dadd(-271, 230.5, -76, 0.8)
pt3dadd(-272, 232, -76, 0.8)
pt3dadd(-272, 233, -72, 0.8)
pt3dadd(-272.5, 235, -83.5, 1)
pt3dadd(-275.5, 236.5, -83.5, 1)
pt3dadd(-275.5, 238, -83.5, 1.2)
pt3dadd(-275, 239.5, -83.5, 1.2)
pt3dadd(-275, 241, -83.5, 1.2)
pt3dadd(-275.5, 243.5, -87.5, 0.9)
pt3dadd(-277.5, 245, -87.5, 1.1)
pt3dadd(-278.5, 246, -87.5, 1.5)
pt3dadd(-278.5, 247, -87.5, 1.1)
pt3dadd(-278.5, 247.5, -87.5, 0.8)
pt3dadd(-280, 248.5, -87.5, 0.8)
pt3dadd(-282.5, 251.5, -87.5, 0.7)
pt3dadd(-284, 253.5, -87.5, 0.7)
pt3dadd(-284.5, 255, -87.5, 0.7)
pt3dadd(-286.5, 255, -87.5, 0.7)
pt3dadd(-289, 256, -87.5, 0.7)
pt3dadd(-294, 256, -83.5, 0.7)
pt3dadd(-296, 256, -91.5, 1.1)
pt3dadd(-299, 256, -91.5, 0.9)
pt3dadd(-301, 257, -91.5, 0.9)
pt3dadd(-304, 257, -91.5, 0.9)
pt3dadd(-307, 257.5, -87.5, 0.9)
pt3dadd(-309, 258, -95, 0.9)
pt3dadd(-311.5, 259, -95, 0.7)
pt3dadd(-314.5, 259, -95, 0.5)
}
dend[53] {pt3dclear()
pt3dadd(-200, 170, -64.5, 4.4)
pt3dadd(-203, 169, -72, 2.5)
pt3dadd(-206.5, 168.5, -72, 1.7)
pt3dadd(-209, 168.5, -76, 1.5)
pt3dadd(-209.5, 169, -68.5, 2)
pt3dadd(-211.5, 170, -76, 1.9)
pt3dadd(-213, 167, -83.5, 1.7)
pt3dadd(-215.5, 167, -83.5, 1.5)
pt3dadd(-216.5, 167, -83.5, 1.5)
pt3dadd(-218, 166.5, -83.5, 1.5)
pt3dadd(-219, 165, -83.5, 1.5)
pt3dadd(-219, 163, -91.5, 1.6)
pt3dadd(-219, 161, -91.5, 1.6)
pt3dadd(-219, 160, -91.5, 1.2)
pt3dadd(-220.5, 158.5, -87.5, 1.2)
pt3dadd(-223, 158.5, -87.5, 1.3)
pt3dadd(-224, 158.5, -87.5, 1.1)
pt3dadd(-227.5, 156.5, -99, 1.4)
pt3dadd(-230, 156.5, -103, 1.6)
pt3dadd(-231.5, 157.5, -95, 1.6)
pt3dadd(-233.5, 157.5, -95, 1.6)
pt3dadd(-235.5, 156, -99, 1.6)
pt3dadd(-237, 156, -103, 1.6)
pt3dadd(-237, 156.5, -99, 1.6)
pt3dadd(-238, 157.5, -103, 1.6)
pt3dadd(-239, 154.5, -99, 1.9)
pt3dadd(-242, 152, -103, 2.1)
pt3dadd(-242, 153, -107.5, 1.8)
pt3dadd(-243.5, 153.5, -107.5, 1.8)
pt3dadd(-245, 153.5, -107.5, 1.8)
pt3dadd(-245.5, 152.5, -111.5, 1.8)
pt3dadd(-246, 150.5, -111.5, 2.1)
pt3dadd(-248, 149.5, -107.5, 2.1)
pt3dadd(-249.5, 148, -111.5, 1.9)
pt3dadd(-251, 147, -111.5, 1.6)
pt3dadd(-255.5, 145.5, -115.5, 2.1)
pt3dadd(-257.5, 145.5, -111.5, 1.7)
pt3dadd(-259.5, 146.5, -107.5, 1.5)
pt3dadd(-261, 147, -115.5, 1.4)
pt3dadd(-263, 147, -115.5, 1.4)
pt3dadd(-266, 148, -120, 1.4)
pt3dadd(-269, 150.5, -125.5, 1.9)
pt3dadd(-273.5, 150.5, -128, 1.4)
pt3dadd(-276, 150.5, -120, 1.4)
pt3dadd(-278, 151, -120, 1.4)
pt3dadd(-281, 151.5, -120, 1.4)
pt3dadd(-284, 152.5, -120, 1.2)
pt3dadd(-288, 153, -122.5, 1.4)
pt3dadd(-290, 153, -122.5, 1.4)
pt3dadd(-292, 154, -122.5, 1.2)
pt3dadd(-293.5, 154.5, -120, 0.9)
pt3dadd(-295.5, 154.5, -120, 1.1)
pt3dadd(-297.5, 154.5, -120, 1.1)
pt3dadd(-299.5, 154.5, -125.5, 1.1)
pt3dadd(-301, 154, -122.5, 1.3)
pt3dadd(-303, 152.5, -125.5, 1.3)
pt3dadd(-307, 152.5, -120, 1.3)
pt3dadd(-308, 152.5, -122.5, 1.2)
pt3dadd(-311.5, 150, -125.5, 1.4)
pt3dadd(-313, 150, -125.5, 1.4)
pt3dadd(-317, 147, -122.5, 1.6)
pt3dadd(-319.5, 145.5, -122.5, 1.6)
pt3dadd(-321.5, 145, -122.5, 1.3)
pt3dadd(-327, 142, -120, 1.5)
pt3dadd(-330, 141, -122.5, 1.2)
pt3dadd(-331.5, 140, -122.5, 1.3)
pt3dadd(-332.5, 139, -122.5, 1.3)
pt3dadd(-336.5, 136.5, -122.5, 1.4)
pt3dadd(-340.5, 135, -122.5, 2.1)
pt3dadd(-344.5, 133, -120, 2.6)
pt3dadd(-348.5, 132, -120, 2.4)
pt3dadd(-353.5, 129.5, -120, 1.4)
pt3dadd(-356, 128, -120, 1.4)
pt3dadd(-357.5, 128, -117.5, 1.4)
pt3dadd(-363.5, 128, -122.5, 1.7)
pt3dadd(-367.5, 125, -122.5, 1.7)
pt3dadd(-370.5, 124.5, -122.5, 1.9)
pt3dadd(-372.5, 123.5, -122.5, 1.9)
pt3dadd(-374, 122.5, -122.5, 1.7)
pt3dadd(-376, 121.5, -122.5, 1.7)
pt3dadd(-378.5, 116, -125.5, 1.6)
pt3dadd(-381, 114, -120, 2)
pt3dadd(-382, 112.5, -120, 1.4)
pt3dadd(-383.5, 111, -120, 1.3)
pt3dadd(-385.5, 111, -120, 1.3)
pt3dadd(-388.5, 111, -120, 1.3)
}
}
proc shape3d_22() {
dend[53] { pt3dadd(-391.5, 109.5, -120, 1.3)
pt3dadd(-393.5, 108, -122.5, 1.5)
pt3dadd(-395.5, 105.5, -122.5, 1.6)
pt3dadd(-397.5, 103.5, -122.5, 1.3)
pt3dadd(-400.5, 101.5, -122.5, 1.3)
pt3dadd(-403, 101.5, -122.5, 1.5)
pt3dadd(-405.5, 100.5, -122.5, 1.5)
pt3dadd(-408, 99.5, -122.5, 1.3)
pt3dadd(-410.5, 99, -122.5, 1.3)
pt3dadd(-414, 97.5, -125.5, 1)
pt3dadd(-417, 96, -125.5, 1)
pt3dadd(-419, 94.5, -125.5, 1)
pt3dadd(-422, 94.5, -125.5, 1)
pt3dadd(-424, 94.5, -125.5, 1)
pt3dadd(-426.5, 93.5, -122.5, 1)
pt3dadd(-429, 92, -122.5, 1.4)
pt3dadd(-431, 90, -122.5, 1.4)
pt3dadd(-435.5, 89, -122.5, 1.4)
pt3dadd(-440, 89, -120, 1.2)
pt3dadd(-442.5, 89, -120, 1.2)
pt3dadd(-449.5, 89, -122.5, 0.8)
pt3dadd(-451.5, 89, -120, 1.4)
pt3dadd(-454, 90.5, -120, 0.7)
pt3dadd(-455.5, 92, -120, 0.7)
pt3dadd(-457.5, 93.5, -120, 0.9)
pt3dadd(-458.5, 94, -120, 1.1)
pt3dadd(-460, 94, -120, 1)
pt3dadd(-463, 94.5, -120, 1)
pt3dadd(-465.5, 95.5, -120, 1.1)
pt3dadd(-467.5, 95.5, -120, 1.2)
pt3dadd(-471, 95.5, -117.5, 1.2)
pt3dadd(-473.5, 95.5, -122.5, 1.2)
pt3dadd(-480, 95.5, -120, 1.2)
pt3dadd(-482.5, 95.5, -117.5, 1.2)
pt3dadd(-485.5, 96.5, -122.5, 1.2)
pt3dadd(-488.5, 96.5, -122.5, 1.2)
pt3dadd(-490, 97, -122.5, 1.2)
pt3dadd(-494.5, 98.5, -122.5, 1.2)
pt3dadd(-496.5, 99.5, -122.5, 1.2)
pt3dadd(-499.5, 100, -122.5, 1.2)
pt3dadd(-501.5, 101.5, -122.5, 1.1)
pt3dadd(-504, 102.5, -122.5, 1.1)
pt3dadd(-506.5, 103.5, -122.5, 1.1)
pt3dadd(-508.5, 105, -122.5, 1.1)
pt3dadd(-511, 105, -122.5, 1.1)
pt3dadd(-515.5, 104.5, -122.5, 1)
pt3dadd(-519.5, 104.5, -122.5, 1)
pt3dadd(-527, 104.5, -125.5, 0.7)
pt3dadd(-532, 106.5, -125.5, 0.7)
pt3dadd(-534.5, 106.5, -125.5, 0.7)
pt3dadd(-538.5, 106.5, -128, 0.7)
pt3dadd(-541, 107.5, -128, 0.9)
pt3dadd(-544.5, 108, -128, 1)
pt3dadd(-546.5, 109.5, -128, 1)
pt3dadd(-549, 109.5, -125.5, 0.9)
pt3dadd(-551.5, 109.5, -125.5, 0.9)
pt3dadd(-555, 109.5, -125.5, 0.9)
pt3dadd(-558, 109.5, -128, 0.9)
pt3dadd(-561.5, 109.5, -125.5, 0.9)
pt3dadd(-564.5, 111, -122.5, 0.9)
pt3dadd(-568.5, 111.5, -125.5, 1.2)
pt3dadd(-571.5, 112.5, -128, 1.2)
pt3dadd(-574.5, 112.5, -128, 1.2)
pt3dadd(-576.5, 112.5, -125.5, 1.1)
pt3dadd(-580.5, 113.5, -125.5, 1.1)
pt3dadd(-587.5, 114, -125.5, 1.2)
pt3dadd(-590, 114, -125.5, 1)
pt3dadd(-593, 114, -125.5, 1)
pt3dadd(-596.5, 114, -125.5, 1)
pt3dadd(-601, 113, -125.5, 1)
pt3dadd(-606.5, 109, -125.5, 1)
pt3dadd(-609, 108, -125.5, 1)
pt3dadd(-612.5, 108, -125.5, 1)
pt3dadd(-614.5, 108, -125.5, 1)
pt3dadd(-617, 108, -125.5, 0.9)
pt3dadd(-621, 109, -125.5, 0.9)
pt3dadd(-623.5, 108, -128, 0.7)
pt3dadd(-626, 108, -125.5, 1.2)
pt3dadd(-630, 108.5, -125.5, 1.2)
pt3dadd(-633, 108.5, -125.5, 0.7)
pt3dadd(-636.5, 108.5, -122.5, 0.9)
pt3dadd(-640, 108.5, -122.5, 0.9)
pt3dadd(-643, 108.5, -122.5, 1.1)
pt3dadd(-645.5, 108.5, -122.5, 0.8)
pt3dadd(-647, 107.5, -122.5, 0.8)
pt3dadd(-648.5, 107.5, -122.5, 0.9)
pt3dadd(-651, 107.5, -122.5, 1.2)
pt3dadd(-654, 109.5, -128, 1.4)
pt3dadd(-656, 110.5, -130.5, 1.1)
pt3dadd(-658, 111, -130.5, 0.9)
pt3dadd(-660.5, 112, -130.5, 0.9)
pt3dadd(-663.5, 112.5, -130.5, 0.9)
pt3dadd(-667.5, 112.5, -130.5, 0.9)
pt3dadd(-670.5, 112.5, -130.5, 0.9)
pt3dadd(-674.5, 114.5, -128, 0.9)
pt3dadd(-677, 116, -128, 0.9)
pt3dadd(-679.5, 117.5, -130.5, 0.9)
pt3dadd(-681.5, 117.5, -130.5, 0.9)
pt3dadd(-683.5, 120, -130.5, 0.7)
pt3dadd(-685.5, 121, -130.5, 0.7)
pt3dadd(-688.5, 121, -136, 0.7)
pt3dadd(-689.5, 121, -133, 0.7)
pt3dadd(-690, 122, -130.5, 0.9)
pt3dadd(-691.5, 122, -130.5, 0.9)
pt3dadd(-695, 121.5, -136, 0.9)
pt3dadd(-696.5, 122.5, -138.5, 0.9)
pt3dadd(-698, 122.5, -138.5, 0.9)
pt3dadd(-699.5, 123, -136, 0.6)
pt3dadd(-699.5, 125, -136, 0.6)
pt3dadd(-700, 126.5, -136, 0.6)
}
dend[54] {pt3dclear()
pt3dadd(-61.5, 114, -60.5, 2.7)
pt3dadd(-64, 113, -56.5, 2)
pt3dadd(-66, 112.5, -64.5, 1.4)
pt3dadd(-67.5, 113.5, -68.5, 1.6)
pt3dadd(-67.5, 111.5, -53, 1.2)
pt3dadd(-70.5, 111.5, -56.5, 1.3)
pt3dadd(-74.5, 111.5, -56.5, 2.8)
pt3dadd(-75.5, 112, -60.5, 2.8)
pt3dadd(-78, 113.5, -60.5, 3.2)
pt3dadd(-79, 113.5, -72, 2.6)
pt3dadd(-80.5, 113, -72, 2.8)
pt3dadd(-82.5, 111.5, -87.5, 3.2)
pt3dadd(-83.5, 109.5, -72, 3.2)
pt3dadd(-82.5, 113, -79.5, 3.1)
pt3dadd(-82.5, 115, -83.5, 3.1)
pt3dadd(-85, 118, -83.5, 3.4)
pt3dadd(-85.5, 116.5, -87.5, 2.6)
pt3dadd(-88.5, 115, -91, 2.5)
pt3dadd(-93, 116.5, -95, 2.2)
pt3dadd(-95, 117.5, -99.5, 2)
pt3dadd(-97.5, 117.5, -107.5, 2)
pt3dadd(-99, 115, -112, 2)
pt3dadd(-97, 113.5, -116, 2)
pt3dadd(-96, 113.5, -128.5, 2.3)
pt3dadd(-94.5, 113.5, -128.5, 2.3)
pt3dadd(-96, 114.5, -124.5, 2.3)
pt3dadd(-97, 116.5, -124.5, 2.3)
pt3dadd(-99, 118.5, -137, 2.3)
pt3dadd(-99, 115, -137, 2.3)
pt3dadd(-100.5, 118, -142.5, 2.3)
pt3dadd(-102, 119, -145, 2.3)
pt3dadd(-101.5, 116, -145, 2.3)
pt3dadd(-105, 119, -147.5, 2.3)
pt3dadd(-103.5, 115, -153, 2.3)
pt3dadd(-106, 115, -155.5, 2)
pt3dadd(-107.5, 115, -153, 2.1)
pt3dadd(-109.5, 114.5, -158, 1.8)
pt3dadd(-111, 112.5, -155.5, 1.9)
pt3dadd(-114.5, 109.5, -155.5, 1.4)
pt3dadd(-115, 108, -158, 1.4)
pt3dadd(-115.5, 106, -163.5, 1.6)
pt3dadd(-115.5, 102, -163.5, 1.6)
}
dend[55] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 9.3)
pt3dadd(-10, 57.5, -1.5, 9.3)
pt3dadd(-10, 59.5, 5, 7.3)
pt3dadd(-10, 62.5, 5, 5.6)
pt3dadd(-10, 65, 8, 5.2)
pt3dadd(-10.5, 68, 8, 5.2)
pt3dadd(-11, 71, 8, 5)
pt3dadd(-11.5, 75, 8, 5.3)
pt3dadd(-13, 78, 11.5, 5.4)
pt3dadd(-13.5, 79.5, 15, 5.6)
}
dend[56] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 9.9)
pt3dadd(-4, 57.5, -15, 9.9)
pt3dadd(-3.5, 59.5, -15, 9.5)
pt3dadd(-3.5, 61, -11.5, 9)
pt3dadd(-3, 63.5, -18, 8.6)
pt3dadd(-0.5, 66, -22, 8.2)
pt3dadd(1.5, 68, -18, 7.4)
pt3dadd(2.5, 70, -18, 7.2)
pt3dadd(0.5, 75, -22, 7.1)
pt3dadd(0.5, 77, -22, 7.1)
pt3dadd(4, 82, -14, 6.3)
pt3dadd(4, 85, -14, 6.7)
pt3dadd(4, 88, -14, 6.9)
pt3dadd(3.5, 93, -14, 6.3)
pt3dadd(4, 94.5, -14, 5.8)
pt3dadd(6, 99, -14, 5.7)
pt3dadd(6, 102, -14, 6.4)
pt3dadd(5.5, 104.5, -14, 6.6)
pt3dadd(6, 110, -14, 6.5)
pt3dadd(12, 122, -30.5, 8)
}
dend[57] {pt3dclear()
pt3dadd(12, 122, -30.5, 8)
pt3dadd(14, 128.5, -18, 7.6)
pt3dadd(16.5, 132.5, -18, 6.9)
pt3dadd(19, 137.5, -18, 7.5)
pt3dadd(21, 142.5, -18, 9.6)
}
dend[58] {pt3dclear()
pt3dadd(21, 142.5, -18, 9.6)
pt3dadd(24, 144, -22, 4.8)
pt3dadd(26.5, 146, -18, 3.8)
pt3dadd(31, 147, -22, 3.3)
pt3dadd(33.5, 147.5, -22, 3.6)
pt3dadd(37.5, 150, -26.5, 3.7)
pt3dadd(39.5, 152, -9.5, 3.4)
pt3dadd(43, 154.5, -18, 3.1)
pt3dadd(47.5, 157.5, -14, 3.2)
pt3dadd(50, 157.5, -14, 3.2)
pt3dadd(54.5, 160.5, -18, 4)
pt3dadd(61, 162.5, -9.5, 4)
pt3dadd(64, 164.5, -9.5, 4)
}
}
proc shape3d_23() {
dend[58] { pt3dadd(70.5, 166.5, -9.5, 3.7)
pt3dadd(72.5, 168, -14, 3.7)
pt3dadd(75, 168, -14, 4.3)
pt3dadd(78, 170, -14, 5.9)
}
dend[59] {pt3dclear()
pt3dadd(78, 170, -14, 5.9)
pt3dadd(81.5, 166, -9.5, 1.9)
pt3dadd(83.5, 166, -14, 1.7)
pt3dadd(88.5, 166, -18, 1.7)
pt3dadd(91, 166, -18, 1.9)
pt3dadd(96, 166, -18, 2.2)
pt3dadd(99, 166, -18, 2.2)
pt3dadd(102.5, 166, -18, 1.9)
pt3dadd(106, 165, -22, 1.6)
pt3dadd(108.5, 164.5, -22, 1.5)
pt3dadd(110.5, 164.5, -22, 1.5)
pt3dadd(111.5, 164, -22, 1.4)
pt3dadd(116, 162.5, -26.5, 1.7)
pt3dadd(118, 162.5, -26.5, 1.7)
pt3dadd(118.5, 163, -22, 1.5)
pt3dadd(121, 163, -22, 1.2)
pt3dadd(123.5, 162.5, -26.5, 1.1)
pt3dadd(126.5, 161.5, -26.5, 1.1)
pt3dadd(129.5, 160, -26.5, 1.1)
pt3dadd(133, 159, -26.5, 1.1)
pt3dadd(136.5, 157, -30.5, 1.1)
pt3dadd(140.5, 156, -30.5, 1.1)
pt3dadd(143, 156, -30.5, 1.1)
pt3dadd(146, 156, -34.5, 1.1)
pt3dadd(150.5, 153, -39, 1.1)
pt3dadd(152.5, 151.5, -30.5, 1.2)
pt3dadd(155, 150.5, -34.5, 1.8)
pt3dadd(156.5, 150.5, -34.5, 1.8)
pt3dadd(158.5, 149.5, -34.5, 1.8)
pt3dadd(160, 149, -39, 1.4)
pt3dadd(162.5, 148, -39, 1.1)
pt3dadd(165.5, 147, -39, 1.1)
pt3dadd(168, 145.5, -39, 1.1)
pt3dadd(171, 143.5, -39, 1.1)
pt3dadd(173.5, 143.5, -39, 1.1)
pt3dadd(176, 142.5, -47, 1.1)
pt3dadd(178, 141.5, -47, 1.1)
pt3dadd(179.5, 141.5, -47, 1.1)
pt3dadd(181, 141.5, -39, 1.1)
pt3dadd(183, 141.5, -39, 0.8)
pt3dadd(186.5, 138.5, -51.5, 1.1)
pt3dadd(193, 138, -55, 1.3)
pt3dadd(195.5, 138, -55, 1.3)
pt3dadd(199.5, 138, -55, 1.3)
pt3dadd(201.5, 138, -55, 1.4)
pt3dadd(203.5, 137.5, -55, 1.2)
pt3dadd(205.5, 136.5, -59, 1.3)
pt3dadd(207.5, 136.5, -59, 1.2)
pt3dadd(209.5, 137, -63, 1.4)
pt3dadd(210.5, 137, -63, 1.2)
pt3dadd(212.5, 137, -63, 1.1)
pt3dadd(216, 138.5, -63, 1)
pt3dadd(219, 138.5, -63, 1.1)
pt3dadd(221.5, 137.5, -63, 1.1)
pt3dadd(226, 137.5, -66.5, 1)
pt3dadd(228.5, 137.5, -70.5, 1)
pt3dadd(229, 138.5, -63, 1)
pt3dadd(231.5, 138.5, -63, 1.2)
pt3dadd(234.5, 138.5, -66.5, 1.2)
pt3dadd(237, 139.5, -66.5, 1.1)
pt3dadd(239, 139.5, -66.5, 1.2)
pt3dadd(240.5, 139.5, -66.5, 1.4)
pt3dadd(242.5, 139.5, -66.5, 1.4)
pt3dadd(245.5, 139.5, -66.5, 1.2)
pt3dadd(250, 138.5, -70.5, 1.4)
pt3dadd(252, 137, -70.5, 1.4)
pt3dadd(254.5, 137, -70.5, 1.4)
pt3dadd(256, 137, -70.5, 1.4)
pt3dadd(258.5, 137, -70.5, 1.4)
pt3dadd(260, 137.5, -78, 1.2)
pt3dadd(263, 137.5, -78, 1.2)
pt3dadd(265.5, 138.5, -70.5, 1.1)
pt3dadd(269, 138.5, -70.5, 1.1)
pt3dadd(273, 140, -74.5, 1.4)
pt3dadd(277.5, 141.5, -74.5, 1.2)
pt3dadd(279.5, 142, -74.5, 1)
pt3dadd(284, 142, -74.5, 1.3)
pt3dadd(286, 144, -74.5, 1.4)
pt3dadd(288.5, 146.5, -78, 1.5)
pt3dadd(289.5, 146.5, -70.5, 1.4)
pt3dadd(290.5, 147, -74.5, 1.2)
pt3dadd(293, 148, -74.5, 1.3)
pt3dadd(295.5, 148, -74.5, 1.3)
pt3dadd(297, 148, -74.5, 1)
pt3dadd(299, 148, -74.5, 1)
pt3dadd(300, 147.5, -74.5, 0.9)
pt3dadd(302, 147, -74.5, 1)
pt3dadd(306, 148, -74.5, 1.1)
pt3dadd(310.5, 148, -74.5, 0.9)
pt3dadd(312.5, 149.5, -78.5, 0.8)
pt3dadd(313.5, 149.5, -78.5, 1.2)
pt3dadd(315, 149.5, -74.5, 1.2)
pt3dadd(317.5, 150.5, -74.5, 1.2)
pt3dadd(319.5, 150.5, -74.5, 1.2)
pt3dadd(321.5, 150.5, -71, 1.2)
pt3dadd(325, 151, -74.5, 1.4)
pt3dadd(327, 151.5, -74.5, 1.4)
pt3dadd(330, 152, -78.5, 1.2)
pt3dadd(332.5, 152, -78.5, 1.2)
pt3dadd(336.5, 153, -78.5, 1)
pt3dadd(338, 153, -78.5, 1.1)
pt3dadd(340, 154, -78.5, 1.3)
pt3dadd(342, 154, -78.5, 1.4)
pt3dadd(343, 154, -86, 1.2)
pt3dadd(345, 154, -86, 1)
pt3dadd(347.5, 153, -86, 1)
pt3dadd(349, 153.5, -86, 1)
pt3dadd(352, 153.5, -86, 2.3)
}
dend[60] {pt3dclear()
pt3dadd(352, 153.5, -86, 2.3)
pt3dadd(352.5, 156, -94, 1)
pt3dadd(354, 156, -94, 1)
pt3dadd(355.5, 156, -94, 1.5)
pt3dadd(357.5, 157, -94, 1.2)
pt3dadd(359.5, 157, -94, 0.9)
pt3dadd(362, 156.5, -101.5, 0.9)
pt3dadd(365, 156.5, -101.5, 1.1)
pt3dadd(366, 156.5, -101.5, 1.1)
pt3dadd(368.5, 156.5, -97.5, 1.1)
pt3dadd(371, 156.5, -101.5, 0.9)
pt3dadd(372.5, 157, -101.5, 0.9)
pt3dadd(374.5, 157, -94, 0.9)
pt3dadd(377, 156.5, -101.5, 0.8)
pt3dadd(379, 156.5, -109, 1.2)
pt3dadd(380, 158, -105.5, 1.2)
pt3dadd(381.5, 158.5, -105.5, 1)
pt3dadd(384.5, 158.5, -109, 1.1)
pt3dadd(387, 158.5, -109, 1.1)
pt3dadd(388, 158.5, -117, 0.9)
pt3dadd(389.5, 159, -109, 1)
pt3dadd(391.5, 159, -109, 1.4)
pt3dadd(396.5, 158, -113, 1.2)
}
dend[61] {pt3dclear()
pt3dadd(352, 153.5, -86, 2.3)
pt3dadd(354, 153, -86, 0.5)
pt3dadd(357, 151.5, -94, 0.5)
pt3dadd(360, 150.5, -94, 0.6)
pt3dadd(363, 149, -94, 0.6)
pt3dadd(364.5, 148.5, -94, 0.6)
pt3dadd(366.5, 147, -90, 0.6)
pt3dadd(369, 147, -90, 0.6)
pt3dadd(370, 146.5, -86, 0.6)
pt3dadd(375, 143.5, -90, 0.6)
pt3dadd(377, 143.5, -90, 0.6)
pt3dadd(379, 142.5, -90, 0.6)
pt3dadd(380.5, 141.5, -90, 0.6)
pt3dadd(383, 140.5, -90, 0.7)
pt3dadd(384.5, 139.5, -90, 0.7)
pt3dadd(387.5, 139.5, -90, 0.7)
pt3dadd(394, 138.5, -90, 0.6)
pt3dadd(397, 137, -82.5, 0.7)
pt3dadd(404.5, 137, -82.5, 0.6)
pt3dadd(407, 136.5, -82.5, 0.6)
pt3dadd(410.5, 137, -90, 0.6)
pt3dadd(413.5, 137, -82.5, 0.6)
pt3dadd(417, 137, -82.5, 0.6)
pt3dadd(421.5, 138.5, -86, 0.6)
pt3dadd(423.5, 138.5, -86, 0.6)
pt3dadd(427, 138.5, -90, 0.6)
pt3dadd(430, 140.5, -86, 0.6)
pt3dadd(433, 140, -82.5, 0.6)
pt3dadd(435.5, 140, -86, 0.6)
pt3dadd(439, 140, -82.5, 0.6)
pt3dadd(441.5, 140, -82.5, 0.6)
pt3dadd(444.5, 138.5, -82.5, 0.6)
pt3dadd(447.5, 137.5, -82.5, 0.6)
pt3dadd(450.5, 136.5, -82.5, 0.6)
pt3dadd(453.5, 135, -82.5, 0.6)
pt3dadd(460, 134, -82.5, 0.6)
pt3dadd(462.5, 134, -90, 0.9)
pt3dadd(466, 133, -90, 0.9)
pt3dadd(468, 132.5, -90, 0.9)
pt3dadd(474.5, 131.5, -94, 0.9)
pt3dadd(476, 131.5, -101.5, 0.9)
pt3dadd(476, 131.5, -94, 0.9)
pt3dadd(479, 131.5, -97.5, 0.9)
pt3dadd(482, 131.5, -90, 0.7)
pt3dadd(486.5, 131.5, -90, 0.7)
}
dend[62] {pt3dclear()
pt3dadd(78, 170, -14, 5.9)
pt3dadd(81, 171, -5.5, 3.4)
pt3dadd(84, 174, -14, 3.4)
pt3dadd(87.5, 176, -14, 1.7)
pt3dadd(90, 176.5, -17.5, 2.7)
pt3dadd(94, 179.5, -14, 2.5)
pt3dadd(97, 181, -14, 2.1)
pt3dadd(98.5, 181, -14, 2.1)
pt3dadd(100.5, 182.5, -4.5, 2.4)
pt3dadd(102, 183.5, -1, 2)
pt3dadd(104.5, 185, -11, 2.6)
pt3dadd(105.5, 186.5, -7.5, 2.6)
pt3dadd(108.5, 187.5, -11, 2.1)
pt3dadd(110, 188.5, -11, 1.9)
pt3dadd(111.5, 189.5, -4.5, 1.6)
pt3dadd(113, 189.5, -4.5, 1.4)
pt3dadd(114.5, 190, -11, 1.5)
pt3dadd(116, 190.5, -1, 2.2)
pt3dadd(118, 192.5, -1, 2.8)
pt3dadd(120.5, 194, -4.5, 2.8)
}
}
proc shape3d_24() {
dend[62] { pt3dadd(128, 200, -4.5, 2.6)
pt3dadd(130, 201.5, -4.5, 2.8)
pt3dadd(131, 203.5, -4.5, 2.3)
pt3dadd(132.5, 205, -1, 2.9)
pt3dadd(134.5, 205.5, -1, 2.6)
pt3dadd(137.5, 208.5, -1, 2.5)
pt3dadd(138, 208.5, 5.5, 3.1)
pt3dadd(139, 207.5, 9, 2.5)
pt3dadd(141.5, 207, 9, 2.5)
pt3dadd(144.5, 207, 2, 2.9)
pt3dadd(146, 207.5, 5.5, 2.9)
pt3dadd(148.5, 207.5, 12, 3.2)
pt3dadd(151.5, 207.5, 12, 2.2)
pt3dadd(153, 207.5, 12, 2.7)
pt3dadd(153, 207.5, 19, 3.9)
}
dend[63] {pt3dclear()
pt3dadd(153, 207.5, 19, 3.9)
pt3dadd(157.5, 210, 19, 1.2)
pt3dadd(163, 211, 19, 1.4)
pt3dadd(165.5, 212, 19, 1.5)
pt3dadd(168.5, 213.5, 19, 1.7)
pt3dadd(170.5, 213.5, 19, 2)
pt3dadd(172.5, 215, 22.5, 1.4)
pt3dadd(175.5, 217, 19, 1.2)
pt3dadd(179.5, 219, 22.5, 1.1)
pt3dadd(182.5, 219, 22.5, 1.3)
pt3dadd(186, 219, 22.5, 1.3)
pt3dadd(188.5, 219.5, 22.5, 1.3)
pt3dadd(191.5, 220.5, 22.5, 1.3)
pt3dadd(193, 221, 22.5, 1.3)
pt3dadd(195, 222, 19, 1.4)
pt3dadd(201, 224.5, 19, 1.2)
pt3dadd(203, 225, 19, 1.2)
pt3dadd(206.5, 225.5, 19, 1.2)
pt3dadd(211, 227.5, 19, 1.2)
pt3dadd(213.5, 228, 19, 1.2)
pt3dadd(219, 231, 19, 1.3)
pt3dadd(221.5, 232.5, 19, 1.3)
pt3dadd(224.5, 233, 22.5, 1.3)
pt3dadd(227, 233, 26, 1.3)
pt3dadd(229, 235, 26, 1.3)
pt3dadd(232.5, 235.5, 26, 1.1)
pt3dadd(236, 236.5, 30, 1.1)
pt3dadd(239, 238.5, 30, 0.7)
pt3dadd(241, 240, 30, 1.1)
pt3dadd(243, 241, 30, 1.2)
pt3dadd(246.5, 241, 30, 0.9)
pt3dadd(249.5, 242, 30, 0.9)
pt3dadd(251, 242, 30, 1)
pt3dadd(254, 242, 30, 1.2)
pt3dadd(256, 242.5, 30, 1.2)
pt3dadd(258.5, 243.5, 30, 1.3)
pt3dadd(262, 245, 37, 1.3)
pt3dadd(263.5, 245.5, 37, 1.1)
pt3dadd(265.5, 247, 37, 1)
pt3dadd(267.5, 247, 37, 1)
pt3dadd(271, 248.5, 37, 1.4)
pt3dadd(276.5, 250.5, 37, 1.1)
pt3dadd(279, 252, 37, 1.2)
pt3dadd(281, 253.5, 37, 1.1)
pt3dadd(285.5, 255.5, 37, 1.1)
pt3dadd(287.5, 256, 37, 0.9)
pt3dadd(289.5, 258.5, 40.5, 1.1)
pt3dadd(292, 260, 44, 0.9)
pt3dadd(296.5, 262.5, 37, 0.9)
pt3dadd(299.5, 262.5, 37, 0.9)
pt3dadd(302, 264, 37, 0.9)
pt3dadd(305, 265.5, 37, 0.9)
pt3dadd(307, 267, 37, 0.9)
pt3dadd(309, 269, 37, 1)
pt3dadd(311, 271.5, 37, 1)
pt3dadd(314.5, 276, 37, 0.9)
pt3dadd(316, 279.5, 37, 0.9)
pt3dadd(316, 282, 37, 0.8)
pt3dadd(317, 284.5, 30, 1.1)
pt3dadd(318, 288.5, 30, 1)
pt3dadd(320.5, 291.5, 30, 0.9)
pt3dadd(322, 293.5, 33.5, 0.9)
pt3dadd(324, 295.5, 33.5, 0.9)
pt3dadd(327.5, 297.5, 33.5, 1)
pt3dadd(329.5, 299.5, 33.5, 1)
pt3dadd(331.5, 301, 33.5, 1)
pt3dadd(333, 302, 33.5, 1)
pt3dadd(336.5, 302, 37, 1)
pt3dadd(340, 302, 37, 0.9)
pt3dadd(343, 302.5, 37, 0.9)
pt3dadd(345.5, 304.5, 37, 0.9)
pt3dadd(349.5, 306.5, 40.5, 1)
pt3dadd(352.5, 308.5, 33.5, 1)
pt3dadd(353.5, 310, 33.5, 1)
pt3dadd(356, 313, 26, 1.4)
pt3dadd(359.5, 317, 30, 1)
pt3dadd(360, 319, 30, 1.2)
pt3dadd(361.5, 320, 26, 1.2)
pt3dadd(364.5, 320, 26, 1.2)
pt3dadd(367, 321, 26, 1.2)
pt3dadd(369, 322.5, 19, 1.3)
pt3dadd(373.5, 323.5, 15.5, 1.4)
pt3dadd(375.5, 325, 15.5, 1.1)
pt3dadd(376.5, 327, 15.5, 1.1)
pt3dadd(378, 328, 15.5, 1.2)
pt3dadd(379.5, 328, 15.5, 1.4)
pt3dadd(381, 328.5, 15.5, 1.3)
pt3dadd(382.5, 329, 15.5, 1.2)
pt3dadd(384.5, 330.5, 15.5, 0.9)
pt3dadd(387.5, 332, 12, 0.9)
pt3dadd(389, 332, 12, 1.1)
pt3dadd(390.5, 334, 12, 1.1)
pt3dadd(391.5, 336, 12, 1.1)
pt3dadd(393, 337.5, 12, 1.1)
pt3dadd(394, 339, 19, 1.3)
pt3dadd(394.5, 341, 19, 1.5)
pt3dadd(396, 343, 19, 1.6)
pt3dadd(397, 345, 19, 1.6)
pt3dadd(398, 346, 19, 1.6)
pt3dadd(399, 347.5, 19, 1.4)
pt3dadd(401.5, 350, 22, 1.2)
pt3dadd(402.5, 351, 22, 1.2)
pt3dadd(402.5, 352.5, 19, 1.2)
pt3dadd(402, 353.5, 19, 1.2)
pt3dadd(400, 354.5, 19, 0.9)
pt3dadd(401.5, 356, 19, 0.8)
pt3dadd(403.5, 358, 12, 0.8)
pt3dadd(405, 360, 12, 0.6)
pt3dadd(406.5, 362, 12, 0.6)
pt3dadd(407, 363, 12, 0.7)
pt3dadd(409, 366, 12, 0.9)
pt3dadd(410, 367.5, 12, 1.6)
pt3dadd(411.5, 369, 5.5, 1.6)
pt3dadd(413.5, 370, 5.5, 1.4)
pt3dadd(414, 370.5, 5.5, 1.4)
pt3dadd(418.5, 374, 5.5, 1)
pt3dadd(419.5, 376, 5.5, 0.9)
pt3dadd(420, 378.5, 5.5, 0.7)
pt3dadd(421.5, 380.5, 5.5, 1)
pt3dadd(421.5, 383, 5.5, 0.9)
pt3dadd(422.5, 385.5, 5.5, 0.8)
pt3dadd(422, 386.5, 5.5, 0.8)
pt3dadd(422, 389, 5.5, 0.7)
pt3dadd(422, 391, 5.5, 0.9)
pt3dadd(423.5, 392.5, 5.5, 0.9)
pt3dadd(425, 393.5, 5.5, 0.9)
pt3dadd(426, 394, 5.5, 1.1)
pt3dadd(426, 396, 5.5, 1.3)
pt3dadd(426, 399, 5.5, 1.3)
pt3dadd(425, 401.5, -7.5, 1.4)
pt3dadd(427.5, 404, -11.5, 0.9)
pt3dadd(428.5, 405, -11.5, 0.9)
pt3dadd(428.5, 407, -11.5, 0.9)
pt3dadd(428, 411, -11.5, 0.9)
pt3dadd(428.5, 413, -11.5, 0.9)
pt3dadd(429.5, 415, -11.5, 0.7)
pt3dadd(429.5, 415.5, -11.5, 0.6)
pt3dadd(429.5, 417.5, -7.5, 0.6)
pt3dadd(430.5, 419.5, -7.5, 0.6)
pt3dadd(431.5, 421, -7.5, 0.6)
pt3dadd(435, 423, -15.5, 0.6)
pt3dadd(436.5, 423, -15.5, 0.6)
pt3dadd(438.5, 423, -15.5, 0.6)
pt3dadd(441, 424.5, -15.5, 0.7)
pt3dadd(443, 425.5, -15.5, 0.7)
pt3dadd(445, 427.5, -15.5, 0.7)
pt3dadd(447, 430, -15.5, 0.7)
pt3dadd(449.5, 431, -20, 0.7)
pt3dadd(452.5, 432, -20, 0.7)
pt3dadd(454, 433, -20, 0.7)
pt3dadd(454, 435.5, -20, 0.7)
pt3dadd(454, 437.5, -20, 0.7)
pt3dadd(455.5, 439.5, -20, 0.7)
pt3dadd(457, 441.5, -20, 0.7)
pt3dadd(459, 443, -20, 0.7)
pt3dadd(460.5, 446, -20, 0.7)
pt3dadd(462.5, 447.5, -20, 0.7)
pt3dadd(464.5, 449.5, -11.5, 0.7)
pt3dadd(468.5, 450.5, -11.5, 0.7)
pt3dadd(470, 452.5, -11.5, 0.7)
pt3dadd(470.5, 455, -24, 0.7)
pt3dadd(470.5, 456.5, -15.5, 0.7)
pt3dadd(471, 458.5, -15.5, 0.7)
pt3dadd(472.5, 460, -15.5, 0.7)
pt3dadd(474, 463, -7.5, 0.7)
pt3dadd(475, 465.5, -7.5, 0.7)
pt3dadd(476.5, 468, -20, 0.7)
pt3dadd(479, 470, -20, 0.7)
pt3dadd(480, 472.5, -20, 0.7)
pt3dadd(482, 474, -24, 0.7)
pt3dadd(486, 477, -20, 0.7)
pt3dadd(487, 479, -28, 0.7)
pt3dadd(489.5, 483, -32.5, 0.7)
pt3dadd(491, 487, -32.5, 0.7)
pt3dadd(491, 490.5, -15.5, 0.7)
pt3dadd(490, 494, -36.5, 0.7)
pt3dadd(490.5, 497, -28, 0.7)
pt3dadd(493, 499.5, -45, 0.7)
pt3dadd(494, 501, -45, 0.7)
pt3dadd(494, 503, -45, 0.8)
pt3dadd(495.5, 505, -36.5, 0.1)
pt3dadd(497.5, 507, -36.5, 0.1)
pt3dadd(497.5, 508.5, -32.5, 0.1)
pt3dadd(497, 511.5, -36.5, 0.1)
pt3dadd(496, 514.5, -36.5, 0.1)
}
}
proc shape3d_25() {
dend[63] { pt3dadd(496, 516.5, -36.5, 0.1)
pt3dadd(498, 518.5, -36.5, 0.1)
pt3dadd(498, 521.5, -49, 0.1)
pt3dadd(499, 524.5, -45, 0.1)
pt3dadd(499.5, 526, -45, 0.1)
}
dend[64] {pt3dclear()
pt3dadd(153, 207.5, 19, 3.9)
pt3dadd(154.5, 205.5, 19, 1.6)
pt3dadd(156, 204, 19, 1.3)
pt3dadd(157.5, 203.5, 19, 1.7)
pt3dadd(159.5, 203.5, 15.5, 1.9)
pt3dadd(161, 203.5, 22.5, 1.9)
pt3dadd(164.5, 201, 30, 1.6)
pt3dadd(166, 201, 30, 1.3)
pt3dadd(168, 201, 30, 1.6)
pt3dadd(168.5, 199, 30, 1.6)
pt3dadd(168.5, 197, 47.5, 1.6)
pt3dadd(167, 197, 33.5, 1.6)
pt3dadd(169.5, 198.5, 40.5, 1.6)
pt3dadd(171.5, 198.5, 37, 1.7)
pt3dadd(173.5, 198.5, 40.5, 1.4)
pt3dadd(175.5, 198.5, 37, 1.4)
pt3dadd(177.5, 198.5, 44, 1.7)
pt3dadd(180, 198.5, 44, 1.7)
pt3dadd(184, 200.5, 47.5, 1.7)
pt3dadd(187.5, 201, 55, 1.9)
pt3dadd(191, 201.5, 51, 1.9)
pt3dadd(194.5, 201.5, 51, 1.1)
pt3dadd(196, 201.5, 51, 1.3)
pt3dadd(197.5, 201, 51, 1.4)
pt3dadd(199.5, 201, 51, 1.5)
pt3dadd(201.5, 201, 47, 1.1)
pt3dadd(203, 201, 51, 0.9)
pt3dadd(204.5, 201, 51, 0.9)
pt3dadd(206, 200.5, 55, 0.9)
pt3dadd(207, 200, 62.5, 1.1)
pt3dadd(209, 200, 62.5, 1.1)
pt3dadd(210.5, 200.5, 62.5, 1.2)
pt3dadd(212.5, 200.5, 66.5, 1.5)
pt3dadd(214.5, 200, 66.5, 1.6)
pt3dadd(216.5, 198.5, 66.5, 1.6)
pt3dadd(218.5, 197.5, 66.5, 1.4)
pt3dadd(220, 197.5, 66.5, 1.3)
pt3dadd(222, 197.5, 74, 1.3)
pt3dadd(223.5, 198.5, 74, 1.1)
pt3dadd(225, 199.5, 74, 1.2)
pt3dadd(226.5, 199.5, 74, 1.2)
pt3dadd(229, 199.5, 74, 1.2)
pt3dadd(230, 201, 74, 1.5)
pt3dadd(231, 202, 74, 1.5)
pt3dadd(232.5, 203, 74, 1.4)
pt3dadd(234, 203, 74, 1.2)
pt3dadd(235.5, 203, 81.5, 1.3)
pt3dadd(236, 201.5, 85.5, 1.5)
pt3dadd(235.5, 204.5, 78, 1.5)
pt3dadd(238.5, 204.5, 81.5, 1.5)
}
dend[65] {pt3dclear()
pt3dadd(21, 142.5, -18, 9.6)
pt3dadd(16, 148, -18, 6.1)
pt3dadd(16, 151, -18, 5.7)
pt3dadd(16, 154.5, -18, 5)
pt3dadd(15, 161, -14, 4.8)
}
dend[66] {pt3dclear()
pt3dadd(15, 161, -14, 4.8)
pt3dadd(18, 165.5, -22, 1.9)
pt3dadd(17.5, 167.5, -22, 1.7)
pt3dadd(16, 172, -22, 1.3)
pt3dadd(15, 174, -18, 1.3)
pt3dadd(15.5, 178, -18, 1.7)
pt3dadd(14.5, 181, -18, 1.6)
pt3dadd(13, 190.5, -22, 1.2)
pt3dadd(13, 194, -18, 1.2)
pt3dadd(12.5, 195, -18, 1.2)
pt3dadd(12.5, 198, -22, 1.3)
pt3dadd(13, 199.5, -22, 1.3)
pt3dadd(11.5, 201, -22, 1.2)
pt3dadd(10, 202, -22, 1.2)
pt3dadd(9, 203, -22, 1.2)
pt3dadd(8.5, 207.5, -18, 1)
pt3dadd(7, 209, -18, 1)
pt3dadd(6.5, 213, -9.5, 1)
pt3dadd(5.5, 215.5, -14, 1)
pt3dadd(5.5, 217, -14, 1)
pt3dadd(6.5, 221.5, -9.5, 1.1)
pt3dadd(6.5, 223.5, -9.5, 0.9)
pt3dadd(6.5, 225.5, -14, 0.9)
pt3dadd(6, 227, -18, 0.9)
pt3dadd(5.5, 229.5, -9.5, 1.1)
pt3dadd(7, 231.5, -9.5, 1.1)
pt3dadd(8.5, 233.5, -9.5, 1.1)
pt3dadd(9.5, 236.5, -9.5, 1.1)
pt3dadd(9, 238.5, -9.5, 1.1)
pt3dadd(8.5, 240, -9.5, 1.1)
pt3dadd(4.5, 242.5, -14, 1.1)
pt3dadd(4, 245, -14, 1.1)
pt3dadd(4.5, 247, -14, 1.4)
pt3dadd(5, 249, -9.5, 1.4)
}
dend[67] {pt3dclear()
pt3dadd(15, 161, -14, 4.8)
pt3dadd(13, 163.5, -9.5, 5.1)
pt3dadd(11.5, 169, -14, 5.1)
pt3dadd(10, 172, -1.5, 5.1)
pt3dadd(8.5, 175.5, -1.5, 5.1)
pt3dadd(9, 179.5, -4.5, 5.1)
pt3dadd(9, 182.5, -1.5, 5.1)
pt3dadd(9, 184.5, -1.5, 5.1)
pt3dadd(9, 185.5, -1.5, 5.4)
pt3dadd(9, 189, -4.5, 5.4)
pt3dadd(9, 191, -4.5, 5.4)
pt3dadd(7.5, 194.5, 5.5, 6.8)
pt3dadd(6.5, 196.5, 5.5, 8)
pt3dadd(6, 198, 5.5, 9.5)
}
dend[68] {pt3dclear()
pt3dadd(6, 198, 5.5, 9.5)
pt3dadd(-2.5, 200.5, 5.5, 2.7)
pt3dadd(-5, 204.5, 8.5, 2.2)
pt3dadd(-7.5, 206, 8.5, 2.2)
pt3dadd(-10, 207.5, 8.5, 2.4)
pt3dadd(-15, 208.5, 12, 2.7)
pt3dadd(-17.5, 208.5, 12, 2.6)
pt3dadd(-20, 212, 8.5, 2.3)
pt3dadd(-22, 213.5, 8.5, 2.7)
pt3dadd(-25, 215.5, 15, 2.8)
pt3dadd(-27, 217.5, 15, 2)
pt3dadd(-30.5, 219.5, 15, 2)
pt3dadd(-33, 219.5, 15, 2.2)
pt3dadd(-35, 220.5, 18.5, 2.2)
pt3dadd(-39.5, 223.5, 18.5, 2.1)
pt3dadd(-42, 224, 18.5, 1.9)
pt3dadd(-43.5, 224, 18.5, 1.4)
pt3dadd(-46, 224, 18.5, 1.5)
pt3dadd(-47, 225, 18.5, 1.8)
pt3dadd(-50.5, 227, 21.5, 2.6)
pt3dadd(-53.5, 228.5, 21.5, 2.5)
pt3dadd(-56, 230, 21.5, 2)
pt3dadd(-57.5, 230.5, 21.5, 2)
pt3dadd(-61.5, 231.5, 21.5, 2.4)
pt3dadd(-64.5, 233, 25, 2.4)
pt3dadd(-67.5, 234.5, 25, 2.4)
pt3dadd(-71, 237.5, 25, 2.4)
pt3dadd(-74, 240, 25, 2.4)
pt3dadd(-76.5, 243, 25, 2.4)
pt3dadd(-78, 246, 25, 2.4)
pt3dadd(-79.5, 250, 25, 2.4)
pt3dadd(-79.5, 253, 25, 2.4)
pt3dadd(-80, 256, 25, 2.4)
pt3dadd(-81, 261.5, 21.5, 2.3)
pt3dadd(-83, 269, 21.5, 2.1)
pt3dadd(-83, 272, 21.5, 1.8)
pt3dadd(-87, 276.5, 21.5, 2.1)
pt3dadd(-89.5, 278.5, 21.5, 2.7)
pt3dadd(-91.5, 280.5, 21.5, 2.7)
pt3dadd(-94.5, 284.5, 21.5, 2.6)
pt3dadd(-97, 286.5, 21.5, 3.4)
}
dend[69] {pt3dclear()
pt3dadd(-97, 286.5, 21.5, 3.4)
pt3dadd(-95.5, 290, 21.5, 1.2)
pt3dadd(-96, 291.5, 15, 1.4)
pt3dadd(-97, 293, 18.5, 1.2)
pt3dadd(-98, 295.5, 18.5, 1.1)
pt3dadd(-98.5, 296.5, 18.5, 1.1)
pt3dadd(-100.5, 297.5, 18.5, 1.1)
pt3dadd(-101, 298.5, 18.5, 1.1)
pt3dadd(-101.5, 300, 18.5, 0.9)
pt3dadd(-101.5, 301, 18.5, 0.9)
pt3dadd(-101, 303, 18.5, 0.9)
pt3dadd(-101, 305.5, 15, 1.1)
pt3dadd(-101, 309, 8.5, 1.1)
pt3dadd(-103, 311.5, 8.5, 1.1)
pt3dadd(-104, 314, 8.5, 1.1)
pt3dadd(-105, 317, 8.5, 1.1)
pt3dadd(-105, 319, 8.5, 1.1)
pt3dadd(-106, 320.5, 12, 1.1)
pt3dadd(-107.5, 323, 5.5, 1.1)
pt3dadd(-109, 325.5, 5.5, 1.1)
pt3dadd(-110, 327.5, 8.5, 0.9)
pt3dadd(-112, 329.5, 2, 0.9)
pt3dadd(-113.5, 332, 5.5, 0.9)
pt3dadd(-115, 333.5, 5.5, 0.9)
pt3dadd(-115, 335.5, 5.5, 0.9)
pt3dadd(-117, 336.5, 5.5, 0.9)
pt3dadd(-120.5, 339, 5.5, 0.7)
pt3dadd(-122, 341.5, 5.5, 0.7)
pt3dadd(-122, 344, 5.5, 0.7)
pt3dadd(-122.5, 345, 5.5, 0.9)
pt3dadd(-124, 346.5, 5.5, 1.1)
pt3dadd(-124, 350.5, -1.5, 1.2)
pt3dadd(-124.5, 355, 5.5, 1)
pt3dadd(-126.5, 357, 2, 1)
pt3dadd(-126.5, 359, 2, 1)
pt3dadd(-124.5, 364, -4.5, 1.1)
pt3dadd(-122.5, 366, 5.5, 1.1)
pt3dadd(-122.5, 368, 5.5, 1)
pt3dadd(-123, 370, 5.5, 1)
pt3dadd(-124, 371.5, 5.5, 1)
pt3dadd(-125, 373, 5.5, 0.7)
pt3dadd(-126, 374.5, 5.5, 0.7)
pt3dadd(-126.5, 375.5, 5.5, 0.7)
pt3dadd(-126.5, 377.5, 1.5, 0.8)
pt3dadd(-127, 378.5, 1.5, 0.8)
pt3dadd(-128.5, 380, -3, 0.8)
pt3dadd(-128.5, 381, -3, 0.8)
pt3dadd(-130, 383, -3, 0.8)
pt3dadd(-130, 385, -3, 0.8)
pt3dadd(-130, 386.5, -3, 0.8)
pt3dadd(-130, 388, -3, 0.6)
}
}
proc shape3d_26() {
dend[69] { pt3dadd(-131.5, 390, -3, 0.6)
pt3dadd(-133, 391, -3, 0.6)
pt3dadd(-133.5, 392, -3, 0.6)
pt3dadd(-133, 394.5, -3, 0.8)
pt3dadd(-133, 396, -3, 0.8)
pt3dadd(-133.5, 398, -3, 0.8)
pt3dadd(-134.5, 400, -3, 0.8)
pt3dadd(-135.5, 401.5, -3, 0.9)
pt3dadd(-135.5, 403, -3, 1)
pt3dadd(-134.5, 405.5, -3, 0.9)
pt3dadd(-134, 407.5, -3, 0.9)
pt3dadd(-136.5, 408.5, -3, 0.9)
pt3dadd(-136.5, 410.5, -3, 0.9)
pt3dadd(-135.5, 413, -19.5, 0.9)
pt3dadd(-135, 416, -11, 0.9)
pt3dadd(-135, 418.5, -7, 0.9)
pt3dadd(-138, 420.5, -7, 0.9)
pt3dadd(-140.5, 421.5, -7, 0.9)
pt3dadd(-144, 423, -7, 1)
}
dend[70] {pt3dclear()
pt3dadd(-97, 286.5, 21.5, 3.4)
pt3dadd(-98.5, 286.5, 21.5, 1.1)
pt3dadd(-100, 287.5, 21.5, 1.1)
pt3dadd(-107.5, 289.5, 28.5, 1.3)
pt3dadd(-109.5, 291, 28.5, 2.3)
}
dend[71] {pt3dclear()
pt3dadd(-109.5, 291, 28.5, 2.3)
pt3dadd(-111, 296, 28.5, 1.9)
pt3dadd(-112.5, 299.5, 28.5, 1.5)
pt3dadd(-113, 302.5, 28.5, 1.6)
pt3dadd(-115.5, 308.5, 25, 1.7)
pt3dadd(-117, 312.5, 25, 1.4)
pt3dadd(-119, 315.5, 25, 1.2)
pt3dadd(-120.5, 317.5, 25, 1.2)
pt3dadd(-126, 321.5, 25, 1.3)
pt3dadd(-127.5, 322.5, 25, 1.2)
pt3dadd(-127.5, 324, 25, 1.2)
pt3dadd(-128.5, 326, 25, 1.2)
pt3dadd(-133.5, 329.5, 25, 1.2)
pt3dadd(-135.5, 331, 25, 1.2)
pt3dadd(-142, 336, 32, 1.4)
pt3dadd(-144.5, 337.5, 32, 1.2)
pt3dadd(-146.5, 340.5, 32, 0.9)
pt3dadd(-151, 344, 36, 1.1)
pt3dadd(-153, 346.5, 36, 1.1)
pt3dadd(-154.5, 348.5, 36, 1.2)
pt3dadd(-157.5, 351, 39.5, 1.2)
pt3dadd(-160.5, 353, 36, 0.9)
pt3dadd(-161.5, 354.5, 36, 0.9)
pt3dadd(-163.5, 355.5, 36, 0.9)
pt3dadd(-165.5, 355.5, 36, 1)
pt3dadd(-169.5, 356.5, 36, 1.6)
pt3dadd(-170.5, 357.5, 36, 1.4)
pt3dadd(-170.5, 359.5, 36, 1.4)
pt3dadd(-172.5, 359.5, 36, 0.9)
pt3dadd(-174.5, 361, 39.5, 1)
pt3dadd(-175.5, 362.5, 39.5, 1)
pt3dadd(-177, 364, 39.5, 1.1)
pt3dadd(-178.5, 365, 39.5, 1.1)
pt3dadd(-179.5, 366.5, 39.5, 0.9)
pt3dadd(-179.5, 368, 39.5, 1.2)
pt3dadd(-179.5, 370, 39.5, 1.6)
pt3dadd(-180.5, 371, 43, 1.6)
pt3dadd(-182, 372, 46.5, 0.9)
pt3dadd(-184, 375, 43, 0.9)
pt3dadd(-186.5, 375, 43, 1.1)
pt3dadd(-188, 376, 43, 1.1)
pt3dadd(-190.5, 377.5, 43, 1.1)
pt3dadd(-194.5, 378.5, 43, 1.1)
pt3dadd(-196, 379.5, 43, 1.1)
pt3dadd(-197.5, 381, 43, 1.1)
pt3dadd(-200.5, 383, 46.5, 1.1)
pt3dadd(-200.5, 385.5, 46.5, 1.1)
pt3dadd(-200.5, 388.5, 46.5, 1.1)
pt3dadd(-202, 392, 43, 1.1)
pt3dadd(-204, 394.5, 50, 0.7)
pt3dadd(-204.5, 397, 50, 0.7)
pt3dadd(-207.5, 399, 50, 0.7)
pt3dadd(-210.5, 402, 50, 0.7)
pt3dadd(-211.5, 403.5, 53.5, 0.9)
pt3dadd(-214, 406.5, 46.5, 0.9)
pt3dadd(-216, 408.5, 46.5, 0.9)
pt3dadd(-217.5, 411.5, 46.5, 0.9)
pt3dadd(-217.5, 414.5, 46.5, 0.9)
pt3dadd(-220.5, 417.5, 43, 0.9)
pt3dadd(-223.5, 420, 46.5, 0.9)
pt3dadd(-225, 422.5, 43, 0.9)
pt3dadd(-226, 425.5, 46.5, 0.9)
pt3dadd(-227.5, 428.5, 50, 1)
pt3dadd(-229.5, 430, 50, 1)
pt3dadd(-231.5, 431, 43, 1)
pt3dadd(-233.5, 433, 43, 1)
pt3dadd(-236, 435, 46.5, 0.6)
pt3dadd(-237.5, 437, 46.5, 0.6)
pt3dadd(-240.5, 439.5, 46.5, 0.6)
pt3dadd(-242.5, 442.5, 46.5, 0.6)
pt3dadd(-244.5, 444.5, 43, 0.6)
pt3dadd(-246.5, 449.5, 50, 0.8)
pt3dadd(-248, 454, 50, 0.8)
pt3dadd(-250, 459, 46.5, 0.8)
pt3dadd(-251.5, 461, 46.5, 0.8)
pt3dadd(-251.5, 463, 46.5, 0.8)
pt3dadd(-249.5, 464.5, 43, 0.8)
pt3dadd(-248.5, 467, 39.5, 0.8)
pt3dadd(-248.5, 469, 39.5, 0.8)
pt3dadd(-248.5, 470.5, 36, 0.8)
pt3dadd(-249, 473.5, 43, 0.6)
pt3dadd(-249, 477, 43, 0.9)
pt3dadd(-252, 481.5, 43, 0.9)
pt3dadd(-253.5, 485.5, 43, 0.9)
pt3dadd(-254, 488.5, 46.5, 0.7)
pt3dadd(-255, 492.5, 46.5, 0.7)
pt3dadd(-256.5, 496.5, 43, 0.7)
pt3dadd(-258, 499, 43, 0.7)
pt3dadd(-260, 501.5, 46.5, 0.7)
pt3dadd(-262, 504.5, 50, 0.7)
pt3dadd(-264.5, 507.5, 46.5, 0.7)
pt3dadd(-266.5, 510.5, 43, 0.7)
pt3dadd(-268.5, 514.5, 50, 0.7)
pt3dadd(-272.5, 517.5, 50, 0.7)
pt3dadd(-276, 520.5, 50, 0.7)
pt3dadd(-281, 523, 53.5, 0.7)
pt3dadd(-284.5, 525.5, 53.5, 1.1)
pt3dadd(-289, 527, 43, 0.8)
}
dend[72] {pt3dclear()
pt3dadd(-109.5, 291, 28.5, 2.3)
pt3dadd(-114.5, 293.5, 28.5, 1.4)
pt3dadd(-116, 295.5, 28.5, 1.4)
pt3dadd(-120.5, 299.5, 25, 2.3)
pt3dadd(-126, 302.5, 28.5, 1.9)
pt3dadd(-128, 304, 28.5, 1.6)
pt3dadd(-131, 305.5, 28.5, 1.6)
pt3dadd(-137, 307, 28.5, 1.7)
pt3dadd(-139, 309.5, 32, 1.7)
pt3dadd(-144.5, 311, 36, 1.8)
pt3dadd(-147.5, 313, 36, 1.8)
pt3dadd(-151, 315, 36, 1.8)
pt3dadd(-154, 316, 39.5, 1.7)
pt3dadd(-155.5, 318, 36, 1.4)
pt3dadd(-160, 320, 43, 1.4)
pt3dadd(-162.5, 320.5, 39.5, 1.3)
pt3dadd(-166.5, 320.5, 36, 1.8)
pt3dadd(-170.5, 317, 39.5, 2.2)
pt3dadd(-169.5, 315, 43, 2.6)
pt3dadd(-171.5, 316.5, 39.5, 2.6)
pt3dadd(-173.5, 316.5, 46.5, 2)
pt3dadd(-176, 316.5, 46.5, 2)
pt3dadd(-178.5, 318.5, 53.5, 2.7)
pt3dadd(-180.5, 320.5, 50, 2.7)
pt3dadd(-183.5, 321.5, 57.5, 2.8)
pt3dadd(-184, 323.5, 61.5, 2.1)
pt3dadd(-184, 325, 61.5, 2.1)
pt3dadd(-185.5, 324, 53.5, 2.4)
pt3dadd(-187.5, 324, 61.5, 2.4)
pt3dadd(-189.5, 327, 69, 1.8)
pt3dadd(-191.5, 325, 69, 1.8)
pt3dadd(-193.5, 325, 73, 1.8)
pt3dadd(-195, 324, 73, 1.8)
pt3dadd(-194, 325.5, 69, 1.8)
pt3dadd(-193, 328, 65, 1.8)
pt3dadd(-196.5, 326, 84.5, 1.9)
pt3dadd(-197, 327.5, 84.5, 1.7)
pt3dadd(-197, 329, 92, 2)
pt3dadd(-197.5, 331, 84.5, 2)
pt3dadd(-198.5, 334, 84.5, 1.8)
pt3dadd(-197, 335.5, 84.5, 1.8)
pt3dadd(-197, 337, 84.5, 1.8)
pt3dadd(-197, 340, 81.5, 1.7)
pt3dadd(-198.5, 340, 88, 1.2)
pt3dadd(-201, 341, 91, 1.7)
pt3dadd(-203, 341.5, 91, 1.4)
pt3dadd(-204.5, 343, 91, 1.4)
pt3dadd(-206, 343.5, 91, 1.4)
pt3dadd(-207.5, 345, 91, 1.7)
pt3dadd(-209.5, 346, 91, 1.5)
pt3dadd(-209.5, 347.5, 94, 1.5)
pt3dadd(-210, 349.5, 94, 1.5)
pt3dadd(-211, 354, 94, 1.7)
pt3dadd(-211, 356, 94, 1.7)
pt3dadd(-212.5, 357, 94, 1.7)
pt3dadd(-213.5, 358, 97, 1.7)
pt3dadd(-216, 361, 94, 1.4)
pt3dadd(-216.5, 363, 94, 1.6)
pt3dadd(-216.5, 365, 94, 1.6)
pt3dadd(-216.5, 367, 94, 1.6)
pt3dadd(-218, 369, 106.5, 1.6)
pt3dadd(-220, 370, 106.5, 1.6)
pt3dadd(-222, 372.5, 106.5, 1.6)
pt3dadd(-223.5, 376, 106.5, 2.3)
}
dend[73] {pt3dclear()
pt3dadd(-223.5, 376, 106.5, 2.3)
pt3dadd(-226, 377, 103.5, 0.6)
pt3dadd(-228, 377, 106.5, 0.6)
pt3dadd(-230.5, 377.5, 106.5, 0.6)
pt3dadd(-233.5, 380, 106.5, 0.6)
pt3dadd(-235.5, 381.5, 106.5, 0.6)
pt3dadd(-237.5, 383, 106.5, 0.6)
pt3dadd(-238.5, 386, 100.5, 0.6)
pt3dadd(-239.5, 388, 100.5, 0.6)
pt3dadd(-239.5, 389.5, 100.5, 0.6)
pt3dadd(-240, 391.5, 100.5, 0.6)
pt3dadd(-240, 393, 100.5, 0.7)
pt3dadd(-241, 395.5, 106.5, 0.7)
pt3dadd(-241, 397.5, 106.5, 0.7)
}
}
proc shape3d_27() {
dend[73] { pt3dadd(-244.5, 399.5, 100.5, 0.7)
pt3dadd(-246.5, 400.5, 100.5, 0.7)
pt3dadd(-248, 401.5, 100.5, 0.7)
pt3dadd(-250.5, 402, 100.5, 0.9)
pt3dadd(-252, 403, 100.5, 0.9)
pt3dadd(-253, 404, 100.5, 0.9)
pt3dadd(-255, 406.5, 100.5, 0.8)
pt3dadd(-254.5, 407, 100.5, 0.8)
pt3dadd(-254.5, 409, 100.5, 0.8)
pt3dadd(-255.5, 414, 109.5, 0.8)
pt3dadd(-255.5, 416, 109.5, 0.8)
pt3dadd(-257, 417, 109.5, 0.8)
pt3dadd(-257.5, 418.5, 109.5, 0.8)
pt3dadd(-261, 420.5, 103.5, 0.8)
pt3dadd(-262.5, 421.5, 103.5, 0.9)
pt3dadd(-263.5, 423, 103.5, 1)
pt3dadd(-263.5, 424.5, 103.5, 1)
pt3dadd(-263.5, 426, 103.5, 1)
pt3dadd(-265.5, 426, 103.5, 1)
pt3dadd(-267.5, 427.5, 103.5, 1)
pt3dadd(-268.5, 429, 106.5, 1)
pt3dadd(-270, 431.5, 103.5, 1)
pt3dadd(-270, 434, 103.5, 1)
pt3dadd(-270, 436, 103.5, 0.8)
pt3dadd(-272, 438, 103.5, 0.8)
pt3dadd(-272.5, 439, 103.5, 0.8)
pt3dadd(-275, 440, 103.5, 0.8)
pt3dadd(-277, 441.5, 103.5, 1.2)
pt3dadd(-278.5, 442.5, 103.5, 1.2)
pt3dadd(-282, 445.5, 109.5, 1.1)
pt3dadd(-282, 448, 109.5, 1.1)
pt3dadd(-283, 450.5, 109.5, 1.1)
pt3dadd(-284, 451, 109.5, 0.9)
pt3dadd(-285.5, 453, 109.5, 0.9)
pt3dadd(-287.5, 454.5, 109.5, 0.9)
pt3dadd(-288.5, 457.5, 109.5, 0.9)
pt3dadd(-288.5, 460, 109.5, 0.9)
pt3dadd(-290.5, 462, 106.5, 0.9)
pt3dadd(-293.5, 465, 113, 0.9)
pt3dadd(-294, 467.5, 113, 0.9)
pt3dadd(-295, 471.5, 100.5, 0.9)
pt3dadd(-296.5, 473.5, 100.5, 0.9)
pt3dadd(-296.5, 477, 100.5, 0.9)
pt3dadd(-296.5, 479.5, 100.5, 0.9)
pt3dadd(-297.5, 482.5, 94, 0.5)
pt3dadd(-298.5, 488.5, 94, 0.5)
pt3dadd(-299, 492, 100.5, 0.5)
pt3dadd(-301, 494.5, 109.5, 0.5)
pt3dadd(-302.5, 497.5, 103.5, 0.5)
pt3dadd(-304, 498, 103.5, 0.5)
pt3dadd(-306, 503, 103.5, 0.6)
pt3dadd(-308.5, 505.5, 103.5, 0.6)
pt3dadd(-309.5, 508, 103.5, 0.6)
pt3dadd(-311.5, 510.5, 103.5, 0.6)
pt3dadd(-312.5, 514.5, 103.5, 0.6)
pt3dadd(-312.5, 516.5, 103.5, 0.6)
pt3dadd(-312.5, 519, 103.5, 0.6)
pt3dadd(-314.5, 521.5, 103.5, 0.6)
pt3dadd(-317, 526, 103.5, 0.6)
pt3dadd(-319, 528, 103.5, 0.6)
pt3dadd(-320.5, 530, 103.5, 0.7)
pt3dadd(-322, 533.5, 103.5, 0.7)
pt3dadd(-323, 536, 103.5, 0.7)
pt3dadd(-324, 538, 103.5, 0.7)
pt3dadd(-325, 540.5, 103.5, 0.7)
}
dend[74] {pt3dclear()
pt3dadd(-223.5, 376, 106.5, 2.3)
pt3dadd(-226, 374.5, 100.5, 1.3)
pt3dadd(-228, 374.5, 106.5, 1.3)
pt3dadd(-230, 374, 109.5, 1.3)
pt3dadd(-231.5, 375, 113, 1.3)
pt3dadd(-235, 378, 106.5, 1.4)
pt3dadd(-237.5, 379.5, 106.5, 1.1)
pt3dadd(-242.5, 381.5, 110, 1.1)
pt3dadd(-244, 383, 110, 1.1)
pt3dadd(-246.5, 385, 116.5, 1.5)
pt3dadd(-248, 385, 116.5, 1.6)
pt3dadd(-250, 385.5, 116.5, 1.5)
pt3dadd(-252, 386.5, 116.5, 1.5)
pt3dadd(-256, 388.5, 123.5, 1)
pt3dadd(-257.5, 389.5, 120, 0.7)
pt3dadd(-259.5, 389.5, 123.5, 0.8)
pt3dadd(-260.5, 391, 123.5, 0.9)
pt3dadd(-264, 390.5, 123.5, 1.1)
pt3dadd(-265, 392, 130, 1.1)
pt3dadd(-266.5, 392, 130, 0.9)
pt3dadd(-268, 392, 130, 0.9)
pt3dadd(-268, 394, 130, 0.9)
pt3dadd(-268.5, 395.5, 126.5, 0.7)
pt3dadd(-270.5, 396.5, 123.5, 0.9)
pt3dadd(-272, 397, 130, 1.1)
pt3dadd(-273.5, 398.5, 130, 1.2)
pt3dadd(-275.5, 399, 130, 1.5)
pt3dadd(-277.5, 400.5, 130, 1)
pt3dadd(-279, 400.5, 130, 0.7)
pt3dadd(-281, 400.5, 133.5, 0.7)
pt3dadd(-285, 400.5, 136.5, 0.7)
pt3dadd(-286.5, 400.5, 130, 0.8)
pt3dadd(-290.5, 404, 130, 0.8)
pt3dadd(-293, 405, 133.5, 1.3)
pt3dadd(-295.5, 406.5, 133.5, 0.9)
pt3dadd(-297.5, 407.5, 133.5, 0.7)
pt3dadd(-300.5, 408.5, 133.5, 1.1)
pt3dadd(-301.5, 410, 133.5, 1.2)
pt3dadd(-303.5, 412, 130, 1.2)
pt3dadd(-308.5, 412.5, 126.5, 1.3)
pt3dadd(-311, 412.5, 133.5, 1)
pt3dadd(-312.5, 414, 133.5, 1)
pt3dadd(-315, 417.5, 133.5, 0.9)
pt3dadd(-317, 419, 133.5, 1.3)
pt3dadd(-318.5, 420, 133.5, 1.3)
pt3dadd(-320, 421.5, 133.5, 1.3)
pt3dadd(-318.5, 423.5, 133.5, 1.3)
pt3dadd(-319, 425.5, 130, 0.9)
pt3dadd(-319.5, 428.5, 140, 0.9)
pt3dadd(-323, 432, 143.5, 0.9)
}
dend[75] {pt3dclear()
pt3dadd(6, 198, 5.5, 9.5)
pt3dadd(6.5, 204, 8.5, 3.7)
pt3dadd(10, 206, 8.5, 3.7)
pt3dadd(11.5, 207, 8.5, 4.5)
pt3dadd(10.5, 210.5, 12, 4.5)
pt3dadd(9.5, 210.5, 18.5, 4.6)
pt3dadd(11, 215.5, 15, 5.2)
pt3dadd(10.5, 217, 21.5, 5.2)
pt3dadd(10.5, 220.5, 25, 3.3)
pt3dadd(12.5, 225.5, 35.5, 3.8)
pt3dadd(9, 225.5, 39, 3.8)
pt3dadd(10.5, 227, 39, 4.9)
}
dend[76] {pt3dclear()
pt3dadd(10.5, 227, 39, 4.9)
pt3dadd(7.5, 228.5, 46.5, 2.9)
pt3dadd(5.5, 231, 39, 3)
pt3dadd(5.5, 233, 42.5, 2.7)
pt3dadd(7.5, 234.5, 42.5, 2.8)
pt3dadd(7.5, 233.5, 50, 3.1)
pt3dadd(8.5, 231.5, 53.5, 3.1)
pt3dadd(5, 235.5, 57, 2.5)
pt3dadd(4.5, 238.5, 57, 2.4)
pt3dadd(6, 240.5, 57, 2.6)
pt3dadd(2.5, 243, 53.5, 2.7)
pt3dadd(1.5, 245, 53.5, 2.7)
pt3dadd(1.5, 247, 53.5, 2.7)
pt3dadd(1, 250, 57, 2.7)
pt3dadd(-2.5, 253.5, 60.5, 2.7)
pt3dadd(-2.5, 256.5, 60.5, 3.1)
pt3dadd(-2, 261, 60.5, 3.1)
pt3dadd(-2, 264.5, 67.5, 3.1)
pt3dadd(-4.5, 267.5, 75, 4.3)
}
dend[77] {pt3dclear()
pt3dadd(-4.5, 267.5, 75, 4.3)
pt3dadd(-6, 265, 86.5, 1.8)
pt3dadd(-6.5, 267.5, 79, 1.8)
pt3dadd(-6.5, 264, 82.5, 1.8)
pt3dadd(-8.5, 264, 94, 1.8)
pt3dadd(-9, 265.5, 90.5, 1.8)
pt3dadd(-9.5, 266, 98, 1.8)
pt3dadd(-11.5, 266, 98, 1.8)
pt3dadd(-12.5, 266.5, 98, 1.8)
pt3dadd(-9, 268.5, 98, 1.8)
pt3dadd(-12, 270.5, 88.5, 2.8)
pt3dadd(-13.5, 271, 82.5, 2.8)
pt3dadd(-15.5, 271, 88.5, 2.5)
pt3dadd(-18, 272.5, 88.5, 2.5)
pt3dadd(-19.5, 274, 98, 2.6)
pt3dadd(-21, 275, 98, 2.7)
pt3dadd(-21.5, 275.5, 98, 2.7)
pt3dadd(-19.5, 276, 110.5, 2.7)
pt3dadd(-17.5, 276, 113.5, 2.4)
pt3dadd(-17.5, 278, 113.5, 2.4)
pt3dadd(-17.5, 280.5, 113.5, 2.4)
pt3dadd(-19, 280.5, 104, 2.4)
pt3dadd(-20.5, 280, 120, 2.4)
pt3dadd(-20.5, 278.5, 110.5, 2.4)
pt3dadd(-22.5, 277, 110.5, 2.4)
pt3dadd(-23, 280, 123, 2.4)
pt3dadd(-23, 281, 113.5, 2.5)
pt3dadd(-23.5, 283, 116.5, 1.9)
}
dend[78] {pt3dclear()
pt3dadd(-4.5, 267.5, 75, 4.3)
pt3dadd(-4, 270, 75, 1.8)
pt3dadd(-5.5, 270.5, 71, 2)
pt3dadd(-7.5, 273, 75, 2)
pt3dadd(-9.5, 275.5, 75, 2.4)
pt3dadd(-11.5, 277, 75, 2.4)
pt3dadd(-13.5, 278.5, 75, 2.7)
pt3dadd(-17, 283, 79, 2.1)
pt3dadd(-18.5, 285.5, 79, 2.1)
pt3dadd(-19.5, 287.5, 79, 2.1)
pt3dadd(-21.5, 290.5, 82.5, 2.1)
pt3dadd(-24.5, 296.5, 82.5, 1.4)
pt3dadd(-25.5, 298.5, 90.5, 1.4)
pt3dadd(-27, 302, 90.5, 1.6)
pt3dadd(-28, 309.5, 90.5, 2.4)
pt3dadd(-28, 313.5, 90.5, 2.5)
pt3dadd(-28, 316.5, 94, 2.5)
pt3dadd(-27.5, 321.5, 102, 3.1)
pt3dadd(-28, 324, 98, 2.4)
pt3dadd(-28.5, 326.5, 102, 1.8)
pt3dadd(-28.5, 328, 102, 1.8)
pt3dadd(-28.5, 330.5, 102, 2.2)
pt3dadd(-27.5, 333.5, 102, 2.3)
pt3dadd(-27.5, 335.5, 102, 2.3)
pt3dadd(-27, 337.5, 102, 2.5)
pt3dadd(-27, 339, 102, 2.5)
}
}
proc shape3d_28() {
dend[78] { pt3dadd(-26.5, 342, 102, 2.9)
pt3dadd(-25, 345.5, 99, 2.6)
pt3dadd(-25, 347, 99, 2.8)
pt3dadd(-25, 349.5, 99, 2.8)
pt3dadd(-25.5, 352, 99, 3.8)
}
dend[79] {pt3dclear()
pt3dadd(-25.5, 352, 99, 3.8)
pt3dadd(-24.5, 355, 102, 1.1)
pt3dadd(-25, 356.5, 102, 0.9)
pt3dadd(-25, 358.5, 102, 0.9)
pt3dadd(-25.5, 360, 105.5, 1)
pt3dadd(-25.5, 363.5, 99, 1)
pt3dadd(-24, 367, 99, 1)
pt3dadd(-25, 371, 105.5, 0.8)
}
dend[80] {pt3dclear()
pt3dadd(-25.5, 352, 99, 3.8)
pt3dadd(-28, 353, 96, 2.4)
pt3dadd(-29, 355, 102, 2.4)
pt3dadd(-29, 357, 102, 2.7)
pt3dadd(-29, 359, 102, 2.7)
pt3dadd(-29, 361.5, 105.5, 2.7)
pt3dadd(-28, 363.5, 108.5, 2.7)
pt3dadd(-26, 364.5, 108.5, 2.7)
pt3dadd(-26, 365.5, 108.5, 2.7)
pt3dadd(-27, 366.5, 118, 2.7)
pt3dadd(-28, 368.5, 121, 2.4)
pt3dadd(-28, 370.5, 121, 2.4)
pt3dadd(-28.5, 372.5, 121, 2.2)
pt3dadd(-28.5, 375, 121, 2.2)
pt3dadd(-28, 378.5, 121, 2.1)
pt3dadd(-26.5, 381, 118, 2.1)
pt3dadd(-26.5, 382.5, 124, 2.4)
pt3dadd(-26, 385, 124, 2.8)
pt3dadd(-26, 386.5, 124, 2.8)
pt3dadd(-26, 389, 124, 3.1)
pt3dadd(-25.5, 392, 130.5, 2.3)
pt3dadd(-25, 396, 124, 2.3)
pt3dadd(-23.5, 398, 124, 2.5)
pt3dadd(-22, 402.5, 120.5, 2.1)
pt3dadd(-23, 405, 124, 2.1)
pt3dadd(-24.5, 408, 124, 2.3)
pt3dadd(-26, 410, 124, 2.3)
pt3dadd(-26.5, 411.5, 130.5, 2.1)
pt3dadd(-26.5, 413.5, 130.5, 2.4)
pt3dadd(-27.5, 415.5, 144, 2)
pt3dadd(-28, 418, 144, 2)
pt3dadd(-28, 419.5, 144, 2.3)
pt3dadd(-29.5, 421.5, 144, 2)
pt3dadd(-29.5, 423.5, 144, 2)
pt3dadd(-31, 424.5, 144, 2.1)
pt3dadd(-33, 424.5, 144, 2.2)
pt3dadd(-32, 426, 150.5, 2.2)
pt3dadd(-33, 429, 150.5, 2.6)
pt3dadd(-34, 433.5, 150.5, 2.4)
pt3dadd(-36, 436, 150.5, 2.7)
pt3dadd(-37, 439, 154, 2.2)
pt3dadd(-40.5, 444, 150.5, 3.1)
pt3dadd(-42, 445.5, 150.5, 2.9)
pt3dadd(-45, 450, 147.5, 2.8)
pt3dadd(-46.5, 452.5, 160.5, 2)
pt3dadd(-49.5, 454.5, 160.5, 1.6)
pt3dadd(-50.5, 457.5, 160.5, 1.8)
pt3dadd(-52.5, 461.5, 160.5, 2)
pt3dadd(-53, 463.5, 167.5, 1.9)
pt3dadd(-54.5, 467, 167.5, 1.9)
pt3dadd(-56.5, 470, 164, 1.9)
pt3dadd(-58, 472.5, 167.5, 1.9)
pt3dadd(-61.5, 477.5, 167.5, 1.9)
pt3dadd(-62.5, 479.5, 167.5, 1.9)
pt3dadd(-62, 481, 167.5, 1.9)
pt3dadd(-62, 482.5, 177.5, 2.5)
pt3dadd(-62.5, 485, 177.5, 2.5)
pt3dadd(-63, 490.5, 177.5, 2.1)
pt3dadd(-63.5, 492.5, 177.5, 2.1)
pt3dadd(-64, 495, 177.5, 2)
pt3dadd(-65.5, 496, 177.5, 2)
pt3dadd(-66.5, 497.5, 177.5, 2)
pt3dadd(-67, 501, 180.5, 2.3)
}
dend[81] {pt3dclear()
pt3dadd(10.5, 227, 39, 4.9)
pt3dadd(14, 229, 32, 1.5)
pt3dadd(16, 229, 42.5, 1.3)
pt3dadd(20, 229, 39, 1.3)
pt3dadd(22, 230.5, 39, 1.3)
pt3dadd(22.5, 232.5, 46.5, 1.3)
pt3dadd(23, 233.5, 46.5, 1.3)
pt3dadd(25, 235, 46.5, 1.2)
pt3dadd(26.5, 234.5, 50, 0.9)
pt3dadd(28.5, 234, 50, 1.1)
pt3dadd(29.5, 235, 50, 1.4)
pt3dadd(30.5, 236.5, 50, 1.3)
pt3dadd(32.5, 237, 50, 1.3)
pt3dadd(34, 238, 57, 1.5)
pt3dadd(34.5, 240, 57, 1.4)
pt3dadd(35, 240.5, 57, 1.4)
pt3dadd(38.5, 241, 57, 1.4)
pt3dadd(40, 241, 57, 1.4)
pt3dadd(40.5, 242.5, 57, 1.6)
pt3dadd(42.5, 244, 57, 1.6)
pt3dadd(44.5, 247, 57, 1.6)
pt3dadd(45.5, 250, 60.5, 1.4)
pt3dadd(48.5, 247.5, 64.5, 1.2)
pt3dadd(50, 247.5, 72, 0.9)
pt3dadd(51.5, 246.5, 72, 0.7)
pt3dadd(53.5, 246.5, 72, 0.7)
pt3dadd(55.5, 246.5, 72, 0.7)
pt3dadd(55.5, 247.5, 68, 0.7)
pt3dadd(55.5, 249, 64.5, 0.7)
pt3dadd(56.5, 249.5, 68, 1.1)
pt3dadd(58.5, 249.5, 68, 1.1)
pt3dadd(60, 249.5, 68, 1.2)
pt3dadd(61.5, 249.5, 72, 1.2)
pt3dadd(63, 250, 72, 1)
pt3dadd(64, 249, 72, 1)
pt3dadd(65.5, 249, 72, 1)
pt3dadd(66.5, 249.5, 72, 1)
pt3dadd(68, 251.5, 76, 1.1)
pt3dadd(70, 253.5, 76, 1.2)
pt3dadd(70, 254, 76, 1.2)
pt3dadd(72, 255, 76, 1.4)
pt3dadd(71, 257, 76, 1.3)
pt3dadd(71, 258.5, 83.5, 1.3)
pt3dadd(71, 259.5, 79.5, 1.4)
pt3dadd(72.5, 259.5, 79.5, 1.4)
pt3dadd(74, 260.5, 79.5, 1.3)
pt3dadd(74, 261.5, 79.5, 1.3)
pt3dadd(74, 263, 79.5, 1)
pt3dadd(73.5, 264, 83.5, 1.1)
pt3dadd(75, 265, 83.5, 1)
pt3dadd(75.5, 265, 83.5, 1)
pt3dadd(74.5, 267, 91, 1.1)
pt3dadd(74, 267.5, 91, 1.1)
pt3dadd(73, 270, 87.5, 1.2)
}
dend[82] {pt3dclear()
pt3dadd(12, 122, -30.5, 8)
pt3dadd(9, 124.5, -34.5, 2.8)
pt3dadd(10.5, 128.5, -39, 3)
pt3dadd(12, 130, -39, 3)
pt3dadd(14, 133.5, -43, 3.4)
pt3dadd(15, 137, -34.5, 3.4)
pt3dadd(15, 139.5, -43, 3.4)
pt3dadd(15, 141.5, -43, 3.4)
pt3dadd(15, 143.5, -47, 4.6)
pt3dadd(15.5, 145.5, -43, 4.1)
pt3dadd(17.5, 146.5, -50.5, 3.1)
pt3dadd(21, 145.5, -50.5, 2.5)
pt3dadd(21, 147.5, -50.5, 2.5)
pt3dadd(21, 149.5, -50.5, 2.5)
pt3dadd(21.5, 151.5, -50.5, 2.5)
pt3dadd(23.5, 152, -58.5, 2.8)
pt3dadd(25, 153.5, -58.5, 3.8)
pt3dadd(26.5, 157, -62, 2.6)
pt3dadd(25.5, 158.5, -62, 2.6)
pt3dadd(23.5, 160.5, -62, 3.2)
pt3dadd(22.5, 162, -66, 2.9)
pt3dadd(25, 162, -73.5, 2.7)
pt3dadd(27, 162, -73.5, 2.6)
pt3dadd(28.5, 161, -85.5, 2.5)
pt3dadd(30, 162.5, -77.5, 2.8)
pt3dadd(29, 164, -81.5, 2.8)
pt3dadd(32.5, 164, -81.5, 2.6)
pt3dadd(34, 164.5, -81.5, 2.6)
pt3dadd(34, 168.5, -81.5, 3.4)
pt3dadd(34.5, 170, -81.5, 3.6)
pt3dadd(35, 168, -97, 3.6)
pt3dadd(36, 165, -97, 3.1)
pt3dadd(38.5, 166, -93, 2.3)
pt3dadd(38.5, 167, -93, 2.7)
pt3dadd(40, 166, -104.5, 2.3)
pt3dadd(41.5, 165.5, -112, 2.3)
pt3dadd(43, 165.5, -116, 2.8)
pt3dadd(46, 165.5, -112, 3.1)
pt3dadd(46, 168, -116, 3.3)
pt3dadd(44, 168.5, -116, 3.6)
pt3dadd(46.5, 169, -116, 2.7)
pt3dadd(48.5, 169, -116, 2.7)
pt3dadd(47, 166.5, -120, 2.7)
pt3dadd(50, 166.5, -120, 3.1)
pt3dadd(50, 168, -120, 3.5)
pt3dadd(53, 168.5, -128.5, 3.3)
pt3dadd(56.5, 171, -128.5, 2.8)
pt3dadd(58.5, 171.5, -128.5, 3.1)
pt3dadd(57.5, 167.5, -136.5, 3.5)
pt3dadd(59, 166.5, -136.5, 2.7)
pt3dadd(61, 166.5, -141, 2.7)
pt3dadd(62.5, 166.5, -145, 2.9)
pt3dadd(65.5, 164.5, -145, 2.9)
pt3dadd(68, 166.5, -145, 3.6)
pt3dadd(69.5, 166.5, -145, 3.6)
pt3dadd(71, 165.5, -145, 3.7)
pt3dadd(72.5, 163.5, -147.5, 2.9)
pt3dadd(74, 164, -147.5, 3.3)
pt3dadd(75, 166.5, -145, 3.3)
pt3dadd(74.5, 168.5, -145, 3.3)
pt3dadd(73.5, 170, -147.5, 3.3)
pt3dadd(75.5, 169, -153, 3.3)
pt3dadd(78, 168.5, -153, 3.3)
pt3dadd(82.5, 164, -155.5, 3.3)
pt3dadd(83, 164, -155.5, 3.4)
pt3dadd(83, 163, -161, 3.4)
pt3dadd(82.5, 161.5, -155.5, 3.5)
pt3dadd(83, 159.5, -158, 3.7)
pt3dadd(86, 158.5, -161, 3.7)
pt3dadd(89.5, 159, -163.5, 3.2)
}
}
proc shape3d_29() {
dend[82] { pt3dadd(93, 160, -163.5, 3.2)
pt3dadd(100, 159.5, -168, 2.9)
pt3dadd(102, 160.5, -180.5, 3.3)
pt3dadd(102.5, 162.5, -172, 3.1)
pt3dadd(104.5, 164.5, -172, 2.8)
pt3dadd(106.5, 164.5, -172, 2.8)
pt3dadd(108.5, 164, -176, 2.8)
pt3dadd(109, 167, -184.5, 3)
pt3dadd(110.5, 168, -184.5, 3)
pt3dadd(113, 168, -193, 3.8)
}
dend[83] {pt3dclear()
pt3dadd(113, 168, -193, 3.8)
pt3dadd(115, 172.5, -193, 2)
pt3dadd(113.5, 173, -193, 1.6)
pt3dadd(112.5, 175, -197, 1.4)
pt3dadd(112.5, 176.5, -197, 1.4)
pt3dadd(111.5, 178, -197, 1.4)
pt3dadd(108.5, 180.5, -197, 1.9)
pt3dadd(107, 181.5, -201, 2.2)
pt3dadd(105.5, 184, -192.5, 2.2)
pt3dadd(104.5, 185.5, -196.5, 1.9)
pt3dadd(104.5, 187.5, -196.5, 1.9)
pt3dadd(103.5, 189.5, -196.5, 1.8)
pt3dadd(102.5, 190.5, -196.5, 1.8)
pt3dadd(99.5, 189.5, -205, 1.7)
pt3dadd(98.5, 189, -205, 1.7)
pt3dadd(97, 190.5, -213.5, 1.4)
pt3dadd(97, 191.5, -217.5, 1.7)
pt3dadd(97, 193.5, -213.5, 1.6)
pt3dadd(96, 195, -221.5, 1.2)
pt3dadd(94.5, 195, -217.5, 1.2)
pt3dadd(92, 192.5, -221.5, 1.2)
pt3dadd(93, 191.5, -217.5, 1.6)
pt3dadd(95, 193.5, -226, 1.6)
pt3dadd(95, 198.5, -230, 1.6)
pt3dadd(95.5, 200, -230, 1.9)
pt3dadd(97, 202, -234, 1.9)
pt3dadd(97, 203.5, -234, 2)
pt3dadd(96.5, 204.5, -234, 1.7)
pt3dadd(96.5, 206.5, -229.5, 2.2)
pt3dadd(95, 209.5, -238.5, 1.5)
pt3dadd(94.5, 207.5, -238.5, 1.2)
pt3dadd(97, 207.5, -243, 1.4)
pt3dadd(98, 208.5, -243, 1.1)
pt3dadd(99.5, 210.5, -238.5, 1.1)
pt3dadd(100, 211.5, -247.5, 1.2)
pt3dadd(101, 211.5, -243, 0.9)
pt3dadd(102.5, 211.5, -243, 0.8)
pt3dadd(101, 213.5, -243, 0.7)
pt3dadd(100.5, 214.5, -243, 0.7)
pt3dadd(99.5, 215.5, -243, 1.4)
}
dend[84] {pt3dclear()
pt3dadd(99.5, 215.5, -243, 1.4)
pt3dadd(97, 218, -256.5, 1.1)
pt3dadd(96, 219, -252, 0.9)
pt3dadd(96, 220.5, -252, 0.9)
pt3dadd(95, 222, -252, 0.7)
pt3dadd(94.5, 222, -256.5, 0.7)
pt3dadd(93.5, 223.5, -261, 0.7)
pt3dadd(93, 223.5, -261, 0.7)
pt3dadd(93, 225, -261, 0.7)
pt3dadd(93, 226, -261, 0.7)
pt3dadd(93, 227, -270, 0.7)
pt3dadd(91, 228, -256.5, 0.7)
pt3dadd(91, 228.5, -256.5, 0.9)
pt3dadd(88.5, 231.5, -261, 0.7)
pt3dadd(87.5, 233, -261, 0.7)
pt3dadd(86, 234.5, -265.5, 0.7)
pt3dadd(85, 236, -261, 1)
pt3dadd(85, 238, -261, 1)
pt3dadd(86, 237, -265.5, 1)
pt3dadd(86.5, 234.5, -261, 1)
pt3dadd(84, 234, -261, 1)
pt3dadd(83.5, 232.5, -261, 1)
}
dend[85] {pt3dclear()
pt3dadd(99.5, 215.5, -243, 1.4)
pt3dadd(98, 215.5, -247.5, 1.1)
pt3dadd(100, 217, -275, 1.4)
pt3dadd(102, 216.5, -275, 1.4)
pt3dadd(104, 216.5, -275, 1.3)
pt3dadd(106, 216.5, -275, 1.2)
pt3dadd(107, 218, -275, 1.2)
}
dend[86] {pt3dclear()
pt3dadd(113, 168, -193, 3.8)
pt3dadd(115.5, 168, -193, 2.6)
pt3dadd(117, 169, -184.5, 2.3)
pt3dadd(118.5, 171, -188.5, 2.1)
pt3dadd(121, 171.5, -184.5, 1.7)
pt3dadd(122, 170, -193, 2)
pt3dadd(124, 168.5, -197, 2)
pt3dadd(128, 168.5, -205.5, 2.7)
pt3dadd(131, 169, -205.5, 2.7)
pt3dadd(136, 169.5, -213.5, 3.5)
pt3dadd(138.5, 170, -209.5, 3.3)
pt3dadd(140.5, 172, -209.5, 2)
pt3dadd(141.5, 173, -209.5, 2.2)
pt3dadd(142, 174, -205.5, 1.8)
pt3dadd(144, 173, -205.5, 1.8)
pt3dadd(147, 172.5, -209.5, 2)
pt3dadd(148.5, 172.5, -218, 2.2)
pt3dadd(152.5, 172.5, -218, 3.1)
pt3dadd(154, 172.5, -218, 3.7)
}
dend[87] {pt3dclear()
pt3dadd(154, 172.5, -218, 3.7)
pt3dadd(155.5, 171.5, -226, 1.9)
pt3dadd(157, 171, -226, 1.9)
pt3dadd(158.5, 171, -230.5, 1.6)
pt3dadd(159.5, 170, -230.5, 1.6)
pt3dadd(163, 168.5, -226, 1.7)
pt3dadd(165, 169.5, -226, 1.7)
pt3dadd(167, 170.5, -226, 1.7)
pt3dadd(169, 171.5, -226, 2.1)
pt3dadd(172.5, 174.5, -230.5, 2.7)
pt3dadd(174.5, 175.5, -230.5, 2.5)
pt3dadd(176, 176, -230.5, 2.5)
pt3dadd(177.5, 177, -238.5, 2.8)
pt3dadd(180, 178, -238.5, 3.1)
pt3dadd(183.5, 178, -238.5, 3.1)
pt3dadd(186, 178, -238.5, 3.1)
pt3dadd(187.5, 179.5, -234, 2)
pt3dadd(190, 179.5, -234, 1.9)
pt3dadd(192, 181, -238.5, 1.9)
pt3dadd(194, 181, -243, 1.9)
pt3dadd(196.5, 181, -238.5, 1.9)
pt3dadd(198.5, 181, -238.5, 1.9)
pt3dadd(201, 181, -238.5, 1.9)
pt3dadd(203.5, 181, -252, 2)
pt3dadd(206, 181, -252, 2)
pt3dadd(208, 180.5, -247.5, 2)
pt3dadd(210, 180, -247.5, 2)
pt3dadd(212, 180, -247.5, 2)
pt3dadd(213, 179, -252, 1.8)
pt3dadd(215.5, 177.5, -252, 1.6)
pt3dadd(217, 177.5, -252, 1.7)
pt3dadd(219.5, 177.5, -256.5, 2)
pt3dadd(226, 178, -252, 2)
pt3dadd(229.5, 178, -256.5, 2)
pt3dadd(232, 178, -261, 2)
pt3dadd(234.5, 179.5, -256.5, 2.4)
pt3dadd(236, 179.5, -265.5, 2.4)
pt3dadd(243, 179.5, -252, 2.1)
pt3dadd(245, 179.5, -256.5, 1.9)
pt3dadd(248, 179.5, -256.5, 1.7)
pt3dadd(253.5, 178.5, -256.5, 1.9)
pt3dadd(256, 177, -256.5, 1.6)
pt3dadd(258.5, 177, -256.5, 1.6)
pt3dadd(260.5, 176.5, -256.5, 1.6)
pt3dadd(263, 176, -265.5, 1.6)
pt3dadd(267.5, 176, -252, 1.2)
pt3dadd(268.5, 175, -252, 1.2)
pt3dadd(271, 173.5, -261, 1.1)
pt3dadd(273.5, 173.5, -261, 1.1)
pt3dadd(278, 173.5, -261, 1.3)
pt3dadd(279, 172.5, -261, 1.2)
pt3dadd(280, 172, -261, 1.2)
pt3dadd(281.5, 170.5, -261, 1.2)
pt3dadd(282.5, 168.5, -261, 1.2)
pt3dadd(286, 167, -254, 1.6)
pt3dadd(291.5, 163.5, -261, 1.7)
pt3dadd(292.5, 162, -261, 2.1)
pt3dadd(296.5, 162, -264.5, 2.1)
pt3dadd(298.5, 161, -261, 2.3)
pt3dadd(300, 160.5, -264.5, 2.6)
pt3dadd(302, 160.5, -268, 2.1)
pt3dadd(304, 161.5, -261, 2.4)
pt3dadd(305, 161.5, -261, 2.1)
pt3dadd(306, 160.5, -257.5, 2.1)
pt3dadd(308, 160.5, -268, 1.4)
pt3dadd(310, 160.5, -268, 1.8)
pt3dadd(311.5, 160.5, -275.5, 1.8)
pt3dadd(314.5, 160.5, -275.5, 1.8)
pt3dadd(317, 160.5, -275.5, 1.8)
pt3dadd(319.5, 160.5, -282.5, 1.8)
pt3dadd(323, 160.5, -282.5, 1.8)
pt3dadd(326.5, 159.5, -279, 1.8)
pt3dadd(329, 159, -279, 1.8)
pt3dadd(332.5, 158, -279, 1.7)
pt3dadd(335, 158, -279, 1.7)
pt3dadd(335.5, 157.5, -282.5, 1.7)
pt3dadd(339.5, 157, -282.5, 1.3)
pt3dadd(341, 157, -282.5, 1.3)
pt3dadd(342.5, 157, -282.5, 1.6)
pt3dadd(344, 157, -279, 2)
pt3dadd(346, 156.5, -282.5, 1.8)
pt3dadd(348, 156.5, -286, 2.3)
pt3dadd(353, 156.5, -286, 2.1)
pt3dadd(354, 156.5, -286, 2.1)
pt3dadd(355, 156.5, -275.5, 1.9)
pt3dadd(357, 156, -279, 1.8)
pt3dadd(358.5, 156, -279, 1.7)
pt3dadd(360.5, 156, -279, 2.2)
pt3dadd(362, 153.5, -279, 1.7)
pt3dadd(364, 152, -282.5, 1.4)
pt3dadd(365, 150.5, -282.5, 1.3)
pt3dadd(366.5, 149, -289.5, 1.3)
pt3dadd(368.5, 147.5, -289.5, 1.4)
pt3dadd(369.5, 146.5, -289.5, 2.1)
pt3dadd(371.5, 144.5, -293, 2.3)
pt3dadd(374, 143, -289.5, 2.3)
}
dend[88] {pt3dclear()
pt3dadd(154, 172.5, -218, 3.7)
pt3dadd(155, 174, -226, 1.4)
pt3dadd(155, 175, -226, 1.4)
pt3dadd(157, 175, -226, 0.9)
pt3dadd(158, 176, -226, 0.9)
pt3dadd(158, 177, -226, 1)
}
}
proc shape3d_30() {
dend[88] { pt3dadd(159.5, 177, -230.5, 1)
pt3dadd(162, 178, -230.5, 1)
pt3dadd(162.5, 180, -234.5, 1.3)
pt3dadd(163.5, 182.5, -234.5, 1.3)
pt3dadd(166, 183.5, -230, 1.1)
pt3dadd(166.5, 185, -243.5, 1.1)
pt3dadd(167.5, 186.5, -243.5, 1.3)
pt3dadd(168, 185.5, -239, 1.4)
pt3dadd(168.5, 183.5, -239, 1.2)
pt3dadd(169, 182.5, -239, 0.9)
pt3dadd(171, 182.5, -239, 0.9)
pt3dadd(171.5, 182.5, -239, 0.9)
pt3dadd(174, 180, -234.5, 1)
pt3dadd(175.5, 178.5, -243.5, 1.2)
pt3dadd(177.5, 176.5, -257, 1)
pt3dadd(177.5, 175.5, -252.5, 0.9)
pt3dadd(179, 174, -257, 0.9)
pt3dadd(180, 174, -257, 0.8)
pt3dadd(181.5, 174, -257, 0.8)
pt3dadd(182.5, 173, -252.5, 0.8)
pt3dadd(183.5, 172, -261.5, 0.8)
pt3dadd(185.5, 171, -261.5, 0.8)
pt3dadd(187, 170, -266, 0.7)
pt3dadd(187.5, 169, -257, 1)
pt3dadd(190.5, 167.5, -261.5, 1)
pt3dadd(192.5, 166, -261.5, 0.9)
pt3dadd(195, 166, -261.5, 0.9)
pt3dadd(197, 165.5, -275, 1.1)
pt3dadd(202.5, 166.5, -261.5, 1.1)
pt3dadd(204, 167.5, -261.5, 1.1)
}
dend[89] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 3.9)
pt3dadd(17.5, 41, -5, 3.9)
pt3dadd(23.5, 42, -8, 2.6)
pt3dadd(24.5, 43.5, -8, 2.1)
pt3dadd(26.5, 44, -8, 2)
pt3dadd(29, 44.5, -8, 2.3)
pt3dadd(31.5, 46, -8, 2.8)
pt3dadd(33.5, 47, -8, 3)
pt3dadd(35, 48, -5, 3)
pt3dadd(37.5, 50, -5, 2.8)
pt3dadd(39.5, 51.5, -5, 2.8)
pt3dadd(41, 51.5, -5, 2.6)
pt3dadd(41, 54, 5, 2.6)
pt3dadd(44, 54, -1.5, 2.2)
pt3dadd(49.5, 57.5, -1.5, 2.2)
pt3dadd(53.5, 61, -1.5, 1.7)
pt3dadd(55.5, 63, -1.5, 2.1)
pt3dadd(57, 63, 1.5, 2.8)
pt3dadd(58.5, 63.5, 1.5, 3.1)
pt3dadd(61.5, 65.5, 1.5, 2.4)
pt3dadd(64, 66.5, 1.5, 1.9)
pt3dadd(65.5, 68, 1.5, 1.6)
pt3dadd(68, 69, 1.5, 1.4)
pt3dadd(70, 69.5, 1.5, 1.2)
pt3dadd(74, 70.5, 1.5, 1.5)
pt3dadd(76, 70.5, 1.5, 1.3)
pt3dadd(78.5, 71.5, -5, 1.3)
pt3dadd(81, 73, -5, 1.5)
pt3dadd(83, 73, -5, 1.9)
pt3dadd(84, 73, -5, 2.6)
pt3dadd(85.5, 73, -1.5, 3.3)
}
dend[90] {pt3dclear()
pt3dadd(85.5, 73, -1.5, 3.3)
pt3dadd(88.5, 76.5, -8, 1.6)
pt3dadd(89.5, 78, -11.5, 1.6)
pt3dadd(91.5, 79.5, -5, 1.6)
pt3dadd(92, 81, -5, 1.3)
pt3dadd(93, 81, -8, 1.2)
pt3dadd(97.5, 83, -5, 1.7)
pt3dadd(100.5, 86, -11.5, 1.6)
pt3dadd(103, 89, -5, 1.1)
pt3dadd(107, 91.5, -5, 1.3)
pt3dadd(109.5, 92.5, -8, 1.2)
pt3dadd(113.5, 93, -8, 1.2)
pt3dadd(118, 94.5, -8, 1.1)
pt3dadd(121.5, 97, -8, 1.1)
pt3dadd(126.5, 101.5, -8, 1.2)
pt3dadd(128.5, 103, -5, 1.2)
pt3dadd(128.5, 104.5, -15, 1.7)
pt3dadd(135, 105.5, -23.5, 0.9)
pt3dadd(136.5, 106.5, -19.5, 0.9)
pt3dadd(139.5, 107, -19.5, 0.9)
pt3dadd(142, 108, -19.5, 0.9)
pt3dadd(143.5, 109.5, -19.5, 0.9)
pt3dadd(145, 110, -19.5, 0.9)
pt3dadd(146.5, 111, -19.5, 0.9)
pt3dadd(148.5, 115, -23.5, 1.1)
pt3dadd(152.5, 117, -23.5, 0.9)
pt3dadd(155.5, 119.5, -23.5, 1.1)
pt3dadd(158, 120, -23.5, 1.1)
pt3dadd(160.5, 120.5, -23.5, 1.1)
pt3dadd(162.5, 121, -27.5, 1.1)
pt3dadd(167.5, 124, -23.5, 1.2)
pt3dadd(170.5, 125.5, -27.5, 1.2)
pt3dadd(175.5, 127, -27.5, 1.2)
pt3dadd(178, 128, -27.5, 1.1)
pt3dadd(180, 128, -27.5, 1)
pt3dadd(182, 128, -27.5, 1.2)
pt3dadd(184, 129, -32, 1.3)
pt3dadd(188, 130, -32, 1.6)
pt3dadd(190, 131, -36, 1.6)
pt3dadd(195, 135.5, -36, 1.5)
pt3dadd(197, 137.5, -23.5, 1.4)
pt3dadd(200.5, 138.5, -23.5, 1.3)
pt3dadd(203, 140, -23.5, 0.9)
pt3dadd(206, 140.5, -23.5, 1.1)
pt3dadd(209.5, 141.5, -23.5, 1.1)
pt3dadd(211, 142.5, -23.5, 1.1)
pt3dadd(216, 144, -23.5, 1.2)
pt3dadd(218.5, 146, -23.5, 1)
pt3dadd(221.5, 147, -27.5, 1.1)
pt3dadd(224, 148.5, -19.5, 1.1)
pt3dadd(226, 149.5, -19.5, 1.1)
pt3dadd(227, 150.5, -19.5, 1.1)
pt3dadd(229.5, 150.5, -19.5, 1.1)
pt3dadd(231, 150.5, -15, 1.1)
pt3dadd(234.5, 151, -19.5, 1.1)
pt3dadd(236.5, 151.5, -19.5, 1.2)
pt3dadd(239.5, 153.5, -19.5, 1.2)
pt3dadd(241.5, 153.5, -19.5, 1.2)
pt3dadd(242.5, 153.5, -19.5, 1.2)
pt3dadd(244.5, 154.5, -19.5, 1.2)
pt3dadd(246, 155, -19.5, 1.1)
pt3dadd(249, 157, -16.5, 0.9)
pt3dadd(252, 159, -19.5, 0.9)
pt3dadd(253.5, 159.5, -19.5, 1)
pt3dadd(254.5, 161, -16.5, 1.2)
pt3dadd(256.5, 163, -16.5, 1.1)
pt3dadd(258.5, 163, -16.5, 1.1)
pt3dadd(260, 163, -16.5, 1.1)
pt3dadd(262, 164, -16.5, 1.1)
pt3dadd(263.5, 164.5, -19.5, 1.1)
pt3dadd(267, 166.5, -13, 1.1)
pt3dadd(267.5, 168, -13, 1.1)
pt3dadd(269, 170, -10, 1.1)
pt3dadd(271, 171.5, -13, 1.1)
pt3dadd(275, 174, -10, 1.1)
pt3dadd(278, 177, -10, 1.2)
pt3dadd(282, 178, -10, 1.2)
pt3dadd(284.5, 178.5, -10, 1.2)
pt3dadd(286.5, 179, -10, 1.2)
pt3dadd(289, 180, -10, 1.2)
pt3dadd(290.5, 181, -10, 1.2)
pt3dadd(293, 183, -10, 1.2)
pt3dadd(293, 186, -10, 1.2)
pt3dadd(294.5, 188, -10, 1.2)
pt3dadd(296.5, 190, -6.5, 0.9)
pt3dadd(298.5, 191.5, -6.5, 0.8)
pt3dadd(299.5, 193.5, -6.5, 0.8)
pt3dadd(299.5, 195.5, -6.5, 0.8)
pt3dadd(299.5, 197.5, 0, 0.8)
pt3dadd(301.5, 198.5, 0, 0.8)
pt3dadd(301.5, 200.5, 0, 0.8)
pt3dadd(302.5, 202.5, 0, 0.8)
pt3dadd(303.5, 203.5, 0, 0.8)
pt3dadd(304.5, 205, 0, 0.8)
pt3dadd(305.5, 206, 0, 0.9)
pt3dadd(306.5, 206.5, 0, 0.9)
pt3dadd(308, 208, 3.5, 0.9)
pt3dadd(309.5, 209.5, 6.5, 0.9)
pt3dadd(311.5, 212, 0, 0.9)
pt3dadd(311.5, 214, 0, 0.9)
pt3dadd(313, 215.5, 0, 0.9)
pt3dadd(314.5, 218, 0, 0.9)
pt3dadd(316, 222, 0, 1)
pt3dadd(317, 224, 3.5, 0.7)
pt3dadd(318, 225.5, 3.5, 0.8)
pt3dadd(320, 227, -6.5, 0.8)
pt3dadd(321.5, 228.5, 0, 0.8)
pt3dadd(323, 231.5, -6.5, 0.8)
pt3dadd(324.5, 232.5, -10, 0.8)
pt3dadd(325.5, 234, -10, 0.8)
pt3dadd(326, 235.5, -10, 0.6)
pt3dadd(328, 236.5, -6.5, 0.6)
pt3dadd(330.5, 238, -6.5, 0.6)
pt3dadd(332.5, 239.5, -6.5, 0.6)
pt3dadd(334.5, 241.5, -6.5, 0.6)
pt3dadd(337, 243.5, -10, 0.7)
pt3dadd(337.5, 243.5, -6.5, 0.7)
pt3dadd(342, 243.5, -3.5, 0.8)
pt3dadd(344, 243.5, -13, 0.8)
pt3dadd(347.5, 246.5, -10, 0.8)
pt3dadd(349.5, 247.5, -10, 0.8)
pt3dadd(351.5, 250, -10, 0.8)
pt3dadd(352, 252, -10, 0.8)
pt3dadd(355.5, 255, -16.5, 0.8)
pt3dadd(360, 258.5, -6.5, 0.8)
pt3dadd(362, 262, -6.5, 0.8)
pt3dadd(364.5, 263, -10, 0.8)
pt3dadd(368.5, 264, -10, 0.8)
pt3dadd(370, 266, -10, 0.9)
pt3dadd(372, 268.5, -13, 0.9)
pt3dadd(373.5, 269, -13, 0.9)
pt3dadd(376, 271.5, -13, 0.9)
pt3dadd(378.5, 273, -6.5, 0.7)
pt3dadd(381.5, 274, -6.5, 0.7)
pt3dadd(385.5, 275.5, -13, 0.7)
pt3dadd(385.5, 277, -16.5, 0.7)
pt3dadd(387.5, 279.5, -13, 0.7)
pt3dadd(388, 283, -6.5, 0.7)
pt3dadd(389.5, 285, -6.5, 0.7)
}
}
proc shape3d_31() {
dend[90] { pt3dadd(389, 288.5, -10, 0.7)
pt3dadd(392.5, 290.5, -6.5, 0.7)
pt3dadd(396.5, 292.5, -6.5, 0.7)
pt3dadd(400.5, 294, -6.5, 0.4)
pt3dadd(405, 294.5, -10, 0.7)
pt3dadd(409, 296, -10, 0.7)
pt3dadd(412, 296, -10, 0.7)
pt3dadd(415, 298, -10, 0.7)
pt3dadd(417.5, 298, -13, 0.7)
pt3dadd(419, 300, -10, 0.7)
pt3dadd(421.5, 300, -10, 0.7)
pt3dadd(424, 302, -10, 0.7)
pt3dadd(425.5, 302, -10, 0.7)
pt3dadd(428.5, 304, -10, 0.7)
pt3dadd(431.5, 307, -10, 0.7)
pt3dadd(433, 309, -10, 0.7)
pt3dadd(435, 310.5, -10, 0.1)
pt3dadd(438.5, 313, -3.5, 0.1)
pt3dadd(440, 313, -10, 0.1)
pt3dadd(444, 316, -16.5, 0.1)
pt3dadd(449.5, 319.5, -13, 0.1)
pt3dadd(452.5, 322, -13, 0.1)
pt3dadd(456, 324, -13, 0.1)
pt3dadd(459, 326.5, -13, 0.1)
pt3dadd(462.5, 328.5, -6.5, 0.8)
}
dend[91] {pt3dclear()
pt3dadd(85.5, 73, -1.5, 3.3)
pt3dadd(89.5, 72, -8, 1)
pt3dadd(91, 71, -8, 0.9)
pt3dadd(93, 70, -8, 0.9)
pt3dadd(95.5, 69, -5, 0.7)
pt3dadd(96.5, 68, -5, 0.7)
pt3dadd(99, 64.5, -5, 0.9)
pt3dadd(102, 63, -5, 0.9)
pt3dadd(103.5, 62, -5, 1)
pt3dadd(106, 61, -5, 1.4)
pt3dadd(107, 60, -8, 1.4)
pt3dadd(107.5, 58, -5, 1.2)
pt3dadd(108.5, 56, -11.5, 1.2)
pt3dadd(111, 54, -5, 1.1)
pt3dadd(113, 51.5, -1.5, 0.9)
pt3dadd(115.5, 50.5, -1.5, 0.8)
pt3dadd(117.5, 48, -1.5, 0.8)
pt3dadd(119.5, 47, -1.5, 0.8)
pt3dadd(121, 46, -1.5, 0.8)
pt3dadd(123, 45, -1.5, 0.8)
pt3dadd(124.5, 44, -1.5, 1)
pt3dadd(126.5, 43.5, -1.5, 1)
pt3dadd(130, 40, -1.5, 0.8)
pt3dadd(131, 40, -5, 0.9)
pt3dadd(135, 38, -5, 0.9)
pt3dadd(137, 35.5, -8, 0.8)
pt3dadd(140, 34.5, -5, 1.3)
pt3dadd(141, 33.5, -5, 0.9)
pt3dadd(143.5, 33.5, -5, 0.7)
pt3dadd(145, 33.5, -5, 1.2)
pt3dadd(147.5, 33.5, -8, 0.7)
pt3dadd(151, 31.5, -8, 1.1)
pt3dadd(154, 31, -8, 0.9)
pt3dadd(156, 30.5, -8, 0.8)
pt3dadd(158, 29.5, -8, 1.1)
pt3dadd(160, 29.5, -8, 1.1)
pt3dadd(165, 28, 1.5, 1.1)
pt3dadd(168, 28, 5, 0.4)
pt3dadd(171, 26, 1.5, 0.5)
pt3dadd(174.5, 24, 1.5, 0.5)
pt3dadd(177.5, 24, -5, 0.9)
pt3dadd(181, 24, -5, 0.9)
pt3dadd(185, 24, -8, 0.9)
pt3dadd(187.5, 24, -8, 0.9)
pt3dadd(190.5, 24, -8, 0.9)
pt3dadd(200, 23.5, -8, 1.1)
pt3dadd(202.5, 23, -1.5, 1.1)
pt3dadd(205.5, 21, 1.5, 1.1)
pt3dadd(209.5, 20, 1.5, 1.1)
pt3dadd(213, 20, -5, 1.1)
pt3dadd(222, 20, 1.5, 0.7)
pt3dadd(227, 20, 1.5, 0.7)
pt3dadd(230.5, 20, -1.5, 0.7)
pt3dadd(235, 20, 1.5, 0.7)
pt3dadd(239.5, 20, 1.5, 0.7)
pt3dadd(242.5, 19.5, 1.5, 0.5)
pt3dadd(245, 19, 1.5, 0.5)
pt3dadd(250.5, 17, -8, 0.5)
pt3dadd(252.5, 16, -11.5, 0.5)
pt3dadd(255, 16, -5, 0.5)
pt3dadd(257.5, 16, -8, 0.5)
pt3dadd(259, 15, -1.5, 0.5)
pt3dadd(261, 14.5, 5, 1.2)
pt3dadd(263.5, 14.5, 5, 1.2)
pt3dadd(265.5, 14, 5, 1.2)
pt3dadd(267.5, 13, 15, 1.3)
pt3dadd(268.5, 11.5, 8, 1.1)
pt3dadd(271.5, 10.5, 8, 1.1)
pt3dadd(273.5, 9.5, 8, 1.2)
}
dend[92] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 7.2)
pt3dadd(17.5, 35, -15, 7.2)
pt3dadd(19.5, 36.5, -18, 6.3)
pt3dadd(22.5, 37.5, -18, 6.3)
pt3dadd(24.5, 37.5, -18, 5.2)
pt3dadd(27.5, 39, -18, 5.3)
pt3dadd(30.5, 40.5, -26.5, 4.9)
pt3dadd(33.5, 41.5, -22.5, 5.2)
pt3dadd(36.5, 42, -26.5, 5.6)
pt3dadd(39.5, 44, -26.5, 6.2)
pt3dadd(43.5, 45, -26.5, 6.2)
pt3dadd(46.5, 46, -26.5, 5.9)
pt3dadd(49, 46.5, -30.5, 5.9)
pt3dadd(52, 48, -30.5, 5.7)
pt3dadd(54.5, 48, -35, 5.7)
pt3dadd(58, 49, -35, 5.7)
pt3dadd(61, 50.5, -35, 5.7)
pt3dadd(64.5, 51, -30.5, 5.7)
pt3dadd(70.5, 52.5, -30.5, 6.3)
pt3dadd(77, 54, -38, 5.8)
pt3dadd(82, 55, -30.5, 5.1)
pt3dadd(85, 55.5, -38, 5.4)
pt3dadd(89.5, 57, -38, 5)
pt3dadd(92.5, 57.5, -38, 4.7)
pt3dadd(98, 58.5, -38, 4.5)
pt3dadd(100, 59, -42, 4.2)
pt3dadd(102.5, 59, -42, 4)
pt3dadd(106.5, 61, -42, 4.4)
pt3dadd(111.5, 62.5, -45.5, 4.8)
pt3dadd(118, 64, -45.5, 4.9)
pt3dadd(120, 64, -45.5, 4.9)
pt3dadd(121.5, 64.5, -45.5, 4.2)
pt3dadd(126.5, 66, -49.5, 4)
pt3dadd(129.5, 68, -49.5, 3.5)
pt3dadd(132, 68, -49.5, 3.4)
pt3dadd(136.5, 68, -49.5, 4.1)
pt3dadd(141.5, 68, -49.5, 4.9)
pt3dadd(144, 68, -49.5, 5)
pt3dadd(150, 70, -57, 5.7)
pt3dadd(152, 71, -57, 6)
pt3dadd(155.5, 71, -57, 5.2)
pt3dadd(163, 71, -57, 5.1)
pt3dadd(166.5, 71, -57, 5.4)
pt3dadd(170, 71, -57, 5.6)
pt3dadd(172.5, 71, -57, 5.8)
pt3dadd(176.5, 71, -53.5, 5.3)
pt3dadd(180, 72, -53.5, 4.7)
pt3dadd(182.5, 72, -57, 4.7)
pt3dadd(187, 74.5, -57, 4.9)
pt3dadd(189.5, 74.5, -53.5, 4.5)
pt3dadd(192.5, 74.5, -65, 4.9)
pt3dadd(202, 77, -65, 3.7)
pt3dadd(207.5, 78.5, -65, 3.7)
pt3dadd(211, 79, -65, 3.7)
pt3dadd(216.5, 80.5, -65, 3.6)
pt3dadd(221, 83, -65, 3.3)
pt3dadd(225.5, 83.5, -65, 3.7)
pt3dadd(230, 85.5, -65, 3.6)
pt3dadd(235.5, 86, -65, 4.9)
pt3dadd(241, 87.5, -65, 4.3)
pt3dadd(244, 87.5, -65, 3.8)
pt3dadd(249, 87.5, -68.5, 4.7)
pt3dadd(252, 88, -68.5, 5)
pt3dadd(254, 88.5, -68.5, 5.7)
}
dend[93] {pt3dclear()
pt3dadd(254, 88.5, -68.5, 5.7)
pt3dadd(271, 94, -76.5, 5.2)
pt3dadd(274, 95.5, -76.5, 7.1)
}
dend[94] {pt3dclear()
pt3dadd(274, 95.5, -76.5, 7.1)
pt3dadd(281, 94, -84, 4.1)
pt3dadd(282.5, 94, -84, 4.1)
pt3dadd(285, 93.5, -84, 3.8)
pt3dadd(288, 93, -84, 3.4)
pt3dadd(289, 93, -88, 3.2)
pt3dadd(291.5, 92.5, -88, 3.3)
pt3dadd(294.5, 92.5, -88, 2.9)
pt3dadd(298.5, 92.5, -91.5, 2.6)
pt3dadd(300.5, 92.5, -91.5, 2.5)
pt3dadd(304.5, 92.5, -88, 2.5)
pt3dadd(308, 92.5, -95.5, 2.2)
pt3dadd(312, 92, -91.5, 2.2)
pt3dadd(315.5, 91, -91.5, 2.2)
pt3dadd(319.5, 89, -84, 2.5)
pt3dadd(323.5, 87, -91.5, 2.5)
pt3dadd(325.5, 86.5, -88, 2.3)
pt3dadd(327.5, 85.5, -88, 2.3)
pt3dadd(329, 85.5, -84, 2)
pt3dadd(333.5, 85.5, -88, 2.2)
pt3dadd(339, 84, -88, 2.5)
pt3dadd(340, 84, -88, 2.5)
pt3dadd(341.5, 83.5, -84, 2.5)
pt3dadd(343, 82.5, -84, 2.5)
pt3dadd(344.5, 82, -80, 2.3)
pt3dadd(347, 81, -80, 2.5)
pt3dadd(350, 79.5, -84, 3.1)
pt3dadd(354.5, 78, -92.5, 4)
pt3dadd(360, 76, -92.5, 4.4)
pt3dadd(362, 74, -96.5, 4.2)
pt3dadd(367, 72.5, -96.5, 4.1)
pt3dadd(370.5, 71, -101, 4.1)
pt3dadd(375, 70, -96.5, 3.7)
pt3dadd(376.5, 69.5, -88.5, 3.4)
pt3dadd(378, 69, -88.5, 3.3)
pt3dadd(382.5, 66.5, -92.5, 3.3)
pt3dadd(384.5, 66.5, -92.5, 3.3)
pt3dadd(386.5, 65.5, -92.5, 3.3)
pt3dadd(391.5, 63.5, -92.5, 3.1)
}
}
proc shape3d_32() {
dend[94] { pt3dadd(393.5, 62, -92.5, 3.4)
pt3dadd(396, 62, -96.5, 3.3)
pt3dadd(400, 59.5, -92.5, 2.4)
pt3dadd(403.5, 55.5, -92.5, 1.9)
pt3dadd(412, 52.5, -96.5, 2.3)
pt3dadd(415, 51, -88.5, 2.2)
pt3dadd(418, 51, -92.5, 2.7)
pt3dadd(420.5, 51, -96.5, 2.2)
pt3dadd(424.5, 50, -88.5, 2.5)
pt3dadd(430.5, 48.5, -92.5, 2.7)
pt3dadd(432.5, 47, -92.5, 2.7)
pt3dadd(435.5, 47, -92.5, 2.9)
pt3dadd(444.5, 45.5, -88.5, 2.7)
pt3dadd(447.5, 45.5, -88.5, 2.7)
pt3dadd(450.5, 44.5, -88.5, 2.7)
pt3dadd(452.5, 44.5, -92.5, 2.3)
pt3dadd(455.5, 46, -92.5, 2.7)
pt3dadd(460.5, 46.5, -96.5, 3.1)
pt3dadd(464.5, 46, -88.5, 2.9)
pt3dadd(467.5, 46, -88.5, 2.4)
pt3dadd(472.5, 44.5, -88.5, 2.4)
pt3dadd(476, 44.5, -96.5, 2.9)
pt3dadd(479.5, 44.5, -101, 2.9)
pt3dadd(482, 43.5, -101, 2.2)
pt3dadd(485.5, 42, -105, 1.8)
pt3dadd(487.5, 42, -105, 1.8)
pt3dadd(491.5, 41, -105, 2)
pt3dadd(493, 40.5, -105, 2.7)
pt3dadd(498, 40, -109, 2.5)
pt3dadd(509, 39, -105, 1.9)
pt3dadd(514, 37, -109, 1.9)
pt3dadd(519, 37, -109, 1.9)
pt3dadd(523, 37, -113.5, 2.2)
pt3dadd(528.5, 37, -113.5, 2.4)
pt3dadd(530.5, 37, -105, 2.7)
pt3dadd(536.5, 37.5, -113.5, 2.5)
pt3dadd(541, 39, -105, 2.4)
pt3dadd(547.5, 41.5, -92.5, 1.4)
pt3dadd(552, 41.5, -92.5, 1.7)
pt3dadd(556.5, 40, -88.5, 2.3)
pt3dadd(561, 37.5, -84, 2.5)
pt3dadd(563.5, 37.5, -84, 2.7)
pt3dadd(565.5, 37.5, -92.5, 2.7)
pt3dadd(568.5, 37, -96, 2)
pt3dadd(573, 37, -100, 2.4)
pt3dadd(576.5, 38.5, -96, 1.8)
pt3dadd(578.5, 38.5, -96, 1.6)
pt3dadd(581, 40, -96, 1.8)
pt3dadd(584.5, 42.5, -92.5, 2)
pt3dadd(586.5, 43.5, -92.5, 2)
pt3dadd(590.5, 44.5, -92.5, 2.2)
pt3dadd(594.5, 44.5, -92.5, 2.1)
pt3dadd(596, 45, -92.5, 2.1)
pt3dadd(597.5, 45.5, -92.5, 1.8)
pt3dadd(601.5, 47.5, -92.5, 1.4)
pt3dadd(603, 48.5, -92.5, 1.4)
pt3dadd(604.5, 48.5, -92.5, 1.4)
pt3dadd(608, 47, -92.5, 1.3)
pt3dadd(609, 48.5, -88.5, 0.9)
pt3dadd(611, 50.5, -96, 1)
pt3dadd(614, 50.5, -100.5, 2.9)
pt3dadd(616.5, 50.5, -104.5, 3.3)
pt3dadd(619.5, 50.5, -100.5, 1.9)
pt3dadd(621.5, 50.5, -100.5, 1.9)
pt3dadd(623.5, 51, -100.5, 2.2)
pt3dadd(625, 51.5, -100.5, 2.6)
pt3dadd(627, 51.5, -100.5, 3.2)
pt3dadd(629, 51.5, -100.5, 2.8)
pt3dadd(631, 51.5, -104.5, 2.3)
pt3dadd(634.5, 52.5, -100.5, 2.3)
pt3dadd(636, 53.5, -100.5, 2.3)
pt3dadd(640.5, 54.5, -100.5, 2.4)
pt3dadd(642.5, 56, -100.5, 2.6)
pt3dadd(645.5, 56.5, -108.5, 2.3)
pt3dadd(648.5, 58.5, -100.5, 2.2)
pt3dadd(651, 58.5, -100.5, 2.3)
pt3dadd(653, 58.5, -96, 2.8)
pt3dadd(657, 58.5, -100.5, 2.8)
pt3dadd(660.5, 58.5, -100.5, 2.8)
pt3dadd(664.5, 58.5, -100.5, 3.1)
pt3dadd(666.5, 58.5, -100.5, 2.6)
pt3dadd(669, 58.5, -100.5, 2.8)
pt3dadd(670.5, 58.5, -108.5, 2)
pt3dadd(672.5, 58.5, -108.5, 1.7)
pt3dadd(677, 58.5, -108.5, 1.6)
pt3dadd(679, 58.5, -108.5, 1.5)
pt3dadd(681.5, 58.5, -108.5, 1.5)
pt3dadd(683.5, 58.5, -113, 1.4)
pt3dadd(686, 58.5, -113, 1.4)
pt3dadd(687.5, 59.5, -113, 1.4)
pt3dadd(691, 60.5, -117, 1.4)
pt3dadd(692.5, 60.5, -113, 1.4)
pt3dadd(696.5, 60.5, -117, 1.2)
pt3dadd(698.5, 61, -121, 1.2)
pt3dadd(700.5, 63, -121, 1.2)
pt3dadd(704, 64, -113, 1.2)
pt3dadd(706, 64.5, -113, 1.2)
pt3dadd(707.5, 65, -117, 1.2)
pt3dadd(709, 65.5, -113, 1.3)
pt3dadd(711, 65.5, -113, 1.3)
pt3dadd(712, 66.5, -113, 1.3)
pt3dadd(714, 68, -125.5, 1.3)
pt3dadd(716, 68, -125.5, 1.4)
pt3dadd(719.5, 69, -129.5, 1.4)
pt3dadd(721.5, 69, -113, 1.4)
pt3dadd(724, 69, -113, 1.3)
pt3dadd(727.5, 67, -121, 1.3)
pt3dadd(730.5, 67, -125.5, 1.3)
pt3dadd(735.5, 67, -125.5, 1.3)
pt3dadd(741.5, 67, -125.5, 1.3)
pt3dadd(746, 67, -125.5, 1.3)
pt3dadd(748.5, 67, -125.5, 1.3)
pt3dadd(751.5, 68, -117, 1.3)
pt3dadd(755, 69, -117, 1.3)
pt3dadd(757.5, 70, -117, 1.3)
pt3dadd(761.5, 71, -117, 1.3)
pt3dadd(764, 71.5, -117, 1.3)
pt3dadd(767, 73, -113, 1.3)
pt3dadd(770, 74.5, -117, 1.3)
pt3dadd(774.5, 76, -113, 1)
pt3dadd(776, 76, -113, 1)
pt3dadd(778.5, 76, -117, 1.1)
}
dend[95] {pt3dclear()
pt3dadd(274, 95.5, -76.5, 7.1)
pt3dadd(276.5, 99, -84, 4.9)
pt3dadd(278.5, 102, -88, 4.9)
pt3dadd(280.5, 105, -88, 4.9)
pt3dadd(282, 108, -84, 3.8)
pt3dadd(284.5, 109.5, -84, 4.1)
pt3dadd(288, 111, -84, 4.6)
pt3dadd(291.5, 112.5, -88, 5.5)
}
dend[96] {pt3dclear()
pt3dadd(291.5, 112.5, -88, 5.5)
pt3dadd(290.5, 116, -84, 0.9)
pt3dadd(291, 118, -84, 0.9)
pt3dadd(293, 119.5, -88, 0.9)
pt3dadd(295, 120, -91.5, 1.1)
pt3dadd(297, 121, -91.5, 1.1)
pt3dadd(299, 122.5, -91.5, 1.1)
pt3dadd(300, 125, -91.5, 1.2)
pt3dadd(300.5, 126.5, -91.5, 1.2)
pt3dadd(301.5, 129.5, -88, 1)
pt3dadd(302.5, 131.5, -88, 1.1)
pt3dadd(305.5, 132.5, -88, 1.1)
pt3dadd(306.5, 133.5, -88, 1.2)
pt3dadd(307.5, 135, -88, 1.4)
pt3dadd(308, 135, -88, 1.4)
pt3dadd(309.5, 136.5, -91.5, 1.1)
pt3dadd(314, 138.5, -91.5, 1.9)
pt3dadd(315, 139, -91.5, 1.7)
pt3dadd(317, 140, -95.5, 1.4)
pt3dadd(317, 141, -95.5, 1.1)
pt3dadd(318.5, 144, -95.5, 1.1)
pt3dadd(320, 145, -95.5, 1.1)
pt3dadd(321.5, 146.5, -104, 1.1)
pt3dadd(324, 149, -104, 1.2)
pt3dadd(324, 150, -104, 1.4)
pt3dadd(324, 152, -104, 1.3)
pt3dadd(325.5, 153, -104, 1.2)
pt3dadd(327, 154, -104, 1.2)
pt3dadd(329, 154, -104, 1.1)
pt3dadd(329.5, 156.5, -104, 0.8)
pt3dadd(330, 161, -104, 1)
pt3dadd(330, 162.5, -104, 1)
pt3dadd(330.5, 163.5, -104, 1)
pt3dadd(333, 165, -104, 1)
pt3dadd(333, 167, -104, 1)
pt3dadd(332, 168, -104, 1)
pt3dadd(332, 170, -104, 0.7)
pt3dadd(334, 174, -108, 1.1)
pt3dadd(336, 176, -112, 1.1)
pt3dadd(337.5, 178, -112, 1.1)
pt3dadd(337.5, 180, -112, 1.1)
pt3dadd(338, 181, -116.5, 1.1)
pt3dadd(339.5, 184.5, -116.5, 1.1)
pt3dadd(341.5, 187.5, -122, 1.6)
pt3dadd(343.5, 188, -122, 1.3)
pt3dadd(343.5, 189, -122, 1.3)
pt3dadd(345, 192, -122, 1.1)
pt3dadd(345.5, 193, -122, 0.9)
pt3dadd(345.5, 194, -122, 0.9)
pt3dadd(347, 196, -122, 0.9)
pt3dadd(348, 197, -122, 0.9)
pt3dadd(350, 198.5, -122, 0.9)
pt3dadd(352, 202.5, -122, 0.7)
pt3dadd(352, 203, -122, 0.7)
pt3dadd(355, 206, -122, 0.6)
pt3dadd(357, 206.5, -122, 0.6)
pt3dadd(359, 206.5, -124.5, 0.7)
pt3dadd(360.5, 207.5, -124.5, 0.9)
pt3dadd(361, 209, -124.5, 0.2)
pt3dadd(362.5, 210.5, -124.5, 0.2)
pt3dadd(364, 211, -124.5, 0.3)
pt3dadd(366, 213, -124.5, 0.3)
pt3dadd(367.5, 214.5, -124.5, 0.3)
pt3dadd(370.5, 217, -132.5, 0.3)
pt3dadd(371.5, 219.5, -132.5, 0.3)
pt3dadd(373, 221.5, -132.5, 0.3)
pt3dadd(376, 224, -132.5, 0.3)
pt3dadd(377.5, 226, -132.5, 0.3)
pt3dadd(379.5, 229, -132.5, 0.3)
pt3dadd(383.5, 230.5, -129.5, 0.3)
}
}
proc shape3d_33() {
dend[96] { pt3dadd(385, 230.5, -127, 0.7)
pt3dadd(386, 232, -124.5, 0.6)
pt3dadd(388.5, 234, -127, 0.6)
pt3dadd(389, 235.5, -127, 0.5)
pt3dadd(390.5, 237, -127, 0.6)
pt3dadd(392, 238.5, -127, 0.7)
pt3dadd(394.5, 239.5, -127, 0.7)
pt3dadd(395.5, 239.5, -127, 0.7)
pt3dadd(397, 239.5, -127, 0.6)
pt3dadd(399, 241, -127, 0.6)
pt3dadd(402, 242.5, -127, 0.6)
pt3dadd(404.5, 244.5, -127, 0.6)
pt3dadd(407.5, 244.5, -129.5, 0.6)
pt3dadd(409.5, 244.5, -129.5, 0.6)
pt3dadd(411.5, 245.5, -129.5, 0.6)
pt3dadd(413.5, 248, -129.5, 0.7)
pt3dadd(415.5, 249, -129.5, 0.7)
pt3dadd(416.5, 251.5, -129.5, 0.4)
pt3dadd(418.5, 253, -129.5, 0.4)
pt3dadd(420.5, 255, -129.5, 0.4)
pt3dadd(422, 256.5, -129.5, 0.4)
pt3dadd(427.5, 258, -135, 0.6)
pt3dadd(429.5, 258, -135, 0.5)
pt3dadd(431, 260, -135, 0.5)
pt3dadd(430, 261, -135, 0.5)
pt3dadd(428.5, 262.5, -132.5, 0.7)
pt3dadd(429, 264.5, -132.5, 0.6)
pt3dadd(431, 264.5, -132.5, 0.6)
pt3dadd(431, 266, -132.5, 0.6)
pt3dadd(432, 267.5, -137.5, 0.6)
pt3dadd(432, 270, -137.5, 0.6)
pt3dadd(435, 272, -137.5, 0.6)
pt3dadd(439, 274, -140, 0.3)
pt3dadd(442.5, 275.5, -140, 0.3)
pt3dadd(444.5, 275.5, -140, 0.3)
pt3dadd(448, 277, -145.5, 0.3)
pt3dadd(453.5, 279.5, -140, 0.3)
pt3dadd(454.5, 280, -143, 0.3)
pt3dadd(455.5, 281.5, -143, 0.3)
pt3dadd(457, 283.5, -143, 0.3)
pt3dadd(458.5, 285.5, -145.5, 1.2)
pt3dadd(460.5, 286.5, -145.5, 1.2)
pt3dadd(462, 291, -145.5, 1)
pt3dadd(462.5, 293.5, -145.5, 1)
pt3dadd(463.5, 295.5, -145.5, 0.9)
pt3dadd(465.5, 297, -148, 0.9)
pt3dadd(466.5, 298.5, -148, 1.1)
pt3dadd(467.5, 299, -148, 1)
pt3dadd(468, 301, -148, 1.2)
pt3dadd(470, 302, -145.5, 0.8)
pt3dadd(472, 302.5, -151, 0.8)
pt3dadd(475, 304.5, -148, 0.9)
pt3dadd(476.5, 306.5, -148, 1.2)
pt3dadd(478, 308.5, -148, 0.9)
pt3dadd(478, 310, -145.5, 0.4)
pt3dadd(482, 310, -148, 0.7)
}
dend[97] {pt3dclear()
pt3dadd(291.5, 112.5, -88, 5.5)
pt3dadd(295, 112.5, -80, 3.3)
pt3dadd(297.5, 112.5, -84, 3.8)
pt3dadd(299.5, 112, -75.5, 3.7)
pt3dadd(302, 112, -75.5, 5.6)
}
dend[98] {pt3dclear()
pt3dadd(302, 112, -75.5, 5.6)
pt3dadd(303.5, 115.5, -92.5, 2.9)
pt3dadd(303.5, 117, -92.5, 2.9)
pt3dadd(306, 120, -96.5, 2.2)
pt3dadd(310, 123.5, -92.5, 1.8)
pt3dadd(312, 125.5, -92.5, 1.9)
pt3dadd(317, 129, -92.5, 1.7)
pt3dadd(318.5, 131, -92.5, 1.7)
pt3dadd(320.5, 132, -92.5, 1.7)
pt3dadd(324.5, 135, -100.5, 1.9)
pt3dadd(329.5, 136, -100.5, 1.9)
pt3dadd(334.5, 136.5, -96.5, 1.9)
pt3dadd(340, 138.5, -105, 1.8)
pt3dadd(344, 137.5, -113, 1.8)
pt3dadd(346, 136.5, -117.5, 1.8)
pt3dadd(350, 136.5, -123, 1.4)
pt3dadd(353, 136.5, -125.5, 1.3)
pt3dadd(355.5, 136.5, -125.5, 1.1)
pt3dadd(357, 136.5, -125.5, 1.1)
pt3dadd(361, 135.5, -125.5, 1)
pt3dadd(360.5, 136.5, -125.5, 1.1)
pt3dadd(361, 137.5, -125.5, 0.9)
pt3dadd(362, 138.5, -128, 1.1)
pt3dadd(363.5, 138.5, -123, 1.1)
pt3dadd(365.5, 139, -125.5, 1)
pt3dadd(367, 139, -128, 1)
pt3dadd(370, 140, -128, 1.2)
pt3dadd(372.5, 140, -128, 1.2)
pt3dadd(374.5, 140, -130.5, 0.9)
pt3dadd(378, 142, -130.5, 0.9)
pt3dadd(380.5, 142, -130.5, 0.7)
pt3dadd(382.5, 142.5, -128, 0.7)
pt3dadd(385.5, 144, -130.5, 0.9)
pt3dadd(387.5, 144, -130.5, 0.9)
pt3dadd(390.5, 144, -130.5, 0.9)
pt3dadd(392.5, 144, -130.5, 0.9)
pt3dadd(394, 145, -133.5, 1.1)
pt3dadd(397.5, 145, -133.5, 0.8)
pt3dadd(400, 145, -133.5, 0.8)
pt3dadd(402, 145, -133.5, 1)
pt3dadd(404.5, 145.5, -136, 1)
pt3dadd(406.5, 146.5, -136, 1.2)
pt3dadd(408.5, 148, -136, 1.1)
pt3dadd(411.5, 149.5, -136, 1.1)
pt3dadd(413, 151, -138.5, 1.1)
pt3dadd(414, 151, -136, 1.1)
pt3dadd(416.5, 152.5, -138.5, 1.4)
pt3dadd(418, 153, -138.5, 1.4)
pt3dadd(420.5, 154.5, -141, 1.4)
pt3dadd(422, 155.5, -138.5, 1.4)
pt3dadd(424, 155.5, -138.5, 1)
pt3dadd(426, 156.5, -138.5, 1)
pt3dadd(427, 158, -141, 1.4)
pt3dadd(428.5, 159.5, -144, 1.3)
pt3dadd(430, 161, -133.5, 0.9)
pt3dadd(432.5, 161, -130.5, 0.6)
pt3dadd(435.5, 162.5, -130.5, 0.6)
pt3dadd(437.5, 163.5, -133.5, 0.6)
pt3dadd(439.5, 165.5, -136, 0.6)
pt3dadd(441, 166, -141, 0.6)
pt3dadd(445.5, 167.5, -141, 1)
pt3dadd(447.5, 168.5, -141, 1)
pt3dadd(449.5, 169.5, -141, 1)
pt3dadd(451.5, 170.5, -141, 0.9)
pt3dadd(453.5, 171, -141, 0.9)
pt3dadd(455, 172.5, -141, 0.9)
pt3dadd(458.5, 170.5, -141, 1.5)
pt3dadd(461.5, 170.5, -141, 1.5)
pt3dadd(463, 172.5, -145, 1.6)
pt3dadd(464.5, 172.5, -145, 1.6)
pt3dadd(466.5, 173, -145, 1.6)
pt3dadd(468, 175, -145, 1.5)
pt3dadd(469, 177, -145, 1.6)
pt3dadd(469.5, 175, -145, 1.6)
pt3dadd(473, 175.5, -145, 1.8)
pt3dadd(480.5, 175.5, -170, 2)
pt3dadd(484.5, 175.5, -170, 2)
pt3dadd(486.5, 175.5, -170, 2.2)
pt3dadd(489, 175.5, -170, 1.8)
pt3dadd(493, 175.5, -178.5, 1.8)
pt3dadd(495, 178, -174.5, 2.1)
pt3dadd(497.5, 178, -187, 2.1)
pt3dadd(499.5, 178, -187, 1.9)
pt3dadd(502, 177.5, -187, 1.6)
pt3dadd(503.5, 178.5, -187, 1.6)
pt3dadd(503.5, 180, -187, 1.6)
pt3dadd(504.5, 179, -178.5, 1.3)
pt3dadd(507, 181, -191, 1.6)
pt3dadd(507, 182, -187, 1.6)
pt3dadd(509.5, 182.5, -187, 1.6)
pt3dadd(513.5, 182.5, -191, 1.8)
pt3dadd(517.5, 182.5, -203.5, 1.7)
pt3dadd(520.5, 182.5, -203.5, 1.7)
pt3dadd(522, 183.5, -199.5, 1.7)
pt3dadd(523, 183.5, -199.5, 1.7)
pt3dadd(525, 183.5, -195.5, 1.3)
pt3dadd(527, 182, -199.5, 1.3)
pt3dadd(529.5, 182, -199.5, 1.6)
pt3dadd(534.5, 181.5, -203.5, 1.6)
pt3dadd(537.5, 181, -208, 1.6)
pt3dadd(540.5, 181, -208, 1.8)
pt3dadd(544.5, 181.5, -208, 1.9)
pt3dadd(548.5, 184.5, -208, 1.5)
pt3dadd(550, 185.5, -208, 1.8)
}
dend[99] {pt3dclear()
pt3dadd(302, 112, -75.5, 5.6)
pt3dadd(308.5, 112, -80, 1.6)
pt3dadd(310, 112.5, -80, 1.7)
pt3dadd(312, 112.5, -80, 2.3)
pt3dadd(315.5, 112.5, -84, 2.3)
pt3dadd(318, 112.5, -84, 2.8)
pt3dadd(321, 113.5, -84, 3.4)
pt3dadd(324, 114, -88, 2.8)
pt3dadd(325.5, 115.5, -88, 2.7)
pt3dadd(327.5, 116.5, -88, 2.7)
pt3dadd(328.5, 117.5, -92.5, 2.3)
pt3dadd(329.5, 119, -88, 2.1)
pt3dadd(333, 121.5, -88, 2.1)
pt3dadd(335, 121.5, -88, 1.9)
pt3dadd(336.5, 121.5, -92.5, 1.9)
pt3dadd(338.5, 122, -92.5, 1.9)
pt3dadd(340, 123, -96.5, 1.9)
pt3dadd(342.5, 125.5, -96.5, 2.3)
pt3dadd(343.5, 125.5, -96.5, 2.4)
pt3dadd(344, 125.5, -96.5, 2.2)
pt3dadd(347.5, 127, -100.5, 2.2)
pt3dadd(349.5, 127, -100.5, 2)
pt3dadd(351.5, 127, -100.5, 2)
pt3dadd(354, 127, -100.5, 2)
pt3dadd(356.5, 127, -105, 2.1)
pt3dadd(359.5, 126.5, -107.5, 2.4)
pt3dadd(362, 126.5, -107.5, 2.7)
pt3dadd(364.5, 125, -102.5, 2.4)
pt3dadd(364.5, 126, -105, 1.9)
pt3dadd(366.5, 126, -105, 2)
pt3dadd(366.5, 127.5, -107.5, 2)
pt3dadd(367.5, 125.5, -107.5, 2.4)
pt3dadd(370, 125.5, -105, 2.4)
pt3dadd(372, 126, -105, 2.4)
pt3dadd(374, 127.5, -110, 2.4)
}
}
proc shape3d_34() {
dend[99] { pt3dadd(377, 129, -110, 2.1)
pt3dadd(378.5, 130, -113, 1.9)
pt3dadd(382, 130.5, -113, 1.6)
pt3dadd(384.5, 132, -113, 1.7)
pt3dadd(386.5, 133.5, -110, 2.7)
pt3dadd(389, 133.5, -110, 2.2)
pt3dadd(394, 134.5, -115.5, 1.9)
pt3dadd(396.5, 134.5, -115.5, 1.7)
pt3dadd(399, 134.5, -115.5, 1.7)
pt3dadd(402.5, 136, -115.5, 1.7)
pt3dadd(405.5, 139.5, -115.5, 1.9)
pt3dadd(406, 141.5, -115.5, 1.9)
pt3dadd(408, 143.5, -113, 1.9)
pt3dadd(410.5, 145.5, -115.5, 1.9)
pt3dadd(412.5, 145.5, -115.5, 2.3)
pt3dadd(414.5, 146.5, -115.5, 2.4)
pt3dadd(416, 148.5, -115.5, 1.6)
pt3dadd(420.5, 151, -115.5, 1.6)
pt3dadd(423, 151, -115.5, 2.4)
pt3dadd(424, 153.5, -115.5, 2.4)
pt3dadd(425.5, 155.5, -120.5, 2.2)
pt3dadd(427, 158, -120.5, 2.2)
pt3dadd(430.5, 162.5, -120.5, 1.7)
pt3dadd(432, 163.5, -115.5, 1.2)
pt3dadd(433, 164, -115.5, 1.2)
pt3dadd(433.5, 165.5, -120.5, 1.3)
pt3dadd(433, 167.5, -115.5, 1.5)
pt3dadd(435, 169.5, -123.5, 1.5)
pt3dadd(437, 169.5, -123.5, 1.8)
pt3dadd(439.5, 169.5, -123.5, 1.9)
pt3dadd(444, 168.5, -128.5, 2.5)
}
dend[100] {pt3dclear()
pt3dadd(254, 88.5, -68.5, 5.7)
pt3dadd(257.5, 86, -68.5, 2.3)
pt3dadd(260.5, 85.5, -65, 2.3)
pt3dadd(265, 85, -65, 2)
pt3dadd(269.5, 84.5, -68.5, 1.8)
pt3dadd(272.5, 84, -65, 2)
pt3dadd(276, 83, -57, 1.8)
pt3dadd(278, 83, -65, 1.8)
pt3dadd(281.5, 80.5, -65, 1.7)
pt3dadd(284, 80.5, -68.5, 1.3)
pt3dadd(285.5, 80.5, -65, 1.5)
pt3dadd(290, 79, -65, 1.6)
pt3dadd(292, 77, -68.5, 1.6)
pt3dadd(293.5, 77, -65, 1.6)
pt3dadd(295, 77, -61, 1.6)
pt3dadd(297.5, 76, -61, 1.6)
pt3dadd(300, 75, -61, 1.7)
pt3dadd(305.5, 72.5, -61, 2.4)
pt3dadd(308.5, 72.5, -61, 1.9)
pt3dadd(311, 72.5, -61, 1.6)
pt3dadd(313.5, 72, -61, 1.6)
pt3dadd(317, 72, -61, 1.6)
pt3dadd(321.5, 71, -65, 1.4)
pt3dadd(324, 71, -65, 1.4)
pt3dadd(326.5, 71, -69, 1.3)
pt3dadd(328, 70, -69, 1.3)
pt3dadd(330.5, 69, -65, 1.3)
pt3dadd(332, 67.5, -61, 1.1)
pt3dadd(334, 67.5, -65, 0.9)
pt3dadd(335.5, 67.5, -65, 1.1)
pt3dadd(337, 67.5, -61, 1.3)
pt3dadd(339.5, 67.5, -61, 1.3)
pt3dadd(340.5, 68, -61, 1.5)
pt3dadd(342.5, 68, -61, 1.5)
pt3dadd(344, 68, -61, 0.9)
pt3dadd(345.5, 68, -57.5, 1.2)
pt3dadd(347.5, 68.5, -57.5, 1.2)
pt3dadd(351, 67, -57.5, 1.2)
pt3dadd(353.5, 67, -57.5, 1.2)
pt3dadd(358, 65.5, -61, 1.4)
pt3dadd(360.5, 64, -61, 1.3)
pt3dadd(362.5, 64, -61, 1.4)
pt3dadd(365.5, 64, -61, 1.5)
pt3dadd(368, 64, -61, 1.6)
pt3dadd(371, 63.5, -61, 1.7)
pt3dadd(373.5, 63.5, -61, 1.6)
pt3dadd(377, 62.5, -57.5, 1.6)
pt3dadd(380, 61.5, -57.5, 1.6)
pt3dadd(385, 60.5, -57.5, 1.7)
pt3dadd(388.5, 59, -61, 1.7)
pt3dadd(392, 59, -61, 1.7)
pt3dadd(395, 57.5, -61, 1.6)
pt3dadd(397, 56, -57.5, 1.1)
pt3dadd(400, 56, -57.5, 1)
pt3dadd(401.5, 56, -57.5, 1.1)
pt3dadd(403.5, 56, -57.5, 1.3)
pt3dadd(408, 56, -49.5, 1.6)
pt3dadd(412, 56, -53.5, 1.5)
pt3dadd(419, 56, -49.5, 1.5)
pt3dadd(421.5, 56, -49.5, 1.4)
pt3dadd(425, 56, -42, 1.3)
pt3dadd(428, 56.5, -46, 1.3)
pt3dadd(432.5, 59, -46, 1.3)
pt3dadd(434, 60, -42, 1.2)
pt3dadd(438.5, 60, -42, 0.9)
pt3dadd(446.5, 62.5, -42, 1)
pt3dadd(449.5, 64, -42, 1.1)
pt3dadd(454.5, 64.5, -30.5, 1.2)
pt3dadd(457.5, 64.5, -34.5, 1.2)
pt3dadd(460, 66.5, -46, 1.2)
pt3dadd(462.5, 66.5, -34.5, 1.4)
pt3dadd(466, 66.5, -38, 1.4)
pt3dadd(470.5, 68.5, -34.5, 1.4)
pt3dadd(473, 68.5, -34.5, 1.1)
pt3dadd(477, 70, -34.5, 1.2)
pt3dadd(480, 70.5, -34.5, 1.4)
pt3dadd(482.5, 72, -30.5, 1.3)
pt3dadd(488, 72, -34.5, 1.3)
pt3dadd(490.5, 72.5, -34.5, 1.6)
pt3dadd(493.5, 72.5, -34.5, 1.6)
pt3dadd(497, 73.5, -34.5, 1.6)
pt3dadd(501, 73.5, -34.5, 1.6)
pt3dadd(503, 73.5, -34.5, 1.6)
pt3dadd(507.5, 73.5, -34.5, 1.6)
pt3dadd(512, 73.5, -34.5, 1)
pt3dadd(516, 72.5, -30, 1.1)
pt3dadd(518, 72, -30, 1.1)
pt3dadd(522, 70.5, -30, 1.2)
pt3dadd(524, 69.5, -30, 1.1)
pt3dadd(527.5, 69.5, -34.5, 1.1)
pt3dadd(530, 69, -26, 1.2)
pt3dadd(532, 68, -26, 1.1)
pt3dadd(534, 68, -26, 1)
pt3dadd(536, 68, -30, 0.9)
pt3dadd(538.5, 67.5, -26, 0.9)
pt3dadd(540, 68.5, -17.5, 0.9)
pt3dadd(541.5, 68, -22, 0.7)
pt3dadd(542, 67, -26, 1)
pt3dadd(543.5, 67, -30, 0.9)
pt3dadd(547.5, 67, -22, 0.9)
pt3dadd(550.5, 65.5, -22, 0.9)
pt3dadd(553, 64.5, -22, 0.9)
pt3dadd(556, 63, -26, 0.8)
pt3dadd(559, 62, -26, 0.8)
pt3dadd(561, 62, -34.5, 0.9)
pt3dadd(563.5, 62, -22, 1.2)
pt3dadd(566, 62, -17.5, 1.4)
pt3dadd(569, 62.5, -22, 1.4)
pt3dadd(572, 62.5, -26, 1)
pt3dadd(575, 62.5, -13.5, 1)
pt3dadd(577.5, 61.5, -13.5, 1.5)
pt3dadd(579.5, 60.5, -13.5, 0.7)
pt3dadd(586.5, 60.5, -17.5, 1)
pt3dadd(589, 59, -17.5, 0.9)
pt3dadd(591, 58, -9.5, 0.9)
pt3dadd(593.5, 58, -9.5, 0.7)
pt3dadd(598, 57, -13.5, 0.7)
pt3dadd(600.5, 57.5, -5, 1.1)
pt3dadd(604, 57.5, -9.5, 0.9)
pt3dadd(609.5, 59.5, -5, 1.2)
pt3dadd(614, 59.5, -5, 1.2)
pt3dadd(617.5, 59.5, -5, 0.7)
pt3dadd(621.5, 59.5, -5, 0.8)
pt3dadd(626.5, 59.5, -9.5, 0.9)
pt3dadd(631, 59.5, -9.5, 0.9)
pt3dadd(632.5, 60, -9.5, 0.9)
pt3dadd(635.5, 62, -9.5, 0.9)
pt3dadd(639.5, 64.5, -1, 0.9)
pt3dadd(641.5, 66, -5, 1.1)
pt3dadd(644, 68, -1, 1.1)
pt3dadd(647, 69.5, -1, 0.9)
pt3dadd(651, 71, -5, 0.9)
pt3dadd(652.5, 72.5, 7.5, 1.1)
pt3dadd(657.5, 75.5, -1, 1.1)
pt3dadd(659.5, 78.5, -1, 1.1)
pt3dadd(661, 80, -1, 0.9)
pt3dadd(663, 81.5, -1, 0.7)
pt3dadd(664.5, 82.5, 3, 0.9)
pt3dadd(668.5, 82.5, -1, 1)
pt3dadd(672.5, 82.5, -5, 1)
pt3dadd(676, 82.5, -5, 1)
pt3dadd(679.5, 83, -5, 1)
pt3dadd(681, 84.5, -5, 1)
pt3dadd(683, 85.5, -5, 1)
pt3dadd(684.5, 83.5, 3, 1)
pt3dadd(687.5, 83.5, 3, 1)
pt3dadd(690.5, 83.5, -1, 1.2)
pt3dadd(693, 83.5, 3, 1.1)
pt3dadd(695.5, 83.5, 6, 0.9)
pt3dadd(696.5, 83.5, 6, 0.9)
pt3dadd(698.5, 83.5, 6, 0.9)
pt3dadd(700.5, 84.5, 6, 0.9)
pt3dadd(702.5, 85.5, 6, 0.9)
pt3dadd(704, 86.5, 6, 0.9)
pt3dadd(705.5, 86.5, 6, 0.9)
pt3dadd(707, 86.5, 6, 0.9)
pt3dadd(708.5, 86.5, 6, 0.9)
pt3dadd(709.5, 86.5, 9.5, 0.9)
pt3dadd(711, 86.5, 6, 0.9)
pt3dadd(713.5, 86.5, 3, 0.9)
pt3dadd(716, 87, 3, 1.2)
pt3dadd(718, 88.5, 3, 1)
pt3dadd(721, 89.5, 3, 1.1)
pt3dadd(722, 89.5, 3, 1.1)
pt3dadd(724, 89.5, 3, 1.1)
pt3dadd(724.5, 89, 9.5, 1.1)
pt3dadd(727, 88.5, 9.5, 1.1)
pt3dadd(728.5, 88, 9.5, 0.9)
pt3dadd(730.5, 87.5, 9.5, 0.9)
}
}
proc shape3d_35() {
dend[100] { pt3dadd(732, 87.5, 9.5, 0.9)
pt3dadd(733.5, 87.5, 6, 0.7)
pt3dadd(735.5, 88.5, 9.5, 0.7)
pt3dadd(737.5, 89.5, 9.5, 0.7)
pt3dadd(738.5, 89.5, 9.5, 0.7)
pt3dadd(740.5, 89.5, 9.5, 0.7)
pt3dadd(742, 90, 9.5, 0.7)
pt3dadd(744, 90, 9.5, 0.7)
pt3dadd(745.5, 91, 9.5, 0.7)
pt3dadd(747, 91.5, 9.5, 0.7)
pt3dadd(749, 92.5, 9.5, 0.7)
pt3dadd(750, 92.5, 9.5, 0.5)
pt3dadd(751.5, 92.5, 9.5, 0.5)
pt3dadd(753, 92.5, 9.5, 0.6)
pt3dadd(755, 92.5, 6, 0.6)
pt3dadd(758, 92.5, 6, 0.6)
pt3dadd(759.5, 92.5, 6, 0.6)
pt3dadd(762.5, 93, 9.5, 0.7)
pt3dadd(764.5, 95, 9.5, 0.7)
pt3dadd(767.5, 98, 6, 0.7)
pt3dadd(769, 99.5, 6, 0.7)
pt3dadd(770.5, 100, 6, 0.7)
pt3dadd(772.5, 100.5, 9.5, 0.7)
pt3dadd(774.5, 100.5, 3, 0.8)
pt3dadd(776.5, 102.5, 3, 0.8)
pt3dadd(778, 104.5, 3, 0.8)
pt3dadd(779.5, 106, 3, 0.8)
pt3dadd(779.5, 107, -0.5, 0.8)
pt3dadd(781.5, 108, -0.5, 0.8)
pt3dadd(783.5, 108, -0.5, 0.8)
pt3dadd(786.5, 109, -0.5, 0.8)
pt3dadd(788, 109, -0.5, 0.8)
pt3dadd(790, 109, -0.5, 0.8)
pt3dadd(792.5, 109, 6, 0.8)
}
dend[101] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 7.5)
pt3dadd(15, 22, -18, 7.5)
pt3dadd(16.5, 22, -18, 7.1)
pt3dadd(18.5, 22, -18, 6.3)
pt3dadd(20.5, 22, -25, 5.8)
pt3dadd(21, 22, -15, 5.7)
pt3dadd(24, 22, -27.5, 6.3)
pt3dadd(26.5, 22.5, -27.5, 5.6)
pt3dadd(30.5, 22.5, -23.5, 5.5)
pt3dadd(34, 23.5, -23.5, 5.7)
pt3dadd(39.5, 24, -31, 6.3)
pt3dadd(43.5, 26.5, -31, 5)
pt3dadd(45, 26, -35, 4.8)
pt3dadd(48, 25.5, -35, 5)
pt3dadd(49.5, 25.5, -39, 5)
pt3dadd(54, 31.5, -50.5, 5.2)
pt3dadd(58.5, 32, -62, 3.9)
pt3dadd(61, 32, -62, 4.3)
pt3dadd(64, 32, -58, 4.7)
pt3dadd(68.5, 32, -73, 4.9)
pt3dadd(71.5, 32, -73, 4.6)
pt3dadd(76.5, 34.5, -69.5, 4.4)
pt3dadd(78, 35.5, -77, 4.3)
pt3dadd(81, 38, -77, 5.4)
pt3dadd(84, 38, -73, 6.7)
pt3dadd(86, 38, -81, 7.5)
}
dend[102] {pt3dclear()
pt3dadd(86, 38, -81, 7.5)
pt3dadd(92, 38.5, -81, 3.4)
pt3dadd(93, 38.5, -81, 3.4)
pt3dadd(95.5, 38.5, -81, 3.2)
pt3dadd(98, 40.5, -84.5, 2.8)
pt3dadd(106, 47, -84.5, 3.8)
pt3dadd(108.5, 50, -84.5, 4.3)
pt3dadd(112.5, 55, -88.5, 3.4)
pt3dadd(113.5, 56.5, -88.5, 3.4)
pt3dadd(119, 59.5, -96, 3.3)
pt3dadd(126, 65, -100, 3.1)
pt3dadd(129, 65, -96, 3)
pt3dadd(134, 67.5, -81, 2.6)
pt3dadd(138, 70.5, -84.5, 2.5)
pt3dadd(140, 72, -84.5, 2.5)
pt3dadd(145, 75, -96, 3.2)
pt3dadd(148, 76, -96, 3.2)
pt3dadd(150, 78, -96, 3.1)
pt3dadd(154.5, 80, -92.5, 3.2)
pt3dadd(158, 80, -97, 3.6)
pt3dadd(162, 81, -101, 3.8)
pt3dadd(166.5, 84, -101, 3.8)
pt3dadd(169, 85, -105, 3.5)
pt3dadd(171.5, 86.5, -105, 3.7)
pt3dadd(172.5, 89, -101, 4.1)
pt3dadd(177.5, 91, -105, 4.1)
pt3dadd(184.5, 92.5, -109.5, 4.3)
pt3dadd(190.5, 97, -113.5, 3.7)
pt3dadd(193, 99, -113.5, 3.7)
pt3dadd(196, 100, -113.5, 3.3)
pt3dadd(199, 104, -113.5, 3.5)
pt3dadd(201.5, 106, -113.5, 3.5)
pt3dadd(204.5, 107, -122, 4)
pt3dadd(208.5, 108.5, -122, 4.2)
pt3dadd(213, 113.5, -117.5, 3.2)
pt3dadd(216, 116, -117.5, 3)
pt3dadd(219, 116.5, -117.5, 3)
pt3dadd(223, 118, -117.5, 3.6)
pt3dadd(225.5, 120.5, -117.5, 3.3)
pt3dadd(225.5, 123, -126, 2.4)
pt3dadd(227.5, 124, -122, 4.8)
}
dend[103] {pt3dclear()
pt3dadd(227.5, 124, -122, 4.8)
pt3dadd(231.5, 127, -117.5, 1.3)
pt3dadd(232.5, 129.5, -117.5, 1.3)
pt3dadd(234.5, 131.5, -117.5, 0.9)
pt3dadd(236.5, 131.5, -117.5, 1)
pt3dadd(238, 131.5, -117.5, 1)
pt3dadd(240.5, 132.5, -117.5, 1)
pt3dadd(242.5, 132.5, -117.5, 1.4)
pt3dadd(243.5, 135, -117.5, 0.9)
pt3dadd(246, 136, -117.5, 0.9)
pt3dadd(248.5, 136, -117.5, 1.2)
pt3dadd(249.5, 136, -117.5, 1.4)
pt3dadd(254, 140.5, -109.5, 1.2)
pt3dadd(256.5, 142.5, -109.5, 1.2)
pt3dadd(257.5, 144.5, -109.5, 1.4)
pt3dadd(259.5, 146.5, -113.5, 1.5)
pt3dadd(262, 147.5, -109.5, 1.5)
pt3dadd(266.5, 152, -109.5, 1.2)
pt3dadd(269, 152.5, -109.5, 1.1)
pt3dadd(272, 153.5, -109.5, 1.1)
pt3dadd(274, 156, -109.5, 1.1)
pt3dadd(276, 157.5, -109.5, 1.1)
pt3dadd(278.5, 157.5, -105, 1.3)
pt3dadd(284.5, 158, -109.5, 1.3)
pt3dadd(289, 159, -109.5, 1.3)
pt3dadd(292, 160.5, -109.5, 1.6)
pt3dadd(295, 163, -101, 1.3)
pt3dadd(298.5, 163.5, -101, 1.5)
pt3dadd(301.5, 165, -101, 1.5)
pt3dadd(303.5, 168, -101, 1.3)
pt3dadd(306.5, 169, -101, 1.3)
pt3dadd(311.5, 169, -101, 1.6)
pt3dadd(314, 169, -101, 1.5)
pt3dadd(318, 171, -101, 1)
pt3dadd(321.5, 174, -92.5, 1)
pt3dadd(325.5, 176, -92.5, 1)
pt3dadd(330, 181, -97, 1.5)
pt3dadd(332, 182, -101, 1.5)
pt3dadd(333.5, 184, -105, 1.5)
pt3dadd(336.5, 188, -105, 1.4)
pt3dadd(338.5, 189, -101, 1.1)
pt3dadd(342.5, 190.5, -101, 0.9)
pt3dadd(344, 191, -101, 0.9)
pt3dadd(346.5, 192.5, -101, 1.3)
pt3dadd(348.5, 194, -105, 1.2)
pt3dadd(351.5, 196, -101, 1.2)
pt3dadd(355, 198.5, -101, 1.2)
pt3dadd(356.5, 198.5, -101, 1.2)
pt3dadd(358, 200.5, -101, 1.2)
pt3dadd(358, 202.5, -101, 1.2)
pt3dadd(359, 204.5, -101, 1.1)
pt3dadd(360.5, 206.5, -101, 1.1)
pt3dadd(364, 208.5, -101, 1.2)
pt3dadd(367.5, 210.5, -105, 1.2)
pt3dadd(369.5, 211.5, -97, 1.2)
pt3dadd(371.5, 211.5, -97, 1.2)
pt3dadd(373.5, 211, -101, 1.3)
}
dend[104] {pt3dclear()
pt3dadd(227.5, 124, -122, 4.8)
pt3dadd(232.5, 125, -126, 1.9)
pt3dadd(234, 125, -126, 1.9)
pt3dadd(237.5, 127, -126, 3.8)
pt3dadd(240, 130, -123, 5.5)
pt3dadd(244, 133.5, -126, 4.3)
pt3dadd(246, 135, -126, 3.8)
pt3dadd(248.5, 138, -123, 2.9)
pt3dadd(251.5, 138.5, -128.5, 3.4)
pt3dadd(254.5, 140, -131, 3.4)
pt3dadd(258.5, 140, -136.5, 2.9)
pt3dadd(261, 140, -133.5, 3.4)
pt3dadd(263, 141, -133.5, 3.1)
pt3dadd(264.5, 143.5, -133.5, 3.1)
pt3dadd(265, 145.5, -136.5, 2.8)
pt3dadd(265, 147, -136.5, 2.8)
pt3dadd(266.5, 150.5, -139, 2.5)
pt3dadd(270, 150.5, -141.5, 2.3)
pt3dadd(272, 150.5, -141.5, 2.3)
pt3dadd(275, 150.5, -139, 4)
}
dend[105] {pt3dclear()
pt3dadd(275, 150.5, -139, 4)
pt3dadd(276.5, 154, -141.5, 1.8)
pt3dadd(277, 155.5, -141.5, 1.2)
pt3dadd(277.5, 157.5, -141.5, 1.2)
pt3dadd(278.5, 159, -141.5, 1.2)
pt3dadd(281.5, 166.5, -141.5, 1.1)
pt3dadd(282, 169, -141.5, 1.2)
pt3dadd(282.5, 171.5, -141.5, 1.2)
pt3dadd(283.5, 174, -144, 1.2)
pt3dadd(284, 175, -141.5, 1.2)
pt3dadd(286, 176.5, -141.5, 1.2)
pt3dadd(287, 178, -139, 1.1)
pt3dadd(288.5, 179, -141.5, 1.1)
pt3dadd(290, 180, -141.5, 1.1)
pt3dadd(291.5, 181.5, -144, 1.1)
pt3dadd(291.5, 183, -144, 1.1)
pt3dadd(292, 185, -144, 1.1)
pt3dadd(293, 186.5, -144, 1.3)
pt3dadd(295, 188.5, -144, 1.1)
pt3dadd(296, 189.5, -144, 0.9)
pt3dadd(297.5, 191.5, -144, 1.3)
pt3dadd(297.5, 192.5, -144, 1.7)
}
}
proc shape3d_36() {
dend[105] { pt3dadd(298, 194.5, -149.5, 2.4)
pt3dadd(299, 194.5, -144, 1.4)
pt3dadd(300, 196.5, -144, 1.3)
pt3dadd(300.5, 197.5, -144, 1.5)
pt3dadd(300.5, 199.5, -144, 1.5)
pt3dadd(306, 206, -147, 1.6)
pt3dadd(310.5, 208, -149.5, 1.5)
pt3dadd(312.5, 209.5, -147, 1.5)
pt3dadd(314.5, 208, -155.5, 1.1)
pt3dadd(315.5, 207.5, -155.5, 1.1)
pt3dadd(316.5, 208, -151, 1.1)
pt3dadd(317, 209, -155.5, 1.1)
pt3dadd(318.5, 210.5, -159.5, 1.3)
pt3dadd(321, 211, -159.5, 1.3)
pt3dadd(322.5, 211, -163.5, 1.3)
pt3dadd(324.5, 211, -159.5, 1.3)
pt3dadd(325, 210.5, -163.5, 1.3)
pt3dadd(328, 210.5, -168, 1.1)
pt3dadd(328, 211, -168, 1)
pt3dadd(328.5, 212, -168, 0.9)
pt3dadd(330, 213.5, -163.5, 0.9)
pt3dadd(334, 213.5, -163.5, 0.9)
pt3dadd(331, 214.5, -172, 1.2)
pt3dadd(333, 214.5, -180.5, 1.2)
pt3dadd(334, 216, -184.5, 1.2)
pt3dadd(332, 217.5, -180.5, 1.2)
pt3dadd(333.5, 218, -188.5, 1.2)
pt3dadd(335, 218, -184.5, 1.1)
pt3dadd(336.5, 218, -184.5, 0.8)
pt3dadd(338.5, 218.5, -188.5, 1.2)
pt3dadd(337.5, 220, -188.5, 1.6)
pt3dadd(338, 222.5, -193, 1.6)
pt3dadd(338, 224, -188.5, 1.1)
}
dend[106] {pt3dclear()
pt3dadd(275, 150.5, -139, 4)
pt3dadd(279, 152, -139, 3.4)
pt3dadd(283, 152.5, -141.5, 2.9)
pt3dadd(288, 154, -147, 3.2)
pt3dadd(290.5, 154, -147, 3.2)
pt3dadd(295, 155.5, -144, 3.1)
pt3dadd(304.5, 158.5, -147, 2.8)
pt3dadd(323.5, 163, -163.5, 4.4)
}
dend[107] {pt3dclear()
pt3dadd(323.5, 163, -163.5, 4.4)
pt3dadd(325.5, 162, -155, 2.4)
pt3dadd(327, 161, -155, 2.1)
pt3dadd(330.5, 160.5, -155, 2.1)
pt3dadd(332.5, 161, -159.5, 2.4)
pt3dadd(336.5, 162, -147, 2.4)
pt3dadd(339, 161, -159.5, 2.8)
pt3dadd(342, 161, -155, 2.8)
pt3dadd(346.5, 161, -155, 2.5)
pt3dadd(348.5, 159.5, -159.5, 2.2)
pt3dadd(350.5, 159.5, -159.5, 2.4)
pt3dadd(353.5, 159.5, -159.5, 2.7)
pt3dadd(356, 158, -163.5, 2.7)
pt3dadd(357.5, 158, -163.5, 2.7)
pt3dadd(361, 156.5, -159.5, 2.2)
pt3dadd(365.5, 154.5, -159.5, 2.5)
pt3dadd(368, 154, -155, 1.9)
pt3dadd(371, 152.5, -151, 2)
pt3dadd(378.5, 151.5, -159.5, 2.5)
pt3dadd(381.5, 151.5, -163.5, 2.3)
pt3dadd(383, 152, -155, 2.5)
pt3dadd(386, 152, -159.5, 2.2)
pt3dadd(388.5, 152, -159.5, 2)
pt3dadd(391, 152, -163.5, 2)
pt3dadd(393.5, 152, -155, 2)
pt3dadd(395, 151.5, -155, 2)
pt3dadd(398, 150.5, -159.5, 2)
pt3dadd(401, 150.5, -159.5, 2.6)
pt3dadd(402.5, 150, -151, 2.4)
pt3dadd(404.5, 149.5, -151, 2.4)
pt3dadd(412, 149, -151, 2.4)
pt3dadd(414.5, 149, -155, 2)
pt3dadd(417, 148.5, -155, 2)
pt3dadd(421.5, 147.5, -155, 1.8)
pt3dadd(424, 147.5, -155, 1.9)
pt3dadd(431.5, 146.5, -155, 3)
pt3dadd(435, 145.5, -155, 2.9)
pt3dadd(438.5, 145.5, -159.5, 2.8)
pt3dadd(440, 144, -159.5, 2.3)
pt3dadd(442.5, 142.5, -163.5, 2.4)
pt3dadd(445, 140, -155, 2)
pt3dadd(447.5, 138, -163.5, 2.3)
pt3dadd(453, 135, -163.5, 2.7)
pt3dadd(455.5, 133, -167.5, 2.7)
pt3dadd(458, 132, -176, 1.6)
pt3dadd(458.5, 131, -159.5, 1.5)
pt3dadd(459.5, 130, -167.5, 1.6)
pt3dadd(462.5, 129, -167.5, 2)
pt3dadd(465, 128.5, -159.5, 2)
pt3dadd(467.5, 127, -159.5, 2)
pt3dadd(471.5, 126, -167.5, 2)
pt3dadd(474, 125.5, -159.5, 1.9)
pt3dadd(475, 125.5, -159.5, 1.4)
pt3dadd(476.5, 125.5, -159.5, 1.4)
pt3dadd(479.5, 124.5, -163.5, 2.5)
pt3dadd(482.5, 124.5, -159.5, 2.8)
pt3dadd(486.5, 124, -159.5, 2.5)
pt3dadd(489, 124, -163.5, 3.2)
pt3dadd(492, 123, -163.5, 3.4)
pt3dadd(495, 123, -167.5, 2.5)
pt3dadd(497, 124, -163.5, 2.5)
pt3dadd(504, 127, -172, 2.2)
pt3dadd(507.5, 126.5, -172, 2.2)
pt3dadd(511, 126.5, -176, 2.1)
pt3dadd(513.5, 126.5, -176, 2)
pt3dadd(518.5, 126.5, -176, 2.2)
pt3dadd(521.5, 126, -172, 3.7)
}
dend[108] {pt3dclear()
pt3dadd(521.5, 126, -172, 3.7)
pt3dadd(526, 129, -167.5, 1.1)
pt3dadd(529.5, 129, -180, 1.3)
pt3dadd(532, 129, -180, 1.3)
pt3dadd(535, 129, -180, 1.3)
pt3dadd(537.5, 131, -180, 1.3)
pt3dadd(540, 132.5, -180, 1.3)
pt3dadd(541.5, 134, -180, 1.3)
pt3dadd(543.5, 135, -180, 1.3)
pt3dadd(545.5, 136, -180, 1.3)
pt3dadd(548.5, 138, -180, 1.6)
pt3dadd(548.5, 139.5, -180, 1.6)
pt3dadd(549.5, 141, -180, 1.6)
pt3dadd(553.5, 141.5, -180, 1.6)
pt3dadd(556.5, 141.5, -180, 1.6)
pt3dadd(559, 141.5, -180, 1.3)
pt3dadd(561.5, 141.5, -180, 1.4)
pt3dadd(563, 141.5, -180, 1.4)
pt3dadd(565.5, 143.5, -180, 1.3)
pt3dadd(568.5, 144.5, -180, 1.3)
pt3dadd(571, 146.5, -180, 1.3)
pt3dadd(573, 146.5, -180, 1.3)
pt3dadd(575, 146, -180, 1.3)
pt3dadd(577, 145.5, -184.5, 1.1)
pt3dadd(579, 144.5, -180, 1.1)
pt3dadd(581, 144.5, -180, 1.1)
pt3dadd(583.5, 145.5, -184.5, 1.3)
pt3dadd(585.5, 146, -184.5, 1.3)
pt3dadd(587, 147, -184.5, 1.3)
pt3dadd(589, 147.5, -184.5, 1.4)
pt3dadd(591.5, 147.5, -184.5, 1.2)
pt3dadd(593.5, 148, -180, 1.2)
pt3dadd(596, 148, -180, 1)
pt3dadd(597, 148, -180, 1)
pt3dadd(600.5, 148, -180, 1)
pt3dadd(603, 148, -180, 1)
pt3dadd(605, 148.5, -180, 1.2)
pt3dadd(610.5, 151, -176, 1.1)
pt3dadd(613, 152, -176, 1.1)
pt3dadd(615, 152, -176, 1.1)
pt3dadd(617.5, 152, -176, 1.1)
pt3dadd(619.5, 151, -180, 1)
pt3dadd(622, 151, -176, 1.4)
pt3dadd(624, 151, -180, 1.1)
pt3dadd(626, 150.5, -180, 1)
pt3dadd(628.5, 150, -180, 0.9)
pt3dadd(632.5, 149.5, -180, 1.5)
pt3dadd(634, 149.5, -180, 1.6)
pt3dadd(635.5, 149.5, -180, 1.1)
pt3dadd(639.5, 149, -180, 0.8)
pt3dadd(641.5, 149.5, -176, 0.8)
pt3dadd(642.5, 147, -184.5, 0.9)
pt3dadd(645, 147, -184.5, 0.9)
pt3dadd(648, 147, -184.5, 1)
pt3dadd(650, 147, -184.5, 1)
pt3dadd(651.5, 145, -180, 1)
pt3dadd(656, 145, -188.5, 0.9)
pt3dadd(659, 144.5, -184.5, 1)
pt3dadd(661.5, 144.5, -184.5, 1)
pt3dadd(664, 144, -184.5, 1)
pt3dadd(667, 144, -188.5, 1)
pt3dadd(670, 142.5, -188.5, 1)
pt3dadd(673, 142.5, -184.5, 1.4)
pt3dadd(675.5, 141, -188.5, 1.2)
pt3dadd(680, 139.5, -197, 1)
pt3dadd(681.5, 139.5, -184.5, 1)
pt3dadd(687.5, 139, -184.5, 1.1)
pt3dadd(690.5, 139, -184.5, 1.1)
pt3dadd(691.5, 138, -184.5, 1.1)
pt3dadd(693.5, 136.5, -184.5, 0.9)
pt3dadd(695.5, 135.5, -188.5, 1)
pt3dadd(697.5, 135, -188.5, 1)
pt3dadd(699.5, 135, -188.5, 1)
pt3dadd(701, 135, -188.5, 1.2)
pt3dadd(703.5, 135, -188.5, 1.6)
pt3dadd(706, 136, -192.5, 1.1)
pt3dadd(708, 138, -192.5, 1.1)
pt3dadd(711, 140, -192.5, 1.1)
pt3dadd(712, 141, -192.5, 1.1)
pt3dadd(714, 141, -197, 0.9)
pt3dadd(716.5, 141.5, -197, 1.1)
pt3dadd(718, 142.5, -201, 1.2)
pt3dadd(719.5, 143.5, -201, 1.2)
pt3dadd(721, 143.5, -201, 1.2)
pt3dadd(723.5, 143.5, -201, 1.1)
pt3dadd(725.5, 143.5, -201, 1.1)
pt3dadd(727.5, 143.5, -205, 1)
pt3dadd(730, 143.5, -201, 0.9)
pt3dadd(732.5, 143.5, -201, 0.9)
pt3dadd(734, 143.5, -201, 1.1)
pt3dadd(735.5, 143.5, -205, 1.1)
pt3dadd(737.5, 143.5, -205, 1.1)
}
}
proc shape3d_37() {
dend[108] { pt3dadd(738.5, 142.5, -205, 1.2)
pt3dadd(739.5, 141.5, -205, 1.2)
pt3dadd(740.5, 141.5, -205, 1.2)
pt3dadd(741.5, 141.5, -205, 1.4)
pt3dadd(742.5, 140, -205, 1.3)
pt3dadd(744, 140, -209.5, 1.3)
pt3dadd(746, 139.5, -213.5, 1.1)
pt3dadd(748, 139.5, -213.5, 1.1)
pt3dadd(749.5, 141, -205, 1.1)
pt3dadd(752, 139.5, -209.5, 1.1)
pt3dadd(755, 139.5, -209.5, 0.9)
}
dend[109] {pt3dclear()
pt3dadd(521.5, 126, -172, 3.7)
pt3dadd(523, 124, -176, 0.7)
pt3dadd(527, 120.5, -176, 0.7)
pt3dadd(529, 119, -176, 0.7)
pt3dadd(530, 116.5, -176, 0.8)
pt3dadd(531.5, 114.5, -172, 0.8)
pt3dadd(535, 113, -172, 0.8)
pt3dadd(537, 112, -172, 0.8)
pt3dadd(539.5, 110, -172, 0.8)
pt3dadd(541, 107.5, -176, 0.8)
pt3dadd(543, 106, -176, 0.6)
pt3dadd(544.5, 104.5, -176, 0.6)
pt3dadd(544.5, 100.5, -176, 0.7)
pt3dadd(545.5, 98.5, -176, 1.1)
pt3dadd(548.5, 98.5, -176, 0.9)
pt3dadd(550.5, 98.5, -176, 0.8)
pt3dadd(553, 98.5, -176, 0.7)
pt3dadd(555, 98.5, -176, 0.7)
pt3dadd(557, 96, -176, 0.7)
pt3dadd(559, 94.5, -176, 1)
pt3dadd(562, 93, -176, 0.7)
pt3dadd(564, 93, -176, 0.7)
pt3dadd(565.5, 92.5, -176, 0.7)
pt3dadd(569, 89.5, -180, 0.9)
pt3dadd(569.5, 88.5, -176, 0.6)
pt3dadd(571.5, 88.5, -176, 0.7)
pt3dadd(573.5, 88.5, -180, 0.9)
pt3dadd(576, 87.5, -172, 0.7)
pt3dadd(578, 87.5, -188.5, 0.7)
pt3dadd(579.5, 87.5, -180, 0.7)
pt3dadd(580.5, 88, -180, 0.7)
pt3dadd(581.5, 88.5, -184.5, 0.7)
pt3dadd(583.5, 88.5, -184.5, 0.6)
pt3dadd(586, 88.5, -184.5, 0.6)
pt3dadd(588, 89, -184.5, 0.6)
pt3dadd(589, 90, -184.5, 0.6)
pt3dadd(590.5, 90, -184.5, 0.6)
pt3dadd(592.5, 90, -184.5, 0.6)
pt3dadd(594.5, 90, -184.5, 0.6)
pt3dadd(595.5, 90.5, -192.5, 0.6)
pt3dadd(596.5, 91.5, -184.5, 0.6)
pt3dadd(598.5, 91.5, -184.5, 0.6)
pt3dadd(601, 91.5, -184.5, 0.6)
pt3dadd(603, 90.5, -188.5, 0.6)
pt3dadd(604.5, 90, -201, 0.6)
pt3dadd(606.5, 89.5, -197, 0.6)
pt3dadd(608.5, 89.5, -201, 0.6)
pt3dadd(610.5, 90, -197, 0.6)
pt3dadd(612, 89.5, -192.5, 0.7)
pt3dadd(616, 86.5, -205, 0.4)
pt3dadd(619, 86, -205, 0.4)
pt3dadd(621, 85.5, -205, 0.4)
pt3dadd(623, 85.5, -205, 0.4)
pt3dadd(624.5, 85, -205, 0.3)
pt3dadd(626.5, 85, -209.5, 0.6)
pt3dadd(628.5, 84, -209.5, 0.7)
pt3dadd(630, 84, -213.5, 0.7)
}
dend[110] {pt3dclear()
pt3dadd(323.5, 163, -163.5, 4.4)
pt3dadd(324, 166.5, -151, 0.6)
pt3dadd(324.5, 168, -147, 0.7)
pt3dadd(327, 169.5, -155, 0.7)
pt3dadd(328.5, 171, -155, 0.7)
pt3dadd(330, 171.5, -155, 0.7)
pt3dadd(333.5, 175, -159.5, 0.7)
pt3dadd(335, 175, -159.5, 0.7)
pt3dadd(337, 177.5, -159.5, 0.7)
pt3dadd(337, 179, -155, 0.7)
pt3dadd(339, 180.5, -159.5, 1.1)
pt3dadd(339.5, 183, -159.5, 0.6)
pt3dadd(340, 185.5, -167.5, 0.6)
pt3dadd(340.5, 187, -167.5, 0.6)
pt3dadd(341, 189, -172, 0.6)
pt3dadd(340, 192, -172, 0.4)
pt3dadd(339, 194, -167.5, 0.5)
pt3dadd(339, 196, -167.5, 0.5)
pt3dadd(339.5, 197, -159.5, 0.5)
pt3dadd(340.5, 198, -167.5, 0.5)
pt3dadd(340.5, 199.5, -167.5, 0.5)
pt3dadd(337.5, 203.5, -172, 0.5)
pt3dadd(336.5, 204.5, -180, 0.5)
pt3dadd(337, 205.5, -176, 0.5)
pt3dadd(338, 207, -176, 0.5)
pt3dadd(335.5, 209.5, -180, 0.4)
pt3dadd(334, 212.5, -180, 0.4)
pt3dadd(332, 215.5, -180, 0.4)
pt3dadd(333.5, 218, -180, 0.4)
pt3dadd(334, 220.5, -180, 0.4)
pt3dadd(333, 223.5, -176, 0.4)
}
dend[111] {pt3dclear()
pt3dadd(86, 38, -81, 7.5)
pt3dadd(89.5, 33, -81, 4.6)
pt3dadd(92, 31.5, -96, 4.6)
pt3dadd(92, 30.5, -96, 4.6)
pt3dadd(95.5, 29, -96, 3.6)
pt3dadd(96.5, 28.5, -100, 3.5)
pt3dadd(97.5, 27, -96, 3.7)
pt3dadd(101.5, 25, -108.5, 3.8)
pt3dadd(105.5, 23, -113, 4.3)
}
dend[112] {pt3dclear()
pt3dadd(105.5, 23, -113, 4.3)
pt3dadd(110, 22.5, -113, 2.8)
pt3dadd(112, 22, -113, 2.8)
pt3dadd(114.5, 18.5, -113, 3.1)
pt3dadd(115.5, 17, -113, 2.9)
pt3dadd(119, 15, -117, 2.8)
pt3dadd(121.5, 13.5, -117, 2.4)
pt3dadd(123, 9, -117, 2.6)
pt3dadd(125.5, 8, -117, 2.4)
pt3dadd(127, 7, -117, 2.3)
pt3dadd(132, 3, -121, 2.8)
pt3dadd(133.5, -4, -125.5, 2.9)
pt3dadd(135.5, -9, -125.5, 3.2)
pt3dadd(136, -11, -128, 4)
pt3dadd(138, -13, -131, 2.5)
pt3dadd(140, -13.5, -133.5, 2.5)
pt3dadd(142, -14.5, -131, 2.2)
pt3dadd(143.5, -16.5, -131, 2.3)
pt3dadd(146.5, -20, -133.5, 2.7)
pt3dadd(149, -20.5, -133.5, 2.7)
pt3dadd(150.5, -22.5, -133.5, 2.4)
pt3dadd(150.5, -24, -133.5, 2.4)
pt3dadd(152.5, -25.5, -133.5, 2.1)
pt3dadd(153.5, -26.5, -131, 1.9)
pt3dadd(154.5, -27.5, -131, 1.6)
pt3dadd(156, -29, -128, 2.2)
pt3dadd(157, -31, -131, 2.3)
pt3dadd(158.5, -32.5, -131, 2.4)
pt3dadd(161, -35.5, -131, 3.6)
pt3dadd(161.5, -37, -131, 2.5)
pt3dadd(162.5, -39, -131, 2.3)
pt3dadd(164, -39, -133.5, 2.3)
pt3dadd(165, -41, -133.5, 2.5)
pt3dadd(166.5, -43, -138.5, 2.1)
pt3dadd(168.5, -45.5, -138.5, 2)
pt3dadd(170, -45.5, -138.5, 2.3)
pt3dadd(172, -45.5, -133.5, 2.3)
pt3dadd(174.5, -46.5, -133.5, 2.3)
pt3dadd(176.5, -48.5, -138.5, 1.9)
pt3dadd(178.5, -50.5, -138.5, 1.9)
pt3dadd(180, -52, -138.5, 1.9)
pt3dadd(180, -54, -138.5, 1.7)
pt3dadd(179.5, -59.5, -138.5, 2.1)
pt3dadd(180, -62, -138.5, 2.1)
pt3dadd(181.5, -63.5, -138.5, 2.1)
pt3dadd(187, -65.5, -141.5, 2.4)
pt3dadd(187, -67.5, -141.5, 2.8)
pt3dadd(187, -69, -141.5, 2.5)
pt3dadd(188.5, -71.5, -144, 1.5)
pt3dadd(191.5, -73, -144, 1.2)
pt3dadd(194.5, -75, -146.5, 1.8)
pt3dadd(197, -75, -144, 2.6)
pt3dadd(201, -78, -149, 2.6)
pt3dadd(203, -79, -152, 2.5)
pt3dadd(205, -79, -154.5, 2.4)
pt3dadd(209, -80.5, -152, 2.4)
pt3dadd(211, -81.5, -156.5, 3)
pt3dadd(214, -84, -156.5, 3.2)
pt3dadd(216, -85, -156.5, 3.8)
}
dend[113] {pt3dclear()
pt3dadd(216, -85, -156.5, 3.8)
pt3dadd(216, -87.5, -156.5, 1.1)
pt3dadd(217, -89, -156.5, 1.5)
pt3dadd(221.5, -94, -148, 1.2)
pt3dadd(223.5, -97.5, -148, 1.4)
pt3dadd(226, -98.5, -160.5, 1.6)
pt3dadd(228, -100, -156.5, 1.5)
pt3dadd(229, -103, -156.5, 1.4)
pt3dadd(229, -105, -156.5, 1.3)
pt3dadd(233, -107.5, -164.5, 1.4)
pt3dadd(235, -109, -156.5, 1.4)
pt3dadd(237.5, -110, -156.5, 2.2)
pt3dadd(240, -111, -156.5, 2.2)
pt3dadd(242, -111.5, -156.5, 2.9)
}
dend[114] {pt3dclear()
pt3dadd(242, -111.5, -156.5, 2.9)
pt3dadd(247.5, -114.5, -152, 0.6)
pt3dadd(250.5, -114.5, -156.5, 0.6)
pt3dadd(256.5, -116.5, -148, 0.7)
pt3dadd(259.5, -116.5, -152, 0.7)
pt3dadd(261.5, -116.5, -156.5, 0.7)
pt3dadd(263.5, -118, -156.5, 0.6)
pt3dadd(267.5, -120, -152, 0.6)
pt3dadd(270, -120, -152, 0.6)
pt3dadd(272.5, -120, -156.5, 0.6)
pt3dadd(275.5, -120.5, -156.5, 0.6)
pt3dadd(279.5, -122, -160.5, 0.6)
pt3dadd(282.5, -122.5, -160.5, 0.6)
pt3dadd(285.5, -122.5, -160.5, 0.6)
pt3dadd(289, -122.5, -160.5, 0.6)
pt3dadd(292, -123.5, -160.5, 0.6)
pt3dadd(296, -124.5, -160.5, 0.6)
pt3dadd(298.5, -126.5, -148, 0.6)
pt3dadd(305.5, -127.5, -156.5, 0.6)
}
}
proc shape3d_38() {
dend[114] { pt3dadd(308.5, -127.5, -156.5, 0.6)
pt3dadd(310.5, -129, -156.5, 0.6)
pt3dadd(312.5, -129.5, -156.5, 0.6)
pt3dadd(315, -129.5, -156.5, 0.6)
pt3dadd(317, -129.5, -156.5, 0.6)
pt3dadd(320.5, -129.5, -156.5, 0.6)
pt3dadd(325.5, -130, -156.5, 0.6)
pt3dadd(328, -130.5, -160.5, 0.6)
pt3dadd(330.5, -130.5, -160.5, 0.6)
pt3dadd(335.5, -130.5, -160.5, 0.6)
pt3dadd(338.5, -130.5, -156.5, 0.6)
pt3dadd(342.5, -130.5, -156.5, 0.6)
pt3dadd(345, -130.5, -148, 0.6)
pt3dadd(348.5, -133.5, -152, 0.6)
pt3dadd(350.5, -133.5, -152, 0.6)
pt3dadd(354, -134, -152, 0.5)
pt3dadd(361, -134, -160.5, 0.5)
pt3dadd(363, -134, -156.5, 0.4)
pt3dadd(368.5, -135.5, -156.5, 0.4)
pt3dadd(369.5, -137, -160.5, 0.4)
pt3dadd(371.5, -138, -156.5, 0.4)
pt3dadd(374, -138, -160.5, 0.4)
pt3dadd(376, -139, -152, 0.4)
pt3dadd(379, -140.5, -152, 0.4)
pt3dadd(379.5, -142.5, -152, 0.4)
pt3dadd(379.5, -144.5, -152, 0.4)
pt3dadd(381, -145.5, -152, 0.4)
pt3dadd(382, -148.5, -148, 0.5)
}
dend[115] {pt3dclear()
pt3dadd(242, -111.5, -156.5, 2.9)
pt3dadd(242.5, -114, -148, 1.1)
pt3dadd(243.5, -114, -156.5, 0.8)
pt3dadd(245.5, -115, -156.5, 0.8)
pt3dadd(245.5, -116.5, -156.5, 0.8)
pt3dadd(248.5, -118.5, -156.5, 1.6)
pt3dadd(251, -119.5, -156.5, 1.1)
pt3dadd(253, -120.5, -156.5, 1.1)
pt3dadd(254.5, -121.5, -156.5, 1)
pt3dadd(256, -122, -156.5, 0.8)
pt3dadd(257, -123, -156.5, 0.8)
pt3dadd(259, -124, -152, 0.8)
pt3dadd(260.5, -126, -156.5, 1.2)
pt3dadd(264, -128.5, -156.5, 1.4)
pt3dadd(265, -130, -156.5, 1.4)
pt3dadd(265, -131.5, -156.5, 1.4)
pt3dadd(266.5, -135.5, -156.5, 1.2)
pt3dadd(268, -136.5, -156.5, 1.3)
pt3dadd(270, -137, -156.5, 1.3)
pt3dadd(272, -139, -156.5, 1.3)
pt3dadd(273, -140, -164.5, 1.3)
pt3dadd(274, -141.5, -156.5, 1.5)
pt3dadd(276, -142, -156.5, 1.1)
pt3dadd(278.5, -143, -160.5, 0.8)
pt3dadd(281, -147, -160.5, 1)
pt3dadd(283, -147, -164.5, 1.1)
pt3dadd(285.5, -147, -164.5, 1.2)
pt3dadd(289, -149, -164.5, 1.2)
pt3dadd(289.5, -150.5, -160.5, 0.7)
pt3dadd(290, -153.5, -169, 0.9)
pt3dadd(292, -153.5, -169, 1)
pt3dadd(294.5, -154, -169, 1)
pt3dadd(296.5, -154, -169, 1)
pt3dadd(298.5, -155.5, -169, 1)
pt3dadd(298.5, -157.5, -169, 1)
pt3dadd(298.5, -160, -169, 1.2)
pt3dadd(299.5, -162, -169, 1.1)
pt3dadd(300.5, -164, -173, 1)
pt3dadd(301, -166, -173, 0.9)
pt3dadd(302.5, -168.5, -173, 1.1)
pt3dadd(304, -170.5, -177, 0.9)
pt3dadd(304, -172.5, -177, 0.9)
pt3dadd(305, -176.5, -173, 1.1)
pt3dadd(305.5, -179, -173, 1.1)
pt3dadd(307, -180.5, -169, 1)
pt3dadd(307, -183, -160.5, 1.4)
pt3dadd(307, -184, -160.5, 0.9)
pt3dadd(308, -185.5, -160.5, 0.9)
pt3dadd(308.5, -187, -160.5, 0.9)
pt3dadd(309.5, -189.5, -160.5, 1.1)
pt3dadd(309.5, -192.5, -160.5, 1.4)
pt3dadd(310.5, -195.5, -160.5, 1.3)
pt3dadd(312.5, -198, -164.5, 1.3)
pt3dadd(312.5, -199.5, -164.5, 1.3)
pt3dadd(313.5, -202.5, -169, 1.2)
pt3dadd(313.5, -204.5, -169, 1.1)
pt3dadd(314, -207.5, -156.5, 0.9)
pt3dadd(314.5, -209, -156.5, 0.9)
pt3dadd(318.5, -211.5, -164.5, 1)
pt3dadd(320, -213.5, -164.5, 0.6)
pt3dadd(320, -216, -164.5, 0.6)
pt3dadd(320, -218.5, -164.5, 0.9)
pt3dadd(320.5, -220.5, -164.5, 1.1)
pt3dadd(320.5, -223, -164.5, 1.1)
pt3dadd(319, -225.5, -152, 1.2)
pt3dadd(319, -229, -156.5, 1.2)
pt3dadd(317.5, -236, -156.5, 1.1)
pt3dadd(316.5, -239.5, -152, 0.7)
pt3dadd(316.5, -242.5, -152, 0.6)
pt3dadd(316.5, -245.5, -152, 0.8)
pt3dadd(318, -249, -156.5, 0.7)
pt3dadd(320.5, -251, -156.5, 0.7)
pt3dadd(322, -254.5, -156.5, 0.6)
pt3dadd(322, -258, -156.5, 0.6)
pt3dadd(322.5, -260, -156.5, 0.9)
pt3dadd(324, -262.5, -156.5, 0.9)
pt3dadd(324, -263.5, -156.5, 0.7)
pt3dadd(324, -266, -156.5, 0.8)
pt3dadd(324, -268, -156.5, 0.8)
pt3dadd(325.5, -270.5, -152, 0.8)
pt3dadd(327, -272.5, -152, 0.8)
pt3dadd(328, -276.5, -152, 0.9)
pt3dadd(328.5, -279, -144, 0.7)
pt3dadd(327.5, -279, -148, 0.7)
pt3dadd(327.5, -280.5, -152, 0.3)
pt3dadd(326.5, -283, -148, 0.3)
pt3dadd(327.5, -283, -148, 0.3)
pt3dadd(328.5, -284, -144, 0.9)
pt3dadd(328.5, -286, -144, 0.8)
pt3dadd(330.5, -287, -152, 0.9)
pt3dadd(332, -288.5, -156.5, 0.9)
pt3dadd(333.5, -290.5, -156.5, 0.7)
pt3dadd(334, -292.5, -156.5, 0.7)
pt3dadd(333.5, -294.5, -156.5, 0.7)
pt3dadd(331.5, -295.5, -152, 0.7)
pt3dadd(330, -296.5, -152, 0.7)
pt3dadd(330, -299, -152, 0.7)
pt3dadd(331, -300.5, -152, 1)
pt3dadd(332, -303, -152, 1.1)
pt3dadd(333, -304.5, -152, 1.1)
pt3dadd(335, -306, -152, 0.9)
pt3dadd(336.5, -308, -152, 0.9)
pt3dadd(338, -308.5, -152, 0.9)
pt3dadd(339, -309.5, -152, 0.9)
pt3dadd(340, -310, -152, 1.1)
pt3dadd(340.5, -312, -152, 1.1)
pt3dadd(340.5, -313.5, -152, 1)
pt3dadd(341.5, -316, -148, 1)
pt3dadd(341.5, -318, -148, 1)
pt3dadd(341.5, -320.5, -148, 0.9)
pt3dadd(341, -322.5, -144, 0.9)
pt3dadd(341, -323.5, -152, 1.2)
pt3dadd(340, -325.5, -148, 0.9)
pt3dadd(339, -328, -148, 0.9)
}
dend[116] {pt3dclear()
pt3dadd(216, -85, -156.5, 3.8)
pt3dadd(220.5, -85, -164.5, 2.4)
pt3dadd(221.5, -86, -164.5, 3.2)
pt3dadd(223, -86, -169, 2.1)
pt3dadd(224.5, -86, -169, 2.1)
pt3dadd(225, -85, -169, 1.9)
pt3dadd(226, -85, -164.5, 1.9)
pt3dadd(228, -85, -164.5, 1.9)
pt3dadd(227.5, -86, -164.5, 1.8)
pt3dadd(227.5, -87.5, -169, 1.2)
pt3dadd(229.5, -87.5, -169, 1.3)
pt3dadd(230.5, -87.5, -169, 1.5)
pt3dadd(232, -87.5, -169, 1.4)
pt3dadd(233.5, -87, -173, 1.4)
pt3dadd(237, -85, -177, 1.4)
pt3dadd(238.5, -81.5, -177, 1.4)
pt3dadd(241.5, -77.5, -173, 1.2)
pt3dadd(243, -77, -177, 1.2)
pt3dadd(244.5, -75.5, -185.5, 1.5)
pt3dadd(245.5, -74, -185.5, 1.4)
pt3dadd(247, -73, -185.5, 2)
pt3dadd(248, -71.5, -185.5, 1.6)
pt3dadd(248.5, -69.5, -185.5, 1.4)
pt3dadd(250, -69, -185.5, 1.2)
pt3dadd(250.5, -69, -185.5, 1.2)
pt3dadd(251.5, -67.5, -185.5, 1.1)
pt3dadd(252.5, -67, -190, 1.1)
pt3dadd(253.5, -67, -190, 1.1)
pt3dadd(255, -67, -198, 1.2)
pt3dadd(255.5, -65.5, -198, 1.2)
pt3dadd(257, -64.5, -198, 1.2)
pt3dadd(259.5, -64.5, -198, 1.4)
pt3dadd(260.5, -64, -198, 1.4)
pt3dadd(262, -63, -206.5, 1.4)
pt3dadd(263, -62.5, -198, 1.4)
pt3dadd(264.5, -62.5, -198, 1.4)
pt3dadd(265.5, -64, -198, 1.4)
pt3dadd(266.5, -64, -198, 1.3)
pt3dadd(268, -62.5, -202.5, 1.6)
pt3dadd(269, -61, -206.5, 1.6)
pt3dadd(269, -59.5, -210.5, 1.6)
pt3dadd(269.5, -58, -210.5, 1.6)
pt3dadd(271, -59.5, -210.5, 1.6)
pt3dadd(271.5, -58, -215, 1.9)
pt3dadd(271.5, -57, -206.5, 2.1)
pt3dadd(273.5, -57, -215, 2.1)
pt3dadd(275, -57.5, -215, 2.1)
pt3dadd(276, -58.5, -219, 1.7)
pt3dadd(279.5, -60, -223, 1.6)
pt3dadd(282.5, -60, -223, 1.3)
pt3dadd(283.5, -60, -218.5, 1.3)
pt3dadd(283.5, -59, -223, 1.3)
pt3dadd(285.5, -58.5, -223, 1.3)
pt3dadd(287, -58.5, -223, 1.1)
pt3dadd(289, -59, -223, 1.1)
pt3dadd(290, -57, -223, 0.8)
pt3dadd(291, -57, -223, 0.8)
pt3dadd(292, -57, -223, 1)
}
}
proc shape3d_39() {
dend[116] { pt3dadd(295.5, -58, -232, 1.1)
pt3dadd(296, -58, -236.5, 1.5)
pt3dadd(298, -58, -236.5, 1.5)
pt3dadd(299.5, -55.5, -236.5, 1.5)
pt3dadd(302.5, -54, -236.5, 1.5)
pt3dadd(304.5, -54, -236.5, 1.2)
pt3dadd(306, -54, -236.5, 1.4)
pt3dadd(307.5, -54, -236.5, 1.4)
pt3dadd(309.5, -55, -236.5, 1.4)
pt3dadd(311, -55.5, -236.5, 1.2)
pt3dadd(313, -55.5, -245.5, 1.5)
pt3dadd(314, -55.5, -245.5, 1.3)
pt3dadd(314, -54, -245.5, 1.3)
pt3dadd(314, -52.5, -245.5, 1.3)
pt3dadd(319.5, -53, -250, 1.3)
pt3dadd(320.5, -52, -250, 1.7)
pt3dadd(322.5, -51.5, -250, 1.7)
pt3dadd(324.5, -50, -250, 1.7)
pt3dadd(328.5, -50, -250, 1.6)
pt3dadd(329.5, -50, -250, 1.6)
pt3dadd(332, -51, -259, 1.6)
}
dend[117] {pt3dclear()
pt3dadd(105.5, 23, -113, 4.3)
pt3dadd(107.5, 21, -117, 2.5)
pt3dadd(105, 21, -117, 2.4)
pt3dadd(101.5, 20, -121, 2.5)
pt3dadd(103, 17, -121, 2.5)
pt3dadd(103.5, 14.5, -125.5, 2.2)
pt3dadd(103.5, 12.5, -129.5, 2.4)
pt3dadd(104.5, 9.5, -132.5, 2.7)
pt3dadd(104.5, 7.5, -135, 2.7)
pt3dadd(105.5, 6, -137.5, 3.5)
}
dend[118] {pt3dclear()
pt3dadd(105.5, 6, -137.5, 3.5)
pt3dadd(104.5, 3.5, -140, 0.4)
pt3dadd(104.5, 2.5, -140, 0.4)
pt3dadd(103.5, 0.5, -140, 0.4)
pt3dadd(102, -1, -140, 0.4)
pt3dadd(102, -3, -137.5, 0.4)
pt3dadd(103, -4, -140, 0.4)
pt3dadd(102.5, -7.5, -140, 0.4)
pt3dadd(102.5, -8.5, -140, 0.4)
pt3dadd(102.5, -10, -140, 0.4)
pt3dadd(102.5, -13.5, -140, 0.4)
pt3dadd(101.5, -15, -140, 0.3)
pt3dadd(102.5, -16.5, -143, 0.3)
pt3dadd(104.5, -17, -140, 0.5)
pt3dadd(106, -19.5, -140, 0.5)
pt3dadd(106, -21, -143, 0.5)
pt3dadd(104, -23, -143, 0.5)
pt3dadd(104.5, -25, -143, 0.5)
pt3dadd(105, -26, -143, 0.4)
pt3dadd(103.5, -28.5, -145.5, 0.4)
pt3dadd(103, -30.5, -145.5, 0.4)
pt3dadd(103.5, -32, -145.5, 0.4)
pt3dadd(103.5, -34, -143, 0.4)
pt3dadd(102.5, -35.5, -145.5, 0.4)
pt3dadd(102.5, -37.5, -145.5, 0.4)
pt3dadd(101.5, -39.5, -145.5, 0.4)
pt3dadd(102, -41, -145.5, 0.4)
pt3dadd(101.5, -42.5, -145.5, 0.7)
pt3dadd(100, -44, -145.5, 0.7)
pt3dadd(98, -45, -145.5, 0.5)
pt3dadd(96.5, -46, -150.5, 0.5)
pt3dadd(96.5, -48, -148, 0.5)
pt3dadd(96, -50, -148, 0.5)
pt3dadd(95.5, -52.5, -148, 0.5)
pt3dadd(95.5, -56, -153.5, 0.4)
pt3dadd(95.5, -57.5, -148, 0.4)
pt3dadd(94.5, -60.5, -150.5, 0.5)
pt3dadd(93.5, -63.5, -145.5, 0.5)
}
dend[119] {pt3dclear()
pt3dadd(105.5, 6, -137.5, 3.5)
pt3dadd(107, 6, -145.5, 2.4)
pt3dadd(108, 7.5, -143, 1.6)
pt3dadd(108.5, 7.5, -145.5, 1.6)
pt3dadd(109.5, 7.5, -148, 1.6)
pt3dadd(110, 7.5, -145.5, 1.6)
pt3dadd(110.5, 5.5, -145.5, 1.6)
}
dend[120] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 7.7)
pt3dadd(2.5, 0.5, -8, 7.7)
pt3dadd(3.5, -3, -8, 6)
pt3dadd(6.5, -5.5, -8, 5.7)
pt3dadd(10.5, -16.5, -11.5, 6)
pt3dadd(12, -19.5, -5, 6)
pt3dadd(15.5, -26.5, 15, 6)
pt3dadd(22.5, -37, 8, 5.6)
pt3dadd(24, -39.5, 8, 5.6)
pt3dadd(24.5, -42, 8, 5.8)
pt3dadd(25, -45, 8, 5.5)
pt3dadd(27, -47, 8, 5.8)
pt3dadd(27.5, -48.5, 8, 5.8)
pt3dadd(33, -53.5, 8, 4.6)
pt3dadd(37, -57, 15, 6.3)
pt3dadd(40, -59.5, 8, 5.8)
pt3dadd(41, -63, 8, 5.7)
pt3dadd(43.5, -68, 11.5, 4)
pt3dadd(46, -70.5, 18.5, 4.6)
pt3dadd(49.5, -72, 15, 4.6)
pt3dadd(52.5, -73, 15, 4.7)
pt3dadd(53.5, -77, 29.5, 3.8)
pt3dadd(54.5, -78.5, 22.5, 4)
pt3dadd(55, -82, 22.5, 4.3)
pt3dadd(55, -83.5, 26, 4.3)
pt3dadd(56, -85.5, 26, 4.4)
pt3dadd(56, -89, 26, 4.7)
pt3dadd(57.5, -91, 26, 4.9)
pt3dadd(59, -95, 29.5, 4)
pt3dadd(62.5, -97.5, 36.5, 4.3)
pt3dadd(65, -98, 29.5, 3.8)
pt3dadd(69, -101, 29.5, 3.8)
pt3dadd(70.5, -104.5, 29.5, 3.8)
pt3dadd(74.5, -107, 26, 4.2)
pt3dadd(91, -117, 33, 5)
pt3dadd(95, -117, 29.5, 3.8)
pt3dadd(98, -119, 26, 3.7)
pt3dadd(99.5, -121, 33, 4.7)
pt3dadd(102.5, -123, 33, 5.2)
}
dend[121] {pt3dclear()
pt3dadd(102.5, -123, 33, 5.2)
pt3dadd(109, -133.5, 36.5, 4)
pt3dadd(110, -136.5, 33, 3.2)
pt3dadd(117, -151.5, 40, 3.7)
pt3dadd(116, -156.5, 47.5, 2.9)
pt3dadd(115, -158.5, 36.5, 3.1)
pt3dadd(113, -162, 40, 2.7)
pt3dadd(112, -167, 36.5, 2.7)
pt3dadd(112, -169, 36.5, 2.2)
pt3dadd(112, -174.5, 36.5, 1.8)
pt3dadd(112, -180, 36.5, 1.6)
pt3dadd(113, -186.5, 40, 2.1)
pt3dadd(113.5, -190, 36.5, 2.1)
pt3dadd(112.5, -203, 33, 2.3)
pt3dadd(112.5, -205.5, 33, 2.3)
pt3dadd(114, -208.5, 33, 2.3)
pt3dadd(115.5, -212, 33, 2.3)
pt3dadd(122, -222, 33, 1.7)
pt3dadd(122.5, -223.5, 33, 1.7)
pt3dadd(125.5, -226, 33, 1.6)
pt3dadd(127, -227.5, 33, 1.6)
pt3dadd(128, -230.5, 26, 2.1)
pt3dadd(128, -233.5, 33, 2.4)
pt3dadd(130.5, -237, 26, 2.3)
pt3dadd(131.5, -239, 22.5, 2.2)
pt3dadd(132, -241.5, 22.5, 2.2)
pt3dadd(134, -245.5, 22.5, 1.5)
pt3dadd(134, -247.5, 22.5, 1.5)
pt3dadd(134, -249.5, 22.5, 1.1)
pt3dadd(137, -251.5, 26, 1.3)
pt3dadd(139.5, -255, 26, 1.3)
pt3dadd(139.5, -257, 26, 1.3)
pt3dadd(142, -260, 26, 1.3)
pt3dadd(144.5, -262.5, 26, 1.3)
pt3dadd(146, -264.5, 29.5, 1.3)
pt3dadd(147, -266.5, 26, 1.3)
pt3dadd(147, -268.5, 26, 1.3)
pt3dadd(147, -270, 29.5, 1.6)
pt3dadd(147, -272.5, 29.5, 1.6)
pt3dadd(148, -275, 29.5, 1.6)
pt3dadd(148, -278, 33, 1.4)
pt3dadd(150, -283, 33, 1.2)
pt3dadd(150.5, -286, 29.5, 1.2)
pt3dadd(151.5, -288, 33, 1.2)
pt3dadd(152, -293.5, 29.5, 1.1)
pt3dadd(152, -295, 29.5, 1.1)
pt3dadd(152, -297.5, 29.5, 1.1)
pt3dadd(151, -301.5, 29.5, 1.1)
pt3dadd(151, -305.5, 29.5, 0.6)
pt3dadd(153, -307, 29.5, 0.7)
pt3dadd(155.5, -312, 33, 0.4)
pt3dadd(155, -316.5, 33, 0.7)
pt3dadd(157, -318.5, 33, 0.6)
pt3dadd(159, -323, 33, 0.6)
pt3dadd(161, -325, 33, 0.6)
pt3dadd(163.5, -329, 33, 0.8)
pt3dadd(163, -331, 33, 0.8)
pt3dadd(162.5, -333.5, 33, 0.8)
pt3dadd(162.5, -336, 33, 0.8)
pt3dadd(161, -338, 33, 0.8)
pt3dadd(159.5, -343.5, 29.5, 0.8)
pt3dadd(159.5, -345, 29.5, 0.8)
pt3dadd(159.5, -347, 29.5, 0.8)
pt3dadd(161, -352, 26, 0.7)
pt3dadd(163, -355, 33, 0.9)
pt3dadd(165, -359.5, 22.5, 0.9)
pt3dadd(165.5, -364, 22.5, 0.7)
pt3dadd(167, -366.5, 22.5, 0.7)
pt3dadd(168, -368, 22.5, 0.7)
pt3dadd(169.5, -373.5, 18.5, 0.9)
pt3dadd(171.5, -376, 18.5, 0.9)
pt3dadd(173.5, -379, 11.5, 0.9)
pt3dadd(176.5, -382, 11.5, 0.9)
pt3dadd(178, -385, 11.5, 0.9)
pt3dadd(179.5, -387.5, 11.5, 0.7)
pt3dadd(182, -390.5, 15, 0.7)
pt3dadd(184, -392.5, 11.5, 0.7)
pt3dadd(184.5, -395, 11.5, 0.7)
pt3dadd(184.5, -398, 11.5, 0.7)
pt3dadd(184.5, -401, 11.5, 0.7)
pt3dadd(183.5, -404, 15, 0.7)
pt3dadd(184, -406, 15, 0.7)
pt3dadd(184, -408, 22.5, 0.7)
pt3dadd(182.5, -412.5, 29.5, 0.7)
}
dend[122] {pt3dclear()
pt3dadd(102.5, -123, 33, 5.2)
}
}
proc shape3d_40() {
dend[122] { pt3dadd(109, -125.5, 29.5, 3.1)
pt3dadd(114, -126.5, 29.5, 2.8)
pt3dadd(120, -127, 29.5, 2.7)
pt3dadd(125, -128.5, 36.5, 2.9)
pt3dadd(127.5, -129.5, 36.5, 2.3)
pt3dadd(129.5, -131, 33, 1.6)
pt3dadd(131, -131.5, 33, 1.7)
pt3dadd(135, -133.5, 33, 2.2)
pt3dadd(139, -135.5, 29.5, 2.2)
pt3dadd(140.5, -136, 29.5, 2.3)
pt3dadd(145, -137.5, 29.5, 2.5)
pt3dadd(151, -138.5, 29.5, 2.3)
pt3dadd(156, -141, 29.5, 2)
pt3dadd(159, -142, 29.5, 2.1)
pt3dadd(165, -144, 29.5, 2.5)
pt3dadd(168, -145.5, 26, 2.5)
pt3dadd(173, -147.5, 26, 2.7)
pt3dadd(176, -148.5, 26, 2.7)
pt3dadd(178, -149, 26, 2.8)
pt3dadd(180.5, -149.5, 26, 2.8)
pt3dadd(182, -149.5, 26, 2.8)
pt3dadd(185.5, -149.5, 26, 2)
pt3dadd(188, -153, 26, 2.9)
pt3dadd(194, -158.5, 26, 3.1)
pt3dadd(197, -160, 26, 3.1)
pt3dadd(202.5, -163, 22.5, 3.1)
pt3dadd(203, -165, 29.5, 2.3)
pt3dadd(206.5, -165, 29.5, 2.5)
pt3dadd(209, -166, 29.5, 2.3)
pt3dadd(211, -168.5, 29.5, 1.8)
pt3dadd(216, -169.5, 29.5, 1.8)
pt3dadd(217.5, -171, 40, 2.3)
pt3dadd(220.5, -173, 36.5, 2.6)
pt3dadd(222, -175, 36.5, 2.6)
pt3dadd(224.5, -175.5, 36.5, 2.6)
pt3dadd(227, -176.5, 36.5, 2.7)
pt3dadd(230, -179, 40, 2)
pt3dadd(230.5, -180.5, 40, 1.8)
pt3dadd(231, -182, 40, 1.5)
pt3dadd(233, -184, 36.5, 1.5)
pt3dadd(235, -184.5, 40, 1.4)
pt3dadd(235, -186.5, 40, 1.4)
pt3dadd(235.5, -188.5, 40, 1.5)
pt3dadd(237, -189.5, 40, 1.5)
pt3dadd(238, -191.5, 40, 1.3)
pt3dadd(238, -193, 48, 1.5)
pt3dadd(238, -195, 48, 1.2)
pt3dadd(238.5, -197, 48, 1.2)
pt3dadd(239, -198, 51.5, 1.2)
pt3dadd(240, -199.5, 51.5, 1.4)
pt3dadd(240.5, -201, 51.5, 1.7)
pt3dadd(241.5, -203, 55.5, 2.4)
pt3dadd(242.5, -205.5, 55.5, 3.2)
pt3dadd(244, -206, 51.5, 2.4)
pt3dadd(244.5, -208, 51.5, 1.6)
pt3dadd(245.5, -209.5, 51.5, 1.1)
pt3dadd(246, -211, 55.5, 1.2)
pt3dadd(248, -213, 55.5, 1.6)
pt3dadd(249, -215, 55.5, 1.9)
pt3dadd(251.5, -217.5, 55.5, 1.9)
pt3dadd(253.5, -218.5, 55.5, 2)
pt3dadd(254.5, -220.5, 55.5, 1.6)
pt3dadd(254.5, -222, 55.5, 1.6)
pt3dadd(254.5, -224, 55.5, 1.4)
pt3dadd(256, -225, 55.5, 1.7)
pt3dadd(256, -226, 55.5, 1.9)
pt3dadd(255.5, -227.5, 63, 1.9)
pt3dadd(255.5, -229, 63, 1.6)
pt3dadd(255.5, -231.5, 63, 1.7)
pt3dadd(256.5, -232.5, 63, 2.3)
pt3dadd(257.5, -234.5, 63, 2.7)
pt3dadd(258, -236.5, 63, 2.5)
pt3dadd(259.5, -239.5, 59.5, 2.2)
pt3dadd(260, -241.5, 71, 1.6)
pt3dadd(261.5, -244, 63, 2.2)
pt3dadd(262, -245.5, 71, 1.6)
}
dend[123] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 4)
pt3dadd(-4, 1.5, -15, 4)
pt3dadd(-6, -1, -15, 3.4)
pt3dadd(-7.5, -3.5, -15, 3.2)
pt3dadd(-10.5, -9, -15, 3.1)
pt3dadd(-16.5, -15, -15, 2.7)
pt3dadd(-19, -18.5, -15, 2.9)
pt3dadd(-21.5, -19.5, -15, 3.1)
pt3dadd(-23.5, -22.5, -11.5, 2.9)
pt3dadd(-28.5, -27, -11.5, 2.8)
pt3dadd(-33, -33.5, -1.5, 3.2)
pt3dadd(-35, -35, 1.5, 3.2)
pt3dadd(-39, -38.5, 5, 2.9)
pt3dadd(-42.5, -45.5, -5, 3.3)
pt3dadd(-47, -46.5, -5, 4)
pt3dadd(-48.5, -48, -5, 2.4)
pt3dadd(-50, -48, -5, 2.2)
pt3dadd(-52.5, -50, -1.5, 2.8)
pt3dadd(-54, -51.5, -1.5, 2.8)
pt3dadd(-59.5, -54.5, 1.5, 2.8)
pt3dadd(-63.5, -55.5, 1.5, 2.8)
pt3dadd(-66.5, -56.5, 1.5, 2.9)
pt3dadd(-69.5, -57, 1.5, 2.5)
pt3dadd(-75.5, -58, 5, 2.5)
pt3dadd(-77.5, -58.5, 5, 2.5)
pt3dadd(-82, -59.5, 5, 2.1)
pt3dadd(-83.5, -60, 5, 2.1)
pt3dadd(-86, -60, 5, 1.8)
pt3dadd(-87.5, -60.5, 8, 2.2)
pt3dadd(-90, -61, 8, 2.8)
pt3dadd(-92, -61, 8, 2.9)
pt3dadd(-95, -61, 5, 2.8)
pt3dadd(-97.5, -61, 5, 3.1)
pt3dadd(-101, -61.5, 1.5, 3.3)
pt3dadd(-104, -62, 1.5, 3.4)
pt3dadd(-108, -62, 1.5, 2.7)
pt3dadd(-110, -62, 1.5, 2.7)
pt3dadd(-115.5, -62, 1.5, 2.5)
pt3dadd(-118, -62, 1.5, 2.5)
pt3dadd(-121, -64.5, 1.5, 2.5)
pt3dadd(-122.5, -65, 1.5, 2.5)
pt3dadd(-124, -66.5, 1.5, 2.3)
pt3dadd(-126, -66.5, 1.5, 2.6)
pt3dadd(-128.5, -68, 1.5, 2.7)
pt3dadd(-131, -69, 5, 3.3)
pt3dadd(-133.5, -70.5, 5, 2.7)
pt3dadd(-135.5, -72.5, 11.5, 3.3)
pt3dadd(-140.5, -74, 15, 3.1)
pt3dadd(-143.5, -75.5, 8, 3)
pt3dadd(-150, -79.5, 8, 2.1)
pt3dadd(-154.5, -80.5, 8, 2.1)
pt3dadd(-158.5, -81.5, 8, 2)
pt3dadd(-162, -83, 8, 2.2)
pt3dadd(-168, -85, 15, 2.7)
pt3dadd(-170.5, -86.5, 8, 2.7)
pt3dadd(-173, -87.5, 8, 2.7)
pt3dadd(-176, -90, 8, 2.7)
pt3dadd(-181.5, -92.5, 15, 2.1)
pt3dadd(-185, -92.5, 15, 2)
pt3dadd(-188, -93, 15, 2)
pt3dadd(-196, -97.5, 15, 2.3)
pt3dadd(-203.5, -100.5, 18.5, 2.8)
pt3dadd(-208.5, -102.5, 18.5, 3)
pt3dadd(-212, -105.5, 18.5, 2.5)
pt3dadd(-216.5, -110, 15, 2.4)
pt3dadd(-220.5, -111.5, 18.5, 2.1)
pt3dadd(-223.5, -111.5, 18.5, 2.1)
pt3dadd(-226.5, -111.5, 18.5, 1.8)
pt3dadd(-229.5, -112.5, 22.5, 2)
pt3dadd(-233, -114.5, 33, 1.7)
pt3dadd(-235.5, -114.5, 22.5, 2.5)
pt3dadd(-238, -116, 22.5, 4.3)
pt3dadd(-242, -117.5, 26, 4)
pt3dadd(-246, -118, 22.5, 3.8)
pt3dadd(-250.5, -118, 22.5, 3.8)
pt3dadd(-257.5, -119, 26, 3.1)
pt3dadd(-263, -119, 26, 1.9)
pt3dadd(-269.5, -121.5, 29.5, 2.4)
pt3dadd(-272.5, -123, 18.5, 2.8)
pt3dadd(-279.5, -126.5, 26, 2.4)
pt3dadd(-286, -128, 29.5, 2)
pt3dadd(-288.5, -128, 29.5, 2)
pt3dadd(-295.5, -131, 29.5, 1.9)
pt3dadd(-301, -133, 26, 1.6)
pt3dadd(-308.5, -136, 22.5, 2.4)
pt3dadd(-313, -137.5, 26, 2.2)
pt3dadd(-318, -138.5, 26, 1.9)
pt3dadd(-320, -139, 26, 1.4)
pt3dadd(-322, -140, 26, 1.4)
pt3dadd(-327.5, -140.5, 26, 1.9)
pt3dadd(-331, -141.5, 26, 1.9)
pt3dadd(-334, -143.5, 33, 5.3)
}
dend[124] {pt3dclear()
pt3dadd(-334, -143.5, 33, 5.3)
pt3dadd(-336, -142.5, 22.5, 1.3)
pt3dadd(-341, -142.5, 22.5, 0.9)
pt3dadd(-342.5, -142, 22.5, 1.1)
pt3dadd(-346.5, -141.5, 18.5, 1.3)
pt3dadd(-352, -141, 18.5, 1.8)
pt3dadd(-354, -139.5, 22.5, 1.4)
pt3dadd(-355.5, -139.5, 18.5, 1.2)
pt3dadd(-357.5, -139, 18.5, 0.9)
pt3dadd(-359.5, -139, 26, 0.9)
pt3dadd(-361.5, -139, 22.5, 1.1)
pt3dadd(-365, -139, 26, 1.1)
pt3dadd(-367.5, -139.5, 26, 1.1)
pt3dadd(-369.5, -139, 26, 1.4)
pt3dadd(-373.5, -139, 26, 0.9)
pt3dadd(-377.5, -139, 26, 1.2)
pt3dadd(-379.5, -139.5, 29.5, 1.4)
pt3dadd(-381.5, -139.5, 22.5, 1.4)
pt3dadd(-384.5, -140.5, 22.5, 1.7)
pt3dadd(-391.5, -140.5, 26, 1.6)
pt3dadd(-394.5, -140.5, 29.5, 1.5)
pt3dadd(-398, -140.5, 26, 1.5)
pt3dadd(-403, -140.5, 26, 1.4)
pt3dadd(-406, -141.5, 26, 1.3)
pt3dadd(-409.5, -144, 29.5, 1)
pt3dadd(-412, -144, 29.5, 1.5)
pt3dadd(-414, -144, 29.5, 1.5)
pt3dadd(-419, -142, 36.5, 1.5)
pt3dadd(-421.5, -142, 26, 1.5)
pt3dadd(-424.5, -142, 29.5, 1.4)
pt3dadd(-427, -142, 29.5, 1.4)
pt3dadd(-433, -142, 29.5, 1.7)
}
}
proc shape3d_41() {
dend[124] { pt3dadd(-435, -142, 29.5, 1.4)
pt3dadd(-437, -142, 29.5, 1.4)
pt3dadd(-439, -142, 29.5, 2.9)
}
dend[125] {pt3dclear()
pt3dadd(-439, -142, 29.5, 2.9)
pt3dadd(-439, -139, 29.5, 1.7)
pt3dadd(-441, -137.5, 15, 1.4)
pt3dadd(-443, -135.5, 22.5, 1.1)
pt3dadd(-446, -135, 22.5, 1.1)
pt3dadd(-448.5, -133.5, 18.5, 1.2)
pt3dadd(-450, -133.5, 22.5, 1.2)
pt3dadd(-453.5, -132, 26, 0.9)
pt3dadd(-456.5, -132, 26, 0.9)
pt3dadd(-460.5, -132, 26, 1.1)
pt3dadd(-467.5, -132, 22.5, 0.9)
pt3dadd(-471, -131.5, 22.5, 0.9)
pt3dadd(-475, -131.5, 22.5, 0.8)
pt3dadd(-477, -131.5, 22.5, 0.7)
pt3dadd(-479, -131.5, 26, 0.8)
pt3dadd(-483.5, -130.5, 26, 0.8)
pt3dadd(-491.5, -129, 18.5, 0.9)
pt3dadd(-495, -129, 18.5, 0.9)
pt3dadd(-499, -129, 18.5, 0.9)
pt3dadd(-501, -128, 18.5, 0.9)
pt3dadd(-505.5, -128, 18.5, 1)
pt3dadd(-508, -127.5, 15, 1)
pt3dadd(-509, -126, 18.5, 0.8)
pt3dadd(-511, -125.5, 18.5, 0.8)
pt3dadd(-514, -125.5, 18.5, 0.8)
pt3dadd(-517, -125.5, 18.5, 0.8)
pt3dadd(-519, -125.5, 26, 0.8)
pt3dadd(-521, -125, 15, 0.8)
pt3dadd(-523.5, -123, 15, 0.8)
pt3dadd(-525, -121.5, 11.5, 0.8)
pt3dadd(-527, -121.5, 11.5, 0.7)
pt3dadd(-531, -121.5, 11.5, 0.7)
pt3dadd(-534, -121.5, 15, 0.9)
pt3dadd(-537, -121.5, 15, 0.7)
pt3dadd(-540.5, -121.5, 18.5, 0.8)
pt3dadd(-544, -121.5, 11.5, 0.9)
pt3dadd(-545.5, -121.5, 8, 0.9)
pt3dadd(-547, -121.5, 4.5, 0.9)
pt3dadd(-550.5, -120, 4.5, 0.9)
pt3dadd(-552.5, -118.5, 11.5, 0.7)
pt3dadd(-558.5, -117.5, 11.5, 0.7)
pt3dadd(-561, -117, 8, 0.7)
pt3dadd(-564, -117, 8, 0.7)
pt3dadd(-566.5, -116, 8, 0.9)
pt3dadd(-569, -115.5, 8, 0.7)
pt3dadd(-574.5, -115.5, 8, 1)
pt3dadd(-582, -112, 4.5, 1.1)
pt3dadd(-588, -110, 4.5, 1.1)
pt3dadd(-592, -108.5, 4.5, 1.2)
pt3dadd(-593.5, -108, 4.5, 0.9)
pt3dadd(-595.5, -107, 4.5, 0.9)
pt3dadd(-597.5, -107, 4.5, 0.9)
pt3dadd(-600, -107, 4.5, 0.9)
pt3dadd(-603, -107, 4.5, 0.9)
pt3dadd(-605.5, -106.5, 8, 0.9)
pt3dadd(-608, -106.5, 8, 0.9)
pt3dadd(-611.5, -106.5, 4.5, 0.9)
pt3dadd(-615.5, -106.5, 4.5, 1.5)
pt3dadd(-616, -106.5, 1, 1.1)
pt3dadd(-619.5, -106, 1, 1.3)
pt3dadd(-623, -104, 8, 1.5)
pt3dadd(-624.5, -103, 4.5, 1.5)
pt3dadd(-626.5, -101.5, 4.5, 1.1)
pt3dadd(-627.5, -100, 4.5, 0.9)
pt3dadd(-629, -98.5, 8, 1.5)
pt3dadd(-631.5, -97.5, 4.5, 1.2)
pt3dadd(-633.5, -97.5, 4.5, 1.2)
pt3dadd(-635, -97.5, 4.5, 1.2)
pt3dadd(-636, -96.5, 8, 1.2)
pt3dadd(-637.5, -95.5, 4.5, 0.9)
pt3dadd(-639.5, -95.5, 4.5, 1.4)
pt3dadd(-642.5, -95.5, 4.5, 1.3)
pt3dadd(-644, -95.5, 4.5, 1)
pt3dadd(-645.5, -95.5, 4.5, 0.7)
pt3dadd(-647, -94.5, 1, 0.7)
pt3dadd(-648.5, -94.5, 1, 0.7)
pt3dadd(-649, -94.5, 1, 0.5)
pt3dadd(-650.5, -94, 1, 0.5)
pt3dadd(-651.5, -94, 1, 0.7)
pt3dadd(-653.5, -94, 4.5, 0.9)
pt3dadd(-656.5, -93.5, 4.5, 1.1)
pt3dadd(-658.5, -92, 1, 1.1)
pt3dadd(-660, -92, 1, 1.9)
pt3dadd(-662, -92, 1, 1.8)
pt3dadd(-664, -92, -2, 1.3)
pt3dadd(-665.5, -91.5, 1, 0.9)
pt3dadd(-667, -90.5, 4.5, 1.3)
pt3dadd(-669.5, -90.5, 1, 1.1)
pt3dadd(-672.5, -90.5, 1, 0.8)
pt3dadd(-674, -90, 1, 0.8)
pt3dadd(-675, -88.5, 1, 0.8)
pt3dadd(-675, -87, 1, 0.6)
pt3dadd(-677, -87, -2, 0.7)
pt3dadd(-679, -87, -2, 0.7)
pt3dadd(-680, -87, -5.5, 0.7)
pt3dadd(-681.5, -87, -5.5, 1.1)
pt3dadd(-683, -87.5, -8.5, 0.7)
pt3dadd(-684.5, -87.5, -5.5, 0.7)
pt3dadd(-689.5, -87, -5.5, 0.8)
pt3dadd(-691, -86, -5.5, 0.8)
pt3dadd(-693.5, -85, -5.5, 0.8)
pt3dadd(-695.5, -84, -5.5, 0.8)
pt3dadd(-698.5, -84, -8.5, 0.9)
pt3dadd(-701.5, -83.5, -8.5, 0.9)
pt3dadd(-703.5, -83.5, -12, 1)
pt3dadd(-706.5, -83.5, -12, 0.9)
pt3dadd(-708, -82.5, -12, 1)
pt3dadd(-709.5, -81.5, -12, 1.1)
pt3dadd(-711, -80, -8.5, 0.9)
pt3dadd(-713, -80, -15, 0.9)
pt3dadd(-715.5, -80, -12, 0.9)
pt3dadd(-718, -79.5, -8.5, 1.1)
pt3dadd(-720.5, -79.5, -12, 1.2)
pt3dadd(-723, -79.5, -12, 1)
pt3dadd(-726, -79.5, -12, 1.1)
pt3dadd(-729, -79.5, -12, 1.1)
pt3dadd(-730.5, -79.5, -12, 1.4)
pt3dadd(-733, -79, -12, 0.9)
pt3dadd(-735, -79, -15, 0.8)
pt3dadd(-736, -79, -15, 1.3)
pt3dadd(-737.5, -78, -15, 1)
pt3dadd(-738, -77, -15, 0.9)
pt3dadd(-741, -76.5, -15, 1)
pt3dadd(-743, -75.5, -15, 1)
pt3dadd(-745, -75, -15, 1)
pt3dadd(-747.5, -74, -18.5, 0.9)
}
dend[126] {pt3dclear()
pt3dadd(-439, -142, 29.5, 2.9)
pt3dadd(-439.5, -143.5, 22.5, 0.7)
pt3dadd(-442.5, -145.5, 22.5, 0.9)
pt3dadd(-444, -146.5, 22.5, 0.9)
pt3dadd(-448.5, -148.5, 26, 0.7)
pt3dadd(-451, -150, 26, 0.7)
pt3dadd(-453, -150.5, 26, 0.9)
pt3dadd(-455, -152, 26, 0.9)
pt3dadd(-456, -154, 26, 0.9)
pt3dadd(-457.5, -156, 26, 0.9)
pt3dadd(-459, -157, 26, 0.9)
pt3dadd(-461.5, -158, 22.5, 0.7)
pt3dadd(-463.5, -160, 22.5, 0.7)
pt3dadd(-465, -161, 26, 0.7)
pt3dadd(-467, -162.5, 22.5, 0.7)
pt3dadd(-471, -162.5, 22.5, 0.7)
pt3dadd(-475, -162.5, 29.5, 0.9)
pt3dadd(-477.5, -164.5, 22.5, 0.9)
pt3dadd(-479.5, -165, 22.5, 0.9)
pt3dadd(-482.5, -166.5, 22.5, 0.9)
pt3dadd(-486, -171, 18.5, 0.9)
pt3dadd(-489.5, -172, 18.5, 0.9)
pt3dadd(-494, -172, 18.5, 0.9)
pt3dadd(-497.5, -173, 18.5, 0.9)
pt3dadd(-499.5, -177.5, 26, 0.7)
pt3dadd(-502.5, -179.5, 26, 0.7)
pt3dadd(-506, -180.5, 22.5, 1)
pt3dadd(-510, -184, 22.5, 0.6)
pt3dadd(-513, -184, 26, 0.6)
pt3dadd(-516.5, -184, 26, 0.6)
pt3dadd(-518, -186, 26, 0.6)
pt3dadd(-520.5, -187, 29.5, 0.6)
pt3dadd(-529, -188, 26, 0.9)
pt3dadd(-533, -190, 22.5, 0.5)
pt3dadd(-538.5, -190.5, 22.5, 0.5)
pt3dadd(-542, -191.5, 22.5, 0.6)
pt3dadd(-549.5, -191.5, 26, 0.5)
pt3dadd(-552, -191.5, 22.5, 0.5)
pt3dadd(-554, -191, 22.5, 0.5)
pt3dadd(-558, -189.5, 22.5, 0.5)
pt3dadd(-561, -189.5, 26, 0.7)
pt3dadd(-564, -189.5, 26, 0.7)
pt3dadd(-567.5, -189.5, 26, 0.7)
pt3dadd(-570, -189.5, 18.5, 0.7)
pt3dadd(-573, -190, 22.5, 0.7)
pt3dadd(-577.5, -190.5, 22.5, 0.7)
pt3dadd(-580, -192.5, 15, 0.7)
pt3dadd(-583, -192.5, 15, 0.8)
pt3dadd(-588.5, -193.5, 15, 0.8)
pt3dadd(-590.5, -193.5, 15, 0.7)
pt3dadd(-594.5, -193.5, 15, 0.7)
pt3dadd(-597, -193.5, 18.5, 0.9)
pt3dadd(-599, -193.5, 18.5, 0.8)
pt3dadd(-601.5, -193.5, 15, 0.7)
pt3dadd(-604, -193.5, 18.5, 0.7)
pt3dadd(-607, -193.5, 18.5, 0.7)
pt3dadd(-608, -195.5, 18.5, 0.7)
pt3dadd(-611, -195.5, 18.5, 0.7)
pt3dadd(-615, -195.5, 18.5, 0.7)
pt3dadd(-618.5, -197.5, 18.5, 0.7)
pt3dadd(-623, -197.5, 18.5, 0.7)
pt3dadd(-624, -198, 18.5, 0.7)
pt3dadd(-625.5, -199.5, 18.5, 0.7)
pt3dadd(-628, -201, 18.5, 0.7)
pt3dadd(-630, -201, 18.5, 0.7)
pt3dadd(-632.5, -202.5, 18.5, 0.7)
pt3dadd(-635, -203, 18.5, 0.7)
pt3dadd(-639.5, -206, 15, 0.7)
pt3dadd(-648, -206.5, 15, 0.6)
pt3dadd(-651, -207.5, 15, 0.7)
pt3dadd(-656, -208.5, 15, 0.7)
}
}
proc shape3d_42() {
dend[126] { pt3dadd(-658.5, -208.5, 15, 0.7)
pt3dadd(-662, -209, 11.5, 0.8)
pt3dadd(-665.5, -210, 11.5, 0.8)
pt3dadd(-672.5, -211.5, 11.5, 0.6)
pt3dadd(-677, -212, 15, 0.7)
pt3dadd(-679, -213.5, 15, 0.7)
pt3dadd(-682, -215, 15, 0.9)
pt3dadd(-684.5, -216, 15, 0.9)
pt3dadd(-687.5, -217.5, 18.5, 0.9)
pt3dadd(-690, -219, 18.5, 0.9)
pt3dadd(-693, -221, 18.5, 0.9)
pt3dadd(-696.5, -222, 15, 0.9)
pt3dadd(-698.5, -223.5, 8, 0.5)
pt3dadd(-700, -225.5, 11.5, 0.6)
pt3dadd(-704, -228, 1, 0.9)
pt3dadd(-705.5, -229, 1, 0.9)
pt3dadd(-707.5, -231.5, 1, 0.9)
pt3dadd(-711.5, -232, 1, 0.9)
pt3dadd(-715.5, -234, 1, 0.9)
pt3dadd(-717, -235.5, 1, 0.7)
pt3dadd(-720, -238, 1, 0.6)
pt3dadd(-721, -240, 1, 0.7)
pt3dadd(-722, -242.5, 1, 0.7)
pt3dadd(-724, -245.5, 4.5, 0.7)
pt3dadd(-723.5, -248, 4.5, 0.7)
pt3dadd(-724, -251, 4.5, 0.3)
}
dend[127] {pt3dclear()
pt3dadd(-334, -143.5, 33, 5.3)
pt3dadd(-335, -148, 26, 1.9)
pt3dadd(-337, -149.5, 22.5, 1.4)
pt3dadd(-337.5, -151.5, 22.5, 1.2)
pt3dadd(-338, -153.5, 22.5, 1.2)
pt3dadd(-339, -155.5, 22.5, 1.2)
pt3dadd(-340.5, -157, 26, 1.2)
pt3dadd(-341.5, -157.5, 26, 1.2)
pt3dadd(-343.5, -159, 26, 1)
pt3dadd(-345, -160.5, 26, 0.8)
pt3dadd(-348, -164, 26, 0.9)
pt3dadd(-355, -167, 26, 1.1)
pt3dadd(-356.5, -169.5, 26, 1.1)
pt3dadd(-358.5, -170, 26, 1.1)
pt3dadd(-361.5, -172, 26, 1.1)
pt3dadd(-366, -174, 22.5, 1.2)
pt3dadd(-368.5, -175.5, 22.5, 1.2)
pt3dadd(-372.5, -178, 26, 1)
pt3dadd(-377, -180, 26, 1.4)
pt3dadd(-378.5, -182.5, 22.5, 1.1)
pt3dadd(-381.5, -183.5, 26, 1.1)
pt3dadd(-384, -184.5, 26, 0.9)
pt3dadd(-386, -186, 29.5, 0.9)
pt3dadd(-393.5, -192, 29.5, 1.4)
pt3dadd(-396.5, -195, 15, 1)
pt3dadd(-399, -196.5, 26, 1.5)
pt3dadd(-402, -198.5, 22.5, 1.5)
pt3dadd(-405.5, -201, 18.5, 1.5)
pt3dadd(-407, -201.5, 18.5, 0.7)
pt3dadd(-408, -203.5, 22.5, 0.7)
pt3dadd(-411, -205, 26, 0.8)
pt3dadd(-414, -206, 26, 1)
pt3dadd(-415, -207.5, 26, 1.4)
pt3dadd(-417.5, -209, 26, 1.4)
pt3dadd(-418.5, -211, 26, 1.4)
pt3dadd(-418.5, -213.5, 22.5, 1.4)
pt3dadd(-419, -215.5, 29.5, 1.2)
pt3dadd(-420.5, -218, 29.5, 1.2)
pt3dadd(-421, -220, 29.5, 1.4)
pt3dadd(-422.5, -222.5, 26, 1.2)
pt3dadd(-423, -223.5, 22.5, 1.1)
pt3dadd(-428, -227, 29.5, 1.2)
pt3dadd(-430, -227, 29.5, 1.2)
pt3dadd(-433.5, -227.5, 29.5, 1.2)
pt3dadd(-435.5, -230.5, 29.5, 1.2)
pt3dadd(-438.5, -232, 36.5, 1.1)
pt3dadd(-441, -233, 36.5, 1.1)
pt3dadd(-443, -235, 36.5, 1.1)
pt3dadd(-445, -236.5, 36.5, 1.1)
pt3dadd(-448.5, -238.5, 36.5, 1.1)
pt3dadd(-453.5, -242.5, 33, 1.1)
pt3dadd(-456.5, -245, 33, 1)
pt3dadd(-460.5, -246, 33, 1)
pt3dadd(-464, -249, 40, 1.3)
pt3dadd(-469, -251, 40, 1.3)
pt3dadd(-470.5, -252.5, 40, 0.9)
pt3dadd(-475, -255, 33, 1)
pt3dadd(-478.5, -256.5, 36.5, 1.2)
pt3dadd(-482, -256.5, 40, 1.3)
pt3dadd(-485, -256.5, 29.5, 1.3)
pt3dadd(-487.5, -257.5, 29.5, 1.3)
pt3dadd(-489, -259, 36.5, 0.8)
pt3dadd(-492.5, -259.5, 36.5, 0.7)
pt3dadd(-495, -262, 36.5, 0.7)
pt3dadd(-496.5, -264.5, 29.5, 0.8)
pt3dadd(-500.5, -267, 40, 0.8)
pt3dadd(-504, -268.5, 40, 0.8)
pt3dadd(-508.5, -273, 33, 0.8)
pt3dadd(-512, -275, 33, 0.8)
pt3dadd(-514, -276.5, 36.5, 0.8)
pt3dadd(-516, -278.5, 36.5, 0.8)
pt3dadd(-517.5, -279.5, 40, 0.1)
pt3dadd(-519.5, -282.5, 40, 0.1)
pt3dadd(-520.5, -283.5, 26, 0.1)
pt3dadd(-523, -283.5, 36.5, 0.1)
pt3dadd(-525.5, -283.5, 33, 0.1)
pt3dadd(-528, -284.5, 29.5, 0.1)
pt3dadd(-532, -285.5, 33, 0.1)
pt3dadd(-534.5, -285.5, 33, 0.1)
pt3dadd(-537.5, -285.5, 33, 0.1)
pt3dadd(-541.5, -285.5, 33, 0.1)
pt3dadd(-544.5, -285.5, 33, 0.1)
pt3dadd(-547.5, -284.5, 43.5, 0.7)
pt3dadd(-550, -285.5, 33, 0.7)
pt3dadd(-552, -285.5, 36.5, 0.4)
pt3dadd(-554, -286.5, 36.5, 0.2)
pt3dadd(-555.5, -288, 36.5, 0.2)
pt3dadd(-557, -288.5, 43.5, 0.2)
pt3dadd(-559, -290.5, 36.5, 0.2)
pt3dadd(-561.5, -292.5, 36.5, 0.2)
pt3dadd(-562.5, -293, 36.5, 0.2)
pt3dadd(-564, -294, 36.5, 0.2)
pt3dadd(-564.5, -296, 40, 0.3)
pt3dadd(-566, -301.5, 29.5, 0.3)
pt3dadd(-568, -304, 36.5, 0.4)
pt3dadd(-569.5, -306, 36.5, 0.4)
pt3dadd(-571, -307.5, 40, 0.4)
pt3dadd(-571, -309.5, 40, 0.4)
pt3dadd(-571, -311, 40, 0.4)
pt3dadd(-571, -313, 40, 0.4)
pt3dadd(-571, -315.5, 40, 0.4)
pt3dadd(-571, -318, 40, 0.4)
}
dend[128] {pt3dclear()
pt3dadd(-3.12, 28.28, -10.92, 13.1)
pt3dadd(-4.5, 6, -18, 13.1)
pt3dadd(-6.5, 3.5, -15, 11)
pt3dadd(-7, 2.5, -15, 10.6)
pt3dadd(-8, 1.5, -25, 9.9)
pt3dadd(-9, 0, -15, 8.1)
pt3dadd(-10, -0.5, -15, 7.3)
pt3dadd(-11.5, -3, -23, 6.9)
pt3dadd(-12, -5.5, -23, 6)
pt3dadd(-14, -7.5, -23, 6.2)
pt3dadd(-15.5, -10.5, -27.5, 5.8)
pt3dadd(-17, -13.5, -27.5, 5.8)
pt3dadd(-18.5, -15.5, -31.5, 5.9)
pt3dadd(-19.5, -18.5, -40, 6)
pt3dadd(-16.5, -22, -48, 5.6)
pt3dadd(-14, -22.5, -48, 5.6)
pt3dadd(-15.5, -25, -40, 5.6)
pt3dadd(-18.5, -27, -48, 6.8)
}
dend[129] {pt3dclear()
pt3dadd(-18.5, -27, -48, 6.8)
pt3dadd(-22.5, -28, -44, 5)
pt3dadd(-25, -30.5, -55.5, 5.7)
pt3dadd(-29.5, -32.5, -63, 5.8)
pt3dadd(-24.5, -35, -71, 6.2)
pt3dadd(-22, -37, -71, 6.5)
pt3dadd(-22, -39, -71, 6.1)
pt3dadd(-21, -42, -67, 6.6)
}
dend[130] {pt3dclear()
pt3dadd(-21, -42, -67, 6.6)
pt3dadd(-24.5, -51.5, -63, 1.9)
pt3dadd(-26.5, -54.5, -63, 1.6)
pt3dadd(-29, -61, -67, 2.7)
pt3dadd(-30, -63.5, -67, 1.8)
pt3dadd(-29.5, -66.5, -67, 1.8)
pt3dadd(-33.5, -69.5, -67, 1.8)
pt3dadd(-34.5, -70.5, -67, 1.6)
pt3dadd(-37, -73.5, -67, 1.3)
pt3dadd(-38, -75, -71, 1.2)
pt3dadd(-40, -75, -71, 1.3)
pt3dadd(-46, -79, -71, 1.1)
pt3dadd(-48.5, -81, -67, 1.3)
pt3dadd(-50.5, -82.5, -67, 1.3)
pt3dadd(-56, -85.5, -67, 1.4)
pt3dadd(-58.5, -87.5, -67, 1.1)
pt3dadd(-61.5, -89.5, -74.5, 1.2)
pt3dadd(-66, -90, -71, 1.2)
pt3dadd(-68.5, -90.5, -67, 1.6)
pt3dadd(-72.5, -91.5, -71, 2)
pt3dadd(-78, -94, -71, 1.3)
pt3dadd(-80.5, -95.5, -71, 1.5)
pt3dadd(-84, -98.5, -71, 1.6)
pt3dadd(-86.5, -101.5, -71, 1.7)
pt3dadd(-89, -104, -71, 1.7)
pt3dadd(-90, -107.5, -67, 1.9)
pt3dadd(-92, -109, -67, 1.2)
pt3dadd(-94, -111, -63, 1.3)
pt3dadd(-96.5, -113, -63, 2.7)
}
dend[131] {pt3dclear()
pt3dadd(-96.5, -113, -63, 2.7)
pt3dadd(-97.5, -115, -67, 0.7)
pt3dadd(-99.5, -115.5, -67, 0.7)
pt3dadd(-100.5, -116.5, -67, 0.9)
pt3dadd(-102, -118.5, -67, 0.8)
pt3dadd(-104, -119, -67, 0.6)
pt3dadd(-106, -119, -67, 0.6)
pt3dadd(-107.5, -120.5, -67, 0.6)
pt3dadd(-108, -122, -71, 1.1)
pt3dadd(-109, -123, -71, 1.1)
pt3dadd(-110.5, -125, -74.5, 0.5)
pt3dadd(-111, -126, -74.5, 0.5)
pt3dadd(-111.5, -127.5, -78.5, 0.6)
pt3dadd(-112, -129.5, -74.5, 0.7)
pt3dadd(-112.5, -130.5, -74.5, 0.7)
pt3dadd(-114, -132, -74.5, 0.7)
pt3dadd(-114.5, -133, -74.5, 0.7)
}
}
proc shape3d_43() {
dend[131] { pt3dadd(-114.5, -134.5, -71, 0.7)
pt3dadd(-116, -136, -71, 0.8)
pt3dadd(-117, -137, -71, 1.2)
pt3dadd(-118.5, -139.5, -67, 0.6)
pt3dadd(-119.5, -141, -71, 0.9)
pt3dadd(-119.5, -142.5, -74.5, 0.9)
pt3dadd(-119.5, -143.5, -74.5, 0.9)
pt3dadd(-119.5, -146.5, -67, 0.9)
}
dend[132] {pt3dclear()
pt3dadd(-96.5, -113, -63, 2.7)
pt3dadd(-99.5, -113, -67, 0.8)
pt3dadd(-101.5, -113, -67, 1)
pt3dadd(-103.5, -113.5, -67, 0.9)
pt3dadd(-108.5, -115, -67, 1)
pt3dadd(-109.5, -116.5, -59.5, 0.9)
pt3dadd(-112.5, -117.5, -55.5, 1.2)
pt3dadd(-113.5, -116.5, -55.5, 1.1)
pt3dadd(-116, -116.5, -55.5, 1.1)
pt3dadd(-119.5, -119.5, -63, 0.9)
pt3dadd(-121.5, -119.5, -51.5, 0.9)
pt3dadd(-123.5, -119.5, -55.5, 0.9)
pt3dadd(-125.5, -121.5, -44, 0.9)
pt3dadd(-127.5, -122, -44, 0.9)
pt3dadd(-129.5, -123.5, -44, 0.9)
pt3dadd(-131.5, -123.5, -44, 0.9)
pt3dadd(-134, -124.5, -51.5, 0.7)
pt3dadd(-138.5, -127, -51.5, 1.1)
pt3dadd(-142.5, -129.5, -51.5, 1.2)
pt3dadd(-145, -129.5, -43, 1.2)
pt3dadd(-147, -129.5, -43, 1)
pt3dadd(-149.5, -131.5, -47, 0.9)
pt3dadd(-152, -132, -51.5, 0.9)
pt3dadd(-155, -133.5, -34.5, 0.9)
pt3dadd(-157, -133.5, -34.5, 0.9)
pt3dadd(-158, -136, -34.5, 0.9)
pt3dadd(-159, -137, -34.5, 0.8)
pt3dadd(-161, -137, -34.5, 0.8)
pt3dadd(-163, -137, -34.5, 0.8)
pt3dadd(-166, -139.5, -34.5, 0.8)
pt3dadd(-167, -141, -34.5, 0.8)
pt3dadd(-172, -142, -14, 0.8)
pt3dadd(-175.5, -142, -14, 0.8)
pt3dadd(-178.5, -144, -14, 0.8)
pt3dadd(-181, -144.5, -14, 0.8)
pt3dadd(-185.5, -146.5, -14, 0.8)
pt3dadd(-189, -148.5, -14, 0.8)
}
dend[133] {pt3dclear()
pt3dadd(-21, -42, -67, 6.6)
pt3dadd(-20, -44.5, -67, 5.2)
pt3dadd(-16.5, -51, -74.5, 4.9)
pt3dadd(-12, -56.5, -70.5, 5.8)
pt3dadd(-8.5, -58.5, -78.5, 5.8)
pt3dadd(-7, -58.5, -78.5, 5.4)
pt3dadd(-8, -58.5, -90, 5.3)
pt3dadd(-9.5, -64, -82, 4.9)
pt3dadd(-9.5, -66, -82, 4.6)
pt3dadd(-6.5, -69.5, -90, 4.2)
pt3dadd(-7.5, -69.5, -86, 5.5)
pt3dadd(-11.5, -71, -97.5, 5)
pt3dadd(-10, -75, -93.5, 5.1)
pt3dadd(-9, -78, -97.5, 5.3)
pt3dadd(-9, -80, -105, 5.5)
pt3dadd(-7.5, -86.5, -117.5, 6.6)
pt3dadd(-6.5, -88.5, -117.5, 5.8)
pt3dadd(-5, -90.5, -122, 5.1)
pt3dadd(-0.5, -89.5, -126, 5.6)
pt3dadd(1.5, -93, -130, 5.9)
pt3dadd(2, -95, -142.5, 6.1)
}
dend[134] {pt3dclear()
pt3dadd(2, -95, -142.5, 6.1)
pt3dadd(3.5, -98, -130, 5.5)
pt3dadd(2, -102.5, -142.5, 4.3)
pt3dadd(3.5, -106.5, -142.5, 8.2)
}
dend[135] {pt3dclear()
pt3dadd(3.5, -106.5, -142.5, 8.2)
pt3dadd(-1.5, -109.5, -140, 3.4)
pt3dadd(-3, -111, -140, 3.4)
pt3dadd(-2, -113, -140, 3.4)
pt3dadd(-1, -117, -145.5, 3.1)
pt3dadd(-2, -119, -145.5, 3.1)
pt3dadd(-2.5, -121, -145.5, 2.9)
pt3dadd(-2.5, -123, -145.5, 2.7)
pt3dadd(-0.5, -125, -145.5, 2.8)
pt3dadd(-3, -126.5, -145.5, 2)
pt3dadd(-4, -126.5, -150.5, 2.3)
pt3dadd(-5.5, -128, -148, 4)
pt3dadd(-6, -130.5, -150.5, 4)
pt3dadd(-8.5, -132.5, -156, 3.3)
pt3dadd(-9.5, -134, -156, 3.3)
pt3dadd(-11.5, -138, -156, 3.9)
pt3dadd(-13, -139, -156, 3.3)
pt3dadd(-15, -143, -161, 2.8)
pt3dadd(-15, -145, -161, 3.3)
pt3dadd(-17.5, -148, -158.5, 3.1)
pt3dadd(-19.5, -149, -161, 3.5)
pt3dadd(-21, -151, -161, 3.5)
pt3dadd(-22, -153, -166.5, 3.8)
pt3dadd(-25, -156, -166.5, 3.8)
pt3dadd(-27.5, -158, -166.5, 3.8)
pt3dadd(-27.5, -162.5, -166.5, 3.8)
pt3dadd(-28, -164.5, -162.5, 3.8)
pt3dadd(-29.5, -166, -166.5, 3.3)
pt3dadd(-32.5, -169.5, -171, 3.6)
pt3dadd(-35.5, -174.5, -166.5, 3.6)
pt3dadd(-36, -179.5, -171, 4.4)
pt3dadd(-36, -185.5, -183.5, 4.1)
pt3dadd(-37, -191.5, -191.5, 3.6)
pt3dadd(-40.5, -195, -187.5, 4.1)
pt3dadd(-41, -197, -187.5, 3.3)
pt3dadd(-42.5, -198.5, -187.5, 3.2)
pt3dadd(-43, -200.5, -191.5, 2.7)
pt3dadd(-41.5, -203.5, -191.5, 3.7)
pt3dadd(-41, -206, -191.5, 3.7)
pt3dadd(-41, -209, -191.5, 3.7)
pt3dadd(-40.5, -211.5, -191.5, 3.9)
}
dend[136] {pt3dclear()
pt3dadd(-40.5, -211.5, -191.5, 3.9)
pt3dadd(-43, -212.5, -200, 1.1)
pt3dadd(-46, -217.5, -187.5, 0.9)
pt3dadd(-48.5, -220, -187.5, 0.9)
pt3dadd(-50, -222.5, -183.5, 0.9)
pt3dadd(-51.5, -225, -187.5, 1)
pt3dadd(-52, -227, -187.5, 1.3)
pt3dadd(-53.5, -229, -187.5, 0.9)
pt3dadd(-56, -230.5, -187.5, 0.8)
pt3dadd(-57.5, -233.5, -187.5, 0.8)
pt3dadd(-58, -236, -187.5, 0.8)
pt3dadd(-59, -238.5, -187.5, 0.8)
pt3dadd(-61, -240, -187.5, 0.8)
pt3dadd(-63, -241.5, -183.5, 0.9)
pt3dadd(-68.5, -241.5, -191.5, 1.3)
pt3dadd(-70.5, -243, -191.5, 1.3)
pt3dadd(-72.5, -244, -191.5, 1.1)
pt3dadd(-74.5, -245, -191.5, 1)
pt3dadd(-76, -246.5, -191.5, 0.9)
pt3dadd(-77.5, -247, -191.5, 0.9)
pt3dadd(-79, -250, -191.5, 1.1)
pt3dadd(-80.5, -252, -191.5, 1.1)
pt3dadd(-83, -254, -191.5, 1.1)
pt3dadd(-86.5, -255, -191.5, 1.1)
pt3dadd(-86.5, -256, -191.5, 1.1)
pt3dadd(-88.5, -258, -191.5, 0.7)
pt3dadd(-91, -258.5, -191.5, 0.7)
pt3dadd(-92.5, -260, -191.5, 0.7)
pt3dadd(-95, -261, -191.5, 0.7)
pt3dadd(-97.5, -262, -191.5, 0.7)
pt3dadd(-100.5, -263.5, -191.5, 0.7)
pt3dadd(-102.5, -265, -191.5, 0.7)
pt3dadd(-104.5, -268, -191.5, 0.7)
pt3dadd(-108, -272, -196, 0.5)
}
dend[137] {pt3dclear()
pt3dadd(-40.5, -211.5, -191.5, 3.9)
pt3dadd(-38.5, -214, -196, 3.3)
pt3dadd(-38, -215.5, -200, 3.4)
pt3dadd(-38.5, -217, -200, 3.6)
pt3dadd(-38.5, -218, -204, 3.7)
pt3dadd(-40, -219, -204, 3.7)
pt3dadd(-39.5, -218.5, -208.5, 3.7)
pt3dadd(-37.5, -219, -208.5, 3.7)
pt3dadd(-36.5, -221, -212.5, 3.6)
pt3dadd(-38, -224.5, -212.5, 3.6)
pt3dadd(-36.5, -222.5, -216.5, 3.2)
pt3dadd(-34.5, -222.5, -216.5, 3.4)
pt3dadd(-34, -223, -216.5, 3)
pt3dadd(-32.5, -225, -216.5, 2.7)
pt3dadd(-32.5, -226, -221, 2.7)
pt3dadd(-31, -227.5, -221, 3)
pt3dadd(-29.5, -227.5, -225, 3.1)
pt3dadd(-25.5, -232.5, -234, 3.8)
pt3dadd(-23.5, -233, -238.5, 3.8)
pt3dadd(-22.5, -233, -243, 3.8)
pt3dadd(-22.5, -235, -247.5, 4)
pt3dadd(-22.5, -237, -247.5, 4)
pt3dadd(-22, -238.5, -247.5, 4)
pt3dadd(-21, -240.5, -247.5, 3.5)
pt3dadd(-21, -241.5, -247.5, 3.1)
pt3dadd(-21, -244, -252, 2.5)
pt3dadd(-21, -245.5, -252, 2.1)
pt3dadd(-20.5, -247, -252, 2.5)
pt3dadd(-20.5, -248.5, -252, 3.1)
pt3dadd(-21, -251, -256.5, 3.4)
pt3dadd(-20, -253.5, -256.5, 3.2)
pt3dadd(-19.5, -255, -265.5, 2.8)
pt3dadd(-16, -259.5, -276, 2.8)
pt3dadd(-15, -262, -272.5, 2.6)
pt3dadd(-15, -264, -272.5, 2.8)
pt3dadd(-15, -267.5, -276, 2.6)
pt3dadd(-14, -270, -279.5, 1.8)
pt3dadd(-13.5, -273, -279.5, 1.6)
pt3dadd(-13, -277.5, -272.5, 2.1)
pt3dadd(-13, -279, -269, 2.4)
pt3dadd(-13, -282, -272.5, 4.4)
}
dend[138] {pt3dclear()
pt3dadd(-13, -282, -272.5, 4.4)
pt3dadd(-11.5, -284.5, -272.5, 2.7)
pt3dadd(-11, -286, -272.5, 2.2)
pt3dadd(-9, -292, -276, 2.6)
pt3dadd(-8.5, -293.5, -276, 2.5)
pt3dadd(-8.5, -296, -276, 2.8)
pt3dadd(-7, -298, -276, 2.8)
pt3dadd(-6.5, -301, -276, 2.3)
pt3dadd(-6.5, -304, -276, 2.3)
pt3dadd(-6, -308, -276, 1.7)
pt3dadd(-4.5, -312, -276, 2.1)
pt3dadd(-3.5, -318, -276, 2.6)
pt3dadd(-3.5, -320.5, -276, 2.6)
pt3dadd(-3, -322.5, -279.5, 2.4)
}
}
proc shape3d_44() {
dend[138] { pt3dadd(-2.5, -324, -279.5, 2.2)
pt3dadd(-3, -326, -279.5, 2.3)
pt3dadd(-3.5, -330, -286.5, 2.4)
pt3dadd(-3.5, -332.5, -286.5, 2.4)
pt3dadd(-3.5, -334, -286.5, 2.1)
pt3dadd(-4, -339, -290.5, 1.8)
pt3dadd(-3.5, -340.5, -294, 1.8)
pt3dadd(-2.5, -343, -294, 1.8)
pt3dadd(-1.5, -345.5, -294, 1.8)
pt3dadd(-1.5, -349, -290.5, 2.1)
pt3dadd(-2.5, -352, -290.5, 1.6)
pt3dadd(-3, -354.5, -290.5, 1.8)
pt3dadd(-3, -357, -294, 2.1)
pt3dadd(-2.5, -359, -294, 2.1)
pt3dadd(-2.5, -361.5, -294, 2.1)
pt3dadd(-3.5, -364.5, -294, 2)
pt3dadd(-3.5, -367, -294, 2)
pt3dadd(-4.5, -369, -294, 2)
pt3dadd(-5, -370.5, -294, 1.6)
pt3dadd(-5, -372.5, -294, 1.1)
pt3dadd(-4.5, -374.5, -294, 1.3)
pt3dadd(-3.5, -376.5, -294, 1.6)
pt3dadd(-3, -379, -294, 1.8)
pt3dadd(-2.5, -382, -290.5, 2)
pt3dadd(-2.5, -385, -290.5, 1.6)
pt3dadd(-3, -389.5, -290.5, 1.6)
pt3dadd(-3.5, -393, -290.5, 1.9)
pt3dadd(-5, -396, -294, 1.7)
pt3dadd(-6.5, -398.5, -286.5, 1.7)
pt3dadd(-5.5, -400.5, -294, 1.8)
pt3dadd(-6.5, -404, -297.5, 1.4)
pt3dadd(-7.5, -409, -290.5, 1.4)
pt3dadd(-8, -411.5, -294, 1.4)
pt3dadd(-9, -413, -290.5, 1.4)
pt3dadd(-10.5, -415, -286.5, 1.2)
pt3dadd(-10.5, -417.5, -294, 1.1)
pt3dadd(-10, -419.5, -294, 0.6)
pt3dadd(-9.5, -421.5, -294, 0.9)
}
dend[139] {pt3dclear()
pt3dadd(-13, -282, -272.5, 4.4)
pt3dadd(-16.5, -282.5, -276, 2.6)
pt3dadd(-20, -285, -269, 1.1)
pt3dadd(-23.5, -291, -276, 1.5)
pt3dadd(-25, -293.5, -279.5, 1.5)
pt3dadd(-26, -295.5, -276, 1.1)
pt3dadd(-26.5, -298.5, -279.5, 1.1)
pt3dadd(-27.5, -300.5, -283, 1.1)
pt3dadd(-28.5, -302, -283, 1.1)
pt3dadd(-28.5, -304, -283, 0.9)
pt3dadd(-28.5, -307.5, -283, 0.9)
pt3dadd(-30, -308.5, -283, 0.9)
pt3dadd(-29, -310.5, -286.5, 0.9)
pt3dadd(-29.5, -313, -286.5, 0.9)
pt3dadd(-30.5, -316, -279.5, 0.9)
pt3dadd(-32, -317.5, -279.5, 0.9)
pt3dadd(-32, -319.5, -279.5, 0.9)
pt3dadd(-32, -321.5, -279.5, 0.9)
pt3dadd(-33.5, -324, -279.5, 0.9)
pt3dadd(-35, -325, -279.5, 0.9)
pt3dadd(-35, -327.5, -276, 0.9)
pt3dadd(-35, -330.5, -276, 0.9)
pt3dadd(-35, -333.5, -276, 0.9)
pt3dadd(-35.5, -336.5, -276, 0.9)
pt3dadd(-35, -338, -279.5, 0.9)
pt3dadd(-33.5, -340, -279.5, 0.9)
}
dend[140] {pt3dclear()
pt3dadd(3.5, -106.5, -142.5, 8.2)
pt3dadd(8.5, -108.5, -142.5, 2.8)
pt3dadd(10.5, -109.5, -142.5, 2.2)
pt3dadd(14, -109.5, -142.5, 3.3)
pt3dadd(15.5, -109.5, -145.5, 2.4)
pt3dadd(17, -110, -148, 2.7)
pt3dadd(19.5, -112, -148, 2.3)
pt3dadd(21.5, -112, -150.5, 2.5)
pt3dadd(24, -112, -153, 2.5)
pt3dadd(24, -114, -148, 2.3)
pt3dadd(26, -117.5, -148, 2.1)
pt3dadd(27, -117.5, -150.5, 2.6)
pt3dadd(28.5, -117.5, -156, 2.7)
pt3dadd(31.5, -117.5, -156, 2.5)
pt3dadd(35, -117.5, -156, 2)
pt3dadd(39.5, -120, -156, 2.3)
pt3dadd(43.5, -123.5, -161, 2.3)
pt3dadd(45, -124.5, -161, 2.5)
pt3dadd(45.5, -127.5, -166.5, 2.5)
pt3dadd(48.5, -129, -166.5, 3.7)
pt3dadd(54, -134, -166.5, 3.4)
pt3dadd(59, -138, -171, 2.8)
pt3dadd(61.5, -142.5, -171, 2.5)
pt3dadd(63, -143, -175, 2.5)
pt3dadd(64, -143, -175, 2.4)
pt3dadd(65, -143, -175, 2)
pt3dadd(66, -143, -175, 2)
pt3dadd(67, -144.5, -175, 2)
pt3dadd(68, -147, -171, 2.6)
pt3dadd(71, -150, -175, 2.7)
pt3dadd(75, -153, -183.5, 2.9)
pt3dadd(77, -158, -171, 3.1)
pt3dadd(79, -159, -187.5, 3.1)
pt3dadd(83.5, -160, -191.5, 2.8)
pt3dadd(87, -160, -195.5, 2.3)
pt3dadd(89, -160.5, -195.5, 2.3)
pt3dadd(90, -161, -187.5, 2.4)
pt3dadd(92, -161, -200, 2.4)
pt3dadd(94.5, -164, -200, 2.8)
pt3dadd(96, -164, -208, 2.6)
pt3dadd(97.5, -164, -208, 2)
pt3dadd(98, -164, -195.5, 1.8)
pt3dadd(99.5, -164, -200, 1.8)
pt3dadd(102.5, -168, -200, 1.6)
pt3dadd(105, -168, -200, 1.5)
pt3dadd(107, -168, -208, 1.8)
pt3dadd(110.5, -165.5, -212.5, 1.6)
pt3dadd(111.5, -165.5, -212.5, 1.8)
pt3dadd(113, -166, -208, 1.9)
pt3dadd(114, -165, -212.5, 1.9)
pt3dadd(115, -163.5, -208, 2.1)
pt3dadd(116.5, -163.5, -212.5, 2.1)
pt3dadd(117, -164, -220.5, 1.8)
pt3dadd(118, -165.5, -220.5, 1.7)
pt3dadd(119.5, -164, -220.5, 2.8)
pt3dadd(121.5, -164, -220.5, 3.7)
pt3dadd(123.5, -163.5, -220.5, 4.1)
pt3dadd(125.5, -163.5, -225, 5.1)
}
dend[141] {pt3dclear()
pt3dadd(125.5, -163.5, -225, 5.1)
pt3dadd(126.5, -161, -225, 1.7)
pt3dadd(128, -160.5, -225, 1.7)
pt3dadd(130.5, -159.5, -225, 1.7)
pt3dadd(132, -157.5, -229, 1.8)
pt3dadd(133.5, -156.5, -224.5, 1.5)
pt3dadd(135, -155, -224.5, 1.6)
pt3dadd(136, -154, -220, 0.9)
pt3dadd(138, -153.5, -229, 0.9)
pt3dadd(139.5, -152.5, -229, 1.1)
pt3dadd(140.5, -152.5, -224.5, 1.1)
pt3dadd(141, -151.5, -229, 0.9)
pt3dadd(142, -149.5, -233.5, 0.9)
pt3dadd(143, -148.5, -233.5, 0.9)
pt3dadd(144, -147, -233.5, 1.1)
pt3dadd(145.5, -146, -233.5, 1.1)
pt3dadd(147, -146, -233.5, 1.1)
pt3dadd(148.5, -146, -233.5, 1.1)
pt3dadd(150, -146, -238, 1.1)
pt3dadd(151.5, -144.5, -233.5, 0.8)
pt3dadd(152, -144, -233.5, 0.7)
pt3dadd(153.5, -143, -233.5, 0.8)
pt3dadd(155.5, -143, -238, 0.9)
pt3dadd(157.5, -142.5, -238, 1)
pt3dadd(159, -141.5, -238, 1)
pt3dadd(160.5, -140, -233.5, 0.8)
pt3dadd(161, -140, -233.5, 0.8)
pt3dadd(162, -139.5, -233.5, 0.8)
pt3dadd(163.5, -138, -238, 0.8)
pt3dadd(165, -137.5, -233.5, 0.9)
pt3dadd(167, -137.5, -233.5, 1.1)
pt3dadd(168.5, -137, -233.5, 1.1)
pt3dadd(168.5, -135.5, -233.5, 1.1)
pt3dadd(172.5, -133.5, -242.5, 0.9)
pt3dadd(173.5, -132.5, -242.5, 0.9)
pt3dadd(174.5, -132, -242.5, 0.8)
pt3dadd(176, -131.5, -242.5, 0.7)
pt3dadd(178, -131.5, -242.5, 0.7)
pt3dadd(177.5, -129.5, -242.5, 0.7)
pt3dadd(179, -129, -251.5, 0.8)
pt3dadd(180.5, -128.5, -251.5, 0.8)
pt3dadd(180.5, -127.5, -251.5, 0.9)
pt3dadd(180.5, -126.5, -251.5, 0.9)
pt3dadd(180.5, -126, -251.5, 1)
pt3dadd(182, -126, -256, 0.8)
pt3dadd(184, -126, -256, 0.8)
pt3dadd(185, -125.5, -256, 0.9)
pt3dadd(186.5, -124, -260.5, 1.1)
pt3dadd(189, -122.5, -260.5, 1)
}
dend[142] {pt3dclear()
pt3dadd(125.5, -163.5, -225, 5.1)
pt3dadd(127, -165.5, -233, 2.5)
pt3dadd(128.5, -165.5, -225, 2.7)
pt3dadd(132, -167.5, -220.5, 2.4)
pt3dadd(133.5, -168, -229.5, 2.3)
pt3dadd(134.5, -168, -234, 2.3)
pt3dadd(136, -168, -234, 2)
pt3dadd(136, -170, -234, 2)
pt3dadd(136, -172, -234, 2.3)
pt3dadd(137.5, -170, -229.5, 2.2)
pt3dadd(138.5, -170, -238.5, 1.7)
pt3dadd(140.5, -169.5, -234, 1.9)
pt3dadd(142, -169.5, -234, 1.9)
pt3dadd(143, -171, -238.5, 1.9)
pt3dadd(144.5, -171, -234, 1.9)
pt3dadd(146, -172, -234, 1.9)
pt3dadd(146, -173.5, -234, 1.2)
pt3dadd(148, -175.5, -247.5, 1.6)
pt3dadd(150, -175.5, -247.5, 1.6)
pt3dadd(153, -175.5, -243, 1.7)
pt3dadd(154.5, -174.5, -243, 2.1)
pt3dadd(156, -174.5, -243, 1.5)
pt3dadd(158.5, -175, -243, 1.3)
pt3dadd(159.5, -175.5, -252, 1.6)
pt3dadd(162.5, -178, -243, 2.6)
pt3dadd(164.5, -178.5, -252, 2.2)
pt3dadd(166.5, -180, -256.5, 2.1)
pt3dadd(168.5, -180.5, -256.5, 1.9)
pt3dadd(170, -182, -252, 2.5)
}
}
proc shape3d_45() {
dend[142] { pt3dadd(173, -182.5, -247.5, 2.5)
pt3dadd(176, -182.5, -256.5, 2.8)
pt3dadd(179, -186.5, -263.5, 1.9)
pt3dadd(180.5, -189, -263.5, 1.9)
pt3dadd(183.5, -189.5, -263.5, 1.8)
pt3dadd(188.5, -193.5, -267, 2.1)
pt3dadd(189, -195.5, -267, 1.9)
pt3dadd(191, -196, -263.5, 2)
pt3dadd(193.5, -196, -263.5, 2)
pt3dadd(197, -197, -267, 1.6)
pt3dadd(198.5, -197.5, -267, 1.6)
pt3dadd(199, -199.5, -267, 2)
pt3dadd(201, -199.5, -267, 2)
pt3dadd(204, -200, -263.5, 1.8)
pt3dadd(207.5, -205, -267, 1.8)
pt3dadd(210, -206, -267, 1.8)
pt3dadd(212, -207, -267, 1.8)
pt3dadd(214, -208, -267, 2.1)
pt3dadd(217, -209, -267, 1.7)
pt3dadd(220, -210.5, -267, 1.6)
pt3dadd(221.5, -210.5, -267, 1.6)
pt3dadd(224, -212, -267, 1.6)
pt3dadd(224, -213.5, -267, 1.6)
pt3dadd(226, -216, -267, 1.6)
pt3dadd(226, -218, -263.5, 1.6)
pt3dadd(228.5, -219.5, -270.5, 2)
pt3dadd(230, -220.5, -270.5, 2.1)
pt3dadd(232, -220.5, -274, 2.1)
pt3dadd(236.5, -223, -278, 1.9)
pt3dadd(238, -225, -274, 1.9)
pt3dadd(238.5, -226, -270.5, 1.9)
pt3dadd(239, -227, -278, 1.9)
pt3dadd(241, -229, -281.5, 1.9)
pt3dadd(242, -230.5, -281.5, 1.9)
pt3dadd(247.5, -234, -281.5, 3.6)
pt3dadd(249, -235, -278, 4.1)
}
dend[143] {pt3dclear()
pt3dadd(249, -235, -278, 4.1)
pt3dadd(253, -235, -288.5, 1.4)
pt3dadd(255, -237, -274, 1.4)
pt3dadd(257, -239, -278, 1.9)
pt3dadd(258, -239.5, -285, 1.9)
pt3dadd(261, -239.5, -285, 1.9)
pt3dadd(262.5, -239.5, -285, 1.9)
pt3dadd(263.5, -241, -285, 1.7)
pt3dadd(264.5, -242, -285, 1.6)
pt3dadd(265.5, -242.5, -285, 1.5)
pt3dadd(267.5, -242.5, -285, 1.6)
pt3dadd(269, -243.5, -285, 2.6)
pt3dadd(272.5, -245, -285, 2.5)
pt3dadd(275.5, -246, -285, 2.2)
pt3dadd(276.5, -247, -285, 2)
pt3dadd(279, -249.5, -285, 1.7)
pt3dadd(280, -250, -288.5, 1.6)
pt3dadd(283, -251.5, -288.5, 1.8)
pt3dadd(283.5, -256.5, -283, 1.6)
pt3dadd(285, -258.5, -288.5, 1.6)
pt3dadd(286.5, -258.5, -288.5, 1.6)
pt3dadd(288.5, -258.5, -288.5, 1.6)
pt3dadd(290, -260.5, -294, 1.4)
pt3dadd(292, -261.5, -294, 1.2)
pt3dadd(293, -262.5, -299.5, 1.2)
pt3dadd(297.5, -262.5, -288.5, 1.1)
pt3dadd(299.5, -262.5, -288.5, 0.9)
pt3dadd(301, -262.5, -288.5, 0.9)
pt3dadd(304, -264, -288.5, 0.9)
pt3dadd(306, -264, -288.5, 1.1)
pt3dadd(308, -264, -294, 1.1)
pt3dadd(310.5, -263.5, -299.5, 1.3)
pt3dadd(312.5, -263.5, -288.5, 1.2)
pt3dadd(315.5, -266, -288.5, 1.2)
pt3dadd(318, -267.5, -299.5, 1)
pt3dadd(321, -268.5, -299.5, 0.9)
pt3dadd(323.5, -269.5, -288.5, 1.3)
pt3dadd(329.5, -270.5, -294, 1.3)
pt3dadd(332, -272, -294, 1)
pt3dadd(334, -272, -294, 0.7)
pt3dadd(337, -273.5, -294, 0.7)
pt3dadd(338.5, -275, -294, 0.9)
pt3dadd(339, -276.5, -294, 0.9)
pt3dadd(340.5, -277.5, -294, 1)
pt3dadd(346, -278, -305, 1.3)
pt3dadd(348.5, -279, -305, 1.3)
pt3dadd(351, -279, -294, 0.8)
pt3dadd(353, -279, -299.5, 0.9)
pt3dadd(354.5, -280.5, -305, 1)
pt3dadd(357, -282.5, -310.5, 1)
pt3dadd(361, -284.5, -305, 0.9)
pt3dadd(365.5, -286.5, -305, 0.9)
pt3dadd(369.5, -288, -299.5, 1)
pt3dadd(371.5, -289.5, -299.5, 1)
pt3dadd(373.5, -290, -299.5, 1)
pt3dadd(379.5, -290.5, -310.5, 1.2)
pt3dadd(381, -290.5, -321.5, 1.6)
pt3dadd(383.5, -290.5, -321.5, 1.6)
pt3dadd(387, -290, -327, 1.6)
pt3dadd(388.5, -291, -316, 1.5)
pt3dadd(392, -290, -321.5, 1.5)
pt3dadd(392.5, -289, -321.5, 1.3)
pt3dadd(396, -289, -321.5, 1.1)
pt3dadd(397.5, -289, -316, 1.1)
pt3dadd(399, -290, -316, 1)
pt3dadd(401, -292, -316, 0.9)
pt3dadd(402.5, -293.5, -333, 1)
pt3dadd(405, -293.5, -333, 1.1)
pt3dadd(408, -294, -321.5, 1)
}
dend[144] {pt3dclear()
pt3dadd(249, -235, -278, 4.1)
pt3dadd(247.5, -237, -285, 1.6)
pt3dadd(247, -241, -288.5, 1.6)
pt3dadd(247, -242, -283, 1.6)
pt3dadd(249.5, -243.5, -283, 1.5)
pt3dadd(248.5, -245, -277.5, 1.1)
pt3dadd(248.5, -246.5, -288.5, 0.9)
pt3dadd(249, -248.5, -288.5, 0.6)
pt3dadd(251, -248.5, -288.5, 0.7)
pt3dadd(252.5, -250.5, -288.5, 0.7)
pt3dadd(253.5, -251.5, -288.5, 0.7)
pt3dadd(254, -252.5, -294, 0.7)
pt3dadd(255, -254.5, -299.5, 0.7)
pt3dadd(256.5, -254.5, -299.5, 0.9)
pt3dadd(258.5, -255, -310.5, 0.9)
pt3dadd(260, -254, -299.5, 0.9)
pt3dadd(261, -253.5, -305, 1.3)
pt3dadd(262.5, -253.5, -305, 1.4)
pt3dadd(264.5, -254.5, -316, 1.3)
pt3dadd(265.5, -256.5, -310.5, 1.4)
pt3dadd(267, -258.5, -310.5, 1.2)
pt3dadd(268.5, -259.5, -316, 1.2)
pt3dadd(270, -261, -316, 1.2)
pt3dadd(271, -262, -310.5, 1.5)
pt3dadd(272, -263.5, -316, 1.4)
pt3dadd(272, -264.5, -322, 0.9)
pt3dadd(273, -265, -322, 0.4)
pt3dadd(273, -267, -316, 0.1)
pt3dadd(273, -269.5, -305, 0.1)
pt3dadd(273, -270.5, -299.5, 0.2)
pt3dadd(273.5, -273.5, -299.5, 0.1)
pt3dadd(274, -276, -316, 0.1)
pt3dadd(273.5, -278.5, -316, 0.1)
pt3dadd(272, -280.5, -288.5, 0.1)
}
dend[145] {pt3dclear()
pt3dadd(2, -95, -142.5, 6.1)
pt3dadd(-2, -93.5, -138.5, 2.3)
pt3dadd(-6, -93.5, -142.5, 2.3)
pt3dadd(-8, -97.5, -142.5, 2.1)
pt3dadd(-11.5, -97, -137.5, 1.9)
pt3dadd(-13, -93.5, -145, 1.9)
pt3dadd(-16, -93, -145, 1.6)
pt3dadd(-18, -95, -145, 1.4)
pt3dadd(-20.5, -95, -145, 1.5)
pt3dadd(-24.5, -94.5, -150.5, 1.5)
pt3dadd(-26.5, -94, -150.5, 1.5)
pt3dadd(-28, -92.5, -150.5, 1.5)
pt3dadd(-30, -91, -153, 1.5)
pt3dadd(-35.5, -90, -153, 1.3)
pt3dadd(-38.5, -90, -153, 1.3)
pt3dadd(-46, -91.5, -153, 1.2)
pt3dadd(-49.5, -92, -158.5, 1.2)
pt3dadd(-52, -92.5, -158.5, 1.2)
pt3dadd(-54.5, -92.5, -158.5, 1.4)
pt3dadd(-58, -92.5, -158.5, 1.5)
pt3dadd(-60, -92.5, -158.5, 1.5)
pt3dadd(-62, -92.5, -158.5, 1.2)
pt3dadd(-65, -93.5, -158.5, 1.4)
pt3dadd(-67, -93.5, -158.5, 1.4)
pt3dadd(-69.5, -94, -155.5, 1.3)
pt3dadd(-71.5, -95.5, -155.5, 1.3)
pt3dadd(-74.5, -95.5, -158.5, 1.4)
pt3dadd(-77, -95.5, -161, 1.6)
pt3dadd(-80, -95.5, -161, 1.6)
pt3dadd(-87.5, -95.5, -163.5, 1.4)
pt3dadd(-90.5, -97.5, -155.5, 1.4)
pt3dadd(-93.5, -97.5, -158.5, 1)
pt3dadd(-97.5, -99, -158.5, 1)
pt3dadd(-104, -100, -161, 1.2)
pt3dadd(-108, -100, -158.5, 1.3)
pt3dadd(-117.5, -101.5, -158.5, 1.4)
pt3dadd(-122, -104.5, -158.5, 1.4)
pt3dadd(-129.5, -107, -161, 1.4)
pt3dadd(-135.5, -107, -161, 1.4)
pt3dadd(-139.5, -107, -163.5, 1.4)
pt3dadd(-142, -107, -163.5, 1.1)
pt3dadd(-144, -107, -163.5, 1)
pt3dadd(-146.5, -107, -158.5, 1.1)
pt3dadd(-150.5, -106.5, -166, 1.1)
pt3dadd(-154, -106.5, -162, 1.1)
pt3dadd(-156.5, -106.5, -162, 1.1)
pt3dadd(-161, -105.5, -170, 1.2)
pt3dadd(-163.5, -105.5, -166, 0.9)
pt3dadd(-166, -105.5, -166, 0.9)
pt3dadd(-167.5, -106, -178.5, 1.5)
pt3dadd(-170.5, -106, -178.5, 1.5)
pt3dadd(-173, -106, -166, 1.2)
pt3dadd(-175.5, -106, -166, 1.2)
pt3dadd(-178, -106, -162, 1.2)
pt3dadd(-182.5, -107, -174.5, 1.1)
pt3dadd(-185, -107.5, -170, 1.1)
pt3dadd(-186.5, -107.5, -166, 1.1)
pt3dadd(-188.5, -107.5, -162, 1.1)
pt3dadd(-192.5, -107.5, -170, 1.1)
pt3dadd(-196, -108.5, -170, 1.1)
pt3dadd(-201.5, -108.5, -170, 1.1)
}
}
proc shape3d_46() {
dend[145] { pt3dadd(-204.5, -109, -170, 1.2)
pt3dadd(-207, -110, -174.5, 1.2)
pt3dadd(-209, -110, -170, 1.2)
pt3dadd(-214, -110, -174.5, 1.3)
pt3dadd(-217, -110, -174.5, 1.1)
pt3dadd(-219.5, -110, -174.5, 1.2)
pt3dadd(-222, -110, -170, 1)
pt3dadd(-229, -109, -178.5, 0.7)
pt3dadd(-235.5, -112, -182.5, 1.2)
pt3dadd(-238.5, -113.5, -182.5, 1.2)
pt3dadd(-241, -113.5, -182.5, 1.2)
pt3dadd(-244, -113.5, -174.5, 1.2)
pt3dadd(-246, -113.5, -174.5, 1.2)
pt3dadd(-248.5, -115, -170, 1.3)
pt3dadd(-251.5, -116.5, -178.5, 1.3)
pt3dadd(-254.5, -117.5, -178.5, 1.3)
pt3dadd(-257.5, -117.5, -182.5, 1.1)
pt3dadd(-260.5, -117.5, -182.5, 1.1)
pt3dadd(-266, -117.5, -182.5, 1.2)
pt3dadd(-268.5, -117.5, -182.5, 1.3)
pt3dadd(-271, -117.5, -187, 1.3)
pt3dadd(-275, -113.5, -191, 1)
pt3dadd(-277, -111.5, -191, 1)
pt3dadd(-281, -111, -191, 1)
pt3dadd(-287.5, -111, -191, 1)
pt3dadd(-291, -111, -191, 1)
pt3dadd(-293, -110.5, -191, 0.9)
pt3dadd(-296, -109.5, -199.5, 0.9)
pt3dadd(-298.5, -108.5, -199.5, 1)
pt3dadd(-301.5, -108.5, -199.5, 1)
pt3dadd(-304.5, -107, -199.5, 1)
pt3dadd(-306, -105.5, -199.5, 1)
pt3dadd(-310, -104.5, -199.5, 0.9)
pt3dadd(-312, -104.5, -199.5, 0.9)
pt3dadd(-314.5, -104.5, -199.5, 0.7)
pt3dadd(-317.5, -103.5, -195, 0.7)
pt3dadd(-321.5, -101, -195, 0.7)
pt3dadd(-323.5, -99, -195, 0.7)
pt3dadd(-326.5, -96, -195, 0.7)
pt3dadd(-327.5, -94, -195, 0.7)
pt3dadd(-330, -93, -195, 0.7)
pt3dadd(-332.5, -93, -191, 0.7)
pt3dadd(-335.5, -93, -191, 0.7)
pt3dadd(-338.5, -93, -187, 0.7)
pt3dadd(-341.5, -94, -195, 0.7)
pt3dadd(-344.5, -94, -195, 0.7)
pt3dadd(-348.5, -93.5, -195, 0.7)
pt3dadd(-354.5, -92, -199.5, 0.9)
pt3dadd(-358, -90.5, -199.5, 0.9)
pt3dadd(-360.5, -89.5, -199.5, 0.9)
pt3dadd(-362.5, -88, -199.5, 0.9)
pt3dadd(-362.5, -86.5, -199.5, 0.9)
pt3dadd(-362.5, -84, -199.5, 0.7)
pt3dadd(-360.5, -82, -199.5, 0.7)
pt3dadd(-360.5, -80, -199.5, 0.7)
pt3dadd(-360.5, -78, -199.5, 0.9)
pt3dadd(-361, -76, -203.5, 0.9)
pt3dadd(-363, -74.5, -203.5, 0.9)
pt3dadd(-364.5, -72.5, -195, 0.9)
pt3dadd(-364.5, -71, -195, 0.9)
pt3dadd(-363.5, -70.5, -191, 0.7)
pt3dadd(-361, -70.5, -191, 0.7)
pt3dadd(-359, -68.5, -199.5, 0.7)
pt3dadd(-357.5, -68, -199.5, 0.7)
pt3dadd(-354.5, -68, -199.5, 0.7)
pt3dadd(-353, -68, -199.5, 0.7)
pt3dadd(-350.5, -68, -199.5, 0.7)
pt3dadd(-351.5, -65.5, -199.5, 0.7)
pt3dadd(-349.5, -64.5, -199.5, 0.7)
pt3dadd(-347.5, -64.5, -199.5, 0.7)
pt3dadd(-346, -64, -199.5, 0.7)
pt3dadd(-345, -63, -199.5, 0.7)
pt3dadd(-343, -62.5, -199.5, 0.7)
pt3dadd(-343, -60.5, -199.5, 0.7)
pt3dadd(-343, -59, -199.5, 0.7)
pt3dadd(-345.5, -57.5, -191, 0.5)
pt3dadd(-349, -57, -195, 0.5)
pt3dadd(-352, -56.5, -191, 0.5)
pt3dadd(-352.5, -54, -191, 0.5)
pt3dadd(-354.5, -53, -191, 0.5)
pt3dadd(-358, -53, -191, 0.5)
pt3dadd(-359, -53, -182.5, 0.5)
pt3dadd(-359.5, -54.5, -178.5, 0.5)
pt3dadd(-360, -55.5, -187, 0.5)
pt3dadd(-362.5, -56, -187, 0.5)
pt3dadd(-366, -56, -182.5, 0.5)
pt3dadd(-369, -56.5, -178.5, 0.6)
pt3dadd(-371.5, -56.5, -178.5, 0.7)
pt3dadd(-374.5, -58, -182.5, 0.7)
}
dend[146] {pt3dclear()
pt3dadd(-18.5, -27, -48, 6.8)
pt3dadd(-18.5, -23.5, -40, 4.4)
pt3dadd(-15.5, -19, -55.5, 4.4)
pt3dadd(-15, -16.5, -48, 4.7)
pt3dadd(-12, -14, -55.5, 5)
pt3dadd(-9.5, -12, -55.5, 5)
pt3dadd(-9, -9, -67, 5)
pt3dadd(-13, -11.5, -67, 4.9)
pt3dadd(-11, -13.5, -78.5, 4.6)
pt3dadd(-7.5, -14.5, -86.5, 4.9)
pt3dadd(-4.5, -15, -94, 4.4)
pt3dadd(-3, -18.5, -98, 5)
pt3dadd(-1, -16, -98, 5)
pt3dadd(0, -18, -101.5, 4.4)
pt3dadd(2.5, -18, -113, 4.6)
pt3dadd(5.5, -18.5, -117, 4.7)
pt3dadd(6.5, -17, -113, 4.7)
pt3dadd(4.5, -17.5, -136.5, 4.7)
pt3dadd(4, -22.5, -128.5, 4.7)
pt3dadd(7, -23, -132.5, 2.9)
pt3dadd(8, -23, -132.5, 3.2)
pt3dadd(10.5, -23.5, -132.5, 3.2)
pt3dadd(12, -25.5, -132.5, 3.2)
pt3dadd(12.5, -26.5, -136.5, 3.2)
pt3dadd(11, -29, -141, 3.2)
pt3dadd(9, -27, -136.5, 3.2)
pt3dadd(7, -25, -141, 3.2)
pt3dadd(7.5, -24.5, -141, 3.2)
pt3dadd(11, -23.5, -141, 3.2)
pt3dadd(14, -21.5, -132.5, 3.2)
pt3dadd(9, -21.5, -153.5, 3.2)
pt3dadd(7.5, -26, -157.5, 3.2)
pt3dadd(6.5, -28.5, -157.5, 3.2)
pt3dadd(4.5, -28.5, -153.5, 3.2)
pt3dadd(7, -32.5, -158.5, 3.3)
pt3dadd(4, -32.5, -164, 3.3)
pt3dadd(1.5, -30.5, -164, 3.3)
pt3dadd(2, -33.5, -164, 3.6)
pt3dadd(3.5, -37.5, -169, 4.3)
pt3dadd(1, -35.5, -169, 4.3)
pt3dadd(-0.5, -34.5, -169, 3.3)
pt3dadd(-3, -34.5, -174.5, 3.8)
pt3dadd(-3, -33, -177, 3.8)
pt3dadd(-2, -31.5, -177, 3.5)
pt3dadd(-2, -29, -174.5, 3.8)
pt3dadd(-2.5, -28, -179.5, 3.4)
pt3dadd(-4, -27, -179.5, 3.6)
pt3dadd(-6.5, -25, -185, 3.6)
pt3dadd(-8, -22.5, -176.5, 4.3)
pt3dadd(-8, -21, -172.5, 4.3)
pt3dadd(-8, -19, -180.5, 4.3)
pt3dadd(-9, -21.5, -193, 4.3)
pt3dadd(-11.5, -23.5, -189, 3.6)
pt3dadd(-15, -24.5, -189, 3.6)
pt3dadd(-13, -22.5, -189, 5.5)
}
dend[147] {pt3dclear()
pt3dadd(-13, -22.5, -189, 5.5)
pt3dadd(-15, -20, -189, 2.3)
pt3dadd(-15, -18.5, -201.5, 2.4)
pt3dadd(-16, -15.5, -197.5, 2.3)
pt3dadd(-14.5, -15.5, -201.5, 1.9)
pt3dadd(-13, -15, -201.5, 2)
pt3dadd(-14, -13, -205.5, 2.3)
pt3dadd(-14, -10, -205.5, 2.3)
pt3dadd(-13.5, -8.5, -205.5, 2.7)
pt3dadd(-12, -6.5, -210, 2.7)
pt3dadd(-12.5, -3.5, -218.5, 2.8)
pt3dadd(-13, -1, -222.5, 2.5)
pt3dadd(-11.5, 0, -218.5, 2.3)
pt3dadd(-9, 1, -222.5, 2.5)
pt3dadd(-9, 2.5, -222.5, 2.7)
pt3dadd(-9, 5, -226.5, 2.7)
pt3dadd(-7, 5.5, -226.5, 2)
pt3dadd(-5.5, 7, -226.5, 2)
pt3dadd(-6.5, 8.5, -222.5, 1.7)
pt3dadd(-7, 10, -222.5, 1.6)
pt3dadd(-8.5, 11, -231, 1.6)
pt3dadd(-9.5, 11, -226.5, 1.8)
pt3dadd(-8.5, 13, -231, 1.6)
pt3dadd(-8.5, 15, -235, 1.6)
pt3dadd(-8.5, 17, -235, 1.8)
pt3dadd(-11, 18, -235, 1.6)
pt3dadd(-12, 20, -235, 1.7)
pt3dadd(-12.5, 21.5, -247.5, 1.7)
pt3dadd(-9.5, 23, -247.5, 2.1)
pt3dadd(-10.5, 24.5, -256, 2.1)
pt3dadd(-12.5, 24.5, -256, 1.6)
pt3dadd(-14, 24.5, -256, 1.4)
pt3dadd(-11.5, 26, -247, 2)
pt3dadd(-9, 26.5, -256, 1.7)
pt3dadd(-9.5, 26, -260.5, 1.7)
pt3dadd(-9.5, 30.5, -265, 1.6)
pt3dadd(-8.5, 31.5, -265, 1.6)
pt3dadd(-7.5, 32.5, -265, 1.7)
pt3dadd(-6.5, 32.5, -265, 1.8)
pt3dadd(-6.5, 34.5, -265, 1.4)
pt3dadd(-6.5, 36.5, -265, 1.2)
pt3dadd(-4.5, 40, -265, 1.3)
pt3dadd(-4, 42, -265, 1.4)
pt3dadd(-3.5, 42.5, -265, 1)
pt3dadd(-3, 43, -269.5, 1.1)
pt3dadd(-3, 44, -265, 1.3)
pt3dadd(-1.5, 44.5, -278.5, 1.3)
pt3dadd(-0.5, 45, -278.5, 1.4)
pt3dadd(0.5, 46.5, -274, 1.5)
pt3dadd(0.5, 48, -274, 1.2)
pt3dadd(0.5, 49, -274, 1.1)
pt3dadd(1, 51.5, -278.5, 1.1)
pt3dadd(1.5, 53, -274, 1)
pt3dadd(2, 54.5, -283, 0.8)
pt3dadd(3.5, 55, -283, 0.9)
pt3dadd(5, 55.5, -278.5, 1)
}
}
proc shape3d_47() {
dend[147] { pt3dadd(5.5, 55.5, -287.5, 1)
pt3dadd(6, 57, -287.5, 1)
pt3dadd(7, 58.5, -287.5, 1)
pt3dadd(8, 59.5, -287.5, 1)
pt3dadd(9, 60, -287.5, 1.1)
pt3dadd(10.5, 61, -297, 1.1)
pt3dadd(12, 62.5, -297, 2.1)
pt3dadd(13.5, 64.5, -297, 1.6)
pt3dadd(12, 65.5, -297, 1.6)
pt3dadd(12, 68, -297, 1.8)
pt3dadd(13, 69.5, -300.5, 1.6)
pt3dadd(12.5, 70.5, -300.5, 1.6)
pt3dadd(13.5, 71, -304, 1.7)
pt3dadd(15, 71, -304, 1.7)
pt3dadd(16.5, 71, -304, 1.7)
pt3dadd(17, 69, -304, 1.9)
pt3dadd(18, 69, -304, 1.9)
pt3dadd(18, 71.5, -307.5, 1.6)
pt3dadd(21.5, 73, -307.5, 1.5)
pt3dadd(23, 72.5, -307.5, 1.1)
pt3dadd(24.5, 72.5, -311.5, 1.1)
pt3dadd(26.5, 73, -311.5, 1.1)
pt3dadd(26.5, 74, -315, 1.1)
pt3dadd(25.5, 75.5, -318.5, 1.4)
pt3dadd(28.5, 78, -318.5, 2)
pt3dadd(30.5, 78.5, -318.5, 2)
pt3dadd(31.5, 79, -325.5, 2)
pt3dadd(35, 81, -329, 1.8)
pt3dadd(37, 83, -322, 1.9)
pt3dadd(38, 84.5, -325.5, 1.9)
pt3dadd(39.5, 86.5, -325.5, 1.9)
pt3dadd(39.5, 88, -325.5, 1.9)
pt3dadd(43, 90.5, -325.5, 1.6)
pt3dadd(43.5, 91, -325.5, 1.1)
pt3dadd(43.5, 92.5, -325.5, 1.4)
pt3dadd(43.5, 94, -329, 1.6)
pt3dadd(43.5, 96, -325.5, 1.6)
pt3dadd(44.5, 96.5, -325.5, 1.6)
pt3dadd(45.5, 97.5, -325.5, 1.4)
pt3dadd(47.5, 98.5, -325.5, 1.3)
pt3dadd(48.5, 100, -325.5, 1.6)
pt3dadd(50, 101.5, -325.5, 1.7)
pt3dadd(52, 105.5, -329, 2.1)
pt3dadd(53, 108, -325.5, 1.7)
pt3dadd(54, 109.5, -322, 1.7)
pt3dadd(56, 111.5, -322, 1.8)
pt3dadd(57.5, 112.5, -322, 1.7)
pt3dadd(58.5, 115, -322, 1.6)
pt3dadd(59.5, 117.5, -315, 1.6)
pt3dadd(61, 119.5, -315, 1.6)
pt3dadd(62, 121.5, -315, 1.4)
pt3dadd(64, 125, -318.5, 1.9)
pt3dadd(65, 128, -315, 1.4)
pt3dadd(66, 128, -322, 1.3)
pt3dadd(66.5, 130, -322, 1.6)
pt3dadd(66.5, 132, -322, 1.7)
pt3dadd(67.5, 133, -325.5, 1.6)
pt3dadd(70, 137, -322, 1.6)
pt3dadd(72, 138.5, -322, 1.6)
pt3dadd(72, 140, -322, 1.6)
pt3dadd(71.5, 141, -322, 1.6)
pt3dadd(72.5, 142, -322, 1.4)
pt3dadd(73.5, 142.5, -322, 1.4)
pt3dadd(75, 144, -322, 1.4)
pt3dadd(75, 145.5, -325.5, 1.4)
pt3dadd(75.5, 147, -311.5, 1.6)
pt3dadd(75.5, 150, -311.5, 1.6)
pt3dadd(76.5, 152, -311.5, 2)
pt3dadd(77.5, 154, -311.5, 2.2)
pt3dadd(78.5, 155.5, -311.5, 1.7)
pt3dadd(79, 157, -311.5, 1.9)
pt3dadd(78.5, 160.5, -318.5, 1.2)
pt3dadd(80.5, 161.5, -318.5, 1.3)
pt3dadd(81, 162, -318.5, 1.4)
pt3dadd(79.5, 165, -318.5, 1.5)
pt3dadd(79.5, 167, -325.5, 1.9)
pt3dadd(81, 168.5, -325.5, 1.9)
pt3dadd(82, 169.5, -325.5, 1.9)
pt3dadd(83.5, 171.5, -322, 1.5)
pt3dadd(85.5, 172.5, -322, 1.3)
pt3dadd(90, 179, -336.5, 1.7)
}
dend[148] {pt3dclear()
pt3dadd(-13, -22.5, -189, 5.5)
pt3dadd(-10.5, -24, -201.5, 2.9)
pt3dadd(-8.5, -29, -205.5, 3.2)
pt3dadd(-7.5, -29.5, -205.5, 2.5)
pt3dadd(-5, -31.5, -218, 2.8)
pt3dadd(-3.5, -33.5, -222.5, 2.9)
pt3dadd(-2.5, -35.5, -218, 2.9)
pt3dadd(-1, -35, -218, 2.8)
pt3dadd(0.5, -34.5, -222.5, 3.1)
pt3dadd(1, -34.5, -222.5, 3.1)
pt3dadd(1.5, -34.5, -230.5, 2.1)
pt3dadd(3.5, -35, -230.5, 1.9)
pt3dadd(4, -33, -230.5, 1.9)
pt3dadd(5.5, -33, -230.5, 2.1)
pt3dadd(6.5, -34, -230.5, 2.5)
pt3dadd(6, -36, -226.5, 2.2)
pt3dadd(6.5, -37.5, -235, 2)
pt3dadd(6, -38.5, -235, 2)
pt3dadd(6, -40, -235, 2.2)
pt3dadd(6, -41.5, -235, 2.4)
pt3dadd(5, -41, -247.5, 3.2)
pt3dadd(7, -40, -251.5, 3.6)
pt3dadd(8.5, -38.5, -255.5, 3.8)
pt3dadd(10.5, -38, -251.5, 2.8)
pt3dadd(11, -38.5, -247.5, 2.6)
pt3dadd(12, -40, -255.5, 2.1)
pt3dadd(14, -40, -247.5, 1.7)
pt3dadd(16, -40, -247.5, 1.5)
pt3dadd(17, -41, -251.5, 1.4)
pt3dadd(19, -41, -251.5, 1.4)
pt3dadd(20, -41, -260, 1.4)
pt3dadd(21.5, -41.5, -260, 1.6)
pt3dadd(24, -42, -255.5, 1.6)
pt3dadd(27, -43, -255.5, 1.4)
pt3dadd(28.5, -43, -260, 1.2)
pt3dadd(32.5, -47, -260, 1.1)
pt3dadd(33.5, -47.5, -264.5, 1.2)
pt3dadd(39, -49.5, -269, 1.1)
pt3dadd(40.5, -49.5, -273.5, 1.1)
pt3dadd(41.5, -48.5, -264.5, 1.1)
pt3dadd(44.5, -48.5, -264.5, 1)
pt3dadd(45.5, -48.5, -264.5, 0.8)
pt3dadd(47, -48.5, -264.5, 0.8)
pt3dadd(50, -50, -273.5, 0.8)
pt3dadd(51.5, -51, -273.5, 0.8)
pt3dadd(54.5, -51.5, -278, 0.8)
pt3dadd(57, -51.5, -273.5, 1)
pt3dadd(59, -51.5, -278, 0.9)
pt3dadd(60.5, -52.5, -282.5, 0.9)
pt3dadd(65, -53, -291.5, 0.7)
pt3dadd(66.5, -53.5, -291.5, 0.9)
pt3dadd(68.5, -55, -291.5, 1.1)
pt3dadd(70.5, -55.5, -291.5, 1.1)
pt3dadd(72.5, -56, -291.5, 1.1)
pt3dadd(75, -56, -296, 1.1)
pt3dadd(76.5, -54.5, -291.5, 1.2)
pt3dadd(79.5, -54.5, -288, 0.9)
pt3dadd(82, -54.5, -291.5, 0.9)
pt3dadd(85, -54.5, -291.5, 1.1)
pt3dadd(88.5, -54.5, -295, 0.9)
pt3dadd(90, -54.5, -295, 0.9)
pt3dadd(91, -53.5, -288, 1.1)
pt3dadd(92, -55, -295, 1.1)
pt3dadd(94, -55, -295, 1.3)
pt3dadd(95.5, -55.5, -295, 0.9)
pt3dadd(100, -56, -295, 0.9)
pt3dadd(100.5, -56.5, -295, 0.7)
pt3dadd(101.5, -58.5, -295, 0.8)
pt3dadd(103.5, -58.5, -295, 0.8)
pt3dadd(104.5, -59, -295, 0.8)
pt3dadd(105.5, -59.5, -302, 0.6)
pt3dadd(106.5, -61, -305.5, 0.6)
pt3dadd(108.5, -61, -302, 0.6)
pt3dadd(110, -60.5, -298.5, 0.6)
pt3dadd(112, -58, -298.5, 0.6)
pt3dadd(113.5, -59, -305.5, 0.5)
pt3dadd(113.5, -59.5, -305.5, 0.7)
pt3dadd(114, -61.5, -305.5, 0.7)
pt3dadd(115, -64.5, -302, 0.6)
pt3dadd(116.5, -66.5, -302, 0.6)
pt3dadd(118.5, -68, -302, 0.6)
pt3dadd(120, -69.5, -302, 0.4)
pt3dadd(122.5, -71.5, -305.5, 0.4)
pt3dadd(125, -71.5, -305.5, 0.4)
pt3dadd(127.5, -72, -309.5, 0.5)
pt3dadd(129.5, -74.5, -309.5, 0.5)
pt3dadd(130.5, -76.5, -309.5, 0.5)
pt3dadd(131.5, -77, -313, 0.5)
pt3dadd(133, -79, -313, 0.6)
pt3dadd(135, -79, -313, 0.9)
pt3dadd(137, -79, -313, 0.9)
pt3dadd(139.5, -79, -313, 0.8)
pt3dadd(141.5, -81, -313, 0.8)
pt3dadd(144, -82.5, -313, 0.8)
pt3dadd(146, -83.5, -313, 0.8)
pt3dadd(148, -83.5, -320, 0.8)
pt3dadd(149.5, -85, -320, 0.7)
pt3dadd(152, -87, -320, 0.7)
pt3dadd(152.5, -88.5, -320, 0.7)
pt3dadd(154.5, -90.5, -320, 0.6)
}
}
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()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
shape3d_36()
shape3d_37()
shape3d_38()
shape3d_39()
shape3d_40()
shape3d_41()
shape3d_42()
shape3d_43()
shape3d_44()
shape3d_45()
shape3d_46()
shape3d_47()
}
access soma
celldef()