summaryrefslogtreecommitdiff
path: root/tests/tcbrt.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2009-03-03 16:51:07 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2009-03-03 16:51:07 +0000
commitf5f7883fc7cf47d38ed493a882fd7109bdd589bb (patch)
tree1058cf0d07593fa2cec9f32b4988ac40611b4bff /tests/tcbrt.c
parentcbd40e1cb659b579e608afbe7a05da5b15a860be (diff)
downloadmpfr-f5f7883fc7cf47d38ed493a882fd7109bdd589bb.tar.gz
GMP_RNDX -> MPFR_RNDX
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@6053 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tcbrt.c')
-rw-r--r--tests/tcbrt.c46
1 files changed, 23 insertions, 23 deletions
diff --git a/tests/tcbrt.c b/tests/tcbrt.c
index 2a75f9257..46b9af6c8 100644
--- a/tests/tcbrt.c
+++ b/tests/tcbrt.c
@@ -35,7 +35,7 @@ special (void)
/* cbrt(NaN) = NaN */
mpfr_set_nan (x);
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
if (!mpfr_nan_p (y))
{
printf ("Error: cbrt(NaN) <> NaN\n");
@@ -44,7 +44,7 @@ special (void)
/* cbrt(+Inf) = +Inf */
mpfr_set_inf (x, 1);
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
if (!mpfr_inf_p (y) || mpfr_sgn (y) < 0)
{
printf ("Error: cbrt(+Inf) <> +Inf\n");
@@ -53,7 +53,7 @@ special (void)
/* cbrt(-Inf) = -Inf */
mpfr_set_inf (x, -1);
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
if (!mpfr_inf_p (y) || mpfr_sgn (y) > 0)
{
printf ("Error: cbrt(-Inf) <> -Inf\n");
@@ -61,15 +61,15 @@ special (void)
}
/* cbrt(+/-0) = +/-0 */
- mpfr_set_ui (x, 0, GMP_RNDN);
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_set_ui (x, 0, MPFR_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
if (mpfr_cmp_ui (y, 0) || mpfr_sgn (y) < 0)
{
printf ("Error: cbrt(+0) <> +0\n");
exit (1);
}
- mpfr_neg (x, x, GMP_RNDN);
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_neg (x, x, MPFR_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
if (mpfr_cmp_ui (y, 0) || mpfr_sgn (y) > 0)
{
printf ("Error: cbrt(-0) <> -0\n");
@@ -77,8 +77,8 @@ special (void)
}
mpfr_set_prec (x, 53);
- mpfr_set_str (x, "8.39005285514734966412e-01", 10, GMP_RNDN);
- mpfr_cbrt (x, x, GMP_RNDN);
+ mpfr_set_str (x, "8.39005285514734966412e-01", 10, MPFR_RNDN);
+ mpfr_cbrt (x, x, MPFR_RNDN);
if (mpfr_cmp_str1 (x, "9.43166207799662426048e-01"))
{
printf ("Error in crbrt (1)\n");
@@ -88,7 +88,7 @@ special (void)
mpfr_set_prec (x, 32);
mpfr_set_prec (y, 32);
mpfr_set_str_binary (x, "0.10000100001100101001001001011001");
- mpfr_cbrt (x, x, GMP_RNDN);
+ mpfr_cbrt (x, x, MPFR_RNDN);
mpfr_set_str_binary (y, "0.11001101011000100111000111111001");
if (mpfr_cmp (x, y))
{
@@ -99,7 +99,7 @@ special (void)
mpfr_set_prec (x, 32);
mpfr_set_prec (y, 32);
mpfr_set_str_binary (x, "-0.1100001110110000010101011001011");
- mpfr_cbrt (x, x, GMP_RNDD);
+ mpfr_cbrt (x, x, MPFR_RNDD);
mpfr_set_str_binary (y, "-0.11101010000100100101000101011001");
if (mpfr_cmp (x, y))
{
@@ -110,7 +110,7 @@ special (void)
mpfr_set_prec (x, 82);
mpfr_set_prec (y, 27);
mpfr_set_str_binary (x, "0.1010001111011101011011000111001011001101100011110110010011011011011010011001100101e-7");
- mpfr_cbrt (y, x, GMP_RNDD);
+ mpfr_cbrt (y, x, MPFR_RNDD);
mpfr_set_str_binary (x, "0.101011110001110001000100011E-2");
if (mpfr_cmp (x, y))
{
@@ -121,7 +121,7 @@ special (void)
mpfr_set_prec (x, 204);
mpfr_set_prec (y, 38);
mpfr_set_str_binary (x, "0.101000000001101000000001100111111011111001110110100001111000100110100111001101100111110001110001011011010110010011100101111001111100001010010100111011101100000011011000101100010000000011000101001010001001E-5");
- mpfr_cbrt (y, x, GMP_RNDD);
+ mpfr_cbrt (y, x, MPFR_RNDD);
mpfr_set_str_binary (x, "0.10001001111010011011101000010110110010E-1");
if (mpfr_cmp (x, y))
{
@@ -133,7 +133,7 @@ special (void)
mpfr_set_prec (x, 5);
mpfr_set_prec (y, 5);
mpfr_set_str_binary (x, "1.1000E-2");
- mpfr_cbrt (y, x, GMP_RNDN);
+ mpfr_cbrt (y, x, MPFR_RNDN);
mpfr_set_str_binary (x, "1.0111E-1");
if (mpfr_cmp (x, y))
{
@@ -164,25 +164,25 @@ main (void)
for (p=2; p<100; p++)
{
mpfr_set_prec (x, p);
- for (r = 0; r < GMP_RND_MAX; r++)
+ for (r = 0; r < MPFR_RND_MAX; r++)
{
- mpfr_set_ui (x, 1, GMP_RNDN);
+ mpfr_set_ui (x, 1, MPFR_RNDN);
mpfr_cbrt (x, x, (mp_rnd_t) r);
if (mpfr_cmp_ui (x, 1))
{
printf ("Error in mpfr_cbrt for x=1, rnd=%s\ngot ",
mpfr_print_rnd_mode ((mp_rnd_t) r));
- mpfr_out_str (stdout, 2, 0, x, GMP_RNDN);
+ mpfr_out_str (stdout, 2, 0, x, MPFR_RNDN);
printf ("\n");
exit (1);
}
- mpfr_set_si (x, -1, GMP_RNDN);
+ mpfr_set_si (x, -1, MPFR_RNDN);
mpfr_cbrt (x, x, (mp_rnd_t) r);
if (mpfr_cmp_si (x, -1))
{
printf ("Error in mpfr_cbrt for x=-1, rnd=%s\ngot ",
mpfr_print_rnd_mode ((mp_rnd_t) r));
- mpfr_out_str (stdout, 2, 0, x, GMP_RNDN);
+ mpfr_out_str (stdout, 2, 0, x, MPFR_RNDN);
printf ("\n");
exit (1);
}
@@ -192,15 +192,15 @@ main (void)
int i;
for (i = -12; i <= 12; i++)
{
- mpfr_set_ui (x, 27, GMP_RNDN);
- mpfr_mul_2si (x, x, 3*i, GMP_RNDN);
- mpfr_cbrt (x, x, GMP_RNDN);
+ mpfr_set_ui (x, 27, MPFR_RNDN);
+ mpfr_mul_2si (x, x, 3*i, MPFR_RNDN);
+ mpfr_cbrt (x, x, MPFR_RNDN);
if (mpfr_cmp_si_2exp (x, 3, i))
{
printf ("Error in mpfr_cbrt for "
"x = 27.0 * 2^(%d), rnd=%s\ngot ",
3*i, mpfr_print_rnd_mode ((mp_rnd_t) r));
- mpfr_out_str (stdout, 2, 0, x, GMP_RNDN);
+ mpfr_out_str (stdout, 2, 0, x, MPFR_RNDN);
printf ("\ninstead of 3 * 2^(%d)\n", i);
exit (1);
}