Merge branch 'homology' of mmka.chem.univ.gda.pl:unres into homology

[unres.git] / source / unres / src_MD / unres.F

diff --git a/source/unres/src_MD/unres.F b/source/unres/src_MD/unres.F
index b14c040..632374b 100644 (file)
--- a/source/unres/src_MD/unres.F
+++ b/source/unres/src_MD/unres.F
@@ -56,8 +56,6 @@ c      call memmon_print_usage()
       if (me.eq.king) call cinfo
 C Read force field parameters and job setup data
       call readrtns
-      call flush(iout)
-C
       if (me.eq.king .or. .not. out1file) then
        write (iout,'(2a/)') 
      & text_mode_calc(modecalc)(:ilen(text_mode_calc(modecalc))),