New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Diff [11476:11539] for NEMO/branches/UKMO/NEMO_4.0_mirror_SI3_decoupled/src/OCE/ICB/icbrst.F90 – NEMO

Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/UKMO/NEMO_4.0_mirror_SI3_decoupled/src/OCE/ICB/icbrst.F90

    r11476 r11539  
    222222         ENDIF 
    223223         IF( lk_mpp ) THEN 
    224             WRITE(cl_filename,'(A,"_icebergs_",A,"_restart_",I4.4,".nc")') TRIM(cexper), TRIM(ADJUSTL(clkt)), narea-1 
     224            WRITE(cl_filename,'(A,"_icebergs_",A,"_restart_",I6.6,".nc")') TRIM(cexper), TRIM(ADJUSTL(clkt)), narea-1 
    225225         ELSE 
    226226            WRITE(cl_filename,'(A,"_icebergs_",A,"_restart.nc")') TRIM(cexper), TRIM(ADJUSTL(clkt)) 
Note: See TracChangeset for help on using the changeset viewer.