summaryrefslogtreecommitdiff
path: root/log10.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2005-08-18 16:35:19 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2005-08-18 16:35:19 +0000
commitbab5aab404897a12fe1c87734ebf2aa270b9b73b (patch)
tree73ab96f558e7e0b4ef371902ead983189184a0f7 /log10.c
parent8328a51518450ad8ddb86e38e7952e28065ff22a (diff)
downloadmpfr-bab5aab404897a12fe1c87734ebf2aa270b9b73b.tar.gz
Converted tabs to spaces with expand.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3725 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'log10.c')
-rw-r--r--log10.c58
1 files changed, 29 insertions, 29 deletions
diff --git a/log10.c b/log10.c
index a7e1453c4..40dd267fd 100644
--- a/log10.c
+++ b/log10.c
@@ -37,33 +37,33 @@ mpfr_log10 (mpfr_ptr r, mpfr_srcptr a, mp_rnd_t rnd_mode)
if (MPFR_UNLIKELY (MPFR_IS_SINGULAR (a)))
{
if (MPFR_IS_NAN (a))
- {
- MPFR_SET_NAN (r);
- MPFR_RET_NAN;
- }
+ {
+ MPFR_SET_NAN (r);
+ MPFR_RET_NAN;
+ }
/* check for infinity before zero */
else if (MPFR_IS_INF (a))
- {
- if (MPFR_IS_NEG (a))
- /* log10(-Inf) = NaN */
- {
- MPFR_SET_NAN (r);
- MPFR_RET_NAN;
- }
- else /* log10(+Inf) = +Inf */
- {
- MPFR_SET_INF (r);
- MPFR_SET_POS (r);
- MPFR_RET (0); /* exact */
- }
- }
+ {
+ if (MPFR_IS_NEG (a))
+ /* log10(-Inf) = NaN */
+ {
+ MPFR_SET_NAN (r);
+ MPFR_RET_NAN;
+ }
+ else /* log10(+Inf) = +Inf */
+ {
+ MPFR_SET_INF (r);
+ MPFR_SET_POS (r);
+ MPFR_RET (0); /* exact */
+ }
+ }
else /* a = 0 */
- {
+ {
MPFR_ASSERTD (MPFR_IS_ZERO (a));
- MPFR_SET_INF (r);
- MPFR_SET_NEG (r);
- MPFR_RET (0); /* log10(0) is an exact -infinity */
- }
+ MPFR_SET_INF (r);
+ MPFR_SET_NEG (r);
+ MPFR_RET (0); /* log10(0) is an exact -infinity */
+ }
}
/* If a is negative, the result is NaN */
@@ -112,16 +112,16 @@ mpfr_log10 (mpfr_ptr r, mpfr_srcptr a, mp_rnd_t rnd_mode)
/* estimation of the error */
err = Nt - 4;
if (MPFR_LIKELY (MPFR_CAN_ROUND (t, err, Ny, rnd_mode)))
- break;
+ break;
/* log10(10^n) is exact:
- FIXME: Can we have 10^n exactly representable as a mpfr_t
- but n can't fit an unsigned long? */
+ FIXME: Can we have 10^n exactly representable as a mpfr_t
+ but n can't fit an unsigned long? */
if (MPFR_IS_POS (t)
- && mpfr_integer_p (t) && mpfr_fits_ulong_p (t, GMP_RNDN)
- && !mpfr_ui_pow_ui (tt, 10, mpfr_get_ui (t, GMP_RNDN), GMP_RNDN)
+ && mpfr_integer_p (t) && mpfr_fits_ulong_p (t, GMP_RNDN)
+ && !mpfr_ui_pow_ui (tt, 10, mpfr_get_ui (t, GMP_RNDN), GMP_RNDN)
&& mpfr_cmp (a, tt) == 0)
- break;
+ break;
/* actualisation of the precision */
MPFR_ZIV_NEXT (loop, Nt);