CPPLapack
 All Classes Files Functions Variables Friends Pages
dsymatrix-double.hpp
Go to the documentation of this file.
1 //=============================================================================
2 /*! dsymatrix*=double operator */
3 inline dsymatrix& dsymatrix::operator*=(const double& d)
4 {CPPL_VERBOSE_REPORT;
5  for(CPPL_INT j=0; j<n; j++){
6  for(CPPL_INT i=j; i<n; i++){
7  darray[j][i] *=d;
8  }
9  }
10 
11  return *this;
12 }
13 
14 //=============================================================================
15 /*! dsymatrix/=double operator */
16 inline dsymatrix& dsymatrix::operator/=(const double& d)
17 {CPPL_VERBOSE_REPORT;
18  for(CPPL_INT j=0; j<n; j++){
19  for(CPPL_INT i=j; i<n; i++){
20  darray[j][i] /=d;
21  }
22  }
23 
24  return *this;
25 }
26 
27 ///////////////////////////////////////////////////////////////////////////////
28 ///////////////////////////////////////////////////////////////////////////////
29 ///////////////////////////////////////////////////////////////////////////////
30 
31 //=============================================================================
32 /*! dsymatrix*double operator */
33 inline _dsymatrix operator*(const dsymatrix& mat, const double& d)
34 {CPPL_VERBOSE_REPORT;
35  dsymatrix newmat(mat.n);
36 
37  for(CPPL_INT j=0; j<mat.n; j++){
38  for(CPPL_INT i=j; i<mat.n; i++){
39  newmat.darray[j][i] =mat.darray[j][i]*d;
40  }
41  }
42 
43  return _(newmat);
44 }
45 
46 //=============================================================================
47 /*! dsymatrix/double operator */
48 inline _dsymatrix operator/(const dsymatrix& mat, const double& d)
49 {CPPL_VERBOSE_REPORT;
50  dsymatrix newmat(mat.n);
51 
52  for(CPPL_INT j=0; j<mat.n; j++){
53  for(CPPL_INT i=j; i<mat.n; i++){
54  newmat.darray[j][i] =mat.darray[j][i]/d;
55  }
56  }
57 
58  return _(newmat);
59 }
_dsymatrix operator/(const dsymatrix &mat, const double &d)
dsymatrix & operator/=(const double &)
_dgematrix i(const _dgbmatrix &mat)
Real Double-precision Symmetric Matrix Class [l-type (UPLO=l) Strage].
Definition: dsymatrix.hpp:3
_dsymatrix operator*(const dsymatrix &mat, const double &d)
friend _dsymatrix i(const dsymatrix &)
CPPL_INT n
matrix column size
Definition: dsymatrix.hpp:10
(DO NOT USE) Smart-temporary Real Double-precision Symmetric Matrix Class
Definition: _dsymatrix.hpp:3
double ** darray
array of pointers of column head addresses
Definition: dsymatrix.hpp:12
dsymatrix & operator*=(const dsymatrix &)
_dcovector _(dcovector &vec)