My Project
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  return _(newmat);
27 }
28 
29 //=============================================================================
31 inline _dgematrix operator-(const dssmatrix& matA, const dsymatrix& matB)
32 {
33 #ifdef CPPL_VERBOSE
34  std::cerr << "# [MARK] operator-(const dssmatrix&, const dsymatrix&)"
35  << std::endl;
36 #endif//CPPL_VERBOSE
37 
38 #ifdef CPPL_DEBUG
39  if(matA.M!=matB.N || matA.N!=matB.N){
40  std::cerr << "[ERROR] operator-(const dssmatrix&, const dsymatrix&)"
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 
50  dgematrix newmat(-matB);
51 
53  for(long c=0; c<matA.VOL; c++){
54  newmat(matA.Indx[c],matA.Jndx[c]) += matA.Array[c];
55  }
56 
57  return _(newmat);
58 }
59 
60 //=============================================================================
62 inline _dgematrix operator*(const dssmatrix& matA, const dsymatrix& matB)
63 {
64 #ifdef CPPL_VERBOSE
65  std::cerr << "# [MARK] operator*(const dssmatrix&, const dsymatrix&)"
66  << std::endl;
67 #endif//CPPL_VERBOSE
68 
69 #ifdef CPPL_DEBUG
70  if(matA.N!=matB.N){
71  std::cerr << "[ERROR] operator*(const dssmatrix&, const dsymatrix&)"
72  << std::endl
73  << "These two matrises can not make a product." << std::endl
74  << "Your input was (" << matA.M << "x" << matA.N << ") * ("
75  << matB.N << "x" << matB.N << ")." << std::endl;
76  exit(1);
77  }
78 #endif//CPPL_DEBUG
79 
80  dgematrix newmat(matA.M, matB.N);
81  newmat.zero();
82 
83  for(long c=0; c<matA.VOL; c++){
84  for(long i=0; i<matB.N; i++){
85  newmat(matA.Indx[c],i) += matA.Array[c]*matB(matA.Jndx[c],i);
86  }
87  }
88 
89  return _(newmat);
90 }
void zero()
Definition: dgematrix-misc.hpp:26
Real Double-precision General Dence Matrix Class.
Definition: dgematrix.hpp:3
Real Double-precision Symmetric Matrix Class [L-type (UPLO=L) Strage].
Definition: dsymatrix.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