VERB_code_2.3
dssmatrix-dgematrix.hpp
1 //=============================================================================
3 inline _dgematrix operator+(const dssmatrix& matA, const dgematrix& matB)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator+(const dssmatrix&, const dgematrix&)"
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 dssmatrix&, const dgematrix&)"
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  for(long c=0; c<matA.VOL; c++){
23  newmat(matA.Indx[c],matA.Jndx[c]) += matA.Array[c];
24  }
25 
26  return _(newmat);
27 }
28 
29 //=============================================================================
31 inline _dgematrix operator-(const dssmatrix& matA, const dgematrix& matB)
32 {
33 #ifdef CPPL_VERBOSE
34  std::cerr << "# [MARK] operator-(const dssmatrix&, const dgematrix&)"
35  << std::endl;
36 #endif//CPPL_VERBOSE
37 
38 #ifdef CPPL_DEBUG
39  if(matA.M!=matB.M || matA.N!=matB.N){
40  std::cerr << "[ERROR] operator-(const dssmatrix&, const dgematrix&)"
41  << std::endl
42  << "These two matrises can not make a subtraction." << std::endl
43  << "Your input was (" << matA.M << "x" << matA.N << ") - ("
44  << matB.N << "x" << matB.N << ")." << std::endl;
45  exit(1);
46  }
47 #endif//CPPL_DEBUG
48 
49  dgematrix newmat(-matB);
50  for(long c=0; c<matA.VOL; c++){
51  newmat(matA.Indx[c],matA.Jndx[c]) += matA.Array[c];
52  }
53 
54  return _(newmat);
55 }
56 
57 //=============================================================================
59 inline _dgematrix operator*(const dssmatrix& matA, const dgematrix& matB)
60 {
61 #ifdef CPPL_VERBOSE
62  std::cerr << "# [MARK] operator*(const dssmatrix&, const dgematrix&)"
63  << std::endl;
64 #endif//CPPL_VERBOSE
65 
66 #ifdef CPPL_DEBUG
67  if(matA.N!=matB.M){
68  std::cerr << "[ERROR] operator*(const dssmatrix&, const dgematrix&)"
69  << std::endl
70  << "These two matrises can not make a product." << std::endl
71  << "Your input was (" << matA.M << "x" << matA.N << ") * ("
72  << matB.N << "x" << matB.N << ")." << std::endl;
73  exit(1);
74  }
75 #endif//CPPL_DEBUG
76 
77  dgematrix newmat(matA.M, matB.N);
78  newmat.zero();
79 
80  for(long c=0; c<matA.VOL; c++){
81  for(long j=0; j<matB.N; j++){
82  newmat(matA.Indx[c],j) += matA.Array[c]*matB(matA.Jndx[c],j);
83  }
84  }
85 
86  return _(newmat);
87 }
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
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