X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/b54b0de1100a656106aa33ebb0afa5f1ead365d4..af7dada59a9795dc0e28564464aac8f910d87d1b:/examples/smpi/energy/f77/sef.f diff --git a/examples/smpi/energy/f77/sef.f b/examples/smpi/energy/f77/sef.f index a1588bef20..425c879a1c 100644 --- a/examples/smpi/energy/f77/sef.f +++ b/examples/smpi/energy/f77/sef.f @@ -14,7 +14,7 @@ t = MPI_Wtime() print *, '[', t, '] [rank ', rank, ']', - & pstates, 'pstates available' + & pstates, ' pstates available' do i = 0, pstates - 1 p = smpi_get_host_power_peak_at(i) @@ -34,7 +34,7 @@ t = MPI_Wtime() e = smpi_get_host_consumed_energy() print *, '[', t, '] [rank ', rank, ']', - & 'Energy consumed (Joules): ', e + & ' Energy consumed (Joules): ', e end do call MPI_Finalize(ierr)