]>
git.ipfire.org Git - thirdparty/gcc.git/blob - libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/23_sph_neumann/check_nan.cc
89f89e5ecafb4c837a069d4f17ca07f9781b4608
1 // { dg-require-c-std "" }
2 // { dg-add-options ieee }
3 // { dg-prune-output ".*warning: tgammal has lower than advertised precision" }
5 // 2007-01-10 Edward Smith-Rowland <3dw4rd@verizon.net>
7 // Copyright (C) 2007-2019 Free Software Foundation, Inc.
9 // This file is part of the GNU ISO C++ Library. This library is free
10 // software; you can redistribute it and/or modify it under the
11 // terms of the GNU General Public License as published by the
12 // Free Software Foundation; either version 3, or (at your option)
15 // This library is distributed in the hope that it will be useful,
16 // but WITHOUT ANY WARRANTY; without even the implied warranty of
17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 // GNU General Public License for more details.
20 // You should have received a copy of the GNU General Public License along
21 // with this library; see the file COPYING3. If not see
22 // <http://www.gnu.org/licenses/>.
24 // 5.2.1.23 sph_neumann
27 #include <testsuite_hooks.h>
32 float xf
= std::numeric_limits
<float>::quiet_NaN();
33 double xd
= std::numeric_limits
<double>::quiet_NaN();
34 long double xl
= std::numeric_limits
<long double>::quiet_NaN();
38 float a
= std::tr1::sph_neumann(n
, xf
);
39 float b
= std::tr1::sph_neumannf(n
, xf
);
40 double c
= std::tr1::sph_neumann(n
, xd
);
41 long double d
= std::tr1::sph_neumann(n
, xl
);
42 long double e
= std::tr1::sph_neumannl(n
, xl
);
44 VERIFY(std::tr1::isnan
<float>(a
));
45 VERIFY(std::tr1::isnan
<float>(b
));
46 VERIFY(std::tr1::isnan
<double>(c
));
47 VERIFY(std::tr1::isnan
<long double>(d
));
48 VERIFY(std::tr1::isnan
<long double>(e
));