libstdc++-v3/testsuite/26_numerics/complex/complex_value.cc

   1 // { dg-options "-O0" }
   2 // 2000-11-20
   3 // Benjamin Kosnik bkoz@redhat.com
   4
   5 // Copyright (C) 2000, 2003, 2004 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
  26 void test01()
  27 {
  28  using namespace std;
  29  bool test __attribute__((unused)) = 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
  61 int main()
  62 {
  63   test01();
  64   return 0;
  65 }