Print out info for Lanczos

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@10262 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
ustcscgyer 2013-05-20 13:00:30 +00:00
parent 65616d42e4
commit 8df8f10080
1 changed files with 2 additions and 1 deletions

View File

@ -274,7 +274,8 @@ CONTAINS
!
IF(okvan) WRITE( stdout, '(/5x,"Ultrasoft (Vanderbilt) Pseudopotentials")' )
!
WRITE(stdout,'(/,5X,"Davidson linear response spectrum calculation")')
WRITE(stdout,'(/,5X,"Lanczos linear response spectrum calculation")')
WRITE(stdout,'(5x,"Number of Lanczos iterations = ",i6)') itermax
!
IF (no_hxc) THEN
WRITE(stdout,'(5x,"No Hartree/Exchange/Correlation")')