double eraEo06a	(	double	date1,
		double	date2
	)

Definition at line 3 of file eo06a.c.

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

Referenced by t_eo06a().

{
   double r[3][3], x, y, s, eo;

/* Classical nutation x precession x bias matrix. */
   eraPnm06a(date1, date2, r);

/* Extract CIP coordinates. */
   eraBpn2xy(r, &x, &y);

/* The CIO locator, s. */
   s = eraS06(date1, date2, x, y);

/* Solve for the EO. */
   eo = eraEors(r, s);

   return eo;

}

Here is the call graph for this function:

Here is the caller graph for this function: