(jn_test): Fix typo in description.
authordrepper <drepper>
Thu, 19 Aug 1999 16:33:13 +0000 (16:33 +0000)
committerdrepper <drepper>
Thu, 19 Aug 1999 16:33:13 +0000 (16:33 +0000)
(erfc_test): Add some more tests.
(erf_test): Add some more tests.

math/libm-test.c

index b2e89d1..4c7fe8b 100644 (file)
@@ -1116,6 +1116,12 @@ erf_test (void)
 
   check ("erf (1.2) == 0.9103139782...", FUNC(erf) (1.2),
         0.91031397822963538024L);
+  check ("erf (2.0) == 0.99532...", FUNC(erf) (2.0),
+        0.99532226501895273416L);
+  check ("erf (4.1) == 0.99999...", FUNC(erf) (4.1),
+        0.99999999329997234592L);
+  check ("erf (27) == 1.0", FUNC(erf) (27),
+        1.0L);
 }
 
 
@@ -1138,6 +1144,12 @@ erfc_test (void)
 
   check_eps ("erfc (1.2) == 0.0896860218...", FUNC(erfc) (1.2),
             0.089686021770364619762L, CHOOSE (0, 0, 8e-9));
+  check_eps ("erfc (2.0) == 0.0046777349...", FUNC(erfc) (2.0),
+            0.0046777349810472658379L, CHOOSE (0, 9e-19, 0));
+  check_eps ("erfc (4.1) == 6.70002...*10^-9", FUNC(erfc) (4.1),
+            0.67000276540848983727e-8L, CHOOSE (0, 2e-23, 6e-15));
+  check ("erfc (9) == 4.13703...*10^-37", FUNC(erfc) (9),
+        0.41370317465138102381e-36L);
 }
 
 
@@ -5637,7 +5649,7 @@ jn_test (void)
             CHOOSE(0, 2e-35, 9.7e-27));
   check_eps ("jn (10, 0.7) = 7.517...*10^-12", FUNC(jn) (10, 0.7), 0.75175911502153953928e-11,
             CHOOSE(0, 7e-27, 1.8e-18));
-  check_eps ("jn (10, 1.0) = 2.630...*10^-11", FUNC(jn) (10, 1.0), 0.26306151236874532070e-9,
+  check_eps ("jn (10, 1.0) = 2.630...*10^-10", FUNC(jn) (10, 1.0), 0.26306151236874532070e-9,
             CHOOSE(0, 0, 5.6e-17));
   check_eps ("jn (10, 2.0) = 2.515...*10^-7", FUNC(jn) (10, 2.0), 0.25153862827167367096e-6,
             CHOOSE(0, 2e-22, 1.2e-13));