VERB_code_2.3
_zgbmatrix-complex.hpp
1 //=============================================================================
3 inline _zgbmatrix operator*(const _zgbmatrix& mat, const std::complex<double>& d)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator*(const _zgbmatrix&, const std::complex<double>&)"
7  << std::endl;
8 #endif//CPPL_VERBOSE
9 
10  zscal_((mat.KL+mat.KU+1)*mat.N, d, mat.Array, 1);
11  return mat;
12 }
13 
14 //=============================================================================
16 inline _zgbmatrix operator/(const _zgbmatrix& mat, const std::complex<double>& d)
17 {
18 #ifdef CPPL_VERBOSE
19  std::cerr << "# [MARK] operator/(const _zgbmatrix&, const std::complex<double>&)"
20  << std::endl;
21 #endif//CPPL_VERBOSE
22 
23  zscal_((mat.KL+mat.KU+1)*mat.N, 1./d, mat.Array, 1);
24  return mat;
25 }
friend _zrovector operator/(const zrovector &, const double &)
Definition: zrovector-double.hpp:48
long N
matrix column size
Definition: _zgbmatrix.hpp:8
std::complex< double > * Array
1D Array to store matrix data
Definition: _zgbmatrix.hpp:11
long KU
upper band width
Definition: _zgbmatrix.hpp:10
friend _zrovector operator*(const zrovector &, const zgematrix &)
Definition: zrovector-zgematrix.hpp:3
(DO NOT USE) Smart-temporary Complex Double-precision General Band Matrix Class
Definition: _zgbmatrix.hpp:3
long KL
lower band width
Definition: _zgbmatrix.hpp:9