1818 double elong, phi, daz;
1820 palPolmo( 0.7, -0.5, 1.0e-6, -2.0e-6, &elong, &phi, &daz );
1821 vvd(elong, 0.7000004837322044, 1.0e-12,
"palPolmo",
"elong", status );
1822 vvd(phi, -0.4999979467222241, 1.0e-12,
"palPolmo",
"phi", status );
1823 vvd(daz, 1.008982781275728e-6, 1.0e-12,
"palPolmo",
"daz", status );
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void palPolmo(double elongm, double phim, double xp, double yp, double *elong, double *phi, double *daz)