| #include "astro.h" |
| |
| double sunfp[] = |
| { |
| -.265, 0, |
| 3.760, 0, |
| .200, 0, |
| 0, |
| |
| -.021, 0, |
| 5.180, 0, |
| 1.882, 3.8991, |
| -.030, 0, |
| 0, |
| |
| 0.075, 5.1766, |
| 4.838, 5.2203, |
| 0.074, 3.6285, |
| 0.116, 2.5988, |
| 5.526, 2.5885, |
| 2.497, 5.5143, |
| 0.044, 5.4350, |
| 0.666, 3.1016, |
| 1.559, 6.0258, |
| 1.024, 5.5527, |
| 0.210, 3.5989, |
| 0.144, 3.4104, |
| 0.152, 6.0004, |
| 0.084, 4.1120, |
| 0.037, 3.8711, |
| 0.123, 3.4086, |
| 0.154, 6.2762, |
| 0.038, 4.6094, |
| 0.020, 5.1313, |
| 0.042, 4.5239, |
| 0.032, 0.8517, |
| 0.273, 3.7996, |
| 0.048, 4.5431, |
| 0.041, 6.0388, |
| 2.043, 6.0020, |
| 1.770, 3.4977, |
| 0.028, 2.5831, |
| 0.129, 5.1348, |
| 0.425, 5.9146, |
| 0.034, 1.2391, |
| 0.500, 1.8357, |
| 0.585, 5.8304, |
| 0.085, 0.9529, |
| 0.204, 1.7593, |
| 0.020, 3.2463, |
| 0.154, 3.9689, |
| 0.101, 1.6808, |
| 0.049, 3.0805, |
| 0.106, 3.8868, |
| 0.052, 6.0895, |
| 0.021, 3.7559, |
| 0.028, 5.2011, |
| 0.062, 6.0388, |
| 0.044, 1.8483, |
| 0.045, 3.9759, |
| 0.021, 5.3931, |
| 0.026, 1.9722, |
| 0.163, 3.4662, |
| 7.208, 3.1334, |
| 2.600, 4.5940, |
| 0.073, 4.8223, |
| 0.069, 1.4102, |
| 2.731, 1.5210, |
| 1.610, 1.9110, |
| 0.073, 4.4087, |
| 0.164, 2.9758, |
| 0.556, 1.4425, |
| 0.210, 1.7261, |
| 0.044, 2.9356, |
| 0.080, 1.3561, |
| 0.419, 1.7555, |
| 0.320, 4.7030, |
| 0.108, 5.0719, |
| 0.112, 5.1243, |
| 0.021, 5.0440, |
| 0, |
| |
| 6.454, 0, |
| 0.177, 0, |
| -.424, 0, |
| 0.039, 0, |
| -.064, 0, |
| 0.172, 0, |
| 0, |
| |
| -.092, 1.6354, |
| -.067, 2.1468, |
| -.210, 2.6494, |
| -.166, 4.6338, |
| 0, |
| |
| 0.576, 0, |
| -.047, 0, |
| 0.021, 0, |
| 0, |
| |
| 2.359e-6, 3.6607, |
| 6.842e-6, 1.0180, |
| 0.869e-6, 3.9567, |
| 1.045e-6, 1.5332, |
| 1.497e-6, 4.4691, |
| 0.376e-6, 2.0295, |
| 2.057e-6, 4.0941, |
| 0.215e-6, 4.3459, |
| 0.478e-6, 0.2648, |
| 0.208e-6, 1.9548, |
| 7.067e-6, 1.5630, |
| 0.244e-6, 5.9097, |
| 4.026e-6, 6.2526, |
| 1.459e-6, 0.3409, |
| 0.281e-6, 1.4172, |
| 0.803e-6, 6.1533, |
| 0.429e-6, 0.1850, |
| 0, |
| |
| 13.36e-6, 0, |
| -1.33e-6, 0, |
| 0.37e-6, 0, |
| 0.36e-6, 0, |
| 0 |
| }; |
| char suncp[] = |
| { |
| 4, -7, 3, 0, |
| -8, 4, 0, 3, |
| 15, -8, 0, 0, |
| |
| 4, -7, 3, 0, 0, |
| -8, 4, 0, 3, 0, |
| 0, 13, -8, 0, 1, |
| 15, -8, 0, 0, 0, |
| |
| 0,0,1,0,0, |
| 0,-1,1,0,0, |
| 0,-2,1,0,0, |
| 0,-1,2,0,0, |
| 0,-2,2,0,0, |
| 0,-3,2,0,0, |
| 0,-4,2,0,0, |
| 0,-3,3,0,0, |
| 0,-4,3,0,0, |
| 0,-5,3,0,0, |
| 0,-4,4,0,0, |
| 0,-5,4,0,0, |
| 0,-6,4,0,0, |
| 0,-5,5,0,0, |
| 0,-6,5,0,0, |
| 0,-7,5,0,0, |
| 0,-8,5,0,0, |
| 0,-6,6,0,0, |
| 0,-7,7,0,0, |
| 0,-12,8,0,0, |
| 0,-14,8,0,0, |
| -1,1,0,0,0, |
| -1,0,0,0,0, |
| -2,3,0,0,0, |
| -2,2,0,0,0, |
| -2,1,0,0,0, |
| -2,0,0,0,0, |
| -3,3,0,0,0, |
| -3,2,0,0,0, |
| -4,4,0,0,0, |
| -4,3,0,0,0, |
| -4,2,0,0,0, |
| -5,4,0,0,0, |
| -5,3,0,0,0, |
| -6,5,0,0,0, |
| -6,4,0,0,0, |
| -6,3,0,0,0, |
| -7,5,0,0,0, |
| -7,4,0,0,0, |
| -8,5,0,0,0, |
| -8,4,0,0,0, |
| -9,6,0,0,0, |
| -9,5,0,0,0, |
| -11,6,0,0,0, |
| -13,7,0,0,0, |
| -15,9,0,0,0, |
| -17,9,0,0,0, |
| 0,2,0,-1,0, |
| 0,1,0,-1,0, |
| 0,0,0,-1,0, |
| 0,-1,0,-1,0, |
| 0,3,0,-2,0, |
| 0,2,0,-2,0, |
| 0,1,0,-2,0, |
| 0,0,0,-2,0, |
| 0,3,0,-3,0, |
| 0,2,0,-3,0, |
| 0,1,0,-3,0, |
| 0,3,0,-4,0, |
| 0,2,0,-4,0, |
| 0,1,0,0,-1, |
| 0,0,0,0,-1, |
| 0,2,0,0,-2, |
| 0,1,0,0,-2, |
| 0,2,0,0,-3, |
| |
| 1,0,0, |
| 1,1,0, |
| 1,-1,0, |
| 3,-1,0, |
| 1,0,1, |
| 1,0,-1, |
| |
| -2,1,0, |
| -3,2,0, |
| -4,2,0, |
| 1,0,-2, |
| |
| 1,0,0, |
| 1,-1,0, |
| -1,0,2, |
| |
| 0,-1,1,0,0, |
| 0,-2,2,0,0, |
| 0,-3,2,0,0, |
| 0,-3,3,0,0, |
| 0,-4,3,0,0, |
| 0,-4,4,0,0, |
| -2,2,0,0,0, |
| -3,2,0,0,0, |
| -4,3,0,0,0, |
| 0,2,0,-1,0, |
| 0,1,0,-1,0, |
| 0,0,0,-1,0, |
| 0,2,0,-2,0, |
| 0,1,0,-2,0, |
| 0,3,0,-3,0, |
| 0,2,0,-3,0, |
| 0,1,0,0,-1, |
| |
| 1,0,0, |
| 1,-1,0, |
| 1,1,0, |
| 1,0,-1 |
| }; |