X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fmcm.F;h=d9ca9adab812891e1acc96ea72368ec099d68f39;hb=c50460147146c32657710433c7464783b5347bf5;hp=79e567bc82cd1b3beef03539f20227718c1d0d5e;hpb=478a9d9a1c99eb3f4bc4ca676ff3162bdd01d633;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