Searched refs:MPFR_RNDZ (Results 1 - 25 of 138) sorted by relevance

123456

/netbsd-6-1-5-RELEASE/external/lgpl3/mpfr/dist/tests/
H A Dtget_set_d64.c61 d = mpfr_get_decimal64 (x, MPFR_RNDZ);
62 mpfr_set_ui (x, 1, MPFR_RNDZ);
63 mpfr_set_decimal64 (x, d, MPFR_RNDZ);
67 d = mpfr_get_decimal64 (x, MPFR_RNDZ);
68 mpfr_set_ui (x, 1, MPFR_RNDZ);
69 mpfr_set_decimal64 (x, d, MPFR_RNDZ);
73 d = mpfr_get_decimal64 (x, MPFR_RNDZ);
74 mpfr_set_ui (x, 1, MPFR_RNDZ);
75 mpfr_set_decimal64 (x, d, MPFR_RNDZ);
78 mpfr_set_ui (x, 0, MPFR_RNDZ);
[all...]
H A Dtcan_round.c48 MPFR_RNDN, MPFR_RNDZ, p);
72 if (mpfr_can_round (x, 54, MPFR_RNDZ, MPFR_RNDZ, 53) != 0)
79 if (mpfr_can_round (x, 2000, MPFR_RNDZ, MPFR_RNDZ, 2000) != 0)
95 if (mpfr_can_round (x, 132, MPFR_RNDU, MPFR_RNDZ, 128) == 0)
104 if (mpfr_can_round (x, 81, MPFR_RNDU, MPFR_RNDZ, 44) == 0)
111 mpfr_set_str (x, "0.ff4ca619c76ba69", 16, MPFR_RNDZ);
H A Dtget_d_2exp.c47 mpfr_set_ui (f, 1L, MPFR_RNDZ);
48 mpfr_mul_2exp (f, f, data[i], MPFR_RNDZ);
49 mpfr_sub_ui (f, f, 1L, MPFR_RNDZ);
71 mpfr_neg (f, f, MPFR_RNDZ);
92 d = mpfr_get_d_2exp (&exp, x, MPFR_RNDZ);
97 d = mpfr_get_d_2exp (&exp, x, MPFR_RNDZ);
102 d = mpfr_get_d_2exp (&exp, x, MPFR_RNDZ);
H A Dtget_ld_2exp.c47 mpfr_set_ui (f, 1L, MPFR_RNDZ);
48 mpfr_mul_2exp (f, f, data[i], MPFR_RNDZ);
49 mpfr_sub_ui (f, f, 1L, MPFR_RNDZ);
71 mpfr_neg (f, f, MPFR_RNDZ);
92 d = (double) mpfr_get_ld_2exp (&exp, x, MPFR_RNDZ);
97 d = (double) mpfr_get_ld_2exp (&exp, x, MPFR_RNDZ);
102 d = (double) mpfr_get_ld_2exp (&exp, x, MPFR_RNDZ);
H A Drnd_mode.c43 case MPFR_RNDZ:
H A Dtui_div.c115 MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */
122 MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */
128 MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */
133 MPFR_ASSERTN (mpfr_ui_div (q, 0L, d, MPFR_RNDZ) == 0); /* exact */
138 MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */
144 MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */
149 MPFR_ASSERTN (mpfr_ui_div (q, 0L, d, MPFR_RNDZ) == 0); /* exact */
154 MPFR_ASSERTN (mpfr_ui_div (q, 0L, d, MPFR_RNDZ) == 0); /* exact */
176 check(1976245324, "1.25296395864546893357e+232", MPFR_RNDZ,
178 check(740454110, "2.11496253355831863313e+183", MPFR_RNDZ,
[all...]
H A Dtlog.c292 check2("1.0",MPFR_RNDZ,"0.0");
294 check2("0.5",MPFR_RNDZ,"-6.93147180559945286226e-01");
295 check2("3.0",MPFR_RNDZ,"1.09861228866810956006e+00");
297 check2("8.0",MPFR_RNDZ,"2.07944154167983574765e+00");
303 check2("9.99995576063808955247e-01",MPFR_RNDZ,"-4.42394597667932383816e-06");
314 check2("9.48868723578399476187e+77",MPFR_RNDZ,"1.79549152432275803903e+02");
318 check2("9.99999989485669482647e-01",MPFR_RNDZ,"-1.05143305726283042331e-08");
319 check2("9.99999989237970177136e-01",MPFR_RNDZ,"-1.07620298807745377934e-08");
324 check2("7.53428236571286402512e+34",MPFR_RNDZ,"8.03073567492226345621e+01");
325 check2("6.18784121531737948160e+19",MPFR_RNDZ,"4.5571703039171069349
[all...]
H A Dtsqrt.c148 check24("70368760954880.0", MPFR_RNDZ, "8.388608e6");
149 check24("281474943156224.0", MPFR_RNDZ, "1.6777214e7");
150 check24("70368777732096.0", MPFR_RNDZ, "8.388609e6");
151 check24("281474909601792.0", MPFR_RNDZ, "1.6777213e7");
152 check24("100216216748032.0", MPFR_RNDZ, "1.0010805e7");
153 check24("120137273311232.0", MPFR_RNDZ, "1.0960715e7");
154 check24("229674600890368.0", MPFR_RNDZ, "1.5155019e7");
155 check24("70368794509312.0", MPFR_RNDZ, "8.38861e6");
156 check24("281474876047360.0", MPFR_RNDZ, "1.6777212e7");
157 check24("91214552498176.0", MPFR_RNDZ, "9.55063
[all...]
H A Dtset_q.c103 check(-1647229822, 40619231, MPFR_RNDZ, "-4.055295438754120596e1");
104 check(-148939696, 1673285490, MPFR_RNDZ, "-8.9010331404953485501e-2");
105 check(-441322590, 273662545, MPFR_RNDZ, "-1.6126525096812205362");
107 check(2141332571, 3117601, MPFR_RNDZ, "6.8685267004982347316e2");
H A Dtcmp_ui.c223 mpfr_set_ui (x, 3, MPFR_RNDZ);
239 mpfr_set_ui (x, 0, MPFR_RNDZ);
240 mpfr_neg (x, x, MPFR_RNDZ);
246 mpfr_set_ui (x, 1, MPFR_RNDZ);
274 (mpfr_set_si) (x, -3, MPFR_RNDZ);
305 mpfr_set_ui (x, 0, MPFR_RNDZ);
311 mpfr_set_ui (x, 1, MPFR_RNDZ);
313 mpfr_set_ui (x, 0, MPFR_RNDZ);
315 mpfr_neg (x, x, MPFR_RNDZ);
317 mpfr_set_si (x, -1, MPFR_RNDZ);
[all...]
H A Dtdiv.c129 check24("70368760954880.0", "8388609.0", MPFR_RNDZ, "8.388608e6");
130 check24("140737479966720.0", "16777213.0", MPFR_RNDZ, "8.388609e6");
131 check24("70368777732096.0", "8388611.0", MPFR_RNDZ, "8.388608e6");
132 check24("105553133043712.0", "12582911.0", MPFR_RNDZ, "8.38861e6");
133 check24("12582913.0", "12582910.0", MPFR_RNDZ, "1.000000238");
134 check24 ("105553124655104.0", "12582910.0", MPFR_RNDZ, "8388610.0");
135 check24("140737479966720.0", "8388609.0", MPFR_RNDZ, "1.6777213e7");
136 check24("70368777732096.0", "8388609.0", MPFR_RNDZ, "8.38861e6");
137 check24("105553133043712.0", "8388610.0", MPFR_RNDZ, "1.2582911e7");
138 check24("105553124655104.0", "8388610.0", MPFR_RNDZ, "1.25829
[all...]
H A Dtmodf.c202 53, 53, 53, 0, MPFR_RNDZ);
206 13, 13, 53, 5, MPFR_RNDZ);
210 10, 10, 53, 10, MPFR_RNDZ);
211 check ("61680", "0", "61680", 53, 53, 53, 0, MPFR_RNDZ);
213 check ("-53968","0", "-53970", 13, 13, 53, 1, MPFR_RNDZ);
219 check ("61632", "0", "61648", 10, 10, 53, 2, MPFR_RNDZ);
H A Dtsi_op.c110 mpfr_add_si (z, x, y, MPFR_RNDZ);
113 mpfr_sub_si (z, x, y, MPFR_RNDZ);
116 mpfr_si_sub (z, y, x, MPFR_RNDZ);
117 mpfr_neg (z, z, MPFR_RNDZ);
120 mpfr_mul_si (z, x, y, MPFR_RNDZ);
123 mpfr_div_si (z, x, y, MPFR_RNDZ);
H A Dtset_si.c148 inex = mpfr_set_si (x, z, MPFR_RNDZ);
149 d = mpfr_get_si (x, MPFR_RNDZ);
166 inex = mpfr_set_ui (x, zl, MPFR_RNDZ);
167 dl = mpfr_get_ui (x, MPFR_RNDZ);
182 if (mpfr_set_si (x, 5, MPFR_RNDZ) >= 0)
184 printf ("Wrong inexact flag for x=5, rnd=MPFR_RNDZ\n");
189 if (mpfr_set_si (x, -5, MPFR_RNDZ) <= 0)
191 printf ("Wrong inexact flag for x=-5, rnd=MPFR_RNDZ\n");
217 if (mpfr_get_si (x, MPFR_RNDZ) != 49152 || inex <= 0)
220 mpfr_get_si (x, MPFR_RNDZ), ine
[all...]
H A Dtcmp_d.c55 mpfr_set_ui (x, 0, MPFR_RNDZ);
56 mpfr_neg (x, x, MPFR_RNDZ);
/netbsd-6-1-5-RELEASE/external/lgpl3/mpfr/dist/
H A Dprint_rnd_mode.c39 case MPFR_RNDZ:
40 return "MPFR_RNDZ";
H A Dfactorial.c62 rnd = MPFR_RNDZ;
79 round = !inexact || mpfr_can_round (t, err, rnd, MPFR_RNDZ,
99 rnd = (rnd == MPFR_RNDZ) ? MPFR_RNDU : MPFR_RNDZ;
H A Dset_str_raw.c53 res = mpfr_strtofr (x, str, 0, 2, MPFR_RNDZ);
H A Dgamma.c75 mpfr_set_ui (x, n, MPFR_RNDZ);
77 mpfr_div (x, x, y, MPFR_RNDZ);
78 mpfr_pow_ui (x, x, n, MPFR_RNDZ);
79 mpfr_const_pi (y, MPFR_RNDZ);
80 mpfr_mul_ui (y, y, 2 * n, MPFR_RNDZ);
81 mpfr_sqrt (y, y, MPFR_RNDZ);
82 mpfr_mul (x, x, y, MPFR_RNDZ);
83 mpfr_log2 (x, x, MPFR_RNDZ);
259 mpfr_mul (xp, x, xp, MPFR_RNDZ);
260 mpfr_sub_ui (yp, x, 2, MPFR_RNDZ);
[all...]
H A Dcsch.c60 if (rnd_mode == MPFR_RNDU || (rnd_mode == MPFR_RNDZ && signx < 0)) \
66 else if (rnd_mode == MPFR_RNDD || rnd_mode == MPFR_RNDZ) \
H A Dset_ld.c105 mpfr_div_2si (t, t, 8192, MPFR_RNDZ);
111 mpfr_div_2si (t, t, 4096, MPFR_RNDZ);
117 mpfr_div_2si (t, t, 2048, MPFR_RNDZ);
123 mpfr_div_2si (t, t, 1024, MPFR_RNDZ);
131 mpfr_div_2si (t, t, 512, MPFR_RNDZ);
157 mpfr_mul_2si (t, t, 8192, MPFR_RNDZ);
163 mpfr_mul_2si (t, t, 4096, MPFR_RNDZ);
169 mpfr_mul_2si (t, t, 2048, MPFR_RNDZ);
175 mpfr_mul_2si (t, t, 1024, MPFR_RNDZ);
181 mpfr_mul_2si (t, t, 512, MPFR_RNDZ);
[all...]
H A Derfc.c84 mpfr_const_pi (xx, MPFR_RNDZ); /* err <= ulp(Pi) */
163 return mpfr_underflow (y, (rnd == MPFR_RNDN) ? MPFR_RNDZ : rnd, 1);
188 if (rnd == MPFR_RNDZ || rnd == MPFR_RNDD)
205 mpfr_sqr (u, x, MPFR_RNDZ);
206 mpfr_mul (t, t, u, MPFR_RNDZ); /* t <= x^2/log(2) */
207 mpfr_neg (u, x, MPFR_RNDZ); /* 0 <= u <= |x| */
208 mpfr_log2 (u, u, MPFR_RNDZ); /* u <= log2(|x|) */
209 mpfr_add (t, t, u, MPFR_RNDZ); /* t <= log2|x| + x^2 / log(2) */
245 return mpfr_underflow (y, (rnd == MPFR_RNDN) ? MPFR_RNDZ : rnd, 1);
H A Dcot.c72 if (rnd_mode == MPFR_RNDU || (rnd_mode == MPFR_RNDZ && signx < 0)) \
78 else if (rnd_mode == MPFR_RNDD || rnd_mode == MPFR_RNDZ) \
H A Derf.c83 mpfr_ui_sub (l, 1, l, MPFR_RNDZ); /* lower bound on 1 - x^2/3 */
86 mpfr_div (l, l, h, MPFR_RNDZ); /* lower bound on 1/sqrt(Pi) (1 - x^2/3) */
87 mpfr_mul_2ui (l, l, 1, MPFR_RNDZ); /* 2/sqrt(Pi) (1 - x^2/3) */
88 mpfr_mul (l, l, x, MPFR_RNDZ); /* |l| is a lower bound on
114 mpfr_div (xf, x, xf, MPFR_RNDZ); /* round to zero ensures we get a lower
116 mpfr_mul (xf, xf, x, MPFR_RNDZ);
234 mpfr_const_pi (t, MPFR_RNDZ);
235 mpfr_sqrt (t, t, MPFR_RNDZ);
H A Dgen_inverse.h75 MPFR_BLOCK (flags, INVERSE (z, x, MPFR_RNDZ)); /* error k_u < 1 ulp */
86 MPFR_RNDZ : rnd_mode, s);

Completed in 81 milliseconds

123456