From f366f6e708a511722a9a2421dd9bd857d976c5b4 Mon Sep 17 00:00:00 2001 From: ignis Date: Thu, 4 Feb 2021 16:01:25 +0900 Subject: [PATCH] one line log and added total file number --- code/post.f90 | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/code/post.f90 b/code/post.f90 index a88fe2c..607f63f 100644 --- a/code/post.f90 +++ b/code/post.f90 @@ -279,9 +279,11 @@ REAL :: dt,dummyu INTEGER :: ncyc - REAL*4 :: e, t(2), e0 + REAL*4 :: e, t(2) + REAL*4 :: e0, t0(2) + REAL*4 :: e1, t1(2) - e0 = etime(t) + e0 = etime(t0) OPEN(num,FORM='unformatted',STATUS='unknown') @@ -314,13 +316,11 @@ e = etime(t) - WRITE(*,'(i1,a,f8.3,a,i7,a,i5,a,f8.3,a,a,i3,a,i5,a)') & - ipass, & - ' time/NCYC/savenum = ', tnow, ' /', ncyc, ' /', num, & - ' took ', e-e0, " sec ", & - ' || process ', myid, ' processed ', nprogress, ' files' + WRITE(*,'(a,i2,a,i1,a,i4,a,i4,a,i4,a,f8.2,a,f8.2,a,f8.2)') & + "PID", myid, "|PASS", ipass, "|fort.", num, & + "|", nprogress, "/", endnum-startnum+1, & + "|E:", e, "|U:", t(1), "|S:", t(2) - WRITE(*,*) "Elapsed: ", e, ", User: ", t(1), ", System: ", t(2)