dist/src/atan.c

167               rnd_away = s_im == 0 ? GMP_RNDU : GMP_RNDD;
229     rnd1 = mpfr_sgn (MPC_RE (op)) > 0 ? GMP_RNDD : GMP_RNDU;
230     rnd2 = mpfr_sgn (MPC_RE (op)) < 0 ? GMP_RNDU : GMP_RNDD;
252         mpfr_atan2 (x, MPC_RE (op), a, GMP_RNDU);
271         mpfr_sub (x, x, b, GMP_RNDU);
277         mpfr_div_2ui (x, x, 1, GMP_RNDU);
281         ok = mpfr_can_round (x, p - err, GMP_RNDU, GMP_RNDD,
308     rnd1 = mpfr_cmp_si (MPC_IM (op), -1) > 0 ? GMP_RNDU : GMP_RNDD;
319         mpfr_sqr (a, a, GMP_RNDU);
320         mpfr_sqr (y, MPC_RE (op), GMP_RNDU);
321         mpfr_add (a, a, y, GMP_RNDU);
322         mpfr_log (a, a, GMP_RNDU);
326         mpfr_sqr (b, b, GMP_RNDU);
332         mpfr_sub (y, a, b, GMP_RNDU);
351             ok = mpfr_can_round (y, p - err, GMP_RNDU, GMP_RNDD,