X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2FCOMMON.DFA;h=67a1a0d78be9a9518fec57625f328d67f002c652;hb=6f95af5d4a04ea311fb1e784ce812f133dc8f2e5;hp=c6add4fb986e5239a71a8394426bd7f8534b321c;hpb=b847bacd7f528a68d640b3d58d4f5b9ce3c6ede2;p=unres.git

diff --git a/source/unres/src_MD/COMMON.DFA b/source/unres/src_MD/COMMON.DFA
index c6add4f..67a1a0d 100644
--- a/source/unres/src_MD/COMMON.DFA
+++ b/source/unres/src_MD/COMMON.DFA
@@ -67,6 +67,16 @@ C NMAP    - mapping between dfanum and ndis, nphi, nthe, nnei
      &              KDISNUM(IDFAMAX),
      &              NCA, ICAIDX(MAXRES)
       COMMON /IDFA2/ ishiftca,ilastca
+c parallel
+      integer idfadis_start,idfadis_end,
+     &        idfaphi_start,idfaphi_end,
+     &        idfathe_start,idfathe_end,
+     &        idfanei_start,idfanei_end
+      COMMON /dfa_mpi/ idfadis_start,idfadis_end,
+     &        idfaphi_start,idfaphi_end,
+     &        idfathe_start,idfathe_end,
+     &        idfanei_start,idfanei_end 
+
 
 CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
 C