small corrections

[unres.git] / source / unres / src_MD-M-SAXS-homology / geomout.F

diff --git a/source/unres/src_MD-M-SAXS-homology/geomout.F b/source/unres/src_MD-M-SAXS-homology/geomout.F
index 0e77f42..09ad28e 100644 (file)
--- a/source/unres/src_MD-M-SAXS-homology/geomout.F
+++ b/source/unres/src_MD-M-SAXS-homology/geomout.F
@@ -525,7 +525,7 @@ C          print *,'A CHUJ',potEcomp(23)
           if(itime.eq.0) then
            write(format,'(a1,a4,a1,a4,a10)') "(",format1,",",format2,
      &                                                     ",100a12)"
-           write (istat,format) "#","",
+           write (istat,format) "#"," ",
      &      (ename(print_order(i)),i=1,nprint_ene)
           endif
           write(format,'(a1,a4,a1,a4,a10)') "(",format1,",",format2,