Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 2 additions & 2 deletions tools/PostProcessing/process_module.f90
Original file line number Diff line number Diff line change
Expand Up @@ -339,8 +339,8 @@ subroutine process_dos
if(six*sigma_DOS < dE_DOS) write(*,fmt='(4x,"Sigma is much less than bin size: this may cause errors")')
end if
! Adjust limits to allow full peak to be seen
E_DOS_min = E_DOS_min - four*sigma_DOS
E_DOS_max = E_DOS_max + four*sigma_DOS
E_DOS_min = E_DOS_min + four*sigma_DOS
E_DOS_max = E_DOS_max - four*sigma_DOS
! Recalculate dE_DOS now that we've broadened it
dE_DOS = (E_DOS_max - E_DOS_min)/real(n_DOS-1,double)
write(*,fmt='(2x,"Dividing DOS into ",i5," bins of width ",f12.6," Ha")') n_DOS, dE_DOS
Expand Down
4 changes: 2 additions & 2 deletions tools/PostProcessing/read_module.f90
Original file line number Diff line number Diff line change
Expand Up @@ -272,7 +272,7 @@ subroutine read_input
! Add flag for window relative to Fermi level
E_DOS_min = fdf_double('Process.min_DOS_E',E_wf_min)
E_DOS_max = fdf_double('Process.max_DOS_E',E_wf_max)
sigma_DOS = fdf_double('Process.sigma_DOS',zero) ! Adjust to minimum of 4*energy spacing
sigma_DOS = fdf_double('Process.sigma_DOS',0.001_double) ! Better than adaptive
n_DOS = fdf_integer('Process.n_DOS',1001)
flag_total_iDOS = fdf_boolean('Process.TotalIntegratedDOS',.false.)
if(i_job==7) then
Expand Down Expand Up @@ -478,7 +478,7 @@ subroutine read_eigenvalues
write(*,fmt='(4x,"Fermi level: ",f12.5," Ha (=",f10.3," eV)")') efermi(1), efermi(1)*HaToeV
else
read(17,fmt='(a6,2f18.10)') str,efermi(1), efermi(2)
write(*,fmt='(4x,"Fermi levels: ",2f12.5," Ha (=",2f10.3" eV)")') efermi, efermi*HaToeV
write(*,fmt='(4x,"Fermi levels: ",2f12.5," Ha (=",2f10.3," eV)")') efermi, efermi*HaToeV
end if
read(17,*) str
! Allocate memory
Expand Down