Open MPI logo

Open MPI User's Mailing List Archives

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

Subject: Re: [OMPI users] MPI_Allreduce fail (minGW gfortran + OpenMPI 1.6.1)
From: Jeff Squyres (jsquyres_at_[hidden])
Date: 2012-09-08 06:25:22


I am unable to replicate your problem, but admittedly I only have access to gfortran on Linux. And I am definitely *not* a Fortran expert. :-\

The code seems to run fine for me -- can you send another test program that actually tests the results of the all reduce? Fortran allocatable stuff always confuses me; I wonder if perhaps we're not getting the passed pointer properly. Checking the results of the all reduce would be a good way to check this theory.

On Sep 6, 2012, at 12:05 PM, Yonghui wrote:

> Dear mpi users and developers,
>
> I am having some trouble with MPI_Allreduce. I am using MinGW (gcc 4.6.2) with OpenMPI 1.6.1. The MPI_Allreduce in c version works fine, but the fortran version failed with error. Here is the simple fortran code to reproduce the error:
>
> program main
> implicit none
> include 'mpif.h'
> character * (MPI_MAX_PROCESSOR_NAME) processor_name
> integer myid, numprocs, namelen, rc, ierr
> integer, allocatable :: mat1(:, :, :)
>
> call MPI_INIT( ierr )
> call MPI_COMM_RANK( MPI_COMM_WORLD, myid, ierr )
> call MPI_COMM_SIZE( MPI_COMM_WORLD, numprocs, ierr )
> allocate(mat1(-36:36, -36:36, -36:36))
> mat1(:,:,:) = 111
> print *, "Going to call MPI_Allreduce."
> call MPI_Allreduce(MPI_IN_PLACE, mat1(-36, -36, -36), 389017, MPI_INTEGER, MPI_BOR, MPI_COMM_WORLD, ierr)
> print *, "MPI_Allreduce done!!!"
> call MPI_FINALIZE(rc)
> endprogram
>
> The command that I used to compile:
> gfortran Allreduce.f90 -IC:\OpenMPI-win32\include C:\OpenMPI-win32\lib\libmpi_f77.lib
>
> The MPI_Allreduce fail. [xxxxxxx:02112] [[17193,0],0]-[[17193,1],0] mca_oob_tcp_msg_recv: readv failed: Unknown error (108).
> I am not sure why this happens. But I think it is the windows build MPI problem. Since the simple code works on a Linux system with gfortran.
>
> Any ideas? I appreciate any response!
>
> Yonghui
>
> _______________________________________________
> users mailing list
> users_at_[hidden]
> http://www.open-mpi.org/mailman/listinfo.cgi/users

-- 
Jeff Squyres
jsquyres_at_[hidden]
For corporate legal information go to: http://www.cisco.com/web/about/doing_business/legal/cri/