examples/smpi/NAS/LU/mpinpb.h

   1
   2 c---------------------------------------------------------------------
   3 c---------------------------------------------------------------------
   4
   5       include 'mpif.h'
   6
   7       integer           node, no_nodes, root, comm_setup,
   8      >                  comm_solve, comm_rhs, dp_type
   9       common /mpistuff/ node, no_nodes, root, comm_setup,
  10      >                  comm_solve, comm_rhs, dp_type
  11