My Project
dgbmatrix-dssmatrix.hpp
1 //=============================================================================
3 inline _dgematrix operator+(const dgbmatrix& matA, const dssmatrix& matB)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator+(const dgbmatrix&, const dssmatrix&)"
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 dgbmatrix&, const dssmatrix&)"
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  dgematrix newmat(matB);
22 
23  for(long i=0; i<matA.M; i++){
24  for(long j=max(0,i-matA.KL); j<min(matA.N,i+matA.KU+1); j++){
25  newmat(i,j)+=matA(i,j);
26  }
27  }
28 
29  return _(newmat);
30 }
31 
32 //=============================================================================
34 inline _dgematrix operator-(const dgbmatrix& matA, const dssmatrix& matB)
35 {
36 #ifdef CPPL_VERBOSE
37  std::cerr << "# [MARK] operator-(const dgbmatrix&, const dssmatrix&)"
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 dgbmatrix&, const dssmatrix&)"
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  dgematrix newmat(-matB);
53 
54  for(long i=0; i<matA.M; i++){
55  for(long j=max(0,i-matA.KL); j<min(matA.N,i+matA.KU+1); j++){
56  newmat(i,j)-=matA(i,j);
57  }
58  }
59 
60  return _(newmat);
61 }
62 
63 //=============================================================================
65 inline _dgematrix operator*(const dgbmatrix& matA, const dssmatrix& matB)
66 {
67 #ifdef CPPL_VERBOSE
68  std::cerr << "# [MARK] operator*(const dgbmatrix&, const dssmatrix&)"
69  << std::endl;
70 #endif//CPPL_VERBOSE
71 
72 #ifdef CPPL_DEBUG
73  if(matA.N!=matB.M){
74  std::cerr << "[ERROR] operator*(const dgbmatrix&, const dssmatrix&)"
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  dgematrix newmat( matA.M, matB.N );
84  newmat.zero();
85 
86  for(long c=0; c<matB.VOL; c++){
87  for(long i=max(0,matB.Indx[c]-(matA.KU+1));
88  i<min(matA.M,matB.Indx[c]+matA.KL); i++){
89  newmat(i,matB.Jndx[c]) += matA(i,matB.Indx[c])*matB.Array[c];
90  }
91  }
92 
93  return _(newmat);
94 }
Real Double-precision General Dence Matrix Class.
Definition: dgematrix.hpp:3
friend _drovector operator-(const _drovector &)
Definition: _drovector-unary.hpp:15
(DO NOT USE) Smart-temporary Real Double-precision General Dence Matrix Class
Definition: _dgematrix.hpp:3
Real Double-precision General Band Matrix Class.
Definition: dgbmatrix.hpp:3
friend _drovector operator*(const drovector &, const dgematrix &)
Definition: drovector-dgematrix.hpp:3
Real Double-precision Sparse Matrix Class.
Definition: dssmatrix.hpp:3
friend const _drovector & operator+(const _drovector &)
Definition: _drovector-unary.hpp:3