Go to the source code of this file.
dgematrix+_dgbmatrix operator
Definition at line 84 of file dgematrix-_dgbmatrix.hpp.
References _(), _dgbmatrix::destroy(), i(), _dgbmatrix::kl, _dgbmatrix::ku, _dgbmatrix::m, dgematrix::m, dgematrix::n, and _dgbmatrix::n.
87 if(matA.
n!=matB.
n || matA.
m!=matB.
m){
89 std::cerr <<
"These two matrises can not make a summation." << std::endl
90 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") + (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
97 for(CPPL_INT
i=0;
i<matB.
m;
i++){
98 const CPPL_INT jmax =std::min(matB.
n,
i+matB.
ku+1);
99 for(CPPL_INT j=std::max(CPPL_INT(0),
i-matB.
kl); j<jmax; j++){
100 newmat(
i,j) += matB(
i,j);
CPPL_INT m
matrix row size
CPPL_INT ku
upper band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT n
matrix column size
Real Double-precision General Dence Matrix Class.
CPPL_INT kl
lower band width
CPPL_INT n
matrix column size
_dcovector _(dcovector &vec)
CPPL_INT m
matrix row size
dgematrix-_dgbmatrix operator
Definition at line 110 of file dgematrix-_dgbmatrix.hpp.
References _(), _dgbmatrix::destroy(), i(), _dgbmatrix::kl, _dgbmatrix::ku, _dgbmatrix::m, dgematrix::m, dgematrix::n, and _dgbmatrix::n.
111 {CPPL_VERBOSE_REPORT;
113 if(matA.
n!=matB.
n || matA.
m!=matB.
m){
115 std::cerr <<
"These two matrises can not make a summation." << std::endl
116 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") + (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
123 for(CPPL_INT
i=0;
i<matB.
m;
i++){
124 const CPPL_INT jmax =std::min(matB.
n,
i+matB.
ku+1);
125 for(CPPL_INT j=std::max(CPPL_INT(0),
i-matB.
kl); j<jmax; j++){
126 newmat(
i,j) -= matB(
i,j);
CPPL_INT m
matrix row size
CPPL_INT ku
upper band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT n
matrix column size
Real Double-precision General Dence Matrix Class.
CPPL_INT kl
lower band width
CPPL_INT n
matrix column size
_dcovector _(dcovector &vec)
CPPL_INT m
matrix row size
dgematrix*_dgbmatrix operator
Definition at line 136 of file dgematrix-_dgbmatrix.hpp.
References _(), _dgbmatrix::destroy(), i(), _dgbmatrix::kl, _dgbmatrix::ku, _dgbmatrix::m, dgematrix::m, dgematrix::n, _dgbmatrix::n, and dgematrix::zero().
137 {CPPL_VERBOSE_REPORT;
141 std::cerr <<
"These two matrises can not make a product." << std::endl
142 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") * (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
150 for(CPPL_INT
i=0;
i<newmat.
m;
i++){
151 for(CPPL_INT j=0; j<newmat.n; j++){
152 const CPPL_INT kmax =std::min(matB.
m,j+matB.
kl+1);
153 for(CPPL_INT k=std::max(CPPL_INT(0),j-matB.
ku); k<kmax; k++){
154 newmat(
i,j) += matA(
i,k)*matB(k,j);
CPPL_INT m
matrix row size
CPPL_INT ku
upper band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT n
matrix column size
Real Double-precision General Dence Matrix Class.
CPPL_INT kl
lower band width
CPPL_INT n
matrix column size
CPPL_INT m
matrix row size
_dcovector _(dcovector &vec)
CPPL_INT m
matrix row size