LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2025-01-09 12:44:07 +01:00
Code Issues Releases Wiki Activity

N_det-1 in bit_tmp

Browse Source
This commit is contained in:
Anthony Scemama 2014-11-13 10:58:23 +01:00
parent a700718078
commit 19cf9deeb7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Dets/determinants.irp.f
View File

@ -149,7 +149,7 @@ END_PROVIDER
duplicate(i) = .False. duplicate(i) = .False.
enddo enddo
do i=1,N_det do i=1,N_det-1
if (duplicate(i)) then if (duplicate(i)) then
cycle cycle
endif endif