X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2Freadrtns_csa.F;h=df144f4e7531dfe7012acc09c8b51f93bd4b67f7;hb=8f7b1b10ee6012726aac0da9175fae3bc84a9497;hp=44709cea108ddaf5ca8b93717fe0831aad931e6d;hpb=8fe766bfa1844f41b8350fa5666190090275c86b;p=unres.git

diff --git a/source/unres/src_CSA/readrtns_csa.F b/source/unres/src_CSA/readrtns_csa.F
index 44709ce..df144f4 100644
--- a/source/unres/src_CSA/readrtns_csa.F
+++ b/source/unres/src_CSA/readrtns_csa.F
@@ -577,7 +577,7 @@ C     Juyong:READ read_info
 C     READ fragment information!!
 C     both routines should be in dfa.F file!!
 
-      if (.not. (wdfa_dist.eq.0.0 .and. wdfa_tor.eq.0.0
+      if (.not. (wdfa_dist.eq.0.0 .and. wdfa_tor.eq.0.0 .and.
      &            wdfa_nei.eq.0.0 .and. wdfa_beta.eq.0.0)) then
        call init_dfa_vars
        print*, 'init_dfa_vars finished!'