CPPLapack
 All Classes Files Functions Variables Friends Pages
_zgsmatrix-zhematrix.hpp
Go to the documentation of this file.
1 //=============================================================================
2 /*! _zgsmatrix+zhematrix operator */
3 inline _zgematrix operator+(const _zgsmatrix& matA, const zhematrix& matB)
4 {CPPL_VERBOSE_REPORT;
5 #ifdef CPPL_DEBUG
6  if(matA.m!=matB.n || matA.n!=matB.n){
7  ERROR_REPORT;
8  std::cerr << "These two matrises can not make a summation." << std::endl
9  << "Your input was (" << matA.m << "x" << matA.n << ") + (" << matB.n << "x" << matB.n << ")." << std::endl;
10  exit(1);
11  }
12 #endif//CPPL_DEBUG
13 
14  zgematrix newmat( matB.to_zgematrix() );
15 
16  const std::vector<zcomponent>::const_iterator matA_data_end =matA.data.end();
17  for(std::vector<zcomponent>::const_iterator it=matA.data.begin(); it!=matA_data_end; it++){
18  newmat(it->i,it->j) += it->v;
19  }
20 
21  matA.destroy();
22  return _(newmat);
23 }
24 
25 //=============================================================================
26 /*! _zgsmatrix-zhematrix operator */
27 inline _zgematrix operator-(const _zgsmatrix& matA, const zhematrix& matB)
28 {CPPL_VERBOSE_REPORT;
29 #ifdef CPPL_DEBUG
30  if(matA.m!=matB.n || matA.n!=matB.n){
31  ERROR_REPORT;
32  std::cerr << "These two matrises can not make a subtraction." << std::endl
33  << "Your input was (" << matA.m << "x" << matA.n << ") - (" << matB.n << "x" << matB.n << ")." << std::endl;
34  exit(1);
35  }
36 #endif//CPPL_DEBUG
37 
38  //// shallow copy to zgematrix ////
39  zgematrix newmat( (-matB).to_zgematrix() );
40 
41  //// add ////
42  const std::vector<zcomponent>::const_iterator matA_data_end =matA.data.end();
43  for(std::vector<zcomponent>::const_iterator it=matA.data.begin(); it!=matA_data_end; it++){
44  newmat(it->i,it->j) += it->v;
45  }
46 
47  //// return ////
48  matA.destroy();
49  return _(newmat);
50 }
51 
52 //=============================================================================
53 /*! _zgsmatrix*zhematrix operator */
54 inline _zgematrix operator*(const _zgsmatrix& matA, const zhematrix& matB)
55 {CPPL_VERBOSE_REPORT;
56 #ifdef CPPL_DEBUG
57  if(matA.n!=matB.n){
58  ERROR_REPORT;
59  std::cerr << "These two matrises can not make a product." << std::endl
60  << "Your input was (" << matA.m << "x" << matA.n << ") * (" << matB.n << "x" << matB.n << ")." << std::endl;
61  exit(1);
62  }
63 #endif//CPPL_DEBUG
64 
65  zgematrix newmat(matA.m, matB.n);
66  newmat.zero();
67 
68  const std::vector<zcomponent>::const_iterator matA_data_end =matA.data.end();
69  for(std::vector<zcomponent>::const_iterator it=matA.data.begin(); it!=matA_data_end; it++){
70  for(CPPL_INT i=0; i<matB.n; i++){
71  newmat(it->i,i) += it->v*matB(it->j,i);
72  }
73  }
74 
75  matA.destroy();
76  return _(newmat);
77 }
_dgematrix i(const _dgbmatrix &mat)
_zgematrix operator-(const _zgsmatrix &matA, const zhematrix &matB)
CPPL_INT n
matrix column size
Definition: _zgsmatrix.hpp:10
(DO NOT USE) Smart-temporary Real Double-precision General Sparse Matrix Class
Definition: _zgsmatrix.hpp:3
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
zgematrix & zero()
_zgematrix operator*(const _zgsmatrix &matA, const zhematrix &matB)
_zgematrix to_zgematrix() const
CPPL_INT n
matrix column size
Definition: zhematrix.hpp:11
(DO NOT USE) Smart-temporary Complex Double-precision General Dence Matrix Class
Definition: _zgematrix.hpp:3
_zgematrix operator+(const _zgsmatrix &matA, const zhematrix &matB)
CPPL_INT m
matrix row size
Definition: _zgsmatrix.hpp:9
void destroy() const
Complex Double-precision Hermitian Matrix Class [l-type (UPLO=l) Strage].
Definition: zhematrix.hpp:4
_dcovector _(dcovector &vec)
std::vector< zcomponent > data
matrix data
Definition: _zgsmatrix.hpp:11