mpfr/dist/atan.c

192   mpfr_t xp, arctgt, sk, tmp, tmp2;
272   MPFR_GROUP_INIT_4 (group, prec, sk, tmp, tmp2, arctgt);
301       MPFR_GROUP_REPREC_4 (group, prec, sk, tmp, tmp2, arctgt);
360           mpfr_const_pi (arctgt, MPFR_RNDN); /* 1/2 ulp extra error */
361           mpfr_div_2ui (arctgt, arctgt, 2, MPFR_RNDN); /* exact */
367       MPFR_SET_ZERO (arctgt);
394               mpfr_add (arctgt, arctgt, tmp2, MPFR_RNDN);
404       mpfr_add (arctgt, arctgt, sk, MPFR_RNDN);
407       mpfr_mul_2exp (arctgt, arctgt, red, MPFR_RNDN);
413           mpfr_sub (arctgt, tmp, arctgt, MPFR_RNDN);
415       MPFR_SET_POS (arctgt);
418       if (MPFR_LIKELY (MPFR_CAN_ROUND (arctgt, realprec + est_lost - lost,
425   inexact = mpfr_set4 (atan, arctgt, rnd_mode, MPFR_SIGN (x));