check ("expm1 (1) == e-1", FUNC(expm1) (1), M_E - 1.0);
check_eps ("expm1 (1) == e-1", FUNC(expm1) (1), M_E - 1.0, CHOOSE (4e-18L, 0, 0));
expm1_test (void){  check ("expm1 (+0) == 0", FUNC(expm1) (0), 0);  check ("expm1 (-0) == -0", FUNC(expm1) (minus_zero), minus_zero);  check_isinfp ("expm1 (+inf) == +inf", FUNC(expm1) (plus_infty));  check ("expm1 (-inf) == -1", FUNC(expm1) (minus_infty), -1);  check ("expm1 (1) == e-1", FUNC(expm1) (1), M_E - 1.0);}