3 int main( int argc, char **argv )
9 MPI_Init( &argc, &argv );
10 if (sizeof(MPI_Aint) != fsizeof_aint) {
11 printf( "Sizeof MPI_Aint is %d but Fortran thinks it is %d\n",
12 (int)sizeof(MPI_Aint), fsizeof_aint );
15 if (sizeof(MPI_Offset) != fsizeof_offset) {
16 printf( "Sizeof MPI_Offset is %d but Fortran thinks it is %d\n",
17 (int)sizeof(MPI_Offset), fsizeof_offset );