ref: a557c515c8c9c01fdb4f6cc850665be05accd84c
dir: /sys/src/cmd/astro/sunt.c/
#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,
};