-! Copyright (c) 2013-2014. The SimGrid Team.
+! Copyright (c) 2013-2019. The SimGrid Team.
! All rights reserved.
! This program is free software; you can redistribute it and/or modify it
rank, '] Energy consumed (Joules): ', e
end do
+ flush(6)
+
call MPI_Finalize(ierr)
if (ierr .ne. MPI_SUCCESS) then
print *, 'MPI_Finalize failed:', ierr