summaryrefslogtreecommitdiff
path: root/coth.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2006-10-26 01:40:17 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2006-10-26 01:40:17 +0000
commita662a0c853720f111a9d09d1c030785dd866b928 (patch)
treec981290f850e73211b3ecb67ee4c9114fe1a1816 /coth.c
parente2748856b898f29b86815d34982ff34a452655e5 (diff)
downloadmpfr-a662a0c853720f111a9d09d1c030785dd866b928.tar.gz
Untabified and added a FIXME.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@4162 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'coth.c')
-rw-r--r--coth.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/coth.c b/coth.c
index 4ecc52d1a..930fe6131 100644
--- a/coth.c
+++ b/coth.c
@@ -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"