00001
00003 inline void _zhematrix::destroy() const
00004 {
00005 #ifdef CPPL_VERBOSE
00006 std::cerr << "# [MARK] _zhematrix::destroy() const"
00007 << std::endl;
00008 #endif//CPPL_VERBOSE
00009
00010 #ifdef CPPL_DEBUG
00011 std::cerr << "# [NOTE] _zhematrix::destroy() "
00012 << " An array at " << Array
00013 << " is going to be destroyed." << std::endl;
00014 #endif//CPPL_DEBUG
00015
00016 delete [] Array;
00017 delete [] Darray;
00018 }
00019
00020
00022 inline void _zhematrix::complete() const
00023 {
00024 #ifdef CPPL_VERBOSE
00025 std::cerr << "# [MARK] _zhematrix::complete() const"
00026 << std::endl;
00027 #endif//CPPL_VERBOSE
00028
00029 for(long i=0; i<N; i++){
00030 for(long j=0; j<i; j++){
00031 Darray[i][j] =std::conj(Darray[j][i]);
00032 }
00033
00034 #ifdef CPPL_DEBUG
00035 if(std::fabs(std::imag(operator()(i,i))) > CPPL_EPS){
00036 std::cerr << "[WARNING] _zhematrix::complete() const" << std::endl
00037 << "The " << i << "th diagonal component of the _zhematrix"
00038 << "is not a real number." << std::endl;
00039 }
00040 #endif//CPPL_DEBUG
00041 }
00042 }
00043