From e7efb54c45becaa8c5ddb2dd4235762f12794a4f Mon Sep 17 00:00:00 2001 From: David A Minton Date: Tue, 19 Oct 2021 10:13:14 -0400 Subject: [PATCH] Added io conservation report line for the beginning of a restart loop --- src/main/swiftest_driver.f90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/main/swiftest_driver.f90 b/src/main/swiftest_driver.f90 index 284706d10..eb2a375a1 100644 --- a/src/main/swiftest_driver.f90 +++ b/src/main/swiftest_driver.f90 @@ -75,8 +75,9 @@ program swiftest_driver !$ write(*,'(a)') ' OpenMP parameters:' !$ write(*,'(a)') ' ------------------' !$ write(*,'(a,i3,/)') ' Number of threads = ', nthreads - call integration_timer%reset() write(*, *) " *************** Main Loop *************** " + if (param%lrestart .and. param%lenergy) call nbody_system%conservation_report(param, lterminal=.true.) + call integration_timer%reset() do iloop = 1, nloops !> Step the system forward in time call integration_timer%start()