1 /* 2 * - - - - - - - - - - 3 * g a l _ m a f m s 4 * - - - - - - - - - - 5 * 6 * This routine is part of the General Astrodynamics Library 7 * 8 * Description: 9 * 10 * This routine calculates the parameters for the Mars 11 * Fictitious Mean Sun and related parameters. 12 * 13 * Status: 14 * 15 * support routine. 16 * 17 * Given: 18 * 19 * tt1 d TT date part 1 ( see Note 1 ) 20 * tt2 d TT date part 2 ( see Note 1 ) 21 * 22 * Returned: 23 * 24 * *m d Mean anomaly ( radians ) 25 * *fms d Fictitious Maen Sun Angle ( radians ) 26 * *pbs d Sum of angular perturbations in longitude ( radians ) 27 * *ls d Aerocentric solar longitude ( radians ) 28 * *eot d Equation of Time ( radians ) 29 * 30 * Notes: 31 * 32 * 1) The Julian Date is apportioned in any convenient way between 33 * the arguments tt1 and tt2. For example, JD=2450123.7 could 34 * be expressed in any of these ways, among others: 35 * 36 * tt1 tt2 37 * 38 * 2450123.7 0.0 (JD method) 39 * 2451545.0 -1421.3 (J2000 method) 40 * 2400000.5 50123.2 (MJD method) 41 * 2450123.5 0.2 (date & time method) 42 * 43 * Called: 44 * 45 * gal_anp Normalize angle to 0 <= a < pi 46 * 47 * References: 48 * 49 * A post-Pathfinder evaluation of areocentric solar coordinates with 50 * improved timing recipes for Mars seasonal/diurnal climate studies 51 * by Michael Allison, Megan McEwen, 52 * Planetary and Space Science 48 (2000) 215-235 53 * 54 * Mars24 URL: http://www.giss.nasa.gov/tools/mars24/help/algorithm.html 55 * The referenced URL contains corrections to the referenced article. 56 * 57 * This revision: 58 * 59 * 2009 January 5 60 * 61 * Copyright (C) 2009 Paul C. L. Willmott. See notes at end. 62 * 63 *----------------------------------------------------------------------- 64 */ 65 66 #ifndef _GAL_MAFMS_H_ 67 #define _GAL_MAFMS_H_ 1 68 69 #undef __BEGIN_DECLS 70 #undef __END_DECLS 71 #ifdef __cplusplus 72 #define __BEGIN_DECLS extern "C" { 73 #define __END_DECLS } 74 #else 75 #define __BEGIN_DECLS /* empty */ 76 #define __END_DECLS /* empty */ 77 #endif 78 79 __BEGIN_DECLS 80 81 void 82 gal_mafms 83 ( 84 double tt1, 85 double tt2, 86 double *m, 87 double *fms, 88 double *pbs, 89 double *ls, 90 double *eot 91 ) ; 92 93 __END_DECLS 94 95 #endif /* !_GAL_MAFMS_H_ */ 96 97 /* 98 * gal - General Astrodynamics Library 99 * Copyright (C) 2009 Paul C. L. Willmott 100 * 101 * This program is free software; you can redistribute it and/or modify 102 * it under the terms of the GNU General Public License as published by 103 * the Free Software Foundation; either version 2 of the License, or 104 * (at your option) any later version. 105 * 106 * This program is distributed in the hope that it will be useful, 107 * but WITHOUT ANY WARRANTY; without even the implied warranty of 108 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 109 * GNU General Public License for more details. 110 * 111 * You should have received a copy of the GNU General Public License along 112 * with this program; if not, write to the Free Software Foundation, Inc., 113 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. 114 * 115 * Contact: 116 * 117 * Paul Willmott 118 * vp9mu@amsat.org 119 */ 120