The interface definition for MPI_Initialized in
ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh
is incorrect. The script is generating the interface as
subroutine MPI_Initialized(flag, ierr)
integer, intent(out) :: flag
integer, intent(out) :: ierr
end subroutine MPI_Initialized
However, according to the MPI standard it should be
subroutine MPI_Initialized(flag, ierr)
logical, intent(out) :: flag
integer, intent(out) :: ierr
end subroutine MPI_Initialized
I find this error in both 1.1.2 and the 1.2x series.
--
Tim Campbell
Naval Research Laboratory
|