1 #include "config.h" 2 #include "copyright.h" 3 4 double Sin[] = 5 { 6 -1.0000, 7 -0.9997, 8 -0.9988, 9 -0.9973, 10 -0.9952, 11 -0.9925, 12 -0.9892, 13 -0.9853, 14 -0.9808, 15 -0.9757, 16 -0.9701, 17 -0.9638, 18 -0.9570, 19 -0.9496, 20 -0.9416, 21 -0.9330, 22 -0.9239, 23 -0.9143, 24 -0.9040, 25 -0.8933, 26 -0.8820, 27 -0.8701, 28 -0.8578, 29 -0.8449, 30 -0.8315, 31 -0.8176, 32 -0.8033, 33 -0.7884, 34 -0.7731, 35 -0.7573, 36 -0.7410, 37 -0.7243, 38 -0.7072, 39 -0.6896, 40 -0.6716, 41 -0.6533, 42 -0.6345, 43 -0.6153, 44 -0.5958, 45 -0.5759, 46 -0.5557, 47 -0.5351, 48 -0.5142, 49 -0.4930, 50 -0.4715, 51 -0.4497, 52 -0.4277, 53 -0.4054, 54 -0.3828, 55 -0.3600, 56 -0.3370, 57 -0.3138, 58 -0.2904, 59 -0.2668, 60 -0.2431, 61 -0.2192, 62 -0.1952, 63 -0.1711, 64 -0.1469, 65 -0.1225, 66 -0.0982, 67 -0.0737, 68 -0.0492, 69 -0.0247, 70 -0.0001, 71 0.0244, 72 0.0489, 73 0.0734, 74 0.0979, 75 0.1223, 76 0.1466, 77 0.1708, 78 0.1949, 79 0.2190, 80 0.2428, 81 0.2666, 82 0.2901, 83 0.3135, 84 0.3367, 85 0.3598, 86 0.3825, 87 0.4051, 88 0.4274, 89 0.4495, 90 0.4713, 91 0.4928, 92 0.5140, 93 0.5349, 94 0.5554, 95 0.5757, 96 0.5956, 97 0.6151, 98 0.6343, 99 0.6531, 100 0.6714, 101 0.6894, 102 0.7070, 103 0.7241, 104 0.7408, 105 0.7571, 106 0.7729, 107 0.7882, 108 0.8031, 109 0.8175, 110 0.8314, 111 0.8448, 112 0.8576, 113 0.8700, 114 0.8818, 115 0.8931, 116 0.9039, 117 0.9141, 118 0.9238, 119 0.9329, 120 0.9415, 121 0.9495, 122 0.9569, 123 0.9637, 124 0.9700, 125 0.9757, 126 0.9808, 127 0.9852, 128 0.9891, 129 0.9925, 130 0.9952, 131 0.9973, 132 0.9988, 133 0.9997, 134 1.0000, 135 0.9997, 136 0.9988, 137 0.9973, 138 0.9952, 139 0.9925, 140 0.9892, 141 0.9853, 142 0.9808, 143 0.9757, 144 0.9700, 145 0.9638, 146 0.9569, 147 0.9495, 148 0.9415, 149 0.9330, 150 0.9239, 151 0.9142, 152 0.9040, 153 0.8932, 154 0.8819, 155 0.8701, 156 0.8577, 157 0.8449, 158 0.8315, 159 0.8176, 160 0.8032, 161 0.7884, 162 0.7730, 163 0.7572, 164 0.7410, 165 0.7243, 166 0.7071, 167 0.6896, 168 0.6716, 169 0.6532, 170 0.6344, 171 0.6153, 172 0.5957, 173 0.5758, 174 0.5556, 175 0.5350, 176 0.5141, 177 0.4929, 178 0.4714, 179 0.4496, 180 0.4276, 181 0.4053, 182 0.3827, 183 0.3599, 184 0.3369, 185 0.3137, 186 0.2903, 187 0.2667, 188 0.2430, 189 0.2191, 190 0.1951, 191 0.1710, 192 0.1468, 193 0.1225, 194 0.0981, 195 0.0736, 196 0.0491, 197 0.0246, 198 0.0000, 199 -0.0245, 200 -0.0490, 201 -0.0735, 202 -0.0980, 203 -0.1224, 204 -0.1467, 205 -0.1709, 206 -0.1950, 207 -0.2190, 208 -0.2429, 209 -0.2667, 210 -0.2902, 211 -0.3136, 212 -0.3368, 213 -0.3598, 214 -0.3826, 215 -0.4052, 216 -0.4275, 217 -0.4496, 218 -0.4713, 219 -0.4928, 220 -0.5140, 221 -0.5349, 222 -0.5555, 223 -0.5758, 224 -0.5956, 225 -0.6152, 226 -0.6343, 227 -0.6531, 228 -0.6715, 229 -0.6895, 230 -0.7071, 231 -0.7242, 232 -0.7409, 233 -0.7572, 234 -0.7730, 235 -0.7883, 236 -0.8032, 237 -0.8175, 238 -0.8314, 239 -0.8448, 240 -0.8577, 241 -0.8700, 242 -0.8819, 243 -0.8932, 244 -0.9040, 245 -0.9142, 246 -0.9238, 247 -0.9330, 248 -0.9415, 249 -0.9495, 250 -0.9569, 251 -0.9638, 252 -0.9700, 253 -0.9757, 254 -0.9808, 255 -0.9853, 256 -0.9892, 257 -0.9925, 258 -0.9952, 259 -0.9973, 260 -0.9988, 261 -0.9997 262 }; 263 double Cos[] = 264 { 265 0.0000, 266 0.0245, 267 0.0491, 268 0.0736, 269 0.0980, 270 0.1224, 271 0.1467, 272 0.1710, 273 0.1951, 274 0.2191, 275 0.2430, 276 0.2667, 277 0.2903, 278 0.3137, 279 0.3369, 280 0.3599, 281 0.3827, 282 0.4052, 283 0.4275, 284 0.4496, 285 0.4714, 286 0.4929, 287 0.5141, 288 0.5350, 289 0.5556, 290 0.5758, 291 0.5957, 292 0.6152, 293 0.6344, 294 0.6532, 295 0.6715, 296 0.6895, 297 0.7071, 298 0.7242, 299 0.7409, 300 0.7572, 301 0.7730, 302 0.7883, 303 0.8032, 304 0.8176, 305 0.8315, 306 0.8448, 307 0.8577, 308 0.8701, 309 0.8819, 310 0.8932, 311 0.9040, 312 0.9142, 313 0.9239, 314 0.9330, 315 0.9415, 316 0.9495, 317 0.9569, 318 0.9638, 319 0.9700, 320 0.9757, 321 0.9808, 322 0.9853, 323 0.9892, 324 0.9925, 325 0.9952, 326 0.9973, 327 0.9988, 328 0.9997, 329 1.0000, 330 0.9997, 331 0.9988, 332 0.9973, 333 0.9952, 334 0.9925, 335 0.9892, 336 0.9853, 337 0.9808, 338 0.9757, 339 0.9700, 340 0.9638, 341 0.9570, 342 0.9495, 343 0.9416, 344 0.9330, 345 0.9239, 346 0.9142, 347 0.9040, 348 0.8933, 349 0.8819, 350 0.8701, 351 0.8578, 352 0.8449, 353 0.8315, 354 0.8176, 355 0.8032, 356 0.7884, 357 0.7731, 358 0.7573, 359 0.7410, 360 0.7243, 361 0.7072, 362 0.6896, 363 0.6716, 364 0.6532, 365 0.6344, 366 0.6153, 367 0.5958, 368 0.5759, 369 0.5556, 370 0.5351, 371 0.5142, 372 0.4930, 373 0.4715, 374 0.4497, 375 0.4276, 376 0.4053, 377 0.3828, 378 0.3600, 379 0.3370, 380 0.3138, 381 0.2904, 382 0.2668, 383 0.2431, 384 0.2192, 385 0.1952, 386 0.1710, 387 0.1468, 388 0.1225, 389 0.0981, 390 0.0737, 391 0.0492, 392 0.0246, 393 0.0001, 394 -0.0244, 395 -0.0490, 396 -0.0735, 397 -0.0979, 398 -0.1223, 399 -0.1466, 400 -0.1709, 401 -0.1950, 402 -0.2190, 403 -0.2429, 404 -0.2666, 405 -0.2902, 406 -0.3136, 407 -0.3368, 408 -0.3598, 409 -0.3826, 410 -0.4051, 411 -0.4275, 412 -0.4495, 413 -0.4713, 414 -0.4928, 415 -0.5140, 416 -0.5349, 417 -0.5555, 418 -0.5757, 419 -0.5956, 420 -0.6151, 421 -0.6343, 422 -0.6531, 423 -0.6715, 424 -0.6895, 425 -0.7070, 426 -0.7242, 427 -0.7409, 428 -0.7571, 429 -0.7729, 430 -0.7883, 431 -0.8031, 432 -0.8175, 433 -0.8314, 434 -0.8448, 435 -0.8577, 436 -0.8700, 437 -0.8819, 438 -0.8932, 439 -0.9039, 440 -0.9142, 441 -0.9238, 442 -0.9329, 443 -0.9415, 444 -0.9495, 445 -0.9569, 446 -0.9637, 447 -0.9700, 448 -0.9757, 449 -0.9808, 450 -0.9853, 451 -0.9892, 452 -0.9925, 453 -0.9952, 454 -0.9973, 455 -0.9988, 456 -0.9997, 457 -1.0000, 458 -0.9997, 459 -0.9988, 460 -0.9973, 461 -0.9952, 462 -0.9925, 463 -0.9892, 464 -0.9853, 465 -0.9808, 466 -0.9757, 467 -0.9701, 468 -0.9638, 469 -0.9570, 470 -0.9496, 471 -0.9416, 472 -0.9330, 473 -0.9239, 474 -0.9143, 475 -0.9041, 476 -0.8933, 477 -0.8820, 478 -0.8702, 479 -0.8578, 480 -0.8449, 481 -0.8316, 482 -0.8177, 483 -0.8033, 484 -0.7884, 485 -0.7731, 486 -0.7573, 487 -0.7411, 488 -0.7244, 489 -0.7072, 490 -0.6897, 491 -0.6717, 492 -0.6533, 493 -0.6345, 494 -0.6154, 495 -0.5958, 496 -0.5759, 497 -0.5557, 498 -0.5351, 499 -0.5142, 500 -0.4930, 501 -0.4715, 502 -0.4498, 503 -0.4277, 504 -0.4054, 505 -0.3828, 506 -0.3601, 507 -0.3371, 508 -0.3138, 509 -0.2905, 510 -0.2669, 511 -0.2432, 512 -0.2193, 513 -0.1953, 514 -0.1711, 515 -0.1469, 516 -0.1226, 517 -0.0982, 518 -0.0737, 519 -0.0493, 520 -0.0247 521 }; 522