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  dgematrix newmat(matA);
22  for(long c=0; c<matB.VOL; c++){
23  newmat(matB.Indx[c],matB.Jndx[c]) += matB.Array[c];
24  }
25 
26  return _(newmat);
27 }
28 
29 //=============================================================================
31 inline _dgematrix operator-(const dgematrix& matA, const dssmatrix& matB)
32 {
33 #ifdef CPPL_VERBOSE
34  std::cerr << "# [MARK] operator-(const dgematrix&, const dssmatrix&)"
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 dgematrix&, const dssmatrix&)"
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(matA);
50  for(long c=0; c<matB.VOL; c++){
51  newmat(matB.Indx[c],matB.Jndx[c]) -= matB.Array[c];
52  }
53 
54  return _(newmat);
55 }
56 
57 //=============================================================================
59 inline _dgematrix operator*(const dgematrix& matA, const dssmatrix& matB)
60 {
61 #ifdef CPPL_VERBOSE
62  std::cerr << "# [MARK] operator*(const dgematrix&, const dssmatrix&)"
63  << std::endl;
64 #endif//CPPL_VERBOSE
65 
66 #ifdef CPPL_DEBUG
67  if(matA.N!=matB.M){
68  std::cerr << "[ERROR] operator*(const dgematrix&, const dssmatrix&)"
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<matB.VOL; c++){
81  for(long i=0; i<matA.M; i++){
82  newmat(i,matB.Jndx[c]) += matA(i,matB.Indx[c])*matB.Array[c];
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