OSDN Git Service

* testsuite/lib/libstdc++.exp: Load target-supports-dg.exp.
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / testsuite / 26_numerics / complex / complex_value.cc
1 // { dg-do run { xfail { powerpc*-*-linux* && broken_cplxf_arg } } }
2 // { dg-options "-O0" }
3 // 2000-11-20
4 // Benjamin Kosnik bkoz@redhat.com
5
6 // Copyright (C) 2000, 2003, 2004 Free Software Foundation, Inc.
7 //
8 // This file is part of the GNU ISO C++ Library.  This library is free
9 // software; you can redistribute it and/or modify it under the
10 // terms of the GNU General Public License as published by the
11 // Free Software Foundation; either version 2, or (at your option)
12 // any later version.
13
14 // This library is distributed in the hope that it will be useful,
15 // but WITHOUT ANY WARRANTY; without even the implied warranty of
16 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 // GNU General Public License for more details.
18
19 // You should have received a copy of the GNU General Public License along
20 // with this library; see the file COPYING.  If not, write to the Free
21 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
22 // USA.
23
24 #include <complex>
25 #include <testsuite_hooks.h>
26
27 void test01()
28 {
29  using namespace std;
30  bool test __attribute__((unused)) = true;
31  typedef complex<double> complex_type;
32  const double cd1 = -11.451;
33  const double cd2 = -442.1533;
34
35  complex_type a(cd1, cd2);
36  double d;
37  d = a.real();
38  VERIFY( d == cd1);
39
40  d = a.imag();
41  VERIFY(d == cd2);
42
43  complex_type c(cd1, cd2);
44  double d6 = abs(c);
45  VERIFY( d6 >= 0);
46
47  double d7 = arg(c);
48  double d8 = atan2(c.imag(), c.real());
49  VERIFY( d7 == d8);
50
51  double d9 = norm(c);
52  double d10 = d6 * d6;
53  VERIFY(d9 - d10 == 0);
54
55  complex_type e = conj(c);
56  
57  complex_type f = polar(c.imag(), 0.0);
58  VERIFY(f.real() != 0);
59 }
60
61
62 int main()
63 {
64   test01();
65   return 0;
66 }