proc celldef() {
topol()
}
create soma[2], dend[270]
proc topol() { local i
connect soma[1](0), soma(0)
connect dend(0), soma(0)
for i = 1, 5 connect dend[i](0), dend[i-1](1)
connect dend[6](0), dend[4](1)
connect dend[7](0), dend[3](1)
for i = 8, 9 connect dend[i](0), dend[7](1)
connect dend[10](0), dend[2](1)
connect dend[11](0), dend[1](1)
for i = 12, 13 connect dend[i](0), dend[i-1](1)
connect dend[14](0), dend[12](1)
for i = 15, 16 connect dend[i](0), dend[i-1](1)
connect dend[17](0), dend[15](1)
connect dend[18](0), dend[14](1)
connect dend[19](0), dend[11](1)
for i = 20, 21 connect dend[i](0), dend[19](1)
connect dend[22](0), dend(1)
for i = 23, 24 connect dend[i](0), dend[i-1](1)
connect dend[25](0), dend[23](1)
for i = 26, 27 connect dend[i](0), dend[25](1)
for i = 28, 29 connect dend[i](0), dend[27](1)
connect dend[30](0), dend[22](1)
for i = 31, 32 connect dend[i](0), dend[i-1](1)
connect dend[33](0), dend[31](1)
connect dend[34](0), dend[30](1)
for i = 35, 36 connect dend[i](0), dend[34](1)
connect dend[37](0), soma(0)
for i = 38, 41 connect dend[i](0), dend[i-1](1)
connect dend[42](0), dend[40](1)
connect dend[43](0), dend[39](1)
connect dend[44](0), dend[38](1)
connect dend[45](0), dend[37](1)
for i = 46, 47 connect dend[i](0), dend[i-1](1)
connect dend[48](0), dend[46](1)
for i = 49, 50 connect dend[i](0), dend[i-1](1)
connect dend[51](0), dend[49](1)
connect dend[52](0), dend[48](1)
for i = 53, 54 connect dend[i](0), dend[52](1)
for i = 55, 56 connect dend[i](0), dend[54](1)
connect dend[57](0), dend[45](1)
for i = 58, 59 connect dend[i](0), dend[i-1](1)
connect dend[60](0), dend[58](1)
connect dend[61](0), dend[57](1)
for i = 62, 63 connect dend[i](0), dend[61](1)
connect dend[64](0), soma(0)
for i = 65, 69 connect dend[i](0), dend[i-1](1)
connect dend[70](0), dend[68](1)
for i = 71, 72 connect dend[i](0), dend[70](1)
connect dend[73](0), dend[67](1)
connect dend[74](0), dend[66](1)
for i = 75, 76 connect dend[i](0), dend[74](1)
connect dend[77](0), dend[65](1)
for i = 78, 79 connect dend[i](0), dend[77](1)
for i = 80, 81 connect dend[i](0), dend[i-1](1)
connect dend[82](0), dend[80](1)
connect dend[83](0), dend[79](1)
connect dend[84](0), dend[64](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, 91 connect dend[i](0), dend[i-1](1)
connect dend[92](0), dend[90](1)
for i = 93, 94 connect dend[i](0), dend[92](1)
connect dend[95](0), dend[89](1)
connect dend[96](0), dend[88](1)
connect dend[97](0), soma(0)
for i = 98, 101 connect dend[i](0), dend[i-1](1)
connect dend[102](0), dend[100](1)
connect dend[103](0), dend[99](1)
connect dend[104](0), dend[98](1)
for i = 105, 106 connect dend[i](0), dend[104](1)
connect dend[107](0), dend[97](1)
for i = 108, 109 connect dend[i](0), soma(0)
for i = 110, 111 connect dend[i](0), dend[109](1)
for i = 112, 113 connect dend[i](0), dend[i-1](1)
connect dend[114](0), dend[112](1)
for i = 115, 116 connect dend[i](0), dend[i-1](1)
connect dend[117](0), dend[115](1)
for i = 118, 119 connect dend[i](0), dend[117](1)
connect dend[120](0), dend[114](1)
connect dend[121](0), dend[111](1)
for i = 122, 123 connect dend[i](0), dend[i-1](1)
connect dend[124](0), dend[122](1)
connect dend[125](0), dend[121](1)
for i = 126, 127 connect dend[i](0), dend[i-1](1)
connect dend[128](0), dend[126](1)
connect dend[129](0), dend[125](1)
for i = 130, 131 connect dend[i](0), dend[129](1)
for i = 132, 133 connect dend[i](0), dend[131](1)
connect dend[134](0), soma(0)
for i = 135, 136 connect dend[i](0), dend[134](1)
for i = 137, 138 connect dend[i](0), dend[136](1)
for i = 139, 140 connect dend[i](0), dend[i-1](1)
connect dend[141](0), dend[139](1)
connect dend[142](0), dend[138](1)
for i = 143, 144 connect dend[i](0), dend[142](1)
for i = 145, 146 connect dend[i](0), dend[144](1)
for i = 147, 148 connect dend[i](0), dend[146](1)
connect dend[149](0), soma(0)
for i = 150, 151 connect dend[i](0), dend[i-1](1)
connect dend[152](0), dend[150](1)
for i = 153, 154 connect dend[i](0), dend[152](1)
for i = 155, 156 connect dend[i](0), dend[154](1)
for i = 157, 158 connect dend[i](0), dend[156](1)
connect dend[159](0), dend[149](1)
for i = 160, 164 connect dend[i](0), dend[i-1](1)
connect dend[165](0), dend[163](1)
connect dend[166](0), dend[162](1)
for i = 167, 168 connect dend[i](0), dend[166](1)
connect dend[169](0), dend[161](1)
connect dend[170](0), dend[160](1)
connect dend[171](0), dend[159](1)
for i = 172, 174 connect dend[i](0), dend[i-1](1)
connect dend[175](0), dend[173](1)
for i = 176, 177 connect dend[i](0), dend[175](1)
connect dend[178](0), dend[172](1)
for i = 179, 180 connect dend[i](0), dend[i-1](1)
connect dend[181](0), dend[179](1)
for i = 182, 183 connect dend[i](0), dend[181](1)
for i = 184, 185 connect dend[i](0), dend[183](1)
connect dend[186](0), dend[178](1)
connect dend[187](0), dend[171](1)
for i = 188, 189 connect dend[i](0), dend[187](1)
for i = 190, 191 connect dend[i](0), dend[i-1](1)
connect dend[192](0), dend[190](1)
connect dend[193](0), dend[189](1)
connect dend[194](0), soma(0)
for i = 195, 196 connect dend[i](0), dend[194](1)
for i = 197, 198 connect dend[i](0), dend[196](1)
connect dend[199](0), soma(0)
for i = 200, 206 connect dend[i](0), dend[i-1](1)
connect dend[207](0), dend[205](1)
connect dend[208](0), dend[204](1)
for i = 209, 210 connect dend[i](0), dend[208](1)
connect dend[211](0), dend[203](1)
for i = 212, 213 connect dend[i](0), dend[211](1)
connect dend[214](0), dend[202](1)
for i = 215, 216 connect dend[i](0), dend[214](1)
connect dend[217](0), dend[201](1)
for i = 218, 219 connect dend[i](0), dend[i-1](1)
connect dend[220](0), dend[218](1)
connect dend[221](0), dend[217](1)
for i = 222, 223 connect dend[i](0), dend[221](1)
for i = 224, 225 connect dend[i](0), dend[223](1)
connect dend[226](0), dend[200](1)
connect dend[227](0), dend[199](1)
connect dend[228](0), soma(0)
for i = 229, 231 connect dend[i](0), dend[i-1](1)
connect dend[232](0), dend[230](1)
connect dend[233](0), dend[229](1)
for i = 234, 235 connect dend[i](0), dend[233](1)
for i = 236, 237 connect dend[i](0), dend[i-1](1)
connect dend[238](0), dend[236](1)
connect dend[239](0), dend[235](1)
connect dend[240](0), dend[228](1)
for i = 241, 242 connect dend[i](0), dend[240](1)
for i = 243, 248 connect dend[i](0), dend[i-1](1)
connect dend[249](0), dend[247](1)
connect dend[250](0), dend[246](1)
connect dend[251](0), dend[245](1)
for i = 252, 253 connect dend[i](0), dend[251](1)
connect dend[254](0), dend[244](1)
for i = 255, 256 connect dend[i](0), dend[254](1)
connect dend[257](0), dend[243](1)
for i = 258, 259 connect dend[i](0), dend[257](1)
connect dend[260](0), dend[242](1)
connect dend[261](0), soma(0)
for i = 262, 264 connect dend[i](0), dend[i-1](1)
connect dend[265](0), dend[263](1)
for i = 266, 267 connect dend[i](0), dend[265](1)
connect dend[268](0), dend[262](1)
connect dend[269](0), dend[261](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 63.834)
pt3dadd(25.73, 8.27, 7.25, 63.834)
}
soma[1] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 63.834)
pt3dadd(25.73, -55.56, 7.25, 63.834)
}
dend {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 10.6)
pt3dadd(28, -28.5, 23, 10.6)
pt3dadd(25, -29.5, 23, 8.4)
}
dend[1] {pt3dclear()
pt3dadd(25, -29.5, 23, 8.4)
pt3dadd(23.5, -28, 20, 6.7)
pt3dadd(22, -26, 27.5, 7.3)
pt3dadd(20.5, -23.5, 25, 6.9)
pt3dadd(17.5, -22.5, 48, 6.9)
pt3dadd(15, -21, 60, 6.9)
pt3dadd(13.5, -18, 75, 6.9)
pt3dadd(13, -22.5, 80, 8.8)
pt3dadd(-0.5, -14.5, 98.5, 10.4)
pt3dadd(-4, -13.5, 95.5, 9.6)
pt3dadd(-4.5, -18, 107.5, 9.6)
}
dend[2] {pt3dclear()
pt3dadd(-4.5, -18, 107.5, 9.6)
pt3dadd(-6, -16.5, 120, 5.7)
pt3dadd(-5.5, -13, 126.5, 3.7)
pt3dadd(-1.5, -10.5, 127, 3.7)
pt3dadd(3.5, -7.5, 125, 3.7)
pt3dadd(6.5, -3.5, 127, 3.8)
pt3dadd(9.5, -2, 126, 3.2)
pt3dadd(11.5, -0.5, 127, 3.4)
pt3dadd(14.5, 2.5, 137, 2.5)
pt3dadd(14.5, 11, 147, 4.5)
}
dend[3] {pt3dclear()
pt3dadd(14.5, 11, 147, 4.5)
pt3dadd(13, 14, 147, 3)
pt3dadd(13, 19.5, 150, 3.4)
pt3dadd(13, 22, 150, 4.4)
}
dend[4] {pt3dclear()
pt3dadd(13, 22, 150, 4.4)
pt3dadd(16.5, 22.5, 148.5, 1.5)
pt3dadd(15, 24, 149.5, 1.5)
pt3dadd(17.5, 25.5, 163.5, 1.4)
pt3dadd(14, 26.5, 164.5, 1.7)
pt3dadd(13.5, 33, 166.5, 1.8)
pt3dadd(13.5, 36, 175, 2)
pt3dadd(13, 39, 175.5, 2.2)
pt3dadd(14, 43, 179.5, 1.8)
pt3dadd(16.5, 45.5, 180, 1.6)
pt3dadd(20, 51.5, 182, 1.1)
pt3dadd(24, 59.5, 185.5, 1.5)
pt3dadd(25.5, 63, 186, 1.3)
pt3dadd(27.5, 66.5, 185, 1.6)
pt3dadd(29, 69.5, 192, 1.6)
pt3dadd(31, 73, 193.5, 1.6)
pt3dadd(32.5, 75, 194, 2.5)
}
dend[5] {pt3dclear()
pt3dadd(32.5, 75, 194, 2.5)
pt3dadd(30.5, 78.5, 191, 0.2)
pt3dadd(28, 77.5, 191, 0.2)
pt3dadd(25, 81.5, 194, 0.9)
pt3dadd(23, 88.5, 191, 0.9)
pt3dadd(25.5, 91, 194, 0.9)
pt3dadd(25.5, 94, 194, 0.9)
pt3dadd(25, 97, 191, 0.9)
pt3dadd(26, 99.5, 191, 0.9)
pt3dadd(27.5, 102.5, 191, 0.6)
pt3dadd(27, 105, 190.5, 0.6)
pt3dadd(29.5, 111, 188, 1.1)
pt3dadd(28, 114.5, 188, 1.1)
pt3dadd(28, 117.5, 188, 1.1)
pt3dadd(31, 121.5, 185.5, 0.8)
pt3dadd(27.5, 122, 185.5, 0.8)
pt3dadd(27.5, 125, 185.5, 0.8)
pt3dadd(29.5, 128, 188, 0.8)
pt3dadd(32, 130, 190.5, 0.4)
pt3dadd(31.5, 133, 190.5, 0.4)
pt3dadd(32, 135.5, 193.5, 0.4)
pt3dadd(33, 138, 185.5, 0.4)
pt3dadd(32.5, 140.5, 183, 0.8)
}
dend[6] {pt3dclear()
pt3dadd(32.5, 75, 194, 2.5)
pt3dadd(36, 75.5, 198, 1.2)
pt3dadd(37, 78, 202, 1.2)
pt3dadd(35, 76, 210, 1.1)
pt3dadd(38.5, 74, 211.5, 1.4)
pt3dadd(40.5, 73, 212.5, 1.3)
pt3dadd(45, 70.5, 211.5, 1.1)
pt3dadd(49, 65.5, 220.5, 1.3)
pt3dadd(51.5, 64, 224, 0.9)
pt3dadd(52.5, 59, 226, 1)
pt3dadd(52.5, 56.5, 225, 1)
}
dend[7] {pt3dclear()
pt3dadd(13, 22, 150, 4.4)
pt3dadd(10.5, 24.5, 153.5, 1.3)
pt3dadd(8.5, 26, 150, 1)
pt3dadd(5.5, 27.5, 150, 1.4)
pt3dadd(5, 34.5, 150, 1.3)
pt3dadd(0, 36, 150, 1.3)
pt3dadd(-2, 38.5, 150, 1.3)
pt3dadd(-4.5, 40, 150, 1.2)
pt3dadd(-6.5, 42, 153.5, 1.2)
pt3dadd(-6.5, 47, 153.5, 1.3)
pt3dadd(-7.5, 49, 157, 1.3)
pt3dadd(-9.5, 51.5, 147, 1.1)
pt3dadd(-8, 55, 147, 1.2)
pt3dadd(-7, 57, 150, 1.3)
pt3dadd(-5.5, 62.5, 150, 1.3)
pt3dadd(-6.5, 66, 153.5, 1.2)
pt3dadd(-6.5, 69, 157, 1.2)
pt3dadd(-7.5, 71.5, 150, 1.2)
pt3dadd(-9.5, 74.5, 153.5, 1.2)
pt3dadd(-11, 77, 153.5, 1.1)
pt3dadd(-12.5, 79.5, 153.5, 1.1)
pt3dadd(-11.5, 82.5, 153.5, 1.1)
pt3dadd(-9.5, 84.5, 153.5, 1.5)
pt3dadd(-8.5, 86.5, 153.5, 1.9)
}
dend[8] {pt3dclear()
pt3dadd(-8.5, 86.5, 153.5, 1.9)
pt3dadd(-10.5, 88, 154.5, 0.9)
pt3dadd(-11, 93, 161, 0.8)
pt3dadd(-14.5, 96.5, 163, 0.9)
pt3dadd(-16, 99.5, 168, 0.9)
pt3dadd(-16, 103.5, 173.5, 1.1)
pt3dadd(-16, 107.5, 172.5, 1.3)
pt3dadd(-13, 111, 175, 0.8)
}
dend[9] {pt3dclear()
pt3dadd(-8.5, 86.5, 153.5, 1.9)
pt3dadd(-6, 87, 157, 0.9)
pt3dadd(-5, 89, 157, 0.9)
pt3dadd(-3.5, 91, 157.5, 0.9)
pt3dadd(-1, 91, 157.5, 0.9)
}
dend[10] {pt3dclear()
pt3dadd(14.5, 11, 147, 4.5)
pt3dadd(19, 11, 144.5, 1.1)
pt3dadd(31.5, 11.5, 147, 1.3)
pt3dadd(33.5, 9.5, 159.5, 1.3)
pt3dadd(36, 9, 160, 1.3)
pt3dadd(46.5, 11.5, 158.5, 1.3)
pt3dadd(49, 13.5, 174, 1.3)
pt3dadd(57.5, 15, 179, 1.8)
pt3dadd(62, 18.5, 178, 1.6)
pt3dadd(66, 19, 181.5, 1.3)
pt3dadd(69.5, 21, 191.5, 1.3)
pt3dadd(73, 18, 198.5, 1.3)
pt3dadd(74.5, 21, 199.5, 1.3)
pt3dadd(76.5, 19.5, 206.5, 1.2)
pt3dadd(79, 17, 207.5, 1)
pt3dadd(82.5, 17.5, 208.5, 1)
pt3dadd(85.5, 14, 209.5, 1)
pt3dadd(87.5, 12, 210.5, 1)
pt3dadd(90, 12.5, 211, 1)
pt3dadd(93.5, 12, 212, 1.2)
pt3dadd(100, 8.5, 226, 1)
pt3dadd(102, 7.5, 226.5, 0.9)
pt3dadd(105, 7.5, 225, 0.9)
pt3dadd(112.5, 7, 224.5, 1.3)
pt3dadd(114, 9, 225.5, 1.1)
pt3dadd(118, 9, 230.5, 0.9)
pt3dadd(120.5, 7, 241, 0.8)
pt3dadd(126.5, 3, 249.5, 1.1)
pt3dadd(127, 0, 250.5, 1.1)
pt3dadd(129, -7.5, 248.5, 0.8)
pt3dadd(131, -10.5, 262.5, 0.9)
pt3dadd(130.5, -14.5, 263.5, 0.7)
pt3dadd(133.5, -21, 265, 0.8)
pt3dadd(135.5, -23.5, 269.5, 0.9)
pt3dadd(138, -26, 270.5, 0.9)
pt3dadd(142.5, -30.5, 280, 1.4)
pt3dadd(143, -34, 275, 1.8)
}
dend[11] {pt3dclear()
pt3dadd(-4.5, -18, 107.5, 9.6)
pt3dadd(-9, -20, 120.5, 7)
pt3dadd(-27.5, -18.5, 126.5, 4.8)
pt3dadd(-30.5, -17.5, 125, 4.8)
pt3dadd(-43.5, -17, 136, 5.8)
pt3dadd(-49.5, -20, 136.5, 4.7)
pt3dadd(-50.5, -23, 141.5, 4.8)
pt3dadd(-53.5, -25, 142.5, 4.1)
pt3dadd(-60, -25, 152, 5.3)
pt3dadd(-66.5, -23.5, 162, 4.6)
pt3dadd(-70, -23, 166.5, 5.2)
pt3dadd(-78.5, -20, 169.5, 5.7)
pt3dadd(-81.5, -18.5, 175, 5.7)
pt3dadd(-88.5, -15.5, 176.5, 4.5)
pt3dadd(-91.5, -15.5, 177, 3.4)
pt3dadd(-94.5, -16.5, 183.5, 3.7)
pt3dadd(-95, -20.5, 184.5, 3.7)
pt3dadd(-95, -24, 182.5, 3.7)
pt3dadd(-94.5, -26.5, 183, 3.5)
pt3dadd(-98.5, -31, 187.5, 3.7)
pt3dadd(-104, -30.5, 197, 4.8)
pt3dadd(-107, -27.5, 198, 4.5)
pt3dadd(-113, -26.5, 202.5, 4.2)
pt3dadd(-117, -27, 211.5, 5)
pt3dadd(-120.5, -27, 212.5, 5.3)
pt3dadd(-122, -27.5, 216, 7.5)
}
dend[12] {pt3dclear()
pt3dadd(-122, -27.5, 216, 7.5)
pt3dadd(-125, -27.5, 223, 4)
pt3dadd(-129.5, -25.5, 225, 3.4)
pt3dadd(-129, -21.5, 219, 4.7)
pt3dadd(-129, -17.5, 227, 5)
pt3dadd(-132.5, -14.5, 235, 5)
pt3dadd(-135, -12, 229, 4.4)
pt3dadd(-137.5, -8, 233, 4.2)
pt3dadd(-140.5, -5, 233.5, 4.2)
pt3dadd(-142.5, -3.5, 234, 4)
pt3dadd(-145.5, -1, 238, 4.2)
pt3dadd(-148.5, -0.5, 238.5, 3.8)
pt3dadd(-151.5, -0.5, 239, 4.6)
pt3dadd(-154.5, 0, 239, 3.8)
pt3dadd(-156.5, 4.5, 239.5, 3.8)
pt3dadd(-156.5, 8, 240, 4.2)
pt3dadd(-156, 11.5, 231, 4.6)
}
}
proc shape3d_2() {
dend[12] { pt3dadd(-156, 15, 231.5, 4.1)
pt3dadd(-155.5, 18, 248, 3.8)
pt3dadd(-157.5, 21, 244.5, 4.5)
pt3dadd(-159.5, 22, 245, 4.8)
pt3dadd(-163, 25, 242, 4.8)
pt3dadd(-163, 28, 246, 4.8)
pt3dadd(-164.5, 30.5, 246.5, 4.8)
pt3dadd(-166, 33, 255, 4.1)
pt3dadd(-169, 35.5, 259, 4)
pt3dadd(-171.5, 37.5, 263, 4)
pt3dadd(-174.5, 42, 254, 4.5)
pt3dadd(-176.5, 45.5, 254.5, 4.8)
pt3dadd(-176.5, 49.5, 251.5, 4.1)
pt3dadd(-178, 53, 256, 3.7)
pt3dadd(-180.5, 57, 268, 3.3)
pt3dadd(-180.5, 61, 270.5, 3.2)
pt3dadd(-183, 63, 264.5, 3)
pt3dadd(-185, 65.5, 265, 3.4)
pt3dadd(-186, 69, 265.5, 3.5)
pt3dadd(-188.5, 74, 266, 3.5)
pt3dadd(-191, 77, 266.5, 3.5)
pt3dadd(-194.5, 80, 275, 3.5)
pt3dadd(-198.5, 83, 275.5, 4.1)
pt3dadd(-199, 86, 275.5, 4.1)
pt3dadd(-200.5, 89, 276, 3.7)
pt3dadd(-203, 93.5, 277, 3.4)
pt3dadd(-203, 97, 277, 3.4)
pt3dadd(-206, 108, 282, 3.8)
pt3dadd(-210, 111, 289.5, 3.8)
pt3dadd(-210.5, 113.5, 293, 2.9)
pt3dadd(-211, 122, 297, 3.4)
}
dend[13] {pt3dclear()
pt3dadd(-211, 122, 297, 3.4)
pt3dadd(-206, 121.5, 314.5, 1.7)
pt3dadd(-203.5, 119.5, 325, 1.9)
}
dend[14] {pt3dclear()
pt3dadd(-211, 122, 297, 3.4)
pt3dadd(-215, 124.5, 297, 3.1)
pt3dadd(-219, 130.5, 296.5, 3.2)
pt3dadd(-219, 134, 296.5, 3.2)
pt3dadd(-222, 140.5, 296.5, 3.2)
pt3dadd(-226, 141.5, 293.5, 3.9)
}
dend[15] {pt3dclear()
pt3dadd(-226, 141.5, 293.5, 3.9)
pt3dadd(-225, 146, 297.5, 2.7)
pt3dadd(-226.5, 154.5, 302.5, 2.6)
pt3dadd(-228.5, 161.5, 304.5, 3)
pt3dadd(-231, 163, 313, 2.6)
pt3dadd(-234.5, 168.5, 315, 2.1)
pt3dadd(-236, 173, 316.5, 1.6)
pt3dadd(-237.5, 177.5, 325, 1.8)
pt3dadd(-238.5, 180.5, 325, 2.7)
pt3dadd(-239.5, 186.5, 325.5, 2.5)
pt3dadd(-239.5, 192, 326, 2.5)
pt3dadd(-241.5, 194.5, 326.5, 2.5)
pt3dadd(-242, 198, 327, 2.5)
pt3dadd(-243, 201, 329.5, 2.8)
pt3dadd(-245.5, 204.5, 330, 2.7)
pt3dadd(-249, 214, 331.5, 2.6)
pt3dadd(-251.5, 215.5, 335, 2.1)
pt3dadd(-253, 218, 335.5, 2.1)
pt3dadd(-252.5, 221, 335.5, 2.1)
pt3dadd(-253, 224, 333, 2)
pt3dadd(-256, 226, 333.5, 2)
pt3dadd(-258.5, 226.5, 333.5, 2)
pt3dadd(-261, 233.5, 340.5, 1.8)
pt3dadd(-264, 235, 338.5, 1.8)
pt3dadd(-265, 238.5, 338.5, 1.8)
pt3dadd(-267.5, 244.5, 339, 1.8)
pt3dadd(-268.5, 249, 339.5, 1.6)
pt3dadd(-271, 251.5, 340, 1.9)
pt3dadd(-274.5, 254.5, 340.5, 2.2)
pt3dadd(-272.5, 258.5, 338, 2.2)
pt3dadd(-275, 263.5, 336, 3.1)
}
dend[16] {pt3dclear()
pt3dadd(-275, 263.5, 336, 3.1)
pt3dadd(-274.5, 269.5, 333, 1.1)
pt3dadd(-274, 274.5, 333, 1.4)
pt3dadd(-272.5, 276.5, 333, 1.4)
pt3dadd(-274.5, 278.5, 333, 1.2)
pt3dadd(-275, 282, 333, 1.2)
pt3dadd(-274, 284.5, 333, 1.3)
pt3dadd(-274, 289.5, 333, 1.6)
pt3dadd(-273.5, 293, 333, 1.3)
pt3dadd(-272, 299, 330.5, 1.1)
pt3dadd(-273, 304, 327.5, 1.6)
pt3dadd(-273, 307.5, 330.5, 1.6)
pt3dadd(-277, 309, 333, 1.6)
pt3dadd(-276, 312, 338.5, 1.4)
pt3dadd(-277.5, 317.5, 336, 1.3)
pt3dadd(-277.5, 322.5, 336, 1.6)
pt3dadd(-278, 325, 336.5, 1.6)
pt3dadd(-281, 332, 333.5, 1.6)
pt3dadd(-281, 335, 333.5, 1.5)
pt3dadd(-281.5, 338.5, 333.5, 1.2)
pt3dadd(-281.5, 341.5, 333.5, 1.2)
pt3dadd(-285, 348.5, 333.5, 1.5)
pt3dadd(-285, 351.5, 333.5, 1.7)
pt3dadd(-286, 356.5, 328, 1.9)
pt3dadd(-285.5, 362, 331, 1.1)
pt3dadd(-288, 371.5, 333.5, 1.3)
pt3dadd(-288, 376.5, 333.5, 1.1)
pt3dadd(-290.5, 379, 333.5, 1)
pt3dadd(-292.5, 381, 333.5, 1)
pt3dadd(-293, 390, 333.5, 1.1)
pt3dadd(-296.5, 391.5, 336.5, 1.3)
pt3dadd(-297, 394.5, 339, 1.3)
pt3dadd(-297, 398, 344.5, 0.8)
pt3dadd(-298, 401.5, 339, 0.9)
pt3dadd(-299, 404.5, 336.5, 2)
pt3dadd(-298.5, 410, 333.5, 1.1)
pt3dadd(-299, 415, 336.5, 2.1)
pt3dadd(-302, 420, 333.5, 1.6)
pt3dadd(-303.5, 421.5, 333.5, 1.4)
pt3dadd(-304, 424, 336.5, 0.9)
pt3dadd(-304, 427.5, 336.5, 0.9)
pt3dadd(-307.5, 431, 336.5, 0.8)
pt3dadd(-308, 434.5, 336.5, 0.8)
pt3dadd(-307.5, 442, 333.5, 1.3)
pt3dadd(-310.5, 444, 333.5, 1.3)
pt3dadd(-311.5, 446.5, 336.5, 1.3)
pt3dadd(-311.5, 450.5, 336.5, 1.3)
pt3dadd(-315, 453.5, 336.5, 1.3)
pt3dadd(-316, 455.5, 336.5, 1.8)
pt3dadd(-316, 458, 333.5, 1.3)
}
dend[17] {pt3dclear()
pt3dadd(-275, 263.5, 336, 3.1)
pt3dadd(-278.5, 264, 333, 1.4)
pt3dadd(-281.5, 265.5, 333, 1.4)
pt3dadd(-282, 268.5, 330.5, 1.4)
pt3dadd(-282.5, 271.5, 327.5, 1.3)
pt3dadd(-286, 274, 333, 1.4)
pt3dadd(-286, 278, 333, 1.5)
pt3dadd(-287, 282, 333, 1.6)
pt3dadd(-289, 284, 333, 1.9)
pt3dadd(-289.5, 289, 336, 2.3)
pt3dadd(-292.5, 291.5, 333, 1.5)
pt3dadd(-296.5, 294, 330.5, 1.4)
pt3dadd(-298, 296.5, 333, 1.2)
pt3dadd(-299.5, 298.5, 333, 1.2)
pt3dadd(-302.5, 299, 333, 1.2)
pt3dadd(-303, 304, 333, 1.4)
pt3dadd(-303, 307, 333, 1.1)
pt3dadd(-304, 309, 333, 1.1)
pt3dadd(-308, 309, 333, 1.3)
pt3dadd(-311.5, 311.5, 333, 1.3)
pt3dadd(-313.5, 312.5, 333, 1.3)
pt3dadd(-317.5, 312.5, 330.5, 1.4)
pt3dadd(-320.5, 312.5, 330.5, 1.2)
pt3dadd(-325.5, 315, 330.5, 1.2)
pt3dadd(-327, 316.5, 333, 1.3)
pt3dadd(-328, 319.5, 336, 1.6)
pt3dadd(-331.5, 320.5, 336, 1.6)
pt3dadd(-336.5, 322, 336, 1.6)
pt3dadd(-338.5, 324, 336, 1.5)
pt3dadd(-342, 323, 336, 1)
pt3dadd(-347.5, 324, 336, 1.2)
pt3dadd(-353.5, 325.5, 338.5, 1.5)
pt3dadd(-356.5, 327, 338.5, 1.5)
pt3dadd(-360.5, 328.5, 338.5, 1.5)
pt3dadd(-363, 329.5, 338.5, 1.7)
pt3dadd(-365.5, 332, 339, 1.7)
pt3dadd(-368.5, 332.5, 336.5, 1.5)
pt3dadd(-371, 333, 336.5, 1.2)
pt3dadd(-373.5, 336.5, 339, 1.2)
pt3dadd(-375, 338, 339, 1.2)
pt3dadd(-378.5, 338, 336.5, 1.2)
pt3dadd(-381, 341.5, 336.5, 1.2)
pt3dadd(-384.5, 343, 336.5, 1.1)
pt3dadd(-386, 346, 336.5, 1.2)
pt3dadd(-386, 349, 336.5, 1)
pt3dadd(-385.5, 352.5, 336.5, 0.9)
pt3dadd(-386, 356, 336.5, 0.9)
pt3dadd(-388.5, 358, 336.5, 0.9)
pt3dadd(-394, 358, 342, 1)
pt3dadd(-396.5, 360, 342, 1)
pt3dadd(-397, 363.5, 342, 1)
pt3dadd(-398.5, 367, 342, 1)
pt3dadd(-401.5, 368.5, 342, 1)
pt3dadd(-408, 370.5, 339, 1.1)
pt3dadd(-409.5, 374.5, 339, 1.3)
pt3dadd(-410, 378, 339, 1.2)
pt3dadd(-411, 381, 339, 1)
pt3dadd(-413.5, 383, 339, 0.9)
pt3dadd(-415, 384.5, 339, 0.8)
pt3dadd(-415, 388, 339, 0.9)
pt3dadd(-416.5, 391.5, 339, 0.9)
pt3dadd(-418.5, 395.5, 333.5, 1)
pt3dadd(-422.5, 398.5, 333.5, 1.2)
pt3dadd(-423, 402, 333.5, 1.2)
pt3dadd(-426.5, 403, 336.5, 1.4)
pt3dadd(-428.5, 405, 336.5, 1.5)
pt3dadd(-429, 408, 336.5, 1.3)
pt3dadd(-432.5, 411, 336.5, 0.9)
}
dend[18] {pt3dclear()
pt3dadd(-226, 141.5, 293.5, 3.9)
pt3dadd(-230, 142.5, 309.5, 2.3)
pt3dadd(-233, 149, 311.5, 2)
pt3dadd(-235.5, 151.5, 326.5, 2.1)
pt3dadd(-234.5, 158, 325, 2.5)
pt3dadd(-237, 157.5, 326, 1.7)
pt3dadd(-240, 161.5, 327.5, 2)
pt3dadd(-241, 165.5, 340, 2)
pt3dadd(-240, 162.5, 345.5, 1.8)
pt3dadd(-237.5, 160.5, 347.5, 1.8)
pt3dadd(-240.5, 159.5, 349, 1.8)
}
}
proc shape3d_3() {
dend[18] { pt3dadd(-243.5, 161, 351.5, 1.8)
pt3dadd(-242, 165, 353.5, 1.8)
pt3dadd(-245, 165.5, 362.5, 1.8)
pt3dadd(-248, 165.5, 364, 1.7)
pt3dadd(-250, 166.5, 365.5, 1.6)
pt3dadd(-248, 168.5, 367, 1.6)
pt3dadd(-246, 170, 368.5, 1.6)
pt3dadd(-243.5, 171, 373.5, 1.8)
pt3dadd(-242.5, 173, 375, 1.8)
pt3dadd(-245, 174, 375.5, 1.2)
pt3dadd(-247, 171.5, 384, 1.6)
pt3dadd(-249, 169.5, 381, 1.7)
pt3dadd(-251, 167, 385.5, 1)
pt3dadd(-248, 164, 391, 1.2)
pt3dadd(-246, 162.5, 387.5, 1.5)
pt3dadd(-242, 161.5, 388.5, 1.9)
pt3dadd(-244, 158.5, 393.5, 1.4)
pt3dadd(-244.5, 155, 394.5, 1.1)
pt3dadd(-240, 151, 400.5, 1.5)
pt3dadd(-240, 147.5, 406.5, 1.4)
pt3dadd(-242, 145.5, 410.5, 1.3)
pt3dadd(-243.5, 147.5, 415, 1.2)
pt3dadd(-247, 149, 416, 1.4)
pt3dadd(-251, 149, 425, 1.4)
pt3dadd(-253.5, 150, 426, 1.6)
pt3dadd(-255.5, 151.5, 425.5, 1.6)
pt3dadd(-255.5, 154.5, 430.5, 1.6)
pt3dadd(-258.5, 154.5, 432, 1.7)
pt3dadd(-263, 151.5, 439, 1.4)
pt3dadd(-264.5, 153, 440.5, 1.4)
pt3dadd(-266, 156, 446, 1.8)
pt3dadd(-263.5, 157, 456, 0.9)
pt3dadd(-268.5, 155, 461, 0.9)
pt3dadd(-269.5, 150.5, 467.5, 0.7)
pt3dadd(-269.5, 147.5, 469, 1.3)
pt3dadd(-271, 145, 470.5, 1.8)
pt3dadd(-272, 147.5, 472, 1.6)
pt3dadd(-275, 152, 475, 1.6)
pt3dadd(-275, 157, 482.5, 1)
pt3dadd(-277, 158, 482.5, 1.1)
pt3dadd(-280.5, 153.5, 491, 1.3)
pt3dadd(-284, 154, 487.5, 1.5)
pt3dadd(-283, 156.5, 492, 1.2)
pt3dadd(-280, 158.5, 499.5, 1.1)
pt3dadd(-280, 161.5, 492.5, 1.3)
pt3dadd(-280.5, 165, 492.5, 1.3)
pt3dadd(-280, 161, 500.5, 1.2)
pt3dadd(-277.5, 162, 508.5, 0.9)
pt3dadd(-274.5, 163.5, 505, 0.9)
}
dend[19] {pt3dclear()
pt3dadd(-122, -27.5, 216, 7.5)
pt3dadd(-125, -33, 220, 3.7)
pt3dadd(-128, -40.5, 225, 3.4)
pt3dadd(-129.5, -44, 226, 2.7)
pt3dadd(-131, -46, 230.5, 3)
pt3dadd(-133.5, -50.5, 229, 2.7)
pt3dadd(-136, -51.5, 229.5, 2.7)
pt3dadd(-140, -50.5, 239.5, 2.7)
pt3dadd(-141.5, -48, 249, 2.7)
pt3dadd(-144.5, -47, 259, 3.4)
pt3dadd(-145.5, -49, 256.5, 3.7)
}
dend[20] {pt3dclear()
pt3dadd(-145.5, -49, 256.5, 3.7)
pt3dadd(-149, -48, 250.5, 1.4)
pt3dadd(-148.5, -51.5, 255, 1.1)
pt3dadd(-151, -51, 259, 1.2)
pt3dadd(-154, -51, 259.5, 1.2)
pt3dadd(-160, -52.5, 268.5, 1.2)
pt3dadd(-166, -52, 266, 1.2)
pt3dadd(-168, -53, 270.5, 1.2)
pt3dadd(-171, -54.5, 274.5, 1.2)
pt3dadd(-174.5, -55.5, 275, 1.2)
pt3dadd(-180.5, -61, 273, 1.3)
pt3dadd(-182, -62.5, 273.5, 1.2)
pt3dadd(-188.5, -62.5, 274.5, 1.2)
pt3dadd(-190, -62.5, 275, 1.2)
}
dend[21] {pt3dclear()
pt3dadd(-145.5, -49, 256.5, 3.7)
pt3dadd(-144, -52.5, 253.5, 2.5)
pt3dadd(-144, -59, 262.5, 2.2)
pt3dadd(-148, -66.5, 263.5, 2.3)
pt3dadd(-150.5, -69.5, 268, 2.3)
pt3dadd(-152.5, -72.5, 272, 2.8)
pt3dadd(-155, -75, 272.5, 3)
pt3dadd(-157.5, -79.5, 277, 2.5)
pt3dadd(-158, -82, 277.5, 2.5)
pt3dadd(-158.5, -84.5, 275, 2.6)
pt3dadd(-157.5, -89.5, 276, 2.6)
pt3dadd(-155.5, -93, 275.5, 2.8)
pt3dadd(-154, -99, 282, 2.4)
pt3dadd(-157, -100, 286, 1.8)
pt3dadd(-162, -100.5, 290.5, 2)
pt3dadd(-165, -100, 302.5, 2.5)
pt3dadd(-168, -97, 302, 2.6)
pt3dadd(-171.5, -94.5, 298.5, 1.8)
pt3dadd(-175.5, -95, 306.5, 1.8)
pt3dadd(-180.5, -95.5, 313, 2.5)
pt3dadd(-183.5, -93, 320.5, 2.4)
pt3dadd(-187.5, -97.5, 326, 1.8)
pt3dadd(-190.5, -100, 330, 2)
pt3dadd(-190.5, -103, 334.5, 3.3)
pt3dadd(-190.5, -99, 338, 2.5)
pt3dadd(-190, -95, 344, 2.2)
pt3dadd(-187, -92, 345, 2.5)
pt3dadd(-191, -96, 359.5, 2.7)
pt3dadd(-195, -98.5, 356.5, 2.3)
pt3dadd(-196.5, -101.5, 357.5, 2.7)
pt3dadd(-198, -108.5, 365.5, 2.3)
pt3dadd(-200, -110, 369.5, 2.1)
pt3dadd(-202.5, -111, 373, 2.1)
pt3dadd(-204.5, -112.5, 374, 2.1)
pt3dadd(-206.5, -114.5, 375, 2.1)
pt3dadd(-211, -116.5, 383.5, 2)
pt3dadd(-216, -118, 386.5, 1.8)
pt3dadd(-228, -115, 413, 1.8)
pt3dadd(-231, -117.5, 408, 2)
pt3dadd(-236.5, -119.5, 417, 1.9)
pt3dadd(-242.5, -119, 422.5, 1.8)
pt3dadd(-246.5, -125, 424, 2.2)
pt3dadd(-248.5, -126, 425, 2.7)
pt3dadd(-251, -125.5, 422.5, 2.3)
pt3dadd(-254.5, -126, 423.5, 2.3)
pt3dadd(-258.5, -127, 431.5, 2.1)
pt3dadd(-263.5, -128.5, 432.5, 1.9)
pt3dadd(-265, -131, 436.5, 1.9)
pt3dadd(-265.5, -137, 435.5, 1.9)
pt3dadd(-269, -136.5, 443, 1.6)
pt3dadd(-274, -137.5, 448, 1.6)
pt3dadd(-276, -140, 449, 1.6)
pt3dadd(-278, -142.5, 447, 1.6)
pt3dadd(-279, -139.5, 454.5, 1.9)
pt3dadd(-280, -135, 456.5, 1.7)
pt3dadd(-284.5, -135.5, 462.5, 1.9)
pt3dadd(-287.5, -137.5, 463.5, 2.2)
pt3dadd(-286.5, -141.5, 475, 2.2)
pt3dadd(-289, -143, 476, 1.7)
pt3dadd(-285.5, -145, 500, 1.3)
pt3dadd(-289, -141.5, 494, 1.3)
pt3dadd(-292.5, -146, 497, 1.7)
pt3dadd(-298, -147, 505, 1.2)
pt3dadd(-296.5, -144, 507, 0.9)
pt3dadd(-293.5, -145.5, 512.5, 0.9)
pt3dadd(-291, -147.5, 525, 1.6)
pt3dadd(-295.5, -149.5, 525, 1.4)
pt3dadd(-297, -151, 525.5, 1.4)
pt3dadd(-295.5, -153, 535, 1.4)
pt3dadd(-293, -155, 540, 1.4)
pt3dadd(-296.5, -155, 546, 1.2)
pt3dadd(-299, -160, 552, 1.2)
pt3dadd(-299.5, -162.5, 548, 1.2)
pt3dadd(-301, -159.5, 558.5, 1.4)
pt3dadd(-304, -158, 559, 1)
pt3dadd(-305, -160, 559.5, 0.9)
pt3dadd(-307, -165.5, 574, 1.7)
pt3dadd(-308, -168, 574.5, 1.6)
pt3dadd(-309.5, -171.5, 575, 1.5)
}
dend[22] {pt3dclear()
pt3dadd(25, -29.5, 23, 8.4)
pt3dadd(22.5, -31.5, 18.5, 6.7)
pt3dadd(21.5, -33, 25, 5.7)
pt3dadd(20, -36, 49, 5.7)
pt3dadd(20, -40, 65.5, 5.7)
pt3dadd(18.5, -42.5, 75, 5.7)
pt3dadd(28, -48.5, 80.5, 10.6)
pt3dadd(38, -51.5, 83, 7.9)
pt3dadd(45.5, -56.5, 94, 8.1)
pt3dadd(51.5, -62.5, 98, 8.4)
pt3dadd(54.5, -66.5, 96.5, 7.7)
pt3dadd(62, -67.5, 107, 5.9)
pt3dadd(64.5, -70.5, 101, 5)
pt3dadd(65.67, -79.12, 113.94, 7.8)
}
dend[23] {pt3dclear()
pt3dadd(65.67, -79.12, 113.94, 7.8)
pt3dadd(66, -86.5, 120.5, 6.1)
pt3dadd(64, -92, 115, 5)
pt3dadd(63, -98, 115, 4.6)
pt3dadd(62.5, -104, 117.5, 3.5)
pt3dadd(64, -111, 120, 3.5)
pt3dadd(65.5, -114, 117, 3.4)
pt3dadd(66.5, -119.5, 114.5, 4.2)
pt3dadd(66.5, -122.5, 111.5, 5)
}
dend[24] {pt3dclear()
pt3dadd(66.5, -122.5, 111.5, 5)
pt3dadd(69, -124, 112, 1.3)
pt3dadd(72.5, -122, 116.5, 0.8)
pt3dadd(74, -123.5, 117, 0.3)
pt3dadd(82.5, -126.5, 116, 0.2)
pt3dadd(85, -127.5, 114.5, 0.2)
pt3dadd(83, -131, 111.5, 0.3)
pt3dadd(85.5, -132.5, 109.5, 0.3)
pt3dadd(88, -133, 113, 0.3)
pt3dadd(88.5, -137.5, 114, 0.1)
pt3dadd(90.5, -139, 114.5, 0.1)
pt3dadd(92, -141, 113, 0.1)
pt3dadd(94.5, -141.5, 113.5, 0.1)
pt3dadd(96.5, -144.5, 114, 0.1)
pt3dadd(98.5, -146.5, 114.5, 0.1)
pt3dadd(101, -149, 115.5, 0.1)
pt3dadd(104, -153.5, 116.5, 0.1)
pt3dadd(106.5, -159, 112.5, 0.1)
pt3dadd(109.5, -162, 113.5, 0.1)
pt3dadd(111.5, -166, 114, 0.1)
pt3dadd(112.5, -173, 121.5, 0.1)
pt3dadd(113, -176.5, 122.5, 0.1)
pt3dadd(115, -179.5, 123, 0.1)
pt3dadd(115, -182.5, 123.5, 0.1)
}
}
proc shape3d_4() {
dend[24] { pt3dadd(115, -187, 124.5, 0.1)
pt3dadd(115.5, -190, 125, 0.1)
pt3dadd(117, -194, 126, 0.1)
pt3dadd(117.5, -196.5, 121.5, 0.1)
pt3dadd(117.5, -204.5, 123.5, 0.1)
pt3dadd(122, -206, 124, 0.1)
pt3dadd(125, -210.5, 122.5, 0.1)
pt3dadd(124.5, -214, 121, 0.1)
pt3dadd(126, -216, 124, 0.1)
pt3dadd(126.5, -219, 125, 0.1)
pt3dadd(124, -222.5, 128.5, 1.6)
pt3dadd(125.5, -224.5, 122.5, 1.8)
pt3dadd(126.5, -227.5, 126, 1.1)
pt3dadd(124, -234.5, 130.5, 1.6)
pt3dadd(124.5, -240.5, 131, 1.6)
pt3dadd(123.5, -245, 131.5, 2.2)
pt3dadd(125, -252, 128.5, 1.6)
pt3dadd(127, -257.5, 129, 1.7)
pt3dadd(127, -260.5, 129.5, 1.7)
pt3dadd(129.5, -262.5, 123.5, 1.8)
pt3dadd(131.5, -264, 120.5, 1.5)
pt3dadd(131, -268.5, 124.5, 1.5)
pt3dadd(132, -271, 125, 1.5)
pt3dadd(133.5, -276, 118.5, 1)
pt3dadd(134, -279, 116, 1)
pt3dadd(137, -285.5, 127, 1.9)
pt3dadd(138.5, -288.5, 127.5, 1.5)
pt3dadd(140, -294.5, 124.5, 1.3)
pt3dadd(141, -296.5, 125, 1.3)
pt3dadd(142, -301, 125, 1.3)
pt3dadd(142.5, -303.5, 125, 0.8)
pt3dadd(143.5, -305.5, 122.5, 0.8)
pt3dadd(145.5, -309.5, 122.5, 0.8)
pt3dadd(145.5, -314.5, 122.5, 0.9)
pt3dadd(147.5, -316, 122.5, 1.1)
pt3dadd(152, -318.5, 122.5, 0.9)
pt3dadd(152.5, -321, 122.5, 0.9)
pt3dadd(152, -327, 119.5, 1)
pt3dadd(152, -330.5, 122.5, 1.3)
pt3dadd(151, -334, 122.5, 1.3)
pt3dadd(150.5, -336.5, 122.5, 1.4)
pt3dadd(151.5, -339, 122.5, 1.4)
pt3dadd(155.5, -345.5, 119.5, 0.8)
pt3dadd(156, -349, 119.5, 1.1)
pt3dadd(157, -352.5, 119.5, 1.3)
pt3dadd(159, -363.5, 122.5, 0.6)
pt3dadd(160.5, -365, 122.5, 0.8)
pt3dadd(160.5, -374, 125, 1.2)
pt3dadd(160.5, -377, 125, 1.2)
pt3dadd(160.5, -382.5, 121.5, 1.2)
pt3dadd(163.5, -388, 122, 1.1)
pt3dadd(165, -390.5, 122, 1.1)
pt3dadd(163.5, -395.5, 122.5, 1.1)
pt3dadd(164.5, -398, 122.5, 1.1)
pt3dadd(166.5, -399.5, 123, 1.1)
pt3dadd(168.5, -406.5, 123.5, 1)
pt3dadd(168, -410, 123.5, 1)
pt3dadd(167, -413, 123.5, 1)
pt3dadd(167.5, -415.5, 124, 1.1)
pt3dadd(166.5, -420, 124, 1.2)
pt3dadd(165, -423, 124.5, 0.9)
pt3dadd(165.5, -429.5, 125, 0.8)
pt3dadd(165, -433, 124.5, 0.9)
pt3dadd(164, -436, 126.5, 0.8)
pt3dadd(165.5, -440.5, 126, 1.2)
pt3dadd(166, -443, 129, 1.4)
pt3dadd(165, -449.5, 128.5, 0.9)
pt3dadd(167.5, -451, 125, 0.7)
pt3dadd(167.5, -455.5, 124.5, 0.7)
pt3dadd(168.5, -458, 124.5, 0.9)
pt3dadd(170.5, -463, 127, 0.9)
pt3dadd(170.5, -466.5, 126.5, 0.9)
pt3dadd(170.5, -469.5, 126, 0.7)
pt3dadd(169.5, -471.5, 126, 0.4)
pt3dadd(170, -474, 126, 0.3)
pt3dadd(170.5, -477.5, 125.5, 0.1)
pt3dadd(166.5, -481, 127.5, 0.1)
pt3dadd(169.5, -487, 118.5, 0.1)
pt3dadd(166.5, -490, 120.5, 0.1)
pt3dadd(166, -494, 117.5, 0.1)
pt3dadd(167.5, -495.5, 117.5, 0.1)
pt3dadd(170.5, -498, 117, 0.1)
pt3dadd(170.5, -501, 119, 0.1)
pt3dadd(173, -504, 119, 0.1)
pt3dadd(173, -508.5, 118.5, 0.1)
pt3dadd(174, -511.5, 118, 0.1)
pt3dadd(177.5, -516.5, 117.5, 0.1)
pt3dadd(178, -519, 117.5, 0.1)
pt3dadd(181, -524.5, 114.5, 0.1)
pt3dadd(183.5, -527.5, 116.5, 0.1)
pt3dadd(186, -533, 116, 0.1)
pt3dadd(186, -538, 116.5, 2.3)
pt3dadd(185, -542, 120.5, 1.9)
pt3dadd(184.5, -546, 114.5, 0.9)
pt3dadd(187, -557, 119, 1.3)
pt3dadd(187.5, -561, 119.5, 1.3)
pt3dadd(190, -567, 117.5, 1.1)
pt3dadd(191, -579.5, 119, 0.6)
pt3dadd(193.5, -580.5, 122.5, 0.8)
pt3dadd(196.5, -583.5, 123, 1)
pt3dadd(198.5, -589.5, 120.5, 0.7)
pt3dadd(199, -592.5, 121, 0.7)
pt3dadd(197, -595, 121.5, 0.7)
pt3dadd(198.5, -599.5, 128.5, 0.9)
pt3dadd(200.5, -603, 126, 0.1)
pt3dadd(204, -606.5, 126.5, 0.1)
pt3dadd(207.5, -608.5, 134, 0.1)
pt3dadd(210, -612, 134.5, 0.1)
pt3dadd(213, -614.5, 135, 0.1)
pt3dadd(215, -616.5, 132, 0.1)
pt3dadd(218, -620, 132.5, 0.1)
pt3dadd(222.5, -625.5, 130, 0.1)
}
dend[25] {pt3dclear()
pt3dadd(66.5, -122.5, 111.5, 5)
pt3dadd(65.5, -126.5, 119, 4.1)
pt3dadd(60.5, -141, 127.5, 3)
pt3dadd(58, -146.5, 125, 3.4)
pt3dadd(56, -152, 126.5, 3.3)
pt3dadd(55, -158.5, 126, 3.7)
pt3dadd(55, -165, 135, 3.8)
pt3dadd(54.5, -171, 137, 3)
pt3dadd(51.5, -181.5, 144.5, 2.8)
pt3dadd(52, -184, 145, 2.8)
pt3dadd(55, -188.5, 151, 3.7)
pt3dadd(51, -193.5, 166, 2.7)
pt3dadd(49.5, -195.5, 161.5, 3.4)
pt3dadd(49, -202.5, 163.5, 3.7)
pt3dadd(51.5, -204.5, 173, 4.1)
pt3dadd(57, -210, 175, 4.1)
pt3dadd(62, -213.5, 177, 3.2)
pt3dadd(66, -223.5, 175.5, 3.4)
pt3dadd(69, -228, 179, 2.7)
pt3dadd(66, -232.5, 188, 2.8)
pt3dadd(63.5, -234, 188.5, 2.8)
pt3dadd(60, -239, 189, 2.8)
pt3dadd(58.5, -240.5, 191.5, 3.2)
pt3dadd(56.5, -245, 194.5, 3.2)
pt3dadd(58.5, -250, 192.5, 3)
pt3dadd(59.5, -256, 195.5, 3)
pt3dadd(58, -259.5, 199.5, 3.2)
pt3dadd(55, -270.5, 203.5, 3.1)
pt3dadd(55.5, -275.5, 203.5, 3.4)
pt3dadd(55, -281, 204, 3.8)
pt3dadd(53.5, -287, 204.5, 3.5)
pt3dadd(52, -291.5, 207.5, 3.9)
pt3dadd(50.5, -301, 214.5, 3.7)
pt3dadd(52, -306.5, 212, 2.5)
pt3dadd(52, -310.5, 212.5, 2.5)
pt3dadd(50, -317.5, 213, 2)
}
dend[26] {pt3dclear()
pt3dadd(50, -317.5, 213, 2)
pt3dadd(50.5, -321.5, 213, 2)
pt3dadd(51, -325, 213, 2)
pt3dadd(51.5, -330, 213, 1.6)
pt3dadd(50.5, -338.5, 213, 1.3)
pt3dadd(49, -343, 213, 1.3)
pt3dadd(48, -347.5, 213, 1.3)
pt3dadd(49, -351, 213, 1.6)
pt3dadd(48.5, -354.5, 205.5, 1.2)
pt3dadd(48.5, -364.5, 205.5, 1.2)
pt3dadd(46.5, -382.5, 202.5, 1.1)
pt3dadd(48.5, -385, 202.5, 1.1)
pt3dadd(51.5, -388.5, 205.5, 1.7)
pt3dadd(54, -391, 205.5, 1.5)
pt3dadd(56.5, -393, 202.5, 0.8)
pt3dadd(56, -397.5, 202.5, 0.8)
pt3dadd(54.5, -402, 202.5, 1)
pt3dadd(55, -406, 202.5, 1.2)
pt3dadd(52.5, -410.5, 202.5, 0.8)
pt3dadd(54, -414, 200, 0.8)
pt3dadd(56.5, -416, 197.5, 0.6)
pt3dadd(59, -418, 197.5, 0.5)
pt3dadd(61, -420.5, 200, 0.5)
pt3dadd(62.5, -422.5, 195, 1.4)
pt3dadd(64, -424.5, 197.5, 1.3)
pt3dadd(67.5, -427, 197.5, 0.6)
pt3dadd(68, -430.5, 197.5, 2.2)
pt3dadd(70, -434.5, 197.5, 0.6)
pt3dadd(72.5, -437.5, 197.5, 0.9)
pt3dadd(73.5, -440, 195, 0.5)
pt3dadd(73.5, -445, 195, 0.4)
pt3dadd(75, -447, 195, 0.4)
pt3dadd(77.5, -452.5, 195, 0.6)
pt3dadd(79.5, -456.5, 194.5, 0.6)
pt3dadd(79.5, -460, 194.5, 0.6)
pt3dadd(82.5, -462.5, 194.5, 0.6)
pt3dadd(83, -466.5, 194.5, 0.7)
pt3dadd(87, -468.5, 191.5, 0.7)
pt3dadd(87.5, -475.5, 191.5, 0.5)
pt3dadd(90.5, -479.5, 197, 0.5)
pt3dadd(88, -481, 197, 0.5)
pt3dadd(85, -484.5, 199.5, 0.9)
pt3dadd(88, -484, 197, 1.1)
pt3dadd(92, -484, 202, 0.4)
pt3dadd(92, -487.5, 205, 0.4)
pt3dadd(93.5, -491, 215.5, 0.1)
pt3dadd(95, -495, 194.5, 0.1)
pt3dadd(95.5, -499, 194.5, 0.1)
pt3dadd(94.5, -503, 189, 0.1)
pt3dadd(94.5, -507.5, 189, 0.1)
}
dend[27] {pt3dclear()
pt3dadd(50, -317.5, 213, 2)
pt3dadd(45, -317, 225, 2.6)
}
}
proc shape3d_5() {
dend[27] { pt3dadd(45.5, -321.5, 225.5, 4)
pt3dadd(45, -334, 233, 4.4)
pt3dadd(43, -336.5, 233.5, 2.7)
pt3dadd(42, -338.5, 231, 2.4)
pt3dadd(40, -342, 239.5, 2.4)
pt3dadd(37.5, -344, 240, 2.2)
pt3dadd(35.5, -341.5, 245, 2.7)
pt3dadd(36.5, -336.5, 247, 2.7)
pt3dadd(39.5, -340, 253, 2.6)
pt3dadd(39.5, -343, 250, 2.8)
pt3dadd(39.5, -346.5, 254.5, 2.8)
}
dend[28] {pt3dclear()
pt3dadd(39.5, -346.5, 254.5, 2.8)
pt3dadd(35.5, -346.5, 262.5, 1.9)
pt3dadd(33.5, -347.5, 262.5, 1.9)
pt3dadd(24.5, -355.5, 275, 2.2)
pt3dadd(22, -353.5, 278.5, 2.1)
pt3dadd(18.5, -357.5, 284.5, 2)
pt3dadd(18.5, -360.5, 282, 2)
pt3dadd(14, -362.5, 293.5, 1.7)
pt3dadd(10.5, -365.5, 288.5, 2)
pt3dadd(7.5, -369, 289.5, 1.9)
pt3dadd(5.5, -372.5, 297, 2.2)
pt3dadd(9, -374, 297.5, 2.1)
pt3dadd(9.5, -377, 305.5, 1.5)
pt3dadd(7.5, -379, 306, 1.5)
pt3dadd(3.5, -381.5, 306.5, 1.2)
pt3dadd(5.5, -385.5, 311.5, 2)
pt3dadd(8.5, -387, 309, 1.9)
pt3dadd(6.5, -390.5, 310, 1.9)
pt3dadd(8, -394.5, 325, 2)
pt3dadd(8, -397.5, 332, 1.5)
pt3dadd(6.5, -399, 332.5, 1.1)
pt3dadd(2.5, -398.5, 334, 1.3)
pt3dadd(6.5, -407.5, 348.5, 1.7)
pt3dadd(5, -413.5, 350.5, 2)
pt3dadd(2.5, -417, 358, 1.6)
pt3dadd(0, -418.5, 359, 1.8)
pt3dadd(-5.5, -418.5, 362.5, 2.1)
pt3dadd(-7.5, -417.5, 363, 1.8)
pt3dadd(-7.5, -414.5, 364, 1.7)
pt3dadd(-4.5, -414.5, 365, 1.4)
pt3dadd(-2.5, -413, 366, 1.8)
pt3dadd(-4.5, -420.5, 375, 1.8)
pt3dadd(-6, -424.5, 383.5, 2.6)
pt3dadd(-6, -427.5, 378, 2.6)
pt3dadd(-8.5, -427, 386.5, 2.1)
pt3dadd(-12, -425.5, 387.5, 2.1)
pt3dadd(-8, -430, 389, 1.5)
pt3dadd(-6, -433.5, 394, 1.5)
pt3dadd(-6.5, -437.5, 395, 1.1)
pt3dadd(-9, -439, 403.5, 1.4)
pt3dadd(-9.5, -443, 404.5, 1.6)
pt3dadd(-8.5, -446.5, 399, 2.3)
pt3dadd(-6, -454.5, 401, 1.2)
pt3dadd(-9, -457.5, 407, 2.2)
pt3dadd(-11.5, -461, 416, 1.6)
pt3dadd(-13.5, -463.5, 420.5, 1.6)
pt3dadd(-17.5, -463, 426.5, 1.9)
pt3dadd(-21.5, -462.5, 425.5, 1.6)
pt3dadd(-22, -459, 427, 1.9)
pt3dadd(-22, -464, 426.5, 2.2)
pt3dadd(-22, -467.5, 435, 2.3)
pt3dadd(-24, -465, 443, 1.4)
pt3dadd(-27, -461.5, 445, 1.4)
pt3dadd(-25.5, -465.5, 444, 1.3)
pt3dadd(-24.5, -467.5, 456, 1.4)
pt3dadd(-24.5, -470.5, 457.5, 1.4)
pt3dadd(-26, -472.5, 463, 0.9)
pt3dadd(-29, -472.5, 464, 1.1)
pt3dadd(-27.5, -476.5, 473.5, 1.2)
pt3dadd(-27.5, -480, 475, 1.8)
pt3dadd(-32.5, -481, 480, 1.5)
pt3dadd(-32, -484.5, 480.5, 2.2)
pt3dadd(-32, -487.5, 481, 2.2)
pt3dadd(-34.5, -490, 481.5, 1.4)
pt3dadd(-38.5, -489.5, 486.5, 1)
pt3dadd(-41.5, -488.5, 491, 1.1)
pt3dadd(-40.5, -490.5, 492, 0.8)
pt3dadd(-42.5, -491.5, 504, 0.9)
pt3dadd(-44, -490, 501, 0.9)
pt3dadd(-46.5, -487.5, 506, 0.9)
pt3dadd(-47, -490, 502.5, 0.6)
pt3dadd(-49, -491, 503, 0.6)
pt3dadd(-50.5, -492.5, 516.5, 1.6)
pt3dadd(-51, -495, 514.5, 1.5)
pt3dadd(-51.5, -501.5, 525, 1.6)
pt3dadd(-53, -505.5, 518, 1)
pt3dadd(-56, -507, 524.5, 1)
pt3dadd(-59, -508.5, 535.5, 1)
pt3dadd(-64.5, -512, 532, 0.8)
pt3dadd(-70.5, -523.5, 552, 0.8)
pt3dadd(-72.5, -526.5, 553.5, 0.8)
pt3dadd(-71, -529.5, 554.5, 0.8)
pt3dadd(-71.5, -533, 561, 1.6)
pt3dadd(-68.5, -536.5, 562, 1.6)
pt3dadd(-63, -539.5, 563.5, 1.4)
pt3dadd(-61.5, -542.5, 564.5, 0.9)
pt3dadd(-61.5, -546, 565, 0.9)
pt3dadd(-61, -548.5, 566, 0.9)
pt3dadd(-61.5, -553, 567, 0.8)
pt3dadd(-62.5, -556.5, 568, 0.8)
pt3dadd(-62.5, -561, 569, 0.8)
pt3dadd(-60.5, -563.5, 575, 0.8)
}
dend[29] {pt3dclear()
pt3dadd(39.5, -346.5, 254.5, 2.8)
pt3dadd(38.5, -353, 275, 1.8)
pt3dadd(41, -351, 279, 1.1)
pt3dadd(37.5, -350, 293, 0.7)
pt3dadd(37, -344, 294.5, 0.9)
pt3dadd(32.5, -344.5, 293, 1.2)
pt3dadd(29.5, -345.5, 301, 1.3)
pt3dadd(27, -344.5, 299, 1.3)
pt3dadd(24, -343.5, 303, 1)
pt3dadd(21.5, -342.5, 311, 1.1)
pt3dadd(18.5, -342, 312, 1.3)
pt3dadd(18, -339, 313, 1.3)
pt3dadd(20.5, -338.5, 313.5, 1.3)
pt3dadd(17.5, -336, 314.5, 1)
pt3dadd(12.5, -335, 316, 1.4)
pt3dadd(9.5, -333.5, 316.5, 1.3)
pt3dadd(8.5, -331, 317.5, 1.4)
pt3dadd(7, -329, 318, 1.5)
pt3dadd(3.5, -323, 326.5, 0.7)
pt3dadd(3, -319.5, 325, 0.5)
pt3dadd(0, -316.5, 325.5, 1.6)
pt3dadd(-5, -311.5, 328.5, 1.3)
pt3dadd(-7.5, -311, 342, 1.6)
pt3dadd(-7.5, -307, 338, 1.7)
pt3dadd(-11, -301.5, 336.5, 0.9)
pt3dadd(-12.5, -298, 348, 0.9)
pt3dadd(-15.5, -296.5, 349, 0.7)
pt3dadd(-18, -293.5, 353, 0.7)
pt3dadd(-19.5, -290.5, 354, 0.8)
pt3dadd(-20, -288, 354.5, 0.8)
pt3dadd(-19, -286, 362, 1.1)
pt3dadd(-21, -284.5, 360, 1.1)
pt3dadd(-25, -283.5, 367, 1.1)
pt3dadd(-26, -278.5, 373, 1.6)
pt3dadd(-27, -276, 376, 1.7)
pt3dadd(-28.5, -272.5, 375, 1.6)
pt3dadd(-29, -268, 376, 0.9)
pt3dadd(-31, -265.5, 384.5, 0.9)
pt3dadd(-33.5, -264.5, 394.5, 0.9)
pt3dadd(-38.5, -266, 392, 0.9)
pt3dadd(-39, -263, 393, 0.9)
pt3dadd(-37, -261.5, 393.5, 0.9)
pt3dadd(-35.5, -258, 394.5, 1.4)
pt3dadd(-37.5, -254.5, 400, 1.1)
pt3dadd(-40.5, -253.5, 400.5, 1)
pt3dadd(-39.5, -250, 401.5, 1)
pt3dadd(-37.5, -247, 406, 0.6)
pt3dadd(-39, -245, 410.5, 1.2)
pt3dadd(-40.5, -241.5, 408.5, 1.2)
pt3dadd(-38.5, -239, 417, 1.1)
pt3dadd(-42.5, -236.5, 415, 0.8)
pt3dadd(-42, -233.5, 424, 0.4)
pt3dadd(-45, -231.5, 425, 0.3)
}
dend[30] {pt3dclear()
pt3dadd(65.67, -79.12, 113.94, 7.8)
pt3dadd(66, -81.5, 117.5, 7.8)
}
dend[31] {pt3dclear()
pt3dadd(66, -81.5, 117.5, 7.8)
pt3dadd(76, -90.5, 134.5, 4)
pt3dadd(78.5, -92.5, 132.5, 4)
pt3dadd(78, -96, 134, 3.5)
pt3dadd(78.5, -99, 135, 2.4)
pt3dadd(81.5, -100, 136.5, 2.8)
pt3dadd(83.5, -98.5, 137.5, 2.9)
pt3dadd(85, -97, 138, 3.2)
pt3dadd(86, -92, 148.5, 4)
pt3dadd(86.5, -95.5, 158, 4)
pt3dadd(87.5, -99, 159.5, 4.1)
pt3dadd(86.5, -101.5, 173, 3.7)
pt3dadd(86, -105.5, 175, 4.3)
pt3dadd(87, -111, 180.5, 3.5)
pt3dadd(85.5, -114, 181.5, 2.9)
pt3dadd(82, -116, 183, 3.2)
pt3dadd(79.5, -118.5, 184.5, 3.4)
pt3dadd(72.5, -123.5, 197, 3.4)
pt3dadd(69.5, -123.5, 198, 3.2)
pt3dadd(67, -125, 199.5, 3.5)
pt3dadd(64.5, -127, 200.5, 3.7)
pt3dadd(66, -129, 215, 4)
pt3dadd(64.5, -131.5, 216, 3.7)
pt3dadd(62, -135.5, 218, 3.7)
pt3dadd(60, -137, 222.5, 3.5)
pt3dadd(58.5, -141, 224, 3.2)
pt3dadd(56.5, -143, 225, 3.4)
pt3dadd(56, -146.5, 226.5, 4)
pt3dadd(51, -152.5, 238.5, 2.3)
pt3dadd(49, -155.5, 236.5, 2.6)
pt3dadd(47.5, -159.5, 241, 2.6)
pt3dadd(46, -163.5, 242.5, 2.7)
pt3dadd(45, -166.5, 243, 2.8)
pt3dadd(42, -171, 244.5, 2.4)
pt3dadd(38.5, -171, 259, 2.6)
pt3dadd(36.5, -168.5, 254, 2.6)
pt3dadd(34.5, -166.5, 254.5, 2.5)
pt3dadd(25, -166.5, 269, 2.5)
pt3dadd(22, -168, 264.5, 2.5)
pt3dadd(22.5, -170.5, 265, 2.8)
pt3dadd(24.5, -171.5, 274, 3.4)
pt3dadd(20, -169, 294, 3.1)
}
}
proc shape3d_6() {
dend[31] { pt3dadd(19, -171, 294.5, 3)
pt3dadd(15, -175.5, 299.5, 2.5)
pt3dadd(13, -177.5, 300.5, 2.5)
pt3dadd(15.5, -180, 301.5, 2)
pt3dadd(17.5, -182, 302, 2.3)
pt3dadd(17, -187.5, 315, 2)
pt3dadd(12.5, -187.5, 316.5, 2.3)
pt3dadd(10.5, -188.5, 320.5, 1.9)
pt3dadd(7.5, -191, 321.5, 1.9)
pt3dadd(5, -194, 322.5, 1.9)
pt3dadd(4, -198.5, 324, 2.2)
pt3dadd(3, -202, 325, 2)
pt3dadd(3.5, -206, 325.5, 2.5)
pt3dadd(4.5, -209, 329, 1.4)
pt3dadd(1.5, -209.5, 329.5, 1.8)
pt3dadd(-3, -213.5, 334, 2.2)
pt3dadd(-3, -216.5, 335, 2.2)
pt3dadd(-2, -218.5, 335, 2.2)
pt3dadd(-1.5, -221, 336, 1.5)
pt3dadd(-3, -223, 336.5, 1.5)
pt3dadd(-3.5, -226, 337, 1.5)
pt3dadd(-3, -228.5, 343.5, 1.5)
pt3dadd(-1, -231, 344.5, 2.3)
pt3dadd(0, -233, 345, 2.5)
pt3dadd(1.5, -234.5, 345, 1.5)
pt3dadd(4, -239.5, 352.5, 1.4)
pt3dadd(2, -241, 353, 1.5)
pt3dadd(-0.5, -242, 357, 1.6)
pt3dadd(-4, -244, 364, 1.2)
pt3dadd(-2, -245.5, 364.5, 1.4)
pt3dadd(2, -245.5, 363, 2)
pt3dadd(4.5, -247.5, 363.5, 2)
pt3dadd(1.5, -250.5, 367.5, 2)
pt3dadd(2, -256, 375, 2.3)
pt3dadd(3, -262, 375.5, 2.2)
pt3dadd(3, -266, 376, 2.2)
pt3dadd(-0.5, -275, 382, 1.6)
pt3dadd(-5.5, -278.5, 395, 1.7)
pt3dadd(-3.5, -281.5, 395.5, 2.3)
pt3dadd(-1.5, -284.5, 396, 2.3)
pt3dadd(6.5, -290, 397, 1.4)
pt3dadd(6.5, -294, 401.5, 1.3)
pt3dadd(5.5, -296.5, 401.5, 1.8)
pt3dadd(6, -299.5, 395.5, 2.1)
pt3dadd(6.5, -303, 392, 1.6)
pt3dadd(6.5, -306.5, 404.5, 1.6)
pt3dadd(8.5, -310, 401.5, 1.7)
pt3dadd(8, -313.5, 402, 2)
pt3dadd(7, -319, 406.5, 2.6)
pt3dadd(7, -320.5, 403.5, 3.6)
}
dend[32] {pt3dclear()
pt3dadd(7, -320.5, 403.5, 3.6)
pt3dadd(8, -324, 408, 0.9)
pt3dadd(7.5, -330, 408.5, 0.9)
pt3dadd(6, -332.5, 409, 0.9)
pt3dadd(4, -336, 422, 0.9)
pt3dadd(3.5, -339, 422.5, 0.9)
pt3dadd(3, -341.5, 423, 0.9)
pt3dadd(0.5, -344, 424, 0.9)
pt3dadd(0, -348.5, 425, 1.3)
pt3dadd(4, -351, 428, 0.9)
pt3dadd(5.5, -354, 428.5, 1)
pt3dadd(4.5, -358, 429, 0.9)
pt3dadd(1.5, -365.5, 426.5, 1.1)
pt3dadd(6, -369.5, 427, 1.1)
pt3dadd(6, -372.5, 427.5, 1.1)
pt3dadd(7, -378, 428.5, 1.6)
pt3dadd(8, -381, 428.5, 2)
pt3dadd(7.5, -383.5, 429, 2.2)
pt3dadd(7, -387.5, 435.5, 2.2)
pt3dadd(10, -389.5, 436, 1)
pt3dadd(14, -395.5, 436.5, 0.8)
pt3dadd(15, -397.5, 436.5, 0.8)
pt3dadd(16, -402, 437, 0.8)
pt3dadd(19, -407.5, 437.5, 0.8)
pt3dadd(20, -412.5, 438, 0.6)
pt3dadd(21.5, -414.5, 438, 0.6)
pt3dadd(21.5, -418.5, 438.5, 0.8)
pt3dadd(23, -420, 438.5, 0.8)
pt3dadd(25.5, -424, 439, 0.8)
pt3dadd(20.5, -427.5, 436.5, 0.7)
pt3dadd(20, -430.5, 437, 0.5)
pt3dadd(19, -433, 437, 0.1)
pt3dadd(19, -436, 437.5, 0.1)
pt3dadd(13.5, -439.5, 438, 0.1)
pt3dadd(12, -444.5, 438.5, 0.1)
pt3dadd(10.5, -447, 438.5, 0.1)
pt3dadd(10, -451, 439, 0.1)
pt3dadd(10, -456, 439, 0.1)
pt3dadd(10, -456.5, 436.5, 0.1)
}
dend[33] {pt3dclear()
pt3dadd(7, -320.5, 403.5, 3.6)
pt3dadd(4, -332, 425, 1.3)
pt3dadd(7, -335.5, 426, 2.2)
pt3dadd(7, -346, 429, 1.5)
pt3dadd(7, -351, 430, 1.7)
pt3dadd(10.5, -355, 432, 1.6)
pt3dadd(14, -355, 432.5, 1.4)
pt3dadd(18, -357.5, 434, 1.3)
pt3dadd(20, -360.5, 435, 1.3)
pt3dadd(20, -364.5, 443, 1.3)
pt3dadd(19.5, -368.5, 444, 1.3)
pt3dadd(22, -369.5, 444.5, 1.3)
pt3dadd(25, -372, 445.5, 1.1)
pt3dadd(26.5, -375, 446, 1.2)
pt3dadd(28.5, -378.5, 453.5, 1.3)
pt3dadd(32.5, -382.5, 455, 1.7)
pt3dadd(37, -382.5, 456, 1.1)
pt3dadd(38.5, -384.5, 457, 1.1)
pt3dadd(37, -386, 461, 1.3)
pt3dadd(36.5, -389.5, 465, 1.2)
pt3dadd(39, -393, 466, 0.8)
pt3dadd(39.5, -396, 467, 0.9)
pt3dadd(39.5, -399.5, 471.5, 1.9)
pt3dadd(40.5, -402, 472, 1.1)
pt3dadd(42.5, -403.5, 472.5, 1.1)
pt3dadd(44.5, -409.5, 474, 1.5)
pt3dadd(45.5, -412, 475, 1.3)
pt3dadd(46.5, -414.5, 475.5, 1.2)
pt3dadd(48.5, -417, 476.5, 1.2)
pt3dadd(50.5, -418, 477, 1.3)
pt3dadd(49, -419.5, 482.5, 1.6)
pt3dadd(50, -422, 487.5, 1.2)
pt3dadd(51.5, -423.5, 488.5, 1.2)
pt3dadd(54, -427.5, 490, 0.9)
pt3dadd(55.5, -429, 495, 1)
pt3dadd(58.5, -429, 496, 1)
pt3dadd(56.5, -431.5, 493.5, 1.8)
pt3dadd(56, -434.5, 499.5, 0.6)
pt3dadd(59, -434.5, 500.5, 0.6)
pt3dadd(61, -437.5, 501.5, 0.6)
pt3dadd(61, -441, 499.5, 0.6)
pt3dadd(65, -442, 515, 0.8)
pt3dadd(65, -446.5, 516.5, 1.1)
pt3dadd(66, -449, 517.5, 1.1)
pt3dadd(68, -451, 518, 0.6)
pt3dadd(67.5, -456, 521.5, 0.8)
pt3dadd(70, -457.5, 519.5, 0.8)
pt3dadd(73, -458.5, 529.5, 1.2)
pt3dadd(76, -459, 527, 1.2)
pt3dadd(78.5, -460, 525, 1.1)
}
dend[34] {pt3dclear()
pt3dadd(66, -81.5, 117.5, 7.8)
pt3dadd(63, -82, 125, 5.3)
pt3dadd(65.5, -83, 130, 3.9)
pt3dadd(68.5, -84.5, 131, 3.4)
pt3dadd(71, -86, 135.5, 2.8)
pt3dadd(73.5, -87.5, 136.5, 3.2)
pt3dadd(76.5, -89.5, 138, 3.3)
pt3dadd(71, -88.5, 144, 2.8)
pt3dadd(68, -88.5, 145, 2.8)
pt3dadd(66, -92.5, 155, 3.2)
pt3dadd(67, -96.5, 160.5, 3.8)
pt3dadd(66, -101, 175, 3.9)
pt3dadd(69.5, -105, 179, 3)
pt3dadd(71.5, -110, 187, 2.2)
pt3dadd(67, -112, 188, 2.2)
pt3dadd(64.5, -113, 194.5, 2.9)
pt3dadd(61, -113.5, 195.5, 3.1)
pt3dadd(67.5, -110, 200, 3)
pt3dadd(69, -107.5, 200.5, 3)
pt3dadd(71, -106, 199, 2.8)
pt3dadd(76, -108.5, 207, 2.3)
pt3dadd(76, -112, 211, 3)
pt3dadd(78, -113, 217.5, 3.4)
pt3dadd(81.5, -116, 224, 3)
pt3dadd(84, -116.5, 225, 2.8)
pt3dadd(87.5, -117.5, 226, 3.4)
pt3dadd(90.5, -117.5, 231.5, 3.4)
pt3dadd(88, -119.5, 237.5, 3.1)
pt3dadd(87, -123, 235.5, 3.5)
pt3dadd(93, -116.5, 243.5, 3.5)
pt3dadd(97.5, -114, 249.5, 3.4)
pt3dadd(95, -115.5, 264, 2.8)
pt3dadd(95, -118.5, 262.5, 2.8)
pt3dadd(99, -123.5, 273.5, 2.6)
pt3dadd(102, -124, 275, 2.5)
pt3dadd(97.5, -127, 284.5, 2)
pt3dadd(97.5, -130, 285.5, 2)
pt3dadd(100.5, -131, 286.5, 2.5)
pt3dadd(106.5, -131, 289, 2.2)
pt3dadd(107, -134, 293.5, 2.5)
pt3dadd(107, -139, 307.5, 3.5)
pt3dadd(109, -141.5, 308.5, 3.3)
pt3dadd(101.5, -142.5, 325, 3.5)
pt3dadd(106.5, -142.5, 326.5, 2)
pt3dadd(104.5, -149.5, 340.5, 2.2)
pt3dadd(108, -149.5, 352.5, 2.2)
pt3dadd(105.5, -148.5, 371.5, 2.3)
pt3dadd(105, -152, 380, 3)
pt3dadd(105, -155.5, 375, 3)
pt3dadd(105.5, -149, 385, 2.7)
pt3dadd(104, -147.5, 387, 2.4)
pt3dadd(102, -146, 389, 2.4)
pt3dadd(106.5, -148, 403.5, 2.4)
pt3dadd(107.5, -152, 407, 2.4)
pt3dadd(102, -152.5, 417.5, 2.6)
pt3dadd(99.5, -152, 425, 2.7)
pt3dadd(102, -155.5, 439, 2.8)
pt3dadd(103.5, -159, 441, 2.3)
pt3dadd(103.5, -164, 461.5, 2)
pt3dadd(99.5, -163.5, 464, 2.2)
pt3dadd(97.5, -161, 465.5, 2.2)
}
}
proc shape3d_7() {
dend[34] { pt3dadd(101.5, -166, 477.5, 2.2)
pt3dadd(104, -168, 474, 2.6)
pt3dadd(107.5, -171.5, 473, 1.4)
pt3dadd(105, -171, 483, 1.5)
pt3dadd(101, -170, 481, 1.9)
pt3dadd(102, -172.5, 492, 1.6)
pt3dadd(103, -176.5, 493.5, 1.8)
pt3dadd(103, -180, 498.5, 2)
pt3dadd(100.5, -177.5, 504, 1.7)
pt3dadd(98, -176, 505, 1.7)
pt3dadd(94.5, -175.5, 516, 1.3)
pt3dadd(93, -179.5, 519, 1.2)
pt3dadd(97, -179.5, 525, 1.6)
pt3dadd(94.5, -180, 546, 1.6)
}
dend[35] {pt3dclear()
pt3dadd(94.5, -180, 546, 1.6)
pt3dadd(91, -182.5, 546.5, 1.1)
pt3dadd(87.5, -182.5, 547, 1.1)
pt3dadd(84.5, -183.5, 547, 1.1)
pt3dadd(79.5, -185.5, 543.5, 1.7)
pt3dadd(75.5, -188, 544, 1.7)
pt3dadd(74.5, -190, 544, 1.1)
pt3dadd(74, -192.5, 544.5, 1.1)
pt3dadd(69, -192.5, 554.5, 1.6)
pt3dadd(69, -198, 550.5, 1.4)
pt3dadd(71, -199.5, 551, 1.4)
pt3dadd(75, -199.5, 551.5, 1.4)
pt3dadd(73, -204.5, 566.5, 1.1)
pt3dadd(70.5, -207, 566.5, 1.3)
pt3dadd(66.5, -209, 567, 1.3)
pt3dadd(64, -210, 567, 1.3)
pt3dadd(62.5, -213, 567.5, 1.3)
pt3dadd(61, -214.5, 567.5, 1.5)
pt3dadd(58.5, -217, 568, 1.2)
pt3dadd(56, -218.5, 568.5, 1.2)
pt3dadd(53, -218.5, 568.5, 1.2)
pt3dadd(50, -222, 569, 0.8)
pt3dadd(47.5, -223.5, 569.5, 0.8)
pt3dadd(42, -227.5, 575, 0.9)
}
dend[36] {pt3dclear()
pt3dadd(94.5, -180, 546, 1.6)
pt3dadd(91.5, -181.5, 548, 1.1)
pt3dadd(91, -179, 561.5, 1.1)
pt3dadd(88, -180.5, 563.5, 1.1)
pt3dadd(87, -182.5, 570.5, 1.6)
pt3dadd(86.5, -185.5, 571.5, 1.2)
pt3dadd(89.5, -188.5, 574, 1.2)
pt3dadd(91.5, -188, 575, 1.1)
}
dend[37] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 13.2)
pt3dadd(25.5, 9, 19.5, 13.2)
pt3dadd(22.5, 11.5, 25, 13.2)
pt3dadd(20, 13.5, 25, 12.9)
pt3dadd(18, 15.5, 23.5, 11.6)
pt3dadd(0, 62.5, 60.5, 9.2)
pt3dadd(-2.5, 67.5, 62, 8.8)
pt3dadd(-2.5, 70.5, 65.5, 9.3)
pt3dadd(-3, 74, 75, 8.7)
pt3dadd(-9.5, 84, 78.5, 8.8)
pt3dadd(-15.5, 89.5, 84, 7.6)
pt3dadd(-19, 97.5, 86, 8.6)
pt3dadd(-21.5, 104, 94.5, 9.8)
pt3dadd(-23, 112, 114, 9.9)
}
dend[38] {pt3dclear()
pt3dadd(-23, 112, 114, 9.9)
pt3dadd(-18, 118, 107, 4.5)
pt3dadd(-13, 121.5, 108, 3.8)
pt3dadd(-6, 128, 127, 4)
pt3dadd(-3.5, 129, 125, 4)
pt3dadd(-3, 133.5, 126, 4.1)
pt3dadd(-0.5, 135, 127, 3.4)
pt3dadd(5, 137, 137, 3.1)
pt3dadd(8.5, 138.5, 138.5, 2.7)
pt3dadd(7.5, 142, 139.5, 3.2)
pt3dadd(7, 146, 144.5, 3.2)
pt3dadd(8, 149.5, 151.5, 4.1)
}
dend[39] {pt3dclear()
pt3dadd(8, 149.5, 151.5, 4.1)
pt3dadd(11.5, 149, 160, 3.7)
pt3dadd(13, 146, 167.5, 5)
pt3dadd(10, 150.5, 172.5, 4.5)
pt3dadd(9.5, 153, 175, 3.7)
pt3dadd(7, 155.5, 176, 2.7)
pt3dadd(2.5, 156, 181.5, 2.6)
pt3dadd(2.5, 151, 186.5, 3.2)
pt3dadd(6.5, 154.5, 186.5, 2.8)
pt3dadd(9, 158, 188.5, 2.6)
pt3dadd(6.5, 160.5, 206.5, 3.1)
pt3dadd(3, 160.5, 208, 3.4)
pt3dadd(0, 160.5, 209, 3.4)
pt3dadd(-5, 160, 211.5, 3.8)
pt3dadd(-12.5, 158, 221, 4.1)
pt3dadd(-17.5, 159, 239, 2.1)
pt3dadd(-19.5, 160.5, 241, 2.1)
pt3dadd(-20.5, 161.5, 242.5, 2.5)
}
dend[40] {pt3dclear()
pt3dadd(-20.5, 161.5, 242.5, 2.5)
pt3dadd(-22.5, 164, 242.5, 2.8)
pt3dadd(-24.5, 167, 243, 2.7)
pt3dadd(-29, 167, 243.5, 2.7)
pt3dadd(-37, 168, 248, 2.5)
pt3dadd(-33, 167.5, 252.5, 2.5)
pt3dadd(-31, 169.5, 252.5, 2.5)
pt3dadd(-36, 171.5, 253, 2.3)
pt3dadd(-40.5, 170.5, 261, 2.5)
pt3dadd(-44.5, 168.5, 251, 2.2)
pt3dadd(-48, 167, 266.5, 2.1)
pt3dadd(-51.5, 164, 260.5, 2.1)
pt3dadd(-55.5, 164, 268, 2.1)
pt3dadd(-60, 165.5, 268.5, 2.1)
pt3dadd(-63, 168, 269, 2.1)
pt3dadd(-66.5, 168.5, 269, 1.6)
pt3dadd(-69, 168, 273, 1.6)
pt3dadd(-72, 168, 273.5, 1.6)
pt3dadd(-73.5, 169.5, 273.5, 1.9)
pt3dadd(-78, 172, 274, 1.9)
pt3dadd(-80.5, 173.5, 274.5, 1.9)
pt3dadd(-82.5, 176.5, 274.5, 1.7)
pt3dadd(-83.5, 181, 275, 1.8)
pt3dadd(-85.5, 183.5, 272.5, 1.9)
pt3dadd(-88.5, 191, 277.5, 2.5)
pt3dadd(-93, 192.5, 281.5, 2.5)
pt3dadd(-94.5, 195, 281.5, 2.5)
pt3dadd(-97.5, 200.5, 282.5, 2.2)
pt3dadd(-99, 203, 283, 2)
pt3dadd(-101, 209, 287.5, 1.3)
pt3dadd(-102, 211.5, 287.5, 1.3)
pt3dadd(-102, 216.5, 294.5, 1.3)
pt3dadd(-105, 219, 295, 1.3)
pt3dadd(-106.5, 220.5, 295.5, 1.2)
pt3dadd(-108.5, 221.5, 295.5, 1.2)
pt3dadd(-108, 225.5, 306.5, 1.4)
pt3dadd(-108, 228.5, 307, 1.4)
pt3dadd(-111, 230.5, 307, 1.4)
pt3dadd(-113, 232, 307.5, 2)
pt3dadd(-116.5, 235.5, 308, 2)
pt3dadd(-118.5, 237, 308.5, 1.8)
pt3dadd(-122.5, 238, 309, 1.6)
pt3dadd(-124, 244, 306.5, 2)
pt3dadd(-127.5, 247, 307, 1.9)
pt3dadd(-134, 251.5, 315, 1.8)
pt3dadd(-141, 254.5, 313, 2.1)
pt3dadd(-144, 258.5, 314, 2)
pt3dadd(-147, 262, 325, 1.8)
pt3dadd(-152, 264, 323, 1.9)
pt3dadd(-161.5, 267.5, 327, 1.6)
pt3dadd(-163.5, 268.5, 322, 1.6)
pt3dadd(-165.5, 270, 322.5, 1.5)
pt3dadd(-168.5, 271, 323, 1.9)
pt3dadd(-172, 272.5, 321, 1.2)
pt3dadd(-174.5, 273.5, 321.5, 1.2)
pt3dadd(-174, 281.5, 325, 1.1)
pt3dadd(-176, 285.5, 325.5, 1.1)
pt3dadd(-180, 285.5, 332, 1.1)
pt3dadd(-184.5, 287, 330.5, 1.5)
pt3dadd(-192.5, 292, 334.5, 1.3)
pt3dadd(-197, 291, 348.5, 1.5)
pt3dadd(-201, 291.5, 346, 1.7)
pt3dadd(-204, 291.5, 346.5, 2.3)
pt3dadd(-208, 293, 347, 3.7)
}
dend[41] {pt3dclear()
pt3dadd(-208, 293, 347, 3.7)
pt3dadd(-209, 288.5, 358, 1.8)
pt3dadd(-208, 286.5, 347, 1.1)
pt3dadd(-207, 284, 347, 0.6)
pt3dadd(-205, 278.5, 347, 0.8)
pt3dadd(-205, 272.5, 344, 1)
pt3dadd(-203, 270, 352, 1.4)
pt3dadd(-202, 267.5, 352, 0.6)
pt3dadd(-200, 265.5, 349.5, 0.6)
pt3dadd(-197.5, 263.5, 352, 0.6)
}
dend[42] {pt3dclear()
pt3dadd(-208, 293, 347, 3.7)
pt3dadd(-208.5, 297.5, 344, 0.8)
pt3dadd(-213, 297.5, 347, 0.7)
pt3dadd(-215, 299.5, 344, 1)
pt3dadd(-216, 303, 344, 1)
pt3dadd(-217.5, 309.5, 341.5, 0.8)
pt3dadd(-218.5, 315, 341.5, 0.2)
pt3dadd(-220, 317.5, 344, 0.1)
pt3dadd(-220, 322, 344, 0.1)
pt3dadd(-219, 324.5, 344, 0.2)
pt3dadd(-219.5, 330, 344, 0.4)
pt3dadd(-221, 334, 344, 0.8)
pt3dadd(-219.5, 339, 341.5, 0.8)
pt3dadd(-220, 345, 347, 0.8)
pt3dadd(-223.5, 349, 347, 0.8)
pt3dadd(-224, 351.5, 347, 1)
pt3dadd(-223, 357, 350, 1.3)
pt3dadd(-221, 361, 350, 1)
pt3dadd(-218, 364.5, 350, 0.9)
pt3dadd(-218, 367.5, 350, 0.9)
pt3dadd(-217.5, 373, 350, 1.1)
pt3dadd(-217.5, 376, 350, 0.9)
pt3dadd(-217, 380, 344.5, 0.8)
pt3dadd(-220.5, 384.5, 347.5, 0.8)
pt3dadd(-220.5, 390.5, 347.5, 0.8)
pt3dadd(-222, 395, 347.5, 0.8)
pt3dadd(-223, 398.5, 347.5, 1)
pt3dadd(-223, 402, 347.5, 1)
pt3dadd(-223, 405.5, 347.5, 1)
pt3dadd(-224, 409.5, 350.5, 0.6)
pt3dadd(-226.5, 412.5, 350.5, 1.1)
pt3dadd(-226, 416, 350.5, 0.9)
pt3dadd(-226.5, 419.5, 350.5, 0.9)
pt3dadd(-226.5, 423.5, 350.5, 0.9)
pt3dadd(-224.5, 427.5, 350.5, 0.8)
pt3dadd(-224.5, 430.5, 350.5, 0.7)
}
}
proc shape3d_8() {
dend[42] { pt3dadd(-227.5, 435, 350.5, 0.7)
pt3dadd(-227, 437.5, 350.5, 0.7)
pt3dadd(-226.5, 440, 350.5, 0.7)
pt3dadd(-223.5, 444, 342, 0.6)
pt3dadd(-222.5, 448.5, 347.5, 0.6)
pt3dadd(-226, 452, 347.5, 0.6)
pt3dadd(-223, 457.5, 350.5, 0.6)
pt3dadd(-225, 460, 350.5, 0.6)
pt3dadd(-226, 463, 350.5, 0.8)
pt3dadd(-226.5, 467, 344.5, 0.6)
pt3dadd(-224.5, 472.5, 350.5, 0.9)
pt3dadd(-224.5, 477.5, 350.5, 0.9)
pt3dadd(-227.5, 479.5, 347.5, 0.8)
}
dend[43] {pt3dclear()
pt3dadd(-20.5, 161.5, 242.5, 2.5)
pt3dadd(-22, 159.5, 243, 2.1)
pt3dadd(-26, 159.5, 251.5, 2.1)
pt3dadd(-21.5, 162.5, 260, 1.8)
pt3dadd(-25, 162.5, 260.5, 1.7)
pt3dadd(-26, 164.5, 258, 1.7)
pt3dadd(-23.5, 165.5, 262.5, 1.5)
pt3dadd(-18, 166, 275, 1.8)
pt3dadd(-22, 165, 276, 1.8)
pt3dadd(-21.5, 159, 292.5, 1.6)
pt3dadd(-17.5, 156.5, 291, 1.6)
pt3dadd(-13, 156.5, 295.5, 1.6)
pt3dadd(-13, 152.5, 299, 1.1)
pt3dadd(-10, 152.5, 299.5, 1.3)
pt3dadd(-9, 155, 308, 1.6)
pt3dadd(-7.5, 153.5, 308.5, 2)
pt3dadd(-3.5, 153, 316.5, 1.8)
pt3dadd(-1, 151.5, 325, 2.2)
pt3dadd(1.5, 148.5, 326, 1.6)
pt3dadd(4, 147.5, 335.5, 1.6)
pt3dadd(4, 151.5, 333, 1.6)
pt3dadd(6, 149, 348.5, 1.6)
pt3dadd(11.5, 149, 348, 1.9)
pt3dadd(9, 149.5, 360.5, 0.9)
pt3dadd(10, 153, 362, 1)
pt3dadd(13, 153, 363, 1)
pt3dadd(10, 156, 365, 1)
pt3dadd(12.5, 156.5, 369.5, 0.9)
pt3dadd(14, 158, 370, 0.9)
pt3dadd(10.5, 159.5, 371.5, 1.4)
pt3dadd(7.5, 162.5, 373.5, 1.4)
pt3dadd(10.5, 163, 375, 0.9)
pt3dadd(9.5, 167, 386.5, 1.4)
pt3dadd(7, 168.5, 388.5, 1.4)
pt3dadd(5, 169.5, 389.5, 1.4)
pt3dadd(3, 171.5, 387.5, 1.4)
pt3dadd(1, 174.5, 400.5, 1.3)
pt3dadd(-1, 177, 407, 1.2)
pt3dadd(-2, 180, 425, 1.3)
}
dend[44] {pt3dclear()
pt3dadd(8, 149.5, 151.5, 4.1)
pt3dadd(16.5, 146, 160, 1.1)
pt3dadd(20.5, 146, 157.5, 1.1)
pt3dadd(28, 144, 169.5, 1.3)
pt3dadd(35.5, 141.5, 175, 1.3)
pt3dadd(40.5, 141, 175, 1)
pt3dadd(44.5, 143, 178, 1)
pt3dadd(46, 145.5, 178.5, 1)
pt3dadd(48.5, 144.5, 178.5, 1)
pt3dadd(51.5, 145, 178.5, 1)
pt3dadd(54.5, 146, 179, 1)
pt3dadd(56.5, 149, 179.5, 0.9)
pt3dadd(57, 152, 179.5, 0.8)
pt3dadd(59.5, 157.5, 177.5, 1)
pt3dadd(62, 159.5, 183, 1)
pt3dadd(66, 164, 181.5, 1)
pt3dadd(68.5, 166.5, 181.5, 0.9)
pt3dadd(73, 173, 188, 0.9)
pt3dadd(75.5, 177, 188.5, 0.9)
pt3dadd(76, 180, 188.5, 0.7)
pt3dadd(76, 183.5, 189, 0.7)
pt3dadd(78, 186.5, 191.5, 0.5)
pt3dadd(80.5, 188.5, 189.5, 0.9)
pt3dadd(82, 191, 189.5, 1)
pt3dadd(85.5, 194.5, 190, 0.7)
pt3dadd(87.5, 197, 195.5, 0.8)
pt3dadd(87.5, 201, 196, 0.9)
pt3dadd(90, 205.5, 196, 0.9)
pt3dadd(91.5, 209, 196.5, 0.9)
pt3dadd(93, 211.5, 197, 0.4)
pt3dadd(95.5, 214, 197, 0.4)
pt3dadd(99, 217.5, 195, 0.4)
pt3dadd(102, 219.5, 198, 0.4)
pt3dadd(106.5, 222, 195.5, 0.7)
pt3dadd(111, 225.5, 204.5, 0.7)
pt3dadd(115, 227.5, 207.5, 0.7)
}
dend[45] {pt3dclear()
pt3dadd(-23, 112, 114, 9.9)
pt3dadd(-24.5, 118, 114.5, 7.9)
}
dend[46] {pt3dclear()
pt3dadd(-24.5, 118, 114.5, 7.9)
pt3dadd(-27.5, 114, 113, 6.3)
pt3dadd(-30.5, 110.5, 112, 5.6)
pt3dadd(-32, 113.5, 119.5, 5.7)
pt3dadd(-40, 110.5, 125, 5.4)
pt3dadd(-46, 110.5, 128.5, 5)
pt3dadd(-49.5, 114, 134, 5.1)
pt3dadd(-57, 119, 147, 5)
pt3dadd(-55, 122.5, 158.5, 5)
pt3dadd(-54, 119, 162.5, 5)
pt3dadd(-54.5, 115, 163, 5)
pt3dadd(-55.5, 108, 170.5, 5)
pt3dadd(-55, 104.5, 175, 4.6)
pt3dadd(-59, 108.5, 180, 3.7)
pt3dadd(-58.5, 111, 181.5, 4.5)
pt3dadd(-61.5, 113.5, 184.5, 4.1)
pt3dadd(-63.5, 115, 186, 4)
pt3dadd(-66.5, 115.5, 188, 3.5)
pt3dadd(-68, 114, 189.5, 3.5)
pt3dadd(-70.5, 111, 199, 3.8)
pt3dadd(-72.5, 109, 201, 5.3)
}
dend[47] {pt3dclear()
pt3dadd(-72.5, 109, 201, 5.3)
pt3dadd(-76, 108.5, 187, 1.5)
pt3dadd(-79.5, 110, 187.5, 1.5)
pt3dadd(-82, 112.5, 187.5, 1.5)
pt3dadd(-84.5, 115, 188, 1.6)
pt3dadd(-86, 117.5, 188, 1.6)
pt3dadd(-89.5, 122.5, 191.5, 1.9)
pt3dadd(-91.5, 125.5, 191.5, 1.6)
pt3dadd(-93, 128, 192, 1.6)
pt3dadd(-96, 133, 192.5, 1.6)
pt3dadd(-97, 135.5, 192.5, 1.6)
pt3dadd(-99.5, 136, 193, 1.6)
pt3dadd(-102, 137, 193, 1.6)
pt3dadd(-101, 140, 193.5, 1.7)
pt3dadd(-103.5, 142.5, 194, 1.7)
pt3dadd(-106.5, 145, 191.5, 1.9)
pt3dadd(-109, 148, 192, 1.9)
pt3dadd(-111, 155, 195.5, 1.6)
pt3dadd(-110.5, 159, 196, 1.6)
pt3dadd(-112.5, 163.5, 196.5, 1.1)
pt3dadd(-113, 167, 197, 1.7)
pt3dadd(-112.5, 170.5, 197, 1.7)
pt3dadd(-112.5, 173.5, 197.5, 1.7)
pt3dadd(-113.5, 176, 197.5, 1.8)
pt3dadd(-116.5, 183.5, 198.5, 1.7)
pt3dadd(-116.5, 187, 199, 1.9)
pt3dadd(-119.5, 189.5, 202, 2)
pt3dadd(-120.5, 193.5, 202, 2)
pt3dadd(-122, 199, 202.5, 1.6)
pt3dadd(-121, 201.5, 203, 1.6)
pt3dadd(-119, 203.5, 209, 1.5)
pt3dadd(-117.5, 206, 209, 1.5)
pt3dadd(-118, 210.5, 209.5, 1.2)
pt3dadd(-118.5, 217.5, 210.5, 1.2)
pt3dadd(-116.5, 219, 213, 1.2)
pt3dadd(-114.5, 223, 213.5, 1.3)
pt3dadd(-115, 226.5, 216.5, 0.8)
pt3dadd(-115, 229.5, 214.5, 1.1)
pt3dadd(-114.5, 232, 214.5, 1.1)
pt3dadd(-111, 235.5, 217.5, 1.1)
pt3dadd(-108.5, 238, 218, 1.3)
pt3dadd(-109.5, 243.5, 221.5, 1.3)
pt3dadd(-110.5, 246.5, 222, 1.3)
pt3dadd(-112.5, 249.5, 225, 1.3)
pt3dadd(-113.5, 254.5, 222.5, 1.4)
pt3dadd(-115, 260.5, 231, 1.2)
pt3dadd(-114, 264.5, 232, 1.1)
pt3dadd(-115.5, 270, 233, 1.2)
pt3dadd(-112.5, 270, 233.5, 1.3)
pt3dadd(-107, 278, 235.5, 1.1)
pt3dadd(-107, 285.5, 236.5, 1.1)
pt3dadd(-107.5, 288.5, 237, 1.1)
pt3dadd(-106, 291.5, 237.5, 1.3)
pt3dadd(-104.5, 294.5, 238.5, 1.4)
pt3dadd(-104.5, 297.5, 246.5, 1.1)
pt3dadd(-104.5, 301, 247.5, 0.8)
pt3dadd(-104, 308, 248.5, 1)
pt3dadd(-104.5, 310.5, 249, 1.1)
pt3dadd(-106.5, 314.5, 250, 1)
pt3dadd(-107, 318, 250.5, 1.3)
pt3dadd(-105.5, 321, 255.5, 1)
pt3dadd(-102.5, 324.5, 256.5, 1)
pt3dadd(-102.5, 329, 257, 1.1)
pt3dadd(-102.5, 332, 257.5, 1.1)
pt3dadd(-99, 335.5, 263.5, 0.9)
pt3dadd(-98, 340.5, 261, 0.8)
pt3dadd(-97, 344.5, 261.5, 0.8)
pt3dadd(-95.5, 346, 262, 1)
pt3dadd(-92.5, 348, 270.5, 1)
pt3dadd(-89, 349.5, 275, 0.9)
}
dend[48] {pt3dclear()
pt3dadd(-72.5, 109, 201, 5.3)
pt3dadd(-74.5, 111, 217, 4.3)
pt3dadd(-76, 113.5, 227, 4.3)
pt3dadd(-79.5, 113.5, 225, 4.3)
pt3dadd(-83.5, 116, 226, 4.5)
pt3dadd(-89, 116, 231.5, 3.8)
pt3dadd(-92.5, 111, 237.5, 4)
pt3dadd(-89.5, 109.5, 260, 3.7)
pt3dadd(-87, 109, 264.5, 4.7)
}
dend[49] {pt3dclear()
pt3dadd(-87, 109, 264.5, 4.7)
pt3dadd(-85.5, 110.5, 259, 3)
pt3dadd(-86.5, 113.5, 262.5, 3)
pt3dadd(-89.5, 115, 263, 3)
pt3dadd(-93.5, 115.5, 263.5, 3)
pt3dadd(-96.5, 118.5, 260.5, 3.7)
pt3dadd(-99, 125, 258, 3.3)
pt3dadd(-103, 132.5, 266, 3.2)
pt3dadd(-106.5, 139, 266.5, 3.2)
pt3dadd(-111.5, 143.5, 264, 3)
}
}
proc shape3d_9() {
dend[49] { pt3dadd(-113.5, 147.5, 268, 2.7)
pt3dadd(-117.5, 153, 268.5, 3.2)
pt3dadd(-118.5, 157, 272.5, 3.8)
pt3dadd(-122, 157, 269.5, 3)
pt3dadd(-128.5, 161, 270.5, 3.1)
pt3dadd(-132, 162, 274.5, 3.1)
pt3dadd(-136, 164.5, 275, 3.1)
pt3dadd(-138.5, 166, 277, 1.9)
pt3dadd(-140.5, 170.5, 290.5, 2.5)
}
dend[50] {pt3dclear()
pt3dadd(-140.5, 170.5, 290.5, 2.5)
pt3dadd(-145.5, 170.5, 290.5, 2)
pt3dadd(-147, 174, 291, 1.8)
pt3dadd(-150, 177, 291, 1.8)
pt3dadd(-154.5, 181, 291.5, 2)
pt3dadd(-155, 184, 291.5, 2.1)
pt3dadd(-158, 188.5, 291.5, 1.9)
pt3dadd(-159.5, 190.5, 292, 1.9)
pt3dadd(-163, 194.5, 295, 1)
pt3dadd(-168.5, 198, 295.5, 1)
pt3dadd(-170.5, 201, 299.5, 1.3)
pt3dadd(-175, 204.5, 299.5, 1.2)
pt3dadd(-178, 205.5, 303, 1.5)
pt3dadd(-179.5, 209.5, 300, 1.3)
pt3dadd(-182, 210.5, 300, 1.2)
pt3dadd(-184.5, 214.5, 306.5, 1.3)
pt3dadd(-187, 215, 306.5, 1.3)
pt3dadd(-187, 218, 307, 1.3)
pt3dadd(-191, 219.5, 307, 1.3)
pt3dadd(-196, 219.5, 304.5, 1.8)
pt3dadd(-199.5, 219.5, 304.5, 1.3)
pt3dadd(-203, 219.5, 305, 1.1)
pt3dadd(-204.5, 221, 305, 1.1)
pt3dadd(-205, 223.5, 305, 1.1)
pt3dadd(-209.5, 225, 308.5, 1)
pt3dadd(-211.5, 228, 315.5, 1)
pt3dadd(-214, 232, 315.5, 0.9)
pt3dadd(-221.5, 233, 316, 1.2)
pt3dadd(-221.5, 237.5, 312.5, 1.1)
pt3dadd(-223, 240, 310, 1)
pt3dadd(-229.5, 242, 320, 0.9)
pt3dadd(-232, 243.5, 323.5, 1.4)
pt3dadd(-237, 244, 323.5, 1.6)
pt3dadd(-239, 247, 323.5, 1.6)
pt3dadd(-241.5, 248, 324, 1.3)
pt3dadd(-243.5, 250.5, 324, 1.3)
pt3dadd(-246, 255.5, 321.5, 0.8)
pt3dadd(-248.5, 257, 321.5, 0.8)
pt3dadd(-249, 260, 325, 0.8)
pt3dadd(-252.5, 266, 327.5, 1.3)
pt3dadd(-254, 270, 327.5, 1.3)
pt3dadd(-256.5, 273, 327.5, 1.3)
pt3dadd(-259.5, 274, 327.5, 1.3)
pt3dadd(-264.5, 275.5, 328, 1.3)
pt3dadd(-267, 279.5, 325.5, 1)
pt3dadd(-270, 283, 325.5, 1)
pt3dadd(-274, 283.5, 326, 1.5)
pt3dadd(-275.5, 289.5, 326, 1)
pt3dadd(-278.5, 290, 326, 0.9)
pt3dadd(-280, 291.5, 326, 0.9)
pt3dadd(-280, 295, 326, 0.9)
pt3dadd(-283, 297.5, 326, 1.9)
pt3dadd(-286, 298, 326.5, 1.4)
pt3dadd(-288.5, 300, 326.5, 1.4)
pt3dadd(-287.5, 303.5, 326.5, 1.4)
pt3dadd(-289.5, 305.5, 323.5, 1.4)
pt3dadd(-293.5, 307, 332.5, 1.1)
pt3dadd(-295.5, 310, 332.5, 1.1)
pt3dadd(-299.5, 316.5, 329.5, 1)
pt3dadd(-302.5, 317.5, 330, 1)
pt3dadd(-305.5, 317.5, 330, 0.9)
pt3dadd(-307, 321, 330, 0.9)
pt3dadd(-310.5, 323.5, 330, 0.7)
pt3dadd(-313.5, 323.5, 330, 0.7)
pt3dadd(-315, 328.5, 330.5, 0.8)
pt3dadd(-319, 328.5, 330.5, 0.8)
pt3dadd(-322.5, 329.5, 330.5, 0.8)
pt3dadd(-324, 332.5, 330.5, 0.8)
pt3dadd(-330, 333.5, 330.5, 1.1)
pt3dadd(-333, 333.5, 331, 1.1)
pt3dadd(-337.5, 340.5, 331, 2)
pt3dadd(-342.5, 341, 325.5, 0.8)
pt3dadd(-344, 346, 326, 0.8)
pt3dadd(-347.5, 346, 326, 0.8)
pt3dadd(-356.5, 346.5, 326, 0.8)
pt3dadd(-359.5, 345, 324, 0.8)
pt3dadd(-363.5, 344, 332, 0.8)
pt3dadd(-367, 346, 332.5, 0.8)
pt3dadd(-370, 346, 332.5, 0.8)
pt3dadd(-376, 343.5, 332.5, 0.6)
pt3dadd(-380, 343.5, 332.5, 0.6)
pt3dadd(-383.5, 344.5, 330, 0.5)
pt3dadd(-386, 346.5, 333, 0.5)
pt3dadd(-390, 347, 330.5, 0.4)
}
dend[51] {pt3dclear()
pt3dadd(-140.5, 170.5, 290.5, 2.5)
pt3dadd(-143, 174, 300.5, 1.8)
pt3dadd(-145.5, 177.5, 300.5, 1.8)
pt3dadd(-147, 181.5, 301, 1.6)
pt3dadd(-150.5, 184.5, 298, 1.6)
pt3dadd(-155, 190.5, 298.5, 2)
pt3dadd(-155.5, 193, 299, 2)
pt3dadd(-158.5, 197, 295.5, 1.7)
pt3dadd(-161, 199, 296, 1.8)
pt3dadd(-163.5, 200, 296, 1.8)
pt3dadd(-167.5, 203, 296.5, 1.6)
pt3dadd(-170.5, 205, 300.5, 1.7)
pt3dadd(-172, 210, 304, 1.7)
pt3dadd(-169.5, 213.5, 314, 2.6)
pt3dadd(-169, 217, 314.5, 2.3)
pt3dadd(-171, 220.5, 311, 1.8)
pt3dadd(-173, 223, 311.5, 1.9)
pt3dadd(-174.5, 224.5, 311.5, 1.9)
pt3dadd(-178.5, 224.5, 325, 2.3)
pt3dadd(-178.5, 227.5, 328, 1.9)
pt3dadd(-182.5, 229, 326.5, 2)
pt3dadd(-184.5, 230.5, 327, 2)
pt3dadd(-187, 232.5, 330, 1.5)
pt3dadd(-189.5, 235, 328.5, 1.6)
pt3dadd(-190.5, 240.5, 329.5, 1.6)
pt3dadd(-190, 243, 329.5, 1.6)
pt3dadd(-192, 246.5, 333, 2.1)
pt3dadd(-194, 248.5, 333.5, 1.9)
pt3dadd(-195.5, 252, 332, 1.7)
pt3dadd(-198, 254, 332.5, 1.4)
pt3dadd(-200, 256, 333, 1.6)
pt3dadd(-202, 258, 336.5, 1.8)
pt3dadd(-202, 262, 337, 1.8)
pt3dadd(-204, 271, 333.5, 1.3)
pt3dadd(-206.5, 272.5, 334, 1.7)
pt3dadd(-211, 274.5, 335, 1.7)
pt3dadd(-213.5, 276.5, 335.5, 1.7)
pt3dadd(-216.5, 276.5, 336, 1.7)
pt3dadd(-216, 280, 340, 1.5)
pt3dadd(-217.5, 284, 340.5, 1.5)
pt3dadd(-220.5, 284, 341.5, 1.3)
pt3dadd(-226, 286, 342.5, 1.3)
pt3dadd(-225.5, 290.5, 346, 1.3)
pt3dadd(-225.5, 294.5, 349.5, 1.3)
pt3dadd(-226, 297.5, 350, 1.3)
pt3dadd(-229, 299, 351, 1.6)
pt3dadd(-227.5, 305.5, 347.5, 1.3)
pt3dadd(-225.5, 309.5, 348.5, 1.1)
pt3dadd(-224, 313.5, 355, 1.1)
pt3dadd(-224, 317.5, 356, 1.1)
pt3dadd(-224, 321.5, 356.5, 1.1)
pt3dadd(-223, 324, 357, 1.1)
pt3dadd(-222, 327.5, 357.5, 1.1)
pt3dadd(-225, 327, 364.5, 1.6)
pt3dadd(-228.5, 326, 365, 1.6)
pt3dadd(-234, 326, 366, 1.6)
pt3dadd(-236.5, 328.5, 370, 1.6)
pt3dadd(-242, 328.5, 371, 1.3)
pt3dadd(-245, 328.5, 374, 1.6)
pt3dadd(-248, 328.5, 375, 1.6)
pt3dadd(-251, 329, 379.5, 1.8)
pt3dadd(-254, 329.5, 384.5, 1.8)
pt3dadd(-258.5, 330, 382.5, 1)
pt3dadd(-259.5, 328, 383, 0.8)
pt3dadd(-261, 326, 387.5, 1.1)
pt3dadd(-267, 330, 387, 0.8)
pt3dadd(-269, 331, 392, 0.9)
pt3dadd(-272, 332.5, 393, 0.8)
pt3dadd(-273, 336, 398, 1.4)
pt3dadd(-276, 336.5, 404.5, 1.3)
pt3dadd(-279.5, 337, 405.5, 1.3)
pt3dadd(-282.5, 337, 406, 1.5)
pt3dadd(-285.5, 339, 408.5, 1.1)
pt3dadd(-287.5, 340, 409.5, 1)
pt3dadd(-290, 341.5, 410, 0.9)
pt3dadd(-290, 347, 425, 0.9)
pt3dadd(-293, 350, 420.5, 1.1)
pt3dadd(-295.5, 348, 424.5, 1.7)
pt3dadd(-297.5, 347, 425, 1.6)
pt3dadd(-298.5, 349.5, 423, 1.6)
pt3dadd(-303, 350.5, 428, 1.3)
pt3dadd(-307.5, 354, 429.5, 1)
pt3dadd(-310.5, 354, 427.5, 1)
pt3dadd(-314, 351.5, 439, 1)
pt3dadd(-316.5, 349, 437, 1.2)
pt3dadd(-320.5, 348.5, 438, 1.2)
pt3dadd(-323, 348, 442, 1)
pt3dadd(-325, 349.5, 442.5, 0.9)
pt3dadd(-324, 354, 443.5, 1.1)
pt3dadd(-322.5, 357.5, 444.5, 1.1)
pt3dadd(-320.5, 359, 445, 1.1)
pt3dadd(-323.5, 360.5, 446.5, 0.7)
pt3dadd(-327, 359, 453, 1.2)
pt3dadd(-330.5, 359, 454, 1.2)
pt3dadd(-328.5, 361, 461.5, 1.1)
pt3dadd(-325.5, 362.5, 462.5, 1.2)
pt3dadd(-328.5, 363, 466.5, 1.3)
pt3dadd(-333.5, 363.5, 470.5, 1.5)
pt3dadd(-336, 366, 475, 1.5)
pt3dadd(-339, 366.5, 482.5, 1.2)
pt3dadd(-342, 367.5, 479, 1)
pt3dadd(-345, 368, 479, 0.9)
pt3dadd(-347, 369, 479, 1.5)
pt3dadd(-349, 371, 479, 1.3)
pt3dadd(-352.5, 372.5, 475, 0.7)
pt3dadd(-353.5, 376, 475, 0.9)
pt3dadd(-352.5, 378, 475, 0.7)
}
}
proc shape3d_10() {
dend[51] { pt3dadd(-355.5, 378, 479, 0.7)
pt3dadd(-357.5, 376, 479.5, 0.7)
pt3dadd(-359, 377.5, 479.5, 1)
pt3dadd(-362, 382, 479.5, 0.8)
pt3dadd(-365.5, 385, 479.5, 0.8)
pt3dadd(-368.5, 387, 479.5, 0.8)
pt3dadd(-371.5, 389.5, 479.5, 0.9)
pt3dadd(-375, 389.5, 479.5, 0.7)
pt3dadd(-377, 393, 479.5, 0.9)
pt3dadd(-379.5, 394.5, 483, 0.9)
pt3dadd(-382, 392.5, 480, 0.9)
pt3dadd(-385.5, 392.5, 480, 0.9)
pt3dadd(-388.5, 393.5, 480, 0.9)
pt3dadd(-391.5, 395.5, 480, 0.7)
pt3dadd(-394.5, 396, 480, 0.7)
pt3dadd(-397.5, 396, 483.5, 0.7)
pt3dadd(-398.5, 398, 483.5, 0.7)
pt3dadd(-401.5, 399.5, 483.5, 0.7)
pt3dadd(-402.5, 404, 476, 0.7)
pt3dadd(-404.5, 405, 480, 0.7)
pt3dadd(-407.5, 405, 480.5, 0.9)
pt3dadd(-410.5, 405, 480.5, 0.9)
pt3dadd(-414.5, 406.5, 480.5, 0.6)
pt3dadd(-417.5, 406, 480.5, 0.8)
pt3dadd(-422, 403, 476.5, 1.2)
pt3dadd(-426.5, 401.5, 476.5, 0.9)
pt3dadd(-433.5, 399.5, 480.5, 0.6)
pt3dadd(-436.5, 399.5, 481, 0.6)
pt3dadd(-438, 401.5, 469.5, 0.7)
pt3dadd(-440.5, 406, 481, 0.6)
pt3dadd(-441.5, 409, 481, 0.9)
pt3dadd(-443.5, 412, 481, 0.9)
pt3dadd(-448.5, 413.5, 470, 0.1)
pt3dadd(-449, 418.5, 470, 0.1)
pt3dadd(-445.5, 419.5, 481.5, 0.1)
pt3dadd(-445, 424.5, 481.5, 0.1)
pt3dadd(-442.5, 428.5, 481.5, 0.1)
pt3dadd(-442.5, 432, 481.5, 0.1)
}
dend[52] {pt3dclear()
pt3dadd(-87, 109, 264.5, 4.7)
pt3dadd(-93.5, 109.5, 268.5, 4.1)
pt3dadd(-99, 109, 267, 4.2)
pt3dadd(-105, 107, 275, 4.5)
pt3dadd(-108, 100, 288, 5)
}
dend[53] {pt3dclear()
pt3dadd(-108, 100, 288, 5)
pt3dadd(-110, 97, 285.5, 1.3)
pt3dadd(-112, 93.5, 286, 1.9)
pt3dadd(-114, 89.5, 286.5, 1.9)
pt3dadd(-116.5, 87, 283.5, 1.7)
pt3dadd(-120, 85, 288, 1.9)
pt3dadd(-121.5, 83.5, 288, 1.7)
pt3dadd(-123, 81, 288.5, 1.7)
pt3dadd(-127.5, 75, 289, 2)
pt3dadd(-130, 71.5, 289.5, 1.7)
pt3dadd(-131.5, 69, 290, 1.7)
pt3dadd(-136, 64.5, 290.5, 1.7)
pt3dadd(-137.5, 63, 290.5, 1.7)
pt3dadd(-142, 62, 291, 2)
pt3dadd(-145.5, 60, 291.5, 2)
pt3dadd(-148, 57.5, 292, 1.3)
pt3dadd(-150, 54, 292.5, 1.5)
pt3dadd(-153.5, 52.5, 292.5, 1.5)
pt3dadd(-157.5, 51.5, 293, 1.2)
pt3dadd(-160.5, 52, 287.5, 1)
pt3dadd(-163.5, 50.5, 287.5, 1.5)
pt3dadd(-167, 49.5, 288, 1.2)
pt3dadd(-169.5, 49, 288.5, 1.4)
pt3dadd(-173.5, 46, 292, 0.9)
pt3dadd(-176, 45.5, 292, 0.8)
pt3dadd(-179.5, 46, 292.5, 1.4)
pt3dadd(-183.5, 43.5, 293, 1.1)
pt3dadd(-185.5, 40.5, 297, 1.1)
pt3dadd(-189, 40.5, 297.5, 1.1)
pt3dadd(-195.5, 40.5, 298, 1.2)
pt3dadd(-198.5, 39, 298.5, 0.9)
pt3dadd(-201.5, 35.5, 299, 0.7)
pt3dadd(-205, 32.5, 309, 0.8)
pt3dadd(-210, 32, 313.5, 0.6)
pt3dadd(-212, 33.5, 320, 0.9)
pt3dadd(-216.5, 33, 320.5, 0.7)
pt3dadd(-219, 31.5, 324, 0.8)
pt3dadd(-222, 31, 324.5, 0.9)
pt3dadd(-225, 29, 325, 1.1)
}
dend[54] {pt3dclear()
pt3dadd(-108, 100, 288, 5)
pt3dadd(-106, 96, 289, 4)
pt3dadd(-101.5, 90.5, 290.5, 3.2)
pt3dadd(-100.5, 87.5, 291, 3.2)
pt3dadd(-107, 86.5, 299.5, 3)
pt3dadd(-112, 90.5, 301, 2.8)
pt3dadd(-112.5, 93.5, 305, 2.8)
pt3dadd(-116, 94.5, 312.5, 3.2)
pt3dadd(-120, 96.5, 317, 3.7)
pt3dadd(-124, 96.5, 326.5, 3.3)
pt3dadd(-128.5, 99.5, 329, 3.6)
pt3dadd(-128.5, 103, 330.5, 3.6)
pt3dadd(-128.5, 106.5, 332, 3.6)
pt3dadd(-128.5, 109.5, 333.5, 3.6)
pt3dadd(-125, 107.5, 342, 3.5)
pt3dadd(-123, 100, 346, 3)
pt3dadd(-127, 100, 351.5, 2.8)
pt3dadd(-129.5, 103, 356, 2.8)
pt3dadd(-134, 103, 356.5, 2.6)
pt3dadd(-133.5, 100, 368.5, 3.2)
pt3dadd(-135, 97, 370, 2.8)
pt3dadd(-138, 97, 375, 3)
pt3dadd(-162, 95, 388.5, 3.3)
pt3dadd(-165.5, 90.5, 394.5, 2.2)
pt3dadd(-166, 84, 396.5, 2.3)
pt3dadd(-165.5, 79.5, 397.5, 3.2)
pt3dadd(-165.5, 76, 398.5, 3)
pt3dadd(-166.5, 73.5, 403, 3)
pt3dadd(-168, 71.5, 403.5, 2.5)
pt3dadd(-167.5, 68.5, 408, 2.7)
pt3dadd(-167, 66, 409, 3.5)
}
dend[55] {pt3dclear()
pt3dadd(-167, 66, 409, 3.5)
pt3dadd(-167, 62, 410.5, 2.9)
pt3dadd(-181, 48, 425, 2.1)
pt3dadd(-185, 43, 422.5, 1.8)
pt3dadd(-186.5, 39.5, 420, 1.8)
pt3dadd(-188.5, 36, 423.5, 1.7)
pt3dadd(-190.5, 34.5, 424, 2.1)
pt3dadd(-194, 32.5, 427.5, 2.1)
pt3dadd(-196, 30.5, 422.5, 2.2)
pt3dadd(-197.5, 25.5, 429.5, 2.1)
pt3dadd(-199.5, 22.5, 430, 2.1)
pt3dadd(-202.5, 19.5, 430.5, 2.1)
pt3dadd(-205.5, 16, 431, 2.1)
pt3dadd(-212, 14, 435, 2)
pt3dadd(-214.5, 11, 435.5, 2.1)
pt3dadd(-214, 8, 435.5, 2)
pt3dadd(-214, 5, 436, 2)
pt3dadd(-217, 1.5, 436.5, 2.2)
pt3dadd(-219, -2, 440, 2.2)
pt3dadd(-222, -4.5, 440.5, 2.2)
pt3dadd(-225, -4.5, 444, 2.2)
pt3dadd(-228, -7, 433.5, 2.2)
pt3dadd(-232, -10.5, 437.5, 2.2)
pt3dadd(-235, -14.5, 438, 2)
pt3dadd(-238, -19.5, 445, 2)
pt3dadd(-244.5, -24.5, 446, 2.1)
pt3dadd(-249, -28.5, 449.5, 1.9)
pt3dadd(-249, -35.5, 453.5, 2)
pt3dadd(-252.5, -37.5, 454, 2)
pt3dadd(-255.5, -38, 457, 1.9)
pt3dadd(-261.5, -41.5, 452.5, 1.6)
pt3dadd(-265.5, -41.5, 453, 1.5)
pt3dadd(-270.5, -49, 459.5, 1.5)
pt3dadd(-274, -51, 460, 1.5)
pt3dadd(-278.5, -52, 460.5, 1)
pt3dadd(-285.5, -57, 461.5, 1.3)
pt3dadd(-291.5, -61, 462.5, 1.3)
pt3dadd(-296, -62, 463, 1.3)
pt3dadd(-299, -63.5, 463.5, 1.1)
pt3dadd(-305.5, -67.5, 464.5, 1.2)
pt3dadd(-309, -69.5, 468, 1.2)
pt3dadd(-313, -71, 471.5, 1.3)
pt3dadd(-319, -72.5, 466.5, 1.3)
pt3dadd(-322.5, -72.5, 467, 1.3)
pt3dadd(-325.5, -73.5, 467, 1.4)
pt3dadd(-329, -76, 465.5, 1.8)
pt3dadd(-333, -77.5, 460, 2)
pt3dadd(-334, -79.5, 473, 2.2)
pt3dadd(-337.5, -82, 473.5, 1.8)
pt3dadd(-340, -84.5, 477, 1.5)
pt3dadd(-344.5, -84.5, 475, 1.6)
pt3dadd(-366, -95.5, 490, 0.9)
pt3dadd(-369, -96.5, 490.5, 1.1)
pt3dadd(-372, -96.5, 491, 1.1)
pt3dadd(-375, -96.5, 491.5, 1.3)
pt3dadd(-380, -98, 488.5, 1.8)
pt3dadd(-381, -100, 493, 1.5)
pt3dadd(-383, -101, 498, 1.2)
pt3dadd(-385, -103.5, 498.5, 1.1)
pt3dadd(-387.5, -105.5, 502.5, 1.1)
pt3dadd(-391.5, -107, 503.5, 1.1)
pt3dadd(-394.5, -107.5, 508, 1.1)
pt3dadd(-399.5, -111, 505.5, 1.3)
pt3dadd(-403, -113, 506, 1.2)
pt3dadd(-405, -115, 506.5, 1.3)
pt3dadd(-407.5, -116.5, 507, 1.3)
pt3dadd(-409.5, -119, 507.5, 1)
pt3dadd(-411.5, -120.5, 508, 1)
pt3dadd(-413, -122.5, 508.5, 1)
pt3dadd(-416, -124, 509, 1)
pt3dadd(-420.5, -127, 514, 0.9)
pt3dadd(-424.5, -131.5, 511, 0.9)
pt3dadd(-427, -133, 516, 1.6)
pt3dadd(-429.5, -134.5, 521, 1.5)
pt3dadd(-433, -134.5, 517.5, 1.2)
pt3dadd(-437.5, -136, 518.5, 1.4)
pt3dadd(-440, -137, 527, 1.6)
pt3dadd(-442, -139.5, 527.5, 1.5)
pt3dadd(-447, -142.5, 525, 1.5)
pt3dadd(-450.5, -144.5, 534, 1.6)
pt3dadd(-461.5, -148, 525, 1.3)
pt3dadd(-467, -148, 534, 0.9)
pt3dadd(-470, -148, 534, 0.8)
pt3dadd(-472.5, -147, 529.5, 0.9)
pt3dadd(-475.5, -147, 525, 0.9)
pt3dadd(-482, -148.5, 539, 1)
pt3dadd(-486.5, -147.5, 551, 0.9)
}
}
proc shape3d_11() {
dend[55] { pt3dadd(-489, -146.5, 558, 0.8)
pt3dadd(-490.5, -144.5, 564, 0.8)
pt3dadd(-494, -144.5, 575, 1)
pt3dadd(-500, -144.5, 570.5, 1)
pt3dadd(-502, -146.5, 570.5, 0.9)
pt3dadd(-504.5, -148.5, 575, 1.5)
pt3dadd(-511, -152, 570.5, 0.9)
pt3dadd(-516, -152, 579.5, 1.9)
pt3dadd(-530, -152, 575, 1.8)
pt3dadd(-534, -152, 579.5, 2.3)
pt3dadd(-537.5, -152, 579.5, 2.5)
pt3dadd(-540, -151, 579.5, 1.2)
pt3dadd(-544, -151, 579.5, 1.2)
pt3dadd(-548.5, -150.5, 579.5, 1.4)
pt3dadd(-553, -150, 570.5, 1.2)
pt3dadd(-556.5, -150.5, 570.5, 1.2)
pt3dadd(-560, -151, 570.5, 1)
pt3dadd(-564, -152, 579.5, 1)
pt3dadd(-566, -151, 579.5, 1)
pt3dadd(-568, -149.5, 575, 1.5)
pt3dadd(-571, -147, 575, 1.5)
pt3dadd(-574.5, -146, 575, 1)
pt3dadd(-577.5, -145, 571.5, 1.1)
pt3dadd(-587.5, -146, 572, 0.8)
pt3dadd(-592, -146, 572, 0.8)
pt3dadd(-596.5, -146, 572.5, 0.6)
pt3dadd(-599, -145.5, 572.5, 0.9)
pt3dadd(-603.5, -145.5, 572.5, 0.7)
pt3dadd(-605, -147, 569.5, 0.7)
pt3dadd(-608.5, -147, 569.5, 0.4)
pt3dadd(-609.5, -144.5, 566, 0.2)
pt3dadd(-612.5, -144.5, 566.5, 0.2)
pt3dadd(-615, -141, 566.5, 0.2)
pt3dadd(-618, -141.5, 563, 0.3)
pt3dadd(-621, -141.5, 563, 0.3)
pt3dadd(-624, -140.5, 567.5, 0.5)
pt3dadd(-625, -137.5, 567.5, 1.1)
pt3dadd(-627, -136.5, 567.5, 1.2)
pt3dadd(-628, -134.5, 567.5, 0.2)
pt3dadd(-632.5, -135.5, 568, 0.2)
pt3dadd(-635, -136.5, 564, 0.2)
pt3dadd(-636, -139.5, 568.5, 0.2)
pt3dadd(-638, -141, 553.5, 0.1)
pt3dadd(-642.5, -141, 558.5, 1.6)
pt3dadd(-645, -140, 562.5, 2.3)
pt3dadd(-647, -137.5, 563, 2.3)
pt3dadd(-649.5, -136.5, 563, 0.4)
pt3dadd(-655, -137.5, 567, 0.4)
pt3dadd(-658.5, -136, 560, 0.4)
pt3dadd(-663.5, -134.5, 568, 0.6)
pt3dadd(-666.5, -131.5, 568.5, 0.5)
pt3dadd(-669, -131, 568.5, 0.5)
pt3dadd(-672.5, -129.5, 568.5, 0.5)
pt3dadd(-680.5, -127, 566, 0.9)
pt3dadd(-684.5, -128.5, 570, 0.5)
pt3dadd(-690.5, -126, 570, 0.1)
pt3dadd(-697, -126, 570.5, 0.1)
pt3dadd(-707, -126, 567.5, 0.1)
pt3dadd(-712.5, -127, 580, 0.1)
pt3dadd(-717.5, -125, 583.5, 0.1)
pt3dadd(-724.5, -124.5, 562, 0.1)
pt3dadd(-730, -124, 566.5, 0.1)
pt3dadd(-731.5, -121, 570.5, 0.1)
pt3dadd(-735, -120.5, 570.5, 0.1)
pt3dadd(-738, -118, 571, 0.1)
pt3dadd(-741, -118, 571, 0.1)
pt3dadd(-745.5, -118, 571.5, 0.1)
pt3dadd(-748.5, -118, 564, 0.1)
pt3dadd(-750.5, -116.5, 564, 0.1)
pt3dadd(-754, -113, 564, 0.1)
pt3dadd(-758.5, -113, 564.5, 0.1)
pt3dadd(-761, -115, 564.5, 0.1)
pt3dadd(-765.5, -115, 565, 0.1)
pt3dadd(-768.5, -114.5, 565, 0.1)
pt3dadd(-774.5, -114.5, 565.5, 0.1)
pt3dadd(-777, -112, 565.5, 0.1)
pt3dadd(-779.5, -111.5, 565.5, 0.1)
pt3dadd(-782.5, -111.5, 566, 0.1)
pt3dadd(-786, -112, 566, 0.1)
pt3dadd(-790.5, -112, 566, 0.1)
pt3dadd(-796, -111.5, 563, 0.1)
pt3dadd(-800.5, -112, 567, 0.1)
pt3dadd(-806.5, -114, 567, 0.1)
pt3dadd(-812, -114, 564, 0.1)
pt3dadd(-816.5, -113, 572, 0.1)
pt3dadd(-820, -111.5, 572, 0.1)
pt3dadd(-824.5, -111.5, 572.5, 0.1)
pt3dadd(-829, -110.5, 572.5, 0.1)
pt3dadd(-832.5, -110.5, 573, 0.1)
pt3dadd(-836, -110, 573, 0.1)
pt3dadd(-836.5, -107.5, 573, 0.1)
pt3dadd(-842.5, -107, 573.5, 0.1)
pt3dadd(-846.5, -107, 573.5, 0.1)
pt3dadd(-853, -107.5, 570, 0.1)
pt3dadd(-857.5, -107.5, 574.5, 0.1)
pt3dadd(-863, -107.5, 575, 0.1)
pt3dadd(-867.5, -105, 567.5, 0.1)
pt3dadd(-871, -105, 569.5, 0.1)
pt3dadd(-876.5, -103.5, 568.5, 0.1)
pt3dadd(-879, -105, 570, 0.1)
pt3dadd(-883, -104.5, 569, 0.1)
pt3dadd(-886, -104.5, 568.5, 0.1)
pt3dadd(-889, -104, 567.5, 0.1)
pt3dadd(-893, -103.5, 564, 0.1)
pt3dadd(-894.5, -102, 563.5, 0.1)
pt3dadd(-897.5, -100, 562.5, 0.1)
pt3dadd(-899.5, -102, 562, 0.1)
pt3dadd(-903.5, -102, 561, 0.1)
pt3dadd(-906.5, -102, 560.5, 0.1)
pt3dadd(-912, -103.5, 559, 0.1)
pt3dadd(-916.5, -103.5, 558, 0.7)
pt3dadd(-920.5, -106, 557, 0.2)
pt3dadd(-924.5, -107, 556, 0.2)
pt3dadd(-930, -110.5, 555, 0.2)
pt3dadd(-934.5, -111.5, 558.5, 0.1)
}
dend[56] {pt3dclear()
pt3dadd(-167, 66, 409, 3.5)
pt3dadd(-162.5, 63.5, 425, 2.5)
pt3dadd(-162.5, 60, 423.5, 1)
pt3dadd(-164.5, 56.5, 422.5, 1)
pt3dadd(-169, 58, 435.5, 1.6)
pt3dadd(-170, 61, 440, 1.8)
pt3dadd(-166.5, 60.5, 441.5, 0.9)
pt3dadd(-165, 59, 452.5, 1.6)
pt3dadd(-167.5, 56.5, 456.5, 1.6)
pt3dadd(-171, 56.5, 453.5, 1.5)
pt3dadd(-174.5, 53.5, 462.5, 1.5)
pt3dadd(-177.5, 51, 467.5, 1.5)
pt3dadd(-179.5, 52, 470, 1.5)
pt3dadd(-181, 50, 468.5, 1.6)
pt3dadd(-184, 48, 474, 1.9)
pt3dadd(-183.5, 52.5, 473.5, 1.8)
pt3dadd(-181.5, 54.5, 474.5, 1.7)
pt3dadd(-178.5, 54.5, 485, 1.8)
pt3dadd(-177, 56, 485.5, 1.8)
pt3dadd(-178.5, 49.5, 503.5, 1.1)
pt3dadd(-179.5, 47, 519.5, 1.3)
pt3dadd(-182, 45, 518, 1.3)
pt3dadd(-184.5, 43, 519, 1.4)
pt3dadd(-186.5, 40.5, 526.5, 1.3)
pt3dadd(-187, 38, 525, 0.9)
}
dend[57] {pt3dclear()
pt3dadd(-24.5, 118, 114.5, 7.9)
pt3dadd(-29.5, 122, 116, 6.2)
pt3dadd(-31, 129.5, 117.5, 6.2)
pt3dadd(-34.5, 139, 120, 5.4)
pt3dadd(-37, 147, 122.5, 4.2)
pt3dadd(-39.5, 149, 123.5, 4.6)
pt3dadd(-41, 155, 125, 4.2)
pt3dadd(-51.5, 183.5, 147.5, 8.6)
}
dend[58] {pt3dclear()
pt3dadd(-51.5, 183.5, 147.5, 8.6)
pt3dadd(-56.5, 186.5, 144, 4.8)
pt3dadd(-61.5, 188, 147.5, 3.5)
pt3dadd(-66, 192.5, 147.5, 3.6)
pt3dadd(-70.5, 195, 147.5, 4)
pt3dadd(-78.5, 197.5, 151, 5.1)
}
dend[59] {pt3dclear()
pt3dadd(-78.5, 197.5, 151, 5.1)
pt3dadd(-82.5, 197.5, 150.5, 3)
pt3dadd(-84.5, 196, 150.5, 3)
pt3dadd(-105.5, 189, 152.5, 2)
pt3dadd(-111, 188, 152.5, 2.6)
pt3dadd(-117, 190, 142, 2.7)
pt3dadd(-120, 191, 141.5, 2.6)
pt3dadd(-123, 192, 145, 2.6)
pt3dadd(-127, 194, 141, 2.2)
pt3dadd(-129, 195, 137, 2)
pt3dadd(-133.5, 195, 137, 2.3)
pt3dadd(-136, 196, 136.5, 2.4)
pt3dadd(-137, 198, 136.5, 1.6)
pt3dadd(-142, 198, 133, 2.2)
pt3dadd(-152, 203.5, 129, 2.5)
pt3dadd(-155, 204.5, 132.5, 2.2)
pt3dadd(-158, 208, 132, 1.7)
pt3dadd(-161, 209.5, 132, 2.5)
pt3dadd(-164, 210.5, 131.5, 2.2)
pt3dadd(-165.5, 212, 131.5, 2.5)
pt3dadd(-169.5, 218, 131, 2)
pt3dadd(-171, 221, 131, 2.1)
pt3dadd(-173.5, 228.5, 130.5, 2.3)
pt3dadd(-175, 230.5, 130.5, 2.3)
pt3dadd(-178, 235, 130, 2.6)
pt3dadd(-179, 238.5, 130, 1.9)
pt3dadd(-184.5, 246, 129.5, 2)
pt3dadd(-186.5, 251, 129, 1.8)
pt3dadd(-191, 255, 131.5, 1.6)
pt3dadd(-192.5, 261, 134.5, 1.8)
pt3dadd(-193, 263.5, 127.5, 2.1)
pt3dadd(-196, 266.5, 124, 2.3)
pt3dadd(-196.5, 274, 123.5, 1.9)
pt3dadd(-198, 277, 123.5, 2.4)
pt3dadd(-198.5, 279.5, 123, 2.4)
pt3dadd(-201, 281, 123, 1.8)
pt3dadd(-203.5, 282, 119.5, 1.3)
pt3dadd(-206.5, 282.5, 119, 1.6)
pt3dadd(-207.5, 285, 119, 1.7)
pt3dadd(-210.5, 291, 125.5, 2)
pt3dadd(-214, 294, 121.5, 1.3)
pt3dadd(-217.5, 300, 121.5, 1.3)
pt3dadd(-224, 306, 117.5, 1.6)
pt3dadd(-224.5, 309.5, 117, 2.5)
pt3dadd(-226.5, 312.5, 117, 2.3)
pt3dadd(-228.5, 319.5, 116.5, 1.8)
}
}
proc shape3d_12() {
dend[59] { pt3dadd(-229.5, 321.5, 116.5, 2.4)
pt3dadd(-231, 324, 123, 2.5)
pt3dadd(-233.5, 326.5, 119.5, 2.2)
pt3dadd(-236, 329, 115.5, 1.8)
pt3dadd(-238.5, 332, 115.5, 1.8)
pt3dadd(-242.5, 336.5, 125, 1.8)
pt3dadd(-245.5, 339, 124.5, 1.3)
pt3dadd(-248.5, 343, 124.5, 1.4)
pt3dadd(-250, 346.5, 124.5, 1.4)
pt3dadd(-257.5, 353.5, 121.5, 1.5)
pt3dadd(-262.5, 355.5, 118.5, 1.6)
pt3dadd(-265, 356.5, 118.5, 1.7)
pt3dadd(-270.5, 359.5, 118.5, 1.9)
pt3dadd(-272.5, 363, 118, 1.9)
pt3dadd(-273.5, 365, 115.5, 1.7)
pt3dadd(-275, 368, 115.5, 1.7)
pt3dadd(-277, 370.5, 115.5, 1.7)
pt3dadd(-279, 372.5, 115.5, 1.6)
pt3dadd(-281, 377, 103.5, 1.6)
pt3dadd(-283, 379.5, 115, 1.3)
pt3dadd(-286, 381.5, 115, 1.4)
pt3dadd(-287.5, 384.5, 114.5, 1.4)
pt3dadd(-289, 387, 114.5, 1.2)
pt3dadd(-290.5, 388.5, 117, 1.2)
pt3dadd(-293, 389, 117, 1.2)
pt3dadd(-296.5, 391.5, 117, 1.1)
pt3dadd(-297, 396, 108, 1.4)
pt3dadd(-298.5, 401.5, 114, 1.4)
pt3dadd(-299.5, 404, 114, 1.4)
pt3dadd(-301, 406.5, 114, 1.7)
pt3dadd(-302.5, 408.5, 114, 1.7)
pt3dadd(-301.5, 411, 114, 1.5)
pt3dadd(-300.5, 413.5, 110.5, 1.1)
pt3dadd(-302, 416, 110.5, 1.5)
pt3dadd(-304.5, 418, 110.5, 1.3)
pt3dadd(-307, 422, 110.5, 1.3)
pt3dadd(-307, 425, 107.5, 1.4)
pt3dadd(-306.5, 428.5, 107.5, 1.5)
pt3dadd(-306.5, 431.5, 104.5, 1.7)
pt3dadd(-307.5, 433.5, 104.5, 1.1)
pt3dadd(-310.5, 435, 104.5, 1.5)
pt3dadd(-309, 440, 104.5, 1.4)
pt3dadd(-311, 443, 104.5, 1.4)
pt3dadd(-314, 444, 104.5, 1.4)
pt3dadd(-317, 447.5, 106.5, 1.5)
pt3dadd(-318.5, 450, 104, 1.5)
pt3dadd(-319, 454.5, 101, 1.6)
pt3dadd(-322, 455, 101, 1.6)
pt3dadd(-327, 455, 103.5, 1.3)
pt3dadd(-328, 457, 103.5, 1.3)
pt3dadd(-331, 459, 103.5, 1.3)
pt3dadd(-333.5, 460, 109, 1.3)
pt3dadd(-336, 462, 109, 1.5)
pt3dadd(-344, 462.5, 108.5, 1.3)
pt3dadd(-347, 461.5, 108.5, 1.2)
pt3dadd(-351, 463, 108.5, 1.2)
pt3dadd(-351, 466, 108.5, 1.7)
pt3dadd(-353, 469, 103, 1.7)
pt3dadd(-355.5, 470.5, 102.5, 1.5)
pt3dadd(-357.5, 471.5, 105, 1.1)
pt3dadd(-361, 472.5, 105, 1.1)
pt3dadd(-364, 475.5, 105, 1.3)
pt3dadd(-366, 477, 108, 1.2)
pt3dadd(-368.5, 479, 99, 0.9)
pt3dadd(-371.5, 476.5, 99, 0.6)
pt3dadd(-375, 476.5, 102, 1)
pt3dadd(-378.5, 478.5, 102, 0.9)
pt3dadd(-381.5, 479.5, 101.5, 0.9)
pt3dadd(-385, 480, 104, 0.9)
pt3dadd(-388, 480, 104, 1)
pt3dadd(-395.5, 483.5, 101.5, 1)
pt3dadd(-397, 487, 101, 1.2)
pt3dadd(-399.5, 491.5, 98, 0.9)
pt3dadd(-402, 495.5, 101, 1)
pt3dadd(-403, 498.5, 101, 1)
pt3dadd(-405, 501, 101, 1)
pt3dadd(-410, 501, 100.5, 0.8)
pt3dadd(-412.5, 502.5, 100.5, 0.8)
pt3dadd(-414, 506, 100.5, 0.9)
pt3dadd(-417.5, 509, 94.5, 1.2)
pt3dadd(-421, 509, 94.5, 1.7)
pt3dadd(-423.5, 511.5, 94.5, 0.9)
pt3dadd(-425, 514, 94.5, 0.9)
pt3dadd(-426, 516, 94.5, 0.9)
pt3dadd(-427.5, 518, 94.5, 0.8)
pt3dadd(-431, 519.5, 94.5, 1.1)
pt3dadd(-432, 522.5, 94, 1.2)
pt3dadd(-435, 525, 94, 0.8)
pt3dadd(-437, 526, 94, 0.8)
pt3dadd(-440, 526, 94, 0.8)
pt3dadd(-443.5, 530, 88.5, 0.8)
pt3dadd(-444.5, 532.5, 93.5, 1.1)
pt3dadd(-448, 533.5, 93.5, 1.1)
pt3dadd(-452.5, 535.5, 93.5, 1.1)
pt3dadd(-454, 539.5, 93.5, 1.1)
pt3dadd(-455, 542, 88, 0.9)
pt3dadd(-460, 543, 84.5, 0.7)
pt3dadd(-462, 545, 93, 0.7)
pt3dadd(-462, 549.5, 93, 0.7)
pt3dadd(-466, 554, 92.5, 0.7)
pt3dadd(-467, 556, 92.5, 0.8)
pt3dadd(-467, 559, 92.5, 0.8)
pt3dadd(-466, 561.5, 92.5, 0.8)
pt3dadd(-465, 565, 95, 0.8)
pt3dadd(-464.5, 571.5, 97.5, 0.9)
pt3dadd(-464.5, 574.5, 97.5, 1.1)
pt3dadd(-464, 577.5, 92, 0.5)
pt3dadd(-463.5, 582, 97.5, 0.5)
pt3dadd(-464.5, 584, 88.5, 0.5)
pt3dadd(-464.5, 587.5, 88.5, 0.9)
pt3dadd(-464.5, 591, 88.5, 0.8)
pt3dadd(-463, 594, 88.5, 0.6)
pt3dadd(-462.5, 598, 91.5, 0.3)
pt3dadd(-460.5, 600.5, 88, 0.3)
pt3dadd(-459.5, 605, 88, 0.4)
pt3dadd(-460.5, 607.5, 85.5, 0.4)
pt3dadd(-458, 612.5, 88, 0.4)
pt3dadd(-455, 612.5, 85.5, 0.4)
pt3dadd(-452, 613.5, 85, 0.4)
pt3dadd(-452, 616.5, 85, 0.4)
pt3dadd(-448, 618, 85, 0.5)
pt3dadd(-448, 621.5, 87.5, 0.5)
pt3dadd(-445, 625.5, 87.5, 0.5)
pt3dadd(-442.5, 626.5, 87.5, 0.5)
pt3dadd(-441.5, 628.5, 87, 0.5)
pt3dadd(-438, 631.5, 87, 0.5)
pt3dadd(-437.5, 636.5, 87, 0.5)
pt3dadd(-436, 640.5, 84.5, 0.5)
pt3dadd(-435, 644, 78.5, 0.5)
pt3dadd(-435, 647.5, 78.5, 0.9)
pt3dadd(-436, 650, 78.5, 0.8)
pt3dadd(-438, 654, 84, 0.9)
}
dend[60] {pt3dclear()
pt3dadd(-78.5, 197.5, 151, 5.1)
pt3dadd(-79.5, 202.5, 160, 3.5)
pt3dadd(-85, 207, 162, 3)
pt3dadd(-95, 211.5, 165, 2.6)
pt3dadd(-99, 212, 166, 2.2)
pt3dadd(-117.5, 215, 183.5, 3.2)
pt3dadd(-121.5, 215.5, 184.5, 3.2)
pt3dadd(-129, 216, 188.5, 2.8)
pt3dadd(-132.5, 216, 189.5, 2.8)
pt3dadd(-138, 214, 188.5, 2.8)
pt3dadd(-141.5, 213, 189.5, 3)
pt3dadd(-148, 210.5, 191, 3.3)
pt3dadd(-146, 211.5, 204, 3.2)
pt3dadd(-144.5, 214, 205, 3.6)
pt3dadd(-152, 214.5, 209, 3)
pt3dadd(-155.5, 215.5, 210, 3)
pt3dadd(-160, 215.5, 211, 2.6)
pt3dadd(-163, 208.5, 225, 2.6)
pt3dadd(-165.5, 206, 225.5, 2.6)
pt3dadd(-170.5, 205.5, 234, 3)
pt3dadd(-175, 205, 244, 2.6)
pt3dadd(-178.5, 205, 244.5, 2.5)
pt3dadd(-180.5, 204, 241.5, 2.3)
pt3dadd(-183, 205, 247, 2.8)
pt3dadd(-184.5, 203.5, 269, 2.8)
pt3dadd(-186.5, 202.5, 269, 2.8)
pt3dadd(-192.5, 202.5, 271, 2.6)
pt3dadd(-198.5, 204, 274, 2.3)
pt3dadd(-200.5, 206, 275, 2.3)
pt3dadd(-204.5, 207, 273, 2)
pt3dadd(-208.5, 212, 274.5, 2.3)
pt3dadd(-214, 211.5, 283, 2.7)
pt3dadd(-216, 210, 281, 2.6)
pt3dadd(-223.5, 209.5, 283.5, 2)
pt3dadd(-225.5, 211, 281.5, 2.5)
pt3dadd(-229.5, 210, 282.5, 2.5)
pt3dadd(-232, 212, 288.5, 1.8)
pt3dadd(-236, 215.5, 290.5, 1.6)
pt3dadd(-240, 215, 291.5, 2.2)
pt3dadd(-243.5, 217, 299.5, 1.5)
pt3dadd(-243.5, 220, 302.5, 1.9)
pt3dadd(-246.5, 220.5, 307, 3)
pt3dadd(-254.5, 220, 312.5, 2.2)
pt3dadd(-257.5, 221, 313.5, 2.2)
pt3dadd(-260.5, 222.5, 314, 2.5)
pt3dadd(-262.5, 223.5, 315, 2.6)
pt3dadd(-267.5, 227.5, 316.5, 2.3)
pt3dadd(-273, 230.5, 325, 2.1)
pt3dadd(-278, 233, 323, 3.3)
pt3dadd(-282, 239, 323, 2.2)
pt3dadd(-288, 242, 332, 1.9)
pt3dadd(-290, 241, 329.5, 1.9)
pt3dadd(-292.5, 239, 330.5, 1.9)
pt3dadd(-296.5, 235.5, 331.5, 1.9)
pt3dadd(-305.5, 233.5, 340, 1.6)
pt3dadd(-308, 234.5, 340.5, 2.2)
pt3dadd(-312.5, 235.5, 348, 1.9)
pt3dadd(-316.5, 236.5, 349, 1.9)
pt3dadd(-319, 237, 349.5, 2.2)
pt3dadd(-323, 238.5, 354, 2.1)
pt3dadd(-323.5, 241.5, 358, 1.7)
pt3dadd(-325.5, 243, 362, 1.7)
pt3dadd(-328.5, 244.5, 358, 2.2)
pt3dadd(-333, 247, 368.5, 2.2)
pt3dadd(-335.5, 250, 369.5, 1.6)
pt3dadd(-339, 251, 370.5, 1.6)
pt3dadd(-343, 254, 375, 1.9)
pt3dadd(-344.5, 255.5, 385, 1.4)
}
}
proc shape3d_13() {
dend[60] { pt3dadd(-346.5, 258.5, 384.5, 1.4)
pt3dadd(-348, 261, 384.5, 1.4)
pt3dadd(-351.5, 262.5, 384.5, 2.3)
pt3dadd(-354.5, 265.5, 384, 1.6)
pt3dadd(-355, 269, 384, 1.2)
pt3dadd(-360, 269, 384, 1.2)
pt3dadd(-364, 270, 380, 1.8)
pt3dadd(-371.5, 273.5, 379.5, 1.9)
pt3dadd(-374, 276, 386.5, 1.6)
pt3dadd(-375, 278, 386, 1.6)
pt3dadd(-378, 279, 386, 2.3)
pt3dadd(-379.5, 280.5, 382.5, 1.9)
pt3dadd(-382, 281.5, 382.5, 1.5)
pt3dadd(-385.5, 283.5, 378.5, 1.2)
pt3dadd(-389, 290, 385, 1.6)
pt3dadd(-388.5, 294, 385, 1.4)
pt3dadd(-390.5, 297.5, 385, 1.2)
pt3dadd(-393, 298.5, 384.5, 1.2)
pt3dadd(-396, 299.5, 384.5, 1.1)
pt3dadd(-397, 302, 384.5, 1.3)
pt3dadd(-399.5, 307, 384.5, 1.4)
pt3dadd(-401.5, 310.5, 384, 1.1)
pt3dadd(-404, 312.5, 380.5, 1.4)
pt3dadd(-408, 317, 380, 1.4)
pt3dadd(-412.5, 317.5, 380, 1.8)
pt3dadd(-416.5, 321.5, 379.5, 1.4)
pt3dadd(-418.5, 323.5, 379.5, 1.4)
pt3dadd(-422, 325.5, 376, 1.3)
pt3dadd(-424.5, 326, 376, 1.2)
pt3dadd(-428.5, 327, 375.5, 1.2)
pt3dadd(-428.5, 330, 375.5, 1.4)
pt3dadd(-427.5, 333, 375.5, 1.2)
pt3dadd(-429.5, 336, 375, 1.2)
pt3dadd(-432.5, 336, 375, 1.8)
pt3dadd(-434, 337.5, 375, 1.5)
pt3dadd(-438.5, 341, 375, 1.6)
pt3dadd(-442, 343, 375, 1.6)
pt3dadd(-444.5, 346, 377.5, 1.4)
pt3dadd(-446.5, 347.5, 375.5, 1.1)
pt3dadd(-450, 350, 378, 1.2)
pt3dadd(-455.5, 354.5, 370, 1.6)
pt3dadd(-457, 357.5, 370.5, 0.9)
pt3dadd(-458, 360, 370.5, 0.9)
pt3dadd(-459.5, 363.5, 363, 1.5)
pt3dadd(-461.5, 365, 368.5, 1.7)
pt3dadd(-469, 369, 363.5, 1.3)
pt3dadd(-470, 372.5, 361, 0.7)
pt3dadd(-472.5, 373, 361, 0.7)
pt3dadd(-478, 372.5, 361.5, 0.9)
pt3dadd(-480.5, 374, 361.5, 0.9)
pt3dadd(-480, 378.5, 362, 0.9)
pt3dadd(-482, 379.5, 362, 0.9)
pt3dadd(-484.5, 381.5, 365.5, 0.9)
pt3dadd(-487.5, 382.5, 365.5, 1.2)
pt3dadd(-489.5, 387.5, 360, 1.7)
pt3dadd(-491.5, 389, 360.5, 1.6)
pt3dadd(-495.5, 392.5, 360.5, 1.9)
pt3dadd(-500, 393, 361, 1.1)
pt3dadd(-503.5, 393.5, 361, 1.1)
pt3dadd(-508, 396, 361, 1.6)
pt3dadd(-508.5, 399, 361.5, 1.7)
pt3dadd(-513, 402.5, 361.5, 2.1)
pt3dadd(-515, 401, 361.5, 1.9)
pt3dadd(-519, 402.5, 362, 1.6)
pt3dadd(-525.5, 403, 364.5, 1.1)
pt3dadd(-530, 404, 368, 1.1)
pt3dadd(-533, 402.5, 362.5, 1.3)
pt3dadd(-535.5, 403, 360, 1.3)
pt3dadd(-538.5, 405.5, 360, 1.3)
pt3dadd(-541, 407, 363.5, 1.2)
pt3dadd(-543.5, 406, 358, 1.2)
pt3dadd(-545.5, 405, 358, 0.9)
pt3dadd(-548.5, 405, 358.5, 0.9)
pt3dadd(-557, 406.5, 358.5, 0.9)
pt3dadd(-562, 409.5, 359, 0.9)
pt3dadd(-566.5, 411, 359, 0.9)
pt3dadd(-573, 411, 359.5, 1.2)
pt3dadd(-574, 413, 359.5, 1.2)
pt3dadd(-576, 418.5, 360, 1.3)
pt3dadd(-579, 418.5, 362.5, 1.1)
pt3dadd(-583, 420.5, 362.5, 1.1)
pt3dadd(-588.5, 419, 363, 1.9)
pt3dadd(-593.5, 419, 363, 1.2)
pt3dadd(-595.5, 421, 366.5, 1.1)
pt3dadd(-597, 426, 366.5, 0.9)
pt3dadd(-599.5, 426.5, 366.5, 0.8)
pt3dadd(-604, 426.5, 367, 0.8)
pt3dadd(-607, 429, 369.5, 0.8)
pt3dadd(-612, 429, 370, 1.2)
pt3dadd(-616, 429, 370, 1.2)
pt3dadd(-619.5, 431, 370, 0.8)
pt3dadd(-621.5, 433, 370.5, 0.8)
pt3dadd(-626, 433, 370.5, 1.1)
pt3dadd(-629, 430.5, 370.5, 1.8)
pt3dadd(-634.5, 430, 371, 1)
pt3dadd(-637.5, 431.5, 374, 1.4)
pt3dadd(-641.5, 435, 377, 1.3)
pt3dadd(-644.5, 437, 377, 1.8)
pt3dadd(-649, 436, 380.5, 1)
pt3dadd(-653, 436, 380.5, 0.7)
pt3dadd(-655, 438.5, 380.5, 0.7)
pt3dadd(-659, 439, 378, 0.7)
pt3dadd(-662, 442.5, 378.5, 0.7)
pt3dadd(-665, 445.5, 378.5, 0.7)
pt3dadd(-668.5, 443.5, 378.5, 0.8)
pt3dadd(-670.5, 442.5, 379, 0.8)
pt3dadd(-674, 443.5, 379, 0.8)
pt3dadd(-678.5, 443.5, 379, 0.8)
pt3dadd(-682, 446, 374, 0.6)
pt3dadd(-683.5, 448, 380, 1.3)
pt3dadd(-689, 450.5, 380, 0.9)
pt3dadd(-691, 451.5, 380, 0.9)
pt3dadd(-697, 453.5, 380.5, 0.9)
pt3dadd(-697.5, 456.5, 380.5, 0.5)
pt3dadd(-701.5, 457, 380.5, 0.5)
pt3dadd(-703.5, 459, 384, 0.5)
pt3dadd(-703, 462, 378.5, 0.5)
pt3dadd(-705, 465.5, 379, 0.5)
pt3dadd(-705.5, 468, 381.5, 0.5)
pt3dadd(-709, 470, 376.5, 0.6)
pt3dadd(-705, 474.5, 376.5, 0.6)
pt3dadd(-706, 478, 380, 0.6)
pt3dadd(-710, 482, 380, 0.6)
pt3dadd(-709.5, 486, 375, 1.3)
pt3dadd(-709.5, 489, 375, 1.3)
pt3dadd(-709.5, 492.5, 375.5, 1.3)
pt3dadd(-709.5, 495.5, 375.5, 1.3)
pt3dadd(-709.5, 498.5, 372.5, 0.6)
pt3dadd(-713.5, 498.5, 373, 0.6)
pt3dadd(-718.5, 499.5, 373, 0.6)
pt3dadd(-722, 499.5, 376, 0.4)
pt3dadd(-725, 502, 376.5, 0.3)
pt3dadd(-726.5, 506.5, 376.5, 0.3)
pt3dadd(-726.5, 509.5, 376.5, 0.3)
pt3dadd(-728, 514.5, 379.5, 0.1)
pt3dadd(-732, 517, 379.5, 0.2)
pt3dadd(-735.5, 521, 380, 0.2)
pt3dadd(-740.5, 522.5, 380, 0.2)
pt3dadd(-744, 524.5, 380.5, 0.2)
pt3dadd(-747, 525, 380.5, 0.2)
pt3dadd(-749.5, 526.5, 380.5, 0.2)
pt3dadd(-753.5, 531.5, 375.5, 0.1)
pt3dadd(-757.5, 534.5, 375.5, 0.1)
pt3dadd(-761, 538, 376, 0.1)
pt3dadd(-763, 541, 376, 0.1)
pt3dadd(-765.5, 543.5, 376, 0.1)
pt3dadd(-769, 546.5, 374, 0.1)
pt3dadd(-772.5, 548.5, 374, 0.1)
pt3dadd(-775.5, 552, 374.5, 0.1)
pt3dadd(-778, 554, 377, 0.1)
pt3dadd(-783, 555.5, 377.5, 0.1)
pt3dadd(-785, 559.5, 377.5, 0.1)
pt3dadd(-787.5, 564.5, 381, 0.1)
pt3dadd(-788, 567.5, 378, 0.1)
}
dend[61] {pt3dclear()
pt3dadd(-51.5, 183.5, 147.5, 8.6)
pt3dadd(-49.5, 188.5, 151.5, 4)
pt3dadd(-49.5, 192, 149, 3.4)
pt3dadd(-49.5, 197.5, 150, 3.1)
pt3dadd(-49, 204, 151, 3)
pt3dadd(-51.5, 210, 152, 3)
pt3dadd(-50.5, 212.5, 155.5, 3.3)
pt3dadd(-54, 224, 169, 3.1)
pt3dadd(-54.5, 231, 167.5, 2.8)
pt3dadd(-55.5, 233.5, 168, 2.7)
pt3dadd(-58, 238.5, 168.5, 3.3)
pt3dadd(-59, 242.5, 169.5, 3.5)
pt3dadd(-61, 246, 170, 3.5)
pt3dadd(-64, 255, 175, 3.2)
pt3dadd(-66.5, 263, 176, 3.6)
pt3dadd(-69.5, 267.5, 174, 3.7)
pt3dadd(-71.5, 269.5, 174.5, 3.7)
pt3dadd(-74, 280.5, 176, 3.9)
pt3dadd(-75, 283, 176.5, 3.8)
pt3dadd(-80.5, 289, 180, 3.3)
pt3dadd(-81, 295, 180.5, 3.7)
pt3dadd(-82, 298, 183.5, 3.6)
pt3dadd(-83, 304, 184.5, 3.6)
pt3dadd(-84, 310, 185.5, 3.7)
pt3dadd(-85, 314.5, 186, 3.8)
pt3dadd(-84.5, 318.5, 186.5, 3)
pt3dadd(-84.5, 321.5, 186.5, 3.2)
pt3dadd(-86, 324.5, 187, 3.7)
pt3dadd(-87, 328, 183, 3.5)
pt3dadd(-87.5, 332.5, 195, 3.5)
pt3dadd(-87.5, 337, 193, 2.6)
pt3dadd(-89, 341.5, 193.5, 2.6)
pt3dadd(-90.5, 346, 191.5, 2.6)
pt3dadd(-92, 350.5, 192, 2.5)
pt3dadd(-91, 354.5, 192.5, 2.5)
pt3dadd(-91.5, 360.5, 194, 3)
pt3dadd(-92.5, 364.5, 203, 3)
pt3dadd(-94.5, 369.5, 204, 3)
pt3dadd(-98, 376, 210.5, 3.2)
pt3dadd(-96.5, 384, 211.5, 3.2)
pt3dadd(-98, 390.5, 209.5, 2.8)
pt3dadd(-101.5, 395.5, 210.5, 2.8)
pt3dadd(-103, 402.5, 217, 3)
pt3dadd(-108.5, 410, 218.5, 3.3)
pt3dadd(-109, 418, 219.5, 3.3)
pt3dadd(-109.5, 423, 220, 3.4)
}
}
proc shape3d_14() {
dend[61] { pt3dadd(-110, 431, 223.5, 3.2)
pt3dadd(-111, 434, 224, 3.2)
pt3dadd(-114, 439, 225, 3.2)
pt3dadd(-118.5, 453, 235.5, 4)
pt3dadd(-119, 454.5, 236, 4.8)
}
dend[62] {pt3dclear()
pt3dadd(-119, 454.5, 236, 4.8)
pt3dadd(-117, 458, 236, 3.4)
pt3dadd(-116, 464.5, 237, 2)
pt3dadd(-116, 468.5, 237, 2.1)
pt3dadd(-112, 479, 238.5, 1.4)
pt3dadd(-114, 480.5, 238.5, 1.4)
pt3dadd(-115.5, 483, 239, 1.5)
pt3dadd(-117.5, 490.5, 239.5, 2.8)
pt3dadd(-120.5, 494.5, 240, 2)
pt3dadd(-121.5, 497, 240, 1.5)
pt3dadd(-123, 501, 237, 1.3)
pt3dadd(-125.5, 508, 238, 1.3)
pt3dadd(-125.5, 512.5, 238.5, 1.3)
pt3dadd(-126.5, 517, 250, 1.3)
pt3dadd(-129.5, 518, 250, 1.3)
pt3dadd(-132.5, 519, 250.5, 1.7)
pt3dadd(-133.5, 527, 251, 1.9)
pt3dadd(-135, 529.5, 251.5, 1.9)
pt3dadd(-137.5, 534.5, 248.5, 1.5)
pt3dadd(-138.5, 538, 245.5, 1.3)
pt3dadd(-141.5, 542, 253, 1.2)
pt3dadd(-142.5, 546, 257, 1.2)
pt3dadd(-145, 548, 261.5, 1.2)
pt3dadd(-146.5, 550.5, 262, 1.7)
pt3dadd(-151.5, 558, 262.5, 1.5)
pt3dadd(-155, 560, 263, 1.5)
pt3dadd(-156.5, 563.5, 263.5, 1.5)
pt3dadd(-159, 567, 275, 1.5)
}
dend[63] {pt3dclear()
pt3dadd(-119, 454.5, 236, 4.8)
pt3dadd(-123.5, 452.5, 239.5, 1.9)
pt3dadd(-126.5, 452, 243.5, 1.9)
pt3dadd(-128.5, 456.5, 240.5, 1.2)
pt3dadd(-129.5, 458.5, 240.5, 1.8)
pt3dadd(-132.5, 460.5, 241, 1.3)
pt3dadd(-136, 462, 237.5, 1.3)
pt3dadd(-139, 465, 242, 1.3)
pt3dadd(-142.5, 466.5, 242, 1.3)
pt3dadd(-144, 469, 242, 1.3)
pt3dadd(-146, 472.5, 242.5, 1.3)
pt3dadd(-148, 480, 254.5, 1.3)
pt3dadd(-148, 483, 254.5, 1.4)
pt3dadd(-149.5, 485.5, 255, 1.4)
pt3dadd(-149.5, 488.5, 255, 1.4)
pt3dadd(-149.5, 491.5, 255, 1.5)
pt3dadd(-150.5, 497.5, 259.5, 1.6)
pt3dadd(-152, 500.5, 259.5, 1.6)
pt3dadd(-155.5, 503.5, 260, 1.6)
pt3dadd(-156.5, 506, 260, 1.6)
pt3dadd(-157.5, 512, 264, 1.4)
pt3dadd(-160, 521.5, 261.5, 2.2)
pt3dadd(-164.5, 528.5, 272.5, 1.8)
pt3dadd(-166.5, 533.5, 266, 1.5)
pt3dadd(-168.5, 536, 266.5, 1.5)
pt3dadd(-169, 540, 266.5, 1.3)
pt3dadd(-173.5, 545.5, 267, 1.1)
pt3dadd(-173.5, 549, 267, 1.1)
pt3dadd(-175, 552.5, 267.5, 1.2)
pt3dadd(-174.5, 556.5, 264.5, 1.3)
pt3dadd(-176, 562.5, 268.5, 1.5)
pt3dadd(-176.5, 565.5, 269, 1.5)
pt3dadd(-178.5, 569.5, 269, 1.3)
pt3dadd(-179, 574, 266, 1.3)
pt3dadd(-181, 579.5, 266, 1.3)
pt3dadd(-185, 583, 266.5, 1.1)
pt3dadd(-185, 588.5, 267, 1.1)
pt3dadd(-193.5, 594.5, 271, 1.5)
pt3dadd(-197, 597, 271.5, 1.5)
pt3dadd(-197, 600.5, 271.5, 1.5)
pt3dadd(-197, 604, 272, 1.5)
pt3dadd(-199.5, 606, 272, 0.9)
pt3dadd(-203.5, 615.5, 266, 0.4)
pt3dadd(-205, 621, 262, 0.4)
pt3dadd(-207.5, 628, 274, 0.4)
pt3dadd(-207.5, 633.5, 271, 0.4)
pt3dadd(-209.5, 638, 275, 0.6)
}
dend[64] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 11)
pt3dadd(35, -54, -2, 11)
pt3dadd(36, -58, -25, 10.3)
pt3dadd(35.5, -64.5, -26, 10.3)
pt3dadd(35.5, -72.5, -27, 11.7)
pt3dadd(34.5, -76.5, -31.5, 11.6)
pt3dadd(37.5, -85.5, -28.5, 11)
pt3dadd(38, -92.5, -27, 11.6)
pt3dadd(37.5, -101.5, -35, 12.5)
pt3dadd(37.5, -109, -33, 11.4)
pt3dadd(40.5, -118.5, -31, 10.4)
pt3dadd(44, -126, -29, 11.3)
pt3dadd(44.5, -136, -26.5, 10.5)
pt3dadd(43, -144, -27.5, 12.1)
pt3dadd(44, -148.5, -26.5, 12.8)
pt3dadd(44, -155.5, -25, 13.8)
pt3dadd(46.5, -167.5, -45, 15)
}
dend[65] {pt3dclear()
pt3dadd(46.5, -167.5, -45, 15)
pt3dadd(53.5, -172.5, -42, 8.1)
pt3dadd(57, -174.5, -42, 7.2)
pt3dadd(63, -181, -45, 6.5)
pt3dadd(65.5, -186.5, -48.5, 7.3)
pt3dadd(69.5, -194.5, -48.5, 7.1)
pt3dadd(75.5, -202, -51, 7.4)
pt3dadd(84.5, -207, -49, 9.1)
}
dend[66] {pt3dclear()
pt3dadd(84.5, -207, -49, 9.1)
pt3dadd(85.5, -213.5, -49, 5)
pt3dadd(88, -218.5, -49, 5.3)
pt3dadd(94.5, -224, -51.5, 4.8)
pt3dadd(96.5, -227.5, -51.5, 4.8)
pt3dadd(97, -231.5, -51.5, 5)
pt3dadd(98.5, -233, -51.5, 5)
pt3dadd(103.5, -238.5, -57.5, 5.2)
pt3dadd(104.5, -240.5, -54.5, 5.8)
pt3dadd(105.5, -243.5, -57.5, 6.1)
}
dend[67] {pt3dclear()
pt3dadd(105.5, -243.5, -57.5, 6.1)
pt3dadd(109, -246.5, -61, 5.1)
pt3dadd(112.5, -248, -61.5, 5.1)
pt3dadd(116, -247.5, -62, 5)
pt3dadd(122.5, -249.5, -60.5, 5)
pt3dadd(126.5, -252.5, -61, 5.1)
pt3dadd(130, -254.5, -61.5, 4.1)
pt3dadd(134.5, -260.5, -65.5, 4.8)
pt3dadd(137, -262, -65.5, 4.8)
pt3dadd(140.5, -264, -60.5, 5.3)
pt3dadd(144, -271, -64.5, 5.7)
pt3dadd(147.5, -274, -75, 5.7)
pt3dadd(154, -281, -77.5, 4.6)
pt3dadd(159, -285.5, -83.5, 4.7)
pt3dadd(161, -289.5, -85.5, 4.7)
pt3dadd(165, -294, -88.5, 5.2)
}
dend[68] {pt3dclear()
pt3dadd(165, -294, -88.5, 5.2)
pt3dadd(165.5, -301, -93, 4.1)
}
dend[69] {pt3dclear()
pt3dadd(165.5, -301, -93, 4.1)
pt3dadd(169, -303.5, -91, 1.1)
pt3dadd(170, -307.5, -88.5, 1.1)
pt3dadd(172.5, -311.5, -88.5, 1.1)
pt3dadd(174, -314.5, -91, 1.4)
pt3dadd(177, -318, -88.5, 1.4)
pt3dadd(181.5, -324.5, -86.5, 1.3)
pt3dadd(186, -327, -86.5, 1.1)
pt3dadd(187.5, -329, -88.5, 1.4)
pt3dadd(188.5, -331, -88.5, 1.4)
pt3dadd(190, -333, -88.5, 1.2)
pt3dadd(190, -336, -88.5, 1)
pt3dadd(191.5, -338.5, -91, 1)
pt3dadd(194.5, -340.5, -93, 1.2)
pt3dadd(197, -342, -95.5, 1.3)
pt3dadd(197.5, -346.5, -91, 1.4)
pt3dadd(199, -351.5, -91, 1.2)
pt3dadd(201, -353.5, -91, 1.1)
pt3dadd(203, -356.5, -93, 1.1)
pt3dadd(204.5, -359, -91, 1.1)
pt3dadd(210.5, -361, -91, 1.3)
pt3dadd(213.5, -365.5, -89, 1.9)
pt3dadd(216, -368.5, -89, 1.9)
pt3dadd(217.5, -370, -89, 1.5)
pt3dadd(219, -373, -89, 1.5)
pt3dadd(224.5, -377, -89, 0.9)
pt3dadd(229, -385, -89, 1.1)
pt3dadd(234, -385.5, -89, 1.1)
pt3dadd(241, -390, -89, 1.6)
pt3dadd(243.5, -392, -84.5, 1.6)
pt3dadd(245, -394, -84.5, 1)
pt3dadd(251, -394, -87, 1)
pt3dadd(252, -396.5, -87, 1)
pt3dadd(255, -399, -87, 1)
pt3dadd(256, -403.5, -84.5, 1.2)
pt3dadd(260.5, -407, -87, 1)
pt3dadd(260.5, -412, -87, 1.1)
pt3dadd(262.5, -414, -87, 1.1)
pt3dadd(264, -415.5, -87, 1.3)
pt3dadd(263.5, -419, -87, 1)
pt3dadd(262.5, -423, -91.5, 0.9)
pt3dadd(264, -425, -91.5, 1)
pt3dadd(265, -427, -91.5, 1)
pt3dadd(262.5, -429, -91.5, 0.4)
pt3dadd(264, -432, -91.5, 0.4)
pt3dadd(266, -435, -91.5, 0.4)
pt3dadd(267.5, -439, -93.5, 0.4)
pt3dadd(269, -443, -91.5, 0.4)
pt3dadd(270.5, -449.5, -89, 0.7)
pt3dadd(268, -453.5, -89, 0.7)
pt3dadd(270.5, -455, -89, 0.8)
pt3dadd(273.5, -457.5, -89, 0.7)
pt3dadd(271.5, -461.5, -89, 0.7)
pt3dadd(272.5, -464, -89, 0.7)
pt3dadd(273.5, -467, -89, 0.7)
pt3dadd(271, -472.5, -89, 0.5)
pt3dadd(274, -477, -89, 0.5)
pt3dadd(273, -479, -89, 0.5)
pt3dadd(273.5, -484, -93.5, 0.9)
pt3dadd(271, -489, -89, 0.6)
pt3dadd(271, -494.5, -91.5, 0.6)
pt3dadd(271, -498, -91.5, 0.6)
pt3dadd(270.5, -501.5, -96, 0.5)
pt3dadd(270, -507.5, -91.5, 0.6)
pt3dadd(273, -510, -93.5, 0.6)
pt3dadd(275.5, -514.5, -93.5, 0.6)
pt3dadd(275.5, -517.5, -93.5, 0.6)
}
}
proc shape3d_15() {
dend[69] { pt3dadd(273, -519, -93.5, 0.6)
pt3dadd(272.5, -522.5, -93.5, 1.3)
pt3dadd(273, -525.5, -93.5, 0.9)
pt3dadd(275.5, -529, -93.5, 0.5)
pt3dadd(278, -533.5, -93.5, 0.5)
pt3dadd(279.5, -539.5, -93.5, 0.5)
pt3dadd(279, -543, -93.5, 0.5)
pt3dadd(277, -545.5, -93.5, 0.5)
pt3dadd(278.5, -548, -93.5, 0.5)
pt3dadd(281, -550.5, -96, 0.5)
pt3dadd(283, -555.5, -96, 0.5)
pt3dadd(283, -561, -98, 0.6)
pt3dadd(286.5, -564.5, -93.5, 0.5)
pt3dadd(289.5, -567.5, -91.5, 0.5)
pt3dadd(289.5, -571, -91.5, 0.5)
pt3dadd(291, -573.5, -91.5, 0.5)
pt3dadd(293.5, -574, -91.5, 0.5)
pt3dadd(295.5, -577, -91.5, 0.5)
pt3dadd(295.5, -580.5, -91.5, 0.5)
pt3dadd(297.5, -583, -93.5, 0.5)
pt3dadd(302.5, -583, -96, 0.5)
pt3dadd(307, -585, -92, 1.1)
pt3dadd(310.5, -585, -92, 0.8)
pt3dadd(316, -585, -92, 1.2)
pt3dadd(318.5, -587, -92, 0.7)
pt3dadd(324, -587.5, -92, 0.7)
pt3dadd(327, -591.5, -92, 0.7)
pt3dadd(328, -595.5, -92, 0.7)
pt3dadd(329, -600.5, -89.5, 0.6)
pt3dadd(332.5, -603.5, -89.5, 0.6)
pt3dadd(336.5, -603.5, -89.5, 0.6)
pt3dadd(340.5, -606.5, -89.5, 0.6)
pt3dadd(345, -607, -85, 0.6)
pt3dadd(348, -609.5, -85, 0.6)
pt3dadd(351.5, -613.5, -85, 0.6)
pt3dadd(356, -616.5, -85, 0.6)
pt3dadd(359.5, -621, -87.5, 0.6)
pt3dadd(363.5, -623.5, -87.5, 0.6)
pt3dadd(366, -625, -83, 0.7)
pt3dadd(372.5, -628.5, -83, 0.7)
pt3dadd(375.5, -630.5, -83, 0.7)
pt3dadd(381, -634, -83, 0.7)
pt3dadd(385, -634, -85, 0.7)
pt3dadd(388, -634, -85, 0.7)
pt3dadd(391, -634, -80.5, 0.7)
pt3dadd(394, -632.5, -80.5, 0.7)
pt3dadd(396.5, -634.5, -87.5, 0.7)
}
dend[70] {pt3dclear()
pt3dadd(165.5, -301, -93, 4.1)
pt3dadd(165.5, -305.5, -93.5, 2.8)
pt3dadd(167.5, -308, -94, 2.7)
pt3dadd(169, -310, -96.5, 2.7)
pt3dadd(170.5, -311.5, -97, 2.5)
pt3dadd(169, -314, -97, 2.3)
pt3dadd(168.5, -317, -97.5, 3.1)
pt3dadd(168.5, -320.5, -97.5, 3.1)
pt3dadd(170, -323.5, -98, 3.7)
pt3dadd(171, -327.5, -98.5, 3.7)
pt3dadd(171, -331.5, -100.5, 3)
pt3dadd(172.5, -335, -101, 2.6)
pt3dadd(176, -336, -101.5, 2.9)
pt3dadd(181, -336.5, -102, 3.5)
pt3dadd(180, -340.5, -105, 3.5)
pt3dadd(179.5, -343, -105, 3.5)
pt3dadd(183.5, -348, -105.5, 3.5)
pt3dadd(185, -351.5, -108.5, 3.5)
pt3dadd(188, -354.5, -109, 3.3)
pt3dadd(189.5, -358, -111.5, 3)
pt3dadd(187, -361, -112, 2.9)
pt3dadd(182.5, -371, -117.5, 3.2)
pt3dadd(182.5, -374, -118, 2.7)
pt3dadd(189, -380.5, -119, 3.4)
pt3dadd(191, -382.5, -119, 3.1)
pt3dadd(193.5, -385, -119.5, 2.8)
pt3dadd(195, -386.5, -119.5, 3.2)
pt3dadd(196, -388.5, -122.5, 3.7)
pt3dadd(196, -392.5, -125, 3.4)
pt3dadd(199.5, -401, -142, 3)
pt3dadd(199.5, -404.5, -139, 2.9)
pt3dadd(199, -407.5, -142.5, 3.2)
pt3dadd(198.5, -411.5, -143, 2.8)
pt3dadd(198.5, -414.5, -143, 3.5)
pt3dadd(200, -418.5, -143.5, 3)
pt3dadd(204, -423.5, -143.5, 2.8)
pt3dadd(203.5, -427, -144, 2.8)
pt3dadd(202.5, -430.5, -144, 3)
pt3dadd(203, -433, -144, 3.1)
pt3dadd(206, -436, -138, 3.2)
pt3dadd(207.5, -440.5, -148.5, 2.8)
pt3dadd(207, -443.5, -149, 3.2)
pt3dadd(207, -447.5, -145.5, 2.7)
pt3dadd(205.5, -449.5, -145.5, 2.6)
pt3dadd(203.5, -452.5, -146, 2.9)
}
dend[71] {pt3dclear()
pt3dadd(203.5, -452.5, -146, 2.9)
pt3dadd(204, -457, -153.5, 1.9)
pt3dadd(204.5, -460, -154, 1.6)
pt3dadd(204, -462.5, -154.5, 1.4)
pt3dadd(204.5, -466, -155, 1.4)
pt3dadd(206, -469.5, -155.5, 1.3)
pt3dadd(207.5, -473.5, -156.5, 1.6)
pt3dadd(208.5, -476.5, -157, 1.7)
pt3dadd(208, -479.5, -157.5, 1.9)
pt3dadd(206.5, -482.5, -158, 2.1)
pt3dadd(206.5, -487, -158.5, 1.5)
pt3dadd(207, -492, -156.5, 1.5)
pt3dadd(207, -496.5, -160.5, 1.8)
pt3dadd(205.5, -499, -158.5, 1.6)
pt3dadd(203.5, -500, -159, 1.4)
pt3dadd(202.5, -504, -162.5, 1.8)
pt3dadd(201, -506.5, -163, 1.8)
pt3dadd(202, -510, -163.5, 2)
pt3dadd(203.5, -512.5, -164, 2)
pt3dadd(203, -515.5, -164.5, 2.2)
pt3dadd(202.5, -518.5, -165, 2)
pt3dadd(205, -525, -166, 1.1)
pt3dadd(206, -527, -166.5, 1.1)
pt3dadd(205.5, -530, -167, 1.8)
pt3dadd(205, -533, -167.5, 1.8)
pt3dadd(202.5, -537.5, -168.5, 1.6)
pt3dadd(201.5, -539.5, -168.5, 1.7)
pt3dadd(201.5, -543.5, -169.5, 1.8)
pt3dadd(203.5, -546.5, -177.5, 1.7)
pt3dadd(204, -551.5, -179, 1.8)
pt3dadd(204, -558.5, -180, 1.8)
pt3dadd(202.5, -563.5, -181, 1.6)
pt3dadd(203.5, -569, -186, 1.3)
pt3dadd(206.5, -572, -187.5, 1.4)
pt3dadd(202.5, -572, -188, 1.4)
pt3dadd(203.5, -575.5, -189, 1.4)
pt3dadd(207.5, -580, -190, 1.2)
pt3dadd(209, -582.5, -190.5, 1.1)
pt3dadd(213, -583, -191, 1.4)
pt3dadd(217, -586, -196, 1.4)
pt3dadd(221, -588.5, -196.5, 1.2)
pt3dadd(219, -594.5, -198, 1.1)
pt3dadd(219, -598.5, -206, 1.1)
pt3dadd(221.5, -600, -211, 1.1)
pt3dadd(223, -603, -215.5, 1.1)
pt3dadd(227, -603, -209.5, 1.3)
pt3dadd(230, -603, -210, 1.3)
pt3dadd(232, -605.5, -210.5, 1.3)
pt3dadd(232, -609.5, -219.5, 1.3)
pt3dadd(234.5, -612, -217, 1.5)
pt3dadd(236.5, -615, -221, 1.3)
pt3dadd(239, -618, -222, 1.5)
pt3dadd(241, -620.5, -219, 2.1)
pt3dadd(241, -623.5, -219.5, 1.9)
pt3dadd(242, -626, -220, 1.4)
pt3dadd(244.5, -630, -225, 1.5)
pt3dadd(246, -632, -225.5, 1.3)
pt3dadd(249, -633, -224.5, 1.3)
pt3dadd(250, -635.5, -234, 1.3)
pt3dadd(254, -642, -239, 2.1)
pt3dadd(256.5, -643.5, -240, 1.7)
pt3dadd(260.5, -643.5, -244, 1.6)
pt3dadd(263, -645, -245, 1.3)
pt3dadd(268, -652, -250.5, 1.1)
pt3dadd(272, -657.5, -258, 1.2)
pt3dadd(275.5, -657.5, -259, 1.2)
pt3dadd(278.5, -655.5, -260, 1)
pt3dadd(280, -660, -261.5, 1.6)
pt3dadd(284, -665, -271.5, 1.6)
pt3dadd(286, -669, -273, 1.1)
pt3dadd(287.5, -671, -274, 1)
pt3dadd(286.5, -677, -280.5, 1.4)
pt3dadd(286.5, -680, -281, 1.4)
pt3dadd(286.5, -683.5, -281.5, 1.4)
pt3dadd(286.5, -687.5, -287, 1.4)
pt3dadd(284.5, -689.5, -287.5, 1.3)
pt3dadd(284, -695.5, -288.5, 1.3)
pt3dadd(282.5, -699, -285.5, 1.6)
pt3dadd(281, -701.5, -286.5, 0.7)
pt3dadd(282, -704.5, -296, 0.8)
pt3dadd(280.5, -710, -293.5, 1.6)
pt3dadd(278.5, -712, -294, 1.8)
pt3dadd(279, -715.5, -294.5, 0.7)
pt3dadd(277, -717, -295, 0.7)
pt3dadd(278, -719.5, -295.5, 0.7)
pt3dadd(276.5, -727.5, -298, 0.9)
pt3dadd(276, -731, -298.5, 0.9)
pt3dadd(272.5, -731, -299.5, 0.9)
pt3dadd(272, -734, -304.5, 0.9)
pt3dadd(272, -737.5, -305, 1.1)
pt3dadd(272, -743.5, -306, 1.1)
pt3dadd(273.5, -746, -306.5, 1.1)
pt3dadd(272.5, -749, -327, 1.3)
pt3dadd(271.5, -753.5, -320.5, 0.9)
pt3dadd(271.5, -757, -321.5, 0.9)
pt3dadd(269.5, -760.5, -322, 0.9)
pt3dadd(269.5, -763.5, -322.5, 1)
pt3dadd(269.5, -768, -328, 1.3)
pt3dadd(269.5, -769.5, -325, 1.3)
}
dend[72] {pt3dclear()
pt3dadd(203.5, -452.5, -146, 2.9)
pt3dadd(206.5, -455, -155, 2.5)
pt3dadd(210, -455, -153.5, 1.7)
pt3dadd(208.5, -461, -164, 2.1)
pt3dadd(210, -466.5, -170.5, 1.7)
pt3dadd(211.5, -469, -175, 1.7)
pt3dadd(213.5, -472.5, -183.5, 2.5)
pt3dadd(215, -476.5, -175.5, 2.6)
pt3dadd(216, -487.5, -185.5, 2.6)
}
}
proc shape3d_16() {
dend[72] { pt3dadd(216, -490.5, -186.5, 2.2)
pt3dadd(218, -493.5, -187, 2.2)
pt3dadd(221, -498, -192, 2.5)
pt3dadd(223, -500.5, -193, 2.5)
pt3dadd(222, -503, -193.5, 2.3)
pt3dadd(222, -506.5, -194, 1.9)
pt3dadd(222.5, -509, -195, 1.9)
pt3dadd(227, -512, -196, 1.9)
pt3dadd(228, -514, -196.5, 1.9)
pt3dadd(229, -516, -201, 1.8)
pt3dadd(226, -518.5, -201.5, 1.9)
pt3dadd(226, -521.5, -202.5, 2)
pt3dadd(226, -527, -203.5, 2)
pt3dadd(226.5, -529.5, -204, 1.7)
pt3dadd(228, -531, -212.5, 2)
pt3dadd(232.5, -533.5, -214, 2)
pt3dadd(234.5, -535, -214.5, 2)
pt3dadd(237.5, -539, -220, 1.8)
pt3dadd(238, -543, -229, 2.1)
pt3dadd(239, -545, -223.5, 2.1)
pt3dadd(241, -551, -225, 1.8)
pt3dadd(241, -559.5, -230, 1.9)
pt3dadd(241, -562.5, -231, 2.4)
pt3dadd(243, -565.5, -240, 1.5)
pt3dadd(247.5, -571.5, -242.5, 1.9)
pt3dadd(249, -576, -244, 1.1)
pt3dadd(249.5, -580, -245, 1.1)
pt3dadd(253, -580, -249, 1.5)
pt3dadd(257.5, -581.5, -253, 1.2)
pt3dadd(257.5, -585.5, -257, 1.5)
pt3dadd(257, -589.5, -259, 1.5)
pt3dadd(257.5, -592, -259.5, 1.4)
pt3dadd(261, -594.5, -261, 1.1)
pt3dadd(262.5, -596, -262, 1.1)
pt3dadd(264, -597.5, -262.5, 1.3)
pt3dadd(265.5, -603.5, -265, 1.3)
pt3dadd(268.5, -604, -268, 1.3)
pt3dadd(269, -606.5, -272, 1.3)
pt3dadd(270.5, -610, -273, 1.3)
pt3dadd(270.5, -613, -274, 1.3)
pt3dadd(271, -616, -272.5, 1.5)
pt3dadd(274, -617.5, -273.5, 1.5)
pt3dadd(275, -621, -275, 1.5)
pt3dadd(276.5, -623.5, -284.5, 1.9)
pt3dadd(279.5, -627, -290.5, 1.3)
pt3dadd(279.5, -630.5, -291, 1)
pt3dadd(281.5, -637, -293.5, 1.3)
pt3dadd(283, -639.5, -294, 2)
pt3dadd(286.5, -641, -295, 1.1)
pt3dadd(287.5, -643, -295.5, 1.7)
pt3dadd(291, -647, -307, 1.4)
pt3dadd(293.5, -647.5, -307.5, 1.4)
pt3dadd(291, -652, -309, 1.4)
pt3dadd(289.5, -654, -315, 1.7)
pt3dadd(289.5, -658.5, -315.5, 1.3)
pt3dadd(288.5, -661, -316, 2)
pt3dadd(287.5, -663.5, -317, 2.9)
pt3dadd(283.5, -665, -327, 1.9)
pt3dadd(284.5, -668.5, -324, 2.2)
pt3dadd(284, -671, -325, 2.2)
pt3dadd(285, -675, -329, 1.2)
pt3dadd(288.5, -678, -333.5, 1.4)
pt3dadd(290.5, -679.5, -337.5, 1.5)
pt3dadd(289, -681.5, -338, 1.4)
pt3dadd(288.5, -685, -338.5, 1.6)
pt3dadd(291, -687, -339, 1.6)
pt3dadd(292.5, -688.5, -339.5, 1.6)
pt3dadd(292, -692, -340, 1.4)
pt3dadd(296.5, -693.5, -344.5, 1.6)
pt3dadd(299, -695, -345, 1.6)
pt3dadd(299, -698, -353, 1.4)
pt3dadd(299.5, -700.5, -361, 2.2)
pt3dadd(302, -703, -361.5, 1.6)
pt3dadd(303.5, -707, -362.5, 1.6)
pt3dadd(305.5, -711.5, -363.5, 1.6)
pt3dadd(307.5, -717, -364.5, 1.6)
pt3dadd(305, -721, -365.5, 1.6)
pt3dadd(304.5, -725, -369, 1.5)
pt3dadd(307.5, -729.5, -374, 1.8)
pt3dadd(309, -732, -374.5, 1.8)
pt3dadd(309, -737, -379, 1.4)
pt3dadd(312, -737, -373.5, 1.4)
pt3dadd(312, -741, -375, 1.4)
}
dend[73] {pt3dclear()
pt3dadd(165, -294, -88.5, 5.2)
pt3dadd(169, -295, -81, 1.3)
pt3dadd(171.5, -296, -83, 1.6)
pt3dadd(175, -296, -81.5, 1.4)
pt3dadd(181, -299, -78, 1.1)
pt3dadd(183, -300, -75, 1.3)
pt3dadd(187, -303, -71.5, 1.3)
pt3dadd(194, -305.5, -74, 1)
pt3dadd(197.5, -305, -73.5, 1)
pt3dadd(205, -306.5, -70, 0.8)
pt3dadd(207.5, -308, -70, 1.1)
pt3dadd(213, -311.5, -66, 1.1)
pt3dadd(219.5, -312.5, -68.5, 1)
pt3dadd(222, -313.5, -68.5, 1)
pt3dadd(224.5, -315, -68.5, 1)
pt3dadd(227, -319, -65, 1)
pt3dadd(228.5, -323, -67.5, 0.7)
pt3dadd(231.5, -322, -67.5, 1)
pt3dadd(238, -322, -66.5, 0.9)
pt3dadd(243.5, -322.5, -66, 0.8)
pt3dadd(245.5, -324.5, -63, 0.8)
pt3dadd(247, -326, -59.5, 0.6)
pt3dadd(251.5, -327, -59.5, 0.5)
pt3dadd(254.5, -329.5, -59, 0.5)
pt3dadd(257.5, -329.5, -59, 0.5)
pt3dadd(261.5, -328.5, -55.5, 0.6)
pt3dadd(266.5, -328, -55, 0.6)
pt3dadd(273.5, -327.5, -55, 0.6)
pt3dadd(278, -329, -52, 0.5)
pt3dadd(283, -332.5, -57, 0.5)
pt3dadd(284.5, -336, -56.5, 0.5)
pt3dadd(285, -339.5, -56.5, 0.5)
pt3dadd(287.5, -343, -56, 0.5)
pt3dadd(289, -344.5, -56, 0.7)
pt3dadd(291, -348, -61.5, 0.7)
pt3dadd(295, -350, -61.5, 0.7)
pt3dadd(295, -353, -61, 0.7)
}
dend[74] {pt3dclear()
pt3dadd(105.5, -243.5, -57.5, 6.1)
pt3dadd(103.5, -246.5, -57.5, 1.6)
pt3dadd(102.5, -249.5, -57.5, 1.5)
pt3dadd(106, -257.5, -60.5, 1.2)
pt3dadd(104.5, -261, -60.5, 1.3)
pt3dadd(99, -264.5, -60.5, 0.8)
pt3dadd(105, -273, -63.5, 1.2)
pt3dadd(108.5, -279.5, -63.5, 1.2)
pt3dadd(111, -281.5, -63.5, 0.9)
pt3dadd(112.5, -287, -63.5, 0.9)
pt3dadd(110.5, -293, -63.5, 1.1)
pt3dadd(110, -296.5, -60.5, 1)
pt3dadd(109, -303.5, -57.5, 1)
pt3dadd(106.5, -306.5, -54.5, 1)
pt3dadd(105, -308, -54.5, 0.6)
pt3dadd(101, -310.5, -54.5, 0.6)
pt3dadd(96.5, -315, -54.5, 0.8)
pt3dadd(94, -317, -54.5, 0.9)
pt3dadd(91.5, -321.5, -54.5, 0.5)
pt3dadd(89.5, -325, -54.5, 0.5)
pt3dadd(94, -333, -54.5, 0.7)
pt3dadd(92.5, -336, -54.5, 0.7)
pt3dadd(92, -339, -54.5, 0.7)
pt3dadd(93, -342, -54.5, 0.7)
pt3dadd(91.5, -344.5, -51.5, 0.6)
pt3dadd(91, -348.5, -57.5, 0.9)
}
dend[75] {pt3dclear()
pt3dadd(91, -348.5, -57.5, 0.9)
pt3dadd(94, -351.5, -51.5, 0.1)
pt3dadd(96.5, -355.5, -49, 0.1)
pt3dadd(95.5, -359.5, -45.5, 0.1)
pt3dadd(93.5, -364.5, -45.5, 0.1)
pt3dadd(93.5, -368, -45.5, 0.1)
pt3dadd(91.5, -373, -45.5, 0.1)
pt3dadd(87.5, -381, -45.5, 0.1)
pt3dadd(84.5, -383.5, -51, 0.1)
pt3dadd(81.5, -385, -51, 0.1)
pt3dadd(82, -388.5, -51, 0.1)
pt3dadd(80, -395, -51, 0.1)
}
dend[76] {pt3dclear()
pt3dadd(91, -348.5, -57.5, 0.9)
pt3dadd(89, -352, -54.5, 0.1)
pt3dadd(87, -357, -51, 0.1)
pt3dadd(87.5, -361, -51, 0.1)
pt3dadd(88, -367, -51, 0.1)
pt3dadd(86.5, -371, -51, 0.1)
pt3dadd(83, -374, -54, 0.1)
pt3dadd(80, -377, -54, 0.1)
pt3dadd(75.5, -378, -54, 0.1)
pt3dadd(73, -380.5, -54, 0.1)
pt3dadd(71, -381.5, -54, 0.1)
}
dend[77] {pt3dclear()
pt3dadd(84.5, -207, -49, 9.1)
pt3dadd(88.5, -208, -50, 4.8)
pt3dadd(95.5, -207, -61.5, 4.3)
pt3dadd(103, -207, -63.5, 5.8)
pt3dadd(107, -208, -71.5, 6.1)
pt3dadd(110.5, -207.5, -72.5, 5.8)
pt3dadd(114, -206.5, -71, 5.4)
pt3dadd(121, -199, -76, 5.3)
pt3dadd(123.5, -197, -81, 3.8)
pt3dadd(128, -195.5, -79.5, 5)
pt3dadd(131.5, -195.5, -79.5, 5)
pt3dadd(138, -195.5, -85.5, 5.1)
pt3dadd(141.5, -195.5, -90.5, 5.6)
pt3dadd(150.5, -195.5, -90, 5.6)
pt3dadd(150, -198, -98.5, 5.3)
pt3dadd(149, -202, -99, 5.4)
pt3dadd(146.5, -204.5, -104.5, 3.9)
pt3dadd(145, -207, -102.5, 3.8)
pt3dadd(147, -210.5, -103, 3.7)
pt3dadd(151, -208.5, -108.5, 5)
pt3dadd(154, -207, -108.5, 4.6)
pt3dadd(158.5, -207.5, -109.5, 4)
pt3dadd(161, -208.5, -109.5, 4.3)
pt3dadd(163.5, -209.5, -110, 5)
}
dend[78] {pt3dclear()
pt3dadd(163.5, -209.5, -110, 5)
pt3dadd(163.5, -213, -106.5, 1.3)
pt3dadd(160.5, -214.5, -106.5, 0.9)
pt3dadd(157, -214.5, -107, 0.9)
pt3dadd(154, -212.5, -105.5, 0.8)
pt3dadd(152, -210.5, -106, 0.9)
pt3dadd(150.5, -206.5, -106.5, 0.9)
}
}
proc shape3d_17() {
dend[78] { pt3dadd(149, -204.5, -107, 0.9)
pt3dadd(154, -203.5, -112.5, 0.7)
pt3dadd(157, -202.5, -110.5, 0.9)
pt3dadd(164.5, -202.5, -114, 1.3)
pt3dadd(173, -203.5, -113, 1.9)
pt3dadd(176.5, -205, -113.5, 1.9)
pt3dadd(180, -205, -114, 1.4)
pt3dadd(182, -208.5, -114.5, 1.7)
pt3dadd(185, -211, -120, 1.8)
pt3dadd(189, -215, -120.5, 1.6)
pt3dadd(195, -216.5, -121.5, 1.6)
pt3dadd(197, -222.5, -122.5, 1.5)
pt3dadd(199.5, -223.5, -122.5, 1.5)
pt3dadd(198.5, -230.5, -123.5, 1.3)
pt3dadd(201, -232, -124, 1.3)
pt3dadd(203.5, -233.5, -124.5, 1.3)
pt3dadd(205.5, -235.5, -125, 1.4)
pt3dadd(206.5, -238.5, -129, 1.8)
pt3dadd(207.5, -241, -127, 1.9)
pt3dadd(210.5, -245, -128.5, 1.4)
pt3dadd(212, -246.5, -129.5, 1.4)
pt3dadd(211, -248.5, -138, 1.5)
pt3dadd(212.5, -252, -139, 1.2)
pt3dadd(215.5, -254, -140, 1.3)
pt3dadd(216, -259, -141.5, 1.1)
pt3dadd(217, -263, -142.5, 1.2)
pt3dadd(217.5, -266, -143.5, 1.3)
pt3dadd(217.5, -270, -145, 1.1)
pt3dadd(220, -272, -146, 1)
pt3dadd(221, -274.5, -146.5, 1.2)
pt3dadd(222.5, -278.5, -152, 1.1)
pt3dadd(223.5, -280.5, -152.5, 1.5)
pt3dadd(221.5, -283, -153.5, 1.2)
pt3dadd(221, -285.5, -157.5, 1)
pt3dadd(223, -290.5, -159.5, 1)
pt3dadd(225, -293, -160.5, 1)
pt3dadd(229, -295, -161.5, 1.3)
pt3dadd(230.5, -296.5, -162.5, 1.1)
pt3dadd(230, -299.5, -163, 1)
pt3dadd(232, -301, -168.5, 1.2)
pt3dadd(234, -304, -173.5, 1)
pt3dadd(234.5, -308, -171.5, 0.9)
pt3dadd(233.5, -310, -172, 0.8)
pt3dadd(234.5, -313.5, -173, 1.2)
pt3dadd(235.5, -315.5, -174, 1.2)
pt3dadd(235.5, -318.5, -175, 1.6)
pt3dadd(237, -321.5, -175.5, 1.2)
pt3dadd(236.5, -326.5, -176.5, 0.5)
pt3dadd(237.5, -329.5, -177, 0.6)
pt3dadd(239, -331, -177.5, 0.8)
pt3dadd(241, -333.5, -178, 0.8)
pt3dadd(240.5, -336, -178.5, 0.8)
pt3dadd(240.5, -339, -179, 0.8)
pt3dadd(243.5, -342, -183.5, 0.8)
pt3dadd(244, -348.5, -184.5, 0.8)
pt3dadd(247.5, -349, -185, 0.8)
pt3dadd(251.5, -351.5, -185.5, 0.9)
pt3dadd(252, -354, -190, 0.9)
pt3dadd(255, -355.5, -190.5, 0.9)
pt3dadd(256.5, -358.5, -191, 0.9)
pt3dadd(260.5, -359.5, -191.5, 0.9)
pt3dadd(263.5, -363, -196, 1)
pt3dadd(264.5, -366, -190, 0.8)
pt3dadd(267.5, -366, -190.5, 0.8)
pt3dadd(270, -368, -191, 0.9)
pt3dadd(274, -370, -192, 0.9)
pt3dadd(276.5, -373, -192.5, 1.1)
pt3dadd(279, -375, -193, 1.1)
pt3dadd(281, -376.5, -201, 1.2)
pt3dadd(286.5, -378.5, -200.5, 0.6)
pt3dadd(286.5, -381.5, -201, 0.6)
pt3dadd(288.5, -384, -201.5, 0.8)
pt3dadd(291.5, -386, -202, 0.8)
pt3dadd(293, -387.5, -202.5, 0.8)
pt3dadd(295, -391.5, -215.5, 0.8)
pt3dadd(298.5, -393, -216.5, 0.8)
pt3dadd(297.5, -396.5, -217, 0.8)
pt3dadd(300, -397.5, -217.5, 0.8)
pt3dadd(302, -399.5, -218, 0.8)
pt3dadd(304.5, -401.5, -222, 0.8)
pt3dadd(308, -401.5, -222.5, 0.8)
pt3dadd(309.5, -405, -223.5, 0.8)
pt3dadd(312, -406.5, -224, 0.8)
pt3dadd(318, -406, -225, 0.5)
}
dend[79] {pt3dclear()
pt3dadd(163.5, -209.5, -110, 5)
pt3dadd(167.5, -210.5, -112.5, 5)
pt3dadd(169.5, -212.5, -117.5, 5)
pt3dadd(170, -216.5, -125, 5)
pt3dadd(173, -219.5, -130, 4)
pt3dadd(178, -221, -132, 3.7)
pt3dadd(178, -225, -133.5, 3.5)
pt3dadd(179.5, -226.5, -134, 3.2)
pt3dadd(185.5, -228, -144, 4.1)
pt3dadd(186.5, -226, -145, 4.6)
pt3dadd(190, -226, -154, 5.1)
pt3dadd(185, -225.5, -159.5, 4.5)
pt3dadd(182, -225, -161, 4.2)
pt3dadd(180, -222, -159, 3.7)
pt3dadd(179, -219, -169.5, 4.6)
pt3dadd(184.5, -219.5, -175, 4.5)
pt3dadd(185, -215.5, -180.5, 4)
pt3dadd(181.5, -214.5, -194, 3)
pt3dadd(177, -217.5, -200.5, 3.7)
pt3dadd(174, -218.5, -202, 3.7)
pt3dadd(171.5, -221, -203.5, 3.9)
pt3dadd(170.5, -226, -206, 4.1)
pt3dadd(172, -228, -211.5, 4.4)
pt3dadd(172.5, -233, -223, 3.9)
pt3dadd(173.5, -236.5, -225, 4.1)
pt3dadd(176, -242, -231.5, 3.4)
pt3dadd(176.5, -254, -238, 4.5)
pt3dadd(179, -255, -239.5, 5.3)
}
dend[80] {pt3dclear()
pt3dadd(179, -255, -239.5, 5.3)
pt3dadd(181.5, -259, -249, 3.4)
pt3dadd(184.5, -260.5, -250, 3.4)
pt3dadd(187.5, -262.5, -256, 3.4)
pt3dadd(186.5, -260.5, -257, 3.4)
pt3dadd(185.5, -256, -258, 3.5)
pt3dadd(191.5, -257.5, -265.5, 3.7)
pt3dadd(199.5, -254, -271.5, 2.8)
pt3dadd(198.5, -247.5, -275, 3.4)
pt3dadd(199, -243.5, -276, 2.8)
pt3dadd(200.5, -239, -282, 3.4)
pt3dadd(203, -239.5, -282.5, 3.5)
pt3dadd(206, -239.5, -293.5, 3)
pt3dadd(208, -237.5, -294.5, 3.2)
pt3dadd(212, -236.5, -300, 3.7)
pt3dadd(215, -236.5, -300.5, 4)
pt3dadd(218.5, -236.5, -301.5, 4)
pt3dadd(218.5, -232.5, -303, 3.1)
pt3dadd(217.5, -229.5, -325, 3.4)
pt3dadd(217.5, -224.5, -326, 3.3)
pt3dadd(218.5, -222, -330.5, 3.3)
pt3dadd(219.5, -219.5, -328, 3.3)
pt3dadd(222.5, -217, -336.5, 3.3)
pt3dadd(225.5, -214, -337.5, 3.3)
pt3dadd(228, -213, -338, 3.3)
pt3dadd(230.5, -213.5, -351, 2.3)
pt3dadd(233.5, -219, -356.5, 3.2)
}
dend[81] {pt3dclear()
pt3dadd(233.5, -219, -356.5, 3.2)
pt3dadd(236, -221, -357.5, 3.7)
pt3dadd(235.5, -217.5, -359, 2.5)
pt3dadd(233.5, -214, -360.5, 2.5)
pt3dadd(232, -210, -366.5, 2.5)
pt3dadd(233.5, -205, -368.5, 2.8)
pt3dadd(235.5, -203, -366.5, 2.3)
pt3dadd(235.5, -200, -372, 2.6)
pt3dadd(235, -195.5, -373.5, 3.1)
pt3dadd(235, -192.5, -375, 3.1)
pt3dadd(234, -190.5, -385.5, 2.1)
pt3dadd(231.5, -185.5, -400.5, 1.9)
pt3dadd(228.5, -183, -402, 2.1)
pt3dadd(230.5, -181, -402.5, 2)
pt3dadd(235, -183, -408.5, 1.7)
pt3dadd(233.5, -185.5, -409.5, 2)
pt3dadd(232, -187.5, -415.5, 2.2)
pt3dadd(230, -189, -416, 2.4)
pt3dadd(229.5, -185, -425, 2.2)
pt3dadd(229.5, -182, -440.5, 3.1)
pt3dadd(232, -178, -441.5, 3.2)
pt3dadd(228.5, -179.5, -445.5, 2.7)
pt3dadd(227, -183, -446, 2.5)
pt3dadd(224.5, -186, -446.5, 2.4)
pt3dadd(222.5, -188, -447, 2.2)
pt3dadd(219, -188.5, -447.5, 2.2)
pt3dadd(216, -189.5, -448, 2.3)
pt3dadd(214.5, -191.5, -448, 2.3)
pt3dadd(211.5, -193.5, -448.5, 2.3)
pt3dadd(206, -193.5, -457.5, 2.7)
pt3dadd(205.5, -197.5, -458, 2.2)
pt3dadd(202.5, -196, -470.5, 1.1)
pt3dadd(200.5, -198, -467.5, 2.3)
pt3dadd(200, -201.5, -468.5, 1.4)
pt3dadd(200, -205.5, -469, 1.4)
pt3dadd(196.5, -206, -473.5, 2.3)
pt3dadd(193, -204.5, -470.5, 1.6)
pt3dadd(188.5, -208.5, -476, 2.2)
pt3dadd(187, -210, -477, 1.7)
pt3dadd(182, -211.5, -478.5, 1.4)
pt3dadd(178, -213, -495.5, 1.7)
pt3dadd(175, -215, -496.5, 1.7)
pt3dadd(170.5, -215, -498, 1.7)
pt3dadd(168, -217.5, -499, 1.6)
pt3dadd(166, -220, -500, 1.7)
pt3dadd(165, -222.5, -501, 1.8)
pt3dadd(164, -225.5, -517.5, 1.9)
pt3dadd(162.5, -228, -518.5, 2)
pt3dadd(160.5, -225, -525, 1.6)
pt3dadd(157, -223, -528.5, 1.9)
pt3dadd(154, -221, -536.5, 2.2)
pt3dadd(155.5, -224, -537, 1.8)
pt3dadd(154.5, -226, -544, 1.1)
pt3dadd(151, -227.5, -548, 1.1)
pt3dadd(149.5, -225.5, -546, 1.6)
pt3dadd(149.5, -221.5, -554, 1.2)
pt3dadd(147.5, -217.5, -555, 1.1)
pt3dadd(145.5, -215.5, -555.5, 1.4)
pt3dadd(146, -218.5, -562.5, 1.5)
pt3dadd(145, -222.5, -564, 2)
pt3dadd(146.5, -216.5, -562, 1.6)
}
}
proc shape3d_18() {
dend[81] { pt3dadd(146.5, -213.5, -560, 1.5)
pt3dadd(144, -212, -574.5, 2)
pt3dadd(141.5, -213, -572, 1.6)
pt3dadd(138.5, -211.5, -579.5, 1.1)
pt3dadd(141.5, -208, -575, 1.3)
}
dend[82] {pt3dclear()
pt3dadd(233.5, -219, -356.5, 3.2)
pt3dadd(231.5, -216, -363, 2.2)
pt3dadd(228.5, -214.5, -365, 2)
pt3dadd(226.5, -216.5, -366.5, 2)
pt3dadd(223, -216.5, -368.5, 1.8)
pt3dadd(219.5, -215.5, -368.5, 1.8)
pt3dadd(217, -218.5, -375, 1.5)
pt3dadd(213, -216.5, -382, 2)
pt3dadd(209, -216.5, -388, 2.3)
pt3dadd(211.5, -218.5, -403, 2.3)
pt3dadd(215.5, -215, -410, 2.5)
pt3dadd(217, -210.5, -415, 2.3)
pt3dadd(221, -211, -425, 2.3)
pt3dadd(224.5, -210, -432.5, 1.8)
pt3dadd(227, -206.5, -440, 1.5)
pt3dadd(230, -204, -440.5, 1.2)
pt3dadd(233.5, -205.5, -448.5, 1.2)
pt3dadd(236, -206.5, -448.5, 1.7)
pt3dadd(239, -206.5, -449, 1.8)
pt3dadd(241.5, -205, -453, 1.3)
pt3dadd(240, -203, -453, 1.5)
pt3dadd(239, -200.5, -453.5, 1.5)
pt3dadd(242, -203.5, -453.5, 1.3)
pt3dadd(245, -201.5, -454.5, 1.3)
pt3dadd(248.5, -205.5, -455, 1.3)
pt3dadd(251.5, -205.5, -459, 1.5)
pt3dadd(255, -205.5, -459, 1.5)
pt3dadd(255.5, -208, -463, 1.4)
pt3dadd(258.5, -209.5, -467, 1.4)
pt3dadd(260.5, -207.5, -471, 1.6)
pt3dadd(261.5, -205, -475, 1.8)
pt3dadd(263.5, -204, -490, 2)
pt3dadd(267.5, -207.5, -498, 1.2)
pt3dadd(265.5, -210.5, -498.5, 1.2)
pt3dadd(263, -211, -499.5, 1.2)
pt3dadd(263.5, -214, -512, 1.5)
pt3dadd(262, -216.5, -517.5, 1.3)
pt3dadd(262.5, -220, -518.5, 1.3)
pt3dadd(261.5, -222.5, -519, 1.4)
pt3dadd(260.5, -225, -519.5, 1.4)
pt3dadd(258.5, -226.5, -516.5, 1.2)
pt3dadd(257.5, -229.5, -522, 0.9)
pt3dadd(259.5, -232, -519, 0.8)
pt3dadd(258.5, -237, -528, 1.6)
pt3dadd(258.5, -241, -534.5, 1.6)
pt3dadd(259.5, -248, -528.5, 1.5)
pt3dadd(261.5, -249.5, -528.5, 1.5)
pt3dadd(264.5, -249.5, -528.5, 0.9)
pt3dadd(265.5, -252, -535.5, 1.4)
pt3dadd(265.5, -255.5, -535.5, 1.4)
pt3dadd(265, -258, -535.5, 1.4)
pt3dadd(266.5, -262, -539, 1.2)
pt3dadd(268, -265, -539, 1.1)
pt3dadd(269.5, -267.5, -539, 1.2)
pt3dadd(272.5, -266, -542.5, 1.1)
pt3dadd(275, -267, -546, 1.1)
pt3dadd(276.5, -270.5, -546, 1.1)
pt3dadd(277.5, -273, -546, 0.9)
pt3dadd(279, -274.5, -546.5, 0.7)
pt3dadd(281, -277.5, -543, 1.2)
pt3dadd(283.5, -280, -543, 1.2)
pt3dadd(286.5, -283, -543.5, 0.9)
pt3dadd(289.5, -283, -543.5, 0.9)
pt3dadd(292.5, -283, -543.5, 0.9)
pt3dadd(298, -285, -540.5, 0.8)
pt3dadd(297.5, -288, -544, 0.7)
pt3dadd(300, -289.5, -544.5, 0.8)
pt3dadd(302, -290.5, -548, 0.9)
pt3dadd(299, -291, -548, 1.1)
pt3dadd(297.5, -294, -554.5, 1.3)
pt3dadd(298.5, -300, -557.5, 1.2)
}
dend[83] {pt3dclear()
pt3dadd(179, -255, -239.5, 5.3)
pt3dadd(177.5, -258.5, -248.5, 1.5)
pt3dadd(179, -261.5, -249, 1.1)
pt3dadd(183.5, -265.5, -248, 1.3)
pt3dadd(187, -265.5, -249, 1.3)
pt3dadd(191, -265.5, -250, 1.3)
pt3dadd(196.5, -265.5, -251, 1.1)
pt3dadd(200.5, -268, -252, 1.7)
pt3dadd(200.5, -271, -253, 1.9)
pt3dadd(197.5, -273.5, -253.5, 1.4)
pt3dadd(195, -275, -254.5, 1.3)
pt3dadd(196, -277, -260, 1.6)
pt3dadd(199, -277, -260.5, 1.6)
pt3dadd(205, -277.5, -267, 1.6)
pt3dadd(206.5, -281.5, -268, 1.9)
pt3dadd(205.5, -286, -269, 1.6)
pt3dadd(204.5, -288, -272.5, 1.9)
pt3dadd(206, -291, -273, 1.6)
pt3dadd(208, -292, -273.5, 1.6)
pt3dadd(211, -293.5, -274.5, 1.6)
pt3dadd(217, -302.5, -288.5, 2)
pt3dadd(222, -305.5, -295, 1.9)
pt3dadd(223.5, -309.5, -299, 1.9)
pt3dadd(229.5, -309.5, -309, 2.6)
pt3dadd(228.5, -312, -312.5, 1.9)
pt3dadd(226.5, -314, -314.5, 2.1)
pt3dadd(221.5, -317, -325, 3.2)
pt3dadd(225.5, -317, -325.5, 2.3)
pt3dadd(228.5, -318, -333.5, 2.3)
pt3dadd(226.5, -320.5, -341.5, 2.4)
pt3dadd(224.5, -323, -342.5, 2.4)
pt3dadd(227, -325.5, -347.5, 1.9)
pt3dadd(230, -325, -352, 1.5)
pt3dadd(232.5, -327, -368, 1)
pt3dadd(234, -331, -360.5, 1.5)
pt3dadd(233, -334, -361.5, 1.5)
pt3dadd(236, -335, -362, 0.9)
pt3dadd(238.5, -336.5, -362.5, 0.9)
pt3dadd(238, -340.5, -363.5, 0.9)
pt3dadd(237, -342.5, -368, 1.3)
pt3dadd(237, -345.5, -368.5, 1.4)
pt3dadd(238.5, -350.5, -373.5, 1.7)
pt3dadd(242, -353.5, -375, 1.2)
pt3dadd(240.5, -355.5, -372, 1.7)
pt3dadd(242.5, -362, -379, 1.7)
pt3dadd(245, -365, -381.5, 1.4)
pt3dadd(249, -366, -387.5, 1.4)
pt3dadd(251.5, -367.5, -388, 1.9)
pt3dadd(251.5, -372, -389.5, 1.7)
pt3dadd(250, -374, -404, 1.7)
pt3dadd(253.5, -378.5, -406, 1.4)
pt3dadd(255, -381.5, -407, 1)
pt3dadd(252.5, -386, -408.5, 1)
pt3dadd(255.5, -387.5, -413.5, 1.1)
pt3dadd(259.5, -389.5, -412, 1.3)
pt3dadd(259, -392.5, -416.5, 1.1)
pt3dadd(258, -397.5, -422.5, 1.5)
pt3dadd(257, -399.5, -420, 1.3)
pt3dadd(258, -404, -421, 1.2)
pt3dadd(260.5, -409, -427.5, 1.2)
pt3dadd(262, -411.5, -425, 1.2)
pt3dadd(263, -413.5, -445, 1.8)
pt3dadd(261, -417, -442, 2.2)
pt3dadd(259, -419, -442.5, 2.3)
pt3dadd(259.5, -424, -443, 1.2)
pt3dadd(259.5, -427, -443.5, 1.3)
pt3dadd(260, -430.5, -444, 1.3)
pt3dadd(262.5, -431, -444.5, 1.3)
pt3dadd(263, -434.5, -449, 1.2)
pt3dadd(261.5, -436.5, -449, 1)
pt3dadd(262, -439, -446, 1.3)
pt3dadd(262, -442, -450.5, 1.3)
pt3dadd(262.5, -444.5, -455, 1.2)
pt3dadd(264, -448, -455.5, 1.1)
pt3dadd(267, -449, -456, 0.7)
pt3dadd(269, -451.5, -456.5, 0.9)
pt3dadd(267.5, -457, -457.5, 0.9)
pt3dadd(268, -460.5, -461.5, 0.7)
pt3dadd(267, -462.5, -462, 0.8)
pt3dadd(264, -463, -462.5, 1.1)
pt3dadd(263.5, -465.5, -463, 1.2)
pt3dadd(264.5, -470, -467, 1.2)
pt3dadd(266, -472, -467.5, 1.4)
pt3dadd(267.5, -474.5, -471.5, 1.2)
pt3dadd(269, -477, -472.5, 0.9)
pt3dadd(271, -478.5, -476.5, 0.9)
pt3dadd(268.5, -479.5, -480.5, 0.7)
pt3dadd(266.5, -481, -475, 0.7)
pt3dadd(266, -487, -489.5, 1.1)
pt3dadd(262.5, -488.5, -490, 1.4)
pt3dadd(264.5, -491.5, -490.5, 1.4)
pt3dadd(264, -495, -495.5, 1.6)
pt3dadd(263.5, -497.5, -505.5, 1.5)
pt3dadd(265, -501.5, -511, 0.8)
pt3dadd(264, -506.5, -512, 0.8)
pt3dadd(266.5, -507.5, -521.5, 0.8)
pt3dadd(264, -511.5, -520, 0.8)
pt3dadd(264, -516, -525, 1)
pt3dadd(263, -521.5, -532.5, 1.8)
pt3dadd(262, -524.5, -533, 1.8)
pt3dadd(260.5, -526.5, -533.5, 1.8)
pt3dadd(260, -529, -537, 1.8)
pt3dadd(258, -532, -537.5, 1.6)
pt3dadd(254.5, -532, -538, 1.6)
pt3dadd(258, -534, -542, 1.2)
pt3dadd(260, -535, -542, 1.1)
pt3dadd(258.5, -536.5, -542.5, 0.9)
pt3dadd(255.5, -539, -543, 0.8)
pt3dadd(254.5, -543, -547, 0.6)
pt3dadd(252.5, -545, -547.5, 0.6)
pt3dadd(247.5, -547, -552, 0.9)
pt3dadd(247.5, -550, -549.5, 0.7)
pt3dadd(244, -553, -550, 0.6)
pt3dadd(245, -555, -550.5, 0.6)
pt3dadd(247, -556, -558, 0.8)
pt3dadd(248.5, -557.5, -558, 0.8)
pt3dadd(244.5, -558.5, -559, 0.6)
pt3dadd(245, -561.5, -559.5, 0.7)
pt3dadd(242.5, -564, -560, 0.7)
pt3dadd(240.5, -568, -560.5, 0.7)
pt3dadd(241, -570.5, -561, 0.5)
pt3dadd(243, -572.5, -568, 0.5)
pt3dadd(245.5, -576, -563, 0.5)
pt3dadd(247, -577.5, -566.5, 0.6)
}
}
proc shape3d_19() {
dend[83] { pt3dadd(246, -580.5, -567, 0.6)
pt3dadd(248.5, -584, -571, 0.9)
pt3dadd(249, -588, -571.5, 0.8)
pt3dadd(248, -590.5, -572, 1)
pt3dadd(247.5, -595.5, -576.5, 0.6)
pt3dadd(246, -597.5, -577, 0.8)
pt3dadd(244, -599, -574, 1)
pt3dadd(242.5, -600.5, -574.5, 0.7)
pt3dadd(241.5, -603.5, -575, 0.7)
}
dend[84] {pt3dclear()
pt3dadd(46.5, -167.5, -45, 15)
pt3dadd(44.5, -176, -45, 5.8)
pt3dadd(43.5, -181.5, -45.5, 5.1)
pt3dadd(44, -184.5, -48.5, 5.7)
pt3dadd(42, -190.5, -51, 5.5)
pt3dadd(39.5, -192.5, -57.5, 5.9)
pt3dadd(37, -200.5, -57.5, 6.4)
pt3dadd(34, -208, -58, 7.2)
}
dend[85] {pt3dclear()
pt3dadd(34, -208, -58, 7.2)
pt3dadd(27, -209.5, -64.5, 2.8)
pt3dadd(25, -211, -66, 2.8)
pt3dadd(22, -213.5, -67.5, 3.2)
pt3dadd(19, -215, -72.5, 3.2)
pt3dadd(15, -217, -75, 3.2)
pt3dadd(11.5, -220.5, -84, 3.2)
}
dend[86] {pt3dclear()
pt3dadd(11.5, -220.5, -84, 3.2)
pt3dadd(8.5, -223.5, -86.5, 2.9)
pt3dadd(6.5, -228, -89, 2)
pt3dadd(1.5, -233.5, -84.5, 2.4)
pt3dadd(0, -237, -89.5, 2.6)
pt3dadd(0, -242.5, -92, 2.3)
pt3dadd(-2.5, -244.5, -90, 2.2)
pt3dadd(-4, -249.5, -88, 2)
pt3dadd(-5, -251.5, -88, 2.6)
pt3dadd(-7, -255, -88.5, 3)
pt3dadd(-7, -259, -93, 2.3)
pt3dadd(-7, -262, -93, 2)
pt3dadd(-8, -265.5, -98, 1.6)
pt3dadd(-9.5, -268.5, -98, 1.9)
pt3dadd(-12.5, -270.5, -94, 1.9)
pt3dadd(-14, -274, -91.5, 1.9)
pt3dadd(-16.5, -278, -99, 1.7)
pt3dadd(-18, -280, -99, 1.2)
pt3dadd(-18, -283.5, -99, 1.2)
pt3dadd(-18, -287, -99.5, 1.2)
pt3dadd(-18.5, -291.5, -99.5, 1.9)
pt3dadd(-18, -295.5, -95, 2)
pt3dadd(-20.5, -299.5, -95.5, 1.5)
pt3dadd(-22, -301, -93, 1.9)
pt3dadd(-22.5, -304.5, -93, 2)
pt3dadd(-23, -308, -96, 2.3)
pt3dadd(-25, -312, -98, 1.9)
pt3dadd(-26.5, -314.5, -100.5, 1.8)
pt3dadd(-28, -317.5, -101, 1.9)
pt3dadd(-27.5, -320.5, -101, 2)
pt3dadd(-28, -323.5, -101, 2)
pt3dadd(-30.5, -325.5, -101, 1.7)
pt3dadd(-32.5, -327, -101.5, 1.7)
pt3dadd(-34.5, -331.5, -101.5, 1.8)
pt3dadd(-35, -334.5, -103.5, 2.8)
pt3dadd(-36, -337.5, -113.5, 2.3)
pt3dadd(-36.5, -341.5, -107, 2)
pt3dadd(-36.5, -344.5, -107, 1.8)
pt3dadd(-36, -347.5, -109.5, 1.7)
pt3dadd(-36.5, -352, -112, 1.3)
pt3dadd(-38, -354.5, -112, 1.5)
pt3dadd(-41, -357.5, -112, 1.5)
pt3dadd(-42.5, -363, -110.5, 1.5)
pt3dadd(-43, -366, -110.5, 1.6)
pt3dadd(-45, -368.5, -110.5, 2.2)
pt3dadd(-46, -371, -110.5, 2.3)
pt3dadd(-47, -375, -113, 2)
pt3dadd(-46.5, -378, -113, 1.7)
pt3dadd(-48.5, -383.5, -118, 1.5)
pt3dadd(-50, -385.5, -118, 1.7)
pt3dadd(-51.5, -387.5, -118, 1.7)
pt3dadd(-57, -394.5, -114, 1.5)
pt3dadd(-58, -399.5, -114, 1.5)
pt3dadd(-56.5, -401.5, -114, 1.5)
pt3dadd(-58.5, -406, -114.5, 1.4)
pt3dadd(-62, -409, -114.5, 1.5)
pt3dadd(-62.5, -412, -114.5, 2)
pt3dadd(-63, -419, -113, 1.6)
pt3dadd(-65.5, -423, -113, 1.6)
pt3dadd(-69, -426, -115.5, 1.6)
pt3dadd(-72, -427.5, -113.5, 1.8)
pt3dadd(-76, -433.5, -120.5, 1.5)
pt3dadd(-77.5, -436, -120.5, 1)
pt3dadd(-81, -442.5, -116.5, 1.4)
pt3dadd(-81.5, -451.5, -117, 2.5)
pt3dadd(-83.5, -454.5, -124, 2.2)
pt3dadd(-85.5, -457.5, -122, 2.2)
pt3dadd(-86.5, -461, -120, 2.2)
pt3dadd(-89, -466, -125, 1.7)
pt3dadd(-92.5, -468, -128, 1.6)
pt3dadd(-93, -473.5, -132, 1.6)
pt3dadd(-94.5, -475.5, -129, 1.5)
pt3dadd(-97, -478.5, -129, 1.4)
pt3dadd(-98.5, -481, -129.5, 1.5)
pt3dadd(-98.5, -484, -133.5, 1.9)
pt3dadd(-101.5, -490, -134, 1.4)
pt3dadd(-105, -493, -134, 1.2)
pt3dadd(-106.5, -496, -134.5, 1.2)
pt3dadd(-107, -499.5, -134.5, 1.1)
pt3dadd(-110, -502.5, -135, 1.2)
pt3dadd(-113.5, -505.5, -135.5, 1.2)
pt3dadd(-115.5, -508.5, -135.5, 1.2)
pt3dadd(-117, -511, -139.5, 1.8)
pt3dadd(-118.5, -513, -143, 2)
pt3dadd(-119.5, -515, -143, 1.9)
pt3dadd(-120.5, -517, -140.5, 1.6)
pt3dadd(-122.5, -519.5, -137, 1.3)
pt3dadd(-125, -523, -137.5, 1.3)
pt3dadd(-127.5, -525.5, -134.5, 1.1)
pt3dadd(-130.5, -525.5, -142, 1.2)
pt3dadd(-134, -526, -142, 1.3)
pt3dadd(-135.5, -528, -142.5, 1.3)
pt3dadd(-136.5, -530, -139, 1.3)
pt3dadd(-140.5, -532.5, -136, 1.3)
pt3dadd(-144, -535.5, -136.5, 1.1)
pt3dadd(-146, -536.5, -140, 1.1)
pt3dadd(-151, -538.5, -137, 1.3)
pt3dadd(-157.5, -547, -142, 1.1)
pt3dadd(-160.5, -549, -146, 1.3)
pt3dadd(-162, -553, -146, 1.1)
pt3dadd(-162.5, -556, -146.5, 1.4)
pt3dadd(-163, -558.5, -146.5, 1.1)
pt3dadd(-164, -562, -147, 1.2)
pt3dadd(-166, -564.5, -147, 1.1)
pt3dadd(-167.5, -567.5, -147.5, 1.7)
pt3dadd(-168, -570, -147.5, 2)
pt3dadd(-169.5, -575, -148, 1)
pt3dadd(-172, -575.5, -148, 1.1)
pt3dadd(-174.5, -579, -145, 1.1)
pt3dadd(-175.5, -581, -145, 1.1)
pt3dadd(-176.5, -583, -145.5, 1.3)
pt3dadd(-178, -587, -149.5, 1.2)
pt3dadd(-180, -590, -152.5, 0.8)
pt3dadd(-179, -594.5, -153, 1.5)
pt3dadd(-179, -598, -153, 0.8)
pt3dadd(-179.5, -601, -153.5, 0.7)
pt3dadd(-180.5, -603, -153.5, 1.1)
pt3dadd(-181, -605.5, -151, 1.1)
pt3dadd(-181, -610, -151.5, 2.1)
pt3dadd(-180, -612, -151.5, 1)
pt3dadd(-180.5, -616.5, -152, 1)
pt3dadd(-180, -619.5, -152, 1.1)
pt3dadd(-179, -623.5, -152.5, 1.2)
pt3dadd(-179.5, -626, -152.5, 1.2)
pt3dadd(-181.5, -629.5, -153, 1)
pt3dadd(-184.5, -633, -153, 1.1)
pt3dadd(-184.5, -636, -153.5, 1.2)
pt3dadd(-185.5, -639, -153.5, 1.3)
pt3dadd(-185.5, -646, -154, 1.1)
pt3dadd(-185, -651, -157.5, 1.1)
pt3dadd(-185, -654.5, -155, 0.8)
pt3dadd(-184, -659, -155.5, 0.7)
pt3dadd(-181.5, -660, -155.5, 2)
pt3dadd(-179, -661, -155.5, 2.3)
pt3dadd(-178, -663.5, -162.5, 0.9)
pt3dadd(-179.5, -667.5, -163, 0.8)
pt3dadd(-183.5, -671, -163.5, 0.7)
pt3dadd(-182.5, -674, -163.5, 0.7)
pt3dadd(-183.5, -679, -164, 0.9)
pt3dadd(-183.5, -682, -164.5, 0.9)
pt3dadd(-180.5, -682.5, -168, 0.8)
pt3dadd(-178.5, -683.5, -168.5, 0.8)
pt3dadd(-180.5, -686.5, -168.5, 0.8)
pt3dadd(-183.5, -689, -169, 0.7)
pt3dadd(-184.5, -692, -169, 0.9)
pt3dadd(-182, -692.5, -169.5, 0.9)
pt3dadd(-184, -696.5, -169.5, 0.7)
pt3dadd(-185, -700.5, -170, 0.7)
pt3dadd(-186.5, -702, -170, 0.8)
pt3dadd(-190.5, -703.5, -181, 0.8)
pt3dadd(-193.5, -708, -175, 0.9)
pt3dadd(-194, -711, -180, 2)
pt3dadd(-195, -714.5, -181, 2)
pt3dadd(-195, -718, -182.5, 1.4)
pt3dadd(-197.5, -721.5, -180.5, 1)
pt3dadd(-197.5, -724.5, -182, 1)
pt3dadd(-200, -728.5, -187.5, 0.7)
pt3dadd(-200, -731.5, -188.5, 0.7)
pt3dadd(-199, -733.5, -189.5, 0.7)
pt3dadd(-201.5, -735.5, -190.5, 0.9)
pt3dadd(-201.5, -741, -196.5, 0.5)
pt3dadd(-201.5, -744.5, -201.5, 0.5)
pt3dadd(-204.5, -749, -205, 0.5)
pt3dadd(-207.5, -751.5, -206.5, 0.5)
pt3dadd(-208, -755.5, -206.5, 1.7)
pt3dadd(-207.5, -759.5, -209.5, 2.3)
pt3dadd(-209, -763, -211, 0.6)
pt3dadd(-207.5, -765.5, -212, 0.6)
pt3dadd(-207.5, -770, -213.5, 0.6)
pt3dadd(-210.5, -771.5, -215, 0.6)
pt3dadd(-211, -774.5, -216, 0.6)
pt3dadd(-210.5, -778.5, -217.5, 0.6)
pt3dadd(-214, -780.5, -219, 0.6)
pt3dadd(-214, -783.5, -224.5, 1.5)
pt3dadd(-215.5, -785, -220, 0.7)
pt3dadd(-215.5, -789, -221.5, 0.6)
}
}
proc shape3d_20() {
dend[86] { pt3dadd(-216.5, -791, -222, 0.6)
pt3dadd(-218, -794, -223.5, 1.1)
pt3dadd(-219.5, -797.5, -225, 0.7)
}
dend[87] {pt3dclear()
pt3dadd(11.5, -220.5, -84, 3.2)
pt3dadd(7, -219, -88.5, 1.4)
pt3dadd(2.5, -219, -88.5, 1.4)
pt3dadd(-4, -217, -88.5, 1.1)
pt3dadd(-4.5, -214.5, -93, 1.1)
pt3dadd(-7.5, -214, -93, 1.1)
pt3dadd(-11.5, -214, -93, 1.2)
pt3dadd(-14.5, -212.5, -93, 1.1)
pt3dadd(-17, -213, -95.5, 1.1)
pt3dadd(-20, -212, -93, 1.1)
pt3dadd(-25, -213, -96, 1.4)
pt3dadd(-31.5, -212.5, -93.5, 0.9)
pt3dadd(-35.5, -212.5, -91.5, 0.9)
pt3dadd(-39, -214, -96, 0.9)
pt3dadd(-43, -214, -96, 0.9)
pt3dadd(-47, -215, -96, 0.9)
pt3dadd(-51, -215, -96, 1.3)
pt3dadd(-53.5, -218, -96, 2.2)
pt3dadd(-56.5, -218, -96, 0.7)
pt3dadd(-58, -221.5, -93.5, 0.7)
pt3dadd(-60.5, -222, -98, 0.6)
pt3dadd(-64, -222, -98, 1.3)
pt3dadd(-66, -219.5, -105, 0.7)
}
dend[88] {pt3dclear()
pt3dadd(34, -208, -58, 7.2)
pt3dadd(33, -212, -73.5, 5.4)
pt3dadd(32.5, -215, -73.5, 4.5)
pt3dadd(31.5, -221.5, -77, 4.8)
pt3dadd(30, -223.5, -88, 4.3)
pt3dadd(29, -228.5, -93.5, 5.5)
}
dend[89] {pt3dclear()
pt3dadd(29, -228.5, -93.5, 5.5)
pt3dadd(31, -237, -100.5, 3.7)
pt3dadd(25.5, -245.5, -100.5, 4.4)
pt3dadd(21.5, -250.5, -96, 3.8)
pt3dadd(18, -253, -98, 3.7)
pt3dadd(14.5, -253, -103.5, 3.7)
pt3dadd(12.5, -255, -105.5, 4.6)
pt3dadd(12.5, -258, -105.5, 5.3)
pt3dadd(10, -269, -112.5, 6.3)
}
dend[90] {pt3dclear()
pt3dadd(10, -269, -112.5, 6.3)
pt3dadd(7, -272, -110, 3)
pt3dadd(2, -277.5, -112.5, 3.7)
pt3dadd(4, -282, -112.5, 4.1)
pt3dadd(5.5, -288, -117, 3.8)
pt3dadd(3.5, -295, -117, 4)
pt3dadd(2.5, -299.5, -117, 4)
pt3dadd(1, -309, -117, 4.6)
pt3dadd(1, -312.5, -117, 5.6)
pt3dadd(-1, -315.5, -117, 5.9)
pt3dadd(-1, -317.5, -117.5, 6.6)
}
dend[91] {pt3dclear()
pt3dadd(-1, -317.5, -117.5, 6.6)
pt3dadd(-4.5, -319, -113.5, 1.8)
pt3dadd(-10.5, -323.5, -116.5, 1.5)
pt3dadd(-14, -327, -115, 1.5)
pt3dadd(-17, -331, -115.5, 1.5)
pt3dadd(-18.5, -336, -116, 1.5)
pt3dadd(-23, -340, -117, 1.5)
pt3dadd(-28, -344.5, -124.5, 1.5)
pt3dadd(-32, -347, -125, 1.5)
pt3dadd(-35, -349, -121.5, 1.5)
pt3dadd(-36, -351.5, -119.5, 1.9)
pt3dadd(-38, -353, -125, 2.3)
pt3dadd(-41, -354, -128.5, 1.7)
pt3dadd(-44, -356, -129, 1.9)
pt3dadd(-47, -358, -129.5, 2.3)
pt3dadd(-58.5, -360, -135, 1.7)
pt3dadd(-63.5, -362, -139.5, 2.4)
pt3dadd(-68, -363, -140, 2.4)
pt3dadd(-72.5, -363, -140.5, 1.7)
pt3dadd(-80.5, -364, -142, 2)
pt3dadd(-84, -364.5, -142.5, 2)
pt3dadd(-87.5, -364.5, -143, 2)
pt3dadd(-90, -366, -143, 2)
pt3dadd(-92.5, -365, -147, 1.6)
pt3dadd(-95.5, -365, -147, 1.3)
pt3dadd(-97, -367, -147.5, 1.6)
pt3dadd(-98.5, -370, -148, 1.6)
pt3dadd(-101, -369, -156, 1.6)
pt3dadd(-106, -368.5, -157, 1.8)
pt3dadd(-109, -368.5, -157.5, 1.4)
pt3dadd(-110.5, -371.5, -166, 1.2)
pt3dadd(-115, -372, -163.5, 1.3)
pt3dadd(-116.5, -370, -167.5, 1.5)
pt3dadd(-119.5, -369, -168.5, 1.1)
pt3dadd(-124, -370, -180.5, 1.6)
pt3dadd(-132.5, -369.5, -175.5, 2.3)
pt3dadd(-137, -369.5, -176.5, 2.5)
pt3dadd(-145, -369.5, -174, 2.3)
pt3dadd(-150, -368, -190, 1.6)
pt3dadd(-154.5, -366, -187.5, 1.3)
pt3dadd(-158, -364, -188, 1.3)
pt3dadd(-160, -362.5, -188.5, 1.3)
pt3dadd(-164.5, -364.5, -193, 1.1)
pt3dadd(-169, -364.5, -194, 1.4)
pt3dadd(-171.5, -364, -194, 1.6)
pt3dadd(-174.5, -361.5, -194.5, 1.6)
pt3dadd(-178.5, -361.5, -195, 1.6)
pt3dadd(-181.5, -360, -195.5, 1.2)
pt3dadd(-184.5, -360, -196, 1.2)
pt3dadd(-187, -358.5, -196.5, 1.1)
pt3dadd(-188.5, -360.5, -201.5, 1.3)
pt3dadd(-193, -360, -198.5, 1.4)
pt3dadd(-198, -360.5, -207, 1.2)
pt3dadd(-200.5, -361.5, -204.5, 1)
pt3dadd(-205.5, -361.5, -205, 1.2)
pt3dadd(-216, -360.5, -207, 1.1)
pt3dadd(-219, -360, -211, 1.1)
pt3dadd(-222.5, -359.5, -211.5, 1.6)
pt3dadd(-230, -357.5, -213, 1.9)
pt3dadd(-233.5, -356.5, -213.5, 1.6)
pt3dadd(-237.5, -356.5, -214, 1.4)
pt3dadd(-244, -356.5, -215, 1.4)
pt3dadd(-247, -353.5, -215.5, 1.6)
pt3dadd(-260.5, -350, -225, 2)
pt3dadd(-275, -345, -225.5, 0.9)
pt3dadd(-281.5, -345, -226, 0.9)
pt3dadd(-286, -347, -226, 0.8)
pt3dadd(-291.5, -349, -226.5, 0.6)
pt3dadd(-295, -351, -231.5, 0.3)
pt3dadd(-299.5, -353.5, -229, 0.3)
pt3dadd(-303.5, -356, -229.5, 0.9)
pt3dadd(-306, -359, -229.5, 1)
pt3dadd(-309.5, -359.5, -230, 0.7)
pt3dadd(-312.5, -360.5, -230, 0.8)
pt3dadd(-315.5, -361.5, -230, 0.8)
pt3dadd(-318.5, -362, -230.5, 1.3)
pt3dadd(-321, -364, -230.5, 1.1)
pt3dadd(-323, -366, -233, 1)
pt3dadd(-325, -367, -231, 1.2)
pt3dadd(-331, -370, -233.5, 1.1)
pt3dadd(-333.5, -371.5, -234, 1.1)
pt3dadd(-337.5, -371, -234, 1)
pt3dadd(-340.5, -369.5, -241, 0.6)
pt3dadd(-341.5, -372.5, -243.5, 1)
pt3dadd(-344, -375, -244, 0.7)
pt3dadd(-347, -375, -244, 0.6)
pt3dadd(-351.5, -375, -244, 0.8)
pt3dadd(-354, -377, -244.5, 0.7)
pt3dadd(-355.5, -379, -244.5, 0.7)
pt3dadd(-359, -380, -244.5, 1)
pt3dadd(-362, -380, -245, 0.8)
pt3dadd(-365, -381.5, -245, 0.6)
pt3dadd(-367.5, -384, -245, 0.7)
pt3dadd(-369, -385.5, -245.5, 0.7)
pt3dadd(-371.5, -387.5, -245.5, 0.8)
pt3dadd(-375, -389.5, -245.5, 0.8)
pt3dadd(-378.5, -390, -246, 0.6)
pt3dadd(-381.5, -390, -246, 1.2)
pt3dadd(-388.5, -392.5, -251, 1.3)
pt3dadd(-392, -395.5, -249, 0.6)
pt3dadd(-393.5, -398, -249, 0.6)
pt3dadd(-395, -399.5, -249, 0.6)
pt3dadd(-398, -402, -249.5, 0.9)
pt3dadd(-400, -403.5, -249.5, 0.9)
pt3dadd(-404, -405.5, -259.5, 0.8)
pt3dadd(-409, -406, -260, 0.8)
pt3dadd(-413, -407.5, -260, 0.6)
pt3dadd(-416, -408.5, -260.5, 0.5)
pt3dadd(-418, -410, -260.5, 0.5)
pt3dadd(-421, -413.5, -260.5, 0.5)
pt3dadd(-423.5, -417, -261, 0.1)
pt3dadd(-425, -419, -263, 0.1)
}
dend[92] {pt3dclear()
pt3dadd(-1, -317.5, -117.5, 6.6)
pt3dadd(1.5, -322, -113.5, 3.2)
pt3dadd(4, -327, -119, 3.2)
pt3dadd(5, -333.5, -119.5, 3.6)
pt3dadd(6, -341, -121, 4.1)
pt3dadd(8, -346, -119, 4)
pt3dadd(8, -355, -125, 4.1)
pt3dadd(6.5, -360, -132, 2.5)
pt3dadd(6.5, -364, -132.5, 3.1)
pt3dadd(5.5, -368, -133, 3.5)
pt3dadd(3.5, -373.5, -137.5, 3.4)
pt3dadd(3.5, -377, -128.5, 3.5)
pt3dadd(2.5, -384, -136, 4)
pt3dadd(1.5, -387, -136.5, 3.5)
pt3dadd(0, -389.5, -136.5, 3)
pt3dadd(-0.5, -394, -134, 2.3)
pt3dadd(-0.5, -398, -138, 2.6)
pt3dadd(-2.5, -402, -135.5, 2.9)
pt3dadd(-1, -406, -136, 2.5)
pt3dadd(1.5, -409.5, -136.5, 2.6)
pt3dadd(1.5, -413.5, -137, 2.5)
pt3dadd(0.5, -416.5, -137, 3)
pt3dadd(-1, -420.5, -137.5, 3)
pt3dadd(-2, -423.5, -141.5, 3)
pt3dadd(-3, -427, -149, 3)
pt3dadd(-6.5, -432.5, -149.5, 3.2)
pt3dadd(-6, -436.5, -150, 3.2)
pt3dadd(-6, -440.5, -147.5, 4.7)
pt3dadd(-6, -443, -151, 5.3)
}
dend[93] {pt3dclear()
pt3dadd(-6, -443, -151, 5.3)
pt3dadd(-9.5, -447.5, -154.5, 1.3)
pt3dadd(-14.5, -452.5, -154.5, 1.1)
pt3dadd(-17.5, -455.5, -148, 1.2)
pt3dadd(-21, -455.5, -154.5, 1.1)
pt3dadd(-24.5, -455.5, -154.5, 1.1)
pt3dadd(-27.5, -459.5, -154.5, 1.5)
}
}
proc shape3d_21() {
dend[93] { pt3dadd(-30, -463.5, -154.5, 1.2)
pt3dadd(-31, -466.5, -154.5, 1.3)
pt3dadd(-33, -469, -158, 1.4)
pt3dadd(-37, -472.5, -158, 1.4)
pt3dadd(-40.5, -474.5, -158, 1.4)
pt3dadd(-44, -475.5, -158, 1.2)
pt3dadd(-45.5, -478.5, -158, 1)
pt3dadd(-45.5, -481.5, -158, 1)
pt3dadd(-45, -485, -158, 1.1)
pt3dadd(-43.5, -489.5, -158, 1.3)
pt3dadd(-45, -494, -151, 1.2)
pt3dadd(-50, -496, -151, 1.2)
pt3dadd(-55, -503, -148, 1.5)
pt3dadd(-54, -506.5, -148, 1.5)
pt3dadd(-53.5, -510, -151, 1.5)
pt3dadd(-53, -513, -151, 1.9)
pt3dadd(-51.5, -517, -151, 1.4)
pt3dadd(-54, -521.5, -148, 1.3)
pt3dadd(-54.5, -526, -151, 1.7)
pt3dadd(-53.5, -530.5, -151, 1.1)
pt3dadd(-54.5, -534, -151, 1.1)
pt3dadd(-56.5, -537, -151, 1.1)
pt3dadd(-58, -541, -151, 1.2)
pt3dadd(-58, -546, -151, 1.7)
pt3dadd(-59.5, -549, -151, 2.1)
pt3dadd(-61.5, -551, -154.5, 2)
pt3dadd(-62.5, -554, -158, 2)
pt3dadd(-62.5, -557, -158, 1.4)
pt3dadd(-62.5, -561, -158, 0.8)
pt3dadd(-62.5, -564, -161, 0.8)
pt3dadd(-63.5, -566, -154.5, 0.8)
pt3dadd(-63, -569.5, -151, 0.8)
pt3dadd(-65.5, -571.5, -151, 1.1)
pt3dadd(-66.5, -574, -151, 1.5)
pt3dadd(-65, -576, -151, 1.5)
pt3dadd(-65, -579, -158, 0.7)
pt3dadd(-66.5, -581, -158, 0.7)
pt3dadd(-70.5, -583.5, -158, 0.7)
pt3dadd(-72, -585, -154.5, 0.7)
pt3dadd(-73.5, -587, -161, 1.8)
pt3dadd(-78, -589.5, -158, 0.9)
pt3dadd(-81, -590.5, -161, 0.9)
pt3dadd(-81.5, -594, -158.5, 0.8)
pt3dadd(-86, -599.5, -158.5, 0.8)
pt3dadd(-88.5, -602, -158.5, 0.5)
pt3dadd(-89, -605.5, -158.5, 0.5)
pt3dadd(-92.5, -609, -158.5, 0.5)
pt3dadd(-95.5, -609, -158.5, 0.5)
pt3dadd(-99, -610.5, -158.5, 0.5)
pt3dadd(-101.5, -612.5, -158.5, 0.5)
pt3dadd(-103, -616.5, -158.5, 0.5)
pt3dadd(-105, -619.5, -155, 1.2)
pt3dadd(-109, -621, -158.5, 0.3)
pt3dadd(-109.5, -626.5, -155, 0.3)
pt3dadd(-112, -625.5, -155, 0.2)
pt3dadd(-114.5, -627.5, -155, 0.2)
pt3dadd(-117, -628.5, -158.5, 0.2)
pt3dadd(-118.5, -630, -161.5, 0.1)
pt3dadd(-127, -631.5, -151.5, 0.3)
pt3dadd(-131, -633, -145, 0.3)
pt3dadd(-133.5, -634.5, -148.5, 0.3)
pt3dadd(-134.5, -636.5, -148.5, 0.3)
pt3dadd(-137.5, -637.5, -148.5, 0.6)
pt3dadd(-140.5, -640, -148.5, 0.8)
pt3dadd(-145.5, -641.5, -148.5, 0.8)
pt3dadd(-147, -643, -145, 0.7)
}
dend[94] {pt3dclear()
pt3dadd(-6, -443, -151, 5.3)
pt3dadd(-4, -446, -156, 2.3)
pt3dadd(-1, -448, -157, 2.3)
pt3dadd(-3.5, -452.5, -158.5, 2.2)
pt3dadd(-5, -456, -163.5, 1.6)
pt3dadd(-5, -459, -161.5, 1.7)
pt3dadd(-4.5, -463, -162.5, 1.3)
pt3dadd(-2, -464, -167.5, 1.6)
pt3dadd(-0.5, -465.5, -168, 1.6)
pt3dadd(1.5, -468, -169, 1.2)
pt3dadd(0, -472.5, -170.5, 2.1)
pt3dadd(-0.5, -478, -175, 2.1)
pt3dadd(1.5, -482, -176.5, 2.3)
pt3dadd(2.5, -485, -175, 2.3)
pt3dadd(1.5, -491, -172, 1.8)
pt3dadd(1.5, -494, -175.5, 2)
pt3dadd(1.5, -499, -172.5, 1.8)
pt3dadd(4, -503.5, -169.5, 2)
pt3dadd(4.5, -507, -170, 2)
pt3dadd(5, -509.5, -181, 2.2)
pt3dadd(6, -512.5, -181.5, 2.2)
pt3dadd(6, -515.5, -181.5, 1.9)
pt3dadd(4.5, -518.5, -182, 1.9)
pt3dadd(2, -520.5, -182, 2.3)
pt3dadd(3, -523.5, -182.5, 2.1)
pt3dadd(2.5, -527, -182.5, 2)
pt3dadd(1, -530.5, -183, 1.9)
pt3dadd(2, -535, -183, 2.2)
pt3dadd(2.5, -539.5, -187, 2.3)
pt3dadd(0, -541.5, -187.5, 2.3)
pt3dadd(-1.5, -544.5, -187.5, 2.4)
pt3dadd(-2, -547.5, -191.5, 1.7)
pt3dadd(-1.5, -550.5, -191.5, 1.7)
pt3dadd(-4.5, -556, -192, 1.7)
pt3dadd(-4.5, -559, -192.5, 1.7)
pt3dadd(-4.5, -562.5, -192.5, 1.7)
pt3dadd(-3, -564.5, -193, 1.7)
pt3dadd(-2, -566.5, -196.5, 1.5)
pt3dadd(-5, -569.5, -197, 1.6)
pt3dadd(-6.5, -574, -197.5, 1.9)
pt3dadd(-6.5, -578.5, -198, 1.5)
pt3dadd(-7.5, -583.5, -198.5, 1.7)
pt3dadd(-7.5, -587, -198.5, 1.8)
pt3dadd(-7, -590, -199, 1.8)
pt3dadd(-6.5, -593.5, -199, 1.5)
pt3dadd(-5.5, -596, -199, 1.3)
pt3dadd(-5, -599, -199.5, 1.3)
pt3dadd(-8, -602.5, -200, 1.3)
pt3dadd(-7, -606, -200, 1.3)
pt3dadd(-4.5, -608, -204.5, 1.3)
pt3dadd(-3.5, -611.5, -194.5, 2)
pt3dadd(-4, -614, -194.5, 2.2)
pt3dadd(-4, -618, -195, 1.5)
pt3dadd(-3, -620, -195, 1.4)
pt3dadd(-3, -623.5, -195.5, 1.4)
pt3dadd(-5, -626, -195.5, 1.3)
pt3dadd(-7, -627.5, -199.5, 2.5)
pt3dadd(-7, -631, -203, 2.5)
pt3dadd(-7, -634, -203.5, 1.7)
pt3dadd(-7.5, -638.5, -204, 1.4)
pt3dadd(-8.5, -641, -208, 1.3)
pt3dadd(-7, -643, -212, 1.2)
pt3dadd(-6, -645.5, -208.5, 1.3)
pt3dadd(-7, -650, -205, 1.3)
pt3dadd(-6.5, -652.5, -205.5, 1.4)
pt3dadd(-9, -655.5, -205.5, 1.5)
pt3dadd(-11, -657, -210, 1.5)
pt3dadd(-14, -658.5, -210, 1.2)
pt3dadd(-14.5, -661.5, -210.5, 1.2)
pt3dadd(-14.5, -665, -203.5, 1.6)
pt3dadd(-17, -669, -204.5, 2.2)
pt3dadd(-18, -671.5, -205, 2.2)
pt3dadd(-18, -675.5, -205, 1.8)
pt3dadd(-21.5, -682.5, -206, 1.1)
pt3dadd(-23, -686.5, -202.5, 1.1)
pt3dadd(-25, -688.5, -203, 1.3)
pt3dadd(-26.5, -692, -203, 1.9)
pt3dadd(-27.5, -694, -203.5, 2.5)
pt3dadd(-29.5, -695.5, -203.5, 2.3)
pt3dadd(-31, -698.5, -203.5, 1.9)
pt3dadd(-33, -700, -204, 1.9)
pt3dadd(-32.5, -704, -216, 1.4)
pt3dadd(-30.5, -706.5, -216, 1.2)
pt3dadd(-30, -709.5, -216.5, 1.4)
pt3dadd(-32, -713, -212.5, 1.6)
pt3dadd(-35, -713.5, -213, 1.2)
pt3dadd(-37, -716, -213, 1.2)
pt3dadd(-37, -721.5, -213.5, 1.3)
pt3dadd(-36, -730.5, -214.5, 1.3)
pt3dadd(-36.5, -735.5, -219, 1.6)
pt3dadd(-39.5, -738, -219, 1.6)
pt3dadd(-39.5, -747, -227, 1.6)
pt3dadd(-39.5, -752, -220.5, 1.6)
pt3dadd(-40, -756, -224.5, 1.6)
pt3dadd(-42.5, -758, -225, 1.6)
pt3dadd(-44, -761.5, -230.5, 1.2)
pt3dadd(-45, -765, -231, 1.3)
pt3dadd(-47, -768.5, -231.5, 2.2)
pt3dadd(-47, -773, -235, 2.5)
pt3dadd(-47.5, -777.5, -236, 0.8)
pt3dadd(-46, -782.5, -237, 1.1)
pt3dadd(-44.5, -784.5, -237.5, 1.4)
pt3dadd(-46, -787.5, -240, 1.3)
pt3dadd(-46.5, -792, -241, 0.9)
pt3dadd(-46.5, -796.5, -241.5, 0.7)
pt3dadd(-45, -799.5, -242, 0.8)
pt3dadd(-44, -802.5, -243, 0.9)
pt3dadd(-44.5, -805, -243, 1)
pt3dadd(-45.5, -807.5, -248.5, 1.1)
pt3dadd(-47, -810.5, -249.5, 1.1)
pt3dadd(-47, -813.5, -250, 0.9)
pt3dadd(-46, -816.5, -250.5, 0.9)
pt3dadd(-44, -819, -251, 0.7)
pt3dadd(-42, -822.5, -251.5, 0.8)
pt3dadd(-40.5, -824.5, -252, 0.9)
pt3dadd(-42.5, -827.5, -253, 0.5)
pt3dadd(-44, -833, -252, 0.7)
pt3dadd(-41.5, -834, -252.5, 0.7)
pt3dadd(-41, -836.5, -253, 0.7)
pt3dadd(-40.5, -839.5, -253.5, 0.7)
pt3dadd(-39.5, -842, -251.5, 0.8)
pt3dadd(-39, -845, -255, 0.9)
pt3dadd(-38.5, -848, -255.5, 1.1)
pt3dadd(-37, -849.5, -256, 0.6)
pt3dadd(-36.5, -852, -258.5, 0.6)
pt3dadd(-37.5, -854.5, -259, 0.8)
pt3dadd(-42.5, -857.5, -260, 0.6)
pt3dadd(-45, -862.5, -263.5, 1.4)
pt3dadd(-47, -867, -261, 0.7)
pt3dadd(-48.5, -868.5, -261.5, 0.7)
pt3dadd(-51.5, -867, -267, 0.6)
pt3dadd(-52.5, -862.5, -268, 1.5)
pt3dadd(-55, -865.5, -268.5, 0.1)
pt3dadd(-58, -868.5, -269.5, 0.1)
}
}
proc shape3d_22() {
dend[94] { pt3dadd(-59.5, -869, -275, 0.1)
}
dend[95] {pt3dclear()
pt3dadd(10, -269, -112.5, 6.3)
pt3dadd(13.5, -273, -113.5, 1.6)
pt3dadd(15.5, -276, -114.5, 1.6)
pt3dadd(14, -278.5, -115, 1.5)
pt3dadd(18, -282.5, -116, 1.5)
pt3dadd(20.5, -285, -121.5, 1.3)
pt3dadd(18.5, -289, -125, 1.5)
pt3dadd(17.5, -291.5, -123, 1.8)
pt3dadd(17.5, -295, -140.5, 1.4)
pt3dadd(21, -298.5, -142, 1.2)
pt3dadd(18.5, -300, -143, 1.2)
pt3dadd(16.5, -302, -144, 1.2)
pt3dadd(20.5, -303.5, -150, 1.4)
pt3dadd(22.5, -304.5, -150.5, 1.4)
pt3dadd(20, -308, -152.5, 1.5)
pt3dadd(18, -310, -153.5, 1.5)
pt3dadd(16.5, -312, -167, 1.5)
pt3dadd(12.5, -312, -168.5, 1.5)
pt3dadd(13.5, -314, -169, 1.2)
pt3dadd(14, -318.5, -172, 1.3)
pt3dadd(11.5, -321, -170.5, 1.6)
pt3dadd(11.5, -326.5, -173, 1.6)
pt3dadd(11, -329, -173.5, 1.4)
pt3dadd(8.5, -333, -175, 1.6)
pt3dadd(7, -337.5, -174, 1.6)
pt3dadd(6.5, -340, -178.5, 1.3)
pt3dadd(6.5, -343, -179.5, 1.3)
pt3dadd(8.5, -345.5, -180.5, 1.7)
pt3dadd(9.5, -348, -181.5, 1.3)
pt3dadd(7.5, -353, -183, 1.1)
pt3dadd(5.5, -354, -184, 1.3)
pt3dadd(2.5, -354, -193, 1.9)
pt3dadd(6.5, -355.5, -194.5, 1.7)
pt3dadd(5.5, -359.5, -204, 1.7)
pt3dadd(4.5, -362.5, -209.5, 1.5)
pt3dadd(3.5, -364.5, -214.5, 1.5)
pt3dadd(6, -366.5, -215.5, 1.5)
pt3dadd(7.5, -374, -227.5, 1.3)
pt3dadd(7.5, -379, -229.5, 0.9)
pt3dadd(6, -380.5, -236.5, 0.8)
pt3dadd(7.5, -382.5, -237.5, 0.8)
pt3dadd(9.5, -384, -238.5, 0.9)
pt3dadd(11.5, -388, -240, 0.8)
pt3dadd(10.5, -390.5, -241, 0.8)
pt3dadd(11, -394.5, -247.5, 0.8)
pt3dadd(6.5, -392, -249.5, 0.8)
pt3dadd(4, -393, -253.5, 0.8)
pt3dadd(0.5, -393.5, -257, 0.7)
pt3dadd(-2, -394.5, -258, 0.6)
pt3dadd(-5, -394.5, -262, 0.4)
pt3dadd(-3, -396.5, -263, 0.4)
pt3dadd(-4.5, -398.5, -263.5, 1.3)
pt3dadd(-5.5, -400.5, -264.5, 2)
pt3dadd(-7.5, -404.5, -266, 0.7)
pt3dadd(-7, -407, -267, 0.6)
pt3dadd(-5.5, -410, -268, 0.6)
pt3dadd(-4.5, -412.5, -275, 0.6)
pt3dadd(-3, -416, -290.5, 1.1)
pt3dadd(-3, -420.5, -291.5, 1.3)
pt3dadd(-1.5, -425.5, -289, 0.7)
pt3dadd(-3, -427, -289.5, 0.6)
pt3dadd(-2, -429, -290.5, 0.8)
pt3dadd(-3, -431, -295.5, 0.8)
pt3dadd(-3.5, -433.5, -300.5, 1.2)
pt3dadd(-1, -436, -301.5, 0.7)
pt3dadd(2.5, -436, -302, 0.7)
pt3dadd(0.5, -438.5, -303, 0.8)
pt3dadd(-2, -440.5, -308.5, 1.1)
pt3dadd(1.5, -442.5, -324, 0.8)
pt3dadd(-2, -447, -325, 2.6)
}
dend[96] {pt3dclear()
pt3dadd(29, -228.5, -93.5, 5.5)
pt3dadd(35.5, -232.5, -102, 2.3)
pt3dadd(31.5, -233, -96.5, 2.3)
pt3dadd(27.5, -231, -102, 2.3)
pt3dadd(26, -228, -105.5, 2.2)
pt3dadd(27.5, -226.5, -106, 2.2)
pt3dadd(32.5, -226.5, -109, 1.8)
pt3dadd(36, -226.5, -110, 1.6)
pt3dadd(39, -226.5, -110.5, 1.6)
pt3dadd(42, -227.5, -111, 1.6)
pt3dadd(42, -231.5, -113.5, 1.8)
pt3dadd(40.5, -235.5, -114.5, 2)
pt3dadd(37, -232.5, -118, 2)
pt3dadd(36.5, -229, -119, 2)
pt3dadd(33.5, -235, -122, 2)
pt3dadd(28.5, -232.5, -127.5, 2.2)
pt3dadd(24.5, -232.5, -128.5, 3)
pt3dadd(22, -234.5, -125, 2.6)
pt3dadd(19, -235.5, -129, 1.3)
pt3dadd(15, -237.5, -134, 2.5)
pt3dadd(11.5, -239, -135, 1.6)
pt3dadd(10, -240.5, -135.5, 1.5)
pt3dadd(7.5, -242, -144, 1.9)
pt3dadd(7.5, -246, -149, 1.8)
pt3dadd(6.5, -248.5, -146.5, 1.4)
pt3dadd(5.5, -251.5, -151, 1.6)
pt3dadd(10, -252, -153.5, 1.8)
pt3dadd(10.5, -255, -154, 1.8)
pt3dadd(11, -257.5, -154.5, 1.5)
pt3dadd(10, -259.5, -155, 1.4)
pt3dadd(7.5, -261, -156, 1.8)
pt3dadd(5.5, -262.5, -164, 1.9)
pt3dadd(4.5, -264.5, -164.5, 1.4)
pt3dadd(5.5, -268, -165.5, 1.7)
pt3dadd(7, -272.5, -175, 1.8)
pt3dadd(6.5, -276, -172.5, 2.1)
pt3dadd(5.5, -281.5, -170.5, 1.9)
pt3dadd(4, -290, -176.5, 2.1)
pt3dadd(4.5, -292.5, -177.5, 2.1)
pt3dadd(5, -295.5, -178, 1.9)
pt3dadd(2.5, -297, -178.5, 1.6)
pt3dadd(-0.5, -299, -179.5, 1.6)
pt3dadd(0, -303.5, -180.5, 1.6)
pt3dadd(-1.5, -305.5, -181, 1.7)
pt3dadd(-3.5, -308.5, -186, 1.8)
pt3dadd(-3, -312, -195, 2.1)
pt3dadd(-5.5, -314.5, -200, 1.9)
pt3dadd(-8.5, -317.5, -197.5, 2)
pt3dadd(-10.5, -320, -202.5, 2)
pt3dadd(-11, -323, -200, 1.7)
pt3dadd(-12.5, -324.5, -200.5, 1.6)
pt3dadd(-13.5, -326.5, -201, 1.6)
pt3dadd(-12, -329, -201.5, 1.6)
pt3dadd(-12, -333, -206.5, 2.1)
pt3dadd(-13.5, -337, -212, 2)
pt3dadd(-18, -337.5, -213, 2.1)
pt3dadd(-19, -340, -213.5, 1.8)
pt3dadd(-21, -343, -218.5, 1.7)
pt3dadd(-24.5, -343, -223.5, 1.4)
pt3dadd(-26.5, -344.5, -224, 1.6)
pt3dadd(-29, -346, -225, 1.4)
pt3dadd(-37, -346, -230.5, 1.3)
pt3dadd(-39.5, -346.5, -233, 1.6)
pt3dadd(-43.5, -347, -236.5, 1.5)
pt3dadd(-48, -349.5, -239, 1.5)
pt3dadd(-52, -350, -239.5, 0.8)
pt3dadd(-55.5, -349.5, -236, 0.7)
pt3dadd(-57.5, -352, -241.5, 0.9)
pt3dadd(-58.5, -355, -242, 1.1)
pt3dadd(-59.5, -358, -242.5, 1)
pt3dadd(-64, -358, -246, 1.6)
pt3dadd(-67, -359, -246.5, 0.8)
pt3dadd(-68, -362, -246.5, 0.8)
pt3dadd(-68, -365, -245, 0.9)
pt3dadd(-72.5, -365, -256, 0.8)
pt3dadd(-75.5, -367.5, -259, 0.8)
pt3dadd(-77, -369.5, -259, 1)
pt3dadd(-78.5, -371, -257.5, 1)
pt3dadd(-81.5, -371, -258, 0.7)
pt3dadd(-85.5, -373.5, -258.5, 0.9)
pt3dadd(-87, -377.5, -261.5, 1.7)
pt3dadd(-89.5, -380, -262, 1.8)
pt3dadd(-91, -382.5, -262, 1.4)
pt3dadd(-94, -386, -263, 0.8)
pt3dadd(-96, -387.5, -263, 0.8)
pt3dadd(-98.5, -388.5, -263.5, 1.2)
pt3dadd(-104, -391, -264.5, 0.9)
pt3dadd(-106.5, -393, -265, 0.8)
pt3dadd(-108.5, -395, -265.5, 0.7)
pt3dadd(-110.5, -397.5, -268.5, 0.7)
pt3dadd(-115.5, -402, -269.5, 0.8)
pt3dadd(-120, -403.5, -275, 0.7)
pt3dadd(-123.5, -404, -275.5, 0.9)
pt3dadd(-127, -405.5, -281, 0.9)
pt3dadd(-130, -409, -282, 1.2)
pt3dadd(-134.5, -409, -283, 0.8)
pt3dadd(-136, -412, -292.5, 0.8)
pt3dadd(-139, -412.5, -289.5, 1)
pt3dadd(-143, -412.5, -295, 1.2)
pt3dadd(-146.5, -415, -300.5, 1.2)
pt3dadd(-149, -416.5, -301.5, 1.2)
pt3dadd(-150, -418.5, -301.5, 0.8)
pt3dadd(-151.5, -420.5, -302, 0.8)
pt3dadd(-155.5, -420.5, -303, 0.9)
pt3dadd(-157.5, -422, -303.5, 0.9)
pt3dadd(-158.5, -424.5, -313, 0.9)
pt3dadd(-163, -427, -319, 0.9)
pt3dadd(-166, -427.5, -320, 0.9)
pt3dadd(-169, -428.5, -320.5, 0.9)
pt3dadd(-173, -430, -323.5, 0.7)
pt3dadd(-176, -431.5, -324.5, 0.7)
pt3dadd(-177.5, -433, -325, 0.7)
}
dend[97] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 8.8)
pt3dadd(14.5, -48.5, -10, 8.8)
pt3dadd(12, -52, 25, 8.7)
pt3dadd(8, -56, 25.5, 6.5)
pt3dadd(3.5, -65, 35.5, 6.1)
pt3dadd(6.5, -75, 37, 7.9)
pt3dadd(3.5, -100.5, 41.5, 5.8)
pt3dadd(2.5, -107.5, 45, 6.4)
pt3dadd(3, -111.5, 53.5, 7.6)
pt3dadd(-1, -119, 50.5, 8.4)
}
dend[98] {pt3dclear()
pt3dadd(-1, -119, 50.5, 8.4)
pt3dadd(-3.5, -122, 51.5, 5.4)
pt3dadd(-8, -127, 56.5, 4.6)
pt3dadd(-13.5, -131, 70, 4.6)
pt3dadd(-19.5, -136, 73, 5.2)
pt3dadd(-23, -141, 75, 6)
pt3dadd(-27.5, -147.5, 71.5, 6.3)
}
}
proc shape3d_23() {
dend[98] { pt3dadd(-32.5, -154.5, 75, 6.4)
pt3dadd(-36, -160.5, 78, 4.3)
pt3dadd(-40, -165.5, 88, 4.6)
pt3dadd(-45.5, -173.5, 92.5, 5.4)
pt3dadd(-46.5, -176, 94, 5.5)
pt3dadd(-48, -179.5, 99.5, 6.1)
}
dend[99] {pt3dclear()
pt3dadd(-48, -179.5, 99.5, 6.1)
pt3dadd(-50.5, -188, 94, 3.1)
pt3dadd(-53, -191.5, 94, 3.2)
pt3dadd(-55, -195, 94, 3.3)
pt3dadd(-56, -198, 94, 3.4)
pt3dadd(-56.5, -202, 94, 3.5)
pt3dadd(-56, -205, 91, 2.8)
pt3dadd(-56.5, -208.5, 91, 2.1)
pt3dadd(-59.5, -209.5, 91, 3)
pt3dadd(-65, -214, 91, 2.2)
pt3dadd(-65, -217, 91, 2.8)
pt3dadd(-67, -221.5, 91, 3)
pt3dadd(-69, -226, 91, 3.4)
pt3dadd(-70, -229.5, 96.5, 3.7)
pt3dadd(-74.5, -235, 96.5, 3.3)
pt3dadd(-76.5, -238, 96.5, 3.3)
pt3dadd(-77, -243, 96.5, 3.3)
pt3dadd(-80, -247, 96.5, 3.8)
pt3dadd(-85, -253.5, 96.5, 3.1)
pt3dadd(-86.5, -255.5, 96.5, 3.2)
pt3dadd(-88, -262.5, 88.5, 3.6)
pt3dadd(-90.5, -266, 91, 4.4)
pt3dadd(-92.5, -269.5, 94, 4)
pt3dadd(-95, -273, 91, 3.9)
pt3dadd(-98, -277, 96.5, 4.2)
pt3dadd(-98, -281.5, 91, 4.2)
pt3dadd(-98.5, -288.5, 91, 4.5)
pt3dadd(-98.5, -294, 96.5, 4.8)
}
dend[100] {pt3dclear()
pt3dadd(-98.5, -294, 96.5, 4.8)
pt3dadd(-96, -294.5, 99.5, 4)
pt3dadd(-95, -297.5, 99.5, 3.4)
pt3dadd(-94.5, -302, 94, 2.7)
pt3dadd(-96, -304, 96.5, 2.7)
pt3dadd(-101.5, -307, 99.5, 2.6)
pt3dadd(-105, -307, 102.5, 2.6)
pt3dadd(-110.5, -308.5, 103, 2.8)
pt3dadd(-111, -315, 100, 3.7)
pt3dadd(-110.5, -319.5, 103, 3.5)
pt3dadd(-108, -328.5, 105.5, 3)
pt3dadd(-110.5, -333.5, 105.5, 2.6)
pt3dadd(-113, -351.5, 108.5, 4.5)
pt3dadd(-115, -354.5, 108.5, 3.4)
pt3dadd(-117, -360, 105.5, 3.7)
pt3dadd(-120, -365.5, 105.5, 4.4)
}
dend[101] {pt3dclear()
pt3dadd(-120, -365.5, 105.5, 4.4)
pt3dadd(-120, -371, 108.5, 3.7)
pt3dadd(-121.5, -374, 111.5, 3)
pt3dadd(-124, -376, 111.5, 2.7)
pt3dadd(-127, -380, 115, 1.9)
pt3dadd(-131.5, -387.5, 115.5, 2.2)
pt3dadd(-134.5, -390, 115.5, 1.9)
pt3dadd(-138, -395, 116, 1.6)
pt3dadd(-142, -399.5, 116.5, 2.2)
pt3dadd(-141, -403, 116.5, 2.2)
pt3dadd(-140.5, -405.5, 116.5, 2)
pt3dadd(-139.5, -411, 117, 1.4)
pt3dadd(-141, -414, 117, 1.7)
pt3dadd(-146.5, -414, 117.5, 2.5)
pt3dadd(-152.5, -418, 109.5, 2.3)
pt3dadd(-154, -420.5, 107.5, 2.3)
pt3dadd(-158, -427, 116, 2)
pt3dadd(-159.5, -431, 116, 2.5)
pt3dadd(-161, -435, 116.5, 2.5)
pt3dadd(-163, -436.5, 116.5, 1.6)
pt3dadd(-165, -443, 117, 2.5)
pt3dadd(-168.5, -445.5, 120, 2.5)
pt3dadd(-172, -448.5, 120.5, 1.7)
pt3dadd(-173.5, -452, 120.5, 2.1)
pt3dadd(-175, -456.5, 112.5, 2.1)
pt3dadd(-176, -461.5, 116, 2.1)
pt3dadd(-177.5, -463, 116, 3.6)
pt3dadd(-179.5, -465.5, 119, 3.2)
pt3dadd(-182, -468, 119, 2.2)
pt3dadd(-183.5, -470.5, 119, 2.2)
pt3dadd(-187.5, -477.5, 119.5, 2.2)
pt3dadd(-189.5, -480, 123, 1.9)
pt3dadd(-192.5, -482.5, 123, 1.9)
pt3dadd(-195, -484.5, 123, 1.9)
pt3dadd(-198.5, -490, 129, 2.3)
pt3dadd(-200.5, -493, 124, 2.3)
pt3dadd(-200.5, -496, 124, 1.9)
pt3dadd(-201.5, -498, 124.5, 1.9)
pt3dadd(-201, -502, 121.5, 1.9)
pt3dadd(-203.5, -503.5, 125, 1.8)
pt3dadd(-204, -507.5, 125, 1.5)
pt3dadd(-204, -510.5, 122, 1.5)
pt3dadd(-206.5, -514, 122.5, 2)
pt3dadd(-207.5, -516.5, 122.5, 2.3)
pt3dadd(-208, -520.5, 123, 1.9)
pt3dadd(-207.5, -524.5, 123.5, 1.6)
pt3dadd(-211, -527.5, 127.5, 2.4)
pt3dadd(-214, -535.5, 128, 2)
pt3dadd(-216.5, -540.5, 132, 2.1)
pt3dadd(-219, -542.5, 132, 1.9)
pt3dadd(-221.5, -545, 136, 2.2)
pt3dadd(-222.5, -547.5, 130, 1.8)
pt3dadd(-224, -549.5, 130.5, 1.8)
pt3dadd(-226, -551, 130.5, 2.2)
pt3dadd(-227.5, -553, 130.5, 1.6)
pt3dadd(-228.5, -556, 131, 2)
pt3dadd(-230, -559, 131.5, 2)
pt3dadd(-231.5, -561, 131.5, 2)
pt3dadd(-234, -563.5, 128.5, 2)
pt3dadd(-234.5, -566, 132.5, 2)
pt3dadd(-236, -568.5, 129, 2.3)
pt3dadd(-237, -571, 133, 2)
pt3dadd(-238, -573.5, 127, 2)
pt3dadd(-239, -575.5, 127, 1.4)
pt3dadd(-240.5, -577, 127, 1.4)
pt3dadd(-243.5, -579.5, 131, 1.4)
pt3dadd(-247.5, -582.5, 131.5, 1.4)
pt3dadd(-247, -588.5, 132, 1.7)
pt3dadd(-247, -593.5, 132.5, 1.7)
pt3dadd(-248.5, -596, 129.5, 1.1)
pt3dadd(-251, -599, 130, 1.5)
pt3dadd(-256.5, -602.5, 134, 1.4)
pt3dadd(-258.5, -605.5, 134.5, 2.3)
pt3dadd(-260.5, -608, 134.5, 1.8)
pt3dadd(-265, -611, 135, 1.3)
pt3dadd(-267.5, -614.5, 139, 1.3)
pt3dadd(-270, -617, 142.5, 1.1)
pt3dadd(-273, -617, 142.5, 1.1)
pt3dadd(-276, -617.5, 143, 1.1)
pt3dadd(-278, -622.5, 143.5, 1.3)
pt3dadd(-279, -625.5, 141, 1.4)
pt3dadd(-281.5, -628, 137.5, 1.7)
pt3dadd(-285, -630, 145, 1.5)
pt3dadd(-288, -631, 145, 1.6)
pt3dadd(-289, -634, 139.5, 1.8)
pt3dadd(-292, -635, 146.5, 1.6)
pt3dadd(-296, -638.5, 144.5, 1.8)
pt3dadd(-302, -645, 148.5, 1.9)
pt3dadd(-304.5, -646, 152, 1.5)
pt3dadd(-307, -649, 152.5, 1.4)
pt3dadd(-309.5, -650.5, 153, 1.4)
pt3dadd(-314.5, -655, 157, 1.2)
pt3dadd(-318, -655, 157.5, 1.2)
pt3dadd(-325.5, -658.5, 155, 1.6)
pt3dadd(-329.5, -658.5, 155.5, 1.3)
pt3dadd(-332.5, -659, 155.5, 1)
pt3dadd(-338.5, -664.5, 156.5, 1.9)
pt3dadd(-343.5, -664.5, 157, 0.9)
pt3dadd(-346.5, -665, 157, 1.4)
pt3dadd(-351.5, -668, 164.5, 1.9)
pt3dadd(-357.5, -670.5, 168.5, 1.5)
pt3dadd(-360.5, -671.5, 172.5, 1.4)
pt3dadd(-365, -675, 169.5, 1.2)
pt3dadd(-369.5, -676.5, 170, 1.2)
pt3dadd(-372, -678.5, 170.5, 0.8)
pt3dadd(-374.5, -680.5, 170.5, 1)
pt3dadd(-377, -682.5, 171, 1)
pt3dadd(-379.5, -683.5, 175, 1)
pt3dadd(-384, -687, 176, 1.5)
pt3dadd(-388, -692, 177, 0.9)
pt3dadd(-391.5, -693, 178, 0.8)
pt3dadd(-392.5, -695.5, 178.5, 1.4)
pt3dadd(-395.5, -699.5, 178, 2.6)
pt3dadd(-397, -697, 184.5, 1)
pt3dadd(-400.5, -698.5, 188.5, 1)
pt3dadd(-404, -702.5, 192, 1.2)
pt3dadd(-405.5, -705.5, 192.5, 0.9)
pt3dadd(-407.5, -706.5, 199.5, 0.8)
pt3dadd(-409.5, -708.5, 197.5, 0.7)
pt3dadd(-412, -708, 203.5, 1.4)
pt3dadd(-418.5, -708.5, 209, 1.4)
pt3dadd(-422, -709, 209.5, 1.3)
pt3dadd(-426, -709, 210.5, 1.1)
pt3dadd(-428, -710.5, 206.5, 0.7)
pt3dadd(-429.5, -713, 209.5, 0.2)
pt3dadd(-431.5, -719, 211, 1)
pt3dadd(-434.5, -720.5, 211.5, 1.1)
pt3dadd(-438, -722, 212, 1.5)
pt3dadd(-444.5, -724, 219.5, 1.6)
pt3dadd(-448.5, -726, 220.5, 1.6)
pt3dadd(-450.5, -727.5, 220.5, 1.6)
pt3dadd(-453.5, -729.5, 224, 1.6)
pt3dadd(-456, -732, 225, 1.6)
pt3dadd(-463, -736, 225.5, 1.1)
pt3dadd(-465, -738, 229, 1.2)
pt3dadd(-469.5, -741.5, 233.5, 1)
pt3dadd(-472.5, -744.5, 227, 0.9)
pt3dadd(-474, -746.5, 230.5, 0.9)
pt3dadd(-477, -747.5, 231, 1)
pt3dadd(-479.5, -749, 231, 1.2)
pt3dadd(-485.5, -754.5, 231.5, 1.2)
pt3dadd(-489, -754.5, 232, 1.2)
pt3dadd(-492.5, -757.5, 236, 0.9)
pt3dadd(-495, -759, 239.5, 0.6)
pt3dadd(-498, -762, 236.5, 0.6)
pt3dadd(-503.5, -762.5, 237, 1.4)
pt3dadd(-506.5, -764.5, 237, 1.4)
pt3dadd(-509.5, -764.5, 241, 0.8)
pt3dadd(-512.5, -764.5, 234.5, 0.8)
pt3dadd(-514.5, -767.5, 234.5, 0.3)
}
}
proc shape3d_24() {
dend[101] { pt3dadd(-517.5, -768.5, 238.5, 0.3)
pt3dadd(-520, -770, 242, 0.3)
pt3dadd(-522, -771.5, 239, 0.3)
pt3dadd(-527.5, -774, 236, 0.9)
pt3dadd(-531, -775, 236.5, 0.9)
pt3dadd(-532.5, -776.5, 236.5, 0.9)
pt3dadd(-536, -777, 236.5, 0.9)
pt3dadd(-538.5, -780.5, 240.5, 0.7)
pt3dadd(-539.5, -784, 241, 0.7)
pt3dadd(-542, -785.5, 241, 0.7)
pt3dadd(-545.5, -790.5, 234.5, 1.3)
pt3dadd(-550, -792, 238.5, 0.7)
pt3dadd(-552, -794, 238.5, 0.7)
pt3dadd(-554, -795.5, 242.5, 0.9)
pt3dadd(-557, -797.5, 239.5, 1.1)
pt3dadd(-562, -799, 239.5, 0.4)
pt3dadd(-561, -801, 243.5, 0.4)
pt3dadd(-562.5, -802.5, 243.5, 1.7)
pt3dadd(-566.5, -803.5, 247.5, 0.7)
pt3dadd(-570, -803.5, 247.5, 0.7)
pt3dadd(-571.5, -805.5, 252, 0.7)
pt3dadd(-575.5, -804.5, 248.5, 0.7)
pt3dadd(-577.5, -807, 249, 0.9)
pt3dadd(-581, -809, 249.5, 0.6)
pt3dadd(-581.5, -811.5, 249.5, 0.7)
pt3dadd(-582, -814.5, 246, 0.9)
pt3dadd(-583.5, -816, 254, 1.5)
pt3dadd(-584.5, -818.5, 254.5, 0.5)
pt3dadd(-584.5, -822.5, 254.5, 0.9)
pt3dadd(-586, -827, 255, 0.7)
pt3dadd(-588, -829.5, 259, 0.7)
pt3dadd(-589.5, -832.5, 259, 0.7)
pt3dadd(-592, -835.5, 259.5, 0.7)
pt3dadd(-590.5, -837, 249, 0.7)
pt3dadd(-589.5, -840, 249.5, 0.9)
pt3dadd(-590.5, -843, 253, 0.9)
pt3dadd(-593, -844.5, 257.5, 0.6)
pt3dadd(-593.5, -848, 257.5, 0.5)
pt3dadd(-594, -854.5, 247.5, 1.1)
pt3dadd(-595, -857, 244.5, 1.3)
pt3dadd(-595, -861, 248.5, 1.1)
pt3dadd(-597, -863, 248.5, 0.8)
pt3dadd(-598.5, -865.5, 249, 0.8)
pt3dadd(-601, -866.5, 249, 0.8)
pt3dadd(-601, -869.5, 249, 0.9)
pt3dadd(-600.5, -872.5, 249.5, 0.7)
pt3dadd(-605.5, -878, 243, 0.7)
pt3dadd(-607, -879.5, 254.5, 1)
pt3dadd(-610, -881, 251, 1.2)
pt3dadd(-613, -881, 251.5, 1.2)
pt3dadd(-618, -881, 251.5, 0.7)
pt3dadd(-622, -883, 252, 0.6)
pt3dadd(-624, -881.5, 249, 0.6)
pt3dadd(-626, -880, 249, 0.6)
pt3dadd(-629, -879.5, 249, 1.3)
pt3dadd(-632.5, -879, 246, 0.6)
pt3dadd(-634.5, -880, 250, 0.6)
pt3dadd(-639.5, -880, 250, 0.6)
pt3dadd(-643, -879.5, 247, 0.6)
pt3dadd(-649, -880.5, 247.5, 0.8)
pt3dadd(-653.5, -880.5, 248, 0.9)
pt3dadd(-655.5, -882.5, 255.5, 0.6)
pt3dadd(-659, -882.5, 255.5, 0.6)
pt3dadd(-662.5, -883, 256, 0.6)
pt3dadd(-664.5, -884.5, 256, 0.8)
pt3dadd(-667.5, -884.5, 256, 0.6)
pt3dadd(-669.5, -882.5, 253, 0.6)
pt3dadd(-671.5, -880.5, 250, 0.6)
pt3dadd(-674.5, -880.5, 257.5, 0.6)
pt3dadd(-679, -880.5, 265, 0.6)
pt3dadd(-680.5, -882.5, 269.5, 0.6)
pt3dadd(-682.5, -880, 273, 0.6)
pt3dadd(-687, -879.5, 273.5, 0.6)
pt3dadd(-692, -880.5, 275, 0.9)
}
dend[102] {pt3dclear()
pt3dadd(-120, -365.5, 105.5, 4.4)
pt3dadd(-118, -369.5, 110, 2.8)
pt3dadd(-113, -373.5, 114, 2)
pt3dadd(-112.5, -377.5, 115, 2)
pt3dadd(-113.5, -380, 116, 1.7)
pt3dadd(-114.5, -383, 116.5, 1.9)
pt3dadd(-114, -386, 117.5, 1.9)
pt3dadd(-112, -389, 125, 2.2)
pt3dadd(-116.5, -391, 128.5, 3.2)
pt3dadd(-121.5, -396.5, 133.5, 2.3)
pt3dadd(-121, -402, 136, 2.3)
pt3dadd(-120.5, -407, 140.5, 2.3)
pt3dadd(-122, -411, 143.5, 1.5)
pt3dadd(-128.5, -412, 144.5, 1.6)
pt3dadd(-133, -415, 148.5, 1.8)
pt3dadd(-133.5, -418, 149, 1.9)
pt3dadd(-133.5, -423, 150.5, 1.5)
pt3dadd(-133.5, -426, 148, 1.7)
pt3dadd(-134.5, -434, 152.5, 1.6)
pt3dadd(-136.5, -438, 153.5, 1.7)
pt3dadd(-138.5, -441, 154, 1.8)
pt3dadd(-140, -446.5, 163, 1.8)
pt3dadd(-139.5, -449, 163.5, 1.7)
pt3dadd(-141, -457, 158.5, 1.6)
pt3dadd(-142.5, -462.5, 168, 1.2)
pt3dadd(-143.5, -467.5, 172, 1.7)
pt3dadd(-146.5, -472.5, 177, 2)
pt3dadd(-145.5, -474.5, 174, 2.3)
pt3dadd(-143.5, -479, 175, 2.5)
pt3dadd(-142.5, -483.5, 178, 2)
pt3dadd(-141, -488, 181.5, 2)
pt3dadd(-140.5, -491, 185, 2)
pt3dadd(-141, -494, 185.5, 2.3)
pt3dadd(-142, -496.5, 185.5, 2.7)
pt3dadd(-139.5, -498.5, 181, 2.8)
pt3dadd(-138.5, -502.5, 190.5, 1.6)
pt3dadd(-138.5, -505.5, 191, 2)
pt3dadd(-141, -506.5, 191.5, 2)
pt3dadd(-141.5, -509, 192, 1.4)
pt3dadd(-139.5, -511, 192.5, 1.6)
pt3dadd(-138, -514, 193, 1.5)
pt3dadd(-137, -517, 193, 1.6)
pt3dadd(-136, -522.5, 194, 1.6)
pt3dadd(-134, -525, 197, 2.3)
pt3dadd(-129.5, -527, 201, 1.1)
pt3dadd(-130.5, -530.5, 201.5, 1.6)
pt3dadd(-132.5, -533.5, 202, 1.9)
pt3dadd(-133.5, -538.5, 202.5, 2.2)
pt3dadd(-132, -542, 201, 1.1)
pt3dadd(-129, -545, 207.5, 1.4)
pt3dadd(-130.5, -548.5, 205, 1.4)
pt3dadd(-130, -551, 205.5, 1.6)
pt3dadd(-136, -557.5, 212.5, 1.6)
pt3dadd(-138.5, -562, 211.5, 1.6)
pt3dadd(-137, -568, 212.5, 1.3)
pt3dadd(-135, -569, 213, 1.7)
pt3dadd(-133, -576.5, 211.5, 1.7)
pt3dadd(-131.5, -578, 211.5, 1.4)
pt3dadd(-132, -583, 215.5, 1.6)
pt3dadd(-134, -586, 216, 2)
pt3dadd(-134, -590, 216.5, 2)
pt3dadd(-133.5, -594, 217.5, 1.3)
pt3dadd(-135, -600, 221, 1.1)
pt3dadd(-137, -602.5, 226.5, 1.2)
pt3dadd(-138.5, -605.5, 225, 2.1)
pt3dadd(-140.5, -615.5, 234.5, 1.6)
pt3dadd(-143, -620, 240.5, 1.2)
pt3dadd(-145, -621.5, 241, 1.7)
pt3dadd(-144.5, -628.5, 240.5, 1)
pt3dadd(-147.5, -629, 241, 1)
pt3dadd(-151, -632.5, 246, 1.1)
pt3dadd(-152, -635.5, 246.5, 0.7)
pt3dadd(-150, -638, 251.5, 0.5)
pt3dadd(-152, -639.5, 252, 0.8)
pt3dadd(-154.5, -643, 253, 1.3)
pt3dadd(-156, -645, 253.5, 1.2)
pt3dadd(-158.5, -646, 258, 1.3)
pt3dadd(-160, -647.5, 255, 1.3)
pt3dadd(-161, -650, 255.5, 1.3)
pt3dadd(-164.5, -652, 264, 0.9)
pt3dadd(-166.5, -654.5, 265, 1.2)
pt3dadd(-169.5, -654.5, 269, 1.2)
pt3dadd(-169, -657, 273.5, 1.2)
pt3dadd(-168.5, -659.5, 274, 1.2)
pt3dadd(-170.5, -661.5, 275, 1.2)
pt3dadd(-173.5, -657.5, 280.5, 1)
pt3dadd(-171, -654.5, 278, 0.6)
pt3dadd(-168.5, -657, 288, 0.6)
pt3dadd(-167.5, -659.5, 298.5, 0.8)
pt3dadd(-165.5, -658, 295.5, 0.6)
pt3dadd(-164, -661, 306.5, 1)
pt3dadd(-166, -662.5, 316, 2.2)
pt3dadd(-169, -667, 325, 2.2)
}
dend[103] {pt3dclear()
pt3dadd(-98.5, -294, 96.5, 4.8)
pt3dadd(-101.5, -295, 99.5, 0.9)
pt3dadd(-104.5, -295, 99.5, 0.9)
pt3dadd(-109, -297.5, 99.5, 0.8)
pt3dadd(-109, -300.5, 102.5, 0.8)
pt3dadd(-111.5, -304.5, 100, 0.8)
pt3dadd(-113.5, -307.5, 103, 0.8)
pt3dadd(-115, -310, 103, 0.8)
pt3dadd(-120, -316.5, 105.5, 1.4)
pt3dadd(-120, -320.5, 108.5, 0.5)
pt3dadd(-122, -322.5, 108.5, 0.8)
pt3dadd(-122.5, -327, 111, 0.8)
pt3dadd(-124, -330.5, 111, 0.8)
pt3dadd(-128, -331.5, 108.5, 0.3)
pt3dadd(-131.5, -334.5, 114, 0.3)
pt3dadd(-137.5, -340, 111, 0.2)
pt3dadd(-141, -344, 111, 0.2)
pt3dadd(-142.5, -346.5, 108.5, 0.2)
pt3dadd(-144, -349, 111, 0.2)
pt3dadd(-147, -351.5, 111, 0.2)
pt3dadd(-148.5, -354, 111, 0.2)
pt3dadd(-151, -357, 111, 0.1)
pt3dadd(-152.5, -361.5, 111, 0.1)
pt3dadd(-156.5, -362.5, 111, 0.1)
pt3dadd(-160.5, -366, 108.5, 0.1)
pt3dadd(-164, -367, 108.5, 0.1)
pt3dadd(-166.5, -372, 108.5, 0.1)
pt3dadd(-173, -376, 108.5, 0.1)
pt3dadd(-176, -376, 105.5, 0.1)
pt3dadd(-179, -377, 114, 0.1)
pt3dadd(-182.5, -379, 114, 0.1)
pt3dadd(-187, -379, 108.5, 0.1)
pt3dadd(-189.5, -383.5, 108.5, 0.1)
}
}
proc shape3d_25() {
dend[103] { pt3dadd(-193.5, -383.5, 111, 0.1)
pt3dadd(-199.5, -383.5, 111, 0.1)
pt3dadd(-200.5, -386, 111, 0.1)
pt3dadd(-203.5, -387, 111, 0.1)
pt3dadd(-206.5, -389, 111, 0.1)
pt3dadd(-211, -389, 111, 0.1)
pt3dadd(-213.5, -390.5, 114, 0.1)
pt3dadd(-215, -394, 105.5, 0.1)
}
dend[104] {pt3dclear()
pt3dadd(-48, -179.5, 99.5, 6.1)
pt3dadd(-51.5, -184.5, 99.5, 3.5)
pt3dadd(-49, -187.5, 105.5, 3.5)
pt3dadd(-47.5, -193, 104, 3.5)
pt3dadd(-47.5, -196, 104, 4)
pt3dadd(-49, -194.5, 104, 2.7)
pt3dadd(-54.5, -193.5, 107, 2.7)
pt3dadd(-60, -190.5, 107, 3.1)
pt3dadd(-61.5, -189, 116, 3)
pt3dadd(-65, -189.5, 122, 3)
pt3dadd(-69, -193.5, 124.5, 3)
pt3dadd(-71, -196, 125, 3)
pt3dadd(-72.5, -198.5, 133.5, 3.4)
pt3dadd(-74, -202, 134.5, 3.3)
pt3dadd(-80.5, -197.5, 141, 3.2)
pt3dadd(-84, -195, 142, 3.2)
pt3dadd(-86, -196, 160, 3.7)
pt3dadd(-88, -202, 160, 2.7)
pt3dadd(-88, -206, 161, 2.8)
pt3dadd(-89, -210.5, 175, 3.2)
pt3dadd(-87, -215, 185, 2.7)
pt3dadd(-87.5, -219, 197, 4)
}
dend[105] {pt3dclear()
pt3dadd(-87.5, -219, 197, 4)
pt3dadd(-90.5, -214.5, 198, 1.7)
pt3dadd(-92.5, -211.5, 200.5, 1.9)
pt3dadd(-99, -206.5, 203, 1.5)
pt3dadd(-99.5, -204, 201, 1.5)
pt3dadd(-95, -204.5, 209, 1.9)
pt3dadd(-96, -202, 207, 1.7)
pt3dadd(-99.5, -198.5, 211, 1.9)
pt3dadd(-100.5, -193, 221, 1.9)
pt3dadd(-103.5, -193, 217, 1.7)
pt3dadd(-105.5, -191.5, 217.5, 2.1)
pt3dadd(-107.5, -188, 224.5, 1.9)
pt3dadd(-109.5, -183, 225.5, 1.6)
pt3dadd(-111, -179.5, 226.5, 1.6)
pt3dadd(-111, -176.5, 225, 1.6)
pt3dadd(-111, -172, 225, 2)
pt3dadd(-112, -165, 228.5, 1.8)
pt3dadd(-114.5, -161, 229, 1.8)
pt3dadd(-114, -157.5, 229, 1.8)
pt3dadd(-111.5, -154, 232.5, 1.8)
pt3dadd(-111, -149, 229.5, 1.6)
pt3dadd(-109, -148, 236.5, 1.6)
pt3dadd(-109.5, -145.5, 236.5, 1.7)
pt3dadd(-110, -140, 233, 1.5)
pt3dadd(-110, -137, 233, 1.4)
pt3dadd(-111.5, -135.5, 233.5, 1.3)
pt3dadd(-109, -128, 237, 1.7)
pt3dadd(-106.5, -125.5, 237, 1.4)
pt3dadd(-105.5, -123.5, 237, 1.4)
pt3dadd(-103.5, -121.5, 237, 1.5)
pt3dadd(-103, -117, 237.5, 2)
pt3dadd(-100.5, -113.5, 237.5, 1.7)
pt3dadd(-98, -110, 237.5, 1.2)
pt3dadd(-98, -101.5, 234, 1.6)
pt3dadd(-99, -98, 234.5, 1.6)
pt3dadd(-97, -93.5, 234.5, 1.3)
pt3dadd(-94.5, -90, 238, 0.9)
pt3dadd(-94.5, -87, 238, 1.1)
pt3dadd(-92.5, -85, 238, 1.2)
pt3dadd(-89.5, -81, 238.5, 1.3)
pt3dadd(-86.5, -79.5, 238.5, 1.3)
pt3dadd(-86.5, -75, 238.5, 1.3)
pt3dadd(-85.5, -67.5, 238.5, 1.3)
pt3dadd(-85, -64.5, 238.5, 1.4)
pt3dadd(-87, -61, 243, 1.1)
pt3dadd(-88, -58.5, 243, 1.3)
pt3dadd(-88, -54, 243, 1.1)
pt3dadd(-90, -52, 243, 1.1)
pt3dadd(-92.5, -44.5, 250.5, 1.4)
pt3dadd(-93, -39, 247, 1.2)
pt3dadd(-93, -35, 247, 1.2)
pt3dadd(-95, -34, 247, 1.2)
pt3dadd(-96.5, -32.5, 247.5, 1.1)
pt3dadd(-96.5, -28, 247.5, 1.1)
pt3dadd(-97.5, -25, 251, 0.8)
pt3dadd(-100.5, -24.5, 251, 0.8)
pt3dadd(-102.5, -19.5, 248, 0.9)
pt3dadd(-103.5, -16, 248, 0.8)
pt3dadd(-105, -14, 248, 0.8)
pt3dadd(-107, -12.5, 244.5, 0.4)
pt3dadd(-108.5, -10, 244.5, 0.4)
pt3dadd(-106, -6.5, 244.5, 0.8)
pt3dadd(-105, 0, 245, 1.1)
pt3dadd(-105, 3.5, 245, 1.5)
pt3dadd(-105.5, 6, 252.5, 1.9)
pt3dadd(-107.5, 7.5, 249, 1.4)
pt3dadd(-109.5, 10, 249, 1.1)
pt3dadd(-112, 12, 245.5, 0.9)
pt3dadd(-112.5, 15.5, 245.5, 1.7)
pt3dadd(-113.5, 17.5, 245.5, 0.8)
pt3dadd(-114.5, 24.5, 253, 1)
pt3dadd(-114, 27, 253, 1)
pt3dadd(-115, 29, 253, 1.1)
pt3dadd(-118, 30.5, 253, 1.3)
pt3dadd(-121, 32, 253, 1.2)
pt3dadd(-122.5, 34, 250, 0.9)
pt3dadd(-125.5, 37, 250, 0.9)
pt3dadd(-127, 40.5, 250, 0.9)
pt3dadd(-128.5, 45, 250, 0.9)
pt3dadd(-129, 50, 243, 0.6)
pt3dadd(-132, 51, 247, 0.6)
pt3dadd(-135, 52.5, 254, 0.5)
pt3dadd(-137, 55.5, 251, 0.5)
pt3dadd(-136.5, 59.5, 254.5, 0.7)
pt3dadd(-138, 62, 254.5, 0.7)
pt3dadd(-140, 63, 254.5, 0.7)
pt3dadd(-141, 67, 251, 0.3)
pt3dadd(-142, 70.5, 251.5, 0.3)
pt3dadd(-145, 73.5, 255, 0.3)
pt3dadd(-145, 76.5, 255, 0.3)
pt3dadd(-146, 82.5, 255, 0.2)
pt3dadd(-148, 84.5, 255, 0.2)
pt3dadd(-149.5, 86, 259, 0.2)
pt3dadd(-151.5, 89, 259, 0.2)
pt3dadd(-155.5, 92, 262.5, 0.2)
pt3dadd(-156.5, 96.5, 266, 0.2)
pt3dadd(-159.5, 99.5, 266, 0.2)
pt3dadd(-163.5, 101.5, 266.5, 0.2)
pt3dadd(-167, 103, 270, 0.4)
pt3dadd(-171.5, 105, 259.5, 0.3)
pt3dadd(-174.5, 105, 260, 0.2)
pt3dadd(-177, 105.5, 260, 0.2)
pt3dadd(-179.5, 107.5, 267, 0.2)
pt3dadd(-182.5, 108.5, 260, 0.2)
pt3dadd(-185, 109.5, 257, 0.1)
pt3dadd(-188.5, 113, 264, 0.1)
pt3dadd(-190, 114.5, 264, 0.1)
pt3dadd(-190, 118.5, 267.5, 0.1)
pt3dadd(-190, 122.5, 268, 0.1)
pt3dadd(-190, 127.5, 271.5, 0.1)
pt3dadd(-189.5, 130, 258, 0.1)
pt3dadd(-200, 133.5, 258, 1.1)
pt3dadd(-202.5, 136.5, 256, 1.3)
pt3dadd(-204.5, 139, 256.5, 1.3)
pt3dadd(-209, 142, 257.5, 0.6)
pt3dadd(-209, 148, 258.5, 0.6)
pt3dadd(-212, 149.5, 259, 0.6)
pt3dadd(-213.5, 151, 259.5, 0.6)
pt3dadd(-215.5, 154, 267, 0.6)
pt3dadd(-218.5, 155, 267.5, 0.6)
pt3dadd(-220, 160, 268.5, 0.5)
pt3dadd(-222, 161.5, 269, 0.5)
}
dend[106] {pt3dclear()
pt3dadd(-87.5, -219, 197, 4)
pt3dadd(-88, -222.5, 195, 2.3)
pt3dadd(-89.5, -224, 195.5, 1.9)
pt3dadd(-94, -227, 199, 2)
pt3dadd(-98, -226.5, 199.5, 1.8)
pt3dadd(-101, -229, 200.5, 2.5)
pt3dadd(-99, -230, 200.5, 2.7)
pt3dadd(-97, -232, 203.5, 2.1)
pt3dadd(-95.5, -235, 202, 1.8)
pt3dadd(-98.5, -240.5, 209, 3)
pt3dadd(-100, -242.5, 209.5, 2.7)
pt3dadd(-101, -244.5, 213, 2.6)
pt3dadd(-102, -249.5, 216.5, 2.5)
pt3dadd(-104.5, -254.5, 217.5, 2.7)
pt3dadd(-106, -257.5, 220.5, 2.6)
pt3dadd(-109, -264.5, 219, 2.5)
pt3dadd(-106.5, -272, 232, 2.3)
pt3dadd(-104.5, -273.5, 237, 1.6)
pt3dadd(-104.5, -277.5, 238.5, 1.8)
pt3dadd(-108.5, -280.5, 241, 1.6)
pt3dadd(-111, -283, 261.5, 2.2)
pt3dadd(-110, -280.5, 262.5, 2.4)
pt3dadd(-117.5, -277, 265.5, 2.8)
pt3dadd(-117, -280.5, 267, 2.2)
pt3dadd(-115.5, -282.5, 268, 2.5)
pt3dadd(-117, -284.5, 273, 2.7)
pt3dadd(-118.5, -286.5, 274, 2.5)
pt3dadd(-121.5, -286.5, 284, 1.7)
pt3dadd(-124.5, -285, 288.5, 1.9)
pt3dadd(-121.5, -288, 284.5, 1.9)
pt3dadd(-120, -293.5, 287.5, 1.2)
pt3dadd(-121, -295.5, 296, 1.2)
pt3dadd(-124, -294.5, 294.5, 1.2)
pt3dadd(-124, -291.5, 295.5, 1.2)
pt3dadd(-125, -288, 316.5, 1.6)
pt3dadd(-127.5, -285, 315, 1.6)
pt3dadd(-129, -287, 313, 1.6)
pt3dadd(-130, -290.5, 314, 1.6)
pt3dadd(-131.5, -292.5, 322.5, 1.2)
pt3dadd(-134.5, -294, 323.5, 1.2)
pt3dadd(-137.5, -295.5, 325, 1.2)
pt3dadd(-138, -299.5, 326.5, 2.5)
pt3dadd(-137.5, -302.5, 327.5, 2.5)
pt3dadd(-139, -299, 340, 2.5)
pt3dadd(-146.5, -294, 343.5, 2.2)
pt3dadd(-148.5, -290, 348, 1.7)
pt3dadd(-146.5, -293.5, 350.5, 1.6)
pt3dadd(-150, -293.5, 352, 1.6)
}
}
proc shape3d_26() {
dend[106] { pt3dadd(-154.5, -289, 358.5, 1.3)
pt3dadd(-158, -288.5, 360, 1.3)
pt3dadd(-157, -292, 361.5, 1.4)
pt3dadd(-156, -290, 369.5, 1.2)
pt3dadd(-153.5, -288.5, 371, 2.1)
pt3dadd(-151.5, -287, 375, 2.4)
pt3dadd(-153, -288.5, 370, 1.8)
pt3dadd(-155, -286.5, 379.5, 1.8)
pt3dadd(-154.5, -283, 384.5, 1.8)
pt3dadd(-157, -281.5, 382, 1.8)
pt3dadd(-159.5, -281, 383, 1.8)
pt3dadd(-161.5, -280, 383.5, 1.8)
pt3dadd(-164, -280.5, 381.5, 1.8)
pt3dadd(-164, -284.5, 392, 2.2)
pt3dadd(-164, -288.5, 402, 2.1)
pt3dadd(-162, -285, 403.5, 2.1)
pt3dadd(-160.5, -287, 412.5, 1.9)
pt3dadd(-164, -291.5, 414, 1.9)
pt3dadd(-167.5, -292.5, 419, 2.1)
pt3dadd(-170, -294, 424, 2.3)
pt3dadd(-173, -295, 425, 2)
pt3dadd(-176, -295, 426, 1.3)
pt3dadd(-178.5, -293, 426, 1.8)
pt3dadd(-182, -293, 427.5, 1.8)
pt3dadd(-182.5, -296, 433.5, 1.6)
pt3dadd(-186, -295.5, 437, 1.6)
pt3dadd(-187, -297, 443, 1.2)
pt3dadd(-186.5, -300, 457, 1.7)
pt3dadd(-188, -304.5, 459.5, 1.7)
pt3dadd(-189.5, -302.5, 461, 1.8)
pt3dadd(-192, -302, 462, 1.9)
pt3dadd(-195, -300.5, 467, 1.6)
pt3dadd(-197, -299.5, 468, 1.3)
pt3dadd(-195, -307, 473.5, 2)
pt3dadd(-194.5, -309.5, 475, 1.6)
pt3dadd(-198, -311.5, 475.5, 1.1)
pt3dadd(-202.5, -314.5, 487, 1.1)
pt3dadd(-205.5, -311, 488.5, 1.3)
pt3dadd(-210.5, -314.5, 499, 1.3)
pt3dadd(-211.5, -320.5, 510, 1.2)
pt3dadd(-215.5, -321.5, 515, 1.4)
pt3dadd(-220.5, -318, 521.5, 1.5)
pt3dadd(-225, -318, 519, 1.2)
pt3dadd(-227, -319, 529, 1.3)
pt3dadd(-230.5, -319, 530, 1.4)
pt3dadd(-236.5, -320, 525, 2.2)
pt3dadd(-239, -321.5, 530, 1.3)
pt3dadd(-241, -322.5, 530.5, 1.5)
pt3dadd(-246.5, -322.5, 541.5, 1.3)
pt3dadd(-249, -327, 542.5, 1.3)
pt3dadd(-250, -329, 543, 1.1)
pt3dadd(-254.5, -329.5, 543.5, 1.2)
pt3dadd(-256.5, -331.5, 544, 0.9)
pt3dadd(-260, -333.5, 554.5, 0.9)
pt3dadd(-266, -337, 556, 0.9)
pt3dadd(-270.5, -337, 541.5, 0.8)
pt3dadd(-270.5, -341, 563, 0.8)
pt3dadd(-273, -340.5, 563, 0.8)
pt3dadd(-276, -340.5, 573.5, 0.8)
pt3dadd(-279, -344, 574.5, 0.8)
pt3dadd(-282.5, -348, 572, 1.2)
pt3dadd(-285, -350, 572.5, 1.1)
pt3dadd(-289, -353, 573.5, 1.1)
pt3dadd(-292.5, -354, 574, 1.1)
pt3dadd(-295, -355, 574.5, 1.1)
pt3dadd(-296.5, -355, 575, 1.2)
}
dend[107] {pt3dclear()
pt3dadd(-1, -119, 50.5, 8.4)
pt3dadd(4, -122.5, 57, 3.1)
pt3dadd(6.5, -124.5, 59, 2.3)
pt3dadd(12, -129, 75, 2.9)
pt3dadd(15, -132, 70, 2.1)
pt3dadd(18, -137, 73.5, 2.3)
pt3dadd(24.5, -142, 77.5, 1.6)
pt3dadd(31.5, -148, 76, 1.6)
pt3dadd(34, -149, 76, 1.9)
pt3dadd(39.5, -152.5, 77, 1.7)
pt3dadd(42, -154, 80.5, 1.5)
pt3dadd(47, -157.5, 84, 1.5)
pt3dadd(49.5, -160, 84.5, 1.5)
pt3dadd(51.5, -163, 85, 1.8)
pt3dadd(54, -163.5, 85, 1.8)
pt3dadd(56, -165, 85.5, 2.2)
pt3dadd(58, -170, 86, 1.5)
pt3dadd(60, -172, 86.5, 1.5)
pt3dadd(62, -173, 86.5, 1.3)
pt3dadd(66.5, -176, 85, 1.2)
pt3dadd(68, -177.5, 88, 1.3)
pt3dadd(71.5, -183, 89, 2.4)
pt3dadd(75, -184.5, 89, 1.6)
pt3dadd(78.5, -186, 93, 1.6)
pt3dadd(81.5, -186.5, 93, 1.5)
pt3dadd(82.5, -190, 93.5, 1.5)
pt3dadd(85, -193.5, 94, 1.5)
pt3dadd(86, -196, 94.5, 1.1)
pt3dadd(85, -200.5, 98, 1.1)
pt3dadd(87.5, -201, 98.5, 1.3)
pt3dadd(89.5, -203, 99, 1.2)
pt3dadd(91, -204.5, 99, 1.2)
pt3dadd(92.5, -206, 105.5, 1)
pt3dadd(95.5, -208, 106, 1.6)
pt3dadd(98.5, -212, 103.5, 1)
pt3dadd(103, -214, 104, 0.7)
pt3dadd(101.5, -221.5, 108, 0.9)
pt3dadd(102.5, -229, 109.5, 1.3)
pt3dadd(104, -236, 110, 1.4)
pt3dadd(104.5, -245.5, 117.5, 0.9)
pt3dadd(107, -247.5, 117.5, 0.9)
pt3dadd(111, -252, 121.5, 1.1)
pt3dadd(111, -256, 119.5, 1.8)
pt3dadd(113, -258, 120, 1.2)
pt3dadd(115, -259.5, 120, 1.2)
pt3dadd(119, -267.5, 121, 0.9)
pt3dadd(122.5, -269, 124.5, 1.2)
pt3dadd(125.5, -272, 125, 1.4)
pt3dadd(128, -275.5, 125, 0.6)
pt3dadd(130.5, -277.5, 125, 0.8)
pt3dadd(130, -283, 128.5, 1.1)
pt3dadd(135, -287, 135.5, 1.2)
pt3dadd(135.5, -290, 123, 0.8)
pt3dadd(136, -293, 123, 0.9)
pt3dadd(138, -298, 130, 0.9)
pt3dadd(138.5, -301, 130, 0.8)
pt3dadd(141, -304, 130, 0.8)
pt3dadd(143, -305, 130, 0.9)
pt3dadd(144, -307, 130.5, 1.9)
pt3dadd(143.5, -310, 130.5, 0.9)
pt3dadd(143.5, -313.5, 130.5, 1.6)
pt3dadd(143.5, -317.5, 130.5, 0.9)
pt3dadd(145, -319.5, 131, 0.9)
pt3dadd(145, -323, 131, 0.8)
pt3dadd(144, -325.5, 131, 0.6)
pt3dadd(144, -330.5, 131.5, 0.6)
pt3dadd(145.5, -334, 131.5, 1)
pt3dadd(145.5, -337, 138.5, 1)
pt3dadd(145.5, -340, 139, 1.3)
pt3dadd(146.5, -347.5, 142.5, 0.8)
pt3dadd(147, -352, 139.5, 0.8)
pt3dadd(148.5, -357.5, 140, 0.8)
pt3dadd(148.5, -360.5, 140, 0.8)
pt3dadd(148, -366, 137, 0.8)
pt3dadd(146, -368, 137, 0.8)
pt3dadd(146, -371.5, 140.5, 0.8)
pt3dadd(140.5, -374.5, 131, 2)
pt3dadd(137.5, -380.5, 138, 1.2)
pt3dadd(135, -383, 138.5, 0.9)
pt3dadd(133.5, -385, 138.5, 1.2)
pt3dadd(129, -391.5, 129.5, 0.8)
pt3dadd(129.5, -394.5, 129.5, 0.8)
pt3dadd(126, -400, 129.5, 0.6)
pt3dadd(123, -403.5, 130, 0.6)
pt3dadd(122.5, -406.5, 130, 1.1)
pt3dadd(121, -411, 130, 0.8)
pt3dadd(120.5, -413.5, 130.5, 0.8)
pt3dadd(121, -416.5, 130.5, 0.8)
pt3dadd(119, -419.5, 130.5, 0.8)
pt3dadd(118, -422.5, 130.5, 0.8)
pt3dadd(115.5, -427, 131, 0.6)
pt3dadd(114, -429.5, 131, 0.6)
pt3dadd(112, -432.5, 131, 0.6)
pt3dadd(110, -434, 135, 0.7)
pt3dadd(110.5, -438, 135, 1.4)
pt3dadd(110.5, -441, 135, 0.7)
pt3dadd(108, -445, 132, 1.1)
pt3dadd(111, -448.5, 138.5, 0.5)
}
dend[108] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 2.4)
pt3dadd(33.5, 4, 19.5, 2.4)
pt3dadd(37.5, 6.5, 20.5, 2.4)
pt3dadd(39, 9.5, 21.5, 1.8)
pt3dadd(42.5, 11, 25, 1.7)
pt3dadd(45.5, 16, 23.5, 2)
pt3dadd(47.5, 18, 24, 2.1)
pt3dadd(50, 21, 25, 2.1)
pt3dadd(52.5, 26, 26, 1.5)
pt3dadd(54, 27.5, 29, 1.2)
pt3dadd(56, 29.5, 29.5, 1.5)
pt3dadd(59, 34, 30.5, 2)
pt3dadd(60.5, 38, 31.5, 1.3)
pt3dadd(60, 45, 36.5, 1.8)
pt3dadd(58.5, 51.5, 38.5, 1.8)
pt3dadd(57.5, 59.5, 42.5, 1.2)
pt3dadd(56.5, 62.5, 43, 1.1)
pt3dadd(56.5, 66.5, 44, 1.3)
pt3dadd(59, 72, 43.5, 1.2)
pt3dadd(59.5, 77.5, 49.5, 1.3)
pt3dadd(59.5, 80.5, 53, 1.3)
pt3dadd(56.5, 86.5, 57.5, 1.1)
pt3dadd(55, 89, 63, 1.1)
pt3dadd(53, 91.5, 63.5, 1.1)
pt3dadd(52.5, 96.5, 65, 1.1)
pt3dadd(52.5, 100, 65.5, 0.9)
pt3dadd(50.5, 109.5, 68, 0.9)
pt3dadd(51, 115.5, 69, 0.9)
pt3dadd(51, 121, 70, 0.8)
pt3dadd(52, 126, 74, 0.8)
pt3dadd(53.5, 130.5, 75, 0.7)
pt3dadd(52.5, 134.5, 69.5, 1)
pt3dadd(53, 138, 72.5, 1)
pt3dadd(53.5, 140.5, 72.5, 1)
pt3dadd(51.5, 142.5, 72.5, 1)
pt3dadd(52, 145.5, 73, 1)
}
}
proc shape3d_27() {
dend[108] { pt3dadd(52, 148.5, 73, 0.8)
pt3dadd(53.5, 151, 73.5, 0.9)
pt3dadd(52.5, 160.5, 71.5, 1)
pt3dadd(52.5, 163.5, 74, 1)
pt3dadd(52.5, 166.5, 77.5, 1.4)
pt3dadd(51.5, 168.5, 77.5, 1.1)
pt3dadd(54, 172.5, 75, 0.8)
pt3dadd(54, 176, 75, 0.8)
pt3dadd(53.5, 181, 75.5, 1)
pt3dadd(54.5, 185, 75.5, 1)
pt3dadd(54.5, 188, 75.5, 1)
pt3dadd(57, 190.5, 76, 0.9)
pt3dadd(59.5, 197.5, 82, 0.6)
pt3dadd(60.5, 200.5, 79.5, 0.7)
pt3dadd(59, 205, 80, 0.8)
pt3dadd(57, 212, 77.5, 0.8)
pt3dadd(56.5, 215.5, 77.5, 0.8)
pt3dadd(57, 218.5, 75.5, 0.7)
pt3dadd(57.5, 221, 75.5, 0.9)
pt3dadd(56.5, 224, 81.5, 0.7)
pt3dadd(57.5, 227, 81.5, 0.7)
pt3dadd(56.5, 231.5, 82, 0.8)
pt3dadd(56.5, 236.5, 82, 0.8)
pt3dadd(55, 241.5, 85, 0.5)
pt3dadd(52.5, 243.5, 85, 0.6)
pt3dadd(51, 246.5, 85.5, 0.8)
pt3dadd(52, 248.5, 85.5, 0.8)
pt3dadd(52, 251.5, 85.5, 0.9)
pt3dadd(51.5, 257, 83.5, 0.5)
pt3dadd(50.5, 260.5, 81, 0.5)
pt3dadd(50.5, 264.5, 81, 0.5)
pt3dadd(48, 271, 84.5, 0.1)
pt3dadd(47, 275.5, 85, 0.3)
pt3dadd(44.5, 280, 82, 0.3)
pt3dadd(43, 285, 85.5, 0.3)
pt3dadd(40, 286.5, 85.5, 0.3)
pt3dadd(36, 287, 86, 0.3)
pt3dadd(35, 290.5, 86, 0.1)
pt3dadd(34, 295, 86.5, 0.1)
pt3dadd(30, 298, 86.5, 0.1)
pt3dadd(26, 301.5, 87, 0.1)
pt3dadd(22, 304, 87, 0.1)
pt3dadd(17.5, 309, 87.5, 0.1)
pt3dadd(17.5, 312, 87.5, 0.1)
pt3dadd(17.5, 316.5, 88, 0.1)
pt3dadd(15.5, 323.5, 88.5, 0.1)
pt3dadd(14.5, 328.5, 88.5, 0.1)
pt3dadd(12.5, 333, 86, 0.1)
pt3dadd(12, 338.5, 89.5, 0.1)
}
dend[109] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 11.2)
pt3dadd(46, 2.5, -2, 11.2)
pt3dadd(82.5, 29, -9, 12.4)
}
dend[110] {pt3dclear()
pt3dadd(82.5, 29, -9, 12.4)
pt3dadd(92, 29, -8, 3.5)
pt3dadd(98, 33.5, -12.5, 4.1)
pt3dadd(140.5, 54.5, -18, 3.5)
pt3dadd(144, 57, -25, 3.5)
pt3dadd(149, 62.5, -31, 2.2)
pt3dadd(155.5, 67.5, -28.5, 2.3)
pt3dadd(161.5, 72, -23, 3.5)
pt3dadd(164.5, 74.5, -23.5, 2.5)
pt3dadd(168.5, 77, -23.5, 2.5)
pt3dadd(173.5, 83.5, -24, 3.6)
pt3dadd(179, 88, -30.5, 3)
pt3dadd(184.5, 92.5, -34, 2.7)
pt3dadd(188, 95, -34, 2.5)
pt3dadd(192, 96.5, -31.5, 2.4)
pt3dadd(195, 100, -34.5, 2.4)
pt3dadd(198, 102.5, -32, 1.8)
pt3dadd(200, 106, -29, 1.6)
pt3dadd(203.5, 109, -38.5, 1.9)
pt3dadd(209, 112.5, -42, 2.5)
pt3dadd(213.5, 116.5, -44.5, 2)
pt3dadd(220, 119, -39.5, 2.3)
pt3dadd(228, 124, -48.5, 2)
pt3dadd(233.5, 124.5, -46, 2)
pt3dadd(240.5, 125, -46.5, 2)
pt3dadd(245.5, 126, -46.5, 2)
pt3dadd(251, 127, -44, 2)
pt3dadd(259.5, 129, -41.5, 2.3)
pt3dadd(264, 129.5, -42, 2.3)
pt3dadd(271, 129.5, -36.5, 2.3)
pt3dadd(281.5, 129, -31, 2.2)
pt3dadd(285.5, 129, -31, 2.2)
pt3dadd(294.5, 129, -34.5, 1.8)
pt3dadd(299.5, 129.5, -34.5, 1.3)
pt3dadd(303.5, 129.5, -35, 0.8)
pt3dadd(308, 131, -32, 1.7)
pt3dadd(318, 132, -32.5, 2.2)
pt3dadd(324.5, 132, -36, 2.4)
pt3dadd(330, 134, -36, 2.8)
pt3dadd(337, 135.5, -42.5, 3)
pt3dadd(341.5, 134, -31, 2.5)
pt3dadd(346.5, 134.5, -31.5, 1.9)
pt3dadd(353, 135, -38, 2.8)
pt3dadd(360.5, 136, -35, 2.8)
pt3dadd(368, 139.5, -35.5, 2.8)
pt3dadd(373.5, 140.5, -36, 2.6)
pt3dadd(386, 147.5, -36.5, 2.3)
pt3dadd(391, 149.5, -33.5, 2.3)
pt3dadd(397.5, 153.5, -46.5, 1.7)
pt3dadd(400.5, 156, -35, 2.2)
pt3dadd(403.5, 158.5, -41, 1.8)
}
dend[111] {pt3dclear()
pt3dadd(82.5, 29, -9, 12.4)
pt3dadd(92, 41.5, -25, 6.7)
pt3dadd(113, 62.5, -40.5, 9.1)
pt3dadd(116, 65, -42, 10.6)
pt3dadd(118.5, 68.5, -46.5, 12.9)
}
dend[112] {pt3dclear()
pt3dadd(118.5, 68.5, -46.5, 12.9)
pt3dadd(115, 74, -46.5, 9.3)
pt3dadd(114.5, 79, -55.5, 7.7)
pt3dadd(114, 82.5, -58.5, 7)
pt3dadd(113, 86.5, -61.5, 5.8)
pt3dadd(113.5, 90, -58.5, 5.6)
pt3dadd(113.5, 93.5, -58.5, 5.8)
pt3dadd(111, 100, -58.5, 5.9)
pt3dadd(109.5, 103.5, -58.5, 6)
pt3dadd(109, 107, -58.5, 6)
pt3dadd(107.5, 115, -59, 6.6)
pt3dadd(104.5, 118.5, -65, 6.3)
}
dend[113] {pt3dclear()
pt3dadd(104.5, 118.5, -65, 6.3)
pt3dadd(111.5, 124.5, -71, 0.7)
pt3dadd(111, 130.5, -74, 0.7)
pt3dadd(112, 133, -77, 0.7)
pt3dadd(118.5, 142.5, -65, 0.7)
pt3dadd(122, 142.5, -68, 0.7)
pt3dadd(126, 145, -65, 0.7)
pt3dadd(132, 150, -65, 0.7)
pt3dadd(134, 155.5, -65, 0.7)
pt3dadd(142.5, 162.5, -59, 0.7)
pt3dadd(147.5, 164, -59, 0.7)
pt3dadd(153, 164, -59, 0.7)
pt3dadd(158.5, 164, -59, 0.7)
pt3dadd(166, 164, -59, 0.7)
pt3dadd(170, 164, -59, 0.7)
pt3dadd(175, 164, -62, 0.7)
pt3dadd(180, 163.5, -65, 0.7)
}
dend[114] {pt3dclear()
pt3dadd(104.5, 118.5, -65, 6.3)
pt3dadd(101.5, 122.5, -62, 5.1)
pt3dadd(99, 124.5, -62, 5.6)
pt3dadd(94, 132.5, -62, 6.5)
pt3dadd(91.5, 139.5, -62, 5.5)
pt3dadd(86, 143.5, -68.5, 6.3)
pt3dadd(81, 151.5, -68.5, 7)
pt3dadd(77.5, 157.5, -68.5, 6.2)
pt3dadd(76, 167, -68.5, 5.1)
pt3dadd(74.5, 173, -71.5, 5.1)
pt3dadd(72, 178.5, -75, 5.7)
}
dend[115] {pt3dclear()
pt3dadd(72, 178.5, -75, 5.7)
pt3dadd(69.5, 181, -72.5, 4.6)
pt3dadd(68.5, 187.5, -73.5, 4.3)
pt3dadd(68, 195, -75, 4.4)
pt3dadd(66, 197, -80, 3.6)
pt3dadd(62.5, 200.5, -83, 4.1)
pt3dadd(60, 206, -86.5, 4.6)
pt3dadd(56.5, 212, -94, 5.1)
pt3dadd(54.5, 218, -97.5, 6.6)
}
dend[116] {pt3dclear()
pt3dadd(54.5, 218, -97.5, 6.6)
pt3dadd(57.5, 222, -103, 2.6)
pt3dadd(57, 226, -103.5, 2)
pt3dadd(57, 229.5, -103.5, 2)
pt3dadd(57, 232.5, -103.5, 2.2)
pt3dadd(56.5, 236, -109.5, 2.3)
pt3dadd(58, 238, -109.5, 2.3)
pt3dadd(57.5, 241, -110, 2.2)
pt3dadd(56, 243.5, -110, 1.9)
pt3dadd(54, 246.5, -110, 1.7)
pt3dadd(54, 250, -110, 1.6)
pt3dadd(54.5, 261, -104.5, 1.6)
pt3dadd(55.5, 264, -107.5, 1.6)
pt3dadd(55.5, 267.5, -107.5, 1.6)
pt3dadd(57, 275.5, -108, 1.9)
pt3dadd(56.5, 281, -108, 1.6)
pt3dadd(53.5, 284, -114, 1.6)
pt3dadd(53, 287.5, -114.5, 1.9)
pt3dadd(55, 296.5, -120.5, 1.6)
pt3dadd(55, 299.5, -120.5, 1.6)
pt3dadd(54.5, 304, -121, 1.6)
pt3dadd(52, 306.5, -121, 1.6)
pt3dadd(49.5, 309, -124, 1.6)
pt3dadd(47, 311, -121, 1.6)
pt3dadd(49, 315.5, -124.5, 1.7)
pt3dadd(49, 319, -124.5, 1.7)
pt3dadd(48.5, 323, -127.5, 1.7)
pt3dadd(48, 326.5, -127.5, 1.7)
pt3dadd(50.5, 330, -125, 1.3)
pt3dadd(53.5, 336, -127, 2.5)
pt3dadd(56, 340, -127, 2.5)
pt3dadd(58.5, 342.5, -127, 2.5)
pt3dadd(61, 344.5, -127, 2.5)
pt3dadd(59.5, 347.5, -132, 2.2)
pt3dadd(59.5, 351, -130, 1.9)
pt3dadd(58, 355.5, -136.5, 1.8)
pt3dadd(57, 357.5, -136.5, 1.5)
pt3dadd(54.5, 359, -137, 1.3)
pt3dadd(54.5, 363.5, -137, 1.2)
pt3dadd(56.5, 366, -135, 1.2)
pt3dadd(58.5, 368, -139.5, 1.4)
pt3dadd(57, 371.5, -139.5, 1.3)
pt3dadd(57.5, 376.5, -137.5, 1.3)
}
}
proc shape3d_28() {
dend[116] { pt3dadd(54, 379, -144.5, 1)
pt3dadd(54, 382, -144.5, 0.5)
pt3dadd(52, 383, -144.5, 0.8)
pt3dadd(48.5, 384, -145, 0.8)
pt3dadd(48.5, 388.5, -140.5, 1.1)
pt3dadd(45, 392, -145, 0.7)
pt3dadd(45.5, 397.5, -145.5, 0.9)
pt3dadd(45, 400.5, -145.5, 0.9)
pt3dadd(42.5, 403.5, -150, 0.8)
pt3dadd(43.5, 407.5, -150, 0.8)
pt3dadd(44.5, 409.5, -150, 0.9)
pt3dadd(43.5, 411.5, -150.5, 0.9)
pt3dadd(41.5, 413.5, -153, 0.9)
pt3dadd(44, 417, -153, 0.9)
pt3dadd(44.5, 419.5, -150.5, 0.9)
pt3dadd(43, 421.5, -155, 0.9)
pt3dadd(41.5, 423.5, -155.5, 1.1)
pt3dadd(44, 428, -155.5, 1.1)
pt3dadd(43, 432, -153.5, 1.1)
pt3dadd(41.5, 434.5, -155.5, 1.2)
pt3dadd(40, 436.5, -155.5, 1.1)
pt3dadd(40.5, 440.5, -156, 1.1)
pt3dadd(40.5, 444, -156, 1.2)
pt3dadd(39, 446.5, -156, 1.2)
pt3dadd(38.5, 450.5, -154, 1.3)
pt3dadd(39.5, 452.5, -158.5, 1.5)
pt3dadd(42, 455.5, -154.5, 1.1)
pt3dadd(43, 459, -156.5, 0.6)
pt3dadd(39.5, 460.5, -159, 0.9)
pt3dadd(38.5, 463, -159, 1.1)
pt3dadd(41, 466.5, -159, 1.3)
pt3dadd(41, 469.5, -161.5, 1.3)
pt3dadd(42.5, 474.5, -161.5, 1)
pt3dadd(40.5, 476.5, -161.5, 1.3)
pt3dadd(43.5, 481, -161.5, 1.2)
pt3dadd(43.5, 486, -164.5, 1.1)
pt3dadd(44.5, 490, -164.5, 0.9)
pt3dadd(44.5, 494, -164.5, 0.6)
pt3dadd(43.5, 497.5, -164.5, 0.6)
pt3dadd(42.5, 501.5, -164.5, 0.5)
pt3dadd(41.5, 503.5, -165, 0.5)
pt3dadd(42.5, 510, -160.5, 0.4)
pt3dadd(39, 516, -160.5, 0.4)
pt3dadd(36.5, 521, -163, 0.4)
pt3dadd(34.5, 525, -161, 0.4)
pt3dadd(31, 528, -163, 0.4)
pt3dadd(28.5, 533, -163, 0.5)
pt3dadd(26, 537, -163.5, 0.9)
pt3dadd(23, 539.5, -163.5, 0.9)
pt3dadd(23, 543, -163.5, 0.9)
pt3dadd(23.5, 546.5, -159, 0.8)
pt3dadd(20, 552, -159.5, 0.8)
pt3dadd(17, 555.5, -159.5, 0.7)
pt3dadd(14.5, 558.5, -162, 0.7)
pt3dadd(16, 562, -159.5, 0.7)
pt3dadd(18.5, 563.5, -159.5, 0.7)
pt3dadd(16.5, 567, -167, 0.7)
pt3dadd(13, 568.5, -160, 0.7)
pt3dadd(14, 570.5, -160, 1.1)
pt3dadd(12, 573.5, -160, 0.8)
pt3dadd(13.5, 578, -160.5, 0.8)
pt3dadd(15.5, 582, -163, 0.8)
pt3dadd(18, 584.5, -163, 0.8)
pt3dadd(18, 587.5, -163, 0.7)
pt3dadd(18, 591, -158.5, 0.7)
pt3dadd(18, 596.5, -159, 0.8)
pt3dadd(15.5, 599, -156.5, 0.8)
pt3dadd(15.5, 604, -156.5, 0.8)
pt3dadd(16, 610.5, -157, 0.9)
pt3dadd(16, 614.5, -155, 0.9)
pt3dadd(16, 619, -155, 0.9)
pt3dadd(13.5, 623, -157, 0.9)
pt3dadd(10.5, 628, -160, 0.9)
pt3dadd(7, 633.5, -155.5, 0.9)
pt3dadd(3.5, 637.5, -148.5, 0.9)
pt3dadd(2, 641.5, -151.5, 0.9)
pt3dadd(2.5, 650.5, -142, 1)
pt3dadd(4, 658.5, -127, 0.7)
pt3dadd(5.5, 666, -127, 0.9)
}
dend[117] {pt3dclear()
pt3dadd(54.5, 218, -97.5, 6.6)
pt3dadd(51, 220, -100, 4.4)
pt3dadd(49.5, 222, -97.5, 4.3)
pt3dadd(42.5, 234.5, -103.5, 4.8)
}
dend[118] {pt3dclear()
pt3dadd(42.5, 234.5, -103.5, 4.8)
pt3dadd(39.5, 234, -100.5, 3.2)
pt3dadd(35.5, 235.5, -103.5, 3.2)
pt3dadd(33.5, 238.5, -103.5, 3.2)
pt3dadd(27.5, 240, -103.5, 2.8)
pt3dadd(26, 245.5, -100.5, 2.6)
pt3dadd(23, 247, -100.5, 3)
pt3dadd(21.5, 249, -101, 2.6)
pt3dadd(21.5, 252.5, -101, 2.6)
pt3dadd(20, 254.5, -101, 2.6)
pt3dadd(16, 258, -101, 2.6)
pt3dadd(14, 260, -107, 2.7)
pt3dadd(10.5, 260, -107, 2.5)
pt3dadd(7.5, 262, -110, 2.5)
pt3dadd(6.5, 265, -101.5, 3)
pt3dadd(4, 267.5, -107.5, 3.2)
pt3dadd(3.5, 270, -107.5, 3.2)
pt3dadd(-1, 269.5, -110.5, 2.7)
pt3dadd(-2.5, 271, -104.5, 3.4)
pt3dadd(-5, 273.5, -104.5, 3.4)
pt3dadd(-5.5, 276.5, -102, 2.9)
pt3dadd(-10.5, 278.5, -105, 3.4)
pt3dadd(-14, 278.5, -108, 2.8)
pt3dadd(-14.5, 283.5, -114, 2.8)
pt3dadd(-15, 290, -117, 2.7)
pt3dadd(-15, 293, -117, 2.8)
pt3dadd(-20.5, 298.5, -117.5, 2.8)
pt3dadd(-24.5, 300, -117.5, 3)
pt3dadd(-27.5, 302.5, -117.5, 2.8)
pt3dadd(-31, 306, -117.5, 2.7)
pt3dadd(-33.5, 308, -117.5, 2.7)
pt3dadd(-36.5, 312, -114.5, 2.7)
pt3dadd(-38, 315, -124, 2.9)
pt3dadd(-42, 315.5, -121, 2.8)
pt3dadd(-45.5, 315.5, -121, 2.6)
pt3dadd(-47, 318, -121, 2.5)
pt3dadd(-46, 322, -121, 2.4)
pt3dadd(-47, 328, -121, 2.5)
pt3dadd(-48.5, 329.5, -118, 2.5)
pt3dadd(-50, 332, -124.5, 2.5)
pt3dadd(-52, 336, -121.5, 2.5)
pt3dadd(-54, 339, -121.5, 2.8)
pt3dadd(-57, 343, -121.5, 3)
pt3dadd(-61, 342.5, -121.5, 2.9)
pt3dadd(-64, 343, -127.5, 2.8)
pt3dadd(-65.5, 348.5, -125, 2.7)
pt3dadd(-71.5, 352.5, -127, 3.1)
pt3dadd(-74.5, 356.5, -130, 2.8)
pt3dadd(-74.5, 360, -134.5, 2.8)
pt3dadd(-76.5, 364.5, -135, 2.8)
pt3dadd(-78.5, 365.5, -135, 2.8)
pt3dadd(-82, 367, -135, 3.1)
pt3dadd(-82.5, 369.5, -137, 3.1)
pt3dadd(-83.5, 375, -137.5, 2.8)
pt3dadd(-87.5, 377.5, -135.5, 2.8)
pt3dadd(-91, 379.5, -140.5, 2.6)
pt3dadd(-93.5, 380.5, -140.5, 2.6)
pt3dadd(-96, 382, -140.5, 2.6)
pt3dadd(-99, 382, -141, 2.3)
pt3dadd(-100, 384, -143.5, 3)
pt3dadd(-100, 387, -143.5, 2.5)
pt3dadd(-100.5, 390.5, -148.5, 1.9)
pt3dadd(-103, 392.5, -146, 2)
pt3dadd(-105.5, 396, -148.5, 2.2)
pt3dadd(-107.5, 397.5, -149, 2.2)
pt3dadd(-112.5, 398.5, -149, 1.9)
pt3dadd(-114.5, 402, -149, 1.9)
pt3dadd(-115, 404.5, -149.5, 1.9)
pt3dadd(-117.5, 405.5, -149.5, 1.8)
pt3dadd(-120, 409, -149.5, 1.8)
pt3dadd(-121.5, 411, -150, 2.2)
pt3dadd(-122.5, 414, -150, 2.2)
pt3dadd(-123, 417, -150, 2.2)
pt3dadd(-125.5, 419, -150, 2.2)
pt3dadd(-131.5, 421.5, -150.5, 1.9)
pt3dadd(-133, 426, -150.5, 1.9)
pt3dadd(-133, 429, -151, 1.9)
pt3dadd(-136, 431, -151, 1.9)
pt3dadd(-139.5, 431.5, -151, 1.9)
pt3dadd(-142, 435.5, -151.5, 1.9)
pt3dadd(-143, 437.5, -153.5, 2.2)
pt3dadd(-145, 439, -153.5, 2)
pt3dadd(-147.5, 439.5, -153.5, 1.9)
pt3dadd(-149, 442, -154, 1.7)
pt3dadd(-150, 444.5, -154, 1.7)
pt3dadd(-151, 448, -156.5, 2.6)
pt3dadd(-154.5, 449, -156.5, 2.3)
pt3dadd(-156.5, 450, -157, 2.2)
pt3dadd(-158.5, 451.5, -161.5, 1.7)
pt3dadd(-159.5, 454.5, -159, 1.9)
pt3dadd(-160, 457.5, -159.5, 1.9)
pt3dadd(-163, 461, -159.5, 1.9)
pt3dadd(-166.5, 463, -159.5, 1.9)
pt3dadd(-169.5, 470, -160, 1.9)
pt3dadd(-172.5, 471.5, -160.5, 2.3)
pt3dadd(-174.5, 472.5, -160.5, 2.2)
pt3dadd(-174.5, 476, -163, 2.1)
pt3dadd(-179, 479.5, -165.5, 2)
pt3dadd(-181, 480.5, -165.5, 2)
pt3dadd(-182, 484, -165.5, 2)
pt3dadd(-181.5, 487, -164, 2.1)
pt3dadd(-185.5, 487.5, -168.5, 2.2)
pt3dadd(-188.5, 489.5, -171, 2.4)
pt3dadd(-190, 492.5, -171.5, 2.2)
pt3dadd(-191.5, 496, -171.5, 2)
pt3dadd(-195, 498.5, -171.5, 2)
pt3dadd(-199, 501, -174.5, 2)
pt3dadd(-201.5, 505.5, -174.5, 1.8)
pt3dadd(-204.5, 508.5, -175, 1.8)
pt3dadd(-208.5, 511, -185.5, 2)
pt3dadd(-211.5, 513.5, -185.5, 2.4)
pt3dadd(-212.5, 517.5, -186, 2.4)
pt3dadd(-212.5, 521, -186, 1.9)
pt3dadd(-215.5, 522, -189.5, 2.5)
pt3dadd(-218, 524.5, -193.5, 2.8)
pt3dadd(-219, 526.5, -193.5, 1.6)
pt3dadd(-219.5, 529, -193.5, 1.7)
}
}
proc shape3d_29() {
dend[118] { pt3dadd(-220, 532, -187.5, 2.3)
pt3dadd(-222, 533.5, -194.5, 1.7)
pt3dadd(-225, 536.5, -195, 1.8)
pt3dadd(-226, 540, -195, 1.3)
pt3dadd(-227.5, 545, -199, 1.1)
pt3dadd(-229, 546.5, -199, 1.6)
pt3dadd(-231.5, 547, -202.5, 1.6)
pt3dadd(-233, 550, -196.5, 1.4)
pt3dadd(-235, 554.5, -200.5, 1.5)
pt3dadd(-235.5, 559.5, -200.5, 1.6)
pt3dadd(-238.5, 562, -201, 1.9)
pt3dadd(-241.5, 564.5, -204, 1.9)
pt3dadd(-242.5, 566.5, -204.5, 1.5)
pt3dadd(-246, 566.5, -204.5, 1.5)
pt3dadd(-247, 570.5, -205, 1.2)
pt3dadd(-247, 574, -205, 1.6)
pt3dadd(-248, 577, -205, 1.5)
pt3dadd(-247.5, 581.5, -205.5, 1.3)
pt3dadd(-250.5, 583, -205.5, 1.5)
pt3dadd(-253, 585, -206, 1.5)
pt3dadd(-254, 588, -206, 1.4)
pt3dadd(-254, 593, -206.5, 1.7)
pt3dadd(-256, 595, -207.5, 1.3)
pt3dadd(-260, 596, -207.5, 1.5)
pt3dadd(-260.5, 600, -218.5, 1.4)
pt3dadd(-263, 601, -218.5, 1.4)
pt3dadd(-266, 601, -216, 1.2)
pt3dadd(-268.5, 603, -216, 1.2)
pt3dadd(-270.5, 605, -216, 1.3)
pt3dadd(-272, 607, -216.5, 1.3)
pt3dadd(-272, 611, -216.5, 1.2)
pt3dadd(-275.5, 611.5, -220, 1.1)
pt3dadd(-275, 616, -220.5, 1.1)
pt3dadd(-276, 619.5, -220.5, 1.4)
pt3dadd(-278, 623, -224.5, 1.4)
pt3dadd(-280, 625, -224.5, 1.2)
pt3dadd(-281, 632, -229, 0.9)
pt3dadd(-283, 634.5, -226, 1.3)
pt3dadd(-285, 637, -226.5, 1.3)
pt3dadd(-289.5, 641, -227.5, 0.8)
pt3dadd(-289, 646, -228, 1.2)
pt3dadd(-289, 650.5, -225, 1.7)
pt3dadd(-289.5, 653, -225, 1.9)
pt3dadd(-291, 657, -230, 1)
pt3dadd(-292, 659, -230, 1.4)
pt3dadd(-294.5, 660.5, -234.5, 2.2)
pt3dadd(-296, 662.5, -238.5, 1.4)
pt3dadd(-299.5, 665, -232.5, 1.1)
pt3dadd(-304.5, 668, -233, 1.1)
pt3dadd(-307, 669.5, -233.5, 1.1)
pt3dadd(-307, 673, -234, 1.1)
pt3dadd(-308.5, 675, -234.5, 1.2)
pt3dadd(-311.5, 677.5, -242, 1.3)
pt3dadd(-313, 681.5, -246.5, 1.3)
pt3dadd(-316, 686.5, -247, 1.3)
pt3dadd(-316.5, 690, -247.5, 1.4)
pt3dadd(-318, 694, -248, 1.2)
pt3dadd(-322, 700, -249, 0.9)
pt3dadd(-324.5, 707, -253.5, 0.8)
pt3dadd(-328.5, 714.5, -254.5, 0.8)
pt3dadd(-329.5, 723, -255.5, 0.8)
pt3dadd(-330.5, 726.5, -256, 1)
pt3dadd(-331.5, 729.5, -256, 1)
pt3dadd(-334.5, 731.5, -256.5, 1.1)
pt3dadd(-337, 734, -257, 1.1)
pt3dadd(-338.5, 736, -257.5, 1.2)
pt3dadd(-340, 740, -258, 0.6)
pt3dadd(-341.5, 742, -262, 0.8)
pt3dadd(-343.5, 745, -262, 0.8)
pt3dadd(-346, 747, -262.5, 0.8)
pt3dadd(-348.5, 750.5, -263, 0.8)
pt3dadd(-352.5, 752.5, -263.5, 1)
pt3dadd(-352.5, 755.5, -268, 0.8)
pt3dadd(-354, 760, -265, 1.1)
pt3dadd(-357, 760, -269, 1.3)
pt3dadd(-358, 763.5, -269.5, 0.7)
pt3dadd(-361.5, 763, -266.5, 0.1)
pt3dadd(-365, 764, -267, 0.1)
pt3dadd(-368.5, 764, -275.5, 0.1)
pt3dadd(-370.5, 761, -263, 0.1)
pt3dadd(-372, 759.5, -263.5, 0.1)
pt3dadd(-375, 757, -264, 0.1)
}
dend[119] {pt3dclear()
pt3dadd(42.5, 234.5, -103.5, 4.8)
pt3dadd(43.5, 239.5, -103.5, 2.5)
pt3dadd(43.5, 242.5, -103.5, 2.8)
pt3dadd(44, 246, -100.5, 2.8)
pt3dadd(45, 249.5, -103.5, 2.8)
pt3dadd(45, 254, -104, 2.8)
pt3dadd(44.5, 257.5, -104, 2.8)
pt3dadd(44, 264.5, -104, 2.6)
pt3dadd(42, 266.5, -110.5, 2.7)
pt3dadd(39, 269.5, -110.5, 2.5)
pt3dadd(37, 272.5, -107.5, 2.4)
pt3dadd(37.5, 277, -110.5, 3.2)
pt3dadd(40, 280.5, -111, 3.2)
pt3dadd(41, 285, -111, 3)
pt3dadd(40.5, 288.5, -114, 3)
pt3dadd(40.5, 292.5, -117, 2.5)
pt3dadd(40, 297, -117, 2.5)
pt3dadd(40, 300, -117.5, 2.6)
pt3dadd(40, 303.5, -114.5, 3.1)
pt3dadd(42, 308.5, -117.5, 2.3)
pt3dadd(41.5, 311, -120.5, 2)
pt3dadd(38.5, 312.5, -121, 2)
pt3dadd(36, 314, -121, 2)
pt3dadd(35.5, 319, -121, 2)
pt3dadd(35.5, 323, -121, 2.2)
pt3dadd(33, 327, -121, 1.9)
pt3dadd(33, 332, -121.5, 2.1)
pt3dadd(34, 337.5, -124.5, 3.8)
pt3dadd(33.5, 341, -127.5, 2.6)
pt3dadd(32, 345.5, -125, 2)
pt3dadd(31.5, 352, -129.5, 1.8)
pt3dadd(30, 354.5, -129.5, 2.2)
pt3dadd(28, 359.5, -129.5, 2.2)
pt3dadd(27.5, 363, -129.5, 2.2)
pt3dadd(27, 366.5, -130, 2.2)
pt3dadd(25.5, 371, -134.5, 1.9)
pt3dadd(25.5, 374.5, -134.5, 1.9)
pt3dadd(25.5, 377.5, -134.5, 1.9)
pt3dadd(25.5, 380.5, -134.5, 1.9)
pt3dadd(22, 383, -134.5, 1.8)
pt3dadd(21, 386, -135, 2.2)
pt3dadd(21, 389.5, -135, 2.3)
pt3dadd(21, 393.5, -135, 2.3)
pt3dadd(21.5, 396.5, -135, 2.1)
pt3dadd(18.5, 399.5, -135, 2)
pt3dadd(16.5, 403, -135, 1.9)
pt3dadd(18, 405, -135.5, 1.9)
pt3dadd(20.5, 407.5, -140, 1.6)
pt3dadd(23, 409.5, -142.5, 1.4)
pt3dadd(23, 413.5, -142.5, 1.4)
pt3dadd(19.5, 415.5, -142.5, 1.4)
pt3dadd(17, 417, -144.5, 1.7)
pt3dadd(14.5, 420, -145, 1.7)
pt3dadd(14, 423, -145, 1.7)
pt3dadd(15, 427, -145, 1.7)
pt3dadd(16, 431, -145, 1.7)
pt3dadd(14.5, 434.5, -145, 1.7)
pt3dadd(12, 438, -148, 1.7)
pt3dadd(10, 442, -148, 1.7)
pt3dadd(10.5, 445, -145.5, 1.7)
pt3dadd(12, 448.5, -145.5, 1.6)
pt3dadd(8.5, 450.5, -145.5, 1.4)
pt3dadd(6.5, 454, -145.5, 1.4)
pt3dadd(4.5, 457.5, -146, 1.3)
pt3dadd(3, 461, -150.5, 1.5)
pt3dadd(1.5, 464, -148.5, 1.5)
pt3dadd(-2.5, 466.5, -148.5, 2)
pt3dadd(-6, 470, -149, 1.6)
pt3dadd(-7.5, 476, -149, 1.5)
pt3dadd(-8, 480.5, -149, 1.5)
pt3dadd(-10.5, 483.5, -149, 1.5)
pt3dadd(-11, 486.5, -149, 1.8)
pt3dadd(-13.5, 488.5, -149.5, 1.8)
pt3dadd(-16.5, 489, -149.5, 1.7)
pt3dadd(-17, 491.5, -149.5, 1.5)
pt3dadd(-18, 495, -149.5, 1.5)
pt3dadd(-21.5, 497, -149.5, 1.5)
pt3dadd(-25, 499, -149.5, 1.5)
pt3dadd(-27, 502, -149.5, 1.3)
pt3dadd(-26.5, 505.5, -150, 1.3)
pt3dadd(-26.5, 509.5, -150, 1.1)
pt3dadd(-27, 512.5, -150, 1.7)
pt3dadd(-31.5, 518, -150, 1)
pt3dadd(-34, 521, -150, 1.3)
pt3dadd(-36, 526, -150.5, 1.3)
pt3dadd(-35.5, 532, -150.5, 1.2)
pt3dadd(-35.5, 536, -152.5, 1.2)
pt3dadd(-39, 540.5, -150.5, 1.2)
pt3dadd(-42.5, 542, -155.5, 1.2)
pt3dadd(-42.5, 547, -155.5, 1.2)
pt3dadd(-41.5, 550.5, -155.5, 1.5)
pt3dadd(-44, 554.5, -155.5, 1.5)
pt3dadd(-47, 558, -156, 1.5)
pt3dadd(-47, 561.5, -158, 1)
pt3dadd(-47.5, 564.5, -158, 1.1)
pt3dadd(-49, 566.5, -156, 1.3)
pt3dadd(-51, 569, -160.5, 1.3)
pt3dadd(-55, 571.5, -160.5, 1.3)
pt3dadd(-55, 576, -161, 1.3)
pt3dadd(-58.5, 580.5, -161, 1.3)
pt3dadd(-61.5, 583.5, -161, 1.3)
pt3dadd(-61.5, 587.5, -161, 1.3)
pt3dadd(-61.5, 592, -161, 1.3)
pt3dadd(-62.5, 595, -161.5, 1.6)
pt3dadd(-66, 597.5, -161.5, 1.4)
pt3dadd(-65, 603, -161.5, 1.3)
pt3dadd(-65, 606.5, -161.5, 2.5)
pt3dadd(-70, 609, -159.5, 1.1)
pt3dadd(-68.5, 614.5, -159.5, 1.1)
pt3dadd(-68, 618.5, -162, 1.1)
pt3dadd(-69.5, 622, -162, 1.1)
pt3dadd(-68, 626, -162, 1.1)
pt3dadd(-69.5, 628.5, -162.5, 1.1)
pt3dadd(-73.5, 631, -162.5, 1.1)
pt3dadd(-74, 636.5, -162.5, 1.1)
pt3dadd(-76, 640, -153.5, 1.1)
pt3dadd(-79, 646, -147, 0.9)
pt3dadd(-79.5, 651, -142.5, 0.9)
}
}
proc shape3d_30() {
dend[119] { pt3dadd(-83.5, 654, -142.5, 0.9)
pt3dadd(-83.5, 659, -131.5, 1)
pt3dadd(-84, 663, -131.5, 1)
pt3dadd(-84.5, 668.5, -131.5, 1)
pt3dadd(-85, 677, -132, 1.2)
pt3dadd(-85, 681, -132, 1.2)
pt3dadd(-85, 685, -132, 1.2)
pt3dadd(-85.5, 689, -132, 0.8)
pt3dadd(-87.5, 694, -132.5, 0.8)
pt3dadd(-89.5, 698.5, -132.5, 0.9)
pt3dadd(-89, 705.5, -132.5, 0.9)
pt3dadd(-89, 712, -132.5, 0.9)
pt3dadd(-88, 719.5, -133, 1)
pt3dadd(-89.5, 725.5, -133, 1.1)
pt3dadd(-90.5, 730.5, -133, 1.1)
pt3dadd(-92.5, 735.5, -133, 1.1)
pt3dadd(-93.5, 743.5, -133.5, 1.1)
pt3dadd(-94, 753.5, -133.5, 1.2)
pt3dadd(-94, 760, -134, 1.2)
pt3dadd(-92.5, 764, -134, 1.2)
}
dend[120] {pt3dclear()
pt3dadd(72, 178.5, -75, 5.7)
pt3dadd(72, 182.5, -75, 2.4)
pt3dadd(70.5, 186.5, -95.5, 3.7)
pt3dadd(71, 190, -104.5, 2.8)
pt3dadd(69.5, 192.5, -109, 3.4)
pt3dadd(68.5, 190, -118.5, 3.4)
pt3dadd(67.5, 193, -120, 2.7)
pt3dadd(66.5, 195.5, -118.5, 2.5)
pt3dadd(66.5, 199.5, -120, 2.7)
pt3dadd(69.5, 201, -125, 2.7)
pt3dadd(68.5, 206, -129.5, 3.9)
pt3dadd(68, 209, -129.5, 3.9)
pt3dadd(68, 212.5, -129.5, 3.5)
pt3dadd(69, 215.5, -134, 3.2)
pt3dadd(69, 219.5, -134, 3.2)
pt3dadd(69.5, 222.5, -134, 2.6)
pt3dadd(69.5, 225.5, -134.5, 2.7)
pt3dadd(68.5, 232, -136.5, 3)
pt3dadd(66.5, 236, -136.5, 2.5)
pt3dadd(64, 240, -134.5, 2.5)
pt3dadd(61.5, 243, -134.5, 3.2)
pt3dadd(60.5, 245.5, -136.5, 2.9)
pt3dadd(60, 249.5, -137, 2.6)
pt3dadd(60, 253.5, -137, 2.7)
pt3dadd(61.5, 258, -139.5, 2.7)
pt3dadd(63, 260, -142, 2.7)
pt3dadd(62, 262.5, -142, 2.6)
pt3dadd(59.5, 264.5, -142, 2.6)
pt3dadd(58, 268, -142, 2.6)
pt3dadd(56, 272, -142.5, 2.6)
pt3dadd(54, 274.5, -142.5, 2.2)
pt3dadd(51, 278, -142.5, 2.5)
pt3dadd(51, 281, -144.5, 2.2)
pt3dadd(52, 284, -144.5, 2.2)
pt3dadd(53, 288, -144.5, 2)
pt3dadd(54.5, 290.5, -144.5, 2)
pt3dadd(54.5, 294, -144.5, 2.1)
pt3dadd(52.5, 297, -147.5, 2.2)
pt3dadd(51.5, 299, -147.5, 2.2)
pt3dadd(52, 303, -145, 1.8)
pt3dadd(52.5, 306.5, -145, 1.8)
pt3dadd(54.5, 309.5, -145, 1.8)
pt3dadd(56, 313, -145, 1.8)
pt3dadd(57, 316, -145, 1.8)
pt3dadd(55, 319.5, -145.5, 1.8)
pt3dadd(52.5, 322, -145.5, 2.2)
pt3dadd(49.5, 325.5, -145.5, 2.2)
pt3dadd(49.5, 329, -150, 2.2)
pt3dadd(48.5, 332, -150, 2.2)
pt3dadd(47.5, 334, -150, 2.2)
pt3dadd(46.5, 336, -150, 2.3)
pt3dadd(46.5, 339, -150, 2.3)
pt3dadd(45.5, 341, -150, 2.5)
pt3dadd(44, 343.5, -150.5, 2.5)
pt3dadd(43, 346, -150.5, 2.6)
pt3dadd(43, 349, -150.5, 2.3)
pt3dadd(42, 354.5, -150.5, 2)
pt3dadd(40.5, 357, -148.5, 2)
pt3dadd(37, 359.5, -150.5, 2.6)
pt3dadd(34.5, 362, -150.5, 2.1)
pt3dadd(34.5, 365.5, -151, 1.7)
pt3dadd(35.5, 369.5, -151, 1.5)
pt3dadd(37.5, 371, -151, 1.5)
pt3dadd(36.5, 373, -151, 1.5)
pt3dadd(33.5, 375, -151, 1.5)
pt3dadd(33, 377.5, -151, 1.7)
pt3dadd(32.5, 380.5, -151, 1.8)
pt3dadd(31.5, 383, -153.5, 1.8)
pt3dadd(29, 384, -155.5, 1.8)
pt3dadd(25, 385, -154, 2)
pt3dadd(21.5, 387.5, -154, 2)
pt3dadd(19, 389.5, -156, 1.9)
pt3dadd(16.5, 391, -156, 1.9)
pt3dadd(14.5, 393, -158.5, 1.9)
pt3dadd(14.5, 396, -158.5, 2.3)
pt3dadd(15.5, 399.5, -158.5, 2.6)
pt3dadd(14.5, 404, -159, 1.8)
pt3dadd(11.5, 405, -159, 1.8)
pt3dadd(8.5, 407, -159, 1.8)
pt3dadd(8, 411.5, -159, 1.8)
pt3dadd(6, 416, -170.5, 1.8)
pt3dadd(6, 423.5, -164, 1.8)
pt3dadd(4.5, 430.5, -164, 1.8)
pt3dadd(0.5, 436, -164, 1.8)
pt3dadd(-2.5, 439, -164, 1.8)
pt3dadd(-3, 443, -164.5, 1.8)
pt3dadd(-7, 444.5, -160, 1.6)
pt3dadd(-7.5, 447.5, -160, 1.6)
pt3dadd(-8, 451.5, -164.5, 1.2)
pt3dadd(-13, 452.5, -160.5, 1.3)
pt3dadd(-17.5, 457, -160.5, 1.1)
pt3dadd(-18.5, 460.5, -160.5, 1.2)
pt3dadd(-22, 463, -160.5, 1.2)
pt3dadd(-25, 466.5, -158, 1.2)
pt3dadd(-27.5, 468.5, -158.5, 1.6)
pt3dadd(-30, 471, -163, 1.1)
pt3dadd(-34.5, 475, -161, 1.3)
pt3dadd(-37.5, 476.5, -161, 1.3)
pt3dadd(-39, 478.5, -161, 1.1)
pt3dadd(-40, 482.5, -161, 1.4)
pt3dadd(-40, 485.5, -161, 1.2)
pt3dadd(-42, 488.5, -163.5, 1.2)
pt3dadd(-45, 489.5, -163.5, 1.1)
pt3dadd(-48.5, 492.5, -163.5, 1.3)
pt3dadd(-49.5, 496.5, -166, 1.7)
pt3dadd(-49.5, 499.5, -166, 1.6)
pt3dadd(-51, 503, -166, 1.6)
pt3dadd(-53.5, 506, -166, 1.6)
pt3dadd(-56.5, 508, -166.5, 1.4)
pt3dadd(-59, 510, -166.5, 1.4)
pt3dadd(-62, 510, -166.5, 1.4)
pt3dadd(-65, 510.5, -166.5, 1.6)
pt3dadd(-67.5, 514.5, -166.5, 1.3)
pt3dadd(-71, 518.5, -166.5, 1.3)
pt3dadd(-72, 521, -166.5, 1.3)
pt3dadd(-73.5, 524, -167, 1.4)
pt3dadd(-76.5, 527, -164.5, 1.2)
pt3dadd(-79.5, 527.5, -164.5, 1.3)
pt3dadd(-81, 531, -164.5, 1.3)
pt3dadd(-85.5, 535.5, -164.5, 1.4)
pt3dadd(-88, 536, -164.5, 1.4)
pt3dadd(-89, 540.5, -167, 1.1)
pt3dadd(-92, 542.5, -165, 1.1)
pt3dadd(-94.5, 544.5, -165, 1.7)
pt3dadd(-97, 545, -163, 1.6)
pt3dadd(-102.5, 544.5, -165, 1.4)
pt3dadd(-103.5, 547, -163, 1.3)
pt3dadd(-107, 548.5, -163, 1.3)
pt3dadd(-110, 553.5, -163.5, 1.3)
pt3dadd(-111, 556, -163.5, 1.3)
pt3dadd(-114.5, 558.5, -168, 1.3)
pt3dadd(-116.5, 561, -168, 1.1)
pt3dadd(-118, 564.5, -168, 1.1)
pt3dadd(-121.5, 566.5, -163.5, 1.3)
pt3dadd(-125, 570, -168.5, 1.5)
pt3dadd(-127, 573, -166, 1.5)
pt3dadd(-126.5, 575.5, -166, 1.6)
pt3dadd(-125.5, 578.5, -166, 1.6)
pt3dadd(-130.5, 579.5, -168.5, 1)
pt3dadd(-132.5, 582, -168.5, 1)
pt3dadd(-133, 584.5, -168.5, 1.1)
pt3dadd(-134.5, 587, -169, 1.2)
pt3dadd(-136, 589.5, -169, 1.2)
pt3dadd(-138.5, 591.5, -171, 1.2)
pt3dadd(-142, 593, -169, 1.1)
pt3dadd(-142.5, 596, -169, 1.2)
pt3dadd(-144, 599, -166.5, 1.2)
pt3dadd(-150.5, 603.5, -169.5, 1.1)
pt3dadd(-154.5, 605.5, -169.5, 1.1)
pt3dadd(-157, 608.5, -167, 1.1)
pt3dadd(-160, 611.5, -167, 1.1)
pt3dadd(-162.5, 615, -167, 1.3)
pt3dadd(-165.5, 618, -167, 1.3)
pt3dadd(-167.5, 622, -170, 1.1)
pt3dadd(-171, 624, -167.5, 1.3)
pt3dadd(-174.5, 628, -167.5, 1.3)
pt3dadd(-176, 630.5, -172, 1.3)
pt3dadd(-179.5, 633.5, -172, 1.1)
pt3dadd(-181.5, 637.5, -172, 1.1)
pt3dadd(-185, 640, -172.5, 1.1)
}
dend[121] {pt3dclear()
pt3dadd(118.5, 68.5, -46.5, 12.9)
pt3dadd(131.5, 81.5, -62.5, 5.9)
pt3dadd(134.5, 84.5, -63.5, 5.3)
pt3dadd(148, 97.5, -75, 5.8)
pt3dadd(149.5, 100, -87.5, 4.6)
}
dend[122] {pt3dclear()
pt3dadd(149.5, 100, -87.5, 4.6)
pt3dadd(151, 107.5, -90.5, 4.6)
pt3dadd(153, 110, -87.5, 4.6)
pt3dadd(155.5, 112.5, -94, 3.1)
pt3dadd(157, 116, -88, 3.1)
pt3dadd(160.5, 121.5, -94.5, 3.4)
pt3dadd(163.5, 127.5, -94.5, 3.4)
pt3dadd(164, 135.5, -98, 2.5)
pt3dadd(165.5, 138.5, -98.5, 3.4)
}
dend[123] {pt3dclear()
pt3dadd(165.5, 138.5, -98.5, 3.4)
pt3dadd(168.5, 141, -101, 2)
pt3dadd(170.5, 143, -99, 2)
pt3dadd(174, 147, -99, 1.7)
pt3dadd(174.5, 150.5, -96.5, 2.4)
pt3dadd(173.5, 153, -112, 2)
}
}
proc shape3d_31() {
dend[123] { pt3dadd(177, 158, -106.5, 2.4)
pt3dadd(180, 166.5, -114, 2.2)
pt3dadd(181, 169.5, -114, 2.2)
pt3dadd(185, 179, -121, 1.7)
pt3dadd(186, 182.5, -121.5, 1.5)
pt3dadd(187.5, 186.5, -125, 2.1)
pt3dadd(188.5, 189, -127, 2.3)
pt3dadd(189, 192.5, -127, 2)
pt3dadd(189.5, 195.5, -127.5, 2)
pt3dadd(189.5, 201, -128, 2)
pt3dadd(194.5, 204, -128.5, 2)
pt3dadd(197, 206.5, -136, 1.7)
pt3dadd(199.5, 209, -133.5, 1.3)
pt3dadd(202, 209.5, -134, 1.6)
pt3dadd(202, 212.5, -134, 1.6)
pt3dadd(203, 217, -139.5, 1.4)
pt3dadd(204, 220.5, -139.5, 1.9)
pt3dadd(203.5, 223.5, -140, 2.3)
pt3dadd(204, 228, -135.5, 1.7)
pt3dadd(206, 231.5, -136, 1.9)
pt3dadd(208, 235.5, -136.5, 1.3)
pt3dadd(210.5, 239.5, -136.5, 1.4)
pt3dadd(213, 243, -137, 1.4)
pt3dadd(214, 245, -133, 1.3)
pt3dadd(216, 248.5, -133, 1.3)
pt3dadd(215.5, 251.5, -133.5, 1.3)
pt3dadd(215.5, 256, -133.5, 1.3)
pt3dadd(217, 260.5, -134, 1.4)
pt3dadd(219, 265, -134.5, 2.3)
pt3dadd(219, 268, -134.5, 0.9)
pt3dadd(222, 271, -137.5, 1.5)
pt3dadd(227, 273.5, -140, 1.2)
pt3dadd(229.5, 274.5, -136, 0.8)
pt3dadd(233, 272.5, -134, 1)
pt3dadd(236, 269, -134.5, 1)
pt3dadd(236, 265, -135, 1)
pt3dadd(234, 263.5, -135, 1)
pt3dadd(230, 261, -135.5, 1)
pt3dadd(225.5, 257.5, -133.5, 1.3)
}
dend[124] {pt3dclear()
pt3dadd(165.5, 138.5, -98.5, 3.4)
pt3dadd(168, 137, -108, 1.9)
pt3dadd(170, 139, -108.5, 1.9)
pt3dadd(168.5, 143, -109, 1.9)
pt3dadd(167, 144.5, -125.5, 2.3)
pt3dadd(166, 147.5, -123, 2.3)
pt3dadd(165.5, 151, -121, 2.3)
pt3dadd(169, 153.5, -124.5, 2.3)
pt3dadd(171.5, 155, -125, 1.9)
pt3dadd(176, 159.5, -126, 3)
pt3dadd(178.5, 164, -127, 3.2)
pt3dadd(177.5, 177, -139.5, 1.9)
pt3dadd(183, 177, -140.5, 2)
pt3dadd(186, 175, -147, 2.3)
pt3dadd(183, 177, -143, 2.3)
pt3dadd(178.5, 178.5, -152, 2.3)
pt3dadd(180, 180, -150.5, 1.1)
pt3dadd(181.5, 182.5, -156.5, 2.1)
pt3dadd(180, 186.5, -157.5, 2.1)
pt3dadd(179.5, 190.5, -158, 1.7)
pt3dadd(180.5, 193, -164, 1.6)
pt3dadd(184.5, 193, -164.5, 1.6)
pt3dadd(188.5, 191.5, -168, 2.3)
pt3dadd(190.5, 193.5, -168.5, 2.6)
pt3dadd(189.5, 197, -174, 2.8)
pt3dadd(189.5, 200.5, -175, 3)
pt3dadd(189, 204.5, -187, 2.3)
pt3dadd(189.5, 208.5, -187.5, 1.9)
pt3dadd(191, 215, -189.5, 2)
pt3dadd(191.5, 217.5, -190, 2)
pt3dadd(192.5, 220, -194.5, 1.7)
pt3dadd(192, 223, -195, 1.9)
pt3dadd(191.5, 225.5, -195.5, 2.1)
pt3dadd(192.5, 230, -196.5, 1.9)
pt3dadd(197, 230.5, -208.5, 1.7)
pt3dadd(200, 235, -210, 1.3)
pt3dadd(198, 236.5, -207, 1.3)
pt3dadd(197, 239.5, -211.5, 1.6)
pt3dadd(197, 242.5, -215.5, 1.6)
pt3dadd(197, 250, -218, 1.3)
pt3dadd(200, 250.5, -218.5, 1.4)
pt3dadd(202.5, 252, -219, 1.4)
pt3dadd(203.5, 257.5, -220, 1.4)
pt3dadd(203.5, 262, -225, 1.4)
pt3dadd(207.5, 269, -241.5, 1.7)
pt3dadd(210, 271, -246.5, 1.7)
pt3dadd(214.5, 276, -249, 1.7)
pt3dadd(216.5, 279.5, -250, 1.8)
pt3dadd(219, 281, -246.5, 1.7)
pt3dadd(221, 284.5, -244, 2)
pt3dadd(225.5, 291, -257, 1)
pt3dadd(228, 293, -261.5, 1.6)
pt3dadd(231.5, 294, -259, 1.6)
pt3dadd(236, 295.5, -263.5, 1.6)
pt3dadd(238.5, 297.5, -264, 1.4)
pt3dadd(244, 299, -262, 1.1)
pt3dadd(246.5, 301, -262.5, 1.1)
pt3dadd(247.5, 303.5, -260, 1.3)
pt3dadd(248, 307.5, -268, 1.3)
pt3dadd(253.5, 310, -269, 1.2)
pt3dadd(256, 315, -270, 1.4)
pt3dadd(257, 317, -270.5, 1.5)
pt3dadd(257.5, 320.5, -275, 1.4)
pt3dadd(262.5, 325, -283.5, 1.1)
pt3dadd(265, 327, -284, 1.1)
pt3dadd(267, 329, -284.5, 1)
pt3dadd(272, 333.5, -286, 0.9)
pt3dadd(277, 342.5, -283.5, 0.9)
pt3dadd(281, 352, -291.5, 0.9)
pt3dadd(284, 359, -290.5, 1.7)
pt3dadd(285.5, 361.5, -296, 1.1)
pt3dadd(288.5, 365, -296.5, 1.1)
pt3dadd(291.5, 366, -297.5, 1.5)
pt3dadd(294.5, 367.5, -298, 1.5)
pt3dadd(297, 369.5, -298.5, 1.3)
pt3dadd(301.5, 374, -304.5, 1.1)
pt3dadd(303, 376.5, -305, 1.1)
pt3dadd(305, 379, -306, 0.9)
pt3dadd(305, 382, -306.5, 0.9)
pt3dadd(307.5, 384.5, -307, 0.8)
pt3dadd(312, 385.5, -308, 0.7)
pt3dadd(313.5, 388, -308.5, 0.7)
pt3dadd(315.5, 390, -307, 0.7)
pt3dadd(318, 393, -308, 0.7)
pt3dadd(317.5, 395.5, -316, 0.7)
pt3dadd(320, 401, -317.5, 0.8)
pt3dadd(324.5, 401, -323, 0.9)
pt3dadd(328, 402.5, -324, 0.9)
pt3dadd(326, 404, -324.5, 0.8)
pt3dadd(324, 404, -325, 0.8)
}
dend[125] {pt3dclear()
pt3dadd(149.5, 100, -87.5, 4.6)
pt3dadd(153, 101, -88, 4.1)
pt3dadd(157, 101, -95, 4.4)
pt3dadd(154, 103.5, -90.5, 4.4)
pt3dadd(151, 103, -91, 4.4)
pt3dadd(147.5, 104, -91.5, 4.4)
pt3dadd(149.5, 105.5, -105, 5)
pt3dadd(149, 109.5, -112.5, 5.1)
pt3dadd(153.5, 106, -119.5, 5.1)
pt3dadd(157, 106, -120.5, 4.2)
pt3dadd(163.5, 107.5, -125, 3.4)
pt3dadd(166.5, 113, -128.5, 4.6)
pt3dadd(168.5, 115, -132, 4.6)
pt3dadd(171, 116.5, -132.5, 4.1)
pt3dadd(170.5, 119.5, -138.5, 4.3)
pt3dadd(175, 119.5, -137.5, 4.1)
pt3dadd(179.5, 121.5, -149.5, 4)
pt3dadd(177, 125.5, -150.5, 4.3)
pt3dadd(175.5, 127.5, -151.5, 4.3)
pt3dadd(172, 130, -154.5, 4.3)
pt3dadd(174, 126.5, -158, 4.5)
pt3dadd(178, 123, -161.5, 4.4)
pt3dadd(181.5, 123, -162.5, 4.1)
pt3dadd(187, 122.5, -164, 4.3)
pt3dadd(186, 127.5, -165, 4.3)
pt3dadd(188.5, 122, -171.5, 4.6)
pt3dadd(191, 119, -172.5, 4.8)
pt3dadd(193.5, 116.5, -173.5, 5)
pt3dadd(197.5, 113.5, -175, 5.4)
pt3dadd(201.5, 111, -180, 5)
pt3dadd(202, 108.5, -181, 5)
pt3dadd(201.5, 102, -183.5, 4.6)
pt3dadd(207, 99, -187.5, 4.6)
pt3dadd(208.5, 97.5, -197.5, 5.5)
pt3dadd(210.5, 96.5, -198, 5.7)
pt3dadd(213, 96, -202.5, 6.1)
}
dend[126] {pt3dclear()
pt3dadd(213, 96, -202.5, 6.1)
pt3dadd(210.5, 93, -217.5, 2.7)
pt3dadd(208, 92.5, -220, 3.1)
pt3dadd(201.5, 91, -225, 4.5)
pt3dadd(199, 87.5, -233.5, 3.3)
pt3dadd(194, 85.5, -235.5, 2.8)
pt3dadd(188, 84, -237, 2.3)
pt3dadd(187.5, 81.5, -245.5, 2.3)
pt3dadd(190, 80, -250, 3)
pt3dadd(190.5, 77.5, -255, 2.6)
pt3dadd(192.5, 75.5, -256, 2.6)
pt3dadd(189, 79, -265, 2.6)
pt3dadd(185, 80, -262.5, 2.6)
pt3dadd(184, 78, -260, 2.5)
pt3dadd(186, 76, -260.5, 2.5)
pt3dadd(189, 74.5, -269.5, 2.5)
pt3dadd(192.5, 73, -270, 2.4)
pt3dadd(195.5, 71, -275, 2.6)
pt3dadd(195.5, 66, -276.5, 3.4)
pt3dadd(194, 63, -278, 2.5)
pt3dadd(193, 59.5, -281.5, 2.1)
pt3dadd(192, 56.5, -285.5, 2.2)
pt3dadd(193, 54, -286.5, 2.3)
pt3dadd(196.5, 55.5, -299.5, 1.7)
pt3dadd(199.5, 55.5, -303, 1.7)
pt3dadd(202, 54.5, -300.5, 1.5)
pt3dadd(202, 51, -301.5, 1.5)
pt3dadd(201, 48.5, -302.5, 1.6)
pt3dadd(199.5, 46.5, -306.5, 1.7)
pt3dadd(199.5, 43, -310, 1.8)
pt3dadd(197.5, 40.5, -315.5, 1.8)
pt3dadd(201.5, 36, -320.5, 1.5)
pt3dadd(206.5, 26.5, -325, 1.7)
pt3dadd(208.5, 22, -337.5, 1.8)
pt3dadd(211, 21, -338.5, 1.7)
}
}
proc shape3d_32() {
dend[126] { pt3dadd(211.5, 17.5, -340, 2.2)
pt3dadd(216, 15.5, -347.5, 2.3)
pt3dadd(217, 14, -348.5, 2.7)
}
dend[127] {pt3dclear()
pt3dadd(217, 14, -348.5, 2.7)
pt3dadd(219.5, 11, -354.5, 1.3)
pt3dadd(222.5, 12, -359.5, 1.1)
pt3dadd(225.5, 12, -360.5, 1.1)
pt3dadd(224, 9, -361.5, 1.2)
pt3dadd(224, 5.5, -362.5, 0.8)
pt3dadd(226, 3, -368, 0.7)
pt3dadd(229, 3, -368.5, 0.8)
pt3dadd(228.5, 5.5, -374.5, 0.8)
pt3dadd(231.5, 5, -375.5, 1)
pt3dadd(236.5, 5, -381.5, 1.2)
pt3dadd(238, 2, -386.5, 0.7)
pt3dadd(242, 0.5, -388.5, 1.2)
pt3dadd(244.5, -0.5, -389.5, 0.5)
pt3dadd(246, -2, -393.5, 0.5)
pt3dadd(250, -2.5, -395, 0.7)
pt3dadd(250.5, 0, -397.5, 0.7)
pt3dadd(251, 2.5, -398.5, 0.7)
pt3dadd(254, 3, -399.5, 0.7)
pt3dadd(258, 3, -401, 0.7)
pt3dadd(259.5, 1.5, -401.5, 0.6)
pt3dadd(257.5, -0.5, -407, 0.5)
pt3dadd(262, 0, -416, 0.6)
pt3dadd(265.5, 1.5, -426, 0.6)
pt3dadd(269, -3.5, -427, 1.9)
pt3dadd(271.5, -5, -428.5, 1.9)
pt3dadd(274, -6.5, -434, 1.7)
pt3dadd(277, -7, -435.5, 1.7)
pt3dadd(277.5, -10, -447.5, 1.5)
pt3dadd(280, -9, -453, 1.6)
pt3dadd(284.5, -6.5, -452.5, 1.6)
pt3dadd(286.5, -8, -458, 1.6)
pt3dadd(288, -5.5, -459.5, 1.2)
pt3dadd(285, -10, -471.5, 1.2)
pt3dadd(286, -13.5, -473.5, 1.2)
pt3dadd(286.5, -16.5, -475, 1.4)
}
dend[128] {pt3dclear()
pt3dadd(217, 14, -348.5, 2.7)
pt3dadd(215.5, 11, -349, 1.3)
pt3dadd(216.5, 8, -350, 1.5)
pt3dadd(217.5, 6, -350.5, 1.9)
pt3dadd(219.5, 5, -351, 2.4)
pt3dadd(221, 2, -351.5, 1.3)
pt3dadd(217.5, 2, -352.5, 1.3)
pt3dadd(216, -0.5, -358.5, 1.4)
pt3dadd(218.5, -2.5, -359, 1.4)
pt3dadd(221.5, -3, -360, 1.6)
pt3dadd(222, -6, -360.5, 1.6)
pt3dadd(221, -10.5, -371, 1.8)
pt3dadd(218.5, -12, -371.5, 1.8)
pt3dadd(219, -16, -372.5, 1.1)
pt3dadd(221.5, -20, -374, 1.1)
pt3dadd(223, -23, -375, 1.1)
pt3dadd(229.5, -23.5, -387.5, 1)
pt3dadd(231, -27, -399.5, 1.3)
pt3dadd(236.5, -30, -414.5, 0.9)
pt3dadd(239, -31, -416.5, 1)
pt3dadd(239.5, -35, -421.5, 1)
pt3dadd(237.5, -38, -425, 1)
pt3dadd(234.5, -39.5, -425.5, 1.7)
pt3dadd(233.5, -41.5, -430, 2.3)
pt3dadd(231.5, -44, -430.5, 1.1)
pt3dadd(228, -48.5, -432, 1)
pt3dadd(226, -49.5, -432, 1)
pt3dadd(227, -51.5, -432.5, 1.1)
pt3dadd(227.5, -57, -446.5, 1.6)
pt3dadd(228, -59.5, -440, 1.6)
pt3dadd(229, -63, -440.5, 1.6)
pt3dadd(231.5, -64, -441, 1.2)
pt3dadd(230, -65.5, -441.5, 1)
pt3dadd(229.5, -69.5, -446.5, 1.1)
pt3dadd(233.5, -72.5, -447, 1.3)
pt3dadd(235.5, -75, -448, 1.3)
pt3dadd(237, -78.5, -457, 1.1)
pt3dadd(239, -80, -457.5, 1.3)
pt3dadd(241, -81.5, -458, 1.2)
pt3dadd(242, -85.5, -458.5, 1.2)
pt3dadd(245.5, -89.5, -459.5, 1)
pt3dadd(247.5, -91.5, -460, 0.9)
pt3dadd(248.5, -94.5, -460.5, 0.9)
pt3dadd(249, -98.5, -458, 1)
pt3dadd(252, -103, -463, 1.2)
pt3dadd(255.5, -104, -463.5, 0.9)
pt3dadd(257.5, -106.5, -464.5, 1.1)
pt3dadd(259, -109.5, -465, 1.1)
pt3dadd(257.5, -112.5, -465.5, 0.9)
pt3dadd(255.5, -115, -466, 1.3)
pt3dadd(258, -118, -466.5, 1.1)
pt3dadd(260, -123, -467.5, 1.6)
pt3dadd(262.5, -127.5, -473, 1.6)
pt3dadd(263.5, -129.5, -469.5, 1.4)
pt3dadd(267.5, -132, -475, 1.1)
pt3dadd(268, -135, -486.5, 0.1)
pt3dadd(268.5, -137.5, -483, 0.1)
pt3dadd(268.5, -141, -483, 0.1)
pt3dadd(271, -146.5, -484, 0.1)
pt3dadd(276.5, -147.5, -484.5, 0.1)
pt3dadd(280.5, -150, -489, 0.3)
pt3dadd(279.5, -154, -489, 0.4)
pt3dadd(279, -156.5, -490, 0.4)
pt3dadd(280.5, -160, -490, 0.9)
pt3dadd(280, -165, -494, 0.5)
pt3dadd(281.5, -169.5, -491, 0.5)
pt3dadd(280, -171.5, -495, 0.5)
pt3dadd(282, -174, -495, 0.6)
pt3dadd(283.5, -176, -495.5, 2)
pt3dadd(284, -179, -495.5, 0.8)
pt3dadd(285.5, -183, -492.5, 0.8)
pt3dadd(285.5, -186, -492.5, 0.8)
pt3dadd(287, -190, -496.5, 0.8)
pt3dadd(289, -195.5, -497, 0.8)
pt3dadd(288, -198, -497, 0.8)
pt3dadd(286.5, -199.5, -497.5, 0.6)
pt3dadd(288, -204.5, -498, 0.6)
pt3dadd(288, -209, -501.5, 0.6)
pt3dadd(289, -212, -498.5, 0.6)
pt3dadd(289, -216, -499, 0.6)
pt3dadd(290, -220, -496, 1.8)
pt3dadd(290, -225, -496, 0.7)
pt3dadd(291.5, -226.5, -496.5, 0.8)
pt3dadd(293, -229, -496.5, 0.8)
pt3dadd(292, -232, -496.5, 0.7)
pt3dadd(294, -238, -501, 0.7)
pt3dadd(295.5, -240.5, -501, 0.6)
pt3dadd(293.5, -243.5, -501.5, 0.6)
pt3dadd(291, -244, -501.5, 0.6)
pt3dadd(292.5, -248, -509, 0.6)
pt3dadd(294, -249.5, -509.5, 0.7)
pt3dadd(295.5, -252, -503, 0.7)
pt3dadd(295.5, -255, -503, 0.7)
pt3dadd(293, -258, -514.5, 0.7)
pt3dadd(293.5, -263.5, -515, 0.5)
pt3dadd(290, -268.5, -512.5, 0.5)
}
dend[129] {pt3dclear()
pt3dadd(213, 96, -202.5, 6.1)
pt3dadd(214, 93.5, -209.5, 3.4)
pt3dadd(214, 90, -216.5, 3)
pt3dadd(210.5, 89.5, -219, 2.7)
pt3dadd(206.5, 87, -222, 3.4)
pt3dadd(205, 85.5, -221.5, 3.8)
pt3dadd(203, 83.5, -223.5, 4.7)
pt3dadd(199.5, 79, -223.5, 3.7)
pt3dadd(193, 72, -240, 3.8)
pt3dadd(192, 67.5, -241.5, 4.1)
pt3dadd(190, 66.5, -237.5, 4.1)
pt3dadd(187, 64.5, -239, 4.5)
pt3dadd(191.5, 62.5, -259.5, 4.1)
pt3dadd(196, 61.5, -258.5, 3.5)
pt3dadd(198.5, 57.5, -260.5, 2.5)
pt3dadd(200.5, 48.5, -270.5, 3.7)
pt3dadd(200.5, 45, -271.5, 3.7)
pt3dadd(197.5, 42, -273.5, 3.9)
pt3dadd(196.5, 38.5, -275, 4)
pt3dadd(199, 35, -281, 3)
pt3dadd(200, 31.5, -281.5, 3)
pt3dadd(203.5, 26, -283, 3)
pt3dadd(207.5, 22.5, -287, 2.5)
pt3dadd(208, 19.5, -287.5, 2.7)
pt3dadd(208.5, 13.5, -291.5, 3.8)
pt3dadd(206.5, 11, -292.5, 3.8)
pt3dadd(205, 9, -293, 3.4)
pt3dadd(203, 7.5, -293.5, 3.4)
pt3dadd(205, 5, -294.5, 2)
pt3dadd(207.5, 3.5, -295, 2)
pt3dadd(209.5, 0.5, -301, 2.3)
pt3dadd(209.5, -2, -304, 3.3)
}
dend[130] {pt3dclear()
pt3dadd(209.5, -2, -304, 3.3)
pt3dadd(212, -5, -302.5, 1.4)
pt3dadd(216.5, -6, -305, 1.2)
pt3dadd(218.5, -7.5, -305.5, 1.1)
pt3dadd(220.5, -9.5, -306, 1.1)
pt3dadd(224.5, -11, -302, 1.1)
pt3dadd(226.5, -12, -310, 1.1)
pt3dadd(229, -14.5, -310.5, 1.2)
pt3dadd(230.5, -18.5, -314, 1)
pt3dadd(233, -21, -314.5, 1)
pt3dadd(234, -23, -314.5, 1.2)
pt3dadd(236, -26, -317.5, 1.1)
pt3dadd(238.5, -29, -318, 1.2)
pt3dadd(242, -32, -321, 1.2)
pt3dadd(245.5, -34, -319, 1.1)
pt3dadd(248.5, -38, -320, 1.2)
pt3dadd(251, -40, -320.5, 1.2)
pt3dadd(256, -43, -321, 1.4)
pt3dadd(256, -49, -324.5, 1.3)
pt3dadd(258.5, -50.5, -322.5, 1.3)
pt3dadd(260.5, -52, -323, 1.3)
pt3dadd(260.5, -57, -326.5, 1.2)
pt3dadd(262.5, -60, -324.5, 1.2)
pt3dadd(261, -67.5, -325, 1.1)
pt3dadd(262.5, -69, -330, 1.1)
pt3dadd(265, -70.5, -330, 1.1)
pt3dadd(265, -75, -330.5, 1)
pt3dadd(266.5, -78.5, -331, 1)
pt3dadd(266, -82.5, -331, 0.9)
pt3dadd(268.5, -84, -331, 0.9)
pt3dadd(271, -85, -331.5, 0.6)
pt3dadd(271.5, -90.5, -336, 0.8)
pt3dadd(274.5, -94, -340.5, 0.9)
}
}
proc shape3d_33() {
dend[130] { pt3dadd(279, -97.5, -341, 1.1)
pt3dadd(279, -101.5, -341, 1.1)
pt3dadd(282, -103, -341.5, 1.5)
pt3dadd(285, -105, -346.5, 1)
pt3dadd(287, -107.5, -346.5, 1)
pt3dadd(289, -110, -351, 0.8)
pt3dadd(291.5, -111.5, -351, 0.9)
pt3dadd(294, -113.5, -351.5, 1.1)
pt3dadd(295.5, -117, -347.5, 1)
pt3dadd(299.5, -124.5, -352.5, 1.1)
pt3dadd(302, -128, -352.5, 1.2)
pt3dadd(303.5, -131.5, -353, 1.2)
pt3dadd(303, -136, -345, 0.9)
pt3dadd(304.5, -141, -350, 1.2)
pt3dadd(306, -143, -350.5, 1.2)
pt3dadd(308.5, -146, -350.5, 0.5)
pt3dadd(309.5, -148, -355, 1.3)
pt3dadd(310, -150.5, -351.5, 1.2)
pt3dadd(308.5, -156.5, -351.5, 0.9)
pt3dadd(310, -159.5, -356, 0.8)
pt3dadd(309, -161.5, -352.5, 0.8)
pt3dadd(307, -163.5, -357, 0.8)
pt3dadd(305.5, -166, -353, 1)
pt3dadd(307.5, -169.5, -353.5, 1)
pt3dadd(307.5, -172.5, -357.5, 1.2)
pt3dadd(308.5, -175, -358, 1.2)
pt3dadd(309.5, -177, -354.5, 1.2)
pt3dadd(309.5, -182.5, -346.5, 1.1)
pt3dadd(307, -186.5, -347, 1.1)
pt3dadd(308, -191, -347, 1.1)
pt3dadd(309.5, -193.5, -347.5, 1.1)
pt3dadd(309, -197, -335.5, 0.6)
pt3dadd(312, -200.5, -336, 0.7)
pt3dadd(315, -204.5, -336.5, 0.7)
pt3dadd(315, -208, -336.5, 0.7)
pt3dadd(314, -210.5, -337, 0.8)
pt3dadd(314, -214, -337, 0.3)
pt3dadd(314, -217, -337.5, 0.7)
pt3dadd(314, -220, -337.5, 0.7)
pt3dadd(315, -223.5, -338, 1)
pt3dadd(315, -226.5, -338, 1)
pt3dadd(313.5, -228, -338, 1)
pt3dadd(312.5, -232, -338.5, 0.1)
pt3dadd(313.5, -235.5, -338.5, 0.1)
pt3dadd(312.5, -241, -339, 0.1)
pt3dadd(314.5, -244, -339.5, 0.1)
pt3dadd(313, -246, -339.5, 0.1)
pt3dadd(313, -252, -340, 0.1)
pt3dadd(310.5, -253.5, -340, 1.6)
pt3dadd(308.5, -255.5, -340.5, 0.1)
pt3dadd(308, -259, -340.5, 0.6)
pt3dadd(307, -263, -341, 0.9)
pt3dadd(304.5, -265, -337.5, 0.9)
pt3dadd(303.5, -268.5, -337.5, 0.7)
pt3dadd(302.5, -271.5, -337.5, 0.8)
pt3dadd(301, -273.5, -338, 0.8)
pt3dadd(301.5, -278.5, -346.5, 0.9)
pt3dadd(300, -281, -347, 0.7)
pt3dadd(296.5, -285.5, -352, 0.7)
pt3dadd(299, -293, -344.5, 0.7)
pt3dadd(300, -299, -345, 0.8)
pt3dadd(299, -304.5, -345.5, 0.8)
}
dend[131] {pt3dclear()
pt3dadd(209.5, -2, -304, 3.3)
pt3dadd(209, -5.5, -304.5, 1.6)
pt3dadd(209.5, -8, -305, 1.8)
pt3dadd(213, -10.5, -306.5, 1.8)
pt3dadd(218.5, -10.5, -307.5, 1.8)
pt3dadd(221.5, -13, -311.5, 2.8)
pt3dadd(224, -14.5, -312, 2.4)
pt3dadd(226, -16.5, -318, 2.6)
pt3dadd(227, -20, -317, 2.8)
pt3dadd(228.5, -25, -316.5, 2.8)
pt3dadd(230, -28, -320, 2.6)
pt3dadd(233, -30.5, -321, 2.6)
pt3dadd(236, -33, -322, 3.1)
pt3dadd(239, -35.5, -322.5, 2.8)
pt3dadd(242, -39.5, -324, 2.5)
pt3dadd(244.5, -41.5, -325, 2.1)
pt3dadd(246.5, -44, -327, 1.9)
pt3dadd(247.5, -46, -348, 3)
}
dend[132] {pt3dclear()
pt3dadd(247.5, -46, -348, 3)
pt3dadd(250, -44, -344.5, 1.4)
pt3dadd(253, -45.5, -354, 0.8)
pt3dadd(255.5, -47.5, -343, 0.6)
pt3dadd(256.5, -49.5, -343, 0.9)
pt3dadd(258, -52, -343.5, 0.9)
pt3dadd(258.5, -56, -348, 0.9)
pt3dadd(262, -57.5, -348.5, 0.7)
pt3dadd(264.5, -61, -349, 1)
pt3dadd(265.5, -63, -349, 1)
pt3dadd(269.5, -63.5, -349.5, 0.7)
pt3dadd(272, -62, -350, 0.8)
pt3dadd(275, -63.5, -350, 0.8)
pt3dadd(278, -65, -350.5, 1)
pt3dadd(279, -67, -351, 1)
pt3dadd(278.5, -70.5, -355.5, 0.9)
pt3dadd(281, -72, -352, 1.1)
pt3dadd(283, -73.5, -352, 1.1)
pt3dadd(286, -73.5, -352.5, 1.1)
pt3dadd(286.5, -76.5, -357, 1.1)
pt3dadd(288.5, -77.5, -362, 0.8)
pt3dadd(292.5, -77, -362.5, 0.9)
pt3dadd(295.5, -78.5, -363, 0.8)
pt3dadd(299.5, -83.5, -372, 0.9)
pt3dadd(302.5, -85.5, -372.5, 0.9)
pt3dadd(303, -89, -373, 0.8)
pt3dadd(305, -92.5, -373.5, 0.8)
pt3dadd(307.5, -95.5, -373.5, 0.8)
pt3dadd(308, -98.5, -370, 0.8)
pt3dadd(305.5, -100, -375, 1)
pt3dadd(307.5, -104, -375, 1)
pt3dadd(310, -105, -372, 0.7)
pt3dadd(313.5, -108, -379.5, 0.9)
pt3dadd(317.5, -109, -380, 0.9)
pt3dadd(320, -114, -380.5, 1)
pt3dadd(325, -114, -381, 0.9)
pt3dadd(330, -117.5, -385, 1.1)
pt3dadd(338, -116, -386, 1.1)
pt3dadd(344.5, -117, -390.5, 0.7)
pt3dadd(349, -116, -391, 0.9)
pt3dadd(352.5, -114, -391.5, 0.7)
pt3dadd(357.5, -116, -392, 0.1)
pt3dadd(360.5, -116, -395.5, 0.1)
pt3dadd(364, -116, -403, 0.1)
pt3dadd(368.5, -114.5, -397, 0.9)
pt3dadd(369.5, -116.5, -397, 0.9)
pt3dadd(372, -117.5, -397.5, 0.9)
pt3dadd(375.5, -119, -398, 0.9)
pt3dadd(378.5, -119, -398, 0.7)
pt3dadd(382.5, -119, -402, 0.7)
pt3dadd(385, -122, -402.5, 0.1)
pt3dadd(386, -124, -403, 0.1)
pt3dadd(389.5, -126, -407, 0.1)
pt3dadd(396.5, -132, -414.5, 0.1)
pt3dadd(400, -135, -409, 0.1)
pt3dadd(404, -135, -409, 0.1)
}
dend[133] {pt3dclear()
pt3dadd(247.5, -46, -348, 3)
pt3dadd(244.5, -49, -337, 2.2)
pt3dadd(247.5, -50.5, -337, 2.2)
pt3dadd(250.5, -50.5, -337.5, 2.2)
pt3dadd(253, -52.5, -338, 2.2)
pt3dadd(256.5, -55, -347.5, 1.9)
pt3dadd(259, -55.5, -347.5, 1.9)
pt3dadd(258.5, -58.5, -348, 1.6)
pt3dadd(257.5, -60.5, -357.5, 1.9)
pt3dadd(263.5, -60, -371.5, 2)
pt3dadd(269, -61, -368.5, 1.9)
pt3dadd(271.5, -60.5, -361, 1.7)
pt3dadd(273.5, -59, -375, 2)
pt3dadd(277, -59, -375.5, 1.6)
pt3dadd(282.5, -59, -376.5, 1.4)
pt3dadd(285.5, -60.5, -385, 1.7)
pt3dadd(289.5, -63, -386, 2)
pt3dadd(293, -64, -386.5, 2.1)
pt3dadd(296.5, -67, -388, 1.4)
pt3dadd(298.5, -69, -388.5, 1.4)
pt3dadd(303, -69, -389.5, 1.4)
pt3dadd(305.5, -71.5, -390, 1.6)
pt3dadd(307, -73.5, -387.5, 1.6)
pt3dadd(308, -75.5, -388, 1.3)
pt3dadd(310.5, -79, -389, 1.5)
pt3dadd(312.5, -81, -389.5, 1.3)
pt3dadd(317, -86, -395, 1.5)
pt3dadd(319, -88, -403, 1.1)
pt3dadd(321.5, -93, -404.5, 0.8)
pt3dadd(328, -91.5, -404.5, 1.1)
pt3dadd(332, -92, -412.5, 1.1)
pt3dadd(329.5, -96.5, -418, 1.2)
pt3dadd(333, -99, -419, 1.8)
pt3dadd(337, -99, -423.5, 2)
pt3dadd(340, -99.5, -424, 2)
pt3dadd(341.5, -103, -425, 1.6)
pt3dadd(343.5, -106, -426, 1.4)
pt3dadd(343.5, -109.5, -431, 1.4)
pt3dadd(345, -111, -432, 1.4)
pt3dadd(348, -111.5, -433, 1.4)
pt3dadd(348.5, -115, -444, 1.3)
pt3dadd(350, -117.5, -445, 1.3)
pt3dadd(352, -120, -446, 1.3)
pt3dadd(354.5, -122, -447, 1.3)
pt3dadd(353, -125.5, -447.5, 1.6)
pt3dadd(355.5, -127.5, -458, 1.6)
pt3dadd(360, -129, -459.5, 1.5)
pt3dadd(362, -131.5, -457.5, 1.7)
pt3dadd(364, -134.5, -459, 1.9)
pt3dadd(367.5, -137.5, -464.5, 1.9)
pt3dadd(369, -139.5, -462.5, 2.2)
pt3dadd(372, -141, -467.5, 2.2)
pt3dadd(378.5, -144, -475, 1.7)
pt3dadd(382.5, -149, -495, 2.3)
pt3dadd(385, -150, -492, 2.3)
pt3dadd(389.5, -157.5, -501.5, 1.9)
pt3dadd(387, -155.5, -502, 1.8)
pt3dadd(390, -153.5, -506.5, 1.7)
pt3dadd(392.5, -152, -506.5, 1.7)
pt3dadd(397, -153, -504, 1.6)
pt3dadd(401.5, -153, -504.5, 1.6)
pt3dadd(401.5, -156, -505, 1.6)
pt3dadd(400.5, -158, -505.5, 0.9)
pt3dadd(398, -159.5, -506, 1.3)
}
}
proc shape3d_34() {
dend[133] { pt3dadd(397.5, -163.5, -514.5, 0.9)
pt3dadd(395, -166.5, -519, 1.2)
pt3dadd(391.5, -168.5, -519.5, 1.2)
pt3dadd(395, -170, -520, 1.1)
pt3dadd(397.5, -170.5, -520.5, 1.1)
pt3dadd(400.5, -173, -525, 1.1)
pt3dadd(399, -177.5, -525.5, 1)
pt3dadd(398, -180, -522, 1)
pt3dadd(400.5, -181, -532.5, 0.8)
pt3dadd(403, -182, -533, 0.8)
pt3dadd(403, -185, -548, 1)
pt3dadd(404.5, -187.5, -548.5, 1.1)
pt3dadd(406, -190, -549, 1.1)
pt3dadd(405, -194.5, -550, 0.6)
pt3dadd(407, -196, -546.5, 0.8)
pt3dadd(410.5, -199.5, -552, 0.8)
pt3dadd(412, -202.5, -552.5, 0.8)
pt3dadd(412.5, -205, -557.5, 0.8)
pt3dadd(414.5, -207.5, -558, 0.8)
pt3dadd(416, -209.5, -555, 0.8)
pt3dadd(418, -210.5, -559.5, 0.9)
pt3dadd(422.5, -210, -561.5, 0.8)
pt3dadd(426.5, -211.5, -562, 0.3)
pt3dadd(431, -209.5, -560.5, 0.8)
pt3dadd(433, -206.5, -571, 1.2)
pt3dadd(434, -211, -568, 1.1)
pt3dadd(440, -211.5, -574.5, 1.4)
pt3dadd(446.5, -215.5, -581.5, 1.1)
pt3dadd(448, -218, -575, 1.3)
pt3dadd(447.5, -222.5, -575.5, 1.3)
pt3dadd(449.5, -225.5, -575.5, 0.9)
pt3dadd(451, -227.5, -578.5, 0.7)
pt3dadd(451, -231.5, -575.5, 0.7)
pt3dadd(449, -233.5, -576, 1.5)
pt3dadd(448, -239, -576, 0.8)
pt3dadd(447, -242.5, -582.5, 1.5)
pt3dadd(445, -246.5, -586, 1.9)
pt3dadd(445.5, -249.5, -586, 1.9)
pt3dadd(448, -251.5, -586, 1.3)
pt3dadd(450, -252.5, -586, 1)
pt3dadd(450, -256.5, -586, 0.8)
pt3dadd(450, -263, -586.5, 0.8)
pt3dadd(452.5, -265.5, -586.5, 0.8)
pt3dadd(457, -268, -589.5, 0.9)
pt3dadd(460, -268, -589.5, 0.9)
pt3dadd(462.5, -269.5, -596.5, 0.6)
pt3dadd(464.5, -271.5, -596.5, 0.6)
pt3dadd(467, -273, -599.5, 1.4)
pt3dadd(469, -276.5, -597, 0.6)
pt3dadd(472.5, -276.5, -597, 0.6)
pt3dadd(476, -279, -600, 0.2)
pt3dadd(477.5, -276.5, -600.5, 0.3)
pt3dadd(480.5, -277.5, -600.5, 0.1)
pt3dadd(482, -280, -597.5, 2.5)
pt3dadd(484, -282.5, -600.5, 2.5)
pt3dadd(487.5, -284, -598, 0.6)
pt3dadd(491, -285.5, -598, 0.8)
pt3dadd(494.5, -285.5, -598, 0.8)
pt3dadd(497.5, -285.5, -598, 0.8)
pt3dadd(501.5, -285.5, -598, 0.6)
}
dend[134] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 10.8)
pt3dadd(59.5, -34, 25, 10.8)
pt3dadd(66, -35, 25, 8.5)
pt3dadd(69, -35, 21, 10.9)
pt3dadd(77, -35, 28, 11.6)
pt3dadd(90, -38, 36.5, 10.5)
pt3dadd(97.5, -38.5, 38, 11.3)
pt3dadd(106, -39, 37.5, 10)
pt3dadd(113.5, -40, 45, 9.9)
pt3dadd(120, -40.5, 54, 10.3)
}
dend[135] {pt3dclear()
pt3dadd(120, -40.5, 54, 10.3)
pt3dadd(122.5, -46.5, 49.5, 2)
pt3dadd(125.5, -47, 49.5, 2)
pt3dadd(127.5, -46, 47, 2)
pt3dadd(127.5, -49, 44.5, 2)
pt3dadd(129, -51, 44.5, 2)
pt3dadd(130, -53, 44.5, 1.6)
pt3dadd(132, -55, 44.5, 1.6)
pt3dadd(136.5, -56.5, 51.5, 2.3)
pt3dadd(142, -57, 51.5, 2)
pt3dadd(145, -58.5, 51.5, 2.2)
pt3dadd(146, -61, 51.5, 1.8)
pt3dadd(152.5, -62.5, 51.5, 1.6)
pt3dadd(156, -64, 51.5, 1.6)
pt3dadd(156, -67.5, 49.5, 1.6)
pt3dadd(155, -77, 51.5, 1.6)
pt3dadd(158, -79, 51.5, 1.6)
pt3dadd(161.5, -82.5, 51.5, 1.3)
pt3dadd(162.5, -84.5, 51.5, 1.3)
pt3dadd(161.5, -86.5, 52, 1.3)
pt3dadd(162, -91.5, 52, 1.5)
pt3dadd(167, -95.5, 52, 1.2)
pt3dadd(169.5, -97.5, 52, 1.1)
pt3dadd(172, -99, 52, 1.3)
pt3dadd(172.5, -102, 50, 1.1)
pt3dadd(174.5, -109.5, 52, 1.1)
pt3dadd(176.5, -111.5, 52, 0.8)
pt3dadd(180.5, -112, 52, 0.9)
pt3dadd(180.5, -115.5, 52, 1)
pt3dadd(181, -118, 52, 1)
pt3dadd(181.5, -122.5, 50, 0.9)
pt3dadd(186.5, -125.5, 50, 0.9)
pt3dadd(185.5, -131.5, 45, 0.8)
pt3dadd(186.5, -135, 45, 0.8)
pt3dadd(192.5, -139.5, 40.5, 0.8)
pt3dadd(195.5, -141.5, 40.5, 0.8)
pt3dadd(198.5, -144, 40.5, 0.7)
pt3dadd(201, -146.5, 40.5, 0.7)
pt3dadd(201.5, -150, 40.5, 0.7)
pt3dadd(202.5, -154.5, 40.5, 0.7)
pt3dadd(201.5, -162, 40.5, 0.7)
pt3dadd(202.5, -165.5, 40.5, 0.7)
pt3dadd(205.5, -169, 40.5, 0.7)
pt3dadd(206, -173, 40.5, 0.7)
pt3dadd(208, -175, 38, 0.7)
pt3dadd(210.5, -176, 35.5, 0.7)
pt3dadd(214.5, -178, 33, 0.8)
pt3dadd(216, -181, 38, 0.6)
pt3dadd(220.5, -184, 38, 0.6)
}
dend[136] {pt3dclear()
pt3dadd(120, -40.5, 54, 10.3)
pt3dadd(128.5, -39.5, 75, 8.6)
pt3dadd(136, -43.5, 94.5, 9.5)
}
dend[137] {pt3dclear()
pt3dadd(136, -43.5, 94.5, 9.5)
pt3dadd(140, -38.5, 89, 3.1)
pt3dadd(144.5, -38.5, 89, 2.8)
pt3dadd(146.5, -39.5, 89, 2.3)
pt3dadd(149.5, -39.5, 94.5, 2)
pt3dadd(152.5, -39.5, 94.5, 2)
pt3dadd(157.5, -38, 91.5, 2)
pt3dadd(160, -37, 97, 2.8)
pt3dadd(162, -35, 94.5, 2.2)
pt3dadd(163, -33, 94.5, 1.5)
pt3dadd(163.5, -29, 94.5, 1.4)
pt3dadd(165.5, -27, 94.5, 1.5)
pt3dadd(168.5, -26.5, 103, 1.6)
pt3dadd(175, -26.5, 105.5, 1.8)
pt3dadd(179, -28.5, 111, 2.1)
pt3dadd(181.5, -28, 105.5, 2.4)
pt3dadd(183, -22.5, 114, 2.6)
pt3dadd(187.5, -17, 111, 2.4)
pt3dadd(188.5, -13.5, 111, 1.7)
pt3dadd(194.5, -9.5, 108.5, 1.9)
pt3dadd(198, -7.5, 111, 1.9)
pt3dadd(203, -4.5, 111, 1.7)
pt3dadd(209.5, 3, 111, 2.3)
pt3dadd(215.5, 7, 114, 2.2)
pt3dadd(220, 12, 111, 2)
pt3dadd(224.5, 16, 111, 1.7)
pt3dadd(229, 20, 111, 1.6)
pt3dadd(235, 24.5, 111, 1.6)
pt3dadd(242, 30, 108.5, 1.5)
pt3dadd(245, 32, 108.5, 1.3)
pt3dadd(249.5, 34.5, 108.5, 1.4)
pt3dadd(253, 36.5, 111, 1.7)
pt3dadd(256.5, 39, 105.5, 1.4)
pt3dadd(262.5, 42, 108.5, 1.4)
pt3dadd(267, 43.5, 114, 1.8)
pt3dadd(270, 45, 108.5, 1.3)
pt3dadd(278.5, 49.5, 114, 1.5)
pt3dadd(286.5, 51.5, 111, 0.9)
pt3dadd(291, 53, 111, 0.8)
pt3dadd(299, 57, 111, 0.8)
}
dend[138] {pt3dclear()
pt3dadd(136, -43.5, 94.5, 9.5)
pt3dadd(139, -46.5, 97, 5.6)
pt3dadd(139.5, -50, 100.5, 5.6)
pt3dadd(136, -62, 110, 5.8)
}
dend[139] {pt3dclear()
pt3dadd(136, -62, 110, 5.8)
pt3dadd(136, -67, 121.5, 5.3)
pt3dadd(138.5, -76.5, 130.5, 4.7)
pt3dadd(138, -81.5, 125, 4.7)
pt3dadd(138, -93, 130.5, 3.4)
pt3dadd(138, -99, 128.5, 3.4)
pt3dadd(137.5, -102.5, 132, 3.5)
pt3dadd(137, -109.5, 140.5, 3.4)
pt3dadd(134, -118.5, 129.5, 2.7)
pt3dadd(131, -128.5, 135, 3.2)
pt3dadd(134, -131, 132.5, 4.2)
pt3dadd(136, -134, 133, 4.5)
pt3dadd(139, -137, 133.5, 3.5)
pt3dadd(140, -141.5, 149, 3.3)
pt3dadd(141, -144, 140, 2.8)
pt3dadd(142.5, -146.5, 140.5, 2.8)
pt3dadd(143.5, -149.5, 141, 2.8)
pt3dadd(143.5, -153, 141.5, 2.8)
pt3dadd(146.5, -161, 143, 3.2)
pt3dadd(149, -163, 143, 3.2)
pt3dadd(152.5, -170.5, 144.5, 3.2)
pt3dadd(152.5, -173.5, 144.5, 3.2)
pt3dadd(152, -180.5, 156.5, 2.7)
pt3dadd(150.5, -188, 157.5, 3.1)
pt3dadd(152.5, -189.5, 158, 3.1)
pt3dadd(156.5, -192.5, 166, 2.5)
pt3dadd(159.5, -201.5, 174.5, 2.5)
pt3dadd(159, -211, 173, 2.6)
pt3dadd(159, -217, 170.5, 2.2)
pt3dadd(157.5, -219, 175, 2)
pt3dadd(158, -224, 176, 2.3)
pt3dadd(159.5, -231.5, 184, 2.5)
pt3dadd(159.5, -234.5, 185, 2.8)
pt3dadd(159, -239.5, 186, 2)
}
}
proc shape3d_35() {
dend[139] { pt3dadd(166.5, -241.5, 183, 2)
pt3dadd(172.5, -243.5, 193.5, 2.5)
pt3dadd(172.5, -246.5, 194, 2.5)
pt3dadd(176, -252, 198.5, 2.3)
pt3dadd(179.5, -258, 202.5, 1.9)
pt3dadd(182, -260, 203.5, 2)
pt3dadd(186.5, -262.5, 204.5, 2)
pt3dadd(188, -264, 205, 1.7)
pt3dadd(188.5, -271.5, 214, 1.9)
pt3dadd(190.5, -278, 216, 1.7)
pt3dadd(192, -280, 219, 1.7)
pt3dadd(194.5, -283, 218, 1.5)
pt3dadd(197, -285, 224.5, 2)
pt3dadd(200, -289, 226, 1.9)
pt3dadd(204, -292.5, 225, 1.9)
pt3dadd(207.5, -296, 230, 2.3)
pt3dadd(211, -300, 235.5, 3)
pt3dadd(213, -301.5, 238, 3.3)
pt3dadd(215.5, -303.5, 241.5, 4.5)
}
dend[140] {pt3dclear()
pt3dadd(215.5, -303.5, 241.5, 4.5)
pt3dadd(216, -309, 241.5, 1.6)
pt3dadd(217.5, -313, 242, 1.6)
pt3dadd(220.5, -321, 242.5, 1.6)
pt3dadd(224, -321, 243, 1.1)
pt3dadd(224.5, -323.5, 243, 1.1)
pt3dadd(223.5, -325.5, 243, 1.1)
pt3dadd(225, -328, 243, 1.3)
pt3dadd(225.5, -331, 240, 1.5)
pt3dadd(224, -335, 247, 1.7)
pt3dadd(223.5, -341.5, 247.5, 1.3)
pt3dadd(223.5, -344.5, 247.5, 1.3)
pt3dadd(221.5, -346.5, 247.5, 1.3)
pt3dadd(219.5, -352.5, 248, 1.1)
pt3dadd(222, -363.5, 248.5, 1.3)
pt3dadd(223.5, -365, 248.5, 1.7)
pt3dadd(225, -377.5, 249, 1.3)
pt3dadd(227, -382, 249, 0.9)
pt3dadd(228, -384.5, 249, 0.9)
pt3dadd(228, -391, 249.5, 1.2)
pt3dadd(228.5, -396.5, 246, 1.5)
pt3dadd(230.5, -400, 261, 0.9)
pt3dadd(230, -403, 261, 0.9)
pt3dadd(227, -404.5, 261.5, 0.9)
pt3dadd(226.5, -407, 261.5, 0.9)
pt3dadd(227.5, -411.5, 261.5, 0.9)
pt3dadd(227, -414.5, 261.5, 0.9)
pt3dadd(225.5, -418, 262, 1.1)
pt3dadd(225, -422, 262, 1.8)
pt3dadd(223, -428.5, 258.5, 0.9)
pt3dadd(220.5, -430, 262.5, 0.9)
pt3dadd(221, -433.5, 259, 1)
pt3dadd(217.5, -433.5, 256, 1.4)
pt3dadd(217.5, -436.5, 259.5, 1)
pt3dadd(221, -441.5, 267, 1.2)
pt3dadd(220.5, -450.5, 278, 1.4)
pt3dadd(223.5, -454, 275, 0.9)
pt3dadd(222, -458.5, 281.5, 0.9)
pt3dadd(221.5, -469, 290, 1.2)
pt3dadd(219, -473.5, 294, 1.4)
pt3dadd(221.5, -474.5, 294.5, 1.1)
pt3dadd(223, -476.5, 295, 1.4)
pt3dadd(221.5, -478, 295, 0.7)
pt3dadd(219.5, -480, 295.5, 0.8)
pt3dadd(221, -482, 295.5, 0.9)
pt3dadd(221.5, -488.5, 296.5, 0.9)
pt3dadd(221, -491, 297, 0.9)
pt3dadd(221, -496.5, 297.5, 0.5)
pt3dadd(223.5, -498, 308.5, 0.5)
pt3dadd(224, -501, 309, 0.5)
pt3dadd(223, -503, 309, 0.5)
pt3dadd(219.5, -506, 310, 0.8)
pt3dadd(225, -510, 305, 0.8)
pt3dadd(226, -512.5, 312.5, 0.8)
pt3dadd(228.5, -514.5, 312.5, 2)
pt3dadd(230, -518, 313.5, 1)
pt3dadd(230, -521, 313.5, 1.4)
pt3dadd(231, -523.5, 314, 0.8)
pt3dadd(229, -529, 315, 0.8)
pt3dadd(230, -533, 315.5, 0.8)
pt3dadd(232.5, -536, 316, 0.8)
pt3dadd(230, -539.5, 317, 1.6)
pt3dadd(231.5, -548.5, 324.5, 1.2)
pt3dadd(231.5, -550, 325, 1.2)
}
dend[141] {pt3dclear()
pt3dadd(215.5, -303.5, 241.5, 4.5)
pt3dadd(220.5, -305, 241.5, 1.7)
pt3dadd(223.5, -304, 249.5, 1.7)
pt3dadd(228, -304, 249.5, 1.7)
pt3dadd(231, -303.5, 249.5, 1.7)
pt3dadd(234.5, -303.5, 253, 1.7)
pt3dadd(237.5, -303.5, 253, 1.9)
pt3dadd(241.5, -303.5, 253.5, 2.3)
pt3dadd(245.5, -305, 257, 1.7)
pt3dadd(249, -305.5, 246, 1.2)
pt3dadd(252, -305.5, 246.5, 1.2)
pt3dadd(254, -302.5, 250.5, 1.1)
pt3dadd(257, -302.5, 250.5, 1.7)
pt3dadd(263, -304.5, 250.5, 1.3)
pt3dadd(267, -304.5, 258, 1.3)
pt3dadd(271, -304.5, 258, 1.4)
pt3dadd(274.5, -304.5, 258, 1.3)
pt3dadd(277.5, -304.5, 254.5, 1.1)
pt3dadd(286.5, -300.5, 265.5, 1.3)
pt3dadd(289.5, -300.5, 262, 1.3)
pt3dadd(293.5, -298.5, 259, 1.1)
pt3dadd(297, -298.5, 259, 1)
pt3dadd(300, -295.5, 262.5, 0.7)
pt3dadd(303.5, -296.5, 262.5, 0.7)
pt3dadd(306, -298, 270, 0.7)
pt3dadd(308.5, -299.5, 270, 0.7)
pt3dadd(311.5, -299.5, 270, 0.7)
pt3dadd(315, -299, 270, 0.8)
pt3dadd(318, -297.5, 277.5, 0.8)
pt3dadd(323, -297.5, 278, 0.8)
pt3dadd(324.5, -300, 274, 0.8)
pt3dadd(333, -301.5, 274, 0.9)
pt3dadd(336, -301.5, 274, 0.6)
pt3dadd(339, -301.5, 274.5, 0.6)
pt3dadd(344, -301.5, 274.5, 0.6)
pt3dadd(347.5, -303, 274.5, 0.6)
pt3dadd(349.5, -306, 271, 0.6)
pt3dadd(352, -310, 275, 0.4)
}
dend[142] {pt3dclear()
pt3dadd(136, -62, 110, 5.8)
pt3dadd(139.5, -63.5, 125, 4)
pt3dadd(139.5, -67, 126, 4.7)
pt3dadd(139, -71, 127, 4.7)
pt3dadd(135.5, -66.5, 138.5, 5.9)
pt3dadd(134, -70.5, 139.5, 5.8)
pt3dadd(132, -72, 143.5, 4.3)
pt3dadd(130.5, -74.5, 148.5, 4.3)
pt3dadd(127.5, -74.5, 149.5, 5.2)
pt3dadd(121.5, -74.5, 159, 5.2)
pt3dadd(118.5, -74.5, 157, 6.5)
}
dend[143] {pt3dclear()
pt3dadd(118.5, -74.5, 157, 6.5)
pt3dadd(118, -77.5, 158, 2.6)
pt3dadd(115.5, -80, 159.5, 2.6)
pt3dadd(112, -81.5, 160.5, 2.6)
pt3dadd(110, -84.5, 161.5, 2.6)
pt3dadd(109.5, -89, 150.5, 2.5)
pt3dadd(109.5, -92.5, 164, 2.5)
pt3dadd(111, -96.5, 165.5, 3.1)
pt3dadd(113.5, -98.5, 175, 3.7)
pt3dadd(116, -103, 178.5, 1.9)
pt3dadd(118, -104.5, 179.5, 1.7)
pt3dadd(117, -108.5, 184.5, 1.6)
pt3dadd(115, -106.5, 194.5, 1.6)
pt3dadd(112.5, -103.5, 196, 1.6)
pt3dadd(112, -108, 208, 2.5)
pt3dadd(114, -110.5, 209, 3)
pt3dadd(115, -108.5, 203, 2.6)
pt3dadd(116, -105.5, 213, 2.6)
pt3dadd(118, -104, 214, 2.6)
pt3dadd(123, -104, 225, 2.5)
pt3dadd(121.5, -100.5, 229.5, 2.8)
pt3dadd(118.5, -98.5, 239.5, 2.8)
pt3dadd(118, -102, 240.5, 2.8)
pt3dadd(118.5, -106.5, 241.5, 2.5)
pt3dadd(120.5, -109, 242, 2.2)
pt3dadd(120.5, -113, 243, 2.2)
pt3dadd(118.5, -108.5, 257.5, 2.5)
pt3dadd(116, -108, 258, 2.5)
pt3dadd(122.5, -107.5, 275, 2.6)
pt3dadd(125.5, -104, 273.5, 2.3)
pt3dadd(128, -110, 284.5, 2.2)
pt3dadd(130, -108, 289.5, 2.2)
pt3dadd(130.5, -105.5, 306, 2.2)
pt3dadd(135.5, -108, 304.5, 1.8)
pt3dadd(137, -110, 317.5, 1.8)
pt3dadd(136.5, -113.5, 323.5, 1.8)
pt3dadd(139, -112.5, 324.5, 1.7)
pt3dadd(137, -114, 323.5, 1.9)
pt3dadd(135.5, -116, 324.5, 1.5)
pt3dadd(142.5, -120, 341.5, 1.8)
pt3dadd(140.5, -116, 353, 1.9)
pt3dadd(137.5, -116, 351, 1.8)
pt3dadd(134, -121, 363, 1.9)
pt3dadd(138.5, -122.5, 374, 2.2)
pt3dadd(136.5, -124, 377.5, 2.2)
pt3dadd(136, -129.5, 383, 1.9)
pt3dadd(139, -130.5, 410, 2.1)
pt3dadd(131, -127, 425, 2.1)
pt3dadd(135, -128, 430.5, 2.7)
pt3dadd(137, -127, 440, 2.7)
pt3dadd(136, -121, 447, 2.7)
pt3dadd(141, -125.5, 475, 2.7)
pt3dadd(143, -127.5, 480.5, 1.3)
pt3dadd(141.5, -131.5, 476.5, 1.2)
pt3dadd(138, -132, 497.5, 1.1)
pt3dadd(137, -128.5, 498.5, 1.5)
pt3dadd(135, -127, 499.5, 1.6)
pt3dadd(132.5, -130, 515.5, 1.5)
pt3dadd(131.5, -133, 511, 1.2)
pt3dadd(129, -131.5, 524, 1.7)
pt3dadd(126, -131.5, 537, 2)
pt3dadd(130.5, -136, 541.5, 1.6)
pt3dadd(136, -137.5, 549, 1.9)
pt3dadd(130, -137.5, 567.5, 1.9)
pt3dadd(126.5, -137.5, 569, 1.9)
pt3dadd(124.5, -140, 564, 2.2)
pt3dadd(123, -143, 570.5, 1.7)
pt3dadd(124, -145, 576.5, 1.7)
}
}
proc shape3d_36() {
dend[143] { pt3dadd(128, -142.5, 575, 1.3)
}
dend[144] {pt3dclear()
pt3dadd(118.5, -74.5, 157, 6.5)
pt3dadd(115, -72.5, 159.5, 5.5)
pt3dadd(113, -70, 161, 5.3)
pt3dadd(110, -68.5, 166.5, 5.1)
pt3dadd(107, -65.5, 173, 5.4)
pt3dadd(104.5, -64.5, 172, 4.7)
pt3dadd(102, -63, 173.5, 4.7)
pt3dadd(99.5, -62.5, 175, 4.7)
pt3dadd(94.5, -59.5, 179, 4.5)
pt3dadd(90.5, -58.5, 180, 4.1)
pt3dadd(86.5, -56.5, 181.5, 4.5)
pt3dadd(83.5, -55, 182, 4.5)
pt3dadd(80.5, -55.5, 183, 3.4)
pt3dadd(76, -54, 191, 3.6)
pt3dadd(75.5, -51.5, 194.5, 3.7)
pt3dadd(75, -48.5, 195, 3.7)
pt3dadd(76, -45, 196, 3.5)
pt3dadd(77.5, -41, 197.5, 4.5)
pt3dadd(79.5, -39.5, 198, 4.5)
pt3dadd(76.5, -42, 208.5, 4.5)
pt3dadd(68.5, -39.5, 214.5, 4.5)
pt3dadd(67, -37.5, 225, 4.5)
pt3dadd(66.5, -31.5, 241, 3.6)
pt3dadd(61, -27.5, 244, 3.8)
pt3dadd(59.5, -25.5, 245, 3.8)
pt3dadd(59, -22.5, 250.5, 2.8)
pt3dadd(57, -21.5, 251.5, 2.8)
pt3dadd(55, -21.5, 256.5, 4.5)
}
dend[145] {pt3dclear()
pt3dadd(55, -21.5, 256.5, 4.5)
pt3dadd(55, -18.5, 258, 2.7)
pt3dadd(60, -18.5, 259.5, 1.8)
pt3dadd(67, -16.5, 271.5, 1.7)
pt3dadd(72, -9.5, 275, 1.7)
pt3dadd(73.5, -8, 278, 1.4)
pt3dadd(77, -4.5, 278.5, 1.4)
pt3dadd(78.5, -7, 285.5, 1.2)
pt3dadd(87, -11, 289, 0.9)
pt3dadd(90.5, -9, 295.5, 1)
pt3dadd(97.5, -9.5, 287.5, 1)
pt3dadd(103, -14, 301, 1.5)
pt3dadd(106.5, -14, 301, 1.5)
pt3dadd(110, -13, 298, 1.7)
pt3dadd(113.5, -11, 298, 1.3)
pt3dadd(117, -13.5, 295.5, 1.3)
pt3dadd(121.5, -15, 302.5, 1.3)
pt3dadd(122.5, -18, 303, 1)
pt3dadd(129, -20, 312.5, 0.8)
pt3dadd(132, -21.5, 313, 0.8)
pt3dadd(135.5, -26.5, 317, 1.1)
pt3dadd(138.5, -31.5, 317.5, 1.1)
pt3dadd(143.5, -35.5, 314.5, 0.7)
pt3dadd(150, -39, 318.5, 0.7)
pt3dadd(155.5, -40.5, 310, 0.4)
pt3dadd(159.5, -43, 310, 0.4)
pt3dadd(164, -43.5, 310.5, 0.4)
pt3dadd(166, -45.5, 310.5, 0.4)
pt3dadd(169.5, -45.5, 314, 0.4)
pt3dadd(172.5, -45.5, 314, 0.4)
pt3dadd(178.5, -50, 314.5, 0.4)
}
dend[146] {pt3dclear()
pt3dadd(55, -21.5, 256.5, 4.5)
pt3dadd(53.5, -25, 261, 4)
pt3dadd(49.5, -23, 287, 4.3)
pt3dadd(45.5, -20, 297, 3.2)
pt3dadd(42, -15.5, 302, 3.2)
pt3dadd(49, -4.5, 325, 4)
pt3dadd(50, 1, 329, 3.8)
pt3dadd(47.5, 4.5, 330.5, 3.5)
pt3dadd(48.5, 7.5, 331.5, 3.5)
pt3dadd(50, 12.5, 339.5, 3.6)
pt3dadd(52, 16, 341, 3.6)
pt3dadd(54, 14, 349, 3.5)
pt3dadd(56.5, 12.5, 356, 3.9)
}
dend[147] {pt3dclear()
pt3dadd(56.5, 12.5, 356, 3.9)
pt3dadd(55, 16, 360, 3)
pt3dadd(52, 16.5, 361, 3)
pt3dadd(49, 17.5, 365.5, 2.9)
pt3dadd(44.5, 21, 365, 2.6)
pt3dadd(43.5, 26, 373.5, 2.5)
pt3dadd(44.5, 30, 375, 2.2)
pt3dadd(38, 32.5, 380, 2.5)
pt3dadd(32.5, 35, 387, 2.6)
pt3dadd(33, 40.5, 388, 2.1)
pt3dadd(31.5, 42.5, 393, 1.7)
pt3dadd(26.5, 45, 399.5, 1.4)
pt3dadd(30, 46.5, 408.5, 1.5)
pt3dadd(30.5, 48.5, 413, 2.1)
pt3dadd(28.5, 50.5, 413.5, 2.1)
pt3dadd(24, 52.5, 414.5, 1.9)
pt3dadd(23, 55.5, 419, 1.9)
pt3dadd(23.5, 61, 425, 2.3)
pt3dadd(20.5, 65, 427.5, 2.5)
pt3dadd(19, 66.5, 426, 2.1)
pt3dadd(14, 71, 435.5, 1.7)
pt3dadd(12, 72.5, 434, 1.9)
pt3dadd(15, 78.5, 441.5, 1.7)
pt3dadd(14.5, 75.5, 446, 2.1)
pt3dadd(10.5, 74, 454.5, 2.3)
pt3dadd(8, 73, 455.5, 2.5)
pt3dadd(2, 77, 462.5, 2.7)
pt3dadd(0.5, 79, 461, 2.4)
pt3dadd(0.5, 82.5, 470, 2)
pt3dadd(3.5, 84.5, 475, 1.9)
pt3dadd(3.5, 87.5, 472, 2.1)
pt3dadd(2, 89, 472.5, 1.8)
pt3dadd(3, 92, 473.5, 1.7)
pt3dadd(6, 96, 483, 1.5)
pt3dadd(5, 98.5, 480, 1.6)
pt3dadd(5.5, 103, 481, 1.7)
pt3dadd(5, 106.5, 491, 1.6)
pt3dadd(4.5, 109.5, 491.5, 0.8)
pt3dadd(1.5, 109.5, 492, 1)
pt3dadd(-2, 111, 489.5, 1.5)
pt3dadd(-7.5, 111.5, 496.5, 1.3)
pt3dadd(-10, 113.5, 501, 1.1)
pt3dadd(-7.5, 117, 501.5, 1.4)
pt3dadd(-6.5, 119, 515.5, 1.2)
pt3dadd(-9, 121.5, 516.5, 1.3)
pt3dadd(-15, 121, 523.5, 1.1)
pt3dadd(-18, 121, 524, 1.3)
pt3dadd(-21.5, 123, 525, 1.7)
pt3dadd(-22, 125.5, 521, 2.2)
pt3dadd(-22, 128.5, 521.5, 1.6)
pt3dadd(-21, 130.5, 522, 1.5)
pt3dadd(-23, 131.5, 522.5, 1.3)
pt3dadd(-26.5, 132, 523, 1.5)
pt3dadd(-28.5, 134.5, 533.5, 1.2)
pt3dadd(-30.5, 136, 534, 1.3)
pt3dadd(-28, 137.5, 534.5, 1.6)
pt3dadd(-25, 139, 545.5, 1.8)
pt3dadd(-24, 141, 542, 1.6)
pt3dadd(-26, 144, 543, 1.5)
pt3dadd(-24, 146, 553.5, 1.2)
pt3dadd(-25, 151, 565, 1.7)
pt3dadd(-23, 155, 570.5, 1.6)
pt3dadd(-18.5, 161, 577.5, 2)
pt3dadd(-17, 163, 578, 1.6)
pt3dadd(-17, 168.5, 574.5, 1.8)
pt3dadd(-16, 170, 575, 1.8)
}
dend[148] {pt3dclear()
pt3dadd(56.5, 12.5, 356, 3.9)
pt3dadd(62, 22, 375, 3.1)
pt3dadd(59, 24.5, 380, 2.6)
pt3dadd(60.5, 28.5, 390.5, 2.2)
pt3dadd(62.5, 30, 391.5, 1.6)
pt3dadd(65, 27.5, 397.5, 2.1)
pt3dadd(61.5, 27, 398.5, 1.8)
pt3dadd(58, 29, 408.5, 2)
pt3dadd(59.5, 33, 407, 2.5)
pt3dadd(61, 35.5, 412, 2.3)
pt3dadd(63, 33.5, 417, 2.5)
pt3dadd(52.5, 33.5, 425, 2.7)
pt3dadd(43.5, 33.5, 434.5, 4.1)
pt3dadd(40, 33.5, 436, 3.8)
pt3dadd(38, 31, 440.5, 3.8)
pt3dadd(34, 31, 445, 3.8)
pt3dadd(28.5, 37.5, 448, 2.9)
pt3dadd(23.5, 39, 450, 2.8)
pt3dadd(20.5, 44.5, 458, 2.5)
pt3dadd(17, 47.5, 457.5, 3.2)
pt3dadd(15.5, 49, 465, 3.5)
pt3dadd(12, 54, 478.5, 3.2)
pt3dadd(9.5, 57.5, 475, 2.8)
pt3dadd(6, 60.5, 465, 3.3)
pt3dadd(5.5, 66, 474, 3.3)
pt3dadd(3.5, 70, 483, 2.3)
pt3dadd(2, 72.5, 483.5, 2.3)
pt3dadd(4.5, 76, 484, 2.2)
pt3dadd(5.5, 78.5, 492.5, 2)
pt3dadd(1, 76.5, 502.5, 2.2)
pt3dadd(-2, 75.5, 503, 2.3)
pt3dadd(-4.5, 75, 503.5, 2.3)
pt3dadd(-8, 74.5, 512, 1.9)
pt3dadd(-10.5, 73.5, 508.5, 2.2)
pt3dadd(-13.5, 73.5, 509, 2.2)
pt3dadd(-27, 82.5, 525, 2.3)
pt3dadd(-26.5, 87, 535.5, 2)
pt3dadd(-26.5, 90, 536, 1.3)
pt3dadd(-29.5, 91.5, 537, 1.5)
pt3dadd(-30.5, 87.5, 547.5, 1.8)
pt3dadd(-32, 90.5, 548, 1.8)
pt3dadd(-36.5, 98, 560.5, 1.9)
pt3dadd(-42, 99.5, 576.5, 1.9)
pt3dadd(-42.5, 102.5, 569, 1.6)
pt3dadd(-41, 104, 569, 2.4)
pt3dadd(-36.5, 105.5, 575, 2.5)
}
dend[149] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 25.1)
pt3dadd(51.5, -46.5, -2, 25.1)
pt3dadd(60, -57.5, -2, 25.1)
}
dend[150] {pt3dclear()
pt3dadd(60, -57.5, -2, 25.1)
pt3dadd(66.5, -51, -4.5, 11)
pt3dadd(70.5, -54, 3, 8.2)
pt3dadd(74.5, -55.5, 0.5, 7.8)
pt3dadd(82, -61, 0.5, 6.6)
pt3dadd(88, -68, -4.5, 5.8)
pt3dadd(95.5, -71.5, -5, 5.7)
pt3dadd(105, -72.5, -8, 5.1)
pt3dadd(112.5, -82.5, -5, 5.3)
pt3dadd(122, -87.5, -5, 6.4)
pt3dadd(127.5, -90, -5, 5.5)
pt3dadd(139.5, -98.5, 0, 5.3)
}
}
proc shape3d_37() {
dend[150] { pt3dadd(145.5, -100.5, -2.5, 6.9)
}
dend[151] {pt3dclear()
pt3dadd(145.5, -100.5, -2.5, 6.9)
pt3dadd(152.5, -103.5, -4, 0.6)
pt3dadd(155, -105, -7, 1)
pt3dadd(160, -108.5, -8, 1)
pt3dadd(165, -111.5, -12.5, 0.8)
pt3dadd(169.5, -111.5, -13.5, 0.8)
pt3dadd(176, -112.5, -17, 0.8)
pt3dadd(183.5, -113.5, -18.5, 0.7)
pt3dadd(186.5, -113.5, -19, 0.7)
pt3dadd(197, -112.5, -25, 0.8)
}
dend[152] {pt3dclear()
pt3dadd(145.5, -100.5, -2.5, 6.9)
pt3dadd(148, -105, -3.5, 5)
pt3dadd(151.5, -108.5, -18.5, 4.9)
pt3dadd(155.5, -111, -21.5, 4.9)
pt3dadd(159, -114, -25, 4.9)
pt3dadd(163, -115.5, -23.5, 4.2)
pt3dadd(168.5, -121.5, -32.5, 4.6)
pt3dadd(174, -125, -35, 3.8)
pt3dadd(178, -131, -52, 3.5)
pt3dadd(180.5, -132.5, -52.5, 2.7)
pt3dadd(183, -132.5, -56.5, 4.1)
}
dend[153] {pt3dclear()
pt3dadd(183, -132.5, -56.5, 4.1)
pt3dadd(185.5, -134.5, -51.5, 2.1)
pt3dadd(188.5, -134.5, -57.5, 2.1)
pt3dadd(192, -134.5, -57.5, 2.1)
pt3dadd(195.5, -134.5, -58, 2.1)
pt3dadd(198, -135, -58.5, 2.1)
pt3dadd(200.5, -139.5, -62, 2.8)
pt3dadd(203.5, -140, -62, 2.8)
pt3dadd(206, -141, -65.5, 2.8)
pt3dadd(208.5, -143, -66, 2.2)
pt3dadd(210.5, -146, -66, 2.2)
pt3dadd(218.5, -146, -70, 2.5)
pt3dadd(222.5, -146, -67.5, 2.5)
pt3dadd(224.5, -143.5, -75, 2.4)
pt3dadd(230.5, -146, -79, 2.2)
pt3dadd(233, -144, -83, 2.3)
pt3dadd(238, -144.5, -84, 2.5)
pt3dadd(241.5, -143.5, -84.5, 2.1)
pt3dadd(247.5, -147, -96, 1.3)
pt3dadd(250.5, -147, -96.5, 1.3)
pt3dadd(258, -145.5, -102, 1.3)
pt3dadd(261, -146, -106, 2.5)
pt3dadd(264, -148.5, -106.5, 2.3)
pt3dadd(268, -146, -108, 1.9)
pt3dadd(270.5, -145.5, -108.5, 1.7)
pt3dadd(273.5, -145.5, -109.5, 1.7)
pt3dadd(277, -145, -107, 1.6)
pt3dadd(279, -146, -107.5, 1.3)
pt3dadd(282.5, -146.5, -108.5, 1.1)
pt3dadd(286, -146.5, -109, 1.3)
pt3dadd(288.5, -146, -109.5, 1.5)
pt3dadd(291.5, -147, -120.5, 1.2)
pt3dadd(295, -147, -121, 1.2)
pt3dadd(298, -147, -121.5, 1.2)
pt3dadd(304.5, -147, -123, 1.3)
pt3dadd(308.5, -147, -123.5, 1.3)
pt3dadd(314, -146.5, -125, 1.2)
pt3dadd(318, -146.5, -122.5, 1.3)
pt3dadd(326.5, -146.5, -128, 1.1)
pt3dadd(330, -146.5, -122, 1.3)
pt3dadd(334, -145.5, -122.5, 1.3)
pt3dadd(338, -145, -129.5, 1.9)
pt3dadd(341.5, -145, -130, 1.3)
pt3dadd(344.5, -145, -124, 1.5)
pt3dadd(349.5, -145.5, -129.5, 1.1)
pt3dadd(352, -146, -129.5, 1.7)
pt3dadd(356, -146, -132, 1.2)
pt3dadd(359.5, -144.5, -130.5, 1.5)
pt3dadd(364, -144, -130.5, 1.2)
pt3dadd(369, -141.5, -133, 1)
pt3dadd(372, -138.5, -131.5, 0.7)
pt3dadd(376.5, -135, -132, 0.9)
pt3dadd(381.5, -134.5, -132.5, 1.4)
pt3dadd(386, -135.5, -133, 0.3)
pt3dadd(390.5, -132.5, -133.5, 0.3)
pt3dadd(393.5, -132.5, -134, 0.3)
pt3dadd(395, -131, -134, 0.8)
pt3dadd(401, -130, -134.5, 1)
pt3dadd(407.5, -126.5, -135, 1.3)
pt3dadd(412, -124, -135.5, 1.1)
pt3dadd(416, -122.5, -136, 1.4)
pt3dadd(420.5, -122, -134, 1.1)
pt3dadd(423.5, -123.5, -134.5, 0.6)
}
dend[154] {pt3dclear()
pt3dadd(183, -132.5, -56.5, 4.1)
pt3dadd(184, -130.5, -55.5, 3.7)
pt3dadd(192, -128, -62, 4.2)
pt3dadd(194, -126.5, -63, 4.3)
pt3dadd(200.5, -128, -73, 4.1)
pt3dadd(203, -131.5, -75, 4)
pt3dadd(211, -134.5, -75, 3.8)
pt3dadd(214, -135, -83, 3.8)
pt3dadd(217, -138, -81, 4.6)
pt3dadd(219.5, -139, -81.5, 4.6)
pt3dadd(228, -140, -102, 3.5)
pt3dadd(233, -142.5, -103.5, 3.6)
pt3dadd(235.5, -147.5, -116.5, 4.1)
pt3dadd(237, -154, -120, 4.6)
pt3dadd(238, -160, -125, 4.5)
pt3dadd(239, -163, -125.5, 4.5)
pt3dadd(241.5, -169.5, -129, 4.5)
pt3dadd(243.5, -172, -129.5, 5.1)
pt3dadd(243, -176, -135.5, 5)
pt3dadd(243.5, -180, -134, 4.5)
pt3dadd(245.5, -185, -135.5, 3)
pt3dadd(243.5, -191.5, -137, 3.5)
pt3dadd(242.5, -194, -142.5, 3.4)
pt3dadd(239.5, -200.5, -146, 2.8)
pt3dadd(239.5, -203.5, -146.5, 3)
pt3dadd(241.5, -205.5, -147.5, 3)
pt3dadd(245, -208, -151, 4.1)
}
dend[155] {pt3dclear()
pt3dadd(245, -208, -151, 4.1)
pt3dadd(246, -213, -148.5, 1.2)
pt3dadd(246.5, -217, -148.5, 1.2)
pt3dadd(248.5, -221.5, -148.5, 1.2)
pt3dadd(249, -224.5, -148.5, 1.3)
pt3dadd(247.5, -226.5, -148.5, 1.5)
pt3dadd(247, -229, -148.5, 1.5)
pt3dadd(246, -231.5, -148.5, 1.1)
pt3dadd(248, -235, -148.5, 1.3)
pt3dadd(250.5, -238, -148.5, 1.5)
pt3dadd(251, -240.5, -148.5, 1.6)
pt3dadd(250.5, -243.5, -148.5, 1.6)
pt3dadd(250.5, -247.5, -148.5, 1.5)
pt3dadd(252, -250, -153.5, 1.5)
pt3dadd(255.5, -252.5, -151, 1.3)
pt3dadd(257.5, -258.5, -151, 1.4)
pt3dadd(257, -263, -151, 1.6)
pt3dadd(256.5, -266, -151, 1.9)
pt3dadd(257.5, -268.5, -151, 1.9)
pt3dadd(259, -271, -151, 1.9)
pt3dadd(262, -271, -151, 1.7)
pt3dadd(264.5, -272.5, -151, 1.4)
pt3dadd(267.5, -275.5, -155.5, 1.5)
pt3dadd(270, -276.5, -153.5, 0.9)
pt3dadd(271.5, -278, -148.5, 1.2)
pt3dadd(274.5, -283, -151, 1.3)
pt3dadd(278, -284, -148.5, 1.4)
pt3dadd(282, -286, -148.5, 0.9)
pt3dadd(285.5, -288.5, -148.5, 0.9)
pt3dadd(287.5, -292, -148.5, 0.9)
pt3dadd(288.5, -296.5, -148.5, 0.9)
pt3dadd(291.5, -300, -153.5, 1.1)
pt3dadd(293, -301.5, -153.5, 1.1)
pt3dadd(292, -307, -153.5, 1.6)
pt3dadd(293.5, -311, -153.5, 1.3)
pt3dadd(297, -313.5, -153.5, 1.1)
pt3dadd(301, -316, -153.5, 1.1)
pt3dadd(304.5, -318.5, -153.5, 1.1)
pt3dadd(307.5, -322, -153.5, 1.1)
pt3dadd(307.5, -326.5, -153.5, 1.1)
pt3dadd(307.5, -330.5, -153.5, 1.1)
pt3dadd(310, -331.5, -151, 1.5)
pt3dadd(312, -333.5, -148.5, 1.5)
pt3dadd(314, -335.5, -151, 1.2)
pt3dadd(315, -339.5, -151, 2.1)
pt3dadd(318, -341, -148.5, 1.6)
pt3dadd(319, -343, -151, 1)
pt3dadd(322, -345, -151, 0.9)
pt3dadd(326.5, -347.5, -151, 0.9)
pt3dadd(333, -352, -153.5, 1.1)
pt3dadd(337, -352.5, -153.5, 1.1)
pt3dadd(341.5, -354, -153.5, 1.1)
pt3dadd(345, -354.5, -153.5, 1.1)
pt3dadd(350, -356.5, -153.5, 1.1)
pt3dadd(353.5, -358, -153.5, 1.1)
pt3dadd(358, -358, -153.5, 0.8)
pt3dadd(360.5, -361.5, -151, 0.8)
pt3dadd(364.5, -363, -153.5, 1)
pt3dadd(371.5, -364, -153.5, 1.3)
pt3dadd(376, -366, -155.5, 1.1)
pt3dadd(381, -366, -155.5, 1.1)
pt3dadd(391.5, -366, -155.5, 1.1)
pt3dadd(395.5, -366, -158, 0.7)
pt3dadd(396.5, -368.5, -160, 0.6)
pt3dadd(399, -371, -160, 0.6)
pt3dadd(401, -372.5, -160, 1.3)
pt3dadd(405, -374.5, -160, 1.6)
pt3dadd(408, -374.5, -160, 1.7)
pt3dadd(411.5, -376, -162.5, 1.7)
pt3dadd(415.5, -380.5, -162.5, 1.7)
pt3dadd(419.5, -382, -162.5, 1.7)
pt3dadd(425.5, -384, -162.5, 1.7)
pt3dadd(429, -385, -167, 1.2)
pt3dadd(436, -385, -167, 1.2)
pt3dadd(439.5, -385, -162.5, 1.1)
}
dend[156] {pt3dclear()
pt3dadd(245, -208, -151, 4.1)
pt3dadd(250, -212, -154, 3.4)
pt3dadd(255.5, -213, -157, 3.6)
pt3dadd(254.5, -216, -158, 2.6)
pt3dadd(253, -218.5, -166, 2.9)
pt3dadd(251, -221.5, -166.5, 2.9)
pt3dadd(253, -225, -167, 2.2)
pt3dadd(256, -230, -170, 3.1)
pt3dadd(261.5, -231.5, -170.5, 3.5)
pt3dadd(269.5, -232, -171.5, 3)
pt3dadd(272, -233.5, -175, 3)
pt3dadd(275, -238.5, -170.5, 4.1)
pt3dadd(277.5, -241.5, -184, 3.5)
}
}
proc shape3d_38() {
dend[156] { pt3dadd(278, -244, -179.5, 3.5)
pt3dadd(278, -247, -180.5, 3.6)
pt3dadd(277, -249.5, -189, 3.7)
pt3dadd(278, -254.5, -194.5, 3.7)
pt3dadd(280.5, -255, -203.5, 2.9)
pt3dadd(284, -254.5, -199, 3.2)
pt3dadd(282, -253.5, -205.5, 3.5)
pt3dadd(279.5, -252.5, -206.5, 3.5)
pt3dadd(283, -255.5, -211.5, 2.7)
pt3dadd(286.5, -261, -221.5, 3.5)
pt3dadd(291, -267, -224, 3.2)
pt3dadd(293, -269.5, -225, 3.2)
pt3dadd(294.5, -272.5, -234, 2.5)
pt3dadd(295.5, -275.5, -235, 2)
pt3dadd(297, -278, -236, 2.5)
pt3dadd(297, -281, -237, 3.3)
pt3dadd(297.5, -285, -238.5, 3)
pt3dadd(301, -287, -239.5, 2.8)
pt3dadd(302.5, -290, -240.5, 2.8)
pt3dadd(302.5, -296, -246.5, 3.4)
pt3dadd(302, -300, -248, 3.4)
pt3dadd(299.5, -302.5, -249, 3.4)
pt3dadd(302, -306.5, -250.5, 2.5)
pt3dadd(305.5, -307, -251.5, 2.3)
pt3dadd(304, -312.5, -257.5, 3)
pt3dadd(303.5, -315.5, -258.5, 2.8)
pt3dadd(303, -318, -268.5, 2.8)
pt3dadd(303.5, -323.5, -269, 2.6)
pt3dadd(307.5, -327.5, -272, 2.6)
pt3dadd(309.5, -330.5, -273.5, 2.5)
pt3dadd(310, -335, -275, 2.5)
pt3dadd(312, -341, -276.5, 2.7)
pt3dadd(313, -345.5, -282.5, 2.5)
pt3dadd(313, -351.5, -282, 3.4)
pt3dadd(315, -360.5, -289, 2.5)
pt3dadd(310.5, -365.5, -291, 2.6)
pt3dadd(312, -374, -298, 2.5)
pt3dadd(312, -378, -299, 1.6)
pt3dadd(313, -386.5, -306, 1.6)
pt3dadd(312.5, -389, -306.5, 1.6)
pt3dadd(313.5, -394, -308.5, 2.5)
pt3dadd(313.5, -398, -310, 1.7)
pt3dadd(315, -401, -311, 1.8)
pt3dadd(318.5, -404, -312, 1.8)
pt3dadd(319, -407.5, -313, 1.7)
pt3dadd(318, -410, -316, 2)
pt3dadd(315.5, -409, -317, 1.6)
pt3dadd(313.5, -407.5, -317.5, 1.7)
pt3dadd(311.5, -410, -318.5, 1.9)
pt3dadd(312, -412.5, -319, 2.2)
pt3dadd(312, -417, -320, 2.2)
pt3dadd(311, -419, -320.5, 1.6)
pt3dadd(312, -424.5, -324, 1.2)
pt3dadd(313.5, -426.5, -325, 1.2)
pt3dadd(310, -431, -334, 1.8)
pt3dadd(309.5, -436, -339.5, 2.1)
pt3dadd(308.5, -440.5, -340, 1.9)
pt3dadd(306.5, -446.5, -340.5, 3.4)
pt3dadd(306.5, -449, -345.5, 4)
}
dend[157] {pt3dclear()
pt3dadd(306.5, -449, -345.5, 4)
pt3dadd(309.5, -450, -345.5, 1.8)
pt3dadd(312.5, -453, -346, 1.8)
pt3dadd(315, -454.5, -346.5, 1.8)
pt3dadd(317.5, -456, -347, 1.8)
pt3dadd(318.5, -458, -347, 1.4)
pt3dadd(318.5, -461, -347.5, 1.6)
pt3dadd(318.5, -464.5, -352, 1.6)
pt3dadd(320.5, -466, -352.5, 1.6)
pt3dadd(323, -466.5, -352.5, 1.9)
pt3dadd(325.5, -467.5, -362.5, 1.8)
pt3dadd(328, -470, -355, 1.8)
pt3dadd(328, -474, -355.5, 1.8)
pt3dadd(326.5, -479.5, -375, 2.2)
pt3dadd(328, -481.5, -383, 1.2)
pt3dadd(328.5, -485.5, -387.5, 1.2)
pt3dadd(332, -486.5, -385, 1.2)
pt3dadd(334, -488, -385.5, 1.2)
pt3dadd(337, -488, -386.5, 1.2)
pt3dadd(339, -490, -387, 1.2)
pt3dadd(341, -492.5, -387.5, 1.2)
pt3dadd(341, -496, -392.5, 1.1)
pt3dadd(340, -498, -393, 1.4)
pt3dadd(341, -500, -393.5, 1.5)
pt3dadd(344, -500, -398, 1.5)
pt3dadd(347.5, -500, -395.5, 1.5)
pt3dadd(353.5, -501.5, -397, 1.4)
pt3dadd(352.5, -505, -406.5, 1.3)
pt3dadd(355.5, -505, -411, 1.3)
pt3dadd(359, -508.5, -412.5, 1.3)
pt3dadd(362, -509.5, -413, 1.3)
pt3dadd(364.5, -512, -414, 1.3)
pt3dadd(363.5, -514.5, -414.5, 1)
pt3dadd(366.5, -517, -415.5, 1)
pt3dadd(369.5, -517, -420, 1)
pt3dadd(371, -519, -421, 1.1)
pt3dadd(371, -522, -425, 1)
pt3dadd(375.5, -524.5, -435, 0.9)
pt3dadd(378, -525.5, -436, 1.4)
pt3dadd(379, -529, -441.5, 1.4)
pt3dadd(385, -534.5, -457.5, 1.3)
pt3dadd(387.5, -535, -458.5, 0.8)
pt3dadd(386.5, -537, -459, 0.8)
pt3dadd(387.5, -540, -460, 0.9)
pt3dadd(390, -540.5, -461, 0.8)
pt3dadd(391.5, -545, -463.5, 0.9)
pt3dadd(394, -550, -474, 1)
pt3dadd(396.5, -553.5, -469.5, 1.3)
pt3dadd(395, -558, -470.5, 1.3)
pt3dadd(397, -563.5, -477, 1.4)
pt3dadd(395, -567.5, -478, 1.4)
pt3dadd(395.5, -571.5, -482.5, 1.4)
pt3dadd(398, -573.5, -487, 1.1)
pt3dadd(399, -577, -488, 1.1)
pt3dadd(398.5, -579.5, -488.5, 1.1)
pt3dadd(397.5, -581.5, -489, 1.1)
pt3dadd(402.5, -581.5, -498, 1.1)
pt3dadd(401, -584, -503.5, 1.1)
pt3dadd(402, -586.5, -500.5, 1.1)
pt3dadd(402, -589.5, -501, 1.1)
pt3dadd(401, -591.5, -515, 1)
pt3dadd(399.5, -589.5, -509.5, 1)
pt3dadd(398, -593, -514.5, 1.1)
pt3dadd(397, -595, -515, 1.1)
pt3dadd(398.5, -598.5, -516, 1.1)
pt3dadd(401.5, -598.5, -525, 1.1)
pt3dadd(402, -602, -541, 0.9)
pt3dadd(402, -606, -542.5, 1.1)
pt3dadd(400, -609, -543.5, 1.1)
pt3dadd(400, -614, -545, 0.9)
pt3dadd(399.5, -617.5, -546.5, 0.7)
pt3dadd(396.5, -619, -547.5, 0.8)
pt3dadd(398.5, -622.5, -559, 1.2)
pt3dadd(401.5, -624.5, -560.5, 0.9)
pt3dadd(399, -625, -561, 0.8)
pt3dadd(400, -628, -575, 0.7)
pt3dadd(400, -631, -583, 1)
pt3dadd(396, -635, -592.5, 0.9)
pt3dadd(394.5, -637.5, -593, 0.9)
pt3dadd(397, -639.5, -591.5, 0.9)
pt3dadd(399.5, -640, -599, 0.9)
pt3dadd(396.5, -643, -600.5, 0.9)
pt3dadd(400.5, -645, -604, 1.1)
pt3dadd(400, -648.5, -612.5, 0.7)
pt3dadd(403, -651, -614, 1.1)
pt3dadd(407, -653, -618.5, 1.1)
pt3dadd(406.5, -655.5, -620, 1)
pt3dadd(407.5, -657.5, -624, 0.6)
pt3dadd(410.5, -658.5, -625, 0.8)
pt3dadd(414, -660, -623.5, 0.9)
pt3dadd(416, -662, -624.5, 0.9)
pt3dadd(415, -663.5, -625, 0.9)
}
dend[158] {pt3dclear()
pt3dadd(306.5, -449, -345.5, 4)
pt3dadd(303, -452, -346, 1.4)
pt3dadd(303.5, -455.5, -343, 1.6)
pt3dadd(303, -459.5, -353, 1.2)
pt3dadd(303.5, -463, -353.5, 0.8)
pt3dadd(301.5, -465.5, -354, 1.2)
pt3dadd(299, -467.5, -354.5, 1.7)
pt3dadd(296.5, -471.5, -355.5, 1.3)
pt3dadd(293.5, -473.5, -352.5, 1.3)
pt3dadd(291.5, -477, -357.5, 1.1)
pt3dadd(293, -479, -367.5, 1.2)
pt3dadd(292.5, -484, -368.5, 0.8)
pt3dadd(289.5, -487, -369, 0.8)
pt3dadd(285, -487, -374, 1)
pt3dadd(284, -490, -375, 1.4)
pt3dadd(284.5, -493.5, -379.5, 0.9)
pt3dadd(283, -497.5, -380.5, 0.9)
pt3dadd(281.5, -500, -381.5, 0.9)
pt3dadd(282.5, -506, -383, 0.8)
pt3dadd(283, -511.5, -387.5, 0.9)
pt3dadd(283, -514.5, -388.5, 0.8)
pt3dadd(281, -519.5, -390, 0.8)
pt3dadd(278.5, -522.5, -391, 0.8)
pt3dadd(277, -527.5, -393, 1)
pt3dadd(275, -534, -394.5, 1.7)
pt3dadd(273.5, -536, -395, 0.9)
pt3dadd(271.5, -538, -396, 0.9)
pt3dadd(272, -541.5, -397, 0.9)
pt3dadd(271, -545, -401.5, 0.9)
pt3dadd(268, -547.5, -402.5, 0.9)
pt3dadd(265, -550, -403.5, 0.9)
pt3dadd(264, -554.5, -405, 0.9)
pt3dadd(265, -559, -418.5, 0.9)
pt3dadd(262, -564, -417, 0.7)
pt3dadd(259, -564, -422, 0.8)
pt3dadd(259.5, -567.5, -422.5, 1.6)
pt3dadd(260, -570, -423.5, 1.5)
pt3dadd(262, -571, -424, 0.6)
pt3dadd(262, -574, -425, 0.7)
}
dend[159] {pt3dclear()
pt3dadd(60, -57.5, -2, 25.1)
pt3dadd(70, -137.5, -3.5, 16.8)
pt3dadd(70.5, -140, -3.5, 17.3)
pt3dadd(71, -143.5, -1, 19)
}
dend[160] {pt3dclear()
pt3dadd(71, -143.5, -1, 19)
pt3dadd(64.5, -151, 6.5, 6.6)
pt3dadd(63.5, -163.5, 12.5, 4.8)
pt3dadd(61, -170.5, 7, 4.1)
pt3dadd(36.5, -202, 5, 5.4)
pt3dadd(30.5, -208, 2.5, 5.7)
}
}
proc shape3d_39() {
dend[160] { pt3dadd(23.5, -222, 7.5, 5.4)
pt3dadd(21.5, -227, 2.5, 5.8)
pt3dadd(15, -237.5, 2.5, 6.4)
pt3dadd(9, -244, 0, 7.1)
}
dend[161] {pt3dclear()
pt3dadd(9, -244, 0, 7.1)
pt3dadd(8, -253.5, 11, 6)
pt3dadd(9, -261, 3, 5.5)
pt3dadd(6.5, -268, 3, 4.7)
pt3dadd(4.5, -270.5, 5.5, 4.3)
pt3dadd(1, -276, 5.5, 4.7)
pt3dadd(-3, -282.5, 8, 4)
pt3dadd(-5, -287, 8, 4.6)
pt3dadd(-4.5, -290.5, 8.5, 4.7)
pt3dadd(-4, -298.5, 14, 4.4)
pt3dadd(-9, -306, 11.5, 4.6)
pt3dadd(-10, -309.5, 6, 4.7)
pt3dadd(-10.5, -318, 3.5, 4.8)
pt3dadd(-14, -322.5, 11.5, 5.4)
pt3dadd(-16, -324.5, 11.5, 5.4)
}
dend[162] {pt3dclear()
pt3dadd(-16, -324.5, 11.5, 5.4)
pt3dadd(-19.5, -328.5, 9, 3.7)
pt3dadd(-25.5, -333, 9, 4.4)
}
dend[163] {pt3dclear()
pt3dadd(-25.5, -333, 9, 4.4)
pt3dadd(-27, -338, 6.5, 3.2)
pt3dadd(-30.5, -349, 4, 3.7)
pt3dadd(-30.5, -352.5, 1, 3.7)
pt3dadd(-32, -355, 1, 3.1)
pt3dadd(-38, -362, 4, 3.5)
pt3dadd(-39, -365, 4, 3.5)
pt3dadd(-44.5, -368, 4, 3.2)
pt3dadd(-46.5, -371, 4, 3.4)
pt3dadd(-51, -381.5, 11.5, 3.7)
pt3dadd(-53.5, -385, -4.5, 3.7)
pt3dadd(-59, -396, 0.5, 3.8)
pt3dadd(-59.5, -402, 0.5, 3.8)
pt3dadd(-58.5, -409.5, -1.5, 3.7)
pt3dadd(-59, -416.5, 0.5, 3.5)
pt3dadd(-61, -419.5, 0.5, 4.1)
pt3dadd(-64.5, -424, 0.5, 4.1)
pt3dadd(-66, -426.5, 0.5, 3.8)
pt3dadd(-66.5, -430, 0.5, 3.8)
pt3dadd(-66, -433, 0.5, 3.2)
pt3dadd(-65, -436.5, 0.5, 3.5)
pt3dadd(-65.5, -440, 0.5, 4)
pt3dadd(-67.5, -443.5, 3.5, 4)
pt3dadd(-67, -446.5, -4.5, 3.4)
pt3dadd(-68, -451.5, -4.5, 3.7)
pt3dadd(-69.5, -454.5, -7, 4.3)
pt3dadd(-70.5, -458, -4.5, 4.3)
pt3dadd(-70.5, -461, -5, 4.5)
pt3dadd(-71, -464.5, -5, 3.9)
pt3dadd(-70, -467.5, -5, 3.5)
pt3dadd(-68, -472.5, -7.5, 3)
pt3dadd(-68.5, -475, -2, 4.1)
pt3dadd(-68.5, -478.5, -2, 4.1)
pt3dadd(-68.5, -482, -2, 4.1)
pt3dadd(-70, -486.5, -5, 4.7)
pt3dadd(-72.5, -491, 0, 4.7)
pt3dadd(-73.5, -493.5, 0, 5.2)
pt3dadd(-73.5, -496, 0, 5.9)
}
dend[164] {pt3dclear()
pt3dadd(-73.5, -496, 0, 5.9)
pt3dadd(-70, -499.5, 0, 3.2)
pt3dadd(-71, -509.5, -3.5, 3.2)
pt3dadd(-68.5, -513.5, -1.5, 2.7)
pt3dadd(-66.5, -517.5, -4.5, 3.4)
pt3dadd(-63.5, -523.5, -2.5, 2.8)
pt3dadd(-61, -530, -6, 2.5)
pt3dadd(-61, -538.5, -6.5, 2.7)
pt3dadd(-62, -541.5, -7, 2.5)
pt3dadd(-61.5, -547.5, -7.5, 3.2)
pt3dadd(-61, -550.5, -7.5, 3.4)
pt3dadd(-60.5, -560, -8.5, 2.5)
pt3dadd(-60.5, -566, -6.5, 2.3)
pt3dadd(-61, -569, -15.5, 2.2)
pt3dadd(-66, -571, -16, 2.2)
pt3dadd(-68, -574, -16, 2.2)
pt3dadd(-64.5, -579, -16.5, 2.7)
pt3dadd(-62, -582, -20, 2.9)
pt3dadd(-59.5, -589, -26.5, 3.1)
pt3dadd(-58.5, -591, -22, 2.2)
pt3dadd(-57, -596, -25, 2.2)
pt3dadd(-54, -601, -22, 1.9)
pt3dadd(-52.5, -611, -22.5, 3.5)
pt3dadd(-53.5, -615, -22.5, 1.9)
pt3dadd(-56, -620, -23, 2.6)
pt3dadd(-56, -623, -23, 3.1)
pt3dadd(-56.5, -628, -26, 3.3)
pt3dadd(-56.5, -631, -26.5, 3.4)
pt3dadd(-56.5, -634, -26.5, 3.5)
pt3dadd(-55.5, -636.5, -26.5, 2.5)
pt3dadd(-55.5, -639.5, -26.5, 2)
pt3dadd(-56.5, -643, -27, 1.9)
pt3dadd(-56.5, -646, -27, 2.6)
pt3dadd(-56.5, -650, -27, 2.6)
pt3dadd(-56, -654, -30.5, 2.5)
pt3dadd(-55.5, -657, -30.5, 2.5)
pt3dadd(-56.5, -664.5, -28, 2.9)
pt3dadd(-57.5, -670, -34.5, 2.1)
pt3dadd(-55.5, -673.5, -35, 1.6)
pt3dadd(-54, -676, -32, 1.8)
pt3dadd(-54.5, -684.5, -29.5, 2.3)
pt3dadd(-53.5, -688, -29.5, 2.3)
pt3dadd(-49.5, -693, -30, 1.5)
pt3dadd(-48.5, -696, -39, 1.6)
pt3dadd(-46, -700, -45, 1.8)
pt3dadd(-43.5, -702, -39.5, 1.6)
pt3dadd(-42, -704, -34, 2.1)
pt3dadd(-42, -712, -37.5, 2.1)
pt3dadd(-42, -716.5, -37.5, 2.1)
pt3dadd(-40, -722, -38, 1.8)
pt3dadd(-36.5, -726, -38, 1.8)
pt3dadd(-37, -732, -38.5, 1.6)
pt3dadd(-37, -735, -38.5, 1.6)
pt3dadd(-34, -738, -39, 1.6)
pt3dadd(-30.5, -740.5, -30, 1.6)
pt3dadd(-30.5, -746, -30.5, 1.6)
pt3dadd(-29.5, -750, -33.5, 1.9)
pt3dadd(-30, -755.5, -34, 1.7)
pt3dadd(-29.5, -761.5, -34, 1.8)
pt3dadd(-28, -764.5, -34, 2)
pt3dadd(-27.5, -767, -34.5, 2.2)
pt3dadd(-25.5, -772, -25.5, 1.6)
pt3dadd(-24, -775, -26, 1.6)
pt3dadd(-21, -779, -26, 1.1)
pt3dadd(-22, -781, -29, 1.1)
pt3dadd(-23.5, -786.5, -29.5, 1.9)
pt3dadd(-23, -794, -36, 1.6)
pt3dadd(-23, -801, -45.5, 1.6)
pt3dadd(-24.5, -810.5, -37.5, 1.5)
pt3dadd(-24.5, -813.5, -37.5, 1.2)
pt3dadd(-23, -817, -40.5, 1.2)
pt3dadd(-21, -821, -41, 1.8)
pt3dadd(-19, -824.5, -38, 2.2)
pt3dadd(-21, -829, -38.5, 1.5)
pt3dadd(-23.5, -831.5, -35.5, 1.5)
pt3dadd(-25.5, -833, -35.5, 1.8)
pt3dadd(-23, -838.5, -42, 1.3)
pt3dadd(-23, -843, -39, 1.3)
pt3dadd(-17.5, -851.5, -48, 1.6)
pt3dadd(-19.5, -854, -46, 1.6)
pt3dadd(-19.5, -857, -46, 1.6)
pt3dadd(-16.5, -859.5, -46, 1.3)
pt3dadd(-17, -863.5, -49, 2)
pt3dadd(-19, -865.5, -46.5, 1.9)
pt3dadd(-16, -870, -47, 1.1)
pt3dadd(-14.5, -874, -47, 1.1)
pt3dadd(-11.5, -877.5, -47, 1.2)
pt3dadd(-13, -883.5, -47.5, 1.4)
pt3dadd(-15.5, -886, -47.5, 1.6)
pt3dadd(-13.5, -889.5, -50.5, 1.6)
pt3dadd(-13.5, -893.5, -50.5, 1.7)
pt3dadd(-10, -896.5, -50.5, 1.6)
pt3dadd(-7.5, -900, -54, 0.8)
pt3dadd(-5, -903.5, -54, 0.8)
pt3dadd(-3, -909.5, -54.5, 0.8)
pt3dadd(-3, -912.5, -67, 2.1)
pt3dadd(-3.5, -915.5, -52.5, 2.7)
pt3dadd(-4, -919, -52.5, 1.6)
pt3dadd(-2, -922, -50, 0.9)
pt3dadd(0, -926, -59, 1.9)
pt3dadd(-0.5, -930, -59.5, 2)
pt3dadd(-1.5, -932.5, -59.5, 2.2)
pt3dadd(-1, -936, -59.5, 2.2)
pt3dadd(0.5, -939, -59.5, 2.3)
pt3dadd(4.5, -943.5, -60, 2.1)
pt3dadd(4.5, -946.5, -60, 2.4)
pt3dadd(4.5, -950, -60, 2)
pt3dadd(4.5, -953, -60.5, 1.5)
pt3dadd(6.5, -956, -60.5, 1.1)
pt3dadd(7.5, -959, -60.5, 1.2)
pt3dadd(9.5, -966, -61, 1.2)
}
dend[165] {pt3dclear()
pt3dadd(-73.5, -496, 0, 5.9)
pt3dadd(-79, -496, 4, 1.6)
pt3dadd(-82, -497, 4.5, 1.3)
pt3dadd(-89, -500, 6.5, 1.6)
pt3dadd(-92, -500, 6.5, 1.6)
pt3dadd(-96, -502, 7.5, 1.4)
pt3dadd(-99.5, -503.5, 5, 1.6)
pt3dadd(-102.5, -507.5, 5.5, 1.3)
pt3dadd(-105, -511, 6, 1.5)
pt3dadd(-109, -515, 7, 1.2)
pt3dadd(-112, -515, 7.5, 1.2)
pt3dadd(-113.5, -516.5, 8, 1.2)
pt3dadd(-113.5, -520.5, 8.5, 1.3)
pt3dadd(-116, -526.5, 9.5, 1.6)
pt3dadd(-119, -528, 10, 1.9)
pt3dadd(-124, -529.5, 16.5, 1.5)
pt3dadd(-127, -532, 17, 1.2)
pt3dadd(-129.5, -533, 17.5, 1.5)
pt3dadd(-133, -532.5, 24, 1.3)
pt3dadd(-135.5, -533, 24, 1.3)
pt3dadd(-138.5, -535.5, 25, 1.6)
pt3dadd(-140.5, -538.5, 23.5, 1.6)
pt3dadd(-141.5, -540.5, 26.5, 1.9)
pt3dadd(-147.5, -543, 28, 1.7)
pt3dadd(-151, -544.5, 32, 1.4)
pt3dadd(-151, -548, 38.5, 1.2)
pt3dadd(-156.5, -550.5, 40.5, 1.5)
pt3dadd(-160.5, -553.5, 41.5, 1.5)
pt3dadd(-163, -554, 42.5, 1.7)
}
}
proc shape3d_40() {
dend[165] { pt3dadd(-164, -556.5, 43, 1.9)
pt3dadd(-166, -562, 44.5, 0.8)
pt3dadd(-169, -562, 45, 0.9)
pt3dadd(-171.5, -567.5, 49.5, 1.1)
pt3dadd(-173, -570.5, 53, 1)
pt3dadd(-176, -571, 53.5, 1)
pt3dadd(-179.5, -572.5, 54.5, 1)
pt3dadd(-180.5, -574.5, 55, 1)
pt3dadd(-183.5, -577.5, 56, 1.2)
pt3dadd(-190.5, -580.5, 58, 0.9)
pt3dadd(-192, -585, 59, 1.1)
pt3dadd(-193.5, -588, 59.5, 1.7)
pt3dadd(-197.5, -593, 59, 1.7)
pt3dadd(-199, -596, 60, 1.9)
pt3dadd(-198.5, -599, 58.5, 2.5)
pt3dadd(-199.5, -602, 64.5, 2.3)
pt3dadd(-200, -604.5, 65, 1.9)
pt3dadd(-201, -607.5, 66, 1.7)
pt3dadd(-202, -611, 75, 1.5)
}
dend[166] {pt3dclear()
pt3dadd(-25.5, -333, 9, 4.4)
pt3dadd(-28.5, -333, 14, 1.1)
pt3dadd(-30, -336, 22, 1.1)
pt3dadd(-30.5, -341, 24.5, 1.1)
pt3dadd(-32, -344, 26, 1.1)
pt3dadd(-33.5, -346.5, 25, 1.1)
pt3dadd(-34.5, -350, 32.5, 2.2)
pt3dadd(-33.5, -355, 33, 2.3)
pt3dadd(-37.5, -360, 39, 1.7)
pt3dadd(-41, -367, 54.5, 2.2)
}
dend[167] {pt3dclear()
pt3dadd(-41, -367, 54.5, 2.2)
pt3dadd(-42.5, -371.5, 56, 0.8)
pt3dadd(-42, -376, 55, 0.8)
pt3dadd(-44.5, -378, 65.5, 0.8)
pt3dadd(-46, -380, 62.5, 0.9)
pt3dadd(-46, -383, 63.5, 0.9)
pt3dadd(-45, -386.5, 69.5, 1.2)
pt3dadd(-46, -389.5, 70.5, 1.2)
pt3dadd(-47, -392, 74, 0.7)
pt3dadd(-45, -392.5, 75, 0.7)
}
dend[168] {pt3dclear()
pt3dadd(-41, -367, 54.5, 2.2)
pt3dadd(-38, -367, 51, 1.6)
pt3dadd(-35, -366.5, 50, 1.6)
pt3dadd(-34, -371, 54, 1.5)
pt3dadd(-33.5, -374, 55, 1.5)
pt3dadd(-32, -367, 68, 1.5)
pt3dadd(-32, -370.5, 73, 0.8)
pt3dadd(-36, -377, 74, 1.3)
pt3dadd(-38.5, -379.5, 75, 0.9)
pt3dadd(-40, -384, 75.5, 1.1)
pt3dadd(-37.5, -385.5, 76, 0.9)
pt3dadd(-34.5, -386.5, 80.5, 0.8)
pt3dadd(-36.5, -390.5, 81.5, 0.9)
pt3dadd(-38.5, -392, 82, 0.9)
pt3dadd(-38.5, -396, 82.5, 0.8)
pt3dadd(-40, -398.5, 92.5, 0.7)
pt3dadd(-39, -402, 93, 0.6)
pt3dadd(-36.5, -406, 88.5, 0.6)
pt3dadd(-38.5, -408, 92, 0.8)
pt3dadd(-40.5, -412, 96, 0.8)
pt3dadd(-39.5, -415.5, 97, 0.6)
pt3dadd(-40, -418, 103.5, 1.5)
pt3dadd(-43, -421, 102, 0.7)
pt3dadd(-44, -423, 108.5, 0.7)
pt3dadd(-44, -426, 112, 0.7)
pt3dadd(-44, -430, 113, 0.7)
pt3dadd(-44.5, -432.5, 113, 0.9)
}
dend[169] {pt3dclear()
pt3dadd(-16, -324.5, 11.5, 5.4)
pt3dadd(-19.5, -325, 26.5, 1.1)
pt3dadd(-23.5, -326, 25, 1.2)
pt3dadd(-26.5, -329, 29.5, 1.2)
pt3dadd(-25.5, -331, 30.5, 1.2)
pt3dadd(-23.5, -336.5, 36.5, 1.8)
pt3dadd(-25.5, -339, 38, 1.5)
pt3dadd(-26.5, -336.5, 45, 1)
pt3dadd(-28.5, -339.5, 50.5, 1.2)
pt3dadd(-28.5, -347, 54, 1.1)
pt3dadd(-29, -352, 53, 1)
pt3dadd(-26.5, -355.5, 63.5, 1.4)
pt3dadd(-27.5, -359, 71, 1.1)
pt3dadd(-25.5, -361, 75, 1.8)
pt3dadd(-22.5, -363.5, 75.5, 1.2)
pt3dadd(-21.5, -366, 75.5, 1.2)
pt3dadd(-20, -367.5, 76, 1.2)
pt3dadd(-17, -368.5, 76.5, 1.1)
pt3dadd(-15.5, -373, 77.5, 1.2)
pt3dadd(-12, -375, 84, 1.2)
pt3dadd(-8, -376.5, 84.5, 1.2)
pt3dadd(-7, -382.5, 88.5, 0.7)
pt3dadd(-9.5, -384.5, 92, 0.7)
pt3dadd(-9.5, -387.5, 92.5, 1.5)
pt3dadd(-5.5, -391.5, 93.5, 0.9)
pt3dadd(-3.5, -392.5, 91, 0.9)
pt3dadd(-0.5, -392.5, 97.5, 1.3)
pt3dadd(1, -394.5, 98, 0.8)
pt3dadd(2, -397, 101.5, 0.8)
pt3dadd(6.5, -398, 102, 1.3)
pt3dadd(7.5, -404, 103, 0.6)
pt3dadd(7.5, -408, 103.5, 0.6)
pt3dadd(10.5, -409, 104, 0.6)
pt3dadd(15.5, -410.5, 107.5, 0.8)
pt3dadd(20, -414, 108.5, 1.5)
pt3dadd(21, -417.5, 112, 1.3)
pt3dadd(22, -420.5, 110, 0.9)
pt3dadd(22.5, -423, 113.5, 0.9)
pt3dadd(24, -424.5, 113.5, 0.7)
pt3dadd(26, -426.5, 114, 0.7)
pt3dadd(26.5, -429, 114.5, 1.4)
pt3dadd(27, -432.5, 115, 1.5)
pt3dadd(28, -435, 115, 1.1)
pt3dadd(29, -438, 115.5, 1.1)
pt3dadd(30.5, -441, 116, 0.8)
pt3dadd(34, -454, 118, 1.1)
pt3dadd(35, -456, 118, 1)
pt3dadd(37, -457.5, 116, 0.9)
pt3dadd(40, -461.5, 114, 0.6)
pt3dadd(43, -466, 112, 0.3)
pt3dadd(46.5, -469.5, 121.5, 0.6)
pt3dadd(48, -472.5, 125, 0.6)
pt3dadd(48, -476, 125, 0.8)
pt3dadd(51.5, -476, 129, 1.3)
pt3dadd(54, -478.5, 129, 1.3)
pt3dadd(57, -481.5, 120, 1.3)
pt3dadd(58, -484.5, 120, 1.3)
pt3dadd(59, -486.5, 120.5, 0.9)
pt3dadd(62, -490, 131, 0.9)
pt3dadd(64.5, -492.5, 131.5, 0.9)
pt3dadd(65.5, -499, 132, 2)
pt3dadd(67.5, -502.5, 132, 0.4)
pt3dadd(67, -506, 132.5, 1.1)
pt3dadd(65.5, -510, 129.5, 0.2)
pt3dadd(68.5, -512.5, 133.5, 0.2)
pt3dadd(71, -514, 133.5, 0.2)
pt3dadd(71.5, -518, 128, 1.8)
pt3dadd(72, -522, 131, 0.4)
pt3dadd(74.5, -524, 131.5, 0.9)
pt3dadd(75, -530, 135.5, 0.5)
pt3dadd(75, -534, 136, 0.4)
pt3dadd(76, -536, 136, 1.1)
pt3dadd(77, -538.5, 136, 1.1)
pt3dadd(78.5, -542.5, 136.5, 0.5)
pt3dadd(77, -544.5, 143.5, 0.4)
pt3dadd(78.5, -547, 144, 0.4)
pt3dadd(79.5, -550, 138, 0.8)
pt3dadd(81.5, -552, 142, 1.2)
pt3dadd(80.5, -556, 145, 0.8)
pt3dadd(81, -558.5, 142.5, 0.4)
pt3dadd(83, -560, 149.5, 0.1)
pt3dadd(81, -562, 157.5, 0.1)
pt3dadd(79.5, -563.5, 154.5, 1)
pt3dadd(80, -567.5, 155, 0.5)
pt3dadd(81.5, -572.5, 152, 0.2)
pt3dadd(83.5, -574.5, 159, 0.2)
}
dend[170] {pt3dclear()
pt3dadd(9, -244, 0, 7.1)
pt3dadd(0, -249.5, -6, 3.3)
pt3dadd(-2.5, -257, -8.5, 3)
pt3dadd(-9.5, -262.5, -15, 2.8)
pt3dadd(-18, -265.5, -18, 3)
pt3dadd(-26.5, -267.5, -23, 3)
pt3dadd(-29.5, -272.5, -25, 3.1)
pt3dadd(-34.5, -276, -23, 2.7)
pt3dadd(-38.5, -277.5, -24, 2.7)
pt3dadd(-46, -281.5, -29, 2.7)
pt3dadd(-50.5, -286, -33.5, 2.6)
pt3dadd(-58.5, -290, -29.5, 2.7)
pt3dadd(-61.5, -293, -27.5, 2.5)
pt3dadd(-68, -294, -43.5, 2.1)
pt3dadd(-70, -295, -53.5, 2.1)
pt3dadd(-70.5, -300.5, -58, 2.9)
pt3dadd(-71, -303.5, -58.5, 2.9)
pt3dadd(-77, -305.5, -59.5, 2.6)
pt3dadd(-79.5, -306, -60, 2.3)
pt3dadd(-84, -312.5, -68, 2.3)
pt3dadd(-86.5, -314.5, -69, 2.8)
pt3dadd(-89, -318, -69.5, 2.7)
pt3dadd(-92, -323, -70.5, 1.9)
pt3dadd(-95, -323.5, -71.5, 2.7)
pt3dadd(-98, -326.5, -72, 3)
pt3dadd(-99, -329.5, -72.5, 2.3)
pt3dadd(-102.5, -329.5, -73.5, 2.5)
pt3dadd(-108, -331, -74.5, 2.5)
pt3dadd(-112, -334.5, -75.5, 2.1)
pt3dadd(-115.5, -337, -73.5, 2.3)
pt3dadd(-122, -340, -78.5, 2)
pt3dadd(-126, -342, -86.5, 2.3)
pt3dadd(-129, -342.5, -82, 2.5)
pt3dadd(-132, -345.5, -89.5, 2.2)
pt3dadd(-136.5, -348, -91, 2.2)
pt3dadd(-140, -349, -91.5, 2.5)
pt3dadd(-141.5, -352, -92.5, 2.5)
pt3dadd(-144.5, -352, -93, 2.5)
pt3dadd(-151, -352.5, -97.5, 2.5)
pt3dadd(-152.5, -355.5, -101.5, 2.5)
pt3dadd(-155.5, -356.5, -102, 2.1)
pt3dadd(-158, -357.5, -102.5, 1.7)
pt3dadd(-160, -358.5, -100.5, 1.7)
pt3dadd(-162.5, -359, -101, 1.7)
pt3dadd(-163.5, -362, -108.5, 2)
pt3dadd(-165.5, -363.5, -109, 2.5)
pt3dadd(-172.5, -367.5, -108, 2.2)
pt3dadd(-175.5, -369.5, -109, 2.2)
}
}
proc shape3d_41() {
dend[170] { pt3dadd(-179.5, -373, -113.5, 2.4)
pt3dadd(-180.5, -375.5, -114, 2.6)
pt3dadd(-186.5, -377.5, -119, 2.7)
pt3dadd(-189.5, -379, -119.5, 2.3)
pt3dadd(-192.5, -379.5, -120.5, 2.2)
pt3dadd(-194, -381, -124, 2.5)
pt3dadd(-196.5, -382.5, -125, 2.4)
pt3dadd(-199.5, -383.5, -127, 2.3)
pt3dadd(-203, -385, -130, 2.6)
pt3dadd(-205, -387.5, -132, 2.6)
pt3dadd(-208.5, -390.5, -128, 2.1)
pt3dadd(-211, -393.5, -128.5, 2.1)
pt3dadd(-213, -397.5, -131, 1.4)
pt3dadd(-217, -401.5, -131.5, 1.4)
pt3dadd(-220.5, -403.5, -134, 1.4)
pt3dadd(-225, -406.5, -134.5, 1.4)
pt3dadd(-227, -409.5, -134.5, 1.7)
pt3dadd(-227, -414, -135, 1.7)
pt3dadd(-230.5, -415.5, -137.5, 2.6)
pt3dadd(-231, -420, -135.5, 1.5)
pt3dadd(-236.5, -425, -136, 1.5)
pt3dadd(-238, -429.5, -136.5, 1.6)
pt3dadd(-240, -431, -136.5, 1.4)
pt3dadd(-242.5, -432.5, -137, 1.4)
pt3dadd(-245, -435.5, -137, 1.4)
pt3dadd(-246.5, -438.5, -140, 1.9)
pt3dadd(-246.5, -442.5, -142, 1.9)
pt3dadd(-248, -446.5, -142.5, 1.4)
pt3dadd(-251, -450, -145.5, 1.4)
pt3dadd(-253, -453, -145.5, 1.3)
pt3dadd(-253.5, -455.5, -146, 1.2)
pt3dadd(-254.5, -458.5, -143.5, 2.2)
pt3dadd(-256.5, -462.5, -144, 2.2)
pt3dadd(-258, -465.5, -149.5, 2)
pt3dadd(-259.5, -468, -149.5, 1.5)
pt3dadd(-261, -470, -149.5, 1.3)
pt3dadd(-263.5, -472, -150, 1.3)
pt3dadd(-267, -475.5, -152.5, 1.3)
pt3dadd(-265, -478, -148, 1.3)
pt3dadd(-265, -481.5, -151, 1.6)
pt3dadd(-266.5, -485, -151.5, 1.6)
pt3dadd(-269, -488, -149, 2)
pt3dadd(-269.5, -490.5, -149.5, 3)
pt3dadd(-274.5, -494, -147.5, 1.5)
pt3dadd(-276.5, -500.5, -147.5, 1.5)
pt3dadd(-277, -504.5, -148, 1.5)
pt3dadd(-281.5, -506.5, -148.5, 1.3)
pt3dadd(-282.5, -511, -154, 2)
pt3dadd(-287, -514.5, -152, 2)
pt3dadd(-288.5, -519.5, -152, 1.5)
pt3dadd(-290.5, -521, -152.5, 1.5)
pt3dadd(-294, -524.5, -152.5, 1.5)
pt3dadd(-296.5, -528, -155.5, 1.5)
pt3dadd(-298.5, -530, -156, 1.5)
pt3dadd(-300.5, -532, -156, 1.5)
pt3dadd(-302, -533.5, -158, 1.7)
pt3dadd(-306, -536, -161, 1.7)
pt3dadd(-308.5, -538.5, -166, 1.4)
pt3dadd(-311.5, -542.5, -166.5, 1.4)
pt3dadd(-313.5, -546, -166.5, 1.4)
pt3dadd(-316.5, -551.5, -162.5, 1.4)
pt3dadd(-319.5, -555, -163, 1.9)
pt3dadd(-324.5, -560, -165.5, 2.2)
pt3dadd(-326.5, -562.5, -165.5, 2.2)
pt3dadd(-328, -564, -166, 1.7)
pt3dadd(-331, -567, -166, 1.6)
pt3dadd(-335, -571.5, -166.5, 2.5)
pt3dadd(-339, -574, -167, 2.4)
pt3dadd(-344, -578.5, -163, 2.4)
pt3dadd(-350, -578.5, -171, 0.5)
pt3dadd(-354.5, -582, -171, 0.5)
pt3dadd(-359.5, -588.5, -174, 1.1)
pt3dadd(-361.5, -589.5, -174, 2)
pt3dadd(-364.5, -591.5, -174.5, 2.1)
pt3dadd(-368.5, -594.5, -170.5, 1.3)
pt3dadd(-370.5, -596.5, -170.5, 1.2)
pt3dadd(-376.5, -600, -169, 1.1)
pt3dadd(-379, -601.5, -169, 1.1)
pt3dadd(-381, -605, -174, 1)
pt3dadd(-384.5, -607.5, -174.5, 1)
pt3dadd(-387, -611.5, -175, 1.6)
pt3dadd(-391.5, -615.5, -168.5, 1.3)
pt3dadd(-395, -616.5, -172.5, 1.2)
pt3dadd(-400.5, -620, -173, 1.2)
pt3dadd(-403.5, -621, -173.5, 1.2)
pt3dadd(-407, -623, -173.5, 1.2)
pt3dadd(-412, -627.5, -181, 1.3)
pt3dadd(-413.5, -629, -181, 0.9)
pt3dadd(-414.5, -631.5, -181.5, 0.8)
pt3dadd(-415.5, -634, -185.5, 0.8)
pt3dadd(-418.5, -634, -185.5, 1.3)
pt3dadd(-422, -635, -189.5, 1.7)
pt3dadd(-424.5, -637.5, -183, 2)
pt3dadd(-427.5, -640.5, -183.5, 1.9)
pt3dadd(-430.5, -644, -187.5, 1)
pt3dadd(-434.5, -646, -188, 0.8)
pt3dadd(-436.5, -649.5, -188.5, 0.8)
pt3dadd(-438.5, -651, -188.5, 0.8)
pt3dadd(-440.5, -652.5, -185.5, 1.6)
pt3dadd(-443, -654.5, -185.5, 1.6)
pt3dadd(-444.5, -659.5, -189.5, 0.9)
pt3dadd(-449, -660.5, -190, 0.8)
pt3dadd(-452, -663, -190.5, 1.2)
pt3dadd(-454, -665, -190.5, 0.9)
pt3dadd(-455.5, -666.5, -191, 0.7)
pt3dadd(-457, -669.5, -191, 0.7)
pt3dadd(-459, -670.5, -191.5, 0.8)
pt3dadd(-463.5, -675, -192, 1.4)
pt3dadd(-466.5, -677, -189, 2.2)
pt3dadd(-467.5, -679.5, -196.5, 1.8)
pt3dadd(-469.5, -681.5, -193.5, 0.9)
pt3dadd(-476, -686, -194, 1.1)
pt3dadd(-478, -687, -194.5, 1.2)
pt3dadd(-481, -689.5, -194.5, 1.4)
pt3dadd(-484.5, -691, -195, 1.1)
pt3dadd(-489.5, -692, -195.5, 1.1)
pt3dadd(-492, -696, -196, 1.1)
pt3dadd(-496.5, -698, -196.5, 1.1)
pt3dadd(-498.5, -700, -196.5, 1.9)
pt3dadd(-500.5, -701.5, -197, 1.8)
pt3dadd(-502.5, -702.5, -197, 1.3)
pt3dadd(-505.5, -705.5, -197.5, 1.3)
pt3dadd(-507.5, -707, -197.5, 1)
pt3dadd(-510.5, -708.5, -194.5, 0.9)
pt3dadd(-510.5, -712, -205.5, 1)
pt3dadd(-514, -714.5, -203, 1)
pt3dadd(-516, -717.5, -203, 1)
pt3dadd(-521.5, -721, -203.5, 1.2)
pt3dadd(-524.5, -722, -207, 0.1)
pt3dadd(-525.5, -724.5, -207, 0.1)
pt3dadd(-529.5, -725, -207.5, 0.2)
pt3dadd(-533.5, -729, -208, 0.3)
pt3dadd(-536, -730.5, -208, 0.3)
pt3dadd(-539, -731.5, -208.5, 1.1)
pt3dadd(-541.5, -733, -209, 1.5)
pt3dadd(-545, -736, -209, 1)
pt3dadd(-548, -740, -209.5, 0.6)
pt3dadd(-553.5, -741.5, -207, 0.7)
pt3dadd(-557.5, -743.5, -207.5, 1.3)
pt3dadd(-560.5, -746, -208, 1.3)
pt3dadd(-563.5, -746, -208, 1.8)
pt3dadd(-566, -748, -208.5, 1.2)
pt3dadd(-568, -751, -208.5, 0.7)
pt3dadd(-571, -751.5, -209, 0.7)
pt3dadd(-577, -757.5, -217, 0.4)
pt3dadd(-581, -761.5, -217.5, 0.5)
pt3dadd(-588, -764, -218, 0.7)
pt3dadd(-592.5, -766, -222, 1.9)
pt3dadd(-595.5, -769, -215.5, 1.9)
pt3dadd(-599.5, -772, -219.5, 1.1)
pt3dadd(-603, -771.5, -220, 0.7)
pt3dadd(-606, -771, -220, 0.8)
pt3dadd(-608.5, -772.5, -220.5, 1.1)
pt3dadd(-612, -774, -220.5, 0.9)
pt3dadd(-613.5, -777, -221, 0.9)
pt3dadd(-618, -779.5, -221.5, 0.9)
pt3dadd(-622, -781, -222, 0.8)
pt3dadd(-627, -782.5, -222, 0.7)
pt3dadd(-630.5, -786, -222.5, 0.7)
pt3dadd(-635, -789.5, -223, 0.7)
pt3dadd(-640.5, -792, -223.5, 1)
pt3dadd(-640.5, -796.5, -224, 1.1)
pt3dadd(-644.5, -796.5, -224.5, 0.8)
pt3dadd(-648, -798.5, -225, 1)
}
dend[171] {pt3dclear()
pt3dadd(71, -143.5, -1, 19)
pt3dadd(74.5, -147, 4, 16.8)
}
dend[172] {pt3dclear()
pt3dadd(74.5, -147, 4, 16.8)
pt3dadd(75, -155.5, 6.5, 7.8)
pt3dadd(78, -164, 7, 6.7)
pt3dadd(78, -167.5, 7, 6.7)
pt3dadd(80.5, -174.5, 7, 6.7)
pt3dadd(83.5, -184, 10, 7)
pt3dadd(87, -197, 7.5, 11)
}
dend[173] {pt3dclear()
pt3dadd(87, -197, 7.5, 11)
pt3dadd(83, -201.5, 14.5, 5)
pt3dadd(80, -207, 13.5, 3.8)
pt3dadd(74.5, -213, 15.5, 3.7)
pt3dadd(71.5, -221.5, 17.5, 4)
pt3dadd(71.5, -228.5, 21.5, 4.4)
pt3dadd(71.5, -234, 23, 3.5)
pt3dadd(68.5, -236.5, 23.5, 3.4)
pt3dadd(66.5, -241, 25, 3.4)
pt3dadd(69, -245.5, 25, 1.8)
pt3dadd(70.5, -249, 23, 1.8)
pt3dadd(68, -254.5, 26, 3.8)
pt3dadd(68, -258.5, 26.5, 3.7)
pt3dadd(69.5, -261.5, 24.5, 3)
pt3dadd(69, -265, 27.5, 3)
pt3dadd(72.5, -272.5, 30.5, 3.5)
pt3dadd(71, -280, 31.5, 2.9)
pt3dadd(70, -282, 31.5, 2.8)
pt3dadd(68.5, -284.5, 31.5, 2.5)
pt3dadd(68, -287.5, 32, 3)
pt3dadd(68, -293, 32.5, 3.5)
pt3dadd(67, -295, 32.5, 3)
pt3dadd(64, -299.5, 35.5, 3)
pt3dadd(61, -304, 36, 3.2)
pt3dadd(61, -307, 36.5, 3.4)
pt3dadd(62, -310, 36.5, 3.4)
pt3dadd(61.5, -312.5, 34.5, 3.4)
}
}
proc shape3d_42() {
dend[173] { pt3dadd(64, -316, 35, 3.4)
pt3dadd(62, -323.5, 38.5, 3.7)
pt3dadd(61, -326.5, 40.5, 3.9)
pt3dadd(60, -331, 39, 4.3)
pt3dadd(62.5, -333, 41.5, 4.6)
pt3dadd(65.5, -334.5, 42, 3.4)
pt3dadd(67, -336, 42, 2.9)
pt3dadd(67.5, -342, 42.5, 3.1)
pt3dadd(73, -350, 43.5, 3.8)
pt3dadd(74, -353.5, 46, 3.8)
pt3dadd(73.5, -357, 46.5, 3.9)
pt3dadd(71.5, -361, 49.5, 3.7)
pt3dadd(70.5, -370.5, 50.5, 3.5)
pt3dadd(69, -374, 50.5, 4)
pt3dadd(68, -376, 51, 4)
pt3dadd(65.5, -378.5, 58.5, 5.3)
}
dend[174] {pt3dclear()
pt3dadd(65.5, -378.5, 58.5, 5.3)
pt3dadd(62.5, -378.5, 59, 1.3)
pt3dadd(59.5, -378.5, 61, 1)
pt3dadd(56.5, -378.5, 60, 0.6)
pt3dadd(55, -381, 65, 0.8)
pt3dadd(54.5, -384, 73.5, 0.9)
pt3dadd(53, -390, 76.5, 2.6)
pt3dadd(49.5, -392.5, 85.5, 1.9)
pt3dadd(46, -392, 90, 1.9)
pt3dadd(44.5, -400, 100.5, 0.3)
pt3dadd(45, -404, 100.5, 0.6)
pt3dadd(45, -407, 101.5, 0.7)
pt3dadd(43.5, -409, 102.5, 0.6)
pt3dadd(40, -410.5, 110.5, 0.6)
pt3dadd(43, -412, 112, 0.7)
pt3dadd(43.5, -414.5, 114, 0.8)
pt3dadd(42.5, -419, 117, 0.5)
pt3dadd(39.5, -420, 125, 0.8)
pt3dadd(39, -423, 122.5, 1.8)
pt3dadd(35.5, -423.5, 123.5, 1.3)
pt3dadd(34.5, -427, 128.5, 1.1)
pt3dadd(34.5, -430, 132, 0.9)
pt3dadd(38, -430, 133, 0.7)
pt3dadd(38, -434.5, 134.5, 0.9)
pt3dadd(35.5, -435.5, 135, 0.7)
pt3dadd(32.5, -436.5, 136, 0.7)
pt3dadd(34.5, -440, 140.5, 0.8)
pt3dadd(33, -443, 141, 0.8)
pt3dadd(34, -445, 142, 0.8)
pt3dadd(36.5, -444.5, 151, 0.6)
pt3dadd(38.5, -447, 146.5, 0.4)
pt3dadd(35.5, -448.5, 159, 0.2)
pt3dadd(36.5, -452.5, 160.5, 0.2)
pt3dadd(38.5, -455, 165.5, 1.2)
pt3dadd(36, -460, 171, 1.6)
pt3dadd(37, -466, 178, 0.7)
pt3dadd(32, -470, 178.5, 0.8)
pt3dadd(31, -473, 176.5, 0.8)
pt3dadd(30.5, -476, 188, 0.8)
pt3dadd(30, -482.5, 189, 0.8)
pt3dadd(28.5, -485, 192, 0.8)
pt3dadd(26, -485.5, 192.5, 0.8)
pt3dadd(28.5, -487, 193, 0.8)
pt3dadd(29, -490.5, 193, 0.5)
pt3dadd(26.5, -491, 193.5, 0.5)
pt3dadd(27, -494.5, 194, 0.5)
pt3dadd(23.5, -494.5, 194, 0.5)
pt3dadd(26, -498, 197, 0.6)
pt3dadd(26.5, -500.5, 193, 0.1)
pt3dadd(27, -505, 202, 0.1)
pt3dadd(25.5, -508.5, 202.5, 0.1)
pt3dadd(22, -513, 205.5, 0.1)
pt3dadd(20, -516.5, 206, 0.1)
pt3dadd(22.5, -519.5, 201, 0.1)
pt3dadd(23, -524, 201.5, 0.1)
pt3dadd(22, -526.5, 207.5, 0.1)
}
dend[175] {pt3dclear()
pt3dadd(65.5, -378.5, 58.5, 5.3)
pt3dadd(68, -382.5, 62, 3.7)
pt3dadd(67.5, -390.5, 75, 3.8)
pt3dadd(66.5, -395, 80, 3.5)
pt3dadd(66.5, -403, 74.5, 4)
pt3dadd(69, -410.5, 74, 3.4)
pt3dadd(73.5, -416.5, 77, 3.1)
pt3dadd(73.5, -424, 77, 3.4)
pt3dadd(75, -429.5, 73.5, 3.4)
pt3dadd(77.5, -435, 76.5, 4.3)
pt3dadd(78.5, -438, 82, 4.1)
pt3dadd(78.5, -442.5, 76.5, 3.4)
pt3dadd(78.5, -445.5, 73, 3.8)
pt3dadd(80, -450, 78.5, 3.7)
pt3dadd(81, -453.5, 76, 3.7)
pt3dadd(81.5, -457.5, 78.5, 3.2)
pt3dadd(83, -461.5, 78.5, 3.6)
pt3dadd(85, -465, 78, 3.6)
pt3dadd(87, -469.5, 78, 3.7)
pt3dadd(87.5, -472, 75.5, 3.7)
pt3dadd(90, -474, 75.5, 2.8)
pt3dadd(93, -483.5, 78, 3.4)
pt3dadd(91, -489.5, 77.5, 3.4)
pt3dadd(90, -495, 77.5, 3)
pt3dadd(90.5, -499.5, 77.5, 2.5)
pt3dadd(90.5, -502.5, 75, 2.8)
pt3dadd(89, -509, 75, 2.8)
pt3dadd(87, -515.5, 73, 2.3)
pt3dadd(87, -519.5, 70.5, 2.6)
pt3dadd(84, -533, 66, 2.8)
pt3dadd(84.5, -541, 69, 3.6)
pt3dadd(83.5, -546.5, 64.5, 3)
pt3dadd(83, -549.5, 64.5, 3)
pt3dadd(82.5, -553, 62, 2.8)
pt3dadd(81.5, -556.5, 65, 2.3)
pt3dadd(78.5, -559, 65, 1.9)
pt3dadd(76.5, -561, 65, 1.9)
pt3dadd(74.5, -565.5, 62.5, 2.9)
pt3dadd(72.5, -569, 63, 3.4)
pt3dadd(71.5, -575, 63, 2.4)
pt3dadd(69.5, -578, 63, 2)
pt3dadd(67, -581, 63, 2)
pt3dadd(66.5, -584, 63.5, 2.2)
pt3dadd(63, -591.5, 58.5, 1.8)
pt3dadd(63.5, -596, 64, 1.7)
pt3dadd(65, -599, 64, 1.5)
pt3dadd(60, -605.5, 64, 2.4)
pt3dadd(56.5, -611.5, 64.5, 2.4)
pt3dadd(55.5, -615, 64.5, 2.1)
pt3dadd(53.5, -616, 67, 2.6)
pt3dadd(51.5, -618, 65, 2.6)
pt3dadd(52, -624.5, 65, 2.4)
pt3dadd(54, -628.5, 75, 2.4)
pt3dadd(52.5, -632.5, 76.5, 2.5)
pt3dadd(48.5, -637.5, 86, 3.2)
pt3dadd(48.5, -647, 87.5, 3.2)
pt3dadd(50.5, -652.5, 97, 2.2)
pt3dadd(53, -655, 98.5, 1.7)
pt3dadd(53.5, -661.5, 102, 4.1)
}
dend[176] {pt3dclear()
pt3dadd(53.5, -661.5, 102, 4.1)
pt3dadd(56, -662.5, 101.5, 2)
pt3dadd(57.5, -666.5, 101, 1.2)
pt3dadd(55.5, -669.5, 103, 1.1)
pt3dadd(57, -674.5, 100, 1.6)
pt3dadd(60, -676, 100, 1.6)
pt3dadd(61, -682.5, 96, 1.6)
pt3dadd(59, -684.5, 98.5, 1.9)
pt3dadd(58, -688.5, 98.5, 1.9)
pt3dadd(61, -696.5, 97.5, 1.5)
pt3dadd(61, -700.5, 97, 1.7)
pt3dadd(60, -703, 97, 1.5)
pt3dadd(62, -712, 96, 1.5)
pt3dadd(65, -713, 96, 1.5)
pt3dadd(67, -722, 88.5, 1.2)
pt3dadd(65, -726.5, 91, 0.8)
pt3dadd(66.5, -734, 84.5, 0.7)
pt3dadd(67.5, -740.5, 92, 1.2)
pt3dadd(68.5, -744, 91.5, 1.2)
pt3dadd(68.5, -748.5, 91, 1.3)
pt3dadd(69.5, -755.5, 90.5, 0.9)
pt3dadd(70, -759, 90, 0.9)
pt3dadd(69, -767, 89.5, 1.7)
pt3dadd(70, -770, 89, 1.4)
pt3dadd(69.5, -777, 82, 1.2)
pt3dadd(69.5, -782.5, 81.5, 1.2)
pt3dadd(69.5, -786, 81.5, 1.2)
pt3dadd(69.5, -791, 81, 1.2)
pt3dadd(69, -793.5, 75, 1.2)
}
dend[177] {pt3dclear()
pt3dadd(53.5, -661.5, 102, 4.1)
pt3dadd(51, -659.5, 102, 1.9)
pt3dadd(47.5, -659, 102.5, 1.9)
pt3dadd(47, -662.5, 103, 1.4)
pt3dadd(46, -667.5, 106, 1.3)
pt3dadd(44.5, -669.5, 106.5, 0.9)
pt3dadd(41, -676, 107.5, 1.4)
pt3dadd(43, -686.5, 114.5, 1.2)
pt3dadd(42.5, -689.5, 115, 1.4)
pt3dadd(40, -698, 116, 2)
pt3dadd(40.5, -707, 124.5, 1.1)
pt3dadd(42, -713.5, 126, 1.4)
pt3dadd(41.5, -718, 127.5, 1.7)
pt3dadd(41, -723.5, 125.5, 2.3)
pt3dadd(40, -727, 126.5, 2.3)
pt3dadd(40, -731, 127.5, 1.3)
pt3dadd(41, -733, 128, 1.3)
pt3dadd(42.5, -735, 128.5, 1.1)
pt3dadd(42, -737.5, 133.5, 1.3)
pt3dadd(42, -744, 132, 2.2)
pt3dadd(42, -747.5, 132.5, 1.8)
pt3dadd(42, -750.5, 133.5, 1.3)
pt3dadd(45, -750, 135, 1.1)
pt3dadd(46, -753, 139.5, 0.7)
pt3dadd(46.5, -759, 141, 0.9)
pt3dadd(44.5, -763, 142, 1.4)
pt3dadd(45, -765.5, 143, 1.4)
pt3dadd(47, -768, 143.5, 1.3)
pt3dadd(44, -775, 149.5, 1.6)
pt3dadd(46.5, -780.5, 151, 1.6)
pt3dadd(46, -785.5, 152.5, 1.6)
pt3dadd(46.5, -790, 153.5, 1.6)
pt3dadd(44.5, -793.5, 166.5, 1.6)
pt3dadd(43.5, -798, 164.5, 1.2)
pt3dadd(42.5, -800.5, 169.5, 1.6)
pt3dadd(44.5, -805.5, 170.5, 1.3)
pt3dadd(47.5, -806.5, 175, 1.2)
}
dend[178] {pt3dclear()
pt3dadd(87, -197, 7.5, 11)
pt3dadd(90.5, -200, 10.5, 7.2)
}
dend[179] {pt3dclear()
pt3dadd(90.5, -200, 10.5, 7.2)
}
}
proc shape3d_43() {
dend[179] { pt3dadd(93, -203.5, 14, 6.4)
pt3dadd(98, -214.5, 19.5, 3.9)
pt3dadd(99.5, -220, 21, 4.4)
pt3dadd(102.5, -226, 22, 4.1)
pt3dadd(102.5, -230.5, 18, 4.1)
pt3dadd(102, -235, 25, 4)
pt3dadd(105, -240, 23, 3.7)
pt3dadd(108.5, -249, 26.5, 5.1)
pt3dadd(111, -251, 24.5, 5.1)
pt3dadd(116, -258, 27.5, 4.4)
pt3dadd(118, -261, 33, 4.7)
pt3dadd(118, -265.5, 33, 4.7)
pt3dadd(123.5, -274, 34, 5)
pt3dadd(128.5, -281, 35, 4.5)
pt3dadd(131.5, -288.5, 36, 4.5)
pt3dadd(134, -292, 36.5, 4.3)
pt3dadd(140, -300, 37.5, 4.2)
pt3dadd(148, -305.5, 36.5, 4)
pt3dadd(151, -308.5, 39, 4)
pt3dadd(153, -312, 39, 4)
pt3dadd(156.5, -317, 43, 4.1)
pt3dadd(160, -321, 34.5, 4.7)
pt3dadd(162.5, -323.5, 35, 4)
pt3dadd(164.5, -327, 35.5, 5.2)
}
dend[180] {pt3dclear()
pt3dadd(164.5, -327, 35.5, 5.2)
pt3dadd(168, -327.5, 40.5, 1.7)
pt3dadd(172, -325, 40.5, 1.5)
pt3dadd(177, -324.5, 40.5, 1.2)
pt3dadd(180, -328.5, 40.5, 1)
pt3dadd(183, -328, 40.5, 1.3)
pt3dadd(187.5, -326, 40.5, 0.9)
pt3dadd(191, -327, 40.5, 1.1)
pt3dadd(195, -329.5, 42.5, 1.3)
pt3dadd(203, -334, 42.5, 1.2)
pt3dadd(207.5, -333, 42.5, 1.5)
pt3dadd(211, -333, 47.5, 1.1)
pt3dadd(214.5, -333, 50, 0.7)
pt3dadd(219, -337, 50, 0.8)
pt3dadd(223.5, -337, 50, 0.8)
pt3dadd(226.5, -339.5, 47.5, 0.8)
pt3dadd(233, -340.5, 45, 0.8)
pt3dadd(238, -340.5, 45, 0.8)
pt3dadd(247.5, -341.5, 42.5, 0.7)
pt3dadd(251.5, -341.5, 42.5, 0.7)
pt3dadd(254.5, -341.5, 42.5, 0.7)
pt3dadd(257.5, -341.5, 42.5, 0.7)
pt3dadd(263, -343.5, 50, 0.8)
pt3dadd(266, -343.5, 47.5, 0.8)
pt3dadd(272, -347.5, 47.5, 0.8)
pt3dadd(279.5, -348, 45, 0.8)
pt3dadd(282.5, -348, 45, 0.8)
pt3dadd(286.5, -349.5, 50, 0.8)
pt3dadd(290.5, -352.5, 52.5, 0.8)
pt3dadd(294, -352.5, 52.5, 0.8)
pt3dadd(300, -352.5, 52.5, 0.8)
pt3dadd(305, -352.5, 52.5, 0.8)
pt3dadd(308.5, -355, 57.5, 0.8)
pt3dadd(313, -357, 57.5, 0.8)
pt3dadd(319.5, -357, 55, 0.8)
pt3dadd(325, -359, 57.5, 0.3)
pt3dadd(331.5, -359, 57.5, 0.3)
pt3dadd(336.5, -363, 48, 0.3)
pt3dadd(344.5, -363, 50.5, 0.3)
pt3dadd(350.5, -364.5, 50.5, 0.3)
pt3dadd(355, -368, 50.5, 0.3)
pt3dadd(363, -368, 50.5, 0.3)
pt3dadd(368, -368, 50.5, 0.3)
pt3dadd(369.5, -369.5, 50.5, 0.3)
pt3dadd(375.5, -372.5, 48, 0.3)
pt3dadd(382, -374.5, 50.5, 0.3)
pt3dadd(388, -374.5, 50.5, 0.3)
pt3dadd(394, -378.5, 48, 0.3)
pt3dadd(399, -381, 48, 0.3)
pt3dadd(404, -384.5, 43, 0.3)
pt3dadd(407.5, -389, 50.5, 0.3)
pt3dadd(407.5, -395, 50.5, 0.3)
pt3dadd(414, -399.5, 50.5, 0.2)
pt3dadd(419, -402, 50.5, 0.3)
}
dend[181] {pt3dclear()
pt3dadd(164.5, -327, 35.5, 5.2)
pt3dadd(165.5, -336, 25, 5.2)
pt3dadd(174, -361, 25, 4.6)
pt3dadd(174.5, -366, 25, 4.6)
pt3dadd(177.5, -375, 19.5, 4.6)
pt3dadd(180, -383, 19.5, 5.3)
pt3dadd(182.5, -391.5, 17, 4.1)
pt3dadd(184.5, -400.5, 19.5, 3.8)
pt3dadd(185.5, -406.5, 19.5, 3.5)
pt3dadd(189, -413, 22.5, 5.1)
pt3dadd(186, -419.5, 25, 5.4)
pt3dadd(189, -423, 25.5, 4.7)
pt3dadd(190.5, -426.5, 22, 4)
pt3dadd(193.5, -433.5, 31, 5)
pt3dadd(196.5, -442.5, 33, 4.5)
pt3dadd(197.5, -450.5, 37, 4.8)
pt3dadd(199, -454, 35, 4.8)
pt3dadd(201, -461, 36.5, 5)
pt3dadd(202, -462.5, 39.5, 4.3)
}
dend[182] {pt3dclear()
pt3dadd(202, -462.5, 39.5, 4.3)
pt3dadd(198.5, -465, 41, 1.7)
pt3dadd(197, -466.5, 41, 1.7)
pt3dadd(199.5, -471, 41, 2.1)
pt3dadd(200.5, -473, 40.5, 3)
pt3dadd(200.5, -476.5, 40.5, 3)
pt3dadd(200.5, -480.5, 40.5, 2.5)
pt3dadd(199.5, -484, 40, 2.6)
pt3dadd(197.5, -491.5, 38, 2.3)
pt3dadd(198, -494, 37.5, 1.9)
pt3dadd(197.5, -497.5, 37.5, 2.3)
pt3dadd(198, -503.5, 37.5, 3)
pt3dadd(197.5, -510.5, 37, 2.2)
pt3dadd(199.5, -518.5, 36.5, 1.9)
pt3dadd(201, -531.5, 36, 2.2)
pt3dadd(198.5, -542.5, 35, 1.8)
pt3dadd(196.5, -551, 32, 2.5)
pt3dadd(195.5, -560, 34, 2.4)
pt3dadd(199, -564, 34, 2.1)
pt3dadd(200, -573, 28, 1.9)
pt3dadd(202.5, -575.5, 25.5, 1.9)
pt3dadd(198, -582, 32.5, 2.7)
pt3dadd(192, -586.5, 32, 3.5)
pt3dadd(188, -590.5, 31.5, 2.3)
pt3dadd(187.5, -596, 31.5, 2.1)
pt3dadd(187.5, -603.5, 31, 2.1)
pt3dadd(187.5, -606.5, 31, 2.2)
pt3dadd(188, -618.5, 28, 1.9)
pt3dadd(189, -625, 25, 2.5)
pt3dadd(190.5, -628, 25, 3)
pt3dadd(195.5, -632.5, 19, 1.3)
pt3dadd(198, -638.5, 26.5, 1.5)
pt3dadd(200.5, -644, 20.5, 1.6)
pt3dadd(200.5, -647.5, 20, 1.6)
pt3dadd(200, -655, 19.5, 1.8)
pt3dadd(200, -659, 19.5, 2.1)
pt3dadd(201.5, -661.5, 21.5, 2.1)
pt3dadd(200, -670, 21, 2)
pt3dadd(198.5, -677.5, 18.5, 2.4)
pt3dadd(196.5, -680.5, 15, 2.5)
pt3dadd(194, -683.5, 17.5, 1.4)
pt3dadd(194, -688, 14.5, 1.3)
pt3dadd(192.5, -691, 14, 1.6)
pt3dadd(193, -694.5, 14, 1.6)
pt3dadd(195.5, -699, 16.5, 1.4)
pt3dadd(196.5, -701, 16.5, 1.1)
pt3dadd(199.5, -705.5, 16.5, 1.3)
pt3dadd(200.5, -713, 18.5, 1.9)
pt3dadd(200.5, -717.5, 18, 1.9)
pt3dadd(200.5, -723, 15, 1.4)
pt3dadd(202, -726.5, 17.5, 1.4)
pt3dadd(203.5, -729.5, 17.5, 1.4)
pt3dadd(205, -732.5, 17, 1.1)
pt3dadd(207.5, -734.5, 14.5, 1.2)
pt3dadd(208, -737, 14, 1.2)
pt3dadd(209, -741, 19.5, 1.2)
pt3dadd(210, -744, 16, 1.2)
pt3dadd(212, -746.5, 16, 1.2)
pt3dadd(213.5, -750, 18.5, 0.9)
pt3dadd(215, -754.5, 18.5, 0.8)
pt3dadd(216, -759.5, 18, 0.6)
pt3dadd(219, -764.5, 9, 1.3)
pt3dadd(226, -773, 8.5, 0.9)
pt3dadd(227.5, -777.5, 8, 0.9)
pt3dadd(231.5, -782, 7.5, 0.9)
pt3dadd(235, -786.5, 10.5, 0.4)
}
dend[183] {pt3dclear()
pt3dadd(202, -462.5, 39.5, 4.3)
pt3dadd(203, -465.5, 25, 4.3)
pt3dadd(203, -468.5, 28.5, 2.8)
pt3dadd(206.5, -475.5, 20.5, 2.5)
pt3dadd(207.5, -477.5, 17, 2)
pt3dadd(208, -480, 19, 2)
pt3dadd(206, -484.5, 13.5, 2.6)
pt3dadd(204.5, -491, 5.5, 2.5)
pt3dadd(203, -494.5, 4.5, 2.6)
pt3dadd(202.5, -499, 3.5, 2.9)
pt3dadd(202.5, -503, 2.5, 3.2)
pt3dadd(204, -510, 0.5, 3)
pt3dadd(203.5, -514, 0, 3)
pt3dadd(205, -517.5, -10, 2.6)
pt3dadd(208, -523.5, -11.5, 2.5)
pt3dadd(211, -530, -13.5, 2.6)
pt3dadd(210.5, -533, -14.5, 2.3)
pt3dadd(210, -539, -22, 2.8)
pt3dadd(210.5, -541.5, -22.5, 2.2)
pt3dadd(209.5, -546, -23.5, 2)
pt3dadd(207, -552, -28.5, 2.6)
pt3dadd(206.5, -555, -25, 2.8)
pt3dadd(206.5, -561, -20.5, 2.8)
pt3dadd(206.5, -567.5, -31, 2)
pt3dadd(207, -570, -31.5, 2)
pt3dadd(205, -577, -33, 2.3)
pt3dadd(205.5, -580, -36.5, 2.8)
pt3dadd(203.5, -585, -37.5, 3)
pt3dadd(205, -587, -38, 2.7)
pt3dadd(206.5, -589, -38.5, 3)
pt3dadd(204, -590, -45.5, 3.7)
pt3dadd(201.5, -593, -46, 4.3)
pt3dadd(199.5, -595, -50, 5.7)
}
dend[184] {pt3dclear()
pt3dadd(199.5, -595, -50, 5.7)
pt3dadd(201, -598, -54, 2.8)
pt3dadd(202, -600.5, -52.5, 2.8)
pt3dadd(202.5, -604.5, -56.5, 2.8)
}
}
proc shape3d_44() {
dend[184] { pt3dadd(201.5, -607, -57.5, 3.5)
pt3dadd(201.5, -610, -58, 3.5)
pt3dadd(200.5, -612, -65.5, 2.1)
pt3dadd(203, -617, -67.5, 1.6)
pt3dadd(207, -621, -66.5, 1)
pt3dadd(209.5, -624, -67.5, 1)
pt3dadd(211, -626, -71.5, 1.2)
pt3dadd(214.5, -631, -69, 1.1)
pt3dadd(217.5, -633.5, -72.5, 1.3)
pt3dadd(220.5, -635, -73.5, 1.1)
pt3dadd(224.5, -636, -75, 1.1)
pt3dadd(228, -644.5, -63.5, 2.6)
pt3dadd(230, -646.5, -63.5, 2.6)
pt3dadd(233, -653.5, -73, 3.4)
pt3dadd(236.5, -654.5, -73, 2.3)
pt3dadd(239, -657, -73, 2.9)
pt3dadd(241, -659, -73, 2.9)
pt3dadd(242.5, -662, -73, 2)
pt3dadd(242.5, -665.5, -73.5, 1.8)
pt3dadd(245.5, -668.5, -73.5, 1.8)
pt3dadd(248.5, -670.5, -76.5, 1.8)
pt3dadd(251, -673.5, -74, 1.8)
pt3dadd(257, -677.5, -74, 2.3)
pt3dadd(260.5, -684.5, -74.5, 1.4)
pt3dadd(264.5, -686, -80.5, 2.2)
pt3dadd(269, -686, -81, 2.5)
pt3dadd(272, -688, -81, 1.6)
pt3dadd(273, -691, -81, 1.6)
pt3dadd(275.5, -694.5, -81, 1.6)
pt3dadd(278.5, -696.5, -81, 2)
pt3dadd(281.5, -699, -84.5, 2.1)
pt3dadd(286, -704, -90, 1.8)
pt3dadd(287.5, -706, -85, 1.2)
pt3dadd(289.5, -709, -85, 1.3)
pt3dadd(291.5, -712, -85, 1.2)
pt3dadd(297.5, -718, -88, 1.9)
pt3dadd(300.5, -720, -88, 2.1)
pt3dadd(304, -723.5, -88.5, 2)
pt3dadd(305.5, -727, -91.5, 1.2)
pt3dadd(306.5, -729.5, -91.5, 0.9)
pt3dadd(310.5, -733, -91.5, 1)
pt3dadd(314.5, -735.5, -92, 1)
pt3dadd(315.5, -737.5, -92, 1)
pt3dadd(315.5, -741, -89, 1.1)
pt3dadd(319, -744, -92.5, 1.4)
pt3dadd(322.5, -748, -92.5, 1.1)
pt3dadd(326.5, -749, -92.5, 1.2)
pt3dadd(328, -751.5, -99, 1.8)
pt3dadd(330, -752.5, -90, 1.8)
pt3dadd(333.5, -754.5, -87.5, 3)
pt3dadd(338, -758, -85, 2.9)
pt3dadd(342.5, -761.5, -85, 2.8)
pt3dadd(344, -764, -85, 2.2)
pt3dadd(347.5, -768, -88.5, 1.5)
pt3dadd(350.5, -769.5, -85.5, 1.5)
pt3dadd(354.5, -772, -85.5, 1.3)
pt3dadd(358.5, -776, -89, 1.4)
pt3dadd(362, -779.5, -86, 1.8)
pt3dadd(365.5, -782.5, -86.5, 1.1)
pt3dadd(369.5, -786, -86.5, 1.1)
pt3dadd(374.5, -789.5, -83.5, 1.1)
pt3dadd(375.5, -792, -83.5, 1.3)
pt3dadd(377.5, -794.5, -84, 1.5)
pt3dadd(382.5, -800, -84, 1.5)
pt3dadd(383, -804, -84, 1.2)
pt3dadd(386, -809, -78.5, 1.3)
pt3dadd(392, -815, -76, 1.5)
pt3dadd(395, -820.5, -79, 2.2)
pt3dadd(398, -822, -76, 2.2)
pt3dadd(402, -824.5, -76.5, 1.8)
pt3dadd(404.5, -828, -76.5, 2.8)
pt3dadd(410.5, -834, -71, 1.7)
pt3dadd(412, -837, -74, 1.7)
pt3dadd(413.5, -842, -77.5, 1.7)
pt3dadd(416, -844, -74.5, 1.7)
pt3dadd(419, -848.5, -77.5, 1.4)
pt3dadd(420, -852.5, -75, 1.4)
pt3dadd(420.5, -856, -75, 1)
pt3dadd(422, -859.5, -78, 0.6)
pt3dadd(424, -863, -78, 0.8)
pt3dadd(427, -866.5, -75.5, 0.9)
pt3dadd(427, -869.5, -75.5, 1)
pt3dadd(427.5, -872.5, -72.5, 1.1)
pt3dadd(428, -875.5, -72.5, 1.2)
pt3dadd(430, -879.5, -73, 1.2)
pt3dadd(434, -880.5, -73, 1.2)
pt3dadd(437, -884.5, -73, 1)
pt3dadd(440, -884, -73.5, 0.9)
pt3dadd(443.5, -888, -73.5, 0.9)
pt3dadd(448.5, -891, -76.5, 1)
pt3dadd(452.5, -894.5, -74, 1.1)
pt3dadd(454, -899, -74, 0.4)
pt3dadd(457.5, -901.5, -74, 0.4)
pt3dadd(463, -904, -74.5, 0.4)
pt3dadd(467.5, -905, -74.5, 0.4)
pt3dadd(471.5, -905.5, -77.5, 0.4)
pt3dadd(476.5, -908, -84, 0.4)
pt3dadd(481.5, -910.5, -81, 0.6)
pt3dadd(486, -915, -81.5, 0.6)
pt3dadd(494, -916.5, -87.5, 0.6)
pt3dadd(498.5, -920, -88, 1.1)
pt3dadd(503, -924, -91, 1.1)
pt3dadd(509.5, -927, -82.5, 1.1)
pt3dadd(515, -930.5, -82.5, 1.1)
pt3dadd(518.5, -933.5, -80, 0.8)
pt3dadd(522.5, -934.5, -80, 0.6)
pt3dadd(526.5, -937.5, -80, 0.6)
pt3dadd(532.5, -944, -83.5, 0.5)
}
dend[185] {pt3dclear()
pt3dadd(199.5, -595, -50, 5.7)
pt3dadd(197.5, -597.5, -53, 2.3)
pt3dadd(195.5, -600, -41, 1.6)
pt3dadd(195, -604.5, -50.5, 1.3)
pt3dadd(194.5, -616, -44.5, 1.3)
pt3dadd(195, -619.5, -44.5, 1.3)
pt3dadd(196, -622, -47.5, 2)
pt3dadd(196.5, -626.5, -51, 1.9)
pt3dadd(200.5, -632.5, -51, 1.9)
pt3dadd(204, -635, -51, 1.6)
pt3dadd(207, -638.5, -51, 0.1)
pt3dadd(209.5, -643.5, -51, 0.1)
pt3dadd(208, -648.5, -54, 0.1)
}
dend[186] {pt3dclear()
pt3dadd(90.5, -200, 10.5, 7.2)
pt3dadd(96, -199.5, 12.5, 1.4)
pt3dadd(100.5, -200, 25, 1.1)
pt3dadd(105.5, -201.5, 25, 1.3)
pt3dadd(112, -204.5, 23.5, 1.2)
pt3dadd(114, -205.5, 21.5, 1.2)
pt3dadd(117.5, -205.5, 21.5, 1.2)
pt3dadd(123.5, -206.5, 22, 1.1)
pt3dadd(125.5, -209, 24.5, 1.1)
pt3dadd(126.5, -212.5, 32, 1)
pt3dadd(128.5, -214.5, 30, 1)
pt3dadd(132, -214.5, 30, 1.1)
pt3dadd(134, -217, 38, 1)
pt3dadd(134.5, -220, 33.5, 0.9)
pt3dadd(137, -221, 31.5, 0.8)
pt3dadd(141.5, -227.5, 37, 0.8)
pt3dadd(143, -229.5, 34.5, 0.6)
pt3dadd(146, -231, 35, 0.6)
pt3dadd(147.5, -232.5, 35, 0.6)
pt3dadd(151.5, -234, 35.5, 0.8)
pt3dadd(155, -234.5, 40.5, 0.7)
pt3dadd(158.5, -236.5, 41, 0.6)
pt3dadd(158, -241, 39, 0.7)
pt3dadd(161, -241, 41.5, 0.7)
pt3dadd(163, -242.5, 41.5, 0.7)
pt3dadd(163, -245.5, 42, 0.8)
pt3dadd(165, -247, 46.5, 0.9)
pt3dadd(169.5, -249, 44.5, 0.7)
pt3dadd(170.5, -251, 44.5, 0.9)
pt3dadd(173.5, -252, 45, 0.9)
pt3dadd(175, -256, 45, 0.6)
pt3dadd(177.5, -258.5, 43.5, 0.8)
pt3dadd(181, -262.5, 44, 0.6)
pt3dadd(183, -266, 46.5, 0.5)
pt3dadd(183, -270.5, 46.5, 0.5)
pt3dadd(186, -271.5, 47, 0.5)
pt3dadd(189, -273, 47, 0.5)
pt3dadd(191, -275, 47, 0.5)
pt3dadd(191.5, -279.5, 50, 0.5)
pt3dadd(194, -282, 50, 0.5)
pt3dadd(196, -284.5, 50.5, 0.5)
pt3dadd(200.5, -288.5, 48.5, 0.5)
pt3dadd(203.5, -290.5, 48.5, 0.2)
pt3dadd(209.5, -296, 49, 0.3)
pt3dadd(212.5, -298, 47.5, 0.1)
pt3dadd(215.5, -300, 47.5, 0.1)
pt3dadd(217, -302.5, 45.5, 0.1)
pt3dadd(222, -306, 50, 0.1)
pt3dadd(225, -307, 48.5, 0.1)
pt3dadd(229.5, -307.5, 49, 0.1)
pt3dadd(233, -309.5, 53.5, 0.5)
pt3dadd(238.5, -313.5, 54, 0.5)
pt3dadd(245.5, -315.5, 57, 0.5)
pt3dadd(250, -320, 60, 0.5)
}
dend[187] {pt3dclear()
pt3dadd(74.5, -147, 4, 16.8)
pt3dadd(81, -149, -1.5, 6.4)
pt3dadd(85, -151.5, -2, 5.7)
pt3dadd(89.5, -162, -0.5, 5)
pt3dadd(92, -167.5, 1, 5)
pt3dadd(95, -174.5, -2, 5.7)
pt3dadd(106.5, -178, -0.5, 4.7)
pt3dadd(119.5, -190, -10.5, 5.2)
pt3dadd(125.5, -197, -11, 5.5)
pt3dadd(128.5, -199, -14.5, 5.8)
pt3dadd(131, -200, -20.5, 5.8)
pt3dadd(132, -208, -16, 5.7)
pt3dadd(135, -210.5, -25, 6.1)
pt3dadd(140.5, -214, -35, 5.5)
pt3dadd(146, -219, -32, 4.8)
pt3dadd(148.5, -222, -37.5, 4.4)
pt3dadd(150, -225.5, -46.5, 5.4)
}
dend[188] {pt3dclear()
pt3dadd(150, -225.5, -46.5, 5.4)
pt3dadd(155, -230, -47, 2)
pt3dadd(156, -233, -47, 1.9)
pt3dadd(158, -239.5, -53.5, 2.3)
pt3dadd(156, -242.5, -54, 2.1)
pt3dadd(161, -248.5, -56.5, 2.1)
pt3dadd(163, -250, -51.5, 1.6)
pt3dadd(168, -256, -57.5, 2)
}
}
proc shape3d_45() {
dend[188] { pt3dadd(172, -259.5, -57.5, 2)
pt3dadd(174, -260.5, -61, 2)
pt3dadd(175, -262.5, -58, 2.2)
pt3dadd(174.5, -265, -61, 3.2)
pt3dadd(175, -268.5, -61, 2.8)
pt3dadd(179.5, -269.5, -56, 2.6)
pt3dadd(189, -274.5, -65, 2.2)
pt3dadd(191, -275.5, -65, 2.1)
pt3dadd(193, -278.5, -65.5, 2.5)
pt3dadd(193.5, -281.5, -65.5, 2.2)
pt3dadd(196.5, -283.5, -72, 2.4)
pt3dadd(200, -283.5, -66, 2.3)
pt3dadd(203.5, -284.5, -66, 1.9)
pt3dadd(209.5, -288, -69.5, 1.7)
pt3dadd(212, -288.5, -66.5, 1.6)
pt3dadd(213.5, -290.5, -73, 1.6)
pt3dadd(217, -294, -61.5, 1.2)
pt3dadd(218.5, -299.5, -71, 1.2)
pt3dadd(222.5, -302.5, -74, 1.2)
pt3dadd(226.5, -305, -74.5, 1.3)
pt3dadd(226.5, -308, -74.5, 1.3)
pt3dadd(231, -311, -78, 1.3)
pt3dadd(231, -316, -75, 1.1)
pt3dadd(231.5, -320, -75, 2)
pt3dadd(233.5, -323.5, -75.5, 1.2)
pt3dadd(234.5, -328, -75.5, 1)
pt3dadd(235.5, -333, -70, 1.3)
pt3dadd(239.5, -333, -70, 1.4)
pt3dadd(243.5, -335, -70, 1.4)
pt3dadd(244.5, -339, -70.5, 1.4)
pt3dadd(244.5, -343, -70.5, 1.4)
pt3dadd(249, -348, -74, 1.3)
pt3dadd(246, -352.5, -74, 1.1)
pt3dadd(242, -356, -71.5, 1.3)
pt3dadd(243, -358.5, -74.5, 0.9)
pt3dadd(246, -360.5, -75, 1.4)
pt3dadd(250, -360, -76, 1.6)
pt3dadd(258, -362.5, -82.5, 1.9)
pt3dadd(261, -364, -83.5, 1.7)
pt3dadd(263.5, -365, -88, 1.7)
pt3dadd(267, -367.5, -89.5, 1.7)
pt3dadd(268.5, -370.5, -90.5, 2.2)
pt3dadd(275, -374, -100, 1.4)
pt3dadd(275, -377.5, -101.5, 1.3)
pt3dadd(281, -378.5, -103.5, 1.3)
pt3dadd(285.5, -379, -112, 1)
pt3dadd(286.5, -382, -113, 1.3)
pt3dadd(287.5, -384.5, -114, 1)
pt3dadd(291, -386.5, -115.5, 1)
pt3dadd(294, -388, -116.5, 1.1)
pt3dadd(297.5, -392, -127.5, 1.6)
pt3dadd(300.5, -392, -129.5, 1.6)
pt3dadd(303.5, -394.5, -129.5, 2)
pt3dadd(307, -396, -129.5, 2.2)
pt3dadd(308.5, -398.5, -129.5, 0.7)
pt3dadd(311, -399.5, -129.5, 0.9)
pt3dadd(312.5, -401.5, -134, 0.9)
pt3dadd(316, -400.5, -134, 0.9)
pt3dadd(319, -403.5, -134, 0.8)
pt3dadd(323, -405.5, -134, 0.9)
pt3dadd(323.5, -408, -136.5, 0.8)
pt3dadd(327, -410.5, -136.5, 0.8)
pt3dadd(330.5, -413, -136.5, 0.8)
pt3dadd(334.5, -416.5, -138.5, 0.8)
pt3dadd(336, -418.5, -141, 0.9)
pt3dadd(337.5, -421, -138.5, 1.6)
pt3dadd(340.5, -422, -141, 0.6)
pt3dadd(343, -424.5, -141, 0.6)
pt3dadd(346.5, -424.5, -141, 0.6)
pt3dadd(348.5, -428, -141, 0.5)
pt3dadd(346, -429, -141, 0.8)
pt3dadd(346, -432, -141, 1)
pt3dadd(345, -435, -136.5, 1.2)
pt3dadd(346.5, -436.5, -136.5, 1.2)
pt3dadd(350, -438, -138.5, 0.7)
pt3dadd(355, -439.5, -136.5, 0.9)
pt3dadd(358.5, -439.5, -136.5, 1.1)
pt3dadd(361.5, -440.5, -136.5, 1.1)
pt3dadd(364.5, -442, -136.5, 1.1)
pt3dadd(369, -443.5, -136.5, 1.1)
pt3dadd(372, -445, -136.5, 0.9)
pt3dadd(376.5, -445, -136.5, 0.9)
pt3dadd(379.5, -446.5, -136.5, 0.9)
pt3dadd(384.5, -446.5, -136.5, 0.9)
pt3dadd(388, -446.5, -136.5, 0.9)
pt3dadd(392, -446.5, -136.5, 0.9)
pt3dadd(395.5, -446.5, -136.5, 0.9)
pt3dadd(398.5, -449, -136.5, 0.9)
pt3dadd(402, -446.5, -134, 0.9)
pt3dadd(405.5, -446.5, -134, 0.9)
pt3dadd(409, -447, -132, 0.7)
pt3dadd(415, -447, -132, 0.7)
pt3dadd(418.5, -447, -132, 0.7)
pt3dadd(420.5, -449, -132, 0.6)
pt3dadd(425, -450, -132, 0.6)
pt3dadd(431.5, -455, -134, 0.5)
pt3dadd(437.5, -455, -134, 0.5)
pt3dadd(441.5, -457.5, -134, 0.5)
pt3dadd(448.5, -458.5, -132, 0.5)
pt3dadd(458.5, -463.5, -134, 1)
}
dend[189] {pt3dclear()
pt3dadd(150, -225.5, -46.5, 5.4)
pt3dadd(147.5, -227.5, -47.5, 3.1)
pt3dadd(144.5, -229, -48.5, 3.3)
pt3dadd(143, -233, -49.5, 3.6)
pt3dadd(143, -238.5, -54, 3.5)
pt3dadd(146, -238.5, -64.5, 3.5)
pt3dadd(148.5, -240.5, -69, 4.8)
pt3dadd(152.5, -243, -67, 4.1)
pt3dadd(154, -247.5, -71, 5.5)
pt3dadd(153.5, -252.5, -80.5, 4.5)
pt3dadd(160, -257, -95, 3.5)
pt3dadd(163.5, -259, -94, 3.8)
pt3dadd(170, -261, -103, 3.5)
pt3dadd(171.5, -263, -103.5, 4.1)
pt3dadd(173, -266, -108.5, 6.1)
pt3dadd(176, -269.5, -121, 6.1)
pt3dadd(176.5, -274, -126, 6)
pt3dadd(181, -273.5, -125, 5.3)
pt3dadd(184, -276, -125.5, 5.4)
pt3dadd(186.5, -282.5, -127.5, 5.7)
pt3dadd(187.5, -285.5, -131, 5.4)
pt3dadd(194.5, -289, -143, 4.1)
pt3dadd(197.5, -291.5, -144, 4.4)
pt3dadd(201.5, -294, -148, 4.4)
pt3dadd(207.5, -295, -149.5, 3.1)
pt3dadd(209.5, -297, -150, 3.1)
pt3dadd(209, -299.5, -152.5, 2.5)
pt3dadd(207.5, -301, -153, 2.8)
pt3dadd(204.5, -303.5, -152, 3.2)
pt3dadd(202, -304.5, -158, 3.4)
pt3dadd(200.5, -306.5, -160.5, 5)
}
dend[190] {pt3dclear()
pt3dadd(200.5, -306.5, -160.5, 5)
pt3dadd(206, -308, -166.5, 3.7)
pt3dadd(208.5, -308.5, -167.5, 3.4)
pt3dadd(212, -306.5, -171, 2.5)
pt3dadd(212.5, -303.5, -175, 2.8)
pt3dadd(218, -298.5, -183, 2.6)
pt3dadd(218.5, -297.5, -201.5, 2.4)
pt3dadd(215.5, -297.5, -197.5, 2.4)
pt3dadd(210.5, -297.5, -204, 2.2)
pt3dadd(211, -295, -222, 2.2)
pt3dadd(214.5, -294.5, -225, 2.7)
pt3dadd(217, -293, -226, 2.4)
pt3dadd(216, -290.5, -231, 2.4)
pt3dadd(213, -288.5, -229.5, 2.4)
pt3dadd(213.5, -285, -230.5, 2.6)
pt3dadd(215.5, -283.5, -231.5, 2.6)
pt3dadd(213.5, -281, -241.5, 2.8)
pt3dadd(211.5, -279.5, -242.5, 2.6)
pt3dadd(209.5, -278, -243.5, 2.8)
pt3dadd(210, -274.5, -248.5, 2.8)
pt3dadd(213, -277.5, -250, 2.5)
pt3dadd(214.5, -280.5, -251.5, 2.2)
pt3dadd(216, -282.5, -256.5, 1.8)
pt3dadd(219.5, -284.5, -258, 1.8)
pt3dadd(221.5, -287.5, -259.5, 1.8)
pt3dadd(224.5, -287.5, -261, 1.8)
pt3dadd(228, -283.5, -272.5, 2.6)
pt3dadd(231, -283, -273.5, 2.6)
pt3dadd(234, -283, -275, 2.6)
pt3dadd(236.5, -286.5, -287.5, 2.3)
pt3dadd(241.5, -286.5, -287.5, 2)
pt3dadd(244.5, -286.5, -294, 2)
pt3dadd(245.5, -284.5, -294.5, 1.7)
pt3dadd(248, -282, -298, 1.5)
pt3dadd(249.5, -283.5, -295.5, 1.5)
pt3dadd(248, -285, -299, 1.2)
pt3dadd(246.5, -287.5, -300, 1.4)
pt3dadd(249.5, -288.5, -301.5, 2)
pt3dadd(250.5, -285.5, -311.5, 2)
pt3dadd(253.5, -282, -313, 2)
pt3dadd(256, -279, -314.5, 1.5)
pt3dadd(260, -279.5, -316, 2.8)
pt3dadd(262, -280.5, -316.5, 1.9)
pt3dadd(265.5, -278.5, -324, 2.6)
pt3dadd(266.5, -272.5, -325, 2.8)
pt3dadd(270.5, -272.5, -329.5, 2.2)
pt3dadd(275.5, -268, -331.5, 1.9)
pt3dadd(282, -270.5, -352.5, 2)
pt3dadd(287, -266, -348.5, 2.3)
pt3dadd(289, -264.5, -353.5, 2.3)
pt3dadd(291.5, -263, -350.5, 2.3)
pt3dadd(296, -264, -360, 2.2)
pt3dadd(297.5, -265.5, -370, 2.2)
pt3dadd(299, -263.5, -375, 2.3)
pt3dadd(301.5, -260.5, -381, 2.3)
pt3dadd(303, -258.5, -385.5, 2)
pt3dadd(305.5, -258, -387, 2)
pt3dadd(309, -259, -389, 2)
pt3dadd(309.5, -261, -399.5, 2.8)
}
dend[191] {pt3dclear()
pt3dadd(309.5, -261, -399.5, 2.8)
pt3dadd(306.5, -261, -399.5, 1)
pt3dadd(305.5, -259, -400, 0.8)
pt3dadd(307.5, -258, -400, 0.8)
pt3dadd(312.5, -258, -400.5, 0.8)
pt3dadd(316, -258, -400.5, 0.8)
pt3dadd(314.5, -260, -404, 0.8)
pt3dadd(316, -261.5, -408, 0.8)
pt3dadd(318, -262.5, -408, 0.8)
pt3dadd(320, -265, -408.5, 0.8)
}
}
proc shape3d_46() {
dend[191] { pt3dadd(321, -267.5, -408.5, 0.8)
pt3dadd(320, -273, -409, 0.8)
pt3dadd(322.5, -275.5, -413, 0.8)
pt3dadd(326, -272.5, -417, 0.9)
pt3dadd(328.5, -274.5, -417, 1.3)
pt3dadd(329.5, -277.5, -425, 1.3)
}
dend[192] {pt3dclear()
pt3dadd(309.5, -261, -399.5, 2.8)
pt3dadd(307, -263, -407.5, 1.3)
pt3dadd(303.5, -262.5, -412.5, 1.5)
pt3dadd(301, -264, -416.5, 1.2)
pt3dadd(298, -266.5, -421, 0.9)
pt3dadd(300.5, -268, -429.5, 0.9)
pt3dadd(303.5, -266, -425, 1.3)
pt3dadd(304.5, -269, -421, 1.4)
pt3dadd(306.5, -271, -427, 1.7)
pt3dadd(306, -273.5, -428.5, 1.6)
pt3dadd(306.5, -276, -429.5, 1.6)
pt3dadd(309, -275.5, -447, 1.2)
pt3dadd(311.5, -274.5, -448, 1.2)
pt3dadd(313, -277, -450, 1.6)
pt3dadd(315, -278.5, -451.5, 1.6)
pt3dadd(318, -278.5, -462.5, 1.4)
pt3dadd(321, -279, -464, 1.6)
pt3dadd(322, -281, -465, 1.6)
pt3dadd(320, -285, -467.5, 1.4)
pt3dadd(325, -286, -475, 1.6)
pt3dadd(328, -288.5, -483, 1.9)
pt3dadd(329.5, -291, -483.5, 1.9)
pt3dadd(330.5, -294.5, -484, 1.3)
pt3dadd(333, -297, -485, 1.1)
pt3dadd(334, -299.5, -485, 1.1)
pt3dadd(336, -302, -493.5, 1.1)
pt3dadd(338.5, -304, -494, 1.6)
pt3dadd(335.5, -303.5, -494.5, 1.6)
pt3dadd(332.5, -305, -499, 0.8)
pt3dadd(332, -307.5, -504, 0.7)
pt3dadd(335.5, -308.5, -505, 0.8)
pt3dadd(337, -311, -506, 1.1)
pt3dadd(339.5, -313, -510.5, 1.3)
pt3dadd(338.5, -315, -510.5, 1.3)
pt3dadd(335.5, -316.5, -511, 1.1)
pt3dadd(334, -314.5, -512, 1.1)
pt3dadd(333, -312.5, -512.5, 0.9)
pt3dadd(330.5, -313.5, -525, 1.3)
pt3dadd(333, -317.5, -543.5, 1.3)
pt3dadd(332, -322.5, -553.5, 1.2)
pt3dadd(337, -322, -554, 1)
pt3dadd(339.5, -325, -558.5, 1.6)
pt3dadd(338, -326.5, -559, 1.6)
pt3dadd(340.5, -327, -559.5, 1.1)
pt3dadd(341, -329.5, -569, 2)
pt3dadd(346, -329.5, -569.5, 2.1)
pt3dadd(348.5, -332.5, -575, 1.4)
pt3dadd(351.5, -333, -582, 1.2)
pt3dadd(351.5, -336, -585.5, 0.9)
pt3dadd(354.5, -336.5, -583, 1.5)
pt3dadd(357.5, -338, -590, 0.9)
pt3dadd(358.5, -340.5, -593.5, 1.4)
pt3dadd(358.5, -344.5, -597.5, 1.4)
pt3dadd(362, -343, -598.5, 1.1)
pt3dadd(362.5, -339.5, -596.5, 1.3)
pt3dadd(362.5, -336, -597, 1.3)
pt3dadd(362, -338.5, -611, 1.3)
pt3dadd(362, -341.5, -611.5, 1.3)
pt3dadd(360, -337, -612, 1.2)
pt3dadd(358.5, -340.5, -616, 0.9)
pt3dadd(354.5, -341.5, -616.5, 0.9)
pt3dadd(353, -339, -617.5, 0.9)
pt3dadd(348.5, -336.5, -625, 0.9)
}
dend[193] {pt3dclear()
pt3dadd(200.5, -306.5, -160.5, 5)
pt3dadd(204, -311.5, -162.5, 3.5)
pt3dadd(207.5, -315, -166, 3)
pt3dadd(211, -315.5, -168, 3.2)
pt3dadd(218.5, -316, -175, 3)
pt3dadd(222, -319, -175, 3.5)
pt3dadd(219, -323, -173, 2.6)
pt3dadd(220.5, -325, -173.5, 2.3)
pt3dadd(227, -332, -180, 3.9)
pt3dadd(236, -340, -188.5, 2.9)
pt3dadd(238.5, -341.5, -189.5, 3.4)
pt3dadd(241.5, -341.5, -193.5, 3.4)
pt3dadd(248.5, -341.5, -202, 2.9)
pt3dadd(251, -342.5, -202.5, 2.1)
pt3dadd(252.5, -344, -203, 2.1)
pt3dadd(250.5, -346.5, -204, 3)
pt3dadd(250, -350.5, -209, 2.8)
pt3dadd(251.5, -353.5, -210, 2.5)
pt3dadd(251, -356.5, -211, 2.7)
pt3dadd(251.5, -361, -220, 3)
pt3dadd(254.5, -364, -225, 2.3)
pt3dadd(256, -377, -240, 3)
pt3dadd(263.5, -380.5, -242, 2.6)
pt3dadd(264.5, -386, -243.5, 2.5)
pt3dadd(263, -388, -244, 2.9)
pt3dadd(262, -392.5, -245, 2.9)
pt3dadd(265.5, -395.5, -250, 2.9)
pt3dadd(268, -397, -251, 2.6)
pt3dadd(268.5, -400, -251.5, 3)
pt3dadd(268.5, -403.5, -256.5, 3)
pt3dadd(268, -406, -261, 3)
pt3dadd(268, -409.5, -266.5, 3)
pt3dadd(270.5, -413.5, -264, 2.7)
pt3dadd(273, -415.5, -269.5, 3.3)
pt3dadd(273, -419.5, -270.5, 3.1)
pt3dadd(276.5, -423, -272, 2.8)
pt3dadd(279, -424, -272.5, 2.6)
pt3dadd(281.5, -424.5, -273.5, 2.6)
pt3dadd(282.5, -426.5, -274, 2.6)
pt3dadd(282, -430, -275, 2.5)
pt3dadd(281, -434.5, -272.5, 1.9)
pt3dadd(281, -438, -276, 1.9)
pt3dadd(281, -441.5, -277.5, 1.9)
pt3dadd(285, -446, -282.5, 3.2)
pt3dadd(287.5, -448, -283.5, 2.7)
pt3dadd(292, -451.5, -288, 1.9)
pt3dadd(293, -454, -289, 1.6)
pt3dadd(295.5, -455.5, -301.5, 1.7)
pt3dadd(296.5, -452.5, -306.5, 1.7)
pt3dadd(298, -455.5, -304, 2.1)
pt3dadd(299.5, -458, -305, 2)
pt3dadd(300, -461, -306.5, 1.5)
pt3dadd(303, -467, -309, 2.2)
pt3dadd(304, -470, -318, 1.9)
pt3dadd(306, -472, -319, 1.7)
pt3dadd(307, -474, -320, 1.7)
pt3dadd(308, -477.5, -324, 1.8)
pt3dadd(310.5, -479, -325, 1.8)
pt3dadd(316, -481, -325, 2.5)
pt3dadd(318, -484.5, -319.5, 2.8)
pt3dadd(321, -487, -331.5, 2.5)
pt3dadd(323, -489.5, -332.5, 2.6)
pt3dadd(322.5, -495.5, -334.5, 2.2)
pt3dadd(317.5, -499, -348, 1.6)
pt3dadd(315.5, -502, -355, 2.6)
pt3dadd(319, -503.5, -361, 2.5)
pt3dadd(322, -505, -362.5, 2.6)
pt3dadd(323.5, -507, -363, 2.5)
pt3dadd(323, -509.5, -375, 1.7)
pt3dadd(321.5, -513, -376, 2.2)
pt3dadd(318, -510, -397, 2.2)
pt3dadd(314.5, -509, -398.5, 2.2)
pt3dadd(321, -512.5, -400.5, 2.2)
pt3dadd(323.5, -514.5, -401.5, 1.5)
pt3dadd(326.5, -514.5, -402, 1.5)
pt3dadd(328, -518.5, -411.5, 1.5)
pt3dadd(329.5, -517, -415.5, 1.8)
pt3dadd(330, -521.5, -415.5, 1.6)
pt3dadd(333.5, -520.5, -413.5, 2.1)
pt3dadd(337, -520.5, -426.5, 2.4)
pt3dadd(336, -524.5, -425, 2)
pt3dadd(342, -528.5, -426, 2.2)
pt3dadd(345, -525.5, -429.5, 2.2)
pt3dadd(347, -529.5, -442, 2.2)
pt3dadd(354, -528.5, -458.5, 2.2)
pt3dadd(357, -529.5, -460.5, 2.5)
pt3dadd(360, -530, -462.5, 2.2)
pt3dadd(358.5, -533, -470.5, 2)
pt3dadd(361.5, -534.5, -475.5, 2)
pt3dadd(364, -535.5, -475, 2.1)
pt3dadd(369, -537, -476, 1.4)
pt3dadd(371.5, -538, -476.5, 1.1)
pt3dadd(373.5, -541.5, -477, 1.3)
pt3dadd(374.5, -544, -477.5, 1.6)
pt3dadd(375.5, -546.5, -482, 1.6)
pt3dadd(375, -550.5, -486.5, 1.6)
pt3dadd(376.5, -552, -491, 1.6)
pt3dadd(382, -552, -496, 1.3)
pt3dadd(383.5, -554.5, -496.5, 1.3)
pt3dadd(384, -558, -497, 1.4)
pt3dadd(380, -558, -503, 1.4)
pt3dadd(379, -560.5, -503.5, 1.3)
pt3dadd(379, -563.5, -504, 1.1)
pt3dadd(380.5, -566, -513, 1.2)
pt3dadd(382.5, -567.5, -513.5, 1.2)
pt3dadd(385.5, -572, -514.5, 1.1)
pt3dadd(384, -573.5, -519, 1.1)
pt3dadd(383, -577, -520, 1.1)
pt3dadd(385, -581.5, -525, 1.1)
pt3dadd(386, -585.5, -540.5, 1.8)
pt3dadd(387, -588.5, -551, 1.7)
pt3dadd(387.5, -593.5, -556.5, 1.9)
pt3dadd(388.5, -597, -553.5, 2.1)
pt3dadd(390, -600, -554.5, 2.1)
pt3dadd(393, -601, -555, 2)
pt3dadd(396.5, -604, -556.5, 1.7)
pt3dadd(399, -607.5, -557.5, 1.2)
pt3dadd(398, -609.5, -567.5, 1.6)
pt3dadd(399, -612, -568, 1.6)
pt3dadd(403, -613, -569, 2.1)
pt3dadd(406, -612.5, -575, 1.6)
pt3dadd(411, -616, -584, 1.2)
pt3dadd(407.5, -618, -584, 1.2)
pt3dadd(405, -621.5, -587.5, 1)
pt3dadd(406.5, -626, -587.5, 1)
pt3dadd(408, -628.5, -588, 1)
pt3dadd(409, -631.5, -591, 1)
pt3dadd(409, -636.5, -591, 1)
pt3dadd(411, -638, -591, 1)
pt3dadd(411, -641.5, -591, 1)
pt3dadd(412, -645, -600.5, 1.4)
}
}
proc shape3d_47() {
dend[193] { pt3dadd(412, -648, -604, 1.4)
pt3dadd(412.5, -650.5, -597.5, 1.4)
pt3dadd(409, -651.5, -597.5, 0.8)
pt3dadd(408, -654.5, -597.5, 0.8)
pt3dadd(411, -657.5, -597.5, 0.9)
pt3dadd(414.5, -663, -601.5, 0.9)
pt3dadd(418, -665.5, -607.5, 0.9)
pt3dadd(415, -667.5, -607.5, 0.9)
pt3dadd(415, -672, -607.5, 0.8)
pt3dadd(416.5, -674.5, -610.5, 0.8)
pt3dadd(418.5, -676.5, -610.5, 1)
}
dend[194] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 3.9)
pt3dadd(19.5, -49.5, -7.5, 3.9)
pt3dadd(17.5, -52, -4.5, 4.2)
pt3dadd(15, -57.5, -16.5, 3.4)
pt3dadd(12, -62, -18.5, 3.4)
pt3dadd(7, -66, -20.5, 4.2)
pt3dadd(3.5, -70, -20.5, 5.2)
pt3dadd(0.5, -73, -25, 5)
pt3dadd(-4.5, -74.5, -33, 2.3)
pt3dadd(-11.5, -73.5, -44, 2.3)
pt3dadd(-14, -68.5, -45.5, 2.4)
pt3dadd(-14, -60.5, -51, 2.6)
pt3dadd(-11, -58.5, -59.5, 2.8)
pt3dadd(-16, -58, -72, 2.6)
pt3dadd(-18.5, -53, -73.5, 2)
pt3dadd(-18.5, -49.5, -75, 2)
pt3dadd(-21.5, -47, -95.5, 2)
pt3dadd(-22, -45, -97.5, 2.3)
}
dend[195] {pt3dclear()
pt3dadd(-22, -45, -97.5, 2.3)
pt3dadd(-24.5, -46.5, -100.5, 0.7)
pt3dadd(-28.5, -46, -107.5, 0.9)
pt3dadd(-30, -44.5, -107.5, 1)
pt3dadd(-33, -43, -105, 1)
pt3dadd(-34.5, -46.5, -111.5, 1)
pt3dadd(-40.5, -48, -112.5, 1)
pt3dadd(-44, -48, -112.5, 1.3)
pt3dadd(-49.5, -48.5, -119.5, 1)
pt3dadd(-51, -52.5, -120, 1)
pt3dadd(-48.5, -53, -120, 1)
pt3dadd(-48.5, -56.5, -120.5, 1.2)
pt3dadd(-49.5, -58.5, -124, 1.2)
pt3dadd(-49, -61, -124, 0.8)
pt3dadd(-48.5, -64.5, -124.5, 0.8)
pt3dadd(-51, -68.5, -125, 1.1)
}
dend[196] {pt3dclear()
pt3dadd(-22, -45, -97.5, 2.3)
pt3dadd(-19, -45, -100.5, 1.9)
pt3dadd(-18.5, -42, -104, 1.9)
pt3dadd(-21.5, -41, -110.5, 1.7)
pt3dadd(-22.5, -38.5, -114, 1.6)
pt3dadd(-22, -35, -114.5, 1.6)
pt3dadd(-19, -36.5, -118, 1.6)
pt3dadd(-17.5, -39, -124.5, 1.9)
pt3dadd(-15, -40, -125, 1.9)
pt3dadd(-16.5, -36, -127.5, 2)
pt3dadd(-17, -30, -127.5, 2)
pt3dadd(-21, -30, -127.5, 1.6)
pt3dadd(-22.5, -31.5, -125, 1.6)
pt3dadd(-20.5, -32.5, -132, 1.9)
pt3dadd(-18, -30.5, -132, 1.6)
pt3dadd(-18, -27, -134.5, 1.7)
pt3dadd(-19, -25, -136.5, 1.7)
pt3dadd(-22, -27, -137, 1.4)
pt3dadd(-24, -29.5, -139.5, 1.7)
pt3dadd(-23.5, -35, -144, 1.7)
pt3dadd(-24, -39, -141.5, 1.7)
pt3dadd(-21.5, -40.5, -141.5, 1.7)
pt3dadd(-20.5, -40.5, -148.5, 1.7)
}
dend[197] {pt3dclear()
pt3dadd(-20.5, -40.5, -148.5, 1.7)
pt3dadd(-23, -42.5, -148.5, 0.4)
pt3dadd(-25, -44.5, -146, 0.4)
pt3dadd(-22.5, -47, -146, 0.4)
pt3dadd(-23, -55.5, -150.5, 0.7)
pt3dadd(-24.5, -59.5, -150.5, 0.7)
pt3dadd(-26, -64, -150.5, 0.8)
pt3dadd(-29, -67, -150.5, 0.8)
pt3dadd(-30, -71.5, -146, 0.6)
pt3dadd(-31.5, -74.5, -148.5, 0.6)
pt3dadd(-34, -76, -148.5, 0.6)
pt3dadd(-36, -78.5, -148.5, 0.6)
pt3dadd(-38.5, -80.5, -148.5, 0.7)
pt3dadd(-42, -84.5, -141.5, 1.2)
pt3dadd(-44, -86.5, -141.5, 1.1)
pt3dadd(-46, -87.5, -141.5, 0.9)
pt3dadd(-48, -89.5, -144, 0.6)
pt3dadd(-50.5, -90, -144, 0.7)
pt3dadd(-53, -92, -144, 1)
pt3dadd(-55.5, -95, -144, 1)
pt3dadd(-59, -95.5, -144, 0.6)
pt3dadd(-62.5, -97, -143.5, 1.3)
pt3dadd(-65.5, -98, -141, 0.5)
pt3dadd(-67.5, -99.5, -141, 0.7)
pt3dadd(-70.5, -102.5, -148, 0.8)
pt3dadd(-73, -106.5, -145.5, 0.7)
pt3dadd(-76, -110, -145.5, 0.7)
pt3dadd(-77, -113.5, -143.5, 0.7)
pt3dadd(-79.5, -114, -148, 0.7)
pt3dadd(-78, -117, -157, 1.1)
pt3dadd(-81, -117, -148, 0.1)
pt3dadd(-81.5, -119.5, -148, 0.1)
pt3dadd(-81, -121.5, -148, 0.2)
}
dend[198] {pt3dclear()
pt3dadd(-20.5, -40.5, -148.5, 1.7)
pt3dadd(-18.5, -36, -147, 1.5)
pt3dadd(-20, -33.5, -150.5, 1.5)
pt3dadd(-24, -34.5, -155, 2)
pt3dadd(-25.5, -37, -156.5, 2.2)
pt3dadd(-29, -36.5, -161.5, 1.8)
pt3dadd(-31, -35.5, -170.5, 2)
pt3dadd(-34.5, -33.5, -171.5, 1.6)
pt3dadd(-36.5, -31.5, -172.5, 1.6)
pt3dadd(-39, -28.5, -179, 1.1)
pt3dadd(-38.5, -31.5, -177, 1.3)
pt3dadd(-40, -33.5, -187.5, 1.3)
pt3dadd(-40.5, -29, -189, 1.2)
pt3dadd(-39.5, -23, -195, 1.6)
pt3dadd(-38, -21, -195.5, 1.6)
pt3dadd(-40.5, -19, -203, 1.2)
pt3dadd(-43.5, -18.5, -204, 1.2)
pt3dadd(-45, -16.5, -205, 1.2)
pt3dadd(-44, -13, -206.5, 1.3)
pt3dadd(-40, -11.5, -218, 1.8)
pt3dadd(-36.5, -10, -222.5, 1.5)
pt3dadd(-35, -8, -222.5, 1.3)
pt3dadd(-33, -7, -223, 1)
pt3dadd(-30, -6.5, -227.5, 0.9)
pt3dadd(-26, -2, -228.5, 0.3)
pt3dadd(-22.5, -0.5, -229, 0.3)
pt3dadd(-22, 3, -225.5, 0.8)
pt3dadd(-20.5, 5.5, -226, 0.8)
pt3dadd(-18.5, 8.5, -226.5, 0.9)
pt3dadd(-20, 10.5, -231, 0.7)
pt3dadd(-21.5, 13, -231.5, 0.8)
pt3dadd(-19, 16, -232, 0.8)
pt3dadd(-17, 17.5, -232.5, 0.8)
pt3dadd(-15, 18.5, -232.5, 0.8)
pt3dadd(-13, 20.5, -229, 1)
pt3dadd(-11, 21.5, -229.5, 1)
pt3dadd(-11, 25, -230, 1)
pt3dadd(-11, 28.5, -238.5, 1)
pt3dadd(-13, 30, -239, 1)
pt3dadd(-15.5, 29.5, -243, 0.9)
}
dend[199] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 16.8)
pt3dadd(2, -40.5, 3.5, 16.8)
pt3dadd(-39.5, -89.5, 7, 14.7)
}
dend[200] {pt3dclear()
pt3dadd(-39.5, -89.5, 7, 14.7)
pt3dadd(-56.5, -114.5, 19, 7.4)
}
dend[201] {pt3dclear()
pt3dadd(-56.5, -114.5, 19, 7.4)
pt3dadd(-60, -120, 3.5, 7.1)
pt3dadd(-66.5, -127.5, 3.5, 7.6)
pt3dadd(-68.5, -130.5, 12, 8.9)
}
dend[202] {pt3dclear()
pt3dadd(-68.5, -130.5, 12, 8.9)
pt3dadd(-68.5, -136, 10.5, 5.9)
pt3dadd(-71, -142, 12, 5.3)
pt3dadd(-75, -147, 13.5, 4.7)
pt3dadd(-85.5, -142, 12, 5.9)
pt3dadd(-87.5, -145, 17, 5.9)
pt3dadd(-86.5, -163, 15.5, 6.1)
pt3dadd(-87, -169, 17, 5)
pt3dadd(-89, -174.5, 18.5, 4.8)
pt3dadd(-91, -181, 23, 5.1)
pt3dadd(-95, -186, 27.5, 5.1)
pt3dadd(-100, -190, 29, 5)
pt3dadd(-104, -196.5, 27, 6.6)
pt3dadd(-110, -201.5, 20, 6.4)
pt3dadd(-111.5, -204.5, 23.5, 6.1)
pt3dadd(-112.5, -209.5, 25, 5.1)
pt3dadd(-118.5, -226, 12, 8.4)
}
dend[203] {pt3dclear()
pt3dadd(-118.5, -226, 12, 8.4)
pt3dadd(-122, -226, 8.5, 5.3)
pt3dadd(-124, -229, 5, 5.3)
pt3dadd(-131, -234, 6.5, 6)
pt3dadd(-135, -238.5, 2.5, 4.7)
pt3dadd(-139, -244.5, -4.5, 4)
pt3dadd(-143.5, -249, -5.5, 5)
pt3dadd(-148.5, -253.5, -6, 4.3)
pt3dadd(-149, -256.5, -6.5, 4.6)
pt3dadd(-151.5, -259, -19.5, 4.6)
pt3dadd(-153, -265.5, -14.5, 3.9)
pt3dadd(-157.5, -270.5, -15, 4.6)
pt3dadd(-161.5, -274.5, -28.5, 5.3)
pt3dadd(-165, -277.5, -20.5, 5)
pt3dadd(-168, -282.5, -15.5, 5.5)
pt3dadd(-171, -287.5, -32.5, 4.5)
pt3dadd(-175.5, -293, -25, 4.9)
pt3dadd(-188, -314.5, -45, 7.9)
}
dend[204] {pt3dclear()
pt3dadd(-188, -314.5, -45, 7.9)
pt3dadd(-186, -319, -51.5, 4.8)
pt3dadd(-186.5, -322.5, -52, 3.2)
pt3dadd(-189.5, -326, -53, 2.7)
pt3dadd(-191.5, -327.5, -53, 2.8)
pt3dadd(-193, -329.5, -53.5, 2.8)
pt3dadd(-197, -334, -61.5, 3.5)
pt3dadd(-195.5, -337, -62, 3.2)
pt3dadd(-197, -346, -63.5, 3.6)
pt3dadd(-198.5, -348, -63.5, 3.7)
pt3dadd(-199, -354.5, -71.5, 4.1)
pt3dadd(-198.5, -357, -69, 4.1)
pt3dadd(-199.5, -360.5, -72.5, 4.5)
pt3dadd(-199.5, -364.5, -70.5, 4)
pt3dadd(-200, -367, -70.5, 4.1)
}
}
proc shape3d_48() {
dend[204] { pt3dadd(-199.5, -370, -71, 4.5)
pt3dadd(-199, -379.5, -88, 5.1)
}
dend[205] {pt3dclear()
pt3dadd(-199, -379.5, -88, 5.1)
pt3dadd(-201.5, -383, -88, 1.9)
pt3dadd(-202, -386, -95.5, 2.5)
pt3dadd(-203.5, -389, -88.5, 2)
pt3dadd(-205.5, -391, -91.5, 2)
pt3dadd(-210.5, -389.5, -93.5, 1.9)
pt3dadd(-211, -392, -101, 1.6)
pt3dadd(-209, -394.5, -96.5, 2.3)
pt3dadd(-209.5, -400, -96.5, 2.3)
}
dend[206] {pt3dclear()
pt3dadd(-209.5, -400, -96.5, 2.3)
pt3dadd(-214, -400.5, -92, 0.8)
pt3dadd(-215.5, -405, -96.5, 0.8)
pt3dadd(-219, -409, -97, 0.9)
pt3dadd(-222.5, -412.5, -97, 0.9)
pt3dadd(-225.5, -415.5, -97, 0.9)
pt3dadd(-228, -418.5, -97, 0.9)
pt3dadd(-229.5, -424.5, -97, 0.8)
pt3dadd(-233, -425.5, -94.5, 0.8)
pt3dadd(-236, -425.5, -99, 0.8)
pt3dadd(-235, -428, -101.5, 0.8)
pt3dadd(-235, -431, -101.5, 0.8)
pt3dadd(-239.5, -434, -101.5, 0.8)
pt3dadd(-241.5, -437.5, -104, 0.8)
pt3dadd(-244, -439, -104, 0.8)
pt3dadd(-247, -441.5, -104, 0.7)
pt3dadd(-249, -443, -113.5, 0.7)
pt3dadd(-253, -445, -109, 0.7)
pt3dadd(-256, -445, -109, 0.7)
pt3dadd(-259, -446, -109, 0.7)
pt3dadd(-262, -450, -109, 0.7)
pt3dadd(-268, -450.5, -106.5, 0.7)
pt3dadd(-268.5, -454, -106.5, 0.7)
pt3dadd(-273, -458, -113.5, 0.7)
pt3dadd(-279, -461, -113.5, 0.7)
pt3dadd(-282.5, -461, -113.5, 0.7)
pt3dadd(-285, -463.5, -115.5, 0.7)
pt3dadd(-289.5, -463.5, -109.5, 0.7)
pt3dadd(-291.5, -465, -111.5, 0.7)
pt3dadd(-296, -469.5, -111.5, 0.7)
pt3dadd(-300, -471.5, -111.5, 0.7)
pt3dadd(-302.5, -475, -111.5, 0.7)
pt3dadd(-302.5, -478.5, -114, 0.7)
pt3dadd(-306, -478.5, -111.5, 0.7)
pt3dadd(-308, -482.5, -107, 0.1)
pt3dadd(-308, -485.5, -116, 0.1)
pt3dadd(-313.5, -491.5, -111.5, 0.1)
pt3dadd(-316.5, -494.5, -114.5, 0.1)
pt3dadd(-320, -500, -114.5, 0.1)
pt3dadd(-322.5, -500.5, -110, 0.1)
pt3dadd(-326, -504.5, -112, 0.1)
pt3dadd(-326.5, -507.5, -112, 0.1)
}
dend[207] {pt3dclear()
pt3dadd(-209.5, -400, -96.5, 2.3)
pt3dadd(-210.5, -405, -100, 1.7)
pt3dadd(-212, -409.5, -101.5, 2.1)
pt3dadd(-211.5, -412.5, -102, 2.1)
pt3dadd(-212, -415, -111, 2.6)
pt3dadd(-210, -418, -114.5, 2.6)
pt3dadd(-211, -421, -115, 2.1)
pt3dadd(-214, -421.5, -113.5, 1.8)
pt3dadd(-210, -419, -117.5, 1.7)
pt3dadd(-207, -419, -118.5, 1.7)
pt3dadd(-206, -421.5, -121, 1.7)
pt3dadd(-206, -424.5, -118, 1.7)
pt3dadd(-209, -424.5, -118.5, 1.8)
pt3dadd(-212.5, -420, -118, 2)
pt3dadd(-212.5, -416.5, -119, 2.3)
pt3dadd(-208.5, -416, -125, 2.4)
pt3dadd(-211.5, -418, -133, 2.3)
pt3dadd(-213.5, -421, -130.5, 2.7)
pt3dadd(-212.5, -423.5, -142.5, 2.3)
pt3dadd(-216, -423.5, -140, 1.3)
pt3dadd(-217, -425.5, -140.5, 1.7)
pt3dadd(-216.5, -429.5, -145.5, 1.5)
pt3dadd(-215.5, -431.5, -149.5, 1.9)
pt3dadd(-215.5, -434.5, -147, 2.2)
pt3dadd(-217.5, -436.5, -151, 1.5)
pt3dadd(-219, -438, -151.5, 1.7)
pt3dadd(-219.5, -440.5, -155.5, 2)
pt3dadd(-221, -443.5, -156, 2)
pt3dadd(-221.5, -446.5, -156.5, 1.7)
pt3dadd(-223, -448, -157, 1.5)
pt3dadd(-225, -449.5, -157.5, 0.9)
pt3dadd(-227, -450.5, -155, 0.9)
pt3dadd(-229.5, -451, -155.5, 0.8)
pt3dadd(-230.5, -453, -156, 0.8)
pt3dadd(-229, -457, -156.5, 1.1)
pt3dadd(-227.5, -458.5, -164.5, 1.2)
pt3dadd(-224.5, -461, -165.5, 1.7)
pt3dadd(-222.5, -464.5, -166, 1.9)
pt3dadd(-221, -467.5, -166.5, 2)
pt3dadd(-221, -470.5, -167, 2.2)
pt3dadd(-221.5, -475.5, -168, 1.7)
pt3dadd(-219, -478, -169, 1.7)
pt3dadd(-220.5, -480.5, -169.5, 1.7)
pt3dadd(-223.5, -482, -170, 1.9)
pt3dadd(-223.5, -485, -174.5, 1.9)
pt3dadd(-222.5, -491, -176, 2)
pt3dadd(-221, -507, -181, 1.7)
pt3dadd(-218.5, -508, -181.5, 1.7)
pt3dadd(-216, -509.5, -182.5, 1.7)
pt3dadd(-220, -510, -192, 1.7)
pt3dadd(-222, -514, -193, 1.8)
pt3dadd(-221, -517.5, -198.5, 1.8)
pt3dadd(-223, -520.5, -199.5, 2)
pt3dadd(-226.5, -523.5, -201, 2.9)
pt3dadd(-228.5, -525, -202, 2.9)
pt3dadd(-227.5, -528, -202.5, 1.9)
pt3dadd(-228.5, -530.5, -208, 1.6)
pt3dadd(-230.5, -533.5, -209.5, 1.1)
pt3dadd(-230.5, -537.5, -214.5, 1.2)
pt3dadd(-232.5, -538.5, -215.5, 1.6)
pt3dadd(-235, -540.5, -216, 0.9)
pt3dadd(-237, -543.5, -217.5, 0.9)
pt3dadd(-237, -547, -227, 1.4)
pt3dadd(-236.5, -550.5, -225, 1.5)
pt3dadd(-236.5, -554.5, -223.5, 1.7)
pt3dadd(-238.5, -563.5, -227.5, 1.1)
pt3dadd(-240.5, -566.5, -233.5, 1.2)
pt3dadd(-243.5, -566.5, -234, 1.2)
pt3dadd(-241, -567.5, -237.5, 1.1)
pt3dadd(-243, -569.5, -238.5, 1.1)
pt3dadd(-246.5, -569.5, -239.5, 1.8)
pt3dadd(-249, -572, -246, 1.3)
pt3dadd(-251.5, -572.5, -246.5, 1.3)
pt3dadd(-254, -573, -247, 1.3)
pt3dadd(-255, -575, -247.5, 1.1)
pt3dadd(-255.5, -577.5, -248, 1.1)
pt3dadd(-258.5, -576.5, -251.5, 1)
pt3dadd(-256, -580, -259, 1)
pt3dadd(-259, -580, -261.5, 1)
pt3dadd(-262, -580, -262, 0.8)
pt3dadd(-261.5, -582, -262.5, 0.3)
}
dend[208] {pt3dclear()
pt3dadd(-199, -379.5, -88, 5.1)
pt3dadd(-196, -383.5, -88.5, 2.2)
pt3dadd(-194, -387, -84.5, 2.2)
pt3dadd(-194, -390.5, -87.5, 2.5)
pt3dadd(-194.5, -394.5, -89.5, 2.5)
pt3dadd(-195, -398.5, -90, 2.5)
pt3dadd(-191, -402, -93, 3.4)
pt3dadd(-189.5, -405.5, -93, 3.4)
pt3dadd(-188, -408.5, -91, 2.3)
pt3dadd(-184, -410, -96, 2)
pt3dadd(-183, -413, -94.5, 2)
pt3dadd(-184, -415, -94.5, 2.2)
pt3dadd(-186, -417, -95, 2.2)
pt3dadd(-185, -419.5, -92.5, 2.3)
pt3dadd(-183.5, -421.5, -95.5, 2)
pt3dadd(-181.5, -423.5, -97.5, 1.9)
pt3dadd(-179, -424.5, -100.5, 1.9)
pt3dadd(-181.5, -426, -100.5, 1.7)
pt3dadd(-183, -428, -101, 1.9)
pt3dadd(-185, -430.5, -103, 1.9)
pt3dadd(-187.5, -433, -103.5, 1.7)
pt3dadd(-189, -435, -103.5, 1.4)
pt3dadd(-191, -437.5, -106.5, 1.9)
pt3dadd(-187.5, -442, -104.5, 1.8)
pt3dadd(-185.5, -444.5, -104.5, 1.9)
pt3dadd(-191, -447, -105, 1.7)
pt3dadd(-195, -451.5, -111, 1.9)
pt3dadd(-194.5, -456, -111.5, 2)
pt3dadd(-191.5, -459.5, -112, 2)
pt3dadd(-190.5, -461.5, -112, 1.7)
pt3dadd(-194, -464.5, -112.5, 1.5)
pt3dadd(-197, -466, -113, 1.9)
pt3dadd(-199.5, -467, -113, 1.9)
pt3dadd(-199.5, -470, -120, 1.9)
pt3dadd(-199.5, -473.5, -123, 2.6)
pt3dadd(-199.5, -478, -123.5, 2.5)
pt3dadd(-199, -480.5, -119.5, 1.9)
pt3dadd(-201, -483.5, -119.5, 1.9)
pt3dadd(-203, -487, -122, 1.9)
pt3dadd(-200.5, -488, -125, 1.9)
pt3dadd(-203, -491, -125.5, 2.3)
pt3dadd(-205.5, -493.5, -130.5, 2.6)
pt3dadd(-205.5, -498.5, -135.5, 2.3)
pt3dadd(-206.5, -501.5, -136.5, 2)
pt3dadd(-206.5, -505, -137, 2.5)
pt3dadd(-207.5, -509, -138, 2.5)
pt3dadd(-208, -513, -146.5, 2.5)
pt3dadd(-209.5, -515, -144, 2)
pt3dadd(-212, -516.5, -145, 2)
pt3dadd(-213.5, -519, -145.5, 2)
pt3dadd(-212, -520.5, -150, 1.9)
pt3dadd(-211.5, -523, -147.5, 1.9)
pt3dadd(-212.5, -525, -148, 1.9)
pt3dadd(-214.5, -527, -160.5, 1.7)
pt3dadd(-216, -529, -161.5, 3)
}
dend[209] {pt3dclear()
pt3dadd(-216, -529, -161.5, 3)
pt3dadd(-218, -533.5, -157, 1)
pt3dadd(-219.5, -535, -157.5, 1.3)
pt3dadd(-216.5, -542.5, -163.5, 1.3)
pt3dadd(-215.5, -545, -164, 1.3)
pt3dadd(-218, -548, -168.5, 1.3)
pt3dadd(-220, -550, -169, 1.3)
pt3dadd(-222.5, -553, -170, 1.3)
pt3dadd(-224, -558.5, -171.5, 1.3)
pt3dadd(-226.5, -560, -172, 1.3)
pt3dadd(-225.5, -564, -173, 1.3)
}
}
proc shape3d_49() {
dend[209] { pt3dadd(-225.5, -567.5, -174, 1.3)
pt3dadd(-225.5, -570.5, -175, 1.3)
pt3dadd(-229.5, -572, -175.5, 1.2)
pt3dadd(-233, -574.5, -176, 1.4)
pt3dadd(-235.5, -577.5, -176.5, 2)
pt3dadd(-235.5, -580.5, -177, 1.3)
pt3dadd(-238.5, -584, -178, 1.2)
pt3dadd(-239, -588, -182.5, 1.5)
pt3dadd(-241.5, -591, -183, 1.5)
pt3dadd(-244, -593.5, -183.5, 1.3)
pt3dadd(-246, -595.5, -184, 1.3)
pt3dadd(-246.5, -599.5, -188.5, 1.2)
pt3dadd(-247, -603, -189, 1.2)
pt3dadd(-248.5, -605, -189.5, 1)
pt3dadd(-251.5, -606.5, -190, 1.2)
pt3dadd(-251.5, -609.5, -190.5, 0.9)
pt3dadd(-252, -612.5, -199, 0.9)
pt3dadd(-251, -617, -199.5, 1.8)
pt3dadd(-255, -620, -200.5, 0.8)
pt3dadd(-255.5, -622.5, -201, 0.9)
pt3dadd(-254, -625, -206, 1.1)
pt3dadd(-254.5, -630, -206.5, 1.3)
pt3dadd(-256.5, -632, -207, 0.9)
pt3dadd(-257.5, -635.5, -207.5, 0.8)
pt3dadd(-255.5, -637.5, -208, 0.8)
pt3dadd(-253.5, -638.5, -208.5, 0.9)
pt3dadd(-255.5, -643, -209.5, 1.4)
pt3dadd(-255.5, -649, -211, 1.4)
pt3dadd(-256, -652, -215.5, 1.1)
pt3dadd(-257, -655.5, -216, 1.3)
pt3dadd(-255.5, -662, -225, 1.3)
pt3dadd(-254.5, -665.5, -228, 1.3)
pt3dadd(-255.5, -668, -228.5, 1.3)
pt3dadd(-255, -672.5, -229.5, 0.7)
pt3dadd(-257.5, -679.5, -236, 0.6)
pt3dadd(-255, -682.5, -236.5, 0.6)
pt3dadd(-255, -686, -237, 0.4)
pt3dadd(-257, -693, -240.5, 0.6)
pt3dadd(-255.5, -695.5, -244, 0.6)
pt3dadd(-257, -697.5, -244.5, 0.6)
pt3dadd(-255.5, -700, -242.5, 1.1)
pt3dadd(-257, -702.5, -248, 1.2)
pt3dadd(-259, -710, -249.5, 1)
pt3dadd(-257.5, -717, -254, 0.7)
}
dend[210] {pt3dclear()
pt3dadd(-216, -529, -161.5, 3)
pt3dadd(-219.5, -533, -163, 1.3)
pt3dadd(-227.5, -533, -163.5, 0.9)
pt3dadd(-226, -535, -167.5, 0.9)
pt3dadd(-224.5, -537.5, -172.5, 0.9)
pt3dadd(-228.5, -538.5, -174, 1.3)
pt3dadd(-230, -540.5, -175, 2.2)
pt3dadd(-233, -545.5, -180, 1.6)
pt3dadd(-235.5, -549, -175, 1.6)
pt3dadd(-238.5, -551, -176, 1.6)
pt3dadd(-240.5, -553, -189.5, 1.2)
pt3dadd(-242.5, -555.5, -190.5, 1.1)
pt3dadd(-241, -557, -191, 1.5)
pt3dadd(-243, -558, -191.5, 1.6)
pt3dadd(-246.5, -558, -196.5, 1.6)
pt3dadd(-248, -560.5, -197.5, 1.2)
pt3dadd(-249.5, -563, -198, 0.9)
pt3dadd(-246.5, -565, -203, 1.3)
pt3dadd(-244, -566, -204, 1.3)
pt3dadd(-247.5, -564.5, -209, 1.3)
pt3dadd(-250, -566, -218, 1.8)
pt3dadd(-250.5, -571, -219.5, 1.2)
pt3dadd(-254, -573.5, -225, 1.3)
pt3dadd(-257.5, -575, -225, 1.5)
pt3dadd(-259.5, -577.5, -227, 1.2)
pt3dadd(-262.5, -581, -236.5, 1.4)
pt3dadd(-263.5, -583, -244.5, 1.2)
pt3dadd(-267, -584.5, -249, 1.1)
pt3dadd(-269.5, -588, -251.5, 1.1)
pt3dadd(-267, -590.5, -253.5, 1)
pt3dadd(-268, -594.5, -261, 1.1)
pt3dadd(-268, -598.5, -263, 0.9)
pt3dadd(-266.5, -600.5, -264.5, 0.9)
pt3dadd(-269.5, -600.5, -266.5, 0.9)
pt3dadd(-272, -605, -275, 1.2)
}
dend[211] {pt3dclear()
pt3dadd(-188, -314.5, -45, 7.9)
pt3dadd(-193, -317, -45.5, 2.3)
pt3dadd(-197.5, -317.5, -43, 1.9)
pt3dadd(-200, -322, -46.5, 2.6)
pt3dadd(-202.5, -326.5, -47.5, 3.1)
pt3dadd(-203.5, -329.5, -50.5, 2.6)
pt3dadd(-205.5, -331.5, -53.5, 2.6)
pt3dadd(-209.5, -335.5, -54, 2.3)
pt3dadd(-210, -340.5, -61, 2.6)
pt3dadd(-211.5, -342.5, -61.5, 2.6)
pt3dadd(-215.5, -347.5, -62, 3.2)
pt3dadd(-219, -349, -62.5, 2.8)
pt3dadd(-221, -351.5, -62.5, 2.8)
pt3dadd(-224, -355.5, -63, 2.2)
pt3dadd(-226, -359, -63.5, 2.4)
pt3dadd(-229.5, -360.5, -67, 2.4)
pt3dadd(-232.5, -364, -64.5, 2.4)
pt3dadd(-232.5, -369, -75, 2.2)
pt3dadd(-234.5, -374, -71, 3.7)
pt3dadd(-238, -375, -76, 3.7)
pt3dadd(-240, -378, -76.5, 3.7)
pt3dadd(-242.5, -379.5, -76.5, 3.5)
pt3dadd(-244, -381.5, -77, 3.2)
pt3dadd(-245.5, -383, -77, 3.2)
pt3dadd(-250, -386, -77.5, 2.5)
pt3dadd(-252, -388.5, -78, 2.5)
pt3dadd(-254.5, -391.5, -78.5, 2.5)
pt3dadd(-256, -394.5, -79, 2.2)
pt3dadd(-258, -399, -79.5, 2.2)
pt3dadd(-259, -401, -79.5, 2.2)
pt3dadd(-259, -405.5, -82.5, 2.6)
pt3dadd(-258.5, -408.5, -85, 2)
pt3dadd(-262, -411.5, -85.5, 2.3)
pt3dadd(-264.5, -412, -85.5, 2.3)
pt3dadd(-266.5, -414, -86, 2.3)
pt3dadd(-269, -418, -86.5, 2.5)
pt3dadd(-273, -419.5, -87, 2.5)
pt3dadd(-274.5, -422.5, -87, 2.5)
pt3dadd(-276.5, -424.5, -87.5, 2)
pt3dadd(-278, -427.5, -88, 1.4)
pt3dadd(-281, -430, -88, 1.9)
pt3dadd(-284, -430, -88.5, 2.3)
pt3dadd(-286, -432, -93.5, 2.6)
pt3dadd(-289.5, -435, -94, 2.7)
pt3dadd(-291.5, -436, -92.5, 2)
pt3dadd(-295.5, -439, -95, 2)
pt3dadd(-297, -442.5, -100.5, 1.8)
pt3dadd(-297, -446.5, -101, 2.5)
pt3dadd(-299.5, -448.5, -101, 2.5)
pt3dadd(-304, -451.5, -101.5, 2.5)
pt3dadd(-307, -453, -104, 2.4)
pt3dadd(-311, -454.5, -104.5, 2)
pt3dadd(-314.5, -456.5, -105, 1.9)
pt3dadd(-316.5, -461, -108, 1.9)
pt3dadd(-319.5, -463, -108.5, 1.9)
pt3dadd(-322, -464, -108.5, 1.9)
pt3dadd(-324, -465, -109, 1.9)
pt3dadd(-325.5, -468.5, -114, 3.4)
}
dend[212] {pt3dclear()
pt3dadd(-325.5, -468.5, -114, 3.4)
pt3dadd(-324, -474.5, -115.5, 0.9)
pt3dadd(-327, -477, -112, 0.9)
pt3dadd(-328.5, -479.5, -115, 0.8)
pt3dadd(-331.5, -482.5, -115.5, 1.2)
pt3dadd(-332.5, -486.5, -116.5, 1.2)
pt3dadd(-335, -488.5, -117, 1.2)
pt3dadd(-337, -490, -117.5, 1.1)
pt3dadd(-338.5, -493, -121, 1.1)
pt3dadd(-339.5, -495, -123.5, 0.9)
pt3dadd(-341, -497.5, -118.5, 0.9)
pt3dadd(-343, -500.5, -121.5, 0.9)
pt3dadd(-344.5, -502.5, -125, 0.8)
pt3dadd(-349, -509.5, -135, 0.9)
pt3dadd(-354, -513, -138.5, 1.1)
pt3dadd(-361, -517, -136, 0.9)
pt3dadd(-362.5, -518.5, -136, 1.1)
pt3dadd(-362.5, -522.5, -136, 1.8)
pt3dadd(-366, -525.5, -133, 1.1)
pt3dadd(-368.5, -527, -133, 1.1)
pt3dadd(-371.5, -530.5, -143.5, 0.9)
pt3dadd(-374.5, -531, -140, 0.9)
pt3dadd(-377.5, -533, -140, 0.9)
pt3dadd(-381, -535.5, -140.5, 0.9)
pt3dadd(-382.5, -537.5, -140.5, 0.9)
pt3dadd(-384, -541, -140.5, 0.9)
pt3dadd(-385.5, -543.5, -144.5, 0.4)
pt3dadd(-386, -546.5, -144.5, 0.4)
pt3dadd(-388, -547.5, -144.5, 0.8)
pt3dadd(-391, -549.5, -148, 0.8)
pt3dadd(-394, -551, -151.5, 1.6)
pt3dadd(-396, -554.5, -148.5, 0.9)
pt3dadd(-397.5, -556.5, -148.5, 0.7)
pt3dadd(-399.5, -560.5, -149, 0.7)
pt3dadd(-401, -562, -149, 1.1)
pt3dadd(-404, -564.5, -149, 1.5)
pt3dadd(-405.5, -567, -149, 1.6)
pt3dadd(-410, -569, -149.5, 0.7)
pt3dadd(-413, -570, -149.5, 0.7)
pt3dadd(-415, -571.5, -150, 1.6)
pt3dadd(-417, -572.5, -146.5, 1)
pt3dadd(-417, -575.5, -157, 0.7)
pt3dadd(-418, -579.5, -150.5, 0.7)
pt3dadd(-423.5, -582, -151, 0.7)
pt3dadd(-426.5, -584, -151, 1.3)
pt3dadd(-431.5, -585.5, -151, 1.6)
pt3dadd(-434, -587, -151.5, 0.7)
pt3dadd(-436.5, -590.5, -151.5, 0.4)
pt3dadd(-439.5, -593.5, -151.5, 0.4)
pt3dadd(-442.5, -593.5, -151.5, 0.4)
pt3dadd(-446, -596.5, -152, 0.4)
pt3dadd(-448, -598, -152, 0.4)
pt3dadd(-450, -600.5, -148.5, 0.2)
pt3dadd(-453, -605.5, -152.5, 0.2)
pt3dadd(-456.5, -608, -152.5, 0.2)
pt3dadd(-460.5, -609.5, -153, 0.2)
pt3dadd(-463, -611.5, -146, 0.2)
pt3dadd(-466, -614, -156.5, 0.2)
pt3dadd(-470.5, -614.5, -156.5, 0.2)
pt3dadd(-474, -616.5, -160.5, 0.2)
pt3dadd(-480.5, -621, -151, 0.2)
pt3dadd(-484.5, -623.5, -151, 0.2)
pt3dadd(-487.5, -625.5, -151, 0.2)
}
}
proc shape3d_50() {
dend[212] { pt3dadd(-489, -630, -151.5, 0.2)
pt3dadd(-492, -630.5, -151.5, 0.2)
pt3dadd(-493.5, -633.5, -151.5, 0.2)
pt3dadd(-496.5, -637, -151.5, 0.2)
pt3dadd(-499, -639, -152, 0.2)
pt3dadd(-500, -641.5, -152, 0.2)
pt3dadd(-502, -643, -152, 0.2)
pt3dadd(-504.5, -645, -152, 0.2)
pt3dadd(-507.5, -647.5, -152.5, 0.2)
pt3dadd(-511, -651.5, -159, 0.4)
pt3dadd(-514.5, -653.5, -159.5, 0.4)
pt3dadd(-520.5, -656.5, -159.5, 0.1)
pt3dadd(-524.5, -660, -160, 0.1)
pt3dadd(-527, -660.5, -160, 0.1)
pt3dadd(-530, -662, -160, 0.1)
pt3dadd(-530.5, -664.5, -160, 1.1)
pt3dadd(-534, -666, -160, 0.1)
pt3dadd(-535, -668, -164, 0.1)
pt3dadd(-537.5, -670.5, -160.5, 0.1)
pt3dadd(-540.5, -674, -161, 0.1)
}
dend[213] {pt3dclear()
pt3dadd(-325.5, -468.5, -114, 3.4)
pt3dadd(-328.5, -470, -113.5, 2.2)
pt3dadd(-333, -470.5, -115, 2.2)
pt3dadd(-336, -473, -116.5, 2.2)
pt3dadd(-340, -473, -118.5, 1.9)
pt3dadd(-343, -473, -119.5, 1.8)
pt3dadd(-346, -475, -121, 2)
pt3dadd(-348, -477.5, -122.5, 2)
pt3dadd(-351, -482.5, -125, 2)
pt3dadd(-353, -484.5, -122.5, 2)
pt3dadd(-356, -484.5, -130.5, 2)
pt3dadd(-362.5, -489, -132, 2)
pt3dadd(-365, -491.5, -136.5, 1.9)
pt3dadd(-370, -493, -134.5, 1.9)
pt3dadd(-372, -494.5, -135, 2.2)
pt3dadd(-376, -496.5, -143, 2.2)
pt3dadd(-381, -496.5, -144, 2)
pt3dadd(-383.5, -502, -146, 1.7)
pt3dadd(-386.5, -502.5, -150, 1.5)
pt3dadd(-389.5, -502.5, -151, 1.9)
pt3dadd(-392.5, -501.5, -151.5, 2)
pt3dadd(-395.5, -501.5, -152, 2.3)
pt3dadd(-398.5, -501.5, -152.5, 2.2)
pt3dadd(-400, -499.5, -153, 1.5)
pt3dadd(-402.5, -498.5, -157.5, 1.7)
pt3dadd(-404.5, -500.5, -161.5, 2.2)
pt3dadd(-407.5, -501.5, -159.5, 2.2)
pt3dadd(-413, -501.5, -163.5, 2)
pt3dadd(-416, -500.5, -168, 2.2)
pt3dadd(-424.5, -500, -174, 2)
pt3dadd(-429, -501.5, -175, 1.6)
pt3dadd(-432.5, -503, -175.5, 2)
pt3dadd(-436, -503, -176.5, 2)
pt3dadd(-439, -503, -177, 2)
pt3dadd(-444, -503, -178.5, 1.7)
pt3dadd(-446.5, -504, -183, 1.8)
pt3dadd(-450, -507, -188, 1.8)
pt3dadd(-453, -507, -188.5, 1.8)
pt3dadd(-455, -506, -193, 2.2)
pt3dadd(-460, -506, -194.5, 2.4)
pt3dadd(-463.5, -506, -195, 1.5)
pt3dadd(-468.5, -507.5, -196.5, 1.7)
pt3dadd(-474.5, -507.5, -198, 1.3)
pt3dadd(-475.5, -509.5, -198.5, 1.3)
pt3dadd(-477, -512, -199, 1.5)
pt3dadd(-479, -513.5, -208.5, 1.3)
pt3dadd(-482, -513.5, -209, 1.6)
pt3dadd(-487.5, -513.5, -210.5, 1.8)
pt3dadd(-491, -514.5, -220, 1.6)
pt3dadd(-492.5, -519, -225, 2)
pt3dadd(-495, -521, -222.5, 1.8)
pt3dadd(-499.5, -523.5, -225, 2.2)
pt3dadd(-503.5, -525.5, -228, 1.1)
pt3dadd(-505.5, -527, -228.5, 1.3)
pt3dadd(-507.5, -528.5, -229, 1.3)
pt3dadd(-511.5, -532, -233, 1.2)
pt3dadd(-514, -533.5, -233.5, 1)
pt3dadd(-516.5, -535, -234.5, 1.2)
pt3dadd(-520, -536.5, -235, 1.2)
pt3dadd(-525, -539.5, -236.5, 0.9)
pt3dadd(-526, -541.5, -237, 1)
pt3dadd(-529, -543.5, -238, 1.1)
pt3dadd(-530.5, -545, -246, 1.1)
pt3dadd(-532.5, -547, -247, 1.2)
pt3dadd(-536, -552, -251, 1.1)
pt3dadd(-542.5, -550, -253, 0.6)
pt3dadd(-545.5, -551.5, -254, 0.8)
pt3dadd(-549, -556.5, -255.5, 1.4)
pt3dadd(-552, -557.5, -256.5, 1.1)
pt3dadd(-570, -563.5, -271, 0.7)
pt3dadd(-573, -565, -271.5, 0.8)
pt3dadd(-577.5, -566.5, -272.5, 0.8)
pt3dadd(-581.5, -570.5, -274, 1.3)
pt3dadd(-583.5, -573, -275, 1.3)
pt3dadd(-589, -577, -276.5, 0.9)
pt3dadd(-593, -577.5, -277, 1)
pt3dadd(-595.5, -580, -278, 1.4)
pt3dadd(-598.5, -581.5, -278.5, 1.4)
pt3dadd(-601, -583, -279.5, 1.4)
pt3dadd(-603, -586.5, -280.5, 1.6)
pt3dadd(-607.5, -590, -281.5, 1.3)
pt3dadd(-610.5, -590, -282.5, 1.3)
pt3dadd(-614, -592.5, -283.5, 1.3)
pt3dadd(-617, -594.5, -284.5, 1.3)
pt3dadd(-619, -597.5, -289.5, 1.4)
pt3dadd(-622.5, -598.5, -294.5, 1.4)
pt3dadd(-626.5, -600, -292, 1.4)
pt3dadd(-631.5, -600, -293, 1.9)
pt3dadd(-634.5, -601.5, -294, 1.7)
pt3dadd(-637.5, -603.5, -295, 1)
pt3dadd(-639, -607.5, -296, 0.8)
pt3dadd(-642.5, -608, -296.5, 1.1)
pt3dadd(-645.5, -608.5, -301.5, 1.5)
pt3dadd(-649.5, -609, -302.5, 1.3)
pt3dadd(-655.5, -611, -309, 1.3)
pt3dadd(-660, -615, -310.5, 1)
pt3dadd(-665, -616, -320.5, 2.1)
pt3dadd(-667.5, -617, -314.5, 1.4)
pt3dadd(-673, -617, -325, 1.2)
}
dend[214] {pt3dclear()
pt3dadd(-118.5, -226, 12, 8.4)
pt3dadd(-118.5, -234.5, 23, 3.1)
pt3dadd(-118, -237, 25, 3.6)
pt3dadd(-120, -242.5, 28.5, 2.9)
pt3dadd(-121.5, -249.5, 25.5, 3.7)
pt3dadd(-123.5, -257, 25.5, 2.8)
pt3dadd(-124.5, -260.5, 25.5, 2.8)
pt3dadd(-125.5, -268.5, 31, 2.2)
pt3dadd(-127, -270.5, 31, 3)
pt3dadd(-128.5, -274, 34.5, 2.7)
pt3dadd(-127, -277, 34.5, 2.9)
pt3dadd(-128.5, -282.5, 37, 2.5)
pt3dadd(-130, -285.5, 34.5, 2.7)
pt3dadd(-133, -292.5, 37, 2.5)
pt3dadd(-133, -296.5, 37, 2.4)
pt3dadd(-134.5, -301, 31.5, 2.2)
pt3dadd(-137, -308, 29.5, 2.8)
pt3dadd(-139.5, -313, 32, 2.3)
pt3dadd(-143.5, -319.5, 29.5, 2.3)
pt3dadd(-146, -321.5, 29.5, 2.7)
pt3dadd(-150.5, -323, 29.5, 2.3)
pt3dadd(-153.5, -327.5, 29.5, 2.7)
pt3dadd(-157.5, -330.5, 29.5, 2.3)
pt3dadd(-158, -333.5, 30, 2.7)
pt3dadd(-158, -337, 24.5, 2.7)
pt3dadd(-163, -343.5, 27, 2.5)
pt3dadd(-166, -347, 27, 2.3)
pt3dadd(-169, -349, 32.5, 2.5)
pt3dadd(-174, -349.5, 32.5, 1.9)
pt3dadd(-175, -353.5, 33, 1.9)
pt3dadd(-181, -360.5, 36, 2.1)
pt3dadd(-181.5, -363.5, 38.5, 1.8)
pt3dadd(-185.5, -367, 38.5, 1.8)
pt3dadd(-189.5, -370.5, 38.5, 2.3)
pt3dadd(-192.5, -374.5, 36, 2)
pt3dadd(-191.5, -381, 33.5, 2.1)
pt3dadd(-194, -382.5, 39, 2.1)
pt3dadd(-197, -383.5, 42, 2.3)
pt3dadd(-198.5, -386, 33.5, 1.8)
pt3dadd(-202, -391, 36.5, 2.3)
pt3dadd(-207.5, -396.5, 39, 1.9)
pt3dadd(-207, -400.5, 28.5, 2)
pt3dadd(-207.5, -404, 31.5, 1.8)
pt3dadd(-210.5, -407, 26, 2.2)
pt3dadd(-216, -410.5, 45, 1.7)
pt3dadd(-219.5, -413, 40, 1.9)
pt3dadd(-224, -415, 34.5, 1.9)
pt3dadd(-227.5, -420.5, 34.5, 1.8)
pt3dadd(-228, -425.5, 34.5, 2.3)
pt3dadd(-230, -430, 34.5, 2.5)
pt3dadd(-233.5, -431.5, 34.5, 2.2)
pt3dadd(-234.5, -434.5, 34.5, 1.9)
pt3dadd(-240.5, -437.5, 40.5, 1.7)
pt3dadd(-241.5, -441, 40.5, 2.2)
pt3dadd(-243, -446, 40.5, 2.2)
pt3dadd(-244.5, -448.5, 43.5, 1.8)
pt3dadd(-244.5, -453, 35, 1.3)
pt3dadd(-251.5, -469, 38.5, 1.6)
pt3dadd(-251.5, -473, 38.5, 1.6)
pt3dadd(-252, -475.5, 38.5, 1.6)
pt3dadd(-250.5, -478.5, 35.5, 1.6)
pt3dadd(-249.5, -480.5, 35.5, 1.8)
pt3dadd(-249.5, -483.5, 30, 1.3)
pt3dadd(-253, -487.5, 30, 2)
pt3dadd(-253, -492, 30, 2.3)
pt3dadd(-254.5, -496.5, 33, 2.2)
pt3dadd(-254.5, -502.5, 36, 2.1)
pt3dadd(-255.5, -506.5, 30.5, 2.3)
pt3dadd(-256.5, -509.5, 33.5, 1.3)
pt3dadd(-256, -513, 30.5, 1.6)
pt3dadd(-255, -515.5, 36, 1.6)
pt3dadd(-254, -517.5, 25, 1.3)
pt3dadd(-254, -522, 24.5, 1.6)
pt3dadd(-254.5, -530.5, 25.5, 1.6)
pt3dadd(-258, -542, 7, 2.5)
pt3dadd(-260, -547.5, 13, 1.5)
pt3dadd(-260.5, -553.5, 12, 1.8)
pt3dadd(-257.5, -557, 11.5, 1.7)
pt3dadd(-254, -557.5, 13.5, 1.8)
pt3dadd(-257.5, -559, 9.5, 2.2)
pt3dadd(-259, -562.5, 9, 2.2)
}
}
proc shape3d_51() {
dend[214] { pt3dadd(-260.5, -572.5, -5.5, 2.6)
pt3dadd(-260.5, -578, -9.5, 2.8)
}
dend[215] {pt3dclear()
pt3dadd(-260.5, -578, -9.5, 2.8)
pt3dadd(-260.5, -582, -9.5, 2.2)
pt3dadd(-262, -585, 2, 1.6)
pt3dadd(-263, -588, -6.5, 1.1)
pt3dadd(-264, -590, 8, 0.9)
pt3dadd(-266, -591.5, 5, 0.6)
pt3dadd(-269.5, -594.5, 2, 0.8)
pt3dadd(-272, -596, 2, 0.8)
pt3dadd(-274.5, -598, 1.5, 0.8)
pt3dadd(-279, -600.5, 1.5, 1.1)
pt3dadd(-281.5, -602.5, 1.5, 1.5)
pt3dadd(-283.5, -604.5, 1.5, 1)
pt3dadd(-286, -606, 4.5, 1)
pt3dadd(-289.5, -606.5, 4.5, 1.2)
pt3dadd(-292.5, -607, 4.5, 0.7)
pt3dadd(-294.5, -609, 4.5, 0.9)
pt3dadd(-296.5, -612, 1.5, 0.9)
pt3dadd(-298.5, -618.5, 4.5, 1.1)
pt3dadd(-301.5, -620.5, 1.5, 1.1)
pt3dadd(-305, -623, 4.5, 1.1)
pt3dadd(-311, -626.5, 7.5, 0.8)
pt3dadd(-316.5, -630, 10.5, 0.9)
pt3dadd(-322, -632.5, 7.5, 0.9)
pt3dadd(-326.5, -633.5, 4.5, 0.7)
pt3dadd(-328.5, -635, 1.5, 0.9)
pt3dadd(-337.5, -642, 4.5, 0.4)
pt3dadd(-340, -645, 1.5, 0.4)
pt3dadd(-344, -645, 1.5, 0.5)
pt3dadd(-347.5, -645, 1.5, 0.5)
pt3dadd(-351, -647, -1.5, 0.6)
pt3dadd(-354, -648.5, 1.5, 0.7)
pt3dadd(-357.5, -650, 1.5, 0.7)
pt3dadd(-360, -653.5, 4.5, 0.7)
pt3dadd(-364.5, -653.5, 4.5, 0.6)
pt3dadd(-369, -655, -1.5, 0.6)
pt3dadd(-373.5, -655.5, -4, 0.6)
pt3dadd(-380, -659.5, -1.5, 0.6)
pt3dadd(-384.5, -663.5, -1.5, 0.7)
pt3dadd(-388, -665, -1.5, 0.7)
pt3dadd(-390.5, -665.5, -1.5, 0.7)
pt3dadd(-392.5, -668, -1.5, 1.1)
pt3dadd(-394, -671, -1.5, 1.1)
pt3dadd(-398, -672.5, 1.5, 1.1)
pt3dadd(-402.5, -672.5, 1, 1.1)
pt3dadd(-405.5, -671.5, -4.5, 0.3)
pt3dadd(-409.5, -673, -4.5, 0.3)
pt3dadd(-412, -674.5, -4.5, 1.3)
pt3dadd(-416, -673, -7.5, 0.7)
pt3dadd(-419.5, -674.5, -7.5, 0.7)
pt3dadd(-422.5, -676.5, -10.5, 0.9)
pt3dadd(-426, -679, -7.5, 1.3)
pt3dadd(-430, -679, -4.5, 1)
pt3dadd(-433.5, -679, -13.5, 0.6)
pt3dadd(-435, -683.5, -13.5, 0.5)
pt3dadd(-439.5, -686, -13.5, 0.5)
pt3dadd(-442, -686.5, -13.5, 0.5)
pt3dadd(-445, -686.5, -13.5, 0.5)
pt3dadd(-450, -690.5, -13.5, 0.5)
pt3dadd(-453, -690.5, -13.5, 0.5)
pt3dadd(-456.5, -690.5, -10.5, 0.5)
pt3dadd(-460, -693, -16.5, 0.5)
pt3dadd(-465, -697, -10.5, 0.9)
pt3dadd(-469.5, -699, -10.5, 0.4)
pt3dadd(-474, -704.5, -7.5, 0.3)
pt3dadd(-474, -709.5, -7.5, 0.3)
}
dend[216] {pt3dclear()
pt3dadd(-260.5, -578, -9.5, 2.8)
pt3dadd(-257, -581.5, -6.5, 0.1)
pt3dadd(-257, -584.5, -6.5, 0.1)
pt3dadd(-260, -590.5, -6.5, 0.1)
pt3dadd(-263, -593, -3.5, 0.1)
pt3dadd(-260, -596, -6.5, 0.1)
pt3dadd(-259.5, -600, -6.5, 0.1)
pt3dadd(-260.5, -605.5, -7, 0.1)
pt3dadd(-263, -608, -7, 0.1)
pt3dadd(-262.5, -611.5, -7, 0.1)
pt3dadd(-261, -613, -7, 0.1)
pt3dadd(-261.5, -623, -7, 0.1)
pt3dadd(-259.5, -625, -4, 0.1)
pt3dadd(-260.5, -634, -4, 0.1)
pt3dadd(-260.5, -639, -4, 0.1)
pt3dadd(-259.5, -642, -1.5, 0.1)
pt3dadd(-261.5, -645, 1.5, 0.1)
pt3dadd(-264.5, -647, 1.5, 0.1)
pt3dadd(-264.5, -650.5, -10, 0.1)
pt3dadd(-265, -654.5, -10, 0.1)
}
dend[217] {pt3dclear()
pt3dadd(-68.5, -130.5, 12, 8.9)
pt3dadd(-74.5, -132.5, 19.5, 4.4)
pt3dadd(-89, -140, 21.5, 4.4)
pt3dadd(-92, -140, 28.5, 3.5)
pt3dadd(-93.5, -139, 25, 2.5)
pt3dadd(-95, -142, 23, 4.3)
pt3dadd(-96.5, -145.5, 23.5, 3.7)
pt3dadd(-102, -149, 27, 4.5)
pt3dadd(-104.5, -152, 35, 4.7)
pt3dadd(-108, -155.5, 35.5, 5.1)
pt3dadd(-111, -159.5, 30, 5.7)
pt3dadd(-116, -161.5, 28.5, 5.3)
pt3dadd(-123, -167, 35, 5.9)
pt3dadd(-128.5, -171, 39, 6.4)
pt3dadd(-134, -177, 45.5, 5.8)
pt3dadd(-138.5, -182, 44, 5.9)
pt3dadd(-143, -188, 48, 6.2)
pt3dadd(-147, -191, 49, 7.1)
}
dend[218] {pt3dclear()
pt3dadd(-147, -191, 49, 7.1)
pt3dadd(-152.5, -191, 50, 4)
pt3dadd(-156, -192.5, 50.5, 4)
pt3dadd(-161.5, -194.5, 51.5, 3.9)
pt3dadd(-170.5, -199, 58.5, 4.3)
pt3dadd(-178.5, -201, 55.5, 3.9)
pt3dadd(-184, -204, 54.5, 3.7)
pt3dadd(-188.5, -206, 55.5, 4.4)
pt3dadd(-193, -211.5, 59, 3.9)
pt3dadd(-197, -215, 60, 3.6)
pt3dadd(-201, -219, 61, 3.2)
pt3dadd(-204, -222, 64, 3.9)
pt3dadd(-210.5, -229, 70.5, 4)
pt3dadd(-214, -229.5, 71, 3.4)
pt3dadd(-221, -232.5, 70, 3.5)
pt3dadd(-226.5, -235.5, 74, 3)
pt3dadd(-230, -237, 75, 2.8)
pt3dadd(-236, -239.5, 78, 4.4)
pt3dadd(-239, -241.5, 82, 3.3)
pt3dadd(-242.5, -246.5, 83.5, 3.5)
pt3dadd(-249.5, -249.5, 84.5, 3.2)
pt3dadd(-250.5, -251.5, 85, 3.4)
pt3dadd(-254.5, -256, 88.5, 3.2)
pt3dadd(-256.5, -260, 89, 3.2)
pt3dadd(-259.5, -262.5, 89.5, 3.8)
pt3dadd(-264.5, -264, 94.5, 3.2)
pt3dadd(-273.5, -263.5, 99, 3.5)
pt3dadd(-282.5, -269.5, 112.5, 3.7)
pt3dadd(-286.5, -275.5, 111, 4.5)
pt3dadd(-288.5, -277, 114.5, 5.4)
pt3dadd(-291, -280.5, 112, 6.4)
}
dend[219] {pt3dclear()
pt3dadd(-291, -280.5, 112, 6.4)
pt3dadd(-295.5, -279, 110, 2.7)
pt3dadd(-306, -279, 111, 2.2)
pt3dadd(-308, -277, 111.5, 1.9)
pt3dadd(-310.5, -275.5, 114, 1.6)
pt3dadd(-313.5, -275.5, 114.5, 1.6)
pt3dadd(-316, -277.5, 115, 1.6)
pt3dadd(-324, -281.5, 115.5, 1.5)
pt3dadd(-328, -281.5, 116, 1.8)
pt3dadd(-331, -280, 116.5, 2)
pt3dadd(-336.5, -277.5, 114.5, 2)
pt3dadd(-341.5, -277.5, 115, 1.7)
pt3dadd(-347, -279, 115.5, 1.8)
pt3dadd(-349.5, -281, 116, 2.5)
pt3dadd(-353.5, -282.5, 116.5, 2.2)
pt3dadd(-357.5, -284, 117, 2.3)
pt3dadd(-362, -284.5, 117, 2.2)
pt3dadd(-366.5, -286.5, 120.5, 1.9)
pt3dadd(-370.5, -288, 121, 1.7)
pt3dadd(-373, -289.5, 124, 1.7)
pt3dadd(-375.5, -291, 124.5, 1.7)
pt3dadd(-377.5, -293, 125, 1.8)
pt3dadd(-381, -296, 128.5, 1.6)
pt3dadd(-383.5, -298, 128.5, 2.2)
pt3dadd(-386, -298.5, 129, 2.5)
pt3dadd(-391.5, -300, 127, 2.1)
pt3dadd(-393.5, -301, 127.5, 2.1)
pt3dadd(-399, -303, 128, 2.4)
pt3dadd(-401.5, -303.5, 131, 2.1)
pt3dadd(-405.5, -306.5, 135.5, 1.7)
pt3dadd(-408.5, -306.5, 135.5, 1.6)
pt3dadd(-410, -308, 130, 1.5)
pt3dadd(-412.5, -310, 133.5, 1.5)
pt3dadd(-414.5, -311, 133.5, 1.5)
pt3dadd(-423.5, -315, 138, 1.9)
pt3dadd(-426.5, -318.5, 138.5, 1.7)
pt3dadd(-431, -321, 139, 2)
pt3dadd(-435.5, -323.5, 136.5, 1.9)
pt3dadd(-438.5, -325, 140.5, 2)
pt3dadd(-445.5, -328.5, 144.5, 1.4)
pt3dadd(-447.5, -331, 138.5, 1.3)
pt3dadd(-451.5, -333.5, 142.5, 1.3)
pt3dadd(-460.5, -335.5, 147, 1.7)
pt3dadd(-466, -337.5, 151, 1.3)
pt3dadd(-468, -340.5, 151, 1.2)
pt3dadd(-473.5, -345, 155.5, 1.3)
pt3dadd(-477.5, -345, 149.5, 1.3)
pt3dadd(-480, -344, 150, 1.3)
pt3dadd(-481.5, -345.5, 153.5, 1.3)
pt3dadd(-483, -348.5, 153.5, 1.5)
pt3dadd(-487.5, -355.5, 152, 1.4)
pt3dadd(-490.5, -357, 155.5, 1.3)
pt3dadd(-493.5, -362, 156, 1.3)
pt3dadd(-494.5, -364.5, 156.5, 0.9)
pt3dadd(-497, -365.5, 156.5, 1.4)
pt3dadd(-506, -369.5, 157.5, 1.6)
pt3dadd(-511.5, -373.5, 155.5, 1.4)
pt3dadd(-513.5, -376, 159, 1.5)
pt3dadd(-516, -378.5, 157, 1.2)
pt3dadd(-518, -382.5, 157.5, 1.2)
pt3dadd(-521, -385, 158, 1)
pt3dadd(-528, -388.5, 158.5, 1.9)
pt3dadd(-529.5, -390.5, 159, 1.2)
pt3dadd(-531, -392, 159, 0.8)
}
}
proc shape3d_52() {
dend[219] { pt3dadd(-532.5, -393.5, 162.5, 0.9)
pt3dadd(-537.5, -393.5, 163, 1.1)
pt3dadd(-541, -393.5, 163, 1.1)
pt3dadd(-542, -397.5, 163.5, 1.5)
pt3dadd(-543.5, -400, 167.5, 1.3)
pt3dadd(-545.5, -401.5, 168, 0.8)
pt3dadd(-547, -405.5, 165.5, 0.8)
pt3dadd(-549, -408, 166, 0.8)
pt3dadd(-552, -410, 170.5, 1.4)
pt3dadd(-555, -412, 174.5, 1.8)
pt3dadd(-558.5, -414.5, 175, 1.7)
pt3dadd(-562.5, -418.5, 172, 0.9)
pt3dadd(-565.5, -420, 175, 0.9)
pt3dadd(-566, -423.5, 175, 0.9)
pt3dadd(-571.5, -424, 175, 2.8)
pt3dadd(-574.5, -424.5, 175, 1.8)
pt3dadd(-578, -427.5, 178, 0.8)
pt3dadd(-582, -429, 180.5, 0.8)
pt3dadd(-583.5, -430.5, 180.5, 1.1)
pt3dadd(-586, -433, 178, 1.5)
pt3dadd(-591.5, -436.5, 178, 1.4)
pt3dadd(-594.5, -439, 178, 1)
pt3dadd(-596.5, -440, 178.5, 0.7)
pt3dadd(-600, -440.5, 178.5, 0.7)
pt3dadd(-603.5, -441.5, 178.5, 0.9)
pt3dadd(-607, -440.5, 183.5, 1.2)
pt3dadd(-609, -439, 181, 0.7)
pt3dadd(-611.5, -438.5, 181, 0.4)
pt3dadd(-613, -441, 187, 0.4)
pt3dadd(-614.5, -444, 187, 0.6)
pt3dadd(-617.5, -444, 187, 0.6)
pt3dadd(-621.5, -444.5, 187, 0.9)
pt3dadd(-623.5, -446.5, 184, 0.5)
pt3dadd(-626.5, -447, 184.5, 0.6)
pt3dadd(-627.5, -450, 184.5, 0.7)
pt3dadd(-628.5, -452, 187.5, 0.7)
pt3dadd(-631.5, -455.5, 192.5, 1.7)
pt3dadd(-634, -458.5, 195.5, 0.7)
pt3dadd(-636.5, -460.5, 195.5, 0.7)
pt3dadd(-639.5, -463, 193, 0.7)
pt3dadd(-642, -464.5, 193, 0.7)
pt3dadd(-643.5, -466.5, 193, 0.9)
pt3dadd(-646, -469.5, 195.5, 0.5)
pt3dadd(-647, -473, 188.5, 0.3)
pt3dadd(-647.5, -475.5, 188.5, 0.3)
pt3dadd(-648.5, -477.5, 188.5, 1.6)
pt3dadd(-654, -482, 185.5, 1.6)
pt3dadd(-658, -482, 185.5, 2)
pt3dadd(-660, -483, 185.5, 2)
pt3dadd(-663, -483.5, 185.5, 1)
pt3dadd(-668, -486.5, 186, 0.7)
pt3dadd(-669.5, -490, 186, 0.7)
pt3dadd(-671, -493, 194, 0.7)
pt3dadd(-674, -497, 194, 0.7)
pt3dadd(-675.5, -500, 194, 0.7)
pt3dadd(-678, -503.5, 194.5, 0.7)
pt3dadd(-682, -508, 194.5, 0.7)
pt3dadd(-682.5, -511.5, 194.5, 0.7)
pt3dadd(-684.5, -513.5, 194.5, 0.7)
pt3dadd(-687, -516, 194.5, 0.7)
pt3dadd(-685, -520.5, 192, 0.7)
pt3dadd(-684.5, -523, 184.5, 0.7)
pt3dadd(-685, -526, 195, 0.9)
pt3dadd(-688, -528.5, 195, 0.8)
pt3dadd(-690.5, -532, 190.5, 1.2)
pt3dadd(-692.5, -534, 190.5, 0.7)
pt3dadd(-694.5, -535.5, 190.5, 0.7)
pt3dadd(-696, -537.5, 190.5, 0.7)
pt3dadd(-699.5, -540, 190.5, 0.7)
pt3dadd(-703, -542.5, 190.5, 0.9)
pt3dadd(-706, -545.5, 193, 1.3)
pt3dadd(-708.5, -546.5, 191, 0.7)
pt3dadd(-712.5, -550, 191, 0.7)
pt3dadd(-716, -550.5, 191, 0.6)
pt3dadd(-718.5, -551, 191, 0.8)
pt3dadd(-720.5, -552.5, 193.5, 1.2)
pt3dadd(-722.5, -555, 193.5, 0.7)
pt3dadd(-727, -555.5, 191, 0.7)
pt3dadd(-728, -559, 191.5, 0.7)
pt3dadd(-730.5, -562, 191.5, 0.7)
pt3dadd(-733, -565, 186.5, 1.4)
pt3dadd(-735.5, -569.5, 186.5, 0.8)
pt3dadd(-738, -570.5, 189, 0.5)
pt3dadd(-740, -576, 189, 0.8)
pt3dadd(-742.5, -578.5, 189, 0.8)
pt3dadd(-744.5, -581, 189, 1.1)
pt3dadd(-746.5, -583, 192.5, 1.9)
pt3dadd(-747, -585.5, 187, 0.9)
pt3dadd(-749, -586.5, 189.5, 0.7)
pt3dadd(-750.5, -589.5, 189.5, 0.4)
pt3dadd(-752, -592.5, 189.5, 0.4)
pt3dadd(-754, -593.5, 189.5, 0.4)
pt3dadd(-756.5, -595.5, 189.5, 0.4)
pt3dadd(-759.5, -598, 190, 0.4)
pt3dadd(-764, -597.5, 190, 0.4)
pt3dadd(-768, -597, 190, 0.4)
pt3dadd(-770.5, -599.5, 187.5, 0.4)
pt3dadd(-778, -598.5, 187.5, 0.4)
pt3dadd(-781.5, -599, 185.5, 0.4)
pt3dadd(-783, -602, 193.5, 0.4)
pt3dadd(-787, -602.5, 193.5, 0.4)
pt3dadd(-792, -604, 193.5, 0.4)
pt3dadd(-795.5, -607, 190.5, 0.4)
pt3dadd(-799.5, -606.5, 194, 1.1)
pt3dadd(-800, -611, 194, 0.3)
pt3dadd(-799, -614, 188.5, 1.1)
pt3dadd(-800.5, -618.5, 188.5, 0.2)
pt3dadd(-800.5, -621.5, 188.5, 0.2)
pt3dadd(-801.5, -623.5, 189, 0.2)
pt3dadd(-803, -625, 189, 0.2)
pt3dadd(-806, -627, 189, 1)
pt3dadd(-806, -630.5, 189, 0.2)
pt3dadd(-808.5, -633, 189, 0.4)
pt3dadd(-809, -635.5, 184, 1)
pt3dadd(-808.5, -639.5, 186.5, 0.1)
pt3dadd(-811, -640.5, 187, 1.2)
pt3dadd(-812, -643, 187, 0.7)
pt3dadd(-813, -646, 187, 0.7)
pt3dadd(-814, -649, 184.5, 1)
pt3dadd(-816, -650.5, 184.5, 0.6)
pt3dadd(-819, -652, 187, 0.7)
pt3dadd(-822, -654.5, 187, 0.7)
pt3dadd(-823, -657.5, 187, 1.2)
pt3dadd(-823.5, -660, 187.5, 0.8)
pt3dadd(-826.5, -661.5, 187.5, 0.4)
pt3dadd(-828, -664.5, 185, 0.1)
pt3dadd(-829.5, -667, 187.5, 0.1)
}
dend[220] {pt3dclear()
pt3dadd(-291, -280.5, 112, 6.4)
pt3dadd(-295, -290, 125, 3.5)
pt3dadd(-295.5, -292.5, 125.5, 2.8)
pt3dadd(-299, -299, 132.5, 2.8)
pt3dadd(-301.5, -300, 133, 3.1)
pt3dadd(-310, -298, 133, 4.1)
pt3dadd(-310.5, -301, 134, 3.4)
pt3dadd(-312, -303.5, 138, 3.1)
pt3dadd(-316.5, -307.5, 144, 2.5)
pt3dadd(-320, -310, 153, 2.9)
pt3dadd(-325.5, -312.5, 155, 3.4)
pt3dadd(-329, -318.5, 157, 3.5)
pt3dadd(-334.5, -322, 160, 3.8)
pt3dadd(-341, -327, 166, 3.5)
pt3dadd(-343.5, -328.5, 161.5, 3.7)
pt3dadd(-345, -331, 175, 3.7)
pt3dadd(-349, -337.5, 178.5, 3.7)
pt3dadd(-352, -340, 179, 3.7)
pt3dadd(-359, -345, 180.5, 2.8)
pt3dadd(-362, -348, 181.5, 2.8)
pt3dadd(-364, -349.5, 182, 2.3)
pt3dadd(-366.5, -352.5, 182.5, 2.2)
pt3dadd(-367.5, -354.5, 183, 2.2)
pt3dadd(-369.5, -358, 189, 2.7)
pt3dadd(-372.5, -362, 189.5, 2.5)
pt3dadd(-375, -362.5, 193.5, 2.5)
pt3dadd(-378, -364.5, 194, 2.6)
pt3dadd(-383, -368, 197.5, 2.6)
pt3dadd(-386, -370, 196, 3)
pt3dadd(-387.5, -373.5, 199, 2.9)
pt3dadd(-390.5, -376.5, 199.5, 2.5)
pt3dadd(-394, -380.5, 203.5, 2.1)
pt3dadd(-395.5, -383, 204, 2.1)
pt3dadd(-401, -390, 205.5, 3)
pt3dadd(-405.5, -390.5, 206, 2.5)
pt3dadd(-408.5, -390.5, 206.5, 2.7)
pt3dadd(-413, -392.5, 207.5, 2.4)
pt3dadd(-415.5, -395.5, 208, 2.2)
pt3dadd(-418.5, -397, 208.5, 2.2)
pt3dadd(-425.5, -400, 210, 2.7)
pt3dadd(-431.5, -401, 213.5, 2.5)
pt3dadd(-436, -402.5, 214.5, 2.8)
pt3dadd(-438.5, -403.5, 212.5, 3.5)
pt3dadd(-444.5, -404.5, 216, 2.5)
pt3dadd(-447, -405, 219.5, 2.5)
pt3dadd(-451, -407.5, 220.5, 2.5)
pt3dadd(-453.5, -410.5, 221, 3)
pt3dadd(-455.5, -414, 224.5, 2.9)
pt3dadd(-457, -415.5, 225, 2.9)
pt3dadd(-459.5, -417, 229, 2)
pt3dadd(-465.5, -421, 226.5, 2.7)
pt3dadd(-467, -423, 226.5, 2.1)
pt3dadd(-468.5, -425, 230.5, 1.9)
pt3dadd(-471.5, -427, 231, 2.3)
pt3dadd(-477, -429.5, 232, 2.9)
pt3dadd(-479.5, -431, 232, 2.9)
pt3dadd(-480.5, -435, 236.5, 2.5)
pt3dadd(-482, -439, 238, 2.7)
pt3dadd(-482.5, -441.5, 235, 2.6)
pt3dadd(-482, -450.5, 241, 1.4)
pt3dadd(-484.5, -451, 241.5, 1.8)
pt3dadd(-487.5, -450, 250, 2.2)
pt3dadd(-492, -452, 250.5, 2)
pt3dadd(-497.5, -455.5, 251, 1.8)
pt3dadd(-504.5, -461.5, 261.5, 1.8)
pt3dadd(-510, -465.5, 260, 1.5)
pt3dadd(-514.5, -467, 264.5, 1.4)
pt3dadd(-519.5, -474, 271, 1.8)
pt3dadd(-520.5, -476, 264.5, 2.1)
pt3dadd(-525, -479.5, 269, 2.3)
pt3dadd(-526.5, -481.5, 269.5, 2.6)
pt3dadd(-530.5, -486, 274, 2.6)
pt3dadd(-531.5, -488.5, 274, 2.6)
}
}
proc shape3d_53() {
dend[220] { pt3dadd(-533.5, -490.5, 274.5, 2.6)
pt3dadd(-535, -492.5, 275, 2.3)
pt3dadd(-536.5, -498, 281, 2.2)
pt3dadd(-539.5, -499.5, 281.5, 2.3)
pt3dadd(-544.5, -503, 282, 2.1)
pt3dadd(-547.5, -503.5, 282, 2.6)
pt3dadd(-552, -503.5, 282.5, 2.5)
pt3dadd(-554, -504.5, 289, 1.8)
pt3dadd(-558.5, -508, 289.5, 2.2)
pt3dadd(-561.5, -510.5, 286.5, 2)
pt3dadd(-563.5, -513, 286.5, 2)
pt3dadd(-565.5, -520, 284, 1.9)
pt3dadd(-570.5, -521.5, 288, 1.5)
pt3dadd(-576, -522.5, 282.5, 1.5)
pt3dadd(-577, -526.5, 292.5, 1.6)
pt3dadd(-578.5, -528, 292.5, 1.9)
pt3dadd(-581.5, -529.5, 293, 1.9)
pt3dadd(-589.5, -537.5, 299.5, 1.7)
pt3dadd(-592.5, -538, 300, 1.7)
pt3dadd(-597, -539.5, 300, 1.6)
pt3dadd(-602, -543, 303.5, 1.8)
pt3dadd(-610, -548.5, 292.5, 1.5)
pt3dadd(-612, -549.5, 299.5, 0.9)
pt3dadd(-614, -552, 299.5, 1.5)
pt3dadd(-615.5, -554.5, 300, 2)
pt3dadd(-617, -557.5, 300, 2.2)
pt3dadd(-619, -561.5, 300.5, 2)
pt3dadd(-621.5, -564.5, 300.5, 1.3)
pt3dadd(-622.5, -567, 304, 2)
pt3dadd(-624, -571, 301, 2.7)
pt3dadd(-626.5, -573.5, 304.5, 2.5)
pt3dadd(-629.5, -577.5, 304.5, 2.3)
pt3dadd(-640, -585.5, 299.5, 1.1)
pt3dadd(-643, -586.5, 300, 1.2)
pt3dadd(-645, -588, 300, 1.4)
pt3dadd(-646, -590, 300, 1.9)
pt3dadd(-652, -592.5, 300.5, 1.7)
pt3dadd(-654, -594.5, 300.5, 1.8)
pt3dadd(-655.5, -596.5, 304, 1.8)
pt3dadd(-658, -597.5, 304, 1.6)
pt3dadd(-663.5, -596, 302, 0.8)
pt3dadd(-664.5, -599, 305, 1)
pt3dadd(-667, -600.5, 305, 1.3)
pt3dadd(-669.5, -604, 308.5, 1.4)
pt3dadd(-671.5, -607.5, 309, 1.6)
pt3dadd(-672.5, -609.5, 309, 1.2)
pt3dadd(-676, -610, 309, 1.2)
pt3dadd(-678.5, -612, 312.5, 1.1)
pt3dadd(-680, -614.5, 312.5, 1.1)
pt3dadd(-683, -615.5, 316.5, 1.1)
pt3dadd(-684.5, -618, 313, 1)
pt3dadd(-685, -621, 313.5, 0.9)
pt3dadd(-687.5, -623, 313.5, 0.8)
pt3dadd(-690.5, -623.5, 313.5, 1.1)
pt3dadd(-693, -624.5, 314, 1.1)
pt3dadd(-695, -628, 314, 1.4)
pt3dadd(-696.5, -629.5, 314, 1.4)
pt3dadd(-697.5, -634, 318, 2.1)
pt3dadd(-698.5, -636, 318.5, 1.9)
pt3dadd(-701.5, -640, 325, 1.4)
pt3dadd(-704, -643.5, 330.5, 1.6)
pt3dadd(-707, -646.5, 330.5, 2.2)
pt3dadd(-707.5, -649.5, 330.5, 2.5)
pt3dadd(-711, -653, 330.5, 1.7)
pt3dadd(-713.5, -657.5, 333, 1.7)
pt3dadd(-715.5, -655.5, 333, 1)
pt3dadd(-718, -659.5, 333, 0.6)
pt3dadd(-720, -662.5, 336, 1.1)
pt3dadd(-724.5, -666.5, 336.5, 1.1)
pt3dadd(-726.5, -669, 339, 0.8)
pt3dadd(-730.5, -674, 328, 1.1)
pt3dadd(-731, -676.5, 333.5, 2)
pt3dadd(-733.5, -678.5, 333.5, 1.6)
pt3dadd(-738.5, -681, 333.5, 1.1)
pt3dadd(-739.5, -683, 333.5, 1.1)
pt3dadd(-741, -685, 333.5, 1.1)
pt3dadd(-743.5, -687.5, 334, 1.1)
pt3dadd(-744, -693.5, 331.5, 1.1)
pt3dadd(-746, -696, 334, 1.1)
pt3dadd(-748.5, -697, 337, 0.8)
pt3dadd(-750.5, -700, 337, 0.8)
pt3dadd(-753.5, -700, 337, 0.8)
pt3dadd(-756, -704, 334, 1.1)
pt3dadd(-758.5, -705.5, 340, 1.2)
pt3dadd(-763, -708.5, 343, 1.7)
pt3dadd(-764, -713, 340, 0.7)
pt3dadd(-767, -716, 340, 0.5)
pt3dadd(-768, -718, 340, 0.5)
pt3dadd(-769.5, -720.5, 340, 0.6)
pt3dadd(-771.5, -722.5, 340, 0.7)
pt3dadd(-774.5, -723, 340, 0.9)
pt3dadd(-778, -723, 346, 1)
pt3dadd(-780, -724.5, 340.5, 1.8)
pt3dadd(-782, -727.5, 343.5, 0.9)
pt3dadd(-783.5, -729, 343.5, 0.9)
pt3dadd(-785, -730.5, 346.5, 1.1)
pt3dadd(-786, -727.5, 346.5, 1.3)
pt3dadd(-789.5, -727.5, 349, 0.9)
pt3dadd(-789.5, -730.5, 354.5, 1.2)
pt3dadd(-788.5, -732.5, 354.5, 1)
pt3dadd(-783.5, -739.5, 347, 0.8)
pt3dadd(-787, -745, 347, 1)
pt3dadd(-788, -747.5, 352.5, 1.1)
pt3dadd(-788, -752.5, 352.5, 1.1)
pt3dadd(-786, -757, 352.5, 1.1)
pt3dadd(-783, -757, 355, 1.1)
pt3dadd(-779, -758.5, 355, 1.1)
pt3dadd(-776.5, -761.5, 344.5, 0.7)
pt3dadd(-780, -762, 350, 0.9)
pt3dadd(-780, -765.5, 350, 1.1)
pt3dadd(-777.5, -768, 353, 0.8)
pt3dadd(-775.5, -769.5, 344.5, 0.8)
pt3dadd(-773.5, -772, 344.5, 0.7)
pt3dadd(-771.5, -773.5, 344.5, 0.5)
pt3dadd(-768, -772.5, 339.5, 0.5)
pt3dadd(-768.5, -776, 342, 0.5)
pt3dadd(-769.5, -778.5, 336.5, 0.5)
pt3dadd(-771, -783.5, 342, 0.5)
pt3dadd(-770.5, -786.5, 345, 0.5)
pt3dadd(-768, -790, 345, 0.5)
pt3dadd(-768.5, -793, 345, 0.5)
pt3dadd(-771, -798, 345, 0.5)
pt3dadd(-767.5, -799.5, 345.5, 0.5)
pt3dadd(-764, -802.5, 345.5, 0.5)
pt3dadd(-760, -803.5, 345.5, 0.5)
pt3dadd(-759, -806, 345.5, 0.5)
pt3dadd(-756, -807.5, 345.5, 0.5)
pt3dadd(-755.5, -811.5, 345.5, 0.5)
pt3dadd(-756, -815, 345.5, 0.5)
pt3dadd(-758, -817.5, 345.5, 0.5)
pt3dadd(-758.5, -821.5, 345.5, 0.5)
pt3dadd(-756.5, -823, 345.5, 0.5)
pt3dadd(-758.5, -825, 345.5, 0.5)
pt3dadd(-759, -827.5, 345.5, 1.1)
pt3dadd(-759.5, -830, 346, 1.6)
pt3dadd(-759.5, -833, 346, 0.4)
pt3dadd(-761.5, -837.5, 343, 0.2)
pt3dadd(-763, -840.5, 343, 0.2)
pt3dadd(-761.5, -845, 337.5, 0.4)
pt3dadd(-762.5, -848, 343, 0.1)
pt3dadd(-765, -850.5, 343, 0.1)
pt3dadd(-768, -854.5, 343.5, 0.1)
pt3dadd(-772, -856.5, 346.5, 0.1)
pt3dadd(-776.5, -858.5, 346.5, 0.1)
pt3dadd(-779, -861, 346.5, 0.1)
pt3dadd(-778, -865, 338, 0.1)
pt3dadd(-774.5, -865, 338, 0.1)
pt3dadd(-774.5, -870.5, 338, 0.1)
pt3dadd(-771.5, -871.5, 338, 0.1)
pt3dadd(-770, -874, 338, 0.1)
pt3dadd(-770, -878, 338.5, 0.1)
pt3dadd(-773, -883, 341.5, 0.1)
pt3dadd(-774.5, -885.5, 341.5, 0.1)
pt3dadd(-774.5, -889, 336, 0.1)
pt3dadd(-776, -891.5, 336, 0.1)
pt3dadd(-775, -894, 336, 0.1)
pt3dadd(-776.5, -896.5, 336, 0.1)
pt3dadd(-779, -896.5, 338.5, 0.1)
}
dend[221] {pt3dclear()
pt3dadd(-147, -191, 49, 7.1)
pt3dadd(-148.5, -196, 51, 4.1)
pt3dadd(-153, -201, 75, 4.1)
pt3dadd(-155, -203.5, 94.5, 5.5)
pt3dadd(-156.5, -205, 96.5, 5.5)
pt3dadd(-159, -202.5, 103, 5.2)
}
dend[222] {pt3dclear()
pt3dadd(-159, -202.5, 103, 5.2)
pt3dadd(-155.5, -205.5, 112.5, 3.3)
pt3dadd(-152, -205.5, 111, 2.7)
pt3dadd(-151, -203, 114.5, 2.6)
pt3dadd(-149, -195, 116, 3)
pt3dadd(-149, -191, 116.5, 2.4)
pt3dadd(-150, -189, 117, 2)
pt3dadd(-151, -181.5, 125, 1.9)
pt3dadd(-154, -177, 126.5, 2.1)
pt3dadd(-156, -174.5, 124, 2)
pt3dadd(-154, -171.5, 129.5, 1.6)
pt3dadd(-148, -168.5, 136, 1.5)
pt3dadd(-148, -165.5, 141, 1.9)
pt3dadd(-150.5, -165, 141.5, 2.2)
pt3dadd(-152.5, -160.5, 143, 2.1)
pt3dadd(-151.5, -158, 141, 1.9)
pt3dadd(-152, -155.5, 141.5, 1.7)
pt3dadd(-154, -154, 142.5, 1.8)
pt3dadd(-155.5, -147.5, 144.5, 1.8)
pt3dadd(-156, -143, 162, 2)
pt3dadd(-158.5, -139, 160.5, 2)
pt3dadd(-158.5, -131.5, 176, 1.7)
pt3dadd(-157.5, -128.5, 174, 1.7)
pt3dadd(-158, -121.5, 181, 2.2)
pt3dadd(-158.5, -119, 179.5, 1.9)
pt3dadd(-161.5, -113.5, 183.5, 1.3)
pt3dadd(-161.5, -110.5, 187, 1.3)
pt3dadd(-158.5, -111, 185, 1.7)
pt3dadd(-159, -108, 185.5, 1.7)
pt3dadd(-159, -105, 186, 1.5)
pt3dadd(-157.5, -100.5, 193.5, 1.7)
pt3dadd(-160, -100, 194, 1.7)
pt3dadd(-162, -98.5, 192, 1.7)
pt3dadd(-163.5, -93.5, 201.5, 1.7)
pt3dadd(-166.5, -92.5, 202.5, 1.9)
pt3dadd(-169.5, -91, 206, 1.5)
}
}
proc shape3d_54() {
dend[222] { pt3dadd(-169, -87.5, 207, 1.6)
pt3dadd(-170.5, -86, 210, 1.6)
pt3dadd(-170, -83, 206, 1.6)
pt3dadd(-170, -78.5, 208, 1.9)
pt3dadd(-172.5, -76, 212, 1.9)
pt3dadd(-176, -70.5, 216.5, 2.2)
pt3dadd(-178, -67.5, 217, 2.3)
pt3dadd(-178, -64, 223, 2.3)
pt3dadd(-177, -60.5, 224, 2.3)
pt3dadd(-176.5, -56, 225, 2.4)
pt3dadd(-179.5, -51, 232.5, 1.6)
pt3dadd(-180.5, -49, 232.5, 2)
pt3dadd(-180.5, -43.5, 233, 1.9)
pt3dadd(-181, -38.5, 233.5, 1.9)
pt3dadd(-181.5, -35, 234, 1.3)
pt3dadd(-182.5, -31.5, 231, 1.3)
pt3dadd(-180, -30, 239.5, 1.3)
pt3dadd(-180, -26.5, 239.5, 1.1)
pt3dadd(-181.5, -25, 243.5, 1.1)
pt3dadd(-182.5, -23, 243.5, 1.4)
pt3dadd(-183, -18, 244, 1.3)
pt3dadd(-183.5, -13.5, 244.5, 1.3)
pt3dadd(-185, -11.5, 244.5, 1.3)
pt3dadd(-188, -9, 241.5, 1.1)
pt3dadd(-187, -4.5, 242, 1.3)
pt3dadd(-188, -0.5, 242.5, 1.1)
pt3dadd(-191, 2.5, 246.5, 1.1)
pt3dadd(-189.5, 4.5, 246.5, 1.1)
pt3dadd(-187.5, 6.5, 247, 1.6)
pt3dadd(-189, 10.5, 251, 1.8)
pt3dadd(-190.5, 17, 251.5, 1.6)
pt3dadd(-192, 20.5, 259, 1.3)
pt3dadd(-192.5, 23, 256, 1.3)
pt3dadd(-194.5, 25.5, 256, 1.3)
pt3dadd(-194.5, 30, 256.5, 1.3)
pt3dadd(-194.5, 34.5, 258, 1)
pt3dadd(-197, 37, 255, 1)
pt3dadd(-196, 41, 263, 0.7)
pt3dadd(-195.5, 44, 263, 0.9)
pt3dadd(-194.5, 48, 263.5, 1)
pt3dadd(-193, 50.5, 260.5, 2.5)
pt3dadd(-193.5, 55.5, 261, 1.4)
pt3dadd(-195, 57, 257.5, 1.2)
pt3dadd(-194.5, 61.5, 261.5, 0.9)
pt3dadd(-194.5, 65.5, 262, 0.9)
pt3dadd(-195, 69.5, 262.5, 1.1)
pt3dadd(-195, 72.5, 262.5, 1.3)
pt3dadd(-196, 75, 266.5, 1.3)
pt3dadd(-196, 78, 266.5, 0.9)
pt3dadd(-197.5, 82.5, 267, 0.8)
pt3dadd(-199, 87, 275, 0.8)
pt3dadd(-201.5, 92.5, 275, 0.9)
pt3dadd(-200.5, 95.5, 275, 0.7)
pt3dadd(-203, 104.5, 272.5, 0.9)
pt3dadd(-202, 106.5, 279, 0.9)
pt3dadd(-201.5, 110.5, 276, 0.6)
pt3dadd(-205.5, 113, 276, 0.9)
pt3dadd(-205.5, 117.5, 279, 1.1)
pt3dadd(-208.5, 122, 276.5, 0.5)
pt3dadd(-209.5, 125, 276.5, 0.5)
pt3dadd(-210, 130, 279.5, 0.5)
pt3dadd(-210, 136.5, 280, 0.8)
pt3dadd(-211.5, 138.5, 280, 0.8)
pt3dadd(-214, 141, 280, 0.8)
pt3dadd(-216.5, 147.5, 287, 0.7)
pt3dadd(-217.5, 149.5, 287, 0.7)
pt3dadd(-221.5, 159, 290.5, 0.9)
pt3dadd(-222.5, 161, 287.5, 0.8)
pt3dadd(-222, 169, 291, 0.4)
pt3dadd(-225, 171, 288, 0.4)
pt3dadd(-226, 176.5, 288, 0.4)
pt3dadd(-226.5, 181.5, 288, 0.4)
pt3dadd(-229, 188, 285.5, 0.4)
pt3dadd(-226.5, 192, 288.5, 0.4)
pt3dadd(-223, 194.5, 291.5, 0.4)
pt3dadd(-219, 196.5, 291.5, 0.4)
pt3dadd(-214.5, 199, 292, 0.4)
pt3dadd(-208.5, 202, 286, 0.1)
pt3dadd(-204, 202.5, 286, 0.1)
pt3dadd(-200.5, 205, 286.5, 0.1)
}
dend[223] {pt3dclear()
pt3dadd(-159, -202.5, 103, 5.2)
pt3dadd(-160.5, -200, 103.5, 4.6)
pt3dadd(-167, -199, 105.5, 4.6)
pt3dadd(-162, -201.5, 116.5, 4.6)
pt3dadd(-160, -205.5, 113, 5.1)
pt3dadd(-159.5, -211, 125, 4.7)
pt3dadd(-154.5, -215, 127, 2.6)
pt3dadd(-149.5, -220.5, 137.5, 3.1)
pt3dadd(-155, -224, 157.5, 2.8)
pt3dadd(-157.5, -223.5, 153, 2.6)
pt3dadd(-161, -222, 154.5, 3)
pt3dadd(-164, -221, 155.5, 3)
pt3dadd(-168.5, -220, 157, 2.7)
pt3dadd(-169.5, -222.5, 158, 2.4)
pt3dadd(-168.5, -228.5, 168.5, 3.5)
pt3dadd(-168.5, -231.5, 169.5, 3.2)
pt3dadd(-170, -234, 170.5, 3.2)
pt3dadd(-171.5, -242, 179.5, 3.1)
pt3dadd(-177.5, -247.5, 182, 3)
pt3dadd(-180.5, -249.5, 189.5, 3)
pt3dadd(-185.5, -249.5, 191, 3)
pt3dadd(-185.5, -249.5, 206.5, 3.5)
pt3dadd(-182, -251, 205, 2.9)
pt3dadd(-180.5, -253.5, 209.5, 3.4)
pt3dadd(-180, -257, 210.5, 3.7)
pt3dadd(-180.5, -261.5, 212, 3.7)
pt3dadd(-182.5, -260.5, 218.5, 3.6)
pt3dadd(-190, -260, 221, 3)
pt3dadd(-193, -259.5, 225, 3)
pt3dadd(-193.5, -262.5, 222, 2.9)
pt3dadd(-198, -265, 235, 2.6)
pt3dadd(-199.5, -266.5, 232.5, 3)
pt3dadd(-203.5, -266, 233, 3.4)
pt3dadd(-205, -263, 237.5, 3.6)
pt3dadd(-207, -265.5, 242, 2.8)
pt3dadd(-208.5, -271, 243.5, 2.3)
pt3dadd(-209.5, -273, 244, 2.7)
pt3dadd(-212.5, -273, 253, 3.5)
pt3dadd(-216.5, -271.5, 260, 3.5)
pt3dadd(-221, -272.5, 269, 3.3)
pt3dadd(-222, -274.5, 269.5, 3.5)
pt3dadd(-224.5, -277, 273.5, 3.5)
pt3dadd(-224.5, -283, 275, 3.5)
pt3dadd(-225, -288, 287.5, 2.2)
pt3dadd(-228.5, -287, 286.5, 1.9)
pt3dadd(-228.5, -284, 284.5, 1.9)
pt3dadd(-222, -284, 294.5, 2.1)
pt3dadd(-219, -284, 298.5, 2.3)
pt3dadd(-216, -281.5, 298, 2.8)
pt3dadd(-220, -288.5, 304, 2.5)
pt3dadd(-220.5, -292, 305, 2.2)
pt3dadd(-218, -297.5, 310.5, 2.2)
pt3dadd(-216.5, -300, 311.5, 2.6)
pt3dadd(-217.5, -305.5, 325, 2.9)
pt3dadd(-214.5, -303, 326, 3.1)
pt3dadd(-212, -300, 327.5, 4.1)
pt3dadd(-211, -302, 335, 2.2)
pt3dadd(-210, -304.5, 336, 2.2)
pt3dadd(-203.5, -308, 339, 1.4)
pt3dadd(-202, -313, 347.5, 2.2)
pt3dadd(-200.5, -315, 348.5, 2.2)
pt3dadd(-197, -315, 350, 2.2)
pt3dadd(-198.5, -313, 348, 3)
}
dend[224] {pt3dclear()
pt3dadd(-198.5, -313, 348, 3)
pt3dadd(-198, -310.5, 349, 0.3)
pt3dadd(-199, -308.5, 356, 0.6)
pt3dadd(-199.5, -305, 356.5, 0.6)
pt3dadd(-195, -304, 358, 0.9)
pt3dadd(-191.5, -300.5, 357, 0.7)
pt3dadd(-188.5, -297.5, 358, 1)
pt3dadd(-186, -295.5, 358.5, 1.4)
pt3dadd(-186, -291.5, 359.5, 1.3)
pt3dadd(-185, -287, 367.5, 1)
pt3dadd(-184.5, -284.5, 374.5, 1)
pt3dadd(-184.5, -283, 375, 1)
}
dend[225] {pt3dclear()
pt3dadd(-198.5, -313, 348, 3)
pt3dadd(-202.5, -313, 358.5, 1.8)
pt3dadd(-206, -311.5, 361, 2.8)
pt3dadd(-203, -315, 367, 2.6)
pt3dadd(-200, -318.5, 369.5, 2.6)
pt3dadd(-197.5, -321, 375, 3.2)
pt3dadd(-198, -324, 376, 2.6)
pt3dadd(-199.5, -327.5, 377.5, 2)
pt3dadd(-198, -329.5, 373, 2)
pt3dadd(-197, -325.5, 398, 2)
pt3dadd(-195, -327, 403.5, 2)
pt3dadd(-194.5, -330, 413.5, 2)
pt3dadd(-190.5, -332, 407, 1.6)
pt3dadd(-191, -335, 408.5, 1.6)
pt3dadd(-191.5, -340, 410, 1.6)
pt3dadd(-188, -340.5, 432, 1.5)
pt3dadd(-186.5, -344.5, 440, 2.2)
pt3dadd(-186, -349.5, 441.5, 1.5)
pt3dadd(-183, -351, 442, 1.5)
pt3dadd(-186, -351.5, 443, 1.3)
pt3dadd(-188, -353.5, 443.5, 1.9)
pt3dadd(-188, -357, 451, 2.9)
pt3dadd(-189, -360, 452, 1.5)
pt3dadd(-191, -361.5, 455.5, 1.5)
pt3dadd(-194.5, -362, 456.5, 1.7)
pt3dadd(-199, -363.5, 457, 1.6)
pt3dadd(-202, -364, 458, 1.7)
pt3dadd(-205, -365.5, 458.5, 1.8)
pt3dadd(-211.5, -368.5, 460, 1.9)
pt3dadd(-216, -371, 470.5, 1.8)
pt3dadd(-216.5, -374, 464, 1.8)
pt3dadd(-217, -376.5, 464.5, 1.6)
pt3dadd(-220, -378.5, 472, 1.6)
pt3dadd(-221, -381.5, 477, 1.3)
pt3dadd(-222, -385, 479.5, 1.2)
pt3dadd(-226, -385.5, 484, 1.3)
pt3dadd(-226.5, -389.5, 489.5, 1.5)
pt3dadd(-226.5, -386.5, 490.5, 1.5)
pt3dadd(-228, -384.5, 499.5, 1.5)
pt3dadd(-231, -384.5, 510, 1.5)
pt3dadd(-234, -384.5, 510.5, 1.5)
pt3dadd(-241.5, -382.5, 512.5, 1.8)
pt3dadd(-245.5, -381.5, 513.5, 1.5)
pt3dadd(-250, -379, 515, 1.3)
pt3dadd(-255.5, -379, 525, 1.2)
}
}
proc shape3d_55() {
dend[225] { pt3dadd(-263, -377.5, 530.5, 0.9)
pt3dadd(-265, -376, 536, 0.8)
pt3dadd(-271.5, -378.5, 549.5, 1.1)
pt3dadd(-268, -379, 555.5, 1.4)
pt3dadd(-263, -379, 573.5, 1.7)
pt3dadd(-261, -375.5, 575, 1.6)
}
dend[226] {pt3dclear()
pt3dadd(-56.5, -114.5, 19, 7.4)
pt3dadd(-56, -118.5, 21.5, 3.2)
pt3dadd(-59, -126, 25, 3)
pt3dadd(-60, -130, 25.5, 2.4)
pt3dadd(-64.5, -133.5, 28, 2.2)
pt3dadd(-64.5, -137.5, 29, 2.1)
pt3dadd(-59.5, -142.5, 30, 1.8)
pt3dadd(-55, -145.5, 36, 2)
pt3dadd(-49, -149.5, 40, 2)
pt3dadd(-46.5, -152.5, 38, 2)
pt3dadd(-44, -155, 38.5, 1.8)
pt3dadd(-42, -156, 39, 1.8)
pt3dadd(-42, -160, 39.5, 1.8)
pt3dadd(-42, -163.5, 40, 1.8)
pt3dadd(-39, -167.5, 43.5, 1.6)
pt3dadd(-37, -169, 41.5, 1.9)
pt3dadd(-33.5, -172.5, 42, 1.8)
pt3dadd(-32.5, -174.5, 42.5, 1.6)
pt3dadd(-35.5, -178, 43, 1.5)
pt3dadd(-34.5, -183, 43.5, 1.3)
pt3dadd(-32.5, -187, 44.5, 1.1)
pt3dadd(-30.5, -188.5, 40, 1.4)
pt3dadd(-30, -191, 43, 1.4)
pt3dadd(-30, -194.5, 41, 1.4)
pt3dadd(-28, -198, 41.5, 1.4)
pt3dadd(-27, -203.5, 45, 2.5)
pt3dadd(-26, -209, 43.5, 1.8)
pt3dadd(-24, -211, 44, 1.4)
pt3dadd(-21, -217, 45, 1.4)
pt3dadd(-21.5, -222.5, 45.5, 1.2)
pt3dadd(-24, -226, 46.5, 1.2)
pt3dadd(-24, -229.5, 46.5, 1.4)
pt3dadd(-25.5, -239, 53.5, 2.2)
pt3dadd(-25, -245, 54.5, 2.1)
pt3dadd(-25, -248, 55, 1.9)
pt3dadd(-28, -251, 50.5, 1.5)
pt3dadd(-31, -256.5, 54, 1.1)
pt3dadd(-29, -260, 52.5, 1.4)
pt3dadd(-29.5, -264.5, 53, 1.5)
pt3dadd(-30.5, -268.5, 53.5, 1.1)
pt3dadd(-28.5, -272, 54.5, 1.4)
pt3dadd(-31.5, -279, 51, 1.3)
pt3dadd(-30.5, -283.5, 57, 1.1)
pt3dadd(-30.5, -288.5, 58, 1.1)
pt3dadd(-30.5, -293, 64, 1.3)
pt3dadd(-30.5, -296.5, 62, 1.2)
pt3dadd(-32.5, -299.5, 62.5, 1.2)
pt3dadd(-33.5, -305, 63.5, 1.5)
pt3dadd(-37, -308.5, 72, 1.3)
pt3dadd(-37, -312.5, 72.5, 1.3)
pt3dadd(-36, -318.5, 73.5, 1.9)
pt3dadd(-37.5, -321.5, 69.5, 1.6)
pt3dadd(-37.5, -325, 70, 1.6)
pt3dadd(-38.5, -329, 71, 1.8)
pt3dadd(-39.5, -336.5, 72, 1)
pt3dadd(-37.5, -339, 72.5, 1)
pt3dadd(-37.5, -344, 71, 1.4)
pt3dadd(-36.5, -347.5, 71.5, 1.1)
pt3dadd(-38.5, -350.5, 72, 1)
pt3dadd(-40.5, -360, 71, 1)
pt3dadd(-42.5, -362.5, 71.5, 1)
pt3dadd(-43.5, -369.5, 69, 1.6)
pt3dadd(-41.5, -375, 70, 0.8)
pt3dadd(-42, -378, 68, 0.8)
pt3dadd(-39.5, -379.5, 68.5, 0.7)
pt3dadd(-37.5, -383, 69, 0.7)
pt3dadd(-37, -386, 75, 0.8)
pt3dadd(-35, -390.5, 71, 2.3)
pt3dadd(-33, -397, 69.5, 1.6)
pt3dadd(-32.5, -401.5, 69, 1.2)
pt3dadd(-33.5, -404, 68.5, 1.7)
pt3dadd(-32, -409, 67.5, 1.1)
pt3dadd(-29.5, -412.5, 67, 1.1)
pt3dadd(-27.5, -415, 66.5, 1.2)
pt3dadd(-26, -422, 68, 1.1)
pt3dadd(-24, -425.5, 67.5, 1.3)
pt3dadd(-22.5, -428, 61, 1.7)
pt3dadd(-20, -431, 60, 2)
pt3dadd(-18, -433.5, 57, 1.7)
pt3dadd(-17.5, -441.5, 55, 0.9)
pt3dadd(-14, -444, 54.5, 0.9)
pt3dadd(-13.5, -446.5, 54, 0.9)
pt3dadd(-12, -448, 50.5, 0.1)
}
dend[227] {pt3dclear()
pt3dadd(-39.5, -89.5, 7, 14.7)
pt3dadd(-47.5, -88.5, 17.5, 4.3)
pt3dadd(-53, -87, 13.5, 3)
pt3dadd(-55.5, -86, 9.5, 3.1)
pt3dadd(-63.5, -87.5, 11, 2.6)
pt3dadd(-72, -87.5, 10, 3)
pt3dadd(-76, -86.5, 11, 3)
pt3dadd(-84, -87.5, 12.5, 3)
pt3dadd(-94, -90, 14.5, 2.7)
pt3dadd(-97.5, -92.5, 17.5, 2.7)
pt3dadd(-102, -94, 18.5, 2.5)
pt3dadd(-105, -95.5, 25, 2.3)
pt3dadd(-113, -93, 27.5, 3.1)
pt3dadd(-116.5, -93, 28, 3.1)
pt3dadd(-119, -92.5, 26, 3)
pt3dadd(-124, -93.5, 27, 2.6)
pt3dadd(-126.5, -94, 27.5, 2.4)
pt3dadd(-129.5, -96.5, 21, 2.2)
pt3dadd(-130.5, -98, 25, 2.5)
pt3dadd(-136.5, -98, 24.5, 2.6)
pt3dadd(-143, -102, 29.5, 2.6)
pt3dadd(-145.5, -101.5, 24.5, 2.6)
pt3dadd(-149.5, -101.5, 24.5, 2.3)
pt3dadd(-155.5, -103, 29, 2.3)
pt3dadd(-158.5, -103.5, 29, 2.3)
pt3dadd(-162, -103.5, 29, 2.3)
pt3dadd(-165, -104.5, 29, 2.2)
pt3dadd(-168.5, -104.5, 29, 2.2)
pt3dadd(-172.5, -104.5, 29, 2.1)
pt3dadd(-177.5, -104.5, 26, 2.5)
pt3dadd(-180.5, -105, 26, 2.5)
pt3dadd(-183.5, -106.5, 26, 2.5)
pt3dadd(-190, -108.5, 23.5, 2.5)
pt3dadd(-193, -108.5, 28.5, 2.1)
pt3dadd(-199, -112, 23, 2.3)
pt3dadd(-203.5, -114, 23, 2.3)
pt3dadd(-208, -114.5, 23, 3)
pt3dadd(-216.5, -118, 25, 2.4)
pt3dadd(-219, -118.5, 25, 2.3)
pt3dadd(-221.5, -120, 25, 2)
pt3dadd(-223.5, -122, 25, 2)
pt3dadd(-227.5, -123.5, 25, 2.7)
pt3dadd(-231, -123.5, 25, 2.5)
pt3dadd(-235, -124.5, 25, 2)
pt3dadd(-239.5, -126.5, 25, 2.5)
pt3dadd(-243.5, -126.5, 24.5, 2.1)
pt3dadd(-254, -127.5, 27.5, 1.6)
pt3dadd(-262, -126, 27.5, 2.1)
pt3dadd(-266.5, -123, 18.5, 1.9)
pt3dadd(-269.5, -123, 18.5, 2.2)
pt3dadd(-276, -120.5, 18.5, 2.3)
pt3dadd(-279.5, -120.5, 18.5, 2.3)
pt3dadd(-283, -120.5, 21.5, 2.1)
pt3dadd(-286.5, -122.5, 21.5, 1.8)
pt3dadd(-289, -123, 21.5, 1.9)
pt3dadd(-293, -125, 18.5, 2.2)
pt3dadd(-297.5, -125, 18, 2.5)
pt3dadd(-305.5, -125, 18, 2.1)
pt3dadd(-309.5, -125, 18, 2.3)
pt3dadd(-318.5, -125, 18, 2.4)
pt3dadd(-321, -126, 18, 2.2)
pt3dadd(-325, -128.5, 18, 2.2)
pt3dadd(-329, -130, 17.5, 2.2)
pt3dadd(-335, -131, 17.5, 2.2)
pt3dadd(-346.5, -136.5, 15, 2)
pt3dadd(-352.5, -139, 20.5, 1.9)
pt3dadd(-359, -140, 14.5, 2)
pt3dadd(-365, -146.5, 14.5, 1.9)
pt3dadd(-376, -147, 12, 1.9)
pt3dadd(-379.5, -147.5, 14.5, 1.9)
pt3dadd(-384, -151.5, 11.5, 1.6)
pt3dadd(-389, -155.5, 8.5, 1.9)
pt3dadd(-393, -156.5, 11.5, 2.6)
pt3dadd(-399.5, -157, 14, 2.1)
pt3dadd(-405, -156.5, 11.5, 2)
pt3dadd(-408, -156, 8, 1.6)
pt3dadd(-411.5, -156.5, 5.5, 1.6)
pt3dadd(-415, -157, 8, 1.8)
pt3dadd(-418, -159, 5.5, 1.5)
pt3dadd(-426, -161, 5.5, 2.3)
pt3dadd(-431.5, -161, 11, 1.9)
pt3dadd(-436, -164, 15.5, 1.9)
pt3dadd(-441.5, -167, 2, 2)
pt3dadd(-447, -169.5, 10.5, 2)
pt3dadd(-459, -172.5, 15, 1.6)
pt3dadd(-462.5, -172.5, 15, 1.6)
pt3dadd(-468, -170.5, 7, 1.9)
pt3dadd(-473, -168.5, 7, 1.5)
pt3dadd(-476, -169.5, 7, 1.5)
pt3dadd(-481, -170, 6.5, 1.1)
pt3dadd(-491, -171, 12, 1.3)
pt3dadd(-493.5, -173.5, 6.5, 1.6)
pt3dadd(-504, -179.5, 6, 1.1)
pt3dadd(-509, -180.5, 6, 1.1)
pt3dadd(-513, -183.5, 6, 1.1)
pt3dadd(-517, -186, 9, 1.1)
pt3dadd(-519.5, -188.5, 11.5, 1.3)
pt3dadd(-523, -193, 8.5, 1.9)
pt3dadd(-526.5, -192.5, 11, 1.2)
pt3dadd(-533.5, -193.5, 5.5, 1.3)
pt3dadd(-544, -196.5, 3, 1.1)
pt3dadd(-550, -198.5, 8, 0.9)
pt3dadd(-555, -203, 10.5, 1.5)
pt3dadd(-561, -211, 8, 1.4)
pt3dadd(-565.5, -211, 13, 1.3)
pt3dadd(-568, -212, -0.5, 1.1)
pt3dadd(-576, -216, 2, 1.3)
pt3dadd(-581, -221, 2, 1)
pt3dadd(-588, -223.5, 4, 1.4)
pt3dadd(-594.5, -226.5, 4, 1.1)
pt3dadd(-601.5, -226.5, 7, 1)
}
}
proc shape3d_56() {
dend[227] { pt3dadd(-609, -230, -1, 0.9)
pt3dadd(-613, -230, -1.5, 0.9)
pt3dadd(-619, -232, 1, 0.9)
pt3dadd(-624.5, -234, 1, 0.9)
pt3dadd(-630, -234.5, 1, 0.9)
pt3dadd(-635.5, -234.5, 1, 0.9)
pt3dadd(-640.5, -234.5, 1, 1.1)
pt3dadd(-644.5, -234.5, 0.5, 1.5)
pt3dadd(-650.5, -237, 3, 1)
pt3dadd(-657.5, -240.5, -4.5, 1.2)
pt3dadd(-661, -242.5, -4.5, 1)
pt3dadd(-670, -241.5, 0, 1.4)
pt3dadd(-676.5, -240.5, -8, 1.1)
pt3dadd(-683, -247, -2.5, 0.9)
pt3dadd(-685, -250, -2.5, 0.4)
pt3dadd(-690, -252.5, 0, 0.5)
pt3dadd(-695, -253.5, -3, 0.5)
pt3dadd(-699, -254, 0, 0.8)
pt3dadd(-711, -256.5, -8.5, 0.9)
pt3dadd(-716, -262, -6, 0.7)
pt3dadd(-718.5, -266.5, -6, 0.7)
pt3dadd(-721.5, -270, -3.5, 0.7)
pt3dadd(-727.5, -273, -3.5, 0.7)
pt3dadd(-732.5, -275.5, -3.5, 0.9)
pt3dadd(-735.5, -278, -3.5, 0.9)
pt3dadd(-738, -278.5, -0.5, 1.1)
pt3dadd(-743, -281, -1, 0.8)
pt3dadd(-747, -284, -1, 0.5)
pt3dadd(-758.5, -286.5, -6.5, 0.5)
pt3dadd(-763.5, -288.5, -4.5, 0.5)
pt3dadd(-772.5, -290.5, -1.5, 0.6)
pt3dadd(-779, -290.5, -1.5, 0.7)
pt3dadd(-784.5, -290.5, 0.5, 0.7)
pt3dadd(-787.5, -288.5, -13, 1)
pt3dadd(-789.5, -291, -10.5, 1)
pt3dadd(-792.5, -293, -10.5, 0.5)
pt3dadd(-801.5, -296.5, -7.5, 0.8)
pt3dadd(-805.5, -297, -7.5, 0.8)
pt3dadd(-810.5, -297, -8, 0.7)
pt3dadd(-811.5, -301.5, -8, 0.7)
pt3dadd(-821.5, -306, -5.5, 0.8)
pt3dadd(-824, -308, -20, 0.4)
pt3dadd(-827.5, -307, -11.5, 0.4)
}
dend[228] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 11.8)
pt3dadd(-2, -5.5, -10, 11.8)
pt3dadd(-29.5, 4, -41.5, 14.1)
}
dend[229] {pt3dclear()
pt3dadd(-29.5, 4, -41.5, 14.1)
pt3dadd(-35.5, 2, -41.5, 6.4)
pt3dadd(-40, 2.5, -41.5, 6.5)
pt3dadd(-50, 9, -62.5, 6.9)
pt3dadd(-55, 14, -62.5, 7.6)
pt3dadd(-61, 17.5, -71.5, 6.4)
pt3dadd(-64, 20, -71.5, 7.3)
pt3dadd(-66.5, 22.5, -77.5, 7.3)
pt3dadd(-70, 24, -77.5, 8.8)
}
dend[230] {pt3dclear()
pt3dadd(-70, 24, -77.5, 8.8)
pt3dadd(-70, 28, -78, 3.8)
pt3dadd(-72, 31, -78.5, 3.3)
pt3dadd(-74.5, 37.5, -76.5, 3.4)
pt3dadd(-76.5, 41, -77, 3.4)
pt3dadd(-78.5, 45, -77.5, 3.5)
pt3dadd(-81, 50.5, -79.5, 3.4)
pt3dadd(-81, 54, -74, 3.3)
pt3dadd(-81.5, 58, -75, 3.2)
pt3dadd(-83, 61.5, -81.5, 2.3)
pt3dadd(-86, 64, -82, 2.5)
pt3dadd(-88, 66.5, -82.5, 2.5)
pt3dadd(-92.5, 70.5, -83.5, 2.6)
pt3dadd(-94.5, 74.5, -82, 3.2)
pt3dadd(-96.5, 77, -88.5, 3.8)
pt3dadd(-99.5, 84, -89.5, 2.7)
pt3dadd(-100, 87.5, -90, 3.5)
pt3dadd(-99.5, 91, -94, 3.5)
pt3dadd(-104, 98.5, -98.5, 3.3)
pt3dadd(-105, 102.5, -99, 3.2)
pt3dadd(-105.5, 105, -99.5, 3)
pt3dadd(-104.5, 108.5, -103.5, 2.5)
pt3dadd(-105, 111, -103.5, 3)
pt3dadd(-106.5, 115.5, -101.5, 2.7)
pt3dadd(-108, 120.5, -105.5, 3.1)
pt3dadd(-112, 124.5, -108.5, 3.1)
pt3dadd(-113.5, 128.5, -112, 2.8)
pt3dadd(-115, 131.5, -112.5, 2.9)
pt3dadd(-120, 135, -117, 2.7)
pt3dadd(-122.5, 139, -117.5, 3)
pt3dadd(-123.5, 142, -115.5, 3.1)
pt3dadd(-125.5, 145.5, -119, 5)
}
dend[231] {pt3dclear()
pt3dadd(-125.5, 145.5, -119, 5)
pt3dadd(-121, 148.5, -118, 0.7)
pt3dadd(-118, 150.5, -119, 0.5)
pt3dadd(-116, 151.5, -119.5, 0.5)
pt3dadd(-112, 153, -124, 0.5)
pt3dadd(-107.5, 155, -123, 0.5)
pt3dadd(-104.5, 155.5, -119, 0.2)
pt3dadd(-101.5, 156, -123, 0.2)
pt3dadd(-98, 156.5, -124, 0.2)
pt3dadd(-95.5, 156.5, -125, 0.2)
}
dend[232] {pt3dclear()
pt3dadd(-125.5, 145.5, -119, 5)
pt3dadd(-130.5, 148, -122, 3.5)
pt3dadd(-131.5, 151.5, -123.5, 3.5)
pt3dadd(-133.5, 153.5, -125, 3.5)
pt3dadd(-138, 154.5, -131.5, 3.4)
pt3dadd(-141, 157, -132, 3.1)
pt3dadd(-141, 161, -130, 3)
pt3dadd(-146, 166, -135, 2.3)
pt3dadd(-148, 167.5, -133, 2.3)
pt3dadd(-148.5, 170, -133, 2.6)
pt3dadd(-149.5, 172.5, -138, 2)
pt3dadd(-154, 172.5, -134, 2)
pt3dadd(-157.5, 176, -137, 2.3)
pt3dadd(-160, 177.5, -137, 2.7)
pt3dadd(-161, 180, -137, 2.7)
pt3dadd(-161.5, 184.5, -142.5, 2.3)
pt3dadd(-163.5, 186.5, -145, 2.3)
pt3dadd(-167, 187, -145.5, 2.6)
pt3dadd(-169.5, 189, -145.5, 2.5)
pt3dadd(-172, 192, -146, 2.2)
pt3dadd(-174.5, 196.5, -148, 2.2)
pt3dadd(-176, 202, -146.5, 2.1)
pt3dadd(-179, 205, -147, 2.1)
pt3dadd(-180, 207.5, -147, 2.5)
pt3dadd(-180, 210.5, -147, 2.5)
pt3dadd(-179.5, 213.5, -147.5, 2.3)
pt3dadd(-182.5, 217.5, -152.5, 2.3)
pt3dadd(-184, 221, -150.5, 2.4)
pt3dadd(-186, 224.5, -150.5, 2.3)
pt3dadd(-188, 227, -150.5, 2.2)
pt3dadd(-190.5, 227.5, -153.5, 2)
pt3dadd(-192, 230, -155.5, 2)
pt3dadd(-192, 235, -156, 2.2)
pt3dadd(-191, 238.5, -156, 2.1)
pt3dadd(-189.5, 242.5, -156.5, 2)
pt3dadd(-192, 244.5, -161, 1.8)
pt3dadd(-195, 245.5, -161.5, 1.8)
pt3dadd(-197.5, 246, -157, 1.9)
pt3dadd(-201, 248, -157.5, 2)
pt3dadd(-199, 252, -157.5, 2.5)
pt3dadd(-200.5, 254.5, -160.5, 2.5)
pt3dadd(-202, 256, -162.5, 2.5)
pt3dadd(-204, 257.5, -162.5, 2.4)
pt3dadd(-206.5, 260, -161, 2.3)
pt3dadd(-208, 262, -163, 2.3)
pt3dadd(-210, 263.5, -163.5, 2.3)
pt3dadd(-212.5, 265.5, -163.5, 2.3)
pt3dadd(-213.5, 267.5, -163.5, 2.2)
pt3dadd(-216.5, 269, -166.5, 2)
pt3dadd(-218, 272, -166.5, 2)
pt3dadd(-219.5, 275, -166.5, 2.3)
pt3dadd(-219.5, 278, -167, 2.3)
pt3dadd(-222, 283, -167, 2.3)
pt3dadd(-225.5, 286, -167.5, 2.6)
pt3dadd(-229, 291.5, -168, 2.3)
pt3dadd(-231.5, 295.5, -168, 2.3)
pt3dadd(-232.5, 297.5, -168.5, 2.3)
pt3dadd(-232, 300, -168.5, 2.3)
pt3dadd(-235.5, 300.5, -168.5, 1.6)
pt3dadd(-239, 300.5, -169, 1.5)
pt3dadd(-239.5, 304.5, -173.5, 2.2)
pt3dadd(-240.5, 307.5, -174, 2.5)
pt3dadd(-241.5, 310.5, -174, 1.8)
pt3dadd(-243, 313, -174, 1.6)
pt3dadd(-246, 313.5, -174.5, 1.5)
pt3dadd(-249.5, 315.5, -174.5, 1.4)
pt3dadd(-251, 317.5, -175, 1.4)
pt3dadd(-255, 321.5, -178, 1.8)
pt3dadd(-257.5, 324, -186, 1.9)
pt3dadd(-259.5, 326.5, -186, 2.1)
pt3dadd(-262, 328, -186.5, 2.1)
pt3dadd(-263, 332, -186.5, 1.9)
pt3dadd(-265, 335.5, -190, 2.3)
pt3dadd(-266, 339.5, -194, 2.4)
pt3dadd(-267.5, 341.5, -194, 1.8)
pt3dadd(-268.5, 344, -194.5, 1.6)
pt3dadd(-271.5, 345.5, -191.5, 2.3)
pt3dadd(-274.5, 348, -191.5, 2.2)
pt3dadd(-274, 350.5, -191.5, 2)
pt3dadd(-274, 353.5, -192, 2.2)
pt3dadd(-277.5, 356, -196, 2.5)
pt3dadd(-279.5, 359, -196, 2.5)
pt3dadd(-279.5, 362, -200, 1.9)
pt3dadd(-281.5, 365.5, -203.5, 1.2)
pt3dadd(-285, 365, -201, 1.1)
pt3dadd(-287.5, 366, -201, 1.5)
pt3dadd(-289.5, 368.5, -204.5, 1.3)
pt3dadd(-290.5, 371, -204.5, 1.2)
pt3dadd(-294, 370, -209.5, 1.3)
pt3dadd(-296.5, 370.5, -209.5, 1.4)
pt3dadd(-299.5, 371.5, -210, 1.6)
pt3dadd(-302, 374, -210, 1.5)
pt3dadd(-308, 376, -210.5, 1.4)
pt3dadd(-308, 379, -211, 1.4)
pt3dadd(-314.5, 382.5, -215, 1.7)
pt3dadd(-316, 385, -215, 1.4)
pt3dadd(-319.5, 385, -212, 2)
pt3dadd(-321, 386.5, -219, 1.9)
pt3dadd(-322, 389, -226.5, 1.7)
pt3dadd(-322.5, 392, -220, 1.2)
pt3dadd(-328, 393.5, -221, 1.5)
pt3dadd(-330, 395, -221, 1.5)
pt3dadd(-335.5, 400.5, -229, 1.9)
}
}
proc shape3d_57() {
dend[232] { pt3dadd(-338.5, 401, -222.5, 2.3)
pt3dadd(-342.5, 404, -226.5, 2.3)
pt3dadd(-343.5, 408.5, -227, 2)
pt3dadd(-344, 411.5, -224, 2)
pt3dadd(-348.5, 414, -224, 1.9)
pt3dadd(-351.5, 416, -224.5, 1.9)
pt3dadd(-354.5, 419, -225, 1.9)
pt3dadd(-359, 422.5, -232.5, 2.1)
pt3dadd(-362, 423.5, -233, 2.1)
pt3dadd(-363, 426.5, -241, 1.9)
pt3dadd(-366, 428, -241.5, 1.9)
pt3dadd(-367.5, 429.5, -241.5, 1.9)
pt3dadd(-370, 431, -241.5, 1.8)
pt3dadd(-372.5, 431.5, -242, 1.8)
pt3dadd(-372.5, 435, -242.5, 1.9)
pt3dadd(-372, 437.5, -242.5, 1.8)
pt3dadd(-373, 440.5, -243, 1.7)
pt3dadd(-375, 442.5, -243, 1.9)
pt3dadd(-375, 446.5, -243.5, 2)
pt3dadd(-377, 452, -240.5, 2.1)
pt3dadd(-379, 456, -249, 2)
pt3dadd(-380, 459, -245.5, 1.5)
pt3dadd(-379.5, 465, -246, 1.2)
pt3dadd(-382.5, 465, -246.5, 1.2)
pt3dadd(-384, 467, -246.5, 1.2)
pt3dadd(-384, 470, -247, 1.2)
pt3dadd(-383, 472.5, -251, 1.3)
pt3dadd(-384.5, 476, -251, 1.5)
pt3dadd(-387.5, 477, -251.5, 1.7)
pt3dadd(-390.5, 479, -252, 1.3)
pt3dadd(-389.5, 482.5, -256, 1.2)
pt3dadd(-392, 486.5, -256, 1.5)
pt3dadd(-393.5, 489.5, -256.5, 1.2)
pt3dadd(-396, 491.5, -257, 1.2)
pt3dadd(-394.5, 493.5, -257, 1.2)
pt3dadd(-395, 496.5, -257.5, 1.2)
pt3dadd(-398, 500, -258, 1.2)
pt3dadd(-399, 503, -258, 1.5)
pt3dadd(-396.5, 508, -262, 1.3)
pt3dadd(-399.5, 510, -262.5, 1.3)
pt3dadd(-399.5, 513, -266.5, 1.3)
pt3dadd(-401, 515, -266.5, 1.2)
pt3dadd(-401.5, 517.5, -267, 1.2)
pt3dadd(-405, 514.5, -275, 1.3)
pt3dadd(-408, 517, -279.5, 2)
pt3dadd(-412.5, 519.5, -282.5, 1.2)
pt3dadd(-412.5, 523.5, -294.5, 1.2)
pt3dadd(-411, 525, -294.5, 1.1)
pt3dadd(-410, 527.5, -295, 0.9)
pt3dadd(-411.5, 533, -300, 1.7)
pt3dadd(-412.5, 536.5, -302, 1.7)
pt3dadd(-413.5, 540, -302, 1.1)
pt3dadd(-415.5, 542.5, -302.5, 1)
pt3dadd(-417.5, 545, -302.5, 1.2)
pt3dadd(-418, 549.5, -303, 1.1)
pt3dadd(-419, 553, -305.5, 1.3)
pt3dadd(-421.5, 554, -303, 1.3)
pt3dadd(-424.5, 554.5, -303.5, 1.2)
pt3dadd(-428, 555, -303.5, 1.2)
pt3dadd(-430.5, 556.5, -303.5, 0.9)
pt3dadd(-432, 560.5, -304, 0.8)
pt3dadd(-435, 563, -304, 0.7)
pt3dadd(-437.5, 565, -304.5, 0.7)
pt3dadd(-438.5, 569.5, -307, 0.7)
pt3dadd(-444.5, 570.5, -307.5, 0.7)
pt3dadd(-448.5, 573, -307.5, 0.7)
pt3dadd(-450, 575.5, -308, 0.7)
pt3dadd(-451, 579, -308, 0.9)
pt3dadd(-451, 582, -308, 0.9)
pt3dadd(-454, 583.5, -308.5, 0.9)
pt3dadd(-457.5, 585, -308.5, 1.1)
pt3dadd(-457, 588, -309, 0.9)
pt3dadd(-459, 591.5, -309, 0.7)
pt3dadd(-460.5, 593, -309, 0.9)
pt3dadd(-462.5, 595.5, -309.5, 0.7)
pt3dadd(-463.5, 599.5, -309.5, 0.7)
pt3dadd(-466.5, 600.5, -312, 1.3)
pt3dadd(-468, 602, -312, 1.3)
pt3dadd(-468.5, 608, -319.5, 0.8)
pt3dadd(-471.5, 608, -315, 0.8)
pt3dadd(-473.5, 612, -313, 0.8)
pt3dadd(-476.5, 612.5, -313, 1.1)
pt3dadd(-479.5, 613.5, -313.5, 1)
pt3dadd(-484, 616.5, -318.5, 1)
pt3dadd(-485, 620, -318.5, 0.8)
pt3dadd(-485, 624, -318.5, 1.1)
pt3dadd(-485, 627, -319, 1.1)
pt3dadd(-485, 631, -324, 1.1)
pt3dadd(-486.5, 633, -324.5, 1.1)
pt3dadd(-489.5, 633.5, -324.5, 1.1)
pt3dadd(-492.5, 631.5, -325, 0.8)
}
dend[233] {pt3dclear()
pt3dadd(-70, 24, -77.5, 8.8)
pt3dadd(-83, 27, -80, 5.3)
pt3dadd(-90, 29.5, -89.5, 5.8)
pt3dadd(-93, 30, -90.5, 6.1)
pt3dadd(-100.5, 33.5, -108, 6.4)
pt3dadd(-104, 35, -109.5, 7.3)
pt3dadd(-109.5, 38.5, -113, 8.8)
}
dend[234] {pt3dclear()
pt3dadd(-109.5, 38.5, -113, 8.8)
pt3dadd(-109, 42.5, -114.5, 3.2)
pt3dadd(-111, 44, -116, 3.4)
pt3dadd(-109.5, 45.5, -120.5, 3)
pt3dadd(-107, 47, -121.5, 3.3)
pt3dadd(-107.5, 50, -123, 2.8)
pt3dadd(-111, 58.5, -135.5, 2.2)
pt3dadd(-110, 61.5, -136, 2.2)
pt3dadd(-109, 64, -136.5, 2.2)
pt3dadd(-111, 66, -137, 2.1)
pt3dadd(-114, 67, -138, 2.2)
pt3dadd(-116.5, 69, -138.5, 2.2)
pt3dadd(-120.5, 70, -139, 2.2)
pt3dadd(-118, 72.5, -145, 1.8)
pt3dadd(-115.5, 74.5, -146, 2)
pt3dadd(-111, 77, -148.5, 2.1)
pt3dadd(-106.5, 78, -149.5, 2.1)
pt3dadd(-103.5, 78, -153, 2.1)
pt3dadd(-105, 76, -153.5, 2.5)
pt3dadd(-106.5, 78, -156, 2.4)
pt3dadd(-109, 79.5, -157, 2.4)
pt3dadd(-109.5, 82.5, -157.5, 2.8)
pt3dadd(-109.5, 85.5, -165.5, 2.8)
pt3dadd(-108.5, 90.5, -162.5, 2.9)
pt3dadd(-108, 95, -165.5, 2.6)
pt3dadd(-106, 102, -172, 1.9)
pt3dadd(-104, 100.5, -170.5, 2.3)
pt3dadd(-99, 99.5, -174, 2.3)
pt3dadd(-100, 102, -174.5, 2.4)
pt3dadd(-99.5, 108.5, -179, 2)
pt3dadd(-99, 111.5, -179.5, 2.3)
pt3dadd(-97.5, 114.5, -180.5, 2)
pt3dadd(-96.5, 117, -189.5, 2.3)
pt3dadd(-93, 118.5, -187, 2.3)
pt3dadd(-91.5, 121.5, -192, 2.3)
pt3dadd(-91, 124.5, -192.5, 2.3)
pt3dadd(-90.5, 128.5, -193.5, 2.3)
pt3dadd(-90, 133, -214.5, 1.9)
pt3dadd(-88, 134.5, -209.5, 1.6)
pt3dadd(-84.5, 136, -210.5, 1.5)
pt3dadd(-82.5, 137, -214.5, 1.5)
pt3dadd(-80.5, 139.5, -215.5, 1.5)
pt3dadd(-84.5, 144, -220.5, 1.8)
pt3dadd(-85.5, 146, -221, 1.6)
pt3dadd(-85.5, 150, -222, 1.8)
pt3dadd(-88.5, 155.5, -224, 1.8)
pt3dadd(-89, 159.5, -225, 1.6)
pt3dadd(-90.5, 165, -225, 1.6)
pt3dadd(-91.5, 168, -232.5, 2.4)
pt3dadd(-93.5, 171, -233, 2.3)
pt3dadd(-95.5, 173, -236.5, 2.2)
pt3dadd(-97, 176, -233.5, 2.2)
pt3dadd(-98.5, 179, -237, 1.9)
pt3dadd(-101, 185, -234, 2.1)
pt3dadd(-104, 187.5, -238, 1.9)
pt3dadd(-106.5, 188.5, -238, 1.9)
pt3dadd(-108.5, 191, -238.5, 1.9)
pt3dadd(-109, 194.5, -238.5, 1.6)
pt3dadd(-109, 197.5, -239, 1.8)
pt3dadd(-109, 200.5, -239, 1.8)
pt3dadd(-112.5, 206, -239.5, 1.8)
pt3dadd(-113, 209.5, -239.5, 1.8)
pt3dadd(-113, 212.5, -240, 1.9)
pt3dadd(-115, 216.5, -240, 2.1)
pt3dadd(-118, 218, -244.5, 2)
pt3dadd(-119.5, 221, -244.5, 2.1)
pt3dadd(-121, 224.5, -245, 2.5)
pt3dadd(-124.5, 227, -248.5, 2.2)
pt3dadd(-126, 229, -249, 2.2)
pt3dadd(-128, 232, -249, 2.3)
pt3dadd(-130, 234.5, -249.5, 2)
pt3dadd(-132, 238.5, -249.5, 2)
pt3dadd(-134.5, 242, -250, 2)
pt3dadd(-138, 242.5, -250, 2.6)
pt3dadd(-142, 245, -254, 1.5)
pt3dadd(-143, 247.5, -251, 1.5)
pt3dadd(-145, 249.5, -251, 1.5)
pt3dadd(-146.5, 251.5, -251, 1.7)
pt3dadd(-147, 254, -251.5, 2)
pt3dadd(-148, 256.5, -248, 2.1)
pt3dadd(-150.5, 258, -252, 1.7)
pt3dadd(-153, 260.5, -252, 1.6)
pt3dadd(-152.5, 263, -249, 1.6)
pt3dadd(-153, 266.5, -249, 1.6)
pt3dadd(-153, 269.5, -253, 1.5)
pt3dadd(-155, 271.5, -253, 1.3)
pt3dadd(-155, 277, -253.5, 1.6)
pt3dadd(-153, 278.5, -257, 1.1)
pt3dadd(-153, 282, -257.5, 1)
pt3dadd(-156, 284.5, -257.5, 1.1)
pt3dadd(-160.5, 288.5, -258, 1.1)
pt3dadd(-161.5, 293, -258.5, 1.3)
pt3dadd(-162, 297, -258.5, 1.3)
pt3dadd(-163, 300, -258.5, 1.3)
pt3dadd(-165.5, 302.5, -259, 1.3)
pt3dadd(-166.5, 307, -256, 1.3)
pt3dadd(-164, 311.5, -263.5, 1)
pt3dadd(-165.5, 313.5, -257, 1.3)
pt3dadd(-168, 317.5, -261, 1.2)
pt3dadd(-167, 321, -261, 1.3)
pt3dadd(-167, 325.5, -261.5, 1.1)
pt3dadd(-168.5, 330, -261.5, 1.2)
}
}
proc shape3d_58() {
dend[234] { pt3dadd(-170, 336, -262, 1)
pt3dadd(-170, 341, -266, 1.2)
pt3dadd(-170, 345.5, -266.5, 1.2)
pt3dadd(-172.5, 348.5, -266.5, 1.1)
pt3dadd(-173.5, 350.5, -266.5, 1.2)
pt3dadd(-172.5, 353.5, -267, 1.2)
pt3dadd(-173.5, 358, -267, 1.1)
pt3dadd(-176, 360, -267.5, 1.4)
pt3dadd(-178, 361, -267.5, 1.5)
pt3dadd(-180.5, 366, -268, 1.3)
pt3dadd(-180.5, 369, -268, 1.2)
pt3dadd(-180.5, 372, -275.5, 1.1)
pt3dadd(-183, 377, -276, 1.1)
pt3dadd(-183.5, 379.5, -276, 1.1)
pt3dadd(-184.5, 381.5, -276, 1.1)
pt3dadd(-184, 386, -273.5, 1.6)
pt3dadd(-183.5, 390.5, -277, 1.5)
pt3dadd(-182.5, 395.5, -277.5, 0.9)
pt3dadd(-181.5, 400, -275, 0.8)
pt3dadd(-182, 405, -282.5, 0.9)
pt3dadd(-180, 406, -282.5, 0.9)
pt3dadd(-178, 407.5, -284.5, 0.9)
pt3dadd(-178, 410.5, -287.5, 0.9)
pt3dadd(-181, 410.5, -287.5, 1.1)
pt3dadd(-181, 416, -288, 1.2)
pt3dadd(-181.5, 421.5, -288.5, 1.1)
pt3dadd(-184, 426, -289, 0.9)
pt3dadd(-184.5, 428.5, -289, 1.2)
pt3dadd(-188, 432, -289.5, 1.2)
pt3dadd(-190, 435, -289.5, 1.2)
pt3dadd(-192, 436, -290, 1.1)
pt3dadd(-195.5, 441, -290.5, 0.5)
pt3dadd(-199, 443, -290.5, 0.5)
pt3dadd(-198, 446.5, -291, 0.7)
pt3dadd(-197.5, 452.5, -293.5, 0.4)
pt3dadd(-200, 455, -293.5, 0.4)
pt3dadd(-202.5, 458, -294, 0.9)
pt3dadd(-200.5, 462, -294, 1.3)
pt3dadd(-200.5, 465, -294.5, 0.2)
pt3dadd(-201.5, 468.5, -297, 0.2)
pt3dadd(-203.5, 469.5, -297.5, 0.2)
pt3dadd(-207, 470.5, -297.5, 0.2)
pt3dadd(-208.5, 472, -302.5, 0.4)
pt3dadd(-210.5, 475.5, -302.5, 0.4)
pt3dadd(-209.5, 478, -303, 0.3)
pt3dadd(-208, 479.5, -303, 0.3)
pt3dadd(-214, 481, -308, 0.4)
pt3dadd(-216.5, 481.5, -308.5, 0.5)
pt3dadd(-214.5, 484.5, -311, 0.5)
pt3dadd(-217, 487, -311.5, 1)
pt3dadd(-220.5, 489, -313.5, 1)
pt3dadd(-223.5, 492.5, -316.5, 0.8)
pt3dadd(-229, 493.5, -314.5, 0.7)
pt3dadd(-234, 493.5, -315, 0.7)
pt3dadd(-237, 499.5, -318, 0.7)
pt3dadd(-237.5, 503.5, -318.5, 0.7)
pt3dadd(-240, 507.5, -318.5, 0.7)
pt3dadd(-241.5, 511.5, -314.5, 0.7)
pt3dadd(-244, 514, -317, 0.8)
pt3dadd(-246.5, 518.5, -317, 1.1)
pt3dadd(-248, 521.5, -317.5, 1.1)
pt3dadd(-250, 523, -317.5, 1.1)
pt3dadd(-252, 524.5, -316, 0.4)
pt3dadd(-255, 524.5, -316, 0.4)
pt3dadd(-258, 526, -316.5, 0.4)
pt3dadd(-259.5, 528, -316.5, 0.4)
pt3dadd(-263.5, 526.5, -317, 0.8)
pt3dadd(-268.5, 528.5, -317, 0.8)
pt3dadd(-271.5, 529, -317.5, 0.8)
pt3dadd(-271.5, 533, -317.5, 0.8)
pt3dadd(-272, 535.5, -318, 1)
pt3dadd(-275, 535.5, -318, 1)
pt3dadd(-277.5, 538, -320.5, 0.8)
pt3dadd(-278, 540.5, -320.5, 0.8)
pt3dadd(-280.5, 544, -321, 0.8)
pt3dadd(-280.5, 547.5, -319, 0.8)
pt3dadd(-281.5, 550, -329, 0.8)
pt3dadd(-282.5, 553.5, -325, 0.9)
}
dend[235] {pt3dclear()
pt3dadd(-109.5, 38.5, -113, 8.8)
pt3dadd(-114.5, 36.5, -114.5, 5.1)
pt3dadd(-117, 34.5, -115.5, 5.3)
pt3dadd(-120, 34.5, -116.5, 5.2)
pt3dadd(-125, 34, -121.5, 4.8)
pt3dadd(-128, 35, -122.5, 5)
pt3dadd(-131.5, 35, -123.5, 4.5)
pt3dadd(-134.5, 33.5, -125, 3.8)
pt3dadd(-138, 33.5, -127.5, 5.6)
pt3dadd(-143, 33.5, -128.5, 5.6)
pt3dadd(-149, 33.5, -130, 5.3)
pt3dadd(-152, 34, -133, 4.7)
pt3dadd(-155, 34, -133.5, 4.3)
pt3dadd(-163.5, 33, -142.5, 4.1)
pt3dadd(-165.5, 32, -139, 3.2)
pt3dadd(-167, 29, -142, 3.2)
pt3dadd(-170, 25.5, -143.5, 3.7)
pt3dadd(-173.5, 24.5, -146, 3.7)
pt3dadd(-176.5, 24.5, -147, 3.4)
pt3dadd(-180.5, 23, -147.5, 3)
pt3dadd(-183, 20.5, -146.5, 3)
pt3dadd(-183, 17.5, -149, 3.6)
pt3dadd(-181.5, 15.5, -155, 3.9)
pt3dadd(-180.5, 12.5, -158, 3.7)
pt3dadd(-179, 9.5, -158.5, 3.9)
pt3dadd(-180.5, 7.5, -159, 4.4)
pt3dadd(-186.5, 9, -165, 4.4)
pt3dadd(-189.5, 9.5, -163.5, 4.4)
pt3dadd(-193, 11, -164.5, 3)
pt3dadd(-196, 10, -167, 4.1)
pt3dadd(-199.5, 10, -168, 2.8)
pt3dadd(-202, 5.5, -171.5, 3)
pt3dadd(-202, 2.5, -172, 3.1)
pt3dadd(-204.5, 0, -173, 3.8)
pt3dadd(-208, -1, -173.5, 3.8)
pt3dadd(-210.5, -3, -174, 4.1)
pt3dadd(-212.5, -5.5, -175, 4.6)
pt3dadd(-216, -8, -175.5, 3.1)
pt3dadd(-221.5, -9, -188.5, 3)
pt3dadd(-225, -9, -189.5, 2.7)
pt3dadd(-227.5, -11, -190, 2.7)
pt3dadd(-232.5, -11.5, -191, 3.6)
pt3dadd(-235.5, -11.5, -203.5, 3.8)
pt3dadd(-238.5, -10, -204, 3.2)
pt3dadd(-242.5, -11.5, -209, 3.5)
pt3dadd(-243.5, -15.5, -210, 3.5)
pt3dadd(-245.5, -18.5, -210.5, 3.5)
pt3dadd(-247, -21.5, -214.5, 3.5)
pt3dadd(-251, -22, -215.5, 3.5)
pt3dadd(-254, -23.5, -216.5, 4.1)
pt3dadd(-257.5, -25, -217, 4.1)
pt3dadd(-262.5, -26, -218, 3.5)
pt3dadd(-265, -28, -219, 3.5)
pt3dadd(-267, -30, -219.5, 3.5)
pt3dadd(-272.5, -28, -225, 3.8)
pt3dadd(-277, -30.5, -226, 3.3)
pt3dadd(-280, -33.5, -221.5, 3.3)
pt3dadd(-283, -34, -230.5, 3.3)
pt3dadd(-287.5, -35.5, -232, 3.2)
pt3dadd(-292, -35.5, -233, 3.2)
pt3dadd(-298, -36, -234.5, 3.1)
pt3dadd(-300, -38.5, -244, 3.2)
pt3dadd(-302, -40, -249.5, 4)
pt3dadd(-305.5, -42, -247, 4.1)
pt3dadd(-308.5, -44, -252.5, 4.5)
pt3dadd(-310.5, -49, -254, 4.3)
pt3dadd(-314.5, -47, -267.5, 5.1)
pt3dadd(-317.5, -47, -268.5, 4.7)
pt3dadd(-324.5, -47, -274, 3.5)
pt3dadd(-330, -48, -272.5, 2.9)
pt3dadd(-333, -48.5, -273.5, 3.4)
pt3dadd(-336.5, -51, -275, 4.1)
pt3dadd(-344, -54.5, -289, 3.2)
}
dend[236] {pt3dclear()
pt3dadd(-344, -54.5, -289, 3.2)
pt3dadd(-346.5, -58.5, -294.5, 3)
pt3dadd(-347.5, -62, -295, 2.6)
pt3dadd(-348, -66, -296, 2.9)
pt3dadd(-352, -68.5, -297, 2.6)
pt3dadd(-353.5, -70, -297.5, 3)
pt3dadd(-353.5, -66.5, -305, 2.8)
pt3dadd(-355, -64.5, -304, 2.5)
pt3dadd(-356.5, -63, -306.5, 2.2)
pt3dadd(-359, -62.5, -307, 2)
pt3dadd(-361.5, -63.5, -307.5, 2.3)
pt3dadd(-365, -64, -308, 2.5)
pt3dadd(-369, -64, -311.5, 2.5)
pt3dadd(-372, -64, -309.5, 2.7)
pt3dadd(-371.5, -67, -316, 3.2)
pt3dadd(-372, -72.5, -317, 2.6)
pt3dadd(-377.5, -76.5, -318.5, 2.8)
pt3dadd(-384, -81, -325, 3.1)
pt3dadd(-387.5, -82.5, -344, 2.8)
pt3dadd(-395, -82.5, -350, 2.7)
pt3dadd(-399, -82.5, -350.5, 2.5)
pt3dadd(-403.5, -83, -365, 3.2)
}
dend[237] {pt3dclear()
pt3dadd(-403.5, -83, -365, 3.2)
pt3dadd(-405.5, -84.5, -365, 1.9)
pt3dadd(-407, -86.5, -369.5, 1.9)
pt3dadd(-409, -88.5, -369.5, 1.9)
pt3dadd(-412.5, -88.5, -369.5, 1.9)
pt3dadd(-418, -88.5, -369.5, 1.6)
pt3dadd(-422, -89, -366, 1.7)
pt3dadd(-426, -90, -366, 1.5)
pt3dadd(-427.5, -91.5, -370, 1.9)
pt3dadd(-431.5, -90, -379, 1.6)
pt3dadd(-434.5, -90, -379, 1.6)
pt3dadd(-438, -91, -375, 1.6)
pt3dadd(-442.5, -91, -390, 1.5)
pt3dadd(-446, -91, -391, 1.9)
pt3dadd(-449.5, -91, -391.5, 1.9)
pt3dadd(-450.5, -88.5, -392, 2)
pt3dadd(-454, -91, -393, 1.9)
pt3dadd(-455.5, -96, -393.5, 1.1)
pt3dadd(-460, -96.5, -402.5, 1.2)
pt3dadd(-459, -99, -406.5, 1.4)
pt3dadd(-461, -98, -404.5, 1.4)
pt3dadd(-463.5, -99, -416.5, 1.3)
pt3dadd(-467.5, -103, -417.5, 1)
pt3dadd(-469, -106.5, -418, 1.1)
pt3dadd(-473.5, -108, -419, 1.4)
pt3dadd(-476.5, -110, -416.5, 1.4)
pt3dadd(-478.5, -111.5, -424.5, 1.1)
}
}
proc shape3d_59() {
dend[237] { pt3dadd(-481, -112, -425, 1.1)
pt3dadd(-482, -114, -423, 0.9)
pt3dadd(-483.5, -116, -424, 0.8)
pt3dadd(-482.5, -120.5, -430, 1.2)
pt3dadd(-483.5, -123, -431, 0.9)
pt3dadd(-487, -124, -432.5, 1.1)
pt3dadd(-489.5, -127, -439, 1.2)
pt3dadd(-491.5, -129.5, -440.5, 1.3)
pt3dadd(-493, -131, -441, 0.9)
pt3dadd(-494.5, -132.5, -442, 1.1)
pt3dadd(-499.5, -132.5, -444, 0.9)
pt3dadd(-501.5, -135, -455.5, 0.6)
pt3dadd(-504, -135.5, -461.5, 0.6)
pt3dadd(-507.5, -132.5, -460, 0.8)
pt3dadd(-510, -136, -462, 0.7)
pt3dadd(-514, -136.5, -473.5, 1.1)
pt3dadd(-516.5, -139, -475, 1.1)
pt3dadd(-520, -141.5, -475.5, 0.8)
pt3dadd(-525.5, -144, -476, 0.7)
pt3dadd(-527.5, -145.5, -476.5, 0.6)
pt3dadd(-528.5, -148, -476.5, 0.6)
pt3dadd(-531.5, -151, -481, 0.6)
pt3dadd(-534, -152.5, -481, 0.6)
pt3dadd(-536, -154.5, -481.5, 0.8)
pt3dadd(-537.5, -156.5, -486, 0.8)
pt3dadd(-540, -156, -490, 0.7)
pt3dadd(-543.5, -159.5, -494.5, 0.7)
pt3dadd(-545.5, -161.5, -491.5, 0.7)
pt3dadd(-546.5, -163.5, -491.5, 0.7)
pt3dadd(-545.5, -167, -492, 0.7)
pt3dadd(-550.5, -167, -493, 1)
pt3dadd(-554, -167, -493, 0.5)
pt3dadd(-556.5, -168.5, -497.5, 0.7)
pt3dadd(-560.5, -168.5, -494.5, 1.2)
pt3dadd(-563.5, -168.5, -495, 1.2)
pt3dadd(-566.5, -168.5, -495, 1.1)
pt3dadd(-567.5, -170.5, -507, 0.5)
pt3dadd(-571, -172, -507.5, 0.5)
pt3dadd(-574, -171.5, -520, 0.5)
pt3dadd(-576.5, -173.5, -510.5, 0.5)
pt3dadd(-580.5, -172, -511, 0.4)
pt3dadd(-582.5, -174, -511.5, 0.8)
pt3dadd(-585.5, -175.5, -511.5, 0.9)
pt3dadd(-586.5, -178, -512, 0.8)
pt3dadd(-588, -179.5, -512.5, 0.5)
pt3dadd(-590, -181, -512.5, 0.5)
pt3dadd(-591, -183, -513, 1.4)
pt3dadd(-592, -185.5, -513, 2.2)
pt3dadd(-593.5, -188, -513.5, 1.3)
pt3dadd(-595, -190.5, -526, 0.7)
}
dend[238] {pt3dclear()
pt3dadd(-403.5, -83, -365, 3.2)
pt3dadd(-403.5, -86.5, -365, 2.6)
pt3dadd(-406.5, -89.5, -361, 2.6)
pt3dadd(-405.5, -87.5, -357, 2.6)
pt3dadd(-408.5, -86.5, -370, 2.1)
pt3dadd(-413.5, -86.5, -379, 1.7)
pt3dadd(-416, -89.5, -374.5, 1.9)
pt3dadd(-414, -92.5, -375, 1.9)
pt3dadd(-418, -96, -383, 1.9)
pt3dadd(-420, -97.5, -391.5, 1.5)
pt3dadd(-421.5, -99.5, -389, 1.5)
pt3dadd(-426, -99.5, -397.5, 1.6)
pt3dadd(-428.5, -100, -398, 1.6)
pt3dadd(-428.5, -104, -398.5, 1.8)
pt3dadd(-427.5, -109, -403.5, 2.1)
pt3dadd(-426.5, -112, -404, 2.1)
pt3dadd(-427, -117.5, -405.5, 2.2)
pt3dadd(-431, -119.5, -413.5, 2.6)
pt3dadd(-436.5, -119.5, -415, 2.4)
pt3dadd(-438, -121, -423.5, 2.3)
pt3dadd(-441, -118.5, -424, 2.2)
pt3dadd(-444, -117.5, -425, 2.6)
pt3dadd(-445, -120, -439.5, 1.7)
pt3dadd(-446.5, -121.5, -437, 2.1)
pt3dadd(-448.5, -124, -452, 2.1)
pt3dadd(-450, -126.5, -457.5, 2.1)
pt3dadd(-451, -128.5, -454.5, 2.1)
pt3dadd(-451.5, -133.5, -456, 2.1)
pt3dadd(-449.5, -132, -466, 1.7)
pt3dadd(-449.5, -129, -467, 1.7)
pt3dadd(-452, -127.5, -468, 1.7)
pt3dadd(-454.5, -126, -469, 1.7)
pt3dadd(-455, -128.5, -476.5, 1.9)
pt3dadd(-455, -131.5, -477.5, 1.9)
pt3dadd(-456.5, -133.5, -475, 2.1)
pt3dadd(-462.5, -134.5, -491, 1.8)
pt3dadd(-465, -133.5, -495, 1.6)
pt3dadd(-467.5, -135.5, -499, 1.8)
pt3dadd(-469.5, -137.5, -499.5, 1.6)
pt3dadd(-472, -139, -496.5, 1.5)
pt3dadd(-474.5, -140, -496.5, 1.6)
pt3dadd(-477.5, -140, -497, 1.6)
pt3dadd(-474, -138, -513, 1.2)
pt3dadd(-469.5, -139.5, -510.5, 1.1)
pt3dadd(-471.5, -141, -515, 1.2)
pt3dadd(-476, -141.5, -519, 1.1)
pt3dadd(-474.5, -143, -527, 1.3)
pt3dadd(-476.5, -144.5, -524, 1.5)
pt3dadd(-480, -145, -524.5, 1.6)
pt3dadd(-486, -148, -526.5, 1.9)
pt3dadd(-489, -149, -538, 1.9)
pt3dadd(-490, -153, -550.5, 1.8)
pt3dadd(-490, -158, -557, 2.5)
pt3dadd(-490.5, -153.5, -564.5, 1.5)
pt3dadd(-493.5, -151.5, -565.5, 1.5)
pt3dadd(-495.5, -148.5, -567, 1.9)
pt3dadd(-499, -148, -573.5, 1.8)
pt3dadd(-502, -149, -575, 2)
pt3dadd(-505.5, -149.5, -572, 2.2)
pt3dadd(-505, -153.5, -575.5, 2.1)
pt3dadd(-505, -157.5, -579.5, 1.7)
pt3dadd(-507, -160.5, -583, 1.5)
pt3dadd(-510.5, -161.5, -583.5, 1.5)
pt3dadd(-515.5, -161.5, -584, 1.6)
pt3dadd(-517, -164, -588, 0.8)
pt3dadd(-520, -166.5, -589.5, 1.6)
pt3dadd(-522, -164.5, -590, 1.5)
pt3dadd(-524, -163.5, -590, 1.3)
pt3dadd(-526.5, -162, -590.5, 1.2)
pt3dadd(-528, -163.5, -593.5, 1.2)
pt3dadd(-529.5, -165.5, -597, 1.6)
pt3dadd(-531.5, -168, -597.5, 1.4)
pt3dadd(-533.5, -170.5, -597.5, 1.6)
pt3dadd(-535.5, -174.5, -598, 1.1)
pt3dadd(-536.5, -179, -598.5, 1.6)
pt3dadd(-538.5, -177.5, -602, 1.5)
pt3dadd(-541.5, -176, -602.5, 1.8)
pt3dadd(-544.5, -175.5, -602.5, 1.7)
pt3dadd(-546, -177.5, -607, 1.5)
pt3dadd(-548, -181, -613.5, 1.5)
pt3dadd(-550.5, -181, -617, 1.6)
}
dend[239] {pt3dclear()
pt3dadd(-344, -54.5, -289, 3.2)
pt3dadd(-349, -54.5, -286.5, 1.9)
pt3dadd(-356, -56.5, -280.5, 1.7)
pt3dadd(-361.5, -56.5, -278, 1.6)
pt3dadd(-365.5, -55.5, -278.5, 1.6)
pt3dadd(-370.5, -52.5, -268, 2.7)
pt3dadd(-373, -50, -268, 2.5)
pt3dadd(-376.5, -45.5, -268, 1.8)
pt3dadd(-379.5, -44.5, -268, 1.9)
pt3dadd(-384, -44.5, -265, 1.8)
pt3dadd(-388, -46, -265, 2.1)
pt3dadd(-391.5, -46, -265, 2.3)
pt3dadd(-398.5, -48, -268.5, 2.2)
pt3dadd(-402, -48, -268.5, 0.9)
pt3dadd(-405.5, -48, -269, 0.9)
pt3dadd(-408.5, -45.5, -272.5, 0.9)
pt3dadd(-412, -45.5, -272.5, 1)
pt3dadd(-416.5, -46.5, -272.5, 1.1)
pt3dadd(-421.5, -43.5, -272.5, 1.6)
pt3dadd(-424.5, -42.5, -273, 1.3)
pt3dadd(-427, -41.5, -273, 1.4)
pt3dadd(-430, -43, -266, 1.9)
pt3dadd(-434.5, -43.5, -266, 1.9)
pt3dadd(-438, -45.5, -266, 1.9)
pt3dadd(-443.5, -48.5, -266, 2.2)
pt3dadd(-446.5, -50.5, -270, 1.9)
pt3dadd(-451, -51, -270, 1.9)
pt3dadd(-460, -51, -270, 1.5)
pt3dadd(-465.5, -51.5, -270, 1.5)
pt3dadd(-469, -55, -270.5, 1.5)
pt3dadd(-472.5, -57, -270.5, 1.8)
pt3dadd(-474.5, -60, -270.5, 1.7)
pt3dadd(-477.5, -61, -270.5, 1.6)
pt3dadd(-482, -62.5, -267, 1.3)
pt3dadd(-486, -62.5, -267, 1.2)
pt3dadd(-489, -62.5, -267, 1.3)
pt3dadd(-491.5, -64, -267.5, 1.8)
pt3dadd(-497.5, -66.5, -267.5, 1.8)
pt3dadd(-501, -68, -267.5, 1.9)
pt3dadd(-503.5, -68.5, -274.5, 1.9)
pt3dadd(-507, -70, -271, 2.2)
pt3dadd(-510.5, -68.5, -277.5, 1.7)
pt3dadd(-510, -65, -277.5, 1.7)
pt3dadd(-513, -66, -284.5, 1.2)
pt3dadd(-516.5, -67, -284.5, 1)
pt3dadd(-520, -68.5, -285, 1.2)
pt3dadd(-523.5, -68.5, -285, 1.2)
pt3dadd(-526.5, -69, -285, 1.2)
pt3dadd(-529, -71.5, -285, 1.2)
pt3dadd(-533.5, -74.5, -285.5, 0.9)
pt3dadd(-537, -77.5, -283.5, 0.9)
pt3dadd(-540.5, -77.5, -293, 0.9)
pt3dadd(-544, -77.5, -291, 1.3)
pt3dadd(-545.5, -79.5, -291, 1.3)
pt3dadd(-546.5, -82, -291, 0.9)
pt3dadd(-549, -85, -296.5, 0.8)
pt3dadd(-552.5, -85, -296.5, 0.8)
pt3dadd(-556, -85, -297, 1.1)
pt3dadd(-558.5, -86.5, -297, 1.1)
pt3dadd(-560.5, -88.5, -297, 1.2)
pt3dadd(-563, -89, -297, 0.9)
pt3dadd(-566, -90, -297.5, 1.1)
pt3dadd(-568, -91.5, -295, 1.3)
pt3dadd(-569, -95, -297.5, 1)
pt3dadd(-569, -98, -298, 0.5)
pt3dadd(-570.5, -99.5, -298, 0.5)
pt3dadd(-573.5, -104, -298, 0.9)
pt3dadd(-578, -106.5, -298.5, 0.9)
pt3dadd(-582, -106.5, -296, 0.9)
}
}
proc shape3d_60() {
dend[239] { pt3dadd(-585, -106.5, -294, 0.6)
pt3dadd(-589, -107.5, -301, 0.7)
pt3dadd(-592.5, -107.5, -301.5, 1.1)
pt3dadd(-595, -108.5, -304, 1.1)
pt3dadd(-597, -110.5, -304, 1.1)
pt3dadd(-602, -110, -302, 0.5)
pt3dadd(-604, -112.5, -305, 1.1)
pt3dadd(-606.5, -117, -305, 0.4)
pt3dadd(-610.5, -115.5, -305.5, 0.4)
pt3dadd(-613, -116.5, -310, 0.9)
pt3dadd(-615.5, -120, -310.5, 0.8)
pt3dadd(-618, -122, -310.5, 0.8)
pt3dadd(-623, -122, -306.5, 0.7)
pt3dadd(-625.5, -123, -308.5, 0.3)
pt3dadd(-631, -126, -309, 0.3)
pt3dadd(-634, -127, -309, 0.4)
pt3dadd(-638, -127.5, -313.5, 1)
pt3dadd(-641.5, -128.5, -314, 0.5)
pt3dadd(-647.5, -129.5, -310, 0.4)
pt3dadd(-648.5, -131.5, -310, 0.8)
pt3dadd(-651.5, -132.5, -310, 0.8)
pt3dadd(-655.5, -132.5, -310, 0.7)
pt3dadd(-658.5, -132.5, -310.5, 1)
pt3dadd(-662, -132.5, -310.5, 0.9)
pt3dadd(-666, -132.5, -310.5, 1.2)
pt3dadd(-667.5, -134.5, -309, 0.8)
pt3dadd(-671.5, -135.5, -309, 0.6)
pt3dadd(-675.5, -136, -309, 0.5)
pt3dadd(-678.5, -140, -309.5, 0.5)
pt3dadd(-681.5, -141.5, -309.5, 0.5)
pt3dadd(-686.5, -143.5, -310, 0.5)
pt3dadd(-689.5, -144, -314.5, 0.5)
pt3dadd(-692, -147, -314.5, 0.5)
pt3dadd(-698, -148, -317, 1.4)
pt3dadd(-701, -149, -317, 1.4)
pt3dadd(-705.5, -151, -317.5, 0.7)
pt3dadd(-710, -151.5, -317.5, 0.6)
}
dend[240] {pt3dclear()
pt3dadd(-29.5, 4, -41.5, 14.1)
pt3dadd(-32.5, 8, -64.5, 7.9)
pt3dadd(-36, 10.5, -75, 8.2)
pt3dadd(-32, 5, -73, 7)
pt3dadd(-29, 1, -66.5, 6.4)
pt3dadd(-29.5, -3, -65, 6.1)
pt3dadd(-31.5, -5, -65, 5.3)
pt3dadd(-34.5, -4.5, -68, 5.8)
pt3dadd(-37, 0, -57.5, 5.9)
pt3dadd(-34.5, 0.5, -60.5, 5.9)
}
dend[241] {pt3dclear()
pt3dadd(-34.5, 0.5, -60.5, 5.9)
pt3dadd(-34.5, 6, -60, 2.5)
pt3dadd(-36.5, 9, -59.5, 2.2)
pt3dadd(-40, 9.5, -52.5, 1.6)
pt3dadd(-43, 9.5, -52.5, 1.5)
pt3dadd(-47, 9, -52, 1.2)
pt3dadd(-50.5, 10, -51.5, 1.7)
pt3dadd(-51.5, 14.5, -53.5, 1.5)
pt3dadd(-53.5, 17.5, -53, 1.5)
pt3dadd(-56, 23.5, -55, 1.3)
pt3dadd(-56.5, 26.5, -55, 1.3)
pt3dadd(-56.5, 30, -57.5, 1.1)
pt3dadd(-57, 33, -54, 1.1)
pt3dadd(-58, 35.5, -53.5, 1.2)
pt3dadd(-56.5, 40, -49.5, 1.3)
pt3dadd(-57.5, 43.5, -49, 1.1)
pt3dadd(-58.5, 46, -49, 1.2)
pt3dadd(-57, 48.5, -51.5, 1.2)
pt3dadd(-58, 51, -51, 0.9)
pt3dadd(-57.5, 57, -47, 0.8)
pt3dadd(-57, 61, -49.5, 0.9)
pt3dadd(-58.5, 65.5, -48.5, 0.8)
pt3dadd(-60, 68.5, -48, 0.8)
pt3dadd(-61.5, 71, -47.5, 0.8)
pt3dadd(-63.5, 73.5, -44, 1)
pt3dadd(-67, 76.5, -43.5, 1.2)
pt3dadd(-66, 79, -40, 1.1)
pt3dadd(-64, 83, -39, 1.1)
pt3dadd(-65.5, 85, -39, 1.1)
pt3dadd(-66.5, 88.5, -38.5, 0.9)
pt3dadd(-67.5, 90.5, -38, 0.9)
pt3dadd(-67, 95, -37.5, 1.2)
pt3dadd(-68, 97, -37.5, 1.3)
pt3dadd(-69, 103, -39.5, 1.2)
pt3dadd(-69.5, 106, -36, 1.3)
pt3dadd(-72.5, 113, -35, 1.3)
pt3dadd(-73.5, 115.5, -34.5, 1.3)
pt3dadd(-74.5, 122, -34, 1.2)
pt3dadd(-75.5, 126.5, -33, 1.1)
pt3dadd(-76, 130, -32.5, 0.9)
pt3dadd(-79, 133, -32, 0.9)
pt3dadd(-79.5, 141.5, -25, 0.8)
pt3dadd(-79.5, 146.5, -24.5, 1.6)
pt3dadd(-83.5, 151.5, -24.5, 1.6)
pt3dadd(-83, 155, -18.5, 1.1)
pt3dadd(-83.5, 157.5, -30.5, 0.8)
pt3dadd(-85, 161.5, -27.5, 0.8)
pt3dadd(-82.5, 164.5, -30.5, 1.7)
pt3dadd(-83, 169.5, -27.5, 1.9)
pt3dadd(-83, 174, -27, 1)
pt3dadd(-86.5, 176, -27, 1)
pt3dadd(-85.5, 179, -27, 1.6)
pt3dadd(-86.5, 182, -18, 1.2)
pt3dadd(-86.5, 185.5, -30, 0.7)
pt3dadd(-87, 188, -33, 0.5)
pt3dadd(-89, 192, -30, 0.5)
pt3dadd(-90.5, 198.5, -29.5, 0.5)
pt3dadd(-94, 202.5, -32.5, 0.5)
pt3dadd(-94.5, 205.5, -23.5, 0.6)
pt3dadd(-98, 210, -23.5, 0.6)
pt3dadd(-100, 213.5, -20.5, 0.6)
pt3dadd(-100.5, 220, -20.5, 0.6)
pt3dadd(-104, 222.5, -20.5, 0.6)
pt3dadd(-106.5, 226, -20.5, 0.6)
pt3dadd(-110, 228, -20.5, 0.6)
pt3dadd(-111.5, 232.5, -20, 0.6)
pt3dadd(-112.5, 237, -20, 0.6)
pt3dadd(-112.5, 241, -20, 0.6)
pt3dadd(-113.5, 243.5, -20, 0.6)
pt3dadd(-116.5, 245.5, -20, 0.6)
pt3dadd(-117.5, 249, -17, 0.6)
pt3dadd(-116, 253.5, -26, 0.6)
pt3dadd(-116, 256.5, -20, 0.6)
pt3dadd(-119, 258, -20, 0.6)
pt3dadd(-119, 264, -19.5, 0.6)
pt3dadd(-119, 269, -19.5, 0.6)
pt3dadd(-122.5, 281, -28.5, 0.9)
pt3dadd(-125, 286.5, -19.5, 0.9)
pt3dadd(-126, 290.5, -25.5, 0.9)
pt3dadd(-127, 294, -25.5, 0.9)
pt3dadd(-130, 298, -25.5, 0.9)
pt3dadd(-133, 302, -25, 0.9)
pt3dadd(-134, 307.5, -25, 0.9)
pt3dadd(-134, 310.5, -25, 0.9)
pt3dadd(-136.5, 314.5, -25, 0.9)
pt3dadd(-138.5, 318.5, -25, 0.9)
pt3dadd(-138.5, 324.5, -25, 0.9)
pt3dadd(-137, 328, -25, 0.8)
pt3dadd(-137, 331.5, -25, 0.8)
pt3dadd(-137.5, 337, -22, 0.8)
pt3dadd(-141.5, 341, -22, 0.8)
pt3dadd(-143, 343.5, -18.5, 0.8)
pt3dadd(-143, 351, -30.5, 0.6)
pt3dadd(-147, 353.5, -18.5, 0.6)
pt3dadd(-149.5, 355.5, -18.5, 0.6)
pt3dadd(-150, 360, -18.5, 0.6)
pt3dadd(-149.5, 364.5, -24.5, 0.3)
pt3dadd(-150.5, 368, -24.5, 0.1)
pt3dadd(-153.5, 370.5, -24, 0.1)
pt3dadd(-154, 376, -24, 0.1)
pt3dadd(-151, 381.5, -24, 0.1)
pt3dadd(-146, 385.5, -24, 0.1)
pt3dadd(-143, 388, -24, 0.1)
pt3dadd(-139, 388.5, -24, 0.1)
pt3dadd(-136, 390.5, -24, 0.1)
pt3dadd(-132.5, 390.5, -21, 0.1)
pt3dadd(-128.5, 392.5, -21, 0.1)
pt3dadd(-126.5, 398, -18, 0.1)
}
dend[242] {pt3dclear()
pt3dadd(-34.5, 0.5, -60.5, 5.9)
pt3dadd(-31, 1, -65.5, 5.9)
pt3dadd(-28, 1, -70, 5.9)
pt3dadd(-24, 0.5, -75, 5.7)
pt3dadd(-19, -1.5, -83.5, 7.8)
}
dend[243] {pt3dclear()
pt3dadd(-19, -1.5, -83.5, 7.8)
pt3dadd(-18, -3.5, -86, 7.6)
pt3dadd(-13.5, -4, -90.5, 7.5)
pt3dadd(-9, -4, -91, 6.6)
pt3dadd(-0.5, -4, -93, 7.6)
pt3dadd(5.5, -5.5, -96, 7.9)
pt3dadd(13, -7.5, -98, 8.1)
pt3dadd(18.5, -8.5, -100.5, 7.9)
pt3dadd(24, -8.5, -103.5, 5)
pt3dadd(24, -7, -108, 5)
}
dend[244] {pt3dclear()
pt3dadd(24, -7, -108, 5)
pt3dadd(27, -3.5, -104.5, 4.8)
pt3dadd(29.5, 0, -102.5, 5)
pt3dadd(37.5, 6, -109, 6.5)
pt3dadd(41, 8, -114, 6.5)
pt3dadd(43.5, 10, -112.5, 7.1)
pt3dadd(42.5, 13.5, -113, 7.7)
pt3dadd(46, 13.5, -118.5, 7.3)
pt3dadd(55, 16.5, -121.5, 8.1)
pt3dadd(59.5, 17.5, -125, 8.1)
pt3dadd(63.5, 22.5, -126, 7.3)
pt3dadd(65.5, 26, -127, 7.6)
pt3dadd(65.5, 29, -127.5, 7.5)
pt3dadd(65.5, 23, -149, 6.7)
pt3dadd(67.5, 20.5, -153.5, 7.7)
pt3dadd(69, 19, -158, 8.1)
pt3dadd(70.5, 19, -158.5, 9.1)
}
dend[245] {pt3dclear()
pt3dadd(70.5, 19, -158.5, 9.1)
pt3dadd(76, 18.5, -159, 5)
pt3dadd(78, 19.5, -166.5, 4.3)
pt3dadd(78.5, 23, -166.5, 4.5)
pt3dadd(76.5, 27.5, -167.5, 4.8)
pt3dadd(76.5, 31.5, -175, 4.8)
pt3dadd(72.5, 37.5, -175, 4.6)
pt3dadd(70.5, 39, -180.5, 4.6)
pt3dadd(68, 41.5, -182, 4.6)
pt3dadd(65.5, 44.5, -188, 4.6)
pt3dadd(69.5, 44, -194, 4.6)
pt3dadd(71.5, 42, -192.5, 3.9)
pt3dadd(74, 41, -193.5, 3.9)
}
}
proc shape3d_61() {
dend[245] { pt3dadd(75.5, 38, -199.5, 4.3)
}
dend[246] {pt3dclear()
pt3dadd(75.5, 38, -199.5, 4.3)
pt3dadd(73, 41.5, -199.5, 2.6)
pt3dadd(71, 44.5, -193.5, 3)
pt3dadd(71, 48, -194, 3)
pt3dadd(70, 52, -194.5, 3)
pt3dadd(71.5, 55.5, -195, 3)
pt3dadd(75, 55.5, -195, 2.6)
pt3dadd(77, 57, -199, 2.9)
pt3dadd(77.5, 60.5, -199.5, 3.1)
pt3dadd(76.5, 66.5, -208.5, 2.9)
pt3dadd(80.5, 71, -212.5, 3.2)
pt3dadd(84.5, 75, -217, 3.1)
pt3dadd(89, 79, -211, 3.3)
pt3dadd(97, 81.5, -219.5, 4.1)
pt3dadd(100, 83, -220, 4.6)
pt3dadd(102, 86, -217, 4.8)
pt3dadd(104, 88.5, -225, 4.8)
pt3dadd(109, 99.5, -231, 3.9)
pt3dadd(110.5, 102, -232, 2.8)
pt3dadd(111, 109, -234, 2.7)
pt3dadd(112.5, 112.5, -240, 3.5)
pt3dadd(114.5, 116.5, -241, 3.4)
pt3dadd(117, 118.5, -242, 3.4)
pt3dadd(122, 119, -246, 2.6)
pt3dadd(127, 123.5, -250.5, 3.2)
pt3dadd(127.5, 128, -252, 3)
pt3dadd(129.5, 131.5, -253, 3)
pt3dadd(132, 133, -254, 3)
pt3dadd(136, 132.5, -257.5, 3.1)
pt3dadd(138, 134, -266.5, 2.6)
pt3dadd(142.5, 140, -265, 3.4)
pt3dadd(145.5, 141, -265.5, 3.4)
pt3dadd(147.5, 142, -275, 3.7)
pt3dadd(151.5, 145.5, -284, 3.7)
pt3dadd(155.5, 147.5, -284.5, 3.7)
pt3dadd(158, 150, -289, 3.9)
pt3dadd(160.5, 153, -289.5, 3.2)
pt3dadd(164.5, 157.5, -290, 2.7)
pt3dadd(172.5, 161.5, -300.5, 3.4)
pt3dadd(176, 164, -314.5, 3.2)
pt3dadd(179.5, 167.5, -306.5, 3.2)
pt3dadd(183.5, 171, -316.5, 3.7)
}
dend[247] {pt3dclear()
pt3dadd(183.5, 171, -316.5, 3.7)
pt3dadd(186.5, 176, -317, 2.6)
pt3dadd(186.5, 179.5, -322, 2.6)
pt3dadd(189, 182.5, -319, 2.7)
pt3dadd(193.5, 191, -325.5, 3)
pt3dadd(197, 197.5, -327, 3)
pt3dadd(202, 207.5, -325, 2.9)
pt3dadd(202.5, 212, -325, 1.8)
pt3dadd(200, 215.5, -325.5, 1.8)
pt3dadd(199.5, 219, -336.5, 1.8)
pt3dadd(197.5, 225.5, -337.5, 1.8)
pt3dadd(197, 231, -338, 1.8)
pt3dadd(198.5, 233.5, -338, 1.8)
pt3dadd(200.5, 240.5, -335.5, 1.7)
pt3dadd(198.5, 246.5, -340, 1.8)
pt3dadd(198.5, 250, -340, 1.8)
pt3dadd(199.5, 254, -340.5, 1.8)
pt3dadd(200.5, 258, -344, 1.8)
pt3dadd(202, 261.5, -344.5, 1.6)
pt3dadd(203, 265.5, -345, 1.2)
pt3dadd(205.5, 269.5, -345.5, 1.4)
pt3dadd(207.5, 272.5, -349.5, 1)
pt3dadd(207.5, 277.5, -350, 1.4)
pt3dadd(206.5, 280, -350, 1.7)
pt3dadd(206, 283, -347, 1.7)
pt3dadd(205, 285.5, -347.5, 1.7)
pt3dadd(205, 289, -355, 1.1)
pt3dadd(209, 297.5, -359, 1.6)
pt3dadd(210.5, 300.5, -359.5, 2.1)
pt3dadd(213, 303.5, -359.5, 1.7)
pt3dadd(216, 304.5, -367.5, 1.3)
pt3dadd(216.5, 307.5, -368, 1.3)
pt3dadd(215.5, 313.5, -368.5, 1.9)
pt3dadd(216.5, 318.5, -369, 1.3)
}
dend[248] {pt3dclear()
pt3dadd(216.5, 318.5, -369, 1.3)
pt3dadd(216.5, 321.5, -369, 1.3)
pt3dadd(216, 324, -369.5, 1.3)
pt3dadd(218, 326.5, -369.5, 1.1)
pt3dadd(217, 329, -370, 1.1)
pt3dadd(216, 331.5, -370, 1)
pt3dadd(217.5, 334, -370.5, 1)
pt3dadd(219.5, 337, -370.5, 1.2)
pt3dadd(219, 341, -371, 1.1)
pt3dadd(218, 344.5, -371.5, 0.7)
pt3dadd(220, 347.5, -375, 0.7)
pt3dadd(224, 347.5, -387, 1.5)
pt3dadd(226, 352, -387.5, 1.5)
pt3dadd(226, 358.5, -395.5, 1.5)
pt3dadd(225, 361, -396, 1.5)
pt3dadd(225, 364, -396, 1.1)
pt3dadd(219.5, 366, -392.5, 0.7)
pt3dadd(220, 369.5, -397, 1.6)
pt3dadd(218.5, 374, -405, 1.2)
pt3dadd(215.5, 376, -405.5, 0.8)
pt3dadd(214.5, 380.5, -405.5, 0.8)
pt3dadd(214, 383, -406, 0.8)
pt3dadd(210, 385, -406, 0.8)
pt3dadd(208, 388, -406.5, 1.2)
pt3dadd(206, 392, -406.5, 1.1)
pt3dadd(203, 394, -407, 1)
pt3dadd(200, 397, -407, 1)
pt3dadd(197, 400.5, -407.5, 1)
pt3dadd(195, 403.5, -408, 1)
pt3dadd(195, 407.5, -408, 1)
pt3dadd(195, 410.5, -408, 0.9)
pt3dadd(195, 414.5, -408.5, 0.9)
pt3dadd(193, 417.5, -408.5, 1.1)
pt3dadd(194, 420, -417.5, 0.3)
pt3dadd(194.5, 424, -417.5, 1)
pt3dadd(192, 427.5, -422, 1)
pt3dadd(191.5, 431, -414.5, 1.1)
pt3dadd(190.5, 435, -415, 1.3)
pt3dadd(190.5, 439, -415, 1.3)
pt3dadd(188, 441, -415, 1.3)
pt3dadd(186, 443.5, -415.5, 1.3)
pt3dadd(182.5, 446, -415.5, 1.3)
pt3dadd(181, 446.5, -412, 1.1)
}
dend[249] {pt3dclear()
pt3dadd(216.5, 318.5, -369, 1.3)
pt3dadd(218, 321, -367, 1.6)
pt3dadd(217.5, 326, -372.5, 1.6)
pt3dadd(215.5, 328.5, -373.5, 1.6)
pt3dadd(212, 330.5, -375, 1.6)
pt3dadd(210.5, 334, -376, 1.5)
pt3dadd(208, 337.5, -391.5, 1.5)
pt3dadd(208, 343, -402.5, 1.5)
pt3dadd(209.5, 344.5, -399.5, 1)
pt3dadd(212.5, 347.5, -405.5, 1.6)
pt3dadd(210.5, 348.5, -406.5, 1.6)
pt3dadd(216.5, 363.5, -425, 3.2)
pt3dadd(213, 365, -428.5, 1.6)
pt3dadd(211.5, 366.5, -432.5, 1.6)
pt3dadd(209.5, 368, -436, 1.6)
pt3dadd(208, 370, -436, 1.8)
pt3dadd(207.5, 375, -436.5, 1.3)
pt3dadd(206, 376.5, -436.5, 1.3)
pt3dadd(204.5, 378.5, -440, 1.3)
pt3dadd(204, 382.5, -440.5, 1.5)
pt3dadd(202.5, 384, -440.5, 1.3)
pt3dadd(200.5, 386, -437.5, 1.3)
pt3dadd(197, 386.5, -441, 1.6)
pt3dadd(196, 388.5, -441.5, 1.5)
pt3dadd(195.5, 391, -445, 0.9)
pt3dadd(194, 392.5, -445, 0.9)
pt3dadd(192, 395, -450, 0.9)
pt3dadd(189, 395, -450.5, 1.1)
pt3dadd(187.5, 398, -450.5, 1.1)
pt3dadd(186.5, 400, -450.5, 1.3)
pt3dadd(184.5, 403.5, -454.5, 1)
pt3dadd(182, 405, -454.5, 1)
pt3dadd(179.5, 406.5, -455, 0.9)
pt3dadd(176.5, 406, -455, 1.1)
pt3dadd(173.5, 405.5, -455, 1.6)
pt3dadd(170.5, 405.5, -459, 1.6)
pt3dadd(169, 403.5, -462.5, 0.7)
pt3dadd(165.5, 404.5, -466.5, 1.1)
pt3dadd(162.5, 404.5, -470, 0.9)
pt3dadd(159.5, 404, -467, 1)
pt3dadd(157, 402, -467, 1)
pt3dadd(154.5, 400, -467, 1.1)
pt3dadd(148, 399, -475, 1)
pt3dadd(145.5, 401.5, -491.5, 0.9)
pt3dadd(144.5, 406, -503, 0.9)
pt3dadd(147, 406.5, -504, 0.9)
pt3dadd(150, 404.5, -505, 0.9)
pt3dadd(150.5, 407, -511.5, 1.1)
pt3dadd(149, 410.5, -512.5, 1)
pt3dadd(146, 413.5, -519, 1.7)
pt3dadd(144, 417, -520.5, 1.7)
pt3dadd(142, 420.5, -521.5, 1.7)
pt3dadd(141.5, 423, -522.5, 1.7)
pt3dadd(140, 425, -523.5, 1.7)
pt3dadd(137.5, 428.5, -525, 1.7)
pt3dadd(135.5, 433.5, -531.5, 1.6)
pt3dadd(136.5, 438, -534.5, 1.1)
pt3dadd(135, 440, -544, 1.1)
pt3dadd(133, 442, -544, 0.7)
pt3dadd(131, 443, -544.5, 0.7)
pt3dadd(128, 443, -544.5, 0.7)
pt3dadd(124.5, 443, -544.5, 0.7)
pt3dadd(124, 447, -550.5, 1.4)
pt3dadd(122.5, 449.5, -547.5, 0.5)
pt3dadd(122.5, 452.5, -550.5, 0.5)
pt3dadd(119.5, 454, -551, 0.9)
pt3dadd(116.5, 455, -551, 0.5)
pt3dadd(117.5, 457.5, -551, 0.5)
pt3dadd(115.5, 461, -557.5, 0.4)
pt3dadd(114, 462.5, -557.5, 0.4)
pt3dadd(116, 465.5, -558, 0.8)
pt3dadd(120, 468, -558, 0.9)
pt3dadd(118, 471.5, -561, 0.9)
pt3dadd(115, 472.5, -561, 0.9)
pt3dadd(113, 473.5, -561, 0.9)
pt3dadd(113, 478, -567, 0.9)
pt3dadd(114.5, 479.5, -571, 0.7)
pt3dadd(114, 482, -571, 0.7)
pt3dadd(115.5, 486, -567.5, 0.8)
pt3dadd(113.5, 491, -571, 0.9)
}
}
proc shape3d_62() {
dend[249] { pt3dadd(112, 492.5, -567.5, 0.8)
pt3dadd(111.5, 496, -567.5, 0.8)
pt3dadd(111, 498.5, -571.5, 0.1)
pt3dadd(107, 499.5, -571.5, 0.1)
pt3dadd(103, 502, -571.5, 0.1)
pt3dadd(103, 505, -571.5, 0.1)
pt3dadd(100.5, 508.5, -571.5, 0.1)
pt3dadd(98.5, 511.5, -571.5, 0.1)
pt3dadd(97.5, 516.5, -568.5, 0.1)
}
dend[250] {pt3dclear()
pt3dadd(183.5, 171, -316.5, 3.7)
pt3dadd(187, 173.5, -320.5, 3)
pt3dadd(191.5, 174.5, -325, 3)
pt3dadd(196.5, 173.5, -328.5, 1.4)
pt3dadd(200.5, 174, -335.5, 0.9)
pt3dadd(202, 176.5, -336, 0.7)
pt3dadd(205, 178, -342.5, 1.3)
pt3dadd(208, 181.5, -343, 1.3)
pt3dadd(212.5, 183, -347, 1.3)
pt3dadd(215.5, 185, -343.5, 1)
pt3dadd(218.5, 187.5, -347.5, 1.5)
pt3dadd(221.5, 189.5, -347.5, 1)
pt3dadd(222, 192, -354.5, 0.8)
pt3dadd(224, 194.5, -354.5, 0.8)
pt3dadd(229.5, 195.5, -355, 0.8)
pt3dadd(233, 195.5, -355, 0.8)
pt3dadd(235, 198.5, -355.5, 0.9)
pt3dadd(240, 199.5, -355.5, 0.7)
pt3dadd(246, 199.5, -359.5, 0.7)
pt3dadd(248, 200.5, -360, 1.1)
pt3dadd(251.5, 201.5, -363.5, 1.2)
pt3dadd(255.5, 203.5, -364, 1.2)
pt3dadd(257.5, 205.5, -367, 0.7)
pt3dadd(257.5, 208.5, -374.5, 0.7)
pt3dadd(261, 208.5, -371.5, 1.8)
pt3dadd(264.5, 209.5, -365, 1.5)
pt3dadd(268, 210, -365.5, 0.9)
pt3dadd(271.5, 212.5, -365.5, 0.9)
pt3dadd(273.5, 213.5, -366, 0.9)
pt3dadd(277.5, 214, -366, 0.1)
pt3dadd(280.5, 214, -366, 0.1)
pt3dadd(284, 216.5, -366.5, 0.1)
pt3dadd(287.5, 219.5, -366.5, 0.1)
pt3dadd(292, 221.5, -367, 0.1)
pt3dadd(295, 221.5, -367, 0.1)
pt3dadd(298.5, 221.5, -367.5, 0.1)
pt3dadd(303.5, 224.5, -367.5, 0.1)
pt3dadd(308, 226.5, -361.5, 0.1)
}
dend[251] {pt3dclear()
pt3dadd(75.5, 38, -199.5, 4.3)
pt3dadd(77, 41.5, -215.5, 3.7)
pt3dadd(81.5, 43.5, -217.5, 3.5)
pt3dadd(84, 45.5, -228.5, 3.6)
pt3dadd(80.5, 46, -225, 3.6)
pt3dadd(85, 46.5, -223, 3.3)
pt3dadd(88.5, 48, -230, 3.5)
pt3dadd(91, 50, -230, 3.6)
pt3dadd(94.5, 51, -234.5, 3.4)
}
dend[252] {pt3dclear()
pt3dadd(94.5, 51, -234.5, 3.4)
pt3dadd(92, 53, -237.5, 1.9)
pt3dadd(90, 51.5, -237.5, 1.4)
pt3dadd(88.5, 50, -249, 2.4)
pt3dadd(86, 47, -254.5, 2.4)
pt3dadd(81.5, 47, -255.5, 2.5)
pt3dadd(82, 49.5, -255.5, 1.9)
pt3dadd(85.5, 52.5, -258.5, 2.3)
pt3dadd(86.5, 56, -257.5, 2.4)
pt3dadd(84, 57.5, -263.5, 2.7)
pt3dadd(78.5, 54.5, -262.5, 2.6)
pt3dadd(68.5, 49.5, -280, 2.3)
pt3dadd(65.5, 46, -286.5, 2.1)
pt3dadd(62.5, 44, -288, 2.5)
pt3dadd(61.5, 47, -299.5, 2.7)
pt3dadd(62, 50, -305, 2.2)
pt3dadd(64, 51.5, -303, 2.2)
pt3dadd(66, 50.5, -319.5, 2)
pt3dadd(67, 43, -312.5, 2.1)
pt3dadd(68, 39, -327, 2.5)
pt3dadd(69.5, 35, -331, 2.2)
pt3dadd(71, 33.5, -331, 2.2)
pt3dadd(70, 31, -331.5, 2.7)
pt3dadd(71.5, 26.5, -339, 2.5)
pt3dadd(75, 23.5, -336.5, 2.5)
pt3dadd(76.5, 19.5, -337, 2.1)
pt3dadd(80.5, 18, -337.5, 2.1)
pt3dadd(84, 17.5, -338, 1.8)
pt3dadd(87.5, 17, -338.5, 1.8)
pt3dadd(88.5, 15, -339, 1.8)
pt3dadd(90.5, 13, -350, 2.5)
pt3dadd(94, 13, -350.5, 2.5)
pt3dadd(98, 12.5, -351, 2.2)
pt3dadd(101, 11, -351.5, 1.6)
pt3dadd(101.5, 8, -352, 1.1)
pt3dadd(100, 5, -352, 1.5)
pt3dadd(98, 4, -352.5, 1.8)
pt3dadd(96.5, -3, -364, 2)
pt3dadd(97, -9.5, -361.5, 2.2)
pt3dadd(95, -11, -362, 2)
pt3dadd(93.5, -14, -362.5, 2.3)
pt3dadd(96, -19.5, -373, 2.2)
pt3dadd(96.5, -22, -378.5, 2.4)
pt3dadd(96.5, -25.5, -379.5, 2.2)
pt3dadd(97, -28, -380.5, 2.2)
pt3dadd(97.5, -30.5, -390.5, 1.9)
pt3dadd(98, -33, -391, 2.6)
pt3dadd(98.5, -30, -392, 2.1)
pt3dadd(102, -29, -402, 1.8)
pt3dadd(103, -31, -400, 1.9)
pt3dadd(103, -34, -401, 2.5)
pt3dadd(101.5, -36.5, -402.5, 2.3)
pt3dadd(97, -40.5, -416.5, 2.2)
pt3dadd(92, -46.5, -425, 1.8)
pt3dadd(94, -48.5, -425, 1.8)
pt3dadd(96.5, -50, -433, 1.8)
pt3dadd(96.5, -54, -437.5, 2)
pt3dadd(95, -59, -438, 2)
pt3dadd(91, -59.5, -438.5, 1.5)
pt3dadd(89, -61, -439, 1.5)
pt3dadd(88, -63, -439, 1.8)
pt3dadd(88, -66.5, -451, 1.9)
pt3dadd(84, -65.5, -444.5, 1.9)
pt3dadd(80.5, -62.5, -445, 1.9)
pt3dadd(85, -63.5, -449.5, 1.9)
pt3dadd(87.5, -65.5, -449.5, 1.9)
pt3dadd(91, -65.5, -453.5, 1.9)
pt3dadd(89.5, -69, -462, 2.1)
pt3dadd(86.5, -70.5, -462.5, 1.9)
pt3dadd(83.5, -70.5, -463.5, 1.2)
pt3dadd(81.5, -72, -469, 1.6)
pt3dadd(79.5, -73, -474.5, 1.8)
pt3dadd(76, -73, -481, 1.8)
pt3dadd(76, -70, -478.5, 1.8)
pt3dadd(75, -66.5, -479.5, 1.8)
pt3dadd(78, -69.5, -491.5, 1.6)
pt3dadd(77, -73, -497, 1.8)
pt3dadd(76, -77.5, -498.5, 1.8)
pt3dadd(73.5, -76, -496.5, 1.6)
pt3dadd(72.5, -78.5, -497, 1.6)
pt3dadd(71.5, -76, -511.5, 1.5)
pt3dadd(67.5, -78, -520, 1.7)
pt3dadd(69.5, -80.5, -520.5, 1.4)
pt3dadd(70.5, -84, -523.5, 1.2)
pt3dadd(67, -83.5, -524, 1.2)
pt3dadd(66, -81.5, -524.5, 1.4)
pt3dadd(64, -80, -535.5, 1.7)
pt3dadd(64, -77, -536, 1.3)
pt3dadd(66.5, -76, -533, 1.6)
pt3dadd(66, -80, -541, 1.4)
pt3dadd(65, -82.5, -541.5, 1.6)
pt3dadd(65.5, -85.5, -542, 1.8)
pt3dadd(66, -90, -542.5, 1.1)
pt3dadd(64, -91, -543, 1.2)
pt3dadd(61.5, -89.5, -547.5, 1.6)
pt3dadd(60, -87.5, -555, 1.3)
pt3dadd(58.5, -90.5, -557, 1.7)
pt3dadd(57.5, -93.5, -561, 1.7)
pt3dadd(57.5, -97, -561.5, 2)
pt3dadd(56.5, -102, -562.5, 1.5)
}
dend[253] {pt3dclear()
pt3dadd(94.5, 51, -234.5, 3.4)
pt3dadd(96.5, 53, -259.5, 1)
pt3dadd(98, 58.5, -260.5, 0.1)
pt3dadd(100.5, 58, -259, 1.3)
pt3dadd(104, 58, -263.5, 1.3)
pt3dadd(105.5, 59.5, -262.5, 1.3)
pt3dadd(110.5, 59.5, -259.5, 1.3)
pt3dadd(114, 59, -280, 1.5)
pt3dadd(114, 56, -286, 1.6)
pt3dadd(118.5, 57, -288.5, 1.3)
pt3dadd(122, 58, -289, 1.3)
pt3dadd(129.5, 56.5, -292, 1.5)
pt3dadd(132, 57, -297, 1.4)
pt3dadd(134, 55, -294.5, 1.4)
pt3dadd(135.5, 53, -295, 1.4)
pt3dadd(139.5, 53.5, -300.5, 1.3)
pt3dadd(143.5, 54.5, -306, 1.5)
pt3dadd(146.5, 54, -312.5, 1.4)
pt3dadd(148, 56.5, -327, 0.9)
pt3dadd(149.5, 60, -324, 0.9)
pt3dadd(155.5, 59, -324.5, 0.9)
pt3dadd(159, 59, -331.5, 0.8)
pt3dadd(161.5, 62, -332, 0.8)
pt3dadd(168.5, 64, -332.5, 0.8)
pt3dadd(171.5, 65, -332.5, 0.8)
pt3dadd(175, 66, -340.5, 0.8)
pt3dadd(177.5, 67.5, -340.5, 0.8)
pt3dadd(178.5, 70.5, -341, 0.6)
pt3dadd(181, 73, -341, 0.6)
pt3dadd(185, 71.5, -345, 0.6)
pt3dadd(188, 71.5, -345.5, 0.7)
pt3dadd(193, 71.5, -349.5, 0.7)
pt3dadd(195, 70, -346, 0.7)
pt3dadd(199, 70, -346.5, 0.9)
pt3dadd(204, 70, -347, 0.9)
pt3dadd(207.5, 70.5, -354.5, 0.9)
pt3dadd(211.5, 70.5, -355, 0.9)
pt3dadd(216, 68.5, -362.5, 0.9)
}
dend[254] {pt3dclear()
pt3dadd(70.5, 19, -158.5, 9.1)
pt3dadd(70.5, 13.5, -160, 3)
pt3dadd(68, 11, -162, 3.7)
pt3dadd(61, 11, -172, 3.7)
pt3dadd(57, 11, -173.5, 3.1)
pt3dadd(53.5, 11, -175, 3.1)
}
}
proc shape3d_63() {
dend[254] { pt3dadd(49.5, 11, -176, 2.8)
pt3dadd(42, 11, -178, 3.7)
pt3dadd(39.5, 12, -178.5, 3.7)
pt3dadd(35.5, 15.5, -180, 3)
pt3dadd(33.5, 17.5, -185, 3)
pt3dadd(28.5, 17.5, -186, 2.8)
pt3dadd(23, 17.5, -191.5, 3.2)
pt3dadd(25, 19.5, -192.5, 3.2)
pt3dadd(26.5, 21.5, -202, 3.3)
pt3dadd(30, 21.5, -203, 3.3)
pt3dadd(29, 19.5, -216.5, 3.3)
pt3dadd(25.5, 18.5, -217.5, 3.1)
pt3dadd(21.5, 17, -218.5, 3.2)
pt3dadd(18, 17, -219.5, 3.2)
pt3dadd(16, 18.5, -220, 3.2)
pt3dadd(14, 23, -224.5, 2.5)
pt3dadd(13, 26, -226, 2.8)
pt3dadd(10.5, 26, -242, 2.2)
pt3dadd(7, 25.5, -244, 3)
pt3dadd(4.5, 27.5, -246, 3)
pt3dadd(2, 30, -251, 2.3)
pt3dadd(-0.5, 31, -252.5, 2.2)
pt3dadd(-1, 35, -254.5, 2.6)
pt3dadd(2.5, 35, -256.5, 2.6)
pt3dadd(5.5, 34.5, -268, 2.5)
pt3dadd(8, 31.5, -266.5, 2.1)
pt3dadd(10.5, 30.5, -271.5, 2.1)
pt3dadd(16.5, 31.5, -275, 2.1)
pt3dadd(17, 27, -280, 1.9)
pt3dadd(18, 24, -280.5, 2.1)
pt3dadd(17.5, 20.5, -281, 2)
pt3dadd(15.5, 14.5, -282.5, 2.7)
pt3dadd(13.5, 8.5, -284, 2.8)
pt3dadd(12.5, 5.5, -281, 2.8)
pt3dadd(9, -3, -292, 2.9)
pt3dadd(6.5, -5.5, -293, 2.9)
pt3dadd(5.5, -7.5, -297.5, 2.3)
pt3dadd(4, -10.5, -298, 2.4)
pt3dadd(2, -11.5, -298.5, 2.1)
pt3dadd(1, -13.5, -299, 1.9)
pt3dadd(1, -18, -304, 1.9)
pt3dadd(-1, -19.5, -314.5, 1.9)
pt3dadd(-4.5, -22.5, -313, 2.8)
pt3dadd(-7, -23.5, -309.5, 2.5)
pt3dadd(-8, -26, -310, 2.6)
pt3dadd(-6.5, -31, -325, 2.7)
pt3dadd(-8, -35, -325, 2.8)
pt3dadd(-9, -37, -336, 3.5)
pt3dadd(-7.5, -45, -344, 3.4)
pt3dadd(-10.5, -50, -345, 2.2)
pt3dadd(-11.5, -52, -345.5, 2.2)
pt3dadd(-10.5, -56, -343, 3.5)
pt3dadd(-12.5, -60, -350.5, 2.3)
pt3dadd(-13.5, -62, -354, 2.5)
pt3dadd(-12.5, -65, -354.5, 2.2)
pt3dadd(-14, -70, -355, 1.9)
pt3dadd(-17.5, -72, -349, 2.5)
pt3dadd(-18.5, -74, -349, 2.3)
pt3dadd(-20, -75.5, -353, 2.2)
pt3dadd(-23.5, -78, -360.5, 2.8)
pt3dadd(-25.5, -80.5, -360.5, 2.8)
pt3dadd(-25, -83.5, -358, 2.3)
pt3dadd(-24, -86.5, -358.5, 2.5)
pt3dadd(-24.5, -89.5, -358.5, 2.1)
pt3dadd(-27, -91, -359, 2.7)
pt3dadd(-29, -93, -359, 2.4)
pt3dadd(-29.5, -95.5, -370.5, 1.9)
pt3dadd(-26, -99, -370.5, 2.3)
pt3dadd(-24, -100, -371, 1.7)
pt3dadd(-24.5, -103.5, -371.5, 2.7)
pt3dadd(-24.5, -106.5, -375, 3)
pt3dadd(-24, -110.5, -384, 1.7)
pt3dadd(-23, -122, -386.5, 2.5)
pt3dadd(-21.5, -125, -387.5, 2.4)
pt3dadd(-21, -128, -388, 1.9)
pt3dadd(-22, -130.5, -393, 2.2)
pt3dadd(-19, -129, -407, 1.6)
pt3dadd(-17, -131.5, -407.5, 2.3)
pt3dadd(-17, -135, -413, 2.3)
pt3dadd(-16.5, -137.5, -413.5, 2.3)
pt3dadd(-17, -140.5, -414, 1.9)
pt3dadd(-16.5, -143.5, -414.5, 1.9)
pt3dadd(-15, -145.5, -415.5, 1.9)
pt3dadd(-14, -149.5, -416, 2)
pt3dadd(-9.5, -156, -418, 2.4)
pt3dadd(-11, -162, -423.5, 2.6)
pt3dadd(-10.5, -164.5, -424, 2.7)
pt3dadd(-9.5, -168.5, -425, 2.7)
pt3dadd(-9, -173.5, -433, 2.1)
pt3dadd(-10, -182.5, -446, 2)
pt3dadd(-10, -186, -446.5, 1.6)
pt3dadd(-12.5, -188, -444, 2.2)
pt3dadd(-15.5, -190, -444.5, 1.4)
pt3dadd(-14.5, -193, -445, 1.9)
pt3dadd(-12.5, -195.5, -445.5, 1.9)
pt3dadd(-10.5, -198, -450, 2.1)
pt3dadd(-9, -199.5, -450, 2.1)
pt3dadd(-10, -202, -450.5, 2.1)
pt3dadd(-12, -203.5, -451, 1.9)
pt3dadd(-13, -205.5, -451.5, 2.3)
pt3dadd(-11, -209.5, -460.5, 2.1)
pt3dadd(-9, -213.5, -461, 2.1)
pt3dadd(-7.5, -217.5, -465.5, 2.1)
pt3dadd(-7.5, -223, -466.5, 2.1)
pt3dadd(-10.5, -228.5, -467.5, 2)
pt3dadd(-8.5, -230.5, -472, 1.4)
pt3dadd(-5, -230.5, -476.5, 2.3)
pt3dadd(-2, -230.5, -477, 1.9)
pt3dadd(-3, -233, -474.5, 2.2)
pt3dadd(-5.5, -235, -481, 1.2)
pt3dadd(-2, -238, -483, 1.4)
pt3dadd(-4.5, -238.5, -484, 1.3)
pt3dadd(-5, -243, -495.5, 1.4)
pt3dadd(-1.5, -242.5, -502, 1.4)
pt3dadd(-2.5, -244.5, -505.5, 1.6)
pt3dadd(-3, -247, -517, 1.6)
pt3dadd(-3.5, -255, -519.5, 2.5)
pt3dadd(0, -255.5, -520.5, 1.8)
pt3dadd(3.5, -258.5, -522.5, 2)
pt3dadd(4.5, -260.5, -523, 2)
pt3dadd(9, -262.5, -525, 2)
pt3dadd(10, -265.5, -528, 1.3)
pt3dadd(13, -267.5, -528.5, 1.3)
pt3dadd(15.5, -270.5, -528.5, 1.6)
pt3dadd(17, -273, -529, 1.2)
pt3dadd(14, -274, -529.5, 0.9)
pt3dadd(16.5, -275.5, -533.5, 1.2)
pt3dadd(18.5, -277, -536.5, 1.3)
pt3dadd(20.5, -279, -537, 1.3)
pt3dadd(21, -282, -537, 1.2)
pt3dadd(24, -283, -537.5, 1.3)
pt3dadd(24, -286.5, -544, 1.4)
}
dend[255] {pt3dclear()
pt3dadd(24, -286.5, -544, 1.4)
pt3dadd(23.5, -289.5, -544, 0.1)
pt3dadd(24, -292, -544, 0.1)
pt3dadd(23, -295, -544, 0.1)
pt3dadd(19.5, -298, -544, 0.1)
pt3dadd(16, -299, -544, 0.1)
pt3dadd(14.5, -300.5, -544, 0.1)
pt3dadd(9.5, -303.5, -541, 0.1)
pt3dadd(7.5, -308.5, -541, 0.1)
pt3dadd(6, -311.5, -547.5, 0.1)
pt3dadd(4, -314, -544, 0.1)
pt3dadd(2, -317, -547.5, 0.1)
pt3dadd(1, -319.5, -544, 0.1)
pt3dadd(0, -323.5, -547.5, 0.1)
pt3dadd(-1.5, -325, -541, 0.1)
pt3dadd(-3.5, -329.5, -541, 0.1)
pt3dadd(-5, -333.5, -544, 0.4)
pt3dadd(-5.5, -336.5, -541, 0.1)
pt3dadd(-7.5, -339, -541, 0.1)
pt3dadd(-10.5, -343, -541, 0.1)
pt3dadd(-14.5, -346, -544, 0.1)
}
dend[256] {pt3dclear()
pt3dadd(24, -286.5, -544, 1.4)
pt3dadd(19.5, -286.5, -544, 1.1)
pt3dadd(15, -286.5, -544, 1.1)
pt3dadd(17, -288, -550.5, 1.4)
pt3dadd(16.5, -291, -550.5, 1.2)
pt3dadd(13, -293.5, -550.5, 0.9)
pt3dadd(14.5, -295, -553.5, 1.1)
pt3dadd(16.5, -296.5, -553.5, 1.1)
pt3dadd(16.5, -300, -556.5, 1.1)
pt3dadd(14.5, -303.5, -556.5, 1.1)
pt3dadd(11, -303, -560, 1)
pt3dadd(10, -306, -560, 1.2)
pt3dadd(10, -307, -560, 1.1)
}
dend[257] {pt3dclear()
pt3dadd(24, -7, -108, 5)
pt3dadd(20.5, -4.5, -114.5, 3.1)
pt3dadd(19.5, -0.5, -111.5, 2.6)
pt3dadd(24, 4.5, -116, 4.1)
pt3dadd(26, 6, -116.5, 3.4)
pt3dadd(30, 1.5, -121.5, 3.2)
pt3dadd(31, -0.5, -120, 3.7)
pt3dadd(27, -1, -125, 4)
pt3dadd(27, -4.5, -125.5, 3.7)
pt3dadd(26, -6.5, -134, 3.7)
pt3dadd(26, -10.5, -143, 2.7)
pt3dadd(30.5, -10.5, -152.5, 3)
pt3dadd(35, -6.5, -151.5, 2.8)
pt3dadd(36.5, -3.5, -156.5, 2.3)
pt3dadd(34, -2.5, -151.5, 3)
pt3dadd(29, -3.5, -157, 3.4)
pt3dadd(26, -5.5, -158, 3.5)
pt3dadd(19.5, -8.5, -164.5, 3.4)
pt3dadd(19, -4, -174, 3.1)
pt3dadd(20.5, -1, -175, 3.1)
pt3dadd(18, 5, -180.5, 2.8)
pt3dadd(16, 7.5, -181, 2.8)
pt3dadd(13, 10.5, -186, 2.6)
pt3dadd(10.5, 13, -187, 2.8)
pt3dadd(8, 17, -188.5, 3.1)
pt3dadd(7.5, 13.5, -193, 2.2)
pt3dadd(4, 10, -194.5, 2)
pt3dadd(2, 11.5, -199.5, 2.7)
pt3dadd(1, 15, -200.5, 2.8)
pt3dadd(-0.5, 18, -205.5, 2.8)
pt3dadd(-0.5, 22.5, -219.5, 2.8)
pt3dadd(0, 25.5, -217.5, 2.6)
pt3dadd(-3, 25.5, -218.5, 2.6)
pt3dadd(-4.5, 23.5, -225, 3)
}
}
proc shape3d_64() {
dend[257] { pt3dadd(-2.5, 18, -232.5, 1.4)
pt3dadd(-1.5, 14, -234.5, 1.5)
pt3dadd(0, 8, -240, 1.9)
pt3dadd(1.5, 12.5, -251.5, 1.5)
pt3dadd(2, 15, -250.5, 1.1)
pt3dadd(0.5, 16.5, -251.5, 1.2)
pt3dadd(0, 19, -256, 1.4)
pt3dadd(4, 20, -258, 1.4)
pt3dadd(6, 17.5, -263, 1.3)
pt3dadd(6, 14.5, -264.5, 1.5)
pt3dadd(6, 9, -273, 1.6)
pt3dadd(7, 5, -275, 1.6)
pt3dadd(3, 4.5, -278, 2)
pt3dadd(-5.5, 2.5, -312, 2.3)
pt3dadd(-9, 4, -325, 2.3)
pt3dadd(-13.5, 4, -330, 2)
pt3dadd(-15.5, 5.5, -330.5, 2)
pt3dadd(-16.5, 8.5, -331.5, 2)
pt3dadd(-12, 6, -344.5, 2)
pt3dadd(-10.5, 3, -349.5, 1.8)
pt3dadd(-8, 1, -350.5, 1.8)
pt3dadd(-11, 0, -351, 1.7)
pt3dadd(-11, -4, -377, 1.6)
pt3dadd(-14.5, -7, -376.5, 1.8)
pt3dadd(-16, -9.5, -378.5, 2.2)
pt3dadd(-16, -12.5, -380, 2.2)
pt3dadd(-14.5, -15, -381.5, 2.2)
pt3dadd(-14, -17.5, -393.5, 1.9)
pt3dadd(-16, -19, -392, 1.6)
pt3dadd(-19, -19, -404.5, 1.6)
pt3dadd(-20.5, -21, -406, 1.7)
pt3dadd(-19, -23, -407.5, 2.2)
pt3dadd(-17, -25, -414, 1.4)
pt3dadd(-19.5, -25.5, -415.5, 1.6)
pt3dadd(-22, -27, -417, 2.3)
pt3dadd(-24.5, -27.5, -418.5, 2.7)
pt3dadd(-28.5, -28.5, -436, 1.6)
pt3dadd(-33.5, -29.5, -436.5, 1.9)
pt3dadd(-39, -34.5, -441.5, 1.7)
pt3dadd(-40, -38.5, -441.5, 2.2)
pt3dadd(-48.5, -40.5, -442.5, 1.1)
pt3dadd(-50.5, -43, -443, 1.3)
pt3dadd(-51.5, -45, -451, 1.3)
pt3dadd(-53, -48.5, -451.5, 1.6)
pt3dadd(-57, -47.5, -455.5, 1.3)
pt3dadd(-60.5, -47.5, -455.5, 1.2)
pt3dadd(-62, -51, -456, 1.4)
pt3dadd(-63, -54, -456, 1.1)
pt3dadd(-65.5, -55.5, -456.5, 1.1)
pt3dadd(-70, -57, -457, 1.3)
pt3dadd(-72, -58.5, -457, 1.3)
pt3dadd(-73.5, -60.5, -457.5, 1.2)
pt3dadd(-75, -62, -461, 1.3)
pt3dadd(-79, -63.5, -461.5, 1.3)
pt3dadd(-80.5, -65, -469, 1.2)
pt3dadd(-82, -66.5, -466, 1.3)
pt3dadd(-87, -70, -470, 1.7)
pt3dadd(-90, -70, -474, 1.7)
pt3dadd(-92.5, -68, -474.5, 1.7)
pt3dadd(-95.5, -68.5, -475, 1.7)
pt3dadd(-99.5, -71, -479.5, 1.3)
pt3dadd(-102, -74.5, -481.5, 1.3)
pt3dadd(-104, -75.5, -488.5, 1.3)
pt3dadd(-107.5, -75.5, -488, 1.2)
pt3dadd(-107, -80, -508, 0.8)
pt3dadd(-107, -82, -509, 0.8)
}
dend[258] {pt3dclear()
pt3dadd(-107, -82, -509, 0.8)
pt3dadd(-110, -82, -525, 0.9)
pt3dadd(-112, -78.5, -520.5, 1.5)
pt3dadd(-115, -78.5, -521, 1.5)
pt3dadd(-118, -77.5, -521.5, 1.1)
pt3dadd(-120.5, -76, -522.5, 0.9)
pt3dadd(-122.5, -77, -523, 0.9)
pt3dadd(-127.5, -77, -524, 0.8)
pt3dadd(-130, -75, -528.5, 0.5)
pt3dadd(-128.5, -73.5, -532.5, 0.6)
pt3dadd(-132, -75, -535, 0.8)
pt3dadd(-135, -73.5, -539.5, 0.7)
pt3dadd(-137, -68.5, -541, 0.7)
pt3dadd(-135, -69.5, -541.5, 0.6)
pt3dadd(-136.5, -72, -545.5, 0.6)
pt3dadd(-137.5, -73.5, -553, 0.6)
}
dend[259] {pt3dclear()
pt3dadd(-107, -82, -509, 0.8)
pt3dadd(-107.5, -86, -525, 1.2)
pt3dadd(-109, -91, -528, 0.8)
pt3dadd(-107.5, -93, -531.5, 0.8)
pt3dadd(-109.5, -97.5, -532, 0.8)
pt3dadd(-108.5, -101, -536.5, 0.4)
pt3dadd(-109.5, -104, -540.5, 0.9)
pt3dadd(-112, -105.5, -544, 0.9)
pt3dadd(-112.5, -102.5, -547.5, 0.8)
pt3dadd(-112, -107.5, -551, 1)
pt3dadd(-112, -111.5, -551, 1)
pt3dadd(-111, -114, -551.5, 0.6)
pt3dadd(-109, -115, -551.5, 0.4)
pt3dadd(-111, -120.5, -552, 0.4)
pt3dadd(-110, -123.5, -552.5, 0.3)
pt3dadd(-111, -126.5, -556.5, 0.1)
pt3dadd(-113, -131, -560, 0.1)
pt3dadd(-115.5, -135.5, -557.5, 0.1)
pt3dadd(-117, -140, -557.5, 0.1)
pt3dadd(-116.5, -143.5, -558, 0.1)
}
dend[260] {pt3dclear()
pt3dadd(-19, -1.5, -83.5, 7.8)
pt3dadd(-24, -6, -83.5, 1.8)
pt3dadd(-20, -5.5, -88.5, 1.7)
pt3dadd(-18.5, -4, -86.5, 1.5)
pt3dadd(-20.5, 1, -98, 2)
pt3dadd(-21, 3.5, -98.5, 2)
pt3dadd(-24, 6.5, -101, 2)
pt3dadd(-21.5, 7, -101, 1.1)
pt3dadd(-23, 10, -104, 0.7)
pt3dadd(-26.5, 10, -104, 0.9)
pt3dadd(-30.5, 12.5, -102, 0.9)
pt3dadd(-32.5, 15, -102, 0.9)
pt3dadd(-34.5, 17.5, -107, 0.8)
pt3dadd(-35.5, 19.5, -107, 0.9)
pt3dadd(-35, 24, -110, 0.8)
pt3dadd(-38.5, 27, -110, 0.8)
pt3dadd(-40, 29, -108, 0.8)
pt3dadd(-41, 32.5, -110.5, 0.8)
pt3dadd(-42.5, 34.5, -110.5, 0.7)
pt3dadd(-44.5, 36, -111, 0.7)
pt3dadd(-44.5, 39, -113.5, 1)
pt3dadd(-45.5, 41, -113.5, 0.9)
pt3dadd(-48.5, 42, -116, 0.8)
pt3dadd(-50.5, 44, -116, 0.8)
pt3dadd(-51.5, 46, -116.5, 0.8)
pt3dadd(-55.5, 49, -116.5, 0.7)
pt3dadd(-57.5, 50.5, -116.5, 1.1)
pt3dadd(-57.5, 56, -119, 1)
pt3dadd(-59, 58.5, -119, 1.3)
pt3dadd(-60.5, 66.5, -122, 0.8)
pt3dadd(-62, 68, -122.5, 0.8)
pt3dadd(-65, 70, -124.5, 0.8)
pt3dadd(-62.5, 73.5, -125, 1.1)
}
dend[261] {pt3dclear()
pt3dadd(25.73, -23.64, 7.25, 5.3)
pt3dadd(-2, -3.5, 20.5, 5.3)
pt3dadd(-3, 1.5, 25, 5.3)
pt3dadd(-6, 2, 25.5, 5)
pt3dadd(-11.5, 4.5, 30.5, 7.1)
pt3dadd(-16.5, 8, 30.5, 7.3)
pt3dadd(-22, 11.5, 32.5, 7.2)
pt3dadd(-26.5, 15.5, 32, 5.3)
pt3dadd(-32, 16, 37.5, 5.9)
pt3dadd(-35.5, 19, 44.5, 5.9)
pt3dadd(-42, 22.5, 49.5, 6.4)
pt3dadd(-44, 24.5, 48.5, 6.2)
pt3dadd(-46.5, 26, 49.5, 6.2)
pt3dadd(-56.5, 26.5, 58, 5.2)
pt3dadd(-62, 26, 63.5, 5.8)
pt3dadd(-69.5, 26, 73.5, 5.6)
pt3dadd(-72, 23.5, 74.5, 5)
pt3dadd(-76, 23, 78.5, 4.8)
pt3dadd(-81.5, 23, 76, 4.5)
pt3dadd(-84.5, 24.5, 75, 4.5)
pt3dadd(-88, 25, 87, 7.6)
}
dend[262] {pt3dclear()
pt3dadd(-88, 25, 87, 7.6)
pt3dadd(-91, 23.5, 87, 4.8)
pt3dadd(-97.5, 23.5, 87.5, 5.1)
pt3dadd(-101.5, 22.5, 87.5, 5.1)
pt3dadd(-105, 21.5, 93, 5.1)
pt3dadd(-113, 19, 93, 5.1)
pt3dadd(-117, 18, 93, 3.4)
pt3dadd(-121, 18, 93, 4.3)
pt3dadd(-126.5, 23, 102, 5.2)
pt3dadd(-130.5, 25, 102, 4.8)
pt3dadd(-135, 27, 102, 4.8)
pt3dadd(-139.5, 27, 104.5, 4.8)
pt3dadd(-143.5, 26.5, 104.5, 4.6)
pt3dadd(-152, 25, 108, 5.3)
pt3dadd(-153.5, 22.5, 108, 4)
pt3dadd(-157, 21.5, 110.5, 3.4)
pt3dadd(-160.5, 19.5, 108, 3.8)
pt3dadd(-167.5, 20.5, 105, 4.1)
pt3dadd(-172, 22.5, 99.5, 4.1)
pt3dadd(-181, 25, 103, 4.3)
pt3dadd(-185.5, 25, 103, 4.3)
pt3dadd(-189.5, 26.5, 103, 4.3)
pt3dadd(-193, 26.5, 103, 4.3)
pt3dadd(-196, 25, 105.5, 4.1)
pt3dadd(-203, 24, 105.5, 4.3)
pt3dadd(-206, 24.5, 106, 3.9)
pt3dadd(-213.5, 22, 106, 4.3)
pt3dadd(-217, 22, 106, 4.8)
pt3dadd(-221.5, 22.5, 100.5, 6.6)
pt3dadd(-226.5, 23, 100.5, 7.3)
}
dend[263] {pt3dclear()
pt3dadd(-226.5, 23, 100.5, 7.3)
pt3dadd(-229, 27.5, 104.5, 4.5)
pt3dadd(-236, 31.5, 102.5, 3.5)
pt3dadd(-239.5, 32, 103, 3.4)
pt3dadd(-244.5, 33, 107, 3.4)
pt3dadd(-250, 36, 108, 3.3)
pt3dadd(-255.5, 38, 109, 3.2)
pt3dadd(-261.5, 41.5, 110, 3.2)
pt3dadd(-268.5, 45, 111, 3.2)
pt3dadd(-276, 49, 118, 3.6)
pt3dadd(-279, 50.5, 118.5, 3.5)
pt3dadd(-281.5, 52, 125, 3.4)
pt3dadd(-295, 55, 136.5, 6.3)
}
dend[264] {pt3dclear()
pt3dadd(-295, 55, 136.5, 6.3)
}
}
proc shape3d_65() {
dend[264] { pt3dadd(-298.5, 52.5, 148, 2.7)
pt3dadd(-301.5, 50.5, 145, 2.3)
pt3dadd(-305, 50.5, 145, 2.1)
pt3dadd(-306.5, 49, 145.5, 1.7)
pt3dadd(-309.5, 45.5, 142.5, 2.5)
pt3dadd(-314, 44, 143, 1.7)
pt3dadd(-322.5, 44, 144, 2.2)
pt3dadd(-325.5, 44, 144, 1.3)
pt3dadd(-327.5, 42.5, 148, 1.2)
pt3dadd(-328.5, 40.5, 152, 1.9)
pt3dadd(-329.5, 38.5, 149, 2.5)
pt3dadd(-331.5, 34, 150, 2.3)
pt3dadd(-333, 32, 150, 1.7)
pt3dadd(-337.5, 30.5, 151, 1.8)
pt3dadd(-342, 30.5, 151.5, 1.6)
pt3dadd(-345, 28, 155.5, 1.8)
pt3dadd(-347, 22.5, 153, 1.3)
pt3dadd(-349.5, 21, 153.5, 1.3)
pt3dadd(-353.5, 21, 154, 1)
pt3dadd(-355.5, 18.5, 161, 1.8)
pt3dadd(-357.5, 16, 158.5, 1.4)
pt3dadd(-360.5, 16, 159, 1.3)
pt3dadd(-363.5, 16, 159, 1.1)
pt3dadd(-368.5, 16.5, 160, 2)
pt3dadd(-372, 16.5, 160.5, 2.3)
pt3dadd(-376, 18, 167.5, 2.5)
pt3dadd(-379, 19.5, 168, 2.4)
pt3dadd(-381.5, 20, 165, 2.4)
pt3dadd(-384.5, 21, 165.5, 2.4)
pt3dadd(-389.5, 22.5, 166, 1.4)
pt3dadd(-394.5, 22.5, 166.5, 1.6)
pt3dadd(-397.5, 23.5, 170.5, 2.3)
pt3dadd(-403, 23.5, 175, 2.7)
pt3dadd(-406.5, 24.5, 175, 1.6)
pt3dadd(-411, 25, 175.5, 1.6)
pt3dadd(-414, 24.5, 176, 1.6)
pt3dadd(-419, 25, 179.5, 2)
pt3dadd(-422, 25, 180, 2)
pt3dadd(-429, 27.5, 181, 1.3)
pt3dadd(-431, 28.5, 181.5, 1.3)
pt3dadd(-434.5, 27.5, 182, 1.4)
pt3dadd(-438, 27.5, 182, 1.4)
pt3dadd(-442, 28, 183, 1.7)
pt3dadd(-444, 31, 183.5, 1.3)
pt3dadd(-448, 30.5, 183.5, 1.3)
pt3dadd(-453, 28.5, 187, 0.9)
pt3dadd(-455.5, 26, 187.5, 1)
pt3dadd(-457.5, 24, 187.5, 1.1)
pt3dadd(-461.5, 24, 188, 1.4)
pt3dadd(-464.5, 22.5, 186, 1.5)
pt3dadd(-467, 24.5, 192, 1.4)
pt3dadd(-470.5, 25.5, 192, 1.4)
pt3dadd(-474.5, 24.5, 192.5, 1.1)
pt3dadd(-478, 23, 190.5, 1.2)
pt3dadd(-480, 21.5, 197, 1.1)
pt3dadd(-484, 20.5, 197.5, 1.3)
pt3dadd(-485.5, 18.5, 192.5, 1)
pt3dadd(-490.5, 18, 193, 1)
pt3dadd(-495, 16.5, 193.5, 1.4)
pt3dadd(-496.5, 14.5, 202.5, 1.8)
pt3dadd(-499.5, 14.5, 203, 1.3)
pt3dadd(-502.5, 15, 203.5, 1.1)
pt3dadd(-505.5, 15.5, 203.5, 0.9)
pt3dadd(-508, 14, 201.5, 0.9)
pt3dadd(-511, 13, 202, 0.9)
pt3dadd(-514.5, 13, 202.5, 0.7)
pt3dadd(-517.5, 12.5, 203, 1)
pt3dadd(-520.5, 12.5, 203, 1.3)
pt3dadd(-523.5, 12.5, 203.5, 1.3)
pt3dadd(-526, 12, 204, 1.5)
pt3dadd(-529, 12, 204, 1.2)
pt3dadd(-534, 11.5, 204.5, 0.9)
pt3dadd(-538.5, 9, 205.5, 1.2)
pt3dadd(-542.5, 8.5, 206, 1)
pt3dadd(-544.5, 7.5, 206, 1.3)
pt3dadd(-547, 5.5, 209, 1.3)
pt3dadd(-550.5, 5.5, 209.5, 1.3)
pt3dadd(-553, 6.5, 212.5, 1)
pt3dadd(-558.5, 6.5, 208.5, 1.2)
pt3dadd(-563, 6.5, 209, 0.8)
pt3dadd(-566, 8.5, 209, 0.7)
pt3dadd(-568, 4.5, 209.5, 0.9)
pt3dadd(-572.5, 3.5, 215.5, 0.7)
pt3dadd(-575, 4, 213.5, 0.7)
pt3dadd(-577.5, 4.5, 214, 0.7)
pt3dadd(-584, 1, 214.5, 0.8)
pt3dadd(-586, -0.5, 215, 0.9)
pt3dadd(-588.5, -1, 215.5, 0.8)
pt3dadd(-598, -1.5, 219, 0.8)
pt3dadd(-601, -1, 219.5, 0.7)
pt3dadd(-604.5, 2, 218, 0.7)
pt3dadd(-606, 4.5, 218, 0.7)
pt3dadd(-607, 8.5, 218.5, 0.7)
pt3dadd(-608.5, 11, 224.5, 0.9)
pt3dadd(-611.5, 13, 225, 0.9)
}
dend[265] {pt3dclear()
pt3dadd(-295, 55, 136.5, 6.3)
pt3dadd(-296.5, 59, 144.5, 4)
pt3dadd(-304.5, 63, 143, 2.7)
pt3dadd(-308.5, 67.5, 148, 2.6)
pt3dadd(-312.5, 75.5, 154, 4.1)
pt3dadd(-313.5, 79, 151.5, 3.6)
pt3dadd(-319.5, 84.5, 163.5, 3.4)
pt3dadd(-322.5, 86.5, 164, 3.4)
pt3dadd(-326, 89, 171, 3.4)
pt3dadd(-328, 91, 175, 3.7)
pt3dadd(-332, 91.5, 175.5, 3)
pt3dadd(-335.5, 93, 182, 3)
pt3dadd(-340, 95, 181, 2.5)
pt3dadd(-341.5, 98.5, 182, 2.3)
pt3dadd(-341, 102, 188.5, 2.3)
pt3dadd(-339.5, 105.5, 192.5, 2.1)
pt3dadd(-342.5, 107, 193.5, 1.7)
pt3dadd(-348, 107, 194.5, 2.6)
pt3dadd(-352, 109, 199, 2.3)
pt3dadd(-352.5, 111.5, 199.5, 2.1)
pt3dadd(-351, 114.5, 200, 1.9)
pt3dadd(-354, 116, 201, 2.3)
pt3dadd(-357.5, 115.5, 202, 2.3)
pt3dadd(-359.5, 118.5, 202.5, 2.3)
pt3dadd(-362, 121, 201, 2.3)
pt3dadd(-364, 122, 210.5, 2.3)
pt3dadd(-365.5, 125, 211.5, 2.8)
pt3dadd(-368.5, 127.5, 212.5, 2.6)
pt3dadd(-375.5, 130, 214, 2.2)
pt3dadd(-376.5, 132, 214.5, 2.2)
pt3dadd(-378, 134.5, 225, 2.3)
pt3dadd(-390, 144, 233, 3)
pt3dadd(-393.5, 148, 237.5, 2.6)
pt3dadd(-396.5, 150.5, 229, 2.6)
pt3dadd(-402, 153, 234, 2)
pt3dadd(-405.5, 154.5, 235, 1.7)
pt3dadd(-407, 156, 235, 1.7)
pt3dadd(-407, 159.5, 252.5, 2.3)
pt3dadd(-408.5, 162, 240.5, 1.8)
pt3dadd(-411.5, 164.5, 241.5, 1.6)
pt3dadd(-414.5, 164.5, 249.5, 1.5)
pt3dadd(-417, 165, 247, 1.9)
pt3dadd(-422.5, 164, 256.5, 2.3)
pt3dadd(-425, 161, 253.5, 2.7)
pt3dadd(-427.5, 159.5, 254, 2.7)
pt3dadd(-430.5, 159.5, 254.5, 1.9)
pt3dadd(-431.5, 161.5, 259.5, 1.9)
pt3dadd(-435.5, 166.5, 260.5, 2.5)
pt3dadd(-437, 168.5, 261, 2.7)
pt3dadd(-440, 170, 265.5, 2.6)
pt3dadd(-449.5, 170.5, 275, 2.7)
pt3dadd(-452, 172, 278.5, 2.5)
pt3dadd(-456, 173, 279.5, 2.5)
pt3dadd(-460.5, 172, 280, 2.2)
pt3dadd(-463, 174.5, 281, 2)
pt3dadd(-465.5, 177.5, 281.5, 2.1)
pt3dadd(-469.5, 183, 283.5, 2.3)
pt3dadd(-471, 185, 294.5, 1.7)
pt3dadd(-475.5, 185.5, 292.5, 1.6)
pt3dadd(-479.5, 185, 298.5, 1.5)
pt3dadd(-481, 183, 302.5, 1.5)
pt3dadd(-483, 181, 306, 1.5)
pt3dadd(-484, 185, 305, 1.7)
pt3dadd(-487, 188.5, 313, 1.9)
pt3dadd(-488.5, 191, 310.5, 1.6)
pt3dadd(-493, 191.5, 318.5, 1.9)
pt3dadd(-495, 190, 319, 1.7)
pt3dadd(-500.5, 190.5, 327, 1.7)
pt3dadd(-504, 190.5, 325, 1.9)
pt3dadd(-507.5, 188.5, 328, 2)
pt3dadd(-511.5, 194.5, 329.5, 2.5)
pt3dadd(-511.5, 197.5, 329.5, 1.9)
pt3dadd(-513.5, 201, 336, 1.5)
pt3dadd(-516, 202.5, 336.5, 1.5)
pt3dadd(-517.5, 204, 337, 1.3)
pt3dadd(-520, 206.5, 337.5, 1.3)
pt3dadd(-521, 213.5, 338.5, 1.4)
pt3dadd(-525, 213, 339, 2.1)
pt3dadd(-528.5, 213.5, 340, 2.2)
pt3dadd(-530.5, 214.5, 340.5, 1.7)
pt3dadd(-531.5, 218, 347, 2.6)
}
dend[266] {pt3dclear()
pt3dadd(-531.5, 218, 347, 2.6)
pt3dadd(-530, 219.5, 348.5, 1.3)
pt3dadd(-526.5, 221, 352.5, 0.8)
pt3dadd(-521.5, 221.5, 365, 1.1)
pt3dadd(-519.5, 222.5, 375, 1)
pt3dadd(-520.5, 225, 375.5, 1.5)
pt3dadd(-522, 227, 370, 1.1)
pt3dadd(-523.5, 229.5, 378.5, 1.1)
pt3dadd(-529.5, 231, 379.5, 1)
pt3dadd(-532.5, 233, 381, 1.1)
pt3dadd(-535, 233.5, 381.5, 1.1)
pt3dadd(-537, 235.5, 382, 1.1)
pt3dadd(-540.5, 239.5, 387.5, 1.1)
pt3dadd(-541, 242, 388, 1.3)
pt3dadd(-543.5, 244.5, 389.5, 1)
pt3dadd(-546, 245.5, 398, 1)
pt3dadd(-549, 249.5, 395.5, 0.8)
pt3dadd(-551.5, 248.5, 405, 0.9)
pt3dadd(-559, 250, 407.5, 0.8)
pt3dadd(-568.5, 250.5, 409.5, 0.9)
pt3dadd(-570.5, 254.5, 406.5, 0.8)
pt3dadd(-572, 256.5, 407, 0.9)
pt3dadd(-575, 256.5, 407.5, 0.8)
pt3dadd(-579, 258, 413, 0.9)
}
}
proc shape3d_66() {
dend[266] { pt3dadd(-581.5, 261, 414, 1.6)
pt3dadd(-585.5, 260.5, 414.5, 0.8)
pt3dadd(-588.5, 262.5, 425, 0.5)
pt3dadd(-591.5, 262.5, 428.5, 0.8)
pt3dadd(-595.5, 262.5, 429, 0.8)
pt3dadd(-603.5, 266, 425, 0.7)
pt3dadd(-605.5, 268.5, 428.5, 0.7)
pt3dadd(-609.5, 270, 426.5, 0.8)
pt3dadd(-612.5, 271.5, 427, 0.8)
pt3dadd(-619.5, 274.5, 428.5, 0.6)
pt3dadd(-621.5, 277, 432, 0.8)
pt3dadd(-624.5, 279, 436, 0.8)
pt3dadd(-626.5, 281.5, 429, 0.7)
pt3dadd(-628, 283.5, 429, 0.7)
pt3dadd(-630, 286, 429.5, 0.7)
pt3dadd(-629.5, 292.5, 430.5, 0.7)
pt3dadd(-631, 295, 437, 0.7)
pt3dadd(-633, 296.5, 437, 0.7)
pt3dadd(-637, 298.5, 451, 0.5)
pt3dadd(-637, 304.5, 458, 0.5)
pt3dadd(-639, 306.5, 453, 0.5)
pt3dadd(-642.5, 307, 456.5, 0.5)
pt3dadd(-646, 308, 454, 0.2)
pt3dadd(-649.5, 310, 454.5, 0.2)
pt3dadd(-650, 315, 458.5, 0.2)
pt3dadd(-652, 317, 462, 0.2)
pt3dadd(-653.5, 320.5, 468.5, 0.2)
pt3dadd(-659, 323, 464.5, 0.3)
pt3dadd(-661.5, 325.5, 465, 0.2)
pt3dadd(-664, 326.5, 475, 0.6)
pt3dadd(-670.5, 326.5, 471, 0.7)
pt3dadd(-672, 329, 471, 0.9)
pt3dadd(-675, 333, 471, 0.8)
pt3dadd(-680, 335, 471, 0.7)
pt3dadd(-685, 335, 475, 0.8)
pt3dadd(-688, 335, 475, 0.9)
pt3dadd(-689, 338, 475, 0.2)
pt3dadd(-690.5, 341.5, 483, 0.2)
pt3dadd(-691.5, 344.5, 479.5, 0.2)
pt3dadd(-694, 345.5, 479.5, 0.2)
pt3dadd(-695.5, 347.5, 479.5, 0.4)
pt3dadd(-700, 352.5, 487, 0.2)
pt3dadd(-703.5, 353, 487, 0.2)
pt3dadd(-703.5, 356.5, 487, 0.2)
pt3dadd(-705.5, 359.5, 487, 0.2)
pt3dadd(-704, 362.5, 487, 0.2)
pt3dadd(-702, 365.5, 483, 0.2)
pt3dadd(-701, 368.5, 483.5, 0.2)
pt3dadd(-701, 372, 483.5, 0.2)
pt3dadd(-702, 374, 476, 0.2)
pt3dadd(-703, 378.5, 483.5, 0.4)
pt3dadd(-704.5, 382, 483.5, 0.4)
pt3dadd(-704.5, 385, 480, 1.9)
pt3dadd(-706, 387, 480, 0.7)
pt3dadd(-707.5, 388.5, 480, 0.7)
pt3dadd(-709.5, 390, 480, 0.9)
pt3dadd(-711, 393, 472.5, 1.1)
pt3dadd(-710.5, 397, 476.5, 0.7)
pt3dadd(-710.5, 402, 480.5, 0.6)
pt3dadd(-711, 406.5, 472.5, 0.6)
pt3dadd(-713, 408, 472.5, 0.5)
pt3dadd(-716.5, 409, 472.5, 0.5)
pt3dadd(-719, 413, 476.5, 0.5)
pt3dadd(-721.5, 415, 481, 0.5)
pt3dadd(-724.5, 415, 484.5, 0.5)
pt3dadd(-726, 416.5, 477, 0.5)
pt3dadd(-729, 419.5, 481, 0.4)
pt3dadd(-732, 422, 481, 0.4)
pt3dadd(-734.5, 423.5, 481, 0.4)
pt3dadd(-737, 425, 477, 0.4)
pt3dadd(-738, 427, 477, 0.4)
pt3dadd(-740, 428, 477, 0.4)
pt3dadd(-743, 426.5, 477, 0.3)
pt3dadd(-747.5, 426.5, 477.5, 0.1)
pt3dadd(-751.5, 428.5, 473.5, 0.1)
pt3dadd(-754, 429.5, 470, 0.1)
pt3dadd(-756, 431.5, 470, 0.1)
pt3dadd(-759.5, 431.5, 477.5, 0.1)
pt3dadd(-762.5, 430.5, 473.5, 0.1)
}
dend[267] {pt3dclear()
pt3dadd(-531.5, 218, 347, 2.6)
pt3dadd(-534, 217, 348.5, 1.3)
pt3dadd(-537.5, 217, 361, 1.3)
pt3dadd(-538.5, 219.5, 362.5, 1.3)
pt3dadd(-541, 220.5, 364, 1.3)
pt3dadd(-547.5, 220.5, 375, 1.3)
pt3dadd(-551.5, 218, 376, 1.5)
pt3dadd(-554, 217, 376.5, 1.5)
pt3dadd(-555.5, 218.5, 381, 1.5)
pt3dadd(-557, 221, 381.5, 1.5)
pt3dadd(-561.5, 220.5, 383, 1.3)
pt3dadd(-563, 222.5, 383.5, 1.3)
pt3dadd(-568, 221.5, 388.5, 1.3)
pt3dadd(-570, 219, 386, 1.3)
pt3dadd(-573, 219, 387, 0.9)
pt3dadd(-572.5, 221.5, 387.5, 1)
pt3dadd(-577.5, 222, 388.5, 1.6)
pt3dadd(-582.5, 224.5, 398, 1)
pt3dadd(-584, 226.5, 393, 1.4)
pt3dadd(-587.5, 226.5, 401.5, 1.4)
pt3dadd(-595.5, 225, 404, 1.2)
pt3dadd(-600, 225, 405, 1.1)
pt3dadd(-603, 224, 405.5, 1.1)
pt3dadd(-606.5, 223, 406.5, 0.9)
pt3dadd(-610.5, 223, 407.5, 0.9)
pt3dadd(-613, 226, 412.5, 1.1)
pt3dadd(-618.5, 226, 414, 1.1)
pt3dadd(-621.5, 226, 423, 1.1)
pt3dadd(-624.5, 228.5, 425, 1.1)
pt3dadd(-625.5, 231.5, 429, 1)
pt3dadd(-630, 233.5, 430, 1)
pt3dadd(-634.5, 233.5, 431, 1)
pt3dadd(-637, 232, 426.5, 1.1)
pt3dadd(-643, 232, 435, 1.1)
pt3dadd(-645.5, 233.5, 442.5, 1.1)
pt3dadd(-649.5, 234, 434, 0.9)
pt3dadd(-651.5, 232, 444.5, 0.8)
pt3dadd(-654.5, 233, 447.5, 0.9)
pt3dadd(-657, 233.5, 448, 1.1)
pt3dadd(-663, 237.5, 453, 0.3)
pt3dadd(-664, 242.5, 461, 0.3)
pt3dadd(-667, 243.5, 465, 0.3)
pt3dadd(-672.5, 242, 466.5, 0.7)
pt3dadd(-673.5, 246, 467.5, 0.7)
pt3dadd(-674.5, 248.5, 471, 0.9)
pt3dadd(-680, 252, 470.5, 0.9)
pt3dadd(-681.5, 254, 473.5, 0.9)
pt3dadd(-684.5, 257, 475, 0.9)
pt3dadd(-688.5, 257, 479, 0.9)
pt3dadd(-691.5, 258, 479, 0.9)
pt3dadd(-691.5, 261.5, 479, 0.7)
pt3dadd(-695, 261.5, 475, 0.7)
pt3dadd(-698, 261.5, 479, 1.1)
pt3dadd(-702, 263.5, 475.5, 0.7)
pt3dadd(-706.5, 265.5, 471.5, 0.4)
pt3dadd(-710, 267, 471.5, 0.5)
pt3dadd(-714, 265.5, 471.5, 0.5)
pt3dadd(-717.5, 267, 480, 0.5)
pt3dadd(-717.5, 270.5, 480, 0.8)
pt3dadd(-719.5, 273, 480, 0.8)
pt3dadd(-721.5, 270.5, 483.5, 0.4)
pt3dadd(-724, 268.5, 483.5, 0.4)
pt3dadd(-726.5, 271.5, 492, 0.4)
pt3dadd(-727.5, 275.5, 492, 0.6)
pt3dadd(-730, 273.5, 492, 1)
pt3dadd(-731, 276.5, 496, 0.8)
pt3dadd(-730, 279, 488.5, 0.1)
pt3dadd(-727, 282.5, 488.5, 0.1)
pt3dadd(-728.5, 286, 488.5, 0.1)
pt3dadd(-730, 290, 488.5, 0.1)
pt3dadd(-731.5, 293, 493, 0.1)
pt3dadd(-735.5, 295, 493, 0.1)
pt3dadd(-738.5, 297.5, 493, 0.1)
}
dend[268] {pt3dclear()
pt3dadd(-226.5, 23, 100.5, 7.3)
pt3dadd(-230.5, 18.5, 110.5, 2.5)
pt3dadd(-236, 15, 108.5, 2.4)
pt3dadd(-244.5, 14.5, 109.5, 2.2)
pt3dadd(-254, 14.5, 114, 2.3)
pt3dadd(-258.5, 12, 111.5, 2.5)
pt3dadd(-263, 8, 112.5, 1.8)
pt3dadd(-269, 8, 111, 2.5)
pt3dadd(-275.5, 8, 117.5, 2.1)
pt3dadd(-277.5, 7, 115, 2.5)
pt3dadd(-280, 6.5, 115.5, 2.3)
pt3dadd(-289, 7.5, 122.5, 1.9)
pt3dadd(-296.5, 7.5, 123.5, 2)
pt3dadd(-300, 8, 123.5, 2)
pt3dadd(-307, 9, 124.5, 2.3)
pt3dadd(-313, 9, 125.5, 2.1)
pt3dadd(-316, 8.5, 125.5, 2.2)
pt3dadd(-319.5, 8.5, 126, 2.5)
pt3dadd(-323.5, 8.5, 126.5, 2.5)
pt3dadd(-327.5, 7.5, 125, 2.2)
pt3dadd(-334, 7, 125, 2.8)
pt3dadd(-340, 5.5, 125.5, 3.1)
pt3dadd(-345, 4, 126, 2.6)
pt3dadd(-350, 1, 130, 2.5)
pt3dadd(-357, -1.5, 130.5, 2.3)
pt3dadd(-363, -2, 131, 2.3)
pt3dadd(-366.5, -3.5, 128, 3.1)
pt3dadd(-369, -4.5, 135.5, 2.6)
pt3dadd(-373.5, -7, 132.5, 2.8)
pt3dadd(-378.5, -9.5, 136.5, 1.9)
pt3dadd(-383, -10, 133, 1.9)
pt3dadd(-389.5, -12, 133.5, 2)
pt3dadd(-396.5, -14.5, 138, 2.3)
pt3dadd(-399.5, -14.5, 138, 2.3)
pt3dadd(-405, -15, 138.5, 2.2)
pt3dadd(-408, -15, 138.5, 2.1)
pt3dadd(-415, -14.5, 142, 1.3)
pt3dadd(-418, -18, 139.5, 1.8)
pt3dadd(-420, -20, 139.5, 2.2)
pt3dadd(-426, -22, 143, 1.6)
pt3dadd(-428, -23, 143.5, 2.2)
pt3dadd(-431, -23, 143.5, 2.4)
pt3dadd(-434, -25, 147.5, 2)
pt3dadd(-438, -25, 147.5, 2.2)
pt3dadd(-444, -23.5, 151.5, 1.5)
pt3dadd(-448, -23.5, 152, 1.4)
pt3dadd(-451.5, -23.5, 148.5, 1.6)
pt3dadd(-454.5, -24.5, 145.5, 1.8)
}
}
proc shape3d_67() {
dend[268] { pt3dadd(-456, -26.5, 145.5, 1.8)
pt3dadd(-457.5, -30, 146, 1.6)
pt3dadd(-462, -33, 146.5, 1.8)
pt3dadd(-464, -39.5, 150.5, 2.5)
pt3dadd(-465.5, -42, 154, 2.5)
pt3dadd(-473, -47.5, 155, 1.7)
pt3dadd(-478.5, -54, 148.5, 1.9)
pt3dadd(-485, -58, 152.5, 1.3)
pt3dadd(-490, -64, 147, 2)
pt3dadd(-492, -67, 150.5, 2.5)
pt3dadd(-496, -70, 154.5, 2.3)
pt3dadd(-500, -73.5, 151, 1.8)
pt3dadd(-505.5, -75, 162, 1.9)
pt3dadd(-510.5, -79.5, 156, 2.7)
pt3dadd(-513.5, -79.5, 153, 2.3)
pt3dadd(-520.5, -83, 160.5, 1.9)
pt3dadd(-525.5, -85, 164, 1.5)
pt3dadd(-532.5, -91, 165, 1.1)
pt3dadd(-536, -94, 168.5, 1.3)
pt3dadd(-538.5, -96, 169, 1.6)
pt3dadd(-542.5, -104, 163, 2)
pt3dadd(-548.5, -107.5, 166.5, 2)
pt3dadd(-561.5, -112.5, 167.5, 1.8)
pt3dadd(-568.5, -118, 168, 1.9)
pt3dadd(-576.5, -122, 169, 2)
pt3dadd(-583, -126, 166.5, 1.6)
pt3dadd(-590, -131, 170, 1.3)
pt3dadd(-596, -133, 170.5, 1)
pt3dadd(-600.5, -134.5, 171, 1.1)
pt3dadd(-604, -136, 175, 0.9)
pt3dadd(-609, -140, 175.5, 0.8)
pt3dadd(-611.5, -142, 178.5, 1.3)
pt3dadd(-614, -143.5, 178.5, 1.1)
pt3dadd(-615, -146, 176.5, 0.7)
pt3dadd(-620, -149, 179.5, 0.5)
pt3dadd(-624, -149, 180, 0.6)
pt3dadd(-626, -150, 180.5, 0.6)
pt3dadd(-628.5, -151.5, 183.5, 0.9)
pt3dadd(-630, -153.5, 184, 1.5)
pt3dadd(-633, -155, 184.5, 1.3)
pt3dadd(-636, -156.5, 182, 0.9)
pt3dadd(-638.5, -158, 182, 0.7)
pt3dadd(-641, -159.5, 182.5, 0.7)
pt3dadd(-643.5, -162, 183, 0.8)
pt3dadd(-645.5, -166.5, 176, 1.6)
pt3dadd(-650, -167, 190.5, 1.6)
pt3dadd(-655.5, -170.5, 184, 0.7)
pt3dadd(-661, -171, 184.5, 0.9)
pt3dadd(-663.5, -174.5, 196, 1.3)
pt3dadd(-665.5, -176.5, 196.5, 1.3)
pt3dadd(-669, -178.5, 194.5, 2)
pt3dadd(-671.5, -181, 195, 2.3)
pt3dadd(-674.5, -182.5, 198, 1.3)
pt3dadd(-678, -182.5, 198.5, 1.1)
pt3dadd(-682.5, -183, 199, 0.9)
pt3dadd(-686, -184.5, 194.5, 1)
pt3dadd(-689.5, -187.5, 195, 1)
pt3dadd(-691.5, -190.5, 192.5, 0.9)
pt3dadd(-700, -190, 191, 0.9)
pt3dadd(-704, -191.5, 200.5, 1.1)
pt3dadd(-705.5, -193, 201, 1.2)
pt3dadd(-707.5, -194.5, 201, 0.8)
pt3dadd(-711, -195, 204, 1.1)
pt3dadd(-714.5, -196, 210.5, 1.1)
pt3dadd(-718, -197.5, 208, 0.8)
pt3dadd(-721, -198, 211, 0.7)
pt3dadd(-727.5, -200.5, 206.5, 1)
pt3dadd(-730, -202.5, 207, 1.3)
pt3dadd(-733, -204.5, 207.5, 1.3)
pt3dadd(-734.5, -206, 207.5, 1.3)
pt3dadd(-737, -210.5, 208, 0.8)
pt3dadd(-738, -213, 208.5, 0.5)
pt3dadd(-742, -211.5, 209, 0.9)
pt3dadd(-745, -210, 209, 0.9)
pt3dadd(-745, -214, 215.5, 1)
pt3dadd(-750.5, -218, 221.5, 1)
pt3dadd(-755, -218.5, 222, 0.9)
pt3dadd(-756, -221, 222.5, 0.9)
pt3dadd(-758.5, -223.5, 222.5, 1.1)
pt3dadd(-759, -226, 223, 0.9)
pt3dadd(-760.5, -231, 223.5, 0.8)
pt3dadd(-762, -233.5, 219, 0.9)
pt3dadd(-761, -237, 225, 1.4)
pt3dadd(-762, -240.5, 225, 1.6)
pt3dadd(-761, -244.5, 222.5, 0.7)
pt3dadd(-760, -247.5, 222.5, 0.7)
pt3dadd(-760, -251, 223, 0.7)
pt3dadd(-761, -253, 223.5, 0.7)
pt3dadd(-762, -256.5, 228, 2.5)
pt3dadd(-755.5, -260.5, 229, 0.9)
pt3dadd(-751, -262, 229.5, 0.8)
pt3dadd(-748, -262, 226.5, 0.8)
pt3dadd(-745, -262, 227, 0.8)
pt3dadd(-743, -258.5, 227.5, 0.8)
pt3dadd(-739.5, -257.5, 228, 0.8)
pt3dadd(-735, -257, 228.5, 1.1)
pt3dadd(-732, -256, 229, 1.2)
pt3dadd(-728, -254.5, 226, 1.2)
pt3dadd(-723, -252, 230, 1.1)
pt3dadd(-720.5, -249.5, 230.5, 0.8)
pt3dadd(-717, -249.5, 231, 0.8)
pt3dadd(-712, -249, 231.5, 0.8)
pt3dadd(-710, -247, 235.5, 0.8)
pt3dadd(-706.5, -245.5, 236, 0.8)
pt3dadd(-698.5, -243.5, 230.5, 0.9)
pt3dadd(-695, -242, 238, 1.2)
pt3dadd(-691.5, -242.5, 229, 1.7)
pt3dadd(-688.5, -242.5, 237, 1.7)
pt3dadd(-683, -242, 245.5, 1.1)
pt3dadd(-681, -243, 242.5, 0.9)
pt3dadd(-677, -244.5, 243.5, 0.5)
pt3dadd(-672.5, -246.5, 244.5, 0.5)
pt3dadd(-671, -248.5, 244.5, 0.5)
pt3dadd(-669, -250.5, 245, 0.5)
pt3dadd(-665.5, -253.5, 245.5, 0.5)
pt3dadd(-666.5, -257.5, 250, 0.6)
pt3dadd(-666, -260.5, 247, 0.8)
pt3dadd(-665.5, -264.5, 244, 0.8)
pt3dadd(-665.5, -267.5, 244.5, 0.8)
pt3dadd(-667.5, -268.5, 245, 0.8)
pt3dadd(-668, -272, 245, 0.8)
pt3dadd(-664, -272, 257, 0.8)
pt3dadd(-663.5, -269.5, 257.5, 0.5)
pt3dadd(-664, -274.5, 275, 0.5)
}
dend[269] {pt3dclear()
pt3dadd(-88, 25, 87, 7.6)
pt3dadd(-85.5, 36, 89, 2.3)
pt3dadd(-84.5, 38.5, 89, 2.5)
pt3dadd(-84, 41, 98.5, 2.8)
pt3dadd(-83.5, 49.5, 102.5, 2.6)
pt3dadd(-82.5, 51.5, 103, 2.1)
pt3dadd(-77, 54, 110, 2.1)
pt3dadd(-74.5, 57, 110.5, 2.1)
pt3dadd(-76, 63, 118, 2)
pt3dadd(-77.5, 65.5, 121.5, 1.8)
pt3dadd(-80.5, 67, 125, 2)
pt3dadd(-80.5, 72.5, 126, 1.8)
pt3dadd(-76, 74, 126.5, 2)
pt3dadd(-75.5, 76.5, 127, 2)
pt3dadd(-75, 82, 143, 2.2)
pt3dadd(-72.5, 87, 144, 1.4)
pt3dadd(-70.5, 88.5, 144, 2.1)
pt3dadd(-68, 90, 144.5, 1.8)
pt3dadd(-67, 92, 153, 1.8)
pt3dadd(-70.5, 93.5, 153.5, 2.2)
pt3dadd(-71, 96.5, 154, 2.3)
pt3dadd(-71, 99.5, 154.5, 2.3)
pt3dadd(-71.5, 105, 155.5, 2.4)
pt3dadd(-71.5, 108.5, 159.5, 2.4)
pt3dadd(-74.5, 114, 159, 2.2)
pt3dadd(-78, 121, 167, 2.2)
pt3dadd(-80, 124, 164.5, 2.2)
pt3dadd(-81.5, 126, 165, 1.6)
pt3dadd(-86, 130.5, 169.5, 0.4)
pt3dadd(-87.5, 132.5, 164.5, 0.3)
pt3dadd(-89.5, 134.5, 165, 0.3)
pt3dadd(-94, 139, 166, 0.3)
pt3dadd(-94.5, 141.5, 166.5, 0.3)
pt3dadd(-96, 143, 167, 0.3)
pt3dadd(-98.5, 145.5, 175, 0.3)
}
}
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()
}
access soma
celldef()