PTEROSOR/QuAcK
10
1
Fork 0
mirror of https://github.com/pfloos/quack synced 2024-12-22 20:34:46 +01:00
Code Releases Activity

fix bug for Ncentered

Browse Source
This commit is contained in:
Pierre-Francois Loos 2021-11-24 14:09:12 +01:00
parent 1f0d426570
commit e3f00248ee
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/eDFT/read_options_dft.f90
View File

@ -382,7 +382,11 @@ subroutine read_options_dft(nBas,method,x_rung,x_DFA,c_rung,c_DFA,SGn,nEns,wEns,
if (doNcentered) then
do iEns=2,nEns
wEns(iEns) = (nEl(1)/nEl(iEns))*wEns(iEns)
if(nEl(iEns) > 0d0) then
wEns(iEns) = (nEl(1)/nEl(iEns))*wEns(iEns)
else
wEns(iENs) = 0d0
end if
end do
end if