46   __doapl (complex<_FLT>* ths, const complex<_FLT>& r);
48   __doami (complex<_FLT>* ths, const complex<_FLT>& r);
50   __doaml (complex<_FLT>* ths, const complex<_FLT>& r);
52   __doadv (complex<_FLT>* ths, const complex<_FLT>& r);
81 __doapl (complex<_FLT>* ths, const complex<_FLT>& r)  in __doapl()  argument
83   ths->re += r.re;  in __doapl()
84   ths->im += r.im;  in __doapl()
85   return *ths;  in __doapl()
96 __doami (complex<_FLT>* ths, const complex<_FLT>& r)  in __doami()  argument
98   ths->re -= r.re;  in __doami()
99   ths->im -= r.im;  in __doami()
100   return *ths;  in __doami()
111 __doaml (complex<_FLT>* ths, const complex<_FLT>& r)  in __doaml()  argument
113   _FLT f = ths->re * r.re - ths->im * r.im;  in __doaml()
114   ths->im = ths->re * r.im + ths->im * r.re;  in __doaml()
115   ths->re = f;  in __doaml()
116   return *ths;  in __doaml()