1287 double amprms[21], rm, dm;
1288 palMappa( 2010.0, 55927.0, amprms );
1289 palAmpqk( 1.234, -0.567, amprms, &rm, &dm );
1290 vvd( rm, 1.2335120411026936349, 1.0E-12,
"palAmpqk",
"rm", status );
1291 vvd( dm, -0.56702908706930343907, 1.0E-12,
"palAmpqk",
"dm", status );
void palAmpqk(double ra, double da, double amprms[21], double *rm, double *dm)
void palMappa(double eq, double date, double amprms[21])
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)