1273 double amprms[21], ra, da;
1274 palMappa( 2010.0, 55927.0, amprms );
1275 palMapqkz( 1.234, -0.567, amprms, &ra, &da );
1276 vvd( ra, 1.2344879748414849807, 1.0E-12,
"palMapqkz",
"ra", status );
1277 vvd( da, -0.56697099554368701746, 1.0E-12,
"palMapqkz",
"da", status );
1280 palMapqk( 1.234, -0.567, 0., 0., 0., 0., amprms, &ra, &da );
1281 vvd( ra, 1.2344879748414849807, 1.0E-7,
"palMapqkz",
"ra", status );
1282 vvd( da, -0.56697099554368701746, 1.0E-7,
"palMapqkz",
"da", status );
void palMappa(double eq, double date, double amprms[21])
void palMapqk(double rm, double dm, double pr, double pd, double px, double rv, double amprms[21], double *ra, double *da)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void palMapqkz(double rm, double dm, double amprms[21], double *ra, double *da)