X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2FssMD.F;h=9fe7d17666149343f0903c6fbbabf56680855681;hb=da2d818fafa08553758db5b914251903045f37d3;hp=bb95eefd9d1c1f362a58ef381eceb6d4bd3f3cc6;hpb=3e5191c219c2c8855e212d6852e6ef50f7e14ead;p=unres.git diff --git a/source/cluster/wham/src-M/ssMD.F b/source/cluster/wham/src-M/ssMD.F index bb95eef..9fe7d17 100644 --- a/source/cluster/wham/src-M/ssMD.F +++ b/source/cluster/wham/src-M/ssMD.F @@ -399,7 +399,7 @@ c$$$ if (ed.gt.0.0d0) havebond=.true. c-------END SECOND METHOD, CONTINUOUS SECOND DERIVATIVE endif - write(iout,*) 'havebond',havebond +C write(iout,*) 'havebond',havebond if (havebond) then #ifndef CLUST #ifndef WHAM