void eraPr00	(	double	date1,
		double	date2,
		double *	dpsipr,
		double *	depspr
	)

Definition at line 3 of file pr00.c.

References ERFA_DAS2R, ERFA_DJ00, ERFA_DJC, and t.

Referenced by eraBp00(), eraEe00a(), eraEe00b(), eraPn00(), and t_pr00().

{
   double t;

/* Precession and obliquity corrections (radians per century) */
   static const double PRECOR = -0.29965 * ERFA_DAS2R,
                       OBLCOR = -0.02524 * ERFA_DAS2R;

/* Interval between fundamental epoch J2000.0 and given date (JC). */
   t = ((date1 - ERFA_DJ00) + date2) / ERFA_DJC;

/* Precession rate contributions with respect to IAU 1976/80. */
   *dpsipr = PRECOR * t;
   *depspr = OBLCOR * t;

   return;

}

Here is the caller graph for this function: