Bug fix: a problem with the phonon grid.

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@8270 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2011-11-22 10:58:31 +00:00
parent 62796345d9
commit 72e78265ed
1 changed files with 1 additions and 1 deletions

View File

@ -162,7 +162,7 @@ SUBROUTINE check_initial_status(auxdyn)
IF ((start_irr==0).AND.(last_irr==0)) THEN
CALL ph_writefile('init',0)
CALL clean_pw(.FALSE.)
CALL close_files()
CALL close_files(.FALSE.)
CALL mp_global_end()
STOP
ENDIF