boost/math
2
0
Fork 0
mirror of https://github.com/boostorg/math.git synced 2026-01-19 04:22:09 +00:00
Code Issues Projects Releases Wiki Activity

Set expected error limits for HP Tru64.

Browse Source 
Prevent very extreme-value round-trip tests from being run.

[SVN r40500]
This commit is contained in:
John Maddock
2007-10-27 11:32:30 +00:00
parent e875aee99a
commit 163ea7eaa6
9 changed files with 61 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
test/test_bessel_j.cpp
View File

@@ -88,7 +88,23 @@ void expected_results()
largest_type, // test type(s)
".*J.*Tricky.*", // test data group
".*", 3000, 500); // test function
//
// HP Tru64:
//
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
"double", // test type(s)
".*Tricky.*", // test data group
".*", 100000, 100000); // test function
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
largest_type, // test type(s)
".*Tricky large.*", // test data group
".*", 3000, 1000); // test function
//
// Mac OS X:
//

17
test/test_bessel_y.cpp
View File

@@ -75,6 +75,23 @@ void expected_results()
largest_type, // test type(s)
".*Y[01Nv].*", // test data group
".*", 400, 200); // test function
//
// Tru64:
//
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
largest_type, // test type(s)
".*(Y[nv]|y).*Random.*", // test data group
".*", 30000, 30000); // test function
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
largest_type, // test type(s)
".*Y[01Nv].*", // test data group
".*", 400, 200); // test function
//
// Mac OS X rates are very slightly higher:

10
test/test_gamma.cpp
View File

@@ -175,6 +175,16 @@ void expected_results()
"tgamma1pm1.*", // test data group
"boost::math::tgamma1pm1", 200, 80); // test function
//
// Tru64:
//
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
"real_concept", // test type(s)
"factorials", // test data group
"boost::math::lgamma", 50, 20); // test function
//
// Sun OS:
//
add_expected_result(

10
test/test_ibeta.cpp
View File

@@ -140,6 +140,16 @@ void expected_results()
"(?i).*large.*", // test data group
".*", 200000, 10000); // test function
//
// Tru64:
//
add_expected_result(
".*Tru64.*", // compiler
".*", // stdlib
".*", // platform
largest_type, // test type(s)
"(?i).*large.*", // test data group
".*", 100000, 10000); // test function
//
// Sun OS:
//
add_expected_result(

4
test/test_ibeta_inv.cpp
View File

@@ -187,7 +187,7 @@ void test_inverses(const T& data)
//
if(data[i][5] == 0)
BOOST_CHECK_EQUAL(boost::math::ibeta_inv(data[i][0], data[i][1], data[i][5]), value_type(0));
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibeta_inv(data[i][0], data[i][1], data[i][5]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);
@@ -197,7 +197,7 @@ void test_inverses(const T& data)
if(data[i][6] == 0)
BOOST_CHECK_EQUAL(boost::math::ibetac_inv(data[i][0], data[i][1], data[i][6]), value_type(1));
else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][6]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibetac_inv(data[i][0], data[i][1], data[i][6]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);

4
test/test_ibeta_inv_ab.cpp
View File

@@ -137,7 +137,7 @@ void test_inverses(const T& data)
BOOST_CHECK_EQUAL(boost::math::ibeta_inva(data[i][1], data[i][2], data[i][5]), boost::math::tools::max_value<value_type>());
BOOST_CHECK_EQUAL(boost::math::ibeta_invb(data[i][0], data[i][2], data[i][5]), boost::math::tools::min_value<value_type>());
}
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibeta_inva(data[i][1], data[i][2], data[i][5]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);
@@ -155,7 +155,7 @@ void test_inverses(const T& data)
BOOST_CHECK_EQUAL(boost::math::ibetac_inva(data[i][1], data[i][2], data[i][6]), boost::math::tools::min_value<value_type>());
BOOST_CHECK_EQUAL(boost::math::ibetac_invb(data[i][0], data[i][2], data[i][6]), boost::math::tools::max_value<value_type>());
}
else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][6]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibetac_inva(data[i][1], data[i][2], data[i][6]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);

2
test/test_igamma_inv.cpp
View File

@@ -222,7 +222,7 @@ void do_test_gamma_2(const T& data, const char* type_name, const char* test_name
//
if(data[i][5] == 0)
BOOST_CHECK_EQUAL(boost::math::gamma_p_inv(data[i][0], data[i][5]), value_type(0));
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::gamma_p_inv(data[i][0], data[i][5]);
BOOST_CHECK_CLOSE(data[i][1], inv, precision);

2
test/test_igamma_inva.cpp
View File

@@ -165,7 +165,7 @@ void do_test_gamma_2(const T& data, const char* type_name, const char* test_name
if(data[i][3] == 0)
BOOST_CHECK_EQUAL(boost::math::gamma_q_inva(data[i][1], data[i][3]), boost::math::tools::min_value<value_type>());
else if((1 - data[i][3] > 0.001) && (fabs(data[i][3]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][3] > 0.001) && (fabs(data[i][3]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][3]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::gamma_q_inva(data[i][1], data[i][3]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);

2
test/test_roots.cpp
View File

@@ -244,7 +244,7 @@ void test_inverses(const T& data)
BOOST_CHECK_EQUAL(inverse_ibeta_newton(data[i][0], data[i][1], data[i][5]), value_type(0));
BOOST_CHECK_EQUAL(inverse_ibeta_bisect(data[i][0], data[i][1], data[i][5]), value_type(0));
}
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = inverse_ibeta_halley(data[i][0], data[i][1], data[i][5]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);