+ integer MPI_COMBINER_NAMED, MPI_COMBINER_DUP
+ integer MPI_COMBINER_CONTIGUOUS, MPI_COMBINER_VECTOR
+ integer MPI_COMBINER_HVECTOR_INTEGER, MPI_COMBINER_HVECTOR
+ integer MPI_COMBINER_INDEXED, MPI_COMBINER_HINDEXED_INTEGER
+ integer MPI_COMBINER_HINDEXED, MPI_COMBINER_INDEXED_BLOCK
+ integer MPI_COMBINER_STRUCT_INTEGER, MPI_COMBINER_STRUCT
+ integer MPI_COMBINER_SUBARRAY, MPI_COMBINER_DARRAY
+ integer MPI_COMBINER_F90_REAL, MPI_COMBINER_F90_COMPLEX
+ integer MPI_COMBINER_F90_INTEGER, MPI_COMBINER_RESIZED
+ integer MPI_COMBINER_HINDEXED_BLOCK
+
+ parameter( MPI_COMBINER_NAMED=0)
+ parameter( MPI_COMBINER_DUP=1)
+ parameter( MPI_COMBINER_CONTIGUOUS=2)
+ parameter( MPI_COMBINER_VECTOR=3)
+ parameter( MPI_COMBINER_HVECTOR_INTEGER=4)
+ parameter( MPI_COMBINER_HVECTOR=5)
+ parameter( MPI_COMBINER_INDEXED=6)
+ parameter( MPI_COMBINER_HINDEXED_INTEGER=7)
+ parameter( MPI_COMBINER_HINDEXED=8)
+ parameter( MPI_COMBINER_INDEXED_BLOCK=9)
+ parameter( MPI_COMBINER_STRUCT_INTEGER=10)
+ parameter( MPI_COMBINER_STRUCT=11)
+ parameter( MPI_COMBINER_SUBARRAY=12)
+ parameter( MPI_COMBINER_DARRAY=13)
+ parameter( MPI_COMBINER_F90_REAL=14)
+ parameter( MPI_COMBINER_F90_COMPLEX=15)
+ parameter( MPI_COMBINER_F90_INTEGER=16)
+ parameter( MPI_COMBINER_RESIZED=17)
+ parameter( MPI_COMBINER_HINDEXED_BLOCK=18)
+
+ integer MPI_ORDER_C, MPI_ORDER_FORTRAN
+ parameter(MPI_ORDER_C=1)
+ parameter(MPI_ORDER_FORTRAN=0)
+