CPPLapack
 All Classes Files Functions Variables Friends
zgematrix-complex.hpp
Go to the documentation of this file.
00001 //=============================================================================
00002 /*! zgematrix*=comple operator */
00003 inline zgematrix& zgematrix::operator*=(const comple& d)
00004 {VERBOSE_REPORT;
00005   zscal_(m*n, d, array, 1);
00006   return *this;
00007 }
00008 
00009 //=============================================================================
00010 /*! zgematrix/=comple operator */
00011 inline zgematrix& zgematrix::operator/=(const comple& d)
00012 {VERBOSE_REPORT;
00013   zscal_(m*n, 1./d, array, 1);
00014   return *this;
00015 }
00016 
00017 ///////////////////////////////////////////////////////////////////////////////
00018 ///////////////////////////////////////////////////////////////////////////////
00019 ///////////////////////////////////////////////////////////////////////////////
00020 
00021 //=============================================================================
00022 /*! zgematrix*comple operator */
00023 inline _zgematrix operator*(const zgematrix& mat, const comple& d)
00024 {VERBOSE_REPORT;
00025   zgematrix newmat(mat.m, mat.n);
00026   for(long i=0; i<mat.m*mat.n; i++){ newmat.array[i] =mat.array[i]*d; }
00027   
00028   return _(newmat);
00029 }
00030 
00031 //=============================================================================
00032 /*! zgematrix/comple operator */
00033 inline _zgematrix operator/(const zgematrix& mat, const comple& d)
00034 {VERBOSE_REPORT;
00035   zgematrix newmat(mat.m, mat.n);
00036   for(long i=0; i<mat.m*mat.n; i++){ newmat.array[i] =mat.array[i]/d; }
00037   
00038   return _(newmat);
00039 }
 All Classes Files Functions Variables Friends