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 35 extern "C++" { 36 class complex<long double> 37 { 38 public: 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; } 50 private: 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 86 inline complex<float>::complex (const complex<long double>& r) 87 : re (r.real ()), im (r.imag ()) 88 { } 89 90 inline complex<double>::complex (const complex<long double>& r) 91 : re (r.real ()), im (r.imag ()) 92 { } 93 } // extern "C++" 94 95 #endif 96