In my opinion this instruction is wrong. print_clock_pw should not

modify the output organization. Otherwise after calling this routine
the images cannot write any more in their output files. Please check.


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@6202 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2009-11-23 08:17:39 +00:00
parent f8af43dd70
commit f925d23771
1 changed files with 2 additions and 2 deletions

View File

@ -21,8 +21,8 @@ SUBROUTINE print_clock_pw()
IMPLICIT NONE
!
!
IF ( mpime /= root ) &
OPEN( UNIT = stdout, FILE = '/dev/null', STATUS = 'UNKNOWN' )
! IF ( mpime /= root ) &
! OPEN( UNIT = stdout, FILE = '/dev/null', STATUS = 'UNKNOWN' )
!
WRITE( stdout, * )
!