Open MPI logo

Open MPI User's Mailing List Archives

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

Subject: [OMPI users] Fortran90 functions missing: MPI_COMM_GET_ATTR / MPI_ATTR_GET()
From: Jens (jens-devel_at_[hidden])
Date: 2008-12-05 04:49:44


I just switched from MPICH2 to openmpi because of sge-support, but I am
missing some mpi-functions for fortran 90.

Does anyone know why
are not available? They work fine with MPICH2.

I compiled openmpi 1.2.8/1.3rc on a clean CentOS 5.2 with GNU-compilers
and Intel 11.0. Both give me the same error:

Error: There is no specific subroutine for the generic 'mpi_attr_get' at (1)

Intel 11.0:
hello_f90.f90(22): error #6285: There is no matching specific subroutine
for this generic subroutine call. [MPI_ATTR_GET]
    call MPI_ATTR_GET(MPI_COMM_WORLD, MPI_IO, attr_val, attr_flag, ierr)

Any ideas ...?


program main
 use mpi
 implicit none
 integer :: ierr, rank, size
 integer :: attr_val, attr_flag

 call MPI_INIT(ierr)
 call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierr)
 call MPI_COMM_SIZE(MPI_COMM_WORLD, size, ierr)

 call MPI_COMM_GET_ATTR(MPI_COMM_WORLD, MPI_IO, attr_val, attr_flag, ierr)
 call MPI_ATTR_GET(MPI_COMM_WORLD, MPI_IO, attr_val, attr_flag, ierr)

 print *, "Hello, world, I am ", rank, " of ", size
 call MPI_FINALIZE(ierr)