plutoterms.h

This is a pgm can be used for astronomy

/*
 * PlutoTerms.h - a list of terms needed to do pluto calcs
 *
 * author: mark huss ([e-mail])
 * Based on Bill Gray's open-source code at projectpluto.com
 *
 */
#include "Pluto.h"

// long coefficients

long plutoLongCoeff[7][6] = {
  {  68955876,  66867334, -14974876,  -5453098,  19848454, -19798886 },
  {   -333765, -11826086,   1672673,   3527363,  -4955707,    897499 },
  {  -1439953,   1593657,    327763,  -1050939,   1210521,    610820 },
  {    482443,    -18948,   -291925,    178691,   -189719,   -341639 },
  {    -85576,    -66634,    100448,     18763,    -34863,    129027 },
  {     -5765,     30841,    -25838,    -30594,     31061,    -38215 },
  {     45637,       105,       201,       157,       747,      7049 }
};

// pluto coefficients

PlutoCoeffs plutoCoeff[N_COEFFS] = {
  {  0,  1, -1, 0, 20349, -9886,  4965, 11263, -6140, 22254 },
  {  0,  1,  0, 0, -4045, -4904,   310,  -132,  4434,  4443 },
  {  0,  1,  1, 0, -5885, -3238,  2036,  -947, -1518,   641 },
  {  0,  1,  2, 0, -3812,  3011,    -2,  -674,    -5,   792 },
  {  0,  1,  3, 0,  -601,  3468,  -329,  -563,   518,   518 },
  {  0,  2, -2, 0,  1237,   463,   -64,    39,   -13,  -221 },
  {  0,  2, -1, 0,  1086,  -911,   -94,   210,   837,  -494 },
  {  0,  2,  0, 0,   595, -1229,    -8,  -160,  -281,   616 },
  {  1, -1,  0, 0,  2484,  -485,  -177,   259,   260,  -395 },
  {  1, -1,  1, 0,   839, -1414,    17,   234,  -191,  -396 },
  {  1,  0, -3, 0,  -964,  1059,   582,  -285, -3218,   370 },
  {  1,  0, -2, 0, -2303, -1038,  -298,   692,  8019, -7869 },
  {  1,  0,  0, 0,  1179,  -358,   304,   825,  8623,  8444 },
  {  1,  0,  1, 0,   393,   -63,  -124,   -29,  -896,  -801 },
  {  1,  0,  2, 0,   111,  -268,    15,     8,   208,  -122 },
  {  1,  0,  3, 0,   -52,  -154,     7,    15,  -133,    65 },
  {  1,  0,  4, 0,   -78,   -30,     2,     2,   -16,     1 },
  {  1,  1, -3, 0,   -34,   -26,     4,     2,   -22,     7 },
  {  1,  1, -2, 0,   -43,     1,     3,     0,    -8,    16 },
  {  1,  1, -1, 0,   -15,    21,     1,    -1,     2,     9 },
  {  1,  1,  0, 0,    -1,    15,     0,    -2,    12,     5 },
  {  1,  1,  1, 0,     4,     7,     1,     0,     1,    -3 },
  {  1,  1,  3, 0,     1,     5,     1,    -1,     1,     0 },
  {  2,  0, -6, 0,     8,     3,    -2,    -3,     9,     5 },
  {  2,  0, -5, 0,    -3,     6,     1,     2,     2,    -1 },
  {  2,  0, -4, 0,     6,   -13,    -8,     2,    14,    10 },
  {  2,  0, -3, 0,    10,    22,    10,    -7,   -65,    12 },
  {  2,  0, -2, 0,   -57,   -32,     0,    21,   126,  -233 },
  {  2,  0, -1, 0,   157,   -46,     8,     5,   270,  1068 },
  {  2,  0,  0, 0,    12,   -18,    13,    16,   254,   155 },
  {  2,  0,  1, 0,    -4,     8,    -2,    -3,   -26,    -2 },
  {  2,  0,  2, 0,    -5,     0,     0,     0,     7,     0 },
  {  2,  0,  3, 0,     3,     4,     0,     1,   -11,     4 },
  {  3,  0, -2, 0,    -1,    -1,     0,     1,     4,   -14 },
  {  3,  0, -1, 0,     6,    -3,     0,     0,    18,    35 },
  {  3,  0,  0, 0,    -1,    -2,     0,     1,    13,     3 }
};