1 #include "Bdef.h"
2 /*
3  * Define global variables
4  */
5 int BI_MaxNCtxt=0;		  /* Number of context pointers allocated */
6 int BI_MaxNSysCtxt=0;             /* Number of system ctxt ptrs allocated */
7 int BI_Iam, BI_Np=(-1);	          /* My pnum, and # of procs in system */
8 BLACBUFF *BI_ReadyB=NULL;         /* buffer that is ready for use */
9 BLACBUFF *BI_ActiveQ=NULL;        /* pointer to start of active buffer queue */
10 BLACBUFF BI_AuxBuff;
11 BLACSCONTEXT **BI_MyContxts=NULL; /* Array of pointers to my contexts */
12 BI_MPI_Comm *BI_SysContxts=NULL;
13 #ifdef UseF77Mpi
14 int *BI_F77_MPI_CONSTANTS;        /* Array of fortran MPI constants */
15 #else
16 BI_MPI_Datatype BI_MPI_COMPLEX, BI_MPI_DOUBLE_COMPLEX;
17 #endif
18 int *BI_F77_MPI_COMM_WORLD=NULL;
19 BI_MPI_Status *BI_Stats=NULL;
20