00001 //============================================================================= 00003 inline _dssmatrix operator*(const double& d, const dssmatrix& mat) 00004 { 00005 #ifdef CPPL_VERBOSE 00006 std::cerr << "# [MARK] operator*(const double&, const dssmatrix&)" 00007 << std::endl; 00008 #endif//CPPL_VERBOSE 00009 00010 dssmatrix 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 }