32 #pragma interface "ldcomplex"
36 class complex<long double>
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 ()) { }
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
); }
48 long double real () const { return re
; }
49 long double imag () const { return im
; }
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&);
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__ */
86 inline complex<float>::complex (const complex<long double>& r
)
87 : re (r
.real ()), im (r
.imag ())
90 inline complex<double>::complex (const complex<long double>& r
)
91 : re (r
.real ()), im (r
.imag ())