VERB_code_2.3
_dgematrix-dssmatrix.hpp
1 //=============================================================================
3 inline _dgematrix operator+(const _dgematrix& matA, const dssmatrix& matB)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator+(const _dgematrix&, const dssmatrix&)"
7  << std::endl;
8 #endif//CPPL_VERBOSE
9 
10 #ifdef CPPL_DEBUG
11  if(matA.M!=matB.M || matA.N!=matB.N){
12  std::cerr << "[ERROR] operator+(const _dgematrix&, 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  for(long c=0; c<matB.VOL; c++){
22  matA(matB.Indx[c],matB.Jndx[c]) += matB.Array[c];
23  }
24 
25  return matA;
26 }
27 
28 //=============================================================================
30 inline _dgematrix operator-(const _dgematrix& matA, const dssmatrix& matB)
31 {
32 #ifdef CPPL_VERBOSE
33  std::cerr << "# [MARK] operator-(const _dgematrix&, const dssmatrix&)"
34  << std::endl;
35 #endif//CPPL_VERBOSE
36 
37 #ifdef CPPL_DEBUG
38  if(matA.M!=matB.M || matA.N!=matB.N){
39  std::cerr << "[ERROR] operator-(const _dgematrix&, const dssmatrix&)"
40  << std::endl
41  << "These two matrises can not make a subtraction." << std::endl
42  << "Your input was (" << matA.M << "x" << matA.N << ") - ("
43  << matB.N << "x" << matB.N << ")." << std::endl;
44  exit(1);
45  }
46 #endif//CPPL_DEBUG
47 
49  for(long i=0; i<matA.M*matA.N; i++){
50  matA.Array[i]=-matA.Array[i];
51  }
52 
54  for(long c=0; c<matB.VOL; c++){
55  matA(matB.Indx[c],matB.Jndx[c]) += matB.Array[c];
56  }
57 
58  return matA;
59 }
60 
61 //=============================================================================
63 inline _dgematrix operator*(const _dgematrix& matA, const dssmatrix& matB)
64 {
65 #ifdef CPPL_VERBOSE
66  std::cerr << "# [MARK] operator*(const _dgematrix&, const dssmatrix&)"
67  << std::endl;
68 #endif//CPPL_VERBOSE
69 
70 #ifdef CPPL_DEBUG
71  if(matA.N!=matB.M){
72  std::cerr << "[ERROR] operator*(const _dgematrix&, const dssmatrix&)"
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.N << "x" << matB.N << ")." << std::endl;
77  exit(1);
78  }
79 #endif//CPPL_DEBUG
80 
81  dgematrix newmat(matA.M, matB.N);
82  newmat.zero();
83 
84  for(long c=0; c<matB.VOL; c++){
85  for(long i=0; i<matA.M; i++){
86  newmat(i,matB.Jndx[c]) += matA(i,matB.Indx[c])*matB.Array[c];
87  }
88  }
89 
90  matA.destroy();
91  return _(newmat);
92 }
void zero()
Definition: dgematrix-misc.hpp:26
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
long N
matrix column size
Definition: _dgematrix.hpp:8
double * Array
1D array to store matrix data
Definition: _dgematrix.hpp:9
friend _drovector operator*(const drovector &, const dgematrix &)
Definition: drovector-dgematrix.hpp:3
void destroy() const
Definition: _dgematrix-misc.hpp:3
Real Double-precision Sparse Matrix Class.
Definition: dssmatrix.hpp:3
friend const _drovector & operator+(const _drovector &)
Definition: _drovector-unary.hpp:3
long M
matrix row size
Definition: _dgematrix.hpp:7