Ignore:
Timestamp:
Aug 30, 2018 4:06:58 PM (3 years ago)
Author:
kanani
Message:

Fix for progress bar, minor changes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/header.f90

    r3083 r3224  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Increase printed length of run identifier
    2323!
    2424! Former revisions:
     
    20572057101 FORMAT (35X,'coupled run: ',A/ &
    20582058            35X,42('-'))
    2059 102 FORMAT (/' Date:                 ',A8,4X,'Run:       ',A20/      &
     2059102 FORMAT (/' Date:                 ',A8,4X,'Run:       ',A34/      &
    20602060            ' Time:                 ',A8,4X,'Run-No.:   ',I2.2/     &
    20612061            ' Run on host:        ',A10)
     
    24772477511 FORMAT ('    Sedimentation Courant number:                  '/&
    24782478            '                               C_s   =',F4.1,'        ')
    2479 512 FORMAT (/' Date:                 ',A8,6X,'Run:       ',A20/      &
     2479512 FORMAT (/' Date:                 ',A8,6X,'Run:       ',A34/      &
    24802480            ' Time:                 ',A8,6X,'Run-No.:   ',I2.2/     &
    24812481            ' Run on host:        ',A10,6X,'En-No.:    ',I2.2)
Note: See TracChangeset for help on using the changeset viewer.