| /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...] |
| /src/external/lgpl3/mpfr/dist/tests/ |
| tacos.c | 32 int inex1, inex2; local
58 inex1 = mpfr_acos (x, x, MPFR_RNDN); /* Pi/2 */
60 if (inex1 != inex2)
|
| 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);
|
| tfmod.c | 88 int inex0, inex1; local
93 inex1 = slow_fmod (r1, x, y, rnd);
94 if (!mpfr_equal_p (r0, r1) || inex0 != inex1)
95 test_failed (r1, r0, inex1, inex0, x, y, rnd);
|
| 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);
|
| 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);
|
| 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);
|
| tzeta.c | 210 int inex1, inex2; local
218 inex1 = -1;
226 SAME_SIGN (inex1, inex2) &&
232 printf ("with inex = %d and flags =", inex1);
|
| 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...] |
| 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)
|
| 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);
|
| 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...] |
| troot.c | 427 int inex1, inex2; local
433 inex1 = mpfr_pow (y1, x, y1, rnd);
438 if (!(mpfr_equal_p (y1, y2) && SAME_SIGN (inex1, inex2) &&
447 printf ("with inex = %d, flags =", inex1);
|
| 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...] |
| 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);
|
| 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);
|
| 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...] |
| 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...] |
| 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...] |
| 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...] |
