/netbsd-6-1-5-RELEASE/external/lgpl3/mpfr/dist/ |
H A D | print_rnd_mode.c | 33 case MPFR_RNDD: 34 return "MPFR_RNDD";
|
H A D | csc.c | 56 rnd_mode = (signx > 0) ? MPFR_RNDU : MPFR_RNDD; \ 63 else if (rnd_mode == MPFR_RNDD) \
|
H A D | csch.c | 59 rnd_mode = (signx > 0) ? MPFR_RNDU : MPFR_RNDD; \ 66 else if (rnd_mode == MPFR_RNDD || rnd_mode == MPFR_RNDZ) \
|
H A D | get_flt.c | 50 rnd_mode = negative ? MPFR_RNDD : MPFR_RNDU; 61 (rnd_mode == MPFR_RNDD || 77 (rnd_mode == MPFR_RNDZ || rnd_mode == MPFR_RNDD ?
|
H A D | cot.c | 71 rnd_mode = (signx > 0) ? MPFR_RNDU : MPFR_RNDD; \ 78 else if (rnd_mode == MPFR_RNDD || rnd_mode == MPFR_RNDZ) \
|
H A D | coth.c | 73 rnd_mode = (signx > 0) ? MPFR_RNDU : MPFR_RNDD; \ 80 else if (rnd_mode == MPFR_RNDD) \
|
H A D | sinh.c | 95 MPFR_BLOCK (flags, mpfr_exp (t, x, MPFR_RNDD)); 100 mpfr_div_2ui (ti, x, 1, MPFR_RNDD); /* exact */ 103 MPFR_BLOCK (flags, mpfr_cosh (t, ti, MPFR_RNDD)); 115 mpfr_sinh (ti, ti, MPFR_RNDD); 118 MPFR_BLOCK (flags, mpfr_mul (t, t, ti, MPFR_RNDD));
|
H A D | exp3.c | 146 mpfr_set_z (y, S[0], MPFR_RNDD); 183 mpfr_set (x_copy, x, MPFR_RNDD); 226 mpfr_sqr (tmp, tmp, MPFR_RNDD); 237 mpfr_mul (tmp, tmp, t, MPFR_RNDD); 253 mpfr_sqr (tmp, tmp, MPFR_RNDD); 254 mpfr_sqr (t, tmp, MPFR_RNDD); 269 mpfr_mul_2ui (tmp, tmp, 1, MPFR_RNDD); /* no overflow, exact */ 270 mpfr_sqr (t, tmp, MPFR_RNDD); 284 if (mpfr_can_round (shift_x > 0 ? t : tmp, realprec, MPFR_RNDD, MPFR_RNDZ,
|
H A D | get_d.c | 60 rnd_mode = negative ? MPFR_RNDD : MPFR_RNDU; 70 (rnd_mode == MPFR_RNDD || 86 (rnd_mode == MPFR_RNDZ || rnd_mode == MPFR_RNDD ?
|
H A D | acosh.c | 93 MPFR_BLOCK (flags, mpfr_mul (t, x, x, MPFR_RNDD)); /* x^2 */ 115 mpfr_sub_ui (t, t, 1, MPFR_RNDD); /* x^2-1 */ 121 mpfr_sub_ui (t, x, 1, MPFR_RNDD); /* t = x - 1 */
|
H A D | exp.c | 73 mpfr_const_log2 (bound, expo.saved_emax < 0 ? MPFR_RNDD : MPFR_RNDU); 87 mpfr_const_log2 (bound, expo.saved_emin < 0 ? MPFR_RNDU : MPFR_RNDD); 88 mpfr_mul (bound, bound, e, MPFR_RNDD); 115 if (MPFR_IS_NEG_SIGN (signx) && (rnd_mode == MPFR_RNDD ||
|
H A D | asinh.c | 90 mpfr_mul (t, x, x, MPFR_RNDD); /* x^2 */ 91 mpfr_add_ui (t, t, 1, MPFR_RNDD); /* x^2+1 */
|
H A D | const_euler.c | 65 mpfr_log (z, z, MPFR_RNDD); /* error <= 1 ulp */ 204 mpfr_set_z (x, s, MPFR_RNDD); /* exact */ 205 mpfr_div_2ui (x, x, m, MPFR_RNDD); 210 mpfr_set_si (y, -(long)n, MPFR_RNDD); /* assumed exact */ 211 mpfr_exp (y, y, MPFR_RNDD); /* err <= ulp(y) <= exp(-n)*2^(1-m) */ 212 mpfr_mul (x, x, y, MPFR_RNDD);
|
H A D | pow.c | 204 mpfr_log (t, absx, MPFR_IS_NEG (y) ? MPFR_RNDD : MPFR_RNDU); /* ln|x| */ 209 mpfr_const_log2 (u, MPFR_RNDD); 210 mpfr_mul (u, u, k, MPFR_RNDD); 259 mpfr_log (t, absx, MPFR_IS_NEG (y) ? MPFR_RNDU : MPFR_RNDD); 260 mpfr_mul (t, y, t, MPFR_RNDD); /* y * ln|x| */ 261 MPFR_BLOCK (flags2, mpfr_exp (t, t, MPFR_RNDD)); 658 mpfr_log (t, x, cmp_x_1 < 0 ? MPFR_RNDD : MPFR_RNDU); /* away from 0 */ 662 mpfr_neg (t, x, (mpfr_cmp_si (x, -1) < 0) ? MPFR_RNDU : MPFR_RNDD); 663 mpfr_log (t, t, (mpfr_cmp_ui (t, 1) < 0) ? MPFR_RNDD : MPFR_RNDU);
|
H A D | yn.c | 227 mpfr_log (logz, z, MPFR_RNDD); /* lower bound of log(z) */ 230 mpfr_const_euler (t, MPFR_RNDD); /* lower bound of euler */ 231 mpfr_add (l, logz, t, MPFR_RNDD); /* lower bound of log(z) + euler */ 235 mpfr_sub (l, l, t, MPFR_RNDD); /* lower bound of log(z/2) + euler */ 239 mpfr_div (l, l, t, MPFR_RNDD); /* lower bound of (log(z/2)+euler)/Pi */ 241 mpfr_div (h, h, t, MPFR_RNDD); /* upper bound of (log(z/2)+euler)/Pi */ 242 mpfr_mul_2ui (l, l, 1, MPFR_RNDD); /* lower bound on g(z)*log(z) */ 249 mpfr_neg (t, t, MPFR_RNDD); 250 mpfr_div_2ui (t, t, 1, MPFR_RNDD);
|
/netbsd-6-1-5-RELEASE/external/lgpl3/mpfr/dist/tests/ |
H A D | tlog.c | 96 check2("1.00089971802309629645", MPFR_RNDD, "8.99313519443722736088e-04"); 100 check2("1.01979300812244555452", MPFR_RNDD, "1.95996734891603630047e-02"); 104 check2("1.02900871924604464525", MPFR_RNDD, "2.85959303301472726744e-02"); 108 check2("1.27832870030418943585", MPFR_RNDD, "2.45553521871417795852e-01"); 112 check2("1.31706530746788241792", MPFR_RNDD, "2.75406009586277422674e-01"); 116 check2("1.47116981099449883885", MPFR_RNDD, "3.86057874110010412760e-01"); 120 check2("1.58405446812987782401", MPFR_RNDD, "4.59987679246663727639e-01"); 124 check2("1.67192331263391547047", MPFR_RNDD, "5.13974647961076613889e-01"); 128 check2("1.71101198068990645318", MPFR_RNDD, "5.37084997042120315669e-01"); 132 check2("1.72634853551388700588", MPFR_RNDD, "5.4600850478655360564 [all...] |
H A D | thyperbolic.c | 46 tester=mpfr_cosh(ch,t,MPFR_RNDD); 56 tester=mpfr_sinh(sh,t,MPFR_RNDD); 66 tester=mpfr_tanh(th,t,MPFR_RNDD); 76 tester=mpfr_acosh(ach,t,MPFR_RNDD); 86 tester=mpfr_asinh(ash,t,MPFR_RNDD); 96 tester=mpfr_atanh(ath,t,MPFR_RNDD); 131 mpfr_set_ui(t,0,MPFR_RNDD); 135 tester = mpfr_cosh (ch, t, MPFR_RNDD); 145 tester = mpfr_sinh (sh, t, MPFR_RNDD); 155 tester = mpfr_tanh (th, t, MPFR_RNDD); [all...] |
H A D | tsinh_cosh.c | 34 mpfr_out_str (stdout, 10, 0, x, MPFR_RNDD); 36 mpfr_out_str (stdout, 10, 0, esh, MPFR_RNDD); 38 mpfr_out_str (stdout, 10, 0, gsh, MPFR_RNDD); 40 mpfr_out_str (stdout, 10, 0, ech, MPFR_RNDD); 42 mpfr_out_str (stdout, 10, 0, gch, MPFR_RNDD); 121 mpfr_ui_sub (x, i, x, MPFR_RNDD); 122 mpfr_div_2ui (x, x, 2, MPFR_RNDD); 126 check (x, MPFR_RNDD);
|
H A D | rnd_mode.c | 59 case MPFR_RNDD:
|
H A D | tsqrt.c | 170 check24("70368760954880.0", MPFR_RNDD, "8.388608e6"); 171 check24("281474943156224.0", MPFR_RNDD, "1.6777214e7"); 172 check24("70368777732096.0", MPFR_RNDD, "8.388609e6"); 173 check24("281474909601792.0", MPFR_RNDD, "1.6777213e7"); 174 check24("100216216748032.0", MPFR_RNDD, "1.0010805e7"); 175 check24("120137273311232.0", MPFR_RNDD, "1.0960715e7"); 176 check24("229674600890368.0", MPFR_RNDD, "1.5155019e7"); 177 check24("70368794509312.0", MPFR_RNDD, "8.38861e6"); 178 check24("281474876047360.0", MPFR_RNDD, "1.6777212e7"); 179 check24("91214552498176.0", MPFR_RNDD, "9.55063 [all...] |
H A D | tset_str.c | 210 mpfr_set_str (x, "9007199254740992", 10, MPFR_RNDD); 630 CHECK53(y, "7e-303", MPFR_RNDD, x, 637 CHECK53(y, "93e-234", MPFR_RNDD, x, 644 CHECK53(y, "755e174", MPFR_RNDD, x, 651 CHECK53(y, "8699e-276", MPFR_RNDD, x, 658 CHECK53(y, "82081e41", MPFR_RNDD, x, 665 CHECK53(y, "584169e229", MPFR_RNDD, x, 672 CHECK53(y, "5783893e-128", MPFR_RNDD, x, 679 CHECK53(y, "87575437e-310", MPFR_RNDD, x, 686 CHECK53(y, "245540327e121", MPFR_RNDD, [all...] |
H A D | troot.c | 114 mpfr_root (x, x, 3, MPFR_RNDD); 125 mpfr_root (y, x, 3, MPFR_RNDD); 136 mpfr_root (y, x, 3, MPFR_RNDD); 162 mpfr_root (y, x, 36, MPFR_RNDD); 166 printf ("Error in mpfr_root (y, x, 36, MPFR_RNDD) for\n" 230 mpfr_set_ui_2exp (x, 17, -5, MPFR_RNDD); 246 mpfr_set_si (x, -17, MPFR_RNDD);
|
H A D | texp.c | 83 test_exp(y, x, MPFR_RNDD); 129 mpfr_exp_2 (y, x, MPFR_RNDD); 130 mpfr_exp_3 (x, x, MPFR_RNDD); 270 mpfr_exp (x, x, MPFR_RNDD); 311 mpfr_exp (x, x, MPFR_RNDD); 360 test_exp (y, x, MPFR_RNDD); 549 if (rnd == MPFR_RNDZ || rnd == MPFR_RNDD) 667 * or minpos. An underflow always occurs in MPFR_RNDZ and MPFR_RNDD, 735 if (rnd == MPFR_RNDD || rnd == MPFR_RNDZ) 760 mpfr_log (x, minpos, MPFR_RNDD); /* |ul [all...] |
H A D | tset_si.c | 196 inex = mpfr_set_si (x, 77617, MPFR_RNDD); /* should be 65536 */ 200 printf ("Error in mpfr_set_si(x:3, 77617, MPFR_RNDD)\n"); 205 inex = mpfr_set_ui (x, 77617, MPFR_RNDD); /* should be 65536 */ 209 printf ("Error in mpfr_set_ui(x:3, 77617, MPFR_RNDD)\n"); 295 dl = mpfr_get_ui (x, MPFR_RNDD); 302 mpfr_set_si (x, -7, MPFR_RNDD); 316 MPFR_ASSERTN (mpfr_get_ui (x, MPFR_RNDD) == 0); 317 MPFR_ASSERTN (mpfr_get_si (x, MPFR_RNDD) == 0); 413 mpfr_set_si (x, -7, MPFR_RNDD); 418 printf ("Error for mpfr_set_si (x, -7, MPFR_RNDD), pre [all...] |
H A D | tsin.c | 101 mpfr_const_pi (pid, MPFR_RNDD); 110 mpfr_mul_ui (x, pid, k, MPFR_RNDD); 238 mpfr_sin (y, x, MPFR_RNDD); 261 mpfr_sin (y, x, MPFR_RNDD); 262 mpfr_mul_2ui (y, y, 1, MPFR_RNDD); 285 check53 ("4.984987858808754279e-1", "4.781075595393329824e-1", MPFR_RNDD); 304 test_sin (x, x, MPFR_RNDD); 307 printf ("mpfr_sin(0.5, MPFR_RNDD) failed with precision=2\n");
|