X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fmcm.F;h=d9ca9adab812891e1acc96ea72368ec099d68f39;hb=07eee9774e7767e29ff5209a4556ad3b1dc6a8f8;hp=79e567bc82cd1b3beef03539f20227718c1d0d5e;hpb=c092a8655963478b90eb630150c75ff5775f45f0;p=unres.git diff --git a/source/unres/src_MD/mcm.F b/source/unres/src_MD/mcm.F index 79e567b..d9ca9ad 100644 --- a/source/unres/src_MD/mcm.F +++ b/source/unres/src_MD/mcm.F @@ -301,7 +301,7 @@ C-------------------------------------------------------------------------- if (WhatsUp.eq.0 .and. Kwita.eq.0) then call metropolis(nvar,varia,varold,etot,eold,accepted, - & my_conf,EneLower,it) + & my_conf,EneLower) endif write (iout,*) 'My_Conf=',My_Conf,' EneLower=',EneLower if (accepted) then