1295 double r2000, d2000;
1296 palFk45z( 1.2, -0.3, 1960.0, &r2000, &d2000 );
1297 vvd( r2000, 1.2097812228966762227, 1.0E-12,
"palFk45z",
"r2000", status );
1298 vvd( d2000, -0.29826111711331398935, 1.0E-12,
"palFk45z",
"d2000", status );
void palFk45z(double r1950, double d1950, double bepoch, double *r2000, double *d2000)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)