Astro-PAL
view release on metacpan or search on metacpan
erfasrc/src/xy06.c view on Meta::CPAN
1171, 1178, 1185, 1192, 1199, 1205, 1212, 1218, 1226, 1232,
1239, 1245, 1252, 1259, 1266, 1272, 1278, 1284, 1292, 1298,
1304, 1310, 1316, 1323, 1329, 1335, 1341, 1347, 1353, 1359,
1365, 1371, 1377, 1383, 1389, 1396, 1402, 1408, 1414, 1420,
1426, 1434, 1440, 1446, 1452, 1459, 1465, 1471, 1477, 1482,
1488, 1493, 1499, 1504, 1509, 1514, 1520, 1527, 1532, 1538,
/* 201-300 */
1543, 1548, 1553, 1558, 1564, 1569, 1574, 1579, 1584, 1589,
1594, 1596, 1598, 1600, 1602, 1605, 1608, 1610, 1612, 1617,
1619, 1623, 1625, 1627, 1629, 1632, 1634, 1640, 1642, 1644,
1646, 1648, 1650, 1652, 1654, 1658, 1660, 1662, 1664, 1668,
1670, 1672, 1673, 1675, 1679, 1681, 1683, 1684, 1686, 1688,
1690, 1693, 1695, 1697, 1701, 1703, 1705, 1707, 1709, 1711,
1712, 1715, 1717, 1721, 1723, 1725, 1727, 1729, 1731, 1733,
1735, 1737, 1739, 1741, 1743, 1745, 1747, 1749, 1751, 1753,
1755, 1757, 1759, 1761, 1762, 1764, 1766, 1768, 1769, 1771,
1773, 1775, 1777, 1779, 1781, 1783, 1785, 1787, 1788, 1790,
/* 301-400 */
1792, 1794, 1796, 1798, 1800, 1802, 1804, 1806, 1807, 1809,
1811, 1815, 1817, 1819, 1821, 1823, 1825, 1827, 1829, 1831,
1833, 1835, 1837, 1839, 1840, 1842, 1844, 1848, 1850, 1852,
1854, 1856, 1858, 1859, 1860, 1862, 1864, 1866, 1868, 1869,
1871, 1873, 1875, 1877, 1879, 1881, 1883, 1885, 1887, 1889,
1891, 1892, 1896, 1898, 1900, 1901, 1903, 1905, 1907, 1909,
1910, 1911, 1913, 1915, 1919, 1921, 1923, 1927, 1929, 1931,
1933, 1935, 1937, 1939, 1943, 1945, 1947, 1948, 1949, 1951,
1953, 1955, 1957, 1958, 1960, 1962, 1964, 1966, 1968, 1970,
1971, 1973, 1974, 1975, 1977, 1979, 1980, 1981, 1982, 1984,
/* 401-500 */
1986, 1988, 1990, 1992, 1994, 1995, 1997, 1999, 2001, 2003,
2005, 2007, 2008, 2009, 2011, 2013, 2015, 2017, 2019, 2021,
2023, 2024, 2025, 2027, 2029, 2031, 2033, 2035, 2037, 2041,
2043, 2045, 2046, 2047, 2049, 2051, 2053, 2055, 2056, 2057,
2059, 2061, 2063, 2065, 2067, 2069, 2070, 2071, 2072, 2074,
2076, 2078, 2080, 2082, 2084, 2086, 2088, 2090, 2092, 2094,
2095, 2096, 2097, 2099, 2101, 2105, 2106, 2107, 2108, 2109,
2110, 2111, 2113, 2115, 2119, 2121, 2123, 2125, 2127, 2129,
2131, 2133, 2135, 2136, 2137, 2139, 2141, 2143, 2145, 2147,
2149, 2151, 2153, 2155, 2157, 2159, 2161, 2163, 2165, 2167,
/* 501-600 */
2169, 2171, 2173, 2175, 2177, 2179, 2181, 2183, 2185, 2186,
2187, 2188, 2192, 2193, 2195, 2197, 2199, 2201, 2203, 2205,
2207, 2209, 2211, 2213, 2217, 2219, 2221, 2223, 2225, 2227,
2229, 2231, 2233, 2234, 2235, 2236, 2237, 2238, 2239, 2240,
2241, 2244, 2246, 2248, 2250, 2252, 2254, 2256, 2258, 2260,
2262, 2264, 2266, 2268, 2270, 2272, 2274, 2276, 2278, 2280,
2282, 2284, 2286, 2288, 2290, 2292, 2294, 2296, 2298, 2300,
2302, 2303, 2304, 2305, 2306, 2307, 2309, 2311, 2313, 2315,
2317, 2319, 2321, 2323, 2325, 2327, 2329, 2331, 2333, 2335,
2337, 2341, 2343, 2345, 2347, 2349, 2351, 2352, 2355, 2356,
/* 601-700 */
2357, 2358, 2359, 2361, 2363, 2364, 2365, 2366, 2367, 2368,
2369, 2370, 2371, 2372, 2373, 2374, 2376, 2378, 2380, 2382,
2384, 2385, 2386, 2387, 2388, 2389, 2390, 2391, 2392, 2393,
2394, 2395, 2396, 2397, 2398, 2399, 2400, 2401, 2402, 2403,
2404, 2405, 2406, 2407, 2408, 2409, 2410, 2411, 2412, 2413,
2414, 2415, 2417, 2418, 2430, 2438, 2445, 2453, 2460, 2468,
2474, 2480, 2488, 2496, 2504, 2512, 2520, 2527, 2535, 2543,
2550, 2558, 2566, 2574, 2580, 2588, 2596, 2604, 2612, 2619,
2627, 2634, 2642, 2648, 2656, 2664, 2671, 2679, 2685, 2693,
2701, 2709, 2717, 2725, 2733, 2739, 2747, 2753, 2761, 2769,
/* 701-800 */
2777, 2785, 2793, 2801, 2809, 2817, 2825, 2833, 2841, 2848,
2856, 2864, 2872, 2878, 2884, 2892, 2898, 2906, 2914, 2922,
2930, 2938, 2944, 2952, 2958, 2966, 2974, 2982, 2988, 2996,
3001, 3009, 3017, 3025, 3032, 3039, 3045, 3052, 3059, 3067,
3069, 3076, 3083, 3090, 3098, 3105, 3109, 3111, 3113, 3120,
3124, 3128, 3132, 3136, 3140, 3144, 3146, 3150, 3158, 3161,
3165, 3166, 3168, 3172, 3176, 3180, 3182, 3185, 3189, 3193,
3194, 3197, 3200, 3204, 3208, 3212, 3216, 3219, 3221, 3222,
3226, 3230, 3234, 3238, 3242, 3243, 3247, 3251, 3254, 3258,
3262, 3266, 3270, 3274, 3275, 3279, 3283, 3287, 3289, 3293,
/* 801-900 */
3296, 3300, 3303, 3307, 3311, 3315, 3319, 3321, 3324, 3327,
3330, 3334, 3338, 3340, 3342, 3346, 3350, 3354, 3358, 3361,
3365, 3369, 3373, 3377, 3381, 3385, 3389, 3393, 3394, 3398,
3402, 3406, 3410, 3413, 3417, 3421, 3425, 3429, 3433, 3435,
3439, 3443, 3446, 3450, 3453, 3457, 3458, 3461, 3464, 3468,
3472, 3476, 3478, 3481, 3485, 3489, 3493, 3497, 3501, 3505,
3507, 3511, 3514, 3517, 3521, 3524, 3525, 3527, 3529, 3533,
3536, 3540, 3541, 3545, 3548, 3551, 3555, 3559, 3563, 3567,
3569, 3570, 3574, 3576, 3578, 3582, 3586, 3590, 3593, 3596,
3600, 3604, 3608, 3612, 3616, 3620, 3623, 3626, 3630, 3632,
/* 901-1000 */
3636, 3640, 3643, 3646, 3648, 3652, 3656, 3660, 3664, 3667,
3669, 3671, 3675, 3679, 3683, 3687, 3689, 3693, 3694, 3695,
3699, 3703, 3705, 3707, 3710, 3713, 3717, 3721, 3725, 3729,
3733, 3736, 3740, 3744, 3748, 3752, 3754, 3757, 3759, 3763,
3767, 3770, 3773, 3777, 3779, 3783, 3786, 3790, 3794, 3798,
3801, 3805, 3809, 3813, 3817, 3821, 3825, 3827, 3831, 3835,
3836, 3837, 3840, 3844, 3848, 3852, 3856, 3859, 3863, 3867,
3869, 3871, 3875, 3879, 3883, 3887, 3890, 3894, 3898, 3901,
3905, 3909, 3913, 3917, 3921, 3922, 3923, 3924, 3926, 3930,
3932, 3936, 3938, 3940, 3944, 3948, 3952, 3956, 3959, 3963,
/* 1001-1100 */
3965, 3969, 3973, 3977, 3979, 3981, 3982, 3986, 3989, 3993,
3997, 4001, 4004, 4006, 4009, 4012, 4016, 4020, 4024, 4026,
4028, 4032, 4036, 4040, 4044, 4046, 4050, 4054, 4058, 4060,
4062, 4063, 4064, 4068, 4071, 4075, 4077, 4081, 4083, 4087,
4089, 4091, 4095, 4099, 4101, 4103, 4105, 4107, 4111, 4115,
4119, 4123, 4127, 4129, 4131, 4135, 4139, 4141, 4143, 4145,
4149, 4153, 4157, 4161, 4165, 4169, 4173, 4177, 4180, 4183,
4187, 4191, 4195, 4198, 4201, 4205, 4209, 4212, 4213, 4216,
4217, 4221, 4223, 4226, 4230, 4234, 4236, 4240, 4244, 4248,
4252, 4256, 4258, 4262, 4264, 4266, 4268, 4270, 4272, 4276,
/* 1101-1200 */
4279, 4283, 4285, 4287, 4289, 4293, 4295, 4299, 4300, 4301,
4305, 4309, 4313, 4317, 4319, 4323, 4325, 4329, 4331, 4333,
4335, 4337, 4341, 4345, 4349, 4351, 4353, 4357, 4361, 4365,
4367, 4369, 4373, 4377, 4381, 4383, 4387, 4389, 4391, 4395,
4399, 4403, 4407, 4411, 4413, 4414, 4415, 4418, 4419, 4421,
4423, 4427, 4429, 4431, 4433, 4435, 4437, 4439, 4443, 4446,
4450, 4452, 4456, 4458, 4460, 4462, 4466, 4469, 4473, 4477,
4481, 4483, 4487, 4489, 4491, 4493, 4497, 4499, 4501, 4504,
4506, 4510, 4513, 4514, 4515, 4518, 4521, 4522, 4525, 4526,
4527, 4530, 4533, 4534, 4537, 4541, 4542, 4543, 4544, 4545,
/* 1201-1300 */
4546, 4547, 4550, 4553, 4554, 4555, 4558, 4561, 4564, 4567,
4568, 4571, 4574, 4575, 4578, 4581, 4582, 4585, 4586, 4588,
4590, 4592, 4596, 4598, 4602, 4604, 4608, 4612, 4613, 4616,
4619, 4622, 4623, 4624, 4625, 4626, 4629, 4632, 4633, 4636,
4639, 4640, 4641, 4642, 4643, 4644, 4645, 4648, 4649, 4650,
4651, 4652, 4653, 4656, 4657, 4660, 4661, 4664, 4667, 4670,
4671, 4674, 4675, 4676, 4677, 4678, 4681, 4682, 4683, 4684,
4687, 4688, 4689, 4692, 4693, 4696, 4697, 4700, 4701, 4702,
4703, 4704, 4707, 4708, 4711, 4712, 4715, 4716, 4717, 4718,
4719, 4720, 4721, 4722, 4723, 4726, 4729, 4730, 4733, 4736,
/* 1301-(NFLS+NFPL) */
4737, 4740, 4741, 4742, 4745, 4746, 4749, 4752, 4753
};
/* Amplitude coefficients (microarcsec); indexed using the nc array. */
static const double a[] = {
/* 1-105 */
-6844318.44, 9205236.26,1328.67,1538.18, 205833.11,
153041.79, -3309.73, 853.32,2037.98, -2301.27,
81.46, 120.56, -20.39, -15.22, 1.73, -1.61, -0.10, 0.11,
-0.02, -0.02, -523908.04, 573033.42,-544.75,-458.66,
12814.01, 11714.49, 198.97,-290.91, 155.74,-143.27,
-2.75, -1.03, -1.27, -1.16, 0.00, -0.01, -90552.22,
97846.69, 111.23, 137.41,2187.91,2024.68, 41.44, -51.26,
26.92, -24.46, -0.46, -0.28, -0.22, -0.20, 82168.76,
-89618.24, -27.64, -29.05, -2004.36, -1837.32,
-36.07, 48.00, -24.43, 22.41, 0.47, 0.24, 0.20, 0.18,
58707.02,7387.02, 470.05,-192.40, 164.33, -1312.21,
-179.73, -28.93, -17.36, -1.83, -0.50, 3.57, 0.00, 0.13,
-20557.78, 22438.42, -20.84, -17.40, 501.82, 459.68,
59.20, -67.30, 6.08, -5.61, -1.36, -1.19, 28288.28,
-674.99, -34.69, 35.80, -15.07,-632.54, -11.19, 0.78, -8.41,
0.17, 0.01, 0.07, -15406.85, 20069.50, 15.12,
/* 106-219 */
31.80, 448.76, 344.50, -5.77, 1.41, 4.59, -5.02, 0.17,
0.24, -11991.74, 12902.66, 32.46, 36.70, 288.49,
( run in 0.990 second using v1.01-cache-2.11-cpan-39bf76dae61 )