time

[unres.git] / source / unres / src-HCD-5D / MREMD.F

diff --git a/source/unres/src-HCD-5D/MREMD.F b/source/unres/src-HCD-5D/MREMD.F
index f22e2f6..e25e2bd 100644 (file)
--- a/source/unres/src-HCD-5D/MREMD.F
+++ b/source/unres/src-HCD-5D/MREMD.F
@@ -412,6 +412,7 @@ c   Entering the MD loop
         call setup_fricmat
       endif
       time00=MPI_WTIME()
+      time01=time00
       if (me.eq.king .or. .not. out1file)
      & write(iout,*) 'Setup time',time00-walltime
       call flush(iout)