CPPScaLapack: _dgematrix-unary.hpp Source File

00001 //=============================================================================
00002 /*! +_dgematrix operator */
00003 inline const _dgematrix& operator+(const _dgematrix& mat)
00004 {
00005   return mat;
00006 }
00007 
00008 //=============================================================================
00009 /*! -_dgematrix operator */
00010 inline _dgematrix operator-(const _dgematrix& mat)
00011 {
00012   for(long i=0; i<mat.Ml*mat.Nl; i++){ mat.Array[i]=-mat.Array[i]; }
00013   
00014   return mat;
00015 }