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
signature.asc
Description: This is a digitally signed message part.