X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FMD.F;h=0f12f9b52f1e8cbf1102b56863443b299d1de4e4;hb=a04f03a4e6c118c9ca6ca9f6c15d0823e0d6c703;hp=f65a52708172f220f2b1d7e3facec99070073b9d;hpb=29c920844b67d1517a31e014ed8fcbfeb1384940;p=unres.git diff --git a/source/unres/src_MD-M/MD.F b/source/unres/src_MD-M/MD.F index f65a527..0f12f9b 100644 --- a/source/unres/src_MD-M/MD.F +++ b/source/unres/src_MD-M/MD.F @@ -176,7 +176,10 @@ c Variable time step algorithm. call brown_step(itime) endif if (ntwe.ne.0) then - if (mod(itime,ntwe).eq.0) call statout(itime) + if (mod(itime,ntwe).eq.0) then + call statout(itime) + call returnbox + endif #ifdef VOUT do j=1,3 v_work(j)=d_t(j,0)