! This should be equal to the number of int fields in MPI_Status
integer MPI_STATUS_SIZE, MPI_STATUSES_IGNORE
parameter(MPI_STATUS_SIZE=4)
! This should be equal to the number of int fields in MPI_Status
integer MPI_STATUS_SIZE, MPI_STATUSES_IGNORE
parameter(MPI_STATUS_SIZE=4)