Lines Matching refs:tmp2
100 mpfr_t xp, GammaTrial, tmp, tmp2; in mpfr_gamma() local
296 mpfr_init2 (tmp2, 53); in mpfr_gamma()
313 mpfr_set_prec (tmp2, w); in mpfr_gamma()
316 mpfr_const_pi (tmp2, MPFR_RNDN); in mpfr_gamma()
317 mpfr_mul (tmp2, tmp2, tmp, MPFR_RNDN); /* Pi*(2-x) */ in mpfr_gamma()
318 mpfr_sin (tmp, tmp2, MPFR_RNDN); /* sin(Pi*(2-x)) */ in mpfr_gamma()
321 mpfr_mul_ui (tmp2, tmp2, 3, MPFR_RNDU); /* 3Pi(2-x) */ in mpfr_gamma()
322 mpfr_add_ui (tmp2, tmp2, 1, MPFR_RNDU); /* 3Pi(2-x)+1 */ in mpfr_gamma()
323 mpfr_div_2ui (tmp2, tmp2, mpfr_get_prec (tmp), MPFR_RNDU); in mpfr_gamma()
325 if (mpfr_cmp (tmp2, tmp) < 0) in mpfr_gamma()
327 mpfr_sub (tmp, tmp, tmp2, MPFR_RNDZ); /* low bnd on |sin(Pi*(2-x))| */ in mpfr_gamma()
340 mpfr_clear (tmp2); in mpfr_gamma()
363 xp, tmp, tmp2, GammaTrial); in mpfr_gamma()
370 MPFR_GROUP_REPREC_4 (group, realprec, xp, tmp, tmp2, GammaTrial); in mpfr_gamma()
377 mpfr_const_pi (tmp2, MPFR_RNDN); /* Pi, error (1+u) */ in mpfr_gamma()
378 mpfr_mul (GammaTrial, tmp2, xp, MPFR_RNDN); /* Pi*(2-x), error (1+u)^2 */ in mpfr_gamma()
384 inex = mpfr_explgamma (gamma, x, &expo, tmp, tmp2, rnd_mode); in mpfr_gamma()
399 mpfr_mul (xp, tmp2, xp, MPFR_RNDN); /* Pi*(x-1), error (1+u)^2 */ in mpfr_gamma()