[Gretl-devel] Re: Debugging MPI on Windows
On Wed, 9 Oct 2019, Allin Cottrell wrote:
<hansl>
if $mpirank != 0
bundle b = defbundle("myrank", $mpirank)
mpisend(b, 0)
printf "bundle sent to root by %d\n", $mpirank
else
loop i=1..$mpisize-1 --quiet
b = mpirecv(i)
printf "bundle received from %d\n", i
endloop
endif
</hansl>
Not sure about this, but the above looks like it might be dodgy (get
out of sync somehow) [...]
Hmm, actually I don't think that's issue. I'll try some
experimentation in search of a better answer.
Allin