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