7276 double phpa, tc, rh, wl, refa, refb;
7284 eraRefco(phpa, tc, rh, wl, &refa, &refb);
7286 vvd(refa, 0.2264949956241415009e-3, 1e-15,
7287 "eraRefco",
"refa", status);
7288 vvd(refb, -0.2598658261729343970e-6, 1e-18,
7289 "eraRefco",
"refb", status);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void eraRefco(double phpa, double tc, double rh, double wl, double *refa, double *refb)