Go to the source code of this file.
_zgbmatrix+zhematrix operator
Definition at line 3 of file _zgbmatrix-zssmatrix.hpp.
References _(), _zgbmatrix::destroy(), i(), _zgbmatrix::kl, _zgbmatrix::ku, _zgbmatrix::m, zhematrix::m, _zgbmatrix::n, and zhematrix::n.
6 if(matA.
n!=matB.
n || matA.
m!=matB.
m){
8 std::cerr <<
"These two matrises can not make a summation." << std::endl
9 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") + (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
16 for(CPPL_INT
i=0;
i<matA.
m;
i++){
17 for(CPPL_INT j=max(0,
i-matA.
kl); j<min(matA.
n,
i+matA.
ku+1); j++){
18 newmat(
i,j)+=matA(
i,j);
CPPL_INT ku
upper band width
CPPL_INT kl
lower band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT const & m
matrix row size
Complex Double-precision General Dence Matrix Class.
CPPL_INT n
matrix column size
CPPL_INT m
matrix row size
CPPL_INT n
matrix column size
_dcovector _(dcovector &vec)
_zgbmatrix-zhematrix operator
Definition at line 28 of file _zgbmatrix-zssmatrix.hpp.
References _(), _zgbmatrix::destroy(), i(), _zgbmatrix::kl, _zgbmatrix::ku, _zgbmatrix::m, zhematrix::m, _zgbmatrix::n, and zhematrix::n.
31 if(matA.
n!=matB.
n || matA.
m!=matB.
m){
33 std::cerr <<
"These two matrises can not make a summation." << std::endl
34 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") + (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
41 for(CPPL_INT
i=0;
i<matA.
m;
i++){
42 for(CPPL_INT j=max(0,
i-matA.
kl); j<min(matA.
n,
i+matA.
ku+1); j++){
43 newmat(
i,j)-=matA(
i,j);
CPPL_INT ku
upper band width
CPPL_INT kl
lower band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT const & m
matrix row size
Complex Double-precision General Dence Matrix Class.
CPPL_INT n
matrix column size
CPPL_INT m
matrix row size
CPPL_INT n
matrix column size
_dcovector _(dcovector &vec)
_zgbmatrix*zhematrix operator
Definition at line 53 of file _zgbmatrix-zssmatrix.hpp.
References _(), zhematrix::array, _zgbmatrix::destroy(), i(), _zgbmatrix::kl, _zgbmatrix::ku, _zgbmatrix::m, zhematrix::m, _zgbmatrix::n, zhematrix::n, and zgematrix::zero().
58 std::cerr <<
"These two matrises can not make a product." << std::endl
59 <<
"Your input was (" << matA.
m <<
"x" << matA.
n <<
") * (" << matB.
m <<
"x" << matB.
n <<
")." << std::endl;
67 for(CPPL_INT c=0; c<matB.vol; c++){
68 for(CPPL_INT
i=max(0,matB.indx[c]-(matA.
ku+1));
69 i<min(matA.
m,matB.indx[c]+matA.
kl);
i++){
70 newmat(
i,matB.jndx[c]) += matA(
i,matB.indx[c])*matB.
array[c];
CPPL_INT ku
upper band width
CPPL_INT kl
lower band width
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT const & m
matrix row size
Complex Double-precision General Dence Matrix Class.
CPPL_INT n
matrix column size
comple * array
1D array to store matrix data
CPPL_INT m
matrix row size
CPPL_INT n
matrix column size
_dcovector _(dcovector &vec)