X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc%2Freadrtns.F;h=c13b16eb290efa4d2954062cbfe57464333021e1;hb=34b56f82298df0d9781948908b2d93415838d88e;hp=eb7e462ebe30e12077abeea8b3ea0923ab04de46;hpb=6faa406438bff5968dc4a386929745cfaf554352;p=unres.git

diff --git a/source/wham/src/readrtns.F b/source/wham/src/readrtns.F
index eb7e462..c13b16e 100644
--- a/source/wham/src/readrtns.F
+++ b/source/wham/src/readrtns.F
@@ -92,6 +92,8 @@
       call readi(controlcard,'CONSTR_DIST',constr_dist,0)
       write (iout,*) "with_dihed_constr ",with_dihed_constr,
      & " CONSTR_DIST",constr_dist
+      refstr = index(controlcard,'REFSTR').gt.0
+      pdbref = index(controlcard,'PDBREF').gt.0
       call flush(iout)
       return
       end