double eraEpj	(	double	dj1,
		double	dj2
	)

Definition at line 3 of file epj.c.

References ERFA_DJ00, and ERFA_DJY.

Referenced by palEpco(), palEpj(), palMappa(), and t_epj().

{
   double epj;

   epj = 2000.0 + ((dj1 - ERFA_DJ00) + dj2) / ERFA_DJY;

   return epj;

}

Here is the caller graph for this function: