646 double dh, dd, dp, da, de;
652 palDe2h( dh, dd, dp, &da, &de );
653 vvd( da, 2.820087515852369, 1e-12,
"palDe2h",
655 vvd( de, 1.132711866443304, 1e-12,
"palDe2h",
658 palDh2e( da, de, dp, &dh, &dd );
659 vvd( dh, -0.3, 1e-12,
"palDh2e",
"HA", status);
660 vvd( dd, -1.1, 1e-12,
"palDh2e",
"DEC", status );
void palDe2h(double ha, double dec, double phi, double *az, double *el)
void palDh2e(double az, double el, double phi, double *ha, double *dec)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)