From e689a29a105b35c1e8aaa5e12e97336f5fbfd29c Mon Sep 17 00:00:00 2001 From: David A Minton Date: Mon, 24 Apr 2023 17:07:17 -0400 Subject: [PATCH] More improvements to distribution messaging. Number of test particles on each image are reported in order. --- src/swiftest/swiftest_coarray.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/swiftest/swiftest_coarray.f90 b/src/swiftest/swiftest_coarray.f90 index 191b06808..b2f615712 100644 --- a/src/swiftest/swiftest_coarray.f90 +++ b/src/swiftest/swiftest_coarray.f90 @@ -558,7 +558,9 @@ module subroutine swiftest_coarray_distribute_system(nbody_system, param) write(image_num_char,*) this_image() write(ntp_num_char,*) nbody_system%tp%nbody + if (this_image() /= 1) sync images(this_image() - 1) write(param%display_unit,*) "Image " // trim(adjustl(image_num_char)) // " ntp: " // trim(adjustl(ntp_num_char)) + if (this_image() < num_images()) sync images(this_image() + 1) deallocate(tmp, cotp)