proc celldef() {
topol()
}
create soma[2], dend[249]
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)
for i = 4, 6 connect dend[i](0), dend[i-1](1)
connect dend[7](0), dend[5](1)
connect dend[8](0), dend[4](1)
for i = 9, 10 connect dend[i](0), dend[8](1)
connect dend[11](0), dend[3](1)
for i = 12, 13 connect dend[i](0), dend[11](1)
for i = 14, 15 connect dend[i](0), dend[i-1](1)
connect dend[16](0), dend[14](1)
for i = 17, 18 connect dend[i](0), dend[16](1)
for i = 19, 21 connect dend[i](0), dend[i-1](1)
connect dend[22](0), dend[20](1)
connect dend[23](0), dend[19](1)
connect dend[24](0), dend[18](1)
connect dend[25](0), dend[13](1)
for i = 26, 27 connect dend[i](0), dend[i-1](1)
connect dend[28](0), dend[26](1)
connect dend[29](0), dend[25](1)
for i = 30, 31 connect dend[i](0), dend[29](1)
connect dend[32](0), dend(1)
for i = 33, 34 connect dend[i](0), dend[32](1)
for i = 35, 36 connect dend[i](0), dend[i-1](1)
connect dend[37](0), dend[35](1)
for i = 38, 39 connect dend[i](0), dend[37](1)
for i = 40, 41 connect dend[i](0), dend[39](1)
for i = 42, 43 connect dend[i](0), dend[41](1)
connect dend[44](0), dend[34](1)
for i = 45, 46 connect dend[i](0), dend[44](1)
connect dend[47](0), soma(0)
for i = 48, 49 connect dend[i](0), dend[47](1)
connect dend[50](0), soma(0)
for i = 51, 52 connect dend[i](0), dend[i-1](1)
connect dend[53](0), dend[51](1)
for i = 54, 55 connect dend[i](0), dend[i-1](1)
connect dend[56](0), dend[54](1)
connect dend[57](0), dend[53](1)
for i = 58, 59 connect dend[i](0), dend[57](1)
connect dend[60](0), dend[50](1)
for i = 61, 62 connect dend[i](0), dend[i-1](1)
connect dend[63](0), dend[61](1)
connect dend[64](0), dend[60](1)
connect dend[65](0), soma(0)
for i = 66, 67 connect dend[i](0), dend[i-1](1)
connect dend[68](0), dend[66](1)
connect dend[69](0), dend[65](1)
for i = 70, 71 connect dend[i](0), dend[i-1](1)
connect dend[72](0), dend[70](1)
connect dend[73](0), dend[69](1)
for i = 74, 75 connect dend[i](0), dend[73](1)
for i = 76, 77 connect dend[i](0), dend[75](1)
for i = 78, 79 connect dend[i](0), dend[77](1)
for i = 80, 81 connect dend[i](0), dend[79](1)
connect dend[82](0), soma(0)
for i = 83, 84 connect dend[i](0), dend[82](1)
for i = 85, 86 connect dend[i](0), dend[i-1](1)
connect dend[87](0), dend[85](1)
connect dend[88](0), dend[84](1)
for i = 89, 90 connect dend[i](0), dend[88](1)
for i = 91, 92 connect dend[i](0), dend[90](1)
connect dend[93](0), soma(0)
for i = 94, 96 connect dend[i](0), dend[i-1](1)
connect dend[97](0), dend[95](1)
connect dend[98](0), dend[94](1)
for i = 99, 101 connect dend[i](0), dend[i-1](1)
connect dend[102](0), dend[100](1)
for i = 103, 104 connect dend[i](0), dend[102](1)
connect dend[105](0), dend[99](1)
connect dend[106](0), dend[98](1)
connect dend[107](0), dend[93](1)
for i = 108, 109 connect dend[i](0), dend[i-1](1)
connect dend[110](0), dend[108](1)
connect dend[111](0), dend[107](1)
for i = 112, 113 connect dend[i](0), dend[111](1)
for i = 114, 115 connect dend[i](0), dend[i-1](1)
connect dend[116](0), dend[114](1)
connect dend[117](0), dend[113](1)
for i = 118, 119 connect dend[i](0), dend[117](1)
for i = 120, 121 connect dend[i](0), dend[119](1)
for i = 122, 123 connect dend[i](0), dend[121](1)
connect dend[124](0), soma(0)
for i = 125, 126 connect dend[i](0), dend[i-1](1)
connect dend[127](0), dend[125](1)
for i = 128, 129 connect dend[i](0), dend[127](1)
for i = 130, 131 connect dend[i](0), dend[129](1)
connect dend[132](0), dend[124](1)
for i = 133, 135 connect dend[i](0), dend[i-1](1)
connect dend[136](0), dend[134](1)
connect dend[137](0), dend[133](1)
for i = 138, 139 connect dend[i](0), dend[137](1)
for i = 140, 141 connect dend[i](0), dend[i-1](1)
connect dend[142](0), dend[140](1)
connect dend[143](0), dend[139](1)
for i = 144, 145 connect dend[i](0), dend[143](1)
connect dend[146](0), dend[132](1)
for i = 147, 149 connect dend[i](0), dend[i-1](1)
connect dend[150](0), dend[148](1)
connect dend[151](0), dend[147](1)
for i = 152, 153 connect dend[i](0), dend[151](1)
connect dend[154](0), dend[146](1)
for i = 155, 157 connect dend[i](0), dend[i-1](1)
connect dend[158](0), dend[156](1)
connect dend[159](0), dend[155](1)
connect dend[160](0), dend[154](1)
for i = 161, 162 connect dend[i](0), dend[160](1)
for i = 163, 164 connect dend[i](0), dend[162](1)
for i = 165, 166 connect dend[i](0), dend[i-1](1)
connect dend[167](0), dend[165](1)
connect dend[168](0), dend[164](1)
for i = 169, 170 connect dend[i](0), dend[168](1)
for i = 171, 172 connect dend[i](0), dend[170](1)
for i = 173, 174 connect dend[i](0), dend[172](1)
connect dend[175](0), soma(0)
for i = 176, 177 connect dend[i](0), dend[i-1](1)
connect dend[178](0), dend[176](1)
for i = 179, 180 connect dend[i](0), dend[178](1)
for i = 181, 182 connect dend[i](0), dend[180](1)
connect dend[183](0), dend[175](1)
for i = 184, 185 connect dend[i](0), dend[i-1](1)
connect dend[186](0), dend[184](1)
for i = 187, 188 connect dend[i](0), dend[186](1)
for i = 189, 190 connect dend[i](0), dend[i-1](1)
connect dend[191](0), dend[189](1)
connect dend[192](0), dend[188](1)
connect dend[193](0), dend[183](1)
for i = 194, 195 connect dend[i](0), dend[193](1)
for i = 196, 197 connect dend[i](0), dend[195](1)
for i = 198, 199 connect dend[i](0), dend[i-1](1)
connect dend[200](0), dend[198](1)
connect dend[201](0), dend[197](1)
for i = 202, 203 connect dend[i](0), dend[201](1)
connect dend[204](0), soma(0)
for i = 205, 207 connect dend[i](0), dend[i-1](1)
connect dend[208](0), dend[206](1)
connect dend[209](0), dend[205](1)
for i = 210, 211 connect dend[i](0), dend[i-1](1)
connect dend[212](0), dend[210](1)
connect dend[213](0), dend[209](1)
for i = 214, 215 connect dend[i](0), dend[213](1)
for i = 216, 217 connect dend[i](0), dend[215](1)
connect dend[218](0), dend[204](1)
for i = 219, 220 connect dend[i](0), dend[i-1](1)
connect dend[221](0), dend[219](1)
connect dend[222](0), dend[218](1)
for i = 223, 224 connect dend[i](0), dend[222](1)
for i = 225, 226 connect dend[i](0), dend[i-1](1)
connect dend[227](0), dend[225](1)
for i = 228, 229 connect dend[i](0), dend[227](1)
for i = 230, 231 connect dend[i](0), dend[229](1)
connect dend[232](0), dend[224](1)
connect dend[233](0), soma(0)
for i = 234, 237 connect dend[i](0), dend[i-1](1)
connect dend[238](0), dend[236](1)
connect dend[239](0), dend[235](1)
for i = 240, 241 connect dend[i](0), dend[239](1)
for i = 242, 243 connect dend[i](0), dend[241](1)
connect dend[244](0), dend[234](1)
connect dend[245](0), dend[233](1)
for i = 246, 247 connect dend[i](0), dend[245](1)
connect dend[248](0), soma(0)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 60.812)
pt3dadd(39.34, 60.38, -13.49, 60.812)
}
soma[1] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 60.812)
pt3dadd(39.34, -0.42, -13.49, 60.812)
}
dend {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 10.6)
pt3dadd(3, 21.5, -5, 10.6)
pt3dadd(0.5, 21, -5.5, 10.2)
pt3dadd(-3.5, 18, -4, 9.9)
pt3dadd(-6, 18.5, -1, 9.3)
}
dend[1] {pt3dclear()
pt3dadd(-6, 18.5, -1, 9.3)
pt3dadd(-11, 20, -3.5, 9)
pt3dadd(-17, 23, -3.5, 9.5)
pt3dadd(-20, 25.5, -3.5, 9.9)
pt3dadd(-24, 28, -3.5, 9.2)
pt3dadd(-28.5, 30.5, -1, 8.6)
pt3dadd(-34, 32, 4.5, 8.6)
pt3dadd(-38.5, 33, 10, 8.6)
pt3dadd(-42, 34, 10, 7.8)
pt3dadd(-46.5, 34.5, 10, 7.3)
pt3dadd(-50.5, 36.5, 10, 7.6)
pt3dadd(-55, 37.5, 16, 7.6)
pt3dadd(-61, 40, 18.5, 7.1)
pt3dadd(-64.5, 40.5, 21.5, 7.3)
pt3dadd(-69, 41.5, 21.5, 8)
pt3dadd(-72.5, 43, 21.5, 9.3)
pt3dadd(-77.5, 44, 21.5, 11.4)
pt3dadd(-83.5, 46.5, 21.5, 12.5)
pt3dadd(-86.5, 46.5, 24, 13)
pt3dadd(-90.5, 48.5, 27, 10.2)
pt3dadd(-92, 49.5, 27, 8.4)
pt3dadd(-93, 50, 27, 8.9)
}
dend[2] {pt3dclear()
pt3dadd(-93, 50, 27, 8.9)
pt3dadd(-103.5, 51, 18.5, 1.8)
pt3dadd(-106.5, 51, 21.5, 1.8)
pt3dadd(-111, 49.5, 24, 1.9)
pt3dadd(-115.5, 48.5, 18.5, 2.3)
pt3dadd(-118, 48.5, 21.5, 2.3)
pt3dadd(-120, 48, 18.5, 2.6)
pt3dadd(-124, 48, 21.5, 2.1)
pt3dadd(-126.5, 48.5, 13, 1.4)
pt3dadd(-128.5, 48.5, 18.5, 1.4)
pt3dadd(-130.5, 49.5, 21.5, 1.4)
pt3dadd(-133, 49.5, 21.5, 1.1)
pt3dadd(-135.5, 49.5, 21.5, 0.9)
pt3dadd(-138.5, 49.5, 16, 0.9)
pt3dadd(-141, 49.5, 16, 0.7)
pt3dadd(-143.5, 49.5, 21.5, 0.3)
pt3dadd(-146.5, 49.5, 21.5, 0.3)
pt3dadd(-148, 49, 13, 1.4)
pt3dadd(-150, 48, 13, 1.8)
pt3dadd(-152, 48, 16, 1.3)
pt3dadd(-154, 47.5, 7.5, 0.9)
pt3dadd(-156, 45.5, 10, 1.2)
pt3dadd(-158, 45.5, 10, 1.7)
pt3dadd(-160, 44, 10, 1.3)
pt3dadd(-161, 44, 10, 0.4)
pt3dadd(-163, 43, 10, 0.5)
pt3dadd(-165, 43, 13, 1.6)
pt3dadd(-167, 42, 13, 3)
pt3dadd(-169.5, 41.5, 2, 2.1)
pt3dadd(-171.5, 41, 4.5, 0.6)
pt3dadd(-174, 40, 4.5, 0.8)
pt3dadd(-177.5, 38.5, 7.5, 0.9)
pt3dadd(-180, 38.5, 7.5, 0.9)
pt3dadd(-180, 36.5, 7.5, 0.9)
pt3dadd(-181.5, 35, 4.5, 0.9)
pt3dadd(-182.5, 32.5, 10, 0.9)
pt3dadd(-183.5, 30.5, 2, 1.5)
pt3dadd(-186, 30, 4.5, 1.5)
pt3dadd(-190.5, 29.5, 5.5, 0.8)
pt3dadd(-193, 29.5, 5.5, 0.8)
pt3dadd(-194.5, 29, 5.5, 0.8)
pt3dadd(-195.5, 27, 7.5, 1.4)
pt3dadd(-197.5, 25.5, 6.5, 1.9)
pt3dadd(-200.5, 25.5, 6.5, 1.5)
pt3dadd(-202.5, 25.5, 6.5, 0.3)
pt3dadd(-204.5, 24, 6.5, 0.3)
pt3dadd(-204.5, 22.5, 6.5, 1.1)
pt3dadd(-206, 22, 0, 1.2)
pt3dadd(-207.5, 22, 2, 0.5)
pt3dadd(-209.5, 22, 3, 0.3)
pt3dadd(-211, 21.5, 2, 0.3)
pt3dadd(-213, 20, 4.5, 1.2)
pt3dadd(-214.5, 18, 3.5, 0.2)
pt3dadd(-215.5, 17.5, 3, 1.5)
pt3dadd(-216, 16.5, 3, 2.3)
pt3dadd(-216.5, 15.5, 3, 2.4)
pt3dadd(-218, 15, 3, 1.9)
pt3dadd(-219, 14.5, 3, 0.8)
pt3dadd(-219, 13.5, 1, 0.2)
pt3dadd(-221.5, 13, 1, 0.2)
pt3dadd(-223, 13, 3, 1.7)
pt3dadd(-224.5, 12.5, 3, 2.3)
pt3dadd(-226.5, 12, 3, 0.9)
pt3dadd(-227, 11, 3, 0.3)
pt3dadd(-229, 10, 3, 0.3)
pt3dadd(-230.5, 10, 3, 1.4)
pt3dadd(-232.5, 10, 3, 2.4)
pt3dadd(-234.5, 9.5, 3, 2)
pt3dadd(-236.5, 9, 3, 0.3)
pt3dadd(-237.5, 8, -1, 0.5)
pt3dadd(-238.5, 6, -1, 0.7)
pt3dadd(-241, 6, 0, 0.7)
pt3dadd(-245.5, 4.5, 0, 1.1)
pt3dadd(-247.5, 2.5, 0, 1.1)
pt3dadd(-250, 2.5, 1, 1.8)
pt3dadd(-251.5, 1.5, 1, 3.1)
pt3dadd(-253.5, -1, -1.5, 1.6)
pt3dadd(-253.5, -2, -1.5, 0.6)
pt3dadd(-253.5, -4, -2.5, 0.6)
pt3dadd(-254.5, -4.5, -1.5, 1.6)
pt3dadd(-256, -7.5, -1.5, 2.8)
pt3dadd(-258, -9.5, -1.5, 0.9)
pt3dadd(-259.5, -13, -1.5, 0.3)
pt3dadd(-261, -13, -1.5, 0.7)
pt3dadd(-263, -13, -1.5, 1.7)
pt3dadd(-265, -14, -1.5, 2)
pt3dadd(-266.5, -14, -1.5, 0.9)
pt3dadd(-269, -16.5, -1.5, 2.8)
pt3dadd(-270, -18, -1.5, 0.3)
pt3dadd(-272, -20.5, -1.5, 0.5)
pt3dadd(-273.5, -20, -1.5, 0.7)
pt3dadd(-276.5, -19.5, -1, 0.7)
pt3dadd(-280.5, -19, -7, 0.8)
}
dend[3] {pt3dclear()
pt3dadd(-93, 50, 27, 8.9)
pt3dadd(-98, 54, 24, 8.9)
pt3dadd(-104.5, 57.5, 24, 7.9)
pt3dadd(-110.5, 60.5, 27, 7.9)
pt3dadd(-115.5, 62.5, 28.5, 8.3)
pt3dadd(-121, 64.5, 28.5, 8.5)
pt3dadd(-124, 66.5, 28.5, 8.5)
pt3dadd(-128.5, 69, 31.5, 8.2)
pt3dadd(-132, 70.5, 30, 8.2)
pt3dadd(-135.5, 71.5, 32.5, 8.2)
pt3dadd(-140, 73.5, 34, 9)
pt3dadd(-147, 77, 34, 9.9)
}
dend[4] {pt3dclear()
pt3dadd(-147, 77, 34, 9.9)
pt3dadd(-153, 80, 31.5, 3.1)
pt3dadd(-156.5, 82.5, 31.5, 3.4)
pt3dadd(-158.5, 86.5, 32.5, 4.1)
pt3dadd(-159.5, 90, 34, 4.7)
pt3dadd(-161.5, 92, 34, 4.9)
pt3dadd(-164, 95.5, 37, 4.3)
pt3dadd(-166, 97.5, 37, 4.4)
pt3dadd(-168.5, 101.5, 37, 5.3)
pt3dadd(-171, 104, 38.5, 5.6)
pt3dadd(-173.5, 108, 45.5, 4)
pt3dadd(-176, 109.5, 47, 5.4)
pt3dadd(-179, 113, 38.5, 5.7)
pt3dadd(-181.5, 117, 40, 5.7)
pt3dadd(-183, 119, 40, 4.9)
pt3dadd(-185.5, 120.5, 41.5, 4.2)
pt3dadd(-187, 123, 41.5, 3.3)
pt3dadd(-189.5, 125, 42.5, 2.8)
pt3dadd(-191.5, 126.5, 42.5, 2.8)
pt3dadd(-192, 129.5, 42.5, 3.1)
pt3dadd(-194.5, 130, 42.5, 2.7)
pt3dadd(-197.5, 131, 42.5, 3.1)
pt3dadd(-201.5, 132.5, 42.5, 2.4)
pt3dadd(-204.5, 134.5, 42.5, 2.6)
pt3dadd(-204.5, 137.5, 42.5, 4.3)
pt3dadd(-208, 139.5, 44, 5)
pt3dadd(-209, 141.5, 44, 6)
pt3dadd(-212, 141.5, 44, 5.8)
pt3dadd(-214.5, 143.5, 44, 5.2)
pt3dadd(-215.5, 146, 44, 5.3)
pt3dadd(-219, 148.5, 44, 5.6)
pt3dadd(-222.5, 148.5, 45.5, 6.3)
pt3dadd(-226.5, 150.5, 48.5, 7.4)
}
dend[5] {pt3dclear()
pt3dadd(-226.5, 150.5, 48.5, 7.4)
pt3dadd(-230, 156, 50, 4.7)
pt3dadd(-233, 159, 51.5, 4.1)
pt3dadd(-236, 161.5, 51.5, 4.1)
pt3dadd(-240, 164.5, 51.5, 5.2)
pt3dadd(-244.5, 169, 51.5, 4.4)
pt3dadd(-245.5, 170, 51.5, 3.6)
pt3dadd(-247.5, 172.5, 51.5, 3.8)
pt3dadd(-249, 174, 51.5, 3.8)
pt3dadd(-254.5, 175.5, 52.5, 3.5)
pt3dadd(-256.5, 179, 54, 3.6)
pt3dadd(-259, 183, 55.5, 3.8)
pt3dadd(-263, 186, 55.5, 4.1)
pt3dadd(-263.5, 187.5, 55.5, 4.2)
pt3dadd(-266.5, 188.5, 55.5, 4.5)
pt3dadd(-266.5, 190, 55.5, 4.6)
pt3dadd(-269, 192.5, 55.5, 3.1)
pt3dadd(-269.5, 196, 55.5, 2.5)
pt3dadd(-272, 197.5, 55.5, 2.4)
pt3dadd(-273, 200.5, 55.5, 3.2)
pt3dadd(-274, 203.5, 55.5, 3.5)
pt3dadd(-275, 206, 55.5, 4.1)
pt3dadd(-276, 208.5, 55.5, 5.1)
pt3dadd(-277.5, 212, 55.5, 3.7)
pt3dadd(-277.5, 216.5, 55.5, 3.7)
pt3dadd(-278.5, 218, 55.5, 4.8)
}
dend[6] {pt3dclear()
pt3dadd(-278.5, 218, 55.5, 4.8)
pt3dadd(-281.5, 218, 55.5, 3.3)
pt3dadd(-284.5, 219, 60, 2.3)
pt3dadd(-286, 219.5, 60, 2.3)
pt3dadd(-288.5, 222, 60, 2.7)
}
}
proc shape3d_2() {
dend[6] { pt3dadd(-288.5, 224, 60, 3.7)
pt3dadd(-290.5, 228, 60, 4.1)
pt3dadd(-291, 230.5, 60, 4.1)
pt3dadd(-293, 231, 60, 2.2)
pt3dadd(-293.5, 233, 61.5, 1.2)
pt3dadd(-293.5, 235, 62.5, 2.8)
pt3dadd(-294.5, 240, 62.5, 2.7)
pt3dadd(-295.5, 242.5, 50, 4)
pt3dadd(-296.5, 245.5, 50, 4)
pt3dadd(-298, 246, 50, 3.1)
pt3dadd(-301, 249, 51.5, 2.1)
pt3dadd(-301, 251.5, 52.5, 2.4)
pt3dadd(-302, 254, 52.5, 2.9)
pt3dadd(-303, 256, 52.5, 2.9)
pt3dadd(-305, 257.5, 55.5, 2.7)
pt3dadd(-306.5, 258.5, 57, 2.6)
pt3dadd(-309.5, 260.5, 57, 2.6)
pt3dadd(-311.5, 260.5, 57, 2.4)
pt3dadd(-311.5, 262.5, 55.5, 2)
pt3dadd(-320.5, 264, 32.5, 2.7)
pt3dadd(-321.5, 266.5, 32.5, 2.7)
pt3dadd(-322.5, 270, 35.5, 2.6)
pt3dadd(-322, 272, 37, 1.9)
pt3dadd(-322, 274.5, 37, 1.9)
pt3dadd(-322, 276, 37, 1.8)
pt3dadd(-324, 277, 34, 1.6)
pt3dadd(-324.5, 278, 34, 2.8)
pt3dadd(-324.5, 280.5, 34, 3.3)
pt3dadd(-324.5, 282.5, 34, 3.6)
pt3dadd(-325.5, 287, 32.5, 3)
pt3dadd(-325.5, 288.5, 32.5, 2.6)
pt3dadd(-326, 291, 32.5, 3.1)
pt3dadd(-326, 293, 32.5, 2.8)
pt3dadd(-325, 295, 35.5, 2.1)
pt3dadd(-325, 296, 27, 2.1)
pt3dadd(-322, 298, 25.5, 2.1)
pt3dadd(-320.5, 300.5, 28.5, 2.1)
pt3dadd(-318.5, 303.5, 28.5, 2.4)
pt3dadd(-317.5, 306.5, 25.5, 2.4)
pt3dadd(-314.5, 309, 28.5, 2.6)
pt3dadd(-313, 312.5, 28.5, 2.5)
pt3dadd(-310.5, 315.5, 28.5, 2.4)
pt3dadd(-312, 319, 28.5, 2.4)
pt3dadd(-315.5, 321.5, 28.5, 2.4)
pt3dadd(-315.5, 324.5, 28.5, 2.4)
pt3dadd(-315, 330, 28.5, 2.4)
pt3dadd(-315, 331.5, 27, 2.4)
pt3dadd(-318, 331.5, 27, 2.4)
pt3dadd(-320.5, 335.5, 27, 2.4)
pt3dadd(-323.5, 338.5, 27, 2.4)
pt3dadd(-326.5, 340.5, 27, 2.4)
pt3dadd(-326.5, 344.5, 31.5, 1.4)
pt3dadd(-326.5, 351.5, 30, 1.4)
pt3dadd(-326.5, 355, 25.5, 2.2)
pt3dadd(-329.5, 359.5, 25.5, 3)
pt3dadd(-332, 364.5, 21.5, 3)
pt3dadd(-334.5, 368.5, 10, 2.7)
pt3dadd(-334, 370.5, 18.5, 3.3)
pt3dadd(-332, 372.5, -6.5, 3.3)
pt3dadd(-332, 377, -1, 4.6)
pt3dadd(-334, 381, 4.5, 4.1)
pt3dadd(-335, 382.5, 4.5, 2.8)
pt3dadd(-337, 385.5, 4.5, 2.5)
pt3dadd(-338.5, 388.5, 4.5, 2.7)
pt3dadd(-341.5, 390.5, 4.5, 1.8)
pt3dadd(-344, 393, 4.5, 1.1)
pt3dadd(-344, 395, 4.5, 1.1)
pt3dadd(-344.5, 398.5, 10, 2.7)
pt3dadd(-344.5, 400.5, 10, 4.3)
pt3dadd(-343.5, 403.5, 10, 2.3)
pt3dadd(-343.5, 406.5, 10, 1.5)
pt3dadd(-343.5, 409.5, -1, 1.1)
pt3dadd(-344, 411, -1, 1)
pt3dadd(-344, 413.5, -1, 1)
pt3dadd(-345.5, 415.5, 4.5, 1.3)
pt3dadd(-347.5, 417, -3.5, 1.3)
pt3dadd(-348.5, 418.5, 2, 1.9)
pt3dadd(-349, 420.5, 2, 2.1)
pt3dadd(-351, 423.5, -6.5, 2)
pt3dadd(-353.5, 426, -6.5, 2.8)
pt3dadd(-354.5, 427.5, -3.5, 3.4)
pt3dadd(-355, 429, -3.5, 3.8)
pt3dadd(-358.5, 430.5, -3.5, 2.6)
pt3dadd(-361, 430.5, -1, 2.3)
pt3dadd(-363, 432.5, -1, 2.3)
pt3dadd(-363.5, 434, -1, 1.9)
pt3dadd(-365.5, 435.5, -1, 1.4)
pt3dadd(-367.5, 437.5, 2, 1.6)
pt3dadd(-370.5, 437.5, 2, 1.6)
pt3dadd(-372, 438.5, 2, 2.2)
pt3dadd(-372, 440, 2, 2.6)
pt3dadd(-374, 441.5, 4.5, 0.7)
pt3dadd(-374, 442.5, 4.5, 1.8)
pt3dadd(-376, 444, 4.5, 3.1)
pt3dadd(-378.5, 445.5, 4.5, 2.6)
pt3dadd(-379, 447.5, 4.5, 0.9)
pt3dadd(-379.5, 450, 4.5, 0.7)
pt3dadd(-381.5, 452, 7.5, 1.1)
pt3dadd(-384, 454.5, 7.5, 1.1)
pt3dadd(-386.5, 454.5, 7.5, 1.1)
pt3dadd(-389.5, 455, 7.5, 1.2)
pt3dadd(-391, 456, 10, 0.9)
pt3dadd(-392.5, 457, -3.5, 1.1)
pt3dadd(-394.5, 458, -3.5, 1.1)
pt3dadd(-396.5, 457, -3.5, 0.8)
pt3dadd(-397.5, 456.5, -3.5, 0.7)
pt3dadd(-400.5, 456.5, -1, 0.9)
pt3dadd(-402.5, 457, 4.5, 0.9)
pt3dadd(-405.5, 459, 4.5, 0.9)
pt3dadd(-407, 458.5, 4.5, 0.9)
pt3dadd(-409.5, 457.5, -1, 1.8)
pt3dadd(-411.5, 457.5, -1, 1.6)
pt3dadd(-413, 460.5, -1, 2.5)
pt3dadd(-413, 462, -6.5, 2.3)
pt3dadd(-413, 465.5, -1, 2.3)
pt3dadd(-413, 467, -1, 1.8)
pt3dadd(-413, 469.5, -1, 1.8)
pt3dadd(-414, 471.5, -1, 1.4)
pt3dadd(-413.5, 473, -3.5, 1)
pt3dadd(-412.5, 475, -3.5, 1.5)
pt3dadd(-412.5, 477, -3.5, 2.2)
pt3dadd(-411, 480.5, -3.5, 1.9)
pt3dadd(-411, 482, -3.5, 1.5)
pt3dadd(-410, 484.5, -6.5, 1.9)
pt3dadd(-408.5, 485.5, -6.5, 1.9)
pt3dadd(-407.5, 488, -6.5, 1.9)
pt3dadd(-407.5, 490, -6.5, 1.7)
pt3dadd(-405.5, 493, -3.5, 1.4)
pt3dadd(-405, 494, -3.5, 1.4)
pt3dadd(-403, 495.5, -3.5, 1.4)
pt3dadd(-401, 497, -9.5, 1.4)
pt3dadd(-401, 499.5, -9.5, 1.4)
pt3dadd(-402.5, 502, -9.5, 1.9)
pt3dadd(-404.5, 504, -9.5, 2.1)
pt3dadd(-405.5, 506.5, -9.5, 1.6)
pt3dadd(-405.5, 508, -9.5, 1.3)
pt3dadd(-406, 511, -9.5, 1.3)
pt3dadd(-405.5, 514.5, -12, 1.8)
pt3dadd(-405.5, 517.5, -12, 1.8)
pt3dadd(-405, 519, -26, 1.6)
}
dend[7] {pt3dclear()
pt3dadd(-278.5, 218, 55.5, 4.8)
pt3dadd(-279, 222.5, 55.5, 2)
pt3dadd(-280, 225, 48.5, 3.2)
pt3dadd(-280, 226, 50, 3.4)
pt3dadd(-280, 229.5, 51.5, 3.8)
pt3dadd(-279.5, 233.5, 48.5, 2.9)
pt3dadd(-280, 237.5, 48.5, 2.5)
pt3dadd(-280, 240, 48.5, 2.5)
pt3dadd(-280, 243, 48.5, 2.5)
pt3dadd(-280, 246, 48.5, 2.7)
pt3dadd(-280.5, 249.5, 48.5, 2.3)
pt3dadd(-281, 251, 48.5, 1.9)
pt3dadd(-281.5, 253, 50.5, 1.6)
pt3dadd(-283, 254, 52, 1.9)
pt3dadd(-283, 255, 54, 1.9)
pt3dadd(-283, 257, 50.5, 1.8)
pt3dadd(-284.5, 259, 55.5, 2.3)
pt3dadd(-286, 260, 52, 1.8)
pt3dadd(-287.5, 261.5, 55.5, 1.9)
pt3dadd(-288, 265, 59.5, 2.5)
pt3dadd(-288.5, 267, 59.5, 2.7)
pt3dadd(-290, 268, 59.5, 3.3)
pt3dadd(-291.5, 270.5, 54, 4)
pt3dadd(-292, 272.5, 54, 2.9)
pt3dadd(-293.5, 275.5, 52, 1.9)
pt3dadd(-294.5, 278.5, 63, 1.5)
pt3dadd(-296, 280.5, 61, 1.6)
pt3dadd(-296.5, 281.5, 61, 1.6)
pt3dadd(-298, 284, 57.5, 2.8)
pt3dadd(-298, 286.5, 61, 1.6)
pt3dadd(-298.5, 288.5, 61, 1.3)
pt3dadd(-300.5, 290.5, 63, 1.8)
pt3dadd(-301.5, 294, 63, 1.8)
pt3dadd(-301.5, 295.5, 63, 1.7)
pt3dadd(-303, 296.5, 61, 2.2)
pt3dadd(-304.5, 298, 63, 4.1)
pt3dadd(-306.5, 299, 63, 3.6)
pt3dadd(-308, 302.5, 59.5, 2.2)
pt3dadd(-307.5, 303.5, 61, 0.1)
pt3dadd(-307.5, 307, 61, 0.1)
pt3dadd(-309.5, 307, 63, 0.1)
pt3dadd(-312.5, 311, 63, 2.8)
pt3dadd(-312.5, 314, 63, 2.5)
pt3dadd(-314.5, 315, 64.5, 1.9)
pt3dadd(-317.5, 318, 66, 1.3)
pt3dadd(-319, 319.5, 67.5, 1.7)
pt3dadd(-321.5, 322, 67.5, 1.8)
pt3dadd(-323, 324, 69, 1.5)
pt3dadd(-325.5, 325.5, 70.5, 1.5)
pt3dadd(-326.5, 327.5, 66, 2.5)
pt3dadd(-329.5, 331, 66, 2.2)
pt3dadd(-331.5, 333, 67.5, 2.2)
pt3dadd(-333.5, 333.5, 66, 1.6)
pt3dadd(-337, 334, 66, 1.4)
pt3dadd(-339.5, 337.5, 66, 1.4)
pt3dadd(-342.5, 340, 66, 1.5)
pt3dadd(-342.5, 343, 63, 1.9)
pt3dadd(-343.5, 343, 66, 3.4)
pt3dadd(-345.5, 343.5, 63, 3.7)
pt3dadd(-347, 345, 64.5, 2.5)
}
}
proc shape3d_3() {
dend[7] { pt3dadd(-348.5, 346, 69, 2.3)
pt3dadd(-352.5, 347.5, 66, 1.6)
pt3dadd(-355, 349.5, 69, 1.7)
pt3dadd(-358, 351.5, 69, 2)
pt3dadd(-361, 353.5, 70.5, 2)
pt3dadd(-364.5, 353, 67.5, 1.3)
pt3dadd(-366, 353, 67.5, 1.4)
pt3dadd(-368, 354, 70.5, 1.7)
pt3dadd(-370.5, 355, 70.5, 2.5)
pt3dadd(-372, 355, 70.5, 1.8)
pt3dadd(-375.5, 356.5, 72, 1.4)
pt3dadd(-379, 358.5, 72, 1.4)
pt3dadd(-382.5, 359.5, 72, 1.6)
pt3dadd(-386, 360, 72, 1.4)
pt3dadd(-387.5, 361.5, 72, 1.2)
pt3dadd(-388, 362, 72, 1.9)
pt3dadd(-390.5, 364.5, 73.5, 3.1)
pt3dadd(-391.5, 367, 72, 1.9)
pt3dadd(-394, 367.5, 73.5, 0.9)
pt3dadd(-397, 367.5, 75, 1.3)
pt3dadd(-398.5, 368.5, 73.5, 2.4)
pt3dadd(-400.5, 370.5, 69, 4.1)
pt3dadd(-403.5, 373, 69, 1.4)
pt3dadd(-405, 376.5, 70.5, 1)
pt3dadd(-407.5, 376, 70.5, 1)
pt3dadd(-412.5, 373, 72, 1.7)
pt3dadd(-414.5, 374, 72, 1.8)
pt3dadd(-416.5, 374.5, 73.5, 2.7)
pt3dadd(-419.5, 375.5, 75, 0.7)
pt3dadd(-423, 377, 75, 0.8)
pt3dadd(-422, 380.5, 75, 0.8)
pt3dadd(-423, 381, 76.5, 2)
pt3dadd(-425, 383.5, 78, 2.4)
pt3dadd(-424.5, 384.5, 78, 2.8)
pt3dadd(-424.5, 386.5, 78, 1.9)
pt3dadd(-426, 389.5, 78, 1.2)
pt3dadd(-428, 391, 78, 1.2)
pt3dadd(-431.5, 391.5, 78, 1.2)
pt3dadd(-433, 391.5, 78, 1.2)
pt3dadd(-439.5, 391.5, 68, 2.2)
pt3dadd(-441, 390.5, 68, 1.8)
pt3dadd(-443.5, 389.5, 68, 1.8)
pt3dadd(-446, 389.5, 68, 1.4)
pt3dadd(-446.5, 386.5, 80, 1.8)
pt3dadd(-447.5, 386, 80, 2.7)
pt3dadd(-449.5, 384.5, 84, 1.9)
pt3dadd(-451, 383, 82, 1.2)
pt3dadd(-452.5, 381, 82, 1.2)
pt3dadd(-453.5, 382, 86, 1.1)
pt3dadd(-454, 382.5, 86, 1.6)
pt3dadd(-455, 380.5, 86, 1.4)
pt3dadd(-456.5, 380.5, 86, 0.7)
pt3dadd(-458.5, 380.5, 86, 0.8)
pt3dadd(-460, 378.5, 86, 0.9)
pt3dadd(-461.5, 377.5, 86, 1.1)
pt3dadd(-464, 377.5, 86, 1.6)
pt3dadd(-466.5, 376, 86, 2.2)
pt3dadd(-469, 376, 86, 1.6)
pt3dadd(-470.5, 377.5, 90, 1.1)
pt3dadd(-472, 377.5, 88, 0.8)
pt3dadd(-475, 377.5, 88, 0.8)
pt3dadd(-476.5, 377.5, 94, 1.6)
pt3dadd(-479.5, 377.5, 102, 2.1)
pt3dadd(-481.5, 376, 102, 1.9)
pt3dadd(-485, 376, 102, 1.9)
pt3dadd(-486, 375, 100.5, 1.9)
pt3dadd(-487, 374.5, 100.5, 1.2)
pt3dadd(-488, 374, 100.5, 1.1)
pt3dadd(-490, 374.5, 102, 1.9)
pt3dadd(-491, 374.5, 102, 2.6)
pt3dadd(-493, 374, 102, 1.5)
pt3dadd(-495, 374, 102, 0.7)
pt3dadd(-496.5, 374, 102, 0.8)
pt3dadd(-499, 373.5, 102, 1.6)
pt3dadd(-502, 374, 104.5, 2.3)
pt3dadd(-503.5, 374, 104.5, 1.2)
pt3dadd(-504.5, 374, 104.5, 0.3)
pt3dadd(-506, 374, 104.5, 0.3)
pt3dadd(-506, 374.5, 106, 1.3)
pt3dadd(-506, 376, 106, 2.2)
pt3dadd(-507, 376.5, 106, 2.5)
pt3dadd(-508.5, 377, 106, 1.6)
pt3dadd(-509.5, 378.5, 107.5, 0.9)
pt3dadd(-511, 378.5, 107.5, 0.6)
pt3dadd(-512.5, 379, 107.5, 0.6)
pt3dadd(-513, 379, 108.5, 0.9)
pt3dadd(-514.5, 381, 110, 2.6)
pt3dadd(-516, 382, 110, 1)
pt3dadd(-517.5, 384, 110, 1)
pt3dadd(-518, 385, 110, 1.4)
pt3dadd(-520, 385, 110, 1.6)
pt3dadd(-520.5, 387, 110, 1.1)
pt3dadd(-523, 388.5, 111, 0.6)
pt3dadd(-525.5, 388.5, 111, 0.6)
pt3dadd(-527, 389, 111, 0.6)
pt3dadd(-530.5, 389.5, 111, 0.6)
pt3dadd(-531, 390.5, 111, 1.4)
pt3dadd(-533, 390.5, 111, 2.2)
pt3dadd(-534, 390.5, 111, 1.1)
pt3dadd(-534.5, 390.5, 111, 0.3)
pt3dadd(-537.5, 391, 111, 0.3)
pt3dadd(-539.5, 391.5, 112.5, 1.1)
pt3dadd(-542, 392, 112.5, 0.5)
pt3dadd(-543.5, 392, 112.5, 0.5)
pt3dadd(-545.5, 393.5, 114, 2)
pt3dadd(-547.5, 393, 114, 2)
pt3dadd(-549.5, 392, 112.5, 1.3)
pt3dadd(-551, 392, 112.5, 0.4)
pt3dadd(-553, 392, 112.5, 0.4)
pt3dadd(-553.5, 392, 112.5, 1.6)
pt3dadd(-555, 392, 114, 2.3)
pt3dadd(-558, 392.5, 116.5, 1.6)
pt3dadd(-560, 394.5, 119, 0.7)
pt3dadd(-562.5, 396, 119, 1.1)
pt3dadd(-564, 396, 120.5, 1.1)
pt3dadd(-566, 398.5, 118, 1.2)
pt3dadd(-568, 398.5, 118, 1.4)
pt3dadd(-570, 401.5, 118, 1.2)
pt3dadd(-571, 403.5, 116.5, 1.1)
}
dend[8] {pt3dclear()
pt3dadd(-226.5, 150.5, 48.5, 7.4)
pt3dadd(-235.5, 153, 50, 3.2)
pt3dadd(-239, 155.5, 51.5, 2.3)
pt3dadd(-242, 158.5, 51.5, 3)
pt3dadd(-246.5, 160, 51.5, 3.7)
pt3dadd(-251, 161.5, 51.5, 3.6)
pt3dadd(-255, 164.5, 51.5, 2.7)
pt3dadd(-260, 167.5, 51.5, 2.9)
pt3dadd(-263, 171, 52.5, 3.5)
pt3dadd(-266, 173, 54, 3.5)
pt3dadd(-268, 175.5, 54, 2.9)
pt3dadd(-270.5, 176, 54, 2.3)
pt3dadd(-272.5, 179.5, 48.5, 3.8)
pt3dadd(-276, 183, 50, 4.2)
pt3dadd(-278.5, 185.5, 50, 4.2)
pt3dadd(-281, 189, 50, 1.9)
pt3dadd(-283, 192, 51.5, 2.1)
pt3dadd(-285.5, 194, 51.5, 1.7)
pt3dadd(-286.5, 196.5, 51.5, 2)
pt3dadd(-288.5, 198, 50, 2.8)
pt3dadd(-290, 201.5, 51.5, 3.8)
pt3dadd(-292, 204, 51.5, 4.1)
pt3dadd(-293.5, 206.5, 51.5, 3.5)
pt3dadd(-294.5, 210, 51.5, 3.3)
pt3dadd(-295, 212, 51.5, 3.7)
pt3dadd(-297.5, 214, 53.5, 2.7)
pt3dadd(-298.5, 216.5, 53.5, 1.7)
pt3dadd(-300.5, 219, 53.5, 1.3)
pt3dadd(-302.5, 221, 60.5, 2.4)
pt3dadd(-303, 222.5, 60.5, 3.8)
pt3dadd(-304.5, 223.5, 60.5, 3.8)
pt3dadd(-305.5, 225.5, 60.5, 2)
pt3dadd(-308, 227.5, 60.5, 1.7)
pt3dadd(-309.5, 228, 67.5, 1.9)
pt3dadd(-310.5, 231.5, 69.5, 2.9)
pt3dadd(-313.5, 234, 67.5, 2.8)
pt3dadd(-317.5, 236.5, 67.5, 2.3)
pt3dadd(-322, 239, 67.5, 2.1)
pt3dadd(-324.5, 239, 67.5, 3.5)
pt3dadd(-326.5, 239, 67.5, 3.8)
pt3dadd(-328, 239.5, 67.5, 4.4)
pt3dadd(-331, 240, 67.5, 4.1)
pt3dadd(-333.5, 242, 71, 2.9)
pt3dadd(-334.5, 242, 69.5, 1.2)
pt3dadd(-336, 242.5, 69.5, 1.2)
pt3dadd(-338.5, 244.5, 69.5, 1.2)
pt3dadd(-339.5, 245, 71, 3.8)
pt3dadd(-343.5, 247, 66, 3.8)
pt3dadd(-346, 249.5, 67.5, 3.4)
pt3dadd(-349, 250, 67.5, 1.9)
pt3dadd(-352, 252, 69.5, 1.9)
pt3dadd(-354, 254.5, 62.5, 1.9)
pt3dadd(-355.5, 258, 64, 3.1)
pt3dadd(-356.5, 260, 64, 3.3)
pt3dadd(-358.5, 266, 71, 3.5)
pt3dadd(-360.5, 268.5, 71, 4.7)
pt3dadd(-364, 272, 74, 5.2)
}
dend[9] {pt3dclear()
pt3dadd(-364, 272, 74, 5.2)
pt3dadd(-368.5, 276, 75.5, 1.1)
pt3dadd(-370, 277.5, 74, 0.9)
pt3dadd(-370, 278.5, 72.5, 1.4)
pt3dadd(-372, 279.5, 75.5, 2.1)
pt3dadd(-373, 282, 74, 2.1)
pt3dadd(-374, 285.5, 74, 1.3)
pt3dadd(-375, 288, 75.5, 0.4)
pt3dadd(-375, 289, 75.5, 0.4)
pt3dadd(-375.5, 291, 75.5, 0.4)
pt3dadd(-377, 292.5, 80, 2.3)
pt3dadd(-378, 294, 77, 2.9)
pt3dadd(-380.5, 297, 75.5, 1.6)
pt3dadd(-381, 299, 77, 1.1)
pt3dadd(-383, 300.5, 77, 1.2)
pt3dadd(-384.5, 301, 74, 1.9)
pt3dadd(-386.5, 302.5, 75.5, 2.7)
pt3dadd(-388, 305, 77, 1.3)
pt3dadd(-388.5, 306.5, 78.5, 0.7)
pt3dadd(-389.5, 308.5, 78.5, 0.7)
pt3dadd(-392.5, 309, 78.5, 0.7)
pt3dadd(-394.5, 310, 78.5, 1.7)
pt3dadd(-397.5, 311, 80, 0.9)
pt3dadd(-399.5, 310.5, 75.5, 0.9)
}
}
proc shape3d_4() {
dend[9] { pt3dadd(-404.5, 311, 77, 1.2)
pt3dadd(-405.5, 312, 77, 1.2)
pt3dadd(-406, 313, 81.5, 1.4)
pt3dadd(-408, 314, 78.5, 1.6)
pt3dadd(-408.5, 315.5, 80, 1.4)
pt3dadd(-410, 315.5, 80, 0.2)
pt3dadd(-410.5, 317, 80, 0.2)
pt3dadd(-412.5, 317, 74, 1.4)
pt3dadd(-412.5, 319, 75.5, 1.5)
pt3dadd(-414, 320.5, 75.5, 1.5)
pt3dadd(-415.5, 322.5, 77, 0.7)
pt3dadd(-416.5, 324.5, 77, 0.7)
pt3dadd(-417.5, 324.5, 77, 2.4)
pt3dadd(-420, 325.5, 78.5, 3.4)
pt3dadd(-422, 328, 78.5, 2.4)
pt3dadd(-424, 330, 78.5, 0.7)
pt3dadd(-427.5, 331.5, 78.5, 0.9)
pt3dadd(-430.5, 333.5, 78.5, 0.9)
pt3dadd(-433, 335.5, 78.5, 0.9)
pt3dadd(-434.5, 335.5, 78.5, 2.5)
pt3dadd(-435.5, 337, 80, 4.3)
pt3dadd(-437.5, 337.5, 80, 2.5)
pt3dadd(-440, 339, 80, 0.3)
pt3dadd(-441.5, 341.5, 80, 0.9)
pt3dadd(-444, 341.5, 81.5, 1.2)
pt3dadd(-445, 341.5, 81.5, 1.2)
pt3dadd(-447.5, 344, 81.5, 1.2)
pt3dadd(-449.5, 345.5, 81.5, 1.2)
pt3dadd(-450, 347, 81.5, 2.1)
pt3dadd(-452.5, 350, 83, 3.7)
pt3dadd(-454.5, 351, 81.5, 0.9)
pt3dadd(-456, 351, 81.5, 0.6)
pt3dadd(-459, 350.5, 83, 0.6)
pt3dadd(-462, 352, 86, 1.4)
pt3dadd(-464, 354.5, 81.5, 2.3)
pt3dadd(-466.5, 355, 83, 1.2)
pt3dadd(-467, 355, 83, 1)
pt3dadd(-469.5, 356, 83, 1)
pt3dadd(-473, 355, 84.5, 2.8)
pt3dadd(-474, 356.5, 83, 1.1)
pt3dadd(-474.5, 361, 83, 0.8)
pt3dadd(-476.5, 361, 83, 0.8)
pt3dadd(-476.5, 363, 86, 2.1)
pt3dadd(-478.5, 363, 84.5, 1.5)
pt3dadd(-479, 363.5, 84.5, 0.4)
pt3dadd(-481, 364, 84.5, 0.4)
pt3dadd(-483.5, 367.5, 83, 0.5)
pt3dadd(-484, 368.5, 86, 1.4)
pt3dadd(-485, 368.5, 86, 1.4)
pt3dadd(-486.5, 368.5, 86, 0.7)
pt3dadd(-489.5, 369, 86, 0.6)
pt3dadd(-490, 369, 86, 0.6)
pt3dadd(-491.5, 370.5, 87.5, 1.7)
pt3dadd(-493.5, 371.5, 81.5, 1.9)
pt3dadd(-495, 372.5, 81.5, 1.2)
pt3dadd(-496, 374.5, 80, 0.7)
pt3dadd(-499.5, 377, 80, 0.7)
pt3dadd(-501.5, 376.5, 80, 0.7)
pt3dadd(-502.5, 375.5, 78.5, 1.7)
pt3dadd(-502.5, 376.5, 78.5, 1.2)
pt3dadd(-504, 378.5, 78.5, 0.7)
pt3dadd(-505, 379, 78.5, 0.7)
pt3dadd(-509, 381.5, 80, 1.3)
pt3dadd(-510, 384, 81.5, 1.4)
pt3dadd(-510, 385, 81.5, 0.8)
pt3dadd(-509, 386.5, 81.5, 0.8)
pt3dadd(-510, 388, 83, 1.1)
pt3dadd(-511, 389.5, 80, 1.3)
pt3dadd(-511.5, 391.5, 80, 1.3)
pt3dadd(-512, 394, 80, 0.6)
pt3dadd(-510, 394.5, 80, 0.6)
pt3dadd(-509.5, 395.5, 80, 0.6)
pt3dadd(-511, 399, 80, 1.1)
pt3dadd(-508, 400.5, 80, 1.1)
pt3dadd(-507.5, 402.5, 80, 1.2)
pt3dadd(-506.5, 404, 81.5, 1.6)
pt3dadd(-506.5, 406, 83, 2.7)
pt3dadd(-508, 407, 83, 1.4)
pt3dadd(-508.5, 407.5, 83, 0.9)
pt3dadd(-512, 409.5, 86, 2.2)
pt3dadd(-515, 411, 83, 0.8)
pt3dadd(-515.5, 412, 83, 0.8)
pt3dadd(-517.5, 411.5, 83, 1.2)
pt3dadd(-519.5, 413, 84.5, 1.6)
pt3dadd(-520.5, 413.5, 84.5, 1.3)
pt3dadd(-521.5, 415, 84.5, 0.9)
pt3dadd(-528, 416.5, 86, 0.7)
pt3dadd(-530.5, 416.5, 86, 0.7)
pt3dadd(-532.5, 416, 89, 1.6)
pt3dadd(-534.5, 416, 83, 2.7)
pt3dadd(-535.5, 417, 83, 1.5)
pt3dadd(-536, 417.5, 83, 0.7)
pt3dadd(-538, 419.5, 83, 0.9)
pt3dadd(-539, 420, 84.5, 1.4)
pt3dadd(-540.5, 421, 86, 2.2)
pt3dadd(-543, 423, 83, 1.1)
pt3dadd(-542.5, 424, 83, 0.6)
pt3dadd(-544.5, 424.5, 81.5, 0.6)
pt3dadd(-545.5, 424.5, 83, 1.8)
pt3dadd(-546.5, 425, 84.5, 2.7)
pt3dadd(-549.5, 427, 84.5, 1.7)
pt3dadd(-551.5, 428.5, 84.5, 0.5)
pt3dadd(-551.5, 429, 84.5, 0.5)
pt3dadd(-553.5, 429, 84.5, 0.5)
pt3dadd(-555.5, 430, 86, 2.2)
pt3dadd(-555.5, 431, 87.5, 3.3)
pt3dadd(-556, 432, 87.5, 2)
pt3dadd(-557, 435, 87.5, 1)
pt3dadd(-558.5, 437, 83, 1)
pt3dadd(-560.5, 438, 83, 1)
pt3dadd(-561.5, 439.5, 84.5, 1.1)
pt3dadd(-562.5, 442.5, 84.5, 1.1)
pt3dadd(-563, 443.5, 84.5, 1.2)
pt3dadd(-565, 444, 84.5, 1.2)
pt3dadd(-567.5, 446.5, 84.5, 1.2)
pt3dadd(-570.5, 448, 87.5, 1.1)
pt3dadd(-571, 451.5, 85.5, 0.1)
pt3dadd(-573.5, 456.5, 85.5, 0.1)
pt3dadd(-573.5, 457.5, 85.5, 0.1)
pt3dadd(-573.5, 460.5, 85.5, 0.1)
pt3dadd(-574.5, 464, 85.5, 0.1)
pt3dadd(-574, 464.5, 101.5, 1.3)
pt3dadd(-574, 465, 103.5, 2.3)
pt3dadd(-573.5, 467.5, 101.5, 0.1)
pt3dadd(-572.5, 467.5, 99.5, 0.1)
pt3dadd(-570.5, 471, 97.5, 0.1)
pt3dadd(-572.5, 476, 89.5, 0.1)
pt3dadd(-572.5, 478, 89.5, 0.1)
pt3dadd(-569, 481, 89.5, 0.1)
pt3dadd(-567.5, 482.5, 97.5, 0.1)
pt3dadd(-567.5, 485, 93.5, 0.1)
pt3dadd(-567.5, 487.5, 93.5, 0.1)
pt3dadd(-567.5, 490.5, 93.5, 0.1)
pt3dadd(-567.5, 493, 93.5, 0.1)
pt3dadd(-567.5, 495, 91.5, 0.1)
pt3dadd(-567.5, 500.5, 93.5, 0.1)
pt3dadd(-567.5, 504, 93.5, 0.1)
pt3dadd(-567.5, 509.5, 91.5, 0.1)
pt3dadd(-567.5, 510, 97.5, 0.1)
pt3dadd(-567, 513, 97.5, 0.1)
pt3dadd(-565.5, 515.5, 97.5, 0.1)
pt3dadd(-564, 517, 97.5, 0.1)
pt3dadd(-564, 519.5, 97.5, 0.1)
pt3dadd(-564, 521, 97.5, 0.1)
pt3dadd(-564, 523, 99.5, 1.2)
pt3dadd(-563, 524, 99.5, 0.1)
pt3dadd(-562, 529, 101.5, 0.1)
}
dend[10] {pt3dclear()
pt3dadd(-364, 272, 74, 5.2)
pt3dadd(-369, 274, 69.5, 1.8)
pt3dadd(-371, 275, 69.5, 2.2)
pt3dadd(-374, 277.5, 69.5, 2.2)
pt3dadd(-374.5, 280, 69.5, 1.6)
pt3dadd(-376.5, 279.5, 72.5, 1.5)
pt3dadd(-381.5, 283, 74, 3.7)
pt3dadd(-384.5, 283, 72.5, 2.4)
pt3dadd(-386, 283, 72.5, 1.5)
pt3dadd(-389.5, 283.5, 72.5, 1.1)
pt3dadd(-391.5, 284, 74, 1.3)
pt3dadd(-394, 286, 74, 1.6)
pt3dadd(-397, 288.5, 74, 1.9)
pt3dadd(-399.5, 289, 77, 2.5)
pt3dadd(-402, 289.5, 77, 2.6)
pt3dadd(-404, 291.5, 78.5, 3.8)
pt3dadd(-406.5, 291, 78.5, 2.6)
pt3dadd(-409, 292, 78.5, 1.7)
pt3dadd(-411, 292.5, 78.5, 1.3)
pt3dadd(-412.5, 292, 78.5, 1.3)
pt3dadd(-413, 293, 80, 2.7)
pt3dadd(-415, 293, 80, 1.5)
pt3dadd(-417.5, 295.5, 80, 2.4)
pt3dadd(-420, 296, 80, 1.6)
pt3dadd(-423, 296.5, 80, 1.6)
pt3dadd(-424, 298.5, 81.5, 2.2)
pt3dadd(-426.5, 300.5, 84.5, 2.5)
pt3dadd(-429.5, 301.5, 81.5, 1.7)
pt3dadd(-430, 304.5, 83, 1.7)
pt3dadd(-432.5, 306.5, 84.5, 1.7)
pt3dadd(-434.5, 307.5, 86, 2)
pt3dadd(-435, 309.5, 86, 2.3)
pt3dadd(-437, 310.5, 87.5, 1.9)
pt3dadd(-438.5, 311.5, 87.5, 1)
pt3dadd(-439.5, 312, 87.5, 1)
pt3dadd(-442, 311, 87.5, 1.3)
pt3dadd(-443, 312.5, 89, 2.1)
pt3dadd(-445, 313, 86, 2.7)
pt3dadd(-447, 315.5, 86, 1.9)
pt3dadd(-449, 316.5, 87.5, 0.9)
pt3dadd(-450.5, 318, 89, 1.8)
pt3dadd(-453, 318.5, 89, 2.4)
pt3dadd(-455, 318.5, 84.5, 2.8)
pt3dadd(-457.5, 317.5, 86, 1.6)
pt3dadd(-460, 318, 86, 1.3)
pt3dadd(-462, 318.5, 86, 1.7)
pt3dadd(-464.5, 320, 86, 1.7)
pt3dadd(-467, 321, 86, 1.7)
pt3dadd(-469, 322, 86, 2)
pt3dadd(-471.5, 322, 88, 2.5)
pt3dadd(-473.5, 323, 88, 2.7)
pt3dadd(-476.5, 323, 88, 2.6)
pt3dadd(-478.5, 323.5, 88, 1.6)
}
}
proc shape3d_5() {
dend[10] { pt3dadd(-481, 325, 90, 0.3)
pt3dadd(-483, 326, 92, 0.2)
pt3dadd(-485, 326, 92, 0.4)
pt3dadd(-488, 326, 94, 0.5)
pt3dadd(-491, 327, 94, 0.5)
pt3dadd(-492.5, 328.5, 94, 1.5)
pt3dadd(-493.5, 329.5, 98, 2.8)
pt3dadd(-495.5, 330, 98, 3.4)
pt3dadd(-497.5, 331, 96, 2.3)
pt3dadd(-499.5, 332.5, 98, 1.4)
pt3dadd(-500.5, 333, 98, 0.7)
pt3dadd(-502, 334, 98, 1.1)
pt3dadd(-503, 335, 98, 1.5)
pt3dadd(-505.5, 335, 100, 2.2)
pt3dadd(-508, 336.5, 98, 1.9)
pt3dadd(-510, 336.5, 98, 1.2)
pt3dadd(-510.5, 337, 98, 0.6)
pt3dadd(-514.5, 337.5, 98, 0.8)
pt3dadd(-517, 338, 98, 0.8)
pt3dadd(-519.5, 338.5, 98, 0.9)
pt3dadd(-522, 341, 96, 0.9)
pt3dadd(-522.5, 341.5, 98, 1.4)
pt3dadd(-524, 343, 98, 0.7)
pt3dadd(-525.5, 343.5, 98, 0.7)
pt3dadd(-526.5, 345, 100, 2.4)
pt3dadd(-529.5, 346, 100, 4)
pt3dadd(-531, 349, 100, 2.5)
pt3dadd(-532, 351.5, 100, 1.3)
pt3dadd(-535.5, 352.5, 104, 0.7)
pt3dadd(-538, 353, 102, 1.5)
pt3dadd(-541.5, 353, 104, 2.7)
pt3dadd(-545.5, 353, 104, 1.6)
pt3dadd(-547.5, 354.5, 98, 0.8)
pt3dadd(-549.5, 355.5, 98, 0.8)
pt3dadd(-551, 356.5, 100, 2.2)
pt3dadd(-554, 357.5, 100, 3.5)
pt3dadd(-557, 359.5, 98, 1.8)
pt3dadd(-561, 359.5, 98, 1.1)
pt3dadd(-564.5, 359.5, 98, 1.3)
pt3dadd(-567.5, 358, 100, 1.5)
pt3dadd(-572.5, 358, 98, 1.4)
pt3dadd(-579.5, 358, 98, 1.4)
pt3dadd(-581.5, 357.5, 98, 2.3)
pt3dadd(-586, 356.5, 94, 2.6)
pt3dadd(-589, 357.5, 94, 1.5)
pt3dadd(-592, 358, 96, 1.2)
pt3dadd(-599, 359, 96, 1.6)
pt3dadd(-601.5, 359.5, 98, 1.2)
pt3dadd(-603.5, 361.5, 98, 1.2)
pt3dadd(-606.5, 364, 100, 1.6)
pt3dadd(-609.5, 366.5, 102, 2)
pt3dadd(-613, 367, 104, 2.2)
pt3dadd(-615.5, 367, 108, 4)
pt3dadd(-618, 367, 108, 2.2)
pt3dadd(-619.5, 369.5, 104, 0.5)
pt3dadd(-619.5, 371, 106, 0.7)
pt3dadd(-619.5, 373.5, 106, 0.7)
pt3dadd(-621.5, 374.5, 106, 1.1)
pt3dadd(-625, 376.5, 108, 1.7)
pt3dadd(-625.5, 378.5, 106, 1.5)
pt3dadd(-627, 378.5, 106, 1.7)
pt3dadd(-630.5, 378, 112, 1.7)
pt3dadd(-634, 378.5, 114.5, 2)
pt3dadd(-636.5, 381, 116, 1.8)
pt3dadd(-639.5, 382, 116, 2)
pt3dadd(-642, 383.5, 116, 2)
pt3dadd(-643, 384, 122.5, 2.2)
pt3dadd(-645, 384, 123.5, 2.8)
pt3dadd(-648, 384, 123.5, 1.5)
pt3dadd(-649, 385, 123.5, 0.8)
pt3dadd(-650.5, 385.5, 123.5, 0.8)
pt3dadd(-653.5, 385.5, 123.5, 0.8)
pt3dadd(-654.5, 385, 125, 1.7)
pt3dadd(-657, 385, 125, 2)
pt3dadd(-659.5, 385, 123.5, 3)
pt3dadd(-661.5, 386, 125, 2.1)
pt3dadd(-664, 386.5, 125, 1.8)
pt3dadd(-666, 387, 126.5, 1.8)
pt3dadd(-669, 386, 126.5, 1.8)
pt3dadd(-670.5, 387, 129, 0.8)
pt3dadd(-672, 386, 127.5, 1.7)
pt3dadd(-673.5, 385, 129, 2.8)
pt3dadd(-677.5, 384.5, 129, 1.4)
pt3dadd(-679, 384, 125, 0.4)
pt3dadd(-682.5, 384, 125, 0.4)
pt3dadd(-685.5, 384, 126.5, 0.7)
pt3dadd(-686, 386.5, 129, 2.5)
pt3dadd(-687.5, 387, 129, 3.4)
pt3dadd(-688.5, 389, 129, 2.6)
pt3dadd(-690.5, 391.5, 129, 1.1)
pt3dadd(-692, 394.5, 129, 0.7)
pt3dadd(-695, 397, 129, 0.7)
}
dend[11] {pt3dclear()
pt3dadd(-147, 77, 34, 9.9)
pt3dadd(-153, 73, 34, 3.3)
pt3dadd(-157, 74.5, 34, 3.7)
pt3dadd(-162, 75.5, 37, 4.5)
pt3dadd(-168, 76.5, 37, 5)
pt3dadd(-174, 77, 37, 5)
pt3dadd(-177.5, 77, 37, 4)
pt3dadd(-181.5, 77, 37, 4.1)
pt3dadd(-184.5, 79.5, 37, 4.3)
pt3dadd(-190, 82, 38.5, 4.9)
pt3dadd(-192.5, 83, 38.5, 4.9)
pt3dadd(-196, 85, 38.5, 4.3)
pt3dadd(-198.5, 86.5, 40, 5.2)
pt3dadd(-201.5, 88.5, 40, 4.9)
pt3dadd(-205.5, 90.5, 40, 4.8)
pt3dadd(-208, 91, 41.5, 5.8)
pt3dadd(-210, 94, 41.5, 5.6)
pt3dadd(-214.5, 95.5, 42.5, 4.7)
pt3dadd(-219, 96, 42.5, 4.7)
pt3dadd(-223.5, 96.5, 42.5, 5.1)
pt3dadd(-227, 98, 42.5, 5.8)
pt3dadd(-231.5, 98, 42.5, 5.8)
pt3dadd(-235, 98.5, 47, 5.6)
pt3dadd(-239, 102, 48.5, 5.6)
pt3dadd(-243, 102, 50, 5.6)
pt3dadd(-249.5, 104, 51.5, 5.6)
pt3dadd(-253, 104, 50, 5.6)
pt3dadd(-258, 105, 50, 4.7)
pt3dadd(-262, 106, 50, 4.7)
pt3dadd(-268, 107, 51.5, 5.7)
pt3dadd(-276, 109, 51.5, 5.7)
pt3dadd(-279, 109, 52.5, 6)
pt3dadd(-281.5, 109, 52.5, 4.8)
pt3dadd(-286.5, 108.5, 52.5, 5)
pt3dadd(-289, 109, 52.5, 3.6)
pt3dadd(-292, 109, 51.5, 4.5)
pt3dadd(-299.5, 109, 53.5, 5.7)
pt3dadd(-303, 109.5, 55.5, 5.2)
pt3dadd(-305.5, 111, 59, 5)
pt3dadd(-308, 112.5, 59, 5)
pt3dadd(-312, 112.5, 59, 4.6)
pt3dadd(-316.5, 112.5, 59, 4.6)
pt3dadd(-320.5, 112.5, 59, 4.3)
pt3dadd(-324, 112.5, 59, 5.2)
pt3dadd(-327, 112, 59, 5.3)
pt3dadd(-330.5, 112, 59, 5.3)
pt3dadd(-335.5, 112, 59, 5.8)
pt3dadd(-339.5, 113, 60.5, 5.8)
pt3dadd(-343.5, 113.5, 60.5, 5.8)
pt3dadd(-347.5, 114.5, 60.5, 5.8)
pt3dadd(-352, 116, 60.5, 5.8)
pt3dadd(-356, 116.5, 60.5, 5.8)
pt3dadd(-359, 117.5, 60.5, 5.8)
pt3dadd(-361.5, 118, 60.5, 6)
pt3dadd(-364.5, 119.5, 62.5, 6.7)
pt3dadd(-367.5, 119.5, 62.5, 6.7)
pt3dadd(-368.5, 119.5, 62.5, 6.7)
pt3dadd(-374.5, 121.5, 71.5, 5.7)
pt3dadd(-381, 121.5, 71.5, 5.7)
pt3dadd(-384, 121.5, 71.5, 5.7)
pt3dadd(-388, 121.5, 71.5, 6.1)
pt3dadd(-392, 123, 71.5, 6.1)
pt3dadd(-395.5, 123, 71.5, 6.1)
pt3dadd(-399, 123, 71.5, 6.1)
pt3dadd(-405.5, 122.5, 70, 4.6)
pt3dadd(-409, 122.5, 70, 4.7)
pt3dadd(-412.5, 122.5, 70, 5.1)
pt3dadd(-415, 122.5, 71.5, 5.5)
pt3dadd(-418, 122, 71.5, 5.5)
pt3dadd(-420, 122.5, 70, 6)
}
dend[12] {pt3dclear()
pt3dadd(-420, 122.5, 70, 6)
pt3dadd(-422.5, 127, 70, 1.3)
pt3dadd(-423, 127, 70, 0.8)
pt3dadd(-424.5, 127, 70, 0.8)
pt3dadd(-427.5, 129, 76, 2.8)
pt3dadd(-428, 130, 76, 2.8)
pt3dadd(-429, 133, 76, 2.6)
pt3dadd(-430, 133.5, 76, 1.1)
pt3dadd(-429.5, 134.5, 74.5, 1.2)
pt3dadd(-430.5, 136, 71.5, 1.2)
pt3dadd(-433, 138, 76, 0.9)
pt3dadd(-432.5, 139, 73, 0.9)
pt3dadd(-432.5, 141, 74.5, 1.6)
pt3dadd(-432.5, 142.5, 76, 1.9)
pt3dadd(-432, 143, 76, 2.2)
pt3dadd(-431, 144, 76, 1.3)
pt3dadd(-431, 146.5, 76, 1.3)
pt3dadd(-431.5, 148.5, 76, 1.3)
pt3dadd(-431, 149.5, 76, 2.1)
pt3dadd(-432.5, 150.5, 76, 2.2)
pt3dadd(-434, 152.5, 77.5, 2.6)
pt3dadd(-434.5, 153, 77.5, 1.9)
pt3dadd(-436, 155.5, 77.5, 0.9)
pt3dadd(-436, 159, 77.5, 0.9)
pt3dadd(-436.5, 160, 77.5, 0.7)
pt3dadd(-436.5, 162, 77.5, 0.7)
pt3dadd(-436.5, 162.5, 83.5, 0.7)
pt3dadd(-437.5, 164, 83.5, 0.7)
pt3dadd(-437, 166, 83.5, 0.7)
pt3dadd(-439, 161, 83.5, 0.7)
pt3dadd(-438.5, 164.5, 83.5, 0.7)
pt3dadd(-439.5, 167, 83.5, 0.9)
pt3dadd(-440, 169, 83.5, 1)
pt3dadd(-441.5, 171, 83.5, 1)
pt3dadd(-441.5, 171.5, 83.5, 1)
pt3dadd(-441.5, 173.5, 83.5, 2.3)
pt3dadd(-443.5, 175, 86.5, 2.1)
pt3dadd(-444.5, 178.5, 88, 1.5)
}
}
proc shape3d_6() {
dend[12] { pt3dadd(-445.5, 178.5, 88, 1)
pt3dadd(-447, 179.5, 86.5, 1.2)
pt3dadd(-449, 182.5, 88, 0.8)
pt3dadd(-448, 184, 88, 1.1)
pt3dadd(-449, 186.5, 83.5, 1.7)
pt3dadd(-449.5, 187.5, 86.5, 2.4)
pt3dadd(-449.5, 189.5, 86.5, 2.7)
pt3dadd(-451.5, 190.5, 86.5, 1.4)
pt3dadd(-452, 192.5, 89.5, 1.3)
pt3dadd(-454.5, 194, 89.5, 0.9)
pt3dadd(-455.5, 196.5, 88, 0.6)
pt3dadd(-457.5, 196.5, 88, 1.2)
pt3dadd(-458, 198, 89.5, 1.5)
pt3dadd(-458.5, 197, 91, 3.3)
pt3dadd(-462, 200, 89.5, 0.1)
pt3dadd(-462.5, 201.5, 88, 0.1)
pt3dadd(-462.5, 203.5, 91, 0.1)
pt3dadd(-463.5, 207.5, 95.5, 0.1)
pt3dadd(-465, 212.5, 97.5, 0.8)
pt3dadd(-466, 213, 97.5, 0.8)
pt3dadd(-466, 214.5, 95.5, 0.9)
pt3dadd(-466, 215.5, 95.5, 1.7)
pt3dadd(-467, 218, 93.5, 1.1)
pt3dadd(-467.5, 220, 93.5, 0.3)
pt3dadd(-468.5, 223.5, 99.5, 0.3)
pt3dadd(-469, 224.5, 95.5, 0.3)
pt3dadd(-470.5, 224.5, 95.5, 1.2)
pt3dadd(-471.5, 225.5, 95.5, 2.1)
pt3dadd(-472.5, 227.5, 101.5, 0.8)
pt3dadd(-472.5, 230.5, 97.5, 0.6)
pt3dadd(-472, 231, 95.5, 0.6)
pt3dadd(-472, 233.5, 99.5, 0.6)
pt3dadd(-471.5, 234, 97.5, 0.6)
pt3dadd(-471, 236, 97.5, 2.2)
pt3dadd(-470.5, 238, 99.5, 0.6)
pt3dadd(-470.5, 239, 99.5, 0.6)
pt3dadd(-469, 240.5, 97.5, 1.7)
pt3dadd(-469, 241.5, 97.5, 1.9)
pt3dadd(-470, 243, 99.5, 1.9)
pt3dadd(-471, 246, 99.5, 2)
pt3dadd(-471, 248, 97.5, 2)
pt3dadd(-470.5, 250, 95.5, 0.1)
pt3dadd(-470.5, 250, 107.5, 0.1)
pt3dadd(-470.5, 252.5, 103.5, 0.1)
pt3dadd(-470.5, 253.5, 103.5, 0.1)
pt3dadd(-470, 255, 101.5, 1.2)
pt3dadd(-468.5, 257, 105.5, 2.3)
pt3dadd(-468, 258.5, 105.5, 1.3)
pt3dadd(-467.5, 261.5, 101.5, 0.2)
pt3dadd(-468.5, 263, 103.5, 0.2)
pt3dadd(-469.5, 264, 99.5, 1.1)
pt3dadd(-470, 265, 101.5, 2)
pt3dadd(-471, 266.5, 103.5, 1.4)
pt3dadd(-471.5, 269, 103.5, 0.5)
pt3dadd(-472.5, 271.5, 103.5, 0.3)
pt3dadd(-473.5, 273, 103.5, 1.3)
pt3dadd(-476, 273.5, 109.5, 2.1)
pt3dadd(-477, 275, 109.5, 1.1)
pt3dadd(-477, 275.5, 109.5, 0.3)
pt3dadd(-478, 277.5, 109.5, 0.3)
pt3dadd(-478.5, 278, 109.5, 0.3)
pt3dadd(-479, 279, 111.5, 1.2)
pt3dadd(-482, 280, 117.5, 0.7)
pt3dadd(-483, 281, 125.5, 0.2)
pt3dadd(-485.5, 282.5, 125.5, 0.3)
pt3dadd(-488.5, 284, 125.5, 0.3)
pt3dadd(-490.5, 284, 127.5, 0.9)
pt3dadd(-492, 285, 129.5, 0.6)
pt3dadd(-497.5, 286.5, 133.5, 0.9)
pt3dadd(-499, 287.5, 131.5, 1.1)
pt3dadd(-501, 287.5, 133.5, 0.3)
pt3dadd(-503, 287.5, 137.5, 0.3)
pt3dadd(-504, 291.5, 141.5, 0.3)
}
dend[13] {pt3dclear()
pt3dadd(-420, 122.5, 70, 6)
pt3dadd(-422.5, 122, 68.5, 4.6)
pt3dadd(-426.5, 119.5, 68.5, 4.6)
pt3dadd(-428.5, 119, 67, 4.5)
pt3dadd(-433, 119.5, 68.5, 6.1)
pt3dadd(-435, 118.5, 68.5, 7.5)
pt3dadd(-437.5, 118.5, 68.5, 7.6)
}
dend[14] {pt3dclear()
pt3dadd(-437.5, 118.5, 68.5, 7.6)
pt3dadd(-441, 120, 73, 2.9)
pt3dadd(-443.5, 121.5, 73, 2.9)
pt3dadd(-447.5, 121.5, 73, 2.9)
pt3dadd(-450.5, 122.5, 71.5, 2.3)
pt3dadd(-454, 121, 71.5, 2.2)
pt3dadd(-456, 120, 74.5, 2.4)
pt3dadd(-458.5, 120.5, 74.5, 3.5)
pt3dadd(-461, 120.5, 76, 5.2)
pt3dadd(-464, 120.5, 76, 4.1)
pt3dadd(-467, 121, 80.5, 1.4)
pt3dadd(-470.5, 121, 80.5, 1.4)
pt3dadd(-473, 122, 82, 2.8)
pt3dadd(-476, 122, 82, 3.7)
pt3dadd(-479, 123, 82, 2.1)
pt3dadd(-479.5, 123, 82, 1.1)
pt3dadd(-481.5, 122.5, 83.5, 3)
pt3dadd(-482.5, 122, 85, 3.8)
pt3dadd(-487, 120, 83.5, 1.7)
pt3dadd(-492, 119.5, 83.5, 2.6)
pt3dadd(-494.5, 119, 85, 3.1)
pt3dadd(-497, 119.5, 85, 4)
pt3dadd(-498.5, 119.5, 86.5, 5.1)
pt3dadd(-500.5, 119.5, 86.5, 3.6)
pt3dadd(-503.5, 119, 86.5, 2.2)
pt3dadd(-506.5, 120, 86.5, 1.6)
pt3dadd(-509, 120, 86.5, 2.7)
pt3dadd(-512, 119, 86.5, 2.7)
pt3dadd(-515.5, 118.5, 86.5, 2.7)
pt3dadd(-519, 118.5, 86.5, 2.8)
pt3dadd(-519.5, 116.5, 85, 2.8)
pt3dadd(-516, 116, 85, 2.8)
pt3dadd(-516, 113, 85, 2.8)
pt3dadd(-518.5, 112.5, 85, 2.3)
pt3dadd(-520.5, 112, 85, 2.7)
pt3dadd(-523.5, 108, 88, 2.4)
pt3dadd(-527.5, 103.5, 84, 2.5)
pt3dadd(-530, 103.5, 84, 1.5)
pt3dadd(-532, 103.5, 84, 2.5)
pt3dadd(-534.5, 103.5, 84, 3.6)
pt3dadd(-535.5, 102.5, 84, 4)
pt3dadd(-539, 101.5, 84, 2.9)
pt3dadd(-539.5, 99.5, 84, 1.9)
pt3dadd(-541.5, 99.5, 84, 1.9)
pt3dadd(-543, 98.5, 84, 1.8)
pt3dadd(-544.5, 96.5, 84, 1.8)
pt3dadd(-544.5, 93.5, 98, 2.8)
pt3dadd(-544.5, 90, 98, 4.6)
pt3dadd(-544.5, 87, 98, 3.1)
pt3dadd(-545, 86.5, 98, 0.9)
pt3dadd(-547.5, 84.5, 98, 1)
pt3dadd(-549.5, 82.5, 102, 1.2)
pt3dadd(-552, 80, 102, 1.8)
pt3dadd(-555, 78, 102, 2.1)
pt3dadd(-556, 74.5, 98, 2.8)
pt3dadd(-559, 73.5, 98, 2.5)
pt3dadd(-563.5, 69, 98, 2.2)
pt3dadd(-567.5, 67.5, 100, 3.3)
pt3dadd(-572, 66, 100, 3.3)
}
dend[15] {pt3dclear()
pt3dadd(-572, 66, 100, 3.3)
pt3dadd(-568, 70, 100, 1.1)
pt3dadd(-565, 71, 100, 1.1)
pt3dadd(-559.5, 71, 104, 2.8)
pt3dadd(-557, 70.5, 102, 1.1)
pt3dadd(-555, 70.5, 100, 0.5)
pt3dadd(-554.5, 69, 100, 0.5)
pt3dadd(-553, 69, 104, 1.5)
pt3dadd(-552.5, 65.5, 104, 2.1)
pt3dadd(-551, 65, 104, 1.1)
pt3dadd(-550.5, 63.5, 108, 1.1)
pt3dadd(-549.5, 60.5, 104, 1.1)
pt3dadd(-548, 60.5, 104, 1.1)
pt3dadd(-545, 58.5, 106, 2.4)
pt3dadd(-544, 58, 104, 0.9)
pt3dadd(-542, 56, 104, 0.9)
pt3dadd(-540.5, 54, 94, 2.2)
pt3dadd(-537.5, 53.5, 92, 0.5)
pt3dadd(-535.5, 51.5, 92, 0.5)
pt3dadd(-534, 49, 92, 0.5)
pt3dadd(-532, 48, 92, 0.5)
pt3dadd(-530, 46, 94, 0.5)
pt3dadd(-528.5, 45, 90, 0.5)
pt3dadd(-526.5, 42, 88, 0.5)
}
dend[16] {pt3dclear()
pt3dadd(-572, 66, 100, 3.3)
pt3dadd(-576.5, 62.5, 96, 1.4)
pt3dadd(-580, 62, 96, 1.6)
pt3dadd(-583.5, 62, 96, 1)
pt3dadd(-585.5, 59, 94, 2)
pt3dadd(-588.5, 57, 94, 4.1)
pt3dadd(-592, 55, 92, 1.5)
pt3dadd(-595.5, 53, 92, 1.5)
pt3dadd(-596.5, 53, 92, 1.9)
pt3dadd(-599.5, 52.5, 100, 2)
pt3dadd(-601, 52.5, 98, 0.6)
pt3dadd(-603.5, 52.5, 98, 0.7)
pt3dadd(-604.5, 52.5, 98, 1.8)
pt3dadd(-605, 52.5, 98, 3.2)
pt3dadd(-608.5, 53.5, 98, 3.2)
pt3dadd(-612.5, 53.5, 98, 2.2)
pt3dadd(-616.5, 53, 96, 1.5)
pt3dadd(-619.5, 50.5, 96, 1.6)
pt3dadd(-622, 50.5, 96, 2.9)
pt3dadd(-625, 49, 96, 4)
pt3dadd(-629.5, 46, 96, 2.1)
pt3dadd(-633, 46, 96, 2)
pt3dadd(-637, 44.5, 96, 2.1)
pt3dadd(-641, 42.5, 92, 2.1)
pt3dadd(-644, 41.5, 102, 2.4)
pt3dadd(-645.5, 39.5, 102, 4.1)
pt3dadd(-647.5, 38, 102, 4.6)
pt3dadd(-651.5, 36.5, 102, 2.3)
pt3dadd(-655, 36, 102, 1.4)
pt3dadd(-657, 35.5, 102, 0.9)
pt3dadd(-659.5, 35, 102, 0.6)
pt3dadd(-661, 32.5, 102, 0.6)
pt3dadd(-663, 32, 102, 1)
pt3dadd(-665.5, 30.5, 102, 1.6)
pt3dadd(-669, 28.5, 102, 1.9)
pt3dadd(-671.5, 28.5, 104, 2.8)
pt3dadd(-673.5, 27, 104, 3.3)
}
}
proc shape3d_7() {
dend[16] { pt3dadd(-675, 27, 104, 1.4)
pt3dadd(-677, 26.5, 104, 3.1)
}
dend[17] {pt3dclear()
pt3dadd(-677, 26.5, 104, 3.1)
pt3dadd(-680, 22.5, 106, 0.3)
pt3dadd(-681, 22, 104, 0.3)
pt3dadd(-683.5, 21, 104, 0.3)
pt3dadd(-686.5, 20, 106, 0.3)
pt3dadd(-688.5, 17.5, 110, 1.1)
}
dend[18] {pt3dclear()
pt3dadd(-677, 26.5, 104, 3.1)
pt3dadd(-680.5, 26, 104, 1)
pt3dadd(-682, 26, 104, 1)
pt3dadd(-687, 24, 114, 1)
pt3dadd(-690, 23.5, 120.5, 0.3)
pt3dadd(-692, 22.5, 120.5, 1.8)
pt3dadd(-693, 22.5, 121.5, 3.6)
pt3dadd(-695.5, 22.5, 121.5, 1.1)
pt3dadd(-696.5, 21.5, 120.5, 1.2)
pt3dadd(-698, 20, 121.5, 1.2)
pt3dadd(-698.5, 19, 117.5, 0.9)
pt3dadd(-698.5, 16, 119, 0.6)
}
dend[19] {pt3dclear()
pt3dadd(-698.5, 16, 119, 0.6)
pt3dadd(-703, 15.5, 119, 0.1)
pt3dadd(-706, 15.5, 119, 0.1)
pt3dadd(-710, 15.5, 119, 0.1)
pt3dadd(-714, 15.5, 119, 0.1)
pt3dadd(-716.5, 15, 119, 1.3)
pt3dadd(-717.5, 14.5, 120.5, 2.5)
pt3dadd(-720, 13, 120.5, 1.5)
pt3dadd(-721, 12.5, 120.5, 0.1)
pt3dadd(-724.5, 12, 120.5, 0.1)
pt3dadd(-727, 9.5, 120.5, 0.1)
pt3dadd(-729.5, 9.5, 120.5, 0.1)
pt3dadd(-732.5, 9.5, 124.5, 2.9)
}
dend[20] {pt3dclear()
pt3dadd(-732.5, 9.5, 124.5, 2.9)
pt3dadd(-734.5, 8, 125.5, 0.1)
pt3dadd(-738.5, 4.5, 125.5, 0.1)
pt3dadd(-739.5, 4, 125.5, 0.1)
pt3dadd(-742.5, 3.5, 125.5, 1.2)
pt3dadd(-743.5, 1, 123, 0.1)
pt3dadd(-744, 1, 127, 1.1)
pt3dadd(-744, -1.5, 127, 1.4)
pt3dadd(-744.5, -2.5, 127, 0.1)
pt3dadd(-745.5, -4.5, 127, 0.1)
pt3dadd(-748, -5, 127, 1.4)
pt3dadd(-748.5, -6, 128, 0.1)
pt3dadd(-750.5, -9.5, 127, 0.1)
pt3dadd(-750.5, -9.5, 129.5, 0.9)
pt3dadd(-753, -10.5, 127, 0.1)
pt3dadd(-756.5, -10.5, 127, 0.1)
pt3dadd(-757.5, -12.5, 129.5, 1.3)
pt3dadd(-760.5, -12.5, 129.5, 0.1)
pt3dadd(-761.5, -13.5, 124.5, 0.1)
pt3dadd(-764, -14.5, 125.5, 1.1)
pt3dadd(-765.5, -16, 125.5, 0.1)
pt3dadd(-766.5, -18, 125.5, 0.1)
pt3dadd(-767.5, -18.5, 125.5, 1.1)
pt3dadd(-769.5, -21, 124.5, 0.1)
pt3dadd(-772, -21.5, 125.5, 0.1)
pt3dadd(-776, -25, 128, 1.7)
}
dend[21] {pt3dclear()
pt3dadd(-776, -25, 128, 1.7)
pt3dadd(-778, -23, 120.5, 0.1)
pt3dadd(-781.5, -25, 120.5, 0.1)
pt3dadd(-786.5, -24.5, 120.5, 0.1)
pt3dadd(-787.5, -24, 120.5, 0.1)
pt3dadd(-789.5, -24, 124.5, 1.9)
pt3dadd(-791, -24, 123, 2.6)
pt3dadd(-793, -25, 123, 1.3)
pt3dadd(-793, -28, 123, 0.1)
pt3dadd(-793, -30, 123, 0.1)
pt3dadd(-791, -30.5, 124.5, 1)
pt3dadd(-791, -31.5, 123, 1.5)
pt3dadd(-788.5, -34.5, 123, 1.1)
pt3dadd(-789, -36.5, 123, 0.1)
pt3dadd(-790.5, -37.5, 123, 0.1)
pt3dadd(-793.5, -39.5, 124.5, 0.1)
pt3dadd(-797, -39.5, 124.5, 0.1)
pt3dadd(-799, -42, 121.5, 0.1)
pt3dadd(-800.5, -43, 120.5, 0.1)
pt3dadd(-802.5, -44, 121.5, 0.1)
pt3dadd(-804, -46, 121.5, 1.7)
pt3dadd(-805.5, -47, 124.5, 3.4)
pt3dadd(-807.5, -51, 124.5, 2)
pt3dadd(-810, -53.5, 125.5, 0.7)
pt3dadd(-813.5, -53.5, 125.5, 0.7)
pt3dadd(-816.5, -53.5, 127, 0.7)
pt3dadd(-818.5, -53, 127, 0.7)
pt3dadd(-820, -52, 127, 0.7)
pt3dadd(-821, -52, 128, 2)
pt3dadd(-824, -48.5, 125.5, 0.3)
pt3dadd(-826.5, -49, 127, 0.3)
}
dend[22] {pt3dclear()
pt3dadd(-776, -25, 128, 1.7)
pt3dadd(-777, -27, 125.5, 0.1)
pt3dadd(-779, -29.5, 124.5, 1.1)
pt3dadd(-780.5, -31, 121.5, 0.1)
pt3dadd(-782, -33.5, 121.5, 0.1)
pt3dadd(-782, -34.5, 123, 0.1)
pt3dadd(-782, -36, 125.5, 1.9)
pt3dadd(-783, -37, 125.5, 0.9)
pt3dadd(-783.5, -38, 123, 0.1)
pt3dadd(-786, -40.5, 123, 0.1)
pt3dadd(-786, -43, 125.5, 1)
pt3dadd(-788, -44.5, 128, 0.1)
pt3dadd(-789, -44.5, 125.5, 0.1)
pt3dadd(-792, -44.5, 125.5, 1)
pt3dadd(-795, -46, 125.5, 0.1)
pt3dadd(-800, -46, 125.5, 0.1)
}
dend[23] {pt3dclear()
pt3dadd(-732.5, 9.5, 124.5, 2.9)
pt3dadd(-736.5, 10, 124.5, 0.1)
pt3dadd(-740.5, 9.5, 127, 0.1)
pt3dadd(-745, 5.5, 125.5, 0.1)
pt3dadd(-748.5, 4.5, 125.5, 0.1)
pt3dadd(-750.5, 4.5, 123, 1.4)
pt3dadd(-751.5, 3, 121.5, 1.4)
pt3dadd(-753, 2, 120.5, 1.1)
pt3dadd(-754, 1.5, 120.5, 0.1)
pt3dadd(-756.5, 1.5, 121.5, 0.1)
pt3dadd(-759, 0.5, 123, 0.1)
pt3dadd(-761, -2.5, 123, 0.1)
pt3dadd(-763, -2.5, 123, 0.1)
pt3dadd(-765, -2.5, 123, 0.1)
pt3dadd(-769, -5.5, 123, 0.1)
pt3dadd(-770, -5.5, 123, 0.1)
pt3dadd(-772, -5.5, 125.5, 0.1)
pt3dadd(-773.5, -5.5, 125.5, 0.1)
pt3dadd(-776, -5.5, 125.5, 0.1)
pt3dadd(-777.5, -5.5, 125.5, 0.1)
pt3dadd(-778.5, -7.5, 123, 0.1)
}
dend[24] {pt3dclear()
pt3dadd(-698.5, 16, 119, 0.6)
pt3dadd(-699.5, 13.5, 119, 0.6)
pt3dadd(-700.5, 12, 121.5, 1.9)
pt3dadd(-702, 10, 121.5, 2.8)
pt3dadd(-703.5, 9.5, 121.5, 2.8)
pt3dadd(-705, 9, 121.5, 3.6)
pt3dadd(-708, 7, 121.5, 1.5)
pt3dadd(-709, 5, 121.5, 1.2)
pt3dadd(-710.5, 5, 121.5, 0.7)
pt3dadd(-712, 5, 123, 0.7)
pt3dadd(-713, 5, 123, 1.1)
pt3dadd(-714, 5, 123, 1.4)
pt3dadd(-716.5, 5, 124.5, 2.5)
pt3dadd(-717.5, 5, 124.5, 3.4)
pt3dadd(-720, 5, 124.5, 1.3)
pt3dadd(-723, 5, 124.5, 1.3)
pt3dadd(-727.5, 5, 124.5, 1.5)
pt3dadd(-729, 5.5, 123, 2.1)
pt3dadd(-732, 5.5, 123, 2)
pt3dadd(-735, 5.5, 124.5, 1)
pt3dadd(-737.5, 7.5, 123, 1.1)
pt3dadd(-738.5, 7.5, 123, 3.3)
pt3dadd(-741, 7.5, 124.5, 3.8)
pt3dadd(-743, 9.5, 124.5, 2.8)
pt3dadd(-744.5, 10, 124.5, 1.4)
pt3dadd(-747, 10, 127, 0.3)
pt3dadd(-749, 12, 127, 1.1)
pt3dadd(-750.5, 14.5, 128, 2.1)
pt3dadd(-753, 15.5, 128, 1.7)
pt3dadd(-755, 15.5, 125.5, 0.8)
pt3dadd(-759, 18, 131, 0.9)
pt3dadd(-762.5, 19, 129.5, 1.1)
pt3dadd(-766, 21, 129.5, 1.1)
pt3dadd(-768, 21, 129.5, 1.1)
pt3dadd(-770, 20.5, 131, 2.6)
pt3dadd(-773, 19.5, 131, 2.9)
pt3dadd(-776, 19, 129.5, 2.3)
pt3dadd(-778.5, 19, 129.5, 1.3)
pt3dadd(-780.5, 18.5, 129.5, 0.7)
pt3dadd(-781.5, 17.5, 131, 0.8)
}
dend[25] {pt3dclear()
pt3dadd(-437.5, 118.5, 68.5, 7.6)
pt3dadd(-442, 114.5, 68.5, 2.6)
pt3dadd(-444.5, 112, 68.5, 2.7)
pt3dadd(-449, 112.5, 68.5, 2.6)
pt3dadd(-451.5, 110.5, 68.5, 2.8)
pt3dadd(-454.5, 107.5, 68.5, 2.5)
pt3dadd(-457, 108, 70, 3.3)
pt3dadd(-460.5, 107.5, 70, 3.6)
pt3dadd(-463, 106, 68.5, 3.2)
pt3dadd(-467.5, 106.5, 68.5, 3.3)
pt3dadd(-472, 104.5, 68.5, 4.1)
pt3dadd(-478.5, 103, 74.5, 5.1)
pt3dadd(-481.5, 102, 74.5, 4)
pt3dadd(-484, 101, 74.5, 2.2)
pt3dadd(-487.5, 101, 74.5, 2.6)
pt3dadd(-490.5, 101.5, 74.5, 3.5)
pt3dadd(-494.5, 102, 76, 2.7)
pt3dadd(-498.5, 101.5, 76, 2.2)
pt3dadd(-501.5, 100.5, 76, 3.8)
pt3dadd(-505.5, 101.5, 76, 4.6)
pt3dadd(-509.5, 100, 76, 5.2)
pt3dadd(-516.5, 97, 76, 3.8)
pt3dadd(-519.5, 98, 76, 2.3)
pt3dadd(-523, 97.5, 76, 1.8)
pt3dadd(-525.5, 98, 76, 2.4)
pt3dadd(-528, 100.5, 76, 1.9)
pt3dadd(-530.5, 99.5, 76, 1.9)
pt3dadd(-534.5, 101, 76, 3.8)
pt3dadd(-538, 100.5, 76, 3.8)
pt3dadd(-539, 98, 76, 2.8)
pt3dadd(-544, 98, 76, 2.8)
pt3dadd(-549, 95.5, 76, 3.5)
pt3dadd(-552.5, 96, 74.5, 3.8)
}
}
proc shape3d_8() {
dend[25] { pt3dadd(-556, 95, 79, 3.4)
pt3dadd(-560, 92, 77.5, 2.3)
pt3dadd(-563, 93, 77.5, 2.5)
pt3dadd(-565.5, 93, 76, 4.6)
pt3dadd(-569, 90, 76, 3.6)
pt3dadd(-571.5, 90, 76, 4.1)
pt3dadd(-575.5, 88, 77.5, 4.1)
pt3dadd(-579.5, 86.5, 77.5, 2.5)
pt3dadd(-580.5, 86.5, 77.5, 2)
pt3dadd(-582.5, 87, 76, 1.6)
pt3dadd(-584, 87, 76, 1.9)
pt3dadd(-586.5, 87, 76, 3.3)
pt3dadd(-589.5, 83.5, 76, 3.3)
pt3dadd(-595, 83.5, 82, 4.6)
pt3dadd(-597, 80.5, 82, 3.6)
pt3dadd(-601.5, 80.5, 82, 3.2)
pt3dadd(-603.5, 81, 82, 3.2)
pt3dadd(-607.5, 81, 82, 3.3)
pt3dadd(-609, 80, 82, 2.8)
pt3dadd(-612.5, 80, 82, 2.8)
pt3dadd(-616, 81, 83.5, 2.8)
pt3dadd(-618.5, 82, 83.5, 4)
pt3dadd(-625, 81, 83.5, 5.2)
pt3dadd(-628, 81, 83.5, 4.3)
pt3dadd(-630.5, 80.5, 83.5, 2.6)
pt3dadd(-632.5, 80.5, 83.5, 3)
pt3dadd(-634, 80.5, 83.5, 2.9)
pt3dadd(-636, 80.5, 83.5, 1.4)
pt3dadd(-638.5, 80.5, 83.5, 1.7)
pt3dadd(-638, 79.5, 83.5, 1.7)
pt3dadd(-642.5, 80, 83.5, 2.5)
pt3dadd(-646.5, 80, 85.5, 2.9)
pt3dadd(-650.5, 80, 85.5, 2.9)
pt3dadd(-654, 80, 85.5, 2)
pt3dadd(-657.5, 80, 85.5, 1.3)
pt3dadd(-659, 82, 87.5, 1.7)
pt3dadd(-662.5, 82, 89.5, 4.6)
}
dend[26] {pt3dclear()
pt3dadd(-662.5, 82, 89.5, 4.6)
pt3dadd(-662, 78, 93.5, 0.9)
pt3dadd(-664, 76, 95.5, 0.8)
pt3dadd(-665, 72.5, 97.5, 1.2)
pt3dadd(-665.5, 70, 97.5, 1.2)
pt3dadd(-665.5, 69, 97.5, 0.9)
pt3dadd(-665.5, 66, 97.5, 0.8)
pt3dadd(-665.5, 64.5, 99.5, 2)
pt3dadd(-666.5, 62.5, 105.5, 3.6)
pt3dadd(-666, 59, 105.5, 2.3)
pt3dadd(-666.5, 57.5, 105.5, 0.9)
pt3dadd(-666.5, 53.5, 107.5, 0.9)
pt3dadd(-668.5, 52, 107.5, 0.9)
pt3dadd(-668.5, 49, 107.5, 0.9)
pt3dadd(-670.5, 48, 107.5, 0.9)
pt3dadd(-672.5, 46.5, 113.5, 0.7)
pt3dadd(-674, 45, 113.5, 0.8)
pt3dadd(-677.5, 43, 117.5, 1.7)
pt3dadd(-682, 40.5, 115.5, 1.1)
pt3dadd(-683.5, 39, 117.5, 0.6)
pt3dadd(-687, 37, 119.5, 0.6)
pt3dadd(-690, 34.5, 121.5, 2.1)
pt3dadd(-692.5, 34.5, 121.5, 2.7)
pt3dadd(-694.5, 34, 121.5, 1.3)
pt3dadd(-697.5, 32.5, 97.5, 1.1)
pt3dadd(-700, 31.5, 99.5, 1.1)
pt3dadd(-702, 29.5, 103.5, 2.6)
}
dend[27] {pt3dclear()
pt3dadd(-702, 29.5, 103.5, 2.6)
pt3dadd(-705, 24, 105.5, 0.1)
pt3dadd(-707.5, 22.5, 103.5, 0.1)
pt3dadd(-709, 21.5, 97.5, 2.4)
pt3dadd(-712, 21, 99.5, 0.2)
pt3dadd(-715.5, 21, 99.5, 0.2)
pt3dadd(-717, 21, 101.5, 0.7)
pt3dadd(-719.5, 21, 103.5, 0.7)
pt3dadd(-722.5, 21, 93.5, 0.3)
pt3dadd(-725, 21.5, 95.5, 0.3)
pt3dadd(-728, 21.5, 95.5, 0.3)
pt3dadd(-730.5, 21.5, 95.5, 0.3)
pt3dadd(-731.5, 21.5, 95.5, 0.5)
pt3dadd(-734.5, 21, 95.5, 0.5)
pt3dadd(-737, 20.5, 95.5, 0.5)
pt3dadd(-739, 20.5, 95.5, 0.5)
pt3dadd(-742.5, 20.5, 95.5, 0.6)
pt3dadd(-744.5, 20.5, 95.5, 0.6)
pt3dadd(-748, 20.5, 97.5, 0.2)
pt3dadd(-749, 20.5, 97.5, 0.2)
pt3dadd(-753.5, 20, 99.5, 0.6)
pt3dadd(-756.5, 20, 99.5, 0.6)
pt3dadd(-758.5, 18.5, 93.5, 0.6)
pt3dadd(-760, 17, 95.5, 1.1)
pt3dadd(-762, 17, 91.5, 1.3)
pt3dadd(-764, 15, 93.5, 0.3)
pt3dadd(-766, 15, 95.5, 0.3)
pt3dadd(-768, 15, 95.5, 0.3)
pt3dadd(-771, 12, 97.5, 1.2)
pt3dadd(-773.5, 11, 95.5, 0.1)
}
dend[28] {pt3dclear()
pt3dadd(-702, 29.5, 103.5, 2.6)
pt3dadd(-702, 26.5, 101.5, 0.9)
pt3dadd(-702.5, 24, 101.5, 0.7)
pt3dadd(-703, 22, 101.5, 0.8)
pt3dadd(-705.5, 20.5, 101.5, 0.7)
pt3dadd(-706, 19.5, 103.5, 1.1)
pt3dadd(-706.5, 18, 109.5, 1.1)
pt3dadd(-707.5, 15.5, 109.5, 1.1)
pt3dadd(-709.5, 13, 109.5, 1.1)
pt3dadd(-709.5, 12, 109.5, 1.8)
pt3dadd(-709.5, 9.5, 111.5, 2.8)
pt3dadd(-711.5, 7, 111.5, 1.1)
pt3dadd(-713, 6, 111.5, 0.3)
pt3dadd(-716, 3, 111.5, 0.3)
pt3dadd(-717.5, 1, 113.5, 1.2)
pt3dadd(-722, -2.5, 113.5, 1.2)
pt3dadd(-724, -3, 113.5, 0.4)
pt3dadd(-726.5, -7.5, 117.5, 0.3)
pt3dadd(-727.5, -8.5, 125.5, 2.1)
pt3dadd(-729.5, -11.5, 125.5, 2.5)
pt3dadd(-730.5, -12.5, 113.5, 1.4)
pt3dadd(-733.5, -15.5, 117.5, 0.7)
pt3dadd(-736, -18.5, 119.5, 0.7)
pt3dadd(-737.5, -19.5, 121.5, 2.7)
pt3dadd(-738, -22, 123.5, 3.4)
pt3dadd(-740.5, -23.5, 123.5, 0.9)
pt3dadd(-743, -26.5, 123.5, 0.6)
pt3dadd(-746.5, -25.5, 121.5, 2.5)
pt3dadd(-746.5, -29, 123.5, 0.1)
pt3dadd(-750.5, -29, 125.5, 0.1)
pt3dadd(-752.5, -30, 127.5, 3.4)
pt3dadd(-755, -30, 125.5, 0.7)
pt3dadd(-757.5, -30, 125.5, 0.7)
pt3dadd(-757, -32, 127.5, 0.7)
}
dend[29] {pt3dclear()
pt3dadd(-662.5, 82, 89.5, 4.6)
pt3dadd(-666, 83.5, 93.5, 1.8)
pt3dadd(-668.5, 85.5, 93.5, 1.8)
pt3dadd(-672, 85.5, 93.5, 3.3)
pt3dadd(-673.5, 86, 93.5, 4.1)
pt3dadd(-676.5, 86, 93.5, 3.3)
pt3dadd(-678.5, 87, 93.5, 2)
pt3dadd(-680.5, 87.5, 93.5, 0.9)
pt3dadd(-684, 87.5, 93.5, 0.9)
pt3dadd(-685.5, 88, 93.5, 0.9)
pt3dadd(-688, 88, 93.5, 0.9)
pt3dadd(-691, 88, 95.5, 2.5)
pt3dadd(-694, 89, 97.5, 3.9)
pt3dadd(-695.5, 89, 97.5, 4.3)
pt3dadd(-698, 89.5, 97.5, 3)
pt3dadd(-701, 90.5, 93.5, 1.4)
pt3dadd(-702.5, 90.5, 103.5, 1.5)
pt3dadd(-704.5, 90.5, 103.5, 1.6)
pt3dadd(-706.5, 91.5, 103.5, 1.6)
pt3dadd(-708.5, 93.5, 103.5, 1.6)
pt3dadd(-711.5, 92.5, 113.5, 2.5)
pt3dadd(-715, 92.5, 111.5, 1.8)
pt3dadd(-717, 93, 111.5, 1.6)
pt3dadd(-719.5, 94.5, 111.5, 1.5)
pt3dadd(-720.5, 96.5, 109.5, 2.9)
pt3dadd(-723.5, 99, 115.5, 2.5)
pt3dadd(-726, 99, 116.5, 3.5)
pt3dadd(-727, 99, 116.5, 4.4)
pt3dadd(-730, 99, 119.5, 2.7)
pt3dadd(-731, 99, 119.5, 1.3)
pt3dadd(-732, 99, 119.5, 1.3)
pt3dadd(-734, 98.5, 119.5, 2)
pt3dadd(-736, 97.5, 119.5, 3.3)
pt3dadd(-740, 96, 120.5, 4.4)
}
dend[30] {pt3dclear()
pt3dadd(-740, 96, 120.5, 4.4)
pt3dadd(-742.5, 96.5, 122, 0.4)
pt3dadd(-743.5, 96.5, 120.5, 0.4)
pt3dadd(-744, 98, 122, 1.3)
pt3dadd(-745.5, 98, 122, 1.6)
pt3dadd(-748, 99, 123.5, 0.8)
pt3dadd(-750.5, 99, 123.5, 0.5)
pt3dadd(-755.5, 100.5, 123.5, 0.6)
pt3dadd(-756.5, 100.5, 122, 2.2)
pt3dadd(-758.5, 100.5, 123.5, 3.6)
pt3dadd(-761, 101.5, 124.5, 1.9)
pt3dadd(-764.5, 102, 124.5, 0.7)
pt3dadd(-766, 103, 124.5, 0.7)
pt3dadd(-769, 105, 126, 0.9)
pt3dadd(-772, 106.5, 127, 0.9)
pt3dadd(-773.5, 106, 123.5, 1.7)
pt3dadd(-774.5, 106.5, 123.5, 2)
pt3dadd(-776.5, 106.5, 123.5, 0.6)
pt3dadd(-778, 108.5, 120.5, 0.6)
pt3dadd(-779.5, 109, 122, 2.1)
pt3dadd(-780.5, 110, 123.5, 3.7)
pt3dadd(-782.5, 110, 122, 1.3)
pt3dadd(-784, 110, 123.5, 0.9)
pt3dadd(-786.5, 110, 123.5, 0.7)
pt3dadd(-788, 110.5, 123.5, 1.4)
pt3dadd(-789, 110.5, 123.5, 2)
pt3dadd(-790.5, 112.5, 124.5, 0.7)
pt3dadd(-792, 112.5, 126, 0.3)
pt3dadd(-795, 112.5, 126, 0.3)
pt3dadd(-797, 113, 126, 1.7)
pt3dadd(-799, 113, 127, 2.6)
pt3dadd(-801, 114, 124.5, 1.1)
pt3dadd(-802.5, 114, 124.5, 0.6)
pt3dadd(-806.5, 113.5, 124.5, 0.6)
pt3dadd(-808, 113.5, 124.5, 0.6)
pt3dadd(-810.5, 113.5, 124.5, 2.1)
pt3dadd(-813, 113.5, 126, 2.3)
pt3dadd(-815, 113.5, 126, 1.4)
}
}
proc shape3d_9() {
dend[30] { pt3dadd(-818.5, 114.5, 126, 0.6)
pt3dadd(-821.5, 114.5, 126, 0.7)
pt3dadd(-825.5, 116, 126, 1.1)
pt3dadd(-828.5, 116, 126, 0.7)
pt3dadd(-832.5, 116, 126, 0.7)
pt3dadd(-834.5, 116.5, 126, 0.7)
pt3dadd(-837, 118, 126, 2.1)
pt3dadd(-840.5, 118, 126, 0.7)
pt3dadd(-847, 119, 126, 0.7)
pt3dadd(-850.5, 122.5, 127, 0.7)
pt3dadd(-853.5, 123.5, 127, 1.4)
pt3dadd(-855, 126, 127, 1.8)
pt3dadd(-856.5, 128, 128.5, 1.1)
pt3dadd(-858.5, 131, 128.5, 0.3)
pt3dadd(-859, 133, 128.5, 0.3)
pt3dadd(-860.5, 136, 130, 0.9)
pt3dadd(-862.5, 136.5, 130, 1)
pt3dadd(-866, 138, 130, 0.5)
pt3dadd(-866.5, 139, 131, 1.9)
pt3dadd(-869.5, 139, 132.5, 2.3)
pt3dadd(-871, 141, 130, 0.5)
pt3dadd(-875, 143, 131, 0.5)
pt3dadd(-879.5, 143.5, 131, 0.5)
pt3dadd(-883, 144.5, 134, 0.5)
}
dend[31] {pt3dclear()
pt3dadd(-740, 96, 120.5, 4.4)
pt3dadd(-743, 92.5, 119.5, 1.2)
pt3dadd(-744.5, 92.5, 119.5, 1.2)
pt3dadd(-747, 92.5, 119.5, 1.2)
pt3dadd(-750, 92.5, 123.5, 1.8)
pt3dadd(-751.5, 92.5, 123.5, 3.3)
pt3dadd(-754, 90.5, 124.5, 2)
pt3dadd(-755.5, 90.5, 124.5, 0.9)
pt3dadd(-758, 90, 124.5, 0.9)
pt3dadd(-759.5, 90, 124.5, 0.9)
pt3dadd(-760.5, 91, 126, 0.9)
pt3dadd(-762, 91, 126, 1.4)
pt3dadd(-763.5, 91, 127, 1.9)
pt3dadd(-766, 91, 127, 3.2)
pt3dadd(-769, 90, 127, 1.7)
pt3dadd(-770, 88.5, 127, 1.7)
pt3dadd(-771.5, 89, 127, 1.7)
pt3dadd(-774.5, 89, 127, 2)
pt3dadd(-777, 88, 127, 2.8)
pt3dadd(-778, 85.5, 127, 3.5)
pt3dadd(-781.5, 84.5, 128.5, 2.1)
pt3dadd(-784, 82.5, 127, 1.6)
pt3dadd(-786.5, 82, 127, 1.8)
pt3dadd(-788.5, 82, 127, 1.6)
pt3dadd(-790.5, 81.5, 127, 2.4)
pt3dadd(-793, 80, 127, 1.1)
pt3dadd(-794, 80, 127, 0.7)
pt3dadd(-796, 79.5, 127, 1.4)
pt3dadd(-797.5, 77.5, 128.5, 2.6)
pt3dadd(-799.5, 77, 128.5, 3.1)
pt3dadd(-802, 74.5, 128.5, 2.3)
pt3dadd(-804.5, 74, 128.5, 1.4)
pt3dadd(-806.5, 73, 130, 1)
pt3dadd(-812.5, 69.5, 131, 0.7)
pt3dadd(-813, 67, 132.5, 1.2)
pt3dadd(-815, 67, 132.5, 2.4)
pt3dadd(-816.5, 66.5, 132.5, 1.3)
pt3dadd(-818, 66.5, 132.5, 0.9)
pt3dadd(-819.5, 64.5, 132.5, 0.9)
pt3dadd(-820.5, 64, 132.5, 1.6)
pt3dadd(-822.5, 63.5, 132.5, 1.7)
pt3dadd(-825, 61, 132.5, 0.7)
pt3dadd(-826.5, 61, 132.5, 0.7)
pt3dadd(-828.5, 59.5, 132.5, 2.1)
pt3dadd(-830, 59.5, 132.5, 3.2)
pt3dadd(-831.5, 58, 132.5, 2)
pt3dadd(-834, 56.5, 132.5, 1.1)
pt3dadd(-835.5, 56.5, 132.5, 0.6)
pt3dadd(-838, 54.5, 132.5, 0.6)
pt3dadd(-842, 52.5, 132.5, 0.6)
pt3dadd(-844.5, 52, 132.5, 1.7)
pt3dadd(-846.5, 50.5, 135, 3.6)
pt3dadd(-849.5, 49, 135, 2.2)
pt3dadd(-852.5, 47.5, 132.5, 0.5)
pt3dadd(-855.5, 46.5, 132.5, 0.5)
pt3dadd(-859, 46, 132.5, 0.5)
pt3dadd(-861, 45.5, 134, 2.4)
pt3dadd(-863, 45, 135, 3.2)
pt3dadd(-866, 44, 135, 2.2)
pt3dadd(-869.5, 44, 135, 1.6)
pt3dadd(-871.5, 43, 135, 0.9)
pt3dadd(-875, 43, 136.5, 1)
pt3dadd(-878.5, 43, 136.5, 1.2)
pt3dadd(-881, 43, 136.5, 1.8)
pt3dadd(-884.5, 43, 136.5, 0.7)
pt3dadd(-889, 41.5, 136.5, 1)
pt3dadd(-891, 42, 136.5, 0.8)
pt3dadd(-895, 42, 136.5, 0.8)
pt3dadd(-897.5, 41.5, 136.5, 0.9)
pt3dadd(-901, 40, 136.5, 0.9)
pt3dadd(-903.5, 38.5, 136.5, 1.1)
pt3dadd(-906, 37, 136.5, 1.4)
pt3dadd(-908.5, 35.5, 136.5, 0.6)
pt3dadd(-911, 33.5, 136.5, 0.6)
pt3dadd(-913.5, 34, 135, 1.5)
pt3dadd(-915.5, 34, 135, 2.2)
pt3dadd(-917.5, 34, 135, 1.7)
pt3dadd(-920.5, 33.5, 135, 1.2)
pt3dadd(-923.5, 32.5, 135, 1.5)
pt3dadd(-926.5, 32, 135, 1.6)
pt3dadd(-929, 31.5, 135, 1.9)
pt3dadd(-931.5, 31.5, 135, 1.9)
pt3dadd(-937, 31, 136.5, 1.5)
pt3dadd(-940.5, 31, 136.5, 1.5)
pt3dadd(-943.5, 31, 136.5, 1.8)
pt3dadd(-947, 33, 143, 1.8)
}
dend[32] {pt3dclear()
pt3dadd(-6, 18.5, -1, 9.3)
pt3dadd(-13, 22, -1, 8.4)
pt3dadd(-17, 24.5, -1, 7.5)
pt3dadd(-22, 25.5, 2, 9.3)
pt3dadd(-26.5, 27.5, 2, 8.2)
pt3dadd(-32.5, 29, 3.5, 9.6)
pt3dadd(-34, 33, 6, 6.6)
pt3dadd(-36.5, 32.5, 6, 6.2)
pt3dadd(-39.5, 27.5, 5, 6.8)
pt3dadd(-42.5, 31.5, 5, 6.8)
pt3dadd(-46.5, 31.5, 13.5, 6.8)
pt3dadd(-50.5, 30.5, 13.5, 6.8)
pt3dadd(-54.5, 28.5, 15, 8.9)
}
dend[33] {pt3dclear()
pt3dadd(-54.5, 28.5, 15, 8.9)
pt3dadd(-52, 22, 13.5, 3.4)
pt3dadd(-50, 22, 13.5, 3.4)
pt3dadd(-46.5, 22, 13.5, 3.6)
pt3dadd(-44.5, 21, 20.5, 3.6)
pt3dadd(-41.5, 19, 22, 3.5)
}
dend[34] {pt3dclear()
pt3dadd(-54.5, 28.5, 15, 8.9)
pt3dadd(-57.5, 27.5, 15, 9.7)
pt3dadd(-61, 24, 16, 8.3)
pt3dadd(-64, 23, 16, 7.3)
pt3dadd(-67.5, 22, 16, 6.3)
pt3dadd(-71.5, 20, 16, 7.2)
pt3dadd(-75.5, 20, 16, 8.6)
pt3dadd(-83, 18, 23.5, 8.2)
pt3dadd(-89, 18.5, 27, 7.4)
pt3dadd(-94.5, 17.5, 30.5, 7.8)
pt3dadd(-100.5, 16.5, 30.5, 7.8)
pt3dadd(-106.5, 16.5, 30.5, 7.8)
pt3dadd(-110.5, 16.5, 32.5, 7.8)
pt3dadd(-116, 15.5, 30.5, 7.8)
pt3dadd(-121.5, 12.5, 34, 7.3)
pt3dadd(-125.5, 11, 36, 7.9)
pt3dadd(-131, 10.5, 36, 7.9)
pt3dadd(-138, 8.5, 36, 7.4)
pt3dadd(-143, 8, 36, 7)
pt3dadd(-149.5, 7, 37.5, 7.4)
pt3dadd(-154.5, 5, 37.5, 8)
pt3dadd(-159.5, 1.5, 41.5, 8.1)
pt3dadd(-165, -2, 43, 5.1)
pt3dadd(-169.5, -4.5, 40, 5.1)
pt3dadd(-175, -6, 40, 6.1)
pt3dadd(-179.5, -9.5, 43, 7)
pt3dadd(-184.5, -11, 43, 7)
pt3dadd(-188, -12.5, 41.5, 7)
pt3dadd(-190.5, -14.5, 41.5, 7.3)
}
dend[35] {pt3dclear()
pt3dadd(-190.5, -14.5, 41.5, 7.3)
pt3dadd(-192, -21, 46, 2.7)
pt3dadd(-192, -25.5, 46, 2.7)
pt3dadd(-193.5, -26.5, 46, 2.9)
pt3dadd(-193.5, -29, 44.5, 2.9)
pt3dadd(-195, -31.5, 46, 4)
}
dend[36] {pt3dclear()
pt3dadd(-195, -31.5, 46, 4)
pt3dadd(-192, -31.5, 46, 0.1)
pt3dadd(-192.5, -34, 47.5, 0.1)
pt3dadd(-196.5, -35.5, 47.5, 0.1)
pt3dadd(-198, -39, 47.5, 0.1)
pt3dadd(-200, -43.5, 47.5, 0.1)
pt3dadd(-200, -44.5, 49, 0.1)
pt3dadd(-200, -46.5, 50.5, 0.1)
pt3dadd(-201.5, -49, 52, 0.1)
}
dend[37] {pt3dclear()
pt3dadd(-195, -31.5, 46, 4)
pt3dadd(-198.5, -35, 46, 2.7)
pt3dadd(-201, -38.5, 49, 1.9)
pt3dadd(-202, -39, 49, 2.8)
pt3dadd(-203.5, -42, 50.5, 4)
pt3dadd(-206.5, -38.5, 55, 4)
pt3dadd(-208, -38, 55, 3.6)
pt3dadd(-211, -38.5, 56.5, 2.2)
pt3dadd(-211, -40, 55, 2)
pt3dadd(-211, -42, 59.5, 3.1)
pt3dadd(-211, -44, 59.5, 3.2)
pt3dadd(-215.5, -44, 61, 2.8)
pt3dadd(-216.5, -43.5, 59.5, 3.3)
pt3dadd(-218.5, -43.5, 59.5, 2.3)
pt3dadd(-221.5, -43.5, 59.5, 2.3)
pt3dadd(-225, -43.5, 59.5, 2.3)
pt3dadd(-228.5, -45.5, 58, 2.8)
pt3dadd(-232, -47, 58, 3.6)
pt3dadd(-235, -47, 58, 3.7)
pt3dadd(-239, -48.5, 58, 3.6)
pt3dadd(-243, -48.5, 56, 2.3)
pt3dadd(-244.5, -48, 58, 1.1)
pt3dadd(-247, -48, 54, 2)
}
dend[38] {pt3dclear()
pt3dadd(-247, -48, 54, 2)
pt3dadd(-250.5, -49.5, 52, 1)
pt3dadd(-251, -51, 54, 3)
pt3dadd(-253.5, -53.5, 54, 4.1)
}
}
proc shape3d_10() {
dend[38] { pt3dadd(-256.5, -55.5, 52, 1.6)
pt3dadd(-259, -57, 52, 1.4)
pt3dadd(-261, -59.5, 52, 1.6)
pt3dadd(-264, -60, 52, 1.6)
pt3dadd(-267.5, -60, 52, 2)
pt3dadd(-269, -62, 52, 1.5)
pt3dadd(-271.5, -62, 52, 1.2)
pt3dadd(-272, -62, 52, 2.2)
pt3dadd(-273.5, -62.5, 54, 4)
pt3dadd(-276, -65.5, 52, 1.6)
pt3dadd(-278, -65.5, 52, 1.3)
pt3dadd(-279, -66.5, 60, 1.3)
pt3dadd(-281, -68.5, 60, 2.3)
pt3dadd(-284, -69.5, 60, 0.7)
pt3dadd(-286, -72, 60, 1.3)
pt3dadd(-288, -74.5, 60, 1.3)
pt3dadd(-291.5, -78.5, 62.5, 0.8)
pt3dadd(-291.5, -80, 62.5, 0.5)
pt3dadd(-292, -81, 62.5, 1.2)
pt3dadd(-293, -81, 62.5, 2)
pt3dadd(-295.5, -82, 62.5, 2.8)
pt3dadd(-298.5, -84.5, 62.5, 1.8)
pt3dadd(-301, -86, 62.5, 0.9)
pt3dadd(-301, -88.5, 62.5, 0.9)
pt3dadd(-301, -89, 62.5, 1.5)
pt3dadd(-302, -90.5, 62.5, 2.9)
pt3dadd(-303.5, -92.5, 62.5, 2.9)
pt3dadd(-305, -96.5, 62.5, 1.8)
pt3dadd(-305.5, -97.5, 62.5, 0.9)
pt3dadd(-306, -100, 62.5, 0.9)
pt3dadd(-307, -100, 61.5, 1.6)
pt3dadd(-308.5, -100.5, 70.5, 1.2)
pt3dadd(-309, -100.5, 69, 1.2)
pt3dadd(-309.5, -103, 68, 2.1)
pt3dadd(-309.5, -104.5, 66.5, 1.3)
pt3dadd(-310, -105, 66.5, 0.5)
pt3dadd(-311.5, -106, 66.5, 0.5)
pt3dadd(-312.5, -106, 66.5, 0.5)
pt3dadd(-313, -107, 66.5, 1.6)
pt3dadd(-313, -108.5, 66.5, 2.9)
pt3dadd(-313.5, -111, 65.5, 3.3)
pt3dadd(-315.5, -112.5, 66.5, 3.3)
pt3dadd(-316, -114, 66.5, 1.9)
pt3dadd(-317, -115.5, 66.5, 1.1)
pt3dadd(-318, -116, 66.5, 1.1)
pt3dadd(-319, -118.5, 68, 2.2)
pt3dadd(-320, -120, 68, 2.2)
pt3dadd(-319, -121, 68, 4.4)
pt3dadd(-321, -123, 85, 2.3)
pt3dadd(-322, -124.5, 85, 2.3)
pt3dadd(-322, -126, 78.5, 5)
pt3dadd(-323, -128, 80, 3.1)
pt3dadd(-325.5, -124.5, 80, 2.4)
pt3dadd(-327.5, -124, 80, 2.1)
}
dend[39] {pt3dclear()
pt3dadd(-247, -48, 54, 2)
pt3dadd(-250, -48, 54, 1.1)
pt3dadd(-253.5, -48, 54, 1.4)
pt3dadd(-257, -48, 54, 1.7)
pt3dadd(-259.5, -48, 54, 1.2)
pt3dadd(-263, -48, 54, 1.2)
pt3dadd(-265, -48, 54, 1.5)
pt3dadd(-267, -49.5, 52, 2.1)
pt3dadd(-270, -51.5, 50, 2.7)
pt3dadd(-273.5, -55, 50, 2.3)
pt3dadd(-274.5, -56, 50, 1.4)
pt3dadd(-276, -57, 50, 1.1)
pt3dadd(-276.5, -59, 50, 2.1)
pt3dadd(-280, -60.5, 50, 2.1)
pt3dadd(-281.5, -63, 50, 1.7)
pt3dadd(-284, -66, 50, 2.9)
pt3dadd(-287.5, -68, 50, 2.9)
pt3dadd(-290.5, -69, 54, 1.6)
pt3dadd(-291, -70.5, 54, 1.4)
pt3dadd(-294.5, -70.5, 54, 1.4)
pt3dadd(-299, -71.5, 56, 1.4)
pt3dadd(-301.5, -71.5, 56, 1.4)
pt3dadd(-306, -71.5, 58, 1.6)
pt3dadd(-308.5, -72, 58, 1.6)
pt3dadd(-312.5, -75, 54, 1.2)
pt3dadd(-315, -77.5, 62, 2.7)
pt3dadd(-317, -80.5, 76, 3.3)
pt3dadd(-319.5, -81.5, 79, 0.9)
pt3dadd(-322, -83.5, 79, 1.6)
pt3dadd(-322.5, -84, 79, 2.6)
pt3dadd(-326, -85.5, 79, 1.2)
pt3dadd(-326, -87.5, 80, 1.2)
pt3dadd(-326.5, -88, 80, 1.2)
pt3dadd(-328.5, -88.5, 80, 2.9)
pt3dadd(-331, -89, 80, 3.1)
pt3dadd(-333.5, -90.5, 80, 2.1)
pt3dadd(-334.5, -92.5, 80, 2.1)
pt3dadd(-333, -94.5, 84, 2.9)
pt3dadd(-333, -96, 84, 2.6)
pt3dadd(-335, -96.5, 84, 2)
pt3dadd(-337, -97, 85.5, 1.8)
pt3dadd(-337.5, -100, 84, 1.8)
pt3dadd(-339.5, -103, 84, 3.3)
pt3dadd(-341.5, -104.5, 84, 2.6)
pt3dadd(-343.5, -107.5, 84, 1.7)
pt3dadd(-345.5, -109, 81.5, 2.4)
pt3dadd(-346, -111.5, 92, 2.2)
pt3dadd(-346, -116, 90.5, 2.8)
pt3dadd(-346, -117.5, 92, 3.3)
pt3dadd(-347.5, -119.5, 92, 2.3)
pt3dadd(-347.5, -123.5, 92, 1.8)
pt3dadd(-348.5, -125, 93.5, 2.3)
pt3dadd(-349, -128, 93.5, 3.9)
}
dend[40] {pt3dclear()
pt3dadd(-349, -128, 93.5, 3.9)
pt3dadd(-353.5, -127.5, 94.5, 1.7)
pt3dadd(-357, -127, 93.5, 1.6)
}
dend[41] {pt3dclear()
pt3dadd(-349, -128, 93.5, 3.9)
pt3dadd(-349, -131.5, 93.5, 2.8)
pt3dadd(-349, -133, 93.5, 1.4)
pt3dadd(-349, -134, 93.5, 0.9)
pt3dadd(-349, -138, 94.5, 2.3)
pt3dadd(-349, -141, 94.5, 2.3)
pt3dadd(-348.5, -142.5, 94.5, 2)
pt3dadd(-348, -143, 94.5, 1.1)
pt3dadd(-347, -145, 92, 1.3)
pt3dadd(-345.5, -145.5, 92, 2.8)
pt3dadd(-343.5, -147.5, 94.5, 3.2)
pt3dadd(-341, -150, 92, 3.5)
pt3dadd(-340.5, -152, 92, 3.1)
pt3dadd(-340.5, -154, 92, 2.9)
pt3dadd(-340.5, -155, 92, 1.7)
pt3dadd(-340.5, -158, 92, 2.2)
pt3dadd(-340.5, -160, 92, 2.2)
pt3dadd(-341, -161.5, 93.5, 2.9)
pt3dadd(-340, -162.5, 93.5, 3.3)
pt3dadd(-340.5, -166, 93.5, 2.5)
pt3dadd(-341, -166, 93.5, 1.3)
pt3dadd(-341, -168.5, 93.5, 1.4)
pt3dadd(-341, -169, 93.5, 1.5)
pt3dadd(-340, -170.5, 93.5, 1.5)
pt3dadd(-340.5, -172, 92, 1.5)
pt3dadd(-339, -173, 94.5, 1.7)
pt3dadd(-337.5, -175.5, 94.5, 1.2)
pt3dadd(-337.5, -178.5, 96, 2.5)
pt3dadd(-336.5, -180, 96, 1.5)
pt3dadd(-336, -183.5, 96, 1.7)
pt3dadd(-334.5, -186.5, 96, 1.7)
pt3dadd(-334.5, -189, 96, 1.7)
pt3dadd(-337, -192.5, 98.5, 1.7)
pt3dadd(-338, -196.5, 94.5, 2.4)
pt3dadd(-338, -200, 94.5, 2.7)
pt3dadd(-335.5, -203, 96, 1.9)
pt3dadd(-335, -204, 96, 1.4)
pt3dadd(-334, -206.5, 96, 0.7)
pt3dadd(-332, -209.5, 96, 0.8)
pt3dadd(-332, -211, 96, 1.3)
pt3dadd(-333, -214, 97.5, 2.4)
pt3dadd(-333, -216, 97.5, 1.7)
pt3dadd(-333, -218.5, 97.5, 1.4)
pt3dadd(-333, -222, 97.5, 1.9)
pt3dadd(-332, -224, 97.5, 1.6)
pt3dadd(-332, -227, 97.5, 2.4)
pt3dadd(-332, -230.5, 97.5, 2.4)
pt3dadd(-332, -234.5, 97.5, 2.3)
pt3dadd(-332, -238, 97.5, 2.3)
pt3dadd(-333, -240, 97.5, 2.1)
pt3dadd(-333.5, -243.5, 94.5, 1.3)
pt3dadd(-333, -246.5, 96, 1.6)
pt3dadd(-332.5, -251, 97.5, 1.6)
pt3dadd(-333, -252.5, 98.5, 1.6)
pt3dadd(-332, -256, 100, 1.1)
pt3dadd(-331, -261, 101, 1.5)
pt3dadd(-330.5, -265, 101, 2.4)
pt3dadd(-327.5, -269.5, 102.5, 3.2)
pt3dadd(-327.5, -271.5, 102.5, 2.5)
pt3dadd(-329, -274.5, 102.5, 2.5)
pt3dadd(-331, -277, 104, 2.5)
pt3dadd(-331.5, -279.5, 104, 1.3)
pt3dadd(-331.5, -283, 98.5, 1.3)
pt3dadd(-331.5, -287.5, 98.5, 1.4)
pt3dadd(-332.5, -290.5, 100, 1.4)
pt3dadd(-333.5, -294.5, 101, 1.4)
pt3dadd(-333.5, -297, 101, 1.4)
pt3dadd(-334.5, -300, 101, 0.9)
pt3dadd(-336, -300, 101, 0.9)
pt3dadd(-336, -302, 101, 1.1)
pt3dadd(-337, -301.5, 102.5, 1.3)
}
dend[42] {pt3dclear()
pt3dadd(-337, -301.5, 102.5, 1.3)
pt3dadd(-338.5, -301.5, 85.5, 0.7)
pt3dadd(-342, -305.5, 84, 0.7)
pt3dadd(-345.5, -310, 86.5, 0.7)
pt3dadd(-345.5, -313, 86.5, 0.9)
pt3dadd(-343.5, -317.5, 86.5, 0.6)
pt3dadd(-336.5, -316.5, 89.5, 0.6)
pt3dadd(-336, -322, 89.5, 0.6)
pt3dadd(-335, -322.5, 109, 1.8)
pt3dadd(-333, -323, 97.5, 0.1)
pt3dadd(-330, -322.5, 97.5, 0.1)
pt3dadd(-328, -322.5, 102.5, 1.4)
pt3dadd(-323, -322.5, 97.5, 0.2)
pt3dadd(-320.5, -322.5, 97.5, 0.2)
pt3dadd(-317.5, -326.5, 97.5, 0.2)
pt3dadd(-315.5, -328, 97.5, 2.3)
pt3dadd(-317, -331.5, 94.5, 0.6)
pt3dadd(-321.5, -333, 94.5, 0.6)
pt3dadd(-324.5, -333, 98.5, 0.6)
}
}
proc shape3d_11() {
dend[42] { }
dend[43] {pt3dclear()
pt3dadd(-337, -301.5, 102.5, 1.3)
pt3dadd(-337.5, -304, 102.5, 1.1)
pt3dadd(-339, -305.5, 102.5, 1.1)
pt3dadd(-341, -308, 104, 1.1)
pt3dadd(-341.5, -310.5, 104, 1.1)
pt3dadd(-339, -312, 106.5, 1.6)
pt3dadd(-339, -313.5, 106.5, 0.9)
pt3dadd(-339, -316.5, 105, 0.9)
pt3dadd(-341, -319.5, 102.5, 0.9)
}
dend[44] {pt3dclear()
pt3dadd(-190.5, -14.5, 41.5, 7.3)
pt3dadd(-195.5, -15.5, 41.5, 5.2)
pt3dadd(-200, -18, 41.5, 5.5)
pt3dadd(-203.5, -18.5, 41.5, 6)
pt3dadd(-209.5, -20.5, 47.5, 5.6)
pt3dadd(-214, -20.5, 47.5, 6.1)
pt3dadd(-218, -21.5, 47.5, 5.5)
pt3dadd(-221, -21.5, 47.5, 4.6)
pt3dadd(-224, -24.5, 47.5, 6.5)
pt3dadd(-226.5, -25, 47.5, 6.8)
}
dend[45] {pt3dclear()
pt3dadd(-226.5, -25, 47.5, 6.8)
pt3dadd(-232.5, -21.5, 46, 1.9)
pt3dadd(-236, -20, 46, 2.3)
pt3dadd(-239, -19.5, 46, 2.4)
pt3dadd(-240.5, -19.5, 46, 3.3)
pt3dadd(-242.5, -19.5, 46, 3.8)
pt3dadd(-245.5, -19.5, 46, 2)
pt3dadd(-249, -18, 47.5, 2)
pt3dadd(-253, -16.5, 47.5, 1.8)
pt3dadd(-257, -15, 47.5, 1.8)
pt3dadd(-260, -15, 47.5, 1.8)
pt3dadd(-262.5, -13.5, 47.5, 1.7)
pt3dadd(-265, -12, 47.5, 1.9)
pt3dadd(-267.5, -12.5, 52, 3.1)
pt3dadd(-270.5, -12.5, 52, 4.6)
pt3dadd(-273.5, -12.5, 50.5, 2.7)
pt3dadd(-275, -12.5, 50.5, 2.1)
pt3dadd(-277.5, -12.5, 53.5, 3.2)
pt3dadd(-280, -12.5, 53.5, 4)
pt3dadd(-284, -12.5, 53.5, 3.7)
pt3dadd(-289, -11, 56.5, 2.8)
pt3dadd(-292.5, -10.5, 56.5, 2.1)
pt3dadd(-295, -8.5, 56.5, 1.7)
pt3dadd(-297.5, -8.5, 56.5, 1.8)
pt3dadd(-301.5, -8, 56.5, 1.3)
pt3dadd(-303, -8, 56.5, 1.2)
pt3dadd(-304.5, -8.5, 56.5, 1.8)
pt3dadd(-306, -9, 53.5, 2.5)
pt3dadd(-312, -9.5, 53.5, 0.3)
pt3dadd(-314, -10, 53.5, 1.3)
pt3dadd(-316, -9.5, 55, 2.8)
pt3dadd(-317.5, -9.5, 55, 3.8)
pt3dadd(-321.5, -9.5, 55, 1.6)
pt3dadd(-324.5, -6.5, 55, 1.3)
pt3dadd(-327, -6.5, 55, 1.3)
pt3dadd(-329, -6.5, 55, 2)
pt3dadd(-331, -5.5, 56.5, 3.6)
pt3dadd(-333, -4.5, 58, 4.6)
pt3dadd(-335.5, -4, 58, 3.2)
pt3dadd(-338, -3, 58, 1.7)
pt3dadd(-340.5, -3, 58, 1.7)
pt3dadd(-343, -3, 58, 1.2)
pt3dadd(-345.5, -2, 58, 1.2)
pt3dadd(-348, -1, 58, 1.4)
pt3dadd(-351, 1.5, 58, 2.2)
pt3dadd(-352.5, 1.5, 58, 3.7)
pt3dadd(-355, 2, 58, 5.3)
pt3dadd(-358.5, 4.5, 56.5, 2.8)
pt3dadd(-361, 5, 56.5, 2.1)
pt3dadd(-363.5, 7, 58, 1.2)
pt3dadd(-367, 9.5, 58, 1.2)
pt3dadd(-367.5, 10.5, 59.5, 1.2)
pt3dadd(-370, 12, 56.5, 2.4)
pt3dadd(-372, 11.5, 56.5, 2.7)
pt3dadd(-375.5, 12.5, 56.5, 2)
pt3dadd(-378.5, 15, 59.5, 2)
pt3dadd(-383, 15, 59.5, 1.3)
pt3dadd(-388, 15, 59.5, 1.6)
pt3dadd(-393.5, 15, 59.5, 1.6)
pt3dadd(-399, 15, 59.5, 1.8)
pt3dadd(-402.5, 15, 59.5, 1.8)
pt3dadd(-406, 14, 59.5, 1.8)
pt3dadd(-411.5, 14, 58, 1.8)
pt3dadd(-414.5, 14, 58, 1.8)
pt3dadd(-421.5, 14, 58, 1.8)
pt3dadd(-428, 11, 58, 1.8)
pt3dadd(-432.5, 10.5, 58, 1.8)
pt3dadd(-435.5, 7.5, 58, 1.1)
pt3dadd(-437.5, 7.5, 59.5, 1.8)
pt3dadd(-441.5, 7, 61, 2.4)
pt3dadd(-444, 6.5, 61, 1.7)
pt3dadd(-448.5, 6.5, 61, 1.3)
pt3dadd(-452.5, 6.5, 61, 1.3)
pt3dadd(-456.5, 6.5, 61, 1.4)
pt3dadd(-461, 7, 61, 1.4)
pt3dadd(-467, 7, 61, 1.4)
pt3dadd(-469, 7, 61, 1.2)
pt3dadd(-473, 7, 61, 1.2)
pt3dadd(-475.5, 7, 61, 2.1)
pt3dadd(-477, 7.5, 61, 1.2)
pt3dadd(-479, 8, 61, 1.7)
pt3dadd(-480.5, 8, 61, 2.1)
pt3dadd(-483, 8.5, 58, 3.2)
pt3dadd(-485.5, 9.5, 59.5, 1.9)
pt3dadd(-488, 10, 58, 1)
pt3dadd(-490, 12.5, 59.5, 1)
pt3dadd(-492.5, 12.5, 59.5, 2.2)
pt3dadd(-494.5, 12.5, 59.5, 2.8)
pt3dadd(-496.5, 13, 59.5, 2.1)
pt3dadd(-499.5, 14.5, 59.5, 1.7)
pt3dadd(-500.5, 14.5, 59.5, 0.6)
pt3dadd(-504.5, 15.5, 59.5, 0.9)
pt3dadd(-505.5, 15.5, 59.5, 2.5)
pt3dadd(-510, 15.5, 59.5, 3.8)
pt3dadd(-513.5, 15, 59.5, 2.1)
pt3dadd(-517.5, 14, 59.5, 1.2)
pt3dadd(-520, 12, 59.5, 1)
pt3dadd(-522, 11, 59.5, 1.2)
pt3dadd(-525, 9.5, 59.5, 1.2)
pt3dadd(-528, 9.5, 59.5, 0.6)
pt3dadd(-532.5, 7, 58, 0.8)
pt3dadd(-533.5, 6.5, 59.5, 2)
pt3dadd(-537.5, 4.5, 61, 2.9)
pt3dadd(-541, 3.5, 61, 1.9)
pt3dadd(-543, 3, 62.5, 0.7)
pt3dadd(-545, 2.5, 62.5, 0.7)
pt3dadd(-547, 2.5, 62.5, 1.9)
pt3dadd(-549.5, 2.5, 64, 2.8)
pt3dadd(-553, 2, 64, 1.5)
pt3dadd(-554, 2, 64, 0.7)
pt3dadd(-559.5, 0, 67, 0.9)
pt3dadd(-563.5, 0, 68.5, 0.9)
pt3dadd(-564.5, 0.5, 68.5, 0.9)
pt3dadd(-567, 0.5, 68.5, 1.8)
pt3dadd(-569.5, 0.5, 68.5, 4.4)
pt3dadd(-573.5, 0, 67, 1.5)
pt3dadd(-575, 0, 65.5, 0.7)
pt3dadd(-578.5, 0, 65.5, 0.7)
pt3dadd(-576, 2, 68.5, 0.7)
pt3dadd(-578.5, 2.5, 67, 0.7)
pt3dadd(-580, 5, 73, 0.7)
pt3dadd(-583, 4, 53.5, 0.3)
pt3dadd(-585.5, 4, 55, 0.3)
pt3dadd(-585.5, 5, 59.5, 2.3)
pt3dadd(-586, 5, 59.5, 2.8)
pt3dadd(-588.5, 5, 59.5, 1.6)
pt3dadd(-590, 5, 59.5, 0.3)
pt3dadd(-593, 5.5, 59.5, 0.3)
pt3dadd(-597.5, 7.5, 59.5, 0.3)
pt3dadd(-598.5, 9, 59.5, 1.7)
pt3dadd(-599.5, 9, 61, 2.2)
pt3dadd(-601, 8.5, 61, 1.1)
pt3dadd(-602, 9.5, 62.5, 0.5)
pt3dadd(-606.5, 10.5, 56.5, 0.5)
pt3dadd(-609, 11.5, 56.5, 0.5)
pt3dadd(-611.5, 13.5, 56.5, 0.5)
pt3dadd(-612.5, 13.5, 53.5, 1.5)
pt3dadd(-612.5, 14.5, 59.5, 2.6)
pt3dadd(-615, 14.5, 59.5, 1.2)
pt3dadd(-617, 14.5, 56.5, 0.4)
pt3dadd(-619, 16, 55, 0.6)
pt3dadd(-621, 18, 58, 1.4)
pt3dadd(-624, 18, 61, 0.4)
pt3dadd(-627, 19, 55, 0.4)
pt3dadd(-631.5, 18.5, 55, 0.4)
pt3dadd(-631, 18.5, 58, 2.4)
pt3dadd(-632, 18.5, 59.5, 2.5)
pt3dadd(-633.5, 18.5, 52, 1.4)
pt3dadd(-635, 18.5, 52, 0.4)
pt3dadd(-638, 18.5, 52, 0.4)
pt3dadd(-639, 18.5, 58, 1.5)
pt3dadd(-640.5, 18.5, 52, 1.9)
pt3dadd(-641.5, 18.5, 52, 0.9)
pt3dadd(-643.5, 19, 52, 0.2)
pt3dadd(-646, 21, 58, 0.2)
pt3dadd(-647.5, 20.5, 56.5, 0.9)
pt3dadd(-649.5, 20.5, 56.5, 0.3)
pt3dadd(-651, 21, 56.5, 0.3)
pt3dadd(-653, 21, 53.5, 1.8)
pt3dadd(-653.5, 21.5, 55, 2.7)
pt3dadd(-655, 21.5, 56.5, 1.5)
pt3dadd(-658, 22.5, 56.5, 0.4)
pt3dadd(-659, 25.5, 58, 0.4)
pt3dadd(-661, 25.5, 58, 1.2)
pt3dadd(-663, 25.5, 56.5, 0.3)
pt3dadd(-668, 25.5, 55, 0.2)
pt3dadd(-670, 27, 49, 1.1)
pt3dadd(-671, 27, 49, 1.4)
pt3dadd(-673, 27, 49, 0.7)
pt3dadd(-674, 27, 49, 0.2)
pt3dadd(-676, 27, 49, 0.2)
pt3dadd(-678, 27, 49, 1.1)
pt3dadd(-679, 28, 49, 1.2)
pt3dadd(-679.5, 28, 49, 0.5)
pt3dadd(-681.5, 29.5, 50.5, 0.4)
pt3dadd(-683.5, 30.5, 52, 0.4)
pt3dadd(-685.5, 31.5, 52, 0.4)
pt3dadd(-686.5, 31.5, 52, 1.1)
pt3dadd(-688, 31, 52, 1.1)
pt3dadd(-689, 31, 52, 0.7)
pt3dadd(-692.5, 31, 52, 0.4)
}
}
proc shape3d_12() {
dend[45] { pt3dadd(-692.5, 32.5, 52, 0.4)
pt3dadd(-694, 32.5, 52, 1.3)
pt3dadd(-695.5, 32.5, 52, 1.3)
pt3dadd(-697, 32.5, 50.5, 0.5)
pt3dadd(-698, 32.5, 50.5, 0.5)
pt3dadd(-700.5, 32.5, 49, 1.2)
pt3dadd(-702, 32.5, 50.5, 0.9)
pt3dadd(-702.5, 32.5, 52, 0.6)
pt3dadd(-704.5, 34, 53.5, 0.6)
pt3dadd(-705.5, 34.5, 55, 0.8)
pt3dadd(-708, 36, 55, 0.1)
pt3dadd(-710, 36, 55, 0.1)
pt3dadd(-710.5, 38.5, 56.5, 1.1)
pt3dadd(-713, 38.5, 56.5, 0.1)
pt3dadd(-715, 38.5, 56.5, 0.1)
pt3dadd(-718, 40, 59.5, 1.3)
pt3dadd(-719, 40, 59.5, 0.1)
pt3dadd(-721, 40, 59.5, 0.1)
pt3dadd(-724, 41.5, 59.5, 1.5)
pt3dadd(-727, 41.5, 55, 0.1)
}
dend[46] {pt3dclear()
pt3dadd(-226.5, -25, 47.5, 6.8)
pt3dadd(-229, -30.5, 47.5, 3.6)
pt3dadd(-232, -31.5, 47.5, 3.4)
pt3dadd(-235, -33, 46, 3.6)
pt3dadd(-237.5, -33, 46, 4.3)
pt3dadd(-241, -33, 52, 5)
pt3dadd(-244, -33, 52, 5)
pt3dadd(-247, -33, 52, 4.9)
pt3dadd(-250, -33, 58, 4.4)
pt3dadd(-252.5, -33.5, 49, 5.2)
pt3dadd(-255.5, -33.5, 49, 5.5)
pt3dadd(-258.5, -34, 50.5, 4.9)
pt3dadd(-262, -36, 50.5, 4.1)
pt3dadd(-266, -36.5, 50.5, 4.1)
pt3dadd(-269.5, -38.5, 50.5, 5)
pt3dadd(-272, -38.5, 50.5, 5.4)
pt3dadd(-274, -40, 50.5, 5)
pt3dadd(-276.5, -40.5, 52, 6)
pt3dadd(-278, -41, 52, 6)
pt3dadd(-280.5, -41, 52, 4.3)
pt3dadd(-284, -41.5, 52, 4.5)
pt3dadd(-288.5, -44.5, 55, 4.3)
pt3dadd(-292, -44.5, 53.5, 4)
pt3dadd(-295.5, -44, 55, 4.2)
pt3dadd(-299, -45, 55, 4.6)
pt3dadd(-303, -46, 55, 4.7)
pt3dadd(-307.5, -47, 53.5, 4.8)
pt3dadd(-311, -48.5, 53.5, 4.6)
pt3dadd(-315, -49, 53.5, 4.6)
pt3dadd(-320, -50.5, 53.5, 4.6)
pt3dadd(-323.5, -50.5, 53.5, 5.1)
pt3dadd(-326.5, -50.5, 53.5, 4.4)
pt3dadd(-330.5, -50.5, 53.5, 4.6)
pt3dadd(-334, -50.5, 53.5, 5.5)
pt3dadd(-339, -50.5, 56.5, 5.5)
pt3dadd(-345.5, -50.5, 56.5, 3.8)
pt3dadd(-350, -50, 58.5, 3.8)
pt3dadd(-354.5, -49, 54.5, 3.8)
pt3dadd(-358.5, -46.5, 56.5, 4.3)
pt3dadd(-363, -46.5, 56.5, 4.1)
pt3dadd(-366.5, -45, 58.5, 3.7)
pt3dadd(-368.5, -44.5, 58.5, 3)
pt3dadd(-370.5, -44.5, 58.5, 4.3)
pt3dadd(-374.5, -44, 60.5, 5.3)
pt3dadd(-378.5, -44, 62.5, 6.1)
pt3dadd(-381.5, -44, 62.5, 3.8)
pt3dadd(-384.5, -44, 62.5, 2.9)
pt3dadd(-386.5, -42.5, 64.5, 3.4)
pt3dadd(-389, -40, 64.5, 3.8)
pt3dadd(-390.5, -38.5, 64.5, 4.7)
pt3dadd(-393.5, -38.5, 66.5, 4.5)
pt3dadd(-398, -36, 70.5, 4.3)
pt3dadd(-400, -35.5, 72.5, 2.4)
pt3dadd(-403.5, -35.5, 74.5, 2.4)
pt3dadd(-403.5, -34, 76.5, 2.4)
pt3dadd(-407, -33, 78.5, 3.4)
pt3dadd(-411, -31.5, 78.5, 3.6)
pt3dadd(-414.5, -29, 78.5, 4.3)
pt3dadd(-419, -28, 80.5, 5.3)
pt3dadd(-423, -28, 82.5, 5.7)
pt3dadd(-429, -28.5, 89.5, 3.8)
pt3dadd(-433, -28.5, 89.5, 3.8)
pt3dadd(-436, -26.5, 90.5, 2.3)
pt3dadd(-438.5, -26.5, 90.5, 2.3)
pt3dadd(-447.5, -27.5, 93, 4.1)
pt3dadd(-451.5, -27.5, 93, 3.7)
pt3dadd(-454.5, -26.5, 94.5, 2.8)
pt3dadd(-458, -26.5, 94.5, 2.2)
pt3dadd(-459.5, -27, 94.5, 4.5)
pt3dadd(-461.5, -27.5, 96, 4.4)
pt3dadd(-465, -29, 97, 2.9)
pt3dadd(-467.5, -30, 93, 2.5)
pt3dadd(-470, -30, 93, 2.8)
pt3dadd(-473, -29.5, 96, 3.8)
pt3dadd(-478, -29.5, 97, 4.5)
pt3dadd(-483, -29.5, 97, 4.6)
pt3dadd(-487, -31, 98.5, 4.6)
pt3dadd(-491.5, -31, 98.5, 4.6)
pt3dadd(-495, -31.5, 98.5, 4.6)
pt3dadd(-498, -34, 98.5, 4.6)
pt3dadd(-500, -34, 98.5, 5.2)
pt3dadd(-502.5, -34, 100, 5)
pt3dadd(-506, -35.5, 100, 4.3)
pt3dadd(-508, -38.5, 100, 4.4)
pt3dadd(-511, -42, 100, 4.5)
}
dend[47] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 7.4)
pt3dadd(0, 14.5, -3, 7.4)
pt3dadd(-6, 13.5, -5, 6)
pt3dadd(-11.5, 12, -6.5, 5.7)
pt3dadd(-16.5, 11.5, -6.5, 5.7)
pt3dadd(-21.5, 10.5, -6.5, 5.3)
pt3dadd(-29.5, 10.5, -6.5, 5.4)
pt3dadd(-35.5, 10.5, -7.5, 5.4)
pt3dadd(-45, 7.5, -8.5, 5.4)
pt3dadd(-52.5, 6.5, -6.5, 5)
pt3dadd(-59.5, 2, -5.5, 4.9)
pt3dadd(-63, 0, -5.5, 4.6)
pt3dadd(-73.5, 0, -5.5, 4)
pt3dadd(-77.5, 0, -4.5, 4)
pt3dadd(-81.5, 0, -4.5, 4)
pt3dadd(-85.5, 0, -4.5, 4)
pt3dadd(-94, 0.5, -4.5, 4)
pt3dadd(-99, 2, -4.5, 4)
pt3dadd(-104.5, 4, -4.5, 4)
pt3dadd(-108.5, 5, -4.5, 4)
pt3dadd(-114.5, 5, -3.5, 4)
pt3dadd(-119, 7, -3.5, 4)
pt3dadd(-124.5, 8, -3.5, 3.8)
pt3dadd(-129, 9, -5.5, 3.1)
pt3dadd(-133.5, 8.5, -5.5, 2.5)
pt3dadd(-136.5, 6.5, -5.5, 2.8)
pt3dadd(-139, 4.5, -9, 3.4)
pt3dadd(-141.5, 4, -8, 3.4)
pt3dadd(-144, 1.5, -8, 4.3)
pt3dadd(-146.5, 1, -10, 2.8)
pt3dadd(-149, 1, -10, 2.4)
pt3dadd(-151, 1, -10, 2.2)
pt3dadd(-153, 1, -10, 3)
pt3dadd(-154, 1, -10, 3)
pt3dadd(-156, -1, -10, 3)
pt3dadd(-159.5, -1.5, -11.5, 3)
pt3dadd(-162, -3, -12.5, 3.4)
pt3dadd(-164.5, -3, -12.5, 2.9)
pt3dadd(-167.5, -3, -12.5, 1.7)
pt3dadd(-168.5, -4.5, -12.5, 1.6)
pt3dadd(-169.5, -6.5, -12.5, 1.9)
pt3dadd(-169.5, -8, -12.5, 1.9)
pt3dadd(-170.5, -10, -11.5, 1.6)
pt3dadd(-172, -12, -11.5, 1.9)
pt3dadd(-174, -14.5, -11.5, 2.6)
pt3dadd(-176.5, -15.5, -12.5, 2.9)
pt3dadd(-177.5, -18.5, -12.5, 3.2)
pt3dadd(-179.5, -21, -12.5, 3.8)
pt3dadd(-182, -21.5, -12.5, 4.7)
pt3dadd(-187.5, -22.5, -15, 2.1)
pt3dadd(-189, -22.5, -13.5, 1.7)
pt3dadd(-191, -22.5, -13.5, 2.1)
pt3dadd(-196, -24, -13.5, 1.6)
pt3dadd(-198.5, -31, -13.5, 1.8)
pt3dadd(-199.5, -35.5, -9.5, 1.8)
pt3dadd(-201.5, -38.5, -10, 2.2)
pt3dadd(-201.5, -40.5, -10, 2.9)
}
dend[48] {pt3dclear()
pt3dadd(-201.5, -40.5, -10, 2.9)
pt3dadd(-205.5, -41.5, -5.5, 0.4)
pt3dadd(-211.5, -41.5, -5.5, 0.5)
pt3dadd(-216, -41.5, -5.5, 0.6)
pt3dadd(-223.5, -45.5, -5.5, 0.6)
pt3dadd(-226.5, -47, -5.5, 0.6)
pt3dadd(-231, -49.5, -5, 0.6)
pt3dadd(-233.5, -51.5, -5, 0.6)
pt3dadd(-236, -52.5, -5, 0.6)
pt3dadd(-238.5, -52.5, -5, 0.6)
pt3dadd(-240.5, -54.5, -5, 0.6)
pt3dadd(-243, -57, -5.5, 0.6)
pt3dadd(-245.5, -57, -5.5, 0.6)
pt3dadd(-247, -58, -5.5, 3.6)
pt3dadd(-251, -58.5, -5.5, 2)
pt3dadd(-254.5, -58.5, -5, 1.2)
pt3dadd(-259, -58.5, -7, 1.2)
pt3dadd(-261, -60, -5.5, 0.7)
pt3dadd(-264.5, -64, -5.5, 0.7)
pt3dadd(-266, -64, -7, 2.5)
pt3dadd(-266.5, -64, -5.5, 4.6)
pt3dadd(-271, -64, -7, 2.1)
pt3dadd(-274.5, -64, -7, 0.9)
pt3dadd(-276.5, -65, -7, 0.7)
pt3dadd(-278, -65, -5.5, 2.5)
pt3dadd(-281, -65, -8, 2.8)
pt3dadd(-283, -66.5, -8, 2.7)
pt3dadd(-286, -66.5, -8, 1.5)
pt3dadd(-288.5, -67, -9, 0.8)
pt3dadd(-290.5, -67.5, -9, 0.8)
pt3dadd(-291.5, -68.5, -8, 1.9)
pt3dadd(-293.5, -70, -9, 1.9)
pt3dadd(-295, -71, -9.5, 0.3)
pt3dadd(-297.5, -71.5, -8, 0.3)
pt3dadd(-301.5, -74.5, -9, 0.3)
pt3dadd(-303, -76, -9, 1.7)
pt3dadd(-305.5, -77.5, -9, 2.4)
pt3dadd(-307.5, -78, -2.5, 3.1)
}
}
proc shape3d_13() {
dend[48] { pt3dadd(-310, -79.5, -2.5, 2.1)
pt3dadd(-311, -80.5, -9, 1.5)
pt3dadd(-312.5, -81, -9, 1.2)
pt3dadd(-315, -82.5, -9, 1.2)
pt3dadd(-317, -83.5, -9, 1.7)
pt3dadd(-319.5, -84.5, -9, 2)
pt3dadd(-322, -86.5, -9, 1.4)
pt3dadd(-323.5, -88, -9, 0.9)
pt3dadd(-325.5, -88.5, -9, 1.1)
pt3dadd(-326, -90, -9, 1.3)
pt3dadd(-328, -92, -9, 1.1)
pt3dadd(-328.5, -93.5, -9, 0.6)
pt3dadd(-330.5, -94, -9, 1.6)
pt3dadd(-332.5, -93.5, -9, 2.4)
pt3dadd(-334.5, -93.5, -9, 3.2)
pt3dadd(-337, -93.5, -9, 2.1)
pt3dadd(-340.5, -93.5, -9, 1.4)
pt3dadd(-342.5, -93.5, -9, 0.9)
pt3dadd(-344.5, -94, -9, 1.5)
pt3dadd(-346.5, -94, -9, 2.5)
pt3dadd(-348, -94.5, -9, 2.4)
pt3dadd(-351, -95, -9, 1.8)
pt3dadd(-352, -96.5, -9, 1.1)
pt3dadd(-353.5, -97, -9, 1.9)
pt3dadd(-355, -97.5, -9, 2.1)
pt3dadd(-355.5, -98.5, -9, 2.8)
pt3dadd(-358.5, -99.5, -9, 1.7)
pt3dadd(-360.5, -99.5, -9, 1.1)
pt3dadd(-362.5, -100.5, -9, 1.1)
pt3dadd(-364.5, -101.5, -9, 1.6)
pt3dadd(-366, -103, -9, 2.5)
pt3dadd(-367.5, -103, -9, 3.1)
pt3dadd(-369.5, -103, -9, 2.4)
pt3dadd(-371.5, -103, -9, 1.5)
pt3dadd(-372, -104, -9, 0.5)
pt3dadd(-374, -105.5, -9, 0.5)
pt3dadd(-375, -105.5, -9, 1)
pt3dadd(-376.5, -107, -9, 1.3)
pt3dadd(-378.5, -108, -9, 0.9)
pt3dadd(-379.5, -110, -9, 1.2)
pt3dadd(-381, -110, -9, 0.9)
pt3dadd(-383, -112.5, -9, 2.5)
pt3dadd(-386, -114, -9, 3.4)
pt3dadd(-388, -116, -9, 2.5)
pt3dadd(-390, -118, -9, 1.6)
pt3dadd(-392, -118.5, -9, 0.1)
pt3dadd(-394, -119.5, -9, 0.1)
pt3dadd(-397.5, -119.5, -9, 0.1)
pt3dadd(-399.5, -121.5, -9, 1.4)
pt3dadd(-400.5, -122.5, -9, 2.5)
pt3dadd(-402.5, -124, -9, 1.3)
pt3dadd(-403.5, -124.5, -9, 0.7)
pt3dadd(-406, -124.5, -9, 0.7)
pt3dadd(-408, -126.5, -9, 1.7)
pt3dadd(-411.5, -127.5, -15, 0.7)
pt3dadd(-413.5, -128.5, -15, 0.7)
pt3dadd(-417, -128.5, -9, 3.3)
pt3dadd(-418.5, -130, -15, 4)
pt3dadd(-422, -130, -9, 2.3)
pt3dadd(-424.5, -130, -15, 0.9)
pt3dadd(-428, -130, -9, 0.9)
pt3dadd(-429.5, -130.5, -9, 1.9)
pt3dadd(-432.5, -130.5, -9, 2.3)
pt3dadd(-435.5, -130.5, -9, 1.2)
pt3dadd(-437.5, -131.5, -15, 0.5)
pt3dadd(-440, -131.5, -15, 0.5)
pt3dadd(-441.5, -132.5, -9, 1.7)
pt3dadd(-442.5, -134, -15, 2.7)
pt3dadd(-444.5, -135.5, -15, 2)
pt3dadd(-445.5, -136, -15, 0.7)
pt3dadd(-447, -138.5, -15, 0.7)
pt3dadd(-448, -138.5, -15, 0.7)
pt3dadd(-449.5, -140.5, -15, 2.4)
pt3dadd(-451.5, -142, -15, 3.3)
pt3dadd(-451, -143.5, -15, 1.6)
pt3dadd(-452, -146, -15, 0.6)
pt3dadd(-451.5, -149, -15, 0.6)
pt3dadd(-451.5, -151.5, -9, 0.6)
pt3dadd(-451.5, -153, -15, 1.7)
pt3dadd(-451.5, -154, -15, 2.2)
pt3dadd(-451.5, -155.5, -15, 2.7)
pt3dadd(-451.5, -157.5, -15, 1.8)
pt3dadd(-452.5, -158.5, -15, 1.1)
pt3dadd(-453, -159.5, -15, 0.3)
pt3dadd(-454, -160.5, -15, 0.3)
pt3dadd(-455, -162.5, -15, 1.9)
pt3dadd(-455.5, -165, -21.5, 3.2)
pt3dadd(-456, -166, -21.5, 1.8)
pt3dadd(-456.5, -167.5, -21.5, 1)
pt3dadd(-457.5, -169, -15, 0.7)
pt3dadd(-457.5, -171, -15, 0.7)
pt3dadd(-458.5, -172.5, -15, 0.7)
pt3dadd(-460, -174, -15, 1.1)
pt3dadd(-461, -175, -15, 1.5)
pt3dadd(-462.5, -175, -15, 1.5)
pt3dadd(-462.5, -176.5, -15, 0.3)
pt3dadd(-464, -180, -15, 0.3)
pt3dadd(-464, -181, -15, 0.3)
pt3dadd(-465.5, -182, -21.5, 3.8)
pt3dadd(-468, -182, -21.5, 2)
pt3dadd(-470, -183.5, -21.5, 0.7)
pt3dadd(-471.5, -185, -21.5, 0.7)
pt3dadd(-474, -186, -21.5, 0.7)
pt3dadd(-476, -188, -21.5, 2.1)
pt3dadd(-476.5, -189, -21.5, 2.9)
pt3dadd(-480, -192.5, -21.5, 0.6)
pt3dadd(-479, -194, -21.5, 0.6)
pt3dadd(-479, -195.5, -21.5, 0.6)
pt3dadd(-479.5, -196.5, -21.5, 2.3)
pt3dadd(-481, -199, -21.5, 2.3)
pt3dadd(-482.5, -199, -21.5, 1.9)
pt3dadd(-483.5, -201, -27.5, 1.2)
pt3dadd(-485, -202, -27.5, 0.1)
pt3dadd(-485.5, -204.5, -21.5, 0.5)
pt3dadd(-489, -202, -21.5, 0.7)
pt3dadd(-491, -202.5, -21.5, 0.9)
pt3dadd(-492.5, -202.5, -27.5, 1)
pt3dadd(-494.5, -202.5, -21.5, 0.9)
pt3dadd(-496.5, -204, -21.5, 0.7)
pt3dadd(-497.5, -204, -21.5, 1.3)
pt3dadd(-499.5, -204, -21.5, 1.5)
pt3dadd(-501.5, -204.5, -27.5, 1)
pt3dadd(-503.5, -204.5, -27.5, 0.7)
pt3dadd(-506, -206.5, -21.5, 2.6)
pt3dadd(-507, -206.5, -21.5, 0.7)
pt3dadd(-509.5, -207.5, -27.5, 0.2)
pt3dadd(-511.5, -207.5, -27.5, 0.2)
pt3dadd(-513, -207.5, -21.5, 1.5)
pt3dadd(-514.5, -207.5, -21.5, 1.4)
pt3dadd(-516.5, -207.5, -21.5, 0.5)
pt3dadd(-518.5, -207, -21.5, 0.5)
pt3dadd(-520, -206, -21.5, 1.3)
pt3dadd(-522, -206, -15, 1.6)
pt3dadd(-524.5, -206.5, -15, 0.1)
pt3dadd(-524, -206.5, -21.5, 0.1)
pt3dadd(-526.5, -208, -15, 1)
pt3dadd(-527.5, -208, -15, 1)
pt3dadd(-529, -208.5, -15, 0.3)
pt3dadd(-530.5, -209, -21.5, 1.1)
pt3dadd(-534, -209, -15, 0.1)
pt3dadd(-535.5, -209, -15, 0.1)
pt3dadd(-537, -210, -15, 0.1)
pt3dadd(-538.5, -210, -9, 1.4)
pt3dadd(-540, -211.5, -9, 2.7)
pt3dadd(-541, -212.5, -9, 1.1)
pt3dadd(-541, -214, -9, 0.3)
pt3dadd(-543.5, -214, -9, 0.3)
pt3dadd(-546, -214, -9, 0.3)
pt3dadd(-547, -215.5, -9, 1.3)
pt3dadd(-546.5, -216.5, -2.5, 2.3)
pt3dadd(-546.5, -217.5, -2.5, 0.9)
pt3dadd(-546.5, -219, -2.5, 0.2)
pt3dadd(-546.5, -220.5, -9, 0.3)
pt3dadd(-546.5, -222, -9, 0.3)
pt3dadd(-546.5, -223, -2.5, 1.2)
pt3dadd(-547, -224.5, -2.5, 1.4)
pt3dadd(-548.5, -226, -2.5, 0.8)
pt3dadd(-549, -226.5, -2.5, 0.6)
pt3dadd(-551.5, -226.5, -2.5, 0.6)
pt3dadd(-552, -227, -2.5, 1.7)
pt3dadd(-554.5, -227.5, -2.5, 2.1)
pt3dadd(-555.5, -229, -2.5, 1.3)
pt3dadd(-557.5, -228.5, -2.5, 0.6)
pt3dadd(-559, -228.5, -2.5, 0.8)
pt3dadd(-562, -228.5, -9, 1.2)
pt3dadd(-566, -228.5, -2.5, 1.1)
pt3dadd(-568.5, -228.5, -2.5, 0.9)
pt3dadd(-571, -228.5, -2.5, 1.7)
pt3dadd(-575.5, -228.5, -2.5, 0.7)
pt3dadd(-578.5, -230, -2.5, 0.9)
pt3dadd(-581, -230, -2.5, 0.9)
pt3dadd(-585, -230.5, -15, 0.9)
pt3dadd(-589, -232, -2.5, 0.9)
pt3dadd(-592.5, -234, -2.5, 0.9)
pt3dadd(-595.5, -234, -2.5, 0.9)
pt3dadd(-597.5, -235, -2.5, 1.2)
pt3dadd(-600, -235, -2.5, 1.2)
pt3dadd(-602, -235, -2.5, 0.5)
pt3dadd(-606, -235.5, -2.5, 0.5)
pt3dadd(-606.5, -237, -2.5, 0.1)
pt3dadd(-608, -238.5, -9, 0.1)
pt3dadd(-609, -239.5, -2.5, 1.3)
pt3dadd(-612, -242, -2.5, 0.1)
pt3dadd(-612.5, -242, -2.5, 0.1)
pt3dadd(-614, -243, -2.5, 1.7)
pt3dadd(-616, -243, -2.5, 1.8)
pt3dadd(-620.5, -248, -2.5, 0.1)
pt3dadd(-622.5, -250, -2.5, 0.1)
pt3dadd(-624.5, -253, -2.5, 0.1)
pt3dadd(-624.5, -255.5, -2.5, 0.1)
pt3dadd(-624.5, -257, -2.5, 0.1)
pt3dadd(-624.5, -259, -2.5, 0.1)
pt3dadd(-625, -260.5, -2.5, 1)
pt3dadd(-626.5, -263, -2.5, 0.1)
pt3dadd(-628, -264, -2.5, 0.1)
pt3dadd(-630, -264.5, -2.5, 1.4)
pt3dadd(-631, -266, -2.5, 0.1)
pt3dadd(-633, -267, -2.5, 0.1)
pt3dadd(-636, -268, -2.5, 0.1)
}
dend[49] {pt3dclear()
pt3dadd(-201.5, -40.5, -10, 2.9)
}
}
proc shape3d_14() {
dend[49] { pt3dadd(-201, -45.5, -10, 0.6)
pt3dadd(-201, -49.5, -11, 0.6)
pt3dadd(-201, -52, -11, 0.6)
pt3dadd(-203, -55, -10, 0.6)
pt3dadd(-204, -57, -10, 0.6)
pt3dadd(-204, -59, -9.5, 1.4)
pt3dadd(-204.5, -61, -9.5, 2)
pt3dadd(-205, -63, -9.5, 2)
pt3dadd(-205.5, -65, -9.5, 0.5)
pt3dadd(-208, -67, -9.5, 0.9)
pt3dadd(-209, -70.5, -9.5, 0.8)
pt3dadd(-210.5, -72, -9.5, 1.1)
pt3dadd(-213, -75, -9.5, 1.3)
pt3dadd(-213.5, -76, -9.5, 1.3)
pt3dadd(-215.5, -78, -9.5, 1.5)
pt3dadd(-216.5, -80, -9.5, 1.6)
pt3dadd(-216.5, -81.5, -9.5, 2.5)
pt3dadd(-218, -82.5, -9.5, 2.3)
pt3dadd(-220, -83.5, -9.5, 1.5)
pt3dadd(-220.5, -85, -9.5, 1.1)
pt3dadd(-223, -89.5, -9.5, 1)
pt3dadd(-223, -91, -9.5, 1)
pt3dadd(-224, -92.5, -9.5, 1.2)
pt3dadd(-224, -95, -11.5, 2.5)
pt3dadd(-226.5, -96.5, -11.5, 1.5)
pt3dadd(-227, -98.5, -11.5, 0.1)
pt3dadd(-229, -99.5, -11.5, 0.1)
pt3dadd(-229.5, -101.5, -11.5, 1.6)
pt3dadd(-232, -102.5, -10, 2.9)
pt3dadd(-235.5, -103.5, -10, 0.7)
pt3dadd(-236.5, -104.5, -10, 0.1)
pt3dadd(-238.5, -106.5, -11, 0.1)
pt3dadd(-241.5, -110, -11.5, 0.1)
pt3dadd(-244, -111.5, -11, 0.1)
pt3dadd(-245.5, -114, -11, 0.1)
pt3dadd(-248, -115, -7.5, 3.1)
pt3dadd(-251, -116.5, -9, 3.1)
pt3dadd(-254.5, -119, -9, 2.5)
pt3dadd(-257, -121, -8, 0.9)
pt3dadd(-259, -124, -8, 0.5)
pt3dadd(-258, -126.5, -9, 2.2)
pt3dadd(-259, -128, -9, 3.8)
pt3dadd(-260, -131.5, -9, 2.4)
pt3dadd(-260, -132, -9, 1.2)
pt3dadd(-261.5, -134.5, -11, 1.3)
pt3dadd(-261.5, -136, -11, 2.6)
pt3dadd(-261.5, -139.5, -10, 3.3)
pt3dadd(-264, -140.5, -11, 0.7)
pt3dadd(-267, -142.5, -11, 0.8)
pt3dadd(-269, -143.5, -12.5, 0.9)
pt3dadd(-270, -146, -13, 0.9)
pt3dadd(-271, -148, -13, 1.4)
pt3dadd(-271.5, -149.5, -13, 1.4)
pt3dadd(-273, -151, -19, 2.4)
pt3dadd(-273.5, -152.5, -19, 2.4)
pt3dadd(-274, -153.5, -19, 1.4)
pt3dadd(-273, -155, -19, 1.4)
pt3dadd(-273, -156.5, -19, 0.9)
pt3dadd(-273.5, -158.5, -19, 1.4)
pt3dadd(-274, -159.5, -19, 1.9)
pt3dadd(-274, -161.5, -19, 2.9)
pt3dadd(-275, -164.5, -19, 3.2)
pt3dadd(-275, -166.5, -19, 3.4)
pt3dadd(-275, -168.5, -19, 2.4)
pt3dadd(-275.5, -169.5, -19, 1.6)
pt3dadd(-274.5, -171, -19, 1.2)
pt3dadd(-275, -172.5, -19, 1)
pt3dadd(-275, -174.5, -19, 1.6)
pt3dadd(-275, -176, -19, 1.6)
pt3dadd(-275, -176.5, -19, 1.1)
pt3dadd(-275, -179, -19, 1.3)
pt3dadd(-274.5, -181, -19, 1.2)
pt3dadd(-274, -182, -19, 1.1)
pt3dadd(-274, -182.5, -19, 2.7)
pt3dadd(-273.5, -186.5, -19, 2.9)
pt3dadd(-274, -187, -25.5, 1.5)
pt3dadd(-274, -188, -25.5, 1.4)
pt3dadd(-274.5, -190.5, -25.5, 1.6)
pt3dadd(-274.5, -191.5, -25.5, 1.1)
pt3dadd(-273.5, -195, -25.5, 1.3)
pt3dadd(-273, -196.5, -25.5, 3.3)
pt3dadd(-273.5, -198.5, -25.5, 3.3)
pt3dadd(-275.5, -199, -25.5, 2)
pt3dadd(-276, -199.5, -25.5, 1.9)
pt3dadd(-278, -200.5, -31.5, 1.9)
pt3dadd(-278, -202, -31.5, 1.6)
pt3dadd(-276.5, -204.5, -38, 1.4)
pt3dadd(-274, -207, -40, 1.9)
pt3dadd(-273.5, -207.5, -40, 1.6)
pt3dadd(-273, -209.5, -38, 1.2)
pt3dadd(-271.5, -209, -40, 0.7)
pt3dadd(-271, -211.5, -42, 1.2)
pt3dadd(-271, -212, -40, 1.6)
pt3dadd(-273, -213, -40, 2.8)
pt3dadd(-273.5, -215.5, -43.5, 1.4)
pt3dadd(-272, -217, -43.5, 0.6)
pt3dadd(-270, -217, -43.5, 0.9)
pt3dadd(-271.5, -219, -43.5, 0.9)
pt3dadd(-272.5, -219.5, -47.5, 1.5)
pt3dadd(-275, -221, -47.5, 1.9)
pt3dadd(-276, -221.5, -51.5, 3.1)
pt3dadd(-278.5, -223.5, -53.5, 1.9)
pt3dadd(-279, -226, -55, 1)
pt3dadd(-281.5, -227.5, -57, 1)
pt3dadd(-281.5, -230, -55, 1)
pt3dadd(-281.5, -232, -55, 1.1)
pt3dadd(-279.5, -232, -55, 2.2)
pt3dadd(-279, -233, -55, 1.7)
pt3dadd(-277, -235.5, -57, 1.1)
pt3dadd(-275, -237, -55, 0.6)
pt3dadd(-273.5, -240, -55, 0.7)
pt3dadd(-272, -243.5, -52, 0.9)
pt3dadd(-272.5, -245, -49, 0.9)
pt3dadd(-272, -246, -49, 0.7)
pt3dadd(-271.5, -247, -49, 0.8)
pt3dadd(-271, -248.5, -49, 1.8)
pt3dadd(-271, -251, -52, 2.8)
pt3dadd(-270.5, -253, -55, 1.4)
pt3dadd(-270.5, -254, -58, 0.6)
pt3dadd(-271.5, -255.5, -58, 0.3)
pt3dadd(-271, -258.5, -58, 0.6)
pt3dadd(-271, -259, -58, 1.8)
pt3dadd(-271, -262, -58, 2.8)
pt3dadd(-270.5, -262.5, -58, 2.3)
pt3dadd(-269.5, -263, -61, 1.1)
pt3dadd(-269, -264.5, -61, 0.9)
pt3dadd(-268, -266.5, -64, 0.7)
pt3dadd(-268, -267.5, -64, 0.4)
pt3dadd(-267, -269, -64, 0.4)
pt3dadd(-267, -270.5, -64, 0.4)
pt3dadd(-267, -272.5, -64, 0.4)
pt3dadd(-266.5, -272.5, -61, 0.9)
pt3dadd(-266.5, -273.5, -61, 0.9)
pt3dadd(-266, -275, -70, 0.3)
pt3dadd(-264.5, -276.5, -67, 1.9)
pt3dadd(-264, -278.5, -67, 3.6)
pt3dadd(-264, -282, -67, 1.2)
pt3dadd(-264.5, -283.5, -67, 0.9)
pt3dadd(-265.5, -285.5, -67, 0.9)
pt3dadd(-265.5, -286, -67, 0.9)
pt3dadd(-265.5, -287.5, -67, 2)
pt3dadd(-265, -288.5, -64, 2.6)
pt3dadd(-264, -290.5, -67, 1.1)
pt3dadd(-262.5, -292, -67, 1.1)
pt3dadd(-262, -292.5, -70, 0.5)
pt3dadd(-261, -293, -70, 0.5)
pt3dadd(-260, -294.5, -70, 0.5)
pt3dadd(-259, -295, -70, 1)
pt3dadd(-257, -295.5, -70, 0.9)
pt3dadd(-254.5, -296, -70, 0.6)
pt3dadd(-254.5, -297.5, -70, 0.1)
pt3dadd(-253, -299, -70, 0.1)
pt3dadd(-253, -301, -70, 0.1)
pt3dadd(-254, -301.5, -75, 0.1)
pt3dadd(-254, -303.5, -75, 0.1)
pt3dadd(-253.5, -304.5, -75, 0.5)
pt3dadd(-252.5, -305.5, -77, 2.2)
pt3dadd(-252.5, -308, -77, 1.1)
pt3dadd(-253.5, -309, -79.5, 1.5)
pt3dadd(-254.5, -312, -84.5, 0.7)
pt3dadd(-255.5, -312.5, -82, 1.4)
pt3dadd(-255.5, -313.5, -84.5, 2.4)
pt3dadd(-256.5, -315.5, -82, 0.5)
pt3dadd(-256.5, -317, -89, 0.5)
pt3dadd(-256.5, -319, -86.5, 1.4)
pt3dadd(-256.5, -320.5, -89, 2.1)
pt3dadd(-255.5, -321.5, -89, 1.1)
pt3dadd(-253.5, -323.5, -86.5, 0.1)
}
dend[50] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 10.6)
pt3dadd(76, 59, -6.5, 10.6)
pt3dadd(80.5, 63.5, -10, 10.1)
pt3dadd(86.5, 67, -9.5, 10.1)
pt3dadd(91, 69, -8.5, 9.6)
pt3dadd(93, 72, -8.5, 9.5)
pt3dadd(98, 74, -8.5, 9.5)
pt3dadd(104, 75.5, -8.5, 9.4)
pt3dadd(110.5, 78.5, -8.5, 8.6)
pt3dadd(117, 79, -8.5, 8)
pt3dadd(123.5, 82, -8.5, 8)
pt3dadd(129, 82.5, -8.5, 8)
pt3dadd(135, 84, -8.5, 8)
pt3dadd(141, 85.5, -8.5, 7.1)
pt3dadd(148, 88, -8.5, 6.8)
pt3dadd(152.5, 90, -14, 6.7)
pt3dadd(157, 92, -16.5, 7)
pt3dadd(160.5, 93.5, -15, 7.3)
pt3dadd(163.5, 96, -15, 7.2)
pt3dadd(166.5, 97.5, -15, 7.2)
pt3dadd(170, 99.5, -17.5, 7.2)
pt3dadd(173, 100.5, -17.5, 7.2)
pt3dadd(175.5, 103, -17.5, 7.2)
pt3dadd(178.5, 104, -17.5, 6.3)
pt3dadd(180, 106.5, -17.5, 5.9)
pt3dadd(184, 107, -17.5, 5.6)
pt3dadd(186, 107.5, -17.5, 4.9)
pt3dadd(188.5, 109, -17.5, 5.3)
pt3dadd(192.5, 110.5, -17.5, 7.3)
pt3dadd(196, 113, -18.5, 7.7)
pt3dadd(198, 114, -18.5, 8)
pt3dadd(201, 114.5, -18.5, 8.1)
}
}
proc shape3d_15() {
dend[50] { pt3dadd(206, 117.5, -21, 8.3)
pt3dadd(211.5, 121.5, -21, 9)
pt3dadd(214, 123.5, -22, 7.2)
pt3dadd(216, 125, -21, 6.7)
pt3dadd(218.5, 127.5, -21, 5.7)
pt3dadd(221.5, 130, -20, 6)
pt3dadd(224.5, 133, -23, 6)
pt3dadd(227, 134.5, -24.5, 6.3)
pt3dadd(230, 136, -24.5, 7.3)
pt3dadd(237, 139, -23, 8.8)
pt3dadd(238.5, 139.5, -23, 9)
pt3dadd(241, 140.5, -23, 9.4)
pt3dadd(245, 141.5, -23, 9.7)
pt3dadd(251, 142, -24.5, 4.6)
pt3dadd(254, 143, -24.5, 4.9)
pt3dadd(255.5, 145.5, -25.5, 7.2)
pt3dadd(260, 145.5, -25.5, 6.7)
pt3dadd(262.5, 146.5, -25.5, 5.6)
pt3dadd(265.5, 146.5, -25.5, 6)
pt3dadd(269, 146.5, -25.5, 6.3)
pt3dadd(268.5, 144.5, -27, 6.3)
pt3dadd(271, 144, -27.5, 4.7)
pt3dadd(274, 144, -27.5, 5.2)
pt3dadd(273.5, 146, -25.5, 7.3)
pt3dadd(276.5, 147, -26.5, 7.3)
pt3dadd(279.5, 148, -27, 7.3)
pt3dadd(282.5, 148, -27, 7.3)
pt3dadd(285, 148.5, -27, 7.1)
pt3dadd(287.5, 151, -29, 6.6)
pt3dadd(289, 151, -29, 6.6)
pt3dadd(292, 152.5, -28.5, 6.6)
pt3dadd(292, 155, -27.5, 7.1)
pt3dadd(297, 159.5, -27.5, 6.7)
pt3dadd(299, 160.5, -27.5, 7.8)
pt3dadd(300, 162, -27.5, 8.4)
pt3dadd(304.5, 163.5, -33.5, 9.9)
pt3dadd(305.5, 165, -33.5, 11.2)
}
dend[51] {pt3dclear()
pt3dadd(305.5, 165, -33.5, 11.2)
pt3dadd(309.5, 169.5, -27.5, 7.9)
pt3dadd(311, 172, -33.5, 7.1)
pt3dadd(311.5, 173.5, -33.5, 6.1)
pt3dadd(312.5, 173.5, -33.5, 5.7)
pt3dadd(314.5, 175, -33.5, 4.6)
pt3dadd(316.5, 178, -33.5, 4.3)
pt3dadd(319, 180, -33.5, 4.3)
pt3dadd(321, 183.5, -40, 4.7)
pt3dadd(324, 187.5, -40, 4.7)
pt3dadd(324.5, 188, -40, 4.7)
pt3dadd(326, 191.5, -40, 4.7)
pt3dadd(327.5, 193.5, -46, 3.7)
pt3dadd(328.5, 194, -46, 3.5)
pt3dadd(330.5, 195.5, -46, 4.7)
pt3dadd(332, 196, -46, 5.3)
pt3dadd(334, 198.5, -46, 4.3)
pt3dadd(335.5, 200, -46, 3.6)
pt3dadd(337.5, 201.5, -46, 4.4)
pt3dadd(339, 201.5, -46, 4)
pt3dadd(341, 202.5, -46, 5)
pt3dadd(342.5, 204, -46, 5.2)
pt3dadd(345.5, 204.5, -46, 4.6)
pt3dadd(346.5, 205.5, -46, 4.8)
pt3dadd(350, 207.5, -52.5, 5.3)
pt3dadd(353, 208.5, -52.5, 5.2)
pt3dadd(355.5, 209.5, -52.5, 4.7)
pt3dadd(357.5, 211.5, -52.5, 5.7)
pt3dadd(359.5, 212.5, -52.5, 5.5)
pt3dadd(362.5, 212.5, -52.5, 5.5)
pt3dadd(364, 214.5, -52.5, 5.5)
pt3dadd(366.5, 214.5, -52.5, 4.7)
pt3dadd(369, 216, -52.5, 4.6)
pt3dadd(371.5, 216, -52.5, 5.3)
pt3dadd(372.5, 216, -52.5, 6.2)
pt3dadd(375.5, 217, -52.5, 6)
pt3dadd(378, 218, -52.5, 5)
pt3dadd(381.5, 219.5, -52.5, 5)
pt3dadd(385, 221, -52.5, 5)
pt3dadd(388, 222.5, -52.5, 5)
pt3dadd(389.5, 223, -52.5, 5.2)
pt3dadd(392, 223, -52.5, 5.3)
pt3dadd(395, 223.5, -52.5, 6)
pt3dadd(398.5, 223.5, -58.5, 6.3)
pt3dadd(403.5, 227.5, -58.5, 4)
pt3dadd(407, 229, -58.5, 4)
pt3dadd(409.5, 229.5, -58.5, 4)
pt3dadd(415, 230.5, -58.5, 4)
pt3dadd(420, 232, -60.5, 4)
pt3dadd(421.5, 233, -58.5, 3.6)
pt3dadd(425.5, 233, -60.5, 2.9)
pt3dadd(430.5, 236, -62.5, 2.9)
pt3dadd(433.5, 237, -62.5, 2.9)
pt3dadd(437, 239, -62.5, 2.9)
pt3dadd(443, 242, -68, 3.3)
pt3dadd(444, 243, -56.5, 3.1)
pt3dadd(446.5, 243.5, -54.5, 3.9)
pt3dadd(450.5, 246.5, -56.5, 2.7)
pt3dadd(453, 247, -56.5, 2.3)
pt3dadd(457, 247, -56.5, 2.7)
pt3dadd(460, 249, -56.5, 2.4)
pt3dadd(463.5, 249, -56.5, 2.2)
pt3dadd(466, 251, -58.5, 2)
pt3dadd(469, 252, -58.5, 2)
pt3dadd(471.5, 253.5, -58.5, 2)
pt3dadd(476, 255.5, -58.5, 2)
pt3dadd(479.5, 256, -58.5, 2)
pt3dadd(482.5, 257.5, -58.5, 2)
pt3dadd(486.5, 260.5, -58.5, 2)
pt3dadd(488, 262.5, -58.5, 2)
pt3dadd(491, 264, -58.5, 2)
pt3dadd(492, 265.5, -58.5, 2)
pt3dadd(496, 265.5, -58.5, 3.7)
}
dend[52] {pt3dclear()
pt3dadd(496, 265.5, -58.5, 3.7)
pt3dadd(500.5, 263.5, -50.5, 0.5)
pt3dadd(505, 263.5, -50.5, 0.5)
pt3dadd(510, 262, -50.5, 0.5)
pt3dadd(515, 259.5, -50.5, 0.5)
pt3dadd(523, 257.5, -50.5, 0.5)
pt3dadd(531.5, 257.5, -54.5, 0.5)
pt3dadd(539.5, 257.5, -54.5, 0.5)
pt3dadd(547, 257.5, -56.5, 0.5)
pt3dadd(550.5, 257.5, -56.5, 0.5)
pt3dadd(554, 257.5, -56.5, 0.5)
pt3dadd(559.5, 257.5, -56.5, 0.5)
pt3dadd(566, 257.5, -56.5, 0.5)
pt3dadd(570, 255.5, -54.5, 0.5)
pt3dadd(574.5, 255.5, -54.5, 0.5)
pt3dadd(577.5, 254.5, -58.5, 0.6)
pt3dadd(581.5, 252, -54.5, 0.6)
pt3dadd(584, 252, -54.5, 0.6)
pt3dadd(584.5, 250.5, -54.5, 1.2)
pt3dadd(585.5, 249.5, -54.5, 1.7)
pt3dadd(588, 249, -54.5, 1.2)
pt3dadd(590.5, 249, -58.5, 0.4)
pt3dadd(593, 248, -58.5, 0.4)
pt3dadd(595, 248, -62.5, 0.4)
pt3dadd(598, 248, -62.5, 1.3)
pt3dadd(599.5, 248, -62.5, 1.8)
pt3dadd(601, 248, -62.5, 0.3)
pt3dadd(603.5, 248, -62.5, 0.3)
pt3dadd(607.5, 247.5, -62.5, 1.4)
pt3dadd(611, 247.5, -62.5, 0.3)
pt3dadd(617.5, 247.5, -62.5, 0.3)
pt3dadd(623.5, 247.5, -60.5, 0.3)
pt3dadd(623.5, 248, -60.5, 0.3)
pt3dadd(628.5, 250, -60.5, 0.3)
pt3dadd(630.5, 250, -63.5, 0.8)
pt3dadd(631.5, 250, -57.5, 1.3)
pt3dadd(632.5, 249, -66.5, 0.3)
pt3dadd(635.5, 248.5, -60.5, 0.1)
pt3dadd(636, 248.5, -63.5, 0.1)
pt3dadd(638, 247, -69.5, 1.1)
pt3dadd(639, 247, -69.5, 1.5)
pt3dadd(642, 245.5, -72.5, 1.3)
pt3dadd(645.5, 245, -66.5, 0.1)
pt3dadd(651.5, 245, -69.5, 0.1)
pt3dadd(654, 245, -69.5, 0.1)
pt3dadd(656.5, 245, -66.5, 1)
pt3dadd(658, 245, -66.5, 0.7)
pt3dadd(660, 245, -72.5, 0.1)
pt3dadd(663, 245, -69.5, 0.1)
pt3dadd(664.5, 246.5, -72.5, 0.1)
pt3dadd(666.5, 247, -72.5, 0.1)
pt3dadd(668.5, 246, -72.5, 0.1)
pt3dadd(670, 246.5, -72.5, 0.1)
pt3dadd(671.5, 246.5, -72.5, 0.1)
pt3dadd(675, 246.5, -72.5, 0.1)
pt3dadd(677, 246.5, -72.5, 1.2)
pt3dadd(679, 245.5, -75.5, 0.1)
pt3dadd(682, 245.5, -75.5, 0.1)
pt3dadd(683, 245.5, -69.5, 1)
pt3dadd(685, 244.5, -75.5, 0.1)
pt3dadd(686.5, 244.5, -75.5, 0.1)
pt3dadd(687, 244.5, -75.5, 0.9)
pt3dadd(687.5, 244, -72.5, 0.1)
pt3dadd(691, 244, -72.5, 0.1)
pt3dadd(692.5, 244, -69.5, 1.1)
pt3dadd(693, 246.5, -69.5, 0.1)
pt3dadd(696, 246.5, -69.5, 0.1)
pt3dadd(697.5, 246.5, -69.5, 0.9)
pt3dadd(698.5, 246.5, -72.5, 0.1)
pt3dadd(700.5, 248, -78, 0.1)
pt3dadd(703.5, 246, -78, 0.1)
pt3dadd(705.5, 246, -81, 1.5)
pt3dadd(710, 247, -78, 0.1)
pt3dadd(715, 247, -81, 0.1)
pt3dadd(718.5, 248, -81, 0.1)
pt3dadd(720.5, 248, -84, 0.1)
pt3dadd(723, 249.5, -84, 1.6)
pt3dadd(726.5, 251.5, -81, 0.1)
pt3dadd(729, 252.5, -84, 0.1)
pt3dadd(731, 253, -81, 1.6)
pt3dadd(736.5, 253, -84, 0.1)
pt3dadd(739.5, 251.5, -90, 0.1)
}
dend[53] {pt3dclear()
pt3dadd(496, 265.5, -58.5, 3.7)
pt3dadd(498.5, 269, -58.5, 2.4)
pt3dadd(503, 269.5, -58.5, 2.1)
pt3dadd(505.5, 271, -58.5, 2)
pt3dadd(508, 273, -58.5, 2)
pt3dadd(513, 275, -58.5, 3.7)
}
dend[54] {pt3dclear()
pt3dadd(513, 275, -58.5, 3.7)
pt3dadd(521, 276.5, -52.5, 1.3)
}
}
proc shape3d_16() {
dend[54] { pt3dadd(526.5, 278.5, -52.5, 1.3)
pt3dadd(535, 282, -56.5, 1.3)
pt3dadd(539, 285, -56.5, 1.3)
pt3dadd(543, 288, -56.5, 1.3)
pt3dadd(547, 290, -58.5, 1.3)
pt3dadd(553.5, 290.5, -60.5, 1)
pt3dadd(554.5, 293, -60.5, 1)
pt3dadd(558.5, 296.5, -60.5, 1.6)
pt3dadd(561.5, 299, -60.5, 1.6)
pt3dadd(568.5, 302.5, -60.5, 1.3)
pt3dadd(571, 305, -60.5, 1.4)
pt3dadd(574.5, 307.5, -60.5, 1.4)
pt3dadd(580.5, 312, -60.5, 1.3)
pt3dadd(583.5, 314.5, -60.5, 1.3)
pt3dadd(588, 317, -60.5, 1.3)
pt3dadd(591, 318, -60.5, 1.5)
pt3dadd(593, 320.5, -60.5, 1.5)
pt3dadd(598.5, 323, -64, 1.5)
pt3dadd(600, 326.5, -66, 1.5)
pt3dadd(603, 329.5, -66, 1.3)
pt3dadd(603, 331.5, -66, 1.3)
pt3dadd(604.5, 333.5, -68, 1)
pt3dadd(604.5, 333.5, -60.5, 1.2)
pt3dadd(605, 339, -60.5, 1.3)
pt3dadd(607, 342, -60.5, 1.3)
pt3dadd(609.5, 344, -64, 1.3)
pt3dadd(610.5, 347, -58, 0.8)
pt3dadd(612.5, 348, -58, 1)
pt3dadd(615.5, 351, -61, 1.1)
pt3dadd(617.5, 353, -61, 1.2)
pt3dadd(618.5, 355, -61, 1.4)
pt3dadd(620.5, 358, -61, 2.6)
pt3dadd(623.5, 359, -58, 2.8)
pt3dadd(625.5, 360.5, -58, 2.1)
pt3dadd(627.5, 361, -58, 1.6)
pt3dadd(629.5, 362, -55, 1.2)
pt3dadd(633.5, 362.5, -64, 2)
pt3dadd(633.5, 365.5, -58, 2.2)
pt3dadd(636.5, 368, -64, 2.2)
pt3dadd(639, 370.5, -61, 1.4)
pt3dadd(642.5, 372.5, -61, 1.5)
pt3dadd(646, 374.5, -61, 2.2)
pt3dadd(648.5, 377, -58, 2.9)
pt3dadd(649.5, 376.5, -58, 2.9)
pt3dadd(651, 378, -64, 2.8)
pt3dadd(653, 380, -64, 2.8)
pt3dadd(653.5, 382.5, -61, 4)
}
dend[55] {pt3dclear()
pt3dadd(653.5, 382.5, -61, 4)
pt3dadd(657.5, 381.5, -67, 0.9)
pt3dadd(660.5, 381.5, -70, 0.9)
pt3dadd(662.5, 381.5, -67, 0.9)
pt3dadd(665.5, 383, -70, 0.9)
pt3dadd(669, 383, -67, 0.9)
pt3dadd(671, 385, -70, 1.8)
pt3dadd(673, 385, -70, 1.6)
pt3dadd(674, 384, -70, 1.6)
pt3dadd(677, 384.5, -75.5, 1.1)
pt3dadd(677.5, 384.5, -73, 0.6)
pt3dadd(679, 384.5, -73, 0.6)
pt3dadd(681.5, 384.5, -73, 2)
pt3dadd(686, 384.5, -73, 0.7)
pt3dadd(692, 385.5, -73, 0.7)
pt3dadd(694.5, 387.5, -73, 1.6)
pt3dadd(697, 387, -78.5, 0.9)
pt3dadd(699.5, 386.5, -78.5, 0.9)
pt3dadd(701.5, 385, -78.5, 0.9)
pt3dadd(703.5, 385, -81.5, 1.2)
pt3dadd(706, 385.5, -81.5, 1)
pt3dadd(706, 388.5, -78.5, 0.6)
pt3dadd(708.5, 388.5, -81.5, 1.4)
pt3dadd(711.5, 388, -87.5, 1.5)
pt3dadd(715.5, 390.5, -90.5, 1.5)
pt3dadd(717, 390, -99.5, 1.5)
pt3dadd(720.5, 390.5, -90.5, 0.6)
pt3dadd(721, 387.5, -90.5, 0.7)
pt3dadd(722, 386.5, -97.5, 0.9)
pt3dadd(723.5, 384, -92.5, 1.4)
pt3dadd(725, 384, -100, 0.7)
pt3dadd(727, 383.5, -100, 0.7)
pt3dadd(728, 382.5, -97.5, 0.7)
pt3dadd(728.5, 379, -100, 1.1)
pt3dadd(730, 379, -102, 1.1)
pt3dadd(731.5, 381.5, -102, 1.3)
pt3dadd(733.5, 381.5, -100, 0.8)
pt3dadd(735, 381.5, -100, 0.8)
pt3dadd(735, 380, -104.5, 0.8)
pt3dadd(737.5, 380, -104.5, 0.7)
pt3dadd(736.5, 381.5, -107, 0.7)
pt3dadd(738, 382, -109.5, 0.7)
pt3dadd(740.5, 381.5, -107, 0.9)
pt3dadd(741.5, 381.5, -107, 0.9)
pt3dadd(742.5, 380, -104.5, 0.8)
pt3dadd(744.5, 379.5, -104.5, 0.8)
pt3dadd(747.5, 379.5, -104.5, 0.8)
pt3dadd(747.5, 376.5, -109.5, 0.7)
pt3dadd(750.5, 376.5, -109.5, 0.7)
pt3dadd(752.5, 376.5, -109.5, 1.8)
pt3dadd(754, 375.5, -109.5, 0.9)
pt3dadd(756, 376, -111.5, 0.9)
pt3dadd(757, 376, -114, 0.7)
pt3dadd(759, 376, -119, 0.7)
pt3dadd(760.5, 377, -111.5, 0.9)
pt3dadd(762, 377.5, -114, 1.7)
pt3dadd(765, 377.5, -114, 1.8)
pt3dadd(766, 377.5, -114, 1.5)
pt3dadd(768.5, 375.5, -119, 0.4)
pt3dadd(769, 377, -119, 0.4)
pt3dadd(770, 378, -119, 1.8)
pt3dadd(772, 377.5, -114, 1.5)
pt3dadd(773.5, 377.5, -119, 1.5)
pt3dadd(775.5, 377.5, -121, 1.6)
pt3dadd(777, 378, -114, 1.3)
pt3dadd(778.5, 379, -116.5, 1)
pt3dadd(781.5, 379, -116.5, 1.2)
pt3dadd(782.5, 380.5, -116.5, 1.2)
pt3dadd(784.5, 383.5, -116.5, 1.1)
pt3dadd(785.5, 385, -114, 1.1)
pt3dadd(786.5, 386, -114, 1.1)
pt3dadd(787, 388, -119, 0.9)
pt3dadd(787.5, 388, -114, 1.4)
pt3dadd(790, 387, -119, 1.4)
pt3dadd(791.5, 387.5, -121, 1.3)
pt3dadd(791.5, 391, -116.5, 0.7)
pt3dadd(794.5, 390.5, -116.5, 0.8)
pt3dadd(795, 392, -119, 1)
pt3dadd(796, 393.5, -119, 1)
pt3dadd(798.5, 393.5, -119, 1.2)
pt3dadd(799.5, 393.5, -114, 1.4)
pt3dadd(801, 393.5, -114, 1.5)
pt3dadd(802.5, 394, -116.5, 1)
pt3dadd(804, 397, -116.5, 0.6)
pt3dadd(805.5, 397, -116.5, 0.9)
pt3dadd(806, 397, -116.5, 1.2)
pt3dadd(808, 397.5, -116.5, 1.4)
pt3dadd(809, 397.5, -116.5, 1.4)
pt3dadd(810.5, 397.5, -116.5, 1.4)
pt3dadd(811.5, 397.5, -121, 1.1)
pt3dadd(812, 400, -119, 0.9)
pt3dadd(814, 401, -119, 0.9)
pt3dadd(816, 401, -119, 1)
pt3dadd(817.5, 401.5, -119, 1.1)
pt3dadd(818.5, 403, -121, 1.1)
pt3dadd(820.5, 404, -126, 0.9)
pt3dadd(824.5, 406, -131, 0.8)
}
dend[56] {pt3dclear()
pt3dadd(653.5, 382.5, -61, 4)
pt3dadd(652.5, 386, -61, 0.8)
pt3dadd(652.5, 388.5, -61, 0.8)
pt3dadd(652.5, 392, -61, 0.7)
pt3dadd(653.5, 396, -61, 0.7)
pt3dadd(654, 398, -61, 0.9)
pt3dadd(655, 400.5, -58, 1.1)
pt3dadd(656.5, 404, -61, 1.2)
pt3dadd(657, 405.5, -61, 1.7)
pt3dadd(658, 409, -61, 1.9)
pt3dadd(659, 410, -64, 1.3)
pt3dadd(660.5, 412, -64, 0.1)
pt3dadd(662, 414.5, -61, 0.1)
pt3dadd(665, 417.5, -61, 0.1)
pt3dadd(667.5, 421.5, -58, 0.1)
pt3dadd(672.5, 424, -56.5, 0.7)
pt3dadd(675.5, 426, -56.5, 0.7)
pt3dadd(676.5, 427.5, -54.5, 1.7)
pt3dadd(677, 429, -56.5, 0.3)
pt3dadd(679, 429.5, -56.5, 0.3)
pt3dadd(681, 434, -56.5, 0.3)
pt3dadd(681, 435.5, -54.5, 0.3)
pt3dadd(684, 438, -52.5, 0.3)
pt3dadd(685, 442, -50.5, 0.3)
pt3dadd(686, 444.5, -50.5, 1.6)
pt3dadd(689, 446, -50.5, 1.6)
pt3dadd(690.5, 447.5, -50.5, 0.6)
pt3dadd(693, 449.5, -52.5, 0.6)
pt3dadd(693, 451.5, -50.5, 0.6)
pt3dadd(695, 453, -50.5, 1)
pt3dadd(696, 454.5, -50.5, 1.2)
pt3dadd(697.5, 458, -50.5, 1.3)
pt3dadd(698.5, 461, -48.5, 1.6)
pt3dadd(700, 462.5, -48.5, 1.9)
pt3dadd(700, 464.5, -48.5, 2.3)
pt3dadd(700, 466.5, -48.5, 1.6)
pt3dadd(700.5, 469.5, -43, 1)
pt3dadd(701, 469.5, -45, 1)
pt3dadd(704.5, 471, -45, 1.1)
pt3dadd(704.5, 473.5, -45, 1.2)
pt3dadd(705, 477.5, -45, 1.2)
pt3dadd(704.5, 481, -45, 1.4)
pt3dadd(703.5, 481, -45, 1.6)
pt3dadd(703.5, 484, -45, 2.5)
pt3dadd(704, 485.5, -45, 3.3)
pt3dadd(705.5, 488.5, -45, 2.3)
pt3dadd(705.5, 489.5, -39, 1.3)
pt3dadd(706, 493, -37, 0.7)
pt3dadd(706, 495.5, -37, 0.8)
pt3dadd(707.5, 498.5, -39, 0.9)
pt3dadd(709, 501.5, -39, 1)
pt3dadd(709.5, 504.5, -39, 1)
pt3dadd(713, 509.5, -39, 1)
pt3dadd(713.5, 512, -39, 0.9)
pt3dadd(713, 519, -33, 2)
pt3dadd(713, 522.5, -39, 0.6)
}
}
proc shape3d_17() {
dend[56] { pt3dadd(714, 523.5, -33, 0.6)
pt3dadd(713.5, 524.5, -26.5, 1.3)
pt3dadd(713, 526, -33, 1.7)
pt3dadd(714, 528, -33, 1.8)
pt3dadd(714, 528.5, -26.5, 0.1)
pt3dadd(714, 531, -33, 1.5)
pt3dadd(714, 533, -26.5, 1.5)
pt3dadd(714.5, 534, -26.5, 1.5)
pt3dadd(714.5, 536, -26.5, 1.2)
pt3dadd(715.5, 537.5, -26.5, 1)
pt3dadd(716, 538, -26.5, 0.5)
pt3dadd(716.5, 540.5, -26.5, 0.2)
pt3dadd(716.5, 541.5, -26.5, 0.1)
pt3dadd(717, 543, -26.5, 1.3)
pt3dadd(717, 545, -26.5, 2.1)
pt3dadd(718.5, 545.5, -26.5, 1.3)
pt3dadd(719, 548.5, -26.5, 0.9)
pt3dadd(720, 550, -26.5, 1.3)
pt3dadd(720, 551, -26.5, 0.9)
pt3dadd(720, 553, -26.5, 0.7)
pt3dadd(720, 554.5, -26.5, 0.9)
pt3dadd(720.5, 556, -20.5, 1.7)
pt3dadd(723, 557.5, -26.5, 1.7)
pt3dadd(723.5, 559.5, -20.5, 1.2)
pt3dadd(723.5, 561, -20.5, 0.9)
pt3dadd(724.5, 563.5, -20.5, 1.3)
pt3dadd(725.5, 565, -20.5, 1.2)
pt3dadd(725.5, 566, -20.5, 0.9)
pt3dadd(726, 567, -20.5, 0.9)
pt3dadd(726, 568.5, -20.5, 1.1)
pt3dadd(726, 570, -20.5, 1.1)
pt3dadd(728, 570, -20.5, 1.3)
pt3dadd(729, 569, -20.5, 0.9)
pt3dadd(730, 571, -14, 1.4)
pt3dadd(729.5, 572, -8, 0.9)
pt3dadd(729.5, 574, -8, 0.9)
pt3dadd(730, 574, -8, 1.7)
pt3dadd(730.5, 574.5, -8, 1.7)
pt3dadd(732.5, 574.5, -14, 2.1)
pt3dadd(731, 575.5, -8, 1.7)
pt3dadd(732, 576, -8, 0.9)
pt3dadd(731.5, 577, -8, 1.1)
pt3dadd(731.5, 579.5, -1.5, 1.2)
pt3dadd(731.5, 582, -1.5, 1.2)
pt3dadd(733, 584, -1.5, 1.1)
pt3dadd(734, 587, -8, 1.1)
pt3dadd(735.5, 589, -8, 1)
pt3dadd(735.5, 590.5, -1.5, 2.1)
pt3dadd(736, 591.5, -8, 2.5)
pt3dadd(736, 594.5, -1.5, 1.3)
pt3dadd(736.5, 597, -8, 1.1)
pt3dadd(737, 598, -8, 0.6)
pt3dadd(737, 599.5, 4.5, 0.4)
pt3dadd(738.5, 602.5, -1.5, 0.4)
pt3dadd(740.5, 603.5, -8, 0.4)
}
dend[57] {pt3dclear()
pt3dadd(513, 275, -58.5, 3.7)
pt3dadd(515, 280.5, -56.5, 1.6)
pt3dadd(516.5, 285, -58.5, 1.3)
pt3dadd(518, 287, -58.5, 1.4)
pt3dadd(518.5, 289.5, -58.5, 1.4)
pt3dadd(521, 290.5, -58.5, 1)
pt3dadd(524, 291.5, -58.5, 1)
pt3dadd(524, 296, -58.5, 1.2)
pt3dadd(525, 299, -58.5, 1.6)
pt3dadd(526.5, 304, -60.5, 1.2)
pt3dadd(528.5, 306.5, -62.5, 1.2)
pt3dadd(531.5, 309.5, -62.5, 1.2)
pt3dadd(535, 310.5, -62.5, 1.7)
pt3dadd(538, 312, -62.5, 1.7)
pt3dadd(540, 314, -62.5, 1.7)
pt3dadd(542.5, 316, -62.5, 1.7)
pt3dadd(544, 318.5, -62.5, 1.6)
pt3dadd(544.5, 320, -62.5, 1.4)
pt3dadd(546, 322, -60.5, 0.9)
pt3dadd(548, 325.5, -60.5, 0.9)
pt3dadd(549, 328, -60.5, 1.1)
pt3dadd(552, 331, -60.5, 1.2)
pt3dadd(555, 333, -60.5, 1.2)
pt3dadd(560, 333, -66, 1.1)
pt3dadd(563, 334.5, -62.5, 1.6)
pt3dadd(566.5, 336.5, -62.5, 1.6)
pt3dadd(566.5, 339.5, -62.5, 1.7)
pt3dadd(569.5, 343, -66, 1.7)
pt3dadd(571.5, 347, -66, 1.3)
pt3dadd(571, 349, -66, 1.4)
pt3dadd(571.5, 351.5, -66, 1.4)
pt3dadd(573, 352.5, -66, 1.7)
pt3dadd(573, 353, -66, 2)
pt3dadd(574, 355, -69, 2.1)
pt3dadd(576, 357, -69, 1.7)
pt3dadd(576, 358.5, -69, 1.5)
pt3dadd(577.5, 360.5, -69, 1.2)
pt3dadd(578.5, 363, -69, 1)
pt3dadd(581, 365, -69, 1)
pt3dadd(581, 367.5, -66, 1.5)
pt3dadd(581.5, 368, -72, 2)
pt3dadd(584.5, 372, -72, 2.1)
pt3dadd(586, 375.5, -72, 2.1)
pt3dadd(586.5, 378, -72, 2.1)
pt3dadd(587.5, 380.5, -69, 1.9)
pt3dadd(588.5, 382, -69, 1.8)
pt3dadd(588, 385.5, -69, 2.1)
}
dend[58] {pt3dclear()
pt3dadd(588, 385.5, -69, 2.1)
pt3dadd(590.5, 387.5, -75, 0.9)
pt3dadd(590.5, 385.5, -69, 0.9)
pt3dadd(591, 384.5, -69, 0.6)
pt3dadd(592, 383.5, -72, 0.6)
pt3dadd(592.5, 381.5, -78, 2.1)
pt3dadd(592.5, 385.5, -80.5, 0.3)
pt3dadd(592, 387.5, -83.5, 0.3)
pt3dadd(591.5, 390, -83.5, 0.4)
pt3dadd(594.5, 393, -80.5, 0.4)
pt3dadd(596.5, 396, -83.5, 0.6)
pt3dadd(597.5, 396, -83.5, 0.7)
pt3dadd(599, 397, -83.5, 1.4)
pt3dadd(602, 397, -86.5, 1.4)
pt3dadd(605, 398.5, -86.5, 1.6)
pt3dadd(607.5, 399, -86.5, 1.2)
pt3dadd(610, 399, -86.5, 0.7)
pt3dadd(613, 399, -89.5, 0.9)
pt3dadd(614, 401.5, -89.5, 1)
pt3dadd(615, 403.5, -89.5, 1.1)
pt3dadd(617, 405, -86.5, 0.6)
pt3dadd(617.5, 408.5, -89.5, 0.6)
pt3dadd(618.5, 410.5, -89.5, 0.6)
pt3dadd(619.5, 412, -89.5, 1.2)
pt3dadd(620.5, 414, -92.5, 1.7)
pt3dadd(622.5, 416, -92.5, 1.1)
pt3dadd(623.5, 417, -95.5, 1.1)
pt3dadd(627, 419.5, -95.5, 1.2)
pt3dadd(628.5, 421.5, -95.5, 1.3)
pt3dadd(631, 424.5, -95.5, 1.3)
pt3dadd(632.5, 425.5, -95.5, 1.2)
pt3dadd(632.5, 421, -95.5, 1.4)
pt3dadd(633.5, 421, -98, 0.7)
pt3dadd(636.5, 421, -98, 0.7)
pt3dadd(637.5, 420, -100.5, 0.7)
pt3dadd(639.5, 419.5, -100.5, 0.7)
pt3dadd(640.5, 419.5, -103, 0.7)
pt3dadd(642, 420.5, -103, 0.7)
pt3dadd(642, 422, -103, 0.7)
pt3dadd(642.5, 422, -103, 0.7)
pt3dadd(644, 421.5, -103, 0.7)
pt3dadd(646.5, 421.5, -103, 1.1)
pt3dadd(646.5, 422, -110, 1.5)
pt3dadd(649, 423.5, -103, 0.6)
pt3dadd(651, 423, -103, 0.6)
pt3dadd(651, 421.5, -103, 0.6)
pt3dadd(653, 421, -103, 0.7)
pt3dadd(655, 421, -103, 0.7)
pt3dadd(657, 422.5, -105, 0.7)
pt3dadd(657.5, 423.5, -105, 0.7)
pt3dadd(660.5, 425.5, -105, 0.7)
pt3dadd(662.5, 427, -105, 0.7)
pt3dadd(662.5, 429.5, -105, 0.7)
pt3dadd(663, 429.5, -105, 1.2)
pt3dadd(664, 432, -105, 0.9)
pt3dadd(665, 434.5, -105, 1.1)
pt3dadd(665.5, 436.5, -105, 0.7)
pt3dadd(667, 436.5, -107.5, 0.8)
pt3dadd(669, 439, -110, 0.6)
pt3dadd(672, 440.5, -112.5, 1.1)
pt3dadd(674, 442.5, -110, 0.5)
pt3dadd(674.5, 445.5, -110, 0.5)
pt3dadd(677, 446, -110, 0.5)
pt3dadd(677, 447, -110, 0.5)
pt3dadd(678, 447.5, -110, 0.5)
pt3dadd(680, 450.5, -112.5, 0.5)
pt3dadd(681, 449, -112.5, 1.1)
pt3dadd(682.5, 450.5, -114.5, 0.8)
pt3dadd(682.5, 453, -114.5, 0.8)
pt3dadd(683.5, 454.5, -117, 0.8)
pt3dadd(685, 457.5, -117, 0.8)
pt3dadd(685, 459.5, -117, 0.8)
pt3dadd(685, 461.5, -117, 0.8)
pt3dadd(687.5, 463, -117, 0.8)
pt3dadd(689, 466, -114.5, 0.8)
pt3dadd(690.5, 466.5, -119.5, 0.7)
pt3dadd(692, 468, -119.5, 0.7)
pt3dadd(693.5, 470.5, -119.5, 0.7)
pt3dadd(694.5, 472, -119.5, 0.7)
pt3dadd(695.5, 474.5, -119.5, 0.7)
pt3dadd(697, 476.5, -119.5, 0.7)
pt3dadd(699, 478.5, -119.5, 0.7)
pt3dadd(701.5, 478.5, -114.5, 0.7)
pt3dadd(704, 478.5, -114.5, 0.7)
pt3dadd(707, 479.5, -117, 0.7)
pt3dadd(707, 480, -114.5, 0.7)
pt3dadd(707, 482.5, -114.5, 0.7)
pt3dadd(708, 483, -114.5, 0.7)
pt3dadd(709, 484, -114.5, 0.7)
pt3dadd(710, 485, -114.5, 0.7)
pt3dadd(710, 486.5, -112.5, 0.7)
pt3dadd(712.5, 487.5, -114.5, 0.7)
pt3dadd(715.5, 489.5, -114.5, 0.7)
pt3dadd(718, 489.5, -114.5, 0.7)
pt3dadd(719.5, 490, -117, 0.7)
pt3dadd(721, 492, -119.5, 0.7)
pt3dadd(721, 494, -122, 0.7)
pt3dadd(720.5, 495.5, -124, 0.7)
}
}
proc shape3d_18() {
dend[58] { pt3dadd(722, 500.5, -124, 0.7)
pt3dadd(722, 502, -124, 0.7)
pt3dadd(723.5, 504, -117, 0.7)
pt3dadd(723.5, 506.5, -117, 0.7)
pt3dadd(724.5, 509, -117, 0.7)
pt3dadd(725, 511.5, -114.5, 0.1)
pt3dadd(727.5, 511.5, -112.5, 0.1)
pt3dadd(729.5, 513, -112.5, 0.1)
pt3dadd(730.5, 517, -112.5, 0.1)
pt3dadd(731.5, 519.5, -112.5, 0.1)
pt3dadd(732, 519.5, -112.5, 0.1)
pt3dadd(732.5, 521, -112.5, 0.1)
pt3dadd(734.5, 524.5, -114.5, 0.1)
pt3dadd(736.5, 529.5, -110, 0.1)
pt3dadd(741, 529.5, -110, 0.1)
pt3dadd(741.5, 532, -110, 0.1)
pt3dadd(741.5, 534.5, -110, 0.1)
pt3dadd(744.5, 537, -110, 0.1)
pt3dadd(744.5, 539, -110, 0.1)
pt3dadd(748.5, 541, -112.5, 0.1)
pt3dadd(749, 541, -107.5, 0.9)
pt3dadd(750, 544, -107.5, 0.1)
pt3dadd(752.5, 548.5, -107.5, 0.1)
pt3dadd(754.5, 553, -107.5, 0.1)
}
dend[59] {pt3dclear()
pt3dadd(588, 385.5, -69, 2.1)
pt3dadd(587.5, 391, -72, 1.1)
pt3dadd(587.5, 392, -66, 0.5)
pt3dadd(586.5, 393.5, -63, 0.7)
pt3dadd(586.5, 396, -63, 0.7)
pt3dadd(586.5, 396.5, -69, 0.7)
pt3dadd(586, 398.5, -69, 0.7)
pt3dadd(586, 400.5, -66, 1.1)
pt3dadd(587.5, 401.5, -69, 1.1)
pt3dadd(588.5, 405.5, -69, 1.3)
pt3dadd(589, 408.5, -69, 1.4)
pt3dadd(589.5, 412, -69, 1.4)
pt3dadd(589.5, 414.5, -69, 1.3)
pt3dadd(589.5, 417.5, -69, 1.3)
pt3dadd(589, 419.5, -66, 1.3)
pt3dadd(588, 424.5, -66, 1.3)
pt3dadd(590, 429, -60, 0.9)
pt3dadd(591, 432, -60, 0.9)
pt3dadd(593, 433.5, -60, 1.1)
pt3dadd(592, 438, -60, 1.1)
pt3dadd(592, 440, -60, 1.1)
pt3dadd(592, 444, -60, 1.2)
pt3dadd(592, 447, -60, 1.2)
pt3dadd(592, 448.5, -60, 1.2)
pt3dadd(590.5, 450.5, -56.5, 0.9)
pt3dadd(592.5, 451, -56.5, 1.4)
pt3dadd(593.5, 455.5, -56.5, 0.9)
pt3dadd(594.5, 459.5, -58, 0.9)
pt3dadd(594.5, 460.5, -56.5, 1)
pt3dadd(595.5, 463.5, -56.5, 1)
pt3dadd(595.5, 466, -56.5, 1)
pt3dadd(597, 469.5, -56.5, 1.1)
pt3dadd(597, 472.5, -56.5, 1.2)
pt3dadd(597, 476, -56.5, 1.2)
pt3dadd(598.5, 476.5, -56.5, 1.5)
pt3dadd(599.5, 481, -56.5, 2)
pt3dadd(601, 484.5, -60, 2)
pt3dadd(601, 488, -60, 2.7)
pt3dadd(602, 491, -60, 2.8)
pt3dadd(601.5, 493.5, -48.5, 1)
pt3dadd(602.5, 499.5, -52.5, 1.1)
pt3dadd(602, 502, -52.5, 1.4)
pt3dadd(600, 504.5, -52.5, 1.3)
pt3dadd(599.5, 506, -52.5, 1.3)
pt3dadd(600.5, 508, -52.5, 1.1)
pt3dadd(600.5, 510.5, -52.5, 1.8)
pt3dadd(600.5, 512, -52.5, 2)
pt3dadd(601.5, 514.5, -52.5, 1.9)
pt3dadd(602.5, 517, -52.5, 0.8)
pt3dadd(602.5, 520, -54.5, 1.1)
pt3dadd(603, 522, -54.5, 1.1)
pt3dadd(603, 524, -52.5, 1.5)
pt3dadd(605.5, 525.5, -52.5, 1.5)
pt3dadd(607, 529, -52.5, 1.2)
pt3dadd(607.5, 531, -52.5, 1)
pt3dadd(608, 535, -52.5, 1)
pt3dadd(608, 536.5, -54.5, 1)
pt3dadd(608.5, 540, -54.5, 0.7)
pt3dadd(608, 545, -52.5, 1.1)
pt3dadd(609.5, 553.5, -58, 1.1)
pt3dadd(610, 557.5, -54.5, 0.1)
pt3dadd(608.5, 567.5, -54.5, 0.1)
pt3dadd(609.5, 576.5, -54.5, 0.1)
pt3dadd(609, 580.5, -54.5, 0.1)
pt3dadd(609, 582.5, -48, 0.1)
pt3dadd(610, 585, -54.5, 0.9)
pt3dadd(610.5, 587, -48, 1.1)
pt3dadd(610.5, 587.5, -48, 1.1)
pt3dadd(611.5, 589, -48, 0.4)
pt3dadd(611.5, 591, -48, 0.4)
pt3dadd(611, 592.5, -48, 0.4)
pt3dadd(610, 595, -48, 0.4)
pt3dadd(610.5, 596.5, -48, 0.3)
pt3dadd(610.5, 598, -54.5, 2)
pt3dadd(610, 599.5, -48, 0.1)
pt3dadd(611.5, 603.5, -54.5, 0.2)
pt3dadd(612, 605, -48, 0.6)
pt3dadd(612.5, 606.5, -48, 1.1)
pt3dadd(612.5, 608, -48, 1.2)
pt3dadd(612.5, 611.5, -48, 1.5)
pt3dadd(613, 613.5, -48, 2.2)
pt3dadd(614, 616.5, -48, 2.2)
pt3dadd(614, 619, -48, 2.1)
pt3dadd(613.5, 621.5, -42, 1.4)
pt3dadd(613, 621.5, -42, 1.2)
pt3dadd(612.5, 623.5, -42, 1.2)
pt3dadd(612, 626.5, -35.5, 1.9)
pt3dadd(610.5, 627.5, -42, 1.6)
pt3dadd(610, 629.5, -42, 1.3)
pt3dadd(610, 632, -42, 1.3)
pt3dadd(610, 635, -42, 1.1)
pt3dadd(610, 638, -42, 1)
pt3dadd(610, 638.5, -42, 1)
pt3dadd(609, 639.5, -42, 2.5)
pt3dadd(609, 641, -42, 2.6)
pt3dadd(609, 642.5, -42, 2)
pt3dadd(609.5, 645, -35.5, 1)
pt3dadd(608, 645.5, -35.5, 1)
pt3dadd(607.5, 647.5, -35.5, 1)
pt3dadd(606, 648.5, -35.5, 0.1)
pt3dadd(607, 649.5, -29.5, 0.1)
pt3dadd(608.5, 651.5, -35.5, 1.7)
pt3dadd(608, 652.5, -29.5, 0.1)
pt3dadd(608, 654.5, -29.5, 0.1)
pt3dadd(608.5, 655.5, -29.5, 0.1)
pt3dadd(609, 656.5, -29.5, 0.1)
pt3dadd(609, 658, -29.5, 1.4)
pt3dadd(608.5, 660, -29.5, 1.7)
pt3dadd(608, 661, -35.5, 0.1)
pt3dadd(607.5, 664, -35.5, 0.2)
pt3dadd(607, 664, -29.5, 0.7)
pt3dadd(607, 665, -29.5, 2)
pt3dadd(607, 668, -29.5, 2.5)
pt3dadd(606.5, 670, -35.5, 2.5)
pt3dadd(605.5, 673, -35.5, 2.4)
pt3dadd(603.5, 673, -35.5, 0.9)
pt3dadd(601.5, 674.5, -35.5, 0.1)
pt3dadd(601, 676.5, -35.5, 0.1)
pt3dadd(600, 679, -35.5, 0.1)
pt3dadd(600, 680.5, -35.5, 1.6)
pt3dadd(597.5, 682, -29.5, 0.1)
pt3dadd(596, 684, -29.5, 1.3)
pt3dadd(595, 685.5, -23, 0.1)
pt3dadd(595, 689.5, -23, 0.1)
pt3dadd(595, 692, -23, 0.1)
pt3dadd(595.5, 693, -23, 0.1)
pt3dadd(595.5, 695.5, -29.5, 1.6)
pt3dadd(595.5, 697, -23, 3)
pt3dadd(595, 699.5, -23, 3.9)
pt3dadd(593.5, 699.5, -23, 2.5)
pt3dadd(593.5, 701, -29.5, 0.1)
pt3dadd(592.5, 702.5, -29.5, 0.1)
pt3dadd(590.5, 703, -29.5, 2.8)
pt3dadd(590, 706.5, -29.5, 0.1)
pt3dadd(590, 709, -29.5, 0.1)
pt3dadd(591, 710.5, -29.5, 1.1)
pt3dadd(591, 712, -29.5, 1.1)
pt3dadd(591, 716, -29.5, 0.7)
pt3dadd(591, 717.5, -23, 2.2)
pt3dadd(590.5, 720.5, -23, 2.7)
pt3dadd(591, 723, -23, 1.7)
pt3dadd(592, 725.5, -23, 1.5)
pt3dadd(591.5, 727, -23, 0.9)
pt3dadd(591.5, 729, -23, 0.1)
pt3dadd(591.5, 732.5, -23, 0.1)
pt3dadd(591, 734, -23, 0.1)
pt3dadd(591, 734.5, -23, 0.9)
pt3dadd(589.5, 737, -23, 0.1)
pt3dadd(589, 738.5, -23, 0.1)
pt3dadd(589, 740.5, -23, 0.8)
pt3dadd(589.5, 743, -23, 0.1)
pt3dadd(590, 744, -23, 0.1)
pt3dadd(590, 746.5, -23, 0.1)
pt3dadd(589.5, 748, -17, 1.3)
pt3dadd(588, 750.5, -23, 0.1)
pt3dadd(588, 752.5, -23, 0.1)
pt3dadd(588.5, 753, -17, 4.3)
pt3dadd(587, 756.5, -23, 0.1)
pt3dadd(586, 759.5, -23, 0.1)
pt3dadd(584.5, 760, -23, 2.6)
pt3dadd(583.5, 762, -17, 0.1)
pt3dadd(582.5, 766, -17, 0.1)
pt3dadd(580.5, 770, -17, 0.1)
pt3dadd(580, 773.5, -17, 0.1)
pt3dadd(579, 776.5, -17, 0.1)
pt3dadd(576, 780.5, -17, 0.1)
pt3dadd(572.5, 783, -17, 0.1)
pt3dadd(571, 783.5, -17, 0.1)
pt3dadd(568, 784, -17, 0.1)
pt3dadd(566.5, 786.5, -17, 0.1)
pt3dadd(564, 790.5, -17, 0.1)
pt3dadd(564, 794.5, -17, 0.1)
pt3dadd(564, 798, -10.5, 0.1)
pt3dadd(564.5, 802.5, -10.5, 0.1)
}
dend[60] {pt3dclear()
pt3dadd(305.5, 165, -33.5, 11.2)
pt3dadd(310.5, 160.5, -40, 7.6)
}
}
proc shape3d_19() {
dend[60] { pt3dadd(314, 159.5, -40, 6.3)
pt3dadd(317.5, 159.5, -40, 6)
pt3dadd(319, 158.5, -40, 4.7)
pt3dadd(322.5, 158.5, -46, 3.8)
pt3dadd(325, 159, -46, 3.8)
pt3dadd(326.5, 160, -46, 4)
pt3dadd(328.5, 160.5, -52.5, 5)
pt3dadd(331, 163, -58.5, 4.7)
pt3dadd(332, 165, -52.5, 4)
pt3dadd(334, 166.5, -52.5, 4)
pt3dadd(336, 168, -52.5, 4.8)
pt3dadd(336, 171, -52.5, 5.7)
pt3dadd(336.5, 174.5, -52.5, 5.8)
pt3dadd(337, 178, -52.5, 6)
pt3dadd(341, 182, -56.5, 4.3)
pt3dadd(344.5, 182, -56.5, 3.8)
pt3dadd(348, 183, -56.5, 4.3)
pt3dadd(351, 184.5, -56.5, 4.3)
pt3dadd(354, 185.5, -58, 4.8)
pt3dadd(355.5, 185.5, -58, 5.5)
pt3dadd(357, 186.5, -58, 5.3)
pt3dadd(358.5, 186.5, -58, 4.8)
pt3dadd(359.5, 187.5, -62, 4.3)
pt3dadd(362, 188.5, -60, 2.6)
pt3dadd(364.5, 188.5, -60, 3.4)
pt3dadd(366, 188.5, -60, 5)
pt3dadd(368, 189.5, -60, 4.9)
pt3dadd(369, 191, -62, 4.9)
pt3dadd(374, 191, -66, 4.7)
pt3dadd(376.5, 191, -63, 2.9)
pt3dadd(378.5, 191.5, -63, 4.3)
pt3dadd(380.5, 191.5, -66, 5.7)
}
dend[61] {pt3dclear()
pt3dadd(380.5, 191.5, -66, 5.7)
pt3dadd(384, 189.5, -63, 3.7)
pt3dadd(385.5, 188, -66, 3.1)
pt3dadd(386.5, 188, -66, 2.7)
pt3dadd(389, 187.5, -72, 3.8)
pt3dadd(391.5, 187.5, -72, 3.6)
pt3dadd(393.5, 187, -72, 2.7)
pt3dadd(396.5, 183.5, -69, 3.1)
pt3dadd(397.5, 183, -69, 4.3)
pt3dadd(398.5, 182.5, -69, 4.3)
pt3dadd(400, 180.5, -78, 4.3)
pt3dadd(401, 180.5, -78, 5.4)
pt3dadd(402, 180, -78, 5.9)
}
dend[62] {pt3dclear()
pt3dadd(402, 180, -78, 5.9)
pt3dadd(404.5, 175.5, -81, 2.6)
pt3dadd(404.5, 174, -81, 2.6)
pt3dadd(400.5, 172.5, -81, 2.4)
pt3dadd(399.5, 173, -86.5, 2.9)
pt3dadd(396, 174, -86.5, 3.1)
pt3dadd(398.5, 175.5, -86.5, 3.3)
pt3dadd(397.5, 171, -86.5, 3.4)
pt3dadd(397.5, 168, -86.5, 3)
pt3dadd(396, 165, -89, 1.7)
pt3dadd(394.5, 164.5, -89, 2.5)
pt3dadd(395, 168, -89, 2.2)
pt3dadd(393, 164.5, -96, 3.1)
pt3dadd(395.5, 162, -96, 3.1)
pt3dadd(396.5, 160, -96, 3.1)
pt3dadd(396.5, 157, -96, 2.8)
pt3dadd(393.5, 157.5, -96, 2.6)
pt3dadd(394, 156, -105.5, 2.1)
pt3dadd(395, 154.5, -105.5, 1.9)
pt3dadd(397.5, 152, -113, 2.6)
pt3dadd(394.5, 151, -105.5, 2.8)
pt3dadd(393, 151, -113, 3.4)
pt3dadd(393.5, 148.5, -117.5, 3.4)
}
dend[63] {pt3dclear()
pt3dadd(402, 180, -78, 5.9)
pt3dadd(406.5, 178.5, -81, 2.8)
pt3dadd(408, 178.5, -81, 2.6)
pt3dadd(410.5, 177.5, -81, 2.1)
pt3dadd(412.5, 177.5, -81, 2.1)
pt3dadd(415.5, 177, -81, 2.7)
pt3dadd(416.5, 177, -81, 2.4)
pt3dadd(419, 176, -84, 1.9)
pt3dadd(421, 175, -84, 1.9)
pt3dadd(423, 175, -84, 2.5)
pt3dadd(429.5, 171.5, -81, 3.1)
pt3dadd(433, 170, -81, 2.3)
pt3dadd(436, 168, -86.5, 2.7)
pt3dadd(439, 166, -89.5, 2.7)
pt3dadd(441.5, 164.5, -89.5, 3.3)
pt3dadd(443, 163.5, -84, 3.7)
pt3dadd(445.5, 162, -84, 3.7)
pt3dadd(448, 160, -84, 2.3)
pt3dadd(449, 158.5, -84, 2.6)
pt3dadd(451.5, 156, -89.5, 2.5)
pt3dadd(454.5, 151.5, -89.5, 2.7)
pt3dadd(455, 150.5, -94.5, 3.1)
pt3dadd(456, 148, -89.5, 2.7)
pt3dadd(456.5, 147, -94.5, 2.4)
pt3dadd(456.5, 144.5, -92, 2.7)
pt3dadd(457, 143.5, -94.5, 2.5)
pt3dadd(457, 141.5, -94.5, 2.4)
pt3dadd(458.5, 141, -94.5, 2.4)
pt3dadd(459, 139.5, -92, 3.1)
pt3dadd(460.5, 138.5, -94.5, 2.8)
pt3dadd(462, 137.5, -94.5, 2.3)
pt3dadd(462.5, 135.5, -96.5, 2.1)
pt3dadd(464, 134.5, -96.5, 1.9)
pt3dadd(464.5, 132.5, -96.5, 1.6)
pt3dadd(465, 131.5, -99, 1.6)
pt3dadd(466, 131, -99, 1.6)
pt3dadd(467.5, 130, -99, 2)
pt3dadd(469, 129.5, -101.5, 2.1)
pt3dadd(470.5, 129.5, -101.5, 1.9)
pt3dadd(472, 128, -101.5, 1.8)
pt3dadd(473, 127.5, -104, 1.8)
pt3dadd(474.5, 126, -104, 1.8)
pt3dadd(473.5, 124, -104, 2.2)
pt3dadd(473.5, 121.5, -104, 2.5)
pt3dadd(474.5, 117.5, -104, 2.5)
pt3dadd(474.5, 117, -104, 2.5)
pt3dadd(474.5, 115, -101.5, 2.7)
pt3dadd(474, 109.5, -106, 2.5)
pt3dadd(473, 105.5, -106, 2.4)
pt3dadd(472, 104.5, -106, 2)
pt3dadd(471, 102.5, -106, 1.9)
pt3dadd(470.5, 101, -106, 1.8)
pt3dadd(471, 98.5, -106, 1.8)
pt3dadd(469.5, 96.5, -106, 1.6)
pt3dadd(469.5, 95.5, -108.5, 1.4)
pt3dadd(469, 94, -108.5, 1.4)
pt3dadd(468.5, 92, -108.5, 1.4)
}
dend[64] {pt3dclear()
pt3dadd(380.5, 191.5, -66, 5.7)
pt3dadd(382, 195, -63, 1.5)
pt3dadd(384.5, 196, -66, 1.5)
pt3dadd(387.5, 198.5, -66, 1.5)
pt3dadd(389.5, 200.5, -66, 1.5)
pt3dadd(390, 200.5, -63, 2.6)
pt3dadd(392.5, 202, -63, 2.6)
pt3dadd(395, 202.5, -63, 2.7)
pt3dadd(397, 204, -63, 2.7)
pt3dadd(400, 205.5, -66, 1.7)
pt3dadd(400.5, 206, -66, 1.8)
pt3dadd(403.5, 206.5, -69, 1.8)
pt3dadd(405.5, 207.5, -69, 2)
pt3dadd(408, 207.5, -69, 1.8)
pt3dadd(410.5, 208, -69, 1.4)
pt3dadd(412, 210, -69, 2)
pt3dadd(413.5, 211.5, -69, 3)
pt3dadd(415, 212.5, -72, 3.7)
pt3dadd(417, 214.5, -72, 3.3)
pt3dadd(418.5, 216.5, -69, 2.5)
pt3dadd(418.5, 218, -69, 2.7)
pt3dadd(420.5, 219.5, -75, 2.1)
pt3dadd(421, 221, -75, 1.7)
pt3dadd(423.5, 221, -75, 1.7)
pt3dadd(426.5, 221, -78, 2.1)
pt3dadd(428, 221.5, -78, 2.8)
pt3dadd(430.5, 223.5, -78, 3)
pt3dadd(433, 223.5, -78, 2.8)
pt3dadd(434, 225, -78, 3.1)
pt3dadd(435.5, 225.5, -81, 3.7)
pt3dadd(437.5, 228.5, -81, 2.7)
pt3dadd(441, 230.5, -81, 3.4)
pt3dadd(444, 233, -81, 3.1)
pt3dadd(447, 235.5, -84, 3.4)
pt3dadd(450, 236.5, -84, 2.5)
pt3dadd(452.5, 239, -84, 2.5)
pt3dadd(454, 242, -86.5, 2.5)
pt3dadd(456, 245.5, -86.5, 2.3)
pt3dadd(458.5, 247.5, -89.5, 1.8)
pt3dadd(463, 249.5, -94.5, 1.8)
pt3dadd(465.5, 250, -94.5, 1.8)
pt3dadd(463.5, 253, -97, 1.8)
pt3dadd(466, 253, -99, 1.8)
pt3dadd(468, 254, -99, 1.8)
pt3dadd(470, 254, -99, 2.1)
pt3dadd(471, 255, -97, 2.4)
pt3dadd(472, 256.5, -97, 2)
pt3dadd(474.5, 256.5, -97, 2)
pt3dadd(476, 256.5, -97, 2.8)
pt3dadd(477, 256, -99, 3.6)
pt3dadd(479.5, 256, -99, 3.6)
pt3dadd(481, 255, -104, 2.7)
pt3dadd(482, 255, -104, 2.2)
pt3dadd(483.5, 253, -104, 2.2)
pt3dadd(485.5, 253, -104, 2.2)
pt3dadd(488, 253, -104, 2.2)
pt3dadd(488, 255, -104, 2.2)
pt3dadd(489.5, 255, -104, 2.2)
pt3dadd(490.5, 257, -106.5, 1.4)
pt3dadd(492.5, 257.5, -106.5, 1.4)
pt3dadd(494.5, 257.5, -106.5, 2.7)
pt3dadd(496, 257.5, -106.5, 2.6)
pt3dadd(498, 257.5, -111, 2.4)
pt3dadd(499.5, 257.5, -111, 2.1)
pt3dadd(502.5, 257.5, -111, 2.1)
pt3dadd(504.5, 258, -111, 2.1)
pt3dadd(506, 259, -111, 2)
pt3dadd(508, 260, -111, 1.9)
pt3dadd(509.5, 260, -111, 1.9)
pt3dadd(510, 263, -113.5, 2.4)
pt3dadd(511, 265, -116, 2.4)
pt3dadd(513, 265, -116, 2.4)
}
dend[65] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 7.7)
pt3dadd(26, 44, -11, 7.7)
pt3dadd(25.5, 47, -10, 7)
}
}
proc shape3d_20() {
dend[65] { pt3dadd(24, 49.5, -10, 7)
pt3dadd(22, 53, -10, 7)
pt3dadd(22, 56, -10, 7)
pt3dadd(22, 59.5, -10, 7)
pt3dadd(22, 61.5, -10, 7)
pt3dadd(22, 64, -10, 7)
pt3dadd(21.5, 66.5, -9.5, 7.3)
pt3dadd(21.5, 69.5, -9.5, 6.5)
pt3dadd(19.5, 72.5, -9.5, 6.5)
pt3dadd(18, 77, -9.5, 6.5)
pt3dadd(16.5, 81, -9.5, 6.5)
pt3dadd(14.5, 83, -8.5, 6.2)
pt3dadd(14.5, 85.5, -8.5, 5.6)
pt3dadd(13, 88.5, -8.5, 5)
pt3dadd(11, 91, -8.5, 5.3)
pt3dadd(10, 94, -8.5, 7.3)
pt3dadd(9.5, 97, -7.5, 8)
pt3dadd(7, 102.5, -7.5, 8.1)
pt3dadd(6.5, 104.5, -9.5, 8.2)
pt3dadd(4, 108, -9.5, 8.2)
pt3dadd(2.5, 110.5, -9.5, 8.2)
pt3dadd(0.5, 114, -10, 7.5)
pt3dadd(-1, 117, -10, 7.3)
pt3dadd(-3.5, 119.5, -11, 7.1)
pt3dadd(-5.5, 122.5, -9.5, 8.2)
pt3dadd(-5.5, 125.5, -12, 7.7)
pt3dadd(-7.5, 128.5, -11, 7.1)
pt3dadd(-9.5, 131.5, -11, 7.1)
pt3dadd(-11, 135, -11, 7.2)
pt3dadd(-12, 138, -11, 7.6)
pt3dadd(-12, 140.5, -11, 7.3)
pt3dadd(-13.5, 144.5, -9.5, 7.5)
pt3dadd(-14.5, 147.5, -10, 7.3)
pt3dadd(-15.5, 150, -10, 7.8)
pt3dadd(-18, 153, -10, 7.6)
pt3dadd(-18.5, 157.5, -11, 8.1)
pt3dadd(-20, 158.5, -11, 9.3)
pt3dadd(-22.5, 163, -11, 8)
pt3dadd(-25, 166.5, -9.5, 7.9)
pt3dadd(-27, 170, -10, 8.3)
pt3dadd(-27.5, 174, -10, 8.1)
pt3dadd(-31, 178, -10, 9.3)
pt3dadd(-34, 182.5, -11, 10.9)
pt3dadd(-35.5, 185, -12, 10.9)
}
dend[66] {pt3dclear()
pt3dadd(-35.5, 185, -12, 10.9)
pt3dadd(-42.5, 187.5, -11, 4.3)
pt3dadd(-45, 189.5, -10, 3.8)
pt3dadd(-47, 192.5, -9.5, 2.8)
pt3dadd(-49.5, 193, -10, 1.9)
pt3dadd(-50.5, 196, -9.5, 2.3)
pt3dadd(-53, 199, -9.5, 3.4)
pt3dadd(-53.5, 202, -7.5, 5.4)
pt3dadd(-55, 205.5, -6.5, 5.4)
pt3dadd(-57, 210, -6.5, 5.4)
pt3dadd(-58, 214.5, -9, 1.5)
pt3dadd(-58.5, 217.5, -14.5, 2.2)
pt3dadd(-58.5, 221.5, -12, 3.1)
pt3dadd(-58.5, 224.5, -12, 3.1)
pt3dadd(-59.5, 226.5, -9, 2.4)
pt3dadd(-60, 228, 2, 2.3)
pt3dadd(-60.5, 232, 2, 2.8)
pt3dadd(-60.5, 235.5, 2, 3.3)
pt3dadd(-60.5, 238, 2, 3.3)
pt3dadd(-60.5, 240.5, 2, 3.2)
pt3dadd(-59.5, 242.5, 2, 3.2)
pt3dadd(-57, 247.5, 2, 2.7)
pt3dadd(-56, 249, -1, 3.2)
pt3dadd(-55.5, 254, -1, 3.3)
pt3dadd(-55, 256.5, 2, 3.8)
pt3dadd(-55, 260.5, 2, 3.8)
pt3dadd(-55, 264, 2, 3.8)
pt3dadd(-54.5, 266.5, 2, 3.8)
pt3dadd(-54.5, 268.5, 5, 3.8)
pt3dadd(-54, 269, 7.5, 4)
pt3dadd(-54, 270.5, 13, 4)
pt3dadd(-54.5, 274, 10.5, 3.4)
pt3dadd(-54.5, 276.5, 16, 3.2)
pt3dadd(-54.5, 278, 16, 3.2)
pt3dadd(-54.5, 282, 16, 3.2)
pt3dadd(-54.5, 288, 17.5, 3.1)
pt3dadd(-54.5, 292, 17.5, 3.3)
pt3dadd(-54.5, 295, 20, 3.3)
pt3dadd(-54.5, 299, 20, 3.3)
pt3dadd(-54.5, 301, 20, 3.1)
pt3dadd(-54.5, 303, 21.5, 2.8)
pt3dadd(-55.5, 304.5, 21.5, 2.8)
pt3dadd(-57, 306.5, 21.5, 2.9)
pt3dadd(-54.5, 307, 21.5, 3.3)
pt3dadd(-53.5, 310, 21.5, 3.3)
pt3dadd(-53.5, 313, 21.5, 3.3)
pt3dadd(-55, 315.5, 21.5, 3.3)
pt3dadd(-57, 320.5, 21.5, 3.4)
pt3dadd(-59.5, 324, 21.5, 3.7)
pt3dadd(-61, 326, 21.5, 4.3)
pt3dadd(-62.5, 327.5, 21.5, 4.5)
pt3dadd(-63.5, 330, 21.5, 5.5)
pt3dadd(-65.5, 331.5, 21.5, 4.1)
pt3dadd(-67.5, 334.5, 21.5, 3.8)
pt3dadd(-70, 337, 21.5, 4.3)
pt3dadd(-71.5, 339.5, 21.5, 3.1)
pt3dadd(-72.5, 343, 21.5, 3.5)
pt3dadd(-73, 344.5, 21.5, 4.3)
pt3dadd(-74.5, 347.5, 21.5, 5.2)
pt3dadd(-75, 349.5, 27.5, 4.6)
pt3dadd(-76, 353.5, 30, 4)
pt3dadd(-76.5, 355.5, 31.5, 4.3)
pt3dadd(-78, 359, 30, 4)
pt3dadd(-79.5, 361, 30, 3.5)
pt3dadd(-80, 364, 31.5, 3.7)
pt3dadd(-82.5, 365.5, 30, 3.3)
pt3dadd(-84, 368, 28.5, 3.3)
pt3dadd(-86, 370, 33, 4.2)
pt3dadd(-88.5, 371, 31.5, 4.6)
pt3dadd(-91.5, 372.5, 31.5, 4.6)
pt3dadd(-94.5, 375, 31.5, 4.6)
pt3dadd(-97, 375.5, 31.5, 4.6)
pt3dadd(-100.5, 376, 31.5, 4)
pt3dadd(-103.5, 377, 31.5, 4.1)
pt3dadd(-106.5, 377, 31.5, 4.1)
pt3dadd(-110.5, 377.5, 31.5, 4.1)
pt3dadd(-113, 377, 30, 3.8)
pt3dadd(-118, 377.5, 31.5, 3.8)
pt3dadd(-122.5, 378, 33.5, 2.8)
pt3dadd(-125, 378.5, 33.5, 3.2)
pt3dadd(-127.5, 380, 33.5, 3.2)
pt3dadd(-130, 381, 33.5, 2.5)
pt3dadd(-132, 382.5, 33.5, 2.3)
pt3dadd(-135.5, 382.5, 33.5, 1.9)
pt3dadd(-137.5, 384.5, 35.5, 2.7)
pt3dadd(-141, 384, 35.5, 3.2)
pt3dadd(-144, 383.5, 35.5, 2.8)
pt3dadd(-145.5, 383.5, 35.5, 2.3)
pt3dadd(-146.5, 385, 37, 3.3)
pt3dadd(-147.5, 386, 37, 3.6)
pt3dadd(-149.5, 387.5, 46, 2.9)
pt3dadd(-151, 390, 42.5, 2.9)
pt3dadd(-153.5, 392.5, 46, 2.8)
pt3dadd(-155.5, 395, 46, 3)
pt3dadd(-157.5, 398, 46, 3.3)
pt3dadd(-160.5, 400, 47.5, 3.5)
pt3dadd(-161.5, 402, 47.5, 2)
pt3dadd(-164.5, 399, 47.5, 2)
pt3dadd(-164.5, 401, 47.5, 1.7)
pt3dadd(-165, 402.5, 47.5, 2.2)
pt3dadd(-166, 403, 47.5, 3.8)
pt3dadd(-168.5, 404.5, 47.5, 4.9)
pt3dadd(-172.5, 407.5, 47.5, 1.8)
pt3dadd(-175, 408, 49, 2.5)
pt3dadd(-175, 409, 52, 3.8)
pt3dadd(-176, 410.5, 52, 1.5)
pt3dadd(-177, 412, 53.5, 1.6)
pt3dadd(-178.5, 415, 55, 1.3)
pt3dadd(-181, 415.5, 59.5, 3.1)
pt3dadd(-184, 415, 59.5, 2.3)
pt3dadd(-188, 416, 56.5, 2.2)
pt3dadd(-191, 415.5, 56.5, 1.8)
pt3dadd(-192.5, 414.5, 58, 1.6)
pt3dadd(-195, 417.5, 59.5, 3.1)
pt3dadd(-197, 417.5, 58, 4.7)
pt3dadd(-200, 421, 58, 2.1)
pt3dadd(-201.5, 422.5, 58, 2.4)
pt3dadd(-202, 425, 58, 4.3)
pt3dadd(-206.5, 430.5, 55, 3.8)
pt3dadd(-208.5, 433, 55, 3.3)
pt3dadd(-211, 434, 59.5, 2.8)
pt3dadd(-213, 434, 58, 4.3)
pt3dadd(-217, 437.5, 58, 2.5)
pt3dadd(-221, 437, 58, 3.3)
pt3dadd(-224.5, 436.5, 61, 3.3)
pt3dadd(-229.5, 437.5, 59.5, 3.3)
pt3dadd(-235, 440.5, 63.5, 1.6)
pt3dadd(-238.5, 442.5, 65.5, 1.2)
pt3dadd(-241.5, 442.5, 65.5, 1.2)
pt3dadd(-243.5, 442.5, 63.5, 2.1)
}
dend[67] {pt3dclear()
pt3dadd(-243.5, 442.5, 63.5, 2.1)
pt3dadd(-245, 442, 57.5, 1.1)
pt3dadd(-247, 441.5, 59.5, 1.1)
pt3dadd(-249, 440, 63.5, 1.4)
pt3dadd(-249, 438, 61.5, 1.1)
pt3dadd(-249.5, 438, 61.5, 0.5)
pt3dadd(-251, 437.5, 61.5, 0.5)
pt3dadd(-252.5, 436, 63.5, 1.3)
}
dend[68] {pt3dclear()
pt3dadd(-243.5, 442.5, 63.5, 2.1)
pt3dadd(-244, 447, 67.5, 1.5)
pt3dadd(-244, 450.5, 65.5, 1.6)
pt3dadd(-244, 452.5, 65.5, 1.1)
pt3dadd(-244.5, 453.5, 65.5, 0.9)
pt3dadd(-246, 455.5, 67.5, 2.4)
pt3dadd(-248, 457, 67.5, 1.1)
pt3dadd(-249, 458, 67.5, 0.3)
pt3dadd(-249.5, 461.5, 69.5, 1.1)
pt3dadd(-250, 463, 71.5, 1.9)
pt3dadd(-250.5, 465, 71.5, 2.5)
pt3dadd(-251.5, 467, 69.5, 1.9)
pt3dadd(-251.5, 468.5, 69.5, 1.3)
pt3dadd(-251.5, 470, 69.5, 0.7)
pt3dadd(-252.5, 472, 75.5, 1.2)
pt3dadd(-254, 472, 75.5, 0.8)
pt3dadd(-255.5, 474, 73.5, 0.8)
pt3dadd(-255.5, 476.5, 73.5, 0.3)
}
}
proc shape3d_21() {
dend[68] { pt3dadd(-255, 478.5, 73.5, 0.3)
pt3dadd(-256, 480, 77.5, 1.3)
pt3dadd(-257, 482, 85.5, 2.1)
pt3dadd(-257.5, 485, 81.5, 2.1)
}
dend[69] {pt3dclear()
pt3dadd(-35.5, 185, -12, 10.9)
pt3dadd(-33.5, 190.5, -12, 6.7)
pt3dadd(-33, 194.5, -9.5, 6.2)
pt3dadd(-33, 199.5, -11, 6.7)
pt3dadd(-32.5, 202, -10, 8)
pt3dadd(-30.5, 205, -11, 8)
pt3dadd(-30, 207.5, -11, 7.1)
pt3dadd(-29, 210.5, -11, 6.5)
pt3dadd(-28, 214.5, -11, 5.7)
pt3dadd(-26.5, 218, -12, 5.3)
pt3dadd(-25.5, 220.5, -14, 5.7)
pt3dadd(-24, 222.5, -11, 5.7)
pt3dadd(-23.5, 225.5, -12, 5.7)
pt3dadd(-21.5, 229.5, -13, 7.7)
}
dend[70] {pt3dclear()
pt3dadd(-21.5, 229.5, -13, 7.7)
pt3dadd(-27, 231.5, -13, 2.3)
pt3dadd(-29, 233, -13, 2.3)
pt3dadd(-29, 235, -13, 2.5)
pt3dadd(-28.5, 237, -13, 2)
pt3dadd(-28.5, 239, -13, 2.1)
pt3dadd(-29, 241, -13, 2.3)
pt3dadd(-30.5, 241.5, -13, 2.8)
pt3dadd(-31, 244.5, -13, 2.8)
pt3dadd(-31, 248, -13, 2.8)
pt3dadd(-33, 246.5, -13, 2.3)
pt3dadd(-35, 247, -13, 2.3)
pt3dadd(-36, 249.5, -13, 2.5)
pt3dadd(-40, 250.5, -13, 2.5)
pt3dadd(-41.5, 249.5, -15, 2.5)
pt3dadd(-43.5, 248.5, -14, 2.5)
pt3dadd(-45.5, 249.5, -15, 2.5)
pt3dadd(-47.5, 247.5, -15, 2.2)
pt3dadd(-50.5, 247.5, -15.5, 2)
pt3dadd(-51, 248, -15.5, 3.1)
pt3dadd(-53.5, 250.5, -15.5, 3.1)
pt3dadd(-55.5, 251.5, -15.5, 3.3)
pt3dadd(-59, 252, -15.5, 3.1)
pt3dadd(-61, 252, -15.5, 2.8)
pt3dadd(-62.5, 254, -15.5, 2.4)
pt3dadd(-65, 256.5, -17.5, 2.4)
pt3dadd(-67, 259, -19.5, 1.6)
pt3dadd(-69, 260, -18.5, 2.4)
pt3dadd(-70.5, 261, -17.5, 2.7)
pt3dadd(-73, 261.5, -20.5, 1.7)
pt3dadd(-75, 261.5, -19.5, 2.8)
pt3dadd(-75.5, 264, -20.5, 2.6)
pt3dadd(-75.5, 264.5, -20.5, 2.6)
pt3dadd(-76.5, 267.5, -20.5, 2.9)
pt3dadd(-76, 270.5, -20.5, 3.3)
pt3dadd(-75, 272, -20.5, 3.6)
pt3dadd(-76.5, 271.5, -23, 3.3)
pt3dadd(-78.5, 272, -23, 3.1)
pt3dadd(-81, 273.5, -23, 2.7)
pt3dadd(-83.5, 275.5, -23, 2.1)
pt3dadd(-85, 275.5, -23, 1.9)
pt3dadd(-87, 275, -25, 1.9)
pt3dadd(-89, 275, -24, 2.1)
pt3dadd(-91.5, 275, -24, 2.4)
pt3dadd(-93, 273.5, -24, 2.4)
pt3dadd(-96.5, 273.5, -24, 2.4)
pt3dadd(-98.5, 273, -24, 1.9)
pt3dadd(-102, 273, -24, 2.7)
pt3dadd(-104.5, 273.5, -22, 2.9)
pt3dadd(-107, 274.5, -25, 3.2)
pt3dadd(-109.5, 274.5, -24, 3.2)
pt3dadd(-112, 274.5, -24, 2)
pt3dadd(-115, 274, -24, 1.6)
pt3dadd(-117.5, 274, -24, 1.2)
pt3dadd(-119, 274, -24, 2)
pt3dadd(-121.5, 276, -24, 1.9)
pt3dadd(-123, 277, -23, 3)
pt3dadd(-124.5, 275, -26, 3.7)
pt3dadd(-121, 275.5, -28, 4.6)
pt3dadd(-121, 278.5, -26.5, 4)
pt3dadd(-123.5, 281, -28, 4)
pt3dadd(-123, 283, -28, 2.8)
pt3dadd(-124, 284.5, -28, 2.7)
pt3dadd(-125.5, 286.5, -28, 2.2)
pt3dadd(-127, 286.5, -28, 1.6)
pt3dadd(-128, 288, -28.5, 1.6)
pt3dadd(-129.5, 289, -28.5, 2)
pt3dadd(-131.5, 289.5, -29, 2.9)
pt3dadd(-133.5, 289.5, -29, 2.9)
pt3dadd(-138, 290.5, -28.5, 2.5)
pt3dadd(-141, 292, -28.5, 2.5)
pt3dadd(-143, 292.5, -28.5, 2.7)
pt3dadd(-146, 293.5, -28.5, 1.6)
pt3dadd(-148.5, 296, -34.5, 1.4)
pt3dadd(-151, 296, -34.5, 1.6)
pt3dadd(-153.5, 297, -34.5, 1.5)
pt3dadd(-156, 298.5, -34.5, 1.5)
pt3dadd(-159, 298.5, -34.5, 1.3)
pt3dadd(-160.5, 297.5, -34.5, 1.3)
pt3dadd(-162.5, 296.5, -34.5, 1.5)
pt3dadd(-164, 295, -34.5, 2.6)
pt3dadd(-166, 293, -34.5, 2.8)
pt3dadd(-169.5, 292, -41, 1.2)
pt3dadd(-170.5, 291, -41, 1)
pt3dadd(-172, 289.5, -41, 1.6)
pt3dadd(-173, 289.5, -34.5, 2.3)
pt3dadd(-174, 289.5, -41, 2.5)
pt3dadd(-176, 289.5, -41, 2.5)
pt3dadd(-178, 290.5, -41, 1.4)
pt3dadd(-178.5, 290.5, -41, 1.4)
pt3dadd(-180.5, 290.5, -41, 2.2)
pt3dadd(-181, 289.5, -41, 2.5)
pt3dadd(-182.5, 289, -41, 2.7)
pt3dadd(-183, 291, -41, 2.7)
pt3dadd(-184, 291.5, -47, 2.5)
pt3dadd(-185.5, 293, -47, 2.4)
pt3dadd(-185.5, 295.5, -47, 2.4)
pt3dadd(-188, 294.5, -47, 2.4)
pt3dadd(-188, 295, -47, 2.4)
pt3dadd(-186, 297.5, -59.5, 2.4)
pt3dadd(-184.5, 297.5, -59.5, 2.4)
pt3dadd(-186.5, 297.5, -59.5, 2)
pt3dadd(-186, 299.5, -57.5, 1.6)
pt3dadd(-188.5, 299.5, -59.5, 0.7)
pt3dadd(-191, 299, -61.5, 0.7)
pt3dadd(-191, 295.5, -63.5, 1.3)
pt3dadd(-191, 294.5, -63.5, 1.4)
pt3dadd(-190, 293.5, -65.5, 2.9)
pt3dadd(-190, 292, -65.5, 3.8)
pt3dadd(-191, 288.5, -65.5, 1.8)
pt3dadd(-194, 288.5, -65.5, 1.4)
pt3dadd(-197.5, 288.5, -73, 1.4)
pt3dadd(-198, 290, -67.5, 1.4)
pt3dadd(-199.5, 290, -71, 1.6)
pt3dadd(-201.5, 291.5, -71, 2)
pt3dadd(-204, 292, -71, 1.3)
pt3dadd(-205, 294, -75, 1.9)
pt3dadd(-206, 294.5, -75, 1.9)
pt3dadd(-209, 296, -71, 1)
pt3dadd(-209.5, 298.5, -71, 1.6)
pt3dadd(-212, 298.5, -75, 2.2)
pt3dadd(-215.5, 299, -75, 1.6)
pt3dadd(-217.5, 298.5, -75, 1.1)
pt3dadd(-219, 298.5, -75, 1.2)
pt3dadd(-220.5, 300.5, -75, 1.7)
pt3dadd(-226, 302, -79, 1.7)
pt3dadd(-229, 302, -90.5, 2.2)
pt3dadd(-230.5, 303.5, -93.5, 1.5)
pt3dadd(-229, 304, -90.5, 1.5)
pt3dadd(-229, 300.5, -90.5, 1.3)
pt3dadd(-229, 297, -96.5, 1.2)
pt3dadd(-228.5, 297, -96.5, 1.5)
pt3dadd(-228.5, 295.5, -93.5, 2)
pt3dadd(-230, 294, -93.5, 1.4)
pt3dadd(-231.5, 295, -99.5, 1.4)
pt3dadd(-232.5, 294, -99.5, 2.1)
pt3dadd(-234.5, 292, -99.5, 2.1)
pt3dadd(-235.5, 290.5, -99.5, 1.3)
pt3dadd(-236.5, 288.5, -105, 1.3)
pt3dadd(-235.5, 286, -105, 1.8)
pt3dadd(-235.5, 284, -108, 1.7)
pt3dadd(-241.5, 283.5, -103, 0.9)
pt3dadd(-243, 283.5, -103, 1.2)
pt3dadd(-244, 282.5, -105.5, 1.1)
pt3dadd(-245, 279.5, -105.5, 1.1)
pt3dadd(-245.5, 278, -110, 2)
pt3dadd(-247.5, 279, -108, 2.3)
pt3dadd(-249.5, 282, -110, 2.3)
pt3dadd(-250, 278.5, -110, 2.3)
pt3dadd(-251, 277, -110, 2.4)
pt3dadd(-252.5, 277, -115, 1.9)
pt3dadd(-252.5, 275, -115, 1.9)
pt3dadd(-251.5, 272.5, -119.5, 1.8)
}
dend[71] {pt3dclear()
pt3dadd(-251.5, 272.5, -119.5, 1.8)
pt3dadd(-250, 271.5, -117.5, 0.1)
pt3dadd(-248.5, 271, -115, 0.1)
pt3dadd(-247, 270, -119.5, 0.1)
pt3dadd(-246, 268.5, -127, 0.1)
pt3dadd(-245.5, 267, -119.5, 0.1)
pt3dadd(-244.5, 265.5, -124.5, 0.1)
pt3dadd(-243.5, 266, -124.5, 0.9)
pt3dadd(-243.5, 262.5, -129, 0.9)
pt3dadd(-246, 264.5, -129, 1.3)
}
dend[72] {pt3dclear()
pt3dadd(-251.5, 272.5, -119.5, 1.8)
pt3dadd(-253.5, 271.5, -117.5, 0.7)
pt3dadd(-254.5, 271.5, -117.5, 0.7)
pt3dadd(-255.5, 271.5, -115, 1.4)
pt3dadd(-257, 270, -115, 2.3)
pt3dadd(-257, 268, -119.5, 2)
pt3dadd(-257, 266.5, -119.5, 2)
pt3dadd(-257, 266, -119.5, 0.9)
pt3dadd(-258.5, 265, -119.5, 0.7)
pt3dadd(-256.5, 263.5, -122, 1.2)
pt3dadd(-255.5, 262, -122, 1.6)
pt3dadd(-255.5, 261.5, -122, 1.6)
pt3dadd(-255.5, 259.5, -122, 1.6)
pt3dadd(-257, 258, -122, 1)
pt3dadd(-258, 258, -122, 0.7)
pt3dadd(-259, 258, -122, 0.8)
pt3dadd(-261, 258, -122, 0.8)
pt3dadd(-262.5, 256, -122, 0.7)
pt3dadd(-263.5, 256, -122, 1.2)
}
}
proc shape3d_22() {
dend[72] { pt3dadd(-265, 257, -122, 0.7)
pt3dadd(-267.5, 257, -122, 0.9)
pt3dadd(-269, 257, -127, 1.3)
pt3dadd(-271, 258, -122, 1.5)
pt3dadd(-273, 259, -124.5, 1.7)
}
dend[73] {pt3dclear()
pt3dadd(-21.5, 229.5, -13, 7.7)
pt3dadd(-19.5, 235, -13, 4.9)
pt3dadd(-16.5, 238.5, -13, 4.4)
pt3dadd(-16, 240.5, -13, 4.6)
pt3dadd(-14.5, 243, -13, 4.7)
pt3dadd(-13.5, 245, -13, 4.7)
pt3dadd(-13.5, 247.5, -13, 4.6)
pt3dadd(-11.5, 250, -13, 4.3)
pt3dadd(-10.5, 253.5, -13, 5.2)
pt3dadd(-8.5, 255, -13, 5.2)
pt3dadd(-7.5, 258, -13, 4.6)
pt3dadd(-5.5, 259.5, -12, 3.7)
pt3dadd(-2.5, 260.5, -12, 4.4)
pt3dadd(0, 264, -12, 4.4)
pt3dadd(1, 266, -13, 4.4)
pt3dadd(3, 266, -13, 4.8)
pt3dadd(5.5, 269.5, -13, 4.1)
pt3dadd(8, 273, -13, 4.8)
pt3dadd(10.5, 275, -13, 4)
pt3dadd(13, 279.5, -11, 4.4)
pt3dadd(15, 283, -11, 4.7)
pt3dadd(17, 283.5, -11, 4.3)
pt3dadd(20, 287, -13, 4.9)
pt3dadd(21.5, 290, -13, 4.2)
pt3dadd(23.5, 293, -13, 4.4)
pt3dadd(24, 295.5, -13, 4.9)
pt3dadd(26, 298.5, -15.5, 4.9)
pt3dadd(26.5, 301.5, -15, 5.2)
}
dend[74] {pt3dclear()
pt3dadd(26.5, 301.5, -15, 5.2)
pt3dadd(28, 307.5, -15, 2.2)
pt3dadd(28.5, 311.5, -15, 2)
pt3dadd(28.5, 314.5, -15, 2.6)
pt3dadd(29, 317.5, -15, 3)
pt3dadd(30.5, 320, -14, 2.7)
pt3dadd(30, 323, -14, 2.4)
pt3dadd(29.5, 325.5, -12, 2.1)
pt3dadd(29.5, 328, -12, 1.8)
pt3dadd(30.5, 331.5, -12, 2.5)
pt3dadd(31, 333, -9.5, 2.5)
pt3dadd(31, 336.5, -7.5, 2.6)
pt3dadd(31.5, 340.5, -5, 1.5)
pt3dadd(32.5, 342.5, 0.5, 2.1)
pt3dadd(34, 344.5, 0.5, 1.2)
pt3dadd(34, 345.5, 0.5, 0.7)
pt3dadd(34.5, 346.5, 0.5, 0.7)
pt3dadd(35.5, 348, 0.5, 1.3)
pt3dadd(37, 349.5, 0.5, 2.1)
pt3dadd(38.5, 351, 0.5, 1.9)
pt3dadd(39.5, 352.5, 0.5, 1.2)
pt3dadd(41.5, 352.5, 0.5, 0.9)
pt3dadd(43, 354, 0.5, 0.9)
pt3dadd(44, 355, 0.5, 1.5)
pt3dadd(47.5, 358.5, 0.5, 1.7)
pt3dadd(50.5, 361, 0.5, 0.9)
pt3dadd(50.5, 362.5, 0.5, 0.9)
pt3dadd(50.5, 365, 0.5, 1.1)
pt3dadd(51, 366, 0.5, 1.8)
pt3dadd(54, 367.5, 3.5, 2.3)
pt3dadd(55.5, 369.5, 3.5, 2.7)
pt3dadd(57, 371.5, 3.5, 2.2)
pt3dadd(58, 373, 3.5, 1.8)
pt3dadd(59, 374.5, 3.5, 1.6)
pt3dadd(60.5, 376.5, 6, 1.3)
pt3dadd(61.5, 377, 6, 1.1)
pt3dadd(64.5, 379, 6, 1.1)
pt3dadd(66, 379, 6, 1.7)
pt3dadd(67, 381.5, 6, 2.2)
pt3dadd(68.5, 382, 6, 1.7)
pt3dadd(70.5, 385, 6, 0.9)
pt3dadd(72, 385, 6, 0.9)
pt3dadd(73.5, 386, 6, 0.9)
pt3dadd(76, 386.5, 12, 1.7)
pt3dadd(79, 387, 12, 1)
pt3dadd(80.5, 387, 12, 0.8)
pt3dadd(84.5, 387.5, 3.5, 1.4)
pt3dadd(84.5, 389.5, 6, 1.4)
pt3dadd(86.5, 390.5, 3.5, 2.5)
pt3dadd(87.5, 392.5, 3.5, 2.5)
pt3dadd(90, 392.5, 3.5, 1.6)
pt3dadd(91.5, 393, 3.5, 1.2)
pt3dadd(91.5, 394.5, 12, 1.2)
pt3dadd(94.5, 398, 17.5, 1.6)
pt3dadd(96, 399, 12, 1.2)
pt3dadd(98, 401, 12, 1)
pt3dadd(99.5, 403.5, 12, 1)
pt3dadd(103.5, 404, 12, 1.3)
pt3dadd(103.5, 406, 12, 1.3)
pt3dadd(104.5, 408, 13.5, 1.4)
pt3dadd(107, 408, 13.5, 1.4)
pt3dadd(107.5, 407.5, 13.5, 0.9)
pt3dadd(110.5, 407.5, 13.5, 0.9)
pt3dadd(111, 407.5, 12, 0.9)
pt3dadd(112.5, 409, 15, 0.9)
pt3dadd(112.5, 411.5, 15, 0.9)
pt3dadd(115, 411.5, 15, 0.9)
pt3dadd(118, 411.5, 15, 0.9)
pt3dadd(118, 413, 15, 0.9)
pt3dadd(117.5, 414.5, 21, 1)
pt3dadd(119, 415, 21, 1.2)
pt3dadd(121, 417, 21, 1.2)
pt3dadd(122.5, 419, 19.5, 1.2)
pt3dadd(123.5, 419.5, 19.5, 1.6)
pt3dadd(125, 421.5, 18, 1.6)
pt3dadd(127, 423.5, 18, 0.8)
pt3dadd(128, 425, 21, 0.9)
pt3dadd(129.5, 427.5, 21, 0.9)
pt3dadd(130.5, 429, 21, 0.7)
pt3dadd(131, 432, 21, 0.7)
pt3dadd(134, 433.5, 21, 0.5)
pt3dadd(136.5, 434, 21, 0.5)
pt3dadd(138.5, 434, 21, 0.5)
pt3dadd(139.5, 434, 21, 1.6)
pt3dadd(141.5, 434, 21, 2.1)
pt3dadd(142.5, 435, 18, 1.3)
pt3dadd(143.5, 435, 18, 0.6)
pt3dadd(145.5, 436, 18, 0.6)
pt3dadd(147, 439, 22, 0.7)
pt3dadd(148, 440, 22, 0.7)
pt3dadd(153, 442, 21, 0.1)
pt3dadd(152.5, 443, 22, 0.1)
pt3dadd(155, 443, 22, 0.1)
pt3dadd(157.5, 443, 22, 0.1)
pt3dadd(157.5, 445.5, 21, 0.1)
pt3dadd(159.5, 445.5, 21, 0.1)
pt3dadd(162.5, 446.5, 21, 0.1)
pt3dadd(165.5, 448, 21, 0.1)
pt3dadd(167, 449.5, 21, 0.1)
pt3dadd(170.5, 448.5, 32, 0.1)
pt3dadd(174.5, 449.5, 36.5, 0.1)
pt3dadd(178.5, 449.5, 35, 0.1)
pt3dadd(181.5, 450, 33.5, 0.1)
pt3dadd(190, 456.5, 32, 0.1)
pt3dadd(190, 459, 32, 0.1)
pt3dadd(192.5, 460, 32, 0.1)
pt3dadd(195, 462, 32, 0.1)
pt3dadd(197.5, 463.5, 32, 0.1)
pt3dadd(200, 465.5, 32, 0.1)
pt3dadd(201.5, 466, 32, 0.1)
pt3dadd(207, 471, 29.5, 0.1)
pt3dadd(210.5, 471, 29.5, 0.1)
pt3dadd(212, 471, 31, 0.1)
pt3dadd(214, 471, 31, 0.1)
pt3dadd(215.5, 473.5, 28, 0.1)
pt3dadd(217.5, 475.5, 31, 0.1)
pt3dadd(221.5, 478.5, 31, 0.1)
pt3dadd(223.5, 481, 31, 0.1)
pt3dadd(226, 483.5, 32, 0.1)
pt3dadd(231, 485.5, 33.5, 0.1)
pt3dadd(234, 489.5, 32, 0.1)
pt3dadd(234.5, 493, 32, 0.1)
pt3dadd(235, 495, 32, 0.1)
pt3dadd(238, 500, 28, 0.1)
pt3dadd(238.5, 503.5, 28, 0.1)
pt3dadd(241, 507, 36.5, 0.4)
pt3dadd(241.5, 513, 38, 0.6)
pt3dadd(244, 519, 51, 0.7)
pt3dadd(246, 522, 36.5, 0.6)
pt3dadd(246.5, 526, 36.5, 0.6)
pt3dadd(249, 527, 38, 0.6)
}
dend[75] {pt3dclear()
pt3dadd(26.5, 301.5, -15, 5.2)
pt3dadd(28, 304, -14, 4.1)
pt3dadd(28.5, 304.5, -16.5, 3.3)
pt3dadd(32, 304.5, -17.5, 3.6)
pt3dadd(34.5, 303, -16.5, 3.8)
pt3dadd(37.5, 303.5, -18.5, 3.8)
pt3dadd(38.5, 307, -18.5, 4.1)
pt3dadd(41.5, 309, -17.5, 3.6)
pt3dadd(43.5, 311.5, -17.5, 3.3)
pt3dadd(45, 313, -17.5, 3.3)
pt3dadd(48.5, 315.5, -19.5, 3.3)
pt3dadd(50, 319.5, -19.5, 3.8)
pt3dadd(51, 322, -19.5, 3.3)
pt3dadd(52, 322, -19.5, 3.5)
pt3dadd(54, 324, -19.5, 3.2)
pt3dadd(55, 324.5, -21, 3.7)
pt3dadd(55.5, 327.5, -22, 4.3)
pt3dadd(56, 327.5, -22, 4.3)
pt3dadd(58, 329.5, -22, 4)
pt3dadd(59, 331, -22, 4)
pt3dadd(60, 332, -23, 4.1)
pt3dadd(61, 334.5, -26.5, 4.4)
pt3dadd(63, 334.5, -25.5, 4.4)
pt3dadd(65.5, 337.5, -26.5, 4.6)
pt3dadd(67, 340.5, -24, 4.2)
pt3dadd(68, 341.5, -24, 3.2)
pt3dadd(69.5, 343.5, -25.5, 2.7)
pt3dadd(70, 343.5, -24, 1.9)
pt3dadd(71, 345, -24, 2.3)
pt3dadd(71, 346.5, -24, 3.1)
pt3dadd(72, 348, -26.5, 3.8)
pt3dadd(74.5, 349.5, -25.5, 2.9)
pt3dadd(76, 351, -25.5, 3.6)
pt3dadd(77.5, 354, -25.5, 3.6)
pt3dadd(78.5, 357, -26.5, 2.8)
pt3dadd(79.5, 359, -26.5, 2.8)
}
}
proc shape3d_23() {
dend[75] { pt3dadd(82, 361, -26.5, 2.8)
pt3dadd(84, 362.5, -26.5, 2.8)
pt3dadd(87, 365, -27.5, 2.8)
pt3dadd(89.5, 366, -28, 4.6)
pt3dadd(90.5, 369.5, -28, 4.4)
pt3dadd(90.5, 372, -29, 3.6)
pt3dadd(91.5, 375, -29, 3.6)
pt3dadd(93, 377.5, -29, 3.8)
pt3dadd(93.5, 380.5, -29.5, 4.1)
pt3dadd(95, 382.5, -29.5, 4.1)
pt3dadd(96, 383, -29.5, 3.4)
pt3dadd(98, 385, -29.5, 3.4)
pt3dadd(99.5, 386.5, -29, 3.9)
pt3dadd(101, 386.5, -29.5, 3.8)
pt3dadd(104, 389, -28, 3.8)
pt3dadd(108.5, 390.5, -29.5, 4.3)
}
dend[76] {pt3dclear()
pt3dadd(108.5, 390.5, -29.5, 4.3)
pt3dadd(112.5, 393, -27.5, 1.7)
pt3dadd(115.5, 393, -28, 1.7)
pt3dadd(118.5, 395.5, -28, 1.4)
pt3dadd(121.5, 398, -28, 1.4)
pt3dadd(123.5, 398, -28, 1.7)
pt3dadd(126, 400.5, -29, 1.7)
pt3dadd(128, 402.5, -29.5, 1.7)
pt3dadd(130.5, 403, -28, 2.1)
pt3dadd(132.5, 405, -28, 1.9)
pt3dadd(134, 406.5, -27.5, 1.6)
pt3dadd(135.5, 407.5, -27.5, 1.8)
pt3dadd(136.5, 409, -27.5, 2.7)
pt3dadd(137.5, 410, -27, 3.4)
pt3dadd(139.5, 412, -28, 1.8)
pt3dadd(141.5, 413, -27.5, 1.4)
pt3dadd(143.5, 413.5, -27.5, 1.8)
pt3dadd(145.5, 414.5, -29, 2)
pt3dadd(148, 416, -29, 2.2)
pt3dadd(149, 416.5, -25.5, 2)
pt3dadd(150.5, 417, -29, 1.4)
pt3dadd(153, 419, -29.5, 1.4)
pt3dadd(156, 421.5, -27.5, 1.3)
pt3dadd(157.5, 423.5, -27.5, 2.4)
pt3dadd(160.5, 425, -27.5, 3.3)
pt3dadd(163, 427.5, -28, 2)
pt3dadd(167.5, 428.5, -28, 1.6)
pt3dadd(167.5, 430, -28, 1.6)
pt3dadd(170, 431, -28, 1.8)
pt3dadd(173, 432.5, -27.5, 1.4)
pt3dadd(176, 434.5, -27.5, 1.4)
pt3dadd(178, 436, -27.5, 1.8)
pt3dadd(181, 438, -27.5, 2)
pt3dadd(183.5, 439, -27.5, 2)
pt3dadd(185, 440.5, -27.5, 2)
pt3dadd(185, 441.5, -27.5, 2)
pt3dadd(188, 443.5, -27.5, 1.7)
pt3dadd(189, 444.5, -27.5, 1.4)
pt3dadd(190, 446.5, -27.5, 1.3)
pt3dadd(191, 448.5, -26, 1.3)
pt3dadd(193, 448.5, -26, 1.3)
pt3dadd(195.5, 448.5, -26, 1.3)
pt3dadd(197.5, 450.5, -26, 2.1)
pt3dadd(199.5, 451, -26, 2.8)
pt3dadd(201.5, 452.5, -26, 1.8)
pt3dadd(203.5, 454.5, -26, 1.6)
pt3dadd(205.5, 456, -26, 2.1)
pt3dadd(209, 458, -27, 2.1)
pt3dadd(211.5, 458, -25.5, 2.1)
pt3dadd(213.5, 457, -25.5, 1.8)
pt3dadd(216, 457, -25.5, 1.8)
pt3dadd(218.5, 457, -25.5, 2.7)
pt3dadd(221.5, 457, -25.5, 2.8)
pt3dadd(224, 457, -26, 2.1)
pt3dadd(225.5, 457, -26, 1.7)
pt3dadd(228, 457, -26, 1.7)
pt3dadd(230, 457, -26, 1.7)
pt3dadd(234, 458, -26, 1.6)
pt3dadd(235, 458, -26, 2.2)
pt3dadd(237, 457, -26, 2.2)
pt3dadd(241, 459, -26, 1.9)
pt3dadd(244, 459, -26, 2)
pt3dadd(247, 461, -26, 2.4)
pt3dadd(250, 461, -26, 2.4)
pt3dadd(251, 461, -25.5, 1.9)
pt3dadd(253.5, 461, -26, 1.9)
pt3dadd(254.5, 461, -26, 1.5)
pt3dadd(257, 461, -27, 1.1)
pt3dadd(258, 461, -27, 2)
pt3dadd(259, 461, -27, 2.6)
pt3dadd(261.5, 461, -25.5, 0.4)
pt3dadd(263.5, 462, -25.5, 2.2)
pt3dadd(266, 462, -25.5, 2.2)
pt3dadd(269, 462, -25.5, 2.2)
pt3dadd(271.5, 462, -26, 1.2)
pt3dadd(275, 462.5, -26, 1.2)
pt3dadd(276.5, 463, -25.5, 0.7)
pt3dadd(277.5, 465, -26, 1.5)
pt3dadd(280, 466, -26, 1.7)
pt3dadd(282, 467.5, -26, 1.8)
pt3dadd(284.5, 468.5, -26, 1.8)
pt3dadd(286.5, 471, -26, 1.8)
pt3dadd(288.5, 473, -26, 1.8)
pt3dadd(290.5, 476, -26, 1.8)
pt3dadd(290.5, 478.5, -26, 1.8)
pt3dadd(293, 481, -26, 1.1)
pt3dadd(295.5, 482, -25.5, 1.1)
pt3dadd(300.5, 484, -25, 1.1)
pt3dadd(304, 486.5, -26, 1.1)
pt3dadd(308.5, 488, -26, 1.1)
pt3dadd(311.5, 490.5, -25, 1.7)
pt3dadd(313.5, 494, -25, 1.7)
pt3dadd(316, 496, -25.5, 1)
pt3dadd(318, 498.5, -25.5, 1.5)
pt3dadd(319, 501.5, -25.5, 1.7)
pt3dadd(321, 502, -26, 0.7)
pt3dadd(321, 504.5, -26, 1.9)
pt3dadd(322, 506, -26, 1.6)
pt3dadd(324, 509, -26, 2)
pt3dadd(325, 512, -26, 2.1)
pt3dadd(324, 514.5, -26, 1.4)
pt3dadd(324, 517, -26, 1.5)
pt3dadd(324, 519.5, -25.5, 1.7)
pt3dadd(323, 521.5, -26, 1.7)
pt3dadd(323.5, 524.5, -26, 1.7)
pt3dadd(324.5, 525, -22.5, 2)
pt3dadd(325.5, 527.5, -22.5, 1.1)
pt3dadd(325.5, 529.5, -23.5, 1.6)
pt3dadd(325.5, 530, -23.5, 1.9)
pt3dadd(325.5, 532, -22.5, 2.3)
pt3dadd(326.5, 534, -22.5, 1.8)
pt3dadd(326.5, 536, -22.5, 1.6)
pt3dadd(327.5, 537.5, -22.5, 1.8)
pt3dadd(327.5, 539.5, -22.5, 1.8)
pt3dadd(327.5, 542.5, -22.5, 1.9)
pt3dadd(329, 544, -23.5, 1.9)
pt3dadd(329, 546, -21.5, 2.4)
pt3dadd(329, 548, -21.5, 2.1)
pt3dadd(329.5, 550, -21.5, 0.8)
pt3dadd(330.5, 552.5, -18, 1.1)
pt3dadd(331, 554.5, -18, 1.1)
pt3dadd(333, 555.5, -18, 1.1)
pt3dadd(333, 559, -18, 1.2)
pt3dadd(333.5, 560.5, -19, 1.8)
pt3dadd(333.5, 563, -16.5, 2.5)
pt3dadd(335, 565, -19, 2.9)
pt3dadd(335.5, 566.5, -18, 2.3)
pt3dadd(337, 567.5, -16.5, 1.3)
pt3dadd(337, 569.5, -18, 1.1)
pt3dadd(339.5, 571, -18, 1.1)
pt3dadd(339.5, 574, -18, 2)
pt3dadd(339.5, 577, -18, 3.1)
pt3dadd(339.5, 579.5, -16.5, 1.9)
pt3dadd(340, 581.5, -16.5, 0.9)
pt3dadd(341.5, 583.5, -16.5, 0.9)
pt3dadd(343, 585.5, -18, 1.6)
pt3dadd(343, 589.5, -16.5, 1.3)
pt3dadd(343, 591.5, -15.5, 1.4)
pt3dadd(343, 594.5, -15.5, 2.3)
pt3dadd(344, 597, -14.5, 1.6)
pt3dadd(345.5, 601, -14.5, 1.4)
pt3dadd(346, 602, -14.5, 1.4)
pt3dadd(346.5, 604.5, -15.5, 1.4)
pt3dadd(347.5, 607, -15.5, 1.4)
pt3dadd(349.5, 610, -15.5, 1.1)
pt3dadd(351.5, 610, -15.5, 1.1)
pt3dadd(352, 614.5, -15.5, 1.4)
pt3dadd(352, 615.5, -15.5, 1.6)
pt3dadd(354, 618, -14.5, 1.4)
pt3dadd(354, 620, -14.5, 1.8)
pt3dadd(355, 621.5, -15.5, 1.8)
pt3dadd(357, 622, -14.5, 1.8)
pt3dadd(356.5, 625.5, -14.5, 1.5)
pt3dadd(357, 627.5, -11.5, 1.4)
pt3dadd(358, 629.5, -11.5, 1.1)
pt3dadd(359.5, 631, -11.5, 0.9)
pt3dadd(361, 632.5, -11.5, 1)
pt3dadd(361.5, 633.5, -12.5, 0.9)
pt3dadd(363, 635, -13.5, 1.2)
pt3dadd(365, 637.5, -13.5, 1.7)
pt3dadd(365.5, 639.5, -13.5, 2)
pt3dadd(366.5, 640.5, -11.5, 2.1)
pt3dadd(369, 641.5, -11.5, 1.8)
pt3dadd(372, 643, -13.5, 2.1)
pt3dadd(374.5, 644, -13.5, 2.3)
pt3dadd(374.5, 648.5, -10, 1.9)
pt3dadd(374.5, 650, -10, 2)
pt3dadd(374.5, 652, -10, 2)
pt3dadd(376, 654, -8, 1.3)
pt3dadd(376, 655, -8, 1.3)
pt3dadd(375.5, 656.5, -7, 1.8)
pt3dadd(375.5, 657.5, -7, 3)
pt3dadd(375.5, 659, -7, 4.1)
pt3dadd(377, 662, -7, 2.1)
pt3dadd(377.5, 663.5, -7, 1.5)
pt3dadd(379.5, 664.5, -7, 1.4)
pt3dadd(379, 666.5, -7, 1.4)
pt3dadd(379, 668.5, -6.5, 2.1)
pt3dadd(379.5, 671.5, -5.5, 2.8)
pt3dadd(379.5, 673, -6.5, 4)
pt3dadd(379.5, 675, -7, 1.6)
pt3dadd(379.5, 679.5, -7, 1.1)
pt3dadd(379.5, 681.5, -7, 0.9)
pt3dadd(381, 684, -7, 0.9)
}
}
proc shape3d_24() {
dend[76] { pt3dadd(381.5, 686.5, -7, 1)
pt3dadd(381.5, 691.5, -2.5, 1)
pt3dadd(379.5, 694, -4.5, 1)
pt3dadd(379.5, 697.5, -5.5, 1)
pt3dadd(379.5, 700, -5.5, 1)
pt3dadd(379.5, 704, -5.5, 1)
pt3dadd(379.5, 706, -6.5, 1)
pt3dadd(378.5, 706.5, -3.5, 1)
}
dend[77] {pt3dclear()
pt3dadd(108.5, 390.5, -29.5, 4.3)
pt3dadd(109.5, 395, -30.5, 2.5)
pt3dadd(113.5, 398.5, -29.5, 2.5)
pt3dadd(115, 399, -30.5, 2.4)
pt3dadd(115.5, 401.5, -31, 2.4)
pt3dadd(117, 402, -31, 2.4)
pt3dadd(117, 404.5, -31, 3.2)
pt3dadd(117.5, 408.5, -31, 3.1)
pt3dadd(118.5, 410.5, -31, 2.5)
pt3dadd(119.5, 411, -31, 2.3)
pt3dadd(121, 413, -31, 2.3)
pt3dadd(122, 414.5, -31.5, 2.3)
pt3dadd(122.5, 416.5, -31.5, 2.3)
pt3dadd(123, 418.5, -29.5, 2.5)
pt3dadd(125, 421, -29, 2.5)
pt3dadd(125, 422, -29.5, 3.1)
pt3dadd(126.5, 424, -29.5, 3.1)
pt3dadd(129.5, 425.5, -29.5, 2.8)
pt3dadd(132, 426.5, -29, 2.5)
pt3dadd(133.5, 427, -30.5, 2.3)
pt3dadd(134.5, 427, -30.5, 2.1)
pt3dadd(136, 429, -30.5, 2.3)
pt3dadd(137.5, 431, -31, 2.6)
pt3dadd(138.5, 433.5, -31.5, 2.4)
pt3dadd(140, 436, -31, 2.4)
pt3dadd(139.5, 439, -31, 1.7)
pt3dadd(140, 442, -37, 2.2)
pt3dadd(140, 443.5, -31, 2.5)
pt3dadd(140, 444.5, -31, 2.4)
pt3dadd(141, 445.5, -31, 2.3)
pt3dadd(141, 446, -31, 2.1)
pt3dadd(141, 448, -37, 2)
pt3dadd(141, 450.5, -37, 2.1)
pt3dadd(141.5, 452, -37, 2.1)
pt3dadd(142.5, 452.5, -37, 2.5)
pt3dadd(144, 453, -37, 2.6)
pt3dadd(145, 455, -37, 1.7)
pt3dadd(146, 455, -37, 0.9)
pt3dadd(146.5, 455, -37, 1.6)
pt3dadd(147.5, 455, -37, 1.7)
pt3dadd(148.5, 455, -37, 1.8)
pt3dadd(149.5, 456, -37, 1.7)
pt3dadd(151, 456.5, -37, 2.5)
pt3dadd(152.5, 457, -37, 3.1)
pt3dadd(153.5, 457.5, -37, 2.8)
pt3dadd(155, 457.5, -43.5, 2.2)
pt3dadd(156.5, 457.5, -43.5, 1.7)
pt3dadd(158.5, 457.5, -43.5, 1.7)
pt3dadd(160, 458.5, -43.5, 1.7)
pt3dadd(160, 459.5, -43.5, 2.3)
pt3dadd(160, 462, -43.5, 3.1)
pt3dadd(160.5, 462, -43.5, 3.9)
pt3dadd(162, 465, -43.5, 3.8)
pt3dadd(162, 466.5, -43.5, 3.1)
pt3dadd(162.5, 469, -43.5, 2.4)
pt3dadd(163, 470.5, -43.5, 2.6)
}
dend[78] {pt3dclear()
pt3dadd(163, 470.5, -43.5, 2.6)
pt3dadd(163.5, 475.5, -49.5, 0.3)
pt3dadd(164.5, 477.5, -49.5, 0.3)
pt3dadd(167, 483.5, -49.5, 0.9)
pt3dadd(168.5, 486.5, -43.5, 1.6)
pt3dadd(169.5, 489.5, -49.5, 1.1)
pt3dadd(171, 490, -49.5, 1.4)
pt3dadd(172, 490, -49.5, 0.6)
pt3dadd(173.5, 490.5, -49.5, 0.6)
pt3dadd(173.5, 493, -49.5, 0.6)
pt3dadd(173.5, 493.5, -49.5, 0.6)
pt3dadd(176.5, 493.5, -49.5, 0.8)
pt3dadd(177.5, 494.5, -49.5, 0.1)
pt3dadd(178, 494.5, -49.5, 0.1)
pt3dadd(180, 495, -49.5, 0.7)
pt3dadd(181.5, 495.5, -49.5, 1.1)
pt3dadd(183, 496, -49.5, 1.2)
pt3dadd(183.5, 497.5, -49.5, 1)
pt3dadd(185, 498, -49.5, 0.9)
pt3dadd(185.5, 499, -49.5, 1.6)
pt3dadd(186.5, 500.5, -49.5, 2.1)
pt3dadd(187.5, 502, -49.5, 1.4)
pt3dadd(188, 502, -49.5, 0.5)
pt3dadd(188.5, 503.5, -43.5, 0.5)
pt3dadd(188.5, 505, -49.5, 0.3)
pt3dadd(191, 509, -56, 0.5)
pt3dadd(192.5, 509, -56, 0.8)
pt3dadd(194.5, 509, -56, 0.8)
pt3dadd(194.5, 511, -49.5, 0.1)
pt3dadd(195, 512.5, -56, 0.1)
pt3dadd(197.5, 514.5, -62, 0.3)
pt3dadd(197.5, 515, -62, 0.3)
pt3dadd(199, 517, -62, 0.7)
pt3dadd(199.5, 517, -62, 1.1)
pt3dadd(201.5, 518, -62, 1.4)
pt3dadd(202, 520, -62, 0.9)
pt3dadd(202.5, 521.5, -56, 0.1)
pt3dadd(203, 521.5, -56, 0.1)
pt3dadd(205, 523.5, -56, 0.1)
pt3dadd(207.5, 526.5, -56, 0.1)
pt3dadd(210, 532, -49.5, 0.1)
pt3dadd(211.5, 534.5, -56, 0.3)
pt3dadd(211.5, 539, -56, 0.3)
pt3dadd(212, 542, -56, 0.3)
pt3dadd(212.5, 546, -56, 0.3)
pt3dadd(212.5, 549.5, -56, 0.3)
pt3dadd(214.5, 554, -56, 0.3)
pt3dadd(213.5, 558, -56, 0.3)
pt3dadd(213.5, 562.5, -56, 0.3)
pt3dadd(213.5, 574, -56, 0.3)
pt3dadd(212.5, 577.5, -56, 0.3)
pt3dadd(212.5, 583, -56, 0.3)
pt3dadd(212.5, 585.5, -56, 0.3)
pt3dadd(209.5, 589, -56, 0.3)
pt3dadd(209.5, 592, -56, 0.3)
pt3dadd(208, 596, -56, 1.3)
pt3dadd(208, 598.5, -56, 1.2)
pt3dadd(207.5, 601, -56, 2.1)
pt3dadd(208, 603, -56, 3.4)
pt3dadd(207, 605, -56, 0.3)
pt3dadd(207, 608, -49.5, 0.3)
pt3dadd(206.5, 609.5, -49.5, 2.1)
pt3dadd(206.5, 613, -49.5, 0.1)
pt3dadd(206, 614.5, -49.5, 0.1)
pt3dadd(206, 617, -49.5, 0.1)
pt3dadd(205, 620, -49.5, 1.2)
pt3dadd(205, 621.5, -49.5, 1.4)
pt3dadd(205, 624, -49.5, 0.8)
pt3dadd(204, 628, -49.5, 0.5)
pt3dadd(204, 631, -49.5, 0.5)
pt3dadd(203, 632.5, -56, 0.8)
pt3dadd(201, 634.5, -49.5, 0.8)
pt3dadd(200.5, 636.5, -49.5, 0.8)
pt3dadd(200, 639, -49.5, 0.8)
pt3dadd(200, 641.5, -56, 2.5)
pt3dadd(199, 643.5, -56, 2.6)
pt3dadd(199, 645.5, -49.5, 1.9)
pt3dadd(198.5, 647.5, -49.5, 1)
pt3dadd(196.5, 650, -56, 0.1)
pt3dadd(196.5, 651.5, -56, 0.1)
pt3dadd(196.5, 653, -49.5, 1.5)
pt3dadd(194.5, 656, -56, 0.1)
pt3dadd(194.5, 657.5, -56, 0.1)
pt3dadd(194, 659, -56, 1.1)
pt3dadd(194, 660.5, -56, 0.1)
pt3dadd(194, 663, -56, 0.1)
pt3dadd(194, 664, -56, 1.7)
pt3dadd(194, 667, -56, 0.1)
pt3dadd(194, 668.5, -56, 0.1)
pt3dadd(194, 670.5, -56, 2.2)
pt3dadd(194.5, 674, -56, 0.1)
pt3dadd(195.5, 676.5, -56, 0.1)
pt3dadd(195.5, 679, -56, 0.1)
pt3dadd(195.5, 680.5, -49.5, 0.1)
pt3dadd(195.5, 683.5, -49.5, 0.1)
pt3dadd(197, 686, -49.5, 0.1)
pt3dadd(197, 688.5, -49.5, 0.1)
pt3dadd(195.5, 689.5, -49.5, 1.2)
pt3dadd(195.5, 693.5, -49.5, 0.1)
pt3dadd(195, 696, -43.5, 1)
pt3dadd(195.5, 696, -49.5, 0.1)
pt3dadd(198, 699, -49.5, 0.1)
pt3dadd(199, 702.5, -49.5, 0.1)
pt3dadd(201.5, 702.5, -43.5, 0.1)
pt3dadd(202.5, 706, -43.5, 0.1)
}
dend[79] {pt3dclear()
pt3dadd(163, 470.5, -43.5, 2.6)
pt3dadd(163, 473, -43.5, 1.4)
pt3dadd(162.5, 474, -43.5, 1.8)
pt3dadd(162.5, 476, -49.5, 2.5)
pt3dadd(162.5, 477.5, -49.5, 2.5)
pt3dadd(163.5, 481, -49.5, 2.5)
pt3dadd(164.5, 481, -56, 2.9)
pt3dadd(166, 479.5, -49.5, 2.8)
pt3dadd(167.5, 480, -49.5, 0.6)
pt3dadd(169, 480.5, -49.5, 1.6)
pt3dadd(170, 481, -56, 2.2)
pt3dadd(171.5, 482.5, -56, 2.8)
pt3dadd(173, 483, -56, 2.2)
pt3dadd(175, 485.5, -56, 1.2)
pt3dadd(175, 486.5, -56, 1.2)
pt3dadd(175.5, 488, -56, 1.2)
pt3dadd(175.5, 490, -56, 2.3)
pt3dadd(175, 493, -56, 3.2)
pt3dadd(175, 495.5, -56, 3.3)
pt3dadd(176.5, 497.5, -56, 3.3)
pt3dadd(179, 498.5, -56, 3.3)
pt3dadd(181, 501.5, -56, 2.5)
pt3dadd(181, 504, -56, 2.8)
pt3dadd(182, 506.5, -56, 3.1)
pt3dadd(186.5, 510.5, -52, 1.7)
pt3dadd(189.5, 514, -52, 2)
pt3dadd(194.5, 517.5, -52, 2)
pt3dadd(195.5, 519.5, -52, 2.1)
pt3dadd(197.5, 521, -50.5, 2.1)
pt3dadd(200.5, 522.5, -54, 2.6)
pt3dadd(201.5, 524.5, -52, 3.4)
}
}
proc shape3d_25() {
dend[79] { pt3dadd(204.5, 524.5, -48.5, 4.1)
}
dend[80] {pt3dclear()
pt3dadd(204.5, 524.5, -48.5, 4.1)
pt3dadd(203.5, 532.5, -46.5, 0.1)
pt3dadd(203.5, 535, -46.5, 0.1)
pt3dadd(205.5, 539, -44.5, 0.1)
pt3dadd(206, 545, -33, 0.1)
pt3dadd(206, 550.5, -40.5, 0.1)
pt3dadd(208.5, 558.5, -37, 0.1)
pt3dadd(208.5, 562.5, -37, 0.1)
pt3dadd(208, 567.5, -38.5, 0.1)
pt3dadd(208, 570, -29, 0.1)
pt3dadd(208.5, 575, -29, 0.1)
pt3dadd(212, 578, -25.5, 0.3)
pt3dadd(212.5, 581, -29, 0.3)
}
dend[81] {pt3dclear()
pt3dadd(204.5, 524.5, -48.5, 4.1)
pt3dadd(208, 526.5, -54, 1.9)
pt3dadd(209.5, 526.5, -54, 1.7)
pt3dadd(213.5, 526.5, -58, 1.9)
pt3dadd(217, 529, -60, 1.6)
pt3dadd(220.5, 533.5, -48.5, 1.1)
pt3dadd(220.5, 538.5, -48.5, 1.1)
pt3dadd(223.5, 544, -48.5, 1.1)
pt3dadd(224, 548.5, -48.5, 1.1)
pt3dadd(227.5, 553, -48.5, 1.1)
pt3dadd(229, 556, -48.5, 0.8)
pt3dadd(231, 563, -46.5, 1.2)
pt3dadd(231.5, 569, -46.5, 1.4)
pt3dadd(233.5, 571, -52, 1.4)
pt3dadd(235, 574, -54, 1.4)
pt3dadd(240, 577, -54, 1.4)
pt3dadd(241, 579.5, -54, 1.4)
pt3dadd(243, 582, -54, 1.4)
pt3dadd(243.5, 586, -56, 1.4)
pt3dadd(243.5, 589, -56, 1.1)
pt3dadd(245.5, 592.5, -56, 1.1)
pt3dadd(245, 594.5, -56, 0.7)
pt3dadd(246.5, 599.5, -56, 0.7)
pt3dadd(248, 604.5, -60, 0.7)
pt3dadd(249.5, 609, -63.5, 1.4)
pt3dadd(252.5, 611.5, -56, 1.3)
pt3dadd(252.5, 615, -56, 1.9)
pt3dadd(255, 617.5, -56, 2.5)
pt3dadd(256, 619.5, -56, 2.4)
pt3dadd(257.5, 622, -56, 0.2)
pt3dadd(260.5, 625.5, -56, 0.2)
pt3dadd(262, 625.5, -54, 1.2)
pt3dadd(261, 628.5, -54, 1.8)
pt3dadd(262, 630.5, -54, 2.1)
pt3dadd(267, 631.5, -52, 2.1)
pt3dadd(269, 633, -50.5, 0.2)
pt3dadd(271, 635.5, -56, 0.2)
pt3dadd(273, 639.5, -56, 0.3)
pt3dadd(274, 643, -56, 0.3)
pt3dadd(276.5, 644.5, -50.5, 0.4)
pt3dadd(281, 649.5, -54, 0.3)
pt3dadd(283.5, 654.5, -56, 0.2)
pt3dadd(287.5, 660.5, -54, 0.2)
pt3dadd(287.5, 665, -54, 0.2)
pt3dadd(289.5, 671.5, -62, 0.3)
pt3dadd(291.5, 677, -62, 0.3)
pt3dadd(295, 682.5, -62, 0.3)
pt3dadd(295.5, 683, -58, 0.1)
pt3dadd(295.5, 686.5, -52, 0.2)
pt3dadd(298.5, 692, -52, 0.2)
pt3dadd(298.5, 696.5, -63.5, 0.2)
pt3dadd(299, 699, -62, 0.2)
pt3dadd(301.5, 701, -62, 0.2)
pt3dadd(303, 703.5, -58, 1.9)
pt3dadd(305, 709, -58, 1.7)
pt3dadd(307, 715.5, -58, 0.2)
pt3dadd(307.5, 719.5, -63.5, 0.2)
pt3dadd(310.5, 721.5, -63.5, 1.1)
pt3dadd(312, 724.5, -63.5, 1.1)
pt3dadd(315.5, 727.5, -67.5, 0.3)
pt3dadd(319.5, 733.5, -62, 0.4)
pt3dadd(323.5, 737.5, -63.5, 0.4)
pt3dadd(327.5, 741, -65.5, 0.4)
}
dend[82] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 6.6)
pt3dadd(65, 37, -4, 6.6)
pt3dadd(68, 35.5, -3, 6.6)
pt3dadd(67.5, 31.5, -3, 6.5)
pt3dadd(67.5, 28.5, -3, 6.2)
pt3dadd(70.5, 26, -4, 5.7)
pt3dadd(75.5, 27, 1.5, 6.1)
pt3dadd(81, 29.5, 1.5, 6.1)
pt3dadd(85.5, 31, 7, 6.1)
pt3dadd(87.5, 34.5, 10, 6.3)
pt3dadd(91.5, 36.5, 10, 6.3)
pt3dadd(94.5, 38, 10, 6)
pt3dadd(97.5, 39.5, 10, 5.7)
pt3dadd(99, 41.5, 12.5, 5)
pt3dadd(101, 43, 12.5, 5.7)
pt3dadd(103, 45, 15.5, 5.6)
pt3dadd(105, 47.5, 17, 5.4)
pt3dadd(108.5, 48.5, 21.5, 4.9)
pt3dadd(111.5, 48.5, 15.5, 5.3)
pt3dadd(114, 49, 15.5, 6.1)
pt3dadd(116.5, 52.5, 15.5, 6.1)
pt3dadd(119.5, 52.5, 15.5, 5.6)
pt3dadd(122.5, 53, 15.5, 6.1)
pt3dadd(126, 53, 15.5, 7.1)
pt3dadd(128, 54.5, 15.5, 8)
}
dend[83] {pt3dclear()
pt3dadd(128, 54.5, 15.5, 8)
pt3dadd(132, 50, 21.5, 1.7)
pt3dadd(134.5, 49.5, 20, 1.9)
pt3dadd(137, 47.5, 20, 1.6)
pt3dadd(139, 46, 20, 1.6)
pt3dadd(140.5, 45.5, 18.5, 1.6)
pt3dadd(142, 44, 18.5, 2)
pt3dadd(143.5, 42, 18.5, 2.6)
pt3dadd(146, 41.5, 18.5, 1.8)
pt3dadd(147, 40, 17, 1.7)
pt3dadd(149.5, 40, 17, 1.8)
pt3dadd(151.5, 39, 17, 1.7)
pt3dadd(153.5, 38.5, 15.5, 1.7)
pt3dadd(156.5, 36.5, 15.5, 2.2)
pt3dadd(159, 36, 15.5, 2.4)
pt3dadd(162, 34.5, 15.5, 3.4)
pt3dadd(164.5, 33.5, 15.5, 2.7)
pt3dadd(167.5, 33.5, 15.5, 2.1)
pt3dadd(170, 32.5, 14, 1.9)
pt3dadd(175, 32.5, 12.5, 2.3)
pt3dadd(177.5, 32, 11.5, 2.8)
pt3dadd(181.5, 30.5, 11.5, 2.8)
pt3dadd(183.5, 29, 11.5, 1.7)
pt3dadd(185.5, 28.5, 7, 1.3)
pt3dadd(191.5, 26, 7, 1.1)
pt3dadd(193.5, 26, 7, 1.4)
pt3dadd(200, 26.5, 5.5, 1.6)
pt3dadd(205.5, 25, 3, 3.6)
pt3dadd(208.5, 23.5, 0, 3.4)
pt3dadd(210.5, 22.5, 0, 3.1)
pt3dadd(212, 21.5, -2.5, 1.9)
pt3dadd(213, 21.5, -2.5, 1.7)
pt3dadd(216, 20, 0, 1.5)
pt3dadd(218, 20, 0, 1.5)
pt3dadd(218.5, 20, 0, 2.1)
pt3dadd(220.5, 21, 0, 2.4)
pt3dadd(223, 21, 0, 2)
pt3dadd(227, 21, 0, 2)
pt3dadd(228, 21, 0, 2.4)
pt3dadd(232, 21, 0, 3.2)
pt3dadd(236, 21, -2.5, 2.3)
pt3dadd(239, 21, -8.5, 1.6)
pt3dadd(241.5, 21, -8.5, 1.4)
pt3dadd(243.5, 21, -8.5, 2)
pt3dadd(245.5, 23, -5.5, 2.7)
pt3dadd(247.5, 23.5, -5.5, 3.7)
pt3dadd(251, 24.5, -8.5, 2.3)
pt3dadd(254, 24.5, -8.5, 1.6)
pt3dadd(257.5, 24.5, 0, 1)
pt3dadd(260.5, 26.5, -2.5, 0.5)
pt3dadd(265.5, 27, -2.5, 0.5)
pt3dadd(269.5, 27, -2.5, 0.1)
pt3dadd(272, 27.5, -2.5, 0.1)
pt3dadd(275.5, 28, -2.5, 1.3)
pt3dadd(282, 30.5, -5.5, 1.4)
pt3dadd(286, 30.5, -5.5, 1.6)
pt3dadd(288.5, 31.5, 0, 1.3)
pt3dadd(291.5, 33.5, -2.5, 0.8)
pt3dadd(294, 33.5, -2.5, 1.5)
pt3dadd(295.5, 33, -5.5, 3.1)
pt3dadd(298, 33, -2.5, 3.8)
pt3dadd(301, 33, 0, 2.4)
pt3dadd(303, 33, 0, 1.5)
pt3dadd(304, 32, 0, 1)
pt3dadd(307.5, 32, 0, 1.2)
pt3dadd(309, 33, -2.5, 1.7)
pt3dadd(312, 33.5, -2.5, 3.4)
pt3dadd(313.5, 33.5, -2.5, 5.7)
pt3dadd(317.5, 34, -8.5, 2.3)
pt3dadd(320, 34, -8.5, 1.8)
pt3dadd(322.5, 34.5, -5.5, 1.7)
pt3dadd(326, 34.5, -5.5, 1.8)
pt3dadd(328.5, 34.5, -11, 0.7)
pt3dadd(330, 34.5, -11, 0.7)
pt3dadd(331, 34.5, -5.5, 2.6)
pt3dadd(334, 34.5, -2.5, 4.3)
pt3dadd(337, 35.5, -5.5, 4)
pt3dadd(340.5, 35.5, -5.5, 2.5)
pt3dadd(346, 36, -5.5, 1.9)
pt3dadd(348, 37, -8.5, 1.2)
pt3dadd(351, 38, -8.5, 0.4)
pt3dadd(355.5, 39, -8.5, 0.4)
pt3dadd(359.5, 40.5, -11, 0.5)
pt3dadd(367, 46, -11, 1.3)
}
dend[84] {pt3dclear()
pt3dadd(128, 54.5, 15.5, 8)
pt3dadd(131, 57.5, 15.5, 5.7)
pt3dadd(133.5, 60.5, 15.5, 5.7)
pt3dadd(135.5, 63.5, 15.5, 5.7)
pt3dadd(138, 65.5, 15.5, 5.8)
pt3dadd(141, 68, 17, 6.2)
pt3dadd(143.5, 71.5, 17, 6.1)
pt3dadd(145, 72, 17, 6.2)
pt3dadd(147.5, 75, 17, 6.2)
pt3dadd(149, 78.5, 18.5, 5.5)
pt3dadd(152, 81.5, 22.5, 5.5)
pt3dadd(154.5, 84.5, 20, 6.2)
pt3dadd(156, 86, 22.5, 7.1)
pt3dadd(157, 88, 22.5, 8.1)
}
}
proc shape3d_26() {
dend[84] { }
dend[85] {pt3dclear()
pt3dadd(157, 88, 22.5, 8.1)
pt3dadd(156, 93, 22.5, 3.2)
pt3dadd(156, 95.5, 22.5, 3.2)
pt3dadd(155.5, 97.5, 22.5, 3.4)
pt3dadd(155.5, 101, 22.5, 3.7)
pt3dadd(156.5, 103.5, 22.5, 3.7)
pt3dadd(156.5, 105.5, 22.5, 3.3)
pt3dadd(158, 110, 22.5, 3.3)
pt3dadd(158, 111.5, 22.5, 3.3)
pt3dadd(159, 114, 21.5, 3.4)
pt3dadd(159, 116, 21.5, 3.4)
pt3dadd(159, 118.5, 21.5, 3.4)
pt3dadd(159, 121.5, 21.5, 3.4)
pt3dadd(158.5, 124, 20, 3.4)
pt3dadd(158, 128, 20, 3.4)
pt3dadd(158, 131, 20, 2.9)
pt3dadd(157.5, 134.5, 20, 3)
pt3dadd(157.5, 137.5, 20, 3.2)
pt3dadd(157, 139.5, 27, 2.6)
pt3dadd(157.5, 141.5, 28.5, 1.7)
pt3dadd(158, 144.5, 30, 1.9)
pt3dadd(158, 145.5, 31.5, 2.8)
pt3dadd(157, 151, 32.5, 3.7)
pt3dadd(157, 155, 34, 3.4)
pt3dadd(157.5, 158.5, 36, 3.4)
pt3dadd(158, 162, 36, 3)
pt3dadd(157.5, 164, 38, 2.5)
pt3dadd(157.5, 166.5, 41.5, 2.2)
pt3dadd(157.5, 168.5, 41.5, 2.7)
pt3dadd(157.5, 170, 43, 2.7)
pt3dadd(157.5, 173, 43, 2.7)
pt3dadd(157.5, 175, 43, 2.5)
pt3dadd(157, 176.5, 43, 2.5)
pt3dadd(156, 180, 43, 3.6)
pt3dadd(157, 181, 43, 3.3)
pt3dadd(157.5, 183, 43, 3.4)
pt3dadd(158.5, 184.5, 43, 3.4)
pt3dadd(159, 186.5, 43, 3.1)
pt3dadd(159.5, 187, 43, 2.7)
pt3dadd(159.5, 188.5, 45, 2.4)
pt3dadd(160, 190, 45, 2.3)
pt3dadd(161, 192.5, 39.5, 2.3)
pt3dadd(162, 195, 39.5, 2.3)
pt3dadd(162.5, 196, 41.5, 2.4)
pt3dadd(162.5, 198, 41.5, 2.5)
pt3dadd(163.5, 198, 41.5, 2)
pt3dadd(165, 200, 41.5, 2)
pt3dadd(165.5, 201.5, 41.5, 2)
pt3dadd(166, 203.5, 41.5, 2.5)
pt3dadd(166, 205, 41.5, 2.6)
pt3dadd(165.5, 208, 41.5, 2.7)
pt3dadd(164, 210.5, 43, 2.5)
pt3dadd(163, 213, 43, 2.2)
pt3dadd(162.5, 214.5, 46.5, 2)
pt3dadd(162, 216.5, 46.5, 1.1)
pt3dadd(162, 219, 46.5, 1.6)
pt3dadd(162.5, 220.5, 46.5, 2.1)
pt3dadd(162.5, 222.5, 46.5, 2.6)
pt3dadd(162.5, 224.5, 46.5, 3.2)
pt3dadd(163.5, 228, 46.5, 3.3)
pt3dadd(164, 230, 46.5, 3.5)
pt3dadd(164.5, 233, 46.5, 2.8)
pt3dadd(164.5, 235.5, 46.5, 2.5)
pt3dadd(164.5, 238.5, 46.5, 2.1)
pt3dadd(165, 241.5, 48.5, 2.7)
pt3dadd(165, 243, 50.5, 1.2)
pt3dadd(165, 246, 50.5, 1)
pt3dadd(164, 248, 50.5, 1)
pt3dadd(162.5, 250.5, 45, 1.4)
pt3dadd(162.5, 253, 46.5, 1.6)
pt3dadd(163, 256, 48.5, 1.4)
pt3dadd(163.5, 257.5, 48.5, 1.4)
pt3dadd(164.5, 259, 48.5, 1.4)
pt3dadd(164.5, 261, 50.5, 2.5)
pt3dadd(164.5, 261, 52, 3.3)
pt3dadd(166.5, 264, 52, 1.6)
pt3dadd(167, 265.5, 52, 1.1)
pt3dadd(169, 267.5, 52, 1.1)
pt3dadd(169.5, 268, 54, 1.8)
pt3dadd(169.5, 269, 54, 1.9)
pt3dadd(170, 269.5, 55.5, 1.6)
pt3dadd(170.5, 271.5, 54, 1.6)
pt3dadd(172.5, 272.5, 55.5, 1.3)
pt3dadd(172.5, 274.5, 55.5, 1.3)
pt3dadd(171.5, 277, 55.5, 1.9)
pt3dadd(171.5, 278.5, 55.5, 2.7)
pt3dadd(171, 281.5, 55.5, 2.1)
pt3dadd(169.5, 285, 55.5, 1.5)
pt3dadd(169.5, 286.5, 55.5, 0.9)
pt3dadd(166.5, 289.5, 55.5, 0.8)
pt3dadd(166.5, 291, 55.5, 0.8)
pt3dadd(167, 293, 54, 3.4)
pt3dadd(167, 295.5, 55.5, 2.7)
pt3dadd(167.5, 297.5, 55.5, 1.3)
pt3dadd(168.5, 299, 55.5, 1.3)
pt3dadd(170, 300, 55.5, 1.5)
pt3dadd(170, 301.5, 55.5, 1.4)
pt3dadd(171.5, 304, 55.5, 1.4)
pt3dadd(173, 305, 55.5, 1.4)
pt3dadd(171.5, 310, 58.5, 1.4)
pt3dadd(169.5, 313, 58.5, 1.5)
pt3dadd(169.5, 314, 58.5, 0.8)
pt3dadd(167.5, 317, 60, 0.5)
pt3dadd(169.5, 319.5, 60, 0.5)
pt3dadd(168.5, 322.5, 60, 0.6)
pt3dadd(169.5, 325, 60, 0.6)
pt3dadd(168, 326.5, 61.5, 0.6)
pt3dadd(167.5, 329, 60, 0.6)
pt3dadd(167.5, 331, 63, 2.2)
pt3dadd(166.5, 334, 63, 1.2)
pt3dadd(164, 337.5, 63, 1.2)
pt3dadd(164, 340.5, 64.5, 0.7)
pt3dadd(164.5, 344, 64.5, 0.7)
pt3dadd(162.5, 345, 64.5, 1.4)
pt3dadd(162, 348, 64.5, 1.4)
pt3dadd(160, 351.5, 64.5, 1.7)
pt3dadd(161, 355.5, 64.5, 2)
pt3dadd(161, 359, 64.5, 1.5)
pt3dadd(162.5, 361.5, 66, 1.2)
pt3dadd(164, 362.5, 66, 2)
pt3dadd(163, 365.5, 60, 1.3)
pt3dadd(165, 368, 61.5, 1.3)
pt3dadd(167, 369.5, 61.5, 1.3)
pt3dadd(169, 371, 60, 1.4)
pt3dadd(171.5, 372, 60, 1.4)
pt3dadd(173.5, 372, 66, 0.9)
pt3dadd(176.5, 372.5, 66, 0.9)
pt3dadd(179.5, 374.5, 66, 1.1)
pt3dadd(182.5, 376, 64.5, 1.1)
pt3dadd(184.5, 377, 67.5, 0.9)
pt3dadd(186.5, 380, 69, 1.1)
pt3dadd(187.5, 381, 69, 1.3)
pt3dadd(190.5, 383.5, 69, 1.5)
pt3dadd(193, 385.5, 69, 1)
pt3dadd(196.5, 384.5, 69, 1.1)
pt3dadd(200, 385.5, 69, 1.2)
pt3dadd(202, 385.5, 69, 1.3)
pt3dadd(203.5, 387, 69, 1.6)
pt3dadd(205, 388.5, 67.5, 2.1)
pt3dadd(206.5, 389.5, 66, 1.3)
pt3dadd(208, 389.5, 66, 1.1)
pt3dadd(208.5, 389.5, 66, 1.1)
pt3dadd(211, 391.5, 63, 1.2)
pt3dadd(212.5, 391.5, 63, 2)
pt3dadd(215, 393.5, 64.5, 0.9)
pt3dadd(216, 394, 64.5, 0.9)
pt3dadd(217, 395, 63, 2.1)
pt3dadd(218, 397, 64.5, 3.4)
pt3dadd(220, 397.5, 66, 1.2)
pt3dadd(222.5, 398, 67.5, 1.3)
pt3dadd(225, 398, 66, 1.8)
pt3dadd(227, 399.5, 66, 1.3)
pt3dadd(229, 400.5, 66, 1.1)
pt3dadd(230.5, 400.5, 66, 1.1)
pt3dadd(232.5, 401, 66, 2.1)
pt3dadd(234.5, 401.5, 64.5, 2.3)
pt3dadd(237, 401.5, 66, 1.2)
pt3dadd(239.5, 402, 67.5, 0.8)
pt3dadd(241.5, 402, 66, 0.8)
pt3dadd(245, 402.5, 66, 0.8)
pt3dadd(247.5, 404, 66, 0.8)
pt3dadd(252.5, 403.5, 66, 0.8)
pt3dadd(256, 405, 66, 0.8)
pt3dadd(259, 407.5, 66, 0.8)
pt3dadd(261.5, 409, 66, 0.8)
pt3dadd(264.5, 409, 66, 1.1)
pt3dadd(266.5, 408.5, 66, 1.3)
pt3dadd(269, 410, 67.5, 1.1)
pt3dadd(274, 410.5, 67.5, 1.2)
pt3dadd(279.5, 410, 67.5, 1.2)
pt3dadd(282.5, 410.5, 69, 0.7)
pt3dadd(286, 413.5, 70.5, 0.7)
pt3dadd(288.5, 416, 70.5, 0.7)
pt3dadd(291, 417, 70.5, 0.7)
pt3dadd(292.5, 418.5, 70.5, 0.7)
pt3dadd(295.5, 419.5, 70.5, 0.7)
pt3dadd(297.5, 420.5, 70.5, 0.7)
pt3dadd(299, 421.5, 70.5, 0.7)
pt3dadd(301.5, 421, 70.5, 0.7)
pt3dadd(302, 423.5, 70.5, 0.7)
pt3dadd(303.5, 425.5, 70.5, 0.7)
pt3dadd(304.5, 425.5, 70.5, 0.7)
pt3dadd(307, 424, 70.5, 0.7)
pt3dadd(309, 424, 70.5, 0.7)
pt3dadd(310.5, 425, 70.5, 0.7)
pt3dadd(310, 427, 70.5, 2)
pt3dadd(312, 428.5, 73.5, 2.5)
pt3dadd(313, 431.5, 73.5, 1.5)
pt3dadd(314, 433, 73.5, 0.3)
pt3dadd(318, 433.5, 72, 0.3)
pt3dadd(317.5, 435, 72, 0.3)
pt3dadd(322.5, 437, 70.5, 0.4)
pt3dadd(324.5, 436.5, 69, 1.1)
pt3dadd(326, 436, 66, 1.4)
pt3dadd(330, 436.5, 67.5, 0.3)
pt3dadd(334.5, 437.5, 67.5, 0.3)
pt3dadd(336.5, 436.5, 70.5, 0.9)
pt3dadd(339.5, 436, 70.5, 0.4)
pt3dadd(341.5, 436.5, 70.5, 0.4)
pt3dadd(342, 436.5, 70.5, 1.4)
}
}
proc shape3d_27() {
dend[85] { pt3dadd(344.5, 436, 70.5, 2)
pt3dadd(347, 437, 70.5, 1)
pt3dadd(348, 437, 70.5, 1)
pt3dadd(350.5, 436.5, 70.5, 1.3)
pt3dadd(351, 435.5, 70.5, 1.9)
pt3dadd(355, 436, 72, 1.3)
pt3dadd(356, 437, 73.5, 0.9)
pt3dadd(357, 437, 73.5, 1.7)
pt3dadd(359.5, 437, 76.5, 3.2)
pt3dadd(363.5, 437.5, 72, 1.9)
pt3dadd(365, 437, 75, 0.8)
pt3dadd(366.5, 437, 75, 0.8)
pt3dadd(368.5, 437, 75, 1.4)
pt3dadd(369.5, 438, 75, 2)
pt3dadd(371, 438, 75, 1)
pt3dadd(372, 438, 75, 0.8)
pt3dadd(375, 437.5, 75, 0.8)
pt3dadd(377, 437, 75, 0.8)
pt3dadd(380, 437, 75, 0.8)
pt3dadd(380.5, 438, 75, 0.8)
pt3dadd(382, 438, 75, 1.7)
pt3dadd(384, 440, 75, 2.6)
pt3dadd(387, 439, 75, 1.3)
pt3dadd(390, 440, 75, 1.1)
pt3dadd(390.5, 440, 75, 0.9)
pt3dadd(392.5, 439.5, 75, 0.9)
pt3dadd(393.5, 440, 73.5, 1.7)
pt3dadd(394, 440, 75, 2.4)
pt3dadd(397, 439.5, 75, 0.9)
pt3dadd(399, 440.5, 75, 0.9)
pt3dadd(400, 441.5, 76.5, 0.6)
pt3dadd(403, 443, 76.5, 0.6)
pt3dadd(404.5, 443, 76.5, 0.6)
pt3dadd(406.5, 443, 76.5, 0.6)
pt3dadd(408, 444.5, 76.5, 0.6)
pt3dadd(409, 444.5, 76.5, 0.6)
pt3dadd(411, 446, 76.5, 1.8)
pt3dadd(411.5, 446, 76.5, 3.2)
pt3dadd(414, 447, 76.5, 0.6)
pt3dadd(416.5, 447, 76.5, 0.6)
pt3dadd(418.5, 449, 76.5, 0.6)
pt3dadd(421, 451.5, 76.5, 0.3)
pt3dadd(422.5, 451, 66, 0.2)
pt3dadd(426.5, 451, 70.5, 0.8)
pt3dadd(429.5, 450, 60, 2.3)
}
dend[86] {pt3dclear()
pt3dadd(429.5, 450, 60, 2.3)
pt3dadd(433.5, 449, 61.5, 1.4)
pt3dadd(437, 449.5, 61.5, 1.4)
pt3dadd(441, 452, 61.5, 1.4)
pt3dadd(444, 454, 61.5, 1.4)
}
dend[87] {pt3dclear()
pt3dadd(429.5, 450, 60, 2.3)
pt3dadd(434.5, 449.5, 64.5, 0.6)
pt3dadd(435.5, 451.5, 63, 0.6)
pt3dadd(437.5, 454, 64.5, 0.6)
pt3dadd(438, 451.5, 64.5, 0.6)
pt3dadd(438.5, 450, 64.5, 0.6)
pt3dadd(439.5, 449, 66, 0.6)
pt3dadd(440.5, 449, 66, 0.6)
pt3dadd(444, 449, 61.5, 1.7)
pt3dadd(445, 451, 63, 0.9)
}
dend[88] {pt3dclear()
pt3dadd(157, 88, 22.5, 8.1)
pt3dadd(164.5, 88, 22.5, 4.8)
pt3dadd(167, 88, 22.5, 5.1)
pt3dadd(170, 89, 22.5, 4.7)
pt3dadd(172, 91, 22.5, 4.7)
pt3dadd(174, 93.5, 24, 4.7)
pt3dadd(174.5, 96, 24, 4.7)
pt3dadd(177, 98, 30, 5)
pt3dadd(180.5, 99.5, 30, 5.2)
pt3dadd(182.5, 100.5, 30, 5.3)
pt3dadd(186.5, 104, 28.5, 3.6)
pt3dadd(189.5, 105, 30, 3.3)
pt3dadd(191.5, 107, 30, 3.3)
pt3dadd(194, 107, 30, 3.8)
pt3dadd(197, 107, 30, 4.3)
pt3dadd(200, 108.5, 33.5, 4)
pt3dadd(204.5, 108.5, 33.5, 4)
pt3dadd(207, 109, 32, 3.8)
pt3dadd(210.5, 111.5, 30, 3.8)
pt3dadd(213, 111.5, 37, 3.8)
pt3dadd(216, 112.5, 37, 4.6)
pt3dadd(219.5, 113, 35.5, 4.7)
pt3dadd(222, 113, 35.5, 4.8)
pt3dadd(224.5, 113, 39, 5.3)
}
dend[89] {pt3dclear()
pt3dadd(224.5, 113, 39, 5.3)
pt3dadd(226.5, 113, 37, 1.3)
pt3dadd(228, 113, 37, 1.3)
pt3dadd(229.5, 113, 37, 2.1)
pt3dadd(231, 113, 37, 2.1)
pt3dadd(232, 112, 37, 1.6)
pt3dadd(233, 110.5, 37, 1.8)
pt3dadd(234.5, 110.5, 37, 1.8)
pt3dadd(237, 109, 37, 1.9)
pt3dadd(238.5, 108.5, 37, 2.5)
pt3dadd(240.5, 107, 37, 2.2)
pt3dadd(242, 104.5, 39, 1.9)
pt3dadd(244.5, 103, 39, 2.2)
pt3dadd(246, 102.5, 37, 2.5)
pt3dadd(248, 101, 37, 2.8)
pt3dadd(250, 101, 37, 2.4)
pt3dadd(253, 100.5, 39, 2)
pt3dadd(253.5, 100, 39, 1.7)
pt3dadd(256, 100, 39, 1.7)
pt3dadd(258, 98, 46, 1.4)
pt3dadd(260, 97.5, 46, 1.2)
pt3dadd(261.5, 95.5, 46, 1.1)
pt3dadd(263, 94, 46, 1.1)
pt3dadd(263.5, 92.5, 37, 1.7)
pt3dadd(266, 92.5, 37, 2.5)
pt3dadd(268, 92, 37, 2.5)
pt3dadd(270, 90.5, 35.5, 2.5)
pt3dadd(270.5, 89, 42.5, 2.4)
pt3dadd(272.5, 87.5, 42.5, 2.4)
pt3dadd(274.5, 87.5, 42.5, 2.5)
pt3dadd(277, 86, 42.5, 2.5)
pt3dadd(277, 83, 42.5, 0.9)
pt3dadd(277.5, 82.5, 42.5, 0.9)
pt3dadd(280, 80, 42.5, 1.1)
pt3dadd(282, 79.5, 42.5, 1.6)
pt3dadd(283.5, 77.5, 42.5, 2.3)
pt3dadd(285, 75.5, 42.5, 2.4)
pt3dadd(285, 73, 42.5, 2.2)
pt3dadd(286.5, 71.5, 42.5, 1.8)
pt3dadd(288.5, 70.5, 42.5, 1.6)
pt3dadd(290.5, 69.5, 42.5, 1.6)
pt3dadd(294, 67.5, 42.5, 1.6)
pt3dadd(296, 66, 42.5, 1.5)
pt3dadd(298, 66, 42.5, 1.4)
pt3dadd(301, 65.5, 42.5, 1.6)
pt3dadd(303, 64, 42.5, 1.6)
pt3dadd(304.5, 65, 48, 1.6)
}
dend[90] {pt3dclear()
pt3dadd(224.5, 113, 39, 5.3)
pt3dadd(227.5, 114.5, 37, 3.9)
pt3dadd(230, 115.5, 41, 3.6)
pt3dadd(233.5, 116.5, 41, 3.3)
pt3dadd(235.5, 118, 41, 3.8)
pt3dadd(237.5, 120, 41, 4.4)
pt3dadd(239, 121, 42.5, 4.8)
pt3dadd(241, 123, 42.5, 4.1)
pt3dadd(244.5, 124, 41, 3.8)
pt3dadd(246, 125.5, 39, 3.8)
pt3dadd(249.5, 127, 41, 4)
pt3dadd(251.5, 129, 41, 4)
pt3dadd(253, 130, 41, 4)
pt3dadd(254, 131, 41, 4.3)
pt3dadd(255, 134, 42.5, 3.6)
pt3dadd(256.5, 137, 41, 2.8)
pt3dadd(259.5, 138, 42.5, 2.9)
pt3dadd(261.5, 139.5, 42.5, 3.1)
pt3dadd(264, 141.5, 42.5, 2.8)
pt3dadd(266, 143.5, 44.5, 2.6)
pt3dadd(268.5, 145, 41, 2.8)
pt3dadd(270, 147.5, 41, 3.4)
pt3dadd(271, 150, 42.5, 4.7)
pt3dadd(272, 152, 42.5, 5.9)
}
dend[91] {pt3dclear()
pt3dadd(272, 152, 42.5, 5.9)
pt3dadd(275, 155.5, 42.5, 1.9)
pt3dadd(277, 155.5, 42.5, 1.9)
pt3dadd(279, 157, 42.5, 1.9)
pt3dadd(281.5, 158, 42.5, 1.9)
pt3dadd(284, 158, 42.5, 1.9)
pt3dadd(286.5, 157.5, 42.5, 2.4)
pt3dadd(289, 157, 42.5, 1.9)
pt3dadd(291.5, 157, 42.5, 1.8)
pt3dadd(293.5, 156, 42.5, 1.6)
pt3dadd(295.5, 155.5, 42.5, 1.4)
pt3dadd(296.5, 155.5, 42.5, 1.4)
pt3dadd(298.5, 155, 41, 1.5)
pt3dadd(300.5, 154, 41, 1.9)
pt3dadd(302.5, 154, 41, 2)
pt3dadd(303.5, 154, 41, 2.4)
pt3dadd(306, 154, 41, 2.8)
pt3dadd(309, 154.5, 39, 2)
pt3dadd(311, 155, 39, 1.7)
pt3dadd(312.5, 155, 46, 1.7)
pt3dadd(314, 156, 46, 1.7)
pt3dadd(318, 156, 46, 1.7)
pt3dadd(323, 157, 49, 2.4)
pt3dadd(325.5, 156, 49, 2.4)
pt3dadd(326, 156.5, 49, 1.5)
pt3dadd(326.5, 156.5, 50.5, 2.1)
pt3dadd(329.5, 157.5, 50.5, 2.1)
pt3dadd(330.5, 157.5, 50.5, 1.6)
pt3dadd(332.5, 158, 50.5, 1.3)
pt3dadd(333, 158, 50.5, 0.8)
pt3dadd(335.5, 157.5, 49, 1.2)
pt3dadd(336.5, 157.5, 49, 2)
pt3dadd(340, 157, 49, 2.6)
pt3dadd(342.5, 158, 50.5, 2)
pt3dadd(345, 158, 50.5, 1.8)
pt3dadd(347.5, 159.5, 49, 1.4)
pt3dadd(350.5, 160, 49, 1.4)
pt3dadd(354, 162, 47.5, 2.2)
pt3dadd(355.5, 162.5, 47.5, 2.5)
pt3dadd(357.5, 164.5, 47.5, 3.4)
pt3dadd(360.5, 165.5, 44.5, 1.8)
pt3dadd(362, 165.5, 50.5, 1.6)
pt3dadd(364, 166.5, 50.5, 1.3)
pt3dadd(364, 169, 50.5, 1.7)
pt3dadd(366, 169.5, 50.5, 2.5)
}
}
proc shape3d_28() {
dend[91] { pt3dadd(366.5, 172, 52, 3.6)
pt3dadd(368.5, 173.5, 52, 2.5)
pt3dadd(369, 175, 52, 2)
pt3dadd(370.5, 176.5, 53.5, 2)
pt3dadd(372, 177, 55, 2.7)
pt3dadd(373.5, 178.5, 55, 3.1)
pt3dadd(374, 182, 55, 2.2)
pt3dadd(374, 183, 56.5, 1.2)
pt3dadd(374, 185, 59.5, 0.9)
pt3dadd(375.5, 185.5, 52, 2.7)
pt3dadd(377.5, 187.5, 55, 4)
pt3dadd(379, 188.5, 55, 2.6)
pt3dadd(380, 189.5, 53.5, 1.8)
pt3dadd(381.5, 188.5, 55, 1.3)
pt3dadd(382.5, 189, 56.5, 0.6)
pt3dadd(385, 191.5, 56.5, 0.6)
pt3dadd(385, 193, 52, 1.4)
pt3dadd(386.5, 194, 55, 2.1)
pt3dadd(387, 196, 55, 2.1)
pt3dadd(387.5, 198, 55, 1.6)
pt3dadd(388.5, 200.5, 55, 1.4)
pt3dadd(389, 203, 55, 1.2)
pt3dadd(390.5, 202.5, 56.5, 1.2)
pt3dadd(391.5, 203.5, 56.5, 1.7)
pt3dadd(392, 205, 56.5, 2.4)
pt3dadd(393, 206, 58, 3.8)
pt3dadd(394.5, 208, 58, 3.4)
pt3dadd(394.5, 210.5, 53.5, 2.1)
pt3dadd(396.5, 212.5, 55, 2.1)
pt3dadd(398.5, 216.5, 55, 2.1)
pt3dadd(400, 217, 55, 1.5)
pt3dadd(402, 219.5, 55, 1.2)
pt3dadd(402.5, 221, 55, 1.9)
pt3dadd(402.5, 223, 53.5, 2.4)
pt3dadd(403.5, 226, 53.5, 3.2)
pt3dadd(403.5, 227.5, 55, 4.9)
pt3dadd(405.5, 233, 55, 2.8)
pt3dadd(407, 234, 56.5, 1.9)
pt3dadd(409, 237.5, 58, 1.2)
pt3dadd(409.5, 240, 58, 1.1)
pt3dadd(410.5, 241.5, 59.5, 1.7)
pt3dadd(410, 244.5, 61, 1.7)
pt3dadd(411, 246, 53.5, 1.7)
pt3dadd(411.5, 248.5, 53.5, 1.9)
pt3dadd(411.5, 251, 55, 2.1)
pt3dadd(412.5, 254, 55, 2.3)
pt3dadd(413.5, 255.5, 55, 3.3)
pt3dadd(414, 256, 55, 4.6)
pt3dadd(416.5, 259.5, 55, 3)
pt3dadd(418, 260.5, 56.5, 1.9)
pt3dadd(416.5, 264, 58, 1)
pt3dadd(417.5, 266, 58, 1.1)
pt3dadd(418.5, 267, 58, 1.3)
pt3dadd(421, 268.5, 58, 1.6)
pt3dadd(420.5, 270, 59.5, 1.9)
pt3dadd(421, 272, 61, 1.4)
pt3dadd(421, 272.5, 58, 1.4)
pt3dadd(421.5, 274, 58, 2)
pt3dadd(423, 276, 58, 3.1)
pt3dadd(423.5, 278, 58, 2.7)
pt3dadd(424.5, 280.5, 58, 2)
pt3dadd(424, 284.5, 58, 1.7)
pt3dadd(422.5, 287, 58, 2.2)
pt3dadd(424, 289.5, 58, 2.5)
pt3dadd(423.5, 291, 56.5, 2.4)
pt3dadd(425, 294, 55, 2.1)
pt3dadd(427, 295, 55, 2.2)
pt3dadd(427, 298, 55, 2)
pt3dadd(426.5, 300.5, 55, 1.8)
pt3dadd(425.5, 302, 55, 1.7)
pt3dadd(427.5, 303.5, 58, 2.1)
pt3dadd(428.5, 303.5, 58, 3)
pt3dadd(430.5, 302.5, 56.5, 1.3)
pt3dadd(431.5, 302, 56.5, 2.7)
pt3dadd(434, 303, 58, 2)
pt3dadd(435, 304.5, 58, 1.6)
pt3dadd(437, 306, 58, 1.3)
pt3dadd(438.5, 306, 58, 1)
pt3dadd(439, 308, 59.5, 0.6)
pt3dadd(440, 308, 59.5, 0.6)
pt3dadd(440.5, 310, 61, 0.9)
pt3dadd(442.5, 311, 62.5, 1.9)
pt3dadd(444, 312, 62.5, 2.1)
pt3dadd(446, 312.5, 62.5, 1.8)
pt3dadd(446.5, 314, 64, 1.6)
pt3dadd(448, 314.5, 64, 1.1)
pt3dadd(448, 316, 64, 1.6)
pt3dadd(450.5, 316.5, 65.5, 2.2)
pt3dadd(452, 320.5, 61, 1.4)
pt3dadd(453.5, 320.5, 61, 1.1)
pt3dadd(454, 320.5, 61, 1.1)
pt3dadd(455, 320.5, 58, 1.1)
pt3dadd(456, 320.5, 58, 0.5)
pt3dadd(457.5, 321.5, 58, 0.7)
pt3dadd(459.5, 323.5, 58, 0.7)
pt3dadd(460.5, 324, 59.5, 1.5)
pt3dadd(461, 324, 61, 2.8)
pt3dadd(462.5, 322.5, 61, 1)
pt3dadd(464.5, 322, 61, 0.6)
pt3dadd(466.5, 322, 61, 0.6)
pt3dadd(468, 324.5, 61, 0.8)
pt3dadd(469, 323, 61, 2)
pt3dadd(471, 322.5, 61, 2.1)
pt3dadd(473.5, 322, 61, 1.2)
pt3dadd(475.5, 321.5, 55, 0.7)
pt3dadd(477.5, 321.5, 55, 1.4)
pt3dadd(479.5, 323, 58, 2.5)
pt3dadd(482.5, 324, 56.5, 0.9)
pt3dadd(483.5, 324, 56.5, 0.6)
pt3dadd(486, 322, 58, 0.6)
pt3dadd(487, 321.5, 58, 0.6)
pt3dadd(489, 322, 58, 1.7)
pt3dadd(490.5, 321.5, 56.5, 2)
pt3dadd(491.5, 321.5, 56.5, 2)
pt3dadd(494, 321.5, 56.5, 2)
pt3dadd(495.5, 322, 56.5, 2.5)
pt3dadd(498.5, 324, 56.5, 2.3)
pt3dadd(500.5, 324, 58, 1.9)
pt3dadd(503.5, 324.5, 58, 1.3)
pt3dadd(504.5, 326, 59.5, 1.1)
pt3dadd(506.5, 327, 56.5, 1.1)
pt3dadd(509.5, 330.5, 56.5, 1.1)
pt3dadd(511.5, 330.5, 56.5, 1.1)
pt3dadd(514, 330, 56.5, 1.1)
pt3dadd(514.5, 330, 56.5, 2.6)
pt3dadd(516.5, 331, 56.5, 3.8)
pt3dadd(516.5, 335, 56.5, 2.5)
pt3dadd(516.5, 336, 56.5, 1.3)
pt3dadd(516, 338, 56.5, 1.1)
pt3dadd(516.5, 338, 58, 1.6)
pt3dadd(517.5, 338.5, 58, 2.2)
pt3dadd(519, 340, 56.5, 0.8)
pt3dadd(520, 340.5, 56.5, 0.7)
pt3dadd(521, 342.5, 56.5, 0.7)
pt3dadd(523, 343, 56.5, 0.7)
pt3dadd(525, 344, 56.5, 0.7)
pt3dadd(527.5, 345, 56.5, 0.7)
pt3dadd(529, 345, 56.5, 0.7)
pt3dadd(530, 343.5, 58, 0.6)
pt3dadd(531, 343.5, 64, 0.4)
pt3dadd(532, 343.5, 64, 0.5)
pt3dadd(532.5, 343.5, 65.5, 1.5)
pt3dadd(533, 343.5, 64, 1.9)
pt3dadd(534, 345, 62.5, 0.7)
pt3dadd(535.5, 345, 64, 0.6)
pt3dadd(537, 346, 64, 1.4)
pt3dadd(537.5, 344.5, 67, 2.6)
pt3dadd(540, 345, 61, 1.2)
pt3dadd(542.5, 344.5, 61, 1.1)
pt3dadd(544, 344, 64, 1.4)
pt3dadd(546.5, 345, 62.5, 1.7)
pt3dadd(549.5, 346, 62.5, 2.2)
pt3dadd(551, 346, 62.5, 1.9)
pt3dadd(554.5, 347.5, 65.5, 1.6)
}
dend[92] {pt3dclear()
pt3dadd(272, 152, 42.5, 5.9)
pt3dadd(272.5, 154.5, 35.5, 2.7)
pt3dadd(272.5, 156.5, 37, 1.9)
pt3dadd(272.5, 158.5, 39, 1.7)
pt3dadd(274.5, 159.5, 39, 1.9)
pt3dadd(276, 161, 41, 2.7)
pt3dadd(278, 164.5, 41, 2.7)
pt3dadd(280, 166.5, 41, 2.5)
pt3dadd(281, 168.5, 41, 1.9)
pt3dadd(282, 171.5, 41, 2.5)
pt3dadd(285, 173, 39, 2.2)
pt3dadd(286.5, 177, 42.5, 3.4)
pt3dadd(288.5, 179, 42.5, 4.3)
pt3dadd(290, 181, 41, 3.4)
pt3dadd(292, 187, 42.5, 2.2)
pt3dadd(293.5, 189.5, 42.5, 1.9)
pt3dadd(299, 191.5, 42.5, 1.6)
pt3dadd(300, 193.5, 42.5, 1.9)
pt3dadd(303.5, 196.5, 42.5, 1.7)
pt3dadd(306, 198, 42.5, 1.7)
pt3dadd(311.5, 198.5, 41, 1.9)
pt3dadd(313.5, 201, 46, 2.3)
pt3dadd(316.5, 201.5, 46, 2.3)
pt3dadd(319.5, 201.5, 44.5, 2.2)
pt3dadd(320.5, 203.5, 44.5, 2.1)
pt3dadd(325, 205.5, 44.5, 2.1)
pt3dadd(327.5, 205.5, 42.5, 1.8)
pt3dadd(329, 208.5, 42.5, 1.3)
pt3dadd(331.5, 210, 41, 1.7)
pt3dadd(333, 213, 41, 2)
pt3dadd(335.5, 215.5, 41, 2)
pt3dadd(337.5, 215, 41, 1.8)
pt3dadd(341, 217.5, 41, 1.8)
pt3dadd(343, 219.5, 41, 1.4)
pt3dadd(345.5, 220, 41, 1.4)
pt3dadd(347.5, 222, 41, 1.4)
pt3dadd(349, 222, 41, 1.3)
pt3dadd(350.5, 222.5, 41, 1.6)
pt3dadd(352, 222.5, 41, 1.8)
pt3dadd(353.5, 224, 41, 1.8)
pt3dadd(355.5, 226, 41, 1.5)
pt3dadd(357, 229.5, 42.5, 1.3)
pt3dadd(359, 229.5, 42.5, 1.2)
pt3dadd(361.5, 231, 42.5, 1.4)
pt3dadd(362.5, 231, 45.5, 1.5)
pt3dadd(363.5, 231.5, 45.5, 1.6)
}
}
proc shape3d_29() {
dend[92] { pt3dadd(364.5, 232.5, 45.5, 1.9)
pt3dadd(367.5, 232, 47, 2)
pt3dadd(370, 234, 47, 2)
pt3dadd(372, 235, 47, 2.5)
pt3dadd(374, 237.5, 45.5, 2.4)
pt3dadd(375.5, 238, 45.5, 1.9)
pt3dadd(379.5, 237, 45.5, 2.5)
pt3dadd(381, 239, 42.5, 3.2)
pt3dadd(382, 239, 42.5, 3.2)
pt3dadd(386.5, 240.5, 41, 2.4)
pt3dadd(387, 243, 44, 2.2)
pt3dadd(389, 243, 42.5, 1.5)
pt3dadd(390.5, 243.5, 41, 1.4)
pt3dadd(392, 244, 45.5, 1.8)
pt3dadd(394, 245, 45.5, 2)
pt3dadd(396, 246.5, 45.5, 2.7)
pt3dadd(397.5, 248.5, 45.5, 2.8)
pt3dadd(400, 251, 44, 3.4)
pt3dadd(403, 252.5, 44, 2.7)
pt3dadd(405, 253, 44, 2.4)
pt3dadd(408, 254, 44, 2.1)
pt3dadd(410, 255.5, 42.5, 1.9)
pt3dadd(413, 258.5, 47, 1.9)
pt3dadd(415.5, 261, 45.5, 1.9)
pt3dadd(414.5, 264, 45.5, 2.4)
pt3dadd(415, 268.5, 45.5, 2.6)
pt3dadd(415.5, 270, 45.5, 2.6)
pt3dadd(415.5, 273.5, 45.5, 2.6)
pt3dadd(416, 276.5, 45.5, 3.7)
pt3dadd(419, 280, 47, 2.8)
pt3dadd(419.5, 282.5, 47, 3.6)
pt3dadd(421, 286.5, 47, 4)
pt3dadd(422, 290, 45.5, 3.4)
pt3dadd(423, 295, 50, 2)
pt3dadd(423.5, 297.5, 50, 2.5)
pt3dadd(423.5, 299.5, 50, 3.7)
pt3dadd(423.5, 302, 51.5, 4)
pt3dadd(425, 305.5, 51.5, 3.9)
pt3dadd(427, 308, 51.5, 3.8)
pt3dadd(428, 308.5, 51.5, 3.8)
pt3dadd(429, 311, 51.5, 3.4)
pt3dadd(430.5, 311, 51.5, 2.8)
pt3dadd(431.5, 313.5, 51.5, 2.4)
pt3dadd(434, 315, 50, 2.2)
pt3dadd(433.5, 316.5, 54.5, 2.9)
pt3dadd(432.5, 320.5, 54.5, 3.7)
pt3dadd(434.5, 323, 54.5, 3.1)
pt3dadd(435.5, 326, 54.5, 2.8)
pt3dadd(436, 328, 53, 2.2)
pt3dadd(436.5, 329.5, 53, 2.5)
pt3dadd(437.5, 333, 53, 3)
pt3dadd(439.5, 336.5, 53, 3)
pt3dadd(440.5, 340, 60.5, 2.3)
pt3dadd(441, 341, 60.5, 2.3)
pt3dadd(442.5, 343.5, 60.5, 2.9)
pt3dadd(445, 348, 60.5, 2)
pt3dadd(446, 350.5, 60.5, 2.2)
pt3dadd(447.5, 351.5, 60.5, 2.2)
pt3dadd(448, 354.5, 60.5, 2.2)
pt3dadd(448, 357, 60.5, 2.8)
pt3dadd(447.5, 359.5, 60.5, 2.8)
pt3dadd(448, 360.5, 60.5, 2.8)
pt3dadd(449, 363, 62, 2.1)
pt3dadd(452.5, 365.5, 62, 2.3)
pt3dadd(453.5, 369.5, 60.5, 2.9)
pt3dadd(454.5, 371.5, 62, 3.2)
pt3dadd(456.5, 373, 62, 1.9)
pt3dadd(458.5, 375, 62, 1.9)
pt3dadd(459.5, 376, 60.5, 2.5)
pt3dadd(460, 377.5, 60.5, 3.2)
pt3dadd(462.5, 380.5, 60.5, 1.7)
pt3dadd(462.5, 382, 62, 1.4)
pt3dadd(462.5, 385, 62, 1.4)
pt3dadd(464, 387.5, 60.5, 2.2)
pt3dadd(466.5, 390.5, 59, 3.2)
pt3dadd(467, 393, 62, 1.7)
pt3dadd(468.5, 395, 63.5, 1.2)
pt3dadd(470.5, 395, 63.5, 1.8)
pt3dadd(471, 395.5, 63.5, 2.5)
pt3dadd(471.5, 397.5, 63.5, 2.4)
pt3dadd(473.5, 400, 63.5, 2.4)
pt3dadd(474.5, 401.5, 63.5, 2.4)
pt3dadd(476, 403.5, 65, 2.4)
pt3dadd(475, 407, 65, 2.4)
pt3dadd(477.5, 410, 65, 1.9)
pt3dadd(478.5, 412, 66.5, 1.3)
pt3dadd(478.5, 413.5, 66.5, 1.6)
pt3dadd(481, 416.5, 63.5, 1.6)
pt3dadd(481.5, 419, 65, 1.8)
pt3dadd(482, 422.5, 65, 1.8)
pt3dadd(483, 424, 65, 1.6)
pt3dadd(482.5, 428, 65, 1.6)
pt3dadd(483, 430, 63.5, 1.6)
pt3dadd(486.5, 431, 62, 2)
pt3dadd(488, 432, 65, 3.2)
pt3dadd(489, 432.5, 63.5, 3.8)
pt3dadd(491, 435.5, 68, 2)
pt3dadd(491, 436.5, 68, 1.6)
pt3dadd(493, 439, 68, 1.4)
pt3dadd(493.5, 439.5, 68, 1.4)
pt3dadd(494, 441, 62, 1.4)
pt3dadd(493.5, 443, 68, 2)
pt3dadd(495, 445, 63.5, 2.8)
pt3dadd(496.5, 448.5, 63.5, 1.6)
pt3dadd(499.5, 450, 62, 0.7)
pt3dadd(502, 450, 66, 0.4)
pt3dadd(503.5, 448.5, 66, 0.4)
pt3dadd(506, 450, 66, 0.4)
pt3dadd(507, 451, 68, 0.8)
pt3dadd(509.5, 451.5, 68, 1.2)
pt3dadd(512.5, 451.5, 68, 0.8)
pt3dadd(512.5, 454.5, 74, 0.1)
pt3dadd(513.5, 456, 74, 0.1)
pt3dadd(514, 458, 74, 1.9)
pt3dadd(516.5, 459, 74, 2.5)
pt3dadd(518.5, 461.5, 74, 1.4)
pt3dadd(520, 464, 74, 0.6)
pt3dadd(523, 464, 74, 0.9)
pt3dadd(524, 464.5, 72, 0.9)
pt3dadd(525, 465.5, 74, 1.7)
pt3dadd(525, 467, 78, 2.7)
pt3dadd(527, 467, 78, 1.5)
pt3dadd(529, 469, 76, 0.9)
pt3dadd(529, 471.5, 76, 0.9)
pt3dadd(532, 473, 76, 0.9)
pt3dadd(532.5, 474.5, 82, 0.7)
pt3dadd(534.5, 476.5, 84, 1.7)
pt3dadd(537.5, 477.5, 84, 2.5)
pt3dadd(540.5, 480, 84, 1.2)
pt3dadd(544.5, 485, 84, 0.3)
pt3dadd(547.5, 490, 84, 0.3)
pt3dadd(547.5, 492, 84, 0.3)
pt3dadd(548, 494, 84, 1.4)
pt3dadd(549.5, 494, 84, 1.7)
pt3dadd(549.5, 494, 80, 0.4)
pt3dadd(552.5, 496, 80, 0.5)
pt3dadd(555, 498, 80, 0.5)
pt3dadd(555.5, 498.5, 86, 1.4)
pt3dadd(556, 500.5, 88, 1.8)
pt3dadd(556.5, 501.5, 88, 2.2)
pt3dadd(557.5, 501.5, 88, 1.2)
pt3dadd(558, 502.5, 88, 0.1)
pt3dadd(562.5, 503, 88, 0.1)
pt3dadd(566, 506, 88, 0.1)
pt3dadd(569, 508.5, 88, 0.1)
pt3dadd(572, 509, 66, 0.1)
pt3dadd(576, 509.5, 62, 0.1)
pt3dadd(581.5, 509.5, 74, 0.1)
}
dend[93] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 9)
pt3dadd(36.5, 3, -3, 9)
pt3dadd(36.5, -1, -3, 9)
pt3dadd(36.5, -4.5, -3, 8.3)
pt3dadd(37.5, -9.5, -3, 8)
pt3dadd(37.5, -12.5, -3, 7.7)
pt3dadd(40, -15.5, -5, 7.4)
pt3dadd(40.5, -20, -2, 5.8)
pt3dadd(42, -22.5, 0.5, 8)
pt3dadd(43, -25, 9, 8.6)
pt3dadd(42.5, -29, 9, 7.6)
pt3dadd(43.5, -33, 9, 7.6)
pt3dadd(44, -37.5, 23, 8.1)
pt3dadd(46.5, -41, 24.5, 5.4)
pt3dadd(48, -44.5, 26, 7.6)
pt3dadd(49, -47, 26, 9.4)
}
dend[94] {pt3dclear()
pt3dadd(49, -47, 26, 9.4)
pt3dadd(58, -46, 24.5, 4.6)
pt3dadd(62, -46, 27.5, 4.6)
pt3dadd(64, -45.5, 27.5, 4.2)
pt3dadd(66.5, -45.5, 27.5, 4.2)
pt3dadd(65.5, -42.5, 27.5, 4.3)
pt3dadd(69.5, -41, 29, 3.2)
pt3dadd(70.5, -42.5, 29, 3.8)
pt3dadd(73, -44, 29, 4.9)
pt3dadd(75.5, -44, 29, 4.6)
pt3dadd(77, -45.5, 29, 5.4)
pt3dadd(78.5, -46.5, 31.5, 4.6)
pt3dadd(80.5, -46.5, 31.5, 4.5)
pt3dadd(83, -46.5, 31.5, 4.3)
pt3dadd(85, -46.5, 31.5, 5.2)
pt3dadd(87, -46, 31.5, 6.2)
pt3dadd(89, -44, 33, 6.3)
pt3dadd(92, -44, 34.5, 5.6)
pt3dadd(93.5, -46.5, 36, 5.6)
pt3dadd(96.5, -46.5, 36, 6)
pt3dadd(99, -48, 36, 5.6)
pt3dadd(101.5, -48.5, 36, 4.9)
pt3dadd(103.5, -49.5, 34.5, 5.7)
pt3dadd(107, -49.5, 34.5, 5.7)
pt3dadd(109, -49.5, 34.5, 6.5)
pt3dadd(111, -50, 33, 7.4)
pt3dadd(113.5, -52, 33, 7.4)
pt3dadd(116.5, -54, 33, 6.3)
pt3dadd(119.5, -54.5, 33, 6.3)
pt3dadd(122.5, -56.5, 41.5, 6.8)
pt3dadd(124.5, -57.5, 41.5, 6.7)
pt3dadd(129.5, -58.5, 44.5, 6.6)
pt3dadd(134, -59.5, 46, 5.9)
pt3dadd(138.5, -60.5, 46, 7.3)
pt3dadd(142.5, -62, 46, 7.1)
pt3dadd(148, -62.5, 46, 7)
}
}
proc shape3d_30() {
dend[94] { pt3dadd(154, -65.5, 46, 6.9)
pt3dadd(159.5, -65.5, 46, 6.7)
pt3dadd(163, -65.5, 46, 6.7)
pt3dadd(167.5, -65.5, 47.5, 6.5)
pt3dadd(176, -66.5, 51, 5.9)
pt3dadd(182, -67, 49.5, 5.9)
pt3dadd(186.5, -69, 47.5, 5.9)
pt3dadd(191, -69, 47.5, 6.3)
pt3dadd(195, -70, 47.5, 6.8)
pt3dadd(198.5, -71, 47.5, 7.2)
pt3dadd(206.5, -74.5, 58.5, 6.3)
pt3dadd(210.5, -74, 54.5, 6.3)
pt3dadd(215.5, -74, 58.5, 6)
pt3dadd(220, -75, 56.5, 6)
pt3dadd(222, -75, 56.5, 6.3)
pt3dadd(225.5, -76.5, 49.5, 6.7)
pt3dadd(228.5, -79, 51, 6.7)
pt3dadd(231, -79, 53, 7.3)
pt3dadd(235, -82.5, 53, 6.3)
pt3dadd(238.5, -84.5, 53, 5.1)
pt3dadd(241, -86, 53, 5.3)
pt3dadd(243, -88, 54.5, 6.5)
pt3dadd(245, -89.5, 54.5, 7.3)
pt3dadd(248.5, -92, 54.5, 8.3)
}
dend[95] {pt3dclear()
pt3dadd(248.5, -92, 54.5, 8.3)
pt3dadd(249.5, -97.5, 56.5, 5.2)
pt3dadd(251.5, -100, 56.5, 4.3)
pt3dadd(252.5, -103, 56.5, 3.7)
pt3dadd(255, -104.5, 56.5, 3.7)
pt3dadd(256.5, -105.5, 56.5, 4.4)
pt3dadd(259.5, -106.5, 56.5, 3.8)
pt3dadd(261.5, -109, 56.5, 4.1)
pt3dadd(265, -113, 56.5, 3.7)
pt3dadd(267.5, -114, 56.5, 3.5)
pt3dadd(269, -117, 56.5, 3.7)
pt3dadd(269, -119, 56.5, 3.9)
pt3dadd(269.5, -120.5, 54.5, 3.2)
pt3dadd(271.5, -121.5, 54.5, 4.1)
pt3dadd(272.5, -122.5, 54.5, 4.6)
pt3dadd(274, -124, 54.5, 4.9)
pt3dadd(276, -127.5, 54.5, 2.3)
pt3dadd(276.5, -129, 54.5, 2.6)
pt3dadd(278, -131, 54.5, 4.1)
pt3dadd(281, -134, 54.5, 4.6)
pt3dadd(289.5, -140.5, 57.5, 4)
pt3dadd(291.5, -143, 57.5, 4.1)
pt3dadd(294, -145, 60.5, 5)
pt3dadd(295, -146.5, 60.5, 4)
pt3dadd(297.5, -148, 60.5, 3.6)
pt3dadd(299.5, -149.5, 60.5, 3.8)
pt3dadd(301, -150, 60.5, 4.6)
pt3dadd(304, -156, 60.5, 4.3)
pt3dadd(306, -156.5, 65, 3.7)
pt3dadd(307.5, -158.5, 63.5, 4.3)
pt3dadd(307, -160, 63.5, 5.1)
pt3dadd(307.5, -162.5, 63.5, 3.3)
pt3dadd(307, -165.5, 63.5, 4.4)
pt3dadd(307.5, -166.5, 63.5, 4.6)
pt3dadd(310, -168.5, 60.5, 4.1)
pt3dadd(311, -170, 60.5, 3.4)
pt3dadd(312.5, -170.5, 60.5, 3.2)
pt3dadd(314.5, -171.5, 60.5, 3.5)
pt3dadd(316, -173.5, 60.5, 4.1)
pt3dadd(315.5, -175, 60.5, 3.4)
pt3dadd(316.5, -178, 62, 4.3)
pt3dadd(316.5, -183, 60.5, 4.1)
pt3dadd(318, -185, 60.5, 4.1)
pt3dadd(320.5, -187, 63.5, 3.3)
pt3dadd(322, -187, 63.5, 3.3)
pt3dadd(323.5, -187, 63.5, 3.6)
pt3dadd(325, -187.5, 62, 3.1)
pt3dadd(327.5, -187.5, 62, 2.6)
pt3dadd(330.5, -188, 62, 2.1)
pt3dadd(333, -188, 66.5, 2.7)
pt3dadd(334, -188, 66.5, 4.1)
pt3dadd(336, -189, 66.5, 3.3)
pt3dadd(338.5, -191, 65, 3.1)
pt3dadd(339.5, -192, 65, 3.8)
pt3dadd(342, -192.5, 63.5, 4.1)
pt3dadd(345.5, -194.5, 63.5, 3.7)
pt3dadd(348.5, -195, 72.5, 4.4)
pt3dadd(352.5, -195, 72.5, 4.6)
pt3dadd(353, -198, 72.5, 4.6)
pt3dadd(354, -200, 71, 4.9)
pt3dadd(356, -201.5, 71, 4.7)
pt3dadd(357.5, -202, 71, 4.3)
pt3dadd(360, -203.5, 69.5, 3.2)
pt3dadd(362.5, -203.5, 68, 3.7)
pt3dadd(365.5, -203.5, 68, 3.8)
pt3dadd(365, -206.5, 68, 3.8)
pt3dadd(362.5, -207, 68, 3.8)
pt3dadd(364, -209, 72.5, 3.8)
pt3dadd(367, -210, 72.5, 3.6)
pt3dadd(370, -211.5, 78.5, 3.1)
pt3dadd(372.5, -212.5, 78.5, 3.3)
pt3dadd(376, -213.5, 78.5, 3.3)
pt3dadd(379, -214, 77, 2.8)
pt3dadd(382.5, -214, 78.5, 2.8)
pt3dadd(385.5, -214.5, 78.5, 3.3)
pt3dadd(387, -216, 78.5, 4.9)
pt3dadd(389.5, -218, 78.5, 3.5)
pt3dadd(391.5, -218, 78.5, 3.5)
pt3dadd(393.5, -219, 78.5, 3.1)
pt3dadd(397, -218.5, 77, 3.4)
pt3dadd(400.5, -221.5, 77, 3.4)
pt3dadd(402.5, -225, 75.5, 3.9)
pt3dadd(403.5, -226.5, 78.5, 3.8)
pt3dadd(406.5, -228, 78.5, 3.4)
pt3dadd(410.5, -230, 78.5, 3.3)
pt3dadd(414, -232, 78.5, 4)
pt3dadd(415.5, -234.5, 78.5, 3.7)
pt3dadd(419, -236.5, 78.5, 3.4)
pt3dadd(421, -238.5, 83, 3.2)
pt3dadd(426, -240, 81.5, 3.6)
pt3dadd(430, -241.5, 81.5, 3.5)
pt3dadd(433, -242, 81.5, 3.3)
pt3dadd(435, -242, 81.5, 2.9)
pt3dadd(437.5, -241, 81.5, 3.8)
pt3dadd(440, -241.5, 84.5, 3.8)
pt3dadd(440.5, -245.5, 84.5, 3.3)
pt3dadd(440, -247.5, 83, 3.8)
pt3dadd(439, -248, 83, 3.7)
pt3dadd(440, -252, 80, 3.1)
pt3dadd(440.5, -254, 80, 2.7)
pt3dadd(441, -254, 78.5, 2.5)
pt3dadd(443, -256, 83, 3)
pt3dadd(443, -257, 83, 3.2)
pt3dadd(445, -259.5, 83, 3.4)
pt3dadd(443, -262, 83, 3.8)
pt3dadd(443, -263, 83, 4.3)
}
dend[96] {pt3dclear()
pt3dadd(443, -263, 83, 4.3)
pt3dadd(445, -265.5, 84.5, 1.3)
pt3dadd(447, -268.5, 84.5, 1.3)
pt3dadd(449.5, -271.5, 90.5, 2.7)
pt3dadd(449.5, -272, 88.5, 3.1)
pt3dadd(449.5, -275, 88.5, 1.8)
pt3dadd(449.5, -275.5, 90.5, 2.2)
pt3dadd(449, -278, 90.5, 2.5)
pt3dadd(448.5, -280.5, 90.5, 2.7)
pt3dadd(451, -278, 90.5, 3.4)
pt3dadd(453, -278, 90.5, 3.4)
pt3dadd(454.5, -280.5, 90.5, 2.3)
pt3dadd(455, -281, 90.5, 2)
pt3dadd(456.5, -282, 90.5, 2.3)
pt3dadd(457.5, -284, 100.5, 2.3)
pt3dadd(458.5, -284, 100.5, 2.4)
pt3dadd(460, -285, 100.5, 2.4)
pt3dadd(463.5, -287.5, 102.5, 2.7)
pt3dadd(469.5, -293, 98.5, 1.4)
pt3dadd(471, -292.5, 98.5, 1.4)
pt3dadd(472, -291.5, 94.5, 1.7)
pt3dadd(475.5, -292, 94.5, 1)
pt3dadd(475, -293.5, 94.5, 1.6)
pt3dadd(475.5, -295.5, 101, 2.2)
pt3dadd(477.5, -295.5, 98.5, 3.2)
pt3dadd(480.5, -298.5, 99.5, 2)
pt3dadd(481, -298.5, 99.5, 1.8)
pt3dadd(482, -300, 101, 1.8)
pt3dadd(483.5, -301.5, 103.5, 1.7)
pt3dadd(485, -301, 106.5, 1.4)
pt3dadd(485, -303.5, 106.5, 1.2)
pt3dadd(485, -304.5, 103.5, 1.4)
pt3dadd(486.5, -304.5, 103.5, 1.7)
pt3dadd(487.5, -305.5, 103.5, 2.1)
pt3dadd(488, -307.5, 105, 2.7)
pt3dadd(489, -308, 105, 2.3)
pt3dadd(491, -309, 105, 1)
pt3dadd(493, -309.5, 105, 1.4)
pt3dadd(495, -308.5, 105, 1.4)
pt3dadd(496, -312, 105, 1.4)
pt3dadd(497, -313.5, 105, 1.6)
pt3dadd(498.5, -314.5, 105, 1.6)
pt3dadd(499.5, -315.5, 105, 1.6)
pt3dadd(501, -315.5, 105, 1.5)
pt3dadd(502, -315.5, 105, 2)
pt3dadd(505.5, -315.5, 105, 2)
pt3dadd(507, -315.5, 105, 1.2)
pt3dadd(508, -317, 106.5, 1)
pt3dadd(510, -317, 106.5, 1.1)
pt3dadd(510, -318, 102.5, 1.4)
pt3dadd(511.5, -318, 102.5, 2.1)
pt3dadd(514, -318, 102.5, 2.2)
pt3dadd(515.5, -318, 102.5, 2.5)
pt3dadd(517, -317.5, 103.5, 2.9)
pt3dadd(519, -319, 109, 2.9)
pt3dadd(519.5, -322, 109, 2.9)
pt3dadd(517, -319, 109, 2.9)
pt3dadd(518, -322, 109, 2.9)
pt3dadd(518, -324.5, 109, 2.9)
pt3dadd(519.5, -324.5, 109, 2.9)
pt3dadd(518.5, -327, 107.5, 2.5)
pt3dadd(518.5, -329.5, 111.5, 1.3)
pt3dadd(517.5, -331, 111.5, 1.8)
pt3dadd(518, -332.5, 117, 2.1)
pt3dadd(518, -336, 119.5, 2.1)
pt3dadd(517, -337.5, 114, 1.7)
}
dend[97] {pt3dclear()
pt3dadd(443, -263, 83, 4.3)
pt3dadd(441.5, -265.5, 83, 1.5)
pt3dadd(442, -267.5, 83, 1.5)
pt3dadd(442.5, -269, 83, 1.5)
}
}
proc shape3d_31() {
dend[97] { pt3dadd(441, -271.5, 83, 1.1)
pt3dadd(440.5, -272.5, 83, 1.1)
pt3dadd(440.5, -274, 83, 1.2)
pt3dadd(440.5, -276, 83, 1.1)
pt3dadd(442.5, -276, 84.5, 1.1)
pt3dadd(443.5, -276.5, 84.5, 1.1)
pt3dadd(443.5, -278.5, 81.5, 1.1)
pt3dadd(446, -277, 83.5, 1.3)
pt3dadd(447, -278.5, 85.5, 1)
pt3dadd(447.5, -280.5, 85.5, 1.8)
pt3dadd(448, -281, 85.5, 1.8)
pt3dadd(448, -283.5, 89.5, 2.1)
pt3dadd(447.5, -284.5, 89.5, 1.8)
pt3dadd(447.5, -287, 89.5, 1.5)
pt3dadd(448.5, -287.5, 89.5, 1.4)
pt3dadd(450, -288, 87.5, 1.4)
pt3dadd(451.5, -287, 89.5, 1.8)
pt3dadd(453, -284.5, 89.5, 1.8)
pt3dadd(452.5, -288.5, 89.5, 1.8)
pt3dadd(453.5, -289.5, 91.5, 1.6)
pt3dadd(455.5, -289.5, 91.5, 1.4)
pt3dadd(456.5, -290, 91.5, 1.4)
pt3dadd(456, -291.5, 91.5, 1.1)
pt3dadd(456, -293, 91.5, 1.1)
pt3dadd(456, -296, 93.5, 0.9)
pt3dadd(455, -300.5, 99, 1.1)
pt3dadd(457, -301, 100, 0.6)
pt3dadd(458, -302, 101.5, 0.8)
pt3dadd(456, -303, 101.5, 0.2)
pt3dadd(456, -305, 101.5, 0.2)
pt3dadd(456, -306, 101.5, 0.2)
pt3dadd(458, -308.5, 102.5, 0.2)
pt3dadd(458.5, -310, 102.5, 0.2)
pt3dadd(459, -312, 102.5, 1.8)
pt3dadd(461.5, -312, 101.5, 3.3)
pt3dadd(468.5, -316, 104, 3.4)
pt3dadd(475, -351.5, 113.5, 3.4)
pt3dadd(482.5, -353, 110.5, 2.1)
pt3dadd(484, -354, 113.5, 1.8)
pt3dadd(484.5, -357, 113.5, 1.8)
pt3dadd(482, -357, 114.5, 2.1)
pt3dadd(483.5, -352, 112, 2)
pt3dadd(484, -351, 114.5, 1.5)
pt3dadd(485, -348.5, 114.5, 1.9)
pt3dadd(486, -345.5, 114.5, 1.9)
pt3dadd(486, -342.5, 116, 2.1)
}
dend[98] {pt3dclear()
pt3dadd(248.5, -92, 54.5, 8.3)
pt3dadd(253.5, -91, 51, 3.8)
pt3dadd(257, -91, 51, 3.8)
pt3dadd(260, -90, 51, 4.2)
pt3dadd(263, -90, 51, 4.3)
pt3dadd(266.5, -90, 51, 4.1)
pt3dadd(269, -89, 51, 3.4)
pt3dadd(273, -87, 51, 3.4)
pt3dadd(276.5, -85, 51, 4.5)
pt3dadd(281, -82.5, 54.5, 4.5)
pt3dadd(284.5, -81.5, 54.5, 4.5)
pt3dadd(288, -81.5, 54.5, 4)
pt3dadd(291.5, -81.5, 54.5, 3.5)
pt3dadd(295, -80.5, 54.5, 3.7)
pt3dadd(298.5, -78, 54.5, 4.4)
pt3dadd(302.5, -75.5, 54.5, 4.6)
pt3dadd(307, -72.5, 54.5, 4.6)
pt3dadd(311, -71.5, 54.5, 4.6)
pt3dadd(315, -71.5, 54.5, 4.6)
pt3dadd(320, -71, 54.5, 6)
}
dend[99] {pt3dclear()
pt3dadd(320, -71, 54.5, 6)
pt3dadd(322.5, -73.5, 56.5, 3.4)
pt3dadd(325.5, -73.5, 51, 2.3)
pt3dadd(328.5, -76.5, 56.5, 2.1)
pt3dadd(331, -79.5, 53, 2)
pt3dadd(338.5, -82.5, 57.5, 5.4)
}
dend[100] {pt3dclear()
pt3dadd(338.5, -82.5, 57.5, 5.4)
pt3dadd(345, -82.5, 57.5, 2.9)
pt3dadd(349, -84.5, 47.5, 2.9)
pt3dadd(352.5, -85, 49, 3.5)
pt3dadd(357, -85.5, 49, 4.1)
pt3dadd(359, -86, 49, 4.1)
pt3dadd(361, -87, 49, 4)
pt3dadd(362.5, -87.5, 49, 3.3)
pt3dadd(366, -89, 49, 2.5)
pt3dadd(368, -89.5, 49, 2.7)
pt3dadd(371, -91, 47.5, 2.7)
pt3dadd(373.5, -93.5, 47.5, 2.9)
pt3dadd(376.5, -95, 47.5, 2.5)
pt3dadd(377.5, -96.5, 47.5, 1.9)
pt3dadd(379.5, -98.5, 49, 2.4)
pt3dadd(381, -101, 49, 2.5)
pt3dadd(381.5, -104, 49, 2.7)
pt3dadd(382.5, -107.5, 50.5, 2.8)
pt3dadd(384, -112, 50.5, 2.3)
pt3dadd(384.5, -113.5, 50.5, 2.1)
pt3dadd(385.5, -115, 50.5, 1.8)
pt3dadd(388, -117, 50.5, 1.6)
pt3dadd(388.5, -118, 50.5, 1.8)
pt3dadd(390.5, -122, 47.5, 1.6)
pt3dadd(393.5, -124.5, 47.5, 1.9)
pt3dadd(396, -125, 47.5, 2.5)
pt3dadd(397.5, -126.5, 47.5, 3.7)
pt3dadd(398.5, -128.5, 47.5, 3.7)
}
dend[101] {pt3dclear()
pt3dadd(398.5, -128.5, 47.5, 3.7)
pt3dadd(398.5, -123, 43, 0.2)
pt3dadd(396.5, -118.5, 47.5, 0.2)
pt3dadd(396.5, -111, 49, 0.1)
pt3dadd(391.5, -109, 49, 0.1)
pt3dadd(385, -106, 47.5, 0.1)
pt3dadd(381, -109.5, 50.5, 0.1)
pt3dadd(378, -113.5, 50.5, 0.1)
pt3dadd(377.5, -117.5, 50.5, 0.1)
pt3dadd(376.5, -122.5, 50.5, 0.1)
pt3dadd(376.5, -125, 50.5, 0.1)
pt3dadd(376.5, -130.5, 50.5, 0.1)
pt3dadd(372.5, -132, 50.5, 0.1)
pt3dadd(369, -134, 47.5, 0.1)
pt3dadd(365.5, -136.5, 50.5, 0.1)
pt3dadd(362, -138, 51.5, 0.1)
pt3dadd(359.5, -140, 53, 0.1)
pt3dadd(358, -141.5, 56, 1.2)
pt3dadd(358, -144, 56, 1.2)
pt3dadd(358.5, -146.5, 56, 1.2)
pt3dadd(361.5, -146.5, 56, 1.2)
pt3dadd(362.5, -146.5, 53, 1.2)
pt3dadd(365, -146, 53, 1.2)
pt3dadd(366.5, -146, 54.5, 0.9)
pt3dadd(366, -146.5, 40.5, 0.7)
pt3dadd(365.5, -148, 41.5, 0.7)
pt3dadd(369, -148, 41.5, 0.7)
pt3dadd(369, -150, 43, 0.4)
pt3dadd(371.5, -150, 39, 0.4)
pt3dadd(371.5, -151, 40.5, 0.4)
pt3dadd(371.5, -153, 40.5, 0.4)
pt3dadd(374, -153, 40.5, 0.4)
pt3dadd(376.5, -153.5, 40.5, 0.4)
pt3dadd(376.5, -154.5, 40.5, 0.4)
pt3dadd(380, -156, 40.5, 0.3)
pt3dadd(379.5, -155, 40.5, 0.3)
pt3dadd(381, -155, 40.5, 0.3)
pt3dadd(381, -152.5, 37.5, 0.3)
}
dend[102] {pt3dclear()
pt3dadd(398.5, -128.5, 47.5, 3.7)
pt3dadd(402, -131.5, 49, 1.5)
pt3dadd(405, -134, 50.5, 1.4)
pt3dadd(408, -136, 50.5, 1.4)
pt3dadd(409.5, -138.5, 40.5, 2)
pt3dadd(412.5, -140.5, 41.5, 2.2)
pt3dadd(414, -144, 41.5, 2.7)
pt3dadd(417.5, -146, 41.5, 2.9)
pt3dadd(419, -148.5, 41.5, 2.9)
pt3dadd(422, -149.5, 41.5, 2.9)
pt3dadd(425, -149.5, 41.5, 1.4)
pt3dadd(428, -151.5, 39, 1.4)
pt3dadd(431, -153, 37.5, 1.8)
pt3dadd(432, -155, 37.5, 1.8)
pt3dadd(434, -155, 37.5, 1.9)
pt3dadd(435, -157.5, 33, 1.7)
pt3dadd(436.5, -158, 34.5, 1.8)
pt3dadd(439, -158, 34.5, 1.6)
pt3dadd(440, -159.5, 34.5, 2.1)
pt3dadd(442, -160.5, 34.5, 1.2)
pt3dadd(443, -160.5, 34.5, 1.2)
pt3dadd(445, -164, 34.5, 1.3)
pt3dadd(444.5, -167, 34.5, 1)
pt3dadd(448, -168, 23.5, 2.5)
pt3dadd(450.5, -168.5, 20.5, 4.3)
pt3dadd(452.5, -169.5, 18, 3.7)
pt3dadd(454, -170, 18, 3.1)
pt3dadd(455.5, -170, 15, 2.2)
pt3dadd(457.5, -170, 12.5, 2.2)
pt3dadd(459, -170, 12.5, 1.6)
pt3dadd(461.5, -169.5, 9.5, 1.2)
pt3dadd(462.5, -169.5, 9.5, 1.2)
pt3dadd(464, -169.5, 9.5, 1.3)
pt3dadd(465, -170, 9.5, 2.1)
pt3dadd(467, -172, 9.5, 3.3)
pt3dadd(469.5, -172.5, 6.5, 3.3)
pt3dadd(470.5, -172.5, 6.5, 3.3)
pt3dadd(472.5, -173.5, 6.5, 3.3)
pt3dadd(475, -174, 4, 3.3)
}
dend[103] {pt3dclear()
pt3dadd(475, -174, 4, 3.3)
pt3dadd(476.5, -176.5, 1, 0.1)
pt3dadd(479, -177.5, 1, 0.1)
pt3dadd(480, -178, -4.5, 0.9)
pt3dadd(481, -179, -4.5, 0.6)
pt3dadd(483.5, -180, -4.5, 0.5)
pt3dadd(484.5, -182, -7, 0.5)
pt3dadd(486, -183.5, -7, 0.4)
pt3dadd(487, -185, -7, 1.1)
pt3dadd(490, -187, -7, 0.3)
pt3dadd(491, -187, -7, 0.3)
pt3dadd(492.5, -188, -10, 1.2)
pt3dadd(493.5, -188.5, -10, 1.3)
pt3dadd(495, -190, -4.5, 0.9)
pt3dadd(496, -190.5, -10, 0.3)
pt3dadd(497.5, -191.5, -1.5, 0.1)
pt3dadd(499.5, -193.5, -1.5, 0.1)
pt3dadd(499.5, -194.5, -1.5, 0.8)
pt3dadd(501, -195.5, -4.5, 1)
pt3dadd(501, -197.5, -4.5, 0.1)
pt3dadd(502, -197.5, -4.5, 0.1)
pt3dadd(503.5, -200, -4.5, 0.1)
pt3dadd(504.5, -201.5, -1.5, 1)
}
}
proc shape3d_32() {
dend[103] { pt3dadd(505, -203.5, -7, 0.1)
pt3dadd(506, -205.5, -12.5, 0.1)
}
dend[104] {pt3dclear()
pt3dadd(475, -174, 4, 3.3)
pt3dadd(476.5, -174, 1, 2.8)
pt3dadd(479, -175, 1, 2)
pt3dadd(480.5, -175, 1, 1.3)
pt3dadd(483, -175, 1, 1.5)
pt3dadd(483.5, -175, 1, 1.6)
pt3dadd(484.5, -175, 1, 1.7)
pt3dadd(485.5, -175.5, -1.5, 1.7)
pt3dadd(487.5, -176.5, -1.5, 1.7)
pt3dadd(489.5, -176.5, -1.5, 1.9)
pt3dadd(491, -177, -1.5, 1.9)
pt3dadd(493, -177, -1.5, 1.7)
pt3dadd(494.5, -177, -1.5, 1.7)
pt3dadd(496, -177, -1.5, 1.6)
pt3dadd(498, -176.5, -1.5, 1.6)
pt3dadd(500, -176.5, -4.5, 1.8)
pt3dadd(501.5, -176, -7, 2.2)
pt3dadd(504.5, -175.5, -7, 2.7)
pt3dadd(507, -175, -10, 2.1)
pt3dadd(508.5, -173.5, 1, 1.9)
pt3dadd(510, -173, 4, 1.3)
pt3dadd(513, -174, 1, 1.7)
pt3dadd(515.5, -174.5, 1, 2.4)
pt3dadd(518, -174.5, 1, 3.4)
pt3dadd(520, -174.5, 1, 3.8)
pt3dadd(523, -174.5, -4.5, 1.7)
pt3dadd(525.5, -174.5, -1.5, 1.2)
pt3dadd(527.5, -174, -4.5, 1.2)
pt3dadd(531, -173.5, -1.5, 1.3)
}
dend[105] {pt3dclear()
pt3dadd(338.5, -82.5, 57.5, 5.4)
pt3dadd(337.5, -86, 57.5, 2.6)
pt3dadd(338, -89, 49, 2)
}
dend[106] {pt3dclear()
pt3dadd(320, -71, 54.5, 6)
pt3dadd(324.5, -69, 56.5, 2.6)
pt3dadd(327, -67, 56.5, 2.7)
pt3dadd(327.5, -67, 56.5, 3)
pt3dadd(328.5, -64.5, 58.5, 1.8)
pt3dadd(331, -64.5, 56.5, 1.3)
pt3dadd(332.5, -64.5, 56.5, 1.3)
pt3dadd(333.5, -63, 56.5, 2.6)
pt3dadd(335, -63, 60, 3.7)
pt3dadd(338, -63, 60, 2.6)
pt3dadd(340.5, -61, 60, 1.8)
pt3dadd(343, -61, 60, 1.5)
pt3dadd(346, -61, 60, 1.7)
pt3dadd(348, -61, 62, 2.3)
pt3dadd(350.5, -62, 58.5, 1.9)
pt3dadd(353, -62, 58.5, 1.4)
pt3dadd(355.5, -62, 58.5, 1.4)
pt3dadd(356.5, -62, 58.5, 1.5)
pt3dadd(358, -62, 58.5, 1.5)
pt3dadd(360.5, -62, 58.5, 1.5)
pt3dadd(363, -63, 58.5, 2)
pt3dadd(365, -63, 58.5, 2.6)
pt3dadd(367.5, -62.5, 58.5, 3.1)
pt3dadd(371.5, -62.5, 58.5, 3.2)
pt3dadd(374.5, -63.5, 58.5, 2.7)
pt3dadd(376, -64, 56.5, 2.1)
pt3dadd(379, -64, 56.5, 1.8)
pt3dadd(381.5, -64, 56.5, 2.4)
pt3dadd(385.5, -64, 56.5, 2.3)
pt3dadd(388, -63, 54.5, 1.5)
pt3dadd(390, -61, 54.5, 1.5)
pt3dadd(393, -61.5, 56.5, 1.7)
pt3dadd(397, -61.5, 56.5, 1.9)
pt3dadd(399, -61.5, 56.5, 2.7)
pt3dadd(402, -60, 56.5, 3.2)
pt3dadd(404.5, -60, 56.5, 2.1)
pt3dadd(406.5, -60, 56.5, 1.6)
pt3dadd(410, -60, 56.5, 1.8)
pt3dadd(413.5, -59.5, 56.5, 2)
pt3dadd(415.5, -57, 56.5, 2)
pt3dadd(417.5, -57, 56.5, 2)
pt3dadd(421.5, -57.5, 56.5, 2)
pt3dadd(423.5, -56, 56.5, 2.1)
pt3dadd(426.5, -56, 56.5, 2.1)
pt3dadd(428.5, -56, 56.5, 1.8)
pt3dadd(433, -56, 56.5, 1.8)
pt3dadd(434.5, -56, 54.5, 1.8)
pt3dadd(437, -55.5, 54.5, 1.8)
pt3dadd(441.5, -53.5, 54.5, 1.5)
pt3dadd(443, -52, 54.5, 1.5)
pt3dadd(445.5, -51.5, 54.5, 1.5)
pt3dadd(450.5, -49, 54.5, 1.8)
pt3dadd(454, -47.5, 53, 1.5)
pt3dadd(456.5, -47.5, 53, 1)
pt3dadd(458, -49, 53, 0.8)
pt3dadd(460.5, -49, 53, 0.8)
pt3dadd(463, -49, 51, 0.8)
pt3dadd(466, -48.5, 51, 2.1)
pt3dadd(468.5, -48, 51, 3.3)
pt3dadd(471, -47.5, 51, 3.3)
pt3dadd(474.5, -46.5, 51, 1.7)
pt3dadd(477, -46.5, 51, 1.7)
pt3dadd(479.5, -46.5, 51, 2.9)
pt3dadd(482, -46, 51, 3.2)
pt3dadd(487, -46, 51, 3.2)
pt3dadd(489.5, -44, 49.5, 1.5)
pt3dadd(492.5, -44, 49.5, 1.4)
pt3dadd(495.5, -44, 49.5, 1.4)
pt3dadd(498.5, -44, 49.5, 1.4)
pt3dadd(501, -44, 49.5, 1.4)
pt3dadd(502, -44, 49.5, 1.9)
pt3dadd(503, -45, 49.5, 2.5)
pt3dadd(505, -45.5, 49.5, 3.4)
pt3dadd(506.5, -47.5, 49.5, 1.8)
pt3dadd(509, -47.5, 49.5, 1.8)
pt3dadd(510.5, -47.5, 49.5, 2.5)
pt3dadd(512.5, -47.5, 49.5, 3.4)
pt3dadd(515.5, -48.5, 49.5, 2.3)
pt3dadd(517.5, -48.5, 49.5, 1.9)
pt3dadd(520, -49, 49.5, 2.4)
pt3dadd(523, -49, 49.5, 2.3)
pt3dadd(525, -49.5, 51, 2.6)
pt3dadd(528.5, -50, 51, 2)
pt3dadd(531, -50, 51, 1.6)
pt3dadd(535, -51.5, 51, 1.6)
pt3dadd(538.5, -51.5, 51, 1.3)
pt3dadd(543.5, -51.5, 51, 1.3)
pt3dadd(546.5, -51, 51, 1.3)
pt3dadd(548, -50.5, 51, 1.6)
pt3dadd(550, -49, 51, 2.2)
pt3dadd(552, -48.5, 51, 2.2)
pt3dadd(555, -46.5, 51, 2.2)
pt3dadd(557, -45.5, 51, 1.7)
pt3dadd(558, -44, 51, 1.2)
pt3dadd(562, -42, 51, 1.5)
pt3dadd(564.5, -40, 51, 1.5)
pt3dadd(568.5, -38.5, 49.5, 1.2)
pt3dadd(570, -36.5, 47.5, 0.9)
pt3dadd(571.5, -36.5, 47.5, 0.9)
pt3dadd(574, -36, 53, 1.6)
pt3dadd(577, -36, 54.5, 2)
pt3dadd(579.5, -35, 54.5, 2.5)
pt3dadd(583.5, -35, 51, 2.8)
pt3dadd(587, -35.5, 53, 1.6)
pt3dadd(588.5, -35.5, 53, 1.2)
pt3dadd(591, -35.5, 53, 1.1)
pt3dadd(592.5, -35.5, 53, 1.7)
pt3dadd(595.5, -35.5, 53, 1.3)
pt3dadd(598.5, -34.5, 53, 1.4)
pt3dadd(600.5, -34.5, 53, 1.8)
pt3dadd(603.5, -34.5, 53, 1.8)
pt3dadd(605.5, -33, 53, 2.4)
pt3dadd(608.5, -33, 53, 3.2)
pt3dadd(611.5, -31.5, 53, 1.8)
pt3dadd(613.5, -31.5, 49.5, 1.2)
pt3dadd(618.5, -31.5, 49.5, 1.2)
pt3dadd(623, -31.5, 56.5, 1.2)
pt3dadd(628.5, -31.5, 56.5, 1.2)
pt3dadd(633, -31.5, 54.5, 1.2)
pt3dadd(633.5, -30, 54.5, 2)
pt3dadd(636, -28, 54.5, 2)
pt3dadd(639.5, -27.5, 54.5, 1.9)
pt3dadd(641.5, -26.5, 54.5, 1.6)
pt3dadd(643, -25, 54.5, 0.8)
pt3dadd(646, -25, 54.5, 1.5)
pt3dadd(649, -25.5, 54.5, 1.4)
pt3dadd(651, -26, 54.5, 1.6)
pt3dadd(655, -26, 54.5, 1)
pt3dadd(657, -25.5, 54.5, 0.7)
pt3dadd(659.5, -25.5, 58.5, 0.7)
pt3dadd(661, -24, 58.5, 1.1)
pt3dadd(662.5, -22.5, 56.5, 1.8)
pt3dadd(664.5, -22.5, 56.5, 2.5)
pt3dadd(666, -20.5, 58.5, 2)
pt3dadd(672, -17, 60, 1.6)
pt3dadd(673, -14, 60, 1.5)
pt3dadd(674.5, -14, 60, 1.5)
pt3dadd(674.5, -12, 60, 1.5)
pt3dadd(676, -12.5, 60, 1.7)
pt3dadd(677, -13, 60, 2.5)
pt3dadd(679.5, -11, 60, 1.6)
pt3dadd(682, -7, 60, 1.6)
pt3dadd(685, -7, 58.5, 1.6)
pt3dadd(686.5, -8, 64.5, 1.6)
pt3dadd(687.5, -8, 64.5, 1.8)
pt3dadd(690, -8, 61.5, 1.6)
pt3dadd(691, -6.5, 61.5, 1.6)
pt3dadd(693, -4.5, 61.5, 1.6)
pt3dadd(694, -2, 64.5, 1.2)
pt3dadd(695.5, -1, 63, 1.7)
pt3dadd(696, -3, 64.5, 1.7)
pt3dadd(697.5, -1.5, 64.5, 1.2)
pt3dadd(698, 0.5, 64.5, 1.2)
pt3dadd(699.5, 2.5, 66, 1.2)
pt3dadd(701, 3.5, 64.5, 1.9)
pt3dadd(702.5, 4.5, 66, 1.9)
pt3dadd(702.5, 5, 66, 1.8)
pt3dadd(702, 8, 72, 1.9)
pt3dadd(702.5, 9, 72, 2.1)
pt3dadd(703.5, 11.5, 72, 2.2)
pt3dadd(704.5, 10, 72, 1.9)
pt3dadd(706, 9.5, 72, 1.7)
pt3dadd(708.5, 10.5, 72, 1.6)
pt3dadd(711, 11, 72, 1.8)
pt3dadd(713.5, 11, 75, 1.3)
pt3dadd(715.5, 10.5, 75, 1.3)
}
}
proc shape3d_33() {
dend[106] { pt3dadd(722.5, 10.5, 78, 1.8)
pt3dadd(724, 10, 76.5, 1.2)
pt3dadd(725.5, 10, 84, 2.1)
pt3dadd(727, 9, 82.5, 1.2)
pt3dadd(727, 8.5, 84, 1.1)
pt3dadd(729.5, 7.5, 84, 1.1)
pt3dadd(731.5, 7, 84, 1.7)
pt3dadd(733.5, 3.5, 84, 2.5)
pt3dadd(735, 1.5, 84, 2.1)
pt3dadd(737, 1.5, 82.5, 1.2)
pt3dadd(738.5, 0.5, 82.5, 1.4)
pt3dadd(739.5, -0.5, 82.5, 1.6)
pt3dadd(742.5, -1, 82.5, 1.8)
pt3dadd(744, -1.5, 82.5, 1.4)
pt3dadd(746.5, -3, 91.5, 0.6)
pt3dadd(748.5, -3, 91.5, 0.7)
pt3dadd(751.5, -3.5, 91.5, 0.7)
pt3dadd(752.5, -3.5, 91.5, 1.3)
pt3dadd(752.5, -4, 91.5, 0.9)
pt3dadd(755.5, -3.5, 90, 0.6)
pt3dadd(759, -1.5, 90, 0.6)
pt3dadd(761, -1, 87, 0.6)
pt3dadd(762, -1.5, 88.5, 2.2)
pt3dadd(765, -1.5, 84, 0.6)
pt3dadd(768, 1.5, 88.5, 0.6)
pt3dadd(770.5, 1.5, 88.5, 0.6)
pt3dadd(775, 1, 88.5, 0.6)
pt3dadd(776.5, 1, 88.5, 0.6)
pt3dadd(777.5, -0.5, 85.5, 1.2)
pt3dadd(778.5, -1, 85.5, 0.7)
pt3dadd(780, -3.5, 87, 0.7)
pt3dadd(783.5, -4, 87, 1)
}
dend[107] {pt3dclear()
pt3dadd(49, -47, 26, 9.4)
pt3dadd(47.5, -53, 27.5, 5)
pt3dadd(46.5, -54.5, 30, 4.7)
pt3dadd(46.5, -56.5, 30, 4.9)
pt3dadd(45.5, -58, 31.5, 5.4)
pt3dadd(44.5, -59.5, 31.5, 4.9)
pt3dadd(43, -63.5, 33, 4.3)
pt3dadd(42.5, -65.5, 33, 4)
pt3dadd(41.5, -68, 33, 4.3)
pt3dadd(41.5, -70.5, 33, 4.3)
pt3dadd(40.5, -72.5, 33, 4.3)
pt3dadd(40.5, -73.5, 33, 4.3)
pt3dadd(39, -76, 33, 4)
pt3dadd(37.5, -78.5, 34.5, 4.7)
pt3dadd(37, -79, 34.5, 5.4)
pt3dadd(37, -81, 34.5, 6.8)
pt3dadd(34.5, -83, 34.5, 6.5)
pt3dadd(33, -87.5, 34.5, 6.5)
pt3dadd(34, -90, 34.5, 5.7)
pt3dadd(35, -93, 34.5, 5.2)
pt3dadd(35, -94, 34.5, 5.8)
pt3dadd(33.5, -95.5, 33, 4.6)
pt3dadd(31, -98, 33, 5)
pt3dadd(31, -100.5, 36, 4.1)
pt3dadd(31, -103.5, 36, 4.3)
pt3dadd(29.5, -107, 37.5, 4.3)
pt3dadd(29.5, -109.5, 37.5, 4.7)
pt3dadd(28.5, -112, 37.5, 4.8)
pt3dadd(28.5, -115, 37.5, 4.6)
pt3dadd(29.5, -117, 37.5, 5.4)
pt3dadd(28.5, -119.5, 37.5, 4.6)
pt3dadd(28.5, -122, 37.5, 4.6)
pt3dadd(27.5, -125, 37.5, 5.4)
pt3dadd(27.5, -128, 37.5, 6.7)
pt3dadd(27.5, -131, 37.5, 6.7)
pt3dadd(28.5, -133.5, 37.5, 5.7)
pt3dadd(29.5, -136.5, 37.5, 5.9)
pt3dadd(29.5, -139.5, 37.5, 5.9)
pt3dadd(29.5, -141.5, 37.5, 5.7)
pt3dadd(29.5, -144, 37.5, 5.4)
pt3dadd(29.5, -147.5, 39, 5.6)
pt3dadd(32.5, -148, 37.5, 5.6)
pt3dadd(32.5, -151, 39, 5.2)
pt3dadd(33.5, -154, 39, 4.9)
pt3dadd(35, -156, 39, 5)
pt3dadd(37, -156, 39, 5.2)
pt3dadd(38.5, -158, 39, 4.7)
pt3dadd(40.5, -161, 39, 5)
pt3dadd(41.5, -164, 39, 5.7)
pt3dadd(42.5, -168, 40, 6.5)
pt3dadd(44.5, -171, 43, 6.5)
pt3dadd(46.5, -174.5, 53, 5.8)
pt3dadd(49, -175.5, 54.5, 5.7)
pt3dadd(51, -179.5, 60, 4.9)
}
dend[108] {pt3dclear()
pt3dadd(51, -179.5, 60, 4.9)
pt3dadd(46, -179.5, 58, 1.6)
pt3dadd(42, -179.5, 58, 1.6)
pt3dadd(40.5, -180.5, 60, 1.6)
pt3dadd(39, -182, 60, 1.6)
pt3dadd(36, -184.5, 60, 1.6)
pt3dadd(34, -186, 60, 1.6)
pt3dadd(30.5, -187.5, 60, 1.6)
pt3dadd(28, -189.5, 60, 1.6)
pt3dadd(26, -190.5, 60, 1.6)
pt3dadd(23.5, -192, 60, 1.2)
pt3dadd(22, -192.5, 60, 1.2)
pt3dadd(22, -194.5, 60, 1.2)
pt3dadd(21, -196, 60, 1.2)
pt3dadd(19, -198, 60, 1.3)
pt3dadd(19, -199.5, 60, 1.3)
pt3dadd(17.5, -200.5, 60, 1.2)
pt3dadd(15.5, -200.5, 60, 1.3)
pt3dadd(12.5, -202, 65.5, 1.6)
pt3dadd(10, -205, 65.5, 1.6)
pt3dadd(7.5, -205, 67, 1.6)
pt3dadd(5, -205, 72.5, 1.2)
pt3dadd(2, -207, 70.5, 1.2)
pt3dadd(0, -208.5, 70.5, 1.4)
pt3dadd(-4.5, -211.5, 70.5, 1.5)
pt3dadd(-5.5, -214, 60, 0.1)
pt3dadd(-7, -215, 61.5, 0.1)
pt3dadd(-8.5, -214.5, 69, 0.9)
pt3dadd(-10.5, -213.5, 69, 0.9)
pt3dadd(-9, -215.5, 70.5, 0.9)
pt3dadd(-8, -216.5, 72, 0.9)
pt3dadd(-10.5, -217, 72, 0.9)
pt3dadd(-10.5, -219.5, 72, 0.9)
pt3dadd(-8, -218.5, 72, 1.1)
pt3dadd(-5.5, -217.5, 72, 1.4)
pt3dadd(-5, -220.5, 73.5, 1.4)
pt3dadd(-6.5, -222, 73.5, 1.8)
pt3dadd(-7.5, -221, 73.5, 1.9)
pt3dadd(-9.5, -221, 73.5, 1.4)
pt3dadd(-10.5, -221, 73.5, 1.3)
pt3dadd(-11.5, -219, 75, 1.1)
pt3dadd(-13, -218, 75, 1.2)
pt3dadd(-13.5, -221, 75, 0.9)
pt3dadd(-13.5, -222, 75, 1)
pt3dadd(-12.5, -223.5, 76.5, 1.6)
pt3dadd(-14.5, -224, 73.5, 1.6)
pt3dadd(-14, -225.5, 76.5, 2.5)
pt3dadd(-14.5, -227, 75, 1.5)
pt3dadd(-14, -229.5, 75, 1.2)
pt3dadd(-14, -231.5, 75, 1.2)
pt3dadd(-14, -233, 75, 1.2)
pt3dadd(-14.5, -234, 78, 1.2)
pt3dadd(-15, -237, 78, 1.4)
pt3dadd(-15, -237.5, 78, 1.7)
pt3dadd(-15, -239, 81, 2)
pt3dadd(-14.5, -241.5, 81, 2)
pt3dadd(-14, -241.5, 85.5, 2.1)
pt3dadd(-13.5, -245, 85.5, 1.4)
pt3dadd(-12, -245.5, 87, 1.7)
pt3dadd(-12, -247, 84, 1.6)
pt3dadd(-11, -249.5, 85.5, 1.3)
pt3dadd(-11, -251, 85.5, 1.4)
pt3dadd(-11, -252.5, 85.5, 1.6)
pt3dadd(-10, -254.5, 87, 1.3)
pt3dadd(-13, -257.5, 95, 1)
pt3dadd(-14.5, -259.5, 93, 0.7)
pt3dadd(-16, -261, 95, 1.2)
pt3dadd(-17.5, -263.5, 89, 1.1)
pt3dadd(-21, -265.5, 91, 1.1)
pt3dadd(-23.5, -265.5, 93, 0.9)
pt3dadd(-25.5, -267.5, 91, 0.9)
pt3dadd(-27.5, -269, 93, 1)
pt3dadd(-29.5, -270, 93, 1.1)
pt3dadd(-30.5, -271.5, 93, 1.3)
pt3dadd(-29.5, -273, 89, 1)
pt3dadd(-28, -273, 89, 1.2)
pt3dadd(-28.5, -275, 97, 0.9)
pt3dadd(-29.5, -276, 97, 1.5)
pt3dadd(-28.5, -278.5, 101, 1.9)
pt3dadd(-30.5, -278.5, 99, 0.9)
pt3dadd(-32, -280, 107, 0.6)
pt3dadd(-34, -282, 115, 0.6)
pt3dadd(-35, -283.5, 116.5, 2.4)
pt3dadd(-36, -289, 118, 1.9)
pt3dadd(-36.5, -291.5, 120.5, 1.2)
pt3dadd(-41, -294.5, 120.5, 1.6)
pt3dadd(-44, -296, 120.5, 1.8)
pt3dadd(-46, -296, 120.5, 1.7)
pt3dadd(-46, -292.5, 119, 1.7)
pt3dadd(-46, -292, 122, 1.3)
pt3dadd(-46, -288.5, 120.5, 0.1)
pt3dadd(-48.5, -291.5, 122, 0.1)
pt3dadd(-50.5, -295, 128.5, 0.1)
pt3dadd(-51.5, -294.5, 127, 0.1)
pt3dadd(-53.5, -292.5, 129.5, 0.1)
pt3dadd(-54.5, -293.5, 132.5, 0.1)
pt3dadd(-55, -294.5, 132.5, 0.1)
pt3dadd(-56, -296, 135, 0.1)
}
dend[109] {pt3dclear()
pt3dadd(-56, -296, 135, 0.1)
pt3dadd(-54.5, -298, 129.5, 0.2)
pt3dadd(-52.5, -298, 129.5, 0.2)
pt3dadd(-53, -298, 132.5, 0.2)
pt3dadd(-54, -300.5, 131, 0.2)
pt3dadd(-53.5, -300.5, 136.5, 0.2)
pt3dadd(-53.5, -304, 139, 2.8)
pt3dadd(-52, -303.5, 133.5, 2.4)
pt3dadd(-53.5, -306, 137.5, 1.6)
pt3dadd(-54, -306, 137.5, 0.6)
pt3dadd(-57, -302.5, 136.5, 0.6)
pt3dadd(-59.5, -302.5, 137.5, 0.6)
pt3dadd(-57.5, -306, 141.5, 0.8)
pt3dadd(-55.5, -308.5, 141.5, 0.6)
pt3dadd(-57.5, -310, 141.5, 0.4)
pt3dadd(-56.5, -312.5, 143, 0.4)
}
}
proc shape3d_34() {
dend[109] { pt3dadd(-59.5, -312, 152, 0.4)
pt3dadd(-60.5, -309, 143, 0.5)
pt3dadd(-65, -309, 144, 0.4)
}
dend[110] {pt3dclear()
pt3dadd(-56, -296, 135, 0.1)
pt3dadd(-59, -296, 136.5, 0.1)
pt3dadd(-63, -298, 131, 0.1)
pt3dadd(-66, -300.5, 136.5, 0.3)
pt3dadd(-69, -299, 133.5, 0.2)
}
dend[111] {pt3dclear()
pt3dadd(51, -179.5, 60, 4.9)
pt3dadd(54, -180, 60, 3.4)
pt3dadd(56, -180, 58, 3.8)
pt3dadd(57, -181, 58, 5.8)
pt3dadd(60, -183.5, 56.5, 3.3)
pt3dadd(61.5, -185.5, 56.5, 4.1)
pt3dadd(61.5, -187.5, 56.5, 4.6)
pt3dadd(62.5, -189, 63.5, 4.3)
pt3dadd(65, -189.5, 61.5, 3.5)
pt3dadd(67.5, -191, 61.5, 4)
pt3dadd(69, -192, 60, 4.1)
pt3dadd(71, -193, 60, 4.9)
pt3dadd(72.5, -194.5, 60, 5)
pt3dadd(74.5, -194.5, 60, 5)
pt3dadd(74.5, -196.5, 60, 5)
pt3dadd(77, -199.5, 60, 5)
pt3dadd(80, -200.5, 70.5, 4.6)
pt3dadd(83, -201.5, 67, 4.3)
pt3dadd(84.5, -202.5, 67, 4.9)
pt3dadd(85.5, -203, 67, 5.2)
pt3dadd(86.5, -205.5, 67, 6.3)
pt3dadd(89, -207.5, 67, 5.6)
pt3dadd(92, -209, 67, 4.6)
pt3dadd(93, -210, 67, 5.4)
pt3dadd(96.5, -211.5, 67, 5.1)
pt3dadd(99.5, -218, 67, 6.2)
pt3dadd(101.5, -221, 67, 6.1)
pt3dadd(104.5, -222, 63.5, 5.6)
pt3dadd(106, -228, 63.5, 5.6)
pt3dadd(107.5, -231.5, 63.5, 5.6)
pt3dadd(109, -234, 70.5, 4.7)
pt3dadd(110.5, -236.5, 72.5, 4.6)
pt3dadd(110.5, -239, 69, 4.6)
pt3dadd(111.5, -247, 67, 5.4)
pt3dadd(112.5, -250, 69, 5.7)
pt3dadd(112.5, -253.5, 69, 5.6)
pt3dadd(113, -257.5, 69, 4.9)
pt3dadd(113, -259.5, 69, 4.9)
pt3dadd(114, -263, 69, 4.9)
pt3dadd(115, -267, 69, 4.9)
pt3dadd(115.5, -270, 69, 4.4)
pt3dadd(116.5, -272, 69, 4.4)
pt3dadd(116.5, -275, 69, 4.9)
pt3dadd(116.5, -277.5, 69, 4.9)
pt3dadd(116.5, -279.5, 69, 4.6)
pt3dadd(118.5, -283, 67, 4.4)
pt3dadd(119.5, -286, 67, 4.3)
pt3dadd(121, -290, 67, 4.3)
pt3dadd(123, -292, 67, 5.9)
pt3dadd(124, -292.5, 67, 6.2)
pt3dadd(124.5, -296.5, 67, 6.2)
pt3dadd(124.5, -298, 67, 4.9)
pt3dadd(124.5, -300.5, 67, 4.6)
pt3dadd(124.5, -304, 67, 5)
pt3dadd(126, -305.5, 72.5, 4.8)
pt3dadd(127, -307, 72.5, 4.9)
pt3dadd(127, -311, 70.5, 4.9)
pt3dadd(127, -314, 70.5, 4.9)
pt3dadd(127, -316.5, 70.5, 4.9)
pt3dadd(125, -319.5, 72.5, 5.2)
pt3dadd(127, -323, 77, 3.6)
pt3dadd(129.5, -324, 77, 3.3)
pt3dadd(131, -324.5, 77, 3.3)
pt3dadd(132.5, -327.5, 77, 3.8)
pt3dadd(133.5, -331, 77, 3.8)
pt3dadd(135.5, -333.5, 77, 4)
pt3dadd(137, -335.5, 77, 4)
pt3dadd(137.5, -338.5, 77, 4)
pt3dadd(137.5, -340, 77, 3.4)
pt3dadd(137.5, -342.5, 77, 3.8)
pt3dadd(139.5, -345, 77, 4)
pt3dadd(141, -348, 77, 4)
pt3dadd(141.5, -351, 77, 4)
pt3dadd(138.5, -353, 78.5, 5.5)
pt3dadd(138.5, -357, 78.5, 5.5)
pt3dadd(139, -361.5, 78.5, 4.9)
pt3dadd(137.5, -364, 77, 4.1)
pt3dadd(137, -366.5, 77, 4.1)
pt3dadd(136.5, -369, 77, 5.3)
pt3dadd(136.5, -370.5, 77, 4.9)
pt3dadd(137.5, -373, 77, 4.4)
pt3dadd(140, -375.5, 83, 4)
pt3dadd(139.5, -377.5, 84.5, 4.3)
pt3dadd(137, -381.5, 86, 4)
pt3dadd(137.5, -385.5, 86, 4)
pt3dadd(139.5, -385.5, 86, 4.9)
pt3dadd(140.5, -388.5, 86, 5.8)
pt3dadd(140, -391.5, 86, 4.6)
pt3dadd(141, -394, 86, 3.4)
pt3dadd(140, -396.5, 86, 3.2)
pt3dadd(140, -399, 86, 3.1)
pt3dadd(139.5, -402, 86, 3.7)
pt3dadd(140, -404, 86, 4.6)
pt3dadd(141.5, -406, 86, 6.3)
pt3dadd(143.5, -406.5, 86, 5.8)
pt3dadd(144.5, -409.5, 86, 4)
pt3dadd(145, -411.5, 86, 5.2)
pt3dadd(145.5, -413.5, 86, 6.5)
}
dend[112] {pt3dclear()
pt3dadd(145.5, -413.5, 86, 6.5)
pt3dadd(150.5, -414, 89, 1.2)
pt3dadd(151, -414, 89, 1.2)
pt3dadd(154, -414.5, 89, 0.7)
pt3dadd(154.5, -417, 89, 1)
pt3dadd(156.5, -417.5, 89, 1.2)
pt3dadd(159.5, -417, 89, 0.9)
pt3dadd(160, -419, 89, 0.9)
pt3dadd(160.5, -420.5, 87.5, 0.9)
pt3dadd(162.5, -420.5, 87.5, 0.9)
pt3dadd(166.5, -419.5, 87.5, 0.7)
pt3dadd(168.5, -422.5, 87.5, 0.7)
pt3dadd(169.5, -423, 87.5, 0.9)
pt3dadd(170, -424, 87.5, 1.1)
pt3dadd(172, -425, 87.5, 1.8)
pt3dadd(173, -427.5, 87.5, 1.3)
pt3dadd(174.5, -428, 86, 0.7)
pt3dadd(175.5, -429.5, 86, 0.8)
pt3dadd(177, -430, 86, 1.3)
pt3dadd(179, -430.5, 86, 1.8)
pt3dadd(180.5, -432.5, 84.5, 1)
pt3dadd(182, -432, 84.5, 0.9)
pt3dadd(182, -433, 84.5, 0.8)
pt3dadd(184.5, -434.5, 84.5, 0.9)
pt3dadd(184.5, -436.5, 84.5, 1.3)
pt3dadd(186.5, -440, 84.5, 1.4)
pt3dadd(189.5, -440.5, 83, 1.4)
pt3dadd(190.5, -441, 83, 1.4)
pt3dadd(192, -442, 83, 1.5)
pt3dadd(192.5, -443, 83, 1.5)
pt3dadd(195, -443.5, 83, 0.5)
pt3dadd(196.5, -443, 83, 0.5)
pt3dadd(197, -445.5, 90.5, 1.2)
pt3dadd(196.5, -446.5, 89, 2)
pt3dadd(198, -449.5, 89, 0.8)
pt3dadd(200, -452, 89, 1.1)
pt3dadd(200.5, -453.5, 89, 1.4)
pt3dadd(203, -453, 89, 1.7)
pt3dadd(204.5, -452.5, 89, 1.7)
pt3dadd(206, -454, 89, 0.9)
pt3dadd(206.5, -455.5, 89, 1.4)
pt3dadd(209, -457.5, 89, 1.4)
pt3dadd(211, -456.5, 87.5, 1.2)
pt3dadd(213, -458, 95, 1.2)
pt3dadd(215, -460.5, 93.5, 1.3)
pt3dadd(216, -462.5, 93.5, 1.3)
pt3dadd(214, -464, 93.5, 0.6)
pt3dadd(215, -462.5, 93.5, 0.6)
pt3dadd(217.5, -461.5, 102.5, 1.7)
pt3dadd(219.5, -463, 105.5, 2.1)
pt3dadd(221, -464, 105.5, 1.9)
pt3dadd(222.5, -463.5, 105.5, 1.6)
pt3dadd(222, -465.5, 105.5, 1.6)
pt3dadd(223, -466.5, 105.5, 2.5)
pt3dadd(226, -467, 105.5, 0.6)
pt3dadd(228, -468, 104, 0.6)
pt3dadd(231.5, -467.5, 104, 0.6)
pt3dadd(235, -468.5, 104, 1.3)
pt3dadd(237.5, -470.5, 105.5, 0.8)
pt3dadd(241.5, -470.5, 115, 1.3)
pt3dadd(243, -471, 115, 0.7)
pt3dadd(244, -470.5, 115, 0.2)
pt3dadd(244.5, -468, 115, 0.2)
pt3dadd(245.5, -466, 119, 0.2)
pt3dadd(246, -466.5, 121, 0.3)
pt3dadd(247.5, -466.5, 119, 0.3)
pt3dadd(248.5, -464.5, 119, 0.3)
pt3dadd(249.5, -464.5, 121, 0.1)
pt3dadd(249.5, -466.5, 119, 0.1)
pt3dadd(252.5, -466.5, 119, 0.1)
pt3dadd(254, -466.5, 119, 0.1)
pt3dadd(255.5, -467.5, 117, 0.1)
pt3dadd(259.5, -467.5, 117, 0.1)
pt3dadd(259.5, -468.5, 117, 0.1)
pt3dadd(264, -470, 119, 0.1)
pt3dadd(265.5, -470, 121, 0.7)
pt3dadd(267, -470.5, 123, 1.5)
pt3dadd(269, -470.5, 121, 1.5)
pt3dadd(269.5, -472, 129, 1.2)
pt3dadd(271.5, -472.5, 119, 0.7)
pt3dadd(273, -472.5, 123, 1.1)
pt3dadd(274.5, -472, 123, 0.5)
pt3dadd(277, -472, 123, 0.5)
pt3dadd(279, -472.5, 123, 0.5)
pt3dadd(281, -473.5, 123, 0.5)
pt3dadd(281.5, -473.5, 123, 0.3)
pt3dadd(282.5, -475, 121, 0.2)
pt3dadd(283, -476, 121, 0.2)
pt3dadd(285, -476, 121, 0.2)
pt3dadd(285.5, -476.5, 121, 0.2)
pt3dadd(286, -476, 121, 0.2)
pt3dadd(288.5, -476, 121, 0.6)
pt3dadd(290, -476.5, 121, 0.6)
pt3dadd(290, -477, 121, 0.6)
}
}
proc shape3d_35() {
dend[112] { pt3dadd(291.5, -479.5, 121, 0.7)
pt3dadd(294, -478.5, 121, 0.4)
pt3dadd(296, -478.5, 127, 0.4)
pt3dadd(298.5, -480, 127, 0.8)
}
dend[113] {pt3dclear()
pt3dadd(145.5, -413.5, 86, 6.5)
pt3dadd(144, -418.5, 86, 3.5)
pt3dadd(142, -422, 86, 4.3)
pt3dadd(141.5, -424.5, 86, 4.9)
pt3dadd(140.5, -428, 86, 4.9)
pt3dadd(141, -429.5, 86, 4.6)
pt3dadd(142, -433.5, 86, 4.9)
pt3dadd(141.5, -437.5, 86, 5.2)
pt3dadd(141.5, -441.5, 86, 5.4)
pt3dadd(144, -443.5, 86, 5.5)
pt3dadd(143, -449, 86, 4.9)
pt3dadd(143.5, -453, 86, 4.5)
pt3dadd(144, -457, 86, 5.2)
pt3dadd(146, -459, 86, 5.2)
pt3dadd(148, -463.5, 86, 4.7)
pt3dadd(145.5, -469, 86, 4.7)
pt3dadd(145.5, -472, 86, 5.3)
pt3dadd(145.5, -476, 86, 6.3)
pt3dadd(145, -478.5, 86, 6.4)
}
dend[114] {pt3dclear()
pt3dadd(145, -478.5, 86, 6.4)
pt3dadd(140.5, -481.5, 87.5, 1.8)
pt3dadd(137, -482.5, 87.5, 1.8)
pt3dadd(135.5, -485, 87.5, 1.8)
pt3dadd(131.5, -486, 86, 2.1)
pt3dadd(129, -487.5, 86, 1.8)
pt3dadd(126.5, -489, 86, 1.9)
pt3dadd(124.5, -492.5, 86, 1.9)
pt3dadd(123.5, -493, 86, 1.9)
pt3dadd(121.5, -494.5, 86, 1.9)
pt3dadd(121, -497, 86, 2.4)
pt3dadd(121.5, -497.5, 86, 1.9)
pt3dadd(120.5, -499, 86, 1.8)
pt3dadd(120.5, -500.5, 86, 1.9)
pt3dadd(120, -502.5, 86, 1.9)
pt3dadd(119, -504, 86, 1.7)
pt3dadd(116.5, -506, 92, 1.5)
pt3dadd(117, -508.5, 92, 1.5)
pt3dadd(116.5, -509.5, 92, 1.4)
pt3dadd(116.5, -511.5, 92, 1.6)
pt3dadd(115, -512.5, 92, 1.6)
pt3dadd(116.5, -514, 96, 1.6)
pt3dadd(116.5, -516.5, 96, 2.3)
pt3dadd(115.5, -519, 96, 1.4)
pt3dadd(116.5, -520.5, 98, 1.7)
pt3dadd(116.5, -522, 103.5, 1)
pt3dadd(116.5, -524.5, 103.5, 1.2)
pt3dadd(116.5, -526.5, 103.5, 0.9)
pt3dadd(114, -528.5, 108.5, 1.1)
pt3dadd(113, -530.5, 108.5, 1.8)
pt3dadd(111.5, -534, 108.5, 1.4)
pt3dadd(111.5, -536.5, 110, 2.1)
pt3dadd(110, -538.5, 110, 2.8)
pt3dadd(110.5, -542.5, 110, 1.6)
pt3dadd(109.5, -543, 110, 2.4)
pt3dadd(107, -546.5, 110, 2.5)
}
dend[115] {pt3dclear()
pt3dadd(107, -546.5, 110, 2.5)
pt3dadd(104.5, -547, 103.5, 0.1)
pt3dadd(100.5, -546.5, 110, 0.1)
pt3dadd(100.5, -548, 110, 0.3)
pt3dadd(98.5, -550.5, 110, 0.3)
pt3dadd(96.5, -552, 111.5, 0.3)
pt3dadd(97, -552, 112.5, 1.6)
pt3dadd(95.5, -554, 114, 2.5)
pt3dadd(93.5, -556, 114, 1.5)
pt3dadd(90.5, -556, 112.5, 0.7)
pt3dadd(94.5, -560.5, 112.5, 1.2)
pt3dadd(92, -562, 112.5, 1.2)
pt3dadd(90, -563, 112.5, 2.2)
pt3dadd(87.5, -563.5, 112.5, 1.4)
pt3dadd(84.5, -563.5, 120.5, 1.9)
pt3dadd(82, -563.5, 120.5, 1.9)
pt3dadd(82, -567, 122, 2.1)
pt3dadd(81.5, -570, 120.5, 2)
pt3dadd(80.5, -570, 120.5, 0.2)
pt3dadd(79.5, -572.5, 128.5, 1.3)
pt3dadd(78.5, -575, 128.5, 2)
pt3dadd(77, -577.5, 130, 4.3)
pt3dadd(73.5, -581, 131, 1.5)
pt3dadd(73, -584, 131, 0.9)
pt3dadd(73, -586, 131, 0.1)
pt3dadd(73, -587.5, 131, 1.3)
pt3dadd(72.5, -589, 130, 0.1)
}
dend[116] {pt3dclear()
pt3dadd(107, -546.5, 110, 2.5)
pt3dadd(110, -547.5, 108.5, 1.5)
pt3dadd(110.5, -549, 108.5, 1.5)
pt3dadd(112, -553, 108.5, 1.6)
pt3dadd(112, -554.5, 108.5, 1.6)
pt3dadd(111, -557.5, 115.5, 1.6)
pt3dadd(109.5, -561.5, 115.5, 1.2)
pt3dadd(107.5, -561.5, 115.5, 1.2)
pt3dadd(103.5, -561.5, 116.5, 1.2)
pt3dadd(103, -565.5, 120.5, 1.9)
pt3dadd(102.5, -568, 119.5, 1.5)
pt3dadd(100.5, -571, 122, 1.3)
pt3dadd(99.5, -573, 122, 1.3)
pt3dadd(99.5, -576, 122, 1.1)
pt3dadd(100, -577.5, 120.5, 1.6)
pt3dadd(100, -579, 120.5, 1.5)
pt3dadd(98.5, -583, 122, 1.5)
pt3dadd(96.5, -585.5, 122, 1.5)
pt3dadd(96, -588, 122, 1.5)
pt3dadd(94.5, -592, 115.5, 2)
pt3dadd(93, -596.5, 116.5, 2.2)
pt3dadd(91, -598, 118, 1.4)
pt3dadd(89, -598.5, 118, 1.4)
pt3dadd(88.5, -601.5, 118, 1.7)
pt3dadd(88.5, -604, 118, 1.6)
pt3dadd(87, -606, 124.5, 1.6)
pt3dadd(84.5, -607, 126, 2.3)
pt3dadd(83, -610, 135, 3.6)
pt3dadd(80.5, -612.5, 122, 1.9)
pt3dadd(80, -615.5, 122, 0.6)
pt3dadd(80.5, -617.5, 122, 0.3)
pt3dadd(80.5, -619, 122, 0.3)
pt3dadd(82, -620, 122, 0.2)
pt3dadd(81.5, -621.5, 130, 2.9)
pt3dadd(79.5, -624.5, 131, 2.2)
pt3dadd(79, -627.5, 132.5, 1.7)
pt3dadd(78, -629.5, 132.5, 1.7)
pt3dadd(76, -633.5, 130, 2.1)
pt3dadd(74.5, -636.5, 130, 1.5)
pt3dadd(73.5, -639.5, 131, 1.9)
pt3dadd(72.5, -643, 135, 1.5)
pt3dadd(71, -646, 136.5, 1.1)
pt3dadd(70, -650.5, 136.5, 1.5)
pt3dadd(70, -653.5, 136.5, 1.5)
pt3dadd(69.5, -657.5, 136.5, 1.8)
pt3dadd(68.5, -660, 136.5, 1.8)
pt3dadd(67.5, -663.5, 136.5, 1.7)
pt3dadd(65.5, -665.5, 136.5, 1.7)
pt3dadd(63, -668, 137.5, 1.7)
pt3dadd(63, -670, 139, 2.5)
pt3dadd(60, -672.5, 139, 2.5)
pt3dadd(59, -675.5, 139, 1.9)
pt3dadd(58, -677, 139, 1.5)
pt3dadd(55, -677, 139, 1.4)
pt3dadd(54.5, -677, 137.5, 0.8)
pt3dadd(53, -677, 139, 1.1)
pt3dadd(51.5, -678, 143, 1.4)
pt3dadd(51, -679.5, 144.5, 0.7)
pt3dadd(49.5, -681.5, 131, 1.6)
}
dend[117] {pt3dclear()
pt3dadd(145, -478.5, 86, 6.4)
pt3dadd(149, -480.5, 84.5, 3.6)
pt3dadd(149.5, -482, 84.5, 3.8)
pt3dadd(151, -485, 84.5, 3.2)
pt3dadd(152, -486.5, 87.5, 2.1)
pt3dadd(153, -488, 87.5, 2.8)
pt3dadd(154, -492, 87.5, 3.4)
pt3dadd(154.5, -494, 92, 3.4)
pt3dadd(156, -494.5, 90.5, 3.4)
pt3dadd(157.5, -499, 92, 3.2)
pt3dadd(158.5, -502, 84, 2.2)
pt3dadd(160, -504.5, 84, 2.2)
pt3dadd(160, -506, 86, 2.4)
pt3dadd(160.5, -508.5, 86, 2.4)
pt3dadd(161.5, -509, 86, 2.4)
pt3dadd(162, -511.5, 94, 3.5)
pt3dadd(161, -513.5, 94, 2.3)
pt3dadd(161, -516.5, 94, 2.7)
pt3dadd(160.5, -518.5, 82, 2.7)
pt3dadd(160, -521, 86, 2.7)
pt3dadd(160, -523.5, 86, 2.7)
pt3dadd(160.5, -524, 84, 1.3)
pt3dadd(161.5, -525.5, 84, 2.5)
pt3dadd(160.5, -528, 84, 2.8)
pt3dadd(159.5, -529, 90, 1.8)
pt3dadd(160, -532, 90, 1.7)
pt3dadd(160.5, -533.5, 90, 1.8)
pt3dadd(161, -534.5, 90, 1.5)
pt3dadd(161, -540.5, 90, 2.4)
pt3dadd(162, -543.5, 88.5, 2.4)
pt3dadd(162, -547, 88.5, 2.5)
pt3dadd(163.5, -548.5, 87.5, 1.6)
pt3dadd(164.5, -551.5, 87.5, 2.6)
pt3dadd(162, -553.5, 87.5, 2.9)
pt3dadd(164, -556.5, 87.5, 3.3)
pt3dadd(165.5, -559, 87.5, 3.6)
pt3dadd(167, -561.5, 87.5, 3.7)
pt3dadd(163, -561.5, 87.5, 3.7)
pt3dadd(163.5, -566, 92.5, 2.7)
pt3dadd(165.5, -567.5, 91, 2.8)
pt3dadd(165.5, -571.5, 91, 2.9)
pt3dadd(164.5, -575.5, 91, 3.4)
pt3dadd(164.5, -578, 91, 2.8)
pt3dadd(164.5, -582.5, 94, 2.7)
pt3dadd(164.5, -585, 94, 2.7)
pt3dadd(164.5, -588.5, 94, 2.7)
pt3dadd(165, -591.5, 100.5, 2.8)
pt3dadd(165, -594, 100.5, 3.4)
pt3dadd(165.5, -595, 100.5, 2.7)
pt3dadd(166, -598, 99, 2.4)
pt3dadd(167, -602, 99, 2.5)
pt3dadd(168.5, -603.5, 99, 2.6)
pt3dadd(168.5, -606.5, 102, 6.3)
}
dend[118] {pt3dclear()
pt3dadd(168.5, -606.5, 102, 6.3)
pt3dadd(165.5, -608, 99, 0.8)
}
}
proc shape3d_36() {
dend[118] { pt3dadd(163, -609.5, 100.5, 0.6)
pt3dadd(162, -612.5, 100.5, 0.7)
pt3dadd(162.5, -614.5, 102, 1.6)
pt3dadd(161.5, -615.5, 102, 1.9)
pt3dadd(161, -615.5, 103, 1.4)
pt3dadd(160, -617.5, 103, 0.3)
pt3dadd(160, -618, 103, 0.3)
pt3dadd(161, -620.5, 103, 2.9)
pt3dadd(161.5, -621, 119, 1.1)
pt3dadd(162.5, -623, 119, 0.8)
pt3dadd(162.5, -624.5, 117.5, 0.8)
pt3dadd(165, -625, 116, 0.8)
pt3dadd(162.5, -628, 108.5, 0.7)
}
dend[119] {pt3dclear()
pt3dadd(168.5, -606.5, 102, 6.3)
pt3dadd(169, -606.5, 100.5, 6.3)
pt3dadd(171.5, -607.5, 100.5, 3.8)
pt3dadd(174, -607.5, 102, 0.8)
pt3dadd(174.5, -609, 102, 1.5)
pt3dadd(177.5, -612, 100.5, 2)
pt3dadd(180, -611.5, 99, 1.8)
pt3dadd(182.5, -611.5, 99, 1.7)
pt3dadd(184.5, -611.5, 99, 2.6)
pt3dadd(186.5, -612.5, 99, 2.6)
pt3dadd(189.5, -612, 100.5, 2.3)
pt3dadd(192.5, -612, 100.5, 1.4)
pt3dadd(193.5, -613, 100.5, 1.4)
pt3dadd(196, -613.5, 100.5, 1.4)
pt3dadd(197.5, -614, 100.5, 1.6)
pt3dadd(199, -618, 100.5, 2)
pt3dadd(198.5, -618, 103, 2)
pt3dadd(198, -619.5, 100.5, 2.3)
pt3dadd(198, -621.5, 100.5, 1.8)
pt3dadd(198.5, -624, 100.5, 1.6)
pt3dadd(199.5, -627, 99, 2.1)
pt3dadd(200.5, -629, 102, 2)
pt3dadd(202, -631, 102, 2.2)
pt3dadd(203, -632.5, 105.5, 2.5)
pt3dadd(203.5, -634.5, 104.5, 1.7)
pt3dadd(203, -636.5, 104.5, 1.7)
pt3dadd(203, -638, 104.5, 1.4)
pt3dadd(203.5, -640, 104.5, 2)
pt3dadd(204.5, -641.5, 104.5, 2)
pt3dadd(205, -643.5, 104.5, 2)
pt3dadd(205, -644.5, 104.5, 1.7)
pt3dadd(206, -646.5, 104.5, 2)
pt3dadd(206, -648.5, 104.5, 2)
pt3dadd(207.5, -652, 104.5, 1.9)
pt3dadd(207.5, -653, 104.5, 0.7)
pt3dadd(210, -654.5, 103, 0.7)
pt3dadd(210, -656.5, 103, 1.1)
pt3dadd(212, -661.5, 103, 1.3)
pt3dadd(212, -664, 103, 1.3)
pt3dadd(213, -666.5, 103, 1.1)
pt3dadd(213, -668, 104.5, 1.6)
pt3dadd(214, -671, 104.5, 1.8)
pt3dadd(215, -672.5, 104.5, 1.9)
pt3dadd(218, -677, 104.5, 1.1)
pt3dadd(218, -679, 104.5, 1.5)
pt3dadd(217, -681.5, 104.5, 1.8)
pt3dadd(217, -684, 104.5, 2.2)
pt3dadd(217.5, -686, 105.5, 2)
pt3dadd(217.5, -691, 105.5, 2.1)
pt3dadd(219, -691, 105.5, 3.4)
pt3dadd(222, -692.5, 104.5, 1.8)
pt3dadd(223, -694, 103, 1.5)
pt3dadd(224, -696.5, 104.5, 1.5)
pt3dadd(224, -700, 104.5, 1.3)
pt3dadd(227, -700, 104.5, 1.4)
pt3dadd(228, -700, 104.5, 1.8)
pt3dadd(230, -702.5, 104.5, 2.2)
pt3dadd(233.5, -703.5, 103, 1.4)
pt3dadd(236.5, -707, 103, 2.3)
pt3dadd(238, -709.5, 104.5, 1.9)
pt3dadd(240, -711.5, 104.5, 1.8)
pt3dadd(240.5, -714, 104.5, 1.5)
pt3dadd(242, -716.5, 104.5, 1.2)
pt3dadd(244, -719, 104.5, 1.6)
pt3dadd(245.5, -721, 104.5, 1.3)
pt3dadd(247, -723.5, 104.5, 1.4)
pt3dadd(249, -726, 99, 1.5)
pt3dadd(250.5, -727.5, 99, 2.1)
pt3dadd(251.5, -730, 99, 2.8)
pt3dadd(253.5, -732.5, 99, 2.8)
pt3dadd(252.5, -734.5, 99, 2.3)
pt3dadd(253, -736.5, 99, 1.2)
pt3dadd(253, -739, 99, 1.2)
pt3dadd(254, -740.5, 99, 1)
pt3dadd(256, -741.5, 99, 1.6)
pt3dadd(257.5, -742, 99, 2.7)
pt3dadd(260, -744, 99, 1.6)
pt3dadd(260, -746.5, 99, 1.2)
pt3dadd(262.5, -749.5, 99, 0.7)
pt3dadd(265.5, -751.5, 99, 0.5)
pt3dadd(268, -753.5, 99, 0.5)
pt3dadd(268.5, -757, 99, 0.4)
pt3dadd(270, -759.5, 99, 0.4)
pt3dadd(271, -762.5, 99, 1)
pt3dadd(272, -764.5, 99, 0.9)
pt3dadd(273, -766.5, 102, 1.3)
pt3dadd(276, -769.5, 105.5, 1.3)
pt3dadd(279, -770.5, 107, 2.5)
}
dend[120] {pt3dclear()
pt3dadd(279, -770.5, 107, 2.5)
pt3dadd(283, -772, 100.5, 0.1)
pt3dadd(287.5, -772, 100.5, 0.1)
pt3dadd(289.5, -773.5, 102, 0.1)
pt3dadd(293, -774.5, 102, 0.1)
pt3dadd(295, -774.5, 102, 0.1)
pt3dadd(297.5, -774.5, 102, 0.1)
pt3dadd(297.5, -773.5, 102, 0.1)
pt3dadd(300.5, -773, 102, 0.1)
pt3dadd(303.5, -774.5, 102, 0.1)
pt3dadd(305.5, -777.5, 94, 0.1)
}
dend[121] {pt3dclear()
pt3dadd(279, -770.5, 107, 2.5)
pt3dadd(281.5, -775.5, 102, 0.7)
pt3dadd(283.5, -777.5, 100.5, 1.6)
pt3dadd(286, -779, 103, 1.4)
pt3dadd(289, -781.5, 100.5, 1)
pt3dadd(290.5, -784, 100.5, 1.7)
pt3dadd(292.5, -785.5, 103, 1.7)
pt3dadd(295, -787, 103, 1.2)
pt3dadd(296.5, -789, 103, 0.6)
pt3dadd(299, -790, 104.5, 0.9)
pt3dadd(302, -790.5, 104.5, 1)
pt3dadd(303, -791, 104.5, 1.2)
pt3dadd(305.5, -792.5, 104.5, 1.1)
pt3dadd(307.5, -794, 104.5, 1.1)
pt3dadd(309, -793, 104.5, 1.1)
pt3dadd(309.5, -793, 104.5, 0.7)
pt3dadd(311, -793, 104.5, 0.4)
pt3dadd(314, -793, 104.5, 0.3)
pt3dadd(316, -793, 102, 0.2)
pt3dadd(320.5, -793, 100.5, 1)
pt3dadd(322, -793, 100.5, 1.5)
pt3dadd(325, -793, 100.5, 1.5)
pt3dadd(327.5, -794.5, 100.5, 1.5)
pt3dadd(331, -797, 100.5, 1.7)
pt3dadd(333, -799, 100.5, 1.7)
pt3dadd(336, -800.5, 100.5, 1.7)
pt3dadd(337.5, -803.5, 99, 0.9)
pt3dadd(337.5, -804.5, 99, 0.9)
pt3dadd(339, -807.5, 99, 1)
pt3dadd(340, -810, 99, 1)
pt3dadd(342, -813.5, 102, 1.5)
pt3dadd(344, -813.5, 102, 1.5)
pt3dadd(345.5, -815.5, 102, 1.4)
pt3dadd(347.5, -817, 100.5, 1.3)
pt3dadd(349, -818.5, 103, 1.4)
pt3dadd(351.5, -821, 103, 1.4)
pt3dadd(352.5, -822, 104.5, 2)
pt3dadd(354.5, -825.5, 104.5, 2.5)
pt3dadd(355, -827.5, 104.5, 2.4)
pt3dadd(357.5, -829.5, 104.5, 2.2)
pt3dadd(359, -831, 104.5, 2.6)
pt3dadd(359.5, -834, 105.5, 4)
}
dend[122] {pt3dclear()
pt3dadd(359.5, -834, 105.5, 4)
pt3dadd(358.5, -835.5, 104.5, 1.1)
pt3dadd(357, -839, 104.5, 0.7)
}
dend[123] {pt3dclear()
pt3dadd(359.5, -834, 105.5, 4)
pt3dadd(364, -837.5, 100.5, 1.4)
pt3dadd(366, -837.5, 100.5, 1.4)
pt3dadd(367.5, -837.5, 100.5, 2.4)
pt3dadd(370.5, -837.5, 104.5, 1.7)
pt3dadd(372, -839.5, 104.5, 1.4)
pt3dadd(373.5, -839.5, 109.5, 1.4)
pt3dadd(375, -840, 109.5, 1.2)
pt3dadd(375, -841.5, 109.5, 1.2)
pt3dadd(377.5, -841.5, 103, 0.4)
pt3dadd(377.5, -842.5, 104.5, 0.4)
pt3dadd(377.5, -845.5, 112.5, 0.4)
}
dend[124] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 11.7)
pt3dadd(4.5, 10.5, -7.5, 11.7)
pt3dadd(3, 6.5, -4, 13.2)
}
dend[125] {pt3dclear()
pt3dadd(3, 6.5, -4, 13.2)
pt3dadd(4.5, 1, -3, 6.4)
pt3dadd(4.5, -3, -3, 6.4)
pt3dadd(4.5, -6, -2, 5.1)
pt3dadd(4.5, -8.5, -2, 4.4)
pt3dadd(4.5, -12, -2, 5.1)
pt3dadd(5, -14.5, -4, 4.9)
pt3dadd(5, -16.5, -4, 4.9)
pt3dadd(5, -19, -3, 3.9)
pt3dadd(5, -23, -5.5, 3.8)
pt3dadd(5, -26.5, -5.5, 4)
pt3dadd(3, -30.5, -5, 4.6)
pt3dadd(3, -34, -5, 4.8)
pt3dadd(2.5, -41, -8.5, 5)
pt3dadd(2.5, -48, -11, 5)
pt3dadd(1, -52.5, -12, 4.3)
pt3dadd(1, -56, -9.5, 4.5)
pt3dadd(1.5, -60.5, -11, 4.6)
pt3dadd(3.5, -66, -11, 4.6)
pt3dadd(3.5, -69.5, -13, 4.1)
pt3dadd(4, -73.5, -13, 4)
pt3dadd(4.5, -76, -14, 3.6)
pt3dadd(5.5, -77, -14, 3.9)
pt3dadd(10, -87, -14, 3.8)
pt3dadd(11.5, -87, -15.5, 2.5)
pt3dadd(14, -89, -15.5, 2.5)
pt3dadd(16.5, -91, -15.5, 3.2)
pt3dadd(17.5, -93, -15.5, 3.6)
}
}
proc shape3d_37() {
dend[125] { pt3dadd(19, -97.5, -16.5, 4)
pt3dadd(17, -104, -16.5, 4.3)
pt3dadd(17, -106, -15.5, 4.9)
pt3dadd(17, -109.5, -15, 5.9)
pt3dadd(17, -112, -15, 6.3)
pt3dadd(17.5, -114.5, -15, 5.6)
pt3dadd(19, -117, -16.5, 5.2)
pt3dadd(20, -121, -16.5, 4)
pt3dadd(21, -122, -16.5, 3.2)
pt3dadd(21.5, -122, -17.5, 2.6)
pt3dadd(23.5, -124.5, -17.5, 3.1)
pt3dadd(24.5, -126.5, -17.5, 3.7)
pt3dadd(27, -129.5, -17.5, 3.7)
pt3dadd(28.5, -131.5, -19, 3.3)
pt3dadd(30.5, -133, -18.5, 3.3)
pt3dadd(33, -135.5, -19, 3.3)
pt3dadd(34, -139, -19.5, 3.3)
pt3dadd(36.5, -140, -18.5, 3.8)
pt3dadd(38.5, -143.5, -20.5, 3.8)
pt3dadd(40, -145.5, -20.5, 3.4)
pt3dadd(42.5, -146.5, -19.5, 4.9)
pt3dadd(43.5, -149, -21.5, 4.9)
pt3dadd(47, -151, -22.5, 5.1)
pt3dadd(52.5, -155.5, -22.5, 3.7)
pt3dadd(54, -155.5, -22.5, 3.4)
pt3dadd(56.5, -157.5, -29, 3.4)
pt3dadd(59, -158, -29, 3.4)
pt3dadd(60, -160, -29, 3.4)
pt3dadd(61.5, -161, -29, 4)
pt3dadd(62.5, -163.5, -29, 3.8)
pt3dadd(64, -165, -29, 4.5)
pt3dadd(65, -166.5, -29, 4.4)
pt3dadd(67, -167.5, -29, 4.9)
pt3dadd(68.5, -168, -35, 4.6)
pt3dadd(70.5, -169, -35, 4.3)
pt3dadd(71.5, -170, -35, 3.6)
pt3dadd(73, -171.5, -35, 2.9)
pt3dadd(74, -171.5, -41.5, 2.3)
pt3dadd(76.5, -172.5, -41.5, 3.7)
pt3dadd(78, -174, -35, 3.8)
pt3dadd(79.5, -174.5, -41.5, 4.6)
pt3dadd(81.5, -177.5, -41.5, 5.2)
pt3dadd(82, -179, -41.5, 5.3)
}
dend[126] {pt3dclear()
pt3dadd(82, -179, -41.5, 5.3)
pt3dadd(84, -178.5, -54, 1.3)
pt3dadd(84, -177, -47.5, 1)
pt3dadd(87, -176.5, -47.5, 1)
pt3dadd(88.5, -176.5, -47.5, 0.7)
pt3dadd(89.5, -177.5, -47.5, 1.1)
pt3dadd(90, -178.5, -47.5, 1.1)
pt3dadd(90, -180, -47.5, 1.4)
pt3dadd(91, -181, -47.5, 1.2)
pt3dadd(92.5, -181.5, -47.5, 1.2)
pt3dadd(93.5, -182.5, -47.5, 1.7)
pt3dadd(94, -183, -54, 2.2)
pt3dadd(94.5, -187, -47.5, 1.9)
pt3dadd(98.5, -191.5, -43.5, 1.2)
pt3dadd(100.5, -192.5, -45.5, 1.1)
pt3dadd(101.5, -194.5, -51, 1.6)
pt3dadd(102, -196.5, -49, 1.6)
pt3dadd(103.5, -196.5, -49, 3.4)
pt3dadd(105, -197.5, -45.5, 2.8)
pt3dadd(106, -198, -47.5, 1.9)
pt3dadd(107, -198, -49, 1.1)
pt3dadd(108.5, -199.5, -53, 1.2)
pt3dadd(108.5, -201, -51, 1.2)
pt3dadd(109.5, -201.5, -53, 1.6)
pt3dadd(110, -201.5, -53, 2.2)
pt3dadd(111.5, -201.5, -53, 2.8)
pt3dadd(114, -203, -53, 1)
pt3dadd(114, -204, -53, 0.5)
pt3dadd(115.5, -205.5, -53, 0.5)
pt3dadd(116, -206.5, -51, 2.2)
pt3dadd(117.5, -208.5, -51, 2.7)
pt3dadd(118.5, -210, -55, 1.3)
pt3dadd(119.5, -212, -57, 0.5)
pt3dadd(120.5, -214, -57, 1)
pt3dadd(121.5, -214, -60, 2.2)
pt3dadd(122.5, -214.5, -60, 1.3)
pt3dadd(123.5, -215, -63, 0.1)
pt3dadd(124.5, -215, -63, 0.1)
pt3dadd(128, -214.5, -66, 0.1)
pt3dadd(126.5, -216, -63, 0.1)
pt3dadd(127, -216.5, -63, 1.3)
pt3dadd(129, -218, -63, 1.7)
pt3dadd(129.5, -219, -60, 2.4)
pt3dadd(131, -219, -63, 1.6)
pt3dadd(131, -221, -69, 0.9)
pt3dadd(132, -223, -69, 0.6)
pt3dadd(133, -224.5, -69, 0.7)
pt3dadd(132, -225.5, -66, 0.6)
pt3dadd(134, -226.5, -69, 1)
pt3dadd(134.5, -226.5, -69, 2.4)
pt3dadd(135, -227, -71.5, 3.1)
pt3dadd(135.5, -228.5, -71.5, 2)
pt3dadd(136, -229.5, -74.5, 0.6)
pt3dadd(136, -232, -77.5, 0.6)
pt3dadd(137, -232.5, -77.5, 0.6)
pt3dadd(137.5, -233.5, -77.5, 1.4)
pt3dadd(137.5, -235.5, -77.5, 2.3)
pt3dadd(138.5, -236.5, -77.5, 1.3)
pt3dadd(139, -238, -80.5, 1)
pt3dadd(139.5, -240, -80.5, 0.8)
pt3dadd(139.5, -240.5, -80.5, 0.9)
pt3dadd(139.5, -243.5, -80.5, 0.9)
pt3dadd(140, -244.5, -86.5, 1.4)
pt3dadd(140, -245.5, -77.5, 1.8)
pt3dadd(140.5, -246.5, -80.5, 1.6)
pt3dadd(143, -250, -78.5, 0.3)
pt3dadd(144, -250.5, -78.5, 0.3)
pt3dadd(145, -252, -85.5, 0.1)
pt3dadd(147, -253.5, -85.5, 0.1)
pt3dadd(148.5, -255, -85.5, 0.1)
pt3dadd(150, -256.5, -85.5, 0.1)
pt3dadd(150, -258.5, -85.5, 2.2)
pt3dadd(150, -259.5, -85.5, 2.8)
pt3dadd(149.5, -261.5, -85.5, 1.6)
pt3dadd(149, -263, -90, 0.1)
pt3dadd(149, -264, -85.5, 0.1)
pt3dadd(149, -265.5, -83, 1.3)
pt3dadd(149, -266, -88, 2.5)
pt3dadd(148.5, -268, -88, 1.2)
pt3dadd(148, -270.5, -88, 0.3)
pt3dadd(148, -270.5, -90, 0.1)
pt3dadd(149, -272, -90, 0.1)
pt3dadd(149, -273, -90, 1.5)
pt3dadd(150.5, -274, -92.5, 2.1)
pt3dadd(152, -276, -92.5, 1.1)
pt3dadd(153, -277.5, -92.5, 0.3)
pt3dadd(154.5, -280.5, -95, 0.3)
pt3dadd(155, -281, -95, 0.3)
pt3dadd(155, -283, -92.5, 1.6)
pt3dadd(156, -285, -97.5, 2.8)
pt3dadd(156, -285.5, -97.5, 0.7)
pt3dadd(156.5, -288, -97.5, 0.8)
pt3dadd(157, -289.5, -99.5, 0.8)
pt3dadd(158, -291.5, -99.5, 1.4)
pt3dadd(158.5, -291.5, -99.5, 0.4)
pt3dadd(158, -292.5, -102, 0.1)
pt3dadd(158, -294.5, -102, 0.1)
pt3dadd(159, -294.5, -99.5, 1)
pt3dadd(160, -297.5, -107, 2.5)
pt3dadd(161, -298, -107, 1.2)
pt3dadd(161.5, -299, -107, 0.1)
pt3dadd(164.5, -300, -111.5, 0.1)
}
dend[127] {pt3dclear()
pt3dadd(82, -179, -41.5, 5.3)
pt3dadd(84, -184, -41.5, 2.8)
pt3dadd(85, -186.5, -41.5, 2.8)
pt3dadd(86.5, -188.5, -47.5, 2.8)
pt3dadd(88, -190.5, -41.5, 2.9)
pt3dadd(88, -191.5, -47.5, 2.2)
pt3dadd(89.5, -193.5, -47.5, 2.1)
pt3dadd(91, -197.5, -41.5, 2.5)
pt3dadd(92.5, -199.5, -47.5, 2.7)
pt3dadd(93, -202.5, -41.5, 2.8)
pt3dadd(93.5, -204.5, -41.5, 3.3)
pt3dadd(95, -206, -47.5, 3.8)
pt3dadd(95.5, -207, -54, 3.6)
pt3dadd(97, -208, -47.5, 4.3)
pt3dadd(97.5, -211, -47.5, 4.3)
pt3dadd(97.5, -212.5, -47.5, 4.3)
pt3dadd(97.5, -213.5, -47.5, 3.4)
pt3dadd(98, -215.5, -60, 3.9)
pt3dadd(99, -218.5, -60, 3.4)
pt3dadd(102.5, -224, -65.5, 2.6)
pt3dadd(104, -226.5, -63.5, 3)
pt3dadd(106.5, -230.5, -63.5, 3.6)
pt3dadd(107.5, -230.5, -61.5, 4.3)
pt3dadd(108.5, -232.5, -65.5, 4.8)
pt3dadd(110.5, -234, -67.5, 3.9)
pt3dadd(112, -236.5, -67.5, 3.3)
pt3dadd(114, -238.5, -67.5, 2.7)
pt3dadd(115.5, -240.5, -67.5, 2.3)
pt3dadd(115.5, -242.5, -67.5, 2.3)
pt3dadd(117, -243, -67.5, 2.4)
pt3dadd(117.5, -245, -67.5, 3.2)
pt3dadd(118, -247, -65.5, 3.2)
pt3dadd(119, -249.5, -67.5, 4.2)
pt3dadd(119.5, -252, -67.5, 3.8)
pt3dadd(122, -254, -67.5, 3.3)
pt3dadd(123, -256, -69.5, 2.7)
pt3dadd(123, -258, -69.5, 2.4)
pt3dadd(124.5, -261, -69.5, 2.7)
pt3dadd(125, -261.5, -69.5, 2.2)
pt3dadd(126.5, -263, -69.5, 2.2)
pt3dadd(128, -265.5, -71.5, 3.4)
pt3dadd(128.5, -265.5, -71.5, 3.4)
pt3dadd(129, -267.5, -69.5, 3.4)
pt3dadd(129, -270, -71.5, 3.7)
pt3dadd(131, -271, -71.5, 2.6)
pt3dadd(131, -273, -73.5, 2.2)
pt3dadd(132, -275, -73.5, 2.6)
pt3dadd(132.5, -276.5, -75, 2.5)
pt3dadd(134, -280.5, -72, 3.5)
pt3dadd(135.5, -283, -69, 3.5)
pt3dadd(137.5, -283, -72, 3.8)
}
dend[128] {pt3dclear()
pt3dadd(137.5, -283, -72, 3.8)
pt3dadd(135.5, -286, -66, 1.2)
pt3dadd(136.5, -286.5, -75, 1.2)
pt3dadd(134, -287, -75, 1.2)
}
}
proc shape3d_38() {
dend[128] { pt3dadd(136.5, -288.5, -75, 0.9)
pt3dadd(137.5, -291.5, -75, 0.9)
pt3dadd(138.5, -293, -78, 0.9)
pt3dadd(139.5, -293.5, -81, 0.9)
pt3dadd(140.5, -294, -78, 1.4)
pt3dadd(140, -295.5, -78, 3.1)
pt3dadd(141.5, -298, -78, 3.3)
pt3dadd(141.5, -300, -84, 2.6)
pt3dadd(141.5, -300, -81, 1.4)
pt3dadd(141.5, -302.5, -86.5, 0.9)
pt3dadd(143, -303.5, -86.5, 1.1)
pt3dadd(143.5, -305, -86.5, 1.1)
pt3dadd(145, -306.5, -86.5, 0.6)
pt3dadd(144, -308, -86.5, 0.6)
pt3dadd(147, -309.5, -89.5, 1.4)
pt3dadd(147.5, -310, -92.5, 3.4)
pt3dadd(148.5, -313, -86.5, 1.6)
pt3dadd(149.5, -315.5, -89.5, 1.1)
pt3dadd(150.5, -316, -89.5, 0.9)
pt3dadd(153, -319, -92.5, 0.9)
pt3dadd(153, -320.5, -92.5, 0.9)
pt3dadd(155, -323.5, -92.5, 0.8)
pt3dadd(156, -325.5, -94.5, 1.7)
pt3dadd(156.5, -325.5, -90, 1.7)
pt3dadd(156.5, -327, -90, 0.3)
pt3dadd(156.5, -328.5, -90, 0.3)
pt3dadd(157, -329, -92.5, 0.5)
pt3dadd(157.5, -329.5, -90, 0.9)
pt3dadd(159, -330.5, -94.5, 0.1)
pt3dadd(157.5, -331.5, -94.5, 0.1)
pt3dadd(156, -332.5, -94.5, 0.1)
pt3dadd(156.5, -334.5, -90, 1.3)
pt3dadd(156.5, -336, -90, 3.1)
pt3dadd(157, -337, -94.5, 2.1)
pt3dadd(159, -338.5, -94.5, 1.3)
pt3dadd(159, -340, -97, 0.7)
pt3dadd(159.5, -340, -97, 0.7)
pt3dadd(159.5, -342.5, -97, 1.2)
pt3dadd(159.5, -343.5, -97, 1.6)
pt3dadd(159.5, -344, -97, 2.9)
pt3dadd(159, -346, -97, 1.6)
pt3dadd(160, -347.5, -99.5, 1.2)
pt3dadd(159.5, -348, -99.5, 0.9)
pt3dadd(159, -349, -102, 1.4)
pt3dadd(161, -351, -106.5, 1.4)
pt3dadd(161, -351, -111.5, 1.8)
pt3dadd(161, -352.5, -106.5, 1.1)
pt3dadd(162, -354, -106.5, 0.9)
pt3dadd(162, -354.5, -109, 1.3)
pt3dadd(161.5, -356, -106.5, 2.4)
pt3dadd(162, -358, -106.5, 2.8)
pt3dadd(160, -359.5, -109, 1.6)
pt3dadd(158.5, -359.5, -106.5, 0.7)
pt3dadd(158, -361, -106.5, 0.7)
pt3dadd(157, -362.5, -106.5, 1.7)
pt3dadd(156.5, -363.5, -106.5, 2.4)
pt3dadd(155.5, -364.5, -106.5, 3.3)
pt3dadd(153.5, -366, -111.5, 1.4)
pt3dadd(153, -367, -111.5, 0.6)
pt3dadd(151, -368.5, -109, 0.7)
pt3dadd(149.5, -369, -109, 2.1)
pt3dadd(148.5, -371.5, -109, 3.1)
pt3dadd(146.5, -372.5, -109, 1.5)
pt3dadd(146.5, -374.5, -113.5, 0.3)
pt3dadd(145, -377, -113.5, 0.6)
}
dend[129] {pt3dclear()
pt3dadd(137.5, -283, -72, 3.8)
pt3dadd(139.5, -285, -66, 1.6)
pt3dadd(141, -287, -69, 1.6)
pt3dadd(143.5, -290, -72, 1.6)
pt3dadd(144.5, -290, -72, 1.9)
pt3dadd(144.5, -290.5, -72, 2)
pt3dadd(146, -291.5, -72, 1.5)
pt3dadd(146, -293, -75, 1.1)
pt3dadd(147.5, -294.5, -75, 1.2)
pt3dadd(148, -296, -75, 1.1)
pt3dadd(150, -297, -75, 1.2)
pt3dadd(151.5, -299, -78, 1.8)
pt3dadd(154, -300, -81, 2.2)
pt3dadd(156, -301.5, -81, 3.1)
pt3dadd(157, -302.5, -78, 2.7)
pt3dadd(159, -303, -78, 1.3)
pt3dadd(160, -303, -78, 1)
pt3dadd(162, -304, -78, 0.7)
pt3dadd(163, -306, -81, 1.3)
pt3dadd(162.5, -306.5, -84, 1.8)
pt3dadd(163, -308.5, -81, 2.8)
pt3dadd(166, -309.5, -81, 3.8)
pt3dadd(166, -311.5, -84, 2.3)
pt3dadd(167, -313.5, -84, 1.2)
pt3dadd(169, -313.5, -84, 1.2)
pt3dadd(171.5, -314.5, -84, 1.3)
pt3dadd(172.5, -316, -84, 1.3)
pt3dadd(174, -317, -86.5, 1.6)
pt3dadd(174.5, -319, -84, 2.7)
pt3dadd(175, -321.5, -86.5, 3.2)
pt3dadd(176.5, -323, -89.5, 2.8)
pt3dadd(177, -325, -89.5, 1.9)
pt3dadd(178.5, -325, -89.5, 1.4)
pt3dadd(179.5, -326, -89.5, 1.4)
pt3dadd(182.5, -329, -95.5, 1.4)
pt3dadd(184.5, -333, -93, 2)
pt3dadd(184, -334.5, -100, 1.5)
pt3dadd(185, -335.5, -97.5, 0.6)
pt3dadd(185.5, -337.5, -100, 0.6)
pt3dadd(188, -337.5, -100, 1)
pt3dadd(189, -338.5, -100, 1.4)
pt3dadd(189.5, -340.5, -100, 1.5)
pt3dadd(189.5, -342.5, -105, 3.8)
pt3dadd(191, -349, -105, 1.7)
pt3dadd(191, -351, -107, 1.6)
pt3dadd(192, -351.5, -107, 1.1)
pt3dadd(193.5, -353, -109.5, 0.9)
pt3dadd(194.5, -353.5, -107, 0.9)
pt3dadd(195, -355, -109.5, 0.8)
pt3dadd(195.5, -355.5, -109.5, 0.4)
pt3dadd(196, -356, -109.5, 0.4)
pt3dadd(196.5, -357.5, -107, 0.6)
pt3dadd(197, -359, -109.5, 1.2)
pt3dadd(199, -361.5, -112, 1)
pt3dadd(199.5, -362, -109.5, 2)
pt3dadd(201, -368, -114.5, 4.7)
pt3dadd(202, -371, -112, 2.5)
pt3dadd(203, -374, -114.5, 1)
pt3dadd(203, -374.5, -114.5, 1.2)
pt3dadd(203, -376, -114.5, 0.7)
pt3dadd(203, -377.5, -114.5, 0.4)
pt3dadd(203, -379, -114.5, 1.6)
pt3dadd(203.5, -381.5, -112, 2.1)
pt3dadd(204.5, -382.5, -119, 3.3)
}
dend[130] {pt3dclear()
pt3dadd(204.5, -382.5, -119, 3.3)
pt3dadd(206, -383, -119, 0.1)
pt3dadd(207, -384, -119, 0.7)
pt3dadd(208, -385, -116.5, 0.8)
pt3dadd(208.5, -385.5, -116.5, 0.5)
pt3dadd(209.5, -386, -116.5, 0.1)
pt3dadd(210.5, -386, -116.5, 0.1)
pt3dadd(211.5, -387.5, -119, 1.5)
pt3dadd(212.5, -387.5, -119, 1.8)
pt3dadd(213.5, -388, -119, 0.1)
pt3dadd(214.5, -388, -119, 0.1)
pt3dadd(215.5, -391.5, -119, 0.1)
pt3dadd(217.5, -391.5, -119, 0.1)
pt3dadd(218, -391.5, -119, 1.6)
pt3dadd(218.5, -391.5, -119, 1.6)
pt3dadd(219, -392, -121.5, 1.4)
pt3dadd(221, -393.5, -121.5, 0.1)
pt3dadd(225.5, -394, -124, 0.1)
}
dend[131] {pt3dclear()
pt3dadd(204.5, -382.5, -119, 3.3)
pt3dadd(204, -386, -119, 0.2)
pt3dadd(204.5, -387, -116.5, 0.2)
pt3dadd(204.5, -389.5, -116.5, 0.4)
pt3dadd(205, -391, -119, 1.8)
pt3dadd(205, -392, -116.5, 2.9)
pt3dadd(205, -392.5, -116.5, 2.9)
pt3dadd(204.5, -393.5, -116.5, 2.1)
pt3dadd(205.5, -396, -119, 1)
pt3dadd(204.5, -397, -116.5, 1.4)
pt3dadd(204.5, -398, -119, 1.8)
pt3dadd(205, -400.5, -119, 1.8)
pt3dadd(204, -402.5, -119, 1)
pt3dadd(203.5, -403, -119, 1)
pt3dadd(202, -405, -116.5, 1)
pt3dadd(200, -406.5, -116.5, 1)
pt3dadd(199, -407.5, -114.5, 1.2)
pt3dadd(198, -408.5, -112, 1.6)
pt3dadd(198, -411, -116.5, 2.5)
pt3dadd(196, -411, -116.5, 3.4)
pt3dadd(195.5, -413, -119, 4)
pt3dadd(194, -415, -116.5, 2.8)
pt3dadd(191.5, -415, -116.5, 1.8)
pt3dadd(191.5, -417.5, -116.5, 0.7)
pt3dadd(189, -418.5, -116.5, 1.1)
pt3dadd(188, -420, -116.5, 1.2)
pt3dadd(185.5, -421, -116.5, 0.6)
pt3dadd(185.5, -424, -116.5, 0.7)
pt3dadd(185, -424.5, -116.5, 2.4)
pt3dadd(185, -426, -116.5, 3)
pt3dadd(185, -428, -116.5, 1.8)
pt3dadd(185.5, -430.5, -121.5, 0.8)
pt3dadd(185, -432, -116.5, 0.1)
pt3dadd(185.5, -434.5, -116.5, 0.3)
pt3dadd(184, -435.5, -116.5, 0.9)
pt3dadd(182.5, -437.5, -116.5, 1.5)
pt3dadd(182, -439.5, -116.5, 2.1)
pt3dadd(182, -441, -116.5, 2.8)
pt3dadd(182, -444.5, -116.5, 3.6)
pt3dadd(180, -446, -116.5, 2.3)
pt3dadd(177.5, -447.5, -116.5, 1.4)
pt3dadd(177, -449, -116.5, 0.3)
pt3dadd(174.5, -449.5, -116.5, 0.3)
pt3dadd(174, -451.5, -116.5, 1.1)
pt3dadd(173.5, -453, -116.5, 2)
pt3dadd(172, -454.5, -114.5, 1.2)
pt3dadd(172.5, -456, -116.5, 0.5)
pt3dadd(172.5, -458.5, -116.5, 0.5)
pt3dadd(172.5, -459.5, -114.5, 1.4)
pt3dadd(172.5, -462, -119, 1.2)
pt3dadd(172, -466, -119, 0.4)
pt3dadd(170.5, -468, -119, 1.7)
pt3dadd(169.5, -470.5, -116.5, 2.3)
}
}
proc shape3d_39() {
dend[131] { pt3dadd(169, -472, -119, 1.2)
pt3dadd(168, -475, -119, 0.7)
pt3dadd(166.5, -477, -119, 1.1)
pt3dadd(164.5, -483, -121.5, 0.8)
pt3dadd(163, -486.5, -121.5, 0.8)
pt3dadd(161, -491.5, -119, 0.8)
pt3dadd(160.5, -494, -119, 0.1)
pt3dadd(157.5, -495.5, -119, 0.1)
pt3dadd(156.5, -499, -119, 2.4)
pt3dadd(154.5, -501.5, -114.5, 3.2)
pt3dadd(153, -503.5, -124, 1)
pt3dadd(153, -506.5, -124, 0.9)
pt3dadd(152, -509, -124, 1.6)
pt3dadd(151, -511, -124, 1.6)
pt3dadd(150, -514, -124, 1.2)
pt3dadd(150, -518, -124, 0.8)
pt3dadd(149.5, -522, -124, 1.2)
pt3dadd(147, -525.5, -121.5, 1.2)
pt3dadd(144, -528.5, -121.5, 1.2)
pt3dadd(142, -531, -121.5, 1.2)
pt3dadd(139, -535, -116.5, 0.7)
pt3dadd(136.5, -537, -119, 0.7)
pt3dadd(134, -542, -124, 0.6)
pt3dadd(133, -542, -119, 0.6)
pt3dadd(132, -543.5, -119, 1)
pt3dadd(130.5, -544.5, -116.5, 1.6)
pt3dadd(130, -545, -116.5, 0.9)
pt3dadd(129.5, -545.5, -116.5, 0.2)
pt3dadd(129.5, -547, -116.5, 0.2)
pt3dadd(126, -549, -121.5, 2.4)
pt3dadd(124, -550.5, -121.5, 0.5)
pt3dadd(122.5, -552, -121.5, 0.5)
pt3dadd(122, -554, -121.5, 1.2)
pt3dadd(121, -555.5, -121.5, 1.6)
pt3dadd(119, -557, -121.5, 2.7)
pt3dadd(116, -559, -121.5, 1.2)
pt3dadd(113.5, -559.5, -121.5, 0.5)
pt3dadd(111, -562.5, -119, 0.5)
pt3dadd(108, -562.5, -119, 0.5)
pt3dadd(107.5, -564, -121.5, 0.5)
pt3dadd(106.5, -566.5, -114.5, 0.5)
pt3dadd(107.5, -568.5, -114.5, 1.6)
pt3dadd(107, -569.5, -114.5, 1.6)
pt3dadd(105.5, -571.5, -114.5, 0.7)
pt3dadd(104.5, -573.5, -114.5, 0.7)
pt3dadd(104.5, -576, -114.5, 1)
pt3dadd(105, -577.5, -114.5, 1.3)
pt3dadd(105, -579, -114.5, 1.3)
pt3dadd(107, -581.5, -114.5, 1.5)
pt3dadd(106.5, -584.5, -112, 1.9)
pt3dadd(106, -587, -112, 2.1)
pt3dadd(107.5, -589.5, -109.5, 1.3)
pt3dadd(110, -589.5, -109.5, 0.1)
pt3dadd(113, -589.5, -109.5, 0.1)
pt3dadd(115.5, -589.5, -112, 0.1)
pt3dadd(116, -590.5, -112, 1.2)
pt3dadd(117.5, -591.5, -112, 1.5)
pt3dadd(119.5, -592, -112, 0.9)
pt3dadd(121, -592.5, -112, 0.1)
pt3dadd(122.5, -594.5, -112, 0.1)
pt3dadd(123, -597.5, -112, 0.1)
pt3dadd(123, -600, -112, 0.1)
pt3dadd(124.5, -601, -109.5, 1.6)
pt3dadd(126, -602.5, -112, 0.6)
pt3dadd(126, -603.5, -112, 0.1)
pt3dadd(126, -608, -109.5, 0.1)
pt3dadd(126, -610.5, -109.5, 0.1)
pt3dadd(126, -611, -107, 1.6)
pt3dadd(125.5, -611, -112, 1.3)
pt3dadd(125.5, -611.5, -109.5, 0.3)
pt3dadd(125, -613.5, -109.5, 0.3)
pt3dadd(123.5, -613.5, -109.5, 0.3)
pt3dadd(121.5, -618, -107, 0.3)
pt3dadd(119.5, -618, -107, 0.3)
pt3dadd(120, -619.5, -109.5, 1.5)
pt3dadd(122, -620.5, -109.5, 0.7)
pt3dadd(124, -620.5, -107, 0.7)
pt3dadd(126.5, -620.5, -107, 0.7)
pt3dadd(127.5, -622, -107, 0.7)
pt3dadd(126.5, -624.5, -105, 0.1)
pt3dadd(128, -625, -107, 0.1)
pt3dadd(129.5, -625.5, -107, 0.1)
pt3dadd(131.5, -629, -107, 0.1)
pt3dadd(133, -629, -105, 0.1)
pt3dadd(135, -629.5, -105, 0.1)
pt3dadd(135.5, -633, -100, 0.1)
pt3dadd(132.5, -636.5, -100, 0.1)
pt3dadd(127, -636.5, -97.5, 0.1)
pt3dadd(125.5, -637.5, -97.5, 0.1)
pt3dadd(124.5, -640, -102.5, 0.1)
pt3dadd(122.5, -639.5, -97.5, 1.6)
pt3dadd(121, -642, -95.5, 0.1)
pt3dadd(119, -642.5, -95.5, 0.1)
pt3dadd(118, -642, -93, 1.6)
pt3dadd(115.5, -642.5, -93, 0.1)
}
dend[132] {pt3dclear()
pt3dadd(3, 6.5, -4, 13.2)
pt3dadd(-4, 3, -3, 9.3)
pt3dadd(-7.5, 2, -2, 8.5)
pt3dadd(-10.5, 1, -3, 7.7)
pt3dadd(-12.5, -1, -3, 7.5)
pt3dadd(-16, -1.5, -3, 8.5)
}
dend[133] {pt3dclear()
pt3dadd(-16, -1.5, -3, 8.5)
pt3dadd(-25, -3.5, -1, 6.7)
pt3dadd(-28, -2.5, -6.5, 6)
pt3dadd(-30.5, -2, -5, 5)
pt3dadd(-34, -2, -5, 4)
pt3dadd(-36, -2.5, -6.5, 4)
pt3dadd(-38.5, -3.5, -6.5, 4.9)
pt3dadd(-40, -4, -6.5, 3.8)
pt3dadd(-42.5, -3.5, -5.5, 3.6)
pt3dadd(-44.5, -3.5, -8.5, 3.7)
pt3dadd(-50, -4.5, -9.5, 3.6)
pt3dadd(-58, -5.5, -9.5, 7.1)
pt3dadd(-64, -5.5, -9.5, 7.1)
pt3dadd(-68, -6, -10.5, 7.1)
pt3dadd(-72, -7, -10.5, 6.5)
pt3dadd(-75.5, -8, -11.5, 6.8)
pt3dadd(-81.5, -9.5, -11.5, 7.8)
pt3dadd(-86, -9.5, -11.5, 7.8)
pt3dadd(-90, -10.5, -11.5, 7.8)
pt3dadd(-93.5, -11, -11.5, 7.2)
pt3dadd(-97, -11.5, -11.5, 6.9)
pt3dadd(-103, -12.5, -11.5, 7.3)
pt3dadd(-106.5, -12.5, -11.5, 7)
pt3dadd(-113, -12.5, -14, 6.7)
pt3dadd(-116.5, -12.5, -13, 6.8)
pt3dadd(-121, -13, -13, 6.5)
pt3dadd(-123.5, -14.5, -13, 6.8)
pt3dadd(-128.5, -16, -13, 6.8)
pt3dadd(-132, -18, -15, 7.4)
pt3dadd(-136.5, -19.5, -15, 7.4)
}
dend[134] {pt3dclear()
pt3dadd(-136.5, -19.5, -15, 7.4)
pt3dadd(-142.5, -20, -16.5, 4.9)
pt3dadd(-147, -20, -16.5, 4.9)
pt3dadd(-150.5, -21, -15, 5.1)
pt3dadd(-154, -22.5, -16.5, 5.1)
pt3dadd(-156, -24.5, -15, 5)
pt3dadd(-161.5, -26, -15.5, 3.2)
pt3dadd(-164.5, -27.5, -15.5, 3.8)
pt3dadd(-166, -28.5, -17, 4.4)
pt3dadd(-170.5, -29.5, -17, 3.4)
pt3dadd(-174, -32, -17, 3.3)
pt3dadd(-178.5, -33, -17.5, 3.8)
pt3dadd(-182.5, -33, -17.5, 4.3)
pt3dadd(-187, -35, -17.5, 4.3)
pt3dadd(-191.5, -35, -17.5, 4.3)
pt3dadd(-195.5, -35.5, -17.5, 3.6)
pt3dadd(-199.5, -36.5, -19, 3.5)
pt3dadd(-203, -38, -19, 3.3)
pt3dadd(-205.5, -41, -17.5, 4.3)
pt3dadd(-209, -44, -17.5, 3.6)
pt3dadd(-212.5, -46.5, -17.5, 4.6)
pt3dadd(-213, -50, -18, 2.7)
pt3dadd(-216, -51.5, -18, 2.7)
pt3dadd(-219, -51.5, -17.5, 4.4)
pt3dadd(-221, -51.5, -17.5, 5.4)
pt3dadd(-224.5, -52, -17.5, 4.6)
pt3dadd(-227.5, -54.5, -17.5, 4.3)
pt3dadd(-231, -57.5, -18, 4.1)
pt3dadd(-235, -60.5, -18, 4.5)
pt3dadd(-239, -61, -18, 4.8)
pt3dadd(-242.5, -61, -18, 5.7)
pt3dadd(-246, -60.5, -19, 6.8)
pt3dadd(-250, -60.5, -19, 6.3)
pt3dadd(-253.5, -60, -19, 6)
pt3dadd(-257, -58.5, -19, 6)
pt3dadd(-261, -57, -19, 6)
pt3dadd(-265, -55, -19.5, 6)
pt3dadd(-266.5, -55, -19.5, 2.5)
pt3dadd(-268.5, -55, -19.5, 3.4)
pt3dadd(-271, -55, -25.5, 5.4)
pt3dadd(-273.5, -54, -19.5, 6.2)
pt3dadd(-275, -54, -19.5, 5.2)
pt3dadd(-278, -54, -19.5, 4.6)
pt3dadd(-281.5, -54, -25.5, 4.6)
pt3dadd(-284.5, -54, -25.5, 5.5)
pt3dadd(-287.5, -54, -25.5, 6.5)
pt3dadd(-290, -54, -25.5, 5.6)
pt3dadd(-292, -55.5, -25.5, 4.7)
pt3dadd(-293.5, -57, -25.5, 5.3)
pt3dadd(-295, -57, -25.5, 4.9)
pt3dadd(-297, -57, -25.5, 3.7)
pt3dadd(-299.5, -57, -19.5, 4.1)
pt3dadd(-301.5, -57, -19.5, 4.1)
pt3dadd(-303, -57, -19.5, 4.1)
pt3dadd(-303, -60, -19.5, 4.4)
pt3dadd(-306, -60, -25.5, 4.4)
pt3dadd(-308, -61.5, -25.5, 5.7)
pt3dadd(-309, -63, -25.5, 7.1)
pt3dadd(-311.5, -66, -25.5, 6.3)
pt3dadd(-313.5, -68, -25.5, 7)
pt3dadd(-317, -70.5, -32, 7)
pt3dadd(-319, -71.5, -32, 7.1)
pt3dadd(-321.5, -73, -32, 6.4)
pt3dadd(-324, -74, -32, 6.4)
pt3dadd(-327, -75.5, -32, 6.7)
pt3dadd(-330, -80, -38, 6.9)
pt3dadd(-330.5, -82.5, -38, 6.9)
pt3dadd(-331.5, -84.5, -44.5, 6.8)
pt3dadd(-332, -86, -44.5, 6.5)
}
}
proc shape3d_40() {
dend[134] { pt3dadd(-333, -88, -44.5, 6.5)
pt3dadd(-335.5, -90, -44.5, 5.5)
pt3dadd(-339, -92.5, -46.5, 5.2)
pt3dadd(-342, -93, -48.5, 5.2)
pt3dadd(-343.5, -94, -48.5, 5)
pt3dadd(-346.5, -95, -48.5, 3.8)
pt3dadd(-349, -96.5, -48.5, 4.4)
pt3dadd(-349, -100.5, -48.5, 6.1)
pt3dadd(-350.5, -101, -50.5, 4.2)
pt3dadd(-351.5, -101.5, -52.5, 4.2)
pt3dadd(-353.5, -103.5, -52.5, 4.7)
pt3dadd(-355.5, -106, -52.5, 5.7)
pt3dadd(-358, -107, -50.5, 4.7)
pt3dadd(-360, -109.5, -52.5, 4.6)
pt3dadd(-362, -112, -54.5, 5.7)
pt3dadd(-365, -115.5, -66, 5.7)
pt3dadd(-367, -119.5, -66, 4.9)
pt3dadd(-369.5, -122, -69, 4.9)
pt3dadd(-372, -122, -69, 4.4)
pt3dadd(-372.5, -124.5, -75, 4.4)
pt3dadd(-373.5, -126.5, -75, 4.3)
pt3dadd(-374, -129, -78, 3.8)
pt3dadd(-376.5, -130.5, -81, 3.8)
pt3dadd(-377.5, -131, -78, 4.3)
pt3dadd(-379.5, -131, -84, 4.1)
pt3dadd(-382.5, -137.5, -89.5, 6.3)
pt3dadd(-384.5, -142.5, -87, 6)
pt3dadd(-391, -142, -84.5, 3.7)
pt3dadd(-395, -145, -82, 4.3)
pt3dadd(-397.5, -146, -82, 5.2)
pt3dadd(-399, -150, -84.5, 4.9)
pt3dadd(-399.5, -150, -87, 4.8)
pt3dadd(-400.5, -153, -87, 2.6)
pt3dadd(-402.5, -153, -87, 2.5)
pt3dadd(-404, -152.5, -91.5, 3.1)
}
dend[135] {pt3dclear()
pt3dadd(-404, -152.5, -91.5, 3.1)
pt3dadd(-409.5, -153.5, -91.5, 4.6)
pt3dadd(-412, -153.5, -91.5, 4.6)
pt3dadd(-416, -154, -96.5, 4.6)
pt3dadd(-420, -154.5, -96.5, 4.9)
pt3dadd(-422.5, -157, -101, 3.6)
pt3dadd(-425, -157, -101, 3.4)
pt3dadd(-427.5, -158.5, -98.5, 3)
pt3dadd(-430, -159.5, -101, 4.2)
pt3dadd(-433, -161.5, -101, 4.5)
pt3dadd(-436, -163.5, -101, 5.3)
}
dend[136] {pt3dclear()
pt3dadd(-404, -152.5, -91.5, 3.1)
pt3dadd(-409, -150.5, -94, 0.1)
pt3dadd(-409.5, -148, -91.5, 0.1)
pt3dadd(-410.5, -148, -91.5, 1.3)
pt3dadd(-413, -146, -94, 0.9)
pt3dadd(-414, -147, -101, 0.9)
pt3dadd(-415.5, -147, -101, 1.8)
pt3dadd(-417, -145.5, -96.5, 0.2)
pt3dadd(-418.5, -144, -98.5, 0.2)
pt3dadd(-420, -144, -103.5, 1.8)
pt3dadd(-422.5, -144, -103.5, 0.3)
pt3dadd(-424.5, -143.5, -106, 0.3)
pt3dadd(-425, -141, -101, 1.8)
pt3dadd(-427, -141, -106, 0.1)
}
dend[137] {pt3dclear()
pt3dadd(-136.5, -19.5, -15, 7.4)
pt3dadd(-145.5, -25.5, -15, 3.8)
pt3dadd(-148.5, -26, -15, 3.8)
pt3dadd(-153, -30, -15, 3.8)
pt3dadd(-157, -30, -16.5, 4.6)
pt3dadd(-161, -31.5, -15, 5.2)
pt3dadd(-169, -32, -14, 5.6)
pt3dadd(-171.5, -32, -15, 4.6)
pt3dadd(-173.5, -32, -15, 3.8)
pt3dadd(-175.5, -32, -15, 2.8)
pt3dadd(-178, -32, -15, 2.9)
pt3dadd(-179.5, -32, -14, 4.4)
pt3dadd(-183, -32, -15, 5.3)
pt3dadd(-186.5, -33, -15, 5.3)
pt3dadd(-189.5, -35, -15, 4.9)
pt3dadd(-193.5, -35, -15, 5.3)
pt3dadd(-197.5, -35, -15, 5.3)
pt3dadd(-200.5, -35, -14, 4.6)
pt3dadd(-204.5, -35, -14, 4.3)
pt3dadd(-207.5, -35, -14, 4.4)
pt3dadd(-212, -36.5, -14, 4.7)
pt3dadd(-215.5, -36.5, -14, 5.7)
pt3dadd(-221.5, -37.5, -14, 5.4)
pt3dadd(-226, -38.5, -14, 5.3)
pt3dadd(-229, -38.5, -14, 4.9)
pt3dadd(-233.5, -37, -14, 3.9)
pt3dadd(-237.5, -34.5, -11.5, 3.1)
pt3dadd(-239.5, -34.5, -11.5, 2.6)
pt3dadd(-242, -34.5, -11.5, 3.4)
pt3dadd(-245.5, -35, -11.5, 5.2)
pt3dadd(-249, -35, -13, 5.3)
pt3dadd(-253.5, -36, -11.5, 5.3)
pt3dadd(-257.5, -36, -10.5, 5)
pt3dadd(-263, -34.5, -4, 4)
pt3dadd(-267, -34.5, -4, 3.1)
pt3dadd(-269, -34.5, -4, 3.1)
pt3dadd(-273, -34.5, -3, 3.7)
pt3dadd(-277.5, -35.5, -2, 4.7)
pt3dadd(-281.5, -37, -6, 4)
pt3dadd(-285, -37, -5, 3.3)
pt3dadd(-290, -38, -5, 5.2)
pt3dadd(-301, -42, -5, 5.7)
pt3dadd(-304.5, -43.5, -4, 4.6)
pt3dadd(-307.5, -43.5, -2, 3.7)
pt3dadd(-310.5, -45.5, -3, 3.6)
pt3dadd(-314, -47, -3, 4.3)
pt3dadd(-318, -47, -3, 5)
pt3dadd(-321.5, -49, -3, 4.3)
pt3dadd(-325.5, -49.5, -3, 3.6)
pt3dadd(-330, -51.5, -2, 3.1)
pt3dadd(-334, -51.5, -2, 3.7)
pt3dadd(-337.5, -51.5, -1, 4)
pt3dadd(-342, -51.5, -1, 5.3)
pt3dadd(-346, -50.5, -1, 5.7)
pt3dadd(-349, -50, -1, 5.7)
}
dend[138] {pt3dclear()
pt3dadd(-349, -50, -1, 5.7)
pt3dadd(-351.5, -52, -4, 0.5)
pt3dadd(-353, -53, -4, 0.5)
pt3dadd(-354, -56, -4, 0.5)
pt3dadd(-355, -57.5, -3, 1.2)
pt3dadd(-357.5, -59, -3, 0.5)
pt3dadd(-359, -61, -3, 0.4)
pt3dadd(-359.5, -62, -3, 2.5)
pt3dadd(-360, -62, -3, 2.7)
pt3dadd(-361, -64, -3, 1.4)
pt3dadd(-361.5, -65.5, -3, 0.6)
pt3dadd(-362.5, -67, 1.5, 0.1)
pt3dadd(-364, -68, 1.5, 1.1)
pt3dadd(-367, -70, 1.5, 0.2)
pt3dadd(-369, -71.5, 1.5, 0.2)
pt3dadd(-370.5, -72, 1.5, 0.2)
pt3dadd(-375.5, -74, -0.5, 0.2)
pt3dadd(-375, -77, -0.5, 0.2)
pt3dadd(-374.5, -78, -0.5, 0.2)
pt3dadd(-376.5, -81, -1, 0.1)
pt3dadd(-377.5, -81.5, -1, 1)
pt3dadd(-379, -82, -1, 0.2)
pt3dadd(-379, -84.5, -1, 0.2)
pt3dadd(-379, -85.5, -0.5, 2.4)
pt3dadd(-379.5, -87.5, -2, 0.2)
pt3dadd(-382, -89, -4, 0.1)
pt3dadd(-382, -91, -4, 0.1)
pt3dadd(-383.5, -92, -3, 0.8)
pt3dadd(-383.5, -94.5, -4, 0.1)
pt3dadd(-379.5, -95.5, -7.5, 0.1)
pt3dadd(-375.5, -93.5, -9.5, 0.1)
}
dend[139] {pt3dclear()
pt3dadd(-349, -50, -1, 5.7)
pt3dadd(-352.5, -49.5, -1, 3.9)
pt3dadd(-355, -47.5, -2, 3.6)
pt3dadd(-358, -47.5, -2, 4)
pt3dadd(-362, -45.5, -2, 4)
pt3dadd(-364.5, -43.5, -1, 3.6)
pt3dadd(-368.5, -43.5, -1, 3.4)
pt3dadd(-371.5, -43, -1, 4.4)
pt3dadd(-375.5, -43, 3.5, 4.8)
pt3dadd(-380, -43, 4, 4.8)
pt3dadd(-385.5, -43, 4, 4.8)
pt3dadd(-391.5, -43, 6.5, 2.5)
pt3dadd(-396.5, -42, 15, 3)
pt3dadd(-400, -42, 17.5, 3.4)
pt3dadd(-405.5, -41.5, 20.5, 3.4)
pt3dadd(-408.5, -41.5, 20.5, 2.7)
pt3dadd(-411.5, -41.5, 20.5, 2.5)
pt3dadd(-415.5, -40.5, 20.5, 2.7)
pt3dadd(-421, -39.5, 20.5, 3.8)
pt3dadd(-424, -39, 23, 4.9)
pt3dadd(-429, -39.5, 23, 3.2)
pt3dadd(-431.5, -39.5, 23, 2.6)
pt3dadd(-435, -39.5, 23, 2.6)
pt3dadd(-438.5, -39.5, 23, 2.7)
pt3dadd(-441.5, -39.5, 23, 3.4)
pt3dadd(-445.5, -39.5, 23, 4.3)
pt3dadd(-449.5, -40, 31.5, 4.6)
pt3dadd(-453, -41, 34.5, 3.8)
pt3dadd(-458, -41, 34.5, 3.8)
pt3dadd(-463.5, -42.5, 36, 3.8)
pt3dadd(-469.5, -42.5, 37.5, 5.9)
pt3dadd(-475, -43, 39, 6.6)
pt3dadd(-477, -43.5, 39, 5.7)
pt3dadd(-477, -43.5, 43.5, 7.2)
pt3dadd(-480, -45, 43.5, 4.1)
pt3dadd(-483, -46, 43.5, 3.3)
pt3dadd(-486, -47, 49, 2.7)
pt3dadd(-488.5, -47.5, 46, 2.8)
pt3dadd(-491, -48.5, 46, 3.6)
pt3dadd(-495, -51, 46, 3.5)
pt3dadd(-498.5, -53.5, 46, 3.6)
pt3dadd(-500, -53.5, 46, 2.5)
pt3dadd(-503, -53.5, 46, 3.6)
pt3dadd(-504, -53.5, 46, 5.4)
pt3dadd(-506, -53.5, 46, 6)
pt3dadd(-510, -53.5, 47.5, 5.2)
pt3dadd(-512.5, -53.5, 47.5, 3.3)
pt3dadd(-516, -53.5, 47.5, 2.3)
pt3dadd(-518.5, -53.5, 47.5, 1.9)
pt3dadd(-521, -53.5, 47.5, 3.6)
pt3dadd(-524, -54.5, 47.5, 5.2)
pt3dadd(-528.5, -56.5, 49, 7.6)
pt3dadd(-533.5, -55, 46, 8)
}
dend[140] {pt3dclear()
pt3dadd(-533.5, -55, 46, 8)
}
}
proc shape3d_41() {
dend[140] { pt3dadd(-540.5, -52, 46, 3.3)
pt3dadd(-543.5, -50, 46, 2)
pt3dadd(-548.5, -50, 44.5, 2.1)
pt3dadd(-550.5, -50, 46, 2.5)
pt3dadd(-552, -48, 47.5, 4)
pt3dadd(-555.5, -48, 49, 4.9)
pt3dadd(-557.5, -48, 49, 1.7)
pt3dadd(-559, -47.5, 49, 1.6)
pt3dadd(-562.5, -46.5, 49, 1.2)
pt3dadd(-563, -45, 50.5, 2.9)
pt3dadd(-567, -44.5, 54.5, 3.8)
pt3dadd(-571.5, -43, 54.5, 1.6)
pt3dadd(-572, -43, 54.5, 1.1)
pt3dadd(-576.5, -41.5, 56, 1.4)
pt3dadd(-579, -40, 56, 1.5)
pt3dadd(-581.5, -39, 57.5, 4.3)
pt3dadd(-586, -37, 57.5, 2.5)
pt3dadd(-587, -35.5, 59, 1.6)
pt3dadd(-589.5, -35.5, 59, 1.6)
pt3dadd(-591, -35.5, 60.5, 2.3)
pt3dadd(-594, -34, 60.5, 3.2)
pt3dadd(-597, -32.5, 60.5, 3)
pt3dadd(-600.5, -31, 60.5, 2.4)
pt3dadd(-604, -30, 60.5, 1.9)
pt3dadd(-605.5, -31, 60.5, 1.1)
pt3dadd(-606.5, -31, 60.5, 1.1)
pt3dadd(-608, -31, 60.5, 1.1)
pt3dadd(-608, -29.5, 62, 3.4)
pt3dadd(-610, -28.5, 62, 3.6)
pt3dadd(-613, -27.5, 62, 2)
pt3dadd(-616, -26, 62, 1.2)
pt3dadd(-618.5, -25, 62, 1.1)
pt3dadd(-620.5, -23.5, 62, 1.3)
pt3dadd(-622.5, -22.5, 69, 2)
pt3dadd(-625, -22, 66, 3.7)
pt3dadd(-626.5, -22, 66, 5.2)
pt3dadd(-629, -22, 72, 2.8)
pt3dadd(-634.5, -21.5, 64.5, 2.9)
pt3dadd(-638, -21.5, 72, 2.3)
pt3dadd(-639, -21, 72, 3.1)
pt3dadd(-642.5, -19, 70, 1.9)
pt3dadd(-644, -18.5, 70, 1.1)
pt3dadd(-645, -17.5, 70, 1.6)
pt3dadd(-646, -15, 72, 2.4)
pt3dadd(-648, -15, 72, 3.7)
pt3dadd(-650, -15, 72, 3.3)
pt3dadd(-652, -15, 72, 1.4)
pt3dadd(-654, -12, 72, 1.8)
pt3dadd(-655.5, -11.5, 72, 2.7)
pt3dadd(-658, -9.5, 72, 3.8)
pt3dadd(-660, -9.5, 72, 4.1)
pt3dadd(-663, -9, 73.5, 3.1)
pt3dadd(-665.5, -7.5, 73.5, 1.3)
pt3dadd(-669, -7.5, 73.5, 1.7)
pt3dadd(-670, -6.5, 73.5, 1.7)
pt3dadd(-671.5, -6.5, 75.5, 3.1)
pt3dadd(-674, -6.5, 77, 3.6)
pt3dadd(-676, -7, 77, 2.8)
pt3dadd(-678.5, -6.5, 77, 1.6)
pt3dadd(-681.5, -6.5, 79, 1.6)
pt3dadd(-683, -6.5, 79, 1.6)
pt3dadd(-685, -6.5, 80.5, 3.6)
pt3dadd(-689.5, -6, 79, 1.4)
pt3dadd(-691, -4.5, 79, 1.3)
pt3dadd(-693.5, -4.5, 79, 1.3)
pt3dadd(-695, -4, 79, 1.3)
pt3dadd(-699, -4, 84.5, 4.5)
pt3dadd(-701.5, -3, 79, 3.8)
pt3dadd(-703.5, -2, 80.5, 2.5)
pt3dadd(-707, 0, 80.5, 1.4)
pt3dadd(-710, 2, 80.5, 1.4)
pt3dadd(-713, 4.5, 80.5, 1.5)
pt3dadd(-713.5, 6.5, 82.5, 1.4)
pt3dadd(-716, 9, 82.5, 1.4)
pt3dadd(-718.5, 10.5, 82.5, 1.5)
pt3dadd(-719, 9, 84.5, 4.7)
pt3dadd(-719.5, 5, 86, 2.1)
pt3dadd(-722.5, 4, 84.5, 1.5)
pt3dadd(-723.5, 7, 84.5, 1.5)
pt3dadd(-726.5, 9.5, 84.5, 1.6)
pt3dadd(-727, 11, 84.5, 1.6)
pt3dadd(-729.5, 9, 84.5, 1.6)
pt3dadd(-731, 9.5, 90.5, 1.9)
pt3dadd(-733.5, 11, 89, 1.9)
pt3dadd(-735, 12.5, 90.5, 2.7)
pt3dadd(-736.5, 12, 90.5, 3.7)
pt3dadd(-738, 13, 90.5, 3.9)
pt3dadd(-741, 13.5, 90.5, 2.9)
pt3dadd(-742.5, 15, 90.5, 2.3)
pt3dadd(-745, 15, 90.5, 1.6)
pt3dadd(-747, 16.5, 92, 1.4)
pt3dadd(-749, 17.5, 92, 2.3)
pt3dadd(-752, 18.5, 93.5, 2.7)
pt3dadd(-754, 20, 92, 1.1)
pt3dadd(-755, 21.5, 95, 1.1)
pt3dadd(-756.5, 23, 95, 1.1)
pt3dadd(-759, 23.5, 96.5, 1.8)
pt3dadd(-762, 22.5, 96.5, 1.5)
pt3dadd(-765, 23, 96.5, 1.3)
pt3dadd(-766.5, 22.5, 98, 2.1)
pt3dadd(-769, 23, 98, 1.5)
pt3dadd(-772.5, 24, 101, 0.9)
pt3dadd(-773.5, 24.5, 101, 0.9)
pt3dadd(-775, 25.5, 101, 0.9)
pt3dadd(-776.5, 26, 101, 0.7)
pt3dadd(-777.5, 28, 101, 1.1)
pt3dadd(-777.5, 30.5, 101, 1.1)
pt3dadd(-779, 30.5, 101, 1.1)
pt3dadd(-780, 29.5, 101, 1.1)
pt3dadd(-781, 29.5, 101, 2.1)
pt3dadd(-784, 31.5, 101, 4.1)
pt3dadd(-786, 30.5, 101, 4.1)
pt3dadd(-789, 30.5, 101, 4.1)
pt3dadd(-793, 31, 107, 4.1)
pt3dadd(-796, 30, 105, 0.9)
pt3dadd(-799.5, 29.5, 107, 1.5)
pt3dadd(-801.5, 29, 107, 2.8)
pt3dadd(-803, 29, 107, 3.6)
pt3dadd(-806.5, 29, 107, 2.9)
pt3dadd(-809.5, 28.5, 107, 0.8)
pt3dadd(-811.5, 28.5, 107, 1)
pt3dadd(-814, 28.5, 109, 1.4)
pt3dadd(-815.5, 28.5, 111, 2.7)
pt3dadd(-819, 28.5, 111, 2.1)
pt3dadd(-820.5, 28.5, 111, 0.6)
pt3dadd(-823.5, 31, 113, 0.6)
pt3dadd(-825.5, 31, 115, 2.5)
pt3dadd(-826, 31, 115, 3.8)
}
dend[141] {pt3dclear()
pt3dadd(-826, 31, 115, 3.8)
pt3dadd(-831, 34, 113, 0.1)
pt3dadd(-832, 34, 115, 0.1)
pt3dadd(-834.5, 34.5, 119, 0.1)
pt3dadd(-839, 36, 113, 0.1)
pt3dadd(-841, 35.5, 119, 0.8)
pt3dadd(-842.5, 36.5, 111, 1.3)
pt3dadd(-844, 36.5, 111, 0.6)
pt3dadd(-847, 36.5, 111, 0.2)
pt3dadd(-849.5, 36.5, 113, 0.2)
pt3dadd(-849, 36.5, 117, 1.2)
pt3dadd(-852, 37, 115, 0.3)
pt3dadd(-855, 37.5, 115, 0.3)
pt3dadd(-856, 37.5, 117, 2.1)
pt3dadd(-862, 37.5, 111, 0.1)
pt3dadd(-863.5, 37.5, 115, 0.1)
pt3dadd(-867, 39.5, 117, 0.1)
pt3dadd(-870.5, 39.5, 117, 0.1)
pt3dadd(-873.5, 39.5, 117, 0.1)
pt3dadd(-875.5, 39.5, 117, 0.1)
pt3dadd(-877.5, 39.5, 117, 0.1)
pt3dadd(-880.5, 39.5, 121, 0.5)
pt3dadd(-883.5, 39.5, 117, 0.1)
pt3dadd(-886, 40, 117, 0.1)
pt3dadd(-886, 41, 123, 0.6)
pt3dadd(-887.5, 41.5, 117, 0.1)
pt3dadd(-888.5, 42, 117, 0.1)
pt3dadd(-889, 43, 121, 1.7)
pt3dadd(-893.5, 43, 115, 0.1)
pt3dadd(-894.5, 43.5, 121, 1.3)
pt3dadd(-898, 45, 121, 0.1)
pt3dadd(-900, 45, 121, 0.1)
pt3dadd(-902.5, 45, 133, 0.1)
pt3dadd(-904, 45, 111, 1.2)
pt3dadd(-906.5, 44, 113, 0.1)
pt3dadd(-910, 44, 113, 0.1)
pt3dadd(-912.5, 43, 111, 1.6)
pt3dadd(-915, 43, 107, 0.1)
pt3dadd(-917, 43, 109, 0.1)
pt3dadd(-919, 44, 111, 1.1)
pt3dadd(-919.5, 44.5, 117, 0.1)
pt3dadd(-923, 46, 113, 0.1)
pt3dadd(-927.5, 46, 115, 0.1)
pt3dadd(-928.5, 49, 119, 1.7)
pt3dadd(-931.5, 47.5, 103, 0.1)
pt3dadd(-934, 47.5, 107, 0.1)
pt3dadd(-936, 49, 109, 0.1)
pt3dadd(-937.5, 49, 113, 0.7)
pt3dadd(-941.5, 49, 111, 0.1)
pt3dadd(-943.5, 49, 111, 0.1)
pt3dadd(-945, 48, 113, 0.9)
pt3dadd(-947.5, 48, 109, 0.1)
pt3dadd(-948.5, 48, 115, 1.6)
pt3dadd(-951, 48, 111, 0.1)
pt3dadd(-952.5, 49, 111, 0.1)
pt3dadd(-954, 49.5, 113, 0.9)
pt3dadd(-954.5, 49.5, 113, 1.1)
pt3dadd(-955, 49.5, 113, 1.1)
pt3dadd(-958.5, 49, 101, 0.1)
pt3dadd(-959.5, 48.5, 109, 1.1)
pt3dadd(-961.5, 48.5, 109, 0.1)
pt3dadd(-962, 48.5, 109, 0.1)
pt3dadd(-963, 49, 109, 0.7)
pt3dadd(-965, 49.5, 111, 0.9)
pt3dadd(-966, 48, 115, 0.1)
pt3dadd(-967.5, 48, 111, 0.1)
pt3dadd(-969, 48, 117, 0.7)
pt3dadd(-971, 49, 107, 0.1)
pt3dadd(-973, 49.5, 109, 0.1)
pt3dadd(-974, 50.5, 117, 1.3)
pt3dadd(-976, 51, 113, 0.1)
pt3dadd(-978, 52.5, 115, 0.1)
}
}
proc shape3d_42() {
dend[141] { pt3dadd(-978.5, 53.5, 115, 0.9)
pt3dadd(-979.5, 54, 109, 0.1)
pt3dadd(-980.5, 60, 109, 0.1)
}
dend[142] {pt3dclear()
pt3dadd(-826, 31, 115, 3.8)
pt3dadd(-830, 29.5, 109, 0.6)
pt3dadd(-831.5, 29.5, 109, 0.6)
pt3dadd(-832.5, 28.5, 113, 2.8)
pt3dadd(-834.5, 28.5, 113, 4.6)
pt3dadd(-837, 27, 113, 2.1)
pt3dadd(-838.5, 26.5, 113, 0.9)
pt3dadd(-842, 25.5, 111, 1.1)
pt3dadd(-844, 23.5, 113, 1.1)
pt3dadd(-846, 23.5, 113, 1.8)
pt3dadd(-848, 22, 113, 3.1)
pt3dadd(-850, 22, 113, 2.1)
pt3dadd(-853, 19, 113, 1.5)
pt3dadd(-856, 17, 113, 1.3)
pt3dadd(-858.5, 16.5, 113, 1.5)
pt3dadd(-860, 14.5, 113, 2.5)
pt3dadd(-862.5, 13, 119, 1.8)
pt3dadd(-864, 11, 119, 1.1)
pt3dadd(-866.5, 10, 117, 1)
pt3dadd(-868.5, 8.5, 119, 2.7)
pt3dadd(-870, 8, 119, 2.7)
pt3dadd(-872, 5.5, 117, 2.2)
pt3dadd(-874, 5.5, 117, 1.6)
pt3dadd(-876, 5, 117, 0.9)
pt3dadd(-878, 3, 117, 0.9)
pt3dadd(-881, 1.5, 119, 2.4)
pt3dadd(-882.5, 0.5, 119, 2.4)
pt3dadd(-885, -1, 117, 1.6)
pt3dadd(-887.5, -1.5, 119, 1.7)
pt3dadd(-888, -4.5, 119, 2.5)
pt3dadd(-890.5, -6, 121, 2.5)
pt3dadd(-896, -6.5, 121, 1)
pt3dadd(-897.5, -7.5, 121, 1.4)
pt3dadd(-901, -9, 124, 1.1)
pt3dadd(-905, -10, 122.5, 1.1)
pt3dadd(-906.5, -12, 121, 1.1)
pt3dadd(-908.5, -15, 121, 1.4)
pt3dadd(-911, -15, 121, 1.2)
pt3dadd(-912.5, -16.5, 121, 0.7)
pt3dadd(-917.5, -15.5, 121, 0.5)
pt3dadd(-920, -14, 124, 0.5)
pt3dadd(-922.5, -15, 124, 2.9)
pt3dadd(-925, -15.5, 124, 3.1)
pt3dadd(-930, -16.5, 121, 1)
pt3dadd(-931, -18.5, 121, 0.3)
pt3dadd(-933, -18.5, 121, 0.3)
pt3dadd(-934, -21, 127.5, 3.4)
pt3dadd(-936, -21, 125, 3)
pt3dadd(-939, -23, 122.5, 1.3)
pt3dadd(-941, -24.5, 122.5, 1.6)
pt3dadd(-943, -25.5, 122.5, 2)
pt3dadd(-946, -25.5, 122.5, 2)
pt3dadd(-946.5, -28.5, 122.5, 2)
pt3dadd(-944, -26.5, 122.5, 1.3)
pt3dadd(-947, -24, 126.5, 1.3)
pt3dadd(-949, -24.5, 125, 1.6)
pt3dadd(-948.5, -27, 126.5, 3.4)
pt3dadd(-950.5, -30, 125, 1.8)
pt3dadd(-953.5, -30, 125, 1.7)
pt3dadd(-957, -29.5, 133, 1.2)
pt3dadd(-958, -30, 134.5, 2.4)
pt3dadd(-960, -30, 134.5, 2.8)
pt3dadd(-962, -30, 134.5, 1.3)
pt3dadd(-963.5, -33, 134.5, 1)
pt3dadd(-967, -35, 135.5, 1.2)
pt3dadd(-969.5, -36.5, 135.5, 1.2)
pt3dadd(-972, -36.5, 135.5, 0.4)
pt3dadd(-974.5, -39.5, 134.5, 0.4)
pt3dadd(-976, -39.5, 134.5, 2.6)
pt3dadd(-976, -39.5, 135.5, 3.3)
pt3dadd(-979.5, -39.5, 135.5, 1.4)
pt3dadd(-980.5, -39.5, 137, 0.7)
pt3dadd(-982.5, -40, 137, 0.7)
pt3dadd(-984, -39, 137, 0.7)
pt3dadd(-984.5, -41.5, 139.5, 0.7)
pt3dadd(-985, -42, 142, 0.6)
}
dend[143] {pt3dclear()
pt3dadd(-533.5, -55, 46, 8)
pt3dadd(-538.5, -59, 43.5, 1.7)
pt3dadd(-542, -60.5, 43.5, 2.1)
pt3dadd(-547, -61.5, 43.5, 1.9)
pt3dadd(-551, -62, 44.5, 3)
pt3dadd(-551.5, -62, 46, 3.7)
pt3dadd(-554, -63, 46, 4.7)
pt3dadd(-553.5, -63, 46, 4.7)
pt3dadd(-565.5, -69, 46, 6.5)
pt3dadd(-583.5, -71.5, 47.5, 5.3)
pt3dadd(-585, -71.5, 56, 3.3)
pt3dadd(-587, -71.5, 57.5, 4.7)
}
dend[144] {pt3dclear()
pt3dadd(-587, -71.5, 57.5, 4.7)
pt3dadd(-590.5, -69.5, 66, 2.8)
pt3dadd(-593.5, -66, 57.5, 1.9)
pt3dadd(-596, -65, 60.5, 3.6)
pt3dadd(-600, -64, 73.5, 2.8)
pt3dadd(-604, -64, 73.5, 2.8)
pt3dadd(-607, -61.5, 57.5, 2.8)
pt3dadd(-609.5, -62, 57.5, 4.6)
pt3dadd(-611.5, -62, 57.5, 2.9)
pt3dadd(-614, -62, 57.5, 0.7)
pt3dadd(-616, -62.5, 57.5, 1.3)
pt3dadd(-618, -62.5, 57.5, 1.9)
pt3dadd(-619.5, -61, 61.5, 2.5)
pt3dadd(-622.5, -61, 61.5, 4.6)
pt3dadd(-625.5, -61, 61.5, 2.4)
pt3dadd(-627, -61, 61.5, 1.6)
pt3dadd(-628, -61, 61.5, 1.2)
pt3dadd(-631, -61, 61.5, 1.2)
pt3dadd(-633.5, -61, 63, 2.7)
pt3dadd(-636.5, -61, 65, 4.6)
pt3dadd(-641, -61, 63, 1.5)
pt3dadd(-642, -61, 63, 1.3)
pt3dadd(-646, -62.5, 63, 1.4)
pt3dadd(-648, -62.5, 63, 1.5)
pt3dadd(-651, -62.5, 63, 1.6)
pt3dadd(-654.5, -64, 68.5, 1.7)
pt3dadd(-660, -65.5, 73, 2.4)
pt3dadd(-659.5, -66.5, 73, 1.6)
pt3dadd(-660.5, -68.5, 73, 1.6)
pt3dadd(-662.5, -69.5, 70, 1.6)
pt3dadd(-664.5, -69, 70, 2.3)
pt3dadd(-665.5, -68.5, 71.5, 3.7)
pt3dadd(-668.5, -67, 73, 4.9)
pt3dadd(-672, -67, 73, 3.4)
pt3dadd(-674, -68, 73, 1.7)
pt3dadd(-674, -68.5, 73, 0.7)
pt3dadd(-676, -69.5, 73, 0.7)
pt3dadd(-676, -68, 73, 1.1)
pt3dadd(-677, -67, 73, 1.4)
pt3dadd(-679.5, -68, 73, 2.1)
pt3dadd(-681.5, -68.5, 73, 2.2)
pt3dadd(-683, -69, 73, 2.5)
pt3dadd(-683, -70.5, 79, 3.4)
pt3dadd(-685, -72, 79, 4.6)
pt3dadd(-688, -72.5, 76, 2.8)
pt3dadd(-689.5, -72.5, 76, 1.7)
pt3dadd(-690, -72.5, 76, 0.9)
pt3dadd(-693, -73, 79, 0.9)
pt3dadd(-694.5, -72.5, 79, 2.2)
pt3dadd(-696.5, -73.5, 79, 3.4)
pt3dadd(-700, -74.5, 79, 2)
pt3dadd(-702, -74.5, 79, 1.3)
pt3dadd(-704.5, -74.5, 79, 1.3)
pt3dadd(-707.5, -77, 79, 1.3)
pt3dadd(-708.5, -77.5, 79, 1.7)
pt3dadd(-710, -79, 79, 2.9)
pt3dadd(-711, -80.5, 79, 3.1)
pt3dadd(-711, -81.5, 79, 3.4)
pt3dadd(-714, -82.5, 79, 2.4)
pt3dadd(-715, -83, 79, 1.7)
pt3dadd(-717, -85, 82, 1.2)
pt3dadd(-720.5, -86.5, 82, 1.6)
pt3dadd(-721.5, -88.5, 82, 1.9)
pt3dadd(-723.5, -88, 82, 3.6)
pt3dadd(-725.5, -88.5, 83.5, 4.4)
pt3dadd(-728.5, -88.5, 83.5, 4.8)
pt3dadd(-732, -92, 81.5, 2.5)
pt3dadd(-734.5, -92, 79.5, 1.3)
pt3dadd(-734, -94, 79.5, 3.2)
pt3dadd(-736, -94, 79.5, 4.1)
pt3dadd(-739.5, -95.5, 85.5, 1.3)
pt3dadd(-741, -95.5, 85.5, 1.3)
pt3dadd(-742.5, -97.5, 85.5, 2.9)
pt3dadd(-745, -97.5, 85.5, 3.5)
pt3dadd(-747, -97.5, 85.5, 1.5)
pt3dadd(-748, -97.5, 85.5, 0.9)
pt3dadd(-751, -97.5, 89.5, 0.6)
pt3dadd(-751, -99, 87.5, 0.7)
pt3dadd(-755.5, -100.5, 87.5, 0.8)
pt3dadd(-756, -101, 87.5, 2.6)
pt3dadd(-756.5, -102.5, 89.5, 3.4)
pt3dadd(-758.5, -102.5, 89.5, 1.4)
pt3dadd(-761.5, -102.5, 89.5, 1)
pt3dadd(-763.5, -103, 89.5, 1)
pt3dadd(-765, -103, 89.5, 2.9)
pt3dadd(-767.5, -103, 89.5, 4)
pt3dadd(-769.5, -106, 89.5, 2.8)
pt3dadd(-771, -108, 89.5, 2.2)
pt3dadd(-774.5, -112.5, 97.5, 1.3)
pt3dadd(-775, -114.5, 97.5, 0.9)
pt3dadd(-776, -117, 97.5, 0.9)
pt3dadd(-778.5, -118, 99.5, 1.4)
pt3dadd(-781, -119.5, 99.5, 1.4)
pt3dadd(-782.5, -122, 99.5, 1.4)
pt3dadd(-782.5, -123, 101.5, 3.2)
pt3dadd(-786.5, -125.5, 99.5, 2.7)
pt3dadd(-790.5, -128, 99.5, 0.8)
pt3dadd(-792, -131, 99.5, 2.8)
pt3dadd(-794, -133.5, 99.5, 2.4)
pt3dadd(-796, -133.5, 99.5, 1.6)
pt3dadd(-797.5, -134.5, 99.5, 1)
pt3dadd(-799.5, -134.5, 97.5, 1)
pt3dadd(-803, -138, 99.5, 1)
pt3dadd(-804.5, -138, 101.5, 1.4)
pt3dadd(-808, -138, 103.5, 1.6)
pt3dadd(-810.5, -139.5, 101.5, 1.1)
pt3dadd(-810.5, -142, 101.5, 1.6)
pt3dadd(-813.5, -145.5, 101.5, 1.6)
pt3dadd(-816, -150.5, 103.5, 1.3)
}
}
proc shape3d_43() {
dend[144] { pt3dadd(-818.5, -153.5, 106, 0.6)
pt3dadd(-819, -156.5, 106, 1.1)
pt3dadd(-820.5, -157, 106, 1.3)
pt3dadd(-820.5, -159, 106, 1.3)
pt3dadd(-820.5, -161, 106, 1.9)
pt3dadd(-820.5, -163.5, 107.5, 2.5)
pt3dadd(-821.5, -165, 107.5, 1.1)
pt3dadd(-822.5, -166.5, 107.5, 0.5)
pt3dadd(-822.5, -168.5, 107.5, 0.5)
pt3dadd(-821.5, -171, 108.5, 2.7)
pt3dadd(-821, -172.5, 110, 4.1)
pt3dadd(-821.5, -175.5, 110, 1.6)
pt3dadd(-822, -179, 110, 1)
pt3dadd(-823.5, -179, 110, 1)
pt3dadd(-827.5, -179.5, 110, 1.2)
pt3dadd(-830, -183, 110, 1.7)
pt3dadd(-832.5, -184.5, 110, 1.1)
pt3dadd(-834.5, -186.5, 108.5, 0.4)
pt3dadd(-835, -186.5, 108.5, 0.4)
pt3dadd(-836.5, -186.5, 108.5, 2)
pt3dadd(-838, -186.5, 108.5, 2.5)
pt3dadd(-839, -186.5, 108.5, 1.2)
pt3dadd(-841, -186.5, 108.5, 0.4)
pt3dadd(-845, -186, 108.5, 0.5)
pt3dadd(-848, -185.5, 110, 1.5)
pt3dadd(-848.5, -182.5, 110, 1.8)
pt3dadd(-850, -181.5, 110, 1.8)
pt3dadd(-847, -181.5, 110, 1.8)
pt3dadd(-847, -181.5, 115, 2)
pt3dadd(-847, -186, 114, 1.9)
pt3dadd(-849, -186, 115, 1.2)
pt3dadd(-851, -187, 116.5, 1.4)
pt3dadd(-853, -188.5, 116.5, 1.4)
pt3dadd(-854.5, -188.5, 118, 1.9)
pt3dadd(-856, -192, 119, 1.2)
pt3dadd(-857, -192.5, 119, 0.9)
pt3dadd(-860, -195.5, 119, 0.9)
pt3dadd(-862.5, -196.5, 124.5, 0.9)
pt3dadd(-864, -200.5, 127, 1.2)
}
dend[145] {pt3dclear()
pt3dadd(-587, -71.5, 57.5, 4.7)
pt3dadd(-590.5, -71.5, 60.5, 0.1)
pt3dadd(-591.5, -72, 63.5, 2.8)
pt3dadd(-595, -72, 63.5, 0.1)
pt3dadd(-596, -73.5, 63.5, 0.1)
pt3dadd(-597, -74, 63.5, 2.1)
pt3dadd(-598, -74, 63.5, 3.4)
pt3dadd(-599, -76, 63.5, 1.6)
pt3dadd(-601, -76, 63.5, 0.1)
pt3dadd(-604.5, -76, 63.5, 0.1)
pt3dadd(-609, -76.5, 63.5, 0.1)
pt3dadd(-609.5, -76.5, 63.5, 3.2)
pt3dadd(-612.5, -76.5, 63.5, 0.1)
pt3dadd(-616, -75.5, 63.5, 0.1)
pt3dadd(-618, -74.5, 62, 0.1)
pt3dadd(-621, -72, 62, 0.7)
pt3dadd(-624.5, -72, 63.5, 3.2)
pt3dadd(-627.5, -72, 63.5, 0.1)
pt3dadd(-629.5, -72, 63.5, 0.1)
pt3dadd(-631.5, -72, 63.5, 2.3)
pt3dadd(-632.5, -72, 63.5, 2.1)
pt3dadd(-634.5, -71, 63.5, 1.3)
pt3dadd(-635.5, -71, 63.5, 0.2)
pt3dadd(-637.5, -71, 63.5, 0.1)
pt3dadd(-639.5, -72, 63.5, 0.7)
pt3dadd(-640, -72, 63.5, 1.2)
pt3dadd(-641.5, -72, 62, 0.3)
pt3dadd(-643, -70.5, 72, 0.2)
}
dend[146] {pt3dclear()
pt3dadd(-16, -1.5, -3, 8.5)
pt3dadd(-23.5, -3.5, -2, 8.5)
pt3dadd(-26.5, -8.5, -2, 9.7)
pt3dadd(-32.5, -8.5, -2, 9.7)
pt3dadd(-36.5, -8.5, -3, 8.8)
pt3dadd(-40.5, -11.5, -3, 8.8)
pt3dadd(-46, -15, -2, 9.5)
pt3dadd(-51.5, -17, -2, 8.9)
pt3dadd(-56, -20, -2, 8.5)
pt3dadd(-61, -20.5, -2, 9)
pt3dadd(-64.5, -22, -2, 8.5)
pt3dadd(-69, -23.5, -2, 7.5)
pt3dadd(-74, -24, -2, 8.5)
pt3dadd(-78.5, -24.5, -1, 9.5)
pt3dadd(-82, -26.5, -1, 9.7)
pt3dadd(-85.5, -27, -1, 8.3)
pt3dadd(-90, -27.5, -5, 7.3)
pt3dadd(-92.5, -29.5, -2, 6.3)
pt3dadd(-97.5, -30, -3, 7.4)
pt3dadd(-101, -31.5, -5.5, 7.2)
pt3dadd(-108, -33, -8.5, 8)
pt3dadd(-112, -36.5, -8.5, 7.3)
pt3dadd(-116.5, -38.5, -7.5, 6)
pt3dadd(-120.5, -41, -8.5, 6.6)
pt3dadd(-124.5, -45, -8.5, 8.8)
}
dend[147] {pt3dclear()
pt3dadd(-124.5, -45, -8.5, 8.8)
pt3dadd(-124.5, -48.5, -11, 3)
pt3dadd(-126, -54, -11, 3.7)
pt3dadd(-128, -58.5, -14, 3.8)
pt3dadd(-127.5, -61.5, -14, 4.3)
pt3dadd(-129, -64, -14, 3.1)
pt3dadd(-130, -65.5, -16.5, 3.4)
pt3dadd(-132.5, -66.5, -15.5, 4.2)
pt3dadd(-134, -69.5, -15.5, 4.7)
pt3dadd(-137, -70, -15.5, 4.1)
pt3dadd(-139, -73, -15.5, 4.6)
pt3dadd(-141, -75, -16.5, 4.9)
pt3dadd(-145, -78, -16.5, 4.4)
pt3dadd(-147.5, -79.5, -16.5, 5.2)
pt3dadd(-150.5, -82, -19, 5.6)
pt3dadd(-154, -83.5, -19, 5.9)
pt3dadd(-157.5, -85, -17.5, 5.7)
pt3dadd(-164, -89.5, -15.5, 4.5)
pt3dadd(-170, -93.5, -15.5, 4.5)
pt3dadd(-176, -95, -15.5, 5.3)
pt3dadd(-182, -99.5, -15.5, 4.5)
pt3dadd(-184.5, -102, -16, 3.6)
pt3dadd(-188, -102.5, -15.5, 3.1)
pt3dadd(-191, -105, -16.5, 3.5)
pt3dadd(-195, -106.5, -16, 3.8)
pt3dadd(-200, -109.5, -16, 4.3)
pt3dadd(-203, -112, -17.5, 4.6)
pt3dadd(-207, -114, -16.5, 4.9)
pt3dadd(-210, -117.5, -17.5, 4.9)
pt3dadd(-213.5, -120.5, -17.5, 5.6)
pt3dadd(-215.5, -121.5, -16.5, 5.3)
pt3dadd(-217.5, -123, -18.5, 5.4)
pt3dadd(-220, -127, -18, 5.4)
pt3dadd(-222, -130.5, -18, 5.4)
pt3dadd(-225, -134, -18, 4.6)
pt3dadd(-228, -136.5, -17.5, 4.3)
pt3dadd(-229.5, -138.5, -18.5, 4.5)
pt3dadd(-230.5, -143.5, -18, 5)
pt3dadd(-232.5, -146, -18.5, 4.6)
pt3dadd(-234.5, -148.5, -18.5, 4.4)
pt3dadd(-234.5, -150.5, -18.5, 4.4)
pt3dadd(-234.5, -153.5, -19.5, 4.4)
pt3dadd(-236.5, -156, -18.5, 4)
pt3dadd(-237, -158, -20, 3.5)
pt3dadd(-239, -159.5, -20, 3.5)
pt3dadd(-239, -161.5, -18.5, 4.9)
pt3dadd(-239.5, -163, -20, 3.8)
pt3dadd(-240, -165.5, -20, 4.1)
pt3dadd(-240.5, -169, -20, 4.6)
pt3dadd(-240.5, -171, -20, 4.3)
pt3dadd(-240.5, -172.5, -20, 4.3)
pt3dadd(-240.5, -178, -21.5, 3.4)
pt3dadd(-242, -179.5, -21.5, 3.3)
pt3dadd(-242, -181.5, -21.5, 4)
pt3dadd(-245.5, -185, -20.5, 4.6)
pt3dadd(-248, -189.5, -23, 5.2)
pt3dadd(-250.5, -193, -23, 5.5)
pt3dadd(-252.5, -194, -16.5, 4.5)
pt3dadd(-254.5, -195, -23, 3.8)
pt3dadd(-257, -198.5, -23, 3.8)
pt3dadd(-258, -199.5, -23, 4.3)
pt3dadd(-259, -200.5, -23, 4.7)
pt3dadd(-260.5, -201.5, -23, 4.7)
pt3dadd(-261.5, -204.5, -23, 4.8)
pt3dadd(-262.5, -206.5, -23, 4.3)
pt3dadd(-264.5, -210, -29, 5.3)
pt3dadd(-266.5, -211.5, -29, 4.9)
pt3dadd(-268, -213.5, -29, 4.7)
pt3dadd(-270, -214.5, -29, 5.1)
pt3dadd(-270.5, -217, -29, 5.7)
pt3dadd(-271.5, -220, -29, 5.7)
pt3dadd(-273.5, -222, -29, 6.3)
}
dend[148] {pt3dclear()
pt3dadd(-273.5, -222, -29, 6.3)
pt3dadd(-276.5, -226, -35.5, 2.3)
pt3dadd(-278.5, -225, -41.5, 2.3)
pt3dadd(-279.5, -223.5, -41.5, 1.8)
pt3dadd(-281, -223.5, -41.5, 1.2)
pt3dadd(-282, -224, -41.5, 1.1)
pt3dadd(-282, -226, -41.5, 2.2)
pt3dadd(-282.5, -228, -41.5, 2.9)
pt3dadd(-283.5, -229.5, -41.5, 3.1)
pt3dadd(-284.5, -230.5, -48, 4.1)
pt3dadd(-286, -231, -48, 4.1)
pt3dadd(-287.5, -232, -48, 3.7)
pt3dadd(-290, -233.5, -48, 3.1)
pt3dadd(-290, -239.5, -51.5, 2.4)
pt3dadd(-290, -240.5, -49.5, 1.8)
pt3dadd(-290.5, -242.5, -49.5, 1.8)
pt3dadd(-292.5, -242.5, -49.5, 2.5)
pt3dadd(-294.5, -242.5, -49.5, 2.5)
pt3dadd(-294.5, -244.5, -51.5, 2.7)
pt3dadd(-294.5, -246, -51.5, 2.7)
pt3dadd(-295, -246.5, -53.5, 2)
pt3dadd(-295, -247.5, -53.5, 1.8)
pt3dadd(-298, -247.5, -53.5, 1.8)
pt3dadd(-299.5, -249.5, -57.5, 2.4)
pt3dadd(-302.5, -250, -55.5, 3.3)
pt3dadd(-305, -254.5, -57.5, 2.7)
pt3dadd(-306.5, -254.5, -55.5, 3.3)
pt3dadd(-309, -254.5, -55.5, 1.7)
pt3dadd(-314, -256.5, -61, 1.1)
pt3dadd(-316, -256.5, -61, 3.3)
pt3dadd(-319.5, -258.5, -55, 3.6)
pt3dadd(-322, -258.5, -55, 2)
pt3dadd(-324, -259.5, -58, 2.3)
pt3dadd(-325, -261, -61, 2.4)
pt3dadd(-324, -264.5, -61, 2.8)
pt3dadd(-325, -265.5, -61, 3.6)
}
}
proc shape3d_44() {
dend[148] { }
dend[149] {pt3dclear()
pt3dadd(-325, -265.5, -61, 3.6)
pt3dadd(-328.5, -266, -64, 0.1)
pt3dadd(-331, -266, -61, 0.1)
pt3dadd(-332, -266, -61, 0.1)
pt3dadd(-333.5, -266, -61, 0.1)
pt3dadd(-334, -266, -58, 1.6)
pt3dadd(-336.5, -266, -58, 0.1)
pt3dadd(-339, -264, -58, 0.1)
pt3dadd(-340, -264, -58, 1.1)
pt3dadd(-342.5, -264, -58, 0.1)
pt3dadd(-344, -264, -58, 0.1)
pt3dadd(-345.5, -264, -58, 0.9)
pt3dadd(-347, -263.5, -61, 0.1)
pt3dadd(-348, -263.5, -61, 0.1)
pt3dadd(-349.5, -263.5, -64, 0.4)
pt3dadd(-351.5, -263.5, -61, 0.1)
pt3dadd(-354, -264, -61, 0.1)
pt3dadd(-354.5, -263, -58, 0.1)
pt3dadd(-357, -263, -58, 0.1)
pt3dadd(-359.5, -262.5, -58, 0.1)
pt3dadd(-359.5, -262, -58, 0.1)
pt3dadd(-362, -261.5, -58, 0.1)
pt3dadd(-363.5, -260, -58, 1.1)
pt3dadd(-366, -260, -58, 0.1)
pt3dadd(-369, -260, -58, 0.1)
pt3dadd(-371, -260, -55, 2)
pt3dadd(-373.5, -260, -55, 1.7)
}
dend[150] {pt3dclear()
pt3dadd(-325, -265.5, -61, 3.6)
pt3dadd(-325, -269, -64, 3.2)
pt3dadd(-326, -270, -67, 2.5)
pt3dadd(-327, -272.5, -67, 2.7)
pt3dadd(-328, -273.5, -70, 3.3)
pt3dadd(-330.5, -273.5, -67, 4)
pt3dadd(-332, -273.5, -73, 4.1)
pt3dadd(-335, -274.5, -73, 3.2)
pt3dadd(-338, -276, -75.5, 2.5)
pt3dadd(-340, -276, -75.5, 2.3)
pt3dadd(-342.5, -277.5, -78.5, 1.9)
pt3dadd(-346, -278.5, -78.5, 1.8)
pt3dadd(-349.5, -280, -76, 2)
pt3dadd(-350.5, -283, -78.5, 4.5)
pt3dadd(-353, -283.5, -76, 3.9)
pt3dadd(-354.5, -286, -80.5, 2.4)
pt3dadd(-355.5, -290, -85.5, 2.7)
pt3dadd(-356.5, -293, -85.5, 2.6)
pt3dadd(-356.5, -294, -85.5, 2.8)
pt3dadd(-359.5, -294.5, -85.5, 2)
pt3dadd(-361, -294.5, -85.5, 2.5)
pt3dadd(-363, -294.5, -90, 2.8)
pt3dadd(-364.5, -294.5, -85.5, 3.3)
pt3dadd(-368.5, -296, -92.5, 2.7)
pt3dadd(-367, -296, -90, 2.7)
pt3dadd(-367, -292.5, -88, 2.2)
pt3dadd(-365, -294.5, -95, 2.6)
pt3dadd(-366, -300, -95, 1.6)
pt3dadd(-368, -300, -99.5, 1.6)
pt3dadd(-370, -301, -97.5, 1.5)
}
dend[151] {pt3dclear()
pt3dadd(-273.5, -222, -29, 6.3)
pt3dadd(-276, -226, -35.5, 5.2)
pt3dadd(-277.5, -227.5, -29, 3.3)
pt3dadd(-279, -229.5, -35.5, 2.5)
pt3dadd(-280, -230.5, -35.5, 2.4)
pt3dadd(-281, -233, -35.5, 2.4)
pt3dadd(-281, -234, -35.5, 2)
pt3dadd(-282, -236.5, -35.5, 2.5)
pt3dadd(-282.5, -239.5, -35.5, 2.3)
pt3dadd(-284, -241.5, -35.5, 2.4)
pt3dadd(-285, -244, -35.5, 2.8)
pt3dadd(-286.5, -247, -35.5, 4)
pt3dadd(-289.5, -250.5, -35.5, 5.5)
pt3dadd(-291, -252.5, -41.5, 5)
pt3dadd(-291, -254.5, -41.5, 4.5)
pt3dadd(-292.5, -256.5, -41.5, 3.1)
pt3dadd(-295.5, -257, -41.5, 2)
pt3dadd(-297, -259, -41.5, 2)
pt3dadd(-299, -260.5, -41.5, 2.3)
pt3dadd(-300.5, -262.5, -48, 1.9)
pt3dadd(-305, -265, -54, 2)
pt3dadd(-307, -268.5, -54, 3.8)
pt3dadd(-309.5, -270.5, -54, 3.8)
pt3dadd(-310.5, -271, -52, 3.1)
pt3dadd(-312, -272, -54, 2.5)
pt3dadd(-312.5, -274, -54, 2.1)
pt3dadd(-315, -273, -54, 1.4)
pt3dadd(-317, -273.5, -54, 1.2)
pt3dadd(-318, -275, -52, 1.4)
pt3dadd(-319, -277, -52, 2.6)
pt3dadd(-320.5, -279, -52, 3)
pt3dadd(-322, -280, -56, 3.4)
pt3dadd(-325.5, -280.5, -56, 2.9)
pt3dadd(-327.5, -281, -56, 2.3)
pt3dadd(-330, -282, -56, 2.3)
pt3dadd(-331.5, -283.5, -56, 3.6)
pt3dadd(-333.5, -287, -56, 4.8)
pt3dadd(-334.5, -289, -56, 4.6)
pt3dadd(-337, -289.5, -61.5, 3.8)
pt3dadd(-340, -290, -63.5, 2.9)
pt3dadd(-342, -292, -63.5, 2.3)
pt3dadd(-346.5, -295.5, -65.5, 2.3)
pt3dadd(-350, -297, -65.5, 2.8)
pt3dadd(-353, -298, -63.5, 2.8)
pt3dadd(-355.5, -299, -65.5, 2.4)
pt3dadd(-357, -300, -65.5, 3.4)
pt3dadd(-358.5, -301.5, -61.5, 4.7)
pt3dadd(-360.5, -301.5, -61.5, 5.3)
pt3dadd(-363, -302.5, -61.5, 3.5)
pt3dadd(-364, -303.5, -61.5, 2.1)
pt3dadd(-366, -304, -61.5, 1.4)
pt3dadd(-367.5, -305.5, -61.5, 1.4)
pt3dadd(-369, -308, -61.5, 3.1)
pt3dadd(-371, -309.5, -61.5, 2.5)
pt3dadd(-371.5, -311, -63.5, 3.9)
pt3dadd(-372.5, -312.5, -63.5, 2.9)
pt3dadd(-374, -314.5, -63.5, 2.2)
pt3dadd(-376, -316, -63.5, 1.8)
pt3dadd(-376, -317.5, -63.5, 1.7)
pt3dadd(-377, -320.5, -63.5, 1.9)
pt3dadd(-378.5, -320.5, -63.5, 2.4)
pt3dadd(-380, -323.5, -63.5, 3.3)
pt3dadd(-383, -326, -63.5, 4)
pt3dadd(-386, -328.5, -61.5, 3.7)
pt3dadd(-387.5, -331, -61.5, 3.3)
pt3dadd(-389, -334, -63.5, 4)
pt3dadd(-389.5, -337.5, -63.5, 3.2)
pt3dadd(-390, -339, -61.5, 2.5)
pt3dadd(-392, -339, -63.5, 1.9)
pt3dadd(-394, -341, -63.5, 1.5)
pt3dadd(-400, -345, -67.5, 1.4)
pt3dadd(-400.5, -346, -67.5, 2.1)
pt3dadd(-403, -349, -67.5, 3.5)
pt3dadd(-405.5, -350, -67.5, 2.5)
pt3dadd(-406.5, -353, -67.5, 0.8)
pt3dadd(-408.5, -353.5, -67.5, 0.9)
pt3dadd(-411.5, -357.5, -67.5, 0.9)
pt3dadd(-412, -358.5, -70.5, 1.7)
pt3dadd(-414, -360.5, -67.5, 2.2)
pt3dadd(-416, -362.5, -67.5, 2.7)
pt3dadd(-418, -365, -67.5, 3.4)
pt3dadd(-419.5, -368.5, -73.5, 3.7)
}
dend[152] {pt3dclear()
pt3dadd(-419.5, -368.5, -73.5, 3.7)
pt3dadd(-422.5, -372.5, -67.5, 0.1)
pt3dadd(-424.5, -374, -67.5, 0.1)
pt3dadd(-425, -376, -70.5, 0.1)
pt3dadd(-425, -378.5, -70.5, 1.1)
pt3dadd(-424.5, -380.5, -70.5, 2.4)
pt3dadd(-423.5, -382, -73.5, 3.8)
pt3dadd(-423.5, -383.5, -76.5, 0.6)
pt3dadd(-423.5, -386, -76.5, 0.8)
pt3dadd(-424, -386, -76.5, 0.8)
pt3dadd(-426, -387, -76.5, 0.9)
pt3dadd(-427, -388.5, -79.5, 0.9)
pt3dadd(-427, -390.5, -76.5, 1.5)
pt3dadd(-429, -391.5, -79.5, 2.1)
pt3dadd(-430.5, -392.5, -79.5, 1.5)
pt3dadd(-431.5, -393.5, -79.5, 0.9)
pt3dadd(-432.5, -394, -85, 0.6)
pt3dadd(-434, -395, -82, 0.6)
pt3dadd(-436, -396.5, -79.5, 0.6)
pt3dadd(-436.5, -398, -79.5, 1.9)
pt3dadd(-439, -399, -79.5, 2.8)
pt3dadd(-439.5, -401.5, -85, 2.8)
pt3dadd(-442.5, -403, -85, 1.4)
pt3dadd(-445, -404.5, -85, 0.9)
pt3dadd(-446.5, -406.5, -85, 1)
pt3dadd(-448, -407.5, -85, 1)
pt3dadd(-450, -410, -82, 1.6)
pt3dadd(-452.5, -410, -82, 1.1)
pt3dadd(-452.5, -412, -82, 1.1)
pt3dadd(-453.5, -413.5, -85, 0.7)
pt3dadd(-455.5, -415.5, -85, 1.1)
pt3dadd(-457.5, -417.5, -85, 1.3)
pt3dadd(-459, -418.5, -88, 1.7)
pt3dadd(-462, -421, -88, 1.1)
pt3dadd(-465, -422.5, -92.5, 0.1)
pt3dadd(-466, -423.5, -90, 0.1)
pt3dadd(-467, -424.5, -88, 1.7)
pt3dadd(-469, -426.5, -92.5, 1.1)
pt3dadd(-470.5, -427.5, -92.5, 0.3)
pt3dadd(-474, -429.5, -92.5, 0.3)
pt3dadd(-474.5, -431, -90, 1.2)
pt3dadd(-475, -432.5, -90, 2)
pt3dadd(-477.5, -432.5, -90, 0.8)
pt3dadd(-478, -434, -90, 0.1)
pt3dadd(-480, -435, -90, 0.1)
pt3dadd(-480, -437.5, -90, 1.3)
pt3dadd(-482.5, -439.5, -95, 0.1)
pt3dadd(-483, -441, -95, 0.1)
pt3dadd(-484.5, -444.5, -95, 2.3)
pt3dadd(-485.5, -446, -95, 0.3)
pt3dadd(-486.5, -447.5, -95, 0.3)
pt3dadd(-488.5, -450.5, -95, 2.8)
pt3dadd(-490.5, -451.5, -95, 1.5)
pt3dadd(-491.5, -453.5, -99.5, 0.4)
pt3dadd(-496, -455, -99.5, 0.4)
pt3dadd(-497.5, -457, -99.5, 0.4)
pt3dadd(-499, -459, -99.5, 2.7)
pt3dadd(-500.5, -461.5, -102, 0.7)
pt3dadd(-503.5, -463, -99.5, 0.7)
pt3dadd(-506.5, -464.5, -99.5, 0.7)
pt3dadd(-508, -465, -99.5, 2.7)
}
}
proc shape3d_45() {
dend[152] { pt3dadd(-508.5, -467, -99.5, 2.6)
pt3dadd(-511, -468, -99.5, 1.7)
pt3dadd(-512.5, -469.5, -107, 0.5)
pt3dadd(-513, -470.5, -107, 0.5)
pt3dadd(-515.5, -473.5, -102, 2.5)
pt3dadd(-519, -474.5, -104.5, 0.5)
pt3dadd(-522, -475, -104.5, 0.5)
pt3dadd(-525, -477.5, -111.5, 0.5)
pt3dadd(-527, -480, -107, 2.2)
pt3dadd(-528.5, -480, -107, 1.1)
pt3dadd(-530.5, -481, -107, 0.6)
pt3dadd(-533, -482.5, -107, 0.6)
pt3dadd(-534.5, -483.5, -107, 1.2)
pt3dadd(-536, -485, -107, 2.2)
pt3dadd(-539.5, -485.5, -111.5, 0.7)
pt3dadd(-540.5, -488, -111.5, 1)
pt3dadd(-543.5, -488, -111.5, 1)
pt3dadd(-546, -490.5, -111.5, 0.9)
pt3dadd(-547, -493, -111.5, 0.2)
}
dend[153] {pt3dclear()
pt3dadd(-419.5, -368.5, -73.5, 3.7)
pt3dadd(-422.5, -371.5, -70.5, 0.6)
pt3dadd(-424, -371.5, -70.5, 1.2)
pt3dadd(-426.5, -375.5, -73.5, 1.5)
pt3dadd(-428, -376, -70.5, 1.5)
pt3dadd(-429, -379, -70.5, 2.3)
pt3dadd(-430, -380, -70.5, 2.8)
pt3dadd(-432, -380.5, -70.5, 1.3)
pt3dadd(-433.5, -381, -70.5, 0.9)
pt3dadd(-435, -383, -70.5, 0.9)
pt3dadd(-436.5, -384, -70.5, 0.7)
pt3dadd(-438, -385.5, -70.5, 0.7)
pt3dadd(-439, -387.5, -70.5, 1.4)
pt3dadd(-440.5, -390, -70.5, 2.4)
pt3dadd(-443, -392, -70.5, 1.1)
pt3dadd(-444.5, -392, -70.5, 0.7)
pt3dadd(-446, -392.5, -70.5, 0.6)
pt3dadd(-446, -394, -70.5, 0.6)
pt3dadd(-447, -395.5, -70.5, 1.5)
pt3dadd(-448, -397.5, -67.5, 3.3)
pt3dadd(-449.5, -399, -73.5, 4.1)
pt3dadd(-452, -400, -70.5, 1.7)
pt3dadd(-453, -400, -70.5, 0.8)
pt3dadd(-455, -402, -70.5, 1)
pt3dadd(-459.5, -405.5, -70.5, 0.9)
pt3dadd(-461.5, -406, -70.5, 0.9)
pt3dadd(-463.5, -407.5, -73.5, 1.1)
pt3dadd(-464.5, -409, -73.5, 1.1)
pt3dadd(-466.5, -410.5, -70.5, 1.6)
pt3dadd(-468, -412.5, -73.5, 2.4)
pt3dadd(-469.5, -414, -73.5, 3.8)
pt3dadd(-473, -417, -73.5, 2)
pt3dadd(-474.5, -420, -70.5, 1.1)
pt3dadd(-476, -420.5, -73.5, 0.6)
pt3dadd(-477.5, -424, -73.5, 0.8)
pt3dadd(-478, -426, -70.5, 2.5)
pt3dadd(-479.5, -428, -70.5, 3.6)
pt3dadd(-480.5, -431, -70.5, 1.2)
pt3dadd(-482, -433, -73.5, 0.7)
pt3dadd(-485, -435, -73.5, 0.7)
pt3dadd(-486.5, -437, -73.5, 1.4)
pt3dadd(-487, -439.5, -70.5, 2.7)
pt3dadd(-488.5, -441.5, -70.5, 1.5)
pt3dadd(-489.5, -444.5, -70.5, 0.7)
pt3dadd(-490, -446, -70.5, 1.9)
pt3dadd(-491, -447, -70.5, 3.4)
pt3dadd(-492, -448.5, -70.5, 2.1)
pt3dadd(-493, -450, -73.5, 1.1)
pt3dadd(-493.5, -451.5, -73.5, 0.9)
pt3dadd(-494, -453.5, -73.5, 1.1)
pt3dadd(-495, -456, -73.5, 1.3)
pt3dadd(-496, -457.5, -70.5, 1.3)
pt3dadd(-497.5, -459.5, -70.5, 0.7)
pt3dadd(-497.5, -461.5, -70.5, 0.8)
pt3dadd(-498.5, -463.5, -70.5, 0.8)
pt3dadd(-498.5, -466, -67.5, 1.6)
pt3dadd(-500.5, -467, -73.5, 2.7)
pt3dadd(-502, -470, -70.5, 1.6)
pt3dadd(-502.5, -471.5, -73.5, 0.7)
pt3dadd(-502.5, -473, -73.5, 0.6)
pt3dadd(-504, -475, -73.5, 0.9)
pt3dadd(-505, -476.5, -67.5, 1.2)
pt3dadd(-506, -476.5, -76.5, 0.5)
pt3dadd(-507.5, -479, -70.5, 1.2)
pt3dadd(-508.5, -480.5, -70.5, 2.6)
pt3dadd(-508.5, -481.5, -70.5, 4.3)
pt3dadd(-510.5, -485, -70.5, 2)
pt3dadd(-512.5, -487, -76.5, 0.7)
pt3dadd(-514.5, -489, -76.5, 0.7)
pt3dadd(-516, -489, -73.5, 2)
pt3dadd(-518.5, -491, -70.5, 2.6)
pt3dadd(-520, -491, -73.5, 1.3)
pt3dadd(-521.5, -492, -76.5, 0.3)
pt3dadd(-525, -495, -70.5, 0.3)
pt3dadd(-527.5, -497, -70.5, 1.6)
pt3dadd(-528, -497, -70.5, 2.5)
pt3dadd(-529.5, -498.5, -70.5, 1.2)
pt3dadd(-532, -501, -70.5, 0.8)
pt3dadd(-536, -502.5, -73.5, 0.8)
pt3dadd(-538, -503.5, -73.5, 0.8)
pt3dadd(-538.5, -505.5, -67.5, 1.4)
pt3dadd(-541, -509, -73.5, 3.7)
pt3dadd(-543.5, -509.5, -70.5, 2.4)
pt3dadd(-545.5, -512.5, -73.5, 0.9)
pt3dadd(-548, -514.5, -73.5, 0.7)
pt3dadd(-549, -516.5, -73.5, 0.7)
pt3dadd(-551.5, -517.5, -70.5, 1.5)
pt3dadd(-553, -521, -73.5, 2.7)
pt3dadd(-555, -521, -70.5, 2)
pt3dadd(-556, -522.5, -70.5, 0.8)
pt3dadd(-556.5, -525.5, -70.5, 0.8)
pt3dadd(-558.5, -526, -73.5, 1.3)
pt3dadd(-559.5, -528, -73.5, 1.9)
pt3dadd(-560.5, -529.5, -73.5, 1.4)
pt3dadd(-561, -531.5, -73.5, 0.8)
pt3dadd(-563, -533.5, -73.5, 0.5)
pt3dadd(-563, -535, -73.5, 0.5)
pt3dadd(-564.5, -536.5, -73.5, 2.6)
pt3dadd(-567.5, -539.5, -76.5, 3.3)
pt3dadd(-570.5, -540.5, -76.5, 2.6)
pt3dadd(-572, -542, -76.5, 1.1)
pt3dadd(-576, -546, -76.5, 1.1)
pt3dadd(-577.5, -547.5, -82, 1.2)
pt3dadd(-579, -549.5, -79.5, 2.7)
pt3dadd(-580.5, -550.5, -76.5, 1.1)
pt3dadd(-581.5, -552, -76.5, 0.3)
pt3dadd(-585.5, -555, -73.5, 0.3)
pt3dadd(-588.5, -558.5, -76.5, 0.3)
pt3dadd(-588.5, -560.5, -76.5, 0.3)
pt3dadd(-589.5, -563.5, -76.5, 1.7)
pt3dadd(-591, -564.5, -79.5, 2.5)
pt3dadd(-592, -566.5, -79.5, 1.5)
pt3dadd(-593.5, -569, -76.5, 0.9)
pt3dadd(-595.5, -572.5, -79.5, 0.1)
pt3dadd(-597, -576.5, -82, 0.1)
pt3dadd(-597.5, -578, -85, 0.9)
pt3dadd(-597, -579.5, -85, 0.9)
pt3dadd(-596, -581.5, -82, 0.4)
pt3dadd(-595, -583.5, -85, 0.4)
pt3dadd(-594.5, -583.5, -82, 1.2)
pt3dadd(-592.5, -585.5, -85, 0.9)
pt3dadd(-592.5, -586.5, -85, 0.6)
pt3dadd(-590.5, -587.5, -85, 0.5)
pt3dadd(-589.5, -588.5, -88, 0.7)
pt3dadd(-589, -589.5, -85, 1.6)
pt3dadd(-587.5, -592.5, -88, 0.8)
pt3dadd(-586, -596.5, -88, 0.8)
pt3dadd(-585, -599.5, -91, 1.2)
pt3dadd(-584, -603, -94, 1.2)
pt3dadd(-584, -607.5, -94, 1.2)
pt3dadd(-584, -610, -94, 1.2)
pt3dadd(-584, -613.5, -94, 1.2)
pt3dadd(-584, -616.5, -94, 1.2)
pt3dadd(-585.5, -619.5, -94, 0.7)
pt3dadd(-585.5, -622, -94, 0.6)
pt3dadd(-584.5, -624, -94, 0.6)
pt3dadd(-583.5, -626, -94, 0.6)
pt3dadd(-584.5, -628, -94, 0.6)
pt3dadd(-585.5, -629, -94, 0.6)
pt3dadd(-585, -632.5, -91, 1)
pt3dadd(-586, -633.5, -91, 1)
pt3dadd(-587.5, -636.5, -91, 0.6)
pt3dadd(-589.5, -636.5, -91, 0.6)
pt3dadd(-589.5, -638, -91, 0.6)
pt3dadd(-589.5, -640, -94, 1.4)
pt3dadd(-589.5, -643, -91, 2.1)
pt3dadd(-589, -646.5, -91, 1.4)
pt3dadd(-588, -646.5, -91, 0.3)
pt3dadd(-587, -648, -91, 0.3)
pt3dadd(-586.5, -649, -91, 1.6)
pt3dadd(-584, -652, -91, 0.7)
pt3dadd(-582.5, -654, -91, 1.4)
pt3dadd(-582, -654.5, -88, 1.6)
pt3dadd(-581, -656, -94, 0.9)
pt3dadd(-580, -658.5, -94, 0.9)
pt3dadd(-578, -659.5, -94, 0.7)
pt3dadd(-575, -661, -88, 1.1)
pt3dadd(-572.5, -661, -94, 0.9)
pt3dadd(-570, -661, -88, 0.4)
pt3dadd(-567.5, -659, -91, 0.3)
pt3dadd(-567.5, -662.5, -91, 0.1)
pt3dadd(-566.5, -662.5, -94, 0.1)
pt3dadd(-565, -664.5, -91, 0.1)
pt3dadd(-563.5, -664.5, -91, 0.1)
pt3dadd(-563, -666.5, -88, 0.1)
pt3dadd(-561, -667.5, -88, 0.1)
}
dend[154] {pt3dclear()
pt3dadd(-124.5, -45, -8.5, 8.8)
pt3dadd(-127.5, -45, -8.5, 6.5)
pt3dadd(-131, -48.5, -8.5, 5.8)
pt3dadd(-134, -50.5, -8.5, 5.7)
pt3dadd(-137, -52.5, -9.5, 4.9)
pt3dadd(-141, -54.5, -9.5, 4.1)
pt3dadd(-144, -57, -9.5, 6.3)
pt3dadd(-149, -58.5, -11, 8.1)
pt3dadd(-153.5, -60.5, -10, 7.9)
pt3dadd(-158.5, -60.5, -10, 7.3)
pt3dadd(-161.5, -60.5, -10, 6.3)
pt3dadd(-167, -63.5, -8.5, 6.3)
pt3dadd(-174.5, -63.5, -7.5, 6.3)
pt3dadd(-183.5, -67, -9.5, 6.3)
pt3dadd(-189.5, -67, -11.5, 5.8)
}
}
proc shape3d_46() {
dend[154] { pt3dadd(-194, -67, -10.5, 6.7)
pt3dadd(-197.5, -67.5, -12.5, 6.3)
pt3dadd(-202.5, -70.5, -12.5, 5.1)
pt3dadd(-206, -70.5, -12.5, 5.1)
pt3dadd(-211, -72.5, -11.5, 5.6)
pt3dadd(-214.5, -72.5, -11.5, 6)
pt3dadd(-218.5, -72.5, -11.5, 6.3)
pt3dadd(-223, -71.5, -11.5, 6.3)
pt3dadd(-228.5, -73, -12.5, 5.5)
pt3dadd(-232.5, -74, -12.5, 5.5)
pt3dadd(-237.5, -74.5, -12.5, 5.7)
pt3dadd(-242, -74.5, -14, 6.3)
pt3dadd(-245.5, -75, -14, 6.3)
pt3dadd(-255.5, -76.5, -11.5, 5.9)
pt3dadd(-260.5, -76.5, -11.5, 5.2)
pt3dadd(-262.5, -76, -14, 4.5)
pt3dadd(-266, -78, -14, 5.7)
pt3dadd(-271.5, -80.5, -14, 6.2)
pt3dadd(-276, -81, -14, 6.7)
pt3dadd(-280.5, -82.5, -14, 6.7)
pt3dadd(-284.5, -85, -14, 6)
pt3dadd(-289.5, -86, -14, 5.3)
pt3dadd(-292.5, -86.5, -14, 5.3)
pt3dadd(-296.5, -87, -15, 5.8)
pt3dadd(-302.5, -87.5, -14, 5.8)
pt3dadd(-308.5, -88, -14, 5.3)
pt3dadd(-313.5, -88, -12.5, 5.7)
pt3dadd(-317, -87, -14, 6.3)
pt3dadd(-322, -87, -15, 5.4)
pt3dadd(-326.5, -87, -15, 5)
pt3dadd(-329, -89.5, -12.5, 4.2)
pt3dadd(-332, -89.5, -12.5, 5.8)
pt3dadd(-334, -90, -14, 6.3)
pt3dadd(-335.5, -90, -14, 6.9)
}
dend[155] {pt3dclear()
pt3dadd(-335.5, -90, -14, 6.9)
pt3dadd(-342, -88.5, -11.5, 2)
pt3dadd(-344, -89, -11.5, 1.7)
pt3dadd(-346, -89, -11.5, 2.4)
pt3dadd(-348, -89, -11.5, 2.8)
pt3dadd(-351, -88.5, -10.5, 1.9)
pt3dadd(-352.5, -88.5, -10.5, 3.7)
pt3dadd(-354, -90, -11.5, 3.1)
pt3dadd(-357, -92, -11.5, 1.9)
pt3dadd(-358.5, -94, -11.5, 1.9)
pt3dadd(-360, -94, -11.5, 1.9)
pt3dadd(-361, -93, -9.5, 1.8)
pt3dadd(-365, -93.5, -9.5, 2.5)
pt3dadd(-368, -94.5, -9.5, 3.1)
pt3dadd(-371.5, -98.5, -9.5, 3.7)
pt3dadd(-375.5, -100, -9.5, 3.7)
pt3dadd(-380, -102, -8.5, 3.7)
pt3dadd(-383, -104.5, -10.5, 3.2)
pt3dadd(-389, -105.5, -9.5, 2.3)
pt3dadd(-392.5, -105.5, -8.5, 1.6)
pt3dadd(-395, -105.5, -7.5, 3.1)
pt3dadd(-398.5, -105.5, -7.5, 4.3)
pt3dadd(-407, -110, -7.5, 4.1)
pt3dadd(-409, -112, -7.5, 3.1)
pt3dadd(-411.5, -112, -7.5, 1.8)
pt3dadd(-414, -112, -7.5, 1.8)
pt3dadd(-417.5, -112, -7.5, 2.2)
pt3dadd(-417.5, -111.5, -7.5, 2.8)
pt3dadd(-419.5, -111.5, -7, 1.8)
pt3dadd(-422, -111.5, -6, 3.8)
pt3dadd(-424.5, -112.5, -6, 2.9)
pt3dadd(-427.5, -112.5, -6, 2.2)
pt3dadd(-429, -112.5, -6, 1.9)
pt3dadd(-433, -112.5, -4, 2.7)
pt3dadd(-437.5, -112.5, -2.5, 4)
pt3dadd(-440.5, -112.5, -2.5, 2.2)
pt3dadd(-440.5, -112, -3, 2.1)
pt3dadd(-444, -112, -3, 2.1)
pt3dadd(-446, -112, -3, 2.1)
pt3dadd(-449.5, -111.5, -1.5, 4)
pt3dadd(-452, -111.5, -0.5, 4.3)
pt3dadd(-456, -111, -0.5, 3.4)
pt3dadd(-459.5, -111, -0.5, 1.8)
pt3dadd(-465, -110.5, -0.5, 1.8)
pt3dadd(-468, -110.5, 7.5, 2.5)
pt3dadd(-470.5, -110.5, 7.5, 3.3)
pt3dadd(-471, -110, 7.5, 4.2)
pt3dadd(-473.5, -110, 7.5, 2.8)
pt3dadd(-476, -109.5, 7.5, 2)
pt3dadd(-479.5, -109, 7.5, 1.1)
pt3dadd(-482.5, -109, 7.5, 1.7)
pt3dadd(-484.5, -108, 7.5, 2.6)
pt3dadd(-486, -107, 10.5, 3.3)
pt3dadd(-489.5, -107, 10.5, 1.6)
pt3dadd(-492, -106.5, 10.5, 1.6)
pt3dadd(-495.5, -104.5, 10.5, 3.6)
pt3dadd(-499.5, -104.5, 10.5, 5.5)
pt3dadd(-502, -104, 10.5, 4)
}
dend[156] {pt3dclear()
pt3dadd(-502, -104, 10.5, 4)
pt3dadd(-507.5, -101.5, 13, 1.3)
pt3dadd(-509.5, -100.5, 13, 1.7)
pt3dadd(-513, -99.5, 24.5, 1)
pt3dadd(-515.5, -97.5, 13, 1.2)
pt3dadd(-518.5, -97, 16, 1)
pt3dadd(-520, -96.5, 19, 2.2)
pt3dadd(-521.5, -94, 24.5, 3.1)
pt3dadd(-524, -94, 24.5, 2.5)
pt3dadd(-525, -92, 24.5, 1.4)
pt3dadd(-526.5, -90.5, 19, 0.6)
pt3dadd(-527.5, -90.5, 19, 0.6)
pt3dadd(-529, -90, 21.5, 2)
pt3dadd(-530.5, -89, 24.5, 3.5)
pt3dadd(-532.5, -89, 24.5, 1.2)
pt3dadd(-534, -88.5, 24.5, 0.9)
pt3dadd(-536.5, -87.5, 16, 0.9)
pt3dadd(-540, -87.5, 19, 0.9)
pt3dadd(-542.5, -87, 24.5, 1.6)
pt3dadd(-544.5, -86, 24.5, 1.8)
pt3dadd(-546.5, -85.5, 16, 1.2)
pt3dadd(-549.5, -82.5, 19, 0.6)
pt3dadd(-553.5, -81.5, 21.5, 0.6)
pt3dadd(-556.5, -79.5, 21.5, 1)
pt3dadd(-558.5, -79.5, 21.5, 1)
pt3dadd(-560.5, -78.5, 21.5, 2.3)
pt3dadd(-562.5, -77.5, 24.5, 4.2)
pt3dadd(-566.5, -75.5, 21.5, 2.4)
pt3dadd(-569, -75, 21.5, 1)
pt3dadd(-570, -73, 21.5, 1)
pt3dadd(-573.5, -73, 27, 2.8)
pt3dadd(-576, -72.5, 27, 2)
pt3dadd(-578, -71, 27, 1.4)
pt3dadd(-578.5, -70, 27, 1.1)
pt3dadd(-579.5, -69, 27, 0.7)
pt3dadd(-581.5, -67, 30, 0.7)
pt3dadd(-583, -69, 17, 0.1)
pt3dadd(-585.5, -69, 20, 0.1)
pt3dadd(-588.5, -69, 20, 0.1)
pt3dadd(-594, -68, 20, 0.1)
pt3dadd(-597.5, -68, 20, 0.1)
pt3dadd(-600, -68.5, 17, 0.1)
pt3dadd(-603, -68.5, 21.5, 1.2)
pt3dadd(-604, -69, 23, 1.9)
pt3dadd(-607, -69, 17, 1.3)
pt3dadd(-608, -69, 18.5, 0.5)
pt3dadd(-611, -69, 18.5, 0.3)
pt3dadd(-612.5, -69, 20, 0.5)
pt3dadd(-615, -69, 20, 0.5)
pt3dadd(-618.5, -69, 20, 0.5)
pt3dadd(-620.5, -69, 21.5, 1.7)
pt3dadd(-622, -69, 24, 3.2)
pt3dadd(-625, -68, 24, 3.4)
pt3dadd(-628, -68, 25.5, 1.4)
pt3dadd(-629.5, -67, 25.5, 1.1)
pt3dadd(-632.5, -66, 25.5, 1.1)
pt3dadd(-636, -66, 25.5, 1.1)
pt3dadd(-639.5, -66, 27, 1.5)
pt3dadd(-641, -66, 28.5, 3.4)
pt3dadd(-643, -65, 15.5, 4)
pt3dadd(-646, -64.5, 15.5, 1.4)
pt3dadd(-648.5, -64.5, 15.5, 0.8)
pt3dadd(-651.5, -64, 17, 1.1)
pt3dadd(-656, -63.5, 18.5, 1.1)
pt3dadd(-659.5, -62.5, 20, 2.4)
pt3dadd(-662.5, -62.5, 20, 0.9)
pt3dadd(-665, -62, 20, 1.1)
pt3dadd(-667.5, -62, 20, 2.6)
pt3dadd(-670, -62, 21.5, 4.3)
pt3dadd(-672.5, -62, 21.5, 1.9)
pt3dadd(-675, -61.5, 23, 0.6)
pt3dadd(-677, -60, 23, 0.6)
pt3dadd(-680.5, -60, 24, 0.7)
pt3dadd(-680.5, -58, 25.5, 0.7)
pt3dadd(-683, -58, 25.5, 1.6)
pt3dadd(-683.5, -55.5, 28.5, 4.3)
pt3dadd(-688, -55.5, 28.5, 0.8)
pt3dadd(-690.5, -54.5, 28.5, 0.8)
pt3dadd(-691, -51.5, 30, 1.6)
pt3dadd(-691.5, -49.5, 31.5, 2.4)
pt3dadd(-691.5, -48, 31.5, 3.6)
pt3dadd(-692, -45.5, 31.5, 2)
pt3dadd(-693, -43.5, 31.5, 1.1)
pt3dadd(-693.5, -41, 31.5, 0.8)
pt3dadd(-697, -39, 24, 1.1)
pt3dadd(-697, -38.5, 24, 1.1)
pt3dadd(-699, -36.5, 25.5, 2.2)
pt3dadd(-700.5, -34, 25.5, 1.4)
pt3dadd(-703, -33, 25.5, 1.6)
pt3dadd(-704.5, -33, 25.5, 0.6)
pt3dadd(-706.5, -31.5, 25.5, 0.6)
pt3dadd(-708, -30, 25.5, 0.6)
pt3dadd(-709.5, -30, 25.5, 2.1)
pt3dadd(-710.5, -29.5, 28.5, 2.9)
pt3dadd(-712, -28, 25.5, 0.9)
pt3dadd(-713, -27.5, 25.5, 0.9)
pt3dadd(-714, -27.5, 25.5, 0.9)
pt3dadd(-715.5, -27.5, 25.5, 1.7)
pt3dadd(-716.5, -25.5, 27, 2.5)
pt3dadd(-719, -25, 25.5, 1)
pt3dadd(-719.5, -24.5, 24, 0.7)
pt3dadd(-721, -23, 24, 0.7)
pt3dadd(-722.5, -22, 27, 1.6)
pt3dadd(-725.5, -22, 27, 2.6)
pt3dadd(-727, -20, 27, 1.4)
pt3dadd(-730, -19.5, 27, 0.7)
pt3dadd(-732, -19, 27, 0.7)
pt3dadd(-732, -18, 28.5, 2.4)
}
}
proc shape3d_47() {
dend[156] { pt3dadd(-734, -18, 30, 3.6)
pt3dadd(-735.5, -17.5, 30, 1.5)
pt3dadd(-738, -17.5, 30, 0.5)
pt3dadd(-740.5, -16.5, 30, 0.5)
pt3dadd(-742, -16.5, 30, 2.5)
pt3dadd(-743.5, -16.5, 30, 3.2)
pt3dadd(-745, -16, 30, 1.4)
pt3dadd(-746.5, -15.5, 30, 0.6)
pt3dadd(-749.5, -15.5, 30, 0.6)
pt3dadd(-751.5, -16, 31.5, 2.1)
pt3dadd(-752, -16, 31.5, 2.4)
pt3dadd(-753, -17.5, 31.5, 1.6)
pt3dadd(-756.5, -19, 30, 1.8)
}
dend[157] {pt3dclear()
pt3dadd(-756.5, -19, 30, 1.8)
pt3dadd(-760.5, -16, 27, 0.9)
pt3dadd(-760.5, -15, 28.5, 1)
pt3dadd(-762.5, -13, 28.5, 1.3)
pt3dadd(-764, -13, 28.5, 1.9)
pt3dadd(-766.5, -11.5, 28.5, 1.1)
pt3dadd(-766.5, -9.5, 28.5, 1.4)
pt3dadd(-769, -7, 30, 1.2)
pt3dadd(-772.5, -5, 30, 1.4)
pt3dadd(-773, -3.5, 35, 2.3)
pt3dadd(-774.5, -1.5, 35, 0.2)
pt3dadd(-775.5, -0.5, 35, 0.2)
pt3dadd(-777, 1, 35, 0.2)
pt3dadd(-778, 2, 35, 2.6)
pt3dadd(-779.5, 2, 35, 3.8)
pt3dadd(-782, 2, 37, 0.4)
pt3dadd(-784, 3, 37, 0.4)
pt3dadd(-783.5, 4.5, 37, 0.4)
pt3dadd(-783.5, 5.5, 37, 0.4)
pt3dadd(-785.5, 7.5, 46, 3.7)
pt3dadd(-788.5, 5.5, 44, 0.5)
pt3dadd(-792.5, 6, 46, 0.6)
pt3dadd(-794, 6, 46, 0.6)
pt3dadd(-796.5, 6, 51.5, 1.6)
pt3dadd(-800, 6, 49.5, 1.6)
pt3dadd(-801.5, 6, 51.5, 1.4)
pt3dadd(-802, 5.5, 54.5, 0.1)
pt3dadd(-803.5, 4, 54.5, 1)
pt3dadd(-805.5, 2, 56, 2.8)
pt3dadd(-807, 1, 56, 1.4)
pt3dadd(-807.5, 0, 56, 0.3)
pt3dadd(-809, -0.5, 56, 0.1)
pt3dadd(-811, -0.5, 54.5, 0.1)
pt3dadd(-812, -0.5, 54.5, 1.3)
pt3dadd(-814.5, -0.5, 54.5, 1.5)
pt3dadd(-816.5, -0.5, 54.5, 0.5)
pt3dadd(-818, -0.5, 54.5, 0.1)
pt3dadd(-820, -0.5, 54.5, 0.4)
pt3dadd(-820.5, -0.5, 60.5, 2.8)
pt3dadd(-823, -0.5, 60.5, 1.9)
pt3dadd(-825, 1, 60.5, 1.4)
pt3dadd(-826, 1, 56, 0.6)
pt3dadd(-829, 0.5, 57.5, 0.6)
pt3dadd(-831, 0.5, 57.5, 0.6)
pt3dadd(-832.5, -1.5, 57.5, 0.6)
pt3dadd(-834, -1.5, 57.5, 0.6)
pt3dadd(-835.5, 0, 57.5, 0.6)
pt3dadd(-837, -1, 57.5, 0.4)
pt3dadd(-839, -1, 57.5, 2)
pt3dadd(-841, -1, 59, 2.3)
pt3dadd(-842.5, -0.5, 59, 1.4)
pt3dadd(-844.5, -0.5, 59, 0.8)
pt3dadd(-847, -0.5, 59, 0.5)
pt3dadd(-850, 0.5, 60.5, 0.6)
pt3dadd(-852.5, 0, 60.5, 0.6)
pt3dadd(-854.5, -0.5, 60.5, 1.8)
pt3dadd(-857, -1, 62, 2.1)
pt3dadd(-859, -2, 62, 1.6)
pt3dadd(-861, -4.5, 62, 0.3)
pt3dadd(-863, -7.5, 62, 0.3)
pt3dadd(-864.5, -7.5, 62, 0.3)
pt3dadd(-866, -8, 62, 0.2)
pt3dadd(-867, -10, 63.5, 0.2)
pt3dadd(-869, -11, 63.5, 0.3)
pt3dadd(-870.5, -11.5, 63.5, 0.3)
pt3dadd(-870.5, -13.5, 63.5, 0.2)
pt3dadd(-872, -13.5, 65, 1.4)
pt3dadd(-873, -15, 65, 2)
pt3dadd(-874.5, -17, 65, 1.2)
pt3dadd(-876, -17, 65, 1.4)
pt3dadd(-878, -17, 65, 0.6)
pt3dadd(-879.5, -18, 65, 0.4)
pt3dadd(-881.5, -18, 65, 0.4)
pt3dadd(-884, -17.5, 65, 0.2)
pt3dadd(-885, -16.5, 68, 0.1)
pt3dadd(-886, -17, 69.5, 0.1)
pt3dadd(-888, -17.5, 60.5, 0.1)
pt3dadd(-890, -18, 63.5, 0.1)
pt3dadd(-891, -17, 66.5, 1.5)
pt3dadd(-893, -17, 66.5, 1.6)
pt3dadd(-894, -14.5, 66.5, 1.1)
pt3dadd(-896, -14, 66.5, 0.7)
pt3dadd(-897.5, -13.5, 65, 1)
pt3dadd(-899.5, -11.5, 66.5, 1.4)
pt3dadd(-900.5, -11.5, 72.5, 1.2)
pt3dadd(-902, -7.5, 65, 1.2)
pt3dadd(-902, -4, 65, 0.9)
pt3dadd(-902.5, -0.5, 65, 0.9)
pt3dadd(-902.5, 1.5, 66.5, 1.5)
pt3dadd(-903.5, 5, 68, 1.6)
pt3dadd(-906.5, 6.5, 69.5, 1.2)
pt3dadd(-911.5, 6.5, 69.5, 1.2)
pt3dadd(-913.5, 3.5, 69.5, 1.1)
pt3dadd(-916, -2, 71, 1.1)
pt3dadd(-916.5, -5, 71, 1.1)
pt3dadd(-916.5, -8, 71, 1.1)
pt3dadd(-916.5, -10.5, 71, 1.1)
pt3dadd(-916.5, -14.5, 71, 1.1)
pt3dadd(-917.5, -16, 71, 1.1)
pt3dadd(-917.5, -16, 68, 1.1)
pt3dadd(-917.5, -20.5, 68, 1.1)
pt3dadd(-920, -24.5, 68, 1.1)
pt3dadd(-921.5, -31.5, 69.5, 1.1)
pt3dadd(-923.5, -37, 69.5, 1.1)
pt3dadd(-925, -41, 69.5, 1.1)
pt3dadd(-926.5, -44, 72.5, 1.1)
pt3dadd(-927, -48.5, 72.5, 1.1)
pt3dadd(-929.5, -51, 72.5, 0.8)
pt3dadd(-931.5, -53, 72.5, 0.7)
pt3dadd(-932.5, -54, 71, 0.7)
pt3dadd(-931.5, -56.5, 71, 0.7)
pt3dadd(-931, -59, 71, 0.7)
pt3dadd(-932.5, -60.5, 71, 0.8)
pt3dadd(-932, -63.5, 71, 1)
pt3dadd(-932, -64.5, 71, 2.4)
pt3dadd(-932.5, -68, 72.5, 1.5)
pt3dadd(-931.5, -67.5, 69.5, 0.4)
pt3dadd(-931.5, -71.5, 66.5, 0.4)
pt3dadd(-931, -71.5, 68, 1)
pt3dadd(-931.5, -74, 69.5, 1)
pt3dadd(-932, -74, 68, 1)
pt3dadd(-932.5, -75.5, 68, 0.7)
pt3dadd(-931.5, -77.5, 69.5, 0.7)
pt3dadd(-932, -79.5, 71, 0.5)
pt3dadd(-932, -81, 74, 1.3)
pt3dadd(-932, -83, 71, 1.6)
pt3dadd(-933.5, -85, 71, 0.7)
pt3dadd(-936, -85, 74, 0.7)
pt3dadd(-936, -89.5, 72.5, 0.7)
pt3dadd(-936.5, -91, 72.5, 0.7)
pt3dadd(-937.5, -93.5, 72.5, 0.7)
pt3dadd(-940, -94, 74, 0.7)
pt3dadd(-942, -94, 75.5, 0.9)
pt3dadd(-946.5, -94, 75.5, 0.7)
pt3dadd(-946.5, -95.5, 75.5, 0.6)
pt3dadd(-950, -99, 75.5, 0.6)
pt3dadd(-951.5, -99, 77, 1.4)
pt3dadd(-955, -101.5, 75.5, 0.6)
pt3dadd(-959.5, -101.5, 75.5, 0.6)
pt3dadd(-959.5, -104, 77, 0.4)
pt3dadd(-959.5, -108, 78.5, 0.4)
pt3dadd(-959.5, -110, 78.5, 0.4)
pt3dadd(-959, -113, 78.5, 2.4)
pt3dadd(-958.5, -114, 72.5, 0.4)
pt3dadd(-959.5, -117, 72.5, 0.4)
pt3dadd(-960.5, -118.5, 74, 1.4)
pt3dadd(-960, -121, 74, 0.1)
pt3dadd(-960, -122, 74, 0.1)
pt3dadd(-960, -124, 74, 1.3)
pt3dadd(-960.5, -127, 71, 0.1)
pt3dadd(-959, -130, 75.5, 0.1)
pt3dadd(-959, -131, 72.5, 1.4)
pt3dadd(-960, -133, 71, 1.4)
pt3dadd(-961, -133.5, 66.5, 0.9)
pt3dadd(-961, -137, 66.5, 0.3)
pt3dadd(-961, -140, 66.5, 0.3)
pt3dadd(-966, -143.5, 66.5, 0.5)
pt3dadd(-967.5, -147.5, 66.5, 0.5)
pt3dadd(-967.5, -150, 68, 1.4)
pt3dadd(-968, -151.5, 66.5, 0.2)
pt3dadd(-970.5, -155, 66.5, 0.2)
pt3dadd(-969.5, -156.5, 66.5, 0.2)
pt3dadd(-969, -159, 66.5, 0.2)
pt3dadd(-969, -162.5, 68, 0.2)
pt3dadd(-968.5, -163.5, 66.5, 0.2)
pt3dadd(-968.5, -167, 65, 0.3)
pt3dadd(-968.5, -170, 65, 0.3)
pt3dadd(-966.5, -171.5, 65, 0.3)
pt3dadd(-967.5, -176.5, 65, 0.3)
pt3dadd(-965.5, -180.5, 68, 0.3)
pt3dadd(-963, -181.5, 65, 0.3)
pt3dadd(-961, -182, 65, 0.3)
pt3dadd(-958.5, -187, 65, 0.1)
}
dend[158] {pt3dclear()
pt3dadd(-756.5, -19, 30, 1.8)
pt3dadd(-760.5, -17.5, 30, 0.6)
pt3dadd(-762.5, -17.5, 28.5, 0.3)
pt3dadd(-763, -16, 30, 1.1)
pt3dadd(-764.5, -16, 30, 1.1)
pt3dadd(-766.5, -14.5, 30, 0.7)
pt3dadd(-767, -13.5, 28.5, 0.7)
}
dend[159] {pt3dclear()
pt3dadd(-502, -104, 10.5, 4)
pt3dadd(-506.5, -105, 7.5, 1.5)
pt3dadd(-509, -106.5, 7.5, 1.2)
pt3dadd(-510.5, -108, 7.5, 0.7)
pt3dadd(-512.5, -108, 13, 0.7)
pt3dadd(-514.5, -108.5, 13, 1.1)
pt3dadd(-517, -109.5, 16, 0.7)
}
}
proc shape3d_48() {
dend[159] { pt3dadd(-519.5, -109.5, 16, 0.7)
pt3dadd(-520.5, -109.5, 19, 2.6)
pt3dadd(-524, -110.5, 13, 3.7)
pt3dadd(-526.5, -110.5, 7.5, 1.1)
pt3dadd(-529, -112.5, 7.5, 0.9)
pt3dadd(-532.5, -115, 7.5, 0.8)
pt3dadd(-535.5, -115, 7.5, 1)
pt3dadd(-537.5, -116, 5, 2)
pt3dadd(-538.5, -118.5, 5, 2.5)
pt3dadd(-541, -119.5, 5, 1.6)
pt3dadd(-543, -121.5, 5, 0.2)
pt3dadd(-544.5, -122, 5, 0.2)
pt3dadd(-546, -122.5, 5, 3.2)
pt3dadd(-547, -124, 5, 3.8)
pt3dadd(-550.5, -124.5, 5, 1.8)
pt3dadd(-553, -125, 5, 0.3)
pt3dadd(-556, -126.5, 5, 0.3)
pt3dadd(-557.5, -127, 5, 1.1)
pt3dadd(-560, -128, 5, 0.6)
pt3dadd(-561.5, -129.5, 5, 2.1)
pt3dadd(-562.5, -129.5, 5, 2.9)
pt3dadd(-566, -130, 5, 1.1)
pt3dadd(-567.5, -130, 5, 0.3)
pt3dadd(-568, -131, 5, 0.3)
pt3dadd(-569.5, -132, 10.5, 2.2)
pt3dadd(-570.5, -132, 10.5, 3.1)
pt3dadd(-572, -132, 10.5, 2.2)
pt3dadd(-574.5, -132, 10.5, 0.3)
pt3dadd(-576, -132, 10.5, 0.3)
pt3dadd(-577, -132, 10.5, 1.7)
pt3dadd(-580, -132, 10.5, 0.1)
pt3dadd(-581.5, -132, 10.5, 0.1)
pt3dadd(-582.5, -133, 10.5, 1.6)
pt3dadd(-584, -133.5, 10.5, 1.6)
pt3dadd(-586, -135, 10.5, 0.3)
pt3dadd(-591, -137, 10.5, 0.3)
pt3dadd(-595, -137, 10.5, 0.9)
pt3dadd(-595, -136, 10.5, 0.9)
pt3dadd(-595, -133.5, 9, 0.9)
pt3dadd(-596, -133.5, 9, 0.9)
pt3dadd(-598, -133.5, 9, 2.7)
pt3dadd(-600, -133.5, 17.5, 4.1)
pt3dadd(-602.5, -133.5, 13.5, 2.1)
pt3dadd(-604.5, -132, 13.5, 0.8)
pt3dadd(-606.5, -130.5, 13.5, 0.9)
pt3dadd(-606.5, -128.5, 13.5, 0.9)
pt3dadd(-608, -128.5, 13.5, 1.8)
pt3dadd(-611.5, -128.5, 13.5, 0.6)
pt3dadd(-614, -129, 13.5, 0.6)
pt3dadd(-614, -128, 13.5, 3.2)
pt3dadd(-614.5, -128, 13.5, 3.4)
pt3dadd(-617.5, -129, 13.5, 1.4)
pt3dadd(-618, -129, 13.5, 0.7)
pt3dadd(-620, -129, 13.5, 0.7)
pt3dadd(-622, -128, 15, 2.5)
pt3dadd(-622.5, -127, 15, 4.1)
pt3dadd(-624.5, -127, 15, 2.3)
pt3dadd(-627, -128.5, 19, 0.4)
pt3dadd(-630, -128.5, 19, 0.4)
pt3dadd(-630, -128, 19, 0.4)
pt3dadd(-634, -128, 17.5, 0.4)
pt3dadd(-636, -129, 19, 1.9)
pt3dadd(-637, -129, 16.5, 3.4)
pt3dadd(-638, -129, 16.5, 1.1)
pt3dadd(-640.5, -128.5, 19, 0.2)
pt3dadd(-641, -130, 19, 0.2)
pt3dadd(-642, -130, 19, 1.6)
pt3dadd(-644, -130, 19, 2.5)
pt3dadd(-646, -130, 19, 0.8)
pt3dadd(-647, -130, 19, 0.2)
pt3dadd(-648.5, -130, 19, 0.2)
pt3dadd(-649.5, -131, 19, 1.6)
pt3dadd(-650.5, -131.5, 22, 2)
pt3dadd(-652.5, -133, 19, 1.3)
pt3dadd(-654, -133.5, 19, 0.6)
pt3dadd(-655, -135.5, 20.5, 0.9)
pt3dadd(-657, -136.5, 20.5, 0.6)
pt3dadd(-659, -137, 27.5, 0.6)
pt3dadd(-659, -139.5, 27.5, 1.8)
pt3dadd(-660, -139.5, 27.5, 1.8)
pt3dadd(-660.5, -140.5, 27.5, 1)
pt3dadd(-662, -141.5, 26.5, 0.3)
pt3dadd(-664, -144.5, 32, 0.3)
pt3dadd(-666, -146.5, 32, 1.3)
pt3dadd(-666.5, -149.5, 32, 2.5)
pt3dadd(-668, -150.5, 32, 1.2)
pt3dadd(-668, -151.5, 32, 0.3)
pt3dadd(-668.5, -152, 32, 0.3)
pt3dadd(-669.5, -153.5, 32, 2)
pt3dadd(-671, -153.5, 32, 2.7)
pt3dadd(-672.5, -154.5, 32, 1.9)
pt3dadd(-673, -155.5, 32, 0.7)
pt3dadd(-674, -158.5, 33.5, 0.5)
pt3dadd(-676, -159.5, 32, 1.2)
pt3dadd(-677, -160, 32, 1.2)
pt3dadd(-677.5, -160.5, 32, 1.2)
pt3dadd(-678.5, -161, 32, 0.3)
pt3dadd(-681, -162.5, 32, 0.3)
pt3dadd(-683, -163.5, 32, 0.8)
pt3dadd(-684, -165, 32, 1.4)
pt3dadd(-685, -165.5, 32, 2)
pt3dadd(-686.5, -165.5, 32, 2.5)
pt3dadd(-688.5, -166.5, 32, 1.1)
pt3dadd(-690.5, -166.5, 32, 0.6)
pt3dadd(-694, -166.5, 32, 0.6)
pt3dadd(-694.5, -168.5, 32, 0.6)
pt3dadd(-698.5, -168.5, 32, 0.6)
pt3dadd(-700.5, -168.5, 32, 1.6)
pt3dadd(-701.5, -171, 27.5, 0.7)
pt3dadd(-706, -171, 27.5, 0.7)
pt3dadd(-706.5, -172, 27.5, 1.5)
pt3dadd(-708.5, -173, 27.5, 2)
pt3dadd(-710.5, -173.5, 27.5, 1.1)
pt3dadd(-711, -174, 27.5, 0.6)
pt3dadd(-714.5, -176.5, 27.5, 0.6)
pt3dadd(-715, -177, 27.5, 2.1)
pt3dadd(-716.5, -178.5, 27.5, 3.1)
pt3dadd(-718, -179.5, 27.5, 0.9)
pt3dadd(-718, -181, 27.5, 0.4)
pt3dadd(-720, -181, 27.5, 1.4)
pt3dadd(-720.5, -181, 27.5, 2.5)
pt3dadd(-723, -182, 27.5, 0.4)
pt3dadd(-723.5, -183, 27.5, 0.4)
pt3dadd(-726.5, -185, 27.5, 2.4)
pt3dadd(-728, -186.5, 27.5, 0.6)
pt3dadd(-731.5, -186.5, 27.5, 0.6)
pt3dadd(-731.5, -188, 27.5, 1.7)
pt3dadd(-733, -188, 27.5, 1.8)
pt3dadd(-735, -189.5, 27.5, 1.1)
pt3dadd(-735.5, -189.5, 27.5, 0.2)
pt3dadd(-737.5, -190.5, 27.5, 1.5)
pt3dadd(-739.5, -190.5, 27.5, 0.1)
pt3dadd(-741.5, -190.5, 27.5, 0.1)
pt3dadd(-743.5, -192.5, 27.5, 0.9)
pt3dadd(-744.5, -192.5, 27.5, 1)
pt3dadd(-746, -193, 27.5, 1)
pt3dadd(-746.5, -195, 27.5, 0.1)
pt3dadd(-749.5, -195, 27.5, 0.1)
pt3dadd(-751, -195, 27.5, 0.1)
pt3dadd(-752, -196.5, 27.5, 1.6)
pt3dadd(-753, -197, 27.5, 1.7)
pt3dadd(-755.5, -199, 27.5, 0.8)
pt3dadd(-756, -199, 27.5, 0.2)
pt3dadd(-760, -199, 27.5, 0.2)
pt3dadd(-761.5, -199, 27.5, 1.6)
pt3dadd(-762, -199.5, 27.5, 2.1)
pt3dadd(-764.5, -199.5, 27.5, 0.8)
pt3dadd(-766.5, -199, 27.5, 0.1)
pt3dadd(-767, -199, 27.5, 0.1)
pt3dadd(-768, -198.5, 30.5, 1.6)
pt3dadd(-769, -198.5, 30.5, 2)
pt3dadd(-771, -197.5, 30.5, 0.3)
pt3dadd(-772, -197, 30.5, 0.3)
pt3dadd(-774, -197, 30.5, 0.3)
pt3dadd(-775, -197, 30.5, 1.1)
pt3dadd(-775.5, -197, 30.5, 1.1)
pt3dadd(-777, -196, 30.5, 0.1)
pt3dadd(-779.5, -194.5, 32, 0.1)
pt3dadd(-782.5, -194, 32, 0.1)
pt3dadd(-785, -193.5, 32, 1.1)
pt3dadd(-789, -193.5, 32, 0.1)
pt3dadd(-790.5, -196, 33.5, 0.1)
pt3dadd(-792.5, -198.5, 35, 0.1)
pt3dadd(-794.5, -198.5, 35, 0.1)
pt3dadd(-793.5, -197, 35, 0.1)
pt3dadd(-792.5, -195.5, 36.5, 0.6)
pt3dadd(-790, -196, 22, 0.6)
pt3dadd(-786, -197, 25, 0.6)
pt3dadd(-787.5, -197.5, 33.5, 1.6)
pt3dadd(-789, -197.5, 35, 1.8)
pt3dadd(-791.5, -194, 17.5, 0.7)
pt3dadd(-793.5, -193.5, 17.5, 0.7)
pt3dadd(-794.5, -192.5, 17.5, 0.6)
pt3dadd(-796, -191, 20.5, 0.9)
pt3dadd(-799, -191, 15, 0.1)
pt3dadd(-801.5, -191, 15, 0.1)
pt3dadd(-803, -190, 17.5, 1.1)
pt3dadd(-805.5, -190, 13.5, 0.1)
pt3dadd(-807.5, -188, 15, 0.1)
pt3dadd(-807.5, -184.5, 15, 0.1)
pt3dadd(-805.5, -184, 16.5, 1.9)
pt3dadd(-805, -183, 17.5, 2.2)
pt3dadd(-803, -182, 16.5, 0.4)
pt3dadd(-801.5, -180.5, 10.5, 0.4)
pt3dadd(-799.5, -178, 17.5, 0.4)
}
dend[160] {pt3dclear()
pt3dadd(-335.5, -90, -14, 6.9)
pt3dadd(-341.5, -93.5, -16, 5.1)
pt3dadd(-345, -93.5, -16, 5.1)
pt3dadd(-348.5, -95.5, -17.5, 4.8)
pt3dadd(-353, -95.5, -15, 4)
pt3dadd(-356, -97.5, -17.5, 4.1)
pt3dadd(-359.5, -98.5, -16, 3.8)
pt3dadd(-363, -99.5, -16, 3.6)
pt3dadd(-365, -101.5, -16, 3.8)
pt3dadd(-367.5, -102.5, -16, 3.2)
pt3dadd(-369.5, -106.5, -16, 4)
pt3dadd(-372.5, -109, -15, 5.1)
pt3dadd(-375, -110.5, -16, 6)
pt3dadd(-378.5, -114.5, -17.5, 5.7)
pt3dadd(-383, -123.5, -18, 4.8)
}
}
proc shape3d_49() {
dend[160] { pt3dadd(-384, -124.5, -18, 4.8)
pt3dadd(-386.5, -127, -18, 5.7)
}
dend[161] {pt3dclear()
pt3dadd(-386.5, -127, -18, 5.7)
pt3dadd(-389.5, -126.5, 2.5, 0.5)
pt3dadd(-395.5, -125.5, 2.5, 0.5)
pt3dadd(-401.5, -125.5, 3.5, 4)
pt3dadd(-406, -126.5, 3.5, 0.4)
pt3dadd(-411, -126.5, 3.5, 0.5)
pt3dadd(-414.5, -126.5, 3.5, 2.2)
pt3dadd(-419, -126, 2, 4.9)
pt3dadd(-421.5, -125, 2.5, 1.8)
pt3dadd(-425.5, -122, 3.5, 0.9)
pt3dadd(-428.5, -121, 3.5, 1.2)
pt3dadd(-432, -119.5, 3.5, 1.2)
pt3dadd(-433, -119.5, 3.5, 2.5)
pt3dadd(-435, -118, 3.5, 2.4)
pt3dadd(-438, -116, 4, 1)
pt3dadd(-443.5, -115, 2.5, 1)
pt3dadd(-449, -113.5, 2.5, 1.4)
pt3dadd(-450.5, -113.5, 2.5, 0.7)
pt3dadd(-453.5, -113, 2.5, 0.1)
pt3dadd(-455.5, -113, 2.5, 0.1)
pt3dadd(-456.5, -112.5, 2.5, 1.5)
pt3dadd(-461.5, -109.5, 4.5, 2)
pt3dadd(-463.5, -109.5, 6, 1.2)
pt3dadd(-464.5, -108.5, 7, 0.5)
pt3dadd(-467, -107, 7, 0.6)
pt3dadd(-468, -105.5, 6, 0.7)
pt3dadd(-471, -104.5, 6, 0.7)
pt3dadd(-473, -104.5, 6, 0.7)
pt3dadd(-474, -104.5, 6, 1.9)
pt3dadd(-476, -102.5, 6, 3.6)
pt3dadd(-479.5, -102.5, 6, 1.6)
pt3dadd(-482, -101, 6, 0.4)
pt3dadd(-484.5, -99, 6, 0.4)
pt3dadd(-486.5, -99, 6, 0.4)
pt3dadd(-487, -96.5, 7, 3.1)
pt3dadd(-489.5, -96.5, 6, 0.6)
pt3dadd(-493, -96.5, 6, 0.6)
pt3dadd(-496.5, -96.5, 6, 0.6)
pt3dadd(-495.5, -96, 7, 2.3)
pt3dadd(-498, -96, 7, 3.2)
pt3dadd(-500.5, -96.5, 7, 1.6)
pt3dadd(-501.5, -96, 8, 0.5)
pt3dadd(-502, -96, 8, 0.5)
pt3dadd(-504.5, -96, 8, 1.8)
pt3dadd(-506.5, -95.5, 8, 1.9)
pt3dadd(-508.5, -94, 8, 1.1)
pt3dadd(-510, -94, 8, 0.4)
pt3dadd(-512.5, -94, 8, 0.4)
pt3dadd(-513.5, -94, 8, 2)
pt3dadd(-514.5, -94, 9, 2.4)
pt3dadd(-517, -94, 9, 1.3)
pt3dadd(-518.5, -95, 9, 0.6)
pt3dadd(-520.5, -95.5, 8, 0.3)
pt3dadd(-522, -95.5, 7, 0.3)
pt3dadd(-524.5, -94.5, 9, 0.3)
pt3dadd(-528, -94, 9, 0.1)
pt3dadd(-529, -94, 9, 2.2)
pt3dadd(-531.5, -94, 10.5, 2.5)
pt3dadd(-534, -93, 10.5, 1.3)
pt3dadd(-535, -92.5, 10.5, 0.2)
pt3dadd(-538, -91, 10.5, 0.2)
pt3dadd(-538.5, -91, 10.5, 1.8)
pt3dadd(-540.5, -90.5, 11.5, 2.8)
pt3dadd(-542.5, -88.5, 11.5, 1)
pt3dadd(-545.5, -87, 10.5, 0.1)
pt3dadd(-547.5, -87, 10.5, 0.1)
pt3dadd(-550.5, -86.5, 11.5, 0.1)
pt3dadd(-553, -83.5, 11.5, 0.1)
pt3dadd(-554, -83.5, 11.5, 0.1)
pt3dadd(-556, -84, 13.5, 3.8)
pt3dadd(-557, -84, 11.5, 4.1)
pt3dadd(-559.5, -84.5, 11.5, 1.5)
pt3dadd(-561.5, -83.5, 11.5, 0.3)
pt3dadd(-565, -83, 11.5, 0.3)
pt3dadd(-567.5, -82.5, 11.5, 2)
pt3dadd(-570, -82, 11.5, 0.3)
pt3dadd(-573, -80, 11.5, 0.3)
pt3dadd(-573, -78.5, 11.5, 0.3)
pt3dadd(-575.5, -78.5, 10.5, 2.5)
pt3dadd(-578, -78.5, 11.5, 0.6)
pt3dadd(-580.5, -77, 11.5, 1.1)
pt3dadd(-584.5, -75, 11.5, 0.7)
pt3dadd(-586.5, -75, 11.5, 1.8)
pt3dadd(-587.5, -75, 11.5, 2.4)
pt3dadd(-590, -75, 11.5, 1.3)
pt3dadd(-591, -76.5, 11.5, 0.5)
pt3dadd(-596, -76.5, 11.5, 0.4)
pt3dadd(-597, -76.5, 11.5, 1.6)
pt3dadd(-598.5, -78, 12.5, 2.7)
pt3dadd(-601, -79.5, 11.5, 1.2)
pt3dadd(-603.5, -80, 11.5, 0.5)
pt3dadd(-605.5, -81, 11.5, 0.5)
pt3dadd(-606.5, -81, 10.5, 1.4)
pt3dadd(-610, -83.5, 10.5, 2.5)
pt3dadd(-610.5, -83.5, 10.5, 1.2)
pt3dadd(-611, -85, 10.5, 0.6)
pt3dadd(-614.5, -87, 10.5, 0.6)
pt3dadd(-615.5, -88, 10.5, 0.6)
pt3dadd(-617, -89.5, 10.5, 1.7)
pt3dadd(-618, -89.5, 10.5, 2.5)
pt3dadd(-620, -89.5, 10.5, 1.3)
pt3dadd(-621.5, -89.5, 10.5, 0.6)
pt3dadd(-624, -89.5, 10.5, 0.6)
pt3dadd(-625.5, -89, 10.5, 0.6)
pt3dadd(-627, -89, 10.5, 1.7)
pt3dadd(-628.5, -89, 12.5, 2.7)
pt3dadd(-631, -89, 10.5, 1.3)
pt3dadd(-631.5, -88, 10.5, 0.5)
pt3dadd(-635.5, -84, 10.5, 0.5)
pt3dadd(-636, -85, 11.5, 0.5)
pt3dadd(-639, -85, 9, 0.5)
pt3dadd(-641, -85, 10.5, 2.1)
pt3dadd(-641.5, -83.5, 9, 3.8)
pt3dadd(-642, -83.5, 10.5, 1.9)
pt3dadd(-645, -83.5, 9, 0.4)
pt3dadd(-647.5, -83.5, 7, 0.5)
pt3dadd(-648.5, -83.5, 8, 0.5)
pt3dadd(-649, -83.5, 8, 1.6)
pt3dadd(-651, -83.5, 7, 1.7)
pt3dadd(-652.5, -82.5, 7, 0.8)
pt3dadd(-654.5, -81.5, 7, 0.6)
pt3dadd(-655, -79.5, 7, 0.6)
pt3dadd(-658, -78.5, 7, 0.6)
pt3dadd(-658.5, -78.5, 8, 1.4)
pt3dadd(-661, -78.5, 8, 2.6)
pt3dadd(-662, -78, 8, 1.1)
pt3dadd(-663.5, -78, 7, 0.4)
pt3dadd(-666.5, -78, 7, 0.4)
pt3dadd(-670, -78, 7, 0.4)
pt3dadd(-671.5, -78, 7, 0.4)
pt3dadd(-672.5, -78.5, 7, 1.6)
pt3dadd(-675.5, -78.5, 7, 2.5)
pt3dadd(-677, -78.5, 7, 0.9)
pt3dadd(-677.5, -78.5, 7, 0.3)
pt3dadd(-680.5, -78.5, 7, 0.3)
pt3dadd(-683, -78.5, 7, 0.3)
pt3dadd(-684.5, -78.5, 7, 0.3)
pt3dadd(-688, -76, 8, 0.2)
pt3dadd(-689.5, -76, 9, 1.2)
pt3dadd(-691, -76, 9, 1.4)
pt3dadd(-693.5, -76, 9, 0.1)
pt3dadd(-695.5, -76, 9, 0.1)
pt3dadd(-697.5, -76, 8, 0.1)
pt3dadd(-700, -76, 9, 0.1)
pt3dadd(-700.5, -76, 9, 1.7)
pt3dadd(-701, -76, 9, 2.7)
pt3dadd(-702.5, -76, 9, 1.4)
pt3dadd(-704.5, -76, 9, 0.1)
pt3dadd(-707.5, -74, 9, 0.1)
pt3dadd(-709, -74, 9, 0.1)
pt3dadd(-711, -74, 9, 0.1)
pt3dadd(-713, -74, 9, 1.4)
pt3dadd(-714, -74, 10.5, 1.3)
pt3dadd(-716, -74, 10.5, 1.2)
pt3dadd(-718, -74, 10.5, 0.4)
pt3dadd(-720.5, -74, 10.5, 0.5)
pt3dadd(-722, -74, 10.5, 0.5)
pt3dadd(-726, -73.5, 10.5, 2)
pt3dadd(-727.5, -73.5, 10.5, 0.2)
pt3dadd(-728.5, -73, 10.5, 0.1)
pt3dadd(-731, -73, 10.5, 2)
pt3dadd(-733, -72.5, 10.5, 0.1)
pt3dadd(-735.5, -71.5, 10.5, 0.1)
pt3dadd(-737.5, -69.5, 11.5, 0.6)
}
dend[162] {pt3dclear()
pt3dadd(-386.5, -127, -18, 5.7)
pt3dadd(-387, -131.5, -18, 4.8)
pt3dadd(-390, -133.5, -18, 4.3)
pt3dadd(-391.5, -135.5, -18, 3.8)
pt3dadd(-394, -137.5, -18, 3.8)
pt3dadd(-395.5, -141, -18, 4.3)
pt3dadd(-397, -142.5, -18, 3.5)
pt3dadd(-399, -145, -19.5, 2.5)
pt3dadd(-402, -145.5, -19.5, 2.5)
pt3dadd(-404, -147.5, -19.5, 2.5)
pt3dadd(-405.5, -148.5, -19.5, 2.5)
pt3dadd(-408, -150.5, -19.5, 2.9)
pt3dadd(-410.5, -151.5, -19.5, 3.2)
pt3dadd(-414, -152.5, -19.5, 3.2)
pt3dadd(-416, -156, -19.5, 3.6)
pt3dadd(-419, -156, -19, 3.6)
pt3dadd(-421.5, -159, -19, 3.5)
pt3dadd(-423.5, -160, -18, 2.9)
pt3dadd(-426, -163, -18, 2.9)
pt3dadd(-428.5, -165.5, -18, 2.1)
pt3dadd(-430.5, -166.5, -18, 2.3)
pt3dadd(-431.5, -170.5, -18, 3.4)
pt3dadd(-435, -173, -19, 3.8)
pt3dadd(-439.5, -178, -19, 4.4)
pt3dadd(-444, -180.5, -19, 4.7)
pt3dadd(-447.5, -183, -19, 4.1)
pt3dadd(-451, -185, -19, 4.1)
pt3dadd(-457, -188, -19.5, 2)
pt3dadd(-460, -188, -19.5, 2)
pt3dadd(-462, -190, -19.5, 2.3)
pt3dadd(-466, -190.5, -19.5, 2.3)
pt3dadd(-468.5, -191.5, -19.5, 2.1)
pt3dadd(-470, -191.5, -19.5, 2.9)
pt3dadd(-472, -192, -19.5, 3.4)
}
}
proc shape3d_50() {
dend[162] { pt3dadd(-474.5, -192.5, -19, 2.6)
pt3dadd(-477, -194.5, -19.5, 3.4)
pt3dadd(-481, -196.5, -17.5, 4.7)
}
dend[163] {pt3dclear()
pt3dadd(-481, -196.5, -17.5, 4.7)
pt3dadd(-488.5, -196.5, -4, 0.7)
pt3dadd(-493.5, -196, -4, 0.7)
pt3dadd(-495, -196, -4, 0.1)
pt3dadd(-500, -196, -3.5, 2.3)
pt3dadd(-503.5, -196, -4.5, 0.1)
pt3dadd(-507.5, -196, -4.5, 0.1)
pt3dadd(-509, -196, -5.5, 0.1)
pt3dadd(-510.5, -196, -3.5, 2.8)
pt3dadd(-514.5, -196, -3.5, 1.2)
pt3dadd(-517, -197.5, -2, 0.1)
pt3dadd(-521, -197.5, -2.5, 0.1)
pt3dadd(-523, -197.5, -1.5, 1.6)
pt3dadd(-526.5, -199, -2, 2)
pt3dadd(-528.5, -199, -2, 0.5)
pt3dadd(-533.5, -199.5, -1.5, 0.4)
}
dend[164] {pt3dclear()
pt3dadd(-481, -196.5, -17.5, 4.7)
pt3dadd(-486.5, -197, -20, 3.3)
pt3dadd(-493.5, -199, -18, 2.8)
pt3dadd(-502, -199.5, -19, 3.4)
pt3dadd(-505, -199.5, -19.5, 3.4)
pt3dadd(-509, -202.5, -17.5, 5.4)
}
dend[165] {pt3dclear()
pt3dadd(-509, -202.5, -17.5, 5.4)
pt3dadd(-512.5, -206.5, -5.5, 1.6)
pt3dadd(-512.5, -208.5, -7.5, 2.1)
pt3dadd(-512.5, -211.5, -6.5, 2.5)
pt3dadd(-512.5, -213.5, -6.5, 2.7)
pt3dadd(-512.5, -215.5, -6.5, 2.8)
pt3dadd(-513, -218, -6, 3.3)
pt3dadd(-513, -219.5, -6.5, 1.9)
pt3dadd(-515, -221.5, -6.5, 1.6)
pt3dadd(-515.5, -223, -5.5, 2)
pt3dadd(-516, -225.5, -10, 2)
pt3dadd(-515.5, -228.5, -10, 2)
pt3dadd(-515.5, -231.5, -11, 2.5)
}
dend[166] {pt3dclear()
pt3dadd(-515.5, -231.5, -11, 2.5)
pt3dadd(-515.5, -234.5, -11, 3.7)
pt3dadd(-515.5, -236.5, -11, 2.2)
pt3dadd(-515.5, -238.5, -11, 1.8)
pt3dadd(-515, -240, -11, 1.6)
pt3dadd(-517, -240, -11, 1.6)
pt3dadd(-517, -242, -17.5, 3.1)
pt3dadd(-517.5, -244, -11, 4)
pt3dadd(-517.5, -245.5, -17.5, 4)
pt3dadd(-519, -245.5, -17.5, 2.9)
pt3dadd(-520, -247, -17.5, 2.9)
pt3dadd(-520, -248, -17.5, 2)
pt3dadd(-520.5, -249.5, -17.5, 1.6)
pt3dadd(-521.5, -250.5, -17.5, 1.5)
pt3dadd(-521.5, -251.5, -17.5, 1.5)
pt3dadd(-521, -253, -17.5, 1.7)
pt3dadd(-524, -253, -23.5, 1.6)
pt3dadd(-523.5, -255.5, -23.5, 1.9)
pt3dadd(-523.5, -257, -30, 1.8)
pt3dadd(-523.5, -258.5, -30, 1.8)
pt3dadd(-523.5, -260.5, -30, 2.9)
pt3dadd(-524.5, -263.5, -30, 3.7)
pt3dadd(-524.5, -265.5, -30, 4.1)
pt3dadd(-525, -268.5, -30, 3.8)
pt3dadd(-525.5, -270, -36, 3.2)
pt3dadd(-525.5, -271.5, -36, 2.3)
pt3dadd(-527, -273, -36, 1.6)
pt3dadd(-529, -274, -36, 1.4)
pt3dadd(-532, -276, -36, 1)
pt3dadd(-534, -279.5, -30, 1.9)
pt3dadd(-535.5, -282, -30, 1.9)
pt3dadd(-536.5, -284, -34, 1.9)
pt3dadd(-536.5, -286, -34, 3.3)
pt3dadd(-538.5, -286.5, -32, 4.3)
pt3dadd(-540, -290.5, -32, 2.4)
pt3dadd(-541, -293, -34, 1.7)
pt3dadd(-542.5, -295.5, -34, 1.5)
pt3dadd(-544, -297.5, -36, 1.7)
pt3dadd(-545, -300, -37.5, 2.4)
pt3dadd(-549.5, -302, -37.5, 1.9)
pt3dadd(-552, -303, -39.5, 1.4)
pt3dadd(-555, -303, -39.5, 1.3)
pt3dadd(-556, -304, -39.5, 1.3)
pt3dadd(-556.5, -305, -39.5, 1.3)
pt3dadd(-559, -307, -39.5, 2.8)
pt3dadd(-561.5, -307, -39.5, 4)
pt3dadd(-565.5, -307, -39.5, 1.7)
pt3dadd(-567.5, -306.5, -39.5, 1.1)
pt3dadd(-569.5, -306.5, -39.5, 1.5)
pt3dadd(-572.5, -306.5, -39.5, 1.6)
pt3dadd(-574, -306.5, -39.5, 1.6)
pt3dadd(-576, -306.5, -37.5, 2.2)
pt3dadd(-578.5, -308.5, -41.5, 2.4)
pt3dadd(-582, -308.5, -41.5, 1.7)
pt3dadd(-585, -308.5, -41.5, 1.3)
pt3dadd(-587.5, -308.5, -41.5, 1.1)
pt3dadd(-589.5, -308, -36, 2.8)
pt3dadd(-592.5, -308, -36, 3.1)
pt3dadd(-595.5, -308, -36, 1.9)
pt3dadd(-599, -307.5, -36, 1.4)
pt3dadd(-602.5, -306, -36, 1.4)
pt3dadd(-603.5, -306, -36, 1.1)
pt3dadd(-606, -306, -34, 1.1)
pt3dadd(-608.5, -306, -34, 1.1)
pt3dadd(-611.5, -306, -32, 1.8)
pt3dadd(-613.5, -306, -36, 2)
pt3dadd(-617.5, -306.5, -37.5, 1.3)
pt3dadd(-620.5, -306.5, -37.5, 1)
pt3dadd(-623.5, -306.5, -37.5, 1)
pt3dadd(-626.5, -306.5, -34, 2.8)
pt3dadd(-629.5, -306.5, -34, 0.5)
pt3dadd(-631.5, -309.5, -32, 0.7)
pt3dadd(-635, -309.5, -32, 0.7)
pt3dadd(-637.5, -310, -32, 2.1)
pt3dadd(-640.5, -312.5, -36, 3.2)
pt3dadd(-641.5, -312.5, -36, 2.1)
pt3dadd(-644.5, -313.5, -36, 1)
pt3dadd(-648, -315, -36, 1)
pt3dadd(-652, -313, -34, 1)
pt3dadd(-655, -313, -34, 1)
pt3dadd(-658, -313.5, -37.5, 2.8)
pt3dadd(-660.5, -314.5, -36, 4)
pt3dadd(-664, -315.5, -39.5, 1.9)
pt3dadd(-666, -315.5, -39.5, 1.1)
pt3dadd(-671, -317.5, -37.5, 0.7)
pt3dadd(-674.5, -317.5, -36, 0.7)
pt3dadd(-677, -319.5, -39.5, 0.7)
pt3dadd(-678.5, -319.5, -39.5, 1.9)
pt3dadd(-681, -321.5, -39.5, 3.1)
pt3dadd(-682.5, -327.5, -45.5, 1.4)
pt3dadd(-683.5, -329, -43, 1.4)
pt3dadd(-684.5, -329.5, -45.5, 0.4)
pt3dadd(-685, -330.5, -48.5, 0.1)
pt3dadd(-686, -332.5, -48.5, 0.1)
pt3dadd(-687, -333, -51.5, 1.9)
pt3dadd(-687, -335.5, -51.5, 1.9)
pt3dadd(-686, -336.5, -51.5, 1.9)
pt3dadd(-688.5, -337, -51.5, 0.7)
pt3dadd(-690, -338.5, -54.5, 1.1)
pt3dadd(-692, -339.5, -54.5, 1.3)
pt3dadd(-693, -341.5, -54.5, 1.6)
pt3dadd(-694, -341.5, -54.5, 2.1)
pt3dadd(-694.5, -344.5, -54.5, 1.5)
pt3dadd(-694.5, -346.5, -57.5, 1.2)
pt3dadd(-695, -347.5, -63.5, 0.2)
pt3dadd(-699, -347.5, -60.5, 0.2)
pt3dadd(-698.5, -350, -60.5, 0.1)
pt3dadd(-698.5, -351.5, -63.5, 1.7)
pt3dadd(-699, -353, -60.5, 2.3)
pt3dadd(-700.5, -355.5, -63.5, 1.4)
pt3dadd(-701.5, -356, -63.5, 0.4)
pt3dadd(-703, -357.5, -63.5, 0.4)
pt3dadd(-704, -359, -63.5, 0.4)
pt3dadd(-707.5, -359.5, -69, 0.4)
pt3dadd(-707.5, -360, -66.5, 0.5)
pt3dadd(-708.5, -365, -69, 0.6)
pt3dadd(-712, -365, -71, 0.3)
pt3dadd(-714.5, -365, -71, 0.3)
pt3dadd(-715, -367, -66.5, 0.7)
pt3dadd(-715.5, -369, -69, 1.3)
pt3dadd(-716, -370.5, -71, 1.7)
pt3dadd(-717.5, -371, -76, 2.3)
pt3dadd(-720, -372.5, -76, 1.2)
pt3dadd(-722, -374.5, -76, 0.7)
pt3dadd(-722.5, -374.5, -78.5, 0.3)
pt3dadd(-726, -374.5, -78.5, 0.3)
pt3dadd(-727, -375.5, -78.5, 1.1)
pt3dadd(-727.5, -376.5, -78.5, 1.6)
pt3dadd(-727.5, -379, -76, 2.5)
pt3dadd(-727.5, -381.5, -80.5, 1.6)
pt3dadd(-730.5, -381.5, -80.5, 0.8)
pt3dadd(-732.5, -382, -80.5, 1)
pt3dadd(-734.5, -383, -80.5, 1.6)
pt3dadd(-736, -384.5, -85.5, 2.7)
pt3dadd(-738, -385, -85.5, 1.5)
pt3dadd(-740.5, -386, -80.5, 0.4)
pt3dadd(-741.5, -388.5, -83, 0.4)
pt3dadd(-742.5, -389, -80.5, 1.5)
pt3dadd(-742.5, -390.5, -80.5, 1.7)
pt3dadd(-744, -393, -80.5, 1.7)
pt3dadd(-743, -393, -85.5, 0.6)
pt3dadd(-744, -394.5, -83, 0.6)
pt3dadd(-744, -397, -83, 0.6)
pt3dadd(-744.5, -398.5, -88, 2.1)
pt3dadd(-746, -399, -85.5, 3)
pt3dadd(-746, -401.5, -85.5, 1.4)
pt3dadd(-746, -403.5, -90, 0.9)
pt3dadd(-745.5, -404, -92.5, 0.9)
pt3dadd(-745.5, -406, -92.5, 0.9)
pt3dadd(-747, -406, -92.5, 1.6)
pt3dadd(-749, -406, -90, 1.7)
pt3dadd(-751.5, -407.5, -92.5, 1.9)
pt3dadd(-753.5, -409, -97.5, 0.8)
}
dend[167] {pt3dclear()
pt3dadd(-515.5, -231.5, -11, 2.5)
pt3dadd(-517, -232, -11, 0.1)
pt3dadd(-519, -233, -11, 1.4)
pt3dadd(-519.5, -233.5, -10, 1)
pt3dadd(-520.5, -234, -10, 0.1)
pt3dadd(-522, -234.5, -10, 1.6)
pt3dadd(-522.5, -235.5, -10, 2.3)
pt3dadd(-524, -236.5, -9, 1)
pt3dadd(-524.5, -237.5, -8, 0.3)
}
}
proc shape3d_51() {
dend[167] { pt3dadd(-525.5, -240, -9, 0.3)
pt3dadd(-525.5, -242, -8, 1.3)
pt3dadd(-525.5, -244.5, -8, 1.8)
pt3dadd(-526, -245.5, -8, 0.9)
pt3dadd(-527, -248, -8, 0.1)
pt3dadd(-528.5, -251.5, -8, 0.1)
pt3dadd(-530, -253.5, -8, 1.5)
pt3dadd(-530, -253.5, -6.5, 2.4)
pt3dadd(-531.5, -254.5, -6.5, 0.8)
pt3dadd(-532.5, -254.5, -6.5, 0.5)
pt3dadd(-534, -256.5, -6.5, 0.3)
pt3dadd(-536.5, -257.5, -6.5, 0.1)
pt3dadd(-535.5, -259.5, -6.5, 0.1)
pt3dadd(-535.5, -261, -5.5, 0.9)
pt3dadd(-536, -262.5, -5.5, 2.4)
pt3dadd(-537.5, -264.5, -4.5, 0.5)
pt3dadd(-542, -266.5, -4.5, 0.3)
pt3dadd(-543.5, -266.5, -4.5, 0.7)
pt3dadd(-545, -266.5, -4.5, 1.2)
pt3dadd(-546.5, -266.5, -4.5, 0.8)
pt3dadd(-548.5, -267, -4.5, 0.4)
pt3dadd(-549.5, -267, -3.5, 0.1)
pt3dadd(-550.5, -267.5, -3.5, 1.6)
pt3dadd(-552.5, -267.5, -3.5, 3.2)
pt3dadd(-555, -269.5, -3.5, 0.2)
pt3dadd(-557.5, -270.5, -3.5, 0.3)
pt3dadd(-559.5, -270.5, -2, 0.5)
pt3dadd(-560, -272.5, -2, 0.1)
pt3dadd(-564, -274.5, -1, 0.1)
pt3dadd(-565, -274.5, -1, 2.2)
pt3dadd(-567, -274.5, -2, 2.8)
pt3dadd(-569, -274.5, -2, 1.4)
pt3dadd(-570, -274.5, -2, 0.5)
pt3dadd(-571.5, -277.5, -2, 0.6)
pt3dadd(-572, -277.5, -3.5, 0.1)
pt3dadd(-572, -280, -1, 0.6)
pt3dadd(-574, -281.5, -3.5, 1.9)
pt3dadd(-575, -283, -3.5, 1.2)
pt3dadd(-575.5, -283, -3.5, 0.1)
pt3dadd(-578, -287.5, -3.5, 0.1)
pt3dadd(-579, -287.5, -2, 0.2)
pt3dadd(-581.5, -288.5, -2, 0.1)
pt3dadd(-582.5, -289.5, -2, 0.1)
pt3dadd(-586, -290.5, -2, 1.7)
pt3dadd(-586.5, -292.5, -4.5, 0.1)
pt3dadd(-587.5, -293.5, -2, 1)
pt3dadd(-590.5, -297.5, -3.5, 0.1)
pt3dadd(-590.5, -298.5, -2, 0.4)
pt3dadd(-590.5, -301, -3.5, 1.2)
pt3dadd(-591.5, -302, -3.5, 0.5)
pt3dadd(-592, -302.5, -3.5, 0.1)
pt3dadd(-591, -307.5, -2, 0.1)
pt3dadd(-591.5, -307.5, -3.5, 1.2)
pt3dadd(-590, -310, -3.5, 1.1)
pt3dadd(-590, -312.5, -3.5, 0.1)
pt3dadd(-591, -314.5, -2, 0.1)
pt3dadd(-591, -315, -1, 0.6)
pt3dadd(-591, -318, -2, 1.2)
pt3dadd(-591, -319, -2, 0.5)
pt3dadd(-591, -321, -2, 0.1)
pt3dadd(-592, -322, -2, 0.1)
pt3dadd(-592.5, -323.5, -3.5, 1.2)
pt3dadd(-592.5, -325.5, -2, 0.7)
pt3dadd(-592.5, -326, -3.5, 0.1)
pt3dadd(-592, -331.5, -3.5, 0.1)
pt3dadd(-592, -331, -5.5, 1.6)
pt3dadd(-592, -333.5, -5.5, 1.9)
pt3dadd(-592.5, -334, -5.5, 0.2)
pt3dadd(-592.5, -336.5, -5.5, 0.1)
pt3dadd(-593, -337.5, -4.5, 1.6)
pt3dadd(-594.5, -338.5, -5.5, 0.1)
pt3dadd(-594.5, -340, -4.5, 0.1)
pt3dadd(-594.5, -341.5, -2, 1.3)
pt3dadd(-595.5, -344.5, -6.5, 0.1)
pt3dadd(-595, -345, -3.5, 0.5)
pt3dadd(-595.5, -345.5, -4.5, 0.1)
}
dend[168] {pt3dclear()
pt3dadd(-509, -202.5, -17.5, 5.4)
pt3dadd(-514, -201.5, -17.5, 1.9)
pt3dadd(-518, -202.5, -17.5, 2.1)
pt3dadd(-522, -203, -17.5, 1.7)
pt3dadd(-523.5, -203, -17.5, 2.2)
pt3dadd(-526, -203, -17.5, 3.4)
pt3dadd(-530, -205, -18, 1.9)
pt3dadd(-531.5, -205, -18, 1.9)
pt3dadd(-533.5, -205, -17.5, 2.6)
pt3dadd(-535, -205, -17.5, 1.6)
pt3dadd(-537, -205, -17.5, 1.3)
pt3dadd(-538.5, -205, -17, 1.3)
pt3dadd(-540.5, -205, -17.5, 2.4)
pt3dadd(-543.5, -206.5, -16, 4.2)
pt3dadd(-546.5, -206.5, -17.5, 2.5)
pt3dadd(-549.5, -205.5, -19, 1.3)
pt3dadd(-553.5, -204.5, -19, 2.3)
pt3dadd(-558, -204.5, -17, 2.6)
pt3dadd(-562.5, -205, -17, 3.3)
pt3dadd(-566.5, -205, -15.5, 3.8)
pt3dadd(-569.5, -205, -15.5, 3.3)
pt3dadd(-571, -205, -16, 4.3)
}
dend[169] {pt3dclear()
pt3dadd(-571, -205, -16, 4.3)
pt3dadd(-575.5, -208.5, -6, 0.1)
pt3dadd(-576.5, -211, -6, 1)
pt3dadd(-579.5, -212, -6.5, 0.1)
pt3dadd(-581, -214.5, -6, 0.1)
pt3dadd(-583, -215.5, -6.5, 1.6)
pt3dadd(-584.5, -217, -7.5, 0.1)
pt3dadd(-588.5, -220, -6.5, 0.1)
pt3dadd(-591, -220.5, -5.5, 1.3)
pt3dadd(-592.5, -222.5, -5.5, 0.1)
pt3dadd(-596, -225, -5.5, 0.1)
pt3dadd(-600, -229, -5.5, 0.1)
pt3dadd(-600.5, -229, -4.5, 2.1)
pt3dadd(-602, -232, -6, 0.1)
pt3dadd(-603, -234, -4.5, 2.1)
pt3dadd(-604, -234.5, -6, 0.1)
pt3dadd(-604, -237, -4.5, 0.1)
pt3dadd(-606.5, -239, -4.5, 0.1)
pt3dadd(-607, -241, -4, 2.2)
pt3dadd(-611, -244.5, -5.5, 0.1)
pt3dadd(-613.5, -246, -5.5, 0.1)
pt3dadd(-616, -246, -4, 2.4)
pt3dadd(-616, -249, -5.5, 0.1)
pt3dadd(-619, -251, -5.5, 0.1)
pt3dadd(-620, -251, -4, 1.4)
}
dend[170] {pt3dclear()
pt3dadd(-571, -205, -16, 4.3)
pt3dadd(-578, -205, -18, 1.9)
pt3dadd(-580, -203, -17, 1.6)
pt3dadd(-582.5, -202, -16, 2.2)
pt3dadd(-585.5, -200.5, -16, 2.2)
pt3dadd(-588, -201, -16, 0.9)
pt3dadd(-590.5, -205, -17.5, 0.9)
pt3dadd(-593.5, -205, -16, 0.9)
pt3dadd(-595.5, -206, -16, 2.8)
pt3dadd(-599, -207.5, -16, 4.1)
pt3dadd(-602.5, -209, -15.5, 2.8)
pt3dadd(-606.5, -210, -15.5, 2.1)
pt3dadd(-609, -211, -15.5, 1.6)
pt3dadd(-611.5, -211, -15.5, 1.1)
pt3dadd(-616.5, -211.5, -15.5, 1.3)
pt3dadd(-621, -213, -15.5, 1.3)
pt3dadd(-625.5, -213, -15, 1.3)
pt3dadd(-629, -213, -14, 2.7)
pt3dadd(-634, -214.5, -14, 5)
}
dend[171] {pt3dclear()
pt3dadd(-634, -214.5, -14, 5)
pt3dadd(-637.5, -220.5, -11, 0.1)
pt3dadd(-641.5, -221.5, -11.5, 0.1)
pt3dadd(-644.5, -224.5, -10, 1.4)
pt3dadd(-645, -224.5, -10, 1.8)
pt3dadd(-647.5, -225.5, -10, 0.8)
pt3dadd(-651.5, -226.5, -10, 0.6)
pt3dadd(-654, -226.5, -10, 0.6)
pt3dadd(-657, -226.5, -10, 0.6)
pt3dadd(-659, -226.5, -10, 1.2)
pt3dadd(-662.5, -227, -10, 0.4)
pt3dadd(-665.5, -229.5, -9.5, 0.4)
pt3dadd(-667.5, -231.5, -8.5, 2.4)
pt3dadd(-670.5, -233.5, -10, 0.3)
pt3dadd(-671, -235, -9.5, 0.3)
pt3dadd(-673.5, -236.5, -9.5, 0.3)
pt3dadd(-677.5, -236.5, -10, 0.3)
pt3dadd(-681, -236.5, -10, 0.3)
pt3dadd(-681, -237.5, -11, 1.8)
pt3dadd(-683, -237.5, -10, 3.2)
pt3dadd(-686, -237.5, -13, 0.4)
pt3dadd(-692.5, -237.5, -11.5, 0.4)
pt3dadd(-693, -237.5, -11.5, 0.4)
pt3dadd(-695.5, -238.5, -11.5, 2.4)
pt3dadd(-699, -238.5, -11.5, 0.9)
pt3dadd(-702, -239, -11.5, 0.4)
pt3dadd(-705, -239, -12, 0.4)
pt3dadd(-706.5, -240.5, -12, 0.4)
pt3dadd(-708, -241.5, -12, 0.4)
pt3dadd(-708, -242.5, -11, 1.6)
pt3dadd(-711.5, -242.5, -11, 3.3)
pt3dadd(-713, -244.5, -11, 1.2)
pt3dadd(-715, -244.5, -11, 0.1)
pt3dadd(-719, -244.5, -11, 0.1)
pt3dadd(-719.5, -245.5, -9.5, 0.9)
pt3dadd(-721, -246.5, -10, 0.1)
pt3dadd(-723.5, -246.5, -9.5, 0.1)
pt3dadd(-726, -247, -9.5, 2.6)
pt3dadd(-727, -247.5, -9.5, 2.8)
pt3dadd(-728, -248, -9.5, 1.5)
pt3dadd(-731, -249, -11, 0.1)
pt3dadd(-735.5, -249, -11, 0.1)
pt3dadd(-737, -249, -10, 1.3)
pt3dadd(-740, -249, -10, 2.8)
pt3dadd(-741, -251.5, -9.5, 1.4)
pt3dadd(-743.5, -251.5, -11.5, 0.1)
pt3dadd(-746.5, -251.5, -11.5, 0.1)
pt3dadd(-748, -256, -9.5, 2.1)
pt3dadd(-751.5, -256, -9.5, 0.1)
pt3dadd(-754.5, -256, -9.5, 0.1)
pt3dadd(-757.5, -259.5, -10, 3.4)
pt3dadd(-759, -259.5, -10, 0.1)
pt3dadd(-761, -261, -10, 2)
pt3dadd(-764, -263, -10, 0.3)
pt3dadd(-766.5, -263.5, -10, 0.3)
pt3dadd(-769, -263.5, -10, 0.3)
pt3dadd(-770.5, -264, -10, 0.3)
pt3dadd(-773, -265.5, -9.5, 1.7)
}
}
proc shape3d_52() {
dend[171] { pt3dadd(-775, -268.5, -11, 0.1)
pt3dadd(-777, -268.5, -10, 0.1)
pt3dadd(-781, -270.5, -11, 0.1)
pt3dadd(-783, -271.5, -17.5, 1.6)
pt3dadd(-786.5, -273, -17.5, 0.3)
pt3dadd(-787, -273, -11, 0.3)
pt3dadd(-789, -274, -11, 1.2)
pt3dadd(-790, -275, -11, 0.4)
pt3dadd(-791.5, -275.5, -11, 0.4)
pt3dadd(-793, -277, -11, 1.5)
pt3dadd(-794.5, -277.5, -11, 1.8)
pt3dadd(-795.5, -278, -11, 1.3)
pt3dadd(-797, -279, -11, 0.3)
pt3dadd(-798.5, -279, -11, 0.3)
pt3dadd(-800, -279, -11, 1.2)
pt3dadd(-802.5, -279, -11, 1.8)
pt3dadd(-803, -278.5, -11, 1.5)
pt3dadd(-804, -278.5, -11, 0.1)
pt3dadd(-806, -280, -11, 0.1)
pt3dadd(-807.5, -281, -17.5, 0.1)
pt3dadd(-810, -282, -17.5, 0.1)
pt3dadd(-811, -282, -17.5, 2.4)
pt3dadd(-812.5, -282, -17.5, 3)
pt3dadd(-814.5, -282, -17.5, 1.4)
pt3dadd(-815.5, -282, -17.5, 0.2)
pt3dadd(-819, -282, -17.5, 0.2)
pt3dadd(-820, -282.5, -17.5, 0.2)
pt3dadd(-822, -284.5, -17.5, 1.2)
pt3dadd(-823.5, -285, -17.5, 0.3)
pt3dadd(-824.5, -286, -17.5, 0.3)
pt3dadd(-825.5, -287.5, -17.5, 1.6)
pt3dadd(-827, -289.5, -17.5, 2.9)
pt3dadd(-828, -290.5, -17.5, 1.6)
pt3dadd(-830, -290.5, -17.5, 0.3)
pt3dadd(-832, -292, -17.5, 0.3)
pt3dadd(-834, -292, -17.5, 0.9)
pt3dadd(-835.5, -292, -23.5, 0.8)
pt3dadd(-837.5, -293.5, -23.5, 0.3)
pt3dadd(-840, -293.5, -23.5, 0.3)
pt3dadd(-840.5, -294.5, -23.5, 0.3)
pt3dadd(-841, -295, -23.5, 0.9)
pt3dadd(-844, -296.5, -23.5, 1.8)
pt3dadd(-846, -298.5, -23.5, 0.9)
pt3dadd(-847, -298.5, -23.5, 0.3)
pt3dadd(-848.5, -298.5, -23.5, 0.3)
pt3dadd(-849.5, -300, -17.5, 1.5)
pt3dadd(-851.5, -300, -23.5, 2.4)
pt3dadd(-854, -301, -23.5, 0.7)
pt3dadd(-855, -301, -23.5, 0.3)
pt3dadd(-856.5, -301, -23.5, 0.3)
pt3dadd(-858.5, -301, -23.5, 0.7)
pt3dadd(-860, -301.5, -23.5, 0.8)
pt3dadd(-861.5, -301.5, -17.5, 0.8)
pt3dadd(-863, -301.5, -17.5, 1.1)
pt3dadd(-864, -300.5, -23.5, 1.5)
pt3dadd(-865.5, -300.5, -23.5, 1.5)
pt3dadd(-866.5, -300.5, -17.5, 1.4)
pt3dadd(-868.5, -300.5, -17.5, 0.3)
pt3dadd(-870, -300.5, -17.5, 0.3)
pt3dadd(-871, -300.5, -23.5, 1)
pt3dadd(-873, -300.5, -23.5, 0.9)
pt3dadd(-874, -300.5, -23.5, 0.9)
pt3dadd(-875.5, -300.5, -23.5, 1.7)
pt3dadd(-877, -300.5, -23.5, 2)
pt3dadd(-880, -300.5, -23.5, 0.7)
pt3dadd(-884, -300.5, -23.5, 0.7)
pt3dadd(-886.5, -300.5, -17.5, 1.9)
pt3dadd(-888, -300.5, -17.5, 2.2)
pt3dadd(-890.5, -302, -17.5, 0.1)
pt3dadd(-891.5, -302, -17.5, 0.1)
pt3dadd(-893.5, -303, -17.5, 0.9)
pt3dadd(-895.5, -305, -17.5, 0.1)
pt3dadd(-897, -305, -17.5, 0.1)
pt3dadd(-900, -306, -17.5, 0.9)
pt3dadd(-902.5, -307.5, -17.5, 0.1)
pt3dadd(-904, -308, -17.5, 0.1)
pt3dadd(-907, -309.5, -17.5, 0.3)
pt3dadd(-908.5, -309.5, -17.5, 0.1)
pt3dadd(-910, -310.5, -17.5, 0.1)
pt3dadd(-912.5, -311, -17.5, 1.7)
pt3dadd(-914, -312, -23.5, 0.8)
pt3dadd(-915.5, -313.5, -23.5, 0.1)
pt3dadd(-918, -314.5, -23.5, 0.1)
pt3dadd(-921, -316, -17.5, 1)
pt3dadd(-923.5, -316.5, -17.5, 0.1)
pt3dadd(-926.5, -318, -17.5, 0.1)
pt3dadd(-926.5, -319, -17.5, 1)
pt3dadd(-928.5, -321, -17.5, 0.1)
pt3dadd(-930, -322.5, -17.5, 0.1)
pt3dadd(-931.5, -323.5, -17.5, 1.1)
pt3dadd(-932.5, -325, -17.5, 0.1)
pt3dadd(-933.5, -327, -17.5, 0.1)
}
dend[172] {pt3dclear()
pt3dadd(-634, -214.5, -14, 5)
pt3dadd(-639.5, -214.5, -15, 1.4)
pt3dadd(-645, -214.5, -17, 1.4)
pt3dadd(-646, -214.5, -16, 2.3)
pt3dadd(-648, -214.5, -15.5, 2.5)
pt3dadd(-649, -214.5, -15.5, 1.6)
pt3dadd(-654, -214.5, -15.5, 1.2)
pt3dadd(-658.5, -214.5, -15.5, 1.2)
pt3dadd(-660.5, -214.5, -15, 2.9)
pt3dadd(-663, -213.5, -15.5, 3.3)
pt3dadd(-666.5, -213.5, -15, 2.5)
pt3dadd(-670.5, -213.5, -14, 1.6)
pt3dadd(-674, -213.5, -16, 1.6)
pt3dadd(-675.5, -212.5, -15.5, 2)
pt3dadd(-678.5, -212, -15, 2.9)
pt3dadd(-682, -212, -16, 1.7)
pt3dadd(-684.5, -212, -16, 0.9)
pt3dadd(-687.5, -211.5, -16, 0.9)
pt3dadd(-691, -210, -15.5, 2.8)
}
dend[173] {pt3dclear()
pt3dadd(-691, -210, -15.5, 2.8)
pt3dadd(-699, -207.5, -15, 1.1)
pt3dadd(-702.5, -207.5, -17, 1.8)
pt3dadd(-705.5, -214, -17, 0.5)
pt3dadd(-710.5, -214, -17, 0.5)
pt3dadd(-715.5, -210, -17, 0.5)
pt3dadd(-718.5, -210, -15, 1.5)
pt3dadd(-723, -210, -15.5, 0.4)
pt3dadd(-726.5, -207, -15.5, 0.5)
pt3dadd(-735.5, -205, -15, 2)
pt3dadd(-738, -202.5, -15, 0.2)
pt3dadd(-739.5, -202.5, -15, 0.2)
pt3dadd(-742.5, -202, -15, 1.9)
pt3dadd(-744, -198, -15, 0.1)
pt3dadd(-748, -201.5, -13.5, 0.1)
pt3dadd(-751, -202, -12, 2)
pt3dadd(-751, -205, -13.5, 0.1)
pt3dadd(-757.5, -208.5, -13, 0.1)
pt3dadd(-760, -209.5, -13, 1.6)
pt3dadd(-762.5, -210.5, -15, 0.1)
pt3dadd(-764.5, -216.5, -13, 0.1)
pt3dadd(-766.5, -219, -13.5, 0.1)
pt3dadd(-765.5, -222, -13, 0.1)
pt3dadd(-764.5, -224, -12, 1.5)
pt3dadd(-764.5, -226.5, -13.5, 0.1)
pt3dadd(-764.5, -232, -13, 0.1)
pt3dadd(-765.5, -232, -13, 0.1)
pt3dadd(-767.5, -232.5, -13.5, 0.7)
pt3dadd(-768, -234.5, -13, 0.1)
pt3dadd(-768.5, -238, -13, 0.1)
pt3dadd(-770.5, -241, -13, 0.1)
pt3dadd(-773, -243, -12, 0.6)
pt3dadd(-779, -243.5, -13.5, 0.1)
pt3dadd(-782.5, -244.5, -13, 0.1)
pt3dadd(-785.5, -245.5, -13.5, 0.1)
pt3dadd(-788.5, -247, -11.5, 0.1)
pt3dadd(-791, -250.5, -13.5, 0.9)
pt3dadd(-793, -252, -13.5, 0.1)
pt3dadd(-796, -254, -13.5, 0.1)
pt3dadd(-799, -254, -13.5, 0.1)
pt3dadd(-802, -254, -14, 1)
pt3dadd(-804, -254, -14, 0.1)
pt3dadd(-804, -254.5, -14, 0.1)
pt3dadd(-806.5, -254.5, -15, 0.1)
pt3dadd(-807, -257, -15.5, 0.1)
pt3dadd(-809, -258.5, -15, 0.1)
pt3dadd(-811.5, -260.5, -15, 0.1)
pt3dadd(-814.5, -265, -15.5, 0.1)
pt3dadd(-815.5, -265, -14, 0.1)
pt3dadd(-818.5, -265, -12, 1.3)
pt3dadd(-821.5, -267, -14, 0.1)
pt3dadd(-824, -267.5, -14, 0.1)
pt3dadd(-829.5, -267.5, -14, 0.1)
pt3dadd(-831, -267.5, -13, 0.1)
pt3dadd(-833.5, -268.5, -12, 0.1)
pt3dadd(-837, -268.5, -13.5, 1.3)
pt3dadd(-839, -268.5, -14, 0.1)
pt3dadd(-841.5, -268.5, -14, 0.1)
pt3dadd(-846.5, -269.5, -14, 0.1)
pt3dadd(-850, -269.5, -14, 0.1)
pt3dadd(-855, -273, -12, 0.1)
pt3dadd(-857, -273, -12, 0.8)
pt3dadd(-858.5, -273.5, -12, 0.9)
pt3dadd(-860, -275, -10, 1.8)
pt3dadd(-863.5, -276.5, -10, 0.7)
pt3dadd(-864, -277.5, -10, 0.6)
pt3dadd(-865.5, -277.5, -10, 0.6)
pt3dadd(-866, -277.5, -10, 1.6)
pt3dadd(-867, -277.5, -10, 2.1)
pt3dadd(-869, -277.5, -10, 1.2)
pt3dadd(-871, -277.5, -10, 0.6)
pt3dadd(-873, -276, -7.5, 0.7)
pt3dadd(-875.5, -274.5, -7.5, 1.1)
pt3dadd(-877, -274.5, -8.5, 1.1)
pt3dadd(-880, -274.5, -6.5, 1.1)
pt3dadd(-883, -275, -6.5, 0.7)
pt3dadd(-885, -275, -7.5, 0.6)
pt3dadd(-885.5, -274.5, -7.5, 1.2)
pt3dadd(-888, -273, -7.5, 2.2)
pt3dadd(-890, -273, -7.5, 1.2)
pt3dadd(-892.5, -272.5, -7.5, 0.7)
pt3dadd(-896, -271, -7.5, 0.7)
pt3dadd(-900, -272.5, -7.5, 0.7)
pt3dadd(-901, -272.5, -7.5, 1.9)
pt3dadd(-902.5, -272.5, -7.5, 2.7)
pt3dadd(-905, -272.5, -7.5, 1.6)
pt3dadd(-906.5, -272.5, -6.5, 0.6)
pt3dadd(-906.5, -272, -6.5, 0.6)
pt3dadd(-909.5, -272, -6.5, 0.5)
}
}
proc shape3d_53() {
dend[173] { pt3dadd(-912, -272, -5.5, 1.7)
pt3dadd(-912.5, -272, -5.5, 2.7)
pt3dadd(-913.5, -272, -4, 1.2)
pt3dadd(-914.5, -271, -6.5, 0.1)
pt3dadd(-918.5, -268, -5.5, 0.1)
pt3dadd(-919, -269.5, -3, 1.7)
pt3dadd(-920, -269.5, -3, 2.3)
pt3dadd(-921.5, -269.5, -3, 1.7)
pt3dadd(-922.5, -267.5, -2, 0.9)
pt3dadd(-923, -265.5, -2, 0.7)
pt3dadd(-925.5, -263, -3, 0.7)
pt3dadd(-927, -261, -3, 1.9)
pt3dadd(-929, -261, -3, 2.3)
pt3dadd(-930.5, -262, -3, 0.9)
pt3dadd(-933, -262, -3, 0.6)
pt3dadd(-935.5, -263, -3, 0.6)
pt3dadd(-938.5, -263, -3, 0.8)
pt3dadd(-942.5, -261, -3, 0.7)
pt3dadd(-946.5, -263.5, -3, 0.7)
pt3dadd(-949, -265, -3, 0.7)
pt3dadd(-950, -265, -3, 1.6)
pt3dadd(-952, -265.5, -2, 1.6)
pt3dadd(-954, -268.5, -2, 1.4)
pt3dadd(-954, -271.5, -2, 1)
pt3dadd(-957, -271.5, -2, 0.6)
pt3dadd(-961.5, -273.5, -3, 0.6)
pt3dadd(-962, -276, -2, 0.6)
pt3dadd(-964, -272, -4, 0.6)
pt3dadd(-965.5, -274.5, -4, 0.6)
pt3dadd(-966.5, -274.5, -2, 1.2)
pt3dadd(-973, -274.5, -3, 0.6)
pt3dadd(-971, -279, -2, 0.9)
pt3dadd(-973, -280.5, -7.5, 0.8)
pt3dadd(-973.5, -279.5, -6.5, 0.5)
pt3dadd(-976, -279.5, -5.5, 1.3)
pt3dadd(-977.5, -279.5, -5.5, 1.3)
pt3dadd(-979.5, -281.5, -7.5, 0.9)
pt3dadd(-979.5, -283, -7.5, 0.2)
pt3dadd(-979.5, -286, -7.5, 0.2)
pt3dadd(-980.5, -286, -7.5, 1.2)
pt3dadd(-982, -287.5, -8.5, 1.7)
pt3dadd(-983, -289, -10, 0.4)
pt3dadd(-983.5, -291.5, -10, 0.4)
pt3dadd(-984.5, -291.5, -10, 1.5)
pt3dadd(-985, -291.5, -10, 1.5)
pt3dadd(-986, -291.5, -10, 0.9)
pt3dadd(-987, -291, -10, 0.1)
pt3dadd(-990, -291, -10, 0.1)
pt3dadd(-992, -290.5, -10, 0.1)
pt3dadd(-993, -288.5, -8.5, 1.3)
pt3dadd(-993, -291, -7.5, 1.3)
pt3dadd(-993, -294, -7.5, 0.7)
pt3dadd(-993, -295.5, -7.5, 0.1)
pt3dadd(-990.5, -298, -7.5, 0.1)
pt3dadd(-988, -300.5, -7.5, 0.1)
pt3dadd(-988.5, -301.5, -7.5, 0.5)
pt3dadd(-989.5, -304, -7.5, 1.2)
pt3dadd(-989.5, -306, -7.5, 1.2)
pt3dadd(-989, -307.5, -7.5, 0.1)
pt3dadd(-988, -308.5, -7.5, 0.1)
pt3dadd(-986.5, -309.5, -8.5, 0.1)
pt3dadd(-985.5, -310.5, -8.5, 0.1)
pt3dadd(-985.5, -313, -8.5, 0.1)
pt3dadd(-984, -316, -8.5, 0.1)
pt3dadd(-984, -317, -8.5, 0.1)
pt3dadd(-983, -318.5, -11, 0.1)
pt3dadd(-982, -318.5, -7.5, 1.6)
pt3dadd(-980.5, -320, -8.5, 1.2)
pt3dadd(-979.5, -321.5, -8.5, 0.6)
}
dend[174] {pt3dclear()
pt3dadd(-691, -210, -15.5, 2.8)
pt3dadd(-698, -210, -15, 0.7)
pt3dadd(-701.5, -210, -15, 0.7)
pt3dadd(-704, -210.5, -13.5, 2.6)
pt3dadd(-707, -210.5, -13, 4.3)
pt3dadd(-711.5, -211.5, -14, 1.6)
pt3dadd(-717, -212, -13.5, 1.8)
pt3dadd(-719.5, -212, -14, 3.4)
pt3dadd(-722.5, -212, -14, 0.4)
pt3dadd(-726, -212, -14, 0.4)
pt3dadd(-727.5, -212, -14, 2.5)
pt3dadd(-730.5, -212, -13, 0.7)
pt3dadd(-733, -211, -13, 0.7)
pt3dadd(-737.5, -210, -12, 0.7)
pt3dadd(-740, -210, -13.5, 0.7)
pt3dadd(-739.5, -209, -11.5, 2.9)
pt3dadd(-743, -209, -12, 4.3)
pt3dadd(-747, -209, -13.5, 0.8)
pt3dadd(-753, -208.5, -13.5, 0.9)
pt3dadd(-755, -206.5, -12, 0.9)
pt3dadd(-757.5, -206, -13, 0.9)
pt3dadd(-759, -206.5, -13, 2.9)
pt3dadd(-762.5, -206.5, -14, 0.5)
pt3dadd(-765, -206.5, -13, 2.5)
pt3dadd(-766.5, -206, -13, 3.8)
pt3dadd(-770, -203.5, -13.5, 1.8)
pt3dadd(-770.5, -203.5, -13, 0.3)
pt3dadd(-772.5, -203.5, -14, 0.3)
pt3dadd(-773, -202.5, -13.5, 1.8)
pt3dadd(-774.5, -202, -13, 2.7)
pt3dadd(-777.5, -200, -14, 0.2)
pt3dadd(-781, -200, -13.5, 0.2)
pt3dadd(-783, -200, -13.5, 3)
pt3dadd(-784.5, -200, -13.5, 1.6)
pt3dadd(-786.5, -200, -13, 0.3)
pt3dadd(-789, -200, -13, 0.3)
pt3dadd(-791, -200, -12, 2.2)
pt3dadd(-793.5, -200, -13, 4.2)
pt3dadd(-796.5, -198, -13, 2)
pt3dadd(-798.5, -198, -13, 0.4)
pt3dadd(-801.5, -197.5, -13, 0.5)
pt3dadd(-804.5, -197.5, -12, 0.5)
pt3dadd(-807, -195.5, -13, 0.5)
pt3dadd(-809, -195.5, -11.5, 2)
pt3dadd(-810.5, -196.5, -13, 3.7)
pt3dadd(-814.5, -196, -11.5, 1.1)
pt3dadd(-818, -194, -13, 1.1)
pt3dadd(-820.5, -193.5, -11, 2.1)
pt3dadd(-822, -193.5, -11.5, 2.5)
pt3dadd(-826, -193.5, -11.5, 0.7)
pt3dadd(-827.5, -194, -11, 0.7)
pt3dadd(-829.5, -194, -12, 3.2)
pt3dadd(-833.5, -194, -11.5, 0.3)
pt3dadd(-835.5, -194, -11.5, 0.3)
pt3dadd(-836.5, -194, -12, 2.7)
pt3dadd(-839.5, -194, -12, 3.8)
pt3dadd(-843, -194, -12, 2.1)
pt3dadd(-843.5, -194, -11.5, 0.7)
pt3dadd(-846.5, -192, -12, 0.9)
pt3dadd(-848, -192, -12, 0.9)
pt3dadd(-850, -192, -11.5, 2.1)
pt3dadd(-855, -192, -11.5, 0.3)
pt3dadd(-860, -190.5, -11, 0.3)
pt3dadd(-862.5, -190.5, -11, 0.3)
pt3dadd(-868, -188, -11.5, 2)
pt3dadd(-872, -189, -11.5, 0.5)
pt3dadd(-875, -189, -11.5, 0.5)
pt3dadd(-880.5, -189, -11, 0.6)
pt3dadd(-883, -189, -10, 2.8)
pt3dadd(-887.5, -188.5, -10, 0.8)
pt3dadd(-891, -188.5, -10, 1.3)
pt3dadd(-893, -186, -10, 1.3)
pt3dadd(-895.5, -185.5, -11, 1.2)
pt3dadd(-897.5, -185.5, -9.5, 0.6)
pt3dadd(-900, -185.5, -11, 1)
pt3dadd(-903.5, -184, -10, 0.4)
pt3dadd(-907, -182, -10, 0.4)
pt3dadd(-909, -182.5, -10, 0.5)
pt3dadd(-913, -182.5, -10, 0.5)
pt3dadd(-916.5, -185, -10, 1.5)
pt3dadd(-921.5, -186, -11.5, 1.1)
pt3dadd(-927, -188, -11, 1.1)
pt3dadd(-931.5, -188, -9.5, 1.1)
pt3dadd(-932.5, -190.5, -9.5, 1.1)
}
dend[175] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 15.9)
pt3dadd(44, 6.5, -5.5, 15.9)
pt3dadd(44, 4, -5, 14.1)
pt3dadd(44.5, 1.5, -3, 11.2)
pt3dadd(45, -0.5, -4, 10.1)
pt3dadd(48, -6, -4, 10.7)
pt3dadd(47.5, -9, -2, 11)
pt3dadd(49.5, -13, -2, 11.9)
pt3dadd(50.5, -16.5, -2, 14.3)
pt3dadd(51.5, -18.5, -3, 13.7)
}
dend[176] {pt3dclear()
pt3dadd(51.5, -18.5, -3, 13.7)
pt3dadd(50.5, -29, -1, 6.3)
pt3dadd(51, -34, 0, 6.5)
pt3dadd(52.5, -37.5, 0, 6.8)
pt3dadd(52.5, -40, 0, 7.9)
pt3dadd(52.5, -43, 0, 9)
pt3dadd(52, -47, 0, 9.7)
pt3dadd(54, -50, -2, 8.6)
pt3dadd(54.5, -53, -3, 7.6)
pt3dadd(55, -56.5, -3, 6.7)
pt3dadd(57, -58, -3, 6.8)
pt3dadd(59, -60.5, -4, 6.6)
pt3dadd(63, -64, -5, 6.8)
pt3dadd(66, -67, -5, 7)
pt3dadd(69.5, -71, -5, 7.4)
pt3dadd(72, -75, -5, 7.4)
pt3dadd(75, -76, -5.5, 7.3)
pt3dadd(78, -80.5, -6.5, 7.1)
pt3dadd(80, -83.5, -5.5, 6.2)
pt3dadd(84.5, -86.5, -5.5, 5.4)
pt3dadd(88, -90, -6.5, 6.2)
pt3dadd(91, -93.5, -5.5, 5.5)
pt3dadd(93.5, -96, -6.5, 5.7)
pt3dadd(94.5, -100, -6.5, 5.1)
pt3dadd(95, -101, -6.5, 4.1)
pt3dadd(96.5, -103.5, -5.5, 3.3)
pt3dadd(98.5, -104, -6.5, 3.8)
pt3dadd(102, -105.5, -6.5, 4.3)
pt3dadd(104, -106, -6.5, 5)
pt3dadd(108, -109, -6.5, 5.1)
pt3dadd(111.5, -110.5, -6.5, 5.8)
pt3dadd(115, -112.5, -6.5, 5.5)
pt3dadd(119, -114.5, -7.5, 4.6)
pt3dadd(122.5, -115.5, -8.5, 4.2)
pt3dadd(125.5, -118, -8.5, 4.7)
pt3dadd(129.5, -119, -8.5, 5.1)
pt3dadd(132.5, -120.5, -8.5, 5.3)
}
}
proc shape3d_54() {
dend[176] { pt3dadd(135, -122, -6.5, 4.9)
pt3dadd(138, -123, -6.5, 4.9)
pt3dadd(140, -124, -6.5, 5.7)
pt3dadd(143.5, -126, -6.5, 5.8)
pt3dadd(146, -127.5, -5.5, 4.9)
pt3dadd(148.5, -128, -3, 4.6)
pt3dadd(151, -129, -4, 4.8)
pt3dadd(154, -129.5, -5, 5.5)
pt3dadd(157.5, -132.5, -5, 5.7)
pt3dadd(161, -133.5, -5.5, 6.2)
pt3dadd(162, -134.5, -5.5, 6)
pt3dadd(166.5, -134.5, -5.5, 5.3)
pt3dadd(168, -138, -5.5, 4.4)
pt3dadd(168.5, -138.5, -5.5, 5.2)
pt3dadd(171.5, -139.5, -5.5, 5.2)
pt3dadd(175.5, -142, -5.5, 5.4)
pt3dadd(178.5, -143.5, -5.5, 5)
pt3dadd(181.5, -146.5, -6.5, 4.7)
pt3dadd(185, -149.5, -6.5, 4.9)
pt3dadd(186.5, -150, -6.5, 5)
pt3dadd(189, -153.5, -6.5, 5)
pt3dadd(191, -154.5, -6.5, 5.3)
pt3dadd(193.5, -154.5, -6.5, 5.3)
pt3dadd(196.5, -158, -6.5, 5.5)
pt3dadd(198, -161.5, -2, 6)
}
dend[177] {pt3dclear()
pt3dadd(198, -161.5, -2, 6)
pt3dadd(201, -168.5, -2, 5)
pt3dadd(202.5, -171.5, -2, 5)
pt3dadd(203.5, -174.5, -2, 5.5)
pt3dadd(204.5, -177.5, 0, 6.3)
pt3dadd(204.5, -180.5, 0, 4.9)
pt3dadd(205.5, -184, 6.5, 5.8)
pt3dadd(207, -189, 6.5, 5.3)
pt3dadd(207.5, -195, 0, 5.3)
pt3dadd(208, -202, 0, 5.3)
pt3dadd(208, -208, 0, 5.3)
pt3dadd(208, -210.5, 1, 5)
pt3dadd(210, -220, 1, 5)
pt3dadd(211.5, -229.5, 2, 5)
pt3dadd(213, -238.5, 1, 5)
pt3dadd(216, -247.5, 1, 5)
pt3dadd(218.5, -254.5, 1, 5)
pt3dadd(221, -261, 2, 5)
pt3dadd(224.5, -270, 2, 5)
pt3dadd(225, -275, 3, 5)
pt3dadd(227.5, -281.5, 3, 5)
pt3dadd(230.5, -287, 3, 5)
pt3dadd(234, -292, 3, 5)
pt3dadd(238.5, -294.5, 3, 5)
pt3dadd(243, -297.5, 3, 5)
pt3dadd(247, -299, 3, 5)
pt3dadd(252.5, -304, 2, 5)
pt3dadd(256.5, -306, 2, 5)
pt3dadd(263, -310.5, 2, 5)
pt3dadd(268.5, -314, 2, 5)
pt3dadd(273, -317, 1, 5)
pt3dadd(274.5, -322, 3, 5)
pt3dadd(279, -326, 6.5, 3.7)
pt3dadd(281, -328, 7.5, 4.4)
pt3dadd(283, -332.5, 6.5, 4.9)
pt3dadd(285, -336, 6.5, 4.6)
pt3dadd(287.5, -340, 5.5, 4.6)
pt3dadd(289.5, -342.5, 5.5, 4.6)
pt3dadd(289.5, -346, 5.5, 4.6)
pt3dadd(291, -349, 5.5, 4.6)
pt3dadd(291, -352.5, 5.5, 4.4)
pt3dadd(292, -354.5, 5.5, 4.3)
pt3dadd(293.5, -357.5, 5.5, 4.3)
pt3dadd(296.5, -358.5, 5.5, 4.3)
pt3dadd(296.5, -361.5, 5.5, 3.7)
pt3dadd(295.5, -366.5, 5.5, 3.6)
pt3dadd(294.5, -370, 5.5, 4)
pt3dadd(294, -373, 5.5, 3.7)
pt3dadd(292.5, -376, 5.5, 3.6)
pt3dadd(292.5, -379, 5.5, 3.4)
pt3dadd(294.5, -384, 5.5, 3.4)
pt3dadd(295, -386, 5.5, 3.6)
pt3dadd(295, -389, 5.5, 4)
pt3dadd(295, -391, 5.5, 4.6)
pt3dadd(297.5, -392.5, 5.5, 4.3)
pt3dadd(297.5, -396.5, 5.5, 3.6)
pt3dadd(297, -399, 5.5, 3.2)
pt3dadd(297.5, -401.5, 5.5, 3.8)
pt3dadd(297.5, -403, 5.5, 4.6)
pt3dadd(298.5, -407.5, 5, 4.7)
pt3dadd(298.5, -412, 5, 5.2)
pt3dadd(299, -414.5, 5, 4)
pt3dadd(301.5, -422, 6.5, 3.3)
pt3dadd(303, -425, 6.5, 3.3)
pt3dadd(303, -430, 13, 3.6)
pt3dadd(303, -433.5, 13, 4)
pt3dadd(303, -435.5, 14, 4)
pt3dadd(303, -439, 14, 4.4)
pt3dadd(303, -443, 14, 5.1)
pt3dadd(304.5, -445.5, 14, 4.3)
pt3dadd(305, -448, 15.5, 3.4)
pt3dadd(305.5, -449.5, 15.5, 2.8)
pt3dadd(305.5, -452, 15, 2.8)
pt3dadd(304.5, -454, 15.5, 2.3)
pt3dadd(303, -457.5, 15.5, 2.1)
pt3dadd(303, -460, 15.5, 2.7)
pt3dadd(302, -462, 15.5, 3.4)
pt3dadd(302, -465, 15.5, 3.8)
pt3dadd(302, -473.5, 17.5, 3.8)
pt3dadd(299.5, -479.5, 17.5, 3.8)
pt3dadd(299, -483, 17.5, 3.8)
pt3dadd(297.5, -487, 18.5, 3.8)
pt3dadd(294, -492, 18.5, 3.8)
pt3dadd(291.5, -500, 18.5, 3.8)
pt3dadd(289.5, -509, 17.5, 3.8)
pt3dadd(285, -515, 17.5, 3.8)
pt3dadd(283.5, -524, 17.5, 3.8)
pt3dadd(281.5, -530.5, 17.5, 3.8)
pt3dadd(279, -540, 18.5, 3.8)
pt3dadd(276.5, -550, 18.5, 3.8)
pt3dadd(276.5, -556, 18.5, 3.8)
pt3dadd(274.5, -564, 18.5, 3.8)
pt3dadd(271.5, -573.5, 17.5, 3.8)
pt3dadd(270, -584, 18.5, 3.7)
pt3dadd(267, -593.5, 18.5, 3.7)
pt3dadd(266.5, -599.5, 20, 3.1)
pt3dadd(266.5, -605, 18.5, 2.8)
pt3dadd(266.5, -610, 18.5, 2.8)
pt3dadd(266.5, -615, 18.5, 2.8)
pt3dadd(266.5, -621, 18.5, 3.2)
pt3dadd(266.5, -623, 18.5, 2.7)
pt3dadd(266.5, -627, 18.5, 2.6)
pt3dadd(267.5, -628.5, 18.5, 2.2)
pt3dadd(267.5, -632.5, 18.5, 2.4)
pt3dadd(267.5, -636.5, 18.5, 2.9)
pt3dadd(267.5, -639.5, 18.5, 2.7)
pt3dadd(267, -643.5, 18.5, 2.5)
pt3dadd(267, -647.5, 18.5, 2.5)
pt3dadd(267, -650.5, 18.5, 2.5)
pt3dadd(267, -653, 18.5, 2.8)
pt3dadd(265.5, -657, 18.5, 2)
pt3dadd(265, -658.5, 18.5, 2.5)
pt3dadd(265, -661.5, 18.5, 2.6)
pt3dadd(264.5, -664, 18.5, 2.6)
pt3dadd(263.5, -667, 18.5, 2.6)
pt3dadd(262.5, -669.5, 18.5, 2.7)
pt3dadd(261.5, -672.5, 18.5, 3)
pt3dadd(261.5, -675, 18.5, 2.5)
pt3dadd(261.5, -676.5, 18.5, 2)
pt3dadd(261.5, -679, 18.5, 2.1)
pt3dadd(261, -683, 18.5, 2.6)
pt3dadd(259.5, -687, 18.5, 3.3)
pt3dadd(258, -690, 18.5, 3.3)
pt3dadd(255.5, -694, 19.5, 3.3)
pt3dadd(256, -696, 20, 2.8)
pt3dadd(255, -698, 20, 2.8)
pt3dadd(255.5, -699, 19.5, 2.3)
pt3dadd(255.5, -702, 19.5, 2.2)
pt3dadd(253.5, -706.5, 19.5, 2.2)
pt3dadd(255.5, -713.5, 19.5, 2.2)
pt3dadd(259, -721, 20, 2.6)
pt3dadd(260.5, -725.5, 19.5, 2.9)
pt3dadd(264, -728, 19.5, 2.9)
pt3dadd(267.5, -734, 19.5, 2.9)
pt3dadd(267.5, -739.5, 19.5, 2.9)
pt3dadd(268, -743, 19.5, 2.9)
pt3dadd(268.5, -746, 19.5, 2.9)
pt3dadd(272.5, -749.5, 19.5, 2.9)
pt3dadd(271.5, -752.5, 19.5, 3.5)
pt3dadd(271.5, -756.5, 19.5, 3.2)
pt3dadd(271.5, -760.5, 19.5, 2.8)
pt3dadd(270.5, -763.5, 19.5, 3.1)
pt3dadd(270.5, -765.5, 19.5, 2.5)
pt3dadd(270.5, -768, 19.5, 2.1)
pt3dadd(271, -770, 22, 1.6)
pt3dadd(272, -773, 20, 1.6)
pt3dadd(271, -775.5, 22, 3.5)
pt3dadd(271, -779, 22, 2.8)
pt3dadd(270.5, -781, 22, 2.4)
pt3dadd(270.5, -783, 22, 2.1)
pt3dadd(271, -786, 21, 2.2)
pt3dadd(271, -789.5, 21, 2.7)
pt3dadd(271, -792.5, 21, 2.8)
pt3dadd(271.5, -797, 21, 2.7)
pt3dadd(272, -800.5, 21, 2.2)
pt3dadd(272, -801.5, 21, 1.8)
pt3dadd(270.5, -803, 21, 2.7)
pt3dadd(270, -807, 21, 3.3)
pt3dadd(269, -810, 21, 2.2)
pt3dadd(269, -811, 21, 1.9)
pt3dadd(270.5, -814.5, 21, 2.4)
pt3dadd(271.5, -818.5, 22, 1.7)
pt3dadd(273, -825.5, 22, 1.6)
pt3dadd(273, -830, 22, 1.6)
pt3dadd(273, -837, 22, 1.6)
pt3dadd(274.5, -841, 25, 1.7)
pt3dadd(276, -846.5, 21, 1.7)
pt3dadd(276.5, -852, 22, 1.7)
pt3dadd(277.5, -854.5, 21, 1.7)
pt3dadd(280.5, -860.5, 22, 1.7)
pt3dadd(281, -864, 22, 1.7)
pt3dadd(283.5, -868, 22, 1.6)
pt3dadd(284.5, -871, 22, 1.6)
pt3dadd(287, -875.5, 22, 1.6)
pt3dadd(289, -878, 22, 1.6)
}
}
proc shape3d_55() {
dend[177] { pt3dadd(289.5, -881, 22, 1.6)
pt3dadd(290.5, -883, 19.5, 1.6)
pt3dadd(291, -886.5, 12, 1.6)
pt3dadd(291.5, -888.5, 17.5, 1.6)
pt3dadd(289.5, -892.5, 17.5, 1.6)
pt3dadd(289.5, -899, 17.5, 1.6)
pt3dadd(289.5, -906, 17.5, 1.6)
pt3dadd(288.5, -910.5, 17.5, 1.6)
pt3dadd(289, -915.5, 17.5, 1.6)
pt3dadd(290.5, -918, 17.5, 1.8)
pt3dadd(289, -922, 17.5, 3.4)
pt3dadd(289.5, -926.5, 17.5, 3.7)
pt3dadd(289.5, -929, 17.5, 2.7)
pt3dadd(288, -931.5, 17.5, 1.9)
pt3dadd(288, -934, 17.5, 1.8)
pt3dadd(288.5, -936, 23, 2)
pt3dadd(288.5, -937, 24, 2.7)
pt3dadd(288, -940, 20, 0.9)
pt3dadd(288, -942, 20, 0.9)
pt3dadd(288, -943.5, 20, 1.4)
pt3dadd(288, -945.5, 20, 1.8)
pt3dadd(287.5, -949.5, 20, 2)
pt3dadd(286.5, -950.5, 20, 0.9)
pt3dadd(286.5, -955.5, 20, 1.1)
pt3dadd(286, -958.5, 20, 2)
pt3dadd(286, -962, 14, 2.6)
pt3dadd(286, -966.5, 14, 2.6)
pt3dadd(288, -968.5, 14, 2.6)
pt3dadd(286.5, -973, 14, 2.1)
pt3dadd(286.5, -976, 14, 2.1)
pt3dadd(285.5, -979.5, 14, 2.1)
pt3dadd(285.5, -984.5, 14, 1.8)
pt3dadd(285.5, -986.5, 14, 0.8)
pt3dadd(286, -992, 14, 0.9)
pt3dadd(286, -997.5, 14, 0.9)
pt3dadd(286, -1001.5, 14, 0.9)
pt3dadd(285.5, -1005.5, 8.5, 0.7)
pt3dadd(285.5, -1009, 8.5, 1)
pt3dadd(286, -1013, 8.5, 1.3)
pt3dadd(285, -1018.5, 8.5, 1.3)
pt3dadd(285.5, -1025, 7.5, 1.1)
pt3dadd(285.5, -1028, 7.5, 0.9)
pt3dadd(285.5, -1029.5, 7.5, 0.7)
pt3dadd(286.5, -1031.5, 6.5, 0.9)
pt3dadd(286.5, -1035.5, 6.5, 1.2)
pt3dadd(286, -1039.5, 6.5, 1.8)
pt3dadd(285, -1043.5, 6.5, 0.8)
pt3dadd(283, -1047.5, 6.5, 1)
pt3dadd(282.5, -1053, 6.5, 0.9)
pt3dadd(282.5, -1057, 6.5, 0.9)
pt3dadd(281.5, -1061.5, 6.5, 0.9)
pt3dadd(281.5, -1067, 6.5, 0.7)
pt3dadd(280.5, -1068.5, 6.5, 0.5)
pt3dadd(280, -1071.5, 7.5, 0.5)
pt3dadd(281, -1074.5, 17.5, 0.9)
pt3dadd(281, -1076.5, 21, 0.3)
pt3dadd(280, -1080, 22, 0.3)
pt3dadd(280, -1081, 21, 0.3)
pt3dadd(282, -1089, 22, 0.2)
pt3dadd(280.5, -1093.5, 22, 0.2)
pt3dadd(279.5, -1096, 22, 0.1)
pt3dadd(277, -1098.5, 22, 0.1)
pt3dadd(277, -1101, 22, 1.4)
pt3dadd(278, -1101, 15.5, 1.4)
pt3dadd(278, -1104.5, 16.5, 0.7)
pt3dadd(278.5, -1110, 15.5, 0.1)
pt3dadd(278.5, -1116, 15.5, 0.1)
pt3dadd(278.5, -1121, 15.5, 0.1)
pt3dadd(278.5, -1125, 15.5, 0.1)
pt3dadd(278.5, -1129.5, 15.5, 0.1)
pt3dadd(278, -1131.5, 15.5, 0.1)
pt3dadd(277.5, -1137, 16.5, 0.1)
pt3dadd(277, -1141.5, 17.5, 0.1)
pt3dadd(276, -1147, 16.5, 0.1)
pt3dadd(277, -1149, 16.5, 2.1)
pt3dadd(276.5, -1150, 15.5, 0.1)
pt3dadd(276.5, -1155, 15.5, 0.1)
pt3dadd(275, -1160, 15.5, 0.1)
pt3dadd(276, -1161.5, 15.5, 0.1)
pt3dadd(276, -1164, 17.5, 1.4)
pt3dadd(275.5, -1165.5, 16.5, 0.1)
pt3dadd(275.5, -1172, 16.5, 0.1)
pt3dadd(274.5, -1177.5, 16.5, 0.1)
pt3dadd(274.5, -1183, 16.5, 0.1)
pt3dadd(274, -1190, 16.5, 0.1)
pt3dadd(274, -1194.5, 16.5, 0.1)
pt3dadd(275, -1200, 15.5, 0.1)
pt3dadd(276, -1203.5, 16.5, 0.1)
pt3dadd(274, -1205.5, 18.5, 2.1)
pt3dadd(271.5, -1206, 17.5, 0.1)
pt3dadd(269, -1210.5, 17.5, 0.1)
pt3dadd(269, -1218, 17.5, 0.1)
pt3dadd(268, -1224, 17.5, 0.1)
pt3dadd(265.5, -1229.5, 17.5, 0.1)
pt3dadd(263.5, -1236, 16.5, 0.1)
pt3dadd(261.5, -1243, 16.5, 0.1)
pt3dadd(261.5, -1246.5, 9.5, 0.1)
pt3dadd(263, -1253, 11, 0.1)
pt3dadd(263, -1260.5, 11, 0.1)
pt3dadd(263, -1266.5, 11, 0.1)
pt3dadd(261, -1271, 11, 0.1)
pt3dadd(261, -1276.5, 11, 0.1)
pt3dadd(260.5, -1278, 12, 0.1)
pt3dadd(260.5, -1283, 12, 0.1)
pt3dadd(260.5, -1287, 12, 0.1)
pt3dadd(261, -1290, 13, 1.8)
pt3dadd(257.5, -1294, 11, 0.1)
pt3dadd(256.5, -1301.5, 11, 0.1)
pt3dadd(256.5, -1308, 11, 0.1)
pt3dadd(256.5, -1313, 11, 0.1)
pt3dadd(256.5, -1318.5, 12, 0.1)
pt3dadd(256.5, -1324, 13, 0.1)
pt3dadd(255, -1328, 15.5, 0.1)
pt3dadd(255.5, -1332.5, 15, 0.1)
pt3dadd(255.5, -1338, 15.5, 0.1)
pt3dadd(252.5, -1340.5, 19.5, 0.1)
}
dend[178] {pt3dclear()
pt3dadd(198, -161.5, -2, 6)
pt3dadd(200.5, -164, -5, 3.2)
pt3dadd(204, -166.5, -5, 3.2)
pt3dadd(206.5, -166.5, -5.5, 4.3)
pt3dadd(209.5, -165.5, -6.5, 5)
pt3dadd(213.5, -166, -5, 4.1)
pt3dadd(216.5, -166.5, -5, 3.7)
pt3dadd(219, -168, -5, 3.7)
pt3dadd(220.5, -169, -6.5, 4)
pt3dadd(221.5, -170.5, -5.5, 3.6)
pt3dadd(223.5, -171, -5.5, 3.6)
pt3dadd(226.5, -173, -5.5, 3.8)
pt3dadd(229.5, -175.5, -5.5, 3.7)
pt3dadd(231.5, -178, -5, 2.7)
pt3dadd(232, -178, -5, 2.5)
pt3dadd(234, -178, -5.5, 2.5)
pt3dadd(235.5, -181.5, -5.5, 2.8)
pt3dadd(236, -184.5, -5.5, 3.1)
pt3dadd(238.5, -184.5, -5.5, 4.3)
pt3dadd(239.5, -185, -5.5, 4.3)
pt3dadd(241.5, -188, -10, 4.6)
pt3dadd(242, -190.5, -12, 4.6)
pt3dadd(244, -191.5, -11, 4.9)
pt3dadd(246.5, -194, -11, 4.6)
pt3dadd(250, -197.5, -11, 3.8)
pt3dadd(252, -200, -11, 2.7)
pt3dadd(253.5, -202.5, -11, 2.5)
pt3dadd(254.5, -206, -12, 2.5)
pt3dadd(255, -207.5, -11, 2.5)
pt3dadd(257, -208.5, -12, 2.5)
pt3dadd(257, -208.5, -11, 2.5)
pt3dadd(258, -210.5, -14.5, 2.8)
pt3dadd(260.5, -210, -14.5, 2.8)
pt3dadd(261, -212, -15.5, 2.8)
pt3dadd(262.5, -215, -15.5, 2.8)
pt3dadd(263.5, -216.5, -15.5, 2.8)
pt3dadd(264, -218.5, -15.5, 2.7)
pt3dadd(266.5, -219, -15.5, 2.7)
pt3dadd(267.5, -220, -16.5, 2.5)
pt3dadd(270, -221, -16.5, 2.7)
pt3dadd(271, -222.5, -16.5, 3.5)
pt3dadd(273, -224, -19, 3.6)
pt3dadd(276, -225, -19, 3.8)
pt3dadd(278, -227.5, -19, 4.4)
pt3dadd(281.5, -229, -19, 4.6)
pt3dadd(282, -231.5, -19, 4.6)
pt3dadd(286, -237.5, -20, 3.1)
pt3dadd(290.5, -240, -20, 3.1)
pt3dadd(293.5, -242.5, -20, 3.1)
pt3dadd(296.5, -245, -20, 3.8)
pt3dadd(299, -246.5, -20, 3.8)
pt3dadd(302, -248, -20, 3.4)
pt3dadd(304, -248.5, -21.5, 3.3)
pt3dadd(306.5, -250.5, -21, 2.5)
pt3dadd(309, -250.5, -21, 2)
pt3dadd(311.5, -250.5, -21, 2.2)
pt3dadd(313, -250.5, -21, 2.6)
pt3dadd(315.5, -252.5, -22, 3.1)
pt3dadd(318.5, -252.5, -22, 4)
pt3dadd(321, -255, -21, 3.5)
pt3dadd(323.5, -256.5, -23, 3.1)
pt3dadd(326.5, -258, -22, 1.9)
pt3dadd(328, -258, -23, 1.5)
pt3dadd(329.5, -259, -23, 1.5)
pt3dadd(331.5, -261, -23, 2.7)
pt3dadd(334.5, -261, -23, 4)
pt3dadd(337, -262.5, -22, 4.6)
}
dend[179] {pt3dclear()
pt3dadd(337, -262.5, -22, 4.6)
pt3dadd(340.5, -260.5, -23, 1)
pt3dadd(343.5, -260, -23, 1.3)
pt3dadd(344.5, -259, -23, 1.3)
pt3dadd(346, -259, -23, 1.6)
pt3dadd(348.5, -258.5, -23, 2.3)
pt3dadd(350.5, -258.5, -24, 3.4)
pt3dadd(353.5, -259.5, -24, 1.5)
pt3dadd(355.5, -260, -24, 0.9)
pt3dadd(357, -260, -24, 0.9)
pt3dadd(358, -260.5, -23.5, 1.7)
pt3dadd(359, -262.5, -23, 1.9)
pt3dadd(361.5, -264, -23, 1.1)
pt3dadd(365, -264, -29.5, 2)
pt3dadd(366.5, -264, -29.5, 2)
pt3dadd(368, -265, -29.5, 1.8)
pt3dadd(369, -266, -29.5, 1.7)
}
}
proc shape3d_56() {
dend[179] { pt3dadd(369.5, -266, -29.5, 1.4)
pt3dadd(371, -266, -29.5, 1.8)
pt3dadd(372.5, -266, -29.5, 1.8)
pt3dadd(373.5, -267.5, -29.5, 2.3)
pt3dadd(374, -270, -35.5, 2.3)
pt3dadd(376, -270, -35.5, 2.1)
pt3dadd(377, -270, -35.5, 2)
pt3dadd(377, -271, -35.5, 1.2)
pt3dadd(379.5, -272, -35.5, 2.5)
pt3dadd(380, -272, -35.5, 3)
pt3dadd(381.5, -272.5, -35.5, 1.7)
pt3dadd(382.5, -273, -35.5, 0.8)
pt3dadd(385, -272.5, -35.5, 0.8)
pt3dadd(385, -275, -35.5, 0.8)
pt3dadd(386, -276, -35.5, 0.8)
pt3dadd(386.5, -276, -35.5, 1.8)
pt3dadd(387.5, -277.5, -35.5, 2.6)
pt3dadd(389, -280, -42, 1.9)
pt3dadd(390, -282, -48, 1.8)
pt3dadd(391, -283, -48, 2.6)
pt3dadd(392.5, -283, -48, 3.1)
pt3dadd(393.5, -284.5, -48, 2.8)
pt3dadd(396, -286, -54.5, 2.1)
pt3dadd(397.5, -288, -54.5, 1.6)
pt3dadd(400, -290, -54.5, 1.4)
pt3dadd(401.5, -292, -56, 0.3)
pt3dadd(401, -294, -48.5, 0.3)
pt3dadd(404.5, -294, -56, 2.3)
pt3dadd(406, -294.5, -56, 2.8)
pt3dadd(406, -295.5, -60, 1.9)
pt3dadd(407.5, -297, -60, 0.6)
pt3dadd(409.5, -297, -60, 0.6)
pt3dadd(409.5, -299, -60, 0.6)
pt3dadd(411.5, -299.5, -58, 0.7)
pt3dadd(414.5, -299, -62, 0.8)
pt3dadd(414.5, -300, -60, 0.8)
pt3dadd(415, -302, -60, 1.6)
pt3dadd(417, -302.5, -58, 3.1)
pt3dadd(418, -303.5, -62, 3.4)
pt3dadd(419, -305, -62, 2.4)
pt3dadd(419.5, -306, -64, 1)
pt3dadd(420, -306, -66, 0.4)
pt3dadd(421.5, -308, -66, 0.4)
pt3dadd(422, -308, -66, 0.4)
pt3dadd(423.5, -308.5, -64, 0.7)
pt3dadd(425, -308.5, -64, 1.2)
pt3dadd(425.5, -309.5, -64, 1.8)
pt3dadd(426, -311.5, -64, 1.4)
pt3dadd(427, -312, -66, 1.1)
pt3dadd(428, -314, -66, 0.6)
pt3dadd(430.5, -315.5, -66, 0.9)
pt3dadd(432, -317.5, -66, 0.9)
pt3dadd(432.5, -318.5, -66, 0.9)
pt3dadd(434, -320, -67.5, 1.2)
pt3dadd(434.5, -321, -67.5, 1.9)
pt3dadd(436.5, -324, -67.5, 1.6)
pt3dadd(437.5, -325, -71.5, 1.2)
pt3dadd(438, -325, -71.5, 0.6)
pt3dadd(439, -326.5, -73.5, 0.7)
pt3dadd(440.5, -327, -71.5, 1.4)
pt3dadd(441.5, -328.5, -71.5, 2)
pt3dadd(441.5, -330, -73.5, 1.6)
pt3dadd(442.5, -331, -71.5, 1.3)
pt3dadd(445.5, -331.5, -71.5, 0.4)
pt3dadd(445, -332.5, -71.5, 0.9)
pt3dadd(446, -333.5, -77.5, 1.1)
pt3dadd(447.5, -334.5, -77.5, 1.8)
pt3dadd(449, -336.5, -80.5, 1.1)
pt3dadd(449.5, -336.5, -83.5, 0.8)
pt3dadd(451.5, -338, -80.5, 0.8)
pt3dadd(452.5, -340, -80.5, 0.6)
pt3dadd(452.5, -341.5, -83.5, 0.4)
pt3dadd(452.5, -343, -83.5, 1.9)
pt3dadd(454, -345, -83.5, 2.5)
pt3dadd(454, -346.5, -83.5, 1.8)
pt3dadd(454.5, -348.5, -83.5, 1.1)
pt3dadd(453.5, -348.5, -83.5, 0.6)
pt3dadd(454, -350, -86.5, 0.6)
pt3dadd(454.5, -351, -83.5, 1.1)
pt3dadd(454.5, -353, -83.5, 1.9)
pt3dadd(455, -354, -83.5, 1.7)
pt3dadd(454.5, -356, -86.5, 0.5)
pt3dadd(454.5, -357.5, -86.5, 0.7)
pt3dadd(454, -359.5, -86.5, 0.7)
pt3dadd(453.5, -362.5, -86.5, 1.4)
pt3dadd(455, -365, -86.5, 1.2)
pt3dadd(455, -365, -89, 0.6)
pt3dadd(456.5, -366.5, -89, 0.6)
pt3dadd(457.5, -368, -89, 0.7)
pt3dadd(457.5, -370.5, -89, 0.5)
pt3dadd(458.5, -372, -89, 0.5)
pt3dadd(460, -373, -86.5, 0.4)
pt3dadd(461, -374.5, -89, 0.3)
pt3dadd(462, -375.5, -89, 0.5)
pt3dadd(463.5, -378, -89, 2.2)
pt3dadd(464.5, -378.5, -89, 0.9)
pt3dadd(466, -380.5, -89, 0.3)
pt3dadd(468, -381, -89, 0.1)
pt3dadd(469.5, -383.5, -92, 0.1)
pt3dadd(471, -383.5, -92, 0.1)
pt3dadd(471.5, -385, -92, 1.2)
pt3dadd(475, -387, -92, 1.9)
pt3dadd(476, -387, -95, 1.6)
pt3dadd(477.5, -387, -92, 1.3)
pt3dadd(480, -387, -95, 0.9)
pt3dadd(484.5, -389.5, -93, 0.7)
pt3dadd(486, -390, -93, 0.7)
pt3dadd(487, -392, -100, 1.6)
pt3dadd(487.5, -392.5, -97.5, 2.6)
pt3dadd(488.5, -396, -95, 1.4)
pt3dadd(489, -396, -100, 1)
pt3dadd(490, -398.5, -100, 1)
pt3dadd(490.5, -398.5, -100, 1)
pt3dadd(492.5, -400, -97.5, 1)
pt3dadd(492.5, -401.5, -100, 0.8)
pt3dadd(492.5, -403, -102.5, 0.8)
pt3dadd(493, -403, -100, 1.1)
pt3dadd(492, -404.5, -109.5, 1.6)
pt3dadd(493.5, -406, -114, 1.6)
pt3dadd(496, -406, -119, 1.6)
pt3dadd(494, -408, -112, 1.6)
pt3dadd(492, -408, -112, 1.6)
pt3dadd(490, -408, -123.5, 1.6)
}
dend[180] {pt3dclear()
pt3dadd(337, -262.5, -22, 4.6)
pt3dadd(339.5, -266, -24, 1.5)
pt3dadd(341.5, -268, -23.5, 1.9)
pt3dadd(344, -270.5, -24, 1.9)
pt3dadd(346.5, -273, -24, 2.1)
pt3dadd(347.5, -275, -24, 3.1)
pt3dadd(348.5, -278, -25, 3.8)
pt3dadd(350.5, -278, -25.5, 2.5)
pt3dadd(353.5, -280.5, -26, 1.4)
pt3dadd(355.5, -281, -26, 1.2)
pt3dadd(356.5, -284.5, -26, 1)
pt3dadd(359, -285, -27, 1)
pt3dadd(362, -287, -33, 1.8)
pt3dadd(362.5, -289, -33, 2.4)
pt3dadd(364.5, -289, -33, 2.8)
pt3dadd(366, -290.5, -33, 2.1)
pt3dadd(367.5, -291, -33, 1.4)
pt3dadd(370, -292, -33, 1.4)
pt3dadd(372, -292, -33, 2.4)
pt3dadd(373, -292, -33, 2.5)
pt3dadd(375, -292, -33, 2.7)
pt3dadd(376.5, -293, -33, 2.7)
pt3dadd(379, -293, -33, 1.6)
pt3dadd(381.5, -293.5, -39.5, 1.4)
pt3dadd(384, -293.5, -39.5, 1.7)
pt3dadd(385, -293.5, -39.5, 2.1)
pt3dadd(388, -293.5, -39.5, 2.6)
pt3dadd(390, -294, -39.5, 2.5)
pt3dadd(392, -294, -39.5, 1.5)
pt3dadd(393.5, -294.5, -39.5, 2)
pt3dadd(395.5, -294.5, -39.5, 2.5)
pt3dadd(397.5, -294.5, -39.5, 2.5)
pt3dadd(400, -294.5, -39.5, 1.6)
pt3dadd(402, -294, -39.5, 1.6)
pt3dadd(403.5, -293.5, -39.5, 1.6)
pt3dadd(405.5, -293.5, -39.5, 1.4)
pt3dadd(409, -296, -45.5, 1.3)
pt3dadd(410.5, -296.5, -39.5, 1)
pt3dadd(412.5, -296.5, -39.5, 2.2)
pt3dadd(414.5, -297, -39.5, 3.3)
pt3dadd(417, -298, -45.5, 2.2)
pt3dadd(418.5, -300.5, -45.5, 1.6)
pt3dadd(418, -300.5, -45.5, 1.3)
pt3dadd(421, -300.5, -52, 1.5)
pt3dadd(423.5, -301, -52, 1.5)
pt3dadd(425.5, -301.5, -52, 2.2)
pt3dadd(427, -301.5, -52, 4.3)
pt3dadd(429, -305, -45.5, 2.3)
pt3dadd(431.5, -306, -52, 1.5)
pt3dadd(435, -307, -52, 1.3)
pt3dadd(437, -309, -52, 1.8)
pt3dadd(438.5, -311, -45.5, 1.9)
pt3dadd(439.5, -310.5, -45.5, 3.1)
pt3dadd(441.5, -310.5, -52, 2.8)
pt3dadd(442.5, -310.5, -52, 1.6)
pt3dadd(443.5, -310, -52, 1.1)
pt3dadd(445, -308, -52, 1.1)
pt3dadd(445.5, -305, -58, 1.2)
pt3dadd(448.5, -306, -58, 1.3)
pt3dadd(450, -306, -63.5, 1.3)
pt3dadd(453, -306.5, -63.5, 1.3)
pt3dadd(454.5, -308, -63.5, 1.3)
pt3dadd(457.5, -308, -61.5, 1.7)
pt3dadd(462.5, -310, -61.5, 1.3)
pt3dadd(463, -310.5, -61.5, 1.5)
pt3dadd(466, -312, -60, 1.5)
pt3dadd(468.5, -312, -63.5, 1.5)
pt3dadd(472, -312, -63.5, 1.5)
pt3dadd(475, -313, -65.5, 0.9)
pt3dadd(477.5, -313, -65.5, 0.8)
pt3dadd(480.5, -313, -65.5, 0.8)
pt3dadd(483, -314.5, -63.5, 1.8)
pt3dadd(486.5, -315, -63.5, 3)
pt3dadd(487, -316.5, -65.5, 1.6)
pt3dadd(488.5, -316.5, -67.5, 0.6)
pt3dadd(489.5, -317, -65.5, 2.7)
pt3dadd(494, -319, -67.5, 2.4)
}
}
proc shape3d_57() {
dend[180] { }
dend[181] {pt3dclear()
pt3dadd(494, -319, -67.5, 2.4)
pt3dadd(496, -317, -61.5, 0.1)
pt3dadd(502, -317, -61.5, 0.1)
pt3dadd(505.5, -317, -61.5, 0.1)
pt3dadd(509, -319, -61.5, 0.1)
pt3dadd(512, -320, -61.5, 0.1)
pt3dadd(516, -320, -61.5, 0.1)
pt3dadd(519.5, -320, -65.5, 0.1)
pt3dadd(524, -319.5, -67.5, 0.1)
pt3dadd(528.5, -317, -69.5, 0.1)
pt3dadd(530, -315.5, -69.5, 0.1)
pt3dadd(533.5, -314.5, -69.5, 0.1)
pt3dadd(538, -314.5, -69.5, 0.1)
pt3dadd(541, -312.5, -69.5, 0.1)
pt3dadd(544, -311, -69.5, 0.1)
pt3dadd(547.5, -309, -69.5, 0.1)
pt3dadd(549.5, -305, -71.5, 0.1)
pt3dadd(549.5, -303, -71.5, 0.1)
pt3dadd(554, -302.5, -71.5, 0.1)
pt3dadd(559, -302.5, -71.5, 0.1)
pt3dadd(561, -300, -71.5, 0.1)
pt3dadd(561.5, -297.5, -73, 0.1)
}
dend[182] {pt3dclear()
pt3dadd(494, -319, -67.5, 2.4)
pt3dadd(498, -319, -71.5, 2.4)
pt3dadd(501.5, -319.5, -71.5, 0.6)
pt3dadd(503.5, -319.5, -73, 0.6)
pt3dadd(506, -322, -73, 0.6)
pt3dadd(508.5, -322, -71.5, 1.7)
pt3dadd(509.5, -322, -71.5, 4.3)
pt3dadd(513, -322.5, -75, 1.3)
pt3dadd(515, -322.5, -71.5, 0.9)
pt3dadd(517.5, -323.5, -75, 0.6)
pt3dadd(519, -324, -75, 1.6)
pt3dadd(520, -326.5, -71.5, 0.1)
pt3dadd(522.5, -328.5, -71.5, 0.1)
pt3dadd(523.5, -328, -71.5, 1.1)
pt3dadd(525, -329, -71.5, 0.1)
pt3dadd(529, -329, -75, 0.1)
pt3dadd(532.5, -329, -75, 0.1)
pt3dadd(535.5, -328.5, -71.5, 2.7)
pt3dadd(539.5, -324, -77, 0.3)
pt3dadd(543, -324, -77, 1.5)
pt3dadd(545, -325, -77, 1.7)
pt3dadd(546, -325, -80, 1.9)
pt3dadd(548, -325, -80, 1.9)
pt3dadd(549.5, -325.5, -80, 0.7)
pt3dadd(551, -325.5, -83, 0.7)
pt3dadd(551.5, -329, -83, 1.2)
pt3dadd(553.5, -329.5, -83, 1.9)
pt3dadd(554.5, -331.5, -83, 1.1)
pt3dadd(555, -331.5, -83, 0.7)
pt3dadd(557, -331.5, -83, 0.6)
pt3dadd(557.5, -333, -83, 1.6)
pt3dadd(558, -333, -89, 2.4)
pt3dadd(560, -334.5, -89, 0.7)
pt3dadd(560.5, -334.5, -89, 0.3)
pt3dadd(560.5, -335.5, -91.5, 0.3)
pt3dadd(560.5, -336.5, -94.5, 1.2)
pt3dadd(561, -338, -91.5, 1.6)
pt3dadd(563, -338.5, -94.5, 0.6)
pt3dadd(564, -339.5, -91.5, 1.8)
pt3dadd(565, -341.5, -94.5, 3.4)
pt3dadd(567, -341.5, -94.5, 1.8)
pt3dadd(567.5, -343, -97.5, 0.3)
pt3dadd(570, -343, -97.5, 0.3)
pt3dadd(571.5, -343.5, -94.5, 1.4)
pt3dadd(572.5, -345, -97.5, 1.7)
pt3dadd(573.5, -345, -97.5, 2.6)
pt3dadd(574.5, -346.5, -97.5, 1.4)
pt3dadd(575, -348, -97.5, 0.9)
pt3dadd(576.5, -348, -97.5, 0.4)
pt3dadd(580, -348, -97.5, 0.4)
pt3dadd(581.5, -348, -103.5, 1.4)
pt3dadd(582, -348, -97.5, 1.8)
pt3dadd(585, -348, -97.5, 0.4)
pt3dadd(586.5, -349, -103.5, 0.4)
pt3dadd(587.5, -349, -103.5, 1.6)
pt3dadd(589.5, -349.5, -103.5, 2.1)
pt3dadd(590.5, -349.5, -106.5, 0.9)
pt3dadd(592.5, -351.5, -97.5, 0.5)
pt3dadd(596.5, -352, -97.5, 0.8)
pt3dadd(597, -352.5, -95, 0.8)
pt3dadd(598, -353.5, -102, 0.8)
pt3dadd(602, -353, -102, 0.2)
pt3dadd(602, -355, -104.5, 0.2)
pt3dadd(602.5, -358, -104.5, 0.2)
pt3dadd(603, -358, -107, 0.2)
pt3dadd(605, -358.5, -102, 1)
pt3dadd(606, -357, -107, 1.6)
pt3dadd(608, -357.5, -107, 1.9)
pt3dadd(608.5, -358, -107, 1.4)
pt3dadd(610, -359, -107, 1.1)
pt3dadd(610.5, -359, -107, 0.1)
pt3dadd(613, -359, -111.5, 0.1)
pt3dadd(615, -357.5, -111.5, 0.1)
pt3dadd(616.5, -357.5, -111.5, 1.9)
pt3dadd(618.5, -357.5, -109, 3.3)
pt3dadd(621, -357.5, -111.5, 1.8)
pt3dadd(622.5, -357.5, -111.5, 0.6)
pt3dadd(624, -357.5, -114, 0.7)
pt3dadd(626, -357.5, -114, 1.6)
pt3dadd(627.5, -358, -111.5, 2.2)
pt3dadd(628, -359, -111.5, 1.3)
pt3dadd(630.5, -359, -114, 0.7)
pt3dadd(632, -359, -118.5, 0.6)
pt3dadd(633.5, -358, -121, 0.6)
pt3dadd(634, -359, -121, 1.4)
pt3dadd(634, -360, -121, 1.6)
pt3dadd(636, -359, -121, 1.4)
pt3dadd(637.5, -359, -123.5, 1.4)
pt3dadd(639, -357.5, -121, 2)
pt3dadd(641, -356.5, -121, 1.7)
}
dend[183] {pt3dclear()
pt3dadd(51.5, -18.5, -3, 13.7)
pt3dadd(57.5, -24, -2, 7.8)
pt3dadd(61.5, -28, -2, 8.2)
pt3dadd(64, -31, -2, 8.4)
pt3dadd(67, -36, -5, 7.9)
pt3dadd(71, -41, -5, 7.7)
pt3dadd(73, -43.5, -4, 7.7)
pt3dadd(75, -46, -5, 8.4)
pt3dadd(77.5, -49, -5, 7.9)
pt3dadd(79, -51.5, -5.5, 7.7)
pt3dadd(80, -53, -6.5, 7.3)
pt3dadd(83, -54.5, -7.5, 7.1)
pt3dadd(85, -56.5, -7.5, 7.1)
pt3dadd(87.5, -57.5, -7.5, 6.3)
pt3dadd(89, -58.5, -7.5, 6.3)
pt3dadd(89.5, -60.5, -7.5, 5.7)
pt3dadd(90.5, -61, -7.5, 6)
pt3dadd(92, -63.5, -7.5, 6.1)
pt3dadd(93.5, -65, -7.5, 6.3)
pt3dadd(94, -68, -10, 6.8)
pt3dadd(97.5, -74.5, -10, 5.7)
pt3dadd(98.5, -75.5, -11, 6.3)
pt3dadd(101.5, -78.5, -12.5, 5.4)
pt3dadd(103.5, -81.5, -13.5, 5)
pt3dadd(105, -84, -13.5, 4.6)
pt3dadd(107, -85, -13.5, 5.7)
pt3dadd(110, -86.5, -12.5, 6.7)
pt3dadd(112, -89.5, -14.5, 7)
pt3dadd(114, -92, -14.5, 7)
pt3dadd(116.5, -95, -14.5, 7.6)
pt3dadd(119, -97, -15.5, 8.3)
pt3dadd(120.5, -98, -15.5, 8.8)
}
dend[184] {pt3dclear()
pt3dadd(120.5, -98, -15.5, 8.8)
pt3dadd(119, -104.5, -17, 4.6)
pt3dadd(118, -108, -18, 4.3)
pt3dadd(117, -112, -18, 4.1)
pt3dadd(115, -113.5, -18, 4.1)
pt3dadd(113, -117.5, -17.5, 3.8)
pt3dadd(113, -119.5, -17.5, 3.6)
pt3dadd(113, -122.5, -17.5, 3.2)
pt3dadd(113, -125.5, -17.5, 3.3)
pt3dadd(111.5, -127.5, -18, 3.5)
pt3dadd(109, -131, -18, 3.6)
pt3dadd(110.5, -133.5, -18, 3.2)
pt3dadd(110.5, -135.5, -18, 3.2)
pt3dadd(109, -138, -19.5, 2.9)
pt3dadd(109, -141, -19, 3.1)
pt3dadd(107.5, -144.5, -20, 2.9)
pt3dadd(106, -147.5, -20, 3.4)
pt3dadd(104.5, -151, -21, 3.6)
pt3dadd(103.5, -155, -21, 4.4)
pt3dadd(101, -160, -21, 5.2)
pt3dadd(101, -163.5, -21, 5.2)
pt3dadd(101, -166.5, -21, 4.8)
pt3dadd(100, -169, -21.5, 4.6)
pt3dadd(100, -172.5, -21, 5)
pt3dadd(100, -174.5, -20, 5.2)
pt3dadd(101.5, -179.5, -21, 5.2)
pt3dadd(101, -181.5, -21.5, 5.2)
pt3dadd(101, -185, -21.5, 5.6)
}
dend[185] {pt3dclear()
pt3dadd(101, -185, -21.5, 5.6)
pt3dadd(104, -185, -27.5, 0.2)
pt3dadd(106.5, -185, -27.5, 1)
pt3dadd(108, -185.5, -27.5, 0.1)
pt3dadd(109.5, -186, -27.5, 0.1)
pt3dadd(111.5, -186, -27.5, 0.1)
pt3dadd(113, -186.5, -21.5, 1.4)
pt3dadd(113.5, -186.5, -21.5, 2.5)
pt3dadd(115, -186.5, -21.5, 1.4)
pt3dadd(116, -186.5, -27.5, 0.2)
pt3dadd(118, -186.5, -27.5, 0.2)
pt3dadd(120, -186.5, -27.5, 0.2)
pt3dadd(122.5, -186.5, -21.5, 1.4)
}
dend[186] {pt3dclear()
pt3dadd(101, -185, -21.5, 5.6)
pt3dadd(100.5, -189.5, -21.5, 5.8)
pt3dadd(99.5, -191.5, -21.5, 5.3)
pt3dadd(98, -193, -27.5, 4.9)
pt3dadd(97, -196.5, -27.5, 4.4)
pt3dadd(95, -199, -27.5, 4.1)
pt3dadd(93, -201, -27.5, 3.8)
pt3dadd(91.5, -203, -34, 3.6)
pt3dadd(90, -206.5, -34, 4.1)
pt3dadd(89, -208, -27.5, 4)
pt3dadd(88, -210.5, -34, 4.3)
}
dend[187] {pt3dclear()
pt3dadd(88, -210.5, -34, 4.3)
pt3dadd(85, -215.5, -40, 2)
pt3dadd(84, -214, -34, 2)
pt3dadd(82.5, -214, -40, 2.5)
}
}
proc shape3d_58() {
dend[187] { pt3dadd(81, -214, -40, 3)
pt3dadd(80, -214, -40, 2.5)
pt3dadd(79.5, -215, -40, 2)
pt3dadd(80, -217, -40, 1.1)
pt3dadd(80.5, -218.5, -46.5, 1.3)
pt3dadd(78.5, -218.5, -46.5, 1.3)
pt3dadd(77.5, -219.5, -46.5, 1.6)
pt3dadd(77.5, -220.5, -46.5, 2.1)
pt3dadd(76, -222, -46.5, 1.6)
pt3dadd(75, -224, -46.5, 2.4)
pt3dadd(74, -225.5, -46.5, 3)
pt3dadd(74, -226, -46.5, 2)
pt3dadd(73.5, -228, -46.5, 2.1)
pt3dadd(70.5, -229.5, -50.5, 1.2)
pt3dadd(69, -230.5, -50.5, 1.2)
pt3dadd(68, -232.5, -52.5, 1.1)
pt3dadd(66.5, -234, -52.5, 1.1)
pt3dadd(65.5, -235, -52.5, 1.5)
pt3dadd(64.5, -236.5, -50.5, 1.9)
pt3dadd(64.5, -238.5, -50.5, 2.2)
pt3dadd(63.5, -239.5, -50.5, 1.5)
pt3dadd(63, -241.5, -50.5, 1.4)
pt3dadd(61.5, -242.5, -54.5, 2.5)
pt3dadd(60.5, -244, -52.5, 3.4)
pt3dadd(58.5, -245, -52.5, 2.4)
pt3dadd(57.5, -246.5, -54.5, 1.6)
pt3dadd(57, -248, -52.5, 1.2)
pt3dadd(57, -249.5, -52.5, 1.1)
pt3dadd(55.5, -251, -50.5, 1.3)
pt3dadd(55, -252.5, -54.5, 1.4)
pt3dadd(53.5, -254, -52.5, 2)
pt3dadd(53.5, -256.5, -54.5, 2.8)
pt3dadd(52.5, -257, -54.5, 3.4)
pt3dadd(51, -257, -54.5, 2.9)
pt3dadd(49, -258.5, -56.5, 1.8)
pt3dadd(48, -260, -58, 1)
pt3dadd(46.5, -260.5, -54.5, 1.5)
pt3dadd(46.5, -262.5, -54.5, 1.8)
pt3dadd(46.5, -264.5, -60, 1.9)
pt3dadd(46.5, -265.5, -56.5, 2.1)
pt3dadd(44, -266.5, -56.5, 1.7)
pt3dadd(44, -268, -58, 1.4)
pt3dadd(44, -270.5, -58, 1.4)
pt3dadd(44, -271.5, -58, 1.5)
pt3dadd(43.5, -272.5, -56.5, 2.3)
pt3dadd(43.5, -273.5, -60, 3.1)
pt3dadd(42.5, -275.5, -62, 3.1)
pt3dadd(41, -277.5, -68, 3.1)
pt3dadd(39, -279, -71, 1.2)
pt3dadd(38, -279.5, -71, 0.3)
pt3dadd(37, -280.5, -65, 0.5)
pt3dadd(36.5, -280.5, -65, 1.3)
pt3dadd(35, -281.5, -65, 2.9)
pt3dadd(34.5, -281.5, -65, 4.1)
pt3dadd(32, -281.5, -65, 1.8)
pt3dadd(30.5, -281.5, -71, 0.2)
pt3dadd(30, -282.5, -71, 0.2)
pt3dadd(30, -284.5, -71, 0.2)
pt3dadd(26.5, -284.5, -68, 2.4)
pt3dadd(25.5, -285.5, -77, 0.8)
pt3dadd(25, -286.5, -74, 1.2)
pt3dadd(23, -286.5, -74, 1.9)
pt3dadd(22.5, -287, -74, 2.9)
pt3dadd(20.5, -288.5, -77, 1.7)
pt3dadd(20, -290, -77, 1.2)
pt3dadd(18, -291.5, -82.5, 2)
pt3dadd(18, -292.5, -77, 2)
pt3dadd(16, -294.5, -79.5, 1.9)
pt3dadd(15, -294.5, -79.5, 1.3)
pt3dadd(14, -294.5, -79.5, 1.3)
pt3dadd(13.5, -295.5, -82.5, 1.8)
pt3dadd(12.5, -296, -82.5, 2.7)
pt3dadd(10, -299, -88.5, 1.3)
pt3dadd(9.5, -299.5, -88.5, 1.3)
pt3dadd(9, -301.5, -88.5, 0.9)
pt3dadd(5.5, -301, -86, 1.4)
pt3dadd(4, -301, -91, 1.4)
pt3dadd(2.5, -299.5, -91, 0.6)
pt3dadd(1.5, -299.5, -91, 0.6)
pt3dadd(-0.5, -299.5, -91, 0.9)
pt3dadd(-1.5, -297.5, -91, 1.3)
pt3dadd(-4, -297.5, -91, 1.3)
pt3dadd(-4.5, -299, -91, 1.8)
pt3dadd(-6.5, -299, -93.5, 2.9)
pt3dadd(-8.5, -299, -93.5, 0.1)
pt3dadd(-10.5, -299.5, -95.5, 0.6)
pt3dadd(-11.5, -300, -95.5, 1.1)
pt3dadd(-12, -302, -98, 3.6)
pt3dadd(-14, -302, -98, 0.1)
pt3dadd(-16.5, -303, -98, 0.7)
pt3dadd(-17.5, -304.5, -98, 0.9)
pt3dadd(-19.5, -306, -103, 1.9)
pt3dadd(-21.5, -307.5, -103, 0.7)
pt3dadd(-22.5, -309.5, -103, 1.5)
pt3dadd(-25, -311, -105, 2.1)
pt3dadd(-26, -311, -103, 1.4)
pt3dadd(-28, -311.5, -107.5, 0.6)
pt3dadd(-30, -312, -107.5, 0.6)
pt3dadd(-32, -313.5, -107.5, 0.7)
pt3dadd(-34.5, -314.5, -107.5, 0.5)
pt3dadd(-37, -316, -107.5, 0.5)
}
dend[188] {pt3dclear()
pt3dadd(88, -210.5, -34, 4.3)
pt3dadd(87, -215, -34, 3.3)
pt3dadd(86.5, -217.5, -34, 3.5)
pt3dadd(85.5, -220.5, -34, 3.5)
pt3dadd(84.5, -223, -34, 2.5)
pt3dadd(84.5, -224.5, -34, 2.8)
pt3dadd(83.5, -225.5, -34, 3.3)
pt3dadd(82.5, -228, -40, 2.8)
pt3dadd(81, -230.5, -34, 2.8)
pt3dadd(80.5, -232.5, -34, 3.3)
pt3dadd(79.5, -233.5, -40, 3.3)
pt3dadd(78.5, -235, -40, 2.4)
pt3dadd(77, -238, -40, 2.2)
pt3dadd(75.5, -240, -40, 2.2)
pt3dadd(75, -242.5, -40, 1.9)
pt3dadd(74.5, -244, -40, 2.5)
pt3dadd(74.5, -247.5, -34, 4.5)
pt3dadd(74.5, -250, -46.5, 6.1)
pt3dadd(74, -252.5, -40, 6.8)
}
dend[189] {pt3dclear()
pt3dadd(74, -252.5, -40, 6.8)
pt3dadd(71, -253.5, -34, 2.7)
pt3dadd(69.5, -255.5, -40, 1.6)
pt3dadd(69, -258, -40, 1.5)
pt3dadd(68.5, -260.5, -40, 1.3)
pt3dadd(68.5, -261, -40, 1.3)
pt3dadd(68.5, -262.5, -40, 1.6)
pt3dadd(69, -264.5, -40, 2.3)
pt3dadd(69.5, -266, -40, 1.5)
pt3dadd(69.5, -267, -40, 1.1)
pt3dadd(69.5, -269.5, -40, 1.1)
pt3dadd(69.5, -270, -40, 1.4)
pt3dadd(69.5, -271.5, -46.5, 1.9)
pt3dadd(69, -273, -46.5, 1.1)
pt3dadd(69, -276, -40, 2)
pt3dadd(67.5, -277, -46.5, 3.3)
pt3dadd(67, -279.5, -46.5, 4.1)
pt3dadd(68, -283, -50.5, 0.9)
pt3dadd(68, -286, -48.5, 0.7)
pt3dadd(68.5, -288.5, -48.5, 1.5)
pt3dadd(68, -291.5, -46.5, 1)
pt3dadd(68, -293.5, -46.5, 1.2)
pt3dadd(67.5, -295, -48.5, 1.9)
pt3dadd(67.5, -295.5, -46.5, 2.5)
pt3dadd(67.5, -298, -52, 1.2)
pt3dadd(67, -301, -52, 0.7)
pt3dadd(66.5, -302, -48.5, 1.3)
pt3dadd(66.5, -303.5, -50.5, 2.2)
pt3dadd(66.5, -306, -46.5, 2.7)
pt3dadd(67.5, -307.5, -48.5, 2.9)
pt3dadd(67.5, -309.5, -48.5, 2.3)
pt3dadd(67.5, -310.5, -52, 1.1)
pt3dadd(67, -312, -52, 0.2)
pt3dadd(68, -314.5, -52, 0.4)
pt3dadd(67.5, -314.5, -50.5, 1.3)
pt3dadd(68, -316, -46.5, 2)
pt3dadd(68, -316, -52, 2.7)
pt3dadd(67.5, -318.5, -52, 2.7)
pt3dadd(67, -321, -52, 2.7)
pt3dadd(67, -322, -54, 1.4)
pt3dadd(67.5, -323.5, -54, 0.4)
pt3dadd(66.5, -325, -54, 1)
pt3dadd(66, -325.5, -54, 0.4)
pt3dadd(66.5, -327, -54, 0.4)
pt3dadd(66, -329.5, -54, 0.4)
pt3dadd(65.5, -332, -56, 0.4)
pt3dadd(65.5, -332, -52, 1.4)
pt3dadd(65, -335, -58, 3.4)
pt3dadd(65.5, -337, -58, 1.9)
pt3dadd(66, -340.5, -58, 1.7)
pt3dadd(66.5, -342, -58, 1.6)
pt3dadd(66.5, -343.5, -58, 1.1)
pt3dadd(66.5, -345.5, -58, 0.9)
pt3dadd(66.5, -346.5, -58, 0.7)
pt3dadd(66.5, -347.5, -58, 1.6)
pt3dadd(67, -350, -58, 2.4)
pt3dadd(66.5, -350.5, -58, 2.5)
pt3dadd(66.5, -351.5, -58, 1.5)
pt3dadd(66.5, -354, -58, 1.2)
pt3dadd(67, -355.5, -60, 0.9)
pt3dadd(66.5, -360, -57, 0.7)
pt3dadd(66.5, -360.5, -60, 1.2)
pt3dadd(66.5, -363.5, -60, 1.2)
pt3dadd(66, -364.5, -60, 0.8)
pt3dadd(65, -366, -60, 0.6)
pt3dadd(64.5, -366.5, -60, 0.6)
pt3dadd(63, -369, -63, 0.7)
pt3dadd(63, -370, -66, 1.3)
pt3dadd(62, -371.5, -66, 2.5)
pt3dadd(61, -373, -66, 2.7)
pt3dadd(60.5, -374, -66, 2.7)
pt3dadd(58.5, -376, -66, 1.3)
pt3dadd(58, -377, -66, 0.5)
pt3dadd(57, -379, -66, 0.7)
pt3dadd(56, -381, -66, 0.9)
pt3dadd(55.5, -382.5, -66, 2)
pt3dadd(54.5, -384, -66, 2.8)
pt3dadd(54, -384.5, -66, 3.4)
pt3dadd(53, -386.5, -66, 2.1)
pt3dadd(51, -389.5, -66, 1.1)
}
}
proc shape3d_59() {
dend[189] { pt3dadd(49, -391, -72, 1.1)
pt3dadd(47.5, -392.5, -72, 1.1)
pt3dadd(44.5, -393.5, -72, 1.2)
pt3dadd(42.5, -394.5, -72, 1.4)
pt3dadd(40.5, -396, -72, 1.5)
pt3dadd(39, -396.5, -75, 1.3)
pt3dadd(38, -397, -75, 0.9)
pt3dadd(35.5, -398, -75, 0.6)
pt3dadd(33, -399, -72, 0.7)
pt3dadd(32, -399.5, -75, 1.3)
pt3dadd(32, -401, -80.5, 2.3)
pt3dadd(33, -402.5, -77.5, 2.9)
pt3dadd(33.5, -403.5, -77.5, 2.6)
pt3dadd(34, -407, -80.5, 0.9)
pt3dadd(34.5, -409.5, -86.5, 0.9)
pt3dadd(32.5, -414, -84, 1.3)
pt3dadd(31, -414, -84, 1.7)
pt3dadd(29.5, -414.5, -84, 0.9)
pt3dadd(29, -417, -86.5, 0.6)
pt3dadd(28, -419.5, -86.5, 0.6)
pt3dadd(28, -420, -86.5, 0.3)
pt3dadd(27, -421, -91, 0.3)
pt3dadd(27, -422.5, -88.5, 2.2)
pt3dadd(25.5, -422.5, -86.5, 2)
pt3dadd(25, -423.5, -91, 0.4)
pt3dadd(25.5, -426, -91, 0.2)
pt3dadd(27, -428, -86.5, 2)
pt3dadd(25.5, -430, -88.5, 2.2)
}
dend[190] {pt3dclear()
pt3dadd(25.5, -430, -88.5, 2.2)
pt3dadd(22.5, -434, -86.5, 0.1)
pt3dadd(20.5, -434, -86.5, 0.1)
pt3dadd(19.5, -434, -86.5, 1.3)
pt3dadd(17.5, -434.5, -84, 1.8)
pt3dadd(15.5, -435, -84, 0.3)
pt3dadd(13, -435.5, -93.5, 0.3)
pt3dadd(11.5, -436, -86.5, 1.2)
pt3dadd(10.5, -436.5, -88.5, 1.6)
pt3dadd(9.5, -438.5, -88.5, 1.2)
pt3dadd(7.5, -439, -88.5, 0.2)
pt3dadd(4.5, -439.5, -88.5, 0.2)
pt3dadd(1.5, -439.5, -88.5, 0.2)
pt3dadd(0, -439.5, -84, 1.1)
pt3dadd(-2, -439.5, -88.5, 1.8)
pt3dadd(-4.5, -441, -86.5, 1)
pt3dadd(-6.5, -441, -86.5, 0.1)
pt3dadd(-8.5, -443.5, -86.5, 0.1)
pt3dadd(-9, -445, -88.5, 1.3)
pt3dadd(-10.5, -445.5, -91, 0.5)
pt3dadd(-13, -450, -91, 0.5)
pt3dadd(-14, -449.5, -88.5, 1.9)
pt3dadd(-16.5, -452, -88.5, 0.1)
pt3dadd(-18.5, -453.5, -91, 1)
pt3dadd(-20.5, -453, -88.5, 0.3)
pt3dadd(-23.5, -455.5, -96, 2.2)
pt3dadd(-25, -455.5, -96, 0.3)
pt3dadd(-27.5, -455.5, -96, 0.3)
pt3dadd(-28.5, -455, -93.5, 0.3)
pt3dadd(-31, -455, -91, 1.7)
pt3dadd(-32.5, -455, -98, 2.1)
pt3dadd(-37, -453.5, -98, 0.2)
pt3dadd(-39.5, -452, -98, 0.2)
pt3dadd(-42.5, -452, -98, 2.5)
pt3dadd(-44.5, -453.5, -107.5, 0.1)
pt3dadd(-44.5, -456, -103, 0.1)
pt3dadd(-46, -457, -100.5, 1.3)
}
dend[191] {pt3dclear()
pt3dadd(25.5, -430, -88.5, 2.2)
pt3dadd(24, -433, -96, 0.8)
pt3dadd(24, -433.5, -91, 0.8)
pt3dadd(23.5, -435.5, -96, 1.5)
pt3dadd(20, -436, -96, 2.1)
pt3dadd(18, -438, -98, 2.5)
pt3dadd(17, -438, -100.5, 2.4)
pt3dadd(15.5, -438.5, -103, 1.7)
pt3dadd(15, -438.5, -103, 0.9)
pt3dadd(13, -441, -103, 0.4)
pt3dadd(7.5, -443, -105.5, 0.5)
}
dend[192] {pt3dclear()
pt3dadd(74, -252.5, -40, 6.8)
pt3dadd(77, -255.5, -40, 1.6)
pt3dadd(79, -256.5, -40, 1.8)
pt3dadd(80, -257.5, -40, 2.8)
pt3dadd(81, -259.5, -40, 2.8)
pt3dadd(82.5, -261.5, -40, 2.8)
pt3dadd(83, -264, -40, 1.1)
pt3dadd(82.5, -265, -34, 0.8)
pt3dadd(81, -266, -40, 1.9)
pt3dadd(80, -269.5, -40, 0.6)
pt3dadd(77.5, -270, -40, 1.9)
pt3dadd(76.5, -271.5, -40, 0.4)
pt3dadd(76, -272.5, -34, 0.5)
pt3dadd(75, -273.5, -34, 0.9)
pt3dadd(73.5, -274, -34, 1.6)
pt3dadd(73, -276, -40, 2.6)
pt3dadd(71.5, -277.5, -40, 3.1)
pt3dadd(70, -279.5, -40, 2.3)
pt3dadd(68.5, -280, -40, 1.4)
pt3dadd(68, -280.5, -40, 0.8)
pt3dadd(67.5, -283.5, -40, 1.3)
pt3dadd(66.5, -284.5, -40, 1.3)
pt3dadd(64, -285, -40, 1)
pt3dadd(62.5, -286, -40, 1.4)
pt3dadd(61, -287, -46.5, 2.2)
pt3dadd(59.5, -288.5, -40, 2.5)
pt3dadd(58, -290.5, -40, 3.2)
pt3dadd(57, -291.5, -40, 2.9)
pt3dadd(55.5, -292.5, -40, 2.1)
pt3dadd(55, -295, -40, 0.9)
pt3dadd(55, -297, -40, 1.8)
pt3dadd(55.5, -299, -40, 1.4)
pt3dadd(55.5, -302, -40, 1.4)
pt3dadd(54.5, -304.5, -40, 1.1)
pt3dadd(52.5, -306, -40, 1.1)
pt3dadd(50.5, -307.5, -46.5, 1.2)
pt3dadd(48.5, -309, -46.5, 1.3)
pt3dadd(48, -311, -46.5, 1.3)
pt3dadd(48, -312.5, -46.5, 1.2)
pt3dadd(47.5, -314.5, -46.5, 2.2)
pt3dadd(47.5, -315, -46.5, 2.4)
pt3dadd(47.5, -316.5, -46.5, 1.6)
pt3dadd(47.5, -318, -46.5, 0.7)
pt3dadd(47.5, -319.5, -46.5, 0.3)
pt3dadd(47, -323, -46.5, 0.2)
pt3dadd(45, -326.5, -46.5, 0.8)
pt3dadd(44, -327.5, -44.5, 0.9)
pt3dadd(44, -329, -44.5, 0.9)
pt3dadd(43, -331.5, -44.5, 1.1)
pt3dadd(42, -331.5, -42.5, 1.5)
pt3dadd(40.5, -333.5, -42.5, 1.5)
pt3dadd(40, -334.5, -42.5, 3.3)
pt3dadd(38, -336, -48, 1.6)
pt3dadd(36.5, -338.5, -48, 1.4)
pt3dadd(35, -339, -44.5, 1.1)
pt3dadd(34.5, -339.5, -44.5, 0.7)
pt3dadd(33, -340.5, -44.5, 0.7)
pt3dadd(31.5, -342.5, -46.5, 1.1)
pt3dadd(30.5, -345, -46.5, 1.1)
pt3dadd(29.5, -345, -44.5, 1.9)
pt3dadd(28.5, -346, -48, 3.1)
pt3dadd(27, -349, -44.5, 1.4)
pt3dadd(25.5, -350, -48, 1.2)
pt3dadd(25, -353, -48, 0.9)
pt3dadd(25, -355, -48, 1.1)
pt3dadd(24.5, -355.5, -48, 0.8)
pt3dadd(25.5, -356.5, -50, 1.1)
pt3dadd(25.5, -358.5, -50, 1.7)
pt3dadd(25.5, -360, -52, 2.4)
pt3dadd(25.5, -361, -52, 1.6)
pt3dadd(25.5, -364, -50, 1.1)
pt3dadd(25.5, -365, -54, 1)
pt3dadd(25.5, -368, -56, 1.7)
pt3dadd(26.5, -369.5, -56, 1.7)
pt3dadd(26, -371, -58, 1.7)
pt3dadd(26, -372, -58, 1.7)
pt3dadd(27, -373.5, -58, 1.4)
pt3dadd(26.5, -375, -58, 1.1)
pt3dadd(27, -376, -56, 1.6)
pt3dadd(27.5, -379, -56, 0.6)
pt3dadd(28, -380.5, -56, 0.6)
pt3dadd(27.5, -382, -56, 0.7)
pt3dadd(27.5, -382.5, -56, 0.7)
pt3dadd(27, -383.5, -62, 1.2)
pt3dadd(27, -386, -59, 1.2)
pt3dadd(28, -386, -62, 1.3)
pt3dadd(29, -386.5, -65, 0.9)
pt3dadd(29.5, -388.5, -62, 0.2)
pt3dadd(30, -389.5, -62, 0.2)
pt3dadd(31.5, -390.5, -62, 0.2)
pt3dadd(32, -391.5, -62, 1.6)
pt3dadd(33, -394, -62, 2.6)
pt3dadd(33, -394, -68, 0.1)
pt3dadd(34, -395.5, -68, 0.1)
pt3dadd(34.5, -398, -68, 0.9)
pt3dadd(34.5, -400.5, -68, 2.2)
pt3dadd(34.5, -402.5, -68, 1.3)
pt3dadd(35, -403, -68, 0.1)
pt3dadd(35, -405, -65, 0.1)
pt3dadd(34.5, -405, -68, 1.4)
pt3dadd(35, -406.5, -68, 1.9)
pt3dadd(35, -408, -74, 0.8)
pt3dadd(35.5, -409, -74, 0.1)
pt3dadd(36, -409, -74, 0.1)
pt3dadd(36, -409.5, -74, 0.1)
pt3dadd(36, -410.5, -74, 0.1)
pt3dadd(37, -410.5, -74, 0.1)
pt3dadd(37.5, -412, -74, 0.1)
pt3dadd(39, -413, -76.5, 0.1)
pt3dadd(38.5, -416, -79.5, 0.1)
pt3dadd(37, -416.5, -79.5, 0.1)
pt3dadd(37, -417.5, -76.5, 1.3)
pt3dadd(36, -420, -76.5, 1.5)
pt3dadd(35.5, -421.5, -76.5, 1.3)
pt3dadd(35, -424, -76.5, 0.1)
}
dend[193] {pt3dclear()
pt3dadd(120.5, -98, -15.5, 8.8)
pt3dadd(127, -100, -17, 3.7)
pt3dadd(128.5, -101.5, -17, 3.6)
pt3dadd(131.5, -101.5, -17, 3.8)
pt3dadd(134.5, -101.5, -17, 4.7)
pt3dadd(136.5, -103, -14.5, 4)
pt3dadd(139.5, -103.5, -17, 4.2)
pt3dadd(142, -105, -17, 4.2)
pt3dadd(144, -105.5, -18, 3.7)
}
}
proc shape3d_60() {
dend[193] { pt3dadd(148, -105.5, -18, 3.4)
pt3dadd(149.5, -106.5, -18, 4.2)
pt3dadd(153, -107.5, -15.5, 4)
pt3dadd(157, -107.5, -17, 4.3)
pt3dadd(161, -109.5, -17, 3.6)
pt3dadd(165, -109.5, -17, 4.3)
pt3dadd(169.5, -110, -18, 4.6)
pt3dadd(174.5, -112, -18, 4.6)
pt3dadd(177, -112, -18, 4)
pt3dadd(179.5, -112.5, -18, 3.8)
pt3dadd(182.5, -113, -18, 4)
pt3dadd(185.5, -113, -18, 4)
pt3dadd(189.5, -114.5, -15.5, 4.9)
pt3dadd(193.5, -115, -17, 5)
pt3dadd(198, -116.5, -18, 5.2)
pt3dadd(204.5, -116.5, -18, 4)
pt3dadd(207.5, -116.5, -18, 6)
}
dend[194] {pt3dclear()
pt3dadd(207.5, -116.5, -18, 6)
pt3dadd(218, -115.5, -14.5, 0.1)
pt3dadd(221.5, -113.5, -16, 0.1)
pt3dadd(223.5, -113.5, -16, 0.1)
pt3dadd(226, -112, -16, 0.1)
pt3dadd(228, -110, -16, 0.1)
pt3dadd(229.5, -108, -16, 0.1)
pt3dadd(232.5, -106.5, -16, 0.1)
pt3dadd(235, -106, -15, 0.1)
}
dend[195] {pt3dclear()
pt3dadd(207.5, -116.5, -18, 6)
pt3dadd(212.5, -117.5, -18.5, 4.3)
pt3dadd(216.5, -118, -19, 3.8)
pt3dadd(218, -120.5, -19, 3.5)
pt3dadd(222.5, -120.5, -19, 3.6)
pt3dadd(224.5, -121.5, -20.5, 3.9)
pt3dadd(228, -122.5, -19, 3.9)
pt3dadd(230.5, -123.5, -19, 4.5)
pt3dadd(233, -123.5, -20, 4.1)
pt3dadd(236.5, -123.5, -19, 2.7)
pt3dadd(240, -125, -20, 2.8)
pt3dadd(242, -126, -20, 2.8)
pt3dadd(244.5, -126, -20, 3.3)
pt3dadd(247, -126, -20, 4)
pt3dadd(250, -126, -20, 4.5)
pt3dadd(253, -127, -20, 5.9)
pt3dadd(256.5, -127, -20.5, 4.8)
pt3dadd(260, -127.5, -19, 3.3)
pt3dadd(263.5, -127.5, -19, 2.8)
pt3dadd(265, -127.5, -19, 2.1)
pt3dadd(268.5, -127, -19, 2.1)
pt3dadd(270.5, -127, -18.5, 2.8)
pt3dadd(272.5, -127, -18.5, 3.2)
pt3dadd(274.5, -127, -18.5, 4.1)
pt3dadd(278, -127, -20, 4.6)
pt3dadd(282, -127, -20, 4.9)
pt3dadd(285.5, -126.5, -20, 4.9)
pt3dadd(288.5, -126.5, -20.5, 4.6)
pt3dadd(292.5, -126.5, -20.5, 4.1)
pt3dadd(296, -126, -21.5, 4.1)
pt3dadd(298, -126, -21.5, 3.4)
pt3dadd(300, -126, -21.5, 3.6)
pt3dadd(303, -126, -22, 4.1)
pt3dadd(305.5, -126, -22, 5)
pt3dadd(309, -125, -21.5, 5.4)
pt3dadd(312, -125, -21.5, 5.7)
pt3dadd(316, -125, -21.5, 5)
pt3dadd(317.5, -125, -23.5, 4.4)
pt3dadd(319.5, -125, -23.5, 3.4)
pt3dadd(322, -125.5, -23.5, 3.4)
pt3dadd(324.5, -125.5, -23.5, 4)
pt3dadd(328, -125.5, -23.5, 4.3)
pt3dadd(329.5, -125.5, -23.5, 4.6)
pt3dadd(332.5, -125.5, -23.5, 4.6)
pt3dadd(335, -125.5, -23.5, 5.1)
pt3dadd(341, -126.5, -23.5, 4.7)
pt3dadd(345.5, -127, -29.5, 5)
pt3dadd(348, -127.5, -29.5, 5)
pt3dadd(350.5, -127.5, -29.5, 4.3)
pt3dadd(353, -127.5, -29.5, 3.6)
pt3dadd(355.5, -127.5, -29.5, 2.8)
pt3dadd(357.5, -127.5, -29.5, 2.9)
pt3dadd(360, -127.5, -36, 3.3)
pt3dadd(362.5, -126.5, -29.5, 3.3)
pt3dadd(364, -126.5, -29.5, 3.3)
pt3dadd(367, -126.5, -29.5, 3.3)
pt3dadd(370, -126.5, -29.5, 3.7)
pt3dadd(373, -127.5, -29.5, 4.1)
pt3dadd(376, -128, -29.5, 4.8)
pt3dadd(379.5, -128, -29.5, 5.2)
pt3dadd(382.5, -130, -36, 5.8)
pt3dadd(386, -130, -36, 5.5)
pt3dadd(389, -130, -36, 4.6)
pt3dadd(391, -131, -42, 4.4)
pt3dadd(392, -132.5, -42, 2.2)
pt3dadd(395, -132, -42, 3.6)
pt3dadd(397, -132, -42, 4.6)
pt3dadd(399.5, -132.5, -42, 4.9)
pt3dadd(402.5, -133, -42, 4.9)
pt3dadd(405, -133.5, -42, 4.7)
pt3dadd(407.5, -133.5, -42, 4.6)
pt3dadd(410, -133.5, -42, 3.9)
pt3dadd(411, -134.5, -48.5, 3.3)
pt3dadd(412.5, -134.5, -48.5, 3.3)
pt3dadd(415.5, -136, -48.5, 3.4)
pt3dadd(418, -136, -48.5, 4.3)
pt3dadd(421.5, -136, -48.5, 4.9)
pt3dadd(425, -137.5, -48.5, 4.9)
pt3dadd(427, -137.5, -48.5, 4.1)
pt3dadd(430, -138.5, -48.5, 3.8)
pt3dadd(433, -140.5, -48.5, 4.8)
pt3dadd(437, -140.5, -48.5, 4.9)
pt3dadd(440.5, -141.5, -48.5, 4.3)
pt3dadd(443.5, -141.5, -54.5, 4.2)
pt3dadd(444.5, -141.5, -54.5, 3.7)
pt3dadd(446.5, -141.5, -54.5, 3.5)
pt3dadd(448.5, -141.5, -54.5, 3.1)
pt3dadd(450.5, -142, -48.5, 2.8)
pt3dadd(452, -142, -48.5, 2.4)
pt3dadd(456, -142, -54.5, 2.8)
pt3dadd(458, -143.5, -58.5, 1.1)
pt3dadd(461.5, -143, -60.5, 2.9)
pt3dadd(463, -143, -58.5, 5.7)
pt3dadd(467, -143, -58.5, 5.3)
pt3dadd(471.5, -143, -62, 4)
pt3dadd(475, -143, -62, 2.6)
pt3dadd(478, -143, -66, 1.7)
pt3dadd(481.5, -142.5, -66, 2.5)
pt3dadd(482.5, -142, -66, 4)
pt3dadd(485.5, -142, -66, 4.8)
pt3dadd(487, -140, -58.5, 4)
pt3dadd(491, -140, -58.5, 3.3)
pt3dadd(493, -140.5, -58.5, 2.2)
pt3dadd(496, -140.5, -60.5, 1.1)
pt3dadd(499.5, -140.5, -60.5, 1.4)
pt3dadd(502.5, -139.5, -68, 1.7)
pt3dadd(505.5, -139.5, -68, 1.9)
pt3dadd(509, -140.5, -68, 1.9)
pt3dadd(512, -140.5, -68, 1.9)
pt3dadd(517, -141, -68, 3.2)
}
dend[196] {pt3dclear()
pt3dadd(517, -141, -68, 3.2)
pt3dadd(521, -140, -66, 0.7)
pt3dadd(524.5, -141.5, -66, 0.7)
pt3dadd(528.5, -142, -66, 0.7)
pt3dadd(532.5, -142.5, -68, 0.7)
pt3dadd(535.5, -142.5, -68, 0.7)
pt3dadd(539.5, -142.5, -72, 0.7)
pt3dadd(543.5, -140, -68, 0.9)
pt3dadd(548.5, -140, -68, 0.9)
pt3dadd(553, -139, -68, 0.9)
pt3dadd(555.5, -138.5, -68, 0.9)
pt3dadd(558, -136.5, -68, 1.8)
pt3dadd(559.5, -136.5, -68, 0.9)
pt3dadd(563, -135, -68, 0.9)
pt3dadd(565.5, -135, -68, 0.8)
pt3dadd(567, -135, -68, 0.8)
pt3dadd(570, -135, -68, 1.9)
pt3dadd(573, -135, -68, 1.2)
pt3dadd(575, -135, -68, 0.7)
pt3dadd(576, -135, -68, 0.7)
pt3dadd(577, -135.5, -68, 0.7)
pt3dadd(579, -137, -68, 1.8)
pt3dadd(581.5, -137, -64, 0.5)
pt3dadd(583, -137, -70, 0.5)
pt3dadd(586, -137, -72, 0.5)
pt3dadd(586.5, -137, -70, 0.9)
pt3dadd(586.5, -140, -68, 0.7)
pt3dadd(588.5, -140, -68, 0.5)
pt3dadd(590, -139.5, -70, 1.1)
pt3dadd(590.5, -140, -70, 0.4)
pt3dadd(593, -140.5, -72, 0.8)
pt3dadd(595, -140, -66, 1.8)
pt3dadd(598.5, -140, -66, 2.4)
pt3dadd(599, -140, -69, 1.3)
pt3dadd(600.5, -140, -69, 0.3)
pt3dadd(603, -141, -69, 0.3)
pt3dadd(603.5, -141, -69, 1.3)
pt3dadd(605.5, -141, -69, 1.8)
pt3dadd(606.5, -142, -69, 0.2)
pt3dadd(609.5, -142, -69, 0.2)
pt3dadd(612.5, -143, -69, 0.2)
pt3dadd(615, -143.5, -75, 1.3)
pt3dadd(616.5, -144, -69, 2.8)
pt3dadd(618.5, -144, -69, 0.6)
pt3dadd(623, -144, -69, 0.6)
pt3dadd(625, -144, -75, 0.6)
pt3dadd(628.5, -144.5, -75, 0.6)
pt3dadd(631.5, -144.5, -75, 1.8)
pt3dadd(632.5, -145.5, -72, 3.2)
pt3dadd(633.5, -146.5, -78, 2)
pt3dadd(636, -148.5, -75, 0.1)
pt3dadd(638.5, -149.5, -78, 0.1)
pt3dadd(641.5, -149.5, -78, 1)
pt3dadd(642, -151, -78, 0.1)
pt3dadd(643, -151, -78, 0.1)
pt3dadd(646, -151, -81, 1.3)
pt3dadd(647.5, -151, -81, 0.1)
pt3dadd(651.5, -152.5, -78, 0.1)
pt3dadd(654, -152.5, -81, 0.1)
pt3dadd(655.5, -153.5, -84, 2.4)
pt3dadd(658, -153.5, -84, 0.1)
pt3dadd(660, -154.5, -84, 0.1)
pt3dadd(662, -154.5, -84, 0.1)
pt3dadd(663.5, -156.5, -81, 1.3)
}
}
proc shape3d_61() {
dend[196] { pt3dadd(664.5, -156.5, -81, 1.6)
pt3dadd(666.5, -156.5, -81, 1.1)
pt3dadd(668, -156.5, -84, 0.1)
pt3dadd(670.5, -156.5, -86.5, 0.1)
pt3dadd(672, -156.5, -86.5, 2.1)
pt3dadd(673.5, -156.5, -81, 3.1)
pt3dadd(676.5, -156, -81, 0.1)
pt3dadd(677.5, -156, -81, 0.1)
pt3dadd(679.5, -156, -81, 2.6)
pt3dadd(682.5, -157.5, -86.5, 0.1)
pt3dadd(685, -157.5, -86.5, 0.1)
pt3dadd(687, -158, -84, 1.9)
pt3dadd(689.5, -158, -89.5, 0.1)
pt3dadd(690.5, -158, -89.5, 0.1)
pt3dadd(694, -160, -89.5, 2.1)
pt3dadd(695.5, -160, -86.5, 0.1)
pt3dadd(697.5, -162, -89.5, 0.1)
pt3dadd(699, -162, -92.5, 0.9)
pt3dadd(700, -162, -89.5, 0.1)
pt3dadd(702, -162, -89.5, 0.1)
pt3dadd(703.5, -162, -89.5, 0.1)
pt3dadd(705, -162.5, -89.5, 0.1)
pt3dadd(708, -162.5, -92.5, 0.1)
pt3dadd(710.5, -163.5, -92.5, 0.1)
pt3dadd(711.5, -163.5, -92.5, 0.1)
pt3dadd(713, -165, -92.5, 1.4)
pt3dadd(715, -165, -92.5, 2.5)
pt3dadd(716, -166.5, -92.5, 1.2)
pt3dadd(717.5, -166.5, -92.5, 0.1)
pt3dadd(720.5, -166.5, -92.5, 0.1)
pt3dadd(721.5, -167, -92.5, 1.6)
pt3dadd(723, -167, -92.5, 0.1)
pt3dadd(724, -167, -92.5, 0.1)
pt3dadd(725, -167, -92.5, 1.3)
pt3dadd(727.5, -167, -92.5, 1.8)
pt3dadd(729, -168, -92.5, 0.1)
pt3dadd(731.5, -169, -95.5, 0.1)
pt3dadd(733, -169, -95.5, 0.1)
pt3dadd(734.5, -169, -95.5, 0.9)
pt3dadd(735.5, -169, -95.5, 1.5)
pt3dadd(738.5, -170, -95.5, 0.9)
pt3dadd(740, -170.5, -98.5, 0.1)
pt3dadd(741.5, -170, -98.5, 0.1)
pt3dadd(743.5, -171, -98.5, 0.1)
pt3dadd(747, -173.5, -98.5, 0.1)
pt3dadd(747.5, -174, -96, 1)
pt3dadd(749, -174, -93.5, 1.4)
pt3dadd(750.5, -175, -93.5, 0.7)
pt3dadd(751.5, -175, -93.5, 0.1)
pt3dadd(754, -179, -93.5, 0.1)
pt3dadd(754.5, -179, -96, 1.1)
pt3dadd(756.5, -179, -96, 1.6)
pt3dadd(757, -179.5, -96, 0.6)
pt3dadd(759, -181, -93.5, 0.1)
pt3dadd(763, -183, -93.5, 0.1)
pt3dadd(766, -185, -93.5, 0.1)
pt3dadd(767, -186, -93.5, 1.2)
pt3dadd(768, -186, -93.5, 1.7)
pt3dadd(770.5, -185.5, -93.5, 0.9)
pt3dadd(771, -185, -96, 0.1)
pt3dadd(773.5, -186.5, -96, 0.1)
pt3dadd(777.5, -184.5, -91.5, 0.1)
pt3dadd(781.5, -184.5, -96, 0.1)
pt3dadd(782, -185.5, -101, 0.1)
pt3dadd(785, -186, -101, 0.1)
}
dend[197] {pt3dclear()
pt3dadd(517, -141, -68, 3.2)
pt3dadd(522.5, -142, -70, 2.2)
pt3dadd(525.5, -142, -70, 2.5)
pt3dadd(527, -144, -62, 2.8)
pt3dadd(531, -144.5, -68, 3.4)
pt3dadd(535, -146, -68, 3.2)
pt3dadd(537.5, -146.5, -70, 2.7)
pt3dadd(538.5, -148.5, -72, 2.1)
pt3dadd(540.5, -149.5, -72, 2.1)
pt3dadd(542.5, -151.5, -74, 2.1)
pt3dadd(545.5, -154.5, -80, 2.2)
pt3dadd(548.5, -155, -80, 2.4)
pt3dadd(550.5, -156.5, -80, 2.7)
pt3dadd(553.5, -157, -77, 3.8)
pt3dadd(556, -157, -80, 4.9)
pt3dadd(558.5, -157, -74, 5.7)
pt3dadd(563, -159, -80, 4.3)
pt3dadd(565, -159.5, -80, 2.8)
pt3dadd(566.5, -160, -83, 2.1)
pt3dadd(568.5, -160, -77, 1.4)
pt3dadd(569.5, -162, -77, 2)
pt3dadd(572, -163.5, -77, 2.7)
pt3dadd(575.5, -164.5, -77, 4.1)
pt3dadd(578, -165.5, -80, 4.1)
pt3dadd(579.5, -167, -83, 3.1)
pt3dadd(580.5, -168.5, -80, 2.9)
pt3dadd(583, -170.5, -83, 2.8)
pt3dadd(585, -172.5, -83, 2.2)
pt3dadd(587, -174, -80, 1.7)
pt3dadd(588, -175, -86, 1.5)
pt3dadd(590.5, -175.5, -86, 1.6)
pt3dadd(593, -177.5, -89, 2.2)
pt3dadd(594.5, -179, -89, 3.1)
pt3dadd(598, -180, -89, 3.3)
pt3dadd(599.5, -181, -89, 3.3)
pt3dadd(601, -183.5, -89, 2.3)
pt3dadd(602, -185, -89, 1.7)
pt3dadd(604.5, -186, -89, 2.4)
pt3dadd(606, -188.5, -89, 3.3)
pt3dadd(608.5, -189.5, -89, 4)
pt3dadd(611.5, -192.5, -89, 3.2)
pt3dadd(612.5, -194, -91.5, 2.9)
pt3dadd(614.5, -197, -89, 2.7)
pt3dadd(616.5, -200.5, -89, 2.3)
pt3dadd(618.5, -201.5, -91.5, 1.8)
pt3dadd(620, -203.5, -91.5, 1.7)
pt3dadd(622, -204.5, -91.5, 1.6)
pt3dadd(624, -207, -97.5, 1.8)
pt3dadd(626.5, -209, -97.5, 2.2)
pt3dadd(629, -210.5, -97.5, 3.2)
pt3dadd(631.5, -212, -97.5, 4.3)
pt3dadd(632.5, -213.5, -97.5, 4.7)
pt3dadd(635, -215.5, -97.5, 3.8)
pt3dadd(635.5, -217, -103.5, 3.1)
pt3dadd(637.5, -219.5, -103.5, 2.6)
pt3dadd(638.5, -226.5, -101, 2.2)
pt3dadd(639.5, -229, -108, 2.2)
pt3dadd(642, -231, -108, 2.2)
pt3dadd(642.5, -234, -108, 2.4)
pt3dadd(644.5, -235, -105.5, 3.7)
pt3dadd(647.5, -238, -108, 4.3)
pt3dadd(650, -241.5, -110.5, 4.5)
pt3dadd(652, -246.5, -110.5, 4.5)
}
dend[198] {pt3dclear()
pt3dadd(652, -246.5, -110.5, 4.5)
pt3dadd(654.5, -251.5, -108, 1.6)
pt3dadd(655, -253, -105.5, 1.9)
pt3dadd(656.5, -255, -105.5, 2.5)
pt3dadd(658, -256.5, -105.5, 3.3)
pt3dadd(658, -258.5, -103.5, 4.7)
pt3dadd(659, -261, -105.5, 3.8)
pt3dadd(659.5, -263.5, -105.5, 1.5)
pt3dadd(660, -266, -105.5, 1.1)
pt3dadd(660.5, -267.5, -105.5, 1.6)
pt3dadd(661.5, -268.5, -105.5, 1.6)
pt3dadd(664, -270.5, -105.5, 2.2)
pt3dadd(665.5, -272, -105.5, 3.6)
pt3dadd(666.5, -274.5, -105.5, 3.8)
pt3dadd(667, -277, -105.5, 3.4)
pt3dadd(669, -279.5, -108, 2.9)
pt3dadd(669.5, -280.5, -110.5, 1.6)
pt3dadd(669.5, -283.5, -108, 1.3)
pt3dadd(672, -284.5, -105.5, 1.5)
pt3dadd(672.5, -286.5, -110.5, 1.9)
pt3dadd(674, -287.5, -110.5, 2.2)
pt3dadd(674, -289.5, -110.5, 2.6)
pt3dadd(674, -291, -110.5, 3.2)
pt3dadd(676, -294, -110.5, 4.1)
}
dend[199] {pt3dclear()
pt3dadd(676, -294, -110.5, 4.1)
pt3dadd(677.5, -298.5, -110.5, 0.9)
pt3dadd(678.5, -299, -113, 0.9)
pt3dadd(679, -300, -117.5, 0.8)
pt3dadd(679.5, -302, -115, 0.9)
pt3dadd(680, -304, -115, 0.9)
pt3dadd(681, -304, -115, 0.5)
pt3dadd(682, -305, -115, 1.1)
pt3dadd(682.5, -307, -115, 0.9)
pt3dadd(684, -308, -117.5, 0.8)
pt3dadd(685, -309.5, -117.5, 1.7)
pt3dadd(685.5, -311.5, -115, 2.5)
pt3dadd(688, -314, -115, 3.6)
pt3dadd(689, -316.5, -115, 2.6)
pt3dadd(691, -318.5, -115, 0.9)
pt3dadd(692.5, -320, -120, 1.1)
pt3dadd(693.5, -322, -120, 1.1)
pt3dadd(694.5, -323.5, -120, 1.1)
pt3dadd(695, -324.5, -117.5, 2.4)
pt3dadd(696.5, -326, -117.5, 3.6)
pt3dadd(697.5, -328.5, -120, 1.5)
pt3dadd(698.5, -328.5, -120, 0.7)
pt3dadd(699.5, -329.5, -120, 0.6)
pt3dadd(701.5, -330.5, -120, 1.1)
pt3dadd(702.5, -332.5, -122.5, 1.2)
pt3dadd(703.5, -335, -122.5, 1.2)
pt3dadd(704.5, -335.5, -122.5, 0.9)
pt3dadd(706, -337.5, -122.5, 0.9)
pt3dadd(707.5, -339, -122.5, 0.9)
pt3dadd(709.5, -339, -122.5, 1.7)
pt3dadd(711, -340, -122.5, 2.5)
pt3dadd(712, -341, -122.5, 2.3)
pt3dadd(714, -341.5, -120, 1.6)
pt3dadd(715.5, -341.5, -122.5, 1.1)
pt3dadd(716.5, -342.5, -122.5, 0.9)
pt3dadd(718, -346, -122.5, 0.6)
pt3dadd(720, -346.5, -122.5, 0.6)
pt3dadd(721, -349.5, -122.5, 1.4)
pt3dadd(722.5, -352.5, -122.5, 1.5)
pt3dadd(724, -353.5, -124.5, 0.9)
pt3dadd(724.5, -355.5, -124.5, 0.6)
pt3dadd(724.5, -357, -124.5, 0.6)
pt3dadd(726, -359.5, -124.5, 0.6)
pt3dadd(725.5, -359.5, -120, 0.2)
pt3dadd(728, -360, -115, 1.7)
pt3dadd(730, -361.5, -117.5, 2.1)
pt3dadd(732, -363, -120, 0.6)
pt3dadd(732.5, -364.5, -122.5, 0.5)
}
}
proc shape3d_62() {
dend[199] { pt3dadd(734.5, -367, -122.5, 0.5)
pt3dadd(737, -370, -120, 0.5)
}
dend[200] {pt3dclear()
pt3dadd(676, -294, -110.5, 4.1)
pt3dadd(681, -296, -110.5, 0.1)
pt3dadd(685, -297.5, -113, 0.1)
pt3dadd(686.5, -297.5, -113, 0.1)
pt3dadd(688, -299, -110.5, 1.6)
pt3dadd(690, -299, -110.5, 1.7)
pt3dadd(691.5, -299.5, -115, 1.4)
pt3dadd(693.5, -300.5, -115, 0.2)
pt3dadd(697, -302, -115, 0.2)
pt3dadd(698.5, -303.5, -115, 1.6)
pt3dadd(700.5, -303.5, -115, 2.4)
pt3dadd(701.5, -304.5, -113, 2.8)
pt3dadd(703, -305, -113, 2)
pt3dadd(705.5, -305, -113, 1.1)
pt3dadd(708, -305, -113, 0.9)
pt3dadd(709, -306, -113, 0.9)
pt3dadd(712, -307, -113, 0.8)
pt3dadd(713.5, -307, -113, 0.8)
pt3dadd(715, -307, -113, 1.4)
pt3dadd(716, -307, -113, 1.6)
pt3dadd(719, -307.5, -113, 2)
pt3dadd(721.5, -308, -113, 3.2)
pt3dadd(723, -308, -113, 1.8)
pt3dadd(724, -309, -113, 0.5)
pt3dadd(726.5, -309, -113, 0.5)
pt3dadd(730, -309, -113, 0.5)
pt3dadd(732.5, -310, -115, 2.1)
pt3dadd(734, -309, -115, 2.5)
pt3dadd(735.5, -309, -115, 3.6)
pt3dadd(737, -310.5, -115, 1.6)
pt3dadd(739, -309, -115, 0.7)
pt3dadd(742.5, -310, -115, 0.7)
pt3dadd(744.5, -310, -115, 1.4)
pt3dadd(745.5, -311, -115, 2.9)
pt3dadd(747.5, -312.5, -115, 1.6)
pt3dadd(750, -312.5, -115, 0.7)
pt3dadd(751, -314, -115, 0.7)
pt3dadd(753.5, -314, -115, 0.7)
pt3dadd(754.5, -315.5, -115, 1.7)
pt3dadd(756, -317, -115, 2.5)
pt3dadd(756.5, -318.5, -115, 1.5)
pt3dadd(757.5, -319, -115, 0.7)
pt3dadd(759, -320.5, -117.5, 0.7)
pt3dadd(761, -322.5, -120, 0.7)
pt3dadd(764, -323, -120, 0.7)
pt3dadd(766, -324.5, -117.5, 0.7)
pt3dadd(768.5, -324.5, -120, 1.6)
pt3dadd(770, -325.5, -120, 1.9)
pt3dadd(772, -325.5, -120, 0.7)
pt3dadd(775, -327.5, -120, 0.6)
pt3dadd(778.5, -328.5, -120, 0.6)
pt3dadd(779.5, -330, -120, 1.4)
pt3dadd(781, -330, -120, 2.2)
pt3dadd(782.5, -332, -120, 1.4)
pt3dadd(785.5, -335.5, -122.5, 0.4)
pt3dadd(787.5, -337, -124.5, 0.1)
pt3dadd(788.5, -337.5, -122.5, 1.6)
pt3dadd(790.5, -340.5, -120, 2.3)
pt3dadd(793.5, -341.5, -129.5, 1.6)
pt3dadd(795, -343, -124.5, 0.8)
pt3dadd(797.5, -345, -127, 0.8)
}
dend[201] {pt3dclear()
pt3dadd(652, -246.5, -110.5, 4.5)
pt3dadd(658, -250, -115, 0.1)
pt3dadd(658.5, -251.5, -115, 0.1)
pt3dadd(661, -253, -115, 0.1)
pt3dadd(663, -254.5, -115, 0.1)
pt3dadd(665, -254.5, -115, 0.1)
pt3dadd(667, -256.5, -115, 2.1)
pt3dadd(669.5, -257.5, -115, 0.1)
pt3dadd(673, -259, -115, 0.1)
pt3dadd(674.5, -259.5, -120, 2)
pt3dadd(677, -260, -117.5, 3.1)
pt3dadd(679, -262.5, -120, 1.6)
pt3dadd(681.5, -262.5, -117.5, 0.1)
pt3dadd(682.5, -265, -117.5, 0.1)
pt3dadd(683, -264.5, -122.5, 0.1)
pt3dadd(684.5, -264, -122.5, 1.9)
pt3dadd(686.5, -264, -120, 2.7)
pt3dadd(689, -264, -120, 1.4)
pt3dadd(690, -264, -120, 0.1)
pt3dadd(693, -266, -124.5, 0.1)
pt3dadd(694.5, -267, -122.5, 1.4)
pt3dadd(696.5, -267.5, -122.5, 2)
pt3dadd(698, -267.5, -122.5, 1.5)
pt3dadd(699, -267.5, -120, 0.1)
pt3dadd(700.5, -268, -124.5, 0.1)
pt3dadd(703, -269, -122.5, 2.2)
pt3dadd(706.5, -270, -129.5, 1.4)
pt3dadd(707, -270, -132, 0.1)
pt3dadd(707.5, -270.5, -129.5, 0.1)
pt3dadd(709.5, -272, -127, 0.1)
pt3dadd(712, -273, -127, 1.1)
pt3dadd(713.5, -274, -129.5, 1.1)
pt3dadd(714.5, -276, -132, 0.1)
pt3dadd(716, -276.5, -127, 0.1)
pt3dadd(720, -278, -127, 0.1)
pt3dadd(721.5, -278, -124.5, 1.9)
pt3dadd(724, -277.5, -124.5, 2.3)
pt3dadd(725, -277.5, -124.5, 2.3)
pt3dadd(726.5, -277.5, -124.5, 1.5)
pt3dadd(728.5, -276, -124.5, 1)
pt3dadd(729.5, -276.5, -124.5, 1.4)
pt3dadd(731.5, -276.5, -124.5, 3.3)
pt3dadd(733, -277, -124.5, 3.7)
pt3dadd(735.5, -277.5, -124.5, 2.4)
pt3dadd(737.5, -278, -122.5, 1.1)
pt3dadd(740, -277.5, -115, 1)
pt3dadd(743, -277.5, -115, 1)
pt3dadd(743.5, -278.5, -117.5, 1)
pt3dadd(745, -280, -115, 1.5)
pt3dadd(746.5, -281, -115, 1.1)
pt3dadd(747, -282, -115, 0.2)
pt3dadd(748, -282.5, -115, 0.2)
pt3dadd(749, -282.5, -115, 1.2)
pt3dadd(749.5, -284, -115, 1.6)
pt3dadd(751, -284, -117.5, 1.1)
pt3dadd(754, -284, -120, 0.1)
pt3dadd(755.5, -285.5, -120, 1.6)
pt3dadd(757, -287.5, -120, 1.6)
pt3dadd(757, -289, -122.5, 1.4)
pt3dadd(757, -290, -120, 0.2)
pt3dadd(757.5, -290.5, -120, 0.2)
pt3dadd(757.5, -292, -120, 1.8)
pt3dadd(758.5, -294, -120, 1.9)
pt3dadd(759, -295.5, -115, 1.3)
pt3dadd(760.5, -297, -115, 0.4)
pt3dadd(763, -298.5, -115, 0.4)
pt3dadd(764.5, -299.5, -120, 1.2)
pt3dadd(765.5, -301, -120, 0.7)
pt3dadd(766.5, -302, -120, 1.3)
pt3dadd(767.5, -302.5, -117.5, 2.5)
pt3dadd(769.5, -303, -117.5, 1.2)
pt3dadd(769.5, -304, -117.5, 0.1)
pt3dadd(770.5, -305.5, -117.5, 0.1)
pt3dadd(773.5, -306.5, -117.5, 0.1)
pt3dadd(775.5, -309, -120, 0.1)
pt3dadd(777.5, -309.5, -120, 0.1)
pt3dadd(778.5, -310.5, -120, 1.1)
pt3dadd(780, -312.5, -120, 1.5)
pt3dadd(781, -312.5, -120, 1.7)
pt3dadd(781, -314.5, -120, 0.9)
pt3dadd(783.5, -314.5, -122.5, 0.1)
pt3dadd(787, -315.5, -124.5, 0.1)
pt3dadd(790, -317, -124.5, 0.1)
pt3dadd(792, -318, -120, 1.2)
pt3dadd(795, -318.5, -124.5, 1.4)
pt3dadd(797.5, -318.5, -127, 1.2)
pt3dadd(801, -318.5, -129.5, 0.7)
pt3dadd(802, -318, -127, 0.6)
pt3dadd(803, -316, -124.5, 1.3)
pt3dadd(804.5, -316, -127, 0.7)
pt3dadd(807.5, -316, -120, 0.7)
pt3dadd(811, -316, -120, 0.7)
pt3dadd(813.5, -314, -122.5, 0.7)
pt3dadd(816, -314, -122.5, 0.7)
pt3dadd(818.5, -314, -122.5, 0.8)
pt3dadd(820, -314, -122.5, 1.6)
pt3dadd(820.5, -312.5, -122.5, 1.6)
pt3dadd(823, -312.5, -122.5, 1.1)
pt3dadd(826, -312.5, -122.5, 0.8)
pt3dadd(827.5, -310.5, -127, 0.1)
pt3dadd(832.5, -310.5, -120, 0.1)
pt3dadd(835, -307, -124.5, 0.1)
pt3dadd(837.5, -307, -124.5, 1.1)
}
dend[202] {pt3dclear()
pt3dadd(837.5, -307, -124.5, 1.1)
pt3dadd(839, -305.5, -124.5, 0.9)
pt3dadd(842, -303.5, -124.5, 0.9)
pt3dadd(845.5, -303.5, -124.5, 0.8)
pt3dadd(847.5, -303, -124.5, 0.8)
pt3dadd(850, -303, -124.5, 0.6)
pt3dadd(851.5, -300.5, -124.5, 0.9)
pt3dadd(852, -299, -124.5, 0.7)
pt3dadd(854, -297.5, -124.5, 0.7)
pt3dadd(855, -297, -124.5, 0.7)
pt3dadd(858.5, -296, -124.5, 1.3)
pt3dadd(859.5, -295, -122.5, 1.2)
pt3dadd(861.5, -293.5, -122.5, 0.2)
pt3dadd(863.5, -293.5, -122.5, 0.2)
pt3dadd(867, -293.5, -120, 1.6)
pt3dadd(869, -292.5, -120, 0.3)
pt3dadd(871.5, -293, -124.5, 0.3)
pt3dadd(875, -293, -124.5, 1.6)
pt3dadd(877.5, -293, -124.5, 0.2)
pt3dadd(881, -292.5, -124.5, 0.2)
pt3dadd(885, -295.5, -124.5, 0.3)
pt3dadd(888.5, -295.5, -124.5, 0.6)
pt3dadd(890, -295, -129.5, 1.6)
pt3dadd(893, -295, -129.5, 0.1)
pt3dadd(896, -295, -129.5, 0.1)
pt3dadd(898, -294.5, -124.5, 0.9)
pt3dadd(899, -294.5, -124.5, 0.3)
pt3dadd(898.5, -294.5, -124.5, 0.3)
pt3dadd(903.5, -294.5, -127, 1.6)
pt3dadd(904.5, -294.5, -122.5, 0.1)
pt3dadd(908.5, -294.5, -129.5, 0.1)
pt3dadd(912, -294.5, -132, 0.1)
pt3dadd(916, -293.5, -132, 0.1)
pt3dadd(920, -293.5, -127, 0.1)
}
}
proc shape3d_63() {
dend[202] { pt3dadd(923.5, -291.5, -127, 0.1)
pt3dadd(927.5, -291.5, -129.5, 0.1)
}
dend[203] {pt3dclear()
pt3dadd(837.5, -307, -124.5, 1.1)
pt3dadd(839.5, -310, -117.5, 1.2)
pt3dadd(843, -310, -124.5, 1.4)
pt3dadd(847.5, -309.5, -120, 1.4)
pt3dadd(850, -308.5, -124.5, 1.1)
pt3dadd(853.5, -308.5, -115, 0.9)
pt3dadd(856.5, -306.5, -117.5, 0.9)
pt3dadd(858.5, -303, -113, 0.7)
pt3dadd(862, -301.5, -113, 0.7)
pt3dadd(864, -301.5, -110.5, 1.5)
pt3dadd(867.5, -300.5, -110.5, 1.5)
pt3dadd(869, -300.5, -108, 0.7)
pt3dadd(871.5, -298, -108, 0.7)
pt3dadd(873.5, -296, -103.5, 0.7)
pt3dadd(878, -296, -103.5, 0.7)
pt3dadd(881.5, -294, -103.5, 0.7)
pt3dadd(885.5, -293.5, -103.5, 0.7)
pt3dadd(889.5, -290.5, -103.5, 0.7)
pt3dadd(891.5, -289, -103.5, 0.7)
pt3dadd(898, -285.5, -103.5, 0.7)
}
dend[204] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 13.7)
pt3dadd(80, 56.5, -15, 13.7)
pt3dadd(82.5, 58.5, -10, 13)
pt3dadd(88.5, 60, -10, 12)
pt3dadd(92, 63.5, -9.5, 10.6)
pt3dadd(98.5, 67.5, -13, 10.1)
pt3dadd(102, 69.5, -13, 10.1)
pt3dadd(106, 70.5, -13, 11.3)
pt3dadd(109.5, 70, -13, 12)
pt3dadd(114, 71, -13, 11.7)
pt3dadd(120.5, 72, -11, 10.8)
pt3dadd(124.5, 75, -12, 10.9)
pt3dadd(129, 77.5, -12, 12.5)
pt3dadd(132, 79, -12, 12.4)
pt3dadd(135.5, 80, -13, 12.4)
pt3dadd(140, 81.5, -13, 11.3)
pt3dadd(144.5, 83, -15, 10.1)
pt3dadd(148, 83, -15, 10.1)
pt3dadd(152, 83, -15.5, 10.1)
pt3dadd(157, 85.5, -15.5, 11.6)
}
dend[205] {pt3dclear()
pt3dadd(157, 85.5, -15.5, 11.6)
pt3dadd(163, 81, -11, 4.2)
pt3dadd(169, 80.5, -13, 4.4)
pt3dadd(173.5, 80.5, -13, 4.2)
pt3dadd(179.5, 80.5, -15, 4.5)
pt3dadd(184.5, 80.5, -15, 5.2)
pt3dadd(188, 80.5, -14, 5.5)
pt3dadd(192, 81, -12, 6.2)
pt3dadd(197, 81, -13, 5.5)
pt3dadd(199.5, 81, -14, 5)
pt3dadd(201.5, 81, -15, 4.9)
pt3dadd(206, 81, -15, 4.7)
pt3dadd(209, 81, -15, 4.7)
pt3dadd(211, 81, -15, 4.1)
pt3dadd(214, 81, -15, 4.1)
pt3dadd(217.5, 81, -15, 4.6)
pt3dadd(221.5, 80, -15, 5.7)
pt3dadd(224, 79, -15, 5.3)
pt3dadd(228, 79, -15, 5.8)
pt3dadd(230.5, 78, -15, 6.2)
pt3dadd(236, 79.5, -15, 5.8)
pt3dadd(242, 80.5, -15.5, 6.2)
pt3dadd(247, 84, -12, 6.2)
pt3dadd(251.5, 85, -12, 6.3)
pt3dadd(254, 86, -12, 6.4)
pt3dadd(257, 86.5, -12, 5.7)
pt3dadd(261, 86.5, -13, 5)
pt3dadd(264.5, 85.5, -13, 5.3)
pt3dadd(267.5, 85.5, -14, 5.8)
}
dend[206] {pt3dclear()
pt3dadd(267.5, 85.5, -14, 5.8)
pt3dadd(270.5, 81, -6.5, 2.9)
pt3dadd(275, 81, -7.5, 3.1)
pt3dadd(280, 81.5, -7.5, 3.3)
pt3dadd(284, 81.5, -7.5, 3.7)
pt3dadd(288, 81.5, -7.5, 4)
pt3dadd(292.5, 81.5, -6.5, 4.1)
pt3dadd(297.5, 79.5, -6.5, 4.2)
pt3dadd(300.5, 79.5, -6.5, 4.9)
pt3dadd(305, 78.5, -8.5, 6.1)
}
dend[207] {pt3dclear()
pt3dadd(305, 78.5, -8.5, 6.1)
pt3dadd(306.5, 76.5, -8.5, 3.5)
pt3dadd(309.5, 74, -10, 2.7)
pt3dadd(313, 74, -10, 2.7)
pt3dadd(316, 71, -11, 2.5)
pt3dadd(317.5, 67.5, -11, 2.3)
pt3dadd(319, 65.5, -8.5, 2.3)
pt3dadd(319, 63.5, -9.5, 2.7)
pt3dadd(321, 61, -10, 1.9)
pt3dadd(323, 58, -10, 2.4)
pt3dadd(323.5, 54.5, -10, 2.5)
pt3dadd(324, 52, -10, 2.8)
pt3dadd(325, 48, -9.5, 2.9)
pt3dadd(326.5, 46, -12, 3.3)
pt3dadd(327.5, 42.5, -12, 3.3)
pt3dadd(328.5, 41, -12, 2.8)
pt3dadd(332.5, 37.5, -12, 2.7)
pt3dadd(335, 34.5, -13, 2.2)
pt3dadd(338.5, 30.5, -14, 2.4)
pt3dadd(339.5, 27.5, -15, 2.8)
pt3dadd(342.5, 24, -14, 2.3)
pt3dadd(345, 21.5, -14, 3.1)
pt3dadd(347, 18, -13, 2)
pt3dadd(349, 17, -10, 2.3)
pt3dadd(351.5, 13.5, -9, 2.3)
pt3dadd(353.5, 12, -10, 3.1)
pt3dadd(358, 11.5, -11, 3.3)
pt3dadd(361, 10.5, -11, 2.3)
pt3dadd(363.5, 9.5, -11, 1.7)
pt3dadd(364.5, 8.5, -12.5, 1.2)
pt3dadd(367.5, 8.5, -11, 1.2)
pt3dadd(368, 7.5, -11, 1.5)
pt3dadd(370.5, 5, -11, 2)
pt3dadd(372, 4.5, -11, 2.1)
pt3dadd(373.5, 1.5, -11, 2.4)
pt3dadd(374.5, 0.5, -11, 2.8)
pt3dadd(375.5, -1.5, -11, 2.5)
pt3dadd(378, -3, -11, 1.7)
pt3dadd(381.5, -3.5, -12.5, 1.6)
pt3dadd(384.5, -4.5, -12.5, 2.2)
pt3dadd(388, -4.5, -12.5, 2.2)
pt3dadd(389.5, -5.5, -12.5, 1.4)
pt3dadd(391, -6.5, -12.5, 1.2)
pt3dadd(393.5, -6.5, -13.5, 2.2)
pt3dadd(394.5, -6, -13.5, 1.4)
pt3dadd(397, -5, -13.5, 2)
pt3dadd(399.5, -5, -13.5, 1.7)
pt3dadd(401.5, -4, -12.5, 1.9)
pt3dadd(405, -4, -12.5, 1.4)
pt3dadd(406.5, -4.5, -13.5, 1.1)
pt3dadd(407.5, -4.5, -14.5, 1.1)
pt3dadd(410, -5, -14.5, 1.4)
pt3dadd(411.5, -5, -14.5, 1.6)
pt3dadd(413, -6, -14.5, 2.1)
pt3dadd(416.5, -8, -17, 3.6)
pt3dadd(418, -10, -17, 2.8)
pt3dadd(419.5, -10.5, -17, 2)
pt3dadd(420, -11.5, -17, 1.3)
pt3dadd(422, -12.5, -17, 1.4)
pt3dadd(423, -14, -18, 1.4)
pt3dadd(426, -16, -18, 1.3)
pt3dadd(427.5, -16, -19, 1.5)
pt3dadd(429, -17.5, -17, 2)
pt3dadd(430, -19, -18, 2.4)
pt3dadd(433, -21, -18, 2.6)
pt3dadd(435, -23, -19, 3.2)
pt3dadd(438, -23.5, -18, 3.1)
pt3dadd(442, -25.5, -18, 1.8)
pt3dadd(445, -26, -18.5, 1.8)
pt3dadd(446.5, -28, -18.5, 1.8)
pt3dadd(448.5, -28, -18.5, 1.5)
pt3dadd(450, -28, -18.5, 1.4)
pt3dadd(452, -28, -19.5, 1.2)
pt3dadd(456, -27, -19.5, 0.7)
pt3dadd(459, -28, -19.5, 0.7)
pt3dadd(460.5, -29, -18.5, 1.8)
pt3dadd(461.5, -30, -19.5, 3.2)
pt3dadd(463, -30, -19.5, 2.9)
pt3dadd(466.5, -33.5, -20, 2)
pt3dadd(469, -33.5, -20, 0.5)
pt3dadd(471.5, -35, -20.5, 0.5)
pt3dadd(473, -35, -20, 2.1)
pt3dadd(475.5, -37.5, -20, 2.6)
pt3dadd(478.5, -37.5, -20, 2.8)
pt3dadd(480.5, -38, -20, 3.8)
pt3dadd(483.5, -39.5, -20, 2.5)
pt3dadd(485, -40, -20, 1.6)
pt3dadd(486.5, -40, -20, 0.8)
pt3dadd(490, -41.5, -20, 0.7)
pt3dadd(493, -41.5, -20, 0.9)
pt3dadd(496, -43, -20, 0.9)
pt3dadd(497, -43, -20.5, 0.9)
pt3dadd(497, -44, -19.5, 0.6)
pt3dadd(499, -44, -20, 1.9)
pt3dadd(503.5, -45, -20, 1.1)
pt3dadd(504, -46, -19.5, 1.2)
pt3dadd(507.5, -46.5, -19.5, 1.2)
pt3dadd(510, -46.5, -20.5, 0.8)
pt3dadd(511, -47, -21.5, 1.3)
pt3dadd(512.5, -47.5, -20, 2.3)
pt3dadd(514, -49, -21.5, 3.1)
pt3dadd(516, -50, -20, 1.6)
pt3dadd(518, -49, -21.5, 1.8)
pt3dadd(520, -49, -22, 1.5)
pt3dadd(523, -49, -22.5, 1.2)
pt3dadd(525.5, -49, -22.5, 1)
pt3dadd(528, -49, -22.5, 1.3)
pt3dadd(529, -49, -22.5, 2)
pt3dadd(531.5, -48.5, -22.5, 2.2)
pt3dadd(533.5, -48, -22.5, 1.6)
pt3dadd(535.5, -47, -22.5, 0.4)
pt3dadd(539.5, -44, -22.5, 0.4)
pt3dadd(541.5, -44, -22.5, 1.4)
pt3dadd(542, -42.5, -22.5, 2.1)
pt3dadd(543.5, -41.5, -22.5, 2.5)
pt3dadd(546, -41, -22.5, 2)
pt3dadd(546.5, -39, -22.5, 0.9)
pt3dadd(548, -38.5, -23.5, 0.5)
pt3dadd(550.5, -35.5, -23.5, 0.7)
}
}
proc shape3d_64() {
dend[207] { pt3dadd(553.5, -33, -23.5, 0.7)
pt3dadd(555.5, -32, -23.5, 1.2)
pt3dadd(558.5, -31.5, -23.5, 1.3)
pt3dadd(560, -29, -24, 1.2)
pt3dadd(561, -29, -24, 1.2)
pt3dadd(562, -27.5, -24, 0.7)
pt3dadd(564.5, -26, -24, 0.7)
pt3dadd(567, -25, -23.5, 0.7)
pt3dadd(569, -25.5, -23.5, 1.8)
pt3dadd(571.5, -25, -23.5, 2.4)
pt3dadd(575.5, -24.5, -24, 1.6)
pt3dadd(578.5, -24, -24, 1.1)
pt3dadd(582, -22.5, -24, 1.1)
pt3dadd(585, -21.5, -24, 1.1)
pt3dadd(586.5, -20, -24, 1.8)
pt3dadd(590, -19.5, -23.5, 2.5)
pt3dadd(594, -19.5, -23.5, 1.6)
pt3dadd(595.5, -19, -24.5, 0.8)
pt3dadd(598, -18, -23.5, 0.8)
pt3dadd(601.5, -18, -23.5, 1.1)
pt3dadd(605, -18, -23.5, 1.6)
pt3dadd(607.5, -18, -23.5, 1.4)
pt3dadd(609, -18.5, -23.5, 1.2)
pt3dadd(611, -19.5, -24, 1)
pt3dadd(612.5, -18.5, -24, 0.7)
pt3dadd(615, -17, -23.5, 0.7)
pt3dadd(621, -14.5, -23.5, 0.7)
pt3dadd(624, -14, -23.5, 0.6)
pt3dadd(626.5, -14, -23.5, 0.6)
pt3dadd(627.5, -14, -23.5, 0.6)
pt3dadd(629.5, -13.5, -23.5, 0.6)
pt3dadd(630, -12.5, -23.5, 0.6)
pt3dadd(630.5, -11, -23.5, 0.6)
pt3dadd(631, -12, -23.5, 0.9)
pt3dadd(633, -12, -23.5, 0.9)
pt3dadd(634.5, -11, -30, 1.3)
pt3dadd(635.5, -11, -30, 1.3)
pt3dadd(635.5, -11, -23.5, 1.9)
pt3dadd(636.5, -11, -30, 2.8)
pt3dadd(637.5, -11, -23.5, 3.6)
pt3dadd(638.5, -11, -23.5, 3)
pt3dadd(639, -10, -23.5, 2.3)
pt3dadd(640, -10, -23.5, 1.6)
pt3dadd(641, -10, -30, 1.2)
pt3dadd(641.5, -10, -30, 0.9)
pt3dadd(643, -10, -30, 0.9)
pt3dadd(644, -10, -30, 0.9)
pt3dadd(645.5, -9.5, -30, 1.3)
pt3dadd(647, -8.5, -30, 1.2)
pt3dadd(648, -9, -30, 1.1)
pt3dadd(648.5, -10, -30, 1.3)
pt3dadd(649.5, -10, -30, 1.5)
pt3dadd(651.5, -8.5, -30, 2)
pt3dadd(653, -8.5, -30, 1.3)
pt3dadd(653.5, -8.5, -30, 1.1)
pt3dadd(655, -8.5, -30, 1)
pt3dadd(656, -8.5, -30, 1)
pt3dadd(658, -8, -30, 1.7)
pt3dadd(658.5, -8, -30, 2.4)
pt3dadd(660.5, -7, -36, 2.7)
pt3dadd(661.5, -7, -36, 2.3)
pt3dadd(664, -7, -36, 1.4)
pt3dadd(666.5, -7, -36, 0.9)
pt3dadd(668.5, -7, -36, 0.9)
pt3dadd(669, -7, -36, 1.2)
pt3dadd(670, -7, -36, 1.3)
pt3dadd(671.5, -7, -36, 1.8)
pt3dadd(674, -5.5, -36, 1.1)
pt3dadd(674.5, -4.5, -36, 1)
pt3dadd(676, -4.5, -36, 1.7)
pt3dadd(678, -4.5, -36, 2.6)
pt3dadd(679.5, -4.5, -36, 1.7)
pt3dadd(682, -4.5, -36, 1.2)
pt3dadd(683.5, -4.5, -36, 1.2)
pt3dadd(684, -5, -36, 0.8)
pt3dadd(685.5, -5, -36, 0.7)
pt3dadd(686.5, -5.5, -36, 1.1)
pt3dadd(688.5, -6, -36, 1.4)
pt3dadd(689, -6, -36, 1.4)
pt3dadd(689.5, -6.5, -42.5, 1.3)
pt3dadd(691, -7, -42.5, 0.8)
pt3dadd(693, -7, -36, 1)
pt3dadd(693.5, -7, -36, 1.4)
pt3dadd(695, -7.5, -36, 1.8)
pt3dadd(696.5, -7.5, -36, 2.5)
pt3dadd(698.5, -7, -36, 2.4)
pt3dadd(701.5, -7, -36, 1)
pt3dadd(703, -7, -36, 0.7)
pt3dadd(703.5, -8, -36, 1.5)
pt3dadd(705.5, -8.5, -36, 1.6)
pt3dadd(707.5, -10, -36, 1.2)
pt3dadd(710, -11, -36, 1)
pt3dadd(710.5, -12, -36, 1)
pt3dadd(711.5, -12, -36, 1.5)
pt3dadd(714, -13, -36, 2.1)
pt3dadd(714.5, -14, -36, 2.5)
pt3dadd(716, -14, -36, 1.6)
pt3dadd(717, -15, -36, 1.1)
pt3dadd(718, -15.5, -36, 0.5)
pt3dadd(719.5, -15.5, -36, 0.5)
pt3dadd(721, -15.5, -36, 0.4)
pt3dadd(723, -15.5, -36, 1.1)
pt3dadd(724, -16, -36, 1.7)
pt3dadd(726, -17.5, -36, 2.1)
pt3dadd(728, -17.5, -36, 2.4)
pt3dadd(730, -18, -36, 1.9)
pt3dadd(731, -18, -36, 1.5)
pt3dadd(733, -18, -36, 1.1)
pt3dadd(735, -18, -36, 1.1)
pt3dadd(737, -18, -36, 1.1)
pt3dadd(739, -18, -36, 1.1)
pt3dadd(740.5, -18.5, -42.5, 1.4)
pt3dadd(741.5, -18, -42.5, 1.7)
pt3dadd(743, -18, -42.5, 2.3)
pt3dadd(744.5, -19.5, -42.5, 1.4)
pt3dadd(748, -19.5, -42.5, 1.1)
pt3dadd(749.5, -19.5, -42.5, 0.9)
pt3dadd(751, -19.5, -42.5, 1.1)
pt3dadd(753.5, -19.5, -42.5, 1.2)
pt3dadd(755, -18.5, -42.5, 1.7)
pt3dadd(756, -18.5, -42.5, 2.6)
pt3dadd(757.5, -18, -42.5, 3.2)
pt3dadd(758.5, -18, -42.5, 2.4)
pt3dadd(761, -18.5, -36, 1.6)
pt3dadd(762, -18.5, -36, 1.2)
pt3dadd(763.5, -19, -36, 1.2)
pt3dadd(766, -19, -36, 0.9)
pt3dadd(767.5, -18.5, -36, 0.6)
pt3dadd(769, -18.5, -36, 1.6)
pt3dadd(770.5, -18.5, -36, 2.1)
pt3dadd(771.5, -18.5, -36, 2.8)
pt3dadd(773, -18.5, -36, 1.8)
pt3dadd(774.5, -18.5, -36, 1.1)
pt3dadd(775, -18, -36, 1)
pt3dadd(776.5, -18, -36, 1)
pt3dadd(777.5, -17.5, -30, 1.5)
pt3dadd(779.5, -16.5, -30, 2.3)
pt3dadd(782, -16.5, -30, 1.2)
pt3dadd(783, -16.5, -30, 0.3)
pt3dadd(783, -15.5, -30, 0.3)
pt3dadd(784.5, -15.5, -30, 0.5)
pt3dadd(786, -15.5, -30, 1.4)
pt3dadd(787.5, -15.5, -36, 2)
pt3dadd(790, -15.5, -36, 0.9)
pt3dadd(792, -15.5, -36, 1)
pt3dadd(795, -15.5, -36, 1.1)
pt3dadd(797, -15.5, -36, 1.3)
pt3dadd(799.5, -15.5, -36, 2.1)
pt3dadd(801, -16, -36, 2.3)
pt3dadd(802.5, -16, -36, 2.1)
pt3dadd(806, -15, -36, 1.3)
pt3dadd(807.5, -14.5, -36, 1.3)
pt3dadd(809, -13, -36, 0.9)
pt3dadd(810.5, -13, -36, 1.4)
pt3dadd(812.5, -11.5, -30, 2)
pt3dadd(814.5, -11, -36, 3.2)
pt3dadd(816, -11, -36, 2.2)
pt3dadd(819, -10.5, -36, 1.5)
pt3dadd(821, -9.5, -36, 0.7)
pt3dadd(823, -8.5, -30, 0.7)
pt3dadd(824.5, -9, -36, 1.3)
pt3dadd(825, -10, -36, 3.3)
pt3dadd(827, -11, -30, 1.3)
pt3dadd(828, -12, -30, 1.3)
pt3dadd(829.5, -12, -30, 2.2)
pt3dadd(831.5, -13.5, -30, 3.5)
pt3dadd(832, -14.5, -30, 2.1)
pt3dadd(833, -15, -30, 1.3)
pt3dadd(833.5, -16.5, -30, 0.9)
pt3dadd(833.5, -18, -30, 0.5)
pt3dadd(833.5, -19.5, -30, 0.5)
pt3dadd(833.5, -21, -30, 1.9)
pt3dadd(833.5, -23.5, -30, 0.6)
pt3dadd(833, -26, -30, 0.6)
pt3dadd(832.5, -26, -30, 0.6)
pt3dadd(832, -27.5, -30, 0.6)
pt3dadd(833.5, -27.5, -30, 1.6)
pt3dadd(833.5, -28.5, -30, 2.7)
pt3dadd(834.5, -29.5, -30, 1)
pt3dadd(835.5, -30, -30, 0.4)
pt3dadd(837.5, -30, -30, 1.6)
pt3dadd(838.5, -30, -30, 2.4)
pt3dadd(839.5, -31.5, -30, 1.6)
pt3dadd(841, -33.5, -30, 1.2)
pt3dadd(841.5, -33.5, -30, 0.9)
pt3dadd(843.5, -34.5, -30, 1.1)
pt3dadd(845, -34.5, -30, 1.2)
pt3dadd(848, -35.5, -30, 0.9)
pt3dadd(849.5, -35.5, -30, 0.7)
pt3dadd(851.5, -35.5, -30, 1.1)
pt3dadd(854, -36.5, -30, 1.6)
pt3dadd(855, -38, -30, 1)
pt3dadd(856.5, -40, -30, 0.8)
pt3dadd(857, -41.5, -30, 0.7)
pt3dadd(858, -42, -30, 0.7)
pt3dadd(858.5, -43, -30, 0.7)
pt3dadd(858.5, -44, -23.5, 1.2)
pt3dadd(859.5, -46, -30, 2.2)
pt3dadd(860, -47.5, -30, 1.3)
pt3dadd(860.5, -47.5, -30, 0.6)
}
}
proc shape3d_65() {
dend[207] { pt3dadd(864.5, -49.5, -30, 0.6)
pt3dadd(867, -49.5, -30, 0.8)
pt3dadd(869.5, -50, -30, 1.4)
pt3dadd(871.5, -50, -30, 1.7)
pt3dadd(873.5, -50, -30, 2.4)
pt3dadd(874.5, -50, -30, 3.3)
pt3dadd(878, -49.5, -30, 0.9)
pt3dadd(879, -49.5, -30, 1)
pt3dadd(881.5, -49.5, -30, 2.2)
pt3dadd(883, -50, -30, 0.9)
pt3dadd(884, -51.5, -30, 0.6)
pt3dadd(885, -51.5, -30, 0.5)
pt3dadd(887.5, -51.5, -30, 0.5)
pt3dadd(889, -51.5, -30, 1.3)
pt3dadd(890.5, -51.5, -30, 2.3)
pt3dadd(892.5, -51.5, -30, 1.3)
pt3dadd(894, -51.5, -30, 0.9)
pt3dadd(895.5, -51.5, -30, 0.8)
pt3dadd(898, -52, -30, 0.8)
pt3dadd(900, -52, -30, 0.8)
pt3dadd(902.5, -52.5, -30, 1.3)
pt3dadd(904.5, -53.5, -23.5, 1.9)
pt3dadd(906.5, -55.5, -30, 1.1)
pt3dadd(908.5, -54.5, -30, 0.2)
pt3dadd(911.5, -54.5, -30, 0.3)
pt3dadd(915, -54.5, -30, 0.3)
pt3dadd(918, -53.5, -23.5, 0.9)
pt3dadd(919.5, -53.5, -23.5, 2.4)
pt3dadd(921, -53.5, -23.5, 0.8)
pt3dadd(923.5, -53.5, -23.5, 0.1)
pt3dadd(925, -53.5, -23.5, 0.9)
pt3dadd(925.5, -53.5, -23.5, 1.6)
pt3dadd(927, -53.5, -23.5, 2.4)
pt3dadd(929, -53.5, -23.5, 1.1)
pt3dadd(929.5, -53.5, -23.5, 0.4)
pt3dadd(932, -53.5, -23.5, 0.2)
pt3dadd(933.5, -53.5, -23.5, 0.2)
pt3dadd(935, -55.5, -30, 0.2)
pt3dadd(937, -57, -30, 0.4)
pt3dadd(938, -57, -30, 0.8)
pt3dadd(940.5, -57, -30, 0.7)
pt3dadd(942, -57.5, -30, 1.5)
pt3dadd(944, -57.5, -30, 2.7)
pt3dadd(945.5, -57.5, -30, 1)
pt3dadd(946, -57.5, -30, 0.3)
pt3dadd(948, -58.5, -30, 0.3)
pt3dadd(950, -60.5, -30, 0.3)
pt3dadd(950.5, -59.5, -30, 0.3)
pt3dadd(953, -59.5, -30, 0.9)
pt3dadd(954.5, -59.5, -30, 0.9)
pt3dadd(957, -59.5, -30, 0.7)
pt3dadd(958, -60, -30, 0.1)
pt3dadd(960, -60, -30, 0.1)
pt3dadd(963, -60, -30, 0.1)
pt3dadd(964.5, -58.5, -30, 0.1)
pt3dadd(966, -57.5, -30, 0.2)
pt3dadd(967, -57, -36, 0.7)
pt3dadd(968, -56, -30, 0.7)
pt3dadd(970, -56, -30, 0.2)
pt3dadd(972.5, -56, -36, 0.2)
pt3dadd(972.5, -55.5, -30, 0.8)
pt3dadd(973.5, -54, -36, 1.3)
pt3dadd(976.5, -54, -36, 0.8)
pt3dadd(977.5, -54, -36, 0.2)
pt3dadd(979.5, -53, -30, 0.2)
pt3dadd(981.5, -52, -36, 0.8)
pt3dadd(983.5, -51, -30, 1.8)
pt3dadd(985.5, -51, -36, 1.5)
pt3dadd(986.5, -51, -36, 0.9)
pt3dadd(987.5, -51, -36, 0.6)
pt3dadd(989, -51.5, -36, 0.6)
pt3dadd(992.5, -51.5, -36, 0.6)
pt3dadd(996, -52, -36, 0.1)
pt3dadd(998, -52, -36, 0.1)
pt3dadd(999.5, -52, -36, 0.1)
pt3dadd(1000.5, -51.5, -36, 0.1)
pt3dadd(1002, -50.5, -36, 0.1)
pt3dadd(1005, -50.5, -36, 0.9)
pt3dadd(1006.5, -50.5, -36, 1.2)
pt3dadd(1007.5, -50, -36, 0.7)
pt3dadd(1009.5, -48.5, -42.5, 1)
pt3dadd(1011, -48.5, -42.5, 1.2)
pt3dadd(1013.5, -48.5, -42.5, 1.2)
pt3dadd(1015.5, -49, -42.5, 0.3)
pt3dadd(1018.5, -49, -42.5, 0.3)
pt3dadd(1020, -47.5, -42.5, 1.2)
pt3dadd(1021.5, -46, -42.5, 2)
pt3dadd(1024.5, -46, -42.5, 0.4)
pt3dadd(1026.5, -47, -42.5, 0.3)
pt3dadd(1029.5, -47.5, -42.5, 0.3)
pt3dadd(1030, -48.5, -42.5, 0.3)
pt3dadd(1031.5, -46.5, -42.5, 0.3)
pt3dadd(1033, -49, -48.5, 0.3)
pt3dadd(1035, -51, -42.5, 0.3)
pt3dadd(1037.5, -51, -42.5, 0.8)
pt3dadd(1039.5, -51, -42.5, 0.8)
pt3dadd(1040, -51, -42.5, 0.1)
pt3dadd(1042, -52.5, -42.5, 0.1)
pt3dadd(1043.5, -53.5, -42.5, 1.1)
pt3dadd(1045, -53.5, -42.5, 1.4)
pt3dadd(1046, -53.5, -42.5, 0.7)
pt3dadd(1046, -55.5, -42.5, 0.7)
pt3dadd(1048, -55.5, -42.5, 0.3)
pt3dadd(1048, -54.5, -36, 0.3)
pt3dadd(1047.5, -52, -30, 1.9)
pt3dadd(1048.5, -52, -36, 0.1)
pt3dadd(1049.5, -51, -36, 0.1)
pt3dadd(1051, -50, -36, 0.6)
pt3dadd(1052, -48.5, -30, 1.4)
pt3dadd(1053.5, -50, -36, 0.9)
pt3dadd(1055, -50.5, -36, 0.1)
pt3dadd(1056, -50.5, -36, 0.1)
pt3dadd(1056, -49, -36, 0.1)
pt3dadd(1055.5, -48.5, -30, 0.4)
pt3dadd(1055.5, -47.5, -30, 0.9)
pt3dadd(1056, -47, -30, 2)
pt3dadd(1056.5, -47.5, -30, 0.7)
pt3dadd(1058, -47.5, -30, 0.7)
pt3dadd(1058.5, -48.5, -30, 1)
pt3dadd(1060.5, -48.5, -30, 1.5)
pt3dadd(1062.5, -49, -30, 2.2)
pt3dadd(1064.5, -48.5, -30, 0.8)
pt3dadd(1066, -50, -30, 0.1)
pt3dadd(1067.5, -50, -23.5, 0.3)
pt3dadd(1070, -50, -23.5, 0.3)
pt3dadd(1071, -50.5, -30, 0.3)
pt3dadd(1073.5, -49.5, -30, 0.2)
pt3dadd(1077, -49, -30, 0.2)
pt3dadd(1080, -47, -30, 0.2)
pt3dadd(1082, -44, -30, 0.2)
pt3dadd(1084.5, -43.5, -30, 0.2)
pt3dadd(1088.5, -42.5, -30, 0.2)
pt3dadd(1090.5, -42.5, -30, 0.2)
pt3dadd(1092, -42.5, -30, 0.2)
pt3dadd(1094.5, -41, -30, 1.1)
pt3dadd(1095.5, -41, -30, 1.5)
pt3dadd(1096.5, -41.5, -30, 1.2)
pt3dadd(1098, -41.5, -30, 0.1)
pt3dadd(1101.5, -41.5, -30, 0.1)
pt3dadd(1102.5, -41.5, -30, 1.2)
pt3dadd(1104.5, -41.5, -30, 0.2)
pt3dadd(1105.5, -42.5, -23.5, 0.2)
pt3dadd(1107.5, -42.5, -23.5, 0.2)
pt3dadd(1110, -42.5, -23.5, 1)
pt3dadd(1112, -43, -23.5, 0.4)
pt3dadd(1112.5, -45, -23.5, 0.4)
pt3dadd(1113.5, -46, -23.5, 0.4)
pt3dadd(1115, -46, -23.5, 2.1)
pt3dadd(1116.5, -46.5, -23.5, 0.2)
pt3dadd(1118, -46, -23.5, 0.2)
pt3dadd(1119.5, -48, -23.5, 0.1)
}
dend[208] {pt3dclear()
pt3dadd(305, 78.5, -8.5, 6.1)
pt3dadd(310, 80, -9.5, 2.2)
pt3dadd(313.5, 80, -9.5, 2.3)
pt3dadd(315, 80, -5.5, 2.7)
pt3dadd(316.5, 78, -3, 2.7)
pt3dadd(318, 73.5, -4, 2.7)
pt3dadd(318, 77.5, -5, 1.9)
pt3dadd(320.5, 77.5, -5, 2.9)
pt3dadd(321.5, 77.5, -5, 2.9)
pt3dadd(323.5, 77.5, -5.5, 1.8)
pt3dadd(325.5, 77.5, -5.5, 1.3)
pt3dadd(326, 75.5, -5.5, 1.3)
pt3dadd(327.5, 76, -5.5, 1.7)
pt3dadd(330, 76, -6.5, 1.8)
pt3dadd(330.5, 74.5, -6.5, 1.5)
pt3dadd(335, 74.5, -2, 1.5)
pt3dadd(339.5, 69, 0.5, 1.4)
pt3dadd(341.5, 69, 0.5, 1.7)
pt3dadd(344, 69, 0.5, 1.5)
pt3dadd(345.5, 68.5, 0.5, 1.4)
pt3dadd(348.5, 69.5, 0.5, 0.9)
pt3dadd(350, 69.5, 3.5, 1.1)
pt3dadd(352.5, 69.5, 3.5, 1.2)
pt3dadd(353.5, 69.5, 3.5, 2.3)
pt3dadd(356, 69.5, 3.5, 2.9)
pt3dadd(357, 69, 0.5, 3.1)
pt3dadd(360, 68, -2, 2.2)
pt3dadd(361, 68, 6, 2.2)
pt3dadd(363.5, 68, 9, 1.1)
pt3dadd(364.5, 67.5, 9, 0.8)
pt3dadd(366.5, 67.5, 9, 1.6)
pt3dadd(368.5, 67.5, 9, 2.4)
pt3dadd(370.5, 68, 9, 2.7)
pt3dadd(373, 68, 9, 2.7)
pt3dadd(374.5, 67, 9, 2.3)
pt3dadd(377, 64.5, 9, 2.4)
pt3dadd(379, 63, 9, 3.2)
pt3dadd(381.5, 62.5, 17.5, 2)
pt3dadd(384, 62.5, 17.5, 1.5)
pt3dadd(387, 62.5, 11.5, 1.8)
pt3dadd(390.5, 62.5, 11.5, 2)
pt3dadd(392.5, 61.5, 20, 2)
pt3dadd(394.5, 59, 25.5, 2.1)
pt3dadd(397, 58.5, 25.5, 1.6)
pt3dadd(399.5, 57, 25.5, 1.8)
pt3dadd(402, 56, 25.5, 2.1)
pt3dadd(404.5, 55, 20, 2.1)
pt3dadd(406.5, 54, 20, 0.9)
pt3dadd(409.5, 54, 18.5, 2.2)
}
}
proc shape3d_66() {
dend[208] { pt3dadd(410.5, 51.5, 20, 0.6)
pt3dadd(413.5, 51.5, 18.5, 0.6)
pt3dadd(415, 51.5, 18.5, 1.5)
pt3dadd(417, 50.5, 18.5, 2.5)
pt3dadd(419, 50, 18.5, 1.8)
pt3dadd(420.5, 50, 18.5, 0.9)
pt3dadd(422, 50, 18.5, 0.9)
pt3dadd(423.5, 50, 17.5, 1.6)
pt3dadd(425, 50, 17.5, 2.5)
pt3dadd(426, 50, 17.5, 1.4)
pt3dadd(429.5, 49.5, 17.5, 1)
pt3dadd(431, 49.5, 17.5, 2.1)
pt3dadd(433, 49.5, 17.5, 3.8)
pt3dadd(434, 49.5, 17.5, 1.5)
pt3dadd(435, 50, 21.5, 1.2)
pt3dadd(436, 50, 21.5, 1.2)
pt3dadd(437.5, 50, 21.5, 1.2)
pt3dadd(438.5, 49.5, 21.5, 2)
pt3dadd(439.5, 49, 21.5, 2.8)
pt3dadd(440.5, 46.5, 21.5, 2.8)
pt3dadd(442, 46.5, 20, 2.5)
pt3dadd(443.5, 45, 24.5, 1.5)
pt3dadd(445.5, 43, 23, 1.1)
pt3dadd(446.5, 43, 23, 1.2)
pt3dadd(449, 42, 23, 1.6)
pt3dadd(451, 41.5, 23, 1.8)
pt3dadd(454, 40.5, 23, 2.8)
pt3dadd(457, 40, 23, 3.3)
pt3dadd(458, 38, 26, 2.1)
pt3dadd(459.5, 36.5, 23, 1.6)
pt3dadd(459.5, 36, 23, 0.9)
pt3dadd(462.5, 33.5, 23, 1.6)
pt3dadd(462.5, 32.5, 23, 1.6)
pt3dadd(463.5, 31, 23, 1.6)
pt3dadd(466, 29.5, 23, 1.6)
pt3dadd(466, 27.5, 23, 2.4)
pt3dadd(467.5, 25.5, 21.5, 1.9)
pt3dadd(468, 24, 21.5, 1.1)
pt3dadd(470.5, 24, 21.5, 1.1)
pt3dadd(472, 24, 21.5, 2.4)
pt3dadd(473, 23.5, 20, 2.5)
pt3dadd(474.5, 22, 20, 2.5)
pt3dadd(476, 20, 20, 2.5)
pt3dadd(476, 19, 20, 2.4)
pt3dadd(478, 17.5, 21.5, 0.9)
pt3dadd(481, 16.5, 23, 0.9)
pt3dadd(482.5, 15, 23, 0.9)
pt3dadd(484, 14.5, 21.5, 1.6)
pt3dadd(485, 12.5, 21.5, 2.5)
pt3dadd(487, 10, 20, 1.7)
pt3dadd(489.5, 8.5, 20, 1.4)
pt3dadd(492, 6.5, 18.5, 0.7)
pt3dadd(494.5, 3.5, 21.5, 0.9)
pt3dadd(498, 3.5, 20, 0.7)
pt3dadd(500.5, 2.5, 18.5, 0.8)
pt3dadd(502.5, 2, 18.5, 0.9)
pt3dadd(504, 0, 30, 0.7)
pt3dadd(507, 0, 30, 0.5)
pt3dadd(510.5, -0.5, 30, 0.5)
pt3dadd(510.5, -2, 30, 0.6)
pt3dadd(516, -2, 28.5, 0.9)
pt3dadd(518.5, -0.5, 30, 0.9)
pt3dadd(520, -2, 30, 0.8)
pt3dadd(524.5, -4.5, 30, 0.7)
pt3dadd(524.5, -5.5, 28.5, 0.7)
pt3dadd(527, -5.5, 28.5, 1.6)
pt3dadd(530, -8, 28.5, 0.6)
pt3dadd(532, -9, 28.5, 0.6)
pt3dadd(535, -11, 28.5, 1.4)
pt3dadd(536.5, -11, 27.5, 0.6)
pt3dadd(541, -11, 27.5, 0.6)
pt3dadd(545, -12, 27.5, 1.7)
pt3dadd(547.5, -12.5, 24.5, 0.7)
pt3dadd(549.5, -15.5, 26, 0.7)
pt3dadd(554, -15.5, 24.5, 0.7)
pt3dadd(556, -15.5, 24.5, 0.7)
pt3dadd(558, -15.5, 24.5, 2)
pt3dadd(559.5, -15, 24.5, 2.7)
pt3dadd(561, -13, 26, 1.9)
pt3dadd(562, -12.5, 26, 1)
pt3dadd(562.5, -12, 26, 0.8)
pt3dadd(563, -10, 28.5, 0.8)
pt3dadd(564.5, -7, 30, 0.8)
pt3dadd(566.5, -4, 31.5, 1.1)
pt3dadd(568.5, -4, 31.5, 1.1)
pt3dadd(571, -3, 31.5, 1.8)
pt3dadd(572.5, -1, 31.5, 2.8)
pt3dadd(574, 1, 31.5, 4.6)
pt3dadd(577, 2, 31.5, 1.3)
pt3dadd(578, 4.5, 31.5, 0.8)
pt3dadd(580.5, 6.5, 31.5, 1.1)
pt3dadd(582, 7, 31.5, 2.1)
pt3dadd(582.5, 9.5, 31.5, 2.7)
pt3dadd(584.5, 11, 31.5, 1.3)
pt3dadd(586.5, 11.5, 28.5, 0.9)
pt3dadd(590, 13.5, 30, 0.9)
pt3dadd(590.5, 14, 30, 1.7)
pt3dadd(592.5, 14.5, 30, 2.7)
pt3dadd(593.5, 16.5, 30, 1.4)
pt3dadd(594.5, 17.5, 28.5, 0.8)
pt3dadd(598, 19.5, 28.5, 0.8)
pt3dadd(598.5, 19.5, 28.5, 1.7)
pt3dadd(601, 21, 28.5, 0.9)
pt3dadd(602, 22.5, 28.5, 0.9)
pt3dadd(603.5, 23, 28.5, 0.9)
pt3dadd(606, 25, 30, 1.9)
pt3dadd(607, 25.5, 30, 2.6)
pt3dadd(609, 27, 30, 1.5)
pt3dadd(610.5, 27, 30, 1.4)
pt3dadd(613, 28, 30, 1.4)
pt3dadd(614, 30.5, 31.5, 2.3)
pt3dadd(616, 33, 31.5, 1.5)
pt3dadd(617.5, 34.5, 31.5, 1)
pt3dadd(620, 35, 31.5, 0.8)
pt3dadd(622, 36, 31.5, 0.8)
pt3dadd(624, 36.5, 31.5, 2.2)
pt3dadd(626, 37.5, 31.5, 4.3)
pt3dadd(628, 40.5, 31.5, 1.3)
pt3dadd(630, 40.5, 30, 0.3)
pt3dadd(635.5, 40.5, 30, 0.3)
pt3dadd(638.5, 40.5, 30, 0.3)
pt3dadd(643, 44, 30, 0.3)
pt3dadd(645.5, 44, 30, 0.3)
pt3dadd(647.5, 44.5, 31.5, 0.7)
pt3dadd(649, 44.5, 31.5, 0.7)
pt3dadd(651, 45, 31.5, 0.7)
pt3dadd(653, 45.5, 31.5, 0.9)
pt3dadd(653, 47.5, 31.5, 0.9)
pt3dadd(655.5, 47.5, 31.5, 0.9)
pt3dadd(658.5, 49.5, 31.5, 0.9)
pt3dadd(662, 50, 31.5, 0.9)
pt3dadd(664, 50.5, 31.5, 0.9)
pt3dadd(666.5, 53, 31.5, 0.9)
pt3dadd(668.5, 53, 31.5, 0.9)
pt3dadd(670.5, 54, 30, 0.1)
pt3dadd(674, 54, 30, 0.1)
pt3dadd(679, 55.5, 28.5, 0.1)
pt3dadd(681.5, 56, 31.5, 1.6)
pt3dadd(684.5, 56, 31.5, 0.2)
pt3dadd(687.5, 58, 31.5, 0.2)
pt3dadd(689.5, 58, 31.5, 0.2)
pt3dadd(690.5, 58, 31.5, 1.3)
pt3dadd(694, 58, 31.5, 0.2)
pt3dadd(696.5, 59, 31.5, 0.2)
pt3dadd(697, 61, 36, 2.8)
pt3dadd(700, 63.5, 33, 0.9)
pt3dadd(701, 64, 33, 0.9)
pt3dadd(703, 65.5, 34.5, 0.9)
pt3dadd(703, 66, 37.5, 3.2)
pt3dadd(702.5, 70, 37.5, 1.4)
pt3dadd(702, 72, 37.5, 1)
pt3dadd(699, 72, 37.5, 1.4)
pt3dadd(697, 72, 38.5, 1.4)
pt3dadd(694.5, 72.5, 43, 0.9)
pt3dadd(693, 72.5, 44.5, 1.4)
pt3dadd(691.5, 72.5, 44.5, 2.1)
pt3dadd(688.5, 73, 47.5, 1.1)
pt3dadd(687.5, 73, 47.5, 1.1)
pt3dadd(684.5, 76.5, 44, 0.8)
pt3dadd(681, 77, 44, 0.8)
pt3dadd(678.5, 79.5, 44, 0.8)
pt3dadd(678.5, 80.5, 44, 0.8)
pt3dadd(677.5, 82, 51, 1.1)
pt3dadd(675.5, 82, 51, 1.2)
pt3dadd(673, 82, 53, 0.6)
pt3dadd(672, 83, 53, 0.6)
pt3dadd(670, 83, 54.5, 0.6)
pt3dadd(668.5, 83, 56.5, 1.4)
pt3dadd(667.5, 83, 56.5, 0.9)
pt3dadd(667, 85, 58, 0.6)
pt3dadd(666, 86, 58, 0.6)
pt3dadd(665, 88, 54.5, 1)
pt3dadd(663, 88, 56.5, 1.2)
pt3dadd(662, 90, 56.5, 0.7)
pt3dadd(662, 91, 56.5, 0.7)
pt3dadd(661, 92.5, 56.5, 0.7)
pt3dadd(661.5, 94, 56.5, 0.7)
pt3dadd(662, 95, 56.5, 0.7)
pt3dadd(660.5, 96.5, 58, 2)
pt3dadd(658.5, 96.5, 58, 1.2)
pt3dadd(656.5, 98, 59.5, 0.8)
pt3dadd(656.5, 99, 61, 1.4)
pt3dadd(657.5, 99.5, 65.5, 1.2)
pt3dadd(658.5, 101, 65.5, 1.7)
pt3dadd(660, 102.5, 65.5, 1.7)
pt3dadd(661, 103.5, 65.5, 2)
pt3dadd(663.5, 106, 67, 0.1)
pt3dadd(662.5, 107.5, 67, 0.1)
pt3dadd(661, 107.5, 67, 0.1)
pt3dadd(660, 104.5, 68.5, 0.1)
pt3dadd(658, 105.5, 68.5, 0.1)
pt3dadd(656.5, 106, 68.5, 0.1)
pt3dadd(655.5, 106, 70, 1.5)
pt3dadd(653.5, 105.5, 71.5, 2.5)
pt3dadd(652.5, 106, 71.5, 1.3)
pt3dadd(651, 107, 71.5, 0.1)
pt3dadd(649.5, 107, 76, 0.1)
pt3dadd(647, 106, 76, 0.1)
pt3dadd(645, 108, 74.5, 0.1)
pt3dadd(645, 109, 74.5, 0.1)
}
}
proc shape3d_67() {
dend[208] { pt3dadd(643.5, 109.5, 73, 1.7)
pt3dadd(642, 110.5, 74.5, 0.9)
pt3dadd(637, 112, 79, 0.7)
pt3dadd(634.5, 114, 79, 0.7)
}
dend[209] {pt3dclear()
pt3dadd(267.5, 85.5, -14, 5.8)
pt3dadd(268.5, 90.5, -9.5, 4.1)
pt3dadd(270, 94, -9.5, 4.2)
pt3dadd(273.5, 97.5, -9.5, 3.7)
pt3dadd(276, 98.5, -10, 3.3)
pt3dadd(278.5, 100.5, -9.5, 4.3)
pt3dadd(280, 102.5, -9.5, 3.6)
pt3dadd(282, 104, -9.5, 3.6)
pt3dadd(284.5, 105, -9.5, 3.1)
pt3dadd(289, 105, -7.5, 3.1)
pt3dadd(291.5, 105, -7.5, 4.3)
pt3dadd(293.5, 106, -7.5, 5.3)
pt3dadd(296.5, 106, -8.5, 4.4)
pt3dadd(302, 106.5, -8.5, 4.9)
pt3dadd(306, 108, -6.5, 4.3)
pt3dadd(310, 109, -5, 4.6)
pt3dadd(313, 111, -5, 4.7)
pt3dadd(316.5, 111, -5, 5.6)
pt3dadd(320, 113, -4, 5.6)
pt3dadd(323.5, 113.5, -4, 4.6)
pt3dadd(328, 114, -4, 4.6)
pt3dadd(331.5, 117, -4, 4.6)
pt3dadd(336.5, 118, -7, 1.9)
pt3dadd(340, 119, -7, 2.5)
pt3dadd(342.5, 120.5, -4, 2.5)
pt3dadd(347, 122.5, 4, 2.5)
pt3dadd(350, 122.5, 4, 2.5)
pt3dadd(353.5, 123, -1.5, 2.2)
pt3dadd(356, 124.5, -1.5, 2.2)
pt3dadd(359, 124.5, -1.5, 2.2)
pt3dadd(361, 124.5, 1.5, 2.8)
pt3dadd(364.5, 126, 1.5, 2.8)
pt3dadd(367, 128.5, 1.5, 4.3)
pt3dadd(371, 129.5, 1.5, 4.3)
pt3dadd(375.5, 131, 1.5, 3.8)
pt3dadd(377.5, 131.5, 1.5, 3.1)
pt3dadd(379, 132.5, 4, 4.4)
pt3dadd(383, 132.5, 7, 3.2)
pt3dadd(387, 132.5, 7, 2.1)
pt3dadd(391, 132.5, 10, 1.9)
pt3dadd(394, 132.5, 10, 2.7)
pt3dadd(396.5, 133, 4, 3.8)
pt3dadd(400.5, 133, 4, 3.8)
pt3dadd(402.5, 133, 4, 3.8)
pt3dadd(406.5, 134.5, 4, 3.8)
}
dend[210] {pt3dclear()
pt3dadd(406.5, 134.5, 4, 3.8)
pt3dadd(409, 132.5, 4, 2.4)
pt3dadd(414.5, 131, 4, 2.4)
pt3dadd(420, 131, 1.5, 2.4)
pt3dadd(423.5, 129.5, 1.5, 2.4)
pt3dadd(425.5, 129.5, -1.5, 2.4)
pt3dadd(429.5, 128, -4, 2.7)
pt3dadd(431.5, 128, -4, 1.4)
pt3dadd(433, 128, -4, 1.3)
pt3dadd(434.5, 126, -7, 1.8)
pt3dadd(436, 125, -7, 2.1)
pt3dadd(438.5, 125, -9.5, 1)
pt3dadd(441, 123.5, -9.5, 0.9)
pt3dadd(442.5, 122, -9.5, 0.9)
pt3dadd(445, 120.5, -15, 0.9)
pt3dadd(450.5, 118, -15.5, 4)
pt3dadd(455, 116, -15.5, 4)
pt3dadd(457.5, 115, -15.5, 3.6)
pt3dadd(460.5, 115, -16.5, 3.8)
pt3dadd(465.5, 115.5, -16.5, 2.9)
pt3dadd(468, 115.5, -15.5, 2.9)
pt3dadd(471, 115.5, -15.5, 3.3)
pt3dadd(474, 113.5, -15.5, 3.7)
pt3dadd(476.5, 113, -16.5, 2.4)
pt3dadd(479.5, 113, -16.5, 2.1)
pt3dadd(483, 113, -15.5, 2.1)
pt3dadd(487, 113, -16.5, 3.3)
pt3dadd(489.5, 115, -16.5, 3.7)
pt3dadd(492.5, 115, -16.5, 3.7)
pt3dadd(495.5, 116, -16.5, 3.6)
pt3dadd(499.5, 115, -17.5, 3.9)
pt3dadd(504, 114, -18.5, 4.1)
pt3dadd(507.5, 113.5, -15.5, 2.8)
pt3dadd(511.5, 113.5, -14, 2.8)
pt3dadd(514.5, 113.5, -12, 2.9)
pt3dadd(517.5, 113, -11, 3.7)
pt3dadd(521.5, 113, -11, 4.4)
pt3dadd(525, 113, -12, 3.8)
pt3dadd(530, 114, -9, 2.7)
pt3dadd(532.5, 114, -10, 2.7)
pt3dadd(535, 113.5, -10, 3.4)
pt3dadd(539.5, 114, -10, 1.8)
pt3dadd(542, 114, -10, 2.6)
pt3dadd(544, 113.5, -10, 3.4)
pt3dadd(548, 112, -10, 4)
pt3dadd(551.5, 110, -10, 2.9)
pt3dadd(553, 108.5, -10, 2.7)
pt3dadd(557, 108.5, -10, 2.2)
pt3dadd(560, 108.5, -10, 2.2)
pt3dadd(562.5, 108.5, -10, 1.6)
pt3dadd(567, 109.5, -10, 1.6)
pt3dadd(569, 109, -10, 2.5)
pt3dadd(571.5, 108.5, -10, 3.1)
pt3dadd(574.5, 109, -10, 3.7)
pt3dadd(577, 110, -10, 3.1)
pt3dadd(579.5, 110, -10, 2.4)
pt3dadd(582, 110, -10, 2.2)
pt3dadd(585, 110, -10, 3.1)
pt3dadd(587.5, 110, -10, 4)
pt3dadd(591, 110.5, -10, 3)
pt3dadd(593.5, 111, -11, 2.3)
pt3dadd(596.5, 111, -11, 2.5)
pt3dadd(600, 111.5, -11, 3.3)
pt3dadd(605.5, 113, -11, 3.4)
pt3dadd(608, 115, -10, 3.1)
pt3dadd(613.5, 114, -5, 3.6)
pt3dadd(617, 114, -7, 3.1)
pt3dadd(621.5, 114, -12, 3.5)
pt3dadd(626, 115, -17.5, 3.4)
pt3dadd(630, 118.5, -17.5, 3.4)
pt3dadd(630.5, 120, -17.5, 2.9)
pt3dadd(633, 122, -17.5, 2.6)
pt3dadd(635, 125, -17.5, 2.6)
pt3dadd(636.5, 126, -17.5, 1.9)
pt3dadd(639.5, 126, -17.5, 1.9)
pt3dadd(644, 126, -17.5, 2)
pt3dadd(646.5, 125, -17.5, 2.2)
pt3dadd(650, 126, -17.5, 1.9)
pt3dadd(652.5, 129, -17.5, 2.3)
pt3dadd(654, 129, -17.5, 2.7)
pt3dadd(658, 129, -17.5, 2.7)
pt3dadd(661, 131.5, -17.5, 2.4)
pt3dadd(663.5, 133, -18.5, 2.6)
pt3dadd(665.5, 135, -19.5, 3.1)
pt3dadd(667.5, 135.5, -20, 3.7)
pt3dadd(672, 135.5, -20, 3.3)
pt3dadd(674.5, 136, -20, 3.2)
pt3dadd(680, 137, -21, 3.1)
pt3dadd(683.5, 138, -20, 2.6)
pt3dadd(687, 138.5, -20, 1.6)
pt3dadd(689, 139, -20, 1.6)
pt3dadd(691.5, 139, -23.5, 1.7)
pt3dadd(694, 140, -21, 2.2)
pt3dadd(696, 140.5, -21, 2.5)
pt3dadd(698.5, 140.5, -21, 2.6)
pt3dadd(701, 140.5, -21, 2.6)
pt3dadd(702.5, 141.5, -23.5, 1.8)
pt3dadd(704.5, 142, -24.5, 2.4)
pt3dadd(706.5, 142, -23.5, 2.8)
pt3dadd(709.5, 142, -23.5, 2.4)
pt3dadd(711.5, 143, -23.5, 2.6)
pt3dadd(714, 143.5, -23.5, 2.3)
pt3dadd(717, 143.5, -23.5, 2.1)
pt3dadd(720, 144.5, -23.5, 1.6)
pt3dadd(721.5, 144.5, -23.5, 1.2)
pt3dadd(722.5, 146, -22.5, 1.7)
pt3dadd(724, 147, -24.5, 2.5)
pt3dadd(725.5, 148, -24.5, 2)
pt3dadd(726.5, 150, -24.5, 1)
pt3dadd(729, 150, -24.5, 1)
pt3dadd(732, 150, -24.5, 1.4)
pt3dadd(735, 150, -24.5, 1.4)
pt3dadd(738, 150, -24.5, 1.4)
pt3dadd(739.5, 150, -24.5, 1.4)
pt3dadd(741, 149, -24.5, 1.4)
pt3dadd(743, 149, -24.5, 2.3)
pt3dadd(746, 149, -24.5, 2.4)
pt3dadd(748, 149, -24.5, 2.9)
pt3dadd(750, 149.5, -24.5, 3.7)
pt3dadd(752, 150, -24.5, 4.3)
pt3dadd(754.5, 150.5, -24.5, 4.3)
pt3dadd(757.5, 150.5, -24.5, 3.1)
pt3dadd(759, 150.5, -24.5, 2.5)
pt3dadd(760.5, 150.5, -24.5, 1.9)
pt3dadd(762.5, 150.5, -24.5, 1.4)
pt3dadd(764, 150.5, -24.5, 1.4)
pt3dadd(766, 150.5, -24.5, 1.6)
pt3dadd(769, 150.5, -25.5, 4)
}
dend[211] {pt3dclear()
pt3dadd(769, 150.5, -25.5, 4)
pt3dadd(771, 150.5, -27, 1.3)
pt3dadd(772, 150.5, -27, 1.5)
pt3dadd(774.5, 152.5, -27, 1.1)
pt3dadd(775.5, 153, -29, 0.8)
pt3dadd(777.5, 154, -28, 0.7)
pt3dadd(781.5, 155, -29, 0.7)
pt3dadd(783.5, 155, -30.5, 0.9)
pt3dadd(785.5, 155, -30.5, 1.2)
pt3dadd(788, 153, -29, 1.5)
pt3dadd(788.5, 155, -30, 1.1)
pt3dadd(789, 157, -30, 1.2)
pt3dadd(789, 158, -31, 2.4)
pt3dadd(790, 158.5, -30.5, 0.8)
pt3dadd(791.5, 158.5, -31, 0.8)
pt3dadd(792, 158.5, -31, 0.9)
pt3dadd(793, 158.5, -31, 1.5)
pt3dadd(794.5, 158.5, -30.5, 2.7)
pt3dadd(797, 158.5, -32, 0.3)
pt3dadd(799, 158, -32, 0.7)
pt3dadd(801, 158, -32.5, 0.7)
pt3dadd(801.5, 159.5, -32.5, 1)
pt3dadd(803, 160, -32, 0.8)
}
}
proc shape3d_68() {
dend[211] { pt3dadd(803.5, 160.5, -32.5, 0.8)
pt3dadd(805, 160.5, -33, 1.1)
pt3dadd(806, 161, -34, 1.4)
pt3dadd(807.5, 162, -32.5, 0.8)
pt3dadd(809, 162.5, -33, 0.8)
pt3dadd(810.5, 162.5, -34, 0.7)
pt3dadd(813, 163, -34.5, 0.7)
pt3dadd(814, 163, -34.5, 0.9)
pt3dadd(816, 163, -34.5, 0.9)
pt3dadd(816.5, 164.5, -34.5, 1.5)
pt3dadd(817.5, 165, -34, 0.9)
pt3dadd(818, 165.5, -34, 1.9)
pt3dadd(820.5, 167, -34, 1.5)
pt3dadd(821, 168, -34, 0.6)
pt3dadd(824, 168, -34, 0.9)
pt3dadd(825, 168, -35.5, 0.9)
pt3dadd(826, 170, -34, 1.4)
pt3dadd(827.5, 171, -34.5, 0.9)
pt3dadd(829, 172, -34, 0.7)
pt3dadd(832.5, 173.5, -40, 0.6)
pt3dadd(833.5, 175, -40, 1.1)
pt3dadd(834.5, 177, -40, 1.1)
pt3dadd(835.5, 178.5, -40, 0.7)
pt3dadd(837, 180, -40, 0.9)
pt3dadd(839, 180.5, -40, 1.1)
pt3dadd(840.5, 180.5, -40, 1.3)
pt3dadd(841, 180.5, -40, 1.6)
pt3dadd(843, 180.5, -40, 0.9)
pt3dadd(844, 180, -40, 1.3)
pt3dadd(845, 181, -40, 1)
pt3dadd(846.5, 181, -40, 1)
pt3dadd(847, 180.5, -40, 1.1)
pt3dadd(848.5, 180, -40, 1.2)
pt3dadd(851, 180, -40, 1.3)
pt3dadd(851.5, 180, -46.5, 1.7)
pt3dadd(854, 180.5, -40, 2)
pt3dadd(854.5, 181.5, -40, 2.1)
pt3dadd(855.5, 182.5, -40, 1.8)
pt3dadd(857, 183.5, -40, 0.8)
pt3dadd(858, 184, -40, 0.7)
pt3dadd(858.5, 185.5, -40, 1.9)
pt3dadd(860, 186, -46.5, 2.5)
pt3dadd(862, 187.5, -46.5, 3.8)
pt3dadd(862.5, 188, -46.5, 2.6)
pt3dadd(864.5, 188.5, -46.5, 1.9)
pt3dadd(865, 189, -46.5, 0.9)
pt3dadd(866, 190, -46.5, 1)
pt3dadd(868, 191, -46.5, 1.8)
pt3dadd(870, 192.5, -46.5, 1.4)
pt3dadd(871.5, 193.5, -46.5, 1.4)
pt3dadd(874, 195, -46.5, 1.2)
pt3dadd(875.5, 195, -46.5, 1.1)
pt3dadd(877.5, 195.5, -46.5, 1.3)
pt3dadd(879.5, 196.5, -46.5, 1.3)
pt3dadd(880.5, 197.5, -46.5, 1.7)
pt3dadd(882.5, 199.5, -46.5, 1.5)
pt3dadd(883, 200, -46.5, 1.3)
pt3dadd(884, 202, -46.5, 1.1)
pt3dadd(885.5, 204, -46.5, 0.8)
pt3dadd(887.5, 205, -46.5, 1.1)
pt3dadd(889, 206, -46.5, 1)
pt3dadd(890, 207.5, -52.5, 1.1)
pt3dadd(891.5, 209, -46.5, 1.2)
pt3dadd(893, 211.5, -46.5, 1.1)
pt3dadd(894.5, 213, -46.5, 1.2)
pt3dadd(896, 214, -46.5, 1.4)
pt3dadd(896, 214.5, -46.5, 1.7)
pt3dadd(897, 216, -46.5, 1.8)
pt3dadd(898, 218, -46.5, 2.2)
pt3dadd(899.5, 218.5, -46.5, 3)
pt3dadd(901, 219, -46.5, 2.7)
pt3dadd(902.5, 219, -46.5, 2)
pt3dadd(903.5, 219.5, -46.5, 1.4)
pt3dadd(905.5, 220, -46.5, 1)
pt3dadd(907.5, 221, -46.5, 1)
pt3dadd(909.5, 221, -46.5, 1.4)
pt3dadd(911.5, 222, -46.5, 1.8)
pt3dadd(914.5, 223, -46.5, 1.2)
pt3dadd(915.5, 223.5, -46.5, 0.5)
pt3dadd(918.5, 224.5, -46.5, 0.7)
pt3dadd(921.5, 224.5, -46.5, 1)
pt3dadd(923.5, 225.5, -52.5, 1)
pt3dadd(925, 225.5, -46.5, 1.2)
pt3dadd(926, 225.5, -46.5, 2)
pt3dadd(928.5, 225.5, -46.5, 1.2)
pt3dadd(929.5, 225.5, -46.5, 0.8)
pt3dadd(932, 225.5, -52.5, 1.1)
pt3dadd(934, 227, -52.5, 1.1)
pt3dadd(935, 228, -52.5, 1.2)
pt3dadd(937, 227, -52.5, 1.2)
pt3dadd(937.5, 227, -59, 1.6)
pt3dadd(940, 227, -59, 2.3)
pt3dadd(941, 228.5, -59, 1.2)
pt3dadd(942.5, 229.5, -59, 1.1)
pt3dadd(944.5, 231, -59, 0.9)
pt3dadd(945.5, 231, -59, 1.5)
pt3dadd(948, 233, -59, 1.8)
pt3dadd(948.5, 235, -59, 1.5)
pt3dadd(949.5, 237.5, -59, 1.1)
pt3dadd(951, 240.5, -59, 1.1)
pt3dadd(953, 242, -59, 1.2)
pt3dadd(955.5, 243.5, -59, 0.9)
pt3dadd(955.5, 245, -59, 0.9)
pt3dadd(958.5, 245.5, -59, 1.6)
pt3dadd(961, 248, -59, 0.8)
pt3dadd(964, 249, -59, 0.8)
pt3dadd(964.5, 251, -59, 0.8)
pt3dadd(965.5, 251, -59, 0.8)
pt3dadd(967, 252, -65, 0.8)
pt3dadd(969.5, 252, -65, 1.8)
pt3dadd(971.5, 252.5, -59, 1.9)
pt3dadd(973.5, 253, -59, 1.4)
pt3dadd(975.5, 253, -59, 1.2)
pt3dadd(977, 255, -59, 1)
pt3dadd(978, 255.5, -65, 1)
pt3dadd(979, 257, -65, 1)
pt3dadd(979.5, 258.5, -65, 1)
pt3dadd(981.5, 260, -65, 1)
pt3dadd(985, 262.5, -65, 0.8)
}
dend[212] {pt3dclear()
pt3dadd(769, 150.5, -25.5, 4)
pt3dadd(769.5, 148, -29, 1.2)
pt3dadd(771, 146, -29, 0.3)
pt3dadd(773, 146, -29, 0.3)
pt3dadd(773.5, 145, -29, 0.3)
pt3dadd(774.5, 144, -27, 1)
pt3dadd(776.5, 144, -29, 0.7)
pt3dadd(777.5, 144, -29, 0.6)
pt3dadd(775.5, 145.5, -27, 0.6)
pt3dadd(779, 144, -27, 0.6)
pt3dadd(782.5, 144, -27, 0.6)
pt3dadd(784, 144, -27, 0.6)
pt3dadd(785.5, 144, -28, 0.7)
pt3dadd(786, 144, -29, 0.8)
pt3dadd(788.5, 144.5, -27, 1.4)
pt3dadd(789, 145, -29, 0.1)
pt3dadd(791.5, 148.5, -27, 0.1)
pt3dadd(793.5, 148.5, -24.5, 1.6)
pt3dadd(796.5, 150.5, -24.5, 0.1)
pt3dadd(802.5, 155, -23.5, 0.3)
pt3dadd(804, 158.5, -24, 0.3)
pt3dadd(806.5, 158.5, -24, 0.3)
pt3dadd(809, 160.5, -24, 0.3)
pt3dadd(811.5, 160.5, -24, 0.3)
pt3dadd(813, 160.5, -24, 0.3)
pt3dadd(814, 160.5, -24.5, 0.3)
pt3dadd(815.5, 161.5, -25.5, 0.3)
pt3dadd(815.5, 161.5, -24, 1.2)
pt3dadd(817.5, 161.5, -23.5, 1.7)
pt3dadd(820, 161.5, -23.5, 0.6)
pt3dadd(822, 161.5, -24.5, 0.2)
pt3dadd(824, 162, -24.5, 0.2)
pt3dadd(826.5, 162.5, -24.5, 0.2)
pt3dadd(830.5, 165, -24.5, 0.2)
pt3dadd(833, 163.5, -23.5, 0.2)
pt3dadd(834.5, 163.5, -24.5, 0.1)
pt3dadd(836, 164.5, -23.5, 2.2)
pt3dadd(838.5, 168, -23.5, 0.6)
pt3dadd(841, 168, -24.5, 0.6)
pt3dadd(841.5, 168, -24, 2.2)
pt3dadd(843, 170, -24.5, 1.9)
pt3dadd(847, 170, -24.5, 0.7)
pt3dadd(850, 170, -24.5, 0.5)
pt3dadd(853, 170, -24.5, 0.5)
pt3dadd(853, 169, -24.5, 0.5)
pt3dadd(855, 169, -24, 1.6)
pt3dadd(856.5, 169, -24, 2.7)
pt3dadd(858.5, 169, -24, 3.3)
pt3dadd(859.5, 170.5, -22.5, 1.5)
pt3dadd(862.5, 174, -23.5, 0.8)
pt3dadd(864, 174, -23.5, 0.6)
pt3dadd(866.5, 175, -24.5, 0.9)
pt3dadd(868.5, 176.5, -24.5, 1.2)
pt3dadd(869.5, 178.5, -24.5, 1.2)
pt3dadd(873, 180.5, -24.5, 1.2)
pt3dadd(875, 182.5, -25.5, 1.5)
pt3dadd(879, 184.5, -24, 1.5)
pt3dadd(882.5, 185.5, -24, 1.5)
pt3dadd(885, 187, -24.5, 1.5)
pt3dadd(887.5, 188.5, -24.5, 1.6)
pt3dadd(888.5, 188.5, -26, 0.1)
pt3dadd(891, 190, -24.5, 0.1)
pt3dadd(895, 190, -24.5, 0.1)
pt3dadd(897.5, 190, -24.5, 0.1)
pt3dadd(900, 191.5, -24.5, 0.1)
pt3dadd(900, 190, -26, 0.1)
pt3dadd(903.5, 190, -25.5, 0.1)
pt3dadd(905.5, 192, -24.5, 0.1)
pt3dadd(908.5, 194, -24.5, 0.1)
pt3dadd(911, 194, -24.5, 0.1)
pt3dadd(914, 191.5, -24.5, 0.1)
pt3dadd(915, 191.5, -24.5, 1.4)
pt3dadd(918, 191.5, -24.5, 0.8)
pt3dadd(920.5, 191, -24.5, 0.3)
pt3dadd(923.5, 190, -25.5, 0.3)
pt3dadd(928.5, 189.5, -24.5, 0.3)
pt3dadd(931.5, 188, -24.5, 0.2)
pt3dadd(934.5, 188.5, -26, 0.2)
pt3dadd(937, 191, -26, 0.2)
pt3dadd(938.5, 191, -26, 1.1)
pt3dadd(940, 191, -26, 1.4)
}
}
proc shape3d_69() {
dend[212] { pt3dadd(940.5, 192.5, -24, 0.1)
pt3dadd(943.5, 192, -24, 1.8)
pt3dadd(947.5, 192, -25.5, 0.1)
pt3dadd(951.5, 194, -26, 0.1)
pt3dadd(953.5, 194, -25.5, 0.1)
pt3dadd(957, 193.5, -25.5, 1)
pt3dadd(958.5, 193.5, -25.5, 0.1)
pt3dadd(961, 193.5, -25.5, 0.1)
pt3dadd(963.5, 194.5, -25.5, 1.6)
pt3dadd(966.5, 194, -25.5, 0.1)
pt3dadd(969, 193.5, -25.5, 0.1)
pt3dadd(970.5, 192.5, -25.5, 1.5)
pt3dadd(974, 192.5, -25.5, 0.6)
pt3dadd(976, 192.5, -26.5, 0.6)
pt3dadd(979.5, 195, -25.5, 2.7)
pt3dadd(981, 195, -27.5, 0.1)
pt3dadd(983.5, 195, -26.5, 0.1)
pt3dadd(986.5, 195, -26.5, 0.1)
pt3dadd(990.5, 194.5, -26.5, 3)
pt3dadd(993, 195, -26.5, 1.3)
pt3dadd(996.5, 195, -26.5, 0.2)
pt3dadd(1001, 195, -27.5, 0.2)
pt3dadd(1004.5, 195, -25.5, 0.2)
pt3dadd(1006, 195, -24.5, 0.2)
pt3dadd(1009.5, 196, -25.5, 0.2)
pt3dadd(1013.5, 196.5, -26, 0.2)
pt3dadd(1015.5, 198.5, -26, 0.2)
pt3dadd(1019, 198, -26, 0.2)
pt3dadd(1022.5, 198, -26.5, 0.2)
pt3dadd(1025.5, 198.5, -26.5, 0.2)
pt3dadd(1030.5, 198.5, -26.5, 0.2)
pt3dadd(1034.5, 198.5, -26.5, 0.2)
pt3dadd(1036.5, 198.5, -26.5, 0.2)
pt3dadd(1040.5, 198.5, -26.5, 0.2)
pt3dadd(1047, 197, -26.5, 0.1)
pt3dadd(1049.5, 196, -26.5, 0.1)
pt3dadd(1052, 196, -27.5, 0.1)
pt3dadd(1053.5, 195.5, -25.5, 0.1)
pt3dadd(1055.5, 194, -25.5, 0.1)
pt3dadd(1057.5, 194, -25.5, 0.1)
pt3dadd(1060, 192.5, -24.5, 0.1)
pt3dadd(1063, 191.5, -24.5, 0.1)
pt3dadd(1064, 192.5, -24.5, 0.1)
pt3dadd(1067, 192.5, -24.5, 0.5)
pt3dadd(1068.5, 193, -25.5, 1.7)
pt3dadd(1071.5, 194, -26, 0.6)
pt3dadd(1072, 195.5, -24.5, 0.1)
pt3dadd(1077, 195.5, -25.5, 0.1)
pt3dadd(1079, 195.5, -26, 0.1)
pt3dadd(1082.5, 195.5, -26.5, 0.1)
pt3dadd(1083, 195.5, -24, 0.1)
pt3dadd(1085.5, 195.5, -24, 0.9)
pt3dadd(1087.5, 195.5, -25.5, 1.2)
pt3dadd(1092, 195.5, -25.5, 0.3)
pt3dadd(1092.5, 195.5, -23.5, 0.1)
pt3dadd(1094, 195.5, -24, 0.1)
pt3dadd(1096.5, 195.5, -22.5, 0.5)
pt3dadd(1098.5, 195.5, -25.5, 0.1)
pt3dadd(1102, 195, -24.5, 0.1)
pt3dadd(1107.5, 192.5, -25.5, 0.1)
pt3dadd(1111, 192, -25.5, 0.1)
pt3dadd(1112, 191, -25.5, 0.1)
pt3dadd(1117, 189.5, -25.5, 0.1)
pt3dadd(1119.5, 189.5, -26, 0.1)
pt3dadd(1121.5, 189.5, -26, 0.1)
pt3dadd(1123, 189.5, -26, 0.1)
pt3dadd(1125.5, 189, -26, 0.1)
pt3dadd(1126.5, 186, -26, 0.1)
pt3dadd(1128.5, 184.5, -26, 0.1)
pt3dadd(1128.5, 182.5, -26, 0.1)
pt3dadd(1131.5, 182.5, -24.5, 0.1)
pt3dadd(1135.5, 183, -30.5, 0.1)
pt3dadd(1137.5, 181.5, -30.5, 0.1)
pt3dadd(1139.5, 181.5, -30.5, 0.1)
pt3dadd(1140, 180, -30.5, 0.1)
pt3dadd(1142, 180, -30.5, 1.1)
pt3dadd(1143.5, 179, -30.5, 1.2)
pt3dadd(1145.5, 179, -30.5, 1.8)
pt3dadd(1147.5, 177.5, -24.5, 1.2)
pt3dadd(1148.5, 177, -30.5, 0.1)
pt3dadd(1151, 175, -30.5, 0.1)
pt3dadd(1152, 173, -30.5, 0.1)
pt3dadd(1153, 172, -30.5, 0.1)
pt3dadd(1154.5, 172, -30.5, 0.1)
pt3dadd(1157, 172, -30.5, 0.1)
pt3dadd(1158, 172, -30.5, 2)
pt3dadd(1158, 170.5, -37, 0.1)
pt3dadd(1158.5, 168.5, -37, 0.1)
pt3dadd(1160.5, 168, -37, 0.1)
pt3dadd(1160.5, 166, -37, 0.1)
pt3dadd(1159, 165, -37, 1.7)
pt3dadd(1158.5, 164.5, -37, 1.7)
pt3dadd(1159, 162.5, -37, 1.3)
pt3dadd(1159.5, 161.5, -37, 0.4)
pt3dadd(1159, 160, -37, 0.1)
pt3dadd(1159, 157, -37, 0.1)
pt3dadd(1161, 155.5, -43, 0.1)
pt3dadd(1162.5, 155, -37, 0.7)
pt3dadd(1164, 155, -43, 0.7)
pt3dadd(1165, 152.5, -43, 0.7)
pt3dadd(1166, 152.5, -49.5, 0.1)
pt3dadd(1167, 153.5, -55.5, 0.1)
pt3dadd(1167.5, 151.5, -49.5, 0.1)
pt3dadd(1169.5, 153, -49.5, 0.1)
}
dend[213] {pt3dclear()
pt3dadd(406.5, 134.5, 4, 3.8)
pt3dadd(408.5, 136, 4, 2.1)
pt3dadd(411.5, 137.5, 4, 2.1)
pt3dadd(415, 139.5, 4, 2.1)
pt3dadd(417, 142, 4, 2.3)
pt3dadd(418.5, 144.5, 4, 2.3)
pt3dadd(421, 147, 4, 2.3)
pt3dadd(422, 149, 10, 1.4)
pt3dadd(423.5, 150.5, 10, 1.4)
pt3dadd(423.5, 152, 10, 1.7)
pt3dadd(424.5, 153.5, 10, 2.2)
pt3dadd(425, 156, 12.5, 2.4)
pt3dadd(426.5, 159, 12.5, 2.4)
pt3dadd(428.5, 160.5, 12.5, 2.1)
pt3dadd(430, 162.5, 12.5, 2.1)
pt3dadd(431, 163.5, 12.5, 1.7)
pt3dadd(433, 163.5, 12.5, 1.9)
pt3dadd(433.5, 165, 12.5, 1.9)
pt3dadd(436, 166.5, 21, 2.7)
pt3dadd(439, 166.5, 19.5, 2.2)
pt3dadd(438.5, 169.5, 21, 2)
pt3dadd(438, 170.5, 22.5, 1.5)
pt3dadd(439, 172, 22.5, 1)
pt3dadd(441, 172, 22.5, 1)
pt3dadd(442, 175, 22.5, 2.3)
pt3dadd(442.5, 177, 22.5, 2.7)
pt3dadd(443, 179, 22.5, 2.7)
pt3dadd(444.5, 181, 24, 1.6)
pt3dadd(445, 181, 24, 1.2)
pt3dadd(448, 181, 24, 1.2)
pt3dadd(448, 183.5, 24, 1.6)
pt3dadd(448, 184.5, 24, 2.2)
pt3dadd(447, 185, 24, 2.5)
pt3dadd(448.5, 185.5, 24, 2.6)
pt3dadd(449, 187.5, 22.5, 2.6)
pt3dadd(450.5, 189.5, 26.5, 2.3)
pt3dadd(452, 191, 26.5, 1.8)
pt3dadd(453, 191.5, 26.5, 1.6)
pt3dadd(454.5, 193.5, 26.5, 1.4)
pt3dadd(456.5, 194, 26.5, 1.4)
pt3dadd(458, 195, 26.5, 1.4)
pt3dadd(460, 195, 26.5, 1.4)
pt3dadd(461.5, 195, 26.5, 1.1)
pt3dadd(463.5, 195, 29.5, 1.1)
pt3dadd(464.5, 197.5, 29.5, 2)
pt3dadd(466, 198.5, 29.5, 2.3)
pt3dadd(466, 200, 28, 2.3)
pt3dadd(469.5, 198, 28, 2.2)
pt3dadd(471, 199.5, 34, 2)
pt3dadd(472.5, 201, 32.5, 2)
pt3dadd(474.5, 201.5, 35.5, 1.2)
pt3dadd(474.5, 204, 39.5, 1.5)
pt3dadd(476.5, 206.5, 42.5, 2.1)
pt3dadd(479.5, 206.5, 42.5, 2.1)
pt3dadd(483, 206.5, 42.5, 1.6)
pt3dadd(483.5, 207, 36.5, 1.9)
pt3dadd(485.5, 207, 36.5, 1.9)
pt3dadd(487, 207, 36.5, 3.4)
pt3dadd(488, 209, 36.5, 2.1)
pt3dadd(489.5, 209, 36.5, 1.7)
pt3dadd(491, 209.5, 36.5, 1.7)
pt3dadd(492, 210.5, 36.5, 2.4)
pt3dadd(493, 211, 36.5, 2.9)
pt3dadd(494, 213.5, 36.5, 1.7)
pt3dadd(496, 216.5, 38, 1.7)
pt3dadd(497.5, 218, 38, 1.7)
pt3dadd(500.5, 219.5, 38, 1.5)
pt3dadd(501.5, 220, 36.5, 1.5)
pt3dadd(506.5, 221.5, 36.5, 1.5)
pt3dadd(509.5, 224.5, 42.5, 1.2)
pt3dadd(511, 225, 55, 1.2)
pt3dadd(511.5, 226, 57, 2.3)
pt3dadd(512.5, 227.5, 58.5, 3.1)
pt3dadd(514.5, 229, 62, 1.9)
pt3dadd(515.5, 230.5, 62, 0.5)
pt3dadd(517, 231, 62, 0.5)
pt3dadd(517.5, 232.5, 58.5, 1.3)
pt3dadd(517.5, 234.5, 64, 2.4)
pt3dadd(518.5, 236.5, 64, 0.1)
pt3dadd(520.5, 235.5, 64, 0.1)
pt3dadd(521.5, 235.5, 60.5, 1.9)
pt3dadd(523, 235.5, 62, 3.1)
pt3dadd(525.5, 236.5, 62, 1.8)
pt3dadd(526, 236.5, 64, 0.1)
pt3dadd(528, 236.5, 64, 1.3)
pt3dadd(529.5, 238, 64, 1.4)
pt3dadd(529.5, 239, 64, 1.5)
pt3dadd(531, 240.5, 64, 1.5)
pt3dadd(534, 242.5, 64, 1.5)
pt3dadd(534.5, 244, 66, 0.9)
pt3dadd(536, 244, 66, 0.9)
pt3dadd(537.5, 245, 60.5, 2.5)
pt3dadd(537.5, 245, 66, 3.1)
pt3dadd(540, 247.5, 64, 0.4)
pt3dadd(540, 248.5, 58.5, 0.1)
pt3dadd(540, 250.5, 57, 1.6)
}
}
proc shape3d_70() {
dend[213] { pt3dadd(541, 251.5, 57, 1.8)
pt3dadd(540.5, 253.5, 57, 1.9)
pt3dadd(541, 255, 58.5, 1.1)
pt3dadd(541.5, 256, 58.5, 1.3)
pt3dadd(542.5, 256, 60, 1.7)
pt3dadd(544, 257.5, 61.5, 1.8)
pt3dadd(544, 259, 61.5, 2.4)
pt3dadd(543.5, 262.5, 64.5, 1.6)
pt3dadd(543.5, 263, 64.5, 0.8)
pt3dadd(544.5, 263.5, 64.5, 0.9)
pt3dadd(545, 264, 64.5, 0.9)
pt3dadd(545.5, 265, 64.5, 1.6)
pt3dadd(546.5, 265, 66, 2.6)
pt3dadd(546.5, 267.5, 66, 3.8)
}
dend[214] {pt3dclear()
pt3dadd(546.5, 267.5, 66, 3.8)
pt3dadd(545.5, 269, 67.5, 0.1)
pt3dadd(545, 270.5, 66, 0.1)
pt3dadd(545, 272.5, 66, 0.1)
pt3dadd(542.5, 272.5, 66, 0.1)
pt3dadd(540.5, 273, 66, 0.1)
pt3dadd(540, 274, 64.5, 1.8)
pt3dadd(538.5, 276, 64.5, 1.8)
pt3dadd(537, 277, 64.5, 2)
pt3dadd(537.5, 278.5, 67.5, 1.7)
pt3dadd(539, 280.5, 67.5, 2.1)
pt3dadd(538.5, 284.5, 69, 1.7)
}
dend[215] {pt3dclear()
pt3dadd(546.5, 267.5, 66, 3.8)
pt3dadd(552, 270.5, 66, 0.4)
pt3dadd(554, 271.5, 66, 0.4)
pt3dadd(555.5, 271, 66, 0.2)
pt3dadd(557, 273, 66, 0.2)
pt3dadd(557, 274.5, 66, 0.2)
pt3dadd(558.5, 277.5, 66, 0.2)
pt3dadd(560.5, 278, 66, 1.6)
pt3dadd(561.5, 279.5, 66, 1.2)
pt3dadd(565, 281.5, 69, 0.5)
pt3dadd(563.5, 283, 69, 0.1)
pt3dadd(565.5, 284, 69, 0.1)
pt3dadd(566.5, 284.5, 69, 1.8)
pt3dadd(567.5, 286, 70.5, 0.2)
pt3dadd(568.5, 289, 70.5, 0.2)
pt3dadd(570.5, 290.5, 70.5, 0.2)
pt3dadd(569.5, 291.5, 70.5, 1)
pt3dadd(570, 294, 72, 2.8)
pt3dadd(571, 296.5, 72, 1)
pt3dadd(571.5, 296.5, 72, 0.2)
pt3dadd(573.5, 297.5, 72, 0.1)
pt3dadd(574, 298.5, 72, 0.6)
pt3dadd(575.5, 300.5, 72, 0.9)
pt3dadd(575.5, 302, 73.5, 0.1)
pt3dadd(574.5, 303, 73.5, 0.1)
pt3dadd(576.5, 303.5, 73.5, 0.1)
pt3dadd(575.5, 305.5, 76.5, 1.7)
pt3dadd(575.5, 306.5, 78, 3)
pt3dadd(575.5, 308, 78, 0.5)
pt3dadd(576.5, 309.5, 79.5, 0.1)
pt3dadd(579.5, 311, 79.5, 0.1)
pt3dadd(580, 312.5, 78, 0.3)
pt3dadd(582, 313.5, 73.5, 0.6)
pt3dadd(583.5, 313.5, 76.5, 1.9)
pt3dadd(587.5, 313.5, 76.5, 0.5)
pt3dadd(589, 316, 82.5, 0.1)
pt3dadd(591.5, 316.5, 82.5, 0.9)
pt3dadd(593.5, 319.5, 84.5, 0.9)
pt3dadd(596.5, 321, 84.5, 0.9)
pt3dadd(599.5, 322.5, 84.5, 2)
}
dend[216] {pt3dclear()
pt3dadd(599.5, 322.5, 84.5, 2)
pt3dadd(601.5, 322.5, 84.5, 0.9)
pt3dadd(604.5, 322.5, 84.5, 0.8)
pt3dadd(605, 325.5, 80.5, 1.8)
pt3dadd(607, 325.5, 84.5, 2.8)
pt3dadd(609, 325.5, 84.5, 1.7)
pt3dadd(611, 327, 82.5, 0.9)
pt3dadd(613.5, 327, 80.5, 0.6)
pt3dadd(615.5, 327, 82.5, 0.6)
pt3dadd(617.5, 328, 82.5, 2.1)
pt3dadd(619.5, 329.5, 80.5, 0.5)
pt3dadd(623, 329.5, 80.5, 0.5)
pt3dadd(626, 331.5, 80.5, 1.8)
pt3dadd(628, 332.5, 80.5, 0.8)
pt3dadd(629.5, 333, 80.5, 0.8)
pt3dadd(631.5, 333.5, 80.5, 2.4)
pt3dadd(631.5, 332.5, 80.5, 2)
pt3dadd(631.5, 331, 80.5, 1.1)
pt3dadd(632, 329, 78.5, 0.8)
pt3dadd(637, 326.5, 80.5, 1.2)
}
dend[217] {pt3dclear()
pt3dadd(599.5, 322.5, 84.5, 2)
pt3dadd(598, 327.5, 84.5, 0.6)
pt3dadd(596, 329, 86.5, 0.7)
pt3dadd(594.5, 331.5, 86.5, 0.7)
pt3dadd(593, 333.5, 86.5, 0.7)
pt3dadd(592, 334.5, 88.5, 1.2)
pt3dadd(590, 336, 88.5, 1.6)
pt3dadd(590, 338.5, 88.5, 1.1)
pt3dadd(589, 340, 90.5, 0.6)
pt3dadd(587, 343.5, 90.5, 0.6)
pt3dadd(585.5, 345.5, 92.5, 0.6)
pt3dadd(584, 346.5, 90.5, 1.2)
pt3dadd(583, 348, 90.5, 1.2)
pt3dadd(581, 350, 90.5, 0.7)
pt3dadd(578, 352, 90.5, 0.7)
pt3dadd(575, 353, 88.5, 0.7)
}
dend[218] {pt3dclear()
pt3dadd(157, 85.5, -15.5, 11.6)
pt3dadd(164, 94.5, -13, 5.7)
pt3dadd(167, 98.5, -13, 6.2)
pt3dadd(170.5, 98.5, -13, 6.2)
pt3dadd(174, 103.5, -13, 6.8)
pt3dadd(177.5, 107, -14, 7.1)
pt3dadd(179, 110, -14, 6.7)
pt3dadd(183.5, 112, -15, 6.3)
pt3dadd(188, 117, -15, 6.6)
pt3dadd(190, 120.5, -15, 6.7)
pt3dadd(193, 123.5, -15, 6.3)
pt3dadd(195, 127, -15, 6.3)
pt3dadd(198, 130.5, -15, 7)
pt3dadd(200, 132.5, -15, 7.3)
pt3dadd(202.5, 135.5, -15, 6.7)
pt3dadd(204.5, 137.5, -15.5, 7)
pt3dadd(207, 140.5, -15.5, 7.2)
pt3dadd(210.5, 141.5, -15.5, 7.5)
pt3dadd(212.5, 144.5, -8.5, 7.8)
pt3dadd(215.5, 147.5, -6.5, 6.8)
pt3dadd(218, 151, -8.5, 6)
pt3dadd(222, 152, -8.5, 7.3)
pt3dadd(225, 156, -8.5, 7.9)
pt3dadd(228.5, 157.5, -9.5, 6.9)
pt3dadd(231.5, 160.5, -9.5, 5.7)
pt3dadd(233.5, 162.5, -9.5, 5.7)
pt3dadd(235.5, 164.5, -4, 6.5)
pt3dadd(241, 166.5, -5, 6.9)
pt3dadd(244.5, 169.5, -5, 7.6)
pt3dadd(247.5, 172, -5, 7.6)
pt3dadd(250.5, 175, -1, 8.1)
}
dend[219] {pt3dclear()
pt3dadd(250.5, 175, -1, 8.1)
pt3dadd(250.5, 181.5, -7.5, 2.9)
pt3dadd(251.5, 184.5, -5.5, 2.3)
pt3dadd(252, 187.5, 0, 2.3)
pt3dadd(252.5, 192, -4, 1.6)
pt3dadd(249, 196.5, -20.5, 2.9)
pt3dadd(249, 201.5, -20.5, 2.9)
pt3dadd(248, 205, -20.5, 3.1)
pt3dadd(246.5, 210, -15, 2.9)
pt3dadd(246.5, 214, -15, 2.6)
pt3dadd(246.5, 218, -1, 2.7)
pt3dadd(249, 220, -1, 2.5)
pt3dadd(250.5, 223, 2, 1.5)
pt3dadd(252, 224, 2, 1.6)
pt3dadd(253, 227, 4.5, 2.8)
pt3dadd(254, 230, 4.5, 2.8)
pt3dadd(254, 233.5, 7.5, 2.7)
pt3dadd(255, 238, -1, 2.4)
pt3dadd(255, 241.5, -1, 2.2)
pt3dadd(257, 243, 4.5, 2.9)
pt3dadd(257, 244.5, 4.5, 3)
pt3dadd(258.5, 248, 4.5, 1.8)
pt3dadd(259, 251.5, 7.5, 2.6)
pt3dadd(261.5, 253.5, 10, 2.6)
pt3dadd(263, 256, 10, 3.3)
pt3dadd(263.5, 257.5, 10, 3.6)
pt3dadd(264.5, 259.5, 13, 2.5)
pt3dadd(266, 261.5, 7.5, 2)
pt3dadd(267, 263, 10, 1.7)
pt3dadd(268, 265.5, 10, 1.5)
pt3dadd(269.5, 267.5, 13, 1.4)
pt3dadd(270, 270, 7.5, 1.9)
pt3dadd(271.5, 272, 13, 2.5)
pt3dadd(272.5, 275, 13, 2.6)
pt3dadd(272.5, 277.5, 13, 2)
pt3dadd(272.5, 280, 13, 1.6)
pt3dadd(273.5, 282.5, 10, 2.6)
pt3dadd(275.5, 285.5, 13, 2.9)
pt3dadd(278.5, 288.5, 13, 2.9)
pt3dadd(280, 291, 13, 2.9)
pt3dadd(280.5, 294.5, 7.5, 2.3)
pt3dadd(282.5, 296, 10, 2)
pt3dadd(284, 297.5, 10, 2)
pt3dadd(284, 299.5, 10, 2)
pt3dadd(284, 301, 10, 2)
pt3dadd(285.5, 303.5, 10, 2.3)
pt3dadd(286.5, 305, 10, 2.1)
pt3dadd(288.5, 307.5, 10, 2.2)
pt3dadd(288, 310, 10, 2.4)
pt3dadd(288, 311.5, 10, 2.4)
pt3dadd(289, 314.5, 10, 2.7)
pt3dadd(290.5, 317, 10, 1.3)
pt3dadd(292.5, 318, 10, 1.3)
pt3dadd(292.5, 319.5, 10, 2.1)
pt3dadd(294, 322, 10, 2.8)
pt3dadd(295.5, 324, -1, 3.7)
pt3dadd(299.5, 327, 4.5, 3.7)
pt3dadd(303, 330, 2, 3.8)
pt3dadd(304, 331.5, 2, 4.3)
pt3dadd(305, 335.5, 2, 3.6)
}
dend[220] {pt3dclear()
pt3dadd(305, 335.5, 2, 3.6)
pt3dadd(314, 344.5, 2, 0.8)
pt3dadd(316.5, 344.5, 2, 0.8)
pt3dadd(318, 346, 2, 0.8)
pt3dadd(322, 349.5, 2, 0.8)
pt3dadd(324.5, 351, -9.5, 0.8)
pt3dadd(327, 354, -12, 0.8)
}
}
proc shape3d_71() {
dend[220] { pt3dadd(329.5, 356, -6.5, 0.9)
pt3dadd(332, 359, -6.5, 0.9)
pt3dadd(335.5, 362, 4.5, 0.9)
pt3dadd(337, 363.5, 6, 1.3)
pt3dadd(337.5, 367, 6, 1.8)
pt3dadd(338, 369.5, 9, 2)
pt3dadd(338.5, 372, 9, 2.6)
pt3dadd(338, 376, 9, 2.6)
pt3dadd(336.5, 377.5, 9, 2.6)
pt3dadd(336, 379, 8, 1.1)
pt3dadd(336, 381.5, 8, 1.1)
pt3dadd(336, 383.5, 8, 1.8)
pt3dadd(335, 387, 3.5, 2.4)
pt3dadd(335, 389.5, 3.5, 2.4)
pt3dadd(334, 398, 3.5, 1.7)
pt3dadd(334.5, 400, 4.5, 1.7)
pt3dadd(334.5, 403, 0.5, 1.7)
pt3dadd(334.5, 405, -9, 1.8)
pt3dadd(334.5, 409, -9, 1.9)
pt3dadd(334.5, 411, -9, 2)
pt3dadd(336, 411.5, -9, 2.7)
pt3dadd(335.5, 414.5, -9, 1.6)
pt3dadd(336, 415.5, -9, 1.5)
pt3dadd(338, 415.5, -9, 1.5)
pt3dadd(340, 417, -9, 3.1)
pt3dadd(341.5, 418.5, -9, 1.7)
pt3dadd(341.5, 421, -9, 1.8)
pt3dadd(342.5, 424, -9, 1.7)
pt3dadd(342.5, 426, -9, 2.4)
pt3dadd(343, 427.5, -9, 2.7)
pt3dadd(343, 429.5, -9, 2.7)
pt3dadd(343, 430.5, -9, 1.6)
pt3dadd(342.5, 432, -9, 1.3)
pt3dadd(342.5, 435.5, -9, 1.3)
pt3dadd(342.5, 437.5, -10, 0.9)
pt3dadd(341.5, 441, -12.5, 1.2)
pt3dadd(342, 442.5, -15, 1.4)
pt3dadd(344, 443, -14.5, 2.3)
pt3dadd(344.5, 444.5, -13.5, 2.3)
pt3dadd(344.5, 448.5, -13.5, 2.3)
pt3dadd(344.5, 451, -13.5, 2.3)
pt3dadd(346, 453, -13.5, 2.3)
pt3dadd(347, 453.5, -13.5, 1.8)
pt3dadd(348.5, 455.5, -13.5, 1.3)
pt3dadd(351, 456.5, -13.5, 1.3)
pt3dadd(351, 458.5, -13.5, 1.3)
pt3dadd(352, 460.5, -13.5, 0.9)
pt3dadd(353, 462, -13.5, 0.9)
pt3dadd(354, 462, -13.5, 1.4)
pt3dadd(355, 465, -13.5, 1)
pt3dadd(354, 466, -14.5, 1.1)
pt3dadd(357, 466, -14.5, 1.1)
pt3dadd(357.5, 466, -14.5, 1.1)
pt3dadd(357.5, 467, -15, 1.4)
pt3dadd(357, 469.5, -15, 1.4)
pt3dadd(357, 471.5, -18, 1.4)
pt3dadd(357, 468.5, -20, 1.1)
pt3dadd(357.5, 466.5, -20, 1.1)
pt3dadd(358, 464, -20, 1.1)
pt3dadd(358, 463, -20, 1.7)
pt3dadd(357, 460, -22.5, 1.9)
pt3dadd(357, 458, -22.5, 1.3)
pt3dadd(356, 455, -26, 1)
pt3dadd(353.5, 455, -26, 1)
pt3dadd(352.5, 454.5, -24.5, 1)
pt3dadd(351.5, 454.5, -24.5, 2.6)
pt3dadd(351.5, 452, -26, 2.2)
pt3dadd(350.5, 451, -26, 1.7)
pt3dadd(351, 448.5, -27, 1.5)
pt3dadd(349, 446.5, -27, 1.5)
pt3dadd(347.5, 445.5, -30.5, 1.3)
pt3dadd(348.5, 442.5, -30.5, 1.3)
}
dend[221] {pt3dclear()
pt3dadd(305, 335.5, 2, 3.6)
pt3dadd(309.5, 340.5, -1, 2.1)
pt3dadd(311, 342, -1, 2.3)
pt3dadd(312.5, 345, -6.5, 2.6)
pt3dadd(312.5, 347.5, 4.5, 2.7)
pt3dadd(314, 352.5, 9, 0.9)
pt3dadd(315, 355, 9, 0.9)
pt3dadd(317.5, 356.5, 7.5, 0.9)
pt3dadd(318, 357.5, 9, 1.2)
pt3dadd(318, 358.5, 9, 1.2)
pt3dadd(319.5, 361, 9, 1.2)
pt3dadd(319.5, 362.5, 9, 0.6)
pt3dadd(321, 362.5, 9, 0.6)
pt3dadd(322, 364, 9, 0.6)
pt3dadd(323.5, 364, 9, 1.6)
pt3dadd(323.5, 367.5, 9, 1.6)
pt3dadd(324, 368, 9, 1.6)
pt3dadd(324.5, 370, 9, 0.9)
pt3dadd(325.5, 371.5, 9, 0.9)
pt3dadd(325.5, 373, 9, 1.2)
pt3dadd(327.5, 373.5, 9, 0.9)
pt3dadd(328.5, 374.5, 10.5, 0.7)
pt3dadd(329, 376.5, 10.5, 0.7)
pt3dadd(330, 376.5, 10.5, 0.9)
pt3dadd(331.5, 377.5, 10.5, 0.9)
pt3dadd(333, 379, 10.5, 1.4)
pt3dadd(334.5, 381, 10.5, 1.5)
pt3dadd(335.5, 383, 10.5, 1.5)
pt3dadd(337, 385.5, 12, 1.6)
pt3dadd(339.5, 388.5, 12, 2)
pt3dadd(342, 390, 13.5, 2)
pt3dadd(342, 392, 13.5, 1.4)
pt3dadd(342, 394.5, 13.5, 1.4)
pt3dadd(343.5, 397, 13.5, 1.7)
pt3dadd(344, 398.5, 14.5, 2.8)
pt3dadd(344, 401, 14.5, 2.8)
pt3dadd(343, 403.5, 14.5, 1.6)
pt3dadd(342.5, 407, 14.5, 1.1)
pt3dadd(342.5, 409, 14.5, 1.1)
pt3dadd(342.5, 411.5, 14.5, 1.3)
pt3dadd(343, 414, 14.5, 1.5)
pt3dadd(344, 415.5, 14.5, 1.9)
pt3dadd(345, 418, 14.5, 1.9)
pt3dadd(345, 419.5, 14.5, 1.9)
pt3dadd(345.5, 421, 14.5, 1.9)
pt3dadd(346.5, 423.5, 14.5, 1.9)
pt3dadd(346.5, 426, 14.5, 1.9)
pt3dadd(346.5, 426.5, 14.5, 1.9)
pt3dadd(347, 428.5, 14.5, 2)
pt3dadd(348, 431.5, 14.5, 2)
pt3dadd(349, 434, 14.5, 2)
pt3dadd(349, 436, 14.5, 2)
pt3dadd(349, 438.5, 14.5, 1.5)
pt3dadd(349, 440, 16, 1.5)
pt3dadd(350, 442.5, 14.5, 1.5)
pt3dadd(350, 445, 14.5, 1.6)
pt3dadd(350.5, 448, 16, 1.6)
pt3dadd(351.5, 448.5, 16, 1.6)
pt3dadd(353, 450.5, 16, 1.3)
pt3dadd(354, 453.5, 16, 0.7)
pt3dadd(354, 455.5, 16, 0.7)
pt3dadd(357, 458, 16, 0.7)
pt3dadd(357.5, 458, 16, 0.7)
pt3dadd(358, 459.5, 19, 1.3)
pt3dadd(359, 460, 19, 1.4)
pt3dadd(359, 462.5, 20.5, 1.7)
pt3dadd(360, 463, 20.5, 1.3)
pt3dadd(360.5, 465, 20.5, 1)
pt3dadd(360.5, 467, 20.5, 1.3)
pt3dadd(361, 469.5, 20.5, 1.5)
pt3dadd(361.5, 471.5, 20.5, 1.5)
pt3dadd(361.5, 473, 22, 1.5)
pt3dadd(361.5, 474.5, 22, 1.5)
pt3dadd(363.5, 478, 22, 1.5)
pt3dadd(363.5, 479, 22, 1.5)
pt3dadd(363.5, 480.5, 22, 0.9)
pt3dadd(366, 483, 22, 0.9)
pt3dadd(366, 484.5, 23.5, 1)
pt3dadd(368, 485.5, 23.5, 1.1)
pt3dadd(370, 490.5, 22, 1.5)
pt3dadd(371, 492, 22, 2)
pt3dadd(372, 494.5, 23.5, 2.6)
pt3dadd(375, 498, 23.5, 2.7)
pt3dadd(375, 499.5, 23.5, 2.7)
pt3dadd(376.5, 502, 24.5, 2)
pt3dadd(377.5, 503, 24.5, 1.7)
pt3dadd(377.5, 505, 24.5, 1.5)
pt3dadd(378, 507, 24.5, 1.2)
pt3dadd(379.5, 508.5, 24.5, 1.2)
pt3dadd(381.5, 510.5, 24.5, 1.3)
pt3dadd(383.5, 512.5, 24.5, 1.3)
pt3dadd(385, 512.5, 24.5, 1)
pt3dadd(386.5, 512.5, 23.5, 1)
pt3dadd(389, 514.5, 23.5, 1)
pt3dadd(391.5, 516, 23.5, 1)
pt3dadd(393, 518, 23.5, 1.3)
pt3dadd(393, 521, 24.5, 1.2)
pt3dadd(395, 523, 24.5, 1.2)
pt3dadd(395, 527.5, 24.5, 0.8)
pt3dadd(397, 528.5, 24.5, 1.1)
pt3dadd(397.5, 530.5, 24.5, 1.2)
pt3dadd(397.5, 533, 24.5, 0.9)
pt3dadd(399, 534, 24.5, 0.7)
pt3dadd(400, 536, 24.5, 0.7)
pt3dadd(400.5, 537, 26.5, 1.2)
pt3dadd(401.5, 537.5, 24.5, 1.7)
pt3dadd(402, 540.5, 24.5, 1.3)
pt3dadd(401.5, 542.5, 22.5, 1.1)
pt3dadd(400, 545.5, 24.5, 0.6)
pt3dadd(399.5, 548.5, 26.5, 0.9)
pt3dadd(399.5, 550.5, 26.5, 0.9)
pt3dadd(400, 551.5, 26.5, 1.1)
pt3dadd(400, 552.5, 26.5, 0.9)
pt3dadd(399.5, 554, 28, 0.8)
pt3dadd(399.5, 555, 28, 1.4)
pt3dadd(399, 555.5, 28, 1.8)
pt3dadd(398.5, 557.5, 28, 0.6)
pt3dadd(398.5, 558, 28, 0.6)
pt3dadd(398, 559.5, 26.5, 1)
pt3dadd(398, 560.5, 28, 1.6)
pt3dadd(397.5, 562.5, 28, 0.8)
pt3dadd(398, 562.5, 28, 0.6)
pt3dadd(399, 564.5, 28, 0.6)
pt3dadd(401, 566, 28, 0.6)
pt3dadd(401, 568, 28, 0.6)
pt3dadd(399.5, 569, 28, 1.8)
pt3dadd(399.5, 570.5, 28, 1.9)
pt3dadd(399, 572.5, 30, 1.4)
}
}
proc shape3d_72() {
dend[221] { pt3dadd(398.5, 574, 31.5, 0.3)
pt3dadd(399.5, 575, 33.5, 0.3)
pt3dadd(401, 577, 33.5, 0.3)
pt3dadd(402.5, 579, 33.5, 0.4)
pt3dadd(402.5, 581.5, 33.5, 0.4)
pt3dadd(402.5, 583.5, 33.5, 0.4)
pt3dadd(403, 585.5, 30, 1.2)
pt3dadd(403, 586.5, 30, 1.4)
pt3dadd(405, 588, 30, 1.2)
pt3dadd(405.5, 590.5, 31.5, 2)
pt3dadd(407, 592, 33.5, 2.8)
pt3dadd(408, 593, 35, 1)
pt3dadd(408.5, 595, 37, 0.2)
pt3dadd(410.5, 596.5, 37, 0.2)
pt3dadd(411, 599, 39, 0.1)
pt3dadd(411, 601, 39, 0.1)
pt3dadd(412, 602.5, 31.5, 0.1)
pt3dadd(414, 604, 31.5, 0.1)
pt3dadd(414.5, 604.5, 31.5, 0.1)
pt3dadd(415, 606, 33.5, 1.1)
pt3dadd(416, 607, 35, 2)
pt3dadd(417, 609.5, 33.5, 0.3)
pt3dadd(417, 611, 33.5, 0.1)
pt3dadd(418.5, 613, 35, 0.1)
pt3dadd(419, 614.5, 35, 0.1)
pt3dadd(419, 617.5, 35, 0.1)
pt3dadd(419.5, 621.5, 35, 0.4)
pt3dadd(419.5, 624, 35, 0.7)
pt3dadd(420, 626.5, 35, 1.3)
pt3dadd(420, 627, 35, 1.7)
pt3dadd(420, 629, 35, 0.1)
pt3dadd(421, 630, 42.5, 0.1)
pt3dadd(423, 631, 42.5, 0.1)
pt3dadd(423, 633, 42.5, 0.1)
pt3dadd(423, 635, 42.5, 0.9)
pt3dadd(422.5, 635.5, 35, 1.2)
pt3dadd(421, 637.5, 39, 1.8)
pt3dadd(423.5, 640, 39, 0.1)
pt3dadd(426.5, 642.5, 39, 0.1)
pt3dadd(429.5, 647.5, 37, 0.1)
pt3dadd(430, 651, 35, 0.1)
pt3dadd(431, 656.5, 35, 0.1)
pt3dadd(431, 660, 33.5, 0.1)
pt3dadd(431, 663.5, 33.5, 0.1)
pt3dadd(430.5, 667, 33.5, 0.1)
pt3dadd(433.5, 668.5, 33.5, 0.1)
pt3dadd(436, 673.5, 33.5, 0.1)
pt3dadd(439, 675.5, 31.5, 0.1)
pt3dadd(443, 678, 35, 0.2)
pt3dadd(443.5, 678, 35, 0.2)
pt3dadd(444.5, 679, 42.5, 1.9)
pt3dadd(448, 680.5, 37, 0.3)
}
dend[222] {pt3dclear()
pt3dadd(250.5, 175, -1, 8.1)
pt3dadd(256.5, 177.5, -2, 5.6)
pt3dadd(262.5, 178, -3, 5.6)
pt3dadd(266, 180, -3, 5.6)
pt3dadd(268.5, 181.5, -4, 5.6)
pt3dadd(272, 183, -3, 5.7)
pt3dadd(279.5, 185.5, 2.5, 3.4)
pt3dadd(284.5, 187.5, 2.5, 3.4)
pt3dadd(288, 190.5, 2.5, 3.4)
pt3dadd(293, 191.5, 2.5, 3.4)
pt3dadd(298, 194, 2.5, 3.4)
pt3dadd(300.5, 194, 5.5, 4.3)
pt3dadd(305, 197.5, 5.5, 4.9)
pt3dadd(309, 198.5, 5.5, 5)
}
dend[223] {pt3dclear()
pt3dadd(309, 198.5, 5.5, 5)
pt3dadd(309, 202, 2.5, 1.6)
pt3dadd(310.5, 203.5, 2.5, 1.6)
pt3dadd(313, 204.5, 2.5, 1.4)
pt3dadd(314, 205.5, 2.5, 1.4)
pt3dadd(317.5, 206, 2.5, 1.4)
pt3dadd(317.5, 207.5, 2.5, 1.4)
pt3dadd(317.5, 209.5, 2.5, 1.4)
pt3dadd(319, 211, 2.5, 1.7)
pt3dadd(321, 213, 2.5, 1.8)
pt3dadd(321.5, 214.5, 2.5, 1.9)
pt3dadd(320.5, 214.5, 5.5, 2.5)
pt3dadd(318.5, 216, 8, 2.3)
pt3dadd(316, 217, 8, 1.6)
pt3dadd(314, 218.5, 8, 1.7)
pt3dadd(313, 220, 11, 1.7)
pt3dadd(313, 222.5, 33, 1.4)
}
dend[224] {pt3dclear()
pt3dadd(309, 198.5, 5.5, 5)
pt3dadd(313.5, 202.5, 5.5, 6.2)
pt3dadd(319, 204, 5.5, 6.1)
pt3dadd(324, 204.5, 5.5, 4.3)
pt3dadd(327.5, 205, 8, 4)
pt3dadd(330.5, 205, 5.5, 3.3)
pt3dadd(335, 206.5, 5.5, 3.3)
pt3dadd(339.5, 206.5, 5.5, 3.8)
pt3dadd(344, 207.5, 5.5, 3.8)
pt3dadd(348.5, 207.5, 5.5, 3.8)
pt3dadd(352.5, 208.5, 5.5, 4.7)
pt3dadd(356.5, 208.5, 5.5, 4.7)
pt3dadd(359.5, 210, 5.5, 5.2)
pt3dadd(364, 210, 2.5, 5.2)
pt3dadd(367, 209, 2.5, 4.9)
pt3dadd(369.5, 208, 2.5, 4.8)
pt3dadd(373.5, 208, 2.5, 4.8)
pt3dadd(379, 208, 2.5, 4.8)
pt3dadd(383.5, 208, 2.5, 4.1)
pt3dadd(386, 208, 2.5, 4.1)
pt3dadd(389.5, 208, 0, 4.1)
pt3dadd(394, 208, 0, 4)
pt3dadd(400, 208, 0, 4)
pt3dadd(403, 207, 2.5, 4.6)
pt3dadd(406, 206, -3, 4.4)
pt3dadd(409, 206, -3, 4.3)
pt3dadd(412.5, 204, -3, 4)
pt3dadd(415.5, 204.5, -3, 4.1)
pt3dadd(420.5, 205, -3, 4.3)
pt3dadd(422, 205, -3, 3.6)
pt3dadd(426, 205, -3, 3.6)
pt3dadd(430.5, 205, -3, 3.6)
pt3dadd(434, 205.5, -3, 3.6)
pt3dadd(438.5, 206.5, -3, 4.3)
pt3dadd(443, 209, -3, 4.2)
pt3dadd(447, 209, 0, 3.7)
pt3dadd(451.5, 209.5, 0, 3.8)
pt3dadd(455, 210, -5.5, 4.1)
pt3dadd(462.5, 211, -5.5, 4.1)
pt3dadd(467, 211, -5.5, 4.1)
pt3dadd(471, 213, -3, 4.1)
pt3dadd(475.5, 214.5, 0, 4.1)
pt3dadd(480, 214.5, -1, 7)
pt3dadd(488, 214.5, -3, 6.4)
pt3dadd(496.5, 217, -3, 6.1)
pt3dadd(500, 217, -4, 6.5)
pt3dadd(503, 217, -4, 6.5)
pt3dadd(505.5, 217, -4, 5.6)
pt3dadd(507.5, 217, -5, 5.2)
pt3dadd(510, 215, -3, 4.7)
pt3dadd(514, 215, -3, 4.5)
pt3dadd(518.5, 214.5, -4, 4.5)
pt3dadd(522, 215, -4, 4.5)
pt3dadd(525.5, 215, -4, 4.5)
pt3dadd(528.5, 217, -2, 4.8)
pt3dadd(532, 218.5, -3, 4.7)
pt3dadd(534, 218.5, -4, 4.7)
pt3dadd(538.5, 218, -4, 4.7)
pt3dadd(543, 218, -4, 4.7)
pt3dadd(546, 220, -6, 4.6)
pt3dadd(549, 220, -6, 4.6)
pt3dadd(553, 220, -6, 4)
pt3dadd(558, 220, -6, 3.8)
pt3dadd(561.5, 220, -7.5, 3.6)
pt3dadd(566, 220, -7.5, 3.6)
pt3dadd(569, 220, -7.5, 3.8)
pt3dadd(573, 220, -7.5, 4)
pt3dadd(577, 219.5, -6, 4)
pt3dadd(579.5, 219, -6, 4)
pt3dadd(583, 219.5, -7, 3.1)
pt3dadd(585, 219.5, -7, 3.6)
pt3dadd(587.5, 218.5, -7, 3.8)
pt3dadd(591, 218.5, -7, 3.8)
pt3dadd(593.5, 217.5, -7.5, 4.3)
pt3dadd(597, 219.5, -9.5, 4.8)
pt3dadd(600.5, 219.5, -9.5, 4.2)
pt3dadd(604, 218.5, -10.5, 4.2)
pt3dadd(607.5, 218.5, -10.5, 4.6)
pt3dadd(610, 218.5, -7, 5.2)
pt3dadd(614, 218.5, -7, 5.9)
pt3dadd(618, 218.5, -7, 5.9)
pt3dadd(621.5, 218.5, -8.5, 4.9)
pt3dadd(624.5, 219.5, -9.5, 5.2)
pt3dadd(627.5, 219.5, -7.5, 4.6)
pt3dadd(630, 221.5, -7.5, 3.8)
pt3dadd(633, 221.5, -9.5, 3.3)
pt3dadd(635, 221.5, -9.5, 3)
pt3dadd(637.5, 222.5, -9.5, 3.4)
pt3dadd(640, 223, -9.5, 3.1)
pt3dadd(642, 224, -9.5, 3)
pt3dadd(644.5, 224, -9.5, 3.2)
pt3dadd(647.5, 224, -10.5, 3.8)
pt3dadd(649, 222.5, -10.5, 3.7)
pt3dadd(652, 221.5, -10.5, 3.4)
pt3dadd(657, 220, -10.5, 3.4)
pt3dadd(659.5, 220, -7.5, 4.1)
pt3dadd(661.5, 222.5, -7.5, 4.5)
pt3dadd(666, 223, -7.5, 5.2)
pt3dadd(669, 223.5, -7.5, 5)
pt3dadd(672.5, 224.5, -7.5, 4.9)
pt3dadd(676.5, 225.5, -7.5, 4.9)
pt3dadd(678.5, 227, -7.5, 4.9)
pt3dadd(681.5, 228, -7.5, 5.2)
pt3dadd(684, 230, -7.5, 6.2)
pt3dadd(686.5, 233, -7.5, 4.1)
pt3dadd(687, 233, -7.5, 3.5)
pt3dadd(690, 234, -7.5, 4)
pt3dadd(693, 237, -7.5, 3.7)
pt3dadd(695.5, 237, -7.5, 3.3)
pt3dadd(697.5, 238, -6, 3.8)
pt3dadd(700, 238.5, -6, 4.4)
pt3dadd(704, 238.5, -6, 4.8)
pt3dadd(707.5, 240, -6, 5)
pt3dadd(711, 240, -6, 5.1)
pt3dadd(713.5, 240, -6, 5.1)
pt3dadd(715.5, 239, -7, 4.3)
pt3dadd(716.5, 238.5, -3, 3.6)
}
}
proc shape3d_73() {
dend[224] { pt3dadd(720, 238, -3, 3.9)
}
dend[225] {pt3dclear()
pt3dadd(720, 238, -3, 3.9)
pt3dadd(725, 233.5, -6, 1.6)
pt3dadd(729.5, 233, -6, 1.6)
pt3dadd(732.5, 232, -6, 1.8)
pt3dadd(738, 231, -7, 1.1)
pt3dadd(742.5, 230, -7, 1.1)
pt3dadd(745, 228.5, -7, 1.3)
pt3dadd(748, 226, -7, 1.6)
}
dend[226] {pt3dclear()
pt3dadd(748, 226, -7, 1.6)
pt3dadd(748, 223.5, -6, 0.7)
pt3dadd(751.5, 219, -6, 0.7)
pt3dadd(754, 219, -6, 0.7)
pt3dadd(758.5, 219, -8.5, 0.9)
pt3dadd(761.5, 218, -7.5, 1.2)
pt3dadd(763.5, 217.5, -9.5, 0.6)
pt3dadd(765, 217.5, -7, 1.4)
pt3dadd(770, 218, -7.5, 1.4)
pt3dadd(773, 216, -7.5, 1.2)
pt3dadd(774.5, 215.5, -9.5, 1.2)
pt3dadd(777.5, 217.5, -9.5, 1.5)
pt3dadd(779, 217.5, -9.5, 1.3)
pt3dadd(782, 220.5, -7.5, 1.3)
pt3dadd(785.5, 220.5, -7.5, 1.3)
pt3dadd(790.5, 221.5, -7.5, 1.3)
pt3dadd(794, 221.5, -7.5, 1.3)
pt3dadd(797, 222, -7.5, 1.3)
pt3dadd(800, 222, -7.5, 1.3)
pt3dadd(804, 222, -7.5, 1.3)
pt3dadd(808.5, 222, -7.5, 1.3)
pt3dadd(815, 222, -7.5, 1.3)
pt3dadd(817, 222, -7.5, 1.3)
pt3dadd(823.5, 222, -9.5, 1.3)
pt3dadd(826.5, 223.5, -9.5, 1.3)
pt3dadd(827.5, 223.5, -9.5, 1.2)
pt3dadd(829, 224.5, -9.5, 1.8)
pt3dadd(831, 224.5, -9.5, 2.4)
pt3dadd(832.5, 224.5, -9.5, 1.2)
pt3dadd(835.5, 224.5, -10.5, 0.4)
pt3dadd(837.5, 223.5, -10.5, 0.4)
pt3dadd(841, 223.5, -10.5, 0.4)
pt3dadd(842.5, 223, -11.5, 0.5)
pt3dadd(845, 222, -12, 0.5)
pt3dadd(847.5, 221, -11.5, 0.5)
pt3dadd(850, 220, -11.5, 0.5)
pt3dadd(851.5, 220, -11.5, 1)
pt3dadd(853, 220, -10.5, 1.3)
pt3dadd(856, 220, -10.5, 1.7)
pt3dadd(858.5, 220, -10.5, 1.7)
pt3dadd(859.5, 220, -12, 0.6)
pt3dadd(862.5, 222, -9.5, 0.6)
pt3dadd(865, 223.5, -9.5, 0.6)
pt3dadd(867, 222, -9.5, 0.6)
pt3dadd(869.5, 223, -9.5, 0.6)
pt3dadd(871, 223, -9.5, 1.2)
pt3dadd(872.5, 221.5, -9.5, 2)
pt3dadd(874.5, 221.5, -10.5, 1)
pt3dadd(877, 221.5, -9.5, 0.3)
pt3dadd(878.5, 221, -8.5, 0.3)
pt3dadd(879.5, 220.5, -8.5, 1.2)
pt3dadd(880.5, 220, -8.5, 1.6)
pt3dadd(882, 218, -8.5, 2.1)
pt3dadd(885.5, 219, -8.5, 1.2)
pt3dadd(887, 219, -9.5, 0.6)
pt3dadd(890, 219, -9.5, 0.6)
pt3dadd(891, 219, -9.5, 0.6)
pt3dadd(893, 219, -9.5, 1.7)
pt3dadd(894.5, 219, -9.5, 2.2)
pt3dadd(897, 219, -9.5, 0.6)
pt3dadd(900, 219, -10.5, 0.5)
pt3dadd(902, 219.5, -10.5, 0.5)
pt3dadd(904, 219.5, -7.5, 1.3)
pt3dadd(906, 219.5, -7.5, 0.3)
pt3dadd(908.5, 221, -8.5, 0.3)
pt3dadd(909.5, 221, -8.5, 1.7)
pt3dadd(911.5, 219.5, -7, 1.3)
pt3dadd(913, 219.5, -7, 0.2)
pt3dadd(915, 219.5, -7, 0.2)
pt3dadd(915.5, 219, -5, 1.6)
pt3dadd(917, 218.5, -5, 2)
pt3dadd(918.5, 218.5, -7, 0.2)
pt3dadd(920.5, 218.5, -7, 0.2)
pt3dadd(924, 218.5, -7, 0.2)
pt3dadd(925.5, 219, -6, 1.6)
pt3dadd(926, 219, -7, 1.8)
pt3dadd(927.5, 219.5, -7.5, 0.7)
pt3dadd(928, 220.5, -7, 0.2)
pt3dadd(928.5, 220.5, -7.5, 0.2)
pt3dadd(931, 219, -7, 1.8)
pt3dadd(933.5, 219, -8.5, 0.3)
pt3dadd(936.5, 218, -9.5, 0.3)
pt3dadd(940.5, 217.5, -7.5, 0.3)
pt3dadd(942.5, 216, -3, 1.4)
pt3dadd(943.5, 216, -3, 1.8)
pt3dadd(946, 215.5, -2, 1.2)
pt3dadd(947, 215.5, -2, 0.3)
pt3dadd(950.5, 212.5, -2, 0.3)
pt3dadd(952.5, 213, -2, 1.7)
pt3dadd(955, 213, -2, 2.8)
pt3dadd(956.5, 213, -2, 1.5)
pt3dadd(959, 213, -2, 0.3)
pt3dadd(963.5, 214.5, -3, 0.3)
pt3dadd(966.5, 214.5, -3, 0.3)
pt3dadd(967.5, 211.5, -2, 0.3)
pt3dadd(969.5, 211.5, -2, 1.6)
pt3dadd(971, 211, -2, 2)
pt3dadd(973, 211, -3, 0.5)
pt3dadd(976.5, 211, -3, 0.5)
pt3dadd(978, 210, -2, 1.7)
pt3dadd(978.5, 209, -2, 2.1)
pt3dadd(980, 209, -3, 0.1)
pt3dadd(984, 209, -2, 0.2)
pt3dadd(986.5, 208, -2, 0.5)
pt3dadd(988.5, 206, -2, 0.7)
pt3dadd(990, 206, -2, 0.7)
pt3dadd(993.5, 205.5, -2, 0.7)
pt3dadd(995.5, 202, -2, 0.7)
pt3dadd(997.5, 200.5, -4, 0.7)
pt3dadd(999, 199, -4, 0.7)
pt3dadd(1001, 198, -5, 0.7)
pt3dadd(1003, 195, -5, 0.7)
pt3dadd(1006, 195, -6, 0.7)
pt3dadd(1011, 193, -5, 0.7)
pt3dadd(1013, 189.5, -5, 0.7)
pt3dadd(1016, 188.5, -5, 0.7)
pt3dadd(1016.5, 186.5, -6, 0.6)
pt3dadd(1017.5, 186.5, -6, 0.6)
pt3dadd(1022.5, 185, -7, 0.6)
pt3dadd(1024.5, 182, -6, 0.1)
pt3dadd(1026, 182, -5, 2)
pt3dadd(1027, 180, -5, 0.1)
pt3dadd(1030, 179, -6, 0.1)
pt3dadd(1033.5, 179, -4, 3.1)
pt3dadd(1034, 176, -5, 0.1)
pt3dadd(1034.5, 174.5, -5, 0.1)
pt3dadd(1034.5, 171.5, -5, 1.2)
pt3dadd(1035, 170.5, -5, 0.1)
pt3dadd(1033, 168.5, -5, 0.1)
pt3dadd(1034.5, 168.5, -5, 0.1)
pt3dadd(1035.5, 165.5, -8.5, 1.8)
pt3dadd(1036.5, 164, -7, 0.4)
pt3dadd(1037.5, 161.5, -7, 1.1)
pt3dadd(1036.5, 159.5, -7, 0.2)
pt3dadd(1039.5, 159.5, -3, 0.3)
pt3dadd(1041.5, 159, -2, 0.2)
pt3dadd(1045.5, 157, -2, 0.1)
pt3dadd(1046.5, 156, -2, 0.1)
pt3dadd(1047.5, 154, -2, 1.6)
pt3dadd(1050.5, 153, -3, 0.3)
pt3dadd(1051.5, 151.5, -3, 0.3)
pt3dadd(1053.5, 150.5, -3, 0.3)
pt3dadd(1053.5, 148.5, -4, 1.5)
pt3dadd(1054.5, 146, -4, 0.2)
pt3dadd(1055, 143.5, -4, 0.1)
pt3dadd(1057, 141, -4, 0.1)
pt3dadd(1056.5, 140.5, -2, 1.1)
pt3dadd(1058.5, 139, -1, 0.1)
pt3dadd(1058.5, 138, -1, 0.1)
pt3dadd(1060.5, 135.5, -1, 1.2)
pt3dadd(1062.5, 134.5, -3, 0.1)
pt3dadd(1065.5, 134, -3, 0.1)
pt3dadd(1069, 132.5, -3, 0.1)
pt3dadd(1070.5, 131, -2, 1.3)
pt3dadd(1072.5, 130, -6, 0.1)
pt3dadd(1073, 130, -6, 0.1)
pt3dadd(1075.5, 130, -2, 1.2)
pt3dadd(1076.5, 130, -4, 0.1)
pt3dadd(1078.5, 130, -4, 0.1)
pt3dadd(1079.5, 130, -4, 1.3)
pt3dadd(1079.5, 130, -5, 0.1)
pt3dadd(1082, 130, -5, 0.1)
pt3dadd(1084.5, 130, -4, 1.2)
pt3dadd(1086, 130, -7, 0.1)
pt3dadd(1086, 130.5, -4, 0.9)
pt3dadd(1088, 132.5, -4, 0.6)
pt3dadd(1089.5, 132.5, -4, 0.6)
pt3dadd(1090, 134.5, -6, 0.1)
pt3dadd(1092, 134.5, -7, 0.1)
pt3dadd(1092.5, 135, -3, 0.8)
pt3dadd(1094, 136, -7, 0.1)
pt3dadd(1096.5, 136.5, -3, 0.1)
pt3dadd(1098.5, 136, -2, 1)
pt3dadd(1100, 135, -7, 0.1)
pt3dadd(1101, 135, -1, 0.1)
pt3dadd(1103.5, 136, -1, 1.2)
pt3dadd(1106, 136, -4, 0.1)
pt3dadd(1105.5, 135.5, -2, 0.1)
}
dend[227] {pt3dclear()
pt3dadd(748, 226, -7, 1.6)
pt3dadd(749.5, 226.5, -7.5, 0.5)
pt3dadd(752, 230.5, -8.5, 0.5)
pt3dadd(755.5, 231, -8.5, 0.5)
pt3dadd(757, 233.5, -8.5, 0.7)
pt3dadd(757, 235, -7, 1.3)
pt3dadd(759, 234, -9.5, 0.8)
pt3dadd(762.5, 234, -12, 0.8)
pt3dadd(763.5, 234, -11.5, 0.8)
}
dend[228] {pt3dclear()
pt3dadd(763.5, 234, -11.5, 0.8)
pt3dadd(766.5, 233, -15, 0.1)
pt3dadd(767.5, 235.5, -14, 0.1)
pt3dadd(769, 235.5, -14, 0.1)
}
}
proc shape3d_74() {
dend[228] { pt3dadd(770, 235.5, -14, 0.1)
pt3dadd(772.5, 234.5, -14, 0.1)
pt3dadd(776, 234.5, -14, 0.1)
pt3dadd(778, 233.5, -16, 0.1)
pt3dadd(781, 234.5, -16, 0.1)
pt3dadd(782.5, 233, -16, 0.1)
pt3dadd(786, 233, -17, 0.1)
pt3dadd(787.5, 232.5, -17, 0.9)
pt3dadd(788.5, 232.5, -17, 1.3)
pt3dadd(791, 233, -17, 0.1)
pt3dadd(792.5, 233, -17, 0.1)
pt3dadd(793.5, 231.5, -16, 0.7)
pt3dadd(795.5, 231, -19.5, 0.1)
pt3dadd(796.5, 231, -19.5, 0.1)
pt3dadd(797, 231, -17, 0.9)
pt3dadd(801, 231.5, -18.5, 0.1)
pt3dadd(804, 232, -18.5, 0.1)
pt3dadd(804.5, 232, -17, 1.1)
pt3dadd(807.5, 232.5, -18.5, 0.1)
pt3dadd(808.5, 232.5, -17, 0.1)
pt3dadd(810, 232.5, -17, 1.5)
pt3dadd(812, 232.5, -17, 0.1)
pt3dadd(813.5, 232.5, -17, 0.1)
pt3dadd(816, 233, -17, 1.3)
pt3dadd(817.5, 232.5, -19.5, 0.1)
pt3dadd(819, 231.5, -19.5, 0.1)
pt3dadd(821.5, 231, -19.5, 0.8)
pt3dadd(823, 231.5, -19.5, 0.5)
pt3dadd(824, 231.5, -19.5, 0.9)
pt3dadd(826.5, 231.5, -19.5, 1.4)
pt3dadd(827.5, 231.5, -19.5, 0.4)
pt3dadd(828.5, 231.5, -19.5, 0.1)
pt3dadd(830.5, 229, -18.5, 0.1)
}
dend[229] {pt3dclear()
pt3dadd(763.5, 234, -11.5, 0.8)
pt3dadd(769.5, 234, -11.5, 2.8)
pt3dadd(771.5, 233.5, -11.5, 2.3)
pt3dadd(773, 233, -14, 2.5)
pt3dadd(775, 233, -14, 2.9)
pt3dadd(777, 232.5, -11.5, 3.3)
pt3dadd(779, 230, -3, 4)
pt3dadd(783, 230, -14, 4)
pt3dadd(786, 230, -14, 3.4)
pt3dadd(788, 229.5, -14, 3.3)
pt3dadd(791, 229, -14, 2.8)
pt3dadd(793, 229.5, -14, 2.5)
pt3dadd(795, 229.5, -17, 2.6)
pt3dadd(797.5, 228.5, -14, 3.2)
pt3dadd(798, 226.5, -14, 3.2)
pt3dadd(801, 229.5, -8.5, 2.6)
pt3dadd(804, 230, -8.5, 3.3)
pt3dadd(805.5, 232.5, -14, 3.6)
pt3dadd(808, 232.5, -14, 3.2)
pt3dadd(811, 235.5, -5.5, 3.2)
pt3dadd(814.5, 235.5, -5.5, 3.2)
pt3dadd(817, 236.5, -3, 2.5)
pt3dadd(821.5, 238.5, -5.5, 2.8)
pt3dadd(824, 240, -5.5, 3.3)
pt3dadd(826, 241, -5.5, 3.8)
pt3dadd(829, 242, -8.5, 5.5)
}
dend[230] {pt3dclear()
pt3dadd(829, 242, -8.5, 5.5)
pt3dadd(830.5, 237.5, -11.5, 3.1)
pt3dadd(833.5, 236.5, -14, 2.3)
pt3dadd(841.5, 233, -8.5, 2.6)
pt3dadd(847.5, 231.5, -8.5, 2.6)
pt3dadd(849.5, 230.5, -5.5, 1.8)
pt3dadd(852, 228.5, -8.5, 3.1)
pt3dadd(854.5, 228.5, -8.5, 1.5)
}
dend[231] {pt3dclear()
pt3dadd(829, 242, -8.5, 5.5)
pt3dadd(831.5, 247, -5.5, 1.2)
pt3dadd(834, 248.5, -5.5, 1.3)
pt3dadd(836, 251, -5.5, 1.6)
pt3dadd(837, 253, -5.5, 1.5)
pt3dadd(837.5, 253.5, -3, 1.2)
pt3dadd(839.5, 254.5, -3, 1.5)
pt3dadd(841.5, 256.5, 0, 2)
pt3dadd(843, 258.5, 0, 2.4)
pt3dadd(844.5, 259, 0, 1.6)
pt3dadd(846.5, 260.5, 0, 1.5)
pt3dadd(848.5, 262, 0, 1.4)
pt3dadd(851, 264.5, -3, 1.5)
pt3dadd(853, 265.5, -3, 1.7)
pt3dadd(855, 267.5, -3, 1.8)
pt3dadd(857.5, 267.5, 0, 2.2)
pt3dadd(860, 267.5, 0, 2.5)
pt3dadd(862, 267.5, 0, 2.8)
pt3dadd(864.5, 267.5, 0, 2.8)
pt3dadd(866.5, 268, 0, 2.8)
pt3dadd(868, 269, 0, 1.3)
pt3dadd(871, 269, 0, 1.6)
pt3dadd(872.5, 268, 0, 2.4)
pt3dadd(875.5, 269, 2.5, 1.6)
pt3dadd(877.5, 268.5, 2.5, 0.9)
pt3dadd(881, 268, 0, 0.9)
pt3dadd(885, 268, 0, 0.9)
pt3dadd(886, 267.5, 0, 1.3)
pt3dadd(889.5, 267, -3, 1.1)
pt3dadd(892.5, 267, -3, 1.1)
pt3dadd(896, 264, 0, 1.3)
pt3dadd(899.5, 262.5, 0, 1.3)
pt3dadd(902, 261.5, -3, 1.6)
pt3dadd(904, 261.5, -3, 1.1)
pt3dadd(907.5, 260.5, 2.5, 1.1)
pt3dadd(910.5, 259.5, 0, 1.1)
pt3dadd(913.5, 259, 0, 1.1)
pt3dadd(917, 258.5, 0, 1.1)
pt3dadd(919, 256.5, 0, 1.1)
pt3dadd(922.5, 256.5, 0, 1.3)
pt3dadd(926, 256.5, 0, 1.3)
pt3dadd(926, 255, 0, 1.3)
pt3dadd(930, 254, -5.5, 1.3)
pt3dadd(934, 252.5, -5.5, 1.3)
pt3dadd(936.5, 253, -5.5, 1.2)
pt3dadd(940, 253, -5.5, 1.2)
pt3dadd(942.5, 253, -5.5, 1.5)
pt3dadd(945, 251.5, -5.5, 1.5)
pt3dadd(947, 249.5, -5.5, 1.5)
pt3dadd(951.5, 249, -5.5, 1.5)
pt3dadd(954.5, 247.5, -5.5, 1.3)
pt3dadd(956.5, 247.5, -5.5, 1.4)
pt3dadd(959.5, 245, -8.5, 1.6)
pt3dadd(961.5, 244, -8.5, 1.7)
pt3dadd(964, 242.5, -8.5, 1.3)
pt3dadd(967, 241.5, -8.5, 1.1)
pt3dadd(970, 238, -11.5, 1.1)
pt3dadd(972, 238, -11.5, 1.1)
pt3dadd(973.5, 238, -11.5, 1.9)
pt3dadd(976, 236, -11.5, 2.7)
pt3dadd(979, 236, -11.5, 2)
pt3dadd(981.5, 235, -11.5, 1)
pt3dadd(983.5, 235, -11.5, 1)
pt3dadd(985.5, 234, -5.5, 1.6)
pt3dadd(987, 233.5, -8.5, 1.9)
pt3dadd(989.5, 232, -8.5, 1.9)
pt3dadd(991.5, 230.5, -8.5, 0.8)
pt3dadd(997.5, 231, -8.5, 1.2)
pt3dadd(1001, 231, -11.5, 1.2)
pt3dadd(1005, 231, -11.5, 1.2)
pt3dadd(1008.5, 231, -11.5, 1.2)
pt3dadd(1010, 230, -11.5, 0.8)
pt3dadd(1016, 231.5, -14, 0.7)
pt3dadd(1017.5, 231, -14, 0.7)
pt3dadd(1020.5, 230.5, -14, 1.3)
pt3dadd(1022.5, 228, -11.5, 1.5)
pt3dadd(1026, 226.5, -11.5, 1.4)
pt3dadd(1028.5, 226.5, -19.5, 0.8)
pt3dadd(1032, 225, -14, 0.7)
pt3dadd(1037.5, 223, -14, 0.7)
pt3dadd(1038.5, 222, -14, 0.7)
pt3dadd(1042.5, 221.5, -14, 0.9)
pt3dadd(1045.5, 218.5, -14, 0.9)
pt3dadd(1054.5, 218, -14, 0.9)
pt3dadd(1059.5, 218, -14, 0.9)
pt3dadd(1062, 217.5, -14, 0.9)
pt3dadd(1069.5, 213.5, -17, 0.9)
}
dend[232] {pt3dclear()
pt3dadd(720, 238, -3, 3.9)
pt3dadd(724, 237.5, -2, 3.3)
pt3dadd(728.5, 236, -5, 4)
pt3dadd(733, 236, -5, 4)
pt3dadd(735.5, 234.5, -2, 3.5)
pt3dadd(739.5, 234, -1, 3.8)
pt3dadd(742, 233, 0, 3.7)
pt3dadd(745, 233, -1, 3.8)
pt3dadd(749.5, 230.5, -1, 3.6)
pt3dadd(751, 229.5, -1, 3.9)
pt3dadd(755, 226.5, 1, 4.4)
}
dend[233] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 6.2)
pt3dadd(72, 43, -17.5, 6.2)
pt3dadd(74, 40, -17.5, 6.1)
pt3dadd(76, 38, -16.5, 8.2)
pt3dadd(78.5, 36, -17.5, 8.2)
pt3dadd(80.5, 32.5, -18.5, 7.1)
pt3dadd(84, 29, -19.5, 7.3)
pt3dadd(87, 23.5, -18.5, 7.4)
pt3dadd(86, 22, -18.5, 7.4)
pt3dadd(85.5, 18, -22, 7.4)
pt3dadd(87.5, 16, -20.5, 7.4)
pt3dadd(89, 12.5, -19.5, 7.4)
pt3dadd(89.5, 9.5, -20.5, 6.3)
pt3dadd(89.5, 8.5, -22, 6.5)
pt3dadd(91.5, 5.5, -22, 5.7)
pt3dadd(92.5, 5, -24, 6.3)
pt3dadd(95, 2.5, -25, 5.9)
pt3dadd(98.5, 1.5, -26.5, 6.5)
pt3dadd(102, -0.5, -26.5, 6.5)
pt3dadd(103.5, -2.5, -26.5, 7.4)
pt3dadd(106.5, -2.5, -26.5, 7.8)
pt3dadd(112.5, -5, -28.5, 7.9)
pt3dadd(115, -5.5, -26.5, 7.9)
pt3dadd(118.5, -7.5, -26.5, 8.2)
pt3dadd(122, -7, -26.5, 8.2)
pt3dadd(126.5, -8, -27.5, 7.8)
pt3dadd(129, -9, -29.5, 7.8)
pt3dadd(135.5, -9, -30.5, 5.3)
pt3dadd(141, -9, -31, 5.3)
pt3dadd(146, -11.5, -29.5, 4.6)
pt3dadd(148.5, -11.5, -29.5, 4.4)
pt3dadd(152, -9.5, -30.5, 4.9)
pt3dadd(156.5, -9.5, -31, 5.7)
pt3dadd(161, -9.5, -31, 5.2)
pt3dadd(163.5, -9.5, -31, 5.2)
}
}
proc shape3d_75() {
dend[233] { pt3dadd(165.5, -9.5, -31, 5.3)
pt3dadd(169, -9.5, -31, 8.8)
}
dend[234] {pt3dclear()
pt3dadd(169, -9.5, -31, 8.8)
pt3dadd(167, -14, -29.5, 3.2)
pt3dadd(172.5, -16.5, -29.5, 3.4)
pt3dadd(176, -18.5, -29.5, 4.5)
pt3dadd(178, -21.5, -31.5, 3.6)
pt3dadd(181.5, -21.5, -31.5, 3.4)
pt3dadd(184.5, -23.5, -29, 3.8)
pt3dadd(188, -26, -31, 4.6)
pt3dadd(192, -26, -31, 4.7)
pt3dadd(196.5, -29, -31.5, 4.7)
pt3dadd(200, -30, -32.5, 4.6)
pt3dadd(203.5, -31, -31.5, 4.6)
pt3dadd(207, -34, -31.5, 4.2)
pt3dadd(209, -34, -31, 4.3)
pt3dadd(210.5, -36.5, -31, 4.9)
}
dend[235] {pt3dclear()
pt3dadd(210.5, -36.5, -31, 4.9)
pt3dadd(218.5, -38, -31, 2.3)
pt3dadd(222.5, -38, -31, 2.3)
pt3dadd(226, -41.5, -31, 2.5)
pt3dadd(227.5, -46, -31, 2.8)
pt3dadd(231, -50, -31.5, 2.8)
pt3dadd(232.5, -51.5, -31, 2.2)
pt3dadd(234.5, -54.5, -31, 2.2)
pt3dadd(236, -56.5, -31, 3.7)
pt3dadd(238.5, -58, -32.5, 4.1)
pt3dadd(240.5, -59, -32.5, 4.5)
pt3dadd(244, -61.5, -31.5, 3.8)
pt3dadd(247.5, -62, -31.5, 4.6)
pt3dadd(251, -63.5, -32.5, 6)
pt3dadd(254, -65, -33.5, 6.5)
}
dend[236] {pt3dclear()
pt3dadd(254, -65, -33.5, 6.5)
pt3dadd(258.5, -65.5, -33.5, 1.9)
pt3dadd(262.5, -65.5, -34.5, 1.5)
pt3dadd(265.5, -65.5, -32.5, 1.4)
pt3dadd(267.5, -65.5, -33.5, 1.8)
pt3dadd(269.5, -65.5, -33.5, 1.8)
pt3dadd(275, -65.5, -32.5, 1.8)
pt3dadd(275, -65.5, -33, 2.5)
pt3dadd(279, -64.5, -30.5, 3.1)
pt3dadd(280.5, -63.5, -31, 1.8)
pt3dadd(282.5, -63.5, -31, 2.5)
pt3dadd(285, -62.5, -30.5, 2.9)
pt3dadd(287, -61.5, -30.5, 2.9)
pt3dadd(289, -60.5, -31, 3.3)
pt3dadd(290, -59, -31, 2.4)
pt3dadd(292.5, -57.5, -31, 1.7)
pt3dadd(293.5, -57.5, -31, 1.1)
pt3dadd(295.5, -56.5, -31, 1.4)
pt3dadd(297, -56.5, -31, 1.7)
pt3dadd(299, -56.5, -31, 0.3)
pt3dadd(300, -56.5, -31, 0.3)
pt3dadd(301.5, -55, -31, 1.8)
pt3dadd(304, -54, -29.5, 2.3)
pt3dadd(306.5, -54, -30.5, 2.8)
pt3dadd(307.5, -54, -29, 3.1)
pt3dadd(310, -54, -29.5, 1.8)
pt3dadd(313, -53.5, -29, 1)
pt3dadd(314, -53.5, -29, 0.7)
pt3dadd(316, -53.5, -29, 1.4)
pt3dadd(317.5, -53.5, -29, 1.8)
pt3dadd(318.5, -54.5, -29, 1.4)
pt3dadd(320, -54.5, -29, 1)
pt3dadd(321.5, -54.5, -29, 1)
pt3dadd(323.5, -55.5, -28.5, 1.4)
pt3dadd(324.5, -56.5, -28.5, 2.1)
pt3dadd(326, -56.5, -28.5, 2.4)
pt3dadd(328, -56.5, -28.5, 2.4)
pt3dadd(331, -56.5, -27.5, 1.1)
pt3dadd(334.5, -56.5, -27.5, 1.4)
pt3dadd(335.5, -56.5, -27.5, 1.4)
pt3dadd(338.5, -56, -28.5, 1.8)
pt3dadd(341, -56, -27.5, 2.4)
pt3dadd(344.5, -53.5, -27, 1.6)
pt3dadd(349.5, -53.5, -28.5, 1.2)
pt3dadd(351.5, -53.5, -27, 1.1)
pt3dadd(353, -53, -27.5, 1.4)
pt3dadd(355, -53, -27.5, 1.9)
pt3dadd(356, -52.5, -27, 2.3)
pt3dadd(358.5, -52.5, -26.5, 3.3)
pt3dadd(362, -52.5, -27, 1.8)
pt3dadd(363.5, -52.5, -27, 1.6)
pt3dadd(366, -52.5, -27, 1.4)
pt3dadd(369.5, -53.5, -27, 1.1)
pt3dadd(371, -53.5, -27, 1.1)
pt3dadd(372.5, -53.5, -27, 2.5)
pt3dadd(375, -55, -27, 3.7)
pt3dadd(378, -55, -27, 2.8)
pt3dadd(379, -55, -27, 1.2)
pt3dadd(381, -56, -27, 0.9)
pt3dadd(385, -58, -27, 1.1)
pt3dadd(389, -58, -27, 1.1)
pt3dadd(394, -59.5, -27, 1.1)
pt3dadd(397.5, -61.5, -26.5, 1)
pt3dadd(400, -62.5, -27, 1)
pt3dadd(406.5, -65.5, -27, 1)
pt3dadd(409, -67, -27, 1.2)
pt3dadd(415, -67, -27, 1.2)
pt3dadd(419.5, -69.5, -27, 1.2)
pt3dadd(421, -69.5, -27, 1.2)
pt3dadd(424.5, -70.5, -27, 1.2)
pt3dadd(427.5, -70.5, -27.5, 1.2)
pt3dadd(430.5, -71, -28.5, 1.4)
pt3dadd(433, -72, -29, 1.4)
pt3dadd(435, -73.5, -28.5, 1.3)
pt3dadd(437, -73.5, -27, 1.7)
pt3dadd(439, -73.5, -27, 2.6)
pt3dadd(442, -75, -27.5, 1.8)
pt3dadd(444, -75, -28.5, 1.1)
pt3dadd(446, -75, -28.5, 0.9)
pt3dadd(449.5, -74.5, -27.5, 0.9)
pt3dadd(452.5, -74.5, -27.5, 0.9)
pt3dadd(456, -74.5, -27.5, 0.9)
pt3dadd(457, -74.5, -27.5, 1.2)
pt3dadd(458.5, -74.5, -27.5, 1.2)
pt3dadd(461.5, -75.5, -27.5, 2.4)
pt3dadd(465.5, -78, -27.5, 2.1)
pt3dadd(466, -78, -27.5, 0.9)
pt3dadd(469, -78, -27.5, 0.9)
pt3dadd(471.5, -78.5, -27.5, 1.7)
pt3dadd(474.5, -79.5, -27.5, 2.4)
pt3dadd(477, -79.5, -27.5, 1.9)
pt3dadd(479.5, -79.5, -28.5, 0.6)
pt3dadd(482, -80.5, -27.5, 1.2)
pt3dadd(484.5, -80.5, -27.5, 1.8)
pt3dadd(487, -81.5, -27, 4.4)
}
dend[237] {pt3dclear()
pt3dadd(487, -81.5, -27, 4.4)
pt3dadd(493, -83.5, -25.5, 0.7)
pt3dadd(492, -86.5, -25.5, 0.9)
pt3dadd(492.5, -88.5, -25.5, 2.1)
pt3dadd(494.5, -88.5, -25.5, 3.8)
pt3dadd(496, -88.5, -25.5, 1.1)
pt3dadd(498, -89.5, -25.5, 0.1)
pt3dadd(500, -89.5, -25.5, 0.1)
pt3dadd(503, -90.5, -25.5, 0.1)
pt3dadd(505.5, -90.5, -26.5, 0.1)
pt3dadd(509, -92, -24.5, 0.1)
pt3dadd(511, -93.5, -24.5, 0.1)
pt3dadd(512.5, -93.5, -24.5, 1.4)
pt3dadd(514.5, -94, -24.5, 2.7)
pt3dadd(517, -94, -23.5, 0.1)
pt3dadd(522.5, -91.5, -23.5, 0.1)
pt3dadd(531, -91.5, -25, 0.1)
pt3dadd(538, -91, -25, 0.1)
pt3dadd(546, -89, -24.5, 0.1)
pt3dadd(556, -89, -24.5, 0.1)
pt3dadd(560, -89, -24.5, 0.1)
pt3dadd(564.5, -89, -24.5, 0.1)
pt3dadd(565.5, -89, -24.5, 0.1)
pt3dadd(567.5, -89, -24.5, 0.1)
pt3dadd(571, -89, -24.5, 0.1)
pt3dadd(572, -89, -24.5, 1.3)
pt3dadd(573, -93.5, -24.5, 0.1)
pt3dadd(574, -95, -24.5, 0.1)
pt3dadd(576, -97, -24.5, 1.6)
pt3dadd(578, -97, -24.5, 0.1)
pt3dadd(582, -98.5, -24.5, 0.1)
pt3dadd(584.5, -100.5, -24.5, 1.2)
pt3dadd(588.5, -100.5, -24.5, 0.1)
pt3dadd(591.5, -101, -25, 0.1)
pt3dadd(593.5, -101, -24.5, 1.1)
pt3dadd(595, -103, -25, 0.1)
pt3dadd(596, -103, -25, 0.1)
pt3dadd(598, -103, -24.5, 1.1)
pt3dadd(599, -103, -25.5, 0.1)
pt3dadd(602.5, -103, -25.5, 0.1)
pt3dadd(604.5, -103, -25.5, 1.6)
pt3dadd(606.5, -105, -25.5, 0.1)
pt3dadd(608, -103.5, -25, 0.1)
pt3dadd(609.5, -104, -25, 1.3)
pt3dadd(611.5, -103.5, -25, 0.1)
}
dend[238] {pt3dclear()
pt3dadd(487, -81.5, -27, 4.4)
pt3dadd(493.5, -81.5, -27, 0.8)
pt3dadd(496, -81.5, -28.5, 0.8)
pt3dadd(498, -81.5, -30.5, 0.8)
pt3dadd(500.5, -81.5, -27.5, 2.8)
pt3dadd(504.5, -81.5, -29.5, 0.4)
pt3dadd(507, -81.5, -30.5, 0.3)
pt3dadd(509, -80, -28.5, 0.3)
pt3dadd(511, -80, -27.5, 1.6)
pt3dadd(513, -79.5, -28.5, 2.1)
pt3dadd(515, -79.5, -28.5, 1.2)
pt3dadd(516, -79.5, -29, 0.6)
pt3dadd(520, -79.5, -29, 1.5)
pt3dadd(524.5, -79.5, -29, 0.5)
pt3dadd(526, -79, -29, 1.4)
pt3dadd(527.5, -78, -29, 0.5)
pt3dadd(531, -78, -29, 0.5)
pt3dadd(532.5, -78, -27.5, 1.5)
pt3dadd(536, -77.5, -29.5, 0.4)
pt3dadd(540, -75, -30.5, 0.4)
pt3dadd(546.5, -72, -30.5, 0.4)
pt3dadd(548, -72, -30.5, 0.4)
pt3dadd(551, -70.5, -29, 2.1)
pt3dadd(556, -70.5, -29.5, 0.2)
pt3dadd(560, -70.5, -29.5, 0.2)
pt3dadd(563, -70.5, -29.5, 1)
pt3dadd(564, -70.5, -29.5, 1.6)
pt3dadd(565.5, -70.5, -29.5, 0.6)
}
}
proc shape3d_76() {
dend[238] { pt3dadd(567, -70.5, -29, 0.3)
pt3dadd(569, -70.5, -29, 2.2)
pt3dadd(572, -70.5, -30.5, 0.2)
pt3dadd(573, -71.5, -29.5, 0.8)
pt3dadd(572.5, -74, -29, 1.3)
pt3dadd(577.5, -76.5, -29.5, 0.1)
pt3dadd(578.5, -76.5, -29.5, 0.7)
pt3dadd(581.5, -77.5, -31, 0.1)
pt3dadd(583.5, -77.5, -31, 0.1)
pt3dadd(586.5, -76.5, -31, 1.4)
pt3dadd(588.5, -75, -29.5, 0.1)
pt3dadd(592.5, -75, -33, 0.1)
pt3dadd(598.5, -75, -34.5, 0.1)
pt3dadd(600.5, -73.5, -41, 1.1)
pt3dadd(602, -73.5, -34.5, 1.4)
pt3dadd(603.5, -73.5, -41, 0.1)
pt3dadd(606.5, -73.5, -41, 0.1)
pt3dadd(607, -73.5, -34.5, 0.9)
pt3dadd(608, -74.5, -34.5, 1.6)
pt3dadd(610.5, -74, -34.5, 0.7)
pt3dadd(611.5, -74, -34.5, 0.1)
pt3dadd(614, -75.5, -41, 0.1)
pt3dadd(615.5, -75.5, -41, 0.1)
pt3dadd(617, -76, -41, 0.1)
pt3dadd(618.5, -76, -41, 1.1)
pt3dadd(619.5, -77.5, -41, 1.6)
pt3dadd(621.5, -78, -41, 0.8)
pt3dadd(623, -78, -41, 0.2)
pt3dadd(625.5, -77.5, -47, 0.2)
pt3dadd(626.5, -77, -34.5, 0.2)
pt3dadd(627.5, -75.5, -41, 0.1)
pt3dadd(628, -75.5, -41, 0.1)
pt3dadd(629, -74, -41, 0.9)
pt3dadd(630.5, -74, -41, 1)
pt3dadd(632, -73, -41, 0.3)
pt3dadd(633, -73, -41, 0.1)
pt3dadd(634.5, -73, -41, 0.9)
pt3dadd(635.5, -73, -41, 1.3)
pt3dadd(636, -73, -41, 0.7)
pt3dadd(637, -73, -41, 0.1)
pt3dadd(638, -72, -41, 0.1)
pt3dadd(639.5, -72, -41, 0.8)
pt3dadd(640.5, -71.5, -41, 1.1)
pt3dadd(641, -71.5, -41, 0.6)
pt3dadd(642.5, -71, -41, 0.6)
pt3dadd(642.5, -70.5, -41, 0.1)
pt3dadd(644.5, -70, -41, 0.1)
pt3dadd(644.5, -69, -41, 0.1)
pt3dadd(645.5, -68.5, -41, 1.4)
pt3dadd(647, -67, -41, 1.8)
pt3dadd(649, -67, -41, 0.1)
pt3dadd(650, -67, -41, 0.1)
pt3dadd(650.5, -67, -41, 1.2)
pt3dadd(653, -66.5, -41, 1.7)
pt3dadd(654.5, -66, -41, 0.8)
pt3dadd(655, -64, -47, 0.1)
pt3dadd(656, -64, -47, 0.1)
pt3dadd(657.5, -62, -47, 0.1)
pt3dadd(658, -62, -47, 1)
pt3dadd(658.5, -61, -47, 1.6)
pt3dadd(659, -59, -47, 1.2)
pt3dadd(660, -59, -47, 0.1)
pt3dadd(663, -57.5, -41, 0.1)
pt3dadd(664.5, -57.5, -41, 0.1)
pt3dadd(667, -57, -41, 0.1)
pt3dadd(669, -56, -47, 1.4)
pt3dadd(671, -56, -41, 3.2)
pt3dadd(672.5, -56, -41, 1.4)
pt3dadd(674.5, -55, -41, 0.1)
pt3dadd(675.5, -55, -41, 0.1)
pt3dadd(678, -54.5, -41, 0.1)
pt3dadd(681, -53.5, -41, 1.3)
pt3dadd(683.5, -51, -47, 0.1)
pt3dadd(684, -51, -47, 0.1)
pt3dadd(686, -51, -47, 0.1)
pt3dadd(687, -50.5, -47, 0.1)
pt3dadd(689, -50, -47, 0.1)
pt3dadd(690, -49.5, -47, 0.1)
pt3dadd(692, -49.5, -47, 1.9)
pt3dadd(694, -47, -47, 0.1)
pt3dadd(696, -47, -47, 0.1)
pt3dadd(698, -47, -47, 1.4)
pt3dadd(699, -47, -47, 0.1)
pt3dadd(700.5, -46.5, -47, 0.1)
pt3dadd(703, -46, -47, 1.1)
pt3dadd(706, -45.5, -47, 0.1)
pt3dadd(706.5, -45, -47, 0.1)
pt3dadd(708.5, -43.5, -47, 1)
pt3dadd(709.5, -42, -47, 0.1)
pt3dadd(710, -40, -47, 0.1)
pt3dadd(710, -38, -47, 0.1)
pt3dadd(712, -38, -47, 0.1)
pt3dadd(713, -35.5, -41, 1)
pt3dadd(714.5, -33, -41, 0.1)
pt3dadd(715, -33, -41, 0.1)
pt3dadd(715.5, -31, -41, 0.3)
pt3dadd(716.5, -30, -41, 0.1)
pt3dadd(717.5, -30, -41, 0.1)
pt3dadd(718, -29, -41, 1.5)
pt3dadd(720.5, -27, -41, 0.1)
pt3dadd(722, -27, -41, 0.1)
pt3dadd(722.5, -27, -41, 0.1)
pt3dadd(725.5, -27.5, -47, 1.2)
pt3dadd(728.5, -27.5, -41, 0.1)
pt3dadd(730, -28, -41, 0.1)
pt3dadd(732, -29.5, -47, 0.1)
}
dend[239] {pt3dclear()
pt3dadd(254, -65, -33.5, 6.5)
pt3dadd(255.5, -70.5, -33, 2.4)
pt3dadd(257.5, -71.5, -33, 2.4)
pt3dadd(260.5, -72.5, -34.5, 2.4)
pt3dadd(263.5, -73, -35, 2.4)
pt3dadd(267, -73, -33.5, 2.5)
pt3dadd(270.5, -72, -34.5, 2.5)
pt3dadd(275, -72, -40.5, 4.3)
pt3dadd(278.5, -71.5, -34.5, 4.3)
pt3dadd(281, -70.5, -40.5, 3.7)
pt3dadd(283, -70.5, -40.5, 3.5)
pt3dadd(286, -69, -40.5, 3.8)
pt3dadd(289, -69, -40.5, 3.8)
pt3dadd(290.5, -69, -40.5, 4.3)
pt3dadd(293.5, -69, -40.5, 5.2)
pt3dadd(295.5, -70, -40.5, 4.3)
pt3dadd(297.5, -70, -40.5, 3.6)
pt3dadd(298.5, -70, -40.5, 2.9)
pt3dadd(300, -70, -40.5, 2.8)
pt3dadd(303, -71.5, -40.5, 2.5)
pt3dadd(306, -71.5, -40.5, 2.7)
pt3dadd(308.5, -72, -40.5, 3.1)
pt3dadd(309.5, -72, -40.5, 3.8)
pt3dadd(315, -73, -47, 4.6)
pt3dadd(317, -73, -47, 4.4)
pt3dadd(318, -74, -47, 3.7)
pt3dadd(320.5, -75, -47, 3.1)
pt3dadd(322.5, -75, -47, 2.5)
pt3dadd(324, -75, -53, 2)
pt3dadd(328.5, -75, -53, 2.1)
pt3dadd(330.5, -74, -53, 2.5)
pt3dadd(333, -74, -53, 2.5)
pt3dadd(334.5, -74, -53, 3.6)
pt3dadd(336, -74, -53, 4)
pt3dadd(338.5, -73, -53, 3.8)
pt3dadd(341, -71.5, -53, 4)
pt3dadd(342.5, -71.5, -47, 4.3)
pt3dadd(346, -70.5, -47, 4.3)
pt3dadd(348.5, -70, -47, 3.2)
pt3dadd(350.5, -68, -47, 2)
pt3dadd(352, -68.5, -47, 1.5)
pt3dadd(355, -68.5, -47, 1.2)
pt3dadd(357, -69, -53, 2.6)
pt3dadd(359, -67, -53, 2.8)
pt3dadd(360.5, -66.5, -53, 3.7)
pt3dadd(363.5, -64.5, -53, 4.9)
pt3dadd(366.5, -64.5, -53, 4.1)
pt3dadd(368, -64.5, -47, 2.5)
pt3dadd(370.5, -64, -47, 1.9)
pt3dadd(371, -64, -47, 1.4)
pt3dadd(374, -64, -47, 2.3)
pt3dadd(376, -64, -47, 3.2)
pt3dadd(377.5, -64, -47, 4.2)
pt3dadd(380.5, -64, -53, 4.3)
pt3dadd(384, -64, -53, 3.5)
pt3dadd(386.5, -64, -53, 2)
pt3dadd(388, -64, -53, 1.6)
pt3dadd(391, -64, -59.5, 1.9)
pt3dadd(393, -64.5, -53, 2.7)
pt3dadd(395.5, -65, -53, 2.5)
pt3dadd(397, -65, -53, 3.4)
pt3dadd(399, -65, -53, 3.8)
pt3dadd(401.5, -64.5, -53, 4.9)
pt3dadd(405, -65, -53, 2.9)
pt3dadd(408, -65, -53, 2.7)
pt3dadd(410, -65, -53, 2.6)
pt3dadd(411.5, -65, -53, 3.3)
pt3dadd(414, -65, -53, 4.1)
pt3dadd(416.5, -65, -53, 3.3)
pt3dadd(419, -66, -59.5, 3.7)
pt3dadd(422, -66, -59.5, 3.3)
pt3dadd(424, -66.5, -59.5, 2.2)
pt3dadd(426, -68, -53, 2.3)
pt3dadd(429.5, -69.5, -53, 2.3)
pt3dadd(432, -69.5, -53, 2)
pt3dadd(434, -69.5, -59.5, 2.6)
pt3dadd(436, -70, -59.5, 3.7)
pt3dadd(439, -70.5, -59.5, 2.3)
pt3dadd(442.5, -70.5, -59.5, 2.4)
pt3dadd(446.5, -70.5, -59.5, 2.4)
pt3dadd(449.5, -70.5, -59.5, 2.4)
pt3dadd(454.5, -70.5, -59.5, 2.4)
pt3dadd(456, -72, -59.5, 3.5)
pt3dadd(459, -72.5, -59.5, 3.1)
pt3dadd(462.5, -75, -65.5, 2.8)
pt3dadd(468.5, -75, -61.5, 2.7)
pt3dadd(472.5, -76, -59.5, 2.7)
pt3dadd(477.5, -76, -61.5, 3.4)
pt3dadd(479.5, -76, -59.5, 2.4)
pt3dadd(481, -76, -63.5, 2.4)
pt3dadd(483, -76.5, -63.5, 2.1)
pt3dadd(486.5, -76, -63.5, 1.6)
pt3dadd(487.5, -77, -61.5, 1.2)
pt3dadd(490, -77, -61.5, 2)
}
}
proc shape3d_77() {
dend[239] { pt3dadd(492, -78.5, -61.5, 3.1)
pt3dadd(496, -78, -65.5, 4.3)
pt3dadd(499, -77.5, -65.5, 2.4)
pt3dadd(500.5, -77.5, -63.5, 1.1)
pt3dadd(503.5, -78, -65.5, 2.3)
pt3dadd(507, -78, -67.5, 2.3)
pt3dadd(510.5, -75.5, -67.5, 2.3)
pt3dadd(514.5, -76, -67.5, 2.3)
pt3dadd(517, -76, -67.5, 1.4)
pt3dadd(521, -76.5, -67.5, 1.2)
pt3dadd(523, -76.5, -67.5, 1.2)
pt3dadd(525.5, -77.5, -69.5, 2.9)
}
dend[240] {pt3dclear()
pt3dadd(525.5, -77.5, -69.5, 2.9)
pt3dadd(529, -76, -69.5, 0.5)
pt3dadd(530.5, -75, -69.5, 0.5)
pt3dadd(533.5, -75, -69.5, 0.5)
pt3dadd(536.5, -75, -69.5, 0.5)
pt3dadd(539, -75, -69.5, 0.5)
pt3dadd(540.5, -74.5, -69.5, 0.9)
pt3dadd(542, -74.5, -67.5, 0.9)
pt3dadd(545, -74.5, -69.5, 0.7)
}
dend[241] {pt3dclear()
pt3dadd(525.5, -77.5, -69.5, 2.9)
pt3dadd(528, -80, -69.5, 2.3)
pt3dadd(531.5, -81.5, -71, 2.5)
pt3dadd(534.5, -81.5, -69.5, 2.7)
pt3dadd(535.5, -81.5, -69.5, 3.3)
pt3dadd(538.5, -82, -69.5, 3.3)
pt3dadd(541.5, -82, -69.5, 2.7)
pt3dadd(544.5, -82, -69.5, 3.1)
pt3dadd(545, -82.5, -69.5, 2.5)
pt3dadd(547.5, -82.5, -73, 1.4)
pt3dadd(550.5, -84, -75, 0.9)
pt3dadd(553, -85, -75, 0.7)
pt3dadd(555, -85, -75, 2.6)
pt3dadd(561.5, -88, -79, 2.8)
pt3dadd(562.5, -88, -75, 1.4)
pt3dadd(565, -88, -75, 1.4)
pt3dadd(568.5, -89, -77, 0.5)
pt3dadd(570.5, -92.5, -77, 0.5)
pt3dadd(573.5, -95.5, -80, 2.5)
pt3dadd(575, -97, -83, 3.3)
pt3dadd(577.5, -97, -83, 2.8)
pt3dadd(580, -98, -86, 2)
pt3dadd(581, -98, -89, 1.5)
pt3dadd(583, -98, -89, 1.3)
pt3dadd(585, -98.5, -86, 1.6)
pt3dadd(586.5, -99, -86, 2)
pt3dadd(589.5, -101.5, -89, 2.3)
pt3dadd(591.5, -101.5, -89, 1.9)
pt3dadd(593.5, -101.5, -89, 1.5)
pt3dadd(595.5, -101.5, -89, 2.7)
pt3dadd(598.5, -102, -89, 3.2)
pt3dadd(601.5, -102, -89, 2.1)
pt3dadd(603.5, -102.5, -89, 1.5)
pt3dadd(605, -103.5, -89, 1.6)
pt3dadd(605.5, -105, -89, 1.5)
pt3dadd(608.5, -105, -92, 1.9)
pt3dadd(609.5, -105.5, -92, 2.3)
pt3dadd(613, -106.5, -95, 2.5)
pt3dadd(615, -107, -95, 2)
pt3dadd(617, -107.5, -95, 1.7)
pt3dadd(618.5, -108, -95, 1.8)
pt3dadd(621, -109, -97.5, 1.8)
pt3dadd(623.5, -110.5, -95, 2.3)
pt3dadd(627, -111, -100.5, 2.8)
pt3dadd(628.5, -111, -100.5, 2.8)
pt3dadd(631.5, -112, -100.5, 2.8)
pt3dadd(632.5, -114, -103.5, 1.9)
pt3dadd(635.5, -116, -95, 1.6)
pt3dadd(637, -116.5, -95, 2.5)
pt3dadd(639.5, -118, -95, 2.6)
pt3dadd(642.5, -117, -97.5, 2.3)
pt3dadd(646.5, -116, -97.5, 1.5)
pt3dadd(648.5, -116, -97.5, 1.4)
pt3dadd(651.5, -117, -97.5, 1.5)
pt3dadd(654, -117.5, -97.5, 2.3)
pt3dadd(656.5, -117.5, -97.5, 3.2)
pt3dadd(659, -119.5, -100.5, 3)
pt3dadd(662, -119.5, -100.5, 2.3)
pt3dadd(665, -121, -103.5, 1.6)
pt3dadd(666.5, -121, -103.5, 1.1)
pt3dadd(668, -121, -103.5, 1.3)
pt3dadd(669, -123, -103.5, 1.5)
pt3dadd(671.5, -124, -103.5, 2.2)
pt3dadd(673.5, -124.5, -103.5, 3.4)
pt3dadd(675.5, -125.5, -103.5, 3.6)
pt3dadd(677.5, -126.5, -106.5, 1.7)
pt3dadd(679.5, -127, -103.5, 1.1)
pt3dadd(682, -127, -103.5, 1.5)
pt3dadd(685.5, -128, -106.5, 1.5)
pt3dadd(686, -128.5, -106.5, 1.6)
pt3dadd(688, -129.5, -106.5, 2.3)
pt3dadd(690, -130, -106.5, 3.3)
pt3dadd(691, -130.5, -109.5, 4)
pt3dadd(693, -132.5, -106.5, 3.9)
}
dend[242] {pt3dclear()
pt3dadd(693, -132.5, -106.5, 3.9)
pt3dadd(692.5, -133.5, -100.5, 0.1)
pt3dadd(692.5, -136.5, -100.5, 0.1)
pt3dadd(693, -136.5, -100.5, 0.9)
pt3dadd(693.5, -137.5, -100.5, 1.1)
pt3dadd(694.5, -138, -100.5, 1.1)
pt3dadd(696, -139, -100.5, 0.1)
}
dend[243] {pt3dclear()
pt3dadd(693, -132.5, -106.5, 3.9)
pt3dadd(695, -132.5, -106.5, 1.2)
pt3dadd(696.5, -134, -106.5, 1.4)
pt3dadd(699, -137, -109.5, 1.4)
pt3dadd(702.5, -137, -107, 1.7)
pt3dadd(704, -137, -107, 1.2)
pt3dadd(705, -138, -109.5, 1.4)
pt3dadd(707, -139, -109.5, 1.7)
pt3dadd(709, -140, -109.5, 2.4)
pt3dadd(710, -142, -109.5, 2.9)
pt3dadd(711, -145, -109.5, 2.4)
pt3dadd(712.5, -145.5, -112, 1.4)
pt3dadd(714.5, -148, -112, 1.3)
pt3dadd(715, -150.5, -112, 1.5)
pt3dadd(715.5, -152.5, -109.5, 1.7)
pt3dadd(715.5, -154.5, -114.5, 1.7)
pt3dadd(716.5, -157, -114.5, 2.2)
pt3dadd(717, -159, -114.5, 2.2)
pt3dadd(717.5, -160.5, -114.5, 2.2)
pt3dadd(717, -162, -116.5, 0.8)
pt3dadd(717, -163, -116.5, 0.4)
pt3dadd(718, -164, -116.5, 0.4)
pt3dadd(720, -166.5, -116.5, 0.4)
pt3dadd(720, -167.5, -116.5, 0.4)
pt3dadd(721, -168.5, -116.5, 1.2)
pt3dadd(721, -169, -116.5, 1.5)
pt3dadd(720.5, -170.5, -119, 0.8)
pt3dadd(721, -173.5, -124, 0.6)
pt3dadd(723, -173.5, -124, 0.6)
pt3dadd(723.5, -173, -124, 0.5)
pt3dadd(724, -175, -124, 0.5)
pt3dadd(724, -177, -124, 0.5)
pt3dadd(725, -177, -124, 1.1)
pt3dadd(727, -178.5, -124, 1.3)
pt3dadd(728, -180, -128.5, 1.6)
pt3dadd(729.5, -181.5, -126, 1.9)
pt3dadd(730.5, -183.5, -128.5, 2.7)
pt3dadd(731, -185.5, -128.5, 1.6)
pt3dadd(731.5, -187, -128.5, 1.6)
pt3dadd(731.5, -190, -128.5, 1.3)
pt3dadd(733, -191, -128.5, 1)
pt3dadd(733, -191.5, -135.5, 0.8)
pt3dadd(733, -194.5, -135.5, 0.8)
}
dend[244] {pt3dclear()
pt3dadd(210.5, -36.5, -31, 4.9)
pt3dadd(211, -37.5, -34.5, 4.4)
pt3dadd(213.5, -41.5, -33.5, 4.9)
pt3dadd(213.5, -46.5, -33.5, 4.6)
pt3dadd(215.5, -50.5, -33.5, 4)
pt3dadd(216.5, -53, -33.5, 4)
pt3dadd(219, -53, -34.5, 4)
pt3dadd(224.5, -59.5, -34.5, 4.6)
pt3dadd(227.5, -61.5, -41, 4.4)
pt3dadd(230, -64, -41, 4)
pt3dadd(232.5, -64.5, -41, 3.6)
pt3dadd(235, -66, -41, 3.6)
pt3dadd(237.5, -68.5, -41, 3.6)
pt3dadd(240, -69.5, -41, 4.1)
pt3dadd(242, -70.5, -41, 5)
pt3dadd(243.5, -73, -41, 4.7)
pt3dadd(246, -73.5, -41, 4)
pt3dadd(248.5, -75.5, -47, 3.7)
pt3dadd(250.5, -77.5, -41, 3.3)
pt3dadd(253.5, -79, -41, 2.9)
pt3dadd(254.5, -81.5, -41, 2.2)
pt3dadd(255.5, -82.5, -41, 1.6)
pt3dadd(256.5, -84.5, -47, 1.6)
pt3dadd(258, -86.5, -47, 2.5)
pt3dadd(260, -87.5, -47, 3)
pt3dadd(262, -89, -47, 3.6)
pt3dadd(264.5, -90.5, -53.5, 3.1)
pt3dadd(268, -92.5, -47, 3.1)
pt3dadd(272, -98.5, -51, 2.3)
pt3dadd(273.5, -100, -49, 2.1)
pt3dadd(275.5, -102, -49, 2.3)
pt3dadd(277, -104, -51, 3.7)
pt3dadd(279, -106, -51, 3.9)
pt3dadd(282, -108.5, -51, 3.4)
pt3dadd(284, -110.5, -51, 2.7)
pt3dadd(285.5, -111.5, -51, 2.6)
pt3dadd(286.5, -113, -51, 2.8)
pt3dadd(288, -114, -57, 2.4)
pt3dadd(289.5, -115, -57, 2.3)
pt3dadd(291, -117, -58.5, 2.2)
pt3dadd(292.5, -117, -58.5, 2.7)
pt3dadd(293.5, -119.5, -58.5, 3.1)
pt3dadd(294, -122.5, -57, 3.6)
pt3dadd(295, -123.5, -60.5, 4.6)
pt3dadd(296.5, -125, -60.5, 4.6)
pt3dadd(298.5, -127, -64.5, 4)
pt3dadd(300, -128.5, -68.5, 3.7)
pt3dadd(302, -132.5, -71.5, 2.3)
pt3dadd(302, -134, -74.5, 1.9)
pt3dadd(303, -137, -74.5, 1.9)
pt3dadd(304.5, -139, -71.5, 2)
pt3dadd(306, -141, -74.5, 4)
pt3dadd(308, -142.5, -77.5, 4.6)
pt3dadd(308.5, -145, -77.5, 4.6)
pt3dadd(310, -148.5, -77.5, 4.3)
}
}
proc shape3d_78() {
dend[244] { pt3dadd(311, -150.5, -77.5, 3.6)
pt3dadd(313, -151.5, -80.5, 3.1)
pt3dadd(314, -154.5, -83.5, 2.2)
pt3dadd(314, -155.5, -83.5, 2)
pt3dadd(315, -159, -83.5, 2.3)
pt3dadd(316, -160, -83.5, 2.5)
pt3dadd(316.5, -161.5, -83.5, 2.1)
pt3dadd(317, -163, -86, 1.8)
pt3dadd(318, -164, -89, 1.6)
pt3dadd(319, -164.5, -89, 2.2)
pt3dadd(319.5, -166, -89, 2.4)
pt3dadd(321, -168.5, -89, 2.6)
pt3dadd(321, -169.5, -89, 2.2)
pt3dadd(322.5, -171.5, -89, 2.6)
pt3dadd(322, -174, -95, 3.7)
pt3dadd(323.5, -178, -98, 4)
pt3dadd(323, -180.5, -93.5, 2.8)
pt3dadd(322.5, -183.5, -98, 2.7)
pt3dadd(322.5, -183.5, -103, 3.7)
pt3dadd(323, -187.5, -103, 4.4)
pt3dadd(323.5, -189, -100.5, 4.8)
pt3dadd(322.5, -191, -100.5, 4.4)
pt3dadd(323, -194, -100.5, 3.6)
pt3dadd(323.5, -196.5, -105.5, 2)
pt3dadd(323.5, -199.5, -105.5, 2)
pt3dadd(324, -203.5, -105.5, 3.8)
pt3dadd(324.5, -205, -107.5, 6)
pt3dadd(326.5, -205.5, -107.5, 6.7)
pt3dadd(327.5, -206.5, -107.5, 4.9)
pt3dadd(328.5, -208, -107.5, 3.6)
pt3dadd(329.5, -210.5, -107.5, 2.7)
pt3dadd(329.5, -212.5, -107.5, 2.2)
pt3dadd(329.5, -213.5, -110, 1.8)
pt3dadd(329, -214.5, -110, 1)
pt3dadd(329, -215.5, -110, 0.8)
pt3dadd(329, -217, -110, 1)
pt3dadd(329, -218.5, -110, 1)
pt3dadd(329, -220, -110, 1.8)
pt3dadd(329, -221, -110, 2.4)
pt3dadd(329, -222.5, -112.5, 3.1)
pt3dadd(329.5, -225, -112.5, 2.9)
pt3dadd(329.5, -226.5, -112.5, 2.6)
pt3dadd(329, -228.5, -112.5, 2.3)
pt3dadd(329, -231, -112.5, 1.7)
pt3dadd(329, -232.5, -112.5, 2.9)
pt3dadd(329.5, -236, -115, 4.3)
pt3dadd(330, -239, -115, 3.8)
pt3dadd(330, -240, -112.5, 2.9)
pt3dadd(330, -241.5, -115, 1.6)
pt3dadd(330, -242.5, -115, 1.2)
pt3dadd(332, -245, -110, 2.3)
pt3dadd(333, -245.5, -112.5, 2)
pt3dadd(336, -248.5, -115, 0.9)
pt3dadd(336.5, -249.5, -115, 0.9)
pt3dadd(337, -250.5, -115, 2)
pt3dadd(338, -252, -117, 0.9)
pt3dadd(338.5, -254, -117, 1.1)
pt3dadd(339.5, -254.5, -115, 0.9)
pt3dadd(341, -255.5, -115, 0.9)
pt3dadd(342, -256, -117, 0.9)
pt3dadd(342.5, -258, -110, 0.9)
pt3dadd(343, -259, -112.5, 0.9)
pt3dadd(345.5, -261, -117, 0.5)
}
dend[245] {pt3dclear()
pt3dadd(169, -9.5, -31, 8.8)
pt3dadd(176.5, -6.5, -31, 2.9)
pt3dadd(179.5, -5.5, -29.5, 2.9)
pt3dadd(183, -3.5, -29.5, 3.4)
pt3dadd(186.5, -2.5, -30.5, 3.4)
pt3dadd(190, -1, -30.5, 3.1)
pt3dadd(193, -1, -30.5, 3.3)
pt3dadd(197, -1, -30.5, 3.6)
pt3dadd(200.5, -1, -31, 3.3)
pt3dadd(203.5, -1.5, -31, 3)
pt3dadd(206, -1.5, -31.5, 2.4)
pt3dadd(209, -0.5, -31, 3.7)
pt3dadd(212.5, -0.5, -31, 4.3)
pt3dadd(216.5, -0.5, -31.5, 3.8)
pt3dadd(218.5, -0.5, -31.5, 2.9)
pt3dadd(221.5, 2, -32.5, 2.3)
pt3dadd(224, 1, -31.5, 2.3)
pt3dadd(228, 0, -34.5, 2.8)
pt3dadd(232, 0, -34.5, 3.1)
pt3dadd(235.5, 0, -33.5, 3.1)
pt3dadd(239, 0, -33.5, 3.3)
pt3dadd(242.5, 0, -36, 3.6)
pt3dadd(246, 0, -36, 4)
pt3dadd(250, 0, -36, 4.4)
pt3dadd(252.5, 0, -36, 5.1)
pt3dadd(254.5, 0, -36, 5.2)
pt3dadd(257, 0, -42.5, 3.9)
pt3dadd(258.5, 0.5, -42.5, 3.6)
pt3dadd(260, 1.5, -42.5, 3.3)
pt3dadd(262.5, 1.5, -42.5, 3.5)
pt3dadd(263.5, 1.5, -42.5, 3.5)
pt3dadd(266.5, 1.5, -42.5, 2.8)
pt3dadd(267.5, 1.5, -48.5, 2.7)
pt3dadd(270.5, 1.5, -42.5, 3.5)
pt3dadd(272.5, 1.5, -42.5, 3.8)
pt3dadd(275.5, 1.5, -42.5, 4)
pt3dadd(277.5, 2, -42.5, 4.4)
pt3dadd(280, 2, -42.5, 3.8)
pt3dadd(281.5, 2, -48.5, 3.6)
pt3dadd(283.5, 2, -48.5, 3.3)
pt3dadd(285.5, 2, -48.5, 3.3)
pt3dadd(288, 2, -48.5, 3.1)
pt3dadd(290, 2, -48.5, 2.5)
pt3dadd(290.5, 2.5, -48.5, 1.8)
pt3dadd(293.5, 3.5, -48.5, 2.5)
pt3dadd(295, 4, -48.5, 3.1)
pt3dadd(296.5, 3.5, -48.5, 3.7)
pt3dadd(298.5, 3.5, -48.5, 6.6)
pt3dadd(300, 3.5, -48.5, 6)
pt3dadd(302, 5, -48.5, 4.4)
pt3dadd(303.5, 5, -48.5, 3.4)
pt3dadd(305, 5, -55, 2.7)
pt3dadd(307, 4.5, -55, 3.3)
pt3dadd(310, 4.5, -48.5, 3.4)
pt3dadd(312, 3.5, -48.5, 3.7)
pt3dadd(314, 3.5, -48.5, 3.8)
pt3dadd(316, 3.5, -48.5, 3.8)
pt3dadd(318, 5, -55, 3.6)
pt3dadd(320, 6, -55, 3.6)
pt3dadd(321.5, 6, -55, 3.6)
pt3dadd(322.5, 6, -48.5, 4.4)
pt3dadd(325, 6.5, -48.5, 4)
pt3dadd(327, 6.5, -55, 3.1)
pt3dadd(329.5, 7, -55, 2.9)
pt3dadd(332, 7, -55, 3.3)
pt3dadd(333.5, 7, -55, 3.3)
pt3dadd(335, 7, -55, 2.8)
pt3dadd(337.5, 7.5, -55, 3.8)
pt3dadd(338.5, 8, -61, 4.1)
pt3dadd(340, 9.5, -61, 4.9)
pt3dadd(342, 9.5, -61, 4.9)
pt3dadd(344, 10.5, -61, 1.5)
pt3dadd(347, 10.5, -61, 1.4)
pt3dadd(348, 10.5, -61, 1.1)
pt3dadd(348.5, 12, -55, 1.2)
pt3dadd(350, 12, -61, 1.7)
pt3dadd(350.5, 12.5, -61, 2.1)
pt3dadd(351.5, 12.5, -61, 2.6)
pt3dadd(352.5, 14, -61, 2)
pt3dadd(354, 14, -61, 1.5)
pt3dadd(356.5, 14.5, -61, 0.9)
pt3dadd(358, 14.5, -61, 1.1)
pt3dadd(359.5, 14.5, -61, 1.7)
pt3dadd(361, 15.5, -61, 2.4)
pt3dadd(363, 15.5, -67.5, 3.4)
pt3dadd(365.5, 17, -61, 2.4)
pt3dadd(366.5, 16.5, -67.5, 1.9)
pt3dadd(369, 17, -67.5, 0.9)
pt3dadd(370.5, 15.5, -69.5, 1.6)
pt3dadd(373, 15, -67.5, 1.7)
pt3dadd(374.5, 14, -69.5, 1.7)
pt3dadd(376, 15, -69.5, 1.6)
pt3dadd(377, 15, -69.5, 2.1)
pt3dadd(379, 17, -65.5, 2.7)
pt3dadd(382, 16, -69.5, 4.3)
pt3dadd(384, 16, -67.5, 3.4)
}
dend[246] {pt3dclear()
pt3dadd(384, 16, -67.5, 3.4)
pt3dadd(387, 18.5, -65.5, 1.6)
pt3dadd(389, 19, -65.5, 1.2)
pt3dadd(391, 19.5, -65.5, 0.7)
pt3dadd(393.5, 22, -64, 0.9)
pt3dadd(397, 22, -64, 0.9)
pt3dadd(401, 22, -64, 0.9)
pt3dadd(405.5, 23.5, -65.5, 0.9)
pt3dadd(410.5, 23.5, -69.5, 0.9)
pt3dadd(410, 23.5, -64, 2.5)
pt3dadd(412.5, 23.5, -64, 1.8)
pt3dadd(415.5, 23.5, -65.5, 0.6)
pt3dadd(419, 23, -65.5, 0.6)
pt3dadd(422, 21.5, -65.5, 0.6)
pt3dadd(424.5, 21.5, -64, 1.9)
pt3dadd(425.5, 21, -60, 2.8)
pt3dadd(428, 19, -65.5, 1.6)
pt3dadd(428.5, 18.5, -65.5, 0.4)
pt3dadd(431.5, 16.5, -65.5, 0.7)
pt3dadd(433.5, 15.5, -65.5, 0.7)
pt3dadd(435, 14.5, -64, 2.3)
pt3dadd(436, 12.5, -65.5, 2.8)
pt3dadd(436.5, 11.5, -65.5, 2)
pt3dadd(438, 10.5, -65.5, 1)
pt3dadd(441.5, 9, -65.5, 1)
pt3dadd(442, 8, -65.5, 2.2)
pt3dadd(442.5, 6.5, -65.5, 2.4)
pt3dadd(444.5, 5.5, -64, 1.1)
pt3dadd(445, 5.5, -69.5, 1.1)
pt3dadd(447.5, 5, -69.5, 1.1)
pt3dadd(450.5, 3.5, -69.5, 1.1)
pt3dadd(454.5, 3.5, -69.5, 1.1)
pt3dadd(456.5, 2.5, -69.5, 1.1)
pt3dadd(461, -1.5, -69.5, 1.1)
pt3dadd(463, -2, -69.5, 1.1)
pt3dadd(465.5, -2, -73.5, 2.6)
pt3dadd(467, -3.5, -71.5, 3.4)
pt3dadd(468.5, -5.5, -75.5, 2.3)
pt3dadd(471, -6.5, -79, 1.2)
pt3dadd(473, -8, -81, 1.1)
pt3dadd(475, -10.5, -81, 1.1)
}
}
proc shape3d_79() {
dend[246] { pt3dadd(477.5, -13.5, -81, 0.7)
pt3dadd(481.5, -13.5, -81, 2)
pt3dadd(482.5, -13.5, -78, 1.2)
pt3dadd(484, -13.5, -78, 0.9)
pt3dadd(486, -13.5, -81, 0.9)
pt3dadd(488, -13.5, -81, 1.3)
pt3dadd(489, -12.5, -81, 1.9)
pt3dadd(492, -11.5, -81, 1.1)
pt3dadd(493, -11.5, -84, 0.6)
pt3dadd(495, -10.5, -81, 0.9)
pt3dadd(496, -10.5, -81, 1.6)
pt3dadd(498.5, -9.5, -81, 3.2)
pt3dadd(499, -9.5, -81, 2.7)
pt3dadd(500, -10.5, -81, 2.4)
pt3dadd(503, -10.5, -84, 0.2)
pt3dadd(503.5, -12, -84, 1.4)
pt3dadd(505.5, -12, -84, 1.8)
pt3dadd(506.5, -12.5, -84, 0.9)
pt3dadd(506.5, -12.5, -87, 0.1)
pt3dadd(507.5, -10.5, -84, 0.1)
pt3dadd(508.5, -11.5, -84, 1.2)
pt3dadd(511.5, -11.5, -81, 0.3)
pt3dadd(513, -11.5, -81, 0.7)
pt3dadd(514, -11.5, -87, 0.8)
pt3dadd(516.5, -12, -87, 0.9)
pt3dadd(517.5, -12.5, -87, 0.9)
pt3dadd(519.5, -13.5, -87, 0.9)
pt3dadd(521, -14.5, -87, 1.8)
pt3dadd(524, -14.5, -87, 3.1)
pt3dadd(526.5, -15, -93, 1.8)
pt3dadd(528.5, -15, -93, 0.2)
pt3dadd(530.5, -15.5, -93, 1)
pt3dadd(532.5, -15.5, -93, 1.2)
pt3dadd(533.5, -15.5, -93, 1.2)
pt3dadd(535, -15.5, -93, 0.1)
pt3dadd(537, -16, -96, 0.1)
pt3dadd(538.5, -16.5, -93, 2.1)
pt3dadd(541, -16.5, -93, 3.1)
pt3dadd(542.5, -18.5, -93, 1.3)
pt3dadd(545, -18, -93, 0.2)
pt3dadd(546.5, -17.5, -96, 0.9)
pt3dadd(548.5, -16.5, -98.5, 0.9)
pt3dadd(549.5, -16.5, -98.5, 0.9)
pt3dadd(550, -17, -98.5, 0.1)
pt3dadd(552, -17, -98.5, 0.1)
pt3dadd(554, -17, -98.5, 0.1)
pt3dadd(556.5, -17, -98.5, 0.1)
pt3dadd(559, -16.5, -101.5, 0.1)
pt3dadd(561.5, -16.5, -104.5, 0.1)
pt3dadd(562.5, -16, -101.5, 1.2)
pt3dadd(564.5, -16, -101.5, 2)
pt3dadd(566.5, -16, -98.5, 0.7)
pt3dadd(568, -16, -98.5, 0.1)
pt3dadd(570, -16, -98.5, 0.1)
pt3dadd(571, -15, -101.5, 1.4)
pt3dadd(574, -14.5, -101.5, 2.4)
pt3dadd(576, -14.5, -101.5, 0.7)
pt3dadd(578.5, -13.5, -101.5, 0.2)
pt3dadd(579, -13, -101.5, 0.2)
pt3dadd(582.5, -13, -101.5, 0.2)
pt3dadd(583.5, -14, -101.5, 0.2)
pt3dadd(590.5, -15, -104, 0.1)
pt3dadd(591.5, -15.5, -101.5, 1.1)
pt3dadd(594, -16, -104, 1.4)
pt3dadd(595.5, -18.5, -101.5, 1.1)
pt3dadd(596, -20, -104, 0.1)
pt3dadd(597.5, -20.5, -104, 0.1)
pt3dadd(601, -20.5, -104, 1.6)
pt3dadd(602, -21, -104, 1.1)
pt3dadd(603, -21, -106.5, 0.1)
pt3dadd(604, -22, -106.5, 0.1)
pt3dadd(605, -22, -106.5, 1.3)
pt3dadd(606, -22.5, -106.5, 2.2)
pt3dadd(607.5, -24.5, -106.5, 0.9)
pt3dadd(608.5, -24.5, -106.5, 0.1)
pt3dadd(613, -25.5, -108.5, 0.1)
pt3dadd(615, -26.5, -104, 1.1)
pt3dadd(615.5, -28, -104, 1.6)
pt3dadd(616.5, -28, -104, 2)
pt3dadd(617.5, -29.5, -108.5, 1.2)
pt3dadd(618, -29.5, -108.5, 0.1)
pt3dadd(621, -29.5, -108.5, 0.1)
pt3dadd(622, -31.5, -108.5, 1.3)
pt3dadd(623.5, -31.5, -108.5, 2)
pt3dadd(625.5, -32.5, -108.5, 0.3)
pt3dadd(626.5, -32.5, -108.5, 0.1)
pt3dadd(629, -33, -108.5, 0.1)
pt3dadd(630, -33, -111, 1.5)
pt3dadd(631.5, -36, -113.5, 1.2)
pt3dadd(633.5, -36, -113.5, 0.7)
pt3dadd(635.5, -36, -113.5, 0.4)
pt3dadd(638.5, -36, -113.5, 0.4)
pt3dadd(643, -36, -116, 0.4)
pt3dadd(645, -37, -108.5, 0.1)
pt3dadd(646, -38.5, -111, 0.1)
pt3dadd(648.5, -38.5, -106.5, 0.1)
pt3dadd(650, -35.5, -106.5, 0.1)
pt3dadd(651.5, -35.5, -108.5, 1.6)
pt3dadd(653, -35.5, -108.5, 0.8)
pt3dadd(654.5, -36, -111, 0.5)
pt3dadd(655.5, -36.5, -113.5, 0.6)
pt3dadd(657.5, -36.5, -113.5, 1.5)
pt3dadd(659.5, -37.5, -111, 1.9)
pt3dadd(661, -37.5, -111, 0.2)
pt3dadd(662, -38, -111, 0.1)
pt3dadd(664.5, -38, -111, 0.1)
pt3dadd(667, -39.5, -111, 1.6)
pt3dadd(668, -39.5, -113.5, 0.1)
pt3dadd(673, -41.5, -111, 0.1)
pt3dadd(673.5, -42, -111, 1.8)
pt3dadd(674.5, -44.5, -113.5, 2.7)
pt3dadd(675.5, -46.5, -111, 0.8)
pt3dadd(677, -46.5, -111, 0.1)
pt3dadd(681, -50.5, -111, 0.1)
pt3dadd(682, -51, -111, 1.3)
pt3dadd(682.5, -52.5, -111, 1.6)
pt3dadd(683.5, -53.5, -113.5, 0.1)
pt3dadd(685.5, -53.5, -113.5, 0.1)
pt3dadd(688, -53.5, -113.5, 0.1)
pt3dadd(689, -57, -108.5, 2.1)
pt3dadd(691.5, -57, -118, 0.1)
pt3dadd(691.5, -58.5, -118, 0.1)
pt3dadd(692, -60, -118, 0.1)
pt3dadd(692, -61.5, -118, 0.1)
pt3dadd(694, -66, -118, 0.1)
}
dend[247] {pt3dclear()
pt3dadd(384, 16, -67.5, 3.4)
pt3dadd(385.5, 15, -67.5, 2.7)
pt3dadd(386.5, 14, -69.5, 1.8)
pt3dadd(389.5, 13, -71.5, 2.3)
pt3dadd(390.5, 13.5, -73.5, 2.5)
pt3dadd(393, 13, -75.5, 3.5)
pt3dadd(395, 13, -75.5, 4)
pt3dadd(397, 11, -75.5, 2.7)
pt3dadd(398.5, 10, -75.5, 2)
pt3dadd(401.5, 8.5, -75.5, 2)
pt3dadd(403.5, 6, -75.5, 1.7)
pt3dadd(405.5, 6, -77, 1.9)
pt3dadd(407.5, 3.5, -79, 1.9)
pt3dadd(412, 2, -79, 2.6)
pt3dadd(413, 0.5, -79, 4.3)
pt3dadd(415, 0.5, -79, 3.8)
pt3dadd(416, -2, -82, 4)
pt3dadd(418, -1.5, -85, 2.8)
pt3dadd(420, -1, -85, 1.9)
pt3dadd(422.5, -1, -85, 1.8)
pt3dadd(424.5, -1, -88, 2.2)
pt3dadd(426, -1, -88, 2)
pt3dadd(428, -1.5, -88, 1.5)
pt3dadd(428.5, -3.5, -88, 1.1)
pt3dadd(429.5, -5.5, -88, 3.2)
pt3dadd(429.5, -8, -94, 3.2)
pt3dadd(431.5, -7.5, -97, 3.3)
pt3dadd(433.5, -6, -97, 2.4)
pt3dadd(434.5, -3, -97, 1.7)
pt3dadd(435.5, -2, -97, 1.7)
pt3dadd(439.5, 1.5, -99.5, 1.6)
pt3dadd(442, 1, -102, 1.4)
pt3dadd(443.5, 0, -102, 1.2)
pt3dadd(443.5, -0.5, -102, 2)
pt3dadd(446.5, -1.5, -104.5, 3)
pt3dadd(448, -3.5, -104.5, 3)
pt3dadd(450.5, -3.5, -106.5, 2.4)
pt3dadd(451.5, -3.5, -106.5, 2.4)
pt3dadd(452.5, -3.5, -109, 2.3)
pt3dadd(453.5, -3.5, -111.5, 2.3)
pt3dadd(454.5, -2.5, -109, 2.3)
pt3dadd(456, -2, -106.5, 2.3)
pt3dadd(458, -2, -106.5, 2.5)
pt3dadd(460, -2, -111.5, 2.5)
pt3dadd(461.5, -1.5, -109, 2.1)
pt3dadd(461, -3, -111.5, 1.2)
pt3dadd(461, -3.5, -109, 0.9)
pt3dadd(461.5, -4.5, -109, 0.9)
pt3dadd(463, -5, -109, 1.6)
pt3dadd(464.5, -5.5, -109, 1.8)
pt3dadd(466.5, -5.5, -114, 2.2)
pt3dadd(468.5, -6.5, -114, 1.7)
pt3dadd(470, -6.5, -114, 1.2)
pt3dadd(470.5, -7.5, -114, 0.9)
pt3dadd(472.5, -8.5, -116, 0.9)
pt3dadd(474.5, -11, -116, 0.9)
pt3dadd(474, -12.5, -121, 0.9)
pt3dadd(473, -14, -123.5, 0.9)
pt3dadd(471.5, -12.5, -121, 0.9)
pt3dadd(471.5, -12.5, -125.5, 1)
}
dend[248] {pt3dclear()
pt3dadd(39.34, 29.98, -13.49, 6.7)
pt3dadd(4.5, 24.5, -21, 6.7)
pt3dadd(1.5, 25.5, -22, 5.7)
pt3dadd(-1.5, 25.5, -22, 5.3)
pt3dadd(-3.5, 23.5, -25, 5.6)
pt3dadd(1.5, 27.5, -23, 3.8)
pt3dadd(2.5, 32.5, -23, 3.8)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
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()
shape3d_48()
shape3d_49()
shape3d_50()
shape3d_51()
shape3d_52()
shape3d_53()
shape3d_54()
shape3d_55()
shape3d_56()
shape3d_57()
shape3d_58()
shape3d_59()
shape3d_60()
shape3d_61()
shape3d_62()
shape3d_63()
shape3d_64()
shape3d_65()
shape3d_66()
shape3d_67()
shape3d_68()
shape3d_69()
shape3d_70()
shape3d_71()
shape3d_72()
shape3d_73()
shape3d_74()
shape3d_75()
shape3d_76()
shape3d_77()
shape3d_78()
shape3d_79()
}
access soma
celldef()