void eraXys00b	(	double	date1,
		double	date2,
		double *	x,
		double *	y,
		double *	s
	)

Definition at line 3 of file xys00b.c.

References eraBpn2xy(), eraPnm00b(), and eraS00().

Referenced by t_xys00b().

{
   double rbpn[3][3];

/* Form the bias-precession-nutation matrix, IAU 2000A. */
   eraPnm00b(date1, date2, rbpn);

/* Extract X,Y. */
   eraBpn2xy(rbpn, x, y);

/* Obtain s. */
   *s = eraS00(date1, date2, *x, *y);

   return;

}

Here is the call graph for this function:

Here is the caller graph for this function: