FACT++  1.0
double eraFad03 ( double  t)

Definition at line 3 of file fad03.c.

References ERFA_DAS2R, and ERFA_TURNAS.

Referenced by eraEect00(), eraS00(), eraS06(), eraXy06(), and t_fad03().

37 {
38  double a;
39 
40 /* Mean elongation of the Moon from the Sun (IERS Conventions 2003). */
41  a = fmod( 1072260.703692 +
42  t * ( 1602961601.2090 +
43  t * ( - 6.3706 +
44  t * ( 0.006593 +
45  t * ( - 0.00003169 ) ) ) ), ERFA_TURNAS ) * ERFA_DAS2R;
46 
47  return a;
48 
49 }
#define ERFA_TURNAS
Definition: erfam.h:66
#define ERFA_DAS2R
Definition: erfam.h:60
TT t
Definition: test_client.c:26

+ Here is the caller graph for this function: