1 /* 2 * - - - - - - - - - - - 3 * g a l _ f a v e 0 3 4 * - - - - - - - - - - - 5 * 6 * This routine is part of the General Astrodynamics Library 7 * 8 * Description: 9 * 10 * Fundamental argument, IERS Conventions (2003): 11 * mean longitude of Venus. 12 * 13 * This routine is an independent translation of a FORTRAN routine 14 * that is part of IAU's SOFA software collection. 15 * 16 * Status: 17 * 18 * canonical model. 19 * 20 * Given: 21 * 22 * t d TDB, Julian centuries since J2000 (Note 1) 23 * 24 * Returned: 25 * 26 * gal_fave03 d mean longitude of Venus, radians (Note 2) 27 * 28 * Notes: 29 * 30 * 1) Though t is strictly TDB, it is usually more convenient to use TT, 31 * which makes no significant difference. 32 * 33 * 2) The expression used is as adopted in IERS Conventions (2003) and 34 * comes from Souchay et al. (1999) after Simon et al. (1994). 35 * 36 * References: 37 * 38 * McCarthy, D. D., Petit, G. (eds.), IERS Conventions (2003), 39 * IERS Technical Note No. 32, BKG (2004) 40 * 41 * Simon, J.-L., Bretagnon, P., Chapront, J., Chapront-Touze, M., 42 * Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 43 * 44 * Souchay, J., Loysel, B., Kinoshita, H., Folgueira, M. 1999, 45 * Astron.Astrophys.Supp.Ser. 135, 111 46 * 47 * This revision: 48 * 49 * 2007 May 11 ( c version 2008 January 19 ) 50 * 51 * 52 * Copyright (C) 2008 Paul C. L. Willmott. See notes at end. 53 * 54 *----------------------------------------------------------------------- 55 */ 56 57 #ifndef _GAL_FAVE03_H_ 58 #define _GAL_FAVE03_H_ 1 59 60 #undef __BEGIN_DECLS 61 #undef __END_DECLS 62 #ifdef __cplusplus 63 #define __BEGIN_DECLS extern "C" { 64 #define __END_DECLS } 65 #else 66 #define __BEGIN_DECLS /* empty */ 67 #define __END_DECLS /* empty */ 68 #endif 69 70 __BEGIN_DECLS 71 72 double 73 gal_fave03 74 ( 75 double t 76 ) ; 77 78 __END_DECLS 79 80 #endif /* !_GAL_FAVE03_H_ */ 81 82 /* 83 * gal - General Astrodynamics Library 84 * Copyright (C) 2008 Paul C. L. Willmott 85 * 86 * This program is free software; you can redistribute it and/or modify 87 * it under the terms of the GNU General Public License as published by 88 * the Free Software Foundation; either version 2 of the License, or 89 * (at your option) any later version. 90 * 91 * This program is distributed in the hope that it will be useful, 92 * but WITHOUT ANY WARRANTY; without even the implied warranty of 93 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 94 * GNU General Public License for more details. 95 * 96 * You should have received a copy of the GNU General Public License along 97 * with this program; if not, write to the Free Software Foundation, Inc., 98 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. 99 * 100 * Contact: 101 * 102 * Paul Willmott 103 * vp9mu@amsat.org 104 */ 105