00001 //============================================================================= 00003 inline _zssmatrix operator*(const double& d, const zssmatrix& mat) 00004 { 00005 #ifdef CPPL_VERBOSE 00006 std::cerr << "# [MARK] operator*(const double&, const zssmatrix&)" 00007 << std::endl; 00008 #endif//CPPL_VERBOSE 00009 00010 zssmatrix newmat(mat.M, mat.N, mat.CAP); 00011 for(long c=0; c<mat.VOL; c++){ 00012 newmat.fput(mat.Indx[c], mat.Jndx[c], d*mat.Array[c]); 00013 } 00014 return _(newmat); 00015 }