Ignore:
Timestamp:
Sep 24, 2014 2:06:57 PM (7 years ago)
Author:
maronga
Message:

New flag files allow to force unscheduled termination/restarts of batch jobs, progress output is made for batch runs, small adjustments for lxce6 and lccrayh/lccrayb

File:
1 edited

Legend:

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

    r1401 r1468  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Adapted for use on up to 6-digit processor cores
    2323!
    2424! Former revisions:
     
    108108    IMPLICIT NONE
    109109
    110     CHARACTER (LEN=5)  ::  myid_char_save
     110    CHARACTER (LEN=7)  ::  myid_char_save
    111111    CHARACTER (LEN=10) ::  binary_version
    112112    CHARACTER (LEN=10) ::  version_on_file
     
    296296!
    297297!--    Set the filename (underscore followed by four digit processor id)
    298        WRITE (myid_char,'(''_'',I4.4)')  j
     298       WRITE (myid_char,'(''_'',I6.6)')  j
    299299       WRITE (9,*) 'myid=',myid,' opening file "',myid_char,'"'
    300300       CALL local_flush( 9 )
    301301
    302302!
    303 !--    Open the restart file. If this file has been created by PE0 (_0000),
     303!--    Open the restart file. If this file has been created by PE0 (_000000),
    304304!--    the global variables at the beginning of the file have to be skipped
    305305!--    first.
Note: See TracChangeset for help on using the changeset viewer.