677 vvd (
palEpco (
'B',
'J', 2000 ), 2000.001277513665,
678 1e-7,
"palEpco",
"BJ", status );
679 vvd (
palEpco (
'J',
'B', 1950 ), 1949.999790442300,
680 1e-7,
"palEpco",
"JB", status );
682 1e-7,
"palEpco",
"JJ", status );
double palEpco(char k0, char k, double e)
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)