X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-NEWSC%2FCOMMON.MPI;fp=source%2Fwham%2Fsrc-NEWSC%2FCOMMON.MPI;h=037c1c9aaf3691044c66d801cef358accb204149;hb=7308760ff07636ef6b1ee28d8c3a67a23c14b34b;hp=0000000000000000000000000000000000000000;hpb=9a54ab407f6d0d9d564d52763b3e2136450b9ffc;p=unres.git

diff --git a/source/wham/src-NEWSC/COMMON.MPI b/source/wham/src-NEWSC/COMMON.MPI
new file mode 100755
index 0000000..037c1c9
--- /dev/null
+++ b/source/wham/src-NEWSC/COMMON.MPI
@@ -0,0 +1,8 @@
+      integer me, me1, Master, Master1, Nprocs, Nprocs1, Comm1, 
+     & Indstart, Indend, scount, idispl, i2ii, WHAM_COMM
+      integer indstart_map,indend_map,idispl_map,scount_map
+      common /MPI_Data/ Nprocs, Master,Master1,Me,Comm1,Me1,Nprocs1, 
+     &  WHAM_COMM,
+     &  Indstart(0:MaxProcs),
+     &  Indend(0:MaxProcs), idispl(0:MaxProcs),
+     &  scount(0:MaxProcs)