git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@8258 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2011-11-18 21:47:19 +00:00
parent 884caf295b
commit d235f5801f
1 changed files with 1 additions and 1 deletions

View File

@ -53,7 +53,7 @@ SUBROUTINE weights()
IF ( nspin == 1 ) wg(:,ik) = wg(:,ik)/2.0_dp
END DO
!
ef = 1.0d10
ef = -1.0d10
DO ik = 1, nkstot
DO ibnd = 1, nbnd
IF ( wg(ibnd,ik) > 0.D0 ) ef = MAX( ef, et(ibnd,ik) )