Go to the documentation of this file.00001
00002
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
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
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
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 }