- WRITE (6,'(/x,79(''=''))')
- WRITE (6,'(x,''I'',36x,''TPHIC'',36x, ''I'')')
- WRITE (6,'(x,''I'',34x,''Process '',i1,34x,''I'')') iproc
- WRITE (6,'(x,''I'',34x,''---------'', 34x,''I'')')
- WRITE (6,'(x,''I'',77x, ''I'')')
- WRITE (6,'(x,''I'',20x,''Events thrown : '',i8,31x,''I'')')
+ WRITE (6,'(/1x,79(''=''))')
+ WRITE (6,'(1x,''I'',36x,''TPHIC'',36x, ''I'')')
+ WRITE (6,'(1x,''I'',34x,''Process '',i1,34x,''I'')') iproc
+ WRITE (6,'(1x,''I'',34x,''---------'', 34x,''I'')')
+ WRITE (6,'(1x,''I'',77x, ''I'')')
+ WRITE (6,'(1x,''I'',20x,''Events thrown : '',i8,31x,''I'')')