OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [libstdc++-v3/] [testsuite/] [26_numerics/] [complex/] [complex_value.cc] - Blame information for rev 19

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 19 jlechner
// { dg-do run { xfail 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, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
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
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.