/* Copyright 1995 Jonathan C. Hardwick */

#include <mpi.h>
#include "globals.h"

/* These are global state variables.  For every group (world, all
 * workers, and current group) there is an MPI group, MPI communicator,
 * number of processors in the group, and rank of this processor in the
 * group. */

MPI_Group ggrpWorld;
MPI_Comm gcomWorld;
int gnprocWorld;
int grnkWorld;

MPI_Group ggrpWkr;
MPI_Comm gcomWkr;
int gnprocWkr;
int grnkWkr;

MPI_Group ggrpCur;
MPI_Comm gcomCur;
int gnprocCur;
int grnkCur;

#ifdef STEAL
  int gcutoff;
#endif