CPPLapack
 All Classes Files Functions Variables Friends Pages
Functions
_zhematrix-zgematrix.hpp File Reference

Go to the source code of this file.

Functions

_zgematrix operator+ (const _zhematrix &matA, const zgematrix &matB)
 
_zgematrix operator- (const _zhematrix &matA, const zgematrix &matB)
 
_zgematrix operator* (const _zhematrix &matA, const zgematrix &matB)
 

Function Documentation

_zgematrix operator+ ( const _zhematrix matA,
const zgematrix matB 
)
inline

_zhematrix+zgematrix operator

Definition at line 3 of file _zhematrix-zgematrix.hpp.

References _(), _zhematrix::destroy(), i(), zgematrix::m, zgematrix::n, and _zhematrix::n.

4 {CPPL_VERBOSE_REPORT;
5 #ifdef CPPL_DEBUG
6  if(matA.n!=matB.n || matA.n!=matB.m){
7  ERROR_REPORT;
8  std::cerr << "These two matrises can not make a summation." << std::endl
9  << "Your input was (" << matA.n << "x" << matA.n << ") + (" << matB.m << "x" << matB.n << ")." << std::endl;
10  exit(1);
11  }
12 #endif//CPPL_DEBUG
13 
14  zgematrix newmat(matA.n, matA.n);
15 
16  for(CPPL_INT i=0; i<matA.n; i++){
17  for(CPPL_INT j=0; j<matA.n; j++){
18  newmat(i,j) =matA(i,j)+matB(i,j);
19  }
20  }
21 
22  matA.destroy();
23  return _(newmat);
24 }
CPPL_INT n
matrix column size
Definition: _zhematrix.hpp:11
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT n
matrix column size
Definition: zgematrix.hpp:10
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
void destroy() const
CPPL_INT m
matrix row size
Definition: zgematrix.hpp:9
_dcovector _(dcovector &vec)
_zgematrix operator- ( const _zhematrix matA,
const zgematrix matB 
)
inline

_zhematrix-zgematrix operator

Definition at line 28 of file _zhematrix-zgematrix.hpp.

References _(), _zhematrix::destroy(), i(), zgematrix::m, zgematrix::n, and _zhematrix::n.

29 {CPPL_VERBOSE_REPORT;
30 #ifdef CPPL_DEBUG
31  if(matA.n!=matB.n || matA.n!=matB.m){
32  ERROR_REPORT;
33  std::cerr << "These two matrises can not make a subtraction." << std::endl
34  << "Your input was (" << matA.n << "x" << matA.n << ") - (" << matB.m << "x" << matB.n << ")." << std::endl;
35  exit(1);
36  }
37 #endif//CPPL_DEBUG
38 
39  zgematrix newmat(matA.n, matA.n);
40 
41  for(CPPL_INT i=0; i<matA.n; i++){
42  for(CPPL_INT j=0; j<matA.n; j++){
43  newmat(i,j) =matA(i,j)-matB(i,j);
44  }
45  }
46 
47  matA.destroy();
48  return _(newmat);
49 }
CPPL_INT n
matrix column size
Definition: _zhematrix.hpp:11
_dgematrix i(const _dgbmatrix &mat)
CPPL_INT n
matrix column size
Definition: zgematrix.hpp:10
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
void destroy() const
CPPL_INT m
matrix row size
Definition: zgematrix.hpp:9
_dcovector _(dcovector &vec)
_zgematrix operator* ( const _zhematrix matA,
const zgematrix matB 
)
inline

_zhematrix*zgematrix operator

Definition at line 53 of file _zhematrix-zgematrix.hpp.

References _(), zgematrix::array, _zhematrix::array, _zhematrix::destroy(), zgematrix::m, zgematrix::n, and _zhematrix::n.

54 {CPPL_VERBOSE_REPORT;
55 #ifdef CPPL_DEBUG
56  if(matA.n!=matB.m){
57  ERROR_REPORT;
58  std::cerr << "These two matrises can not make a product." << std::endl
59  << "Your input was (" << matA.n << "x" << matA.n << ") * (" << matB.m << "x" << matB.n << ")." << std::endl;
60  exit(1);
61  }
62 #endif//CPPL_DEBUG
63 
64  zgematrix newmat( matA.n, matB.n );
65  char side ='l';
66  char uplo ='l';
67  comple alpha =comple(1.,0.);
68  comple beta =comple(0.,0.);
69 
70  zhemm_( &side, &uplo, &matA.n, &matB.n, &alpha, matA.array, &matA.n, matB.array, &matB.m, &beta, newmat.array, &newmat.m );
71 
72  matA.destroy();
73  return _(newmat);
74 }
CPPL_INT n
matrix column size
Definition: _zhematrix.hpp:11
CPPL_INT n
matrix column size
Definition: zgematrix.hpp:10
Complex Double-precision General Dence Matrix Class.
Definition: zgematrix.hpp:3
comple * array
1D array to store matrix data
Definition: zgematrix.hpp:11
comple * array
1D array to store matrix data
Definition: _zhematrix.hpp:12
void destroy() const
CPPL_INT m
matrix row size
Definition: zgematrix.hpp:9
_dcovector _(dcovector &vec)