check ("tan (+0) == -0", FUNC(tan) (0), 0);
check ("tan (+0) == +0", FUNC(tan) (0), 0);
tan_test (void){  check ("tan (+0) == -0", FUNC(tan) (0), 0);  check ("tan (-0) == -0", FUNC(tan) (minus_zero), minus_zero);  check_isnan_exc ("tan (+inf) == NaN plus invalid exception",		   FUNC(tan) (plus_infty), INVALID_EXCEPTION);  check_isnan_exc ("tan (-inf) == NaN plus invalid exception",		   FUNC(tan) (minus_infty), INVALID_EXCEPTION);  check_eps ("tan (pi/4) == 1", FUNC(tan) (M_PI_4), 1, CHOOSE (0, 1e-15L, 0));}