parallel DFA_D DFA_T DFA_N

[unres.git] / source / unres / src_MD / COMMON.DFA

diff --git a/source/unres/src_MD/COMMON.DFA b/source/unres/src_MD/COMMON.DFA
index c6add4f..67a1a0d 100644 (file)
--- 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