My Project
zssmatrix-zgbmatrix.hpp
1 //=============================================================================
3 inline _zgematrix operator+(const zssmatrix& matA, const zgbmatrix& matB)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator+(const zssmatrix&, const zgbmatrix&)"
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 zgbmatrix&)"
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  zgematrix newmat(matA);
22 
23  for(long i=0; i<matB.M; i++){
24  for(long j=max(0,i-matB.KL); j<min(matB.N,i+matB.KU+1); j++){
25  newmat(i,j)+=matB(i,j);
26  }
27  }
28 
29  return _(newmat);
30 }
31 
32 //=============================================================================
34 inline _zgematrix operator-(const zssmatrix& matA, const zgbmatrix& matB)
35 {
36 #ifdef CPPL_VERBOSE
37  std::cerr << "# [MARK] operator-(const zssmatrix&, const zgbmatrix&)"
38  << std::endl;
39 #endif//CPPL_VERBOSE
40 
41 #ifdef CPPL_DEBUG
42  if(matA.N!=matB.N || matA.M!=matB.M){
43  std::cerr << "[ERROR] operator+(const zssmatrix&, const zgbmatrix&)"
44  << std::endl
45  << "These two matrises can not make a summation." << std::endl
46  << "Your input was (" << matA.M << "x" << matA.N << ") + ("
47  << matB.M << "x" << matB.N << ")." << std::endl;
48  exit(1);
49  }
50 #endif//CPPL_DEBUG
51 
52  zgematrix newmat(matA);
53 
54  for(long i=0; i<matB.M; i++){
55  for(long j=max(0,i-matB.KL); j<min(matB.N,i+matB.KU+1); j++){
56  newmat(i,j)-=matB(i,j);
57  }
58  }
59 
60  return _(newmat);
61 }
62 
63 //=============================================================================
65 inline _zgematrix operator*(const zssmatrix& matA, const zgbmatrix& matB)
66 {
67 #ifdef CPPL_VERBOSE
68  std::cerr << "# [MARK] operator*(const zssmatrix&, const zgbmatrix&)"
69  << std::endl;
70 #endif//CPPL_VERBOSE
71 
72 #ifdef CPPL_DEBUG
73  if(matA.N!=matB.M){
74  std::cerr << "[ERROR] operator*(const zssmatrix&, const zgbmatrix&)"
75  << std::endl
76  << "These two matrises can not make a product." << std::endl
77  << "Your input was (" << matA.M << "x" << matA.N << ") * ("
78  << matB.M << "x" << matB.N << ")." << std::endl;
79  exit(1);
80  }
81 #endif//CPPL_DEBUG
82 
83  zgematrix newmat( matA.M, matB.N );
84  newmat.zero();
85 
86  for(long c=0; c<matA.VOL; c++){
87  for(long k=max(0,matA.Jndx[c]-matB.KU);
88  k<min(matB.M,matA.Jndx[c]+matB.KL+1); k++){
89  newmat(matA.Indx[c],k) += matA.Array[c]*matB(matA.Jndx[c],k);
90  }
91  }
92 
93  return _(newmat);
94 }
friend _zrovector operator-(const _zrovector &)
Definition: _zrovector-unary.hpp:15
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
(DO NOT USE) Smart-temporary Complex Double-precision General Dence Matrix Class
Definition: _zgematrix.hpp:3
void zero()
Definition: zgematrix-misc.hpp:26
Complex Double-precision General Band Matrix Class.
Definition: zgbmatrix.hpp:3
friend _zrovector operator*(const zrovector &, const zgematrix &)
Definition: zrovector-zgematrix.hpp:3
Complex Double-precision Sparse Matrix Class.
Definition: zssmatrix.hpp:3
friend const _zrovector & operator+(const _zrovector &)
Definition: _zrovector-unary.hpp:3