OSDN Git Service

d86c5b40f54f5eda0fda3d7b4cd76b8248d1a04c
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / testsuite / tr1 / 5_numerical_facilities / special_functions / 12_ellint_1 / check_nan.cc
1 // { dg-require-c-std "" }
2
3 // 2007-01-10  Edward Smith-Rowland <3dw4rd@verizon.net>
4 //
5 // Copyright (C) 2007 Free Software Foundation, Inc.
6 //
7 // This file is part of the GNU ISO C++ Library.  This library is free
8 // software; you can redistribute it and/or modify it under the
9 // terms of the GNU General Public License as published by the
10 // Free Software Foundation; either version 2, or (at your option)
11 // any later version.
12 //
13 // This library is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 // GNU General Public License for more details.
17 //
18 // You should have received a copy of the GNU General Public License along
19 // with this library; see the file COPYING.  If not, write to the Free
20 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
21 // USA.
22
23 // 5.2.1.12 ellint_1
24
25 #include <tr1/cmath>
26 #include <testsuite_hooks.h>
27
28 void
29 test01()
30 {
31   float kf = std::numeric_limits<float>::quiet_NaN();
32   double kd = std::numeric_limits<double>::quiet_NaN();
33   long double kl = std::numeric_limits<long double>::quiet_NaN();
34
35   float phif = std::atan2(1.0F, 1.0F);
36   double phid = std::atan2(1.0, 1.0);
37   long double phil = std::atan2(1.0L, 1.0L);
38
39   float a = std::tr1::ellint_1(kf, phif);
40   float b = std::tr1::ellint_1f(kf, phif);
41   double c = std::tr1::ellint_1(kd, phid);
42   long double d = std::tr1::ellint_1(kl, phil);
43   long double e = std::tr1::ellint_1l(kl, phil);
44
45   VERIFY(std::tr1::isnan<float>(a));
46   VERIFY(std::tr1::isnan<float>(b));
47   VERIFY(std::tr1::isnan<double>(c));
48   VERIFY(std::tr1::isnan<long double>(d));
49   VERIFY(std::tr1::isnan<long double>(e));
50
51   return;
52 }
53
54 void
55 test02()
56 {
57   float kf = 0.5F;
58   double kd = 0.5;
59   long double kl = 0.5L;
60
61   float phif = std::numeric_limits<float>::quiet_NaN();
62   double phid = std::numeric_limits<double>::quiet_NaN();
63   long double phil = std::numeric_limits<long double>::quiet_NaN();
64
65   float a = std::tr1::ellint_1(kf, phif);
66   float b = std::tr1::ellint_1f(kf, phif);
67   double c = std::tr1::ellint_1(kd, phid);
68   long double d = std::tr1::ellint_1(kl, phil);
69   long double e = std::tr1::ellint_1l(kl, phil);
70
71   VERIFY(std::tr1::isnan<float>(a));
72   VERIFY(std::tr1::isnan<float>(b));
73   VERIFY(std::tr1::isnan<double>(c));
74   VERIFY(std::tr1::isnan<long double>(d));
75   VERIFY(std::tr1::isnan<long double>(e));
76
77   return;
78 }
79
80 int
81 main()
82 {
83   test01();
84   test02();
85   return 0;
86 }
87