From 629c88cc4f94a8dbdb03c996a5f68a6fe9ea5b84 Mon Sep 17 00:00:00 2001 From: giannozz Date: Fri, 18 Dec 2009 12:38:02 +0000 Subject: [PATCH] call to environment_end displaced after cpu time report so that it makes the final printout git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@6255 c92efa57-630b-4861-b058-cf58834340f0 --- PW/stop_run.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/PW/stop_run.f90 b/PW/stop_run.f90 index 7097a835f..8b59949a9 100644 --- a/PW/stop_run.f90 +++ b/PW/stop_run.f90 @@ -36,8 +36,6 @@ SUBROUTINE stop_run( flag ) LOGICAL :: exst, opnd ! ! - CALL environment_end( 'PWSCF' ) - ! #if defined (EXX) IF ( lpath .or. nimage > 1 ) THEN #else @@ -111,6 +109,8 @@ SUBROUTINE stop_run( flag ) ! CALL print_clock_pw() ! + CALL environment_end( 'PWSCF' ) + ! CALL mp_barrier() ! CALL mp_end()