diff options
Diffstat (limited to 'coth.c')
| -rw-r--r-- | coth.c | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -38,14 +38,14 @@ MA 02110-1301, USA. */ 1 <= z <= 1 + 2^(-p) where p is the target precision, then the result is either 1 or nextabove(1) = 1 + 2^(1-p). */ #define ACTION_SPECIAL \ - if (MPFR_GET_EXP(z) == 1) /* 1 <= |z| < 2 */ \ - { \ - mpfr_sub_ui (z, z, MPFR_SIGN(z) > 0 ? 1 : -1, GMP_RNDN); \ - if (MPFR_IS_ZERO(z) || MPFR_GET_EXP(z) <= - (mp_exp_t) precy) \ - { \ - mpfr_add_ui (z, z, MPFR_SIGN(z) > 0 ? 1 : -1, GMP_RNDN); \ - break; \ - } \ + if (MPFR_GET_EXP(z) == 1) /* 1 <= |z| < 2 */ \ + { \ + mpfr_sub_ui (z, z, MPFR_SIGN(z) > 0 ? 1 : -1, GMP_RNDN); \ + if (MPFR_IS_ZERO(z) || MPFR_GET_EXP(z) <= - (mp_exp_t) precy) \ + { \ + mpfr_add_ui (z, z, MPFR_SIGN(z) > 0 ? 1 : -1, GMP_RNDN); \ + break; \ + } \ } #include "gen_inverse.h" |