mirror of https://gitlab.com/QEF/q-e.git
No reason not to execute mp_startup also if parallelism is absent,
but one good reason to: mp_startup reads command-line options, including input file git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9917 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
a779bd27c7
commit
54b3403155
|
@ -34,11 +34,8 @@ PROGRAM pwscf
|
|||
!
|
||||
CHARACTER(len=256) :: dirname
|
||||
!
|
||||
#ifdef __MPI
|
||||
!
|
||||
CALL mp_startup ( )
|
||||
!
|
||||
#endif
|
||||
CALL environment_start ( 'PWSCF' )
|
||||
!
|
||||
IF ( ionode ) WRITE( unit = stdout, FMT = 9010 ) &
|
||||
|
|
Loading…
Reference in New Issue