6/11/2012 by Adam

[unres.git] / source / unres / src_CSA / readrtns_csa.F

diff --git a/source/unres/src_CSA/readrtns_csa.F b/source/unres/src_CSA/readrtns_csa.F
index 44709ce..d9c1695 100644 (file)
--- a/source/unres/src_CSA/readrtns_csa.F
+++ b/source/unres/src_CSA/readrtns_csa.F
@@ -578,7 +578,7 @@ 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
-     &            wdfa_nei.eq.0.0 .and. wdfa_beta.eq.0.0)) then
+     &      .and. wdfa_nei.eq.0.0 .and. wdfa_beta.eq.0.0)) then
        call init_dfa_vars
        print*, 'init_dfa_vars finished!'
        call read_dfa_info