| /src/external/lgpl3/mpfr/dist/tests/ |
| tset_sj.c | 51 int inex1, inex2, n; local
64 inex1 = mpfr_set_uj (x, limb, MPFR_RNDN);
74 if (inexact_sign (inex1) != inexact_sign (inex2))
78 (unsigned long) limb, (unsigned long) p, inex1, inex2);
85 inex1 = mpfr_set_uj (x, UINTMAX_MAX, MPFR_RNDN);
86 if (inex1 != 0 || mpfr_sgn(x) <= 0)
88 inex1 = mpfr_add_ui (x, x, 1, MPFR_RNDN);
89 if (inex1 != 0 || !mpfr_powerof2_raw (x)
183 int i, j, rnd, inex1, inex2; local
207 inex1 = j == 0
[all...] |
| tsum.c | 140 int inex1, inex2; local
142 inex1 = mpfr_set (sum1, exact_sum, (mpfr_rnd_t) rnd_mode);
144 if (!(mpfr_equal_p (sum1, sum2) && SAME_SIGN (inex1, inex2)))
150 printf ("with inex = %d\n", inex1);
378 int i, j, k, f, prec, r, inex1, inex2; local
397 inex1 = mpfr_add (s1, t[0], t[1], MPFR_RNDN);
398 MPFR_ASSERTN (inex1 == 0);
402 inex1 = mpfr_add (s2, s1, t[2], MPFR_RNDN);
403 MPFR_ASSERTN (inex1 == 0);
407 inex1 = mpfr_add (s3, s2, t[3], MPFR_RNDN)
458 int i, j, k, f1, f2, prec, r, inex1, inex2; local
546 int i, s, j, k, m, q, r, inex1, inex2; local
649 int h, i, j, k, n, q, r, s, prec, inex1, inex2; local
792 int inex1, inex2; local
829 int i, inex1, inex2, r; local
1030 int inex1, inex2; local
1121 int inex1, inex2; local
[all...] |
| tmul_2exp.c | 54 int inex1, inex2; local
67 inex1 = mpfr_set_si_2exp (x, s * i, -4, MPFR_RNDN);
68 MPFR_ASSERTN (inex1 == 0);
76 inex1 = mpfr_mul_2si (y, x, e, MPFR_RNDN);
77 MPFR_ASSERTN (inex1 == 0);
78 inex1 = mpfr_set_ui (z1, 1 << k, MPFR_RNDN);
79 MPFR_ASSERTN (inex1 == 0);
83 inex1 = mpfr_div (z1, y, z1, (mpfr_rnd_t) rnd);
96 if (flags1 == flags2 && SAME_SIGN (inex1, inex2) &&
113 VSIGN (inex1), flags1)
276 int inex1, inex2; local
[all...] |
| tlog_ui.c | 29 int inex1, inex2; local
34 inex1 = mpfr_set_ui (x, n, MPFR_RNDN);
35 MPFR_ASSERTN(inex1 == 0);
36 inex1 = mpfr_log (y, x, MPFR_RNDN);
40 MPFR_ASSERTN(inex1 == inex2);
|
| tgamma.c | 564 int inex1, inex2; local
575 inex1 = mpfr_gamma (y, x, MPFR_RNDN);
584 if (inex1 != inex2 || flags1 != flags2 || ! mpfr_equal_p (y, z))
589 printf ("Expected inex1 = %d, flags1 = %u, ", VSIGN (inex1), flags1);
598 inex1 = mpfr_gamma (y, x, MPFR_RNDD);
607 if (inex1 != inex2 || flags1 != flags2 || ! mpfr_equal_p (y, z))
612 printf ("Expected inex1 = %d, flags1 = %u, ", VSIGN (inex1), flags1);
621 inex1 = mpfr_check_range (y, inex1, MPFR_RNDD)
[all...] |
| tacos.c | 32 int inex1, inex2; local
58 inex1 = mpfr_acos (x, x, MPFR_RNDN); /* Pi/2 */
60 if (inex1 != inex2)
|
| tpow_all.c | 68 * inex1: expected ternary value (if z1 is not a null pointer).
76 mpfr_srcptr z1, int inex1, mpfr_srcptr z2, int inex2,
90 else if (SAME_SIGN (inex1, inex2) && SAME_VAL (z1, z2))
113 printf (", inex = %d,\n flags =", VSIGN (inex1));
134 /* Compare the result (z1,inex1) of mpfr_pow with all flags cleared
143 int inex1, unsigned int flags, const char *s)
156 cmpres (spx, sx, sy, rnd, z1, inex1, z2, inex2, MPFR_FLAGS_ALL,
168 cmpres (spx, sx, sy, rnd, z1, inex1, z2, inex2, flags,
172 cmpres (spx, sx, sy, rnd, z1, inex1, z2, inex2, MPFR_FLAGS_ALL,
184 cmpres (spx, sx, sy, rnd, z1, inex1, z2, inex2, flags
[all...] |
| tfma.c | 270 int inex1, inex2; local
307 inex1 = mpfr_mul_2ui (r1, r1, 1, MPFR_RNDZ);
310 inex1 = i == 0 && j == 2 ? 0 : -1;
311 flags1 = inex1 ? MPFR_FLAGS_INEXACT : 0;
315 MPFR_ASSERTN (inex1 < 0);
325 SAME_SIGN (inex1, inex2) &&
333 printf ("with inex = %d and flags:", inex1);
347 inex1 = - inex1;
362 int inex1, inex2 local
539 int inex1, inex2; local
644 int sign, k, s, rnd, inex1, inex2; local
728 int inex1, inex2; local
835 int inex1, inex2; local
[all...] |
| tfmma.c | 193 int i, inex1, inex2; local
212 inex1 = mpfr_mul (y1, x, x, (mpfr_rnd_t) r);
216 if (! (flags1 == flags2 && SAME_SIGN (inex1, inex2) &&
223 printf (" with inex = %d, flags =", inex1);
258 int add = i & 1, inex, inex1, inex2; local
290 inex1 = mpfr_sqr (z1, k, rnd);
300 if (! (flags1 == flags2 && SAME_SIGN (inex1, inex2) &&
307 printf (" with inex = %d, flags =", inex1);
327 inex1 = mpfr_sqr (z1, a, rnd);
337 if (! (flags1 == flags2 && SAME_SIGN (inex1, inex2) &
623 int inex1, inex2; local
[all...] |
| tcompound.c | 249 int inex1, inex2; local
263 inex1 = -1;
270 SAME_SIGN (inex1, inex2) &&
276 printf (" with inex = %d, flags =", inex1);
297 inex1 = 1;
304 SAME_SIGN (inex1, inex2) &&
310 printf (" with inex = %d, flags =", inex1);
333 int inex1, inex2; local
339 inex1 = 1;
345 SAME_SIGN (inex1, inex2) &
[all...] |
| tfactorial.c | 76 int inex1, inex2; local
95 inex1 = mpfr_fac_ui (x, n, (mpfr_rnd_t) r);
103 if ((inex1 < 0 && inex2 >= 0) || (inex1 == 0 && inex2 != 0)
104 || (inex1 > 0 && inex2 <= 0))
108 printf ("Expected %d, got %d\n", inex2, inex1);
|
| tfrac.c | 33 int inex1, inex2; local
56 inex1 = mpfr_frac (dst, sum, rnd);
58 if (inex1 != inex2)
62 printf ("\nGot %d instead of %d\n", inex1, inex2);
82 inex1 = mpfr_frac (sum, sum, rnd);
83 if (inex1)
|
| tfrexp.c | 157 int inex1, inex2; local
170 inex1 = e1 < 0 ?
177 inex1 = mpfr_set (y1, x, (mpfr_rnd_t) r);
179 flags1 = inex1 != 0 ? MPFR_FLAGS_INEXACT : 0;
203 if (! (SAME_SIGN (inex1, inex2) &&
214 printf ("Expected inex ~= %d, got %d\n", inex1, inex2);
|
| tui_div.c | 181 int inex1, inex2, rnd_mode; local
193 inex1 = mpfr_overflow (y1, (mpfr_rnd_t) rnd_mode, 1);
199 SAME_SIGN (inex1, inex2) &&
206 printf (" with inex = %d, flags =", inex1);
|
| tdiv_ui.c | 422 int inex1, inex2; local
437 inex1 = mpfr_set_ui (x, j, MPFR_RNDN);
438 MPFR_ASSERTN (inex1 == 0);
439 inex1 = mpfr_mul_ui (x, x, i, MPFR_RNDN);
440 MPFR_ASSERTN (inex1 == 0);
450 inex1 = mpfr_prec_round (x, px, MPFR_RNDN);
451 MPFR_ASSERTN (inex1 == 0);
464 inex1 = mpfr_set_ui (y1, i, (mpfr_rnd_t) r);
467 ! SAME_SIGN (inex1, inex2))
474 printf ("with inex = %d\n", inex1);
[all...] |
| tset_si.c | 102 int i, j, rnd, inex1, inex2; local
120 inex1 = mpfr_set_si (y, j, MPFR_RNDN);
121 MPFR_ASSERTN (inex1 == 0);
122 inex1 = mpfr_set (x1, y, (mpfr_rnd_t) rnd);
123 /* x1 is the rounded value and inex1 the ternary value,
141 inex1 = mpfr_underflow (x1, r, sign);
146 inex1 = mpfr_overflow (x1, (mpfr_rnd_t) rnd, sign);
153 flags1 = inex1 != 0 ? MPFR_FLAGS_INEXACT : 0;
161 if (! (flags1 == flags2 && SAME_SIGN (inex1, inex2) &&
176 if (! (flags1 == flags2 && SAME_SIGN (inex1, inex2) &
[all...] |
| tui_sub.c | 267 int inex1, inex2, rnd_mode; local
282 inex1 = mpfr_overflow (y1, (mpfr_rnd_t) rnd_mode, 1);
288 inex1 = -1;
295 SAME_SIGN (inex1, inex2) &&
302 printf (" with inex = %d, flags =", inex1);
|
| tget_set_d128.c | 125 int inex1, inex2; local
130 inex1 = mpfr_set_si (x1, (neg >> 1) ? -i : i, MPFR_RNDN);
131 MPFR_ASSERTN (inex1 == 0);
136 inex1 = mpfr_exp10 (x1, x1, rx1);
144 inex1 = -inex1;
153 SAME_SIGN (inex1, inex2) &&
160 printf ("with inex = %d and flags =", inex1);
|
| tget_set_d64.c | 441 int inex1, inex2; local
446 inex1 = mpfr_set_si (x1, (neg >> 1) ? -i : i, MPFR_RNDN);
447 MPFR_ASSERTN (inex1 == 0);
452 inex1 = mpfr_exp10 (x1, x1, rx1);
460 inex1 = -inex1;
469 SAME_SIGN (inex1, inex2) &&
476 printf ("with inex = %d and flags =", inex1);
|
| thypot.c | 140 int inex1, inex2; local
148 inex1 = mpfr_sqrt (z1, z1, MPFR_RNDN);
164 if (! SAME_SIGN (inex1, inex2))
167 ext ? ", extended exponent range" : "", inex1, inex2);
|
| /src/external/lgpl3/mpc/dist/src/ |
| cmp_abs.c | 30 int inex1, inex2, ret; local
83 inex1 = mpc_norm (n1, z1, MPFR_RNDD);
89 if (inex1 == 0) /* n1 = norm(z1) */
|
| /src/external/lgpl3/mpfr/dist/src/ |
| exp10m1.c | 110 int inex1; local
115 MPFR_BLOCK (flags, inex1 = mpfr_exp10 (t, x, MPFR_RNDN));
125 if (inex1 == 0)
144 /* if inex1=0, this means that t=o(10^x) is exact, thus the correct
146 if (inex1 == 0 ||
|
| exp2m1.c | 115 int inex1; local
120 MPFR_BLOCK (flags, inex1 = mpfr_exp2 (t, x, MPFR_RNDN));
130 if (inex1 == 0)
150 /* if inex1=0, this means that t=o(2^x) is exact, thus the correct
152 if (inex1 == 0 ||
|
| grandom.c | 35 int inex1, inex2, s1, s2; local
40 inex2 = inex1 = 0;
179 inex1 = mpfr_set (rop1, r1, rnd);
185 inex1 = mpfr_check_range (rop1, inex1, rnd);
201 return INEX (inex1, inex2);
|
| lngamma.c | 69 int inex1, inex2, sign; local
74 MPFR_BLOCK (flags1, inex1 = mpfr_lgamma (s1, &sign, x, MPFR_RNDD));
75 MPFR_ASSERTN (inex1 != 0);
97 MPFR_BLOCK (flags1, inex1 = mpfr_exp (t1, s1, rnd));
105 MPFR_ASSERTN ((inex1 > 0 && inex2 > 0) || (inex1 < 0 && inex2 < 0));
108 inex1 = - inex1;
112 inex1 = 0; /* couldn't determine the result */
115 return inex1;
245 int ok, inex1, inex2; local
[all...] |
