6 std::cerr <<
"# [MARK] t(const _zgbmatrix&)"
11 for(
long i=0; i<newmat.m; i++){
12 for(
long j=max(0,i-newmat.kl); j<min(newmat.n,i+newmat.ku+1); j++){
13 newmat(i,j) =mat(j,i);
26 std::cerr <<
"# [MARK] i(const _zgbmatrix&)"
32 std::cerr <<
"[ERROR] i(_zgbmatrix&) " << std::endl
33 <<
"This matrix is not square and has no inverse matrix."
35 <<
"Your input was (" << mat.
M <<
"x" << mat.
N <<
")."
47 mat_cp.
zgbsv(mat_inv);
61 std::cerr <<
"# [MARK] conj(const _zgbmatrix&)"
65 for(
long i=0; i<mat.
M; i++){
66 for(
long j=max(0,i-mat.
KL); j<min(mat.
N,i+mat.
KU+1); j++){
67 mat(i,j) =std::conj(mat(i,j));
79 std::cerr <<
"# [MARK] conjt(const _zgbmatrix&)"
84 for(
long i=0; i<newmat.m; i++){
85 for(
long j=max(0,i-newmat.kl); j<min(newmat.n,i+newmat.ku+1); j++){
86 newmat(i,j) =std::conj(mat(j,i));
long N
matrix column size
Definition: _zgbmatrix.hpp:8
void destroy() const
Definition: _zgbmatrix-misc.hpp:3
long zgbsv(zgematrix &)
Definition: zgbmatrix-lapack.hpp:5
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
long KU
upper band width
Definition: _zgbmatrix.hpp:10
friend _zcovector conjt(const _zrovector &)
Definition: _zrovector-calc.hpp:33
(DO NOT USE) Smart-temporary Complex Double-precision General Dence Matrix Class
Definition: _zgematrix.hpp:3
friend _zrovector conj(const _zrovector &)
Definition: _zrovector-calc.hpp:20
Complex Double-precision General Band Matrix Class.
Definition: zgbmatrix.hpp:3
long M
matrix row size
Definition: _zgbmatrix.hpp:7
(DO NOT USE) Smart-temporary Complex Double-precision General Band Matrix Class
Definition: _zgbmatrix.hpp:3
friend _zcovector t(const _zrovector &)
Definition: _zrovector-calc.hpp:3
long KL
lower band width
Definition: _zgbmatrix.hpp:9
void shallow_copy(const _zgbmatrix &)
Definition: zgbmatrix-misc.hpp:107