summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorenge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2012-07-05 12:09:26 +0000
committerenge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2012-07-05 12:09:26 +0000
commit14acb1b6e19df86a969a0b767e4c78d7011abf17 (patch)
tree3dd289f9f8c7d73293d3a41bdea691a6f4213337 /src
parent126fd3f21b3db84681a56f755fa2a4315a41e65d (diff)
downloadmpc-14acb1b6e19df86a969a0b767e4c78d7011abf17.tar.gz
acos.c: small change to reuse code
git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@1232 211d60ee-9f03-0410-a15a-8952a2c7a4e4
Diffstat (limited to 'src')
-rw-r--r--src/acos.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/acos.c b/src/acos.c
index ca3d19f..e7a2691 100644
--- a/src/acos.c
+++ b/src/acos.c
@@ -195,8 +195,7 @@ mpc_acos (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd)
mpfr_set_prec (mpc_realref(z1), p);
mpfr_set_prec (pi_over_2, p);
- mpfr_const_pi (pi_over_2, GMP_RNDN);
- mpfr_div_2exp (pi_over_2, pi_over_2, 1, GMP_RNDN); /* Pi/2 */
+ set_pi_over_2 (pi_over_2, +1, GMP_RNDN);
e1 = 1; /* Exp(pi_over_2) */
inex = mpc_asin (z1, op, rnd1); /* asin(z) */
MPC_ASSERT (mpfr_sgn (mpc_imagref(z1)) * mpfr_sgn (mpc_imagref(op)) > 0);