[Gretl-devel] Re: MPI issue
On 13.08.2019 19:22, Allin Cottrell wrote:
On Tue, 13 Aug 2019, Marcin Błażejowski wrote:
> On 13.08.2019 12:09, Riccardo (Jack) Lucchetti wrote:
>> On Tue, 13 Aug 2019, Marcin Błażejowski wrote:
>>
>>> Hi,
>>>
>>> what such an error means (haavelmo machine, MPI in 20 threads):
>> Just for the record: "haavelmo" is a server at UnivPM I gave Marcin
>> access to for the purpose of testing MPI-related stuff (In case you
>> people were wondering!).
> It looks like the problem with concurent access to the file. I solved
> the issue, but the solution is quite numb:
> ##########################
> loop i=0..$mpisize-1 --quiet
> if ($mpirank == i)
> MODEL = bread("MODEL")
> else
> sleep(1)
> endif
> endloop
> ##########################
Possibly relevant questions: Is the bundle file gzipped or just plain
XML? How/when is the bundle file created?
Allin,
this is a plain XML created by bwrite() few lines before bread() is used:
################
function void BACE_main_mpi (bundle *M)
bwrite(M, "MODEL")
mpi --np=M.CPU_num --send-functions --send-data --quiet
bundle MODEL
MODEL = bread("MODEL")
....
end mpi
M = bread("MMM")
end function
################
--
Marcin Błażejowski