X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2FssMD.F;h=9fe7d17666149343f0903c6fbbabf56680855681;hb=4ed0b0657cdb9599bd714a010134061c94f509cc;hp=bb95eefd9d1c1f362a58ef381eceb6d4bd3f3cc6;hpb=e22a1f0e211043433e4f7c83d5605fa0edddabc9;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