6751 double ep01, ep02, ep11, ep12, zeta, z, theta;
6759 eraPrec76(ep01, ep02, ep11, ep12, &zeta, &z, &theta);
6761 vvd(zeta, 0.5588961642000161243e-2, 1e-12,
6762 "eraPrec76",
"zeta", status);
6763 vvd(z, 0.5589922365870680624e-2, 1e-12,
6764 "eraPrec76",
"z", status);
6765 vvd(theta, 0.4858945471687296760e-2, 1e-12,
6766 "eraPrec76",
"theta", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void eraPrec76(double date01, double date02, double date11, double date12, double *zeta, double *z, double *theta)