VERB_code_2.3
_zrovector-zcovector.hpp
1 //=============================================================================
3 inline std::complex<double> operator*(const _zrovector& rovec, const zcovector& covec)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] operator*(const _zrovector&, const zcovector&)"
7  << std::endl;
8 #endif//CPPL_VERBOSE
9 
10 #ifdef CPPL_DEBUG
11  if(rovec.L!=covec.L){
12  std::cerr << "[ERROR] operator*(const zrovector&, const zcovector&)"
13  << std::endl
14  << "These two vectors can not make a product." << std::endl
15  << "Your input was (" << rovec.L << ") * (" << covec.L << ")."
16  << std::endl;
17  exit(1);
18  }
19 #endif//CPPL_DEBUG
20 
21  std::complex<double> val( zdotu_( rovec.L, rovec.Array, 1, covec.Array, 1 ) );
22 
23  rovec.destroy();
24  return val;
25 }
void destroy() const
Definition: _zrovector-misc.hpp:3
long L
vector size
Definition: _zrovector.hpp:7
(DO NOT USE) Smart-temporary Complex Double-precision Row Vector Class
Definition: _zrovector.hpp:3
friend _zrovector operator*(const zrovector &, const zgematrix &)
Definition: zrovector-zgematrix.hpp:3
std::complex< double > * Array
1D Array to store vector data
Definition: _zrovector.hpp:8
Complex Double-precision Column Vector Class.
Definition: zcovector.hpp:3