From 29373a3a9371cbb35d1c95b75cbbf724f08b3906 Mon Sep 17 00:00:00 2001 From: zimmerma Date: Mon, 20 Jan 2014 20:41:52 +0000 Subject: improve coverage, should be back to 100% git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@1418 211d60ee-9f03-0410-a15a-8952a2c7a4e4 --- src/asin.c | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/asin.c b/src/asin.c index a92421a..cdff708 100644 --- a/src/asin.c +++ b/src/asin.c @@ -1,6 +1,6 @@ /* mpc_asin -- arcsine of a complex number. -Copyright (C) 2009, 2010, 2011, 2012, 2013 INRIA +Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014 INRIA This file is part of GNU MPC. @@ -18,6 +18,7 @@ You should have received a copy of the GNU Lesser General Public License along with this program. If not, see http://www.gnu.org/licenses/ . */ +#include #include "mpc-impl.h" /* Special case op = 1 + i*y for tiny y (see algorithms.tex). @@ -36,8 +37,6 @@ mpc_asin_special (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd, mpc_ptr z1) /* |Re(asin(1+i*y)) - pi/2| <= y^(1/2) */ if (ey >= 0 || ((-ey) / 2 < mpfr_get_prec (mpc_realref (z1)))) return 0; - if (mpfr_get_prec (mpc_imagref (z1)) > (-ey) + 2) /* p > -ey + 2 */ - return 0; mpfr_const_pi (mpc_realref (z1), MPFR_RNDN); mpfr_div_2exp (mpc_realref (z1), mpc_realref (z1), 1, MPFR_RNDN); /* exact */ -- cgit v1.2.1