ref: de1a460fa13ed2bffbdc3cb046cc8831c1d22008
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, };