check ("log1p (e-1) == 1", FUNC(log1p) (M_E - 1.0), 1);
check_eps ("log1p (e-1) == 1", FUNC(log1p) (M_E - 1.0), 1, CHOOSE (1e-18L, 0, 0));
log1p_test (void){  check ("log1p (+0) == +0", FUNC(log1p) (0), 0);  check ("log1p (-0) == -0", FUNC(log1p) (minus_zero), minus_zero);  check_isinfn_exc ("log1p (-1) == -inf", FUNC(log1p) (-1),		    DIVIDE_BY_ZERO_EXCEPTION);  check_isnan_exc ("log1p (x) == NaN plus divide-by-zero exception if x < -1",		   FUNC(log1p) (-2), INVALID_EXCEPTION);  check_isinfp ("log1p (+inf) == +inf", FUNC(log1p) (plus_infty));  check ("log1p (e-1) == 1", FUNC(log1p) (M_E - 1.0), 1);}