1// The -*- C++ -*- long_double_complex class.
2// Copyright (C) 1994 Free Software Foundation
3
4// This file is part of the GNU ANSI C++ Library.  This library is free
5// software; you can redistribute it and/or modify it under the
6// terms of the GNU General Public License as published by the
7// Free Software Foundation; either version 2, or (at your option)
8// any later version.
9
10// This library is distributed in the hope that it will be useful,
11// but WITHOUT ANY WARRANTY; without even the implied warranty of
12// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13// GNU General Public License for more details.
14
15// You should have received a copy of the GNU General Public License
16// along with this library; see the file COPYING.  If not, write to the Free
17// Software Foundation, 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19// As a special exception, if you link this library with files
20// compiled with a GNU compiler to produce an executable, this does not cause
21// the resulting executable to be covered by the GNU General Public License.
22// This exception does not however invalidate any other reasons why
23// the executable file might be covered by the GNU General Public License.
24
25// Written by Jason Merrill based upon the specification in the 27 May 1994
26// C++ working paper, ANSI document X3J16/94-0098.
27
28#ifndef __LDCOMPLEX__
29#define __LDCOMPLEX__
30
31#ifdef __GNUG__
32#pragma interface "ldcomplex"
33#endif
34
35extern "C++" {
36class complex<long double>
37{
38public:
39  complex (long double r = 0, long double i = 0): re (r), im (i) { }
40  complex (const complex<float>& r): re (r.real ()), im (r.imag ()) { }
41  complex (const complex<double>& r): re (r.real ()), im (r.imag ()) { }
42
43  complex& operator+= (const complex& r) { return __doapl (this, r); }
44  complex& operator-= (const complex& r) { return __doami (this, r); }
45  complex& operator*= (const complex& r) { return __doaml (this, r); }
46  complex& operator/= (const complex& r) { return __doadv (this, r); }
47
48  long double real () const { return re; }
49  long double imag () const { return im; }
50private:
51  long double re, im;
52
53  friend complex& __doapl<> (complex *, const complex&);
54  friend complex& __doami<> (complex *, const complex&);
55  friend complex& __doaml<> (complex *, const complex&);
56  friend complex& __doadv<> (complex *, const complex&);
57
58#ifndef __STRICT_ANSI__
59  friend inline complex operator + (const complex& x, long double y)
60    { return operator+<> (x, y); }
61  friend inline complex operator + (long double x, const complex& y)
62    { return operator+<> (x, y); }
63  friend inline complex operator - (const complex& x, long double y)
64    { return operator-<> (x, y); }
65  friend inline complex operator - (long double x, const complex& y)
66    { return operator-<> (x, y); }
67  friend inline complex operator * (const complex& x, long double y)
68    { return operator*<> (x, y); }
69  friend inline complex operator * (long double x, const complex& y)
70    { return operator*<> (x, y); }
71  friend inline complex operator / (const complex& x, long double y)
72    { return operator/<> (x, y); }
73  friend inline complex operator / (long double x, const complex& y)
74    { return operator/<> (x, y); }
75  friend inline bool operator == (const complex& x, long double y)
76    { return operator==<> (x, y); }
77  friend inline bool operator == (long double x, const complex& y)
78    { return operator==<> (x, y); }
79  friend inline bool operator != (const complex& x, long double y)
80    { return operator!=<> (x, y); }
81  friend inline bool operator != (long double x, const complex& y)
82    { return operator!=<> (x, y); }
83#endif /* __STRICT_ANSI__ */
84};
85
86inline complex<float>::complex (const complex<long double>& r)
87: re (r.real ()), im (r.imag ())
88{ }
89
90inline complex<double>::complex (const complex<long double>& r)
91: re (r.real ()), im (r.imag ())
92{ }
93} // extern "C++"
94
95#endif
96