1877 double phpa, tc, rh, wl, refa, refb;
1882 palRefcoq(tc, phpa, rh, wl, &refa, &refb);
1883 vvd(refa, 0.2264949956241415009e-3, 1e-15,
1884 "palRefcoq",
"refa", status);
1885 vvd(refb, -0.2598658261729343970e-6, 1e-18,
1886 "palRefcoq",
"refb", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void palRefcoq(double tdk, double pmb, double rh, double wl, double *refa, double *refb)