jiri/LA_library
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
jiri 2006-09-16 13:50:28 +00:00
parent 30b5975c15
commit 932aba0871
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fourindex.h
View File

@ -729,6 +729,7 @@ if(i<1||i>nocc ||j<1||j>nocc|| a<1||a>nvrt||b<1||b>nvrt) laerror("T2ijab_aces fo
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;
if(i==j||a==b) return (T)0;
if(i<j) {minus++; unsigned int t=i; i=j; j=t;} if(i<j) {minus++; unsigned int t=i; i=j; j=t;}
if(a<b) {minus++; unsigned int t=a; a=b; b=t;} if(a<b) {minus++; unsigned int t=a; a=b; b=t;}
T val=(*this).NRMat<T>::operator() ((i-2)*(i-1)/2+j-1, (a-2)*(a-1)/2+b-1); T val=(*this).NRMat<T>::operator() ((i-2)*(i-1)/2+j-1, (a-2)*(a-1)/2+b-1);