X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Fwham%2Fsrc%2Freadrtns.F;h=ad038e2418cc1a74a12cdb7a151c5b8035b73381;hb=f38a5bce43e7aa0071f0a3862eff6e9866ff03a1;hp=9fa6137bf7f7a108be6dcadf005b09b1a32b79ac;hpb=1a8216297db4d3568d41817711f75f97881e4569;p=unres.git

diff --git a/source/wham/src/readrtns.F b/source/wham/src/readrtns.F
index 9fa6137..ad038e2 100644
--- a/source/wham/src/readrtns.F
+++ b/source/wham/src/readrtns.F
@@ -93,6 +93,9 @@
       call readi(controlcard,'CONSTR_DIST',constr_dist,0)
       write (iout,*) "with_dihed_constr ",with_dihed_constr,
      & " CONSTR_DIST",constr_dist
+      call readi(controlcard,'CONSTR_HOMOL',constr_homology,0)
+      write (iout,*) "with_homology_constr ",with_dihed_constr,
+     & " CONSTR_HOMOLOGY",constr_homology
       refstr = index(controlcard,'REFSTR').gt.0
       pdbref = index(controlcard,'PDBREF').gt.0
       dyn_ss=(index(controlcard,'DYN_SS').gt.0)