libstdc++-v3/testsuite/special_functions/21_sph_neumann/check_nan.cc

   1 // { dg-do run { target c++11 } }
   2 // { dg-require-c-std "" }
   3 // { dg-options "-D__STDCPP_WANT_MATH_SPEC_FUNCS__" }
   4 // { dg-add-options ieee }
   5 // { dg-prune-output ".*warning: tgammal has lower than advertised precision" }
   6
   7 // Copyright (C) 2016-2024 Free Software Foundation, Inc.
   8 //
   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)
  13 // any later version.
  14 //
  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.
  19 //
  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/>.
  23
  24 // 8.1.21 sph_neumann
  25
  26 #include <cmath>
  27 #include <testsuite_hooks.h>
  28
  29 void
  30 test01()
  31 {
  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();
  35
  36   unsigned int n = 0;
  37
  38   float a = std::sph_neumann(n, xf);
  39   float b = std::sph_neumannf(n, xf);
  40   double c = std::sph_neumann(n, xd);
  41   long double d = std::sph_neumann(n, xl);
  42   long double e = std::sph_neumannl(n, xl);
  43
  44   VERIFY(std::isnan(a));
  45   VERIFY(std::isnan(b));
  46   VERIFY(std::isnan(c));
  47   VERIFY(std::isnan(d));
  48   VERIFY(std::isnan(e));
  49
  50   return;
  51 }
  52
  53 int
  54 main()
  55 {
  56   test01();
  57   return 0;
  58 }
  59