|
|
 |
| found 26 articles for 0.003 sec |
  |
Group: comp.lang.fortran · Group Profile · Search for CR LF Control With WRITEs to Console in comp.lang.fortran
Author: Walter Spector
Date: Jun 13, 2007 06:44
...stat_line implicit none integer :: i integer :: ileft, pxferr character, parameter :: CR = achar (13) ! Carraige return do, i=1, 10 write (*, '(2a,i4)', advance='no') CR, ' Loop Count = ', i ! Replace the sleep call with Real Work here ... ileft, pxferr) ! sleep for 1 second end do write (*,*) write (*,*) 'complete!' end program W.
|
| Show full article (0.86Kb) |
|
 |
|
1 ·
2 ·
3 ·
next |
|
|