1
0

merct.c 4.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336
  1. #include "astro.h"
  2. double mercfp[] =
  3. {
  4. 0.013, 0.6807,
  5. 0.048, 0.6283,
  6. 0.185, 0.6231,
  7. 0.711, 0.6191,
  8. 0.285, 0.5784,
  9. 0.075, 0.5411,
  10. 0.019, 0.5585,
  11. 0.010, 2.8449,
  12. 0.039, 2.8117,
  13. 0.147, 2.8135,
  14. 0.552, 2.8126,
  15. 2.100, 2.8126,
  16. 3.724, 2.8046,
  17. 0.729, 2.7883,
  18. 0.186, 2.7890,
  19. 0.049, 2.7943,
  20. 0.013, 2.7402,
  21. 0.033, 1.8361,
  22. 0.118, 1.8396,
  23. 0.431, 1.8391,
  24. 1.329, 1.8288,
  25. 0.539, 4.8686,
  26. 0.111, 4.8904,
  27. 0.027, 4.8956,
  28. 0.012, 3.9794,
  29. 0.056, 3.9636,
  30. 0.294, 3.9910,
  31. 0.484, 3.9514,
  32. 0.070, 3.9270,
  33. 0.018, 3.9270,
  34. 0.013, 6.1261,
  35. 0.050, 6.1052,
  36. 0.185, 6.1069,
  37. 0.685, 6.1011,
  38. 2.810, 6.1062,
  39. 7.356, 6.0699,
  40. 1.471, 6.0685,
  41. 0.375, 6.0687,
  42. 0.098, 6.0720,
  43. 0.026, 6.0476,
  44. 0.062, 5.1540,
  45. 0.122, 5.1191,
  46. 0.011, 0.9076,
  47. 0.074, 1.0123,
  48. 0.106, 0.9372,
  49. 0.017, 0.9425,
  50. 0.020, 0.0506,
  51. 0.052, 0.0384,
  52. 0.052, 3.0281,
  53. 0.012, 3.0543,
  54. 0.011, 2.1642,
  55. 0.016, 2.2340,
  56. 0.040, 4.3912,
  57. 0.080, 4.4262,
  58. 0.016, 4.4506,
  59. 0,
  60. 0.014, 1.0996,
  61. 0.056, 1.1153,
  62. 0.219, 1.1160,
  63. 0.083, 1.0734,
  64. 0.024, 0.9442,
  65. 0.018, 3.8432,
  66. 0.070, 3.8293,
  67. 0.256, 3.8230,
  68. 0.443, 3.8132,
  69. 0.080, 3.7647,
  70. 0.020, 3.7734,
  71. 0.019, 0.0000,
  72. 0.133, 0.1134,
  73. 0.129, 6.2588,
  74. 0.026, 6.2413,
  75. 0.026, 2.6599,
  76. 0.087, 2.6232,
  77. 0.374, 2.6496,
  78. 0.808, 2.5470,
  79. 0.129, 2.5587,
  80. 0.019, 2.5534,
  81. 0.012, 2.1642,
  82. 0,
  83. 0.014, 3.1416,
  84. 0.047, 3.1625,
  85. 0.179, 3.1695,
  86. 0.697, 3.1603,
  87. 0.574, 4.1315,
  88. 0.181, 4.2537,
  89. 0.047, 4.2481,
  90. 0.013, 4.2062,
  91. 0.018, 0.6650,
  92. 0.069, 0.6405,
  93. 0.253, 0.6449,
  94. 0.938, 0.6454,
  95. 3.275, 0.6458,
  96. 0.499, 0.5569,
  97. 0.119, 0.5271,
  98. 0.032, 0.5184,
  99. 0.030, 0.4939,
  100. 0.106, 0.4171,
  101. 0.353, 0.4510,
  102. 0.056, 0.3840,
  103. 0.013, 0.3142,
  104. 0.028, 0.2531,
  105. 0,
  106. 0.034, 0.9512,
  107. 0.060, 4.7962,
  108. 0.028, 4.7124,
  109. 0.028, 4.1836,
  110. 0.102, 4.1871,
  111. 0.380, 4.1864,
  112. 0.059, 4.1818,
  113. 0.015, 4.2185,
  114. 0.012, 4.1713,
  115. 0.050, 4.1870,
  116. 0,
  117. 0.218e-6, 5.3369,
  118. 0.491e-6, 5.3281,
  119. 0.172e-6, 2.1642,
  120. 0.091e-6, 2.1084,
  121. 0.204e-6, 1.2460,
  122. 0.712e-6, 1.2413,
  123. 2.370e-6, 1.2425,
  124. 0.899e-6, 1.2303,
  125. 0.763e-6, 4.3633,
  126. 0.236e-6, 4.3590,
  127. 0.163e-6, 0.2705,
  128. 0.541e-6, 0.2710,
  129. 1.157e-6, 0.2590,
  130. 0.099e-6, 0.1798,
  131. 0.360e-6, 2.4237,
  132. 0.234e-6, 2.3740,
  133. 0.253e-6, 4.5365,
  134. 0.849e-6, 4.5293,
  135. 2.954e-6, 4.5364,
  136. 0.282e-6, 4.4581,
  137. 1.550e-6, 1.3570,
  138. 0.472e-6, 1.3561,
  139. 0.135e-6, 1.3579,
  140. 0.081e-6, 3.5936,
  141. 0.087e-6, 3.5500,
  142. 0.087e-6, 5.7334,
  143. 0,
  144. 0.181e-6, 5.8275,
  145. 0.095e-6, 2.2427,
  146. 0.319e-6, 2.2534,
  147. 0.256e-6, 2.2403,
  148. 0.157e-6, 4.8292,
  149. 0.106e-6, 1.0332,
  150. 0.397e-6, 1.0756,
  151. 0.143e-6, 4.0980,
  152. 0,
  153. 0.222e-6, 1.6024,
  154. 0.708e-6, 1.5949,
  155. 0.191e-6, 5.7914,
  156. 0.100e-6, 5.3564,
  157. 0.347e-6, 5.3548,
  158. 1.185e-6, 5.3576,
  159. 3.268e-6, 5.3579,
  160. 0.371e-6, 2.2148,
  161. 0.160e-6, 2.1241,
  162. 0.134e-6, 5.1260,
  163. 0.347e-6, 5.1620,
  164. 0,
  165. };
  166. char merccp[] =
  167. {
  168. 4, 1,
  169. 3, 1,
  170. 2, 1,
  171. 1, 1,
  172. 0, 1,
  173. -1, 1,
  174. -2, 1,
  175. 6, 2,
  176. 5, 2,
  177. 4, 2,
  178. 3, 2,
  179. 2, 2,
  180. 1, 2,
  181. 0, 2,
  182. -1, 2,
  183. -2, 2,
  184. -3, 2,
  185. 5, 3,
  186. 4, 3,
  187. 3, 3,
  188. 2, 3,
  189. 1, 3,
  190. 0, 3,
  191. -1, 3,
  192. 5, 4,
  193. 4, 4,
  194. 3, 4,
  195. 2, 4,
  196. 1, 4,
  197. 0, 4,
  198. 7, 5,
  199. 6, 5,
  200. 5, 5,
  201. 4, 5,
  202. 3, 5,
  203. 2, 5,
  204. 1, 5,
  205. 0, 5,
  206. -1, 5,
  207. -2, 5,
  208. 4, 6,
  209. 3, 6,
  210. 5, 7,
  211. 4, 7,
  212. 3, 7,
  213. 2, 7,
  214. 5, 8,
  215. 4, 8,
  216. 3, 8,
  217. 2, 8,
  218. 5, 9,
  219. 4, 9,
  220. 5, 10,
  221. 4, 10,
  222. 3, 10,
  223. 3, 1,
  224. 2, 1,
  225. 1, 1,
  226. 0, 1,
  227. -1, 1,
  228. 4, 2,
  229. 3, 2,
  230. 2, 2,
  231. 1, 2,
  232. 0, 2,
  233. -1, 2,
  234. 3, 3,
  235. 2, 3,
  236. 1, 3,
  237. 0, 3,
  238. 4, 4,
  239. 3, 4,
  240. 2, 4,
  241. 1, 4,
  242. 0, 4,
  243. -1, 4,
  244. 2, 5,
  245. 4, 1,
  246. 3, 1,
  247. 2, 1,
  248. 1, 1,
  249. 0, 1,
  250. -1, 1,
  251. -2, 1,
  252. -3, 1,
  253. 5, 2,
  254. 4, 2,
  255. 3, 2,
  256. 2, 2,
  257. 1, 2,
  258. 0, 2,
  259. -1, 2,
  260. -2, 2,
  261. 3, 3,
  262. 2, 3,
  263. 1, 3,
  264. 0, 3,
  265. -1, 3,
  266. 1, 4,
  267. 1, 1,
  268. 0, 1,
  269. -1, 1,
  270. 3, 2,
  271. 2, 2,
  272. 1, 2,
  273. 0, 2,
  274. -1, 2,
  275. 2, 3,
  276. 1, 3,
  277. 2, 1,
  278. 1, 1,
  279. 0, 1,
  280. -1, 1,
  281. 4, 2,
  282. 3, 2,
  283. 2, 2,
  284. 1, 2,
  285. 0, 2,
  286. -1, 2,
  287. 4, 3,
  288. 3, 3,
  289. 2, 3,
  290. 0, 3,
  291. 3, 4,
  292. 2, 4,
  293. 5, 5,
  294. 4, 5,
  295. 3, 5,
  296. 2, 5,
  297. 1, 5,
  298. 0, 5,
  299. -1, 5,
  300. 4, 6,
  301. 3, 6,
  302. 4, 7,
  303. 1, 1,
  304. 3, 2,
  305. 2, 2,
  306. 1, 2,
  307. 2, 3,
  308. 3, 4,
  309. 2, 4,
  310. 0, 4,
  311. 2, 1,
  312. 1, 1,
  313. -1, 1,
  314. 4, 2,
  315. 3, 2,
  316. 2, 2,
  317. 1, 2,
  318. 0, 2,
  319. -1, 2,
  320. 2, 3,
  321. 1, 3,
  322. };