void palPlanet	(	double	date,
		int	np,
		double	pv[6],
		int *	j
	)

Definition at line 82 of file palPlanet.c.

References eraPlan94(), PAL__MJD0, and PAL__SPD.

Referenced by palPertue(), palRdplan(), and t_planet().

                                                             {
  double erapv[2][3];

  *j = eraPlan94( PAL__MJD0, date, np, erapv );

  /* Convert the outputs to the correct form and also correct AU/d
     to AU/s */
  pv[0] = erapv[0][0];
  pv[1] = erapv[0][1];
  pv[2] = erapv[0][2];
  pv[3] = erapv[1][0] / PAL__SPD;
  pv[4] = erapv[1][1] / PAL__SPD;
  pv[5] = erapv[1][2] / PAL__SPD;

  /* SLA compatibility for status */
  if (*j == 2) *j = -2;

}

Here is the call graph for this function:

Here is the caller graph for this function: