//  Complex Class implementation
//  ----------------------------

#include "ComplexV3.hpp"


 Complex& Complex::operator*=(COMPLEX rs)   //  Composite multiply
   {double rpx = rp * rs.rp - ip * rs.ip;
    ip         = rp * rs.ip + ip * rs.ip;
    rp = rpx;
    return *this;
   }

 Complex& Complex::operator/=(COMPLEX rs)   //  Composite divide
   {DOUBLE  denom = rp * rp + ip * ip;
    double rpx = (rp * rs.rp + ip * rs.ip) / denom;
    ip         = (rs.rp * ip - rs.ip * rp) / denom;
    rp = rpx;
    return   *this;
   }

 ostream& operator<< (ostream& ls, COMPLEX  rs) //  External representation is 
 {ls << '(' << rs.realPart() << ", "            //    ordered pair in 
     << rs.imagPart() << ')';                   //      parentheses
  return ls;
 }