1
0
mirror of https://sourceware.org/git/glibc.git synced 2025-07-29 11:41:21 +03:00
* sysdeps/ieee754/ldbl-96/e_j1l.c: New file.
	Contributed by Stephen L. Moshier <moshier@na-net.ornl.gov>.

	* sysdeps/i386/fpu/libm-test-ulps: Adjust error values for j1 and y1.
	* sysdeps/ia64/fpu/libm-test-ulps: Adjust error values for y1.
	* math/libm-test.inc (j1_test): Mark constants as long double.
	(jn_test): Likewise.
	(y1_test): Likewise.
	(yn_test): Likewise.
This commit is contained in:
Ulrich Drepper
2001-02-19 09:32:39 +00:00
parent 8da2915d5d
commit cf61f83f78
5 changed files with 732 additions and 67 deletions

View File

@ -2875,15 +2875,15 @@ j1_test (void)
TEST_f_f (j1, nan_value, nan_value);
TEST_f_f (j1, plus_infty, 0);
TEST_f_f (j1, -1.0, -0.44005058574493351596);
TEST_f_f (j1, -1.0, -0.44005058574493351596L);
TEST_f_f (j1, 0.0, 0.0);
TEST_f_f (j1, 0.1L, 0.049937526036241997556);
TEST_f_f (j1, 0.7L, 0.32899574154005894785);
TEST_f_f (j1, 1.0, 0.44005058574493351596);
TEST_f_f (j1, 1.5, 0.55793650791009964199);
TEST_f_f (j1, 2.0, 0.57672480775687338720);
TEST_f_f (j1, 8.0, 0.23463634685391462438);
TEST_f_f (j1, 10.0, 0.043472746168861436670);
TEST_f_f (j1, 0.1L, 0.049937526036241997556L);
TEST_f_f (j1, 0.7L, 0.32899574154005894785L);
TEST_f_f (j1, 1.0, 0.44005058574493351596L);
TEST_f_f (j1, 1.5, 0.55793650791009964199L);
TEST_f_f (j1, 2.0, 0.57672480775687338720L);
TEST_f_f (j1, 8.0, 0.23463634685391462438L);
TEST_f_f (j1, 10.0, 0.043472746168861436670L);
END (j1);
}
@ -2908,53 +2908,53 @@ jn_test (void)
/* jn (0, x) == j0 (x) */
TEST_ff_f (jn, 0, nan_value, nan_value);
TEST_ff_f (jn, 0, plus_infty, 0);
TEST_ff_f (jn, 0, -1.0, 0.76519768655796655145);
TEST_ff_f (jn, 0, -1.0, 0.76519768655796655145L);
TEST_ff_f (jn, 0, 0.0, 1.0);
TEST_ff_f (jn, 0, 0.1L, 0.99750156206604003228);
TEST_ff_f (jn, 0, 0.7L, 0.88120088860740528084);
TEST_ff_f (jn, 0, 1.0, 0.76519768655796655145);
TEST_ff_f (jn, 0, 1.5, 0.51182767173591812875);
TEST_ff_f (jn, 0, 2.0, 0.22389077914123566805);
TEST_ff_f (jn, 0, 8.0, 0.17165080713755390609);
TEST_ff_f (jn, 0, 10.0, -0.24593576445134833520);
TEST_ff_f (jn, 0, 0.1L, 0.99750156206604003228L);
TEST_ff_f (jn, 0, 0.7L, 0.88120088860740528084L);
TEST_ff_f (jn, 0, 1.0, 0.76519768655796655145L);
TEST_ff_f (jn, 0, 1.5, 0.51182767173591812875L);
TEST_ff_f (jn, 0, 2.0, 0.22389077914123566805L);
TEST_ff_f (jn, 0, 8.0, 0.17165080713755390609L);
TEST_ff_f (jn, 0, 10.0, -0.24593576445134833520L);
/* jn (1, x) == j1 (x) */
TEST_ff_f (jn, 1, nan_value, nan_value);
TEST_ff_f (jn, 1, plus_infty, 0);
TEST_ff_f (jn, 1, -1.0, -0.44005058574493351596);
TEST_ff_f (jn, 1, -1.0, -0.44005058574493351596L);
TEST_ff_f (jn, 1, 0.0, 0.0);
TEST_ff_f (jn, 1, 0.1L, 0.049937526036241997556);
TEST_ff_f (jn, 1, 0.7L, 0.32899574154005894785);
TEST_ff_f (jn, 1, 1.0, 0.44005058574493351596);
TEST_ff_f (jn, 1, 1.5, 0.55793650791009964199);
TEST_ff_f (jn, 1, 2.0, 0.57672480775687338720);
TEST_ff_f (jn, 1, 8.0, 0.23463634685391462438);
TEST_ff_f (jn, 1, 10.0, 0.043472746168861436670);
TEST_ff_f (jn, 1, 0.1L, 0.049937526036241997556L);
TEST_ff_f (jn, 1, 0.7L, 0.32899574154005894785L);
TEST_ff_f (jn, 1, 1.0, 0.44005058574493351596L);
TEST_ff_f (jn, 1, 1.5, 0.55793650791009964199L);
TEST_ff_f (jn, 1, 2.0, 0.57672480775687338720L);
TEST_ff_f (jn, 1, 8.0, 0.23463634685391462438L);
TEST_ff_f (jn, 1, 10.0, 0.043472746168861436670L);
/* jn (3, x) */
TEST_ff_f (jn, 3, nan_value, nan_value);
TEST_ff_f (jn, 3, plus_infty, 0);
TEST_ff_f (jn, 3, -1.0, -0.019563353982668405919);
TEST_ff_f (jn, 3, -1.0, -0.019563353982668405919L);
TEST_ff_f (jn, 3, 0.0, 0.0);
TEST_ff_f (jn, 3, 0.1L, 0.000020820315754756261429);
TEST_ff_f (jn, 3, 0.7L, 0.0069296548267508408077);
TEST_ff_f (jn, 3, 1.0, 0.019563353982668405919);
TEST_ff_f (jn, 3, 2.0, 0.12894324947440205110);
TEST_ff_f (jn, 3, 10.0, 0.058379379305186812343);
TEST_ff_f (jn, 3, 0.1L, 0.000020820315754756261429L);
TEST_ff_f (jn, 3, 0.7L, 0.0069296548267508408077L);
TEST_ff_f (jn, 3, 1.0, 0.019563353982668405919L);
TEST_ff_f (jn, 3, 2.0, 0.12894324947440205110L);
TEST_ff_f (jn, 3, 10.0, 0.058379379305186812343L);
/* jn (10, x) */
TEST_ff_f (jn, 10, nan_value, nan_value);
TEST_ff_f (jn, 10, plus_infty, 0);
TEST_ff_f (jn, 10, -1.0, 0.26306151236874532070e-9);
TEST_ff_f (jn, 10, -1.0, 0.26306151236874532070e-9L);
TEST_ff_f (jn, 10, 0.0, 0.0);
TEST_ff_f (jn, 10, 0.1L, 0.26905328954342155795e-19);
TEST_ff_f (jn, 10, 0.7L, 0.75175911502153953928e-11);
TEST_ff_f (jn, 10, 1.0, 0.26306151236874532070e-9);
TEST_ff_f (jn, 10, 2.0, 0.25153862827167367096e-6);
TEST_ff_f (jn, 10, 10.0, 0.20748610663335885770);
TEST_ff_f (jn, 10, 0.1L, 0.26905328954342155795e-19L);
TEST_ff_f (jn, 10, 0.7L, 0.75175911502153953928e-11L);
TEST_ff_f (jn, 10, 1.0, 0.26306151236874532070e-9L);
TEST_ff_f (jn, 10, 2.0, 0.25153862827167367096e-6L);
TEST_ff_f (jn, 10, 10.0, 0.20748610663335885770L);
END (jn);
}
@ -4069,13 +4069,13 @@ y1_test (void)
TEST_f_f (y1, plus_infty, 0);
TEST_f_f (y1, nan_value, nan_value);
TEST_f_f (y1, 0.1L, -6.4589510947020269877);
TEST_f_f (y1, 0.7L, -1.1032498719076333697);
TEST_f_f (y1, 1.0, -0.78121282130028871655);
TEST_f_f (y1, 1.5, -0.41230862697391129595);
TEST_f_f (y1, 2.0, -0.10703243154093754689);
TEST_f_f (y1, 8.0, -0.15806046173124749426);
TEST_f_f (y1, 10.0, 0.24901542420695388392);
TEST_f_f (y1, 0.1L, -6.4589510947020269877L);
TEST_f_f (y1, 0.7L, -1.1032498719076333697L);
TEST_f_f (y1, 1.0, -0.78121282130028871655L);
TEST_f_f (y1, 1.5, -0.41230862697391129595L);
TEST_f_f (y1, 2.0, -0.10703243154093754689L);
TEST_f_f (y1, 8.0, -0.15806046173124749426L);
TEST_f_f (y1, 10.0, 0.24901542420695388392L);
END (y1);
}
@ -4103,13 +4103,13 @@ yn_test (void)
TEST_ff_f (yn, 0, nan_value, nan_value);
TEST_ff_f (yn, 0, plus_infty, 0);
TEST_ff_f (yn, 0, 0.1L, -1.5342386513503668441);
TEST_ff_f (yn, 0, 0.7L, -0.19066492933739506743);
TEST_ff_f (yn, 0, 1.0, 0.088256964215676957983);
TEST_ff_f (yn, 0, 1.5, 0.38244892379775884396);
TEST_ff_f (yn, 0, 2.0, 0.51037567264974511960);
TEST_ff_f (yn, 0, 8.0, 0.22352148938756622053);
TEST_ff_f (yn, 0, 10.0, 0.055671167283599391424);
TEST_ff_f (yn, 0, 0.1L, -1.5342386513503668441L);
TEST_ff_f (yn, 0, 0.7L, -0.19066492933739506743L);
TEST_ff_f (yn, 0, 1.0, 0.088256964215676957983L);
TEST_ff_f (yn, 0, 1.5, 0.38244892379775884396L);
TEST_ff_f (yn, 0, 2.0, 0.51037567264974511960L);
TEST_ff_f (yn, 0, 8.0, 0.22352148938756622053L);
TEST_ff_f (yn, 0, 10.0, 0.055671167283599391424L);
/* yn (1, x) == y1 (x) */
TEST_ff_f (yn, 1, -1.0, minus_infty);
@ -4117,33 +4117,33 @@ yn_test (void)
TEST_ff_f (yn, 1, plus_infty, 0);
TEST_ff_f (yn, 1, nan_value, nan_value);
TEST_ff_f (yn, 1, 0.1L, -6.4589510947020269877);
TEST_ff_f (yn, 1, 0.7L, -1.1032498719076333697);
TEST_ff_f (yn, 1, 1.0, -0.78121282130028871655);
TEST_ff_f (yn, 1, 1.5, -0.41230862697391129595);
TEST_ff_f (yn, 1, 2.0, -0.10703243154093754689);
TEST_ff_f (yn, 1, 8.0, -0.15806046173124749426);
TEST_ff_f (yn, 1, 10.0, 0.24901542420695388392);
TEST_ff_f (yn, 1, 0.1L, -6.4589510947020269877L);
TEST_ff_f (yn, 1, 0.7L, -1.1032498719076333697L);
TEST_ff_f (yn, 1, 1.0, -0.78121282130028871655L);
TEST_ff_f (yn, 1, 1.5, -0.41230862697391129595L);
TEST_ff_f (yn, 1, 2.0, -0.10703243154093754689L);
TEST_ff_f (yn, 1, 8.0, -0.15806046173124749426L);
TEST_ff_f (yn, 1, 10.0, 0.24901542420695388392L);
/* yn (3, x) */
TEST_ff_f (yn, 3, plus_infty, 0);
TEST_ff_f (yn, 3, nan_value, nan_value);
TEST_ff_f (yn, 3, 0.1L, -5099.3323786129048894);
TEST_ff_f (yn, 3, 0.7L, -15.819479052819633505);
TEST_ff_f (yn, 3, 1.0, -5.8215176059647288478);
TEST_ff_f (yn, 3, 2.0, -1.1277837768404277861);
TEST_ff_f (yn, 3, 10.0, -0.25136265718383732978);
TEST_ff_f (yn, 3, 0.1L, -5099.3323786129048894L);
TEST_ff_f (yn, 3, 0.7L, -15.819479052819633505L);
TEST_ff_f (yn, 3, 1.0, -5.8215176059647288478L);
TEST_ff_f (yn, 3, 2.0, -1.1277837768404277861L);
TEST_ff_f (yn, 3, 10.0, -0.25136265718383732978L);
/* yn (10, x) */
TEST_ff_f (yn, 10, plus_infty, 0);
TEST_ff_f (yn, 10, nan_value, nan_value);
TEST_ff_f (yn, 10, 0.1L, -0.11831335132045197885e19);
TEST_ff_f (yn, 10, 0.7L, -0.42447194260703866924e10);
TEST_ff_f (yn, 10, 1.0, -0.12161801427868918929e9);
TEST_ff_f (yn, 10, 2.0, -129184.54220803928264);
TEST_ff_f (yn, 10, 10.0, -0.35981415218340272205);
TEST_ff_f (yn, 10, 0.1L, -0.11831335132045197885e19L);
TEST_ff_f (yn, 10, 0.7L, -0.42447194260703866924e10L);
TEST_ff_f (yn, 10, 1.0, -0.12161801427868918929e9L);
TEST_ff_f (yn, 10, 2.0, -129184.54220803928264L);
TEST_ff_f (yn, 10, 10.0, -0.35981415218340272205L);
END (yn);