ctest for src-M are off
[unres.git] / source / cluster / wham / src / COMMON.MPI
1       integer me, me1, Master, Master1, Nprocs, Nprocs1, Comm1, 
2      & Indstart, Indend, scount, idispl, i2ii
3       integer indstart_map,indend_map,idispl_map,scount_map
4       common /MPI_Data/ Nprocs, Master,Master1,Me,Comm1,Me1,Nprocs1,
5      &  Indstart(0:MaxProcs),Indend(0:MaxProcs), idispl(0:MaxProcs),
6      &  scount(0:MaxProcs), indstart_map(0:MaxProcs),
7      &  indend_map(0:MaxProcs), idispl_map(0:MaxProcs), 
8      &  scount_map(0:MaxProcs)