VERB_code_2.3
_zssmatrix-_zssmatrix.hpp
1 //=============================================================================
3 inline _zssmatrix operator+(const _zssmatrix& matA, const _zssmatrix& matB)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator+(const _zssmatrix&, const _zssmatrix&)"
7  << std::endl;
8 #endif//CPPL_VERBOSE
9 
10 #ifdef CPPL_DEBUG
11  if(matA.N!=matB.N || matA.M!=matB.M){
12  std::cerr << "[ERROR] operator+(const _zssmatrix&, const _zssmatrix&)"
13  << std::endl
14  << "These two matrises can not make a summation." << std::endl
15  << "Your input was (" << matA.M << "x" << matA.N << ") + ("
16  << matB.M << "x" << matB.N << ")." << std::endl;
17  exit(1);
18  }
19 #endif//CPPL_DEBUG
20 
21  zssmatrix newmat(matA);
22 
23  for(long c=0; c<matB.VOL; c++){
24  newmat.add(matB.Indx[c], matB.Jndx[c], matB.Array[c]);
25  }
26 
27  matB.destroy();
28  return _(newmat);
29 }
30 
31 //=============================================================================
33 inline _zssmatrix operator-(const _zssmatrix& matA, const _zssmatrix& matB)
34 {
35 #ifdef CPPL_VERBOSE
36  std::cerr << "# [MARK] operator-(const _zssmatrix&, const _zssmatrix&)"
37  << std::endl;
38 #endif//CPPL_VERBOSE
39 
40 #ifdef CPPL_DEBUG
41  if(matA.N!=matB.N || matA.M!=matB.M){
42  std::cerr << "[ERROR] operator-(const _zssmatrix&, const _zssmatrix&)"
43  << std::endl
44  << "These two matrises can not make a subtraction." << std::endl
45  << "Your input was (" << matA.M << "x" << matA.N << ") - ("
46  << matB.M << "x" << matB.N << ")." << std::endl;
47  exit(1);
48  }
49 #endif//CPPL_DEBUG
50 
51  zssmatrix newmat(matA);
52 
53  for(long c=0; c<matB.VOL; c++){
54  newmat.sub(matB.Indx[c], matB.Jndx[c], matB.Array[c]);
55  }
56 
57  matB.destroy();
58  return _(newmat);
59 }
60 
61 //=============================================================================
63 inline _zssmatrix operator*(const _zssmatrix& matA, const _zssmatrix& matB)
64 {
65 #ifdef CPPL_VERBOSE
66  std::cerr << "# [MARK] operator*(const _zssmatrix&, const _zssmatrix&)"
67  << std::endl;
68 #endif//CPPL_VERBOSE
69 
70 #ifdef CPPL_DEBUG
71  if(matA.N!=matB.M){
72  std::cerr << "[ERROR] operator*(const _zssmatrix&, const _zssmatrix&)"
73  << std::endl
74  << "These two matrises can not make a product." << std::endl
75  << "Your input was (" << matA.M << "x" << matA.N << ") * ("
76  << matB.M << "x" << matB.N << ")." << std::endl;
77  exit(1);
78  }
79 #endif//CPPL_DEBUG
80 
81  zssmatrix newmat( matA.M, matB.N, 0 );
82 
83  for(long c=0; c<matA.VOL; c++){
84  for(long d=0; d<matB.VOL; d++){
85  if(matA.Jndx[c]==matB.Indx[d]){
86  newmat.add(matA.Indx[c], matB.Jndx[d], matA.Array[c]*matB.Array[d]);
87  }
88  }
89  }
90 
91  matA.destroy();
92  matB.destroy();
93  return _(newmat);
94 }
friend _zrovector _(zrovector &)
Definition: zrovector-misc.hpp:131
long M
matrix row size
Definition: _zssmatrix.hpp:7
long VOL
the number of non-zero components
Definition: _zssmatrix.hpp:10
(DO NOT USE) Smart-temporary Complex Double-precision Sparse Matrix Class
Definition: _zssmatrix.hpp:3
void add(const long &, const long &, const std::complex< double > &)
Definition: zssmatrix-io.hpp:120
long * Jndx
1D array to store the j-index of non-zero matrix components
Definition: _zssmatrix.hpp:13
void sub(const long &, const long &, const std::complex< double > &)
Definition: zssmatrix-io.hpp:157
std::complex< double > * Array
1D array to store non-zero matrix data
Definition: _zssmatrix.hpp:11
void destroy() const
Definition: _zssmatrix-misc.hpp:3
friend const zrovector & operator+(const zrovector &)
Definition: zrovector-unary.hpp:3
friend _zrovector operator*(const zrovector &, const zgematrix &)
Definition: zrovector-zgematrix.hpp:3
friend _zrovector operator-(const zrovector &)
Definition: zrovector-unary.hpp:15
long N
matrix column size
Definition: _zssmatrix.hpp:8
Complex Double-precision Sparse Matrix Class.
Definition: zssmatrix.hpp:3
long * Indx
1D array to store the i-index of non-zero matrix components
Definition: _zssmatrix.hpp:12