home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 May / PCWorld_2001-05_cd.bin / Software / Vyzkuste / devc / _SETUP.6 / Group12 / ldcomplex.h < prev    next >
C/C++ Source or Header  |  2000-01-21  |  4KB  |  96 lines
  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.