FACT++  1.0
void eraNutm80 ( double  date1,
double  date2,
double  rmatn[3][3] 
)

Definition at line 3 of file nutm80.c.

References eraNumat(), eraNut80(), and eraObl80().

Referenced by eraPnm80(), and t_nutm80().

51 {
52  double dpsi, deps, epsa;
53 
54 /* Nutation components and mean obliquity. */
55  eraNut80(date1, date2, &dpsi, &deps);
56  epsa = eraObl80(date1, date2);
57 
58 /* Build the rotation matrix. */
59  eraNumat(epsa, dpsi, deps, rmatn);
60 
61  return;
62 
63 }
void eraNumat(double epsa, double dpsi, double deps, double rmatn[3][3])
Definition: numat.c:3
void eraNut80(double date1, double date2, double *dpsi, double *deps)
Definition: nut80.c:3
double eraObl80(double date1, double date2)
Definition: obl80.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: