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.
Changeset 6155 for branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO – NEMO

Ignore:
Timestamp:
2015-12-22T14:13:53+01:00 (8 years ago)
Author:
jpalmier
Message:

JPALM -- 22-12-2015 -- add more print statement for restart writing checkings

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/trcrst.F90

    r6154 r6155  
    9393            WRITE(numout,*) 'JPALM - trc restart kt = ',kt,'==',nitend - nn_dttrc 
    9494            WRITE(numout,*) '-----------------------------' 
    95             CALL ju2ymds( fjulday + rdttra(1) / rday, iyear, imonth, iday, zsec ) 
     95            CALL ju2ymds( fjulday + (2*rdttra(1)) / rday, iyear, imonth, iday, zsec ) 
    9696            WRITE(clkt, '(i4.4,2i2.2)') iyear, imonth, iday 
    9797            WRITE(numout,*) 'JPALM - 2 - date calculated by ju2ymds: ' 
Note: See TracChangeset for help on using the changeset viewer.