X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2Freadrtns.F;h=b0b329cdfd07a7ce5ee34411fb16d4bf0f9662f4;hb=21254678bfd7c4effcc354155b7eaf6337cbe2cf;hp=ded6c92f037b4cea42d00735355c7733353cd093;hpb=26f4da2c2e54e6b1bad2f055c4e4e76b5b877d05;p=unres.git

diff --git a/source/wham/src-M/readrtns.F b/source/wham/src-M/readrtns.F
index ded6c92..b0b329c 100644
--- a/source/wham/src-M/readrtns.F
+++ b/source/wham/src-M/readrtns.F
@@ -91,6 +91,7 @@
       with_dihed_constr = index(controlcard,"WITH_DIHED_CONSTR").gt.0
       write (iout,*) "with_dihed_constr ",with_dihed_constr
       call readi(controlcard,'CONSTR_DIST',constr_dist,0)
+      dyn_ss=index(controlcard,"DYN_SS").gt.0
       return
       end
 c------------------------------------------------------------------------------