Bug eliminated inside inner cycle,

for eDFT

P.U.


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3487 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
umari 2006-10-24 17:42:31 +00:00
parent 0d6d6a9967
commit 257451b93b
1 changed files with 2 additions and 1 deletions

View File

@ -452,6 +452,7 @@
enddo enddo
endif endif
c0hc0(:,:,:)=0.d0
DO is= 1, nspin DO is= 1, nspin
nss= nupdwn( is ) nss= nupdwn( is )