FACT++  1.0
double eraEe00b ( double  date1,
double  date2 
)

Definition at line 3 of file ee00b.c.

References eraEe00(), eraNut00b(), eraObl80(), and eraPr00().

Referenced by eraGst00b(), and t_ee00b().

70 {
71  double dpsipr, depspr, epsa, dpsi, deps, ee;
72 
73 /* IAU 2000 precession-rate adjustments. */
74  eraPr00(date1, date2, &dpsipr, &depspr);
75 
76 /* Mean obliquity, consistent with IAU 2000 precession-nutation. */
77  epsa = eraObl80(date1, date2) + depspr;
78 
79 /* Nutation in longitude. */
80  eraNut00b(date1, date2, &dpsi, &deps);
81 
82 /* Equation of the equinoxes. */
83  ee = eraEe00(date1, date2, epsa, dpsi);
84 
85  return ee;
86 
87 }
double eraEe00(double date1, double date2, double epsa, double dpsi)
Definition: ee00.c:3
void eraNut00b(double date1, double date2, double *dpsi, double *deps)
Definition: nut00b.c:3
double eraObl80(double date1, double date2)
Definition: obl80.c:3
void eraPr00(double date1, double date2, double *dpsipr, double *depspr)
Definition: pr00.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: