X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M-SAXS-homology%2Fgeomout.F;h=09ad28edfe82f49fa9059aa732b81ba0dcf8ce1f;hb=323646722ac21fc2b215014807f1cb4abeafa1f6;hp=0e77f42eaea73778dbdae2c858eeaa6571ce4cb9;hpb=f5eea7f24d31966fef101fb39741864fefeed396;p=unres.git 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 --- 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,