*** empty log message ***

This commit is contained in:
jiri 2006-09-11 15:56:49 +00:00
parent 9ad44fc092
commit 2da6322ed1

View File

@ -693,7 +693,7 @@ public:
inline T& operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b) inline T& operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b)
{ {
#ifdef DEBUG #ifdef DEBUG
if(i<1||i>noca ||j<1||j>nocb|| a<1||a>nvra||b<1||b>nvrb) laerror("T2IjAb_aces fourindex out of range") if(i<1||i>noca ||j<1||j>nocb|| a<1||a>nvra||b<1||b>nvrb) laerror("T2IjAb_aces fourindex out of range");
if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense"); if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense");
#endif #endif
return (*this).NRMat<T>::operator() ((j-1)*noca+i-1,(b-1)*nvra+a-1); return (*this).NRMat<T>::operator() ((j-1)*noca+i-1,(b-1)*nvra+a-1);
@ -701,7 +701,7 @@ return (*this).NRMat<T>::operator() ((j-1)*noca+i-1,(b-1)*nvra+a-1);
inline const T& operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b) const inline const T& operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b) const
{ {
#ifdef DEBUG #ifdef DEBUG
if(i<1||i>noca ||j<1||j>nocb|| a<1||a>nvra||b<1||b>nvrb) laerror("T2IjAb_aces fourindex out of range") if(i<1||i>noca ||j<1||j>nocb|| a<1||a>nvra||b<1||b>nvrb) laerror("T2IjAb_aces fourindex out of range");
if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense"); if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense");
#endif #endif
return (*this).NRMat<T>::operator() ((j-1)*noca+i-1,(b-1)*nvra+a-1); return (*this).NRMat<T>::operator() ((j-1)*noca+i-1,(b-1)*nvra+a-1);
@ -722,7 +722,7 @@ public:
inline T operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b) const inline T operator() (unsigned int i, unsigned int j, unsigned int a, unsigned int b) const
{ {
#ifdef DEBUG #ifdef DEBUG
if(i<1||i>nocc ||j<1||j>nocc|| a<1||a>nvrt||b<1||b>nvrt) laerror("T2ijab_aces fourindex out of range") if(i<1||i>nocc ||j<1||j>nocc|| a<1||a>nvrt||b<1||b>nvrt) laerror("T2ijab_aces fourindex out of range");
if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense"); if (!NRMat<T>::v) laerror("access to unallocated fourindex_dense");
#endif #endif
int minus=0; int minus=0;