Open MPI logo

Open MPI User's Mailing List Archives

  |   Home   |   Support   |   FAQ   |   all Open MPI User's mailing list

Subject: Re: [OMPI users] Error occurred in MPI_Allreduce on communicator MPI_COMM_WORLD
From: Peter Kjellström (cap_at_[hidden])
Date: 2011-05-04 11:57:37


On Wednesday, May 04, 2011 04:04:37 PM hi wrote:
> Greetings !!!
>
> I am observing following error messages when executing attached test
> program...
>
>
> C:\test>mpirun mar_f.exe
...
> [vbgyor:9920] *** An error occurred in MPI_Allreduce
> [vbgyor:9920] *** on communicator MPI_COMM_WORLD
> [vbgyor:9920] *** MPI_ERR_OP: invalid reduce operation
> [vbgyor:9920] *** MPI_ERRORS_ARE_FATAL (your MPI job will now abort)

I'm not a fortran programmer but it seems to me that placing the MPI_Allreduce
call in a subroutine like that broke the meaning of MPI_SUM and MPI_REAL in
that scope. Adding:

 include 'mpif.h'

after SUBROUTINE PAR_BLAS2(m, n, a, b, c, comm) helps.

/Peter