/* Constants for the JPL DE403 Chebyshev Ephemeris */#define DE102F 0#define DE200F 0#define DE245F 0#define DE400F 1/* double JDb = 2305200.5; */ /* starting JED 1599 Apr 29, for de403.unx */double JDb = 2305424.5; /* starting JED 1599 Dec 9, for de403.unx */double JDe = 2524400.5; /* ending JED 2199 Jun 22 */double JDi = 32.0; /* days per record */#define DRSIZ 8144long recsiz = (long )DRSIZ; /* bytes per record */long rec0 = 16288L; /* offset to first record */int objs[13][3] = {  {  3, 14, 4},  {171, 10, 2},  {231, 13, 2},  {309, 11, 1},  {342, 8, 1},  {366, 7, 1},  {387, 6, 1},  {405, 6, 1},  {423, 6, 1},  {441, 13, 8},  {753, 11, 2},  {819, 10, 4},  {899, 10, 4}};double au = 1.49597870691e8; /* Kilometers per au */double emrat = 81.300585; /* Earth/Moon mass ratio */double radearth = 6378.137;double clight = 2.99792458e5;char *dename = "de403.unx";