comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-29 06:35:28 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix grid spacing for DOS (Jinwoong)

Browse source 
svn-origin-rev: 12734
This commit is contained in:
Joost VandeVondele 2013-02-27 08:47:10 +00:00
parent c63a6cc82e
commit 860e88d4cf
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/dm_ls_chebyshev.F
View file

@ -356,9 +356,8 @@ CONTAINS
ALLOCATE (chev_E(1:n_gridpoint_dos))
ALLOCATE (chev_Es_dos(1:n_gridpoint_dos))
ALLOCATE (dummy2(1:nwindow))
! are these the right bounds, max_ev, min_ev or interval_a,interval_b ?
DO igrid = 1,n_gridpoint_dos
chev_E(igrid) = interval_b-interval_a+(igrid-1)*2*interval_a/(n_gridpoint_dos-1)
chev_E(igrid) = min_ev+(igrid-1)*(max_ev-min_ev)/(n_gridpoint_dos-1)
chev_Es_dos(igrid) = (chev_E(igrid) - interval_b)/interval_a
END DO
DO igrid= 1,n_gridpoint_dos