213 int *jform,
double *epoch,
double *orbinc,
214 double *anode,
double *perih,
double *aorq,
double *e,
215 double *aorl,
double *dm,
int *jstat ) {
221 double pmass, date, pv[6];
226 for (i=0; i<3; i++) {
228 pv[i+3] = u[i+6] * CD2S;
232 palPv2el( pv, date, pmass, jformr, jform, epoch, orbinc, anode,
233 perih, aorq, e, aorl, dm, jstat );
void palPv2el(const double pv[6], double date, double pmass, int jformr, int *jform, double *epoch, double *orbinc, double *anode, double *perih, double *aorq, double *e, double *aorl, double *dm, int *jstat)
static const double PAL__GCON
void palUe2el(const double u[], int jformr, int *jform, double *epoch, double *orbinc, double *anode, double *perih, double *aorq, double *e, double *aorl, double *dm, int *jstat)
static const double PAL__SPD