FACT++  1.0
void eraXys06a ( double  date1,
double  date2,
double *  x,
double *  y,
double *  s 
)

Definition at line 3 of file xys06a.c.

References eraBpn2xy(), eraPnm06a(), and eraS06().

Referenced by t_xys06a().

65 {
66  double rbpn[3][3];
67 
68 /* Form the bias-precession-nutation matrix, IAU 2006/2000A. */
69  eraPnm06a(date1, date2, rbpn);
70 
71 /* Extract X,Y. */
72  eraBpn2xy(rbpn, x, y);
73 
74 /* Obtain s. */
75  *s = eraS06(date1, date2, *x, *y);
76 
77  return;
78 
79 }
void eraPnm06a(double date1, double date2, double rnpb[3][3])
Definition: pnm06a.c:3
void eraBpn2xy(double rbpn[3][3], double *x, double *y)
Definition: bpn2xy.c:3
double eraS06(double date1, double date2, double x, double y)
Definition: s06.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: