1 // { dg-options "-O0" }
2 // 2000-11-20
3 // Benjamin Kosnik bkoz@redhat.com
4
5 // Copyright (C) 2000, 2003 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 #include <complex>
24 #include <testsuite_hooks.h>
25
test01()26 void test01()
27 {
28 using namespace std;
29 bool test = true;
30 typedef complex<double> complex_type;
31 const double cd1 = -11.451;
32 const double cd2 = -442.1533;
33
34 complex_type a(cd1, cd2);
35 double d;
36 d = a.real();
37 VERIFY( d == cd1);
38
39 d = a.imag();
40 VERIFY(d == cd2);
41
42 complex_type c(cd1, cd2);
43 double d6 = abs(c);
44 VERIFY( d6 >= 0);
45
46 double d7 = arg(c);
47 double d8 = atan2(c.imag(), c.real());
48 VERIFY( d7 == d8);
49
50 double d9 = norm(c);
51 double d10 = d6 * d6;
52 VERIFY(d9 - d10 == 0);
53
54 complex_type e = conj(c);
55
56 complex_type f = polar(c.imag(), 0.0);
57 VERIFY(f.real() != 0);
58 }
59
60
main()61 int main()
62 {
63 test01();
64 return 0;
65 }
66