dist/tests/taway.c

99   mpfr_t ref1, ref2, ref3;
111   mpfr_init2 (ref3, p3);
119       set_special (ref3, i/SPECIAL_MAX);
121       inexa = testfunc (res1, ref2, ref3, MPFR_RNDA);
123       inexd = testfunc (ref1, ref2, ref3, r);
128           DISP("x=",ref2); DISP2(", y=",ref3);
138   mpfr_clear (ref3);
204   unsigned int ref3;
218      ref3 can be 0 or any number */
222       ref3 = i / SPECIAL_MAX == 0 ? 0 : randlimb ();
224       inexa = testfunc (res1, ref2, ref3, MPFR_RNDA);
226       inexd = testfunc (ref1, ref2, ref3, r);
230           printf ("Error with RNDA for %s for c=%u\n", foo, ref3);
248   mpfr_t ref1, ref3;
259   mpfr_init2 (ref3, p3);
264       set_special (ref3, i % SPECIAL_MAX);
267       inexa = testfunc (res1, ref2, ref3, MPFR_RNDA);
269       inexd = testfunc (ref1, ref2, ref3, r);
274           DISP2("a=", ref3);
282   mpfr_clear (ref3);
332   mpfr_t ref1, ref2, ref3;
344   mpfr_init2 (ref3, p3);
350       set_special (ref3, i);
352       inexa = testfunc (res1, res2, ref3, MPFR_RNDA);
356       inexd = testfunc (ref1, ref2, ref3, r);
361           DISP2("a=",ref3);
370       inexd = testfunc (ref1, ref2, ref3, r);
375           DISP2("a=",ref3);
386   mpfr_clear (ref3);