diff options
author | bkoz <bkoz@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-03-16 10:35:16 +0000 |
---|---|---|
committer | bkoz <bkoz@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-03-16 10:35:16 +0000 |
commit | b34f60accb416680ed11789c89296e3c68ed68f1 (patch) | |
tree | decac71c7af454edb119868a1763aff3b7c70e56 /libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc | |
parent | 15ec875c733b473953eae3637f13665dffb0589b (diff) | |
download | gcc-b34f60accb416680ed11789c89296e3c68ed68f1.tar.gz |
2007-03-16 Benjamin Kosnik <bkoz@redhat.com>
* testsuite/lib/dg-options.exp (dg-require-c-std): New.
* testsuite/lib/libstdc++.exp (check_v3_target_c_std): New. Check to
see if _GLIBCXX_USE_C99_MATH is active.
* testsuite/tr1/5_numerical_facilities/special_functions/
08_cyl_bessel_i/check_nan.cc: Use dg-require-c-std.
* testsuite/tr1/5_numerical_facilities/special_functions/
17_hyperg/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
13_ellint_2/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
01_assoc_laguerre/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
02_assoc_legendre/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
22_sph_legendre/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
10_cyl_bessel_k/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
09_cyl_bessel_j/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
21_sph_bessel/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
07_conf_hyperg/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
16_hermite/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
12_ellint_1/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
05_comp_ellint_2/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
18_laguerre/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
14_ellint_3/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
04_comp_ellint_1/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
06_comp_ellint_3/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
19_legendre/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
03_beta/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
11_cyl_neumann/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
15_expint/check_nan.cc: Same.
* testsuite/tr1/5_numerical_facilities/special_functions/
23_sph_neumann/check_nan.cc: Same.
* include/tr1/poly_laguerre.tcc (__poly_laguerre): Don't check if
unsigned int can be a NaN.
2007-03-16 Edward M. Smith-Rowland <3dw4rd@verizon.net>
* docs/html/ext/tr1.html : Marked tr1 math special functions done.
* docs/html/faq/index.html : Ditto.
* include/Makefile.in : Added new special function header files.
* include/Makefile.am : Ditto.
* include/tr1/common.h : Added type promotion routines for three
and four args.
* include/tr1/special_function_util.h: New.
* include/tr1/bessel_function.tcc: New.
* include/tr1/beta_function.tcc: New.
* include/tr1/ell_integral.tcc: New.
* include/tr1/exp_integral.tcc: New.
* include/tr1/gamma.tcc: New.
* include/tr1/hypergeometric.tcc: New.
* include/tr1/legendre_function.tcc: New.
* include/tr1/modified_bessel_func.tcc: New.
* include/tr1/poly_hermite.tcc: New.
* include/tr1/poly_laguerre.tcc: New.
* include/tr1/riemann_zeta.tcc: New.
* include/tr1/cmath : Included tr1 math special functions.
* include/tr1/math.h : Ditto.
* testsuite/tr1/5_numerical_facilities/special_functions/
testcase.h: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
01_assoc_laguerre/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
01_assoc_laguerre/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
01_assoc_laguerre/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
01_assoc_laguerre/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
02_assoc_legendre/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
02_assoc_legendre/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
02_assoc_legendre/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
02_assoc_legendre/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/03_beta/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/03_beta/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/03_beta/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/03_beta/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
04_comp_ellint_1/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
04_comp_ellint_1/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
04_comp_ellint_1/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
04_comp_ellint_1/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
05_comp_ellint_2/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
05_comp_ellint_2/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
05_comp_ellint_2/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
05_comp_ellint_2/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
06_comp_ellint_3/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
06_comp_ellint_3/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
06_comp_ellint_3/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
06_comp_ellint_3/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
07_conf_hyperg/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
07_conf_hyperg/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
07_conf_hyperg/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
07_conf_hyperg/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
08_cyl_bessel_i/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
08_cyl_bessel_i/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
08_cyl_bessel_i/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
08_cyl_bessel_i/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
09_cyl_bessel_j/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
09_cyl_bessel_j/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
09_cyl_bessel_j/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
09_cyl_bessel_j/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
10_cyl_bessel_k/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
10_cyl_bessel_k/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
10_cyl_bessel_k/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
10_cyl_bessel_k/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
11_cyl_neumann/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
11_cyl_neumann/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
11_cyl_neumann/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
11_cyl_neumann/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/12_ellint_1/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/12_ellint_1/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/12_ellint_1/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/12_ellint_1/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/13_ellint_2/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/13_ellint_2/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/13_ellint_2/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/13_ellint_2/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/14_ellint_3/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/14_ellint_3/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/14_ellint_3/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/14_ellint_3/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/15_expint/
check_value_neg.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/15_expint/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/15_expint/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/15_expint/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/15_expint/
check_value_pos.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/16_hermite/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/16_hermite/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/16_hermite/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/18_laguerre/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/18_laguerre/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/18_laguerre/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/18_laguerre/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/19_legendre/
compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/19_legendre/
check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/19_legendre/
check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/19_legendre/
compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/check_value_neg.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
20_riemann_zeta/check_value_pos.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
21_sph_bessel/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
21_sph_bessel/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
21_sph_bessel/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
21_sph_bessel/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
22_sph_legendre/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
22_sph_legendre/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
22_sph_legendre/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
22_sph_legendre/compile_2.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
23_sph_neumann/compile.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
23_sph_neumann/check_nan.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
23_sph_neumann/check_value.cc: New.
* testsuite/tr1/5_numerical_facilities/special_functions/
23_sph_neumann/ compile_2.cc: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@122986 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc')
-rw-r--r-- | libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc | 173 |
1 files changed, 173 insertions, 0 deletions
diff --git a/libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc b/libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc new file mode 100644 index 00000000000..e120e520355 --- /dev/null +++ b/libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/17_hyperg/check_nan.cc @@ -0,0 +1,173 @@ +// { dg-require-c-std "" } + +// 2007-01-10 Edward Smith-Rowland <3dw4rd@verizon.net> +// +// Copyright (C) 2007 Free Software Foundation, Inc. +// +// This file is part of the GNU ISO C++ Library. This library is free +// software; you can redistribute it and/or modify it under the +// terms of the GNU General Public License as published by the +// Free Software Foundation; either version 2, or (at your option) +// any later version. +// +// This library is distributed in the hope that it will be useful, +// but WITHOUT ANY WARRANTY; without even the implied warranty of +// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// GNU General Public License for more details. +// +// You should have received a copy of the GNU General Public License along +// with this library; see the file COPYING. If not, write to the Free +// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, +// USA. + +// 5.2.1.17 hyperg + +#include <tr1/cmath> +#include <testsuite_hooks.h> + +void +test01() +{ + float af = std::numeric_limits<float>::quiet_NaN(); + double ad = std::numeric_limits<double>::quiet_NaN(); + long double al = std::numeric_limits<long double>::quiet_NaN(); + + float bf = 10.0F; + double bd = 10.0; + long double bl = 10.0L; + + float cf = 3.0F; + double cd = 3.0; + long double cl = 3.0L; + + float xf = 0.5F; + double xd = 0.5; + long double xl = 0.5L; + + float a = std::tr1::hyperg(af, bf, cf, xf); + float b = std::tr1::hypergf(af, bf, cf, xf); + double c = std::tr1::hyperg(ad, bd, cd, xd); + long double d = std::tr1::hyperg(al, bl, cl, xl); + long double e = std::tr1::hypergl(al, bl, cl, xl); + + VERIFY(std::tr1::isnan<float>(a)); + VERIFY(std::tr1::isnan<float>(b)); + VERIFY(std::tr1::isnan<double>(c)); + VERIFY(std::tr1::isnan<long double>(d)); + VERIFY(std::tr1::isnan<long double>(e)); + + return; +} + +void +test02() +{ + float af = 2.0F; + double ad = 2.0; + long double al = 2.0L; + + float bf = std::numeric_limits<float>::quiet_NaN(); + double bd = std::numeric_limits<double>::quiet_NaN(); + long double bl = std::numeric_limits<long double>::quiet_NaN(); + + float cf = 3.0F; + double cd = 3.0; + long double cl = 3.0L; + + float xf = 0.5F; + double xd = 0.5; + long double xl = 0.5L; + + float a = std::tr1::hyperg(af, bf, cf, xf); + float b = std::tr1::hypergf(af, bf, cf, xf); + double c = std::tr1::hyperg(ad, bd, cd, xd); + long double d = std::tr1::hyperg(al, bl, cl, xl); + long double e = std::tr1::hypergl(al, bl, cl, xl); + + VERIFY(std::tr1::isnan<float>(a)); + VERIFY(std::tr1::isnan<float>(b)); + VERIFY(std::tr1::isnan<double>(c)); + VERIFY(std::tr1::isnan<long double>(d)); + VERIFY(std::tr1::isnan<long double>(e)); + + return; +} + +void +test03() +{ + float af = 2.0F; + double ad = 2.0; + long double al = 2.0L; + + float bf = 10.0F; + double bd = 10.0; + long double bl = 10.0L; + + float cf = std::numeric_limits<float>::quiet_NaN(); + double cd = std::numeric_limits<double>::quiet_NaN(); + long double cl = std::numeric_limits<long double>::quiet_NaN(); + + float xf = 0.5F; + double xd = 0.5; + long double xl = 0.5L; + + float a = std::tr1::hyperg(af, bf, cf, xf); + float b = std::tr1::hypergf(af, bf, cf, xf); + double c = std::tr1::hyperg(ad, bd, cd, xd); + long double d = std::tr1::hyperg(al, bl, cl, xl); + long double e = std::tr1::hypergl(al, bl, cl, xl); + + VERIFY(std::tr1::isnan<float>(a)); + VERIFY(std::tr1::isnan<float>(b)); + VERIFY(std::tr1::isnan<double>(c)); + VERIFY(std::tr1::isnan<long double>(d)); + VERIFY(std::tr1::isnan<long double>(e)); + + return; +} + +void +test04() +{ + float af = 2.0F; + double ad = 2.0; + long double al = 2.0L; + + float bf = 10.0F; + double bd = 10.0; + long double bl = 10.0L; + + float cf = 3.0F; + double cd = 3.0; + long double cl = 3.0L; + + float xf = std::numeric_limits<float>::quiet_NaN(); + double xd = std::numeric_limits<double>::quiet_NaN(); + long double xl = std::numeric_limits<long double>::quiet_NaN(); + + float a = std::tr1::hyperg(af, bf, cf, xf); + float b = std::tr1::hypergf(af, bf, cf, xf); + double c = std::tr1::hyperg(ad, bd, cd, xd); + long double d = std::tr1::hyperg(al, bl, cl, xl); + long double e = std::tr1::hypergl(al, bl, cl, xl); + + VERIFY(std::tr1::isnan<float>(a)); + VERIFY(std::tr1::isnan<float>(b)); + VERIFY(std::tr1::isnan<double>(c)); + VERIFY(std::tr1::isnan<long double>(d)); + VERIFY(std::tr1::isnan<long double>(e)); + + return; +} + +int +main() +{ + test01(); + test02(); + test03(); + test04(); + return 0; +} + |