program mpicheck
  include "mpif.h"
  integer,parameter:: a = MPI_MODE_RDWR
end program