integer MPI_SUCCESS, MPI_ERR_COMM, MPI_ERR_ARG, MPI_ERR_TYPE,
> MPI_ERR_REQUEST, MPI_ERR_INTERN, MPI_ERR_COUNT,
- > MPI_ERR_RANK,
+ > MPI_ERR_RANK, MPI_ERR_OTHER,
> MPI_ERR_TAG, MPI_ERR_TRUNCATE, MPI_ERR_GROUP, MPI_ERR_OP,
> MPI_IDENT, MPI_SIMILAR, MPI_UNEQUAL, MPI_CONGRUENT,
> MPI_WTIME_IS_GLOBAL
parameter(MPI_ERR_TRUNCATE=9)
parameter(MPI_ERR_GROUP=10)
parameter(MPI_ERR_OP=11)
+ parameter(MPI_ERR_OTHER=12)
parameter(MPI_IDENT=0)
parameter(MPI_SIMILAR=1)
parameter(MPI_UNEQUAL=2)
> MPI_INTEGER8, MPI_REAL, MPI_REAL4, MPI_REAL8,
> MPI_DOUBLE_PRECISION, MPI_COMPLEX, MPI_DOUBLE_COMPLEX,
> MPI_2INTEGER, MPI_LOGICAL1, MPI_LOGICAL2, MPI_LOGICAL4,
- > MPI_LOGICAL8
+ > MPI_LOGICAL8, MPI_2REAL, MPI_2DOUBLE_PRECISION
parameter(MPI_DATATYPE_NULL=-1)
parameter(MPI_BYTE=0)
parameter(MPI_CHARACTER=1)
parameter(MPI_LOGICAL2=16)
parameter(MPI_LOGICAL4=17)
parameter(MPI_LOGICAL8=18)
+ parameter(MPI_2REAL=19)
+ parameter(MPI_2DOUBLE_PRECISION=19)
! These should be ordered as in smpi_f77.c
integer MPI_OP_NULL,MPI_MAX, MPI_MIN, MPI_MAXLOC, MPI_MINLOC,
> MPI_ALLTOALL
external MPI_WTIME
+ external MPI_WTICK
+
double precision MPI_WTIME
+ double precision MPI_WTICK