examples/smpi/NAS/MPI_dummy/mpif.h

   1       integer mpi_comm_world
   2       parameter (mpi_comm_world = 0)
   3
   4       integer mpi_max, mpi_min, mpi_sum
   5       parameter (mpi_max = 1, mpi_sum = 2, mpi_min = 3)
   6
   7       integer mpi_byte, mpi_integer, mpi_real,
   8      >                  mpi_double_precision,  mpi_complex,
   9      >                  mpi_double_complex
  10       parameter (mpi_double_precision = 1,
  11      $           mpi_integer = 2,
  12      $           mpi_byte = 3,
  13      $           mpi_real= 4,
  14      $           mpi_complex = 5,
  15      $           mpi_double_complex = 6)
  16
  17       integer mpi_any_source
  18       parameter (mpi_any_source = -1)
  19
  20       integer mpi_err_other
  21       parameter (mpi_err_other = -1)
  22
  23       double precision mpi_wtime
  24       external mpi_wtime
  25
  26       integer mpi_status_size
  27       parameter (mpi_status_size=3)