Fixed an error in the restart format.

C.S.


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@1080 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
sbraccia 2004-07-19 09:03:45 +00:00
parent baf961746b
commit 28346d68ee
1 changed files with 1 additions and 1 deletions

View File

@ -297,7 +297,7 @@ PROGRAM images_interpolator
OPEN( UNIT = iunrestart, FILE = new_restart_file, STATUS = "UNKNOWN", & OPEN( UNIT = iunrestart, FILE = new_restart_file, STATUS = "UNKNOWN", &
ACTION = "WRITE" ) ACTION = "WRITE" )
! !
WRITE( UNIT = iunrestart, FMT = '("RESTART INFORMATIONS")' ) WRITE( UNIT = iunrestart, FMT = '("RESTART INFORMATION")' )
! !
! ... by default istep and nstep are set to zero ! ... by default istep and nstep are set to zero
! !