>> How can I print synchronized messages to std::cout, i.e. I want processes to
>> print smth in increasing order of their ranks.
>>
> I dont know the solution in lam-mpi. But in mpich, you can use -l
> option to mpiexec which prints the number of processor in front of
> each line. Then you can use standard unix utility like sort to sort
> the output.
I'm not aware of such an option in lam, but you could prepend each print
statement with the rank of the process to achieve the same result.
The following would satisfy the initial query, but would block all
further computation until every process reached it:
do i=0,num_procs-1
if (i==my_rank) print *,my_rank,'statement_to_print'
call mpi_barrier(mpi_comm_world,ierr)
enddo
Hugh
|
