X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FMD_A-MTS.F;h=713d6e55ddd65159d9b35bfe996b4c98db0e69a8;hb=a04f03a4e6c118c9ca6ca9f6c15d0823e0d6c703;hp=1144934dc4726bcf9c30919f9fcf61fb0a50d312;hpb=29c920844b67d1517a31e014ed8fcbfeb1384940;p=unres.git diff --git a/source/unres/src_MD-M/MD_A-MTS.F b/source/unres/src_MD-M/MD_A-MTS.F index 1144934..713d6e5 100644 --- a/source/unres/src_MD-M/MD_A-MTS.F +++ b/source/unres/src_MD-M/MD_A-MTS.F @@ -230,6 +230,7 @@ c Variable time step algorithm. #endif endif if (mod(itime,ntwx).eq.0) then + call returnbox write (tytul,'("time",f8.2)') totT if(mdpdb) then call hairpin(.true.,nharp,iharp)