summaryrefslogtreecommitdiff
path: root/math
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>1999-06-06 12:58:19 +0000
committerUlrich Drepper <drepper@redhat.com>1999-06-06 12:58:19 +0000
commita582750d701263b71ff9d0a85795598872d510a7 (patch)
tree902f88a3db22114d673d15027d6288c77f779fe1 /math
parentb3864d70e74192455c8db5ff7e32574f2a8fca6e (diff)
downloadglibc-a582750d701263b71ff9d0a85795598872d510a7.tar.gz
Update.
1999-06-04 Andreas Jaeger <aj@arthur.rhein-neckar.de> * math/libm-test.c (yn_test): Change one delta. (jn_test): Likewise. (j1_test): Likewise. (y0_test): Likewise.
Diffstat (limited to 'math')
-rw-r--r--math/libm-test.c22
1 files changed, 11 insertions, 11 deletions
diff --git a/math/libm-test.c b/math/libm-test.c
index 5890c3bce8..49cce03d00 100644
--- a/math/libm-test.c
+++ b/math/libm-test.c
@@ -5505,7 +5505,7 @@ j0_test (void)
if (errno == ENOSYS)
/* Function not implemented. */
return;
-
+
/* j0 is the Bessel function of the first kind of order 0 */
check_isnan ("j0 (NaN) = NaN", FUNC(j0) (nan_value));
check ("j0 (+Inf) = 0", FUNC(j0) (plus_infty), 0);
@@ -5535,7 +5535,7 @@ j1_test (void)
/* j1 is the Bessel function of the first kind of order 1 */
check_isnan ("j1 (NaN) = NaN", FUNC(j1) (nan_value));
check ("j1 (+Inf) = 0", FUNC(j1) (plus_infty), 0);
-
+
check ("j1 (-1.0) = -0.44005...", FUNC(j1) (-1.0), -0.44005058574493351596);
check ("j1 (0) = 0", FUNC(j1) (0.0), 0.0);
check ("j1 (0.1) = 0.049937...", FUNC(j1) (0.1), 0.049937526036241997556);
@@ -5547,7 +5547,7 @@ j1_test (void)
check_eps ("j1 (8.0) = 0.23463...", FUNC(j1) (8.0), 0.23463634685391462438,
CHOOSE(0, 0, 1.5e-8));
check_eps ("j1 (10.0) = 0.04347...", FUNC(j1) (10.0), 0.043472746168861436670,
- CHOOSE(0, 7e-18, 3.8e-9));
+ CHOOSE(0, 2e-17, 3.8e-9));
}
static void
@@ -5580,7 +5580,7 @@ jn_test (void)
/* jn (1, x) == j1 (x) */
check_isnan ("jn (1, NaN) = NaN", FUNC(jn) (1, nan_value));
check ("jn (1, +Inf) = 0", FUNC(jn) (1, plus_infty), 0);
-
+
check ("jn (1, -1.0) = -0.44005...", FUNC(jn) (1, -1.0), -0.44005058574493351596);
check ("jn (1, 0.0) = 0", FUNC(jn) (1, 0.0), 0.0);
check ("jn (1, 0.1) = 0.049937...", FUNC(jn) (1, 0.1), 0.049937526036241997556);
@@ -5592,12 +5592,12 @@ jn_test (void)
check_eps ("jn (1, 8.0) = 0.23463...", FUNC(jn) (1, 8.0), 0.23463634685391462438,
CHOOSE(0, 0, 1.5e-8));
check_eps ("jn (1, 10.0) = 0.04347...", FUNC(jn) (1, 10.0), 0.043472746168861436670,
- CHOOSE(0, 7e-18, 3.8e-9));
+ CHOOSE(0, 2e-17, 3.8e-9));
/* jn (3, x) */
check_isnan ("jn (3, NaN) = NaN", FUNC(jn) (3, nan_value));
check ("jn (3, +Inf) = 0", FUNC(jn) (3, plus_infty), 0);
-
+
check ("jn (3, -1.0) = -0.01956...", FUNC(jn) (3, -1.0), -0.019563353982668405919);
check ("jn (3, 0.0) = 0", FUNC(jn) (3, 0.0), 0.0);
check_eps ("jn (3, 0.1) = 2.082...*10^-6", FUNC(jn) (3, 0.1), 0.000020820315754756261429,
@@ -5613,7 +5613,7 @@ jn_test (void)
/* jn (10, x) */
check_isnan ("jn (10, NaN) = NaN", FUNC(jn) (10, nan_value));
check ("jn (10, +Inf) = 0", FUNC(jn) (10, plus_infty), 0);
-
+
check_eps ("jn (10, -1.0) = 2.6306...*10^-10", FUNC(jn) (10, -1.0), 0.26306151236874532070e-9,
CHOOSE(0, 0, 3e-17));
check ("jn (10, 0) = 0", FUNC(jn) (10, 0.0), 0.0);
@@ -5657,7 +5657,7 @@ y0_test (void)
check_eps ("y0 (8.0) = 0.22352...", FUNC(y0) (8.0), 0.22352148938756622053,
CHOOSE(0, 3e-17, 1.5e-8));
check_eps ("y0 (10.0) = 0.05567...", FUNC(y0) (10.0), 0.055671167283599391424,
- CHOOSE(0, 0, 3.8e-9));
+ CHOOSE(0, 2e-17, 3.8e-9));
}
@@ -5721,7 +5721,7 @@ yn_test (void)
check_eps ("yn (0, 8.0) = 0.22352...", FUNC(yn) (0, 8.0), 0.22352148938756622053,
CHOOSE(0, 3e-17, 1.5e-8));
check_eps ("yn (0, 10.0) = 0.05567...", FUNC(yn) (0, 10.0), 0.055671167283599391424,
- CHOOSE(0, 0, 3.8e-8));
+ CHOOSE(0, 2e-17, 3.8e-8));
/* yn (1, x) == y1 (x) */
check_isinfn ("yn (1, -1.0) = -inf", FUNC(yn) (1, -1.0));
@@ -5771,7 +5771,7 @@ yn_test (void)
CHOOSE(0, 3e-11, 8e-3));
check_eps ("yn (10, 10.0) = -0.35981...", FUNC(yn) (10, 10.0), -0.35981415218340272205,
CHOOSE(0, 6e-17, 3e-8));
-
+
}
@@ -6279,7 +6279,7 @@ main (int argc, char *argv[])
y0_test ();
y1_test ();
yn_test ();
-
+
/* special tests */
identities ();
inverse_functions ();